Digital PDFs

AH-F295C-MC

April 1982

399 pages

Original

18MB

view download

OCR Version

15MB

view download

Document:	CZMSDC0 MS11-L,MS11-M MS11L-M DIAG APR 1982 bw
Order Number:	AH-F295C-MC
Revision:	000
Pages:	399
Original Filename:	CZMSDC0__MS11-L,MS11-M__MS11L-M_DIAG__AH-F295C-MC__APR_1982_bw.pdf

OCR Text

MS11L/M DIAG

CZMSDCO

AH-F295C-MC_

cmeicite
oo FIRTIH]

FICHE 1 OF 2 waoe v usa

FICKE
'3 OF 2 iarit
s IR

MACRO M1113

22-APR-81
.;é;LE

8 1
PAGE 20

14:13

OV
WN

= OOV

NIPNE WA

nN n PON) =D cod cd b e —od d b o =b

SEQUENCE

CZMSDCO MS11-L/M DIAGNOSTIC

JON

NN —

CZMSDCO MS11-L/M DIAGNOSTIC

IDENTIFICATION
PRODUCT CODE:

AC~-F294C-MC

PRODUCT NAME:

CZMSDCO MS11-L/M DIAG

PRODUCT DATE:

APRIL,

MAINTAINER:

DIAGNOSTIC ENGINEERING

1981

THE INFORMATION
IN
THIS
DOCUMENT
IS
SUBJECT
TO
CHANGE
WITHOUT
NOTICE
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT
8Y
DIGITAL
EQUIPMENT
CORPORATION.
DIGITAL _ EQUIPMENT
CORPORATION
ASSUMES
NO
RESPONSIBILITY FOR ANr ERRORS THAT
MAY APPEAR

IN THIS MANUAL.

THE SOF TWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO

PURCHASER

UNDER

LICENSE

FOR

USE

ON A SINGLE

THE

COMPUTER

SYSTEM
AND
CAN
BE
COPIED
<(WITH
[INCLUSION
OF DIGITAL'S
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY
OTHERWISE BE PROVIDED IN WRITING BY DIGITAL.

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY

THE
USE OR RELIABILITY OF
NOT SUPPLIED BY DIGITAL.

(C)

ITS SOFTWARE ON EQUIPMENT

THAT

1979,1982 DIGITAL EQUIPMENT CORPORATION

FCR
IS

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE 51

SEQUENCE

REVISION HISTORY
CHANGES

CZMSDA
CZMSDC

01-DEC-79
01-0CT7-80

MICHAEL D BIBEAULT

NONE=NEW FROGRAM

COMPATIBLE WITH 11/24
2) SIING ROUTINE WILL ACCEP1 ALL
LEGAL MEMORY CONF IGURATIONS

3) ALL FIELD SERVICE COMMANDS
OPERATIVE

CZMSDCO MS11=-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

D 1
PAGE 22

SEQUENCE

51
g%

OPERATIONAL SWITCH SETTINGS
SWITCH REGISTER DEFINITIONS

*®

56
57
58
59

*
*
*
*

60
61
62

63
64
65
66

67
68
69
70
7

SWITCH

emsesees

15
14
13
12

@0 2| |/

USE

eccocowcocsscsccecaancas

HALT ON
LOOP ON
INHIBIT
INHIBIT

ERROR
TEST
ERROR TYPEOUTS
RELOCATION

*
*
*

1
10
9

QUICK VERIFY
BELL ON ERROR
LOOP ON ERROR

*
*
*

I4
6
5

DETAILED ERROR REPORTS
INHIBIT CONFIGURATION MAP
LIMIT MAX ERRORS PER BANK

DETECT SINGLE BIT ERRORS

*
*
*
*

4
3
2
1

HALT PROGRAM (UNRELOCATED & RESTORE LOADERS)

FAT TERMINAL (132 COLUMNS OR BETTER)
TEST MODE - SEE DOCUMENT
TEST MODE - SEE DOCUMENT
1EST MODE - SEE DOCUMENT

CZMSDCO MS11-~L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

E_1

PAGE 23

SEQUENCE

72
3

PAGE 2

74
;g

TABLE OF CONTENTS

1.0

GENERAL PROGRAM INFORMATION

79
80

1.1
1.2

PROGRAM PURPOSE (ABSTRACT)
SYSTEM REQUIREMENTS

81
82
gz

1.3
1.4
1.5

RELATED DOCUMENTS AND STANDARDS
DJAGNOSTIC HIERARCHY PREREQUISITES
ASSUMPTIONS

2.0

OPERATING INSTRUCTIONS

87
88

2.1
2.2

LOADING AND STARTING PROCEDURES
DEFAULT TEST SEQUENCE

89
90
g;

2.3
2.4

SPECIAL ENVIRONMENTS
PROGRAM OPTIONS

3.0

ERROR INFORMATION

95
96
gg

3.1
3.2

3.3

ERROR REPORTING
ERROR ABBREVIATIONS
ERROR HALTS

183

4.0

PROGRESS REPORTS

}8}

5.0

CSR INFORMATION TABLES

103

5.1

}8;

5.5

104
105
106

2.5

EXECUTION TIMES

CORE/MOS PARITY (SR

5.2
5.3
5.4

MOS BIPOLAR (SR
MF11S-K (SR
MS11-L (SR

}?8

6.0

SUB-TEST SUMMARIES

6.1

5.2

PATTERNS

}}g

7.0

PROGRAM FEATURES

116
117
118
119
120

7.1
7.2
7.3
7.4
7.5

FAST DATA ACCESS RATES
BANK ZERO TESTING
MEMORY CONFIGURATION MAP
EVERYTHING YOU'VE ALWAYS WANTED TO KNOW ABOUT SUPERMAC
MEMORY MANAGEMENT MAPPING

}}%

MS11-M (SR

TESTS

...

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

F
1
PAGE 24

SEQUENCE

122
}%g

127

}%g

1%?

PAGE 3
1.0

GENERAL PROGRAM INFORMATION

1.1

PROGRAM PURPOSE

132

(ABSTRACT)

%N;E?DED FOR USE ON ALL PDP-11'S WHICH
L

MEET

THE

CONDITIONS

133
134
135
136
}gg

139

142

D. THERE IS THE CAPABILITY OF TESTING MIXED CONFIGURATIONS

145
}29

12?
}22

148
149

THE OBJECT OF THIS SOFTWARE IS TO FUNCTIONALLY

ALL MAIN MEMORY FUNCTIONS AS FAST AS POSSIBLE.

TEST

AND

1.2.1

IT HAS SPECIAL A MAINTENANCE MODE
SPECirIC FUNCTIONAL CAPABILITIES.

(FIELD SERVICE MODE)

VERIFY

(MS11-L,

MS11-M AND WHAT EVER ELSE IN ON THE SYSTEM).

}2%

163

TO THE MEMORY AND TO ISOLATE FAILURES WITHIN THE MEMORY

TO THE CORRECT CARD.

1.2

160
}2}

THIS PROGRAM WILL BE USED BY SYSTEM MANAGERS
AND
OPERATJLRS
TO
DETERMINE
THE
CORRECT OPERATION OF MAIN MEMORY AND ALSO IT WILL
BE PRIMARILY USED BY FIELD SERVICE AND MANUFACTURING
TO
ISOLATE

FAILURES

}g?

154
155
156
157
123

TO PROVIDE

SYSTEM REQUIREMENTS
HARDWARE REQUIREMENTS PDP=11 CPU AND AT LEAST 64K
MEMORY MANAGEMENT.

(16 BIT WORDS) OF MEMORY AND

NOTE
LIKE MEMORY TYPES MUST BE ON 16K WCRD BOUNDARIES
STARTING AT PHYSICAL ADDRESS 0.

MACRO M1113

22-APR-8i

14:13

6 1
PAGE 25

SEQUENCE

OO OOV DOV V0000000000 00000000 N N NNNNNNYNOOOONON
NOWNS W =O VBN NS WWN OOV NONN WA 2OV~

CZMSDCO MS11-L/M DIAGNOSTIC

1.2.2

SOFTWARE REQUIREMENTS -

THIS PROGRAM IS DESIGNED TO RUN
FOLLOWING MONITORS:

STAND

ALONE

UNDER

ANY

THE

XXDP
ACT
APT

PDP=11/44 USER'S GUIDE
MS11-M USER'S GUIDE

v
O

STANDARD

&
e

i
ad e

(175-003-009-02)

SUPER-MAC REFERENCE GUIDE (130-380-007-00)

e
o
b e

PROGRAMMING PRACTICES
SYSTEM MACRO MANUAL

(EK=11044~UG)

(EK-MS11M-UG-001)

_APT _

(MAINDEC-11-DXQAC~C-D)

SYSTEM

(APT/11-317-07-09)

1.4

(EB9340)

b e

D nd

)

PDP=11/04/34/45/55/60 PROCESSOR HANDBOOK

RELATED DOCUMENTS AND STANDARDS

1.3

D e

)

b o

)

b o

PAGE 4

PDP-11

DIAGNOSTIC

INTERFACE

ACT11/XXDP PROGRAMMING SPECIFICATION (AUTOCAT-11-QZAUB-B-D)

DIAGNOSTIC HIERARCHY PREREQUISITES

THE PROGRAM IN ANY WAY MISBEHAVES,

THEN:

TRY IT AGAIN WITH CACHE OFF

(REFERENCE SECTION 2.4.3.1)

INHIBIT RELOCATION (REFERENCE SECTION 2.4.1)

TRY CPU DJAGNOSTICS

TRY MEMORY MAMNAGEMENT DIAGNOSTICS

TRY CACHE DIAGNOSTICS

TRY UNIBUS MAP DIAGNOSTICS

(WHERE APPLICABLE)
(WHERE APPLICABLE)

ORI PR A NN NI NINI PN
NN AR NI NN PN
=

= OV NOWNS
W =00

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

H
1
PAGE 26

SEQUENCE
PAGE 5

1.5

ASSUMPTIONS

THIS
PROGRAM
ASSUMES
THE
CORRECT
OPERATION
OF
MANAGEMENT
CACHE,
AND
THE
UNIBUS
MAP.,
THIS

(INITIALLYS BANK 0 (0-16K).

THE
C(PU,
MEMORY
PROGRAM OCCUPIES

THE XXDP LOADERS ARE IN BANK 1.

2.0

OPERATING INSTRUCTIONS

232
233

2.1

LOADING & STARTING PROCEDURES

236

2.1.1

QUICK STARTING -

239

LOAD ADDRESS 200

241

SET SWITCH REGISTER FOR OPTIONS (NORMALLY 0)

243

START

247

NOTE

249
250
251
252

IF ON AN 11/24 USING MS11-L
MEMORY
BE
SURE
THAT THE PERIPHERAL PAGE JUMPER IS
IN PLACE.;
FAILURE TO DO
SO SENDS
THE
DIAGNOSTIC TO NEVER-NEVER LAND.

258

2.1.2

STOPPING -

260

SET SwW8, AND/OR

262

TYPE CONTROL ‘'C'" (REFERENCE SECTION 2.4.4.1).

267

2.1.3

RESTARTING (PRESERVE CONFIGURATION TABLE) -

269

LOAD ADDRESS 202

271

SET SWITCH REGISTER FOR OPTIONS (NORMALLY 0)

273

START

MACRO M1113

22-APR-81 14:13

1.1

PAGE 27

SEQUENCE
PAGE 6

2.1.4

SWITCH RESISTER OPTIONS -

OO - ROWES
W

SWITCH

O = NINSH
NN N

CZMSDCO MS11-L/M DIAGNOSTIC

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

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

1
J
PAGE 28

SEQUENCE

PAGE 7

2.2

DEFAULT TEST SEQUENCE
THE FOLLOWING TWO LISTS

gR4 ngs

GIVE

THE TEST PROTOCOL FOR PARITY AND ECC

TESTS MARKED WITH A '‘«'' ARE NOT NORMALLY RUN EXCEPT UNDER ACT
OR

THROUGH

FIELD

SERVICE

COMMAND

(REFERENCE

—b e

b and

D e and

NO NS WO

N NN W N N NN N NN

MEMORY.

2.2.1

TEST FROTOCOL FOR PARITY MEMORY =~
PATTERN

34
6
17

14
1

2
3

5
21

* 22
* 23
26
* 24
+ 31
* 32
* 33
34

PATTERN NAME

TIME

(SEC/16K)

SOFT ERROR TEST
INITIAL DATA TEST
HOLDING 1°'S AND 0°'S TEST

<1
<1
<1

ADDRESS TEST

ADDRESS BIT TEST

COMPLEMENT ADDRESS TEST
3 XOR 9 TEST

ROTATING 0°'S TEST

ROTATING 1°'S TEST
MARCHING 1'S AND 0°'S TEST

WORST CASE NOISE PARITY TEST
REFRESH TEST
SHIFTING DIAGONAL TEST
RANDOM DATA TEST
FAST GALLOPING PATTERN TEST
SOB~A-LONG TEST
WRITE RECOVERY TEST
BRANCH GOBBLE TEST
SOFT ERROR TEST

<1
1

1
1

N/A
10
10
<1
20
3
<1
35
<1

SECTION

CZMSDCO MS11-L/M DIAGNOSTIC
343
344
345
%29
348

%g%

351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
In
372
373
374
375
376

378

MACRO M1113

22-APR-81 14:13

1
K
PAGE 29

SEQUENCE
PAGE 8

2.2.2

TEST PROTOCOL FOR ECC MEMORY PATTERN

@
+a
3
+a
1+
+3
+a

a
*
*
+
+
+

5
25
1N
12
13
14
15
16
34
6
10
17
14
1
2
4
5
21
20
22
26
24
3
32
33
34

PATTERN NAME

TIME

ROTATING 1°'S TEST
INTERRUPT ENABLE TEST
SINGLE BIT ERROR TEST
WRITE BYTE CLEARS SBE TEST
CREATE DOUBLE BIT ERROR TEST
WRITE INHIBIT DATIP W/DBE TEST
WRITE INHIBIT OF BYTE W/DBE TEST
WRITE INHIBIT OF WORD W/DBE TEST
SOFT ERROR TEST
INITIAL DATA TEST
BYTE ADDRESS TEST
HOLDING 1°S AND 0°'S TEST
ADDRESS BIT TEST
ADDRESS TEST
COMPLEMENT ADDRESS TEST
ROTATING 0'S TEST
ROTATING 1°S TEST
MARCHING 0'S AND 1°'S TEST
MARCHIN 0°'S AND 1°'S IN (B'S TEST
REFRESH TEST
RANDOM DATA TEST
FAST GALLOPING PATTERN TEST
SOB-A-LONG TEST
WRITE RECOVERY TEST
BRANCH GOBBLE TEST
SOFT ERROR TEST

1
<1
<2
<1
1
1
1
<1
<1
<1
<1
<1
<1
<1
<1
1
1
1
<1
10
<1
20
3
<1
35
<1

%gg

@ = RUN ONLY ON THE FIRST PASS WHEN UNDER ACT OR APT

%g}

+ = RUN TWICE FOR EACH 16K BANK [F INTERLEAVED

383
384
385
386
387

X2 = RUN ONLY FOR MF11S5-K

390
391

AT THE END OF EACH PASS THE PROGRAM
#30, AND #27 FOR ALL BANKS.

389

WILL

RUN

CLEANUP

(SEC/16K)

PATTERNS

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE %0

SEQUENCE
PAGE 9

2.3

SPECIAL ENVIRONMENTS

2.3.1

XXDP -

THE FIRST PASS WILL BE A QUICK VERIFY PASS
CHAIN MODE.

2.3.2

IF AND ONLY

ACT & APT AUTOMATIC MODE -

;:ESPROGRAM WILL NOT

CREATE

DOUBLE BIT ERRORS

(DBE'S)

AFTER

2.3.2.1

APT EXECUTION TIMES -

25?5 ARE

SOME MEASURED EXECUTION TIMES FOR AN 11/44 WITH
1ST Qv PASS

CACHE

2ND PASS & ONWARD

128K MS11-M (NON-INTERLEAVED)

10 MIN 15 SEC

7 MIN 40 SEC

128K MS11-l.

9 MIN 50 SEC

7 MIN 30 SEC

256K MS11-M (INTERLEAVED)

19 MIN 50 SEC

14 MIN 45 SEC

THE FIRST PASS WILL BE

A QUICK VERIFY PASS

NOTE

EVEN _THO'IGH THE FIRST PASS IS A QV_
PASS
T
TAKe
LONGER
THAN
THE
SUBSEQUENT
NON-QV P .SSES DUE TO THE FACT THAT [T IS
RUNNING
MORE
PATTERNS,
SOME
OF WHICH

(PATTERNS #24 AND #33 FOR

BE EXTREMEMLY TIME

EXAMPLE)

CONSUMING.

THE

(AN

1ST

UNDER

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

mn
PAGE 31

22-APR-81 14:13

SEQUENCE

[ANA
445

446

447
448
449
450
451
652
453
454
455
456
457

PAGE 10

2.3.2.2

APT ENVIRONMENT TABLE -

THE FOLLOWING TABLE GIVES SOME OF THE STANDARD SETTINGS
FOR
E-TABLE.
THEY MAY BE MODIFIED AS NOTED AS THE USER SEES FIT,

466

467
468
469

470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494

495

496
49/
468
499

500

APT

FIRST PASS RUN TIME:
THIS PARAMETER SHOULD BE SET ACCORDING TO THE AMOUNT AND TYPE
OF
MEMORY TO BE TESTED.
THE ABOVE TABLE (APT EXECUTION TIMES) GIVES SOME
MEASURED TIMES.
FOR ANY PATTERNS DELETED (THROUGH USE OF
THE
DEVICE

DESCRIPTOR WORDS) REFERENCE SECTION 2.2 FOR INDIVIDUAL PATTERN TIMES.

458

459
460
461
462
463
464
465

THE

NOTE
THE TIMES GIVEN IN SECTION 2.2
ARE
FOR
16K CHUNKS OF MEMORY, NOT 128K BOARDS!

LONGEST TEST TIME:

THIS PARAMETER SHOULD BE

z:;;gzz ‘gglNG

RUN.

FOR

SET

THE

TO THE

DEFAULT

EXECUTION TIME OF

CASE

THE

LONGEST

THIS

IS 35 SECONDS FOR

SET

ADDITIONAL RUN TIME:
NOT USED 8Y PROGRAM.
SOF TWARE ENVIRONMENT:

FOR APT AUTO MODE

THIS PARAMETER SHOULD BE

DUMP MODE SET THIS TO A ''0'.

'"1*'.

FOR

ENVIRONMENT MODE:
WHEN THIS PARAMETER IS SET TO A ''0'° THE
PROGRAM
DOES
IT'S
OWN
SIZING.
IF
THE USERS SETS BIT #7 HCWEVER, HE MUST SPECIFY THE TYPES
AND AMOUNTS OF MEMORY

TO BE

TESTED.

SWITCH 1:
THE

THE DEFAULT SETTING OF THIS SWITCH IS *"101'".
APT
USES
SWITCH REGISTER FOR THE PROGRAM.
REFERENCE SECTION 2.4.1

INFORMATION ON SWIT(H SETTINGS.

SWITCH 2:

THIS

SWITCH,

SET

TO ANY NON-ZERO NUMBER,

AMOUNT
OF
PASSES
APT
COUNT HAS BEEN REACHED,

WILL

MAKE.

IS USED

THIS
AS
FOR MORE

TO LIMIT

THE

THE PROGRAM WILL HANG AFTER THIS

CPU OPTIONS:
NOT USED B8Y PROGRAM,
MEMORY

LOG

THESE

TYPE N

(N=1

T0 4)

IF BIT #7 OF ENVIRONMENT MODE IS SET THESE FOUR WORDS ARE USED TO
THE DIFFERENT TYPES OF MEMORY TO BE
LOCATION ARE NOT

USED.

TESTED.

IF BIT #7 !S NOT SET

CZMSDCO MS11-L/M DIAGNOSTIC
501

MACRO M1113

22-APR-81

14:13

MAXIMUM ADDRESS N

N 1
PAGE 31-1
(N=1

T0 &)

SEQUENCE

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

- JA4
PAGE 32

22-APR-81 14:13

SEQUENCE
PAGE 11

THESE FOUR WORDS ARE USED IN CONJUNTION
WORDS

INDICATE

VNS WA =2000

OIS LN =O VNN

(W VLV LV L LV L LV LV IV U IV, IV LV, IV VIV IV, IV IV IV (V. IV |V IV IV, ]
N NN NN NN NI PO NI NI A PO NINI N = ccd d e o b i b D

BE?BgIESTYPE

WITH

THE

THE HIGHEST ADDRESS

CORRESPONDING

THAT MEMORY TYPE

NOTE
THE ABOVE TWO PARAMETERS DO NOT ACTUALLY
HAVE
10
REPRESENT
AN
ACCURATE

CONFIGURATION
OF
MEMORY,
ALL _ THE
PROGRAM
LOOKS
FOR IS AN ACCURATE TALLY
OF MEMORY AMOUNT!

INTERRUPT VECTOR N

(N=1

NOT USED BY PROGRAM.

BUS PRIORITY N

(N=1

NOT USED BY PROGRAM,

70 2)

T0 2)

BASE ADDRESS:
NOT USED BY PROGRAM.
DEVICE MAP:
NOT USED BY PROGRAM,
CONTROLLER DESCRIPTOR CODE N
NOT USED BY PROGRAM,

(N=1

T0 2)

DEVICE DESCRIPTOR CODES:

THE DEVICE DESCRIPTOR CODES ARE USED BY THE PROGRAM TO
DETERMINE
WHICH PATTERNS IT WILL RUN.
THE DEFAULT VALUES OF THESE WORDS ARE ALL

"'1'"'S, INDICATING THAT ALL OF THE PATTERNS SHOWN IN
EXECUTED
(SAVE
FOR_EXCEPTIONS
AS
NOTED THERE).
CONTROLS A TABLE IN THE PROGRAM AS FOLLOWS:
DD WORDS

PROGRAM TABLE

WORDS 0-1

MKCSRY

WORDS 2-3

MKPAT

WORDS 4-5

MJPAT

SECTION 2.2 ARE
EACH SET OF WORDS

(SYMBOLIC LOCATION)

BIT #0 SET IN THE FIRST WORD INDICATES THAT THE FIRST PATTERN

THE

TABLE
WILL
BE EXECUTED, BIT #1 THE SECOND, BIT #2 THE THIRD,...
BIT
#0 OF THE SECOND WORD INDICATES THAT THE 17TH ENTRY IN THE TABLE
WILL
BE EXECUTED, AND SO ON.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE 53

SEQUENCE

PAGE 12

2.3.3

NO SBE FREE BANKS =

IF THE PROGRAM CANNOT FIND ANY SBE (SINGLE BIT ERROR)
FREE
LOCATIONS
(IN_
NON-PROTECTED
ECC MEMORY) IT WILL PRINT OQUT AN ERROR MESSAGE AND
CONTINUE TESTING BY-PASSING THE ECC LOGIC TESTS.

2.3.4
THE

MIXED PARITY & ECC CONFIGURATIONS PROGRAM

WILL

FUNCTION

NORMALLY

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).

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

b 2
PAGE 34

SEQUENCE

PAGE 13

2.4

2.4.1

PROGRAM OPTIONS

SWITCH REGISTER DETAILS -

IF A HARDWARE SWITCH REGISTER
IS
NOT
SWITCH REGISTER
IS
IN LOCATION 176.

AVAILABLE
THEN
THE
SOFTWARE
IF UNDER APT IF BIT7 IS SET IN
THE E-TABLE SYMBOLIC LOCATION "'SENVM'' THE APT SOFTWARE SWITCH REGISTER
WILL BE USED (LOCATION $SWREG).
TO CHANGE THE SOFTWARE SWITCH REGISTER CONTENTS:
TYPE
°°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 ''6'') IF YOU HAVE A HARDWARE

SWITCH REGISTER.

Sw15

= HALT ON ERROR
(100000)
CONTINUING FROM THIS HALT WILL FIRST CHECK FOR A CHANGE
IN THE SOFTWARE SWITCH REGISTER (‘'CONTROL G'' IN THE TTY
INPUT BUFFER) THEN IT WILL CONTINUE TESTING.

SW14

= LOOP ON TEST
(40000)
THIS WILL CAUSE LOOPING ON THE PRESENT TEST OR
PATTERN
(BATK
TO
LAST
SCOPE TRAP).,
IF IN A PATTERN THEN THE

LOOPING WILL BE FOR AN ENTIRE BANK OF

Sw13

b amd
d
o
d S

O 00 NN

= INHIBIT ERROR TYPEOUTS
(20000)
THIS WILL CAUSE RETURNS FROM THE ERROR ROUTINE
WITHOUT
THE
TYPED
MESSAGES.
OTHER ON ERROR FUNCTIONS ARE NOT
AFFECTED.

611

ocoooorOrO
OO

16K ADDRESSES.

Sw12

= INHIBIT RELOCATION
(10000)

THIS PREVENTS
gggzgvTS
THE

THE PROGRAM FROM MOVING AND
PROGRAM
FROM
TESTING
AT

CONSEQUENTLY
LEAST 32K OF

MACRO M1113

22-APR-81

14:13

PAGE 35

SEQUENCE
PAGE 14

sSwi

QUICK VERIFY

(40000

IF THIS SWITCH IS SELECTED APPROXIMATELY
ONE
64TH
OF
THE POSSIBLE COMBINATIONS OF SBE'S & DBE'S ARE TESTED.

EACH PASS COMPLETE TYPEOUT WILL INDICATE THIS
PRECEDING THE PASS NUMBER WITH ‘‘av'’.

SW10

THIS CAUSES A BELL
TRAP

Sw9

(OR BEEP OR

CLICK)

EACH

ERROR

LOOP ON ERROR
(1000)
THIS WILL

CAUSE LOOFING FROM FAILURE POINT BACK

LAST CORRECTLY INITIALIZED AREA OF

THE CURRENT TEST.

THE

HALT PROGRAM

(400)

FOLLOWING SEQUENCE:

FLUSH OUT ALL POSSIBLE DBE'S.

IF PROGRAM 1S RELOCATED IT MOVES BACK TO BANK ZERO.

VIR

INITIATES THE

THIS

Sw8

MODE

BELL ON ERROR
(2000)

[« SNV IR

CZMSDCO MS11-L/M DIAGNOSTIC

TURNS OFF

MEMORY MANAGEMENT.

RESTORE LOADERS.

UNMAP THE UNIBUS MAP (1F
HALT

THERE

IS ONE).

UNDER APT OR ACT BRANCH SEL.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

F
2
PAGE 36

SEQUENCE

PAGE 15

Sw?

DETAILED ERROR REPORTS
(200)
AFTER ANY NORMAL ERROR
REPORT
IS
TYPED
THIS
OPTION
wggs
THE
CONTENTS
OF THE FOLLOWING REGISTERS TO BE

RO, R1, R2, R3, R4, RS, SP, '‘CONTROL'’, '‘CPUERR'’
SWé

INHIBIT CONFIGURATION MAP
(1000
THIS

INHIBITS THE PRINTING OF A MAP SHOWING THE

CONFIGURATION - REFERENCE SECTION 7.3

SW5

MEMORY

LIMIT MAX ERRORS PER BANK
(40)
THIS WILL LIMIT THE NUMBER OF ERROR TYPEOUTS PER
BANK.
THE
DEFAULT
IS
10.
DECIMAL,
HOWEVER
THIS
CAN BE

CHANGED BY CHANGING LOCATION ‘'ERRMAX'' MANUALLY.
Swé

FAT

TERMINAL

(20)

THIS

INFORMS THE PROGRAM THAT

THE

CONSOLE TERMINAL

HAS

A WIDTH OF AT LEAST 132 COLUMNS (LA36 WITH WIDE PAPER).

MACRO M1113 22-APR-81 14:13 PAGE §7

SEQUENCE

PAGE 16

SwW3-1

= TEST MODE

TEST MODES DETERMINE THE RECURSION ALGORITHM TO BE USED
DURING PATTERN TESTS.

A
A

W= O

MODE NAME DESCRIPTION
prysreurpEY,
W N ST
OB PO~
=

CZMSDCO MS11-L/M DIAGNOSTIC

BAF PAF
BAFPAR
BAWPAF
BAWPAR

PAFBAF
PAFBAW
PARBAF
PARBAW

BANKS FORWARD, PATTERNS FORWARD
BANKS FORWARD, PATTERNS REVERSE
BANKS WORST FIRST, PATTERNS FORWARD.
BANKS WORST FIRST, PATTERNS REVERSE.
PATTERNS FORWARD, BANKS FORWARD
PATTERNS FORWARD,
PATTERNS REVERSE,

BANKS WORST FIRST
BANKS FORWARD

PATTERNS REVERSE, BANKS WORST FIRST.

502 ?ng DETAILS REFERENCE SECTION 2.4.1.1,

Sw0

= DETEE{)SINGLE BIT ERRORS

2.4.1.2 AND

(SBI'S)

FOR MANUFACTURING PURPOSES THIS SWITCH SHOULD ALWAYS BE
ON.
FOR
FIELD
SERVICE
PURPOSES
THIS SWITCH SHOULD
ALWAYS BE OFF.
THIS SWITCH WILL ALLOW ALL ECC SINGLE BIT ERRORS TO
REPORTED BY DISABLING ERROR CORRECTION.

ERRO§ PRINTOUTS OF SBE'S ARE NOT
DBE'*

DISTINGUISHABLE

NOTE

IF DOUBLE BIT ERRORS ARE FOUND IN

THE

MEMORY,

THIS SWITCH SHOULD BE SET TO MAKE SURE THAT NEW
DATA CAN BE WRITTEN TO THE DBE LOCATIONS.

FROM

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

H 2
PAGE 38

14:13

SEQUENCE

737
738
739
;2?

2.4.1.1

7462
;22

EXAMPLE ANALYSIS OF MODE 5 ‘PAFBAW''.
AND BANKS 2,3,4,8 5 ARE MS11-M,

745
;zg

ASSUME ALSO THAT BANK 3 IS KNOWN BAD B8Y THE
PROGRAM
VIA
THE
SIZING
ROUTINE OR PREVIOUS RUNS THE TESTING SEQUENCE WOULD BE AS FOLLOWS:

748

sTEST MS11-M MEMORY TYPES FIRST

751
752
753
754
755
756
757
758
759
;g?

PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN

;g%

sTEST PRESUMED GOOD MEMORY (BANKS 2,4.,5)

764
765
766
767

PATTERN 17,
PATTERN
7,
PATTERN
1,
PATTERN
2,

769
770
71
772

PATTERN
5,
PATTERN 21,
PATTERN 20,
PATTERN 22,

774
775
776
777
778
779

PATTERN 17,
PATTERN
7,
PATTERN
1,
PATTERN
2,
PATTERN
&,
PATTERN
5,

;gg

768

773

780
781

782
783

784
785
786
787
788
789
790
791
792
793

PAGE 17

TEST MODE EXAMPLE -

ASSUME BANKS 0 &

sTEST KNOWN BAD MEMORY (BANK 3)

PATTERN

17,
7,
1,
2,
4,
S,
21,
20,
22,
26,

PATTERN 26,

PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN
PATTERN

21,
20,
22,
26,
17,
7,
1,
2,
4,
5,
21,
20,
22,
26,

BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK

3
3
3
3
3
3
3
3
3
3

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

2
2
2
2
2
2
2
2
2
4
4
&
4
4
4
4
4

BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK
BANK

5
5
5
5
5
5
5
5
3
5

BANK &
BANK &

ARE

MS11-L

CZMSDCO MS11-L/M DIAGNOSTIC
794

MACRO M1113 22-APR-81 14:13 PAGE iB-%

SEQUENCE

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE §9

SEQUENCE

PAGE 18

3.
4,

PATTERN 2 6.
NN =
OV

A) b b wd ed

NO N

d d d D b

©o O 00 00 0D 00 OO 08 0O 00

810

PATTERN
PATTERN
PATTERN
PATTERN
PATTERN

PATTERN 2 6.

PATTERN
PATTERN
PATTERN
PATTERN
PATTERN

etk kB = OOOOOO

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

NOTE
THIS IS
AN
SEQUENCE.

EXAMPLE

NOT

ACTUAL

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

K 2
PAGE 40

SEQUENCE
PAGE 19

THE PATTERN SEQUENCE WAS FORWARD (THE SIMPLE PATTERNS
FIRST,
COMPLEX
PATTERNS
LAST)
SEQUENCE OF PATTERNS (MS11-m =17, 7,1, 2, 4, 5, 21,

THE BANK SELECTION IS FORWARD THE

FOLLOWING ORDER:

BANKS

WILL

TESTED

SSS)BANKS THAT ARE NOT PROTECTED OR PROGRAM SPACE

PARITY BANKS THAT ARE NOT PROGRAM SPACE

THE

(FROM 0

(FROM 0 TO 200).

THE PROGRAM NOW RELOCATES & TESTS:

Sgg)BANKS THAT WERE PROTECTED OR PROGRAM

PARITY BANKS THAT WERE PROGRAM SPACE

SPACE

(FROM

WILL

B8E

(FROM 0 TO 200).

IF BANK SELECTION IS WORST
FIRST
THE
CONFIGURATION
TABLE
CONSULTED AND BANKS WILL BE TESTED IN THE FOLLOWING ORDER.
1.

ECC BANKS THAT ARE KNOWN BAD AND ARE NOT PROTECTED OR PROGRAM

PARITY BANKS THAT ARE KNOWN BAD AND

ARE

NOT

PROGRAM

ECC BANKS THAT ARE PRESUMED GOOD AND

ARE

NOT

PROTECTED

3.
&.

SPACE

(FROM 0 TO 200).

PROGRAM SPACE

(FROM 0 TO 200).

SPACE

PARITY BANKS THAT ARE PRESUMED GOOD AND ARE NOT PROGRAM SPACE
(FROM 0 TO 200).
THE PROGRAM NOW RELOCATES & TESTS:

ECC BANKS THAT ARE KNOWN BAD AND WERE

SAfiéfzog?NKS

8.
9.

SPACE

PROTECTED

(FROM 0 TO 200).

THAT ARE KNOWN BAD AND WERE PROGRAM SPACE

ECC BANKS THAT

PROGRAM SPACE

ARE

PRESUMED

(FROM O TO 200).

GOOD

AND

PARITY BANKS THAT ARE PRESUMED GOOD AND
(FROM 0 TO 200).

W-RE
WERE

PROGRAM
(FROM

PROTECTED
PROGRAM

SPACE

CZMSDCO MS11~L/M DIAGNOSTIC

MACRO M1113

22~APR-81

L. 2
PAGE 41

14:13

SEQUENCE
PAGE 20

2.4.1.2
MODE 0

TEST MODE DETAILS "BAFPAF'’' BANKS FORWARD, PATTERNS FORWARD
THIS

THE

THIS MODE

DEFAULT AND SIMPLEST MODE.

TESTS EACH BANK

(OMPLETELY

200

WHILE TESTING EACH BANK THE PATTERNS ARE RUN
WITH
SIMPLE ONES FIRST BUILDING TO THE MORE COMPLEX.

THE

EXCEPT THOSE REQUIRING RELOCATION®.

MCDE 1

FROM

= "BAFPAR'' = BANKS FORWARD, PATTERNS REVERSE
THIS MODE TESTS EACH BANK
(COMPLETELY
EXCEPT THOSE REQUIRING RELOCATION®,

FROM

200

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 200 EXCEPT THOSE REQUIRING RELOCATION+, THEN
PRESUMED GOOD BANKS ARE TESTED FROM
0
TO
¢00
EXCEPT
THOSE REQUIRING RELOCATION®,

WHILE TESTING EACH BANK THE PATTERNS ARE RUN
WITH
SIMPLE ONES FIRST, BUILDING TO THE MORE COMPLEX.

MODE 3

THE

"BAWPAR'' = BANKS WORST FIRST, PATTERNS REVERSE
THIS MODE

FIRST

TESTS EACH KNOWN

BAD

BANK

COMPLETELY

FROM
0 TO 200 EXCEPT THOSE REQUIRING RELOCATION®, THEN
PRESUMED GOOD BANKS ARE TESTED FROM
O
TO
200
EXCEPT
THOSE REQUIRING RELOCATIONS.
WHILE TESTING EACH BANK THE PATTERNS ARE RUN
WITH
THE
MOST COMPLEX ONES FIRST, WORKING TO THE SIMPLE ONES.
MODE ¢

"PAFBAF'' = PATTERNS FORWARD, BANKS FORWARD
THIS MODE

TESTS EACH PATTERN COMPLETELY WITH THE

ONES FIRST, BUILDING TO THE MORE COMPLEX.
WHILE

SIMPLE

TESTING EACH PATTERN THE BANKS ARE RUN FROM 0

200 EXCEPT THOSE REQUIRING RELOCATION®,

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

PAGE &2

SEQUENCE
PAGE 21

MODE 5

"PAFBAW'' = PATTERNS FORWARD, 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
0
TO
200
EXCEPT THOSE REQUIRING RELOCATION® IS
RUN, THEN PRESUMED GOOD BANKS ARE RUN
FROM
0
T0O
200

EXCEPT THOSE REQUIRING RELOCATION®.

MODE 6

"PARBAF'’ = PATTERNS REVERSE, BANKS FORWARD
THIS MODE TESTS EACH PATTERN COMPLETELY WITH
THE
COMPLEX ONES FIRST, WORKING TO THE SIMPLE ONES.
WHILE

TESTING EACH PATTERN THE BANKS ARE RUN FROM 0

200 EXCEPT THOSE REQUIRING RELOCATIONw,

MODE

MOST
TO

"PARBAW'' = PATTERNS REVERSE, 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
0 TO 200 EXCEPT THOSE THAT REQUIRE RELOCATION® IS
RUN, THEN PRESUMED GOOD BANKS ARE RUN
FROM
0
TO
200

EXCEPT THOSE REQUIRING RELOCATION®.
NOTE

TEST

ANY

DIAGNOSTIC

MODE

REQUIRED

TEST

THE

PROGRAM
SPACE
AND ALSO TO
ECC
BANKS
PROTECTED
av

CHECKMODE

POINTER OFF

WITH

(2ERO)!

THE

INHIBIT

CZMSDCO MS11-L/M DIAGNOSTIC

966
967
968
969

MACRO M1113

22-APR-81

14:13

PAGE 43

SEQUENCE

PAGE 22
2.6.1.3

972
3;2

gzg

TEST MODE APPLICATIONS TO VERIFY CORRECT OPERATION OF THE MEMORY SYSTEM USE
"BAFPAF'',

ADVANTAGES:
.

DISADVANTAGES:
IN CASE OF A FAILING BANK,
TIME TO FIND THE FAILURE.

980
gg;

TO GET DETAILED ERROR INFORMATION ON KNOWN BAD
BY SIZING ROUTINE) USE MODE 2 'BAWPAF''

985
ggg

988

ggg

ADVANTAGES:
i
/

SEEKS BAD BANKS.

TO GET GOOD ERROR INFO ON ANY MEMORY PROBLEM FAST USE MODE

DISADVANTAGES:

000

EASY TO UNDERSTAND.

"PAFBAF"’,

993

ggg

COVERS ALL BANKS FAST.

EASY TO UNDERSTAND.

FAILURES FROM ONLY COMPLEX PATTERNS MAY

A LONG TIME TO FIND.

(FOUNS

ADVANTAGES:

ggg

BANKS

TAKE

gg}

339

IT MAY TAKE A LONG

DISADVANTAGES:
FAILURES OTHER THAN ZEROS & ONES MAY
LONG TIME TO FIND.

EASY TO UNDERSTAND.

977
g;g

3%2

MODE

TO FIND ANY PROBLEM FAST USE MODE

ADVANTAGES:

TAKE

7 'PARBAW''.

COVERS ALL BANKS FAST,

DISADVANTAGES:

DIFFICULT TO UNDERSTAND FAILURES REPORTED ARE

NOT NECESSARILY THE MOST BASIC FAILURE MODES.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22~APR-81

14:13

PAGE 44

SEQUENCE

1004

1005
1006

PAGE 23

}88;

2.4.2

1009
}8}?

A SOFTWARE DIS/LAY REGISTER EXISTS IN LOCATION 174 IN ADDITION TO
HARDWARE DISPLAY EXISTENCE.

}8}%

DISPLAY FIELDS ARE AS FOLLOWS:

1014
}8}2

15116
RELOCATED ;

12
11
10
BANK
#

}8};

1019

PATTERN # = THE NUMBER OF THE PATTERN PRESENTLY BEING RUN. ALL

1020
1021
1022
1023

Pt P 2

8!'7
6
S'4
; NOT USED
;

3
2
1
PATTERN #

P+ P 3 TS P P S T S F M S F S S F T F P X F P R R

PATTERN WHEREAS MTPONN IS THE ACTUAL PATTERN ITSELF.

1026
1027
1028
1029

NOTE

THE PATTERN

}8%?

NOT

NECESSARILY

INDICATION OF DEGREE OF DIFFICULTY.

1034
}8%2

BANK

1037
1038
1039
}82?

RELOCATED = THIS BIT INDICATES THAT THE PROGRAM IS RELOCATED AND NO
LONGER IN BANK 0.
IT WILL BE RELOCATED TO THE FIRST
KNOWN GOOD NON-PROTECTED MEMORY BANK INDICATED ON
THE CONFIGURATION MAP (REFERENCE SECTION 7.3).

1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052

1053

1054

ANY

PATTERNS ARE DESCRIBED IN SECTION 6.2. ANY PATTERN CAN BE
FOUND IN THE DIAGNOSTIC BY LOOKING UP THE SYMBOLIC TAGS
"MTOONN'' AND "MTPONN'' ~ WHERE 'NN'' IS THE PATTERN NUMBER.
MTOONN REFERS TO THE ROUTINE THAT SETS UP FOR THE TEST

}85?

1035

DISPLAY REGISTER -

= THE NUMBER OF THE BANK (16K) OF MEMORY UNDER TEST (0-200).
THESE BITS DIRECTLY MAP TO PHYSICAL ADDRESS BITS (21:15).

NOTE

ANOTHER WAY TO OBTAIN
THIS
INFORMATION
IS
TO
TYPE
A CONTROL/T AT THE CONSOLE
(REFERENCE SECTION 2.4.4.5).

2.4.3

SPECIAL MEMORY LOCATIONS -

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

c 3
PAGE 45

SEQUENCE

1056

1057
1058

PAGE 24

}828

2.64.3.1

1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
}g;g

THE CACHE CONSTANT IS LOCATED AT SYMSBOLIC LOCATION ''CACHK'® AND IS USED
TO ENABLE CACHE.

2.4.3.2

1079
}83?

THE CONFIGURATION TABLE IS LOCATED AT SYMBOLIC LOCATION
HAS THE FOLLOWING FORMAT:

1082

CONFIG:

}832
}832

1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097

1098
1099
1100
1101

;}85
1104
1105

CACHE CONSTANT -

NOTE
BIT O
IN
THE
CACHE
CONSTANT
HAS
NO
EFFECT
SINCE
IT IS UNCONDITIONALLY SET
BY THE
PROGRAM WHENEVER
IT
TRIES
TO
ENABLE CACHE.

CONFIGURATION TABLE
‘'CONFIG''

AND

FIRST 16K CONFIGURATION WORDS (2 EACH)
2ND
16K CONFIGURATION WORDS (2 EACH)
200TH 16K CONFIGURATION WORDS

CONF IGURATION WORDS:
LOW:

MED:

BIT
8IT
BIT
BIT
BIT
8IT
BIT
BIT
BIT
BIT

0
1
2-4
S
6
7
8-11
12-15
0-7
8-10

BIT N
BIT 12

BIT 13
BIT 14

BIT 15

(2 EACH)

ERRORS PRESENT
MEMORY EXISTS
RESERVED
SKIP ECC LOGIC TESTS FLAG (1 _=SKIP)
PROTECTED REGION OF AN ECC MEMORY
PROTECTED (PROGRAM SPACE)
(SR CODE
INTERLEAVED CSR CODE
NUMBER OF ERRORS
MEMORY TYPE

CSR TESTED 0K
INTERLEAVE ENABLED

“BACKGROUND PATTERN VALID'® FLAG
BANK SELZCTED FOR TEST BY FIELD SERVICE MODE

LOADERS HOME BANK

THIS TABLE IS USED AS THE SOURCE FOR THE CONFIGURATION
MAP (REFERENCE. SECTION 7.3).

MACRO M1113

22-APR~81

14:13

0D 3
PAGE 46

SEQUENCE
PAGE 25

2.4.4

D wd D
oD b D
D b e e
D el
D e b d i
D D D o D

CONTROL ‘'C*'

THIS COMMAND WILL:

TH IS

TEST

IF SWITCH 8 (HALT PROGRAM)
THE PROGRAM.

IN THE SWITCH REGISTER IS SET MALT

IF SWITCH 8 IS NOT SET, UNRELOCATE IF PROGRAM WAS RELOCATED.

FLUSH OUT ANY DBE'S.

TURN OFF MCMORY MANAGEMENT.

ATTEMPT TO BOOT RKO5 DRIVE 0.

FAILING 4, ATTEMPT TO BOOT RKO4 DRIVE

FAILING 5, GO TO 4.
OMMAND WILL ONLY BE RECOGNIZED AT THE

COMPLETION OF

THE

0R PATTERN, OR AT THE END OF A LINE OF AN ERROR MESSAGE.

2.4.4.2

CURRENT

(ONTROL ‘D'" (DEBUG)

THIS COMMAND

TO ENTER A MODIFIED VERSION OF

ODT HAS BEEN DELETED.

) ) e
— b e
b

)

D wd D d )
b wd e e o

D el

d md

D d
D D

)

b wd

b o D e
) D e

TERMINAL COMMANDS -

2.4.4.1

)

D e e
) D i ) D D e
D ) D eud D e e
D d D

D e D o
D ) D el

i e

D i

)

vwammmmmma:\A\:\bbb:~abuuugwuwwwummmmmmmmwmaaa--a-a---.-c>oo
NOWVS NN = OV
NO VNS WA =200V
VIS WO =200V NN
NN =20V
NO NN WSOV~

CZMSDCO MS11-L/M DIAGNOSTIC

2.4.4.3

CONTROL 'E'' (PROCEED)

g?{grggflflAND WOULD ALLOW YOU

2.4.4.4

EXIT

oODT.

HAS

ALSO

BEEN

(ONTROL 'X'' (KILL ERROR PRINTOUT AND SK]P 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.

—

MACRO M1113

22-APR-81

14:13

E_3
PAGE 47

SEQUENCE

=00
NO NS W
NS WN 2OV
WN =20 VBN
VO ~NOr W

b e

D and e el
e b
e e

) D cmd D
D e
b

D e d oD o
D e
b e

)

—D

D i
b

) i e i
D b b

) o
) D ) D d )
d e =D d o
b h

b
b

CZMSDCO MS11-L/M DIAGNOSTIC

PAGE 26

2.4.4.5

CONTROL “'T'' (TELL ME WHAT'S HAPPENING)

THIS COMMAND WILL PRINT QUT THE INFORMATION
REGISTER.
THIS
IS
MAINLY
INTENDED
FOR
DISPLAY REGISTER.

ENCODED
[N
THE
DISPLAY
CPU'S
WITHOUT A HARDWARE

:
EXAMPLE

RELOCATED BANK= 23 PAT= 26
BY USE OF FIELD SERVICE COMMAND 17 ''TRACE'' CAN BE SET SO THAT IT

WILL

AUTOMATICALLY TYPE QUT THE BANK AND PATTERN NUMBERS AS EACH PATTERN IS
RUN.
(REFERENCE SECTION 2.4.4.8.18).

2.4.4.6
THIS

COMMAND WILL

2.4.4.7
THIS

CONTROL ''S'" (STOP)
(SOON)

AND WILL WAIT FOR A CONTROL ‘0 °.

CONTROL ''Q'" (QUINTINUE)

COMMAND WILL

;gubREDIF

STOP TYPEOUT

THERE

CONTINUE

HAS

BEEN

TYPING THAT HAS

BEEN

STOPPED

B8Y

C(ONTROL

NO CONTROL ''S'" TYPED THEN THIS COMMAND IS

uuwuuwuuuummmmmmmwmw—a-—n—ndd—'—*-fl—'ooooooooooooogoooo
NOAWVNEB WA= O VNN
NN =O VNN
WN=O O
NOVNS WA =000 (%4 R VY [\
OV

d
b e
b
—b aed ad b o

roruroNOrLNONIND PO

)

LAL ALY NI

d d d D ed e

D e

ed d i

D e

D i

D wd d D

) D

D e

e e

AININIAI AL AN NI AN NI NI NI AIAI NI NI NI NI PN NI NN =

D D o

D d D ad o

b ad b b e d b

CZMSDCO MS11-L/M DIAGNOSTIC

MACRC M1113

22-APR-81

F
3
PAGE 48

14:13

SEQUENCE
PAGE 27

2.4.64.8

CONTROL 'f'' (FIELD SERVICE MODE)

THIS COMMAND WILL CAUSE YOU TO
COMMANDS
.

ENTER

MODE

WHICH

LOOKS

FOR

SuB

WHEN THE PROGRAM IS LOOK.NG FOR A SUB COMMAND ANY NUMBER THAT IS NOT A

LEGAL
COMMAND
WILL CAUSE A MINI HELP MESSAGE TO BE TYPED.
WHEN IN DOUBT TYPE 99 (CR) AND YOU WILL GET HELP.

THEREFORE

NOTE
TYPING JUST CARRIAGE RETURN IS A DEFAULT

COMMAND 0.

2.4.64.8.1

FIELD SERVICE COMMAND O (EXIT)

THIS COMMAND WILL EXIT FIELD SERVICES MODE AND RETURN TO WHATEVER TASK

IT_

WAS

PRIOR_

TYPING CONTROL 'F'‘.

RETURN IS A DEFAULT COMMAND 0.

2.4.4.8.2

FIELD SERVICE COMMAND 1

THIS COMMAND WILL

NOTE TYPING JUST CARRIAGE

(READ CSR)

TYPFOUT THE CONTENTS OF

THE

CSR.

IF _THERE IS MORE THAN ONE CSR ON THE CPU (OR IF THE
PROGRAM HAS
NOT
DETERMINED
THE
(SR
STATUS YET), IT WILL ASK YOU 'JHICH CSR(O-F)‘' TO
WHICH YOU MUST RESPOND WITH AN HEXIDECIMAL NUMBER FROM 0 TO
F.
NOTE
TYPING JUST CARRIAGE RETURN IS A DEFAULT 0.

IF THE CSR YOU SELECT CAUSES A TRAP TO & THE PROGRAM WILL
CSR DOES NOT EXIST'.
NOTE

CSR REFERENCES ARE
WITH SECTION 5.0.

DONE

ACCORDANCE

TYPE

‘‘THIS

amd

)

d o

)

(LS 1A 1A T ST, N ST N1, 1,01 N1, ST, N1 ST ST, N1,81, 81,081,811, 1,81 ST,V

(22 e No Ne SV IV NV ITAVLIV IV IV IV P 2P 28 0¥ ¥ 3 ¥ S S
NN =2 OV 00NN ESNND = O O 00 NONN S (NN

CZMSDCO MST11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

G 3
PAGE 49

SEQUENCE

PAGE 28

2.4.4.8.3

FIELD SERVICE COMMAND 2 (LOAD CSR)

THIS COMMAND WILL ENABLE

YOU TO LOAD THE CSR.

IF THERE IS MORE THAN ONE CSR ON THE CPU (OR IF THE

PROGRAM

HAS

NOT

YET DETERMINED THE CSR STATUS YET) IT WILL ASK YOU 'WHICH CSR(0-F)'' TO
WHICH YOU MUST RESPOND WITH AN HEXIDECIMAL NUMBER FROM 0 TO
F.
NOTE
TYPING JUST CARRIAGE RETURN IS A DEFAULT 0.

IF THE CSR YOU SELECT CAUSES A TRAP TG & THE PROGRAM WILL
CSR DOES NOT EXIST',
THE

TYPE

‘‘THIS

CSR WILL BE READ AND DISPLAYED AS IN COMMAND 1.

THE PROGRAM WILL THEN ASK YOU FOR THE ''CSR?'' TO WHICH YOU MUST RESPOND
gITH
AN
OCTAL NUMBER.
NOTE TYPING JUST CARRIAGE RETURN IS A DEFAULT
THE PROGRAM WILL
NEW CONTENTS.

2.4.64.8.4

THEN LOAD

THE

CSR AND READ

AGAIN

DISPLAYING

FIELD SERVICE COMMAND 3 (EXAMINE MEMORY)

THIS COMMAND WILL ALLOW YOU TO EXAMINE ANY PHYSICAL ADDRESS
THE NECESSARY MEMORY MANAGEMENT MAPPING FOR YOU.
THE PROGRAM WILL ASK YOU FOR THE ‘PHYSICAL
ADDRESS
WHICH YOU MUST RESPOND WITH AN OCTAL NUMBER.

THE ADDRESS ACCESS CAUSES

"TIMEOUT

TRAP'',

THE

CONTENTS OF

TRAP

ADDRESS

PROGRAM WILL TYPE 'PARITY ABORT''.
THE

ITS

ACCESS

YOUR PHYSICAL ADDRESS WILL BE

THE

CAUSES

AND

(0-17757776)'"

PROGRAM

TYPED.

WILL

A TRAP 70 114

DOES
710

TYPE

THE

MACRO M1113

22-APR-81

14:13

H 3
PAGE 50

SEQUENCE

E
V] N = OO000 NN S

—

b —

D d i

D e

)

33 ~O O O 00 0o 0o 0o 00 0o 0o OO

PPN PLNINIPON)

CZMSDCO MS11-L/M DIAGNOSTIC

PAGE 29

2.4.64.8.5

FIELD SERVICE COMMAND & (MODIFY MEMORY)

THIS COMMAND ALLOWS YOU TO MODIFY ANY 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 &
THE
PROGRAM WJ(L
TYPE
“TIMEOUT
TRAP'',
IF
THE
ADDRESS
ACCESS
CAUSES
A TRAT 10 114 THE
PROGRAM WILL TYPE 'PARITY ABORT''.

;ggRgggGRAH WILL TYPE ''OLD DATA WAS'' AND THE CONTENTS OF YOUR PHYSICAL
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

— ad e

b OO

N W)=
O 00

d e

N NIN NN NN

1307

THE PROGRAM WILL ATTEMPT TO WRITE THIS NEW
DATA
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 CAN'T CHANGE THE DATA,

THAT WOULD

INDICATE
THAT
YOU
HAVE
A
DOUBLE BIT
ERROR IN THAT DOUBLE WORD PAIR.

MACRO M1113

22-APR-81

14:13

PAGE 51

SEQUENCE

D D

3
3
34

D o

34
gz

D cd

34
gz

—

35
gg

N==2O OV

d d

D ed e

d D e

)

D e

)

) D

D e

N LN WA N A N AN N NN N AN N
NN NN NN N
£ 8 2NN N N NN N N N WA N PO NI PO NI PO NI NON) =

)

N
2

NI NS WN=2OOVNOWNSWNI—=2O
VNN W =200V

CZMSDCO MS11-L/M DIAGNOSTIC

PAGE 30

2 4.6.8.6

FIELD SERVICE COMMAND 5 (SELECT BANK & PATTFRN)

THIS COMMAND ALLOWS YOU TO RUN ANY BANK WITH ANY PATTERN FOREVER.

THE PROGRAM WILL ASK YOU 'BANK(0-200)‘'‘' TO WHICH YOU MUST RESPOND

OCTAL

NUMBER.

THE BANK IS NOT ACCESSIBLE.

TYPE 'BANK NOT ACCESSIBLE'' AND ASK QUESTION OVER.

THE PROGRAM WILL THEN ASK ‘PATTERN
WITH AN OCTAL NUMBER.

WITH

THE PROGRAM WILL

(0-37)'' TO WHICH YOU

MUST

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 O, THE PROGRAM WILL
ASK 'PATTERN O DATA IS?'' TO WHICH
YOU
MUST RESPOND WITH AN OCTAL NUMBER.

IF THE BANK YOU SELECTED REQUIRES RELOCATION
THE
PROGRAM WILL
TYPE
"BANK REQUIRES RELOCATION'' AND EXIT THIS COMMAND.
NOTE NORMALLY THIS
IS TRUE FOR BANK 0.
THE PROGRAM WILL THEN ARM THE CONSOLE KEYBOARD FOR INTERRUPTS AND TYPE
"'TO ESCAPE TYPE ANY KEY!''.

THE TEST PATTERN WILL BE ENTERED
DEPRESSED TO ESCAPE THIS LOOP.

AND

RUN

UNTIL

CONSOLE

KEY

d
)
D
D
D o
d
D
d
rd
—d e

N U N N N AN N
N N N NN
oONONONONONON\ YNV
N B WO 000NN

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

J_ 3
PAGE 52

SEQUENCE
PAGE 31

2.4.64.8.7

FIELD SERVICE COMMAND 6 (TYPE CONFIGURATION MAP)

THIS COMMAND TYPES THE CONFIGURATION MAP.
THIS IS USEFUL AFTER A LONG RUN (OVERNIGHT) TO SEE ALL THE BANKS
THAT
ARE MARKED AS BAD.
(ESPECIALLY IF YOUR CONSOLE IS A VIDEO TERMINAL).
FOR A DETAILED EXPLANATION OF

2.4.4.8.8

THE MAP REFERENCE SECTION 7.3.

FIELD SERVICE COMMAND 7 (SOB-A-LONG TEST)

THIS
COMMAND
NON-PROTECTED

ALLOWS
BANKS

EXECUTION
OF
THE
SOB-A-LONG
REFERENCE
SECTION
6.2.2.26.

TEST
ON
ALL
OPERATION
[S

IDENTICAL TO COMMAND 5 EXCEPT THAT NO PATTERN OR BANK IS

EACH PASS CAUSES A BELL.

ENTERED

AND

b
d
D e
D nd
e
d

MACRO M1113

22-APR-81 14:13

K. 3
PAGE 53

SEQUENCE

NN
WA NN NN
00 00 0000
~J
W)= OO

CZMSDCO MS11-L/M DIAGNOSTIC

PAGE 32

2.4.4.8.9

FIELD SERVICE COMMAND 8 (ERROR SUMMARY)

THIS COMMAND TYPES OUT

THE NUMBER OF PASSES AND THE

TOTAL

NUMBER

ERRORS.
IF
THERE WERE ANY ERRORS IT WILL TYPE OUT THE BANKS AND THE
NUMBER OF ERRORS PER BANK UP TO 255 DECIMAL.
THIS BECOMES USEFUL AFTER LONG RUNS
VIDEO CONSOLE TERMINAL.

2.4.6.8.10

(ALL

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 A BELL.

2.4.4.8.11

FIELD SERVICE COMMAND 10 (SET FILL COUNT)

THIS COMMAND ALLOWS SETTING OF

LA30'S,
ASR33'S, AND VT05°'S).
VT52°'S, vI100°'S, ETC.

2.64.4.8.12

THE

TERMINAL FILL COUNT

(NECESSARY

FOR

IT IS NORMALLY SET TO ZERO FOR LA36'S,

FIELD SERVICE COMMAND 11

(ENTER KAMIKAZE MODE)

N = OO0®NO
NS W

POPON)
= el b e i

P W

e cd

) cod e

Y N

THIS COMMAND ALLOWS YOU TO RUN PATTERNS THAT ARE NORMALLY NOT EXECUTED
UNLESS UNDER APT OR ACT.
THEY ARE USUALLY VERY TIME CONSUMING AND CAN

RESULT IN FAILURES THAT ARE FATAL TO THE PROGRAM,
IN EFFECT
YOU
ARE
TRYING
TO
FIND
A
HARDWARE
FAILURE REGARDLESS OF THE CONSEQUENCES.
NOTE THAT MOST CRASHES DO NOT WIPE OUT THE DISPLAY
INFORMATION
WHICH

TELLING

THERE

ARE

2.4.4.8.13

YOU

TWO WAYS

WHAT

THE

PROGRAM

TO DIE HERE =~

WAS DOING JUST PRIOR TO FAILURE.

IMPATIENCE

AND CRASHES.

FIELD SERVICE COMMAND 12 (EXIT KAMIKAZE MODE)

RETURN TO THE

DEFAULT MODE

TESTING

(UNDO COMMAND 12).

MACRO M1113

22-APR-81

14:13

PAGE 54

SEQUENCE
PAGE 33

) i

FIELD SERVICE COMMAND 13 (TURN CACME OFF)

EHII.SSC??NGES THE CACHE

CONSTANT

BYPASS

C(ACHE

(REFERENCE

SECTION

2.4.4.8.15

FIELD SERVICE COMMAND 14 (TURN CACHE ON)

—

) i cd e

D o

2.4.4.8.14

d nd

PV
R 2 P P VW VY
arlaln
AN N NN U AN NI PO NI PO A N
NOWVES
NN =200V ~NO NS

CZMSDCO MS11-L/M DIAGNOSTIC

5'4{530#’0655

THE

CACHE

CONSTANT

1443

2.4.64.8.16

14645

THIS COMMAND ALLOWS YOU TO CENTER THE TEST EFFORT ON ONLY THOSE

FIELD SERVICE COMMAND 15

USE

CACHE

(REFERENCE

SECTION

(TEST ONLY SELECTED BANKS)

BANKS

1646
1647

THAT
YOU
ARE
TROUBLESHOOTING.
YOU MAY ALSO TEST BANKS THAT REQUIRE
RELOCATION AND WERE INACCESSABLE VIA COMMAND 5.

452

2.6.4.8.17

454

RETURN TO THE DEFAULT MODE OF

1459

2.4.4.8.18

1461

ENABLE

1467

2.4.4.8.19

1469

DISABLE ''TRACE''.

1462

FIELD SERVICE COMMAND 16

FIELD SERVICE

'‘TRACE''.

TYPE OUT

TESTING

COMMAND 17

(RESUME

TESTING ALL BANKS)

(UNDO COMMAND 15).

(RESUME

TESTING ALL BANKS)

AFTER EXITING FIELD SERVICE MODE,

THE

PROGRAM

THE BANK AND PATTERN NUMBERS AS EACH PATTERN [S RUN.

FJIELD SERVICE

COMMAND 18

(UNDO COMMAND 16).

(RESUME

TESTING ALL BANKS)

WILL

-t

oo OO NN NNNNYWY

) e o
) o

&H FaX 2l a¥ 0P o

- b

O 000NN
N

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

n3
PAGE 55

14:13

SEQUENCE

PAGE 34

2.5
2.5.1

EXECUTION TIMES
TYPICAL (SYSTEM) -~

EXECUTION TIME DEPENDS ON
MANY
VARIABLES;
MEASURED TIMES ON AN 11/44 WITH CACHE:

HOWEVER

HERE

ARE

128K WORDS OF MS11-L MEMORY
NORMAL PASS
0 MIN
50 SEC
QUICK VERIFY
0 MIN
50 SEC
KAMIKAZE MODE
10 HIN
S SEC
KAMIKAZE Qv
10Mm
5 SEC
128K WORDS OF HS}1~H MEMORY (NON-INTERLEAVED)
IN 25 SEC
1
0 SEC
KAMIKAZE MODE
11
0 SEC
KAMIKAZE Qv
10 MIN 30 SEC
NORMAL PASS
QUICK VERIFY

NOWES
W =0 VDN

s OO O
ek —d b
e
b
—

b
cd
d e
D
i
e
d el

(SRS AV TV LV LV AV LV

VSV LV

2.5.2

CALCULATIONS

NORMAL PASS

ADD
ADD

ADD

1
1

QUICK VERIFY PASS

ADD
ADD
ADD

KAMIKAZE MODE

> 4

—

- AN

128K WORDS OF MS11-M MEMORY éINTERLEAVED)

NORMAL PASS
QUICK VERIFY

(SYSTEM)
PER BANK OF NON=INTEREAVED MS11-M
PER BANK OF INTERLEAVED MS11-M
PER BANK OF MS11-L

8 SEC PER BANK OF NON=INTERLEAVED MS11-M
7 SEC PER BANK OF INTERLEAVED MS11-M
6 SEC PER BANK OF MS11-L

ADD 10 MIN.

PER 128K WORDS FOR APPROXIMATE PASS TIMES.

SOME

VIV
buwwguwwwwwwmmmmmmmmw—o
NOWNMSBWNI
= OOV S
NO VA WN—=0
0V
VBN
= OOV
NN
WIN = OO0

e
e
e
D e
d
b e
e
d e

ATV

d
e

e
e
d e
e
e
e
b o
o
e

ATA A AT AT AW

D e
e
b e
b
b

LA WA A A WA

b
el

A
AL

AV AVIVTIALWAWN

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

N 3
PAGE 56

SEQUENCE

PAGE 35

2.5.3

TYPICAL (PATTERNS)

PATTERN TIME

DESCRIPTION

MT0000

SEC

DATA PATTERN TEST

MT0002
MT0003
MT0004
MT000S
M10006
MT0007
MT0010
MT0011
MT0012
MT0013
M10014
MT70015
MT0C16
MT0017
M10G20
M10021
M70022

<1
. 1
. 1
; 1
.<1
<1
;<1
;<2
;<1
. 1
; 1
. 1
<1
;<1
;<1
; 1
;10

SEC
SEC
S°C
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC

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
CREATE SINGLE BIT ERROR TEST
WRITE BYTE CLEARS SBE TEST
CREATE DOUBLE BIT ERROR TEST
WRITE INHIBIT DURING DATIP WITH DBE
WRITE INHIBIT O F BYTE WITH DBE
WRITE INHIBIT O WORD WITH DBE
HOLDING 1°'S ¢ 0
MARCHING 1'S ¢ 0'S IN $HECK 8ITS
MARCHING 0°'S & 1°'S TES
REFRESH TEST

MT0026
MT0025
MT0026
M10027
MT0030
MT0031
MT10032
MT0033
MT10034

;20
;<1
;<1
; 1
. 1
. 3
<1
.35
<1

SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC

FAST GALLOPING PATTERN TEST
INTERRUPT ENABLE 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

MT0001

MT0023

MT0035

;<1

SEC

;10 SEC

<1 SEC

ADDRESS TEST

SHIFTING DIAGONAL TEST

WORST CASE PARITY TEST

W N =0V NOWVNEWNI=O
VDN NS W =00
~NONWNES
V0O

b and e

b and

b and wmd

b e

d d

VIV IV TV IV IV IV, [V, [V VIV [V IV LV, LV IV IV (U IV IV IV

D o

cnd D

D i

D o

D e

VRV IV LV, IV, [V [V 1V IV [V IV ]

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

B_4
PAGE 57

22-APR-81 14:13

SEQUENCE

PAGE 36

3.0

ERROR INFORMATION

3.1

ERROR REPORTING

MOST ERRORS ARE REPORTED USING THE EMT TRAP AND

SYSMAC.SML.

HANDLER

PROVIDED

MOST ERRORS WILL BE OF THE 'MEMORY DATA ERROR'' TYPE WHICH

WILL BE DESCRIBED HERE.
MEMORY DATA ERRORS WILL ALSO CAUSE
TO BE MARKED AS BAD IN THE CONFIGURATION TABLE.
OTHER ERRORS ARE BEST EXPLAINED BY REFERENCING
AND IF NECESSARY THE PROGRAM LISTING.

THE

SPECIFIC

BANK

TYPEOUT

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

600D

000000
000000
000000
000000

BAD

000100
000100
000100
000100

XOR

000100
000100
000100
000100

CSR MTYP

O
0
0
0

M
M
TM
TM

INT 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
BANK)
WITH
PATTERN

(INITIAL

DATA TEST),

THE GOOD DATA EXPECTED WAS O BUT THE

DATA ACTUALLY READ (BAD) WAS 100, THE
EXCLUSIVE
OR
AT
GOOD
& BAD
YIELDS
100
WHICH
INDICATES
ONLY
FAILING BIT(S) (BIT 6).
IT IS AN
T;}65g (ECC) MEMORY AND IT'S NOT INTERLEAVED.
THE CSR IS
LOCATED
AT

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

C &
PAGE 58

SEQUENCE
PAGE 37

EXAMPLE 2:
MEMORY DATA ERROR
BANK
VADD

022132
022132
022132

35
35
35

060000
060002
060006

PADD
03500000
03500002
03500006

00D
000000
000000
000000

8AD
000001
000100
000100

XOR
CSR MTYP
000001
O
M
000100 O
M
000100 0
M

INT PAT

1
1
1

06
06
06

WHILE TESTING BANK 35, VIRTUAL ADDRESS 60000, PHYSICAL ADDRESS 3700000

WITH
PATTERN
6 (INITIAL DATA TEST), THE GOOD DATA EXPECTED WAS O BUT
THE DATA ACTUALLY READ (BAD) WAS 1, THE EXCLUSIVE OR
AT
GOOD
&
BAD
YIELDS 1 WHICH INDICATES ONLY FAILING BIT(S) (BIT 0).
IT IS AN MS11-M
(ECC) MEMORY AND IT'S INTERLEAVED:
SO SINCE ADDRESS
BIT
1
WAS
NOT

NN —
N =O 000 NON

—

ad e

b mnd

b ed

Lo gy ogYo Yo Yo Yo Yo Yo No Yo o No

PORNIN) = —d end cd ed ed cd cd b

ASSERTED, THE CSR IS LOCATED AT 172000.

WHILE ALSO IN BANK 35, VIRTUAL ADDRESSES 60002 AND 60006 WERF EXPECTED
TO_ HAVE
0, BUT THE DATA READ WAS 100, THE EXCLUSIVE OR OF GOOD & BAD
YIELDS 100 WHICH INDICATES ONE FAILING
BIT
(BIT
6).
SINCE
IT
[S
INTERLEAVED MS11-M MEMORY, AND ADDRESS BIT 1 IS ASSERTED, THE CSR IS

LOCATED AT 172102 (CSR NUMBER 1 UNDER THE INT COLUMN)
NOTE

SUBSEQUENT ERRORS OF THE
NOT TYPE A NEW HEADING.

SAME

TEST

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

D 4
PAGE 59

1624
1625

1626

SEQUENCE
PAGE 38

}g%g

3.2

}g%g

THE FOLLOWING IS A LIST OF ALL ABBREVIATIONS USED IN ERROR REPORTS.

1631
1632
1633
1634
1635
1636
1637
1638
1228

# OF ERRORS
1ST ADD
ARRAY
APTA
APTCORE
APTMOS
BAD
BAD-WD1
BAD-WD?2

NUMBER OF ERRORS THAT WERE DETECTED.
FIRST ADDRESS THAT FAILED.
THE ARRAY NUMBER THAT WAS LOCKED UP IN THE MS11-M (SR.
THE # OF CPU'S APT EXPECTS ON THE SYSTEM.
APT CORE SIZE.
APT MOS SIZE.
BAD DATA,
BAD WORD #1 OF A DOUBLE WORD DATA VALUE.
BAD WORD #2 OF A DOUBLE WORD DATA VALUE.

1641

BAD~CHK

BAD CHECK CODE BITS.

1644
1645
1646
1647
1648
1649
1650

CHKBITS
CONTRL
CPUERR
CSR
CSRNO
DATARG
DBE

1642
1643

ERROR ABBREVIATIONS

1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662

DEV ADD
ECC
6D-CC
GD=-CHK
GD-WD1
GD-WD2
GOOD
INT
LSIZE
MEMERR
MMRO
MMR1

THE BANK NUMBER.
BANKS ARE 16K WORDS LONG.
BAD 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 DATA REGISTER.
DOUBLE BIT ERROR (UNCORRECTABLE ERROR).
DEVICE ADDRESS.
ERROR CORRECTABLE CODE.
600D 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.
INTERLEAVED (ADDRESS BIT 1 ASSERTED) CSR NUMBER.
MS11-L SIZE.
MEMORY ERROR REGISTER.
MEMORY MANAGEMENT REGISTER #0.
MEMORY MANAGEMENT REGISTER #1,

1664
1665
1666
1667

MMR3
MSIZE
MTYP
PADD

MEMORY MANAGEMENT REGISTER #3.
MS11-M SIZE.
MEMORY TYPE (MS11-L ,MS11-M _MF11S-K ,BIPOLAR OR UNIBUS PARITY).
PHYSICAL ADDRESS (ASSERTED BY THE PROGRAM AFTER MAPPING).

1669
1670
1671

PC
SBE
VADD

1663

1668

1672
1673
1674

BANK
80-CC

MMR?

PAT

WROTE1
WROTEZ2
XOR

MEMORY MANAGEMENT REGISTER #2.

PATTERN NUMBER.

PROGRAM COUNTER AT THE TIME THE ERROR OCCURRED.
SINGLE BIT ERROR (CORRECTABLE ERPOR).
VIRTUAL ADDRESS (ASSERTED BY THE PROGRAM BEFORE MAPPING).

THE DATA THAT WAS WRITTEN INTO THE 1ST 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.

CZMSDCO MS11-L/M DIAGNOSTIC
1676
1677
1678

MACRO M1113

22-APR-81

14:13

E &
PAGE 60

SEQUENCE
PAGE 39

12%}

THERE ARE SEVERAL HALTS IN THE PROGRAM,

12%2

ALL UNUSED TRAP VECTORS CONTAIN A TRAP CATCHER (.WORD .+2,HALT).

}ggg

AN UNDEFINED TRAP INSTRUCTION HALTS AT SYMBOLIC LOCATION '‘SHALTZ2''.

}ggg

THE APT DOWN LOAD SEQUENCE WILL HALT AT SYMBOLIC LOCATION ‘'APTHLT''.

}ggg

HALT ON ERROR OPTION (SW15 SET) AT SYMBOLIC LOCATION ‘‘SHALT''.

}gg%

HALT PROGRAM (SW8 SET)

1693
}ggg

POWER FAIL WILL NORMALLY HALT AT THE END OF
(SYMBOLIC LOCATION '‘SDOWN'").

1696
1697
}ggg

POWER FAIL HAS A FATAL HALT AT SYMBOLIC LOCATION ‘SILLUP'® WHICH CAN BE
CAUSED
B8Y
POWER UP OCCURRING BEFORE POWER DOWN SEQUENCE COMPLETED OR
B8Y POWER DOWN BEFORE A POWER UP SEQUENCE IS COMPLETED.

1700
1701
};8%

4.0

178§

PASS COMPLETE TYPEOUTS AS FOLLOWS:

— cad el e

ed e

d e

o i

) e

el e

wd wmd ——ld

3.3

NNNNNNNNNNNNNNNNNNNNNNN
ed e b e b 2 = b 3O OO
PONORNININGA NN
NOWVNB NN = OOV NOAWNS WO N0~

}ggg

ERROR HALTS

AT SYMBOLIC LOCATION ‘‘'SEXMALT''.

THE

SHUT

DOWN

SEQUENCE

PROGRESS REPORTS

END PASS
END PASS
END PASS

’
»
#Qv

0
1
2

NOTE

PASS 2 WAS FLAGGED
AS
A
QUICK
VERIFY
PASS.
(BECAUSE OF A CHANGE IN Sw5)

TO OBTAIN PROGRESS REPORTS WHILE EXECUTING, TYPING A CONTROL ''T'"
PRINT OUT THE INFORMATION ENCODED IN THE DISPLAY REGISTER.

EXAMPLE:

BANK= 2 PAT= 34
REFERENCE SECTION 2.4.4.8.18 FOR MORE

INFORMATION ON TRACING.

wiILL

D o

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

PAGE 61

SEQUENCE

729
730

PAGE 40

3
;%%

5.0

734
735
736
737
;gg

CSR INFORMATION TABLES

d nd

THE FOLLOWING IS A PICTURE VIEW OF THE CURRENT CONTROL STATUS
REGISTERS WHICH CAN BE TESTED BY THIS PROGRAM.
IT SHOWS BIT

D o o

ASSIGNMENTS AND DEFINITIONS TO PROVIDE A HANDY REFERENCE, AND
SHOWS THE SIMILARITIES AND DIFFERENCES BETWEEN EACH ONE:

740
761

D e

NNNNNNV
SRS
NSS
00 ~O N NN

NOTE
IN EACH CSR ARE EQUAL

TO ZERO.

b el

d e

ALL UNUSED BITS

749
750
;g}

S.1

D nd

d e

b wd

D ol

753
7%
755

756
;gg
;23

;g}

CORE/MOS PARITY REGISTER

ccesscccecccccsccccccccccccccaccccccsecccccenceca1
11
1
1
I
1
11
1

IPEY
1
1

Y
0
11

15 14 13 12 11

ADDRESS
11

I
1

0
1gp!
111

10 09 08 07 06 05 04 03 02 01

IAE!
1°1
00

BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS:

BIT1S PARITY ERROR

765
766
767
768

BITS 11-5
ERROR ADDRESS
HIGH ORDER ADDRESS BITS
OF
ADDRESS
OF
PARITY ERROR (BITS
17-11

OF ADDRESS).

771
772
1773

BIT02
PARITY
(ODD)

WRITE
NORMAL
WHEN

1775
1776
1777
1778
1779
1780

WHEN SET.

;93

—h

D ced

b e

b e =D e

;gz

1774

OTHER

PARITY

WRONG
PARITY
CLEAR;

(EVENS

BITOO ACTION ENABLE NO
ACTION WHEN CLEAR TRAP

TO VECTOR
SET.

114

WHEN

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

G_ ¢4
PAGE 62

SEQUENCE

1782

PAGE 41

178

};%2
1787

1788

1789
1790
};3;
};gz

};32

5.2
|

MOS BIPOLAR PARITY REGISTER (USED IN THE 11/45<55)

acecescccccccccccsmccccccccccccccescscccmanecana=

1
111111111111
1
1
1
IPEY
V0T
T
0T
gpt
IAF!
111111
11111111111
15 14 13 12 11

10 09 08 07 06 05 04 03 02 01 00

BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS:

1797
1798
1799
1800
1801
1802

BIT15 PARITY ERROR

1805
1806
1807
1808

BITOO ACTION ENABLE NO
ACTION WHEN CLEAR TRAP
TO
VECTOR
114
WHEN
SET.

}382

BIT02

WRITE WRONG PARITY
NORMAL
PARITY
(0DD)
WHEN
CLEAR;
OTHER

PARITY (EVEN) WHEN SET

CZMSDCO MST11-L/M DIAGNOSTIC

22-APR-81

H 4
PAGE 63

14:13

SEQUENCE
PAGE 42

D e o

810
811
812
813
814
815

MACRO M1113

D i

5.3

D ad e

) wd

)

816

817

818
819

821

D i

823

835
836

837

838
839

— e

aed e

b wd

S OBNONE
W= O ODNONAWN—=O

D cd ad e

D e

e P P I I IIII IS

b —d

oo
W

D e

wred e

D nd

825
826
827
828
829
830
831
832
833

MF11S=K (SR

eeeemeeceeecccecmcmcme meeeeecceccecceeeeeeeee-

'DE!

ISI!

111

15 14 13 12 11

ADDRESS

'SE'IP!DC!EC!EE!

rrrrrrrirrni
10 09 08 07 06 05 04 03 02 01 00

BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS:
BIT1S DOUBLE ERROR SET
WHENEVER DBE
_OCCURS.
IF BIT2=0,
THE
ERROR
ADDRESS WilL BE STORED
IN BITS 11-5.
IF BIT2
=1,
THE
CHECK BITS
READ WILL BE STORED IN
BITS 11-5.

BIT
13 SET
INHIBIT
MODE
WHEN THIS BIT IS
SET TO A 1, IT ENABLES
THE
INH MODE POINTER
TO INHIBIT EITHER
THE
FIRST OR
SECCND
16K

FROM EVER
GOING
INTO
THE
DIAG.
CHECK
OR
ECC
DISABLE
MODE
.
WHEN
THIS
BIT IS SET
TO
ZERO,
THE
ENTIRE
MEMORY
OPERATES IN IN

DIAGNOSTIC
C(HECK
ECC DISABLE MODE.

BITS

11-5

ERROR

ADDRESS
WITH
BIT02
CLEARED
THEY
CONTAIN
THE
HIGH
ORDER_ERROR
ADDRESS (BITS
17-11);
WITH BITO2
SET
THEY
CONTAIN THE CHECK BITS
FOR ECC.

BIT04 SINGLE ERROR SET
WHENEVER
OCCURS

SINGLE ERROR

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

4
[
PAGE 64

SEQUENCE

PAGE 43

BITO3

INHIBIT

MODE

POINTER
THE
INHIBIT
MODE POINTER WORKS
_IN
CONJUNCTION WITH
THE
SET INHIBIT MODE
BIT.

WHEN BIT13 IS SET TO A
1, A
16K
PORTION OF

MEMORY
IS
INHIBITTED
FROM OPERATING IN
THE
ECC
DISABLE
MODE
OR

DIAGNOSTIC CHECK MODE.

THE
INHIBIT
MODE
PCINTER
INDICATES
WHICH 16K IS BEING INHIBITED;
€.G.-WHEN

BIT

=1, THE SECOND

16K OF MEMORY
IS
INHIBITTED.
WHEN BIT 13
IS SET TOA O,
BIT
3
BECOMES INOPERATIVE.

BIT02 DIAGNOSTIC CHECK

MODE
WHEN SET ENABLES
READ-WRITE
OF
CHECK

BITS(SEE
IF

THIS

DBE

MODE

BITS

11-5).

OCCURS

(WITH BIT1

=0), BIT15 IN THE

(SR

IS
_SET
BUT THE CHECK
BITS FROM MEMORY
ARE
STORED
IN
(SR
BITS
11-5 AND NOT
THE
DBE
ADDRESS BITS.

—
b -

VOO

~233833383823

1900

BITO1

DISABLE

ERROR

CORRECTION WHEN SET NO
SINGLE_
ERROR
CORRECTION
TAKES
PLACE AND
THE ERROR IS NOT
LOGGED
IN THE CSR;
CORRECT
CHECK
BITS
ARE
STILL
WRITTEN
TO THE
MEMORY HOWEVER.

BITO0
DOUBLE
ERROR
ENABLE
WHEN
SEY
ENABLES TRAP TO VECTOR
114 ON DOUBLE ERROR.

CZMSDCO MS11-L/M DIAGNOSTIC
1914
1915
1916
1917
1918
1919

MACRO M1113

22-APR-81

J &
PAGE 65

14:13

SEQUENCE
PAGE 44

5.4

MS11-L CSR

1920

eeeeesecsssseccccccccccccccccsccccccccncccacnccacanee

1921
1922

1
'PE'EU!
I

}ggz
}3%2

}gsg

O 00 ~NO NS NN

—

2RPPPRRLP

b
b and wd
b amd
—d ed

1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940

1950
1951
1952
1953
1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964

1965

1966
1967
1968
1969

1970

!
)

15 14 13 12 11

)
ADDRESS
I
1
I

I
1
11
Pl
WPl
AE!
1
11
111

10 09 08 07 06 05 04 03 02 01

BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS:
BIT15 PARITY ERROR
BIT14
Eus
ERROR
RETRIEVAL
IF
THE
MEMORY
IS
ON
AN
EXTENDED
UNIBUS, WHEN
81714 IS ZERC, THE LOW
ORDER
FAILING
ADDRESSES
ARE
AVAILABLE
(BITS
11-17);
WHEN BIT14 IS
ONE,
THE
HIGH
ORDER
FAILING ADDRESSES
ARE
AVAILABLE
(BITS 18-21
OF ADDRESS).
IF
THE

MEMORY IS ON A UNIBUS,
A JUMPER DISABLES TH.S

BIT SO THAT IT IS READ
ggLY. AND EQUAL TO ZE-

BITS
11-§
ERROR
ADDRESS
WITH
BIT14
SET, THEY CONTAIN
THE
HIGH ORDER PARITY ERROR
ADDRESS
(BITS
21-18
OF
ADDRESS):
WITH BIT14
CLEARED.
THEY
CONTAIN
THE LOW
ORDER PARITY ERROR ADDRESS
(BITS
17-11 OF
ADDRESS).

BIT02
PARITY
(0DD)

WRITE
NORMAL
WHEN

OTHER

PARITY

wHEN SET.

WRONG
PARITY
CLEAR;

(EVENS

BITO0 ACTION ENABLE NO
ACTION
WHEN
CLEAR:

TRAP

VECTOR

114

CZMSDCO MS11-L/M DIAGNOSTIC
1971

MACRO M1113

22-APR-81 14:13

K 4
PAGE 65-1

SEQUENCE
WHEN SET.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

1973
1974
1975

1976
1977
1978
1979

14:13

PAGE 66

SEQUENCE
PAGE 45

5.5
|

MS11-M (SR

ceessssccccccccccsceccccccaccccccccnccsccscnsssana

1980
1981
}gg%

I
'DEEU!SI!

}32?

15 14 13 12 11

}ggg

1
1
ADDRESS
I
1
11

I
!SE'IP!DC!EC!EE!
)
I

10 09 08 07 06 05 04 03 02 01

BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS:

1988
1989
1990
1991
1992
1993
1994

BIT1S
UNCORRECTABLE
ERROR
THIS BIT IS SET
IF A DBE
OCCURS,
AND
THE
ERROR
ADDRESS IS
SIORED
IN
THE
CSR.
THIS
BIT
IS ALSO SET
IN
THE
ECC
DISABLE

1996
1997
1998
1999

OCCURS.

1995

MODE

IF AN SBE OR DBE

BIT14
Eus
RETRIEVAL
IF

ERROR
THE MEM-

2000
2001
2002
2003
2004
2005
2006
2007
2008
2009
2010
2011
2012
2013
2014
5812

ORY IS ON AN EXTENDED
UNIBUS,
WHEN BIT14 IS
ZERO AND EITHER BIT4
OR_ BIT
15
IS A ONE,
THE LOW ORDER
FAILING
ADDRESSES ARE _AVAILABLE (BITS 11-17);
WHEN
BIT14 IS ONE, THE HIGH
ORDER FAILING ADDRESS~
ES ARE AVAILABLE (BITS
18-21 OF ADDRESS).
IF
THE
MEMORY
IS
ON A
UNIBUS, A JUMPER DISABLES THIS BIT SO THAT
IT IS READ ONLY,
AND
EQUAL TO ZERO.

2017
2018
2019
2020
2021
2022
2023
2024
2025
2026
2027
2028
2029

BIT13 SET INHIBIT MODE
WHEN THIS BIT IS SET
TO A 1, IT ENABLES THE
INH MODE
POINTER
TO
INHIBIT
EITHER
TME
FIRST OR
SECOND
16K
FROM EVER GOING INTO
THE
DIAG.
CHECK OR
ECC
DISA3LE
MODE.
WHEN THIS BIT [S SET
TO A O, IT ALLOWS
THE
DIAG.
CHECK
MODE
AND/OR
ECC
DISABLE

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

n 4
PAGE 66-1

SEQUENCE
MODE
TO
OPERATE OVER
THE ENTIRE
MEMORY
ON
THE BOARD.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

N
&4
PAGE 67

SEQUENCE
PAGE 46

BITS
11-5
ERKOR
ADDRESS
WITH
BIT0Z2
CLEARED AND BIT14 SET,
THEY

ORDER
(BITS

(ONTAIN THE HIGH

ERROR

ADDRESS

21-18);

WHEN

BITO2 AND BIT14 ARE
CLEARED,
THEY CONTAIN
THE

LOW

ORDER

_ERROR

ADDRESS
(BITS 17-11);
WHEN BIT02 IS SET THEY
CONTAINS
(HECK
BITS
FCR ECC.

BITO4 SINGLE ERROR SET
WHENEVER
OCCURS.

BITO3

SINGLE ERROR

INHIBIT

MODE

POINTER
THE
INHIBIT
MODE POINTER WORKS
IN

CONJUNCTION WITH
THE
SET INHIBIT MODE
BIT.
WHEN BIT13 IS SET TO A
1, A
16K
PORTION
OF

MEMORY
IS
INHIBITTED
FROM OPERATING IN
THE
ECC
DISABLE
MODE
OR

DIAGNOSTIC CHECK MODE.

THE
INHIBIT
MODE
POINTER
INDICATES

WHICH 16K IS BEING INHIBITED;
E.G.-IF BIT3
=1,
THE SECOND 16K OF
MEMORY IS_
INHIBITTED.

WHEN BIT13 IS SET TO A

0.
BIT3
INOPERATIVE.

BECOMES

BIT02 DIAGNOSTIC CHECK

MODE
WHEN SET ENABLES
READ-WRITE
OF
CHECK

BITS(SEE BITS
11-5).
[F
A
DBE
OCCURS
IN
THIS MODE

(WITH BIT1=0

), BIT1S IS

THE
ARE

11-5,

SET,

CHECK
BITS
STORED
IN

NOT

ADDRESS BITS.

THE

BUT

READ
BITS

DBE

CZMSCCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

PAGE 68

SEQUENCE
PAGE 47

BITO1

DISABLE

ERROR

CORRECTION WHEN SET NO
SINGLE ERROR CORRECT]ON
TAKES
PLACE.
A
SINGLE BIT ERROR
WILL

SET

BIT04

AND

AND ASSERT BUS

-a-a-n~<>cubsy:cn:
V29 tv
W -0V~

— e

b e

nd ed

(RN 1,8 1,N 1, N1, NT,NT,67,N7,87,§1

2102

BIT15

PBL

BITO0 IS ASSERTED;

DOUBLE

ERROR

WILL

SET
SET BIT15 AND ASSERT
BUS
PBL
L
IF

BiTOO

BIT00

UNCORRECTABLE

ASSERTED.

THE ERROR
ADDRESS
IS
STORED IN THE CSR, AND
CORRECT CHECK BITS ARE
GENERATED
AND
STORED
ON A WRITE.

ERROR
ENABLE WHEN SET
ENABLES TRAP TO VECTOR
114
ON UNCORRECTABLE
ERROR.

MACRO M1113

22-APR-81 14:13

C 5
PAGE 69

SEQUENCE

20000~
NO VNS
OB WA= O VO NO NS WNI—=OOVONO NS WN =0V

b e

d ed

b e

e o

b e

VAVAWVVAWA LSS 8 8N 85 85 08 85 3 8 BN

d o

W N N IR

d od

b e

b cnd oD

D e

W AN AN RO PO PO PO NV NI NI NONON) — =

b e

AIALALNLALALNLALALNINL
AL AL NN NP AL AN AL NI N AL NI NINAL AL AN AN NI AN A NIAININI PO N

CZMSDCO MS11-L/M DIAGNOSTIC

PAGE 48

6.0

SUB-TEST SUMMARIES

6.1

TESTS

TEST

BIT 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-200 (OCTAL) FOR ZEROS AND ONES
ERRORS ARE NOT TYPED HERE - ONLY LOGGED IN
THE

TEST

CONFIGURATION TABLE

ECC INHIBIT MODE POINTER TEST
TEST

5
DIAGNOSTIC MODE DISPATCH ROUTINE

THIS TEST RUNS ALL THE PATTERNS
MODE SELECTED.

TEST

6
UNIQUE BANK TEST
PATTERN 27 1S RUN

IN THE

564

mNO’*V’!‘*WN—‘OOOVO‘MJ\LNN—‘OOQ\IO\J"%WN—'OO@

MACRO M1113

22-APR-81 14:13

PAGE 70

SEQUENCE

e
e
b e

93
94

PAGE 49

6.2

PATTERNS

6.2.1

GENERAL PATTERN INFORMATION

ACTUAL PATTERNS ARE IDENTIFIED BY SYMBOLIC LOCATIONS ‘MTPXYY'' WHERE
X
MAY
BE
ANY SUB PROGRAM INDICATOR (A,B,C.ETC) OR O AND YY WILL BE THE
NUMBER OF THE PATTERN.

SETUP PROCEDURES FOR EACH PATTERN ARE IDENTIFIED 8Y SYMBOLIC LOCATIONS
"MTOOYY'® WHERE YY WILL BE THE NUMBER OF THE PATTERN.
PATTERNS RESIDE

IN & SCRIPTS THAT ARE SCANNED FOR EXECUTION.

SYMBOLIC

LOCATION °MKCSRT'' IS A TABLE OF PATTERNS THAT CAN RUN ONCE FOR EACH
ECC BANK (TWICE FOR INTERLEAVED MS11-M'S).
SYMBOLIC LOCATION
'MKPAT'
IS

TABLE

PATTERNS

THAT

(AN

RUN ON EACH BANK OF ECC MEMORY.

SYMBOLIC LOCATION ‘MJPAT'' IS A TABLE OF PATTERNS THAT CAN RUN ON

EACH

BANK
OF
PARITY
MEMORY.
SYMBOLIC
LOCATION
°‘FSPAT'’
IS A TABLE Of
PATTERNS THAT CAN BE RUN IN FIELD SERVICE MODE (COMMAND 5).

THE 1ST 3 SCRIPTS ARE COMPLETELY CONTROLLED BY THE APT
E-TABLE
(EVEN
IF
NOT
RUNNING
UNDER APT).
MODIFICATIONS TO THIS TABLE CAN BE MADE
(1) WITH APT, OR (2) MANUALLY.
EXAMPLE E-TABLE SEGMENT:

sTHE FOLLOWING LOCATIONS SPECIFY WHICH FATTERNS
sARE TO BE RUN FOR PARTICULAR MEMORIES

:REFERENCE THE TABLE LISTED BELOW TO RELATE BITS TO PATTERNS.
sNOTE«=NULL TESTS DO NOT TAKE ANY TIME
:

RECOMMENDED VALUE

$0DWO:

.WORD

177777

sECC CSR TESTS

58?

$DDWS5:

. WORD

1727777

¢PARITY PATTERNS

;8170 SET WILLL RUN THE FIRST ENTRY IN THE TABLE, BITO SET
;IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE...

b md

b =D

b o

d =D

D ad

d o

b o

OO NN

PLRLNIALALAINININIAI AL AL NI A AN AL NN A AN AL NI AL NLAI NN NI AL AL NI NI AL PV NN N NN AN N

CZMSDCO MS11-L/M DIAGNOSTIC

196
197
198
199

$ODW1:
$ODW2:
$DDW3:
$DDWé4:

.WORD
.WORD
.WORD
. WORD

177777
177777
177777
177777

cECC CSR_TESTS
¢ECC PATTERNS
cECC PATTERNS
sPARITY PATTERNS

177777 TAGLE _= MKCSRT:

177777
103777
177777
003777

TABLE
TABLE
TABLE
TABLE

_=
_=
_=
_=

MK(CSRT:
MKPAT:
MKPAT:
MJUPAT:

177774 TABLE _= MJPAT:

CZMSDCO MS11-L/M DIAGNOSTIC
2203
2204
2205
2206
2207
2208
2209
2210
%s;%

%g}z
2215

%g}g

%%}g

MACRO M1113 22-APR-81 14:13 PAGE §1

SEQUENCE
PAGE 50

6.2.2

6.2.2.1

SPECIFIC PATTERNS

PATTERN 0

BASIC DATA TEST

WRITES & READS R2 INTO A 16K BANK.
THIS IS USED FOR ZEROS AND ONES TESTING AND IN FIELD SERVICE MODE
ANY CONSOLE SELECTED PATTERN.
IT CAN EXECUTE OUT OF THE USER INSTRUCTION PAR'S.

2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
gggg

6.2.2.2

2237
Sggg

WRITES & READS AN
INCREMENTING
ADDRESSED INTO A 16K BANK.

552?

IT CAN EXECUTE OUT OF THE USER INSTRUCTION PAR'S.

2242
2243
2244
%%22

6.2.2.3

2247

WRITES THE COMPLEMENT OF THE PHYSICAL ADDRESS FROM HIGH

2250
SS?;

PATTERN AND ADDRESSING SEQUENCE.

2253

IT CAN EXYECUTE OUT OF THE USER INSTRUCTION PAR'S.

ngg

FOR

NOTE
IT IS
FREQUENTLY MODIFIED
DYNAMICALLY
SUCH
THAT
(1) IT RETURNS AFTER WRITING
ONLY (THE 1ST NOP
IS
REPLACED WITH A
RETURN)
OR
(2)
IT
ONLY COUNTS ERRORS
(THE CODE PERRO2 AND NOP ARE
REPLACED
WITH INC Q#PATERR).

PATTERN 1

PATTERN 2

ADDRESS TEST
PATTERN

EQUIVALENT

PHYSICAL

COMPLEMENT ADDRESS TEST

ADDRESSES
LOW (WRITE DOWN) AND READS FROM LOW ADDRESSES TO HIGH (READ UP).

THIS PROVIDES THE COMPLEMENT OF THE COVERAGE OF PATTERN 1

IN BOTH DATA

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

F_
5
PAGE 72

14:13

SEQUENCE

PAGE 51

6.2.2.4

PATTERN 3

3 XOR 9

gz‘;gg & READS A PATTERN THAT COMPLEMENTS AS
THIS PATTERN 1S RUN & TIMES

ZEROS,

(3)

ADDRESS

(1) WITH ZEROS & CONES,

BITS

(2)

WITH 401 & ONES, AND (4) WITH ONES & 401.

WITH

AND

ONES

THE PATTERN OF

THE 401 IS TO FORCE A THE PARITY BITS TO BECOME INVOLVED.
IT CAN EXECUTE OUT OF

THE USER DATA PDR'S,

6.2.2.5

ROTATING ZEROS TEST

THE USER INSTRUCTION PAR'S,

THE KERNEL DATA PAR'S AND THE SUPERVISOR DATA PAR'S.

PATTERN &

WRITES A BACKGROUND PATTERN OF ONES.
THRU

EACH

PAR

BYTES

(18 TIMES)

ZERO AND THE WORD (2 BYTES)
IT CAN EXECUTE OUT OF

ROTATES A ZERO

AND

THEN CHECKS

IS STILL ALL ONES.

CARRY

THAT

THE

BIT

LEFT

CARRY

THE USER DATA PAR'S AND THE KERNEL DATA PAR'S.

NOTE
IT IS NOT UNCOMMON TO OBSERVE
THE
GOOD
DATA
EQUAL
TO
THE
BAD
DATA.
THIS
INDICATES THAT THE CARRY WAS
NOT
CLEAR

AFTER 18 ROLB'S.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE 93

SEQUENCE

2291
2292
2293
%gg?

6.2.2.6

2296
2297
%ggg

WRITES A BACKGROUND PATTERN OF ZEROS.
ROTATES A ONE
CARRY BIT LEFT
THRU EACH PAIR OF BYTES (18 TIMES) AND THEN CHECKS THAT THE CARRY IS A
ONE AND THE WORD (2 BYTES) IS STILL ALL ZEROS.

%%8?

THIS PROVIDES THE COMPLEMENT OF THE COVERAGE OF PATTERN & IN DATA.

%ggg

IT CAN EXECUTE OUT OF THE USER DATA PAR'S AND THE KERNEL DATA PAR'S.

2304
2305
2306
2307
2308
2309
2310

PAGE 52
PATTERN 5

ROTATING ONES TEST

NOTE
IT IS NOT UNCOMMON TO OBSERVE
THE
GOOD
DATA EQUAL THE BAD DATA.
THIS INDICATES
THAT THE CARRY WAS NOT
SET AFTER
18
ROLB'S.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

H 5
PAGE 74

SEQUENCE

2314
2315
2316
%g}g

6.2.2.7

2319
2320

WRITES & READS A DOUBLE WORD FIRST WITH ALL BITS O EXCEPT 1 (FOR EVERY
BIT POSITION),
SECOND WITH ALL BITS
1
EXCEPT
1
(FOR EVERY BIT

%%%2

THIS IS A VERY QUICK CHECK OF

2325
2326
2327
gggg

6.2.2.8

2330
2331
2332
2333
2334
2335

WRITES A BACKGROUND OF ALL ZEROS.
READ ADDRESS 1 FOR A 0O BYTE.
COMPLEMENT ADDRESS 1.
READ ADDRESS 1 FOR A NON O BYTE.
FOR EACH ADDRESS BIT POSITION FROM BIT 1:
VIRTUAL (2, 4, 10, 20, 40, 100, 200, 400,

2337

PHYSICAL

ggg;

2336
2338

2339
2340
%gz;
%%22

2345
2346
2347

%%23

PAGE 53

PATTERN 6

INITIAL DATA TEST

POSITION).

PATTERN 7

60000, 20000)

(60002, 60004,

THE DATA PATHS.

ADDRESS BIT TEST

60010,

60020,

1000,

60040,

61000, 62000, 64000, 70000, 140000, 160000)

4000,

10000,

60100,

60200,

60400,

READ ADDRESS FOR A O WORD.
COMPLEMENT ADDRESS CONTENTS.
READ ADDRESS FOR A NON-=ZERO WORD.

THIS IS A VERY QUICK CHECK OF

6.2.2.9 PATTERN 10

THE ADDRESS BIT UNIQUENESS.

BYTE ADDRESSING TEST

2350
2351
2352
2353
2354
2355
5%29

WITH ECC DISABLED.
WRITES ALL ONES TO A DOUBLE WORD.
FOR EACH OF THE & BYTES IN THE DOUBLE WORD.
CLEARS ONE BYTE.
READS ALL & BYTES FROM DOUBLE WORD.
CHECKS FOR ONLY PROPER BYTE CLEAR.
ALL OTHER BYTES SET TO ALL ONES.

g%gg

THIS IS ONLY DONE ON ONE DOUBLE WORD ADDRESS.

2360
2361
2362
5%22

2000,

NOTE
THIS IS RUN FOR ECC MEMORY OMLY

MACRO M1113 22-APR-81 14:13 PAGE ;5

SEQUENCE
PAGE 54

6.2.2.10
1.

PATTERN 11

SINGLE BIT ERROR TEST

CREATE A SINGLE BIT ERROR.
READ DATA UNCORRECTED

(WITH ECC DISABLE).

CHECK THAT SBE AND DBE FLAGS ARE SET, AND THE
IS LATCHED.
READ FIRST WORD OF DATA CORRECTED

O
VN

ADDRESS

WAS

SET,

AND

DATA CORRECTED

(WITH ECC ENABLED).

DO (1-7) FOR A SINGLE BIT ERROR IN EACH OF 32 POSITIONS OF

READ SECOND WORD OF

CHECK THAT THE CSR SINGLE BIT ERROR FLAG WAS SET.
DOUBLE WORD.

1.E.

10.

11.

THE

CLEAR SBE FLAG.

ERROR

(WITH ECC ENABLED)

CHECK THAT THE CSR SINGLE BIT ERROR FLAG
ERROR ADDRESS WAS LATCHED.

e«

CZMSDCO MS11-L./M DIAGNOSTIC

(32 TIMES)

IF NOT IN QUICK VERIFY MODE THEN DO

(1-8)

FOR DATA CONSISTING

OF 1 BIT SET_IN EACH OF 32 POSITIONS OF A DOUBLE WORD.
I.E.
(32 X 32 = 1024 TIMES)
DO (1-9)

FOR COMPLEMENTED DATA (1 BIT CLEAR

DO (1-7) FOR A DOUBLE WORD EQUAL TO (000000,000000), AND

ALL

POSITIONS OF

A DOUBLE WORD).

EACH

I.E.
(1024 X 2 = 2048 TIMES)
OR (32 X 2 = 64 TIMES (QUICK VERIFY))
12.

PUSSIBLE

SINGLE BIT ERROR COMBINATIONS FORCED INTO THE CHECK

BITS (CSR BITS 5-11).
13.
THIS

CLEAR ANY ERRORS OUT OF

INSURES THAT ALL

TEST LOCATIONS.

SINGLE BIT ERRORS CAN BE

CORRECTED AND DETECTED.

NOTE
THIS

TEST

IS RUN FOR ECC MEMORY ONLY

CZMSDCO MS11-L/M DJAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE #6

SEQUENCE

PAGE 55

6.2.2.1

PATTERN 12

WRITE BYTE CLEARS SBE TEST

WRITE A BYTE OF DOUBLE WORD TO ONES.

READ A BYTE OF DOUBLE WORD.

IF THIS IS MS11-M, THE SBE FLAG SHOULD BE SET.
IF_THIS IS MF11S-K THE SBE FLAG SHOULD BE SET IF THIS IS
BYTE WITH THE ERROR.
.

CREATE A SINGLE BIT ERROR.

THE BYTE SHOULD HAVE BEEN EQUAL

TO ONES.

DO (1-5) FOR EACH OF THE 4 BYTES OF

THE DOUBLE WORD

DO (1-6) FOR A SINGLE BIT ERROR IN EACH OF 32 POSITIONS OF
DOUBLE WORD

I1.E.

THE

(32 TIMES)

IF NOT IN QUICK VERIFY MODE THEN DO (1-7) FOR DATA CONSISTING
OF 1 BIT SET_IN EACH OF 32 POSITIONS OF A DOUBLE WORD.

I.E.

9.
THIS

(32 X 32 = 1024 TIMES)

CLEAR ANY ERRORS OUT OF

INSURES

THAT

SINGLE BIT

TEST LOCATIONS.

ERRORS

THE

DATA

PORTION

(NOT

CHECKBITS)
(AN
BE CLEARED BY WRITING THE CORRESPONDING BYTE AND THAT
WRITING ANY OTHER BYTE DOES NOT CHANGE THE EXISTING SINGLE BIT ERROR.
NOTE

THIS

2458

TEST

IS RUN FOR ECC MEMORY ONLY.

CZMSDCO MS11-L/M DIAGNOSTIC

2460
2461
2662
%222
2465

MACRO M1113

22-APR-81

14:13

K_5

PAGE 77

SEQUENCE

PAGE 56

6.2.2.12

PATTERN 13

CREATE DOUBLE BIT ERROR TEST

5229

CREATE A DOUBLE BIT ERROR.

%228

ACCESS THE DATA (TST INSTRUCTION).

2470

%2;2

INITIALIZE CSR TO ALLOW PARITY TRAPS ON DBE'S.

%2;2

ACCESS THE DATA (TST INSTRUCTION).

52;g

CHECK THAT A PARITY TRAP OCCURRED.

2479
2480
2481
gzgg

DO (1-6) FOR THE 2ND BIT OF EACH DOUBLE BIT ERROR IN EACH OF
32
POSITIONS
OF
A DOUBLE WORD LESS THE ONE POSITION OF THE
1ST BAD BIT.
I.E.
(31 TIMES)

2484
gzgg

IF NOT IN QUICK VERIFY MODE THEN DO (1-7) FOR THE 1ST BIT
OF
5333 OF DOUBLE BIT ERROR IN EACH OF 32 POSITIONS OF A DOUBLE

32;;

szgg

CHECK THAT THE CSR DBE FLAG IS SET, AND THE ERROR ADDRESS

LATCHED.

1.E. (31 X 32 = 992 TIMES)

2489
2490
2491
gzgg

DO (1-8) FOR COMPLEMENTED DATA (ONES VERSUS ZEROS
WORD)
1.E.
(992 X 2 = 1984 TIMES)
OR (31 X 2 = 62 TIMES (QUICK VERIFY))

2494
2495
5239

10.

DO (1-6) FOR A DOUBLE WORD EQUAL TO (000000.000000). AND ALL
POSSIBLE
DOUBLE
BIT
ERROR COMBINATIONS FORCED INTO EACH OF
THE CHECK BITS (CSR BITS 5-11).

5233

2500
2501
2502
2503
2504
2505
2506
2507
2508
2509
2510
2511
2512

11. CLEAR ANY ERRORS OUT OF TEST LOCATIONS.

THIS INSURES THAT ALL DOUBLE BIT ERRORS CAN BE
AND CAUSE TRAPS.

CREATED

NOTE

THIS TEST IS ONLY RUN DURING
THE
FIRST
(QV)
PASS WHEN UNDER ACT OR APT, AND 1S
RUN FOR ECC MEMORY ONLY.

AND

DOUBLE

DETECTED

[V,
P ) WA
= O VO NN

(Y21 %, ) NN

AR RNIALAIPLAL NI AL NI PN PN PN

PN NI PO

AN
AN AV
AN NN
NN AN AN NP NP PONIPONININ)
= s = bo D

W =200V
NS

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE %8

SEQUENCE

PAGE 57

6.2.2.13

PATTERN 14

WRITE INHIBIT DURING DATIP WITH DBE TEST

CREATE A DOUBLE BIT ERROR.

DO ASRB ON TEST LOCATION.

CHECK THAT DOUBLE WORD IS STILL BAD (UNCHANGED=-WITH DBE).

DO (2-3) ON ALL & BYTES OF DOUBLE WORD.

D0 (1-4) FOR THE 2ND BIT OF EACH DOUBLE BIT ERROR IN EACH OF
32 POSITIONS OF
A DOUBLE WORD LESS THE ONE POSITION OF THE
1ST BAD BIT.

1.E.
6.

IF NOT IN QUICK VERIFY MODE THEN DO (1-5) FOR THE 1ST BIT

EACH

DOUBLE

I.E.

(32 x 32 = 922 TIMES)

WORD.

(31 TIMES)
BIT

ERROR

IN EACH OF

OF
32 POSITIONS OF A DOUBLE

DO (1-6) FOR COMPLEMENTED DATA (ONES VERSUS ZEROS

WORD)
.

DOUBLE

I.E._
(922 X 2 = 1984 TIMES)
OR (31 X 2 = 62 TIMES (QUICK VERIFY))

DO (1-4) FOR A DOUBLE WORD EQUAL TO (000000,000000), AND
POSSIBLE

ALL

DOUBLE BIT ERROR COMBINATIONS FORCED INTO THE CHECK

BITS(CSR BITS 5-11).

PIRNLRLRLALNVNL NNV

VAN
AA WM N NN
OO
AV AWIAALLA

=2 OO0 NN
NN —

CLEAR ANY ERRORS OUT OF

TEST LCCATIONS.

THIS INSURES THAT THE DOUBLE BIT ERROR CAN BE
ANY AFFECTED BYTE.

CLEARED BY

NOTE
THIS TEST IS ONLY RUN DURING
THE
FIRST
(QY)
PASS WHEN UNDER ACT OR APT, AND IS
RUN FOR MF11S-K ONLY.

DATIP

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

L
PAGE 79

SEQUENCE

PAGE 58

.
.
.

VNN

[V I

NN
~

AIRIALNNINIRLNIAY

6.2.2.14

PATTERN 15

WRITE INHIBIT OF BYTE WITH DBE

CREATE A DOUBLE BIT ERROR.
DO A MOVB IMMEDIATE

TO TEST BYTE.

CHECK THATM DOUBLE WORD IS STILL BAD

(UNCHANGED-WITH DBE).

DO (2-3) ON ALL & BYTES OF DOUBLE WORD.
DO (1-4) FOR THE 2ND BIT OF EACH DOUBLE 81T ERROR IN EACH OF
32
POSITIONS
OF
A DOUBLE WORD LESS THE ONE POSITION OF THE
1ST BAD BIT.

(31 TIMES)

1.E.

IF NOT IN QUICK VERIFY MODE THEN DO (1-5) FOR THE 1ST BIT

5353

DOUBLE

BIT

ERROR

IN EACH OF

32 POSITIONS OF A DOUBLE

1.E. (31 X 32 = 922 TIMES)
Bgné}'é’ FOR COMPLEMENTED DATA (ONES VERSUS ZEROS

DOUBLE

1.E. (992 X 2 = 1984 TIMES)

OR (31 X 2 = 62 TIMES (QUICK VERIFY))
DO (1-4) FOR A DOUBLE WORD EQUAL TO (000000,000000), AND

POSSIBLE

DOUBLE

BIT ERROR COMBINATIONS FORCED

BITS (CSR BITS 5-11).
9‘
THIS

CLEAR ANY ERRORS OUT OF

INSURES

INTO THE

ALL

CHECK

TEST LOCATJIONS.

THAT NO DOUBLE BIT ERROR

AFFECTED BYTE.

CAN BE

CLEARED BY A MOVB

NOTE
THIS TEST IS ONLY RUN DURING
THE
FIRST
(QV)
PASS WHEN UNDER ACT OR APT, AND IS
RUN FOR ECC MEMRY ONLY.

ANY

MACRO M1113

22-APR-81

14:13

N 5
PAGE 80

SEQUENCE

PAGE 59

WRITE INHIBIT OF WORD WITH DBE TEST

LA
L]
L]

PATTERN 16

DO MOV IMMEDIATE ON TEST LOCATION.

Y
L]

6.2.2.15

CHECK THAT DOUBLE WORD IS STILL BAD

(L I
.
L]

CZMSDCO MS11-L/M DIAGNOSTIC

CREATE A DOUBLE BIT ERROR.

(UNCHANGED-WITH DBE).

DO (2-3) ON BOTH DOUBLE WORDS.
DO (1-4) FOR THE 2ND BIT OF EACH DOUBLE BIT ERROR IN EACH OF
32 POSITIONS OF
A DOUBLE WORD LESS THE ONE POSITION OF THE
1ST BAD BIT.

1.E.

(31 TIMES)

IF NOT IN QUICK VERIFY MODE THEN DO (1-5) FOR THE 1ST BIT
OF
5353
DOUBLE
BIT
ERROR
1IN EACH OF 32 POSITIONS OF A DOUBLE

1.E. (32 X 32 = 992 TIMES)
33R5}°6)

FOR COMPLEMENTED DATA (ONES VERSUS ZEROS

DOUBLE

1.E. (992 X 2 = 1984 TIMES)

OR (31 X 2 = 62 TIMES (QUICK VERIFY))
DO (1-4)

POSSIBLE

FOR A DOUBLE WORD EQUAL

TO (000000,000000), AND

DOUBLE BIT ERROR COMBINATIONS FORCED

BITS (CSR BITS 5-11).
9.

CLEAR ANY ERRORS OUT OF

INTO THE

ALL

CHECK

TEST LOCATIONS.

THIS INSURES THAT NO DOUBLE BIT ERROR CAN BE
AFFECTED WORD.

CLEARED BY A MOV

ANY

ONES

NOTE
THIS TEST IS ONLY RUN DURING
THE
FIRST
(QV)
PASS WHEN UNDER ACT OR APT, AND [S
RUN FOR ECC MEMORY ONLY.

6.2.2.16
1.

PATTERN 17

HOLDING 1°S & 0°'S TEST

WRITE A 16K BANK WITK
ALTERNATING
WRITING A BYTE AT A TIME.

BYTES

READ EACH WORD FOR CORRECT PATTERN.

DO (1-2) AGAIN FOR A COMPLEMENT PATTERN,

ZEROS

CZMSDCO MS11-L/M DIAGNOSTIC

2669
2670

MACRO M1113 22-APR-81 14:13 PAGE 80-?
B8

THIS CHECKS THE MEMORY FOR THE CAPABILITY OF HOLDING 0°'S & 1'S.

SEQUENCE

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

c 6
PAGE 81

SEQUENCE
PAGE 60

6.2.2.17
1.

PATTERN 20

MARCHING 0'S & 1'S IN CHECK BITS TEST

WRITE DOUBLE WORDS OF 000000,,000000 WHICH CAUSES CHECK
TO EQUAL 077 WHILE ADDRESSING INCREMENTS.
(WRITE UP/077 ==> CHECK BITS)

BITS

IN QUICK VERIFY MODE THEN GO TO STEP (5).

READ DOUBLE WORDS & CHECK WHILE
ADDRESSING DECREMENTS.
(DOWN/077 ==> 100)
THIS FLIPS ALL

THE

WRITING

000000,,100000

AND

CHECKBITS.

READ
DOUBLE
WORDS
&
ADDRESSING INCREMENTS.
(UP/109 =-=> 077)

CHECK

READ DOUBLE WORDS &
CHECK
ADDRESSING INCREMENTS.
(UP/077 -=> 100)
READ
DOUBLE
WORDS
&
ADDRESSING DECREMENTS.

WHILE

CHECK

WRITING

WHILE

Z2EROS

WHILE

000000,,100000

WRITING

ZEROS

WHILE

(DOWN/100 -=> 077)

READ DOUBLE WORDS & CHECK WHILE ADDRESSING INCREMENTS.

(UP/077)

THIS CHECKS THE

INTEGRITY OF

THE MOS CHIPS

THAT STORF

THE CHECKBITS.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

D6
PAGE &2

SEQUENCE

PAGE 61

b
i
b nd
b ad
— e

Vels ENTo NV, WNVIT,N)

[pST,ST,ST,NT,
8T N1, V1,8
NNSNNNNNN

6.2.2.18

PATTERN 21

MARCHING 0'S & 1°'S TEST

WRITE A BACKGROUND OF ALTERNATING BYTES OF ZEROS & ONES

FOR THE 16K BANK ADDRESSING DOWN

FOR THE 16K BANK ADDRESSING UP
(A) READ CHECK A WORD

(A) READ CHECK A WORD
(B) BYTE SWAP A WORD
(C) READ CHECK A WORD

(B) BYTE SWAP A WORD
(C) READ CHECK A WORD

FOR
(A)
(B)
(C)

THE 16K BANK ADDRESSING UP
READ CHECK A WORD
BYTE SWAP A WORD
READ CHECK A WORD

FOR THE 16K BANK ADDRESSiING DOWN
(A) READ CHECK A WORD
(B) BYTE SWAP A WORD
(C) READ CHECK A WORD

THIS CHECKS THE INTEGRITY OF

IT CAN EXECUTE OUT OF

THE 32 BIT DOUBLE WORDS.

THE USER DATA PAR'S.

NOTE

IT 1S NOT UNCOMMON TO SEE
A MISLEADING
ERROR TYPEQUT BECAUSE THE SECOND TEST IN
EACH CASE IS BASED UPON A 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
RELATIVE
TO
A
BYTE THEN YOU
SHOULD IGNORE THE SECOND ERROR REPORT.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

E_6
PAGE 83

SEQUENCE

PAGE 62

6.2.2.19
1.

PATTERN 22

REFRESH TEST

WRITE A DIAGONAL PATTERN OF ONES ON EVERY KDIAG(TH)
WRITE ZEROS ELSEWHERE.

STRIPE

THIS PATTERN 1S ON ADDRESSES NOT BIT POSITIONS.

:
EXAMPLE
ADDRESS

MSB8'S

LSB'S

'00010001
'00100010
'!01000100
'170001000

'00010001
'00100010
01000100
'!'10001000

NOTE

EXAMPLE USES KDIAG OF VALUE 4 MORE TYPICAL IS A VALUE
OF
8.
CONSULT THE SYMBOLIC DEFINITION OF 'XDIAG'' IN
THE PROGRAM LISTING TO BE SURE.

DISTURB EACH ROW FOR > 3.2MS
READ CHECK DIAGONAL PATTERN

DO (1-3) KDIAG TIMES MOVING THE

PLACEMENT

STRIPE TO COVER ALL ADDRESS POSITIONS.

DO (1-4) FOR A COMPLEMENT PATTERN
(ZEROS IN A BACKGROUND OF ONES)

NOTE
THIS

TEST

NOT

EXCEPT
UNDER
APT
INVOKED VIA
FIELD
(KAMIKAZE MODE).

NORMALLY

OR
ACT.
SERVICE

EXECUTED

IT MAY BE
COMMAND
13

THE

DIAGONAL

Pt Qui-Pudr Qi Pl Y- Guiry
e P

NS
W —=O

NN PONINIPNON)

00 00 0o 00 00 00 0o 00 00

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

F
6
PAGE 84

SEQUENCE

PAGE 63

6.2.2.20

PATTERN 23

SHIFTING DIAGONAL PATTERN TEST

SIMILAR IN OVERALL OPERATION TO PATTERN 22 EXCEPT IT
FOR REFRESH AND DISTURB ROWS.

DOES

2819

NOTE

2821
2822
2823
2824

THIS
TEST
IS NOT NORMALLY
EXECUTED
EXCEPT UNDER APT OR A(CT.
IT MAY BE
INVOKED VIA FIELD
SERVICE
COMMAND
13
(KAMIKAZE MODE).

2830

6.2.2.21

PATTERN 24

2832
2833

THIS DOES A CLASSICAL GALLOPING
PATTERN EXCEPT
INCREMENTED BY 400 OCTAL (EVERY 64TH DOUBLE WORD)

NOT

DtLAY

FAST GALLOPING PATTERN TEST
THAT

2836

NOTE

2838
2839
2840
2841

THIS
TEST
IS NOT NORMALLY
EXECUTED
EXCEPT UNDER APT OR ACT.
IT MAY BE
INVOKED VIA
FIELD
SERVICE
COMMAND
13
(KAMIKAZE MODE).

ADDRESSING

MACRO M1113

22-APR-81

6 6
PAGE 85

14:13

SEQUENCE
PAGE 64

SET CSR TO ALLOW UNCORRECTABLE ERROR TRAPS.
ACCESS TEST DOUBLE WORDS.

CHECK THAT NO UNCORRECTABLE ERROR TRAP OCCURRED.

CHECK THAT NO SBE TRAP OCCURRED.

WRITE A SBE

DISABLE CSR TRAPS.

ACCESS TEST DOUBLE WORDS.

O
L]

CHECK THAT NO TRAPS OCCURRED.

=
L]

ENABLE CSR FOR SBE TRAPS.

Vv
[]

ACCESS TEST DOUBLE WORDS.

W
[]

CHECK TO INSURE TRAP OCCURRED.

&
[]

DO (7-13) FOR THE 3 OTHER BYTES IN THE DOUBLE WORD.

N
[)

CREATE A DBE

O
[]

DISABLE CSR TRAPS.

N
[

ACCESS THE TEST DOUBLE WORD.

0
L)

CHECK THAT NO TRAPS OCCURRED.

VvV
.

ENABLE CSR FOR DBE TRAPS.

)

O
[)

ACCESS THE TEST DOUBLE WORD.

CHECK TO INSURE TRAP OCCURRED.
ENABLE CSR FOR SBE
ACCESS THE

CHECK TO INSURE TRAP OCCURRED.

2s.

DO (15-24) FOR THE 3 OTHER BYTES IN THE DOUBLE WORD.

H
L]

W
.

NV
L]

=
L]

ACCESS TEST DOUBLE WORDS.

ENABLE CSR FOR SBE TRAPS.

[INTERRUPT ENABLE TEST

PATTERN 25

6.2.2.22

CZMSDCO MS11-L/M DIAGNOSTIC

IN 1 BYTE.

TRAPS.

TEST DOUBLE WORD.

THIS INSURES THAT SBE'S & DBE'S GIVE

THE CORRECT TYPE OF

TRAPS.

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE 85-?
H

SEQUENCE

NOTE
THIS TEST

6.2.2.23

PATTERN 26

IS RUN FOR ECC MEMORY ONLY.

RANDOM DATA TEST

WRITE RANDOM DATA IN A 16K BANK WHILE

INCREMENTING THE ADDRESSES.

READ CHECK RANDOM DATA.
THIS ROUTINE REGENERATES THE SAME RANDOM NUMBERS

USING

THE

SAME

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M11.3 22-APR-81 14:13 PAGE &6 é

SEQUENCE

2920

PAGE 65

2923
2924
gggg

SEED AS 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.

2927
%g%g

ggv OTHER RUN IN THE SAME CONFJGURATION THEN THERE ARE 2 WAYS OF DOING

535

2930

2931
gggg

2934
%ggg
2937
2938

IF YOU WISH TO CHANGE THE RANDOM SEQUENCE SO THAT IT IS DIFFERENT THAN

)

MODIFY SYMBOLIC LOCATIONS ‘'SEEDHI'' AND ‘''SEEDLO’' TO ANY NUMBER
YOU LIKE.

ENTER FIELD SERVICE MODE AND EXECUTE THIS PATTERN (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,

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

J_
6
PAGE 87

SEQUENCE

PAGE 66

6.2.2.24

PATTERN 27

UNIQUE BANK TEST

;:éi PATTERN USES PATTERN O TO WRITE & READ THE BANK

NUMBER

EACH

IT DOES NOT TEST BANKS THAT REQUIRE RELOCATION TO TEST.
IT DOES NOT RUN AS PART OF ANY SCRIPT BUT RATHER IS ALWAYS
NORMAL PATTERN TESTS ARE COMPLETE.

6.2.2.25

PATTERN 30

RUN

AFTER

FLUSH OUT DBE'S TEST

THIS READS EACH LOCATION THEN MOVES THE OLD VALUE BACK
IN.
THIS
gggg]Bté;H
ECC DISABLED AND THEREFORE CORRECTS ANY DBE'S OR SBE'S

IT DOES NOT RUN AS PART OF ANY SCRIPT BUT RATHER IS

PRIOR

THE

END

PASS

PART OF

A SHUTDOWN SEQUENCE

CODE,

ALWAYS

RUN

IS
(IF
JUST

PART OF A CONTROL '°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
DIRECTED BY SWITCH 8

(HALT PROGRAM).

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

K
6
PAGE 88

SEQUENCE
PAGE 67

6.2.2.26

PATTERN 31

SOB-A-LONG TEST

RATIONALIZATION

IN ORDER TO CONCENTRATE THE MEMORY CYCLES OF A TEST INTO A

PARTICULAR

THE SOB INSTRUCTION IS THE ONLY

ADDRESS,
WE
MUST
CUT THE OVERHEAD CYCLES TO A MINIMUM.
FREQUENTLY,
THE
INSTRUCTION
ITSELF
MAY
PROVIDE
ADEQUATE
DATA
OR
SET
UP
A
BACKGROUND IN WHICH ANY COMPLEMENTED BIT MAY FIND IT HARD TO SURVIVE.
PDP-11

INSTRUCTION

THAT

(1)

SINGLE OPERAND, (2) CAN BE REPEATEDLY EXECUTED AT THE SAME PC AND,
CAN ESCAPE THIS REPETITIOUS LOOP.

(3)

HENCC, IT CAN BE POSSIBLE TO SOB A MOS CELL.
TO
DEATH
(OR
AT
LEAS]T
g?éégngfig?;HI")' AND TO SOB A CORE INTO OVER-HEATING (OR AT LEAST WARM
THE SOB ROUTINE WILL BE LOADED AND CALLED WITH RO SET EQUAL

CONSTANT

'SOBK'',

SET

INSTRUCTION '100776'".

EQUAL

THE

TO THE SOB

COMPLEMENT OF A ''SO8 RO,."

SIMPLIFIED SOB EXAMPLE:
18:

S08

RO.1$

CMP

R1.,1%

MOV

8EQ

28:

2S0B TILL RO UNDERFLOWS

R1.18

;WRITE COMPLEMENT OF SOB

;READ & CHECK NOT SO08

SOBFAIL

¢SKIP IF 0K

:TRAP & REPORT ERROR

SOBMOV1

+CODE TO GET SELF MOVED

SoBMOV?2

:FORWARD 1 WORD AND RUN AGAIN

SOBMOV3
SOBMOV4

SO8MOv...
THE

VALUE _OF

THE SOB CONSTANT CAN BE FOUND AT SYMBOLIC LOCATION ‘'SOBK''

(TYPICAL 25 DECIMAL).

THIS TEST IS NOT IN THE NORMAL SCRIPT OF EXECUTION BUT
MAY
BE
ADDED
VIA
THE APT
E-TABLE, REFERENCE SYMBOLIC LOCATIONS 'MKPAT', "‘MJPAT'’,

'$DDW2=5'".

FIELD SERVICE MODE COMMAND

RUNNING THIS PATTERN.

THE

NORMAL

NOTE

THIS

TEST

NOT

EXCEPT
UNDER
APT
INVOKED VIA
FIELD
(KAMIKAZE MODE).

NORMALLY

OR
ACT.
SERVICE

EXECUTED

IT MAY BE
COMMAND
13

METHOD

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

PAGE 89

SEQUENCE
PAGE 68

6.2.2.27

PATTERN 32

WRITE RECOVERY TEST

THIS TEST CAUSES A WRITE,

THE

READ, WRITE, READ,

...

TO OCCUR

MEMORY

1ST, 3RD, 5TH, ...READ IS BAD THE PROGRAM MAY BOM8 OR IF

THE 2ND, 4TH, 6TH,
OUT THE ERROR.

...

READ IS BAD THE PROGRAM WILL

GRACEFULLY

TYPE

WRITE RECOVERY TEST
THIS TEST DIFFERS FROM OTHER TESTS IN THAT IT CONSISTS
OF A SMALL TEST PROGRAM ACTUALLY RUNNING IN THE BANK UNDER TEST.
THE PROGRAM [S SELF MODIFYING AND MAY BE DIFFICULT TO DEBUG.
TO AID IN THE DEBUG, REMEMBER THAT THE BANK AND MARGIN ARE BEING
gifi:LéngéDTHIs WILL ALLOW THE USER TO AT LEAST SEE WHICH MEMORY
THE TEST CONSISTS OF 1/2 OF THE BANK STORED WITH 'MOV R2,-(P(C)‘’
AND THE OTHER 1/2 CONTAINING ‘*177667''. '*177667'' 1S THE COMPLEMENT

OF ''JMP (RO)'' INSTRUCTION.

R2 CONTAINS '‘COM =(R1;'* INSTRUCTION

?fiAgNézzKTO THE BANK AND R1

CONTAINS

THE HIGHEST

TEST ADDRESS

YOU UNDERSTAND THIS SO FAR THE REST 1S EASY.
THE TEST EXECUTION IS AS FOLLOWS:
1. THE "MGV R2,-(PC)"* INSTRUCTION EXECUTES STORING
THE CONTENTS OF R2 IN THE ADDRESS IT VACATED (DUE TO =(P().

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 BANK.
THEN THE ''JMP (RO)'' INSTRUCTION IS MET
?SD?E§$C¥§ED. RO CONTAINED THE RETURN ADDRESS BACK

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

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

mn 6
PAGE 90

SEQUENCE

3072
3073
3074
%8;2

6.2.2.28

3077
3078
3079
3080
gggg

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 EXECUTEL
FROM EVERY
LOCATION WITH
THE
EXCEPTION OF
THE BEGINNING AND END OF EACH TEST
AREA.

3083
gggé

THE BRANCH GOBBLE'S GENERAL FORMAT AFTER YOU ELIMINATE SETUP CODE
CODE TO MOVE THE PROGRAM ALONG IS AS FOLLOWS.

3086
3087
3088
3089
3090
3091
3092
3093
3094
3095
3096
3097
3098
3099
3100
%}8}

(¥,]

AN WOV~

b e

d v

D cod md

b e

WA LN AN NN AN AN NN N NN

3103

PAGE 69

BGTEST:
BRGOBB:

1$:
2$:

38:

63:

THIS

PATTERN 33

O
SEC
AD(CB
BM]
INCB
B8R
BVS
ERROR
CLV
INCB
BCS
BV(
8M]
ERROR

BRANCH GOBBLE TEST

;TEST WORD
BGTEST
1$
BGTEST+1
BRGOBB
2%

;INC LOW BYTE
.FND LOOP AFTER 128 TIMES
sINC HIGH BYTE
;LOOP 128 TIMES
sBRANCH IF V-BIT SET (SHOULD BE)
;ERROR TRAP
sCLEAR V-BIT
sINC HIGH BYTE ONE LAST TIME
sBRANCH IF C-BIT SET (SHOULD NOT BE)
sBRANCH IF Vv-BIT CLEAR (SHOULD NOT BE)
sBRANCH IF N-BIT SET (SHOULD BE)
sERROR TRAP

BGTEST
3s
3s
43

RE TURN

CODE

AND

ORIGIONALLY

CAME

FROM

EXERCISER
DZQKA-A.
THE
FIRST
SECTION OF THAT
DIAGNOSTIC
AND
EXERCISER EVER SINCE.

THE

PDP-11

FAMILY

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
A(T.
SERVICE

EXECUTED

IT MAY BE
COMMAND
13

CZMSDCO MS11~L/M DIAGNOSTIC

MACRO M1113

22-APR=-81

14:13

3118
3119
3120
%}%}

6.2.2.29

3123

RATIONALJZATION

3 2

N 6
PAGE N

SEQUENCE

PAGE 70

PATTERN 34

SOFT ERROR TEST

3126
3127
3128
3129

MOS CHIPS HAVE A FAILURE MODE IN WHICH THEY CAN RANDOMLY PICK OR DROP
BITS.
THIS 1S CAUSED BY ALPHA PARTICLES BOMBARDING THE CELL.
IF THE
CELL IS VERY SMALL (AND THEY ARE) THEN THE ELECTRONS DISPLACED BY
THE
ALFHA PARTICLE ARE SUFFICIENT TO CAUSE THE CELL TO CHANGE FROM A ONE

3132
3133
3134
3135
g}gg

THIS TEST IS CONTROLLED BY THE MAIN PROGRAM SO
THAT
IT
IS USED
TO
CREATE
A PATTERN OF
125252 AND
52525 ON ALTERNATE PASSES OF THE
PROGRAM.
THE CONFIGURATION TABLE IS USED TO FLAG BANKS THAT HAVE
THE
PATTERN
INVALIDATED BECAUSE
ANOTHER PATTERN WAS WRITTEN OVER THIS
BACKGROUND .

%}%3

THIS PATTERN IS NOTHING MORE THAN A CLEVER USE OF PATTERN O.

3140
3141
3142
3143

6.2.2.30

%}g?

3148

TO A ZERO OR FROM A ZERO TO A ONE.

PATTERN 35

WORST CASE PARITY TEST

3146
g}zg

FORCE WRITE WRONG PARITY IN EACH 1K WORD BLOCK OF THE
UNDER TEST.

3149
g}g?

READ WITH PARITY TRAPPING ENABLED, MAKING SURE
OCCURRS.

%}g%

MAKE SURE ERROR ADDRESS BITS ARE SET CORRECTLY.

2154
3155
3156
3157
3158
3159
3160
3161
3162
3163
3164
3165
3166

WRITE GOOD PARITY WITHOUT TRAPPING, AND
OCCURRS WHEN READ.

MAKE

NOTE

THIS TEST IS RUN FOR PARITY MEMORY WHICH
IS NOT CONTROLLED BY THE SAME (SR AS THE
PROGRAM.

THAT

SURE

MEMORY
A

TRAP

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

PAGE 92

SEQUENCE

3168
3169
3170
%};}

PAGE 71

6.2.2.31

%};2

THIS IS AN INSTANT RETURN ADDED TC PRESERVE THE SOF TWARE STRUCTURE.

3175
3176

THIS PATTERN REPLACES ANY REAL PATTERNS WHEN THE APT E-TABLt DOES
SPECIFY A PATTERN TO BE RUN.

PATTERN 999 NULL TEST

NOT

b
d
D e
d
d e
D
) o
d
—d wd e

D 0 00 00 00 00 00 00 00 00 OO0 ~J~
= OO0 NN
= O VOO

CZMSDCO MS11-L/M DIAGNOSTIC

3192

MACRO M1113

c.7
PAGE 93

22-APR-81 14:13

SEQUENCE

PAGE 72
7.0

PROGRAM FEATURES

7.1

FAST DATA ACCESS RATES

ONE OF THE
MAIN
AREAS
OF
CONCERN
IN
TESTING MEMORY
[N
SYSTEMS
ENVIRONMENTS
IS SPEED.
ONE OF THE PRIME REASONS THAT SYSTEM PROGRAMS
LIKE
RSTS,IAS AND
MUMPS
CAN
(RASH
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
g§¥iCSATEECO"ES BUS MASTER AND DOES SEVERAL MEMORY TRANSFERS AT MEMORY

ON THE
OTHER_HAND
MOST
DIAGNOSTICS
WHEN WRITING READING AND/OR
CHECKING
PATTERNS
SPEND MOST OF THEIR TIME FETCHING INSTRUCTIONS 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

L:sngéng¥AEESIGN CRITERIA OF

7.1.1

SPEED.

TO THIS END THE FOLLOWING STEPS

FAST CITY

UTILIZATION OF MEMORY MANAGEMENT REGISTERS
UNIBUS,

BIPOLAR

MEMORY.

NON

MEMORY

BUS,

NON

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
RESTRICTIONS THE UIPDR'S, UDPDR'S, KDPDR'S, AND SDPDR'S.
THE

PROGRAM

RUNS

KERNEL

MODE

AND

PATTERNS

ARE

EXECUTED

SUPERVISOR MODE FOR MAPPING PURPOSES.
ALL CORE PATTERNS AND SOME MOS
PATTERNS ARE
SUBROUTINES
THAT
ARE
MOVED
TO
THIS
BIPOLAR
REGION

REFERRED TO IN THE PROGRAM AS FAST CITY,

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
ARE
EXECUTED
IN MEMORY,
USING USER MODE
(REFERENCE SECTION 7.5).

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

PAGE 94

SEQUENCE

PAGE 73
7.1.2

SOB'S

UTILIZATION OF THE
FULL_
PDP-11
ALGGRITHMS (PRINCIPALLY THE S08).

7.1.3
CACHE
CACHE

7.2

INSTRUCTION

SET

SPEED

PATTERN

PASS

TIMES.

CACHE
IS USED BETWEEN PATTERN TESTS TO DECREASE

CAN BE DEFEATED BY THE OPERATOR

(REFERENCE

PROGRAM

SECTION 2.4.3.1).

BANK ZERO TESTING

BANK ZERO HAS BEEN TRADITIONALLY NEGLECTED BY MEMORY
THE FOLLOWING REASON.

DIAGNOSTICS

FOR

THE VECTOR SPACE EXISTS THERE AND
ALL
TRAPS
MUST
NOT
ACCESS
TEST
PATTERN
DATA.
IF THE AREA IS TESTED THE DIAGNOSTIC MUST NOT USE ANY
TRAPS, AND IT IS AGAINST THE RULES FOR POWER TO FAIL.

SYSTEMS WITH MEMORY MANAGEMENT CAN OVERCOME THIS BECAUSE 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 DIAGNOSTIC IS NOT APT COMPATIBLE
MODE BECAUSE APT ACCESSES PHYSICAL MEMORY LOCATIONS.

IN THIS

THE PDP-11/44 CAN OVER COME THIS BECAUSE THE UNIBUS MAP CAN FOOL APT.
BECAUSE OF THE PREVIOUS ARGUMENTS THIS PROGRAM DOES
NOT
RELOCATE
IN
IHE__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
TO
AS
RELOCATES).
THIS
ENABLES
THE
COMPLETE TESTING OF BANK ZERO OR ANY OTHER PROGRAM 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 PROGRAM WILL RELOCATE
ONLY
IN
FIRST
PASS
UNDER APT:
AFTER THIS,

THE
THE

f;noem\n WILL REMAIN FIXED IN BANKS O AND

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

PAGE 95

SEQUENCE
PAGE 74

7.3

MEMORY CONFIGURATION MAP

THIS MAP IS PRINTED OUT

IMMEDIATELY AFTER SIZING THE MEMORY UNLESS SW6

IS SET (REFEKENCE SECTION 2.4.1).

TIME

IN FIELD SERVICE MODE

EXAMPLE:

ERRORS

IT CAN ALSO BE PRINTED AT ANY LATER

(REFERENCE SECTION 2.4.4.8.7)

MEMORY CONFIGURATION MAP
16K BANKS
2
3
4
5

1
6
4
012345670123456701234567012345670123656701234567012345670123

CPU MAP 11111111111111111111111111111111
INTRLV
-~
--~3333333333333333

MEMTYPE LLLLLLLLMMMMMMMMMMMMMMMMMMMMMMMM

CSR

00000000111111112222222222222222

ERRORS

456701234567012345670123456701234567012345670123456701234567

PROTECT PP

CPU MAP
INTRLV

MEMTYPE
CSR
PROTECT

DISPLAYED ARE BANKS 0-73 OCTAL
SWITCH

WAS SET

BE SHOWN.

(REFERENCE

(2 MEG WORDS).

SECTION 2.4.1)

IF THIS WAS AN 18-BIT PDP-11

WOULD BE PRINTED.
THE FIELDS:

THE

FA7

TERMINAL

THEN ALL BANKS (0-167) “OULD

(EG - 11/34), ONLY

BANKS

0-7

ERRORS:
THE SIZING ROUTINE COULD NOT WRITE ZEROS AND ONES
10 & 11, HENCE THEY ARE MARKED AS BAD WITH X'S.

BANKS

CPU MAP:
THE CPU WAS ABLE

TO ACCESS BANKS 0-37 (512 K WORDS).

INTRLYV:

THERE IS INTERLEAVING ON BANKS 20-37, WITH
CSR
2
(172104)
CONTROLLING
THE
ADDRESS
BIT 1 NON-ASSERTED ADDRESSES, AND

CSR 3

(172106)

ADDRESS

BIT

BANKS 0-7 ARE MEMORY TYPE L (MS-11L), AND

BANKS

ADDRESSES.

CONTROLLING

THE

ASSERTED

ERRORS:
MEMTYPE:

10-37

ARE

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

F
7
PAGE 95-1

SEQUENCE

MEMORY
TYPE
M
(MS11-M);
WHILE BANKS 40-167 DO NOT EXIST.
MEMORY TYPE K WOULD INDICATE MF11S-K, MEMORY
TYPE
P WOULD
INDICATE
UNIBUS
PARITY,
AND
MEMORY TYPE B WOULD INDICATE

11/45-TYPE BIPOLAR MEMORY.

CSR:

BANKS 0=7 ARE ASSIGNED TO CSR 172100, 10-17 TO CSR
AND 20-37 TO INTERLEAVED CSR'S 172104 AND 172106.

172102,

PROTECT:

BANKS 0 AND 1 ARE PROTECTED BECAUSE THEY ARE PROGRAM SPACE.
BANK
0 AND 1 CAN ALSO BE PROTECTED BECAUSE THEY ARE .N THE
BOTTOM 16K OF AN MS11-M CSR.
THE PROTECTION IS HIER’- CHICAL

AND
PROGRAM
SPACE
OVERSHADOWS MS11-M PROTECTION.
BANKS 0
AND 1 WILL NOT BE TESTED UNTIL THE
PROGRAM RELOCATES.
[F

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

G 7
PAGE 96

22-APR-81 14:13

SEQUENCE

PAGE 75
ANY BANK IS PROTECTED BY MS11-M (OR MF11S-K) AND NOT BECAUSE
IT IS IN PROGRAM SPACE IT WILL HAVE AN ‘'I'" TYPED
[N THIS
ROW.
THIS
IS TO POINT OUT WHERE THE PROTECTED BANKS START
FOR EACH ECC CSR.
NOTE THE 'P'' AT BANK 30;
THIS POINTS OUT

THE

''SHADOW''

PROTECTION

WHICH

OCCURRS

WHEN

MEMORIES ARE INTERLEAVED.
THEREFORE, BANK 30
TESTED UNTIL THE PROGRAM HAS RELOCATED.

7.4

TWO

WILL

EVERYTHING YOU'VE ALWAYS WANTED TO KNOW ABOUT SUPERMAC

SUPER-MAC

PROGRAMS

IS A

SET

TO BE WRITTEN

STRUCTURED

PROGRAMMING

IN A HIGH LEVEL,

MACROS

MS11-M

NOT

...

THAT

ALLOWS

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
ARE
ALLOWED.
SINGLE-LINE STATEMENTS SHOULD BE AS SHORT AND SIMPLE AS
POSSIBLE.
COMMENTS MAY ALSO BE INCLUDED ON A SOURCE
LINE.
ALL
THE
GENERAL
RULES,
CONDITIONS,
ETC.,
THAT
GOVERN MACRO-11 ALSO GOVERN
SUPER-MAC.
SPACING ON A SOURCE LNE IS VERY IMPORTANT.
THE
ELEMENTS
SHOULD
BE SEPARATED BY A COMMA OR A SPACE.
TABS SHOULD NEVER BE USED
FOR

SPACING.

FOR

DIFFERENT THAN A + B.

EXAMPLE:

THE

EXPRESSION

A+B

INTERPRETED

ALL THE CONDITIONAL STATEMENTS CAN BE WRITTEN AS MULTIPLE-LINE
NESTED
BLOCKS.
EACH LEVEL OF NESTING WITHIN A BLOCK MUST BE TERMINATED WITH
?uokggggégTED END STATEMENT.
EACH LEVEL OF NESTING SHOULD BE INDENTED

USER WRITTEN MACROS OR ASSEMBLY LANGUAGE INSTRUCTIONS MAY BE
INCLUDED
IN A
PROGRAM IF DESIRED.
AS A DEBUGGING AID, IF THE SYMBOL LSTSS IS
DEFINED, IT WILL CAUSE GENERATED CODE AND LABELS TO BE
LISTED.
ALL
PROGRAMS MUST BEGIN WITH THE MACRO CALL SMACIT.
THIS CALL INITIALIZES
?ngs;gsCfiAcALL LEGAL PDP=-11 SOURCE AND DESTINATION OPERANDS ARE LEGAL

CZMSDCO MS11-L/M DIAGNOSTIC

3403
3404
3405
3406
3407
3408
3409
3410
E23)
3412
3413

34614

3415
3416
3417
3418
3419
3420
3421
3422
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
50
3451
3452
3453
3454
3455
3456
3457
3458
3459

MACRO M1113

22-APR-81

14:13

PAGE 97

SEQUENCE

PAGE 76

7.4.1

SAMPLE SOURCE FILE .ENABL ABS
.ENABL AMA
.MCALL .SUPER
.SUPER
JLSTSS =0

BITS_=%0
0
8
0
C
0
D
0
3
0
F
0
G
0
H
0
I
0
J
0
.PAGE
sLET EXAMPLES
LET RO :_= A
LETB :_.=C+D
LETE :_=F +
1
LET G :=H +
2
LET J :T=J + O
LET A :B_=8
A

;1F EXAMPLES
IF A IS
MoV
END ;OF
IF 8 IS
MOV
END ;OF
IF A EQ
IF
ALT
Mov
ELSE
MOV

TRUE
23.D
IF A
FALSE
34,E
IF B
B THEN LET C
B

:_= D

C,D

E,D

END ;OF IF A

IF A EQ B AND C NE D
MOV
F,G
END ;OF IF A
IF
AEQBOR C NED
MOV
F,G
END ;OF IF A
IFB A EQ B AND C EQ
1
MOV
H,J
ELSE
MOV
E,J
END ;OF [FB A
IFB A EQ B ANDB C EQ
1
MOV
H,J
ELSE
MOV
E,J
END ;OF IfB A

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE &7-1

3460
3461
3462

IF RESULT IS EQ
MOV
A.B
END ;OF IF RESULT

3464
3465

Mov _ 8.C
END ;OF IF BITS

3463

34666

3467
3468
3469
3470
3471
3472
3473
3474
3475
3476

IF°

BITS SET.IN A

BITS OFF.IN A

Mov _ C.D
END ;OF IF
BITS
;ON.ERROR 1S LIKE AN IF STATEMENT ON THE C-BIT
;ON.ERROR EXAMPLES
ON.ERROR
MOV
A.B
ELSE
Mov
(C.B
END ;OF ON.ERROR
ON.NOERROR

SEQUENCE

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

PAGE 98

SEQUENCE

34,78

PAGE 77

3479
3480
3481
3482

Mmov
ELSE

3484

END ;OF ON.NOERROR

34,83
3485

MOV

(.B

A.B

ON.ERROR THEN LET A :B_= B

3486
3487

;FOR EXAMPLES
FOR I :.=

3490

FOR RO : =

34,88
34,89

3491
3492
3493
3494

3495
3496
3497
3498
3499
3500
3501
3502

3503
3504
3505
3506
3507
3508
3509
3510
3511
3512
3513
3514
3515
3516
3517
3518
3519
3520
3521

-5 710

INC
"A
END ;OF FOR I

0 TO
140 BY &
DEC
K(RO)
END :OF FOR RO
FOR I :_=
133 DOWNTO 3 BY
ADD
TA.B

END ;OF FOR 1
:BEGIN EXAMPLES
BEGIN ALPHA
FORRO : = 0 TO 167
MOVB
A(RO),B
IF B LT
O THEN LEAVE ALPHA
END ;OF FOR RO
FOR RO : = 400 TO 567
IF B8 GE O THEN LEAVE ALPHA
END ;OF FOR RO
END ALPHA
;SRETURN EXAMPLES
$RE TURN
SRETURN ERRUR
$RETURN NOERROR
;CASE EXAMPLES
MOV
A,RO
CASE RO
A
B8
C
D
E
F
END ;OF CASE RO
.END

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

K 7
PAGE 99

SEQUENCE

3523
3526
%ggg
3529
3530
3531
3532
3533
3534

3535
3536
3537
3538
3539
3540
3541
3542
3543
3544
3545

PAGE 78
7.4.2
.MAIN.

SAMPLE LISTING FILE (WITH NO EXPANDED MACROS) - MACRO M1111
Q1-APR=79 16:41
PAGE 2
1 000000
2

3
4 000000
S

6
7 000000
8 000002

9
10
11
12
13
14
15
16

000004
000006
000010
000012
000014
000016
000020
000022

000040
000000
000000
000000
000000
000600
000000
000000
000000
000000
000000

.ENABL
.ENABL
.MCALL
. SUPER
:LSTSS

A:
B:
C:
D:
E:
F:
G:
H:
l:
J:

ABS
AMA
.SUPER

_=0
BITS_=%0
0
0
0
0
0
0
0
0
0
0

CZMSDCO MS11-L/M DIAGNOSTIC

3547
3548
3549
3550

MACRO M1113

22-APR-81

JMAIN.

MACRO M1111

18
19
20
21
22
23
24
25
26
27
28
29

3567
3568
3569
3570
3571
3572
3573

32
33
3%
35
36
37
38

3575
3576
3577
3578
3579
3580
3581
3582
3583
3584
3585
3586
3587
3588
3589
3590
3591
3592
3593
3594
3595
3506
3597
3598
3599
3600
3601
3602
3603

40 000230
41 000230
42 000250
43 000256
4% 000256
45 000276
46 000304
47 000306
48 000314
49 000314
50 000334
51 000342
52 000344
53 000352
54 000352
55 000354
56 000362
57 000362
58 000372
59 000400
60 000400
61 000410
62 000416
63
64
65 000416
66 000420
67 000426
68 000430

3574,

PAGE 100

SEQUENCE

PAGE 79

3552
3553
3554
3555
3554
3557
3558
3559
3560
3561
3562
3563
3564
3565
3566

14:13

30
31

01-APR=79 16:41

000024

000030
000044
000056
000072
000100
000106
000114
000122
000122
000130
000136
000136
000154
000164
000172
000174
000202
000202

012737

000023

000006

012737

000034

000010

013737

000004

000006

013737

000010

000006

39 000222 013737 000012 000014
013737

000012

000014

013737

000016

000022

013737

000010

000022

013737

000016

000022

013737

000010

000022

013737

000000

000062

013737

000002

000004

013737

000004

000006

013737

000000

000002

013737

000004

000002

PAGE 3

;LET EXAMPLES
LET RO :_= A
LETB:3C+0D
LETE :Z= F +
1
LET G :o= H + 2
LET J :7= J + 01
LET A :B_= 8
:IF EXAMPLES
IF A IS TRUE
MOV
23.D
END ;OF IF A
IF 8IS FALSE

MOV
34,E
END ;OF IF B
IF A"EQ B THEN LET €
IFALTB
MOV
C.D
ELSE
MOV
E,D
END ;OF IF A
IF A"EQ B AND C NE D

MOV

F,G

:_= D

END :OF IF A
IF
A"EQ B OR C NE D
MOV
F.G
END ;OF If A
IFB A EQ B AND C EQ
1
MOV
H,J
ELSE
MOV
E,J
END ;OF 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 ;OF If
BITS
IF_
BITS OFF.IN A
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
ELSE
Mmov
(.8

CZMSDCO MS11-L/M DIAGNOSTIC
3604
3605
3606
3607
3608
3609

MACRO M1113

22-APR-81 14:13
69
70
71
72
73
7%

000436
000436
000440
000446
000450
000456

n 7
PAGE 100-1

SEQUENCE

013737

000004

000002

013737

000000

000002

END ;OF ON.ERROR
ON.NOERROR
MOV
(.8
ELSE
MOV
A,B
END ;OF GN.NOERROR

CZMSDCO MS11-L/M DIAGNOSTIC

3611
3612
3613
%g}g
3616
3617

3618
3619
3620
3621
3622
3623
3624
3625
3626
3627
3628
3629
3630
3631
3632
3633
3634
3635
3636

3637

3638

3639
3640

3641
3642

3643
2644
3645
3646
3647
3648
3649
3650
3651
3652

3653

MACRO M1113

22-APR-81

14:13

PAGE 101

SEQUENCE

PAGE 80
LMAIN.

MACRO M1111

(01-APR=-79 16:41

75 000456

76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94

000466
000474
000500
000514
000516
000522
000534
000542
000550

000566
000566
000570
000576
000604
000614
000620
000626
95 000636
96
97 000636
98 000640

99 000644
100

101
102
103
104
105
106
107
108

000650
000654
000664
000666
000670
000672
000674
000676

109 000700
110

PAGE 3-1

ON.ERROR THEN LET A :B_= B

005237

000000

005360

000000

063737

000000

000002

116037

000000

000002

;FOR EXAMPLES
FOR ] :_=
=5T0 23
INC
A
END :OF FOR I
FORRO : = 0 TO
140 BY ¢4
DEC
X(RO)
END ;OF FOR RO
FOR I :_=
133 DOWNIO 3 BY
2
ADD
A.B
END ;OF FOR I
;BEGIN EXAMPLES
BEGIN ALPHA
FORRO: = 0 TO
167
MOVB
A(RO).B
IF B LT
O THEN LEAVE ALPHA
END :OF FOR RO
FOR RO
: = 400 TO
567
IF B GE O THEN LEAVE ALPHA
END ;OF FOR RO

END ALPHA

;SRETURN EXAMPLES

SRETURN
SRETURN ERROR

013700
000000
000002
000004
000006
000010
000012

000000

SRETURN NOERROR
;CASE EXAMPLES

MOV
A.RO
CASE RO
A
8
¢
D
(3
F

END ;0F

000001

.END

CASE RO

CZMSDCO MST11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

PAGE 102

SEQUENCE

3655

338

3658
3659
3660
3661
3662
3663
3664
3665
3666
3667
3668
3669
3670
3671
3672
3673
3674
3675
2676
3677

PAGE 81

7.4.3 SAMPLE LISTING FILE (WITH EXPANDED MACROS) - .MAIN.
MACRO M1111
O01-APR-79 16:10 PAGE 2
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

000000
000000
000000
000002
000004
000006
000010
000012
000014
000016
000020
000022

000000
000040
000000
000000
000000
000000
000000
0000
000000
000000
000000
000000

A:
8:
C:
D:
E:
F:
G:
H:
I:
J:

.ENABL ABS
.ENABL AMA
<MCALL .SUPER
. SUPER
LST$S_=0
BITS5_=40
0
0
0
0
0
0
0
0
0
0

)

CZMSDCO MS11-L/M DIAGNOSTIC

3679
3680
3681
%2%%

MACRO M1113

22-APR-81

LMAIN.

MACRO M1111

18
19 000024
000024
20 000030
000030
000036

3692
3693
3694
3695

000044
000052
22 000056
000056

3697
3698

23 000072
000072

3700
3701
3702
3703
3704
3705
3706
3707
3708
3709
3710
3711
3712
3713
3714
3715

000100

3696
3699

3716

PAGE 103

SEQUENCE

PAGE 82

3684
3685
3686
3687
3688
3689
2490

3691

14:13

21 000044

000064

24 000100

25
26 000106
000106
000112

27 000114
28 000122
000122
29 000122
000122
000126
30 000130
31 000136
000136
32 000136
000136

000144

01-APR-79 16:10

000000

013737
063737

000004
000006

000002
000002

013737
005237

000012
000010

000019

013737

000016

000002

000014

MOV
INC
LET
MOV

062737

000001

000022

LET J : = J +
ADD 013U

113737

000002

000000

005737
001403
012737

000000

005737
007003
012737

000002
000034

000010

023737

000000

000002

013737

000006

000004

023737

000000

000002

000004

000006

00001C

000006

062737

001003

000023

000006

000146
000154
33 000154
000154

3722
3723
3724
3725
3726
3727
3728
3729
3730

34 000164
35 000172
000172
000174
36 000174
37 000202
000202
38 000202
000202

013737

023737

000000

000002

3732

000212

023737

000004

000006

39 000222
40 000230

013737

000012

000014

3731

3733
3734
3735

000162

000210

000220

sLET EXAMPLES
LET RO : = A
MOV A, RO
LET B :_=C + D
MOV C.8
ADD D.B

013700

3717
3718
3719
3720

3721

PAGE 3

002004

000403
013737

LET E':_= F +

ADD

001403

2.6

1
2
01

LET A :8.
= B

MOVB B,A
;IF EXAMPLES
IF A IS TRUE
IST A
BEQ LO
MOV
23.D
END ;OF IF A
LO:
IF B 1S FALSE
IST 8
BNE L1
MOV
34,
END :OF IF B
L1:
IF A EQ B THEN LET C
(MP A.B

BNE L2

L2:

MOV O,
C
IFALTB
(MP A.B

BGE LS

L3:
Lb:

001007

FE
E
6 : = H +
H,G

MOV
ELSE
BR L4

C.D

MOV
E,D
END ;OF IF A
IF A EQ B AND C NE D
(MP A.B

BNE LS

CMP C.D

BEQ LS

MOV
F.G
END ;OF IF A

:_=D

CZMSDCO MS11-L/M DIAGNOSTIC
3736
3737
3738
3739
3740

3741

MACRO M1113

22-APR-81
000230
41 000230
000230
000236
000240

000246

14:13

D 8
PAGE 103-1

SEQUENCE
LS:

023737
001404
023737

001403

000000

000002

000004

000006

IF
AEQBOR C NE D
CMP A.B
BEQ L6
CMP C.D

BEQ L/

CZMSDCO MS11-L/M DIAGNOSTIC

3743
3744
3745
ggzg

3748
3749
37¢
3751
3752
3753

3754

MACRO M1113

22-APR-81

LMAIN.

000256
000264

45
46
47
48
49

SEQUENCE

000266
000274
000276
000304
000304
000306
000306
000314
000314
000314
000314

O01-APR-79 16:10

013737

000012

000014

MP C, 1
BNE L10
MOV
H.J
ELSE
BR L11

000004

000001

000016

000022

00001C

000022

000403
013737

000004

000001

50 000334
51 000342

013737

000016

000022

52
53

013737

000010

000022

001010

000332

001004

3790
3791
g;gg

000400
000406
61 0006410

3794
3795
3796
3797
3798
3799

62 000416
000416
63
64
65 000416
000416

55
56
57
58
59

000403

L10:

000000

L12:

000002

000040

000000

000002

000004
L15:

032737
001003
013737

103004

000040

000000

000004

000006

IFB A EQ B ANDB C EQ
CMPB A8

cMP8 C,

MOV
ELSE
BR L13

H.J

BNE L12

L14:
032737
001403
013737

MOV
E.J
END ;OF IFB A

BNE L12

L13:

001003
013737

BNE L10

L11:

123727

IFB A EQ B AND C EQ

023727
001004
013737

001010

000322

000342
000344
000344
000352
000352
000352
000352
000354
000362
000362
000362
000362
000370
000372
000400
000400
000400

MOV
F.G
END ;OF IF A

CMPB A,B

000002

3772
3773
3774
3775
3776
3777
3778
3779
3780
3781
3782
3783
3784
3785
3786
3787
§;gg

L6:

123737 000000 000002

000000

000326

PAGE 3-1

L7:

123737

3768
3770
3771

MACRO M1111

000250
42 000250
43 000256
000256
44 000256

3767
3769

PAGE 104

PAGE 83

3755

3756
3757
3758
3759
3760
3761
3762
3763
3764
3765
3766

14:13

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
BIT BITS.A
BEQ L15
MOV
B.C
END ;OF IF
BITS

BITS OFF.IN A

BIT BITS,.A
BNE L16
MOV
C.D
END :OF IF BITS
L16:
;ON.ERROR IS LIKE AN IF STATEMENT ON THE C-BIT
SON.ERROR EXAMPLES
ON. ERROR
BCC L17

MACRO M1113

22-APR-81

14:13

66 000420
67 000426
000426
00430

013737

68 000430

013737

CZMSDCO MS11-L/M DIAGNOSTIC

69 000436
000436
70 000436

F
8
PAGE 104-1

000000

SEQUENCE

000002

000403

MOV

ELSE

L17:

000004

000002

BR L20
Mov

L20:

A.B

(.8

END ;OF ON.ERROR
ON.NOERROR

3824

MACRO M1113

22-APR-81

6 8
PAGE 105

14:13

SEQUENCE
PAGE 84

.MAIN.

14!

MACRO M1111

000436

01-APR-79 16:10

103404
013737

000004

73
74

013737

000000

000002

000000

012737

177773

000020

005237

000000

005237
023727
003770

000020
000020

000466

77 000466
000466

000474

78 000474
79 000500

000500
000504
000512
000514

MOV

ELSE

L21:

83
84
85

000566

062700
020027
003771

000004
000140

012737

000133

000020

063737

000000

000002

162737
023727
002366

000002
000020

000020
000003

MOV
A,B
END ;OF ON.NOERROR

ON.ERROR THEN LET A

:B_= B

MOVB B,A
FOR

80:

B81:

000000

BR L22

L23:
sFOR EXAMPLES

EO:

005360

c.8

BCC L23

000023

005000

E1:

B2:

mov

-5, 1

-5 10

A
INC
END ;OF FOR I
INC 1
CMP |

8LE B0

FORRO :_=
CLR RO

0 TO

140 BY

DEC__
A(RO)
END ;OF FOR RO
ADD 4, RO
CMP RO, 140
BLE B1
FOR |

mMov

133

133 DOWNTO

3 BY

A8
ADD
END ;OF F OR R 1

SUB

BGE aé
|
P

E2:
;JBEGIN EXAMPLES

86
87 000566

BCS L21

L22:

PAGE 3-2

000002

000403

©o 0o
N —

2%}
W

[ S Putr Puir Puir Duir Yot

= OO OO NOMNNE
NN =

- Putr Guarguatrd

CZMSDCO MS11-L/M DIAGNOSTIC

B83:
005000
116037

000000

005737
002415

000002

Bé4:

BEGIN ALPHA

FORRO: _ =
CLR RO

MOVB

IsT éF B LT

0 T0

167

A(RO) .8

O THEN LEAVE ALPHA

BLT E3
END ;OF FOR RO

CZMSDCO MS11-L/M DIAGNOSTIC
3868
3869
3870
3871
3872
3873

MACRO M1113

22-APR-81 14:13
000604
000606
000612
000614
92 000614
000614

PAGE 105-1

005200
020027
003766

000167

012700

000400

SEQUENCE

Eé4:

INC RO
CMP RO, 167
BLE B4
FOR RO : =

MOV

400,RD

400 TO

S67

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113 22-APR-81 14:13 PAGE %06

SEQUENCE

3875
3876

PAGE 85
MACRO M1111

MAIN.

000620
0

000002

005200
020027
003771

000567

IF 8 GE

TST B

ES:
E3:

O THEN LEAVE ALPHA

BGE E3
END .OF FOR RO
INC RO
CMP RO, 567
BLE B5
END ALPHA

JSRETURN EXAMPLES

000241
000207

000650

013700

NN=O

b —

005737
002004

000636
98 000640
000640
000642
000644
000644
000646

[=l=l=]

PAGE 3-3

85:

000636

96
97 000636

—

01-APR=79 16:10

SRETURN

000207

RTS PC

000261
000207

RTS PC

$RETURN ERROR
SEC

$RETURN NOERROR
CLC

RTS PC

000000

s CASE EXAMPLES
MOV

- O

JSR PC,L2¢4
mMOoOAD>»

b
b
e

000700

jelelelelelels]
OO~

b
b
—

——

010046

000010
000012

000702
006704

062616
013646
004736
000001

L24:

END ;OF CASE RO
ADD (SP)+ ,3SP
MOV @(SP)+,-(SP)
JSR PC,a(SP)+

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81

14:13

J 8
PAGE 107

SEQUENCE
PAGE 86

7.5
7.5.1

MEMORY MANAGEMENT MAPPING
MEMORY MANAGEMENT MAPPING FOR THE 11/44 -

PAR

SUPERVISOR

KERNEL

USER

PROGRAM

DST BK/FST MEM

2
3

PROGRAM
TEST AREA

PROGRAM
PROGRAM

SRC BK/FST MEM
SRC BK/FST MEM

TEST AREA
TEST AREA

PROGRAM
MAP TO CSR'S

DST BK/FST MEM
DST BK/FST MEM

S
6

7.5.2

PROGRAM

TEST AREA

PERIF PAGE

SUPERVISOR

PROGRAM

2
3
4
5
6

PROGRAM
TEST AREA
TEST AREA
TEST AREA
TEST AREA

7.5.3
PAR

PROGRAM

PERIF PAGE

DST BK/FST MEM

PROGRAM

PERIF PAGE

PROGRAM

DST BK

PROGRAM
PROGRAM
PROGRAM
PROGRAM
MAP TO CSR'S

SRC
SRC
DST
DST
DST

PROGRAM

PERIF PAGE

SRC BK

PROGRAM

USER

PROGRAM/DST BK

PROGRAM/SR(C BK

PROGRAM

TEST AREA/DST BK

6
7

MAP TO CSR'S
PERIF PAGE

PROGRAM
PROGRAM
PROGRAM

PROGRAM/SRC BK
TEST AREA/SRC BK
TEST AREA/DST BK

TEST AREA/DST BK
PERIF PAGE/DST BK

8K
BK
BK
BK
BK

DST BK

MEMORY MANAGEMENT MAPPING FOR UNIBUS-11'S W/0 SUPERVISOR MODE
KERNEL

(EG 11/45) -

USER

PROGRAM

DST BK/FST MEM

KERNEL

2
3

SRC BK/FST MEM

MEMORY MANAGEMENT MAPPING FOR UNIBUS-11'S WITH SUPERVISOR MODE

PAR

PROGRAM

(EG 11/34) -

100

MACRO M1113

22-APR-81

14:13

K 8
PAGE 108

SEQUENCE

3968 000000
3969
3970
3971
3972
3973
3974
3975
3976
3977

.ENABL ABS
ENABL AMA
.DSABL GBL
sNOTE:
CZMSDC.SML IS THE SUPER.MAC SOURCE AND IS RELEASED WITH
:THIS PROGRAM.
ALL THESE .MCALL STATEMENTS REFERENCE THAT FILE.
«MCALL
SMACIT,..PUSH,..POP,..TAG,..BRAN,
.EMIT, .EMITN, .EMITL, .EMITR
.MCALL
.IFOPR,.1S,.GENBR,.OPADD,.OPSUB,CLEAR,SET,CLEARB,SETB
.MCALL RNE,REQ,RLT,RGE,RGT
,RLE ,RPL,RMI ,RH] RLOS,RHIS RLO,RCS,RCC
.MCALL
IF,.OR,.IFARI,.LEAVE,.GOTO,OR,
AND, T:HEN ELSE ,WHILE, CASE
.MCALL
FOR,TO,DOWNTO,REPEAT
,UNTIL ,THRU,END ,BEGIN

3979
%gg?

MCALL
-MCALL

.SIMPLE,.ARITH,ORB,ANDB,IFB,
UNTILB WHILEB,ON.ERROR,ON.NOERROR
S$CALL,SRETURN

NLIST
LIST
.NLIST
;LSTSS=
$SWR=
$TN=
SMACIT

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

3978

3982
3983
3984
3985
3986
3987
3988 000000

-MCALL

163000
000001

101

SSEND,LEAVE,JUMPTO,GOTO,PUSH,POP,
LET

;1 WANT FAT PAPER!
sLIST MACRO CALLS, SYMBOL TABLE
;DON'T LIST MACRO DEFS & CONDITIONALS & EXPANSIONS
sDEFINED TO LIST SUPERMAC EXPANSIONS
sUSE THESE SYSMAC SWITCHES
sFIRS) TEST NUMBER TO ONE(1)

h
]

CZMSDCO MS11-L/M DIAGNOSTIS

CZMSDCO MS11-L/M DIAGNOSTIC

DEFINE

TRAPS

MACRO M1113

22-APR-81 14:13

PAGE 110

SEQUENCE

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

*«TRAP DEF INITIONS

*HERE IS HOW TRAPS WORK IN THIS PROGRAM
:ALL TRAPS EXECUTE A "‘TRAP'* INSTRUCTION WHICH TAKES THE PROGRAM
;TO SYMBOLIC LOCATION ''STRAP"

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

;AND INDEXES INTO A TABLE AT LOCATION ''STRPAD'‘ WHICH SENDS THE PROGRAM TO
sTHE SPECIFIC ROUTINE TO HANDLE THAT SPECIFIC TRAPS TASK.

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

;ENTER KERNEL MODE

ADD A DOLLAR SIGN TO THE SYMBOLIC NAME AND CHECK THE CRF
IN THIS CASE_THE CRF HAS SKERNE LISTED AS 032546

FOR SOMETHING CLOSE

AT LOCATION 32546 YOU FIND THE ROUTINE $KERNEL

NOTE THAT CRF SYMBOLS ARE TRUCNATED TO 6 CHARACTERS
SYMBOLIC NAMES GREATER THAT 6 CHARACTERS ARE USED SO I
REMEMBER WHAT THEY MEAN!

4022
4023

104401
104402

104407

s:GET SOFT-SWR SETTING

104411
104412
104413
104414

soTTY TYPEIN CHARACTER ROUTINE
s:TTY TYPEIN STRING ROUTINE
:READ AN OCTAL NUMBER FROM TTY
:;READ A DECIMAL NUMBER FROM TTY

GTSWR=

ROCHR=
RDLIN=
RDOCT=
RDDEC=

SAVREG= 104415
RESREG= 104416

104417

KERNEL= 104417

CKSWR=

104410

OCTAL NUMBER (WITH LEADING ZEROS)
OCTAL NUMBER (NO LEADING ZEROS)
OCTAL NUMBER (AS PER LAST CALL)
DECIMAL NUMBER (WITH SIGN)
BINARY (ASCII) NUMBER

;. TEST FOR CHANGE IN SOFT-SWR

— b

—b wd b b

::TYPE
¢ TYPE
:;TYPE
;. TYPE
s TYPE

104402
104403
104404
1064405
104406

ALL GOOD TRAP ROUTINES RETURN VIA AN 'RTI'' INSTRUCTION
104401
¢ TTY TYPEOUT ROUTINE

BB
W O
L

TYPEIT=
TYPOC=
TYPOS=
:TYPON=
TYPDS=
sTYPBN=

B
PR
A

OO0
O000

e
N

104405

4026

00O

104403

4024

: :SAVE RO-R5 ROUTINE
; cRESTORE RO-R5 ROUTINE

;ENTER KERNEL MODE

4044

1046422

ENERGIZE=104420
DEENERGIZE=104421
KMAP=
104422

:TURN ON MEMORY MANAGEMENT & TRAPS
s TURN OFF MEMORY MANAGEMENT & TRAPS
:MAP KERNEL 1 TO 1

4046
4047

104423
1046424

4040

CACHON= 104423

CACHOFF=10442¢4

CAN

:TURN ON CACHE

sTURN OFF CACHE

102

CZMSDCO MS11-L/M DIAGNOSTIC
TRAPS

22-APR-81

14:13

n 8
PAGE 110-1

SEQUENCE

104425
104426

:LCAD CORRECT CSR
sREAD CORRECT CSR

104427
104430
104431
106432
104433
104434
104435
104436
104437
104440
104441
1064442
104443

s PROGRAM DETECTED
;PROGRAM DETECTED
; PROGRAM DETECTED
;PROGRAM DETECTED

:PROGRAM DETECTED

;PROGRAM DETECTED
;PROGRAM DETECTED
;PROGRAM DETECTED
: PROGRAM DETECTED

;sPROGRAM DETECTED
;PROGRAM DETECTED

PERR16=

;PROGRAM DETECTED
;PROGRAM DETECTED
;PROGRAM DETECTED
;PROGRAM DETECTED
:PROGRAM DETECTED

104444

; PROGRAM DETECTED

104456
104457
104460
104461
104462
104463
104464
104465
PERR42= 104466
= 106467
ECCDIS
E
E
3
(BCSR=
CB1CSR=

3
&

COMILWLVIDN

4500

Y PP 9P P9

wed ced wd wd

104470
104471
104472
104473

;PROGRAM DETECTED

YOI
YD

104445
104446
104447
104450
104451
104452
1064453
104454
104455
104456
1046457
104460
104461
104462
104463
104464
104465
104466
106467

|elelelolelelelelelele]

OEFINE

MACRO M1113

04470
4471

;PROGRAM
;PROGRAM
;PROGRAM
;PROGRAM

; PROGRAM

;PROGRAM
; PROGRAM
; PROGRAM

; PROGRAM

:PROGRAM
; PROGRAM
;PROGRAM

; PROGRAM
;PROGRAM

DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DE TECTED

ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR

ERROR
ERROR
ERROR
ERROR
ERROR

;DISABLE EC C ON ALL CSR'S
;DISABLE EC C ON 1 SELECTED CSR
s INITIALIZE ALL ECC CSR'S
SINITIALIZE 18§ ELECTED ECC CSR

;WRITE GENE RATE D CHECKBITS

IN ALL CSR'S
;WRITE GENERA TE D CHECKBITS IN 1 SELECTED CSR
sWAS THERE A SBE
Y CSR?
sWAS THERE A S
1 SELECTED CSR?
:WAS THERE A D
Y CSR?
sWAS THERE
A g
SELECTED CSR?

¢
¢S
;DISABLE ECC & WRI TE CHECKBITS FROM ALL CSR'S
;DISABLE ECC & WRI] TE CHECKBITS FROM 1 SELECTED CSR
ENABLE TRAPS ON S BE'S FROM ALL CSR'S
;ENABLE TRAPS ON S BE'S FROM 1 SELECTED CSR
:

;TEST LOC

(R1)

& TST FOR SBE

(WITHOUT FETCHES)

: INVALIDATE BACKGROUND PATTERN ON ‘BANK'’

:CHECK ERROR ADDRESS

103

DEFINE

BASIC PDP11

STUFF

MACRO M1113

22-APR-81

4106
4107
4108
4109
4110
N
6112
4113
6114
4115
64116
€117
4118

002000
002000
000740
000790
104000
000004
177776

4120

177546

177570

;PIRQ=
DSWR=
DDISP=
LKS=

000011

HT=

4«19

3ry)
6122
4123
4124
4125
6126
6127
4128
6129
4130
4131
4132
4133

6134

4135
6136
6137
4138
4139
4140
4141
6162
6143
4144
4145
6146

46147

.SBTTL

177570

000012
000015

000200

000007

DEFINE

PAGE

111

BASIC PDP11

SEQUENCE
STUFF

;*INITIAL ADDR ESS OF THE STACK POINTER
2000
ssFIRST ADDRESS OF THE STACK
KERSTK= STACK
s s KERNEL STACK
SUPSTK= 740
;s SUPERVISOR STACK
USESTK= 700
¢+ :USER STA(K
ERROR=EMT
s:BASIC DEFINITION OF ERROR CALL
SCOPE=IOT
:;BASIC DEFINITION OF SCOPE CALL
PSW=
177776
s ;PROCESSOR STATUS WORD
:STKLMT=177774
;s STACK LIMIT REGISTER
STACK=

177772
177570
177570

177546

: ;PROGRAM INTERRUPT REQUEST REGISTER

s HARDWARE SWITCH REGISTER
; HARDWARE DISPLAY REGISTER
s:LINE CLOCK (KW11-L) STATUS REGISTER

s*MISCELLANEOUS DEFINITIONS

LF=
(R=
CRLF=

MFPT=

12
15
200
7

;. CODE FOR HOR]ZONTAL

TAB

;.CODE LINE FEED
;. CODE CARRIAGE RETURN
;. CODE FOR CARRJAGE RETURN-LINE FEED

;. CODE FOR PROCESSOR TYPE

s*GENERAL PURPOSE REGISTER DEF INITIONS
:SP=R6

000006
000006

100000
040000
020000
010000
004000
002000
001000
000400
000200
000100

000040

4148
6149
4150
4151
4152
4153
6154
4155
4156
4157
4158

100000
040C00
020000
010000

4160
4161
4162

002000
001000
000400

4159

14:13

000020
000010
000004
000002
000001

004000

s s STACK POINTER

.KSP=SP

s sKERNEL STACK POINTER

SSP=SP
USP=5P

;s SUPERVISOR STACK POINTER
s cUSER STACK POINTER

;PC=R7

; :PROGRAM COUNTER

s« 'SWITCH REGISTER'' SWITCH DEFINITIONS
Swi5=
100000

SWi4é=

Swi3=
sSwi2=
SWil=
SW10=
Sw9=
Sw8=
SW7=
Swé=
SWS=
SW4=
Sw3=
Sw2=
Swi=
Sw0=

40000

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

;*DATA BIT DEFINITIONS (BITOO TO BIT1S)
BITi5=
100000
BIT14=
40000
BIT 3= 20000
BIT12=
10000
BIT11= 4000
B8IT10= 2000
BIT9=
1000
BIT8=
400

INSTRUCTION

104

CZMSDCO MS11-L/M DIAGNOSTIC

DEFINE

BASIC PDP11

STUFF

MACRO M1113

22-APR-81 14:13

PAGE 111-1

SEQUENCE

4163

000200

8IT7=

200

4165
4166
4167
4168
4169

2};9

000040
000020
000010
000004
000002

000001

BITS=
BIT4=
BIT3=
BIT2=
BITI=

40
20
10
4
2

4172
6173
4174
4175

000004
000010

;*BASIC "°CPU'* TRAP VECTOR ADDRESSES
ERRVEC= 4
::TIME OUT AND OTHER ERRORS
RESVEC= 10
..nesenveo AND ILLEGAL INSTRUCTIONS
;TBITVEC=14
SUTURIT

4164

4176
4177

000100

BIT6=

BITO=

100

STRTVEC=
‘BPTVEC=

4178
4179
4180
4181
4182
4183

000020
000024
000030
000034
000060

10TVEC= 20
PWRVEC= 24
EMTVEC= 30
TRAPVEC=34
TKVEC=
60
;TPVEC= 64

4185
4186

000114
000114

CACHVEC=114
PARVE C=CACHVEC

4188
4189
4190
4191
4192
4193

060250

MMVEC=

L4184

4187

177746

177750

2}3§

177754

4196
2}3;

177766

:LKVEC= 100

4201

4202
4203
258?

4206

4207

4208

::CACHE ERROR INTERRUPT VECTOR

.SBTTL
DEFINE
CPUERR = 177766

CPU REGISTERS
;:CPU ERROR REGISTER HOLDS CONDITION THAT CAUSED

DATARG

= 177754

MMRO=

DEFINE

::DATA REGISTER

MEMORY MANAGEMENT REGISTERS

177572

177574
177576
172516

MMR1=
MMR2=
MMR3=

177574
177576
172516

177600

UIPDRO= 177600

-aUSER *'I'* PAGE DESCRIPTOR REGISTERS

4210
421
4212

:UIPDR3=
sUIPDR%=
*UIPDRS=

177606
177610
177612

25};

*UIPDR7=

4216
4217

; UDPDRO=

4218
4219

::MEMORY MAINTENENCE REGISTER
S:HIT MISS REGISTER '"1" IMPLIES HIT IN CACHE

- «MEMORY MANAGEMENT STATUS REGISTER ADDRESSES

177602

4213

; ;PROGRAM INTERRUPT REQUEST VECTOR

SMEMORY MANAGEMENT VECTOR
CACHE REGISTERS
:;CACHE ERROR REGISTER
:MEMORY CONTROL REGISTER

;UIPDR1=

4209

:: INPUT/OUTPUT TRAP (10T) +SCOPE++
:SPOWER FAIL
..EHULATOR TRAP (EMT) «+ERROR**
23 TRAP'* TRAP
$STTY KEYBOARD VECTOR
S:TTY PRINTER VECTOR

250
.SBTTL
DEFINE
:MEMERR = 177744
CONTRL = 177746
MAINT
= 177750
SHITMIS = 177752

.SBTTL

177572

; ;TRACE TRAP
: SBREAKPOINT TRAP (BPT)

J:LINE CLOCK (KW11=L) VECTER

:PIRQVE(C=240

4199

4200

14
14

*UIPDR2=
*UIPDR6=

*UDPDR1=
*UDPDR2=

177604

177614

177616
*USER 'D’' PAGE DESCRIPTOR REGISTORS
177620

177622
177624

105

CZMSDCO MS11-L/M DIAGNOSTIC

DEFINE

MACRO M1113

MEMORY MANAGEMENT REGISTERS

22-APR-81

:UDPDR3=
:UDPDR6=

:*USER "I'" PAGE ADDRESS RLGISTERS

4227
4228
4229
4230
4231
4232
4233
4234

177640
177640
177642
177644
177646
177650
177652
177654

4238

177660

4245

177676

;UDPARG=
UDPAR7= 177676

4248

172200

SIPDRO= 172200

FASTCITY =UJPARO

UIPARO= 177640

UIPAR1= 177642
UIFAR2= 177644
UIPAR3= 177646
UIPARé= 177650
UIPARS= 177652
UIPAR6= 177654

;UIPAR?7=

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

6274

172254

177656

177674

sPATTERN PROGRAM SPACE

;PATTERN PROGRAM ClAcE

172202
172204
172206
172210
172212
172214
172216

172222

s SDPDR2=
: SDPDR3=
s SDPDR4=

172224
172226
172230

: SDPDR6=

172234

172232

:SDPDR?7=

172252

:PATTERN PROGRAM SPACE

sPATTERN PROGRAM SPACE
;PATTERN PROGRAM SPACE

;*SUPERVISOR 'D’* PAGE DESCRIPTOR REGISTERS
172220

: SDF'PR5=

4273

sPATTERN PROGRAM SPACE

sPATTERN PROGI
\M SPACE
;PATTERN PROGRAM SPACE

: *SUPERVISOR '‘I'* PAGE DESCRIPTOR REGISTERS

:SDPDR1=

172246

;PATTERN PROGRAM SPACE

:*USER ‘D'’ PAGE ADDRESS REGISTERS
;PATTERN PROGRAM SPACE
UDPARO= 177660
;UDPAR1=
177662
sPATTERN PROGRAM SPACE
177664
sPATTERN PROGRAM SPACE
JUDPARZ=
177666
;PATTERN PROGRAM SPACE
;UDPAR3=
177670
;PATTERN PROGRAM SPACE
;UDPAR4G=
177672
sPATTERN PROGRAM SPACE
:UDPARS=

: SDPDRO=

4271

SEQUENCE

177636

;UDPDR7=

172240

c .9
PAGE 111-2

177626

:UDPDR4=
;UDPDRS=

4268

14:13

172236

: *SUPERVISOR '‘I'' PAGE ADDRESS REGISTERS

SIPARO= 172240
;SIPAR1=
:SIPAR2=
SIPAR3= 172246

172242
172244

;SIPARG=

172250

;SIPAR7=

172256

SIPARS= 172252
SIPARG= 172254

s TEST AREA

;TEST AREA

;TEST AREA
sTEST AREA

106

CZMSDCO MS11-L/M DIAGNOSTIC

ODEFINE

6277

4278

4279
4280
4281

4282

4283
4284
2532
4287
4288
4289
4290
4291
4292
4293
4294

MEMORY MANAGEMENT REGISTERS

172272
172276
172276

SDPARS= 172272
SDPARG= 172274
SDPAR7= 172276

172300

2;}2

4317
4318
4319
4320
4321
4322
4323

4324
4325

:SDPAR1=
: SDPAR2=
*SDPAR3=

: SDPARG=

:KDPDRO=
:KDPDR1=
*KDPDR2=
:KDPDR3=
;KDPDR4=
*KDPDRS=
:KDPDR6=
:KDPDR7=

172350
172352
172354

172360

172374

172376

D 9
PAGE 111-3

172262
172264
172266

172270

:*KERNEL '‘I'* PAGE DESCRIPTOR REGISTERS
KIPDRO= 172300
:KIPDR1=
172302
*KIPDR2=
172304
:KIPDR3=
172306
:KIPDR4=
172310
*K1PDRS=
172312
*KIPDR6=
172314

*KIPDR7=

172340

14:13

- *SUPERVISOR ‘D' PAGE ADDRESS REGISTERS

SDPARO= 172260

4297
(298
4299
4300
4301
(302
4303
4304
2%82

4308
4309
4310
4311
4312
4313
4314

22-APR-81

172260

2532

4307

MACRO M1113

172316

;*KERNEL ‘D'’ PAGE DESCRIPTOR REGISTERS
172320
172322
172324
172326
172330
172332
172334
172336
:*KERNEL '‘I'* PAGE ADDRESS REGISTERS

KIPARO= 172340
:KIPAR1=
*K1PAR2=
‘KIPAR3=
KIPAR4= 172350
KIPARS= 172352
KIPARG6= 172354

:K1PAR7=

172342
172344
172346

172356

s *KERNEL 'D'* PAGE ADDRESS REGISTERS
KDPARO= 172360
:KDPAR1=
172362
" KDPAR2=
172364
*KDPAR3=
172366
:KDPAR%=
172370
*KDPARS=
172372

KDPARG6= 172374

KDPAR7= 172376

SEQUENCE

107

b o e

e ead o

b e

b b b e

b b

.SBTTL
DEFINE
UNIBUS MAP REGISTERS
;*THE LOWER 16 BITS OF THE MAP REGISTERS ARE LABELED °'MAPLXX'
tTHE UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED 'MAPHXX'
—d e h b b e b b
D b b D NN Y
=b N N N N NN NN NN NN NNOOO

120

(=lelelalale]
N
o
(=)

NN PONIAI NNV N N NWNNNINININ)
= = 2 2 O NNO
oW AN ES SO SNOONSNIOONSNOON
[=1e8 SO NO

\I\J\J\J\J\JN\JVN\I\J\J\J\JNNNVVVVNVNN;N\JNN\JVV\J\J\I\IOOOOOOOOOOOOONN
(=lelelalelelalelelele]
[=] OOOOOCLOONINININININININININNININOOO

b b b e

1
1

b ed b md md d

MACRO M1113

nna

UNIBUS MAP REGISTERS

R
X
o

DEF INE

CZMSDCO MS11-L/M DIAGNOSTIC

22-APR-81
14:13

0262

0302
0304

0336

E 9
PAGE 113
SEQUENCE
108

CZMSDCO MS11-L/M DIAGNOSTIC

UNIBUS MAP REGISTERS

22-APR-81

14:13

F
9
PAGE 113-1

SEQUENCE

109

e
X
W

[ I [

)]

DEFINE

MACRO M1113

SBTTL

DEFINE

SOFTWARE SWITCH & DISPLAY REGISTERS

.SBTTL

DEFINE

CONTROL STATUS REGISTERS

.58 TTL
FIRST=60000

DEFINE

PARAMETERS

4398
4399

000174
000176

DISPREG=174

4402

172100

CSRADD=172100

4405
4406
4407

060000
157776
040000

SWREG=

176

LAST=157776
SI1ZE=40000

sSTART OF THE 16K TEST PATTERN AREA
sEND OF THE 16K TEST PATTERN AREA
;SIZE OF THE 16K TEST PATTERN AREA (FOR SOB INSTRUCTIONS)

CZMSDCO MS11-L/M DIAGNOSTIC

DEFINE

PARAMETERS

MACRO M1113

14:13

PAGE 115

LIST
.SBTTL

MD
MACRO

FATAL

4413

4414

6415

JRAARAAARANRRNARRAANNAY

4417
4418

fATAL
H

4616

44619
4420
44621
4422
4423
4424
4425
4426
6427
4428
4429
4430
4431
4432
6433
4434
4435
4436
4437
4438
4439
4440
4441
4442
4443

22-APR-81

FAIAL

;BE NICE TO SEE MY DEFINITIONS
ARARARANANANAANNAANNNRNAAER

IS USED TO REPORT FATAL ERRORS
THE PROGRAM FROM CONTINUING).

’

LMACRO

FATAL

.DSABL

CRF

INC

FATALS

ARG

.J1F DF %2;38 LIST

ERROR
.DSABL
.ENDM

FATAL

.SBTTL
-MACRO

MACRO
TYPE

-DSABL

CRF

"ENABL

CRF

; **«MACRO* **MACRO* * tMACRO# # ¢

ME
sSET FATAL INDICATOR

+ARG
CRF

JIF DF LST$S$ .NLIST
CRF
.ENABL

TYPE
ARG

"1IF DF LSTSS .LIST

.IF B ARG

TYPEIT

4445

4448

4449

(ERRORS THAT PREVENT

RL
T
T,

4444

4446
4447

SEQUENCE

.DSABL

(RF

.ENABL
.ENDM

CRF
TYPE

.IJIF DF LST$$S .NLIST

110

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO

4452
4453
4454

NEWTST

MACRO M1113

22-APR-81

14:13

H 9
PAGE 117

.SBTTL

MACRO

NEWTST

snrarnevannenennanenrse

NEWTST

SEQUENCE

snnsnenanraneenansennn

?EUT?IIS USED AS THE FIRST INSTRUCTION OF A TEST.
:1)

:2)

GENERATE A TEST NUMBER FOR THE LABEL OF THIS TEST

PUT STARS BEFORE AND AFTER A MESSAGE

:ARGUHENIS
:1) ASCII

:2)

ICOUNT ==

:3)

RETURN --

[

THIS IS THE MESSAGE THAT WILL APPEAR

ON THE LISTING

IF NON-BLANK AND BIT 11 OF $SWR = 1 IT WILL BE

THE NUMBER OF

WHICH THE NEXT SCOPE STATEMENT WILL

'
[4

;4)

[

ITERATIONS TO MAKE ON THIS TEST

IF NON-BLANK WILL BE THE ADDRESS TO

LOOP BACK TO.
IF NON-BLANK WILL BE THE FIRST
INSTRUCTION OF THE TEST
IF BLANK SCOPE WILL BE THE
FIRST INSTRUCTION

COMAND --

'
.

22832323823 222322223222322322323 22233222332

[

JIACRO

NEWTST

R 3

ASCII, ICOUNT.RETURN. COMAND

SNWTST=0

NLIST
MC
"1F B <COMAND>
s?gsuresr

\$TN,<ASCII>,SCOPE

SSNEUTEST

\$TN,<ASCII>,<COMAND>

:LIST

1
F NE 4000£$SWR
.IF N8 ICOUNT
F LE <ICOUNT=-1>
MoV
#1,$TIMES

::D0 1

MOV c

;DO ICOUNT ITERATIONS

#ICOUNT,STIMES

-ENDC
.IJF NB RETURN

ngbc

#RETURN,SLPADR

-ENDC
.NLIST
LIST
.LIST
NLIST

.ENDM

ME
NEWTST

ITERATION

;;SET SCOPE LOOP ADDRESS

CZMSDLCO MS11-L/M DIAGNOSTIC
MACRO
SSNEWTEST

MACRO M1113

22-APR-81 14:13

4502
4503
4504
4505
4506
4507

LSBTTL
LMACRO
.IRP

I 9
PAGE 119

SEQUENCE

112

MACRO
SSNEWTEST
SSNEWTEST
A,ASC,COMND

ASCI ,<ASC>

JIF EQ SNWTST

SNWTST=1

LSBTTL

NLIST

T'A!

ASCI

;ttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttt

s*TEST A

.IFF
ASCI
.ENDC
.ENDM

ASCI

;ttttttttttttttttttttttt'ttttttttttttttttttttttttttttttttfiittttttttttttttttttttt

TST'A-

COMND
LNLIST
ME
STN=STN+1

.ENDM

SSNEWTEST

.SBTTL

MACRO_

JNRRARRReRRRRAt

SuBTST

SUSTST

Aaaa ettt nar v

et aaaantntntatatas

:THIS MACRO WILL FORMAT A SUBTEST HEADING WITH STARS

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

*ARGUMENT:
1)

IXT --

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

SUBTST <<THIS IS A FUN SUBTST>>

LEXAMPLE :
4

MALEARAL RSS2t

sR iRttt d

.MACRO
NLIST
$SUBTST
LLIST
.ENDM

SUBTST
ASCII
MC
<ASCII>
MC
SUBTST

.SBTTL
MACRO

MACRO
$SUBTST
S$SUBTST ASC

.IRP
.SBTTL
«NLIST
LLIST
S NAA AR AN

Rttt

LIST

ittt

ME
RN

A AR RN AR AR AR NN

s *SUBTEST

ASCI

SRR

AN AN RRN AN RN RN RARNN AR AN AR NAN

AR AR AN AR

NLIST
.ENDM

]

ASC] ,<ASC>
ASCI

AR AR AR AR AR RN

.ENDM

dss]

ME
SSUBTST

AR RN RN AR AN RN RN

AR A R

AN P AN A NN

RARRN RN

NN ON

RANANRACANRARN

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO

4557
4558
4559
4560
6561
4562
4563
4564
6565
4566
6567
4568

TYPOCT

MACRO M1113

22-APR-81
.SBTTL

14:13

PAGE 121

SEQUENCE

MACRO _ TYPOCT

JNRARERREANRANRARARAE

TYPOCT

woannnntanvnansantanan

TYPOCT IS USED TC CHANGE A BINARY NUMBER

;

TO A 6 DIGIT OCTAL NUMBER AND TYPE IT

: ARGUMENTS:

‘)
‘2)

NUM
THE NUMBER TO BE TYPED
REMARK ALLOWS A COMMENT TO BE MADE

)

CONVERT BINARY TO OCTAL AND TYPE (.S$TYPOCT)

énour1~es REQUIRED

52)
TYPE AN ASCIZ STRING (.STYPE)
§EXAHPLES:
[4

SRR AA R AR AR AR AN AR AR

.MACRO
.NLIST
.DSABL

AR AN AN AN ANNRAANAARANRRNRANARARARRRANNARNN
AR

TYPOCT

NUM,REMARK

(RF

LIIF DF LSTSS .LIST
.ENABL
LLIST

CRF

MOV
NUM, - (SP)
.11F NB <REMARK>,
TYPOC
.DSABL
CRF

IIF DF LSTSS _NLIST
.ENABL
CRF
.ENDM

TYPOCT

ME
;. SAVE NUM FOR TYPEOUT

: : REMARK

::G0 TYPE~-~OCTAL ASCIICALL DIGITS)

11%

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO

TYPOCS

MACRO M1113

22-APR-81 14:13
.SBTTL

K. 9
PAGE 123

SEQUENCE

MACRO _ TYPOCS

JRRARANRARRNRAAAAAANY

TYPOCS

ARARRANARAANNRRARCRARY

STYPOCS IS USED TO CHANGE A BINARY NUMBER TO AN OCTAL
;
:

NUMBER AND TYPE 1 TO 6 DIGITS
WITH OR WITHOUT LEADING ZEROS.

*ARGUMENTS:
:1)

NUM

NUMBER TO BE TYPED

)

REMARK

ALLOWS A COMMENT TO BE MADE

i3)

NUMBER OF DIGITS (1 TO 6) TO BE TYPED

BLANK=SUPPRESS LEADING ZEROS (TYPES SPACES)
NON-BLANK=TYPE LEADING Z2EROS

*ROUTINES REQUIRED

CONVERT BINARY TO OCTAL AND TYPE (.$TYPOCT)

:2)

TYPE AN ASCIZ STRING (.STYPE)
*EXAMPLES:
)

TYPOCS

#12345,<TYPES ''S'>,1

:3)

TYPOCS

#004.<TYPES ** 4'S.2

)

TYPOCS

#004,<TYPES '04°'S>.3.x

[

SRR RRA RN RAARARAAR RN AR

AR AR

AR AANAARNANRAARRARARAANRAANARARNARARRSS

.MACRO
TYPOCS
NUM,REMARK,N,Z
.NLIST
.DSABL
CRF
.JIF DF LST$$ .LIST
ME
.ENABL
CRF
LLIST

MOV

NUM, - (SP)

;s SAVE NUM FOR TYPEOUT

.1IF NB <REMARK>,

TYPOS

::G0 TYPE--OCTAL ASCII

.JF N8 N
.?:;E
N

:oTYPE N DIGIT(S)

BYTE
.ENDC

;cTYPE 6 DIGITS

.BYTE

s TYPE LEADING ZEROS

BYTE

: :SUPPRESS LEADING ZEROS

.JF N8 2

.DSABL
(RF
JIF DF LST$S .NLIST
(RF
.ENABL
.ENDM
TYPOCS

: s REMARK

114

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO

4653
4654
4655
4656
4657
4658
4659

6660
4661
4662
4663
4664
4665

TYPDEC

MACRO M1113

22-APR-81

14:13

;
;
INOTE:
:

SEQUENCE

.SBTTL

MACRO _ TYPDEC

IS USE

TO CHANGE A BINARY NUMBER TO A SIGNED

sesnnnnknnnnnannnnrnr

rvpoec

L_9
PAGE 125

JYPDEC

vanannvnvnnanananane

DECIMAL NUMBER AND TYPE IT REPLACING LEADING ZERO
WITH SPACES.
IF THE NUMBER IS NEGATIVE A
MINUS SIGN WILL BE TYPED.

*ARGUMENTS:
21)

NUM

NUMBER TO BE TYPED

:2)

REMARK ALLOWS A COMMENT TO BE MADE

*ROUTINES REQUIRED

)

CONVERT BINARY TO DECIMAL AND TYPE (.STYPDEC)

52)
TYPE AN ASCIZ STRING (.STYPE)
éEXAMPLES

SRR AN RN RN AR RN A AR RN AN NN

.MACRO
.NLIST
.DSABL
IIF DF
.ENABL
LLIST
MOV
.11F NB

NUM, - (SP)
<REMARK>,

.DSABL

CRF

.ENABL
.ENDM

.CRF
TYPDEC

TYPDS

TYPDEC

AR ARN AN AN AR AN AR

RNRRARRANA RN

NUM,REMARK

CRF

LSTSS .LIST
CRF

JJIF DF LST$S .NLIST

ME
¢SAVE NUM FOR TYPEOUT
::60 TYPE--DECIMAL ASCII

REMARK

UITH SIGN

115

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO

B8MOV

MACRO M1113

22-APR-81 14:13
.SBTTL

MACRO

JRNANARANRRARNRAAE

no9
PAGE 126

MOV

SEQUENCE

BMOV

ARt At AN

AR AN

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

FROMHERE

THE FIRST ADDRESS OF THE SOURCE BLOCK.

.2)

TOHERE

THE FIRST ADDRESS OF THE DESTINATION BLOCK.

.3)

SIZE

:
:

H
H

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

THE SIZE OF THE SOURCE BLOCK.

IF BLANK A 16 WORD TRANSFER IS ASSUMED.
"WHY DEFAULT TO 16 WORDS?'‘ YOU ASK!
"BECAUSE THAT'S HOW MANY WORDS TO THE _SER PAR
REGISTERS & THAT'S WHERE I INTEND TO MOVE LOTS

;
:

STUFF.'' 1 REPLY!

:tttfittititt.t.tfittl.t"l'ttl'fi..t.Qtittttt*..tit't
.MACRO BMOV
.IF B TOHERE
.NLIST
.DSABL

FROMHERE
, TOHERE ,SIZE

.11F DF LST$$ LIST

.ENABL

.LIST
JSR RS ,BLOCK1

FROMHERE

.DSABL
CRF
.JIF DF LSTSS NLIST

.ENABL
MEXIT
.ENDC

CRF

F B SIZE
.NLIST

.DSABL

1IF DF LST$S LIST
.ENABL
CRF
LLIST
JSR R5,BLOCK2
TOMERE
FROMHERE

.DSABL

CRF

.NLIST
.DSABL

CRF

.11F DF LSTSS NLIST
-ENABL
LMEXIT

IIF DF LSTSS .LIST
.ENABL
CRF
LIST
JSR_RS,BLOCK3
SIZE

116

CZMSDCO MS11~-L/M DIAGNOSTIC

MACRO

4752
4753
4754
4755
4756
4757
4758

8MOV

MACRO M1113

22-APR-81

14:13

PAGE 126-1

TOHERE
FROMHERE
.DSABL
CRF
.JIF DF LST$S .NLIST
. ENABL
CRF
.ENDC
.ENDM
BMOV

SEQUENCE

117

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO

MAP

4761

MACRO M1113

22-APR-81 14:13
.SBTTL

4762

MACRO

CHUNNANNRNNNARANAEAN MAP

4763
4764

8.10

PAGE 128
MAP

SOOI NARRNRARNAANANCENNRGR

THIS MACRO MAPS A MEMORY BANK

2;22

SEQUENCE

(16K)

INTO THE

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

2;25

Ancuensnrs

4769

‘D

2;;;

:EXAHPLES

2;;§

MAP

LoC

:LOCATION "LOC'* CONTAINS THE # OF THE BANK TO MAP

2;;9

MAP

#28.

:BANK 34 (OCTAL) WILL BE MAPPED

4778

:ttt'ittt.t""Qi.tttl"""'tt't..Qttttt'tt..t'ttt

2;;?

4779
4780
4781
4782
4783
4784
4785
4786
4787

BANK

THE BANK OF 16K WORDS TO BE MAPPED.
THERE ARE

LMACRO
MAP
BANK
PUSH
R3
NLIST
-DSABL
CRF
“11F DF LSTS$ .LIST
ME
"ENABL
CRF
LIST
.IF B BANK

4788

MOV

#120.,R3

4790

MOV

BANK ,R3

4793

.DSABL

4789

LIFF

4791
4792

479%
4795

4796

4797

120 BANKS OF

.ENDC
CALL

MAPPER

CRF

“IIF DF LSTS$ .NLIST
.ENABL
CRF

POP

.ENDM

MAP

16K WORDS

118

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO

SUPERVISOR

MACRO M1113

22-APR-81 14:13
.SBTTL

€10
PAGE 130

SEQUENCE

MACRO _ SUPERViSOR

Jennnnnnnnnnnnnnnns

SUPERVISOR

toannntnannnnnnennanan

* THIS MACRO SWITCHES TO SUPERVISOR MODE.
*ARGUEMENTS: NONE.
[4

ERARRAARRA AN A AN A RA A TR RAARARNAARARANARANNRARARNSY

.MACRO
.NLIST
.DSABL
JIIF DF
.ENABL
LLIST
8IS
.DSABL
JIF DF
ENABL
.ENDM
.SBTTL

SUPERVISOR
CRF

LSTSS .LIST
CRF

#8IT14,PSW

sCO TO SUPERVISOR MODE

CRF

LST$S .NLIST
C CRF
SUPERVISOR

MACRO

JRRRNRANAARNCAREAN

JSER

USER

whvannnannnannnanaenanantnnnt

* THIS MACRO SWITCHES TO USER MODE.
*ARGUEMENTS: NONE.
L

SNENRAAARRA R AN R AN AN AN R AR AC

.MACRO
«NLIST
.DSABL
.JIF DF
.ENABL
.LIST
8IS
.DSABL

AN AN CRNARARAANRNRAAARNRS

USER
CRF

LST$S .LIST
CRF

:gngS!BIT14.PSU

.IIF DF LST$S .NLIST
.ENABL
.ENDM

CRF
USER

:GC TO USER MODE

119

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO

4843
4844
4845

4846

4847
4848
4849
4850
4851
4852
4853
4854
4855
4856
4857
4858
4859
4860
4861
4862

TESTAREA

MACRO M1113

22-APR-81
.SBTTL

14:13

D_10

PAGE 131

SEQUENCE

MACRO _ TESTAREA

sunnnnnnnsunnanner

TESTAREA

voannnnannnnnnnenenennny

P THIS MACRO SWITCHES TO THE SPECIFIED TEST MODE.

*ARGUEMENTS: NONE.
[4

SRR ARAAAARA
RN RANR
AR A ANANAARANAN
ARAA
ANNANOANARA
NN
SR

.MACRO
TESTAREA
«NLIST
CRF
.DSABL
IIF DF LSTSS .LIST
.ENABL
(RF

BIS

EESTHODEPSW

.1IF OF LSTSS NLIST
.ENABL
CRF
.ENDM
TESTAREA

;CO TO SYSTEM TEST MODE
ME

120

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO
SET4 & RESS
4865
4866
4867

MACRO M1113

[J
L4

;

22-APR-81

14:13

.SBTTL

MACRO_

resnennnnnannanns

E_10
PAGE 133

SETL

SEQUENCE

SET4 & RES4

RESLH

snnennnvannnnnnnenne

THESE MACROS SET & RESTORE VECTOR 4(TIMEOUT TRAP)

;

[

[4
.

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

LOC

sTHE LOCATION TO VECTOR TO

(ONLY USED IN °'SET4'' NOT 'RES4'")

[4
.

I USE THE SET4 AND RES4 MACROS ARQUND CODE THAT ] EAPECT TO TRAP TO 4
LIKE LOOKING FOR ALL POSSIBLE CSR'S AND ETC.
WHENEVER CODE IS NOT
SURROUNDED BY SET4 AND RES4 THEN ANY TRAPS TO 4 WILL CAUSE AN ERROR

sPRINTOUT THAT SAYS '‘UNEXPECTED TRAP TO 4'' AND ALL

THE ASSOCIATED REGISTER JUNK

ARRAARANAAAAAANRAAANNRCI
R AR AN RRNR AN
NN
NRN

.MACRO
.NLIST
.DSABL
IIF DF
.ENABL
LLIST
MoV
.DSABL

SET4

ARG,
4
(RF

.ENABL
LENDM

CRF
SET4

.MACRO

RES4

ARG

CRF

LSTSS .LIST
CRF

JJIF DF LST$SS .NLIST

.IIF DF LSTSS .LIST
CRF
.ENABL

01s:

MoV
cMp

#TIMEOUT,
4
#1,PROTYP

:1S THIS AN 11/44?

CLR

CPUERR

sCLEAR OUT THE CPU ERROR REGISTER BITS

BNE
1

1018

¢BRANCH IF NOT

"11F OF Lg;ss NLIST

.ENABL
.ENDM

(
RES4

:THAT A EXPECTED

TRAP COULD MAVE

SET

121

CIMSDCO MS11-L/M DIAGNOSTIC

MACRO

4910
491°
4912
913
4914
4915
6916
4917

DLEFT

MACRO M1113

22-APR-81 14:13
.SBTTL

MACRO

sunnnanananenensne

F_10
PAGE 135

DI EFT

SEQUENCE

DLEFT

sovennnnnnnnonnnnennnnnnnsn

: THIS MACRO DOES A DOUBLE WORD LEFT SHIFT
*ARGUEMENTS:

LocC

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

SRR RRARAAANAAANARAANAARCA
RN IRANANRRRNRARAAR AN
RNTS

-MACRO
«NLIST
.DSABL
.11F DF
. ENABL
LLIST

ROL
ROL

DLEFT

ARG

CRF

LSTSS .LIST
CRF

ARG

ARG+2
.DSABL
CRF
.1IF DF LST$S .NLIST
. ENABL
CRF

.ENDM
.NLIST

DLEFT
MD

;DON'T NEED TO SEE THEM ANY MORE

122

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP CATCHER

4936 000000
7

000000

000000
000177

MACRO M1113

22-APR-81
.sgrrL

000000

-WORD

14:13

G_10

PAGE 137

SEQUENCE

TRAP CATCHER

-REPT

177

LSBTTL

ACT11 HOOKS

;. WORD

.42,HALT

4958 000046
4959
4960 000052
4961
4962
4963 000024
4964
4965 000042
4966
4967 000044
4968
4969 000200
4970 000202

4974
4975
4976
4977
4978
4983

000300
000304
000310
000316

000046
014470
000052
000020

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

J
B

1)L0C. 46

BN BN BF BF

2)L0C.52

LR 2

A X KR P NI FE

N PN N
TN TN I IS I

;#THE HOOKS REQUIRED BY ACT11 ARE DEFINED AND SETUP BELOW:
DEF INITIONS:

"END-OF -PASS’* HOOK

=ADDRESS OF END OF PASS ROUTINE
MODIFIED BY ACT11.

PROGRAM NEEDS HOOK

BIT 15=1 PROGRAM SHOULD BE POWER

=0
BIT 14=1
-o
BIT 13=1
=0

FAILED WHILE RUNNING

BITS 12-0

ssgng

NO POWER FAIL
PROGRAM MEMORY SIZE DEPENDENT
NOT MEMORY SIZE DEPENDENT
PROGRAM REQUIRES MANUAL INTERVENTION
MANUAL INTERVENTION NOT REQUIRED
MUST BE ZERO'S

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

WORD

BIT4

=24

;;SET POWER FAIL TO POINT TO START OF PROGRAM

SBTTL

2022

APT11

HOOKS

;:2)SET LOC.52 TO INDICATE MEMORY SIZE DEPENDANT

*:FOR APT START UP

STACK
;SO RT11 CAN START WITH RUN COMMAND
=44
;:POINT TO APT INDIRECT ADDRESS PNIR.
SAPagDR ::POINT TO APT HEADER BLOCK

002566
003630

003630

START3: BR

BR300

START1
START?

START1:

CLR

RESTART

STARTZ: SET

RESTART
START

JMP

START

;*NORMAL'* START
:RESTART (SAVE ERROR ACCOUNTING)

123

CZMSDCO MS11~L/M DIAGNOSTIC

VARIABLES

INITIALIZED TO ZERO

4986
4987
4988

4989 002000
4990
4991
4992
4993

000000
000000
000000
000000

4995 002010

000

4996 002011

4997 002N12

4998 002013
4999 002014

5000 002016
5001 002020
5002 002022
5003 002024
5004 002026
5005 002030
5006 002032
5007 002034
5008 002036
5009 002042
5010 002044
5011 002046
5012 002050
5013 002052
5014 002054
5015 002056
5016 002060
5017 002062
5018 002064
5019 002066
5020 002070
5021 002072
5022 002074
5023 002076
5024 002100
5025 002102
5026 002104
5027 002106
5028 002110
5029 002112
5030 002114
5031 002116
5032 002120
5033 002122
5034 002124
5035 002126
5036 002130
5037 002132
5038 002134
5039 002136
5040 002140
5041 002142
5042 002144

22-APR-81

14:13

H_10
PAGE 139

SEQUENCE

124

.SBTTL
VARIABLES
INITIALIZED TO ZERO
;*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS
S*USED IN THE PROGRAM.

002000
002002
002004
002006

4994

MACRO M1113

$CMTAG:

:SELECT ONLY BANKS MARKED BY FIELD SERVICE MODE FLAG
:SET FOR SHIFTING DIAGONAL TEST
:SET FOR KAMIKAZE MODE TESTING
USED TO SKIP RESTORING KAMIKAZE MODE WHEN MODIFIED

'NEXT TWO BYTES ARE DISPLAYED IN THE DISPLAY REGISTER

000

$PATMAR: .BYTE

PATTERN NUMBER

$SERFLG:

..co~rA1~s ERROR FLAG

$8ANK:

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
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

::START OF COMMON TAGS

SELONLY: 0
DIAGFLAG: 0
KAMIKAZE: 0
SKIPKAM]: 0

.BYTE

SITEMB: .BYTE
0
LASTERROR: .WORD 0

000000

ERRPC:
.WORD
BADPC:
.WORD
ERRSP:
.WORD
BADSP:
.WORD
ERRPSW: .WORD
BADPSW: .WORD
ADDRESS:.WORD
PADDRESS: .WORD
PHYADD: .WORD
GOOD:
.WORD
GOOD2:
.WORD
GOOD3:
.WCRD
BAD:
LWORD
BAD2:
.WORD
BAD3:
.WORD
BADXOR: .WORD
$SAUTO:
.WORD
FATALS: .WORD
SKPERR: .WORD
NEMCNT: 0
PARCNT: 0
PATERR: 0
NOPAR:
0
NONEM:
0
BANK:
0
BANK INDEX : 0
CPUBIT: 0
MUT:
0
PATTERN: 0
KPFLAG: .WORD
ACFLAG: .WORD
MKFLAG: .WORD
PFLAG:
.WORD
RRFLAG: .WORD
RLFLAG: .WORD
BMFLAG: .WORD
EUFLAG: .WORD
TMFLAG: .WORD
INTFLAG: .WORD
INT64K: .WORD
ABORTFLAG: .WORD
CTLKVEC:.WORD
CSR:
L.WORD

O
O
0
0
O
0
0
0
0.0
0
0
O
0
O
0
O
O
0
0

0
0
O
0
0
O
O
0
O
0
O
0
0
0

BANK
& SIGN

::CONTAINS ITEM CONTROL BYTE
:NUMBER OF ERRORS ON LAST PASS
:CONTAINS PC OF ERROR FOR TYPEOUT
: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
sADDRESS OF PARITY ERROR
:22 BIT PHYSICAL ADDRESS
:;CONTAINS 'GOOD® DATA
::CONTAINS *GOOD2* DATA
:;CONTAINS 'GOOD3’ DATA
::CONTAINS 'BAD' DATA
::CONTAINS °*BAD2' DATA
;;CONTAINS 'BAD3' DATA
;XOR OF GOOD & BAD = BAD BITS!
: JAUTOMATIC MODE INDICATOR FOR APT,.ACT., & XXDP
:FATAL ERROR INDICATOR
;USED TO SKIP ERROR MESSAGE IN ‘‘SERRGEN'’
*NON-EXISTANT MEMORY COUNTER (MOLES)
:PARITY ERROR COUNTER
:PATTERN ERROR COUNTER
;NO PARITY ERROR MODE INDICATOR
;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
:PATTERN NUMBER UNDER TEST
:BANK IS PROTECTED REGION OF ECC
:BANK CAN BE ACCESSED BY THIS CPU
;IF SET INDICATES MS11-M OR MF11S-K UNDER TEST
*BANK IS IN PROGRAM SPACE
:BANK IS WHERE PROGRAH RELOCATION IS REQUIRED TO TEST
:PROGRAM IS RELOCATED FLAG
:*BANK IS IDENTIFIED AS BAD MEMORY'' FLAG
S'BANK HAS EUB MEMORY'' FLAG
S TYPE OF MEMORY TO r;sr" FLAG; 0 = PARITY, 1 = ECC
:BANK IS INTERLEAVEDTM FLAG
S*BANK IS 64K INTERLEAVED'' FLAG
:"ABORT OCCURED'' FLAG
{HOLDS OLD KERNAL STACK POINTER IN CASE OF CNTL/K
:DATA TO OR FROM CSR

5098 002324
5099

000000
000000

CSRNO:

SEQUENCE 125 _1

[1.10

PAGE 139-1

sCSR ADDRESS NUMBER (4 LSB'S)
OLD CSR NUMBER(USED IN INH PTR TEST)
:THESE LOCATIONS STORE GPR'S DURING SUPERVISOR TESTS

OLDCSR:

SUPDRO:
SUPDR1:
SUPDRZ:
SUPDR3:
SUPDR4:
SUPDRS:
SUPDR6:

000000
000000
000000
000000
000000
000000
000000
000000

DUMMY:

:DUMMY LOCATION FOR ADDRESS PASSING

JTHESE L CATIONS STORE GPR'S & PSW DURING DETAILED ERROR PRINTOUTS
DETRO:
DETR1:
DETRZ:
CETR3:
DETRG:
DETRS:

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

DETSP:
DETPSW:
DETFLAG:

CONTFLAG:0

TOTCSRS
: .WORD

000000

000000
000000
000000
00000G

O
.WORD

14:13

000000
000000
000000
000000

CSRFIRST: .WORD
CSRLAST: ,WORD
CSRFBANK
: . WORD
CSRLBANK
: . WORD
CSRINT:
.WORD
SPLTCSR: .WORD
DATBUF: ,.WORD
TSTDAT:
SBEMSK:
DBEMSK:

.WORD
.WORD
.WORD

PASFLG:

.BYTE

SUPDOADD
: . WORD

UPPFLG:

.BYTE

REALPAT
: ,WORD

OLDCACHE
: . WORD
PARTHERE
: . WORD
FSSTACK
: . WORD
NEWBANK
: . WORD
SOURCE: .WORD
CHECK:
.WORD
PCBUMP: ,WORD
CSRINC: .WORD
CSRLOOP:
. WORD
SUCCESS: .WORD

ZEROS:

.WORD

TIME:
.WORD
SKIPMK: .WORD
NULLFLAG: .WORD
QVFLAG: 0

R'S HAVE BEEN TESTED FLAG
BIT PER EXISTING CSR, EGR 0 REPRESENTED BY BiT 15, ETC.
RST ADDRESS UNDER CONTROL OF

THIS CSR

:TUO WORD DATA BUFFER
:TWO WORD TEST DATA

:TWO WORD SINGLE BIT ERROR MASK
;TWO WORD DOUBLE BIT ERROR MASK
sADDRESS OF SUBROUTINE TO EXECUTE IN SUPFRVISOR MODE
sLOCAL LOOP PASS CONTROL
sLOCAL LOOP PASS CONTROL
sREAL PATTERN UNDER TEST
:BACKED UP VALUE OF CACHE CONTROL REGISTER
sPARITY TRAPS SOMETIMES GO TO ADDRESS STORED HERE
sSTACK SAVED HERE IF IN FIELD SERVICt MODE
cUSED FOR RELOCATION TO A NEW BANK
sSOURCE OF DATA WORDS FOR CHECKBIT GENERATION SUBROUTINE
sCHECKBITS TO BE LOADED INTO CSR
sVALUE TO BUMP THE PC BY TO RECOVER AFTER A PARITY TRAP

sVALUE TO INCREMENT ADDRESS BY TO REMAIN IN THE SAME CSR
sLOOP CONTROL FOR CSR TESTING

:FLAG SET BY ,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 XXDP CHAIN MODE
:FLAGS ACT AUTOMATIC MODE PROGRAMMING RULES
sFLAGS APT AUTOMATIC MODE PROGRAMMING RULES
:FLAGS XXDP CHAIN MODE PROGRAMMING RULES
THESE TWO BYTES MUST STAY TOGETHER

ACTFLAG:0
APTFLAG:0
XXDPCHAIN:0
;NOTE:

TAILED REPORT FLAG

(=lelolelelelelelelolelelelelalaleleleleoleleleloTelalele BN -

5043 002146
5044 002150
5045
5046 002152
5047 002154
5048 002156
5049 002160
5050 002162
5051 002164
5052 002166
5053 002170
5054
5055 002172
5056 002174
5057 002176
5058 002200
5059 002202
5060 002204
5061 002206
5062 002210
5063 002212
5064 002214
5065 002216
5066
5067 002220
5068 002222
5069 002224
5070 002226
5071 002230
5072 002232
5073 002234
5074 002240
5075 002244
5076 002250
5077 002254
5078 002256
5079 002257
5080 002260
5081 002262
5082 002264
5083 002266
5084 002270
5085 002272
5086 002274
5087 002276
5088 002300
5089 002302
5090
304
5091 002306

22-APR-81

OOOOOOOOOOOOOOOOOO‘

CZMSDCO MS11-L/M DIAGNOS TIC
ZESSRO M1113
VARIABLES
INITIALIZED TO

$TPFLG:

W
o

.BYTE
.BYTE

.BYTE
-EVEN

14:13

J_10
PAGE 139-2

0
0
0

SESCAPE:0
EVEN:
0
STRIPES:0
COUNT:
0
NOTAB:
0
BSIZE:
O
KSIZE:
0
LSIZE:
0

000000

MSIZE:
O
PSIZE:
0
TOOMANY: 0
READONLY:0
TESTADD:0,0
UNITOP: 0
STOPOK: O

000000

APTPAR: .WORD
APTECC: .WORD
NOF SMODE : 0
NOERROR:0

002400
002402

0
0

LOADBANK : 0

4 002404
5 002406

TEMP:
Qulictk:

0
0
NOSCOPE: 0
FSINFLAG:0
APTSIZE:0
FS7FLAG:0
EONFGERRgR:0

6 002410

7 002612

29 002416

1%? 002420

002440
002446
5140 002452
002460
002466
51641 002472
5142 002474
5143 002476
5144 002500
5145 002502
5146 002506
5147 002510
5148 002512
5186 002514

22-APR-81

$NULL:
$SFILLS:

000
000
000

NINININVNVMNINININ
b ed e d ad b b B =2 OO O
WA =000 NO WV
NN <OV~

VWA

TR A

ITVTUVIT

i e

A AW

AT A

nd e

A VWO

b md

8828%

o0
S3288338383838333888
838
N N ANINVNININININININNINOND . NONON)

5100 0
5101

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
VARIABLES
INITIALIZED TO ZERO

000000
000000
000000
000000
000000
000000

000000

000000
000000

N022BIT:0
NOSUPER:0
ERRADD: .WORD

s ;ESCAPE ON ERROR ADDRESS
sUSED FOR ALTERNATE DATA PATTERNS
sCOUNTS DIAGONAL STRIPES
sBACKED UP COPY OF STRIPES
:NO _TABLE BEING PRINTED - NOW
;SIZE OF 11/45 MOS MEMORY IN K WORDS
;SIZE OF MF11S=K MEMORY IN K WORDS
;SIZE OF MS11-L MEMORY IN K WORDS
;SIZE OF MS11-M MEMORY IN K WORDS
¢SIZE OF UNIBUS PARITY MEMORY IN K WORDS
sFLAGS WHEN TOO MANY ERRORS HAVE BEEN PRINTED FOR A BANK
sFLAG TO PATTERNS TO READ ONLY
s THE ADDRESS TO RUN CSR TESTS ON
JHIGHEST ACCESSABLE BANK OF MEMORY THRU UNIBUS MAP
sFLAG TO ALLOW STOPPING WITH SWITCH REGISTER
sAMOUNT OF PARITY MEMORY ACCORDING TO APT
sAMOUNT OF ECC MEMORY ACCORDING TO APT
sFLAG TO DISABLE FIELD SERVICE MODE
2''THIS 1S NOT AN ERROR'® FLAG
sBANK LOADERS ARE RELOCATED TO
sUSED FOR JUNK
;QUICK STOP FLAG FOR APT POWER FAIL
:'NO_SCOPE LOOP ALLOWED'' FLAG
:"FIELD SERVICE - NO INTERNAL INTERLEAVE'' FLAG
sAPT SIZING IN'O FLAG
s CONF IGURATION ERROR FLAG
;USED _FOR GENERAL PURPOSE INDEXING
:NO 22-BIT MODE FLAG
sNO SUPERVISOR MODE FLAG
sHOLDS THE CSR'S ERROR ADDRESS
cUSED TO STORE INFORMATION ABOUT THE 16

0,0,0,0,0,0,0,0

;POSSIBLE CSR'S

LINK1:
LINK2:

0
O

sUSED TO HOLD LINKS TO PATTERNS WHICH
sCAN EXECUTE IN THE PAR/PDR'S OR NOT
cUSED TO STORE CSR VALUES FOR CSR TESTS

PGMCSR:

.WORD

CSRHOLD: 0
KFLAG:
O

INHECC:

.WORD

INHBANK : . WORD

FULLREL : .WORD

SCMTGE:

0.0

;=EMD OF COMMON TAGS

126

2. CONTAINS NULL CHARACTER FOR FILLS
cCONTAINS # OF FILL CHARACTERS
;" 'TERMINAL NOT AVAILABLE'® FLAG

sTRUE WHEN IN FIELD SERVICE COMMAND 7

CSRINF0:0,0,0,0,0,0,0,0

000000
000000

SEQUENCE

;USED TO FLAG MF11S~K MEMORY TO TESTS
;POINTS TO PROGRAM (SR
JFLAGS INHIBIT ECC TESTS ON RELOCATION
.

CZMSDCO MS11-L/M DIAGNO

VARIABLES

000001
001415

TO NON ZER

000000

+SBTTL
1,0

K 10
PAGE 141

sCACHE CONSTANT (MOVED TO CONTRL TO TURN OFF CACHE)

TESTMODE : 40000

WORST:
SEEDHI:
SEEDLO:
MSEEDH:
MSEEDL:
HEADER:

177777
176543
123456
176543
123456
177777

~n
N4l
W
~n

OVOL

sHIGHEST BANK OF MEMORY
sHIGHEST BANK OF MEMORY+1
:S0B8 CONSTANT

ONES:
177777
FLIPLOC:3
SOF TPAT :52525

000377

BAKPAT:

000000

SLPADR: .WORD
SLPERR: .WORD
RESTART:
$ERTTL: .WORD

sHOME BANK OF LOADERS

sSET IF TESTING BANKS IN WORST FIRST MODEZ1ST PASS)
sWORKING SEED HI (USED FOR RANDOM NUMBEF. GENERATOR)
;WORKING SEED LO (USED FOR RANDOM NUMBI.R GENERATOR)
sMASTER SEED H1 (USED FOR RANDOM NUMBE GENERATOR)
sMASTER SEED LO (USED FOR RANDOM NUMBER GENERATOR)
sUSED TO PRINT HEADINGS ONLY ONCE

177400

SWAPAT:

.WORD

;FOR AID IN "MOV'' INSTRUCTIONS
sCOUNTER FOR FLIPING DATA ON WORST CASE NOISE TEST
sPATTERN FOR SOFT ERROR BACKGROUND TESTS
s :CONTAINS SCOPE LOOP ADDRESS
s . CONTAINS SCOPE RETURN FOR ERRORS

0
0

JRESTART (START ADD 202) FLAG
;. CONTAINS TOTAL ERRORS

srnensnnannnnnnnrnnxenser

.WORD

(IN PAR FORMAT)

sSTACK BEGINNING

LOADHOME : 1

)

5202 002546
5203 002550
5204 002552
5205 002554
5206 002556
5207 002560
5208 002562
5209 002564
5210 002566
5211 002570
5215
5216
5217 002572
5218 002574
5219
5220
5221 002576
5222 002600
5223 002602
5224 002604
5225 002606
5226 002610
5227 002612
5228 002613
002616
5229 002617
5230 002620
5231 002621
5232

sMAX # OF ERRORS PER BANK WITH SW11

LASTBANK : 167
LASTBLOCK : 170000
SOBK:
25.
STACK

377

177400

NOTE

THESE

TWO

LOCATIONS

MUST

STAY

TOGETHER

araxsxnsanannn

;BACKGROUND PATTERN
: SWAPPED BAKPAT

*
*

SRARRARNNRARAAARAAARN AN N RN A RANRARAAARRAAAANRAAAANRAARRARARAAARAARCAARAARRRRARARAR

177570
177570
177560

377

000

377

SWR:
.WORD
DISPLAY: .WORD
$TKS:
177560

DSWR
DDISP

$TKB:
$TPS:
$TPB:
$FILLC:
$BELL:

177562
177564
177566
.BYTE
.ASCIZ

;:TTY KBD BUFFER
;:TTY PRINTER STATUS REG. ADDRESS
2:TTY PRINTER BUFFER REG. ADDRESS
12
JSINSERT FILL CHARS. AFTER A '"'LINE FEED'
<207><377><377> ;:CODE FOR BELL

$QUES:
$CRLF:

L.ASCII
.ASCII

/7%
<15

$SLF:

ASCIZ
.EVEN

127

cUSED TO SELECT THE PROPER TEST MODE FOR A PATTERN RUN

ERRMAX: 10,

KSTACK:

SEQUENCE
INITIALIZED TO NON ZERO
sCACHE CONSTANT (MOVED TO CONTRL TO TURN ON CACHE)

VARIABLES

CACHKF: 1415

OOV OV

b amd b o

22-APR-81 14:13

CACHKN:

b b

OO0

91 002

[V LV, IV, IV, [V IV, IV, [V, IV, IV, ]

5189
5190 002

VN
NN
—

INITIAL

MACRO M1113

12>

;sADDRESS OF SWITCH REGISTER
:sADDRESS OF DISPLAY REGISTER
J:TTY KBD STATUS

;;QUESTION MARK
:2CARRIAGE RETURN

J:LINE FEED

CZMSDCO MS11-L/M DIAGNOSTIC
CONF IGURATION TABLE

MACRO M1113

22-APR-81 14:13

L 10
PAGE 143

SEQUENCE

5235
5236

.SBTTL
CONFIGURATION TABLE
;CONFIG:FIRST 16K CONFIGURATION WORDS (2 EACH)

2ND

16K CONFIGURATION WORDS (2 EACH)

ggzg

200TH

16K CONFIGURATION WORDS (2 EACH)

5241

:CONF IGURATION WORDS:

5243
5244
5245
5246
5247
5248
5249
5250
5251
5252
5253
5254
5255
5256
5257 002624
5260 003630

;
;
:
;
;
;
;
:
:
;
:
;
;
;
CONFIG: .REPT
CONF IEND:

g%gg

5242

000201

LOW:

HIGH:

201

BIT 0

BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT
BIT

1
2-4
S
6
7
8-11
12-15
0=7
8-10
11
12
13
14
15

ERRORS PRESENT

MEMORY SUCESSFULLY ACCESSED
RESERVED
SKIP ECC LOGIC TESTS FLAG (1=SKIP)
PROTECTED REGION OF ECC MEMORY
PROTECTED (PROGRAM SPACE)
(SR CODE
INTERLEAVED CSR CODE
NUMBER OF ERRORS
MEMORY TYPE
INTERLEAVED BOARD TYPE (0=128K, 1=64K)
INTERLEAVE ENABLED
‘“BACKGROUND PATTERN VALID'' FLAG
BANK SELECTED FOR TEST BY FIELD SERVICE MODE
LOADERS HOME BANK

128

trRe

RN RNty

MAJN

St a vttt

5262
5263 003630

22-APR-81 14:13

v st r et ananenenn

SBTTL

START:

Su8 TST

M0
PAGE 144

SEQUENCE

renxnntsveevnsnnnannnnt

MAIN

129

tevenasnnasenstnceaseedeee

<<INITIALIZE VARIABLES TO ZER0>>

SRARNAARRRARRANANCANARANACERRARRARAAARNANAARARNNAANNNRNRNNA
NN NNRN RN NAREARANRANARES

:«SUBTEST

INITIALIZE VARIABLES TO ZERO

:tttQittttittttttittttttttt'i.ttttitfi'fit.itti..t..'.!.'.i.'.'t."."..t'.""t"

5267 003630
5268 003634
5269 003636
5270 003640
5276 003644
5277 003650

105737
001001
000005
013706
012700
005020

012737

063046
002534
002000

NORES:

18:

002514
000167

002526

TSTB
BNE
RESET
MOV
MOV
CLR
CMP
BNE
SUBTST

$ENV
NORES
KSTACK,SP

;;SETUP THE STACK POINTER

#$CMTAG,RO
::FIRST LOCATION TO Bf CLEARED
(RO) +
::CLEAR MEMORY LOCATM .ON
WSCMTGE,RO
: :DONE?
18
:LOOP BACK IF NO
#167 ,LASTBANK
:RESTORE LASTBANK (THIS MUST BE DONE PRIOR TO SYSTEM SIZING)
<<CLEAR NON-PROGAAM SPAEESH

dRARRAARRARARR A AR RN AN AN AT AR A RANARAARN RN AR A RN ANANR

s*SUBTEST

SRR

AAR AR

CLEAR NON-PROGRAM SPACE

AR AR AR A RN AN AN A

:TH IS ATTEMPS

A AN AN AN NN RARA

RN AN RN N RN AN

NR RN

RN PR AN AN RN RANANA AN AN

RANANA R RN RS

TO GET RID OF ANY PARITY ERRORS BY WRITING INTC

AN RN ANS

;EVERY LOCATION THAT IS NOT LOADED INTO BY THE PROGRAM OR ALLOCATED

5285 003666
5286 003674
5287 003676
5288 003700
5289 003702
5290 003706
5291 003710
5292

012737
005000
000241
005520

000001

;10 THE XXDP LOADERS
MOV
:8,NOPAR

002074
2s:

160000

002074

CLR
CLC

ADC
CMP
BLO
CLR

JPARITY ACTION = COUNT & IGNORE

(RO)+

52.1160000
NOPAR

JRESTORE DEFAULT PARITY ACTICN

MACRO M1113

—r

CZMSDCO MS11-L/M DIAGNOSTIC

CZMSDCO MS11-L/M DIAGNOSTIC
CLEAR NON-PROGRAM SPA(E

MACRO M1113

5301 003714

22-APR-81

SUBTST
TR

000401
000000
005737

177746

005737
000411
012737
000405
005037
012737

177750
000014

002520

002514
002306

064342

005737
005037
052737
032737
001024
000411

172516
172516
000020
000020

012737
005237
005037
005037

140060
002426
064212
064352

5326 004050

005237

00242«

5328 004062

005037

064214

9327 004054

5329 004066
5330
5331 004072
5332 004074
5333 004102
5334
5335

012737

005037

000007

172516
172516

002522

002526

AR AN AN AN

7s:

AR R AR A AN TR IR AN NN R R RN N RN AR AN

NO22BIT

CLR

DT5+12

CLR
108:

000007

AN A R RN AN N RN A AR A NANRANARI

INC

MOV

BR
SET4
MFPT

#7 LASTBANK
DT14+412

8$
#8$

gggg

5338 004106

5339 004110
5340 004116

SEQUENCE

TYPE OF SYSTEM SIZER

BR
SYSSIZ
PROTYP: .WORD
0
SYSSIZ: SET4
43
TST
CONTRL
SET4
98
TST
MAINT
BR
5%
9s%:
MoV
#14,CACHKF
BR
5%
4$:
CLR
CACHKN
MOV
#ZEROS,DT14
5%:
SET4
#6$
TST
MMR3
CLR
MMR3
8IS
#BIT4 ,MMR3
BIT
#BIT4 ,MMR3
BNE
108
BR
78
;* 11/34 TYPE MACHINES ENTER HERE
6S:
MOV
#140000, TESTMODE
INC
NOSUPER
CLR
DT5+10
CLR
DT14+410
;* 11/45 TYPE MACHINES ENTER HERE

064354

000417

N 10

PAGE 145

NN NARA NN NN

NA RS

110037

003716

000003

003716

002522

5341 004120
ggzg 004124

005237
012737

002426
140000

5344 004132
5345 004140
3346 004144
5347 004150
5348 004156

005037
005737
012737
i

056510
177766
177777

MOv8

CMP
BNE

8s:

056510

118

RQ,PROTYP

A NN NN NI

IR AN WA

AARARE

AN AR

RNSY

sSKIP OVER VARIABLE LOCATION
sSEE IF CACHE REGISTER RESPONDS
JYES = DO WE HAVE 11/44 TYPE CACHE
s0R 11/60 TYPE CACHE?
sBRANCH IF 11/44 TYPE CACHE
sTURN OFF CONSTANT FOR 11/60 CACHE
sNO CACHE ON SYSTEM
:DO NOT PRINT CONTRL ERROR MESSAGES
;D0 WE HAVE AN MMR3?
sYES WE DO
;SEE IF THERE IS 22-BIT MODE

;BRANCH IF 22-BIT RELOCATION
;BRANCH IF MMR3 BUT NO 22-BIT RELOC.
sMAKE TEST MODE USER
;NO SUPERVISOR MODE

;NO 22 BIT MODE

;124K MEMORY MAX. MEMORY SIZE

;DO NOT TRY TO PRINT ERROR REGISTER

cERROR MESSAGES, BECAUSE THERE IS
;1S NO ERROR REGISTER!

:TYPE OF PROCESSOR TEST: THIS INSTRUCTION
: (AVAILABLE ON NEWER PROCESSORS ONLY) PLACES
; A CODE IN THE LOWER BYTE OF RO THAT

: IN?{CQIES THE
022737
001005

130

<<TYPE OF SYSTEM SIZER>>

AR AR AN A AN NN RN AN

s *SUBTEST

5302 003714
5303 003716
9304 003720
5305 003726
5306 003732
5307 003740
5308 003744
5309 003746
5310 003754
5311 003756
5312 003762
5313 003770
5314 003776
5315 004002
5316 004006
5317 004014
5318 004022
5319 004024
5320
$321 004026
5322 004034
5323 004040
5324 004044
5325

14:13

PROCESSOR TYPE. 1=11/44

:MOV_THE CODE TC PROTYP

INC
MoV

#3.PROTYP
8s

NOSUP
#140000 TESTMODE

s1S THIS AN 11/24?
:BRANCH IF NOT = WE HAVE AN 11/44

SET4
CLR
TST
MOV
RESé

#1118
CPERRF
an177766
#-1,CPERRF

sTRAPS GO TO 118
;R=C
cCLEAR THE FLAG
sR-C
:1S THERE A CPU ERROR REGISTER? ;R-(
:YES - TRAPPED
sR-C
:R-C

sNO SUPERVISOR MODE
IMAKE TEST MODE USER

CZIMSDCO MS11-L/M DIAGNOSTIC
TYPE OF

SYSTEM SIZER

MACRO M1113

$351 004200

22-APR-81 14:13
SUBTST

8 1
PAGE 147

SEQUENCE

<<INITIALIZE VARIABLES TO NON ZERO>>

;ttQtttttttQtttttQtttttttttttttttQt't.t.t't't'.'."".".'.""Q"t't't.tttt'tt'

< «SUBTEST

INITIALIZE VARIABLES TO NON 2ERO

;ttttttttttttttttQtttt'tt"tttttttttttttttttQt.ttt.t...."'t.".tt.t'.t'QtQ't't'

5352 004200

§353 004206
5354 004214

§355 004222
5356 004030
5357 004236
5358 004244
§359 004252

5360 004260
5365 004266

012737

000003

002556

012737
012737
013737
013737
012737

176543
123456
002546
002550
000377

002546
002550
002542
002544
002572

012737

177400

002574

SET

MOV
SET

WORS?

#3.FLIPLOC
HEADER

MOV
MOV
MOV
MOV
MOV

#176543 ,MSEEDH
#123456,MSEEDL
MSEEDH,SEEDHI
MSEEDL.SEEDLO
#377 BAKPAT

SUBTST

<<1NITIALIZE VECTORS>>

MOV

;PRIME THE RANDOM NUMBER GENERATOR
:BOTH HIGH AND LOW WORDS

#177400, SWAPAT

;ttttttQttQttttttttQttt't'tttt'ttttttttttttttttt't.ttttttQtttttttt.tt'tttttt'ttt

; *SUBTEST

INITIALIZE VECTORS

:tttttttt'tt'.ttt'tt.tt"'t"ttttQttfit'tt..tQtttfitttttttttfitttttt.t.t'tt."t'ttt

5366 004266
5367 004274
5368 004302

012737
012737
012737

055374
000340
055730

000020
000022
000030

MOV
MOV
MOV

#$SCOPE, I0TVEC ;10T VECTOR FOR SCOPE ROUTINE
#340,10TVEC+2
~:;LEVEL 7
#SERROR, EMTVEC :;EMT VECTOR FOR ERROR ROUTINE

5370 004316
5371 004326
5372 004332

012737
012737
012737

063142
000340
051564

000034
000036
000024

MoV
MOV
MOV

#STRAP, TRAPVEC ;:TRAP VECTOR FOR TRAP CALLS
#340, TRAPVEC+2; LEVEL 7
#SPWRDN ,PURVEC ; ;POWER FAILURE VECTOR

5374 004346
5375 004354

012737
012737

Mov
MOV

#PARITY PARVEC:GET READY ~“OR PARITY ERRORS
#3640, PARVEC+2

5369 004310

5373 004340
5376 004362

5377 004370
5378 004376
5379 004404
5380 004412
5381 004420
5386 004426

012737
012737

012737

012737
012737
012737
012737
012737
104423

000340
000340

037760
000340

040154

000340
040130
000340
040142
000340

000032
000026

000114
000116

000010
000012
000004
090006
000250
000252

MOV
MOV
MOV

MOV
MOV
Mov
MOv
MOV
CACHON

#3460, EMTVEC+2

~:;LEVEL 7

#3460, PWRVEC+2

:;LEVEL 7

#PDP1105 ,RESVEC;RESERVED INSTRUCTION TRAP

#3640, RESVEC+2
#TIMEOUT ,ERRVEC; SETUP TIMEOUT ERRORS
#340, ERRVEC‘?
JSET PRIGRITY OF ERROR TRAPS
#MNTRAP MMVE C
;VECTOR FUR MEMORY MANAGEMENT
#3640, MMVEC+2
:TURN CACHE ON

131

CZMSDCO MST11-L/M DIAGNOSTIC
INITIALIZE VECTORS

MACRO M1113

22-APR-81

5389 004430

SUBTST

14:13

¢ 1

PAGE 149

SEQUENCE

<<INITIALIZE PATTERNS>>

SRR RRAARNANNANANARNANR AN R CA N AN AANARNNANARNNEN RN RAAANRN RN NN

S *SUBTEST

ANNCRANA

ANANAY

INITIALIZE PATTERNS

;tttttlt'."'.'Qtfi.t""""'.'Q'.t.'..'....Q"'.".'..'.'.'."Q""""'."Q"'

5390

P Puur GurGanrd
o P P PP Pur Pur®
[ P PPy S PP

539
5394 004430
5395 004434
5396 004436
5397 004442
5398 004446
5399 004452
5400 004454
5401 004460
5402 004464
5603 004466
5404 004472
5405 004476
5406 004502
5407 004504
5408 004510
56409 004514
5410 004516
5611 004522
5612 004526
5413 004532
5414 004534
5415 004540
5416 004544
5417
5418 004546

;THE APT E-TABLE DETERMINES WHICH PATTERNS ARE GOING TO BE RUN.
SEACH BIT SET REPRESENTS A PATTERN TABLE ENTRY THAT IS TO BE LEFT
:ALONE (TO BE RUN).
EACH BIT CLEARED REPRESENTS A PATTERN TABLE ENTRY
STHAT

063112

MOV
MOV
MOV
MOV
CALL
MOV

017626
000020
004546

#8.,R2

017656
000020
004546

MOV

#16. ,R2

000010

MOV

#8. ,R2

020042
000020
004546

MOV

#16. ,R2

MOV

#8.
RO

B8R

SUBAAA

CALL
MOV
MOV
CALL
MOV

004546

CALL
MOV
MOV
CALL
MOV

000010
004546

CALL

PATPLUG:SUBTST

s *SUBTEST

006001

012713

026414

062703

000002

PATPLUG
(RO) +,R1
#MKPAT R3
PATPLUG
(RO)+,R1
PATPLUG
(RO +,R1
#MMIPAT R3
PATPLUG
(RO)+ ,R1

PATPLUG
<<SUBR

AANAAARAA A AN R A AR

000207

#$DDW0
, RO
(RO)+,R1
#MKCSRT ,R3
#6. ,R2
PATP{UG
(RO)+ ,R1

MOV

000010
004546

5419 004546
5420 004554
5421 004556
5422 004560
5423 004564
5424 004564
5425 004570
5426 004607

IS TO BE OVERLAYED WITH THE ADDRESS OF A NULL PATTERN.

SUBR
T

PLUG IN NULL PATTERNS>>
NI

AN AR A AAARNAANARAANARAANNRNRAANNARNANRAANNRNNRANNNANNNIANNORNRNS

PLUG IN NULL PATTERNS

FOR I := #1 TO R2
ROR
R1
ON.NOERROR
MOV #MT0999, (R3)
END ;OF ON.ERROR

ADD #2,R3
END ;OF FOR

RETURN

;IF CARRY CLEAR

132

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR

PLUG IN NULL PATTERNS

MACRO M1113

5429 004604

22-APR-81

SUBAAA:

SUBTST

14:13

D 1N
PAGE 151

<<CLEAR THE CONFICURATION TABLE>>

SRR AARRRANARANANRAARNA A ANO AR AN

:*SUBTEST

SEQUENCE

NN RAN R AAANARAAAANRAAANAAANRANN
AN
ANEAANANNAN

CLEAR THE CONFIGURATION TABLE

SRARRAAARAANRARANAAAANANRAAEAAANAAARAAARAAARARANAANAIAANRANAARAANAARANAACN
OO ANOANY

004604
004612
004616
004620
004624
004626

012700
005020
022700
001374

004626

012737

5641 004634

002624

18:

003630

000002

;THIS ZEROS (UNLESS WE STARTED AT ADDRESS 202) THE CONFIG TABLE
:WHICH IS FULLY DISCRIBED AT LOCATION “‘CONFIG''.
.ENABLE LSB
IF RESTART IS FALSE
MOV
#CONFIG,RO
CLR
(RO)+

CMP
BNE

#CONFIEND,RO
18

END ;OF IF RESTART
.DSABL
LSB

002104

MOV
SUBTST

#8IT1,CPUBIT
;SET ID BIT
<<SIZE FOR A HARDWARE SWiTCH REGISTER>>

;tt.ttQ'ttt..tt*tttttt'ttt'itfiit.fit.'ttii'.tQt't't'it"t.fi"fi'ttfitt.t'ttt"""t

:*SUBTEST

SIZE FOR A HARDWARE SWITCH REGISTER

:tfitt*t't!tttttttttttttt*'ttttQt'ttfifitfittfiti.i.t.t"ttt.t'ttfi"tfi'tt*t"ttttt't'

5442
5443
5444
5445 004634
5446 004642
5447 004650
5448 004656
5449 004666
5450 004670
5451 004674
56452 004676
5453 004720
5454 004726
5455 004734
5456

:;1F NOT FOUND OR IT IS
::EQUAL TO A '*=1'", SETUP FOR A SOFTWARE SWITCH REGISTER.
.ENABL

012737
012737

177570
177570

000403
012716
000002

004676

012737
012737

000176
000174

SET4
MOV

002576
002600
3s:
002576
002600

28:

LS8

438
#DSWR, SWR

MOV
#DDISP,DISPLAY
IF #-1 EQ aSWR
BR
2%
Moy
#28, (SP)

:TRAPS TO 4 GOTO 3$
:;SETUP FOR A HARDWARE SWITCH REGISTER

::AND A HARDWARE DISPLAY REGISTER
:1F NO TRAP FROM REFERENCE TO @SWR AND aSWR
= #-1
:;BRANCH IF NO TIMEOUT
$*SET UP FOR TRAP RETURN

RES4
;RESET TRAPS TO 4 TO DEFAULT
MOV
WSWREG,SWR
:;POINT TO SOFTWARE SWR
MOV
#DISPREG,DISPLAY
END ;OF IF #-1
.DSABL

LSB

133

CZMSDCG MS11~L/M DIAGNOSTIC
MACRO M1113
SIZE FOR A HARDWARE SWITCH REGISTER
5459 004734

22-APR-81

SUBAAB:
R

SUBTST

s *SUBTEST

5481 005132

5482 005132

PAGE 153

SEQUENCE

<<SETUP ACT, APT, & XXDP>>
R

CLR

$PASS

sCLEAR PASS COUNT

SET

STPFLG

s INDICATE NO TERMINAL

SET

APTSIZE

IFB #BITS5 SET.IN SENVM

END ;OF IFB #BITS
IFB #BIT7 SET.IN SENVM
END :OF IFB #BIT7

1FB $ENV EQ #1

012737
012737

045250
063050

THE PROGRAM EVERYTHING

;1T CARES TO KNOW ABOUT APT, ACT, & XXDP,

063134

000024
002576

SET
MGV

EngV

APTFLAG,QVFLAG,SAUTO,QUICK
#APTDOWN,PWRVEC

#S$SWREG, SWR

;USE APT SWR

IF 42 NE #STACK AND 42 NE #0
SET QVFLAG,$AUTO

IF 42 EQ #SENDAD

SET
ACTFLAG
ELSE
SET
XXDPCHAIN
END .OF IF 42
END ;OF IF 42
END ;OF IFB SENV

L Lt

sTHIS SETS UP A BUNCH OF FLAGS TO TELL

005037

SETUP ACT, APT, & XXDP

5460
5461
5462 004734
5463 004740
5464 004750
004756
5666 004756
5467 004766
5468 004774
5469 004774
5470 005004
005034
005042
005050
005052
005070
005104
5477 005114
5478 005122
5479 005124
005132

14:13

134

CZMSDCO MS11-L/M DIAGNOSTIC
SETUP ACT, APT, g XXDP

MACRO M1113

5484 005132

SUBTST

s*SUBTEST

5486 005140
5487 005146
5488 005156

AN RN A RN

RAAANANA

AN ANNRANANANINRANRARANAAAANAANRNNANRNANNARNORY

PROTECT PROGRAM & LOADERS

000200
000200

SEQUENCE

<<PROTECT PROGRAM & LOADERS>>

SNARA AR ANANNARA AN AN

5485 005132

F 1
PAGE 154

22-APR-81 14:13

BIS
#BIT7,CONFIG
8IS
#81T7,CONF1G+4
IF _#SENDAD NE &2

002624
002630

TYPE

2689 005162
490
5491 005162

MSG00O

END ;OF IF MSENDAD
SUBTST

;TYPE PROGRAM TITLE

<<CHECK SYSTEM FOR CACHE>>

SARRRANRRAANANRARARA AN

: *SUBTEST

L L

sPROTECT PROGRAM SPACE (BANK 0)
;PROTECT LOADER SPACE (BANK 1)
sNOT ACT=112

AR AR AANARARNAAAARANANNANANANNARARRAARNRANNRANAAANANNIRNNRNS

CHECK SYSTEM FOR CACHE

;ttttttttttfitt.tt'tttQ"t"t"ttttttt'tttttttt.ttttt'iQt't."..t"..'...."...'.

N
&HW

o0
=1=

VAW AWLIWAIAWIWAVAW Al
v AT YAV
IR v
—
b b pd b b d ad b b o0
v
VNN
WNN=O 0

)
5495 005162
5496 005170
5497 005174
5498 005202
5499 005206
5500 005214
5501 005220
5502 005224
5503 005226
5504 005232

wvivawnwwnaw

0O
(=]=]

8888388 o

07 005246
8 005254
005262

;% THIS FIGURES OUT IF THERE IS A CACHE ON THE SYSTEM,
;% WHAT TYPE OF SYSTEM IT IS, AND WHETHER IT IS ENABLED

i+ OR DISABLED.
SET4

005737

177746

005737

177750

gg;‘

005737

177754

TST

SET4

000405

1$:

000402

052737
042737
032737
001004
032737
001413
104424
013737
005037
000404

000014
000014
000004

177746
177746
177746

000010

177746

28:
4.

TYPE
BR
TYPE
BR

TYPE
8IS

38:
6$:

:?iNT

;1S THERE A MAINTENANCE REGISTER?

DATARG

;1S THERE A DATA REGISTER?

MSG117
4$
MSG116
43

11744

11734

: 11760
sSET CACHE DISABLE BITS

sBRANCH IF THE BIT IS SET

BEQ
TYPE

63
MsG121

sBRANCH IF THE BIT IS SET
s CACHE BYPASSED

gkR

ggCHKN

sCACHE

TYPE
TYPE

MSG119
MSG120

: NO
; CACHE AVAILABLE

BIC
8IT

8IT

002516

s1S THERE A CONTROL REGISTER?

MSG118
#BIT2!BIT3,CONTRL

BNE
78:

CONTRL

#2$

#BI1T2!BIT3,CONTRL
#81T72,CONTRL

#B81T3,CONTRL

CACHOFF
MoV
CACHKN, CACHKN+2

sCLEAR CACHE DISABLE BITS
;1S THE BIT SET?

;1S THE BIT SET?

sSAVE INFO ABOUT CACHE

CANNOT BE USED = IT'S BYPASSED

CZMSDCO MS11~L/M DIAGNOSTIC
CHECK SYSTEM FOR CACHE

MACRO M1113

5566 005326

22-APR-81

14:13

SUBTST

104421

5568 005330
gggg 005334

005737
001011

002426

§571
5572 005336
gg;z 005344

042737
052737

030000
010000

§575 005352
gg;g 005356

006606

5578

SEQUENCE

<<SETUP USER & SUPERVISOR STACK>>

;ttttttttttttttttttttt'ttt"tttttttt.ttt.tttttttttttttt'ttttt'tttttttt'ttttttttt

s *SUBTEST

5567 005326

6N
PAGE 155

gggg 005360

052737

5581 005366
gggg 005372

006606

5584 005374

8s:

DEENERGI2E

ST
BNE

177776

NOSUPER
58

:TURN OFF MEMORY MANAGEMENT

*IS THERE A SUPERVISOR MODE?
*NO-SKIP SUPERVISOR SETUP.

;SET PREVIOUS MODE TO SUPERVISOR
BIC
#8I1T13'BIT12,PSW
BIS
#81T12.PSW

177776
177776

PUSH
MTIP]

030000

SETUP USER & SUPERVISOR STACK

2223323322232 2823332223232222222222222233
2322232223322 23
2222222 XXX
L2 Y

S$:

#SUPSTK
SSP

;SET PREVIOUS MODE TO USER

8IS

#8IT13!'81T12,PSW

PUSH
MTP]

WUSESTK
USP

SUBTST

<<GET SOFTWARE SWITCH REGISTER IF NECESSARY>>

:ttttttttttttttttttttttt't'ttttttttttttttittttt'ttttttttttttttttttt'tttttttttt"

S wSUBTEST

GET SOFTWARE SWITCH REGISTER IF NECESSARY

;ttttttttttttttttt'tttttttttttttttttttttttttttttttttttttttttttttttttttttttttt'tt

5588 005374
5589 005402
5590 005412
5591 005414
gggg 005414

104407

5597 005414

IF SAUTO IS FALSE
IF SWR EQ #SWREG
GTSWR
END :0F IF SWR
END ;OF IF SAUTO
SUBTST

JIF NOT(APT OR ACT)
;IF SOFTWARE SWITCH REG SELECTED
::GET SOFT-SWR SETTINGS

<<GET MEMORY MANAGEMENT READY>>

;tttttttttttttttttttttttttttttttttttttttttttttQttttttttttttttttttttttttttttttttt

S «SUBTEST

GET MEMORY MANAGEMENT READY

;*tfitttttttttttttttttttttttttttttttttttttttttttttttttttitttttttttttQtttttttttt't

5601 005414
5605 005416
5606 005432

104422
104420

KMAP
MAP
ENERGIZE

:MAP KERNEL SPACE 1 TO 1
sMAP SUPERVISOR SPACE (TEST AREA)
sTURN ON MEMORY MANAGEMENT

TO 1

136

CZMSDCO MS11-L/M DIAGNOSTIC

GET MEMORY MANAGEMENT READY

MACRO M1113

22-APR-81 14:13

5609 005434

NEWTST

H 11
PAGE 157

SEQUENCE

<<BIT TEST OF ALL CSR'S>

: tttttttttttt'tttttttttt'ttttt!tttttttt.t.'......"'m...

S#TEST 1

5610
5611
5612
5613
5614
5615
5616
5617
5618
5619

005434

.'.t.t‘..ttl'."'

BIT TEST OF ALL CSR'S

H tttttttttttttttttttttttt't'ttttttttQtt.ttt.tt.'t'ttt.'....""

000004

TST1:

'"'t"t'tt'ttttt

SCOPE

;* THE FIRST PART OF THE CONFIGURATION ANALYSIS DOES THE FOLLOWING:
i
1) FINDS WHICH CSR'S RESPOND, AND PUTS THEM INTO THE CSR INFORMATION
ix
TABLE, AND STORES ANOTHER BIT FOR ‘‘TOTCSRS''.
i
2) TESTS THE CSR BITS COMMON TO ALL CSR'S.
e
3) FIGURES OUT IF THERE IS AN EUB BIT, AN ECC BIT, AND THE EXISTANCE
e
OF THE ERROR ADDRESS BITS, AND MARKS THIS IN THE CSR
e
INFORMATION TABLE.
e
4) TESTS THE BITS PARTICULAR TO THAT TYPE OF CSR.
P
5) IF ANY BITS TEST BAD IN THE CSR UNDER TEST., THE CSR OK BIT IN THE
e
CSR INFORMATION TABLE IS CLEARED.

gggg

i 5?scggronnArxo~ BITS ONE THROUGH THREE FORM A CODE WHICH GIVES THE TYPE

5622
5623
5624
5625
5626
5627

e
2
TYPE
‘% UNIBUS PARITY
e
MS11-L
Ta
MF 115K
e
MS11-M

gggg

ERR. ADDR.
BIT2
1
1
1
1

‘% 11/45 BIPOLAR

* N

gggg

PARITY
8IT1
1
1
0
0
1

NOT EUB
BITO
1
0
1
0
1

CODE TOTALS
7
6
5
4
3

;% THIS MEMORY CODE WILL BE USED IN THE SECOND PART OF THIS ANALYSIS

5632 005436

5633 005440
5634 005442
5635 005446

5636 005454

- %

005005

005000
012703
012737

5637 005462
5638 005464
5639 005470
5640 005472
5641 005500
5642 005506
5643 005512
5644 0055146
5645 005520
5646 005524
5647 005526
5648 005534
5649 005536
5650 005542
5651 005546
5652 005550

005713
052705
005004
052760
052760
004537
100001
012713
032713
001403
042760
005013
012713
032713
001417
042760

5654
5655
5656
5657
5658
5659

004537
000010
012713
004537
000022
012713

5653 005556

005562
005566
005570
005574
005600
005602

012713

CLR

172100
000001

002074

MOV

1$:

000001

000007
000030
006042

CLR
MOV

002432
002432

040000
040000

000001

002432

020000
020000

000002

020000

006042

020000
006042
020000

002432

38:

SET4

RO
#CSRADD ,R3

#1,NOPAR

w28

;RS IS THE TOTAL CSR NUMBER

*RO IS A TABLE INDEX
:R3 HAS THE CSR ADDRESS

:IGNORE PARITY ERRORS

TST
BIS
CLR
BIS
BIS
JSR
.WORD
MOV
BIT
BEQ
RIC
CLR
MOV
8IT
BEQ
BIC

(R3
;DOES THE CSR RESPOND?
#1,RS
R4
:CLEAR THE LAST CSR INDICATOR
#7 ,CSRINFOCRO)
:SET ALL THE MEMORY INFO BITS
#81T4!'BIT3, CSRINFO(RO)
;YES-MARK IT IN CSR INFORMATION TABLE
RS,TEST
sTEST BIT O AND 15
BIT1SIBITO
#81T14, (R3)
;1S THERE A BIT 14 RESPONDING
#81T14. (R3)
SCIT'S THE EUB BIT)
3
:BRANCH IF NO EUB BIT
#8IT0,CSRINFO(RO) ;CLEAR EUB INFO IN THE CSR TABLE
(R3)
;CLEAR THE CSR UNDER TEST
#81T13, (R3)
:DOES BIT 13 RESPOND
#8IT13. (R3)
:(TO TEST FOR ECC CSR)
4
BRANCH IF NOT ECC CSR
#BIT1,CSRINFO(ROY ;CLEAR PARITY INFO IN THE CSR TABLE

JSR
.WORD
MOV
JSR
.WORD
MOV

RS, TEST
BIT3
#81T13, (R3)
RS, TEST
BIT4!'BIT1
#BITi3, (R3)

MOV

#8IT15, (R3)

;SET THE INMIBIT MODE POINTER TO 1ST 16K

STEST BIT' 3

;TEST BIT 1 AND 4

137

CZHSDCO MS11-L/M DIAGNOSTIC
n

BIT TEST OF ALL CSR'S

5661 005606
5662 005612
5663 005614
5664 005616
5665 005622
5666 005626
5667 005630

004537
000004
005013
052713
032713
001404
004537

5669 005636

000403

5671 005646
5672 005654

032760
001014

5668 00563¢

5670 005640

007740

042760

MACRO M1113

006042

48:

007740
007740

006042

000004

000002

002432

001410

5676 005666
5677 005672
5678 005676

012713
022713
001403

5680
5681
5682
5683
5684

005706
005710
005716
005720
005726

005013
022760
100004
016037
104021

5686 005736

001016

5688 005746

001404

5675

5$:

6$:

007760
007760

000040

002432

002050

000002

78:

002432

5706 006034
5707 006040
5708
5709 006042

001006
016037
104021
005060
062700
062703
006305
103001
005204
022700
001221
000241
006005
005704
001402
052705

010537
000437

002432

002432
000002
000002

000040

100000
002216

012501

5711 006046

030113

5713
5714
§715
5716
5717

011337
010137
032713
001004
104035

5712 006050
006052
006056
006062
006066
006070

001013

SKIP OVER THE INFORMATION REPORTING

8IT
BNE

#BIT1,CSRINFO(RO)
78

BIC

8IT

;ARE THERE ERROR ADDRESS BITS?

#8IT2,CSRINFO(RO) ;REPORT THAT THERE ARE NO ERROR ADDRESS BITS.
1s THIS CSR AN ECC CSR?
ANCH IF NOT

#8170, csnxnro<no$;1S THE EUB BIT SET?
BRANCH IF IT IS

MOV
CMP
BEQ

#7760, (R3)
#7760, (R3)
78

:PUT PATTERN & SBE BIT INTO BITS 4=>11
ARE THEY STILL THERE?
- BRANCH FOR MF11S-K CSR

CLR
CMP
8PL
MOV
ERROR

(R3)
;CLEAR CSR
cco CSRINFO(RO) :IS THIS A LEGAL CONF IGURATION?
108
SBRANCH IF IT'S LEGAL
CSRINFO(RO) ,BAD
+21
LLEGAL TYPE ERROR

002050

BIC

BIT
BNE

11$:

28:

8$:

98 :

#8170, csaxnro(nos no - SET EUB BIT FOR MST11-M

»BIT2, csaxurocaos ooss THIS CSR HAVE ERROR BITS
2

-BRANCH IF TRUE

118

BRANCH IF NOT

2$
CSRINFO(RO) ,BAD
+21
CSRINFO(RO)
#2.R0
wz R3

;ILLEGAL TYPE ERROR
:CLEAR THE CSR INFO-IT WILL NOT EXIST IN THE PROGRAM
- INCREMENT TO NEXT CSR TABLE
“INCREMENT TO NEXT CSR

ss
R4
#40.RO
18

;1S THERE A CSR 0?
SYES = SET CSR PRESENT FLAG
*ARE WE DONE?
*BRANCH IF MORE TO DO

RS
R
9
#81T15,RS

:RESYNC RS
*WAS THERE A CSR 0?
*BRANCH IF NOT
SYES - SET IN THE CSR TABLE

8IS

R1, (R3)

*SET THAT IN THE CSR UNDER TEST

BNE

18’

*BRANCH IF STILL THERE

BIT

#81T1,CSRINFO(RO} ;ARE THE OTHER 2 BITS SET?

BNE
MOV
ERROR
CLR
ADD
ADD
ASL
BCC
INC
CMP
BNE
cLe
ROR
TST
BEQ
BIS

#8IT0, csaxnro<no$

MOV
RS, TOTCSRS
:STORE RS IN TOTCSRS
BR
CTEST
JUMP OVER SUBROUTINE
-THIS SUBROUTINE TESTS THE CSR BITS
MOV
(RS)+,R1
;GET THE BIT TO TEST
BIT

002144
002042
100020

7740

;TEST BIT 2

BIT

TEST:

5710 006044 050113

:BRANCH IF NO ERROR ADDR. BITS.
STEST BITS 5->11

BEQ

5689 005750 032760 000001 002432

5690 005756
5691 005760
5692 005766
5693 005770
5694 005774
5695 006000
5696 006004
5697 006006
5698 006010
5699 006012
5700 006016
5701 006020
5702 006022
5703 006024
5704 006026
5705 006030

RS,TEST
BIT2
(R3)
#7740, (R3)
#7740, (R3)
5
RS, TEST

BEQ

5685 005730 032760 000004 002432 108:
032760

SEQUENCE

:WE MUST NOW TEST FOR MS11-M ON THE UNIBUS

5679 005700 042760 000001 002432

5687 005740

I N
PAGE 158

JSR
.WORD
CLR
8IS
BIT
BEQ
JSR

LWORD

5673 005656 032760 000001 002432
5674 005664

22-APR-81 14:13

MOV
MOV
BIT
BNE
ERROR

R1. (R3)

*1S THE BIT STILL THERE?

(R3),CSR
SREAD CSR
R1,600D
#BIT15!BIT4,(R3);1S IT BECAUSE OF A SBE OR DBE?
1$
:BRANCH IF IT IS
+35
:BIT SET ERROR

138

cZ MSDCO MS11-L/M DIAGNOSTIC
n
BIT TEST OF ALL CSR'S
O = (NN =D b —d

42760

5726 006124
5727 006126
5728 006134
5729 006136

000010

MACRO M1113

002432

22-APR-81 14:13

J 1
PAGE 158-1

SEQUENCE

#BIT3, CSRINFO(RO)

R1, (R$)

le:

;CLEAR CSR OK BIT

;CLEAR THE SELECTED BIT

R1.(R3)
b1
§§3é'55"

2IS IT CLEARED?
*BRANCH IF IT IS CLEARED
SREAD CSR

2s
+10

:BRANCH IF TRUE
:BIT CLEAR ERROR

00D
#31T15'8174,(R3);1S 1T BECAUSE OF A SBE OR DBE?

002432

2%:

TRACE:

zglrs.csnxnro<noi :CLEAR CSR OK BIT
-WORD

139

C 4 MSDCO MS11-L/M DIAGNOSTIC
T
BIT TEST OF ALL CSR'S
1

5731
5732
5733 006140
5734 006142
5735 006150
5736 006156
5737 006162
5738 006170
5739 006176
5740 006200
5741 006204
5742 006210
5743 006212
5744 006214
5745 006216
5746 006222
5747 006226

MACRO M1113

177777
002000

002502

100000
100002

002362
002364

00236¢

CTEST:

172350

K11
PAGE 159

CACHOFF
Mov
#177777 ,PGMCSR
MoV
#2000,
K IPARS
Mov
#TESTADD
,R1
Mov
Mov

#100000, TESTADD
#100002, TESTADD+2

CLR

CSRNO

CLR

002146
002216

SEQUENCE

000002
002146

18:

¢CLEAR CSP COUNTER

TOTCSRS,R3

;0BTAIN CSR MAP

ASL

;PUT HIGH ORDER BIT INTO C BIT

ADD
MOV
TST

#2.R0
RO CSRNO
R3

SUPDATE CSR COUNTER

B8R

NOP

B(CS

BEQ

28:

000002

002432

000004
123456
123456
172100

000000
000002

000000

123456
123456
020006
000000
172100
000002

172100

172100
000000
000002
172100

NOP
cLe
BIT
BEQ
BIS

MOV
MOV
gk"

63:

002432

177773
177600

002502
000000
000000
002502

000137

007036

8s:
38:

¢BRANCH IF CSR EXISTS

;1S MAP EMPTY?
*BRANCH IF SO

#81T1,CSRINFO(RO)
58
#8172, CSRADD (RO)

:DEBUG AID
*CLEAR CARRY
*IS THIS PARITY MEMORY?
*BRACH IF NOT
*SET WRITE WRONG PARITY

#123456.32(R1)
ggRADD(RO)

;RESTORE CSR

#123656,a(R1)

SWRITE DATA

#0,

CSRADD (RO)

;CLEAR THE CSR UNDER TEST

MOV
MOV
TST
MOV
8IT
BEQ

#123456.82(R1)
#20006, CSRADD (RO)
a(R1)
CSRADD (RO) R4
#8IT1,CSRINFO(RO)
78

:SET DIAG CHECK MODE
*WRITE CHECKBITS TO CSR
SWRITE CSR TO R&
:PARITY MEMORY?
*BRACH IF NOT

8M]

*BRACH IF SO

MOV

B8R

NOP
ASH

BIC
CMP

000157

:DEBUG AID

MOV

TST

78:

:SET UP MAP REGISTER

MOV
48:

006232
006234
006236
006240
006246
006250
006256
006264
006272
006276

5759 006300
5760 006306
5761 006314
5762 006322
5763 006330
5764 006334
5765 006340
5766 006346
5767 006350
5768 006352
5769 006354
5770 006356
5771 006360
5772 006364
5773 006370
5774 006374
5775 006376
5776 006402
5777 006404
5778 006406
5779 006414
5780 006422
5781 006430
5782 006432

14:13

;THE FOLLOWING ROUTINE DETERMINES WHICH CSR CONTROLS PROGRAM SPACE

5748 006230

5749
5750
5751
5752
5755
5754
5755
5756
5757
5758

22-APR-81

#123456,3(R1)

#-5.Ré4

#°Ci77.R4
#157.Ré

BNE
MOV
NOP
CLRCSR
MOV
MOV

#0,3(R1)
#0,a2(R1)

BEQ
JMP

FINT
CLRMEM

CMP

1$
RO,PGMCSR

PGMCSR, #177777

*WRITE DATA

*PARITY ERROR?

STRY NEXT CSR
*DEBUG AID

;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 1F FOUND

140

BIT TEST OF ALL CSR'S

5784
5785
5786
5787
5788 006436
5789 006444
5790 006452
5791 006460
5792 006466
5793 006470
5794 006474
5795 006500
5796 006504
5797 006510

MACRO M1113

L1
PAGE 160

SEQUENCE

141

: IF PGMCSR WAS NOT FOUND BY THE PRECEEDING ROUTINE, THIS ROUTINE TRIES
:TO FIND IT FOR INTERLEAVED MEMORIES

012771
012771
062737

123456
123456
010000

000000
000002
172350

FINT:
1$:

2$:

177776
002216
000002
002146

3$:

5798 006512

5799 006514
5800 006516
5801 006520
5802 006522
5803 006530
5804 006532
5805 006540
5806 006544
5807 006552
5808 006556
5809 006562
5810 006566
5811 006572
5812 006574
5813 006600
5814 006604
5815 006610
5816 006614
5817 006616
5818 006620
5819 006624
5820 006632
5821 006636
5802 006642
5823 006646
5824 006652
5825 006654
5826 006656
5827 006660
5808 006662
5829 006664
5830 006672
5831 006674
5832 006700
5833 006704
5834 006710
5835 006714
5836 006720
5837 (06722
5838 006726
5839 006732
5840 006736

22-APR-81 14:13

000763

012700
012737
005771
062700
010037
022700
001515
016004
072427
042704
022704
001401
000757

020006
177776

002000
000000
000002
002146
000040

172100

48:

5$:
172350

6$:

172100
177773
177600
000157

110037

002502

012700
013703
062700
010037
006303

177776
002216
000002
002146

7%:

23%:

103403

005703
001405
000767

020006
177776
000002
000002
002146

000040

042704
022704

172100
177773
177600
000157

172100

SET4

MOV
MoV
ADD
BR
MOV
MOV
ADD
MOV
ASL
BCS
TST
8EQ
BR
MOV
BR

SET4

MOV
MoV
TST
ADD
MOV

CMP
8EQ
MOV
ASH
8IC
CMP
BEQ
B8R
Movs
SET4

MOV
MOV
ADD
MoV
ASL

#-2 R0
TOTCSRS,R3
RO

RO.CSRNO

g€0006.CSRADD(RO)
#6$
#-2 RO

#2000,
K 1PARS

a(R1)
#2.R0
RO csnuo

#40.RO
108

CSRADD (RO) ,R4
#-5,R4
l‘C177 R4

#157 R4
4]

6$
RO ,PGMCSR

#8¢

#-2.R0
TOTCSRS,R3

#2.R0
RO CSRNO

MOV

25%:

MOV
TST
ADD
MOV

B8R

CMP

BEQ

MOV

ASH
81C
CMP

;NE MEMORY TRAPS GO TO 2%

¢WRITE DATA AT FIRST LOCATION OF BANK 2 IN BOARD

cWRITE DATA AT SECOND LOCATION OF BANK 2 IN BOARD
sUPDATE PAR4 TO POINT TO UPPER BOARDS

;KEEP GOING TILL NO MORE MEMORY

;PUT CSR MAP IN R3

sUPDATE CSR COUNTER
;UPDATE CSRNO
¢BRANCH IF CSR EXISTS
SANY CSR'S LEFT?
¢BRANCH IF NOT
cLOOK FOR NEXT CSR
¢SET DIAGNOSTIC CHECK MODE IN CSR
cLOOK FOR NEXT CSR
sNE MEMORY TRAPS NOW GO TO 6%
cRESET CSR POINTER
;REMAP PAR4 TO POINT TO BANK 2
sTEST NONASSERTED LOCATIONS
;UPDTAE CSR POINTER

sNOT FOUND?
sBRANCH IF NOT
sGET CSR CONTENTS
sCLEAR ALL BUT CHECKBITS
sPROPER CHECKBITS?
¢BRANCH IF SO
s TRY NEXT CSR IF NOT
sWRITE NON-ASSERIED CSR # IN PGMCSR

sNE TRAPS GO TO 8%

sPUT CSR MAP IN R3
sUPDATE CSR COUNTER
sUPDATE CSRNO
sBRANCH IF CSR EXISTS
SANY CSR'S LEFT?
cBRANCH IF NOT
cLOOK FOR NEXT CSR
sSET DIAGNOSTIC CHECK MODE IN CSR
cLOOK FOR NEXT CSR

BCS
TST
BEQ
BR

268:

8%:

23
#123456, 8(R1)
#123456, 82(R1)
#10000K IPARS

sTEST ASSERTED LOCATIONS

CSRADE(RO)R4

c*c177 Ré

#157,Ré

:PROPER CHECKBITS?

-neo

CZMSDCO MS11-L/M DIAGNOSTIC

5841 006742
5842 006744
5843 006746
5844 006752
5845 006760
5846 006762
5847 006770
5848 006776
5849 007004
5850 007012
5851 007020
5852 007022
5853 007024
5854 007026
5855 007032

MACRO M1113

22-APR-81
BEQ

002503

100000

002502

002000

172350

000000
000000
010000

000000
000002

002502

LR
PAGE 160-1

9
8$
RO,PGMCSR+1

#81T15,PGMCSR
#2000,K1PARS

11%:

#12%
#0,a(R1)
#0282 (R1)

:}gooo,xlpARa

172350

128:

000404

005037

9%:

14:13

108:

CLRMEM
MSG126
PGMCSR

SEQUENCE

142

sBRANCH IF SO

s TRY NEXT CSR IF NOT

;WRITE ASSERTED CSR # IN PGMCSR
sSET INTERLEAVED INDICATOR IN PGMCSR
;NE MEMORY TRAPS GO TO 128
sWRITE DATA AT FIRST LOCATION OF BANK 2 IN BOARD

JWRITE DATA AT SECOND LOCATION OF BANK 2 [N BOARD

;UPDATE PAR4 TO POINT TO UPPER BOARDS

cERROR - PROGRAM (SR NOT FOUND!
sSET TO DEFAULT OF 0

94 MSDCO MS11-L/M DIAGNOSTIC
"
BIT TEST OF ALL CSR'S

CZMSDCO MS11-L/M DIAGNOSTIC
n
BIT TEST OF ALL CSR'S

MACRO M1113

22-APR-81

5857 007036
AR

SUBTST

A AR R R

: *SUBTEST

5858
5859
5860
5861
5864 007036
5865 007044
5866 007050
5867 007056
5868 007064
5869 007070
5870 007074
5871 007076
5872 007104
5873 007106
5874 007112
5875 007114
5876 007116
5877 007124
5878 007130
5879 007134
5880 007136
5881 007140
5882 007144

14:13

N1
PAGE 161

SEQUENCE

<<CLEAR ALL MEMORY SPACE FROM BANK 2 ON>>
A AR A

NN AR R AN R

RN AN RN RN RN RN

CLEAR ALL MEMORY SPACE FROM BANK 2 ON

AR St

NN R AN R AN RR NN NN AN

Tty

2222033022223

:THIS ROUTINE CLEARS ALL MEMORY SPACE BEGINNING AT ADDRESS 200,000 AND

232y

;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
sHIGHER MEMORY.
005037
012737
012737
012701

006136
000001
002000
100000
117776
177777

CLRMEM:

002074
172350
18:

006136

006136
000200
006136

172350

2$:

3s:

100000

005037

006136

CLREX:

SET4

CLR
MOV
MOV
MOV

CMP
BNE

#CLREX
TRACE
#1 ,NOPAR

#2000, K 1PARG
#100000,R1

g;.:117776

MOV

#-1,TRACE

TST

TRACE

CLR

BNE
BR

(R1)+

ADD

13
#200,KIPAR4

MOV

f;OOOOO.R1

CLR

BR
NOP
CLR
RES4

TRACE

sNONEM TRAPS GO TO CLREX
: IGNORE PARITY ERRORS
;SET UP MAP TO START AT BANK 2

;R1 MAPS TO KIPAR4

sWHOLE 16K BANK DCNE?
;R-(
;KEEP GOING IF NOT
sUSE TRACE FLAG TO FLAG END OF BANK
sCLEAR CONTENTS & INCREMENT
;EOB FLAG SET?
;GO TO NEXT BANK IF SO
;SET MAP FOR NEXT BANK :R-(
SRESET FLAG
;RESET R1
sCLEAR NEXT BANK

143

CZMSDCO MS11-L/M DJAGNOSTIC

MACRO M1113

22-APR-31 14:13

CLEAR ALL MEMORY SPACE FROM BANK 2 ON

5885 007166

ANA2:

SUBTST

8 12
PAGE 163

SEQUENCE

.'.tQtQ..t't.'Q'Qtt'.""""'.QQ'ttIt'.Q"t"t.'t'."tt'.tt"'.tt""""."".'

:*SUBTEST

MATCH ALL CSR'S WITH MEMORY

:'tt'QtQQQ'..'QQQ..i.ttt"'fi?...it.ttt..'.Q.Q.t.'."""'Q't'."'.'t"QQ..'."'Q

5886
5887
5888
5889

%
e
:*
*

THE SECOND PART OF THE ANALYSIS MATCHES UP THE CSR'S WITH THE MEMORY, AND
INSTALLS ALL THE INFORMATION FOUND [N 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

5891
5892
5893
5894
5895
5896
5897
5898
5899

:«
i+
:*
:+
i
i+
i
:*
:*

WRITTEN WITH DATA AND DIAGNOSTIC CHECK MODE SET IN THE CSR IN ORDER TO ACCOMPLISH THIS. ALL POSSIBLE CONFIGURATIONS OF DOUBLE WORD PAIRS (NON-INTERLEAVED, 64K INTERLEAVED, OR 128K INTERLEAVED) ARE CHECKED FOR EACH BANK
THROUGH USE OF TESTADD AND KERNEL INSTRUCTION PAGE ADDRESS REGISTERS 4 AND
5. IF WE GET THE PROPER CHECKBITS BACK, WE HAVE A MATCH. IF NOT. THE ROUTINE CHECKS FOR SINGLE OR DOUBLE BIT ERRORS.
IF_ONE OR THE OTHER IS FOUND, THE ERROR ADDRESS IS CHECKED
T0 SEE IF IT IS THAT BANK.
IF IT IS, WE HAVE A MATCH.
AT THE END OF EACH
BANK PASS, FOR EACH (SR PASS, THE PROGRAM COMES UP WITH A NUMBER, STORED IN

5890

;% RESPOND TO THE CSR IN QUESTION. THE FIRST DOUBLE WORD PAIR IN EACH BANK ARE

3900

* “I'", WHICH DENOTES THE FOLLOWING:
*

5902
5903
5904
5905
5906
5907
5908

i
te
i
P
i
.
P

3309

I
*

I
MEMORY DESCRIPTION
e
0
NON-EXISTANT MEMORY
1
NON-INTERLEAVED MEMORY
2
64K INTERLEAVED, A1 NOT ASSERTED MEMORY
3
128k INTERLEAVED, A1 NOT ASSERTED MEMORY
4
64K INTERLEAVED, ‘A1 ASSERTED MEMORY

128k INTERLEAVED, A1 ASSERTED MEMORY

911

5913

% NOTE THAT PARITY MEMORY WRITES WRONG PARITY TO THE DOUBLE WORDS. THEN LOOKS

3914

NOTE - I=2 THROUGH 1=5 CAN ONLY OCCUR WITH MS11-M MEMORY.

i+ FOR THE PARITY ERROR BIT TO BE SET.

THE BIT

IS SET, WE HAVE A MATCH.

° %

5916 007166
5917 007174
5918 007200
5919 007204
5920 007210
5921 007212
5922 007214
5923 007220
5924 007222
9925 007226
5926 007230
5927 007236
5928 007240
5929 007244
5930 007246

5931 007252
9932 007256

5933 007262
5934
5935
5936
5937
5938

007270
007276
007300
007302
007306

005037
012701
013703
(05000
005005
005737
001403
005037
000413
022737
001407
013702
005202
072227

010237
012702

012737

012737
006303
103420
062700
010037

002274
002362
002216
002424

002530
000167

002526

7%:

002526

000011
002530
000004

001000
001000

000002
002146

172359
172352

18:
28:

SET4
CLR
Mov
MoV
CLR
CLR
TST
BEQ
CLR
BR
cMp
BEQ
MoV
INC
ASH

#100%
CHECK
#TESTADD ,R1
TOTCSRS ,R3
RO
R5
NO22BIT
78
LASTBLOCK
18
#167 ,LASTBANK
1$
LASTBANK ,R2
R2
#9. R

MoV

#1000,k IPARG

MoV
MoV

MoV
ASL
B(CS
ADD
Mov

;NE_MEMORY TRAPS GO TO 100%
;CLEAR CHECK
sSET UP THE VIRTUAL ADDR. POINTER
sMOVE CSR MAP INTO R3
;CLEAR THE CSR POINTER
;CLEAR THE PROGRAM CSR STATUS POINTER
;1S THIS AN 11/44 OR 11/24?
;BRANCH IF IT IS
;ADJUST LASTBLOCK INDICATOR FOR 124K MACHINE
;BRANCH OVER NEXT PIECE OF CODE
;1S THERE UNIBUS MEMORY ABOVE 17000000?
sBRANCH IF NOT
sSET UP A NEW LAST BLOCK INDICATOR

R2,LASTBLOCK
#4 R2

sR2 IS INDEX FOR CONFIG TABLE

#1000,KIPARS
R3
3s
#2,R0
RO, CSRNO

;SET KIPARS FOR BANK 1
;DOES THIS CSR EXIST?
¢BRANCH IF IT DOES EXIST
s INCREMENT THE CSR POINTER
sSTORE IT IN CSRNO ALSO

sSET KIPAR4 FOR BANK 1

144

CZMSDCO MS1 -L/M
MATCH ALL CSR 'S

AGNOSTIC
H MEMORY

5939 007312
5940 007314
5941 007316
5942 007324
5943 007332
5944 007336
5945 007342
5946 007346
5947 007350
5948 007352
5949 007360
5950 007366
5951 007374
5952 007376
5953 007402
5954 007406
5955 007412
5956 007416

5968

5969 007510
5970 007514
5971 007516
5972 007520
5973 007524
5974 007526
5975 007532
5976 007534
5977 007544
5978 007552
5979 007554
5980 007556
5981 007560
5982 007564
5983 007570

5984 007574
5985 007576
5986 007602
5987 007604
5988
5989
5990
5991 007610
5992 007612
5993 007614
5994 007616
5995 007622

001000

MACRO M1113

100000
120002
000040

005237

032760
001414
052760
012771
012771
005060
000411
012771
012771
104503
104475
000240
005771
104426

000240
013704
000240
010437
104503

032760

002362
002364
002624

45%:

438:
48

002432

000000
000002

000000

348:

418:

002144
002404

000002

NOP

MOV
MOV
BIT
BEQ
JMP
CLR

MOV
CLR
BR
MOV
MOV
CLR1CSR
CB1CSR

348
#8172, CSRADD (RO)
#123456.32(R1)
csnAoo(no>
418
#123456,a(R
2123456, 2 >

NOP
ST
a(R1)
READCSR
NOP
MOV
CSR,R4
NOP
MOV
R4, TEMP

a2(R1),a(R1)

#81T1,CSRINFO(RO)
428

JMP
ASH

63
#-5 R4

258

BIC

#~c177.R4

cMP
BEQ
JMP

#157 R4
258
228

NOP

010132

#100000, TESTADD
#120002. TESTADD+2
#8ITS, CONF 1G(R2)
438
68
1

~ WE COME HERE

010004

032737

25$%:
170377
000004

002422

nov
ASR
SWAB

RO,R%
R4
Ré

8ITt

#8172,1

BIC

SEQUENCE

145

sARE THERE ANY MORE (CSR'S TO DO?
sBRANCH IF ALL CSRS NOT DONE
sRESTORE KIPAR4
sRESTORE KIPARS
sRESTORE STACK
;JUMP TO SUBAAS IF ALL CSR'S ARE DONE
sMAKE SURE CSRNO IS UPPATED
:TURN THE CACHE OFF

#123456.3(R1)

BM]

000157

KSTACK,
SP

MOV

8IT
BEQ

428%:

R3
23
#1000,
K IPARS
#1200 ,KIFARS

a(r1)
1
@(R1),@2(R1)
#81T1.CSRINFO(RO)

CLR1CSR

177773
177600

€ 12

PAGE 163-1

ST
INC
PUSH
B';

POP

002432

14:13

JMP
SUBAAS
MOV
RO, CSRNO
CACHOFF

BEQ
BIS

172100
000000
000002

010452

001402
000137

MoV

138:

010452
002422
000000
002422
000002

ST
BNE
MOV
MOV

172350
172352

002146

22-APR-81

;SET UP VIRTUAL ADDRESS TO K]PAR4
sSET _UP VIRTUAL ADDRESS TO KIPARS
;1S THIS A BANK TO SKIP?
sNO - BRANCH AROUND NEXT INSTRUCTION
;YES = GO TO END OF BANK
;CLEAR THE MEMORY CONFIGURATION COUNTER
sTEST TO SEE THAT THERE IS MEMORY PRESENT
sSAVE THE LOCATIONS UNDER TEST

s1S THIS PARITY MEMORY?
:NO_ - BRANCH

sSET WRITE WRONG PARITY
:SET THE FIRST LOCATION UNDER TEST

:SET THE SECOND LUT
sCLEAR THE CSR
sTEST LOCATIONS
sSET THE FIRST LOCATION UNDER TEST
sSET THE SECOND LUT
SRESET CSR
sSET DIAG. CHECK MODE IN CSR UNDER TEST
:DEBUG AID
JREAD THE FIRST LUT TO WRITE CKBITS. INTO CSR

sJREAD THE CSR UNDER TEST
:DEBUG AID
sGET THE CHECKBITS FROM THE CSR
:DEBUG AID
;SAVE IN TEMP FOR LATER
:RESET (SR
:RESTORE LOCATIONS UNDER TEST

1S THIS PARITY MEMORY?
sNO -~ BRANCH
;DID WE GET A PARITY ERROR?
SYES = FILL IN CONFIG TABLE
sNO = JUMP TO END OF BANK
sMANIPULATE THE CSR BITS
sINTO A USABLE FORM.
sDEBUG AID
;D0 THE CHECKBITS COMPARE TO WHAT WAS WRITTEN?
sBRANCH IF THERE IS A MATCH
sELSE BRANCH IF NOT THE SAME

#170377,R4

THERE

IS A MATCH

GET THE CSR NUMBER

:SET IT UP FOR USE IN THE
- CONF IGURATION TABLE.
sCLEAR OFF EXTRANEOUS BITS
s INTERLEAVED A1 ASSERTED MEMORY FOUND?

(ZMSDCO MS11-L/M DIAGNOSTIC
MATCH ALL CSR'S WITH MEMORY

5996 007630
5997 007632
5998 007636

5999 007642

6000
6001
6002
6003

007646
007652
007656
007660

001402
072427
050462

016004

MACRO M1113

000004
002624

15$:

002432

22-APR-81

15$
#4 R4
R4 . CONF 1G(R2)

#2C7.R6
Ré
R, CONF 1G+2 (R2)
Ml
#81T12,CONFIG+2(R2)

MOV

002626
007001

002422

8IC
SWAB
BIS
CMP

6005 007670

052762

010000

002626

BIS

6007 007700
6008 007706
6009 007710

032737
001006
052762

000001

002422

004000

002626

6011 007722

000402

6004 007666

6006 007676

6010 007716

6012 007726

6013 007730
6014 007736

gg;g 007746

001431

010204

062704

000020

062704

000040

052764
056264

056266

000040
002624

002626

002624
002624

BEQ

MOV

BIT
BNE
BIS

58 :

16$:

002626

6019 007752
6020 007760
6021 007762
6022 007766
6023 007774
6024 007776
6025 010002
6026 010006
6027 010012
6028 010014
6029 010022
6030 010026
6031 010034
6032 010042
6033 010050
6034 010052
6035 010060
6036 010062
6037 010066
6038 010072
6039 010100
6040 010102
6041 010106
6042 010114
6063 010122

282? 010130

2829

24$

R2,Ré&

#8170,1
58
#BIT11,CONFIG+2(R2)

:BRANCH IF NOT
:PUT CSR NUMBER IN INTERLEAVED CSR SLOT
‘PUT CSR NUMBER IN CONFIG. TABLE

SGET MEMGRY TYPE

:CLEAR OFF THE EXTRANEOUS BITS
:MOVE INTO PROPER POSITION
SSET IT INTO THE CONFIG TABLE
sWAS THIS NON-INTERLEAVED MEMORY?

SBRANCH IF IT WAS

:SET THE INTERLEAVED BIT

:SAVE THE CURRENT BANK INDEX

:WAS THIS 128K INTERLEAVED?
:BRANCH IF TRUE
:SET 64K INTERLEAVED FLAG IN CONFIG

#20.Ré4

ADD

#40,Ré4

8IS

CONFIG+2(R2),CONF1G+2 (R4S

BIS
8IS

168

#8175, CONFIG(R4)
CONFIG(R2) ,CONFIG(R4)

:SET NEW BANK POINTER TO 4 BANKS AHEAD

:JUMP OVER NEXT INSTRUCTION

:SET NEW BANK POINTER 8 BANKS AHEAD

SSET SKIP ECC LOGIC TESTS FLAG
-SET OTHER INFO INTO THAT BANK

;% THIS SECTION IS EXECUTED ONLY WHEN THE BANK=1
022737
001402
000137
032737
001417
013704
072427
022704
003010
052762
105262
053737
053737
000240
022737
001002
000137
012704
032737
001402
062704
053764
053764
052764

000470

001060

172350

248:

010312
100020

002404

30$:

002404
177767
000001
000001
002626

002624

002630
002632

002624
002626

000001

002422

010452
000020
000001

002422

000020
002624
002626
000040

002624
002626
002624

108:

468:

268:

CMP
BEQ
JMP
BIT
BEN
MOV
ASH
CMP
86T
BIS
INCB
SET
BIS
BIS
NOP
CMP
BNE
JMP
MOV
BIT
BEQ
ADD
BIS
BIS
8IS

B8R
° %

#1000, K IPARS
308
338
#BIT1S!BIT4, TEMP
108
TEMP, R4
#-9. R4
#1 R
108
#8170, CONF 1G(R2)
CONFIG+2(R2)
CONF GERROR
CONFIG+4,CONFIG
CONF1G+6.CONF1G+2
#i,1
46$
6$
#20,R4
#8170,1
268
#20.R4
CONFIG, CONF 1G(R4)
CONFIG+2,CONFIG+2(R4)
#BITS, CONFIG(RS)

338

;1S THIS BANK 1 ?
:BRANCH IF TRUE
SELSE JUMP TO END OF THIS BANK
*WAS THERE A SBE OR DBE?
:BRANCH IF NOT
*GET CSR CONTENTS
:MAKE ERROR ADDRESS INTO BANK #
*ERROR IN BANKS 0 OR 1?
*BRANCH IF NOT
:SET ERROR FLAG IN CONFIG TABLE
:ADD ONE TO BANK ERROR COUNT
*PRINT CONF1G TABLE
:SET UP INFORMATION IN BANK ZERO
;DEBUG AID
:WAS THIS NON=-INTERLEAVED MEMORY
*NO - BRANCH OVER NEXT STMT.
SYES = JUMP TO END OF THIS BANK
:SET UP COUNTER FOR 64K INTERLEAVED
:WAS IT 128K INTERLEAVED?
:BRANCH IF NOT
:SET UP COUNTER FOR 128K INTERLEAVED
:SET OTHER BANK WITH SAME INFORMATION
-AS IN BANK 0
sSET SKIP ECC LOGIC TESTS FLAG

*BRANCH

i* IF CHECKBITS DID NOT MATCH., WE COME HERE
1

6048 010132
6049 010140

032737
001001

100020

6051 010144
6052 010150

013704
042764

002146
000006

6050 010142

CSRINFO(RO) , R4

SEQUENCE

ADD

B8R

> %

gg;g

D 12

PAGE 163-2

BEQ
ASH
BIS

042704
000304
050462
022737

177770

14:13

000463

002144

172100

22%:

8s:

BIT
BNE

#8IT15'BIT4,CSR
8s

:SBE OR DBE FLAGS SET?
*BRANCH IF TRUE

MOV
BIC

CSRNO, R4
#6, CSRADD (R4)

*GET CSRNO
:TURN OFF DIAG CHECK & ECC DISABLE

B8R

338

:CHECK TO SEE IF IT IS MS11-M

146

CZMSDCO MS11-L/M DIAGNOSTIC

MATCH ALL CSR'S WITH MEMORY

6073

6074
6075
6076
607;

OOOOOSOOOOO
NN

166

-—

172
176

Gonr GuarGun Ganrd
G
Gur Qe
P

6065
6066
6067
6068
6069
6070
6071
6072

Gour Qo

(=lelolelolelolelelalele)

22 2283

WA =0 000NN

6053 010156
6054
010162

010236
010240
010244
010250
010254
010256
010260
010264
010266
010274
010300
010306

MACRO M11713

016401
072127
042701

005737
001015
052764
016400
042764
042700
006300
006300
060001
010104

22-APR-81

177037

278:

072427
020437
001001
000403
020437
001012
052762

000005
172350

;SAVE RO ¢ R1

ASH

uozzsxr

MOV
BIC

CSRADD
(R&) ,RO
#81T14, CSRADD (R4)

s1S THIS AN 11/44 OR 11/24?
:BRANCH IF NOT
cGET EXTENDED ERROR ADDRESS BITS

105262

000001
002626

000137

007610

BIC
ASL
ASL
ADD
MOV

288:

002624

358:

c~c177 R1

278
#81T14,CSRADD (R4)

#0740 RO
RO
RO
RO,R1
R1.Ré

POP

R1.R)

BNE

28§

ASH
CMP

172352

SEQUENCE

RO,R1
CSRADD(RL) R1
R1

BNE
8IS

172100

E 12

PAGE 163-3

PUSH
MOV

8IC
172100

14:13

B8R

#5,R4
R& .KIPARG

358

(MP
BNE
BIS
INCB

R4 ,KIPARS
338
#81T0, CONFIG(R2)
CONFIG+2(R2)

IMP

258

SET
:t

CONF GERROR

sGET CSR_INFORMATION

:SET UP ERROR ADDRESS

:READ FROM (SR
:TURN OFF EUB BIT

:SET UP EXTENDED BITS

sSET _UP TOTAL ERROR ADDRESS
:SAVE IN R4
JRESTORE RO & R1
sSET ERROR ADDRESS UP IN PAR NOTATION
sDOES IT EQUAL KIPAR4?
sBRANCH IF FALSE
:YES - MARK INFO IN CONFIG TABLE
sDOES IT EQUAL KIPARS?
sBRANCH IF FALSE
sSET BANK ERROR FLAG
s INCREMENT BANK ERROR COUNTER
sPRINT CONFIG TABLE

;YES = MARK [NFO IN CONFIG TABLE

ix THIS SECTION SETS UP ALL THE POSSIBLE CONFIGURATIONS OF

Se MS11-M MEMORY.

032760
001054

000137

000003

002432

000004

002432

000001

002422

000002
004000
007406
000004

002364

002422

000002

002422

004000
007406
000003

172352

000002
000002
004000
007406

338:

zgxrozaxr1,csnx~ro<R0)

BIT
BEQ
CMP

#81T2,CSRINFO(RO)
6$
.1

SUB

#2 , TESTADD+2

BLO

172352

002422

Sfi;

332
18%:

20%:

128:

002362
002364

z«éoo K 1PARS

(MP
BEQ
CMP

8,1
208
#2,1

ADD
JMP
(MP
8LO

#4000,
K IPARS
43
#3,]
63

su8

#6000, K1PARS

8LO

ADD
ADD

172352

18$

JMP

12$

21S THIS MS11-M MEMORY?

INO
- GO TO END OF BANK

;1S THIS 1ST TIME THROUGH?
:BRANCH IF NOT
sTRY AS 64K INTERLEAVED

:A1 NON-ASSERTED MEMORY

sTRY TO MATCH AGAIN

:4TH TIME THROUGH?
sYES = BRANCH

;2ND TIME THROUGH

:NO - BRANCH

:TRY AS 128K INTERLEAVED

:TRY TO MATCH AGAIN
:THIRD TIME THROUGH?
:NO - BRANCH
sTRY TESTING THE BANK

cz TESTADD
#2 TESTADD+2

:AS A1 ASSERTED

sTRY TO MATCH AGAIN

> %

64K INTERLEAVED MEMORY

‘*END OF BANK ROUTINE
1

01
6108 010460
01

104503

013737

000004
001000
172350

172350
172352

68:

CLR1CSR

figg

MOV

:?685 K IPARG

KIPARG K IPARS

sCLEAR THE CSR UNDER TEST
sUPDATE CONFIGURATION POINTER
sUPDATE KIPAR4 TO NEXT BANK
sAND UPDATE KIPARS

147

NNO

007352
000002
000137

007256

062706

000004
010452

000137

MACRO M1113 22-APR-81 14:13 PAGE 16!-4

002530

POt S

sttt Py

(o Yo T e Yo To Yo o Yo Yo ool

0STIC
EMORY

19%:

1008:

NOP
cMP
BLOS
JMP

LASTBLOCK ,K1PARé
19%
458

SEQUENCE

;DEBUG AID

cHAVE WE DONE THE WHOLE MEMORY SPACE?

sBRANCH IF DONE
:JUMP IF NOT DONE
s INCREMENT (SR POINTER
;DEBUG AID

ADD
NOP
CACHON
JMP

#2,R0
18

:JUMP TO TRY NEXT (SR

ADD
JMP

#6,SP

JRESTORE STACK

;R-C

sTURN ON THE CACHE

;GO TO END OF BANK ROUTINE

sR=C

:R=C

148

o000

H W

—

MATCH AL

CZMSDCO MS

DI AGNOSTI(C
WITH MEMORY

MACRO M1113

104423
104472

6 12

22-APR-81 14:13

SUBAAS:
SRR

PAGE 164

SEQUENCE

149

CACHON
:MAKE SURE THE CACHE IS ON
ECCINIT
:TRAP ON DOUBLE BIT ERRORS (NORMAL)
NEWTST
<<TEST BANK O ACCESSES>>

ANRARARANRNARANANN AP

SeTEST 2

RARAANAAANA AN A AAAAANRAAANERARARANANANRNA
AN AN TN
ANANNRANNS

TEST BANK 0 ACCESSES

SARNAAAAARARAAARRAANA
NN AN NN AANCARANAAAANIAANAARARAANRNAAAARACANAAIRAAROARAONOER

010542
5
6126
6127
6128
6129
6130
6131 010544

6132 010550
6133 010556
6134 010562
6135 010570
6136 010576
6137 010600
6138 010604
6139 010606
6140 010610
6141 010612
6142
6143 010614
6144 010620
6145 010622

6146 010630
6147 010634

6148 010636
6149 010644
6150 010652
6151 010660
6152

000004

7ST2:

SCOPE

:THIS DOES A

INSTRUCTION ON EVERY LOCATION IN BANK #0 TO SEE

:PRIOR TO THIS POINT = THEN A PARITY ERROR IMPLIES THAT THERE

005037

012737
005037
012737
005000
012701
104424

002070

000001
002066
000001

002074
002076

040000

005720
077102
104423

1$:

005737
001403

002070

005737
001406

002066

162737

000002

002032

053737

002104

002624

SET4
CLR
MOV
CACHOFF
TST
s08
CACHON
:SEE IF

#NONEXIST
RO
NSIZE,R1

PARCNT
28

JANY PARITY ERRORS?
iNO - SKIP

8EQ

IST

NEMCNT
3$

;ANY NON-EXISTANT MEMORY (HOLES)?
;SKIP IF EQUAL

BIS

CPUBIT,CONFIG

SUBTST

<<ENABLE ECC FOR CORRECT TRAPS>>

TST
gea

28:

SUB

3$:

RES4

104472

;TRAPS TO 4 GOTO NONEXIST

;TURN CACHE OFF

(RO) +
R1,1$

sSEE IF 1 CAN DO A READ ACCESS WITHOUT A PARITY TRAP

ANY FAILURES

X2,ADDRESS

AR AR R AR RN AN AN AN NN R

: +SUBTEST

104506

IS A

:HARDWARE FAILURE IN THE MEMORY.
:THESE ERRORS ARE COUNTED AND A FATAL ACTION IS TAKEN
LR~
PARCNT
:CLEAR PARITY ERROR COUNTER
MOV
#1_,NOPAR
:SET THE NO PARITY ERROR FLAG
CLR
NEMCNT
sCLEAR NON-EXISTANT MEMORY ERROR COUNTER
MOV
#1,NONEM
sSET THE NON-EXISTANT MEMORY ERROR MODE TO COUNT

S RAR AN

6156 010722
6157 010724
6158 010726

“'TST'*

S1F 1T GETS ANY PARITY TRAPS.
s SINCE EVERY LOCATION IS EITHER LOADED OR WRITTEN INTO BY THE PROGRAM

6153 010702

6154 010702
6155 010720

:TURN CACHE ON

:UPDATE 1ST ADDRESS FAILURE FROM AUTO INCREMENT #

;SET_CORRECT ACCESSED BIT ON BANK 0

JRESET TRAPS TO 4 TO DEFAULT

AR RN AR AR AANAARARNNRANANAN AR AR

AAN AN

RANRRANACNEARERS

ENABLE ECC FOR CORRECT TRAPS

AR AR AR AR RNARAANAN RN AR

AR RANAARA RN RAAAA

AN ANARARARTANANANRARNRAANNRANRNNANNY

IF _#SWO SET.IN 3SWR OR ACTFLAG IS TRUE
¢ ENASBE
:TRAP ON SINGLE BIT ERRORS
ECCINIT
END ;OF IF #SWO0

;TRAP ON DOUBLE BIT ERRORS (NORMAL)

MACRO M1113

6161 010726

22-APR-81
NEWTST

AR AAAAARER

000004

TST3:

AR AR AN

H 12
PAGE 166

SEQUENCE

<<TEST BANKS 1-200 (OCTAL)

;«TEST 3

SRR RA

010726

14:13

dadada

FOR ZEROS & ONES>>
ittt

itttz

RN A

IR AANN AN RN NA NN RN AN R AR AN RNANRANAANANRAAARAARANACNANN
RS

SCOPE

sEACH BANK IS TESTED FOR EXISTANCE AND IF IT EXISTS
;THEN IS IS TESTED FOR ZEROS & ONES.
SEXCEPT
(WHERE THE PROGRAM IS)

“TST'' INSTRUCTIONS LIKE BANK #0

005037
012737
012737

002100
000001
000002

002074
002076

022737
001407
012737
012737
000611

000001

003716

011564
011566

002472
002474

012737
012737
005237
023737
103457
013701

177644
177646
002100
002526

002472
002474
002100

TAGSS:

#2 ,NONEM
#NONEXIST
#1,PROTYP
18
MTST3+4 ,LINKT
MMTST3+6,LINK2

sSET NON-EXISTANT MEMORY MODE TO EXIT TEST LOOP

BMOV

MTST3

sPUT IN FAST MEMORY
sSET UP LINKS

BLO

TAG2S

B8R

171350

040000

MOV
Mov
INC
CMP

WARNT:

b d

005037
000564

000001

011560
177640

002100
002074

#UIPAR2 ,LINK1
#UIPAR3,LINK2
BANK
LASTBANK ,BANK
BANK ,R1
R1
R1
R1,BANKINDEX
PATERR
PARCNT
NEMCNT

003716

BANK
CONF IG(R1)

BMI
Moy
MOV
MOV
MOV
MOV

(LR

022737
001403
004737
000402
004737
104417
104423
000416
005037

TAG9S

MAP
TSTB

002624

b nd e e

MOV
SET4
cMP
BEQ
Mov
MOV

MoV
ASL
ASL
MOV
CLR
(LR
CLR

e
b mnd b
b b

1%:

002100

000207
060000

ARE ONLY TESTED BY

:ANY BAD BANKS ARE LOGGED IN THE CONFIGURATION TABLE.
;THIS ROUTINE IS ONLY DOING A SMART SIZE - NOT ACTUAL TESTING!
CLR
MOV
#1,NOPAR
sSET NO PARITY ERROR FLAG

002102
002072
002070
002066

b e md

~
\NNN:CYN‘U\%;?S’U“h‘NbLflgfiflfl"U—hfl
R222RRRSS0022
OOONOO
N
OO"\.&N& c>§5
NOVNOOMNVONOOMNINN

PONININD =2 b e

NONSOONSN

e
b

b md

b e

b md

D
b
D

i
b

D e

d
e
e

e
mh
b

b
b

d e
d

b amd
b

d
b

b
D

b
d

b e

o
b
b ek
d

b ed md ed md

b e

b o

(=lelelelelolalelelelelelelelalelololelelelelelelelelelalelelelelelelelele)

6170 010734
6171 010742

seieesyessy

TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES

RA RN AR

PROTECTED BANKS

61
6169 010730

150

TSTBANK
#207,8L INK1
#FIRST RO
RO,R4
#S1ZE ,R1
R1,R3

CACHOFF
TESTAREA

CMP
BEQ
CALL
BR
CALL

KERNEL
CACHON

CLR
RES4
(LR

B8R

#1,PROTYP
18
MTST3
2%
FASTCITY

sTRAPS TO 4 GOTO NONEXIST

cIS THIS AN 11/44?
;BRANCH IF TRUE
¢SET UP LINKS

;DONE?
sYES = SKIP TO NEXT TEST

;BANK * 4
sCLEAR PATTERN ERROR COUNTER
sCLEAR PARITY ERROR COUNTER
sCLEAR NON-EXISTANT MEMORY COUNTER (HOLES)
sMAP SUPERVISOR SPACE (TEST AREA) TO BANK
:1S THIS BANK PROTECTED?
sYES = GO TEST BANK SPECIAL

sPUT 'RETURN'' INSTRUCTION AFTER WRITE ROUTINE

;DATA IS ZEROS

s TURN CACHE OFF

sENTER SUPERVISOR MODE
:1S THIS AN 11/44?
sBRANCH IF TRUE
sCALL TO THE USER INSTRUCTION PAR'S

TAG3$S

cENTER KERNEL MODE
:TURN CACHE ON
sSKIP NEXT INSTRUCTION

NOPAR

sRESET TRAPS TO 4 TO DEFAULT
;INDICATE DEFAULT PARITY ACTION

BANK

SUBAAI

CZMSDCO MS11-L/M DIAGNOSTIC
ENABLE ECC FOR CORRECT TRAPS

w
) b

022737
001403

000001

011560
5%:
6$:

wmaag?ooww00mma
RO
ORRNOOO
NSO

002066

002104
011026

002624

000001
060000
020000

002076

CALL
KERNEL
CACHON
MOV
ST

FASTCITY

BANKINDEX
,RO
PATERR

PARCNT

NEMCNT

B8R

002076

000001

002624

BEQ
BIS
SET
8IS
JMP

43
#B1T0, CONF1G(RO)
CONF GERROR
CPUBIT,
CONF 1G(RQ)
TAG9S

;TEST A PROTECTED BANK
TSTBANK: PUSH
R1

4$:

000002

#000240,
3L INK I

58
MTST3

BNE
002624

2
#FIRST RO
RO,R&%
#S1Z2E R
R1,R3
ONES,R2

BEQ
CALL

BNE

000001

CACHOFF
TESTAREA
#1,PROTYP
CMP

2s:

005737
001406
052760

NEMCNT

MOV

003716

177640

TST

MOV
MOV
MOV

171136

PATERR
PARCNT

BNE
MOV
MOV

040000

aLINK2

BNE

060000

I 12

PAGE 166-1

NEMCNT

TESTAREA

BNE

002066

104424

CALL

002072

14:13

1$
BEQ
BR
TAGYS
CACHOFF
KERNEL
CACHON
ST

VI [VNVY)

171214

002070

AN U

b ad ) b D d b —d el b wd D o

N N U (N N NN N W

) b e wd b D D d

004777
104417
106423
005737

1$:

002070

Pl ol 2B 2R QX 2 ¥ B

—t end cmd b b b ad b e
b ad
d
b o
cd ed
) e
b cd

NV
8 S S
S

— el cnd and

TAG3S:

002066

104424

SKS

=D el b ——d b =

D
b D
D oD
D e
D b
b
b
b b b d e
b
h
D
b md b
D b

005737
001401
000671

b
b
e
D b
b and
b
b and
—d euh ed ad

o
R
o

b —d

OO0 OOOOOOODOOOD

b d

(elelelelelel

6247 0
N
A

6245 0

D d

b e

6239 0
6240 0
6241 0

N N NN PO PO N NN PO RO NI N NOND
O NN WNWNINN
- o
NNNOOOWNES SN
OSSNSO
NN
ONOSNNOSONSNOS

b —b
d

(elelelolelelelalelolelelolelelalololelalelo

AANANNIPIMNINIPNI
NI NI NINON) b b b b e b

PP}

MACRO M1113 22-APR-81
C 4 MSDCO MS11-L/M DIAGNOSTIC
T3
T BANKS 1-200 (OCTAL) FOR ZEROS & ONES

MOV
#1 ,NONEM
MOV
#F IRST,RO
MOV
#20000.R1
CACHOFF
TESTAREA
ST
(RO)+
S08
R1.4$
KERNEL
CACHON

MOV

POP

#2,NONEM
R1

IF_PARCNT NE #0
8IS
SET

#BITO,CONFIG(R1)

CONFGERROR

SEQUENCE

;ANY TRAPS?
:NO - SKIP
sNOW =~ TRY NEXT BANK

s TURN CACHE OFF
sENTER SUPERVISOR MODE
sFINISH PATTERN
sENTER KERNEL MODE
s TURN CACHE ON

sANY PATTERN ERRORS

cYES - SKIP
sANY PARITY ERRORS

;YES - SKIP
cANY NON EXISTANT MEMORY

:YES = SKIP

:DATA 1S ONES

sPUT 'NOP'* INSTRUCTION BACK IN SUBROUTINE
sTURN CACHE OFF
sENTER TEST MODE
:1S THIS AN 11/44?
;BRANCH IF IT IS

;DO IN MEMORY IF NOT

:JUMP OVER NEXT INSTRUCTION
sCALL TO THE USER INSTRUCTION PAR'S
;ENTER KERNEL MODE
sTURN CACHE ON
:ANY
JYES
JANY
JYES

PATTERN ERRORS?
- SKIP
PARITY ERRORS?
- SKIP

;ANY HOLES?

;NONE - SKIP
sSET ERROR BIT IN THIS BANK
sFORCE PRINTING OF

sSET ACCESSED BIT

CONFIGURATION TABLE

cSET NON-EXISTANT MEMORY TO COUNT
s TURN CACHE OFF
sENTER TEST MODE

cENTER KERNEL MODE
s TURN CACHE ON
cRESET NON-EXISTANT MEMORY TO EXIT TEST LOOP
sERROR BANK

151

MACRO M1113 22-APR-81
cgnsoco MS11-L/M DIAGNOSTIC
T
TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES
6271 011540

6272 011540
6273
6274
6275
6276
6277
6278
6279
6280
6281
6282
6283
6284

011546
011554
011556
011560
011562
011564
011566
011570
011572
011574
011600
011602

14:13

J 12

PAGE 166-¢

SEQUENCE

END :OF IF PARCNT
053761

002104

000137
010220
077102
000240
012401
020102
001402
005237
077306
000207

011026

IF NEMCNT EQ #0

002624
MTST3:
28:

002072

3$:

BIS
END :OF
JMP
MOV
S08
NOP
MOV
cMP
BEQ
INC
SO8
RETURN

CPUBIT,CONFIG(R1)
IF NEMCNT
TAG9S
R2.(RO)+
RT.MTST3
(R4) +,R1
R1,R2
3s
PATERR
P3,2$

:ACCESSED BANK
:V177640
V177642
V177644
V177646
*v177650
‘V177652
V177654
+v177660
V177662

152

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113 22-APR-81 14:13
13
TEST BANKS 1-200 (UCTAL) FOR ZEROS & ONES
6286 011604

<<FIND SHADOW INHIBIT MODE POINTERS>>

; *SUBTEST

FIND SHADOW INHIBIT MODE POINTERS

005037
004737
013700

002100
044300
002102

062700
062737

000020
000010

002109

062702
062737

000040
000020

(02100

052760

000200

002624

005237

002100

023737
002336

002526

002100

SEQUENCE

SUBAA]: SUBTST
L

6287
6288
6289
6290 011604
6291 011610
6292 011614
6293 011620
6294 011634
6295 011642
6296
011646
6297 011654
6298 011656
6299 011662
6300 011670
6301 011670
6302 011676
6303 011700
6304 011704
6305 011706
6306 011712

K 12
PAGE 167

RN AN

RN RN

AR RN

R RN

AN R RN R AR AR AN SN

RNV RN

NN AR

RN ANO

ERR

s gy

:% THIS SECTION LOOKS FOR INTERLEAVED MS11-M MEMORIES AND FIGURES OUT
;% WHERE THE SHADOW INHIBIT MODE POINTERS ARE LOCATED.
THESE AREAS
;% ARE THEN MARKED AS PROGRAM SPACE.
CLR
BANK
sRESET BANK TO ZERO
SHADL1: CALL
EXBANK
;SET BANK PARAMETERS
MOV
BANKINDEX
,RO
IF ACFLAG IS TRUE AND INTFLAG IS TRUE
IF INT64K IS TRUE
ADD #20,RO
sPOINT TO BANKINDEX + 4
ADD #10,BANK
sPOINT TO BANK + 8
ELSE
ADD #40,R2
;POINT TO BANKINDEX + 8
ADD #20,BANK
;POINT TO BANK + 16
END; OF IF _INT64K
BIS
#BIT7,CONFIG(RO)
;MAKE NEW TANK PROGRAM SPACE
ELSE
INC
BANK
;GO TO NEXT BANK
END; OF IF ACFLAG
CMP
LASTBANK , BANK
sHAVE WE DONE ALL THE BANKS?
BGE
SHADL1
;BRANCH IF NOT

153

CZMSDCO MS11-L/M DIAGNOSTIC

FIND SHADOW INHIBIT MODE

MACRO M1113

POINTERS

22-APR-81

6309 011714
RN AR

14:13

NEWTST

AN RN

eTEST 4

AR AR

L 12

PAGE 169

SEQUENCE

<<ECC INHIBIT MODE POINTER TEST>>
A R A AR

RN AR A AN RN RN NN RN AN RN AR R AR

AR NN AR

AR AR AN AN

O G A

ECC INMIBIT MODE POINTER TEST

:tttttfittt.lttttttt.tt""'t'tttt'tittittfitfititittttttfi.tt'tttt'tttt'ttttttttt't

011714

000004

tsT4:

SCOPE
:THE MS11-M 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 TO BE A PROTECTED BANK BY THE PROGRAM.
IT MAY BE
:QUITE COMPLEX TO DETERMINE ON A GIVEN SYSTEM CONFIGURATION WHICH
:BANKS CAN BE PROTECTED;

;S0

;THIS ROUTINE ATTEMPS TO

:OF
EVERY ECC BANK.
:%zf gggégfiLE?SBANKS

(CREATE A DOUBLE BIT ERROR IN ADDRESS 0 & 2

ECC HARDWARE WILL PREVENT THIS FROM HAPPENING
WHICH SHOULD ALWAYS
INCLUDE BANK ZERO - WHERE

177777

701
737
700

060000
044300
002102

6339 012010
6340 012012
6341 012016
6342 012016
6343 012022
6344 012024
6345 012030
6346 012034
6347 012044
6348 012052
6349 012060
6350 012066
6351 012066

:THIS ROUTINE BUT NOT PAST IT!

424
737

OQO0O
_,O et

O
s

¢
IN CASE OF HARDWARE FAILURE IT IS COMMON THAT A DOUBLE BIT ERROR
:
WILL BE
CREATED ON THE KERNEL STACK & ''CRASH''* THE DIAGNOSTIC
;DURING
THIS ROUTINE.
YOUR ONLY CLUE IS THAT YOU CAN GET AS FAR AS

012703
012737

040000
000001

012702

000002

116002

002625

002150

CACHOFF
MOV
#-1,0LDCSR
FOR BANK := #0 TO LASTBANK
MOV
#FIRST,R1
CALL
EXBANK
MOV ~ BANKINDEX,RO

002232

006302
042702
010237

177741
002146

013737

002146

002150

052760

000100

002624

004737

012222

IF ACFLAG IS TRUE
IF MKFLAG IS TRUE
IF SKIPMK IS FALSE
IF INTFLAG IS TRUE
MOV
#40000,R3
MOV
#1,SPLTCSR
ELSE
MOV
#2,R3
END; OF IF INTFLAG
MOVB
CONFIG+1(RO)
,R2
ASL
R2

BIC
#°C36,R2
MOV
R2,CSRNO
IF CSRNO NE OLDCSR
Mov

CSRNO,OLDCSR

IF PFLAG IS FALSE
BIS
#BIT6,CONFIG(RO)
END; OF IF PFLAG
CALL
IMPTEST

s TURN CACHE OFF
;SET UP VIRT ADDR POINTER

sSET INDEX COUNTER

;MAP AS

INTERLEAVED BANK

sSET INDEX COUNTER

154

CZMSDCO MS11-L/M DIAGNOSTIC
T4

ECC

MACRO M1113

INHIBIT MODE POINTER TEST

6353 012072
6354 012100
6355 012104

116002
072227

002625
177775

6357 012114
6358 012120
6359 012124
6360 012130
6361 012134
6362 012134
6363 012134
6364 012134
6365 012134
6366 012134
6367 012150
6368 012164
6369 012170
6370 012206
6371 012210
6372 012212
6373 012214

010237
062701
004737
005037

002146
000002
012222
002232

005037

002100

6375 012216

000137

6356 012110

6374 012214

042702

177741

104506
104472
104423

012464

22-APR-81

14:13

M_12
PAGE 170

SEQUENCE

IF _INTFLAG IS TRUE
MOVB CONFIG+1(R0),R2
ASH
#-3,R2

BIC

#+C36.R2

MOV
R2,CSRNO
ADD
#2.R1
JFIX POINTER FOR A1 ASSERTED HALF
CALL
IMPTEST
CLR
SPLTCSR
END; OF IF INTFLAG
END; OF IF CSRNO
END: OF IF SKIPMK
END: OF IF MKFLAG
END; OF IF ACFLAG
END; OF FOR BANK
MAP
;MAP TEST SPACE TO BANK 0
CI.R
BANK
IF #SW0 SET.IN a3SWR OR ACTFLAG IS TRUE
ENASBE
STRAP ON SINGLE BIT ERRORS
ELSE
ECCINIT
sTRAP ON DOUBLE BIT ERRORS (NORMAL)
END; OF IF #SWO0
CACHON

JMP

SUBAAR

;TURN THE CACHE BACK ON

*JUMP OVER THE SUBROUTINE

155

CZMSDCO MS11-L/M DIAGNOSTIC
T4

ECC

MACRO M1113

INHIBIT MODE POINTER TEST

005004
005005
012737

IMPTEST:CLR

6391 012300

020000

002144

104505
010411
160301
010411
104503
005711
104501

R3,R1

MOV

R4, (R1)

TST

(R1)

WAS1DBE

012737

020000

013711
060301
013711

002554

104505

012737
104505

002144

156

(TEST AREA)

TO BANK

cENTER TEST MODE
:SAVE TEST LOCATION

s INDEX TO NEXTM LOCATION

sSAVE TEST LOCATION
;DISABLE ECC & WRITE CHECKBITS FOR 1
sWRITE CHECKBITS (ALL ZEROS)

CSR

sCLEAR CSR

sREAD CHECKBITS INTO REAL (SR

;WAS THERE A DOUBLE BIT ERROR

ON.NOERROR ;1
MOV
#BIT13,(SR
CHK1DIS
MOV
ONES, (R1)

ADD

002554

MOV
TST

027400

002144

104505
010411
060301

010411
104503
160301
005711
104501

005205
104471

010411
060301

ONES, (R1)

sCLEAR CSR

(R1)

;WAS THERE A DOUBLE BIT ERROR

MOV #27400,CSR
CHK1DIS

MOV R4, (R1)

;ADD INDEX TO GET TO SECOND WORD

SUB R3.R1
CLR1CSR

;SUBTRACT INDEX TO FIRST WORD
;CLEAR CSR

TST (R1)
WAS 1DBE
ON.NOERROR ;3
MOV
#74C00,CSR
CHK1DIS
MOV
R4, (R1)
ADD
R3.R1
MOV
R&. (R1)

002144

CLR1CSR
sU8

R3,R1

(RT)

WAS1DBE
END ;OF ON.NOERROR ;3
END ;OF ON.NOERROR ;2
END ;OF ON.NOERROR ;1
ON.ERROR

INC

END ;OF ON.ERROR
ECCIDIS

MOV

ADD

;DISABLE ECC & WRITE CHECKBITS FOR 1 CSR

ADD R3.R1

MOV R&. (R1)

074000

CSR

R3,R1

WAS1DBE
ON.NOERROR

104501

012737

;DISABLE ECC & WRITE CHECKBITS FOR 1

SUB
R3,R1
CLR1CSR

010411
060301
010411
160301
1064503
005711

;MAP SUPERVISOR SPACE

MOV
#BIT13,CSR
TESTAREA
PUSH
(R1)
ADD
R3,R1
PUSH
(R1)
CHKIDIS
MOV
R4, (R1)

CLR1CSR

104501

B NNOOONOON
S NO

SEQUENCE

sus

005711

RIRLAINLNIAINL
AL A NININL N
P Y
A
0
'
'
P
NIRORIRIN)
=
b a
s

N_12
PAGE 171

;THIS MAKES SURE THAT SBE'S DON'T LOOK LIKE PROTECTED AREAS

160301
104503

R
R R R R R R R R R RRRRRRRRRRRR
WIN W RIRRU AL N
)

14:13

CLz BANKRS
MA

060301

6392
6393
6394
6395 012302
6396 012304
6397 012312
6398 012314
6399 012320

22-APR-81

R4, (R1)

R3.R1

;WAS THERE A DOUBLE BIT ERROR
:DISABLE ECC & WRITE CHECKBITS FOR 1

; INDEX TO SECOND WORD

;CLEAR CSR
;60 BACK TO FIRST WORD
;WAS THERE A DOUBLE BIT ERROR

s IDENTIFY AS BAD BANK
;DISABLE ERROR CORRECTION

;CLEAR OUT DOUBLE BIT ERROR!

s INDEX TO SECOND WORD

CSR

CZHSDCO MS11-L/M DIAGNOST]C
ECC

MACRO M1113

INHIBIT MODE POINTER TEST

6434 012430
6435 012432
6636 012434
6437 012436
6438 012440
6439 012444
6440 012450
6441 012452

6442 0126454

6443 012456
6444 012460
6445 012462

010411
104503
005705
001405
050560
105260
104036

160301
104417
000207

002624
002626
18:

22-APR-81
MoV
CLR1CSR
TST
BEQ
8IS
INCB
ERROR
POP

SuB

POP
KERNEL
RETURN

14:13

8_13

PAGE 171-1

SEQUENCE

R4, (R1)

sCIEAR OUT DOUBLE BIT ERROR!

RS
18
RS, CONF I1G(RO)
CONF 1G+2(RO)
+36
(R1)

;RESTORE TEST LOCATION (2ND WORD)

(R1)

JRESTORE TEST LOCATION (1ST WORD)

R3,.R1

;G0 BACK TO FIRST WORD

157

%EHSDCO MS11-L/M DJAGNOSTIC
MACRO M1113
ECC INHIBIT MODE POINTER TEST

6789
6790 012464

22-APR-81

SUBAAR:

SET

14:13

STOPOK

PAGE

€13
177

SEQUENCE

;PROGRAM CAN NOW BE MALTED

158

CZMSDCO MST11-L/M DIAGNOSTIC
T4

ECC

MACRO M1113

INHIBIT MODE POINTER TEST

6793 012472

22-APR-81

SUBTST

14:13

D_13

PAGE 179

SEQUENCE

<<LEGAL CONFJGURATION CHECK>>

AR AR RN RN AN AN E NN AR IR RO NN R A AN R A AN RN AN NN N AN NN AN NN
NN N AN TR

;*SUBTEST

SRR

6794 012472
6795 0126476
6796 012502
6797 012504
6801 012506

6802 012512
gggg 012516

6826 012522
6827 012530
6828 012534
6829 012540
6830 012542
6831 012546
6832
6833 012554
6834 012554
6835 012562
6836 012566
6837 012570
6838 012574

6839 012600
6840 012604

6841 012610
6842 012616
6843 012624
6844 012626
6845 012626
6846 012634
6847 012636
6848 012636
6849 012640
6850 012642
6851 012646
6852 012652
6853 012654
6854 012656
6855 012656
6856 012
6857 012672
6858 012700
6859 012700
6860 012700
6861 012700
6862 012714
6863 012720
6864 012722
6865 012724
6866 012726
6867 012732
6868 012740
6869 012742
6870 012750

012700
012701
005021
077002

000020
002432

004737
013700

044300
002102

116003
042703
006303
005263

002625
17776C

002625

042704

177760

042760
042760

014000
170000

006303
006304
005263
005264

002432
002432

N AAN AN AN AN NIRRT

N R AN N R AN R A R AR AR

Mov
#16. R0
MoV
#CSRINFO,R1
CLR
(R1)+
s08
RO,18
FOR BANK := #0 TO LASTBANK

AN NN

ARANNR R AR

NANNN RN

CALL
EXBANK
MOV BANKINDEX,
RO

IF ACFLAG IS TRUE
Move
CONF1G+1(R0O)
,R3
8IC
#4C17,R3
ASL
R3
INC
CSRINFO(R3)
IF MKFLAG IS TRUE
sMAKE SURE THAT EACH BANK HAS NO MORE THAN 2 (SRS
BEGIN
LEGALCSR
IF _INTFLAG IS TRUE
move
CONFIG+1(RO)
,R3
MOV R3,R4
8IC #C17,R3
ASH #-4 R4

002432

116003
010304
042703
072427

005000
005001
005005
005037
022761
002043
022761
002003

18:

NN AN

LEGAL CONFIGURATION CHECK

177760
177774

BIC #-¢i7,R4
IF R3 EQ R4

002626
002624

013134
000010

002432

000020

002432

2%:

BIC
#8IT11!BIT12,CONF1G+2(R0)
BIC
#1700
CONF
00,
1G(RO)
LEAVE LEGALCSR
END; OF IF R3
IF KFLAG IS FALSE
LEAVE
LEGALCSR
END; OF IF KFLAG
ASL R3
ASL R4
INC CSRINFO(R3)
INC CSRINFO(k&)
ELSE
LEAVE
LEGALCSR
END; OF IF INTFLAG
TYPE
MSG124
:# CF CSR'S IS WRONG
TYPOCS BANK,<TYPE BANK #>,3
SET
CONF GERROR
END
LEGALCSR
END ;OF IF MKFLAG
ENF _;OF IF ACFLAG
END; OF FOR BANK
PUSH
R5.RO
sSAVE CONTENTS OF RS, RO
CLR
RO
;CLEAR REGISTERS
CLR
R1
CLR
RS
CLR
MBERR
;CLEAR ERROR INDICATOR
CMp
#10,CSRINFO(RT)
:1S CURRENT (SR <= 10
8GE
5%
sBRANCH IF SO
cMp
#20,CSRINFO(R1)
«1S CURRENT CSR < 20
8GE
3s
sBRANCH [F SO

AR RENRN A

RO N RO NS

159

CZMSDCO MS11-L/M DIAGNOSTIC

LEGAL CONFIGURATION CHECK

6871 012752
6872 012756

004737
000434

013256

6874
6875
6876
6877
6878
6879
6880

032705
001415
042705
072527
020501
001007
032760

000002

6873 012760 016005

6881
6882
6883
6884
6885
6886
6887
6888
6889
6890
6891

012764
012770
012772
012776
013002
013004
013006

013014
013016
013024
013030
013036
013036
013042
013044
013050
013052
013056

6892 013062

6893 013066

6894 013070
6895 013074
6899 013100
6900 013104
6901 013112
6902 013114
6903 013120
6904 013122
6905 013126
6906 013126
6907 013132
6908 013134
6909 013136
6910 013140
6911 013142
6912 013146
6913 013154
6914 013156
6915 013164
6916 013166
6917 013172
6918 013176
6919 013200
6920 013206
6921 013210
6922 013216
6923 013220
6924 013226
6925 013230
6926 013236
6927 013
6928 013244
6929 013246
6930 013254

001003
012737
062700
022700
001351
005737
001402
004737
005000
005037
062701

022701

001321

005037
012700
032760
001003
162700
000771
006200
006200
010037
000402
000000
000000
005000
005037
032760
001431
032760
001005
005237
062700
000763
023727
001417
023727
001413
023727
001407
023727
001403
005037
000403
012737
000421

MACRO M1113

002624

22-APR-81

3$:

170377
177775
010000

002626

000001
000004
000340

013134

48:

013134
013256

5$:

013134
000002

000040
013134
000734
000002

68:

000004
78:

002526
MBERR:
PHEBE:
SKUJ:

013136
000002

002624

010000

002626

18:

013136
000004
013136

000010

013136

000030

013136

000050

013136

000070

013136
000001

2%:

38:
013136

4$:
5$:

E_13

PAGE 179-1

SEQUENCE

CALL
BR

ILLCSR
5§

;CALL ERROR ROUTINE
STRY NEXT CSR

8IT
BEQ
BIC
ASH
CMP
BNE
BIT

#81T1,RS
43
#4C7400,RS
#-7.RS
RS.R1
48
#81T12,CONF 1G+2(R0)

‘DOES MEMORY EXIST HERE?
*BRANCH IF NOT
SISOLATE CSR NUMBER IN
*REGISTER §
*1S IT THE CURRENT (SR?
STRY NEXT WORD OF CONFIG IF NOT
YIS IT INTERLEAVED?

#40,R1

SALL CSR'S DONE?

MOV

CONF 1G(RO) ,RS

BNE
MOV
ADD
CMP
BNE
ST
BEQ
CALL
CLR
CLR
ADD

A3
#1,MBERR
#4.RO
#340.R0
33
MBERR
58
ILLCSR
RO
MBERR
#2.R1

BNE

CMP

002624

14:13

POP
RO,RS
CLR
MBERR
MOV
#734,R0
BIT
#81T1,CONFIG(RO)
BNE
78
SUB
44 RO
BR
6$
ASR
RO
ASR
RO
MOV
RO,LASTBANK
BR
SKUJ
.WORD 0
.WORD 0
CLR
RO
CLR
PHEBE
BIT
#81T1,CONFIG(RO)
BEQ
3s
BIT
#BIT12,CONFIG+2(RO)
BNE
28
INC
PHEBE
ADD
¥4 RO
BR
18
CMP
PHEBE . #10
BEQ
4
P
PHEBE , #30
BEQ
43
CMP
PHEBE
, #50
BEQ
48
CMP
PHEBE ,#70
BEQ
43
CLR
PHEBE
BR
58
MOV
#1,PHEBE
BR
SUBAAP
:BRANCH

160

*MOVE LOW WORD TO RS

*BRANCH IF SO
*SET ERROR INDICATOR
*UPDATE CONFIG COUNTER
SCONFIG TABLE ALL DONE?
*BRANCH IF NOT
*ERRORS FOUND?
STRY NEXT CSR IF NOT
SCALL ERROR ROUTINE
TREINITIALIZE CONFIG COUNTER
*CLEAR ERROR INDICATOR
SUPDATE CSR COUNTER

‘BRANCH IF NOT

*RESTORE REGISTERS
*RESET ERROR INDICATOR
;INDEX TO TOP OF CONFIG TABLE
*MEMORY PRESENT?
*BRANCH IF SO
STRY NEXT LOWER ENTRY IN CONFIG

:R-C
TR=C
‘R=C
TABLE
;R=$
:R-C
;DIVIDE INDEX BY & TO GET BANK #:R-(C
*STORE IN LASTBANK
‘R=C

:R-C

;SAVE SPACE FOR ERROR INDICATOR
;SAVE SPACE FOR ODD BOUNDARY INTERLEAVED INDICATOR
SCLEAR CONFIG COUNTER
+CLEAR COUNTER
*IS THERE MEMORY PRESENT?
*BRANCH IF NOT
*IS IT INTERLEAVED?
*BRANCH IF SO
- INCREMENT COUNTER
*INCREMENT CONFIG COUNTER
*TRY NEXT BANK
*1S THE COUNTER EQUAL TO...
*ONC OF THE SPECIAL VALUES.
YIF IT IS...
*BRANCH TO 48

:CLEAR INDICATOR
:SET INDICATOR
TO NEXT SUBTEST

CZMSDCO mST1 =L/M DIAGNOSTIC
LEGAL CONFIG URATION CHECK

NN
»O0

6931 0132 56
6932 0132 60
6933 0132 62
6934 0132 66
6935 0132
6936 0132
€937 0133 00
6938 0133 04
6939 0133 10
6940 0133 16

010102
006202
022702
100002

062702
062702

110237

000207

000012

000007
000060
075327

MACRO M1113

22-APR-81

ILLCSR: MOV
ASR
CMP
BPL

1$:

ADD

MOv8
TYPE

SET

RETURN

14:13

F .13
PAGE 179-2

R1,R2
R?

#10.,R2

SEQUENCE

;R2 HAS (SR NUMBER

sMAKE ACCEPTABLE FOR PRINTING

18
#7 R2

#60,R2

R2.MSGA122
MSG122

CONF GERROR

;PUT NUMBER INTO ERROR MESSAGE

161

CZMSDCO MS11-L/M DIAGNOSTIC
LEGAL CONFIGURATION CHECK

MACRO M1113

6943 013320

22-APR-81

SUBAAP:

SUBTST

S RARR A AR

6945 0133644
6946 013350
6947 013352

013702
006302
006302

SEQUENCE

R AR NN NN AR A RN AN I AR AN AN R A AN AR

R A AN

RA AN

AR ANRN AR NRS

PRINT CONFIGURATION DETAILS

AN AN AN

AR AN AN AR NI

A NN N AN AN AN AR

RN RN

AN AN AN TR AN RN

N AR

CLEAR BSI2E KSIZ2E,LSIZE,MSIZE,PSIZE
MOV
LASTBANK
,R2
ASL
R2
ASL
R2
FOR R1 := #0 TO R2 BY #4
IF CPUBIT SET.IN CONFIG(R1)

002526

IF #8IT10 SET.IN CONFIG+2(R1)
IF #BIT8 SET.IN CONFIG+2(R1)
IF #BIT9 SET.IN CONFIG+2(R1)

6951 013376
6952 013406

6953 013416
6954 013422
6955 013424
6956 013430
6957 013430
6958 013432
6959 013442
6960 013446
6961 013450
6962 0134564
6963 013454
6964 013454
6965 013456
6966 013466
6967 013476
6968 013502
6969 013502
6970 013502
6971 013502
6972 013502
6973
6974 013512
6975 013516
6976 013520
6977 013524
6978 013530
6979 013534
6980 013540
6981 013546
6982 013560
6983 013562
6984 013572
6985 013576
6986 013576
6987 013610
6988 013614
6989 013620
6990 013624
6991 013630
6992 013646
6993 013652
6994 013656
6995 013660
6996 013666

613

PAGE 181

<<PRINT CONFIGURATION DETAILS>>

AN RN AN NN AR

s *SUBTEST

3944 013320

14:13

LET PSIZE
ELSE
LET KSIZE

END;IF BIT9

:= PSIZE + M

:= KSIZE + M

ELSE

IF #BIT9 SET.IN CONFIG+2(R1)
LET LSIZE

:= LSIZE + M

LET MSIZE := MSIZE + M
END; IF BIT9
END;IF BIT8

ELSE

IF #B1T9 SET.IN CONFIG+2(R1)
IF #8178 SET.IN CONFIG+2(R1)
LET BSIZE := BSIZE + M
END; OF IF #BIT8
END; OF IF #BIT9
END;IF BIT10

END; OF IF CPUBIT
END ;OF FOR ALL BANKS IN TABLE

005037

002422

006361
006361
006361
006361
066137

002344
002344
002344
002344
002344

002422

CLR
FOR R1
ASL
ASL
ASL
ASL
ADD

END;

1
:= #0 TO #10 8Y #2
BSIZE(R1)
BSIZE(R1)
BSIZE(R1)
BSIZE(R1)
BSIZE(R1),l

;BSIZE(RY) :
;] <=1 + 8BS

FOR R1

FOR R1 := #0 TO #200 BY #4
IF CPUBIT SET.IN CONFIG(R1)

LET UNITOP := UNITOP + M1
END; OF IF CPUBIT
END; OF FOR R1

006337
006337
006337
006337

002366
002366
002366
002366

ASL
ASL
ASL
ASL

UNITOP
UNITOP
UNITOP
UNITOP

005737
001405

002344

TYPE
TST
BEQ

$CRLF
BSIZE
13

: UNITOP

IF 1 LT UNATOP THEN LET I

TYPDEC

TYPE

BSIZE

MSG071

:= UNITOP « 16,
:= UNITOP

ZE(RT) «~ 16.
1

NN RA RN

RESR

162

PRINT CONFIGURATION DETAILS

6997 013672
6998 013676
6999 013700
7000
7001
7002
7003
7004
7005
7006
7007
7008
7009
7010
7011
7012
7013
7014
7015
7016
7017

013706
013712
013716
013720
013726
013732
013736
013740
013746
013752
013756
013760
013766
013772
014000
014004
014014
014020

MACRO M1113

005737
001405

002346

18:

005737
001405

002350

2%:

005737
001405

002352

3s:

005737
001405

002354

48:

5%:
004737

036630

22-APR-81 14:13

TST
BEQ
TYPDEC

TYPE
TST
BEQ
TYPDEC
TYPE
TST
BEQ
TYPDEC
TYPE
TST
BEQ
TYPDEC
TYPE
TYPDEC
TYPE
IF #SW6
CALL
END; OF

H13

PAGE 181-1

KSIZE

MSG072
LSIZE
3s
LSIZE
MSG112
MSIZE
4s
MS1ZE

MSG113
PSIZE

PSIZE

MSG114
g

CZMSDCO MS11-L/M DIAGNOSTIC

MSG070

OFF.IN @SWR

PCONFIG

IF #SuW6

SEQUENCE

163

CZMSDCO MS11-L/M DIAGNOSTIC

PRINT CONFIGURATION DETAILS

7020 014020

MACRO M1113

22-APR-81
SUBTST

14:13

SEQUENCE

<<CHECK APT SIZING>>

RN AANRRA RN AN AN AANRARN

: *SUBTEST

[ 13

PAGE 183

NN R R AN

AAAN AR AANAAAAN A AN

CHECK APT SIZING

AN AAANIRAANARANAAA

AN ANONAANOER

ttt.tt*ttt't..ttt't"'t"t"".t'l't'tfit'QQ.t'ttt't'iitfit't.fitt"'tttt'ttttt'tt

7021
7022
7023
7024
7025
7026
7027
7028
7029
7030
7031

014020
014034
014040
014044
016046
014054
014056
014 062
014070
014072
014074

7033
7034
;035
036
7037
7038
7039
7040
7041
7042
7043
7044
7045
7046

014076
014100
014102
014104
014106
014110
014112
014116
014122
014132
014136
014736
014146
014152

7047
7048
7049
7050
7051
7052
7064

014152
014156
014156
014166
014206
014210
014210

005037
012700
111001
042701

002404
063056

MOV
_#SMAMS1,RO
FOR R2 := #0 10 #4

IFB_1(R0) NE #0

177400

000261

Movs

8IC

(RO) .R1

#177400,R1

IF 2(RO) LT #0

SEC
ELSE
cLC
END ;OF IF 2(RO)

000241

006101
005201
006301
006301
006301
006301
163701
010137

002404
0024064

060137

002372

060137

002374

062700

000004

104046

IF APTFLAG
IS TRUE AND APTSIZE IS TRUE

ROL

ASL
ASL

R1
R1

igf

ASL
sus
MOV

:TO COMPENSATE FOR 4 BANKS BEING (0-3)

R1
TEMP,R1
R1,TEMP

IFB 1(RO) EQ #3

ADD
END ;OF

R1,APTPAR
IFB 1(RO)

IFB 1(RO) EQ #4

ADD
R1,APTECC
END ;OF IFB 1(RO)
ADD
#4 RO
END ;OF IFB_1(RO)
END ;OF FOR R2

IF_APTPAR NE LSIZE OR APTECC NE MSIZE
ERROR
+46
END ;OF IF APTPAR
END ;OF IF APTFLAG

164

CHECK APT SIZING

7066 014210

MACRO M1113

22-APR-81

LOOP:

NEWTST

J 13

14:13

PAGE 184

SEQUENCE

<<DIAGNOSTIC MODE DISPATCH ROUTINE>>

SRRARARARANRANARANARAAC
AN RAARAANRAAANARAN AN NRARANANRRARANACRNAREONANA AN
AIRAOAS

J*TEST S
SOOIV

b
b
s wd wd
b
b
— ed and aed el e

~
=]
~
~

N
N N N
N
N
AIAINIRNIRIAINIAININIRINIAD
VNN
B S DNWNIN)
= =

OO0 OOOOOO

TSTS:

000004

DIAGNOSTIC MODE DISPATCH ROUTINE

I LT

SCOPE

CLR
MOV
BIC
CALL
JMP
DISPTBL:BAFPAF
BAFPAR

BAWPAF

BAWPAR
PAFBAF

PAFBAW

PARBAF
PARBAW

0
708} 014256

014610

MEMDONE : CALL

7083 014262

CONTFLAG
8SWR RO
sGET SWITCHES
#4C16,R0
sMASK TO ONLY MODE BITS
aDISPTBL (RO)
sDISPATCH TO ROUTINE THROUGH NEXT TABLE
MEMDONE
:GO TO NEXT TEST
:MODE 0Q;BANKS FORWARD, PATTERNS FCRWARD
;MODE 1:BANKS FORWARD, PATTERNS REVERSE

:MODE 2:BANKS WORST FIRST, PATTERNS FORWARD
;MODE 3;BANKS WORST FIRST, PATTERNS REVERSE
:MODE &;PATTERNS FORWARD, BANKS FORWARD

:MODE S:PATTERNS FORWARD, BANKS WCRST FIRST
;MODE 6;PATTERNS REVERSE, BANKS FORWARD
;MODE 7.PATTERNS REVERSE, BANKS WORST FIRST

DOBA(CK

sCHECK BACKGROUND PATTERN

NEWTST<<UNIQUE BANK TEST>>
MAAEARAAL SR

ARAR A2t

*TEST 6

iRt

iRl

sttt iiiiiindtitiitssssssd)

UNIQUE BANK TEST

:ttttttttttttttttt*'titttt'tttttttt't'ttttttttttttt'ttttt'tttt'tt'ttt*itt"t"t.

014262
7084
7085
7086 014264
7087 014272
7088 014306
7089 014312
7090 014320
7091 014324
7092 014324
7096
7097 014330

000004

TST6:

SCOPE

MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA

:WRITE AND READ THE BANK NUMBER IN EACH BANK (EXCEPT WHERE THE PROGRAM IS)
004737

024232

005037

002106

004737

014610

1F SELONLY IS FALSE
SET
HEADER,MUT

CALL

MT0027

SET
HEADER
CLR
MUt
END ;OF IF SELONLY
CALL
DOBACK
FLUSH:

SUBTST

<<FLUSH OUT DBE'S>>

SRR REREIARNANANRA AN RANANRR AR AR AR

s*SUBTEST

FLUSH OUT DBE'S

RN AR RN R AANRAA AN AR

7098 014330

004737

024716

CALL

RESTORE BACKROUND PATTERN

MT0030

AR RN AP

RN AAN R AANAAARRAANARRRAARNRAN RN

ARARAARARNRAANNR

A AN RN AN AN AN RN RRARR AN RARARIRARRARNCANRANRAAARANANRS

165

(¥ Y

CZMSDCO MS11=L/M DIAGNOSTIC

CZMSDCO MS11-L/M DIAGNOSTIC

END OF PASS ROUTINE

7101
7102
7103
7104
7105
7106
7107
7108 014334
7109 014340
7110 014344
7111 014350
7112 014354
7113 014360
7116 014362
7115 014370
7116 014374
7117 014402
7118 014406
7119 014424
7120 014430
7121 014434
7122 014434
7123 014442
7124 014446
7125 014450
7126 014454
7127
7128 014456
7129 014460

7130 014464
7131 014466
7132 014470
7133 014472
7134 014474
7135 014476
7136 014500
7137
7138
7139
7140
7141 014500
7142 014504
7143 014510
7144 014512
7145 014520
7146 014522
7147 014526
7148 014532
7149 014536
7150 014544
7151 014554
7152 014560
7153 014562

7154
7155
7156
7157

014570
014574
014576
014602

MACRO M1113

22-APR-81

.SBTTL

14:13

K13

PAGE 186

SEQUENCE

END OF PASS ROUTINE

: *INCREMENT THE PASS NUMBER (SPASS)
*INDICATE END-OF -PROGRAM AFTER EACH PASSES THRU THE PROGRAM
:*TYPE "END PASS #XXXXX'' (WHERE XXXXX IS A DECIMAL NUMBER)
;*IF THERES A "ONITOR GO TO IT
005037
012700
042710
062700
020027
003771

002412
002626
020000
000004
003620

042737

100000

013737
005237

002570
063034

005037

002316

013700

000042

001456
022700

001453

004737

«]F THERE ISN'T JUMP TO LOOP

$€0P:

1$:

CLR

FSINFLAG

MOV

#CONFIG+2,R0

;MOVE 2ND WORD OF CONFIG TO RO

ADD

#4,R0

- INCREMENT TO NEXT BANK

BIC

81713, (RO)

cMP

RO-#3620

BLE
MOV
INC

002014

063034

:DONE?

*NO = BRANCH

SERTTL LASTERROR
$PASS
;; INCREMENT THE PASS NUMBER

BIC
#100000,SPASS
::DON'T ALLOW A NEG. NUMBER
TYPE
MSG077
“TYPE "END PASS #''
IF #SW11 SET.IN aSWR OR QVFLAG IS TRUE

TYPE
CLR
END ;OF
TYPDEC
MOV
BEQ
$ZAP42: CMP

002000

:CLEAR BACKGROUND VALID BIT

BEQ

MSGO35
QVFLAG
IF Swi1
$PASS
42.R0
$DOAGAIN
#STACK ,RO

$DOAGAIN

::GET MONITOR ADDRESS
S:BRANCH IF NO MONITOR
:ARE WE_UNDER RT11

YES - BRANCH

“WE ARE UNDER (HEAVEN HELF US) XXDP!

PUSH

045166

CALL
POP
RESET
$SENDAD: CALL
NOP
NOP

000005
004710
000240
000240
000240

$DOAGN:

002534
002424

012701
077001
062737
005537
077107
005237
000764

000050

000060
002536
000001
043750

000001
063040
063034

18:

APTHANG :
063036

(RO)

::CLEAR THE WORID

2260 TO MONITOR

*SAVE ROOM
22FOR

SIACTN

ENERGIZE UNIBUS MAP & 22 BIT ADDRESSING

;

ENERGIZE MEMORY MANAGEMENT
PUT LOADERS BACK HOME

gfig

?22281T

8IS

#8ITS'BIT4,MMR3

MOV

172516

SHUTUP
RO

NOP
;UNDO SHUTUP STUFF
;
RESTORE STACK

:
:

013706
005737
001003
052737
104420
013700
012701
004737

KSTACK
, SP

ENERGIZE
MOV
LOADHOME ,RO
MOV
#1,R1
CALL
BANKMOV
IF APTFLAG IS TRUE
IF SUSWR EQ $PASS

MOV #50,R1
S08 RO, o8

ADD #1.$DEVCT
ADC SUNIT

SOB R1,2$
INC $PASS

APTHANG

;IS THIS AN 11/44 OR 11/24?
:TURN ON MEMORY MANAGEMENT
*DESTINATION BANK
:SOURCE BANK

166

CZMSDCO MS11-L/M DIAGNOSTIC
END OF PASS ROUTINE
7158 014604
7159 014604
7160 014604

MACRO M1113

22-APR-81

14:13

L 13
PAGE 186-1

SEQUENCE

END ;OF IF SUSWR

000137

014210

END .OF IF APTFLAG
$DOAGAIN: JMP
LOOP

JRETURN

167

CZMSDCO MS17-L/M DIAGNOSTIC

END OF PASS ROUTINE

7163 014610

MACRO M1113

22-APR-81 14:13

DOBACK:

SUBTST

SRNRRA

7164
7165
7166
7167
7168
7169
7170
7171
7172
7173
7174

014610
014614
014620
014624
014640
014654
014660
014664
014672
014672
014706

005037

002110

004737

044300

004737
005037

017516
002106

000207

NI ARAARRAANNRARAANNAAANENRAAAIAAAA
IR AA AR AAA IR ACANAARO NS

WRITE BACKGROUND PATTERNS

AN AR NN AR

AR AR AR A AN AN RAAARA AN AR AR AN ARAARANRAAARARRAARAAANRARCRARAS

CLR
PATTERN
FOR BANK := #0 TO LASTBANK
CAL'.
EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE
SET
HEADER ,MUT
s CALL
CALL
MKTEST
MJTEST WOULD ALSO WORK
MUT
CLR
SET
HEADER
END ;OF IF ACFLAG
END :OF FOR BANK
RETURN

SEQUENCE

<<WRITE BACKGROUND PATTERNS>>

CHRARNANRNRARARNRAANN AN

L %SUBTEST

M 13
PAGE 188

168

CZMSDCO MS11-L/M DIAGNOSTIC

MTEST MODES

MACRO M1113

22-APR-81

414
7179 014710

BAFPAF:

14:13

N 13
PAGE 190

SEQUENCE

.SBTTL

MTEST MODES

SUBTST

<<BANKS FORWARD,PATTERNS FORWARD

**RECURSIVE
#4>>

;*tt*itititttttittt*tt*'tt*tttittt*ttttttttttfi*ittti't'ttfitttttttttttttttttttttt

: *SUBTEST

BANKS FORWARD,PATTERNS FORWARD

«*RECURSIVE
##

.'**ttttt*tfittttttttttttttttittfittt!tfiittttttttt*fittttttttt*ttttttittttttttttttti

7180
7181
7182
7183
7184
7185
7186
7187
7188
7189
7190
7191
7192
7193
7194
7195
7196
7197
7198
7199
7200

014710

014714
014720
014724
014726
014732
014734

005037
)
004737
005737

001412
005737
001007
005037

002100

044300
002114

002110

004737

016210

014744

004737

044766

014752
014756
014762

005037
004737
002354

002214
045012

014764
014770
014772

005737
001401
000207

002124

004737

042526

7204 015004
7205 015010
7206 015014

004737
004737
000207

014710
043416

7201 014774
7202 015000
7203

001373

BEQ
TST
BNE
CLR

002122

014740

014750

18:

CLR
BANK
:START OF BANK LOOP
CALL
EXBANK
ST
ACFLAG

28:

4$:

4$
RRFLAG
4$
PATTERN

;SET BANK TO 0

; EXAMINE BANK
:CAN WE ACCESS THIS BANK?
:NO = GO TO BANK LOOP TERMINATION
:RELOCATION REQUIRED?
1YES = GO TO BANK LOOP TERMINATION
:SET PATTERN T0 0

;START OF PATTERN LOOP
CALL
MTEST
;GO TEST CORRECT MEMORY
;TERMINATION OF PATTERN {00P
CALL
INCPAT
;GO SEE IF THIS IS THE LAST PATTERN
BNE
28
:NO - LOOP ON THIS PATTERN
; TERMINATION OF BANK LOOP
CLR
CONTFLAG
CALL
INCBNK
;NEXT HIGHER BANK
BGE
18
:IF NOT DONE - LOOP ON THIS BANK
:END OF LOOPS
tsT
RLFLAG
:HAVE WE BEEN RELOCATED?
BEQ
58
:NO - SKIP
RETURN
:YES - RETURN

CALL
RELOCATE
:MOVE & MAP PROGRAM
ON.ERROR THEN SRETURN
;%«NOTE** RECURSIVE CALL
CALL
BAFPAF
;CALL SELF
CALL
UNRELOCATE
:UNMOVE & UNMAP PROGRAM
RETURN

169

CZMSDCO MS11-L/M DIAGNOSTIC

BANKS FORWARD ,PATTERNS FORWARD

7209 015016

MACRO M1113

**RECURSIV=+
E

<<BANKS FORWARD ,PATTERNS REVERSE

:*SUBTEST

BANKS FORWARD ,PATTERNS REVERSE

**RECURSIVE*+¢>>

t.tt."t...t.Q'..'t'"""'QQ.."..""".Q'.".'""'.."""""".0..'0'.".

002100

7215 015034
7216 015040
7217 015042
7218
7219 015046
720
7221 015052
7222 015056
7223
7224 015060
7225 015064
7226 015070
7227
7228 015072
7229 015076
7230 015100
7231 015102
7232 015106
7233
7234 015112
7235 015116

002122

7214 015032

004737

045002

004737

016210

005337

002110

100373

005037
004737
002354

005737
001401
000207
004737

042526

004737
004737

015016
043416

000207

1%:

AR AR

**¢RECURSIVE
¢#

A ARt a2
T T
YY) L)

CLR

BANK

;SET BANK TO O

CALL
TST

E XBANK
ACFLAG

TST

RRFLAG

sEXAMINE BANK
sCAN WE ACCESS THIS BANK?
:NO
- GO TO BANK LOOP TERMINATION
:RELOCATION REQUIRED?
;YES = GO TO BANK LOOP TERMINATION

;START OF BANK LOOP

BEQ

BNE
CALL

43
SETPAT

:SET HIGH PATTERN FOR CORRECT MEMORY

2%:

:START OF PATTERN LOOP
MTEST
CALL

A ¥

8PL
:NO - LOOP ON THIS PATTERN
; TERMINATION OF BANK LOOP
CLR
CONTFLAG

: TERMINATION OF

DEC

CALL
INCBNK
8GE
1%
:END OF LOOPS
TST

8EQ

5%:

SQTTERN

PATTERN

RLFLAG

RETURN
CALL
RELOCATE
ON.ERROR THEN SRETURN

;**NOTE+** RECURSIVE CALL

CALL
CALL

RETURN

BAFPAR
UNRELOCATE

'68PTEST CORRECT MEMORY
o

044300
002114

RAR

r—e

005037

7212 015022
7213 015026

7236 015122

SEQUENCE

BAFPAR: SUBTST

MAAAAAARAAARAAAAS AL

;210 015016
2N

8 14
PAGE 192

22-APR-81 14:13

;1S THIS THE LAST PATTERN?

sNEXT HIGHER BANK
:1F NOT DONE - LOOP ON THIS BANK
sHAVE WE BEEN RELOCATED?
NO - SKIP

:YES - RETURN

:MOVE € MAP PROGRAM

sCALL SELF

;UNMOVE € UNMAP PROGRAM

170

CZMSDCO MST11-L/M DIAGNOSTIC

BANKS FORWARD ,PATTERNS REVERSE

7239 015124

MACRO M1113

22-APR-81

**RECURSIVE+

: SUBTST
BAWPAF
A

; *SUBTEST

7240 015126

002100

004737

044300
002114

002110

162

004737

016210

ededed

OO0

cded

Db eae

oooCcOo

005737
001007
005037

005737

140
142
146
150
154
156

7264
7265
7266
7267
7268
7269
7270
7271
7272
7273

005037

OO0

7241
72642 015130

1 72

176

200
204
2 06
2 12

015220
015222
015226
015230
015232
015236

015242
015246
015252

001415
005737
001412

004737

001373

005037

004737
002351

18:

002126
002122

2$:

002

48:

005137
001003

004737
000207
005737
001401
000207
004737

015124

004737
004737
000207

0151
0434

002124

C 14
PAGE 194

SEQUENCE

<<BANKS WORST FIRST,PATTERNS FORWARD
i

BANKS WORST FIRST ,PATTERNS FORWARD

RN AN AN AN NN

R NN AR AN AN A AAN

CLR
BANK
:START OF BANK LOOP
CALL
E XBANK
TST
ACFLAG
48
BEQ
TST
BMFLAG
48
8EQ
TST

044766

045

AR RN

14:13

RRFLAG

48
BNE
PATTERN
CLR
:START OF PATTERN LOOP
CALL
MTEST

;TERMINATION OF PATTERN

AN AN N AR

**RECURSIVE**>>
R

6%:

;SET BANK TO 0
cEXAMINE BANK
sCAN WE ACCESS THIS BANK?
sNO = GO TO BANK LOOP TERMINATION
;1S THIS BAD MEMORY (WORST FIRST)?
sNO = GO TO BANK LOOP TERMINATION
JRELOCATION REQUIRED?
sYES = GO TO BANK LOOP TERMINATION
sSET PATTERN TO 0
;GO TEST CORRECT MEMORY

ooP
CALL
INCPAT
;G0 SEE IF THIS IS THE LAST PATTERN
BNE
2%
:NO - LOOP ON THIS PATTERN
:TERMINATION OF BANK LOOP

CLR

CALL
BGE

CONTFLAG
INCBNK
18

sNEXT HIGHER BANK

:IF NOT DONE - LOOP ON THIS BANK

;END OF LOOPS
coMm
WORST

BNE

;1S THIS AN EVEN NUMBERED PASS?

CALL

BAWPA

sCALL SELF

TST

RLFLAG

RETURN

BEQ

RETURN
CALL

RELOCATE
ON.ERROR THEN SRETURN

;**NOTE+* RECURSIVE CALL

CALL
CALL
RETURN

BAWPAF
UNRELOCATE

*RECURSIVE**

NN AN RANARANNN RO

sYES - SKIP
;X *NOTE w+ RECURSIVE CALL’

b ¥

sHAVE WE BEEN RELOCATED?
:NO - SK]IP
;YES = RETURN
sMOVE & MAP PROGRAM
cCALL SELF
;UNMOVE © UNMAP PROGRAM

RAOIRNOANNESE

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113 22-APR-81
BANKS WORST FIRST,PATTERNS fORWARD
**RECURSIVE
++

7276 015254

BAWPAR: SUBTST
MR

7277 015254
7278
7279 015260
7280 015264

7281
7282
7283
7284
7285
7286
7287

01£270
015272
015276
015300
015304
015306

7288 015312
7289
7290 015316
7291 015322
7292
7293 015324
7294 015330
7295 015334
7296
7297 015336
7298 015342
7299
7300 015344

7301 015350
7302 015352

005037

002100

004737
005737
001415
005737
001412
005737
001007
004737

044300
002114

18:

002122
045002

004737

016210

005337
100373

002110

28:

005137
001003

002540

004737

015254

TST

015360
015362
015366

004737

042526

68 :

015372
015376
015402

004737
004737
000207

015254
043416

AN R AR NI I IR R AN AN AN N NN AN RN R AN NN A NN NN

ACFLAG

4$
HMFLAG
43
TST
RRF LAG
BNE
4$
CALL
SETPAT
;START OF PATTERN LOOP

**RECURSIVE**>>
Rl

N R AN

NI NI AR

sEXAMINE BANK
sCAN WE ACCESS THIS BANK?
sNO = GO TO BANK LOOP TERMINATION
:1S THIS BAD MEMORY (WORST FIRST)
:NO - GO TO BANK LOOP TERMINATION
JRELOCATION REQUIRED?
;YES = GO TO BANK LOOP TERMINATION
sSET HIGH PATTERN FOR CORRECT MEMORY

IS THIS THE LAST PATTERN?
NO - LOOP ON THIS PATTERN
-TERMINATION OF BANK LOOP

CLR

CONTFLAG

CALL

INCBNK

com

WORST

CALL

RELOCATE

SNEXT HIGHER BANK

:IF NOT DONE - | NOP ON THIS BANK

IS THIS AN EVEN NUMBERED PASS?
YES - SKIP
: **NOTE %+ RECURS1VE cALL’
CALL
BAWPA
sCALL SELF
RETURN
TST
RLFLAG
sHAVE WE BEEN RELOCATED?
BEQ
63
:NO - SK]IP
RETURN
sYES = RETURN

ON.ERROR THEN SRETURN

s**NOTE+* RECURSIVE CALL

CALL
CALL
RETURN

BAWPAR
UNRELOCATE

JSET BANK TO O

PATTERN

B8PL

TYTMTTMs

«*RECURSIVEw+

CALL
MTEST
;;GO TEST CORRECT MEMORY
;TERMINATION OF PATTERN (0OP

BNE

58 :

BANKS WORST FIRST, PATTERNS REVERSE

BGE
18
:END OF LOOPS

002124

001401
000207

CLR
BANK
;START OF BANK LOOP
CALL
EXBANK

DEC

48:

005037
004737
002351

AR AN AN AN

BEQ
TST
BEQ

002126

0002°7
005737

7303 015356

7304
7305
7306
7307
7308
7309
7310

SRR

SEQUENCE

<<BANKS WORST FIRST,PATTERNS REVERSE

:«SUBTEST

D 14
PAGE 196

14:13

:MOVE & MAP PROGRAM

sCALL SELF
;UNMOVE £ UNMAP PROGRAM

T RO RN

172

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

BANKS WORST FIRST,PATTERNS REVERSE

7313 015404

22-APR-81

**RECURSIVx#
E

14:13

PAFBAF: SUBTST
AR

:*SUBTEST

E 14

PAGE 198

SEQUENCE

<<PATTERNS FORWARD,BANKS FORWARD
R

22200222

PATTERNS FORWARD ,BANKS FORWARD

222

**RECURSIVE**>>
3

2222022222222

**RECURSIVE++

222223 222222 ]

SRRANRAANRANANAAARAANA
TR
AARRAARANANAAAAANANANANRANRARAARNEANNRAANAINNEANRONAOANS

7314 015404
7315
7316 015410

7317
7318 015414
7319 015420
7320 015424
7321 015426
7322 015432
7323 015434
7324 015440
7325 015442
7326
7327 015446
7328 015452
7329 015456
7330
7331 015460
733% 015464
733
7334 015466
7335
7336 015472
7337
7338 015474
7339 015500
7340 015502
7341 0155
7342 0155

7343 0155
7344 0155

0155
0155
0155

005037

002110

005037

002100

1$:

004737
004737
001010
005737
001405
005737

044300
044750

2$:

004737

016210

005037
004737
002356

002214
045012

004737
001351

044766

005137

002132

001002

001401
000207
004737

004737
004737
000207

sEXAMINE BANK

sCORRECT MEMORY FOR THIS BANK?

TST

ACFLAG

;CAN WE ACCESS THIS BANK?

TST

RRFLAG

sNO - GO TO BANK LOOP TERMINATOR

‘s

sNO = GO TO BANK LOOP TERMINATION

sRELOCATION REQUIRED?

BNE
CALL

43
MTEST

CLR
CALL

CONTFLAG
INCBNK

CALL
BNE

INCRPT
18

sNEXT HIGHER PATTERN
;0K - LOOP; ELSE CONTINUE

coM

TMFLAG

;COMPLEMENT TYPE OF MEMORY

BEQ

;TERMINATION OF

JYES = GO TO BANK LOOP TERMINATION
;GO TEST CORRECT MEMORY

BANK LOOP

sNEXT HIGHER BANK

BGE
28
s1F NOT DONE - LOOP ON THIS BANK
LOOP
PATTERN
OF
- TERMINATION
-END Of LOOPS

015404
002124

5%:

042526

6$:

015404
043416

;SET BANK TO O

BANKOK

8EQ

002122

;SET PATTERN T0 0

CALL

BNE

002114

001403

004737
000207
005737

CLR
PATTERN
:START OF PATTERN LOOP
CLR
BANK
:START OF BANK LOOP
CALL
EXBANK

s **NOTE+*~ RECURSIVE
CALL
PAFBAF
KE TURN

TST
BEQ

RETURN

CALL

RLFLAG
6$

CAIL
RELOCATE
ON.ERROR THEN SRETURN

;1S THIS AN EVEN NUMBER PASS?
JYES - SKIP
sCALL

SELF

sHAVE WE BEEN RELOCATED?
;NO - SKIP
;YES - RETURN

;MOVE & MAP PROGRAM

;**NOTE+~* RECURSIVE CALL
PAF BAF
CALL
sCALL SELF
CALL
UNRELOCATE
;UNMOVE € UNMAP PROGRAM
RETURN

173

CZMSDCO MS11-L/M DIAGNOSTIC

PATTERNS FORWARD ,BANKS FORWARD

7351 01553¢4

MACRO M1113

22-APR-81

*+*RECURSIV=
E
PAFBAW:

SUBTST

14:13

F 14

PAGE 200

SEQUENCE

<<PATTERNS FORWARD,BANKS WORST FIRST

*«RECURSIVE+*>>

SRAARNRANRANRARNRANRARNARRCCICRANAANANRARARAAAAARNANANARNANNNNNRNRANAANRANNNERNAR
RN CANRNONS

;*SUBTEST

PATTERNS FORWARD ,BANKS WORST FIRST

SRR ARANRAAARANAAAAAA IO EREA

;gg% 015534

005037

002110

7354 015540
7355
7356 015544
7357 015550
7358 015554
7359 0155586
7360 015562
7361 015564
7362 015570
7363 015572
7364 015576

005037

002100

18:

004737
004737
001013
005737

044300
044750

28:

;ggg 015600

001410
005737

001405
005737
001002

016210

7367 015604
7368 015610
;%98 015614

005037
004737
002353

002214
045012

7371 015616
737% 015622

004737
001346

044766

;%;g 015624

005137

002132

7376 015630
7377

001403

7378 015632
7379 015636

7380
7381
2
7383
7384

002540

015646
015652

004737
000207

015534

7386 015660

001401

015670
015674
015700

015704

005737
000207

002124

004737

042526

004737
004737

0155
0434

000207

CALL

BANKOK

sCORRECT MEMORY FOR THIS BANK?

TST

ACFLAG

CALL

BEQ
TST

48:

EXBANK

sEXAMINE BANK

:NO = GO TO BANK LOOP TERMINATOR

BMFLAG

RRFLAG

BNE
CALL

4$
MTEST

CLR

CONTFLAG

sCAN WE ACCESS THIS BANK?

sNO = GO TO BANK LOOP TERMINATION
;1S

THIS BAD MEMORY

(WORST FIRST)

sNO = GO TO BANK LOOP TERMINATION
RELOCATION REQUIRED?

sYES = GO TO BANK LOOP TERMINATION
;GO TEST CORRECT MEMORY

: TERMINATION OF BANK LOOP

CALL

INCBNK

sNEXT HIGHER BANK

CALL
BNE

INCRPT
1%

sNEXT HIGHER PATTERN
;0K - LOOP; ELSE CONTINUE

COM

TMFLAG

:COMPLEMENT TYPE OF MEMORY

BGE
2%
;1F NOT DONE - LOOP ON THIS BANK
:TERMINATION OF PATTERN LOOP

;END OF LOOPS

s1S THIS AN EVEN NUMBER PASS?

BEQ
5%
;YES - SKIP
s **NOTE+~* RECURSIVE CALL

015534

005137
001003

73
7389
7390
7391
7392
7393

015640
015644

004737
000207

;SET BANK TO 0

TST

002122

;SET PATTERN TO 0

CLR
; START OF BANK LOOP

BEOQ

002126

9004737

CLR
PATTERN
:START OF PATTERN LOOP

BNE

002114

«*RECURSIVE®+

AN RANRNRANRAANANNAAAAANARNARAANNANANNANRNNANARAA
ORI ANNONRE

5%:

CALL
RETURN

coM

BNE

PAFBAW

sCALL SELF

WORST

:4TH PASS?

;**NOTE+* RECURSIVE CALL

6$:
7$:

;YES - SKIP

CALL
RETURN

PAFBAW

sCALL SELF

BEQ

RLFLAG

sHAVE WE BEEN RELOCATED?

TST

RETURN

CALL
RELOCATE
ON.ERROR THEN SRETURN

s **NOTE+~* RECURSIVE CALL

CALL
CALL
RETURN

PAFBAW
UNRELOCATE

:NO - SKIP

sYES -~ RETURN

;MOVE & MAP PROGRAM

sCALL SELF

;UNMOVE €& UNMAP PROGRAM

174

CZMSDCO MS11-L/M DIAGNOSTIC

PATTERNS FORWARD ,BANKS WORST FIRST

7396 015706

MACRO M1113 22-APR-81 14:13 PAGE SOZ

SEQUENCE

**RECURSIV*+
E

PARBAF: SUBTST

<<PATTERNS REVERSE,BANKS FORWARD

t+RECURSIVE+*>>

SRR ARRA AN RNAAARNAR RN RN AARARANANAAANRAAANAACAANRNAARNANARANNNARAANANRAAARNRAANO
AR

s *SUBTEST
SRR

7397 015706
7398
7399 015712
7400
76401 015716
7402 015722
76404 015730
7405 015734
7406 015736
7407 015742
7608 015744
7409
76410 015750
7611 015754
7412 015760
7613
7414 015762
76415 015766
7416
76417 015770
7618
7619 015774
7420
7621 015776
7422 016002
7423 016004
7424 016010
7425 016012
76426 016014

;227 016020
28
7429 016024
7430 016030
7431 016034

ANAN

004737

045002

005037

002100

18:

CLR

004737
004737
001010
005737
001405
005737
001002
004737

044300
044750

28:

CALL

016210

005037
004737
002356

002214

005337

002110

100351

005137

045012

48:

EXBANK

sSET HIGHTEST PATTERNS

;SET BANK TO 0

; EXAMINE BANK

CALL

BANKOK

;CORRECT MEMORY FOR THIS BANK?

TST

ACFLAG

sCAN WE ACCESS THIS BANK?

TST

RRFLAG

43
48

BNE
CALL

43
MTEST

CLR

CONTFLAG

BGE

DEC

PATTERN

¢NO - GO TO BANK LOOP TERMINATOR
;NO = GO TO BANK LOOP TERMINATION
;RELOCATION REQUIRED?

;YES = GO TO BANK LOOP TERMINATION
:GO TEST CORRECT MEMORY

; TERMINATION OF BANK LOOP

CALL

INCBNK

sNEXT HIGHER BANK

;1IF NOT DUNE - LOOP ON THIS BANK

: TERMINATION OF PATTERN LOOP

8PL

.END OF LOOPS

002132

001403

sNEXT LOWER PATTERN

;0K = LOOP; ELSE CONTINUE

COM

TMFLAG

;COMPLEMENT TYPE OF MEMORY
;1S THIS AN EVEN NUMBER PASS?

BEG

CALL

PARBA}

sCALL SELF

TST
BEQ

RLFLAG
63

cHAVE WE BEEN RELOCATED?
:NO - SKIP

;YES - SKIP

; **NOTE~+ RECURSIVE CALL’

004737
000207
005737

002124

5%:

004737

042526

6$:

004737
004737
000207

BANK

:START OF BANK LOOP

BEQ

002122

**RECURSIVE*+

AR A ANENAAAANANNAANACRARANENRAANANR
AN NARA AN
ANANNRINONANR

CALL
HIPAT
:START OF PATTERN LOOP

BNE

002114

PATTERNS REVERSE,BANKS FORWARD

AR ANAANAAARA

015706

RETURN
RETURN

CALL
RELOCATE
ON.ERROR THEN SRETURN

;**NOTE+~* RECURSIVE CALL

CALL
Sé%bRN

PARBAF
UNRELOCATE

;YES = RETURN

JMOVE § MAP PROGRAM
sCALL SELF
;UNMOVE £ UNMAP PROGRAM

175

CZMSDCO MS11-L/M DIAGNOSTIC

PATTERNS REVERSE ,BANKS FORWARD

7434 016036

MACRO M1113

22-APR-81 14:13

**RECURSIVE*+
PARBAW:

SUBTST

H 14
PAGE 204

SEQUENCE

<<PATTERNS REVERSE,BANKS WORST FIRST

**RECURSIVE**>>

sNARAARRAANAANANAARANRACRNENNRARAANARARANRAAANAANANAAAAANAANNANAARARNNANRANRNENCOAS

s *SUBTEST

PATTERNS REVERSE ,BANKS WORST FIRST

«*RECURSIVE*+

SRARANRAARANANARANAARNATEA
AN ENNANRAAAAARNNANRARANANRNNAANRANANAAARAAARANNANRANONNNS

004737

045002

005037

002100

004737
004737
001013
005737
001410
005737

064300
044750

002122

016102

005737
001002
004737

016106
016112
016116

005037
004737
002353

002214
045012

016120
016124

005337
100346

002110

016126
7458
7459 016132
7460

005137

002132

7435 016036
7436
7437 016042
7638
7639 016046
76440
7641
7642
76443

74644
7645
7446
7647

7648
7449
7450
76451
7452
7453
7454
7455
7456
7457

016052
016056
016060
016064

016066
016072
016074
016100

7461 016134
7462 016140
7463
6142
7464
6 146
7465
7466
6
6
6
6
2164
166
6

6 176
6 202
6 206

001405

CALL

HIPAT

sSET HIGHTEST PATTERN

18:

CLR

BANK

;SET BANK TO 0

2%:

CALL
CALL
BNE

EXBANK
BANKOK

sEXAMINE BANK
:CORRECT MEMORY FOR THIS BANK?
sNO - GO TO BANK LOOP TERMINATOR

BEQ

sNO = GO TO BANK LOOP TERMINATION

002114

001003

002126

004737

004737
000207

042526

016036
043416

RRFLAG

;1S

THIS BANK?

THIS BAD MEMORY

(WORST FIRST)

sNO = GO TO BANK LOOP TERMINATION

48
MTEST

sYES = GO TO BANK LOOP TERMINATION
;GO TEST CORRECT MEMORY

sRELOCATION REQUIRED?

: TERMINATION OF BANK LOOP

CLR CONTFLAG
CALL
INCBNK

sNEXT HIGHER BANK

DEC

sNEXT LOWER PATTERN

8PL

PATTERN

;END OF LOOPS
comM
TMFLAG

5%:

BEQ

cOoM

WORST

;4TH PASS?

s **NOTE~* RECURSIVE CALL
CALL
PARBAW
sCALL SELF
RETURN

BNE

CALL

6$:
78:

;0K = LOOP; ELSE CONTINUC

; COMPLEMENT TYPE OF MEMORY
:1S THIS AN EVEN NUMBER PASS?
;YES - SKIP

;**NOTE+~+* RECURSIVE CALL

016036

000207
004737

TST

;CAN WE ACCESS

BGE
28
s1F NOT DONE - LOOP ON THIS BANK
: TERMINATION OF PATTERN LOOP

016036

002124

BMFLAG

BNE
CALL
A ¥

ACFLAG

TST

BEQ

016210

002540

:START OF BANK LOOP

TST

001403

004737
000207
005137

;:START OF PATTERN LOOP

RETURN
TST

BEQ

RETURN

PARBAW

sCALL SELF

RLFLAG

JHAVE WE BEEN RELOCATED?

CALL
RELOCATE
ON.ERROR THEN SRETURN

;**NCTE~* RECURSIVE CALL

CALL
CALL
RETURN

JYES - SKIP

PARBAW
UNRELOCATE

:NO - SKIP

sYES = RETURN

:MOVE & MAP PROGRAM
sCALL SELF
;UNMOVE & UNMAP PROGRAM

176

CZMSDCO MS11-L/M DIAGNOSTIC

PATTERNS REVERSE ,BANKS WORST FIRST

76479 016210

MACRO M1113 22-APR-81 14:13 PAGE 506
MTEST:

SUBTST

005037
005737
001413

002256
002116

004737

016304

004737
000402
004737
005037

017516

000207

017736
002106

MT1:
MT2:

<<SUBR

; *SUBTEST

7480 016210
7481 016216
7482 016224
7483 016230
7484 016234
7485 016236
7486 016236
7487 016244
7488 016252
7489 016256
76490 016256
76491 016256
7692 016262
7493 016264
76494 016270
7495 016274
7496 016302

SEQUENCE 177

««RECURSIVE*#

SUBR

SETUP MEMORY TEST>>
e

SETUP MEMORY TEST

L Ly

SET
HEADER
JINITIALIZE HEADER MESSAGE TYPEOUT
SET
MUt
sINDICATE THERE IS A MEMORY UNDER TEST
CLR
PASFLG
TST
MKFLAG
JECC?
BEQ
MT1
:NO - SKIP
BEGIN
HOLDLOOP
IF CONTFLAG IS TRUE THEN LEAVE HOLDLOOP
IF SKIPMK IS FALSE
CALL
MKCONTROL
END; OF IF SKIPMK
END
HOLDLOOP
CALL
MKTEST
;YES - DO ECC TESTS
BR
MT2
CALL
MJTEST
;DO PARITY TESTS
CLR
MUT
sNOW = NO MEMORY UNDER TEST
SET
HEADER
sALLOW HEADERS NORMAL
RETURN

SUBR

SETUP MEMORY TEST

MACRO M1113

7499 016304

22-APR-81

14:13

J 14

PAGE 208

MKCONTROL : SUBTST
R

s*SUBTEST

SEQUENCE

<<SUBR

SUBR

TEST ECC CSR LOGIC DISPATCH>>
L

TEST ECC CSR LOGIC DISPATCH

SRNRRRARRARA AN AAAARAARA AN A AA AR N AN AARARNAARAANAARAARRARNRAAAAAANRAENRANO
NN AINONS

7500
7501
7502
7503 016304
7504 016314
7505 016324
7506 016340
7507 016346
7508 016354
7509 016360

7512
7513
7514
7515

7516
7517
7518
7519

016374
016400
016402
016406

016410
016414
016420
016422

7520 016426
7521 016434
7522 016440

7526 016460
7527 016464
7528 016466
7529 016474
7530 016502
7531 016504
7532 016512
7533 016526
7534 016530
7535 016530
7536 016534
7537 016550
7538 016556
7539 016564
7540 016572
7541 016600
7542 016604

sTHE NEXT TWO MODULES SOLVE THE PROBLEM OF
JHOW TO RUN THE CSR TESTS ON EACH ECC MEMORY

012737
012737
005037
005037
005037
013700
016001
000301
042701
006301
010137
005737
001421
005237

7547 016630
7548 016632
7549 016634
7550 016640
7551 016644
7552 016652

002224
002226

042737

MOV
MOV
CLR
CLR
CLR
MOV
MOV
SWAB

#FIRST, CSRFBANK
#LAST
, CSRLBANK
CSRINT
SPLTCSR
CSRLOOP
BANKINDEX ,RO
CONFIG(RO) ,R1
R1

ASL
MOV

R1
R1,CSRHOLD

177760

8IC

002476
002134

TST

002232
120000

002226

160777
002476

002476
177761

002146
002146

8EQ
INC
MOV
INC
INC

MOV
ASH
BIC
31s
1%:
CLR
MKLOOP: MOVB
BIC

INTFLAG

1$
SPLTCSR
#120000, CSRLBANK
CSRLOOP
CSRINT

CONFIG{(RO)
,R1
#<3 R1
#-C17000,R1
R1.CSRHOLD
R3
CSRHOLD(R3),CSRNO
#~C36, CSRNO

FOR R2 := #0 TO CSRINT
MAP BANK

104511

005037

002304

013737
062737

002220
004000

002222
002222

013737

002362
002232

002364

040000

002364

000002
017112

002364

004737
104424

005037

002074

005037

002256

;SET FIRST TEST ADDRESS TO FIRST ADDR.

c AND ZERO THE LOOP COUNTER
sGET THE BANK INDEX
;GET CSR NUMBER

#4C17,R1

FOR CSRFIRST

7543 016606
7544 016614

7545 016616
7546 016624

060000
157776
002230
002232
002302
002102
002624

IF SELONLY IS TRUE THEN SRETURN
IF INHECC IS TRUE THEN SRETURN
PUSH
BANK,RO,R1,R2,R3

:= CSRFBANK

¢cSTORE IN THE LOW BYTE
:I1S THIS BANK

INTERLEAVED?

¢BRANCH IF NOT INTERLEAVED
sWE MUST LOOP TWICE FOR AN INTERLEAVED BANK

;GET THE INTERLEAVE CSR NUMBER
sSTORE IT IN CSRHOLD'S UPPER BYTE
;CLEAR ANY UNNECESSARY BITS
TO CSRLBANK BY #4000

:MAP TEST SPACE TO BANK

INVAL IDATE
*INVALIDATE BACKROUND PATTERN
BEGIN CSRSTUFF
(LR
SUCCESS
IF ACFLAG IS TRUE AND RRFLAG IS FALSE
MOV
CSRFIRST,CSRLAST
ADD
#4000,CSRLAST
FOR TESTADD := CSRFIRST TO CSRLAST BY #4
MOV
TESTADD, TESTADD+2
TST
SPLTCSR

18:
28:

18
BEQ
ADD
#40000, TESTADD +2
8R
23
ADD
#2,TESTADD+2
CALL
SBETEST
ON_.NOERROR
CACHOFF
CLR
NOPAR
FOR I := #0 TO #27
HEADER
SET
CLR
PASFLS

:TURN CACHE OFF
sINDICATE PARITY ACTION

178

CZMSDCO MS11-L/M DIAGNOSTIC

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR

MACRO M1113

TEST ECC CSR LOGIC DISPATCH

22-APR-81

14:13

7553 016656
7554
7555
7556
7557
7558

016662
016664
016670
016676
016702

7561
7562
7563
7564
7565
7566
7567
7568
7569

016722
016730
016732
016732
016750
016750
016750
016756
016762

7571
7572
7573
7574
7575
7576
7577
7578
7579
7580

016776
016776
017014
017020
017030
017036
017044
017046
017052
017054

7582
7583
7584
7585

017062
017070
017074
017110

7559 016704
7560 016720

LET RO := |

010637
162737
004737

002142
000002
017416

PUSH
R3
MoV
SP,CTLKVEC
SUB
#2,CTLKVEC
SGkL ngCASE

002142

END ;OF FOR I
CACHON

104423

TYPE

005237

002232

062737
012737
005203
020337
003002
000137

000002
000061

104472

005037
000207

SEQUENCE

;SAVE LOOP COUNTER
:SAVE VECTOR IN CSR OF

¢RESTORE LOOP COUNTER

;TURN CACHE ON
SET
SUCCESS
LEAVE CSRSTUFF
END ;OF ON.NOERROR
END :OF FOR TESTADD
END ;OF IF
END CSRSTUFF
IF SUCCESS IS FALSE
TYPE
MSGA34
TYPOCS
BANK,<TYPES BANK NUMBER>,3

7570 016772

7581 017060

K 14
PAGE 208-1

002224
002232

002302

016466
002232

18$:

MsGB34

END ;OF IF SUCCESS
END; OF FOR CSRFIRST
INC'
SPLTCSR
END: OF FOR R2
ADD
#2,CSRFBANK
MOV
#1.SPLTCSR
INC
R3
CMP
R3, CSRLOOP
8GT
13
JMP
MKLOOP

ECCINIT

SET
CLR
POP
RETURN

:TRAP ON DOUBLE BIT ERRORS (NGRMAL)

CONTFLAG
SPLTCSR
R3,R2,R1,R0,BANK

“K

179

CZMSDCO MS11-L/M DIAGNOSTIC

SUBR

MACRO M1113

TEST ECC 7SR LOGIC DISPATCH

7588 017112

22-APR-81

SBETEST:SUBTST

L 14

14:13

PAGE 210

SEQUENCE

<<CHECK FOR SBE FREE LOCATIONS>>

;ttttttttttttttttttttttt'tttttttttttttttt*tttttttttttttttttttttttttttttttttttttt

S *SUBTEST

CHECK FOR SBE FREE LOCATIONS

;ttttttttttttttttttttt'ttttttttttttttttttttttttttttttttttttttttttttttttttt'ttttt

;ggg

;IN ORDER TO DETERMINE IF A LOCATION IS SBE FREE I DO THIS

7591
7592

*WRITE ZEROS WITH ECC DISABLE
*READ 2ERUS BACK

;ggz

*IF NOT ZEROS THEN RETURN ERROR

7595
7596

SWRITE ZEROS WITH ECC ENABLED BUT TRAPS DISABLED
SREAD 2EROS BACK

7599

JTEST THE LOCATION FROM THE PAR'S

7602
7603

:COMPLIMENT ZEROS TO ONES WITH ECC DISABLE
*READ ONES BACK

7606
7607
7608

:WRITE 100,,100000,00000 (CHECKBITS COMPLIMENT OF BEFORE)
.
WITH ECC ENABLED BUT TRAPS DISABLED
JTEST THE LOCATION FROM THE PAR'S (WITH NO PROGRAM FETCHES)

7611

+IF NONE OF

;ggg

:IF NOT ZEROS THEN RETURN ERROR

;ggg

SIF NOT ONES THEN RETURN ERROR

;ggg

:IF THERE WERE ANY SBE'S OR DBE'S THEN RETURN ERROR

7612

7613 017112
7614 017120
7615 017124
7616 017130
7617 017136
7618 017140
7619 017142
7620 017146
7621 017150
7622 017152

;ggz 017154

7625 017156
7626 017160
7627 017164

(WITH NO PROGRAM FETCHES)

:1F THERE WERE ANY SBE'S OR DBE'S THEN RETURN ERROR

"ENABL

013701
013704

002362
002364

104424
104471
005711
001107
005714

001105

THE ABOVE FORCES A RETURN ERROR THEN RETURN NO.ERROR

PUSH
RO,R1.,R4
MOV
TESTADD,R1
MOV
TESTADD+2.R4
TESTAREA
CACHOFF
ECCIDIS
CLEAR
(R1),(R&)
TST
(R1)
BNE
SBENT
TST
(R4)

BNE

104503

LSB

JENTER TEST MODE
;TURN CACHE OFF
*DISABLE ECC ON 1

SELECTED CSR

SBENT

CLRICSR
CLEAR
(R1),(R&4)
ST
(R1)

005711

;PUSH RO,R1,R4 ONTO STACK

;CLEAR 1

SELECTED CSR

7628 017166

001100

BNE

7632 017174
7633 017176
7634 017206
7635 017214
7636 017216
7637 017222

104510

TSTREAD
sTEST LOC (R1) & TST FOR SBE (WITHOUT FETCHES)
IF #8IT15!BIT4 SET.IN CSR
SET SKPERR
;DISABLE ERRGEN'S ERROR PRINTOUT
ERRGEN
MOV
ERRADD,RO
ASH
#-4 RO

7629 017170
;gg? 017172

7638 017226
7639 017232

7640 017240
7641 017240

005714
001076

104512
013700
072027

042700
104471

TST
BNE

002430
177774

177600

SBENT

(R4)
SBENT

BIC
#~ci77.R0
IF BANK EQ RO THEN GOTO SBENT

END: OF IF #8IT15
Eccinls

:DISABLE ECC ON 1

SELECTED CSR

180

CZMSDCO MS11-L/M DIAGNOSTIC

CHECK FOR SBE FREE LOCATIONS

7642
7643
7646
7645
7666

017242
017244
017246
017252
017254

005111
005114
023711
001046
023714

7649 017262
7650 017264
7651 017266
7652 017272
7653 017274

104503
005011
012714
005711
001035

;ggg 017302

001032

;gzg 017260

7654 017276

7657 017304
7658 017306
7659 017316
7660 017324
7661 017326
7662 017332
7663 017336
7664 017342
7665 017350
7666
7667 017350
7668 017352
7669 017354
7670 017356

001043

022714

MACRO M1113

22-APR-81

002554
002554

100000

104512
013700
072027
042700

017370
017372
017376
017400
017402
017404
017412

104417
104473
104423

(R1)
#BIT15,(R4)
(R1)
SBENT

BNE

SBENT

sCLEAR 1 SELECTED CSR

#BIT15,(R4)

;TEST LOC

IF #81T15!81T4 SET.IN CSR
SET SKPERR
ERRGEN
MOV
ERRADD,RO
ASH #-4 RO
BIC
#~C177,R0

002430
177774
177600

(R1)

& TST FOR SBE

(WITHOUT FETCHES)

sDISABLE ERRGEN'S ERROR PRINTOUT

IF BANK EQ RO .HEN GOTO SBENT
END; OF IF #BIT15

104417
104473
104423

104503

CLR1CSR
CLR
MoV
TST
BNE

SEQUENCE

SBENT

TSTREAD

KERNEL
ECCUINIT
CACHON
POP
R4 ,R1,RO
SRETURN NOERROR

;2;; 017364

7673
7674
7675
7676
7677
7678
7679
7680

(R1)
(R4)
ONES, (R1)
SBENT
ONES, (R4)

CMP

104510

M 16
PAGE 210-1

coM
COM
CMP
BNE
CMP

BNE

100000

14:13

SBENT:

CLR1CSR
CLEAR
(R1),(R4)
KERNEL
ECCUINIT
CACHON
POP
R4,R1,RO
$RETURN ERROR
.DSABL
LSB

¢ENTER KERNEL MODE
SINITIALIZE 1 SELECTED CSR
sTURN CACHE ON

;POP RO,R1

& R4 FROM STACK

;CLEAR 1 SELECTED (SR

JENTER KERNEL MODE
JINITIALIZE 1 SELECTED CSR
:TURN CACHE ON
;POP RO,R1 & R4 FROM STACK

181

CZMSDCO MS11-L/M DIAGNOSTIC

CHECK FOR SBE FREE LOCATIONS

7683 017416

MACRO M1113

22-APR-81

14:13

N 14
PAGE 212

SEQUENCE

CSRCASE:SUBTST

<<CSR PATTERN CASE STATEMENT>>

:*SUBTEST

CSR PATTERN CASE STATEMENT

. (2320302022230 d020282000d0000

2822322382323 22238232323223223223232232222222232323X222323222222208}

"ttttttttt.t'ttt*tltt'ttit'ttttitititttttt*ttttfitttt'*tttt!*tttttt'ttttttttttttt

7684 017416
7685

CASE RO
sWARNING IF YOU CHANGE THIS TABLE ALSO

7686

7688
7689
7690
7691
7692
7693
7694
7695
7696
7697
7698
7699
7700
7701

7702
7703
7704
7705
7706

7707
7708

7709
7710
7711
7712
7713
7714

017426
017430
017432
017434
017436
017440
017442
017444
017446
017450
017452
017454
017456
017460
017462
017464
017466
017470
017472
017474
017476
017500
017502
017504
017506
017514

:CHANGE "‘$DDWOTM"

021172
021270
023662
021324
021372
021466
021542
021620
021666
026414
026414
026414
026414
026414
026414
026414
026414
026414
026414
026414
026414
026414
026414
026414
000207

MKCSRT:

:PAT
TIME
MT0006
MT0010
MT0025
MT0013
MT0012
MT0013
MT001%
MT0015
MT0016
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
MT0999
END ;OF CASE RO
RETURN

= *'SDDWS'* (THE PATTERN BIT MAP)

;<1
i<l
<1
:<2
1<l
;1
: 1
: 1
i<
: 0
: 0
: 0
;0
: 0
: 0
: 0
: 0
: 0
;0
: 0
: 0
: 0
: 0
: 0

SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC

DISCRIPTION
INITIAL DATA TEST
BYTE ADDRESSING TEST
INTERRUPT ENABLE TEST
CREATE SINGLE BIT ERROR TEST
WRITE BYTE CLEARS SBE TEST
CREATE DOUBLE BIT ERROR TEST
WRITE INHIBIT DURING DATIP WITH DBE
WRITE INHIBIT OF BYTE WITH DBE
WRITE INHIBIT OF WORD WITH DBE
NULL TEST
NULL TEST
NULL TEST
NULL TEST

NULL
NULL
NULL
NULL

TEST
TEST
TEST
TEST

NULL TEST

NULL TEST
NULL TEST
NULL TEST
NULL TEST
NULL TEST
NULL TEST

182

CZMSDCO MS11-L/M DIAGNOSTIC
CSR PATTERN CASE STATEMENT

MACRO M1113 22-APR-81 14:13 PAGE 316

177 017516

MKTEST: SUBTST

<<SUBR

SEQUENCE 183

ECC TEST DISPATCM>>

"Q.".Q.Q'."Q".Q"""""".'Q..."......'.'.'.Q...'.""'."'..".'..'..Q'

:+SUBTEST

'...t't." IR

7721 017516
7722 017534
7723 017536
7724 017540
7725
017542
7726 017542
7727 017550
7728 017556
729 017562

7730 017564

7731
7732
7733
7734
7735
7736
7737
7738
7739
7740
77641

017604
017606
017606
017612
017620
017624
017842
017644
017646
017650
017650

1742 017654

104502
000002
000002
002110

002074
002276

ASL

002142
000002
017656

002142

104472

000207

002074

026130

7764
7765 017716

026414

017660
017662
017664
017666
017670
017672
017674
017676
017700
017702
017704
017706
017710
017712
017714

017720
017722
017724
017726
017730
017732
017734

222222222223]3]

:MAKE

1T A WORD ADDRESS

YOU CHANGE THIS TABLE ALSO

: CHANGE "3DDWO"
- "3DDWS'" (THE PATTERN BIT MAP)

7748 017656

7766
7767
7768
7769
7770
7771
7772

;WARNING IF

7745

7749
7750
7751
7752
7753
7754
7755
7756
7757
7758
7759
7760
2761
7762
7763

1222223022202

RETURN

7744

7746
7747 017656

22)

INVAL IDATE
; INVALIDATE BACKGROUND PATTERN ON 'BANK'®
END ;OF IF MKPAT(RO)
MoV~
SP,CTLKVEC
;SAVE VECTOR IN CASE OF “K
SUB
#2.CTLKVEC
CALL _ @MKPAT(RO)
: INDEX OFF TABLE
IF_#SW0 SET.IN @SWR OR ACTFLAG xs TRUE
ENASBE
TRAP ON SINGLE BIT ERRORS
ELSE
ECCINIT
;TRAP ON DOUBLE BIT ERRORS (NORMAL)
END ;OF IF #SWO
CLR ~
NOPAR
;INDICATE PARITY ACTION

104506

005037

2222223222222

IF MKPAT(RO) NE #MT0034 AND MKPAT(RO) NE #MT0999

104511
010637
162737
004770

ECC TEST DISPATCH

ddRddd22dd2d

It #SWO SET.IN SWR OR ACTFLAG IS, TRUE
ECCD
DISABLE ERROR CORRECTION
ELSE
CLRCSR
;CLEAR ALL CSR'S
END ;OF IF
MOV ~ #2,NOPAR
; INDICATE PARITY ACTION
MOV
#2.PCBUMP
:TRAPS ADD 2 TO PC
MOV
PATTERN,RO
:GET PATTERN NUMBER

104470

012737
012737
013700
006300

SUBR

222220200

021734
021226
020202
020322
020714
021036
023046
021756
023320
023730
023416
025220
025410
025742
026130

026414
026414
026414
026414
026414
026414
026414

MKPAT:

IPAT
TIME
DISCRIPTION
NOTE MTO034 MUST BE FIRST & LAST

MT0034

MT0017
MT0007
MT0001
M10002
MT0004
MT0005
MT0021
MT0020
M10022
MT0026
M10026
MT0031
Mr0032
MT0033
MT003%

<1 SEC
<1
<1
‘<1
:<1
: 1
: 1
: 1
:<1
:10
<1
:20
: 3
<1
35
:<1

SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC

:
:
:
:
:
:
:

SEC
SEC
SEC
SEC
SEC
SEC
SEC

;SOFT ERROR - BACKGROUND PATTERN TEST

:HOLDING
1'S & 0°S
IABRESS BIT FEST
:ADDRESS TEST
:COMPLEMENT ADDRESS TEST
:ROTATING ZEROS TEST
:ROTATING ONES TEST
MARCHING 0'S & 1°'S TEST
:MARCHING 1°'S & 0'S IN CHECK BITS
:REFRESH & SHIFTING DIAGONAL
TEST
RANDOM DATA TEST
:FAST GALLOPING PATTERN TEST
:S0B=A-LONG TEST
:WRITE RECOVERY TEST
:BRANCH GOBBLE TEST
:SOFT ERROR - BACKGROUND PATTERN TEST

:NOTE MT0034 MUST BE FIRST § LAST
MT0999 ;0 SEC
NULL TEST
MT0999
M10999
MT0999
MT0999
MT0999
MT0999
MT0999

0
0
0
0
0
0
0

INULL
INULL
INULL
INULL
INULL
INULL
INULL

TEST
TEST
TEST
TEST
TEST
TEST
TEST

CZMSDCO MS11-L/TM DIAGNOSTIC
SUBR

ECC TEST DISPATCH

MACRO M1113 22-APR=-81 14:13 PAGE 516

7775 017736

MJTEST:

SUBTST

<CSUBR

SEQUENCE 184

PARITY TEST DISPATCH>>

QQttQ'.'ttt'tttttt.t't"""'tttt..t"ttt'.ttttttttQ.tt't't'ttt't"'tt't"t'."

s *SUBTEST

SUBR

PARITY TEST DISPATCH

tttt.Qtt.'t.'ttttttQ""t't"tttt'.'t't.t.tttt.'ttt't'tttt'ttttttt't't"t"'t't

7779
7780
7781
7782
7783
7784

017736
017744
017752
017760
0177266
017772

012737
012737
012737
012737
013700
006300

7786
7787
7788
7789
7790
7791

020014
020016
020016
020022
020030
020034

104511

7785 017774

;;gg 020040

010637
162737
004770
005037

000207

000002
000002
060000
060002
002110

002074
002276
002362
002364

#2 ,NOPAR
#2.PCBUMP
#FIRST,TESTADD
ar:asr¢2.rsserooz
PATTERN,
RO
RO

IN
2
END .o
MOV
sUB
CALL
CLR
RE TURN

LeTE
IF MJPAT(RO)
SP,CTLKVEC
#2.CTLKVEC
aMJPAT(RO)
NOPAR

;INDICATE PARITY ACTION
sTRAPS ADD 2 TO PC
;GET PATTERN NUMBER
*MAKE IT A WORD ADDRESS

IF MJPAT?ANY NE #MT0034 AND MJPAT(RO) NE #MT0999

002142
000002
020042
002074

002142

7794

;WARNING IF

;;gg

: INVALIDATE BACKGROUND PATTERN ON 'BANK''
;SAVE VECTOR IN CASE OF

“K

;INDEX OFF TABLE
SINDICATE PARITY ACTION

YOU CHANGE THIS TABLE ALSO

:CHANGE '‘SDDWO‘* = ''$DDWS’'' (THE PATTERN BIT MAP)

7797
7798 020042

7799 020042
7800 020044

026130
021172

7803 020052

020202

7801 020046
7802 020050
7804
7805
7806
7807
7808

020054
020056
020060
020062
020064

7810
7811
7812
7813
7814
7815
7816
7817

020070
020072
020074
027076
020100
020102
020104
020106

7809 020066

7818
7819 020110
7820
7821
7822
7823

MOV
MOV
MOV
MOV
MOV
ASL

020112
020114
020116
020120

021734
021226
020322
020462
020714
021036
023046

026302
023320
023352
023730
023416
025220
025410
025742
026130

026414

026414
026414
026414
026414

MJPAT:

:PAT
TIME
DISCRIPTION
:NOTE n70034 MUST BE FIRST § LAST

MT0034¢
MT0006

:<1 SEC
;<1 SEC

MT0001

:<1 SEC

MT0035

:<1 SEC

MT0017
M10007
MT0002
MT0003
MT0004
MT0005
M10021
MT0022
M10023
MT0026
MT0024
MT0031
MT0032
MT003%
MT003%4

:SOFT ERROR - BACKGROUND PATTERN TEST
SINITIAL DATA TEST

:<1
:<1

SEC
SEC

“HOLDING 1°'S & 0°'S TEST
*ADDRESS BIT TEST

:<1
: 1
: 1
: 1
: 1

SEC
SEC
SEC
SEC
SEC

+COMPLEMENT ADDRESS TEST
:3 XOR 9 WORST CASE NOISE TEST
:ROTATING ZEROS TEST
*ROTATING ONES TEST
SMARCHING 0°S & 1°S TEST

:10
:10
:<1
:20
: 3
:<1
:35
:<1

SEC
SEC
SEC
SEC
SEC
SEC
SEC
SEC

:
:
:
:

SEC
SEC
SEC
SEC

*ADDRESS TEST

“WORSE CASE NOISE PARITY TEST

*REFRESH TEST
SSHIFTING DIAGONAL
TEST
*RANDOM DATA TEST
SFAST GALLOPING PATTERN TEST
:SOB-A-LONG TEST
*WRITE RECOVERY TEST
*BRANCH GOBBLE TEST
*SOFT ERROR - BACKGROUND PATTERN TEST

;NOTE MT0034 MUST BE FIRST & LAST
MT0999 : 0 SEC
SNULL TEST
MT0999
MT0999
MT0999
MT0999

0
0
0
0

SNULL
SNULL
SNULL
SNULL

TEST
TEST
TEST
TEST

CZMSDCO MST11-L/M DIAGNOSTIC

PATTERNS

MACRO M1113

22-APR-81

;g%g
827

7828 020122

MT0000:

14:13

D 15

PAGF 217

SEQUENCE

.SBTTL

PATTERNS

.SBTTL

NEHORY TEST SETUP ROUTINES

SUBTST

<<MT0000

SETUP DATA PATTERN TEST>>

ttttt'tttt..t'tttttt"""tt.itt"'Qtt...."'tt'QQ".tt.t't'.'t"..t."""'fi"

: *SUBTEST

MT0000

SETUP DATA PATTERN TEST

CLR
MOV
MOV
CALL
CMP
BEQ
MOV
CALL
RE TURN
18:
BMOV
CALL
RETURN
MT0001: SUBTST

REALPAT
#FIRST,RO
#S12E,R1
REGCOPY
#1,PROTYP
18
#MTPO00, SUPDOADD
SUPDO3

JRRANARARANARNRACCARACACCE
AN AR ANARAAANRANANANAANRNAARANACEANANN AN
TANENNCNNNRY

7829 020122
7830 020126
7831 020132
7832 020136
7833 020142
7834 020150
7835 020152
7836 020160
7837 020164
7838 020166
7839 020174
7840 020200
7841 020202

005037
012700
012701
004737
022737
001406
012737
004737
000207

002260
060000
040000
036370
000001

004737
000207

026464

027034
026642

003716
002254

MTP000
SUPDO1

JSETUP PATTERN NUMBER FOR TYPEOUT L DISPLAY

;ARE WE ON AN 11/44?
*BRANCH IF YES
SELSE DO PATTERN IN MAIN MEMORY

;DO IT IN SUPERV]ISOR MODE

<<MT0001

SETUP ADDRESS TEST>>

;tttt'ttttttttttttttttttt"tttttttttttttttt'tt.tttttttttttttttt'ttttt'ttttt"tt'

s *SUBTEST

MT0001

SETUP ADDRESS TEST

;ttttttttttt'tttttttttttttttttfittttttttttttttttttttttttttttttttt'tttt'tt'ttti"t

7842
7843
7844
7845
7846
7847

020202
020210
020214
020220
020226
020226

012737
012700
012701
005737
001005
023737

7851
7852
7853
7854
7855
7856
7857
7858

020246
020250
020254
020256
020262
020270
020272
020300

001002
012701
005002
004737
022737
001406
012737
004737

7848 020234
7849 020236
7850 020240

7859 020304
7860 020306

7861 020314
7862 020320
7863 020322

001007
000404
023737

000207

004737
000207

000001
060000
040000
002426

002260

172252

172254

177652

177654

030000
036370
000001

027060
026642

2%:
38:
48:

003716

002254

MOV
MOV
MOV
TST
BNE
CMP

#1 ,REALPAT
#FIRST RO
#S12E R
NOSUPER
2
SIPARS,SIPAR6

BNE
MOV
CLR
CALL
CMP
BEQ
MOV
CALL

48
#30000,R1
R2
REGCOPY
#1,PROTYP
18
#MTPOO1, SUPDOADD
SUPDO3

BNE
BR
CMP

RETURN
BMOY
CALL
RETURN
MT0002: SUBTST
1$:

026464

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

43
3$
UIPARS,UIPAR6

MTP001
SUPDO1

;1S THIS AN 11/44?
SBRANCH IF IT IS
:SET UP CALLING ADDRESS

;DO IT IN SUPERVISOR MODE

<<MT0002

SETUP COMPLEMENT ADDRESS TEST>>

;ttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttt

s «SUBTEST

MT0002

SETUP COMPLEMENT ADDRESS TEST

;tttttttttt*ttttttttttttttt'tttttttttttttttttttttttttttttttttttttttttt'ttttttttt

7864 020322

012737

000002

012704

060000

7865 020330
7866 020334

012700
012701

7868 020344

012705

7867 020340

7869 020350
7870 020354
7871 020356
7872 020364

005737
001005
023737
001013

160000
040000

002260

100001

#2 REALPAT

MOV

#FIRST R4

MOV
MOV
MOV

002426
172252

MOV

172254

TST
BNE
CMP
BNE

#LAST+2 RO
#S12E R{
#100001,RS

NOSUPER
2
SIPARS, SIPARG
1z ;

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

185

MACRO M1113 22-APR-81 14:13 PAGE S17°1

CZMSDCO MS11-L/M DIAGNOSTIC
MT0002
SETUP COMPLEMENT ADDRESS TEST
7873
7874
7875
7876
7877
7878
7879
7880
7881
7882
7883
7884
7885
7886
7887
7888

020366
020370
020376
020400
020404
020410
020414
020420
020422
020430
020432
020440
020444
020446
020454
020460

177652

177656

3s:

030000
140000
120001
000001

004737
000207

48:

000001

003716

027112
026642

002254

026464

2%:

BR
CMP
BNE

MOV
MOV
Mov
Mov
MOV

1%:

38
UIPARS ,UIPAR6

43
#30000,R1

#160000,
R0
#120001 .RS
#1.R2

R1.R3

MOV

#1.PROTYP
1
#MTPO
, SUPDOADD
02

BMOV
CALL

MTP002
SUPDO1

cMp
BEQ

CALL
RETURN
RETURN

SEQUENCE

SUPDO3

;1S THIS AN 11/44?
¢BRANCH IF TRUE
sSET UP CALLING ADDRESS

186

CZMSDCO MS11-L/M DIAGNOSTIC

MT0002

MACRO M1113

SETUP COMPLEMENT ADDRESS TEST

7891 020462

22-APR-81

MT0003:

SUBTST

14:13

F 15
PAGE 219

<<MT0003

SEQUENCE

187

SETUP 3 XOR 9 WORST CASE NOISE TEST>>

:ttttttttttttttttttttt't'ttttttt'ttttttttttttttttttttttt'tttt't.tttttt"tttttt't

:*SUBTEST

MT0003

SETUP 3 XOR 9 WORST CASE NOISE TEST

:tttttttttttttttttttttt'tttt'ttt'tttttttttttttflttt'ttttttt'tttttfittttttttttttttt

7892
7893
7894
7895
7896
7897

020462
020472
020500
020504
020510
020514

012737
005037
004737
012701
012703

7900
7901
7902
7903
7904
7905
7906
7907
7908

020530
020534
020542
020544
020546
020554
020560
020562
020570

012705
022737
001415
104415
012737
004737
104416
012737
004737

7910
7911
7912
7913
7914
7915

020576
020604
020606
020612
020620
020632

7917
7918
7919
7920
7921
7922

020652
020660
020666
020674
020676
020702

7898 020520
7899 0205264

7909 020574

7916 020644

7923
7924 020710
;ggg 020712

072327
012702

000442

000003
002276
036400
060000
020000

18:
P ¥

177770
000004
000100
000001

MOV
CMP
BEQ
SAVREG
MOV
CALL
RESREG
MOV
CALL

003716
002254

027204
026656

002254
38:

026464

012737

172360

172260
177644
001032
026500
000003

IF EUFLAG IS TRUE THEN SRETURN
MOV
#3,REALPAT
CLR
PCBUMP
CALL
FLIPWARN
MoV
#FIRST ,R1
MOV
#20000 R3

ASH
MOV

027144
026642

104415
004737

012737
012737
012737
104416
004737
022737

002260

177642

4$:

001275

000207
MT0004:

:R3 <== R3 / 256.
*SMALL LOOP SIZE

#MTPAO3, SUPDOADD
SUPDO3

;DO IT IN MAIN MEMORY

#64. RS
#1,PROTYP
38

*MEDIUM LOOP SIZE
21S THIS AN 11/44?
SBRANCH IF IT IS

#MTPB03, SUPDOADD
SUPDO4

MTPAO3

MOV
MOV
MOV
RESREG
CALL
CMP

#SDPARO
. KDPARG
#UIPAR2, SDPAR7
#1032, SDPARS

;CHANGE INST TO BR .+66 (BR TO KDPAR1)

SUPDO2
#3,FLIPLOC

:DONE WITH 4 PATTERNS

BNE

SUBTST

<<MT0004

RETURN

7927 020714

#-8. RS
#6 RO

BMOV
SAVREG
CALL
BMOV
8MOV
BMOV

MOV

172374
172276
172272
002556

B8R

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
*TRAPS DO NOT ADD TO PC
*SETUP WARNING CONSTANTS & R2
:R1 <== STARTING ADDRESS

SUPDO1
MTP803
MTPCO3,XDPARO,
8.
MTPD03.SDPARO.S.

#KDPAR(, UIPAR]

:SET UP PAR LINKS

2000,177277):
(177777.0); (401,177777) : (177777.401) 12
*NO - LOOP
SETUP ROTATING ZEROS TEST>>

;ttt'tttttttttttttttttttttt'tttttttt'ttttttttttttttttt"fittttttt'ttttttttttttt"

SeSUBTEST

MT0004

SETUP ROTATING ZEROS TEST

;tttttttt*ttttttttttttt'tttttttttttttttttttttQtttt'ttttttt'tt.ttttt'tttttttttttt

7928
7929
7930
7931
7932

020714
020722
020730
020734
020740

7933 020744
7934 020750
7935 020756
7936 020760
7937 020766
7938 020772
7939 020774
7940 021002

7941 021014

012737
012737
013702
004737
012700

012701
022737
001406
012737
004737
000207

012737

000004
000004
002554
036530
060000

040000
000001
027302
026656

002260
002276

003716
002254

1$:

172360

177652

MOV
MOV
MOV
CALL
MOV
MOV
CMP
BEQ
MOV
CALL
RETURN
BMOV
BMOV

MoV

#4 REALPAT
¥4 . PCBUMP
ONES,R2
BACKGND
#FIRST,RO

#SIZE R
#1,PROTYP
18
#MTPAO4 , SUPDOADD
SUPDO4

MTPAQ4
MTPB04 KDPARO,S.

#KDPARD, UIPARS

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
:TRAPS ADD & TO PC

;WRITE BACKGROUND OF ONES
;1S THIS AN 117442
SBRANCH IF IT IS
*SET UP LINKS

CZMSDCO MS11~L/M DIAGNOSTIC

MT0004

7942
7943
7944
7945

MACRO M1113

22-APR-81

SETUP ROTATING ZEROS TEST

021022
021030
021034
021036

012737
004737
000207

177654
026500

172376

MOV
CALL
RETURN
MT0005: SUBTST
R

7946
7947
7948
7949
7950
7951
7952
7953
79564
7955
7956

021036
021044
021052
021054
021060
021064
021070
021076
021100
021106
021114

012737
012737
005002
004737
012700
012701
022737
001414
012737
012737
004737

7958 021126
7959 021130
7960 021136

000207

7957 021120

7961 021150

7962 021156
7963 021164
7964 021170

012737

012737
004737
000207

000005
000006
036530
060000
040000
000001
027356
027372
026656

027316

002260
002276

003716
002254
027354

027354

177654
026500

177652
172376

SEQUENCE

<<MT0005

SETUP ROTATING ONES TEST>>

MTC00S5

Tt s

SETUP ROTATING ONES TEST

MOV
MOV
CLR
CALL
MoV
MOV
cMP
BEQ
MoV
MOV
CALL

#5 ,REALPAT
#4 ,PCBUMP
R2
BACKGND
#F [RST RO
#SI1ZE,R1
#1,PROTYP
18
#MTPO05, SUPDOADD
#MTPO0S+14 ,MTPBO4+16
SUPDO4

RETURN
BMOV
BMOV

MTPOOS5
MTPB04 ,KDPARO, 8.

MOV
1%:

172360

PAGE 219-1

#UIPARG6 ,KDPAR?7
SUPDO2

;*SUBTEST

6 15

14:13

MOV

MOV
CALL
RETURN

WFMTPAOL+14 ,MTPBO4+16

#XDPARD, UIPARS

#UIPARG ,KDPAR?7
SUPDO2

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
sTRAPS ADD 4 TO PC
;WRITE BACKGROUND OF ZEROS
;IS THIS AN 11/44?
¢BRANCH IF IT IS
sSET UP LINKS

SRESET TEST'S ORIGINAL VALUE

188

CZMSDCO M311-L/M DIAGNOSTIC

MT0005

SETUP ROTATING ONES TEST

MACRO M1113

7967 021172

H 15
PAGE 221

22-APR-81 14:13

MT0006: SUBTST

<<MT0006

;*SUBTEST

MT0006

SEQUENCE
SETUP INITIAL DATA TEST>>

SANANANANAARANARAANAN
AN RN RN RNANANRNAARNRRN RN AN AN ANANRRNNNRANAAANNAARN AN AN
ANRY

7968 021172
7969 021200
7970 021206
7971 021212
7972 021220
7973 021224

000006

026642

#6 ,REALPAT
#4 ,PCBUMP

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
:TRAPS ADD 4 TO PC

002254

MOV
ge%bRN

AMTP006
, SUPDOADD
SuPDO3

;DO IT IN SUPERVISOR MODE

Mov

MT0007: SUBTST

s *SUBTEST
IR

7979
7980
7981
7982
7983
7984

021246
021252
021254
021262
021266
021270

000007

AR AN AN AN

002260

036530
060000
000001
027612
026642

MoV
Mov

#TESTADD
,R1

<<MT0007

SRR ARRARARAAAAANNANRA

021226
021234
021236
021242

002260
002276

7974 021226

7975
7976
7977
7978

SETUP INITIAL DATA TEST

SETUP ADDRESS BIT TEST
R R

R AN AN

AR AR RN AN

R AR RN AN AN AN

NANANAR

gS.REALPAT

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

CALL
MoV
MoV

BACKGND
#FIRST ,R1

;OF ZEROS

SuPD0O3

;D0 IT IN SUPERVISOR MODE

MoV

#1.R2
R2,R1
#MTPO07, SUPDOADD

SUBTST

<<MT0010

g?%bRN

MT0010:

MT0007

AR AR AN R

?Ex

BIS

002254

SETUP ADDRESS BIT TEST>>

AN AN N ANRAAANAARARAANANRANNAARANAAANARAAAIRAANENRRARANRENANNROANS

SRARRAR AN ANRARANRARAN

s *SUBTEST

SETUP BYTE ADDRESSING TEST>>

AR AR RANAANAAANANRRANRNRENAANRNAARARNARRRANRARARNNRAANNEAARAAANED

MT0010

SETUP BYTE ADDRESSING TEST

AR RARARAA I RAAAAANAARAAAN TR AR AR AANANARAARNAARNANRAARANANANNRNANANNRARNARNNRARNANANY

7985 021270

7986 021276
7987 021304
7988 021310
7989 021316
7990 021322

000010
000004
002362
027712
026642

002260
002276
002254

Mov

MOV
MoV
MoV
CALL
RETURN

#10 ,REALPAT

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

#4 ,PCBUMP
TESTADD
R4

:TRAPS ADD 4 TO PC

SUPDO3

;DO IT IN SUPERVISOR MODE

#MTP010, SUPDOADD

189

CZMSDCO MS11-L/M DIAGNOSTIC

MT0010

MACRO M1113 22-APR-81 14:13 PAGE 523

SEQUENCE 190

SETUP BYTE ADDRESSING TEST

7993 021324

MT0011: SUBTST

<<MT0011

; *SUBTEST

MT0011

SRR RNANNNRARRAAA AN

7994 021324
7995 021340
7996 021350
7997 021350
7998 021356
7999 021364
8000 021370
8001 021372

012737
012737
004737
000207

A RN

SETUP CREATE SINGLE BIT ERROR TEST>>

AR ANAARAANAANARAANNRANANAARINANANARANRNAANNNAAEAATCRAENNNE

SETUP CREATE SINGLE BIT ERROR TEST
T

R LTI

IF ACTFLAG IS TRUE OR APTFLAG IS TRUE
IF SPASS NE #0 THEN SRETURN
END; OF IF ACTFLAG

MOV

000011
030020
026642

MoV
ge%tRN

#1171 ,REALPAT

MT0012: SUBTST

<<MT0012

s *SUBTEST

MT0012

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

#MTPO11,SUPDOADD
SUPDO3

;DO IT IN SUPERVISOR MODE
SETUP WRITE BYTE CLEARS SBE TEST>>

SETUP WRITE BYTE CLEARS SBE TEST

dRAARARRARANAAAANANRAR
AN AR NARARIR I S ARANA AN AN NN NN N NN RARAANRNNAAAANA RN OANSY

8002 021372
8003 021406
8004 021416
8005 021416
8006 021424
8007 021430
8008 021440
8009 021444
8010 021446

012737
013700

000012
002102

012705

040000

012705

000062

012737
004737
000207

030616
026642

IF ACTFLAG IS TRUE OR APTF.AG IS TRUE
IF SPASS NE #0 THEN SRETURN
END; OF IF ACTFLAG
MoV
#12 ,REALPAT
sSETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
MOV
BANKINDEX ,RO

002260

IF #81T12 SET.IN CONFIG+2(RO0)
MOV
#40000,R5

ELSE
MOV

#2.RS
END; OF IF #8IT12

002254

MOV

#MTPO12, SUPDOADD

CALL

MT0013:

RETURN

SUBTST

SuUPDQ3

<<MT00'3

;D0 IT IN SUPERVISOR MODE
SETUP CREATE DOUBLE BIT ERROR TEST>>

SARRRANRNNRANARNANRNAC
RN AR RN AAAANRARAARARARARA AR AANARNREAANNRINRINRNRANRNRCANAANAY

:*SUBTEST

MT0013 SETUP CREATE DOUBLE BIT ERROR TEST

AR RR AR RAN A A ARANAAAAARARN A RN RARRANARAARNA AR

ARA

RNRANRAARNNANARANR RN ANANRARANNRSY

IF ACTFLAG IS TRUE OR APTFLAS IS TRUE

IF SPASS NE #0 THEN SRETLIRN

8024 021542

012737
012737
012737
004737
000207

000013
031204
000003
026642

END:

002260
002254
002074
MT0014:

IF_ACTFLAG

MOV
Mov
MOV
gé%bRN

#13 ,REALPAT
#MTPO13,SUPDOADD
#3 ,NOPAR
SUPDO3

SUBTST

<<MT0014

s *SUBTEST

AR RR AR AN RN

8025 021542
8026 021556
8027 021566
8028 021566
8029 021576
8030 021604
8031 021612
8032 021616

AR A

MT0014
AN

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
s INDICATE PARITY ACRION
;D0 IT IN SUPERVISOR MODE
SETUP WRITE INHIBIT DURING DATIP WITH DBE>>

SETUP WRITE INHIBIT DURING DATIP WITH DBE
A AN

AN A AR

AA A AN AN RN RN AN

RN AR AR

RN RN AR RN

NNARNY

IF ACTFLAG IS TRUE OR APTFLAG IS TRUE

IF SPASS NE #0 THEN SRETURN

012737
012737
004737
000207

000014
031720
026642

002260
002254

END; OF IF ACTFLAG
IF KFLAG IS FALSE THEN SRETURN
MOV
#14 ,REALPAT
MoV
#MTPQ14, SUPDOADD

CALL

RETURN

SUPDO3

;SETUP PATTERN NUMBER FOR TYPEQUT & DISPLAY

;DO IT IN SUPERVISOR MODE

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113 22-APR-81
MT0014
SETUP WRITE INHIBIT DURING DATIP WITH DBE

8035 021620

MT0015:
A

AALAAA

SUBTST

:*SUBTEST

J_15

14:13

PAGE 225

<<MT0015
R0

SEQUENCE
SETUP WRITE INHIBIT OF BYTE WITH DBE>>
Rt

0222222222222

222228282282

MT0015 SETUP WRITE INHIBIT OF BYTE WITH DBE

2222222222222220)]

;ttttt'ttfitt."fi.tttt'i.t'i't.fittfit.tttttt*i'tt't.tt'tfi".tttt'.t'.'ti.ttfi"""

8036 021620
8037 02163¢
8038 021644
8039 021644
8040 021652
8041 21660
8042 021664
8043 021666

012737
012737
004737
000207

IF ACTFLAG IS TRUE OR APTFLAG IS TRUE
IF $PASS NE #0 THEN SRETURN
END ;OF IF ACTFLAG
MoV
#15 ,REALPAT
:SETUP FATTERN NUMBER FOR TYPEOUT & DISPLAY
MoV
#MTPO15, SUPDOADD

000015
032502
026642

CALL

MT0016:

RETURN
SUBTST

SUPDO3

;DO IT IN SUPERVISOR MODE

<<MT0016

SETUP WRITE INHIBIT OF WORD WITH DBE>>

RN RRAR RN AR AN RN R RN R AN AR

s*SUBTEST
R

8044 021666
8045 021702
8046 021712
8047 021712
8048 021720
8049 021726
8050 021732
8051 021734

ARAANRA R AR AR AN AR A

AAAT

RN ANR AR

RNANAAARACANROOY

SETUP WRITE INHIBIT OF WORD WITH DBE

IF ACTFLAG IS TRUE OR APTFLAG IS TRUE

IF $PASS NE #0 THEN SRETURN

012737
012737
004737
000207

000016
033246
026642

END ;OF IF ACTFLAG
MOV
#16 ,REALPAT
MoV
#MTPO16, SUPDOADD

002260
002254

CALL

MT0017:

RETURN

SUBTST

N R AR AARN RN RN

s *SUBTEST
SN

8052 021734
8053 021742
8054 021750
8055 021754

MT0016

012737

012737
004737
000207

000017
034030
026642

002260
002254

SUPDO3

<<MT0017
RRAARR

MT0017

CALL

RETURN

AR ARARA AN AN

AR ANAAAANANARNRARANRANRNAERRAANNRNEANNNONY

SETUP HOLDING 1'S & 0'S

AR AR AR AARRAARAANAANARRAARAANRRAARNARNRANRARNRREANARNCANRNNNNSY

#17 ,REALPAT
#MTPO17, SUPDOADD

SuUPDO3

;DO IT IN SUPERVISOR MODE
SETUP HOLDING 1'S & 0°'S>»

RRRR RN N A RRARAARAA RN AN

Mov
MOV

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

;DO IT IN SUPERVISOR MODE

191

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
MT0017
SETUP HULDING
1°S & 0°'S
8058 021756

22-APR-81

MT0020: SUBTST

14:13

K 15
PAGE 227

<<MT0020

SEQUENCE
SETUP MARCHING 0°'S & 1°'S IN CHECKBITS TEST>>

ttttt.fittttl'fitttttQ'"ttQt'ttttfiit.tlttfitttttt"t.!t't't't"'ttt't'ttQ.QQ't't'

:*SUBTEST

MT0020

SETUP MARCHING 0'S & 1'S IN CHECKBITS TEST

t'ttt'.tfitttttttt'tt""tit!tttt.'iittfiitt.Qt'.'.t'ttt'ttttt"t\ 1 3322222333232

8059 021756
8060 021772
8061 022002
8062 022002
8063 022010
8064 022016
8065 022020
8066 022022
8067 022026
8068 022032
8069 022040
8070 022040
8071 022046
8072 022056
8073 022064
8074 022070
8075 022072
8076 022072
8077 022072
8078 022100
8079 022110
8080 022116
8081 022122
8082 022124
8083 022124
8084 022126
8085 022132
8086 022136
8087 022136
8088 022142
8089 022144
8090 022150
8091 022152
8092 022154
8093 022162
8094 022166
8095 022172
8096 022176
8097 022200
8098 022202
8099 022202
8100 022206
8101 022214
8102 022220
8103 022224
8104 022226

012737
012737
005001
005004
012700
013702

000020
000003

012737
012705

140000
140002

002362

012737
012705

140000
140000

002362

012737
012705

160000
160002

002362

010537

002364

005737
001401
000207
012737
012705
010537
005237
005201

002312

016203

002624

060437
060437
060400
060405

002362
002364

072327

8107 022236
8108 022240
8109 022240
8110 022242

006303

8106 022234

8111 022246

060000
002102

120000
160000
002364
002232

005204

8105 022230

000303
042703

010337

002260
002074

177775

177741

002146

002362

22 2]

IF ACTFLAG IS TRUE OR ACTFLAG IS TRUE
IF $PASS NE #0 THEN SRETURN
END ;OF IF ACTFLAG
MOV
#20 ,REALPAT
;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
MOV
#3,NOPAR
*INDICATE PARITY ACTION
CLR
R
:CLEAR LOOP COUNTER
CLR
R4
*CLEAR INTERLEAVE ODD/EVEN FLAG
MOV
#FIRST RO
MOV
BANK INDEX ,R2
;SET BANK INDEX
MTLO20: IF INTFLAG IS FALSE
BEGIN MT8020
IF NO22BIT IS TRUE
IF BANK EQ #7
MOV
#140000, TESTADD ;SET UP 12K NON-INTERLEAVED VIRT ADDR
MOV
#140002,RS
LEAVE
MT8020
END; OF IF BANK
END; OF IF NO22BIT
IF NO22BIT 1S FALSE
IF BANK EQ #177
MOV
#140000, TESTADD
MOV
#140000,RS
LEAVE
MTB020
END; OF IF BANK
END; OF IF NO22BIT
MOV’
#LAST+2,TESTADD
MOV
#LAST+4.RS
END
MTB020
MOV
RS,TESTADD+2
;SET UP NON-INTERLEAVED VIRT. ADDR.
ELSE
TST
SKIPMK
;1S THIS BANK IN SKIP RANGE?
BEQ
1%
:BANK 1S OUT OF RANGE - DO TEST
RETURN
*LEAVE TEST-BANK'S ALREADY TESTED
18:
MOV
#120000, TESTADD
*SET UP 1ST INTERLEAVED VIRT. ADDR.
MOV
#LAST+2.RS
:SET UP END OF BANK FLAG
MOV
RS,TESTADD+2
:SET UP 2ND INT'L. VIRT. ADDR.
INC
SPLTCSR
*FLAG THE MAPPING ROUTINE FOR INTERLEAVING
INC
RI
*SET LOOP COUNTER FOR INTERLEAVING
INC
Ré
SET ODD/EVEN FLAG
END; OF IF INTFLAG
MOV
CONFIG(R2) ,R3
;SET_UP CSR NUMBER
IF R4 EQ #2
*IF THE SECOND TIME AROUND
ADD
R4, TESTADD
ADD
R&4.TESTADD+2
;TEST THE A1 ASSERTED ADDRESSES
ADD
R4.RO
ADD
R4 .RS

ASH

#-3.R3

;MOVE INTERLEAVED CSR NUMBER

ASL
END; IF
SWAB
BIC

R3
Ré&
R3
#2C36,R3

;MOVE CSR NUMBER

ELSE

MOV

R3.,CSRNO

:MOVE R3 INTO CSR NUMBER
Y

192

CZMSDCO MS1 1=L/M DIAGNOSTIC
MACRO M1113 22-APR-81
MT0020
SET UP MARCHING 0'S & 1°'S IN CHECKBITS TEST

8112 022252
8113 022262
8114 022264
8115 022266
8116 022270
8117 022270
8118 022274
8119 022300
8120 022302
8121 022304
8122 022310
8123 022336
8124 022344
8125 022350
8126 022354
8127 022354
8128 022360
8129 022364
8130 022366
8131 022400
8132 022404
8133 022406
8134 022412
8135 022416
8136 022420
8137 022424
8138 022426

14:13

IF #SW0 SET.IN aSWR

104506

L_15

PAGE 227-1

ENASBE
ELSE
ECCINIT
END; OF IF #SWO
PUSH
R2,Ré4
FOR MTV020 := #0 TO R1

104472

005002
004737

036530

162737
162705
010537

020000
020000
002364

004737
005237

022430
002232

PUSH

CALL

BACKGND

(LR

SEQUENCE

sTRAP ON SINGLE BIT ERRORS

s TRAP ON UNCORRECTABLE ERRORS

¢PATTERN TO WRITE INTO BANK
:SET UP ZEROS IN BANK

IF NO22BIT 1S TRUE AND MTV020 EQ #1 AND BANK EQ #3
Su8 #20000,TESTADD
;SET UP 12K INTERLEAVED BANK
SuB #20000,R5
MOV R5,TESTADD+2
END; OF IF NO22BIT
CALL MT0202
sSTART TEST

002362

INC

POP

S?LTCSR

sUPDATE INTERLEAVED MAPPING FLAG

END; OF FOR MTV020

005001
005037
022704
001605
005037
000207
000000

002232
000001

002074

POP
CLR
CLR

CMP
BEQ
CLR

RET URN

MTv020: 0

R4 ,R2
R1
SPLTCSR
#1,R4
MTL020
NOPAR

sRESET LOOP FLAG
sRESET INTERLEAVED MAP FLAG
:ODD/EVEN FLAG SET?
sBRANCH IF TRUE
sINDICATE PARITY ACTION

:VARIABLE FOR PAT 20

193

8140
8141
8142
8143
8144

022430
022434
022440
022444
022450

01
01
01
01

MT0202Z: MOV
MOV
MOV
Mov

000004
100000

[elelelolololeololele]

81
8159
8160
8161
8162
8163
8164
8165

000001

003716

034106
034122
026642

002254
002264

002264

000410

0
36
5642

012737
004737
022737
001411
012737
012737
004737
000410

177654
026464
000001

034136
034146
026656

002254
002264

012737
004737
005737
001405

177650
026500
002134

002264

022550
022566
022572
022574
022602
022610
022614

8166 022620
8167 022622

8168 022626
8169 022632
8170 022634
8171 022640
8172 022644
8173 022652
8174 022654
8175 022662
8176 022670
8177 022674
8178 022676
8179 022704
8180 022712
8181 022716

8182 022724

162701
162704

000404
012701
012704
022737
001411
012737
012737
004737
000410

012737
004737
022737
001411
012737
012737
004737
000410

012737
004737
022737

000410

003716

1%:

2$:

MT020Y:

040000
040000
060000
060002
000001

7%:

003716

034166
034176
026642

002254
002264

177650

002264

026464
000001

003716

034216
034232
026656

002254
002264

177654

002264

026500
000001
034246
034256
026656

003716

M15
PAGE 228

#4,R2
TESTADD,R1
TESTADD+2,R4
#81T15,R3

SEQUENCE

;SET UP WORD INCR/DECR AMOUNT

IF #SW11 SET.IN @SWR OR QVFLAG IS TRUE
GOTO MT020Y
END ;OF IF #SW11
CMP
#1,PROTYP
:1S THIS AN 11/44?
BEQ
18
sBRANCH IF IT IS

8145 022466

8146 022470
8147 022470
8148 022476
814

14:13

MOV
MOV
CALL
BR

BMOV

MOV
CALL
CMP
BEQ
MOV
MOV
CALL
BR

2$:

3s:
A
¥

002254
002264

cVECTOR FOR TRAPS

#UIPARG ,PARTHERE

¢cVECTOR FOR TRAPS

INTFLAG

sARE WE

sus
ggfi

#40000,R1
ggOOOO.R4

sRESET FIRST WORD TO BEGINNING OF BANK
JRESET SECOND WORD TO BEGINNING OF BANK

Mov
MOV

#FIRST ,R1
WFIRST+2,R4

BMOV
MOV

CALL
TST

BEQ

MTPB20
SUPD0O2

CALL
BR
BMOV

#1,PROTYP
18
#MTPC20, SUPDOADD
#MTPC20+10,PARTHERE
SUPDO3
2%
MTPC20

CALL
CMP
BEQ
MoV
MOV
CALL
BR

SUPDO1
#1,PROTYP
3s
#MTPD20, SUPDOADD
#MTPD20+14 ,PARTHERE
SUPDO4
43

MOV

B8Mov
MOV
CALL
CMP
BEQ

#UIPAR& ,PARTHERE

MTPD20
N#UIPARG, PARTHERE
SUPDO2
#1,PROTYP
5%

MOV

#MTPE20, SUPDOADD

BR
BMOV

6$
MTPEZ20

MOV
CALL

5%:

sVECTOR FOR TRAPS

#UIPARG ,PARTHERE
SUPDO1
#1,PROTYP
43
#MTPB20, SUPDOADD
#MTPB20+10,PARTHERE
SUPDO4
M1020Y

CMP
BEQ
MOV
MOV

1%:

#MTPA20, SUPDOADD
#MTPA20+14 ,PARTHERE
SUPDO3
2$
MTPA20

AMTPE20+10,PARTHERE
SUPDO4

;1S THIS AN 11/44?
¢BRANCH IF IT IS

;VECTOR FOR TRAPS

INTERLEAVED?

sBRANCH IF NOT INTERLEAVED

sRESET FIRST WORD TO BEGINNING OF BANK
SRESET SECOND WORD TO BEGINNING OF BANK
;1S THIS AN 11/44?
;BRANCH IF IT IS

;VECTOR FOR TRAPS

sVECTOR FOR TRAPS

;1S THIS AN 11/44?
;BRANCH IF IT IS

sVECTOR FOR TRAPS

;VECTOR FOR TRAPS
:IS THIS AN 11/44?
sBRANCH IF IT IS
sVECTOR FOR TRAPS

194

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
22-APR-81
MT70020
SETUP M°RCHING 0'S & 1°'S IN CHECKBITS TEST

CZMSDCO MS11-L/M DIAGNOSTI C
MACRO M1113 22-APR-81
MT0020
SETUP MARCHING 0°'S & 1°S IN (HECKBITS TEST

8197 023030
8198 023036
8199 023042
8200 023044

012737
004737
104503

000207

177650
026500

002264
6$:

14:13

N_15
PAGE 228-1

MOV
#UTPARG ,PARTHERE
CALL
SuPD02
CLR1CSR
RETURN

SEQUENCE
;VECTOR FOR TRAPS
;CLEAR 1 SELECTED CSR

195

CZMSDCO MS11-L/M DIAGNOSTIC

MT0020

MACRO M1113 22-APR-81 14:13 PAGE 330

SEQUENCE 196

SETUP MARCHING 0°S & 1'S IN CHECKBITS TEST

8203 023046

MT0021: SUBTST

<<MT0021

SETUP MARCHING 0°S & 1°'S TEST>

SRR ARANANRNARANRARNNNARARNR
AN RAANNRANNNINRNANARNANAARANNNANNAANNANCRANNIRNA AR ANNRR

; *SUBTEST

MT0021

SRARANEARNANRANANRN

8204 023046
8205 023054
8206 023062
8207 023066
8208 023072
8209 023074
8210 023076
8211 023102
8212 023104
R21% 023110
8214 023116
8215 023120
8216 023126
8217 023130
8218 023136
8219 023140
8220 023144
8221 023146
8222 023154
8223 023160
8224 023166
8225 023172
8226 023174
8227 023202
8228 023206
8229 023214
8230 023220
8231 023222
8232 023230
8233 023232
8234 023236
8235 023240
gggg 023246
8238 023252
gszg 023260
8241 023264
8242 0c°3266

012737
013702
004737
010203
000303
012701
010105
012704
022737
001441
022737
001407
022737
001003
012701
010105
012737
004737
012737
004737
010401
012737
004737

012737
004737
000434
022737
001003
012701
010105

000021
002572
036530

002260

160000
060000
00C001

003716

000003

003716

000007

002100

140000
034272
026642
034322
026656

002254

034356
026656
034412
026656

002254

000177

002100

3$:

002254

002254
18:

140000

004737

026464

004737

026500

48:

010401

gszz 023274

004737

026500

8245 023300
8246 023306
8247 023312
8248 023316

004737
y05037
000207

026500
002410

NN NRNANRNNRRNARRARANAORNS

SET NOSCOPE
MoV
#21 ,REALPAT
;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
MOV
BAKPAT ,R2
CALL
BACKGND
MoV
R2.R3
SWAS
R3
MOV
#LAST+2 ,R1
MOV
R1,R5
MOV
#FIRST
R4
CMp
#1,PROTYP
;1S THIS AN 11/44?
BEQ
18
;BRANCH IF IT IS
cmp
#3,PROTYP
;1S THIS AN 11/24?
BEQ
3s
sBRANCH IF SO
cMP
#7 ,BANK
BNE
3s
MOV
#140000,R1
MoV
R1.R5
Mov
#MTPA21, SUPDOADD
CALL
SUPDO3
Mov
AMTPB21, SUPDOADD
CALL
SUPDO4
MoV
R4 ,R1
MOV
AMTP(21,SUPDOADD
CALL
SUPDO4
MOV
#MTPD21, SUPDOADD
CALL
SUPDO4
BR
2s
cMP
#177 ,BANK
BNE
43
MoV
#140000,R1
MoV
R1,R5
BMOvV
MTPA21
CALL
SuPDO1
8Mov
CALL

MTPB21
SUPDO2

MOV
8MOV

R4 ,R1
MTPC21
SUPD0O?2

8MOV
CALL
CLR
RETURN

MTPD21
SUPDO2
NOSCOPE

CALL

28:

SETUP MARCHING 0°'S & 1°S TEST

RN N AN ORANN NN ANAANANANRARNARNAANA ANV

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
M10021
SETUP MARCHING 0°'S & 1°'S TEST
8250 023320

22-APR-81 14:13

MT0022:

SUBTST

€.16
PAGE 231

<<MT0022

SEQUENCE

SETUP REFRESH & SHIFTING DIAGONAL TEST>>

SRRANAARRARRAAANANAARANRCC
RN RN NN RARARARNNARNANRNNA NN ANAANRANACNRNAONARAANANRCONNR

: *SUBTEST

MT0022

SETUP REFRESH § SHIFTING DIAGONAL TEST

;tttQtt'ttQ't"tttttt"t't".'tttttQttt'.t'..tt""".t'tfl"""""".'.t't""

3356 023350

004737

026430

012737

000022
034442
026642

000207

8258 023352

CALL
KAMITEST
ON. ERROR meu $RE TURN

;CHECK FGR KAMIKAZE MODE
:1F NOT IN KAMIKAZE MODE RETURN

CALL

;DO IT IN SUPERVISOR MODE

MOV

RETURN

MT0023:

SUBTST

dNNAARA AR

: *SUBTEST

mrfiozz SUPDOADD
ALPAT

SUPDO3

<<MT0023

ARAARANRRAARA R

MT0023

SSETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY

SHIFTING DIAGONAL TEST>>
AR

ANARA NN RAA AN

AN RN

SHIFTING DIAGONAL TEST

ANRNRA AN NARNINRNNRRANRAAANNRAAOAN

SR ARARAARNRAAARNRNRAANNAC AR AL AN ARARRNAARNNARARAAANARAAANERERAAANAANNNNRNNRNANNRARNNNNRNAND

8259 023352
8260 023356
8261 023362
8262 023370
8263 023376
8264 023404
8265 023410
8266 023414

004737

026430

012737
012737

000023
034442

004737
005037
000207

026642
002002

CALL
KAMITEST
ON.ERROR THEN SRETURN
MoV
#23 ,REALPAT
Mov
#MTPO22,SUPDOADD
SET
DIAGFLAG
CALL
SuPDO3
CLR
DIAGFLAG
RETURN

sCHECK FOR KAMIKAZE MODE
sIF NOT IN KAMIKAZE MODE RETURN
sSETUP PATTERN NUMBER FOR TYPEOUT ° DISPLAY
sIDENTIFY DIAGONAL TEST TO MTPO22
;DO IT IN SUPERVISOR MODE

197

CZMSDCO MS11-L/M DIAGNOSTIC
MT0023
SHIFTING DIAGONAL TEST

MACRO M1113

8268 023416

22-APR-81 14:13

MT0024: SUBTST

<<MT0024

AR R

s *SUBTEST

AR AR

8277 023456
8278 023460
8279 023464
8280 023470
8281 023476
8282 023500
8283 023506
8284 023510
8285 023516
8286 023520
8287 023524
8288 023526
8289 023534
8290 023536
8291 023544
8292 023546
8293 023552
8294 023554
8295 023562
8296 023574
8297 023606
8298 023614
8299 023622
8300 023630
8301 023636
8302
8303
8304 023642
8305 023644
8306 023646
8307 023650
8308 023654
8309 023660
8310 023662

004737

026430

012737
013702

000024
002572
036530

002260

003716

000003

003716

000007

002100

137776

035156

002254

000177

002526

137776

18%:
48:

002254

177676
172272
172374

SETUP FAST GALLOPING PATTERN TEST

R AN RN

NN RN RN RN R NN AR NN AN AN

NN EN IR AN E

RN TR NR NS

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

cMp
8EQ
CMP
8EQ
cMP
BNE
MOV
SAVREC
ggv
CMP
BNE

#24 ,REALPAT
BAKPAT ,R2
BACKGND
R2,R3
R3,R4
Ré
#FIRST ,R1
#LAST RS

#1,PROTYP
18
#3,PROTYP
3s
#7 ,BANK
3s

#137776
RS

5?TP824.SUPDOADD

MOV

#177 ,LASTBANK
43
#137776
RS

8Mov
8MOV
8Mov

MTPA24
MTPB24,SDPARO,8.
MTP(C24 KDPARO,8.

MOV
MOV
MOV

#SDPARQ . UDPAR?
#KDPARO
, SDPARS
#UDPARO
. KDPARS

SAVREG

CALL

#SDPARD
, SUPDOADD

;SET UP PAR LINKS

SUPDO4

;DO IT AGAIN FOR COMPLEMENT DATA

RESREG

000207

SWAB
SWAB
CALL

026656
002410

CLR

RETURN

MT0025: SUBTST

R?2
R3
SUPDO4

NOSCOPE

<<MT0025

SETUP INTERRUPT ENABLE TEST>>

SNRARARNRARARANARAARARAN
AN AN AR NANACARRARNARANANAARANANRAENANRAENRRARNAARARAANANERAY

s *SUBTEST
SRR

8311 023662
8312 023676
8313 023706
8314 023706
8315 023714
8316 023722
8317 023726

MoV
MOV

MOV

28:

MT0024

SETUP FAST GALLOPING PATTERN TEST>>
e

sCHECK FOR KAMIKAZE MODE
sIF NOT IN KAMIKAZE MODE RETURN

MOV

1s:

SEQUENCE

CALL
KAMITEST
ggiERROR~5gEngRETURN

MoV

000001

172260
172260
172360
177660
026656

CALL
MOV
MOV
SWAB

060000

157776

D_16
PAGE 232

MT0025

AR AR AR AR

SETUP INTERRUPT ENABLE TECT
SN E AN RN

AR RN AN

AR NN RN

R AN AR

RN ANATANARAND

IF ACTFLAG IS TRUE OR APTFLAG IS TRUE

012737
012737
004737
000207

000025
035210
026642

002260
002254

IF $PASS NE #0 THEN SRETURN
END .OF 1F ACTFLAG

MOV
MOV
CALL

RETURN

#25 ,REALPAT
#MTPO25, SUPDOADD
SUPDO3

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
;DO IT IN SUPERVISOR MODE

198

CZMSDCO MS11-L/M DIAGNOSTIC

MT0025

HégRO M1113

SETUP INTERRUPT ENABLE TE

8320 023739

22-APR-81

MT0026:
R

SUBTST
L

s *SUBTEST

E_16

14:13

PAGE 234

<<MT0026
g

MT0026

SEQUENCE
SETUP RANDOM DATA TEST>>
L

R LRI

SETUP RANDOM DATA TEST

sRANRNARAAAANANARAAANA
TR ERRAAAANAAANARNAANNAIARENRAANANNANANNAIRANNAINANAANO NN OAONRNSY

8321 023730
8322 023736
8323 023742
8326 023746
8325 023752
8326 023754
8327 023756
8328 023762

8329 023766
8330 023774
8331 023776
8332 024004
8333 024006
€334 024014
8335 024016
8336 0264022
8337 024024
8338 024032
8339 0264040
8340 024044
8341 024050
8342 024056
8343 024064
8344 024066
8345 024072
8346 0264076
8347 0264102
8348 024104
8349 0264110
8350 024112
8351 024120
8352 024132

8353 024140
8354 024152
8355 024160
8356 024166
8357 024172
8358 024176
8359 024204
8360 024212
8361 024214
8362 0264220
8363 024226
8364 024230

012737

5037
3703
01 3702
01 0
01 0
01 2701
01 2700
022737
001437
022737
001406
022737
001002
012700
104415
012737
012737
004737
005037
012737
012737
104416
004737
000452
022737
001002
012700
104415

000026

002276
002544
002562

002260

060000
020000
000001

003716

000003

003716

000007

002100

014000
035662
035656
026642
035706
035676
035672

035762
002254

MoV
Mov
MOV

R3,R5
R2,Ré4
#FIRST ,R1

CMP
BEQ
CMP

#1,PROTYP
18
#3,PROTYP

MOV
BEQ

CMP

3$:

48:

012737

000730

172376

012737
012737
004737
005037

172360
177644
026464
035706

177642

MMTPB26+4 ,MTPD26+14
#MTPB26
, SUPDOADD

012737
104416
004737
010337
010237
000207

172360

28:

;DO WE HAVE AN 11/44?
*BRANCH IF WE DO
1117242

*BRANCH IF SO

3$
#14000,
R0

RANODD

;FOR ERROR REPORTING

SSET UP NEXT LINK

SUPDO3

28
#177 ,BANK
48
#14000,R0

8MOV
BMOV

MTPA26
MTPC26.KDPARO,8.

;WRITE ROUTINE TO FAST MEMORY
*RANDOM SUBPROGRAM TO FAST MEMORY

BMOV

MTPD26,SDPARO,S.

*RANDOM SUBSUBPROGRAM TO FAST MEMORY

SAVREG

MoV

177642

;TRAPS DO NOT ADD TO THE PC
sINITIALIZE RANDOM NUMBERS

BR
CMP
BNE
MOV

MOV

172274

#7 ,BANK

MOV
MOV

RESREG

18:

#S12€/2.,RO

#MTPA26+4 ,MTPD26+14
#MTPA26
, SUPDOADD
SuPDO3

CALL

002100

PCBUMP
SEEDLO,R3
SEEDHI ,R2

BNE
MOV
SAVREG
MOV
MOV
CALL
CLR

035762
002254

014000

026464
002544
002542

#26 ,REALPAT

CLR
MoV
Mov

026642
000177

MoV

#730 ,KDPAR?

#KDPARQ, UIPART

*WRITES "BR .-116'' IN (BR SDPARO)

MOV
CALL
CLR
BMOV
gggREG

NUIPAR2
. SDPARG
SUPDO1
RANODD
MTPB26
#KDPARO ,UIPAR1

:WRITE RANDOM DATA
*FOR ERROR REPORTING
*READ ROUTINE TO FAST MEMORY
*SET UP PAR LINK

CALL
MOV

SuPDO1
R3,SEEDLO

;READ RANDOM DATA
*UPDATE FOR NEW RANDOM NUMBERS

MOV

RETURN

R2,SEEDHI

199

CZMSDCO MS11-L/M DIAGNOSTIC

MT0026

SETUP RANDOM DATA TEST

MACRO M1113

8367 024232

22-APR-81

MT0027:
SRR RRA AR

SUBTST

PRRRRRPRRRRR ®

8368
8369
8370 024232
8371 024240
8372 0246242
8373 024250
8374 024252
8375 024260
8376 024262
8377 024270
8378 004276
8379 0¢+304
8380 024312
8381 024320
8382 024324
8383 024330
8384 026344
8385 024346
8386 024352
8387 024356
8388 024360
8389 024364
8390 024366
8391 024376
8392 026404
8393 024406
8394 024414
8395 024420
8396 026420
8397 024430
8398 0264436
8399 024440
8400 0264446
8401 024452
8402 0264452
8403 024452
8404 024466
8405 024502
8406 024510
07 024514
8408 024516
0 9 024516
10
11
12
13
14

5
16
I4
18
9
20
1

<<MT0027

RN A ANANANA AR

: *SUBTEST

sRNARARA

F 16
PAGE 236

14:13

UNIQUE BANK TEST>>

RN ANNA A RAN RN AAAAANRANARN AN AR IR ANNARAANANANOACRNRAORY

MT70027

AAANN AN

SEQUENCE

UNIQUE BANK TEST

RN AR ANRANANAAANAARANRAANNANANNRNNANNNAANAANRNNAANANRARAORN

:MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA

012737

000027

002260

022737

000001

003716

026642

002472

177646
026464

002254
002472

104502

001404
012737
000414

012737
012737

;WRITE AND _READ THE BANK NUMBER IN EACH BANK

Moy

1$:

WARN?:

CLRCSR
CMP
BEQ
MOV
BR
BMOvV
MOV
MOV

022737
001403
012737
004777
022737
001403
012737
004737

005037
000207

004737

005102
012700
010004
012701
010103
022737

:= #1

044300

THE PROGRAM [S)

:CLEAR CSRS
;IS THIS AN 11/44?
;BRANCH IF TRUE
sSET UP LINK
sBRANCH TO RUN

sSET UP LINK

T0 #2

LET R2 := BANK

060000

MoV
MoV
MoV

040000

000001

003716

036202
156052

002254

000001

003716

036210
026642

002254

#FIRST
RO
RO,Ré
#S1ZE
R1

Mov
R1,R3
IF " e m
cMP
#1,PROTYP
BEQ
28’
MoV
#HTP034 SUPDOADD
28: CALL
SLINK1
END :OF IF
IF 1 EQ #2
CMP
#1,PROTYP
BEQ
33
MOV
#MTPO34+6,SUPDOADD
3$: CALL
SUPDO3

END OF IF
END ;OF IF
END ;OF FOR BANK
END ;OF FOR ]

IF FS7FLAG IS TRUE

002376

CLR NOF SMODE
RETURN

END ;OF IF FS7FLAG

FOR I := #1 TO #2
FOR BANK := LASTBANK DOWNTO #0
CALL EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE

044300

LET R2
:
COM

060000

MOV

#FIRST,RO

040000

MoV

#SI1Z2E,R1

000001

(EXCEPT WHERE

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

FOR BANK := #0 TO LASTBANK
CALL EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE
INVAL IDATE
s INVALIDATE BACKGROUND PATTERN ON 'BANK''

104511

012700
010004
012701
010103

#1,PROTYP
18
#SUPDO3, L INK1
STAR27
MTP0O34
#UIPAR3, SUPDOADD
#SUPDO1, L INK1

SET NOFSMODE

STAR27: FOR 1

004737

#27 ,REALPAT

MoV

003716

RO,R4

MOV
R1,R3
IF 1 EQ 4 M
P
#1,PROTYP

200

CZMSDCO MS11-L/M DIAGNOSTIC

R PR PRRRRRRRRRR

MTN027

UNIQUE BANK TEST

21 024612
22 024614
23 024622
24
25
26 024636
27 024644
28 024646
%8 024654
31
32
33
34 024710
35 024714

001403
012737
004777
022737
001403
012737
004737

005037
000207

036
155

MACRO M1113

002254

BEQ
Mov
48: CALL

END ;OF

000001

003716

036210
026642

002254

002376

22-APR-81 14:13

PAGE

S 16

236-1

43
#MTPO34
, SUPDOADD
SLINK1

IF 1 EQ #2
gl.PROTYP
cMP
MOV

5$: CALL

#MTPO34+6,SUPDOADD

SUPDO3

END ;OF IF
END ;OF FOR BANK
END ;OF FOR 1
CLR
RETURN

NOF SMODE

SEQUENCE

201

CZMSDCO MS11-L/M DIAGNOSTIC

MT0027

UNIQUE BANK TEST

MACRO M1113

8438 024716

22-APR-81 14:13

H 16

PAGE 238

MT0030: SUBTST

<<MT0030

:*SUBTEST

MT0030

SEQUENCE
SETUP FLUSH OUT DBE'S TEST>>

."it.t'ttt.'.'tt.t't.i"""'.tttttttt.fi"'fi"."fifi.'t't".Q'."Q'Qt'."""."'

SETUP FLUSH OUT DBE'S TEST

:tt't'tttfit'tt'.ifi*.""'fi""'.'Qt.ttt..'Q.ttt't'.'t!'Qfitt.Q't't"""t"""'.

8439 024716
8440 024722

005037

002256

8441 024730

012737

000030

002260

MTA030: MOV

8446 024762
8447 024770
8448 024772

012737
000406
012737

026464

002472

026642
035764

002472
002254

MOV
BR
MOV

8442
8443
8444
8445

024736
024744
024752
024754

8449 025000
8450 025006
8451 025010
8452 025024
8453 025030
8454 025034
8455 025042
8456 025056
8457 025062
8458 025066
8459 025072
8460 025072
8461 025072
8462 025106
8463 025114
8464 025122
8465 025124
8466 025130
8467 025132
8468 025134
8469 025150
8470 025152
8471 025152
8472 025150
8473 025164
8474 025170
8475 025172
8476 025176
8477 025200
8478 025200
8479 025202
8480 025216

012737
022737
001007

012737
104470

000001
000001

004737

044300

012701
012700
004777

040000
060000
155400

104502
004737

042526

002074
003716

104472
000207
013737

002270

004737
104472
004737
000207

024730

004737

104472
000207

044300

043416

002100

CLR
SET

MOV
(NP
BNE
BMOV

4$:
18:

PASFLG
FULLREL

#30,REALPAT
#1,NOPAR
#1.PROTYP
48
MTP030

ASUPDO1,LINK
18
ASUPDO3,LINK1

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
*INDICATE COUNT PARITY ERRORS

MOV
#MTP030.SUPDOADD
ECCDIS
;DISABLE ERROR CORRECTION
SET
NOFSMODE ,NOSCOPE
FOR BANK := #0 TO LASTBANK
CALL
EXBANK
IF MKFLAG 1S TRUE
IF_ACFLAG IS TRUE AND RRFLAG IS FALSE
MOV
#S12E R
MOV
#FIRST,RO
CALL
aL INK1
END ;OF IF ACFLAG
END ;OF IF MKFLAG
END ;OF FOR
IF PASFLG IS FALSE
SET PASFLG
CLRCSR
;CLEAR (SRS
CALL
RELOCATE
ON. ERROR
ECCINIT
:TRAP ON DOUBLE BIT ERRORS (NORMAL)
CLEAR
NOF SMODE NOSCOPE
, FULLREL
RETURN
END ;OF ON.ERROR
MOV * NEWBANK ,BANK
CALL
EXBANK
CALL MTA030
ECCINIT
;TRAP ON DOUBLE BIT ERRORS (NORMAL)
CALL
UNRELOCATE
RETURN
END ;OF IF PASFLG
ECCINIT
: TRAP ON DOUBLE BIT ERRORS (NORMAL)
CLEAR ~ NOF SMODE .NOSCOPE
, FULLREL
RETURN

202

MACRO M1113 22-APR-81 14:13 PAGE 540

CZMSDCO MS11-L/M DIAGNOSTIC
MT0030
SETUP FLUSH OUT DBE'S TEST
8483 025220

MT0037: SUBTST

<<MT0031

**SUBTEST

MT0031

8484 025220

004737

026430

012737
005037

000031
002074

002260

160000

002426

8506
8507
8508
8509

025370
025376
025402
025406

012737
004737
005037
000207

SETUP SOB-A-LONG TEST

177652

177654

18:

140000

002472

2%:
3s:

MoV

#31 ,REALPAT

;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY

BMOV

MTPO31,FIRST,SOBLENGTH/2
SOBK ,R2
R2,R

MOV

'160776.R1

MoV
MCV

#FIRST+2,SUPDOADD
WLAST+2,LINK1

TST

172254

sCHECK FOR KAMIKAZE MODE
s1F NOT IN KAMIKAZE MODE RETURN

MOV

002254
002472

CALL
KAMITEST
ggiERRORuzgsgszETURN

KERNEL
Mov
MOV

172252

026656
002410

SETUP SOB-A-LONG TEST>>

CLR
NOPAR
MAP
BANK
TESTAREA

002532
100776
060056
060002

SEQUENCE 203

BNE
CMP
BEQ
BR
CMP
BNE
MoV
CALL

CLR
RETURN

#F JIRST+SOBLENGTH,RS
NOSUPER

18
SIPARS,SIPAR6
23

UIPARS ,UIPAR6

38
#140000,LINK1
SUPDO4
NOSCOPE

sSETUP PARITY ACTION
sMAP FIRST SO BLOCK MOVE WORKS
JENTER TEST MODE
;ENTER KERNEL MODE

;COMPLEMENT OF INSTRUCTION °'SO8 RO,DOT'’

CZMSDCO MS11-L/M DIAGNOSTIC
MT0031
SETUP SOB-A-LONG TEST

MACRO M1113

8512 025410

22-APR-81

PAGE 242

MT0032: SUBTST

<<MT0032

SRR

RARAAANAARR

s *SUBTEST

012737
005037

000032
002074

012700

010247

CALL
KAMITEST
ON.ERROR THEN SRETURN
SET
NOSCOPE
MOV
#32 REALPAT
CLR
NOPAR
MAP
BANK
MOV
#10247,RO

8521 025464
8522 025470
8523 025474

012702
010237
012703

020000
002472
060000

MOV
MOV
MOV

8525 025504
8526 025510
8527 025514
8528 025516
8529 025524
8530 025526
8531 025530
8532 025536
8533 025540
8534 025544
8535 025550
gggg 025554

005037
005737
001005
023737
001405
000415
023737
001011
012704
012702
010237
012737

002474
002426

CLR
TST
BNE
CMP
BEQ
BR
CMP
BNE
MOV
MOV
MOV
MOV

8524 025500

8538 025562
8539

012701

012704

177667

160000
172252

172254

177652

177654

140000
014000
002472
000007

1$:
2%:

002474
3s:

8540 025570
8541 025572
ggzg 025574

010023
010144
077203

8544 025576
8545 025604
8546
8547 025606
ggzg 025614

022737
001003

8550 025616
8551 025622
8552 025626
8553 025632
8554 025640
8555 025644
8556 025646
8557 025652
8558 025656
8559 025662
8560 025666
8561 025672
8562 025676
8563 025700
8564 025704
8565 025712

012702
012700
012701
012737
005737
001402
012701
004737
012703
012705
012704
005737
001402
012703
022737
001406

48:

MOV

#17766¢ ,R1

MOV

SLAST+2,
R4

003776

104417

5$:
005141
025740
160000
060000
002474

002254

140000

026656
020000
000110
060000
002474
014000
000001

6$:

_
003716

7$:

NAAN RN RN

#SI2E/2.R2
R2,LINK]
#FIRST,R3

didddiitisi

ARNCORON

ittt itigssilssssssy)

;CHECK FOR KAMIXAZE MODE
“IF NOT IN KAMIKAZE MODE RETURN
;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
*SETUP PARITY ACTION
‘MAP FIRST SO THAT THE BLOCK MOVE WORKS
:0P CODE OF INSTRUCTION 'MOV
R2,-(PC)'’

:0P CODE OF COMPLEMENT OF INSTRUCTION “‘JMP (RO)'*

*USED FOR 1/2 BANK LOOP

LINK2
NOSUPER
1$
SIPARS, SIPAR6
28
3
UIPARS ,UIPARG
33
#140000,
R4
#14000,
R2
R2,LINK1
#1.LINK2

TESTAREA
;ENTER TEST MODE
;MOVE TEST TO MEMORY UNDER TEST

MoV
MOV

$08

000001

SETUP WRITE RECOVERY TEST

026430

8520 025460

RO, (R3)+
R1.-(R4)

R2.4$

CMP
#1,PROTYP
BNE
58
;MOVE LAST PART OF TEST TO FASTCITY
BMOV
MTP03?2
KERNEL
;ENTER KERNEL MODE
MOV
MOV
MOV
MOV
TST
BEQ
MOV
CALL
MOV
MOV
MOV
TST
BEQ
MOV
CMP
BEQ

204

SETUP WRITE RECOVERY TEST>>

004737

002260

SEQUENCE

ANANIA R C O ARAARAANRANNAN

MT0032

MALAASAARAAAR AR

8513 025410
8514 025414
8515 025420
8516 025426
8517 025434
8518 025440
8519 025454

J 16

14:13

#5141 ,R2
#108,R0
#LAST+2 ,R1
#F IRST, SUPDOADD
LINK2
68
#140000,R1
SUPDO4
#SI2E/2.R3
#110.RS
#FIRST.RS
LINK?
78
#14000,R3
#1,PROTYP
8s

;0P CODE OF INSTRUCTION ‘'COM
*ADDRESS TO RETURN TO IN RO
‘TOP OF BANK

=(R1)*’

TIC

MACRO M1113

036052
026656

002254

VERY TEST

026500
002410

8s:
9s:

108:

22-APR-81 14:13
MOV
CALL
BR
CALL
CLR

RETURN

K 16
PAGE 242-1

AMTPO32,SUPDOADD
SUPDO4
9s
SUPDO?2
NOSCOPE

SEQUENCE

205

sTHIS RETURN ACTS AS A NORMAL RETURN FROM MT0032
JALSO A RETURN FROM THE ‘'CALL
SUPDO4'' ABOVE

CZMSDCO MS11-L/M DIAGNOSYIC

MT0032

MACRO M1113 22-APR-81 14:13 PAGE 546

SEQUENCE 206

SETUP WRITE RECOVERY TEST

8576 025742

MT0033: SUBTST
R

;*SUBTEST

8577 025742
8578 025746
8579 025752
8580 025760
8581 025766
ggg% 025772

004737

026430

012737
005037

000033
002074

8584 026006
8585 026014
gggg 026026

104417

8588
8589
8590
8591
8592
8593
8594
8595
8596
8597
8598
8599
ggg?

026030
026034
026042
026046
026052
026060
026064
026066
026074
026076
026100
026106
026110

012705
012737
012701
012702
012737
005737
001005
023737
001405
000407
023737
001003
012737

060076
060004
060002
060003
160000
002426

8602 026116
8603 026122
gggg 026126

004737
005037
000207

026656
002410

<<MT0033
R

SETUP BRANCH GOBBLE TEST>>

MT0033

SETUP BRANCH GOBBLE TEST

LI,

CALL
KAMITEST
ON.ERROR THEN SRETURN
SET
NOSCOPE
MOV
#33 ,REALPAT
CLR
NOPAR
MAP
BANK

002260

sCHECK FOR KAMIKAZE MODE
:IF NOT IN KAMIKAZE MODE RETURN
;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY
;SETUP PARITY ACTION
;MAP FIRST SO THAT BLOCK MOVE WORKS

TESTAREA
:ENTER_TEST MODE
BMOV
MTP033,FIRST,GBLENGTA/2
KERNEL
;ENTER KERNEL MODE
002254
002472

172252

172254

177652

177654

1%:

140000

002472

28:
3s:

8606 026130

Mov
MoV
MoV
Mov
Mov
TST
BNE
CMP
BEQ
BR
CMP
BNE
MoV

#F IRST+GBLENGTH,RS
#FIRST
+4 , SUPDOADD
#FIRST+2,R1
#FIRST+3,R2
WLAST+2,LINK1
NOSUPER
18
SIPARS,SIPAR6
23
38
UIPARS ,UIPAR6
3s
#140000,LINK1

CALL
CLR
RETURN

SUPDO4
NOSCOPE

MT0034: SUBTST
NN

AR RN

s *SUBTEST
R

8607 026130
8608 026136
8609 026142
8610 026146
8611 026152
8612 026154
8613 026160
8614 026162
8615 026170
8616 026172
8617 026200
8618 026206
8619
8620 026216
8621 026224
8622 026226
8623 026234
8624 026240
8625
8626 026242

012737
012700
012701
013702
010103
013705
010004
022737
001006

000034
060000
040000
002560

002260

000007

003716

012737

177646

002254

022737
001403
012737
004737

000001

003716

036210
026642

002254

022737

000001

003716

002102

1$:

28:

<<MT0034

R AR AR RN AR RN

MT0034

SOFT ERROR - BACKGROUND PATTERN TEST>>
RN

RN AR AR AR AR RN AR

AN RN

AR AR AN AN RN

SOFT ERROR - BACKGROUND PATTERN TEST
R

MOV
#34 ,REALPAT
MoV
#F IRST
RO
MoV
#S12E,R1
Mov
SOF TPAT ,R2
MoV
R1,R3
MOV
BANKINDEX
,RS
MOV
RO,Ré
cMP
#1,PROTYP
;IS THIS AN 11/44?
BNE
18
:BRANCH IF NOT
BMOV
MTPO34
MOV
#UIPAR3, SUPDOADD
IF #BIT13 SET.IN CONFIG+2(RS)
;BACKGROUND PATTERN IS VALID
CMP
#1,PROTYP
BEQ
2%
MOV
#MTP034+6,SUPDOADD
CALL
SuPDO3
JREAD IT
ELSE
;BACKGROUND PATTERN HAS BEEN INVALIDATED
CMP
#1,PROTYP

NANRRARAN®

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
22-APR-81
MT0034
SOFT ERROR =~ BACKGROUND PATTERN TEST

8627 026250
8628 026252
8629 026260
8630 026264
8631 026265
8632 026272
8633 926300
gggg 026300

001406
012737

036202

002254

004737
052765

026464
020000

002626

0064737
000402

026642

38
&$:

000207

8636 026302

BEQ
MOV
CALL
BR
CALL
BIS
END ;OF
KETURN

MT003S: SUBTST

14:13

M 16
PAGE 244-1

SEQUENCE

3%
#MTP034, SUPDOADD

SUPDO3
48
SUPDO1
491113 CONF 1G+2(RS)
IF #8IT13

<<MT0035

WRITE IT
‘VALIDATE IT

SETUP WORST CASE NOISE PARITY TEST>>

;t'tttttttttttttttttttttttitttt'ttttttttttttttttttttttttttttttttttttttttttttttt'

:*SUBTEST

MT0035

SETUP WORST CASE NOISE PARITY TEST

:tttttttttttttttttttttttttttl 1232232222222 222 2222223222222 222382 222N

8637 026302
8638 026310

8639 026314
8640
8641
8642
8643
8644

012737
013703

016301

000035
002102

002624

026320
026322
(26326
026330
026334

000301
042701
006301
010137
023737

002146
002146

8646 026344
8647 026346
8648 026352
8649 026356
8650 026364
8651 026370
8652 026400
8653 026402
8654 026406
8655 026412

000207
012702
004737
012737
004737

]
052524
036530
036226
026642

005102
004737
004737
000207

036530
026656

8645 026342

001001

002260

MOV
MOV

#35 ,REALPAT
BANKINDEX ,R3

SWAB
BIC
ASL
MOV
CMP

R
0‘c17 R1
R1
R1.CSRNO
CSRNO, PGMCSR

MOV

177760
002502

BNE

18:
002254

;SET UP TEST NUMBER FOR DISPLAY

CONFIG(R3J,R1

RE TURN
MOV
#52524 ,R2
CALL
BACKGND
MOV
AMTP03S5, SUPDOADD
CALL
SUPDO3
IF QVFLAG 1S TRUE THEN SRETURN
COM
R2
CALL
BACKGND
CALL
SUPDO4
RETURN

;WRITE BACKROUND OF ALMOST ALT.

1°'S AND O°'S

;WRITE COMPLEMENT PATTERN INTO MUT

207

MACRO M1113
CZMSDCO MS11-L/M DIAGNOSTIC
MT0035
SETUP WORST CASE NOISE PARITY TEST
8658 026414

22-APR-81 14:13

MT0999: SUBTST

<<MT0999

s *SUBTEST

MT0999

8659 026414
8660 026420
8661 026426
8662
8663 026430

005037

002260

CLR
SET
RETURN

000207

SEQUENCE
SETUP NULL TEST>>

SETUP NULL TEST

T 2

REALPAT
NULLFLAG

KAMITEST:SUBTST <<CHECK FOR KAMIKAZE MODE>>
RN

RN RN AR

:*SUBTEST
RN AN

8664 026430
8665 026452
8666 026456
8667 026460
8668 026464

N 16
PAGE 246

AR RN

AN RN AR RN

AN R AR RN AN AR IR AR

RN ENAARARAARONINORRO AR

CHECK FOR KAMIKAZE MODE
AR

RN RN R AR

A RN AR

AR RN R

RN RN NI

RN RN

IF KAMIKAZE IS TRUE OR ACTFLAG IS TRUE OR APTFLAG IS TRUE
EngETURN NOERROR
JRUN THE TEST
$RETURN ERROR
END ;OF IF KAMIKAZE

sDON'T RUN THE TEST

VRN

NRANIRNR

208

CZMSDCO MS11-L/M DIAGNOSTIC
CHECK FOR KAMIKAZE MODE

MACRO M1113

8671 026464

22-APR-81

SUPDO1: SUBTST
MAAASAR

s *SUBTEST

MAASAAAAAAL

8672 026464
8673 026500
8674 026504
8675 026514
8676 026520
8677 026524
8678 026526
8679 026530
8680 026532
8681 026534
8682 026536
8683 026540
8684 026544
8685 026552
8686 026560
8687 026564
8688 026566
8689 026570
8690 026572
8691 026574
8692 026576
8693 026600
8694 026602
8695 026610
8696 026614
8697 026616

MoV

PUSH
MOV

MOV
MOV
MOV
MoV
MOV

002562
002564

8698 026622

8699 026624
8700 026626
8701 026630
8702 026640

002152
002154

420

000004

000207

TAG4S:

<<SUBR
il

8 1
PAGE 248

SEQUENCE

ENXECUTE PATTERN IN SUPERVISOR>>

SUBR

LSRR

SUPDOZ2: CALL

177640

MAP

055656

000740

14:13

dRad

it iiistilittidteidtizdTizzeisetszsedy

EXECUTE PATTERN IN SUPERVISOR

ARl ASARRRt

BANK

GETDIS
$LPERR,SLPADR
R, SUPDRO
# SUPDR1
RO
R1,(RO)+
2, (RO)+
3. (RO)+
R4, (RO) +
R5,(RO)+
SP,(RO)+
SUPDRO,RO
#TAG4S
, SLPADR
SLPADR,SLPERR
#SUPDR6+2
,RO
-(R0Q) ,SP
=(RO) ,RS
=(RO) ,R4
=(RO) ,R3
=(RO) ,R2
=(R0) ,R1

iRt

ittt diidiistiitilsstialsllas
s

sMAP SUPERVISOR SPACE (TEST AREA) TO BANK

MoV
Mov
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
Mov
=(R0) ,RO
SUPERVISOR

;ENTER SUPERVISOR MODE

CACHOFF

:TURN CACHE OFF

MOV

#SUPSTK,SSP

CALL
CACHON
KERNEL
SCOPE
POP
RETURN

FASTCITY

cCALL TO THE USER INSTRUCTION PAR'S

sTURN CACHE ON

¢ENTER KERNEL MODE
$LPADR, SLPERR

209

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR

MACRO M1113

EXECUTE PATTERN IN SUPERVISOR

8705 026642
8706 026656
8707 026662
8708 026672

SUPDO3: MAP

055656

SUPDO4:

002152
002154

002562
002564

TBG4S:

000700

000740
153240
000004
000207

CALL
PUSH
MOV
MOV
MOV
MOV
MoV
MOV
MOV
MOV
MOV
MOV
MoV
MOV
MoV
MOV
MoV
MOV
Mov
MOV
MOV

14:13

1
c
PAGE 250

BANK

GETDIS
$LPERR, SLPADR
RO, SUPDRO
#SUPDR1,R0O
R1,(RO)+
R2, (RO)+
R3,(RO)+
R4, (RQ) +
R5,(RQ)+
SP, (RQ) +
SUPDRO,RO
#TBG4S
, SLPADR
SLPADR,$..PERR
#SUPDR6+2
,RO
-(RO) ,SP
=(RJ) ,RS
=(R0O) ,R4
=(R0) ,R3
=(R0O) ,R2
=(R0O) ,R1
=(R0) RO

TESTAREA
TST
NOSUPER
BEQ
1%
MOV
#USESTK ,USP

002426

8
010
8735 027014
8736 027016
8737 027020
8738 027022
8739 027032

22-APR-81

1$:

2$:

B8R

:MAP SUPERVISOR SPACE (TEST AREA) TO BANK

sENTER SUPERVISOR MODE

MOV

#SUPSTK,SSP

CALL
CACHON
KERNEL
SCOPE
POP

aSUPDOADD

CACHOFF

SEQUENCE

$LPADR,SLPERR

:TURN CACHE OFF

s TURN CACHE ON
SENTER KERNEL MODE

210

CZMSDCO MS11-L/M DIAGNOSTIC

MEMORY

TEST PATTERN ROUTINES

8742

MACRO M1113

22-APR-81
.SBTTL

14:13

D 1
PAGE 252

SEQUENCE

MEMORY TEST PATTERN ROUTINES

8743

;tttttttttttttt*tttttttttttttttttttttttttttfittttttttttttt*tttttttttttttttttttttt

8744
8745
8746
8747
8748
8749
8750
8751
8752 027034

; PATTERN REGISTER CONVENTIONS
;
RO
FIRST ADDRESS OF PATTERN (FIRST,LAST+2,ETC)
;
R1
NUMBER OF ADDRESSES IN PATTERN (SIZE)
.
R2
DATA FOR PATTERN (ONES,52525.ETC?
,
R3
COPY OF R1 (IF NECESSARY)
:
R4
COPY OF RO (IF NECESSARY)
N
RS
COPY OF R2 (IF NECESSARY)
,t**tttttttttttttttttttttttttttttttttttttttttttttttttt*tttttttttt’tttt*ttttttttt
MTPOOO: SUBTST
<<MTP000
BASIC DATA TEST>>
tttttttttttttfittttttttttttttttttttttttt*ttttttttttttttttttt*ttttttttttttttttttt

8753 027034

8754 027036

8755 027040

010220

077102

000240

8756 027042 012401
8757 027044
8758 027046

020102
001402

8760 027052
8761 027054
8762 027056

000240
077306
000207

8759 027050

8763 027060

*SUBTEST

MTPOOO

is:

MOV

R2, (RO) +

28:

MOV

CMP
BEQ

R1,R2
3s

38:

NOP
S08
RETURN

R3,2$

BASIC DATA TEST

ttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttt*ttttttt

104430

$S08

NOP

PERRO2

MTPOO01: SUBTST

R1.MTP000

(R4)+,R1

<<MTP0O1

:V177640

V177662

V177644

V177646
V177650
V177652

V177654

V177656
1V177660
1V177662

ADDRESS TEST>>

;tttt*tttttttt*tttttttttttttttttttttttttttttttttttt*tttttttttttttttttttttttttttt

;=SURTEST

8764 027060

010220

8765 027062

062702

8767 027070

000240

8766 027066

077104

8768 027072
8769 027074

012400
020005

8771 027100
8772 027102
8773 027106
8774 027110

104427
062705
077307
000207

000002

3s:

8770 027076 001401

8775 027112

MOV
ADD

S08

1$:

NOP

MOV
CMP

BEQ
000002

MTPOC1

ADDRESS TEST

2222228822282 222822323322332243234823212223
2211322311222 220y LT
aey

28:

PERRO1
ADD
S08
RETURN

MTP002: SUBTST

R2. (RC)+

V177640

#2.R2

V177642

(R4)+,RO
RO.RS

tV177652
V177654

#2.RS
R3.1$

V177660
V177662
V177666
V177672

R1.3$

<<MTP002

V177646
V177650

V177656

COMPLEMENT ADDRESS TEST (WRITE DOWN, READ UP)>>

;ttttttttttttttttttttttttttttt*tttttttttttttttttttt*ttttttttttttttttttttttttttlt

J*SUBTEST

MTP002

COMPLEMENT ADDRESS TEST (WRITE DOWN, READ UP)

Ltttttt*ttttttttttttttttttttttttttttttttt*tlttttttttttlttttttttttttttttttttttttt

8776 027112

010540

8777 027114
8778 027120
8779 027122

062705
077104
000240

8781 027130
8782 027132
8783 027134
8784 027136
8785 027140
8786 027142

012401
020102
001401
104430
077307
000207

8780 027124

000002

162702 000002

5s:

18:

28:

MOV

RS,=(RO)

ADD
SOB
NOP

#2.RS
R1.3$

MOV
CMP
BEQ
PERRO2
S08
RETURN

(R4)+,R1
1.R2
2$

SUB

#2 ,R2

R3,1$

:V177640

V177642
V177646
V177650

V177652

V177656
V177660
V177662
V177664
V177666
V177670

211

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
22-APR-81
MTPOO2
COMPLEMENT ADDRESS TEST (WRITE DOWN, READ UP)

8789 027144

<<MTPAQ3

:*SUBTEST

MTPAO3

AR R AR R AR R

8790
8791
8792
8793
8794
8795

;R1
;R2
sR3
;R4
:R5

010421
010421

8801 027156

000401

8798 027150
8799 027152
8800 027154

8802 027160
88C3 027164

8804 027166
8805 027170
8806 027172
8807 027174

8808 027200
8809 €27202

gg}?

012702
077511

005104
052704
000401
012705

077317
000207

000004

000100

8812 0272C4

WARN3:

so8
COM
BIS
401

MOV
so8

com
BIS
401
MoV

S08
RETURN

MTPB0O3:
R

000137

8817 027214
8818 027216

052704
000401

8819 027220
8820 027224
8821 027226

8822 027230

8823 027232
8824 027234
8825 027240
8826 027242
8827

077203
005104
012702
077511
005104

027244

000004

052704

000401
012705
077317
000207

000100

RAA NN AR A

RN R RN AR AR

3 XOR 9 WORST CASE NOISE TEST (WRITE)
I

LSB

T T

AR AR

ORA SR AN

anwawwwes

:V177640
V177642

R2.,1$
R4
(PC)+,R4

V177644
V177646
iV177650

#4 ,R2
R5,1$

JV177854
:V177660

;V177652 WARNING LOCATION IS MODIFIED BEFORE LOADING

R4
(PC)+,R4

V177662
1V177664
:V17766€ WARNING LOCATION IS MODIFIED BEFORE LOADING
:V177670

#64. RS
R3.1$

LSB

SUBTST

<<MTPB03

V177674
V177676

3 XOR 9 WORST CASE NOISE TEST (READ)>>

LT
e L
e I
T O

8815 027210
8816 027212

3 XOR 9 WORST CASE NOISE TEST (WRITE)>>

R4, (R1)+
R4.(R1)+

.DSABL

s *SUBTEST
8813
8814 027204

SEQUENCE

= ADDRESS
= SMALL LOOP CONSTANT
= NUM OF ADD TO TEST (LARGE LOOP)
= GOOD DATA
= MEDIUM LOOP CONSTANT

MOV
MoV

WARNZ:

AR TR AR AN AN AR AN

.ENABL

18:

077203
005104
052704

PAGE 254

MTPAO3: SUBTST
SRR AR

8796 027144
8797 027146

14:13

MTPBO3

18:

.ENABL
JMP

LSB
SMMTPCO3

WARNG:

BIS
401

(PC)+,R4

WARNS:

S08
COM

R2.1$
R4

MOV
so8
COM

#4 ,R2
R5.1$
R4

401
MoV
S08
RETURN

#64. RS
R3.1$

BIS

.DSABL

3 XOR 9 WORST CASE NOISE TEST (READ)

(PC)+,R4

LSB

2V177640

V177644
.V177646

GO TO V172360

2V177650
:V177652 WARNING LOCATION IS MODIFIED BEFORE LOADING

V177654
1177660
V177642

;V177664

V177666 WARNING LOCATION IS MODIFIED BEFORE LOADING
1V177670
V177674
V177676

21¢

CIMSDCO MS11-L/M DIAGNOSTIC
MA C RO M1 113
MTPBO3 3 XOR 9 WORST CASE NOISE T E ST (READ

MTPC03: SUBTST

<<MTPCO3

*SUBTEST

MTPCO3

ASA

AR ARA

02042
00140
10443
00514
00511
00013

SRRl
SR

SRRl

ittt

SEQUENCE

TEST DATA SUBPROGRAM>>
ittt

ARl Rttt

ittt

iiid

R4, (R1)+

s¥172360

SAMTPDO3

V172372

MTPD03: SUBTST

<<MTPDO3

: *SUBTEST

MTPDO3

1$:

027262

SRR AR AR

TEST DATA SUBPROGRAM

CMP
BEQ
PERRO3
COM
COM
JMP

8831 027244
8832 027246
8833 027250
8834 027052
8835 027254
8836 027256
8837
8838 027262

£
1
PAGE 256

L ]

8830 027244

22~APR-81 14:12

AR AR

iis

ittt

it dl

it diaiiisdidatiisdlldsd

it iiatidiadditiiddllss

GO TO V172260

TEST DATA SUBSUBPROGRAM>>

AR AR RN R AR A AR AN A RA

AR A AN AN

A AN RANNAAANR AR

TEST DATA SUBSUBPROGRAM

;**t*ttttttttt*tt**tt*ttttt**t*t*t*t*tttttttttfititttttttttttt*t**it*i*i'fittttttt

8839 027262
8840 027264
8841 027266
8842 027270
8843 027272
8844 027274
8845 027276

020421
001401
104431
005127
000000
001363
000137

cMP

18:
027210

BEQ
PERRO3
COM
0
BNE
JMP

R4, (R1)+

(PC)+

MTPC03
SAMTPBO3+4

:V172260

V172262
V172264
V172266
V172270
V172272
V172274

GO TO V172360
GO TO V177644

213

CZMSDCO MS11-L/M DIAGNOSTIC

MTPDO3

TEST DATA SUBSUBPROGRAM

8848 027302

MACRO M1113

22-APR-81 14:13

6 1
PAGE 258

MTPAO4: SUBTST

<<MTPAO4

s *SUBTEST

MTPAO4

is:

#8. RS

SEQUENCE
ROTATING ZEROS TEST>>

:ttttttttttttttttttttttttttttttttttttt*t*tttttttttttttttttttttttttttttttttttttt'

ROTATING ZEROS TEST

:tttttttttttttt*ttttttttttttttt*ttttttttttttttttttt**tttttttttttttttfittttttttttt

8849 027302
8850 027306
8851 027310
8552 027312
8853 027316
8854 027322
8835 027324
8856 027326
8857 027330
8858 027332
8859 027334
8860
8861 027336

012705
019504
000241
000157

000010
027336
177776

MTPBO4:

:V177640

MOV
cLC
JMP

MMTPBOG

V177644
V177646
V177650

BCS

V177660

MOV
28:
38:

0C0207

MOV

RS,R4

<2(R0O) ,R4

cMP
BEQ
PERRO4
SO8

R2.R4
3s

SUBTST

<<MTPBO4

RETURN

V177654

V177662
V177664
‘V177666
V177670

R1,1$

V177672
SUBR

ROTATING BIT>>

;tttttttttttttttt*ttttttttt'ttttttttttttt*ttttt*ttt*tttttttttttttttttttttttttttt

8862 027336
8863 027340
8864 027342
8865 027344
8866 027346
8867 027350
8868 027352
8869
8870 027356

Qad
O
d O
OONOO~NO
QOO NOONNON
b b SN ad d \ Y b
WO =NO
NONOONO

+«SUBTEST

MTPBO4

SUBR

ROTATING BIT

;ttttkttttttttttttttttttttttttttttttttttttttfittttttttttttttttttittttttttttttttt

is:

28:

ROLB

MTP0O0S:

:V172360

(RO)+

V172364

R5.1$

ROLB
S08

(RO)
R4, 2$

JMP

AMTPADL+14

(RO)+

V172372

SUBTST

<<MTPO0S

ROTATION ONES TEST>>

ROLB

027316

(RO)

SO8

V172362

V172366
1v172370

V172374

*ttttttttttttttttttttt*tttttttttttttttttttttttttttttttttttttttttttttttt'ttttttt

s *SUBTEST

MTP0O0S

is:

#8. .RS
RS.R%

ROTATION ONES TEST

ttttttttttttttttttttt*tt*tttttttttttt*tttttttfittttttttitttttttttttttttttttttttt

8871 027356
8872 027362
8873 027364
8874 027366
8875 027372
8876 027376
8877 027400
8878 027402
8879 027404
8880 07406
8881 027410

012705
010504
000261
000137
016004
103002

020204
001401

104432

077115
000207

000010

027336
177776

28:
3$:

MOV
MOV
SEC
JMP
MOV
6CC
CMP
BEQ
PERRO4
08
RETURN

SMMTPBO4
-2(R0) ,R4
2$
R2.R4
3s
R1,1$

:V177640
V177644
V177646
v177650
V177654
‘V177660 IF THIS HAPPENS THE GPOD & BAD MATCH
V177662
V177664
V177666
V177670
V177672

214

CZMSDCO MS11-L/M DIAGNOSTIC

MTPOO5S

ROTATION ONES TEST

MACRO M1113

8884 027412

22-APR-81

MTP006: SUBTST
AL

SRS AA

s *SUBTEST

FAAAS SRR

8885
8886
8887 027412
8888 027420
8889 027424
8890 027432
8891 027440
8892 027444
8893 027450

INITIAL DATA TEST>>

Attt

MTPO06

ARl

it dd

INITIAL DATA TEST

RdRddd

iRttt d

iidt

ittt iissdiiisiiisizsitisisitssssiazes

il iiaddidisiiisdisadisitsizesizzslssty

H
THIS TEST CHECKS THE DI/DO LINES BY
:
SHIFTING A 1 THROUGH THE WORD.
#1,DATBUF
sSET THE FIRST TEST BIT
DATBUF +2
sCLEAR 2ND WORD
DATBUF ,a(R1)
sWRITE TEST WORD 1
DATBUF +2,82(R1) ;AND TEST WORD 2
a(R1) ,R2
DATBUF ,R2
;NOW READ THEM
2%
;BR _IF FIRST 16 0K

000001
002236
002234
002236
000000
002234

gggg 027452

8896 027454
8897 027460
8898 027464
gggg 027466

017102
023702
001401
104434

000002
002236

2$:

MOV
CMP
BEQ
PERR10

@82(R1) ,R2
DATBUF +2 ,R2
3s

8901 027470
8902 027474
8903 027476
8904 027506
8905
8906 027510
8907 027516
8908 027524
8909 027532
8910 027540
8911 027544
8912 027550
gglz 027552

005737
100405

002236

3s:

TST
BMI
DLEFT
BR

DATBUF +2
48
DATBUF
18

4$:

013771
017102
023702

002236
000000
002234

MoV
Mov
MOV

#177776,DATBUF
#-1, DATBUF+2
DATBUF ,a(R1)

BEQ
PERRO?7

;BR IF 0K

8915 027554
8916 027560
8917 027564
gg}g 027566

017102
023702
001401
104434

000002
002236

6$:

MoV
cMP
BEQ
PERR10

a82(R1) ,R2
DATBUF +2 ,R2
’$

sNOW, READ SECOND WORD
:BR IF 0K

8920
8921
8922
8923
8924

005737
100005

002236

’$:

TST
8PL
DLEFT

DATBUF +2
8s
DATBUF
5%

000000
000002

18$:

PERRO?7

000746
012737
012737
013771

001401
104433

000746
000207

MoV
CLR
Mov
MOV
MOV
CMP
BEQ

SEQUENCE

012737
005037
013771
013771
017102
023702
001401
104433

027570
027574
027576
027606
027610

002234

<<MTP006

SRRt

H
1
PAGE 260

14:13

177776
177777
002234

002234
002236
000000

000002

SS$:

8%:

Mov
MOV
CMP

RETURN

;ERROR TRAP

:NOW READ SECOND WORD
:BR _IF OK
;ERROR TRAP
sHAS LAST BIT BEEN TESTED ?
sMINUS MEANS BIT 31
sNO, SHIFT TEST BIT LEFT
:GO WRITE NEW TEST DATA
sNOW GOING TO SHIFT A O IN DATA DIRECTION
;PUT A O IN BIT 0
;AND 1°'S IN ALL OTHERS
¢WRITE THE DATA
;2 WORDS WORTH

DATBUF+2,82(R1)
a8(R1) ,R2
DATBUF ,R2
sNOW READ FIRST WORD

sTESTED BIT 31 YET?
:BR IF YES, WE'RE DONE
;KEEP GOING

215

CZMSDCO MS11-L/M DIAGNOSTIC
MTPOO6
INITIAL DATA TEST

8927 0276172

MACRO M1113

22-APR-81

MTPO07: SUBTST
AR

LSRR

s *SUBTEST

8928
8929
8930
8931
8932 027612
8933 027614
8934 027616
gggg 027620

111100
105700
001401
104435

8937 027622
8938 027624
8939 027626
8940 027630
ggz; 027632

105111
111100
105700
001001
104436

1%:

8943 027634
8944 027636
8945 027640
8946 027642
8947 027644
8948 027646
gggg 027650

040201
006302
050201
011100
005700
001401
104437

2$:

8951 027652
8952 027654
8953 027656
8954 027660
gggg 027662

005111
011100
005700
001001
104440

38:

8957 027664

022702

8958 027670
8959 027672
8960 027676
8961 027700
8962 027702
8963 027706
8964 027710

001407
022702
001356
006302
012701
000752
000207

AL A

MOov8
1578
8EQ
PERR11

100000

4$:

010000
160000
5%:

14:13

PAGE 262

SEQUENCE

<<MTP007
ddt

ADDRESS BIT TEST>>

Al ltad it

tiie

el iitissiiletsditiaslzsgzdzatissteesdly

MTPO07

ADDRESS BIT TEST

:
:
;
H
(R1) ,RO
RO
18

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.

Attt

ARl

didd

CoM8
MOVB
1ST8
BNE
PERR12

(R1)
(R1) ,RO
RO
2$

BIC
ASL
BIS
MoV
TST
BEQ
PERR13

R2,R1
R2
R2.R1
(R1) ,RO
RO
3$

COM
MoV
TST
BNE
PERR14

(R1)
(R1) ,RO
RO
4s

CMP

#100000,R2

BEQ
CMP
BNE
ASL
MoV
BR
RETURN

58
#10000,R2
2%
R2
#160000,R1
2%

ittt

iid ettt

iitliiistisiel

itttz izeTzsstlzty)

sREAD AND COMPARE FOR ZEROS
;BR IF 0K

;COMPLEMENT THE BYTE
sREAD FOR NON ZERCS
:BR IF 0K
sMASK OFF THE ASSERTED 8IT
sSHIFT R2 FOR NEXT BIT
sSET THE NEW BIT INTO R1
;READ THE NEW ADDRESS
sREAD FOR ZEROS
sCOMPL THE WORD

JREAD IT AGAIN

;CHECK FOR MSB IN 4K BANK
sNOT LAST BIT, BRANCH

216

CZMSDCO MS11-L/M DIAGNOSTIC
MTPOO7
ADDRESS BIT TEST

MACRO M1113

8967 027712

22-APR-81

14:13

PAGE 264

MTP010: SUBTST

<<MTP010

**SUBTEST

MTPO10

SEQUENCE

BYTE ADDRESSING TEST>>

;tttitt*ttt*tttt*ttfl'tit"t't'ttfittttttttttt*.’"'fitfitttttttttt*'tfi"tt't'ttttttti

BYTE ADDRESSING TEST

:ttttt!*tittt'tfifi*tfifittttfi'tttittfitt**ttfitifitt'fitt'itlttfititit*t**tttttttttt.ttt

8968
8969
8970 027712
8971 027714
8972 027716
8973 027722
8974 027726
8975 027734
8976 027736
8977 027740
8978 027742
8979 027744
8980 027746
8981 027750
8982
8983 027752
8984 027756
8985 027760

022700
001401
104435

8987 027762
8988 027764
8989 027766
8990 027770
8991 027774

005201
000765
111100
122700
001401

8994 030000
8995 030002
8996 030006
8997 030010
8998 030012
8999 030014
9000 030016

005201
000756
112713
005203
020302
001347
000207

8992 027776

010402
010403
062702
012713
012763
105013
010401
020201
001420
020301
001007
111100

000004
177777
177777

000002

18:
28:

000000

38:
177777

4$:

104436

;TEST 3 THIS TEST CHECKS FOR PROPER
:
BYTE ADDRESSING WITH ECC DISABLED
MOV
R4,R2
;R4 HAS LOWEST ADDRESS
MOV
R4.R3
:PUT IT IN R3 ALSO
ADD
#4.R2
:POINT R2 TO LAST BYTE +1
MOV
#-1, (R3)
:WRITE ALL ONES IN
MOV
#-1.2(R3)
:THE 4 TEST BYTES
CLRB
(R3)
*CLEAR A BYTE
MOV
R4.R1
$INITIALIZE R1 FOR EACH PASS
CMP
R2.R1
*IF EQUAL, JUST READ LAST BYTE
BEQ
6$
“BR IF EQUAL
CMP
R3,R1
IS THIS THE BYTE OF ZEROS
BNE
48
‘BR IF NOT
MOVB
(R1),RO
WARNING IF YOU OPTOMIZE CHANGE THE PCBUMP FOR THIS ERROR INCASE OF TRAPS
cnP
#0,R0
;IT 1S, COMPARE FOR ZEROS
BEQ
3$
PERR11
INC
BR
MOVB
CMPB
BEQ

R1
28
(R1),RO
#-1,R0
58

;:NEXT BYTE
*RETURN

INC
BR
MOVB
INC
CMP
BNE
RETURN

R1
28
#-1,(R3)
R3
R3.R2
18

;MOVE TO NEXT BYTE

PERR12
58
177777

6$:

;1TS NOT THE BYTE OF 0°'S, READ 1'S

;RESTORE 1'S TO BYTE JUST TESTED
*INC TO NEXT BYTE
:WAS THAT JUST THE LAST ONE?
‘BRIF NO

217

CZMSDCO MS11-L/M DIAGNOSTIC
MTPO10 BYTE ADDRESSING TEST

MACRO M1113

9003 030020

22-APR-81

MTPO11: SUBTST

14:13

K
1
PAGE 266

<<MTPO11

SEQUENCE
SINGLE BIT ERROR TEST>>

ttttttfitt'tttttttt*tt"tt't'ttfi*tttttttitttttfitttttttfitttfit*ttttttttt'ttttttttt

S «SUBTEST

MTPO11

SINGLE BIT ERROR TEST

tti*tittQlttfittttifiltti'ttttttttitfittt*ttttttt'titttttttlttittttttttt"ti'itttt

388§

:(1)

CREATE A SINGLE BIT ERROR

3889

:(2)

READ BACK SBE UNCORRECTED (WITH ECC DISABLE)

3883

*(3)

ENABLE ECC & READ CORRECTED DATA

38}?

1(4)

CHECK THAT THE SBE FLAG WAS SET FROM THE LAST READ

9012

$(5)

DO (1-4) FOR DATA CONSISTING OF 1 BIT SET IN EACH OF 32

38}9

;

9013
9014
9015

9018

9019
9020 030020
9021 030022

9022 030026
9023 030030
9024 030034

104503
005737
001407
013702
013737

9027 030046

38%2 030042

9028 030054
9029
9030 030060
9031 030066
9032
9033 030072
9034 030100
9035 030106
9036 030112
9037 030114
9038 030120
9039 030124
9040 030130
9041 030134
9042 030142

9043

:(6)

DO (1-5) FOR A SBE IN EACH OF 32 BIT POSITIONS

MTLAT1
*BRANCH IF NOT SET
SIPAR3,R2
*SAVE CONTENTS OF SIPAR #3
SIPARS .3#SIPAR3 :COPY CONTENTS OF #5 INTO #3

172246
172252

172246

BEQ
MOV
MOV

012737

000001

002234

MTLA11: MOV

012737
005037

000001
002246

002244

013737
013737
105737
001404
005137
005137
013702
013703
012737
004737

002234
002236
002256

002240

010237

005037

172252

002236

002240
002242
002240
002242
002240
041722

IE (64 TIMES)

002242

"SYG LoogzLa¥SIPARS
CLR
sMEDIUM
MTLB11: MOV
CLR
LITTLE

MTLC11: MOV
MOV

4%:
002272

1578
BEQ
com
COM
MoV
MOV
MOV
CALL

#1,DATBUF

DATBUF +2
LOOP
#1, SBEMSK
SBEMSK +2
LOOP

*COPY CONTENTS OF #3 INTO #5

; INITIAL DATA

*32°BITS WORTH
;INITIAL ERROR MASK
*32°BITS WORTH

DATBUF, TSTDAT
DATBUF +2, TSTDAT+2;TO SAVE ORIG DATA

PASFLG
;COMP DATA ON SECOND PASSONLY
43
:BR IF FIRST PASS
TSTDAT
:SECOND PASS, COMP BOTH WORDS
TSTDAT+2
TSTDAT ,R2
TSTDAT+2
,R2
#TSTDAT ,SOURCE
,SET UP ADDRESS FOR CHKGEN
CHKGEN
cGEN CHECKBITS ON TSTDAT

JRRRRRAARA
RN RN R AR AR RN RRNRNY
s** CREATE A SINGLE BIT ERROR *«

9045

JNRRARNARARNAANAORRNARNRAANNRAAR

030146
030152
030156
030162
030166
030172
030176
030200

9054 030204
9055 030206
9056

POSITIONS OF A DOUBLE WORD
THEN DO IT AGAIN FOR 1 BIT CLEARED IN EACH OF 32 POSITIONS OF
A DOUBLE WORD

:
1E (RUN TEST 64 * 32 = 2048 TIMES)
CLR1CSR
;CLEAR 1 SELECTED CSR
ST
PHEBE
*TEST SPECIAL CASE INDICATOR

013136

9044

9046
9047
9048
9049
9050
9051
9052
9053

:
:
:

013701
074137
013701
074137
013701
013705
104471
013711
104475
013715

002244
002240
002246
002242
002362
002364

002240

002242

MoV
XOR
MOV
XOR
MTLD11: HOV

SBEMSK ,R1
R1,TSTDAT
SBEMSK+2
,R1
R1,TSTDAT+2
TESTADD ,R1
TESTADD+2 ,R5

ECCIDIS
MOV
TSTDAT, (R1)
(B1CSR
MOV
TSTDAT+2,(R5)

sFIRST TEST ADDRESS
sSECOND TEST ADDRESS
:DISABLE ECC ON 1 SELECTED CSR
:WRITE FIRST 16 BITS
:WRITE GENERATED CHECKBITS IN 1 SELECTED CSR
:WRITE SECOND 16 BITS AND
sCHECK BITS. WE NOW HAVE CHECKBITS

218

CZMSDCO MS11-L/M DIAGNOSTIC
MTPON
SINGLE BIT ERROR TEST

9057
9058

9059 030212

9060 030214

9064 030230
9065
9066 030232
9067 030234
9068 030240
9069 030242
9070 030246
9071
9072 030250
9073 030256
9074 030260
9075 030300

104471
01110C
020037

001403
010137
104455

011500
020037
001403
010537
104455

9098 030362

9099
9100 030364
9101 030366
9102 030370
9103 030376
9104 030402
9105 030404

002032

002242

SEQUENCE

sGENERATED ON DATBUF AND DATA WITH
sONE BIT IN ERROR (AS PER SBEMSK).
sDISABLE ECC ON 1 SELECTED CSR

(R1) ,RO
RO,TSTDAT
63
Ri.,ADDRESS

JREAD THE LOW WORD (UNCORRECTED)
;BR IF 0K

(R5) ,RO
RO,TSTDAT+2
’$
R5,ADDRESS

;READ THE HIGH WORD
;BR [IF 0K

7%:

IF KFLAG IS FALSE

(UNCORRECTED)

READCSR

IF #8IT4 OFF.IN CSR OR #BIT15 OFF.IN CSR
ERROR
+45

013136
17%:

END; OF IF #BITé4
END; OF IF KFLAG
PHEBE
TST
178
BNE
ERRGEN

CLR1CSR

MoV

CMP
BEQ

104456

PERR32

104510
103411

8s:
002032

104503
011500

TSTREAD

BCS
SET

:
9%

108:

103411

002032

002256

(R1)

& TST FOR SBE

IT IS SET

(WITHOUT FETCHES)

¢ENABLE PRINTING OF ERROR HEADER INFO

CLRI1CSR

MOV

TSTREAD

8CS
SET

PERR34
SET
ERRGEN

(R5) ,RO

;CLEAR 1 SELECTED CSR

RO,RS

;SEE IF ITS BEEN CORRECTED

118
HEADER
R1,ADDRESS

;BR IF YES
;ENABLE PRINTING OF ERROR HEADER INFO

HEADER

;ENABLE PRINTING OF

SBEMSK +2

;TEST FOR LAST MASK BIT

108

TST8B

TST

12%:

s8R IF

HEADER

BM]

002246

;TEST LOC

SET

Mov

11%:

;SEE IF 1TS BEEN CORRECTED
;1T SHOULD HAVE BEEN

sENABLE PRINTING OF ERROR HEADER INFO

CMP

104510

sCLEAR 1 SELECTED CSR

HEADER
R1,ADDRESS

8EQ
PERR32

104456

(R1) ,RO
RO,R2
8s

MOV

PERR34

020003
001401

000614

1
L
PAGE 266-1

MOV
CMP
BEQ
MOV
PERR31

002032

104512
104503
011100
020002
001401

104460

14:13

6%:

104045

010137

22-APR-81

ECCIDIS
MOV
CMP
BEQ
Mov
PERR31

002240

104426

005737
001001

9085 030322
6
87 030324
9088 030326
9089 030330
9090 030336
9091 030342
9092 030344
9093
9094 030352
9095 030354
9096 030356
9097 030360

MACRO M1113

:BR [F OK

;TEST LOC (R1) & TST FOR SBE (WITHOUT FETCHES)

;TEST ERROR ADDRESS

BMI]
128
sMINUS MEANS BIT 31
DLEFT
SBEMSK
BR
MTLC1T
IF #SW11 SET.IN @SWR THEN GOTO 13%

ERROR HEADER INFQ

219

CZMSDCO MS11-L/M DIAGNOSTIC

MTPO11

SINGLE BIT ERROR TEST

9114 030452
9115 030460
9116 030464

9117 030466
9118 030476
9119 030502
9120 030506
9121 030510
9122 030514
9123 030520
9124 030526
9125 030530
9126 030532
9127 030536
9128 030542
9129 030546
9130 030554
9131 030560
9132 030562
9133 030566
9134 030570
9135
9136 030574
9137 030576
9138 030602
9139 030606
9140 030612
9141 030614

005737
100406

002236

000137
105737
001004
105237
000137
052737
005002
005003
005037
005037
012704
012737
(74437
006304
032704
001002
000137

030060
002256

104471
013701
013705
104503
000207

002256
030046
000200
002240
002242
000040
003740
002274

MACRO M1113

138:

002256

14$:

002274

15%:

020000

030166
002362
002364

16$:

22-APR-81

14:13

PAGE 266-2

SEQUENCE

IF QVFLAG IS TRUE THEN GOTO 13%
TST
ATBUF +2
¢LAST DATA BIT?
BMI
133
SWKICH IS BIT 3i
DLEFT
DAIBUF
JMP
MTLB11
1ST8
PASFLG
FIRST OR SECOND PASS ?
BNE
14%
:NON 2ERO MEANS WE'RE DONE
INCB
PASFLG
;NOT DONE, GO DO SECOND PASS
JMP
MTLA11
BIS
#BIT7 ,PASFLG
CLR
R2
CLR
R3
CLR
TSTDAT
CLR
TSTDAT+2
MOV
#40,R4
Mov
#3740, CHECK
XOR
R4, CHECK
ASL
Ré
BIT
#BIT13,R4
BNE
168
JMP
MTLD11
:CLEAR OUT ANY DBE'S OR SBE'S
ECCIDIS
;DISABLE ECC ON 1 SELECTED CSR
MOV
TESTADD ,R1
MoV
TESTADD+2,R5
CLEAR
{(R1),(RS)
CLR1CSR
RETURN

;CLEAR 1

SELECTED (SR

220

CZMSDCO MS11-L/M DIAGNOSTIC
MTPO11
SINGLE BIT ERROR TEST

MACRO M1113

9144 030616

9145
9146
9147
9148
9149
9150
9151
9152

104503
012737

030660
030666
030672
030676
030702
030706
030712
030716
030720
0307 2
0307¢6
030730
030732
030736

012737
004737
013701
074137
013701
074137
013704
010401
10447
0137°i
104475
060501
013711
104503

002240
041722
002244
002240
002246
002242
002362

030740
030744
030746
030752
030756
030760
030764
030766
030770
030772
031000

012702
160501
112711
005737
J01403
132712
001420
104510
103011

002244

010137

002032

9153 030652

9154
9155
9156
9157
9158
9159
9160
9161
9162
9163
9164
9165
9166
9167
9168
9169
9170
9171
9172
9173
9174
9175
9176
9177
9178
9179

9180 031004

g}g} 031006

013737

104017

9183 031014
9184 031016
9185 031022

111100
122700
001414
104457

9188 031026
9189

104510

031030
031032
031040
031044
031046

103771

g}gg 031024

9190
9191
9192
9193
9194
3}32

9197 031054

N 1
PAGE 268

14:13

SEQUENCE

MTP012: SUBTST

<<MTPQ12

:*SUBTEST

MTPO12 WRITE BYTL CLEARS SBE TEST

AN RN AN R RN AN AN

AR R AR AN R RN

AN AR

WRITE BYTE CLEARS SBE TEST>>

SRR AN RN RN RN R AR

AR AR

NN AR

RAN

AR AN NI RNANRANAANRNRA

AN NGNS

RA AN RN RN RN AR A RANA AN RARARAARCR AN

sSINGLE BIT ERROR TEST TO INSURE THAT A WRITE
;BYTE CLEARS SINGLE BIT ERRORS.

030616
030620
030626
030632
030640
030644

005037
012737
005037
013737

22-APR-81

000007

002236
000001
002246
002234

002236

CLR1CSR
MOY
#1,DATBUF

002234
002244
)
002240

002242

18:
2%:

002272

002240
002242

177777
002500

3s:

177777
48:

177777

CLR
MOV
CLR
MOV

DATBUF +2
#1,SBEMSK
SBEMSK +2
DATBUF ,TSTDAT

MOV
CALL
MOV
XOR
MOV
XOR
MOV
MOV
ECCIDIS
MOV
CB1CSR
ADD
MOV
CLR1CSR

#TSTDAT,SOURCE
CHKGEN
SBEMSK ,R1
R1,TSTDAT
SBEMSK+2,R1
R1,TSTDAT+2
TESTADD,R4
R4 ,R1

MOV
SuB
move
TST
BEQ
BITB
BEQ
TSTREAD
BCC
SET
MOV

#SBEMSK ,R2
RS .R1
#-1,(R1)
KFLAG
X
#-1,(R2)
6$

SET

HEADER

;ENABLE PRINTING OF ERRCR HEADER INFO

MOVB
C(MPB
BEQ

(R1).RO
#-1.R0
78

:CHECK DATA
‘BR IF 0K

MOV

ERROR

5¢:

PERR33

6$:

010137
104460

002032

132712

177777

78:

;CLEAR 1 SELECTED CSR
SINITIAL DATA
:32 BITS WORTH
SINITIAL ERROR MASK
232 BITS WCRTH
:SAVE ORIGINAL DATA

DATBUF +2,TSTDAT+2:B0TH WORDS

TSTDAT, (R1)
RS.R1
TSTDAT+2,(R1)

5¢
HEADER
R1,ADDRESS

+17

TSTREAD

;NEED ADDRESS FOR CHKGEN
:GENERATE CHECK BITS

;FIRST TEST ADDRESS
SPUT IT IN R1 ALSO
:DISABLE ECC ON 1 SELECTED CSR
SWRITE 16 BITS
:WRITE GENERATED CHECKBITS IN 1 SELECTED CSR
:INDEX UP TO SECOND WORD
:WRITE HIGH WORD+CHECKBITS
:CLEAR 1 SELECTED CSR
*IT'S DANGEROUS IF WE DON'T
*ADDRESS OF ERROR MASK
*RETURN TO FIRST WORD
SWRITE A BYTE OF 1°'S
SIS THIS MF11S<K
*BRANCH IF NOT = IT'S MS11-M
:DID THIS BYTE HAVE THE BAD BIT IN IT?
:NO - BRANCH
STEST LOC (R1) & TST FOR SBE (WITHOUT FETCHES)
‘N0 - SKIP
SENABLE PRINTING OF ERKOR HEADER INFO

sTEST LOC (R1) & TST FOR SBE
“READ THE BYTE

(WITHOUT FETCHES)

*SBE ERROR BIT ONLY SET ?
*SHOULD BE SET, BR IF OK
*ENABLE PRIMTING OF ERROR HEADER INFO

BCS
SET
MOV
PERR34
SET

5%
HEADER
R1,ADDRESS

HEADER

;ENABLE PRINTING NF ERROR HEADER INFO

BITB

#-1,(R2)

:CHECK FOR LAST BYTE

221

CZMSDCO MS11-L/M DIAGNOSTIC

MTPO12

WRITE BYTE CLEARS SBE TEST

9198 031060
9199 031062
9200 031064

9201
9202
9203
9204
9205
9206
9207

9208
9209
9210
9211
9212
9213

MACRO M1113

031066
031072
031076
031100
031104
031106
031112

031114
031124
031126
031136
031144
031150

9214 031152
9215 031162
9216
9217 031164
9218 031166
9219 031172
9220 031174
9221 031176
9222 031200
9223 031202

001012
005202
005201

013704
032701
001723
062704
000720
005737
100405

002362
000002

002246

000647
005737
100405

8%:

9%:
002236

104471
013701
005011
060501
005011
104503
000207

BNE
INC
INC

8$
R2
R1

BIT
8EQ
agb

#2,R1
38
gg.Rk

JTEST FOR LOWER WURD
JBR IF IT'S LOW 16 BITS
;ADJUST POINTER FOR ERROR REPT.

SBEMSK +2

;LAST ERROR BIT ?

TST

BMI]

DLEFT
B8R

002362

TESTADD R4

ggEMSK

SEQUENCE

sMOVE TO NEXT BYTE

JFIRST TEST ADDRE"S

sMINUS MEANS BIT 31

IF QYFLAG IS TRUE THEN GOTO 108
TST
DATBUF +2
sLAST DATA BIT?

DLEFT
BR

10%:

PAGE 268-1

IF #SW11 SET.IN @SWR THEN GOTO 108

BM]

000623

14:13

MOV

000002

22-APR-81

108

DATBUF
1%

JMINUS = BIT 31

:CLEAR OUT ANY DBE'S OR SBE'S

ECCIDIS
MOV
TESTADD ,R1
(R1)
CLR
ADD
R5,R1
CLR
(R1)
CLR1CSR
RETURN

:DISABLE ECC ON 1

;CLEAR 1

SELECTED CSR

222

CZMSDCO MS11-L/M DIAGNOSTIC

MTPO12

MACRO M1113

WRITE BYTE CLEARS SBE TEST

9226 031204

22-APR-81

<<MTPQ13

; *SUBTEST

MTP013

AARARARS

AR ARE

ARt

RNt

Rla

SEQUENCE
CREATE DOUBLE BIT ERROR TEST>>

iRt

it idaissitiiisitadiiiatlitissatsy]

CREATE DOUBLE BIT ERROR TEST

ittt

ittt iqlissiiilatizlilitisls

;DOUBLE BIT ERROR FORCE TO CHECK DOUBLE ERROR LOGIC
N#TESTADD
,R1

18:

002256

sINITIAL SINGLE ERROR MASK

#1,SBEMSK

002250

38:

#1,DBEMSK

002240
002242

4$:

DATBUF, TSTDAT

002250

002246

002252

002240

002272

041722
002244
002240

sMAKE INITIAL DATA

DATBUF +2

28:

002244

sCLEAR 1 SELECTED CSR

DATBUF

002244

002240
002242

sALL ZEROS

SBEMSK +2

sSECOND WORD

DBEMSK +2

;32 BITS HERE ALSO

sINITIAL DOUBLE ERROR MASK

DATBUF +2, TSTDAT+2

géSFLG

:NO COMPLEMENTING FIRST PASS

TSTDAT
TSTDAT+2

5%:

SBEMSK, DBEMSK
$

+COMP FIRST WORD
+ SECOND WORD
;CLEAR 1 SELECTED CSR
CAN T HAVE THE SAME ERROR BIT SET
N BOTH MASKS

138

;GO MAKE THEM NOT EQUAL

CHKGEN

:GO GENERATE CHECK BITS

SBEMSK +2, DBEHSK+2;COULD BE EQUAL IN SECOND WORD
6%:

H#TSTDAT,SOURCE

SBEMSK ,R2

;SOURCE ADDRESS FOR CHKGEN

R2,TSTDAT

SBEMSK+2
,R2

R2,TSTDAT+?
DBEMSK ,R2
R2,TSTDAT

002242

16$%:

002240
002242

000002
000000

9265 031426

002032
9269 031444

c_2
PAGE 270

MTPO13: SUBTST
AL

9227
9228 031204
9229 031206
9230 031212
9231 031216
9232 031222
9233 031230
9234 031234
9235 031242
9236 031246
9237 031254
9238 031262
9239 031266
9240 031270
9241 031274
9242 031300
9243 031302
9244 031310
9245 031312
9246 031320
9247 031322
9248 031330
9249 031334
9250 031340
9251 031344
9252 031350
9253 031354
9254 031360
9255 031364
9256 031370
9257 031374
9258 031376
9259 031402
9260 031404
9261 031412
9262 031414
9263 031420
9264 031424

14:13

000000

XOR

DBEMSK
+2 ,R2
R2,TSTDAT+2

MOV

TSTDAT ,a(R1)+

MoV

TSTDAT+2,8(R1)

ECCIDIS

CLR1CSR

WAS 1DBE

cDISABLE ECC ON 1 SELECTED CSR

;WRITE 16 BITS
sWRITE GENERATED CHECKBITS IN 1

;WRITE HIGH WORD

JCLEAR 1 SELECTFD CSR

#2 ,R1
a(R1)

sADJUST TEST ADDRESS
JREAD THE LOCAT.(ON

;1T SHOULD BE ‘ET

HEADER
(R1) ,ADDRESS

+30

HEADER

SELECTED CSR

;WAS THERE ANY DOUBLE BIT ERRORS ON 1

SELECTED CSR

223

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
MTPO13 CREATE DOUBLE BIT ERROR TEST
9272 031452

104512
105737
100452

005737
100405

9$:

002256
002252

138:

000662

005737

002246

000636
105737
001003

002256

100405

9287 031546
9288
9289 031552
9290 031554
9291 031562
9292 031566
9293 031572
9294 031600
9295 031606
9296 031614
9297 031620
9298 031624
9299 031630
9300 031634
9301 031640
9302 031646
9303 031650
9304 031654
9305 031662
9306 031664
9307 031672
9308 031676
9309 031700
9310 031702
9311 031706
9312 031714
9313 031716

108:

105237

000617

002256
000200
002240
002242
000040
000100
003740
002244
002274
002250
002274
002250
020000

002244
004000

002244
002250
012701
104503
000207

18:

002362

22-APR-81
ERRGEN

14:13

1ST8B
BMI]

PASFLG
148

BM]

108

TST

D_2
PAGE 272

DBEMSK +2

SEQUENCE

sCHECK MASK FOR LAST BIT

;MINUS = BITH

DLEFT
DBEMSK
BR
43
IF #SW11 SET.IN @SWR THEN GOTO 11$
IF QVFLAG IS TRUE THEN GOTO 11$
TST
SBEMSK +2
sCHECK SINGLE ERROR MASK TOO
8M]
11%
:BR IF DONE
DLEFT
SBEMSK

TSTB

BNE
INCB

PASFLG

12$
PASFLG

.FIRST PASS

:NON ZERO MEANS WE'RE DONE
FIRST PASS, NOT DONE

;CLEAR OUT ANY DBE'S OR SBE'S

002256

12%:

002244

002250
002274

14%:

BR
BIS
CLR
CLR
MOV

MOV
MOV

MOV
XOR
MOV
XOR
ASL

1%
#BIT7,PASFLG
TSTDAT
TSTDAT+?2

#40, SBEMSK

#100, DBEMSK
#3740, CHECK
SBEMSK
, R2
R2.,CHECK
DBEMSK ,R2
R2. CHECK

DBEMSK

002250

BIT
BEQ

#8IT13,DBEMSK
16$

002244

BIT
BNE
MOV

#BIT11, SBEMSK
15$
SBEMSK
, DBEMSK

ASL

002250

ASL

15$:

SBEMSK

DBEMSK

BR
14$
ECCIDIS
MOV
CLEAR

CLRICSR

RETURN

;KEEP GOING
:SET UP FOR CHECK BIT TEST

ATESTADD,R1

3(R1)+,a(R1)

;DISABLE ECC ON 1

SELECTED CSR

;CLEAR 1 SELECTED CSR

224

MACRO M1113 22-APR-81 14:13 PAGE 5742

CZMSDCO MS11-L/M DIAGNOSTIC
MTPO13
CREATE DOUBLE BIT ERRCR TEST
9316 031720

MTPO14: SUBTST

<<MTPO14

s *SUBTEST

MTP014

(AR

AA R

ARl

AR AS AL AR SRR

ARt

iR a

SEQUENCE

WRITE

INHIBIT DURING DATIP WITH DBE TEST>>

i atsiidliliiiistiizitiitisszatlizeezetiszasszty

WRITE INHIBIT DURING DATIP WITH DBE TEST

dadtiid

il iddtiiilidiatliiatiiztiliztzzetzztsszssizety

sTHIS TEST CHECKS THE WRITE INHIBIT ON DOUBLE
;BIT ERRORS DURING A DATIP OPERATION BY USE
;OF AN °'ASRB' INSTRUCTION.
IF KFLAG IS TRUE THEN SRETURN

9329 031734
9330 031740

005037

37
04
37
37
03

002234
002236
000001

002256

1$:

CLR
CLR

28:

MOV

#1,SBEMSK

002250

3s:

MoV

#1,DBEMSK

002240
002242

4s:

MOV
MOV
TSTB

DATBUF, TSTDAT

002250

002244

002252

002246

002240
0641722
002244
002240
002246
002242
002250
002240
002252
002242
002362

002272

5%:

6$:

CLR

BEQ
COM
COM

CLR1CSR

CMP
BNE
CMP
BEQ
MoV
CALL
MOV
XOR
MoV
XOR
MoV

7%:

000000

002032

000000

PASFLG

PERR31

9%:

002032

ADD
MOV
CMP
8EQ
MOV

'INITIAL ERROR MASK
:DOUBLE ERROR MASK

:2 WORDS

;PRESERVE ORIG DATA

TSTDAT
TSTDAT+2

SSECOND PASS YET 2
:BR IF NO
:COMPL DATA

ON SECOND PASS

gBEMSK. SBEMSK

sCLEAR 1 SELECTED CSR
CHECK
ng SAME MASKS

118

;BR IF THEY'RE EQUAL

DBEMSK+2, seensx+2
#TSTDAT,SOURCE

CHKGEN
SBEMSK ,R1
R1,TSTDAT
SBEMSK+2
,R1
R1,TSTDAT+2
DBEMSK ,R1
R1,TSTDAT
DBEMSK +2,R1
R1,TSTDAT+2

TESTADD ,R3

;2 WORDS WORTH

DATBUF +2, TSTDAT+2

TSTDAT+2,8(R1)
UPPFLG

8%:

000002
000000
002242

017137

DBEMSK
+2

TSTDAT,a(R1)+

002240
000000

SBEMSK
+2

#TESTADD
,R1

002240

9364
032150
9365 032152
9366 032156
9367 032160
9368 032166
9369
9370 032170
9371 032174
9372 032200
9373 032204
9374 032206

DATBUF
+2

002244

002240
002242

002242
002257
002362

NOTE- THIS TEST WILL ONLY BE RUN FOR MF11S-K MEMORY.
DATBUF
s INITIAL DATA

(R3)+
8-(R1) RO
TSTDAT RO
9%
a(R1) ,ADDRESS
#2,R1
a(R1),RO
TSTDAT+2,R0

108
@8(R1) ,ADDRESS

sSET _UP ADDRESS FOR CHKGEN
sGENERATE CHECK BITS

s TEST ADDRESS
sDISABLE ECC ON 1 SELECTED CSR
;WRITE FIRST 16 BITS

sWRITE GENERATED CHECKBITS IN 1 SELECTED CSR
sSECOND 16 BITS+CHECKBITS
sINDICATE LOWER WORD
sTEST ADDRESS
sCLEAR 1 SELECTED CSR
sSPECIAL DATIP INSTRUCTION
sCHECK FOR UNCHANGED DATA
sSHOULD BE UNCHANGED

;POINT TO UPPER WORD

JREAD IT
s8R IF UNCHANGED

225

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113 22-APR-81
MTPO14
WRITE INHIBIT DURING DATIP WITH DBE TEST

9375 032214
9376
9377 032216
9378 032224
9379 032226
9380 032232
9381 032234

104455

122737
001403
105237

000744
105737
100453
005737
100405

100405

000615
105737
001004

000003

002257

002256

11%:

002252

002246

002256

000137
052737
005037
005037
012737

031730
000200
002240

138:

002256

002244
002250
002274

#3,UPPFLG

INCB

UPPFLG

TSTB

PASFLG

TST

DBEMSK
+2

DLEFT
BR

zgsnsx

DLEFT
BR

SBEMSK
33

B8R

BM]

14$:

SEQUENCE

15%

sBRANCH IF WE'RE TESTING CHECK BITS
JLAST BIT IN MASK ?
;BR IF BIT 31

128

TST8

PASFLG

;WHICH PASS

:BR IF WE'RE DONE
; INDICATE SECOND PASS COMING
;CLEAR OUT ANY DBE'S OR SBE'S
JMP
1$
;GO DO IT!
BIS
#BIT7,PASFLG
BNE
INCB

CLR

143
PASFLG

TSTDAT

TSTDAT+2

MOV

#40, SBEMSK

MOV
XOR
MOV
XOR

SBEMSK ,R2
R2.CHECK

MOV
MOV

ASL

#100,DBEMSK
#3740, CHECK
DBEMSK ,R2

R2. CHECK

DBEMSK

BIT
BEQ

#81T13,DBEMSK
78

004000

002244

002244
002250

002250

BIT
BNE

#8IT11, SBEMSK
168

002362

ASL

16%:

:LOWER WORD
;BR IF NO

IF #SW11 SET.IN @SWR THEN GOTO 13$
IF QVFLAG IS TRUE THEN GO70 13$
TST
SBEMSK
+2
sLAST BIT IN SINGLE ERROR MASK ?
BM]
13$
sBR IF YES

CLR

15%:

11$

002250

002244

104503
000207

CMPB

BEQ

BM]

128:

020000

032476

108:

002257

105237

012701

F_2
PAGE 274-1

PERR31

000641

005737

14:13

MOV
ASL
BR

ECCIDIS

MoV

SBEMSK

SBEMSK
, DBEMSK
?ggnsx

#TESTADD
,R1

CLEAR
a(R1)+,a(R1)
CLR1CSR

RETURN

sDISABLE ECC ON 1 SELECTED CSR

;CLEAR 1 SELECTED CSR

226

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
22-APR-81
MTPO14
WRITE INHIBIT DURING DATIP WITH DBE TEST
9424 032502

MTP01S:

SUBTST

14:13

<<MTPO15

—

PAGE 276

SEQUENCE
WRITE INHIBIT OF BYTE WITH DBE>>

:tttttttttttttttttttttttt'ttttttttttttltttttttttttttttttttittttttttttttttttttttt

S #SUBTEST

MTPO1S

WRITE INHIBIT OF BYTE WITH DBE

:tttttttttttttttttttttt'ttttttttfittttttt*tttttttt*tttttttttt'ttttttti*tttt'ttttt

9425
9426

9427 032502
9428 032506

005037
005037

002234
002236

18:

9429 032512
9430 032520
9431 032524

012737
005037
012737

000001
002246
000001

002244

2$:

002250

9433 032536

013737

002234

002240

9435
9436
9437
9438
9439
9440
9441

105737
001404
005137
005137
104503
023737
001004

002256

9432 032532
9434 032546

032552
032556
032560
032564
032570
032572
032600

005037
013737

002252

002236

002242

002240
002242
002244

002250

944
9445
9446
9447
9448
9449
9450
9451
9452
6453
9454

032612
032620
032624
032630
032634
032640
032644
032650
032654
032660
032664

9455 032670
9456 032672
9457
9458 032676
9459 032700
9460 032706
9461 032710
9462 032714
9463 032716
9464 032722
9465 032726
9466 032732
9467 032736
9468 032742
9469 032744
32;9 032752

012737
004737
013701
074137
013701
074137
013701
074137
013701
074137
012701
104471
013731

104475
013771

104503
013702

010203
062703
112722
012701

017100

023700
001404
017137
104455

9472 032754

017100

9474 032764
9475 032766
9476 032774
9477

001404
017137
104455

9473 032760

023700

002240
041722
002244
002240
002246
002242

002272

002250
002240
002252
002242
002362

3$:

*SINGLE ERROR MASK
;
:DOUBLE ERROR MASK

4$:

MOV

DATBUF ,TSTDAT

:PRESERVE ORIG DATA

TSTB
BEQ
COM
COM
CLR1CSR
CMP
BNE

PASFLG
;WHICH PASS ?
58
:FIRST PASS, NO CCMPLEMENTING
TSTDAT
TSTDAT+?2
JSECOND PASS, COMPLEMENT TSTDAT
:CLEAR 1 SELECTED CSR
SBEMSK,DBEMSK
CHEcx FOR SAME MASKS
6$
R IF NOT EQUAL

BEQ

118

6$:

000000

002362
8$:

000000

002240

000000

002032

000002

9% :

002242

00002

002032

CLR

MOV

CMP

78:

000003
000360
002362

;INITIAL DATA
:32°BITS WORTH

#1,SBEMSK
SBEMSK+2
#1,DBEMSK

002240

002242

DATBUF
DATBUF +2

MOV
CLR
MOV

9442 032602 023737 002246 002252

9443 032610 001474

CLR
CLR

;CHECK FOR WRITE INHIBIT DURING A WRITE BYTE.
:CHECKS FOR UNCORRECTED DATA.

MOV
CALL
MOV
XOR
MOV
XOR

DBEMSK
+2

DATBUF +2, TSTDAT+2

SBEMSK+2, oeensx+2

#TSTDAT,SOURCE
CHKGEN
SBEMSK ,R1
R1,TSTDAT
SBEMSK+2,R1
R1,TSTDAT+2

MOV
XOR
MOV
YOR
MOV

DBEMSK ,R1
R1, TSTDAT
DBEMSK+2
,R1
R1,TSTDAT+2
ATESTADD ,R1

MOV

a2(R1) ,RO

BEQ
MOV
PERR31

108
32(R1) ,ADDRESS

;SECOND WORD ALSO

:BR TO MAKE THEM NOT EQUAL
:ADDRESS FOR CHKGEN
:60 GENERATE CHECK BITS

;TEST LOCATION
ECCIDIS
:DISABLE ECC ON 1 SELECTED CSR
MOV
TSTDAT,a(R1)+
:WRITE FIRST 16 BITS
JLOAD CSR WITH IMAGE FRCH R2
CBICSR
;WRITE GENERATED CHECKBITS IN 1 SELECTED CSR
MOV
TSTDAT+2,8(R1)
:WRITE SECOND 16 BITS + CHECK3ITS
CLR1CSR
:CLEAR 1 SELECTED CSR
MOV
TESTADD ,R2
SGET ADDRESS OF TEST LOC
MOV
R2.R3
*R2 DESIGNATES FIRST BYTE
ADD
#3.R3
*R3 DESIGNATES LAST BYTE
MOVB
#360, (R2)+
*TRY WRITING A BYTE
MOV
ATESTADD,R1
MOV
a(R1) RO
CMP
TSTDAT RO
;CHECK FOR UNCHANGED DATA
BEQ
98
‘BR IF OK
MOV
a(R1) ,ADDRESS
PERR31

CMP

TSTDAT+2,R0

;READ SECOND WORD
:BR IF UNCHANGED

227

CZMSDCO MS11-L/M DIAGNOSTIC

MTPO15

9478 032776
9479 033000
9480 033002
9481 033006
9482 033010
9483 033014
9484 033016
9485 033026
9486 033030
9487 033040
9488 033046
9489 033052
9490 033054
9491 033064
9492 033066
9493 033072
9494 033074
9495 033100
9496 033102
9497 033110
9498 033114
9499 033120

9500 033126
9501 033134

9502
9503
9504
9505
9506
9507
9508
9509
9510
9511
9512
9513
9514
9515
9516
9517
9518
9519
9520

MACRO M1113

WRITE INHIBIT OF BYTE WITH DBE

020203
001350
105737
100452
005737
100405

10$:
002256

118:

002252

000643
005737
100405
000617
105737
001003
105237
000600
052737
005037
005037
012737

012737
012737

033142
033146
033152
033156
033162
033166
033174
033176
033202
033210
033212
033220
033224
033226
033230
033234

013702
074237
013702
074237
006337
032737
001633
006337
032737
001006
013737
006337
000743
104471
012701

033242
033244

104503
000207

12%:
002246

002256

138:

002256
000200
002240
002242
000040

000100
003740

002256
002244

002250
002274

002244
002274
002250
002274
002250
020000

002250

002244
004000

002244

002244
002250
002362

14$:

15%:

002250
16$:

22-APR-81

14:13

H_ 2
PAGE 276-1

SEQUENCE

TMP
R2,R3
;TESTED LAST BYTE ?
BNE
8s
sBR IF NO
TST8
PASFLG
BMI
158
sBRANCH IF TESTING CHECK BITS
TST
DBEMSK +2
:CHECKING FOR LAST ERROR BIT
BMI]
12$
;BR IF DONE HERE
OLEFT
DBEMSK
BR
43
IF #SW11 SET.IN @SWR THEN GOTO 13$
IF _QVFLAG IS TRUE THEN GOTO 13%
TST
SBEMSK +2
sLAST SBE MASK
BMI
13$
;BR IF DONE WITH THIS PASS
DLEFT
SBEMSK

BR
TST8
BNE
INCB
BR
BIS
CLR
CLR
MOV

MOV
MoV

3s
PASFLG
TEST PASS FLAG
164$
:NON ZERO MEANS WE'RE DONE
PASFLG
;NOT DONR
18
ABIT7 ,PASFLG
TSTDAT
TSTDAT+2
#40, SBEMSK

#100 DBEMSK
#3740, CHECK

MoV
SBEMSK ,R2
XOR
R2,CHECK
MOV
DBEMSK ,R2
XOR
R2,CHECK
ASL
DBEMSK
BIT
#81T13,DBEMSK
BEQ
78
ASL
SBEMSK
BIT
#BIT11,SBEMSK
BNE
16%
Mov
SBEMSK ,DBEMSK
ASL
DBEMSK
BR
15%
ECCIDIS
MoV
#TESTADD ,R1
CLEAR
a(RD)+,a(R1)
:RESTORE CSR
CLR1CSR
RETURN

;DISABLE ECC ON 1 SELECTED CSR
sTEST LOCATION
:TO ERASE ANY DBE'S FROM TESTING
sCLEAR 1

SELECTED CSR

228

CZMSDCO MST11-L/M DIAGNOSTIC
MACRO M1113
MTPO1S WRITE INHIBIT OF BYTE WITH DBE

9523 033246

22-APR-81

MTPO16: SUBTST
FMASAASE AR

;*SUBTEST

9524

005037
005037
012737
005037
012737
005037
013737

002234
002236
000001
002246
000001
002252
002234

9536
9537
9538
9539
9540
9541

033316
033322
033324
033330
033334
033342

105737
001404
005137
005137
023737
001004

002256

9543
9544
9545
9546
9547

033352
033354
033362
033366
033372

001502
012737
004737
013701
074137

013737

002236
002240
002242
002244

T12A:
002244

002250

]
T12B:

002240

18:

002242

002250

28%:

9542 033344 023737 002246 002252

9548
9549
9550
9551
9552
9553
9554
9555
9556
9557
9558
9559
9560
9561
9562

033376
033402
033406
033412
033416
033422
033426
033432
033434
033440
033442
033450
033454
033460
033462

9563 033470
9564 033474
9565 033500
9566 033504
9567 033506
3223 033514

9570 033516

hea———

9571 033522
9572 033526
9573 033532
9574 033534
9575 033542

<<MTP016

AR ARl

ARt

PAGE 278

Alddltd

MTP016
et

SEQUENCE

WRITE INHIBIT OF WORD WITH DBE>>

it atitiitidiiiitiatitiititiititszeizeizizeaesesyy

WRITE INHIBIT OF WORD WITH DBE

ARl

ldl

iiiiliiaiititi itttz

iztseIzzeasly

;DOUBLE BIT ERROR WRITE CANCEL WITH

9525
9526
9527
9528 033246
9529 033252
9530 033256
9531 033264
9532 033270
9533 033276
9534 033302

9535 033310

14:13

013701
074137
013701
074137
013701
074137
012701
104471
013731
104475
013771
105037
162701
104503
012771

012701
017100
023700
001404
017137
104455

062701

017100
023700
001404
017137
104455

002240
041722
(02244
002240

002272

002246
002242
002250
002240
002252
002242
002362

MOV

3$:

PASFLG
;COMP DATA ON SECOND PASS ONLY
2$
:BR IF FIRST PASS
TSTDAT
:COMP FIRST WORD
TSTDAT+2
*NOW SECOND WORD
SBEMSK ,DBEMSK
:CHECK FOR IDENTICAL MASKS
$
BR IF DIFFERENT

BEQ
MOV
CALL
MOV
XOR

83
#TSTOAT,SOURCE
CHKGEN
SBEMSK ,R1
R1,TSTDAT

MOV
XOR

MOV
XOR
MOV

48:

002242
002257
000002

000000

177400
002362
000000
002240

000000

002032

000002

5¢:

68:

000000
002242
002032

DATRUF +2, TSTDAT+2:BOTH WORDS

1ST8
BEQ
COM
COM
cMP
BNE

CMP

002240

000000

:WORD WRITE.
:CHECKS WRITE INHIBIT WITH WORD WRITES TO
:WORD WITH DOUBLE ERROR.
(LR
DATBUF
;:BACKGROUND FOR DOUBLE ERRORS
CLR
DATBUF +2
:2 WORDS WORTH
MOV
#1,SBEMSK
*SINGLE ERROR MASK
CLR
SBEMSK +2
:
MOV
#1,DBEMSK
:DOUBLE ERROR MASK
CLR
DBEMSK
+2
MOV
DATBUF ,TSTDAT
:DATA FOR TEST

XOR
v
ECCIDIS
V
CB1CSR
MOV
CLRB
sUB
CLR1CSR
MOV
MOV
MoV
CMP
BEQ
MOV
PERR31

ADD

MOV
CMP
8EQ
MOV
PERR31

SBEMSK+2, oesnsx+2:UPPER WORD T0O

SBEMSK+2,R1
R1,TSTDAT+2
DBEMSK ,R1
R1,TSTDAT
DBEMSK+2
,R1
R1,TSTDAT+2
ATESTADD ,R1

TSTDAT,a(R1)+

TSTDAT+2,8(R1)
UPPFLG
#2,R1
#177400,2(R1)
#TESTADD
,R1
a(R1) RO
TSTDAT,RO
63
a(R1) ,ADDRESS

;BR TO MAKE THEM NOT EQUAL
-NEED ADDR OF DATA FOR CHKGEN
:GO GENERATE CHECK BITS

:FIRST TEST ADRRESS
:DISABLE ECC ON 1 SELECTED CSR
:WRITE FIRST 16 BITS
:WRITE GENERATED CHECKBITS IN 1 SELECTED CSR
:WRITE SECOND 16 BITS + CHECKBITS
*SET FOR 2 LOOPS
:POINT TO LOW WORD
$CLEAR 1 SELECTED CSR
:TRY WRITING LOCATION

;CHECK FOR ORIGINAL DATA
$SHOULD BE UNCHANGED

#2,R1

a(R1).,RO
TSTDAT+2,RO
78
a(R1) ,ADDRESS

;THIS SHOULD BE UNCHANGED ALSO

229

CZMSDCO MS11-L/M DIAGNOSTIC

MTPO16

WRITE

9578 033544
9579 033550

MACRO M1113

INHIBIT OF WORD WITH DBE

105737

002257

7%:

100405

9%:

002246

000137

033270
002256

100406

105737

002256
033246
000200
002240
002242
000040
000100
003740
002244

020000
002244

002256

118:

002244
002250
002274

12%:

UPPFLG

SEQUENCE

sWHICH LOOP ?
:SECOND, BR OUT

sFIRST,

KEEP GOING

PASFLG

B8M
DLEFT
BR

12%
DBEMSK
+2
9
DBEMSK
18

sLAST BIT ?

;MINUS = BIT 31

IF #SW11 SET.IN @SWR THEN GOTO 10%

IF QVFLAG IS TRUE THEN GOTO 10%
TST
SBEMSK
+2
;LAST BIT IN THIS MASK ?
BM]
;BR [F LAST BIT
DLEFT
JMP
TST8
PASFLG
sFIRST PASS ?
118
BR_IF SECOND
PASFLG
;INDICATE SECOND PASS COMING

T12A
#BIT7 ,PASFLG
TSTDAT
TSTDAT+2
#40, SBEMSK

#100,DBEMSK
#3740, CHECK
SBEMSK ,R?

R2. CHECK

DBEMSK ,R2
R2. CHECK
DBEMSK

002250
002244

002244
002250

002250

000000
000207

108:

004000

002362

J 2
PAGE 280

8$:

002252

005737

14:13

UPPFLG

000636

9609 033750
9610 033756
9611 033760

8 034012
9619 034016
$620 034020
9621 034024
9622 034026

TSTB

002257
002256

9587 033604
9588 033606
9589 033616
9590 033624
9591 033630
9592 033632
9593 033642
9594 033646
9595 033652
9596 033654
9597 033660
9598 033664
9599 033672
9600 033676
9601 033702
9602 033710
9603 033716

22-APR-81

z§1113,oesnsx
SBEMSK

#81T11,SBEMSK
138

13%:

ECCIDIS

MoV
CLR
CLR

CLRICSR

RETURN

SBEMSK ,DBEMSK
DBEMSK

128

#TESTADD
,R1

a(R1)+
a(R1)

;DISABLE ECC ON 1 SELECTED CSR
sRESTORE TEST ADDRESS
sCLEATM ANY DBE'S FROM TEST

;CLEAR 1 SELECTED MK11 CSR

230

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
MTPO16 WRITE INHIBIT OF WORD WITH DBE
9625 034030

K 2
PAGE 282

22-APR-81 14:13

MTPN17: SUBTST

<<MTP017

s *SUBTEST

MTP017

SRR

AR AR R R AR AR AR

AAR S

AR At

:x(1)
X

RN R

SEQUENCE
HOLDING 1°'S & 0'S TEST>>

AR AR AR AN A AN AR

AR R AN AR AN

AN AN AR ANTRARNARAAACORSY

HOLDING 1°'S & 0'S TEST
iRttt

ittt

stttiatiiatiiadtiiatiiattidsdsd)

THIS TEST CHECKS THE MEMORY FOR THE CAPABILITY

OF HOLDING 1°'S AND 0'S BY WRITING A BACKGROUND
OF 000377 AND READING IT

MEMORY IS WRITTEN USING A BYTE AT A TIME

STEPS 1 & 2 ARE REPEATED WITH A SWAPPED BACKGROUND PATTERN

9632 034030
9633 034034
9634 034036
9635 034042
9636 034046
9637 034050
9638 034052
9639 034054
9640 034056

160000
000377
1$:

9641 034060
9642
9643 034062

9644 034064
9645
9646 034066
9647 034070
9648
9649 034072
9650 034074
9651 034076
9652 034100
9653 034102
9654
9€55 034104

THIS TEST WRITES BYTES & READS WORDS
#FJRST ,R1
R1,R4
#LAST+2,RS
#377 R0
:GET THE PATTERN INTO RC

060000

2%:

001401

020104
101372
000303
000300
001763
000207

R3
RO, (R1)+
R3,(R1)+
R1,RS
18

;WRITE A BYTE
JWRITE THE MEMORY WITH THE BYTE STORED IN BAKPAT+1
:COMPARE TEST LOC TO TOP + 2
;BRANCH IF LOWER

MOV

-(R1),R2
RO.R2

;TEST THE MEMORY TO SEE IF IT CONTAINS

R1,R4

;KEEP ON TESTING THE MEMORY UNTIL

;CHANGE THE DATA PATTERN

cMp

BEQ
PERR2?2

1044456

3s:

RO.R$

SWAB
Movs
MOvB
CMP
BLO

CMP
BHI
SWAB
SWAB
BEQ
RETURN

2$
18

:THE WORD STORED IN BAKPAT

sR1 EQUALS THE LOWEST ADDRESS

:1F THE DATA PATTERN DOES NOT HAVE LOW

; BYTE =0 THEN FALL THRU

231

CZMSDCO MS11-L/M DIAGNOS IC
MTPO17 HOLDING 1°'S
& 0°'S TEST

9658 034106

MACRO M1112

22-APR-81

MTP020: SUBTST
AAAAAES SRR

;*SUBTEST

(AR

9659

9664 034110
9665 034112
9666 034114
9667 034116
9668 034120
9669 034122
9670 034124
9671 034126
9672 034130

9673 034132

;*0F

160201

160204
005711
001002
005714
001401
104453
010314
005011
020100

MTP020

SEQUENCE

MARCHING 1°'S & 0°'S IN CHECK BITS TEST>>

it itddtititzitititzssiztzItIziz
sz
I

MARCHING 1°'S & 0'S IN CHECK BITS TEST
d

il iidladitiitiiiiddiisidditiatiziligessizesTszyessesyy

9676
9677 034136

005711

001002
020314
001401
104452
005014
005011
060201

9685 034156
9686 034160
9687 034162
gggg 034164

060204
020405
001365
000207

9690
9691 034166
9692 034170

005711
001002

9696 034174
9695 034176
9696 034200
9697 034202
998 034204
9699 034206
9700 034210
9701 034212
9702 034214

001401
104453
010314
005011
060204
060201
020405
001365
000207

THE MOS RAMS THAT STORE THE CHECKBITS.

;077 -=> 100 DOWN
MTPA20: SUB
R2.R1

1%:

2$:

101365

000207

9693 034172

s*THIS TEST IS CONCERNED ONLY WITH THE INTEGRITY

gg;g 034134

9678 034140
9679 034142
9680 034144
9681 034146
9682 034150
9683 034152
9684 034154

PAGE 284

<<MTP020

ARAR ALttt

ggg?

9662
9663 034106

14:13

su8
TST
BNE
TST
8EQ
PERR27
MOV
CLR
CMpP

BHI

RETURN

MTPB20:

3s:
48:

005714

BNE
cMP
BEQ
PERR26
CLR
CLR
ADD

MTPA20

3$
R3, (R4)
43
(R4)
(R1)
R2.R1

R2,Ré4
R4 RS
MTPB20

:V177640

V177642
V177644
:V177646
V177650
V177652
V177654
:V177656
2177660
2V177662

;V177664

;V177666
:V177640

V177642
1177644
V177646
V177650
V177652
V177654
:V177656

21ST WORD 0K?
:NO - SKIP

;2ND UORD Ok’
JYES :G0OD= 000000..000000..077

:2ND WORD <= 100000
:CLEAR 1ST WORD
;ARE WE DONE?

;BRANCH IF NOT
:1ST WORD OK?

:NO - SKIP
:2ND UORD OK’
JYES :G00D= 000000.,100000.. 00
;CLEAR 2ND WORD
:CLEAR 1ST WORD

;177660
:V177662
:V177664
:V177666

;TOP + 2 YET?
:NO - LOOP

077 =-=> 100 UP
TST
(R1)
BNE
5%

:V177640
:V177642

:1ST WORD 0K?
sNO - SKIP

BEQ
PERR27
MOV
CLR
ADD
ADD
CMP
BNE
RETURN

V177646
V177650
V177652
V177654
V177656
V177660
V177662
1V177664
:V177666

JYES :600D= 000000..000000,.077
SWRITE 1ST WORD
;WRITE 2ND WORD

TST

5%:
6$:

R3, (R&)
(R1)
R1,RO

2100 -=> 077 UP
TST
(R1)

ADD
CMP
BNE
RETURN
MTPC20:

R2, R4
(RT)
1%
(R4)
2%

(R4)

R3, (R4)
(R1)
R2.Ré4
R2.R1
R4 RS
MTPC20

:V177644

:2ND UORD OK’

JTOP + 2 YET?
:NO ~ LOOP

232

MACRO M1113

CZMSDCO MS11-L/M

MTP0O20

IN CHECK BITS TEST

MARCHING

9705

22-APR-81 14:13

MTPD20:

2100 ==> 0771DOUN

Sus

8%:
9715
9716
9717
9718
9719
9720
9721
9722
9723
9724
9725
9726
9727

034240
034242
034244

034246
034250
034252
034254
034256
034260
034262
034264
9728 034266
9729 034270

000207

005711
001002
005714
001401

R2.Ré
R3. (R4)
78

BEQ

CMP
BHI

(R4)
(R1)
R1,R0
MTPD20

104453

060201
060204
020405
001367
000207

PERRZ26
CLR
CLR
RETURN

MTPEZ20:

;077 UP

(R1)

BNE

BEQ
PERR27
ADD
ADD
CMP
BNE

108

TST

9%:
10$:

sus
CMP
BNE
TST

7%:

M2
PAGE 286

RETURN

(R4)

R2.R1
R2.R4
R4 RS
MTPE20

SEQUENCE

V177640
V177642

V177644
:V177646
$V177650
:V177652
$V177654
1177656
:V177660
V177662
V177664
V177666
:V177640
:V177642

;¢ND WORD OK?

sNO - SKIP
;gg UORD OK’

:600D= 000000..100000.. 00
:WRITE 1ST WORD

:WRITE 2ND WORD

:1ST WORD OK?
sNO - SKIP

V177644
V177646
V177650
V177652
:V177654

egg UORD OK’

sV177660
V177662

sNO - LOOP

1V177656

:GOOD= 000000..000000..077
;TOP ¢ 2 YET?

233

CZMSDCO MS11-L/M DIAGNOSTI C

MTPO20

MARCHING 1'S 8 0°'S

MACRO M1113

IN CHECK BITS TEST

9732 034272

22-APR-81

MTPA21: SUBTST

14:13

N 2
PAGE 288

<<MTPA21

SEQUENCE
MARCHING 1'S & 0'S PATTERN TEST>>

ttttttttttttttittttt*t'ttttttttttttQtttttttttttttttttttttttttttt.tttttttttttttfi

+«SUBTEST

MTPA21

MARCHING 1'S & 0°'S PATTERN TEST

tttttttttttttttttttttttttttttttttttttttttttttttttttttittttt'ttttttt'tttitttt.tt

9733
9734 034272
9735 034274
9736 034276

014100
020200
001401

18:

9739
9740
9741
9742
9743

034302
034304
034306
034310
034312

000311
011100
020300
001401
104444

28:

034314
034316
034320

020401
001365
000207

9037 034300

{

9745
9746
9747
9748
9749

034322

9750 034322

9751
9752
9753
9754
9735
9756
3735
9758
9759
9760

034324
034326
034330

034332
034334
030336
034340
034342

9761 034344

9762 034350

9763 034352
9764 034354

9765
9766
9767
9768
9769
9070

034356
034356
034360
034362
034364

9772 034366
9773 034370
9774 034372
9775 034374
9776 034376
0777
9778 034400
9779 034404
9780 034406
9781 034410

SWAB

MOV
CMP

PERR20

MTPB21:

1$:

020300
001401
104444

CMP

BNE
RETURN

CMP

PERR20

28:

000002

38:

001363

MIPC21:
1$:

011100
020200
001401
104443

28:

000002

3s:

R4,R1
18

V177646
:V177650

2V177656

V177660

V177662

V177664
V177666

;DONE?

*NO = LOOP
SYES = RETURN

(R1) RO ;V177640

R3,R0

(R1)
(R1) ,R0
R2,RO
3s

ADD
CMP

#2,R1
R5.R1
1%

V177642

V177644

V177646

:V177650
:V177652
;V177654
V177656

V177660

;V177662
:V177666

V177670
V177672

:DONE?
*NO - LOOP

SYES = RETURN

;READ,BYTESWAP=-MODIFY,
READ,UP
MOV
(Rl) RO ; 177640

CMP
BEQ

PERR17

000311
011100
020300
001401
104444

(R1)

77642

v177644

(R1) RO V177652
R3,R0
V177654

SWAB
MOV
CMP
BEQ
PERR17

BNE
RETURN

000207

R2,R0’

:READ,BYTESWAP-MODIFY,READ,UP

MOV

BEQ

000311
011100
020200
001401
104443

062701
020501
001363
000207

BEQ

011100

062701

~(R1),RO; v177640

CMP

PERR17

104443

020501

:READ ,BYTESWAP~MODIFY ,READ ,DOWN

MOV

SWAB

2.R0
2

:v177642
:v177644

V177646

MOV
CMP
BEQ
PERR20

(R1) RO v177652
R3.RO
:v177654
33
V177656
V177660

(R1)

V177650

ADD

#2,R1

:V177662

CMP
BNE
RETURN

RS.R1
18

:V177666
V177670
177672

: DONE?
:NO - LOOP
*YES - RETURN

234

CZMSDCO MS11-L/M DIAGNOSTI ¢
MACRO M1113
MTPA21
MARCHING 1°'S & 0'S PATTERN TEST
9784 034412

9785 034412

014100

9787 034416

001401

9786 034414

g;gg 0344620

020300

MTPD21:

1$:

104444

000311
011100

2%:

9796 034434
9797 034436
9798 034440
9799

020401
001365
000207

38:

020200
001401
104443

B 3
PAGE 290

SEQUENCE

:READ BYTESUAP-HODIFY,READ DOWN

MoV

= (R1),RO;
V 7640

BEQ

CMP

PER"20

9790 034422
9791 034424

9792 034426
9793 034430
3;3? 034432

22-APR-81 14:13

SWAB
MOV

R3,R0"

77642

;v177644

V177646

(R1)
;V177650
(R1) RO :V177652

CMP
BEQ
PERR17

R2.RO
3$

:v177654
V177656
V177660

CMP
BNE
RETURN

R4,
R1
18

V177662
V177664
V177666

:DONE?
‘NO = LOOP
*YES - RETURN

235

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
MTPA21
MARCHING
N 4
PATTERN TEST
9802 034442

22-APR-81

<<MTP022

:*SUBTEST

MTP022

000010

PAGE 292

MTP022: SUBTST

SNAARRAR R AR ARARAN AN AN

I4
9808 034442
9809 034450
9810 034460
9811 034464
9812 034470
9813 034472
9814 034476
9815 034502
9816 634502
9817
9818
9819 034505
9820 034510
9821 034516
9822 034522
9823 034530
9824 034544
9825 034556
9826 034564
¥827 034566
9828 034572
9829 034574
9830 034576
9831 034602
9832 034602
9833 034606
9834 034612
9835
9836
9837 034614
9838
9839 034626
9840 034634
9841 034640

14:13

KDIAG=8.

SEQUENCE
REFRESH & SHIFTING DIAGONAL TEST>>

AN RN A AR AN RARRARAN PN RNANRER RN R AN ANNANRARA

(1)
:(2)
:(3)
H

AN AR NN

AR
RS

REFRESH § SHIFTING DIAGONAL TEST

WE WRITE A DIAGONAL PATTERN IN MEMORY (WITH CACHE ON).
IF A REFRESH TEST WE DISTURB ALL ROWS FOR > 2 MS (WITH CACHE ON).
WE READ & CHECK FOR CORRECTNESS THE DIAGONAL PATTERN
(WITH CACHE OFF).

:HOW OFTEN A DIAGONAL STRIPE OCCURS (MUST BE A POWER OF 2)

FO?FEgSQN:E°0}1TO #2

;FOR DATA & COMPLEMENT DATA

LET R2 := ZEROS
LET R3 := ONES

ELSE

LET R2 := ONES
LET R3 := ZEROS

END ;OF IF EVEN
FOR STRIPES := #0 TO #KDIAG-1

104423

;FOR THE NUMBER OF STRIPES

:WRITE LOOP

CACHON
;TURN CACHE ON
LET COUNT := STRIPES
LET R1 := #FIRST
WHILE R1 LOS #LAST
IF COUNT LT #0 THEN LET COUNT := #KDIAG-1

IF #3764 OFF.IN R1
IF CGUNT NE #0

THEN LET COUNT := COUNT - M1

LET (R1) := R2
LET 2(R1) := R2

ELSE
LET

(R1)

LET 2(R1)

:= R3

END ;OF IF COUNT
LET COUNT := COUNT - #1
LET R1 := R1 + #¢4
END ;OF WHILE

;END OF WRITE LOOP

IF DIAGFLAG IS FALSE THEN SCALL REFRESH

sREAD LOOP

106424

LET COUNT := STRIPES
LET R1 := #FIRST
CACHOFF

sTURN CACHE OFF

236

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
MTPO22
REFRESH & SHIFTING DIAGONAL TEST

22-APR-81 14:13

D 3
PAGE 293

9843 034642
9844
9845
9846
9847
9848
9849
9850
9851
9852

034650
034664
034676
034704
034706
034712
034714
034714
034720

9853 034724
9854 034726
9855 034726
9856 034730
9857 034732
9858 034736
9859 034740
9860 034740
9861 034744
9862 034750
9863 034752
9864 034752
9865 034752
9866 034756
9867 034762
9868
9869
9870 034764
9871 035000
9872 035014
9873
9874 035016

#LAST
T #0 THEN LET COUNT := #KDIAG-1
F. Ig R1 THEN LET COUNT := COUNT - #1
¥
( R1)

104443

END ;OF IF R2
LET RO := 2(R1)
IF R2 NE RO
PERR17
END ;OF IF R2

106443

E LSE

LET RO := (R1)
IF R3 NE RO
PERR20
END ;OF IF R3
LET RO := 2(R1)
IF R3 NE RO
PERR20
END ;OF IF R3

104444

END ;OF IF COUNT
LET COUNT := COUNT - m
LET R1 := R + #4
END ;OF WHILE

sEND OF READ LOOP

END ;OF FOR STRIPES
END ;OF FOR EVEN

000207

RETURN

REFRESH:SUBTST
RN

AR AR

J*SUBTEST

035016
035022
035026
035040
035044
035052
035056

<<SUBR

REFRESH DELAY>>

AR AR AR AR AN AT AN

AR AN AN AN R A AR

9875
9876
9877
9878
9879
9880
9881
9882

SEQUENCE

SUBR

AN AR AN

AN R AR AR

A RARN AR AR RN AN RN AN AN RANNNAANRARRNRA

REFRESH DELAY

AR AN

AR AR

RN A AR RA N RN

A RN RNAA RN AR

A AR AR

;DISTURB EACH ROW FOR > 3.2 MS

004737

035066

004737

035066

FOR RO := WNFIRST TO #FIRST+374 BY #4
CALL REFSUB

END ;OF FOR RO
LET RO := #FIRST+BIT14

WHILE RO LOS WLAST+BIT144374
CALL REFSUB

LET RO := RO + #4

END ;OF WHILE

000640
000002

000002

RETURN

REFSUB: MOV

1$:

ADD

COM
COM
COM
CoM
08
Sus

RETURN

#640,R4

#2 R0

- (RO)
(RO)
+
(RO)
(RO)
RG.1$
#2.R0

sTIME FOR A > 3.2 MS LOOP

RN AR AR

AR AR

237

CZMSDCO MS11-L/M DIAGNOSTIC

SUBR

REFRESH DELAY

9897 035116

MACRO M1113

22-APR-81

14:13

MTPA24: SUBTST

<<MTPA24

s*SUBTEST

MTPA24

MALAASARLA

9898
9899
9900
9901
9902
9903
9904

ARAS

AR AR d

AR At

iid

PAGE 296

ettt

SEQUENCE
FAST GALLOPING PATTERN TEST>>

st iititeititiisiiilzeisllIteIsszeatsesssTaTLL.

FAST GALLOPING PATTERN TEST
il

ied

ittt

izttt

IzzZ

LT]

;THE TOTAL TEST (INCLUDING SETUP) IS AS FOLLOWS
: (1)
THIS TEST WRITES THE MEMORY WITH A BACK GROUND PATTERN

:*(2)
o

:*(3)
;*(4)

STORED AT LOCATION BAKPAT

TEST BEGINS AT LOWEST LOCATION BEING TESTED
(LETS NAME IT 'A*)

LETS NAME THE 1ST LOCATION IN THE ROW/COLUMN UNDER TEST AS 'B°'.
SWAPS BYTES FOR LOCATION 'A°.

:*(5)

READS

;*(7)
;*(8)

REPEATS STEPS 5 AND 6 UNTIL 'B' IS GREATER THAN THE
END OF THE BANK _A+2

;#(9)

:*(10)

‘A,

REPEATS

(ADDS 64 DOUBLE WORDS TO 'B‘)

STEPS 3-8 UNTILL

AFTER EXECUTING THE TEST

AND STEPS 1-9 ARE REPEATED
REGISTERS ARE USED AS FOLLOWS

:RO
:R2

:R3
;Ré
;RS

9923 035116
9924 035120
9925 035122
9926 035124
9927
9928 035126
9929 035130
9930 035132
9931 035134

011100
020004
001401
104447

1%:

011200
020003
001401

2$:

9933
9934
9932
993
9937
9938

035136
035142
035144

062702
020205
101764

0 06400

035146
035152

062701
000137

0 00002
0 35156

9932

izi ittt

JUIPAR'S

MOV

CMP
BEQ
PERR23
MOV

3s:

DATA IS COMPLEMENTED

TEST DATA
'B'

BAKPAT
SWAPAT
LAST

(R1) ,RO
RO,R4
28
(R2) ,RO

CMP

RO,RS$

ADD

0400 R2

BEQ
PERR24

104450

°'A' REACHES THE END OF

:V177640
:V177642

V177644
V177646
:V177650

V177652
V177654
:V177656

;READ 'A'
sCHECK ‘A’
:BR IF OK

sREPORT ERROR

;READ 'B'
s CHECK ‘B’

:BR_IF 0K
<REPORT ERROR

:V177660

BLOS

2.RS

V177664
:V177666

;BUMP ‘B’
;AT END YET?
;BR IF NO

ADD
JMP

#2.R1
SNMTPB4

V177670

;BUM

CMP

V177674

:6OTO V177260

THE BANK

238

CZMSDCO MS11-L/M DIAGNOSTIC

MTPA24

FAST GALLOPING PATTERN TEST

9941 035156

9942
9943
9944
9945
9946
ggzg

MACRO M1113

035156
035160
035162
035164
035166

MTPB24: SUBTST

<<MTPB24

s *SUBTEST

MTPB24

THRRERARRRERRR AN

010411
020105
001001
000207
000137

035172

9949 035172

18:

MTPC24: SUBTST

035174
035176
035200
035202
035204

mMov

RRR AR

035136

18:

MOV
CMP
BEQ
PERR23
JMP

FAST GALLOP PART B>
AR

AN T AR

ARA AR

RRR AR

ANRARRARA AR

LI,

;WRITE ‘A’
sDONE?
:BR _IF NO
JYES = RETURN
;GOTO V172360

FAST GALLOP PART (>>

R AT RN AR

MTPC24

:V172260
:V172262
$V172264
:V172266
:V172270

<<MTP(C24
AR AR RN

:KDPAR'S

010102

011100
020004
001401
104447
000137

SEQUENCE

FAST GALLOP PART B

:SDPAR'S
MoV
R4, (R1)
CMP
R1.RS
BNE
18
RETURN
JMP
JUMTP(24

s *SUBTEST

9952
9953
9954
9955
9956

AR AR AR

9950

TRRERRERRARE AR

9951 035172

F
3
PAGE 298

22-APR-81 14:13

AR R R

AR RR RN EANRNANRIRRAA RN

FAST GALLOP PART (

R1,R2

(R1) ,RO
RO,Ré
13
SAMTPA24+20

RRRRR

;V172360

:V172362
:V172364
$V172366
:; V172370
V172372

AR AN

JRESET 'B' <=== 'A'
JREAD ‘A’
;CHECK ‘A’
;BR IF 0K
;REPORT ERROR
1GOTO V177660

ARE

239

CZMSPCO MS11~-L/M DIAGNOSTIC
MTPC24
FAST GALLOP PART C

MACRO M1113

9959 035210

MTF025: SUBTST

<<MTP025

S *SUBTEST

MTP025

MAAARAAASAAd
AR

002240
002242
002240
041722
000003
002362
035304
035526
9969 035260
9970 035264
9971
9972 035270
9973 035272
9974 035276
9975 035302
9976 035304
9977 035306
9978 035314

9979 035320

9980
9981
9982
9983
9984
9985
9986
9987

035324
035332
035336
035342
035346
035352
035360

9988 035364

005237

002272

MOV
CALL

002074

002264

005037
012737

002242
000003
035476

001400
035476
000207

004737

002074
035526
035550

000207

035610

SEQUENCE
INTERRUPT ENABLE TEST>>

ittt

it ilitisdiiisdiistiiadidsdd)

INTERRUPT ENABLE TEST
Rt

TSTDAT
TSTDAT+2

#TSTDAT, SOURCE
CHKGEN

TST
ST

ittt

ettt it atdialiisdtiinddistidsd)

;GENERATE CHECKBITS ON 0,,0

;SETUP PARITY ACTION
sFIRST TEST ADDRESS
sSETUP TRAP DESTINATION
;WRITE DATA & CHECKBITS
SJINITIALIZE 1 SELECTED MK11 CSR
¢ACCESS LOCATIONS FOR DBE TRAPS

a(R1)
a2(R1)
;NONE = GOOD - ACCESS FOR SBE TRAPS
ENA1SBE
;DISABLE TRAPS ON SBE'S FROM 1
ST
a(R1)
ST
a2(R1)

28:
002240

SELECTED CSR

sNONE - GOOD - SKIP

FATAL
INC
CALL
MOV

27
TSTDAT
MTPD2S
#400, TSTDAT

sCHECK FOR CORRECT ACTION ON SBE'S

READCSR

CALL

MTPD2S

INC

CALL

TSTDAT+2
MTPD2S

CALL

MTPD2S

CLR

035454

ARt

MOV
#3 NOPAR
MOV
ATESTADD
,R1
MOV
#18, PARTHERE
CALL
MTPA2S
ECCTINIT

18:

004737

iRt

SRR dd

CLR

000000
000002

002240
035454

AAA

CLR

000000
000002

000404
104426

G 3
PAGE 300

22-APR-81 14:13

002242

MOV

002240

CLR
MOV

002240

MOV

002242

CLR
MOV

002242

MOV

CALL

TSTDAT

x4oo TSTDAT+2
TSTDAT+2
#3,TSTDAT

MTPE2S

sCHECK FOR CORRECT ACTION ON DBE'S
sIN ALL 4 BYTES

01400 TSTDAT

PE2S

rsroAr
43 TSTDAT+2

MTPE2S
11400 TSTDAT+2

PE2S

CLR1CSR
CLR
NOPAR

RETURN

MTPD25: CALL
MTPA2S
ECCIDIS
CALL _ MTPB2S
ENATSBE
CALL
MTPC25
RETURN

sIN ALL & BYTES

;CLEAR 1 SELECTED MK11 CSR
s INDICATE PARITY ACTION
sWRITE DATA & CHECKBITS

sDISABLE ECC ON 1 SELECTED CSR
sCHECK FOR NO TRAPS
;DISABLE TRAPS ON SBE'S FROM 1 SELECTED CSR
sCHECK FOR EXPECTED TRAP

240

004737

035526

004737

035550

104471

104473

004737

035610

004737
000207

035610

104507

0
0
0
0
035546

104475
013771
000207

035550
035556
035562
035566

012737
005771
005771
000207

~ ~J

A4l N
N (¥,]

035570
oo
WW

—t e

D ed d d D

D d d

D o

D D

D o

D e

D d ndd N

8283 o 8822223222223222222222 (=4
o

W NN
N
POPIPNINININ)
= cd ed d b —d D e b
(%) ~ W= O VNN
WN =DV
OIS W
=O

CZMSDCO MS11-L/M DIAGNOST.C
MTP025
INTERRUPT ENABLE TEST

10036 035600
10037 035606
10038
10039
10040 035610

104471

013771

104426

011137
104024

012737
005771
000405
012737
106426

10049 035654

10050

011137
104025

002242

000002

035570

002264

000207

JINITIALIZE 1 SE_ECTED MK11 CSR
sCHECK FOR EXPECTED TRAP
.DISABLE TRAPS ON SBE'S FROM 1 SELECTED CSR
sCHECK FOR EXPECTED TRAP

;WRITE TSTDAT & TSTDAT+2 & CHECKBITS
MTPAZ2S: EccipIs
sDISABLE ECC ON 1
MOV

TSTDAT ,a(R1)

MOV

TSTDAT+2,32(R1)

CB1CSR

RETURN

SELECTED CSR

:WRITE FIRST 16 BITS
:WRITE GENERATED CHECKBITS IN 1
;WRITE 2ND 16 BITS & CHECKBITS

s CHECK FOR NO TRAP OCCURING CONDITION
#18 PARTHERE
MTPB2S: MOV
sSETUP TRAP DESTINATION
TST
a(R1)
:ACCESS LOCATIONS
TST
@2(R1)
RETURN
sNO TRAP - GOOD - RETURN
1%:

002032

SEQUENCE

JWRITE DATA & CHECKBITS
sDISABLE ECC ON 1 SELECTED (SR
+CHECK FOR NO TRAPS

RETURN

000000

READCSR
MOV
(R1) ,ADDRESS

ERROR

SET
RETURN

035624
000000

002264

MTPC25:

035654
000002

002264

18:

002032

H 3
PAGE 302

MTPE2S: CALL
MTPA2S
ECCIDIS
CALL
MTPB25
;ENABLE DBE TRAPS
ECCTINIT
MTPC25
CALL
ENA1SBE
CALL
MTPC25

002240

000000
000002

22-APR-81 14:13

000207

005771

10048 035646

MACRO M1113

2s:

HEADER

s TRAP SHOULD OCCURE

MoV

#18 ,PARTHERE

MOV

#38 ,PARTHERE

TST
BR

a(R1)
$

TST
82(R1)
READCSR

(R1) ,ADDRESS

+25

3%:

RETURN

¢SAVE VIRTUAL ADDRESS

+24

HEADER

TEST

sSETUP TRAP DESTINATION
:ACCESS 1ST LOCATION

:NO TRAP - BAD NEWS - SKIP
:SETUP TRAP DESTINATION

sACCESS 2ND LOCATION

sNO TRAP - BAD NEWS
sSAVE VIRTUAL ADDRESS

SELECTED CSR

241

CZMSDCO MS11-L/M DIAGNOSTIC

MTP025

[INTERRUPT ENABLE TEST

10053 035656

MACRO M1113 22-APR-81 14:13 PAGE §04 3
MTPA26: SUBTST

<<MTPA26

SEQUENCE 242
RANDOM DATA (WRITE)>>

:t'tttt.ttttt"ttttttt't'tttttttttttttt*fitfitt'ttfittfitttfiitttti.tttt.ttttttttfit"

:*SUBTEST

MTPA26

is:

IAMTPC26

RANDOM DATA (WRITE)

:ttttttttttttfitt*ttfitt't*tttittfititt*tttt*tfitfitttttt't't'tttitttttttti*ittttttti

10054 035656

10055 035662
10056 035664
10057 035666
10058 035670

000137

010221
010321
077005
000207

035726

10060 035672

MTPB26:

JMP

V177640

GOTO V172360

MOV
MOV
508
RETURN

R, (R1)+
R3. (R1)+
RO.1$

V177644
V177646
V177650
V177652

SUBTST

<<MTPB26

RANDOM DATA (READ)>>

ttittttttttttttt.'fiittttttfitt*tfitttt'ttfitfittttttittfittttt*tt*tttttttttittltt"t

:*SUBTEST

MTPB26

.DSABL
-ENABL
18:
JMP
P
BEQ
PERR2S
28:
COM
RANODD: 0
cMP
BEQ
PERR2S
3s:
COM
$08
RETURN

AMA
LSB
IMMTPC26
R2, (R1)+
28

RANDOM DATA (READ)

tttttttttt*tttttttttttt*t*ittttttttt't*t'tttttttt**tt'tttttttttttttttiitttttt*t

10061
10062
10063
10064
10065
10066
10067
10068
10069
10070
10071
10072
10073
10074

10075

035672
035676
035700
035702
035706
035706
035710
035712
035714
035716
035722
035724

000137
020221
001401
104451
005127
000009
020321
001401
104651
005167
077015
000207

035726

177764

.DSABL

10076
10078 035726

MTPC26:

(PC)+

R3, (R1)+
3%
RANODD
RO,1$

LSB

V177640
V177644
V177646
V177650
V177652
V177654
V177656
V177660
V177662
V177664
V177670
V177672

-ENABL

AMA

SUBTST

<<RANDOM NUMBER SUBPROGRAM>>

GOTO V172360

FOR ERROR REPORTING

tt*ttttttttttttttttttttttttttttttfitt*tttt'ttttitttttttt*'t**tttttttttt'tttttttt

: «SUBTEST

RANDOM NUMBER SUBPROGRAM

tttttttttt*tttttttttt'ttttttttttttttt*ttttttttt'tttttttt‘tiitittttfiittttttttt't

10079
10080
10081
10082
10083
10084 035726

073427

000007

10088 035740

062705

001057

10085 035732
10086 035734
10087 035736
10089 035744

;CALLER
:
:
:

060305
005504
060204

000240

10091 035746

ASHC

MUST SETUP
MOV
SEEDLO,R3
MOV
SEEDHI .R2
MOV
R3.RS
MOV
R2.R%
#7.R4
V172360

ADD

#1057 ,RS

SUBTST

<<RANDOM NUMBER SUBSUBPROGRAM>>

;

ADD
ADC
ADD

NOP
MTPD26:

R3.RS
R&
R2 R4

V172364
V172366
V172370

V172372
V172376

GOTO V172260

:ttttttttttttt*tttttt*tttttttttQ*tttti'tttttttttittittttttitttttttttttttttttttti

: *SUBTEST

10092 035746
10093 035750
10094 035754
10095 035756

10096 035760

005504
062704
010503
010402

000137

RANDOM NUMBER SUBSUBPROGRAM

:tttttttttttt*ttttt*ttttttttttttittfitttttfitittttttttittttttttt!tttttfitttttt'tttt

047401

035662

ADC
ADD
MOV
MOV

JMP

R4
#47401,R4
RS.R3
R4 .R2

SNMTPA26+4

:V172260
V172262
V172266
V172270

sV172272

GOTO V177644

CZMSDCO MS11-L/M DIAGNOSTIC

RANDOM NUMBER SUBSUBPROGRAM

10099 035764

10100 035764

10101 035766
10102 035770

}8}82 035772

MACRO M1113 22-APR-81 14:13 PAGE §06
MTPO30: SUBTST

<<MT0030

S#SUBTEST

MT0030

SEQUENCE 243
FLUSH OUT DBE'S>>

;tttttttttttttttttttttttt*ttttttttttttttttttttttttt*tttttttt*ttitttt 4232332322224
e

011002

is:

010220
077103

000207

MOV

MOV
S08

RETURN

10105 035774

FLUSH OUT DBE'S

2233222323232232228233232332222222332232222322322232223223223
3223321322132 SRR TR
XS

MTPO31: SUBTST

(R0) ,R2

;V177640

R2, (RO) +
R1.1$

V177642
V177644

<<MTPO31

SOB-A-LONG TEST>>

V177646

:tttttttttttttttttttttttttttttittttttttttttttttttttttttttttttttttttttttttttttttt

*wSUBTEST

MTPO31

SOB-A-LONG TEST

:tttttttt**tttttttttttttttttttttttttttttttfittttttttttttttttttttttttt'tttttittttt

10106
10107 035774
10108 035776
10109 036000
10110 036004
10111 036010
10112 036012
10113 036014
10114 036020
10115 036024
10116
10117 036026

10118 036030
10119
10120
10121
}3}5§

036032
036034
036040
036042

10124 036044
10125 036046
10126 036050
10127
10128

010503

.DSABL
0
08
COM
CMP
BEQ
PERR30
MOV
COM
MOV
;UPDATE
MOV

010504
020537
001001
000207

MOV
CMP
BNE
RETURN

000000
077001
005167
020167
001403
104454
010167
005167
010200

177772
177766

177756
177752

1$:

28:

005725

014344
001376
000752
000056

002472

3$:

AMA

RO,1$
1$
R1,1$
2
R1.1$
1$
R2,R0
MOVE REGISTERS
RS ,R3

(R§) +

RS,RG
RS . a#LINK1
33

MOV
~(R3),=-(R&4)
BNE
38
BR
1
SOBLENGTH=.-MTPO31
LENABL
AMA

:MOVE TERMINATOR
:SOB TILL RO UNDERFLOWS
‘WRITE COMPLEMENT OF S08
*READ & CHECK FOR NOT ‘'so8 RO,DOT'’
20K - SKIP
;CORRECT SOB INSTRUCTION
SREINITIALIZE SOB CONSTANT

:BUMP (SAFELY) BY 2
:DONE?
‘NO - SKIP
SYES

CZMSDCO MS11-L/M DIAGNOSTIC
MTPO31
SOB-A-LONG TEST
10156 036052

MACRO M1113

MTP032: SUBTST

<<MTP032

MAAAAA LSSt

s *SUBTEST

AR A

10157
10158
10159
}8}2?

K 3
PAGE 308

22-APR-81 14:13

AR AR

WRITE RECOVERY TEST>>

MTP032

SEQUENCE

iRt

it atiiia

itttitiiadiiadiiitidsdist]d

WRITE RECOVERY TEST

AR AR R AR AR AR AR AT RN A R AR

A N AR AN

AN AR AN NI AN AN RANARRANANRRRAANRAAARRACAES

sTHE TEST ACTUALLY EXECUTED ALREADY IN THE MEMORY UNDER TEST.
sTH1S CODE INSURES THAT IT CHANGED MEMORY TO HAVE
:1/2 BANK OF #5141
WHICH IS A ''COM =(R1)'" INSTRUCTION AND
:1/2 BANK OF #110
WHICH IS A "JMP (R0O)'*
INSTRUCTION.

10162
10163
10164
10165
10166
10167

036052
036054
036056
036060
036062
036064

012401
020102
001401
104430
077305
013703

10169
10170
10171
10172
10173

036072
036074
036076
036100
036102

020005
001401
104427
077305
000207

10168 036070

012400

13:

002472

2$:

3s:
4%:

MOV
CMP
BEQ
PERRO2
so8
MOV

MOV

cMP
BEQ
PERRO1
S08
RETURN

(R4)+,R1
R1.R2
2%
R3,1$
I#LINKT ,R3

(R4)+,R0

RO.R5
43

R3,3$

2V177640
sV177642
2V177644
2V177646
sV177650
:V177652

sGET DATA FROM LOWER 1/2 BANK
SIS IT #51412
sYES = SKIP
sNO - TAKE ERROR TRAP
;LOOP FOR 1/2 BANK
JRESTORE LOOP SI1ZE

:V177660
:V177662
2V177664
V177666

SIS IT M10?
;YES - SKIP
:NO- TAKE ERROR TRAP
;LOOP FOR 1/2 BANK

sV177656

;CET DATA FROM UPPER 1/2 BANK

244

CZMSDCO MS11=L/M DIAGNOS TIC

MTPO32

WRITE RECOVERY TEST

10176 036104

MACRO M1113

22-APR-81 14:13

MTP033:

SUBTST

PAGE 310

<<MTP033

SEQUENCE
BRANCH GOBBLE TEST>>

:ttttttttttttttttitttttttttttttittttttttttttttt'tttttttttttttttttttttttttttttttt

< *SUBTEST

MTP033

.DSABL
0
BGTEST: 0
BRGOBB: SEC
ADCB
BM]
INCB

AMA

BRANCH GOBBLE TEST

:ttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttt

10177
10178 036104
10179 036106
10180 036110
10181 036112
10182 036114
10183 036116

}8}g§ 036120

10186
10187
10188
10189
10190
10191
10192
10193
10194
10195

000000
000000
000261
105511
100402
105212

000773

B8R

(R1)
18
(R2)

BRGOBB

102401
104461

18:

036126
036130
036132
036134
036136
036140

000242
105212
103402
102001
100401
104461

28:

10198
10199 036142
10200 036144
10201 036150

01070°
162701
010102

4$:
5¢:

10204
10205 036154

010503

;UPDATE MOVE REGISTERS
MOV
RS ,R3

010504

MOV

;858% 036152

10206 036156

10207 036160
10208
10209
10210 036162
10211 036166
}85}§ 036170
10214

10215 036172

10216 036174
10217 036176
10218 036200
10219

10220

000036

005202

020537
001001

001376
005011
000743
000076

;UPDATE
MoV
SuB
MOV

;DONE?

002472

tMP
BNE

000207

014344

SCOND CODES NOT EQUAL TO 1010

INC

005725

RE TURN

6$:

:LOOP 128 TIMES

;NOW CHECK FOR CORRECT CONDITION CODES
BvS
2
:BR IF V-BIT SET (SHOULD BE)
PERR3S
*NO - REPORT ERROR AND ABORT TEST
:COND CODES NOT EQUAL TO 1010
cLv
*CLEAR V-BIT
INCB
(R2)
- INCREMENT HIGH BYTE OF ‘BGTEST'' ONCE MORE
BCS
38
:BR IF C-BIT SET (SHOULD NOT BE)
BVC
3s
:BR IF V-BIT CLEAR (SHOULD NOT BE)
BM]
4
:BR IF N-BIT SET (SHOULD BE)
PERR3S
*NO - REPORT ERROR AND ABORT TEST

036122
036124

}8}39

:MOVE TERMINATOR
:TEST WORD (TWO BYTES)
.
:SET CARRY (T0 BE ADDED TO ‘BGTEST'")
*INCREMENT LOW BYTE OF 'BGTEST'
*BRANCH WHEN BIT? IS SET
.
*INCREMENT HIGH BYTE OF 'BGTEST

TEST POINTERS
PC,R1
#5$-BGTEST,R1
R1,R2

(R§)+

:BUMP (SAFELY) BY 2

RS, a#L INK1
63

:DONE?
‘N0 = SKIP

RS,R4

:MOVE CODE 1

MOV

LOCATION

-(R3) ,-(R4)

BNE
6$
CLR
(R1)
BR
BRGOBB
GBLENGTH=.-MTP033

.ENABL

*YES - RETURN

AMA

;CLEAR TEST WORD 'BGTEST''
*RUN MOVED CODE AGAIN

245

CZMSDCO MS11-L/M DIAGNOSTIC
MTPO33 BRANCH GOBBLE TEST
'0222 036202

MACRO M1113

22-APR-81 14:13

n3
PAGE 311

MTPO34: SUBTST

<<MTP034

s *SUBTEST

MTPO34

R2,(R0)+

RN R AR

AR AR AR RN RN AR RN RN AN

10223 036202
10224 036204

010220
077102

18:

MOV

10225 036210

012401

28:

MOV

000240
077306
000207

3$:

10225 036206
10227 036212
10228 036214
10229 036216

10230 036220
10231 036222
10232 036224

000207

020102
001402
104430

So8

RETURN

cmp
BEQ
PERRO2

NOP
so8
RETURN

SEQUENCE
SOFT ERROR - BACKROUND PATTERN TEST>>

AR R AR RN

R RN R RN AR

SOFT ERROR - BACKROUND PATTERN TEST

R RN AN AR

NN AR AR RN RN

R1,MTP0O34

:V177640
2V177642

(R&4)+,R1

:V177646

R1.R2
3s

R3.2$

RN R RN IR NN RN

V177644

:V177650
2V177652
JV177654

JV177656
2V177660
:V177662

RN RN RN

AR SRR ERANONRAR OO A

AR AR

246

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
MTPO34
SOFT ERROR - BACKROUND PATTERN TEST
10234 036226

22-APR-81

MTP035:SUBTST
AL

;*SUBTEST

R AR AR

036240

000003

002074

000005

002144

036304

002264

0 249 036306
0 250
0 2 51 036310
02
02
02
02
02
02
0 %58 036336
0 59 036342
0 2 60 036344
0 2 61 036350
0262
0 2 63 036362
0264 036366

005037
000207

ittt

ezt

szt

#3 ,NOPAR

MOV

#1$ PARTHERE

TST
MOV

(RO)
RO,ADDRESS

MOV

CALL

036336

002264

BIT
BNE

(ROS.(RO)

R AR AR AN

AN AN RN AR

;SET WRITE WRONG PARITY & PAR.

;WWP TEST LOCATION

PERBNK

READCSR

ERRGEN

Mov

(RO)

#BITO.CSR

3$:

LOADCSR
MOV
#3$,PARTHERE
TST
(RO)
48
BR
MOV
RO,ADDRESS

A H

CALL
PERBNK
END; OF FOR

:CLEAR WRONG PARITY IN MEMORY

ERROR +50

CLR
RE TURN

NOPAR

I A ANR RN

AN R AR

sSET PARITY TRAPS TO RETURN TO 'PARTHERE'’

#BIT10,CONFIG+2(R3)
28

CLR1CSR
MOV
(RO),

iIzTIzzIZSRZI

WORST CASE NOISE PARITY TEST
IR AR AN A AR AN AN AN R AN

TgxbcsgBITZEBITO,CSR

002626

002144

002074

WORST CASE NOISE PARITY TEST>>

ialda

ERROR +50

000001

054704

iRt

SEQUENCE

FOR RO := #FIRST TO #LAST BY #4000

2%:

002932

<<MTPQ35
A

RN R AR AR AR

MOV

18:

104050
004737

MTP035

002032
0564704
002000

N3
PAGE 312

14:13

:RESET PARITY TRAP ACTION

TRAPS INTO CSR

247

CZMSDCO MS11-L/M DIAGNOSTIC

MISC SUBROUTINES

MACRO M1113 22-APR-81 14:13 PAGE 913

10266
10267
10268 036370

.SBTTL
ASAR

SRR

s*SUBTEST
d

0269 036370
036372
036374
036376

—

) wd

0 270
0 271
0 <72
0 27 3
0 274

036400

<<SUBR
AR

AR AN

MoV
Mov
MoV
RETURN

SEQUENCE

MISC SUBROUTINES

REGCOPY:SUBTST
M

(COPY RO TO R4,R1

SUBR

TO R3, & R2 TO R5>>

ittt

idt

it idliddidtiistiiitiistsidds])

COPY RO TO R4,R1 TO R3, & R2 TO RS

RN R AR RN RN R AR AN

AR NN RN AR

AN O NN AR

AR ARR RN

RO,R4
R1.R3
R2,R5

FLIPWARN:SUBTST <<FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS>>
SRR AR

RN AR AR AR A RN R

J*SUBTEST

AR AN S AR AAARA AR AN AN RAARRAINAAAARRARAANRARANRARAN
AR
RARRARR

FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS

:fi‘*.*.**fi*.fi*t't*'****f"fi""fififitfifi.tt.*'*.**t.fl'Q'...*.'Q'.fi"'."t'.".'fi't'
PSS
S

D=
O
£SO

COo00O
WNNWW
OO

0000 0O~~~

N — OV~

e e

SOOOOOO
N RIRORORIR)

275 036400

/4
7
7

002556
177774
000001

002556
002556

000002

002556

000003

002556

3
4

PUSH
INC

000411

0
10296 036514
10297 036520
10298 036524
10299 036526

#°C3,FLIPLOC
#1,FLIPLOC

cMP
BEQ
CLR

03 FLIPLOC
3s
RO

BR
MOV

(3
#401,R0

MOV
MOV

#401,R0
#4601 ,R4

MOV
MoV
MOV
POP

RO,WARN3
RO, WARNS
RO, WARNS
RO

MOV

18:

012700
013704

000401
002554

2%:

3s:

010037

000401
000401
027156
027172
027216
027232

000207

BIC
CMpP
8EQ
cMP
B8EQ

002554

A ¥

RO
FLIPLOC

CLEAR

MOV
BR

MOV

RETURN

13
#2 FLIPLOC

ONES R4

RO.R4

ONES.,R4
(3

RO,WARNZ2

248

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

22-APR-81 14:13

FLIP WASNING CONSTANTS IN WORST CASE NOISE TESTS

10301 036530

C 4
PAGE 314

SEQUENCE

BACKGND:SUBTST

<<SUBR

WRITE BACKGROUND>>

**SUBTEST

SUBR

WRITE BACKGROUND

:WRITES
SAVREG
MOV
MOV
CMP
BEQ
WARNGA: MOV

DATA FROM R2

249

:*tttt*ttfittttttfitt*ttt"tQi'*ttttttt**.ttttt'fitttttititttttttti'*tt'ltttt'tttti.

.'tttttttttttltfitfit*tfit'ti*"tiittttttfitfitttttttitttfitfittitl’tfitt'ttfittttttt't.ttt

10302
10303
10304
10305
10306
10307
10308

036530
036532
036536
036542
036550
036552

104415
012700
012701
022737
001415
012737

10310 036566

004737

10312 036600
10313 036602
10314 036604
10315 036612
10316 036620
10317 036624
10318 036626

104416
000207

10309 036560

012737

060000
040000
000001

003716

000207

027040

027034

026642

002254

10311 036572 012737 000240 027040
012737
004737
104416
000207

000207
026464

177644

MOV

CALL

MOV

RESREG
RETURN
WARNGB: BMOV
WARNG:
MOV
CALL
RESREG
RETURN

#FIRST
RO
#SI1ZE ,R1
#1,PROTYP
WARNGB
#207 MTPO00+4

#MTPH00, SUPDOADD
SUPDO3

,
;WARNING PUTTING 'RETURN'' AFTER WRITE

#240,MTP0O00+4

:RESTORE 'NOP' AFTER WRITE

MTPO0O
#207 ,UIPAR2
SuPDd1

;WARNING PUTTING 'RETURN'' INSTRUCTION AFTER WRITE

CZMSDCO MS11-L/M DIAGNOSTIC
WRITE BACKGROUND

SUBR

MACRO M1113

10321 036630

22-APR-81

PCONFIG:SUBTST
AR

LEAs RS

s *SUBTEST

AR AR

0322
23
24
25

036630
036642
036646
036654

037130

27 036666
Zg 036674

000200
000100

000060
000062
177776
143700

000074

NOOJ:

000060

002526

o
W
o

o
W

(VL iV 1V, [V, 1V 1V (Y,]
[« AV, P
YVIT,NY -—h

d ed o

lolelololelelolole) (elele)
N NN NN NN NN N

037040
037044

000170

10361 037066
}8322 037072
363
10364 037076
10365 037102
10366 037110
10367 037114
18368 037126
1036
10370 037130

TYPE
CALL

MSGO04
TCONFIG

CMP
BGE

037132

013706
042777
117700

037130
000100
143470

000207
000000

#60,LASTBANK
PCONF?2
$CRLF

MSG017

MSGO11

$CRLF
MSG017
MSG012
#60.%2+2
R1
R1,R3

PCONF
2

TYPE
TYPE
TYPE
TYPE
CALL

143472

setTIezasesasy

+SAVE LAST GOOD SP
sKILL ANY OLD INTERRUPT
;LOWER CPU PRIORITY TO 140
;ENABLE KEYBOARD INTERRUPTS

R1,R3

TYPE
TYPE
TYPE
Mov
Mov

CLEAR

004737

itz

MSG003
#60,LASTBANK
NOOJ
#60.,
RO.R4

PCONF1: MOV
MoV

7 037046

itttz

AR AR AR RN N TR A RN RRRA AR R AN AR AN AR AN AN AR ARAA

TKVEC, TKVEC+2,R0
SP ,PCONF
S
#PCONF2, TKVEC

MOV
MOV

CALL

58 037052
59 037056
360 037062

ittt

:1F FAT PAPER ON TERMINAL GOTO 1%
IF #SWé SET.I:OSSHR THEN JUMPTO PCONF1

TYPE

037132

PRINT CONFIGURATION MAP

MSG001
MSG002

TYPE

037032
037036

SUBR

SEQUENCE

PRINT CONFIGURATION MAP>>
i

TYPE
TYPE

TYPE

000360

dadd

#340, TKVEC+2
a$Tk8,RO
#8177 ,PSW
#8IT6,38TKS

CLEAR

037132

<<SUBR
il

MOV
MOV
BIC
BIS

TYPE
CMP
8GE

002526

D 4
PAGE 316

AR AN AR AR AR AN

PUSH
MOV
MoV

30 036702
036706

000060

14:13

PCONF2: MOV

8IC
MOvB
POP

RETURN

PCONFS: 0

:GO TYPE CONFIGURATION (1ST HALF)

sPRINT SPACE(S)
sPRINT SPACE(S)

TCONFIG

#120. RO
RO,Ré

R1,R3

MSGO14
MSGO11
MSG004
MSG012
TCONFIG

;SPACE

PCONFS,SP

sRESTORE STACK

#B1T6,88TKS
8$TkB,RO
RO,TKVEC+2, TKVEC

READ CHAR TO KILL FLAG

sSTACK SAVED HERE!

AN A

250

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR

PRINT CONFIGURATION MAP

MACRO M1113 22-APR-81 14:13 PAGE %18

10373 037132

SUBTST

AA AR

;*SUBTEST
SRR A AR

AR AN

MAAAAE SRR

CALL

SEQUENCE

<<SUBR

TYPE CONFIGURATION>>

SUBR

TYPE CONFIGURATION

iRttt

ittt iiiiiiiasittidadiiidddssdaddissasds

A AR AR

NN AN AR AR RN AR A A AARARAARARRARRAARARRRI

ARl

MOV

#N,RO

MOV

#K.R1

CALL
RETURN

TCONFIG

MoV

MOV

iRt

RO.Ré

R1,R3

idttiiat

AR RN

AARAN

RASROEN

ittt iiitisatiistiidssiadists]

sN=NUMBER OF CHARACTERS
:BACKUP

INDEXPCONSTANT

sBACKU
sACTUAL CALL

cONLY RETURN

;tttttttttttttttfittttttttttttttttttttttt*ttttttfitttttttttttttttttttttttitttttttt

sRRRRR
AR NAL

5
10386
10387
10388
10389
10390
10391
10392
10393
10394
10395

;%% ERROR »=
sk RAARAAR

037132
037136
037144
037146
037152
037154
037160
037164
037166
037170

032761
001403

000001

000402

062701
077014
010400
010301

000004

002624

TCONFIG: TYPE

1%:

2%:
3%:

BIT

BEQ

MSGO0S5

ggITO.CONFIG(R1)

TYPE
BR

MSGO013
38

S08

RO,1$

TYPE
ADD

MoV

MSGO14
#4 ,R1

R4 ,RO

;ERROR ON THIS BANK?
:ND = SKIP
SPRINT *%**
sPRINT SPACE

;BUMP POINTER

sLOOP TILL DONE

R3,R1

sRANKARRAAAS

;%% CPU'S #«

016105
006205
042705
005705

002624

112705

000040

110537

000060
071574

001003

— e

) b i i

\OOD\KB\"&%N*QS:

sNRRARARAARSL

062701
077023
010400
010301

48:

177760

000004

TYPE
MOV

ASR
8IC

Move
BR
ADD

RS
#*C17,R5
RS
8s
#' RS
93
#60,R5

TYPE
ADD
S08
MOV
MoV

015
#4 ,R1
RO.4$
R4 RO
R3.R1

TST

BNE

8¢:
9%:

MSG008
CONFIG(R1)
,R5

MOov8

R5,MSGO15

sGET CPU BITS
¢CLEAR NON INTERESTING BITS
s 1S THERE ANYTHING THERE?
:YES = BRANCH.
sNO - MOVE A BLANK INTO RS
:BRANCH OVER NEXT INSTRUCTION
JMAKE ASCII
sPLUG INTO MEMORY
:BUMP POINTER
;LOOP TILL DONE

251

CZMSDCO MS11-L/M DIAGNOSTIC

SUBR

TYPE CONFIGURATION

MACRO M1113

22-APR-81

14:13

F_
4
PAGE 320

SEQUENCE

10422

JRRRRRANNRARAARES

10423

;%% INTERLEAVE =+

10425 037250

TyPE

MSG007

BIC

#4C170000,RS

sGET CSR INTERLEAVE

#60.RS

sMAKE ASCII

1042+«

JRNARRRERANRARANR

10426
10427 037254
10428 037262
10429 037264
10430 037272
10431 037274
10432 037302
10433 037304
10434 037312
10435 037314

032761
001014
032761
001004
112737
000424
112737
000420
016105

10437 037324
10438 037326
10439 037332
10440 037336
10441 037340

000305
072527
022705
100C02
062705

10443
10444
10445
10446
10447
10448
10449
10450

110537

10436 037320

10442 037344

037350
037354
037360
037370
03, 574
037376
037400

042705

062775
062701

077051
010400
010301

010000

002626

000002

002624

000040

071574

000055

071574

002624

007777

:THIS IS AN ENTRY POINT FROM ERROR REPORTS
TCFIG1: BIT
#BIT12,CONFIG+2(R1)
BNE
1$
BIT
#8IT1,CONFIG(RT)
;1S THERE ANY MEMORY HERE?
BNE
188
;BRANCH IF MEMORY PRESENT.
MOvB
#' ,MSGO15
cMOVE A BLANK IN TO BE PRINTED
BR
168
sBRANCH TO TYPE ROUTINE
18S8:
MOVB
#'-,MSG015
BR
16%
1%:
MoV
CONFIG(R1) ,RS

177774
000012
000007

000060

28:

071574

16$:

000004

SWAB
ASH
CMP
BPL
ADD

ADD

RS
#=4 RS
#10..R5
23
#7 RS

MOVB
R5,MSG015
TYPE
MSGO15
IF NOTAB NE #0 THEN SRETURN
ADD
#4 ,R1
so8
RO,TCFIGT
Mov
R4 RO
mov
R3.R1

10451

JHRRRAAAAARNREAARS

10453

JENRARRARRARANRRNEN

10452

;BUMP POINTER

sLOOP TILL DONE

;%% MEMORY TYPE ¢+

10454
10455 037402
10456 037406
10457 037414
10458 037416
10459 037422
10460 037424
10461 037430
10462 037432
10463 037434

10464
10465
10466
10467
10468
10469
10470
10471
10472
10473
10474
10475
10476
10477
10478

sPLUG INTO MEMORY

037440
037442
037450
037452
037456
037460
037464
037466
037474
(37476
037504
037506
037512
037514
037522

033761
001447
016105
000305
042705
005705
001440
032705
001004
112737
000434
032705
001013
032705
001004
112737
000422
112737
000416
032705
001004
112737
000407

002104

002624

002626

177770
000004

000102

071574

000002
000001

000115

071574

000113

071574

000001
000114

071574

.ENABL
TYPE
TCFIG2: BIT
BEQ
MoV
SWAB
8IC
TST
BEQ
BIT
BNE
Move
BR
48:
8IT
BNE
BIT
BNE
MOv8
BR
S5$:
MOv8
BR
6S:
BIT
BNE
MOv8
BR

LSB
MSG009
CPUBIT,CONFIG(RT)
178
CONFIG+2(R1)
,R5
RS
#*C7 RS
RS
17%
#BIT2,RS
43
#'B,MSGO15
8s
#BIT1,RS
63
#BITO,RS
5%
#°'M,MSGO15
8s
#'K,MSG015
8s
#BITO,RS
’$
#'L,MSGO15
8s

:GET MEMORY TYPE
:CLEAR NON INTERESTING BITS

252

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR

TYPE CONFIGURATION

10479 037524

MACRO M1113

000120

071574

7%:

000040

071574

17%:
8s:

000004

10485 037562
10486 037564
1048; 037566

22-APR-81 14:13
MOVB

B8R

MOVB

TYPE

G &4
PAGE 320-1

#'P,MSGO15

,MSGO15

MsG6015

IF NOTAB NE #0 THEN SRETURN
#6,R1
RO.TCFIG2
R&.RO
R3.R1

ADD
OB
MOV
MOV
.DSABL

SEQUENCE

;BUMP POINTER
;LOOP TILL DONE

LSB

sRRRRARRAN

2
10493 037570
10494 037574
10495 037602
10496 037606
10497 037612
10498 037614
10499 037620
0500 037622
0501 037626
1 0502 037630
0503 037634
1 0504 037640
0505 037644

;%% (SR wx
sRRANARRAN

112737
016105
032705
001414
042705

071574

170377

110537

000007
000060
071574

108:

168:

b o

1
1
;

1 037722

062701
077026
010400
010301
000207

BIC
SWAB
CMP
8PL
ADD

#C7400,RS
RS
#10. RS
108
#7 RS

MOVB

RS,MSGO1S

ADD

#60,RS

TYPE

M5G015

ADD

#4,R1

MOV

R4 .RO

IF NOTAB NE #0 THEN SRETURN

S08

MOV

002624

000402

1
1

000004

,MSGO1S

RO.TCFIG3

sMAKE ASCII
sPLUG INTO MEMORY

;BUMP POINTER
;LOOP TILL DONE

R3.R1

ixx PROTECTED *+

1
1

CONFIG(R1)
RS
#8IT1,RS
168

:ttttttttttttttt

MoV
BIT
BEQ

;ttt*ttttttttttt

PON) =

d b d e

d ceed e

0 037670

NO VNS WNWNN —

1
1

062701
077035
010400
010301

MSG016

TCF1G3: mMove

000012

000040
002624
000002

TYPE

000120

.
071574

000100

002624

000111

071574

000004

11$:

128:

138
148:
15$:

TYPE
TSTB
BPL

MOVB
BR
BIT
BEQ
MOVB

MSGO10
CONFIG(R1)
12$

#'P,MSG01S
13$
#BIT6,CONFIG(RT)
14$
#'I ,MSGO15

TYPE

MsGO15

TYPE
ADD
S08
MOV
MOV

M56014
#4 ,R1
RO.11S
R4 .RO
R3.R1

B8R

15$

sBANK PROTECTED?

;N0 ~ SKIP

sPROTECTED REGION OF ECC?

:NO - SKIP

sPRINT SPACE
;BUMP POINTER
sLOOP TILL DONE

253

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP

PARITY ERROR HANDLER

MACRO M1113

10533

22-APR-81 14:13
.SBTTL

H &4
PAGE 322

TRAP

SEQUENCE

PARITY ERROR HANDLER

10534

,'ttttfitttttttttttttttttt*tttttttttttttttttttttttttttt!ttlt*'tttt*ttttttttttttttt

10535
10536

:VECTOR TO HERE FROM TRAPS TN 114
;IGNORE ERRORS BUT COUNT IF NOPAR FLAG = 1.

10538
10539
10540
10541
10542
10543

:
;
;
:
:
N

10537

}822?

10546 037760
10547 037766
10548 037770
10549 037774
10550 037776
10551 040006
10552 040006
10553 0640014
10554 040020

022737
001003
(05237
000002
022737
001013

10556 040032

000002

10555 040024

10557 040034
10558 040042

10559
10560
10561
10562

AR AN R

040044
040050
040052
040056

004737
063716

042766

022737
001003

013716
000002
004737

000001

002074

PARITY:

002074

1$:

002070
000002
040166
002276

000004

000002

000003

002074

CODE
———

0
1
2

CMP
BNE
INC
RT]
CMP
BNE
SET
CALL
ADD

BIC
2%:

002264
040166

R R AR AN AR RN N RN AR R

3s:

RT]

CMP
BNE
MOV
RTI
CALL

FATAL

AR AR AR AR AR

AR AR AN RN RN RN AN AN

A NN RN RNANANRAS

ACTION
PRIRTTUNEXPECTED PARITY TRAP
COUNT ERROR
SET 'ABORT'*
/ SETUP ‘'BADPC'®' / RETURN VIA PCBUMP

RETURN VIA ‘''PARTHERE''

#1 ,NOPAR
1%
PARCNT

;COUNTING PARITY ERRORS?
JNO - SKIP
JPARITY ERROR COUNTER + 1

#2 .NOPAR
s
ABORTFLAG
BADSTACK
PCBUMP, (SP)

JACTION CODE = 2 ?
:NO = SKIP
JYES
JFIND BAD SP,PC,PSW OFF STACK
;UPDATE RETURN PC

#3 ,NOPAR
3s

;ACTION CODE = 3 ?
INO - SKIP

BADSTACK
32

JFIND BAD SP,PC,PSW OFF STACK

#BIT2,2(SP)

PARTHERE, (SP)

;SHOW FAILURE BY .NE.

254

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP

NON-EXISTANT MEMORY

0578 040110
579 040114
040116
040122
582 040126

PRe2Es
ffitfld - O

[eleolalelololeleols)

o el
Y S P
3

~
~

10565
10566
10567
10568
10569
10570
10571
10572
10573 040064
105
0072

(HOLES)

HANDLER

22-APR-81

14:13

.SBTTL

TRAP

022737
001011
005237
022737
001002
010037
000002
005237
012701
000002

000001

002076

002066
000001

002066

004737

2$:

S?Y

Rttt

ittt

LTSS

ittt iitgdiilidissidiatiidtdiiisdiisislds)

RO,ADDRESS

JASSUME RO CONTAINS THE ADDRESS ACCESSED

NEMCNT

¢BUMP NON-EXISTANT MEMORY COUNTER

:NO - SKIP
;BUMP NON-EXISTANT MEMORY COUNTER
sFIRST ERROR?
:NO - SKIP

#1.R1

;DUMMY UP R1

FOR A FORCED SOB EXIT

s RN AR

AN AR AR AR

RN RN

004737

040166

.SBTTL
PDP1105:E:#&L

AR R RAA AR I AN RN AR AN RN AR RN AR

TRAP
RESERVED INSTRUCTION HANDLER
gADSTACK
<FIND BAD SP,PC,PSW OFF STACK

AR AN AR AR A AN

s *SUBTEST
R

MOV

ADD
MoV

MOV
RETURN

RARANA A

TRAP
MEMORY MANAGEMENT (TRAP TO 250) HANDLER
9ADSTACK
sFIND BAD SP,PC,PSW OFF STACK

BADSTACK:SUBTST <<FIND BAD SP, PC, & PSW FROM STACK>>

002024
002020
002039

FROM TRAPS TO &

040154
040160

002024
000002
000002
000004

TRAP
TIMEGUT (TRAP TO 4) HANDLER
gADSTACK
;FIND BAD SP,PC,PSW OFF STACK

040166

010637
062737
016637
016637
000207

.SBTTL
TIHEOUT:gfi%kL

004737

040172
040200
040206
040214

¢ COUNTING NON-EXISTANT MEMORY ERRORS?

INC

E?Y

10604
10605
10606
10607

L L

#1 ,NONEM

23
NEMCNT
#1 ,NEMCNT
1%

040142
040146

10603 040166

Aol

BNE
INC
CMP
BNE

.SBTTL
MMTRAP: E:%kL

10601

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

NONEXIST: CMP

002066
000001

10602 040166

IR AAL AR

SEQUENCE

NON-EXISTANT MEMORY (HOLES) HANDLER

(SOMETIMES)

002032

040166

I_4&
PAGE 324

:VECTOR TO HERE

:
i 1)
. 2)

586 040130
587 040134

10590
10591
2
10593
1059?

MACRO M1113

A R

RN R

AR AR AR AN AR AR R AR

AR AR AR AN AN

FIND BAD SP, PC, & PSW FROM STA(K
I

SP ,BADSP

#2 ,BADSP
2(SP) ,BADP(

4(SP) ,BADPSW

RN AR

sRIIT,

RN RN AR

RAR

255

CZMSDCO MS11-L/M DIAGNOSTIC

KERNEL TRAP HANDLER

22-APR-81

14:13

.SBTTL

TRAP

d
D o e

:KERNEL
ML

b i
D cd o
D

SEQUENCE

KERNEL TRAP HANDLER

042766

000002

140000

000002

040226
04023¢

052737
000002
042737
000002

000001

177572

IS A TRAP THAT COMES HERE

ALAL LR

Rttt

SKERNEL:RTI
R

3 040236
2? 040244

WWNWNWNINININ
W
=O
o

ARl

BIC

AR AR AR R A AN

.SBTTL
SENERGIZET?IS

177572

005737
001406
013737

1 040270

000002

7 0640246
8 040252
9 040254

34 040272

052737

002514
002514

000001

177746
177746

.SBTTL
$CACHN: TST
BEQ
MOV
1
g%?

32 040276

001403

002514

37 040300
38 040306

053737
000002

002520

$CACHF:
177746

1$:

it aiistiiiitiziisizezszezssissIzTI
Iz

A AR AR A AR AR R AR R R R R R R

AN AR AN R A AN AR AN AR AN

RN A AR AR AR R AR AR AR AN AN A AR

.SBTTL
TRAP
DEENERGIZE
SDEENERGIZE:BIC #81T0,MMRO
TN

AN AR

RES

RARANANRNRRRAA

TRAP HANDLER

AR AR RN AR AR AN AN RN AR AR AR RN RN N AN AR

AN RA AR NN AN

AN RN RARARARRNRAANNARARNRARIRNRCARN
R AR ARS

SBTTL
TRAP
CACHOFF TRAP HANDLER
TST
CACHKN
:1S THERE A CACHE?
BEQ
18
:NO - RETURN
:DISABLE TRAPS (NOT ABORTS), FORCE MISSES, FLUSH, BYPASS
8IS
CACHKF
, CONTRL
RTI

AARAANNRARRIRAS

TRAP
CACHON TRAP HANDLER
CACHKN
21S THERE A CACHE
18
sNO - RETURN
CACHKN,CONTRL
;SETUP CACHE AS PER CONSTANT (USUALLY 1 = FULLY ON)
#BITO,CONTRL
;DISABLE TRAPS (BUT NOT ABORTS)

SRR AR RN AR A AR AR R AN AR AR

005737

TRAP
ENERGIZE TRAP HANDLER
#BI1T0,MMRO

SRR RA RN R AR AR RN AR AN AR AR

000001

#140000,2(SP)

SRR AR R AR RN AN R AR R R AR AR

(=]

b e o
D D od D
D o el i
el o
)
d o
b

J_ &
PAGE 326

ttttt*tttttfittttttttttiittttttttttttttttt*ttttttttttttttttttttttfittttttt'tt..tt

SRXXRRERRIIFIIIR SEKXREEKIEK

(=4
o
POPNOPNOININD
= cd b cd D e d e d cad b
N~ OV NOWVIS
NN —O

TRAP

MACRO M1113

256

CIMSDCO MS11-L/M DIAGNOSTIC
TRAP

LOAD CSR TRAP HANDLER

MACRO M1113

10641

10661
10662
10663
10664
10665
10666

jeleolels]
NN
NNOO
oOoNO

o0
N
(=1
W
s
on
B

040402

040404
040406
0406412
040420
060422

K_4&
PAGE 328

SEQUENCE

.SBTTL
TRAP
LOAD CSR TRAP HANDLER
:LOAD CORRECT CSR WITH DATA IN (SR
:PROGRAM CSR'S ASSERT INHIBIT MODE POINTER WHEN LOADED

013700

002146

005737

002502

100007
113701

(=lelele)

oo O~NOAWNV

l=l=]
o

—

ViAWY

—

2222222022

10644 040310
10645 040314

22-APR-81 14:13

042701
020137
001404
123737
001003
052737
013760

$LOADC: PUSH
MOV

RO,R1
CSRNO,RO

s SAVE REGISTERS
< CREATE CSR ADDRESS

PGMCSR

¢PROGRAM IN INTERLEAVED SPACE?

IF _INHECC IS TRUE THEN GOTO 3$

TST

BPL

002503
177740
002146
002502

002146

020000
002144

002144

172100

000002

MOov8
BIC
cMP
BEQ

1$
PGMCSR+1,R1
#4C37 ,R1
R1,CSRNO
2$

BIS

#8IT13,CSR

.SBTTL

TRAP

CMPB
BNE
MOV
:??

PGMCSR, CSRNO
3$

CSR,CSRADD (RO)
R1.RO

DON'T WANT INH. MODE POINTER ON

sBRANCH IF NOT

cCHECK SECOND CSR
sCLEAR UNNECESSARY BITS
:1S THIS THE CURRENT CSR?
¢BRANCH IF IT IS
¢1S THIS THE CURRENT (SR?
¢BRANCH IF NOT

sSET THE INHIBIT MODE POINTER TO

¢LOAD THE CSR
sRESTORE REGISTERS

READ CSR TRAP HANDLER

;READ THE CORRECT CSR INTO LOCATIONS CSR

013700
016037
000002

002146

172160

002144

$READC: PUSH
MOV
MOV

arp

RO
CSRNO,RO
CSRADD (RO) ,CSR

JREAD IT

1ST 16K

257

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP

TEST

(R1)

8
69 040424

70 040432

MACRO M1113

& READ (SR CAREFULLY

012700

.SBTTL
$TSTRD: PUSH
MOV

172100
002146

ADD

002502

5
0686 040522

002146

10692 040570

10693 040572
10694 0640600
10695 040600
10696
10697 040602
10698 040604
10699 040612
10700 040614
10701 040622
10702 040626

CSRNO,
R

8IC
CMP
BEQ

#8177 ,R3
Rz.CSRNO
2

CMPB

BNE
MOV

PGMCSR
1$
PGMCSR+1,R3

2GMCSR,CSRNO

020000
000001
040602

CMP
BEQ
CALL

004737

177640

8MOV
CALL

#BIT13,R2
#1,PROTYP
43
TSTRD1
5%
TSTRD1
FASTCITY

POP

R3,R2,R0

ELSE
BIC

#8170,2(SP)

003716

000001

000002

042766

000001

000002

000002
010210

0110
000207

002144

;IS THIS AN 11/44?
sBRANCH IF IT IS

;CALL TO THE USER INSTRUCTION PAR'S

;IF SINGLE BIT ERROR ONLY =~ SET CARRY BIT

052766

140000
043737
37

SEQUENCE

TRAP
TEST (R1) & READ CSR CAREFULLY
RO,R2.R3
#CSRADD RO
;CREATE CSR ADDRESS

012702
022737
001403
004737
000405

040534

10690 040542
10691 040562

L_&
PAGE 329

CLR

ST
BPL
movs

002503
000200
002146
002502

22-APR-81 14:13

177776

IF #BIT4 SET.IN CSR AND #BIT15 OFF.IN CSR
#BIT0,2(SP)
BIS

S?? :OF IF #BIT4
TSTRD1: MoV
RZ. (RO)
TESTAREA
TST8
(R1)

:V177640

MOV
RETURN

2V177656
sV177662

BIC

#BIT15!BIT14,PSW
(RO) ,CSR

:V177642 ;ENTER SUPERVISOR MODE
sV177646

2V177650

258

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
TRAP
ECC DISABLE ALL CSR'S TRAP HANDLER

22-APR-81 14:13

L )
PAGE 331

SEQUENCE

10705
10706 040630
10707 040636
10708 040642

012737
004737
000002

000002
0641354

002144

.SBTTL
SECCDIS:MOV
s#%L

10711 040652
2 0460654

012737
104425
000002

000002

002144

.SBTTL
1RAP
ECC DISABLE OF 1 SELECTED CSR TRAP HANDLER
SECCIDIS:MOV
#BIT1,CSR
k??DCSR

040656
040664
040670

012737
004737
000002

000001
0641354

002144

.SBTTL
SECCINIT:MOV

TRAP
INITIALIZE ALL CSR'S TRAP HANDLER
#BIT0,CSR

040672
040700
040702

012737
104425
000002

000001

002144

.SBTTL
SECCVINIT:MOvY

TRAP
INITIALIZE 1 SELECTED (SR TRAP HANDLER
#BITO,CSR

040704
10723 040712
040716

012737
004737
000002

000003
041354

002144

SENASBE :MOV

10726 040720
10727 040726
10728 040730

012737

000003

002144

SENA1SBE :MOV

013737
052737
004737
000002

002274
000006
041354

202144
002144

$CBCSR: MOV
8IS

013737
052737
104425
000002

002274
000006

002144
002144

$CB1CSR:MOV
CHECK,CSR
?éiDCSR #BIT1!BIT2,CSR

b o

b e

[e]leleleleleolalolelola]

~ NN N VNNNSN NN
ok md
N POPD = md ved b e
N = OO0 ~NOVIS W

10709
10710 040644

10729

10730 040732
10731 040740
10732 040746
10733 040752
10734
10735 040754
10736 040762
10737 040770
10738 040772

104425
000002

g?EL

k??DCSR
.SBTTL

g?%L

.SBTTL

%??DCSR
.SBTTL

TRAP
ECC DISABLE ALL CSR'S TRAP HANDLER
#B81T1,(CSR
CSROUT

CSROUT

TRAP

ENABLE SBE PARITY TRAPS ON ALL CSR'S

#BIT0!BIT1,CSR
CSROUT

TRAP

ENABLE SBE PARITY TRAPS ON 1

TRAP

WRITE CHECKBITS THRU ALL CSR'S TRAP HANDLER

#BITO!BIT1,CSR

CHECK,CSR
#BIT1!8IT2,CSR

g?%L CSROUT

.SBTTL

RT!

TRAP

SELECTED (SR

;BITS 115
s CHECK MODE

WRITE CHECKBITS THRU 1

SELECTED CSR TRAP HANDLER

;B8ITS 11-5
¢ CHECK MODE

259

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP

22-APR-81

14:13

fiathL

;?AP

WAS THERE A SBE ON ANY (SR TRAP HANDLER

107461
10742 040774
10743 041000
10744 041004

10745 041006
10746 041006

10747 041012

10748 041014
10749 041016
10750 041020
10751 041030
10752 041034
10753 041036
10754 041036
10755 041036
10756 041042
10757 041060
10758 041060
10759 041062
10760 041066
10761 041070
10762 041076
10763 041100
10764 041106
10765 041106

10766

MACRO M1113

013701
005004

SWASSBE:

002216

MOV

N__4
PAGE 333
WAS THERE A SBE ON ANY CSR TRAP HANDLER

TOTCSRS,R1

CLR

SEQUENCE

;GET CSR'S BYTE

BEGIN LWSBE

€OR CSRNO := #0 TO #36 BY #2

006301

ASL
ON.ERROR
READCSR

104426

IF #8IT4 SET.IN CSR

SET
R4
LEAVE LWSBE
END ;OF IF #BITé
END ;OF ON.ERROR

IF R1 EQ #0 THEN LEAVE LWSBE

END ;OF FOR CSRNO
END LWSBE
ROR
Ré

006004

052766

000001

000002

042766

000001

000002

000002
104426
042766
032737
001403
052766
000002

POP
R4 ,R1
ON.ERROR
BIS
#B81T70,2(SP)
ELSE

;SET C BIT FOR ERROR

#8IT70,2(SP)
BIC
S¥? ;OF ON.ERROR
.SBTTL

TRAP

WAS THERE A SBE IN 1

SELECTED CSR TRAP HANDLER

:ON RETURN IF CARRY IS SET THERE WAS A SBE

000001

000020

000002
002144

000001

000002

$WAS1SBE :READCSR
8IC
#B170,2(SP)
BIT
#BIT4,CSR
BEQ
1%
BIS
#BIT0,2(SP)
RTI
1%:

;CLR C BIT ON STACK

;SET C BIT ON STACK

260

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP

10790 041202
10791 041206
10792 041224

10799
10800
10801
10802
10803
10804

10805
10806
10807
10808

10809

22-APR-81

WAS THERE A DBE ON ANY CSR TRAP HANDLER

10776
10777 041140
10778 041144
10779 041150
10780 041152
10781 041152
10782 041156
10783 041160
10784 041162
10785 041164
10786 041174
10787 041200
10788 041202
10789 041202

10793
10794
10795
10796
10797
10798

MACRO M1113

041224
041226
041232
041234
041242
041244
061252
041252

061254
041256
041262
041264
041272
041274
04130

013701
005004

B.5S
PAGE 335

.SBTTL
TRAP
WAS THERE A DBE ON ANY (SR TRAP HANDLER
$WASDBE : PUSH
R1,R4
MoV
TOTCSRS ,R1
;GET CSR'S BYTE
CLR
R4
BEGIN LWDBE
FOR CSRNO := #0 TO #36 BY #2
ASL
R1
ON.ERROR
READCSR
IF #BIT15 SET.IN CSR
SET
R4
LEAVE LWDBE
END ;OF IF #B1T4
END ;OF ON.ERROR

002216

006301
104426

006004
052766

000001

000002

042766

000001

000002

104426
005737
100004
052766
000002
042766
000002

14:13

002144
G00001

000002

000001

000002

IF R1 EQ #0 THEN LEAVE LWDBE
END ;OF FOR CSRNO
END LWDBE
ROR
Ré
+SET C BIT FOR ERROR
POP
R4 .R1
ON.ERROR
BIS
#BIT0,2(SP)
ELSE
BIC
#BIT0,2(SP)
END .OF ON.ERROR
RTI
.SBTTL
TRAP
WAS THERE A DBE ON 1 SELECTED CSR TRAP HANDLER
;ON RETURN IF CARRY IS SET THERE WAS A DBE
$WAS1DBE :READCSR
TST
CSR
;DBE?
BPL
33
:NO - SKIP
BIS
#BI1T0,2(SP)
;SET T BIT ON STACK
RTI
3$:
8IC
#BIT0,2(SP)
;CLR C BIT ON STACK
RTI

SEQUENCE

261

CIMSDCO MS11-L/M DIAGNOSTIC
TRAP

MACRO M1113 22-APR-81 14:13 PAGE 537

SEQUENCE 262

CLEAR ALL ECC CSR'S TRAP HANDLER

10812
10813 041304
10814 041310
10815 041314
10816
10817 041316
10818 041322
10819 041324
10820
10821
10822 041326
10823 041334
10824 041340

10825
10826

004737
000002

104425

000002

052737
004737
000002

10827 061342

052737

10829 041352

000002

10828 041350

041354

104425

000006
041354

000006

002144

.SBTTL
TRAP
CLEAR ALL ECC CSR'S TRAP HANDLER
$CLRCSR:CLEAR
(SR
CALL
CSROUT
RTI
.SBTTL
TRAP
CLEAR 1 SELECTED CSR TRAP HANDLER
$CLR1CSR:CLEAR
(SR
LOADCSR
RTI
.SBTTL
TRAP
ECC DISABLE, CHECK MODE, & WRITE CHECKBITS IN ALL CSR'S TRAP HANDLER
:CHECKBITS ALREADY IN LOC "‘CSR’
$CHKDIS:BIS
#BIT1!BIT2,CSR
;ECC DISABLE & DIAG CHECK MODE
CALL
CSROUT
RTI

002144

.SBTTL
TRAP
ECC DISABLE, CHECK MODE, € WRITE CHECKBITS IN 1 SELECTED CSR
:CHECKBITS ALREADY IN LOC '‘CSR'

$CHK1DIS:BIS

LOADCSR

RTI

#BIT1!BIT2,CSR

;ECC DISABLE & DIAG CHECK MODE

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP

ECC DISABLE,

CHECK MODE,

MACRO M1113

22-APR-81 14:13

& WRITE CHECKBITS IN 1

10832 041354

D5
PAGE 339

SEQUENCE

SELECTED

CSROUT: SUBTST

<<SUBR

WRITE IN ALL CSR'S>>

*«SUBTEST

SUBR

WRITE IN ALL CSR'S

"tfittt*ttttit*ttt*t**ttti*iti'ittfit*tt'ttt'ttttttit*ttttttt*tttttttt'tt*ttt'fit't

"ttt*tttttttttttfi.ttttQttt'ttt*tttttttttttfitttttfit**tttttttttttfit*fifittttt"tt'tt

10833 041354
10834 041356
10835 041362
10836 041362
10837 041366
10838 041370
10839 041372
10840 041374
10841 041374
10842 041400
10843 041416
10844 041416

10845 041420

013701

PUSH
R1
MOV
TOTCSRS,R1
:GET CSR'S BYTE
BEGIN LCSROUT
FOR CSRNO := #0 TO #36 BY #2
ASL
R1
ON. ERROR
LOADCSR
END ;OF ON.ERROR
IF R1 £Q #0 THEN LEAVE LCSROUT
END ;OF FOR CSRNO
END LCSROUT
POP
R1

002216

006301
104425

000207

RETURN

10847 041422

$INVALID:

SUBTST

<<TRAP

INVALIDATE BACKGROUND PATTERN>>

"ttttttfiitttttttttt*tttt'tttttttttt*ttttt**tttttttt*tttifi*'ttttttttttt'ttfitt'ttt

*«SUBTEST

TRAP

INVALIDATE BACKGROUND PATTERN

"t*tittttttttttittttttttitt'ttttttttiti**tifi*tttttttttt*tttittttttttttttttt't't'

10848 041422
10849 041426
10850 041432
10851 041434
10852 041436
10853 047444
10854 041450

013701
006301
006301
042761
000002

002100
020000

002626

PUSH
MOV
ASL
ASL
BIC
POP
RTI

RO,R1
BANK,R1
R
R1
#81T13,CONFIG+2(R1)
R1,RO

263

CZIMSDCO
MS11-L/M
DIAGNOSTIC
MACRO M1113 22-APR-81 14:13 PAGE §40
TRAP
INVALIDATE BACKGROUND PATTERN
10856 041452

$ERRGEN:

SUBTST<CTRAP

+%SUBTEST

TRAP

SEQUENCE 264
GENERATE AND TEST ERROR ADDRESS>>

tttttttttttttttttttfittttttttttt*ttt'ttttttfitttttttttttttttttttttttttttttttttttt

GENERATE AND TEST ERROR ADDRESS

tttttttttttttttttttitttttttttttttttttttttttttttttti 1 8323223232222 223 222323222222/

10857 041452
10858 0414€2
10859 061466
10860 041472
10861 0641474
10862 041500
10863 041502

013703
005737
001003
013700
000402
013700

002102
002426

10865 041512
10866 041516
10867 041520
10868 041524
10869 041526
10870 041530
10871 041532
10872 041534

005737
001002
042700
000301
006201
006201
006201
042701

002130

10864 041506 072027

10873 041540
10674

060100

172246
177646

68:

177773

78:

177600

18:

177775

PUSH
MOV
ST
BNE
MOV
BR
MOV

RO,R1,R2,R3
BANKINDEX,R3
NOSUPER
6$
SIPAR3,RO
78
UIPAR3,RO

ST
BNE
BIC
SWAB
ASR
ASR
ASR
BIC

EUFLAG
18
#4C177.R0
R1
R1
R1
R1
#4C2.R1

ASH

ADD

013701

002144

MOV

10877 041552
10878 041556

042701
005737

177600
002424

BIC
ST

10879
10880
10881
10882
10883
10884

041562
041564
041570
041572
041574
041600

10885 041606

10886 041612

10887 041620
10888 041624
10889 041626
10890 041630
10891 041632
10892 041634
10893 041636
10894 041640
10895 041644
10896 041646
10897 041652
10898 041656
10899 0461660

10900 041664
10901 041666

10902 0461670
10903 041676
10904 041676
10905 041700
10906 041704
10907 041710
10908 041720

072127
001024
005737
007421

177773

*BRANCH IF NOT NECESSARY
*IS IT EUB?
:BRANCH IF NOT
+SAVE GENERATED ERROR ADDRESS
*GET CSR NUMBER
*TURN ON EUB BIT CAREFULLY

#81T14,CSRADD (R2)

*TURN OFF EUB BIT CAREFULLY

172100

042762

040000

172100

BIC

020001
001420
005737
001411
062700
005737
001002
062700

020001
001404

005737
001001
104462
010137
005037
000002

177037

MOV

28:

002134
000100
002136
000100

48:

002064

38:

002430
002064

CSR.R1

2$
EUFLAG
2
RO
CSRNO,R2
#81T14,CSRADD (R2)

002146
040000

062700
006300
006300
060001

;ADD THEM TO THE ADJUSTED PAR VALUE

#-5R1

013702
052762

002130

172100

R1.RO

;GET CURRENT ADDRESS BITS 11 AND 12

ASH

BNE
ST
BEQ
PUSH
MOV
BIS

016200

#-5,R0

:GET ERROR ADDRESS FROM CSR UNDER TEST

10875 041542

10876 041546

;GENERATE WHAT ERROR ADDR SHOULD BE

BIC
ASL
ASL
ADD
POP
CMP
BEQ
ST
BEQ
ADD
ST
BNE
ADD

CMP
BEQ

TST
BNE
PERR36
MOV
CLR
POP
RTI

#+c177.R1
N02281 T

CSRADD (R2) ,RO

#2C740.R0
RO
RO
RO,R1
RO
RO,R1
5%
INTFLAG
3$
#100.R0O
1~re4x

;1S THIS AN 11744 OR 11/24?

:GET CSR CONTENTS

:CLEAR EVERYTHING BUT ERRCR ADDR

sSHIFT ADDR BITS 18-21 INTO POSITION
*ADD TO CURRENT ERROR ADDRESS
:COMPARE REAL AND GENERATED ERR. ADDR.
*BRANCH IF THEY ARE THE SAME
*INTERLEAVED?
*NO - WE HAVE AN ERROR

;64K INTERLEAVED MEMORY?

x1oo RO

0.R}
ss

SKPERR
5¢

R1,ERRADD
SKPERR
R3,R2,R1,RO

;ARE WE SUPPOSED TO SKIP ERROR P.0.?
:YES =~ SKIP ERROR PRINTOUT
:ELSE PRINT ERROR ADDRESS ERROR
*SAVE CSR'S ERROR ADDRESS
*ENABLE THE ERROR PRINTOUT AGAIN
*RESTORE REGISTERS

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP

MACRO M1113

GENERATE AND TEST ERROR ADDRESS

10911 041722

22-APR-81 14:13

F
.5
PAGE 342

CHKGEN: SUBTST<<SUBR

GENERATE CHECK BITS>>

s*SUBTEST

AR A

SUBR

SEQUENCE

GENERATE CHECK BITS
d

Rttt

ittt

10912

:CHECK BIT GENERATOR ROUTINE

10914

10913

:CALLING SEQUENCE IS:

}83}2

;

18315

MOV

CALL

#WORD1,SOURCE

CHKGEN

ittt

SIS

tiiaddiddi ittt

LTI

salliastsssisatdydl

;SOURCE = ADDRESS OF DATA

:CHECK BITS RETURNED IN BITS 11=5 OF LOCATION CHECK

10919 041722

10920 041736

10921 041742
10922 041746

10923 041752

012702

012703
013705

012501

}83§§ 041754

011500

10926
10927
10928
10929

041756
041760
041762
041766

006704
142304
074402
073027

10932
10933
10934
10935
10936
10937
10938
10939

041772
041776
042000
042002
042004
042006
042012
042026

042702
000302
006202
006202
006202
010237

}833? 041770

001372

000207

PUSH

000077

042030
002272

#7% ,R2

:DEFAULT CHECKBITS FOR DOUBLE WORD OF ZEROS

MOV

(RS)+,R1

SGET LSB'S

MOV
MOV

MOV
1$:
000001

177600

002274

RO,R1,R2,R3.R4.RS

MOV

#CHKTAB,R3
SOURCE ,RS

(R5) ,RO

*ADDRESS OF CHECKBIT TABLE
‘GET SOURCE ADDRESS

SGET MSB'S

SXT
BICB
XOR
ASHC

R4
(R3)+,Ré4
R4 ,R2
#1.R0

BIC
SWAB
ASR
ASR
ASR
MOV
POP
RETURN

#4C177.R2
;KILL ALL JUNK BITS
R2
;POSITION CHECKBITS IN BITS 115
RO
RO
R2
R2.CHECK
RS R4 ,R3,R2,R1,R0

BNE

;EXTEND SIGN OF DOUBLE WORD TO Ré
*ELIMINATE BITS THAT DON'T COUNT
*COMPLEMENT MASKED BITS IN CHECKBITS
:DOUBLE PRECISION LEFT SHIFT RO, ,R?

:LOOP TILL ALL BITS ARE CHECKED

265

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR

10942
10943
10944
10945
10946

10947
10948
10949
10950
10951
10952
10953

GENERATE CHECK BITS

042030
042030
042031
042032
042033

042034
040035
042036
062037
042040
042041
042042
042043
042044
042045
042046
042047

200
301
302
203
304
205
206
307

10954
10955
10956
10957
10958
10959
10960
10961
10962
10963
10964
10965
10966
10967
10968
10969
10970

042050
042051
042052

310
211
212
313
214
315
316
217
.
320
221
222

042054
042055
042056
042057

224
325
326
227

10974
10975
10976
10977

042064
042065
042066
042067

042053

042060

10971 042061
10972 042062
10973 042063

323

340

241
242
343

244
345
346
247

MACRO M1113

22-APR-81

CHKTAB:

14:13

;BYTE #3
BYTE
~(177
'BYTE
~(076
BYTE
(075
BYTE
~(174

'BYTE
(073
BYTE
~C172
BYTE
~(171
-BYTE
€070
:BYTE #2
'BYTE
~C067
BYTE
~(166

'BYTE
*C165
BYTE
~C064
BYTE
~(163
'BYTE
~(062
'BYTE
~C061
BYTE
~(160
‘BYTE M1
.BYTE
~C057
BYTE
~(156
BYTE
~C155
'BYTE

~C05%

BYTE
~(153
BYTE
€052
BYTE
~C051
'BYTE
€150
:BYTE #0
'BYTE
~(037
BYTE
~(136
'BYTE
(135
BYTE
“C034
BYTE
~(133
BYTE
~C032
'BYTE
“C031
BYTE
~(130

PAGE 344

SEQUENCE

:BIT
*BIT
:BIT
:BIT
:BIT
:BIT
:BIT
:BIT

31
30
29
28
27
26
25
24

:BIT
:BIT
‘BIT
:BIT
:BIT
‘BIT
BIT
:BIT

23
22
21
20
19
18
17
16

:BIT 15
:BIT 14
:BIT 13
*BIT 12

:BIT 11
:BIT 10
BIT
9
:BIT
8
BIT

BIT
BIT
BIT
:BIT
BIT
BIT
BIT

6
S
&
3
2
1
0

266

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR
GENERATE CHECK BITS

MACRO M1113

10980 042070

22-APR-81 14:13

H 5
PAGE 346

SUBTST<CSUBR

MAPPER>>

SEQUENCE

;tttttfittttttQfitttttttttttttttttttttttttttttt'tttttttttttttttttttttttttttttttttt

S *SUBTEST

SUBR

MAPPER

:ttttttittttttttttttttttttttttttttttttttttttttttttttfittttttttttttttttttttttttttt

10981
10982
10983

*THIS SUBROUTINE MAPS THE MEMORY BANK (16K WORDS = 1 BANK)
SIN R3 TO THE TEST PATTERN AREA (SUPERVISOR VIRTUAL (60000 - 157777) FOR
STHE 11/44 AND 11/45-55; USER VIRTUAL (60000 - 157777) FOR ALL OTHER

10986
10987

SCALL
:

}83§§

‘PDP-11"S).

}8333

10990
10991
10992
10993
10994
10995

042070
042102
042106
042112
042116

012700
012701
012704
005737

172340
172240
172200
002426

10997
10998
10999
11000

042124
042130
042134
042140

012701
012704
012702
012705

177640
177600
077406
000010

11002 042146

010224

10996 042122 001404

11001 042144

11003 042150

}}882 042152

012021

077503

012741

177600

11006
11007 042156
11008 042162
11009 042164
11010
11011 042170
11012 042174
11013 042200
11014 042202
11015 042206
11016 042212

022703
001516
072327

000170

012701
005737
001402
012701
012702
010321

172246
002426

11019 042222
11020 042226
11021 042230
11022 042234
11023 042236
11024 042242

005737
001442
162701
010102
062702
022737

002232

11026 042252
11027 042254

010200
010102

11017 042214
11018 042220

11025 042250

11028 042256

11029 042260
11030 042262
11031 042264
11032 042270
11033 042274

062703
077204

001403

48:

1$:

5$:
28:

000010
002232

MOV

/X3

#UIPARO.R1
#UIPDRO . R4
#77406,R2
#8. RS

(ROJ+. (R1)+

MOV

R2, (RG)+

MOV

#177600,-(R1)

R5°1$

;SET UP BANK ARGUEMENT
SACTUAL CALL

*ONLY RETURN
TO 1 MAP

JFIRST AREA TO MAP TO
*FIRST ADDRESS REGISTER
*FIRST DESCRIPTOR REGISTER
SCAN WE USE SUPERVISOR MODE?

*YES, BRANCH

*FIRST ADDRESS REGISTER
*FIRST DESCRIPTOR REGISTER
*CONSTANT FOR 4K PAGE, UP, R/W
* COUNTER

*PUT IN SUPERVISOR ADDRESS

*PUT IN SUPERVISOR DESCRIPTOR

*LOOP TILL DONE

:CORRECT LAST FIELD FOR PERIPHERALS PAGE

;SET UP SUPERVISOR/USER FOR TEST AREA
CMP
#120. ,R3
:MAP NOTHING (1 TO 1)?
BEQ
3s
‘YES - SKIP
ASH
#9..R3
:BANK 1 STARTS AT 100,000 LESS 6 LSB'S
*FOR MEMORY MANAGEMENT = 1000
MOV
#SIPAR3,R1
‘SETUP FOR AUTO INCREMENTING
ST
NOSUPER
‘DO WE HAVE SUPERVISOR MODE?
BEQ
5$
*YES = BRANCH
MOV
#UIPAR3,R1
SSETUP FOR AUTO INCREMENTING
MOV
¥4 ,R2
: COUNTER
MOV
R3(R1)+
*PLUG IN PAR INFO

ADD
S08

#200,R3
R2,2$

TST
BEQ
SUB
MOV
ADD
CMP

SPLTCSR
98
#10.R1
R1.R2
¥4 R2
#1.SPLTCSR

MOV
MOV

R2.R0O
R1.R2

BEQ

108:
002102
002136

MOV
MOV
MOV
MOV
08

000200

012122

011112
013700
C€05737
001403

BEQ

177646
000004

010001

RE TURN

BANKNO,R3
MAPPER

;SET SUPERVISOR/USER UP FOR 1
MAPPER: PUSH = RO,R1.R2.R4.RS
MoV
#KIPARO,RO
MOV
#SIPARO.R1
MOV
#SIPDRO R4
ST
NOSUPER

000011

000004
000007

MOV
CALL

MOV

MOV
MOV
TST
BEQ

10$

RO R1

(Ri)+, (R2)+

(R1), (R2)
BANK INDEX , RO
INT64K
118

:BUMP ADDRESS 4K
*LOOP TILL DONE

267

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR
MAPPER
11034 042276

012700

004000

11036 042306
11037 042310
11038 0423i4
11039 042316
11040 062322
11041 062324
11042 042330
11043 062332
11044
11045
11046
11047
11048
11049 042334
11050 042342
11051 042344
11052 042350
11053 042352
11054 042360

012700
005737
001403
012701
000402
012701
060021
060011

010000
002426

022737
001010
005737
001423
022737
001017

000007

11056
11057
11058
11059
11060
11061
11062

022737
001012
005737
001404
013737
000403
013737

11035 042302

11055 042362

042364
042372
042374
042400
042402
042410
042412

11063 042420
11064 042432
11065
11066 042434

000402

000404

005000
012701
012702

11071 042464
11072 042470
11073 042472

012704
010021
010223

11077 042566

012741

11070 042460

11074 042474
11075 042500
11076 042502
11084 042512

11085 042524

012703

062700
077405
012741
000002

22-APR-81 14:13
MOV

11$:
128:

177652
172252

138:
14$:

002526

9%:

002424

000007

002100

000177

002526

002426

7%:
8s:

177652

177654

172252

172254

000207

11067 042446
11068 042450
11069 042456

MACRO M1113

6$:

38:
$KMAP:

172340
077406

172300

000010

000200
177600

177400

B8R

SEQUENCE

#4000 ,RO

128

MOV
#10000,R0
TST
NOSUPER
BEQ
138
MOV
#UIPARS,R1
BR
148
MOV
#SIPARS ,R1
ADD
RO, (R1)+
ADD
RO, (R1)
;IF WE ONLY HAVE AN 124K SYSTEM, WE DON'T WANT TO TEST THE
<LAST 4K, WHERE THE UNIBUS DEVICE PAGE IS. INSTEAD, THE
*PROGRAM WILL REMAP THE LAST 4K TO 8-12K. ALSO. IF THERE
SIS A BANK 177 ON AN 11/44, THE PROGRAM WILL REMAP THE LAST
24K TO 8-12K FOR THE SAME REASON.
CMP
#7,LASTBANK
BNE
78
ST
NO22BIT
:11/44 OR 24?
BEQ
38
*BRANCH IF SO
CMP
#7 ,BANK
*BANK 7?7
BNE
3$
*NO - BRANCH

B8R

CMP
BNE
ST
BEQ
MOV
BR
MOV

#177 .LASTBANK
3s
NOSUPER
68
UIPARS ,UIPARG
38
SIPARS, SIPARG

RE TURN
.SBTTL
PUSH
CLR
MOV
MOV

TRAP
MAP KERNEL
RO.R1.R2.R3.R4
RO
#KIPARO,R1
#77406,R2

MOV
MOV
MOV

#8. .RG
RO, (R1)+
R2' (R3)+

*COUNTER
*PUT IN KERNEL ADDRESS
*PUT IN KERNEL DISCRIPTOR

#177400°-(R1)

*AND NEXT LOWER PAGE TO KIPAR6

POP

MOV

1$:

I 5
PAGE 346-1

RS,R4.R2,R1,R0

#XIPDRO.R3

ADD
S08
MOV

#200,R0
RG, 18
#177600,~(R1)

POP

R4,R3,R3,R1,R0

MOV
RTI

(ALMOST 1

TO 1)

TRAP HANDLER

;1ST AREA TO MAP TO
*FIRST ADDRESS
*CONSTANT FOR 4K PAGE,UP.R/W

$1ST PAGE DESCRIPTOR REGISTER

*ADD ADDRESS CONSTANT FOR 4K CHANGE
*LOOP TILL DONE
*THE PERIPHERALS PAGE TO KIPAR?

268

CZMSDCO MS11-L/M DIAGNOSTIC
TRAP

MAP KERNEL

(ALMOST 1

MACRO M1113

TO 1)

22-APR-81 14:13

TRAP HANDLER

11088 042526

s *SUBTEST

SRR

11108
11109
11110
11111
11112

004737

044300

013700
010037
013701
004737
004737
013701
052761
042761

002300
002402
002536
043750
044246
002102
100000
020000

002626
002626

042706
042716
042722
042722
042726

11113 042726
11114 042726
11115 042732
11116 042734
11117 042736
11118 042742
11119 042752
11120 042762

AR At

dda

Rttt

id it

RELOCATE PROGRAM

R A RN R AR RN AN AR

N RN TN R RN AN AR

013702
006302
006302

it iiiadiditiiiisiadtiisdliadiistsssdydy

AN R AR ANRAAANRRARRRN

AACR AR RAA

sRELOCATION NOT POSSIBLE

BEGIN FINDBANK
MOV
LASTBANK
,R2
ASL
R2
ASL
R2
;R2 <= R2 *
FOR R1 :=_#2+2 TO R2 BY #4
IF #BIT7!BITO OFF.IN CONFIG(R1)
IF #BIT15 OFF.IN CONFIG+2(R1)
IF CPUBIT SET.IN CONFIG(R1)

002526

R AR

4
;I1F NO _ERRORS & NOT PROGRAM SPACE
;IF NOT LOADER BANK
;IF ACCESSABLE

IF #BIT9 SET.IN CONFIG+2(R1) THEN LEAVE FINDBANK ;IF PARITY

11122 043002
11123
11124 043022
11125 043024

IF #8176 SET.IN CONFIG(R1) AND #BIT7 OFF.IN CONFIG(R1)
;1F 1ST PROTECTABLE ECC BANK
LEAVE F INDBANK
END ;OF IF #BIT6

010137

002510

013701
023727
001423

002510
002260

000420

000030

NEE

IF #SW12 SET.IN @SWR THEN SRETURN ERROR
IF APTFLAG IS TRUE OR ACTFLAG IS TRUE
IF SPASS NE #0 THEN SRETURN ERROR
END; OF IF APTFLAG
BEGIN LOADERBANK
FOR BANK := #1 TO LASTBANK
CALL EXBANK
IF ACFLAG IS TRUE AND PFLAG IS FALSE AND BMFLAG IS FALSE
MoV
BANK RO
MoV
RO, LOADBANK
MOV
LOADHOME
,R1
CALL
BANKMOV
CALL
NEWLOAD
sMAP NEW LOADER BANK IN KERNEL
MOV
BANKINDEX,R1
BIS
#BIT15,CONFIG+2(R1)
sMARK LOADER
8IC
#BI1T13,CONFIG+2(R1)
s INVALIDATE BACKGROUND PATTERN
LEAVE LOADERBANK
END ;OF IF ACFLAG
END ;OF FOR BANK
IF #SW13 OFF.IN aSwR
TYPE
MSGO75
END ;OF IF #SW13
$RETURN ERROR
END LOADERBANK

11121 042772

11126 043024
11127 043032
11128 043040
11129 043044
11130 043044
11131 043044
11132 043044
11133 043044
11134 043054
11135 043062
11136 043070
11137 043074
11138 043102
11139 043104
11140 043110
11141 043112

SEQUENCE

RELOCATE:SUBTST <<RELOCATE PROGRAM>>
AR A

11089 042526
11090 042542
11091 042556
11092 042570
11093 042570
11094 042570
11095 042576
11096 042602
11097 042624
11098 042630
11099 042634
11100 042640
11101 042644
11102 042650
11103 042654
11104 042662
11105 042670
11106 042672
11107 042672

J 5
PAGE 348

IF INHECC 1S FALSE
SET
INHECC
MOV
R1, INHBANK
END. OF IF INHECC
END ;OF IF CPUBIT
END ;OF IF #BIT15
END ;OF IF #8177
END ;OF FOR
IF FULLREL IS FALSE
IF INHECC IS TRUE
MOv
INHBANK ,R1
cme
REALPAT,#30
8EQ
RELENT1
TYPE
MSG123
BR
RELENT1
END; OF IF INHECC

;1S THIS PATTERN 30?
sYES - SKIP MESSAGE

269

CZMSDCO MS11-L/M DIAGNOSTIC

RELOCATE PROGRAM
b
md
D e
b
D e
b
d e
b

NN S
NNN) = =
ONONONNONSONONN

(olelolalolelelelelels]
&H PR AT A o S
P N
P T
W WA IN NN NN NN

043162

W
N
W
o

mnm
m
m
m
1M1
m
13}
M
m
m
111
1M
m
m
m
m
1
m
m
M
M
m
mnm
1
m
11
11
m
m
1M1
m
m
m
1M
m
11
M
1
1111
111
11
11
11
m
mnm
11
111
111
m

00000000 NN NNNNNNNNOOOOOOROONONO NVNNANAVINNNWNNE DS
W= O VNV
NN —=LOVO NN
WN=OVO NS WIN—O 000 OIS
W

11142 043112

005037

002506

023727
001402

002260

MACRO M1113

002626

000004

013737
004737

002502
044116

002504

000001

003716

000040
002270

172516

100000

170200

012737
010037

BEQ
TYPE

SKUB
MSGO75

END ;OF IF #SW13

$RETURN ERROR
END F INDBANK
CLEAR
INHECC

RELENT1: BIC

#BIT13,CONFIG+2(R1)
RO

CLR
DIV
#4 RO
RELOC1: LET NEWBANK := RO
MOV
PGMCSR,PGMCSP+2
USERMAP
CALL
USER
BMOV
0.100000,S1ZE
KERNEL

CMP
BNE

#1,PROTYP
JMPRL1

BIC

#BIT5,MMR3

MOV

RO,MAPHO

MOV
NEWBANK
, RO
ASR
RO
ON.ERROR
MOV
#BIT15,MAPLO
END ;OF ON.ERROR

170202

043704
000040
000001
044200
002270

BIS
JMPRL1: BIC

CALL
MoV
ASL

LOWMAP

#BIT5,MMR3
#8170,MMRO

NEWKERNEL
NEWBANK
, RO
RO
RO

002624

MoV

177760

8IC

:5c17,R2

BIS
MOV
BIT

#8170,MMRO
R2 ,PGMCSR
181T12.CONFIG*2(R0)
$
CONFIG(RO).SZ

0v0001
002502
010000

050237

K §
PAGE 348-1

IF #SW13 OFF.IN @SWR
CMP
REALPAT 430

000030

042761
005000
071027

104417
022737
001021
042737
013700
006200

14:13

END; OF IF FULLREL
CLR
INHECC

SKUB:

020000

22-APR-81

002624
007777
177775
100000
002502

177572

002626

MOV

1%:

ggNFIG(RO).RZ

SET
RLFLAG
SRETURN NOERROR

SEQUENCE

270

sMAKE SURE FLAG IS TURNED OFF!

;1S THIS PATTERN 30?
sYES = SKIP MESSAGE
sRELOCATION NOT POSSIBLE

:IF WE RELOCATED PROPERLY, THIS SHOULD BE OFF!
s INVALIDATE BACKGROUND PATTERN

s SAVE CURRENT PGM. (SR
sMAP NEWBANK TO USER PAR
sENTER USER MODE
;MOVE PROGRAM
sENTER KERNEL MODE
;IS THIS AN 11744 ?
sJUMP IF NOT
:TURN OFF UNIBUS MAP

;SETUP LOWER 16K IN UNIBUS MAP
cENERGIZE UNIBUS MAP
sDEENERGIZE MEMORY MANAGEMENT

;RO <= RO ~ 4

JENERGIZE MEMORY MANAGEMENT
sPUT NEW PGM. CSR INTO PGMCSR
:1S THE NEW BANK INTERLEAVED?
:BRANCH IF NOT INTERLEAVED

CZMSDCO MS11-L/M DIAGNOSTIC

RELOCATE PROGRAM

MACRO M1113

11194 043416

22-APR-81

14:13

PAGE 350

UNRELOCATE : SUBTST

SEQUENCE

CCUNRELOCATE PROGRAM>>

.'ttttttttttttttttttttttttttttttttfitttttttttttttttttttttttttttttttttttttttttttttt

: «SUBTEST

UNRELOCATE PROGRAM

;ttttttttttttttttttttttttttttttttttttttttttttttitttttttttttttttttttttttttttttttt

11195
11196
11197
11198
11199
11200
11201

043416
043420
043424
043430
043434
043440

11202 043444

11203 043452
11204 043456
11205 043462
11206 043470
11207 043476
11208 043502
11209 043506
11210 043514
11211 043520
11213
11214 043524
11215 043532
11216 0463536
11217 043542
11218 043550
11219 043562
11220 043564
11221 043572
11222 043576
11223 043604
11224 043612
11225 043616
11226 043624
11227 043626
11228 043634
11229 043644
11230 043650
11231 043656

11232 043662

11233 043666

013701
013700
004737
004737

002402
002536
043750
044246

013737

002402

004737
013701
042761
013737
004737
013701
042761

042737

020060

004737

044116

104417
042737

000001

004737
013737
052737
005037
022737
001014
042737

044200
002504
000001
002124
000001

002100

002626

177572
002502
177572
003716

004737
052737
012700

043704
000040
002626

172516

062700

000004

020027

;}gg; 043702

000207

003771

020000

CALL
MOV
BIC
MOV
CALL
MOV
BIC
POP
CLEAR

002626

172516

042710

MOV

,
002626
002100

000040

11234 043672

11235 043676
11236 043700

044300
002102
100000
002536
044300
002162
020000

;RESTORE LOADERS
PUSH
RO
MOV
LOADBANK
,R1
MOV
LOADHOME
. RO
CALL
BANKMOV
CALL
NEWLOAD
PUSH
BANK

18:

28:

003620

;MAP NEW LOADER BANK IN KERNEL SPACE

LOADBANK
, BANK

EXBANK
BANKINDEX,R1
#BIT15,CONFIG+2(R1)
LOADHOME
, BANK
EXBANK
BANK INDEX R
#BIT13,CONFIG+2(R1)
BANK
INHECC

;CLEAR LOADER FLAG

; INVALIDATE BACKGROUND PATTERN

;MAKE SURE ECC TESTS ARE NOT INHIBITED'

;RESTORE BANK 0
BIC
#B1T13,CONF1G+2
; INVALIDATE BACKGROUND PATTERN
LET NEWBANK := #0
CALL
USERMAP
JMAP NEWBANK TO USER PAR
USER
:ENTER USER MODE
BMOV
0,100000,SI1ZE
;MOVE PROGRAM
KERNEL
:ENTER KERNEL MODE
BIC
#8170 ,MMRO
:DEENERGIZE MEMORY MANAGEMENT
CALL
NEWKERNEL
MOV
PGMCSR+2, PGMCSR
;RESTORE PREVIOUS PGM. CSR
BIS
#B1T0,MMRO
:ENERGIZE MEMORY MANAGEMENT
CLR
RLFLAG
cMP
#1,PROTYP
;1S THIS AN 11/44 2
BNE
1$
BIC
#BITS,MMR3
;TURN OFF UNIBUS MAP
CLEAR
MAPLO,MAPHO
CALL
LCWMAP
;SETUP LOWER 16K OF UNIBUS MAP
BIS
#BITS ,MMR3
:ENERGIZE UNIBUS MAP
MOV
#CONFIG+2,RO
:MOVE 2ND WORD OF CONFIG TO RO

BIC

#81713, (RO)

:CLEAR BACKGROUND VALID BIT

CMP

RO, #3620

:DONE?

ADD

BLE
POP

#%,R0
28

:INCREMENT TO NEXT BANK
:NO - BRANCH

RETURN

11239 043704

LOWMAP:

SUBTST

<<SETUP LOWER 16K OF UNIBUS MAP>>

:'tttttttttttttttttttttttttttttttttfitttttttttttttttttttttttttttttttttttttttttt't

:«SUBTEST

SETUP LOWER 16K OF UNIBUS MAP

:ttttttttttttttttttttttttt'ititttttttttttttttttttttttttttttt't'tttttfitttttt'tttt

11240 063704

11241 043712

11242 043716
11243 043722

11244 043726

012700

012701
012702

012011

PUSH

170200

170204
000003

18:

RO,R1,R2

MOV

#MAPLO,
RO

MOV

(RO)+, (R)

MOV
MOV

#MAPL1.R1
#3,R2

271

000207

S08

POP
RETURN

N ¢+ =2

3 )+
-

ADD
MOV

—

020000

062721
012021
077205

mnS5
PAGE 350-1

14:13
20D = N —y

043730
043734
043736
043740
043746

22-APR-81

D20 ~W
roroO0
@

11245
11266
11247
11248
11249

MACRO M1113

CZMSDCO MS11-L/M DIAGNOSTIC
SETUP LOWER 16K OF UNIBUS MAP

SEQUENCE

272

CZMSCCO MS11-L/M DIAGNOSTIC
SETUP LOWER 16K OF UNIBUS MAP

11252 043750

MACRO M1113

22-APR-81

BANKMOV:SUBTST
A

AASAALA

b ) e wnd nd wd b b ——d - b D ed b el cad d b d ) b b e cd e d ) D o Vb D ad - cad d wid o D ) D d

ANPLNINLINININLNINLNLNY NOALNINLNLNLALANLNLNL
NNV ANV NI AL NNV PV NLNLNLNINI NN PININI NN
0 YO O O "0 O O O 00 00 0o 0o OO Q000000000
NN NNNNNNNOOOOCOONONO
OO NN VAN
NOWNEBWN=O0 CONOWVSB NN =O VO NO VIS WA= OV
N WV WA =20 VNS W

— d el e

D d e e ed wh d d D D d e
d e
) ed e ed D d D
) D e
b cnd d D d D e
D
) cd e wd b

PAGE 352

SEQUENCE

<<MOVE BANKS>>

s *SUBTEST

—emd e ed b omd

14:13

MOVE BANK3

AR R A AN A AR AN AR

RN RN

ittt

ititlititzizis

AR N RN RN AR AN RN AR A RAR AN RAAARARRAN RN

;MOVE 3/4 OF A BANK

043750
043752
043756
043760
043762
043766
043772
043776

104415
004737
104416
104415
072027
072127
012702
012703

044002

010122

sCALLING SEQUENCE
;RO = DESTINATION BANK
:R1 = SOURCE BANK
044116

CALL

USERMAP

000011
000011
177650
000200

MOV

#200,R3

MoV

R1,(R2)+

060300
010022
060300

MOV
ADD
MoV
ADD

RO, (R2)+
R3.R0O
RO, (R2) +
R3.RO

044022
044030
044042

104417

USER
BMOV
KERNEL

100000,140000,S12E/2
:MOV 1ST HALF BANK
;ENTER KERNEL MODE

044044

012702

MOV

#UIPARSL ,R2

044050
064052

010122
060301

MOV
ADD
MOV
ADD

R1,(R2)+
R3,R1
R1.(R2)+
R3.R1

044060
0644062
044064
044066

010022
060300
010022
060300

MOV
ADD
MOV
ADD

RO, (R2)+
R3,R0
RO, (R2)+
R3.RO

044004
064006

044010

044012

044014
044016
044020

044054
044056

060301
010122

ADD
MOV
ADD

060301

010022

044070
044076
044110

104417

044112
0644114

104416
000207

177650

USER

BMOV

KERNEL

RESREG
RETURN

eIz

JMAP 1ST HALF BANK

R3,R1
R1.(R2)+
R3.R1

;BUMP BY 4K

;MAP 2ND HALF BANK
;BUMP BY 4K

100000,140000,S1Z2E/4

:MOV 3ND FOURTH OF BANK

SENTER KERNEL MODE

NAOR

273

CZMSDCO MS11-L/M DIAGNOSTIC

MOVE BANKS

11300 044116

MACRO M1113 22-APR-81 14:13 PAGE 554

SEQUENCE 274

USERMAP:SUBTST

<<SUBR

MAP USER TO NEW BANK>>

#SUBTEST

SUBR

MAP USER TO NEW BANK

:ttttttttttt*tttttttttttttttttttttittttttttttttttttttttttttttt'ttttttttttttttt't

;tttttttttt*tttttttttfittttt'ttttttttttttttttttttttttfiQttttttttttttttttt'tttt'ttt

11301
11302
11303
11304
11305

044116
044122

044125
0644132
044136

012701
012702
012703
012704
012705

11307 044144

011423

11306 044142

}}ggg 044146

012221

177640
172340

177600
172300
000004

077503

11310 044150
11311 044154
11312
11313 044160
11314 044164

013700
072027

002270
000011

012705
010021

000004

11316 044172
11317 044174
}}g}g 044176

011423
077505
000207

11315 044166

1$:

062700

000200

11320 044200

28:

MOV
MOV
MOV
MOV
MOV

MOV

#UIPARO,R1
#KIPARQ.R2
#UIPDRO.R3
#KI1PDRO .R%
#4 RS

(R)+, (R})+
(R4,

(R3)+

508

RS,1$

MOV
ASH

NEWBANK
, RO
#9. R0

MOV
MOV

#4 RS
RO (R1)+

MOV
08
RETURN

(RG) . (R3)+
RS,2$

ADD

;COPY KERNEL PAR'S & PDR'S (0-3)

;SETUP UIPAR(4=7)

#200,R0

NEWKERNEL : SUBTST

;BANK 1 STARTS AT 100,000 LESS 6 LSB'S
*FOR MEMORY MANAGEMENT = 1000

<<SUBR

*BUMP ADDRESS 4K

SSETUP UIPDR(4=7)

SETUP KERNEL PAR'S FOR NEW BANK>>

;ttt*ttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttt

< *SUBTEST

SUBR

SETUP KERNEL PAR'S FOR NEW BANK

;ttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttt

11321
11322
11323
11324
11325
11326
11327

044200
044206
044212
044216

012700
013701
072127

172340
002270
000011

044222
044226

012705
010120

000004

11328 044230
11329 064234
11330 044236

}}gg; 044244

062701
077504

000200

000207

1$:

PUSH
MOV
MoV
ASH

RO.R1,RS
#KIPARO.RO
NEWBANK
.R1
#9. .R1

MOV
MOV

#4 RS
R1.(RO)+

POP

RS R1,RO

ADD
S08

RETURN

11333 044246

NEWLOAD :SUBTST

#200,R1
RS,1$
<<SUBR

:BANK 1 STARTS AT 100,000 LESS 6 LSB'S
SFOR MEMORY MANAGEMENT = 1000
:SETUP KIPAR(0~3)

SETUP KERNEL PAR'S FOR NEW LOADER BANK>>

;ltttttttttttttttttttttttttt*tttttttttttttttttttttttttt"ttttt.ttttttttttttttttt

S eSUBTEST

SUBR

SETUP KERNEL PAR'S FOR NEW LOADER BANK

;tttttttltttttttttttttttttttttttQttttttttttttttttttttttttttttttttttttttttttttt't

11334
11335
11336
11337
11338

044246
044252
044256
044262

11339 044264

11340 044270
11341 044272
11342 044276

032701
072027
010021

062700
010021

000207

172350
000011

000200

sRO CONTAINS THE DESTINATION BANK
PUSH
RO,R1
MOV
#KIPARG
R
ASH
#9..R0
;BANK 1 STARTS AT 100000 LESS 6 LSB'S (1000)
MOV
RO (R1)+
SSETUP KIPAR4

ADD

MOV
POP
RETURN

#200,R0

RO, (R1)+
R1.RO

;SETUP KIPARS

C 6
PAGE 356

CZMSDCO MS11-L/M DIAGNOSTIC
MACRO M1113 22-APR-81 14:13
SUBR
SETUP KERNEL PAR'S FOR NEW LOADER BANK
11345 044300

EXBANK:

SUBTST

11378
11379
11383
11384
11385
11290
11391
11392
11393
1139

044410
044416
044422
044436
044442
044442
044446
044450
044454
044456

11395 044462
11396 044466

11397 044470
11398 044476
11399 044502

11400
11401
11402
11403

044510
044512
044520
044526

11404 044530
11405 044536

EXAMINE BANK>>

SUBR

EXAMINE BANK

JINARAARAAARRAARAAAANA
AR A AN
AN NAAANRANANAAAAAAAANRAAAACARREARRARAAAACAAANAS

;*SUBTEST
11346
11347
11348
11349
11350
11351
11352
11353
11354
11355
11356
11357
11358
11359
11360
11361
11362
11363
11364
11365
11366
11367 044300
11368 044306
11369 044326
11370 044334
11371 044350
11372 044364
11373 044370
11374 044372
11375 044374
11376 044400
11377 0466406

<<SUBR

SEQUENCE

:DOES
(1)
:(2)
:(3)
:(4)
:(5)
:(6)
:(7)
:
:
:
:
:(8)
:
:
:(9)
:(10)
:(11)
:(12)
:
:

013701
006301
006301
010137
032761
001403

002100
002102
000100

002624

012700

000002

1$:

005037

002114

005737
001415
016102
000302
042702

002114

020227
003005

000002

000137
032761
001003

044740
000400

002626

128:

032761
001012

001000

002626

2$:

032761

000400

002626

002626
177770

iRt

id At Rad

ittt

sttt

diiliad

ittt diadiiiadliiisiiilisssdsd)

THE FOLLOWING:
L
SETS UP_"BANKINDEX'' AND R1 BASED ON VALUE OF ‘BANK''.
SETS THE "MKFLAGTM IF_THE BANK IS ECC.
SETS THE 'XFLAGTM
IF THE BANK IS MF11S-K.
SETS THE 'XPFLAG'*
IF THE BANK IS THE PROTECTED REGION OF ECC MEMORY.
SETS THE 'ACFLAG' IF THE BANK CAN BE ACCESSED BY THIS CPU.
SETS THE "PFLAG"
IF THE BANK IS IN PROGRAM SPACE.
SETS THE
'RRFLAG'' IF RELOCATION IS REQUIRED TO TEST THIS BANK; HOWEVER,
1T COMPLEMENTS THIS FLAG IF THE RELOCATION FLAG ‘RLFLAG'' IS SET (THIS IS
NECESSARY FOR THE USE OF THE RECURSIVE 'MODETM
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:
HOWEVER, IT
COMPLEMENTS
THIS FLAG IF THE ‘MORSTTM FLAG IS NOT SET
(THIS IS NECESSARY FOR THE USE
OF THE RECURSIVE 'MODE'' SUBROUTINES).
SETS THE "EUFLAG'' IF THE BANK HAS EXTENDED UNIBUS MEMORY.
SETS THE "INTFLAG'* IF THE BANK IS INTERLEAVED.
SETS THE 'INT64KTM FLAG IF THE BANK IS INTERLEAVED ON 64K WORD BOUNDS.
SETS THE ''SKIPMK'* FLAG IF THIS BANK IS INTERLEAVED, AND HAS ALREADY
BEEN TESTED.
PUSH
RO,R1,R2
CLEAR
MKFLAG,KPFLAG,KFLAG,EUFLAG
SET
ACFLAG
CLEAR
PFLAG,RRFLAG,BMFLAG
CLEAR INTFLAG, INT64K, SKIPMK
MOV
BANK,R1
ASL
R
ASL
RI
iR1 <= R1 « 4
MOV
R1,BANKINDEX
BIT
#BiT6,CONFIG(R1)
:PROTECTED REGION OF ECC MEMORY?
BEQ
1%
N0 - SKIP
SET
KPFLAG
MOV
#BIT1,RO
IF RO SET.IN CPUBIT AND RO OFF.IN CONFIG(R1)
CLR ~ ACFLAG
END ;OF IF RO
TST *
ACFLAG
:ACTIVE MEMORY?
BEQ
12§
:BRANCH IF NOT
MOV
CONFIG+2(R1),R2
SWAB
R2
BIC
#%C7,R2
:ISOLATE MEM TYPE BITS

(MP
ger

SET
JMP
BIT
BNE
SET
BIT
BNE

SET
BIT

R2 A2
12§

:1S THIS AN ILLEGAL MEM TYPE?
:BRANCH IF NOT

28
EUFLAG
#BIT9,CONFIG+2(R1)
3$

:BRANCH_IF NOT
:YES = SET EUB FLAG
;1S THERE ECC THERE?
iND - SKIP

BMPLAG
ENEXBK
#BIT8,CONFIG+2(R1)

:SET BAD BANK FLAG
:JUMP OVER REST OF FLAG TESTS
:1S THIS EUB?

MKFLAG
;YES - SET MKFLAG
#BIT8,CONFIG+2(RY)
;1S THIS MF11S-K MEMORY

275

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR
EXAMINE BANK
11406 044544
11407 044546
11408 044554
11409 044562
11410 044564
11411 044600
116412 044604
11413 044606

001403

11415
11416
11417
11418
11419

001403

11614 044612

044620
044622
044630
044634
044636

11620 044642

11421 044660
11422 044666
11423 044666
11426 044674
11425 044676
11626 044704
11427 0644712
11428 044714

11429
11430
11431
11432
11433

044722
0644730
044732
044740
044746

032761
001406

000200

005737
001402
005137

002124

032761

005737
001002
005137

002122

000001

MACRO M1113

002624

5%:

002624

002540

68:
8s:

002126

9s:

032761
001421

010000

002626

032761
001403

0064000

002626

032761
001403

000040

002624

00207

3$:

108:

22-APR-81

14:13

D 6
PAGE 356-~1

SEQUENCE

8EQ
SET
BIT
BEQ
SET
TST
8EQ
COM

38
KFLAG
#8177 ,CONFIG(RT)
5%
PFLAG,RRFLAG
RLFLAG
63
RRFLAG

sNO = IT'S MS11-M
;YES = SET KFLAG
sBANK = PROGRAM SPACE?
sNO - SKIP

BEQ
SET
TST
BNE
COM

8$
BMFLAG
WORST
9$
BMFLAG

:NO - SKIP

BIT

#BI1T0,CONFIG(R)

;ERRORS PRESENT IN THiS BANK?

;IS THIS A WORST FIRST PASS?
;YES - SKIP
;NO - COMPLEMENT BAD MEMORY FLAG

SELONLY IS TRUE AND #B8IT14 OFF .IN CONFIG+2(R1)

SET _
END ;OF
BIT
BEQ
SET
BIT
BEQ
SET

;1S PROGRAM RELOCATED?
:NO - SKIP
:YES = COMPLEMENT RELOCATION REQUIRED FLAG

BIT
BEQ
SET
ENEXBK: POP
RETURN

RRFLAG
IF SELONLY
081712 CONF IG+2(R1)
ENEXB
INTF G
#8IT11,CONFIG+2(R1)
108
INT64K

#BIT5,CONFIG(RT)
ENEXBK
SKIPMK
R2,R1,RO

:1S THIS BANK INTERLEAVED?
;BRANCH IF IT IS NOT
;1S THIS BANK INTERLEAVED WITH 64K BOARDS?
;BRANCH IF IT IS NOT
s SHOULD THIS BANK BE TESTED?
;BRANCH IF IT SHOULD
sRESTORE REGISTERS

276

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR
EXAMINE BANK

MACRO M1113

11436 064750

E 6
PAGE 358

22-APR-81 14:13

SEQUENCE

BANKOK: SUBTST

<<SUBR

BANK (K?>>

:*SUBTEST

SUBR

BANK OK?

JRARANRAARARARAAAAAANAATA
RN NANAANRANARRAAAANAARRAAARRAANRARANRARERAANAARANCARAALAS
:ttttttttttt*tttttfittt""t't*t*ttttttttt*tttttttfitttttttttttttt'tttt'tttt'ittt.

:TEST TO INSURE THAT THE TYPE OF MEMORY IN THE PRESENT BANK

:1S OF THE TYPE WE ARE TESTING ''TMFLAG''.

013700
074001
000207

:RESULT IS RETURNED IN THE CONDITION CODES

002132

MOV

002116

MOV
XOR
RETURN

COM

6 0464766
7 044766

002110
000030

INCREMENT PAITERN TESTING >>

s *SUBTEST

SUBR

INCREMENT PATTERN TESTING

1Y,

L ad oy aF u

DAVl

7 045010
8
9 045012

AR AN

RETURN

A RN RN

PATTERN
#30,PATTERN

AR RN RN RN N

SET HIGHEST PATTERN TESTING TYPE

AR AN AR

002110

1’

sSET UP CONDITION CODES

sNOT EQUAL TO ZERO IS GOOD

SUBR

R AR

AR AN R

R RN

R RN RN RN AR NN E N RN R

R AR AR R AR N RN R RANRAN AN RAR N

gg¥URN

#27 ,PATTERN

SUBTST

<<SUBR

INCREMENT BANK & TEST>>

SUBR

INCREMENT BANK & TEST

AAENAARR AR AR AN RN RN

SRR ARARANRARARARARRRAN AR

1462 045016
1463 045024

NAN R

s *SUBTEST

AR AN AN AR

s*SUBTEST
002100
002526

AR RN RN R

SET HIGHEST PATTERN TESTING TYPE>>

INCBNK:

005237
023737
000207

AR ARNARARAAAARARARANES

<<SUBR

1461 045012

AR AN AARRARAAARRARAN AN

SETPAT:
HIPAT:
SUBTST
IR

000027

RAARARNRNR AR RN AR AR ANAAN

INC
CMP

002110

012737
000207

;0K = (=0K)

AR AR

RRAR

s INCREMENT THE PATTERN & SET UP THE CONDITION CODES
¢RESULT = Z BIT SET INDICATES OVERFLOW

4 0645002
5 045002

6 045002

MKFLAG,R1
RO,R1

<<SUBR

005237
022737
000¢07

(OK
= (=0)).

INCRPT:
INCPAT: SUBTST
SRARRRRAR RN

8
9
0 044766
1 044772
% 045000

TMFLAG.RO

INC
CMP
RETURN

AR ANNNERS

AR SN RN NN REANNEAY

sSET HIGHEST PATTERN

A AAANRAAARAAANANAANRRA AR

NAANNRARRNRRRARAES

E RN AR RAARRARARARNRARARAAARIRARRAAANRAANRAARARAN
AN NRSY

sRESULTS RE;URNED IN CONDITION CODES

002100

RRA RN

(NO OVERFLOW)

LASTBANK ,BANK

:T00 FAR?

277

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR
INCREMENT BANK & TEST

MACRO M1113

11466 045026

BCOT:

SUBTST

MAASAAS A AAA L

s *SUBTEST

002424

&~
n
~
W
~

000040

19,]

012700
60

—

WWNNONIN)
— —
oo

005737

o
~
o~

024716

o
o
o
o
o

(=
&

o
&~

(Yot oYoToY=T=T=]
P99
9.9
.9

3 045076

ECCINIT

004737
001003

SEQUENCE

<<BOOTSTRAP ROUTINE>>

BOOTSTRAP ROUTINE
Al

ddd

iRl

ittt

iia

ittt i

Riiit it
it

iad

iiiddiiiitiitsslsdy
it

ilstiadsd

;INITIALIZE ALL CSR'S
sUNRELOCATE IF NECESSARY
sFLUSH OUT ANY DBE'S
sTURN OFF MEMORY MANAGEMENT
:TURN OFF THE UNIBUS MAP
;B00T RKO OR RK1

104472

o
o
n
-~
o

OO0
NN
HO0NO

9 045062

N =

—d ed d ed ed
b b o
b eed

elelele]

NV W =000~

J\J\J\J\J\J~J\J‘J‘J‘J‘J\é;t\t\J\J\J\J\J\J\J\J\t\J\J\
O
O O 00 00 G0 0o 0O
©0
00 0o
NNNNSNSNNSNNNOONON
~N
V0B ~NON W
o

8 045056

d
d

d D md b
b wmd md e

b o
b
ed d o

d ed D
d b md

D
D

b d
d cd

D
D

d D b
b md ocd

d D
b med

MLAAAA SRR

0645026

F
6
PAGE 360

22-APR-81 14:13

177406
000004
177400
000005

020000

SET4

#BOOT1

CALL

_ MT0030

N022BI1T

;TRAP ON_ DOUBLE BIT ERRORS (NORMAL)
TRAPS T0 4 GOTO BOOT1

1F RLFLAG IS TRUE THEN SCALL UNRELOCATE

DEENERGIZE

172516

BCOT1:
1$:

28:

BNE
BIC
CLR

RESET

BOOT1
#81TS ,MMR3
R1

MOV
MOV

l177406.R0
4 (RO}

8PL
ADD
ST
BM]
CLR

2$
#8IT13,R1
(RO)
1$
PC

MOV
MOV
TST8

0177400 (RO)
~(RO}
(Rb)

;FLUSH OUT DBE'S

STURN OFF MEMORY MANAGEMENT

;IS THIS AN 11/44 OR 11/24?
sTURN OFF THE UNIBUS MAP

278

CZMSDCO MS11-L/M DIAGNOSTIC

BOOTSTRAP ROUTINE

MACRO M1113 22-APR-81 14:13 PAGE §62

11495 045134

EXIT:

SUBTST

JAARARRAR AN AR R RAR

+«SUBTEST

)

SEQUENCE

<<HALT PROGRAM>>
A AR

AR RN RN AN AN

A AR AR RANANAN

AR AR R RAAR AR

AR AT RARA AR RN

HALT PROGRAM

[0 Yo 3V, IV F YUY

:ttttttttttttttttttttttttttttttttttttttttt'tttttttttttttttttt*tttttttttttttttttt

004737

045166

EXIT2:

000777
000000
000137

SEXHALT:

003630

SHUTUP:

SHUTUP
IFBRPTFLAG IS TRUE OR ACTFLAG IS TRUE

CALL

ELSE
HALT
START
JMP
END :OF IF APTFLAG

SUBTST

<<SHUTDOWN DIAGNOSTIC>>

;tttttttttttttttttttttt*ttttttttttttttt*ttttttttttttttttttttttt*tttttttttttttttt

< «SUBTEST

SHUTDOWN DIAGNOSTIC

:tttttttttttttttttttttt'ttttttttttttttttttttttttttttttttttttttttttttttttttttt'tt

;INITIALIZE ALL CSR'S
$UNRELOCATE
*FLUSH OUT DBE'S
*RESTORE LOADERS
0000

STURN OFF MEMORY MANAGEMENT

SUNMAP THE UNIBUS MAP

5166

104472

210
214
214
220

004737

024716

012700
013701

000001
002536

N
~N
&~

0
1
2 045230
2 045232
045236
5 045240
9 045246

004737
104421
005737
001003
042737
000207

043750

002424
000040

172516

1$:

ECCINIT
:TRAP ON DOUBLE BIT ERRORS (NGARMAL)
IF RLFLAG IS TRUE THEN SCALL UNRELOCATE
IF QUICK IS FALSE
CALL MT0030
:FLUSH OUT DBE'S
END ;OF IF QUICK
MOV
#1,R0
:DESTINATION BANK
MOV
LOADHOME ,R1
:SOURCE BANK
CALL
BANKMOV
DEENERGI 2E
;TURN OFF MEMORY MANAGEMENT
ST
NO22B1T
SDOES THIS PDP-11 HAVE 22-BIT ADDR?
BNE
18
:BRANCH IF NOT
BIC
#81T5,MMR3
;TURN OFF UNIBUS MAP
RETURN

APTDOWN:SUBTST

<<APT SHUTDOWN SEQUENCE>>

;titttttttttttttttttttttttttttttttittttttttttttttttttttttttttttttttttttttttttttt

*xSUBTEST

APT SHUTDOWN SEQUENCE

:tttfittttttttttttttttttttt'ttttttttttttttttttttttttttttttttttttttttttttttttttttt

045250
000340
000000

MAP

MOV

#APTDOWN,F IRST+2%

TESTAREA

060024

060026
125250

MOV
MOV
APTHLT:

KERNEL
HALT

#3460, FIRST+26
#0,FIRST+APTDOWN

;MAP SUPERVISOR SPACE

-ENTER TEST MODE

:ENTER KERNEL MODE

(TEST AREA)

TO BANK #0

279

CZMSDCO MS11-L/M DIAGNOSTIC
APT SHUTDOWN SEQUENCE

11541 045320

MACRO M1113

22-APR-81 14:13
SUBTST

H 6
PAGE 364

<<BLOCK MOVE SUBROUTINE>>

JHRRRERA R AR AN RN AR AAAN RN

; *SUBTEST

AR AN AR AR AR A RARARNANAN A AN AR AN

BLOCK MOVE SUBROUTINE

SEQUENCE

AN AR

RN AR OARROAAAN

JRARRARNA N AR AR AN AAR AN AR RN AN AR A AN RAANANAN R AR R AR AAANNNA A AN AN RRAANNNA AN

;BLOCK3 HAS 3 ARGUEMENTS
;BLOCK2 HAS 2 ARGUEMENTS
;BLOCK1 HAS 1 ARGUEMENTS

11542

11543
11544
11545
11546
11547
11548 045320
11549 045326
11550 045332
11551 045336
11552
11553 045340
11554 045346
11555 045352
11556
11557 045354
11558 045362
11559 045364
}}ggg 045366
11562 045370

11563 045372
11564 045374
11565 045402
11566

‘ALL ARE CALLED BY THE BMOV MACRO

012702
012701
000413

177640
000020

012701
000404

000020

012501
012502
012500
012022

077102
000205

ENABL
BLOCKY: PUSH
MOV
MOV

B8R

BLOCKZ: PUSH
MOV

LSB
RO,R1,R2
N#FASTCITY,R2
#16..R1
33

RO,.R1,R2

#16. ,R1

BLOCK3: PUSH

RO,R1,R2

2$:
3s:

(RS)
+ ,R2
(RS)+ RO

1%:

MoV
MOV
MoV

MOV
S08
POP
RTS
.DSABL

(R§)+.R1

(RO)+,(R2)+
R1.1$
R2.R1,RO
R5
LSB

280

CZMSDCO MS11-L/M DIAGNOSTIC

FIELD SERVICE MODE

11568
11569
11570 045404

MACRO M1113 22-APR-81 14:13 PAGE £65
.SBTTL
AA22

3822220282220t

LeSUBTEST
SRR

104415

045432
045434

104416
000207

045436
045442

005737
001402

&»H

020027
101403

1 045512

000766

593 045524
94 045526
95 045530
045532
045534
045536
045540
045542

045602
045704
046014
046162
046436
046756
047600
047606

5570

051070

5600

000733

SUBR

<<SUBR
d0dRaddd

FIELD SERVICE
il

COMMAND MODE>>

sttt

itttitiiistdiiisdiiisstssdsd]

FIELD SERVICE COMMAND MODE

AR NIRRT AN RACAAANAA RN

MSG020

AR ANRANAARANIRARARR AN

SFIELD SERVICE COMMAND MODE

IF RLFLAG IS TRUE OR NOFSMODE IS TRUE
TYPE
MSG048
sNOT AVAILABLE NOW - TRY LATER!
RESREG
RETURN

002514
18:

045500
045504

<>CDCDCDCDCDCDCDCDCDCDCDEE
BB

104414

E AN

SAVREG

106424

045474

TYPE

rs
~
o

045460
(=]

helod ©0 0o 0o 00

ChOOD‘dghflgEUMU-‘CMOOD\N?
00000000 N NN~~~ S

57% 0454064
5;2 045406

R AR

SEQUENCE

FIELD SERVICE MODE

FIELDSERVICE:SUBTST
A

)

FS1:

000022

18:

END :OF IF RLFLAG
TST
CACHKN
18
BEQ
PUSH
CONTRL
PUSH
CSRNO,KAMIKAZE
CACHOFF
SET
KAMIKAZE
TYPE
MSG026
RDDEC
POP
CMP
8LOS
TYPE
B8R

CASE RO
FSCMDO
FSCMD1
FSCMD?2
FSCMD3
FSCMD4
FSCMDS
FSCMD6
FSCMD7
FSCMD8

RO
RO, #18.
1$

s SAVE CACHE STATUS

;SAVE CSR & KAMIKAZE STATUS

:TURN CACHE OFF
s COMMAND:

JREAD A DECIMAL NUMBER
;COMMAND -=> RO

MSGO21
FS1

FSCMD9
FCMD10
FCMD11
FCMD12
FCMD13
FCMD14
FCMD15
FCMD16
FCMD17
FCMD18
END ;OF CASE
FS1
BR

SEXIT FIELD SERVICE COMMANDS
sREAD CSR
sLOAD CSR
cEXAMINE MEMORY
cMODIFY MEMORY
sSELECT BANK & PATTERN
s TYPE CONFIGURATION MAP
:SOB-A~LONG TEST
sERROR SUMMARY
sREFRESH TEST
sSET FILL COUNT
sENTER KAMIKAZE MODE
SEXIT KAMIKAZE MODE
:TURN CACHE OFF

:TURN CACHE ON
sTEST ONLY SELECTED BANKS
sRESUME TESTING ALL BANKS
sENABLE TRACE
;DISABLE TRACE

AIRAAARAR

AN NN

281

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR

MACRO M1113 22-APR-81 14:13 PAGE %67

SEQUENCE 282

FIELD SERVICE COMMAND MODE

11620 045602

FSCMDO: SUBTST
AR AR

A RARA

«SUBTEST

(AL

11621 045602
11622 045606
11623 045612
11624 045620
11625 045624
11626 045630
11627 045632
11628 045636
11629 045636
11630 045642
11631 045646
11632 045650
11633 045660
11634 045664
11635 045666
11636 045672
11637 045674
11638 045700
11639 045700

11640 045702

062706

000002

062706
005037

000002
002006

005737
001414

002514

062706

000002

005737
001402

002514

104416

RESO:

000207

11642 045704

<<COMMAND 0

i Ad

A AR

AN AR

COMMAND 0

EXIT>>

iRl

TYPE
MSG103
ADD
#2,SP
IF SKIPKAMI IS TRUE
ADD
#2,SP
CLR
SKIFKAMI
ELSE
POP
KAMIKAZE
END ;OF IF SKIPKAMI
POP
CSRNO
TST
CACHKN
BEQ
RESO
IF CACHKN EQ CACHKF
ADD
#2,SP
ELSE
TST
CACHKN
BEQ
RESO
POP
CONTRL
END ;OF IF CACHKN
RESREG

AR AR A RN

dtid

EXIT
il

AN RN

N AR AN RN

NERN NN RN RARAAAAROAN

tsdi it diiitdadisiiddiasdiislilatliesslgd)

;LEAVING FIELD SERVICE MODE
;THROW AWAY OLD KAMIKAZE FLAG
:RESTORE OLD KAMIKAZE FLAG

;IF CACHE IS OFF
*THROW AWAY CACHE STATUS

;RESTORE CACHE STATUS

RETURN

FSCMD1: SUBTST

<<FS

COMMAND 1

READ CSR>>

;*ttttttttttttttttfittittttttiiittttfitttttttt*ttttt'tltfi*tfittttiittit'ttttt**tt't

:«SUBTEST

COMMAND 1

READ CSR

;t*tttttttttttttt*ttttttt't*tt*tttQttt*tit**ttttitfittttttttt'ttt*!tfitttttttfit*tt

11643 045704

11644 045710
11645 045714
11646 045722
11647 045724
11648 045732
11649 045734
11650 045756
11651 045760
11652 045764
11653 045770
11654 046012

004737

010637

051102

CALL

002266

104426

104026

000207
013706
000207

002266

RES1:

MOV
SET4
READCSR
SET
ERROR
RES4
RETURN
TYPE
MOV
RES4
RETURN

WHICHCSR
SP,FSSTACK
MREST
NOERROR
+26
MSGO2S
FSSTACK,SP

;TRAPS TO 4 GOTO RES?
;USE_ERROR ROUTINE FOR PRINTOUT
IRESET TRAPS TO 4 TO CEFAULT
;THIS CSR DOES NOT EXIST
:RESET TRAPS TO 4 TO DEFAULT

CZMSDCO MS11-L/M DIAGNOSTIC
FS

COMMAND 1

REAC CSR

11657 046014

MACRO M1113

22-APR-81 14:13

K 6
PAGE 369

SEQUENCE

FSCMD2: SUBTST

<<FS

COMMAND 2

LOAD CSR>>

:«SUBTEST

COMMAND 2

LOAD CSR

:ttttt'tt'tfitititfitit*.'*'.ittittttfiitttttttfitittttt.tititttttfittttt"'tiitttfiti
:ttl‘t*tttfittttttttiti't"'itt'fitfi*tfittittfittti't.t.ttfitittttttttt.tittt'ttttttti

11658 046014
11659 046020
11660 046024
11661 046032
11662 046034
11663 046040
11664 046046
11665 046050
11666 046072
11667 046076
11668 046100
11669 046106
11670 046106
11671 046110
11672 046114
11673 046122
11674 046124
11675 046126
11676 046132
11677 046136
11678 046160

004737
010637

051102
002266

104426

104026
104413
104425
104426
104026
000207
013706
000207

002266

RES2:

CALL
MOV
SET4
READCSR
TYPE
SET
ERROR
RES4
TYPE
RDOCT
POP
LOADCSR
READCSR
TYPE
SET
ERROR
RETURN
TYPE
MOV
RES4
RETURN

WHICHCSR
SP,FSSTACK
WRES2

MSGO27
NOERROR
+26
MSG023
CSR

MSGO28
NOERROR
+26
MSG025
FSSTACK,
SP

;TRAPS TO 4 GOTO RES2

;USE_ERROR ROUTINE FOR PRINTOUT
‘RESET TRAPS TO 4 TO DEFAULT
:FIRST CSR WORD
:READ AN OCTAL NUMBER
:PUT IN IN LOC 'CSR"

:USE FOR PRINTOUT - NOT AN ERROR
;THIS CSR DOES NOT EXIST
;RESET TRAPS TO 4 TO DEFAULT

283

MACRO M1113
CZMSDCO MS11-L/M DIAGNOSTIC
£S
¢ OMMAND 2
LOAD CSR
11681 046162

22-APR-81 14:13

L_6
PAGE 371

SEQUENCE

FSCMD3: SUBTST

<<FS

COMMAND 3

EXAMINE MEMORY>>

:*SUBTEST

COMMAND 3

EXAMINE MEMORY

"ttttttttttttttfittfittitt'tttttttt*tt*ttttttttttttttttttttttttfitttttttttittt'titt
;ttttttttttttttttttt.ttttttttttttttttfittttQittttttittttl’ltttttti'tfitt'tt'\lttttt'

682 04616¢
683 046202
684 046210
685 046214

012737
104413

013737

000002

PUSH

002074
18:

062326

002100

000241
002100

002100

MOV
POP
cLC
ROL

SHIOCT,BANK
RO

:PUT MSB'S IN BANK
:PUT LSB'S IN RO

RDOCT

86T
ADD
BIT
BNE
CMP
BH]
MOV
SET4

157776

046350

: INDICATE PARITY ACTION
:EXAMINE MEMORY
:PHYSICAL ADDRESS (0-17775776)2?

cLC
ROR
CMP

060000
000001

012737

#2.NOPAR
MSG029
MSGO31

ROL

002526

002264

BANK,NOPAR,PARTHERE
4

MOV
TYPE
TYPE

:READ OCTAL NUMBER ONTO STACK & $HIOCT

BANK

RO
BANK,LASTBANK

13
WFIRST,RO
#BITO.RO
1$
RO,WLAST
18
#38,PARTHERE
#4$

MAP
B
TESTAREA

;CHECK FOR BANK TOO HIGH

:BRANCH IF TRUE

;CHECK FOR ODD ADDRESS
:BRANCH IF ODD ADDRESS
:CHECK FOR ADDRESS OVER 16K
:BRANCH IF OVER 16K
:INCASE OF ABORTS
:TRAPS TO 4 GOTO 4$

;MAP SUPERVISOR SPACE
;ENTER TEST MODE

011001
104417

MOV

(RO) .R1

046346

000410

1YPOCS

046350
046354

000405

38:

TYPE
BR

MSGO32
EXCMD3

:PARITY ABCRT

4$:

ADD
TYPE

#4,SP
MsG033

;FIX STACK
:TIMEOUT TRAP

7
706 046336
07 046340

046356
046362
046366

062706

046370
046372
046412
046434

104417

000400

000207

KERNEL

000004

EXCMD3: KERNEL

;ENTER KERNEL MODE

EXCMD3

;ENTER KERNEL MODE

POP
4,PARTHERE ,NOPAR.BANK
RES4
RESET
RETURN

TRAPS TO 4 TO DEFAULT

(TEST AREA)

TO BANK

284

MACRO M1113
CZMSDCO MS11-L/M DIAGNOSTIC
FS
MEMORY
COMMAND 3
EXAMINE
11723 046436

22-APR-81

FSCMD4:

14:13

SUBTST

mn_6
PAGE 373

<<FS

SEQUENCE

COMMAND &

MODIFY MEMORY>>

tttttlttttttttttttttt'ttt'tttttttttttttttttfitttttttttttttttttttttt'ttttttt'tttt

s %SUBTEST

COMMAND &

MODIFY MEMORY

ttttttttttttttttt*tttttttt!tttttattttttttttt'tttttttttt'ttttttttttttttttttttttt

012737
104413
013737

000003

1$:

062326

000241
006100
006137
000241
006000

002100

062700

060000

012737

046620

PUSH

BANK, NOPAR PARTHERE
,4

TYPE

nseosa

MOV

002074

002100

:PHYSICAL ADDRESS (0-17775776)7?

MOV
POP
cLC
ROL

$HIOCT ,BANK
RO

:PUT MSB'S IN BANK
SPUT LSB'S IN RO

RDOCT

cLC
ROR

MOV
SET4

002264

MAP

TESTAREA

046616

S 0 046620
1 046624

000431

;CHECK FOR BANK TOO HIGH

#3$, PARTHERE
w48
BANK

(RO) ,R1

*INCASE OF ABORTS
:TRAPS TO 4 GOTO 4$

:MAP SUPERVISOR SPACE

(TEST AREA)

TO BANK

;ENTER TEST MODE

:GETTING HERE MEANS WE GOT LUCKY - NO TRAPS

000004

;ENTER KERNEL MODE

TYPE
BR

MSGO32
EXCMD4

4$:

ADD

#4,SP

TYPE

MSGO33

TYPE
TYPOCS
TYPE

MSGO37
RI
MSG039

MOV

R1,

B8R

000424

104413

INVALIDATE

KERNEL

062706

BANK

IF #8IT0 SET.IN RO THEN GOTO 1$ ;CHECK FOR ODD ADDRESS
IF RO HI #LAST THEN GOTO 1$
*CHECK FOR ADDRESS OVER 16K

104417
000410

*READ OCTAL NUMBER ONTO STACK & SHIOCT

eraAux 2;15§¥783~K THEN GOTO 18

MOV

*MODIFY MEMORY

MSGO31

011001

46
47 046614

;INDICATE PARITY ACTION

TYPE

ROL

104511
4

#3,NOPA

EXCMD4

RDOCT
POP
R1
TESTAR:A

MOV

KERNEL

TYPE

TYPOCS

104417

EXCMD4: KERNEL

000207

RETURN

POP

RES4

(RO)

(RO) ,R1

MSGO38

:PARITY ABORT
CEXIT
SFIX STACK

:TIMEOUT TRAP

SEXIT

:0LD DATA WAS
SPRINT IT
SINPUT NEW DATA

*READ ON OCTAL NUMBER ONTO THE
SGET NEW NUMBER
;ENTER TEST MODE

sPUT IT IN MEMORY

*READ IT AGAIN

;ENTER KERNEL MODE

sDATA IS NOW

SPRINT

:ENTER KERNEL MODE

4 ,PARTHERE ,NOPAR,BANK

SRESET TRAPS TO & TO DEFAULT

STACK

285

CZHSDCO MS11-L/M DIAGNOSTIC
)

COMMAND 4

MACRO M1113

MODIFY MEMORY

11775 046756

22-APR-81

FSCMDS:

SUBTST

14:13

N_6
PAGE 375

<<FS

SEQUENCE

COMMAND S

SELECT BANK £ PATTERN>>

:ttttttttttttttttttttttttttttttttttttttttttttttttttttttttt'ttttttttttt'ttttttttt

S #SUBTEST

COMMAND S

SELECT BANK & PATTERN

:tttttttttttttttttttttttt'tttttttttttttttttttttttttttttttttttttttttttttttttttttt

11776 046756
11777 067006
11778 047012
11779 047016
11780 047022
11781 047024

010637

002266

1$:

104413

}};gg 047030

11784 047040
11785 047044

013701
006301

002100

11810 047164
11811 047170

11812 047176

11813 047204
11814 047210
}}g}g 047216

11817
11818 047224

11819 047240

11820
11821
11822
11823
11824

047244
047246
047250
047754
047260

11825 047266
11826 047274
11827 047304
11828 047310

;CHECK FOR BANK TOO HIGH

CPUBIT OFF.IN CONFIG(R1)
TYPE
MSGO41
GOTO 18

;BANK NOT ACCESSABLE

END :OF IF
28:

104413

11502

047144
047150
047156
047162
047164

BANK ,R1
R1

}};go 047066

11805
11806
11807
11808
11809

MOV
ASL

ASL

11787 047050
11788 047060
11789 047064

11803 047126
11804 047142

BANK,PATTERN,TESTADD,PCBUMP, TKVEC, TKVEC+2
SP,FSSTACK
;SAVE LAST GOOD STACK POINTER
MSG040
*SELECT BANK & PATTERN TEST
MSG030
*BANK (0-177)2?
:READ AN OCTAL NUMBER ONTO THE STACK
BANK
JPUT IT IN BANK

IF BANK GT LASTBANK THEN GOTO 18’

11786 047046 006301

11792 047066
11793 047072
11794 047074
11795 047100
11796 047110
11797 047116
11798 047122
11799 047124
11800 047126

PUSH
MOV
TYPE
TYPE
RDOCT
POP

104511

004737

012737
012737

017700
042737
052777

013701

006301
006301
005037
005037
012737

012737

005237

044300

047510
000340

133374
000200
000100

060002
002232

;PATTERN(0-35)?
JREAD AN OCTAL NUMBER ONTO THE STACK
JPUT IT IN PATTERN
:CHECK FOR PATTERN TO HIGH

MAP
BANK
INVALIDATE

;MAP SUPERVISOR SPACE

CALL
EXBANK
IF RRFLAG IS TRUE
TYPE
MSG049
GOTO CMDSC
END :OF IF RRFLAG

YPE
MOV
MOV

000060
000062

MOV
BIC
8Is

177776
133356

002100
002232
002256
060000

TYPE
MSG042
RDOCT
POP
PATTERN
IF PATTERN GT #35 THEN GOTO 2%
IF PATTERN EQ #0
TYPE
MSGO43
RDOCT
POP
R2
END ;OF IF

CMDSB:

002362

002364

SET

MOV

ASL
ASL
CLR
CLR
MOV

MOV

MSG046
#CMD5C, TKVEC
#3640, TKVEC+2

JPATTERN 0 DATA ]S?
:READ AN OCTAL NUMBER ONTO THE STACK
*PUT IT IN R2

(TEST AREA)

:SET NEW MARGINS

;BANK REQUIRES RELOCATION

:TO ESCAPE TYPE ANY KEY!

as$TKB,RO
#BIT7.PSW
AGIT6.a$TKS

HEADER ,MUT

BANK ,R{

R1
R1
SPLTCSR
PASFLG
#FIRST,TESTADD

NFIRST+2, TESTADD+2

IF #8IT12 SET.IN CONFIG+2(R1)
INC
SPLTCSR
MAP
BANK

;KILL ANY OLD INTERRUPT
:LOWER CPU PRIORITY TO 140
*ENABLE KEYBOARD INTERRUPTS

TO BANK

286

CZMSDCO MS11-L/M DIAGNOSTIC
)

COMMAND 5

11829 047324

11830 047332

012737

120000

012737
012737
913700
006300
004770
005037
000712

11846 047414
11847 047416
11848 047420
11849 047422
11850 047424
11851 047426
11852 047430
11853 047432
11854 047434
11855 047436
11856 047440
11857 047442
11858 047444
11859 047446
11860 067450
11861 047452
11862 047454
11863 047456
11864 047460
11865 047462
11866 047464
11867 047466
11868 047470
11869 047472
11870 047474
11871 047476
11872 047500
11873 047502
11874 047504

020122
020202
020322
020462
020714
021036
021172
021226
021270
021324
021372
021466
021542
021620
021666
021734
021756
023046
023320
023352
023416
023662
023730
024232
024716
025220
025410
025742
026130

11877 047510

013706

002266

117700

133046

004737
000207

044300

11878 047514

11879 047522

11880 047532
11881
11882
11883
11884
11885

047536
047546
047556
047572
047576

002364

MOV

IF #SWO SET. 1~ aswR
ECCDIS
ELSE
PUSH
CSRNO
CLRCSR
POP
CSRNO
END ;OF IF
MOV
#2 ,NOPAR
MOV
#2.PCBUMP
MOV
PATTERN,RO
ASL
RO
CALL
@FSPAT(RO)
CLR
NOPAR
BR
CMD58

104502
000002
000002
002110

002074
002276

047414
002074
FSPAT:

026302

MT0000
MT0001
MT0002
MT0003
MT000%
MT0005
MT0006
MT0007
MT0010
MT0011
MT0012
MT0013
MT0014
MT0015
MT0016
MT0017
MT0020
MT0021
MT0022
MT0023
M10024
MT0025
MT0026
M10027
MT0030
MT0031
MT0032
MT0033
MT0034

MT0035

000100

133060

0120000 TESTADD+2

END; OF IF #BITic

104470

042777

SEQUENCE 287

SELECT BANK & PATTERN

11831 047332
11832 047342
11833 047344
11834 0647346
11835 047352
11836 047354
11837 047360
11838 047360
11839 047366
11840 047374
11841 047400
11842 047402
11843 067406
}}g4§ 047412

}}g;g 047506

MACRO M1113 22-APR-81 14:13 PAGE g?S-‘l

CMDSC:

MOV

;<1 SEC
:<1 SEC
:<1 SEC
: 1 SEC
- 1 SEC
: 1 SEC
:<1 SEC
:<1 SEC
:<1 SEC
:<2 SEC
:<1 SEC
: 1 SEC
: 1 SEC
: 1 SEC
:<1 SEC
:<1 SEC
:<1 SEC
: 1 SEC
:10 SEC
:10 SEC
:20 SEC
:<1 SEC
:<1 SEC
: 1 SEC
: 1 SEC
: 3 SEC
:<1 SEC
:35 SEC
: 1 SEC

:<1 SEC

FSSTACK,SP

BIC

#8176,a87KS

MOVB

a$TkB,R0

POP

POP
POP
MAP
CALL
RETURN

rxvec+z TKVEC

PCBUMP, TESTADD
PATTERN,BANK
BANK
EXBANK

;DISABLE ERROR CORRECTION
;CLEAR CSRS
;PARITY ACTION
STRAPS 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
CREATE SINGLE BIT ERROR TEST
WRITE BYTE CLEARS SBE TEST
CREATE DOUBLE BIT ERROR TEST
WRITE INHIBIT DURING DATIP WITH DBE
WRITE INHIBIT OF BYTE WITH DBE
WRITE 1nuxaxr OF uoao uxru DBE
HOLDING
1°S ¢ 0°'S
T
MARCHING
1°S & o s 1~ CHECK BITS
MARCHING o s g 1'S TEST
REFRESH & SHIFTING DIAGONAL TEST
SHIFTING DIAGONAL TEST
FASTM GALLOPING PATTERN TEST
INTERRUPT ENABLE TEST
RANDOM DATA TEST
UNJIQUE 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

;RECOVER OLD STACK POINTER

:GET CHARACTER TO GET RID OF FLAG
:REMAP OLD BANK

CZMSDCO
MS11-L/M
DIAGNOSTIC
_ MACRQ M1113 22-APR-B1 14:13 PAGE 76
Fs
COMMAND 5
SELECT BANK & PATTERN
11887 047600

FSCMD6:

SUBTST

<<FS

COMMAND 6

SEQUENCE 288
TYPE CONFIGURATION MAP>>

.'tfittfifittttttfitQtttfitttt'ttiitfittttttttttt'ttfittttt"titittt'tfittt't'*'tttfifitti'

: #SUBTEST

COMMAND 6

TYPE CONFIGURATION MAP

"ttttttttttittfitttitt"tttttitfi*tttttfi*tfit*fi.Qt.ttttttttttttttttttitt'tittt".ti

11888 047600
Hggg 047604

004737
000207

036630

CALL
RETURN

PCONFIG

CZMSDCO MS11-L/M DIAGNOS T1C
FS

COMMAND 6

TYPE

MACRO M1113

14:13

FSCMD7: SUBTST
L

<<FS

COMMAND 7

SO8~A-LONG TEST>>

; *SUBTEST

COMMAND 7

SOB~A-LONG TEST

CONFIGURATION MAP

11893 047606

D_7

22-APR-81

PAGE 378

SEQUENCE

Ty P

Q4 047606
95 047632

96 047636

PUSH

002266

BANK ,PATTERN,
TKVEC, TKVEC+2 ,NOPAR

MOv
TYPE

SP,FSSTACK
MSGO55

IF _#SWO SET.IN @SWR

ELEgCDIS

;DISABLE ERROR CORRECTION

104502

CLRCSR
END ;OF IF

;CLEAR CSRS

TYPE

MSGO056

sBELL = EACH PASS COMPLETE

TYPE

MSGO046

:TO ESCAPE TYPE ANY KET!

047664
047670

050014
000340
132674
000200
000100

000060
000062

Mov
MoV
MoV
BIC
BIS

177776
132656

#CMD7C, TKVEC
#340,TKVEC+2
a$TKB,RO
#BIT7,PSW
#BIT6,A$TKS

SET

004737

044300

104511
004737

025220

CMD78:

jolelelels)
elelelela
NN
OO

wvilvauauaw

=lelelele

1 050076

FOR BANK := #0 TO LASTBANK
CALL EXBANK
IF ACFLAG IS TRUE AND RRFLAG IS FALSE
INVALIDATE

CALL MT0031

TYPE

$BELL

MoV
8IC
MOv8

FSSTACK,SP
#BIT6,a8TKS
a$TKB,RO

GOTO
002266
000100
132552

044300

sKILL ANY OLD INTERRUPT
;LOWER CPU PRIORITY TO 140
-ENABLE KEYBOARD INTERRUPTS

HEADER ,MUT

END ;OF IF ACFLAG
END ;OF FOR BANK

2 050012
5 050014

sSAVE LAST GOOD STACK POINTER
:SOB~A-LONG TEST

104470

VIS

B
b S
b d b 2 OO
WANNINONOND NNV
N
OVWNOWVIS
NN =OYVOON
OV~

OO O O O 0 Y0 O 0 YO 0 O 0 000000V
OO 00

010637

Q
(=]
o
o

NN —

D
D
b
D
D and
D and
d
d
and D
) o
D
D
D
b
D e
D b
D ad amd e wd =D ) e cd o
b b
b D ced i
d b
b )
D
b
b
)
)
b el =D b
e
D
b
b amd
D cocd
——d )
— e

047642
047652
047654
047656
047660
047660

D
b

b
D

OO0 O OO0 00

D
d

d =D
d e

SRARRARANAAAAAARAANAA
RN AR AAAA AN ARAAAARANAANRARANANARAAAAACRAANARAOANRA AN

132554

CMD7C:

POP
MAP

CALL

RETURN

CMD78B

sRING BELL

SRECOVER OLD STACK POINTER
¢cREAD CHAR TO KILL FLAG

NOPAR, TKVEC+2,TKVEC ,PATTERN,BANK
BANK
sMAP SUPERVISOR SPACE

EXBANK

(TEST AREA)

TO BANK

289

MACRO M1113 22-APR-81 14:13 PAGE %80

CZMSDCO MS11-L/M _DIAGNOSTIC
FS
COMMAND 7
SOB-A-LONG TEST
11934 050100

SEQUENCE

FSCMD8: SUBTST

<<FS§

COMMAND 8

ERROR SUMMARY>>

S «SUBTEST

COMMAND 8

ERROR SUMMARY

SARAARRAARARANAAAAN P PRAAAN

AR ARNARANRRARAARAARANNRARNLEANANNNNNRNANANR
AN RN ANANAY

;ttttttttttttttttttttt'tttttttttttttttttittfi'."Q."Q.Q'Q".'.t".'t"i."tttt't

013737
005337

063034
002404

005037

002304

013703
070327

002100
000004

116300
042700

002404

PUSH
MOV
DEC

TYPDEC

RO,R2,R3,BANK
$PASS
. TEMP
TEMP
TEMP

TYPE
MSG125
TYPDEC
SERTTL
TYPE
MSG079
IF SERTTL NE #0
CLR
SUCCESS
FOR BANK

;PASSES COMPLETED
;ERROR(S) DETECTED

:= #0 TO LASTBANK

MOV BANK,R3

MUL #4.R3

IFB_CONFIG+2(R3) NE #0
IF _SUCCESS IS FALSE
TYPE
MSGO76
SET SUCCESS
END ;OF IF SUCCESS
TYPOCS
BANK
.3

002626
177460

MOVB
BIC

TYPDEC
TYPE

CONF 1G+2(R3)
,RO
#~C377,R0
RO
$CRLF

END ;OF IFB CONFIG(R3)

END ;OF FOR BANK

000207

END ;OF IF SERTTL
POP
BANK,R3,R2,R0

RETURN

:BANK

ERRORS

290

CZMSDCO MS11-L/M DIAGNOSTIC
FS

COMMAND 8

MACRO M1113

ERROR SUMMARY

11964 050304

22-APR-81 14:13

FSCMD9:

SUBTST

F
7
PAGE 382

SEQUENCE

<<FS

COMMAND 9

REFRESH TEST>>

COMMAND 9

REFRESH TEST

:ttttttitfi'fittt.'ttttttt't"'t"tltfit.'fifitttttttttttttttt.ttttttttttt*ttttttt'tt

*«SUBTEST

;titi*ttt*tttfi.fi**tt"i"tttttt.ttitfit'tfi'iifit"fifi.fitt.fittt'ttttttt'tti"'iit'tt

11965 050304
11966 050330

11967 050334

11969 050340
11970 050350
11971 050352
11972 050354

11973 050356
11974 050356

010637

PUSH
MOV

002266

TYPE

BANK,PATTERN,TKVEC,TKVEC+2,NOPAR
SP,FSSTACK
;SAVE LAST GOOD STACK POINTER

MSG073

IF #SWO SET.IN @SWR
ECCDIS
ELSE

104470
104502

CLRUSR

END ;OF IF
TYPE'
MSGOS6

*REFRESH TEST

:DISABLE ERROR CORRECTION
:CLEAR CSRS

;BELL = EACH PASS COMPLETE

11976 050362
11977 050366
11978 050374

012737
012737

050512
000340

000060
000062

TYPE
MOV
MOV

MSG046
#CMDIC
, TKVE(
#340, TKVEC+2

;TO ESCAPE TYPE ANY KEY!

11980 050406
11981 050414

042737
052777

000200
000100

177776
132160

BIC
8IS

#BIT7.PSW
#BIT6,aSTKS

*LOWER CPU PRIORITY TO 140
*ENABLE KEYBOARD INTERRUPTS

11979 050402 017700

132176

MOV

11983 050422
11985 050436
11986 050442
11987 050446
11988 050462
11989 050464
11990 050470
11991 059470
11992 050504

SET
004737

044300

104511
004737

023320

CMD9B:

11393 050510

11995 050512
11996 050516
11997 050524
11998 050530
11999 050554
12000 050570
12001 050574

013706
042777
117700

002266
000100
132054

004737
000207

044300

132056

CMDSC:

a$TKAB,RO

;KILL ANY OLD INTERRUPT

HEADER ,MUT

FOR BANK := #0 TO LASTBANK
CALL EXBANK
IF ACFLAG 1S TRUE AND RRFLAG IS FALSE
INVALIDATE
CALL MT0022
END ;OF IF ACFLAG
END :OF FOR BANK
TYPE"
SBELL
:RING BELL

GOTO

CMD9B

%OV
BIC
MOVB
POP
MAP
CALL

FSSTACK,SP
:RECOVER OLD STACK POINTER
#BIT6,a$TKS
a$TKB.RO
;READ CHAR TO KILL FLAG
NOPAR, TKVEC+2, TKVEC ,PATTERN ,BANK
BANK
;MAP SUPERVISOR SPACE (TEST AREA)
EXBANK

RETURN

TO BANK

291

CZMSDCO MS11-L/M DIAGNOSTIC
)

COMMAND 9

MACRO M1113

REFRESH TEST

12005 050576

FCMD10: SUBTST
IR

s *SUBTEST

12006 050576
12007 050600
12008 050604
12009 050606

12010
12011
12012
}58}2

050610
050614
050620
050622

177760
002327

000207
FCMD11:

<<FS

FCMD12:

12023 050656
}Sg%g 050664

005037

SET
RETURN
RN AR

IRERRRE AR

002514
002514

12033 050710

s *SUBTEST

IR AR AN

050710
050714
050722
050724

FCMD14: SUBTST
RN

12034
12035
12036
12037
12038

013737
104423
000207

002516

002514

COMMAND 11
e

R AR

TYPE
MOV
CACHON
RETURN

ORISR

RN AN ENRARART AR

AR AR AR AT RN AN

COMMAND 12

R RN AR AR AN I

MSG102
KAMIKAZE

NRNRRN

RN IRANAREN RN AR A

ENTER KAMIKAZE MODE

EXIT KAMIKAZE MODE>>
AR AR RN AR

RN A RARARE AN RRRA R

EXIT KAMIKAZE MODE

AR AR IR RARRARRRRARRRNR RN

RE RN ARARAARAAR

AR ARACACAONEAR

;LEAVING KAMIKAZE MODE

SKIPKAM]

<<FS

COMMAND 13

AR AR RN RN

A AR R

AR AR R AR AR

COMMAND 13
RN

AR RN AR

TYPE
MSG106
CACHOFF
MOV
CACHKN, CACHKN+2
CLR
CACHKN
RETURN

002516

RN AR AN

ENTER KAMIKAZE MODE>>

TR AR AR AR AR AN AR AR A RRR

FCMD13: SUBTST

104424
013737
005037
000207

RN AR

<<FS

s *SUBTEST
12027 050666
12028 050672
12029 050674
12030 050702
}58;5 050706

SET FILL COUNT

JFILL COUNT(OCTAL)?

;*SUBTEST

SUBTST

TYPE
CLR

12026 050666

AR IR

COMMAND 11

NANERA RN

000207

AR R

RO
#%C17,R0
RO,SFILLS
RO

002004

COMMAND 10

AR AR

MSG101
:ENTERING KAMIKAZE MODE
KAMIKAZE
, SKIPKAMI

IRRRERARR NN AR

12021 050646
12022 050652

SET FILL COUNT>>

RN R AN R AN

TYPE
SET

RETURN

12020 050646

R AR R AN

RN R AR

NIRRT

SEQUENCE

COMMAND 10

IR RN

SUBTST

000207

RO
MSGO85

s *SUBTEST

}gg}g 050644

PUSH
TYPE
RDOCT
POP

<«FS

AR AN

BIC
MovB
POP
RETURN

12015 050624

12016 050624
12017 050630

104413

042700
110037

G 7
PAGE 384

22-APR-81 14:13

<<FS
R

TURN CACHE OFF>>

NN AN AR

RN RN

R AR

AR AR

MSG107
CATHKN+2,CACHKN

RR RN

ARARRNRARARRN
IARNARRNRARAAR

sCACHE IS OFF
:TURN CACHE OFF
sSAVE OLD CACHE ON STATE
:KEEP CACHE OFF

COMMAND 14

AN AR

TURN CACHE OFF

TURN CACHE ON>>

AR AR R TR R R AR RN R AR AR RN RN AR
AR

RN AR A NI RO

TURN CACHE ON
RN RN TR

NRNCRR AR

IRANR

AC AN AN AN RN RN NE NN E NN

NN
AN

sCACHE IS ON (EXCEPT DURING ACTUAL PATTERNS)
RESTORE OLD CACHE ON STATE
:TURN CACHE ON

292

CZMSDCO MS11-L/M DIAGNOSTIC
FS

COMMAND 14

MACRO M1113

TURN CACHE ON

12051
12052 050726

22-APR-81 14:13

H 7
PAGE 385

SEQUENCE

FCMD1S: SUBTST

<<FS

COMMAND 15

TEST ONLY SELECTED BANKS>>

:*SUBTEST

COMMAND 15

TEST ONLY SELECTED BANKS

293

;tt.ttfitt.tt*fiitfi.ttt't""*tttiifitttittttttt'ttt*tttititi.tttt"tt""titt't'tt

;tttttttfittfit'fittiiQt'*fitt'ttt'ttfitittittttttttfi.* (822222823232 222223232282223222322(Z,]

12053 050726
12054 050732
12055 050736
12056 050736
12057 050736
12058 050742
12059 050744
12060 050746
12061 050760
12062 050762
12063 050762
12064 050764
12065 050766
12066 050774
12067 050776
12068 050776
12069 051002
1%870 051010

004737

TYPE
MSG105
;ENTER BANKS IN OCTAL - USE NUMBER OUTSIDE RANGE TO TERMINAT
CALL
CMD16A
;ERASE OLD SELECTIONS
BEGIN CMD16LOOP
REPEAT
TYPE
MSGO30
:BANK(0-177)?
RDOCT
:READ AN OCTAL NUMBER ONTO THE STACK
POP R1
*PUT IT IN R
IF R1 GT #177 OR R1 LT #0
LEAVE CMD16LOOP
END ;OF IF R1
ASL “R1
ASL
R1
:R1 <= R1 ¢ 4
BIS #81T14,CONFIG+2(R1)
END :OF REPEAT
END CMD16L0OP
TYPE
MSG110
;ONLY SELECTED BANKS WILL BE TESTED
SET
SELONLY
RETURN

051022

104413

006301
006301
052761

040000

002626

000207

12072 051012

FCMD16:

SUBTST

<<FS

COMMAND 16

RESUME TESTING ALL BANKS>>

;ttt*tttttttttttttttt'i"ti*ttttfittttfittttitttttttttttttttttt't.tfi.'t.t""".'.

: «SUBTEST

COMMAND 16

RESUME TESTING ALL BANKS

;ttttittt'ttttttt.tfitttit'titttttttttt*ttttfitfittttttttttttltt"t.t"'ttt..."'.'

12073 051012
}58;2 051016

12076
12077
12078
12079
12080
12081
12082
12083

051022
051026
051030
051032
051034
051042
051052

005037

002000

013702
006302
006302

002526

042761

040000

000207

TYPE
CLR

002626

MSG111
SELONLY

;ENTRY POINT FROM CMD15
CMD16A: MOV
LASTBANK
,R2
ASL
R2
ASL
R2
FOR R1 := #0 TO R2 BY #4
BIC
#BIT14,CONFIG+2(R1)
END ;OF FOR R1
RETURN

;ALL BANKS WILL BE TESTED

CZMSDCO
MS11-L/M
DIAGNOSTIC
MACRO M1113 22-APR-81 14:13 PAGE &87
FS
COMMAND 16
RESUME TESTING ALL BANKS
12086 051054

FCMD17: SUBTST

<<FS§

s *SUBTEST

SRR

12087 051054
12088 051060
12089 051066

012737
000207

177777

006136

AR AR
AR

RN RN

TYPE
MOV
RETURN

SEQUENCE 294

COMMAND 17

NN AR RN

AN RN RN

COMMAND 17

MSG127
#-1,TRACE

ENABLE TRACE>>

RN R AR AN RN

ENABLE TRACE

RN RN

NN N

T AN AN TN E

TN AT

AR AR AR AN AN ER RNV

NN
AR

O N

NTRES

(ZMSDCO MS11-L/M DIAGNOSTIC
FS

COMMAND 17

MACRO M1113 22-APR-81 14:13 PAGE %89
FCMD18:
R

SUBTST

:*SUBTEST
IR

12094 051074

12095 051100

005037

000207

SEQUENCE 295

ENABLE TRACE

12092 051070

12093 051070

006136

RN RN

NE RN

TYPE

CLR

<<FS
T

RETURN

A AR R

MSG128
TRACE

COMMAND 18
e

DISABLE TRACE>>

COMMAND 18
R R

DISABLE TRACE

AR AR RN AR AN RN

N RN RN RN ANAN

NN RN RN RN

%HSDCO MS11-L/M DIAGNOSTIC
MACRO M1113
COMMAND 18
DISABLE TRACE
12098 051102

K 7
PAGE 391

22-APR-81 14:13

SEQUENCE

WHICHCSR:SUBTST <<SUBR

DETERMINE CORRECT (SR>>

S *SUBTEST

DETERMINE CORRECT CSR

MAASAAL

RAdRRRRR

SUBR

2220000

dR0

0202222

2200000000000 00002 0]

:tttttttttttttttttttttttttttttttttttttttttttttt'ttttttttttttttttttittttttititttt

12099 051102
12100 051106
12101 051112
12102 051114
}g}gz 051120

013700
022700
001003
005037
000207

12105 051122
12106 051126
12107 051130
12108 051132

011000

12110
12111
12112
12113

101370
022700
103002
162700

12109 051136

051140
051142
051146
051150

12114 051154

12115 051160
12116 051162
12117 051166

002216
100000
002146

020027

162700

006300
010037
000207

000106
000101

000007

000060
002146

TOTCSRS,RO
#BIT15.R0
1$
CSRNO

;GET CSR'S FLAG
‘CSR 0?
‘NO - SKIP
SYES = SET IT UP

TYPE
RDL IN
POP

MSG022

CMP

RO, #1064

;WHICH CSR(0-F)
*GET CHARACTER
*PUT IN RO
*PUT CHAR IN RO

RETURN

1$:

104412

MOV
CMP
BNE
CLR

28:

MOV

RO
(R0) ,RO

BHI
CMP
BHIS
Sus

18
#'A,RO
2%
#7.RO

ASL
MOV
RE TURN

RO
RO, CSRNO

su8

#60,R0

SCHECK LIMIT

*IF BAD LOOP TILL HE TYPES IT RIGHT

296

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR DATA (SUPERVISOR)

12666
12667
12668
12669
12670
12671
12672

051170
051202
051210
051216
051226
051226

SETUP STUFF

051234
051240
051242
051246
051246

106417

000137

LET GOOD := R2
ELSE
LET GOOD := R3
END OF IF
JMP
PERRAW

054450
PERRA3:

SUBTST

CNARA RN RN AR

: *SUBTEST
SRR

12690 051314

12691 051316
12692 051322
12693 051226
12694 051332
12695 051336
12696 051344
12697 051350
12698 051354
12699 051356
12700 051362
12701 051366
12702 051372
12703 051374
12704 051376
12705 05
12706 05
12707 0
12708
12709

SEQUENCE

IF 177654 EQ #0

051252

12681 051252
12682 051264
12683 051266
12684 051272
12685 051274
12686 051302
12687 051304
12688 051306
12689 051310

L 7
PAGE 406

22-APR-81 14:13

.SBTTL
ERROR DATA (SgPERVISOR) SETUP STUFF
$PER2S5: LET ADDRESS := R1
IF ABORTFLAG IS FALSE
TESTAREA
;ENTER TEST MODE
LET BAD := =2(R1)
KERNEL
;ENTER KERNEL MODE
END :0f IF ABORTFLAG

12673 051226

12674
12675
12676
12677
12678
12679
12680

MACRO M1113

<<DATA WAS 3 WORDS>>

RN A AN AR

AR AR AR AARARAN RN AR

DATA WAS 3 WORDS

RR AR AR RN AR A AR AN AN

R R AR AN

R AR

RN AN

RAR AN AN RN AT AN AANANRRARRAATARNES

RAA R ANANARNRNAARNANRR AR AN

A AN RAAANANA AN

IF BADPC EQ #0 THEN $CALL BADSTACK

005037
104505

002144

104426

CHK1DIS

002144
177773
177600

002042

TST
(R1)
KERNEL
READCSR
MoV
CSR,RO
CLR1CSR
ASH
#-5,R0

BIC
#°C177,
LET ADDRESS :=
CLR

600D

002050
002052

MOV
MoV

(R1) ,BAD
(R4) ,BAD?

002054
002055
054704

MOvB

RO,BAD3

TESTAREA

KERHEL

CLRB
CALL

ERROR
POP

104506

RO
CSR

TESTAREA

005711
104417
013700

PUSH
CLR

BAD3+1

sREAD LOCATION TO READ CHECKBITS INTO (SR
sGET CSR CONTENTS
sSAVE CSR CONTENTS IN RO
sRETURN CSR TO NORMAL MODE
+MOVE CHECK BITS TO BOTTOM OF WORD
sCLEAR OFF EXTRANEOUS GARBAGE
sSAVE VIRTUAL ADDRESS FOR PRINTOUT
sFIRST TEST WORD WRITTEN SHOULD ALWAYS BE ZERO
SENTER TEST MODE
:GET BAD DATA FROM MUT - FIRST WORD
sAND SECOND WORD

sENTER KERNEL MODE

sMOVE BAD CHECKBITS FOR PRINTOUT

PERBNK

:CLEAR OFF THE OTHER UNUSED BITS
sMARK BANK AS BAD IN CONFIG TARLE

;RESTORE RO

+33

IF #SW0 SET.IN @SWR

104472

ENASBE
ELSE
ECCINIT

000002

RTI

END; OF

IF #Sw0

;TRAP ON SINGLE BIT ERRORS
;TRAP ON UNCORRECTABLE ERRORS

297

CZMSDCO MS11~L/M DIAGNOSTIC

DATA WAS 3 WORDS
12712
12713
12714
12715
12716
12717
12718

051416
051422
051434
051442
051450
051456
051460

12721

051464

}gggg 051460

MACRO M1113

PAGE 408

SEQUENCE

$PER30: LET GOOD := R1
LET ADDRESS := (SP) - 16
IF ABORTFLAG IS FALSE
TESTAREA
;ENTER TEST MODE
LET BAD := @ADDRESS
KERNEL
;ENTER KERNEL MODE
END ;OF IF ABORTFLAG

106417

000137

22-APR-81 14:13

054450

JMP PERRAW

GETDATA:SUBTST

<<GET DATA FROM ABORTED AREA IF POSSIBLE>>

;ttttttttt.ttttttttttttitttttttttttttttttt.lltttttttttttttttttttttttttt'tttttttt

S *SUBTEST

GET DATA FROM ABORTED AREA IF POSSIBLE

;tttttttttt*ttttttt | 2233323322323 230223323222322323382232232322323221232322232323322232322224

12722 051464
12723 051476

12724 051502

12725
12726
12727
12728
12729
12730
12731
12732

051510
051516
051522
051530
051534
051536
051542
051546

12733 051560

12734 051562

010637

051562

012737
013700

051542
002032

012737

011037
104417
005037
013706
000207

000000

051542

PUSH
MOV

000004

MOV

0060114

002050
002140
051562

1$:

RO.4.114
SP.GETDA1

$,4

MOV
#18.114
MOV
ADDRESS ,RO
TESTAREA
MOV
(RO) ,BAD
KERNEL
CLR
ABORTFLAG
MOV
GETDA1,SP
POP
1144 R0
RE TURN

GETDA1: 0

;RESTORE KNOWN GOOD STACK POINTER

298

CZMSDCO MS11-L/M DIAGNOSTIC
POUER FAIL AUTO RESTART

MACRO M1113

12737
12738

22-APR-81

12740

POUER DOUN ROUTINE

12741 051564
12750 051564

12751
12752
12753
12754

051570
051572
051576
051600

12755 051606

12756 051614
12757

$PWRDN
005737

002514

104423
012737

052536

001403

012737

12758
12759
12760
12761
12762

051634
051640
051644
051646

077102

12763 051650

12764
12765
12766
12767

051654
051656
051662
051666

005737

12769
12770
12771
12772
12773

051672

12768 051670

12774
12775

12776
12777

051704
051710
051714
051720
051724
051726
051730

012700
012701

001013
012700
012701

000340
177700
000021

172300
000020

012703
011021

012022
077303

172300
177600
172200

000040

SEQUENCE

BEQ
PUSH
CACHON
MOV

MOV

CACHKN

5%
CONTRL

sTURN CACHE ON
#$I1LLUP,PWRVEC ..SET FOR FAST UP

#340, PWRVEC+2

:;PRIO:7

PUSH
RO.RT,R2.R3.Ré RS’ CSANO
;:SAVE USER PAR'S g PDR?

1$%:

002426

077102

012700
012701
012702

000026

S$:

. SAVE CACHE STATUS

000024

PAGE 410

POWER FAIL AUTO RESTART
ROUTINE POWER DOWN AND UP

12739

12749

.SBTTL
.SBTTL

14:13

MOV
#177700,R0
MOV
#7. ,R1
PUSH
=(RO)
s08
R1,18
s SAVE SUPERVISOR PAR'S

TST

2$:

PD1:

3%:

BNE
MOV
MOV
PUSH
SO8

NOSUPER

PD1
4172300 RO
n6.,
-(RO)
R1,2$

IF RLFLAG IS TRUE THEN SCALL WOOPS
;COPY KERNEL MAP TO USER & SUPERVISOR
MOV
#KIPDRO,RO
MOV
#UIPDRO,R1
MOV
#SIPDRO,R2

MOV
MOV
MOV
SOB

#32.,R3
(RO),(R1)+

(RO)+,(R2)+
R3.3$

2222222220222 %;

299

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE POWER DOWN AND UP
SN
NOON
ooO
o N NN

b
b
b vl
e
b e
d

~ SNNSNSNNSNNNSN

—

=lclalelolelelels]
el

~O W 0o 00 0o GO OO GO 00 OO 0O
= O 000 ~NO NS NN —

b
oD
d
d
b
D
b e
b
b md e
b
d ek
b

2796 052004

22-APR-81

14:13

8 8
PAGE 411

SEQUENCC

6??;5 USER & SUPERVISOR STACK POINTERS
MOV

010600
1044617

005737
001006

KERNEL
PUSH
TST

002426

010600
1044617
013701

USP,RO

;ENTER KERNEL MODE

RO
NOSUPER

7$
BNE
SUPERVISOR
MoV
SSP,RO
KERNEL
PUSH

002216

7%:

006301

104426

;ENTER SUPERVISOR MODE
sENTER KERNEL MODE

:SAVE ECC REGISTERS

MOV
TOTCSRS ,R1
sGET CSR'S
BEGIN
LCSRSAVE
FOR CSRNO := #0 TO #36 BY #2
ASL
R1
ON.ERROR
READCSR
PUSH

CSR

END ;OF ON.ERROR

ASIASIASTAS I NI ST N T NI ST N1 ST NI N1 S 0]

12779
780 0 5
5
5
5
?
5
7
5
4
5
7
5
7
5
7
5
7
7
5 1770
7 92 051774
7 93 051774
794 052000

MACRO M1113

IF R1 EQ #0 THEN LEAVE LCSRSAVE

12801 052034
12802
12803 052034
12804 052050
12805 052054
12806 052056
12807
12808 052062
12809 052066
12810 052072
12811 052074
12812

END ;OF FOR CSRNO
END LCSRSAVE

;SAVE MMRO,1,2,3

(05737
001002

002426

012700
012701

172400
000020

PUSH
TST

8s:
43:

077102

12813 052076
12814 052104
12815 052106
12816
12817 052116
12818
}53}8 052122

022737
001004

000001

010637

052542

12821 052126
12822 052134
12823 052136

012737
000000
000776

052140

BNE
PUSH

8s
MMR3

MoV
Mov
PUSH
s08

#172400,R0
#6. ,R1
-(R0O)
R1,4$

CMP

#1,PROTYP

:SAVE KERNEL PAR'S

;SAVE UNIBUS MAP REGISTERS

003716

BNE
PUSH

9%:

000024

MMRO,MMR1 ,MMR2
NOSUPER

$DOWN:

9s
MAPHO ,MAPLO

;IS THIS AN 11/44?

:BRANCH IF NOT

:SAVE POSSIBLE SOFTWARE SWITCH REGISTER

PUSH

aSWR

MOV

SP,$SAVR6

;. SAVE SP

$DOWN

; sHANG UP

s SAVE STACK POINTER

;NOW SET UP REAL VECTOR
MOV
#$PWRUP ,PWRVEC
;;SET UP VECTOR

300

—

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE POWER DOWN AND UP

MACRO M1113
A

012737

052536

000024

013706
005037
005237
001375

000001

004737

043704
172340
172300
000020

077406

052240
052244
052246
052252

002426

NN
NN
W
N

52
53
gk
5
Sg

108:

6$%:

N
N
~
~N

=lelelelele
o)

CMP

#1,PROTYP

sttt

POP
CALL

MAFLO ,MAPHO
LOWMAP

MoV
Mov

#172340,R0
#KIPDRO,R2

;1S THIS AN 11/44?

108

»SETUP LOWER 16K CF UNIBUS MAP

;RESTORE KERNEL PAR'S & PDR'S

MOV
POP
MOV
s08

#16. .R1
(RO)+
#77406, (R2)
+
R1,6%

BNE
POP
POP

118
MMR3
MMR2 ,MMR1 ,MMRO

Mov

TOTCSRS ,R1

sRESTORE ECC REGISTERS

;GET CSR'S

ASR
R1
ON.ERROR
POP
CSR
LOADCSR
END ;OF ON.ERROR

IF R1 EQ #0 THEN LEAVE LCSRRESTORE

LPrpr
g
gy

tiisd

GET SP

8IC
#177400,R1
BEGIN LCSRRESTCRE
FOR CSRNO := #36 DOWNTO #0 BY #2

172300
177600
172200
000040

#S$ILLUP PWRVEC ;;SET FOR FAST DOWN

END ;OF FOR CSRNO
END LCSRRESTORE
NNV =2NNIN
INO O NNNN

052354
052360
052362
052364

il ottt

:RESTORE MMR3,2,1,0
TST
NOSUPER

2
2 874
2 875
2 876
2 877

ittt

MOV
$SAVR6,
SP
CLR
$SAVR6
¢.WAIT LOOP FOR THE TTY
INC
$SAVR6
..UAIT FOR THE INC
BNE
18
A WORD
PgESTOREagogSIBLE SOFTUARE SUITCH REGISTER

BNE

006201

052340

iit

;RESTORE UNIBUS MAP

003716

860 052276

104425

iRl

;RESTORE STACK POINTER

11%:

052314
052316
052316
052322
052340

SRttt

MOV

858 052266

2865
2 866
2 867
2 868
2 868
287
5871

AAEALERE

SEQUENCE

:POWER UP ROUTINE
PWRUP;

1$:

022737
001006

00 00 00 00 00 00 00 oo
N%;NNUNHUHHUNMUN)
n
v

052170
842 052176
2843 052200
2844 052210
845

c 8
PAGE 413

22-APR-81 14:13

;COPY KERNEL MAP TO USER & SUPERVISOR

3s:

Mov
MOV
MoV
Mov
Mov
MOV

S08

#KIPDRO,RO
#UIPDRO,R1
#SIPDRO,R2
#32.,R3
(RQ), (R1)+
(RO)+,(R2)+

R3,3$

itiliiinsitilidssd)

301

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE POWER DOWN AND UP

12879
12880 052366
12881 052372
12882 052374
12883 052376
12884 052404
12885 052406
12886 052410
12887 052412
12888 052420
12889 052422
12890
12891 052424
12892 052430
12893 052434
12894 052436
12895
12896 052440
12897 052444
12898 052450
}2899 052452
2900
12901 052454
12902 052462
12903 052470
12904 052510
12905 052516
12906
12907 052522
12908 052526
12909 052530
12910 052534

12911 052536
12912 052540
12913 052542
12914

005737
001006

MACRO M1113

TST

BNE

13%:

172240
000020

7%:

KERNEL

POP
USER
MOV
KERNEL

MoV
MOV

#172240,R0
#16. ,R1

$08

R1,7$

;ENTER SUPERVISOR MODE
JENTER KERNEL MODE

RO,USP

POP

(RO)+

SRESTORE USER PAR'S & PDR7

177636
000021

8s:

077102

013777
013737

002010
002010

130116
000174

012737

051564

000024

005737
001402

002514

000000
000776
000000

13$

;ENTER KERNEL MODE
:RESTORE SUPERVISOR PAR'S

077102

000002

SEQUENCE

NOSUPER

POP
RO
SUPERVISOR
MOV
RO,SSP

010006
104417

012700
012701

D 8
PAGE 414

;RESTORE SUPERVISOR & USER STACK POINTERS

002426

010006
104417

012700
012701

22-APR-81 14:13

MoV
#177636,R0
MOV
#7..R1
POP
(RO)+
08
R1,8%
CRESTORE POSSIBLE SOFTWARE DISPLAY REGISTER
MOV
MOV

$SPATMAR,
@D 1SPLAY
$SPATMAR ;DI SPREG

MOV
TYPE

#SPURDN.PWRVEC
MSGO51

CACHKN

POP

CSRNO,RS
R4 ,R3,R2,R1,R0

;RESTORE CACHE STATUS

9%:

BEQ
S??

$ILLUP: HALT
BR
$SAVRG: OEVEN

;:SCT UP THE POWER DOWN VECTOR
‘REPORT THE POWER FAILURE

9s
CONTRL

$ILLUP

;. THE POWER UP SEQUENCE WAS STARTED

;. BEFORE THE POWER DOWN WAS COMPLETE
:sPUT THE SP HERE

302

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE POWER DOWN AND UP

MACRO M1113

12926 052544

22-APR-81 14:13

WOOPS:

SUBTST

E 8
PAGE 415

SEQUENCE

<<POWER FAIL WHILE RELOCATED>>

;tttttttttttttttttttttttttittttfitttttttttttttt.tttttttttttttttttttttttttittttttt

S *SUBTEST

POWER FAIL WHILE RELOCATED

:tttttltttttt'ttt'itt"t"ttttt*tltttfi.tttttttttttttttttttitttt'tttttttttttttttt

12927 052544
12928 052550
12929 (052554
12930 052570
12931 052576
12932 052604
12933 052612
12934 052624
12935 052632
12936 052640

005037

002100

013737
013737
_
012737
012737

060024
060026

053142
053144

052730
000340

060024
060026

12937 052652

012700

172340

12939 052662
12940 052666
12941 052670

012702
012021
077202

000010

12938 052656

12942
12943
12944
12945
12946

052672
052676
052700
052704
052710

12947 052714

12648 052720
12949 052722
12950 052726

012701

005737
001002
013721
013721
013721
013721

104417

000207

PUSH
BANK
CLR
BANK
MAP
BANK
;MAP SUPERVISOR SPACE
SUPERVISOR
;ENTER SUPERVISOR MODE
MOV
FIRST+PWRVEC, WOOPSAV
MOV
FIRST+PWRVE(+2,WOOPSAV+2
BMOV
FIRST+WOOPUP,WOOPSAV+4
, WOOPEND-WOOPUP/2+12.
MOV
#WOOPUP, F IRST +PWRVEC
MOV
#340,F IRST+PWRVEC+2
BMOV
WOOPUP,F IRST+WOOPUP, WOOPEND-WOOPUP/2

133112

177572

#KIPARD,RO

MOV
MOV
SO8

#8. ,R2
(RO)+, (R1)+
R2,18

MOV
1$:

002426
172516
177576
177574

MOV

28:

#F IRST+WOOPEND
,R1

ST
BNE
MOV
MOV
MOV

NOSUPER
28
MMR3, (R1) +
MMR2. (R1) +
MMR1. (R7)+

KERNEL
POP
RETURN

BANK

MOV

MMRO. (R1) +

;ENTER KERNEL MODE

(TEST AREA)

TO BANK

303

CZMSDCO MS11-L/M DIAGNOSTIC

POWER FAIL WHILE

RELOCATED

MACRO M1113

12953 052730

22-APR-81 14:13

<<POWER UP FROM BANK 0 TO RELOCATION>>

:*SUBTEST

POWER UP FROM BANK O TO RELOCATION

052730
052734
052740
052744

012700
012701
012703
012702

053112
172340
172300
000010

12959 052752

012723

077406

12958 052750 012021
12960
12961
12962
12963
12964
12965
12966
12967

052756
052760
052764
052766
052772
052776
053002
053006

077204
005737
001002
012037
012037
012037
012037
013706

172516
177576
177574
177572
052542

005037

002100

12972 053044
12973 053052
12974
12975

013737
013737

053142
053144

12977 053064
12978 053070
12979 053074

012701
012702
012022

012700

053146

12982
12983
12984
12985

104417

12968 053012

12969 053016
12970 053022
12971 053036

12976 053060

}Sggq 053076
053100
053102
053106
053112

12988 053142

077102

000137
000014

000107

1$:

002426

000105
132730

052140

SEQUENCE

WOOPUP: SUBTST
R

12954
12955
12956
12957

F 8
PAGE 417

3s:

MOV
MoV
Mov
MOV

#WOOPEND
,RO
#KIPARO,R1
lKlPDRO R3

MoV

#77406 (R3)+

MOV
s08
TST
BNE
MoV
MoV
MoV
Mov
MoV

PUSH

e
Y

P
T

2%:

Mov
MoV
MoV

so8

KERNEL
POP
JMP
WOOPEND
: .REPT

WOOPSAV: .REPT

ST T

R2,18
NOSUPER
3s
(RO)
+ ,MMR3
(RO)
+ ,MMR2
(RO)
+ ,MMR1
(RO) +,MMRO
$SAVR6,
SP

BANK

sMAP SUPERVISOR SPACE (TEST AREA)
;ENTER SUPERVISOR MODE
MoV
WOOPSAV, F IRST+PWRVE(
Mov
WOOPSAV+2,F IRST+PWRVE(C+2
:SIMULATE THE FOLLOWING BLOCK MOV BUT WITH NO STACK ACCESSES
:BMOV
WOOPSAV+4 F IRST+WOOPUP, WOOPEND-WOOPUP/2+12.

MOV

(ROS* (R1)+

CLR
BANK
HAP
BANK
SUPERVISOR

060024
060026

#MJOOPSAV+4 RO

MJIOOPEND-WOOPUP/2+12.
,R1
#F IRST +WOOPUP
,R2
(RO)+,(R2)+

R1,2%

BANK
$PWRUP
12

sENTER KERNEL MODE

WOOPEND-WOOPUP/2+12.+2

TO BANK

304

CZMSDCO MS11-L/M DIAGNOSTIC
10 SUBROUTINES

MACRO M1113

22-APR-81 14:13

G 8
PAGE 419

SEQUENCE

}sggz

.SBTTL

10 SUBROUTINES

}%ggg

.SBTTL

ROUTINE TYPE

12997

SRR ARRRAARAA AR

12998
12999

:*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 BYTE.
;*THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED.

A AARRA AR

R AR ARARA AN

13000
13001
}ggg%

;*NOTE1:
S*NOTE2:
*NOTE3

13004
13005
13006
13007

'CALL
t1) USING A TRAP INSTRUCTION
TYPE
MESADR
*OR

13009

MESADR

$TYPE:

TSTB
BMI
Mov
MOV

13008

13011

13012
13013
13014
13015

053360
053364
053
053370

13016 053374
13017 053376
13018 053400
13019 053402
13020 053404
13021 053410
13022 053412
13023 053416
13024 053420
13025 053424
13026 053430
13027 053432
13028 053434
13029 053436
13030 053440
13031 053444
13032 053446
13033 053452
13034 053456
13035 053460
13036
13037 053464
13038 053470
13039 053472
13040 053476
13041 053502
13042 053504
13043 053506
13044 053510
13045 053514
13046 053520
13047 053522
13048 053526
13049 053530

105737
100407
010046
017600

112046
001005
005726
012600
062716
000002
122716
001002
112716
122716
001006
005726
002620
105037
000753
004737
123726
001346
013746

002330

000002

1$:

4$:

000002

5%:
6%:

000011

7$:

000040
000200

118:

053672

053506
002612

8s:
9s:

002326

105366
002770
004737
105337
000770
000000

000001

116601
005737
001402

000004
002514

104424

053506
053672

108:

AR AN RAAEARANNANANAAAN RN AARACERAANRAAAACNEAS

$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER.
SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED.
$FILLC CONTAINS THE CHARACTER TO FILL AFTER.
scMESADR IS FIRST ADDRESS OF AN ASCIZ STRING

TYPE

MovBs
BNE
TST
MoV
ADD
RTI
CMPB
BNE
MOvVB
CMPB
BNE
TST
TYPE
$CRLF
CLRB
B8R
CALL
CMPB
BNE
Mov

DECB
BLT
CALL
DE(CB
BR
XOCHAR: .WORD 0
$TYPEC: PUSH
MOvB
TST
8EQ
PUSH
28:
PUSH
CACHOFF

STPFLG
63
RO,<(SP)
82(SP) RO

;;1S THERE A TERMINAL?
:BR IF NO
::SAVE RO
;;GET ADDRESS OF ASCIZ STRING

#HT, (SP)
118
#' ,(SP)
#CRLF, (SP)
8s
(SP) +

sREPLACE TAB WITH SPACE
;:BRANCH IF NOT <CRLF>

(RO) +,~(SP)
78
(SP) +
(SP) +,RO
#2,(SP)

$CHARCNT
43
$TYPEC
$FILLC,(SP)+
43
SNULL ,=(SP)

1(SP)
93
$TYPEC
$CHARCNT
108

R1
4(SP) ,R1
CACHKN
2%
CONTRL
RO

s sPUSH CHARACTER TO BE TYPED ONTO STACK
s:BR IF IT ISN'T THE TERMINATOR
::1F TERMINATOR POP IT OFF THE STACK
:;RESTORE RO
..ADJUST RETURN PC
sRETURN
:BRANCH IF NOT <HT>

;;POP
<CR><LF> EQUIV
s:TYPE A CR AND LF
s CLEAR CHARACTER COUNT
soGET NEXT CHARACTER
:.G0 TYPE THIS CHARACTER
soIS IT TIME FOR FILLER CHARS.?
s.1F NO GO GET NEXT CHAR.
:.GET # OF FILLER CHARS. NEEDED
:sAND THE NULL CHAR.
:.DOES A NULL NEED TO BE TYPED?
::BR IF NO-~GO POP THE NULL OFF OF STACK
;.60 TYPE A NULL
::D0O NOT COUNT AS A COUNT
. .LOOP

:TURN CACHE OFF

305

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE

13074
13075
13076
13077
13078
13079

13080
13081
13082
13083
13084
13085

13086
13087
13088
13089
13090
13091
13092

TYPE

053532
053536
053540
053544
053550
053552

22-APR-81

14:13

TSTB
BPL

a$TPS
3%

053504

053560
053566
053574
053576
053602
053604

053612
053620
053630
053632
053634
053636
053636

MACRO M1113

XOCHAR
a$TKS
NC

8IC

#4177, XOCHAR

BNE

MOVB

@$TKB,XOCHAR

MOVB

CONTS3: TSTB
BPL

126774
177600

BR
ELSE

000760
110177
122766
001003
105037

126746
000015

000000

005737
001402
000207

000002

NC:

053672
000012

002514

a$TKB,XOCHAR

XOCHAR
, #023

a$TKS
CONTS3

BIC
#4C17% XOCHAR
IF XOCHAR EQ #21

000402

CMPB
BNE

18:

B8R

CMPB
BEQ
INCB
$CHARCNT: .WORD
STYPEX: POP
831

28:

#CR,2(SP)
18
S$CHARCNT

$TYPEX

#LF.,2(SP)
$TYPEX
(PC)+
0
RO
CACHKN

BEQ

POP

;;CHECK FOR XOFF
2sSKIP IF NO CHARACTER
;:SAVE THE CHARACTER
;sSTRIP OFF ASCII
;;WAS IT A CONTROL S?
:JBRANCH IF NOT
;cWAIT FOR CHARACTER

:sGET CHARACTER
;:STRIP OFF ASCII
22 IF IT IS A “Q

CONTS3

END ;OF IF XOCHAR
MOVB
R1,a$7PB
CLRB

000002

SEQUENCE

;;WAIT UNTIL PRINTER IS READY

CLR
TSTB
BPL

CMP

127000

H 8
PAGE 419-1

CONTRL

RETURN
SUPLIMIT:;
! 1!
IETITHIS

¢:LOAD CHAR TO BE TYPED INTO DATA REG.
::1S CHARACTER A CARRIAGE RETURN?
: BRANCH IF NO
::YE?--CLEAR CHARACTER COUNT
sEXIT

:-1S CHARACTER A LINE FEED?
s :BRANCH IF YES
s COUNT THE CHARACTER
s s CHARACTER COUNT STORAGE
c1S THERE A CACHE?
sBRANCH IF NOT
sPOP CACHE STATUS
IS THE LIMIT ON SUPERVISOR MAPPED TO MUT SPACE

306

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR DATA SETUP

MACRO M1113

22-APR-81

USE THIS
PERRO1

N T
IR I IS
I
N TR TN
NN
L

SEQUENCE

ERROR DATA SETUP

IF THIS CONDITION DISCRIBES THE ERROR
TRAP

BAD DATA IN RO UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY =-(R4)

PERRO2

TRAP

BAD DATA IN R1 UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY =(R4)

GOOD DATA IN R2
PERRO3

PERRO4

TRAP

BAD DATA IS POINTED TO BY =(R1)
GOOD DATA IN R4
TRAP

BAD DATA IN R4 UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY -2(R0O)

GOOD DATA IN R2
PERROS

N PN TR PR
FE FE FE FE FEFE PR FE
FEP
NPN
S PN

822

IFA TRFEAFEFEFENENE
FEFE FE TRFEFEFE

POR) = b b b o md b b =
=2 OV
NO N
(NN =

b
b
b
b cmd
)
=D
b

b amd
d

WWN W

o e
—d

[_8
PAGE 434

GOOD DATA IN R5

TN I
IS TR TS TP TP YR YO TP
I

.SBTTL

14:13

JSR

BAD DATA IS POINTED TO BY -(RO)
GOOD DATA IN R2

RETURN AFTER SETTING UP GOOD,BAD,ADDRESS

PERRO6

JSR

BAD DATA IS POINTED TO BY -(RO)

300D DATA IS ZERO
RETURN AFTER SETTING UP GOOD,BAD,ADDRESS

PERRO?7

TRAP

BAD DATA IN R2 UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY

GOOD DATA IN DATBUF

PERR10

(R1)

TRAP

BAD DATA IN R2 UNLESS ABORTED

THEN BAD DATA IS FOINTED TO BY 2(R1)

GOOD DATA IN DATBUF
+2
PERR11

TRAP

BYTE TEST

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY

GOOD DATA IS A ZERO BYTE

PERR12

TRAP

BYTE TEST
BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED
T HEN BAD DATA 1S POINTED TO BY

GOOD DATA IS A BYTE OF ONES

PERR13

(RM

TRAP

BAD DPATA IN RO UNLESS ABORTED

(R1)

307

¢2-APR-81 14:13

THEN BAD DATA IS POINTED TO BY (R1)

PERR14

TRAP
BAD DATA IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY (R1)
GOOD DATA IS ONES

PERR15

TRAP

BAD DATA IN RO UNLESS ABORTED

THEN BAD DATA IS POINTED TO 8Y

GOOD DATA IN TSTDAT

(R1)

PERR16

PERR17

PERR20

TRAP

BAD DATA IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO 8Y (R1)
GOOD DATA IN TSTDAT+2
TRAP

BAD DATA IN RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO 8Y (R1)
GOOD DATA IN R2
TRAP

BAD DATA IN RO UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY

GOOD DATA IN R3
PERR21

(R1)

TRAP

7 BIT BYTE TEST
BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED
THEN BAD DATA IS POINTED TO BY

GOOD DATA IS A 7 BIT BYTE ON ONES

(R1)

PERR22

THEN BAD DATA IS POINTED TO BY

PERR23

L I P

THEN BAD DATA IS POINTED TO BY

PERR24

(R1)

TRAP

BAD DATA IN RO UNLESS ABORTED
GOOD DATA IN R4

(R1)

TRAP

BAD DATA IN RO UNLESS ABORTED

THEN BAD DATA IS POINTED TO BY

GOOD DATA IN R3

(R2)

LILISLI

IR NS

TRAP

BAD DATA IN R2 UNLESS ABORTED
GOOD DATA IN RO

L P
PR I

IS IS P
I IR

PR T
IO P IR PR IS IR TS
PN IS TP

TP TS TR TR YR
TP YPS

SEQUENCE

GOOD DATA IS ZERO

PERR25

TRAP

BAD DATA POINTED TO BY -(R1)

GOOD DATA IN R2 UNLESS LOC V177654 IS SET
THEN GOOD DATA IS IN R3

PERR26
LI

nd
b
b
)
)
d
b wed
b
— e

NN N N NN N NN
Qo 000000 0o 0o 00 00 Mo
oi
OOV NOCWN
S WIN

YPO TS

13845
13846

MACRO M1113

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR DATA SETUP

J_ 8
PAGE 434-1

TRAP
BAD DATA IS DOUBLE WORD POINTED TO BY R1

GOOD DATA IS 000000,,100000,,100

AND IN LOW 7 BITS OF RO

308

CZMSDCO MS11-L/M DIAGNOSTIC
ERROR DATA SETUP

MACRO M1113

22-APR-81

PERR27

:
*

PERR30

PERR31

PERR32

PERR33

PERR34

N N od —d = e b o d o3
nN) - OV
~NONWNES W ~nN

d
b
b e
b wed
b o
b
d

;
;
:
:

—d

N NN
NN N N AN NN
OO O 00V
O OO0 0

;
;

PERR3S

:
;

128:

14:13

K_8
PAGE 434-2

SEQUENCE

TRAP

BAD DATA IS DOUBLE WORD POINTED TO BY R1 AND IN LOW 7 BITS OF RO

GOOD DATA IS 000000, ,000000,,077
TRAP

BAD DATA IS POINTED TO BY -16(SP)
GOOD DATA IS IN R1

TRAP

SPECIAL ECC FAILURE HANDLER

TRAP

SPECIAL ECC FAILURE HANDLER

TRAP

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

309

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR DATA SETUP
13932 053714

13933 053720
13934 053726
13935 053732
13936 053736
13937
13938 053742
13939 053746
13940 053754
13941 053760
13942 053764
13943
13944 053770
13945 053774
13946 0564002
13947 054006
13948 054014
13949
13950 054020
13951 054024
13952 054032
13953 054036

002032

002032
000902
002042
177776
054450
002032
000002
002050
002042
054450

}335? 0564042
395

13956 054046

13957 054052
13958 054056

15959 054062
13960 054066
13961 054072

13962
13963
13964
13965
13966
13967

MACRO M1113

22-APR- 81 14:13

002032

$PER02: MOV
sus

R4 ,ADDRESS
#2 ,ADDRESS

002032

$SPERO3: MOV
sus

R1,ADDRESS
#2 ,ADDRESS

002050

MOV

=2(R1) ,BAD

002032

MOV
R1,BAD
MOV
R2,GO0D
JMP PERRAW

MOV

R4, GOGD

JMP PERRAW

$PERO4: MOV

RO,ADDRESS

sus

#2 ,ADDRESS

002042
002050
002032
000002
040166

PERRO5: MOV
PERAOS5: MOV
MOV

R2,G00D
-(R0) ,BAD
RO,ADDRESS

MOV
MOV
JMP

ADD

005037
000764

002042

PERRO6:

054102
054106

010137
010237
013737
000137

002032
002050
002234
054450

$PERO7: MOV

054450

R4 ,BAD
R2,G00D
PERRAW

CALL
RETURN

002042

CLR

MOV

JMP

#2,R0

BADSTACK

600D

PERAOS

R1,ADDRESS
R2,BAD

DATBUF ,GOOD

PERRAW

$PER10: LET ADDRESS := R1 + #2
LET BAD := R
LET GOOD := DATBUF+2
JMP

PERRAW

$PER11: LET ADDRESS := R1
LET BAD := RO
13979
13980
13981
13982
13983
13984

054170
054174
054200
054204
054212

000137

054522

LET GOOD := #0
JMP

PERRAB

SPERI2: LET ADDRESS := R1
tE¥ BAD := RO

000137

054522

SEQUENCE

$PERO1: MOV
R4 ,ADDRESS
sus
#2 ,ADDRESS
MOV
RO,BAD
MOV
R5,G0O0D
JMP PERRAW

054074
054100

000137

L_8
PAGE 436

JMP

:= #377
GOOD
PERRAB

;RESTORE RO

310

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR DATA SETUP
13987 054216
13988 054222
13989 054226

13990 054232
13991

054302
054306
054312
054320

14007
14008
14009
14010

054322
054326
054332
054336

bgbbbbbbbbbl\b
[elelelelelelolelelele)
N

N b b = b b b b =D b
n - OV
~NOWNES W=

13992
13993
13994
13995
13996
13997
13998
13999
16000
14001
14002
14003
14004
14005

W
&»H

023
4024
4025
6
6027
4028
4029
4030
4031
4032
4033
034

0564236
054242
054246
054254
054260
054264
054270
054276

056340
054344
054350
054354

054356
054362
054366
054374

000137

054414
054420
054424
054430

054432
054436
054442

4035 054446

ADDRESS

054450

PERRAW

ADDRESS

GOOD := ONES

054450

PERRAW

ADDRESS := R1
BAD := RO
GOOD := TSTDAT

054450

PERRAW

$PERY6:

ADDRESS 6= R1
BAD := R

GOOD := TSTDAT+?

000453

PERRAW

$PERT7:

ADDRESS

:= R1

BAD := RO
GOOD := R2

000444

PERRAW

$PER20:

ADDRESS

:= R1

BAD := RO
GOOD := R3

000435

PERRAW

$PER21:

ADDRESS

:= R1

ADDRESS

:= R1

BAD := RO
GO0OD := m177
PERRA?7

000477

SPER22:

BAD := R2
GOOD := RO

000416

PERRAW

$PER23:

ADDRESS

:= R1

BAD := RO
600D

000407
$PER24:

000400

:= R1

BAD := R0

$PER1S:

000137

:= R1

BAD := RO
GOOD := #0

$PER14:

000137

m_8
PAGE 438

22-APR-81 14:13

$PER13:

054376
054402

054406
054412

MACRO M1113

:= R4
PERRAW

ADDRESS

:= R2

BAD := RO
GOOD := R3

PERRAW

SEQUENCE

311

CZMSDCO MS11-L/M DIAGNOSTIC
ERROR DATA SETUP
14037 054450

MACRO M1113

22-APR-81

PERRAW:

SUBTST

:tttttti LA A2l

*xSUBTEST

14038 054450
14039 054454
14040 054466
14041 054500
14042 056504
14043 054512
14044 054514
14045 054516
14046 054520
}2827 054520

004737

054704

004737

054660

14:13

N_8
PASGE 439

SEQUENCE

<<DATA WAS A WORD>>
E Al el sl

id il

DATA WAS A WORD

22222222222 2222228231221 1]

.'tttttQttQttt.t'ittttfitt't't.tttttttt't'tt".’"i.Q....'..Q't".i.."'t"'t'.'tt'

CALL
PERBNK
IF ABORTFLAG IS TRUE THEN $CALL GETDATA
IF BADPC EQ #0 THEN SCALL BADSTACK
CALL
PERXOR
IF _ABORTFLAG 1S FALSE
ERROR +11
ELSE

104011
104012

ERROR +12
END ;OF IF ABORTFLAG
RTI

000002

14049 054522

PERRAB:

SUBTST

<<DATA WAS A BYTE>>

N 'tttttitttfi'tt'ttfittfi't"tt.iQ'tttttt'fii..t.it'.tlittt'.t.ti.ttttt*."'.t..'."

:«SUBTEST

14050 054522
14051 054526
14052 054540
14053 054552
14054 054556
14055 054564
14056 054566
14057 054570
14058 054572
14059 054572

004737

054704

004737

054660

104014

104015
000002

DATA WAS A BYTE

.'tttttttt’tittttttfit.i"'t"tttit'.t'l’fitfittt*.tttttt.'tttit'.'."..Qt't.t"..'fl'

CALL
PERBNK
IF ABORTFLAG IS TRUE THEN SCALL GETDATA
IF BADPC EQ #0 THEN SCALL BADSTACK
CALL
PERXOR
IF ABORTFLAG IS FALSE
ERROR +14
ELSE
ERROR +15
END ;OF IF ABORTFLAG
RTI

312

CIMSDCO MST11~-L/M DIAGNOSTIC

DATA WAS A BYTE

MACRO M1113

14062 054574

22-APR-81

PERRA7:
R

SUBTST

14063 054574
14064 054606
14065 054612
14066 054616
16067 054620
16068
16069 054622
14070 054630
14071 054636
14072
14073 054642
14074 054646
14075 054654
14076
14077 054660

004737
004737
104022

AN AN

PAGE 441

SEQUENCE

<<DATA WAS A 7 BIT BYTE>>

s*SUBTEST

14:13

DATA WAS A 7 BIT BYTE

AN AR

N R RN AR

RN AN AN

R N AN NNV

TNERN OGN ARNORNER

IF BADPC EQ #0 THEN SCALL BADSTA(K

054660
054704

CALL
CALL

ERROR

000002

RT]

PERXOR
PERBNK

+22

$PER26: LET GOODZ2 := #100000

000137

051252

005037

002044

000137

051252

LET GOOD3 := #100
JMP PERRA3

$PER27: (LR
G0o0D2
LET GOOD3 := #077
JMP PERRA3
PERXOR:

SUBTST

<<DETERMINE XOR OF GOOD & BAD>>

SARRRANRRAANARAARAAAANAIRARNNNANANARAARARNANNAARNANNNRRNNANAARAERARARNAANAARAANNARNAOARNEY

: *SUBTEST

DETERMINE XOR OF GOOD & BAD

:ttttt't.QQfi'ttt..ttt't"ittttttttttittt..t.tfi.'tltt't'tt'itl.l.ttt"'tt't't."t

14078 054660
14079 054662

14080 054666

14081 054674
14082 054700
14083 054702

013700
013737
074037
000207

002042
002050
002056

002056

PUSH
MOV
MOV
XOR
POP

RETURN

RO
600D ,RO
BAD,BADXOR
RO,BADXOR
RO

313

CZMSDCO MS11-L/M DIAGNOSTIC

DETERMINE XOR OF GOCD & BAD

MACRO M1113

14086 054704

PERBNK:

AARA

14102
14103
14104
14105
14106

002100
000001
002626
002626
002626

002624

002524

118:

000207

054764
054770
055000
055006
055010

010037

002050

013737

002240

002042

013737

002242

002042

14108 055016
14109 055022
}2}}? 055030

004737

054660

14107 055016

14112
14113
14114
14115
14116
14117
14118
14119
14120
14121
14122
14123
14124
14125
14126
14127

055032
055044
055050
055060
055062
055062
055072
055074
055074
055104
055106
055106
055116
055120
055120
055126

12$:

104037

104042
104043

104044
000002

054764

ANV R

R AR

AN RARARAAAAAEANRARNRNANAAAARNRENRARNANRCRARENS

;WHILE WE'RE HERE LET'S MARK THE BAD BANK IN THE CONFIGURATION TABLE
PUSH
RO,R1
MOV
BANK,R1
ASL
R1
ASL
R1
BIS
#B1T0,CONFIG(R1)
INCB
CONFIG+2(R1)
:BUMP BANK COUNTER
BNE
128
:NO OVERFLOW - SKIP
DECB
CONFIG+2(R1)
:SET BACK T0 255.
(MPB
CONFIG+2(R1),ERRMAX
;1S IT PAST MAX?
BLOS
11$
INO - SKIP
SET
TOOMANY
:YES
POP
R1,R0
RETURN

PERECC: MOV
RO,BAD
IF ADDRESS EQ TESTADD
MOV TSTDAT,GOOD
ELSE
MOV
TSTDAT+2,GOOD
END ;OF

CALL"
SET
RETURN

000207
004737

AN AR RANNNAARNRANARNANANARANNAARAANRAAAR
AR
RAARAARNOOES

LOG ERROR ON BAD BANK

SRR AR AR RN RN R AR RARN

013701
006301
006301
052761
105261
001002
105361
126137
101403

SEQUENCE

SUBTST<<LOG ERROR ON BAD BANK>>

SRAARANRRNRANAA RN

L +SUBTEST
14087
14088 054704
14089 054710
14090 054714
14091 054716
14092 054720
14093 054726
14094 054732
14095 054734
14096 054740
14097 054746
14098 054750
14099 054756
}2}8? 054762

.9
PAGE 443

22-APR-81 14:13

$PER31:

(R1)

PERXOR
HEADER

IF BADPC EQ #0 THEN $CALL BADSTACK
CALL
PERECC
IF REALPAT EQ #11

ERROR +37
END ;OF IF REALPAT
IF_REALPAT EQ #14
ERROR +42
END ;OF IF REALPAT
IF_REALPAT EQ #15
ERROR +43
END ;OF IF REALPAT
IF _REALPAT EQ #16
ERROR +44
END ;OF IF REALPAT
SET HEADER
RTI

314

MACRO M1113

22-APR-81

OoNNVoONNVO

SPER32:

OSHOO0N
W

$PER33:

104001

000002

IF BADPC EQ #0 THEN SCALL BADSTAIK

MOV
Mov
CLRB
MoV
CALL
SET

R1,ADDRESS
RO,BAD
BAD+1
#377,600D
PERXOR
HEADER

SET
RTI

HEADER

+41

ELEEROR +16

;NO SBE OR DBE

ERROR +1
END ;OF IF #BIT15!BIT4

JEXPECTEC SBE SO DBE MUST HAVE GOTTEN SET

RTI

004737
004737
013737
012737
104047
062706
000207

054704
040166
002030
000072

010037
010137

002042
002050

000002

HEADER

$PER34:1F BADPC EQ #0 THEN $CALL BADSTA(K
IF #BIT15!BIT4 OFF.IN CSR

104016

104023

SEQUENCE

IF BADPC EQ #0 THEN $CALL BADSTACK
R1,ADDRESS
RO,.BAD
R2.,GO0D
HEADER
+40
ERROR

ERROR

000002

0 9
PAGE 445

MOV
MOV
MOV
SET
SET
RTI]

002032
002050
002051
000377
054660

14:13

000004

$PER35:

:DURING BRANC: GOBBLE THE CONDITION CODES WERE WRONG
PERBN

CALL

MOV

MOV
ERROR
ADD

RETURN

$PER36: MOV
MOV
SET

ERROR
SET

RTI

BADSTACK

BADPSW,BAD

#Z;.GOOD
+
#4,SP

RO, GOOD
R1.BAD
HEADER

+23

HEADER

sFIX STACK FROM TRAP
;ABORTING TEST

315

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE SCOPE HANDLER

MACRO M1113

14175

22-APR-81 14:13
.SBTTL

E 9
PAGE 447

SEQUENCE

ROUTINE SCOPE HANDLER

11,1 76

;ttttttttttttttt!ttttt't'ttttttttttttttttt*tt'tttttt'ttttttttt'tttttttttt'tt'tt.

16177
14178

s*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT
;~AND LOAD THE DISPLAY DATA INTO THE DISPLAY REGISTER

16181
14182
14183
14184 055374
14185 055400
14186 055402
16187 055406
146188 055412
16189 055412
14190 055414
14191 055420
164192 055422
164193 055426
14194 055426
14195 055432
16196 055434
16197 055442
164198 055450
14199 055452
14208 055454
14209 055472
14210 055476
14211 055502
164212 055502

;*SW9=1 LOOP ON ERROR
s«CALL
M
SCOPE
;;SCOPE=]10T
$SCOPE: INC
$DEVCT
JTELL APT WE ARE ALIVE
IF RESULT IS LT
CLR
SDEV(T
INCB
SUNIT
END :OF IF RESULT
CKSWR
;:TEST
FOR CHANGE IN SOFT-SWR
TST
TRACE
BEQ
NOTRCE
CALL
CONTT
:TRACE
NOTRCE:
TST
CPERRF
;1S THERE A CPU ERROR REGISTER?
BEQ
SKJ
JBRANCH IF NOY
MoV
a#177766,CPSAVE ;GET CONTENTS Of ERROR REGISTER
BIT
#BITO,CPSAVE
;1S THE POWER FAIL MONITOR BIT SET?
BEQ
SKJ
;BRANCH IF NOT
ERROR
+177
:REPORT IF SO
SKJ:
IF STOPOK IS TRUE AND #SW8 SET.IN aSWR
CLR
STOPOK
JMP
EXIT
END ;OF IF STOPOK
IF NOSCOPE IS TRUE

146179
146180

14213 055510
14214 055512
14215 055512
14216
14217 055522
14218
14219 055526

14220 055530

14221 055536
14222
14223
14224
14225
14226
14227
14228
14229
14230
14231
14232
14233
14234

055542
055546
055550
055554
055562
055564
055570
055574
055576
055576
055602
055604
055612

14235 055614
14236 055622
14237 055624
14238 055630
14239 055634

;*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
xSW14=1
LOOP ON TEST

005237

063036

005037
105237

063036
063040

104410
005737
001402
004737
005737
001410
013737

006136
061332

056510

032737

177766
000001

005037
000137

002370
045134

001401
104177

_
056506
056506

000002

000425
013746
012737

000004
055550

012637
000430
062706
022737
001002
005037
(12637
000407

000004

105737
001412
032777
001404
013737
000410
105037
011637
011637

002012

005737

177060

000004
000001

000004

003716

177766
000004

001000

124764

002564

002562

002012
002562
002564

RTI
END ;OF IF NOSCOPE
18:
IF #SW14 SET.IN aSWR THEN GOTO SOVER
<MANMASTART OF CODE FOR THE XOR TESTERAMAMA
$XTSTR: B8R
23
;s
IF RUNNING ON THE ''XOR"' TESTER CHANGE
22THIS INSTRUCTION TO A 'NOP'' (NOP=240)
MOV
ERRVEC,-(SP)
;sSAVE THE CONTENTS OF THE ERROR VECTOR
MOV
#13 ERRVEC
::SET FOR TIMEOUT

TST

177060

;:TIME OUT ON XOR?

MV
(SP) + ,ERRVEC(
;;RESTORE THE ERROR VECTOR
BR
$SVLAD
2:G0 TC THE NEXT TEST
18:
ADD
#4,SP
JFIX STACK FROM TRAP
CMP
#1,PROTYP
;IS THIS AN 11/44?
BNE
6$
;BRANCH ]F NOT
CLR
CPUERR
JRESET CPU ERROR REGISTER
6$:
MOV
(SP)+,ERRVEC
;sRESTORE THE ERROR VECTOR
BR
43
2:LOOP ON THE PRESENT TEST
2S:MMAMANEND OF CODE FOR THE XOR TESTERAAAMAN
3s:
1ST8
SERFLG
;sHAS AN ERROR OCCURRED?
BEQ
$SVLAD
;:BR IF NO
BIT
#5W9,aSWR
;;LO0P ON ERROR?
8EQ
5$
J:BR IF NO.

4$:

MOV
BR
5%:
FLRB
$SVLAD: MoV
MOV

SLPERR,SLPADR
SOVER
$ERFLG
(SP) ,SLPADR
(SP) ,SLPERR

;;SET LOOP ADDRESS TO LAST SCOPE
;s IERO THE ERROR FLAG
2 sSAVE SCOPE LOOP ADDRESS
2 SAVE ERROR LOOP ADDRESS

:R=C
:R=C
JR=C
:R=C

:R=C
:R=C
;JR-C

316

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE

SCOPE HANDLER

16240 055640
16261 055644
14242 055650

14243 055654

005037
004737
013716

000002

002332
055656
002562

MACRO M1113

22-APR-81

$OVER:

CLR
CALL
Mov

RTI

14:13

F
9
PAGE 447-1

$ESCAPE
GETDIS
$LPADR, (SP)

SEQUENCE
;s CLEAR THE ESCAPE FROM ERROR ADDRESS
;:FUDGE RETURN ADDRESS

s FIXES PS

317

CZMSDCO MS11-L/M DIACNOSTIC

ROUTINE SCOPE HANDLER

MACRO M1113

14245 055656

22-APR-81 14:13

G 9
PAGE 448

GETDIS: SUBTST

<<SUBR

DISPLAY>>

s *SUBTEST

SUBR

DISPLAY

SEQUENCE

JRNARERANRARANNRAANRAAAIAANARAAAAARARAAAAARAAAEAAANANNRNNNNNNNRANCLNNNNNNRNANVANR

JARRRRAARARNIAANAAANNAANAAAAAAARAARAAARAAAAAANCAAANARAANLIANANAINAVNNNNNNNNRANONNORNY

14246 055656
14247 055664

14248 055672
14249 055674
14250 055700
14251 055702
14252 055710
14256 055710
14257 055716
14258 055724
14259 055726

113737
113737

002100
002260

005737
001403
052737

002124
100000

002010

013777
013737

002010
002010

124662
000174

000207

002011
002010

1$:

Movs
MovBs
PUSH
TST
BEQ
BIS

BANK
, $BANK
REALPAT ,SPATMAR
RO
RLFLAG
1%
#BIT15,8PATMAR

;ARE WE RELOCATED?
:NO - SKIP
JYES = SET MSB

MOV
MoV
POP
RETURN

$PATMAR,aDISPLAY
S$PATMAR ,DISPREG

;SOFTWARE DISPLAY REGISTER

318

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE ERROR HANDLER

MACRO M1113

22-APR-81

14262

14263
14264

1 +SW13=1

wrh

babbbbbbbbbbbbbbbbb
RN RN

H 9
PAGE 450

SEQUENCE

ROUTINE ERROR HANDLER

LA L

sIIII

s*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT,
s*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL
s*AND GO TO SERRTYP ON ERROR
s*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
SwSWIS
HALT ON ERROR
INHIBIT ERROR TYPEOUTS

002012

BACK:
18:

105237
001775
004737
013737
032777
001404

055656
002010
002000

063032
124604

005237

)
002570

012737

077777

011637
162737
010637
016637
117737

002016
000002
002022
000002
123746

14299 056052
14300 056060
14301 056062
14302 056066
14303 056070
14304 056074
14305 056076
14306 056104

122737
001431
105737
001024
005737
001423
013737
032737

000177

177766
000001

056506
056506

308 056114
09 056122
052130

042737
112737
112737

000001
002013
000177

177766

56140

105037

056504

CONOWVNSWNN=O

6166

013737
162737
013737

INCB
BEQ
CALL
MOV

BIT
BEQ
28:

002570

TYPE
TYPE

002016

002013

#177,SI1TEMB

+:BELL ON ERROR?
SN0 - SKIP

*;COUNT THE NUMBER OF ERRORS

SP.ERRSP

;:STRIP AND SAVE THE ERROR ITEM CODE

;1S THIS THE POWER FAIL CALL?

1001$

*BRANCH IF SO

10008

*BRANCH IF SO

IBSAVE

CPERRF

BEQ
MOV
BIT
BEQ
BIC

10018
177766,CPSAVE
#8I1T0,CPSAVE
1001$
#B8IT0,177766

ggve

165;£sxrsna

CLRB

;BSAVE

MOVB

10008:
10018

;:GET ADDRESS OF ERROR INSTRUCTION

CMPB

056504
002013

IF NOERROR
(SP) , ERRPC

2(SP) ,ERRPSW
@ERRPC.SITEMB

TSTB

056510

*:RING SELL
*CONTROL 2

MOV
MOVB

BNE

:R=C

$BELL
MSGOT4

#SW10,aSWR
2%

#2,ERRPC

BEQ

;:TEST FOR CHANGE IN SOFT-SWR
;:SET THE ERROR FLAG
S:DON'T LET THE FLAG GO TO ZERO
*SETUP DISPLAY STUFF
:FOR APT

SUB

MOV

002026
002013

:R=C

SERFLG
1%
GETDIS
$PATMAR,STESTN

INC
SERTTL
IF RESULT IS MI
MOV #77777.8ERTTL
END ;OF IF RESULT

END ;OF
MOV

056504

002020
000002
002024

LENABL
LSB
CLRB
IBSAVE
IF NOERROR IS FALSE
CKSWR

#SITEMB,IBSAVE

IF NOERROR IS FALSE

IF BADPC NE #0

MOV BADPC,ERRPC

SUB #2,ERRPC

MOV BADSP,ERRSP

:2ND ERROR CALL?
:1S THERE A CPU ERROR REGISTER?

*BRANCH IF NOT
:SAVE CONTENTS
:POWER MONITOR BIT SET?
*BRANCH IF NOT
:CLEAR THE BIT
-MAKE

IBSAVE NON-ZERO FOR DUAL CALL

:SET SITEMB TO POWER FAIL POINTER

z:x:oz:mzz::?x:vxz:w:n:u

$SERROR:

104410

—

287 056000
14288 056004
14289 056010
14290 056012
14291 056020
14292 056020
14293 056020
14294 056024
14295 056032
14296 056036
}258; 056044

056504

alalathlalalalalalalaTaYaYaYal

~
~
o

(=)

N
(¥,]

284 055764
285 055772

105037

; ;ERROR=EMT AND N=ERROR ITEM NUMBER

055730
055734
055742
055744
80 055744
281 055750
282 055752
283 055756

75
76
77
78
79

ERROR

NN PN PN FN FE NN PN

sxCALL
i

LR RN NI TN NN

b e

s %SW10=1
BELL ON ERROR
:%SW9=1 LOOP ON ERROR

d
b nd
D
)
D
d cd wnd
b
b ed
b ed

.SBTTL

14:13

319

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE ERROR HANDLER

14319
14320
14321
14322
14323
14324
14325
14331
14332
14333
14334
14335

056202
056210
056214
056214
056222
056232
056234
056234
056252
056254
056254
056254

MACRO M1113

013737
005037

002030
002020

002026

013737

002016

063030

000412

004737

056512

22-APR-81 14:13

1 9
PAGE 450-1

MOV BADPSW,ERRPSW
CLR BADPC
END ;IF
MOV
ERRPC,SFATAL
sFOR APT
IF #SW13 SET.IN aSWR
BR
38
END ;OF IF #SW13
IF #SW5 SET.IN @SWR AND TOOMANY IS TRUE
GOTO 38
END ;OF IF #SW5
END :OF IF NOERROR
CALL
$ERRTYP
::GO TO USER ERROR ROUTINE

SEQUENCE

320

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE ERROR HANDLER

48
349
3 0
3
3
3
3
3
356
357
358

056334
056342
056350

Y Zb

oro

227
2EE

-0

056412
056430
056434

=l=l=

gwu
o N

He P

) wd

)

AP AP R

D nd e

oV W

)

D e

2l 2l af oF 2F ¥

P o

14337 056260
338 056266
339 056272
? 056274

005777
100002
000000
104410

MACRO M1113
3s:

124304

SHALT:

013716

002564

005737
001402
013716

002332

022737
001002
005037

000001

012737
000137

000001
045134

013700
005037
000137

000042
000042
014450

7%:

002332
003716

:
9%

177766

— emd

b e

4371 056504
4372 036506
4373 056510
4374

001402
000137
000002
000000
000000
000000

056504
055744

J 9
PAGE 451

IF _NOERROR IS FALSE
TST

BPL_

HALT
CKSWR

aSWR

063026

SEQUENCE

321

:HALT ON ERROR

:sSKIP IF CONTINUE
:cHALT ON ERROR!
:cTEST FOR CHANGE

IN SOFT-SWR

IF NOSCOPE 1S FALSE AND #SW9 SET.IN JSWR
MOV SLPERR, (SP)
:sFUDGE RETURN FOR LOOPING

BEQ

MOV
SESCAPE, (SP)
IF DETFLAG IS FALSE

s:CHeCK FOR AN ESCAPE ADDRESS

¢sBR _IF NONE
s sFUDGE RETURN ADDRESS FOR ESCAPE

CMP #1,PROTYP
;IS THIS AN 11/44?
BNE 118
CLR CPUERR
118: IF ACTFLAG IS TRUE OR APTFLAGFég XRUE OR FATALS IS TRUE
MOV
#1,SMSGTY

JMP
EXiT
END ;OF IF ACTFLAG
IF _XXDPCHAIN IS TRUE AND SERTTL HI #20
TYPE
MSGO66
sERROR COUNT EXCEEDED 20 - ABORTING FOR XXDP CHAIN
MoV
42,R0

CLR
42
JMP
$IAPL2
END ;OF IF XXDPCHAIN
END ;OF IF DETFLAG
ELSE

b wd e
b ad amd
b
e cd

4370 056502

105737

14:13

END ;OF IF NOSCOPE
TST
SESCAPE

4362 056450

4363 056450
4364 056452
4365 056460
4366 056460
4367 056470
4368 056474
4369 056476

22-APR-81

10%:

213%:

SET
HEADER
END ;OF IF NOERROR
CLEAR TOOMANY ,NOERROR
TSTB

8EQ
JMP
RTI

:POWER FAIL ERROR CALL? :g E

IBSAVE

2138
BA(K

: .WORD 0
IBSAVE
CPSAVE: .WORD 0
: .WORD 0
CPERRF
.DSABL
LSB

: ;RETURN

;JUMP IF SO

*R=C
R=-C
R-C
R=C

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE ERROR MESSAGE

TYPEOUT

MACRO M1113

22-APR-81

%2%;5

K 9
PAGE 453

14:13

SEQUENCE

.SBTTL

ROUTINE ERROR MESSAGE TYPEOUT

AR AR

d At

11.379

MR ASAS

14380
14381

;*THIS ROUTINE USES THE ''ITEM CONTROL BYTE'' (SITEMB) TO DETERMINE WHICH
s*ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE '‘ERROR TABLE'' (SERRTB),

}2%3%

ittt diladiiitiiieiiladiistitiddsd]

;*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR.

14384 056512
14385 056514
14386 056520
14387 056522
14388 056526
14389
14390 056530
14391 056536
14392 056540
14393 056544
14394 056546
14395 056552
14396 056554
14397 056556
14398 056560
14399 056562
1464400 056564

14401 056570

14402
14403
14404
14405
14406
14407
14408
14409
14410
14411
14412
14413
14414
14415
14416
14417
14418
14419
14420
14421
14422
14423
14424

Al ARt il

056574
056576
056602
056604
056610
056612
056616
056620
056624
056626
056630
056634
056640
056642
056646
056650
056654
056656
056660
056662
056666
056670
056672

104415

005000
153700
001004
000511
122700
001003
012700
000406
005300
006300
006300
006300
062700

012037
001417
005737
001003
005737
100011
005737
001402

002013

000177

000000

012001
001427
012002

18:

057022

1008:

063450

056626

1108:

002400
002552
002062

128:
28:
3s:

000000
012037
001412
005737
001003
005737
100004

S$ERRTYP:SAVREG
TYPE
CLR
B1SB
BNE

056660

48:

002400
002552

13$:
5%:
6%:

TYPOCT
BR
CMPB
BNE
MOV
BR
DEC
ASL
ASL
ASL
ADD

MoV

BEQ
TST
BNE
TST
8PL
TST
BEQ
TYPE
TYPE
WORD
TYPE
MOV
BEQ
TST
BNE
TST
8PL
TYPE
WORD
TYPE
MOV
BEQ
MoV

$CRLF
RO
$ITEMB,RO
18

;:"'CARRIAGE RETURN'' & '‘LINE FEED'’
ssPICKUP THE ITEM INDEX

..IF ITEM NUMBER IS ZERO, JUST
:TYPE THE PC OF THE ERROR
ERRPC,<ERROR ADDRESS>
118
¢.GET OUT
#177,R0
;POWER MONITOR CALL?
1008
sBRANCH IF NOT
#PFECWS RO
;MOV ADDRESS OF PFE BIT ERROR TO RO
1108
RO
;sADJUST THE INDEX SO THAT IT WILL
RO
H
WORK FOR THE ERROR TABLE
RO
RO
#SERRTB,RO
::FORM TABLE POINTER

(RO)* 3%

NOERROR
128
HEADER
48
FATALS
2%

MSG067
0
$CRLF
(RO)+,5%
63
NOERROR
13%
HEADER
63
0
SCRLF
(RO)+,R1
108
(RO)+,R2

:sPICKUP 'ERROR MESSAGE'' POINTER

::SKIP TYPEOUT IF NO POINTER
:IS THIS REALLY AN ERROR?
:YES - SKIP
:TYPE HEADER?
:NO - SKIP
sWAS IT A FATAL ERROR?
;N0 - SKIP
sFATAL
s:TYPE THE "ERROR MESSAGE''
;s 'ERROR MESSAGE'® POINTER GOES HERE
::"'CARRIAGE RETURN'' § "LINE FEED'’
;:PICKUP 'DATA HEADER'' PQINTER
;. SKIP TYPEOUT IF 0
s1S THIS REALLY AN ERROR?
sYES ~ SKIP
:TYPE HEADER?
:NO - SKIP
::TYPE THE 'DATA HEADER''
:;DATA HEADER'' POINTER GOES HERE
;:''CARRIAGE RETURN'' & '‘LINE FEED"’
::PICKUP ‘DATA TABLE'' POINTER
::BR _IF NO DATA TO BE TYPED
:sPICKUP ‘DATA FORMAT'® POINTER

:R=C
sR=C
:R=C
:R=C
:R-C

;R~C

322

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE ERROR MESSAGE

14427
14428
14429
14430
164431
14432
14433

0566764
056676
056700
056704
056706
056710
056712

14438
14439
14440
144645
14446
14447
14448
}22?3

056724
056726
056730
056732
056736
056740
056742
056746

14434
14435
14436
14437

056714
056716
056720
056722

112203
006303
004773
000412
057132
057142
057152
057222
057262
057274
057306
057352
057360
057440
062701
005711
001403

TYPEOUT

MACRO M1113

22-APR-81

7$:

Move
ASL
CALL
BR
TAG70$
TAG71$
TAG72%

056706
8$:

000002

9s:

005737
001402
005237
104416

002106

108:

057010
057014
057014
057020

004737

057462

14461 057022

057032

057066

14462 057032

120

117

14451
14452
14453
146454
14455

14456
14457
14458
14459
14460

056750
056754
056756
056762
056764

057030

000752

002552

11$:

057126

TST
BEQ
INC
RESREG
IF #SW7

PAGE 455

«R2) +,R3
R3
a8$ (R3)
9s

SEQUENCE

sMAKE

IT A WORD ADDRESS

#2,R1
(R1)
108
MSG018
78

;UPDATE DATA TABLE POINTER
s:1S THERE ANOTHER NUMBER?
s:BR_IF NO
;TYPE 2 SPACES
;.LOOP

Mur
118
HEADER

s1S THERE A MEMORY UNDER TEST
:NO - SKIP
;YES = BUMP HEADER FLAG

SET.IN Q@SWR AND DETFLAG IS FALSE AND NOERROR IS FALSE

CALL
DETAIL
END OF IF #Sw?7
TYPE
MSG104
RETURN
.EVEN

000207

057116

TAG73$
TAG74$
TAG75$
TAG76$
TAG?7$
TAG78$
TAG79%
ADD
TST
BEQ
TYPE
BR

14:13

;CONTROL 2

;R-C

PFECWS: .WORD

PFECEM,PFECDH,PFECDT,PFECDF

:R=C

057035
057040
057043
057046
057051
057054
057057
057062
057065
14463 057066
057071
057074
057077
057102
057105
057110
057113

105
115
11
122
111
106
116
123
000
124
124
040
122
120
040
125
122

122
117
124
040
124
117
104
105

040
116
117
102
040
125
040
124

127

PFECEM:

.ASCIZ

'POWER MONITOR BIT FOUND SET''

;R-(

105
116
040

PFECDH:

.ASCIZ

'‘TESTNO

:R=(

122
103
103
105
000

123
117
105

040
040
120
122

14465 057116
057124
14466 057126
057131
14467

063932
000000
000
00

002016

056506

PFECDT:

000

PFECDF:

14464

.EVEN

ERR PC

CPUERR'’

.WORD

STESTN,ERRPC,CPSAVE,0

.BYTE

0,0,0,0

:R=C

323

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE ERROR MESSAGE

14470
14471
14472
14473 0

TYPEOUT

MACRO M1113

no
PAGE 457

22-APR-81 14:13

CRARRAANARRANAARARAAAARRRA
NN ANRANRANRRRRA AN NN N AN RARANAAANARANRARARAAAN NIRRT SRR

:wnx
MM

QCTAL

TAG708:

000207

wow

222220

200000020t

TYPOCT

il dd

a(R1)

RETURN

;akx

14499 057222

505 057254
506 057260

DECIMAL

000207

EEs2

TYPDEC

AR RN AR

RETURN

202800020

004737
005037

037254
002342

TAG728: PUSH
MOV

0003002

013701
070127

002100
600004

004737
005037

037574
002342

TAG73$: PUSH

NONNSY

TO BE PRINTED - NOW

:1
AT

SPACE

AN RN R NAN AR RAN NN NN AN R AR

RN RN N AAREAN NN O

A RN AN ANARD

BANK,R
#4,R1
NOTAB

CLR
POP

NOTAB
RS.R1

AN NN IR ARARAAN

NN AN

AN CANAREROANRRY

TCF1G3

RETURN
2232222828222

RN AR AN AR AR R

R1,R5

Mov
MUL
SET

CALL

»xx
RANRAAA RN R

000207

3323232322232}

AN RACANANAANANAANRANRAAA

sINDICATE NO TABLE

NOTAB
R5,.R1
MSGO14

JRARARRARAR R AR AR AR AR

SRR

AT RANARRAAANANAARNARNN

3223223222228 2232

TCFIGT

CALL

(SR

2220022033822

#4,R1
NOTAB
MSGO14

CLR
POP
TYPE
RETURN
;aex

AR AN AANRN N AR AARANRNANRRAARARNACCIACRNAAAORRONERERY

R1,R5
BANK,R1

MUL
SET
TYPE

000207

AN AR

;:TYPE A DECIMAL NUMBER

SHANNRARA AN AR AR AAARARN

002100
000004

AN RARRNARAAANARAARANARARAAANRAAANRN
AN ARNOONARAOTRSY

a(R1)

‘xex [NTERLEAVE #%%

013701
070127

22223022222232232282322322822222222222322222}

#x#

SRARRRA RN AN ANRAN

TAG718:

s TYPE AN OCTAL NUMBER

SRARNAARAARNAANRA AN RN AN R AR

14478
14479 057142
14480 057150
14481
14482
14483
14484
14485 057152
16486 057156
14487 057162
14488 057166
14489 057174
14490 057200
14491 057204
14492 057210
17493 057214
14494 057220
14495
14496
14497
14498

SEQUENCE

2223232323222

22323 3228223223222

2332822322323 2272222213832

2222221

‘wxx PATTERN wew
3

057262
057272

000207

223328823333323323223333823223223222333832332233223212342232223232321223222312223
113222222222 2202}

TAG74$:
SRR

TYPOCS

RETURN

AR RN NN AN RN AT AN AR ANA NN AR NN

BANK

000207

TAG758:

AR R AR AR AR R AR

R AN

R RRENRERARN

tan

057274
057304

REALPAT,<TYPE (0~77)>,2,2

TYPOCS

RETURN

BANK,<TYPE

(0-167)>,3

324

[ i 4

— b ) b S? =

O MS11-L/M DIAGNOSTIC
E ERROR MESSAGE TYPEOUT

MACRO M1113

MAAAAA SRRl

D
D

) D e cod cd id d D

57334

004737
005037

MTYPE

AAR SRR

000207

L 3 a2

EAL LA

b
)
)
) D

000207

o 2l 2

543 057366
057374
057402
057406

D ol e —ad D o

SEQUENCE

2222222222

2222.

R1.RS
BANK ,R1

44 R1

NOTAB
MSGO19
TCFIG2
NOTA8
RS.R1
s

i it
I
tt
I
2222222222 222222

TYPE
RETURN

057436

013737
162737

013737
006237
103003

052737
012746
004737
062706

002032
060000
002100
002040

002036
002036
002040

100000

002036

002036
062706
000002

SR Attt

1$:

057440
057444
057454
057460

TAG798:

000207

ittt

#81T15,PHYADD

lsl

itz

822222222222 22Y;

MoV
CALL

#PHYADD ,~(SP)
$D820

TYPE
RETURN

$0CT8

ALAE AL A

81S

sPOINTER TO DOUBLE WORD ON STA(K
sCALL DOUBLE PRECISION CONVERSION ROUTINE
JFIX STACK

#2,SP

el a2
2322322282222 22222123%

stxx OCTAL BYTE
Al

ADDRESS ,PHYADD
#F IRST ,PHYADD

BANK ,PHYADD +2
PHYADD
+2

ADD

000207

Mov
ASR

BC(C

ARt st
Ittt
t
202222222222
t
2 22222212 5

TAG788: MOV
suB

MSGO61

sx*% PHYSICAL ADDRESS e+

e e
b nd D wd e e
bk

sxtx UNKNOWN DATA w=#
R

)

SET
TYPE
CALL
CLR
POP
RE TURN

TAG77$:

—

MUL

037406
002342

PAGE 458

wan

TAG768: PUSH
MOV

002100
000004

22-APR-81 14:13

wnwn

s a2
T2222823282323 223232231132 IS

TYPE

TYPOCS
TYPE
RETURN

MSG018

;2_SPACES

@a(R1),<TYPE BYTE>,3,2
MSGO14
;SPACE

325

CZMSDCO MS11-L/M DIAGNOSTIC
ROUTINE

ERROR MESSAGE

TYPEOUT

MACRO M1113

14604 057462

22-APR-81 14:13

DETAIL:

SUBTST

8 10
PAGE 461

SEQUENCE

<<SUBR

DETAILED ERROR REPORT>>

SUBR

DETAILED ERROR REPORT

SHANAARRAANAAARANNRANNNAACNAANANRARNNANANAANNNNAARAANANNAANNRRONRRRNOOANROANORNNORRS

L «SUBTEST

SRR ARANRANANARANAAARRONNN
AR ANNANAANRNAANRANAARAANATANRARENAANOREAAORENIANRORARCS

164605
164606
14607
14608
14609
14610
14611
16612
14613
14614
14615
14616
14617
14618
14619
16620
14621
14622
14623
14624

057462
0576466
057474
057476
057504
057506
057516
0575264
057530
057534
057540
057542
057544
057546
057556
057552
057556
057562
057566
057574

14626
14627
14628
14629
14630
14631
14632
14633
14634
14635
14636
14637

057600
057610
057616
057622
057630
057632
057640
057642
057646

14625 057576

057656
057662

005237
022737
101473
022737
001435
005037
010037

012700
010120
010220
010320
010420
010520
013720
013720
013700

002212
000003

002212

000002

002212

INC
CMP
BLOS
CMP
BEQ

PUSH

SET
CLR

002106
002172

MOV
MOV
MoV
MoV
MoV
Mov
MOV
MoV

002174

002022
002026
002172

HEADER ,MUT
HEADER

MuT
RO,DETRO

#DETR1,RO

R1,(RO)¢
R2,(RO)+
R3,(RO)+
R4, (RO)+
RS, (RO)+

ERRSP, (RO) +
ERRPSW, (RO) +
DETRO,RO
+13

000423

2$:

005037

002106

104031
022737

000001

004737
000207

13]
#2 ,DETFLAG

NOERROR

104013

001002
005037

DETFLAG

#3,DETFLAG

177766
057462

1$
HEADER ,MUT
HEADER
MUT
NOERROR
+

003716
18:

#1,PROTYP
1%
CPUERR

MUT ,HEADER
:WARNING RECURSIVE
CALL
DETAIL
RETURN

;IS THIS AN 11/44?

326

CZMSDCO MS11-L/M DIAGNOSTIC
SUBR

DETAILED ERROR REPORT

16640
14641 057664
146642

004737

MACRO M1113

061332

14643

002216

14665 060012

006301

MsGOS8

ON.ERROR
READCSR
TYPOCT

3701
2701

: TYPE STACKS
PUSH
RO.R1
TYPE
MSG088
MOV
KSTACK ,R1

002534
000002

SuB
FOR

RO := SP TO R1 BY #2

END :OF FOR RO

005737
001036
042737
052737
006506

RO
MSGO18
(RO)

;2 SPACES

:SET PREVIOUS MODE TO SUPERVISOR

002426

030000
010000

cKERNEL STACK

#2.R1

TYPE
TYPOCT

TST

BNE

177776
177776

BIC
BIS

MFP]
POP
TYPE

NOSUPER

DET1
#BIT13:81T12,PSW
#B1T12,PSW

SSP
R1,RO
MSG089

IF RO LT #SUPSTK

'+681 060112
14682 060112
14683 060116
14684 060122
14685 060126
14686 060132
14687 060144
14688 060146
14689 060152

060152
060160
060162
060164
060170
060176

SPACES

if R1 EQ #0 THEN LEAVE DUMPCSRLOOP

14480 060104

14691
14692
14693
14694
14695
14696

s«

END ;OF FOR CSRNO
END DUMPCSRLOOP
POP
R1,CSRNO,CSR

14671 060040
060050
060054
060056
060064
060072
060074
060100

CSR

TYPE
MSG018
END ;OF ON.ERROR

TYPE
SCRLF
TYPOCT

14673
14674
14675
14676
14677
14678
14679

;DISPLAY 'DISPLAY'' INFO

CONTT

ASL

1044c6

=0
(o TM )

VN
S NN
N N N N N N N

14664 060006

SEQUENCE

TYPE
SCRLF
MOV
TOTCSRS,R1
BEGIN DUMPCSRLOIP
FOR CSRNO := c31ro #36 BY #2

b
D
b and
b
b
nd
b
b
b
md cd
wnd e
—

057776
060002

¢ 10
PAGE 463

; SIMULATE CONTROL '‘T"*

CALL

TYPE

013701

057724
057726
057730
057736
057742
057742
057746
057764
057764

14:13

;TYPE CONTENTS OF ALL CSR'S
PUSH
CSR,CSRNO,R1

14644 057670
16645 057702

6
651
652
653
654
655
656
657
658
659
660
61
6 62
663

22-APR-81

s SUPERVISOR STACK

FOR RO := RO 70 OEgPSTK-Z BY #2
TYPE
$CR
TYPOCT
RO
TYPE
MSG018
;2 SPACES
TYPOCT
(RO)

END ;OF FOR RO
ELSE
TYPE

MSG091

END ;OF IF RO

052737
006506

030000

177776

DET1:

;1S EMPTY

:SET PREVIOUS MODE TO USER
8IS
#BIT13!BIT12,PSW
MFP]
POP
TYPE

USP
RO
MSG090

IF RO LT WUSESTK

;USER STACK

FOR RO := RO TO WUSESTK-2 BY #2

327

cZmMspco MS11-L/M DJAGNOSTIC
SUBR

DETAILED ERROR REPORT

14697 060176
14698 060202
14699 060206
14700 060212
14701 060216
14702 060230
14703 060232
14704 060236
14705 060236
14706 060242
14707 060246
14708 060250

MACRO M1713

22-APR-81

14:13

D 10
PAGE 463-1

TYPE

$CRLF

TYPE

mMSGO18

TYPOCT

TYPOCT
(RO)
END ;OF FOR RO
ELSE
TYPE
MSGO91

005037
000207

002212

END ;OF
TYPE
CLR
POP
RETURN

IF RO
$CRLF
DETFLAG
RO

SEQUENCE

:2 SPACES

;1S EMPTY

328

CZMSDCO MS11-L/M DIAGNOSTIC
ROUTINE BINARY

TO OCTAL

(ASCII)

MACRO M1113
AND TYPE

14746
14747

22-APR-81 14:13
.SBTTL
L

E 10

PAGE 466

SEQUENCE

ROUTINE BINARY TO OCTAL (ASCII) AND TYPE

14748

14749
14750
}2;25

s*THIS ROUTINE IS USED TO CHANGE A 16-B1T BINARY NUMBER TO A (-DIGIT
'OCTAL (ASCII) NUMBER AND TYPE IT
*%IIEOS°"ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE

R L

14753
14754
14755
14756
14757

.'
oTM
o %
M
M

}2;28

MOV
TYPOS
.BYIE
.BYTE

NUM,~(SP)
N
M

;:NUMBER TO BE TYPED
;. CALL FOR TYPEOUT
;:N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE
J:M=1 0R 0
;:1=TYPE LEADING ZEROS

2 :0=SUPPRESS LEADING ZEROS

° %

14760
14761
14762

s*$TYPON=-~=-~ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST
:'STYPOS OR STYPOC
s*CALL:

}2;2?

164763

MoV

TYPON

NUM,~(SP)

J2NUMBER TO BE TYPED
;sCALL FOR TYPEOUT

- %

14766
14767
14768

;*STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER
;*CALL:
:'
MOV
NUM,~(SP)
2 sNUMBER T0 BE TYPED

}2;93

14771
14772
14773
14774

060252
060256
060264
060270

017646
116637
112637
062716

000000
000001
060477
000002

14776 060276
14777 060304
14778 060312
14779 060320
14780 060322
14781 060324
14782 060326
14783 060332
14784 060334
14785 060340
14786 060344
14787 060350
14788
06035«
14789 060356
14790 060360
14791 060362
14792 060364
14793 060366

112737
112737
112737
010346
C10446
010546
113704
005404
062704
110437
113704
016605
005003
006105
000404
006105
006105
006105

(000001
000006
000005

14775 060274

14794 060370
14795 060372
14796 060374
14797 060400
164798 060402
14799 060406

14800 060410
14801 060412
14802 060414

000406

010503
006103
105337
100016
042703
001002

005704
001403
005204

060477

000006
060476
060475
000012

060476

060475

060475
060477
060474

TYPOC

;sCALL FOR TYPEOUT

$TYPOS: MOV
MOVB
Movs
ADD

a(SP) ,~(SP)
1(SP),SOFILL
(SP)+ ,S0MODE+1
#2,(SP)

;sPICKUP THE MODE
;;LOAD ZERO FILL SWIT(CH
;.;NUMBER OF DIGITS TO TYPE
;:ADJUST RETURN ADDRESS

S$TYPOC: MOVB
MOVB
STYPON: MOVB
MOV
MOV
MOV
MOVB
NEG
ADD
MOVB
Movs
MoV
CLR
18:
ROL
B8R
2$:
ROL
ROL
ROL

#,80FILL
#6,$0MODE +1
#5,80CNT
R3,-(SP)
R4 ,~(SP)
RS,-(SP)
$SOMODE+1,R4
R4
#6,R4
R4, SOMODE
$OFILL R4
12(SP) RS
R3
RS
33
RS
RS
RS

;:SET THE
;sSET FOR
JsSET THE
;:SAVE R3
;s SAVE R4
:sSAVE RS
;;GET THE

B8R

3s:

177770

MOV
ROL
DECB
BPL
BIC
BNE

4$:

TST
BEQ
INC

$TYPON

ZERO FILL SWITCH
SIX(6) DIGITS
ITERATION COUNT

NUMBER OF DIGITS TO TYPE

;:SUBTRACT IT FOR MAX. ALLOWED
;:SAVE IT FOR USE
JoGET THE ZERO FILL SWITCH
;;PICKUP THE INPUT NUMBER
;:CLEAR THE OUTPUT WORD
;;ROTATE MSB INTO '‘C'’
;.60 DO MSB
;:FORM THIS DIGIT

RS5,.R3
R3
$OMODE
63

;;GET LSB OF THIS DIGIT
;:TYPE THIS DIGIT?
;:BR IF NO

R4
5%
R4

2 :SUPPRESS THIS 0?
::BR IF YES
csDON'T SUPPRESS ANYMORE 0°S

#177770,R3
48

;:GET RID OF JUNK
;sTEST FOR O

ey e e e Ty

329

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE BINARY TO OCTAL

14803 060416
14804 060422

14805 060426

060432
060436
060442
060444
060446

(ASCII) AND TYPE

000060
000040
060472

060474

68:

22-APR-81

78:

b wd

14806
14807
14808
14809
14810
8
8
8
8
8
8
8
8
8
8 20
8 21
822

MACRO M1113

000004

d cnd

000002

—

8$:
060474
060475
060476

0
000000

$OCNT:
$OFILL:
$OMODE:

14:13

BIS
8IS

#'0,R3
2
‘R3

TYPE

B8R

MOVB
DECB
BGT
BLT
INC

F 10
PAGE 466-1

R3,8s

$OCNT
28
78
R

MOV
MOV
MOV
MOV
MOV

(SP)+,RS
(SP)+.Ré&
(SP)+.R3
2(SP) J4TsP)
(SP)+, (SP)

BYTE
BYTE

0
0

RTI

.BYTE
.BYTE
.WORD

0
0
0

SEQUENCE

;;MAKE THIS DIGIT ASCI]
scMAKE ASCII IF NOT ALREADY
::SAVE FOR _TYPING
:.G0 TYPE THIS DIGIT
:: COUNT BY 1
;:BR IF MORE TO DO
:sBR IF DONE
s o INSURE LAST DIGIT ISN'T A BLANK
::G0 DO THE LAST DIGIT
; cRESTORE RS
;;RESTORE R4
; sRESTORE R3
::SET THE STACK FOR RETURNING
s sRETURN
:sSTORAGE FOR ASCII DIGIT
s TERMINATOR FOR TYPE ROUTINE
2:0CTAL DIGIT COUNTER
s.ZERO FILL SWITCH
s sNUMBER OF DIGITS TO TYPE

330

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

ROUTINE CONVERT BINARY TO DECIMAL AND TYPE

14824

22~APR-81 14:13
.SBTTL

6 10

PAGE 467

SEQUENCE

ROUTINE CONVERT BINARY TO DECIMAL AND TYPE

14825

;ttttQttttttttttttttttttttttttttttttttttttttttttttttttttttttttt't'tttttttttttttt

14826
14827
14828
14829
14830
14831
14832

:#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO 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.
SwCALL:
:
MOV
NUM, = (SP)
::PUT THE BINARY NUMBER ON THE STACK
e
TYPDS
*3G0 TO THE ROUTINE
$TYPDS: PUSH
RO,R1,R2.R3.RS

14833
14834 060500

14835 060512

0127646

14836
14837
14838
14839
14840
14841

060516
060522
060526
060526
060534
060536

016605
100004
005405
112766
005000
012703

14843
14844
14845
14846
14847

060546
060550
060554
060556
060560

005002
016001
160105
002402
005202

14849 060564
14850 060566
14851 060570

060105
005702
001002

14853 060574
14854 060576
14855 060600

100407
106316
103003

14857 060610

052702

14860 060622

005720

14842 060542

14848 060562

14852 060572

14856 060602

14858 060614
14859 060620
14861 060626
14862 060630
14863 060632

14864 060634
14865 060636
14866 060640
14867 060642
14868 060644
14869 060652
14870 060654
14871 06
14872 060672
14873 060700
14874 060702
14875 060704
14876 060706
14877 060710
14878 060712
14879 060714

060722

112723

020200

MOV

000020
000055

000001

060714

000040

1$:
28:

060704

3$:

000774

48:

105716

5$:
000001

052702
110223

000040

010502
000764
105726
100003
116663
105013

016666
012616
000002
023420
001750
000144
000012
000000

000000

MOVB
CLR
MOV
SUB
BLT
INC

B8R

000060

177777

€s:

78:

8$:
177777

177776

000002

000004

98 :

$DTBL:

000000

$DBLK:

zo<sp> RS

ns
"=, 1(SP)
o
#$DBLK ,R3

#' ,(R5)+

R2
$DTSL(RO),R1T
,

R1,RS
R2
5$

BMI
ASLB
BCC

78
(SP)
63

MOVB

BIS

Ré

3GET THE INPUT NUMBER
*BR IF INPUT IS POS.
::MAKE THE BINARY NUMBER POS.
SSMAKE THE ASCII NUMBER NEG.
::1ERO THE CONSTANTS INDEX
S:SETUP THE OUTPUT POINTER

:3SET THE FIRST CHARACTER TO A BLANK
*CLEAR THE BCD NUMBER
::GET THE CONSTANT
::FORM THIS BCD DIGIT
*:BR IF DONE
: 2 INCREASE THE BCD DIGIT BY 1
;:ADD BACK THE CONSTANT
$3CHECK IF BCD DIGIT=0
SSFALL THROUGH IF 0
23STILL DOING LEADING 0°S?

(SP)

1(sp>

;:SET BLANK SWITCH AND SIGN

<1(R3)

:3BR IF YES
1IMSD?
2:BR IF NO

::YES-<SET THE SIGN

::MAKE THE BCD DIGIT ASCII

8IS
MOVB

#'
R2 <n3>+

“IMAKE IT A SPACE IF NOT ALREADY A DIGIT
*:PUT THIS CHARACTER IN THE OUTPUT BUFFER

CMP
BLT
BGT

RO, #10
2s
8s

*3CHECK THE TABLE INDEX
::60 DO THE NEXT DIGIT
23G0 TO EXIT

000010

#20200,-(SP) ~

ADD
ST
BNE

IST8

116663

020027
002746
003002

MOV
BPL
NEG
MOVB
CLR
MOV

MOV
BR
TSTB
8PL
MOVB
CLRB
POP
TYPE
MOV
MOV
RTI
10000
1000.
100.
10.
.WORD

(R0) +

RS.R2
63
(SP)+
9%
=1(SP),~2(R3)
(R3)
R5.R3,R2,R1,R0
$DBLK
2(SP) .4 (SP)
(SP)+. (SP)

0.0,0.0

S3JUST INCREMENTING

1:GET THE LSD
2360 CHANGE TO ASCII
:WAS THE LSD THE FIRST NON-ZERO?
:BR IF NO
::YES=~SET THE SIGN FOR TYPING
Y:SET THE TERMINATOR
:;NOW TYPE THE NUMBER
*3ADJUST THE STACK
;:RETURN TO USER

331

CZMSDCO MS11-L/M DIAGNOSTIC

RCUTINE

TTY

INPUT

MACRO M1113

14881
14882
14883

.SBTTL

14:13

H 10
PAGE 468

SEQUENCE

ROUTINE TTY INPUT

:ttttfit"tttfitt*tttt't"t'i'tt'fitfi.fit'fittttttttfittttttttttit.tttt't'tt.ttttt.'fit

14887
14888 060724
14894 060724
14895 060730
14896 060732
14897 060736
14898 060742
14899 060746
14900 060752
14901 060754
14902 060760
14903 060764
14904 060770
14905 060772
14906 060776
14907 061002
14908 061004
14909 061010
14910 061014

061024

SPRINERSFERRTFTR

061036
061042
061046
061050
061056
061060
061064
061066

OONMNIONNLONSO

149
1491
14913
1491
149
14916
14917
14918
14919
14920
14921
14922
14923

22-APR-81

:*SOF TWARE SWITCH REGISTER CHANGE ROUTINE.
:«ROUTINE 1S ENTERED FROM THE TRAP HANDLER, AND WILL
:«SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL
:«WHEN OPERATING IN TTY FLAG MODE.
005737
001406
013746

$CKSWR:

053504
053504
053504
060764
121630

NOCH:

121624
177600

CONTS1:

045404
000024

18:

061332
000003

168%:

022716
001002
004737
022716
001005

000023

28:

000015

17$:

013706
000207
022737
001067

002142

001061

002576

000007
002060

062706
000137
021627
001005

38:
12145¢4

48:

121450
177600
000003

000006
045026
000025

B8PL

5% :
7%:

XOCHAR
NOCH
XOCHAR,
= (SP)
XOCHAR
CONTS1
@$TKS

12$

a$TKB,-(SP)

BIC

#5C177,(SP)

CALL
CMP
BNE
CALL

FIELDSERVICE
#24,(SP)
168
CONTT

CMP
BNE

CMP

BEQ
CMP
BNE

CALL
CMP
BNE
TYPE

MOV
RETURN

58
#23, (SP)
178
CONTS
#13.(SP)
63
SCNTLK

CTLKVEC,SP

#7,(SP)

TYPE

$CNTLG

TYPOCT
TYPE

a3SWR
SMNEW

CLR
TSTB
8PL
MOVB

-(SP}
a$TKS
4
@$TKB,-(SP)

$MSW?

-(SP)

BIC
CMP

#°C177,(SP)
(sP)
%

ADD
JMP
CMP

#6,SP
B0OT
(SP) ,#25

TYPE

$CNTLU

BNE

THE ASCII

:1S IT CONTROL F?

#3, (SP)

CKEND
$AUTO
CKEND

BNE
TYPE

;. STRIP=0FF

;IS IT CONTROL T?
;NO - SKIP
JYES = CALL CONTROL T ROUTINE
;IS IT CONTROL C?

BNE
TST
BNE

CLR

s s CHAR THERE?
¢:IF NO, DON'T WAIT AROUND
2 sSAVE THE CHAR
¢NO SKIP

#SWREG, SWR
CKEND

TYPE

¢ SOMETHING THERE?
:; GO ON_IF NOT
;s USE IT

#6, (SP)
18

CMP
BNE

CMP

$GTSWR:

005046
005046
105777
100375
117746
042716
021627
001006

ST
BEQ
MOV
CLR
JMP
TSTB

MOVB

000006

000176

.ENABLE LS8

78
S$CNTLC

JYES EXIT sxxxaNQOTErwwsxx STACK IS SCREWED UP!

21S IT CONTRGL S?

;NO - SKIP

JYES - CALL CONTROL S ROUTINE
;1S IT CONTROL K?
sNO - SKIP
JTYPE A *K

JRESET KSP TO AFTER PATTERN EXEC ROUTINE
JRETURN TO PATTERN EXEC ROUTINE
::1S THE SOFT-SWR SELECTED?
2 ;BRANCH IF NO

2:1S IT A CONTROL G?
;2eNO, RETURN TO USER
sARE WE RUNNING IN AUTO-MODE?
;BRANCH IF YES
;sECHO THE CONTROL-G (“G)
;sTYPE CURRENT CONTENTS
:;0F THE SWR

J:PROMPT FOR NEW SWR

:sCLEAR COUNTER
;s THE NEW SWR
::CHAR THERE?
1F NOT TRY AGAIN
;s
:PICK UP CHAR
JIMAKE IT 7-BIT ASCII
J:IS IT A CONTROL-C?
s ;BRANCH IF NOT
J:YES, ECHO CONTROL=-C (*C)
JsCLEAN UP STACK
2 ;CONTROL=-C RESTART
2:IS IT A CONTROL=-U?
;;BRANCH IF NOT
ssYES, ECHO CONTROL-U (*W)

332

MACRO M1113

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE TTY

INPUT

14943 061176

206

062706

8$%:

lg.SP

000015

9%:

(SP)
. m5
138
4(§P)

005766

000004

14950
14951
14952
14953
14954
14955
14956
14957
14958
14959
14960
14961
14962
14963
14964
14965
14966
14967
14968
14969
14970
14971

062706

000002
000006

14972
14973

061224
061230
061234
061236
061242
061244
061250
061254
061256
061262
061264
061270
061274
06176
061300
061302
061304
061310
061314
061316
061322
061324

061327

001403
016677

000002
062706
000002
004737
021627
002420
021627
003015
042726
005766
001403
006316
006316
006316
005266
056616
000702
000724

012

110
PAGE 468-1

000006

14947 061210

14948 061214
14949 061216

22-APR-81 14:13

121352

2(SP) ,asuWR

#6,SP
$CRLF

12%:

000002

CKEND:

#2,SP

053506
000060

13%:

STYPEC
(SP) ,#60
158
(SP) 467
15%
#60, (SP)+

000067
000060
000002

2(SP)
148

000062
177776

000

2(SP)

14%:

15%:

113

(SP)
(SP)
(SP)

015

TYPE

BR
SCNTLK: LASCIZ
.EVEN
.DSABL

=2(SP), (SP)
43
$QUES
8s
/%K/<155<12>
LSB

SEQUENCE

;s IGNORE PREV]IOUS INPUT
J:LET'S TRY IT AGAIN
JJIS IT A <CR>?
;sBRANCH IF NO
J:YES, IS IT THE FIRST CHAR?
2 ;BRANCH IF YES
2 sSAVE NEW SWR
;s CLEAR UP STACK
J3ECHO <CR> AND <LF>
JSRETURN
JFIX STACK

;RETURN
JsECHO CHAR

::CHAR < 0?

..BRANCH IF YES
> 7?
;CHAR
..BRANCH IF YES
;:1S THIS THE FIRST CHAR
;sBRANCH IF YES
..NO SHIFT PRESENT
‘
CHAR OVER TO MAKE
M
ROOM FOR NEW ONE.
;:KEEP COUNT OF CHAR
:sSET IN NEW CHAR
;sGET THE NEXT ONE

:TYPE 2<CR><LF>

;s SIMULATE CONTROL=-U
sCONTROL K ASCII STRING

333

CZM"DCO MS11-L/M DIAGNOSTIC

ROUTINE TTY

INPUT

14976 061332

MACRO M1113

CONTT:

SUBTST

SEQUENCE

<<CONTROL T>>
L

s *SUBTEST

14977 061332
14978 061334
14988 061340
14989 061346
14990 061352
14991 061352
14992 061356
14993 061366
14994 061372
14998 061402
14999 061404
15000
15001 061406

J_10
PAGE 470

22-APR-81 14:13

CONTROL T

PUSH
RO
TYPE
$CRLF
IF RLFLAG IS TRUE
TYPE
MSGO9
END .OF IF RLFLAG
TYPE MSG093
TYPOCS
BANK,
,3
TYPE MSG095

TYPOCS

000207
CONTS:

REALPAT, 2

SUBTST

<<CONTROL S & CONTROL @>>

s *SUBTEST

5002 061406
5 003 061410
5 004 061414
5 005 061416
5 006 061422
1 50 07 061426
1 50 08 061434
50 09 061440
} 50 10 061442
50 11 061444

CONTROL S & CONTRCL Q

105777
100375
117716
042716

121162
177600

000137

060764

000762

121166

MOVB

a@$TKB,(SP)

CONTS2: TSTB
BPL

BIC
IF

AN AR ARAAARN R

:WAIT FOR CHARACTER

#2C177.,(SP)

*STRIP ALL BUT ASCII

JMP
CONTS1
ELSE
BR
CONTS2
END :OF IF (SP)

RAA AT AR RANARARC RN

AN RARA

AN AR

RAN R

:GET RID OF RETURN ADDRESS FROM STACK

@$TKS
CONTS2

(SP) EQ #21

R LI

A AN RN AR AR AN A RN R A RA NN RARAN AN AN

POP

s BANK=
;TYPE 3 DIGITS
sPAT=
;TYPE 2 DIGITS

AR RN A AR AN R R RN AN R AR AN AR RN A AR AN AN N AR
1

sRELOCATED

POP
RETURN

AR A AN AR A RN RN

;REPLACE OVER OLD CHARACTER ON STACK

SIF IT IS A CONTROL Q

IRNRAR

RN RN

334

CZMSDCO MS11-L/M DIAGNOSTIC
—

(v}

CONTROL S & CONTROL Q

MACRO M1113

22-APR-81

14:13

FALAAAASEAASARAR

K_10
PAGE 471

SEQUENCE

ARARttt
d ittt ia ittt titisiitisdllsd]

}gg}g

'Z:IE ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY

15016
15017
15018
15019
15020
15021 061444

M
M
]
:
011646

15023 061454
15024 061450
15025 061462

105777
100375
117766

15022 06146446

15026 061470
15027 061476
15028
15029
15030
15031

061504
061506
061512
061514

15032 061520

15033 061524
15034 061530
15035 061532
15036 061534
15037 061542
15038 061544
15039 061552
15040 061554
15041 061562
15042 061564
15043 061572
15044
15045
15046
15047
15048
15049
15050 061574
15051 061576
15052 041600

15053 061604

15054 061610
15055 061612
15056 061614

15057 061616

15058 061622
15059 061624
15060 061630
15061 061632
15062 061634
15063 061642
15064 061644
15065 06165C
15066 081654
15067 061660
15068 061664
15069 061666

016666

042766
026627
001013
105777
100375
117746

042716

022627
001366
000750
026627
001744
026627
002407
026627
003003
042766
000002

010346
005046
012703

022703

101477
104411
112613

122713

001016
005726
01260
032777
001404
005037
000137

000137
122713
001022
005716

000004

000002

121116

000004

121122

177600
000004

SRDCHR: MOV

1$:

000004
000023

121070

2$:

121064

177600

000021

000004

000021

000004

000140

000004

000175

000040

000004

062072

062116

002370
045134
045026
000177

(SP)

;s INPUT A SINGLE CHARACTER FROM THE TTY
;s CHARACTER IS ON THE STACK
:;WITH PARITY BIT STRIPPED OFF
,~(SP)

MOV

4(SP§,2(SP)

BIC
CMP

#AC<177>,4(SP)
4(SP) ,#25%

BIC

l“Cl?? (SP)

cmp

#STTYIN+20.,R3

7ST8
BPL
MOvB
BNE
TST8
BPL
MOvB

:sPUSH DOWN THE PC

;s SAVE THE PS

a$TKS
18
a$TKB 4 (SP)

;;WAIT FOR
ssA CHARACTER
ssREAD THE TTY

33
a$TKS
2%
a$TkB, -(SP)

:;BRANCH IF NO
;sWAIT FOR A (HARACTER
;sLO0P UNTIL ITS THERE
ssGET CHARACTER

::GET RID OF JUNK IF ANY
:.1S IT A CONTROL-S?

JsMAKE IT 7-BIT ASCI!

CMP
(SP)+,#21
¢oIS 1T A CONTROL-Q?
BNE
2%
;s
1F NOT DISCARD IT
8R
1%
;s YES, RESUME
3$:
CMP
4(SP) . #21
218 1T A RANDOM CONTROL-Q?
;R-C
BEQ
1$
; sBRANCH BACK IF SO
sR=C
CMP
4(SP) ,m140
:21S 1T UPPER CASE?
BLT
4
c sBRANCH IF YES
CMP
4(SP) ,mM75
..IS IT A SPECIAL CHAR?
BGT
43
;BRANCH [F YES
8IC
#40,4(SP)
..HAKE 1T UPPER CASE
4S:
RTI
;.60 BACK TO USER
AN R AR AN R R AN AR A NN AR AR AR R AN R AR AR AR AR AR SRR AN AN AN E NN RANNRARNRANRAS
s*THIS ROUTINE WILL INPUT A STRING FROM THE TTY
.'CALL
o¥
RDLIN
;s INPUT A STRING FROM THE TTY
:'
RETURN HERE
:;ADDRESS OF FIRST CHARACTER WILL BE ON THE STA(CK
.
sTERMINATOR WILL BE A BYTE OF ALL 0'S
SRDLIN MOV
R3 =-(SP)
;s SAVE R3
CLR
-(SP)
:sCLEAR THE RUBOUT KEY
18:
MoV
#STTYIN,R3
:-GET ADDRESS

2$%:

000003

000400

RDCHR
RETURN HERE

BLOS
RDCHR
Mov8

CMPB

120734

11$:
3s:

BNE
TYPE
TST
MOV
BIT
BEQ
CLR
JMP
JMP
CMPB
BNE
TST

(SP)+

(R3)

3,(RS)

3
$CNILC
(SP)+
(SP)+,R3
#B]1T8,aSWR
1%
STOPOK
EXIT
800T
K177, (R3)
5%
(SP)

::BUFFER FULL?

..BR IF YES
;GO READ ONE CHARACTER FROM THE TTY
..GET CHARACTER

;.18 IT A CONTROL-C?

s ;BRANCH IF NO
;s TYPE A CONTROL=-C (~C)
:sCLEAN RUBQUT KEY OFF OF THE STACK
;sRESTORE R3
c:1S THERE A HALT FLAG SET IN THE SWR?
s ;BRANCH IF NOT TO BOOT ROUTINE
::GET READY TO HALT PROGRAM
;.60 HALT PROGRAM
:.GOTO CONTROL~C RESTART
2. 1S IT A RUBOUT
:.BR IF NO
2. 1S THIS THE FIRST RUBOUT?

335

CZMSDCO MS11-L/M DIAGNOSTIC
CONTROL S & CONTROL Q
15070 061670

000134

061672
061700
061704
061710
061712
061716
061720

MACRO M1113

22-APR-81 14:13
BNE

062070

177777

'A ¥

062072

MovB
TYPE
MOV
DEC
cmp

062070
5%:

112737

000134

005016
122713
001003

000025

000705
122713
001011
105013

000671
111337

OO0

N
=

Q00000

b““C”OaPNShflShNNM*E;

005726
012603
011646
016666
012766

062133

15117 062135
062140

062143

15118 062146

062151

O=OO—=200—=0
NOQO I NN~ (N
VIO WVI~NWVINONN

15116

8s:

$QUES
18
(R3),108
108
#15,(R3)+

:
9%

000015

177777

000004
062072

000002
000004
108:

==
-

b
e
e

122723
001264
105063

1%,

b
b

b
s

b
b

D
b

d
e
b

b e
b

b
d

d
b
b

-t

(O ALV AV LV, LV LV AV LV, LV, LV IV IV L'

099 062026

#'\,108
108
(SP)
#25, (R3)
73
SCNTLU
1$
#22,(R3)
9
(R3,
$CRLF
STTYIN

7%:

062070

R3
R3,ASTTYIN
8s
(R3),108
108
23
(SP)

6%:

000676

#'\,108
108

062070

000022

L_10
PAGE 471-1

RTI

-1(R3)
SLF
(SP)+
(SP)+,R3
(SP) ,=(SP)
4(SP) ,2(SP)
#STTYIN,L(SP)

SEQUENCE

::BR IF NO
::TYPE A BACK SLASH

:;SET THE RUBOUT KEY
2 :BACKUP BY ONE
;:STACK EMPTY?

;:BR IF YES
J:SETUP TO TYPEOUT THE DELETED CHAR.
2:G0 TYPE
;260 READ ANOTHER CHAR.
::RUBOUT KEY SET?
:2:BR IF NO
;:TYPE A BACK SLASH
:sCLEAR THE RUBOUT KEY
;¢I1S CHARACTER A CTRL U?
;:BR IF NO
;:TYPE A CONTROL 'V

;:G0 START OVER

:s1S CHARACTER A '"“R'"?
;:BRANCH [F NO

;:CLEAR THE CHARACTER

J:TYPE A ''CR & 'LF"
;sTYPE THE INPUT STRING

::G0 PICKUP ANOTHER CHACTER
JsTYPE A '?°
:sCLEAR THE BUFFER AND LOOP
;:ECHO THE CHARACTER
¢ s CHECK FOR RETURN
:sLOOP IF NOT RETURN

;s CLEAR RETURN (THE 15)
scTYPE A LINE FEED
2. CLEAN RUBOQUT KEY FROM THE STACK
:;RESTORE R3
2sADJUST THE STACK AND PUT ADDRESS OF THE
FIRSY ASCI] CHARACTER ON IT
.o
;:RETURN
J2STORAGE FOR ASCII CHAR. TO TYPE
J:TERMINATOR
2;RESERVE SIZE BYTES FOR TTY INPUT
;sCONTROL °'C*'

$TTYIN:
$CNTLC:

.REPT
LASCIZ

0
0
20.
/C/<155<12>

$CNTLU:

LASCIZ

/4U/<15><12>

;sCONTROL 'V

$CNTLG:

.ASCIZ

/%G6/<15><12>

:sCONTROL ''G"’

$MSWR:

LASC1Z

<15><12>/SWR = /

SMNEW:

LASC12

.BYTE

NEW =/

336

-t

—

MACRO M1113

D D d d d b

AITANWAWN

READ AN OCTAL NUMBER FROM THE

s*THE

D
b D d D

A A A VAW AN A A

b
ks e e
D

A T

b cd D d cd e

b
D b
b

N A

D
D

WA VLAV

062212
062214
062216
062222
062224
062230
062232

48 062234
9 062236

D cd emd b

SEQUENCE

ROUTINE READ AN OCTAL NUMBER FROM THE TTY
e

(ASCII)

NUMBER FROM THE

SRR

TTY AND

INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL

s*THEN BE RETYPED.
JeCALL:

112046
001420
122716
003026
122716
002423
006301

b e

m 10
PAGE 472

s*OCTAL DIGITS. IF AN ILLEGAL CHARACTER IS READ A ''?*' WILL BE TYPED
s*FOLLOWED BY A CARRIAGE RETURN-LINE FEED. THE COMPLETE NUMBER MUST

40 062210

b e

A A WA AL W WA A A A A LA

.SBTTL

14:13

s*CHANGE IT TO BINARY.

41
42
43
44
4S5
46
47

0 062240
1 062242

2 062244
3 062246

& 062252

5 062254
6 062256

57 062260

D cd el ed

58
59
60
61
62
63
64
65

66
67
68
69
;?

b cnd b wd cmd wed wmd

22-APR-81

s*THIS ROUTINE WILL READ AN OCTAL

104412
012600
010037
005001

062264
062270
062276
062300
062302
062304
062306
062310

062314
062320
062324
062326

011646
016666

000004

062306

005002

000002

000060
000067

006102
006301

006301

006102
042716
062601

000756
005726

010166

010237

CLR

177770

000012

062326
48

000000

5$:

(SP)+ R0
RO,5%
R1
R2

(RO)+,=-(SP)
3s
#'0,(SP)
(3 3
#'7,(SP)
43
R1

ROL

R2
R1

:<READ AN OCTAL NUMBER

;oLOW ORDER BITS ARE ON TOP OF

;:HIGH ORDER BITS ARE IN SHIOCT
;sPROVIDE SPArf® FOR THE
;s INPUT NUMF ¢

Y4
X
TA
;.8

J2STRIP THE ASCII JUNK

BR
TST

2%
(SP)+

:sLOOP
;2CLEAN TERMINATOR FROM STACK

Mov

MOV
POP
RTI
TST
CLRB
TYPE
.WORD
TYPE

TYPE
TYPE
BR
$HIOCT: .WORD
.SBTTL

R1,12(SP)

R2,$HIOCT
R2.R1,RO
(SP)+
(RO)

STACK

2sPICKUP THIS CHARACTER
;s
IF 1ERO GET OUT
JsMAKE SURE THIS CHARACTER
;:1S AN OCTAL DIGIT

R2
#~(C7,(SP)
(SP)+ R1

THE

JsREAD AN ASCIZ LINE
JsGET ADDRESS OF 1ST CHARACTER
:sAND SAVE IT
:2CLEAR DATA WORD

ROL
BIC

ADD

3s:

(SP) ,-(SP)
4(SP) ,2(SP)
RO,R1,R2

MOVB
BEQ
CMPB
BGT
CMPB
BLT
ASL

ASL

000002
005726
105010

000724
000000

RETURN HERE

ROL
ASL

006102

INPUT IS TERMINATED BY TYPING A CARRIAGE RETURN.

RDOCT

P
$SRDOCT: MOV
MOV
PUSH
18:
RDLIN
L [01Y)
MOV
CLR
2s:

THE

;;ADD IN THIS DIGIT
;s SAVE THE RESULT

::RETURN
:sCLEAN PARTIAL FROM STACK
;sSET A TERMINATOR
;:TYPE UP THRU THE BAD (HAR.

0
MSG062
JINPUT MUST BE A
MSG063
;N OCTAL
MSG064
;NUMBER
1%
::TRY AGAIN
0
;<HIGH ORDER BITS GO HERE
ROUTINE READ A DECIMAL NUMBER FROM THE TTY

;t0ttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttttt'ttttttt

73
74
75
76
77

J*THIS ROUTINE WILL READ A DECIMAL (ASCII) NUMBER FROM THE TTY AND
J*CHANGE IT TO glNARY. 1F TOO MANY CHARACTERS OR ANY ILLEGAL CHARACTERS
s*ARE READ A ''?"'
FOLLOWED BY A CARRJAGE 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

WA AVALLA VA LA A

TTY

062160
34 062162
35 062170
36 062176
37 062200
38 062202
39 062206

—d e

8=
i v ammd e o b o v md b e cod wd e b b ad d e ) D D med e d rmed d e e D D o e D b D b D D D D D b e D D =D d d e e e d e e

000

MS11-L/M DIAGNOSTIC

337

8:-

= fi

—I-—A—l—l-—l—a—l—‘—ld-—l-fld-—l-—l—l—l—l-‘—.-—l—-‘—‘—l—l-—‘—l—l—l—l—l—l-—l—l—l—l—l—l-fl-—.—‘-—‘—‘—.—‘—‘—l—.—l—‘

000000
000000 ~J
w H W20V

Z DCO HS11-L/H DIAGNOSTIC
MACRO M1113
E READ A DECIMAL NUMBER FROM THE TTY

s*CALL:
4
4

000004

1
1
1
1

062476

000002

1
1

28:

000060

]

000071

200 062410
201 062412
502 062416

MovBs
8EQ
CMPB
BGT

(RO)+,R1
3s
#'0,R1
5%

C(MPB

SEQUENCE

N
o~

012666

062466

000002

0 062470
21 062472
22 062474

00526

23 062476
24 062500
25 062504
26 062510
27 062514

105010

000000

000714

000012

5%:

#'~,(RO)
2%
(RO)+,R2

#'9,R1

5%
#4C7777,(SP)
5%
(SP)
(SP) ,~(SP)
(SP)
(SP)
(SP)+,(SP)

;;READ A DELIMAL NUMBER
:sNUMBER IS ON TOP OF THE STACK
s :PROVIDE SPACE FOR
s THE INPUT NUMBER
ssREAD AN ASCIZ LINE
;;ADDRESS OF 1ST CHAR.
:SAVE INCASE OF BAD INPUT
s CLEAR DATA WORD
;:SIGN SET POSITIVE
:;SEE _IF A MINUS SIGN WAS TYPED
;:BR IF NO MINUS SIGN
s SAVE FOR LATER USE
scPICKUP THIS CHARACTER
+:GET OUT IF ZERO
s sMAKE SURE THIS CHARACTER
s:1S A DIGIT BETWEEN 0 & 9

scDON'T LET NUMBER GET TO BIG

..BR IF NUMBER WOULD OVERFLOW
*2
..SAVE FOR LATER

ADD

R1,(SP)

:OVERFLOW ISN'T ALLOWED
;:STRIP AWAY THE ASCII JUNK
s;ADD IN THIS DIGIT
..OXSRFLOU ISN'T ALLOWED

TST

;sCHECK IF NUMBER IS NEG

NEG
MOV
POP
RTI

(SP)
(SP)+,12(SP)
R2.R1,RO

J:YES=-=NEGATE THE NUMBER
2 :SAVE THE RESULT

TST

(SP)
+

Sus

3s:
N
~

Uele R NTe NV, FJVI,§]

8vVS

000060

(SP)+ RO
RO,6$
-(SP)

CMPB
BNE
Movs

BLY
BIT
BNE
ASL

170060

(SP) ,~(SP)
4(SP) ,2(SP)
RO.R1,R2

CLR

MOV
ASL
ASL
ADD

NNNNNNNV\N)NNNNNI\;NN
b cod d d d d b e b b O

N_10
PAGE 472 1

RDDEC
RETURN HERE

$RDDEC: MOV
Mov
PUSH
1%:
RDLIN
MOV
MOV
CLR

000055

2
2
2
2
2
2
2
2

14:13

:*POSITIVE 32767 TO NEGATIVE 22768.

062330
062332
1 6 062340
7 062346

22-APR-81

BVS
BR

BEQ

CLRB

TYPE

.WORD
TYPE

TYPE
TYPE

#'0.R1

58
2%

(RO)

0
MSG062

MSGO65
MSGO64

;+BR IF NO

;sRETURN

;o CLEAN PARTIAL NUMBER FROM STACK
;sSET A _TERMINATOR

«cTYPE

THE

INPUT UP TO BAD (HAR.

:.POINTER GOES HERE
s INPUT MUSST BE A
sDECIMAL
sNUMBER
;s TRY AGAIN

338

SDCO MS 11-L/M DIAGNOSTIC

TINE SAVE AND RESTORE RO-RS

MACRO M1113

22-APR-81

1%%%8

.SBTTL

14:13

8.1

PAGE 473

SEQUENCE

ROUTINE SAVE AND RESTORE RO-RS

15231

.'tt.ttttttlltt.tt.tt."'t"'QQQlQ.QtQititttttQ.tl."'.".'.."'..'.'..'.t"""'

15232
15233

:*SAVE RO=-RS
SeCALL:

}gggg

;*UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE:

15234

15237
15238
15239
15240
15241
15242
15243
15244
15245
15246 062516
15247 062516
15248 062532
15249 062536
15250 062542
15251 062546

}gggg 062552

SAVREG

'TOP---(416)
T4 42===(+18)
‘e 44~==RS
;* +6=---Ré
‘% +8-=-R3
P2410-~=R2
(n+]12=-==R1
tat14-==R0
$SAVREG:

016646
016646
016646
016646

000002

000022
000022
000022
000022

PUSH
MOV
MOV
MOV
MOV

RT]

15254
15255

;*RESTORE RO-RS
;#CALL:

15257 062554
15258 062554

SRESREG

15256

15260 062564
15261 062570

012666
012666
012666
012666

15263 062610

000002

15259 062560

15262 062574

000022
000022
000022
000022

RO.R1,R2.R3,R4,RS
22(SP) ,<(SP)
:;SAVE
22(SP) .~(SP)
S3SAVE
22(SP) .=(SP)
$:SAVE
22(SP).=(SP)
::SAVE

PS
PC
PS
PC

OF
OF
OF
OF

MAIN FLOW
MAIN FLOW
CALL
CALL

;;RESTORE
:RESTORE
S:RESTORE
**RESTORE

PC
PS
PC
PS

OF
OF
OF
OF

RESREG

MOV
MOV
MOV
MOV

POP
RTI

(SP)+,22(SP)
(SP)+.22(SP)
(SP) +.22(SP)
(SP) +.22(SP)

R5.R4.R3,R2,R1,RD

CALL
CALL
MAIN FLOW
MAIN FLOW

339

CZMSDCO MS11-L/M DJAGNOSTIC

ROUTINE RANDOM NUMBER GENERATOR

MACRO M1113

22-APR-81
.SBTTL

AINIAL NNNINLANINININVLAINI
NI NN
NV
NI NN N
NNNSNSNSNNN
VSN
—

6 062612

;*THIS ROUTINE
s~CALL:

M
B

ARt

ailid

iilid

ittt iddisizissisidsdsisislsssls

IS A DOUBLE PRECISION °SEUDO RANDOM NUMBER GENERATOR

CALL

RETURN

$SRAND

s CALL THE ROUTINE
;RETURN HERE THE RANDOM
s :NUMBER WILL BE IN

;s SHINUM, SLONUM
002544

79 062630

012702

000007

90 062672
91 062676
92 062704

SEQUENCE

ROUTINE RANDOM NUMBER GENERATOR

* N

013700

80 062634
81 062636
82 062640
83 062642
84 062646
85 062650
86 062654
87 062660
88 062662
89 062666

c1n

PAGE 474

;*WITH A RANGE OF 0 TO 2++(+33)-1,

7 062620

8 062624

ARASR AR AR

14:13

013701

006300
006101
077203
063700
063701
062700
005501
062701
010037

010137
000207

SRAND.

002542

002544
002542
001057
047401
002544
002542

18:

PUSH
MOV
MOV
MOV
ASL
ROL

RO,R1,R2
SEEDLO,RO
SEEDHI
R1
#7,R2
RO
R1

ADD
ADC
ADD
ADD
ADC
ADD
Mov
MOV
POP

SEEDLO,RO
R1
SEEDHI
R
#1057 ,RO
R1
#47401,R1
RO,SEEDLO
R1,SEEDHI
R2.R1,RO

sSo8

RETURN

R2,1$

;SET RO WITH LOW

;SET R1 WITH HIGH

;SET SHIFT COUNT
J:SHIFT RO LEFT AND
;;ROTATE CARRY INTO R1 AND

;ADD NUMBER TO MAKE X 129
; sPROPOGATE CARRY
;ADD NUMBER TO MAKE X 129
2sADD LOW CONSTANT
; ;PROPOGATE

CARRY

JsADD HIGH CONSTANT
:SAVE RO
;SAVE R1

340

CZMSDCO MS11-L/M DIAGNOSTIC

.SBTTL

FMASALAAALEL

—

177770

18:

b od

b e

cmd cd o

d o

000002

000060
063010

063014

MOV
CALL
RETURN

ARl

#PNTR,=(SP)

$DB20

2(SP) ,R1

MOV
MOV
MoV
MoV
MoV
MOV

#$0CTVL+13.
RS
#12. R4
#°C7,R3
(R1)+,R0
(31)*.R1

MOvB8
MOV

R2,=(RS)
RO,R2

CLR

DEC
BGT
BEQ

b d ek

010002

W
W

SEQUENCE

341

ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT

ARl

SAVREG

000002
063025
000014

\¥,)

ek e
b e

DOOOOOO—=
OB
2 O
o AR
NONONOON &
N O =2 = NYNNO
&
&H [=lelelelelele

062706

SEGRIR28E

D e
=D
b e
d
b e
e

b e

o1
PAGE 476

iRttt

alit

diiisisiislissliss]

s*UNSIGNED OCTAL ASCIZ NUMBER.

;*CALL

VIV

14:13

;*THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN

AT
A AV A LA M AT TA RN T AT
T AEA T A WMIA VAWV AW
NN NN U U U NN U N N O AN O NN W N N NN AN N N NN
WWNI NN PO NPNIRIN) = b b b ed cad e ed ek b & o
=OV®NO
WS W N=0O VO NOWVHWN-=20O
000

h —

MACRO M1 N 3 22-APR-81
ROUTINE DOUBLE LENGTH BINARY TO OCTAL AS Cl 1 CONVERT

INC
MoV
RESREG
RETURN
ASR
2$:
3s:
ROR
ROR
ROR
ROR
ROR
ROR
BIC
ADD
BR
$OCTVL: .REPT

$OCT8=30CTVL+4

is
23

RS
R5,2(SP)

:cPOINTER TO LOW WORD OF BINARY NUMBER
;o CALL THE ROUTINE
;;THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK

s SAVE ALL REGISTERS
;:PICKUP THt POINTER TO LOW WORD
:-POINTER TO DATA TABLE
;:gRSELEVEN CHARACTERS

;;LOWER WORD
s sHIGH WORD
: : TERMINATOR
¢sPUT CHARACTER IN DATA TABLE
;:GET THIS DIGIT
::COUNT THIS CHARACTER
:.BR IF NOT THE LAST DIGIT
csBR IF IT IS THE LAST DIGIT
s;ALL DIGITS DONE~-ADJUST POINTER FOR FIRST

:sASCIZ CHAR, & PUT IT ON THE STACK
scRESTORE ALL REGI_TERS
:;RETURN TO USER
;;POSITION THE MASK FOR THE LAST DIGIT
;;POSITION THE BINARY NUMBER FOR
i:

THE NEXT OCTAL DIGIY

¢ sMASK OUT ALL JUNK
s cMAKE THIS CHAR. AS(CII
;.60 PUT IT IN THE DATA TABLE
: ;RESERVE DATA TABLE

;POINTER TO 11 DIGIT NUMBER

22-APR-81 14:13

NN
NN NN NN N
WV AV VL IV IV IV, P
V& NN =

.SBTTL

000000
000000
000000
000000
000000
000000
000000
000000

0 063046

000

063047

000

6 063050
57 063052
58 063054

000101
000000
000000

.SBTTL
SMAIL:
$MSGTY: .WORD
SFATAL: .WORD
$TESTN: .WORD
$PASS:
.WORD
$DEV(T: .WORD
SUNIT:
.WORD
$MSGAD: .WORD
$MSGLG: .WORD
SETABLE:
$ENV:
.BYTE

;NOTE:

APT MAILBOX-ETABLE

;ENVIRONMENT BYTE

;SET TO A 1

FOR APT AUTO MODE

.WORD
.WORD
.WORD

101
0

$MAMS1 ;

$MTYP1:

.BYTE
.BYTE

:BIT7(200)=USE APT SIZE INFO :BITS5(40)=NO CON>ULE

J:APT SWITCH REGISTER
sUSED TO LIMIT THE NUMBER OF PASSES
;:CPU TYPE,OPTIONS
BITS 15-11=CPU TYPE
11/704=01,11/05= 02 11/20 03,11/740=04,11/45=05
11/70=06.PD0=07,0=10
BIT 10=REAL TIME CLOCK
BIT
9=FLOATING POINT PROCESSOR
BIT
8=MEMORY MANAGEMENT
..HIGH ADDRESS,.M.S. BYTE ;DEFAULT
= 64K
;s MEM. TYPE.BLK#1
HEH TYPE BYTE

(H]GH BYTE)

900 NSEC CORE=001
300 NSEC BIPOLAR=002
PARITY M0S=003
ERROR CORRECTING MOS=004

177776

$HADR1:

.WORD

177776

;:HIGH ADDRESS.BLK#1

000
000
000000
000
000
000000
000
000
000000
000000
000000
000000
000000

SMAMSZ:
SMTYP2:
$MADR?:

.BYTE
.BYTE
.WORD
.BYTE
.BYTE
.WORD
.BYTE
.BYTE
.WORD
.WORD

SDEVM:

.WORD

;:HIGH ADDRESS M.S. BYTE
TYPE ,BLK#2
::MEM,
s sMEM.LAST ADDRESS,BLK#2
;:HIGH ADDRESS ,M.S.BYTE
s sMEM.TYPE ,BLKA3
:sMEM.LAST ADDRESS,BLK#3
:sHIGH ADDRESS,M.S.BYTE
J:MEM.TYPE ,BLK#
:;MEM.LAST ADDRESS .BLK#4
;s INTERRUPT VECTORA1,BUS PRIORITY#
;s INTERRUPT VECTORA#2BUS PRIORITYA?2
;;BASE ADDRESS OF EQUIPMENT UNDER TEST
J:DEVICE MAP

$COW1:
$CDWe:

.WORD
.WORD

=lolielalelslelelslolelelalele)

N AN
oa

: ;PASS COUNT
::DEVICE COUNT
::1/0 UNIT NUMBER
: sMESSAGE ADDRESS
: sMESSAGE LENGTH
..APT ENVIRONMENT TABLE

$SWREG:
SUSWR:
$CPUOP:

88 063106
389 063110

s TEST PATTERN NUMBER

$SENVM:

004

: ;MESSAGE TYPE CODE
;s FATAL ERROR NUMBER (ERROR P(C)

ENDING AT SMADR4) MUST BE FILLED IN TO INDICATE THE PROPER AMOUNT OF
EACH TYPS OF MEMORY.
.BYTE
;ENVIRONMENT MODE

Qllt

001

SEQUENCE

IF BI7 #7 IS SET IN SENVM THE TABLE BELOW (BEGINNING AT SMAMST AND

]

365 063056
366 063057

E_11
PAGE 477

TABLES

elelelelelelels)]

ABLES

MACRO M1113

%ZHSDCO MS11-L/M DIAGNOSTIC

000000
000000

S:
SMAMS
SMTYP3:
$MADR3:
SMAMSS:
SMTYP4:
$MADRS:
$VECT1:
SVECT2: .WORD
$BASE:
.WORD

MEM.LAST ADDR.=3 BYTES,THIS WORD AND LOW OF °'‘TYPE'®' ABOVE

342

CZMSDCO MS11-L/M DIAGNOSTIC
APT MAILBOX-ETABLE

15391

MACRO M1113

22-APR-81 14:13

F_11
PAGE 478

SEQUENCE

:THE FOLLOWING LOCATIONS SPECIFY WHICH PATTERNS

}2%8%

;ARE TO BE RUN FOR PARTICULAR MEMORIES

**15394

JREFERENCE THE TABLE LISTED BELOW TO RELATE BITS TO PATTERNS.

}gggg

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

15395

15398
15399

15400 063112

15401 063114
15402 063116
15403 063120
15404 063122
15405 063124
15409 063126
15410
15411
156412
15413 063126
15414 063126
15415 063130
15416 063132
15417 063134
15418 063136
15419 063140

343

:BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE, BITO SET

177777

177777
177777
177777
177777
177777

000000
063026
000043
001274
000000
000040

:NOTE+*« NULL TESTS DO NOT TAKE ANY TIME
:
;JFIELD SERVICE VALUE

$0DW0:

.WORD

177777

:ECC CSR TESTS

.WORD
.WORD
_.WORD
.WORD
_WORD
.WORD

O
SMAIL
35.
700.
0.
SETEND-SMAIL/2

172777

TABLE = MKCSRT:

$DDW1:
.WORD
177777
:ECC CSR TESTS
177777
TABLE
$DDWZ2:
.WORD
177777
:ECC PATTERNS
103777
TABLE
$DDW3:
.WORD
177777
:ECC PATTERNS
177777
TABLE
$ODW4:
.WORD
177777
:PARITY PATTERNS
003777
TABLE
$DDWS:
.WORD
177777
:PARITY PATTERNS
177774
TABLE
SETEND:
;SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC
:INTERFACE SPEC.
SAPTHD:
SHIBTS:
SMBADR:
$TSTM:
$PASTM:
SUNITM:

=
=
=
=
=

MKCSRT:
MKPAT:
MKPAT:
MJPAT:
MJPAT:

::TWO HIGH BITS OF 18 BIT MAILBOX ADDR.
:;ADDRESS OF APT MAILBOX (BITS 0-15)
JsRUN TIM OF LONGEST TEST
2sRUN TIME IN SECS. OF 1ST PASS ON 128K (QUICK VERIFY)
JsEXTRA RUN TIME OF A PASS FOR EACH ADDITIONAL 128K (Qv)
;;LENGTH MAILBOX~ETABLE (WORDS)

CZMSDCO MS11-L/M DIAGNOSTIC

ROUTINE TRAP DECODER

MACRO M1113

22-APR-81 14:13
.SBTTL

6.1
PAGE 479

SEQUENCE

ROUTINE TRAP DECODER
L

e I

s*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF

THE ‘'TRAP'' INSTRUCTION

s*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS
;*0F

S
5429
5430
5631
5632
5433
5434
435

THE DESIRED ROUTINE.

;%GO TO THAT ROUTINE.
063142
063144
063150
063152
063154
063156
063162

010046
016600
(05740
111000
006300
016000
000200

$TRAP:

000002

063204

MOV
MOV
TST
Mov8
ASL
MOV
RTS

THEN USING THE ADDRESS OBTAINED IT WILL

RO,-(SP)
2(SP) ,RO

-(R0O)

(RO) ,RO
RO
$TRPAD(RO)
,RO
RO

;:SAVE RO
;:GET TRAP ADDRESS

: :BACKUP BY 2

;sGET RIGHT BYTE OF TRAP
s:POSITION FOR INDEXING
;. INDEX TO TABLE
:+G0 TO POUTINE

;:THIS IS USE TO HANDLE THE °''GETPRI'' MACRO
440
441
5442
15443
15444
15445

063164
063166
063174

011646
016666
000002

062176
063202

000000

000004

000002

$TRAP2: MOV

MoV
RTI

SNOTRAP: TYPE
SHALTZ2: HALT

(SP) ,~(SP)

4(SP) ,2(SP)

MSG006

;:MOVE

THE PC DOWN

;cMOVE THE PSWw DOWN

;sRESTORE THE PSW

sUNDEF INED TRAP INSTRUCTION

344

CZMSDCO M>11-L/M DIAGNOSTIC

TRAP TABLE

MACRO M1113

22-APR-81
.SBTTL

15450

14:13

H 11
PAGE 481

SEQUENCE

345

TRAP TABLE

s*THIS TABLE CONTAINS THE STARTING ADDRESSES OF

;*BY THE ‘‘TRAP'* INSTRUCTION.

THE ROUTINES CALLED

ROUTINE

063204
063206
57 063210
458 063212

063164
053360

$TRPAD:

.WORD
$TYPE
$STYPOC
$TYPOS

STRAP2
:CALL=TYPEIT
:CALL=TYPOC
:CALL=TYPOS

SNOTRAP;$TYPON

TRAP+1(104401)
TRAP+2(104402)
TRAP+3(104403)

: CALL=TYPON

TTY TYPEOUT ROUTINE

TYPE OCTAL NUMBER (WITH LEADING ZEROS)
TYPE OCTAL NUMBER (NC LEADING ZEROS)
TYPE OCTAL NUMBER (AS PER LAST CALL)

TRAP+4 (104404)

15460 063216
15465 063220

063176

$TYPDS
;CALL=TYPDS
TRAP+5(104405)
TYPE DECIMAL NUMBER (WITH SIGN)
$SNOTRAP;$TYPBN
;CALL=TYPBN
TRAP+6(104406)
TYPE BINARY (ASCII) NUMBER

15663 063222
15464 063224

061100
060724

$GTSWR
$CKSWR

15466 063226
063230
15468 063232
15469 063234

061444

061574
062160
062330

$SRDCHR ; CALL=RDCHR
SRDLIN
:CALL=RDLIN
SRDOCT
:CALL=RDOCT
$RDDEC
- CALL=RDDEC

TRAP+11(104411) TTY TYPEIN CHARACTER ROUTINE
TRAP+12(104412) TTY TYFEIN STRING ROUTINE
TRAP+13(104413) READ AN OCTAL NUMBER FROM TTY
TRAP+14(104414) READ A DECIMAL NUMBER FROM TTY

15671 063236
15472 063240

062516
062554

$SAVREG :CALL=SAVREG
$SRESREG ;CALL=RESREG

TRAP+15(104415) SAVE RO-RS ROUTIWE
TRAP+16(104406) RESTORE RO-RS ROUTINE

15474 063242
15475 063244
15476 063246

040216
040226
040236

$SKERNEL
;CALL=KERNEL
TRAP+17(104417) ENTER KERNEL MODE
SENERGI2E : CALL=ENERGIZETRAP+20(104420) TURN ON MEMORY MANAGEMENT & TRAPS

15478 063250

062434

SKMAP

: CALL=KMAP

TRAP+22(104422) MAP KERNEL 1

15480 063252
15481 063254

040246

040272

$CACHN
$CACHF

sCALL=CACHON
s CALL=CACHOFF

TRAP+23(104423) TURN CACHE ON
TRAP+24(104424) TURN CACHE OFF

15483 063256
15484 063260
5
15486 063262

040310
040404

$LOADC
$READC

s CALL=LOADCSR
s CALL=READCSR

TRAP+25(104425) LOAD CORRECT CS R
TRAP+26(104426) READ CORRECT CS R

053714
053742
053770
054020
054102
0564124
054154
054174

$PERO1
$PERQ?
$PERO3
$SPERO4
$SPERQ7
$PER10
$PER11
$PER1?
SPER13
$PER14
$PER15
$PER16
$PER17
$PER20
$PER21

s CALL=PERRO1
s CALL=PERROZ2
:CALL=PERRO3
: CALL=PERRO4
s CALL=PERRO?7
:CALL=PERR10
s CALL=PERR11
:CALL=PERR12
:CALL=PERR13
;CALL=PERR14
:CALL=PERR15
;CALL=PERR16
;CALL=PERR17
s CALL=PERR20
s CALL=PERR21
s CALL=PERR22
; CALL=PERR23
s CALL=PERR24

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)
TRAP+40(104440)
TRAP+41(104441)
TRAP04§(104442)
TRAP+43(104443)
TRAP+44 (104444)
TRAP+45(104445)
TRAP+46(104446)
TRAP+47(104447)
TRAP+50(104450)
TRAP+51(104451)

TRAP+7(104407)
GET SOFT-SWR SETTING
TRAP+10(104410) TEST FOR CHANGE IN SOFT-SWR

$DEENERGI ; CALL=DEENERGITRAP+21(104421)

$PER22

051170

;CALL=GTSWR
- CALL=CKSWR

$PER23
$PER24
$PERZS

: CALL=PERR25S

TURN OFF MEMORY MENAGEMENT & TRAPS

PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM

PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM

TO 1

DETECTE D
DETECTE D
DETECTE
DETECTE
DETECTE
DETECTE
DETE
DETE
DETE
DETE
DETE
DETE

DETE
DETE
DETE
DETE
DETE
DETE
DETE

ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR

CZMSDCO MS11-L/M DIAGNOSTIC

FRRROOGG

o OO~ NO

KIIFIIIK

(=4
jolelele]
o~
OO~
v N NN NN N NN NN

63356

o
O

N
W

o
\h\h\h\h\fl\h\Il\fl\h\l‘\.h\flMM\AM\A&WMW\AU\WMMU\WMMMMMW
—d b ad d s b d d d b DO
OO@\IOU‘J‘WN-‘OOOV?W

b and e

b ad ol

d e

b i

d e

D e e

d el

D o

i el

e e

) i e

AN AN AL UV VNV NV LV TV [V [V IV [V [V [V IV IV IV 1V [V IV AV IV, IV, TV TV TV IV IV IV [V, IV, IV, [V 1V 1 =)

i ==b

TRAP TABLE

040630
040644
040656
040672
040732
040754
040774
041110

041140

041254
041304
041316
041326
041342
040704
040720
040424
041422
041452
063176
063176
063176
063176
063176
063176
063176

MACRO M1113

22-APR-81

14:13

PAGE 481-1

SEQUENCE

$PER26
$PER27
$SPER30
$SPER31
$SPER3?
SPER33
SPER34
$PER3S
$PER36
SNOTRAP
S$NOTRAP
SNOTRAP

s CALL=PERR26
: CALL=PERR27
s CALL=PERR30
s CALL=PERR31
;CALL=PERR32
:CALL=PERR33
s CALL=PERR34
; CALL=PERR35
; CALL=PERR36
: CALL=PERR37
: CALL=PERR4O
s CALL=PERR41
SNOTRAP s CALL=PERR42
SNOTRAP s CALL=PERR43

PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM

$ECCDIS sCALL=E
SECCIDIS, CALL=
SECCINIT.CALL=
SECCTINIT, CALL
$CBCSR
s CALL=C
$CB1CSR sCALL=CB1(CSR
$WASSBE s CALL=WASSBE
$WAS1SBE. CALL=WAS1SBE
SWASDBE s CALL=WASDBE

DISABLE ECC ON ALL CSR'S
DISABLE ECC ON 1 SELECTED CSR

SWAS1DBE; CALL=WAS1DBE
$CLRCSR sCALL=CLRCSR
S$CLR1CSR. CALL=CLRICSR

$CHKDIS sCALL=CHKDIS
$CHK1DIS. CALL=CHK1DIS
SENASBE s CALL=ENASBE
SENA1SBE; CALL=ENA1SBE
$TSTRD
¢ CALL=TSTREAD
$INVALID. CALL=INVALID
$ERRGEN ; CALL=ERRGEN
SNOTRAP
SNOTRAP
SNOTRAP
SNOTRAP
SNOTRAP
SNOTRAP
SNOTRAP

DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED
DETECTED

ERROR
ERROR

ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR

INITIALIZE ALL MK11 CSR'S
INITIALIZE 1 SELECTED MK11

WRITE GENERATED
WRITE GENERATED
WAS THERE A SBE
WAS THERE A SBE

346

CSR

CHECKBITS IN ALL CSR'S

CHECKBITS IN 1

ON ANY (S

SELECTED CSR

ON 1 SELECTED CSR?
500)WAS THERE A DBE ON ANY (S
501)WAS THERE A DBE ON 1 SELECTED CSR?
502)CLEAR ALL CSR'S
S03)CLEAR 1 SELECTED CSR
504)DISABLE ECC & WRITE CKBITS FROM ALL CSR'S
05)DISABLE ECC & WRITE CKBITS FROM 1 (SR
6)ENABLE TRAPS ON SBE'S FROM ALL CSR'S
JENABLE TRAPS ON SBE'S FROM 1 SELECTED CSR

TEST LOC (R1) & TST FOR SBE (WITHOUT FETCHES
INVALIDATE BACKGROUND PATTERN ON BANK

TEST ERROR ADDRESS

WA SIS SR She SEe SSe S

SDA ST

SUL SUL SIL SWL SER SUL SUL SUN SUR

UL SR SUN FEN

U ST

sSTATUS REGISTER
.-

347

177776

SEQUENCE

SUNR SEIL

J 1
PAGE 483

SR SEn AR SA SEIL SEL SUN. SN SUIn S

177776

14:13

SEE SME SUE. S

15548

22-APR-81

TRAP TABLE

MACRO M1113

CZMSDCO MS11-L/M DIAGNOSTIC
1

CZMSDCO MS11-L/M DIAGNOSTIC
TABLE

ERROR POINTER

MACRO M1113

22-APR-81

14:13

.SBTTL

TABLE

}ggg}

K 11

PAGE 485

SEQUENCE

ERROR POINTER

15553
15554
15555
15556

;*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR.
s*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN
;*LOCATION S$ITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT.
s*NOTE1:
IF SITEMB IS O THE ONLY PERTINENT DATA IS (ERRPC).

15559
15560
15561
15562
15563
15564
15565 063450
15566 063450
15567 063452
15568 063454
15569 063456
15570
15571 063460
15572 063462
15573 063464
15574 063466
15575
15576 063470
15577 063472
15578 063474
15579 063476
15580
15581 063500
15582 063502
15583 063504
15584 063506
15585,
15586063510
15587 063512
15588 063514
15589 063516
15590
15591 063520
15592 063522
15593 063524
15594 063526
15595
15596 063530
15597 063532
15598 063534
15599 063536
15600
15601 063540
15602 063542
15603 063544
15604 063546

A
v
;v
i

EM
DH
0T
DF

$ERRTB:

;ERROR
EM24
DH13
D713
DF11
:ERROR
EM2
DH1
DT1
DF2
;ERROR
EM3
DH3
DT3
DF9
;ERROR
EM4
DH3
DT4
DF9
:ERROR
5
DH5
DT5
DF2
:ERROR
EM6
DH5
DTS
DF2
:ERROR
EM7
DH5
DTS
DF2
: ERROR

}gggg

:*NOTEZ:

065741
070066
064320
064656

064715
067375
064150
064534
064753
067455
064162
064651

065005
067455
064172
064651
065053
067511
064202
(64534
065130
067511
064202
064534
065155
067511
064202
064534

067273
070531
064476
064534

EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS:

EM53
DH25
D125
DF2

:;POINTS
::POINTS
; ;POINTS
;:POINTS
1

€

TO
TO
TO
TO

THE
THE
THE
THE

ERROR MESSAGE
DATA HEADER
DATA
DATA FORMAT

348

CZMSDCO MS11-L/M DIAGNOSTIC
ERROR POINTER

— g—g—g—
p— g—— g—
P
S G
SR
G
D SR
R
S G
S
SR S
P
U
e S
S

067130
070403
064434
064667

SEm

e SRS S

)
D
D o
D e
b e
ad
b
)
b
d
b
ed
— ed e

b wd el

\h\h\h\hg\h\h\h\h

656 063666
57
658 063670
659 063672
660 063674
661 063676

065427
067635
064234
064606

067322
070555
064506
064534

SR GRS SWS S

063650

065361
070066
064320
064656

D NS S

063640
063642
063644
063646

065315
070066
064320
064656

S S

063630
063632
063634
063636

15638
15639
15640
15641
15642
15643
15544
15645
15646
15647
15648

065263
070066
064320
064656

063620
063622
063624
063626

15633
15634
15635
15639

5629 063612
5630 063614
5631 063616

065215
067635
064234
064621

5628 063610

065215
067635
064234
064606

20
621
2
5623
5624
5625
5626

063600
063602
063604
063606

9 063572

349

063574
063576

065237
067745
064264
064534

8 063570

065215
067635
064234
064573

063560
063562
063564

063566

SEQUENCE

ooocorrOrONONON

13
4
5
9

L 1
PAGE 487

61; 063556

15607
15608 063550
15609 063552
15610 063554

22-APR-81 14:13

TABLE

MACRO M1113

065665
070066
064320
064656

063750
15691 063752
15692 063754
15693 063756
15694
15695 063760
15696 063762
15697 063764
15688 063766
6

000000
070163

wviuawvruaaiviuvinw
~

15685
15686
15687
15688
15689
15690

707
708
709
710
15711
1

063770
063772
063774
063776

g 064004

064342
064534

065712
067511
064202
064534
066020

064634
066045
070361
064410
054560

:NO MESSAGE

A r~

|
063740
063742
063744
063746

12682 063736
68

R EEEELLELRLLEREDREXRXERLDE-RERERLEZXREXEZXERERESRZRERZX
B X4

065626
070043
064306
064534

:NO MESSAGE

063730
063732
063734

064314
064534

000000
070061

063720
063722
063724
063726

065544
070066
064320
066656

EEEEREEELE L

063710
063712
063714
063716

: ERROR

EM19
DH13

350

065467
070066
064320
064656

SEQUENCE

063700
063702
063704
063706

M1
PAGE 489

15664
15665
15666
15667
15668
15669
15670
15671
15672
15673
15674
15675
15676
15677
15678
15679
15680
15681
15682

14:13

ERROR POINTER

22-APR-81

TABLE

MACRO M1113

ER'E

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR POINTER

1
1

27 064012
2 8 064014
9 064016
3
3 1 064020
3 2 064022
3 3 064024
34 064026
~n

NNSNSNSNSNSNSNSNN
N
n)

iV IV, LV AV, IV, IV, [V, IV, 1V, |

15725
15726 064010

43
1 744
5745
1 5749

066722
067635
064234
064560

575; 064046

066206
067635
064234
064560

1
1
1

]

066116
070361
064410
064647

064030
064032
064034
064036

Ieal

067246
070531
064476
064534

15753
15754
15755
15759

064050
064052
064054
064056

066270
067635
064234
064606

15758
}5759
5760
5765
1
5763
1 5764
5765
1 5729

064060
064062
064064
064066

066407
067635
064234
064560

064070

066507
067635
064234
064560

1
1
1
1
1

1
1

064072
064074
064076

066614
067635
064234
064560

067164
070462
064456
064677
067007
067570
064220
064534

22-APR-81

14:13

N1
PAGE 491

SEQUENCE

351

TABLE

MACRO M1113

UVNUVNUVUVINUVIUVINNNWVNWNNWNWVNTNWNNWVINWN
NN WA WN A LD LN N LN LA A N N A LLA LA LN LA LA LA A LA LA LN LA NI LIAINLIALIAIA LA LA LA WD

CZMSDCO MS11-L/M DIAGNOST!C

CZMSDCO MS11-L/M DIAGNOSTIC
ERROR POINTER

G0 Co G0 0o GO
W
oo

15796
15797 064130
15798 064132

39 064140

40 064142

41 066144
62 064146

067056
067432
064416
064534

, ERROR
M40

SEQUENCE

352

067343
070573
064514
064706

——
—

TABLE

1
MACRO M1113 22-APR-81 14:13 PAGE 2932

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR DATA TAGS (DT)

15852
15853 064150

002016

15857 822}95

888838

15858 822}5%
15859 064202

066156

MACRO M1113

000000
002034

OT1:

.SBTTL
.WORD

ERROR DATA TAGS (DT)
ERRPC,ADDRESS,GOOD,BAD,0

002070

©T3:

.WORD

ERRPC,PADDRESS,PARCNT,0

888868

002032

002066

DT4:

.WORD

002016

177572

177574

DTS:

.WORD

ERRPC,MMRO,MMR1
,MMR2 ,MMR3,CPUERR,0

002350
000000
002032
002050

DT6:

.WORD

ERRPC,APTPAR,LSIZE
,APTECC ,MSIZE,O

DT7:

.WORD

ERRPC,DUMMY,ADDRESS,DUMMY
,GOOD ,BAD,BADXOR

002050

177576
000000
002016
002374

864242

002170

002372
002352
002170
002042

15862 064252

002170

15864 064306
15865 064314
15866 064320

002172
002200
002206
002016
002144
002016

002174
002202
002210
002144
000000
002170

002176
002204
000000
000000

15867 064342

177746

177572

06
15863 064264
064272
064300

064326
064334

€ 12
PAGE 495

002042

002032

064210
064216
15860 064220
0646226
15861 064234

22-APR-81 14:13

002016

002032

.WORD

DUMMY ,DUMMY,DUMMY
,DUMMY 0

DT10:

.WORD

DETRO,DETR1,DETR2,DETR3,DETR4,DETRS,DETSP,DETPSW,0

DT 11:
0T 12:
OT 13:

.WORD
.WORD
.WORD

ERRPL,CSR,0
(SR,0
ERRPC,DUMMY ,ADDRESS ,DUMMY TSTDAT,TSTDAT+2,CHECK,CSR,0

DT14:

_WORD

CONTRL,MMRO,MMR1,MMR2,MMR3,
CPUERR, O

.WORD

ERRPC,DUMMY,DUMMY,GOOD,GOOD2,GOOD3

.WORD

BAD,BADZ2,BAD3,DuMMY,DUMMY,0

172516

002170
002044
002052
002170
002170
002042

002170
002046
002054
000000
000000
002050

DT16:

D717
DT20

.WORD
.WORD

ERRPC,DUMMY,O
ERRPC,GOOD,BAD,0

002170
002170
002170

000000
002042
002170

DT22:
DT23:

.WORD
.WORD

ERRPC,DUMMY,(
ERRPC,DUMMY,GOOD,BAD,DUMMY,DUMMY
,DUMMY ,DUMMY, 0

002170

002144

DT24:

.WORD

ERRPC,DUMMY,CSR,DUMMY,DUMMY,DUMMY
,DUMMY,0

15882 064476

002016
002042
002050
002170
002016
002016
000000
002016
002016
002050
002170
002016
002170
002170
002016

002042

002144

DT25:

.WORD

ERRP(C,GOOD,CSR,0

15883 064506
15884 064514
064522
064530

002016
002016
002170
002170

002050
002170
002170
000000

000000
002032
002170

DT26:
DT27:

.WORD
.WORD

ERRP(C,BAD,0
ERRPC,DUMMY,ADDRESS,DUMMY,DUMMY,
DUMMY ,DUMMY 0

15869 064374
064402
15870 064410
15875 064416
064424
15879 064426
15880 064434
064442

064450

15881 064456

064464
064472

177576

002240
002144

177766

002242
000000
177574
177766

064350
0
15868 064360
064366

002170
002274

172516

ERRPC,ADDRESS ,NEMCNT,0

002170

002170
000000

000000
002170

SEQUENCE

353

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR DATA FORMATS (DF)

15891
15892 064534
064537
064542
064545
064550
064553
064556
15893 064560
064563
064566
064571
15894 064573
064576
064601
064604
15895 064606
064611
064614
064617

000
000
000
000
000
000
000
000
010
000
002
000
010
010
002
000
010
011
002

0646624

010

15896 064621

064627
064632

090

010
002

MACRO M1113

22-APR-81

14:13

D 12
PAGE 497

.SBTTL

0,0.0.010+0.0,0,0,0,0.,0,0,0,0,0.0.0,0,0

DF3:

.BYTE

0.5.0.,8.,0,0,0,3,6.,2,4

DFé4:

.BYTE

0,5,0,8.,0,8.,8.,3,6,2.4

DFS:

.BYTE

0,5,0.8.,9.,9..9..3.6,2.4

DF6:

.BYTE

0,5.,0,8.,9..8..8.,3,6,2,4

DF¢:

15897 064634

000

DF7:

.BYTE

0.5.8.,0,0,9.,0,0,9..,2.4

15898 064647
15899 064651
064654
15900 064656
064661
064664
15901 064667
064672
064675
15902 064677
064702

000
000
001
000
010
000
000
000
002
000
003

DF8:
DF9:

.BYTE
.BYTE

0.5
0.1,1.1.1

DF11:

.BYTE

0.5.0,8.,0,0,0,0,0

DF13:

.BYTE

00500500306'2‘4

DF14:

.BYTE

0,5,0,3.6,2.4

15903 064706

000

DF1S:

.BYTE

0,5,0,8.,3,6.4

064637
064642
064645

064705

064711
064714

000
000
002

004

010
004

SEQUENCE

354

CZMSDCO MS11-L/M DIAGNOSTIC

MACRO M1113

ERROR MESSAGES (EM)

15909
15918
15919
15920
15921
15922

064715
064753
065005
065053
065130

103
120
116
1
125

22-APR-81

14:13

E 12

PAGE 499

101
101
117
114
116

116
122
116
114
105

EM2:
EM3:
EM4:
EM5:
EM6:

.SBTTL
LASCIZ
LASCIZ
LASCIZ
LASCIZ
.ASCIZ

.ASCIZ

/MEMORY MANAGEMENT (TRAP TO 250)/

ERROR MESSAGES (EM)
/CAN'T SET 22 BIT MODE IN MMR3/
/PARITY ERROR(S) IN BANK 0/
/NON-EXISTANT MEMORY (HOLES) IN BANK 0/
/ILLEGAL OR RESERVED INSTRUCTION (TRAP TO 10)/
/UNEXPECTED TRAP T0 4/

115

105

15928 065215
15929 065237
15930 065263
15931 065315
15932 065361
15933 065427
15934 065467
15935 065544
15936 065626
15937 065665
15938 065712
15939 065741
15940 066020
15941 066045
15942 066116

115
104
115
127
106
115
123
123
123
115
125
122
103
101
105

105
105
1
122
101
105
102
102
102
m
116
105
110
104
103

115
126
123
111
111
115
105
105
105
123
105
103
105
104
103

EM11:
EM12:
EM13:
EM14:
EM15:
EM17:
EM19:
EM20:
EM21:
EM22:
EM23:
EM24:
EM25:
EM26:
EM27:

_ASCIZ
_ASCIZ
_ASCIZ
_ASCIZ
_ASCI2
_ASCIZ
_ASCIZ
.ASCIZ
ASCIZ
ASCIZ
ASCIZ
ASCIZ
ASCIZ
.ASCIZ
.ASCIZ

/MEMORY DATA ERROR/
/DETAILED ERROR DUMP/
/MISSING EXPECTED SBE FLAG/
/WRITE BYTE FAILED TO CLEAR SBE FLAG/
/FAILED TO GET INTERRUPT WITH DBE FLAG/
/MEMORY DATA ERROR IN CHECK BITS/
/SBE OR DBE CAUSED PARITY TRAP WHEN INHIBITED/
/SBE OR DBE DID NOT CAUSE PARITY TRAP WHEN ENABLED/
/SBE OR DBE ON MASTER TEST WORD/
/MISSING EXPECTED DBE/
/UNEXPECTED PARITY TRAP/
/RECEIVED DBE FLAG WHEN EXPECTING ONLY SBE FLAG/
/CHECK BIT DATA ERROR/
/ADDRESS PARITY ERROR DID NOT CAUSE ABORT/
/ECC INHIBIT MODE POINTER FAILURE = DID NOT PROTECT BANK/

15948 066363
15949 066407
15950 066507

106
101
115

117
123
117

122
122
126

EM31:
EM32:

.ASCIZ
_ASCIZ
_ASCIZ

/FORCED SBE LOCATION/
/ASRB (R3)+ WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/
/MOVB #360,(R2)+ WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/

EM35:
EM36:
EM4LO:
EM50:

,ASCIZ
ASCIZ
ASCIZ
ASCIZ

15951 066614

15952
15953
15959
15968
15969
15970
15971

066722
067007
067056
067130

067164
067246
067273
15972 067322
15973 067343

103
127

115

125
101
102
102
123
102
102
111
102

117
122

117

116
120
122
101
102
1m
m
114
101

122
111

126

105
124
101
104
105
126
126
114
106

EM7:

355

}ggg; 065155

15946 066206
15947 066270

115

SEQUENCE

EM29:
EM30:

EM33:

EM51:
EMS52:
EM53:
EM5S5:
EM56:

.ASCIZ
.ASCII

ASCIZ

ASCIZ
ASCIZ
ASCIZ
.ASCIZ
.ASCIZ

/CORRECTION FAILURE WITH ECC ENABLED ON FORCED SBE/
/WRITE BYTE (MOVB) WITH ECC ENABLED FAILETM TO CLEAR DATA AT/<CRLF>

/MOV #177400, (R1) WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/
/UNEXPECTED CORRECTION WITH ECC DISABLE ON FORCED SBE/
/APT SIZE DISAGREES WITH PROGRAM SIZING/
/BRANCH GOBBLE FAILED CONDITION CODES TEST/
/BAD ERROR ADDRESS GENERATED/

/SBE & DBE FLAGS NOT SET ON FORCED UNCORRECTED SBE/
/BIT SET ERROR IN CSR/
/BIT CLEAR ERROR IN CSR/
/ILLEGAL CSR TYPE/
/BAD PARITY TR
P GENERATED/

CZMSDCO MS11-L/M DIAGNOSTIC

ERROR DATA HEADERS

15979
15980 067375

MACRO M1113

(DH)

15982 067455

040
040
040

120
120
120

DH1:
DHZ:
DH3:

15984 067570
15985 067635
15986 067701
15987 067745
15988 070043
15989 070061
15990 070066
15991 070143
15992 070163
15993 070242
15994 070317
15995 070361
16000 070376
16006 070403
16007 070462
16008 070531
16009 070555
16010 070573

040
040
040
040
040
040
040
040
103
040
040
040
040
040
040
040
040
040

040
040
040
040
040
103
040
103
117
040
102
040
040
040
040
040
040
040

120
120
040
122
120
123
120
110
116
120
101
120
120
120
120
120
120
120

DH6:
DH7:

15981 067432

15983 067511

040

120

DH5:

DH10:
DH11:
DH12:
DH13:
DH14:
DH15:
DH16:
DH19:
DA23:
DH24:
DH25:
DH26:
DH27:

22-APR-81 14:13

F 12

PAGE 501

SEQUENCE

.SBTTL
.ASCIZ

ERROR DATA HEADERS (DH)
/
PC
DEV ADD
GOOD

.ASCIZ

LASCIZ
.ASCI1
CASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
_ASCI1
.ASCIZ
.ASCIZ
.ASCIl
.ASCIZ
.ASCIZ
ASCIZ
ASCIZ
.ASCIZ
ASCIZ
.ASCIZ
.ASCIZ

GD=CC BD-CC/

1ST ADD

MMRO

BAD/

# OF ERRORS/

MMR1

MMR?2

MMR3

CPUERR/

/
PC
APTPAR
LSIZE
APTECC
MSIZE/
/
PC
BANK
VADD
PADD
600D/
/
BAD
XOR
(SR
MTYP_INT PAT/
/
RO
R1
R2
R3
R4
RS
/
PC
CSR/
/ CSR/
/
PC
BANK
VADD
PADD
WROTE1
WROTEZ2/
/ CHKBITS
CSR/
/CONTRL
MMRO
MMR1
MMR?
MMR3
CPUERR/
/
PC
BANK
PADD
GD-WD1
GD-WD2
GD=-CHK/
/ BAD-WD1 BAD-WD2 BAD-CHK INT PAT/
/
PC
BANK/
/
PC/
/
PC
BANK GD-ERR BAD-ERR CSR MTYP INT
PAT/
/
PC
BANK
(CSR) CSR MTYP INT
PAT/
/
PC
GD-DAT
(CSR)/
/
PC
BADCODE/
/
PC
BANK
VADD
PADD
CSR
MTYP PAT/

PSW/

356

CZMSDCO MS11-L/M DIAGNOSTIC
MESSAGES

SEQUENCE

040
075
060
061
062
063
064
065

061
012
127

070
000
110

.ASCII
.BYTE
.ASCIZ

061
061

103
103
103
117
103
105
102
120
120
124
102

040

066
067

123
123
117
114
123
130
101
110
101
111
131

067

117
040
040
040
040
040
040
040

MSGO09:

MSGO10:
MSGO11:
MSGO12:
MSGO13:
MSGO14:
MSGO15:
MSGO16:
MSGO17:
MSGO18:
MSGO19:
MSG020:
MSGO21:

.ASCII
LASCII

MSG022:
MSG023: .ASCIZ
MSG025: .ASCIZ
MSGO26: .ASCIZ
MSG027: .ASCIZ
MS56028: .ASCIZ
MSG029: .ASCIZ
MSGO30: .ASCIZ
MSG031:
.ASCIZ
MSGO32: .ASCIZ
MSGO33: .ASCIZ
MSGA34: .ASCIZ

NN
S NN =

070
071
061
061
061
061
061
061

103
060
061
062
063
064
065
066

MSGO05:
MSG006:
MSG007:
MSGO08:

072037
072063
072107
072131
072151
072174
072224
072253
072276
072320
072350
072373
072414
072436
072441
072463
072477
072523
072535
072552
072566
072606
072625
072665
072704
072723

200
200
200
200
200
200
200

123
0460
000
040
123

MSGO04:

el amd

200
200
200
200
200
200
200
200
200
200
200
200
200
015
200
200
200
200
200
200
200
200
200
200
200
200

071651
071675
071706
071723
071740
071763
072005

040
062
122
116
116
120
105
122
040
066

MSG000:
MSGO01:
MSGO02:
MSGO03:

16044
16045
16046
16047
16048
16049
16050
16051
16052
16057
16058
16059
16060
16061
16062
16063
16064
16065
16066
16067
16068
16069
16070
16071
16072
16073

16037
16038
16039
16040
16041
16042
16043

040
061
105
125
111
103
115
120
040
065
000
000
000
103
040
040
040
106

103
040
040
040
040

—

16021 071266
16022 071300
16023 071335
16024 071347
16025 071361
16026 071373
16027 071405
16028 071473
16029 071570
16030 071572
16031 071574
16032 071576
16033 071610
16034 071621
16035 071624
16036 071630

200
060
200
200
200
200
200
200
040
064
130
040
000
200
040
040
040
200

PAGF 503

.SBTTL MESSAGES
.ASCIZ
<CRLF>'' CIMSDC - MS11L/M MEMORY DIAGNOSTIC''
.ASCIZ
<CRLF>/
MEMORY CONFIGURATION MAP/
.ASCIZ
<CRLF>/
16K WORD BANKS/
<CRLF>/
.ASCII
1
Cl
2
3/
.ASCI1Z
/
)
6
7
/
Cl
<CRLF>/
.ASCII
012345670123456701234567/
Cl
.ASCIZ
/0123456701234567
01234567012345670123/
Cl
.ASCIZ
<CRLF>/ERRORS
cl
.ASCIZ
<CRLF>/UNDEFINED TRAP INSTRUCTION/<32>
Cl
.ASCIZ
<CRLF>/INTRLY
/
Cl
JINTERLEAVED CSR #
.ASCIZ
<CRLF>/CPU MAP /
cl
;CPU ACCESSED BANK
.ASCIZ
<CRLF>/MEMTYPE /
Cl
SMEMORY TYPE
.
ASCI 4
;CRLFS/PROTEC{ /
5
3
:HEHO?Y PROTEgTED
6/
.ASCIZ
SCI
. S cl 4
5;;6701234567012345670123456701234567012345670123456701234567/
ASCI 4
/ /
ASCI 4
:SPACE
.BY TE
0.0
JFOR SINGLE ASCII CHARACTERS & TERMINATOR
.AS Clz
<CRLF>/CSR
/
/
ASCIZ
/
;8 SPACES
.AS clz
/
/
;2 SPACES
.AS Clz
/
/
:3 SPACES
AS clz
<CRLF>/FS COMMAND MODE/
<CRLF>/COMMANDS AVAILABLE:/
.ASCII
.ASCI]
<CRLF>/0
EXIT/
.ASCII
<CRLF>/1
READ CSR/
CASCII
<CRLF>/2
LOAD CSR/
LASCII
<CRLF>/3
EXAMINE MEMORY/
+ASCII
<CRLF>/4
MODIFY MEMORY/
.ASCII
<CRLF>/5S
SELECT BANK & PATTERN/
LASCII
TYPE CONFIG MAP/
<CRLF>/6
LASCII
<CRLF>/7
SOB-A-LONG TEST/
.ASCII
<CRLF>/8
ERROR SUMMARY/
.ASCII
<CRLF>/9= REFRESH TEST/
. SCII
<CRLF>/10= SET FILL COUNT/
.ASCII
ENTER KAMIKAZE MODE/
LASCII
EXIT KAMIKAZE MODE/
.ASCII
TURN CACHE OFF/
.ASCII
TURN CACHE ON/
.ASCII
TEST SELECTED BANKS/

040
040
040
040
040

16019 071160
16020 071221

200
200
200
200
040

-~
-

070647
070714
070776
071053
071115

G 12

14:13

16014
16015
16016
16017
16018

22-A°R-81

16013

MACRO M1113

TEST ALL BANKS/
<CRLF>/17= ENABLE TRACE/
<CRLF>/18= DISABLE TRACE/

15,12.0

<CRLF>/WH]ICH CSR(O-F)’ /

<CRLF>/CSR WORD?
/
<CRLF>/CSR DOES NOT EXIST/
<CRLF>/C OMMAND
:/
<CRLF>/0LD CSR WAS/
<CRLF>/CSR 1S NOW/
<CRLF>/EXAMINE MEMORY/

<CRLF>/BANK(0-177)? /
<CRLF>/PHYSICAL ADDRESS(0-17757776)? /
<CRLF>/PARITY ABORT/<32>
<CRLF>/TIMEOUT TRAP/<32>
<CRLF>/BYPASSING ECC LOGIC TESTS ON BANK /

357

040

104

16078 073073
16079 073111
16080 073133

200
200
200

104
mm
123

16082 073214

200

120

16075 073032
16076 073035
16077 073054

121
200
200

MSGB34:

101
116
105

MSGO38:
MSG039:
MSGO40:

101

MSGO42:

000
117
116

102

101

101
117
105
117
101
101
122
117
105
105
117

16081

073167

16083
16084
16085
16086
16087
16088
16089
16090
16091
16092
16093

073235
073262
073315
073334
073374
073426
073452
073534
073554
073605
073623

200
200
200
040
200
200
200
200
200
040
200

120
124
124
116
102
102
127
120
122
123
116

16096
16097
16098
16099
16100
16101
16102

073747
073771
074000
074020
074031
074041
074053

200
077
m
116
116
040
200

040
077
116
040
125
104
105

040
077
120
117
115
105
122

16104
16105
16106
16107
16108
16109
16110
16111
16118
16126
16127
16128
16129
16130
16131

074145
074176
074214
074232
074250
074302
074323
074337
074363
074410
074426
074450
074464
074476
074512

113
113
113
200
200
200
200
040
200
200
200
200
040
122
102

040
040
049
122
122
040
105
105
106
113
123
125
m
105
101

127
117
117
105
105
040
116
122
111
105
125
123
123
114
116

16094 073673
16095 073714

16103 074136

16132
16140
16141
16142
16143
16144
16145
16146
16151
16152
16153
16154

074520
074527
074557
074606
074630
074632
074736
074754
075031
075075
075127
075144

200

125

126
115
117

200
200

106

040
200
200
200
032
200
200
200
200
200
113
113

123
102

101

040
105
114
114
000
105
103
103
117
101
040
040

117
105

124

120
116
105
105

116
101
101
116
114
117
117

.ASCIZ

MSGO35:
MSGO36:
MSGO37:

.ASCIZ
.ASCIZ
.ASCIZ

MSGO41:

.ASCIZ

MSGO43:
MSGO46:
MSGO47:
MSGO48:
MSG049:
MSGO50:

MSGO51:
MSGO52:
MSG053:
MSGO54:
MSGO55:
MSGO56:
MSGO58:
MSGO61:

MSGO62:
MSGO63:
MSGO64:
MSGO6S5:

MSGO66:
MSGO67:
MSGO70:
MSGO71:
MSGJ72:
MSGO73:
MSGO75:
MSGO76:
MSGO77:
MSGO79:
MSGO85:
MSGO88:
MSGO89:
MSG090:
MSGO91:
MSG092:
MSGO93:
MSGO95:
MSG101:
MSG102:
MSG103:
MSG104:
MSG105:
MSG106:
MSG107:
MSG110:
MSG111:

MS6112:
MSG113:

H 12
PAGE 503-1

/ DUE TO LACK OF

SEQUENCE
SBE FREE LOCATIONS/

/Qv/
<CRLF>/MODIFY MEMORY/
<CRLF>/0LD DATA WAS /

.ASCIZ
.ASCIZ
.ASCIZ

<CRLF>/DATA IS NOW /
<CRLF>/INPUT NEW DATA? /
<CRLF>/SELECT BANK & PATTERN TEST/

.ASCIZ

<CRLF>/PATIERN(0-35)? /

<CRLF>/BANK NOT ACCESSABLE/

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCII
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

<CRLF>/PATTERN 0 DATA IS? /
<CRLF>/TO ESCAPE TYPE ANY KEY/<CRLF><12><12>
<CRLF>/TEST COMPLETE/
/ NOT AVAILABLE NOW - TRY LATER!/
<CRLF>/BANK REQUIRES RELOCATION/
<CRLF>/BATTERY BACKUP TEST/
<CRLF>/WRITING & CHECKING ADDRESS PATTERN AS BACKGROUND/
<CRLF>/POWER RECOVERY/
<CRLF>/REMOVE SYSTEM POWER FOR/
/ SECONDS MAX!/
<CRLF>/NOW STARTING READ TEST OF MEMORY BANKS/

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

<CRLF>/
(SR
CSR .../
/222222/
/INPUT MUST BE A/
/N OCTAL /
/NUMBER/<CRLF>
/ DECIMAL /
<CRLF>/ERROR COUNT EXCEEDED 20 - ABORTING FOR XXDP CHAIN/

.ASCIZ
.ASCIZ

.ASCIZ

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.BYTE_
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
_ASCIZ
_ASCIZ
.ASCIZ

358

<CRLF>/SOB~A-LONG TEST/
<CRLF>/BELL = EACH PASS COMPLETE/

/FATAL /

/K WORDS OF MEMORY TOTAL/<CRLF>
/K OF BIPOLAR/<CRLF>
/K OF MF11S~K/<CRLF>
<CRLF>/REFRESH TEST/
<CRLF>/RELOCATION NOT POSSIBLE/<32>
<CRLF>/_
BANK
ERRORS/<CRLF>
<CRLF>/END PASS #/
/ ERROR(S) DETECTED/<CRLF>
<CRLF>/FILL COUNT(OCTAL)? /
<CRLF>/KERNEL STACK/
<CRLF>/SUPERVISOR STACK/
<CRLF>/USER STACK/
/ IS FMPTY/
/RELUCATED
/
/BANK=/

/ PAT=/
<CRLF>/ENTERING KAMIKAZE MODE/
<CRLF>/LEAVING KAMIKAZE MODE/
<CRLF>/LEAVING FS MODE/<CRLF>
32,0
; CONTROL 2
<CRLF>/ENTER BANKS IN OCTAL - USE NUMBER OUTSIDE RANGE TO TERMINATE
<CRLF>/CACHE IS OFF/
<CRLF>/CACHE IS ON (EXCEPT DURING ACTUAL PATTERNS)/
<CRLF>/ONLY SELECTED BANKS WILL BE TESTED/
<CRLF>/ALL BANKS WILL BE TESTED/

/K OF MS11-L/<CRLF>
/K OF MS11-M/<CRLF>

—~

14:13

e fnlelvivivcleleolvloleolelel
o leleololvlvlvioloeloleleo XV .7,

16074 072767

22-APR-81

(177)/

il lelislislecliealieclicieslislialaislieaslislicliecieslelieie e il

MACRO M1113

[

g%gggggsfls11-L/H DIAGNOSTIC

075624
075624

200
000
040
200
200
040
200
200

200

004064
002154
000200

117
040

103
120
116
120
120
1264

117
122
125
101
122
122

124

040
040
040
101
101

123

122

MSG114: .ASCIZ
MSGI16: .ASCIZ
MSGI17: .ASCIZ
MSGI18: .ASCIZ
MSG119: .ASCIZ
MSG120: .ASCIZ
MSG121: .ASCIZ
MSG122: .ASCII
MSGA122:.BYTE
.ASCIZ
MSG123: .ASCIZ
MSG124: .ASCIZ
MSG125: .ASCIZ
MSG)26: .ASCIZ
MSG127: .ASCIZ

WSG128:
END:

:ASCIZ

SEQUENCE

/K OF UNIBUS PARITY/<CRLF>
<CRLE>'
11/34
<CRLF>''
11744
<CRLE>'
11/60°
<CRLF>/
NO/
/ CACHE AVAILABLE/
/ CACHE BYPASSED/
<CRLF>/CSR NUMBER /
G
/ CONTROLS TOO MANY BANKS/
<CRLF>/PROGRAM RELOCATED - ECC TESTS INHIBITED/
<CRLF>/NUMBER OF CSR'S IS WRONG IN BANK /
/ PASSES COMPLETED/
<CRLF>/PROGRAM CSR COULD NOT BE DETERMINED/
<CRLF>/TRACE ENABLED/

<CRLF>/TRACE DISABLED/

$SEND
.PRINT
60000-SUPLIMIT
-PRINT_100000~END
.END START3

:SUPERVISOR ADDRESSES LEFT
:ADDRESSES LEFT IN 16K

359
(7. X7,

075624
075624

200
200
200
040
040

040
040
040
040
040
103
103
103

I 12

PAGE 503-2

«>

16177
16178
16179
16191
16195

16170 075603

113
200

14:13

075161
075205
075217
075231
075243
075252
075273
075313
075327
075330
075361
075432
075475
075517
075564

22-APR-81

faal

16155
16156
16157
16158
16159
16160
16161
16162
16163
16164
16165
16166
16167
16168
16169

MACRO M1113

TR FRAfTIMAArfATTITTIaTffrMmr
T
mmmmmrrafmmmmmnmrnanTmmmmmmmmmmmmnmm

g%gggggSHSfl%/H DIAGNOSTIC

ABORTF
ACFLAG
ACTFLA
ADDRES
ANA2
APTDOW
APTECC
APTFLA
APTHAN
APTHLT

002140
002114
002320
002032
007166
045250
002374
002322
014554
045316

B1
B10
B11
B12
B13
B14
B15
B16
B17
B2

011732
014620
016236
016504
016512
016530
016572
016644
022040
012512

CACHVE=
CBCSR =
CBI1CSR=
CHECK
CHKDIS=
CHKGEN
CHKTAB
CHK1DI=
CKEND
CKSWR =

000114
104474
104475
002¢74
104504
041722
042030
104505
061236
104410

DATBUF
DBEMSK
DDISP =
DEENER=
DETAIL
DETFLA
DETPSW
DETRO
DETR1
DETR2

002234
002250
177570
104421
057462
002212
002210
2172
002174
002176

DT14
DT16
DT17
D120
DT22
D123
DT24
D125
DT26
D127

BACK
BACKGN

BAD
BADPC
BADPSW
BADSP
BADSTA
BADXOR

055744
036530
002050
002020
002030
002024
040166
002056

B22
B23
B24
B25
826
B27
B3
B30

024324
024524
024532
025030
034450
034506
012554
034522

CLRMEM
CLR1CS=
CMD16A
CMD16L=
CMD5B
CMDSC
CMD7B
CMD7C

007036
104503
051022
000052
047240
047510
047740
050014

DETRS
DETSP
DET1
DF11
DF13
DF14
DF15
DF2

002204
002206
060152
064656
064667
064677
064706
064534

DTS5
DT6
D77
pUMMY
DUMPCS=
ECCDIS=
ECCINI=
ECCIDI=

BAD3
BAFPAF
BAFPAR

002054
014710
015016

B32
B33
B34

035022
035044
036240

CMDSC
CONFGE
CONFIE

050512
002420
003630

DF4
DF5
DFé

064573
064606
064621

EMTVEC= 000030
EMI1
065215
EM12
065237

041012
041152
013356
041156

CONTFL
CONTRL=
CONTS
CONTS1

002214
177746
061406
060764

013520
050166

CPUERR= 177766
CR
= 000015

BS54

BIT4

= 000010
= 000020

BITS =
8IT6 =
BIT7 =
BIT8 =
81719 =
RLOCK1
BLOCK2
BLOCK3
BMFLAG
8007
BOOT1
BRGOBB
BSIZE
B0

000040
000100
000200
000400
001000
045320
045340
045354
002126
045026
045072
036110
002344
004554

B51
B52
B53
BSS

B56
BS7
B6
860
B61
B62
B63
B64
B6S
87
CACHKF
CACHKN
CACHOF=
CACHON=

041362
041366
042570
042576
042726
042742
047744
050442
050736
050736

CONTS2
CONTS3
CONTT
COUNT
CPERRF
CPSAVE
CPUBIT

061410
053576
061332
002340
056510
056506
002104

CRLF
= 000200
CSR
002144
CSRADD= 172100

051034

CSRCAS

017416

052000
052276
013562
052304
057716
057722
060020
060112
060176
014046
002520
002514
104424
104423

CSRFIR
CSRHOL
CSRINC
CSRINF
CSRINT
CSRLAS
CSRLBA
CSRLOO
CSRNO_
CSROUT
CSRSTU=
CTEST
CTLKVE
DATARG=

002220
002476
002300
002432
002230
002222
002226
002302
002146
041354
000014
006140
002142
177754

051774

CSRFBA

002224

DF8
DF9
DH1
DH10

064634

064647
064651
067375
067745

ECC1IN= 104473

EM13

EM14
EM15
EM17
EM19

065263

065315
065361
065427
065467

DH11
DH12
DH13
DH14
DH15
DH16
DH19

070043
070061
070066
070163
070242
070361
070376

EM2
EM20
Em21
EM22
EM23
EM24
EM25

064715
065544
065626
065665
065712
065741
066020

DH24
DH25
DH26

070403
070462
070531
070555

EM29
EM3
EM30

066206
064753
066270

DH3

067455

EM32

066507

DHZ
DH23

DH27
DH5
DH6
DH?7
DIAGFL
DISPLA
DISPRE=
DISPTB
DOBACK
DSWR =
DT1
DT10
DT11
D712
DT13

067432

EM26
EM27

070573

EM31

067511
067570
067635
002002
002600
000174
014236
014610
177570
064150
064264
064306
064314
064320

EM33
EM35
EM36
EM4
EM4O
EMS
EM50
EM51
EMS52
EMS53
EMS5
EMS6
EM6
EM?

066045
066116

066407
066614

066722

067007
065005
067056
065053
067130
067164
067246
067273
067322
067343
065130
065155

Ten

BIT3

BIT14 = 040000
BIT15 = 100000
BIT2 = 000004

B41
B4?2
B43
B44
B4
B46
B47

DF7

064234
002170
000061
104470
104472
104471

B85
850

015124
015254
036106
000001
000002
002000
004000

002624

064560

064202
064220

“UR

BIT12 = 010000
BITi3 = 020000

BAWPAF
BAWPAR
BGTEST
BITO =
BIT1
=
BIT10 =
BIT11 =

CONFIG

DF3

064162
0646172

"GN

041006

B36
837
B4
B40

050436

D73
DT4

B35S

002100
002102
043750
044750

CMD9B

002200
002202

002572

BANK
BANKIN
BANKMO
BANKOK

034642

DETR3
DETR4

T$R

BAKPAT

831

CLRCSR= 104502
CLREX
007136

TOR TEU

002052

022300
024320

064342
064360
064410
064416
064426
064434
064456
064476
064506
064514

360

TER

BADZ2

820
821

SEQUENCE

002372
002414

PAGE 503-3

-h

APTPAR
APTSIZ

14:13

rMesmrmaraMoaca

MACRO M1113

SYMBOL TABLE

22-APR-81

J 12

CZMSDCO MS11-L/M DIAGNOSTIC

]
E40
E41
E42
E43
E44

041224
041416
041416
042726
042706

Eé4

E45
E46
E47

013512

043146
043054
050006

FS1

FS7FLA
FULLRE
GBLENG
GE TDAT
GETDA1

GETDIS
600D
G00D2

060000
002556
036400
014330
045602
045704
046014
046162
046436
046756
047600
047606
050100
050304
002412
047414
002266
045470
002416
002512
000076
051464
051562
055656
002042
002044

KDPAR7= 172376
KERNEL= 104417
KERSTK= 002000

010720
021452
021502
021512
021512
021556
021566
021566
021576
010724
021634
021644
021644
021702
021712
021712
021772

L
L112
L1113

015242
015372
015522

L174
L175
L176

022124
022124
022202

L104
L105
L106
L107
Ln
L110

L114
L115
L116

L117
L12

KIPAR4= 172350
KIPARS5= 172352

L120
L121

KSIZE
KSTACK

L126
L127

KIPARG=
KIPDRO=
KMAP =
KPFLAG

172354
172300
104422
002112

LAST =
LASTBA
LASTBL
LASTER
LBLSO =
LBLS1 =
LBLS2 =
LBLS3 =
LBLS4 =
LBLSS =
LBLS6 =
LCSROU=
LCSRRE=
LCSRSA=
LEGALC=
LF
=
LINK1
LINK2

157776
002526
002530
002014
000455
000065
000447
000442
000315
000317
000016
000041
000057
000055
000003
000012
002472
002474

002346
002534

L122
L123
L124
L125

L13
L130
L1
L132
L133
L134
L135
L136
L137
L14
L140
L14]
L142
L143
L144
L145
L146
L147

014604
014604
014672
015004
005132
015112

015674
016024
016176

016256
005162
016314
016324
016750
016732
016776
017240
017350
017506
005414
017534
017540
017542
017606
017642
017646
017659
020016
005414
020472
021340
021350
021350
021406
021416
021416
021446

L167
L17
L170
L171
L172
L173

L177
L2
L20

L200
L201
L202
L203

L204
L205
L206
L207
L21
L210
L2Nn
L212
L213
L214
L215
L216
L217
L22
L220
L221
L222
L223
L224
L225
L226
L227
L23
L230

022002
010726
022002
022144
022072
022072

022236
004734
011540

KFLAG
002500
KIPARO= 172340

002136
104511
000020
043300
002004
026430

L15
L150
L151
L152
L153
L154
L155
L156
1157
L16
L160
L161
L162
L163
L164
L16S
L166

NDADNAWD

000045
006436

051054
051070
045404

INT64K
INVALI=
I0TVEC=
JMPRLT
KAMIKA
KAMITE

177546
002402
104425
000043
002536
014210
043704
002350
000037
000035
004564
004626
005124
014210
014324
014424
014434

T TNV MY NI TN

051012

KDIAG = 000010
KDPARO= 172360
KDPARG= 172374

177640
002062
050576
050624
050646
050666
050710
050726

LKS
=
LOADBA
LOADCS=
LOADER=
LOADHO
LOOP
LOWMAP
LSIZE
LWDBE =
LWSBE =
Lo
L1
L10
L100
L101
L102
L103

YTMTM

E63
E64
E65
E7
FASTCI
FATALS
FCMD10
FCMD11
FCMD12
FCMD13
FCMD14
FCMD15
FCMD16
FCMD17
FCMD18
FIELDS
F INDBA
FINT
FIRST
FLIPLO
FLIPWA
FLUSH
FSCMDO
FSCMD1
FSCMD2
FSCMD3
FSCMD4
FSCMD5
FSCMD6
FSCMD?7
FSCMD8
FSCMD9
FSINFL
F SPAT
FSSTAC

E62

002046
104407
002552
045002
000011
000011
002422
056504
177777
013256
012222
045012
064766
044766
002510
002506
002134

002130
002334
044300
046370
046710
045134
045140
004602
012150
014706
016256
017030
017014
016750
016750
016720
022136
012714
022400
024502
024466
024710
024674
025106
035014
035000
012700
034614
034764
035040
035064
036362
041060
041060
041224

GO0D3
GTSWR =
HEADER
HIPAT
HOLDLO=
HT
=
I
IBSAVE
1111
=
ILLCSR
IMPTES
INCBNK
INCPAT
INCRPT
INHBAN
INHECC
INTFLA

361

TSNS

EUFLAG
EVEN
EXBANK
EXCMD3
EXCMD4
EXIT
EXIT2
E0
E1
E10
EN
E12
E13
E14
F15
E16
E17
E2
E20
£21
E22
E23
E24
E25
E26
€27
E3
E30
E31
E32
E33
E34
E35
E36
E37

013560
050270
050504
050776
050776
051052
052034
052034
052340
013610
052340
057764
057764
060050
060144
060230
014166

SEQUENCE

022240
022266

022270
022354
022466
022470
023330
023362
011554
023426
023676
023706
023706
024452
024420
024452
024516
011700
024660
024626
024660
025072
025072
025200
025152
025230
011656
025420

[

ES
E50
£S5
E52
E53
E54
ESS
E56
ES?7
E6
E60
E61

K 12
PAGE 503-4

Aa A

104506
104507
075624
104420
044740
002430
104512
002524
104000
002016
002026
002022

ERRVEC= 000004

14:13

ENASBE=
ENA1SB=
END
ENERGI=
ENEXBK
ERRADD
ERRGEN=
ERRMAX
ERROR =
ERRPC
ERRPSW
ERRSP

SYMBOL TABLE

22-APR-81

—

MACRO M1113

CIZMSDCO MST11-L/M DIAGNOSTIC

]
055412
055502
055512
012416
056020
56020
056254
056214
056234
056254
056452
056322
012422
056450
056400
056412
056450
056460
057014
057742
060146
012700
060152
060232
060236
061352
061442
061444
012700
012654

MAINT =
MAPHO =
MAPLO =
MAPL1 =
MAPPER
MBERR
MEMDON
MFPT
=
MIPAT
MJTEST
MK CONT
MKCSRT
MKFLAG
MKLOOP
MKPAT
MKTEST
MR =
MR
=
MMR? =
MMR3
=
MMTRAP
MMVEC =
MSEEDH
MSEEDL
MSGA12
MSGA34
MSGB34
MSG000
MSG001
M5G002

N=SSONPOPOWN
SN IS =2 YN N 2 WNON

(425
(426
(427
(43
430
L431
(432
433
L43%
(435
L436
(437
(44
(440
L441
(442
443
L444
(445
L4486
L447
(45
L450
L4351
(452
(453
(454
(455
(46"
(47

KRWW

OQOO0OO0OO0COO0OO—
=== O0O000O0O0O0O0OOO == lelelelelelelalelblelalalelelolelelalelelalelalaolelels]

047066
047126
047164
047332
047346
012134
047360
047656
047660
047772
050270
050254
050224
050354
012206
050356
050470
050760
050762
051226
051242
051246
051264
012212
051412
051414
051460
051704
052012
052316

)X X X

L76
(77

L75

055304
055306

055270

(423
(426

422

045666
045700

0465636

MSGO03
MSGO04
MSGO0S
MSG006
MSG007
MSG008
MSGOO09
MsSGO10
MsSGO11
MSGO12
MSGO13
MSG014
MSGO15
MSGO16
MSGO17
MSGO18
MSGO19
MSGO20
MSGO021
MSG022
MSGO23
MSG025
MSG026
MSG027
MSGO28
MSGO29
MSG030
MSGO31
MSGO32
MSGO33
MSGO35
MSGO36
MSGO37
MS6038
MSGO39
MSGO40
MSGO41
MSGO42
MSG043
MSGO46
MSG047
MSGO48
MSGU49
MSGO50
MSGO51
MSGOS2
MSGO53
MSGO54
MSGOSS
MSGO56
MSGOS8
MSGO61
MSGO62
MSGO63
MSGO64
MSGO65
MSG066

LS
L50
L51
L52
L53
L54
L55
L56
L57
L6
L60
L61
L62
L63
L6
L65
L66
L67
L7
L70
(71
L72
L73
L74

XXX »XX»x»X

053634
053636
004774
012214
054466
054500
054516
054520
054540
054552
054570
054572
012415
054606
055010
055016
055044
055062
055074
055106
055120
012416
055142
055210

362

L376
377
(4
(40
L400
L401
(402
L403
L4046
L405
L406
(407
L41
(410
(411
(412
(413
L414
(415
(416
L417
(42
(420
(421

SEQUENCE

reer~rr

043044
042044
043044
043024
043044
012016
063112
043112
063162
043262
044442
044666
045050
045154
012134
045160
045166
045202
045214
045426
045436
065572
045632
012066

025752
026242
026300
026400
026452
026460
026464
011670
030302
030300
030302
031730
034472
034502
034614
034544
011704
034556
034574
034602
034626
034764
034664
034676
034730
012134
034714
034726
034752
034740
034752
035064
036742
037370
012134
037556
037660
040572
040600
041036
041036
041100
041106
004756
0121%
041202
041202
041244
041252
041374
042542
042556
042570
012012
042570
042672
042722

14:13

rer-e.-

L1231
1232
1233
L234
L235
1236
L237
L24
L240
L241
L2462
L243
L24h
L245
L246
L247
L2S
L250
L251
L252
253
L254
L255
L1256
L257
126
L260
L261
L262
L263
L264
L265
L266
Le67
27
L270
Le71
L272
L273
(274
L275
(276
(277
L3
£30
L300
L301
L302
(303
(306
305
(306
L307
L31
L310
L311
(312

SYMBOL TABLE

22-APR-81

2R RWr-r~-r

MACRO M1113

b
2x
J

L 12
PAGE 503-5

CZMSDCO MS11-L/M DIAGNOSTIC

|
021466
021542
021620
021666
021734
021756
023046
023320
023352
023416
023662
023730
024232
024716
025220
025410
025742
026130
026392
022614
022430
026414
016264
016270
002106
053636
002066
002270
044200

PATERR
PATPLU
PATTER
PCBUMP
PCONF1
PCONFS
PCONF1
PCONF2
PDP110
PD1
PERAOS
PERBNK
PERECC
PERRAB
PERRAW
PERRA3
PERRA7
PERRQ1=
PERRO2=
PERRO3=
PERRQ4=
PERROS
PERRO6
PERRQ7=
PERR10=
PERR11=
PERR12=
PERR13=
PERR14=

002072
004546
002110
002276
036630
037130
037040
037076
040154
051704
054052
054704
054764
(054522
054450
051252
054574
104427
104430
104431
104432
054046
054074
104433
104434
104435
104436
104437
104440

PFECWS
PFLAG
PGMCSR
PHEBE
PHYADD
PROTYP
PSIZE
PSW
=
PWRVEC=
QUICK
QVFLAG
RANODD
RDCHR =
RDDEC =
ROLIN =
RDOCT =
READCS=
READON
REALPA
REFRES
REFSUB
REGCOP
RELENT
RELOCA
RELOCT1
RESREG=
RESTAR
RESVEC=
RESO

MSG117
MSG118
MSG119
MSG120
MSG121
MSG122
MSG123
MSG124
MSG125
MSG126
MSG127
MSG128
MSIZE
MTA030
M78020=
MTEST
MTLATT
MTLB11
MTLC11
MTLD11

075217
075231
075243
075252
075273
075313
075361
075432
075475
075517
075564
075603
002352
024730
000017
016210
030046
030060
030072
030166

MTPO13
MTPO14
MTPO15
MTP016
MTP017
MTPO20
MTPO22
MTPO25
MTPO30
MTPO31
MTP032
MTPO33
MTPO34
MTPO35
MIST3
MTV020
MT0000
MT0001
MT0002
MT0003

031204
031720
032502
033246
034030
034106
034442
035210
035764
035774
036052
036104
036202
036226
011560
022426
020122
020202
020322
020462

NOCH
NOERRO
NOFSMO
NONEM
NONEXI
NOOJ
NOPAR
NORES
NOSCOP
NOSUPE
NOTAB
NOTRCE
N022B1
NULLFL
OLDCAC
OLDCSR
ONES
PADDRE
PAFBAF
PAFBAW

060746
002400
002376
002076
040064
036742
002074
003640
002410
002426
002342
055426
002424
002314
002262
002150
002554
002034
015404
015534

PERR16=
PERR17=
PERR20=
PERR21=
PERR22=
PERR23=
PERR24=
PERR25=
PERR26=
PERR27=
PERR30=
PERR31=
PERR32=
PERR33=
PERR34=
PERR35=
PERR36=
PERR37=
PERR4O=
PERR41=

104442
104443
104444
104445
104446
104447
104450
104451
104452
104453
104454
104455
104456
104457
104460
104461
104462
104463
104464
104465

RES?
046126
RLFLAG
002124
RRFLAG
002122
RTNVAL=2000000
SAVREG= 104415
SBEMSK
002244
SBENT
017370
SBETES
017112
SCOPE = 000004
SDPARQ= 172260
SDPARS= 172272
SDPARG= 172274
SDPAR7= 172276
SEEDHI
002542
SEEDLO 002544
SELONL
002000
SETPAT
045002
SHADL1
011610
SHUTUP
045166
SIPARQ= 172240

MTPA20
MTPA21
MTPA24
MTPA25

034106
034272
035116
035526

MT0007
MT0010
MT0011
MT0012

021226
021270
021324
021372

PARITY
PARTHE
PARVEC=
PASFLG

037760
002264
000114
002256

PFECDF
PFECDH
PFECDT
PFECEM

057126
057066
057116
057032

SIPDRO=
SIZE
=
SKIPKA
SKIPMK

MTL020
MTPAQ3
MTPAQ4

022032
027144
027302

MTP012

MT0004
MT70005
MT0006

030616

020714
021036
021172

NEWLOA

PARBAF
PARBAW
PARCNT

044246

015706
016036
002070

PERR15= 104441

PERR42= 104466
PERR43= 104467
PERXOR
054660

RES1

057022
002120
002502
013136
002036
003716
002354
177776
000024
002406
002316
035706
104411
104414
104412
104413
104426
002360
002260
035016
035066
036370
043152
042526
043166
104416
002566
000010
045700

045760

SIPAR3= 172246
SIPARS= 172252
SIPAR6= 172254
172200
040000
002006
002312

MT0013
MT10014
MT0015
MT0016
MT0017
MT0020
MT0021
MT0022
MT0023
MT0024
MT0025
MT10026
MT0027
MT0030
MT0031
MT0032
MT0033
MT0034
MT0035
MTQ20Y
MT020Z
MT0999
MT1
MT2
MUt
NC
NEMCNT
NEWBAN
NEWKER

ZZXZXZTZTEXEZZTEXZRBOAOON

035656
027204
027336
034136
034322
035156
035550
035672
027244
034166
034356
035172
035610
035726
027262
034216
034412
035454
035746
034246
035476
027034
027060
027112
027356
027412
027612
027712
030020

EEXZTXT

MTPA26
MTPBO3
MTPBO4
MTPB20
MTPB21
MTPB24
MTPB25
MTPB26
MTPCO3
MTPC20
MTPC21
MTPC24
MTPC25
MTPC26
MTPDOS
MTPD20
MTPD21
MTPD25
MTPD26
MTPE2D
MTPE2S
MTPOO0
MTP001
MTPO02
MTPOOS
MTPO06
MTPO07
MTP010
MTPO11

363

ZEZTE

074136
074145
074176
074214
074232
074250
074302
074323
074337
074363
074410
074426
074450
074464
074476
074512
074520
074527
074557
074606
074630
074632
074736
074754
075031
075075
075127
075144
075161

075205

SEQUENCE

ZEEXIXXAXTZTZTZTZIZTTZTXIXTITEZZTEZTXR

MSGO67
MSGO70
MSGO71
MSGO72
MSGO73
MSGO75
MSGO76
MSGO77
MSGO79
MSGO85
MSGO88
MSGOB9
MSGO90
MSGO91
MSGO92
MSGO93
MSGO9S
MSG101
MSG102
MSG103
MSG104
MSG105
MSG106
MSG107
MSG110
MSGI111
MSG112
MSG113
MSG114

MSG116

14:13

MACRO M1113

SYMBOL TABLE

22-APR-81

m12
PAGE 503-6

CZMSDCO MS11-L/M DIAGNOSTIC

]
Swi3
W14

sw15

Sw2
SwW3
SWé
SWS
Swé
Sw7

000100
000200

005434
010542
010726
011714

WASDBE
= 104500
WASSBE= 104476
WAS1DB= 104501
WAS1SB= 104477
WHICHC
WOOPEN
WOOPS
WOOPSA
WOOPUP
WORST
XOCHAR
XXDPCH
ZEROS
$APTHD
$AUTO
$BANK
$BASE

104401
104402
104403
000000
000002

$CBCSR
$(B1CS
$COW1
$CDW2
$CHARC

TSTREA= 104510

ST
TST?
1573
TST4
TST5
1ST6

TYPDS
TYPEIT
TYPOC
TYPOS

TYPSO
TYPS1
TYPS?
TYPS3
TYPS4
TYPSS
TYPS6
T12A
T128

014210
014262
104405

000000
000000
000000
000000
000002
033246
033270

$BELL
$CACKF
$CACHN

$CHKD]
$CHK1D
$CKSWR
$CLRCS
$CLR1C
$CMTAG
$CMTGE

$DDW2
$DDW3
$DDW4
$DDWS

SLF
SLL
$1.0ADC
SLPADR
$LPERR
SLS
$MADR1

$DEENE
$DEVCT
SDEVM
$DI1DDO=
$DOAGA
$DOAGN
$DOWN
$DTBL
$ECCD]
$ECCIN
$ECCID
$ECCTI
$ENASB
$ENATS
$ENDAD

$OCTVL
$0CT8 =
$OMODE
S$OVER
$0$
$PASS
SPASTM
SPATMA
$PEROT
$PERQ?2
$PERO3
$PERO4
$PERO7
$PER10
$PER11
$PER1?
$PER13
S$PER14
$PER1S
$PER16

$SPER17

$PER20

$PER21
$PER2?

364
TXIXIZTZXTZTZITIZTIZIZITIZITTZTITITITTIIZTITITITTZTXTTIZTZITTTTXIXTTTXTZIIZZIZIZIIXRROD

010536
002304
002254
026464
SUPDO?2 026500
SUPDO3 026642
SUPDO4
026656
SUPDRO 002152
SUPDR1
002154
SUPDR2 002156
SUPDR3 002160
SUPDR&
002162
SUPDRS 002164
SUPDR6 002166
SUPL IM 053714
SUPSTK= 000740
SWAPAT
002574
SWR
002576
SWREG
000176
Sw0
000001
SW1
000002
SW10
002000
Sw11
004000
w12
010000

SCNTLK

S$CNTLU
$CPUOP
SCRLF
$DBLK
$DB20
$DDWO
$ODW1

$KERNE
$KMAP
$K$

013320
012464

011026
026736
037254
037406
037574
TCONF
]
037132
TEMP
002404
TEST
006042
TESTAD
002362
TESTMO
002522
TIME
002310
TIMEOU
040130
TKVEC = 000060
TMFLAG
002132
TOOMAN
002356
TOTCSR
002216
TRACE
006136
TRAPVE= 000034
TSTBAN
011446
TSTDAT
002240
TSTRD1
040602

$CNTLC
$CNTLG

NS NOONN—=NWNIINO N
COONINOONON
SN o

002272
002232
000006
177776
002000
003630
000300
000310
000200
024312
002370
002336
004604
004734
011604

UDPARQ= 122660
UDPAR?7= 127676
UIPARQ= 177640
UIPAR1= 177642
UIPARZ2= 177644
UIPAR3= 177646
UIPAR4= 177650
UIPARS= 177652
UIPAR6= 177654
UIPDRO= 177600
UNITOP 002366
UNRELO 043416
UPPFLG 002257
USERMA 044116
USESTK= 000700
Usp
= 2000006
WARN1
011114
WARN?
027156
WARN3
027172
WARN4
027216
WARNS
027232
WARNG
036612
WARNGA 036552
WARNGB 036604
WARN?
024270

SEQUENCE
=2
DO = NINNINI
N —
QOO
OB WSO

000056
002560

SYSSlIz
TAGZS
TAG3S
TAG4S
TAG70$
TAG71$
TAG72$
TAG/73$
TAGZ4$
TAG75%
TAG76$
TAGZ7$
TAG/8%
TAG79%
TAG9S
1BG4S
TCF1G1
TCF162
TCFIG3

000400
001000
003720
011200
011234
026560
057132
057142
057152
057222
057262
057274
057306
057352
057360
057440

N—= O

STOPOK
STRIPE
SUBAAA
SUBAAB
SUBAAI
SUBAAP
SUBAAR
SUBAAS
SUCCES
SUPDOA
SUPDO1

043142
013140
002532

Sw8
SW9

N 12
PAGE 503-7

14:13

DNONVOONSTVONNIINN
—

START3
STAR27

055454
002064

22-APR-81

SKJ
SKPERR
SKuB
SKUJ
S0BK
SOBLEN=
SOF TPA
SOURCE
SPLTCS
SSP
ST
STACK
START
START1
START?2

MACRO M1113

j=iniielalnlelelolelelelelelelele]
QOO
NN
O0O0NO
PN =2 2 O = =2 N NN O O OO NI NN
VO NN NININON = — I NINOPL O

CZMSDCO MS11-L/M DIAGNOSTIC
SYMBOL TABLE

MACRO M1113

SPER23
SPER24

054414
054432

$R
= 177777
SRAND
062612

$PWRDN
$PWRUP
SQUES

051564
052140
002617

$SVLAD
055630
$svs
= 000000

SPERZ2S
SPER26
SPER27
SPER30
SPLR31
$PER32
S$PER33
SPER3L
SPER3S
SPER36

051170
054622
054642
051416
055032
055130
055176
055256
055310
055344

075624
000000
ERRORS DETECTED:

22-APR-81 14:13

SROCHR
SRDDEC
$SROLIN
$RDOCT

061444
062330
061574
062160
SREADC
040604
SRESRE
062554
$SAVRE
062516
$SAVRG 052542
$SCOPE
055374
$STN = 000001

. ABS.

$SWR = 163000
$SWREG 063050

)
=
STESTN
$7k8
$1KS
$TN
=
$TPB
S$TPFLG
$TPS
STRAP
$TRAP2
$TRPAD
$TSTM

000
001

VIRTUAL MEMORY USED:

26160 WORDS

(

103 PAGES)

DYNAMIC MEMORY:
20034 WORCS
( 77 PAGES)
ELAPSED TIME:
03:25:39
CZMSDC.BIN,CZMSDC/CR/=SP/NL
: TOC=CZMSDC.SML ,CZMSDC.P11

000456
063032
002604
002602
000007
002610
002330
002606
063142
063164
063204
063132

8 13
PAGE 503-8

SEQUENCE
$TSTRTM
STTYIN

$TYPDS
$STYPE
S$TYPEC
STYPEX
$TYPOC
$STYPON
$TYPOS
$T1
=
$72
=
SUNIT
SUNITM
SUSWR

040424
062072

060500
053360
053506
053674
060276
060312
060252
000000
000455
063040
063136
063052

SVECT1
SVECT2

SWASDB
SWASSB
SWASTD
SWAS1S
$XTSTR
$Y$
=
$2ZAP42
$Z8
=
$$5
=
$$T
=

063076
063100

041140
040774
041254
041110
055522
000000
014450
000100
000000
000441

$$TT
= 000447
SOFILL
060475

365

CZmMsDC

CREATED BY

MACRO

ON 22-APR-81 AT 15:24

SEQUEN CE_

CREF

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
ABORTF
002140

¢ 13

PAGE
_1

366

vO1

40612668
169-6333

439-14039
190-7183

236-8383

439-14042
192-7213
236-8412

439-14051
194-7243
238-8455

439-14054
196-7280

225-8044

214-7736
232-8311

223-7994
266-8664

223-8002
348-11090

223-8016
362-11497

AC7FLAG

002114

ACTFLA

002320

ADDRES

002032

#139-5006

APTDOW
APTECC
APTFLA

ANA2

007166
045250
002374
002322

*436-13950 *436-13951 *436-13958
*4(38-13992 *,38-13997 *438-14002
*438-14007 *438-14012 ~,38-14017 *438-14022 *4638-14027 *438-14032 443-14103 *445-14131 *445-14140
458-14542 495-15853 495-15858 495-15861
495-15866 495-15884
#163-5885
#362-11531
153-5471
362-11534
#139-5120
#139-5097
223-7994
223-8016
223-8025
225-8036

APTHAN
APTHLT
APTPAR
APTSIZ
BACK
BACKGN
BAD

014554
045316
002372
002414
055744
036530
002050

BADPC

002020

BADPSW
BADSP
BADSTA

002030
002024
040166

BADXOR
BAD2

002056
002052
002054
014710
015016
002572
002100

—dead

266-8664

83-7050
83-7021

219-7949
21-7977
*158-5691
*158-5683
*436-13947 +436-13952
*438-13998 *438-14003
#443-14102 2445-14132
495-15875 495-15880
#139-5001
*324-10605
445-14150 450-14315
#139-5005
*324-10606
#139-5003
v324-10603
322-10553 322-10561
439-14052 441-14063
#139-5012

227-8121

230-8207
*406-12696
*436-13972
+438-14018
*445-14161

232-8274
244-8648
2448653 #314-10301
*408-12716 *408-12728 %4 36-13934 *436~13940
*436-13977 *436-13982 +438-13983 *438-13993
*438-14023 *438-14028 *438-14033 441-14080
2445-14168 495-15853 495-15861
495-15869

439-14040

439-14052

441-14063

443-14112

445-14130

445-14139

#324-10 602
445-14150

406-12681
445-14160

436-13960

439-14040

*167-6230

*167-6296
*179-6801
*194-7240

b d = QO OO OO N NONON
—t ek b ALY SN DN = (NN
NOMVOD
=2 \NNCO O ~
NOYONIN-NOO

LN—'OJ\O?QOOO
J

WNANANNONI
NN = — —a
NN
WNWNO O VO

b wmd =5 Q0 Q0 OO N NONON
=AR
= (N —
NO ==
a2 OO
000
NN
—
NN

W—‘ONO*?Q@OO

WNANANINININI
N = bb
NN
S NNWNO
O NO

NON =00 ONIHN
OO
(NCO
O O NN) NINO~ &~
oSN

WNNNNOPNI
NN —b —s —2

*373-11729

»
%

*358-11461

OO OO

210-7664
*236 8381

NHEONONOONOO~N
NGO O —NODOWVONIN

495-15869

+167-6299

*406-12670
*436~13967
*438-14013
2445-14142

#139-5024

*441-14080
*406-12697
2406-12699
#190-7179
#192-7209
*147-5359
*166-6169
*167-6303
*179-6861
*198-7316

495-15860

#139-5015
#139-5013
#139-501%
184-7072
184-7073
#141-5217

*268-9179 *268-9193 *270-9267
*302-10034 *302-10046 *312-10243
*408-12713 408-12716 408-12726

362-11497

219-7931

+266-9090
*278-9567

*266-9103
*278-9574
*606-12667 *406-12667 *406-12693 *4608-12713
+436-13938 *436-13939 *436-13944 *436-13945
*436-13971 *436-13976 *436-13981 *4,38-13987

#139-5128
*153-5467
#450-14279 451-14369

*266-9069
*276~9475

BAF PAF
BAFPAR
BAKPAT
BANK

225-8044

#186-7151
#362-11538
#139-5119
*183-7042

+266-9063
%276-9469

NNNNORNIND
N = —d = P

BAD3

*274-9367 *274-9374
+312-10258 +324-10578
*4,36~13932 *436-13933
*436-13966 *(36-13971

348-11096

+208-7584
234-8333

*375-11781

OOo00oNOoOOOO©OOOO¥=OONO0QOgOGO~(L=]VO[(o=]4="\©OOMoO00o((o==]]0M~WOOVO—oN0nOIA0NO0AOI0NOO=]O[NOOOM
OMU(T—LUMTeo—oONN3M®UIMmID(0[OUNOoRN~O=oM~OB=]o=MA©POBN[=]AOORM[NM0P=-aUO)Y©NoB[SaYe=l=—UOOUaeLMNNLNM(o8-]=O[4«hN3eTed(O=O.—dUN(-L]M=—3[]«nWoO—=oONP%NIn0PMU.OMOonehNv~eSdNOMOoR—[N=rh—=oMOoN'dP1MNo0o3-][L+OGG—OLO~NMOP.UNIGMO~OSNMAEMo3[YXNoXLXOoUAj4NeA—OWNmrwW—orU6W—rOaL¥-—3r=WON3——OIMDUNLON“0NOO—M1NLAVMNO3NINAONwa~Nx
-

—g 4- -

|.00U0N0MO0W0rVOVO—OFAP3TSOU—NIUS}.)LUetttRN.NS)M—1eMNrDOMA00.YVMG—gW—3\ION0\eONrrOOIN.MDFOWO—I—=gCNe0v—S-W0VrDNAmMVQO4ENNLVN—GAVGOO-—==DeOL0I0.ILA-ON2=JOTI0(==GGONsO==evLY0eTrMUN0WV+OO~¥A—O0=O=lvNNFNV00—-TNNMFeOeIMeUNAOFB0A=-Arene—RGNT0MIOD2M=YMYoOI=eNA=AO.eaNWiNT(WU©©M MFCl=O0=O2eUeO|)MM=%rBNIMOIO=A=nAWe=MNaM—N)GNNOBIAWW—aMYI-~=0eM=ALRGAlWNIDWINeI~MV—oIMGOSNO=m=ANNVrOAlV—rAeFOOI"eLNO\T=PTMM=VIMAaOrTWNVOMlRPS=MeD=OeNUN’eDI—NOeIarMRM@O2TN2T=OOlWOIL—WMV®NOIOVTOYaeNOLINr0=AAnePlWODMoO—TeBANGrIOP=VMl~=I—OOrMeNOOSegNeS=2+NOOIOIBOv.OF FP~N8NN~~XTyN—eC=NTNnEvNM¥II=aMOMlOO=—WW=ANNDeGO\r-AWIr=iANNN0ViNDrreL=MMGONNS0[I—eOONODdG=—NA0=IOO0UrPENMInFIYNTyRASMNOO MS~N—OT=O=UM[FeNoNODONGAMrNI0eeWOO~VNTFINAVJ—OMOONAYLL=LWrMNOIrXOGD==ONNNoO0e0MNTNyNMAWISIMeU0ONTM0OOUyUWyAOVrAINWO0=MOONTYN0NTOe=rVNTASAO0VAG=eetOeN—(W0—MOIMOWYelINOUVN=DgrNe=eMTO[[8IeO—_NN0G—V=eO=J8IN0MlrAUVIBOWM-NANRVPOA~ONU=M1UIO0—eMnoNI~=M0ArOO0L0OF—NKO0ENLMILNSeVr"ONNTN~OM—orIA=NM=NNlyOaP—OOSuMdMlTMTW—ODUVAA3MPNVNIMOL8US~NWMa=TAANMOOOOWOsN0NONMOuDMOLAlAdNNVIuO=OIoVNN.MOO——OMIeMeOMl0~uNmMVN0MMrOOWOOWylOAPTrIUUeTNSNWmnO~NC—N==MNL0—MOYONOedse~MO—IIM—€NOOAIW—YOO—N—APAOAOO -M IrOVVNIOAONNTI€0—N\MWTrNO=—SONOeVNAEceN\ONW0EO—TO7OTNrO—MTII0NeN—NWSOTVOGeIN2e=O0UOLAONrNIMVNWO0T0~VIeOMOMONIIN0—OST=AGNWNMNeOTNUU\ONIMoPNNNNOWWP—OV\OoWWl=0ODLMAR=M—r-NGMoOWN0=eG—IeMONONNUOAor0NOAOO1W0AeVmMUSVMM—ONMNrOOLrWW[IOANANON~PL.OA|mVSOIN>O
NN-oM03aWOeoMM=——O~L0.NrMOoo0NDnO0DTem0Iy~~—N—MOD|[«NMVooNS3oOON~Me[L0VeY0©TNO=MW=+N-Ne=v= ]M—V~~OOoNPoAOMWMNOV0NTMOVIeWeNW1tVrOW-ANO0lUyUONNIe1nWDVAIM0iOEONSeO0oEN0e~IOeSETA0MeN—ENO1NTewVNAO~M(YMTDV[[o=NIUWYeOs3O0WNrOr~LeNNT(wONAW0=eMAAW=[1\V~NG]VN0rOy—OOWTNoV—MOOeAOVU~GONO-NNAVMTOIWVC—N0~yAODTMVOENMOIWTO-LOANSMN—OEWIWQN©M=rV=WeOLSrIT=r0]AvN—O—~WNANNAVVO(VNoeONMeRINDOrWeeNM~[—MoN=0OWAO=VQWONLrVOIO0]vON0GW—RNOr—oO=0-MeOMMLMrA~G0OMO-—0yROFNA~IU[Y <MgOwFe@ODNvD]K—T[]W3ONWOeNM -OOMFWoD—W0—NAN——W1TNeOOIrerroNWO08D\T———Y—NOeCo0Vr0~eOD9eN<—EUeJ~OMWoy0—gArDr\—N1FCZmsSDC

CREATED BY

SYMBOL CROSS REFERENCE

]na">1}hST83s|IL53R2%
—-

MACRO
PAGE 2
ON 22-APR-81 AT 15:24
367
SEQUENCE
vo1
CREF

-«

D 13

#110-4047

CACHON

= 104423

CACHVE
(BCSR

= 000114
= 104474
= 104475

CHECK

CHKDIS
CHKGEN
CHKTAB

CHKIDI

CKEND
CKSWR
CLRCSR
CLREX
CLRMEM

002274

= 104504

041722
042030
= 104505
061236

= 104410
= 104502

007136
007036

CLRICS

= 104503

CMD16A
CMD58
CMDSC
CMD7B
CMD7¢
CMD98
CMD9YC

051022

CONF GE
CONF IE
CONF 16

047240
047510
047740
050014
050436
050512
002420
003630
002624

154-5513

V1V
]
Qo
— O
ON\J\NO&NJ\L\"J
N=O0OO"
N—=O

= 104424

~N -~

CACHOF

+145-5309
#145-5311
367-11630 367-11632
414-12907
419-13045

N0
oS

002520
002514

VOV
OO

CACHKF
CACHKN

181~6995
#141-5191
#141-5190

VOO NW=NO
OV
N-0N=0n

BRGOBB
BSIZE

045026
045072
036110
002344

—-_-O0—
OOV
U]

8007

ON—d

002126

BMF LAG

CB1CSR

#364-11553
219-7914"
219-7915
244-8585
348-11159
#139-5035
194-7245
+356-11419
.
#360~11466 468-14939
360~11474
360-11479
+310-10180 310-10184
#139-5109
*181-6944

NN N

BLOCK3

B00T1

E 13

REFERENCES

045340
045354

OOOO‘O\IJ\?
1101

BLOCK2

PAGE _3
ON 22-APR-81 AT 15:24
SEQUEN CE_
368
v01
CREF
NN
VYVWn—

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

MACRO

»
b
=N
=0~

CREATED BY

NN
=2
NN
OO —=\N=0WNN)

CZMSDC

169-6327
208-754B
#110-4046
147-5386
166~6265_
170-6374
410-12753
#111-4185"
111-4186
#110-4090
#110-4091
163-5967
266-905¢4
#139-5086 +163-5917 *266-9129
*+274=9407_ *276-9501
*276-9503
34210937 495-15866
#110-4098
266-9042
268-9155
270-9248
342-10921 #344-10942
#110-4099
171-6385
171-6397
468-14920 468-14922 468-14924
#110-4030
447-14189 450-14278
#110-4096
159-5777
160-5845
161-5864 #161-5880
159-5782
160-5853 #161-5864
#110-4097
163-5966
163-5975

210-7625
268-9167
276-9439

210-7649
268-9222
276-9460

#375-11819
375-11808
#378-11915
378-11506
#382-11985
382-11977
#139-5134
#143-5260
#143-5257
*+163-6013
163-6032

375-11844
375-11811
378-11923
#378-11925
382-11993
#382-11995
+163-6030
151-5436
151-5434
163-6014
+163-6032

385-12054 #385-12077

*164-6150
170-6354

166-6192
+171-6438

219-7 60_
352-1 12 77
I4
1
200-736

232- 8295

352-11293 d364-1153 4
204- 7444
348-11096

232-8296

415-12933 415-12936
* 356=11370
*356-11397 *356-11416

234-8351

234-8353

240-8491

*181-6976

*181-6977

*181-6978

*181-6979

181-6980

181-6993

367-11632

*154-5514

*154-5515
326-10627
384-12029 *384-12029 *384-12030

326-10629 326-10634
384-12035 +384-12035

365-11579
410-12750

163-5646
248-8096
163-6116
210-7669

166-6234
384-12028
166-6221
292-9819

166-6260
419-13049
166-6242
384-12036

164-6138

250-8733

166-6200
292-9841

210-7677

248-8698

166-6217
365-11583
166-6208
250-8735

268-9164
*266-9130
*276-9505

270-9259
*272-9295
*280-9603

274-9358
*272-9297
+280-9605

2769458
2272-9299
*280-9607

278-9557
302-10023
%274-9403 +274-9405
331-10730 331-10735

274-9346

276~9445

278-9545

300-9963

#342-10911

171-6407

171-6417

406-12684

236-8371

238-8464

375-11835 #378-11901 #382-11972

171-6389
266-9020
270-9261
280-9621

171-6402

300-9998

171-6412
266-9094
2764-93640
312-10251

#668-14953

451-143461

#214-7724

210-7673
270-9228
276-9519

164-6122

164-6141

171-6421
266-9140
274-9362
406-12690

171-6435
268-9147
274-9420

#375-11877

*163-6076

*166-6251

*166-6270

*179-6857

*179-6939

*154-5485
*163-6014
163-6041
+166-6250
*171-6439

*154-5486

163-5950
*163-6015

*163-5998

*163-6002
*163-6029
*163-6043

179-6835

*163-6028
*163-6042
*166-6273
*179-6841

*167-6301
*179-6842

+163-6005
163-6031
+163-6074

169-6342
179-6873

*163-6009
+163-6031
+163-6075
+169-6349
179-6880

CREATED BY

PAGE _4
ON 22-APR-81 AT 15:26
369
SEQUENCE
Vo1
CREF

REFERENCES

F 13

A—r—Wr—rV—3O0N OMNIONONOVONONO OM—VO(UL Ov

Oo0OMOaOdRYoWl0gNVO]N=ONVOMI¥Ma0N=S~NVlaON.Y~8OMV0OOaNNIlaAMVOONGl00~d=—UO—OVOoV2Mr0valOY0~OMSlOONy00aVrVODN=lamMO0YO0VNBeV0NVOIO—M0OlDNNMvVOrMMNaN—lOCOON0VIWOIaOMMVVMTOtONNVOIQNeNAV2OlVMaOI10OVNNTIMVMaNl0IVM—FSa0lrOOO —\
IO1O2‘WO5AO06O~V7M08MDOO900O4OM05TNN6O8O0N3O1O05ONN60INNO9O2O.ON8=V OWeTNOON

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

MACRO

OWNOE=M =
—rA—MNOAANNOO O=NONNOM

CZMsbC

002214

CONTRL

177746

CONTS
CONTS?
CONTS?2

061406

*190-7194

468-14913 #470-15001
468-14898 #468-14903
#470-15003 470-15004
#419-13083 419-13084

CONTS3
CONTT
COUNT

060764
061410
053576
061332
002340

CPERRF
CPSAVE
CPUBIT

056510
056506
002104

*145-5345
264714196
#139-5026

CPUERR

177766

#111-4197

647-14192
#139-5107

*293-9844

356-11383

6
8

3
3
3

1
1
1
1

*198-7327

1
1

*200-7367

+202-7410

5510
*326-10629 +326-10630
131 07 495-15867

470-15008
470-15010
419-13090
463-14641
468-14908 #470-14976
*292-9820
292-9823 %292-9823 *292-982¢4
292-9825
*292-9832
*292-9839
293-9844
293-9846 *293-9865
*293-9845
*145-5347
467-14194
450-14303 #451-14373
447-14197 +450-14305
450-14306 #451-14372 455-14465
*151-5440
164-6150
181-6983
166-6252
166-6273
181-6949
320-10456 348-11120
375-11787
*161-5882
*145-5348
*151-5452
*164-6151
*166-6211
*367-11649 +367-11653 *369-11665
*371-11719 «373-11771 #447-14227 +651-14351 %461-14633 495-15859 495-15867

o—0N=)OOANoN=YNSOANO=UNMOOMOO3=IMONMO rMNmNMroo=—=

*369-11677

OMO

CONTFL

181-6952

227-?099

[—~=3J=WL0O—Ww-n~NMO=NO-]—L0PNeT2re—O=I=TM==2=DFO=NMO

(L)o o-—n [oseVuhL2dTklatn4:d ONW2O=IMNOMNO0—~« oMNFU8A=N)MV—rO0O0O0O0O0O0OONTANIMKNOWNON AUReA-NTrNOM0—OQeOO=O0NVWO3M~MIgMA soekVXYa2Ltkl1%ONVOOOOVIONO VOVVVOVRODTeNAIVIQOOMOVO o0a£)lTalialValaVlvlvalValrloYVaValVolVaYl -NOe\tVVOVOVO~VIMr=FNAOCOIOWOUAO

16016
-16032
=16044
-16057
-16067
16078
-16087
1 100
1
10

208-7557

#139-5069
#139-5067
#139-5143
#139-5088

#212-7683

*208-7575
208-7539
208-7528

1
1
6
1

503-16021
503-16038
503-16047
503-16060
503-16070
503-16081
$503-16090
503-16105
503-16126

503-16146
503-16159

+208-7572

208-7572

00[ ~]

L-K

503-16019
503-16037
503-16046
503-16059
503-16069
503-16080
503-16089
503-16104
503-16118

503-16144
503-16145
5 6 503-16157 503-16158
70
*171-6396
*7171-6406
0
53 «328-10655
328-10656
714 «331-10718 +331-10722
1 770
335-10785
335-10804
1 2683
406-120689 411-12797
-15865
495-15866 495-15881
+160~5802
159-5764
163-6060
*163-6059
1

503-16017
503-16036
503-16045
503-16058
503-16068
503-16079
503-16088
503-16102
503-16111

WNO—M V-el

w [=

VOMO0O

\J 0 = e~ = -

&« &&« ”

5L— [V~oalY.

*328-10664
+331-10726

+337-10813
+413-12864
oN

CREATED BY

MACRO

ON 22-APR-81 AT 15:24

CREF

»
X

002230
002222
002226
002302
002146

CSROUT
CYEST
CTLKVE
DATARG
DATBUF

DBEMSK

DDISP
DEENER
DETAIL
DETFLA
DETPSW

DETRO
DETR1
DETRZ2
DETR3
DETR4
DETR5

0461354
006140
002142

= 177754

002234

002250

177570
104421
057462
002212
002210

*260-8922
*268-9149
270-9237
*278-9528

#139-5076

*272-9277
274-93461
*276-9408
276-9452
*276-9513
*280-9586

#111-4119
#110-4043

158-5673

*158-5718

179-6795

*158-5679
*158-5727
*179-6830

331-10723

331-10732

337-10814

337-10823 #339-10832

*208-7555
154-5500
*260-8887
*260-8906
*266-9027

*208-7556

*214-7733

2214-7734

*216-7788

*216-7789

468-14917

*260-8888

260-8889

260-8890

260-8892

260-8897

£268-9214
2276-9427

*270-9230
*276~9428

260-8901
260-8920
*266-9117
*270-9231
2769433

*260-8903
*260-8922
*268-9148
270-9236
276-9434

*270-9234
*272-9294
274-9343
274-9409
276-9482
+278-9532
*280-9602

*270-9235
272-9298
274-9351
*274-9414
*276-9484
*278-9533

270-9255
*272-9307
*274-9385
276-9440
*276-9506
278-9552
*280-9615

272-9275
2274-9332
*274~9402

280-9609

270-9253
*272-9306
*274-9385
2276~9432
276-9504
278-9550
*280-9614

*272-9277
*274-9333
274~9406
2769450
*276-9512
*280-9586

461-14606

461-14608 *463-14706

489-15668

489-15673

#139-5073
*260-8903

158-5671
*158-5693
163-6084

331-10715

#111-4194

vO1

*163-5938
*160-5834
*208-7528 *208-7529 *227-8111
329-10671
329-10677 329-10679
3
*339-10836 +339-10842 339-10842
*391- 12102 *391-12116 410-12756 *411-12793
413-12868 *414~12903 463-14644 246314649 *463-14657

158-5707
#139-5041

370

+208-7507
+208-7510
*159-5740
*169-6345
328-10645
333-10756
+367-11629
*413-12861 t413-12868
»

CSRLOO
CSRNO

NN =2 <=3 NINININ)
—=d —d —d =

CSRINT
CSRLAS
CSRLBA

G 13

PAGE _5

SEQUEN CE_

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
CSRINF
002432

NUWNIOWVNO
OO O O

CZmsSoC

#159-5733

#461-146604
451-14348
495-15863
*461-14613

*260-8907

*160-5823

436-13973

*272-9300
274-9353
*274~9415
%276-9484
278-9540
*280-9608

276-9442

276-9507
280-9584

*163-5945
#244-8643
+333-10746
340-10883

*411-12800
463-14657

362-11522
*461-14605
495-15863

#139-5057

DETSP

DET1
DF11
DF13
DF14
DF15
DF2

064706
064534

DF3

064560

#139-5058
#139-5059
#139-5060
#139-5061
463-14674
485-15569
487-15661 #497-15901
491-15776 #497-15902
493-15842 #497-15903
485-15574
485-15589
489-15693 489-15698
487-15611
489-15715

487-15646

489-15688 #497-15900

487-15651

489-15678

491-15771 #497-15893

489-15683

MACRO

DIAGFL
DISPLA
DISPRE
DISPTB
DOBACK
DSWR
0T
DT10
o111

002002
002600
000174
014236
014610
177570

D123
DT24
DT25
DT26
D127
DT3

D17

CREF

371

vo1

b omd e

491-15756 #497-15895

#497-15899

b
b
d
i

487-15639

487-15644

489-15686 #501-15990

491-15744

491-15749

487-15645
489-15667
489-15692 #495-15867

489-15672

489-15687 #495-15866

064220

485-15588

485-15593

485-15598

489-15697 #495-15859

064234

487-15625

487-15630

487-15655

491-15745

491-15774
485-15602
487-15649

#501-16008

#139-6991
#141-5222

#113-4398
184-7070

184-7081
#111-6118

485-15573
487-15620
489-15682
489-15677
485-15568
*145-5312
489-15709
489-15714
493-15799
#495-15879
487-15660
691~ 15775

N
wss

000
NN

#501-15995

485 15587
491-15779 ”
487-15609
491-15764

489-15666

489-15671

b e

067635

DT12
DT13
DT14
DT16
D117
DT20
0122

DT4
DTS
DT6

SEQUENCE

—b

DH24
DH25
DH26
DH27
DH3
DHS
DH6
DH?

064634
064647
064651
067375
067745
070043
070061

Lol
X
00000

DF?7
DF8
DF9
DH1
DH10
DH11
DH12
DH13
DH14
DH15
DH16
DH19
DH2
DH23

H 13

PAGE 6

= [TV

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
DF4
064573
DFS
064606
DF6
064621

ON 22-APR-81 AT 15:24

CREATED BY

D e

CZMsDC

*231-8265

489-15696 #501-15983

487-15629

292-9837

*151-5454
414-12901
*414-12902 *448-14257

#188-7163
1-5221
1515446
#495-15853
#495-15863
#495-15864
#495-15865
487-15635
487-15640
*1465-5324
*145-5329
#495-15868
491-15733 #495-15870
#495-1

487-15654

491-15754

491-15759

448-14256

#495-15882

491-15750

491-15755

491-15760

CZMsSDC

CREATED BY

MACRO

ON 22-APR-81 AT 15:24

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

buMMY

002170

I13

PAGE _7

SEQUENESEf372

Vo1

495~

2
0
1

ECCDIS
ECCINI

104470
104472

eEcciol

104471

ECCI1IN
EMTVEC
EM11
EM12

104473
000030
065215

EM13
EM14

EM15
Em7?
EM19
EM2

EM20
EM21
EM22
EM23
EM24
EM25
EM26

EM27
EM29

EM3
EM30
EM31

EMS6
EM6
EM?7
ENASBE
ENA1SB
END
ENERGI

075624

104420

210-7668
210-7676
*147-5368
*147-5369
487-15608 487-15613 487-15623
487-15618 #499-15929
487-15633 #499-159_.
38 #499-15931
#499-15932
#499-15933
#499-15934
#499-15918
#499-15935
#499-15936
#499-15937
#499-15938
66 #499-15939
489-15707 #499-15940
489-15712 #499-15941
491-15731 #499-15942
451-15748 #499-15946
485-15576 #499-15919
491-15753 #499-15947
491-15758 #499-15949
491-15763 #499-15950
491-15768 #499-15951
491-15743 #499-15952
491-15778 #499-15953
485-15581 #499-15920
493-15797 #499-15959
485-15586 #499-15921
487-15658 #499-15968
491-15773 #499-15969
491-15726 #499-15970
485-15601 #499-15971
487-15648 #699-15972
493-15839 #499-15973
485-15591 #499-15922
485-15596 #499-15923
#110-4100
164-6155
#110-4101
300-9972
#503-16178
503-16190
#110-4042
155-5606

#110-4089
#111-4180

274-9417

266-90
276-9455

300-9968

302-10014

495-1 5862
495-1 879

495-1 5881

382-1 1970
#214-7739 #227-8115

266-9059
276-9515

487-15628 #4699-15928

227-8113

406-12705

266-9136
278-9555

495-15866
495-15880
495-15884

238-8467

238-8474

268-9162
280-9617

268-9217
300-10003

OOONO003=N0M~NNMON~PNOO—N7U0NRFMOOOESNOONN=\OvTRN—IWO.M—N0WO0OONWNIVIM0IYNIRNSOrOO~O0TD8Ur0G—NS—OV0OMON0TOOMWO=«DU8UA=I~N—MLWG§ONMaN.Ov0MOOOVOOOOMI[o-w58O2O(O"N]"01al04U7va)OONO¢LWNVTWMONMMAADNNoN=N—L4UNNOONOeON00NYI—yT~MrO—1|FTITNOUOINMNTNUNTON~]GSoI§UN=TMM0VMNNWOMOMOTOOTMI\0RRNONIONONN\OOVN0II\MNMOMONeN—~0(—0F——SOOoOSOPMOPO0TMWwTWNrMONn0ANeNW—iAOO0DON4eN~T2PT===—m—N=NN~M—TN=[1U0MLOWN0W
O0N0— (~V5] oMW TWN~M

—N~Nv]ov[N0a—D~lYFV4+lAOOTio—IUaM0NKWlNDNv:aOgOrVU—lVOTONI0DNONaCNMVNNUODOSLUODNo\leeeeLo~-(-P[a}—l=N.Oa1YleNN[NON—0=[oO1leLoNDN==)—]~ee0Ny—[—OMN—-Wee]O[~=WYyN.VNONT-—VeMLN0NerOORNN——SP0erOW—eNOeMO=rIONNAnrT0WeMNAOrB—O~CNrNeIIOO—WOIeeUVTNOo—oWer—N

RNx0MpNC—vWlOavl&—i0MtrN—aO—~vlMFN0O=-NQGO0TU=N[RV|R_R_R]0[&(o-3*Y~b]~220wMNOL3ao0OND0—~O*®MNaOo-A&0N—&nODWONWMOsN=NOQ~No¥IOmeTNYMIy=mMOnAONgNO=¥o

¢MO¢0%NN-N%N~NDODNODIMWNDTNODLTNTSAM“XJNODMNMPSVLNMNNPOTaN=NMOxLOwKvo
CREATED BY

SYMBOL CROSS REFERENCE

MACRO

6
v
Q
&
“
e
o
>
=
N
.
y
a
l
O
M
D
a
l
4
B
O
T
o
M
F
a
O
V
l
>
a
T
A
U
¢
L
N
R
t
&
o
”
«
r
Q
e
O
—
W
N
r
—
~
O
N
0
.
—
D
N
V
=
O
I
T
G
I
T
I
T
0
N
O
I
T
I
M
T
N
O
W
O
T
r
N
r
r
3
r
e
O
N
—
M
—
r
—
O
M
O
I
—
N
A
W
I
N
E
=
V
~
~
L
—
0
N
—
e
v
O
—
\
N
C
O
O
M
N
O
W
0
—
W
M
E
e
A
Y
V
W
N
S
O
K
L
N
4
W
=
A
O
F
M
O
N
2
A
O
V
O
O
—
O
V
O
M
N
M
N
M
0
—
G
C
O
M
T
N
W
O
M
o
\
=
N
=
o
W
O
w
N
~
0
&J4Ow-x%Y¥Dt@iaeoloxV9lzloatEo INOTU3VMRA—AN0~M—ODONVOAQDPOnRNAWNVOINAUW2OINriMAAIDMIW=WONA— ]UNe1DIRLTNIOM=CO0O0O0VO0ONRDOAIANANMNWVNANIOrNV=INAINMOIAIOOD—NFrO—Mi—NMnArMe—L
UUMNOWNO M) -L0] [¢ D0alal=l1ad0li

CZMsSDC
PAGE _8
ON 22-APR-81 AT 15:24
SEQUENCE 373

CREF

J 13

vo1

HIPAT
HT

045002
= 000011
002422

*266-9092 *266-9
*302-10036
*445-14145
*461-14611

204-7435

#4648-14245
450~14282
*406-12674 *406-12676 *406-12694
*436-13963 *436-13968 *436-13973
+438-14009 *438-14014 *438-14019
*445-164133 *445-14143 2445-14162

*184-7089

419-13022
*149-5419
*149-5425
163-6086

056504
013256
012222

045012
044766

002136

KAMIKA
KAMITE

000020
043300
002004
026430

INVALI
I0TVEC
JMPRL1

104511

6
#139-4992

231-8251

*408-12712 *436-13935 *436-13941
*436-13978 *436-13983 +4,38-13989
*438-14024 *4,38-14029 *438-14054
*445-14167 495-15853 495-15861

*206~7480 *206-7495
*268-9181
*268-9192
*268-9195
*382-11983 *443-14109 *443-14126
*451-14364 453-14405 453-14417
+188-7171

*266-9105

9-5425
3-6091
8-7553
6-8419
0-14312

196-729¢4

044766
002510
002506
002134

INT64K

495-15882

461-1
#358-11

*208-7550

IBSAVE
ILLCSR
IMPTES
INCBNK
INCPAT
INCRPT
INHBAN
INHECC
INTFLA

378-11925

495-15868
495-15868

NOON
—
~\O 0o

*158-5714
*436-13953
*438-13999
*4463-14104
495-15875
*441-14069
*441-14070

GTSWR
HEADER

248-8673

#139-5009
*4(36-13946
*4,38-13994
441-14079
495-15868
#139-5010
#139-5011
#110-4029
#141-5204
*266-9089
*270-9269
*445-16136
461-14610

375-11877 +378-11895

348-11134

S
—
O~ —00

GOO0D3

002044
002046
104407
002552

#408-12721
*408-12723

*238-8479

—b

G00D2

*238-8468

GETDIS
GOOD

369-11676 *375-11777

365-11617

&»
ry
\h
’

GE TDA1

367-11652 *369-11659

*163-5955

Kror—o—
VWO
O &

GBLENG
GETDAT

vO1

FULLRE

045470
002416
002512
000076
051464
051562
055656
002042

374

SO =O

FS1
FS7FLA

CREF

Vol olede Tl ol ol - 1o T i)
OO & S
ONMANO 00 NN
=S\NASON
BN

FSINFL
FSPAT
FSSTAC

N =2 O V00~

FSCMD?
fSCMD8
FSCMD9

FSCMDO

046436
046756
047600
047606
050100
050304
002412
047414
002266

SEQUEN CE_

Vo~

FSCMD4

FSCMDS

PAGE 9

ON 22-APR-81 AT 15:24
[
R
NY & B T e B T
I
P
e
P 4
G0 £~ NI WO 00 NI ONONON NN
VOO OONAN S NO OO VOV OM

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

MACRO

mv-uo_a_.ug_'.u._._._._._._.m

CREATED BY

n
&~
rS
)

CZMSDC

*236-8433

163-5995
*181-6974
+236-8380
236-8433

200-7368

202-741

#651-14371

198-7328

163-6003

+181-6980

*208-7551
+270-9266

*445-14134

*455-14453

163-6007

181-6991

236-8390

236-8396

204-7451

#358-11459

+348-11127
179-6834

*348-11143 *348-11151 +350-11211
227-8068
228-8165
340-10894

*356-11371
236-8384

375-11804

*365-11584 *367- 11627
240-8484
242~ 8513

#266-8663

*384-12022

378-11918

382-11988

QQQ=—=—QAwLZ2VNC2n2][oeNreGre«OC0<aQ-ONtlEOACL~ENSN-<2omNsAO]
I
M
M
I
M
I
M
M
W
M
M
M
M
M
N
a gEgNZ=Xaua aQ Xa — — NITON OITO O 0 ON-r OO0 “w
BRI
(—OO~TOO\0AJON0e=NrOM—rVRNvtOOINP—rTOOOOOAIeOMIN=VrNO=eIMNOOTMP0OI)M—N~N0er~=PI0r—NPORmN=0eINI=Me8ON—NV=0NOT=ONNR=AOTAMWNMRNNO=AWINFTXGDT=DNOPVOX=~YX0IM=L=N—O~MOIe==S=ANNLANORMe0—0MOMNV~OMMMMOWNT
eFLNeWNt—3WEen-MON2rIDMO0&v0V=NeO«ODsVWOLeNNerOOAFOV—aMTNMeAO—MN*- NeOJerOTs—e=M—NteFO==TNOUMyLMMNORNNAO&yMNNO”b~OYVTW(NWDaOy=NZs
e
—
0
N
M
e
(
U
M
O
I
S
N
~
N
O
V
O
N
I
=
N
e
=
O
M
e
=
L
0
0
e
s
L
R
[I
—
O
\
O
N
o
O
W
N
v
O
~
—
AoMMOeW Oe M~eN=e—— 0-M MegO NrOe -O=0«O0=O oNCWO OO—VTOOM MV -W —NMVOMTO0Yo[o &-VR[OaATOD]NoAVSiLg¥eMVC]nL—.mokO=lM10~nO.mNyUU 0n-og OMO Nv[ ]UU =OVMA0N—OYAN00V0O=rV-—NO~0UU 0N0AYMO§NN NNMWWONMWLUINe=OTVO—IOMWW~OMONMeL0NA—ArMUN~V—MOGvSR—FNO—TYDOO=—oOo[]ONO~oY0 wo >OA -O “w
Ii[NOS MM - o5O MeO o][[) ©g]V AM~['VN ]7w«1)nRMAM&"[Y®N OOo3UPMNOOM N[o0(ogUVa]MOLlo1VN] MN] NOOAF~0T~e—N~MWA—(eNPMNeNHM—OOerIrW8IO—P—V0MOOna VNOO—VAeMN=e=VOIyONWr~FNO— oo[—N~][)1
Q
—
O
M
O
O
V
O
N
e
l
O
O
G
O
N
O
N
NTTR MMTU ' iMM[t NoN0eiN$ oo[]LaoN00VyO|f] O-] v0M-—]] Mo—] OMAN1—N0oN0Y[ 0oNJU
———-D LoiTDelATiolol- i TT

NNO—-TUVNMeM—NMeOINWI—VO=I——0D3—MAOOWMCN\N20O~eM~VOMOAR2M—MNN=ONRIO=—=NO0MeMOOOeO=O 0V—A2ONOMe0WrT~2Y=N0N=AN~VMM=2OOJFne—TN—MNMNDOA©=.I0TO<FV =eTAMOr-N—OMTeeNO-Moo ]W[ONY~CM=NOoNOONyN~—OVNPA~OMWONN
NdTMga"V¥)a]7<(aXY-G0[ W[ ©o NTM~(-N= oNgLNal=JNOoNwayYn] Woa>—NoWeOMN—myOONMO[—Oo NO U VOIWrNnANMOUeV—O|Ae—rN—e|— -~O ]—
oN~OyN -]o][- MoNoO O—N~eMr—Ot~N

—0 [Ya) -=Dan

O0@M]0T0[NoWO-NOoOO~MOo)R[0V[NawM¥N-le0Meae]NIT-anNLO0—-s[OQMTONO@5MTeeMOFW3x["LM0rnOO~W~—N40N0WLAeOoNM—NUrUewNow(IMW--N=n=¥!U]ryO——]NmLN=[YOn=—]eOON0T0TM=ON-~NeWO[MN]U}MO=NaOOOrn0NN-[a~oM-MM~O-Y-~OeNe='|L0—N—dMy«T—MIeDr¢NNOVWV0N-TNWoV—]O*)[[«]}}«MooWOMVB(Oo=NNNe]TaOoNMAOLVMOOY-[''=1W0eoN~0NVl0to[eN0o*W—el]eNolOaelNCOa0i-ee-1!OUY)V]a3OlMNa]XhOO~ 0~o[ M=—ONrOre)—=—V0U[e———L[oe0MDO+oOe3]MO=LyaMON~uWlO0~TOM(WOne—=[oMN~-=AyV¥—.][rN~O—4MAVMD=NROoNNP3eAnMey[ON3—PM=ONNON&MISNMT~-0N—O=ONOOM-v~M[NOOW—WWNrNO”O0NOON=eWNOM0O-QN0NO«NOOo~WNON~WNM¥AONYNY?+~NMN0~NOIVNN[YT—oOOoNA[MNeMO=OOTreIrNOM—INNM&NNONO«IO=N0EeA)-oV Nl——I[-OWN= NI[NO7¢M]N

Mo—[—ONLarM)MyaWF—4m0[«OH—I—nVM&Nhe«hOTnSIMa-NM=T0—«~2OaYO0M-OOXgMoM-—N~W<2}"u¥e»-0nOO1}0(o—NV-]02aaaM&l40n.".efe€dl«oV.a"2V~A4&=(-YW=“.2—~0MN«4—LOMWD—0KO4ON-e¢<-]Nb[+]ow[—OW=n]ao-0N\o—OMINOTAONMWMnIOD—N-WOVNO~—OVoNM—NF(aWM-o0—}On
CZMSDC

>QNaWgotawnax-ocaoCua—x0an nxu"I>ant WNOSNVNO=IWN—~0—ITMN 0~OTNIFTPWNvIJMNW~O —-OV«ON [3eN~T——r— SOAT0g
—)-d|=et AMoeOTW-NO~NO W=iONM0 BeNo(Mg—=
[
)

[V -4 I[V
[°¥} a]
V]

"ao-2)l

013134
014256

@ - “&

MBERR
MEMDON

CREATED BY
MACRO
ON 22-APR-81

382-11999
*179-6866
184-7071

AT 15:24
I

SEQUENCE

PAGE 10

*179-6890

L 13

375

*179-6895

-«

#179-6908

-L«

Moy193”51N0
Oe~y£Ma&'o)Ma~sor T—MN—O=~NeI——NMOONWVOM4DNOi-«IOTAIIATO0ONL"0AN~Mo-

=OM0gOe([M--~O=!o=][l——]32OVMe]M3LIXNE~=dwVwOw{oNoOW—4RN«a)UU[emaa’&nllgauooO8toaMyILu[]oW(Ny"\a)oe—eO4=yeOoV-OIEn)y3l[N—XeG®DrOOOIRNOININTO((O==]]*=RNOVPRUBPRJBPOTXRNMXELN0—Oe—TNRUr—ON-A0MMMNO—W4rONRF0OMoI—NNTUlLSNrMODT8OFNNL—~OaMOW—WVOr—WIANN—MVDVIT\aNIONX0ONFN=eO——OOWIW0MNA—NONBUUtNTTIWOV—MAO=DNNMOSITNO—ANN§[NOLx3>2O(—O]a-N=N—eMeONYuo=LbUo-i4]O0ONa%w-rnd«nwOVLaAGo0OiLLNyVD»NOnDVMMN0—MNn~~m&—oowoNaMNWQww--3e2Ra««n~.0gU|~O—0\~8M=N-NUF~3-aoo0OLQW30wM4-~AXI[-))R}—O0NAhL[3XXL0[--~—o~}+%(o7]>o“w
S4a-~~~o»OM4VUM>105rIaXNO~—okPNaMlOo~NMaPlIaMo=[OO—OM>TolVNeYLL~Va0aNallOOMloTN«WaMta~oll0~~olOTF|gr.lOaIalb’NNaaMNVllIYOiOROaaDllMaYTPlaOlMFOal2NVaOl2aOWlNPSvaVlOMa0O woPlM]r0aMOlOaVMlMOalMaO=laMVlOeOMOYoVO=WoNMNy7M0=OMdN—O=oINMJFNMTNO~OTNVAWa0NMXONNT=NOTTOOUA40NXTNFVTSAgOMVXLNFDON0MA+INOONDWAM=TMtRMIXII~N\MMMOLTOOJFTAaIrD=—nOOU8d—NeN=NOT=k0OM=NMaOONOl¢UM0=aInVM=taMnOkA¢2OONWM—MO34eN OTTWWoA—&U)\SnOeVNoLO=NN*«ln—MOIeMNSMYW£=NO—OWSIWoNOPoMOvN0IyUS»~NXIVTMTTEOLMXMO~M0[----O-&=o~'«~0=IVTI—Sv0MaVPONT(Oeo0MoM=VCOvNoMN]o--gg-*o!.\«N=—[ANoOT=SgOWTVgNAVaooa~~oOOM’V=0ILMWNli~Ar—
(LL7aa=l)0y,aXl OTNSNTIWVNA=NTYMMOA—NawMYo¥wLlo0M~N
CZMSDC

CREATED BY

B
»
=
"
&
w
«
x
b
=
A
N
—
M
o
4
O
N
O
N
O
O
N
=
T
—
M
O
c
IO-=0NMN—ITMXQWr—OtlNWDT-~oORIaO— NrAWQN—OAe-rMNNOVIrN~W]MN’—INOXeS[OM—M"I=I}M~TNaMVWYWVAS INtATM—OPT=~WeOrO—~NrT~EO—VrRO—ICW=VPr—MNROD~V0OANrO~ NeTIt OANINIMOTN2=IeOPNOLIMN0IO~INO 0OMNTAVOIOOINI0ALNeA—-rm—~VNrinIoV-w0LO—[gNia—Ol¥]N\ATN1a,ONlVGN—N ONYNO0oIMWNnnNOe—WNWN~e-=I—N NdaMTO[=lVa)FlONWOToN)WO

@>H"naxn

4 w) -4 I]
W)[+
(Ve

MACRO

1i N UL 'g

PAGE_11
ON 22-APR-81 AT 15:24
SEQUENCE
376

mn13

)
|8

KoLA4

1
1
1

1
1
1
1

#503-16082
#503-16083

378-11905

382-11976 #503-16084

#503-16086
#503-16087

#503-16090

#503-16094

Py OV WY

#503-1 6 069
#503-1 6 070
#503~} 6 071
#503-16 07¢

o R A bR R LR A A 4R SR bA bA LA Ll 4l LA LB LD L sl

503

[ X7

6092
#503-16093

369-11675 #503-16064

#503-16065
#503-16066

#503-16095

g #503-16098

#503-16100

#503-16108

XV
X X7 X YN

b b

b o

ONNION = = O\ =ad b md b b cmd d d b e v b e ed e ncd b b b ) [RS P
B g
O QOO 00
NN NNN NN = NN O NOOO\NO-ON 2NN
oo O N0 = 0O O Q0 NWNONNN)
O — =2 00 NOONO
NN OO
wn ©o NWNMWVNO
NN
OO
SH~OW O
=2 PN =0 NONI N

!
b e
b ed
1

N 13

A G0 &N A A A AN A A &R A A A wa A wa

074302
074323
074337
074363
074410

#503-16035
#503-16036
#503-16037
#503-16062
#503-16063

b O OOOO0O0OOO

073747
073771
074000
074020
074031
074041
074053
074136
074145
074176
074214
074232
074250

PAGE 12
SEQUENCE
377
CRE
Vo1

MSG066
MSGO67
MSG070
MSGO71
MSGO72
MSGO73
MSGO75
MSGO76
MSGO77
MSGO79
MSGO85
MSG088

073534
073554
073605
073623
073673
073714

POV =2OV=2WVOOV—=H
WA= 2 a\n
OB NS OOORSTOWNINONONONW
WN=—=
OO~
O NWVMINONNON

MSGO65

071624
071630
071651
072441
072463
072477
072523
072535
072552
072566
072606
072625
072665
072704
073032
073035
073054
073073
073111
073133
073167
073214
073235
073262
073315
073334
073374
073426

AT 15:24

b ed

MSGO19
MSG020
MSGO21
MSG022
MSGO23
MSGO25
MSGO26
MSG027
MSG028
MSGO29
MSGO30
MSGO31
MSGO32
MSGO33
MSGO35
MSGO36
MSGO37
MSGO38
MSGO39
MSG040
MSGO41
MSGO42
MSG043
MSGO46
MSGO47
MSG048
MSGO49
MSGO50
MSGO51
MSGO52
MSGO53
MSG054
MSGO55
MSGO56
MSGO58
MSG061
MSG062
MSG063
MSGO64

ON 22~APR-81

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

MACRO

CREATED BY

x
A
A B LN NN AN N N N N NN AN NN =2 NN NN INWNANN
NN NN
S
O=ONOONNNNNNN NNOONNNNNOONON
LN“WU’!\ALNV!U‘!U!\I!\I!WW WNWNON
= = = N2 OO

CZMSDC

CZMsocC

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
MSGO89
076426
MSGO90
074450
MSGO91
074464
mSG092
076476
MSGO93
074512
MSGO95
074520
MsSG101
074527
MSG102
074557
MSG103
074606
MSG104
074630
MSG10S
074632
MSG106
074736

MSG107

MSG110
MsG111
MSG112
MSG113
MSG114
MSG116
MSG117
MSG118
MSG119
MSG120

MSG121
MSG122
MSG123

MSG124
MSG125
MSG126
MSG127
MSG128

MSI1ZE

MTAO030
MTEST
MTLATT
MTLB1
MILC1
MTLD11
MTLO20
MTPAQ3
MTPAQL
MTPA20
MTPA21
MTPA24
MTPA2S
MTPA26
MTPBG3
MTPBO4
MTPB20
MTPB21
MTPB24
MTPB25

MACRC

PAGE 13
ON 22-APR-81 AT 15.264
378
SEQUENC E
vO1
CREF

REFERENCES

074756
075031
075075
075127
075144
075161
075205
075217
075231
075243

463-16679 #503-16127
663-16696 #503-16128
463-14688 463-14703 #503-16129
470-14989 #503-16130
470-14991 #503-16131
4£70-14993 #503-16132
384-12016 #503-16140
384-12021 #503-16141
367-11621 #503-16142
455-14458 #503-16143
-12053 #503-16144
384-12027 #503-16145
384-12034 #503-16146
385-12068 #503-16151
385-12073 #503-1615¢2
181-7006 #503-16153
181-7008 #503-16154
181-7012 #503-16155
154-5503 #503-16156
154~5501
#503-16157
154-5505 #503-16158
154-5517 #503-16159

075273

1564-5512

075252

075313

154-5518

#503-16160

179-6938

#503-16162

#503-16161

075361
075432

348-11139 #503-16165
179-6855 #503-16166

075517
075564
075603
002352
024730
016210
030046
030060
030072
030166
022032
027144
027302
034106
034272
035116
035526
035656
027204
027336
034136
034322
035156
035550

160-5854
387-12087
389-12093
#139-5112
#238-8441
190-7189
266-9022
#266-9030
#266-9033
#266-9050
#227-8068
219-7904
219-7936
228-8149
230-8221
232-8294
300-9967
234-8337
219-7907
219-7940
228-8158
230-8223
232-8288
300-10004

075475

B8 14

380-11939 #503-16167

#503-16168
#503-16169
#503-16170
*181-6944
238-8473
192-7219
#266-9027
266-9118
266-9112
266-9134
227-8135
219-7910
219-7939
228-8150
230-8235
#296-9897
300-10002
234-8338
219-7913
*219-7955
223-8159
230-8238
232-8295
302-10012

*+181-6961

181-7005

181-7007

183-7050

495-15860

194-7251
266-9122

196-7288

198-7325

200-7365

202-7408

#258-8861

258-887¢4

#254-8789
219-7957 #258-8848
2292-8153 #284-9663
#288-9732
298-9956
302-10010
234-8350
#254-8812
«219-7957
219-7960
228-8162
#288-9749
296-9938 #298-9941
#302-10928

258-8868
284-9673

304-10096
258-8852
284-9687

204-7448

#206-7479

mM7P020

ON 22-APR-81

379

REF

C 14

vO1

#304-10060

#256-8830
256-8844
228-8178 #284-9691
#288-9766
#298-9949
302-10017 #302-10040

284-9701

304-10063 #304-10078

#256-8838

228-8187

#236~9706

300-9984
234-8353
228-8196
300-9995

300-9986 #300-10002
#304-10091
#286-9720
286-9728
300-9997 #302-10010

219-7959

#258-8870

#290-9784

#252-8752
#252-876
#252~8775

252-8754

286-9716

*314~10308

314-10309 +314-10311

31410314

236-8422

236-8428

244-8616

264-8622

244-8628

166-6204

166-6238
#227-8138

#166-6276

166-6277

#262-8927
#264-8967
#266-9003
#268-9144
#270-9226
#274-9316
#276-9424
#278-9523
#282-9625

231-8262

#292-9802

238-8449

#306-10099

#300-9959

MTP0O30
MTPO31
mM1P032

306-10127

#308-10156

236-8393

036226
011560
022426

#312-10234
166-6176

O
(v

\I\JNN:‘I\I\IN\J\I

o o OO~
o NNOO~N
W
0 O OO wv Qo VO
»
LA VIIV, 18
Oo

021466

b o

b md

036202

MTPO35
MTST3
MTV020
MT0000
MNT0001
MT10002
MT0003

PAGE

SEQUENCE

234-8358

MTP022
MTPO25

MTP0O33
MTPO34

AT 15:24

SYMBOL CROSS REFERENCE
SYMBOL
VALU
MTPB26
MTPCO3
MTP(C20
MTPCZ1
MTP(C24
MTP(25
MTPC26
MTPDO3
MTPD20
MTPD21
MTPD25S
MTPD26
MTPE20
MTPEZS
MTP000
MTPOO1
MTP002
MTPOCS
MTPO0O6
MTPOO7
MTPO10
MTPO11
MTPO12
MTPO13
MTPO14
MTPO15
MTPO16
MTPO17

MACRO

CREATED BY

CZmsoC

310-10219
236-8399
1666178

*227-8130

227-8130

#217-7841
#217-7863
75-11849
#219-7927
#219-7945
#221-7967
#221-7974

375-11847
375-11848

375-11854
375-11855
375-11856
375-11857

375-11850
375-11851
375-11852
375-11853

#311-10222

CZMSDC

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
MT0014
021542
MT0015
021620

MT10016

021666

MT0017
M10020
M10021
M10022
M10023

021734
021756
023046
023320
023352

M10027

024232

MT10024
MT10025
MT10026

023416
023662
023730

MT10030

024716

MT10032

025410

M70031

025220

MT0033

025742

MT0035

026302

MT10034
MT1020Y

MT0202
MT0999

M2
MUt

REFERENCES
212-7695
#223-8024
212-7696 #225-8035

212-7697

214-7749
214-7756
214-7755
214-7757
216-7811

214-7759
212-7691
214-7758
184-7088

184-7098

214-7760

214-7761

214-7762

2164=7730

022614

228-8145

022430
026414

016264

016270
002106

#225-8043

#225-8051
375-11862
#230-8203
#231-8250
375-11865

#236-8367

375-11869

#238-8438

360-11476

375-11873

227-8127
149-5422

#228-8140
212-7698

228-8161

212-7707
214=7767
216-7821

#206~7493

214-7763

375-11875

212-7699

212-7708
214-7768
216-7822

*230-8204

002426

#139-5137
*145-5322
#145-5341
250-8728
340-10859 346-10995
413-12853 414-12880 415-12942

NOF SMO
NONEM
NONEX ]
NOOJ
NOPAR

002376
002076
040064
036742
002074

NORE S

003640

144-5268

*240-8508

#144-5270
*242-8515

375-11872

375-11870
378-11919

216-7785

216-7799

216-7817

#244~-8606

375-11874

212-7700

212-7701

212-7702

212-7703

2127704

#228-8165

#139-5126

002270
044200
044246
060746
002400

362-11517

#244-8576

214-7748

#242-8512

002410

NEWBAN
NEWKER
NEWLOA
NOCH
NOERRO

375-11868

216-7816

216-7815

382-11989

375-11866

375-11871

#206-7494
+184-7087
455-14451
419-13082
*#164-6133
+324-10580
238-8471
350-11221
350-11200
#468-14899
*#367-11647
455-14455
#236-8379
+164-6134
166-6172_
#316-10337
*144-5285
#214=7741
#244-8581_
+371-11683
382-11965

(53636

375-11863
375-11864

#240-8483

#244-8636

206~7484

#232-8268_
375-11867
#234-8320

375-11861

216-7814

2167809

212=7706
216-7766
216-7820

375-11860

216-7801
#227-8058
216-7808
216-7810
#231-8258

216-7813
#232-8310
216-7812

D 14

375-11858
375-11859

206-7492
#139-5027
*382-11983
419-13078
#139-5019
324-10576
#139-5084
348-11173
348-11101
408-14895
#139-5122
453-14415
#139-5121
#139-5023
164-6135
316-10334
#139-5022
*214=7726
*262-8517
371-11682
*378-11928

002066

NOSUPE

ON 22-APR-81 AT 15:26
PAGE 15
SEQUENCE
380
CREF
v01

026130

NEMCNT

NOSCOP

MACRO

212-7709
214=7769
216-7823

212-7710
214=7770
#246-8658

212-7711
2147771

212-7712
214=7772

214=7730
216-7785

212-7705

214-7765
216-7819

+184~7090 +«188-7168 +188-7170
+206-7481
+206-7494
+375-11818 +378-11913
461-14610 +461-14612 461-146626 *461-14628 *461-14634
419-13088 #419-13092
164-6146

495-15858
#348-11155

#354-11320
#354~11333

*369-11663
*461-14623
#236-8406
*166-6171
#324-10573

*166-6190

166-6214

166-6226

348-11164

348-11174 +350-11215

166-6248

166-6272

354-11310

354-11323

*369-11672 450~14277 450-14314
451-14337 +451-14366
*461-14629
+236-8434
*238-8451
+238-8468
+238-8479
365~1157¢
«166-6257
*166-6266
324-10573

*324-10575

453-14403

144-5291
*157-5635
%216-7779 #216-7791
+300-9964
+300-9999
*371-11718 373-11724
+382-11998

161-5866
+223-8021
+312-10235
«373-11725

*164-6132
166-6170
*166-6212
*208-7549
*227-8063_
+227-8136
+238-8442
+240-8488
*312-10263 322-10546 322-10550 322-10557
+373-11770 +375-11838 *375-11843 378-11894

#230-8247

#232-8271

+232-8308

+238-8451

+238-8468

+238-8479

240-8486

155-5568
346-11012
417-12961

217-7845
346-11037
463-14673

217-7869
346-11058

240-8499
410-12763

242-8526
411-12784

244-8593
411-12804

#242-8570

%244-8579

+244-8603

447-14212

451-14342

CZmMsDC

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VA LUE
NOTAB
002342

MACRO

PAGE 16
ON 22-APR-81 AT 15:26
SEQUENC E
381

CREF

NO22BI

055426
002424

NULLFL
OLDCAC
OLDCSR
ONES

002314
002262
002150
002554

PADDRE
PAF BAF
PAF BAW
PARBAF
PARBAW
PARCNT
PARITY
PARTHE

002034
015404
015534
015706
016036
002070
037760
002264

#139-5020
147-5374
#139-5082

PARVEC
PASFLG

000114
002256

#111-4186
#139-5078

PATERR
PATPLU
PATTER

002072
004546
002110

pCBUMP

002276

PCONF1
PCONF
S
PCONF
1

036630
037130
037040
037076
040154

NOTRCE

PCONF2

PDP110
PD1

PERRA3
PERRA7
PERRO1
PERRO?
PERRO3
PERRO4
PERROS

PERRO6

054074

320-10506 *457-14488 *457-14491 #457-14502 *457-14504 #458-14526

864714193
*145-5326

163-5922

163-6057

186-7142

227-8070

227-8077

227-8122

340-10878

*169-6347
169-6346
171-6400
171-6398
438-13994

210-7644

210-7646

219-7930

292-9811

292-9813

166-6246

166-6268

*322-10548

495-15857

#200-7351
#202-7396
#204-74634

*164-6131

#322-10546

362-11522

198-7338
200-7378
202-7421
204-7461

164-6143

198-7346

200-7383
202-7429
204-7466

*166-6189

200-7391
204-7474
166-6224

*228-8150 +228-8154
*228-8159 *228-8163 «228-8175 *228-8179 *228-8184 *228-8188
+228-8193 +228-8197 +300-9966 +302-10028 +302-10040 *302-10043 *312-10240 *312-10255 322-10559
371-11682 *371-11701 «371-11718 373-1172¢4 *373-11740 *373-11770
*266-9121

0147-5374

v206-7482
*266-9123
*274-9395
280-9594
*166-6188
149-5401
*188-7164

*147-5375

+208-7552
270-9238
#274-9398
+280-9596

166-6222
149-5405
*190-7187

*238-8439

238-8462

#316-10355

316~10343

316-10353 #316-10364

312-10260

406-12701

#324-10593
#410-12771
436-13964

#110-4052
#110-4053
#110-4054
#110-4055
#436-13956

#436-13963

463-14113
436-13984 #439-14049
408-12719 436-13936
438-14000 438-14005
441-14071
441-14075
#641-14062

252-8771
252-8759
256-8833
258-8857

308-10171
252-8784
256-8841
258-8879

439-14038

266-9035
*272-9290
2276-9494

*196-7290

266-9107
274-9336
*276-9496

266-9119
274-9381
278-9536

*200~7352 *202-7414
*375-11794 375-11795

+358-11456
382-11965
*219-7947

*221-7986

*234-8322

439-14050

441-14065 #643-14086

445-14159

436-13948

636-13954
438-14025

436~13974 438-13990
438-14035 #439-14037

438-14015

308-10165

*238-8463
*272-9287
276~9492
149-5415

*192-7221

214-7728
216-7783 +358-11450
375-11840 +375-11882 378-11894
22147727 +216~7780 *219-7894
375-11776 +375-11839 *375-11881
#316-10321
376-11888
316-10364 #316-10370

054522
054450

051252
054574

320-10483

*169-6328
166-6232
313-10290
495-15857
#198-7313

PERBNK

PERRAW

vO1

320-10445

360-11478
*246-8660

PERAOS

PERECC
PERRAB

E 14

311-10229

436-13969
438-14030

PERR24

#110-4072

037032
057022
002120
002502
PHEBE

013136

PHYADD
PROTYP

002036
003716

354

~NO
~NN

PSIZE
PSW

282-9647

776

#110-4073
#110-4074
#110-4075
#110-4076
#110-4077
#110-4078
#110-4079
340-1090¢4
#110-4080
#110-4081
#110-4082
#110-4083
#110-4084
439-14041
439-14053
455-14461 #455-14466
455-14461 #455-14463
455-14461 #655-14465
#655-14462
#455-16461
#139-5032

8-9770
8-9776

290-9794
290-9788

293-9849
293-9858

293-9853
293-9862

¢74=9375

276-9470

276-9476

443-14108

445-14144

298-9955

304-10071
286-9712
284-9695

286-9724

266-9070
266-9098

274-9368

266-9104
310-10195

268-9194

441-14064 #441-14077

*458-14543 *458-14544 *458-14545 *458-14547
151-5452
161-5882
217-7881
219-7901

230-8213
236-8420_
329-1068%
411-12813

*155-5572

278-9568

278-9575

348-11096 *356-11370 *356-11410
*159-5775
159-5780 *160-5818
+160-5843
*160-5844
*160-5855
2448044
328-10653 329-10673 329-10675
329-10679 348-11156 *348-11156 +348-11182
*350-11222
*179-6916
179-6919
179-6921
179-6923
179-6925
*179-6927
*179-6929

*240-8490 *242-8
*350-11217

181-7011
*166-6201

230-8215
236-8426
348-11161
413-12841

+166-6218

*248-8694 *250-8727
£362-11533 +371-11704

458-14548
-t b QD Q0 ~J

PERR23

288-9759
288-9753

b b O

PERR2?

288-9737
288-9743

WO N?QNOJ\

PERR20
PERR21

382
vO1
CREF

SEQUENC E

S AN
—
SN~

PERR17

PERR16

REFERENCES
#110-4056
#110-4057
#110-4058
#110-4059
#110-4060
#110-4061
#110-4062
#110-4063
#110-4064
#110-4065
#110-4066
#110-4067
#110-4068
#110-4069
#110-4070
#110-4071

PAGE 17

»> %

PERR14

PERR1S

ON 22-APR-81 AT 15:2¢4

W=
NN

PERR11
PERR12
PERR13

nununatnronernRRRERNRENNN

SYMBOL CR 0SS REFERENCE
ALUE
SYMBOL
PERROQ?7
PERR10

MACRO

non
o Qo

CREATED BY

CZMSDC

166-6202

367-11653

461-14631

*171-6381
+329-10700

*375-11814

RANODD
RDCHR
RDDEC
RODL IN
RDOCT

035706
104411
106414
106412
106413

#110-4032
#110-4035
#110-4033
#110-64034

READCS

104426

#110-4050

READON
REALPA

00236C
002260

#139~-5080

REFRES
REF SUB
REGCOP
RELENT
RELOCA

035016
035066
036270
043152

042526

RELOC1
RESREG

043166
104416

RESTAR
RESVEC

RLFLAG

002566
000010
045700
045760
046126
002124

RRFLAG

002122

SAVREG

104415

SBEMSK

002244

RESO
RES1
RES?2

*234-8340

385-12058

*221-7985
*230-8205

N
2

002406
002316

L 2R 2%

Quick
QVFLAG

000024

PWRVEC

*414-12883
#111-6179
415-12931
#139-5125
#139-5095
272-9280

+378-11909

RIR) — —

REFERENCES

OONNV
&~
0
O=2\N=
DWWV

PAGE 18
ON 22-APR-81 AT 15:24
383
SEQUENC E
CREF
vO1

NN S

SYMBOL CROSS REFERENCE
SYMBOL
VA LUE

MACRO

-1 9
-12 8
-53 7
-12 9
-54 7
-54 7
-93 8
-83 5
-15 0
-11 5
-12 1
-11 6

-59 7
335-10803

352-11296

*137-4975
#111-46174

017370

*406~12695
*463-14675
*410-12754
*417-12972

*408-12715 »408-12727 *411-12780 *411-12786
*463-14676 *463-14691
*410-12755 +411-12821 *413-12832 *414-12904
*417-12973

*186-7120

228-8144

244-8651

266-9114

268-9211

373-11760

375-11780

375-11793

375-11798

384-12008

302-10033
369-11670

406-12688

333-10749

333-10768

*219-7928 +219-7946 *221-7968 +221-7975
*225-8039 %225-8047 *225-8052 *227-8062
*234-8321
+236-8370 *238-8441
*240-8487
348-11137 348-11145 443-16114 443-16117

302-10045

312-10248

411-12796

463-14652

*217-7864
*223-8019
*232-8272
%244-8637

*219-7893
*223-8029
*232-8314
*246-8659

293-9881 #293-9885
217-7854 #313-10268
348-11140 #348-11152
192-7231
194-7268

196-7305

198-7343

200-7388

202-7426

204-7471

238-8465

219-7920

232-8304

234-8343

234-8360

314-10312

314-10317

352-11259

219-7906
365-11576
*137-4977

448-14247

*147-5376

457-146511

470-14994

455-14454
151-5433

476-15320

1964-7265
360-11475
192-7215
236-8412

196-7302
198-7340
200-7385
202-7423
204-7468
362-11515
365-11574 410-12769 448-14249 470-14988
194-7247
196-7284
198-7323
200-7363
202-7406
238-8455
*356-11370 *356~11410 *356-11413 *356-11421

232-8287
476-15305

232-8293

234-8336

234-8349

314-10303

352-11257

266-9048

266-9109
*268-9208
*272-9283
274-9341
2274-9411
276-9488
*278-9531
280-9604
210-7645

x266-9111
+268-9208
%272-9283
274-9343
274-9412
+276-9490
278-9540
+280-9611
210-7647

*266-9111
*270-9232
*272-9293
274-9347
274-9414
*276~9490
278-9542
280-9612
210-7653

*268-9150
*270-9233

367-11636 #367-11639

#367-11651

192-7228

#139-5075
*268-9151

365-11571
*266-9030

270-9243
*272-9303
274-9389
*276-9430

SBENT

G 14

*217-7842
*223-8005
*231-8261
*244-8607

*217-7829
*223-7997
*231-8253
*244-8580
443-14123

#293-9874

#110-4038

CREATED BY

O
W

CcZmMsDC

210-7664

#210-7673

*280-9592
210-7628

*274-9401
276-9446
276-9512
*280-9592

210-7630

210-7639

*276~9429
2276~9499
278-9546
280-9614
210-7655

186~7129

SIPAR3
SIPARS

#111-4268
#311-4271
#111-4273

SIPARG
SIPDRO
SIZE

#111-4274
#111-6248
#113-4407

SKIPKA
SK1PMK
SKJ
SKPERR
SKuUB
SKUJ
S0BK
SOBLEN
SOF TPA
SOURCE
SPLTCS

#139-4993
#139-5093
447-16195
#139-5018

34,8-11146
179-6907

#161-5196

240-8491

002272
002232
2000006
177776

STOPOK
STRIPE
SUBAAA
SUBAAB
SUBAAI
SUBAAP
SUBAAR
SUBAAS
SUCCES
SUPDOA

166-6161
232-8295

234-8324
234-8323
208-7503

%234-8363
%234-8362
356~11420

184-7066

169-6309

248-8700

250-8737

*266-9025

346-11041

219-7933
314-10305

219-7951
348-11159

*274-9345
276-9444 *278-9544 *300-9962
9
+208-751
208-7541
+208-7573 *208-7576
346-11019 346-11024 *375-11822 +375-11827
*250-8732
61112787 *414-12884 463-14677

342-10922
+208-7583

232-8297

232-8298

184-7083

234-8353

474-1528 5 *474-15290
474-1528 3 %474-15289

385-12074

#362-11504

+266-9026
217-7871

340-10861
240-8501

346-11011
242-8528

244-8595

266-9024

2177871
240-8501
2642-8528
244-8595 *346-11062
410-12773 413-12873
166-6197
166-6230
217-7831
217-7844
217-7866
236-8417
238-8456
242-8521
242-8558
244-8609
352-11293
+367-11625 *384-12017 *384-12023
206-7487
227-8089 *356-11371 *356-11431
#447-14208
+210-7659
340-10902 *340-10906

#306-10127

#161-5207
#139-5085
#139-5072

2689156

+170~6360

*227-8095

#227-8133
248-8695

#111-6132
#483-15548
#111-4109

137-4965
#1%4-5263

137-4976
137-4969
137-4970

START1
START2
START3
STAR27

H 14

#270-9247

*208-7509

137-4983
362-11501

141-5197

153-5474

186-7125

#137-4969

*177-6790
*292-9816

#151-5429

002304
002254

#167-6286
#181-6943
#177-6790
#164-6122

*22i-7981

*208-7535
*217-7835
*221-7988

44714208 *447~14209 *471-15064

292-9820

292-9839

*293-9870

293-9870

*380-11943 380-1 1948 +380-11950
*219-7904 *219-7907 *219-7936 *219-7954
*223-8020 *223-8 030 *225-8040 *225-8048

SSP
ST
STACK
START

346-11062

#167-6291

164=6126
219-7917
*232-8299

#358-11454
0
o~

SDPAR?7

SEEDH]
SEEDLO
SELONL
SETPAT
1
SHADL
SHUTUP
SIPARQ

—

SDPAR6G

SOPARQ
SDPARS

PAGE 19
ON 22-APR-81 AT 15:24
384
SEQUENCE
V01
CREF

ON\NNON 8= —'O&%OOQJ‘J‘—'W—‘—'M—'
]

SYMBOL CROSS REFERENCE
SYMBOL
LU
SBETES
SCUPE

MACRO

CREATED BY

..._n_a_n..a_._amm

CZMSDC

*2 1-7971
*2 5-8053

CZMSDC

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

SUPDO1

026464

SUPDO2

026500

SUPDO3

026642

SUPDO4

026656

SUPDRO
SUPDR1
SUPDR?
SUPDR3
SUPDR4
SUPDR6

002152
002154
002156
002160
002162
002164
002166

SUPSTK
SWAPAT
SWR

002574
002576

SUPDRS

SUPLIM

053714
000740

SWREG

000176
000001

Sw1
Sw10
Swi1

000002
002000
004000
010000
020000
040000
100000
000004

SW0

w12
Sw13
SW14
Swi15
Sw2
SW3
Swé
SW5
SwWé
Sw7
Sw8
Sw9
SYSSIZ
TAG2$
TAG3S

TAG4S
TAG70$

057132

MACRO

ON 22-APR-81 AT 15:24
PAGE 20
SEQUENCE
385
v01
CREF

REFERENCES

*228-8149
*231-8254
*236-8399
*244-8622
217-7839
236-8378
219-7921
242-8569
217-7836
223-8022
231-82664
244-8629
219-7908
232-8301

+228-8158
*231-8262
#236-8422
244-8628
217-7861
238-8446
219-7943
#248-8673
217-7858
223-8031
232-8316
244-8650
219-7937
232-8307

#139-5046
*+248-8675
#139-5047
248-8676
#139-5048
#139-5049
#139-5050
#139-5051
#139-5052
248-8686
#419-13110
503-16178
#111-4111
155-5575
#1461-5218
*147-5360
#141-5221
#151-5446
184-7068
186-7118

274-9387
382-11969
450-14331

276-9486
406-12704
451-146338

#113-4399
151-5453
#111-4152
164-61564
406-12704
#11-46151
#111-4142
450-14284
#111-6141
186-7118
#111-64140
348-11089
#111-4139
348-11108
#111-4138
447-14215
#111-4137
#111-4150
#111-4149
#111-4148
316-10336
#111-64147
4£50-14331
#111-4146
1817015
#111-4145
455-14455
#111-6144
447-14208
#111-41463
447-146233
145-5302 #145-5304

166-6183
166~-6209
248-8684
455-14431

#166-6210
#166-6214
#248-8686
#457-14473

+228-8174
#232-8288
*236-8428
#244-8649
217-7887
244-8631
219-7963

+228-8183
*232-8297
+238-8449
250-8734
219-7912
#248-8671
228-8164

*230-8221
*234-8338
*242-8553

*230-8223
*234-8342
*242-8566

*230-8226
*236-8377
0244-8589

*230-8228
*236-8393
*244-8617

228-8180

230-8236

234-8356

234-8361

228-8198

230-8239

230-8243

230-8246

217-7884
225-8041
234-8339
#250-8705
219-7956
240-8507

219-7905
225-8049
234-8344
314-10310
228-8160
242-8557

221-7982
228-8151
2 36-8400

221-7989
228-8176
236-8429

223-7999
230-8222
238-8448

223-8013
231-8255
244-8623

228-8194
264-8602

230-822¢4
244-8654

#250-8706

230-8227

230-8229

248-8683
250-8709

+250-8708

250-8719
503-16179
248-8695

250-8732

463-14680

463-14686

151-5448
214-7721

+151-5453
214-7736

*153-5472

155-5589

411-12817
451-14342
155-5589

413-12839
455-14455
468-14919

447-14208

468-14919

447-16215
468-14927

447-14233

468-14949

268-9210
375-11831
450-14284
471-15062

214-7721

214-7736

227-8112

375-11831

378-11898

382-11969

228-8144

266-9113

268-9210

272-9279

274-9387

276-9486

280-9588

348-11144

450-14323

280-9588

170-6369

451-14342

316-10336

227-8112
348-11089

164-6154

266-9113
348-11144

170-6369

181-7015

2729279
378-11898

450-14323

006136

#166-6256

*266-9033

NN
N

= 000034
011446
002240

*x198-7334
*443-14098
*158-5706
391-12099 411-12791
#158-5729
*161-5865
*147-5370

TRACE
TRAPVE
TSTBAN
TSTDAT

#139-5037
#139-5114
#139-5065

002132
002356
002216

151-5452
371-11719

TMFLAG
TOOMAN
TOTCSR

147-5378

369-11677
#111-4182
316-10322
*375-11811 *375-11812
+378-11928 382-11965

= 000060

406-12695

*300-9989

*300-9961
*300-9991

408-12727
164-6151

208-7564
*227-8084
228-8142
272-9310
278-9563

*163-6099
210-7614

*227-8087
266-9050
274-9355
280-9618

166-6235
362-11533

371-11704

373-11744

171-6381

210-7616
373-11762

166-6211

#324-10586

367-11649

367-11653

*316-10325 *316-10367 *316-10367 375-11776 375-11776
378-11894 378-11894 +378-11906 *378-11907 +378-11928
*382-11978 *382-11998 *382-11998
*204~7457
358-11440

163-5919

*161-5877

*266-9037

*266-9038

*300-9978
*300-9994

*276-9451
*278-9535
278-9558
*300-9980
*300-9996

~9447

300~-9962
*300-9993

158-5667

160-5821

TKVEC

406-12685

—

406-12669
#139-5092
145-5348
369-11665

*227-8094
266-9137
274-9418
375-11776 *375-11824
*145-5342
*145-5321
242-8538
244-8584

NN OO SN0
00N

002310
040130

*163-6088

OANWNWNWNING

TIME
TIMEOU

240-8490

*163-5949

#141-5192

#158-57C9
*163-5948

002522

158-5661
*159-5738

157-5657
*159-5737

b SN

TESTMO

*380-11936 +380-11937

OB NS
= =2O—=0
NOOWW—=0OOW~N0
W
SO NN
NN
~
O
NOSH=

157-5654

*183-7040

006042
002362

1666275

183-7039

TEST
TESTAD

316-10352
*163-5974

== —d B

002404

166-6253

457-14490
458-14528
457-14503
316-10362 #318-10386
*183-7022
163-6022
163-6024

TCONF1
TEMP

386
CREF
vO1

166-6216

NORNLAINVNVNINONOND

TCF1G2
TCFIG3

#166-6

& =2 Qo \N N NN
S

18G4S
TCFIG]

J 14

PAGE 21

SEQUENC E

O\ b b b ed cd )k ek b (T
b abakakak
ak ki atar -4
NS
N
NNIN NN
NN
OV
NN
WD

—

&~
~n

TAG71$
TAG72%
TAG73%
TAG74$
TAG75%
TAG76$
TAG?77$
TAG78%
TAG79%
TAG9S

lelelelelololalalelm
VIVNWANWNWNAWNNC
SNNNNNM

SYMBOL CROSS REFERENCE
SYMBOL
VA

ON 22-APR-81 AT 15:24

MACRO

O*\ITV!U\M\..IIW\I!\II\I\"\
1 10

CREATED BY

DN
M
(o Al VAl VAl AV AV IV, [V, [V, b

CZMsDC

333-10743

335-10778

339-10834

*161-5881

*387-12088 *389-1209¢4

447-14190

266-9039

266-9040
*266-9127
x270-9237

*266-9047
+268-9153
*270-9240 *270-9241
*272-9291
*272-9292
£274-9352 274-9354
*276-9434 +276~9437
276-9459
276~9467
278-9544 +278-9547
*280~-9599 +280-9600
3 +300-9985
+300-9988
302-10026 438-13999 438-14004
266-9041
*268-9152

CZMsDC

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VALV

MACRO

PAGE 22
ON 22-APR-81 AT 15:24
387
SEQUENCE
CREF

Vo1

495-15866

TSTRD
TSTREA
IS

266-9087

266-9100

268-9176

268-9188

181-7003

181-7007

181-7011

181-7013

186-7122

380-11938

154-5505

1564-5512
181-7004

154-5517

154-5518
181-7012

160-5854

TST?
1873
TST4

1ST5

#184-7066
#184-7083
#110-4026

1ST6
TYPDS

TYPOS

104403

T12A
1128

033246
033270

UIPARS

177660
177676
177640
177642
177644
177646
177650
177652

UIPAR6

177654

UDPARQ
UDPAR7
UIPARO
UIPAR1

UIPAR2
UIPAR3

UNITOP
UNRELO

177600

002366
0£3416

463-14668

463-14670

463~14683

463-14685

463-14698

371-11707

373-11758

373-11767

380-11952

457-146511

457-14517

242-8531

244-8598

346-11039

228-8154

228-8188

240-8504

242-8531

410-12772 413-12872
*181-6988
*181-6989 *181-6990
196-7309
198-7347
200-7392

202-7430

181-69N

181-6991
204-7475

#350-11194

238-8475

CONI N NNO NN

463-14653

S8BT
d ik = O
OV NOWNME
OO ONNOMWN

Nt b b b 2 OO O
Q0 O NN
L
NOO
Y= 0= 0O
WOV
OO WN—~N

472-15222

472-15165

457-14473

208-7569

470-1499¢4

346-10997
*234-8354

UIPDRO

472-15166

471-15087
472-15167

316-10340
316-10360
320-10455
348-11147
369-11671
373-11754
375-11807
380-11956
384-12034
419-13028
453-14421
458-14559
463-14684
468-14916
470-14989
471-15093
472-15224

471-15072
472-15163

UIPAR4

453-14385

104402

468-14928
471-15059
471-15102
479-15444
453-14390
468-14927
179-6856
470-14992

W=
= NN

TYPOC

455-14458
463-14646
463-14694
468-14926
670-14993
471-15098
472-15226

uooo;ommu &»H

SNt
b ek ek ek OOO
W

TYPEIT

354-11303

*181-6987
194-7272

362-11515

375-11810
382-11967
385-12053

450-14286

455-14448

470-14991
471-15095

472-15225

14-1
40~1

*219-7941

352-1126
*219-7961

219-7942

219-7962

CZMsDC

CREATED BY

SYMBOL CROSS REFERENCE
VALUE
SYMBOL
UPPFLG
002257
USERMA
046116
USESTK
= 000700
=2000006
uspP
WARN1
011114
WARNZ
027156
WARN3
027172
WARNS
WARNS
WARNG
WARNGA
WARNGB
WARN?

WASDBE
WASSBE

WAS1DB
WAS1SB
WHICHC
WOOPEN
WOOPS
WOOPSA
WOOPUP

MACRO

PAGE 23

ON 22-APR-81 AT 15:264

SEQUENC E

388
CREF
vO01

*274-9379 +278-9559
8 #354-11300
463-14695 463-14701

#110-4094
#110-4092
#110-64095

171-6391

171-6404

369-11658 #391-12098
415-12938

651-146356

+280-9580

611-12781

*414-12888

463-14692

171-6414

171-6424

270-9264

417-12954

417-12977 #417-12985

417-12972
415-12936

417-12973
415-12936

417-12976 #417-12988
415-12936 #417-12953

417-12977

417-12978

196-7297
+200-7380
419-13080 419-13081

#204-7463
356-1141
*419-13085 1419-13086

419-13087

468-14894

292-9810

292-9814

#139-5016
*153-5475
#139-4996
*448-14246
#477-15385
#141-5228
378-11922 382-11992
#326-10634
481-15481
#326-10627 481

155-5588

oo
o

450-14286

[

| O

)

—D—l—l—l\h\.‘l‘—l—l—l—l—l—l

v S nunarornownonawnubnauaila
OOV =2 O NNV
NNO
00 N =
OO0 ONMNINON
I
&
—=O
WO
N=0O

#477-15388
#477-15389
*419-13030
#337-10822
#337-10827

NON N
& 800000000
00 =
— O b b PN P e b e d b O

#331-10730
#331-10735

S WY
8

$APTHD
$AUTO
$BANK
$BASE
$BELL
$CACHF
$CACHN
$CBCSR
$CB1CS
$COW1
$CDW2
$CHARC
$CHKD]
$CHK1D
$CKSWR
$CLRCS
$CLR1C
$SCMTAG
SCMTGE
$CNTLC
$CNTLG
SCNTLK
SCNTLU
$CPUOP

002324
002306
063126
002060
002011
063102
002613
040272
040246
040732
040754
063106
063110
053672
041326
041342
060724
041304
041316
002000
002514
062116
062130
061324
062123
063054

280-9578

#314-10314

WORSY
XOCHAR
XXDPCH
ZEROS

L 14

*419-13098 #419-13103

#471-15114

#471-15115

468-14923

417-12988

CZMsDC

CREATED BY

SYM30L CROSS REFERENCE
SYMBOL
VAL
$CRLF
002620

$DBLK

060714
062706
063112
063114
063116
063120

MACRO

PAGE 24
ON 22-APR-81 AT 15:24
SEQUENCE
389
CRE
Vo1

M 14

181-6992
316-103¢4
463-14667 463-1468
467-14871 #467-1487
#476-15305
#478-15400

#478-15401
#478-15402
#478-15403
#478-15404
#478-15405
#326-10623
481-15476
*186-7153
*447-14184 *447-14186 #477-15345
#477-15386
186~7124
186-7126 #186-7160
#186-7136
#411-12822
611-12823
467-146844 #467-14875

#331-10706
#331-10714
#331-10710
#331-10718
#331-10722
#331-10726

154~5487

153-5469
153-5466

#186-7132

#477-15350
#477-15354

447-14231 *447-14237 +450-14280
481-15538
#450-14276
#485-15565
#453-14384
186-7114
380-11940
380-11942 *450-14288 *450-14290
*447-146240 451-14345
451-14347
478-15419
#477-15342

419-13033
*384-12011
481-15463

002621

373-11729 *472-15158 #472-15169
413-12832 #416-12911
414-12912
481-15537
*450-14297 450-14299 450-14309 +450-14310
481-15474
481-15478
471-15102

453-14387

451-14356

453-14421

CZMSDC

CREATED BY

MACRO

ON 22-APR-81

AT 15:%2

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

PAGE 25
QUENCE
390
CREF
V01

N 14

040310
002562

'zzg-?ggzz

248-8685

*248-8701

250-8707

+250-8717

250-8718

$LPERR

002564

*248-8685

+248-8701

250-8707

#250-8718

#250-8738

447-14235 #447-14239

$MADR1

063060
063064
063070
063074
063026
063056
063062
063066
063072
063130

468~14928 #471-15118
#477-15347
#477-15348
*451-14353 #477-15341
468-16926 #471-15117
#477-15366
#477-15375
#477-15378
#477-15381
#479-15444
81-1545 9 481-156461
481-15514
481-15515
48115540
81-1554
481-155642 481-15543 481-15544
#139-5100
19-1303 5
#157-5609
57-5609 M157-5609 #1664-6124
164-6124
#169-6309
169-6309 #169-6309 #184-7066
184-7066
*666-14778 *466-148C7 #666-14820
476-15307 #476-15332
476-15335
458-14551 #476-15335
*466-164773 *466-14777
466-16782 *466-14785 *466~14796
447-14215
447-14236 #4647-14241
*153-5462
*186-7115
*186-7116
186-7122
186~7150

481-15516
481-15545

481-15517

481-15518

$PERO7
$PER10
$PER11
$PER12
$PER13
$PER14
$PER15
$PER16
SPER17
$PER20

054340

NE&H

W
NN

#478-15417
#139-4995
#436-13932
#436-13938
#436-13944
#436-13950
#436-13566
#436-13971
#636-13976
#436-13981
#438-13987
#438-13992
#438-13997
#438-14002
#438-14007
#438-14012

225-8045

—

063134

002010
053714
053742
053770
054020
054102
054124
054154
054174

8037
O

SPASTM
$PATMA
$PERO1
$PERO2
$PERO3
$PERO4

223-8026

VIV
AW N
EDD DB DDDSNSN O
o

$PASS

060476
055644
0630634

$OVER

$OMODE

060474
063010
063014

b ad b b v d b e b ud b b b od S

SOCNT
$0CTVL
$0CT8

VUV VT
VYWY

002326
000001

#477-15
#477-15380
#478-156415

SNULL
SNWTST

+250-8738

478-15419

063176

183-7

CDO0 0000 0000000000000
ADACA0—

062146
063042

ONVOo-NOW

$LOADC
$LPADR

227-8060

232-8312

414-12902 *448-14247 +448-14251

#164-61264
#184~7066

481-15539

#166-6161
#184-7083

166-6161
184~7083

#166-6161
#184~7083

223-8017

#4666-14822

#186-7156

348-11091

380-11936 #477-15344

223-7995

223-8003

448-14256

448-14257

450-14283

#141-5225

147-5370

#479-15440
479-15434
#478-15416
#329-10669

419-13099

AN
00 2NN
oR22l8383Re8eS
—=OOVB®NO
VIS NN —O

e
e
D v
i
el
D
cnd
v
b v
mh
e
b
el
el

B R

LSS0 NIV
IV
VAL
(Vol. NIV LV TV LV (V LV VAW ]V IV LV [V [V 1V ]

&~ P Y
I
T
T
T
T
T
Y.y
o — G0 0o G0 G 00 GO G 0o OO GO 0B CO GO OO
AN
= cod b b b b b
od e ed D e
]

878

b
OA ) e

309

b b b b
b
LA
HEHSO0O0O0
~z
AN~
&
WVWNOS

#139-5102

169-6309

184-7066

184-7083

382-11979

382-11997

382-11981

382-11996

166-6161

166-6161
184~7083

— b b md b d
WWWAWMAW
—=_OHHOWN
QWA NN
= OROWO

002610
002330
002606
063142
063164
063204
063132
040424
062072
060500
053360
053506
053674

OO = b = b -‘-‘O’.Ou’o O NOOMO

$TPB
$STPFLG
$TPS
$TRAP
$TRAP?2
$TRPAD
$TSTM
$TSTRD
STTYIN
$TYPDS
STYPE
$TYPEC
$TYPEX

#108-3987
#166-6161
#184-7083
#141-5226

000007

166-6161

#477-15343

$IN

#447-16238
164-6124

002602

4£13-12834 *413-12835 *413-12836 #414-12913
417-12967
#447-146184
#169-6309 #184-7066
#166-6161
#184-7083

$TKS

481-15471

W
9

002604

447-14223
#108-3986
153-5472
*450-14283
#141-5224
419-13079
#141-5223
419-13077

v01

481-15466
481-15469
481-15467
481-15468
481-15484
481-15472

B
S

b
e
b
d
b

*411-12819

39N

CREF

NOWVIWVIWVWNAVINONIWNES
S
B8NS
2
NN
= O =2ONINICD N = b ed —d —d 3 JO O PR OOOO M
SN ANNOON) NNO NN O N VNN = =2 YOOI
=M
O\NNWNO
S —=O0
NN OO ONINIINND
NN NN N

)

b
d A ) md \S) md cd

d e

[

ne?
#7
ne7

815

PAGE 26

SEQUENC E

b amd

-t

&~
X

LL2
#44
LL13
L
2.3

002617

ON 22-APR-B1 AT 15:264

SPWRDN
SPWRUP
S$QUES
SRAND
SRDCHR
$RDDEC
SROL IN
$RDOCT
SREADC
$RE SRE
$SAVRE
$SAVR6
$SCOPE
$STN
$SVLAD
$SWR
$SWREG
STESTN
$T7KB

SO
=2 N NWNN
—
orsroo oo A%

SPER27
SPER30
SPER3
SPER32
SPER33
SPER34
S$PER3S
SPER36

N = NNV
= S S
=2 \NNNA)
= = O &

SYMBNL CROSS REFERENCE
SYMBOL
SPER21
SPER2?
SPERZ3
SPER24
S$PER2S
SPER26

MACRO

¥ =

CREATED BY

— N
S
s
P )
N

CZMSDC

69-6309

#157-5609
#169-6309

419-13012

471-15075

471-15093

468-14955

471-15107 #671-15111

#164-6124
#184-7066

184-7083

CZMSDC

CREATED BY

SYMBOL
SYMBOL
$TYPOC
$TYPON
$TYPOS
SUNIT
SUNITM
SUSWR
$VECT]
SVECT?2
$WASDR
$WASSB
SWAS1D
SWAS1S
$XTSTR
$2APL?
SOFILL

0SS REFERENCE

MACRO

ON 22-APR-81 AT 15:24

SEQUENC E
392
CREF

#477-15346

041140
040774
041254
041110
055522
014450
060475

PAGE 27

c15

CZMSDC

CREATED BY

MACRO

ON 22-APR-81

MACRO CROSS REFERENCE
MACRO NAME
REFERENCES
AND
#6-4500
#108-3976
ANDB
#18-600
#108-3979
#12-6300
BEGIN
#108-3977
BMOV

CASE
CLEAR
CLEARB
OLEFT
DCWNTO
ELSE

END

348-11113

#126-4717
#219-7940
#230-8242

385-12035

#166-617
#219-7959

#230-8245

AT 15:24

0 15

PAGE 28

SEQUENCE

393

CREF

179-6833

411-12792

#217-7838
#219-7960
#232-8294

vO1

208-7534
463-14648

#217-7886
#228-8162
#232-8296
#244-8616

227-8069

333-10745

335-10780

339-10835

348-11093

#219-7913 #219-7914
#228-8187
#234-8351
#314-10314 #329-10686 #348-11159

#219-7915
#230-8235
#234-8358
#350-11218

#219-7939

#219-7910
#228-8178
#234-8350

#230-8238
#236-8376
#352-11277

#238-8445 #240-8491
#352-11293 #615-12933
#9-100
#108-3976
#19-100
#108-3974
#210-7626
#210-7674
#238-8468 #238-8479 #266-9139 #272-7311
#274-9419
#276-9517 #313-10287
#316-1035 14 #337-10813 #337-10817 #348-11151 #350-11211 #350-11228
#356-11368 #356-11370 #356~11371
#19-1300
#108-3974
#135-4919 #260-8903 #260-8922
#266-9111
#266-9117
#268-9208
#268-9214
#272-9277 #272-9283 #274-9385
#274-9391
#276-9484
#276+-9490 #280-9586
#280-9592
#10-3800
#108-3977
#7-100
#108-3976 #153-5473 #153-5478 #164-6156 #167-6297 #167-6302 #169-6339 #170-6371
#179-6852
#181-6954
#181-6957 #181-6960
#181-6964
#183-7030
#214-7723 #214~7738 #223-8009 #227-8088 #227-8106
#227-8114
#244-8624
#246-8666 #292-9812 #292-9828 #293-9855 #329-10692 #333-10762 #335-10797 #362-11499
#367-11626 #367-11634 #375-11833 #378-11900 #382-11971 #606-12675 #406-12706 #419-13089 #439-14604
4 #439-14056
#443-14105 #645-14153 #451-14363 #463-14687 #463-14702 #470-15009
#12-100
#108-3977 #149-5423
#149-5425
#151-5438 #151-5455 #153-5465
#153-5468 #153-5480 #153-5481
#153-5482 #154-5489 #155-5591
#155-5592
#164-6158
#166-6271
#166-6274
#167-6300 #167-6304
#169-6341
#169-6350 #170-6361
#170-6362 #170-6363
#170-6364
#170-6365 #170-6366 #170-6373 #171-6425
171-6426
#171-6427 #171-6430 #179-6844
#179-6847 #179-6854 #179-6858 #179-6859 #179-6860 #179-6861
#181-6956
#181-6962 #181-6963 #181-6968 #181-6969 #181-6970 #181-6971
#181-6972 #181-6981
#181-6985
#181-6986
#181-7017 #183-7032
#183-7043 #183-7046 #183-7048 #183-7049 #183-7052 #183-7064
#184-7091
#186-7121
#186-7158 #186-7159 #188-7172 #188-7173
#206-7489 #206-7490 #208-7559 #208-7563 #208-7564 #208-7565
#208-7566 #208-7571
#208-7572 #208-7574 #210-7640 #210-7665 #212-7713 #214~7725 #214-7732 #214-7740
#216-7787
#223-8004 #223-8011
#223-8018
#225-8038 #225-8046 #227-8061
#227-8075
#227-8076
#227-8083 #227-8086 #227-8098
#227-8116 #227-8126 #227-8130 #228-8146
#232-8313
#236-8401
#236-8403
#236-8408 #236-8424 #236-8430 #236-84
X1
#238-8461
#246-8668
#293-9850
’
#293-9864 ]
0 #2 93-9871 #293-9878 #293-9883 #312-10261 #329-10694 #333-1075
10753
#333-10756 #333-10757
#333-10764 #335-10788 #335-10789 #335-10791 #335-10792 #335-10799 #339-10840
2 #339-10843 #348-11092
#348-11106 #348-11107 #348~11110 #348-11112 #348-11125 #348-11129 #348-11130 #348-11131
#348-11132 #348-11133

#348-11141 #348-11142 #348-11148 #348-11150 #348-11168 #356-11385 #356-11422
#365-11616 #367-11628 #367-11638 #375-11790 #375-11800 #375-11809 #375-11830

FATAL
Fl
FOR

#362-11

1921
#385-12067
#413-12868
#6465-164155
#451-143464

#380-11951 #380-11957 #380-11958 #380-11959 #382-11973 #382-11990 #382-11991
#385-12082 #406~12672 #406-12677 #406~12708 0408-12719
#411-12800
#413-12869 #419-13091 #439-14046 #439-14058 #443-1410
#4463-14119
#447-14188 #447-14211 0447-16%14 #450-14291 #450-1429
#450-14325
#651-14355 #451-14361 #651-14362 #451-14365 #455-1445 #463-1
#663-14657

#18-5000
N115-4421

#164-6145

b
e emd

ENDPRO

518 #365-11578
i #378-11902
#378-11920

#463-16686 #463-14689 #463-14701 #463-14704 #470-14990 #470-15011

#10-100°

208-7530
292-9808

#108-3977

208-7531
292-9816

#164-6149

149-5419

208-7539
293-9876

#300-9977

169-6329

#385-12062 #385-12066
#411-12801 #413-12866
#443-146122 #443-14125
#450-14333 #450-14334
#463-14658 #463-14671

#322-10562 #324=-10587 #324-10591 #324-10594

179-6801

181-6948

181-6975

181-6982

208-7550
227-8118
2 36-8380
236-8381
236-8409
312-10237 #333-10746 #335-10781 #339-10836 #348-11094

183-7024

236-8410
3 48-11117

188-7165

238-8452
378-11915

MACRO

380-11944

382-11985

#13-2000
#4-100
166-6268
170-6353
181-6952
184~7086

#108-3978
#108-3976
166-627
170-6369
#181-6958
186-711

#293-9844

#293-9845

208-7567
223-7994
225-8036
227-8078
236-8405
2669072
274-9388

210-7633
223-7995
225-8037
227-8100
236-8412
266-9074
276-9486

320-10506 328-10646
348-11091
348-11096
348-11135
348-11144
-1 1632
373-11736
-1 831
378-11898
-12 681
406-12704
-14 051 #439-14052

IF8
JUMPTO
LEAVE

LET

MAP

NEWTST
ON.ERR
ON.NOE
OR

ORB
POP

658

E 15
vo1

#415-12861 #463-14649
#375-11808 #378-11923
#153-5474
153-5476
169-6333
169-6334
#179-6834
179-6840
#181-6983
181-6991
188-7167 #206-7486

210-7664
223-8007
227-8059
228-8144
238-8454
268-9210
280-9589
293-9852
333-10755
348-11119
360-11475
375-11782
380-11948

463-16666
463-14681
382-11993 #450-14332
1564-5487
155-5588
169-6335
169-6336
179-6845 #181-6949
181-7015
183-7021

463-14696
155-5589
169-6346
181-6950
183-7028

206-7487
208-7503 #208-7504
214-7721
214-7730
214-7736
216-7785
223-8016
223-8017
223-8025
223-8026
227-8060
227-8068
#227-8070
227-8071
232-8311
232-8312
236-8383
236-8390
238-8455
238-8462
244-8618
244-8651
72-9279
272-9280
274-9320
268-9211
292-9809 #292-9823 #292-9824 #292-9825
293-9857
293-98€1
316-10336 320-10445
335-10785
335-10790 339-10841
348-11089
348-11120 348-11121
348-11122 348-11126
362-11497 362-11515 #362-11516 365-11574
375-11787 375-11795 375-11796 375-11806
382-11969 382-11987 385-12060 406-12668

164-6154
169-6348
181-6951
183-7050
208-7536

411-12799 413-12867 419-13087 439-14039 #439-14040
64314103 443-14112 443-16114 443-14117 443-14120
-14 130
445-14139
447-14185
447-16212
447-14215
450-14277
447-14208
-14 314
450-14315
451-14337 451-14342
451-14348 451-14352 451-14356 455-14455
463-14856 463-14680 463-14695
470-14988
470-15007
#18-1100
#108-3979
#153-5463
#153-5466
#153-5469 #183-7025
#183-7041
#183-7044
#380-11947
#13-1500
#108-3978
#13-100 _ #108-3978 #179-6843 #179-6846 #179-6853 #208-7562 #227-8074
#227-8081
#333-10752 #335-10787
#348-11124 #385-12061
#108-3978
#181-6953 #181-6955 #181-6959 #181-6961
#181-6967 #181-6984
#208-7553 #236-8385
#292-9810 #292-9811
#292-9813 #292-9814 #292-9820 #292-9821
#292-9826 #292-9827 #292-9829
#292-9832
#292-9833 #292-9839 #292-9840 #293-9847 #293-9851
#293-9856 #293-9860 #293-9865
#293-9866
#293-9879 #293-9882
#348-11155 #350-11215 #406-12667 #4606-12670 #406-12674 #406~12676 #406-12593
#408-12712 #408-12713 #408-1271), #436-13971 #636-13972 #436-13973 #636-13976 #436-13977 #436-13978 #436-13981
#4,36-13982 #436-13983 #438-13987 #4638-13988 #438-13989 #438-13992 #438-13993 #438-13994 #438-13997 #438-13998
#4,38-13999 #438-14002 #438-14003 #438-14004 #438-14007 #438-14008 #638-14009 #438-14012 #438-14013 #438-14014
#438-14017 #438-14018 #438-1401Y #438-14022 #438-14023 #438-14024 #638-14027 #438-14028 #438-14029 #438-14032
#438-14033 #438-14034 #441-164069 #441-14070 #441-14074
#128-4780
155-5605
166-6191
170-6367
171-6378 #208-7532
240-8489
242-8518
244-8582
248-8672
250-8705
362-11532 371-11703 373-11742 375-11803 375-11828 375-11883 378-11929 382-11999 415-12929
417-12970
#117-46471
157-5609
164-6124
169-6309
184-7066
184-7083
166-6161
#18-3100
#108-3979
#190-7202
#192-7232 #194-7269 #196-7306 #198-7344 #200-7389 #202-7427
#204-7472
#231-8252
#232-8270 #238-8466 #240-8485 #242-8514 #244-8578 #333-10748 #333-10760
#335-10783 #335-10795
#348-11166 #411-12795 #413-12863 #463-14651
#18-2600
#108-3979
171-6395
171-6405
171-6415
208-7547
#6-100
#108-3976
#18-100
#108-3979
#14-900
#108-3978
163-6067
166-6191
166-6267
170-6367
171-6378
1716441
171-6443
179-6894
208-7558
208-7584
210-7670
210-7678
227-8129
227-8131
240-8489
242-8518
248-8701
250-8705
250-8738
313-10298 316-10367 328-10657
328-10665
329-10689
339-10844
339-10853
340-10891
340-10907 342-10938 346-11063
S S

GOTO
IF

REF

SN
=t et d O QO N =2 I =(=] =)
W= O NONN 2SO -2 SO
WNVVONO 85N
=N 0000 S (¥, 19
- =2 (N ONIOVOWO

MACRO CROSS REFERENCE
MACRO NAME
REFERENCES

PAGE 29
ON 22-APR-81 AT 15: 2 3
394
SEQUENCE
»
=
W
NN AN LN ANN NI NI NN NI NIAY = —b —d —b — L S~

CREATED BY

]

CZMsSDC

WF=g—WVMNOVOIPO KOgN0TaVWIONoOelMWelNNLOl

G0ONODM0ON O—NWrA—=NULr-— OOMBO eoY«NLVaTl-as¥ O=N~UL-—— ONV —eLo[V47altYi0V} MNO I ON=OU=M
)
R
[
3
L
|
O
o
l
[
]
=
0
TO=W

#108-3978
#171-6382

#155-5575
#171-6384

T—Mr—0 -ULO-—w 0MNO ~O=r3N )ULILosund0 -WVO)Oe.Noa2lal’laAOT ~O= Pe—

#155-5581
#179-6862

#155-5605
#186-7128

#163-5956
#208-7505

#163-6053
#208-7532

#166-6191
#208-7554

#248-8672

#3-1090
#3-1300
#3-2500
#3-3100
#3-1600
#3-3400
#3-2800
#3-700
#3-2200
#3-100
#3-1900
#19-700
#153-5479
188-7168

230-8204
246-8660
270-9269
356-11397
365-11584
385-12069

SETB

SET4

SMACIT

#651-14364
#19-1900
#133-4880
#157-5636
#367-11645
#1-300

231-8263
266-9089
302-10036
356-11401
367-11647
443-14098

137-4977
163-6076
206-7480

~F
a0~

2”4

#e17-12968 #417-12970 #419-13043 #419-13047 #419-13048
14523 #461-14610 #461-14626 #463-16644 #463-14662
*-— [7a] ~N O

hed

373-11771

#108-3975
#108-3975
#108-3975
#108-3975
#108-3975
#108-3975
#108-3975
#108-3975
#108-3975
#108-3975
#108-3975
#108-3974
163-6030
188-7171

2TM

#354-11321 #354-11335 #356-11367 #362-11532 #364~11548

#371-11703 #373-11724 #373-11742 #375-11776 #375-11803
#380-11935 #382-11965 #382-11999 #384~12006 #406-12682
767 #411-12783 #411-12789 #411-1 o ~ [+ ~

-— ° -—

"o Q0 D oN

[
d 0 ~y O - [Va) -—
]

- 0 0 0 - -—
[}

232-8271
266-90%2
302-10048
356-11404
369-11663
443-14109

147-53
166-62

206-74
236-8
266-9
322356369443~

- M=3O

6-7495

3-5464
7-6790
8-7551
8451

367-11649

367-11653

369-11665

153-5467
179-6857

153-5470
179-6939

153-5475
1847087

457-14488
457-14502
458#108-3974
#145-5304
#145-5306 #145- 5313 #145-5332
#160-5788 #160-5804
#16 0 5819 #160-5847
#369-11660 #371-11702 #37 3 1174 1
#108-3973
108-3988

#145-5344
#161-5864

208-7582

240-8486

268-9192
348-11190
356-11425
382-11983
445-14247
461-14 29

W OO CIN

371-11719

1
1
1

#248-8674 #250-8705 #250-8707
#339-10833 #339-10848 #340-10857 #340-10882 #342-10919

OO—NO
OJT> OONJOOWNUEMWAM= N==
-ONSNONOVMMIMN= —

"N N-

3L3
X

eM—)M |ONe—O 0@O - TN [a]lal M- (—Yo'J
[aY]

Lwnaow

Naxacoa
TVIVEIVY] A
w

«—

- OO

#244-8582

V] (o

B518

#328-10644 #328-10662 #329-10669 #333-10742 #335~ 10777
#346-10991 #346-11066 #350-11196 #350-11201 #350- 1 1240
1 682
1 929

#171-6378

LNa) [M7aN)—O

PUSH

4A —0

» - a0 ~ -— o o

O7NMOVOOON
NMMMMINS
OP~ MO
———— e ——
MMMI
PTW OONS ==MI
7MMMM
S8T
MMMME
<8

T~ T 2XX33 L2 o® ~FMMMMISS
MIMIF
T8

eU=— NOM

333°)1MLAOO0VRSle—LRtD 0O WMAON - L L P
R22
L
3
®
T
4
MM
Lalaal,al
S
N
I
S
5
g
~
o
o
OOOO~
G4oLV6DMA0G0 TNO —NOJOONeMONO—

PROCED

CREF

F 15

4Lal.a
S~ S5 48 alt lal

L44aVVEIVXXRoI3aaVRodlLLalak O4RNMNe4SkoLaVIaV]Yo -

MACRO CROSS REFERENC
MACRO NAME

PAGE 30
ON 22-APR-81 AT 15:24
395
SEQUENCE

MACRO

CREATED BY

3dLob 00-NNNNO—-

CZMSDC

#151-5445
#163-5916

#154-5495
#164-6135

210-7634
242-8515
268-9195
356-11369
356-}3828
17
384~
445~ 141 69
#154-5497
#166-6172

369-11677

2709266
356-11378
356-11431

384-12023
445-16171
#154-5499
#360-11474

CREATED BY

MACRO

ON 22-APR-81 AT 15: 24
PAGE 31
SEQUENCE 396
CREF
V01

MACRO CROSS REFERENCE
MACRO NAME
REFERENCES
#144-5263
SUBTST

SUPERV
TESTAR

#179-6793
#200-7351
#217-7841
#223-8015
#232-8310
#246-8663
#258-8861
#278-9523
#304-10053
#313-10268
#346-10980
#358~114647
#367-11642
#384-12015
#408-12721
#470-164976
#130-4809
#131-4852

THEN
THRU
10
TYPDEC

#6-6900
#11-4400
#10-2900
#125-4681

TYPE

#115-4435

TYPOCS

TYPOCT

UNTIL
UNTILB
USER

250-8727_

408-12727

#154-5484
#181-6943
#202-7396
#217-7863

#206-7479
#219-7927
#225-8043
#238-8438
#248-8671
#252-8763
#258-8870 #260-8884
#262-8927
#282-9625
#284-9658
#288-9732
#304-10060 #304-10078 #304-10091
#313-10274 #3141
#316-10321
#348-11088 #350-1
#350-11239
#358-11455 #358-1
#360-11466
#369-11657 #371-1
#373-11723
#384-12020 #384~1
#384-12033
#415-12926 #417-1
#639-14037

#470-15001
#248-8694
#411-12
166-6201
166-6218

329-10698

#108-3976
#108-3977
#108-3977
181-6995
380-11955 457-14479

#179-6938
#208-7568
#316-10348
#318-10415
#348~11109
#369-11666
#373-11754
#375-11810
#382-11974
#385-12068
#653-14385
#458-14527
#463-14669
#666-14806
#470-14978
#471-15093
#472-15225
#123-4628

#154-5488

#181-6992
#208-7570
#316-10349
#320-10425
#348-11139
#369-11671
#373-11757
#378-11896
#382-11976
#385-12073
#453-14409
#458-14536
#463-14679
#467-14871
#470-14989
#471-15095
W472-15226
179-6856

G 15

#145-5301
#155-5566
#184-7097

#144-5281
#154-5691
0183-70;0
#204~7434
#219-7891

362-11533

#147-5365
#155-5597

#
#306-10099
#318-10373
#352-11252
#362-11495
#375-11775
#385-12052
#439-14049

#149-5389
#161-5857
#192-7209
#212-7683
#221-7974
#230-8203
#244-8576
#254-8812
#268-9144
#296-9897
#308-10156
#339-10832
#354-11320
#362-11531
#378-11893
#387-12086

#414-12883 #415-12930 #417-12971
166-6235
166-6261
171-6381

210-7616

240-8490

242-8538

406-12695

408-12715

181-7013

186-7122

380-11938

380-11940

373-11744

373-11762

181-6999

181-7003

181-7007

181-7011

#154-5501

#1564-5503
#181-7000

#154-5505
#181-7004

#154-5512
#181-7008

371-11707

373-11758

373-11767

380-11952

352-11276

352-11292

411-12780

414-12887

#181-6996
#316-10330
#316-10358
#320-10444
#348-11147
#369-11675
#373-11759
#378-11903
#382-11992
#387-12087
#453-1441
#458-1455
#463-14682
#468-14916
#470-14991
#471-15098
#479-15444
208-7569

#149-5418 #151-5429 #151-5441
0163-58g5 #164-6153 #167-6286
#194-7239 #196-7276 #198-7313
#214-7717 #216-7775 #217-7828
#221-7984 #223-7993 #223-8001
#231-8250
#232-8268
#244-8606
#246-8658
#256-8830 #256-8838 #258-8848
#270-9226 #274-9316 #276-9424
#298-9941
#298-9949 #300-9959
#310-10176 #311-10222 #312-10234
#339-10847 #340-10856 #342-10911
#354-11333 #356-11345 #358-11436
#364-11541 #365-11570 #367-11620
#380-11934 #382-11964 #384-12005
#389-12092 #391-12098 #406-12680

#242-8512
#254-8789
#266~9003
#293-9874
#306-10105
#324-10602
#354-11300
#362-11504
#376~-11887
#385-12072
#441-14062 #661-16077 #443-14086 #448-14245 #461-14604

371-11706

CZmMSDC

40612669

406-12685

244-8584

#154=3517 #154-5518 #160-5854 #179-6855
#181-7012 #181-7014 #186-7117 #186-7119
#316-10331 #316-10332 #316-10340 0316-10344 #316-10345 #316-10346 #316-10347
#316-10359 #316-10360 #316-10361 #318-10386 #318-10389 #318-10391 #318-10400
#320-10455 #320-10482 #320-10493 #320~10505 #320-10515 #320-10523 #320-10525
#365-11572 #365-11575 #365-11585
#
#365-11590 0397 11621 #367-11651 #369-11462
#371-11684 #371-11685 #371-11710 #371-11714 #373-11726 #373-11727 #373-11750
#373-11766 #375-11778 #375-11779 #375-11788 0;;3:11792 #375-11797 #375-11807
0380-11941
1949 #380-11956 #382-11967
g%-12034 #385-12053 #385-12057
0419-1 8 #450-14286 #450-14287 #451-14357
14419 045%-14421
#455-14448 0‘55-14658 #457-14489 #457-14493
#658-14557 465814559 #463~14645
63-1464?
14654 #463-14663 #463-14667
#
#463-14684 #463-14688 #463-14694 #463-1469
=14699 #463-14703 #463-14705
#668-146925 #4668-14926 #468-149
#468-14937 0‘68-1494 #468-14951 #468-14969
#470-14993 #471-15059 #471-150
0471-15078 #471-15083 #471-15087 #471~-15092
#671-15102 #472-15163 #472-1516 #e72-15166 #472-15167 #472-15222 #472-15224

457-14511

457-14517

458-14558

470-14992 470-14994
0121-458%7 #453-14390 #457-14473 #463-14653 #463~14668 #463-14670 #663-14683 #463-164685 #463-14698 #463-1470C
#4668-149
#11-2900
#18-1600

#130-4830

#108-3977
#108-3979

348-11158

350-11217

CZMsDC

CREATED BY

MACRO

MACRO CROSS REFERENCE

MACRO NAME

WHILE
WHILEB
$CALL
$RETUR
$SUBTS

REFERENCES

.1IFAR]

.IFOPR
IS
.LEAVE
.OPADD
.0PSUB
.OR
.SIMPL
. SUPER
. .BRAN
. .POP
. .PUSH
.. TAG

CREF

H 15
V01

#8-100
#18-2100
#15-100
#15-3800_
#119-4543
153-5459
179-6793

#108-3976
#108-3979
#108-3980
#108-3980
144-5263
154-5684
181-6943

292-9822

293-9843

293-9880

210-7671
144-5281
154-5491
183-7020

210-7679
145-5301
155-5566
184-7097

246-8665
147-5351
155-5584
188-7163

408-12721
470-14976
#12-7400
#119-4503
#17-7700
#1-4600
#1-6800

415-12926
470-15001
#108-3978
157-5609
#108-3979
#108-3973
#108-3973

417-12953

439-14037

439-14049

503-16177
164~6124

166-6161

#5-1500

#108-3976

200-7351
217-7841
223-8015
232-8310
246-8663
258-8861
2789523
304-10053
313-10268
346-10980
358-11447
367-11642
384-12015

$SEND
SSNEWT
-ARITH
LEMIT
EMITL
.EMITN
.EMITR
.GENBR
.GOTO

ON 22-APR-81 AT 15:24
PAGE 32
397
SEQUENCE

#1-5800
#1-7300
#2-5100
#5-4500

#2-100
#2-3300
#5-3100
#2-7800
#2-9300
#5-100
#17-100
#19-2500
#1-3500
#1-2200 .
#1-1500
#1-3200

202-7396
217-7863
223-8024
234-832
248-8671
258-8870
282-9625
304-10060
313-10276
348-11088
358-11455
369-11657
384-12020

#108-3973
#108-3973
#108-3974
#108-3976

#108-3974
#108-3974
#108-3976
#108-3974
#108-397¢4
#108-3976
#108-3979

#108-3973
#108-3973
#108-3973
#108-3973

204-7434
219-7891
225-8035
2368367
252-8752
260-8884
284-9658
304-10078
314-10301
350-11194
358-11459
371-11681
384~12026

206-7479
219-7927
225-8043
238-8438
252-8763
262-8927
288-9732
304-10091
316-10321
350-11239
360-11466
373-11723
384-12033

208-7499
219-7945
225-8051
240-8483
252-8775
2064-8967
292-9802
306-10099
318-10373
352-11252
362-11495
375-11775
385-12052

169-6309

#246-8667
147-5365
155-5597
190-7179

348-11111
149-5389
161-5857
192-7209

210-7588
221-7967
227-8058
242-8512
254-8789
266-9003
293-9874
306-10105
324-10602
354-11300
362-11504
376-11887
385-12072

212-7683
221-7974
230-8203
244-8576
254-8812
268-9144
296-9897
308-10158
339-10832
354-11320
362-11531
378-11893
387-12086

184-7066

184-7083

4461-14062

441-16077

348-11149
149-5418
163-5885
194-7239

214-7717
221-7984
231-8250
244-B606
256-8830
270-9226
298-9941
310-10176
339-10847
354-11333
364~11541
380-1193¢
389-12092
443-14086

348-11191
151-5429
164-6153
196-7276

216-7775
223-7993
231-8258
244-8636
256-8838
274-9316
298-9949
311-10222
340-10856
356-11345
365-11570
382-11964
391-12098
448-14245

151-5441
167-6286
198-7313

217-7828
223-8001
232-8268
246-8658
258-8848
276-9424
300-9959
312-10234
342-10911
358-11436
367-11620
384~12005
406-12680
461-14604