Digital PDFs

AH-S390A-MC

February 1981

400 pages

Original

16MB

view download

OCR Version

14MB

view download

Document:	CZMLAA0 ML11 ML11 LOGIC TEST FEB 1981 bw
Order Number:	AH-S390A-MC
Revision:	000
Pages:	400
Original Filename:	CZMLAA0__ML11__ML11_LOGIC_TEST__AH-S390A-MC__FEB_1981_bw.pdf

OCR Text

LOGIC
ML11 CIM
LAAD TEST

E@H@
@EB
1oe:
ire
feid
MC
0AS39
AHFICHE 2 OF 2 iwaoe v use

MACRO M1113

23-0C7-80 09:11

PAGE 1

CIMLAAD ML-11 LOGIC TEST

SEQ 0001

LTITLE CZIMLAAD ML-11 LOGIC TEST
.SBTTL
USER DOCUHENTATlO:EH .

IDENTIFICATION
PRODUCT

CODE:

AC-S388A=M(

PRODUCT

NAME
:

CZMLAAO ML11

PRODUCT DATE:

2-FEB-81

MAINTAINER:

TOM LANWSBY

AUTHOR :

D.W.NEALE

LOGIC

TEST

)

THE INFORMATION IN THIS DOCUMENT IS
SUBJECT
TO
CHANGE WITHOUT
NOTICE
AND
SHOULD
NOT BE CONSTRUEM AS A COMMITMENT BY DIGITAL

EQUIPMENT CORPORATION.

DIGITAL EQUIFPMENT CORPORATION ASSUMES NO

RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR

NO RESPONSIBILITY

IS ASSUMED

SOF TWARE ON EQUIPMENT THAT

AFFILIATED

COMPANIES.

(C)

1981

FOR

IS NOT

THE

USE

SUPPLIED

IN THIS DOCUMENT.

RELIABILITY

DIGITAL

ITS

Br DIGITAL EQUIPMENT CORPORATION

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:
DIGITAL
DEC

POP
DECUS

UNIBUS
DECTAPE

MASSBUS

CIMLAAD M_=11
TABLE

L6~
47~

TEST

MACRO M1113

1
1

USER DOCUMENTATION

PROGRAM HEADER AND TABLES

MISCELLANEOUS
HARDWARD TEST

23-0(T-80 09:11

PAGE 2
SEQ 0002

CONTENTS

LOGIC

CODING SECTION
SECTION

MACRO M1113

TEST

23-0C7-80 09:11
TABLE

PAGE 3

CONTENTS

NOAWNES WD 2O

OPERATING INSTRUCTIONS

[V}

ERROR INFORMATION

PERFORMANCE

(]

DEVICE

—

SYSTEM REQUIREMENTS

S¥ANDARDS

DIAGNOSTIC HIERARCHY PREREQUISITES
COMMANDS
SWITCHES

FLAGS
HARDWARE

.
QUESTIONS

SOF TWARE QUESTIONS
EXTENDED P-TABLE DIALOGUE

[

QUICK

TEST

[NFORMATION

PRCGRAM ABSTRACT

A\ ¥

OO
O

SO
AN

RELATED DOCUMENTS AND STANDARDS

SUPFUN.C
XXDPPLUS.DOC

BLISS LANGUAGE GUIDE

BL1SS=16 USER'S GUIDE

~no

SUPINT .MEN

£~

SUPPRGC.DOC

1.3

1.4

DIAGNOSTIC HIERARCY PREQEQUISITES

!
i

FORTH

CIMLAAD ML-11 LOGIC
USER DOCUMENTATION

TEST

MACRO M1113

23-0(T-80 09:11

PAGE 4-1

SEQ 0005

IT WILL BE ASSUMED THAT PRIOR TO THE RUNNING OF THIS DIAGNOSTIC
THAT
APPROPRIATE
(PU,
MAIN MEMORY AND RH CONTROLLER DIAGNOSTICS HAVE

ALL

BEEN SUCTESSFULLY RUN.

THIS DIAGNOSTIC WILL HOWEVER PERFORM MINIMAL RH TESTS
TO ENSURE
ITS
EX#STANCE
AND BASIC
FUNCTIONALITY BEFORE LOGIC TESTS ARE ALLOWED T0
UN.

2.0

OPERATING IMSTRUCTIONS:

THIS SECTION CONTAINS A BRIEF DESCRIPTION Of THE RUNTIME SERVICES.
FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL ((CHQUS).
2.1

COMMANDS

THERE ARE FLEVEN LEGAL COMMANDS FOR THE DIAGNCSTIC RUNTIME SERVICES
(SUPERVISOR).
THIS SECTION LISTS THE COMMANDS AND GIVES A VERY

BRIEF DESCRIPTION OF THEM.

THE XXDP+ USER'S MANUAL HAS MORE DETAILS.

COMMAND

EFFECT

START
RESTART
CONTINUE

START THE DIAGNOSTIC FROM AN INITIAL STATE
START THE DIAGNOSTIC WITHOUT INITIALIZING
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER “()

EXIT
ADD

RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY.)
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE
CONSIDERED TO BE ACTIVE AT SiART TIME
DEACTIVATE A UNTT
PRINT STATISTICAL INFORMATION (iF IMPLEMENTED
BY THE DIAGNOSTIC - SECTION 4.0)
TYPE A LIST OF ALL DEVICE INFORMATION
TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3)
CLEAR ALL FLAGS (SEE SECTION 2.3)

PROCEED

DROP
PRINT

DISPLAY

FLAGS
IFLAGS

CONTINUE FROM AN ERROR HALT

A COMMAND (AN BE RECOGNIZED BY THE FIRST THREE CHARACTERS.

YOU MAY, FOR EXAMPLE, TYPE "'STA'* INSTEAD OF ''START",

2.2

SWITCHES

THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION.
THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS.

ALL OF

THE LEGAL

SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH.

IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY '‘DDDDD"'.
SWITCH

EFFECT

/TESTS:LIST

EXECUTE CNLY THOSE TESTS SPECIFIED IN
THE LIST.
LIST IS A STRING OF TEST

/PASS:DDDDD
/FLAGS :FLGS

NUMBERS, FOR EXAMPLE = /TESTS:1:5:7-10,
THIS LIST WILL CAUSE TESTS 1,5,7,8,9,10 10
ALL OTHER TESTS WILL NOT BE RUN,
BE RUN.
EXECUTE DDDDD PASSES (DDDDD = 1 TO 64000)
SET SPECIFiED FLAGS.
FLAGS ARE DESCRIBED
IN SECTION 2.3.

CIMLAAQ ML-11

LOGIC

USER DOCUMENTATION

TEST

MACRO M1113

23-0(T-80 09:11

PAGE 4-2

/EQP:DDDDD

REPORT END OF

JUNITS:LIST

TEST/ADD/DROP ONLY

1
SEQ 0006

PASS MESSAGE

DDDDD PASSES ONLY.

AFTER EVERY

(DDDDD = 1

TO 6400 0)
SPECIFI ED
IN THE LIST.
LIST EXAMPLE - /UNITS: 0 5: 10-12
USE UNITS 0,5,10,11,12 (UNIT NUMBERS = 0-63)
THOSE UNITS

SWITCH JSAGE:

EXAMPLE OF

START/TESTS:1-5/PASS:1000/E0P:100
THE

EFFECT OF

THIS COMMAND WILL BE:

TESTS 1

THRQUGH 5 WILL BE

EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3)
PASS MESSAGES WILL BE

PRINTED AFTER EACH

THE END OF

100 PASSES ONLY.

SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS.
FOR EXAMPLE, TYPE ''/TES:1-5'" INSTEAD OF "'/TESTS:1-5'",

BELOW IS A TABLE
COMMAND.

START

RESTART
CONTINUE
PROCEED

YOU MAY,

THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EA(CH

TESTS

PASS

FLAGS

X
X

EOP

UNITS

X
X
X

DROP
ADD

X
X

PRINT
DISPLAY
FLAGS

IFLAGS
EXIT

2.3

FLAGS

FLAGS ARE USED

TO SET UP CERTAIN OPERATIONAL PARAMETERS

SUCH AS

LOOPING ON ERROR.
ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH.
FLAGS

ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE
FLAG SWITCH.
THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR
ALL FLAGS.
WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS,
NO COMMANDS AFFECT THE STATE OF THE FLAGS;
THEY REMAIN SET OR

CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH.
FLAG

EFFECT

HOF

HALT ON
RUNTIME
LOOP ON
INHIBIT

LOE
[ER*
IBR*

IXR+
PRI

ERROR - CONTROL IS RETLRNED TO
SERVICES COMMAND MODE
ERROR
ALL ERROR REPORTS

INHIBIT ALL ERROR REPORTS EXCEPT

FIRST LEVEL
(FIRST LEVEL CONTAINS
ERROR TYPE, NUMBER, PC, TEST AND UNIT)

INHIBIT EXTENDED ERROR REPORTS (THOSE

CALLED BY PRINTX MACRO'S)
DIRECT MESSAGES TO LINE PRINTER

CIMLAAQ ML-11 LOGIC

USER DOCUMENTATION

TEST

MACRO M1113

23-0(T-80 09:11

PNT

PAGE 4-3

PRINT TEST NUMBER AS TEST EXECUTES

8Ot
JAM
ISR

"BELL'' ON ERROR
UNATTENDED MODE (NO MANUAL INTERVENTION)
INHIBIT STATISTICAL REPORTS (DOES NOT

APPLY 10 DIAGNOSTICS WHICH DO NOT SUPPORT
STATISTICAL REPORTING)

IOR

INHIBIT PROGRAM DROPPING OF UNITS

ADR

EXECUTE AUTODROP CODE

LOOP ON TEST
EXECUTE EVALUATION (ON DIAGNOSTICS WHICH

LoT
EvL

HAVE. EVALUATION SUPPORT)

*ERROR MESSAGES ARE DESCRIBED IN SECTION 3.1
SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS.
YOU MAY
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH.
FOR EXAMPLE,
TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS
AND TYPE A "BELL'' ON ERROR, YOU MAY USE THE FOLLOWING STRING:
/FLAGS:LOE:IER:BOE

2.4

YARDWARE QUFSTIONS

WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT

THE USER FOR HARDWARE INFORMATION BY TYPING ''CHANGE HW (L) 2"
YOU MUST ANSWER ''Y'' AFTER A START COMMAND UNLESS THE HARDWARE

INFORMATION HAS BEEN "‘PRELOADED'' USING THE SETUP UTILITY (SEE

CHAPTER 6 OF THE XXDP+ USER'S MANUAL).
WHEN YOU ANSWER THIS
QUESTION WITH A “'v"', THE RUNTIME SERVICES WILL ASK FOR THE NUMBER
OF UNITS (IN DECIMAL).
VYOU WILL THEN BE ASKED THE FOLLOWING
QUESTIONS FOR EACH UNIT,
PARAMETER CODING CALLS

GPRMA

MSGH1,0,0,0,177777,YES

:RH ADDRESS

GPRMD
GPRMD
GPRML
GPRMD
GPRML

MSGH3.4.0.777.0.777,YES
MSGH&, 6.D.77,1,16..YES
MSGHS.10,1.YES
MSGH6.12.0.7.0,7.YES
MSGH7.14.1.YES

*RH VECTOR ADDRESS
'NUMBER FO ARRAYS
:DRIVE OPTIONS
*DRIVE NUNBER
"PARITY DISABLED

GPRMD

MSGH2.?2.0.7? 11,70, YES

‘RH TYPE

PARAMETER CODING MESSAGES

MSGH1:

MSGH2:
MSGH3:
MSGH4:
MSGHS:
MSGH6:
MSGH?:

.ASCIZ

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
,ASCIZ

SAMPLE DIALOGE

/RH ADDRESS?/

/IS RH AN °'70' OR '117/
/RH VECTOR ADDRESS?/
/NUMBER OF ARRAY MODULES?/
/1S DRIVE OPTION AN ML11A?/
/ML-11 DRIVE NUMBER?/
/1S PARITY DISABLED?/

SEQ 0007

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

DR> STA

23-0CT-80 09:11

PAGE 4-4

Sea 0008

<(CR>

# UNITS <D>

<(R>

2?2

CHANGE HW <L>

<(R>

72 1

UNIT O
RH ADDRESS <0> 176400

IS RH AN '70' OR '11' <>

<(R>

RH VECTOR ADDRESS <0>
204
7
<(R>
16
? <D>
NUMBER OF ARRAYS MODULES

72
¥
<(R>
<(R>

IS DRIVE OPTION AN MLI1TA ?2 <>
7?7
0
ML-11 DRIVE NUMBER ? <0>
1S PARITY DISABLED ? <L>
N
7

<(R>

SOFTWARE QUESTIONS

2.5

AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART
OR CONTINUE COMMAND, THE RUNTIME SERVICES WILL ASK FOR SOF TWARE
PARAMETERS.
THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC

OPERATION MODES.
YOU WILL BE PROMPTED BY ''CHANGE SW (L) ?"
If YOU WISH TO CHANGE ANY PARAMETERS, ANSWER BY TYPING

"'vy'*.
THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED
IN THE NEXT PARAGRAPH(S).

PARAMETER CODING CALLS

GPRML

MSGS1,0,1,NO

;PRINT THE DRIVE SERIAL NUMBER

PARAMETER CODING MESSAGES

MSG1:

.ASCIZ

/PRINT SERIAL NO.?/

SAMPLE DJALOGE
PRINT SERIAL NO.

2.6

N ?2

<(R>

EXTENDED P-TABLE DIALOGUE

WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES
THE SIMPLEST
IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST.
WAY TO BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH
UNIT TO BE TESTED.
IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS
A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION
DEVICE WITH SEVERAL LINES, THIS BECOMES TEDIOUS SINCE MOST Of
THE

ANSWERS ARE REPETITIOUS.

TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING
SUPPOSE THIS DEVICE CONSISTS Of
A FICTIONAL DEVICE, THE XY11.
A CONTROL MODULE WITH EJGHT UNITS (SUB-DEVICES) ATTACHED T10 IT.

THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS O THROUGH 7.

THERE

CIMLAAD ML-11 LOGIC TEST
USER DOCUMENTATION

MACRO M1113

23-0CT-80 09:11

1
J
PAGE &=-5

IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE

Q-FACTOR.
THIS Q-FACTOR MAY BE Q OR 1.
BELOW IS5 A SIMPLE WAY
T0 BUILD A TABLE FOR ONE XY11 WITH EIGHT UNITS.
¥ UNITS (D)

B8<(R>

UNIT 1
160000<CR>
(SR ADDRESS (0) ?
Q<R
SUB-DEVICE # (0) ?
Q-FACTOR

(0) 0 ?

1<CR>

UNIT 2
160000<CR>
(SR ADDRESS (0) ?
1<(R>
7
(0)
#
E
SUB-DEVIC
Q-FACTOR

(0)

0<CR>

UNIT 3
160000<CR>
CSR ADDRESS (0) ?
2<(R>
?
SUB-DEVICE # (0)
Q-FACTOR

(0)

0 ?

<(CR>

UNIT &

160000<CR>
(SR ADDRESS (0) ?
3<(R>
SUB-DEVICE # (0) ?

Q-FACTOR

(0) 0 ?

<(CR>

UNIT S
160000<CR>
CSR ADDRESS (0) ?
4<(R>
SUB-DEVICE # (0) ?

Q-FACTOR

(0)

0 7

<(CR>

UNIT 6
CSP ADDRESS (0)

160000<CR>
?
S<(R>
SUB-DEVICE # (0) ?

Q-FACTOR (0)

0 ?

<CR»

UNIT 7
160000<CR>
(SR ADDRESS (0) ?
6<(R>
?
(0)
#
SUB-DEVICE
Q-FACTOR (0) 0 ?

1<(CR>

UNIT 8
(SR ADDRESS (0)

160000<CR>
7<(CR>
SUB-DEVICE # (0) ?

Q-FACTOR

(0)

<(CR>

NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTGR CHANGES WHEN A
NON-DEFAULT RESPONSE IS GIVEN.
BE CAREFUL WHEN SPECIFYING
MULTIPLE UNITS!

AS YOU CAN SEE FROM THE ABOVE EXAMPLE, THE HARDWARE PARAMETERS
THE PROCEDURE SHOWN 15
DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT.
NOT VERY EFFICIENT.

THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECI/ ICATI] ONS HOWEVER.

%E:;SR?UILD THE SAME TABLE USING THE MULTIPLE SPEC IFICATION

SEQ 0009

CIMLAAQ ML-11 LOGIC TEST
USER DOCUMENTATION

MACRO Mi13

23-0CT-80 09:11

¥ UNITS (D) 2

PAGE 4-6

SEQ 0010

B<CR>

UNIT 1

160000<CR>
(SR ADDRESS (0) ?
0,1<CR>
?
(0)
SUB-DEVICE #

Q-FACTOR (0) 0 2

1,0<CR>

UNIT 3
160000<CR>
CSR ADDRESS (0) ?
2-5<(R>
SUB-DEVICE # (D) ?

Q-FACTOR

C ?

(0)

OQ<CR>

UNIT 7
160000<CR>
(SR ADDRESS (0) ?
6,7<(R>
SUB-DEVICE # (0) ?

Q-FACTOR (0) 0 ?

AS YOU CAN SEE

1<(CR>

IN THE ABOVE DIALOGUE,

THE RUNTIME SERVICES WILL

BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY
ONE PASS THROUGH THE QUESTIONS.
IN THE FIRST PASS, TWO ENTRIES
ARE BUILT SINCE TWO SUB=-DEVICES AND Q-FACTORS WERE SPECIFIED.

THE

SERVICES ASSUME THAT THE CSR ADDRESS 1S 160000 FOR BOTH SINCE IT
WAS SPECIFIED ONLY ONCE.
IN THE SECOND PASS, FOUR ENTRIES WERE
BUILT.
THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED.
THE
“'='* CONSTRUCT TEILS THE RUNTIME SERVICES TO INCREMENT THE DATA
FROM THE FIRST NUMBER TO THE SECOND.

IN THIS CASE, SUB-DEVICES

2, 3, 4 AND S WERE SPECIFIED.
(IF THE SUB-DEVICE WERE SPECIFIED
BY ADDRESSES, THE INCREMENT WOULD BE BY 2 SINCE ADDRESSES MUST
BE ON AN EVEN BOUNDARY.)
THE CSR ADDRESSES AND Q-FACTORS FOR
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND O RESPECTIVELY
SINCE THEY WERE ONLY SPECIFIED ONCE.
THE LAST TWG UNiTS ARF
SPECIFIED IN THE THIRD PASS.

THE WHOLE PROCESS (OULD HAVE BEEN ACCOMPLISHED IN NNE PASS AS
SHOWN BELOW.

# UNITS (L)

B<(R>

UNIT 1

160000<CR>
(SR ADDRESS (0) ?
SUB-DEVICE # (0) ? 0-7<CR>

Q-FACTOR (0) 0 ?

0,1,0,,..,1,1<CR>

AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING
A NULL FIELD) TELL THE RUNTIME SERVICFS TO REPEAT THE LAST REPLY.
2.7 QUiCK START-UP PROCEDURE

(XXDP+)

TO START-UP THIS PROGRAM:
1.

BOOT XXDP+

2. GIVE THE DATE AND ANSWER THE LSI AND SOHZ (IF THERE
IS A CLOCK) QUESTIONS

3. TYPE 'R NAME'', WHERE NAME IS THE NAME OF THE BIN OR BIC

CIMLAAD ML-11 LOGIC

USER DOCUMENTATION

TEST

MACRO M1113
FILE

L1
PAGE 4-7

23-0(T-80 09:11

SEQ 0011

FOR THIS PROGRAM

TYPE "'START"

ANSWER THE ''CHANGE HW'' QUESTION WITH "'v''

ANSWER ALL

THE HARDWARE QUESTIONS

ANSWER THE

"'CHANGE

SW'' QUESTION WITH "N

WHEN YOU FOLLOW THIS PROCEDURE

YOU WILL BE

DEFAULTS FOR FLAGS AND SOF TWARE PARAMETERS.
ARE DESCRIBED IN SECTIONS 2.3 AND 2.5.

USING ONLY

THESE

THE

DEFAULTS

3.0 ERROR INFORMATION
3.1

TYPES OF ERROR MESSAGES

THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY
A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED.
GENERAL ERROR MESSAGES

ARE ALWAYS PRINTED UNLESS THE ''IER'' FLAG
THE

GENERAL

NAME

ERROR MESSAGE

TYPE

IS OF

NUMBER

ERROR MESSAGE

.WHERE.

THE

ON UNIT

NAME = DJAGNOSTIC NAME

TYPE = ERROR TYPE (SYS
NUMBER = ERROR NUMBER

FORM:

1S SET

NUMBER

FATAL,

DEV

(SECTION 2.3).

TST NUMBER PC:XXXXXX

FATAL,

UNIT NUMBER = 0 = N (N IS LAST UNIT

HARD

SOFT)

IN PTABLE)

TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL
INFORMATION ABOUT THE ERROR.
THESE ARE ALWAYS PRINTED UNLESS
THE "'IER'' OR "'IBR'' FLAGS ARE SET (SECTION 2.3).
THESE MESSAGES
ARE

“

PRINTED AFTER

THE

ASSOCIATED GENERAL MESSAGE.

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA.
THESE ARE ALWAYS
PRINTED UNLESS THE °'IER'’, "IBR'' OR ''IXR'' FLAGS ARE SET (SECTION 2.3).
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES.

3.2 SPECIFIC ERROR MESSAGES
ERROR MESSAGES ARE HANDLED VIA A DICTIONARY STRUCTURE.
WORDS AND PHRASES ARE MULTIPLY REFERENCED USING ONLY
ONE COPY OF THE WORD OR PHRASE IN CORE.
TH1S PERMITS EXTENSIVE ERROR MESSAGE

STORAGE REQUIREMENTS.
THE

FOLLOWING DEMONSTRATES

PRINTING AT MINIMAL

TYPICAL ERROR MESSAGES:

ML11 DVC FTL ERR 00077 ON UNIT 07 TST 027 SuB 002 PC: 050432

CIMLAAOD ML-11 LOGIC
USER DOCUMENTATION
~

TEST
.

MACRO M1113
ASYNCHRONGUS MODULE

FAILURE

EXCESSIVE DATA ERRORS DURING
ML11

DVC FTL ERR

23-0(T-80 09:11

PAGE 4-8

INITIAL ARR RD_WRT

00112 ON UNIT 03 TST 037 SuB 000 PC:

ASYNCHRONOUS MODULE FAILURE
ARRAY ADRS MULTIPLEXER FAILURE

FAILED AT DSA:

3.2.1

000000

ERROR NUMBER DEFINITION

FRROR NO.

FAILING LOGIC
DRIVE

DID NOT

WITHIN 1.5 US

RESPOND

DSA REG READ/WRITE ERROR

DURING DRIVE SEL TEST

UNIQUE DRIVE SELECTION

M. REGISTER READ WRITE

ML REGISTER READ WRITE
ONES/ZEROES ERROR

ML REGISTER
ERROR

CONTROL BUS BAD PARITY
NOT DETECTED

ERROR

ONES/ZEROES ERROR

INITIALIZATION

CONTROL BUS GOOD PARITY

NOT

DETECTED.

CONTROL BUS BAD PARITY
GENERATED.

ARRAY SIZING LOGIC ERROR

SEQ 0012

GO BIT NOT CLR AFTER

NOOP FUNCTION

ILF BIT SET DURING NOOP
FUNCTION

OP1 BIT SET DURING NOOP

GO BIT NOT SET DURING WRITC
CHECK FUNCTION

DRY BIT NOT CLEAR DURING
WRITE CHECK FUNCTION

FUNCTION

056466

CIMLAAD ML-11 LOGIC
USER DOCUMENTATION

TEST

MACRO M1113

23-0CT-80 99:11

1
N
PAGE 4-9

SEQ 0013
16

DRY BIT SET WHEN GO SET
DURING WRITE CHECK FUNCTION

ILF SET DURING WRITE
CHECK FUNCTION

OP] BIT SET DURING WRITE
CHECK FUNCTION

GO BIT NOT CLEAR AFTER WRITE
CHECK FUNCTION 'ASYNC FAILURE'

GO BIT NOT CLEAR AFTER WRITE
CHECK FUNCTION 'SYNC FUNCTION'

DRY BIT NOYT SET AFTER WRITE
CHECK FUNCTION
GO BIT NOT CLEAR AFTER WRITE
CHECK FUNCTION 'ASYNC FAILURE'

GO BIT NOT CLEAR AFTER WRITE
CHECK FUNCTION

CO BIT NOT

FUNCTION

'SYNC FAILURE®

SET DURING WRITE

DRY BIT CLEAR WITH GO CLEAR
DURING WRITE FUNCTION,

DRY BIT SET WITH GO BIT
DURING WRITE FUNCTION.

ILF 8IT SET DURING WRITE

FUNCTION

OP!

GO BIT NOT CLEAR AFTER WKITE
FUNCTION "ASYNC FAILURE®

GO BIT NOT CLEAR AFTER WRITE
FUNCTION 'SYNC FAILURE'

DRY BIT NOT SET AFTER WRITE

GO BIT NOT CLEAR AFTER WRITE
FUNCTION "ASYNC FAILURE'

GO BIT NOT

BIT

SET DURING WRITE FUNCTION

FUNCTION.

SET DURING READ

CIMLAAOD ML-11 LOGIC
USER DOCUMENTATICN

TEST

MACRO M1113

23-0CT-80 09:11

PAGE &4-10

DRY BIT SET WHILE GO CLEAR
DURING READ FUNCTION.

DRY BIT SET WHILE GO SET
DURING READ FUNCTION.

ILF BIT SET DURING READ

FUNCTION.

OP1 BIT SEY DURING READ

GO BIT NOT CLEAR AFTER READ
FUNCTION 'ASYNC FAILURE'

GO BIT NOT CLEAR AFTER READ
FUNCTION 'SYNC FAILURE'

“

DRY BIT NOT SET AFTER READ

GO BIT NOT CLEAK AFTER READ
FUNCTION "ASYNC FAILURE’

GO BIT NOT CLEAR AFTER READ
FUNCTION 'SYNC FAILURE'

GO BIT NOT CLEAR AFTER
CLEAR FUNCTION

DRY BIT SET WHILE GO SET
DURING CLEAR FUNCTION

DRY BIT NOT SET AFTER
CLEAR FUNCTION.

ILF BIT SET DURING CLEAR
FUNCTION

OF! BIT SET DURING CLEAR

COMPOSITE ERROR BIT NOT
SET AFTER MLER BITS SET

ATA BIT SETTING ERROR

ATTN BIT SETTING ERROR

ATTN BIT NOT CLEARED BY
MLCS1 NOOP FUNCTION

ATA BIT NOY CLEAR AFTER
WRITING A ONE TO [T

WRITING A ONE TO OTHER
DRIVES ATA BIT CLEARED

FUNCTION

SEQ 0014

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

23-0(7-80 09:11

¢
2
PAGE 4-11

THIS DRIVES ATA BIT

GO BIT NOT CLEARED AFTER
SEARCH FUNCTION

ILF BIT

FUNCTION

SET DURING SEARCH

NO-OP FUNCTION DID NOT
g%gAR THE ATA BIT AFTER BEING

ATA BIT NOT SET AFTER
SEARCH FUNCTION

OP]1 BIT SET DURING SEARCH

ATA BIT SET AFTER SEARCH
AT NOT PRESENT ARRAYS.

.62

GO BIT NOT CLEAR AFTER

FUNCTION AT PRESENT ARRAYS

READ=-IN-PRESET FUNCTION

ILF BIT SET DURING

READ-IN-SET FUNCTION

OPI BIT SET DURING
READ-IN-PRESET FUNCTION

UV BIT NOT SET AFTER

READ=IN-PRESET

GO BIT NOT CLEARED
AFTER ILLEGAL FUNCTION

ILLEGAL FUNCTION NOT
DETECTED

OP] BIT SET WITH ILLEGAL
FUNCTION°

RMR BIT NOT SET AFTER
MODIFYING REG WITH FUNCTION
IN PROGRESS.

MEMORY ARRAY PROM

I8!

NIBBLE OFF

UNS BIT SET WITH GOOD
UV DATA

UNS BIT SET WITH GOOD

CHECK SUM ERRORS DURING
INITIAL PRCM READS
SET COUNTS

GREATER THAN 14 DETECTED.

SEQ 0015

CIMLAAQ ML-17 LOGIC
USER DOCUMENTATION

TEST

MACRO 11113

23-0CT-80 09:11

0
2
PAGE 4-12

UV DATA
74

UNS BIT NOT SET WlTH BAD
UV DATA

UNS B8IT NOT SET WITH BAD
UV DATA

MEMORY

BAD NIBBLE THRESHOLD Of

ARRAY PROM ROW/

COL DATA ORING ERROR

36 EXCEEDED DURING

%Eé}IAL ARRAY READ/WRITE

UNIQUE PROM SELECTION
ERROR
FAILURE

TO FIND GOOD ROW

DURING READ WRITE ARRAY

WITH PROM DATA

MEMORY ARRAY TIMING AND
CONTROL FAILURE TO REFRESH
MEMORY

DATA ERRORS DETECTED AT
LAST BLOCK DURING ADDRESSES
(TEST ABORTED)
COUNTER TEST.

ADDRESS COUNTER ERROR

UNIQUE MEMORY ARRAY

ALL BITS IN ALL NIBBLES
TESTED DURING SEQUENCER

MODULE

SELECTION FAILURE

EXISTENCE TEST WERE
ERROR (FAIL UNIT)

INTERMEDIATE FAILURE.
SOME
BITS IN NIBBLES TESTED WERE
IN ERROR (CONTINUE TESTING)

SYNC BUS DATA BIT
WRITE PATH CONTINUITY
FAILURE

SYNC BUS DATA BIT
READ PATH CONTINUITY
FAILURE.

RAM BUS ADRS COUNTER
FAILURE TO LOAD/UNLOAD
SKIF RAM DURING WRITE
FUNCTION

SEQ 0016

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

23-0CT-80 09:11

3
4
PAGE 4-13

RAM BUS ADRS COUNTER
FAILURE TO LOAD/UNLOAC

SKIP RAM DURING READ

FUNCTION,

SYNC DATA BUS WRITE PATH
UNIQUE DATA BIT
FAILURE (ALL ONES NIBBLE
PATTERN)

SYNC DATA BUS WRITE
PATH UNIQUE DATA BIT
CAJLURE (SHIFTED BIiT

NIBBLE PATTERN)
92

SYNC DATA BUS WRITE

PATH UNIQUE DATA BIT
FAILURE (ALL ONES NIBBLE
PATTERN)

SYNC DATA BUS READ PATH
UNIQUE DATA BIT FAILURE

NIBBLE OFF SET
COUNTERS FAILURE

CS1

FUNCTION ABORT

'A'

ERROR.

(S1

FUNCTION ABORT

'‘B'

ERROR

FAILURE

DURING

CLASS

DURING CLASS

LBT BIT SET BEFORE
A LAST BLOCK.TRANSFER

DSA REGISTER INCREMENT

FAILURE DURING NON LAST

BLOCK TRANSFERS.
99

LBT BIT NOT CLEAR

100

LBT BIT NOT SET

101

DSA REGISTER
INCREMENT FAILURE

AFTER*LOADING DSA REG
AFTER A LAST BLOCK
TRANSFER

AFTER A LAST BLOCK
TRANSFER
102

TAE BIT NOT SET AT
INVALID SECTOR ADDRESSES

SEQ 0017

CIMLAAD ML=-11 LOGIC

USER DOCUMENTATION

TEST

MACRO M1113

23-0CT-80 09:11

103

AOE BIT NOT SET
AFTER ADDRESS OVERFLOW

104

SC BIT NOT AFTER
(S1 FUNCTION ADORT

105

GOOD DATA BUS

106

107

PARITY NOT

PAGE &4-14

DETECTED

GOOD DATA BUS

PARITY NOT GENERATED

UNS BIT SET AFTER
WRITING TO A SECTOR
DURING PROM DATA
TEST

108

UNS BIT NOT SET WITH
BAD UV DATA

109

WCE BIT SET DURING
MBUS WRITE/READ
FUNCTION TROUBLE SHOOTING

LOOP TEIT

110

UNIQUE REGISTER
SELECTION TEST FAILURE

FAILURE TO FIND GOOD
MOS RAM ROW DURING

ARRAY ADRS Mux TEST
(INTERMEDIATE DIAG MSG)

112

113

114

UNIQUE ARRAY MODULE
ROW/COL
FAILURE

DRIVE

ADDRESSING

TYPE REGISTER VALUE

WAS NOT CORRECT
TRE

BIT

SET UNEXPECTEDLY

DURING A WRITE CHECK TRANSFER
(INTERMEDIATE

115

DIAG ERROR)

TRE BIT SET UNEXPECTEDLY

DURING A WRITE TRANSFER

(INTERMEDIATE DIAG ERROR)

116

TRE BIT SET UNEXPECTEDLY

DURING A READ TRANSFER

(INTERMEDIATE DIAG ERROR)

4.0 PERFORMANCE

TRE BIT DID &0T SET AFTER
A REGISTER MODIFICATION ERROR
(EXCEPTION WAS NOT ASSERTED)
AND PROGRESS REPORTS

SEQ 0018

MACRO M1113

USER DOCUMENTATION

23-0(T-80 09:11

6 2
PAGE 4-15

AT THE END OF EACH PASS, THE PASS COUNT

SEQ 0019

IS GIVEN ALONG WITh THE

TOTAL NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED.
THE "'EOP'' SWITCH CAN BE USED TO CONTROL HOW OFTEN THE END

OF PASS MESSAGE IS PRINTED.
5.0 DEVICE
HARDWARE

INFORMATION TABLES

DEFAULT

LWORD
.WORD
.WORD
.WORD

176400
70
204
16,

.WORD

MORD

.WORD

SECTION 2.2 DESCRIBES SWITCHES.

PTABLE

sRH ADDRESS
;RH TYPE
:RH VECTOR ADDRESS
;NUMBER OF ARRAY MODULES

;1S DRVE OPTION ML11A,

;ML-11 DRIVE NUMBER

;1S PARITY DISABLED,

1=16K,

1=YES,

0=64K

0=NO

SOF TWARE DEFAULT TABLE

PRSN:

.WORD

;PRINT SERIAL NUMBER, 1=YES,

6.0 TEST SUMMARIES
TST1.

DRIVE

PRESENT

TEST TO SEE
TST2.

THE DRIVE UNDER TEST EXIST.

DRIVE SELECTION

SEE IF SELECTING OTHER DRIVES ON RH EFFECIS DRIVE UNDER TEST.
TST3.

READ WRITE REGISTER ONE'S ZERO'S TEST

TEST REGISTERS READ WRITE CAPABILITY AND UNIQUENESS
TST4&.

READ WRITE REGISTER SHIFTING ONE'S AND ZEROES

TEST REGISTERS FOR UNIQUE DATA BITS.
TSTH.

INITIALIZATION

TEST REGISTERS FOR CORRECT
TST6.

INIT DATA,

TEST FOR UNIQUE REGISTER SELECTION
TST7.

PRINT DRIVE

SERIAL NUMBER

PRINT THE CONTENTS OF
ANSWERED

TST8.

'YES'.

(-BUS PARITY

MLSN

THE

SOFTWARE

QUESTION

WAS

0=NO

CIMLAAD ML-11 LOGIC TEST

CIMLAAD ML=-11 LOGIC

USER DOCUMENTATION

TEST

MACRO M1113
TEST IF DRIVE
GOOD PAR]TY,

TST9.

CAN DETECT

BAD PARITY

Sea 0020

(=BUS

AND

GENERATE

MEMORY SIZING

SEE

IF MEMORY SIZING LOGIC DETECTS AND RECORD CORRECT

ARRAYS PRESENT.

TST10.

NO-OP FUNCTION

SEE
TST11.,

TST12.

READ

TEST

SEE

¥S.

TST19.

THE DRIVE

TO HANG.

A READ FUNCTION CAUSES THE DRIVE

TO HANG.

FUNCTION

A CLEAR FUNCTION CAN BE EXECUTED.

EACH

FRROR BIT

TEST

INDIVIDUAL

ERROR BIT

IN MLER

CAUSES

(OMPOSITE

THE

ATA BIT

CAN BE

SET

AND

CLEARED.

SEARCH FUNCTION

SEE
TST18.

TO HANG.

ATA BIT

TEST

TST17.

CHECK FUNCTION CAUSES THE DRIVE

FUNCTION

COMPOSITE

Essoéf
TST16.

EXECUTED.

FUNCTION

A WRITE FUNCTION CAUSES

CLEAR

SEE
TST15.

NUMBER

READ FUNCTION

SEE
TST14.

CHECK

A WRITE

WRITE

SEE
TST13.

A NO-OP FUNCTION CAN BE

WRITE

SEE

A SEARCH FUNCTION CAN BE EXECUTED ON ALL PRESENT ARRAIN PRESET

A READ

ILLEGAL

IN PRESET FUNCTION SETS VOL V H.

FUNCTION

IF WRITING AN ILLEGAL FUNCTION TO CS1

THAT A TRANSFER

TST20.

H
2
PAGE &-16

23-0(T-80 09:11

IS NOT

INITIATED.

CAN BE DETECTED AND

TEST TO SEE IF WRITING
TO SPECIFIC
REGISTERS
ARE
ABORYE?
IS ACTIVE.. SEE IF WRITING TO NON-SPECIF
THE! DRIVE
WHILE
REGISTERS ARE

ALLOWED WHILE

DRIVE

IS ACTIVE.

CIMLAAQ ML=-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

TST21.

23-0CT-80 09:1'

PAGE &-17

SEQ 0021

INITIAL PROM TEST

TEST PROMS FOR EXISTENCE.

TST22. PROM 'OR'
TEST

FUNCTION TEST

THE PROM DATA ORING FUNC

TST23. UV ERROR TEST

EESSRQBILITY OF UV ERR PROMS TO DETECT ALL POSSIBLE CHECK SUM
TST24.

TEST

INITIAL ARRAY

TEST ARRAY TIMING AND CONTROLFOR EXISTENCE.
1S125.

PROM SELECTION TEST

TEST

FOR UNIQUE

PROM SELECTION.

TST26. READ WwRITE MEMORY ARRAY WITH PROM DATA (DIAG MODE)
SEE

IF MEMORY CAN BE WRITTEN AND READ.

ALSO FIND ERROR FREE BLOCK OF MEMORY FOR FUTURE TESTS.
TST27.

REFRESH TIMING

TEST
TST28.

TO SEE

IF MEMORY CAN BE REFRESHED.

ADDRESS COUNTER

TEST

THE ADDRESS COUNTER FOR ABILITY

POSSIBLE MEMORY ADDRESSES.

TST29.

ARRAY MODULE

SEQUENCER EXISTENCE

TEST TO SEE

TST31.

COUNT

THROUGH

SELECTION

TEST

IF BASIC SEQUENCER TIMING EXISTS.

SYNC DATA BUS CONTINUITY/WRITE PATH

TEST SYNCHRONOUS DATA BUS WRITE PATH FOR CONTINUITY BY

ING WRITING ONE'S AND ZERO'S.

TST32.

ALL

SELECTION

TEST FOR UNIQUE ARRAY MODULE
T5T30.

READ-

SYNC DATA BUS CONTINUITY/READ PATH

TEST SYNCHRONOUS DATA BUS READ PATH FOR CONTINUITY BY READING

WRITING ONE'S AND ZEROES.

TST33. RAM-BUS ADDRESS COUNTER/WRITE PATH

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

23-0CT-30 09:11

J
2
PAGE 4-18

TEST ABILITY OF THE RAM=BUS ADDRESS COUNTERS
THE SKIP DURING WRITE FUNCTIONS.

LOADL/UNLOAD
|

TST34. RAM BUS ADRS COUNTER/READ PATH
TEST ABILITY OF RAM/BUS ADRS COUNTERS TO LOAD/UNLOAD THE
RAM DURING READ FUNCTIONS.
TST35.

SYNC DATA BUS BIT UNIQUENESS/WRITE PATH

TEST SYNCHRONOUS DATA BUS FOR DATA BIT UNIQUENESS BY
SHIFTING PATTERNS OF ONE'S AND ZERO'S TO THE ML,
TST36.

SKIP

WRITING

SYNC DAT BUS BIT UNIQUENESS/READ PATH

TEST SYNCHRONOUS DATA BUS READ PATH FOR DATA

BIT

UNIQUENESS

BY WRITING SHIFTING PATTERNS OF ONES AND ZEROES TO THE
TST37.

ARRAY ADDRESS MuX

TEST FOR UNIQUE ROW AND COLUMN ADDRESSING
TST38. NIBBLE OFFSET

TEST NIBBLE OFFSET COUNTERS TO COUNT TO 14 NIBBLE DATA TO
SHIFTED ON DETECTION OF BAD NIBBLES.
TST39.

(S1

FUNCTION ABORT

SEQ 0022

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

23-0(T-80 09:11

PAGE 5

SEQ 0023

SEE IF A CLASS 'B' ERROR ABORTS A FUNCTION WHILE IN PROGRESS.
SEE IF A CLASS'A' ERROR IS DETECTED BUT FUNCTION
10 COMPLETE.
TST40.

LAST BLOCK

INDICATOR

TEST THE LAST BLOCK INDICATOR BIT FOR NOT SETTING
LAST AND SETTING AND CLRING AT THE LAST BLOCK
TST41.

INVALID ADDRESS

FOR ALL
TST42.

ALLOWED

BELOW

THE

TEST

ILLEGAL DSA ADDRESSES READ THE

[AE BIT

SET.

ADDRESS OVERFLOW

TEST FOR AOE ON TRANSFERS WHICH EXTEND BEYOND THE LAST BLOC(K.
TST43.

SYNC BUS PARITY

TEST FOR BAD PARITY DETECTION AND GOOD PARITY GENERATION.
TST44.,

WRITE READ MEMORY ARRAY

(M-BUS BLOCK MODE)

WRITE READ MEMORY VIA M-BUS BLOCK MODE AT MAX SPEED.
TST4S.

PROM DATA TEST

VERIFY THAT CHECK SUM VALUES FOR ALL PROM LOCATIONS ARE (ORRECT,

CIMLAAD ML-11 LOGIC

TEST

PROGRA? HEADER AND TABLES

35 000000
36
38
39 002000

MACRO M1113

23-0C7-80 09:11

PAGE 7

SEQ 0024

PROGRAM HEADER AND TABLES

.SBTTL

.ENABL

002000

ABS,AMA

‘

000

BGNMOD
MR

;
;

THE PROGRAM HEADER IS THE INTERFACE BETWEEN
THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.

002000

POINTER ALL

002000

HEADER

ML11,A,0,1800.,0

NAMES OF DEVICES SUPPORTED BY THIS PROGRAM
DEVTYP <ML-11>

002122

TEST DESCRIPTION

DESCRIPT <ML-11 LOGIC TEST>

002130

THE GLOBAL ERROR TABLE

(INFORMATION

002152
002152

002154
002156
002160

000000
000000
000000
000000

ERRTBL
:
ERRTYP:
:
ERRNBR:
:
ERRMSG:
ERRBLK::

.WORD
.WORD
.WORD
.WORD

OOO0O

USED IN A CALL TO THE MACRO ''ERROR'")

; THE DISPATCH TABLE CONTAINS THE STAKTING ADDRES OF EACH TEST.

; IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACh TEST.

[« ENT. XV ¥ RV [ SE R

—

d el

il and

b ol

el
i wd = 2 OO

4V |

102

DISPATCH 45

002162
bt

; THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULY VALUES OF
;

THE TEST-DEVICE PARAMETERS.

THE STRUCTURE OF THIS TABLE

; IS IDENTICAL TG THE STRUCTURE OF THE HARDWARE P=TABLES,
; AND [S USED AS A ''TEMPLATE'' FOR BUILDING THE P-TABLES.

CIRLAAQ ML-11 LOGIC

PROGRAM HEADER

TEST

AND TABLES

MACRO M1113

BGNHW

DFPTBL

.WORD
LWORD
.WORD
WORD

176400
70
204
16.

n 2
PAGE 7-1

SEQ 0025

NO NS WN—-O
=20V

Y
S
S
S
S
N
— [

002320
002322
002324
002326

002330
002332
002334

176400
000070
000204
000020

000001
000000
000000

.WORD
WORD
.WORD

002336

0
O

;RH ADDRESS
;RH TYPE
JRH VECTOR ADDRESS
;NUMBER OF ARRAY MODULES

;1S DRVE OPTION ML'1A,
1=16K,
0=64K
;M.-11 DRIVE NUMBER
;1S PARITY DISABLED,
1=YES,
0=NO

ENDHW

»
(V) N

002316

23-0CT-80 09:11

; THE DEFAULT SOF TWARE P-TABLE CONTAINS VARIOUS DATA USED BY THE

144

;
;

PROGRAM AS OPERATIONAL PARAMETERS.
THESE PARAMETERS ARE SET
??MQT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR AT RUN

002336

002340
002342

000000

PRSN:

BGNSW

SFPTBL

WORD

ENDSW

;PRINT SERIAL NUMBER, 1=YES,

0=NJ

CIP_AAQ ML=-11 LOGIC TEST

PROGRAM HEADER
b —b b 2 2
OOO®WOWWPNNNNNNOCOOOrOOOOOO
NN Jr S aE 2T aF 2k aE af 2F aF 2l V] NN NIPNINIMOPIAIOND)
WA 200 OO NN
VNN
OO0 ~NOWD
WNOORONOWNE
NS NN 200NN LW =200V~ o VIO NN

AND TABLES

PAGE 8

SEQ 0026

;

THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
THE

.,
;

MACROS ALLOW THE SUPERVISOR
WITH THE UPERATOR.

INTERPRETED BY THE

SUPERVISOR AS DATA STRUCTURES.

BGNHRD

002344
002354

GPRMA

MSGH1,0,0,0,177777,YES

002400
002412
002420
002432

GPRMD

MSGH&.6.0.77.1,16.,

GPRMD
GPRMD

GPRML

GPRMD
GPRML

002440

MSGM2.2.0.77,11,70.YES
MSGH3.4.0.777,0.777,YES

MSGHS.10,1,YES

MSGP6.12.0.7.0,7.YES
MSGH7.14.1.YES

WS ULNWVNOWO

=AY —

=2 PN

115
040

—

= N

040
040

ENDHRD

—d ALY b O N

002440
002454
002502
002525
002556
002610
002634

THE

TO ESTABLISH COMMUNICATIONS

002342

\ 002366

299

23-0(CT-80 09:11

: MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

— bk
(\) =D )

NN NN
N[ASIASI ST NI ST ST ST NT ST, ST NI SIS AN 1,8
AORNLALALALALALNL
NN NV NIAL AL AL NV AL NI NONI NN NINIAININD [a ] NN AININI

189

MACRO M1113

055
040

MSGH1:
M3GH2:
MSGH3:

.ASCIZ
.ASCIZ
.ASCIZ

/RH ADDRESS?/
/1S RH AN '70' OR '117/
/RH VECTOR ADDRESS?/

MSGHS:
MSGH6:
MSGH7:

.ASCIZ
.ASCIZ
.23&;2

/1S DRIVE OPTION AN ML11A2/
/ML-11 DRIVE NUMBER?/
/1S PARITY DISABLED?/

MSGH4:

.ASCIZ

/NUMSER OF

ARRAY MODULES?/

THE SOF TWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
THE

MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.

002660

BGNSFT

002662

GPRML

002670

ENDSFT

002670

.EVEN

120

122

MSGS1:

ASCIZ
.EVEN

MSGS1,0,1,YES

/PRINT

SERIAL NO.?/

;PRINT DRIVE SERIAL NUMBER?

CIMLAAD ML=-11 LOGIC TEST
PROGRAM HEADER AND TABLES

MACRO M1113

23-0C7-80 09:11

305 002712

328 002720
337 002760

SEQ@ 0027

BGNPROT

177777
177777
177777

-1
=1
-1

311 002720

327 002720

)

;44
; THIS TABLE IS USED BY THE RUNTIME SERVICES
; TM0 PROTECT THE LOAD MEDIA.

300
301
%8%

307 002712
308 002714
308 002716

g8 3
PAGE 8-1

;OFFSET
;OFFSET
;OFFSET

ENDPROT

$SPATCH: :

BLKW
ENDMOD

NTO P-TABLE
NTO P-TABLE
NTO P-TABLE

FOR CSR ADDRESS
FOR MASSBUS ADDRESS
FOR DRIVE NUMBER

cll

HAI

CIMLAAO ML-11 LOG% C TEST

MISCELLANEOUS (COD NG SECTION
1

MACRO M1113

23-0CT-80 09:11

9 ;
10 ;
1M ;
12

13 ;

15
16
17
18
19

;
;
.
;
;

20 ;
21 ;
22
26
27

28
32 004114
33
3¢,
35

&0
41
45

49 004116
004122

004124

0001
0002
0003
0004

0718

0719
0720
0721
0722
0723

0724
0725
726

REQUIRE

S,
%
0,0,
0
B0,
e
e B

TOPS=20 Bliss=16 v2(206)
PA:<NEALE2ML3.BLI.2 (1)

!
E

THE REPORT CODING SECTION CONTAINS THE
"PRINTS'" CALLS THAT GENERATE STATISTICAL REPORTS.

BGNRPT;
RETURN;

ENDRPT;

LRPT:
:

RTS

Routine Size:

PC
1

.
word

; Maximum stack depth per

177772

L$RPT::

000207

JSR
TRAP
RTS

Routine

5ize:

invocation:

words

0716

0 words

0725

PC.LRPT
25
PC

Maximum stack depth per

invocation:

0 words

0727
0728
0729
0730
0731
0732
0733
0734
0735
0736
0737

‘e

!
'
!
;

THE AUTODROP CODE IS EXECUTED [MMEDIATELY AFTER THE INITIALIZE
CODE IF THE ''ADR'' FLAG WAS SET.
THE UNIT(S) UNDER TEST ARE
CHECKED TO SEE IF THEY WILL RESPOND.
THOSE THAT DON'T ARE [MMEDIATELY
DROPPED FROM TESTING.
[ISSUE A ''DODU'" FOR THOSE THAT DON'T RESPOND.

BGNAUTO,;
RETURN;

ENDAUTO;

000207

LAUTO:

RTS

; Routine Size:

004767

177772

LSAUTO::JSR

0726

1 word

; Maximum stack depth per

004130

SEQ 0028

'MACRO.REQ';

;

004126

MODULE ML3 =

;

BEGIN

000207

004767
104425

LSBTTL MISCELLANEOUS CODING SECTION
17-0ct-1980 11:31:46
29-Sep=-1980 10:13:18

6 ;M3
8

PAGE 46

PC.LAUTO

invocation:

0 words

0736

CIMLAAO ML-11 LOGIC TESY

23-0CT-80 09:11
TRAP
RTS

2OV S W N

004136

000207

:
;

Routine Size:
4 words
Maximum stack depth per

T0PS=-20 Bliss=16 v2(206)
PA:<NEALE>ML3.BLI.Z2 (1)

! THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE
E

TO NO LONGER BE

TESTED.

8GNDU;

RETURN;
ENDDU;

LDU:

177772

RTS

0737

Routine Size:
' word
Maximum stack depth per

LSDU::

JSR

TRAP
RTS

0 words

0745

PC,LDU

: Routine Size:
;

invocation:

4 worfs
Maximum stack depth per

1nvocation:

O words

0747

THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BA(K
TC THE

TEST

CYCLE.

17-0ct-1980 11:

000207

'
'

29-Sep-1980 10:
0753
0754
0755
0756

004152

coc

ML3

0748
0749
0750
0751
0752

—

NN =2 NN

0 words

000207

004767
104453
000207

invocation:

17-0ct=1980 11: 31: 46
29-Sep=-1980 10: 13:1 8

;
:

004142
004146
004150

SEQ@ 0029

N —

TR
IETE

=2 OOV

D
D
D
D o
D
D
oD
D e
e
o
e

_.—J—.—.—.—l_.__._.—l—l—._..—l—l-.—‘—l— — el nd

NNV
oo ONNNNNOOOOOOOOOO
VNN UWN—=2O VDWW —=O
D = NN N=OODM

004140

0738

0739
0740
0761
0742
0743
0744
0745
0746

PAGE 46-1

D e

—d

—

D —

AWWNNNNOROPIN
)
b b b
2 2 2 2 OO O [ole]

MISCELLANEOUS CODING SECTION
104461
004134

MACRO M1113

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>ML3.BLI.2 (1)

BGNAU;

RETURN;

ENDAU;

LAU:

RTS

; Routine Size:
;

Maximum stack

0746

word

depth per invocation:

0 words

C 14, LAAQO ML-11 LOGIC TEST
| 1S CELLANEOUS CODING SEC TION

198 004154
199 004160

ANV
NONORN N
PON. =2 = b b b
= OV ~NON
O

200 004162
201

004767
104452

177772

MACRO M1113

23-0CT-80 09:11

LSAU::

000207

.
;

0757

END

0759

ELUDOM

J SR

PC +LAU

TRAP

PAGE 46-2

0755

52
¢

Routine Size:
& words
Maximum stack depth per

)
invocation:

;

Run Time:
Compi

:
311:46

29-Sep=-198 0 1 0: 1 3:18

20 code ¢+ 0 data words

00:01.9

; Elapsed Time: 00:07.1
Memor
12 pages
Used:

;

0 words

17-0ct-198 0 1 1

:ML3

; Size:

SEQ 0030

{a tion (Complete

T0OPS

PA:<

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0(T-80 09:11

0001

MODULE ML4 =

1 ;
12 ;
13 .

0003
0004
0005

0002

require 'BLSMAC.REQ';

21
22
23
26
25
26

;
:
;

1496
1497
1498
1499
1500
1501

;

3 ;

COMMANDS

0012

0007
0008
0009
0010
0011

27
28 ;
29
30 .

PRETTY BLF

'<BLF/NOERROR>

;
;
;
;
;

1502
1503
1504
1505

!<BLF/LOWERCASE_KEY>
!
! REQUIRE
!

!
'
.

}ggg

3 ;
35S .

1509
1510

'DATA
'DATA
‘DATA
'DATA

fIELD_§IZ =4,

'"FIELD SIZ FOR FIELD DECLARATIONS 'WCRD_MAP'

NUM_OF REG = 22,

'MLCS1 FUNCTION (ODES
!

1511
1512

NOOP = 1,
DRV CLR = Xo'11',

40 ;
AN
42 ;

1515
1516
1517

WRT_CHK = Xo'S1°',
write = X0'61",
read = Xo'71',

L3 ;
4 ;
45 ;

4 ;

47 ;
48 ;

49 ;

50
51
52
53
56

.
;
.
;
;

%S :

6 .

57
58 .
59

60 :

RD_IN PRE = Xo'21',
SCARCA = Xo0'31°',

1513
1514

1518
1519
1520

!
'
!

1521

1524

1525
1526
1527
1528
1529

1§§?
1

1532
1533
1534

1535

FRTY US = 40,
TWwo_TH_US - 2000;

!
'
!

BIT OF ONE
PATTERN OF ONES
BIT OF ZERO
PATTERN OF ZEROES

INUMBER OF BLOCKS IN GLOBAL STORAGE ‘ML-REG'

'NOOP FUNCTION
'DRIVE CLEAR FUNCTION

'READ IN PRESET FUNCTION
'SEARCH FUNCTION
'WRITE CHECK FUNCTION
'WRITE FUNCTION
'"READ FUNCTION

DELAY ARGUMENTS

ONE US = 1,

1522
1523

'BLISS INTERFACE MODULE

ONE = 1,
ONES = Xo'177777°',
IERO = 0,
JEROES = 0,

36 ;
37

38 ;
39 ;

)

CONSTANT LITERALS

Literal

1506

%% ;

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BL2MLG.BLI.2 (1)

BEGIN

0006

15
16
17
18
19

20 ;

SEQ 0031

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

14 ;

PAGE 47

.SBTTL HARDWARD TEST SECTION

6 ;M4
g ;
10 ;

F_3

'ONE MICRO SECOND DELAY

'FORTY MICRO SECOND DELAY
'TWO THOUSAND MICRO SECOND DELAY

FIELD DECLARATIONS

ftield

WORD_MAP =
set

REGISTER_ADD = [0, 0, 16, 0],
FORCE_HI"= [1, 0, 16, 0],
FORCETMLO = [2, 0, 16, 0)

DONT_CARE = ($, 0, 16, 0]

'MAPS GLOBAL STCRAGE "ML _REG' INTO REGISTER PERSONALITIES
'REGISTERS ADDRESS
'REGISTERS FORCED HI BITS
'REGISTERS FORCED LO BITS

'REGISTERS IGNORE BITS

CIMUAAD ML=11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

62 ;ML&
65 ;
.

SEQ 0032

22-0ct-1980 10:47:44

gz ;

gg :

6
3
PAGE &8

22-0¢t=1980 10:45:32
1536

}g%g

tes,

NIB_MAP =

1539
1540

NIB_O = [0, 0, 4, 0J.
NIBZ1 = [0, 4, 4, 01,

'NIBBLE 0 BITS <0:3>
INiEBLE 1 BITS <4:7>

7
72
73
74 ;

1542
1543
1544
1545

NIBZ3
NIBZ4
NIBTS
NIBT6

'NIBBLE
INIBBLE
INiBBLE
'NIBBLE

76 :

1547

75 :
77

78 ;
79 :
80 .

1541

1546
1548

1549
1550
1551

NIBZ2 = [0,

=
=
=
=

8, 4,

0],

[0, 12, &, 0],
[1. 0, 4, 0],
(1. 4. 4., 03,
[1, 8.
4, 0],

NIBZ7 = (1. 18, &, 03,
NIBT8 - (2. 8,

0],

NIBD9 = [2. 12, %, 0]
tes,;

'<BLF/PAGE>

PA:<NEALE>BL2ML4.BLI.2 (1)

_MAPS OWN STORAGE NIB_SAVE INTO TEN FOUR BIT NIBBLES

set

68 :
69 :
70

TOPS=20 Bliss=16 v2(206)

'NIBSLE 2 BITS <B:11>

3
4
5
6

BITS
BITS
BITS
BITS

<12:15>
<16:19>
<20:23>
<24:27>

'NIBBLE 7 BITS <28:31>

'NIBBLE 8 BITS <32:35>

'NIBBLE 9 BITS <36:39>

C;
Wi

CIMLAAD ML=-11

HARDWARD

TEST

LOGIC

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

H
3
PAGE 49

82 ML

22-0ct=1980 10:47:44

gz ;

22-0ct=1980 10:45:32

85
86
87
88
89

;
;
:
;
:

1592
1553
1554
1555
1556

;

1558

93
9
95
96
97
98
39

;

;
;
;
;
:
;

100 ;
101 ;

102 :

1557

1559

1560
1561
1562
1563
1564
1565
1566
1567
1568

1569

own

NIB_SAVE

HW OR TBL

block

[3]

PTBL PTR : volatile,
OP NUM ARR : volatile,
ARR INT : volatile,
600D BLK : volatile,
PAR DIS : volatile,
CHIP SIZ : volatile,
LST_BLK : volatile,
ARRZ16 : volatile,
LST ARR : volatile

1573
1574
1575

w U_SIZE : volatile,
RASTINC : volatile,
WwT_DATA : volatile,

110 ;

1577

DRIVE TYPE

112 ;
113 ;

1579
1580

109 ;

1M1 ;
114

;

1576

1578

1581

(NIB_MAP)

volatile,

10 BUF : vector (2561 volatile,

106 ;
107 :
108 ;

1571
1572

field

vector [127)

1570

;
;

TOPS=20 Bliss=16 v2(<06)

PA:<NEALE>BL2ML4.BLI.2 (2)

.
)
' OwWN STORAGE
!

103 ;
104
105

SEQ 0033

STK_OFF

: vector [9, byte] volatile,

stack : vector [198, bytel volatile,
PD_TEMP : bitvector [16] volatile,

RD"DATA

volatile,

REG_INIT_FLG;
EQUALS;

‘<BLF/PAGE>

volatile,

volatite,

'STORAGE LCCATION TO SAVE NIBBLE DATA READ DURING DIAG MODE
'STORES HARDWARE ORED PROM DATA DURING PROM OR FUNC

'"HARDWARE P-TABLE POINTER
'OPERATORS NUMBER OF ARRAY [NPUTTED
'ARRAY SELECTION INCREMENT VALUE
'GOOD BLOCK ADRS
'PARITY DISABLE FLAG
.MOS RAM CHIP SIZE
'LAST ADDRESSABLE BLOCK
'MAX NUMBER OF ARRAY ALLOWED
'LAST ADDRESSABLE ARRAY

i INPUT OUTPUT BUFFER

'STACK OFFSET STORAGE LOCATION

.STACK OF 198 BYTE LOCATIONS
'PROM DATA STORAGE LOCATION DURING DIAG MODES

'STORES WORD COUNT FOR 16K OR 64K XFERS
'ROW ADRS STROBE INCREMENT
'SAVE WRITE DATA DURING REG READ WRITE TEST
'SAVE

READ DATA DURING REG READ WRITE

'DRIVE TYPE STORAGE LOCATION

'FLAG TO DETECT DOING REG INIT TEST

TEST

CIMLAAD ML-11

LOGIC 1C T EST
HARDWARD TEST SECT]
ECTION

MACRO M1113

23-0C"-80 09:11

[

PAGE 50

116 MLé
}}g ;
119
120
121
122
123
124
125
126
127

;
;
;
;
.
;

;
;

130 ;

1593

}%g ;

}gg%

}%3 :
;
;
;
;
;
;
;

141

;

}ggé

1596
1597
1598
1599
1600
1601
1602

global
!
!

THIS STRUCTURE

THE REGISTERS FORCED HI AND FORCED LOW BITS ARE PRELOADED

IS LOADED DURING THE

INIT CODE

;

INTO THE STRUCTURE USING THE ATTRIBURE 'PRESET'.

ML_REG: blockvector [NUM_OF _REG,FIELD_SIZ] field(WORD_MAP)
preset (
{0,FORCE_HI]
= %0'004000',
.mMLCS?
(0,FORCETMLO]
= %0'173701",
[0,0ONT_TARE]
= X0'160200',
(5,FORCE_LO]
[(S,FORCE KI]

[5.0ONT_TARE)

= %0'00010C°,

(6,FORCE_LO)

= %0'014620',

'MLER

1608
1609

(7,DONT_CARE]

= X0'177400",

'MLAS

}g}?

(8,FORCE_LO]

= X0'100000°*,

'MLPA

149 ;

1612

[10,FORCE LO1]

= X0'000020°,

'MLMR

152
153
154
155
156
157
158
159
160
161
162
163

1615
1616
1617
1618
1619
1620
1621
162¢2
1623

C11,FORCE_HI)
C11,FORCETLO)
(11,00NT_TARE]

= X0'000110',
= X0'177666',
= X0'000001°',

'MLDT

(13,FORCE_LO)

= X0'140300',

'MLE1

(14,FORCE_LO)

= X0'100300',

'MLE2

142 ;
143 ;
144

145 ;
146 ;

12; ;
148

;

}g? ;
;
;
;
;
;
;
;
;
;
;
;
;

164 :
165 ;
166 ;

167 :

168 ;
169 ;

170 ;

1604

1605
1606
1607

}g}z

1624

1625
1626
1627
1628
1629
1630
1631
1232
1633

AND

5 WILL CONTAIN THE ML11 REGISTER PERSONALITIES AND BUS ADRS.

'MLDS

1603

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (3)

!
! GLOBAL STORAGC
!
'<BLF/NOFORMAT>

= %0'25077°,
= %0'010600°',

140 ;

SEQ 0034

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32
1582
1583
1584
1585
1586
1587
1588
1589
1590

133
134
135
136
137
138
139

£10,DONT_TARE]

(17,FORCE _LO)

[21,00NT_TARE]

= %0'177400°,

= X0'010000',

= %0°006000*

volatile,

RH_ADD,
RHCTYP,
RHVEC,

MLTLUN,
MLTDUT;

'<BLF/FORMAT>

'MLEE

'MLCS2
'RH CONTROLLER BASE ADDRESS
'R CONTROLLER TYPE
'RH CONTROLLER VECTOR ADDRESS

‘ML LOGICAL UNIT NO.
'ML

DRIVE

NUMBER

CIMLAAO ML-11 LOGIC

SECTION

3
SEQ 0035
TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 ()

| REGISTER NAMES:
=

COMLCSt =

.ML _REG [1,REGISTER_ADD]X.

'WORD COUNT REGISTER

.ML_REG [2,REGISTER_ADDIX,
AL DA
.ML_REG (3,REGISTER_ADDIX,

'UNIBUS ADDRESS REGISTER

ML REG (4,REGISTER_ADDIX,

'CONTROL AND STATUS REGISTER 2

.ML_REG [5.REGISTER_ADDIY,

'DRIVE STATUS REGISTER

.ML_REG [6,REGISTER_ADDIYX,

'ERROR REGISTER

.ML_REG (7.REGISTER_ADDIYX,

'ATTENTION SUMMARY REGISTER

.ML_REG [8,REGISTER_ADDIYX,

'LOOK AHEAD REGISTER

.ML_REG (8,REGISTER_ADDIX,

'PROM ADDRESS REGISTER

.ML_REG [9,REGISTER_ADDIX,

'DATA BUFFER REGISTER

.ML_REG (10,REGISTER_ADDIX,

'MAINTENANCE REGISTER

.ML_REG (11,REGISTER_ADDIX,

'DRIVE TYPE REGISTER

.ML_REG [12.REGISTER_ADDIY,

'SERIAL NUMBER REGISTER

.ML_REG [13.REGISTER_ADDIX,

'ECC CRC WORD REGISTER 1

=
=2
X
XX

ALcse
=

ALDS
=

ALER =

ALAS =

BLLA =

X2
X
2
X
X
2
X2
X
2
2T
X2
2T
X2
Z

'CONTROL AND STATUS REGISTER 1

MLBA =

S IR
B,
%,
%0
9,
e
B,
®e

ML _REG (O.REGISTER_ADDIX,

RLwC

PR
WA
I YA
T
R
TR T
YEIE
PR

b e

= OO

mairo

JO NS NN =

]

PAGE

| MACRO DEFINITIONS

b e ccd e e
PON)

23-0CT-80 09: 1"

44
:32

[SS1aS LN, ST N1, ST N1, S N1,V

222

MACRO Mi113

JMLG

I IR WA IR

I y—Y

b
D
h
i
D
D
D e
D
D
d
b
d
D
d
nd b
D
e
i
—

V0 OVOO VOOV WOoOoQMOOD00000000 NNNN~N~N ~N=~
WIN 2O 000 ~NO N NN
~NON
N SN N =2OOVO NN

HARDWARD TEST

TEST

ALPA -

ALoB =

ALMR =

ALoT =

MLSN =

RALET =

PLE? =
.ML_REG (14 ,REGISTER_ADDIX,
ALDY =

'DESIRED ADDRESS REGISTER

'ECC CRC WORD REGISTER 2

.ML REG (15,REGISTER_ADDIX,

'DATA DIAGNOSTIC REGISTER 1

.ML REG (16,REGISTER_ADDIX,

'DATA GIAGNOSTIC REGISTER 2

ALD.

MLEE =
.ML_REG (17.REGISTER_ADDIX,
MLEL =
.ML_REG (18,REGISTER_ADDIX,
ALPD =
.ML_REG (19.REGISTER_ADDIX,
ALBA
.ML_RES

[20,REGISTER_ADDIY,

'ECC ERROR REGISTER
'£CC ERROR LCOATION REGISTER
'PROM DATA REGISTER

'BUS ADDRESS EXTENSION REGISTER

MACRO M1113

23-0CT-80 09:11

K
3
PAGE 52

228 ;ML
4

22-0ct=-1980 10:47:44

%%g :

22-0ct=1980 10:45:32

231

;

M 1686

}ggg

-ML_REG (21,REGISTER_ADDIX,

234
23S
236
237
238
239
240
2461
262
243
2464
245

;
;
;
.
;
;
;
;
;
;

1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700

! BIT ASSIGNMENTS:
!
SC =
(MLCS1)<15,1>X,
TRE =
(MLCS1)<14,1>%,
MCPE =
(MLCS1)<13,1>%,
DVA =
(HLCS1)<11 1>%,
ROY
(nLcs1)<7 1>%,

247
248
249
250

;
;
;
;

.1702
M 1703
1706
M 1705

(MLcs1)<6.1>z.
GO =
(MLCS1)<0,1>X,
ML _FUNC =

252 :

M 1707

254 ;
255 ;
256 ;

1708

M 1709
1710
M 1711

OLY =
(HLCSZ)<15 1>%

1712
M 1713

(MLC82)<13 1>%,
NED
=

;

246 ;

251 ;

253 ;

257 :
258 ;
259

¢60
261
262
263
264
265
266
267
268
269
270

;
;
;
;
;
;
;
;
;
;

2N ;
272
273
274 ;
275 ;

M
M
M

M
M

M 1701

1706

(MLCS2)<6,1>X,
CLR =
(HLCS2)<S 15X,

'MLCS2 BIT ASSIGNMENTS
R
.

NEM =
(MLCS2)<11,1>X,
PGE =
(MLCS2)<10,1>X,
MXF =
(MLCS2)<9,1>X,
MDPE =
(MLCS2)<8,1>X,
ORDY (MLCS2)<7,1>%,
IRDY =

1730

(HLCSZ)<4 1>%,

1732

(MLCS2)<3, 1>,

M 1733
1734
M 1735
1736
M 1737

MLCS1 BIT ASSIGNMENTS

WCE
=
(nLcs2)<14 1>X,
PE =

1726
M 1727
1728
M 1729

;
;
;
;
;

278
279
280
281
282

'CONTROL AND STATUS REGISTER 3

(MLCS1)<0,6>%,

(nLc52)<12,1>z.

MmI175

TOPS=-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4L.BLI.2 (3)

1€
=

1714

M 1715
1716
M 1717
1718
M 1719
1720
M 1721
1722
M 1723
1724
M 1725

276 ;
277 ;

MLCS3 =

BAl =

DRV NUM =
(ML(S2T<0,3>X,
ATIN =
(MLDS) <15, 1>,
COMP_ERR =

'MLDS BIT ASSIGNMENTS

%g% ;

SEQ 0036

CZMLAAQ ML-11 LOGIC TEST
HARDWARD TEST SECTION

CZMLAAO ML-11 LOGIC TEST

HARDWARD TEST SECTION

MACRO M1113

284 :ML4

289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314

;
;
;
:
:
;
:
;
;

;
;
;
;
.
;
;
;
;
;
.
;
;
;
.
;

315 ;
56 ;
317 ;
318¢;
319
320 ;

321 ;

22-0ct=-1980 10:47:44

1738
M 1739

1740

M 174

1742
M 1743
1744
M 1745
1746
M 1747
1748
M 1749
1750
M 1751
1752
M 1753
1754
M 1755
1756
M 1757
1758
M 1759
1760
M 1761

1762
M 1763
1764
M 1765

1766
M 1767
1768
M 1769
1770
LIRRLA

1772

322 ;

M 1773

324 ;

M 1775

326 ;
327 ;
328 ;

M 1777
1778
m 1779

330 .

M 1781

332

M 1783

334 ;

M 1785

336 .

M 1787

338 :

M 1789

323 ;

325 :

329

331 ;
333 .

335 .
337 ;

SEQ 0037

22-0ct=-1980 10:45:32

%gg

287 ;
288 ;

23-0CT-80 09:11

3
L
PAGE 53

(MLDS)<14,1>%,
MOL
=
(HLDS)<12 1>%,
LBT
(MLDS)<10 1HX,
=
DPR
(HLDS)<8 1>,
DRY
(MLDS)(? 1>%,
(MLDS)<6 1>%,
DCK =
(MLER)<15,1>X,
UNS =
(MLER)<14,1>X,
OPl =
(MLERI<13,1>X,
[AE =
(MLER)<10,1>%,
AOE =
(MLER)<9,1>X,
ECH =
(MLER)<6,1>%,
OPAR =

'MLER BIT ASSIGNMENT;

(MLER)<5,1>X,
CPAR =

(MLER)<3,1>%,
RMR =
(HLER)<2.1>Z.
=
ILR
(HLER)<1 1>X,
ILF
(HLER)<0 1>X,
ARR TYP

(HLHRT<10,1>1.

ML_NUM_ARR =

1774

(MLMRY<11,5>%,

1776

(MLMRY<7,1>%,

1780

(MLMR)<5.,1>X,

1782

<4, 1>,
(MLMRY

1784

(HLHRY(S 1>%,

1786

(MLMR)Z2,1>%,

1788

(MLMR)Z1,1>%,

REF MAR =

PROM_RW =
(MLMR)<6,1>%,
PROM DIS =

DAT CLK =

DAT DM =

=
DCK_EN

ECC DIS =

ECC_DM =

'MLMR BIT ASSIGNMENTS
.

T0PS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (3)

CIMLAAQ ML-11 LOGIC TEST
HARCWARD TEST SECTION

MACRO M1113y 23-0CT-80 09:11

340 MLL
%2%

343 ;
344 ;

1790
M 1791

(MLMR)<0,1>X,
DRV_TYP =

346 ;

M 1793

UNC_ERR =

38 ;

M 1795

350 ;

m 1797

352
353 .
354 ;
355 ;

1799
1800
1801
M 1802

!
' MISCELLANEONS MACRO DEFINITIONS:
!
IS_SET =

357 ;
358 ;

1804
M 1805

eql 1X,
IS_NOT_SET =

1807
M 1808

eql OX,
REG_ADRS =

345 ;

349 ;

351 ;

356

1792

'MLEE BIT ASSIGNMENTS

1796

(MLEET<14,1>X,

1798

M 1803

1810

364 ;
365 ;

M 1811
M 1812

368 ;

M 1815

370 ;

372
373 .

L AR

1819
M 1820

ML_REG[.index,DONT_CAREJX,
MLE2_MASK =

1822
M 1823

M _REG[14,DONT_CAREIX,
WRT_MASK =

M 1824

1825

'READS REGISTERS ADDRESS FROM PERSONALITY TABLE

Al =

ML_REG[.index,FORCE_LOJX,
1GNORE =

'READS REGISTERS FORCED HI BITS FROM PERSONALITY TABLE

'READS REGISTERS FORCED LO BITS FROM PERSONALITY TABLE
.READS REGISTEKS DONT_CARE BITS FROM PERSONALITY TABLE

'READS MLE2 DONT CARE MASK EITHER DATA DIAG OR ECC CIE PEG

'GENERATE MASK DATA PATTERN USING REGISTER FORCE LO, HI AND IGNORE B

.IGNORE or ({(not .LO) and (.HI or .TST_PAT))X,

379

M 1826

382

1829

!'<BLF/SYNONYM IS_SET = EQL 1 + >

;
;
;
;

1831
1832
1833
M 1834

!
! DIAGNOSTIC DATA REGISTER MACROS

389 .
390 ;

M 1836
M 1837

DI1_TEMP = .MLD1;
D2_TEMP = .MLD?2;

h 1839
M 1840

WRT_LNG_WRD =

380 ;
381 ;
383 ;

3184
385
386
387

188 ;

391

392
393 ;

394 ;

M 1827
1828

1830

M 1835

1838

M 1841

‘TEST IF BIT IS EQUAL 1

'TEST IF BIT IS EQUAL 0

.ML_REG(.index ,REGISTER_ADDIX,

1816

377

(3)

(MLEET<13,1>%,

M 1817

M 1818

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLML4.BLI.2

CRC_ERR =

ML_REG[.index,FORCE_KHIIX,
Lo =

M 1821

378 ;

SGL_ERR =

1813
M 1814

374 ;

375
376 :

10:45:32

(MLEET<15,1>X,

M 1809

369 ;

22-0ct~1980

1794

362 ;

366 .
367 :

22=-0ct=1980 10:47:44

IMLDT BIT ASSIGNMENTS

M 1806

363 ;

SEQ 0038

(MLDTY<0,1>X,

359 ;

360 ;
361 ;

PAGE 54

CLR_MBUS =

'CLEAR MASS BUS RESTORE DRIVE NUMBER

(LR = ONE; DRV_NUM = ML DUTX,

'<BLF/SYNONYM IS_NOT_SET = EQL 0 * >

RD_LNG_WRD =

'READ DATA DIAG REGS INTO BIND LOCATIONS

EQTTEMP = .MLE2L,
MLD1 = .D1_TEMP;

'LOADS DATA DIAG REG WITH CONTENTS OF BIND LOCATIONS

CZMLAAN ML-11 LOGIC TESTY

MACRO M1113

HARDWARD TEST SECTION
396 ;ML4

23-0(T-80 09:11

PAGE 55

22-0ct-1980 10:47:44

22-0ct-1980 10:45:32

%gg :

399 .

M 1842

601 ;
402 ;

1844
1845

400 ;

MLE2 =

!<BLF/PAGE>

22-0ct=1980 10:47:44

22-0ct-1980 10:45:32

414

615
616
617
618

6419
420
621
L2
623
624
425
626

;
;
;
;

;
;
;
;
;
;
;
;

427 ;

428 ;

4«29 ;
630 ;
2%; :

1846
1847
1848
1849
1850
1851
1852
1853

1854

bind
!
! ERROR DATA MAPPING FORMATS
!

FMT_1 = uplit (Xasciz'XAWROTE: XO06%A

1855
1856
1857
1858

FMTZ2 =
FMT_3 =
FMT4 =
FMT_S =

1859
1860
1861
1862
1863
1864
1865
1866

uplit
uplit
uplit
uplit

FMYZ14 = uplit (Xasciz'YAWROTE: XD2XA

1868

433 ;
436 ;

1873
18764

! ERROR MESSAGE MAPPING FORMATS
!

436 ;

1876

438 ;
439 ;

440 ;

441 ;
442 ;

643
446 ;

FMT_16 = uplit (Xasciz'XAFAILING REG: Y06XA GOOD DATA: XOSXA BAD DATA: XO6XININ'),
FMT_17 = uplit (Xasciz'XNXADIAGNOSING UNIT XO1XNIN'),
FMT_18 = uplit (Xasciz'XATIMED OUT DURING MBUS X02XA FUNCININ'),

ONE_FMT = uplit "(Rasciz'XTIN'),

TWO_FMT = uplit (Xasci2’ LTXTIN? )¢

1877

THR_FMT = uplit (Xasciz'XTXTXTIN ),

1878

FOR_FMT = uplit (Xasciz’ LTXTXTXTING ),

1879

FIV_FMT = uplit (Xasciz'XTRTXTITATIN'),

1881
1882

SEV_FMT = uplit (Xacciz"XTXTXTXTXTXTXTIN' )‘
EIG_FMT = uplit (Xasciz'XTXTXTXTXTXTXTXTIN )

1880

1883
1884

SIX_FMT = uplit (Xasciz' LTXTXTXTATATANG),

NIN_FMT = uplit (Xasciz' XTXTXTXTXTETXTATATINS ) ¢
TEN_FMT = uplit (!asc1z'”T!T!TlT!IZT!T!T!TZTZN ),

ELV_FAT = uplit (Yasciz'RTXTXTATATXTATXTXTATXTING,

:22 ;

}ggg

;
;
;
;
;

1887
1888
1629
1890
1891

! DIAGNOSTIC VOCABULARY
!
!
! WORDS
!
_

447
448
449
450
651

452 ;

READ: XD2XNXN')

FMT_15 = uplit (Yasciz'YANIBBLES XFERED BEFORE ERROR: 1WIAIN"),
‘

437 .

READ: YOG6ININ'),

(Xasciz'XAGOOD DATA: XO6XA
BAD DATA: X06%A
XOR: XO06ININ'),
(Xasciz'XADRIVE SN: XO6XNXN'),
(Xasciz'XABIT IN ERROR: XO6XNIN'),
(Xasciz'XAGOOD NIB DATA: X02XA
BAD NIB DATA: X02%A
NIB POS: XO4LININ'),

FMT_6 = uplit (Xasciz'%{ANIB IN ERROR: XD4XNIN'),
FMT_7 = uplit (Xasciz"XAFAILED AT: XO6XNXN'),
'
FMT_8 = uplit (Xasciz'XAREPLACE ARR MOD: XD2XNIN'),
FMT_9 = uplit (Xasciz2'XAFAILED AT DSA: X06XNXN'),
FMT_10 = uplit (Xasciz'XABIT<15:10>: XIBOXA
BIT<9:0>: XB10XNIN'),
FMT_11 = uplit (Xasciz'XAFAILING REG ADRS: XO6ININ'),
FMT_12 = uplit (Xasci2'XAFAILING FUNC: XO6XNIN'),
FMT_13 = uplit (Rasciz' XAOFF _SET CNT FOR NIB : XD2 XA = XD2 XNIN'),

1867

1875

1892

TOPS=20 Biiss=16 v2(206)

PA:NEALE>BL2ML4.BLI.2 (&)

!
! BIND DECLARATIONS
!

1869
1870
}g;}

435 ;

PA:<NEALE>BL2ML4.BLI.2 (3)

.E2 tenpi

282 :

L06 ;
407 .
408 ;
69 ;
410 ;
L1
62 ;
63 ;

TOPS-20 Bliss-16 v2(206)

MLD2 = .D2_TEMP;

1843

403 ;M4

WRD_1 = uplit (Xasciz' 60"),

SEQ 0039

HARDWARD TEST

453 ;

454
455 ;
456 ;
457 ;

SECTION

1893
1894
1895
1896
1897

MACRO M1113
wntnH

CIMLAAD ML-11 LOGIC TEST

uplit
uplit

23-0(T-80 09:11

(Xasciz'
(Xasciz'

uplit (Xasciz'
uplit (Xasciz’
t (Xasciz'
upl

DRV RDY'),

ILFY),

oP1'),

BAD'),

GOoD '),

PAGE 55-1

SEQG 0040

HAI

CZMLAAQ ML-11

HARDWARD

TEST

LOGIC

TEST

SECTION

Vo Ve Vo Vo Ve B4 Vs W, G

b d cd b e

~NOWNES WA

b D

2OV
NOWVNE WA

NN NONINININIPON) b

NO NS WA 2OV

2D NN AN NN N AN NN

NN 2 OO

D
b
D
D
D
d e
D o
e
b
o

ODNO N

Vs
8o So B Ba Ve Vo oy

D e
aad i
D e
D i
D oD
d md
d
e
e
e
e
o
e
e
o
i o
—d e

494
495
496
497
498
499

OO OO OOV OV OOVOOV OO OVOVOVIO VOV OOVO OOV OOVOOOOVOOOOOVLO

493

Ve Ve T Ve Vs Vs Ve B Vs

Ve B

492

B e Bo Bo By B0 Bo By 8o 8o ®e Ve ®o BeBo Ve Bs Go B Vo So By s o o

474
475
476
477
478
479
4«80
481
482
483
LB
485
486
487
488
489
490
«91

23-0(T-80 09:11

SEQ 0041
TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (&)

459 ;ML4
460 ;
461
66?2
463
464
465
466
467
468
469
470
(A4
472

473

MACRO M1113

¢
PAGE 56

WRD_7 = uplit (Xasciz' PARITY NOT'),
WRD_8 = uplit (Xasciz' GENERATED'),
WRD_9 = uplit (Xasciz' DETECTED'),
WRD_10 = uplit (Xasciz' ERRORS'),
WRD_11 = uplit (Xasciz' AFTER'),
WRD_12 = uplit (Xasciz' DURING'),
WRD_13 = uplit (Xasciz®' AT'),
WRD_14 = uplit (Xasciz' FAILURE'),
WRD_15 = uplit (Xasciz' ATA'),
WRD_16 = uplit (Xasciz' ATIN'),
WRD_17 = uplit (Xasciz' WRITING'),
WRD_18 = uplit (Xasciz' vv'),
WRD_19 = uplit (Xasciz' FUNC'),
WRD_20 = uplit (Xasciz' TRE'),
WRD_21 = uplit (Xasciz' RMR'),
WRD_22 = uplit (Xasciz' EXCESSIVE'),
WRD_23 = uplit (Xasciz' MBUS'),
WRD 24 = uplit (Xasciz' DATA'),
WRD_25 = uplit (Xasciz' CONTINUITY'),
WRD_26 = uplit (Xasciz' AOE'),
WRD_27 = uplit (Xasciz' LBT"),
WRD_29 = uplit (Xasciz' PREMATURLY'"),
WRD_30 = uplit (Xasciz' IAE'),
WRD_31 = uplit (Xasciz' INCREMENT'),
WRD_32 = uplit (Xasciz' WITH'),
WRD_33 = uplit (Xasciz' uv'),
WRD_34 = uplit (Xasciz' UNS'),
WRD_35 - uplit (Xasciz' PROM'),
WRD_36 = uplit (Xasciz®' OR'),
WRD_37 = uplit (Xasciz' SELECT"),
WRD_38 = uplit (Xasciz' REG'),
WRD_39 = uplit (Xasciz' UNIQUE'),
WRD_40 = uplit (Xasciz' 14'),
WRD_&41 = uplit (Xasciz' NIBBLE CNT'),
WRD_42 = uplit (Xasciz' GTR'),

WRD_43
WRD_44
WRD_45
WRD_46

=
=
=
=

uplit
uplit
uplit
uplit

(Xasciz' WHILE'),
(Xasciz' TRE'),
(Xasciz' INITIAL'),
(Rasciz® OFF SET'),

WRD_48
WRD_49
WRD_50
WRD_51
WRD_52

=
=
=
=
=

uplit
uplit
uplit
uplit
uplit

(Xasciz®'
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'

WRD_47 = uplit (Xasciz' COURY'),

WRD_53
WRD_54
WRD_S55
WRD_56
WRD_57
WRD_58
WRD_S59

=
=
=
=
=
=
=

uplit
uplit
uplit
uplit
uplit
uplit
uplit

(Xasciz'
(Xasciz'
(Xasciz®
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'

DELAY'),
TESTS'),
ADRS'),
COUNTER'),
REG'),

TESTED'),
NIBBLE'),
ALL'),
TEST'),
XFERED'),
NIBBLES'),
SC'),

MACRO M1113

TEST
HARDWARD TEST S ¢ 1 ION

CZMLAAD ML=-11 L 0G l ¢

23-0(T-80 09:11

4
D_
PAGE 57

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (&)
b
e
d

AN N N
VNS

’
*
*

.
L]
L[J
.
[
*
.

.
[

*
L[J

—

[4
.
L
.
[]

[4
d
.
L3
3
4
L
.
4

[
4

*
*
.

[

’

(NP

D e

[

O 00 ~NO N

d e

L[4

[

(W TV IV TV TV LV LU, LV LV, ]
AN NWAVVWVVALWALY

D e

[

OO OO OO0 O OVOVOVOOVOVOO0
[0 Yo e
)
(S P
V] N =200V
NN
W) —O

[

WVAIWNANA

N AN

N N AN U RO N PO PV AL PO PO NINI D) = = s
NN = OV
NO NS W 2OV~

NN AW

515 sMLG

[

SEQ 0042

1966

1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980

1981
1982
1983
1984
1985
1986

1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999

2000
2001

WRD_60 = uplit
WRD_61 = uplit
E

(Xasci2' MULTIPLEXER'),
(Xasciz' UNEXPECTED'),

PHRASES

PHR_1 = uplit (Xasciz' BIT NOT SET'),
PHR_2 = uplit (Xasciz' BIT NOT CLR'),
PHR_3 = uplit (Xasciz' NO RESPONCE AFTER 1.5 us'),
PHR_& = uplit (Xasciz' DATA ERRORS'),
PHR_S = uplit (Xasciz' BIT SET'),
PHR_6 = uplit (Xasciz' BIT CLR"),
PHR_7 = uplit (Xasciz' OF OTHER DRIVES'),
PHR_8 = uplit (Xasciz' CLASS A'),
PHR_9 = uplit (Xasciz' CLASS B"),
?HR_10 = uplit (Xasciz' TO FIND'),
E

FUNCTIONS

FNC_1 = uplit (Xasciz' MEM SIZING"),
FNC_2 = uplit (Xasciz' NOOP'),
FNC_3 = uplit (Xasciz' DRV'),
FNC_4 = uplit (Xasciz® WRITE CHECK'),
FNC_S = uplit (Xasciz' WRITE'),
FNC_6 = uplit (Xasciz' READ'),
FNC_7 = uplit (Xasciz' CLEAR'),
FNC_8 = uplit (Xasciz' COMP ERROR'),
FNC_9 = uplit (Xasciz' SYS CLR'"),
FNC_10 = uplit (Xasciz' SEARCH'),
FNC_11 = uplit (Xasciz' READ-IN-PRESET"),
FNC_12 = uplit (Xasciz' ILLEGAL'),
FNC_13 = uplit (Xasciz' ABORT'),

FNC_14 = uplit (Xasciz' ARR RD_WRT'),

FNCC1S = uplit (Xasciz' GOOD BCK'),
FNC_16
FNC_17
FNC_18
FNC_19
FNC_21

=
=
=
=
=

uplit
uplit
uplit
uplit
uplit

(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'

REFRESH'),
ARRAY'),
RAM-BUS'),
OVERFLOW'),
CHK_SUM'),

FNCZ22 = uplit (Xasciz' LASY BLK'),
fiNC_ZS = uplit (Xasciz'
:

INITIALIZE"),

REGISTERS

REG_1
REG_2
REG_3
REG_4
REG_S
REG_6
REG_7?
REG_8
REG_9

=
=
=
=
=
=
=
=

uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit

(Xasciz'
(Xasciz'
(Xasciz'
(Xas:ziz'
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'

MLCS1'"),
MLDS'),
MLER'),
MLMR'),
MLAS'),
MLDA'),
MLDT'),
MLPA'),
MLSN'),

CIMLAAD ML-11

HARDWARD

TEST

LOGIC

TESY

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE

4
E
58

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

571 ;M4
572

573

S74
575
576
S77
578
579
580
581
582

583
584
585
586
587
588
589
590
591
592
593
594
595
596
597

:
:
;
:

;
;
;
;
;
;
;
;
;
:
;

;
;

SEQ 0043

2002
2003
2004
2005
2006
2007
2008
2009

(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz’

uplit

(Xasciz'

uplit

(Xasci2'
(Xasciz'

MLE'
MLE2'
MLDY'
HLDZ:

MLEE
MLEL'

MLPD'

| MODULES IN ERROR MESSAGES

2010

201
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
202%
2024
2025

uplit
uplit
uplit
uplit
uplit

ASYNC = uplit (Xasciz'ASYNCHRONOUS MODULE FAILURE'),
SYNC = uplit (Xasciz'SYNCHRONOUS MODULE FAILURE'),
ARR_DAT = uplit (Xasciz'ARRAY DATA MODULE FAILURE'),
MEM_ARR = uplit (Xasciz'MEMORY ARRAY MODULE FAILURE'),
'

INTER = uplit (Xasciz'INTERMEDIATE DIAGNOSTIC MESSAGE'),

TRBLE_LOOP

= uplit

(Xasciz'TROUBLE

SHOOT

g DATA DIAGNOSTIC REGISTER SAVE LOCATIONS
D1_TEMP = NIB_SAVE,

D2_TEMP = NIB_SAVE
E2_TEMP = NIR_SAVE

.<BLF/PAGE>

[1, 0,
(2, 0,

16, 0],
16, 0];

LOOP ERRORS'),

TOPS=-20 Biiss-16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (&)

CZMLAAOQ ML-11 LOGIC

HARDWARD TEST

TEST

PACRC M1113

SECTION

23-0C7-80 09:11

PAGE

SEQ 0044

10:47:44
10:45.32

599 JMLG
600 ;
601
602
603
604
605
606
607
608
609
610
611
612
613

routine LOAD_STACK

I
DALRAL

begin

(STK_PTR,

NIB_PTR)

TOPS=20 Bliss=16 v2(206)
PA:<NFALE>BLZ2ML4L.BLI.2 (&)

novalue

FUNCTIONAL DESCRIPTION:

LOAD STACK TAKES GOOD NIBBLE CATA
FOUND IN THE STRUCTURE 'NIB_SAVE'

AND STORES IT INTO THE STRUCTURE

616

643

FORMAL PARAMETERS:
STK_PTR
POINTS TO PRESENT DEPTH OF

POSITION BEING

T EYR
N

NIB_PTR
POINTS TO CURRENT NIBBLE
MANIPULATED.

IMPLICIT

2055
2056

INPUTS:

VECTOR OF 198 BYTE LOCATIONS WHERE
GOOD NIBBLE DATA IS STORED
DURING DIAGNOSTIC MODE READS, AFTER
BAD NIBBLE LOCATIONS HAVE BEEN
STRIPPED AWAY,

STK_OFF

2060
2061

STACK

2065
2066

644
645
646

647
648
649
650
651
652
653

THE

'STACK' WHERE PRESENT GOOD NIBBLE
DATA IS TO BE STORED.

640
641
642

617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639

"t Be

615

614

YRR

*STACK® REWRITING ANY BAD NIBBLE
éi;:cx' LOCATIONS WITH GOOD NIBBLE

2077

vector of 9 byte LOCATIONS WHICH
STORES AUAY A BAD NIBBLE OFF SET

COUNT FOR EACH NIBBLE POSITION

NIB_SAVE

BLOCK OF 3 WORDS TO STORE THE
DATA FOUND IN MLD1, MLD2 AND

MLE2 AFTER A DIAGNOSTIC MODE READ.

IMPLICIT OQUTPUTS:
'STACK' LOADED WITH GOOD NIBBLE
DATA

COMPLETETION CODES:

NONE

SIDE EFFECTS:

NONE

case .NIB_PTR from 0 to 8 ot

'SELECT NIBBLE DATA TO BE LOADED INTQ THE STA(CK

CIMLAAD ML=-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0(T-80 09:11

PAGE 60

655 ;MLé
229 :
658 ;
659 ;
660 ;

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

;

2078
2079
2080
2081

663 ;
664 ;

2083
2084

666 ;

2086

661

662

665 ;

667 ;
668 ;

2091
2092

674 ;
675

2098

682 ;

2102

;

2103
2104

686 ;

2106

685 ;

687 ;
688 ;

689 ;

63? :
691

;

(6]

stack [(.STK_PTR - (.STK_OFF [.NIB_PTR]))])= .NIB SAVE [NIB_6];

'LOAD NIBBLE DATA 6 INTD SELECTED STACK LOCATION

(71

stack [(.STK_PTR - (.STK_OFF [.NIB_PTR])))] = .NIB_SAVE [NIB 7];

g}}?
2114

'LOAD NIBBLE BATA 7 INTD SELECTED STACK LOCATION

(8]

2113

695 ;
696 ;
697 ;

2115
2116
2117

703
704
705
706
707

045
122
105
045

004164
004167
004172
004175

stack [(.STK_PTR - (.STK_OFF [.NIB_PTR]))]= _NIB_SAVE [NIB_5];

'LOAD NIBBLE BATA S INTO SELECTED STACK LOCATION

2109

694 ;

701
702

(5]

2107
2108

2112

693 :

stack [(.STK_PTR - (.STK_OFF [.NIB_PTR]))]= .NIB SAVE [NIB_4];

'LOAD NIBBLE DATA & INTD SELECTED STACK LOCATION

2105

692 ;

'LOAD NIBBLE BATA 1 INTD SELECTED STACK LOCATION

.
stack [(.STK_PTR - (.STK_OFF [.NIB_PTR)))] = ,NIB_SAVE (NIB_3];

(4]

2101

683 ;
684

[.NIB_PTR]))] = _NIB_SAVE [NIB_1);

'LOAD NIBBLE BATA 3 INTD SELECTED STACK LOCATION

2097

2099
2100

stack [(,STK_PTR = (.STK_OFF

_LOAD NIBBLE BATA 0 INTD SELECTED STACK LOCATION

(3]

2095

679
680 ;

[.NIB_PTR]))] = _NIB_SAVE (NIB_ 0]

stack [(.STK_PTR = (.STK_OFF [.NIB_PTR]))]= _NIB_SAVE [NIB_ 2.

2094

678

:
stack [(.STK_PTR = (.STK_OFF

'LOAD NIBBLE BATA 2 INTD SELECTED STACK LOCATION

2093
2096

681

(2l

2090

676 :

677 ;

(1)

2087
2088

671 ;
672 :

673

(ol

2085

2089

TOPS=20 Bliss=16 Vv2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (&)

set

2082

669 ;

670 ;

SEQ 0045

stack [(.STK_PTR - (.STK_OFF [.NIB_PTR])))]
= .NIB_SAVE [NIB 8];

'LOAD NIBBLE BATA 8 INTD SELECTED STALK LOCATION

tes;

end;

101
117
072
117

127
124
040
066

P.AAA:

ASCII
ASCII
LASCIL
LASCID

/XAW/
/RCT/
/E: /
/%067

MACRO M1113

CIMLAAD ML-11

| 06l € TEST
HARDWARD TESTY S ECTION

B
Bt P

o) Pract Dt Sl

P
P
B

Bof) Pl B

Pt Pt P

Pung Buet Bt Bumeg St Do

Bng Punt bt P
md B

et P
Pt

D
e

Pu
P
B
D
P

Pt ot Pneg Gt
P
Bt Do

Sed Pt D) P

Pg G

G
P
P

P
P
Bap S
P

et Pt P

P
P
B
g P
g P

Greg Pt Dmd Pumg Bumg Bumg P

Gug St Py Prmp

g Py Bumg Sumg P

Gmg G
P

St Sy
g P
Gy St
St G

Gy Gt Pt G
S
Pt S

T XV X e X %
X e Ve N T R T
e

P.AAE:

el T X T

-— e Ot RO D
SOHrO—=2~NOOO
£
O =22

.AS

% X %

P.AAD:

ANV
UVDODDLUVLLOODOOUODODODOnmoom
alalnininininlinlininlinlialianlInininlIniIsiInlIniInliniaiIaliafalfalfefalfefafelafIafaTafafalealafafalfafafalafaYaYea
Y Y e X )

P.AAC:

004355
004360
004363
004366
004371
754 004374
755 004377
756 004402
757 004405
758 004410
759 004413
760 004416
761 004421
762 006424
763 004427

116

SEQ 0046
5:32

729
730
TM
732
733
734
735
736
737
738
739
740
&
742
743
744
745
746
747
748
749
750
751
752
753

P.AAB:

7:44

728

O b ed e
d O = =2 OO =2 O —
£ OO0 20022 NOHO
N=08
=2 OONNPNOWNO
—

723
724
725
726
727

004200
004203
004206
004211
004214
004217
004222
004224
004227
004232
004235
004240
004243
004246
004251
004254
004257
004262
004265
004270
004273
004276
004301
004304
004307
004312
004315
004320
004323
004326
004331
004334
004336
004341
004344
004347
004352

PAGE 61

JMLé

O
ed d OO bt ed ad O =t 2 OO b
S22 O
VN2 NIOO
=20 =20
OO N—=O VNN
OO0 NNO — —

709
710
7\
712
713
714
715
716
717
718
719
720
721
722

23-0CT-80 09:11

/XA /

/
/
/REA/
/0: /

/%06/
/XN%/
/N/<00>
/XAG/
/00D/
/ DA/
/TA:/

/ X0/
/6%XA/

/
/
/ BA/
/0 D/
/ATA/
/: X/
/06%/
/
/A
X%/
/
/0R:/

/ %0/
/6%N/
/¥N/<00>
/XAD/
/RIV/
/E S/
/IN: /

/%06/
/XNX/
IN/<00>
/XAB/
/11 7/
/IN /

/ERR/
/0R:/
/ X0/
/6XN/
/XN/<00>
/XAG/
/000/
/ N1/
/8 D/
/ATA/
/: X/

/02%/

/
/N
/
8/
/AD /
/N18B/
/ DA/

T0PS

PA:<

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

765
;6;

23-0CT-80 09:11

sMLG
004432
004435
004440
004443
004446
004451
004454
004457
004462
006465
004470
004473
004476
004501
004504
004507
004512
004515
004520
004523
004526
004531
004534
004537
004542
004545

124
040
062
040
040
102
117
040
064
045
045
11
M
105
117

795
796
(97
798
799

004551
004554
004557
004562
004565

105
101
040
122
117

120
103
101
040
104

114
105
122
115
072

801
802
803
804

004573
004576
004601
004602

062
045
000
045

045
116

116
000

004621
004624
004627
004632
004634
004637

072
117
116
000
045
1M1

106
114
040
049
1M
045
045
116

P.AAl:

809
810
811
812
813
814

101
M
104
124
123
040
066
045

102
074

P.AAJ:

794 004546

800 004570

004605
004610
004613
004616

815 004642
816 004645
817 004650
818 004653
819 004656

040
064
045
045
10
105
H )

040
066
045
000

045

040

101
105
101
104

061
061
072
102
101

1M
045
045
040
116
040
123
045
045
116
101
102
116
122
122

045
€4S
116

072
117
101
040
"M
120
072
117
116
000
116
040
040
122
072
104
116
000
106
114
040
072
117
116
000

101

122

045
045
116
101
11
104
124

045

000
101
124
065
060
040
066
040

P.AAF:

P.AAG:

P.AAH:

104

072
076
045
045
040

SEQ 0047

22=-0ct=1980 10:47:44

6
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793

805
806
807
808

4
[
PAGE 62

22-0ct~1980 10:45:32

LASCIT
LASCIL
JASCIT
LASCIT
LASCII
LASCII
LASCIT
LASCII
JASCIT
JASCIT
ASCI1
JASCILI
LASCIL
LASCII
LASCII
LASCII
LASCIT
JASCIT
.ASCII
JASCII
.ASCI]
JASCIT
LASCII
LASCIL
LASCIT
LASCII

/TA:/
7 X0/
/72%A/
7
/
/7 NI/
/B P/
70S:/
7/ X0/
/74%XN/
/7XN/<00>
/XAN/
/18 /
/FIN Y/
/ERR/
/OR:/
7/ XD/
/74%N/
/7XN/<OO>
/XAF/
/ALL/
/ED ¢/
/AT
7/ X0/
/6%XN/
/7XN/<O0>
<00>

LASCII
LASCIL
LASCII
LASCII
LASCID

/EPL/
/ACE/
/7 AR/
/R MW/
/00:/

.ASCI1

LASCII

/%AR/

/7 XD/

LASCIT
LASCIT
LASCIT
LASCII

/72XN/
7XN/<00>
<00>
/XAF/

LASCIY
LASCII
JASCIT
LASCI1
.ASCII
LASCID

/0 X/
706X/
/NIN/
<0G><00>
/XAB/
/1T¢y

JASCIE
.ASCI]
LASCIL
LASCII

JASCIT
JASCIL
LASCID
LASCIL
LASCIE

/ALY
/ED /
/AT /
/DSA/

715/
710>/
/7 X/
/B6X/
/A

10PS
PA:<

CIMLAAQ mL-11 LOGI C TEST
HARDWARD TEST SECTION
l

MACRO M1113

23-0CT-80 09:11

PAGE 63

JMLG
e Bt Bt
g
et Bt St
St

OIOYIOIYYOYOYOYOYOOY Y O
IO

Gt Pt Bt Buact Bt Bt Pt Bt S
St B

CIYDIMIITII

et B

YOI
IO

g (et St Bt Gt o

YOOI O
I

g St Bt Bt et Bt Gt ot St Gt

IO
I
I
I
I
N
NI

g By Bt Pt Pt Bt St

B
L]

>
L]
L]

B B

.AS

P.AAO:

[
L]
L]
L]

b 3

116

045

3 3 5

104
045
045

e et St et

L]
L]
.

P.AAN:

B B B

[

B B

B D

[

P.AAM:

B 5

[]

D B B

[

[]

B D D

[]

B O

o D b

ONVIWLW =D

Ot OO
O 2 et Ok e e B LD ad B O =D =D =D oD
S SO NSONSNSTOOOOOD22YNO=2O
OOV WVIWVEN=SNIOWWNON
SO0 ~NNWVINESON

OB NNO
BN

VOO

OOt ad

P.AAL:

T
T T
e
e
=Y

NNV UNUVDNUNUVDIUVDIUVDVUVDIOVDUVDITUVUVDIVIUDUVUVUDUDOVDUBIDUNNUVDITUVDUVDOVDNULLODOVDU!DIODOWVDVO
WV
DBDIBVWK

[
L]

DD D B

L]
L]

5 B

[]

P.AAK:
=SSO
O

O —»
b
bbb
O
OO

OO0 2220

=2 cd O =2 OO A

NS OWONONNWNOON
= —

004750
004753
004756
004761
004764
004767

004772
004775
005000
005003
005006
005011
005014
005017
005022
005025
005030
005033
005036
005041
005044
005046
005051
005054
005057
005062
005065
005070
005073
005076
005101
005104
005106

VNOONNOMNON
—= 200N

SN
20O =200

072

SEQ 0048
2 2 0 C t-198 0 10: L7:44
2 2 0 C t-198 0 10::45:32

B J

004661
004664
004667
004672
004675
004700
004703
004706
004711
004714
004717
004722
004725
004730
004733
004736
004741
004742
004745

/17</
/9:0/
/>:

/%B1/

/0%XN/

/IN/<00>
/XAF/
/AIL/
/ING/
/ RE/
/G A/
/DRS/
/: X/
/06%/

/NIN/

<00>

/XAF/
/AIL/
/ING/
/ FU/
INC:/

/ X0/

/6XN/
/XN/<00>
/ XA/
/0FF/
/ _SE/

/Y ¢/

/INY

/FOR/
/ N1/
/8 :/
/ XD/

/2 X/

/N =/
/ X0/

/2 %X/
ININ/

<00><00>

/XAW/
/ROT/
/E: /
/X02/
/XA /
/
/
/REA/
/D: /

/XD2/
/XNX/
I/N/<00>
/XAN/

T0PS
PA:<

MACRO M1113

877

23-0CT-80 09:11

PAGE 64

)

SEQ 0049

MLG

22-0ct=1980 10:47:44

22-0¢*-1980 10:45:32

;

g;g

880 005111

102

881 005114
882 005117
883 005122
884 005125
885 005130
886 005133
887 005136
888 005141
889 005144
890 005147
891 005152
892 005154
893 005157
894 005162
895 005165
896 005170
897 005173
898 005176
899 005201
900 005204

114
040
105
104
105
122
105
117
040
063
000
045
101
"M
040
107
045
045
107
104

105
130
122
0460
106
105
122
122
045
045
000
101
111
116
122
072
117
101
117
040

902
903
904
905
906
907
908
v09
910
911

005212
005215
005220
005223
005226
005231
005234
005237
005242
005244

072
117
101
101
104
10
045
045
116
045

040
066
040
104
101
072
117
116
000
116

913 005252
914 005255
915 005260
916 005263
917 005266

101
117
116
125
124

107
123
107
116
040

901 005207

912 005247

918 005271
919 005274
920 005277
921 005300
922 005303
923 005306
924 005311
925 005314
926 005317
927 005322
928 005325
929 005330
930 005333
931 005336

101

117
116
000
045
1M1
104
125
104
M
040
125
045
045
106

124

104

102

.ASCIIl

123
106
105
102
117
040
122
072
104
116
106
114
107
105
040
066
040
117
104
101
045
045
102
040
124
040
066
045

P.AAP:

045

P.AAQ:

061
045

045
116

10
115
040
124
125
116
115
123
117
101
125

124
105
117
040
122
107
102
040
062
040
116

/LES/
/7 X®/
/ERE/
/D B/
/EFO/
/RE /
/ERR/
/OR:/
7 XD/
/3%N/
<00><00>
/XAF/
/AlLL/
/ING/
/ RE/
/G:
/%067
/%A /
/G0O/
/D D/

JASCID
JASCII
LASCII
.ASCI1
JASCII
JASCIT
LASCII
JASCIT
LASCIT
ASCII

/7 %X/
/706%X/
/A B/
/AD /
/DAT/
/A /
/%06/
/7XNX/
/N/<COD>
/INX/

LASCII
JASCII
LASCII
JASCII
LASCIT

/AGN/
/0S1/
/NG /
/JUNI/
/T X/

LASCII

116
1M
040
1M
045

P.AAR:

/188B/

LASCII
JASCII
LASCII
LASCII
LASCI1
ASCII
LASCI1
LASCII
JASCII
JASCIT
JASCIT
ASCII
JASCII
JASCIT
JASCII
JASCIT
LASCIT
LASCIT
JASCIT
JASCIT

LASCIT

LASCII
LASCI1
JASCIT
.ASCII
LASCIT
ASCII
LASCIT
LASCII
JASCI1
LASCI1
LASCIT
LASCIT
LASCIT
JASCIT

/ATA/

/ADL/

/01%/
/NXN/
<O
/XAY/
/IME/
/D 0O/
/Ut /
/DUR/
/ING/
/ MB/
/7uS /
/7%02/
/XA /
/FUN/

’
|S

‘

TOPS

PA:<

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

CIMLAAD ML=-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

933

23-0CT-80 09:11

103
045
000
045
116
045
124
000
045
124
045
000
045
124
045
116
045
124
045
124
000

045
116

116
000

124
000
124

045
000
045
116

P.AAS:

045
124
000

P.AAU:

124
045
124
000
124
045
124
045
000

045
124
0LS
000
045
124
045
116

P.AAV:

958 005435
959 005440
960 005443
961 005446
962 005451
963 005452
964 005455
¥65 005460
966 005463
967 005466
968 005471
969 005474
970 005477
971 005502
972 005505
973 005510
974 005513
975 005516
976 005520
977 005523
978 005526
979 005531
980 005534

124
045
124
045
000
045
124
045
124
045
116
045
124
045
124
045
124
000
045
124
045
124
045

045
124
045
116

04S

124
045
124
000

P.AAX:

124
045
124
045
124
000
124
045
124
045
124
045
000
124
045
124
045
124

045
124
045
124
045
000
045
124
045
124
045
16

P.AAY:

P.ABA:

045
116

045
124
045
124
045
124
000

124

045

P.ABB:

985 005551

986 005554
987 005557

SEQ 0050

JMLG

936 005341
937 005344
938 005347
939 005350
940 005353
941 005356
942 005361
943 005364
944 005366
945 005371
946 005374
947 005377
948 005400
949 005403
950 005406
951 005411
952 005414
953 005417
954 005422
955 005425
956 005430

981 005537
982 005542
983 005545
984 005546

22=-0ct=1980 10:47:44

22-0ct-1980 10:45:32

g%g

957 005432

PAGE 65

045

1264
045
000
045

124

045
124

045
000
124
045
116

124

045
124
045

124

045
124

P.AAT:

P.AAW:

P.AAZ:

LASCII
LASCIT
LASCIT
ASCII
LASCII
ASCII
LASCIT
LASCIT
ASCII
LASCIT
LASCIT
LASCIT
ASCII
LASCIT
LASCIT
JASCII
ASCII
JASCIT
LASCIT
LASCIT
ASCII

/CXN/
7AN/<COO>
<00
/%XTX%/
/N/<00><00>
/%T%/
/TUN/
<00><00>
/XTX/
/71XT/
/7XN/<O0>
<O
/XTX/
/1X1/
/XT%/
/N/<00><00>
/XTX%/
/1X1/
/XTX/
/TXN/
<00><00>

LASCIT
ASCIT
LASCIT
JASCII
LASCIT
.ASCII
JASCIL
LASCIT
ASCID
LASCIT
LASCIT
.ASCII
LASCIT
JASCIL
LASCIT
LASCIT
JASCII
LASCIT
ASCII
LASCIT
LASCIT
ASCIT
LASCIT

/71X1/
7XT%/
/1XT/
/XN/<OO>
<00>
/%T%/
/TX1/
/7XTX/
/71%1/
/7XTX/
/N/<00><00>
/%1%/
/1X1/
/XT1X/
/1XT/
/7%XT%/
/TXN/
<00><00>
/%XT1%/
/77X1/
/7XTX/
71X/
7XT%/

JASCIT

/71X

.ASCI]

LASCID
LASCIT
LASCIT
.ASCII
LASCIT
LASCIT

/7%7%/

71X/
7IN/<00>
<00>
/%XTX/
/7XT%/
/1%1/

TOPS

PA: <

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

989

045
124
045
116

124
045
124
000

045
124
045
000

997 005601
998 005604
999 005607
1000 005612
1001 005615
1002 005620
1003 005623
1004 005626
1005 005630
1006 005633
1007 005634
1008 005637

124
045
124
045
124
045
124
000
040
000
040
126

045
124
045
124
045
124
045
000
107

124
045
124
045
124
045
116

996 005576

1009 005642

045

104
137

045

P.ABC:

117

P.ABD:

122
122

P.ABE:

005645
005646
005651
005654
005657

009
040
106
040
1M1

000

11
000
117
000

114
000
120
000

1016 005665
1017 005670
1018 005673
1019 005676

104
040
117
040

000
107
104
120

000
117
000
101

131
117
040
116
101
104
040
124
124

040
124
107
105
124
000
104
105
105

116
000
105
122
105
000
105
103
104

105

122

P.ABM:

106
122

P.ABN:

125
116

P.ABO:

1015 005662

1020 005701

1021 005704
1022 005707
1023 005712
1024 005715
1025 005720
1026 005723
1027 005726
1028 005731
1029 005734

1030 005737
1031 005740
1032 005743
1032 005746
1034 005750
1035 005753
1036 005756
1037 005760
1038 005763
1039 005766
1040 005770
1041 005773
1042 005774
1043 005777

104

1264

22-0ct=-1980 10:45:32

040

122

000
040
122
123
040
124
000
040
122
107
040
000
040
m

102

1M1

101

124

CASCII
LASCIT
CASCIT
LASCII

/%T%/
/TR1/
/XTX/
/N/<00><00>

CASCII
CASCII
LASCIL
LASCIT
CASCIT
JASCIT
CASCIT
LASCII
ASCII
LASCII
.ASCII
LASCII

/T1X1/
/%TX%/
/T%1/
/%TX/
/TR1/
/XTX/
/TXN/
<00><00>
/ GO/
<00>
/ DR/
/V_R/

.ASCII

LASCII

P.ABF:
P.ABG:
P.ABH:

P.ABI:
P.ABJ:

P.ABK:

P.ABL:

117
000
101
105
000
104
111
000
101

122

126

P.ABP:

106
114

101
125

P.ABQ:

SEG 0051

22-0ct-1980 10:47:44

;

005562
005565
005570
005573

1010
1011
1012
1013
1014

PAGE 66

JMLG

gg?

992
993
994
995

23-0CT-80 09:11

/XTX/

/0Y/<00>

LASCIT
.ASCII
LASCII
.ASCII
LASCII

<00>
/ IL/
/F/<00><00>
/ OP/
/1/<00><00>

LASCII
L.ASCII
.ASCII
.ASCII

/D/<00><00>
/ GO/
/0D/<00>
/ PA/

LASCII
LASCI]
.ASCII
LASCII
CLASCIL
LASCII
L.ASCII
LASCI1
LASCI1

/Y N/
/07/<00>
/ GE/
/NER/
/ATE/
/D/<00><00>
/ DE/
/TEC/
/TED/

.ASCII

LASCII

LASCI1
ASCII
.ASCI1
LASCII
LASCII
LASCII
LASCIT
.ASCII
LASCII
ASCII
,ASCII
LASCII
.ASCII
CASCITD

/ BA/

/RIT/

<00>
/ ER/
/ROR/
/5/<00>
/ A#/
/TER/
<0G><00>
/ DU/
/RIN/
/G/<00>
/ AV/
<00>
/ FA/
s ILuy/

TOPS

PA:<

CZMLAAO ML-11

HARDWARD TEST

LOGIC

TESTY

MACRO M1113

SECTION

MLG

}829
006002
006005
006006
006011
006014

1054
1055
1056
1057
1058
1059
1060
1061

006022
006025
006030
006033
006034
006037
006040
006043

1063
10646
1065
1066
1067
1068
1069
1070
1071
1072

006051
006054
006057
006062
006065
006070
006073
006076
006101
006104

122
000
040
101
040
124
040
"M
116
000
040
000

1053 006017

1062 006046

1073 006107
1074 006112
1075 006115

1076 006120
1077 006123
1078 006126

006131
006134
006137
006142
006145
006150
006153
006156
006161
006164
006167
006172
006175
006200

1093 006203
1094 006206
1095 006211
1096
1097
1098
1099

006212
006215
006220
006223

105

000

101
000
101

126
000
124

127
124
107

122
1M
000

P.ABT:

126

FP.ABU:

040
116

106
103

125
000

P.ABV:

105
040
122
040
103
123
105
040
125
040

000
122
000
105
105
"
000
115
123
104

000
115
000
130
123
126
000
102
000
101

040
116

103
124

040

124

116
124
040

105
040
124
040
105
124
114
040
105
040
103
115
124
040

124
040
000
040
123
040
117

22-0ct=1980 10:47:44

1048
1049
1050
1051
1052

PAGE 67

SEQ 0052

1045

1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092

23-0(T-80 09:11

116

1264

000

122

101

000

125
13
101

10
125

M
000
117
000
102
000
122
101
122
000
101
600
116
105
116
000
111
000
126

125
000
120
115

116
000
122
000

000
14
000
120
115
125
131
1M
000
1M1
122
105
000
127

117
111

P.ABR:

P.ABS:

P.ABW:
P.ABX:

P.ABY:

P.ABZ:
P.ACA:
P.ACB:

P.ACC:
P.ACD:
P.ACE:

P.ACF:
P.ACG:

P.ACH:
P.ACI:
P.ACJ:
P.ACK:

22-0ct-1980 10:45:32
LASCII
LASCIT
ASCII
LASCII
LASCI1

LASCII

_ASCII
LASCIT
LASCII
LASCII
ASCII
LASCIT
ASCII
LASCIT

ASCII

LASCII
.ASCII
LASCII
.ASCII
LASCII
JASCII
LASCII
.ASCII
LASCII
.ASCI1

/RE/Z<00>
<00>
/ AV/
/7A/7<00><00>
/ A/
/TN/<OO>
/ WR/
/1T1/
/NG/<00>
<00
/ wv/
<00»>
/7 FU/
/NC/<00>

7/ TR/

/E/<00><00>
7/ RW/
/R/<00><00>
/ EX/
/CES/
/S1v/
/E/<00><00>
/ mMB/
/US/<00>
/ DA/

LASCII

/TA/<00>

LASCII
JASCIT
LASCII

/NUi/
/TY/<00>
/7 a0/

.ASCII
LASCII

/ co/
/NTL/

LASCII
.ASCII
LASCID
.ASCII
JASCII
LASCII
LASCIT
LASCII
JASCII
.ASCII
LASCII
LASCII
LASCII
LJASCII

/E/<00><00>
/ LB/
/1/<00><00>
/ PR/
/EMA/
/Tur/
/LY/<00>
7 1A/
/E/<00><00>
7/ IN/
/CRE/
/MEN/
/1/<00><00>
/ wl/

.ASCII
LASCIL
L.ASCII
LASCIT

7/ UN/
/5/<00><00>
/ PR/
/70M/<00>

JASCII
LASCII
LASCII

/TH/<00>
/ uv/
<00>

T0PS

PA: <

"CIMLAAQ ML-11 LOGIC TESY
'HARDWARD TEST SECTION

MACRO M1113

1101

B §
PAGE 68

;ML

}}8%
040

1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117

006231
006232
006235
006240
006242
006245
006250
006253
006256
006260
006263
006264
006267

1119
1120
1121
1122
1123
1124
1125

006275
006300
006303
006306
006311
006314
006316

116
040
122
040
11
000
040

1128 0906327

1118 006272

1126 006321
1127 006324

000
040
114
124
040
107
040
"M
105
040
000
040
102

108

105
040

006332
006335
006336
006341

101
000
040
106

1134 006347
1135 006350
1136 006353
1137 006356
1138 006360
1139 006363
1140 006366
1141 006370
1142 006373
1143 006376
1144 0N6400
1145 006403
1146 006406
1147 006411

000
040
125
000
040
114
000
040
123
000
040
122
040
125

1150 006420

040

1133 006344

1148 006414
1149 006417
1151 006423

105

105
000

122

P.ACL:

123
105
000
122
000

105
103

P.ACM:

105
000

P.ACN:

116
125

P.ACO:

064

P.ACP:

N
102

111
114

P.ACQ:

124
107
000
127
114
000
124

000
26
000
110
105

125
121
000
061

0460

P.ACS:
P.ACT:

000

117
137

106
123

P.ACV:

124

000

103
116
020
104
101
000
124
124
00C
101
123
103
116

117
124

P.ACW:

105
131

P.ACX:

105
123

P.ACY:

104
000
117
124
000

P.ACZ:

105

P.ADB:

105
105

P.ADC:

111

P.ADD:

122

000

040

P.ACR:

114

124

10«

1155 006436

122

124
124

116

000

22-0ct-1980 10:45:32
JASCI1

<00
/ SE/
/LEC/
/771/7<00>
/ RE/
7G6/<00><Cd>
/ UN/
/1Qu/
/E/7<00>
/ 14/
<00>
/ N1/
/BBL/

LASCII
ASCII
LASCII
LJASCII
LASCII
JASCII
L_ASCII

/NT/<00>
7/ GT/
/R/<00><00>
/ WHW/
/ILE/
<00><00>
/ TR/

LASCIT

/1T1/

LASCII
.ASCII

/E C/

/E/<00><00>
7/ IN/

LASCI1
LASCII
.ASCII
LASCID

7AL/<00>
<00»>
/ Of/
/F Sy

LASCIT
.ASCII
LASCII
JASCIT
.ASCII
LASCII
JASCII
ASCII
LASCIT
JASCII
.ASCII
LASCII
.ASCII
ASCII

<00>
/ co/
/UNT/
<00><00>
7/ DE/
/ZLAY/
<00><00>
/ TE/
/STS/
<00><00>
/ AD/
/RS/<00>
/ co/
/JUNY/

LASCIT

P.ADA:

/ OR/

LASCIT
_ASCII
LASCIT
LASCIL
ASCII
ASCID
.ASCII
LASCIT
LASCIL
LASCII
LASCIT
.ASCII
LASCII

LASCI1

000 |
116
"P.ACU:

000

040
123

103

000
111

107

1152 006426
1153 006431

1154 006434

117

SEQ 0053

22-0ct-1980 10:47:44

;

1104 006226

1129
1130
1131
1132

23-0CT-80 09:11

LASCII
LASCII
.ASCI]

LASCIT

.ASCII
JASCIT

LASCID
.ASCII

/EY/<00>

/ER/<00>
<00>
/ RE/

/G6/7<00><00>
/ TE/
/STE!

/D/<00>
/ N1/

TOPS

PA:<

CIM AAOD ML=-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

1157

(.
PAGE 69

sMLG

1160 006441
1161 006444
1162 006446

102
105
040

1164 006454

040

1163 006451

1165 006457
1166 006462

1167 006465

1168 006470

114

102
000
101
000

000

123
040

124
130

000
106

105

104

006472
006475
006500
006503
006504
006507

040
102
105
000
040
000

1177 006516
1178 006521

120
130

1264

122

000

114

22-0ct=1980 10:45:32

P.,ADE:

LASCII
LASCIT
ASCII

105

P.ADF:

ASCII

105

P.ADG:

116
102
123

111
114
000

P.ADH:

123

103

P.ADI:

040
114

115§
1264

125
1M1

P.ADJ:

1179 006524
1180 006526
1181 006531

000
040
105

000
125
130

1183 006537

105

104

1175 006510
1176 006513

1182 006534

1184 006542
1185 006545

1186 006550
1187 006553
1188 006556
1189 006560
1190 006563
1191 006566
1192 006571
1193 006574
1194 006576
1195 006601
1196 006604

1197 006607

1198 006612
1199 006615

1200 006620
1201 006623
1202 006626
1203 006630
1204 006633
1205 006636
1206 006641
1207 006644
1208 006646
1209 006651
1210 006654
1211 006657

105

040
124

117
123
000
040
124
117
103
000
040
040
123

116

040
124

040
065
123
040
124
105
117
000
040
124
105
000

114
105

103

102
040

124
105
000
102
040
124
114
000
116
122
120
103

101
105

061
040
000
104
101
122
122
000
102
040
124

105
122

MSCIT

JASCII
.ASCII

LASCII

LASCIT

L.ASCII
LASCII
JASCII
LASCIT
ASCII
LASCIT

LASCII
LASCIT

LASCID
LASCIL

116
120
124
000
111
116
040
124

P.ADK:

111
116
040
122

P.ADM:

117
105
117

P.ADN:

105

056
125
101
040
122
123

P.ADO:

111
123
000

P.ADP:

/ TE/

/7L/7<00><00>
/S1/<00>
7/ xf/
/ERE/

/D/7<00>

/ NI/
/BBL/
/ES/<00>
<00
/ sC/
<00

/ Mu/
/LT1/

/PLE/
/XER/

<00><00>
/ UN/
/EXP/

LASCII

/ED/<00>

.ASCII
JASCIT

/ECT/

7/ BI1/
/1 N/

LASCIT
LASCII
JASCIT
_ASCII
JASCIDT
LASCIDI
LASCII
LASCIT
.ASCI1
LASCII
LASCII

/0T /
/SEV/
<00><00>
/ BI/
/T N/
/07 /
/CLR/
<00><00>
/ NO/
/7 RE/
/SPO/

LASCIL
LASCII

7/ AF/
/TER/

JASCIT

106
122

/BBL/
/E/<00>
/ AL/

LASCIT
L.ASCII
JASCID

LASCII

P.ADL:

SEQ 0054

22-0ct=-1980 10:47:44

}}gg

1169
1170
1171
1172
1173
1174

23-0(T-8C 09:11

LASCIL
LASCIL
LASCIL
.ASCII
LASCIT
LASCI]
LASCII
CASCIE
.ASCII
LASCIL
ASCID
ASCID

/NCE/

/7 1./
/5 v/
/S/<00»
/ DA/
/TA S
/ERR/
/0RS/
<00><00>
7 BIl/
/1 S/
/E1/<00>
<O

TOPS

PA:<

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

1213

23-0(T-80 09:11

S
D
PAGE 70

;ML

}g}‘g

22-0ct=1980 10:47:44

;

1216 006660
1217 006663
1218 006666
1219 006671
1220 006672
1221 006675
1222 006700
1223 006703
1224 006706
1225 006711
1226 006714
1227 006717
1228 006722
1229 006725
1230 006726
1231 006731
1232 006734
1233 006737
1234 006740
1235 006743
1236 006746
1237 006751
1238 006752
1239 006755

040
124
114
000
040
040
110
040
1M
123
040
101
040
000
040
101
040
000
040
040
116
000
040
115

1241
1242
1243
1244
1¢45
1246
1247
1248
1249

116
040
117
040
126
040
111
040
105

1260 u0676N

006763
006766
006771
006774
006777
007002
007005
007010
007013

1250 007016
1251 007020
1252 007023
1253 007026
1254 007030
1255 007033
1256 007036
1257 007041
1258 007044
1259 007046
1260 007051
1261 007054
1262 007057
1263 007062
1264 007065
1265 007070

1266 007073
1267 007074

111

000
040
111
000
040
101
040
105
000
040
115
105
117
040
123
114

000
040

102
040
122

111
103
000

P.ADQ:

117
117
105

106
126
122

P.ADR:

126
000
103
123

105
000
114
123

103
123
102

114
123
000

P.ADT:

124
106
104

117
11
000

P.ADU:

115
040
132
107
116

105
123

P.ADV:

104

101

120
104

000
127
124
103

103
000
127
124
000
122
104
103
101
000
103
120
122
122
123
040
122

123

122

P.ADS:

000

000
117
000
122
000
122
105
110
113

P.ADX:

P.ADY:

122
105

P.ADZ:

105

P.AEA:

114
122

P.AEB:

117
040
122
000
131
103
000

P.AEC:

000

22-0ct=-1980 10:45:32

LASCII
JASCIT
LASCII
LASCIT
ASCI1
LASCII
LASCII
ASCI1
LASCILD
LASCIT
.ASCII
ASCI1
LASCII
LASCIL
LASCII
LASCII
LASCIL
LASCIT
ASCII
LASCII
LASCIT
LASCIT
.ASCII
JASCII

/ B8l/
/Y ¢/
/LR/<00>
<00
/ OFf/
/7 01/
/HER/
/ DR/
/1VE/
75/<00><00>
/ CL/
/ASS/
/7 A/<00»
<00>
/ CL/
/ASS/
7/ B/<00>
<0
/ 10O/
7/ F1/
/ND/<00>
<00>
/ WME/
/M S/

JASCII
ASCII
LASCIT
.ASCII
LASCIL
ASCI]
JASCII
LASCIT
LASCIT

/NG/<OD>
/ NO/
/70P/<00>
/ DR/
/v/<00><00>
/ MR/
/1TE/
/7 W/
/ECK/

JASCIT

P.ADMW:

P.AED:

P.AEE:

SEQ 0055

LASCIT
ASCI]1
JASCII
JASCIT
.ASCII
LASCII
.ASCII
LASCII
LASCII
.ASCII
LASCIT
LASCI]
LASCII
.ASCII
LASCIT
LASCIT

ASCIT
.ASCIIl

/1117

<00><00>
7/ MR/
/1TE/
<00><00>
/ RE/
/AD/<00>
7/ CL/
/EAR/
<00><00>
7 Co/
/MF /
/ERR/
/0R/<00>
/ Sv/
/S ¢/
/LR/<00>

<00>
[/ Sc/

T10PS

PA:<

CIMLAAD ML-11

HARDWARD

TEST

LOGIC

TEST

MACRO M1113

SECTION

1269

23-0CT-8C 09:11

JMLG

}%;?
007077
007102
007104
007107
007112
007115
007120

101
110
040
101
111
120
123

122
000
122
104
116
122
105

105
055
05,
105
124

P.AEF:

1280
1281
1282
1283
1284
1285
1286
1287
1288
1289

007124
007127
007132
007135
007136
007141
007144
007146
007151
007154

040
114
101
000
040
117
000
040
122
104

m
105
114

114
107
000

P.AEG:

101
122
000
101
040
137

102
124

P.AEH:

122
122
127

P.AEI:

1291
1292
1293
1294
1295
1296
1297

007162
007165
007170
007173
007174
007177
007202

040
117
102
000
040
106
123

1279 007123

1290 007157

1298
1299
1300
1501
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311

007205
007206

000

122

007227
007230
007233
007236
007241
007242
007245

000
040
122
000
040
115
125
000
040
105
114
000
040
113

1313 007253
1314 007254

000
040

1316
1317
1318
1319
1320
1321
1322
1323

102
000
040
m
101
132
040
103

007211
007214

007216
007221
007224

1312 007250
1315 007257

007262
007265
007266
007271
007274
007277
007302
007305

125

123

103

LASCII
LASCII
ASCII
JASCII
LASCIL
LASCI1
LASCII

LASCIT

.ASCII
LASCII
JASCID
LASCIT
LASCII
LASCII
LASCI1

/ GO/
/0D /
/BLK/
<00>
/ RE/
/FRE/
/SH/<00>

P.AEJ:

122
122
110

105
105
000

P.AEK:

0
101
000
122
055
123

122
131

P.AEL:

LASCIT
.ASCII

101

102
000

P.AEM:

_ASCII

117
122
117

126
106
127

P.AEN:

103
137

P.AEO:

115

110
123

000

114

101

P.AEP:

040

m
124
114
105
115
123

116
m
1M1
000
114
061

LASCIT

LASCII
LASCID

P.AEQ:

P_AER:

/RY/<00>

<00>
/ AR/

LASCIT
ASCII
LASCII
LASCIT
LASCIT
.ASCII
ASCIL

/RAY/
<00><00>
/ RA/
/m-B/
/US/<00>
<00>
/ ov/
/ERF/
/LOW/
<00>
/ CH/
/K S/

LASCI]
.ASCII

<00>
/ LA/

LASCIL
LASCIT
.ASCIl
CASCIL
CASCIT
LASCIL
.ASCI1
LASCIT

/BLK/
<00>
/ IN/
71T/
/ALL/
/1E/7<00>
/ ML/
7CSV/

LASCIL
LASCII

LASCIT

115

<00>

/ IL/
/LEG/
/AL/<00>
<00>
/ AB/
/ORT/
<00><00>
/ AR/
/R R/
/D_W/

117
040
113

114

/ARC/
/H/<00>
/ RE/
/AD-/
/IN=/
/PRE/
/SET/

.ASCII
LASCII
JASCII
LASCIT
ASCII
ASCI]
LASCIT
.ASCI]
LASCID
LASCII

000

1264

SEQ 0056

22-0ct=1980 10:45:32

124

107
104
114

22-0ct=-1980 10:47:44

;

1272
1273
1274
1275
1276
1277
1278

PAGE 71

CASCIL

/UuR/<00.
/ST /

TOPS

PA:<

MACRO M1113

HARDWARD TEST SECTION
1325

;ML&

1328 007310

1329
1330
1331
1332
1333
1334

007312
007315
007320
007323
007326
007331

1335 007334

1336 007337
1337 007342

1338 007345

000

040
104
049
105
040
115

040

101
040

000

116

000

105

061

000

105
040
104

062
115
061

000
114
000

104

062

000

105
040
105
040
120
101
116
122
117
040
104
105

105
115
114
115
104
123
103
117
125
115
125
040

000
114
000
114
000
131
110
116
123
117
114
106

131
110
116

P.AFI:

123
117
114
106
14
105

116
122
117

040
104
105
10
125
000

122

P.AFJ:

040

1347 007400

040

1353

007422

1354 007425
1355 007430
1356 007433
1557 00743¢
1358 007441
1359 007444
1360 007447
1361 007452
1362 007455
1363 007460
1364 007463
1365 007466
1366 007471
1367 007474

1368 007477
1369 007500
1370 007503
1371 007506
1372 007511
1373 007514
1374 007517
1375 007522
1376 007525
1377 007530
1378 007533
1379 007534

P.AEW:

101

1345 007372

1351 007414

P.AEV:

000

040

1352 007417

114

P,AEU:

124

1343 007364

1348 007403
1349 007406
1350 007411

000
1164

P AET:

104

040

1346 007375

123
115

115

P.AES:

000

1341 007356

1344 007367

114
000
114
000
114
000

101

040

1342 007361

115
123
115
122
115
122

104

1339 007350

1340 007353

000

120
123

040
040

101
125

000
123
103
117
125
115
125
040
m
122
000
101

115

115
115

115

115
115

1M
122

114

P.AEX:

114

P,AEY:

114

P,AEZ:

114

P_AFA:

114

P,AFB:

P.AFC:

114

P.AFD:

114

P.AFE:

P.AFF:
P.AFG:
P.AFH:

114
105

PAGE 72

SEQ (057

;

}%%g

F_5

23-0CT-80 09:11

ASCIT

LJASCII
ASCII
LASCII
LASCII
LASCII1
LASCIL

<00><00>

/7 ML/
/DS/<00>
/ wmp/

/ER/<00>
7/ mp/
/MR/<00>

LASCII

/ ML/

LASCI1

/DA/<00>

LASCIT

/DT/<00>

LASCIT
ASCI]

LASCII

JASCII

LASCIL

JASCIl

LASCII
ASCII

LASCI1

ASCII

LASCI1
_ASCII
LASCII
LASCII

/AS/<00>
/7 ML/
/7 ML/

/ ML/

/PA/<OO>
/ ML/

/SN/<00>
/7 wmL/

/E1/<00>
/ ML/

/E2/<00>
/ ML/
/D1/<00>
/ mMpL/

LASCIT

/D2/7<00>

LASCII
(ASCII
LASCII
.ASCII
LASCII
ASCII
LASCII
.ASCI1
LASCIT
LASCII
LASCII
LASCII

/EE/<00>
/7 ML/
/EL/<00>
/7 ML/
/PD/<00>
/ASY/
/NCH/
/RON/
/70US/
7 MO/
/DUL/
*/E ¥/

LASCIT
.ASCII
LASCI1
LASCI1
JASCIL
LASCIL
LASCID
LASCIT
JASCIT
LASCII
ASCIT
L.ASCII

<00
/SYN/
/CHR/
/0ONO/
/uUS /
/MOD/
/JULE/
/7 FA/
/71Lu/
/RE/<00>
<00>
/ARR/

.ASCII

JASCIT
LASCII

22-0ct=1980 10:47:644

22-0ct=-1980 10:45:8%2

/ ML/

/ALL/
/URE/

)

*
.

TOPS

PA:<

CIMLAAQ ML-11 LOGIC T EST

CIMLAAD ML=11 LOGIC T EST
HARDWARD TEST SECTION

MACRO M1113

1381

6. 5
PAGE 73

SEQ 0058

(ML

}%g%
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
16402
1403
1604
1405
1406
1407
1408
1409
1410
1411
1412
1413
16414
1415
16416
1417
16418
1419
1420
16421
1622
1423

23-0CT-80 09:11

22-0ct=1980 10:47:44

:
007537
007542
007545
007550
007553
007556
007561
007564
007566
007571
007574
007577
007602
007605
007610
007613
007616
007621
007622
007625
007630
007633
007636
007641
007644
007647
007652
007655
007660
007662
007665
007670
007673
007676
007701
007704
007707
007712

1424
1625 007714

1426 007714
1427 007722
1428 007722

1429 010320
1430 010320
16431 010322

1432 010322
1433 010324

16434 010326

101
104
101
117
114
106
114
105
11§
117
040
122
040
104
105
101
125
000
11
105
105
101
040
101
117
11
115
123
105
124
125
105
110
124
117
040
122
123

131
101
040
104
105
101
125
000
105
122
101
101
115
125
040
11
122

040
124
115
125
040
1M
122

115
13
122
131
117
114

P.AFK:

116
122
104
124
104
107
123
103

124
115
11
105
111
116
124
040
123
107

P.AFL:

117
114
123
117
114
120
122
122

P.AFM:

105
101
000
122
102
040
117
040
117
105

117
000

106
114
105

22-0ct-1980 10:45:32
LASCIT
LASCII
LASCIT
LASCII
LASCII
JASCII
LASCII
LASCII
.ASCII
LASCI]
LASCIT
LASCII
LASCII
LASCII
LASCII
JASCII
LASCII
LASCII
.ASCII
JASCII
LASCII
LASCII
LASCI1
LASCII
LASCII
LASCID
LASCII
JASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCIT

NIB.SAVE:

.BLKW
HW.OR.TBL:
BLKW
PIBL.PTR:
BLKW
OP .NUM.ARR:
.BLKW
ARR.INC: . .BLKW
600D .BLK :

/AY /
/DAT/
/A M/
/00U/
/LE /
/FAL/
/LUR/
/E/<00>
/MEM/
/ORY/
/7 AR/
/RAY/
7 MO/
/DUL/
/E f/
/AIL/
/URE/
<00>
/INT/
/ERM/
/EDI/
/ATE/
7 DI/
/AGN/
/0ST/
7IC /
/MES/
/SAG/
/E/<00>
/TRO/
/uBL/
/E S/
/HOO/
/1 L/
/00P/
7/ ER/
/ROR/
/5/<00>

3
177
1

1
1

T0PS

PA:<

HARDWARD

TEST

LOGIC

TESY

SECTION

14636

MACRO M1113

23-0CT-80 09:11

sMLG

14%;

BLKW
PAR.DJS:.BLKW

1443 010334
1444 010336
1445 010340

LST.BLK:.BLKW
ARR.16: .BLKW
LST.ARR:.BLKW

1
1
1

1447 011342
1448
1449 011354
16450 011662
1451 011664
1452 011664
1453 011666
1454 011670
1455 011672
1456 011674
1457 011674
1458 011676
1459 011676
1460
1461
1462
1463 011700
1664 011701
1465 011702
16466 011704
1467 011706
1468 011710
1469 011711
1470 C11712
1471 011713
1472 011714
1473 011715
1474 011716
1475 011717
1476 011720
1477 011721
1478 011722
1479 011723
1480 011724
1481 011725
1482 011726
1483 011727
1484 011730
1485 011731
1486 011732
1487 011733
1488 011734
1489 011735

STK.OFF:.BLKB
.EVEN
STACK:
.BLKW
PD.TEMP: .BLKW
w.C.SIZE:
.BLKW
RAS.INC:.BLKW
WT.DATA:.BLKW
RD.DATA:.BLKW
DRIVE.TYPE:
.BLKW
REG.INIT.FLG:
BLKW

(HIP.SI1Z:
BLKW

1446 010342

10.BUF:

.BLKW

000
000
004000
173701
160200
000
000
000
000
000
000
000
000
000
000

ML.REG::.BYTE
.BYTE
.WORD
.WORD
.WORD
BYTE
.BYTE
.BYTE
.BYTE
BYTE
BYTE
.BYTE
.BYTE
.BYTE
.BYTE

000
000
000
000

BYTE
.BYTE
BYTE
BY'E
.BYTE
BYTE
.BYTE
.BYTE
.BYTE

000
000
000

000

000
000
000
000

SEQ 0059

22-0ct=-1980 10:45:32

1439 010326
1440 010330
16441 010332
1442 010332

22-0ct=1980 10:47:44

PAGE

.BYTE
.BYTE
BYTE

400

143
1
1
1
1
1

1
1

0
0
4000
-4077
-17600
0
0
0
0
0
0
0
0
O
O
O
0
O

0
0
O
0

0
O
0
O

TOPS

PA:<

T r

CIMULAAD ML-11

CIMLAAQ ML-11 LOGIC TEST
HARDWARD TEST SECTION

149N
}23%

23-0CT-80 09:11

5
1
PAGE 75

JMLS
;

1494 011736
1495 011737

1496
1497
1498
1499
1500

011740
011741
011742
011743
011744

000
000
000
000
000
000
000

1502
1503
1504
1505
1506

011746
011747
011750
011751
011752

000
000
000
000
010600

1501

MACRO M1113

011745

000

1507 011754
1508 011756
1509 011760
1510 011761
1511 011762

025077
000100
000
000
000

1513
1514
1515
1516
1517

011764
011766
011767
011770
o7

014620
000
000
000
000

1520 011774
1521 011775
1522 011776
1523 012000
1524 012001
1525 012002
1526 012003
1527 012004
1528 012006
1529 012007
1530 012010
1531 912011
1532 012012
1533 012013
1534 012014
1535 012015
1536 012016
1537 012017
1538 012020

000
000
177400
000
000
000
000
100000
000
000
000
000
000
000
000
00
000
000
000

1512 011763

1518 011772
1519 011773

1539 012021
1540 012022
1541 012023
1542 012024
1543 012026
1544 (12030
15645 012031

.BYTE
BY'E
BYTE
BYTE
BYTE
.BYTE
BYTE

0
0
O
0
0
0
O

.BYTE
BYTE
BYTE
.BYTE
.WORD

0
0
O
O
10600

.WORD
.WOkD
.BYTE
.BYTE
.BYTE
BYTE

.WORD
.BYTE
BYTE
.BYTE
.BYTE

000
000

000
000
000
000020
177400
000
000

22-0ct=1980 10:47:44
22-0ct=-1980 10:65:32

.BYTE

000

BYTE
.BYTE

BYTE
.BYTE
.WOkD
.BYTE
.BYTE
.BYTE
.BYTE
.WORD
.BYTE
.BYTE
BYTE
.BYTE
.BYTE
BYTE
.BYTE
BYTE
.BYTE
.BYTE
.BYTE

SeQ C060

.BYTE
BYTE
BYTE
.WORD
.WORD
.BYTE
.BYTE

25077
100
0
0
0
O

14620
0
O
0
O
0
0
0
0
=400
0
0
0
O
-100000
0
0
0
0
0
O
0

0
0
0
O
0
0
0
20
=400
0
0

T0PS
PA:<

CIMLAAD ML-11

LOGIC TEST

HARDWARD TEST SECTION

1547
}gzg

23-0CT-80 09:11

‘MLe
;

1550 012032
1551 012034
1552 012036
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563

012040
012041
012042
012043
012044
012045
012046
012047
012050
012051
012052

1566
1567
1568
1569
1570
1571
1572
1573
1574
1575

012056
012057
012060
012061
012062
012063
012064
012066
012067
012070

1564 012053
1565 012054

1576 01207
1577 012072

1578 012073
1579 012074

1580 012075
1581 012076
1582 012077
1583 012100
1584 012101
1585 012102
1586 012103
1587 012104
1588 012105
1589 012106
1590 012107
1591 012110
1592 012111
1593 012112

1594
1595
1596
1597
1598
1599
1600
1601

MACRO M1113

012113
012114
012116
012117
012120
012121
012122
012123

000110
177666
009001

000
000
000
000
000
000
000
000
000
Goo
000

SEQ 0061

22-0ct=1980 10:47:44
22-0ct-1980 10:45:32
.WORD
.WORD
.WORD
.BYTE
BYTE
.BYTE
.BYTE
.BYTE
BYTE
BYTE
.BYTE
.BYTE
.BYTE
.BYTE

000
140300
000
000
000
000
000
000
100300
000
000
000
000
000
000
000
000
000
000
000
000

.BYTE
.WORD
BYTE
.BYTE
.BYTE
.BYTE
BYTE
.BYTE
.WORD
/7
.BYTE
.BYTE
BYTE
.~ .BYTE
.BYTE
.BYTE
» .BYTE
o, .BYTE
.BYTE
.BYTE
BYTE
.BYTE

000
000

.BY1e
BYTE

0Co
000
000
000
000
000
000
000
000
000
010000
000
000
000
000

5
J
PAGE 76

.BYTE
.BYTE
.BYTE
BYTE
.BYTE
BYTE
.BYTE
.BYTE
BYTE
.BYTE
.WORD
BYTE
.BYTE
.BYTE
BYTE

110
=112
1
0
O
0
0
0

0
0
O
0
0
€
0
=37500
0
0
0
0
0
0
-775C0
0
O
0
0
0
0
0
0
0
0
0

0
0
0
0
O
0
0
0
0
0
10000
0
0
0
0

0
O

TOPS
PA:<

CZMLAAD ML-11

HARDWARD TEST

1603

1604
1605
1606
1607
1608
1609

1613 012133

1638
1639
1640
1641
1642
1643
1644
1645

1646
1647
1648
1649
1650

1651
1652
1653
1654
1655
1656
1657

TEST

SECTION

012134
012135
012136
012137
012140
012141
012142
012143
012144
012145
012146
012147
012150
012151
012152
012153
012154
012155
012156
012160
012162
012164
012166
012170

MACRO M1113

23-0CT-80 09:11

K_
S
PAGE 77

JMLG

012124
012125
012126
012127
1610 012130
1611 012131
1612 012132

1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637

LOGIC

000
000
000
000
000
000
000

.BYTE
BYTE
BYTE
.BYTE

BYTE
BYTE
.BYTE

O
0
0
0
0
0
0

000
000
000
000
000
000
000
000
000
000
000
000
000
000
000
000
000
000
000000

.BYTE
.BYTE
BYTE
BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
BYTE
BYTE
.BYTE
.BYTE
.BYTE
BYTE
.WORD
RH.ADD::.BLKW
RH.TYP::.BLKW
RH.VEC::.BLKW
ML.LUN::.BLKW
ML.DUT::.BLKW

0
0
0
0
0
0
0
0
0
O
0
O
O
0
0
0
0
0
O
1
1
1
1
1

100000
040000
020000
010000
004000
002000

BIT15==
BIT14==
BIT13==
BIT12==
BIT11==
BIT10==

-100000
40000
20000
10000
4000
2000

000920
000010
000004
000002
000001
001000
000400

BIT04==
BIT03==
BIT02==
BIT01==
81700==
8119==
B]T8==

20
10
4
2
1
1000
400

000

001000
000400
000200
000100
000040

.BYTE

B81709==
B8I1108==
BI1T07==
BI1706==
B81105==

SEQ 0062

1000
400
200
100
40

147:464

5:32

TOPS

PA:<

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

1659
1660

1661
1662

1663
1664
1665
1666
1667

1668

1669

1670

1671
1672
1673
1674
1675
1676
1677
1678
1679

1680
1681
1682
1683
1684
1685

1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1705‘\
1709
=
1710
171
1712
1713

MAZRO M1113

23-0CT-80 09:11

PAGE 78

5
SEQ 0063
4 7:44

JMLG
.

000200

000100
000040
000020
000010
000004

000002
000001

000040

000037
000036
000035
000034
000340
000300
000240
000200
000140

000100
000040
000000
000004
000010
000020

000040
000100
000200
000400
001000
002000
004000
010000
020000
040000
100000
004164
004224
004312
004336
004366
004470
004520
004546
004602
004634
004706
004742
004772
005046
005106
005154
005244

BIT7==
BITé==
BIT5==

200
100
40

BIT?==
BIT1==
BIT0==
EF.START==
EF .RESTART==

4
P4
1
40
37

PR107==
PRI06==
PRI0S==
PR104==
PRI03==
PRIQ2==
PRIO1==
PR100==

340
300
240
200
140
100
40
0

LOT==
ADR==
1DU==
ISR==

10
20
40

BlT4==
BIT3==

EF.CONTINUE==
EF .NEW==
EF .PWR==

FVl==

UAM==

20
10

36
35
34

100
200

BOE==
PNT==
PRl==
IXE==

400
1000
2000
4000

FMT .=
FMT.2=
FMT.3=

P.AAA
P.AAB
P.AAC

IBE==
JER==
LOE==
HGE==

FMT. 4=

FMT.5=
FMT.6=
FMT.7=

FMT,.8=

FMT.9=
FMT.10=
FMT.11=
FMT.12=
FMT . 13=
FMT,14=
FMT.15=
FMT.16=
FMT 17=

10000
20000
40000
-100000

P.AAD

P.AAE
P.AAf
P.AAG

P.AAN

P.AAI
P.AAJ
P.AAK
P.AAL
P.AANM
P.AAN
P.AAC
P.AAP
P.AAQ

4 5:32

T0PS

PA:<

CIMLAAO ML=-11 LOGIC TESY
SECTION

PAGE

23-0CT-80 09:11

-iacilnciacinclncinelin-dacRa ol inclnclncinclncleclncin
-Racineiaoinelnedncin:Rncdnchncincinciy:iine
iy diye)
R-R-R-h-h-h-h-h-la-TacR -l

NOWVIL NN —=O I

b — —

SOV
=2 OONO NS WA

WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD
.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.

WRD.
WRD.
WRD
.

b b b b 2 2 2 O QO N O N SN

I 18t

—

NIN.FMT=
TEN.FMT=
ELV.FMT=
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.
WRD.

SIX.FMT=
SEV.FMT=
EIG.FMT=

.AAR
<AAS
<AAT
.AAU
.AAV
<AAW
.AAX
<AAY
.AAZ
.ABA
.ABB
.ABC
.ABD
.ABE
. ABF
.ABG
.ABH
.ABI
.ABJ
.ABK
.ABL
.ABM
.ABN
.ABO
.ABP
.ABQ
.ABR
.ABS
.ABT
.ABU
.ABV
.ABW
. ABX
.ABY
.ABZ
.ACA
.ACB
<ACC
<ACD
.ACE
+ACFH
ACG
.ACH
.ACI
ACY
.ACK
JACL

L R

FOR.FMT=
FIV.FMT=

105630

005634
005646
005654
005662
005670
005676
005712
005726
005740
005750
005760
005770
005774
006006
006014
006022
006034
006040
006046
006054
006062
006076
006104
006112
006126
006134
006142
006156
006164
006200
006206
006212
006220
006226
006232
006242
006250
006260
006264

FMT.18=
ONE.FMT=
TWO.FMT=
THR,.FMT=

B B UAN LN AN AN N AN AN AN AN RN RO PO MNP RNO NI NN

005414
005632
005452
005474
005520
005546
005576

SEQ D064
5:32

005300
005350
005356
005366
005400

7:44

JMLG

-t OO

b —
d
D
D
D
e
D e
d
D
D
D
D
D
D
D
d
b
D
d
D
d
e
e

~N~ N N N N S

S N N
Y S N S N S N N Y~ ~
—
Hw N AN N N AN NN A A NI PO PO RO A NI PRI PO NN — = 3
(@]
e ONONSNWN
2OV
NO NS NN 2OV~ N

HARDWARD TEST

MACRO M1113

ACK
<ACN
.ACO
ACP
.ACQ

TOPS

PA:<

CIMLAAO ML=11

HARDWARD TEST

LOGIC

T EST

MACRO M1113

SECTION

PAGE 80

SMLG

};;%

006300
006306
006316
006324
006336

WRD.42=
WRD.43=
WRD . 44=
WRD.45=
WRD . 46=

006400
006406
006420

WRD.47=
WPD.48=
WRD.49=
WRD.50=
WRD.51=
WRD.52=

1786
1787
1788
1789
1790

006436
006446
006456
006462
006472

WRD . 54=
WRC.55=
WRD.56=
WRD.57=
WRD. 58=

P.ADD
P.ADE
P.ADF
P.ADG
P.ADM

WRD . 60=
WRD.61=
PHR.1=
PHR. 2=
PHR. 3=
PHR.4=
PHR.S=
PHR. b=
PHR. 7=
PHR. 8=
PHR.9=
PHR.10=
FNC.1=
ENC.2=
FNC.3=
ENC.4=
ENC.5=
ENC.6=
FNC.7=
FNC.8=
FNC.9=
FNC.10=
FNC.11=
FNC.12=
FNC.13=
FNC.14=
FNC.15=
FNC.16=
ENC.17=
FNC.18=
FNC.19=

P.ADJ
P.ADK
P.ADL
P.ADM
P.ADN
P.ADO
P.ADP
P.ADQ
P.ACR
P.ADS
P.ADT
P.ADU
P.ADV
P.ADW
P.ADX
P.ADY
P.ADZ
P.AEA
P.AEB
P.AEC
P.AED
P.AEE
P.AEF
P.AEG
P.AEM
P.AEL
P.AEJ
P.AEK
P.AEL
P.AEN
P.AEN

1791

006350
006360
006370

006426

006510
006526
006542
006560
006576
006630
006646
006660
00667006214
006726
006740
006752
006766
006774
007002
007020
007030
007036
007046
007062
007074
207104
007124
007136
007146
007162
007174
007206
007216
007230

1824
1825

007254
007266

1823

007242

P.ACZ
P.ADA
P..ADB

P ADC

WRD . 59=

FNC.21=
FNC. 2=
FNC.23=

22-0ct=1980 10:45:32

P.ACW
P.ACX
P.ACY

WRD.53=

006504

1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1503
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822

22-0ct-1980 10:47:44

P.ACR
P.ACS
P.ACT
P.ACU
P.ACV

1779
1780
1781
1782
1783
1784

1785

S
SEQ 0065

1771

1774
1775
1776
1777
1778

23-0CT-80 09:1!

P.ADI

P.AED
P.AEP
P AEQ

TOPS

PA:<

CIMLAAD ML=-11 LOGIC T EST
HARDWARD TEST SECTION

MACRO M1113

1827

23-0(T-80 09:11

PAGE 81

22-0ct=1980 10:47:44

c2=-0ct=-1980 10:45:32

1830
183

007302
007312

REG.1=
REG.2=

P.AER
P.AES

1833
1834
1835
1836

007326
007334
007342
007350

REG.4=
REG.S=
REG.6=
REG.7=

P.AEU
P.AEV
P.AEW
P.AEYX

187

1838
1839
1840
1841

1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852

1853

1854

1855
1856
1857
1861 012172

007320

REG.13=
REG.14=
REG.15=

007716

D2.TEMP=

007436
007444
007500
007534
007566
007622
007662
007714

016600

1879 012250

006300
066007
000022
000040
000056
000074
000112
000130
000156
000174
000240

005003

P.AFB
P.AFC

P.AFD
P.AFE
P.AFF

REG.16=
ASYN(=
SYNC=
ARR.DAT=
MEM.ARR=
INTER=
TRBLE.LOOP=
D1.TEMP=

007720

1867 012214

P.AEZ
P.AFA

REG.11=
REG.12=

007414
007422
007430

012702
060102
016601

P.AEY

REG.9=
REG.10=

007400
007406

P.AFG
P.AFH
P.AFI
P.AFJ
P.AFX
P.AFL
P.AFM
NIB.SAVE

NIB.SAVE+?2

£E2.TEMP=

171626
000012

JSR
MOV

R1,8SAVED
12(sP) R

MOV

12(s5P),RO

MOV
ADD
MOV

000014

000012
012226

NIB.SAVE
+4

| DAD.STACK:

011342

1%:

2%:

T0PS

PA:<

P.AET

REG.8=

007364
007372

004167
016601

1868 012220
1869 012222
1870 012226
1871 012230
1872 012232
1873 012234
1874 012236
1875 012240
1876 012242
1877 012244
1878 012246

REG. 3=

007356

1862 012172
1863 012176

1864 012202
1865 012206
1866 012210

SEQ 0066

JMLG

}ggs

1832

ASL
ADC
.WORD
.WORD
.WORD
WORD
.WORD
.WORD
.WORD
.WORD
LMWORD

(LR

#STK ,OFF ,R2
R1,R2
14(SP) R

RO
1$(R0O) ,PC
2%-1%
3%-1%
4%-1%
5%-1%
6%-1%
7%-1%
9%-1%
10%-1%
14%-1%

;
; NIB.PIR,*
:

STK.PIR,*

2026
2081

; NIB.PTR,»

2077

;

2081

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

PAGE 82

t:uWU"WWV‘WWWWWWWWWWV‘WWNNNNNNNNNN

NS0
N NTNINININ) = b 2 OO O NNNNO OO NN
STNOONOLSNOSSNNOO N NOOMSOo
N
NT1. W 3 Sl RSO

38:

CLR
BI1SB
MoV

suB

175412

MOv

175374

5%:

CLR

BISB
Mov
SuB
MOV
BR
CLR
BISB
MOV

175356

6$:

SuB
MOV
BR

CLR
B1S8
MOV

suB

175342

MOV

7%:

BR
CLR
B1SB
MOV

175324

000422
005003

suB

8%:

9%:

151203

010100
160300

016703
000412
005003
151203
010100

175276

016703
006203
006203

175260

160300

10$:

MOv
ASR
ASR
ASR
ASR
BR

MoV
suB
MOov
B8R

(R2) ,R3

R3.RO
NIB.SAVE,R3
13¢
R3
(R2) ,R3

R3,RO
N1B.SAVE
,R3
8%
R3
(R2),R3
R1,R0
R3.RO
NIB.SAVE,R3
128
R3
(R2) ,R3

2089

2093

R3.RO
NIB.SAVE,R3

18
R3
(R2)

R1,R0

2097
,R3

R3.RO
NIB.SAVE+2,R3
138

R3
(R2),R3

2101

R1,RO

R3,R0
NIB.SAVE+2,R3
R

2105
R3.RO

NIB.SAVE+2,R3

CLR
8158

SuB

R3.RO

ASR
ASR

2085

R1,R0

128
R3
(R2) ,R3

MOov

TOPS

PA:<

R1,RO

CLR
8158

Mov

118:

SEQ 0067
44

MOV
suB
MOV

175430

: 32
B1S8

(=] OQO~N~N~NOOOO

D o
o
o
e
— o

~N [=T. W

a S

kb
i o o

D o

d od

D ok

N1 NTNT NI ST ST ST ST ST NI ST ST ST NI ST T 8 8 S L S S S I L S

D
o

~N N [LSTST,STNTNTNTNT,NT ST
» £ W W A A A N

pry

WO 00~
NV
NO VNS NN =200
VWA 2 OOV

0
o
W

d o

D o e

e e e

e e

D o

d e

d -l

VO O0O0VO0O0OLCO VOO OVOOVOVOVOVOOVOOVELC OVOVOVOO ©
W AN AN AN N
NI N NN NN CORINPIN) = D b d e e b b b 2 OO [=]

d d b b e

SECTION

23-0CT-80 09:11

JMLS
e
elelelelelolelelalelolelele) (elalalalelalalolelelolelelalelalalelalalolalolalolalolalalelelolalolalale]

1881
1882
1883
1884
1885
1886
1887
1888

MACRO M1113

R1,RO

NiB.SAVE+2.R3

R3
R3

2109

CIMLAAD ML-11 LOGIC TESTY

MACRO M1113

HARDWARD TESY SECTION

1937

006203
006203
000303

1944 012454

105060

1943 012450
1945 012460

1946 012464
1947 012466
1948 012470
1949 012472
012474
012500
012502
012506
012512

}ggz 012516

1964

6
SEQ 0068

22-0ct=1980 10:47:44

1940 012442
1941 012444
1942 012446

1957
}ggg

PAGE 83

;MLG

}g%g

1950
1951
1952
1953
1954

23-0CT-80 09:11

042703
150360

000207
005003
151203
160301
016703
000303
042703
105061
150361

000207

177760

0113564

12%:

13%:

011354

14%:
175220

177760
011354
011354

22-0ct=1980 10:45:32
ASR
ASR
SWAB

BIC

CLRB

#177760,R3

STACK(R()

R3,STACK(RD)

BISB
SuB
MOV
SWAB
BIC
(LRB
8158

(R2),R3
R3,.R1

RTS

;
;

R3
R3
R3

BISB

RTS
(LR

T0PS

PA:<

PC
R3

NIB.SAVE
¢4 ,R3
R3
#177760,R3
STACK(R1)
R3,STACK(RY)

Routine Size:
107 words
Maximum stack depth per invocation:

& words

:
:

2077
2113

2026

CIMLAAD ML=-11

MACRO M1113

0GIC TEST
HARDWARD TEST S ECTION
1966 JMLG
1967 ;
1968
1969
1970
1971
1972
1973
1974
1975

2003

¢V04
2009
2010

E
6
B84

SEQ 0069

2O 00

NO NS NN
=2 OO0V

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (7)

novalue =

FUNCTIONAL DESCRIPT]ON:
A REPEATEDLY CALLED SEQUENCE OF
ASSIGNMENT EXPRESSION TO LOAD
THE DSA, BUS ADRS AND WORD COUNT
REGISTERS WITH APPROPRIATE INFORMATION

BEFORE MASS BUS
COMMENCE
.

TRANSFERS CAN

LOADS A MASS_BUS BLOCK
BLOCK ZERO.

XFERR AT

NN
CONO VNS

routine FIRST_BLK_XFER

b
ad
b
d
d
d
b
b
d
D
b
b
b
b
e

AN AN AN AN AN NI N PO PO NI NV PO TNV NN

b
b

A
U

eh
b
b

1986

WA U

AN NINIAIAOINOINLINIMNLNL
NI
NNV NN

1977
1978
1979
1980
1981
1982
1983
1984
1985

IEROES;
10_BUF;

.LOAD THE DSA REG WITH SECTOR ZERO
'LOAD THE BUS ADDRESS REG WITH 10 _BUF

not 255;

ADRS

'LOAD WORD COUNT REG WITH COMPLIMENT 256

;

Routine

Size:

#-400,3ML.REG+10
9 words

; Maximum stack depth per

)

invocation:

0 words

il cured

:
:

QO ~NO
N

RTS

aML.REG+30
#10.BUF ,aML .REG+20

CLR
MOV
MOV

6
0

— NN
AN

FIRST.BLK.XFER:

—

540

005077
012777
012777
000207

[aW1,N1,V],§)

520

s O

b
b
b
d
-

[aS 1 S 1,1,
81 ,§)
NN
WO N

[

OOOOO

2000
2001
2002

PAGE

44
132

1976

1987
1988
1989
1993
1997
1998
1999

23-0CT-80 09:11

CZMLAAD ML-11 LOGIC TEST
HARDWARD TESY SECTION

MACRO M1113

23-0(7-80 09:11

PAGE 85

22-0ct=-1980 10:47:44
22-0ct=-1980 10:45:32

2012 ;MLé
gg}z :
[4

2015 ;

2016 :
2017
2018 :

2019
2020
2021
2022
2023
2024
2025
2026

;
;
;
;

2027 ;

2139

routine GD_BLK_XFER : novalue =

2163
21464
2145
21466
FATY
2148
2149
2150

4o
' FUNCTIONAL DESCRIPTION:
!
A REPEATEDLY CALLED SEQUENCE Of
!
ASSIGNMENT EXPRESSIONS TO LOAD
THE DSA, BUS ADRS AND WORD
!
COUNT REGISTERS WITH APPROPRIATE
AR
INFORMATION BErORE A MASS BUS
!
TRANSFERS CAN COMMENCE
!
LOADS A MASS BUS BLOCK XFERR
!

2140
2141
2142

2151

2028 ;
2029
2030 ;
2031
2032
2033
2034 ;

2152
2153
2154
2155
2156
2157
2158

2037 ;

2161

2035 ;
2036 ;

2038 ;
2047
2046 012542

2047 012542
2048 012550

2049 012556

2050 012564
5825 012572
2053
5823

SEQ 0070

AT THE GOOD BLOCK ADRS FOUND

BY THE READ WRITE ARRAYS WITH
PROM DATA TEST

!
!
!
. --

begin

ECC_DIS = ONE;

'DISABLE ERROR CORRECTION

MLWC = not 255;

'LOAD WORD COUNT REG WITH TOMPLIMENT 256

2159
2160

MLDR = .GOOD BLK;
MLBA = 10_8BUF;

2162

end;

152777
016777
012777
012777
000207

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (8)

000002
175552

177250
177152

177400

177116

010342

177134

'LOAD DSA REG WITH THE GOOD BLOCK ADRS
'LOAD BUS ADRS REG WITH [0 _BUF ADRS

GD.BLK.XFER:

BISB
MOV

#2,3ML.REG+120
600D .BLK ,aML .REG+30

MOV
RTS

#-400,3ML.REG+10
PC

MOV

;
;
;

#10.BUF ,aML.REG+20

, Routine Size:
13 words
: Maximum stack depth per invocatior:

0 words

2158
2159

2160

2161
2139

2109

novalue =

Yes
]

i
i
i
i

FUNCT] ONAL DESCRIPTION:
A REPEATEDLY CALLED

SEQUENCE Of
ASSIGNMENT EXPRESSIONS TO LOAD
THE DSA, BUS ADRS AND WORD

COUNT REGISTERS WITH APPROPRIATE
INFORMATION BEFORE A MBUS

!
i
i
i
i
i

TRANSFER

CAN (OMMENCE

LOADS A MASS BUS BLOCK
TRANSFER
ADDRESS

THE

LAST

BLOCK

begn
EC
DIS = ONE;

'DISABLE ERROR CORRECTION
'LOAD DSA REG WITH THE LAST BLOCK ADRS
'LOAD BUS ADRS REG WITH THE [0_BUF ADRS
'LOAD WORD COUNT REG WITH COMPTIMENT 256

end;

000002
175526
010342
177400

= 10_8BUF;
= not 255;

177216

177120

LAST.BLK.XFER:
BISB

#2,aML.REG+120

;

MOV

#10.BUF ,@ML .REG+20

;

RTS

MOV

177102

177064

MOV
;

Routine Size:

LST.BLK,8ML.REG*+30

#-400,aML.REG*+10
13 words

; Maximum stack depth per

invocation:

;
0 words

MLBA
MLW(

MLDA = ,LST_BLK;

O~ 0D OO OO O
[V
YV 1,
S

016777
012777
012777
000207

N1, N1U],V

152777

routine LAST_BLK_XFER

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4L.BLLI.2 (9)

2O 000 NON N
NO VWA
=2 OOV

d
d
e
d
D
D
e
D e
D
D
b o
D
b
D
b
D
d
b

PRI
P Y
PRI
YT
FEIPN

SEQ 0071

—

2100
2101
2102
2103
2108

6
PAGE 86

2099

R
IR T

2071
2072
2073
2074
2075
2076
2077
2078
2079
2080
2081
2082
2083
2084
2085
2086
2087
2091
2095
2096
2097
2098

YEYTETTRETIE

2066
2067
2068
2069
2070

23-0(7-80 09:11

44
132

2062 JMLG
2063
2064
2065

MACRO M1113

SECTION

VSN

TEST

OO0
NNN NN NNV ~N~NOoOrOrOOOO

HARDWARD

TEST

LOGIC

NIAAL AN A AR NN AN A A NIRRTV NN NN

CIMLAAD ML-11

TEST

CIMLAAD ML=-11 LOGIC

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

SEQ 0072

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

JMLS
:

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4L.BLI.2 (10)

novalue =

lee

routine DAT_DM_XFER
!

FUNCTIONAL

DESCRIPTION:

e
D
e
s
e
d e
d
b

b
D
D
D
D
D
D
D
e
D
D
)
d
D e
D
d

NI N AN

D emd
—d o

)

PORNLRIRLIRAINIAL VNNIRNINLALNLRAL AL NI NI

NANUAWVINAWNES B 8 8 8 8 (NN
N W N AN N NI PO PO N NN RO NI NIND) —d b ad ed b e ocd s
VBN
2OV
NOWN= YO NS WN =20 000NN
NN = O 000 O
BN

NN AL A AL AI NI N AN AN NI N AD N

r48)

TEST

AINNIND NN NN NN

HARDWARD

A REPEATEDLY CALLED SEQUENCE

'
!
!
!

OF ASSIGNMENT EXPRESSIONS TO
LOAD THE DSA, BUS ADRS
AND WORD
COUNT REGISTERS WITH APPROPRIATE
INFORMATION BEFORE A MASS BUS

LOADS A MASS BUS BLOCK TRANSFER,

TRANSFER

!
;

CAN COMMENCE

IN DIAGNOSTIC MODE,
BLOCK ADRS.

THE

GOOD

beqin
DAY
DM = ONt;

2208
2209
012626

012626
012634
012642
012650

012656

152777
016777
012777

012777
000207

'SET DATA DIAG MODE

MLDR = .GGOD BLK;
MLBA = 10_BUF;
ML:C

= not

°55;

'LOAD DSA REG WITH THE GOOD BLOCK ADRS
.LOAD BUS ADRS REG WITH THE 10_BUF ADRS

'LOAD WORD COUNT REG WITH COMPLIMENT

256

eng,

000010

177164

010342

177050

175466

1776400

DAT.DM.XFER:

177066

B1SB

#10,3ML.REG+120

MOV

#10.BUF
,aML .REG+20

MOV

177032

MOV
RTS

;

Routine Size:

Maximum

stack

;

GOOD.BLK ,aML .REG+30

;

#-400,aML .REG+10
PC

13 words

depth

per

)

invocation:

0 words

2205
2206
2207
2208
2186

CZMLAAD ML-11 LOGIC TEST

MACRO M1113

6
|
PAGE 88

SEQ@ 0072

JMLG

;

2238

:
:
;
:

2240
2241
2242
2243

NINLALNLNLALNINL
AL AN NN NI NN NN N NI NN
N
NOALRAIRIACAI
NI NIAL NN NI RPN NI NN NA) NN
NN
AL NAOND
W AN WA
N AN AN NP PO RO RO RONI N PIRNIND) = D b b ed D D b s b

routine TST_LNG_WRD

NO WS

=2 O 000 NN

X
TR
TRFN
TR
TR
TR
IR

=2 OV

d
D
D

VNS AN

D o

D o
h
ed o
e
b e

%%%} :

2203 ;

;
;
;
;

%583 :

2210 ;

2211 ;
2212 ;
2213 ;

2214 ;

2215 ;

2244
2245
2246

ERR_FLG)

0 10:45:32

T0PS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (11)

novalue -

lee
1

2239

(NIB_NUM. NIB_PAT.

0 10:47:44

egin

D rd
D
D
e
e
D o
oD
D o
b
D o
h
D i

AL NN R AL NN NN

D
D

MNIRIRLAL RIS AVRNIRNL AL

;

;
2199 ;
2200 ;

2204
2205
2206
2207

‘

N AN AN A N RO NI AN NI RO AL N AO NI AL

VOO0V OO VOV OO0
N NN NNN~N~N~V~vNO OO0
ONOWVSWN=2OVONO
VNS
=2O 0NN WA =2O000 NN
NN —

HARDWARD TEST SECTION

23-0CT-80 09:11

FUNCTIONAL DESCRIPTION:

COMPARES THE CURRENT NIBBLE
POSITION iN 'NIB SAVE' WITH THE

|
.

CURRENT TEST PATTERN.

[}

IF THE

TWO VALUES ARE NOT EQUAL AN

ERROR FLG IS SET WHICH THE
CALLER CAN INTERIGATE

i
.

[}
.

|
.

FORMAL PARAMETERS:
NIB NUM

CASE SELECT EXPRESSION TO SELECT THE

CURRENT NIBBLE

|
|

TO BE EXAMINED

NIB_PAT

CURRENT NIBBLE PATTERN TO BE

COMPARED

|
|
.

ERR_FLG

CONTAINS THE ADDRESS (PASSED BY REF)
OF THE CALLERS ERROR FLG

|
{
.

TO ENABLE THE CALLER TO EXAMINE
THE ERROR STATUS OF THE ROUTINE

|
.

|
|

IMPLICIT

INPUTS:

NIB_SAVE

BLOTK OF 3 WORDS TO STORE

THE DATA FOUND IN MLD1, MLDZ2
AND MLE2 AFTER A DIAGNOSTIC MODE
READ

|
|
.

{
[}
.

1
.

CALL

IMPLICIT OUTPUTS:

NONE

g%a;

.ERR_FLG = ZERO;

'CLEAR THE ERROR FLAG BACK IN THE CALLING ROUTINE

2249

case .(NIB_NUM) from 0 to 9 of

'SELECT THE NIBBLF TO BE TESTED

2250
2251
2252
2253

%sgg

set

[0l

1t .NIB_SAVE [NIB_0] neq .(NIB_PAT)<0, 4> then .ERR_FLG = ONE;

'TEST NIBBLE O AND SET ERR FLG IF NEQ

2256

2257
2258
2259

2260
2261

(1 :

it .NIB_SAVE [NIB_1) neq .(NIB_PAT)<0, 4> tnen .ERR_FLG - ONE;

CIMLAAD ML=-11 LOGIC TEST

HARDWARD

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

2217 .MLé
%S}S ;
;
;
;
;

2262
2263
2264
2265

2226
2227
2228
2229

;
;
;
;

2268
2269
2°70
227

%g%? :
<

22%2
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247

;
;
;
;
;
;
;
;
;
;
;
;

;
;
;

2¢49
2250
2251
2252
2253

;
;
;
;
;

2248 ;

3%§§ :

2256
2257
2258
2259

2271

;

(33

:
_NIB_SAVE

[NIB_3] neq

.(NIB_PAT)<0, 4> then

.ERR_FLG = ONE;

TEST NIBBLE

3 AND SET ERR FLG [F NEQ

(43
it

.NIB_SAVE

[NIB_4] neg

.(NIB_PAT)<0, 4> then

.ERR_FLG = ONE;

'TEST NIBBLE & AND SET ERR FLG IF NEQ
(51

:
if

.NIB_SAVE

(NIB_5] neq

.(NIB_PAT)<0, 4> then

.ERR_FLG = ONE;

'TEST NIBBLE 5 AND SET ERR FLG [f
(6]

_NIB_SAVE

[WNIB_6] neq

.(NIB_PAT)<0,

then

.ERR_FLG = ONE;

'TEST NIBBLE 6 AND SET ERR FLG IF
(7]

NEQ

:
it

gggg

NEQ

:
if

.NIB_SAVE

[NIB_7] neq

.(NIB_PAT)<0,

then

.ERR_FLG = ONE;

'TEST NIBBLE 7 AND SET ERR FLG [F NEQ
(8]

%%g%

2313

NEQ

2291
2292
2293
2294
2295

2305
2306
2307
2308
2309
2310
2311
2312

1 AND SET ERR FLG IF

'TEST NIBBLE 2 AND SET ERR FLG [F NEQ

2290

2304

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (11)

it .NIB_SAVE [NIB_2] neq .(NIB_PAT)<0, &> then .ERR_FLG = ONE;

2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289

2262 ;

;
;
;
;
;
;
;
;

(2l

%%;%

2298
2299
2300
2301

2263
2264
2265
2266
2267
2268
2269
2270

'TEST NIBBLE

%%g?

;
;
;
;

%%g? :

6
22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

2220
2221
2222
2223

%g%g ;

PAGE 89

t .NIB_SAVE [NIB_8] neq .(NIB_PAT)<0, 4> then .ERR_FLG = ONE;
'TEST NIBBLE 8 AND SET ERR FLG |F NEQ
(9]

tes;
end;

it .NIB_SAVE [NIB_9]) neq .(NIB_PAT)<0,
then
.ERR_FLG = ONE
'TEST NIBBLE 9 AND SET ERR FLG IF NEQ

t
SEQ 0074

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE 90

2273 .MLé

22-0ct=-1980 10:47:44

2284 012660
2285 012664

004167
016600

171122
000010

2287 012672

016601

000014

2286 012670

005010

2288 012676
2289 012700
2290 012704
2291 012706
2292 912710
2293 012712
2294 012714
2295 012716
2296 012720
2297 012722
2298 012724
2299 012726

006301
066107
000024
000052
000110
000140
(00200
000226
000264
000314
000354
000404

2301 012734
2302 012740
2303 012744
2304 012750
2305 012752

042702
016701
042701
020102
001577

2300 072730

2306 012754

2307 012756
2308 012762
2309 012766
2310 012772

2511 012776
2312 012776
2313 013000
2314 013002
2315 013006
2316 013010
2317 013012

2318 013014

2319 013020
2320 013024
2321 013030
2322 013032
2323 013036
2324 013040
2325 013042

2326 013044

SEQ 0075

22-0ct=1980 10:45:32

%%;g :

2279
2283 012660

016602

000574

016601

042701
016702

006202

006202
006202
006202
042702
020201
001560
000555

016601

042701
016702
000302
042702
020201
001544
000541

016601

012704

TST.LNG.WRD:

000012

2%:

000012

3%:

177760
174750
177760

177760
174722

177760
174664

4%:

177760

000012

R1,$SAVE?Z
10(sP) ,RO

;
; ERR.FLG,*

MOV

14 (SP)Y LR

: NIB.NUM,¢«

2249

12(SP) ,R2

: NIB.PAT,+

2254

: NIB.PAT,¢

2260

12(SP) M

;: NIB.PAT,+

2266

5%:

12(sSP) R

: NIB.PAT,»

2212

(RO)

ASL
ADD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

R
1$(R1),#C
2%-1%
7¢8-1%
4%-1%
5¢-1%
6%-1%
7¢-1%
8%-1%
9%-1%
108-1%
118-1%

BIC
MOV
BIC
CMP
BEQ

#177760,R2
NIB.SAVE
,R1
#177760,R1
R1,R2
13%

MOV

B8R

MOV

129%

12(sP) R1

BIC
[0}

#177760,R1
NIB.SAVE
,R2

ASR
ASR
ASR
BIC
CMP
BEQ
BR

R?
R2
R?
#177760,K2
R2 ,R1
13%
12%

ASR

177760

000012

JSR
MOV

CLR

1%:

T0PS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (1)

MOV

8IC
MOV
SWAB
BIC
CMP
BEQ
BR

MOV

2210
2247

#177760,R1
NIB.SAVE,R?
R2
#177760,R2
RZ,R1
13%
129

CIMLAAO ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

2328

23-0CT-80 09:11

PAGE 91

SEQ 0076

cMLG

;

%%gg
2331 013050
2332 013054
2333 013060
2334 013062
2335 013064
2336 013066
2337 013070
2338 013072
2339 013076
2340 013100
2341 013102

042701
016702
006202
006202
006202
006202
000302
042702
020201
001524
000521

177760
174634

2343 013110
2344 013114
2345 013120
2346 013124
2347 013126

062701
016702
042702
020201
001511

177760
174576
177760

2342 013104

016601

2348 013130 000506
2349 013132

016601

2352
2353
2354
2355

006202
006202
006202
006202

2350 013136
2351 013142
013146
013150
013152
013154

2356 013156
2357 013162
2358 013164

062701
016702

2359 013166

042702
020201
001472
000467

2361 013124
2362 013200
2363 013204
2364 013206
2365 013212
2366 013214
2367 013216

042701
016702
000302
042702
020201
001456
000453

2560 013170

2368 013220

2369 013224
2370 013230
2371 013234
2372 013236
2373 013240
2374 013242
2375 013244
2376 013246
2377 013252

016601

042701
016702
006202
006202
006202
006202
000302
042702
020201

177760

“

000012

6$:

000012

7%:

177760
174550

177760
174512

8$:

177760

000012

177760
174462

98 :

177760

000433

2380 013260 016601

000012

016702

174424

2381 013264 062701

2382 013270

BIC
MOV
BIC
CMP
8EQ

177760,
R1
NIB.SAVE+2,R2
#177760,.R2
R2,R1
13§

MOV

B8R

MOV

177760

108:

12(SP),R1

128

12(SP) ,R1

12(SP),R1

: NIB.PAT,+

2296

. NIB.PAT,®

2302

nM77760,R1
NIB.SAVE +2,R2
R2
#177760.R2
R2,R1
13§
128

BIC
MOV
ASR
ASR
ASR
ASR
SWAB
BIC
CMP

177760,R1
NIB.SAVE+2,R?2
R2
R2
R?
R2
)
R
#$177760,R2
R2,R1

128

MOV

2278

2290

BIC
MOV
SWAB
BIC
CMP
BEQ
BR

BIC

. NIB.PAT,+

#177760,R2
R2,R1
13%
128

MOV

T0PS

12(SP) ,R1

BIC
CMP
BEQ

MOV

PA:<

2284

R1
277760,
NIB.SAVE+2,R2

MOV

. NIB.PAT,«

22-0ct=1980 10:47:44

. NIB.PAT,«

BIC
MOV

BEQ

2378 013254 001436
2379 013256

#177760.R1
NIB.SAVE,R2
R?
R2
R2
RC
R
$177760,R2
R2,R1
138
128

ASR;
ASR
ASR
ASR

177760

000012

BIC
MOV
ASR
ASR
ASR
ASR
SWAB
BIC
CMP
BEQ
8R

22-0ct=-1980 10:45:32

R2
R?
R?
R2

13§

12(SP) ,R1

1
177760,

NIB.SAVE +4,R2

CIMLAAOD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

2384

000302
042702

2390 013304
2391 013306

001422
000417

020201

177760

016601

000012

016702
006202
006202
006202
006202
000302
042702
020201
001402

174374

2393 013314 042701 177770

2394 013320
2395 013324
2396 013326
2397 013330
2398 013332
2399 013334
2400 013336
2401 013342
2402 013344

2403 013346
%282 013352
2406
%2?;

SEQ 0077

MLG

2387 013274
2388 013276

2392 013310

PAGE 92

22~0ct=1980 10:47:44

22-0ct=1980 10:45:32

%%gg

2389 (13302

23-0CT-80 09:11

012710
000207

R2
#177760,R2

BEQ
BR

13¢%
12%

CMP

11%:

177770

000001

SWAB
BIC

12%:
13%:

[0}

R2,R1

12(SP) R1

8I1C

177770 ,R"

MOV
RTS

1, (RO
PC

MOV
ASR
ASR
ASR
ASR
SWAB
BIC
CMP
BEQ

TOPS

PA: <

NIB.SAVE
¢4 ,R?
R2
R2
R2
R2
k2
#177770,%2
R2,R1
13%

; Routine Size:
158 words
: Maximum stack depth per invocation:

3 words

: NIB.PAT,«

2308

:
;

2310
2210

CIMLAAO ML-11 LOGIC TEST

hARDWARD TESY

SECTION

)

MACRO M1113

23-0CT-80 09:11

¢AGE 93

SEQ 0078

24615 ;MLG

22-0ct=1980 10:47:44

%2}9 ;
2618
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429

2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325

2631 ;
2432 ;
2433 ;

2327
2328
, 2329

2430 ;

2326

2434 ;
2435 ;

2330
2331

2436 ;

;
;
;
;
;
;
;

24645
2446
2uh?
2448
2449

;
;
;
;
;

2644

2450
2451
2452
2453
2454
2455
2456
2457
2458
2459
2460
24661
2662
2463
2464
2465
2666

;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;

2667 ;

2468 ;
2469 ;

TOPS=20 Bliss=16 v2(206)

22-0ct=1980 10:45:32

;
;
;
;
;
;
;
;
;
;
;
;

24637
2438
2439
2440
244
2442
2443

2332

2333
233,
2335
2336
2337
2338
2339

2340

2361
2342
2343
2344
2345

2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362

routine XOR_LNG_WRD (NIB_NUM, NIB_PAT, RESULT)
begin
'ee
! FUNCTIONAL DESCRIPTION:
!
EXCLUSIVE ORS THE CURRENT
!
NIBBLE POSITION IN "NIB SAVE'
!
WITH THE CURRENT TEST PATTERN
!
AND ASSIGNS THE RESULTS TO THE
!
FORMAL PARAMETER 'RESULT'.
!
! FORMAL PARAMETERS:
!
NIB_NUM
!
CASE SELECT EXPRESSION TO
!
SELECT THE CURRENT NIBBLE TO BE
!
EXAMINED
!
!

NIB PAT

!
!
!
!
!
!
!

XOR'ED

!
!
!
!
!

: novalue =

)
!
P

CURRENT NIBBLE PATTERN TO BE

RESULT
CONTAINS THE ADDRESS (PASSED BY REF)
OF AN OWN STORAGE LOCATION TO
ENABLE THE CALLER TO EXAMINE THE XOR RESULTS.

IMPLICIT INPUTS:

NIB_SAVE
BLOTK OF 3 WORDS TO STORE
THE DATA FOUND IN MLD1
MLDZ2 AND MLEZ2 AFTER A
DIAGNOSTIC MODE READ.

!
' IMPLICIT QUTPUTS:
'--

case .(NIB_NUM)
set

NONE
from 0 to 9 of

'SELECT THE NIBBLE TO BE XOR'ED

:
.RESULT = .NIB_SAVE [NIB_0] xor .NIE _PAT;
'XOR NIBBLE O AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

(1]

:
LRESULT = _NIB_SAVE [NIB_1] xor .NIB PAT;
'XOR NIBBLE 1 AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

:
LRESULT =

2363
2364
2365

PA:<NEALE>BL2ML4.BLI.2 (12)

(3]

_NIB_SAVE (NIB_2] xor .NIB PAT.

'XOR NIBBLE é AND STORE RESULTS IN THE ACRS CONTAINED IN .RESULTS
.

HARDWARD TEST SECTION
2471 ;MLG

23-0CT-BC 09:11

8 7
PAGE 94

22-0ct=-1980 10:47:44

22-0ct=1980 10:65:32

%2;% ;

674 ;

2366

L77 ;
2L78 ;

(4]

%2;3 .

2369
2370

%%;%

;

2373

2483 ;

2375

%2;2 ;

2L82 ;

%%gg

2374

2L8B8 ;
2489 ;
2490 ;

2380
2381
2382

(7]

2492 :
2493 ;
2694

2384
2385
2386

(8]

2496
2497 :

2388
2389

(9]

2392
2393
2394

2506

2510 013354

2391

2514 013370

016600

000020

2525

006300
066007
000024
000636
000062
000070
000076
000120
000136
000144

2531 013432

2533 013440

LRESULT = .NIB_SAVE [NIB_8] xor .NIB PAT;
:
LRESULT = .NIB_SAVE [NIB_9] xur .NIB_PAT

'XOR NIBBLE 9 AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

XOR.LNG.WRD:

013402

JSR
[ (01"

R1,$SAVEL
16(SP) ,R1

;
; NIB.PAT,*

2314
2354

MOV

20(SP) RO

: NIB.NUM,+

2350

MOV

1%:

cMLG

ASL
ADD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

14(SP) ,R2

RO
1$(RO) ,PC
2%-1%
3%-1%
4%-1%
5%-1%
63-1%
8%-1%
9%-1%
10%-1%

000162
000176

042712

000472

016703

174262

2%:

174250

3%:

177760

; RESULT,»

22-0ct=1980 10:47:44

22-0ct=-1980 10:45:32

;

2530 013426 016712
2532 013436

:
LRESULT = _NIB_SAVE [NIB_7] xor .NIB_PAT;

000014

Sggg

2528 013422
2529 013424

end;

170460
000016

2515 013374
2516 013376
2517 013402
2518 013404
2519 013406
2520 013410
2521 013412
2522 013414
2523 013416
2524 013420

LRESULT = _NIB_SAVE (NiB_6] xor .NIB PAT;

tes;

004167
016601

016602

'XOR NIBBLE 8 AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

2511 013354
2512 013360
2513 013364

.RESULT = .NIB_SAVE [NIB_5] xor .NIB PAT;

'XOR NIBBLE ? AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

2387

2500 ;
2501 ;
2502 ;

2499 ;

'XOF NIBBLE 6 AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

2383

2390

:
.RESULT = .NIB_SAVE [NIB_4] xor .NIB PAT;

'XOR NIBBLE § AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

2379

2498 :

PA:<NEALE>BL2ML4.BLI.2 (12)

'XOR NIBBLE 4 AND STORE RESULTS IN THE ADRS CONTAINED [N .RESULTS

(6]

2495 ;

SEQ 0079

'XOR NIBBLE 3 AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

2376
2377
2378

2491 ;

TOPS-20 Bliss=16 v2(206)

.RESULT = .NIB_SAVE [NIB_3] xor .NIB_PAT;

248G ;
24L8S ;
2486 ;

2487 ;

MACRO M1113

.MWORD
LWORD

MOV
BIf

B8R

MOV

12%-1%
15%-1%

N1B.SAVE, (R2)
#177760, (R2)

17%

NIB.SAVE ,R3

T0FS

PA:<

2354

2358

CIMLAAQ ML-11 LOGIC TEST

SECTION

D —
D
D
D
D
D
D e
D
D

NN N W LA AN LA N N NN
NN
P
PP P
W
W ¥y
VALV N LY VIV
W WA
NN NN
W (Vo
N VWA ES B8 BN NN
NI N — = =
VNN v
OO~ NN [V 10,
o SO
NO
OO NOONNOOESNO sHsO00 OO OO

174212
177760

6$:
7%:

D i e
D
D
D

U A AN A

5%:

8%:

174216

D
D
D
D
D

U L Gl U U

WD i
D o

43:

1764170

174152

174144

Ll U U L

D
D
D

174224

118:

U Ll L

MOV

BR
MOV
BR

MOV

BIC

MOV
BIC

BIC
BIS

174130

12%:

177760

148

174114

) nd

) ol e

177760

— e

O 00 ~NOWN Sy —

UMW WA
NN

ST ST, ST, ST,NT, 84

VAN
VIV AW

SIS LN

ASR
ASR
ASR
ASR
BIC

(=lelelolelololalolalelolalelaladalalalolololelalololelalolalofolololaladalalolol
=l

013444

177770

010103
061203

040112
050312
000207

16%:
17%:

RTS
MOV
ASR
ASR
ASR

ASR
BR
MOV
BR

MOV
ASR
ASR

ASR
ASR
BR
MOV
SWAB
BIC
BR
MOV
ASR
ASR
ASR
AR
SWAB

Bl1C

MoV
MOV

BIC

PAGE 94-1

23-0CT-80 09:11

— St
e

TEST

MACRO M1113

wwno

HARDWARD

LOGIC TEST

polleode.]

CIMLAAO ML-11

SEQ 0080

R3
R3
R3
R3

#177760,R3

R3, (R2)
7%

NIB.SAVE
,R4

2362

NIB.SAVE
,R4
1%

2366

13%

(R2)
NIB.SAVE+2,
#177760, (R2)
R1,R4

2370

(R2) R4

R1, (R2)

R& . (R2)
PC

NIB.SAVE+2,R4
R&
R&
R4
R&

148
NIB.SAVE+2,R4
13$
NIB.SAVE+2,R4
R4
R&
R4
R4

13$
R4
NIB.SAVE+4
R&
#177760,R4
16%
+4 R4
NIB.SAvE
R&
R&
R&
R4
R&

2350
2374

2378

2382

2386

2390

#177770,R4
R4, (R2)

TOPS
PA:<

2314

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

D 7
PAGE 95

2593 MLé
%ggg ;

22-0ct=-1980 10:47:44
22-0ct=1980 10:45:32

2596
2597
2598
2599
2600
2601

;
;
;
;
;
;

2395
2396
2397
2398
2399
2600

routine LD_LNG_WRD (NIB_NUM, NIB_PAT)
begin

2603
2604
2605
2606

;
;
,
;

2602
2403
2604
2405

!
TO MLD1, MLD2 AND MLE?
!
DATA DIAGNOSTIC REGISTERS.
!
' FORMAL PARAMETERS:

2608 ;

2607

2602 ;

2607 ;

2609 ;
2610 ;
2611 ;

2612 ;

2613 ;
2614 ;

26401

2606

2408
2609
2610

2611

2412
2613

NIBBLE PATYERNS PRIOR TO WRITING

NIB_NUM

!
!
!

THE CURRENT NIBBLE TO BE LOADED

.
.

.
!

2618 ;

2617

2619 ;

2620
2621
2622
2623
2624
2625

2418

;
;
;
;
;
;

26419
2420
2621
2622
2423
2424

2627 ;
2628 ;
2629 ;

2426
2427
2428

2626 ;

2630 :

2425

2429

CASE SELECT EXPRESSION TO SELECT

NIB_PAT

CURRENT NIBBLE PATTERN TO BE

LOADED

IMPLICIT INPUTS:
NIB_SAVE

BLOTK OF 3 WORDS TO STORE
THE DATA TO BE WRITTEN

INTO MLDY MLD2 MLE?

!
' IMPLICIT OUTPUTS:
NIB_SAVE IS LOADED WIH
!
THE "CURRENT NIBBLE PATTERN
!
'--

case .(NIB_NUM) from 0 to 9 of
set

[0])

2631 ;
2632 :

2430
2431

(1)

2634 ;
2635 ;

2433
2434

[2)

2633 ;

2636 ;

2637 :

2432

2435

2436

NIB_SAVE [NIB_0] = .NIB_PAT;
:

NIB_SAVE [NIB_1] = .NIB_PAT;
:

NIB_SAVE [NIB_2] = .NIB_PAT;

2638 ;

24637

(3] :

2640 ;
2641 ;

2439
2440

(4] :

2643 ;
2644 ;

2442
2443

(5] :

2646 ;
2647 ;

2645
2446

[6] :

2639 :
2642 :

2645 ;

2438
2441

2444

: novalue =

2414
2615

2616

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (13)

'++
' FUNCTIONAL DESCRIPTION:
!
LOADS 'NIB SAVE' WITH UNIQUE

2615 ;
2616 ;

2617 ;

SEQ 0081

NIB_SAVE (NIB_3) = .NIB_PAT;
NIB_SAVE [NIB_4] = .NIB_PAT;
NIB_SAVE [NIB_5)

.NIB PAT;

'SELECT THE NIBBLt LOCATION IN NIB_SAVE T0 BE LOADED
'LOAD NIBBLE O WITH NIB_PAT
'LOAD NIBBLE 1 WITH NIB_PAT

'LOAD NIBBLE 2 WITH WiB_PAT

'"LOAD NIRBLE 3 WITr. NIB_PAT
'LOAD NIBBLE & WITH NIB_PAT
‘LOAD NIBBLE 5 WITH Nib_PAT

CZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

7
3
PAGE 96

23-0CT-80 09:11

22-0ct-1980 10: 47:44
22-0ct=-1980 10: 45:32

2687 013700
2688 013702
2689 013706
2690 013714
2691 013716
2692 013720
2693 013722
2694 013724

2695 013726
2696 013732
2697 013740
2698 013742
2699 013744
2700 013750
2701 013756
2702 013760

142767

000433
006300
006300
006300
006300
042700
142767
000421
000300
042700
042767
000412
000300

LOAD NIBBLE 6 WITH NIB_PAT

NIB_SAVE [NIB_7]

NIB_PAT;

.LOAD NIBBLE 7 WITH NIB_PAT

(8]

NIB_SAVE [NIB_8]

.NIB_PAT;

.LOAD NIBBLE 8 WITH NIB_PAT

(91

NIB_SAVE [NIB_9)

.NIB_PAT

.LOAD NIBBLE 9 WITH NIB_PAT

tes;

end;

177760

000017

174000

3%:

177617

000360
170377

007400

173754
4%:

173736

5%:

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
BIC
BI(B
BR
ASL
ASL
ASL
ASL

BIC
BI(B
BR
SWAB
BIC
BIC
BR
SWAB

R1
1$(R1),PC

. NIB.PAT,+
;

NIB.NUM,
¢+

2395
2429
2425

T A
Y—

1%:

4 (SP) ,RO
6(SP) ,R1

[

013656

ASL
ADD

R1,-(SP)

o
I
rt.ab
ad of of oK

MOV
MOV
MOV

000004
000006

NO“”?QQ’"'

LD.LNG.WRD:

N BN

006301
066107
000024
000040
000064
000102
000134
000150
000174
000212
000244
000262
042700

NIB_PAT;

L X

2686 013676

010146
016600
016601

(7]

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2MLG4.BLI.2 (1B

[NIB_6]

N1B_SAVE

L) OO

2684 013672

2685 013674

2447
2448
2649
2450
2451
2652
2453
2454
2455
2456
2457
2458
2459

2649 ;ML4
2650 ;

2672 013636
2673 013636
2674 (13640
2675 013644
2676 013650
2677 013652
2678 013656
2679 013660
2680 013662
2681 013664
2682 013666
2683 013670

SEQ 0082

138-19%
#177760,R0
g17,NIB.SAVE

2429
2632

#177617,R0

z260,NlB.SAVE

2435

#170377,R0

#7400 ,NIB.SAVE

6%
RO

2438

CIMLAAD ML-11 LOGIC

HARDWARD

TEST

MACRO M1113

TEST

SECTION

F_7
PAGE 97

SEQ@ 0083

22=0ct=1980 10:47:44
22-0ct=1980 10:45:32

JMLG

2704

D D
d
e

) e

142767

OOV

) od =d cd

000433
006300
006300
006300
006300
042700

—

end

cud

142767
000421

000300
042700
062767
000412
000300
006300
006300
006300
006300
042700
06462767
050067
000423
000300
042700
062767
000412
000300
006300
006300
006300
006300
042700
062767
050067
012601
000207

007777
170000
173704

177760

000017

177417

000360

170377
007400

173710

173672

170000
173576
170377

007400

0000
3530

RO,NIB.SAVE

15¢

2441

2644

ASL

#177417,R0

:?20.NIB.SAVE*2

173646
9% :

SWAB

173630

173602

2425

#177760,R0
#}7.NIB.SAVE*2

7%:

SWAB

11%
RO
RO
RO
RO

2450

11%:

BIS

12%:

SWAB

173562

SWAB

2647

RO
#170377,R0
#7400,N1B.SAVE+?

RO
#7777 ,RO
#170000,N18.SAVE+2
?giNlB.SAVE*Z

13%:

#170000,N18B
SAVE
.

6%:

10%:

007777

TOPS
PA:<

#7777,R0

8%:

—-O
—
NNO

006300
006300
006300
006300
042700
062767
050067
000467
042700

NN —

[aST N1 ST 1 ST G L, V101,
NNNNSNNNNNN

23-0(T-80 09:11

2625
2453

#170377,R0

#7400 ,N1B.SAVE+4
1493

2456

173534

#107777,R0

164%:
15%:

;

BIS

MOV

RTS

Routine Size:

+4
#70000,NIB.SAVE
AVE+4
RO,NIB.S
(SP)+,R1

239%

111

words

; Maximum stack depth per

inyocation:

2 words

CIMLAAD ML=11 LOGIC TESTY
HARDWARD TEST SECTION

MACRO M1113

23-0(7-80 09:11

6 7
PAGE 98

2760 ;MLG

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

%;2; ;

2763
2764
2765
2766
2767
2768
2759
2770
277
2772

;
;
;
;
;
;

;
;
;

2773 ;

2774

2775 ;
2776 ;

2777 ;

2778 ;

2660
2461
2662
26463
2464
2465

routine WRT_(ST1
begin

2470

2466
2L67
2L68
2469

2L72
2473

2674

2475

2779 ;
2780 ;
2781

2L76
2477
2478

g;g; :

2480

2782 ;

2479

2791 0146174
2792 014200

004167
016600

2794
2795
2796
2797

014206
014210
014212
014214

006300
006300
010001
016100

2799 014224
2800 014230
2801 014234
2802 014236

046100
016102
050002
010277

2793 014204

2/98 014220

2803 014242
2804

2805

%g??

2812

SEQ 0084

006300

056600

000207

(TST_PAT,

index)

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZMLG4.BLI.2 (14)

: novalue =

'+
' FUNCTIONAL DESCRIPTION:
!

!
LOADS THE CONTROL & STATUS REGISTER 1 WITH A DATA PATTERN
!
GENERATED BY THE MACRO WRT_MASK.
!
' FORMAL PARAMETERS:
1ST PAT

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.

USED BY THE MACRO WRT MASK 70 SELECT THE CURRENT REGISTERS ADDRESS,

!
.

INDE
X

FORCED H1, FORCED LO AND DON'T CARE MASK INFORMATION,

!
'--

MLCS1 = WRT_MASK;

_LOAD GENERATED WRT_MASK PATTERN INTO ML(S1

end;

167606
000010

WRT.(CS1:JSR
MOV

011702

ASL
ASL
MOV
MOV

RO
RO
RO,R1
ML.REG+2(R1),R0

8IC
MOV
BIS
MOV

RO
ML.REG+4&(R1)
ML.REG+6(R1)
,R2
RO,RZ
R2,3ML.REG

000012

011704
011706
175436

ASL

BIS

RfS

; Routine Size:

R1,$SAVE?
10(sP),RO

;
; INDEX,¢

12(sSP),RO

; TST.PAT
,»

20 words

2460
2479

: Maximum stack depth per invocation:

2460

3 words

TEST

CZMLAAO ML-11 LOGIC

HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

7
H
PAGE 99

22-0ct-1980 10:4
22=0ct=1980 10:45:

JMLé

2481
2482
2483
2484
2485
2486
2487
2488

AL A VA WA W

Y
R
TR
e
I
LI

2867
2868

AN WA AW

WA VAW

VAV

VAWV

WWWNNNNNNNNNN—.—‘—.-.-—._J.J—A_Q_IO o OCOOOO
N2 OO
NN
NN 2O OO NN
WA =200 e ] NONWDN SN

LL VAL NN NN

], 6]
[(SLELST.NLNY NN N NN N NT NI NS LSS Lt L LS S Lt LS Lt Y [pS 1 N1V1,8

2489
2499
24691
2692
2493
2494
2495
2496
2497
2698
2499
2500
2501
2502

2857
2858

SEQ 0085

routine RD_CS1
begin

(TST_PAT,

index, ERR_FLG)

novalue =

lee
|

i
i
]

i
]

!
'

FUNCTIONAL DESCRIPTION:
COMPARES THE CONTENTS OF

WITH THE MASKED DATA PATTERN

GENERATED BY THE MACRO 'WRT_MASK'
IF THE COMPARE IS NOT EQUAL THEN
THE FORMAL PARAMETER 'ERR FLG' IS

ASSIGNED A ONE TO INDICATE THE

ERROR.

i
i

FORMAL PARAMETERS:

]

|
|

;
i

THE

CONTROL & STATUS REGISTER 1

TST

PAT

DATK PATTERN TO BE MASKED AND
COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST.
INDEX

USED BY THE MACRO WRT_MASK TO

SELECT THE CURRENT REGTSTERS ADDRESS,

FOPCED HI, FORCED LO AND DON'T CARE

MASK

INFORMATION,

ERR_FLG

CONTAINS THE ADDRESS (PASSED BY REF)

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF

IMPLICIT

THE ROUTINE CALL.
INPUTS:

WT_DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

RL DATA

BETS LOADED WITH DATA READ FROM THE

IMPLICIT QUTPUTS:
GLOBAL LOCATION WR_DATA
AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

TOPS=20 Bliss=16 v2(20%)
PA:<NEALE>BLZ2ML4.BLI.2 (15)

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0(T1-80 09:11

1 7
PAGE 100

2870 ;M
4

SEQ 0086

22-0ct=-1980 10:47:44

22-0ct=-1980 10:45:32

%g;; :

2873

2533

2534
%ggz

wl_DATA = WRT_MASK;
RD_DATA = .MLUS1 or .IGNORE;

Sg;g ;

%g%g

if .WT_DATA neq .RD_DATA then .ERR_FLG = ONE;

2879 ;
%ggg .

2539
2540

end;

2874 ;
%ggg :

2888 014244
2889 014250
2890 014254

2891 014260
2892 014262
2893 014264
2894 014266
2895 014270
2896 014274
2897 014300
2898 014304
2899 014310
2900 014312

2901 014316

004167
005076
016600

006300
006300
006300
010001
016100
056600
046100
016102
050002
010267

017702

2902 014322
2903 014326

056102
010267

2905 014340
2906 014342

001403
012776

2904 014332

?98; 014350
Ve

2909
gg}(s)

026767

000207

.ERR FLG = ZERO;

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (15)

'CLEAR ERROR FLAG

'SAVE THE DATA WR'TTEN TO THE REGISTER
.READ AND SAVE THE REGISTER
'READ THE REG FCR WRT_MASK

'SET ERROR FLAG IF NEQ

167536
000010
000012

RD.CST: JSR
CLR
MOV

175352

ASL
ASL
ASL
MoV
MOV
BIS
BIC
MOV
BIS
[0}

011706
175340

BIS
MOV

011702

000014
011704
011706

175356

MOV

175332

0000017

000010

CMP

1%:

BEQ
MOV

RTS

R1,$SAVE?2
a10(sP)
12(sP) RO

RO
RO
*
RO
RO,R1
ML.REG+2(R1),R0
14(sP) RO
ML.REG*+4(R1)
,RO
ML.REG*6(R1)
,R2
RO,R2
R2.WT.DATA

;
: ERR.FLG
; INDEX,e

2481
2533
2534

; TST.PAT,«

aML ."EG,R2

;

2535

WI.DATA, RD.DATA

2537

ML.REG+6(R1)
,R2
R2,RD.DATA
1%
#1,310(SP)

: *,ERR.FLG

: Routine Size:
35 words
; Maximum stack depth per invocation:

;
3 words

2481

CIMLAAQ ML=-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0(T-80 09:11

PAGE 101

2918 ;MLé

22-0ct=-1980 10:47:44

22-0ct-1980 10:45:32

%358 ;

2921
2922
2923
2924
2925
2926

;

routine WRT_ER (TST_PAT,
begin

;
;
;

2541
2542
2543
2544
2545
2546

2929 ;

2549

;

%3% ;

%gzg

!
i

2933 ;
2934 ;
2935 ;

2553
2554
2555

|
!

2936 ;

2556

2937 ;
2938 ;

2557
2558

5322 :

2560

2939 ;

2948 014352
2949 014356
2950 014362
2951 014364
2952 014366
2953 014370
2954 014372
2955 014376
2956 0164402
2957 014406
2958 014412
2959 014414

ggg? 014420
2962
gggg
2969

2559

004167
016600

006300
006300
006300
010001
016100
056600
046100
016102
050002
010277

000207

: novalue =

LOADS THE ERKOR REGISTER WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK

2550
2551

2552

index)

TOPS=-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (16)

tee
! FUNCTIONAL DESCRIPTION:
|

2930
2931 ;

2932

SEQ 0087

FORMAL PARAMETERS:

TST _PAT

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.
INDEX

USED BY THE MACRO WRT_MASK TO SELECT THE CURRENT REGISTERS ADDRESS,

[

FORCED HI, FORCED LO AND DON'T CARE MASK [NFORMATION.

MLER = WRT_MASK;

'LOAD GENERATE WRT_MASK PATTERN INTO MLER

end;

167430
000010

011702
000012
011704
011706
175340

WRT.ER: JSR
MOV
ASL
ASL
ASL
MOV
MOV
BIS
BIC
MOV
BIS
MOV

RTS

R1,$SAVE2
10(sP) RO

:
; INDEX,*

RO
RO
RO
RO.R1
ML.REG+2(R1)
RO
12(SP) RO
ML.REG+4&(R1)
RO
ML.REG*+6(R1)
,R2
RO,R2
R2,aML.REG+60

; TST.PAT,e

. Routine Size:
20 words
)
. Maximum stack depth per invocation:

2561
2559

3 words

2561

CIMLAAO ML-11 LOGIC TEST

23-0(T-80 09:11

PAGE 102

SEQ 0088

NN NN NNNNN~VNOOCOOOOOONON
OO 00 0o QOO0
NN 2O VNN W) —
= OO0 0 NOWVNSWND =2 O VOO NN

WAV

O 0O O O
WS NN

WAV AT

NIV ATV

AT AN

AN NVWTWNOAN

NLAINDNI NN NN NLNDNINL N NN NNV

WDWAIWVIAA LY

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (17)

2596

RO
N — —=OV00~N

We Be Wy Bo Be BoeBe 8o By BoWo®e Ve
e ®e®

3003
3004
3005
3006
3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017

B e

3002

By 8o Be Vs %¢ %0 T

B 8s TV BB
Ve B Ve Vo

IEITEIEIEIELE

2971 JMLG
2972 ;
2973
2974
2975
2976
2977
2978
2979
2980
2981
2982
2983
2984
2985
2986
2987
2988
2989
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001

SECTION

NOALNINININD
PO
O
OO\
oo
OO
OCOOVOV

HARDWARD TEST

MACRO M1113

routine RD_ER
begin

(TST_PAT,

index,

ERR_FLG)

novalue =

lee

FUNCTIONAL DESCRIPTION:

i
i
]
i
i
i
i
i
i
i
i
i
i
i
:
i
i
i
'

i
i
i
i
i
i
i
i

COMPARES THI: CONTENTS OF
ERROR REGISTER WITH

THE

THE MASKED DATA PATTERN

GENERATED BY THE MACRO ‘'WRT_MASK'.
IF THE COMPARE IS NOT EQUAL THEN
THE FORMAL PARAMETER 'ERR FLG' IS

eggégNEo A ONE TO INDICATE THE
FORMAL PARAMETERS:
TST

PAT

DATK PATTERN TO BE MASKED AND

COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST.
INDEX

USED BY THE MACRO WRT MASK T0

SELECT THE CURRENT REGISTERS ADDRESS,

FORCED HI, FORCED LO AND DON'T CARE

MASK

INFORMATION.

ERR _FLG

CONTAINS THE ADDRESS (PASSED BY REF)

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF

THE ROUTINE CALL.

i IMPLICIT INPUTS:
|

i
i
i
i
i
i
i
i

i
i
i
i
i
i
i

WT _DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

RD DATA

GETS LOADED WITH DATA READ FROM THE

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA
AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

SECTION

PAGE 103

.7
SEQ 0089

d =D o

~NOWN SN

b ed ek ed

if .WT_DATA neq .RD_DATA then .ERR_FLG = ONE;

RD.ER:

JSR

R1,$SAVE2

000012

MOV

12(SP),RO

;

011702
000014
011704
011706

MOV
BIS
eIC
MOV
BIS

000010

CLR

ASL
ASL
ASL
[0}

’

MOV

175174

175154

000001

000010

MOV
8IS
MOV

gMP

MOV
RTS

; Routine Size:

al10(SP)

: ERR.FLG

RO
RO
RO
RO,R1

ML.REG+2(R1)
RO
14(SP) ,RO
ML.REG+4&(R1)
RO
ML.REG+6(R1)
,R2
RO,R2
R2,WT.DATA
8ML .REG+60,R2
ML.REG+6(R1),R2
R2.RD.DATA

INDEX,*

2561
2614
2615

: TST.PAT,«

2616

#I.DATA,RD.DATA

2618

#1,310(SP)

; *,ERR.FLG

35 words

; Maximum stack depth per invocation:

000207

'READ THE REG FOR WRT_MASK

.SET ERROR FLAG [F NEQ

167360

175260
011706
175162

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (17)

'CLEAR THE ERROR FLAG
ISAVE THME DATA WRITTEN TO THE REGISTER
.READ AND SAVE THE REGISTER

.ERR _FLG = ZERO;
WT_DATA = WRT _MASK;
RD_DATA = .MLER or .IGNORE;

end;

014446

014452
014456
014462
014466
014470
014474
014500
014504
014510
014516
014520
014526

23-0CT-80 09:11

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32
ooooooorOrORON

3027 ‘MLG
3028 ;
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3042
3046 014422
3047 014426
3048 014432
3049 014436
3050 014440
014442
014444

ST ST ST, ST, NT,.N1, N1, 9]

HARDWARD TEST

MACRO M1113

TEST

CZMLAAO ML-11 LOGIC

3 words

2561

CIMLAAOD ML=-11 LOGIC TEST

HARDWARD TEST

3076 ;ML&
3077 ;
3078

3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089

MACRD M1113

SECTION

23-0CT-80 09:11

routine WRT_DA (TST_PAT, index)
begin

;
;
;
;
.

3091 ;
3092 ;
3093 ;

2634
2635
2636

!
!
!

3090 ;

3094 ;

3095 ;
3096 ;
3097 .

%983 :

2633

2637

2638
2639
2640

2641

INDEX

FORCED HMI, FORCED LO AND DON'T CARE MASK INFORMATION.

!'--

'LOAD MLDA WITH GENERATED WRT_MASK PATTERN

MLDA = WRT_MASK;

end;

011702
000012
011704
011706

3117 014572

010277

175132

MOV

3120
3121

3126
3127

000207

: novalue =

USED BY THE MACRO WRT_MASK TO SELECT THE CURRENT REGISTERS ADDRESS,

WRT.DA: JSR
MOV
ASL
ASL
ASL
MOV
MOV
BIS
BIC
MOV

050002

T10PS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (18)

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.

004167
016600
006300
006300
006300
010001
016100
056600
046100
016102

%}}g 014576

SEQ 0090

4+
! FUNCTINNAL DESCRIPTION:
!
LOADS THE DESIRED SECTOR WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK
!
!
! FORMAL PARAMETERS:
!
.
TST_PAT
!

3106 014530
3107 0145346
3108 014540
3109 014542
3110 014544
3111 014546
3112 014550
3113 014554
3114 014560
3115 014564

3116 014570

PAGF 104

147:44
145:32

2622
2623
2624
2625
2626
2627
2628
2629
2630
2631
2632

;
;
;

167252
000010

BIS

RTS

;
; INDEX,*

R1,$SAVE?2
10(SP) ,RO
RO
RO
RO
RO,R1
ML.REG+2(R1)
,RC
12(SP),RO
ML.REG+4
(R1) RO
ML.REG+6(R1)
,R2

RO,.R2

R2,3ML.REG+30

;

2622
2640

»
TST.PAT

. Routine Size:
20 words
_
: Maximum stack depth per invocation:

3 words

2622

CIMLAAO ML-11 LOGIC TEST
SECTION

23-0(7-80 09:11

PAGE 105

SEQ 0091

3129 . MLG

22-Qct=-1980 10:47:44

%}g? :
3132
3133
3134
3135
3136
3137
3138
3139
3140
3141
3142
3143
3144
3145
3146
3147
3148
3149
3150

3151
3152
3153
3154
3155
3156
3157
3158
3159

;
;
;
;
;
;
;
;
;
;
;
;
;
;
;

;
;
;
;
;
;
;
;
;

22-0ct=1980 10:45:32
2642
2643
2644
2645
2646
2647
2648
2649
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660

2661
2662
2663
2664
2665
2665
2667
2668
2669

routine RD_DA (TST_PAT,
begin

!
!
!
!
!
!
!
!
!

2670
2671

!
!

3164
3165
3166
3167

2674
2675
2676

!
!
!
!

3168
3169
3170
3171
3172
3173
3174
3175
3176

;
;
;
;

;
;
;
;
:
;
;
;
;

3177 :

3178
. 3179
3180
3181
3182
3183

:
;
;
;
:
.

2672
2673

2677
2678
2679
2680
2681
2682

2683

2684
2685
2686
2687

2688
2689
2690
2691
2692
2693

index, ERR_FLG)

!
!

!
!
!
!
!
!
!
!
!
'

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (19)

: novalue =

e
' FUNCTIONAL DESCRIPTION:
!
!
COMPARES THE CONTENTS OF THE
!
DESIRED SECTOR ADDRESS REGISTER
!
WITH THE MASKED DATA PATTERN
!
GENERATED BY THE MACRO ‘'WRT_MASK'
!
!
IF THE COMPARE IS NOT EQUAL THEN
!
THE FORMAL PARAMETER 'ERR FLG' IS
!
ASSIGNED A ONE TO INDICATE THE
!
ERROR
!
' FORMAL PARAMETERS:
!
!
TST _PAT

3160 ;
3161 ;

3162 ;
3163 ;

DATA PATTERN TO BE MASKED AND
COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST

INDEX
USED BY THE MACRO WRT MASK TO
SELECT THE CURRENT REBISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE
MASK INFORMATION
ERR FLG

CONTAINS THE ADDRESS (PASSED BY REF)
OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF THE ROUTINE CALL.
IMPLICIT INPUTS:
WT _DATA

GETS LOADED WITH THE GENERATED
WRT MASK DATA PATTERN THUS ALLOWING
CALCER TO PRINT FAILING GOOD DATA.

RD_DATA

GETS LOADED WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAILING BAD DATA,

IMPLICIT OQUTPUTS:

!
!
!
!
'--

GLOBAL LOCATION WR_DATA
AND RD DATA LOADED WITH GOOD
AND BAD REGISTER DATA

d')

HARDWARD TEST

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TESY SECTION

23-0(T-80 09:11

PAGE 106

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

JMLG
2694
2695
2696
2697
2698
2699
2700
2701

d md ek

YOS WNN

OO0

N AN LN

[pS 1A

M) =t ed

N AN N NN

ST N1, S, 01,0, E),8

014600
014604
014610
014614
014616
014620
014622
014624

014630
014634
014640
014644
014646

014652
014656
014662
014666
014674
014676
014704

SEQ 0092

004167
005076
016600
006300
006300
006300
010001
016100
0565600
046100
016102
050002
010267
017702
056102
010267
026767
001403
012776
000207

.ERR FLG = ZERO;
UY_DKTA = WRT MASK;
RD_DATA = .MLOA or .IGNORE:

'"CLEAR THE ERROR FLAG
ISAVE THE DATA WRITTEN TO THE REGISTER
'READ AND SAVE THE REGISTER

it .WI_DATA neq .RD_DATA then .ERR_FLG = ONE;

'READ THE REG FOR WRT_MASK

'SET ERROR FLAG IF NEQ

end;

167202

RD.DA:

000010
00001¢

JSR

R1,$SAVE?

MOV

12(SP),RO

; INDEX,*

CLR

ASL
ASL
ASL
MOV

011702
000014
011704
011706

MOV
BIS
BIC
MoV
8IS

MOV
MOV

175016
175052

011706
175004

T0PS=20 Bliss=16 v2(206)
PA:<NEALE>BLZMLL.BLI.2 (19)

BIS

176776

174776

000001

000010

MoV
(MP

BEQ

MOV
RTS

Routine Size:

310 (sm

. ERR.FLG

RO
RO
RO
RO,R1

ML.REG+2(R1),RO
14(SP) ,R0
ML.REG+4(R1)
RO
ML.REG+6(R1)
,R2
RO,R2

2642
2694
2695

: TST.PAT,e

R2,WT.DATA
aML.REG+30,R2

2696

ML.REG+6(R1),R2
RZ,RD.DATA

#I.DATA.RD.DATA

;

#1,310(SP)

: *,ERR.FLG

35 words

;

)

: Maximum stack depth per invocation:

3 words

2698

2642

CZMLAAQ ML-11

HARDWARD TEST

LOGIC

TESTY

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE

107

.8
SEQ 0093
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (20)

JMLG
routine WRT_MR
begi n

(TST_PAT,

index)

novalue

tes
[}
.

FUNCTIONAL

LOADS THE MAINTENANCE REGISTER WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK

|
.

= OV

—=O

~n NN
NN
~ SNNSNNNNSNSNSNSNN
ed D b ed e e
d o
~n )

014706
014712
014716
014720
014722

014724
014726
014732
014736
014742
014746
014750
014754

004167
016600
006300
006300
006300

010001

016100
056600
046100
016102
050002

010277
000207

|
.

DESCRIPT]ON:

FORMAL PARAMETERS:

TST_PAT

|
.

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.

]
.

|
.

INDEX

USED BY THE MACRO WRT_MASK TO SELECT THE CURRENT REGISTERS ADDRESS,

|
.

FORCED HI, FORCED LO AND DON'T CARE MASK INFORMATION.

|
.

MLMR
end,

167074

000010

.LOAD MLMR WITH GENERATED WRT_MASK PATTERN

= WRT_MASK;

WRT .MR:

JSR
MOV
ASL

ASL
ASL

MOV

011702
000012
011704
011706

MOV

BIS
BIC

MOV

BIS

175044

MOV
RTS

R1,$SAVEZ
10(SP) ,RO
RO
RO
RO

RO,R1
RO
ML.REG+2(R1)
12(SP) ,RO
ML.REG+4(R1)
RO
ML .REG+6(R1)
,R?
RO,R2
R2,3ML.REG+120

;

TST.PAT,»

2702

Routine Size:
20 words
; Maximum stack depth per invocation:

;

INDEX,*

2702
2720

3 words

MACRO M1113

L 0GIC 1 EST
HARDWARD TEST S ECTION
CIMLAAD ML-11

PAGE

108

\:WWMMNNNNNNNN
WD = OO
NN
NN

MNOMNOMNLN NNV
NNSNSNSNSNSNSNSNSNSNSNN

routine RD_MR
begin

(TST_PAT,

index,

ERR_FLG)

les

FUNCTIONAL

DESCRIPTION:

COMPARES THE

MAINTENANCE

CONTENTS OF

MASKED DATA PATTERN

THE

GENERATED BY THE MACRO 'WRT_MASK'.
If THE COMPARE 1S NOT EGUAL THEN
THE FORMAL PARAMETER °'ERR FLG' IS

gagégnso A ONE TO INDICATE THE

®e

Qs
w *
WO
0,
VLN

PARAMETERS:

TST

PAT

DATK PATTERN TO BE MASKED AND

COMPARED AGAINST THE CONTENTS
OfF THE RFGISTER UNDER TEST.

s
Vs

WA —

VeV
Ve
Ve

FORMAL

INDEX

USED BY THE MACRO WRT _MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,

FORCED HI, FORCED LO AND DON'T CARE

MASK

INFORMATION.

Ve
Vs
®e
Ve

=200

e
Be

SEQ 0094

novalue -

ERR FLG

CONTAINS THE ADDRESS (PASSED BY REF)

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF THE ROUTINE CALL.

Woe
8,
e
%o
®s

—=2O OO NO NS W
AW
QOMNO VN

Y e AN AN NN NN
A A

U U L A

g L L A A Ul U A A AN A A AN A O W

AN U L L Ul A U U AN N AN A A AN AN AN W AN AN AN AN [V VRV IV VIV [V LY IV ]
B L AN L AN AN AN AN AN AN AN RN N RO N NN PO NI NN = b b ed ccd ccd
b b

22-0ct-1980 10:647:44
22-0ct=-1980 10:45:32

VLB

BN,

3286 MLS
3287
3288
3289 ;
3290
329N
3292
3293
3294
3295
3296
3297
3298
3299
3300
3301
3302
3303
3304
3305
3306
3307

23-0CT-80 09:11

IMPLICIT INPUTS:
WT _DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

RD _DATA

GETS LOADED WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAJLING BAD DATA.

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA

AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

TOPS-20 Bliss=16 V2(206)
PA:<NEALE>BLZML4.BLI.2 (21)

MACRO M1113

TEST
HARDWARD TEST S ECTION

23-0CT-80 09:11

PAGE 109

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

3342 JMLG
3343

3344
3345
3346

RD_DATA
it

WRT

.SAVE THE DATA WRITTEN TO THE REGISTER
.READ AND SAVE THE REGISTER

HASK

.MLAR or .IGNORE;

.WT_DATA neq .RD_DATA then .ERR_FLG = ONE;

'READ THE REG FOR WRT_MASK

'SET ERROR FLAG IF NEO

end;

004157
005076
016600
006300
006300
006300
010001
01610Q
056600
046100
016102
050002
010267
017702
056102
010267
026767
001403
012776
000207

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (21)

"CLEAR THE ERROR FLAG

LRR_FLG
= lEROQ,

WT_DATA

3347
3348
3349

014756
014762
014766
014772
014774
014776
015000
015002
015006
015012
015016
015022
015024
015030
015034
015040
015044
015052
015054
015062

SEQ 0095

167024

RD.MR:

000010
000012

JSR

R1,$SAVE2

MOV

12(SP),RO
RO
RO
RO
RO,R1
ML.REG+2(R1),RO
14(SP) ,RO
ML.REG+4 (R1),RO
ML.REG*+6(R1),R?

CLR

ASL
ASL
ASL
MOV
MOV

011702
000014
011704
011706

BIS
BIC

MoV

BIS

174640
174764

MOV
MOV

011706
174626
174620

174620

000001

000010

BIS

MOV

CMp
BEQ

MOV
RTS

a1d(se)

;

INDEX,*

TST.PAT,»

R2.WI.DATA

2r7?

aML .REG+120,R2

ML.REG*6(R1),R2
R2.RD.DATA
#;.DA?A.RD.DATA

2779

;

#1,310(5P)

Routine Size:
35 words
; Maximum stack depth per 1nvocat1on

;

2722
2775
2776

ERR.FLG

*,ERR.FLG

2722

3 words

CIMLAAQ ML-11 L 0GIC

L oGlIC 1 EST
HARDWARD TEST S ECTION

MACRO M1113

CIMLAAD ML-11

routine WRT_PA

begin

F
8
110

SEQ 0096

44
:32

(TST_PAT,

index)

TOPS=20 Bliss=16 V2(206)
PA:<NEALE>BLZML4.BLI.2 (22)

novalue =

'
i
'
'

FUNCTIONAL DESCRIPTION:
LOADS THE PROM ADDRESS REGISTER WITH A DATA PATTERN GENERATED BY
FORMAL PARAMETEPS:
TST PAT
NDE

5064

006167

152777

016600
005300
006300
006300
010001

016100
056600
046100
016102
050002
010277

162777

000207

USED BY

;
2797
2798
2799
2800

THE

MACRO WRT_MASK

%UggENT DATA PATTERN TO BE LOADED IN THE REGISTER.

B BWNNIN
= =200 O ~N~N
GOSN
NONNOO &~ OO

g
e
D
D
el il
D
D
e
i
D
D
i

3429
3430
3431
3432
3433
3434
3435
3436
3641
34472

—

3428

OOOO0OOOOOCOOOOO0O

3420
34621
3422
3423
3424
3425
3426
3427

PAGE

22-0ct-1980
22-0ct-1980

(W AW LV RV LV LV AV LV LV, [V LV IV IV, w
—d i o
e
e e
e
i
e
d b -0 O

3410
3411
3415
3419

330 H )
3392 .
3393
3394
3395
3396
3397
3198
3399
3400
3401
3402
3403
3404
3405
3406
3407
3408 ;
3409

23-0(T-80 09:11

THE MACRO WRT MASK

TO SELECT

THE

CURRENT REGISTERS ADDRESS,

FORCED HI, FORCED LO AND DON'T CARE MASK INFORMATION,

PROM _DIS

= ONE;

'SET

PROM_DIS
end;

'CLEAR PROM DISABLE BIT

MLPA = WRT_MASK;

166716
000040
000010

174722

ZERO;

WRT.PA:

174640

000040

JSR
8158
MOV

ASL
ASL
ASL
MOV

011702
000012
011704
011706

MOV
BIS
BIC
MOV
BIS
MOV

174652

2gd:)
RTS

;
;

PROM DISABLE BIT

'LOAD MLPA WITH GENERATED WRT_MASK PATTERN

R1,8SAVE?

;

#40,3ML .REG+120
10(sSP),RO

RO
RO
RO
RO,R1

ML.REG+2(R1),RO
12(sP) RO
ML.REG+4(RYV)
RO
ML.REG*6(RT)
,R2
RO,R2
R2,aML .REG+100

#60,3ML .REG+120
PC

Routine Sire:
26 words
)
Maximum stack depth per invocation:

INDEX,®

TST.PAT,
e

;
3 words

2783

;
;

2797
2798

2799
2783

MACRO M1113

L 0Gl1C 1 EST
HARDWARD TEST S ECTION
CIMLAAD ML-11
34446

PAGE

111

routine RD_PA

begin

3449 ;

3450 ;
3451 ;
3452

;

3454

;

FUNCTIONAL

;

THE

CONTENTS OF

THE

—

)
)

il
d
d
D
)
—

GENERATED BY THE MACRO 'WRT_MASK'.
IF THE COMPARE IS NOT EQUAL THEN
THE FORMAL PARAMETER 'ERR FLG' IS

23362”50 A ONE TO INDICATE TH4E
FORMAL PARAMETERS:
TST PAT

DATR PATTERN TO BE MASKED AND

COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST.

w0
0.
e
e
B

X
INDE
USED BY

THE MACRO WRT MASK TO

SELECT THE CURRENT REGISTERS ADDRESS.

FORCED HI, FORCED LO AND DCN'T
MASK INFORMATION.

CARE

3475

;

476 ;
3477 ;

3478 ;
3479 ;

3480 ;
3481

;

ERR FLG

CONTAINS THE ADDRESS (PASSED BY REF)

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF THE ROUTINE CALL.

IMPLICIT
WT

INPUTS:

DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FA[LING GOOD DATA.

RD_DATA

GETS LOADED WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAILING BAD DATA.

3482 ;
3483
3484
3485
3486
3487
3488
3489
3490
3491
3492
3493
3494
3495

3496
3497 ;

3498 ;

SEQ 0097

novalue

3468 ;
3469
3470
3471
3472
3473
3474

ERR_FLG)

WITH THE MASKED DATA PATTERN

OO0 ~NO W

3465 ;

3466 ;

COMPARES

Q0 Co Oo 0o OO Co 0o Co OO

3462 ;
3463 ;
346477

index,

PESCRIPTION:

FROM ADDRESS

LT ST NI NI NI NS

3459 ;
3460 ;
3461 ;

(7ST_PAT,

+¢

3453 ;

3455
3456 ;
3457 ;
3458 ;

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32

MLG

3445 ;
3446
3647 ;
3448

3467

23-0(T-80 09:11

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA
AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

TOPS=20 Bliss=16 v2(20¢)
PA:<NEALE>BLZMLL.BLI.2 (2%

CZMLAAD ML-11

HARDWARD

TEST

LOGIC

MACRO M1113

TESTY

SECTION

3500 ‘MLG
3501
3502
3503
3504
3505

23-0(T-80 09:11

PAGE

112

8
SEQ 0098
167:44
5 132

LERR_FLG =

ZERO;

.CLEAR THE ERROR FLAG

PROMTMDIS = ONE;
W1 _DATA = WRT_MASK;
RD_DATA = LFA or .I1GNORE;

iSET THE PROM DISABLE BIT
'SAVE THE DATA WRITTEN TO THE REGISTER
'READ AND SAVE THE REGISTER

TOPS-20 Bliss=-16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.

.WT_DATA neq

.RD_DATA

then

.ERR_FLG

= ONE;

.READ THE REG FOR WRT_MASK

b
i
D
D
D
D
D
D
D
D el
e
D i
D
o
i
— e

NOWVES
WA —2,O0W

[el=leleleslalelelelolalelalololelolelelel
o]

NN N AN NN N N

AN NN
PNINININOPNINININD)
— 2

CNE

PROM_DIS =
end;

15262

004167
005076
152777
016600
006300
006300

006300
010001
016100
056600

046100
016102
050002
010267
017702
056102
010267
026767
001403
012776
162777
000207

166632
000010
000040
000012

RD.PA:

174632

JSR
(LR
BISB

R1,$SAVE?
810(sSP)
#.0,8ML.REG*120

ASL
ASL
ASL
MOV

RO
RO
RO
RO,RY

MOV

011702
000014
011704
031706
174440
174544

011706
174426

'SET ERROR IF NEOQ
iCLEAR THE PROM DISABLE BIT

ZERO;

176420

174420

ML .REG+2(R1),RO
14(SP) RO
ML.REG+4(R1)
,RO
ML.REG+6(R1)
,R?
RO,R2

BIS
MOV

ML.REG+6(RT)
,R?
R2,RD.DATA

000001
000040

000010
174530

MOV
BI(B

#1,310(SP)
#40,3ML.REG+120

(MP
8EQ

1§%:
.

;

RTS

Routine Size:

: INDEX,®

12(5P) RO

MOV
8IS
BIC
MOV
BIS

MoV
MOV

: ERR.FLG

2801
2853
2854
2855

TST.PAT
¢

R2,WT.DATA
aML.REG+100,R2

2856

#;.DATA,RD.DA]A

2858
:

words

Maximum stack depth per

invocation:

3 words

*,ERR.FLG

2860
2801

CIMLAAD ML-1%

HARDWARD

TEST

LOGIC

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

113

SEQ 0099

NN
N AN

(VAR VALV IV IV, 1V, ]
(S LAlV
IV, [V IV, )

22-0ct=-1980 10:47:44
22-0ct=1980 19:45:32
routine WRT_ET1 (TST_PAT,
begin

index)

TOPS-20 Bliss=16 v2(206)
PA-<NEALE>BLZMLG4.BLI.2 (24)

novalue =

lee

Ve Ve W

!
!
'
'

WITH A DATA PATTERN GENERATED BY

NDE

USED BY THE MACRO WRT_MASK

TQ SELECT

THE CURRENT REGISTERS ADDRESS,

FORCED HI, FORCED LO AND DON'T CARE MASK INFORMATION,

ECC_DM - ONE;

2879
(W RV LV LV LV IV LV AV LV IV IV IV JV V., |V ]

272

006167

152777
016600

006300
006300
006300
010001
016100
056600
046100
016102
050002
010277
142777
000207

THE MACRO WRT _MASK

EUSEENT DATA PATTERN TO BE LOADED IN THE REGISTER,

® e e e Ve Be W WL BN
QCOOOOOO0OOOOOOOO0
—t e el e el end il e
) el
) d i ad =D

FUNCTIONAL DESCRIPTION:
LOADS THE ECC CRC WORD REG 1
FORMAL PARAMETEPS:
TST _PAT

'SET ECC DIAG MODE

MLET = WRT_MASK;
ECC_DM = 2ERO;

.LOAD MLE1 WITH GENERATED WRT_MASK PATTERN
‘CLEAR ECC DIAG MODE

end;

166510
000001

000010

174514

WRT.E1:

R1,$SAVE2
#1,3ML.REG*120

ASL
ASL
ASL
MOV

RO
RO
RO
RO,R1

MOV

011702
000012
011704
011706
174502
000001

JSR
BISB

;

10(SP) ,RO

MOV
BIS
BIC
MOV
BIS

ML.REG+2(R1),R0
12(SP) RO
ML.REG*4(R1),RO
ML.REG+6(R1),R2
RO, R

RTS

MOV
BI(B

174444

Routine Size:

;

RZ2,aML .REG+150
#1,3ML .REG+120
26 words

; Maximum stack depth per invocation:

;

INDEX,*

TST.PAT,e

;

3 words

2862
2876
2877

2878
2862

CIMLAAD ML-11 LOGIC

HARDWARD TEST

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

J
8
PAGE 114

SEQ 0100
7
22-0ct-1 980 10:47:44
22-0ct-1 980 10:45:32

3604 MLG
routine RD_E1
begin

(TST_PAT,

index, ERR_FLG)

novalue =

lee

Bs
%o
S

3635
3636

®e

IRA

R ITEIE

FUNCTIONAL DESCRIPTION:

i
i
i
;
i
i
i
i
i
i
i
i
i
i
i
;
i
i
i
j

;
i
i
i
i
i
i
i
i
i
i
i
i
i
i
;

i
i
i
i
i
i
i
i

COMPARES THE CONTENTS OF THE
ECC CRC WORD REGISTER 1

WITH THE MASKED DATA PATTEKN

GENERATED BY THE MACRO 'WRT_MASK'
IF THE COMPARE iS NOT EQUAL THEN
THE FORMAL PARAMETER 'ERR_FLG' IS

ASSIGNED A ONE

TO INDICATE

THE ERROR.

FORMAL PARAMETERS:
TST PAT

DATK PATTERN TO BE MASYED AND
COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST.
X
INDE

USED BY THE MACRO WRT MASK T0

SELECT THE CURRENT REGISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE

MASK

INFORMATION.

ERR FLG

CONTAINS THE ADDRESS (PASSED BY REF)

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF

THE ROUTINE CALL.

IMPLICIT INPUTS:
WT _DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

RD DATA

GETS LOADED WITH DATA READ FROM THE

REGISTER THUS ALLOWING CALLER
TO PRINT FAILING BAD DATA,
IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA
AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

.ERR_FLG - ZERO;

'CLEAR THE ERROR FLAG

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2MLAL.BLI.2 (2%

CIMLAAQ ML-11 LOGIC TEST

HARDWARD TEST

MACRO M111 3

SECTION

23-0(T-80 09:11

PAGE 115

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

3660 ML4
3661 ;
O

'SAVE THE DATA WRITTEN TO THE REGISTER
'READ AND SAVE THE REGISTER

000

WRT_MASK;
wi_DATA
RDCDATA = .MLE 1 or .IGNORE;

.WT_DATA ne q

.RD_DATA then ERR_FLG = ONE;

®e

142777

000207

end;

166424

000010
000007
000012

RD.E1:

174424

011704

: ERR,FLG
.
: INDEX,«

MOV
BIS

ML.REG+2(R1),RO
14(SP) RO

¢
; TST.PAT,

MOV

ML.REG+6(R1)
,R2

176212

174212

000001
000001

000010
174322

MOV
BIS
MOV

1§:

RO
RO
RO
RO,R1

ML.REG+4(R1)
,RO
RO,R2
R2,WT.DATA

oML .REG+150,R?
ML.REG+6(R1)
,R2
R2.RD.DATA

2934

2936

CMP

?I.DATA.RD.DATA

MOV
BICB

#1,310(SP)
#1,3ML.REG+120

: *,ERR.FLG
:

BEQ
RTS

: Routine Size:

&1 words

: Maximum stack depth per invocation:

2380
2931
2932
2933

a10(sP)
#1,aML .REG+120
12(sP),RO

8IS
MOV

174232

R1,$SAVE2

(LR
BISB
MOV

BIC

011706
1764406
011706
1746220

JSR

ASL
ASL
ASL
MOV

011702
000014

'READ THE REG FOR WRT_MASK

.SET ERROR FLAG [F NEQ
'"CLEAR ECC DIAG MODE

ECC_DM = ZERO;

004167
005076
152777
016600
006300
006300
006300
010001
016100
056600
046100
016102
050002
010267
017702
056102
010267
026767
001403
012776

T0PS=20 Bliss=-16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (2%)

'SET ECC DIAG MODE

ECC_DM = ONE;

2940
015356
015362
015366
015374
015400
015402
015404
015406
015410
015414
015420
015424
015430
015432
015436
015442
015446
015452
015460
015462
015470
015476

SEQ 0101

;

3 words

2938
2880

MACRO M1113

CZMLAAD ML-11 L 0GIC 1 EST

HARDWARD TEST

S ECTION

YR TR PR IR P PRI T P N
PNP PRI ILI TN TN N

(TST_PAT,

index)

SEQ 0102

novalue =

lee

FUNCT] ONAL DESCRIPTION:

LOADS THE ECC CRC WORD
REGISTER 2 WITH A DATA PATTERN
GENERATED BY THE MACRO

WRT_MASK

FORMAL PARAMETERS:
TST_PAT

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.
INDEX

USED BY THE MACRO WRT_MASK

TO SELECT THE CURRENT REGISTERS

ADDRESS,

FORCED HI.,

FORCED

LO AND DON'T CARE MASK

YRR YR IR IR IETEYETE

INFORMATION.

2969
2970
2971

004167

'SET ECC DIAG MODE
IMASK OUT DATA DIAG BITS

ECC DM = ONE;

(=
o

MLE?

purd

PAGE 116

TOPS-2N Rliss=16 v2(206)
PA:<NEALE>BLZ2MLG4.BLI.2 (26)
routine WRT_E2
begi n

[ ]

W
~
|V]
W

3711 ;MLG
3712 ;
3713
3714
3715
31716
3717
3718
3719
3720
3721
3722
3723
3724
3725
3726
3727

23-0(7-80 09:11

152777

012767
016600
006300
006300
006300
010001
016100
056600
046100
016102
050002

010277
005067

142777
000207

MASK = %0°177700°';

'LOAD MLE2 WITH GENERATED WRT_MASK PATTERN

MLE2
= WRT_MASK;

'RESTORE MLE2 MASK

MLEZ2 MASK = %0'000000°;
= ZERO;
ECC DM

'CLEAR ECC DIKG MODE

end;

166302
000001
177700

000010

174306

1746346

WRT.E2: JSR
BISB

MOV

MOV
ASL
ASL
ASL
MOV
MOV

011702
000012
011704
011706

BIS
BIC

MOV

;ML
174276
174300
000001

174224

8IS

#-100,ML .REG+166
10(SP) RO
RO
RO
RO
RO,R1
ML.REG+2(R1),RO

12(SP),RO
ML.REG+4(R1),RO

INDEX,«

;

TST.PAT,

ML.REG*6(R1),R2

RO,R2

MOV
CLR

R2,aML.REG+160
ML.REG+166

RTS

BICB

2941
2966
2967
2968

R1,$SAVE2
#1,3ML.REG+120

#1,3M .REG 120

22-0ct-1980 10:6 7:44
22-0ct-1980 10:6 5:32

TGPS
PA:<

2969
2970
2941

CIMLAAQD ML-11 LOGIC TEST

3779 ML
3780
3781
3782
3783 .
[J

3784

[

;

[

3785
3786 .
3787 ;
3788
L4

[

SECTION

routine RD_E2
begin
!

;
.
;

[

e v
o

[

e e A

[

;
;
;
;
.
;
;
;
;
.
;

[J
2
[

<.
[4

= §

P § m P AR §

[

S am § A A

W= P

e S MR

[4
[4

[

w §

8
= S

[4
[

[

m o wm &

[
[4

o m #

v §

[

3789
3790
3791
3792
3793
3794
3795
3796
3797
3798
3799
3800
3801
3802
3803

PAGE 117

(TST_PAT,

index, ERR_FLG)

novalue =

T4e

23-0CT-80 09:11

SEQ 0103
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2MLG4.BLI.2 (27)

"HARDWARD TEST

MACRO M1113

FUNCTIONAL DESCRIPTION:
COMPARES THE CONTENTS OF

ECC CRC WORD REGISTER 2

THE

WITH THE MASKED DATA PATTERN

GENERATED BY THE MACRO 'WRT_MASK'
IF THE COMPARE IS NOT EQUAL THEN
THE FORMAL PARAMETER ‘ERR _FLG' IS

gggégufo A ONE TO INDICATE THE
FORMAL PARAMETERS:
TST_PAT

DATK PATTERN TO BE MASKED AND

COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST.
INDEX
USED BY THE MACRO WRT _MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,
FORCED HI,

MASK

FORCED LO AND DON'T CARE

INFORMATION.

ERR FLG

CONTAINS THE ADDRESS (PASSED BY REF)

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF THE ROUTINE CALL.

IMPLICIT INPUTS:
WT _DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

RD DATA

GETS LOADED WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAILING BAD DATA.

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA

AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

CIMLAAO ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

PAGE 118

3835 ;ML4

22-0ct-1980 10:47:44

%g%g :

3024
3025

3842 ;

3028

ggzg ;

§8§5

3847 ;

3033

3849 ;

3035

841 ;
%gzz :

848

gggg :

3026

WT_DATA = WRT_MASK;

1SAVE THE DATA WRITTEN TO THE REGISTER

gggg

RD_DATA = .MLE2 or .IGNORE;
it

MLE2 MASK = X0'000000°*;

3036

end;

152777
012767
016600

166204

005076

000010

000001
177700
000012

006300
006300
006300
010001
016100
056600
046100

RD.E2:

174204
174244

011702
000014
011704

3872 015660

010267

1740064

056102
010267

011706
173772

001403
012776

173764

000001

000010

3874 015670
3875 015674

3876 015700

3877 015706
3878 015710

3879 015716
3880 015722
ggg; 015730
3883
3884

'READ AND SAVE THE REGISTER

011706

050002

017702

ISET ERROR FLG IF NEQ

IRESTORE MLE2 MASK

026767

005067
142777
000207

174144
000001

]

2972

b.SB
MOV
MOV

#1,3ML.REG+120
#-100,ML .REG+166
12(SP) ,RO

:
:
; INDEX,«

3026
3027
3028

BIS

MOV

174070

a10(spP)

3025

: TST.PAT,*"

ML.REC+6(R1),R2

RO,R2

R2,WT.DATA

aML.REG+160,R2

3029

WT.DATA,RD.DATA

;

3031

ML.REG+6(R1),R2
R2,RD.DATA

BEQ
MOV

1%
#1,310(5P)

CLR
BICB
RTS

; ERRYFLG

RO
RO
RO
RO,R1
ML.REG+2(R1),RO
14 (SP) ,RO
ML.REG+4(R1),R0

BIS
MOV

CMP

1$:

'CLEAR ECC DIAG MODE
R1,$SAVE?

('R

MOV

74170

'READ THE REG FOR WRT_MASK

JSR

ASL
ASL
ASL
MOV
MOV
BIS
BIC

016102

3873 015664

'MASK OUT DATA DIAG BITS

ECC_OM = ZERO;

3870 015652

3871 015656

'SET ECC DIAG MODE

.WT_DATA neq .RD_DATA then .ERR_FLG = ONE:

3034

3860 015606
3861 015614
3862 015622

3863 015626
3864 015630
3865 015632
3866 015634
3867 015636
3868 015642
3869 015646

ICLEAR ERROR FLAG

MLE? HASK i
= o 177700°;

004167

PA: INEALE>BL2ML4.BLI.2 (27)

.ERR FLG ZERO

ECC BM =

3027

3858 015576

3859 015602

TOPS=20 Bliss=-16 v2(206)

22-0ct=1980 10:45:32

31838 ;
3839 ;

3840 :

SEQ 0104

; *,ERR.FLG

ML.REG+166
#1,aML .REG+120
PC

: Routine Size:
46 words
: Maximum stack depth per invocation:

;
;
;

3 words

3034
3035
2972

CZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

routine WRT_PD

begin

SEQ 0105

(TST_PAT,

ind ex)

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4L.BLI.2 (28)

novalue =

FUNCTIONAL DESCRIPTION:

LOADS THE PROM DATA
REGISTER WITH A DATA PATTERN
GENERATED BY THE MACRO

WRT_MAS K

FORMAL PARAMETERS:
TST_PAT

IERIEIEIRY

CURRENT DATA PATTERN TO BE

LOADED IN THE REGISTER.

INDEX
USED BY THE MACRO WRT_MASK

TO SELECT THE CURRENT REGISTERS

ADDRESS,

FORCED MI,

FORCED

LO AND DON'T CARE MASK
INFORMA TION

3068
3069
NGO
NN
W
NS NVOOoON SO

IV IV TV I IV IV IV 1V 1V,
NNNNNNSNNSN

732

‘ee

e
D eB
e
e
il
D
il
— ol

PAGE 119

22-0ct=-1980 10:467:44
22-0ct=1980 10:45:32

3890 JMLG
3891
3892
3893
3894
3895
3896
3897
3898
3899
3900
3901
390
3903
3904 ;
3905
3906
3907
3908
3909
3910
391
3912
3913
3974
3915
3916
3917
3918
3919

OOOOOOCOMDOOO

23-0CT-80 09:11

0046167
152777
152777
016600
006300
006300
006300
010001
016100
056600
046100

.SET PROM READ WRITE
!SET DATA DIAG MODE

PROM RW
= 0O NE.
DAT DM = ON E.
MLPD
= WRT MASK;
;
DAT (LK = ONE
PROM RU =7 ERO
DAT_DM = 1ERO

'LOAD MLPD WITH GENERATED WRT_MASK PATTERN
‘D0 A DATA (LK
'CLEAR FROM READ WRITE
'CLEAR DATA DIAG MODE

end;

166050

000100
000010
000010

174054
174046

WRT.PD:

JSR
BISB
B1SB
MOV
ASL
ASL
ASL
MoV
MOV

8IS
BIC

R1,$SAVE2

#100,3ML .REG+120
#10,9ML. REG+120

*
INDEX,

10(SP),R0

RO,R1

ML. REG*Z(R\) RO

,R
12(SP)
ML .REG*4 (R1),RO

e«
TST.PAT,

3037
3063
3064
3065

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

3945
3946

3955
3956

3957
3962
3963

PAGE 120

9
SEQ 0106
TOPS
PA:<

sMLé

011706

MoV

1764114

Mov

NN
O ~N~N
OO

000020
000100
000010

BIS

016102
050002
010277
152777
142777
142777
000207

b
b —

3947

3948 016002
3949 016006
3950 016010
3951 016014
3952 016022
3653 016030
31954 016036

23-0CT-80 09:11

B1S8
BI(B
BI(8
RTS

ML.REG+6(R1),R2
RO.R2
R2 aML.REG+230

#20 AN .REG+120
#100,aML .REG+120
:E0.0HL.REG*120

Routine Size:
35 words
; Maximum stack depth per invocation:

3066
3067
3068
3037

3 words

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

0.9
PAGE 121

3965 ;ML4

22-0ct=1980 10:47:44

%329 :
3968
3969
31970
3971
3972
3973
3974
3975
3976
31977
3978
39°9
3900
3981
3982
3983
31984
3985
1986

;
;
;

3988
31989
3990
3991
3992

routine RD_PD
begin

;
;
;
;
;
.
;

3090
3091
3092
3093
3094

!
!
!
!
!

COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST

3096
3097

!
!

FORCED H1., FORCED LO AND DON'T CARE
MASK INFORMATION.

;
.
;
;
.

3987 ;

3993 .

3994 ;
3995 :

1996 ;
3y97 ;

3998 ;
3999
4000
4001
4002
4003
4004

22-0ct=1980 10:45:32
3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088

:
;
;
;

;
;
;
;
;
;

4005 ;

4006 ;

4007 ;

3089

3095

3098
3099

3100

3101
3102
3103
3104
3105
3106

3107

3108

3109

4008 ;
4009 ;

3110
3111

4011 ;
4012 ;
4013 ;

3113
3114
3118

4010 ;

4014

;

4015 ;
4016 ;

4017 ;

4018 ;
4019 ;

SEQ 0107

3112

3116

3117
3118

3119
3120
3121

(TST_PAT,

index, ERR_FLG)

novalue =

'+
' FUNCTIONAL DESCRIPTION:
!
!
COMPARES THE CONTENTS OF THE
!
PROM DATA REGISTER
!
WITH THE MASKED DATA PATTERN
!
GENERATED BY THE MACRO 'WRT_MASK'
.
!
IF THE COMPARE [S NOT EQUAL THEN
!
THE FORMAL PARAMETER ‘'ERR FLG' IS
!
ASSIGNED A ONE TO INDICATE THE
!
ERROR
!
' FORMAL PARAMETERS:
!
!
TST PAT

DATE PATTERN TO BE MASKED AND

INDEX
USED BY THE MACRO WRT MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,

!
!

ERR FLG

!
!
!
!
!
!

CONTAINS THE ADDRESS (PASSED BY REF)

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF THE ROUTINE CALL.

IMPLICIT INPUTS:
WT DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAJLING GOOD DATA.

!
!

RD _DATA

!
!
!
'

!
!

GETS LOADED WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAILING BAD DATA,

IMPLICIT QUTPUTS:

!
‘'--

GLOBAL LOCATION WR_DATA
AND RD DATA LOADED WITH GOOD

AND BAD REGISTER [LATA

TOPS=-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4L.BLI.2 (29)

b o o)

CIMLAAQ ML-11 LOGIC TEST

CIPLAAD ML-11

HARDWARD

4021

TEST

LOGIC

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE

122

;ML

22-0ct=-1980 10:47:44

28%% ;

22-0ct=1980 10:45:32

6026 ;
4025 ;
4026 ;

3122
3123
3124

28%8 ;

%1%;

4027 ;
4028 ;

3125
3126

RD_DATA = .MLPD or .IGNORE;

'READ AND SAVE THE REGISTER

. %1%8

4033 ;
4034 ;

313
3132

PROM RW = ZERO;

2828 :

3134

end;

4044 016040

4045
4046
4047
4048
4049
4050
4051
4052
4053
4054
4055
4056
4057

3133

004167

016044
016050
016056
016064
016070
016072
016074
016076
016100
016104
016110
016114
016120

005076
152777
152777
016600
006300
006300
006300
010001
016100
056600
046100
016102
050002

4US9 016126

017702

4058 016122

4060 016132
4061 016136

4062 016142

4063 016150
4064 016152

4065 016160
4066 016166
282é 016174
4069
4070

165742

000010
000100
000010
000012

RD.PD:
173742
173734

011702
000014
011704
011706

056102
010267

011706
173530

001403
012776

173522

000001

000010

000100
000010

'CLEAR DATA DIAG MODE

JSR

173632
173624

;
;

;

MOV

ML .REG+230,R2

;

3127

WT.DATA,RD.DATA

3129

#100,aML .REG+i20
#10,3ML.REG+120
PC

:
:
;

R2,WT.DATA

BIS
MOV

ML.REG+6(R1)
,R2
R2,RD.DATA

BEQ
MOV

1%
#1,310(5P)

BI(B
BICB
RTS

Routine Size:
&7 words
Maximum stack depth per

invocation:

;
;
;
;

ERR.FLG

;

TST.PAT,+

3070

310(SP)
#100,3ML .REG+120
#10,aML .REG+120
12(SP) RO
RO
RO
RO
RO,R1
ML.REG*+2(R1),RO
14(SP) R0
ML.REG+4(R1),RO
ML.REG+6(R1)
,R2
RO,R2

CMP

1%:

R1,$SAVE?2

CLR
BISB
BISB
MOV
ASL
ASL
ASL
MOV
MOV
BIS
BIC
MOV
BIS
MOV

173776

'READ THE REG FOR WRT_MASK

'SET ERROR FLAG IF NEQ
'"CLEAR PROM READ WRTE

DAT_BM = 2ERO;

173542

142777
142777
000207

'SET DATA DIAG MODE
'SAVE THE DATA WRITTEN TO THE REGISTER

.WT_DATA neq .RD_DATA then .ERR_FLG = ONE;

010267

026767

PA:<NEALE>BL2ML4.BLI.2 (29)

'CLEAR ERROR FLG
'SET PROM READ WRITE

DAT BM = ONE;
WT_DATA = WRT_MASK;

0108

TOPS=20 Bliss=16 v2(206)

.ERR_FLG = ZERD;
PROMTMRW = ONE;

28%5 ;

4035 ;

SEQ

;

3 words

INDEX,*

*,ERR.FLG

3123
3124
3125
3126

3132
3133
3070

MACRO M1°13

CIMLAAQ ML-11 L LOGIC T EST

L1114
4115
4120
L1

N
O
=2 O 000
NN

21, TV TV V]
i
2F 2
W

W
W
o VI TV IV IV IV IV IV IV V. P W
o O®W NN
NN 2O V00NN

(V]

i
D

LW TV [V TV LW T

— —

el e

)

el e

TV IV T TV TV T TV IV TV TV T TV TV TV TRV [
W(W

EYEYEYEIEIEIYETETE

PRI

WA
I

(113

PAGE 123

SEQ 0109

22-0ct=-1980 10:47:44
22-0ct=1980 10:45:32

FEL

4076 JMLG
4077 ;
4078
4079
4080
4081
4082
4083
4084
4085
4L086
4087
4088
4089
4090
4091
4092
4093
4094
4095
4096
4097
4098
4099
4100
4101
4102
4103
4104
4108
4112 016176

S ECTION

HARDWARD TEST

23-0(CT-80 09:11

000207

routine WRT_EL
begin

(TST_PAT,

index)

T0PS=20 Bliss=-16 v2(206)
PA:<NEALE>BLZ2ML4L.BLI.2 (3D

novalue =

les
|

i
i

'
'

FUNCTIONAL DESCRIPTION:

DUMMY ROUTINE CALL TO ASSIST

WRITE REGISTER ALGORITHEM

IN THE READ

FORMAL PARAMETERS:
TST PAT

DATK PATTERN TO BE MASKED AND

COMPARED AGAINST THE CONTENTS

OF THE REGISTER UNDER TEST

;
i
;

INDEX

USED BY THE MACRO WRT MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE

]

MASK

]

INFORMAT]ON,

]

| .

ERROR LOCATION REG 1S READ ONLY
return;

end;

WRT.EL:

RTS

Routine Size:

;

word

: Maximum stack depth per

invocation:

O words

313%

CIMLAAD ML=-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

G 9
PAGE 124

4123 ;MLG

22-0ct=-1980 10:47:44

22-0ct-1980 10:45:32

2}%2 :

6126
627 ;
6128 ;
6129 ;
6130 ;
L3
6132
6133
6134
4135
6136

;
;
;
;

6137 ;
4138
4139
6140
G141
6142

;
;
;

3161
3162

7163
3164
3165
3166
3167
3168
3169
3170
371

3172

;

3173
3176
3175
3176
3177

41446 ;
4145 ;

3179
3180

64143 ;

4146 ;
L1467
4148 ;

4149 ;

64150 ;

3178
3181
3182

6153

;

31188

4155 ;
4156 ;

3190
3191

;
;
;
;

6161 ;

6162 ;

6163 ;

4164 ;
4165 ;

4166 ;
4167 ;
4168
4169
4170
4177
6172

;
;
;
;
;

676
6175
4176
4177

;
;
;
;

4173 ;

¢
!
.
'
!

ASSIGNED A ONE
ERROR

3199
3200

3201
3202

3203
3204
3205
3206
3207

3208

3209
3210
3211
3212

INDE
X

USED BY

THE MACRO WRT_MASK

SELECT THE CURRENT REGISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE

MASK

ERR FLG

!
!

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS

3198

TO INDICATE THE

COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST

3189

3197

IS NOT EQUAL THEN

DATK PATTERN TO BE MASKED AND

!
!

3196

: novalue =

FORMAL PARAMETERS:
TST PAT

3187

3192
3193
3194
3195

THE COMPARE

THE FORMAL PARAMETER 'ERR FLG'

318¢

4157
4158
4159
4160

3185

3184

index, ERR_FLG)

'+e
' FUNCTIONAL DESCRIPTION:
.
.
COMPARES THE CONTENTS OF THE
!
FERROR LOCATION REGISTER
!
WITH THE CONTENTS OF TST_PAT,

3183

;

64154 ;

routine RD_EL (TST_PAT,
begin

!
!
!

6151

4152 ;

SEQ 0110

!
!
'
!

CONTAINS THE ADDRESS (PASSED BY REY)

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

!
!

RD _DATA

!
!

THE ROUTINE CALL.

[MPLICIT INPUTS:
WT _DATA

!
!
'
!
!

INFORMATION.

GETS LOADED WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAJLING BAD DATA.

IMPLICIT QUTPUTS:

!
'--

GLOBAL LOCATION WR_DATA

AND RD DATA LOADED WITH GOQD

AND BAD REGISTER DATA

.ERR_FLG = ZERO;

T0PS-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (31

CIMLAAD ML-11 LOGIC TEST
79 JMLG
4180 ;
L1
4182 ;
(183 ;
6184 ;

4185 :

4186
4187
61N
4195
4196
6197
4198
4199
4200
2N
4202
4203
4204
4209
42190

:
;

016200
016204
016212
016220
016226
016230
016236

SECTION

23-0(T-80 09:11

PAGE

125

SEQ@ 011N

22-0ct-1980 10:
22-0ct=19 80 10
1
]
1

1
1
32 1

[
RaTe
JV P JV ]

TEST

N
AN NN
NN

HARDWARD

MACRO M1113

005076
016667
017767
026767
001403
012776
000207

WT_DATA
RD_DATA
it

TOPS-20 BLi s=-16 v2(206)
PA:<NEALE>BL2MLG4.BLT.2 (31)

'SAVE THE DATA WRITTEN TO THE REGISTER
.READ AND SAVE THE REGISTER

LIST PAT;

MLEC

.RD_DATA neq

:32

.WT_DATA

tren

.ERR_FLG

= ONE;

.READ REGISTER FOR WT_DATA

end;

000002
000006
173702
173446

173456
173452
173442

000001

000002

RD EL:

1%:

CLR
MOV
Mov
CMP
BEQ

MoV
RTS

3212
3213

a2 (SP)
6(SP) ,WT.DATA
ML .REG+220,RD.DATA

3214

3216

?D.DATA,UT.DATA
$
#1,82(SP)

* ,ERR.FLG

16 words
: Routine Size:
; Maximum stack depth per invocation:

0 words

3161

CZMLAAO ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1T13

SECTION

23-0(T-80 09:11

PAGE 126

SEQ 0112
TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (32)

[@RVelo B

NTo JU P JV 1S E_Te

WA AN N AN AN AN N AN AN AN AN N
MINOAD IR
N
NN
NN AR NININI N —

]
W
I
R
IRI
IR
I
T
T
T
EITEIEIELE

:
;

016240

routine WRT_EE
begin

(TST_PAT,

index)

novalue =

les
]

i
i

!
!

FUNCTIONAL DESCRIPTION:

DUMMY ROUTINE CALL TO ASSIST

WRITE REGISTER ALGORITHEM

IN THE READ

FORMAL PARAMETERS:
TST_PAT

DATR PATTERN TO BE MASKED AND

!
|

COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST

i
;
i
i
]
;

Pl 2

YW Ll o

oF o P
o

NP norn
—
PONIAIN)
= b b s
WD =2 OO0
-NO W £H

6212 JMLG
0213

INDEX

USED BY THE MACRO WRT_MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE

MASK

INFORMATION.

3241

3242

3243

000207

ECC ERROR REGISTER

IS READ ONLY

return;

end;

WRT.EE:

RTS

Routine Size:

3219

word

: Maximum stack depth per invocation:

0 words

MACRO M1113

CIMLAAD ML-11 L0 GIC 1 EST
HARDWARD TEST SE CTION

23-0(T-80 09:11

PAGE 127

9
SEQ@ 0113
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4L.BLI.2 (33)

4258 ;LG
4259 ;
4260
4261
4262
4263
6264
4265

(TST_PAT,

i~dex,

ERR_FLG)

novalue

routine RD_EE
begin

lee

4280

4281
4282
4283
4284
4285
4286
4287
4288
4289
4¢90
4291
4292
4293
4294
4295
4296
4297
4298
4299

VL LV LV LV RV, 1V, AV,

OO ~NONN
SN NN —

AN AN AN AN N N NN N
MNOPININORNINI VIO

VBB

FUNCTIONAL DESCRIPTION:

COMPARES THE CONTENTS OF THE
ECC ERROR REGISTER WITH TST_PAT,
IF THE COMPARE IS NOT EQUAL THEN
THE FORMAL PARAMETER ''ERR FLG'' IS

23362"50 A ONE TO INDICATE THE
FORMAL PARAMETERS:
TST PAT

DATA PATTERN TO BE

COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST.

B¢

427
4272
4273
4274
4275
4276
4277
(278
4279

4266
w267
4268
4269
4270

4300
4301
4302
4303
4304 ;
4305
4306
4307
4308
4309
4310
311
4312

INDEX

USED BY THE MACRO MLEE T0
SELECT "HE CURRENT REGISTERS ADDRESS.
ERR_FLG

CONTAINS THE ADDRESS (PASSED

BY REF) OFf THE CALLERS ERROR FLG TO ENABLE
THE CALLER TO EXAMINE
OF THE ROUTINE CALL.

THE ERROR STATUS

IMPLICIT INPUTS:
WT _DATA

GETS LOADED WITH THE TST PAT
THUS ALLOWING CALLER TO PRINT
THE

FAILING DATA.

RD DATA

GETS LOADED WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAILING BAD DATA,

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA

AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

.ERR_FLG = ZERO;

WT_DATA = .IST _PAT;
RD_DATA = .MLEE;

'CLEAR THE ERROR FLAG

'SAVE DATA WRITTEN TG (HE REGISTER
'READ AND SAVE THE REGISTER

CIMLAAQD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

L3146 ;M6
2%}2 ;

4319 ;

3298

3299

*¢

000002
000006
173630
173404

173414
173410
173400

4333 016272

012776

000001

000002

2%25
L343

SEQ 0114

001403

000207

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (33)

'READ MLEE FOR TST_PAT

SET THE ERROR FLAG IF NEQ

end;

005076
016667
017767
026767

4336

_RD_DATA neq .WT_DATA then .ERR_FLG = ONE ;

6328 016242
4,329 016246
4330 016254
4331 016262

2%%2 016300

22-0ct-1980 10:47:44
22-0ct=-1980 10:45:32
%%39

4332 016270

PAGE 128

2%1; :

2%52 :

23-0(T-80 09:11

RD.EE:

CLR
MOV
MOV
(MP

a2(sP)
6(SP),WT _DATA
oML .REG*+210,RD.DATA
RD.DATA,WT.DATA

: ERR.FLG
: TST.PAT,»
;
:

MOV

#1,a92(SP)

: *,ERR.FLG

BEQ

1%:

RTS

; Routine Size:

16 words

; Maximum stack depth per invocation:

0 words

3292
3293
3294
3296

3244

CIMLAAQ ML~-11

HARDWARD

23-0CT-80 09:11

PAGE

129

9
SEQ 0175

2-0ct-1980 10:4
2-0ct=-1980 10:4

MLG

(TST_PAT,

index)

T0PS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4L.BLI.2 (34)

novalue =

routine WRT_D1
begi n

Yee

[}

fUNCTIONAL DESCRIPTION:

LOADS THE DATA DIAG REG 1

WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK

FORMAL PARAMETEPRS:
TST_PAT

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.

INDEX
USED BY THE MACRO WRT_MASK

TO SELECT

THE

CURRENT REGISTERS ADDRESS,

FORCED HI, FORCED LO AND DON'! CARE MASK INFORMATION.

TR,

Vo9V

i
i
i
i
i
i
i
g

end;

165500

000010
000010

173504

WRT.D1:

MOV
ASL
ASL
ASL

MOV

01170¢
000012
011704
011706
173512

000207

000010

JSR
8158

MOV

BIS
BIC
MOV
BIS
MOV
BI(B
RTS

173434
:

Routine Size:

R1,8SAVE2

#10,3ML.REG+120
10(SP) ,RO
RO
RO
RO
}
RO,R1
ML.REG+2(R1),RO
12(5P) ,RO

ML.REG+4(R1)
RO
,R2
ML.REG+6(R1)
RO,R2
R2,aML.REG+170

26 words

INDEX,*

;

TST.PAT,
«

3316
3300

gEO,BHL.REG+120

; Maximum stack depth per invocation:

'SET DATA DIAG MODE
'LOAD MLD1 WITH GENERATED WRT_MASK PATTERN
.CLEAR DATA DIAG MODE

MLDY = WRT MASK;
DAT_DM = ZERO;

NN W
N NN

®e

DAT DM = ONE;

016302
016306
016314
016320
016322
016324
016326
016330
016334
4382 016340
4583 016344
(384 016350
4385 016352
4386 016356
4387 016364
4388
4389
4390
4395
4396

MACRO M1113

TEST
SECTION

4345
4346
4347
4348
4349
4350
4351
4352
435%
4354
4355
4356
4357
4358
4359
4360
4361
4362
4363
4364
4365
4369
4373
4374
4375
4376
4377
4378
4379
4380
4381

TEST

LOGIC

3 words

HARDWARD TEST SECTION

23-CCT-80 09:11

M9
PAGE 130

22-0ct22-0ct-1

4398 JMLG
4399
routine RD_D1
begin

novalue

1f THE COMPARE IS NOT EQUAL THEN
THE FORMAL PARAMETER '"‘ERR FLG'' IS

égglgNED A ONE TO INDICATE THE

|
.

OR.

|
.

FORMAL PARAMETERS:

|
.

TST PAT

|
.

DATE PATTERN TO BE MASKED AND

[}
.

COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST.

|
.

INDEX

USED BY THE MACRO WRT MASK T0

|
.

SELECT THE CURRENT REGISTERS ADDRESS,

FORCED HI, FORCED LC AND DON''T CARE

|
.

MASK

|
.

|
|

CONTAINS THE ADDRESS (PASSED BY REF)

!
t

|
.

[}
.

O VOO NN
NN

INFORMATION.

ERR_FLG

AN AN U AN AN AN AN LN AN AN
N WA AN N N AN AN AN NN
O NN WA

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF THE ROUTINE CALL.

]
.

1
.

|
.

1
]
]

IMPLICIT INPUTS:
WT _DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

|
.

)
[}
.

}
.

|
M

]
.

|
.

}
.

|
.

1
.

|
.

RD_DATA

GETS LOADED WITH DATA READ FROM THE

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA
AND RD _DATA LOADED WITH GOOD

AND BAD REGISTER DATA

OO ~NO

GENERATED BY THE MACRO ''WRT_MASK''.

e Be Be e Be Ve By Ve Gy Vo Ve B¢ Wy By Ve Ve T Ve Ve W B Ve Vo v,

COMPARES THE CONTENTS OF THE
DATA DIAG REGISTER 1
WITH THE MASKED DATA PATTERN

4615
4616
4417
4618 ;
4419
4420
4421
4422
4423
4424
4425
4426
4427
4628
4429
4430
4431
4432
4433
4434
4435
4436
4437
4438
4439
4440
L4461
4442
4443
4444
4445
4446
4447
4448
4449
4450
4451
4452

index, ERR_FLG)

FUNCTIONAL DESCRIPTION:

4614

(TST_PAT,

0:47:44
0:45:32

+¢

NN = OO0

N LN AN AN N AN N NN NN
AN N NN (N N AN AN
NN
POMNMAININININININD
— —

4400
4401
4402
4403
4404
4405
4406
4407
4408
4409
4410
4611
4612
4613

SEQ 0116
.

MACRO M1113

CIMLAAO ML-11 LOGIC TEST

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2MLGL.BLI.2 (35)

MACRO M1113

CIMLAAOQ ML-11 LOGIC TEST

HARDWARD TEST

N9
PAGE 131

;

Ve
WOV

DAT DM = ONE;
ML FUNC = write;
DAT_CLK = ONE;

‘SET DATA DIAG MODE

..OAD MLCSY WITH WRITE FUNCTION
'00 A DATA (LK

!SEE IF CALLER IS REG INIT TEST
!SET ERROR FLAG IF NEQ

.REG_INIT_FLG IS_SET

then

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4L.BLI.2 (35)

'CLEAR THE ERROR FLG

.ERR _FLG = ZERO;

begin
CLR_MBUS;
DAT_DM = ONE;

'CLEAR MBUS TO GENERATE

INIT DATA

®e

REG_INIT_FLG = ZERO;
end;

'SAVE THE DATA WRITTEN TO THE REGISTER

WT_DATA = WRT_MASK;

'READ AND SAVE THE REGISTER

TEIEYR

RD_DATA = .MLD1;
it

.RD_DATA neq

.WT_DATA then

.ERR_FLG = ONE;

FOR WRT_MASK

'READ MLD1

'SET ERR_FLG IF NEQ

YRR

016366
016372
016376
016404
4491 016412
4492 016420
4493 016426
4494 016434
4495 016436
4496 016444
4497 016450
4498 016454
4499 016462
4500 016466
4501 016474
4502 016500
4503 01650¢
4504 016506
4505 016510
4506 016512
4507 016514

SEG 0117

22-0ct-1980 10:47:44
22-0ct=-1980 10:45:32

JMLG

6454
4455
4456
4457
4458
4459
4460
4661
4462
L4463
4464
4465
4466
4467
4468
4469
4470
4L
4472
4473
L4674
4475
4476
4477
4478
4479
4483
4487
4488
4489
4490

SECTION

23-0CT-80 09:11

3392

004167
005076
152777
1642777
152777
152777
026727
001021
152777
016701°
042701
162777
150177
152777
005067
016600
006300
006300
006300
010001
016100

'CLEAR THE MBUS

CLR_MBUS;
end;

165414

RD.D1:

JSR

173244

173414
173266
173260
173372

000001

CLR
BISB
BI(B
BIS8
B1SB

000040

173274

BISB

000007

173256

BICB

000010

173324

000010
000010
000077
000061
000020

173520
177770
173252

173176
000012

011702

g:g
1[0}
BIC

BIS8

BI1SB

1%:

(LR
MOV

ASL
ASL
ASL
MOV

MOV

R1,$SAVE?

a16(sp)

#10,3ML.REG+120

* ERR.FLG

#77.3ML .REG
#61.3ML .REG

#20.aML .REG+120

§EG.1N11.5LG.41

$
#40,3ML.REG+40
ML.DUT,R1

177770,/

#7,3ML .REG*+40
R1.AML .REG+40

#10,3aML .REG+120
REG.INIT.FLG

12(SP),RO

RO,R1

ML.REG+2(R1),RO

;

INDEX,*

3381
3382
3385

3 EC 110
l

TEST

MACRO M1113

SEQ 0118
147:44

JMLG

4509
6510
4511
£512 016520
4513 016524

:45:32

BIS
BIC

4514 016530
4515 016534
4516 016536
4517 016542
4518 016559
4519 016556

MOV
BIS
MOV
MOV

173122

173112

000010
173144

4526 016616

23-0CT-80 09:11

CIMLAAD ML-11 L 06 l C

HARDWARD TEST

B_10
PAGE 132

150277

CMP

2%:

173126

BIC

1177770,
R2

BICB

BISB

000207

RTS

;

Routine Size:

3386
3388

RD.DATA,WT.DATA

28
#1,310(SP)

BISB
MOV

TST.PAT,

ML.REG+6(R1)
,R2
RO,R2
R2.WT.DATA
aML .REG+170,RD.DATA

MOV

BEQ

;

14(SP) ,RO
ML.REG+4 (R1),RO

T0PS

PA:<

* ERR.FLG

#40,aML.REG+40
ML.DUT,R2
#7,aML.REG+40

R2,aML.REG+40

3318

77 words

Maximum stack depth per

)

invocation:

3 words

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0CT-80 09:11

.10

PAGE 133

SEQ 0119

4537 ‘ML
4S53R

4539
4540
4541
4542
4543
4544

4547
4548
4549
4550
4551
4552

;

016620
016624
016632
016636
016640
016642
016644

016646
016652

4574 016656

4575 016662
4576 016666
4577 01€670
4578 016674
4579 016702
4580
4581
4582
4587
4588

:32

3393
3394
3395
3396
3397
3398
3399
3400
3401
3402
3403

L 45
4546

4553
4554
4555
4556
6557
4561
4565
4566
4567
4568
4569
4570
4571
4S72
4573

3404
3405
3406
3407
3408
3409
3410

0046167
152777
016600
006300
006300
006300
010001
016100
056600
046100
016102
050002
010277
1462777
000207

routine WRT_D2
begin

(TST_PAT,

index)

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BL 1.2 (36

novalue =

'+
4

FUNCTIONAL DESCRIPTION:

LOADS THE DATA DIAG REG 2 WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK

FORMAL PARAMETEPRS:
TST_PAT

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.
INDEX

USED BY THE MACRO WRT_MASK TO SELECT THE CURRENT REGISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE MASK INFORMATION.
DAT DM = ONE;

!SET DATA DIAG MODE

DAT_DM = 2ERO

.CLEAR DATA DIAG MODE

'LOAD MLD2 WITH GENERATED WRT_MASK PATTERN

MLDZ = WRT MASK

end;
165162
000010
000010

173166

000012
011704
011706

000010

JSR
BISB
MOV

R1,$SAVE?
#10,9ML.REG+120

MoV

ML.REG+2(R1),RO

ASL
ASL
ASL
MOV

011702

173204

WRT.D2:

BIS
BIC
MoV

173116

BIS
MOV

g{ga

10(sP),RO

;

INDEX,*

;

TST.PAT,

3393
3407
3408

RO,R1

12(5P) RO
HL.REG+4(R|),R0
,R2
ML.REG+6(R1)
RO,R2
RZ,3ML.REG+200
gEO.BHL.REG+120

: Routine Size:
26 words
: Maximum stack depth per invocation:
i

3409
3393

3 words

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0CT-80 09:11

D_10
PAGE 134
TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (37)

4590 JMLS
4591 ;

4592
4593
L4594
4595
4596
4597
4598
4599
4600
4601
4602
4603
4604

4605

4606

4607
4608
4609
4610
4611
4612
4613
L4614
4615
4616

3611
3461¢
3413

.
;
;
;
;
;

[

[
’

3414
3415
3616
3617
3618
3419
3420
34621
3422
3423
3424
3425
3426
34627
3428
3429
3430

,
’

[
[

;
;
;
;

[
’

L4
[

;

[

;

’

;
;
;
;

[

4
[
e
[

;
;

3431
3432
3433

[}
[

3434
3435
3436

;

[

L4617
4618 ;
L619 ;
4620 ;
4

[

3437

621
4022
4623
6624
4625
4626
4627
4628
6629
4630
4631
4632
4633
L4634
4635
4636
6637
4638
4639
4640
L6461
642
6643
4644

;
;
;
;
;
;
;
;
;
.
;
;
;
;
.
;
;
;
;
;
;
;
;

4
L]

[4
L4
4
L
4
’

[

.
[

[

[
[

’

[

]
[

e
e

;

SEQ 0120

3438
3439
3440
3441
3442
3443
3444
3445
3446
3447
3448
3449
345C
3451
3452

3453
3454
3455
3456
3457
3458
3459
3460
3461
3462

routine RD_D2
begin

(TST_PAT,

index, ERR_FLG)

novalue =

tee
: FUNCTIONAL DESCRIPTION:
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i

COMPARE THE CONTENTS OF

DATA DIAG REGISTER 2

THE

WITH THE MASKED DATA PATTERN

GENERATED BY THE MACRO ''WRT_MASK''.
IF THE COMPARE 1S NOT EQUAL THEN THE
FORMAL PARAMETER ''ERR_FLG'' IS

QEEéSNED A ONE TO INDICATE THE
FORMAL PARAMETERS:

TST PAT

DATK PATTERN TO BE MASKED AND
COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST.

INDEX

USED BY THE MACRO WRT_MASK TO

FORCED HI, FORCED LO AND DON'T CARE

SELECT THE CURRENT REGISTERS ADDRESS,

;

MASK

ERR_FLG

!
!
;

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS
OF THE ROUTINE CALL.

i
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i

INFOMATION.

CONTAINS THE ADDRESS (PASSED BY REF)

IMPLICIT

INPUTS:

WT _DATA

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

RD DATA

GETS LOADED WITH DATA READ FROM THE

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA
AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

HARDWARD

TEST

®s

04w

4646 JMLG
Loe47
L6L8
4649
(650
4651
465¢
4653
4654
4655
4656
4657
4658
4659
4660
4661
4662
4663
4664
L665
4666
4667 ;
4668 ;

4669
4673
4677
Lo78
4679
4680

;

016704
016710
016714
016722

4681 016730
4682 016736
4683 016744
4684 016752
4685 016754

4686 016762
4687 016766
4,688 016772
4689 017000
4690 017004
46N

4692
4693

4694

4695
4696
4697
4698

4699

LOGIC

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE

£_10
135

SEQ 0121

22-0ct-1980 10:47:44
22=-0ct=-1980 10:45:32
3463
3464
3465
3466
3467
3468
3469
3470
W
3472
3473
3474
3475
3476
3477
3478
3479
3480
3481
3482
3483
004167
005076
152777
1462777
152777
152777
026727
001021
152777
016701
042701
142777
150177
152777
005067
016600
006300
006300
006300
010001
016100
056600
046100

T0PS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (37)

.ERR FLG = ZERO;

'CLEAR ERROR FLAG

ML FUNC = write;
DAY_CLK = ONE;

iLOAD WRITE FUNC TO (S1

it JREG_INIT_FLG IS_SET
then
begin
CLR_MBUS;
DAT DM = ONE;

.SEE IF CALLER IS REG INIT TEST
'CLEAR MBUS TO GENERATE INIT DATA

SET DATA DIAG MODE

DAT DM = ONE;

DO A DATA CLOCK

REG_INIT_FLG = ZERO;

end;

WT_DATA = WRT_MASK;

!SAVE THE DATA WRITTEN TO THE
'READ AND SAVE THE REGISTER

RD_DATA = .mLb2;
if

.RD_DATA neg

.WT_DATA

then

.ERR_FLG = ONE;

165076
000010

000010
000077
000061
000020

RD.D2:

JSR
CLR

172726

000001

BISB
BI(B
B1S8
BISB

#10Q,aML.REG+120
#77,aML.REG
#61,3ML.REG
#20,aML .REG+120

000040
173202

172756

BISB
MOV

#40,3ML.REG+40
ML.DUT ,R1

000007

172740

BI1(B

#7,3ML .REG+40

172734
000010

172660

000012

011702
000014
011704

gzg

BIC

173006
1¢:

BISB
BISB
CLR
MOV
ASL
ASL
ASL

MOV

MOV
BIS
BIC

R1,$SAVE2
310(SP)

173076
172750
172742
173054

177770

'READ MLD2 FR WRT_MASK PATTERN

!SET ERROR FLAG
'CLR MASS BUSS

CLR_MBUS;
end;

NEQ

ERR.FLG

361
3463
3464
3465
3466
3468

$EG.1NIT.rLG,x1

3470

$177770,R1

R1,aML.REG+40
#10,aML .REG+120
REG.INIT.FLG
12(sP) RO
RO
RO
RO

RO,R1
ML.REG+2(R1),R0
14(SP) RO
ML.REG+4(R1),RO

;

INDEX,*

TST.PAT,»

3472
3473
3476

P
Xl

CIMLAAD ML-11

LOGIC

T EST

MACRO M1113

HARDWARD TEST SECTION

F 10

PAGE 136

22-0ct=-1980 10:47:44

;

22-0ct-1980 10:45:32

4704 017046

016102

011706

MOV

ML.REG+6(R1),R2

4706 017054

010267

172610

172604
172574

R2,WT.DATA

001403
012776
152777
016702
042702
142777
150277

173014
172600

MOV

000001
000040
173052
177770
000007
172604

000010
172626

4705 017052

4707 017060
4708 017066
4709 017074
4710 017076
4711 017104
4712 017112
4713 017116
4714 017122
4715 017130

4716 017134
L4718
2;}2

SEQ 0122

;MLG

4701

4;8%
4

23-0CT-80 09:11

050002

017767
026767

000207

BIS

172610

MOV
CMP
BEQ

2%:

MOV
BISB
MOV
BIC
BICB
BISB

RTS

RO,R?2

TOPS

PA:<

ML .REG+200,RD.DATA
RD.DATA,WT.DATA

;
;

2%
#1,310(SP)
#40,aML.REG+40
ML .DUT,R?
#177770,R2
#7,aML.REG+40
R2,aML.REG+40

; *,ERR.FLG

; Routine Size:
77 words
; Maximum stack depth per invocation:

3477
3479

;
3 words

3611

CIMLAAD ML-11

HARDWARD TEST

MACRO M1113

1 EST
SE CTION

LO GIC

6727 JMLG
4728 ;
4729

47130 ;
4731 ;

6_10

PAGE 137

SEQ N12%

22-0ct=1980 10:47:44
22-0ct-1980 10:45:32
3484

4732 ;
4733 .
4734
4735
4736
4737
4738
4739
4740
4761
4742
4743
47464
4745
4766
47467
4748
4749
4750
4751
4752
4753
4756
4755

routine WRT_D3 (TST_PAT,
begin

index)

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (38)

novalue =

FUNCTIONAL DESCRIPTION:

LOADS THE DATA DIAG
REGISTER 3 WITH A DATA PATTERN
GENERATED BY THE MACRO

WRT _MASK.

FORMAL PARAMETERS:
TST_PAT

CURRENT DATA PATTERN TO BE

LOADED IN THE REGISTER.

INDEX
USE BY THE MACRO WRT MASK

TO SELECT THE CURRENT REGISTERS

ADDRESS,

FORCED HI,

FORCED

LO AND DON'T CARE MASK
INFORMATION.

DAT DM = ONE

MLEZ _MASK =

'SET DATA DIAG MODE
'MASK QUT ECC CRC WORD BITS

X0'000377';

'LOAD MLEZ2 WITH GENERATED WRT_MASK PATTERN

MLE2 = WRT MASK;

MLE2 MASK = %0'100300°';
DAT_DM = ZERO;

4756

'RESTORE MASK
'CLEAR DATA DIAG MODE.

end;

4760
4764 017136

4/65 017142
4766 017150
4767 017156
4768 017162
4769 017164
4770 017166
771 017170
17172
4772
4773
4774
4775
4776
4777
4778
4779
4780
4781
4782
(783
4788
4789

23-0(T-80 09:11

164644
000010

000377

000010

046100
016102

050002
010277
012767

142777
000207

172650
172710

011702
000012
011704
011706

172640
100300
000010

WRT.V3:

JSR
B1SB
MOV
MOV
ASL

10(SP),RO

,RO
ML.REG+2(R1)

MoV

ML.REG+4(R1),RO
,R2
ML.REG+6(R1)

815

172640
172564

#377 ,ML.REG+166

ASL
ASL
MOV
MOV

BIS
BIC

;ML4

R1,$SAVE2
#10,3ML.REG+120

MoV
MOV

B1(8
RTS

3484
3510

3511
3512

:
; INDEX,*

RO, R1

12(sP) ,RO

RO,R2
R2,aML.REG+160

#-77500,ML .REG+166
#10,aML.REG+120

;

TST.PAT,«

22-0ct=-1980 10:47:44
22-0ct=-1980 10:45:32

:
:
.

T10PS
PA:<

3513
3514
3484

CIMLAAD ML=11 LOGIC 1 EST
HARDWARD TEST SECTION
4791

MACRO M1113

23-0CT-8009:11

H 10

PAGE 138

;ML

22-0ct=1980 10:47:44

2;3% :

22-0ct=1980 10:45:32

2;82 ;

%g}g

routgne_PD_DS (TST_PAT, index, ERR_FLG)

4797

3519

'+e

4796 ;

3518

2;33 ;

;ggg

4800 -

3522

2382 ;

gg%g

4801
4802

;
:

3523
3524

4805

3507

2ggg ;

%2%8

4806 ;

3528

4809 :

3631

4812 :

3534

4814

3536

23}? ;

4813 ;

22}2 ;

§§§§

eqgin

DATA DIAG REGISTER 3
WITH THE MASKED DATA PATTERN

FORMAL PARAMETER "‘ERR FLG'' IS

4823

3545

4825 :
4826 ;

3547
3548

3540

gggg

;

3563

4g§3 ;

gggg

3554

4835 :

3557

4837 :
23;3 ;

3559
gggg

3558

LB4C ;

3562

agas ;

gggg

4841 ;
4842 :
4844

;

4845 ;

3546

4836 ;

TST PAT

ggzz

;

)

%2%2

!
!
;

4834

FORMAL PARAMETERS:

DATA PATTERN TO BE MASKED AND

3541

4832 :

gsgégueo A ONE TO INDTCATE THE

3542

IF THE COMPARE IS NOT EQUAL THE

3535

4819 :
4820 ;
23%; :

4831

GENERATED BY THE MACRO ''WRT_MASK'',

;

235; :

COMPARES THE CONTENTS OF THE

!
!

3539

6824 ;

3563
3564

3567

: novalue =

! FUNCTIONAL DESCRIPTION:

4817 :
4818 ;

SEQ 0124

COMPARED AGAINST

THE

CONTENTS

THE RFGISTER UNDER TEST.

INDEX

USED BY THE MACRO WRT MASK TO

SELECT THE CURRENT REBISTERS ADDRESS,

FORCED HI, FORCED LO AND DON''T CARE

MASK INFORMATION

ERR FLG

CONTAINS THE ADDRESS (PASSED BY REF)

!
!

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS

!
!

OF THE ROUTINE CALL.

GETS LOADED WITH THE GENERATED

WRT MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

RD DATA

GETS LOADEN WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAILING BAD DATA.

| IMPLICIT OUTPUTS:
!
!

GLOBAL LOCATION WR_DATA
AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

TOPS=-20 Bliss~16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (39)

CZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

SEQ 0125

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (39)

MLE2 MASK = %0°'000377';

'CLEAR ERROR FLAG
'SET DATA DIAG MODE

'LOAD WRITE FUNCTION TO ML(ST

DAT BM = ONE;
FUNC
write;
ONE;
DAT_ CLx

it JREG_INIT_FLG
then

4858
4859
4860

.DO A DATA (LOCK

REG INIT TEST
'SEE IF CALLER IS
'CLEAR MBUS TO GENERATE INIT DATA

IS_SET

begin

CLR_MB us;
DAT_DM = ONE;
REGTMINIT_FLG = ZERO;
end;
wT_D ATA
RD_D ATA

:
;
;

017236
017242
017246
017254
4884 017262
4885 017270
4886 017276
4887 017304
4888 017312

4889 017314
4890 017322
4891 017326
4892
4893
4894
4895
4896

4897

1.10

PAGE 139

.[RR_FLG = ZERD;

4854
4855
4856
4857

4898
4899
4900

23-0(T-80 09:11

&4
:32

4847 JMLG
LB4LB
4849
4850
L8N
4852
4853

4861
4862
4863
4864
4865
4866
6867
4868
4869
4870
4871
4872
4876
4880
4,881
4882
4883

MACRO M1113

.SAVE THE DATA WRITTEN TO THE REGISTER
.READ AND SAVE THE REGISTER

WRT MASK;

MLE2 or .IGNORE;

.WT_DATA neq

.RD_DATA then

.ERR_FLG = ONE;

MLE2 MASK = X0'100300';

3590

004167
005076
012767
152777
162777
152777
152777
026727
001021
152777
016701
042701
142777
150177
152777
005067
016600

006300
006300
006300
010001

'CLEAR THE MASS BUS

CLR_ MBuS;
end;

RC.D3:

164544

000010
000377
000010
000077
000061
000020
172366
000040
172642
177770
000007
172374
000010

172320

000012

JSR
CLR

Mov

BISB
BICB
BISB
Bl1<B
CMP
BNE
B1SB

172416

MOV

172400
172446
1%:

BIC
BI(B
8158
BISB
CLR
MOV
ASL
ASL
ASL
MOV

'READ THE REG FOR WRT_MASK

R1,$SAVE2

a10(sP)

#377
. ML.REG*+166
#10,aML .REG+120

: ERR.FLG

#77.3ML .REG
#61.3ML .REG

#20.3ML .REG+120
$§G.1N11.FLG,p1
#40,aML .REG+40
ML.DUT,R1

077770,
R

#7,3ML .REG+40
R1,aML.REG+4O
#10,aML.REG+120
REG. INIT.FLG
12(SP),R0
)

. INDEX,+

3579
3580
3583

CIMULAAQD ML -11 LOGIC

HARDWARD TEST

4902
4903
4904
4905
4906
4907
4908
4909
4910
4911
4912
4913
6914
4915
4916
917
4918
4919
4920
4921
4922
4923 017510
4924
4925
4926
4931
4932

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

J 10

PAGE 140

SEQ 0126
T0PS

JML4
016100
056600
046100
016102
050002
010267
017702
056102
010267
026767
001403
012776
012767

Mov

BIS
BIC
MOV

BIS

MOV
MOV

BIS

1462777
150277
000207

MOV

CMpP
BEQ

172230

000010
172406
172252

152777

016702
042702

PA:<

000007

172230

172234

2%:

MoV

MOV

BISB

MoV

BIC
8ICB
BISB
RTS

: Routine Size:

ML.REG+2(R1),RO
14(SP) ,RO
ML.REG+4 (R1),RO
ML.REG+6(R1),R2

R2.WT.DATA
aML .REG+160,R2
ML.REG+6(R1),R2
R2,RD.DATA
WT.DATA,RD.DATA
28
#1,310(SP)
#-77500,ML .REG+166
#40,3ML.REG+40
ML.DUT,R2

TST.PAT,«

3584
3586
:

«,ERR.FLG

3588

#177770,R2

#7,3ML.REG+40
R2.aML .REG+40

3516

86 words

- Maximum stack depth per invocation:

3 words

CIMLAAD ML=11 LOGIC

HARDWARD

TEST

4934
4935
4936
4937
4938
4939
4940
4941
4942
4943
4944
4945
4946

ML
;

4947
4948

4949
4950
4951
4952
4953
4954
4955
4956
4957
4958
4959
4960
4961
4962

;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;

4966
4970 017512
4971

4972
4973
(978
4979

TEST

MACRO M1113

SECTION

K 10
PAGE 141

23-0CT-80 09:11

SEQ 0127

22-0ct=-1980 10:47:44
22-0ct-1980 10:45:32
3591
3592
3593
3594
3595
3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
000207

routine WRT_DS
begin

(TST_PAT,

index)

novalue

TIPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2MLGL.BLI.2 (40)

lee

FUNCTIONAL DESCRIPTIION:

DUMMY ROUTINE

WRITE

'
i

'
|

CALL TO ASS'ST

REG'STER ALGORITHEM

IN THE READ

FORMAL PARAMETERS:
TST PAT

DATA PATTERN TO BE MASKED AND

!
;

COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST

!
'

INDEX
USED BY

THE MACRO WRT MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,

FORCED HI,

;

MASK

FORCED LO AND DON'T

INFORMATION.

CARE

DRIVE STATUS REG IS READ ONLY
return;

end;
WRT.DS:

;

RTS

Routine Size:

;

word

)

; Maximum stack depth per invocation:

0 words

3591

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

L 10
PAGE 142

4981 ;MLL
233% :
23%2

:
N

4986 ;

4987 :

22-0ct-1980 10:47:44
22-0ct=-1980 10:45:32
%g}g

routgne_RD-DS

3619

egin

3620

!4+

(TST_PAT,

index,

%g%}

; FUNCTIONAL DESCRIPTION:

4990 :

3623

2382 ;

gg%g

3624
3625

3628

233; :

ggg?

;

4996 ;

3629

3632

gggz

5002 :

3635

5004 :

3637

288? ;

5003 ;

gggz :

5007 :

3636

gg%g

28}; :

ggzg

5013 ;
5015 :
5016 :

5014

gg}g :

5021

5022 :

gggz ;

)

TST PAT

COMPARED AGAINST THE CONTENTS

INDEX

USED BY THE MACRO WRT MASK 10 ..

SELECT THE CURRENT REGISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE

MASK INFORMATION.

3646

ERR FLG

3648
3649

!
!

OF THE CALLERS ERROR FLG TO ENABLE THE
CALLER TO EXAMINE THE ERROR STATUS

3647

gggg

CONTAINS THE ADDRESS (PASSED B“ REF)

OF THE ROUTINE CALL.

3654

BETS LOADED WITH THE GENERATED

gggg

;

CALCER TO PRINT FAILING GOOD DATA.

3655

3658

5027 :

3660

gggg ;

3659

ggg%

WRT MASK DATA PATTERN THUS ALLOWING

RD DATA

GETS LOADED WITH DATA READ FROM THE
REGISTER THUS ALLOWING CALLER
TO PRINT FAILING BAD DATA.

5030

3663

| IMPLICIT QUTPUTS:

gggz :

gggg

5031 :
5032 :

5035 -

FORMAL PARAMETERS:

5025 :
5026 ;

eggégnso A ONE TO INDICATE THE

OF THE RFGISTER UNDER TEST.

3643

'ERR FLG'

;

3642

5010 :

5009 ;

IF THE COMPARE IS NOT EQUAL THEN

THE FORMAL PARAMETER

DATA PATTERN TO BE MASKED AND

3641

GENERATED BY THE MACRO 'WRT_MASK'.

3640

5008 :

novalue =

ORIVE STATUS REGISTER WITH THE
MASKED DATA PATTERN

4999 :

COMPARES THE CONTENTS OF THE

!
!

4995 :

ERR_FLG)

2333 :
4991 :
4992

SEQ 0128

3664
3665

3668

!
!

1--

GLOBAL LOCATION WP_DATA
AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

TOPS=20 Bliss=16 V2(206)
PA:<NEALE>BL2ML4L.BLI.2 (41)

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

M 10

PAGE 143

SEQ 0129

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (41)

5037 JMLG
5038 ;
5039
5040
5041
5042
5043
5044
5045
5046
5047
5048
5052
5056
5057
5058
5059
5060
5061
5062
5063
5064
5065
5066
5067
5068
5069
5070
5071
5072

23-0CT-80 09:11

.ERR_FLG = ZERO;
WT_DATA = WRT_MASK;
RD_DATA = .MLDS or .IGNORE;

'SAVE THE DATA WRITTEN TO THE REGISTER
'READ AND SAVE THE REGISTER

.WT_DATA neq .RD_DATA then .ERR_FLG = ONE;

®e

.CLEAR THE ERROR FLAG

5073

5074

5075 017620
5076
5077
5078
5083
5084

3676
3677

004167
005076
016600
006300
006300
006300
010001
016100
056600
046100
016102
050002
010267
017702
056102
010267
026767
001403
012776
000207

'SET ERROR FLAG IF NEQ

end;

164266
000010

RD.DS:

JSR
CLR

R1,$SAVE2
a10(SP)

ASL
ASL
ASL
MOV

RO
RO
RO
RO,R1

000012

MOV

011702
000014
011704
011706

MOV
BIS
BIC
MOV
BIS

172102
172156

011706
172070

'READ THE REG FOR WRT_MASK

172062

000001

000010

BIS
MOV

MOV

#1,310(SP)

8?8

1%:

12(SP),RO

ML.REG+2(R1)
RO
14(SP),RO
ML.REG+4 (R1),RO
ML.REG+6(R1)
,R2
RO,R2
R2,WT.DATA
aML .REG+50,R2
,R2
ML.REG+6(R1)
R2,RD.DATA

MOV
MOV

RTS

; Routine Size:

;
; ERR.FLG

;

INDEX,*

; TST.PAT,«

3672

3674

*;.DATA,RD.DATA

; *,ERR.FLG

35 word:s

3617
3670
3671

;

; Maximum stack depth per invocation:

3 words

3617

CZMLAAD ML-11

HARDWARD

TEST

5086 JMLG
5087
5088
5089
5090
5091
5092
5093
5094

LOGIC

TEST

MACRO M1113

SECTION

144
:32
routine WRT_REG

begin

e B9 R Qo Pe B0 Bs BB T Ve VeV Ve VY VR Vs Ve Ve Ve VW Ve B Ve VoW Mo e Ve Ve W,

e
D e
D e
D
D
D rd
D
D
e
s’ e
D
ke
il
D
D
D
o
s
D e
d o
e
D e
D

B N N ANAN AN NN AN N N NN NPTV NIMNIMNININ) = b e b ad el ad d 2 =2 O OO OO
COONOWVMB W= OVONOWVS BN 2OV
NO VNN =2O V0NN

VLV TG RV LV JW LV LV LV TW AV LV LV [V LW LV LV LV SV (U LV, LV, [V IV [V IV, IV IV IV 1V IV IV ]V ]

e
D e

(TST_PAT,

REG_SEL,

index)

TOPS=20 Bliss=-16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (42)

novalue =

X3
|

i
i

FUNCTIONAL DESCRIPTION:
A ROUTINE TO SELECTIVELY

CALLED ROUTINES WHICH

WRITE TO INDIVIDUAL ML
REGISTERS

,
N 10
PAGE 144

SEQ@ 0130

(VW L LV TV

23-0CT-80 09:11

;

i
i
;
i
i
i
i
i

FORMAL PARAMETERS:
REG_SEL

CASE SELECT EXPRESSION TO

SELECT THE WRITE REGISTER
KOUTINE TO CALLED
TST_PAT

DATA PATTERN WHICH THE SELECTED

i
i

REGISTFR WILL BE

;

INDEX
LOADED WITH THE ML REG

i
i
i

TESTED AGAINST

INDEX

SELECT NUMBER OF THE REGISTER

BEING TESTED
SIDE EFFECTS:

WHEN A WRITE REGISTER ROUTINE IS CALLED
THE VARIABLE "INDEX' FROM THE CALLING
TEST IS LOADED WITH THE REGISTERS
ML_REG INDEX NUMBER.

i
i
i
i
i

THIS ENABLES THE CALLING TEST
THE FAILING REGISTER ADDRESS.

TO FIND

i
case

.REG_SEL

from O to 13 of

!SELECT

set

(0]

(1]

(2]

(3]
(4]

WRT_CS1 (.TST_PAT, .index

0);

THE WRITE

'CALL ROUTINE

TO LOAD MLCS?

WRT_ER (.TST_PAT, .index

6);

'LALL ROUTINE TO LOAD MLER

WRT_DA (.TST_PAT, .index

3);

'CALL ROUTINE

WRT_MR (.TST_PAT, .index

10);

'CALL ROUTINE TO LOAD MLMR '

TO LOAD MLDA

CALL

CIMLAAD ML-11 LOGIC TEST

HARDWARD

TEST

MACRO M1113

SECTION

23-0CT-80 09:

PAGE

5142 MLG

SEQ 0131

22-0ct=1980 10:45:32

5145
5146
5147
5148
5149
5150
5151
5152
5153
5154
5155
5156
5157
5158
5159
5160
5161
5162
5163
5164

;
;
;
;
;
;
;
;
.
;
;
;
:
;
;
;
;
;
;
;

3730
3731
3732
3733
3734
3735
3736
3737
3738
3739
3740
3741
3742
3743
3744
3745
3746
3747
3748
3749

5166
5167
5168
5169
5170
5171
5172

;
;
;
;
;
;
:

3751
3752
3753
3754
3755
3756
3757

574 ;
g};g :

3759
3760

5173 ;

145

22-0ct=1980 10:47:44

3122 :

5165 ;

8 1

WRT_E1

(.TST_PAT,

gs]

.
WRT_E2

(.TST_PAT, .index

14);

'CALL ROUTINE TO LOAD MLE?

(6]

:
WRT_PA

(.TST_PAT,

.index

8);

'CALL ROUTINE TO LOAD MLPA

(71

:
WRT_D1

(.TST_PAT,

.index

15);

'"CALL ROUTINE TO LOAD MLD?1

(8]

(.TST_PAT,

.index

16);

"CALL ROUTINE TO LOAD MLD?

WRT_D3

(.TST_PAT,

.index

14);

'CALL ROUTINE TO LOAD MLE?

:
WRT_PD

(.TST_PA”,

.index

19;;

'CALL RCUTINE TO LOAD MLPD

WRT_FE

(.TST_PAT,

.index

17);

'CALL ROUTINE TO LOAD MLEE

(12]

:
WRT_EL

(.TST_PAT,

.index

18);

'CALL ROUTINE TO LOAD MLEL

133

:
WRT_DS

(.TST_PAT,

.index

5);

'CALL ROUTINE TO LOAD MLDS

(9]
(10]

3750

(11l

3758

tes;

WRT_DZ
:

.index = '3);

T0PS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (42

'CALL ROUTINE TO LOAD MLE?

end;

5183 017622
5184 017626

004167
016600

164160
000010

WRT.REG:JSR
MOV

R1,$SAVE?2
10(sP) RO

:
; INDEX,*

3678
3718

5186 017636

016602

000012

MOV

12(SP) ,R2

: REG.SEL,*

3714

5185 017632

5187 017642
5188 017644
5189 017650
5190 017652
5191 017654
5192 017656
5193 017660
5194 017662
5195 017664

016601

000014

006302
066207 017650
000034 .
000050
000066
000104
000122
000140
000156

MOV

1%:

ASL
ADD
MWORD
.WORD
MWORD
MWORD
.WORD
.WORD
.WORD

14(SP) R

R2
1$(R2),PC
2%-1
3%-1
4%-1
5%-1
6%-1
7%-1
8%-1

;

TST.PAT,»

LLY

CIMLAAO ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

5197

(N
PAGE 146

SEQ 0132

sMLG

2133
5200
5201
5202
5203

23-0CT-80 09:11

22-0ct=-1980 10:47:44

;
017666
017670
017672
017674

000174
000212
000230
000246

5205 017700
5206 017702

000302
000320

5204 017676

5207 017704

5208 017706

5209 017710
5210 017712

5211 017716
5212 017720

5213 017722
5214 017726
5215 017730

5216 017734
5217 017736
5218 017740

5219 017744
§220 0177646

000264

010146

005046
004767

000532
010146

012710
011046
004767

000523
010146

012710

011046
004767

174256

000006

5224 017762
5225 017764

5226 G17770
5227 017772

5228 017774

011046
004767

000505
010146

012710

$¢29 020000
5230 020002

011046
004767

5232 020010

010146

5231 020006 060476
5233 020012
5234 020016
5235 020020

012710
011046
004767

5239 020034
5240 020036

5241 020042
5242 020044

011046
004767

000460
010146

011046
004767

5247 020062

010146

5249 020070
5250 020072

011046
004767

5246 020060 000451

68 :

17652¢

-(SP)
PC,WRT.CS

MOV
MOV
JSR

26 (RO)
(RO),-(SP)
PC,WRT.ER

MOV

B8R
MOV
MOV

7%:

8s:

3714
3721

16%
R1,-(SP)

;
.

3714
3724

16%
#2,(RO)

;

3714

16%
R1,-(SP)

;
:

3714
3730

;

3714

16%
70, (RO)

;

3714

16%
R1,-(SP)

;
:

3714
3739

;

3714

#3.(RO)
(RO),-(SP)
PC,WRT.DA

R1,-(SP)

"5, (RO)

B8R

(RO,
- (SP)
PC,WRT.E1

16$

MOV

R1,-(SP)

B8R
MOV
MOV

R1,-(SP)

MOV
MOV
JSR

BR
MOV

MOV
MOV
JSR

108:

:
:

MOV

MOV
JSR

98 :

16$
R1,=(SP)

(RO, -(SP)
PC,WRT.MR

BR
MOV

MOV

#é, (RO
(RO ,-(SP)
PC,WRT.E2

(RO),=(SP)
PC,WRT.PA

nt, (RO

(RG),-(SP)
PC,WRT.D1

16$

R1,-(SP)

MOV

220, (RO)

B8R

16§

MOV
JSR

3718

(RO)

MOV
JSR

176222

5248 020064 012710 000020

5251 020076 000442

175022

5243 020046 012710 000017

5244 020052
5245 020054

CLR
JSR

MOV
JSR

175454

5236 020026 000467
5237 020026 010146
5238 020030 012710 000010

RY,-(SP)

CLR

TOPS

PA:<

138-1%

MOV

BR
MOV

175264

000016

1483-1$
158-1%

48:

174716

000015

JWORD
"WORD

BR
MOV

174556

5221 017752 000514
5222 017754 010146
5223 017756 012710 000012

9%-1%
10%-1%
118-1%
128-1%

174416

000003

.WORD
"WORD
WORD
"WORD

.WORD

2%:

005010

22-0ct-1980 10:45:32

(RO) ,=(SP)
PC,WRT.D?

3727

3733

3736

3742

;

3714

MACRO M1113

L 06l C TEST
HARDWARD TEST S ECT l ON
CIMLAAD ML-11

23-0CT-80 09:11

PAGE

D 11
147

SE@ 0133

elolelololele]le)
—t e e OO D b b

iML&

000016

11%:

12%:

175600

000021

13%:

14%:

176010

000005

020204
020206

022626
000207

177306

R1,-(SP)
né, (R0

JSR
BR
MOV

PC,WRT.

JSR
BR
MOV
MOV

PC,WRT.PD

MOV
MOV

MoV

176070
000022

MOV
[0}V

MOV

177022

000023

TOPS
PA:<

15%:

16%:
:
;

(ROS,~ (5P

n2%, (RO)

(ROS,-(SP)

(RO} ,=(SP)

JSR
CMP

PC.WRT.DS
(SP)+, (SP)+
PC

Routine Size:
Maximum stack

3714
3751

168

R1,-(SP)
221, (RO

PC,WRT.EF

RTS

3714
3748

R1,=(SP)

JSR
B8R
MOV
MOV
MOV
JSR
BR
MOV
MOV
MOV

3745

3714
3754

16%
R1,-(SP)

#22,(RO)

(RO) ,-(SP)

PC,WRT.EL

3714
3757

16$
R1,=(SP)
5. (RO)
(RO ,=(5P)

123 words
depth per 1nyocation:

3679
3678
5 words

MACRO M1113

LOGIC 1 EST
HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE

E 11
148

5292 LG
5293 ;

SEQ 0134

22-0ct=-1980
22-0ct-1980
3761

routine RD_REG

begin

(TST_PAT,

REG_SEL,

ERR_FLG)

—

CIMLAAD ML-11

0:647:44

0:45:32

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2

novalue =

]

i
]
;

FUNCTIONAL DESCRIPTION:
A ROUTINE TO SELECTIVELY

CALLED ROUTINES WHICH
READ TO INDIVIDUAL ML11
REGISTERS.

;

3769
3770

|
'
!

NN —
=2 OO0 NN
WN

OF THE CALLERS ERROR FLG TO ENABLE TME
CALLER TO EXAMINE THE ERROR STATUS
OF THE ROUTINE CALL.

REG_SEL

CASE SELECT EXPRESSION TO

SELECT THE WRITE

;

ROUTINE

TO CALLED

TST

;

PAT

DATA PATTERN WHICH THE SELECTED

TESTED

AGAINST

]

.REG_SEL

from 0 to 13 of

'SELECT

THE

READ REGISTER ROUTINE

set

RD_CS1

'CALL ROOUTINE

.ERR_FLG):

TO READ ML(CST

2OV

(.TST_PAT,

(0l

(2]

OO0~ OV

case

(3]

RD_MR

(.TST_PAT,

10,

.ERR_FLG);

'CALL

ROUTINE

TO READ MLMR

(41

:
RD_E1

(.TST_PAT,

13,

.ERR_FLG);

!CALL ROUTINE

TO READ MLE!

NPV

CONTAINS THE ADDRESS (PASSED BY REF)

!
'
:

(1]

(5]

:
RD_E2 (.TST_PAT,

14,

.ERR_FLG);

'CALL

ROUTINE

TO READ MLE?

'CALL

ROUTINE

TO READ MLPA

"~ B

WM N

(W IV T AV IV I SV SV P TV IV W AV LV W AP

AN AN N AN N U AN (NN N NN N AN AN 0 NN N NN N
NN AN NN
RN NI MNP
PNINIRNIND b bt D 2 e b
2
N AN AN N N WWANANINANRO

LV LV TV RN o LAl ol LV RV RV LV, [V LG LV, LV LV, |

FORMAL PARAMETERS:
ERR FLG

(6]

RD_ER

(.TST_PAT,

.ERR_FLG);

.CALL

ROUTINE

TC READ MLER

:
RD_DA (.TST_PAT,

.ERR_FLG),

'CALL

ROUTINE

TO READ MLDA

RD_PA

(,TST_PAT,

.ERR_FLG);

CALL

(&43)

)

CIMULAAD ML-11

HARDWARD

TEST

LOGIC

MACRO M1113

SECTION

1
23-0CT-80 09:

PAGE

F 1
149

SEQ 0135
4é

:32

(7]

(o -To To -Jo -To Jo Jo

(WAl VARV IV, LV LV, L, ]

‘ML

(8]
(9]
{10l

(11)
(123
(131

RD_D1

RD_D?2

RD_D3

RD_PD

RD_EE

RD_EL

RD_DS

TOPS=20 Bliss=16 v2(206)

PA:<CNEALE>BLMLGL.BLI.2 (43)

LTST_PAT,

15,

JERR_FLG);

'CALL ROUTINE

TO READ MLD1

.TST_PAT,

16,

JERR_FLG);

ROUTINE

10 READ MLD?

LTIST_PAT,

14,

LERR_FLG);

ROUTINE. T0 READ MLE?

.TIST_PAT,

19,

LERR_FLG);

‘CALL ROUT INE

T0 READ MLPD

.TST_PAT,

17,

LERR_FLG);

'CALL

ROUTINE

10 READ MLEE

LIST_PAT,

18,

LERR_FLG);

'CALL

ROUTINE

10 READ MLEL

LTST_PAT,

‘CALL ROUT INE

10 READ MLDS

.ERR_FLG);

tes;

3835
020210
020214

020220
020224
020230
020232
020236
020240
020242
020244
020246
020250
020252
020254
020256
020260
020262
020264
020256
020270
020272

004167
016600
016601
016602
006302
066207
000034
000050
000066
000104
000122
000140
000156
000174
000212
000230
000246
000264
000302
000320
010146

end;

163572

000010
000014
000012
020236

RD.REG:

1%:

JSR
MOV
MOV
MOV
ASL
ADD

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WCRD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

MOV

. ERR. FLG,*

3761
3793

3789

TeT PAT
REG. SEL ,*

3793

CZMLAAD ML-11 LOGIC TEST

MACRO M1113

MARDWARD TEST SECTION

5403

5407 020276
5408 020300

5409 020304

5410 020306

005046

010066
004767

000532

010146

012746
010046
004767

5415 020324

010146

5418 020334

004767

5414 020322 000523
5419 020340
5420 020342

012746
010046

000514
010146

173740

000006

000003

010046
004767

174400

5426 020362

012746

000015

5427 020366
5428 020370

5429 020374
5430 020376

010046
004767

000476
010146

010046
004767

5435 0206414

010146

5434 020412

5436 020416
5437 020422
5438 020426

4,39 020430
5440 020432

000467

012746
010046
004767

000460
010146

010046
004767

5444 020446 000451
5445 020450 010146

010046
004767

5451 020670
5452 020474
5453 020476

012746
010046
004767

5449 0206464 000442
5450 020466 010146

010046

MOV

R1,-(SP)

MOV
MOV
JSR

B8R

MOV

8% :

9% :

108:

RO,-(SP)
PC.RD.CS1

#6.-(SP)
RO.-(SP)
PC.RD.ER

R1,-(SP)

MOV
MOV

#3.-(SP)
RO.-(SP)

BR
MOV

16$
R1,-(SP)

MOV

PC.RD.DA

#12,-(SP)

PC.RD.MR

MOV

#15,-(5P)

BR
MOV

16%
R1,-(SP)

BR
MOV

MOV

16%
R1,-(SP)

RO,=(SP)
PC.RD.E1

né,-(sP)
= (5P)
RO,
PC.RD.E2

16%

MOV

R1,-(SP)

JSR

PC.RD.PA

MOV
MOV

BR
MOV

MOV

#10,-(5P)
RO,-(SP)

16
R1,-(SP)

n,-(sp)

MOV
JSR

RO,=(SP)
PC.RD.D1

MOV

#20,-(5P)

BR
MOV

16%
R1,-(SP)

MOV
JSR

RO,=-(SP)
PC.RD.D2

MOV
MOV
JSR

06,-(SP)
RO,<-(SP)
PC.RD.D3

118:

BR
MOV

128.

BR
MOV
MOV

MOV

;

TOPS
PA:<

3789

3706

3789

3799

;
:

378
3802

;
:

3789
3805

;
:

3789
3808

;

3789

;
:

3789
3814

= (SP)
RO,

MOV
JSR

176534

5454 020502 000433
5455 020504 010146
5456 020506 012746 000023
5457 020512

176220
000016

-(SP)

MOV
JSP

175720

5446 020452 012746 000020

5447 020456
5448 020460

174520

5641 020434 012746 000017

5442 020440
5443 020442

175164

000010

CLR
MOV
JSR

JSR

174762

5431 020400 012746 000016

5432 020404
5433 020406

4$:

176240

5422 020350
5423 020352

000505
010146

174100

5421 020344 012746 000012

5424 020356
5425 020360

22=0ct=1980 10:47:44

22-0ct=-1980 10:45:32

;

5411 020310
5412 020314
5413 020316

5416 020326
5417 020332

SEQ 0136

MLG

2282

5406 020274

23-0(T-80 09:11

6N
PAGE 150

3811

;

;
:

3789
3817

16$
R1,-(SP)

;
:

3789
3820

16§
RY.-(SP)
028,-(cp)

;
:

3789
3823

RO,=(SP)

CIMLAAD M =-11 LOGIC TEST

HARDWARD TEST

SECTION

5459
5460
5461
5462
5463
5464
5465
5466
5467
5468
5469
5470
5471
5472
547%
5474
5475
5476
5477
5478
5479 020576
5480
5481
5482
5487
5488
5489 ;

MACRO M1113

23-0CT-80 09:11

H 11
PAGE 151

SEQ 0137
T0PS
PA:<

JMLG
004767
000424

175320

012746
010046
004767
000415
010146
012746

000021

010146

010046
004767
000406
010146
012746
010046
004767
062706
000207

13%:

175504
14%:

0000¢2

176722
000006

MOV

[[0}
MOV

JSR
BR
MOV

MoV

MOV

175424

N00005

JSR
BR

15%:

16%:

JSR
BR
MOV
MOV
MOV

JSR
ADD

RTS

PC,RD.PD

16$

R*,-(SP)
#21,-(5P)
RO,=(SP)
PC.RD.EE
16§
R1,-(SP)

3836

'<BLF/PAGE>

3789
3829

#22,-(SP)
RO,<(SP)

PC RD.EL

16$

3789
3832

#6.SP

3762

R1,=(SP)
¥5°-(5P)
RO.-(5P)
PC.RD.DS

3761

124 words
Routine Size:
: Maximum stack depth per invocation:

;

3789
3826

6 words

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0CT-80 09:11

PAGE

I 1

152

SEQ 0138
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4L.BLI.2 (4&)

?GNINXT:

1S EXECUTED AT THE BEGINNING OF

DOWN/POWER

HAS

OCCURRED,

WHEN

EACH
THE

OPERATOR HAS ISSUED A START, RESTART QR CONTINUE COMMAND.
DURING INITIALIZATION, THE °'GPHARD® MACRO IS USED TO GET

®e

P-TABLE IMNFORMATION FOR THE LOGICAL UNIT UNDER TEST. THE
NUMBER OF UNITS
AVA]_ABLE FOR TESTING IS CONTAINED IN A
HEADER LOCATION ('LSUNIT').

®e

00
vc

WHEN POWER

local
OFFS tET;
external

LSUN 17;

AV, WA VA A
N
VVAOA

WA
WNOA WA VIV AWV WA VAW
AW VIA VAWV
TNV

®e

f S
YV TV ]
&~
N UM N AN AN N N AN RO PO RO RO RO RO RO RO RUAD
= b s b bt b s —b
W) 2O OO NOWVNEB WA =2 OVONYOWVMEB W
2O 0O NS LW =20

A WA AW AN
VHA AN AT
N
A N TOITY AWV
Y
oA W

INITIALIZATION CODE

PASS,

we®.we

5491 JMLG
5492 ;
5493
5494
5495
5496
5497
5498
5499
5500
5501

MACRO M1113

if not R EADEF
then
begi n

(EF_CONTINUE)

'SKIP INIT

begin
ML_LUN =
if

(GPHARD

RH_ADD =
RH_TYP =
RH VEC =

.SEE

.THIS

_ML_LUN ¢+

.ML_LUN geq

end

until

CONTINUE

!START GPHARDS AT LUN O AND LOAD

if R EADEF (EF_START)
then
begin
ML_LUN = -1;
do

CODE

.LSUNIT

OFFSET = 0;

in.rbCOQNY from 0 to 21

IS THE

rATEGORY

VERY fIRST PASS
CODE

"INCREMENT LOGICAL UNIT NUMBER
then DOCLN;

(.ML_LUN, PTBL_PTR))

. ((.PTBL_PTR)
_((.PTBL_PTR)
.((,PTBL_PTR)

THIS

‘'ML_REG'

!START

neq 0;

OVER

'REPEAT

ALL

UNITS HAVE

BEEN TESTED

THE GPHARD UNTIL A O

¢+ 0);
+ 2);
+ 4);

'GET BASE RH ADDRESS FOR THIS UNIT
'GET RH TYPE FOR THIS UNIT
'GET RH VECTOR FOR THIS UNIT

'LOAD THE REGISTER ADDRESS FOR THIS UNIT

egin

ML REG [.COUNT, REGISTER_ADD] =

OFFSET = ,OFFSET ¢+ 2;

"INIT OFF SET COUNT

.RH_ADD +

,OFFSET;

end;

else

end

begin

if READEF
do

(EF_NEW)

IS RETURNED

then ML_LUN = =1;

THIS A NEW PASS

"IF

NEW PASS START GPHARDS AT LUN O

[NTO ML _REG

CIMULAAC ML-11

HARDWARD

TEST

LOGIC TEST
SECTION

MACRO M1113

23-0(T-80 09:11

J N
PAGE 153

SEQ 0139

22-0 1980 10:4647:44
22-0
980 10:45:32

JMLS
3889
3890
3891
3892
3893
3894
3895
3896
3897
3898
3899

3900
3901
3902

3903
3904
3905
3906
3907
3908
3909
3910
3911
3912

begin
ML_LUN =

3932
3933
3934

3935

31936
3937

.ML_LUN geq .LSUNIT then DOCLN;

'IF NOT GET NEXT LUN PTABLE
'START OVER [F ALL UNITS ARE

TESTED

end

until (GPHARD (.ML_LUN, PTBL_PTR). neq 0;
end;

PAR DIS = .((.PTBL _PTR)

+ 12);

m_b UT = .((.PTBL PTR) + 10);
OP°N UM_ ARR
= . ((. PTIBL_PTR) + 6) = 1;
608D 8K = ZEROES:
ARR _T6
= ZEROES;
LST “ARR = 1EROES;
LST “BLK = ZEROES;
it LCC.PTBL_PTR)
then
begin

¢ B)

IS_SET

ODRIVE TYPE = %0'000110°;

W C STZf = %0'140000°;
RASTINC
= xo 200°';
CHIP S12
=

3913
3914

3915
3916
3917
3918
3919
2920
3921
3922
3923
3924
3925
3926
3927
3928
3929
3930
3931

ML_LUN ¢ 1;

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLT.2 (44&)

ARR_INC = xo1000'-

ARRZ16<9, 4> = %0'17°;

LST-ARRCY, 4> = .OP_NUM_ARR;
LST_BLK<9, &> = .OP_NUM_ARR;

LSL"BLK = .LST_BLK or %3'777';
else

begin
DR VE TYPE = X0'000111°;

STZE = %0'000000°';
STINC= %0°'1000°';

cuxp SI1= 64;

ARR_INC = Xo' 4000°;
ARRTM16<11, 4> z X0'74';

LSTC“ARR<11,

= .OP_NUM_ARR;

LST_BLK<I, 4> = .OP_NUM_ARR;

LST_BLK = .LST_BLK or 1073777

'GET PARITY DISABLE FLAG
.GET DRIVE NUMBER
.GET OPERATOR NUMBER OF ARRAYS
.INIT GOOD BLOCK TO BLOCK ZERO
'INIT ARRAY 16 TO ZERO

'INIT LAST ARRAY TO ZERO
'INIT LAST BLOCK TO ZERO

'CALCULATE ML11 16K MOS RAM PARAMETERS
'EXPECTED DRIVE TYPE VALUE
'WORD COUNT SIZE FOR 16K WORD XFER
'RAS INCREMENT FOR 16K RAMS
'CHIP SIZE
'ARRAY INCREMENT
'ARRAY 16
ILAST ARRAY
'LAST BLOCK

'CAL CULATE ML11 64K MOS RAM PARAMETERS

'EXPECTED DRIVE TYPE VALUE
'WORD COUNT SIZE FOR 64K WORD XFER
'RAS INCREMENT FOR 64K RAMS
'CHIP SIZE
'ARRAY INCREMENT
'ARRAY 16
'LAST ARRAY
'LAST BLOCK

end;

PRIN T8 (FMT_17,
(LR _MBUS;

end;

ENDINIT,

.ML_LUN);

'TELL OPERATOR WHICH UNIT
.CLEAR MASS BUS

S BEING TESTED

CIMLAAQ ML-11 LOGIC TEST

HARDWARD

TEST

MACRO M1113

SECTION

5603
5604
5605
5606
5607
5608
5609
5613 020600
5614 020604
5615 020610
5616 020612
5617 020614
5618 020616
5619 020622
9620 020624
5621 020626
5622 020634
5623 020640
020646
020650
020652
020656
020660
020664
020670
020672
020700
020704
020712
020716
020724
020726
020730
020732
020734
020736
95642 020740
5643 020744
5644 020746
5645 020752
5646 020756
5647 020760
5648 020764
5649 020766
5650 020770
5651 020774
5652 020776
5653 021000
5654 021006
95655 021012
5656 021020

23-0CT-80 09:11

PAGE

K 11
154

SEQ 0140

2 2 0 ct-198 0 10:47:44
P4 2 0 ct-198 0 10: 45:32

‘MLG

004167
012700

104447

103001
000207
012700

104447
103061
012767

016700

104442

000040

012767
005267
026767
002401

1%:

171332
161144

JSR

R1,9SAVE3
#36,R0
47
19

MOV
TRAP

177777

171154

171150

2%:

171250

171240
4%:

5¢:
171160
160772

#40,R0
47

3857

MOV

#-1,ML.LUN

3860
3864
3866

INC
CMP
BLT

ML.LUN

ML.LUN,LSUNIT

TRAP
MOV
TRAP
MOV
TST

ML.LUN,RO
42
RO,PTBL.PTR

MOV
MOV
MOV
MOV
MOV

aPTBL.PTR,RH.ADD
PTBL.PTR,R1
2(R1) ,RH.TYP
PTBL.PTR,R1
4(R1) ,RH.VEC

BEQ

171260

3835
3853

RTS
MOV
TRAP

BHIS

3%:

171310

1676434
010067
167430
67
0057
001761
017767 167422
167414
016701
016167 000002
167402
016701
016167 000004
005002
005001
010100
006300
006300
006300
171214
016703
060203
010360 011700
062702 000002
005201
020127 000025
003761
000426
012700. 000035
106447 .
103003

LSUNIT

BHIS

005267
026767
002401
104444

LINIT:

163216

000036

.6GLOBL

TOPS
PA:<

CLR
CLR

PTBL.PTR

MOV
ASL
ASL
ASL
MOV
ADD
MOV
ADD

BHIS

MOV

INC
CMP

BLT

3871
3872
3873
;
;
;

OFFSET
COUNT
,»
COUNT

;

OFFSEY,«

;

*,0FFSET

;

COUNT,*

; COUNT

INC
o[
BLE
BR

MOV
TRAP

3869

3874
3876

3878

3879
3876

3857
3886

#-1,ML.LUN
ML.LUN

ML.LUN,LSUNIT
7$

3890

3892

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0CT-80 09:11

L 11

PAGE 155

:47:464
:45:32

JMLG

5658

5659
5660
5661
5662
5663
5664

021022
021024
021030
021032
5665 021036
5666 021042
5667 021044
5668 021050
5669 021056

5670 021062

ek =D
d
D
d
b
D
b
e

OV
LS WNNIN =
O
SsSO00oNONONNOMNVON

5671 021070
5672 021074
5673 021100
5674 021102
5675 021
5676 021
5677 021
5678 021
5679 021
5680 021
5681 021
5682 021
5683 021
5684 021

5703 021300
5704 021304
5705 021312
5706 021320
5707 021326

5708 021334

1342

104444

016700
104442
010067
005767
001761
016701
016167
016701
016167
016701
016103

005303
010367
005067
005067
005067
005067
016701
026127

001054
012767
012767

012767
012767
012767
052767
016703
000303
006303
042703
042767
050367
016703
000303
006303
042703
042767
050367
052767
000461
012767
005067
012767
012767
012767
042767
052767
016703
000303
006303
006303

171136

7%:

167262
167256
167250

000014
167236
000012
167224
000006
167214
167214
167220
167216
167206
167166
000010

000110
140000

000200
000020
001000
017000

167252

8%:

171120

160777

167104
167062

160777
017000
167052
000777

MOV

CMP
BNE

170524
170506

MOV
MoV
MOV
MOV

MOV
BIS
MOV
SWAB
ASL
BIC
BIC
BIS
MOV
SWAB

167110

ASL

BIC
BIC
BIS
BIS

167056

167044
170374

001000
000100
004000
074000
060000

170354

166754

MOV
MOV
MOV
MOV
¥ov
MOV

CLR
CLR
CLR
CLR

000111

170360

1ST
BEQ

Mov

167110

017000

TRAP
MoV
TRAP
MOV

DEC

000001

166774
.

9%:

SEQ 0141

MOV

CLR

MOov
MOV
MOV

BlC
8IS

MOV

SWAB

ASL
ASL

44
ML.LUN,RO

42
RO,PTBL.PTR

TOPS
PA:<

3895

PTBL.PTR

PTBL.PTR,R1
14(R1) ,PAR.DIS
PTBL.PTR,R1
12(R1) ,ML.DUT
PTBL.PTR,R1

6(R1),R3

R3
R3,0P.NUM_ARR
. BLK
GOOD
ARR.16
LST.ARR

LST.BLK

PTBL.PTR,R1
. #i
10(R1)
9¢
#110,0RIVE.
TYPE
#-40000,w.C.SI1ZE
#200,RAS.
INC
#20,CHIP.SIZ

3899

3600

3901

3902
3903
3904
3905
3907

R
.R3
OP.NUM.AR

3910
I
3912
3913
3914
3915
3916

gg.uun.Ana,ns

3917

#1000, ARR. INC

#17000,ARR.
16

R3
R3
2160777.R3
#17000,LST.ARR
R3,LST.ARR

R3
#160777.R3
#17000,LS7.BLK
R3,LST.BLK

#707,LST.BLK

108
#111,0RIVE.
TYPE
W.C.SIZE
#1000, RAS. INC
#100,CHIP.S12Z

3918
3907
3922

#4000, ARR
. INC
#74000,
ARR .16

3923
3924
3925
3926
3927

OP .NUM.ARR.R3

3928

260000,
ARR . 16
R3
R3
R3

CZMLAAO ML-11 LOGIC TESTY

HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

SEQ 0142
T0PS
PA:<

JMLG

5714
5715
5716

5717
5718
5719
5720

02
02
021362
02
21
57
02
5722
5723
5724
5725
5726
5727
5728
5729
5730
5731
5732
5733
5734
5735
5736
5737
5738
5739
5740
5741
5742
5743
5744

006303
042703
042767
050367
016703
000303
006503
006303
006303
042703
042767
050367
052767
016746

103777

074000
166744
166722

103777
074000
166706

003777

170526

166750

166700

152777
016703
042703
142777
150377
062706
000207

000040

170256

000007

170240

170234
000006

#103777.R3

#74000,L57.BLK

166712

005244
000002

170502
177770

10%:

BIS

MoV
MoV
MOV
MOV
TRAP

BISB
MCY

BIC
81(8
8158
ADD
RTS

:
;

512

5759 021516
5760
520
5761
5762
5763

004767
104411

177062

3929

OP .NUM.ARR,R3

012746
012746
010600
104414

R3
#103777,R3
#74000,LST.ARP
R3,LST.ARR

Routine Size:

Maximum stack

5749

5750
5754
5758

PAGE 156

LSINIT::JSR

TRAP
RTS

000207
:
;

R3,LST.BLK

#3777,05T.BLK

3930
3933

ML.LUN,=-(SP)

REMT.
1T, -(5P)

#2,-(SP)

SP.RO

SP'.

#40,3ML
. REG+40
ML.DUT,R3

077770,R3

#7.,3ML.REG+40
R3.,3ML .REG+40
26.5P

3855
3835

229 words
depth per invocation:

7 words

3935

PC,LINIT
11
PC

4 words
Routine Size:
Maximum stack depth per

invocation:

0 words

CIMLAAD ML-11

HARDWARD TEST

LOGIC

TEST

MACRO M1113

SECTION

23-0CT-80 (G9:11

PAGE

157

SEQ 0143

5769 :ML4

10
2=-0ct -1980 0 10:47:644

TOPS-20 Bliss=16 v2(206)

Y WA TIPSR T
T

T PR

W W

VeV

2-0ct -1980 0 10: 45:32

LRI
T NRIR TR
LRLTI
T P WAr
AT

5770
5771
5772
5773
5774

N 11

]
3938
]
3939
3940- BGNTST;
3941
‘oo
3942
| TEST NUMBER:
TST 1
3943
3944
E TEST NAME:
DRIVE PRESENT TEST
3945
3945
3947
i TEST DESCRIPTION:
3948
|
THIS TEST READS THE DESIRED SECTOR
3949
i
ADDRESS REGISTER OF THE DRIVE UNDER
i
TEST. DELAYS 100 US, THEN
3950
;
3951
READS THE
NED BIT OF MLCS?2
3952
3953
|
IF SET, AN ERROR MESSAGE IS
5
3954
PRINTED AND THE UNIT 1S DROPPED
3955
3956
§ IMPLICIT INPUTS:
'NONE
3957
3958
3959
3960
3961
local
3962
DODU_FLG,
3963
SAVE;
3964
3965 BGNSUB;
CLR MBUS:
3966
3967 DODU_FLG = ZERO;
3968
SAVE = _MLDA;
3969 DELAY (ONE_US);
3970
it .NED IS_SET
3971
3972
then
3973
begin
3974
ERRDF (1, ASYNC, 0);
PRINTB (ONE_FMT, PHR_3);
3975
3976
DODU_FLG = ONE;
3977
end;
3978
3979 ENDSUB;
3980
it .DODU_FLG IS_SET
3981
then
3982
3983
begin
3984
DODU (.ML_LUN);
3985
DOCLN;
3986
end;
3987

PA:<NEALE>BLZ2MLL.BLI.2 (44)

;

3988

ENDTST;

'DROP UNIT FLAG
‘TEMP STORAGE LOCATION

‘READ A DRIVE

'DELAY 1
‘TEST
'IF

THE

SET

'DROP

NED BIT

THEN REPORT

THJS UNIT

ERROR AND SET

DODU

IS_SET

DODU_FLG

1
CIMLAAD ML-11 L 0GIC

HARDWARD TEST

MACRO M1113

TEST

TION
S ectl

5830
5831
5832

5833

5837
5838
5839
5840
5841
5842
5843
5844
5845
5846 021564
5847 021570

5848 021574
5849 021576
5850 021602
5851 021604
5852 021606
5853 021610
5854 021612
5855 021614
5856 021616
5857 021624
5858 021626
5859 021630
5860 021632
5861 021634
5862 021636
5863 021642
5864 021646

5865 021652
5866 021654
5867 021€56
5868 021662
5869 021666
5870 021670
5871 021672
5872 021674
5873 021676
5874 021700
5875 021704
5876 021706
5877 021710
5878 021712

004167
005746

104402
152777

016702
042702
162777
150277
005003
017704
012701
001410
016702
001407
005016
005302
001375
005301
000767
032777
001420

162312

$T71:

000040

170200

000007
170156

170162

170424
177770

170140
000001

1%:

4%:

010000

170114

5¢:

104455
000001

007444
000000
012746
012746
012746
010600
104414

012703
062706

106467

104451

R1,8SAVEL

TST
TRAP

8158

MoV
MOV

BEQ

MOV

BEQ
CLR
DEC
BNE
DEC
BR
BIT
BEQ

.WORD
.WORD

006576

005350
000002

000001
000006

6%:

103716

1046444
005726
000207

JSR

TRAP
.WORD

006000
005303
001004
016700

LSOLY

BI(B
BISB
CLR

MoV
MOV
MOV
MOV
TRAP
MOV
ADD
TRAP
ROR

BLO
DEC
BNE

1702€2

7%:

B 12
PAGE 158

.6GLOBL

Mov
BIC

2%:

160314

23-0CT-80 09:11

MOV
TRAP
TRAP

157

RTS

SEQ 0144

3937

=(SP)

3963

3965

#40,aML
. REG+40

ML.DUT,R?

$177770,R2

#7,3ML .REG+40
R2.aML .REG+40
R3

;

DODU.FLG
*,SAVE
*,$8TMP?

;

*,$$TMP1

aML.REG+30,R4
5%
L‘DLY,RZ

3967
3968
3969

; $STMP
.

$$TMPI

;

$$TMP?

3971

#10000,3ML .REG*40
6%
55
1

3974

ASYNC

0
#PHR.3,-(5P)

#ONE .FMT,-(SP)
¥2,-(SP)

SP,RO

14
#1,R3

#6,5P
67

3975
.

SP,»

;

*,DODU.FLG

3976
3973

3977

DODU.FLG

3981

3984

3937

CIMLAAC ML-11 LOGIC T EST
HARDWARD TEST SECTION

MACRO M1113

PAGE

¢ 12
159

SEQ 0145

JMLG

5880
5881
5882
5883
5884

5885
5890
58N
5895
5899
5900
5901
5902
5903
5904
5905
5906
5907
5912
5913
5914

23-0CT-80 09:11

;
.

021714
021714
021720
021722
021724
021726

004767

104466

177602

T1::
1%:

006000

RTS

;

3989

JSR
TRAP

ROR
BLO

103773
000207

;

Routine Size:

Maximum stack

'<BLF/PAGE>

Routine Size:

Maximum stack

words

depth

per

invocation:

9 words

3986

PC.8TM
66

RO
1%
PC

6 words

depth

per

invocation:

0 words

CIMLAAQ ML-11 {OGIC TEST

HARDWARD TEST

5967
5968
5969
5970

R
I EYE FE TR
IE
R
T
TE
T

5961
5962
5963
5964
5965
5966

5953
5954
95955
95956
5957
5958
5959
5960

N PN PR PR TR N L TR

R R R A

9916 iMLG
5917
5918
5919
5920
5921
5922
5923
9924
9925
5926
5927
5928
5929
5930
5931
5932
5933
5934
5935
5936
5937
5938
5939
5940
5941
5942
5943
95944
5945
5946
5947
Y948
5949
5950
5951
5952

MACRO M1113

SECTION

23-0CT7-80 09:M

PAGE

D 12

160

SEQ 0146

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32
3990
3991
3992
3993
3994
3995
3996
3997
3998
3999
4000
4001
4002
4003
4004

4095
4006
4007
4008
4009
4010
“OM
4012
4013
4014
4015
4016
4017
4018
4019
4020
4021
4022
4023
40264
4025
6026
4027
4028
4029
4030
LN
4032
4033
4034
4035
4036

4037
4038
4039

4040
4041

TOPS-20 Bliss-16 v2(206)
PA:<NEALE>BL2MLG.BLI.2 (45)

BGNTST;
xX:

TEST NUMBER:

i TEST NAME:

TST 2

DPIVE SELECTION TEST

' TEST DESCRIPTION:
'
'
'

THIS TEST TESTS FOR UNIQUE DRIVE SELECTION BY WRITING THE DRIVE
UNDER TEST (DUT) DRIVE NUMBER INTO ITS DSA REG.
THEN WRITING THE DRIVE
NUMBERS OF OTHER DRIVES INTO THEIR RESPECTIVE DSA REGISTERS

AND READING THE DUT DSA FOR ITS DRIVE NUMBER.

i IMPLICIT INPUTS:
'

ML _DUT

NUMBER OF

LOADED DURING THE INITIALIZATION CODE AND CONTAINS THE DRIVE
THE DRIVE PRESENTLY BEING TESTED.

local

DODU_FLG,
SAVE:

'DROP UNIT FLAG

' TEMPORARY SAVE LOCATION

BGNSUB;
CLR _MBUS;

DODU_FLG = ZERD;
MLDA = .ML _DUT;
SAVE = .MLDA;

'LOAD THIS DRIVES DRIVE NO. INTO ITS DSA REG
'READ THE REGISTER BACK

it .SAVE neq .ML_DUT

'SEE IF DSA HAS DRIVE NUMBER

then

begin

ERRDF (2, INTER, 0);

'ERROR AND EXIT TEST IF DSA NEQ DRIVE NUM

PRINTB (SIX_FMT, PHR &, WRD 12, FNC_3, WRD_37, WRD_13, REG_6):

PRINTB (FMT_2, .ML_DOT, .SAVE, (.MLZDUT xor .SAVE)T;

EXIT_TST;
end;

incr DRV_SEL from 0 to 7 do
i; .DRV_SEL neq .ML_DUT

then

begin

'WRITE DRV NO OF OTHER DRIVES INTO THEIR RESPECTIVE DSA REG.
'SKIP IF .DRV_SEL EQL TO THE DRIVE UNDER TEST (DUT)

DRV NUM = DRV SEL;

'SELECT DRIVE TO BE WRITTEN TO

DELAY (ONE_0S);

'DELAY 1 US

MLOK = .DRV _SET;
end;

DRV_NUM = _ML_DUT;
SAVE = .MLDA;

'WRITE DRIVE SEL NO. INTO ITS DSA REG

TSELECT THE DUT
'READ ITS DSA REG

‘

MACRO M1113

CIMLAAD ML=-11

| OGIC TEST
HARDWARD TEST S ECTION

5972 JMLG
5973 .
5974
5975 ;
5976 :
5977 ;
5978
5979
5980
5981
5982
5983
5984
5985
5986
9937
5988
5989
5990
5991
5992
5993
5997
6001 021730
6002 021734
6003 021736
6004 021740
6005 021746
6006 021752
6007 021754
6008 021760
6009 021766
6V10 021772
6011 021774
6012 022000
6013 022004
6014 022006
6015 022010
6016 022012
6017 022014
6018 022016
6019 022020

6020 022024
6021 022030
6022 022034
6023 022040
6024 022044
6025 022050

23-0(T-80 09:11

PAGE

E 12
161

SEQ 0147

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32
4042
4043

40464
4045
4046
4047
4048
4049
4050
4051
4052
4053
4054
4055
4056
4057
4058
4059
4060

006167
005746

104402
152777

016703
010302
042702
142777
150277

005005
010377
017704

i¢ _SAVE neq
_
then
begi n

ERRDF

PRINTS

.ML_DUT

.SEE

(3, ASYNC, 0);
(THR_FMT,

PRINTB (FMT-1,
DODU_FLG =
end;

ONE;

FNC_3,

.ML_DOJT,

WRD 37,

.SAVE);

WRD_14);

T0PS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4L.BLI.2 (495)

WRITTING TO OTHER DRIVES CHANGE

.ERROR AND SET

DODU_FLG

ITS VALUE

CHANGED

ENDSUB;

it .DODU_FLG IS_SET
then
begi n
DODU (.ML_LUN);
DOCLN;
end;

'DROP UNIT

DODU_FLG

IS_SET

ENDTST;

$72:

162124

000040
170216

177770
000007
167746
167730
167724

167772

167752

JSR
TST

R1,$SAVES
~(SP)

BISB

#40,3ML.REG+40

TRAP

MOV
MOV

BIC
BICB
BISB
CLR

MOV
MoV

CMP
BEQ

TRAP
.WORD
.WORD

007342
005770
006232
006774
005760
006630
005432

.WORD

MOV
MOV
Mov
MOV

MoV

MOV
MOV

3988
4012
4014

HL.DgT,RS
R3,R

017770.R2

#7,aML .REG+40

sg.aHL.RE604O
R3,3ML.REG+30
aML .REG+30,R4
R4 .R3
2%
55
2
INTER
0
#REG.6,-(SP)

#WRD.135,-(5P)

PURD.37.-(SP)
#ENC.3,=(SP)

#WRD.12,-(SP)

#PHR
.4, = (SP)
#SIX.FMT,=(SP)

DODU.FLG
*,SAVE
SAVE ,+

4016
4017
4018
4020

6402%

4024

CIMLAAD M =11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

6030 022054
6031 022060
6032 022062

012746
010600
104414

6034 022070
6035 022072
6036 022074
6037 022076

010403
041603
040416
050316

016716

6038 022100 010446
6039 022102
6040 022106
6041 022112

016746
012746
012746

6043 022120
6044 022122

104414
104463

6062 022116 010600

000007

170100

062706

000030

6047 022132
6048 022136
6049 022140

016700
005003
020300

170032

6051 022144

010302

6046 022130 000522

6052 022146
6053 022152
6054 022160
6057 022174
6058 022176

001410
016702

157714

6060 022204
6061 022206
6062 022210
6063 022212

005016
005302
001375
005301

6065 022216

005203

6068 022226

010003

6070 022234
6071 022242

142777
150377

6U59 022202

6064 022214

6066 022220
6067 022224

010377
012701

001403

6072 022246
6073 022252

017704
020400

6075 022256

104455

6074 022254

000003

6079 022266

012746

6080 022272
6081 022276

68 :

007444
000000

012746
012746

7%:

000007

000007
167472

167456

R4 .R3
(SP).R3
R4, (SP)
R3. (SP)

167476

SEO0 0148

; SP,e

. SAVE,+

4025

: SAVE,e

S$P.RO

; SP,e

#30,5P

4020
4022
4031
4029
4031

TRAP
TRAP

14
63

B8R

MOV
CLR
CMP

ML.DUT.RO
R3
R3,RO

;
:
:
: DRV.SEL
. DRV.SEL,*

MOV

R3,R2

; DRV.SEL,*

4034

MOV
MOV

R3.aML .REG+30
#1.R1

: DRV.SEL,*
Loe,88TMP)

4035
4036

BEQ

BEQ
MOV
BEQ

$177770,R2
#7,3ML.REG+40
R2.aML.REG+40

7%
LSDLY,R2

. e, 88TMPY

(SP)
R2

. $$TMP
L $STMPY

: $$TMP?

: DRV.SEL

4029

MOV

RO,R3

;

4039

BICB
BISB

#7,3ML.REG+40
RY,aML .REG+40

ML .REG+30,R4
R4 RO

; +,SAVE
: SAVE,*

4040
4042

4045

4046

CLR
DEC
BNE
DEC

5¢

CMP
BLE

R3,#7
13

INC

BIC

MOV
(MP

TRAP

WORD

006232
006774

TOPS
PA:<

R&4 . =(SP)

ML .DUT,=(SP)
NEMT.2.-(SP)
24 ,-(SP)

BEQ

005774

ML.DUT, (SP)

MOV
MOV
MOV

BIC
BICB
BISB

167560

001435

6076 022260

6077 022262
6078 022264

2%:

167540
0060001

6065 022230 042703 177770

MOV
BIC
BIC
8IS

ADD

000767

020327
003745

¥7,-(5P)
SP RO
14

MOV

3¢
177770
000007
167554

MOV
MOV
TRAP

MOV

001425

042702
142777
150277

6055 022164
6056 022170

PAGE 162

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

MOV

170062
004224
000004

6045 022124

6050 022142

(ML
;

6027
gggg

6033 022064

23-0(T-80 09:11

"WORD
WORD

MOV

MOV
MOV

217777083

ASYNC
O

#URD .14, -(SP)

#WRD.37.-(5P)
#ENC.3,-(SP)

. DRV.SEL,*

CIMLAAD ML-11 LOGIC

SECTION

23-0(T-80 09:11

6 12
PAGE 163

SEQ 0149
10PS
PA:<

‘MLé
ONNN
NS
»
(=]
o

6083
6084
6085
6086 022302
6087 022306
6088 022312
6089 022314
6090 022316
6091 022320
6092 022324
6093 022330
6094 022334
6095 022336
6096 022340
6097 022344
6098 022350
6099 022352
6100 022354
6101 022356
6102 022362
6103 022364
6104 022366
6105 022372
6106 022374
6107 022376
6108 022400
6109
6110

OO0 2000
purPrSur Gy, Pur g
[=] OO
S OMNON

HARDWARD TEST

MACRO M1113

TEST

005366

Mov

000004

MOV
MOV
TRAP
MCV
mov
MOV
MOV
MoV
TRAP

167644

004164
000003

000001
000020

177354

8%:

9% :

167574
10%:

000207
;

6111
6116

;

#THR
. FMT ,-(SP)

¥4 ,-(SP)

SP,RO

SP,*

14
R4, (SP)
ML.DUT,=-(SP)

;

SAVE,e

6047

#EMT
1 ,-(SP)

#3,-(SP)

SP,*

SP,RO

MOV
ADD

*,D0DU.FLG

4048
4044
4049

DODU.FLG

4053

TRAP

ROR
BHIS
JMP
DEC
BNE
MOV
TRAP

4056

TRAP
TST
RTS

3988

149 words
Routine Size:
Maximum stack depth per invocation:

19 word<

004767

104466

177322

103773

000207
.
;
4061

!<BLF/PAGE>

JSR

TRAP
ROR
BLO
RTS

006000

6141

6142
61463 ;

—

6126 022402
6127 022406
6128 022410
6129 022412
6130 022414
6131
6132
6133

" X,¥]

6117

6121
6125 022402

4058

PC,9T2
66

RO
1%
PC

Routine Size:
6 words
Maximum stack depth per

invocation:

0 words

CIMLAAD ML=-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

23-0(T-80 09:11

H 12

PAGE 164

22-0c¢t=-1980 10:47:44

6145 ;ML

22-0ct=1980 10:45:32

2}29 :
6148 ;

6149
6150
6151
6152
6153
6154
6155
6156

4062

;
;
,
;
;
;
:

6157 ;
2}23 .

SEQ 0150

4063
4064
4065
4066
4067
4068
4069
4070

T0PS-20 Bliss=16 v2(206)

PA:<NEALE>BL2MLGL.BLI.2 (46)

.
BGNTST;

e
! TEST NUMBER:
T1ST 3
!
! TEST NAME:
READ WRITE REG ONES/ZEROES TEST
!
' TEST DESCRIPTION:

7
28;% :

THIS TEST WRITES AND READS A DATA PATTERN OF ALL ONES AND ZEROES TO ALL
OF THE ML11'S READ / WRITE REGISTERS.

6160 ;

2822

WHICH ACTUALLY PERFORMS THE READING AND WRITING OF THE REGISTERS.

6163 ;
6164 ;

4077
4078

!
!

THE UNIT IS DROPPED ON DETECTED ERRORS.

6166 ;

4080

6168 ;
6169 ;

4082
4083

212; :

6165

;

6167

6170 :

4079

4081

4084

ROUTINES WRT_REG AND RD_REG ACCEPT ARGUMENTS TO FURTHER SELECT ROUTINES

IMPLICIT

LOADED BY READ REGISTER ROUTINES AND CONTAINS THE DATA PATTERN WRITTEN

TO THE REGISTERS (REPRESENTS GOOD DATA).

RD DATA

!
!--

READ FROM THE REGISTER (REPRESENTS BAD DATA).

6171 ;

4085

6174 :
6175 :

4088
4089

local

6177 ;

4091

6172 ;
6173 ;

6176 :

6178 ;

6179 ;

4086
4087

4090
4092

4093

6180 ;
6181 ;

4094
4095

6183 ;

4097

6182 ;

6184 ;
6185 ;
6186 ;

6187 ;

6188 .
6189 ;

4096

4098
49099
4100

4101

4102
4103

6190 :

6104

2}g§ :

2}89

6191 :

4105

6194 ;

4108

6133 ;

4}}?

6198 ;

6112

6195 ;
61

6199 ;

4109
4

4113

INPUTS:

Wl DATA

LORDED BY THE READ REGISTER ROUTINES AND CONTAINS THE DATA PATTERN

ERR_F LG,

'"ERROR FLAG PASSED TO ROUTINES

index,

'"POINTS TO REGISTER PRESENTLY BEING TESTED

TST_PAT,

'TEST PATTERN

DODU_FLG;

'DROP UNIT FLAG

DODU FLG = ZERO;

TST_PAT = ONES:

'LOAD TEST PAT WITH ONES

incr TWICE from 0 to 1 do
begin

'REPEAT LOOP TWICE

incr REG_SEL from 0 to 10 do
begin
BGNSUB;

CLR_MBUS;

'TEST ELEVEN WRITF/READ REGISTERS

WRTREG (.TST PAT, .REG SEL, index);

'WRITE TO THE REGISTER

if .ERR_FLG [S_SET

'SEE IF READ FOUND AN ERROR

RO_REG (.TST_PAT, .REG_SEL, ERR_FLG);
then

'READ THE REGISTER

begin

'If ERROR FLAG IS_SET THEN ERROR AND SET DODU_F LG

selectone .REG_SEL cf

'SELECT WHICH MODULE FAILED

set

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

SEQ 0151

AN N AN AN N AN N W NN N PO PN PO R NI NI N > —
000 ~NO NS WNWN =2 OO0 NV
AN 20000
B B B B
WA = O

d e

d
D

LW W

D
D

32X 2P ol W

D
d

d
d

o
I

d e
d

D e

2P 2R 2R MW W

h
b

b —2 s 2
OV

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

6201 JMLG
6202 ;
6203
6204
6205
6206
6207
6208
6209
6210
6211
6212
6213
6214
6215
6216
6217
6218
6219
6220
6221
6222
6223
6224
6225
6226
6227
6228
6229
6230
6231
6232 ;
6¢33 .
6237
6241 022416
0242 022622
6243 022424
6244 022426
6245 022432
6246 022434
6247 022436
6248 022440
6245 022446
6250 022452
6251 022456
6252 022464
625% 022470
6254 022472

TEST

LOGIC

TEST

PR AR ol B

CIMLAAD ML-11

HARDWARD

[& to 5]

ERRDF

{6 to 10]
ERRDF

(&,

ASYNC,

(&,

SYNC,

(&,

O):

*ASYNC MODULE FAILURE

0);

ARR_DAT,

.SYNC

0);

MODULE

FAILURE

'ARRAY DATA MODULE

FAILURE

tes,;

PRINTB

(SIX_FMT,

PHR &,

WRD_12,

FNL

S5,

ENC_6,

WRD_52,

WRD_56);

PRINTB (FMTZ16, .ML_REG [.index, REGISTER loo] .GT_DATA, .RD_DATA);
DODU_FLG= DNE;

end;

ENDSUR;
end;
TST_PAT
end;

.DODU_FLG

then

= not

.TST_PAT;

_REPEAT

IS_SET

AGAIN WITH COMPLIMENT

'DROP THIS UNIT

THE

DATA

DODU_FLG

IS_SEY

begin
DOOU (.ML_LUN);

DOCLN;
end;

ENDTST;

161416

152777

000040

167272

142777
15007~
010246
010346

000007

167254

016700
042700

ERRDF

004167
024646
005004
012702
005001
005003
104402

(0 to 3]

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2MLG.BLI.2 (46)

$13:

177777
1%:

167516
177770

167250

2$:

4060

JSR

R1,$SAVEL

(LR
MOV
(LR

R4
#-1.R2
R1

;
;
;s

2
#40,aML .REG+4O

H
.

(MP

(LR

TRAP
BISB

-(SP),=-(SP)

MOV
BIC

ML .DUT,RO
#177770,R0

BISB
MOV
MOV

RO,aML .REG+40
R2,-(SP)
R3,-(SP)

Bl1(B

;

DODU.FLG
*,TIST.PAT
TWICE

4095
4£09¢
4098
4101
6102
4103

TST.PAT,+
REG.SEL,*

4105

REG.SEL

#7,3ML .REG+4L0

:
;

CZMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

6256

J 12
PAGE 166

SEQ 0152

MLG

2%2;

22-0ct-1980 10:47:46

;

6259 022474
6260 022500
6261 022502

6262 022506
6263 022510

6264 022512

012746
060616
004767

000010

012746

010216
010346

6265 022516
6266 022520

060616
004767

6268 022532

001106

6267 022524

6269 022534

6270 022536
6271 022540
6272 022564

6273 022546

026627

002410
020327
003005

6278 022560
6279 022564
6280 022566
6281 022572

020327
002410
020327
003005

6283 022576
6284 022600
6285 022602

000004
007500
000000

6277 022556 000425
6282 022574

000412

6290 022626

003004

6291 022622

020327
002407
020327

000004
007534

6295 022532

012746

6296 022636
6297 022642
6298 022646

6299 022652

022656
022662
022666
022672
022674

MOV

215,-(sP)

175464

000012

000001

CMP

000003

000004

005005

43:

000012

000000

012746
012746
012746

006454

006420
007030
007020

012746 005760
012746
012746
012746
010600
104414

006630
005432
000007

016746
016600
006300
006300
006300

166762
000036

; ERR.FLG,*

4106

12(5P) . #1

. ERR.FLG,*

4108

: REG.SEL

4112

3%
R3. 43
3%

;

REG.SEL,*

4116

JWORD
"WORD
"WORD

&
ASYNC
0

CMP
BLT
CMP
BGT

R3, 44
4%
R3,#5
4%

.WORD
'WORD
"WORD

4
SYNC
0

CMP
BLT
CMP

R3,#6
5%
R3,#12

TRAP

4122

#WRD.56,~(SP)

4125

B8R

BGT

5¢:

sP, (SP)
PC.RD.REG

BLT
CMP
BGT

TRAP

0060006

TOPS

PA:<

INDEX,®

; TST,_PAT
«
; REG.SEL,*

TRAP

R2,(SP)
RY, =-(SP)

BNE

6305 022676 016716 166770
6306 022702
6307 022706
6308 022712
6309 022714
6310 022716

ADD
JSR

104455

6292 022626
6293 022626

6294 (622630

000012

MOV
MOV

104455

6286 022604

6287 022606
6¢88 022612
6289 022614

175114

#10,-(SP)
SP, ($P)
PC WRT.REG

104455

000004
007444
0N0000O

22-0ct-1980 10:45:32
MOV
ADD
JSR

005703

6274 022550
6275 022552
6276 022554

6300
6301
6302
6303
6304

23-0CT-80 09:11

4119

;

4112

MOV
MOV
MOV

#URD.52.-(SP)
#ENC.6,
= (SP)
#ENC.5 . -(SP)

MOV
MOV
MOV
MOV
TRAP

MOV

MOV
MOV
ASL
ASL
ASL

. REG.SEL,e

&
ARR.DAT
O

MOV

4112

. KEG.SEL,*

JWORD
.WORD
'WORD

MOV

REG.SEL,®

: REG.SEL,®

#RD.12,-(SP)

#PHR
.4, - (SP)
#SIX.FMT,=-(SP)
#7,-(5P)
SP.RO
14

RD.DATA, (SP)

WT.DATA.=(SP)
36(SP) , KO
RO
RO
RO

; SP,e

.
:

4126
INDEX,*

CIMLAAD ML-11 LOGIC

HARDWARD

011700
005154
000004
000001
000030
000012

6%:

6324

6325
6326
6327
6328
6329

PAGE

12
167

SEQ 0153
TOPS
PA:<

6338
6339 023022

6340
6341

104451
104444

000001

167152
7%:

022626
000207

6347

023024
023024
023030
023032
023034
023036

004767

104466
0069200
103773

177366

——

:
;

6342

ADD

TRAP
ROR

MOV
TRAP
TRAP

(MP

RTS

JSR

TRAP

ROR
BLO
RTS

00C207
:

ML.REG(RD) ,=(SP)
FEMT.16,-($P)
#4,-(SP)

SP RO

Routine Size:

#30,sp

L1464

'<BLF/PAGE>

*,DODU.FLG

6127
6110
4102
4128

REG.SEL
REG.SEL,*

£101

TST.PAT
TWICE
TWICE,*

6133
4098

. DODU.FLG

4136

#12,SP

[4]
ML.LUN,RO

4139

4060

(SP)+,(SP)+

24 words

IATA

PC.$T3
66

RO
1%
PC

6 words

: Maximum stack depth per invocation:

;

SP,*

14
#1,R4

131 words
Rougine Size:
Maximum stack depth per invocation:

[V]

005102
005201
020127
003614
005304
001004
016700

MOV
MOV
MOV
MOV
TRAP
MOV
ADD

BLO
INC
(MP
BLE
COM
INC
CMP
BLE
DEC
BNE

000012

6330
6331
6332
6333
6334
6335
6336
6337

6548
6352
6356
6357
6358
6359
6360
6361
6362
6363
6364
6372
6373
6374

23-0(T-80 09:11

LML

OOOOO0OCO

6320
6321
6322
6323

MACRO M1113

SECTION

MPORONINIRONININD

6312
6313
6314
6315
6316
6317
6318
6319

TEST

0 words

MACRO M1113

CZMLAAD ML=-11 LOGIC TEST

6384
6385
6386
6387
6388
6389
6390
639N
6392
6393
6394
6395
6396
6397
6398
6399
6400
6401
6402
6403
6404
6405
6406
6407

6408
6409
6410
6411
6412
6613
64614
6415
6416
6417
6418
L4619
6420
6421
6422

6423

6424
6425
6426
6427
6428
6429
6430

L 12
PAGE 168

SEQ C154

~
e
~own

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32
—
el

6376 JMLS
6377 ;
6378
6379
6380
6381
6382
6383

SECTION

HARDWARD TEST

23-0CT-80 09:11

4148
4149
6150
N
6152

4153
4154

6155
6156
6157
4158
4159
4160
4161
6162
4163
6164
6165
6166
L167
4168
6169
4170
an
4172

6173

6174
6175
6176
6,77
4178
6179
4180
4181
4182
4183
6184
4185
4186
6187
4188
4189
4190
1N
6192
6193
194
6195
4196

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2MLGL.BLI.2 (47)

BGNTST;
lee

TEST NUMBER:

TS5T &

TEST NAME:

READ WRITE REG SHIFTING ONFS/ZEROES TEST

TEST DESCRIPTION:
THIS TEST WRITES AND READS A

SHIFTING ONE'S AND SHIFTING ZEROE'S
PATTERN TO ALL THE ML11'S
READ/WRITE REGISTERS

ROUTINES WRT _REG AND RD_REG

ACCEPT ARGUMENTS TO FURTHER

SELECT ROUTINES WHICH ACTUALLY

PERFORMS THE

READING AND

WRITING OF

THE REGISTERS.

THE DRIVE
ERRORS.

IS DROPPED ON DETECTED

IMPLICIT INPUTS:
WT DATA

COADED BY READ REGISTER ROUTINES AND

CONTAINS THE DATA PATTERN WRITTEN TO THE

REGISTERS

(REPRESENTS GOOD DATA).

RD_DATA

LOADED BY THE READ REGISTER ROUTINES AND
CONTAINS THE DATA PATTERN READ FROM THE

(REPRESENTS BAD DATA).

'ERROR FLAG PASSED TO ROUTINE
'TEST PATTERN

'POINTS TO REG PRESENTLY BEING TESTED
'DROP UNIT FLAG

DODU_FLG;
DODU_FLG = ZERD;

TST_PAT = ONE;

'LOAD TST_PAT WITH A 1

incr SHIFT from 0 to 15 do

'DO SHIFT 16 TIMES

begin

incr TWICE
begin

from 0 to 1 do

'REPEAT LOOP TWICE

IN A FILED OF 0°S

CZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

6464

Ve
W
T
Be

PAGE

M12
169

from 0 to 10 do

TOPS-20 Bliss-16 vc(206)
PA:<NEALE>BL2ML4.BLI.2 (47)

SEQ 0155

'TEST ELEVEN READ/WRITE REGISTERS

egin

6199

BGNSUB;

4200
6201
4202
4203
4204
4205
4206
42C7
4208

CLR_MBUS;

WRTZREG (.TST _PAT,

.REG_SEL,

index);

RO_REG (.TST_PAT, .REG_SEL, ERR_FLG);
i; LEPR_FLG IS_SET
then

'IF

selectone .REG_SEL of

'fIND WHICH MODULE FAILED

Be
®e

SN
= OO 00 ~NO WV

TO THE REGISTER

.READ THE REGISTER

'SEE IF THE READ FOUND AN ERROR

set

LRl ol 2P ol B ol o o o oI ol
NOMNIMAINONIMNI
PN RN N
POPNIPONONIN)
= —d b b b D

'‘WRITE

begin

incrbREQ_SEL

L4197
4198

6212

THE ERROR FLAG IS_SET

(0 to 3] :
ERRDF (5, ASYNC, 0);

'ASYNC MODYLE FAILURE

(4 to 5] :
ERRDF (5, SYNC, 0);

'SYNC MODULE FAILURE

(6 to 10]
ERRDF

tes,;

:
(5, ARR_DAT, 0);

THEN ERROR

'ARRAY DATA MODULE FAILURE

PRINTB (SIX_FMT, PHR 4, WRD_12, FNC_5, FNC_6, WRD_52, WRD_56);

WSS NN

PRINTB (FMTZ16, .ML_REG [.index, REGISTER_ADD], .WT_DATA,” .RD_DATA);
DODU_FLG = ONE:
end;

ENDSUB;
end;

6465

6466
6467
64638
6469
6470

TSL_PAT = not

.TST_PAT;

'REPEAT WITH A O IN A FIELD OF

1°'S

end,

TSL_PAT = .TST_PAT“ONE;

6471

'SHIFT THE 1

IN THE FIELD OF 0'S

end,

6472

6473
6474
6475
6476
6477
6478
6479
6480
6484
6491 023040
6492 023044
6493 023046
6494 023050
6495 023054
6496 023056
6497 023060

23-0CT-80 09:11

22-0ct=1980 10:47:44
22-0ct-1980 10:45:32

[

6441
6442
6443
6444
64L45
6446
6447
6448
6449
6450
6451
6452
6453
6454
6455
6456
6457
6458
6459
6460
6461
6462
6463

6432 ‘ML4
6433 ;
6434
6435
6436
6437
6438
6439
6440

MACRO M1113

it .DODU_FLG IS_SET
then
4239
4240
YLy
4242

004167
024646
005005
012703
005001
005002
005004

'DROP THIS UNIT IF DODU_FLG IS SET

begin
podU (.ML_LUN);

DOCLN;
end;

ENDTST;

161014

$14:

000001
1$:

28:

JSR

R1,$SAVES

;

CLR
MOV
CLR
CLR
(LR

RS
#,R3
R1
R?
R4

;
;
;
.
;

cMP

-(SP),=(SP)

4143

DODU.FLG
*,IST.PAT
SHIFT
TWICE
REG.SEL

4188
4189
LN
4194
6197

HARDWARD TEST

6498 023062
6499 023064
6500 023072
OCOO0O0OO00O0O0O

[aSIaS1aSTI
ST ST, N1 ,81,81,¥]

6501 0
6502
6503
6504
6505
6506
6507
6508
6509
6510 02
6511 023136
6512 023142
6513 023144
6514 023150
6515 023156
6516 023160
6517 023162
6518 023164
6519 023170
6520 023172
6521 023174
6522 023176
6523 023200
6526 023202

JEPY
o Yo
Py
I 2N

CIMLAAD ML-11 LO

MACRO M1113

000040

166646

000007

166630

167072
177770
166624

3s:

TRAP

BISB
MOV

BIC
BI(B
BISB

MOV
MOV
MOV

000010

ADD

174470

JSR
MOV
Mov
MOV
ADD
JSR

000012
175040
000012

23-0CT-80 09:11

000001

CMP

BNE

TST

N 12

169-1

#40,a
. REG+40
ML
ML.OUT,RO

000005

6537 023244
6538 023246
6539 023250
6540 023252
6541
6542
6543
6544 023254
6545 023256
6546 023262
6547 023266
6548 023272
6549 023276
6550 023302
6551 023306
6552 023312
6553 023316
6554 023320

000012

TST.PAT,»

{201

SP, (SP)

INDEX,*

R3. (SP)

;
.

1ST.PAT,»
REG.SEL,*

4202

;

ERR.FLG,*

;

ERR.FLG,*

4204

;

REG.SEL

4,208

REG.SEL,*

#0,-(sp)

PC.WRT.REG

R& .= (SP)
#12,-(SP)
SP, (SP)

PC.RD.REG

12(SP)
. #1
7%

TRAP
.WORD
.WORD
.WORD
BR
CMP
BLT

JMLG

006454
006420
007030
007020

005760
006630
005432
000007

6$:

; REG.SEL,®

;

4212

;: REG.SEL,*

420

CMP
BGT

. REG.SEL,*

.WORD
.WORD
.WORD
B8R
(MP
BLTY
CMP
BGTY

;
.

REG.SEL,*

TRAP

000005

4199

;

TRAP

000006

SEQ 0156
4198

:
.

#177770,R0

#7,3ML .REG+40
RO.QML.REG*+40
R3,-(SP)
RE - (SP)

BLT
C(MP
BGT

000003

0000604

PAGE

.WORD

MOV

MOV
MOV
MOV
MOV
MUV
MOV
MOV
MOV
TRAP

4215

4208

.WORD
.WORD

4218
22=-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

#WRD.5
#JRD.S
#ENC.6,
- (SP)
#ENC.S

#PHR
.4, = (SP)
PSIX.FAT,=(SP)

#7,-(SP)
14

T0PS
PA:<
6221

#WRD.12,-(SP)
SP.RC

;

SP,e

CIMLAAD ML-11

HARDWARD TEST

MACRO M1113

6555
6556
6557
6558
6559
6560
6561
6562
6563
6564
6565

166344
166336

000036

011700
005154
000004
000001
000030
000012

6566
6567
6568
6569
6570
6571

6572
6573
6574
6575
6576
6577
6578

MOV
MOV
MOv
ASL
ASL
ASL
Mov
MOV
MOv
MOV
TRAP
MOV
ADD
ADD
TRAP
ROR
BLO
INC

B 13
PAGE 169-2

SEQ 0157
6222

RD.DATA, (SP)
WT.DATA,=(SP)

36(SP),RO

000001

#EMT
. 16,-(SP)
#4,-(SP)

SP,RO

14
LAFLY
#30,5P
#12,sP

6584
6585

BNE
.

6586

023460

023462
023462
023466
023470
6613 023472
6614 023474

8%:

022626
000207

004767

104466

006000

103773
000207

177352

MOV
TRAP
TRAP

(MP

RTS

Routine Size:

ROR

BLO
RTS

Sp"

*,DODU.FLG

;

REG.SEL

;
;
;

TST.PAT
TWICE
TWICE,*

;

4223

4206
4198

6197

REG.SEL,*

TST.PAT

SHIFT

SHIFT,«

: DODU.FLG
ML.LUN,RO
5

Lb
(SP)+,(SP)+
PC

137 words

Maximum stack depth per

JSR
TRAP

6226

INC
CMP
BLE
DEC

166514

INDEX,

ASL

000017

;

ML.REG(RO) ,-(SP)

CMP
BLE
COM
INC
CMP
BLE

000012

6579
6580
6581
6582
6583

6587
6588
6589
6590
6591
6592
6600
6601
6605
6609
6610
6611
6612

7%:

23-0CT-80 09:11

PC,$74

66
RO
1%
PC

invocation:

25 words

4240

6674

YA
R
WY
W
IR
LY

6668
6669
6670
6671
6672
6673

YUY

SRR

6666

YUY

4293
4294

4295
4296

BGNTST:
Vo4

TEST NUMBER:

TST 5

TEST NAME:

TEST

INITIALIZATION

TEST

DESCRIPTION:
THIS TEST TESTS THE ABILITY OF
ALL ACCESSIBLE ML11 REGISTERS
TO CLEAR OUT REGISTER DAT\ OF

ONE'S AND ZEROES PATTERN.
ROUTINE WRT REG WRITES A

PATTERN TO THE SELECTED REGISTER.

A MASS BUS CLEAR
THEN ROUTINE

m e
e am s
s

RD_REG READS THE

THE

DRIVF

THIS

TEST

IS DROPPED ON DETECTED ERRORS.

WILL

ALSO READ

DRIVE TYPE REGISTER FOR
INITIAL REGISTER VALUE.

IMPLICIT

THE

[TS

INPUTS:

REG_INIT

FLG

THIS GLOBAL FLAG TELLS THE ROUTINES

WHICH READ THE

REGISTERS

DATA DIAGNOSTIC

(RD D1, RD D2, RD D3)

10 00 A MBUS CLEAR BEFORE READING
}gglaeelsrsn DURING THE

REG

INIT

e e

P AP

S mm ¥ M

S AR

m S MM

m A e

@ mm S

IS DONE.

SELECTED REGISTER FOR CLEARED DATA

S Em o A

6665

6664

4245
4246
4247
4248
4249
4250
4251
4252
4253
42564
4255
6256
4257
4258
4259
4250
4261
4262
4263
4264
4265
4266
4267
4268
4269
4270
2N
4272
4273
L274
4275
4276
6277
4278
4279
4280
4281
4282
4283
4284
4285
4286
4287
4288
4289
4290
4291
4292

6657
6658
6659
6660
6661
6662
6663

SEQ 0158
TOPS=20 Bliss=-16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (48)

6649
6650
6651
6052
6653
6654
6655
6656

PAGE 170

THIS FLAG IS NEEDED DUE TO THE UNIQUE
MANNER IN WHICH THESE REGISTERS

MUST BE

READ.

RD _DATA

LOADED BY THE READ REGISTER ROUTINE

AND CONTAINS THE DATA PATTERN READ FROM
THE REGISTER (RePRESENTS BAD DATA).

6640
6641
6642
6643
6644
6645
6646
6647
6648

SECTION

€13

23-0(T-80 09:11

6620 JMLS
6621 ;
6622
6623
6624
6625
6626
6627
6628
6629
6630
6631
6632
6633
6634
6635
6636
6637
6638
6639

MACRO M1113

m S Ge s A

TEST

e a4

HARDWARD

LOGIC

CIMLAAD ML-11

local

DRIVE

TYPE

LOADED DURING THE INITIALIZATION CODE AND
STORES THE EXPECTED CONTENTS OF THE DRIVE
TYPE

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

D 13
PAGE 171

22-0ct=1980 10:47:44

6676 ;MLS

22-0¢ct=1980 10:45:32

22;; .

6679 :

6680
6681
6682
6683

6684 ;

6685 ;

4297

4298
4299
4300
430"
4302

4303

6686 ;

4304

6690 ;

4308

6687 ;
6688 ;
6689 ;

4305
4306
4307

6691 ;

4309

6694
6695 ;

6312
6313

6692 ;
6693 ;

6696 :
6697 ;

6698 ;

gggg :

6701 ;

6702 ;
6703 ;
6704 ;

6705 ;

4310
4311
6314
4315

4316

2%};
4319

4320
4321
6322

TST_PAT,

'ERROR FLAG PASSED TO ROUTINE
'POINTS TO REG PRESENTLY BEING TESTED
'STORES CALCULATED REGISTER CLEAR DATA
' TEMPORARY STORAGE LOCATION

DODU_FLG;

'DROP UNIT FLAG

ML REG [19, FORCE MI) = Xo0'177777';

REG_INIT_FLG = 2ERO;
oooU FLG 1ERO;
T1ST_BAT = ONES;

'REPEAT LOOP TWICE

begin

incr REG_SEL from 0 to 13 do
begin
BGNSUB;
CLR_MBUS;

WRTZREG (.TST_PAT, .REG_SEL, index);

CLRCDATA= (.HI) or (.IGNORE);

2;3;

RD_REG (.CLR_DATA, .REG_SEL, ERR_FLG);

6711 ;

4329

it .ERR_FLG IS_SET

6;13 ;

2%%;

6715 ;

4333

6718 ;
6719 :

4336
4337

6722

4340

6712 ;
6714

;

6716 ;
6717 ;
6720 :
6721 ;
6723 ;

2%52

4330

4334
4335

4338
4339
4341

6724 ;
6725 :

4342
4343

6727 ;

4345

6729 ;

6347

6726 ;

6728 ;

6730 ;

4344

'WRITE REGISTER WITH BACKGROUND

'CALCULATE THE CLEARED DATA PATTERN

then

.Ox 10 CLE/R THESE REG'S HERE

begin
CLR_MBUS;

g;?g ;

'TEST THIRTEEN REGISTERS

it (,REG_SEL neq 7) and (.REG_SEL neq B) and (.REG_SEL neg 9)

else

6;82 :

ICLR DATA FOR MLPD IS ONES

'BACKGROUND PATTERN

incr TWICE ¢rom 0 to 1 do

then

TOPS-20 Bliss-16 v2(206)

PA:<NEALE>BL2ML4L.BLI.2 (&8)

'TEST PATTERN

ERRCFLG,
index,
CLR _DATA,
SAVE,

4323
«324

6706 ;

SEQ 0159

end

REG_INIT_FLG = ONE;
-

LET READ REG ROUTINE CLEAR THE REMAINING REG'S
'READ THE REGISTER FOR THE CLEARED DATA PAT
'SEE IF READ FOUND AN ERROR

begin

'If ERROR FLAG IS_SET THEN ERROR AND SET DODU_FLG

selectone .REG_SEL of

'FIND WHICH MODULE FAILED

set

o, 1, 2, 3,12, 13) :
ERRDF (6, ASYNC, 0);
(4, 5, 1)

'ASYNC MODULE FAILURE

ERRDF (6, SYNC, 0);

'SYNC MODULE FAILURE

[6 to 10] :
ERRDF (6, ARR_DAT, 0);

'ARRAY DATA MODULE

tes;

6346

PRINTB (SIX_FMT,

4348

DODU_FLG = ONE;

PHR &, WRD_12, WRD_52, WRD 23, WRD 52, WRD_56);

PRINTB (FMTT16, .ML REG .index, REGISTER_ABD), .CLR DATA TRD_DATA);

CIMLAAD ML-11

HARDWAPD TEST

6732 ;ML
6733
6734
6735
6736
6737
6738
6739
6740
6761
6742
6743
6744
6745

6746
6747
6748
6749
6750
6751
6752
6753
6754
6755
6756
6757
6758 ;
6759 ;
6760 ;
6761

;

6762 ;
6763 ;

664

;

6765 ;
6769
6773 023476
6774 023502

6775 023506
6776 023514
6777 023520
6778 023522
6779 023526
678C 023530
6781 023532
6782 023534
6783 023542
6784 023546
6785 023552

LOGIC

MACRO M1113

TEST

SECTION

23-0CT-80 09:11

PAGE

E_13
172

SEQ 0160
44
:32

4349
4350
4351
4352
4353
4354
4355
4356
4357
4358
4359
4360
4361
4362
4363
4364
(365
4366
4367
4368
4369
4370
L3N
4372
4373
4374
4375
6376
4377
4378
4379

006167

162706

012767
005067
005005
012702
005001
005004

104402
152777

016703
042703

142777

TOPS~-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (48)

end,;

ENDSUB;
end;
TST_PAT
end;

ML_REG [19,
;

not

.REPEAT WITH COMPLIMENT BACKGROUND PAT

.TST_PAT;

FORCE_WI] = ZEROES;

'RESTORE MLPD

FORCED_HI

NOW TEST THE DRIVE TYPE REGISTER

;
if .MLDT neq
then
be in

.DRIVE_TYPE

'COMPARE

ERgDF (113, ASYNC, 0);
PRINTB

(TWO_FMT,

PRINTB (FMT_2,
end;
if

.DODU_FLG

then

REG_7,

REG CONTENTS

TO CALCULATED VALUE

PHR_4);

.DRIVE_TYPE,

.SAVE);
.DRGP THIS UNIT

IS_SE

DODU_FLG IS_SET

begin
DODU (.ML_LUN);

DOCLN;
end;

ENDTST;

16035¢
000006

177777
166156

$715:
166416

177777

000040

166422
177770

000007

JSR
SuB

R1,$SAVES
#6,5P

CLR
CLR

ggG.INIT.FLG

MOV

CLR
CLR

#-1.R2
R1
R4

B1SB

#40,aM
. REG+40
L

MOV

166176
166160

TRAP

MOV

BIC
BI(B

ML.DUT,R3

017777083

#7,aML .KEG+40

6242

DODU.FLG

v, IST.PAT
TWICE
REG. SEL

4304
4305
4306
4307
4309
4312
6313
4314

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

6787
6788
6789
6790
6791
6792
6793
6794
6795
6796
5797
6798
6799
6800
6801

6802
6803
6804
6805
6806
6807
6808
6809
6810
6811
6812
6813
6814
6815
6816
6817
6818

6819 023722
6820 023726
6821 023730
6822 023734
6823 023742
6824 023744
6825 023746
6826 023750
6827 023754
6828 023756
6829 023762
6830 023764
6831 023770
6832 023772
6833 023774
6834 023776
6835 024000
6836 024002
6837 024004

6838 024010
6839 024012
6840 024016
6841 024020

23-0CT-80 09:11

F_13
PAGE 173

SEQ 0161
1L7:464
:45:3%2

JMLG
.

150377

010246
010446
012746
060616
004767
016600
006300
006300
006300
010003
016300
056300
010066
020427
001423
020427
001420
020427
001415

152777

016700
042700
142777
150077

000403

012767

016516
010446
012746
060616
004767
026627
001112
005704
002403
020427
003406
020427
002410
020427
003005
104455
000006
007444
000000
000430
020427
002403
020427
003403
020427

166154

B1SB

MOV
MOV
MOV
ADD

000012

JSR

174020

000012

MOV
ASL
ASL
ASL
MOV
MOV
BIS

011702
011766
000006

MoV

000007

cMP
BEQ
CMP

000010

000001
000006

cmMp
BEQ
BISB

166056

MOV

166040

165762

3%:

000014
174254

000014

5%:

6%:

7%:

000005

000013

MoV
MOV
MOV
ADD

BLT

000015

000004

BIC
BICB
BISB
BR
MOV

JSR
CMP
BNE
TST

000001

000003
000014

RG = (SP)

,
:

¢
T1ST. PAT
REG. SEL,*

SP, (SP)

;

INDE X,¢

12(SP) .RO
RO

;

INDE X,*

0125,-(SP)
PC WRT.REG

8%:

CMP
BLE
CMP
BLT
CMP
BGT

RO,R3
ML.REG*2(R3),R0
ML.REG+6(R3)
RO
RO,6(SP)
. #7
RG

: «,CLR.DATA
:

REG. SEL,*

;

REG. SEL.,*

;

REG. SEL,

4317

4319

4321

¥40,aML
. REG+40
ML.OUT,RO

177770,
R0

#7.,3ML .REG+40
gg,anL.REGoao

4319

¥ ,REG.INIT.FLG
6(SP),(SP)
k&4 ,-(SP)
Nna,-(Sp)
SP,(SP)
PC,RD.REG
. 1N
14(sP)

129

* CLR. DATA,»
.

REG. SEL,*

;

ERR. FLG,*

;

ERR. FLG,*

; REG. SEL
;

REG. SEL,*

;

REG. SEL,*

6325

6327

4329

4333

;. REG. SEL,
4337

TRAP

.WORD
.WORD
.WORD
BR
(mP
8L
CMpP
BLE
P

6316

RO
RO

BEQ

000011
000040
166392
177770
000007
166034

R3,aML .REG*40
R2.=(SP)

10PS
PA:<¢

£333
LSEL,®
.SEL,
¢
LSEL,®

CIMLAAD ML=-11 LOGIC TEST
SECTION

6893 024240
6894 024246
6895 024250
6896 024252
6897 024254

613
174

SEQ 0162
H Y

003004

000006

000012

104467

003772
005102
005201
020127
003002
000167
005067
027767
001431
104455
000161
007444

BLT

006454
006420
006076
006420
005760
006630
005632
000007

11%:

MOV

MOV
MoV
MOV

MOV
MOV

MOV
TRAP
MOV

12%:

ARR .DAT

MOV
MOV
MOV
TRAP

030001
000030
000012

4333
REG.SEL,*

.WORD
.WORD

MOV
MOV
MOV
MoV
MOV

165536
000032
011700
005154
000004

4340

BGT

TRAP
.WORD

007534

006000
103002
000167
005204
020427

.WORD
.WORD
.WORD

(Mp

104455
000006

000000
012746
012746
012746
012746
012746
012746
012746
012746
010600
104414
016716
016646
016346
012746
012746
010600
106414
012705
062706
062706

TRAP

~no

10%:

BNE

ADD
ADD
TRAP

TOPS

PA:<

«>

001005
104455
000006
007500
000000
000412
020427
002407
020427

:32

=2V =ONOWN—
<
o

6846 024024
024026
6848 024030
6849 024032
6850 024034
6851 024036
6852 024040
6853 024044
6854 024046
6855 024052
6856 024054
6857 024056
6858 024060
6859 024062
6860 024064
6861 024070
6862 024074
6863 024100
6864 024104
6865 024110
6866 024114
6867 024120
6868 0246124
6869 024126
6870 024130
6871 024134
6872 024140
6873 024144
6874 024150
6875 026154
6876 024156
6877 024160
6878 024164
6879 024170
6880 024174
6881 024176
6882 024200
6883 024202
6384 024206
6885 024210
6886 024214
6887 024216
6888 024220
6889 024222
6890 024226
6891 024230
6892 024234

68L7

PAGE

JMLG

6843
6844
6845

NS
s
LA
[~ 2
=
=
1
[e

TEST

23-0CT1-80 09:1°

OWNo

HARDWARD

MACRO Mi113

REG.SEL
,*

6343

4346

#WRD.56,~(5P)
#WRD.52,-(5P)
#WRD.23,-(SP)
#WRD.52,-(SP)
#WRD
. 12,-(5P)

#PHR
.4, - (SP)
#SIX.FMT,-(SP)

#7,-(SP)
SP,RQ
14
RD.DATA, (SP)

32(SP),-(SP)

ML.REG(R3),-(5P)
#EMT
. 16,-(SP)
#4,-(SP)

SP,RO

14
#1,RS
#30,SP
#12,5pP

5P,*
6347

CLR.DATA,*

SP,e

*,DODU.FLG

4348
633
4313
4349

REG. SEL
REG.SEL,*

6312

TST.PAT
TWICE
TWICE,»

6354
4309

ROR

177324

13%:
14%:

000015

000001
177274
165672
165564

165426

15%:

BHIS
JMP
INC
cmp
BLE
COM
INC
(MP
BGT
JMP
CLR
CMP
BEQ

TRAP

.WORD
.WORD

ML.REG#+232

aML .REG+130 ,DRIVE.TYPE
16%

55
161

ASYNC

4357
4364
4367

SECTION

6945
6946
6947
6952

024354
024354
024360
024362
024364
024366

2 O
*» L
oo

~N~

MOV
MOV
MoV
MOV

165362

004224
000003
000016

)

16%:

165624

000207

000006

17%:
.

;

004767

106466

177116

Mov
MCv

ADD

DEC
BNE
MOV

TRAP
TRAP

ADD

RTS

Routine Size:

Maximum stack

JSR

TRAP
ROR

006000
103773
000207

BLO
RTS

;
4380

MOV
TRAP
(0]
MOV
MOV
“RAP

—

6939
6940
6941
9942
6943
6944

SEQ 0163
7:44
:45:32

.WORD

006630
007350
005356
000003

oo \N

6935

H 13
PAGE 175

MLS

) e e ed b

6899
6900
6901
6902 024256
6903 026260
6904 024264
6905 024270
6906 024274
6907 024300
6908 024302
6909 024304
6910 024306
6911 024312
6912 024316
6913 024322
6914 024324
6915 024326
6916 024332
6917 024334
6918 024336
6919 024342
6920 024344
6921 024346
6922 024352
6923
6924
6925
6930
6931

HARDWARD TEST

23-0(T-80 09:11

MACRO M1113

CZMLAAD ML-11 LOGIC TEST

>
'<BLF/PAGE

;

TOPS
PA:<

4368

#PHR
.4, = (SP)
#REG.7,-(SP)
#TWO.FMT,=(SP)

#3,-(sP)

SP,*

SP,RO

14
R&, (SP)
DRIVE.TYPE ,=-(SP)
#EMT,2,-(SP)
#3,-(SP)

;

SAVE,*

4369

SP,*

SP,RO
14

#6,5P
RS
17%
ML.LUN,RO

. DODU.FLG

4366
4372

4375

6242

#6,SP

215 words
depth per invocation:

26 words

6377

PC,$TS
66

RO
1%
PC

6 words
Routine Size:
Maximum stack depth per

invocation:

0 words

CZMLAAD ML-11 LOGIC

7001
7002
7003
7004

7005
7006
7007
7008

R
O
R
R
A
A
PO
IR IPEE
IR T
TR
WP S
S
YR
YO
Y
Y
YO
TP
TIE WA
R
IR

IR EE
M E T EYTE YRR TR R
R PE
TN R L PEC

7000

6995
6996
6997
6998
6999

6960
6961
6962
6963
6964
6965
6966
6967
6968
6969
6970
6971
6972
6973
6974
6975
6976
6977
6978
6979
6980
6981
6982
6983
6984
6985
6v86
6987
6988
6989
6990
69N
6992
6993
6994

6954 JMLG
6955 ;
6956
6957
6958
6959

SECTION

23-0CT-80 09:11

PAGE

113

176

SEQ 0164
TOPS=20 Bl4ss=16 v2(206)
PA:<NEALE>BLZ2MLL.BLI.2 (49)

4381
4382
4383
4384
4385
4386
4387
4388
4189
4390
LIN
4392
4393
4394
4395
4396
4397
4398
4399
4400
44601
4402
4403
4404
4405
4406
4407
4408
4609
4610
46N
L4172
4413
L4114
4415

4416

44617
4418
4419
4420
4421
4422
4423
4424
4425
4426
4427
4428
4429
4430
4431
4632

]

;

BGNTST;
Yes

TEST

NUMBER:

| TEST NAME:
P el§

HARDWARD TEST

MACRO M1113

TEST

TST 6

TEST DESCRIPTION:

THIS TEST

TESTS FOR UNIQUE REGISTER

SELECTION BY FIRST WRITING A BACKGROUND
PATTERN INTO ALL READ/WRITE REGISTERS

IT THEN WRITES A COMPL IMENT
BACKGROUND PATTERN INTO ONE REGISTER

AND READS THE REMAINING UNWRITTEN
REGISTERS FOR AN UNCHANGED BACKGROUND
PAT

.
:
!
;

THIS PROTEDURE 1S REPEATED UNTIL ALL
REGISTERS HAVE BEEN WRITTEN WITH A
COMPL IMENT BACKGROUND PATTERN.
IMPLICIT

INPUTS:

NONE

low

local
DODU FLG,

'DROP UNIT FLAG
.TEST PATTERN

TST_PAT,

'ERROR FLAG PASSED 70 ROUTINE;

ERR_FLG,
index;

'POINTS TO REGISTER PRESENTLY BEING TESTED.

BGNSUB;
CLR_MBUS;

0000 FLG = ZERO;

TST_PAT = %o'125252';

'LOAD TST PAT WITH ALTERNATE 1'S & 0°S

WRT_ER (.TST_PAT, 6);

'ACCESSABLE READ WRITE REGISTERS

WRTZCS1

(.TST_PAT, 0);

WRTZDA
WRT_PA
WRTZE1
WRTZE2

(.TST_PAT, 3);
(.TST_PAT, 8);
(.TST_PAT, 13);
(.TST_PAT, 14)

incr CNT_1 from O to & do
begin
TST_PAT = not .TST_PAT;

case .(NT_1

from O to 4 of

'WRITE A BACKGROUND INTO ALL THE DIRECTLY

'WRITE A COMPLIMENT PATTERN INTO ONE REGISTER
'GENERATE THE COMPLIMENT PAT

'SELECT THE REGISTER TO WRITE

INTO

CIMLAAD ML-11 LOGIC

HARDWARD TEST

TEST

SECTION

MACRO M1113

23-0(T=-80 09:11

J 13

PAGE 177

7010 ;MLS

22-0¢t=1980 10:47:44

;8}; :

4433
44634

7016
7017
7018
7019

;
;
;
;

4436
Wa37
4438
4439

7021
7022
7023
70264
7025
7026
7027

;
.
;
;
;
;
;

L4
4442
4443
LLG44
4445
4446
4447

(2]

7029 ;
7030 ;
;8§} ;

4449
4450
422;

tes;

7033
7034
7035
7036
7037
7038
7039
7040

(453
4454
4455
6456
4457
4458
4459
4469

7020

;

7028 ;

7041

;
;
;
;
;
;
;
;

062 :
7043 ;
7044
7045

7046
7047
7048
7049
J050
7051
7052
7053
7056

7055

7056
7057
7058
7059
7060
7061
7062
7063
7064

:
;

;
:
;
;
;

;
;
;
;
;
;
;
;
;
;

;
;
;

TOPS=20 Bliss=16 v2(206)

22-0ct=-1980 10:465:32

7013 ;
7014 ;

7018 ;

SEQ 0165

44635

L6440

LL4L8

4461

4462
0463
4464
4465
4466
4467
4468
4469
4470
447

4472
4473
4474
4475
4476
4477
4478
4479
4480
4481

4482
4483
L4846

PA:<NEALE>BL2ML4L.BLI.2 (49)

set

(0l
1]

3]
(4]

TST_PAT

WRT_CSY1

(.TST_PAT

WRT_EP
:
WRT_DA

WRT_PA
:

WRT_ET1
= not

'FIRST PASS WRITE

(.TST_PAT,

6);

'SECOND PASS WRITE

(.TST_PAT,

3);

‘THIRD PASS WRITE

COMP PAT

TQ MLDA

(.TST_PAT,

8);

'FORTH PASS WRITE

(OMP PAT

TQ MLPA

(.TST_PAT,

13);

'FIFTH PASS WRITE COMP PAT TO MLE1

.TST_PAT;

incr (NT_2 from
begin
case

0);

.(NT_2
set

.(NT_1

' COMPL IMENT

to 5 do

.SELECT

THE

:
RD_CS1

:
RD_ER

(.TST_PAT,

index = 6,

ERR_FLG).

'READ MLER

:
RD_DA (.TST_PAT,

index = 3,

ERR_FLG);

'READ MLDA

£33

:
RD_PA

(.TST_PAT,

index

ERR_FLG);

'READ MLPA

(.TST_PAT,

index = 13, ERR_FLG);

'READ MLE1

RD_E2 (.TST_PAT,

index = 14, ERR_FIG);

!READ MLE?

(51
tes;

RD_E1
:

if _ERR_FLG IS_SET
then
_
begin
selectone .(NT_?2 of
set

COMP PAT

TST_PAT BACK

{0]

index

TO ML(ST
TO MLER

TO BACKGROUND

.NOW READ THE REMAINING UNWRITTEN REGISTERS FOR AN
.UNCHANGED BACKGROUND

from 0 to 5 of

(.TST_PAT,

(COMP PAT

= 0,

= 8,

ERR_FLG);

'SEE

TQ READ

'READ ML(S!

READ FOUND AN ERROR

CIMLAAO ML-11

HARDWARD TEST

MACRO M1113

LOGIC TEST
SECTION

K 13
PAGE 178

23-0(T=-80 09:11

22-0ct -1980 10:¢ 7:44
22-0ct=1980 10:¢6 5:32

7066 JMLS

7067
7068
7069
7070
0on
7072
7073
7074
7075
7076
7077
7078
7079
7080
7081
7082
7083
7084
7085
7086 .
7087
7088
7089
7090
7091 ;

7092

b
e

)

i
il

e
—

—r el

NNNNNN

OWNON
NS W

7093 :
7094 :
7098
7102 024370
7103 024374
7104 024376
7105 024400
7106 0244006
7107 024412
7108 024416
7109 024424
7110 024430
7111 024432
7112 024436
71
024440

024442
024446
024450
024454
024460
0246462

SEQ 0166

4485
L4686

L4LB7
4488
4439

4490
L4691

6502
4503
4504
4505
4506

4507
4508
4509
4510

004167
005746

104402
152777

016703
042703
1462777
150377

005005
012704
010446
005046
004767
010416
012746
004767
010416
012746

(3 to 5
ERRDF

'ARRAY

(110 ARR_DAT, 0);

PRINTB (THR_FMT, WRD 38, wRD_37, WRD _1]);

PRINTB (FMTT16,

DATA MODULE FAILURE

DODU_FLG= ONE;

.ML _Rec

(. index, REGISTER_ADDJ,

.WT_DATA,

.RD_DATA);

end;

4496
4497

4499
4500
&50

*ASYNC MODULE FAILURE

tes;

4492
4493
4494
4495
4498

(0 to 2] :
ERRDF (110, ASYNC, 0);

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (49)

end;

ENDSUB;
it .DODU_FLG
then

‘DROP THIS UNIT IF DODU_FLG IS_SET

IS_SET

begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

157464

000040
165556
177770
000007
165310
125252
*

167526
000006
167672

000003

165332

165314

$76:

JSR

R1,$SAVES

4379

1%:

TRAP

44615
7
L6

TST

BISB
MOV
BIC
BI(CB
BlgB

-(SP)

#40,aML.REG+40
ML.DUT,R3
#177770,R3
#7,3ML .REG+40
SE,BHL.REG*AO

]

MOV
MOV

#-52526 ,Ré
R4 ,=-(SP)

JSR

PC,WRT.CSY

MOV
JSR

#6,-(SP)
PC,WRT.ER

MOV

#3,-(SP)

CLR

MOV

; DODU.FLG

4419
4420
4621

;
;

. PAT
v, IST
TST.PAT,«

R4, (SP)

TST.PAT,»

&k22

R4, (SP)

: T1ST.PAT,

4423

-(SP)

HARDWARD TEST

S ECTION

7121
7122
7123
7124 024466
7125 024472
7126 024474
7127 024500
7128 024504
7129 024506
7130 024512
7131 024516
7132 024520
7133 024524
7134 024530
7135 024532
7136 024534
7137 024536
7138 024540
7139 024544
7140 024546

7141
7142
7143
7144
7145
7146
7147
7148
7149
7150
7151

024550
024552
024554
024556
024560
024562
024566
024570
024572
024576
024602

7152 024604

(153 024606
7154 024612

7155 024616
7156 024620

7157 024622
7158 024626
7159 024632
7160 024634
7161 024636
7162 024642
7163 024646
7164 024650
7165 024652
7166 024654
7167 024656
7168 024660
7169 024664
7170 024666
7171 024670
7172 024672
7173 024674
7174 024676
7175 024700

23-0CT-80 09:11

L_13
PAGE 176

SEQ 0167

22-0ct-19 80 1
22-0ct-19 80 1

JMLG
004767
010416
012746
004767
010416
012746
004767
010416
012746
004767
005001
005104
010103
006303
066307

000012
000024
000040
000054
000070
010446
005046
004767
000427
010446
012746
004767
000421
010446
012746
004767

000413

010446

012746
004767
000405
010446
012746
004767
005104
010103
000576
010300
006300
066007
000014
000036

000062
000106
000132
000156
010446

JSR

170036

000010

MoV
MOV

000015

MOV
MOV

JSR

170360

JSR

170554

MOV
MOV
JSR

000016

170750

2%:
024544

4%:

167406

000006
167550

000003

5¢:

6%:

167712

000010
170232

000015
170424

024664

CLR

COM

MOV
ASL
ADD

.WORD
.WORD
.WORD
.WORD
.WORD
MOV
CLR
JSR
BR
MoV

MOV
JSR
BR
MoV
MOV

[=]e]

MACRO M1113

CIMLAAD ML-11 L 0GIC 1 EST

:47:44
:45:32

TOPS
PA:<

PC,WRT.DA
RG . (SP)

;

TST. PAT ,+

4624

PC,WRT.PA
RG . (SP)

;

,¢
TST. PAT

4425

;

TST. PAT

6426

;

CNT.

;

TST.

CNT,

4428
4430
4432

RG&,=(SP)
-($P)
PC.WR1.CS
9%
RG,=(SP)
26.=(5P)
PC.WRT.ER

;

¢
TST PAT

6636

;

,»
TST PAT

64632
4439

RG,=(SP)

;

,»
TST. PAT

4632
4662

;

,
TST. PAT

6432
L4645

;

,»
TST LPAT

64632
L4L4L8

TST. PAT

#10,-(sP)

#15,-(sP)
PCLWRT.EY

RG . (SP)
#1é,-(SP)

PC,WRT.E2
R1

;

3$(R3),PC

4$-3%

5$-3¢
6$-3%
78-3%
8%$-3%

#3.-(SP)

PC.WRT.DA

9%:

JSR
BR
MOV
MOV
JSR
BR
MOV
MOV
JSR
oM
MOV

;

CONT, 1,(NT.2

44651
64653

10%:

BR
MOV

;

CNT 2,

44656

o
IST, PAT

6469

7%:

8%:

11%:

12%:

9%
RG,-(SP)

#0,-(sP)

PC,WRT.PA

98
RG ,-(SP)

#15,-(sP)

PC.WRT.E1

ASL
ADD

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

MoV

LOG] c1 3
SECT ION

025040
025042
025044
025050
025052
025056
025060
025064
7221 025072
7222 025074

7226 025106
7227 025110
7228 025112

7229 025114
7230 025116
7231 025120

22-0ct-198 0
22-0ct-198 0

JMLG

020327
003005

13%:

000006

000030
167456

JSR

14%:

000003
000030
167610

15%:

000010

000030
170134
16%:

000015
170316

17%:

000016

000030
170512

000001

18%:

000003

MOV
MoV
MOV
MOV
ADD

#3.R2

R2.-($P)
#30,-(SP)
SP, (5P)

JSR
BR

Mov
MOV
MOV
MOV
ADD

JSR
CMpP
BNE
TST

Cmp

#30,-(5P)
SP, (SP)
PC.RD.E2
30(SP),#
218
R3
19%
R3,#2
19%
55
156

TST.PAT,«
*, INDEX
*
INDEX,

44656
4469

TST.PAT,«

¢, INDEX
INDEX,*

ERR.FLG,*
TST.PAT,*

R&,-(SP)

R2.<(SP)
#30,-(5P)
SP, (SP)
PC.RD.E1
18$
R4, -(SP)
#$6,R2
R2,=(SP)

L4656
LL66

ERR.FLG,*

18%
R&,=(SP)

0n5,R2

MOV

ERR.FLG,*

PC.RD.DA

MOV

4656
4463

*, INDEX
INDEX
,*

P, (SP)
PC.RD.ER

JSR
BR

CMp
BGT
TRAP
.WORD
.WORD
.WORD

19%:

R&,=(SP)

RG,=(SP)

INDEX

TST.PAT,«

26 .R?
R2,=(SP)
#30,-(SP)
18%

TOPS
PA:<

ERR.FLG,*

18$

R2,=(SP)
#30,-(SP)
P, (SP)
PC RD.PA
18$

BLT

000002

106455

000156
007444
000000
000412
020327

MOV
MOV
MoV
MOV
ADD
JSR

MoV
MOV
ADD

000030

MOV
Mov
Mov
MOV
ADD

- (SP)
#30,-(5P)
SP. (SP)
PC.RD.CS1

0: 47:44
0 :45:32

167324

MOV
ADD
JSR
BR

000030

CLR
CLR

LIPS

005002
005046
012746
060616
004767
000461
010446
012702
010246
012746
060616
004767
000447
010446
012702
010246
012746
060616
004767
000435
010446
012702
010246
012746
060616
004767
000423
010446
012702
010246
012746
060616
004767
000411
010446
012702
010246
012746
060616
004767
026627
001064
005703
002410

L4656
4472

+, INDEX
INDEX,
¢

: ERR.FLG,*
.

025010

025014
025016
025020
025024
025026
025032
025034

SEQ 0168

8w,

024764
024770
024772
024774
025000
025002
025006

M 13
PAGE 180

"
7178
7179
7180 024702
7181 024704
7182 024706
7183 024712
7184 024714
7185 024720
7186 024722
7187 024724
7188 024730
7189 024732
7190 024736
7191 024740
7192 024744
7193 024746
7194 024750
7195 024754
7196 024756
7197 024762

23-0(T-80 09:11

TST.PAT,¢

4456
L4475

+, INDEX
INDEX ,»

CZMLAAQ ML-11

HARDWARD TEST

MACRO M1113

ERR.FLG,*

L4678

CNT.2

4482

(NT.2,*
4486

ASYNC

0
20%
R3,#3

4482

CNT.2,¢

CIMLAAD ML-11

'HARDWARD TEST

LOGIC

TEST

MACRO M1113

SECTION

N 13

PAGE

181

SEQ 0169

7233

JMLG
002407
020327
003004

7249
7250
7251
7252
7253
7254
7255
7256
7257
7258
7259
7260
7261
7262
7263
7264

23-0(T-80 09:11

104455
000156
007534
000000
012746
012746
012746
012746
012746
010600
104414

025224
025230
025232
025234
025240
025244
025250

7265 025252

7266 0¢5256
7267 025260

7268 025264
7269 025266
7270 025270
7271 025274
7272 025276
7273 025302

016716
016746
010200
006300
006300
006300
016046
012746
012746
010600
104414
012705
062706
062706
005203
020327
003002
000167
022626
005201
020127
003002
000167
062706
104467
006000
103002

000167
005305
001004
016700
104451
104444

005726
000207

TOPS
PA:<

BLT

000005

(MP

BGT

TRAP

005740
006232
006242
005366
000004

208:

164472
164464

01170C
005154
000004

000001
000022
000006

c1$:

000005
177370

000016

177056

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MoV
MOv
ASL
ASL
ASL
MOV
Mov
MoV
MOV
TRAP
MOV
ADD
ADD
INC

(NT.2,¢

20%
55

4489

156

SRR.DAT

#WRD.10,-(SP)
#WRD
. 37,-(SP)
#WRD.38,-(SP)

4492

#THR.FMT,-(SP)

#4 ,-(SP)

SP,RO

SP,*

14
RD.DATA, (SP)
WT.DATA,=(SP)

6493

*
iNDEX,

RO
RO
ML.REG(RO) ,-(SP)
#FEMT.16,-(SP)
#4,-(SP)

SP,RO

SP,¢

14
¥ ,RS

¢, DODU.FLG

#22,SP

#6,SP

CMP

(NT.2
(NT.2,*

JMP
Cmp
INC
CMP

C(NT
(NT 1,2

BGT

23%:

000004
177230

.WORD
.WORD
.WORD

20$

R3,#5

BG6T

24%:

25%:

164636

26%:

JMP
ADD
TRAP
ROR

BHIS
JMP
DEC
BNE

MOV
TRAP
TRAP
TST
RTS

; Routine Size:
.

6494

4480
4454
4453

44629
4428

4415
4499

DODU.FLG

26%

4506

ML.LUN,RO

4379

(SP)+

244 word- .

Maximum stack depth per

4503

invocation:

28 words

HARDWARD

SECTION

N AN N N LN
NN BB
nNOOMSOO

[olelolelele]

7320 ;

004767
104466
006000

177024

16::

1%:

8 14

PAGE 182

SEQ 0170

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

000207

TRAP

RTS

:
;
5N

JSR

'<BLF/PAGE>

PC,8T6
66
RO
1%
PC

Routine Size:
6 words
Maximum stack depth per

invocation:

0 words

TOPS
PA:<

4508

23-0CT-80 09:11

ROR
BLO

103773

7319

MACRO M1113

TEST

JMLS

PORINIAININD
(S VIV
IV 1V

7289
7290
729
7296
7297
7301
7305
7306
7307
7308
7309
7310
7311
7312
7313
7318

TEST

LOGIC

CIMLAAD ML-11

MACRO M1113

CIMLAAQ ML-11 LOGIC TEST

HARDWARD TEST

SECTION

7322 .MLG
7323 ;
7324

7325

7326
7327
7328
7329
7330
7331
7332

7333
7334
7335
7336
7337
7338
7339
7340

73461

7342
7343
7344
7345
7346
7347
7348

;
;

;
;
;

7355
7356
7557

2-0ct-1980 10:45:32

4512

4513
4514
4515
4516
4517
4518
4519

]

BGNTST;
lee

i
i

TEST NUMBER:

ST 7

TEST NAME:

PRINT SERIAL NUMBER

|
!

TEST DESCRIPTION:
UPON A YES RESPONSE

]

;

;
;
;
:
;

4529
4530
4531
4532
4533
4534
4535

7361 025354
7362 025362
7363 029364
7364 025370
73€5 025374
7366 025400
7347 025402
7368 025404
7369 025410
7377
7378
7382
7386 025412
7387 025412
7388 025416
7389 025420
7390 025422
7391 025424

4528

4536
4537

026727
001012
017746
012746
012746
010600
104414
062706
000207

004767
104466
006000
103773

000207

TOPS=-20 Bliss=16 v2(206)

PA:<NEALE>BLZ2MLG.BLI.2 (50)

7349
7350 ;
7354

SEQ@ 0171
2-0ct=-1980 10:47:44

4520
4521
4522
4523
4524
4525
4526
4527

;
;
;
;
;
;

€ 14
PAGE 183

23-0CT-80 09:11

TO THE
SOF TWARE QUESTION °'PRINT SERIAL NO?'

PRINT OUT THE DRIVE UNDER TEST
SERIAL NUMBER.

IMPLICIT

INPUTS:

NONE

i
external

'LOCATION WHERE ANSWER TO SW QUESTION IS STORED

PRSN;

.PRSN IS_SET then PRINTB (FMT_3,

.MLSN);

'PRINT DRIVE SERIAL NO.

IF ANS IS VYES.

ENDTSTY;

154760

00001

$717:

164450
004312
000002
000006

177736

.GLOBL

PRSN

CMP
BNE

PRSN,
M
1%

MoV

ML .REG+140,-(SP)

MOV

SP,RO

MOV
[0}

TRAP

1%:

17::

1%:

4535

#EMT.3,-(SP)
#2.-(SP)
14

ADD

#6,5SP
PC

4510

JSR

PC,$17

4535

RTS

TRAP

ROR

BLO
RTS

CIMLAAD ML=-11

HARDWARD

TEST

O
T T T T N

N P

I R

R T R I I T T R T

R T

e T R P

TR R TN TR R

7397 JMLG
7398 ;
7399
7400
7401
74602
7403
74604
7405
7406
7407
7408
7409
7410
746411
7412
76413
7414
74615
7616
7617
7418
7419
7420
7621
74622
7423
74624
7425
7426
74627
7428
(629
7430
76431
7432
7433
7434
7435
7436
7437
7418
7439
7440
7441
7642
7443
74644
7645
7446
76447
7448
7449
7450
7451

LOGIC

MACRO M1113

TEST

SECTION

23-0(T-80 09:11

D 14
PAGE 184

SEQ 0172

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32
4539
4540
4541
4542
4543
4544
4545
4546
4547
4548
4549
4550
4551
4552
4553
4554
4555
4556
4557
4558
4559
4560

4561

4563
4564
4565
4566
4567
4568
4569
4570
4571
4572
457%
4574
4575
4576
4577
4578
4579
4580
4581
4582
4583
4584
4585
4586
4587
4588
4589
4590

TOPS=20 Bliss=16 V2(206)
PA:<NEALE>BL2ML4.BLI.2 (51)

BGNTST:
lee

TEST NUMBER:

| TEST NAME:

C-BUS PARITY TEST

]

'
!
!

TST 8

TEST DESCRIPTION:
TEST THE CONTROL BUS PARITY
DETECTION AND GENERATING BY:

WRITING BAD PARITY TO DEVICE

WRITING GOOD PARITY TO DEVICE

READING DEVICE AND TEST GOOD

!
!

AND TEST

AND

TEST

CPAR SET.

CPAR CLR.

PARITY GENERATION BY READING
MCPE CLR.

]

; IMPLICIT INPUTS:

NONE

e
local

SAVE .

' TEMPORARY SAVE LOCATION

.PAR_DIS I1S_NOT_SET

'SEE

begin

vs?_PAt = %0'125252";

'BEGIN IF PARITY IS ENABLE

incr TWICE from 1
begin
CLR_MBUS;

'REPEAT LOOP TWICE

TST_PAT;

then

'TEST PATTERN

to 2 do

IF PARITY IS DI3ABLED

"ALTERNATING 1, O PATTERN

PAT = ONE;
MLDA = .TST_PAT;

'GENERATE EVEN PARITY BY SETTING THE PAT BIT
'WRITE BAD PARITY ON CONTROL BUS

.CPAR IS_NOT_SET

'READ CPAR BIT SET

begin
ERRDF (7. ASYNC, 0

'ERROR [F NOT SET

then

PRINTB (THR_FMT, WRD_S, WRD_7, WRD_9);
end;

CLR_MBUS;
MLDK = _TST_PAT;

'CLEAR OUT PAT BIT
'WRITE ODD PARITY CONTROL BUS

CIZMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0(CT-80 09:11

PAGE 185

7453 ;MLG

22-0ct=1980 10:47:44

;222 :

4591
4592
4593
6594
4595
4596
4597
4598
4599

7466
7667
7468
7669
7470
7671
7472
7473
7676
7675
7676
7677
7478

;
;
;

;
;

4601
4602
4603
4604
4605
4606
4607
4608
4609
4610
4611
4612
4613

;
;
;

;

;4;8 :
;Lg;

;

i¢ CPAR IS_SET
*hen
begin
ERRDF (B, ASYNC,
PRINTB (THR_FMT,
end;

4212

else

156370
162672

7692 025440
7493 025444
7694 025450

012701
012702
152777

125252
000001
000040

7496 025462

042700

177770

7497 025466
7498 025474

016700

164506

142777
150077

000007
164240

7500 025506
7501 025512

010177
132777

164216
000010

7503 025522

104455

7499 025500

7502 025520

152777

001022

7504 025524

000007

7506 025530

000000

7505 025526

007444

'ERROR
WRD_9);

SET

LREAD A REGISTER FROM DUT

it .MCPE IS_SET
then
begin
ERRDF (9, ASYNC,
PRINTB (THR_FMT,
end;

'SEE

PRINTB

004167
005767

7495 025456

WRD_7,

CLEARED

0);
WRD_6, WRD_7,

.ERROR
WRD_8);

.TST_PAT*ONE;

GENERATED GOOD PARITY
IF

MCPE

[S_SET

'REPEAT WITH SHIFTED DATA

end

7489 025426
7490 025432

001171

0):
WRD_6,

PA:<NEALE>BL2MLGL.BLI.2 (51)

SAVE = .MLDA;

TST_PAT
end;

ENDTST;

7491 025436

'READ CPAR BIT

CLR_MBUS;

4600

4616

TOPS=20 Bliss=16 v2(206)

22-0ct=1980 10:45:32

7456
7457
7458
7459
7660 ;
7661
7462 ;
7463 ;
7664

7665 ;

SEQ 0173

000020

(TWO_FMT, WRD_7, WRD_S53);

$78:

164244

164232
164240

1%:

IF PARITY

IS DISABLED

JSR
ST

R1,$SAVE3
PAR.DIS

;
;

4537
4571

MOY
MOV
8158

#-52526,R1
" ,R2
#40,8ML .REG+40

; o+, TST.PAT
;o TWICE
;

4574
4576
6577

;

4579

;

4585

BNE

166262

.JUST PRINT MESSAGE

MOV

ML.DUT,RO

BICB
BISB

#7,3ML .REG+40
RO,aML .REG+40

BIC

B1S8

MOV
8118
BNE

TRAP

.WORD

11771776,
R0

#20,aML .REG+40

R1,8ML.REG+30
#10,9ML .REG+60
2%

55
7

ASYNC

: TST.PAT,e
;

4580
6582

CZMLAAD ML-11 LOGiC TEST

HARCWARD

7508
7509
7510

7511
7512
7513
7514
7515
7516
7517
7518
7519
7520
7521
7522
7523
7524
7525
7526
7527
7528
7529
7530
7531

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

F 14
186

SEQ 0174
22-0ct=-19 8 0 10: 47:44
22-0ct-19 8 0 10: 45:32

JMLG
025532
025536
025542
025546
025552
025556
025560
025562
025566
025574
025600
025604
025612
025616
025622
025630
025632
025634
025636
025640

005726
005676
005662
005366
000004

000012
000040

164370
177770

166144

000007

1646126

000010

166130

164122
166106

8158

MOV

BITB
BEQ

TRAP
.WORD
.WORD
.WORD

MOV
MOV
MoV
MOV
MOV
MOV

TRAP

000012
000040
164260
177770
000007

164016

020000

163740

164012
163776

ADD

BIC
BI(B
B1SB

005726
005676
005670
005366
C0C004

025642

7532 025646
7533 025652
7534 025656
7535 025662
7536 025666
7537 025670
7538 025672
7539 025676
(540 025704
7541 025710
7562 025714
7543 025722
7544 025726
7545 025732
7546 025740
7547 025742
7548 025744
75649 025746
7550 025750
7551 025752
7552 025756
7553 025762
7554 025766
7555 0257°°
7556 025770
7557 026000
7558 026002
7559 026006
7560 026010
7561 026012
7562 026016

MOV
MOV
MOV
MOv
MOV
MOV
TRAP

164034

3%:

ADD

8158

MOV

BIC
BI(8
8158

MOV

BIT
BEQ

TRAP

.WORD

-WORD

.WORD

005712
005676
005670
005366
000004

000012

003614

000002

4%:

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
ASL

INC
(MP
BLE

#WRD.9,

T10PS
PA:<

4586

- (SP)

#WRD.7.=(SP)
#WRD.S
.= (SP)

FTHR.EMT,=(SP)
06 ,=(SP)

SP RO

SP,e

14
#2,5p
#40.a
. REG+40
ML

4584
4587

ML.DUT,RO

2177770,
R0

#7,3ML .REG+4O
RO,aML .REG+40
R1,3ML.REG+30
glo,anL.RE6060

TST.PAT,»

4595

10
ASYNC

4596

#WRD.9,~(SP)
#WRD.7,~(SP)
#WRD
. 6,-(5P)
#THR
. FMT ,=(SP)
#6,-(SP)

SP,RO

14
#2,5P
#40.3ML
. REG+40
ML.DUT,RO

4590
4592

SP,»
459
4597

0177770,R0

#7.,3ML .REG+40
RO.3ML .REG+40

aML .REG+30,R3

* ,SAVE

#20000,3ML .REG

4600
4602

4605

0
#WURD.8,-(SP)
#WRD.7,-(SP)

4606

1
ASYNC

#WRD .6,-(SP)
#THR.FMT,=-(SP)
#6,-(SP)

SP,RO

14
12,sP
R
RZ
R2,#?2
1%

SP,»
TST.PAT
TWICE

TWICE,

4606
4609
4576

CIMLAAD ML-11 LOGIC

HARDWARD

7564
7565
7566
7567
7568
7569
7570
[#14!
7572
7573
7574
7575
7576
1577
7578
7583
7584
7588
7592
7593
7594
7595
7596
7597
7598
7599
7600
7605
7606
7607

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE

G 14
187

SEQ 0175

22-0 ct-1980 10 147:44
22-0 ct-1980 10 :65:32

sMLG

026020
026022
026026
026032
026036
026042
026044
026046
026052

0064¢6
005676
005356
000003

5%:

000010
;
;

026054
026054
026060
026062
026064
026066

004767

104466

177346

103773

Routine S<ze:

JSR
TRAP
ROR

RTS

;
4617

MOV
MOV
MOV
MOV
TRAP
ADD
RTS

B8LO

000207
;

;

MOV

Maximum stack

18::
1%:

006000

RTS

>
'<BLF/PAGE

TOPS
PA:<

45N
L6114

#WRD.53,-(SP)
#WRD.7,-(SP)

#TWO.FMT,=(SP)

23,-(SP)
SP,RO
14
#10,SP

4537

139 words
.
depth per invocation:

9 words

PC,$78
66
RO
1$

4614

Routine Size:
6 wcrds
Maximum stack depth per

SP'.

invocation:

0 words

MACRO M1113

CIMLAAD ML=-11 L 0GIC 1 gst
HARDWARD TEST S ECTION
7609 ;LG
7610 ;
7611
7612
7613 ;
7614 ;
7615
7616 ;
7617
7618 ;
7619 ;
7620 ;
7621 ;
7622 ;
7623 ;
.

[

4
[

[

7624
7625
7626

7627
7628

7629
7630
7631
7632

7633
7634
7635

7636

7637

7638
7639
7640
(641
7642
7643
7644
7645
7646
7647
7648
7649
7650
7651
7652
7653
7654
7655
7656
7657
7658
7659
7660
7661
7662
7663

;
;

[

;
;

[

.
;
;
;
;

[

.
.

[

;

[

;

[

;

;
;
;
;
;
;
;
;
;
;
;
;
;

[

4
[

.
[

;
;
;
;
;
;

[

’

LJ
[

[

4
.

;
;

]
.

;
.

[

23-0CT-80 09:11

PAGE

H 14
188

SEQ 0176

L618
4619
4620
6621
662°2

4623
4624
4625
1626
4627

4628
4629
4630
4631
4632
4633
4634
4635
4636
4637
4638
4639
4640
4641
4642

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (52)

BGNTST:
tee

TEST NUMBER:

' TEST NAME:
]

TEST

TST 9

MEMORY SIZING TE.LT

DESCRIPTION:

THIS TESTS THE ML11'S SIZING

LOGIC BY COMPARING THE
OPERATORS INPUTED NUMBER OF

;

i
i

ARRAYS

PRESENT TO THE ML11 SIZING
NUMBER OF ARRAYS PRESENT
THE DRIVE IS DROPPED ON DETECTED ERRORS.
IMPLICIT INPUTS:

OP_NUM_ARR:

LOADED "DURING INIT CODE AND

:
'

STORES OPERATORS INPUT
SOF TWARE QUESTION:

NUMBER OF

TO THE

ARRAYS PRESENT?

4643

4644
4645
4646
4647

4648
4649
4650
4651
4652
4653
4654
4655
4656
4657
4658
4659
4660
4661

4652
4663
4664
4665
4666

4667
4668
4669

local
DODU_FLG,

'DROP UNIJT

FLAG

BGNSUB;
CLR MBUS:

DODU_FLG = ZERO;
it

(.OP_NUM_ARR ¢ 1)

then

begin

ERRDF

neq

(10, ASYNC, 0);

.ML_NUM_ARR

PRINTB (TWO_FMT, FNC 1, WRD_14);

ISEE IF DRIVE SIZED SAME NO. OF ARRAYS #S UP [NPUTED
'IF NOT EQL THEN ERROR AND SET DODU_FLG

PRINTB (FMT-2, (.0P_RUM_ARRTM+ 1), ML_NUM_ARR);
DODU_FLG = DNE;

end;

ENDSUB;
it .DODU_FLG IS_SET
then

begin

DODU (.ML_LUN);

DOCLN;
end;

'DROP THIS UNIT

IF DODU_FLG jS_SET

CIMUAAOD ML-11

HARDWARD

TEST

LOGIC

TEST

MACRO M1113

SECTION

23-0(T7-80 09:11

PAGE

[ 14
189

Sea 0177

7665 sMLG

766¢
7667
7668 ;
7609 ;
7673
7677 026070

7678
7679
7680
7681
7682
7683

026074
026076
026104
026110
026114
026122
7684 026126
7685 026130
7686 026134
7687 026136
7688 026142
7689 026144
7690 026146
7691 026150
7692 026152
7693 026156
71694 026160
7695 026162
7696 026164
7637 026166
7698 026170
7699 026172
7700 026174
70 026200
7702 026204
({03 026210
7704 026214
7705 026216
7706 026220
7707 026224
7708 026226
7709 026230
7710 026232
7711 026234
7712 026240
7713 026242
7714 026246
7715 026250
7716 026254
717 026260
7718 026262

TAA

: 32
4670
671

ENDTST;

006167

155726

10440¢
152777
016701

042701

162777
150177
005002

016701
005201
017703
006203
006203
006203
000303
042703
010100
020003
001444

000040

163634

000007

163616

164060
177770

163612

162166

163656

177740

1046414

JSR

TRAP

8158

MOV

BIC
BICB
BISB
CLR
MOV
INC
MoV
ASP
ASR
ASR

SWAB
BIC

MoV

CMP
BEQ

104455
000012

007444
000000
012746
012746
012746
012746
010600
104414
017703
006203
006203
006203
000303
042703
010316
016746
005216
012746
012746
010600

$719:
1%:

TRAP

005774
006752
005356
009003
163574

177740
162054

004224

000003

.WORD
.WORD
.WORD

MoV
MoV
MOV
MoV
MOV
TRAP
MoV
ASR
ASR
ASR

LHL7
4649

#40,aML .REG+40
ML.DUT,RY

177770,
01

#7,aML .REG+40

:;.BHL.REGOaO
0?.NUH.ARR,R1

;

DODU.FLG

4651
4653

aML .REG+120,R3

R3
R3
R3
R3
#177740,R3
R1,R0
RO,R3
2%

4656

ASYNC

#WRD
.14 ,-(SP)
FENC.1,-(SP)
#TWG.FRT,=(SP)
#3,-(SP)

SP,RO
14

4657

SP,y
4658

aML.REG+120,R3

MoV
MoV

MOV
MOV
MOV
TRAP

NEMT
. 2,-(SP)
¥3,-(SP)
SP.RO
14

INC

6616

R1,$SAVE3
2

R3
R3
R3
R3
#1777640,R3
R3, (SP)
OP .NUM.ARR,-(SP)

SWAB
B1C

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (52)

(SP)

;

SP,e

MACRO M1113

0GIC TEST
HARDWARD TEST S ECTION

CIMLAAQ ML-11

23-0(T-80 09:11

d 14
PAGE 190

SEQ 0178

22=-0ct-1980 10: 47:44
22-0ct=-1980 10 :465:32

;MLS
026264
026270
026274
026276
026300
026302
026304
026306
026312
026314
026316

012702
062706
104467
006000
103€75

005302
001004
016700
104451
104444

000001
000016

2%:

MoV
ADD

1 ,R2
#16,SP

ROR

TRAP

BLO

DEC
BNE

163654

000207

3%:

MOV
TRAP
TRAP
RTS

*,D0DU.FLG

4659
4655
4660

DODU.FLG

6664

R2
b3 )

TOPS
PA:<

4667

ML .LUN,RO
51
44
PC

L616

; Routine Size:
76 words
_
: Maximum stack depth per invocation:

words

{

026320
026320
026324
026326
026330
026332

004767

104466
006000
103773
000207

177544

19::

19%:

;

JSR

4P(,$T9

RTS

TRAP
ROR
BLO

Routine Size:

4669

66
RO

1%
6 words

; Maximum stack depth per invocation:
4672

.<BLF/PAGE>

0 words

CIZMLAAD ML=-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0(CT-80 09:11

7767 ;MLG

22-0ct=1980 10:45:32

7770 ;
7771
7772 ;
777% ;
7774 ;
7775

4673
4674
4675
L676
LOTT
4678

!
!
BGNTST;

7777
7778
1779
7780
7781
7782

;
;
;
;
;

4L6B0
4681
L682
4683
L684
4685

'
!
'
!
!
.

7784
7785

;
;

L6877
4688

!
!

7783 ;

7786 ;
7787 ;
7788 ;
7789 ;
7790 ;
7791 ;
7792 ;

4679

4686

4689
4690
L691
4692
469%
L4694
4695

7793 .
7794 ;
7795 ;

4696
4697
4698

(199
7800
7801
7802

4702
4703
4704
4705

7796 ;
7797 :
7798

;
;
;
;

7803 ;
7804 ;
7805 ;
7806 ;

4699
4700
4701

4706
4707
4708

4709

7807 ;

4710

7810 ;
7811 ;

4713
4714

7808 ;
7809 ;

7812 ;

4711
4712

4716
4717

7816 ;
7817 ;

4719
4720

7818 ;
7819 ;
7820 ;
7821

'ee
! TEST NUMBER:
TEST NAME:

4718

4721
4722
(723
4724

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4L.BLI.2 (53

.
TST

NO=-0OP FUNCTION TEST

TEST DESCRIPTION:
TEST IF THE DRIVE CAN PERFORM
A NO OP FUNCTION WITH OQuUT

HANGING THE DRIVE.

A NO_OP FUNCTION IS WRITTEN
INTO MLCST.
THEN GO AND ERROR BITS ARE
CHECKED FOR CORRECT STATES.

!
!
!
!

THIS UNIT 1S DROPPED ON DETECTED
!
ERRORS.
!
! IMPLICIT INPUTS:
NONE
!
!
!'-Llocal
DODU_FLG,

'DROP UNIT FLAG

BGNSUB;

CLR_MBUS:

DODD FLG = ZERO;
MLCST = NOOP;
DELAY (ONE_US);

'DO A NOOP FUNCTION
'DELAY 1 US

'SEE

.GO IS_SET

then

IF GO STILL SET

begin

ERRDF (11, ASYNC, 0);
'ERROR AND SET DODU_FLG IF STILL SET
PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_2, WRD_19);

4715

7813 ;
7814 :

7815 ;

SEQ 0179
22-0ct=1980 10:47:44

;;gg ;

7776 ;

K 14

PAGE 19

DODU_FLG = DNE;

end;

_ILF

then

IS_SET

begin

'SEE

ILF

SET

ERRDF (12, ASYNC, 0);
'ERROR AND SET DODU_FLG IF SET
PRINTB (FIV_FMT, WRD_3, PHR_S, WRD_11, FNC_2, WRD_19);
DODU_FLG = ONE;
end;

CIMLAAO ML=-11

HARDWARD

TEST

LOGIC

MACRO M1113

SECTION

7823 ML
7824 ;
7825

7826
7827
7828
7829

7830
7831
7832
7833
7834
7835
7836
7837

CRUIRE

YRR YO

7838
7839
7840
7841
7842
7843
7844
7848
785¢ 026324

7853 026340
026342
026344
026352

TESTY

026356
026362
026370
026374
026376
026404
026410
026412
026416
026420
026422
026424
026426
026430
026432
026449
026442
026444
026446
026450

23-0CT-80 09:11

PAGE

L 14
192

.
4725
4726
4727
4728
4729
4730
73
4732
4733
4734
4735
4736
4737
4738
4739
4740
L7461
47462
4743

if .OPI
then

22-0ct=1980 10:467:44
22-0c¢t=1980 10:45:32
IS_SET

begin

ERRDF

(13, ASYNC, 0);

SET

.ERRO® AND SET DODU_FLG IFf

SET

ENDSUB;

.DODU_FLG IS_SET

then

.DROP THIS UNIT

begin
DODU (.ML_LUN);
DOCLN;
end;

‘

DODU_FLG IS_SET

ENDTST;

000040
163612

177770

000007
163344

000001

$710:

163366

1%:

2%:

38
(%

000001

163240

R1,$SAVE?

BISB

#40,3ML.REG+4O

TST
TRAP

5%:

-(SP)
2

MOV

ML.DUT R1

BICB

#7,3ML .REG+40

BISB
CLR
MOV

163274

153500

JSR

BIC

163350

001375
005300

104455
000013
007444
000000

CPI[

end;

152777
0156701
042701
1642777
150177
005002
012777
012700
001410
016701
001403
005016
005301

001430

DODU_FLG = ONE;

155446

000767
132777

.SEE

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL?ML4.BLI.2 (53)

PRINTB (FIV_FMT, WRD_4, PHR_S, WRD_11, FNC_2, WRD_19);

004167
005746
104402

SEu 0180

MOV

BEQ
MOV
BEQ
CLR

DEC

BNE
DEC
B8R

BIT8B
B8EQ

TRAP
.WORD
.WORD
.WORD

4671

;

4702
4704

;

77770,
R

R1,aML.REG+40
R2
#1,3ML.REG

#1,R0

5%
LSOLY,RT
4%
(SP)

R1
3%
RO
2%
#1,aML.REG
6%
55
13
ASYNC
O

;
:

DODU.FLG

;

*,38TMP1

;v ,88TMP?

4706
4707
4708

: $STMP
; $STMPI
:

$$TMP?
4710

473

CZMLAAO ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

7878

23-0(T-80 09:11

PAGE 193

JML&

22-0ct=1980 10:47:44

7881 026452

012746

006040

MOV

#WRD.19,-(SP)

7883 026462

012746

005750

MOV

#wRrD.11,-(sP)

012746
012746

005414
000006

7884 026466
7885 026472

7886 026476
7887 026502

012746

012746
012746

7888 026506 010600
7889 026510

104414

006766

7890 026512

012702

000001

7892 (26522

132777

000001

7891 026516

062706

7893 026530

001430

7895 026534
7896 026536
7897 026540

000014
007444
000000

7899 026546
7900 026552
7901 026556
7902 026562
7903 026566
7904 026572
7905 026576
7906 026600

012746
012746
012746
012746
012746
012746
010600
104414

7894 026532

7898 026542

7907 026602
7908 026606
7909 026612

/910 026620

7911 026622

7912 026624

000016

MOV
MOV

MOV

163230

6$:

012702
062706
032777

001430

000001
000016
020000

163140

7$:

104455

007444
000000

7916 026636

012746

4715

BITB

#1,3ML.REG+60

;

4718

BEQ

MOV
ADD
BIT
BEQ

7927 026704
7928 026706

006000
103615

7929 026710

005302

7931 026714

016700

7930 026712

7932 026720

001004

104451

000001
000016

8%:

#WRD.19,=-(SP)

;

4722

; *,DODU.FLG
;
;

4723
4720
4726

;

4729

;

4730

#ENC.2,=-(SP)

ROR
BLO
BNE

MOV

TRAP

; SP,*

”,R2
”6,SP
#20000, ML .REG+60

MOV

DEC

163246

4721

ASYNC
O

MOV
ADD
TRAP

4712

;

.MORD
MORD

MOV
MOV
MOV
MOV
MOV
TRAP

;

#ENC.2,-(SP)
MURD.11,-(SP)
#PHR.S,~(SP)
#URD.3,-(SP)
#FIV.FAT,=(SP)
#%,-(SP)
SP,RO
14

MOV

7924 026672 012702
7925 026676 062706
7926 026702 104467

MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP

7917 026642 012746 005750

006646
005654
005414
000006

716.5°P
14
ASYNC
O

MOV

012746
012746
012746
012746
010600
104414

MWORD
.WCD
MORD

006040

7918 026646
7919 026652
7920 026656
7921 026662
7922 026666
7923 026670

#EIV.FMT,=(SP)
#6,-(SP)

: *,DODU.FLG °

MWORD

006766

#PHR.2,~(SP)
#WRD.1,=(SP)

#,R2

ADD

TRAP

000015

4714

MOV

006766
005750
006646
005646
005414
000006

; SP,e

TRAP

012746 006040

#ENC.2,-(SP)

TOPS

PA:<

SP.RO

TRAP

104455

7913 026626
7914 026630

7915 026632

MOV

006560
005630

SEQ (0181

22-0ct=-1980 10:45:32

;

;333
7882 026456

#URD.19,-(SP)

#WRD.11,-(sP)

#PHR.S,=-(SP)
#WRD
.4, = (SP)
#EIV.FAT,=(SP)
#6,-(SP)
SP,RO
14

; SP.e

" R2.
#16,SP
67

: «,DODU.FLG
;
:

4731
4728
4732

:* DODU.FLG

4736

ML .LUN,RO

;

4739

RO
1$

CIMLAAQD ML-11

HARDWARD TEST

7934
7935
7936
1937
7938
7939
7940
7941
7942
7947
7948
7952
7956
7957
7958
7959
7960
7961
7962
7963
7964
7969
7970
7971

LOGIC

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE

N 14
194

SEQ 0182

sMLG
026722
026724
026726

106444

005726
000207

9s:
.
;

026730
026730
026734
026736
026740
026742

004767

104466

177400

103773

TRAP

TST
RTS

;

(SP)+
PC

JSR
TRAP
RIR

PC,$T10
66
RO

RTS

B8LD

000207

koutine Size:

'<BLF/PAGE>

4671

words

4761

6 words

; Maximum stack depth per invocation:

G764

TOPS.

PA:<

Routine Size:
126 words
Maximum stack depth per invocation:

T10::
1%:

006000

22-0 ct=-1980 10:47:44
22-0 ct=-1980 10:45:32

0 words

CIMLAAD ML-11

HARDWARD TEST

8002
8003
8004

8005
8006
8007
8008
8009
8010
8011
8012
8013
8014
8015
8016

8017
8018
8019

8020
8021
8022

8023

8024
8025
8026
8027

N
BBV
Ve
O
0.
T
B
B
WL
B
Ve
B
B
Ve
B
B
B
W
Ve
Ve
BB

7992
7993
7994
7995
7996
7997
7998
7999
8000
8001

7977
7978
7979
7980
7981
7982
7983
7984
7985
7986
7987
7988
7989
7990
79N

7973 JMLG
1974 ;
7975
7976

LOGIC

MACRO M1113

TEST

SECTION

23-0CT-80 09:11

B 15

PAGE 195

SEQ 0183

22-0ct=-1980 10:47:44
22-0ct=1980 10:45:32
4745
4746
4747
L748
4749
4750
475
4752
4753
L4754
4755
4756
4757
4758
L4759
4760
4761
L4762

4763
L4764
4765
4766
L4767
4768
4769

4770
N
L4772
4773
L774
4775
L4776
Wy
4778
4779
4780
4781
4782
4783
4784
4785
4786
4787
4788
4789
4790
&N
4792
4793
4794
4795
4796

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (54)

;

BGNTST;
lee

TEST NUMBER:

g TEST NAME:

TST

WRITE CHECK FUNCTION TEST

§ TEST DESCRIPTION:

TEST IF THE DRIVE CAN PERFORM

HANGING THE DRIVE
S

A WRITE CHECK FUNCTION IS WRITTEN

A WRITE CHECK FUNGTION WITHOUT

!
|

!
!
!

INTO MLCST.
THEN GO AND ERROR BITS ARE
CHECKED FOR CORRECT STATES

THIS UNIT IS DROPPED ON DETECTED

ERRORS.

]

g IMPLICIT INPUTS:

NONE

;

e
local

DODU_FLG;

.DROP UNIT FLAG

BGNSUB;
CLR _MBUS:

0000 FLG = ZERO;
FIRSY_BLK_XFER ();
MLCS1 = WRT_CHK;

'SET UP A FIRST BLK XFERR
'DO A WRITE CHECKX FUNCTION

it .GO I1S_NOT_SET

'SEE IF THE GO BIT GOT SET

then

begin

ERRDF (14, ASYNC, 0):
'ERROR IF NOT SET
PRINTB (FIV_FMT, WRD_1, PHR_1, WRD_12, FNC_4, WRD_19);

it .DRY IS_NOT_SET

then

begin

Eagor (15, ASYNC, 0);

1SEE If THE DRY IS SET WHILE GO IS CLEARED

'ERROR IF CLEARED

PRINTB (FIV_FMT, WRD 2, PHR_1, WRD_43, WRD_1, PHR_6);

end;

DODU_FLG = ONE;
end

'SET DODU_FLG

CIMLAAQ ML-11 L 06 )\ C TEST

HARDWARD

TEST

MACRO M1113

S EC 1 ION

23-0C7-80 09:11

4797
(798
4799
4800
4801

8067
8068
8069
8070
8071
8072
8073
8074
8075
8076
8077
8078
8079
8080
8081
8082
8083

ALPIR IR TR I
I
K TR
PETR

8064
8065
8066

T PETE I
P ETETETE

8063

Y WY SRR YR S

4802
4803
4804
4805
4806
4807
4808
4809
4810

8058
8059
8060
BU61
8062

SEQ 0184

TOPS=-20 Bliss=-16 v2(206)
PA:<NEALE>BLZ2MLL.BLI.2 (54)

22-0ct=1980 10:47:64
22-0ct=1980 10:465:32

8055
8056

¢ 15

PAGE 196

4811
4812
4813
4814
4815
4816
4817
4819
4817
482t
4821
482¢
4823
4824
4825
4826
4827
4828

L829

4830
4831
4832
4833
4834
4835
4836
4837
4838
4839
4840
4841
4842

else
if .DRY [S_SET
then
begin

IS SET

SO SEE

DRY

IS CLEARED

ERRDF (16, ASYNC, 0);
'"ERROR IF LRY ]S SET
PRINTB (FIV_FMT, WRD_2, PHR_2, WRD_43, WRD_1, PHR L);

DODU_FLG = ONE;
end;

it JILF IS_SET
then
begin

.SEE

PRINTS

FNC_4, WRD_19);

ERRDF

(17, ASYNC, 0);

(FIV_FMT, WRD_3, PHR_S, WRD_12,

DODU_FLG = ONE;

ILF

'ERROR If

SET

end;

it .OPl
then

IS_SET

begin
ERRDF (18, ASYNC, 0);
PRINTB (FIV_FMT, WRD_4,

DODU_FLG = ONE;

'SEE

PHR_S. WRD_12,

OP]

SET

'ERROR IF SET
FNC_4, WRD_19);

end;

DELAY
it

(FRTY_US);

.DRY

then

IS_NOT_SET

'WAIT FO XFERR TO COMPLTE
'SEE

DRY

IS SETS AFTER XFERR

begin

.GO IS_SET

then

begin

CLR_MBUS;
it .GO IS_SET then ERRDF

'IF DRY IS NOT SET THEN SEE

'IF

If GO IS SET

THE GO IS SET THEN TRY TO CLR GO

(19, ASYNC, 0) else ERRDF

(20, SYNC, 0):

"IF GO IS STILL SET THEN ASYNC FAILURF

PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_4, WRD_19)>
else

end

'ELSE SYNC MODLE FAILURE

begin

ERRDF (21, ASYNC, 0);
'ERROR GO AND DRY BCTH CLEARED
.
PRINTB (FIV_FMT, WRD_2, PHR_1, WRD_11, FNC_4, WRD_19);

48/3

4844
4845
(B4
4847
4848

'THE

end;

DODU_FLG = ONE;
end,

it .GO IS_SET

'SET THE DODU_FLG

'SEE IF THE GO IS STILL SET

CZMLAAD ML=-11 LOGIC TEST

HARDWARD TEST

SECTION

oD
o
D e
od
D e
—

026744
026750
026752
026754

026762
026766
026772

027000
027004
027006

027012
027020
027026
027030
027032
027034
027036
027040
027044
027050
027054
027060

n27064
8 27070

—
b —

ced s o op ==
(ST, 81,8 PINIA)
WS W NN=200m~NOW

8085 JML4
8086
8087
8088
8089
8090
8091
8092
8093
8094
8095
8096
8097
8098
8099
8100
810
8102
8103
8104 ;
8105 ;

0o
0o Oc 30 0o 00 00 Oo OO o 00

MACRO M1113

23-0CT-80 09:11

D 15
PAGE 197

SEQ 0185
147:4 4
:45:3 2

4LB4Y9
4850
4851
4852
4853
4854
4855
4856
4LR57
4858
4859
4860
4861
4862
4863
4864
4865
4866
4867
4868

004167
005746
104402
152777

016701
042701

142777
150177

005002
004767
012777
132777
001057
106455
000016
007444
000000

then

begin
CLR_MBUS;

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (54)

'TRY TO CLR GO IF STILL SET

it .60 IS_SET then ERRDF

(22, ASYNC, 0) else ERRDF

(23, SYNC, 0);

PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_4, WRD_19);

DODU_FLG = DNE;

'IF GO IS STILL SET THE ASYNC FAILUPR

.ELSE SYNC MODULE FAILURE

end,;

ENDSUB;
it .DODU_FLG
then

‘DROP THIS UNIT IF DODU_FLG IS_SET

IS_SET

begin
DODU (.ML_LUN);

DOCLN;
end;

ENDTST;

$T11:

155036

000040
163202

162756

000007

162740

177770

162734

163506
000051

000001

006040
007002
005760
006542
005630
005414
000006

162660

162652

1%:

JSR
TST
TRAP
8158
MOV
BIC
B81(8B
BISB
CLR
JSR
MOV

8118

BNE
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MoV
MOV
MOv
MOov
MOV

64743

R1,$SAVE?2
=(SP)

6774

776

. REG+40
#40,aML
ML.OUT,R1

0177770,
R

#7.,3ML.REG+40

g;.anL.Rfcoao

PC,FIRST.BLK.XFER
#51,aML .REG
#1,3ML .REG

; DODU.FLG

4778
L4779
4780
4782

2%
55

4785

FURD.19,-(SP)

L4786

16
Ssvuc
FENC .4, - (SP)

#URD.12,-(SP)

.1, = (SP)
FPHR
#URD.1.-(SP)
#EIV.FMT,=(SP)
46 ,-(SP)

CZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

8140
8141
8142
8143 027074
8144 027076
8145 027100
8146 027106
8147 027110
8148 027112
8149 027114
8150 027116
815 027120
8152 027124
8153 027130
8154 027134
8155 027140
8156 027144
8157 027150
8158 027154
8159 027156
8160 027160
027164
027166
027172
027174
027176
027200
027202

027204
027210
027214
027220
027224
027230
027234
027240
027242

23-0CT-80 09:11

E 15

PAGE 198

SEQ 0186
4 7:44

JMLG

4 5:32

010600

104414
132777

001056

104455
000017
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414

062706
000427
105777
100030

000200

MOV

?Z.RO

BITB
BNE

#200,3ML.REG+50

TRAP

162642

TRAP

.WORD
.WORD
.WORD

006660

MOV
MOV
MOV
MOV
Mov
MOV
MoV
Mov
TRAP
ADC

005630
006306
006542
005634
005414

000006
000016

2%:

162556

1046455
000020
007444

1STB

006646
005630
006306
006560
005634
005414
000006
000001
000016
000001

006040
007002
005760
006646
005646
005414
000006
000001

3%
162476

47N

6792

#PHR
.6, =~ (SP)
#WRD.1.-(SP)

#iRD.4S,-(5P)
#PHR.1.~(SP)

#URD.2.-(SP)

FEIV.FMT,=(SP)
26,-(SP)

SP,*

SP.RO
14

4790
4795
4799

#16,5P
3$

aML.REG+50

.WORD
.WORD
Mov

0
#PHR.S,=(SP)

MOV
TRAP
MOV

4788

3sv~c

BPL

MOV
MOV
MOV
MOV
MOV
MOV

SP,e

3%
55

TRAP
.WORD

TOPS
PA:<

4802

55
20

ASYNC

4803

#WRD .1 .- (SP)

#WRD .45, -(sP)

#PHR.2,-(SP)
#WRD
.2, =(SP)
FFIV.FMT,=(SP)
#6,-(SP)

SP,»

SP.RO

ADD

14
" ,R2
06,5p

TRAP
.WORD

55
21

4810

MoV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV

#WRL.19,-(SP)
PENC .4, ~(SP)

4811

Bl18
BEQ

.WORD
.WORD

*,DODU.FLG

ll.aHL.REG06O

4804
4801
4807

8svnc

#WRD.12,-(SP)

,
= (SP)
#PHR.S

#URD.3,-(SP)
FEIV.FRT,=(SP)
26.-(SP)

SP.RO
14
2 .R2

SP,»
4812

CIMLAAQ ML=11

HARDWARD

TEST

LOGIC

1EST

MACRO M1113

SECTION

8196

062706

8201 027352
8202 027354
8203 027356
8204 027360
8205 027362
8206 027364
8207 027370
8208 027374
8209 027400
8210 027404
8211 027410
8212 027414
8213 027420
8214 027422
8215 027424
8216 027430
8217 027434
8218 027440
8219 027442
8220 027446
8221 027450
8222 027452
8223 027454
8224 027456
8225 N7460
8226 .. 462

001430
104455
000022
007446
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414
012702
062706
012700
001410
016701
001403
005016
005301
001375
005300
000767
132777

000200

162260

132777

000001

162200

016701

152777

000040
162454

162230

142777
150177

000007
162206

162212

8228 027472
8229 027500
8230 027502
8231 027510

032777

001106

001452

8232 027514

042701

8235 027532
8236 027540
8237 027542
8238 027544
8239 027546
8240 027550
8241 027552
8242 027554
8243 027556
8244 027560
8245 027562

132777
001405
104455
000023
007444
000000
000404
104455
000024
007500
000000

8247 027570

012746
01 012746
012 7646
012746

8233 027520
8234 027526

8246 027564

8248 027574

8249 027600
8250 027604

F 15
199

SEQ 0187

22-0ct=1980 10:47:44

;

8199 027340

8227 027470

PAGE

MLG

g}gg

8200 027344

23-0(CT-80 09:11

012746

000016

020000

162406

5$:

006040
007002
005760
006646
005656
005414
000006
000001
000016
000050

6% :
7%

152450

8$:
9% :

177770

000001

10%:

007002

005750
006560

005630

ADD

06, 5P

BEQ
TRAP
.WORD
JWORD
WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD
MOV
BEQ
MOV
BEQ
CLR
DEC
BNE
DEC
BR
BITB

6$
55
22
ASYNC
0
#WRD.19,~(SP)
NENC.4,=(SP)
#WRD.12,-(SP)
#PHR.S,=(SP)
#WRD
.4 .= (SP)
NFIV.FMT,=(SP)
#o,-(SP)
SP.RO
14
01 ,R2
#16,5P
#50.R0
10
LSOLY,R
98
(SP)
R
8$
RO
7%
#200,3ML.REG+S0

BiT

BNE

162140

12%:

#20000,amML . REG+60

15%

BITB
BEQ
BISB
MOV

#1,aML.REG
13$
#40,aML.REG+40
ML.DUT,R1

BICB
BISB

#7,3ML.REG+40
R1,3ML.REG+40

BIC

118

006040

22-0ct=-1980 10:45:32

BITB
BEQ
TRAP
.MORD
WORD
WORD
BR
TRAP
.WORD
.WORD
WORD

MOV

Mov

TOPS

PA: <

;

4809

;

4818

;

4819

4815

;

SP,e

;
:
P

*,DODU.FLG

;

v,38TMPI

;
L

$$TMP
$STMP

$$TMP?

ov,$8TMP2

4820
4817
4823

;

4825

;

4829

;

4831

;

4834

;

4837

1177776,
01

#1.3ML.REG
11$
55
23
ASYNC
O
12%
S5
24
SYNC
0

#WRD.19,-(SP)
#FNC.4,=(SP)

#RD
11 ,-(sP)
#PHR
.2, = (SP)

#WRD.1,-(SP)

CIMLAAD ML-11

HARDWARD

8252
8253
8254
8255
8256
8257
8258
8259
8260
8261
8262
8263
8264
8265

TEST

LOGIC

MACRO M1113

TEST

SECTION

23-0CT-80 09:11

PAGE

6 15
200

SEQ 0188
22-0ct=1980 10:47:44
22-0ct-1980 10:465:32

MLG

005414
000006

027610
027614
027620
027622
027624
027626
027630
027632
027634
027636
027642
027646
027652
027656
027562
027666
027672
027674
027676
027702
027706
027714
027716
027724
027730

8266
8267
8268
8269
8270
8271
8272
8273
8274
8275
8276
8277
8278
8279
8280 027734
8281 027742
8282 027746
8283 027754
8¢84 027756
8285 027760
8286 027762
8287 027764
8288 027766
8289 027770
8290 027772
8291 027774
8292 027776
8293 030000
8294 030004
8295 030010
82v6 030014
8297 030020
8298 030024
8299 030030
8300 030034
8301 030036
8302 030040
8303 03C044
8304 030050
8305 030052
8306 030054

MOV
MOV
MOV
TRAP

13%:

000001
000016
000001

161764

000040

162014

14%:

SP,RO
14

;

SP,
4829
4841

TRAP

15%:

MOV
MoV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

8178
BEQ
BISB

MOV

¢00007

161776

000001

161724

161772

FEIV
FMT ,=(SP)
#6,-(SP)

.WORD
.WORD
.WORD

006040
007002
005750
006542
005634
(05414
000006

162240
177770

BIC

BI(B
BISB

BIT8
BEQ
TRAP

TOPS

PA:<

484/

#16,SP
#1,3ML.REG

;

SP,*

*,DODU.FLG

18%
#40,3ML
. REG+40
ML.DUT,R1

4845
4827
4848
4850

2177770,
m1

#7,aML .REG+40
R1.aML.REG+40

4853

#1.aML.REG
16%

.WORD
.WORD
.WORD

006040
007002
005750
006560

16%:

TRAP

17%:

MOV
MOV

005630
005414
000006
000001
000016

006000
103002

18%:

.WORD
.WORD
. WORD

Mov
MOV
Mov
MOV
MoV
Mov
TRAP
MOV
ADD
TRAP

ROR

BHIS

4855

#WRD.19,~(SP)
#ENC.4,-(SP)
#WRD.11,-(SP)
#PHR.2,-(SP)
#WRD
. 1,-(SF)
#FIV
. FAT,=(SP)

SP,

;

*,DODU.FLG

4856
4850
48%7

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

23-0(T-80 09:11

H 15
PAGE 201

SEQ 0189

22-0ct-19 80 1 0: L7:44
0:
22-0ct=19 80 1 :45:32

JMLG
030056
030062
030064
030066
030072
030074
030076
030100

000167
005302
001004
016700
104451
104444

176670

19%:

162074

20$:

005726
000207

;

JMP

Mov
TRAP

ML.LUN,RO
51

4864

1ST

(SP)+

4743

BNE

TRAP

RTS

Routine Size:

004767

104466

176636

i::

1%:

006000

20%

L4
PC

303 words

JSR
TRAP
ROR

PC,$T11
66
RO

RTS

8LO

103773
000207

Routine Size:

!<BLF/PAGE>

18 words

4866

6 words

; Maximum stack depth per invocation:
4869

4861

DEC

; Maximum stack depth per invocation:

030102
030102
030106
020110
030112
030114

: DODU.FLG

TOPS
PA:<

0 words

CIMLAAOD ML-11 LOGIC

HARDWARD TEST

Ve
s ®e Ve By Bs Ve Ve By BeBa Ve ®s %o 0 Ve Ve Do e V%o
B e
0,
0, T
%
00
Py
w,
0,
B,
%a

8395
8396
8397
8398
8399
8400
8401
8402
8403
8404
8405
8406

8359
8360
8361
8362
8363
8364
8365
8366
8367
8368
8369
8370
8371
8372
8373
8374
8375
8376
8377
8378
8379
8380
8381
8382
8383
8584
8385
8386
8387
8388
8389
8390
8391
8392
8393
8394

Wowe Ve P Vs B W VB W T VBtV v

Ve Ny B,

8352 sMLG
8353 ;
8354
8355
8356
8357
8358

TEST

MACRO m1113

SECTION

23-0(T1-80 09:11

115

PAGE 202

SEQ 0190

TOPS=-20 Bliss=16 v2(206)
PA:<CNEALE>BL2MLAL.BLI.2 (59)

22=0¢t=1980 10:47:44
22-0ct=1980 10:45-32
4870

487N
4872
4873
4874
4875
4876
L877
4LR78
4879
4880
4881
4882
4883
4884
4885
4886
4,887
4888
4,889
4890
4891
4892
4893
4894

BGNTST;

4896
4897
4898
4899
4900
4901
4902
4903
4904
4905
4906
4907
4908
4909
4910
49N
64912
4913
4914
4915
4916
917

then

4921

then

4895

4918
4919
4920

lee

;

TEST NUMBER:

§ TEST NAME:

TST

WPITE FUNCTION TEST

' TEST DESCRIPTION:
!

TEST 1F THE DRIVE CAN PERFORM A WRITE FUNCTION WITHOUT

HANGING

A WRITE FUNCTION IS WRITTEN INTO MLCS1.

THE

DRIVE.

CHECKED FOR CORRECT STATUS.

local

DODU_FLG;

THEN GO AND ERRCR BITS ARE

THIS UNIT IS DROPPED ON DETECTED ERRORS.

'DROP UNIT FLAG

BGNSUB;
CLR MBUS;

poDU _FLG = ZERO;
FIRST_BLK_XFER )

MLCST = write;

'SET UP A FIRST BLOCK XFERR
'DO A WRITE FUNCTION

if .GO IS_NOT_SET

'SEE IF THE GO [S SET

'ERROR IF NOT SET
begin
ERRDF (24, ASYNC, 0);
PRINTB (FIV_FMT, WRD_1, PHR_1, WRD_12, FNC_5, WRD_19);
it .DRY IS_NOT_SET

then

'SEE 1F DRY SET WITH GO CLEAR

begin

ERRDF (25, ASYMRT, 0);
PRINTB (FIV_FM1, WRD_2, PHR_1, WRD_43, WRD_1, PHR_6);
end;

DO%U_FLG = ONE;

else

'GO IS SET DURING FUNCTION

i; .DRY IS_SET
then

.SET DODU_FLG

.SEE IF DRY CLEAR WITw GO SET

'€RROR [F SET:
begin
ERRDF (26, ASYNC, 0);
PRINTB (FIV_FMT, WRD_Z2, PHR_2, WRu_43, WRD_1, PHR_S);

DODU_FLG = ONE;

end;

it ILF IS_SET

.DID FUNCTION CAUSE

JL¥

CIMLAAD ML-11

HARDWARD

TEST

8453
8454
8455
8456
8457
8458
8459
8460
8461
8462

TR
IRIR
TR
0w
v
%%
s
s

®o
0.0,
®s
0w,
0.
s
eV,
s
@4

T
EE
A P

8439

8440
8441
8442
8443
8444
8445
BL46K
8447
8448
B44S
8450
8451
8452

E TR TR TE TR R T

8435

8436
8437
8438

8419
8420
8421
8422
8423
8424
8425
8426
8427
8428
8429
8430
8431
8432
8433
8434

P TR

B4L*7
8418

8411
8412
8413
8414
8415
8416

84C8 JPLG
8409 ;
8410

LO G l C

MACRO M1113

TEST

St C T ION

23-0(T-80 09:°1

J 15

PAGE 203

SEQ 0191

0:47:44
22-0ct-1980 10:47:
22-0ct-1980 10:45:32
4922
4923
924
4925
4926
4927
4928
4929
4930
4931
4932
4933
4934
4935
4936
4937
4938
4939
4940
4941
4542
4943
4944
4945
4946
4947

4948
4949
4959
4951
4952
4953
4954
4955
4956
4957
4958
49
496
4961
4962
4963
4964
4965
4966
4967
4968
4969
4970
4971
4972
4973

begin

ERRDF (27, ASYNC, 0);
PRINTB (FIvV_FMT, WRD_3, PHR_S, WRD_12

DODU_FLG = ONE;

'ERROR [F

T0PS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4L.BLI.2 (5%)

YES

FN(C_S5, WRD_19);

end;

it OP1
then

[S_SET

'DID FUNCTION CAUSE OP!

begin
'ERROR IF YES
ERRDF (28, ASYNC, 0);
PRINTB (FIV_FMT, WRD_4, PHR_S, WRD_12, FNC_5, WRD_19);

DODU_FLG = ONE;

end;

DELA Y

(FRTY_US);

it . DRY [S_NOT_SET
then
begin

it .GO IS_SET

then

begin

CLR_MBUS;
it .G0 IS_SET then ERRDF

'WAIT FOR XFERR TO COMPLETE

'SEE IF DRY CLEARED AFTER XFERR

'TST GO CLR IF DRY NOT SET

.CLEAR GO [F STILL SET
(29, ASYNC, 0) else ERRDF

(30, SYN(C, 0);

'TST GO TO DETERMINE FAILI!!S MOD
PRéNYB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_S, WRD_19);

else

'DRY NOT SET AND GO CLEARED
'REPORT ERROR
begin
ERRDF (31, ASYNC, 0);
PRINTB (FIV_FMT, WRD 2, PHR_1, WRD_11, FNC_S, WRD_19);
end;

DODU_FLG = ONE:
end;
if . GO
then

IS_SET

begin

CLR_MBUS;

'SET DODU_FLG

'SEE IF GO CLEARED APTER XFERR.
'CLEAR GO IFf STILL SET

if .GO IS_SET then ERRDF (32, ASYNC, 0) else ERRDF (33, SYNC, O);
PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_S, WRD_19);

DogU-FLG = ONE;

end,

ENDS uB.

'TST GO TO DETERMINE FAILING MOD

CZMLAAO ML-11 LOGIC TEST

HARDWARD

TEST

8464 ;MLG
8465 ;
8466
8467 ;
8468 ;
8469 ;
B470 ;
8471 ;
8472 ;
8473 :
8474
B4L7S ;
8476 ;
8477 :
8478 ;
8479 ;
8480 ;
8481 ;
8482 ;
8486
8490 030116
8491 030122
8492 030124
8493 030126
8494 030134
8495 030140
8496 030144
8497 030152
8498 030156
8499 030160
8500 030164
8501 030172
8502 030200
8503 030202
8504 030204
8505 030206
8506 030210
8507 030212
8508 030216
8509 030222
8510 030226

8511 030232
12
13
14
15
16
17

030236
030242
030246
030250
030252
030260

MACRO M1113

SECTION

23-0CT-R0 09:11

PAGE

K 15
204

S2Q 0192

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32
4974
4975
4976
4977
4978
4979
4980
4981
4982
4983
4984
4985
4986
4987
4988
4,989

ENDTST;

004167

153664

005746
104402
152777
016701
042701
142777
150177
005002
004767
012777
132777

001057
104455
000030
007444
000000
012746
012746
012746
0
0

0O
O
0
104414
132777
001056

if .TRE IS_SET
then
begin

ERRDF

(1165,

'SEE

XFERR CAUSEC A TRANSFER ERROR

'REPORT ERROR

INTER 0);

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (595)

SET AND CONTINUE

TESTING

PRINTB (SIX FMT, WRD 61 WRD_20 , PHR_S, WRD_12, FNC_S, WRD_19);
DODU_FLG = ONE;

end;

.DODU_FLG

then

IS_SET

'DROP

THIS UNIT

DODU_FLG SET

begin
DOBU (.ML_LUN);

DOCLN:
end;

$T12.

000040
162030

161604

000007

167566

177770

161562
162334

000061
000001

161506
161500

1$:

JSR

ST
TRAP

#40,aML.REG+40
ML.DUT,R1 °

BICB

#7,aML.REG+40

BISB

MOV
BITB
BNE

#61,aML.REG
#1,3ML.REG
28

.WORD

005760

000200

MOV

#FNC.S,=(SP)

MOV
MOV
MOV
MOV
MOV

161470

TRAP

BITB
BNE

L8N
4892
4893
4895
4898

ASYNC
0

MOV

006542
005630
005414
000006

: DODU.FLG

PC,FIRST.BLK.XFER

.MORD
.MORD

MOV

007020

R1.aML.REG+40

JSR

4887
4889

177770, /1

CLR

TRAP

006040

-($P)
2

BISB
MOY

BIC

4868

R1,$SAVE2

#WRD. 19 -(SP)

4899

#WRD.12,-(SP)

#PHR.1,=(SP)
#WRD.1.-(SP)
SEIV.FAT,=(SP)
#6,-(SP)
SP,RO

;

#200,aML .REG+50
3s

SPLe
4901

‘

HARDWARD

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

L1 5
205

SEQ 0193

22-0ct=19 80
22-0ct-19 8¢

00 00 00 (0 00 O

AVILN

JMLS
1

2 030262
3 030264

VTNV

&
5
6
8527
8528
8529

030266
030270
030272
030276
030302
030306

8530 (30312
8531 030316
8532 030322
8533 030326
8534 030330
8535 030332
8536 030336
8537 030340
8528 030344
8539 030346
8540 030350
8541 030352
8542 030354
8543 030356
8544 030362
8545 030366
8546 030372
8547 030376
8548 030402
8549 030406

8550 030412

8551 030414
8552 030416
8553 030422
8554 030426
8555 030434
8556 030436
8557 030440
8558 030442
8559 030444
8560 030446
8561 030452
8562 030456
8563 030462
8564 030466
8565 020472
8566 030476
8567 030502
8568 030504
8569 030506
8570 030512
8571 030516
8572 030524
8573 030526

104455

000031
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414

062706
000427

105777
100030
104455

000032
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414
012702
062796
132777

001430

TRAP

.WORD
.WORD
.WORD

006660
005630

006306
006542
005634
005414
000006
000016
161404

2%:

000001
000016
000001

3%:

161324

4§:

104455
000033

000001
000016
020000

5§:

#PHR
.1, =(SP)
#WRD.2.=(SP)

#FIV.FNT
, =-(SP)

SP,»
4903

4908
4912

3¢

aML.REG*+50

55
32

4915

#PHR.S,
= (SP)
FURD .1 .= (SP)

6916

Ssvnc

#RD .45, -(SP)
#PHR.2,=(SP)
#WRD.2.~(SP)

#EIV.FMT,=(SP)
#6,-(SP)

SP.RO

14
#,R2
0né,sp

SP,e

+,DODU.FLG

gl.iHL.RE6060

W97
4914
4920

4923

MOV
MOV
MOV
Mov
Mov
MOV
Mov
MOV
TRAP
MOV
ADD

#WRD.19,-(SP)
#ENC.S,=-(SP)

4924

BEQ

.WORD
.WORD
.WORD

161234

#urD .45, -(sP)

55
33

TRAP

006040
007020
005760
006646
005646
005414
000006

104455

BITB
BEQ

4905

#PHR.6,=(SP)
#WRD
.1 .= (5P)

1578
BPL

MOV
Mov
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

TOPS
PA:<

ASYNC

#6,-(SP)
SP RO
14
£16,5P

.WORD
.WORD
.WORD

0 :47:44
0 :45:32

4904

MOV
MoV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

TRAP

006646
005630
006306
006560
005634
005414
000006

55
1

—

CIMLAAD ML-11 LCGIC

BIT

TRAP

Ssvnc

#WRD.12,-(SP)

#PHR.S,
= (SP)
#WRD.3,-(SP)
#EIV.FNT,=(SP)
#6,-(SP)

SP.RO

14
1 ,R2
né,sp

#20000,3ML .REG+60

SP,e

+,D0DU.FLG

4925
4922
4928

493"

MACRO M1113

CIMLAAOD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0CT-80 09:11

M 15
PAGE 206

SEQ 0194
L7:464
22-0 ct=-1980 10:4
22-0 ct-1980 10: 45:32

JMLé

8575
8576
8577

8578 030530
8579 030532
8580 030534
8581 030536
8582 030542
8583 030546
8584 030552
8585 030556
8586 030562
8587 030566
8588 030572
8589 030574
8590 030576
8591 030602
8592 030606
8593 030512
8594 030614
8595 030620
8596 030622
8597 0306¢4
8598 030626
8599 030630
8600 030632
8601 030634

000034
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600

132777

000200

161106

030644
030652
030654
030662
030666
030672
030700
8610 030704
8611 030712
8612 030714
8613 030716
8614 030720
8615 030722
8616 030724
8617 030726
8618 030730
8619 030732
8620 030734
8621 030736
8622 030742
8623 030746
8624 030752
862 5 030756
8626 030762
8627 030764
8628 030772
8629 030774

132777

000001

161026

152777
016701

000040
161302
177770
000007

161056

161040

000001

160766

030642

104414

012702
062706
012700
001410
016701
001403
005016
005301
001375
005300
000767
001106

001452
042701

1462777
150177
132777
001405
104455

.WORD
.WORD
.WORD

006040
007020
005760
006646
005654
005414
000006
000001
000016
00C050

6%
7%:

151276

8%:
9%

161034

000035
007444
000000
000404

10%:

MOV
MOV
MOV
MOV
MOv
Mov
MOV
MOV
TRAP
MOV
ADD
MoV

BEQ
MOV

BEQ
CLR

MOV

8sv~c

BIC
BICB
B158
BITB
BEQ
TRAP
.WORD
.WORD

4932

#WRD. 19 -(SP)
NENC.S,=(SP)

#WRD.18,-(5P)
#PHR.S, < (SP)

YWRD
.4 , = (SP)
#EIV FAT,-(SP)
#6,-(SP)

SP,RO

14
f,R2
#6,5P
#50,R0
10$

LSDLY,RY
9

DEC
BNE
DEC

BITB
BNE
BITB
BEQ
BISB

TOPS
PA:<

5P,

;

*,DODU.FLG

e, $8TMP?
.

v, $$TMP

;
;

$STMP
$$TMPY

;

38TMP2

4933
4930
4936

4938

#200,3ML .REG+50
15%

4942

#1,3ML.REG

13$
#40,aML.REG+40
ML.OUT,R1

4944

$77776,R1

#7,3ML.REG+40
R1.aML.REG+40

#1.3ML .REG
11$

L4947

#WRD.19,-(SP)
#ENC.S,-(SP)
#RD.11,-(SP)
#PHR.2,-(SP)
#WRD.1,-(SP)

4950

WORD

118:

104455

000036
006040
007020
005750
006560
005630
005414
000006

12%:

TRAP

.WORD
.WORD
. WORD

MoV
MOV
Mov
MOV
MOV
MOV
MOV
MOV
TRAP

FELV.FMT,-(SP)

SP,»

CIMLAAO ML-11

LOGIC

HARDWARD TEST

TEST

MACRO M1113

SECTION

8631

SEQ 0195

13%:

006040
007020
005750
006542
005634
005414
000006

6942
4954

MOV
MOV

#WRD.19,-(SP)
#ENC.S,-(SP)

4955

MoV
MoV
MOV
MOV
MOv
TRAP
MoV
ADD

#PHR.1,=(SP)

BR
TRAP
.WORD
.WORD
.WORD
MOV

14%:

160612

000040
161066
177770
000007

160642

000001

160552

160620

15¢%:

BlTB
BEQ
BISB
MOV

8IC
81C8
B1S8
8IT8
BEQ

160624

5
7
Ssvnc

#wRrD.11,-(sP)
#URD.2,-(SP)
FEIV.FAT,-(SP)
#6,-(SP)

SP,RO

14
1 ,R2

16,5,
#1,3ML.REG

SP,*

;

*,DODU.FLG

18¢

4958
4940
4961
4963

#40,aML .REG+40
ML.DUT,R1

077770,
R

#7,IML .REG+40
R1.3ML.REG+40
#1.3ML .REG

4966

TRAP

169%:

BSOS NONOONNONONONOOSANOOSMANNOOO

006040
007020
005750
006560
005630
005414
000006

2 OO NN
B HNANNIMNON) = =

[elelelelelelelolelelelololololelololalolefolale]

(VL LV IV IV LV IV IV ]

000001
000216
000001

TOPS
PA:<
NN
—

104455

~
N

N 15
PAGE 207

ML
000424

oo
[~

23-0CT-80 09:11

17%:

00000
000016

176670
040000
104455

18%:

160436

19%:

.WORD
.WORD
.WORD
BR
TRAP
.WORD
.WORD
. WORD
MoV
MOV
Mov
Mov
MOV
MOV
MOV
MOv
TRAP
MOV
ADD
TRAP
ROR

BHIS
JMP

BIT
BEQ

TRAP

4968

#URD.19,-(SP)
#ENC.S,~(SP)

#RD.11,-(SP)

#PHR.2,=(SP)
#URD.1,-(SP)
#FIV.FAT,=(SP)
#6,-(SP)

SP.RO

14
".R2
né,sp

RO
19%
1%
#40000,3ML .REG

SP,r

*+,DODU.FLG

4969
4963
4970

6974
4977

CIMLAAD ML=-11 LOGIC

829 031350
8730 031354
8731 031356
8732 031360
8733 031362
8734
8735
8736

23-C(T-80 09:11

B 16
PAGE 208

SEQ 0196
TOPS
PA:<

JMLG

000000
012746

.WORD
.WORD
.WORD
MOv

006040
007020
005760
006640
006046
006526
005432
000007

000001
000020

oy
%

MOV
Mov
MoV
Mov

20%:

160626

005726
000207

21$:
;
;

004767

104466
006000
103773
000207

176542

MOV
MOV
MO/
TRAP
MOV
ADD

DEC

BNE

MOV
TRAP
TRAP

TST

RTS

JSR

BLO
RTS

;

Routine Size:

4978

#WRD .19, -(SP)
#ENC.S,=(SP)

#WRD.14,-(SP)
#PHR.S5,

- (<P)

#wrD.20,-(sP)

#WRD.61,-(SP)
#SIX.FMT,=(SP)

2?7 ,-(5P)

SP,*

SP,RO

14
#,R2
#20,5°P
R2

*,DODU.FLG

: DIDU.FLG

218

4979
4976
4982

ML.LUN,RO

4985

44
(SP)+
PC

4868

Routine Size:
333 words
Maximum stack depth per invocation:

TRAP
ROR

163
INTER
0

RS e

000163
007622

—y

8728 031350

SECTION

—

8687
8688
8689
8690
8691
8692
8693
8694
8695
8696
8697
8698
8699
8700
8701
8702
8703
8704
8705
8706
8707
8708
8709
8710
8711 031346
8712
8713
8714
8719
8720
8724

MACRO M1113

o —

HARDWARD TEST

TEST

18 words

4987

PC,8T12
66
RO
1%
PC

6 words

Maximum stack depth per

invocation:

0 words

TEST

CZMLAAOD ML-11 LOGIC

HARDWARD TEST

SECTION

SEQ 0197
TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4L.BLI.2 (55)

BGNT ST;
lee
|
.

]

TE ST

NUM3ER:

TST 13

|
.

TE ST NAME:

READ FUNCTION TEST

|
.

TE ST

DESCRIPTION:
TEST

|
.

THE

DRIVE

CAN PERFORM

A READ FUNCTION WITHOUT
HANGING THE DRIVE.

|
.

t
.

1
.

A READ FUNCTION

|
.

INTO MLCSY

|}
.

IS WRITTEN

THEN GO AND ERROR BITS ARE

CHECKED FOR CORRECT STATES.

|
.

|
——d
e
i
i
)
D
d cd
—t

OO0 ~NO\WN SN —

COO0O0OO0O0O0OO

VAW
A I
LN

B¢ B By BoeBeBo Vo Be By Ve 0s s 8,00 0000 %9 %0 %0800 %0 s %000 s W00y 99 %0 000, S s 0,

Br74
8775
8776
8777
8778
8779
8780
8781
8782
8783
8784
8785
8786
8787
8788
8789
8790
8791
8792
8793
8794
8795
8796

¢ 16
PAGE 209

:45:32

8747
8748
8749
8750
8751
8752
8753
8754
8755
8756 ;
8757
8758
8759
8760
8761
8762

8773

23-0(T-80 09:11

7:44

8742 MLs
8743 ;
8744
8745
8746

8763
8764
8765
8766
8767
8768
8769
8770
8771
8772

MACRO M1113

THIS UNIT
ERRORS.

!
.

|
.

IS DROPPED ON DETECTED

[}
.

[}

IM PLICIT

INPUTS:

NONE

|
.

{ .

loca L

DODU_FLG;

'DROP UNIT FLAG

BGNS uB;
(LR MBUS.

0000 FLG

= ZERO;
FIRS T_BLK_XFER ();
MLCS 17= read;

if . GO IS_NOT_SET
then

'SET UP A FIRST BLK XFERR
'DO A READ FUNCTION

'SEE IF GO GOT SE7

'ERROR IF CLEAR
begin
ERRDF (34, ASYNC, 0);
PRINTB (FIV_FMT, WRD 1, PMR_1, WRD_12, FNC_6, WRD_19);

it .DRY IS_NOT_SET

then

'TST DRY SET WITH GO CLEAR

'€RROR IF NOT SET
begin
ERRDF (35, ASYNC, 0);
PRINTB (FIV_FMT, WRD_2, PHR_1, WRD_43, WRD_1, PHR_6);
end;

DODU_FLG = ONE;

'SET DODU_FLG

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

D 14

PAGE 210

22-0ct="980 10:47:44
22-0ct=-1980 10:465:32

8798 ;ML4
gggg ;
8801

;

5042

8802 ;

5043

8804 ;

5045

8806 .
8807 ;
8808 ;

5047
5048
5049

8803 ;

8805 ;

8809 ;

8810 ;
8811 ;

8812 ;

8813 ;

5044

5051
5052

5053
5054

8818 ;
8819 ;

5059
5060

;

5062

8821

8822
8823 ;

end

then

5063
5064

'"ERROR [F SET
begin
ERRDF (36, ASYNC, O0);
PRINTB (Fiv_FMT, WRD_2, PHR_2, WRD_43, WRD_1, PHR_S);
end;

then

begin
'ERROR IF YES
ERRDF (37, ASYNC, 0);
PRINTB (FIV_FMT, WRD_3, PHR_5, WRD_12, FNC_5, WRD_19);

DODU_FLG = ONE;

end;

if 0Pl IS_SET

then

5067

8878 ;

5069

DELAY (FRTY_US);

8830 ;

5071

it _DRY IS_NOT_SET

8829 ;

8831 ;
8832 ;
8833 ;

8834 ;

8835
8836 ;

8837 .

8838 ;

5066

5070

5072
5073
5074

5075

5076
5077

'ERROR IF YES

PRINTB (FIV_FMT, WRD_&, PHR_S, WRD_12, FNC_S, WRD_19);

8826 ;

5068

'DID FUNCTION CAUSE OPI

begin
ERRDF (38, ASYNC, 0);

5065

8827 ;

'DID FUNCTION CAUSE ILF

if .ILF IS_SET

8824 ;
8825

‘SEE IF DRY IS CLEAR

DODU_FLG = ONE;

5058

5061

T0PS=-20 Bliss=16 v2(206)
PA:<NEALE>BL2MLG.BLI.2 (55)

.G0 BIT GOT SET

it .DRY IS_SET

5050

5055
5056
5057

8820 ;

else

5046

8814 ;
8815 ;
8816 ;

8817 ;

SEQ 0198

DODU_FLG = ONE;
end;

then

'WAIT FOR XFERR TO COMPLETE

'1S DRY SET AFTER XFERR

begin

it .60 IS_SET

then

begin

CLR_MBUS;

5078

5079

'TEST GO CLEAR WITH DRY NOT SET
'CLEAR GO

ggzg :

ggg?

it .GO IS_SET then ERRDF (39, ASYNC, 0) else ERRDFf (40, SYNC, O);

8841 ;
8842 ;

5082
5083

1TST GO 7TC DETERMINE FAILING MOD
WRD_19);
FNC_5,
WRD_11,
PHR_2,
WRD_1,
(FIV_FMT,
PRINTB

8844 ;

5085

8843 ;

8845 ;
8846 ;

8847 ;

8848 ;
8849 ;

8850 .

8851 ;
8852 .

5084

5086
5087

else

5091

5092
5093

begin
ERRDF (41, ASYNC, 0);

160 BIT CLEAR WITH DRY NOT SET
'REPORT ERROR

PRINTB (FIV_FMT, WwRD 2, PHR_1, WRD_11, FNC_5, WRD_19);

5088

5089
5090

end

end;

DODU_FLG = ONE:
end;

!SET DODU_FLG

CIMLAAD ML=11 LOGIC T EST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

PAGE 211

8854 ;ML&
gggz ;

L8857 ;

2858 ;
8859 :

gggg ;

5094

5095
5096

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

it .GO IS_SET

then

gggg

begin

CLR_MBUS;

'CLEAR GO IF STILL SET

gggg

it .GO IS_SET then ERRDF

8864 ;

5101

PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_S5, WRD_19);

8866
8807 :
8868 :
8869 :

5103
5104
5105
5106

end;

8871

5108

8870 :

§102

5107

.TRE IS_SET

then

8876 :
8877

5113
§114

:
:

5116
5117
5118
5119
5120
5121
§122

ENDTST;

8893 031364

004167

1526416

8895 031372
8896 031374

104402
152777

000040

042701

177770

8879
8880
8881
8882
8883
8884
8885
8889

:
;
:
:

8894 031370

5112

5115

005746

8897 031402

016701

8899 031412
8900 031420

142777
150177

8898 031406

8901 031424
8902 031426

005002
004767

8904 031440

132777

8903 031432

012777

8905 031446

001057

8907 031452

000042

8906 031450
8908

8912 031456

000000

8914 031464

012746

IF XFERR CAUSED A TRANSFER ERROR

DODU_FLG = 0 E
end;

it .DODU_FLG IS_SET

then

'DROP THIS UNIT IF DODU_FLG SET

begin
DODU (.ML_LUN);
DOCLN;
end;

160562

000007
160314

161066

000071

000001

160336

$T13:

JSR

R1,$SAVE2

;

4989

TRAP
BISB

2
#40,3ML.REG+40

;
:

5020
5022

R2
PC,FIRST.BLK.XFER

: DODU.FLG
;

5024
5025

#1,3ML.REG

;

5028

ML.0OUT,R1

BICB
BISB

#7,aML.REG+40
R1.aML.REG+40

BIC

160320

CLR
JSR

160240

MOV

160232

BITB
BNE

(ML

;

-(SP)

MOV

TRAP

.MORD

1177770, R

#71,3ML.REG
2%

.WORD ASYNC
.WORD

007030

MOV

#ENC.6,-(5P)

006542

MOV

006040

8915 031470 012746 005760

8916 031474

!TST GO TO DETERMINE FAILING MOD

begin
'REPORT ERROR [F SET AND CONTINUE TESTING
ERRDF (116, INTER 0);
PRINTB (SIX
WRD_61, WRD_20, PHR_S, WRD_12, FNC_6, WRD_19);

gg?g

8913 031460

'SEE

104455

8911 031454 007444

(43, SYNC, 0);

ENDSUB;

5109
§110
5111

8878

(42, ASYNC, 0) else ERRDF

DODU_FLG= ONE;

8872 :
8873 :
8874 :

8875 :

SEQ 0199

'SEE IF GO CLEAR AFTER XFERR

%gg% ;

8865 :

TOPS=20 Bliss=16 V2(206)
PA:<NEALL>BL2ML4L.BLI.2 (59)

MOV

#WRD.19,-(SP)

#WRD.12,-(SP)
#PHR .1, = (SP)

;

5026

;
,

5031
22-0ct=1980 10:47:44

22-0ct=1980 10:45:32
;

10PS

PA:<

5032

CIMLAAD ML-1]

MACRO M1113

HARDWARD TEST

NNWNNIN
= = 2 O
SO0 OoO0SO S

D
e
e
D
d
— e

005630
005414
000006

VAWM
VTN WU

j=lelelolelolel
e
NN N NN N
N

d D

8917 031500
8918 03
8919
8920
8921
8922
8923
8924
8925
8926
8927 031536
8928 031540
8929 031544
8930 031550
8931 031554
8932 031560
8933 031564
8934 031570
8935 031574
8936 031576
8937 031600
8938 031604
8939 031606
8940 031612
8941 031614
8942 031616
8943 031620
8944 031622
8945 031624
8946 031630
8947 031634
8948 031640

000209

MoV
MOV
MoV
MOV
MoV
MOV

MOv
TRAP

000016

SEQ 0200

#WRD.1,~(SP}

V
FPT = (SP)
#EL
#6,

(SP)

SP,RO

14
CEOO,SHL.REG*SO

;

SP,e
5034

5037

005630
006306
006560
005634
005414
000006
000001
000016
000001

3¢
160056

4%:

#RD .45, - (SP)

#PHR.1,=(SP)
#WRD.2.~(SP)
#EIV.FMT,=(SP)
26,-(5P)

SP.RO
14

;

SP,»
5036

1578
BPL
TRAP

aML.REG+50

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

#PHR.S,
- (SP)
#URD.1 .- (SP)

BIT8
BEQ

5038

#PHR.6,-(SP)
FURD .1 .= (SP)

#16,5P

.WORD
.WORD
.WORD

006646

ADD

160136

5041
5045

5048

5049

#RD .43, -(SP)

#PHR.2.~(SP)
#WRD.2.-(SP)
FEIV.FMT,=(SP)
#6.,-(SP)

SP,RO

14
#1,R2

26,5P

SP,»

*,DODU.FLG

5050
5047
5053

g1.aHL.REG060

5056

TRAP

006040

—=O000O000

[ Y
R
VS i G iy
s OrorurorON
O NNNNN
[ R R
X o o
L =To Yo Yo Yo Yo i

8967
8968
8969
8970
8971
8972
8973

.WORD
-WORD
.WORD
MOV

006660
005630
006306
006542
005634
005414
000006

8950 031650
8951 031654
8952 031660
8953 031662
8954 031664
8955 031670
8956 031674
8957 031702
8958 031704
8959 031706
8960 031710
8961 031712
8962 031714

031724
031730
031734
031740
031744
031750
031752

BITB
BNE

TRAP

8949 031644

8964
8965
8966 031720

MOV
MOV
MOV
MOV
TRAP

160222

PAGE 211-1

23-0(T-80 09:11

007020
005760
006646
005646
005414
000006

JMLG

.WORD
.WORD
.WORD
MOV

MOV
MOV,
MOV
Mov
MOV
MOV
MOV
TRAP

22-0ct-198
22-0ct-198
#ENC.S
.1
#URD
#PHR.5,=(5P)
#WRD.3,-(SP)
FEIV FRT,=-(SP)
#6,-(SP)

SP,RO
14

14744

1465:32

5057
TOPS

PA:<

CIMLAAOQ ML-11 LOGIC TEST

HARDWARD TEST SFLTION

8974 031754
8975 031760

012702
062706

8977 031772

001430

8979 031776
8980 032000
8981 032002

000046
007444
000000

8983 032010

012746

MACRO M1113

000001
000016

8976 031764 032777 020000 157766 5%:

8978 031774

8982 032004

8984 032014

8985 032020
8986 032024
8987 032030
8988 032034
8989 032040
8990 032042

8991 032044
8992 032050
8993 032054

104455

012746

006646
005654
005414
000006

9000 032076

005300

001410

000767

9003 032110

001106

9005 032120

001452

9007 032130
9008 032134
9009 032140
9010 032146

016701
042701
142777
150177

9012 032160
9013 032162
9014 032164
9015 032166
9016 032176
9017 032172

001405
104455
000047
007444
000000
000404

9018

8$:

001375

9001 032100

9011 032152

98: «

9021 032174
9022 032176

5061

;

5064

#WRD.19,-(SP)

;

5065

#ENC.S = (SP)

#WRD.12,=(SP)

#PHR.S,
= (SP)
#WRD .4~ (SP)
#FIV.ENT,=(SP)
86,-(5P)
SP.RO
14

; SP,e

0 ,R2
#6,5P
#50.R0

: *,DODU.FLG
:
v, $8TMP2

MOV
BEQ
CLR
DEC

LSDLY,R1
9%
(SP)
R1

; v, 88 TMP1

DEC

: $$TMP2

BIT8

#200,3ML.REG+SO

;

5071

BEQ

BNE

108

5066
5063
5069

. $STMP
L $STMPI

132777

000001

157560

EITE

#1,aML.REG

5075

152777

000040

157610

BISB

#40,3ML.REG+4O

;

5077

#1.aML.REG

;

5080

132777

160034
177770
000007
157566

000001

BNE

BEQ

157572

15¢

13§

MOV
BIC
BICB
BISB

ML.DUT,R1
R1
0177770,
#7,aML.REG+40
R1,aML.REG+40

8EQ
TRAP
JMORD
"WORD
WORD
BR

1%
S5
47
ASYNC
0
128

BITB

157520

;MLG

22-0ct-1980 10:47:44

22-0ct-1980 10:45:32

104455
000050

9025 032204

012746 006040

TRAP
.WORD

S5
50

WORD

JWORD

000000

012746

007020

012746
012746
012746

00656C
005630
005414

9027 032214 012746 005750
9028 032220
9029 032224
9030 032230

157640

007500

9026 032210

5058
5055

000200

9023 032200

9024 032202

10$:

SEQ 0201

MOV

MOV
ADD
MOV

: +,DODU.FLG
:

132777

9019
9020

7%:

#20000,amML .REG+60
46
ASYNC
0

MOV
MOV
MOV
MOV
MOV
TRAP

6%:

PAGE 211-2

JWORD
"WORD
"WORD

MOV

012746
012746
012746
012746
010600
104414

150030

9006 032122

012746 005760

016701
001403
005016
005301

9004 032112

BEQ

BIT

MOV

007020

8995 032062
8996 032066
8997 032070
8998 032072

9002 032102

" ,R2
#16é,5P

006040

000001
000016
000050

8999 032074

MOV
ADD
TRAP

012702
062706
012700

8994 032060

23-0CT-80 09:11

G 16

128:

MOV

MOV
MOV
MOV

SYNC

#URD .19, -(SP)
#ENC.S,=(SP)

#wRD.11,-(SP)

#PHR.2,-(SP)
#URD.1.-(SP)
#FIV.FMT,=(SP)

;

T0PS

PA:<

5083

CIMLAAD ML-11 LOGIC TESTY

HARDWARD

TEST

SECTION

012746
010600

MACRO M1113

000006

MoV
MOV
TRAP

104414

000424

13%:

104455

000051
007444
00C000
012746
012746
012746
012746
012746
012746
012746
010600
104414

032326
032334
032336
032344
032350
032354
032362
032366
032374
032376

032400
032402
032404
032406
032410
032412
032414

032416
032420
032424
032430
032434
032440

032444
032450
032454
032456
032460
032464
032470

012702
062706

132777

157344

152777

000040

157374

016701
042701
162777
150177
132777

001405

157620
177770

14%:

000007

157356

000001

157304

157352

15%:

012746
012746

012746
012746
012746

12746

TRAP

.WORD
.WORD
.WORD

MOV
Mov
MOV
MoV
MOV
Mov
MOV
MoV
TRAP
MOV
ADD

8178
BEQ
BISB
MOV

104455

007444
000009
000404
104455
000053
007500
000000

BIC
BI(B
BISB
BITB
BEQ
TRAP

000052

16%:

17%:

006040
007020
005750
006560
005630

sMLG

005414
000006

000001
000016

18%:

.WORD
.WORD
.WORD
BR
TRAP
.WORD
.WORD
.WORD
MoV
MOV
MOV
MOV
MOV

MOV
MOV
MOV
TRAP
MOV
ADD
TRAP

ROk

176670

9085

9086
9087

006040
007020
005756
006542
005634
005414
000006
000001
009016
000001

001455

23-0(CT-80 09:11

001432

040000

157170

19%:

BHIS
JMp

BIT

BEQ

H 16
PAGE 211-3

SEQ 0202

26,-(SP)

140
149

51
Ssvnc

5075
5087
F
5088

#WRD.19,-(SP)
#FNC.5,=(SP)

#wRD.11,-(sP)

#PHR.1,=-(SP)
#WRD.2.=(SP)
FFIV.FMT,=(SP)
#6,-(5P)

SP.RO

14
#1,R2
#é,sP
#1,3ML .REG

: SP,*
5091
5073

; +,DODU.FLG

5094

18%
#40,aML .REG+40
ML.DUT,R1

5096

#7.3ML.REG*40
R1,aML.REG+40
#1.3ML .REG
16%

5099

R
0177776,

5101

#WRD.19,-(SP)
#ENC.5,~(SP)
#WRD .11, -(SP)
#PHR.2,-(SP)
#WRD.1,-(SP)

#EIV_FAT,-(SP)
#6,-(5°)

SP,RO

14
1 ,R2
”6,SP

RO
19¢
1%
#40000,aML .REG

20%

22-0ct=-1980 10:47:44
22-0ct=1980 10:45:32

;

SP,»

*,DODU.FLG

TOPS
PA:<

$102

5103

5107

CZMLAAD ML-11 LOGIC
OON N

104455

.WORD
.WORD
.WORD

006040
007030
005760
006646
006046
006526
005432
000007
000001
000020

MOV
Mov
MOV
MOV
MOV
MOV

MOV

MOV
MOV
TRAP

:
208

157360

032614

23-0CT-80 09:M
TRAP

000164
007622

9088
9089
9090
9091
9092
9093
9094
9095
9096
9097
9098
9099
9160
9101
9102
9103

MACRO M1113

SECTION

WA
N NN
WWNRONIN)
— —

HARDWARD TEST

TEST

21%:

000207

;

5110

FURD.19,-(SP)

511

164
6NTER
#ENC.6,~(SP)

#WRD.12,-(SP)
#PHR.S = (SP)

#iRD.20,-(sP)

#WRD.61,~(SP)
¥SIX.FMT,=(SP)
#7.-(SP)

SP.RO

MOV

DEC
BNE

218

ML.LUN,RO
51

004767

104466

006000

103773

000267

176542

RTS

Routine Size:
333 words
Maximum stack depth per invocation:

T13::
1%:

*,DODU.FLG

. DODU.FLG

44
(SP)+

18 words

22-0ct-198 0 10: 4 7:44
22-0ct-198 0 10: 4 5:32

MLS
032616
032616
032622
032624
03262¢
032630

SP,e

#20,5P
R?

MOV
TRAP
TRAP

TST

SEQ 0203

14
#.R2

ADD

1 16

PAGE 2114

JSR
TRAP
ROR

BLO
RTS

PC,$T13
66

RO
1%
PC

TOPS

PA:<

5120

CIMLAAQ ML-11

HARDWARD

TEST

LOGIC

1 gst

MACRO M1113

SECTION

9141

;ML&

9144
9145
9146
N4T
9148
9149
9150
9151
9152
g}gz

;
;
;
;
;
;
;
;
;
:

51264
5125
5126
5127
S128
5129
5130
5131
5132
z}gz

!
BGNTST;

9155
9156
9157
9158
9159

;
;
;
;
;

5135
5136
5137
5138
5139

!
!
!
!
!

9162 ;
9163
9164 ;
9165 ;

5142
5143
5144
5145

Llocal
DCDU_FLG;

9167 ;

5147

9170 ;

5150

J 16
23-0CT-80 09:11
. PAGE 212
22-0ct-1980 10:47:44

8}2% ;

9160
9161

;
;

SEQ 0204

22-0¢t=1980 10:45:32

5140
5141

A CLEAR FUNCTION IS WRITTEN

THEN GO AND ERROR BITS ARE CHECKED FOR CORRECT
THIS DRIVE IS DROPPED ON DETECTED ERRORS.

'DROP UNIT

MLER = ONES;
MLLST = DRV_CLR;

;
;
;
;
;
;

5151
5152
5153
5154
5155
g}gg

DELAY (ONE_US);

'DELAY

it .GO 1S_SET
then
begin
ERRDF (44, ASYNC, 0);

'SEE

9178 ;
9179 ;
9180
9181 ;

5158
5159
5160
5161

9183
9184
9185
9186
G187
9188
9189
9190
9191

;
;
;
.
.
;
;
;
;

5163
5164
5165
5166
5167
5168
5169
5170
5171

9193 .

5173

9195 ;

5175

9182 .

9192 ;

9194 ;

DODU_FLG = ZERO;

PRINTB

5174

(FIV_FMT, WRD_1,

FLAG

'SET BITS IN ERROR RECISTER
‘DO A CLEAR FUNCTION
IF

GO CLEARED AFTER FUNCTION

'ERROR IF
PHR_S, WRD_11,

it .DRY [S_SET
then
begin
ERRDF (45, ASYNC, 0);

5162

5172

STATUS.

!'--

5148
5149

9i71
9172
9173
9174
9175
3};9

DRIVE.

INTO MLCS?.

BGNSUB;
C1R_MBUS;

9168 ;
9169 ;

PA:<NEALE>BL2ML4.BLI.2 (56)

!4+
! TEST NUMBER:
TST 14
!
! TEST NAME:
CLEAR FUNCTION TEST
!
' TEST DESCRIPTION:
;
TEST If THE DRIVE CAN PERFORM A CLEAR FUNCTION WITHOUT HANGING THE

5146

9166 ;

TOPS=20 Bliss=16 v2(206)

FNC_3,

FNC_7,

SET
WRD_19);

'TST DRY CLEAR WITH GO SET
'ERROR

SET

PRINTB (FIV_FMT, WRD_2, PHR_S, WRD_43, WRD_1, PHR_S);
end;

DODU_FLG = ONE;

else

end

'SET DODU_FLG

'GO CLEARED AFTER FUNCTION

it .DRY |S_NOT_SET
then
begin
ERRDF (46, ASYNC, 0);

'TST DRY SET WITH GO CLEAR
'ERROR IF NOT SET

PRINTB (FIV_FMT, WRD_2, PHR_1, WRD _43, WRD_1, PHR_6);

DODU_FLG = ONE;
end;

MACRO M1113

CIMLAAD ML-11 L 0GIC

TEST
HARDWARD TEST S ECTION

23-0(T-80 09:11

PAGE 213

SEQ@ 0205

9228
9¢29
9230
9231
9232
9233
9237
9261 032632
9242 032636

9243 032640
9244 032642
9245 032650
9246 032654
9247 032660
9248 032666
9249 032672
9250 032674

)

V. JV LV [V IV IV, LV LV 1V, LV, ]

D
e

)

W LV TV LV IV JU, IV IV JV LV JU

D
)

VLV

O O O O O O O O O ~© 00 00 00 OO OO 0O OO 00 CO O~~~ -~
OO0 NO WV
WNWN 2OV
NO NN
2OV
~NO

—

it JILF IS_SET
then
begin
ERRDF (47, ASYNC, 0);
PRINTB (FIV_FMT, WRD_3,

DODU_FLG = ONE;

'DID FUNCTION CAUSE
.ERROR

PHR_S5, WRD_12,

FNC_3,

FNC_7,

T0PS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2MLS. BLI.2 (56)

4
32

WK
I
IR
EI
T
TE
FE
TEIETELE
TR
Y

9199
9200
9201
9202
9203
9204
9205
9206
9207
9208
9209
9210
9211
9212
9213
9214
9215
9216
9217
9218
9219
9220
9221
9222
9223
9224
9225
9226
9227

9197 s ML
9198 ;

ILF

YES

WRD_19);

end;
it

.OPI

then

JS_SET

'DID FUNCTION CAUSE OPI

begin

ERRDF (48, ASYNC, 0);
PRINTB (FIV_FMT, WRD
&, PHR_S,

DODU_FLG = ONE;

'ERROR

WRD_12,

FNC_3,

FNC_7,

YES

WRD_19);

end;

'TEST ERROR REGISTER FUR (LEAR

it .MLER neq ZERO
then

begin
'ERROR IF NOT CLEAR
0);
ERRDF (49, ASYNC,
PRINTB (SIX_FMT, FNC_3, FNC_7, WRD_19, WRD_14, WRD_13, REG_3);
end;

ENDSUB;

5205
5206
5207
5208
5209

0046167
005746

104402
152777

016701
042701

142777
150177
005002
012777

if .DODU_FLG
then
begin

[S_SET

!DROP THIS UNIT

DODU_FLG SET

DODU (.ML_LUN);
DOCLN;
end;

ENDTST;
151150

$T14:

000040

157070

000007

157052

177777

15705¢

157314
177770
157046

1%:

JSR
187

R1,$SAVE?

5122

8ISB

#40, ML .REG+4D

5143
5145

BI(B

#7.aML.REG+40

TRAP

MOV
BIC

BISB
(LR
MOV

E(SP)

ML.DUT,RY

0177770,
r1

g;.anL.thoao

¥-1,3ML .REG+60

DODU.FLG

5147
5148

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

9252

012777
012700

000011
00001

9258 032716

016701

147174

9260 032724
9261 032726

005016
005301

1¢:

005300

48:

9262 032730

9263 032732

001410
001403

132777

9266 032744

001464

9268 032750
9269 032752
9270 032754

000054
007444
000000

9267 032746

9271 032756
9272 032762

9273 032766
9274 032772
9275 032776
9276 033002
9277 033006
9278 033012
9279 033016
9280 033020

9281 033022

9282 033026

9283 033030

2%:

000001

156734

S$:

104455

012746
012746

012746
012746
012746
012746
012746
012746
010600
104414

105777

100026

104455

9¢84 033032
9285 033034
9286 033036

000055
007444
000000

9288 033044

012746

9287 033040

156770

001375

9264 032734 000767

9265 032736

9296 033100
9297 033104

012746

006040
007036

156722

012746
012746
012746
012746
010600
104414

000200

9301 033124

9302 033126

9303 033130

9304 033132
9305 033134

001030

104455

000056

007444
000000

9306 033136 012746 006660

MOV

LSDLY,R1

; v, 88TMPY

(SP)
R

; $8TMP
L §STMPY

. $$TMP?

BITB

#1,3ML.REG

5152

TRAP

;

5155

#WRD.19,-(SP)
NENC.7,=(SP)

BEQ

156624

BEQ

BNE

CLR
DEC
DEC

B8R

BEQ

54
ASYNC
0

MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP

#FNC.3,-(SP)
#WRD.11,-(SP)
NPHR.S,=(SP)
.1 .- (SP)
#WRD
FEIV.FMT,=(SP)
#7,-(SP)
SP.RO
14

8PL

;

5161

#PHR.S,-(SP)

5162

#RD .45, - (5P)

MOV
MOV
MOV
MOV
MOV
TRAP

#PHR.S,=(SP)
#WRD.2.-(SP)
FFIV_FRT,=(SP)
#6,-(SP)
SP.RO
14

ADD
B8R

#20,5p
8%

BITB
8NE

TRAP

WORD

"WORD
"WORD

MOV

; SPLe

5§

#WRD .1 .= (SP)

7$%:

5156

5158

MOV

6% :

;

55
ASYNC
O

ADD
MOV

5149
5150

@ML.REG*50

.WORD
.WORD
WORD

MOV

006646
005634
005414
000006

132777

;
Doa,$8TMP?

MOV

005630

000016
000001

#11,3ML . REG
#1,R0

TRAP

006646

062706
012702

MOV
MOV

TSTB

T0PS

PA:<

22-0ct=-1980 10:45:32

MOV
MOV

006774
005750
006646
005630
005414
000007

9298 033110 062706 000020
9299 033114 000434
9300 033116

22-0ct=1980 10:47:44

LWORD
"WORD
"WORD

9289 033050 012746 006306
9290 033054
9291 033060
9292 033064
9293 033070
9294 033074
9295 033076

SEQ 0206

MLé

9255 032702
9256 032710
9259 032722

L 16

PAGE 214

;

g%gz
9257 032714

23-0CT-80 09:11

. SP,e

#16,5P
" R2

;
. «,DODU.FLG

#200,aML.REG+SO

ASYNC
0

#PHR .6, - (SP)

:
:

5160
5165

5154
§152

5169

5172

5173

SEQ 0207
144
: 32

sMLG

005630
006306
006542
005634
005414

Mov
MoV
MoV
MOV
MOV

000006

000001
000016
000001

000057
007444
000000

156544

8%:

006049
007036
006774
005769
006646
005646

012702
062706
032777
001432

000001
000020
020000

104414

012702
062706
005777
001430
104455

000061
007444
000000

8178
BEQ
.WORD
.WORD
.WCRD

005414
000007

156450

9%:

104455

000060
007444
000000
012746
012746
012746
012746
012746
012746
012746
012746
010600

TRAP
MOV
ADD

TRAP

012746
012746
012746
012746
012746
012746
012746
012746
0106C)
104414

MOV
MOV

Mov
MOV
MoV
MoV
MOV
MoV
MOV
MOV
MOV
TRAP
MOV
ADD

BIT
BEQ

000001
000020
156356

108

#aRD.4%,-(5P)

#PHR.1,=(SP)

#WRD.2,=(SP)

#FIV.FMT,=(SP)
#6,-(SP)

SP,RO

14
#1,R2
#16,SP
#1,3ML . REG+60
9%

;

SP,*

:
:
;

*,DODU.FLG

5174
5171
5177

55
57

5180

#WURD.19,-(SP)

;

5181

asvuc

#FENC.7,-(SP)
#FNC.3,-(SP)

FWRD.12,-(SP)

#PHR.S,
= (SP)
#WRD.3,={SP)
NFIV.FMT,=(SP)
27,-(SP)

SP,RO

14
#1,R2
#20,8P

#20000,
aML .REG+60

: SP,¢
;
:

*,DODU.FLG

10%

5182
5179
5185
5188

MoV
MOV
MoV
MOV
MOV
MOV
MoV
MOV
MOV
TRAP
MOV
ADD

#WRD.19,-(SP)
#FNC.7,=(SP)
#FNC.3,-(SP)

5189

TRAP

55
61

.WORD
.WORD
.WORD

005654
005414
000007

#WRD.1,=(SP)

55
60

TRAP

006040
007036
006774
005760
006646

TOPS
PA:<

TST
BEQ

.WORD
.WORD
.WORD

Ssvnc

#WRD .12, - (SP)

#PHR.S,
= (SP)
.4 .= (SP)
#WRD
#FIV.FRT,-(SP)
#7,-(SP)
SP,RO
14
2 R2

#20,5p

ML .REG+60
11

ASYNC

;

e
SP,

*,DODU.FLG

wd and

033142
033146
033152
033156
033162
033166
033172
033174
033176
9320 033202
9321 033206
9322 033214
9323 033216
9324 033220
9325 033222
9326 033224
9327 033226
9328 033232
9329 033236
9330 033242
9331 033246
9332 033252
9333 033256
9334 033262
9335 033266
9336 033270
9337 033272
9338 033276
9339 033302
9340 033310
9341 033312
9342 033314
9343 033316
9344 033320
9345 033322
9346 033326
9347 033332
9348 03333
9349 033342
9350 033346
9351 033352
9352
9353

PAGE 215

O 09
O
WNO

9308
9309
9310
9311
9312
9313
9314
9315
9316
9317
9318
9319

23-0(T-80 09:11

—

MACRO M1113

TEST

SECTION

VAN

CZMLAAD ML=-11 LOGIC

HARDWARD TEST

M 16

CIMLAAD ML-11

HARDWARD TEST

LOGIC

T EST

MACRO M1113

SECTION

23-0C7-80 09:11

N 16
PAGE 216
SEQ 0208

Y364

JMLS

g%gg

22=-0ct=1980 10:47:44

;

22-0ct=1980 10:45:32

9367 033414

012746

007320

MOV

#REG.3,-(SP)

9369 033424
9370 033430
9371 033434
9372 033440
9373 033444
9374 (33450
9375 033454
9376 033456
9377 033460
9378 033464
9379 033466
9380 033470
9381 033472
9382 033476
9383 033500
9384 033502
9385 033506
9386 033510
9387 033512
9388 033514
9389
9390
9391
9396
9397
9401
9405 033516

012746
012746
012746
012746
012746
012746
010600
104414
062706
104467
006000
103002
000167
005302
001004
016700
104451
104444
005726
000207

005774
006040
007036
006774
005432
000007

MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
TRAP
ROR
BHIS
JMP
DEC
BNE
MOV
TRAP
TRAP
TST
RTS

#WRD.14,-(SP)
#WRD.19,-(SP)
#ENC.7,-(SP)
#FENC.3,-(SP)
#SIX.FMT,-(SP)
#7,-(5P)
SP,RO
14
#20,5P
67
RO
129
1%
R2
13%
ML.LUN,RO
51
L4
(SP)+
PC

9368 033420

9406 033516

9407
9408
9409
82}?

033522
033524
033526
033530

012746

005770

MOV

000020

11%:

177142

12%:

156460
13%:
:
;

004767

104466
006000
103773
000207

,
;
;

82;8 :
;

#iRD.
1%, -(sP)

;

JSR

TRAP
ROR
BLO
RTS

PC,$T14

66
RO
18
PC

Routine Size:
6 words
Maximum stack depth per

SP,e
3

DODU.FLG

!'<BLF/PAGE>

5195
5198

5202

5205

5122

5207

19 words

)
invocation:
0 words
22-0ct-1980 10:47:44

22-0ct=-1980 10:465:32

5210

TOPS

PA:<

5197

:
;

Routine Size:
218 words
Maximum stack depth per invocation:

T14::
1%:

177110

9412
9413
9418 ,;ML4
9421

)
TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4&.BL].2 (56)

HARDWARD TEST S

l ON

23-0CT-80 09:11

B 1
PAGE 217

9423 ;mLé

9445
9646
9447
9448
9449
9450
9451

;
;
;
;
;
;
;

9444

;

9452 ;
9453 ;

9454 ;
9455 ;
9456 ;

9457 ;
9458 ;
;

9459

9460 :

322;

i
i
i
i

TEST NUMBER:

TST

TEST

NAME:

COMPOSIT

TEST

DESCRIPTION:

TEST

SETTING EACH

WRITING A SHIFTING ONE THROUGH
THE ERROR REGISTER (SKIPPING THE
READ ONLY BITS) AND TESTING THE
COMPOSIT ERROR BIT IN MLDS
FOR BEING SET AFTER EACH

WRITE.

ERROR

BIT IN THE ERRCR REGISTER
CAUSES A COMPOSIT ERROR BY:

:
!
e
:
e
[}

TO SEE

IMPLICIT

INPUTS:

NONE

lccal

DODU_FLG,

DAT PAT,
SK1P_MASK;

'DROP UNIT FLAG

'DATA PATTERN
'POINTS TO MLER READ ONLY BITS

CLR_MBUS;

DODU_FLG = ZERO;

'WRITE AND SHIFT DATA PAT 10 MLER 16 TIMES

N =O V00NN
N

5249
5250
NONLRLNLNDNLRNDALNIPOND
[o Yo Yo JV TV LV LV IV Vel el ]

I T
P R TR IRTR

i
j
i

incr COUNT from 0 to 15 do

WAVAVAWAWVAWATVAIWNVALWNWY

9474
G775
9476
9477

9472
9473

9470
9471

5245

5244

5251

9469

lee

243

9466

9468

BGNTST:

'LCAD SKIP MASK

5248

9467

SKIP"MASK = %0'163157°;

9463 :

9464 ;
9465 ;

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (57)

DAT PAT = ONE;
DODPJ_FLG = ZERO;

;
;
;
;
.
;
;
;
;
;

(W IV TV TN LV LW, LW LV LV LU TV LV AV SV LV SV RO LV LU LV W W LV LU LU LW LV LV LV LV AV 1V LV, )
N [T, ST, ST VT ST, ST N1 NT N1 U N N ST VT ST, ST, ST, N1 N1 N1 ST NSNS NN, N1,V 1, V1,V LV
~ B £
NN AN AN AN AN AN AN N AN PO PO PO PO RO PNV NI PRI NN — =2 s b b b s —»
~no =S OO0 NONE NN 2O 00N
NS NN
OO0 NN
LN —

9634
9435
9436
9437
9438
9439
9440
9441
9442
964LY

;

9413

9432

22-0ct=1960 10:45:32

(¥,]

9430 ;
9431 ;

SEQ 0209

22-0ct=1980 10:47:44

gzsg ;
9426 ;
9427 ;
9428 .
9429 ;

MACRO M1113

begin

if (.DAT_PAT and .SKIF_MASK) nea ZERO
then

begin
BGNSUB;

'DATA PATTERN SET BIT O IN MLER

'SKIP IF DAT_PAT FALLS ON READ ONLY BIT

MLER = .DAT_PAI;

'WRITE DATA_PAT TO MLER

if .COMP_ERR IS_NOT_SET

'SEE IF DAT_PAT CAUSED A COMP ERROR

then

beain

ERRDF (50, ASYNC, 0);
'ERROR IF NO COMP ERROR
PRINTB (FOR_FMT, FNC 8, PHR_1, WRD_12, FNC_8);
PRINTB (FMT &, .DAI_PAY);

DODU_FLG = ONE;

end;

CIMLAAD ML-11 Lg?% ¢ 1 EsT

CZMLAAOD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

1
c
PAGE 218

9479 mMLL

22-0ct=1980 10:47:44

3239 :

22-0ct=-1980 10:45:32

9482
9483 ;
9484 ;

5263
5264
5265

9486
9487 ;

5267
5268

9485 ;

5269

9490 ;
9491 ;

bY44
5272

9493 ;
9494 ;

5274
5275

9492 ;

5270

5273

DAT_PAT = .DAT_PATAONE;

'SHIFT DAT_PAT TO NEXT BIT AND REPEAT

.DODU_FLG IS_SET

'DROP UNIT [f DODU_FLG IS_SET

end:

then

begin
DODU (.ML_LUN);

DOCLN;
end;

5276

ENDTST;

9503 033532
9504 033538

004167
152777

150302
000040

9506 033550

042704

177770

8233 :

9505 033544

9507 033554
9508 033562

016704

000007
156152

012704

163157

005001

9511 033574
9512 033600
9513 033602

012702
005003
030204

9510 033570
9514 033604

9515 033606
6516 033610

9517 033614

9518 033622

9519 033624

9520 033626

156420

142777
150477

9509 033566

156174

032777
001035

$715:

104455

BIC

77770,
R4

CLR

MOV

1%:

040000

R1,$SAVEL
#40,aML.REG+40

BI(B
8IS8

060001

156144

JSR
B1SB
MOV

156156

001447

104402
010277

2%:

156126

MOV
(LR
BIT
BEQ

TRAP
MOV

BIT
BNE

TRAP

000062

5240

#1,R2
R3
R2.R&

; *,DAT, PAT
; COUNT
. DAT.PAT,SKIP.MASK

5242
5245
5748

#-164621,R4

2
R2,3ML.REG+60

#40000,3ML .REG+S0
3%

#WRD.12,-(SP)

007046

MOV

9525 033644
9526 033650
9527 033654
9528 03366C
9529 033664
9530 033666

012746
012746
012746
012746
010600
104414

006542
007046
005400
000005

MOV
MOV
MOV
MOV
MOV
TRAP

9532 033672

012746

004336

MOV

; *,SKIP.MASK

MOV

012746

010216

: DODU.FLG

#7,3ML.REG+40
R4 ,aML.REG+40

9523 033634

9531 033670

ML.DUT R4

MORD

.WORD

9524 033640 012746 005760

5209
5237

007444

000000

;
;

.WORD

9521 033630

9522 033632

TOPS=-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (57)

ENDSUB;
end;

5266

9488 ;

9489 ;

SEQ 0210

;
. DAT.PAT,®

52641

5250
5252

;

5254

;

5257

;

5258

ASYNC

#ENC.8,-(SP)

#PHR.1,=-(SP)
#FNC.8,-(SP)
#EOR.FAT ,=-(SP)
#5,-(SP)
SP,RO
14

R2, (SP)

#ENRT
4 ,-(SP)

’

;

SP,
¢

: DAT.PAT,s

5259

TEST

SECTION

9534
9535
9536
9537 033676
9538 033702

9555
9556
9557
9562
9563
9567
9571 033754
9572 033754

9573 033760
9574 033762
9575 033764
9576 033766
9577
9578
9579
9584
9585
9586 ;

23-0(T-80 09:11

PAGE 219

SEQ 0211
TOPS

MLG

000002

9539
9540
9541
9542

033704
033706
033712
033716
9543 033720
9544 033722
9545 033724
9546 033726
9547 033730
9548 033734
9549 033736
9550 033740
9551 033742
9552 033746
9553 033750
9554 033752

MACRO M1113

000001
000020

3%
4%:

000017

001004
016700
104451
1046444

156220

000207

5¢:
:

;

004767
104466
006000
103773
000207

177552

—

HARDWARD

LOGIC

MOV
MOV
TRAP
MoV
ADD

TRAP

ROR
BLO
ASL
INC
CMP
BLE
DEC
BNE
MOV
TRAP
TRAP

RTS

Routine Size:

stack

JSR
TRAP
ROR
BLO
RTS

.
;

5277

PA:<

Maximum

w —

JIMLAAD ML-11

!<BLF/PAGE>

#2,-(SP)

SP,RO

SP,»

#1,R1

;

*,DODU.FLG

220,
¢
67

5260
5256
5261

; DAT,PAT
; COUNT
,»
; COUNT

52€6
5245

;

5269

DODU.FLG

ML.LUN,RO

5272

Lé
PC

5209

73 words

depth per invocation:

PC,8$T15
66
RO
1%

13 words

5274

Routine Size:
6 words
Maximum stack depth per

1nvocation:

0 words

CZMLAAD ML-11 LOGIC TEST
HARDWAPD TEST SECTION

MACRO M1113

23-0(T-80 09:11

1
E
PAGE 220

R )

9638

9639

PR YRR IR IETE T

9636
9637

9640
9641
9642 :

~O 00 00 O 0O 0B 00 00 OO 00 LI ~ ~
OO0 N NN
2O 000
~

;

9620 ;
9621 ;
9622 ;
9623
9624
9625
9626
9627
9628
9629
9630
9631
9632
9633
9634
9635

AN
N WNAOWNWANWNA
VWAL
AINLALNI
NN AINININININOND

;
;
.
;
.
:

5298
5299
5300
5301
5302
5303
5304
5305

WA —=200

9619

;

5297

44
:32

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (58)

;

BGNTST;
Lee
|

i
i
i
i
i
i
i
i
i
i
i

TEST NUMBER:

TST

TEST NAME:

ATA BIT

TEST

;EST THE ATA BIT FOR SETTING
Y:

SETTING A BIT
REGISTER.

IN THE ERROR

TEST THE ATA BIT FOR CLEARING

AFTER BEING SET BY:
1.
WRITING A FUNCTION TO MLCS1.

!
|
|

i
i
i
i

WRITING A ONE
UUNJTS ATA BIT

INTO THIS

TEST THE ATA BIT FOR NOT CLEARING

AFTER BEING SET BY:

i
i
i
i
i
i

TEST DESCRIPTION:

OO NO NS NN =2O VO NN

9611
9612
9613
9614
9615
9616
9617
9618

TRTR

9610

22-0ct=-19
22-0

WA WAV
WA WA W VAVA
LYWV AL (9,
A L U U W U LN AN U AN AN AN N W AN AN N N NN NN
PNOPINLRO PRI RININI A b b b ccd ek =D b =D b —d OO0

~o
~

9588 ML4
9589 ;

SEQ 0212

IMPLICIT

WRITING A ONE INTO THE
ATA BIT OF THE OTHER
UNITS,
INPUTS:

NONE

local

ATA_SAVE : bitvector (81,
DAT_PAT;

CLR_MBUS;

'STORES ALL 8 ATA BITS ON READS AND WRITES
'DATA PATTERN

MLER = ONE;

'SET THE ATA BIT

ATA_SAVE = _MLAS;

'READ THE ATTN REGISTER

i; LATA_SAVE [.ML_DUT] IS_NOT_SET

'SEE

MLER = ZERO;

then

begin

ERRDF (51, ASYNC, 0);
end;

IS SET

'ERROR AND EXIT_TST IF NOT SET

PRINTB (FOR_FMT, WRD_15, PHR_1, wRD_11, FNC_8);

Exér_rsr:

IF THIS DRIVES ATA BIT

CIMLAAD ML=-11 LOGIC TEST
HARDWARD TESYT SECTION

MACRO M1113

23-0CT-80 09:11

9644 ;MLL

22=-0ct=1980 10:45:32

9647 ;

5330

9650 :
9651 :
9652 :

5333
5334
5335

9653
9654 ;

9655
9656
9657
9658

;
;
;
;

9659 ;

9660 ;
9661 ;

9662 ;
9663
9664 ;

3222 ;
9667 ;

9668 ;

9669 ;

5331
5332

5336
5337

5338
5339
5340
5341
5342

5343
5344
5345
5346
5347

g%zg
5350
5351

5352

9670 ;

5353

9672
9673
9674
9675
9676
9677

:
:
:
;
:
;

5355
5356
5357
5358
5359
5360

9681

;

5364

9684 ;
9685 ;

5367
5368

9671

9678 ;
gggg ;
9682 ;
9683 ;
9686
9687
9688
9689

;
;
;
;

9691

;

9690 ;

gbg% .
9694 ;

ATTN IS_NOT_SET

then

5361
gggg
5365
5366

end;

ML(S1 = NOOP;

'TRY TO CLEAR THE ATA BIT WITH NOOP FUNC

if _ATTN IS_SET
then
begin

'SEE

EXIT_TST;
end;

ATA_SAVE = _MLAS;

'READ THE ATTENTION REGISTER

if .ATA_SAVE [.ML_DUT] IS_SET

'SEE IF THE ATA REG GOT CLEARED B8Y NO-0OP

then

begin

ERRDF (58, ASYNC, 0);
PRINTB (FIV_FMT, WRD_15, PHR_2, WRD_11, FNC_2, WRD_19);
end;

BGNSUB;
MLER = ONE.
MLER = ZERO;

'SET THE ATA BIT

ATA_SAVE [.Mi DUT] = ONE;
MLAS = _ATA_SAVE;

ISET ATA SAVE FOR THIS DRIVE
'TRY TO TLEAR THE ATA BY WRITING TO IT.

ATA_SAVE = ZEROES;

'"CLEAR ATA_SAVE

if .ATTN IS_SET

'SEE IF THE ATA GOT CLEARED

then

beqin

ERRDF (54, ASYNC, 0):
'ERROR If NOT CLEARED
PRINTB (FIV_FMT, WRD 15, PHR_2, WRD_11, WRD_17, REG_S);

5374

MLER = ZERO;

5377

5378
5379

9698 ;

5381

5380

IF ATA GOT CLEARED

ERRDF (53, ASYNC, 0);
'ERROR AND EXIT_TST [F SET
PRINTB (FOR_FMT, WRD 15, PHR_2, WRD_11, FNC_2, WRD_19);

ENDSUB;
BONSUB;

g%;g

'GEE IF THE ATIN BIT IS SET

beain

5369
5370
5371
5372

5373

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.Z2 (58)

ERRDF (52, ASYNC, 0);
'ERROR AND EXIT_TST IF NOT SET
PRINTB (FIV_FMT, REG_2, WRD_16, PHR_1, WRD_11, FNC_8);
EXIT_TST;

5354

9695 .
9696 ;

9697 ;

SEQ (0213

22=0ct=1980 10:47:44

ggzg :
9648 ;
9649 ;

Fo1

PAGE 221%

end;

MLER = ONE;

'SET ThHE ATA BIT

DAT_PAT = ONt;

'DATA PATTERN QOF ONE IN FIELD OF ZEROES

incr ATA_SEL from 0 to 7 do

'REPEAT LOOP 8 TIMES

begin

it ATA_SEL neq .ML_DUT

then

'SKIP IF ATA_SEL EQLS THIS DRIVE NO.

CIMLAAO ML-11

HARDWARD

TEST

9700
9701
9702
9703
9704
9705
9706
9707
9708
9709
9710
9711
9712
9713
9714
9715
9716
9717
9718
9719
9720
9721

JMLS

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

222

begin

MLAS

it ,ATA_SAVE
then
begin

ERRDF

PRINTB

[.ML_DUT]

FMT, uno'1s,

PRINTB (FMT_7,

exitloop;
end;

033770
033774
034002
034006
034010
034014
034022
034026
034034
034040
034044
034046
034050
9743 034052
9744 034054
9745 034056
9746 034060
9747 034062
9748 034064
9749 034070
9750 034074
9751 034076
8752 034102
9753 034106

IS_NOT_SET

(55, ASYNC,
(SIX

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (58)

'WRITE DAT PAT TO ATA REGISTER
'READ ATA REG BACK

_DAT_PAT;

ATA_SAVE
= TMLAS;

;
;
;
;
;

SEQ 0214

22-0ct- 380 10:47:44
22-0ct=1980 10:45:32

;

9722 :

9726
9730
9731
9732
9733
9734
9735
9736
9737
9738
9739
9740
9741
9742

LOGIC

_Ban)y;

'SEE

THIS DRIVE

ATA IS CLEARED

.ERROR AND EXIT LOOP IF

CLEARED

PHR_6, WRD_11, WRD_17, REG_S, PHR_7);

end;

DAT_ PAT
end;

5401

006167
152777
016700
010004
042704
162777
150477
012777
005077
017746
010001
006201
006201
006201
010602
060201
010146
010046
042716
012746
005046
004767
062706
005700

.SHIFT DAT_PAT AND REPEAT

.DAT_PAT*ONE;

ENDSUB;
ENDTST;

150044
000040
156162
177770

000007
155712
000001
155720
155724

177770

000001

147000
000010

155736

155716
155724

$T16:

JSR
BISB

MOV
MOV

BIC
BI(B
BISB

MOV

CLR

MOV
MOV

R1,$SAVEL

#40,3ML
. REG+40
ML.DUT,RO
RO, R4

#177770.R4

#7,3ML _REG+40
R4 .aML .REG+40
#1.3ML.REG+60
ML .REG+60
aML.REG+70,-(SP)
RO,R1
R1
R1
R1

ASR
ASR
ASR
MOV
ADD
MOV
MOV

R1.=(SP)
RO, - (SP)

MOV

#,-(SP)

BIC

(LR
JSR

ADD
TST

SP,R2
R2.R1

177770, (5P)
-($P)

PC,BLSGT2

nd,sp

«,ATA.SAVE

;

ATA_SAVE
,»

9760 0341
9761 0341

9762
9763
9764
9765
9766
9767
9768
9769

0341
0341
034126
034132
034136
034142
034146
034152

9801 034312
9802 034316
9803 034322
9804 034326
9805 034332
9806 034334
9807 034336
9808 034340
9809 034344

PAGE 223

SEQ 0215

001026
104455
000063
007444
000000
012746
012746
012746
012746
012746
012746
010600
104414
104463
062706
000467
032777
001026
104455
000064
007444
0000C0
012746
012746
012746
012746
012746
012746
012746
010600
104414
104463
000433
012777
005777
100031
104455

BNE

.WORD
.WORD
.WORD

TRAP

007046
005750
006542
006006
005400
000005

MOV
MOV
Mov
MOV
MOV
MoV
MOV
TRAP
TRAP
ADD

000014
100000

155554

1%:

007046
005750
006542
006014

005414
000006

000001
155464

155420

2%:

006040
006766
005750
006560
006006
005400
000006

000016
000544

BR
BIT
BNE
TRAP
.WORD
.WORD
.WORD

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
TRAP

007312

3%:

49:

(V.1]

sMLG
N —2

9755
9756
9757
9758 0341
9759 0341

23-0(T-80 09:11

MOV

IST
BPL
TRAP
.WORD
.WORD
. WORD
MOV
MOV
MOV
MOV
MOV
MoV
MOV
MOV
TRAP
TRAP
ADD

JMP

(a
N o]

L 0GIC TESTY
HARDWARD TEST S ECTION

norO
NN

MACRO M1113

CIMLAAD ML-11

t-1980
t-1980

TOPS
PA:<

5325

ASYNC

5326

RENC.8,=(SP)
#WRD . 11 -(SP)
#PHR.1,=(SP)

#WRD .15 -(SP)

#FOR.FAT,-(SP)

#5,-(SP)

SP RO
14

;

SPLe

,322
5324
5330

#4,5P
48

#100000,aML .REG+50

5333
0
#FENC.B,=(LP)

5334

#WRD. 11 -(sP)

#WRD.16 -(SP)
#PHR.1,~(SP)

#REG.2,-(SP)

FFIV.FMT,=(SP)
#6,-(SP)

SP,RO

SP'.

63
33

5330

aML
. REG+50

5340

#1,aML .REG

5343
0

5344

#WRD . 19 -(SP)
FENC.2,-(SP)

#WRD .1i -(SP)
¥PHR .2,(SP)

#WRD.15,-(sP)

¥FOR_FMT,-(SP)
26,-(SP)

SP.RO
14

#6,5P
12%

Sp'.

HARDWARD TEST

MACRO M1113

SECTION

9811
9812
9813
9814
9815
9816
9817
9818
9819
9820
9821
9822
9823
9824
9825
9826
9827
9828
9829
9830
9831
9832
9833
9834
9835
9836
9837
9838
9839

23-0(T-80 09:11

PAGE

[

2264

1
SEQ 0216
7:44
:45:32
Lk

CIMLAAO ML=-11 LOGIC TEST

034534
034536

34540

34544
034550
034554
034556
034562
034570
034574
034576
034600
034602

—
—

5¢:

[
o

o~ &~

017716
016701
006201
006201
006201
010602
060201
010146
016746
062716
012746
005046
004767
062706
005300
001026

034350
034354
03430
034362
034364
034366
034370
034372
034374
034400
034404
034410
034412
034416
034422
034424
034426
034430
034432
034434
034436
034442
034446
034452
034456
034462
9840 034466
9841 034472
9842 034474
9843 034476
9844 034502
9845 034504
9846 034512
9847 034516
9848 034520
9849 034524
9850 034526
034530
034532

[V 1V, ]

JMLG

155570
177770

012746
010600
104414

MOV

CLR
JSR

1646464

000010

ADD

DEC
BNE

TRAP

000G06

000016

012777
005077
005016
016701
006201
006201
006201
010602
060201
010146
016746
062716
012746
011646
004767
016677
005777

000001

100026
1046455

000066
007444

.WORD
.WORD
.WORD

006040
006766
005750
006560
006006
005414

062706

104402

Mov
ASR
ASR
ASR
MoV
ADD
MOV
MOV

BlC

000001

104455

000072
007444
000000
012746
012746
012746
012746
012746
012746

MOV

15524¢

155246

CLR

155444

155424

177770

146556
155154

155200

ML.DUT,R
R
R
R1

$P,R2

R2.R1
RY.-(SP)
SP)
ML .DUT,=
0177770, (5P)

5350

5353

5354

#WRD .15, -(SP)

FFIV.FMT ,=-(SP)
#6,-(SP)

SP.RO
14

;

SP,»

#1,3ML.REG+60

aML .REG+60

ATA.SAVE

(SP)

£1,-(SP)
(SF),=(SP)

R1
R1

SP,R2
R2.R1
R1.-(SP)
ML DUT,=(SP)

;

5352
5355
5358
5359
5360
5361

ATA_SAVE,*

177776, (sP)
PC,BLSPU2

10(SP),aML .REG+70
ML .REG+SO

BPL

.WORD
.WORD

ASYNC

TRAP

5348

ATA.SAVE,*

#WRD.19,-(SP)
#ENC.2,=(SP)
#WRD.11,-(SP)
#PHR .2 ,=(SP)

MOV
MOV

JSR

;

ATA SAVE

PC,BLSGT2
#10,SP
RO
6%
55
72
Ssvnc

ML.DUT,R1
R1

MOV
ST

#,-(SP)
-($P)

MOV
ASR
ASR
ASR
MOV
ADD
MOV
MoV

BIC

000001

000010

MOV
Mov
MOV
MOV
MOV
Mov
Mov
MOV
TRAP
ADD
TRAP
MOV
CLR

(SP)
aML.REG*T70,

TOPS
PA:<

55
66

ATA_SAVE,*

5362
5364

5367

CIMLAAD ML=-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

9867

J_1
PAGE 225

SEQ 0217

SMLG

22-0ct-1980 10:47:44

22-0ct=1980 10:45:32

gggg
9870 034604

000000

9872 034612

012746

9871 034606

9873 034616
9874 034622

9875 034626
9876
9877
9878
9879

23-0CT-80 09:11

034632
034636
034642
034644

9880 034646
9881 034652
9882 034656

MOV

#REG.S,-(SP)

012746
012746

005750
006560

MOV
MOV

#WRD.11,-(SP)
#PHR.2,-(SP)

012746
012746
012746
010600
104414

006022

000001
155060
000001

9893 034716
9894 034722
9895 034726

010477
017716
010201

155046
155062

9899 034736
9900 034740
9901 034742
9902 034744

010600
060001
010146
010246

9896 034730
9897 034732
9898 034734

020302
001467

012746
005046
004767
062706
005700
001040

9911 034776

000067

007444

9914 035004

012746

9916 035014

000000

012746

155064

8$:

9% :

ADD
ADD
TRAP

ROR
8LO

TRAP
MOV
CLR
MOV
CLR
MOV
CMP
BEQ

MOV
MOV
MOV
ASR
ASR
ASR

177770

000001

146116
000010

104455

9912 035000

9915 035010

155256

006201
006201
006201

9904 034752
9905 034756
9906 034760
9907 034764
9908 034770
9909 034772

9913 035002

MOV
MOV
MOV
TRAP

006000
103707

9903 034746 042716

9910 034774

MOV

005414
000006

104402
012777
005077
012704
005003
016702

9891 034712
9892 034714

MOV

006006

000016
000010

9885 034664
9886 034666
9887 034674
9888 034700
9889 034704
9890 034706

007334

062706
062706
104467

9883 034660
9884 034662

WORD

012746

MOV
ADD
MOV
MOV

BIC

MOV
CLR
JSR
ADD
TST
BNE

TRAP

007334

012746 006022

5366
5355
5369

2
#1,aML.REG+60
aML .REG+60
#1.R4
R3
ML.DUT.R2

:
:
:
o« DAT.PAT
L ATALSEL
:

5371
5373
5374
5375
5377
5380

R4 ,aML .REG+70
aML . REG+70, (SP)
R2,R1

. DAT.PAT,+
T x,ATA.SAVE
:

5383
5384
5386

SP,RO
RO,R1
R1.=(SP)
R2,=-(SP)

: ATA.SAVE,*

RO
63

R3,R2
10$

R1
R1
R

#1,-(SP)
-(SP)
PC,BLSGT?
no,sp
RO
108

#PKR.7,-(SP)

#WRD.11.=(SP)
#PHR .6, - (SP)

MOV

9920 035034
9921 035040

012746
012746

005432
000007

MOV
MOV

MOV

;

5389

;

5390

ASYNC

#REG.S - (SP)

MOV
MOV

$187770. (sP)

MOV

005750
006660

;5P

;
:
:

012746
012746

5368

#16,5P
#10.5P
67

WORD

9917 035020
9918 035024

9919 035030 012746 006006

#EIV.FMT,=(SP)
#6,-(SP)
SP,RO
14

MOV

#WRD.15,-(sP)

LWORD
.WORD

006672

#WRD
.17 ,-(SP)

TOPS

PA:<

#WRD.17,-(SP)

. 15,-(5P)
#wrD

#SIX.FMT,-(SP)
27,-(SP)

CIMLAAD ML-11

HARDWARD

TEST

SECTION

23-0(CT-80 09:11

PAGE 226

SEG 0218

2 2 0 c t -198 010 14744
2 2 0 c t -198 0 10: 45:32

JMLG
035044
035046
035050
035052
035056
035062

9944
9945
9946
9951

10%:

000207

9968
9973
9974
9975 .

B8R
ASL
inG

DAT.PAT

ATA SEL
ATA SEL,

5398

12%:

8LO
TST

5276

103773

.
;

5402

'<BLf/PAGE>

5397
5377

BLE
TRAP

—y

9965

176644

SP,e

11%:

:
;

004767
104466
006000

5391

5392

(MP

9952
9956
9960
9961
9962
9963
9964

;

ADD

ROR

RTS

Rougine Size:
300 words
Maximum stack depth per inyocation:

w —

9943

DAT.PAT,«

TRAP

000024

TOPS
PA:<

SP,e

MOV
TRAP
MOV
MOV
MOV
MOV

004520
000002

9934

9935
9936
9937
9938
9939
9940
9941
9942

9966
9967

MACRO M1113

-—

9923
9924
9625
9926
9927
9928
9929
9930
9931
9932
9933

TEST

LOGIC

JSR
TRAP
ROR
BLO
RTS

Routine Size:

17 words

5400

PC.8T16

RO
1%
PC

6 words

Maximum stack depth per

invocation:

0 words

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST SECTION
9977 :MLL

9978
997G
9980
9981
9982
9983
9984
9985
9986
9987

;
;
;
.
;
;
;
;

5403
5404
5405
5406
5407
5408
5409
5410

;
;
;
;
;
;

5412
5413
5414
5415
5416
5417
5418
5419
5420
5421
5422
5423

9988 ;

9989
9990
9991
9992
9993
9994
9995
9996
9997
9998
9999
10000

;
;
;

;

10001 ;
10002 ;

10003 ;
10004

10005
10006
10007 ;
10008 ;
10009 ;

10010 ;
10011 ;
10012 .
10013 ;
10014 ;
10015 ;
10016 ;
10017 ;
10018 ;
10019 ;
10020 ;
10021 ;
10022
10023 .
10024 ;
10025 ;
10026 ;
10027 ;
10028 ;
10029 ;

10030 .

10031 ;
10032 :MLé
10033 .

5411

5453

5454

TOPS=20 Bliss=-16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (59)

SEQ 0219

BGNTSTM:
lee

TEST NUMBER:

TST 17

TEST NAME:

SEARCH FUNCTION TEST

TEST DESCRIPTION:

TEST THE SEARCH FUNCTION BY:

DOING A SEARCH FUNCTION AT
ARRAY ZERO AND TEST GO,

ERROR BITS AND ATTN FOR
SETTING/NOT SETTING.

5426
5427

5433
5434
5435
5436
5437
5438
5439
5440
5441
5442
5443
5444
5445
5446
5447
5448
5449
5450
5451
5452

PAGE 227

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32

5424
5425

5428
5429
5430
5431
5432

23-0CT-80 09:11

DOING SEARCH FUNCTIONS AT ALL

DOING SEARCH FUNCTIONS AT ALL
NOT PRESENT ARRAYS' AND TEST

PgESENT ARRAYS®'
S

AND TEST ATTN

ATTN CLEARED.

IMPLICIT INPUTS:

NONE

CLR _MBUS;

MLDA = zsnoes:
MLCSY= SEARCH,;

DO A SEARCH FUNCTION

if .GO IS_SET

'SEE IF GO IS SET

then

begin

'ERROR IF NOT SET
ERRDF (56, ASYNC, 0).
PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_10, WRD_19);
end;

if JILF IS_SET

then

ER8DF (57, ASYNC, 0);

'SEE IF ILF IS StV

'ERROR IF SET

PRéNIB 'FIV FMT, WRD_3, PHR_S, WRD_11, FNC_11, FNC_10, WRD_19);
end;

if ATTN IS_NOT_SET

then

begin

:SEE IF ATIN IS SET
22-0ct-1980 10:47:44
22-0ct-1980 10:45:32

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4L.BLL.2 (59)

CIMLAAD ML-11 LOGIC TEST
HAqgggzo TEST SECTION
10035
10036
10037
10038
10039
10040
10041

;
;
;
.
;
;

10042 ;

10043 ;
10044 ;

10045 :
10046 ;

10047
10048
10049
10050
10051

;
;
;
;
;

10052 ;

10053

5455
5456
5457
5458
5459
5460

SEQ 0220

ERRDF (59, ASYNC, 0):
'ERROR I1f NOT SET
PRINTB (FIV_FMT, WRD 16, PHR_1, WRD_12, "*r_10, WRD_19);
end
begin

BGNSUB;
CLR MBUS;

5467
5468
5469
5470
5471

MLDK = .ARR SEL:
MLCST1 = SEARCH;

'"LOAD DSA REG WITH ARR_SEL
'DO A SEARCH FUNCTION

it .OP] IS_SET
then
begin
ERRDF (60. ASYNC, 0);

'READ ATTN

5473

;

5481

.LST_ARR by

.ARR_INC do

'DO SEARCH AT ALL PRESENT ARRAYS

'ERROR IF NOT SET
PRINTB (FIV_FMT, WRD 4, PHR_S, WRD_12, FNC_10, WRD_19);

5472

5479
5480

from 0 to

begin

5465
5466

10061

10064 ;

5463
5464

5474
5475
5476
5477
5478

10063 ;

PAGE 227-1

incr ARR_SEL

5462

;
;
;
;
;

10062 ;

else

23-0(T-80 09:11

5461

10054
10055
10056
10057
10058

10059 ;
10060 ;

MACRO M1113

PRINTB (FMTZ9, .ARR_3EL);
end;
ENDSUB;
end;

if .OP_NUM_ARR
then

5482

Lss %0'000017°

.SEE IF LSS 17 ARRAYS ARE PRESENT

incr ARR_SEL from .LST_ARR + .ARR_INC to .ARR_16 bz.ARR_INC do

5483
$484

'DO A"SEARCH AT KLL NOT PRESENT

begin

'ARRAYS [F LSS 17

10065 .
10066

5485
5486

BGNSUB;
(LR MBUS

10069
10070
10071
10072
10073

5489
5490
5491
5492

MLDA= .ARR SEL;
MLCS1 = SEARCH;

'LOAD DSA REG WITH ARR_SEL
DO A SEARCH FUNCTION

it .OP] IS_NOT_SET
then
begin

'SEE

10067 ;
10068 ;

;
;
;
:
;

5487
5488

10074 :

5493
5494

10076
10077
10078
10079
10080

5496
5497
5498
5499
5500

10075 ;
:
;
;
;
;

10081 ;
10082 ;
10083 ;

10087

PRINTB (FMTZ9, .ARR SEL)
end;
ENDSUB;
end;

end;
ENDIST;

10088

10089
10090

22-0ct=1980 10:47:44

;

10094 035134

004167

10096 035146

016703

10095 035140

IS SET

ERRDF (61, ASYNC, 0):
'ERROR If NOT SET
PRINTB (FIV_FMT, WRD 4, PHR_1, WRD_12, FNC_10, WRD_19);

5495

5501
5502
5503

IF OPl

152777

146662

000040

155016

154572

$T17:

22-0ct=-1980 10:45:32
JSR

R1,$SAVE3

MOV

ML.OUT,R3

BISB

#40,aML.REG+40

;

T0PS

PA:<
540\

405

CIMLAAOD ML-11

HARDWARS

TEST

10097
10098
10099
10100

035152
035156
035164
035170

10102
10103
10104
10105
10106
10107
10108
10109
10110
10111
10112
10113
10114
10115
10116
10117
10120
10121
10122
10123
10124
10125
10126
10127
10128
10129
10130
10131
10132
10133
10134
10135
0136
10137
10138
10139
10140

SECTION

MACRO M1113

042703
142777
150377
005077

177770
000007
154550
154534

035202
035210
035212
035214
035216
035220
035222
035226
035232
035236
035242
035246
035252
035256
035260
035262

132777
001426
104455
000070
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414
062706

000001

035276
035300
035302
035304
035306
035312
035316
035322
035326
035332
03533
035342
035346
035350
035352
035356
035364
035366
035370
035372
035374

104455
000071
007444
000000
012746
012746
012746
012746
012746
012746
012746
012746
010600
104414
062706
032777
001027
104455
000073
007444
000000

10101 035174

10118 035266
10119 035274

10141

LOGIC TEST

012777

132777
001430

000031

154554

154476
154470

154464

1$:

006040
007074
007104
005750
006646
005646
0056414
000007
000020
100000

154364

2%:

(ML

}8}4%

PAGE 227-2

BiC
BI(B
BISB
(LR

#177770,R3
#7,3ML .REG+40
R3,IML.REG+40
ML .REG+30

B178
BEQ
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

#1,3ML .REG
1%
5§
70
ASYNC
0
#WRD.19,-(SP)
#ENC.10,-(SP)
#WRD.11,-(SP)
#PHR.2,~(SP)
#WRD.1,-(SP)
#EIV.FMT,=(SP)
26,-(SP)
SP,RO
14
#1¢,SP

TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
BIT
BNE
TRAP
.WPRD
.WORD
.WORD

55
7°
ASYNC
O
#WRD.19,-(SP)
#ENC.10,-(SP)
#ENC.11.-(SP)
#URD.11,-(SP)
#PHR.S,-(SP)
#URD.3,-(SP)
#EIV.FAT,=(SP)
#7,-(SP)
SP,RO
14
#20,5P
#100000,3ML . REG+50
3
55
73
ASYNC
@

MOV

006040
007074
005750
006560
005630
005414
000006
000016
000001

23-0CT-80 09:11

BITB
BEQ

#31,3aML .REG

#1,3ML .REG+60
28

SEQ 0221

;

5435

;

5438

;

5436

5441

;

5442

;

SP,e

;
;

5440
5445

;

5448

;

5449

;

SP,e

;
;

5447
5452

;

5455

22-0ct-1980 10:4/:44

10144
10145
10146
10147
10148
10149

035376
035402
035406
035412
035416
035422

012746
012746
012746
012746
012746
012746

10151

035432

010600

10153 035436

062706

10150 035426

10152 035434

(12746

104414

006040
007074
005760
006542
006014
005414

000006
000016

22-0ct=-1980 10:45:3%¢2

MOV
MOV
MOV
MOV
MOV
MOV

#WRD.19,-(SP)
#ENC.10,-(SP)
#WRD.12,-(SP)
#PHR
.1, -(5P)
#URD.16,-(5P)
SFIV.FMT,-(SP)

;

MOV

SP,RO

;

#16,5P

;

MOV

TRAP

ADD

#6,-(SP)

TOPS

PA-

5456

SP,e

5454

HARDWARD TEST

~No~O~
oNO

AN
PP 2l

o000
W

- OO0
00

[o Yo IO AV

letelelel=lelolelelalolafelolalelololalelalolololololele) [elelelolololalolelelalelole]o]
—d h od oD d D
e rd D
prd s
il d ol D e wd =t b ad mnd d b e i o D D e i nd D ad b

016703
005001
000467

104402
152777

016700
042700
142777
150077
010177
012777
032777
001435

154250

4%:

71 035540

79 035574

035600
035602
035604
035606

035612
035616
035620
035622
035626
035630
035632
035634
035636
035640
035642

95 035650

000074
007444
00000
012746
012746
012746
012746
012746
012746
012746
010600

1044614

062706

154154
154226

BIT

BEQ
TRAP
.WORD
.WORD
.WORD

006040
007074
005760
006646
005654
005414
000006

104467

004602

000002
000022

5%:

006000
103712

060301
020102
003707
026727
002102

152454

TRAP

BISB

MOV
MOV

104414

010116
012746
012746
010600

(LR
BR

BIC
BI(B
BISB

154232

020000

RTS
MOV
MOV

MOV

104455

169

O O O O © 0o 0o OB O 00 O OO 0O OO OO
BN
OOV NOWNE WO

000207
016702

000017

JMLé

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MoV
TRAP
MOV
MOV
MOV
MOV
TRAP
ADD
TRAP
ROR

80
ADD
cMP
BLE
CMP
BGE

0
(]

_._.—A_.—a—._..—.—b_a_..—l_l-.—b_‘—-l_.—._._l_.—b_l_.—l—D—l_.—l_b_a—.—l—b—‘_a_‘_a—l_a—l_.

S 3 CTION

alv

10154 035442
10155 035444
é 035450

23-0CT-80 09:11

10199
10200
10201
10202

035652
035656
035662
035666

10203 035672

10204 035674

10205 035676

016701
066701
016703
016702
000467

MOV
ADD
MOV
MOV

106402
152777

154034

016700
042700
142777
150077

010177

154016

153776

BR
TRAP
8158

B .2
PAGE 227-3

LST.ARR,P?
ARR,INC,R3
R1

ARR.SEL

63
2

#40,aML .REG+40
ML.DUT,RO

#177770,%0

#7,aML .REG+40
RO.GML.REG*40
R1.aML.REG+30
231, 3ML.REG
g%OOOO.SHL.REG*bo

ARR.SEL
,*

74
8SYNC

#WRD.19,-(SP)
#FNC.10,-(SP)
#JRD.12,-(SP)
#PHR.5,-(SP)

.4 ,-(SP)
#WRD
#FIV.FMT,=-(SP)
#6,-(SP)

SP,+

SP,RC

14
R1,(SP)
#EMT.9,-(SP)
#2,-(SP)

;

[

ARR.SEL,*

5473

SP,+

SP.RO
14

5470
5674

67
:
;

«,ARR.SEL
ARR.SEL,*

5461

5479

OP .NUM_ARR,#17
108

TOPS
PA:<

5482

LST.ARR,R1

ARR.INC,R1

ARR.16,R3

ARR.INC,R2
9%

7484
5485

#40,3ML .REG+40

MOV

ML.DUT,RO

MOV

#7,3ML .REG+40
RO.aML.REG+40
R1.aML .REG+30

BIC
B1(8B
BI1S8

MACRO M1113

CIMLAAD ML-11 L 0 GIC TEST

2177770,
R0

;

ARR.SEL,*

5487

CIMLAAD ML=-11 LOGKC EST
HARDWARD TEST SECTION
10211 035732

012777

10213
10214
10215
10216
10217
10218
10219
10220
10221
10222

035746
035750
035752
035754
035756
035760
035764
035770
035774
036000

001035
104455
000075

10224
10225
10226
10227
10228

036010
036014
036016
036020
036022

10212 035740

10223 036004

10229 036026

032777

007444
000000
012746
012746
012746
012746
012746

012746

012746
010600
104414
010116
012746

012746

10230 036032
10231 036034

010600
104414

10233 036042

104467

10232 036036
10234 036044
10235 036046

10236 036050

10237 036052
10238 036054
18528 036056

062706

MACRO M1113
000031

020000

004602

000002

006000
103712

060201

020103
003707
000207

#31

BNE
TRAP
.WORD

8%
59
7§

MOV
MOV
TRAP
MOV
MOV

#6,-(SP)
SP,RO
14
R1,(SP)
#EMT.9,-(SP)

MOV
TRAP

8$%:

9%:

10$:

004767

10264 036072

000207

104466
006000
103773

177050

T17::

1%:

.
5494

SP,RO
14

;

SP,»

;

#2,-(SP)

R2,R1

;

R1,R3
7%
PC

234 words
1 per

JSR

PC,$T17

RTS

TRAP
ROR
BLO

5493

ARR.SEL,*

; Maximum stack de

10260 036060

;

RO
7%

CMP
BLE
RTS

5490

SP,«

ROR
BLO

ADD

5488

;

#22,5P

TRAP

;

#FIV.FMT,=(SP)

ADD

; Routine Size:

10242

aML.REG

ASYNC
0
#WRD.19,-(SP)
#FNC.10,-(SP)
#WRD .12,-(SP)
#PHR.1,-(SP)
#WRD
.4 ,-(SP)

[, [01"

SEQ 0223

#20000,aML.REG+60

.WORD
LWORD
MOV
MOV
MOV
MOV
MOV

[ [0]"

000000

000022

MOV

BIT

005414

102461

10261 036064
10262 036066
10263 036070

154012

006040
007074
005769
006542
005654

]

10¢47
10248
10255
10259 036060

153740

4
PAGE 227-4

23-0C7-80 09:11

66
RO
1%

1nvocation:

5495

5492

5496

*,ARR.SEL

ARR.SEL,*

5482

5401

;

5501

13 words

CIMLAAO ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

D_2
PAGE 228

SEQ 0224

10270 ;ML4
1
:

10273
10274
10275
10276
10277
10278
10279
10280
10281
10282
10283

;
;
;
;
;
;

5505
5506
5507
5508
5509
5510

!
BGNTST;

;
;
;

5513
§514
5615

!
!
!

;
;

10284 ;
10285

10286 ;

10287 ;
10288 ;
10289 ;

10290 ;
10291
10292
10293
10294

67:44
:45:32

;
;
;
;

10295 ;
10296 ;

5511
5512

5516
5517

5618
6519
5520
5521

5522

5523
5524
5525
5526

5529
5530

10300 ;

5532

10301

5531

;

5533

10303 ;

5535

10502 ;

10304 ;
10305 .

10306 ;
10307 ;

10308 ;

10309 ;
10310 ;
10311 ;
10312 ;

10313 ;

10314 ;
10315 ;

10316 ;
10317 ;
10318
10319 ;
10320 ;
10324

'
!

TEST NAME:

!
!

5538
5539
5540

5545

5546
5547

5548
5549
5550
5551
55652

READ [N PRESET TEST
IN PRESET FUNCTION BY:

PERFORMING A READ~IN-PRESET FUNCTION AND
AND VV FOR SET / NOT SET.

TESTING GO, ERROR BITS

{LR_MBUS;

MLCS1 = RD_IN_PRE;

'DO A READ IN PRESET FUNCTION

'SEE

.GO [S_SET

then

IF GO IS NOT ST

begin

ERRDF (62, ASYNC, 0);
'ERROR IF SET
PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, §NC_11, WRD_19);
end;

if .ILF

then

IS_SET

begin

ERRDF

(63, ASYNC, 0);

'SEE

ILF

IS NOT SET

'ERROR IF SET

PRINTB (FIV_FMT, WRD 3, PHR_S, WRD_11, FNC_11, WRD_19);
end;

if .OPI

then

5541
5542
5543
5544

!e=-

5534

5536
5537

TST

TEST DESCRIPTION:
TEST THE READ

5527
5528

10297
10298 ;

10299 ;

e+
' TEST NUMBER:
!

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2MLL.BLL.Z (60)

IS_SET

'SEE IF OPI

IS NOT SET

begin

ERRDF (64, ASYNC, 0);
'ERROR IF SET
PRINTB (FiV_FMT, WRD 4, PHR_S, WRD_11, FNC_11, WRD_19);
end;

if .VV IS_NOT_SET

then

)
begin

'SEE IF vv [S SET

ERRDF (65, ASYNC, 0);
'ERROR IF NOT SET
PRINTB (FiV_FMT, WRD 18, PHR_1, WRD_11, FNC_11, WRD_19);
end;

ENDTST;

HARDWARD TEST SECTION

23-0CT-80 09:11

E_2
PAGE 229

SEQ 0225
7:44
:45:32
o

MACRO M1113

CZMLAAD ML-11 LOGIC TEST

000040
156062

153636

000007

153620

000021
000001

153546
153540

177770
153614

10338 036132

10339 036140
10340 036142
10341 036144
10342 036146
10343 036150
10344 036152
10345 036156
10346 036162
10347 036166
10348 036172
10349 036176
10350 036202
10351 036206
10352 036210
10353 036212
10354 036216
10355 036224
10356 036226
10357 036230
10358 036232
10359 036234
10360 036236
10361 036242
10362 036246

000016
000001

10368 036274
10369 036276
10370 036302
10371 036310
10372 036312
10373 036314
10374 036316
10375 036320
10376 036322
10377 036326
10378 036332
10379 036336

1%:

2%:

012746

#7,3ML .REG+40
RO ML .REG+40

:l.aHL.REG

TRAP

5527

#WRD .19, -(SP)
#FNC.11,-(SP)
#WRD .11, =(SP)
#PHR.2,-(SP)
#WRD.1,-(SP)
#FIV.FAT,-(SP)
#6,-(SP)

5528

76
SSVNC

SP,RO

ADD

14
#16,5P

TRAP

23
55

BITB
BEQ

MOV
MOV
MOV
MOV
MOV
MoV
MoV
MOV
TRAP
ADD

BIT
BEQ

TRAP

006040
007104
005750
006646

#177770,R0

5522
5524

.WORD
.WORD
. WORD

153450

5506

#40,
ML .REG+4O
ML.DUT,RO

#21,3ML .REG

MOV
MoV
Mov
MOV
MOV
MOV
MOV
TRAP

153534

TOPS
PA:<

MOV

.WORD
.WORD
.WORD
MOV

005414
000006
000016
020000

MOV
BIC

BlTB
BEQ

006040
007104
005750
006646
005646

036256
036262
036266
036272

81SB
BI(B
B1S8

006040
007104
005750
006560
005630
005414
000006

10363 036252
10364
10365
10366
10367

$T118:

P o

(ML

.WORD
.WORD
. WORD
MOV

MOV
MOV
MOV

oP,t
5526
5531

#1,3ML.REG+60

5534

77
Ssvuc

5535

#RD .19, -(5P)
#FNC.11,-(SP)
#WRD.11,-(SP)
#PHR.S,~(SP)
#WRD.3,-(SP)
#EIV_FMAT,=(SP)
#6,-(SP)

14
#16,SP

l%OOOO.SHL.REG*bO

3
55

Spo'

5533
5538
55461

100
GSYNC

#WRD.19,~(SP)
#ENC.11,-(SP)
#WRD .11,-(SP)
#PHR.S,-(SP)

5542

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

10381
10382
10383
10384 036342
10385 036346
10386 036352
10387 036356
10388 036360
10389 036362
10390 036366
10391 036374
10392 036376
10393 036400
10394 036402
10395 036404
10396 036406
10397 036412
10398 036416
10399 036422
10400 036426
10401 036432
10402 036436
10403 036442
10404 036444
10405 036446
10406 036452
10407
10408
10409
10414
10415
10419
10623 036454
10424 036454
10425 036460
10426 036462
10427 036464
10428 036406
10429
10430
10431
10439
10440
10441

;

MACRO M1113

SECTION

23-0(CT-80 09:11

F_2

PAGE 230

SEQ 0226
744

JMLG
012
012
012
010
10

005654
005414
000006
000016

000100

MOV
MOV
MOV

#WRD
.4 ,=-(SP)
#EIV_FAT ,=(SP)
#6,-(SP)

ADD

14
#16,5P

BNE

.WORD
.WORD
.WORD

MOV
TRAP

153354

3%:

BITB
TRAP

006040
007104
005750
006542
006034
005414

MOV
MOV
MCV
MOV
MOV
MOV

000006

000207

000016

MoV

MOV
TRAP
A ¥

;
;

004767
104466
006000

177414

JSR

TRAP
ROR

8LO

000207

RTS

:
;
5553

RTS

'<Bl f/PAGE >

SP"

5540
5545

#100,aML .REG+50

5548

55
101

ASYNC

5549

#WRD.19,-(SP)
RENC.11.-(SP)
#WRD.11.-(SP)
#PHR.1,=(SP)

#WRD.18,-(SP)

PEIV.FMT,-(SP)
#6,-(SP)

SP.RO
14

5547
5503

#16,5P
PC

120 words
Routine Size:
Maximum stack depth per invocation:

118::
1%:

103773

ADD

TOPS
PA:<

7 words

5550

PC,8T18
66
RO
1%
PC

Routine Size:
6 words
Maximum stack depth per

invocation:

0 words

MACRO M1113

CZMLAAD ML-11 LOGIC TEST

IV SV IV IV IV TV IV V. IV IV SV LV, IV, LV W TV LV TV LU LV TV LV IV AV AV IV A

Ve e (O R LU RV SV LV LV LV, LV LV,
W LV JU LV LV 19, (S RV AV IV LV LV LV LV LV UV RV, LV LV AVl
©o 0o Oo 0o 0000 NN NNNNNNN~NOOCOOOOr o OO O VNN
&~
w B =S OOV
NO VNS WA
OO0 NNV S N N —=2O 000 ~NONV

e P T
TN PR TR
TRYR PREA IR
LR N

5:32

T0PS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (61)

BGNTST;
lee

TEST NUMBER:

TST

TEST NAME:

JLLEGAL FUNCTION TEST

TEST DESCRIPTION:

TEST

THE DETECTION OF

ILLEGAL

EUNCTIONS WRITTEN TO MLCSH
Y:

WRITING ALL POSSIBLE

FUNCTIONS TO MLCS1.

ILLEGAL

THEN

TEST GO AND ERROR BITS CLEARED.

IMPLICIT INPUTS:

NONE

local
BAD_BITS,

'STORES A COUNT TO GENERATE BAD FUNCTIONS
'STORES GENERATED BAD FUN(CTION

BAD_FUNC;

BAD_BITS = ZEROES;

'CLEAR BAD BITS

incr CNT_1

from 0 to 2 do

'REPEAT LOOP 3 TIMES

BAD_BITS = .BAD_BITS ¢+ Xo'2';

'ADD 2 TO BAD_BITS

begin

'REPEAT LOOP GENERATING 'GOOD® FUNCTIONS

incr CNT_2 from Xo'1' to X%o0'71' by X0'10' do
begin
BGNSUB;
CLR_MBUS;

BAD FUNC
= .CNT_2 ¢ .BAD_BITS;
FIRST _BLK XFER T1);
MLCS1
= .BAD_ FUNC:
if JILF
then

IS_SET

'ADD BAD_BITS TO (NT_2 GENERATING BAD FUNCTIONS

'SET UP K FIRST BLOCK XFERR

'LOAD MLCST1 WITH TWO BAD FUNCTIONS
IS SET

'SEE

ILF

'IF

ILF

IS SET THEN SEE If GO IS SET

begin

IR PN IO

7:44

]

if .GO [S_SET
then

egin

10493
10494
10495
10496
10497

SEQ 0227

;

8DF (66, ASYNC, O);

10458
10459
10460
10461
10462
10463
10464
10465
10466
10467
10468
10469
10470
10471
10472
10473
10474
10475
10476
10477
10478
10479
10480
10481
10482
10483
10484
10485
10486
10487
10488
10489
10490
10491
10492

10457

W LU

10452
10453
10454
10455
10456

10451

(O IV IV IV, IV IV, IV LV IO TV Y

10443 MG
10444 ;
10445
10446
10447
10448
10449
10450

6.2
PAGE 231
l\l\

HARDWARD TEST SECTION

23-0CT-80 09:11

PRINTB (FMT_ 12, .BAD_FUN()

'ERROR [F GO SET WITH BAD FUNCTION
FNC_12, WRD_19);
WRD_11,
PR]NTB (FIV FMT, WRD_1, PHR_?,

) o
o
el
)
)
el

OO0 ~NO NN
—

0e
s
9,
Ve

else

SEQ 0228
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (61)

end

begin
ERRDF (67, ASYNC, 0);
'ERROR BAD FUNCTION DON'T CAUSE
PRINTB (FIV_FMT, WRD
3, PHR_1, WRD_11, FNC_12, WRD_19);
PRINTB
end;

it .OP]
then

(FMTZ12,

.BAD_FUNC);

'SEE

iS_SET

OP]

IS SET

begin
'ERROR [F SET
ERRDF (68, ASYNC, 0);
PRINTB (FIV_FMT, WRD &, PHR_S, WRD_12, FNC_12, WRD_19);

H
2
PAGE 232

end;

PRINTB
end;

®e

=SO OO
NN —
N S

036470
036474
036476
036500
036504
036510
036512
036514
036516
036524
036530
036534
036542
10546 036546
10547 036550
10548 036554
10549 036560
10550 036566
10551 036570
10552 036576

23-0CT-80 09:11

4o
132

(FMTZ12,

.BADFUNC);

ENDSUB;
end;

VI
NN
VN TAWN
T
NN
NIOPVPINININD
= b cd
e i od e b

D
D
D
D
D e
i
D
i
d e
d

eleleololaleleleolalalelololalela]

10499 MLs
10500
10501
10502
16503
10504
10505
10506
10507

SECTION

—

TEST

MACRO M1113

TESTY

[0 To Yo Yo Yo Fo To Yo Yool

HARDWARD

LOGIC

[V IV TV TV IV IV IV TV, IV, |

CIMLAAO ML-11

end;

5629

ENDTST;

004167
005004
005001
062704
012702
010405
060205

145364

104402
152777

016700
042700

162777
150077

010503
004767
010377

132777
001440
132777

00147

$719:

000002
000001

000040
153440
177770
000007
153172

1%:

2%:
153214
152176

i1 ¥

JSR
(LR
CLR

ADD

MOV

MOV
ADD

TRAP

B81S8
MOV

BIC
BICB
BISB
MOV

JSR

153744
153120
000001

152172

000001

153102

MOV

BITB
BEQ

8118
BEQ

R1,$SAVES
R4
R1

¥l ,R4
ALV
R4 ,RS
R2.RS

BAD.BITS
D
ONT
; *,BAD.BITS

;

; ¢,CNT.2
; BAD.BITS,»
: CNT.2,¢

#40,aML
. REG+40

ML.DUT,RO

#177776.R0

#7,3ML.REG+40
RO ML .REG+40
RS.R3
PC.FIRST.BLK.XFER
R3.aML.REG
#1.aML .REG*+60

48
#1,3ML .REG

«,BAD.FUNC

ILF

CIMLAAOD ML-11 LOGIC

HARDWARD TEST

MACRO M1113

TEST

SECTION

}8557 036600
036604
036606
036610
036614
036620

10564 036624
10565 036630
10566 036634
10567 036640
10568 036644
10569 036646
10570 036650
10571 036652
10572 036656
10573 036662
10574
10575
10576
10577
10578
10579
10580
10581
10582
10583
10584
10585

1.2

PAGE 233

SEQ 0229

22-0ct=19 80 10: 47: 44
22-0ct=-19 80 10: 45: 32

‘MLG

10556

10559
10560
10561
10562
10563

23-0(T-80 09:11

036664
036666
036670
036672
036674
036676
036700
036704
036710
036714
036720
036724

10586 036730
10587 036724
10588 036736
10589 036740
10590 036742
10591 036746
10592 036752
10593 036754
10594 036756
10595 036762
10596 036770
10597 036772
10598 036774
10599 036776
10600 037000
10601 037002
10602 037006
10603 037012
10604 037016
10605 037022
10606 037026

10607 037032
10608 037036

104455

5603

MOV
MOV
MOV
MOV
Mov
Mov
MoV
Mov
TRAP
Mov
Mov
MOV
MOV
TRAP
8P
TRAP

#WRD.19,-(SP)
#ENC.12,-(SP)
#WRD.11,-(SP)
#PHR.2,=(SP)
#WRD.1,=(SP)

5604

5%
55

5602
5611

MOV
MOV
MOV
MOV
MO\
MOV
MoV
MOV
TRAP
MoV
MoV
MOV
MoV
TRAP
ADD

#WRD.19,-(SP)
#ENC.12,-(SP)
#WRD .11,-(SP)
#PHR.1,-(SP)
#WRD.3,-(SP)

5612

BEQ

4]
55
104
SSYNC

TRAP

000102
007444

.WORD
.WORD
. WORD

006040
007124
005750
006560
005630
005414
000006

004742
000002

006040
007124
005750

006542

005646
005414
000006

004742
000002
000022
020000

152770

5%:
6%:

.WORD
.WORD
.WORD

BIT

TRAP

006040
007124
005760
006646
005654
005414
000006

TOPS
PA:<

.WORD
.WORD
.WORD

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

102
SSYNC

#FIV
FAT ,-(SP)
#6,-(SP)

SP,RO

14
R3, (SP)
NEMT
. 12,-(SP)
#2,-(SP)

SP,RO
14

SP,e

; BAD.FUNC,*
;

5605

SP,»

103
6SYNC

#FIV. FMT,=(SP)
#6,-(SP)

SP,RO

: SP,e

R3,(SP)
#FEMT.12,-(SP)
#2,-(SP)

; BAD.FUNC,»

SP.RO

14
y22,5P

SP,»
5610

5616

#20000,aML .REG+60

#WRD.19,-(SP)
#ENC.12,-(SP)
#WRD.12,-(SP)
,
= (5P)
#PHR.S
#WRD
.4, - (SP)
#EIV.EMT,-(SP)
#6,-(5P)

SP.RO

5613

5619

5620

s SP,*

HARDWARD TEST

MACRO M1113

SECTION

10610

PAGE 234

SEQ 0230
7:44
:45:32

M L4

& 037042

S 037044
6 037050

004742
000002

7 037054
8 037056

10619
10620
10621
10622
10623
10624
10625
10626
10627
10628
10629
10630

23-0CT-80 09:11

f¥
o

CIMLAAD ML-11 LOGIC TEST

037060
037064
037066
037070
037072
037076
037102
037104
037106
037112
037114
037120

000022

7%:

5621

SP,RO

14
#22,SP

5618
5622

5588

(MP
BLE
INC
CMP

5584

8GT

8%:

JMP

5552

RTS

Routine Size:
Maximum stack

141

words

depth per invocation:

15 words

004767
104466

177342

—

—y

;
;

10647 037122
10648 037122
10649 037126
10650 037130
10651 037132
10652 037134
10653
10654
10655
10660
10661
10662 ;

: BAD.FUNC,*

ADD

000002

000207

14
R3, (SP)
#EMT.12,-(SP)
#2,-(SP)

BLO

000010
000071

177360

TRAP
Mov
MoV
MOV
MOV
TRAP
ADD
TRAP
ROR

70°S
<
PA:

TRAP

906000

ROR
BLO

103773

000207

RTS

;
.

5630

JSR

!<BLF/PAGE>

5627

PC,8$T19
66

RO
1%
PC

Routine Size:
6 words
Maximum stack depth per

invocation:

0 words

10664 ‘MLG
10665
10666
10667
10668
10669
10670
10671
1067¢

‘oo

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4L.BLI.2 (62)

BGNTST:
TEST NUMBER:

TST 20

TEST NAME:

TEST DESCRIPTION:
TEST

THE

DETECTION OF

gEGISTER MODIFICATION REFUSED
Y:

WRITTING TO MLCS1, MLDA
AND MLER WHILE THE DRIVE

IS BUSY AND TEST RMR
BIT SET.

P
[
I

P R
T PR PR PN ER RN PN YN
R I
TRDR P

SEQ 0231

;

ALSO SEE IF THE DRIVE ASSERTED
EXCEPTION BY TESTING THE TRE BIT SET.
IMPLICIT

INPUTS:

NONE

R
E
R TR PR PR T P
e
A TR T P P

10695
10696
10697
10698
10699
10700
10701
10702
10703
10704
10705
10706
10707

K2
PAGE 235

]

incr CNT

begin

from 0 to 2 do

BGNSUB;
CLR_MBUS;

'REPEAT

LOOP 3 TIMES

MLCS1 = write;

'D0 A WRITE

case .CNT

'WRITE TO SELECTED REGISTERS FORCING RMR

from 0 to 2 of

FUNCTION

set

[0l
(1]

10694

PSP ST YRR YT S N S

10676
10677
10678
10679
10680
10681
10682
10683
10684
10685
10686
10687
10688
10689
10690
10691
10692
10693

23-0CT-80 09:11

22-0ct=1980 10:47:44
22-0ct-1980 10:45:3¢

10673
10674
10675

MACRO M1113

—

CIMLAAD ML-11 L 061
HARDWARD TEST S ECT

(2]

:
MLCST

= X0'000000°;

MLDA = ONES;

MLER = ONES

tes.

DELAY

(FRTY_US);

if .RMR IS_NOT_SET
then
begin

'SEE

IF RMR GOT SET

MACRO M1113

TEST
l
CZMLAAD ML-11 LO GIC

HARDWARD TEST

;MLS
;

10720
10721
10722
10723
107264
10725
10726
10727
10728
10729
10730
107
10732
10733
10734
10735
10736
10737
107461
10745
10746
10747

TION
SE Tl

037136
037142
037144

10748 037146
10749 037150
10750 037156

10751
10752
10753
10754
10755
10756
10757
10758
10759
10760
10761

037162
037166
037174
037200
037206
037210
037212
037216
037220
037222
037224

10762 037230
10763 037232
10764 037240
10765 037242
10766 037250
10767 037254
10768 037256
10769 037262
10770 037264
10771 037266
10772 037270
10773 037272
10774
10775
10776
10777 037274
10778 037276
10779 037304
10780 037306
10781 037310
10782 037312

5683
5684
5685
5686
S¢€87
5688
5689
5690
5691
5692
5693
5694
5695

5696

000767
132777

001024
104455

000105
007444

SEQ 0232

end;

if .TRE
then

!SEE

IS_NOT_SET

IF DRIVE ASSERTED EXCEPTION P

1ESTING TRE

begin

ERRDF (117, SYNC, 0);
PRINTB (FOR_FMT, WRD_20, PHR_1, WRD_11, WRD_21);

end;

ENDSUB;
end;

1644644

012777
010201
00630
066107
000006
000014
000024
005077
000407
012777
000403
012777
012700
001410
016701
001403
005016
005301
001375
005300

47:44
45:32

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (62)

'ERROR [F NOT § ET
(69, ASYNC, 0);
PRINTB (FOR_FMT, WRD 21, PHR_1, WRD_11, WRD_21);

004167
005746
005002

142777
150177

ERRDF

ENDTST;

042701

PAGE 236

22-0ct=-1980 1
22-0ct-1980 1

3697

104402
152777
016701

23-0(T-80 09:11

$120:

000040
153006

152562

000007

152544

177770

152540
000061

1%:

#40,aML.REG+40

BIC

8ICB
8158

2%:

3$:

152450

B1SB
MOV

152472

037216

TRAP

MOV
Mov
ASL
ADD

.WORD
.WORD
.WORD
CLR
BR

177777

152470

MOV

177777
000050

152510

5%:

MOV
MOV

142634

BS:
9%:

JMLS

000004

152454

10%:

BEQ

MOV

BEQ
CLR
DEC
BNE
DEC

=(SP)

ML.DUT R
#177770,R1

#7 ,8ML .REG+40

R1,aML.REG+40

#61,aML .REG

R%.R1
R

P CNT,e

4$-2%

5¢%-2%

5669
5665
5672
5665
5675
5678

aML.REG

6%
#-1,3ML.REG+30
6%
#-1,3ML.REG+60
#50,R0
10$
S$DLY.R1

*,$8$TMP?

; *,$3TMPY

$STMP

: $$TMPI

; $8$TMP2

.WORD
.WORD

105
ASYNC

TRAP

5663
5665

2$(R1),PC
3$-2%

BNE

BITB

5659
5660
5661

CNT

4)
¥4 ,GML.REG+60
11%

5629

R1,$SAVE?

JSR
TST
CLR

22-0ct-198 0 10: 4 7:44
22-0ct-198 0 10: 4 5:32

T0PS
PA:<

5680

5083

MACRO M1113

CZMLAAQ ML-11 LOGIC TEST

HARDWARD TEST SECTION

10783 037314
10784 037316
10785 037322
10786 037326
10787 037332
10788 037336
10789 037342
10790 037346
10791 037350
10792 037352
10793 037356
10794 037364
10795 037366
10796 037370

10804 037422
10805 037426
10806 037430
10807 037432
10808 037436

037460
037460
10829 037464
10830 037466
10831 037470
10832 037472
10833
10834
10835

11%:

BNE

.WORD
.WORD
.WORD

006054
005750
006542
000046
005400
000005

10802 037412
10803 037416

037440
037442
037444
037446
037452
037454
037456

152314

MOV
MOV
MOV
MOV
MOV
M3V
MOV
TRAP
ADD
BIT

TRAP

10797 037372
10798 037374
10799 037376
10800 037402
10801 037406

10809
10810
10811
10812
10813
10814
10815
10823
10827
10828

.WORD

006054
005750
006542
006054
005400
000005
000014
040000

23-0CT-80 09:11

000014

003635
005726
0002197

004767

104466
006000
103773
000207

12%:

000002

177452

1%:

MOV
MOV
MOV
MOV
MoV
MOV
MOV
TRAP
ADD

PAGE 236-1

SEQ 0233

5684

#WRD.21,-(SP)
#URD.11.=(SP)
#PHR.1,~(SP)

#rD.21,-(sP)

#FOR.FMT,-(SP)
#5,-(SP)

;

SP.RO

14
#14,5P

5682
5687

#40000,amL
. REG
128

5690

55
165

SYNC

5691

FWRD.21,-(SP)
#WRD.11.=(SP)
#PHR.1,~(SP)

#WRD.20,-(5P)

#FOR.FMT,-(SP)
£5,-(SP)
SP RO

5689
5692

TRAP
ROR
B8LO
INC
(MP
BLt
TST
RTS
JSR
TRAP
ROR
BLO
RTS

Routine Size:

SP,v

;

CNT

e
CNT,

5659
5629

95695

PC.$T20
66
RO

1%
PC

6 werds

; Maximum stack depth per invocation:

0 words

22-0rt=-1980

TOPS=-20 Bliss=16 v2(206)

PA:<NEALE>BLZIMLL.BLI.2 (63)

]

;

BGNTST;
‘e

TEST NUMBER:

TST

| TEST NAME : initial PROM TEST
I

s sttt
m

et
s
—-

TEST DESCRIPTION:
TEST THE MEMORY ARRAYS' PROM
TIMING AND CONTROL LOGIC FOR

INITIAL PROM READS BY:

READING 14 PROM LOCATIONS
AND

CHECK SUM ERRORS AT
EACH ROW COLUMN ADRS

IMPLICIT

TESTING FOR:

SUM OF

EACH PROM BIT

<9,0> GTR

INPUTS:

14,

SET

NONE

~NO VS WNr, =200
=2 OV
2O OO NO VS WA
NO VSN
2OV

X
O
PR
I
PSR
IR TP
SR
I
YR
IR
TP
PR
YR
IPEE
IR
IR
I
A
T
T
WS
I

T IV TV TV TV IV IV, [V IV TV 1V TV YV IV TV IV TV TV IV TV TV, TV TV, IV, TV, TV, TV, IV, [V IV, IV, IV, 1V, IV, IV

2O VO NO NS W
OOV NO NS AW

10891
10892
10893
10894
10895

SNNSNSNSNSNSNSNNNNSNSNSNSNSNSNSNSNSNSNNNSNSNSNSNSNNSNSNNSNSNNSNNSNSNNNSNSNSNNNNSNNNNO
A8 80282 NN AN N N N AN N ANNIINI NI NINMNOMNIPNOININ b b ed B D d D D a2 OO OOOOCOLIOOV

10875
10876
10877
10878
10879
10880
10881
10882
10883
10884
10885
10886
10887
10888
10889
10890

22-0ct=-1980

[V IV IV IV IV TV IV TV TV IV TV TV TV TV IV TV IV

10871
10872
10873
10874

10850
10851
10852
10853
10854
10855
10856
10857
10858
10859
10860
10861
10862
10853
10864
10865
10866
10867
10868
10869
10870

10848
10849

10842 ;

10843
10844
10845
10846
10847

SEQ 0234
SR o

;ML4

SECTION

N
2
PAGE 237

23-0CT-80 09:11

wd\

10841

MACRO M1113

t l\
V\l

TEST

-t

HARDWARD

LOGIC

CIMLAAD ML-11

local

OFF _SET_CNT

vector [10,

bytel,

ROW_ORED_COL : bitvector [16],
R CTSAV

bitvector

PROR ADRS,
CHK_Sum,
CHK_SUM_ERR,

[16],

BAD_NIBTCNT,
CNT-14 _BAD,
0000 flG,
ERR_FLG;

'COUNTS EACH NIBBLE OFFS3ET

'SAVES ROW DATA OR'ED WITH COL DATA
'TEMP LOCATION FOR ROW COL DATA

'PROM ADDRESS
'CHECK SUM DATA
'CHECK SUM ERROR

'COUNTS BAD NIBBLES
'COUNTS BAD NIBBLE POSITION EQL 14
'DROP UNIT FLAG
'ERROR FLAG

CLR_MBUS:

DODO_FLG = ZERO;
PROMDIS = oue.
CHK_SUM_ERR = ZEROES:

"SET PROM DISABLE MODE

incr CNT

'CLEAR OFFSET

from 0 to 9 do

OFF _SET_CNT [.CNT) = ZEROES;

incr

ADRS_CNT
begin~

from 0 to 14 do

ROS _ORED_COL = ZEROES,

COUNTS

'READ PROM DATA FROM 15 ARRAY WORDS

'CLEAR ROW ORED (OL SAVE LOCATION

CZMLAAO ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

B .3
PAGE 238

10897 :MLL

22-0ct=1980 10:47:44

}8233 ;

22-0ct=1980 10:45:32

}838? ;

g;g%

PROM_ADRS =

10902 ;
10903 .

5753
575«

incr TUICE from 0 to 1 do
begin

10905 ;
10906 ;

5756
5757

ERRTFLG = ZERO;
MLPK= .PROM ADRS;

10904 ;

10907 ;

SEQ J235

5755

5758

,ADRS_CNT;

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (63)

'GET COPY OF ADRS_CNT

'READ ROW AND COL DATA FOR THIS ARRAY WORD

BAD_NIB_CNT = ZEROES;

DELAY (ONE_US);

10908

5759

}gg}? :

g;g;

1gg}§ ;

g;gz

10914 ;

5765

CHK_SUM = _R_C_SAV<10, 3>;

}83}§ :

2;2;

it R_C_SAV [13] IS_SET then CHK_SUM = ,(HK_SUM ¢+ 1;

'ADD IN BIT 13

}8313 ;

g;gg

it .R_C_SAV [14] IS_SET then CHK_SUM = .CHK_SUM + 1;

'ADD IN BIT 14

10920 ;

5771

it .R_C_SAV [15) IS_SET then CHK_SUM = .CHK_SUM + 1;

'ADD IN BIT 15

10922 :

5773

it .R_C_SAV [15) IS_SET

10909 ;

10915 ;
{3

10921

;

5760

5766

5772

10923 ;
10924
10925 ;

5774
5775
5776

10927
10928
10929
10930
10931

;
;

5778
5779
5780
5781
5782

10933 .
10934

5784
5785

10926 ;

:
;

10932 :

10035 ;

10936
10937
10938
10939

;
;
.
;

C_SAV = ,NMLPD;

'LOADING MLPA INITIATES PROM READ

incr BIT_CNT from 0 to 9 do

then

'GET THE (HECK SUM BITS

1S BIT 15 SET

begin

it .BAD_NIB_CNT Lss .CHK_SUM then ERR_FLG = ONE;
else

5783

5787
5788
5789
5790

'COUNT NUMBER BITS SET IN <9:0>

it .R_C_SAV [.BIT_CNT) IS_SET then BAD_NIB_CNT = .BAD_NIB_(NT + 1;

€777

5786

'GET THE ROW OR COL DATA

'SET ERROR FLG IF CHECK SUM ERROR

end
begin

it .BAD_NIB_CNT neq .CHK_SUM then ERR_FLG = ONE;

'SET ERROR FLG IF CHECK SUM ERROR

end;

if .ERR_FLG IS_SET

then

'WAS THERE A CHECK SUM ERROR

5791

8
'REPORT INTERMEDIATE ERROR If YES
RRDF (70, INTER, 0);
PRINTB (SIX FMT, FNC_21, WRD_10, WRD_1¢, WRD _45, WRD_35, FNC_6);

10942 ;

5793

DODU_FLG= ONE;

10945 ;

5796

ROW ORED (0L= (.ROW _ORED_COL) or (.R_C_SAV);

5798
5799

end;

10940 ;

10941 ;

10943 ;
10944 ;

10946 ;

10947 ;
10948 ;

5792

5794
5795

5797

}83%8 .

ggg?

10951 ;

5802

PRINTB (FMT"10, CHK_SUH R_C SAV)
end;

'OR ROW AND COLUMN DATA

PROM_ADRS = (.PROM_ADRS) or (Xo' 2000°7," GET COLUMN DATA

incr index from 0 to 9 do

'GET TOTAL OFF SET COUNTS FROM THE 15 ARRAY WORDS

if .ROW_ORED_COL [.index) IS_SET then OFF _SET_CNT [.index) = .OFF_SET_CNT (.index] ¢ 1;

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION
10953 ;M
4

MACRO M1113

23-0(T-80 09:11

¢. 3
PAGE 239

22-0ct-1980 10:47:44

22-0ct=1980 10:65:32

}832? :

10956
10957
10958
10959
10960

:
;
.
;
;

5803
5804
5805
5806
5807

}8322 :

gg}?

10965 ;
10966 ;

5812
5813

10968 ;
10969 ;

5815
5816

ERRDF

10971

5818

then

5820

else

1%323 :

10967 ;

10970 ;

;

10972 :

10973 :
10974 ;

gggg

5814

'COUNT HOW MANY OFFSET COUNTS GEQ 14

incr CNT from 0 to 9 do

it .OFF_SET_CNT [.CNT] geq 14 then CN”_14_BAD = .(NT_14_BAD ¢+ 1;
if .CNT_14_BAD neq ZERO

then

5817

begin

.WAS ANY _*F_SET COUNTS GTR ZERO

(71, ARR_DAT, 0);

'ERROR IF

it .CNT_14_BAD eql 10

5819
5821

PRINTB (SIX_FMT, WRD_55, WRD_S&4, WRD_46, WRD_S1, WRD 42, WRD_40)
begin

5824

incr CNT from 0 to 9 do

183;8 :

gggg

10981

;

5828

10983 ;
10984 ;
10985
10986 ;

5830
5831
5832
5833

10988
10989
10990
10991
10992
10993
10994
10998

5835
5836
5837
5838
5839
5840
5841

;
;
;
;
;
;
;

11002 037474

11003 037500

11004 037504

11005 037512
11006 037516

11007
11008

11009

11010 037522
11011 037530

11012 037534
11013 037540
11014 037546
11015 037550

004167

162706
152777

C16705
042705

142777
150577

005066
152777
005002
012701

'PRINT MESSAGE

'"FIND OFFSETS GEQ 14

if .OFF_SET_CNT [.CNT) geq 14 then PRINTB (FMT_13, .CNT, (.OFF_SET_CNT [.C(NTD));

5829

5834

'ERROR IF YES

'If NO THEN PRINT WHICH ONES WERE

10977 ;

5825

YES

'WERE ALL 10 NIBBLE OFFSETS GEQ 14

PRINTB (FOR_FMT, WRD_46, WRD_47, WRD_42, WRD_40);

10987 ;

PA:<NEALE>BL2ML4L.BLI.2 (63)

CNT_14_BAD = ZEROES;

ggg%

10982 ;

SEQ 0236

end;

18352 ;

10978 ;

.
TOPS=20 Bliss=16 v2(206)

'PRINT NIBBLE POSITION AND COUNT

end;

DODU_FLG = ONE;
end;

if .DODU_FLG IS_SET
then

‘DROP THIS UNIT IF DODU_FLG SET

begin

DODU (.ML_LUN);
DOCLN;
end;
ENDTST;

144360

000030

000040

152452
177770

000007
152204

000002
000040
000016

$T21:

152226

JSR

SUB

BISB
JMLG
:

152210

152252
1$:

R1,$SAVES

;

5697

#40,9ML .REG+40

5738

#30,sP

MOV
BIC

HL.DUT&RS
#177777 RS

BI(CB
BISB

#7,3ML .REG+40
RS,aML .REG+40

(LR
BISB
(LR
MOV

2(SP)
#40,8ML .REG+120
R2
96,01

22-0ct=-1980 10:47:44
22-0ct-1980 10:45:32

: DODU.FLG
:
; CHK.SUM.ERR
:

T0PS
PA:<

57461
5742
97463
5746

4%:

142262

o
AN

W
~

(=]

5%:

000014

6%:
152252

000012

(=4
o
W
N

(=4
o

(=]

132766
001401

005203
132766
001401

Bl.

MOV
CLR
JSR
ADD

:
9%

000011

DEC
BNE
INC
INC
CMP

BLE

000012

MOV

JMLG

177770

CLR

MOV
ADD
ADD
MOV
MOV

W
~
N

042703

BEQ
(LR
DEC
BNE
DEC
BR

ASR
ASR

000004

ASR

ASR
SWAB

000040

000013

000100

000013

10%:

8lC
Bl 18
BEQ
INC
B/TB
BEQ

PROM_.ADRS
,¢

;¢

— O 00

O N

+,$8TMP2

LSDLY,RZ

BEQ

MOV
ASR

143156

MOV

8%:

000010

BAD.NIB.CNT
ERR.FLG

6(SP) ,aML.REG+100

MOV

177770
000001

R&
4 (5P)
(SP)

MOV
MOV

7%:

000012

005046
004767
062706
005300
001002
005266
005202
020227
003745
016603
006203

CLR
CLR
CLR

152156

MOV

ADRS.CNT
ROW.ORED.COL
ADRS.CNT ,PROM.ADRS
TWICE

10(SP)
RS,6(SP)

~
&

000004

3%:

CLR

CNT
CNT,

2s:

000006
000001

006203
000303

-t

000C10
000006

¢
(NT,

VW LV LV, ]

00001

6 037734
57 037740
58 037742
59 037746
60 037750
61 037754

~N -~

CLRB
INC
CMP
BLE

SEQ 0237

OFF.SET.CNT,«

NNSNNSNNNN
VAWV AL S

37556

SP,R1
R2,R1
(R1)

(U RV RV LU LV

ADD
ADD

,88TMP1

$STMP
$$TMPY
48

$$TMP?
5759
5761
5763

ML .REG+230,12(SP)

R?
R2,R1
R1
R1
R
#12,R0
SP,RO
RO,R1
R1,-(SP)

R2.-(SP)

97770, (sP)

BIT.CNT,»

01 ,-(SP)
-($P)
PC,BL®%
¢
00,sp

— e P
——

o
W
N
N

VAN

8000000 [V
P )

elololele) (slolelolelololalololalolelololelolololelololelelo]

— > =
~ BB
8 £ 5 B NN NN N W N
W
N N RO N N NN POPIND
o WVE NN =2 OO0 NO VMBS WN—2O000NO
VNS WN—-O V0o~

11016 037554

0.3

PAGE 239-1

HAROWARD TEST

23-0CT-80 09:11

NIB.CNT
.CNT
,»
CNT

5761

C.SAV,(HK.SUM

5765

12(SP) ,R3
R3

MACRO M1113

CIMLAAD ML-11 LO

R3
R3
nn 0,R3
260,13 (SP)
108
R3
#100,13(sP)

(HK.SUM
K
. SUM
CH
+,(HK.SUM
*,R.C.SAV+]

5767

. CHK,SUM
* ,R.C.SAV+]

5769

. SUM
HK

22-0ct~198 0 10: 4 7:44
22-0ct-198 0 10: 4 5:32

T0PS
PA:<

96 040106
87 040112

12%:

000004
000001
000001

104455
000106

007622
000000
012746
012746
012746
012746
012746
012746
012746
012746
010600
104414
016616

010346
012746
012746
010600
104414
012766
062706
056666
052766
005204
020427
003002
000167

007030
006220
006324
005760
005740
007242
005432
000007

000001
000026
000012
002000

066201
006201
012700
060600
060001
010146
010246

000030

MOV

CMP
BNE
TRAP
.WORD
.WORD
.WORD

000010
000006

MOV

16%:

JMLS
17%:
18%:

000010

ADD

BI1S
BIS
INC
CMP
BGT
JMP

CLR

MOV
ASR
ASR
ASR
MOV
ADD
ADD
MOV
MOV

PAGE 239-2

SEQ 0238

CHK.SUM

5771

R.C.SAV+1

1518
BPL
INC
INC
ROR
BCC
(MP
BGE
BR
CMP
BEQ

MOV
MOV
MOV
MOV
TRAP

000001
177364

INC

CLR

MOV
TRAP
MOV

004634
000003

23-0CT-80 09:11

MoV
MOV
MOV
MoV
MOV
MOV
MOV
Mov

000032

005002
010201
006201

040244

000004
o

005202
005203
006002
103004
026603
002006
000403
026603
001402
012716
021627
001044

000013

L& o

105766
100002

11%:

—

078 040024
079 040026
080 040030
081 040032
082 040036
083 040040
084 040042
085 040046
086 040050
087 040054
088 040060
089 040082
090 040064
091 040066
092 040070
093 040072
094 040076
095 040102

005203
005002

L B

040010
040012
040014
040020
040022

SECTION

—

11073
11074
11075
1076
077

TEST

(W,

HARDWARD

MACRO M1113

— g~
=D D — p- ]
O
=2 N~ LS N AN NI LN
o~
[ X% X X
%X ]
o O~

CZMLAAO ML-11 LOGIC TESY

CHK.SUM

5773

P),R3

BAD.NIB.CNT,CHK.SUM

5777

P),R3

BAD.NIB.CNT,CHK.SUM

5783

(SP)
),
M

* ,ERR.FLG
ERR.FLG,*

5787

5790

5791

#ENC.6,-(SP

#WRD.35,-(5P)

#WRD
.45 .= (SP)
FWRD.12.-(SP)
#WRD.10.~(SP)
FENC.21.-(SP)

¥SIX.FMT.-(SP)

#7,-(SP)

5P RO

SP,

32(SP), (SP)

R.C.SAV,
CHK.SUM,*

SP,RO

SP,
¢

#1,30(5P)
#26,SP
12($P),10(SP)

*,DODU.FLG

5793

R.C.SAV,ROW.ORED.COL
+ .PROM. ADRS
TWICE
TWICE,*

5753

R3,-(SP)
REMT.10,-(5P)
#3,-(sP)
14

:EOOO.b(SP)

5792

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32
X
INDE
INDEX,*

R2
R2,R1
R1
R1

SP,RO

RO, R1
R1,-(SP)
R2,-(SP)

ROW.ORED.COL,*

,¢
INDEX

5789
5796
5797

TOPS
PA:<
5800

5802

CIMLAAOD ML-11 LOGIC TEST

HARDWARD TEST SECTION
11130 060250
042716

11131 040254

012746

11132 060260
11133 060262

005046
004767

11135
11136
11137
11138
11139
11140
11141
11142
11143

005300
001005
012701
060601
060201
105211
005202
020227
003742

11134 060266

040272
060276
060276
060302
040304
040306
040310
040312
040316

11144 0640320
11145 040322

11146 040326
11147 040330
11148 040334

11149 040336
11150 040340

11151
11152
11153
11154
11155

062706

005205
020527

003002
000167

005000

005001
012702

040344
040346
040350
040354
040356

060602
060102
121227
10340
005200

11157 060362
11158 040366

020127
003764

11156 040360

005201

MACRO M1113

BIC

#177770, (SP)

142614

CLR
JSR

-($P)
PC,BLSGT2

000001

000011

177240

000016

000011

012746
012746

006260
006300

11169 040422
11170 040426
11171 040432

11172
11173
11174

012746
012746
012746

DEC
BNE
MOV
ADD
ADD
INCB
INC
CMP
BLE

INC
CMP

20%:

21%:

000016

000012

001024

19%:

000016

020027

11166 040410

ADD

000016

11165 040404

11167 060412
11168 040416

MOV

000010

005700
001505
104455

000107
007534
000000

F.
3
PAGE 239-3

177770

11159 040370
11160 040372
11161 040374

11162 040376
11163 040400
11164 040402

23-0CT-80 09:11

22%:

BGT
JMP

CLR

RO
19%
#16,R1
SP,R1
R2,R1
(R1)
R2
R2,#11
18%

5800

RS
RS,#16

: ADRS.CNT
: ADRS.CNT,»

§748

;

CNT.14.BAD

5806

SP,R2
R1.R2
(R2).#16
22%
RO

;
L

OFF . SET_CNT,»
OCNT,
@

20§
2%

CMP
BLE

CNT.14.BAD

5812

;

5815

RO,#12

: CNT.14.BAD,*

5817

#WRD .40, - (SP)
#URD .42,-(SP)

;

5819

23%

MOV

#WRD.55,-(SP)

11177
11178
11179
11180

012746
010600
104414
022626

000007

MOV
[ [1]")
TRAP
CMpP

#7,-(SP)
SP.RO
14
(SP)+,(SP)+

060446
040452
0460454
040456

11181 0460460
11182 0404662

11183 040466

11184 060472
11185 0404676
11186 040502

000445
012746

006260

012746
012766
012746

006350
006336
005400

012746

006300

MOV

23$:

BR
MOV

MOV

MOV
MOV
MOV

OONT,#

MIRD.51,-(SP)
#WRD
. 46,-(SP)
#WRD.54,-(SP)

006446
005432

“NT.14.BAD

012746

5808
5810

RO
27%
55

11175 040436
11176 040442

CNT

5808

R1,#11
21$

BNE

MOV
MOV
MOV

.
:

CNT

107
ARR.DAT
O

MOV
MOV

:
:

.WORD
‘WORD
WORD

CMP

: OFF.SET.CNT,®
; INDEX,*

INDEX
INDEX,*

INC

TRAP

;MLG
:

nd,se

R
#16,R2

ST
BEQ

006406
006336
006436

#,-(SP)

CLR
MOV

ADD
ADD
CMPB
B8LO
INC

SEQ 0239

22-0ct=1980 10:47:44
22-0ct-1980 10:45:32

T0PS
PA:<

ASIX.FMAT,=(SP)

268
#WRD.40,-(SP)

#WRD.42.=(SP)

#URD .47 .~ (SP)
#URD .46, -(SP)
#FOR.FAT ,=-(SP)

;

;
:

SP,r

5817
5822

CIMLAAOD ML-11

HARDWARD TEST

) 1187
11188
11189
11190
11191
11192
11193
11194
11195
11196

040506
040512
040514
040516
040520
040524
040526
040530
0640534
040536

11199
11200
11201
11202
11203
11204
11205
11206

040544
040550
040554
040556
040560
040564
040566
040572

11197 040540
11198 040542

11207 040574
11208 040602
11209 040606

LO %%%
SE

TEST
ON

01 2746
01 0600
10 6614
005002
012701
060601
060201
121127
103413
005046
111116
010246
012746
012746
010600
104414
062706

005202
020227
003752
012766
062706

MACRO M1113
000005

000032

000016

000010

11211 0640616

016700

151344

11214 040626
}}glz 040632

062706
000207

000030

11212 0640622
11213 06406246

11217
11218
11223
1124
11201
11235 0406364

11236 040634
11237
11238
11239
11240

0640640
040642
040644
040646

001004

1044651
104444

25%:

000011

026627

000016

26%:

000001

27%:

28%:
;
;

004767

106466
006000
103773
000207

176634

MoV
MOV
TRAP
(LR
MOV
ADD
ADD
(MPB
BLO
CLR
MOVB
MOV

004772
000003

000001
000014
000002

11210 040614

24%:

23-0CT-80 09:11

6.3

PAGE 239-4

#5,-(5P)
SP,RO
14
R2
#32 .R1
SP,R1
R2,R1
(R1),M16
25%
-(SP)

(R1), (SP)
R2,-(SP)
#EMT
13, -(SP)
#3,-(SP)
SP,RO
14
#10,5P

1%:

;

SP,*

;
;
;
;

CNT

OFF.SET.CNT,»

5824
5826

CNT,»

;

CNT,»

;

SP,e

;
:

CNT
CNT,»

5824

+,DODU.FLG

2(SP) M

;
:
;

5831
5814
5834

MOV

ML.LUN,RO

;

5837

ADD
RTS

#30,SP
PC

5697

5839

MOV
MOV
MOV
TRAP
ADD
INC
CMP
BLE

MOV
ADD
cMP
BNE

TRAP
TRAP

R2
R, #11
2498
#1,16(SP)
#4,5P
28%

51
44

Routine Size:
304 words
Maximum stack depth per i1nvocation:

721::

SEQ 0240

JSR

TRAP
ROR
BLO
RTS

PC,8121
66
RO
1%
PC

LODU.FLG,*

29 words

MACRO M1113

CIMLAAO ML-11 LO Gl C TEST

2O 00 by

l
SE CTION

;

TEST NUMBER:

i TEST NAME:

ST 22
PROM OR FUNCTION

TEST

| TEST DESCRIPTION:
|

TEST

{

'
a

PRPN FE PR YA TR YE YA

R ICELE DR TR TR TR XN R

A PR PR FE PR YR

HARDWARE

ORING Of

READING AND STORING 128
HARDWARE ORED ROW COLUMN
DATA.

e Y e

THE

THE MEMORY ARRAYS' PROM
ROW COLUMN DATA BY:

)

ey Y

NN~ ~N~

b e
o e e D e
D e e D D
D e

e i e e o i o d i
D
—d i b o D D e D e o D sl o
WA
NININY

el o
D e e

e e e
md D e

D el o
D D D

b e e e e e e
) o P D D ed e e

D e
D e

BGNTST:

TOPS=20 Bliss=146 v2(206)
.2 (64)
PA:<CNEALE>BL2MLSL.BL1

[}

SEQ 0241
44
132

lee

H
3
PAGE 240

JMLG

e D D e e e o
d nd D e d d e e

NNOOCOOOOOOO
NNV
NN%NNNNNNNN
SSEARXRIN2E3 ~NOWV WA =S OOV NO VNN 2OV NN W

D D D b b
d D b d
>

HARDWARD TEST

23-0CT-80 09:11

THEN IN PROM DISABLE MODE

AND VIA SOF TWARE

CONTROL,

READ AND QP PROM BOY
COLUMN DATA AND COMPARE

!
'

AGAINST THE RESPECTIVE
STORED HARDWARE CRED DATA.

]
[}

' IMPLICIT INPUTS:
|
|

NONE

|
|

'PROM ROW DATA
'PROM COL DATA

'SOF TWARE CALCULATED PROM ORED DATA
PROM ORED DATA
'SOF TWARE
‘DROP UNIT

FLAG

CLR_MBUS,

0000 FLG = ZERO;
DAT DM = ONE;
FIRST_BLK_XFER ();
ML_tUNC

= write;

incr PROM_ADRS from 0 to 127 do
begin
DELAY (ONE_US).

HW_OR_TBL [.PROM_ADRS]) = .MLPD;
DAT_c[K = ONE;
end;

CLR_MBUS;

'SET UP A FIRST BLOCK XFER
'D0 A WRITE FUNCTION

'READ AND STORE 128 HARDWARE PROM ORED DATA
'READ HARDWARE PROM ORED DATA
'CLOCK NEXT ONE OuT

CIMLAAD ML=-11 LOGIC TEST
HARDWARD TEST SECTION
11302 ;ML&

MACRO M1113

23-0(CT-80 09:11

PAGE 241
22- ct=1980 10:47:44

}}%82 :

<¢2=0ct=-1980 10:45:32

TOPS-20 Bliss=-16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (64)

11305 ;
11306 ;

5895
5896

PROM_DIS = ONE;

'SET PROM D]SABLE MODE

11308 ;
11309 ;

5898
5899

incr PROM_ADRS from 0 to 127 do
begin
MLPA =

'CALCULATE 128 SW ORED DATA & (OMPARE TO HW TABLE

11307 ;

11310
1"M3N
11312
11313
11314
1M3NS

;

5897

;
;
;
;

5900
5901
5902
5903
5904
5905

11318 ;

5908

11320 ;
11321 ;

5910
5911

11323 ;

5913

}}g}g ;
11319 ;

11322 ;

11324 ;

2389

5920
5921
5922
5923
5924
5925

}}gzg :

11344 040650

11345 040654

11346 060660

11347 040666
11348 040672
11349 040576
11350 040704

11351 040710
11352 040714
11353 040722

11354 040726
11355 040734

11356
11%5;
1135

5919

5926

004167

begin
ERRDF (76, ARR DAT, 0);

'1f NEQ THEN ERROR

end;

if .DODU_FLG IS_SET

then

ENDTST;

143204

151276
177770
000007
151030

00004C

151052

000061

150736

11362 040752

016703

141140

11364 040760

005066

000006

JSR

R1,$SAVES

;

5841

BISB

#40,9ML . REG+40

;

5879

CLR
BISB
JSR

4L(SP)
#10,3ML.REG*120
PC,FIRST.BLK.XFER

: DODU.FLG
;
:

5882
5883
5884

SuB

MoV
BIC
BI(B
BIS8

151034

151076

000001

001404

$122:

000004
000010
151572

142777 000077

0014M

.DROP THIS UNIT IF DODU FLG IS_SET

begin
DODU (.ML_LUN);
DOCLN;
end;

0050C”
0127y

11363 040756

'COMPARE SW £ HW ORED

DODU_FLG = ONF;

11359 040742
11360 040744

11361 040750

'GET RESPECTIVE HARDWARE ORED

end;

016705
042705
142777
150577

152777

'SAVE COL DATA
'CALCULATE SOF TWARE ORED

PRINTB (FMTT2, .SW_ORED<O, 95>, .HW_SAVE<O, 95>, (.SW_ORED<O, 9> xor .HW_SAVE<D, 9>));

000010

005066
152777
004767

'SAVE ROW DATA
'ENABLE COLUMN DATA ADRS

PRINTB (FOR_FMT, WRD 35, WRD_36, WRD_19, PHR_&);

162706

152777

_LOADING MLPA INITIATES A PROM READ

(.HW_SAVE<O, 9>) neq (.SW_ORED<0, 9>)

5914

11330
11331
11332
11333
11334
11535

:
;
;
.
;
:

then

5912

5915
5916
5917
5918

11329 ;

HW_SAVE = .H@_OR_TBL [.PROM_ADRS];

5909

11325
11326 ;
11327 ;
11328 ;

.PROM ADRS;

DELAY (ONE UB):
R BITS = ,MLPD;
MCPA = .PROM_ADRS or %0'2000';
DELAY (ONE US);
C BITS = .MLPD;
SW_ORED = .R BITS or .( _BITS;

SEQ 0242

150744

BICB

ML
;

1%:

2¢:

1%:

BISB

#0,SP

ML .OUT,RS
#177770,RS
#7,8ML .REG+40
RS,.8ML.REG+40

#77,aML.REG

#61,3ML .REG

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

CLR
MOV

R2
R

: PROM.ADRS
; v,38TMP?

MOV

LSOLY,R3

;v ,88TMPY

6(SP)

: $STMP

BEQ

(LR

5885
.

TOPS
PA:<

5887
S889

CIMLAAD ML-11 LOGIC

HARDWARD

b D b
b D

11365
11366
11367
1368
369

TEST

040764
040766
040770
040772

D d e D D D
D d d d d D
i
o

381 041054
382 041062
383 041064

384 041070
385 041074
386 041076

(=]
»
-

SN
=

387 041102
88 041104
89 041110
112
114
041116
120
126

041130
ey

&H
o

[P
=]
ey

SNOMN

96 041134

98 041144
99 041146

005303
001374
005301
000766

010203
006303
017763
152777
005202
020227
003750
152777
016705
042705
142777
150577
152777
005001
010177
012702
00141
016703
001404
005066
005303
000766

017766
010103

d d e
b o o
e
e

007722
151004

BISB
INC
cMP
BLE
B1SB

000177

000040
151132

150706

000007

150670

177770

150664
000040

MOV

150736

6%:

150710

000001

7%:

161014

000006

8%:
9%:

151004

000002

MOV
ASL
MOV

10%:

8IC
BICB
BISB
B1SB
CLR
MOV
MOV
BEQ

MOV

BEQ
CLR
DEC
BNE
DEC
BR
MOV
MOV

012702

000001

MOV
MOV

140744

MOV

001411
0716703

017716

000766

016605
051605
010103
006303

BIS

150640

BEQ

000006
13%:

150734
000002

14%:

BEQ
CLR
DEC
BNE
DEC
BR

MOV
MOV

8IS

JMLG

MOV
ASL

11415
11416
11417
11418
11419
11420
11421

041212
041214
041220
061222
041226
041230
041232

016304

010502
042702
010403
042703
020302
001450
104455

007722
177000
177000

MOV
MOV

8IC
MOV
8IC
(MP
8EQ

TRAP

SEQ 0243

$$TMPI

;

; $$TMP2
;

5890

PROM_ADRS,*

oML .REG*230,HW.OR.TBL(RY)

#20,aML .REG+120
R2
R2.#177
1%
#40,aML .REG+40
ML.DUT,RS

;
;

5891
5887

PROM.ADRS
PROM_ADRS,*

5892

$177770,R5

#7,3ML .REG+40
RS AML .REG+40

:?6.3HL.REGO120
R1,aML.REG+100
#1,R2
108

LSOLY,R3

;

7 10M.ADRS
PROM.ADR,*
S

;

*,$8TMP1

;

5895
5897
5899
5900

*,$8TMP?

; $STMP

:
14
aML.REG+230,2(SP)
R1,R3
#2000,R3
R3.aML.REG+100
Y
14$

13%
6(SP)
R3

12¢

R2
1%

$8TMPI

: $$TMP?2
:
;

5901

«,R.BITS
PROM,ADRS,*

5902
5903

: v, 88TMP?2
;

v, 38TMP]

;. $$TMP
;.

$3TMPI

;

$$TMP2

;

+,C.BITS

(SP)
aML.REG+230,
).RS
2(SP

;: R.BITS,SW.ORED

5904
5905

R1,R$

;

5906

(SP) ,RS

;

R3Y

C.BITS,SW.ORED

PROM.ADRS
, ¢+

22-0ct-198
22-0ct-198

D o
D o

11
612
13
~14 061206

151124
000020

PAGE 241-1

DEC
BNE
DEC
BR

002000

010377

06 0641170

041174
041200
041202
041204

5%:

23-0(T-80 09:11

052703

001404
005066
005303
001374
005302

05 041156

001374
005302

00 041152
01 041154
02 041160
03 041162
04 041164

407
408
4«09
410

MACRO M1113

SECTION

040774
370 040776
371 041000
372 041006
373 041014
374 041016
375 041022
376 041026
377 041032
378 0641036
379 041042
380 041050

D i D d o D i D o D D d ) D e D ) D D i D D D e e D D D
o o
e D
o o o) D D d e D i D D o D ol e o d e d D e D
P ¥ X 2 af 2k 2. 1V N N AN NN AN N N NN
VOO0
OO OO0

TEST

HW.OR.TBL(R3),R&
RS R

;

SW.ORED,*

R4 RS

;

HW.SAVE,*

#177000,R?

#177000,R3

*,HW.SAVE

(5:32

TOPS

PA:<

5908

R3,R2
15%

5911

CIMLAAG ML-11 LOGIC TEST
HARDWARD TEST SECTION
11422 041234
11423 041236
11624 041240

000114
007534
000000

11426 061246

0127646

11425 041242
11427
11428
11429
11430
11431
114632

0641252
041256
041262
041266
041272
041276

11434
11435
116436
11637
11438

041300
041302
041306
061306
041310

11433 061276

11439 041312

11449 041356
11450 041360

MOV
MOV
MOV
MOV
MOV
TRAP

010403

010516
040502
040216
050216
010446

MOV

042716

177000

042716

177000

012746

010600
104414

012766
062706
005201
020127
003641

MOV
BIC
BIC
81S
MOV

BIC

MOV

0046224

000001
000024

000030

000177

15%:

11453 041372

116454 041376

11455 041400

11456 041402

}}225 041406

001004

016700
104451

104444

062706

000207

000010

11459
}}2??
11475 041410

004767

11480 041422

000207

11477 041414
11478 041416
11479 041420

104466
006000
103773

177234

122::

1%:

SW.ORED,*

RS,-(SP)

SW.ORED,*

SP,RO
14

;

SP,e

R1,#177

. PROM.ADRS,*

MOV
ADD
INC

#1,30(SP)
#24,5P
R1

BLE

BNE

16%

5913

: HW.SAVE,*

#177000, (SP)
NFMT.2,-(SP)

; «,DODU.FLG
.
; PROM.ADRS

5914
5910
5897

4L(SP),#

; DODU.FLG,*

5919

MOV

ML .LUN.RO

;

5922

TRAP

RTS

;

5841

;

5924

CMP

ADD

#10,5P

; Routine Size:
176 words
.
: Maximum stack depth per invocation:

11476 041410

5912

: HW.SAVE,*

RS, (SP)
RS.R2
R2.(SP)
R2.(SP)
R4 = (SP)

84 ,-(SP)

TRAP

168 :

;

R4 ,R3

MOV

CMP

150570

;

#WRD.36,-(SP)
#WRD.35.-(SP)
#EOR.FMT,-(SP)
#5,-(SP)
SP,RO
14

#177000, (SP)

MOV
TRAP

SEQ 0244

#PHR.4 - (SP)

BIC

MOV

000004

11451 041362 026627 000004 000001
11452 041370

#wRD.14,-(sP)

006226
006220
005400
000005

012746

11446 041340
11447 041346
11448 061352

MOV

012746
012746
012746
012746
010600
106414

11442 0641326

11444 061336
11445 041336

114
ARR.DAT
O

MOV

006040

K
3
PAGE 241-2

WORD
"WORD
WORD

006630

010546

11443 041330

23-0CT-80 09:11

012746

11440 041316

11441 061320

MACRO M1113

JSR

PC.$T22

RTS

TRAP
ROR
BLO

66
RO
1%

20 words

CIMLAAO ML-11 LOG l C TEST

MACRO M1113

'HARDWARD TEST SEC 1 10N

23-0C7-80 09:11

.3
L
PAGE 242

SEQ 0245
T0PS=-20 Bliss=16 v2(206)

11486 ML
11487 ;

PA:<NEALE>BL2ML4.BLI.2 (65)
1

;

BGNTST;
‘ee

ead e ) D D e i e D D D e el wh i D
e D o D b wd ) b D d e
D e D s e b
d e e e ot D D o o o ed e e e i e
D b b b e
D e e i i e i
b
VIV AW VAT
AW
WIS
DN N
ASHA A VA WVVAWVAWVAVVA
VTV WAL VIV
[=d=L=]
B ed cd e ed ced d D 2 OO O
£ L
A L N AN AN WM R N NI N O N ~N NNMNVNIN)
P
NN = OWOONOWVSUWN 2OV~ [« JV.
O0V0 ~NOW B NN =2 O O ~NOWNS

TEST NUMBER:

TST 23

i
i TEST NAME:
UV ADRS ERROR TEST
i
i TEST DESCRIPTION:
i
i
TEST THE DETECTION OF UV ADRS
i
ERRORS BY:
i
i
1.
GENERATING PROM DATA PATTERN
i
FROM 0 TO X0'177777' AND
i
DETERMINE WHETHER RESPECTIVE
i
PATTERN IS GOOD/OR BAD
i
PROM DATA.
i
i
VIA DAT DM AND PROM R/W
2.
i
MODES PRESENT GENERATED
i
PROM DATA TO THE UV ADRS
i
ERR PROM.
i
i

i
i
i
i
i

TEST ERROR CONDITIONS FOR
CORRECT RESPONCE TO GOOD/
OR BAD PROM DATA.

IMPLICIT

INPUTS:

NONE

i
local
DODU_FLG,

HIGH_CNT,
PROMTMDATA

Low ONT,

'DROP UNIT FLAG
:

bitvector [16],

TEMP,

ERR_FLG,
GTR_FLG;

'STORES PROM DATA (HECK SUM BITS
!STORES PROM DATA

'STORES SUM OF PROM DATA BITS <9:0>
' TEMPORARY STORAGE
'ERROR FLAG

'SETS WHEN PROM DATA BIT 15 IS A ONE

DODU_FLG = ZERO;
PROMTDATA = -1;
do

begin

PROM _DATA = _PROM_DATA + 1;

B8GNSDB;

CLR_MBUS;
ERRTFLG = ZERO;

'TEST ALL POSSIBLE PROM DATA COMBINATIONS
'INCREMENT PROM_DATA

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0(T-80 09:11

PAGE 243

11542 ;MLG
11545 ;

11548 ;

SEQ 0246

22-0ct=1980 10:47:44

22-0ct=-1980 10:45:32

}}gzz ;

11546
11547 ;

5980

5981
5982

5983

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (65)

LOW_CNT = ZEROES;

HIGA_CNT = ZEROES;
GTR_FLG = ZERO;

incr BIT_ONT from 0 to 9 do

'COUNT PROM DATA BITS <9:0>

112@8 ;

gggg

}1%2} ;

gggg

}}ggz ;

gggg

HIGH_CNT = ,PROM_DATA<'0, 3>;

}}ggg :

ggg?

it .PROM_DATA [13) IS_SET then HIGH_CNT = .HIGH_CNT + 1;

'ADD IN BIT 13 IF SET

1}22; ;

ggg%

it .PROM_DATA [14] IS_SET then HIGH_CNT = .HIGH_CNT + 1;

'ADD IN BIT 14 IF SET

1}228 ;

gggg

if .PROM_DATA [15] IS_SET then HIGH_CNT = _HIGH_CNT + 1;

‘ADD IN BIT 15 IF SET

}1225 :

gggg

if .PROM_DATA [15]) IS_SET then GTR_FLG = ONE;

;
;
;
:
;

5998
5999
6000
6001
6002

DAT DM _XFER ();
PROR_RW = ONE;
MLPD = .PROM_DATA;
MLCST = write;
DAT_CLK = ONE;

'SET UP A DATA DIAG MODE XFERR
.SET PROM READ WRITE
'LOAD MLPD WITH PROM_DATA
'DO A WRITE FUNCTION
'CLOCK PROM DATA INTG UV PROM

11569 .

6004

if .UNS IS_SET

'SEE IF PROM DATA CAUSED A UV ERROR

11563
11564
11565
11566
11567

11568 ;

11570
11571 ;
11572 ;

6003

6005
6006
6007

11573 ;

6008

11576 .

6011

11579 ;

6014

11581 ;
11582 ;

6016
6017

11586 ;

6019

1157 ;
11575 ;

}}g;g :
11580 .

11523 .

6009
6010

6022
6023

.
;
;
.
;

11594 ;

11595 ;
11596 ;

it .GTR_FLG IS_SET

then

begin

6029
6030
6031

'UNS IS_SET. SEE If STR FLG IS SET
'LOAD TEMP WITH PROM DATA

it .TEMP eql %X0'162000'

'THESE BITS SET AUTOMATICALLY CAUSE A UNS

TEMP = .TEMP and X0'162000°';
then

'SEE IF THESE BITS AKE SET [N PROM DATA

begin

it .LOW_CNT geq .HIGH_CNT

then

begin

ERRDF (72, ARR DAT, 0);

6021

6024
6025
6026
6027
6028

'SET FLAG IF BIT 15 IS SET

TEMP = .PROM_DATA;

6018

11587 ;
11588 ;

'GET PROM DATA CHECK SUM BITS

begin

6015

6020

11589
11590
11591
11592
11593

then

gg}%

11585 ;

11586 :

it .PROM_DATA [.BIT_CNT] IS_SET then LOW_CNT = .LOW_CNT ¢+ 1;

[LOW<9:0> SHOULD BE 1SS THAN THE HIGH<15:10> IF GTR FLG IS S
'ERROR IF LOW<9:0> IS GEQ HIGH<15:10>

PRINTB (SIX _FMT, WRD_34, PHR_S5, WRD_32, WRD_6, WRD_33, WRD_24);
ERR_FLG = ORE;
end;

end;

else

end

begin

'GTR FLG 1S NOT SET

CIMLAAOD ML-11

HARDWARD TEST

ng l %TEST
S

MACRO M1113

23-0CT-80 09:11

AGE 24¢

11598 ;ML4
;
;
;
;

6032
6033
6034
6035

11606
11607
11608
11609
11610
11611
11612
11613
11614
11615
11616
11617
11618

;
;
;
;
;
;
;
;
;
;
;
;

6037
6038
6039
6040
6041
6042
6043
6044
6045
6046
6047
6048
6049

11621
11622
11623
11624

;
;
;
;

6052
6053
6054
6055

11626 ;

6057

11625 ;

11627 ;

ggg?

11640
11641
11642
11643
11644
11645
11646

;
;
;
;
;
;
;

6071
6072
6073
6074
6075
6076
6077

11647
11648
11649
11650
11651
11652

;
;
;
;
;
;

'ERROR

EQL

end

else

end

.UNS WAS NOT SET

begin
if .GTR_FLG IS_SET
then
begin
TEMP = .PROM_DATA;

'SEE

it .TEMP neq X0'162000'
then
8
RRDF (74, ARR DAT, 0):
PRINTB (SIx_FMY, wRD_34,
ERR_FLG = ORE;
else

7TR FLG [S_SET

'LOAD TEMP WITH PROM DATA

TEMP = .TEMP and %0'162000°;

'SEE IF THESE BI7S ARE SET [N PROM DATA
.IF

THESE BITS ARE

'ERROR UNS

S NOT

SET

THEN UNS SHOULD BE

SET

PHR_1, WRD_32, WRD_S, WRD_33, WRD_24);

end”

'BITS

begin

162000 ARE NOT

SET

if .LOW_CNT Lss .HIGH_CNT
'LOW<9-0> SHOULD BE GEQ HIGH<1S5:10>
then
be
'ERROR IF LSS
ER DF (75, ARR DAT, 0);
PRINTB (SIX_FMY, WRD_34, PHR_1, WRD_32, WRD_S5, WRD_33, WRD_24);
ERR_FLG
= ORE;
end;

6063
6064
6065
6066
6067
6068
6069
6070

6078
6079
6080
6081
6082
6083

'LOW<9:0> SmuULD BE NEQ HIGH<1S5:10>

ERR_FLG = ORE;
end;

6058

6059
6060
6061
6062

P*:<NEALE>BL2ML4.BLI.2 (65)

PRINTB (SIx FMT, URD 3., PHR _5, WRD_32, WRD_6, WRD_33, WRD_24);

6056

;
;
;
;

;
.
;
;
;
;
;
;

if LOW_CNT eql .HIGH_CNTY
then
g
RRDF (73, ARR DAT, 0):

6036

11628
11629
11630
11631

11632
11633
11634
11635
11636
11637
11638
11639

TOPS=20 Bliss=16 v2(206)

22-0ct=-1980 i0-45:32

11601
11602
11603
11604

}}2;8 :

SEQ 0247

22=0ct=1%80 10:47:44

}}288 :

11605 ;

end
else

end

begin
1f .LOW_CNT neq .HIGH_CNT
then
begin
ERRDF (108, ARR _DAT, O);
PRINTB (SIX FMT, WRD _34,

ERR_FLG = oNE
end”

'GTR_FLG IS NOT SET
'LOW<9:0> SHOULD EQL HIGH<15:10>

'ERROR IF NEQ
PHR_1, WRD_32, WRD_S5, WRD_33, WRD_24);

SET

CIMLAAD ML-11 LOGIC TESTY
HARDWARD TEST SECTION

MACRO M1113

23-0CT-30 09:11

PAGE 245

11654 ;MLL

22-0ct=-1980 10:45:32

11657
11658
11659
11660
11661
11662
11663
11664

;
:
;
:
:
:
;
;

6084
6085
6086
6087
6088
6089
6090
6091

11666
11667
11668
11669

;
:
;
;

6093
6094
6095
6096

gggg

until

11672
11673
11674
11675
11676
11677
11678

;
:
;
;
:
:
;

6099
6100
6101
6102
6103
6104
6105

if .DODU_FLG IS_SET
then

}12;? :

}lggg ;

6092

6106

11687 041426

004167

11689 041434
11690 0416440
11691 041446

005066
012766
005266

11693 041454

152777

11688 041430
11692 041452

162706
104402

11694 041462

016705

11696 041472
11697 041500

142777
150577

11695 061466

042705

11698 041504
11699 041506
11700 041512
11701 041514
11702 041520
11703 061522

005001
005066
005003
005066
005005
010504

11705 041526

006204

11704 061524

11706 041530
11707 041532

SEQ 0248
22-0ct=-1980 10:47:44

Hggz :

11665

end
end:
it .ERR_FLG IS_SET
then
begin
PRINTB (FMT_7,

DODU_FLG = ONE;

'SEE

.PROM_DATA);

ERROR FLG GOT

SET

.PRINT FAILING PROM_DATA AND SET DODU_FLG

end;

ENDSUB;
end

.PROM_DATA eql X0'177777';

'TRY ALL BIT COMBINATIONS
'DROP THIS UNIT

DODU_FLG

IS SET

begin
podu (.ML_LUN);
DOCLN;

end;

ENDTST:
142430

000012

000006
177777
000010

000010

000040

150256

150502

177770

000007
150234

$723:

JSR

1%:

CLR
MOV
INC

28:

SUB

TRAP

BISB
MOV

BIC

150240

000002

000004
3.

006204

006204
012702

TOPS-20 Bliss-16 v2(206)

PA:<NEALE>BL2MLGL.BLI.2 (65)

;

5926

6(5P)
#-1,10(SP)
10(SP)

; DODU.FLG
.« PROM.DATA
: PROM.DATA

5971
§972
§976

#40,3ML.REG+40

;

5977

ML.DUT,RS

#177770,R5

BICB
BISB

#7.aML.REG+40
RS,aML.REG+40

ASR

CLR
CLR
CLR
CLR
CLR
MOV
ASR

000010

R1,$SAVES

M2,
sp

ASR
MOV

R1
2(SP)
R3
4(SP)
RS
RS ,R&
R4

R4
#10,R2

:
.
:
.
:
:

ERR.FLG
LOW.CNT
HIGH.CNT
GTR.FLG
BIT.CNT
BIT.CNT,®

5979
5980
5981
5982
5984
5986

CZMLAAO ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

11709
11710
11711
11712 041536
11713 041540
11714 041562
11715 061544
11716 041546
11717 041552
11718 041556
11719 041560
11720 041564
11721 041570
11722 041572
11723 041574
11724 041600
11725 041602
11726 041606
11727 041610
11728 041614
11729 041616
11730 041620
11731 041622
11732 041626
11733 041634
11734 041636
11735 041640
11736 041646
11737 041650

11738 041652
11739 041654
11740 041660
11741 041662
11742 041664
11763 041666
11744 041670
11745 041672
11746 041700
11747 041704
11748 041712
11749 041716
11750 041722
11751 041730
11752 041736
11753 041744
11754 041746
11755 041754
11756 041756
11757 041740
11758 041764
11759 041770
11760 041772
11761 041776
11762 042000
11763 042004

23-0CT-80 09-11

&
C
PAGE 246

SEQ 0249

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32

JMLG
060602
060204
010446
010546
062716
012746
005046
004767
062706
005300
001002
005266

005205
020527
003745
016603
006203
006203
000303
042703
132766
001401
005203
132766
001401

005203
005005

105766
100002

012766
004767

152777

016605
010577
012777
152777
032777
001500
026627
001042
010516
042716
021627
001003
026603
002002
000167
104455

MOV

RS = (SP)

BIC
MOV
CLR
JSR

1641316

000010

ADD

000002

4%:

000011
000010

177770
000040

000100

000011
000011

5%:

6$:

000011

7%:

000001
150722
000100

000010
150206
000061

000004
150106

000020
040000

147750
150062
150014

000004

000001

8s%:

SWAB
BIC
BlT18
BEQ
INC
BIT8
BEQ
INC
1ST8
BPL
INC
INC
ROR
BCC
MOV
JSR
B1SB
MOV
MOV
MOV

MOV

8IC
CMP

162000

BNE
CMP

000002
9%
10%:

R&,=(SP)

197770, (sP)

BGE
JMP

TRAP

PROM.DATA,«

: BIT.CNT,»

#1,-(SP)
-($P)

PC,BLSGT2

sp
010,

LOW.CNT
BIT.CNT
BIT.CNT,

5984

PROM.DATA HIGH.(NT
HIGH.CNT
HIGH.CNT
HIGH.CNT

5988

#40,11(SP)

* ,PROM.DATA+1

5990

R3
2100,11(SP)

HIGH.CNTY

10(sP) ,R3
R3
R3
R3
#177770,R3

* HIGH.CNT

* ,PROM.DATA+1

HIGH.CNT

CLR

BISB
BIT
BEQ
CMP
BNE

015777

000422

DEC
BNE
INC
INC
CMP
BLE
MOV
ASR
ASR

005205
005203
006005

103003

R2.R&

MOV

177770
000001

SP,R2

ADD
ADD

TOPS
PA:<

PROM.DATA¢1
HIGH.CNT

2 ,4(SF)
PC.DAT.DM.XFER

«,GTR.FLG

10(SP) ,RS
RS, aML .REG+230

,*
PROM.DATA

#100,aML .REG+120
261,
3N .REG

5992

5994

5996

5998
5999
6000

6001
6002
6004

#20 . 3ML .REG+120

:ggéOO.QHL.REG*60
GTR.FLG,*

6008

15777, (sp)

*, TEMP
+ TEMP
¢
TEMP,

601
6012
6014

2(SP),R3

LOW.CNT HIGH,CNT

6018

RS,

(SP)

(SP)
, #-16000
9s

10%
16%

6021

CIMLAAQ ML-11 LOGIC TESTY
HARDWARD TEST SECTION

MACRO M1113

11765

23-0CT-80 09:11

PAGE 247

SEQ 0250

SML4

22-0ct-1980 10:47:44

22-0ct=1980 10:45:32

;

}];gg
11768 0462006
11769 042010
11770 042012

000110
007534
000000

11772 062020

012746

11771 062014

JMORD
.WORD
WORD

110
ARR.DAT
0

MOV

#WRD.33.-(SP)

012746

006104

MOV

11773 062024

012746

005670

MOV

11775
11776
11777
11778
11779
11780

012746
012746
012746
012746
010600
104414

11774 042030

062034
062040
062044
042050
042054
042056

11781 042060
11782 042062

11783 042066

11784 042070

012746

000556
026603

001157

000111
007534
000000

11789 042104

012746

11790 042110

006200

012746

006212

012746
012746

11798 042144
11799 042146

000524
026627

11801 0642156

010516

11802 042160
11803 042164

11804 042170

11805 042172

010600
104414

001067

042716

021627
001427
000112

11808 042200

000000

11809 042202

11810 062206
11811 0462212

162000

104455

11806 042174

11807 042176

015777

012746
012746

11819 042246

012746
012746
012746
012746
010600
104414

000463

;
LOW.CNT, MIGH.CNT

6023
6032

;

6035

FURD .24, = (SP)

;

6036

16%

#WRD .6~ (SP)

#WRD
. 32,-(SP)

MOV
MOV

MOV

¥SIX.FMT,-(SP)
#7,-(SP)
SP.RO

. SP,e

BR
CMP

15%
4(SP),#1

:
P GTR.FLG,*

6037
6046

MOV

RS, (SP)

; «, TEMP

6049

(SP) . #-16000

P OTEMP,e

6052

8NE

#WRD .34, - (SP)
14

148

BIC

18777, (sp)

BEQ

13¢

CMP
JWORD

"WORD

112

006206
005662

MOV
MOV

#WRD.33.-(5P)
#URD .5 = (SP)

006542
006212
005432
(00007

MOV
MOV
MOV
MOV
MOV
TRAP

006104

MOV

P o TEMP

6050

;

6055

;

6056

ARR.DAT

"WORD

11812 042216 012746 006200
11813 042222
11814 062226
11815 042232
11816 042236
11817 042242
11818 042244

12%:

15¢
2(SP).R3

#PHR .5 < (SP)

TRAP

007534

012746

000001

; SP,e

MOV

TRAP

000004

#PHR
.5, = (SP)
#WRD .34, - (SP)
¥S1X.FMT,=(SP)
#7,-(sP)
SP.RO
14

#WRD.33.-(SP)

MOV

005432
000007

6022

#WRD.32,-(SP)

MOV

;

#WRD .6~ (SP)

111
ARR.DAT
0

MOV

006646

#WRD .24, - (SP)

JWORD
"WORD
"WORD

005670

012746

11794 0462130
11795 042°34
11796 042140

BNE

MOV

006206

11793 062126

012746

BR
(MP

006104

006200

11800 042154

118:

TRAP

012746

11797 062142

MOV
MOV
MOV
MOV
MOV
TRAP

000002

11791 042114

11792 042120

MOV

006646
006212
005432
000007

104455

11785 042072
11786 062074
11787 042076

11788 042100

006206

TOPS

PA:<

FURD .24, - (SP)

#URD.32,-(SP)

#PHR .1,~(SP)
#WRD .34, - (SP)
#S1X.FmT,-(SP)
97,-(SP)
SP.RO
14

15%

; SP,e

6057

MACRO M1113

CIMLAAO ML-11 LOGIC TEST

HARDWARD

TEST

SECTION

13%:

000002

SEQ 0251

22-0ct-19 80 10:4
22-0ct-19 80 10:4
;

(MP
BGE

LOW.CNT, HIGH.CNT

&
N

W
&

006104
006206
005662
006200
006542
006212
005432
000007

14%:

.WORD
.WORD
MOV

6066

—

(=4

Po
(28]
W
-~
~N
»
~N
»

o~
~N
P3
(v]
~N

864 042446
865 042450
866 042452
8
868 042464
869 042466
870 042470
871 042472
872 042476
873 042500
874 042502
875 042506

1%:

000001
000020
000001

16%:

004520
000002

000001
000006

000014
17%:

176754

026627

176740

000006

18%:

000001

19%:

#URD .34, - (SP)
¥SIX.FMT,=(SP)
#7,-(SP)
SP RO

15¢

2(SP) ,R3

.WORD
.WORD
.WORD

SRR.DAT

MoV
MoV
Mov
MOv
MoV
MoV
MoV
MOV
MoV
TRAP
MOV
ADD
cMP

BNE

Mov
MoV
MOV
MOV
TRAP
MOV
ADD
TRAP
ROR

BHIS
JMP
INC
8EQ
JMP
CMP

5P,
4

B8R
CMP
BEQ

TRAP

006104
006206
005662
006200
006542
006212
005432
000007

6062
6065

MOV
MOV
MOV
MOV
Mov
MOV
MOV
MOV
TRAP

000002

TOPS

PA:<

TRAP

.WORD

(=]

&
E
PAGE 248

JMLS

]
[@3Ve].

©o Qo 00 Qo 0o Oo OO

— i e e b el ] o e
D and d e d =D e d e D oD D e e D e e d ) D e D ) D d D D e D D D D D D D o
D d
o e e D s b
o s oD ol o o el ed b b B b o b o e b D d d o D d o B b d ed d b b D e
D D D d d D D
b D D D Db
D b

o
00 0o O mgmmonononcnoocoooononmmmononononcnoooocooocnmoocoooon
VIV
VIA VA B BN B2 B 552 2 B W N N e NN N N R AN N RO NI PO NI RO ~
Ogogmmm
~ OV
WM 2OV
NPOWVNE WA 2O O®NONEWN
2OV~
SN

11821

23-0(T-80 09:11

16%

6067
6076
6079

154

¢080

#URD
.24 ,~(SP)
#WRD.33.-(SP)
#URD.5,~(SP)

#URD.32,-(SP)
#PHR.1,~(SP)

#URD .34, - (5P)

#SIX.FMT,~(SP)
27,-(SP)

SP.RO

14
R
#20,5P

41
R1.
17%
RS .= (SP)
FEMT.7,-(SP)
82.-(SP)
SP.RO
14
#1.14(SP)
#6.SP

;

SP,+

« ERR.FLG

* ERR.FLO,®

6081
6C78
6088
6091

;

*.DODU.FLG

6092
6090
6093

RO
18%

RS
19¢
18

#1
.)
6(SP

6097
;

DODU.FLG,

6099

CIMLAAOQ ML-11

HARDWARD TEST

LOGIC

TEST

MACRO M1113

SECTION

11877

SEQ 0252

22-0ct=-1980 10:47:44

;
042514
042516
042522
042524
042526
042532

001004
016700
104451
104444
062706
000207

147444

000012

20%:
;
;

11894
11898
11902 042534

11903 042536
11904
11905
11906
11907
11908
11909
}}g}g

PAGE 249

JMLG

}}g;g
11880
11881
11882
11883
11884
11885
11886
11887
11888
11893

23-0CT-80 09:11

042540
042542
042544
042546

11916
11917 ;

004767

104466
006000
103773
000207

176664

6107

'<BLF/PAGE>

BNE
MOV
TRAP
TRAP
ADD
RTS

20%
ML.LUN,RO
51
44
#12,5P
PC

Routine Size:
292 words
Maximum stack depth per invocation:

123::

1%:

:
;

22-0ct-1980 10:45:32

JSR

TRAP
ROR
BLO
RTS

66
RO
1%
PC

inyocation:

;

6102

5926

;

6104

19 words

PC,8T123

Routine Size:
6 words
Maximum stack depth per

T0PS

PA:<

( words

CZMLAAD ML=-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0C7-80 09:11

PAGE 250

11919 :MLé4

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

Hgg(‘) :
11922
11923
11924
11925
11926
11927
11928

11929
11930
11931
119%2
11933
11934
11935
11936
11937
11938
11939
11940
11941
11942
11943
11944
11945
11946

;
;
;
;
;
;
;

;
;
;
;
;
;
;
;
.
;
;
;
;
;
;
;
;
;

11947 ;

11948 ;

6108
6109
6110
6111
6112
6113
6114

6115
6116
6117
6118
6119
6120
61217
6122
6123
6124
6125
6126
6127
6128
6129
6130
6131
6132

6133
6134

11949 :
11950 ;

6135
6136

11953 ;
11954 ;

oo
' TEST NUMBER:
!

'
!
!
!
!
!
!
!
!
!

DUE TO THE NATURE OF THE DEVICE
THERE EXISTS KNOWN BAD ARRAY
DATA LOCATIONS.

THEREFORE TO INITIALLY TEST THE ARRAYS'
TIMING AND CONTROL LOGIC A BAD
NIBBLE THRESHOLD OF 36 BAD NIBBLES
OUT OF 100 NIBBLES TESTED WILL BE
TOLERATED BEFORE DETERMINING CONTROL
LOGIC TO BE IN ERROR.

!
!
!
!
!
!
!

THE ARRAYS'
1.

!
!

11959 ;

6142
6143
6144
6145

!
' IMPLICIT
!
'--

11961

6147

11956 ;
11957 ;
11958 ;

11960 ;

;

11962 ;

11963 ;
11964 ;

11965
11966
11967
11968

;
:
:
;

11969 ;

11970 .
11971 ;
11972 ;

11973 ;

6146

6148

6149
6150
6151
6152
6153
6154

ARE

INITIALLY

VIA DAT DM MOD WR]ITE DATA PATTERNS

OF 1'S END 0'S TO S ARRAY

!
!

TEST EACH NIBBLE

(& BITS)

FOR

1'S AND 0'S AND COUNT EACH BAD
NIBBLE ENCOUNTERED.
1F

ACCUMULATED BAD NIBBLES

EXCEED 36 THEN REPORT AN ERROR.
INPUTS:

NONE

local

TST_PAT,
BAD_NIB_CNT,
ERR_FLG;

'TEST PATTERN

'NUMBER OF BAD NIBBLES FOUND
'ERROR FLAG

TST_PAT = ONES;
BAD_NIB_CNT = 2ERGES:

6155

incr TWICE from 0 to 1 do

6159

m oY - TIST_PAT;

6156
6157
6158

TESTED BY:

WORDS.

!
!

6141

INITIAL ARRAY TEST

TEST DESCRIPTION:

6139
6140

11955 ;

TST 24

TEST NAME:

6137
6138

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (66)

!
BGNTST;

!
!

11951 ;
11952

SEQ 0253

begin
BGNSUB;
CLR_MBUS;

'REPEAT LOOP TWICE

"LOAD TEST PATTERN INTO DIAG REGISTERS

CIMLAAD ML-11

HARDWARD TEST

LOGIC

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

11975 ;MLé

PAGE 251

SEQ 0254

22-0ct=-1980 10:47:44

}}g;g :

22-0ct=-1980 10:45:32

11678 ;
11979 ;

6160
6161

MLD2 =
MLE2 =

11982
11983
11984
11985
11986

;
;
;
;
;

6164
6165
6166
6167
6168

MLCS1

11988
11989
11990
11991

;
;
;
;

6170
6171
6172
6173

CLR_MBUS;
DAT DM = ONE;

'SET DATA DIAG MODE

11993 ;

6175

MLCS1

'DO A READ FUNCTION

6178

incr ARR_WRD from 0 to & do

11980 ;
11981 ;

11987 ;

11992 ;

6162
6163

6169

6176
6177

11997 ;
11998 ;

6179
6180

11999 ;

12000 ;
12001 ;

.TST_PAT;
.TST PAT;

DAT DM = ONE;
FIRST_BLK_XFER ();

'SET DATA DIAG MODE
'SET UP A FIRST BLK XFERR

incr CNT from 0 to & do
begin
DELAY (ONE _US);

"'CLOCK S WORDS

= write;

FIRST_BLK_XFER ();

DELAY

= read:

(ONE_US);

begin
DAT
CLK = ONE;

6181

DELAY (ONE_US),

RD_LNG_WRD;

;
;
;
;

6188
6189
6190
6191
6192
6193
6194
6195

12015 ;
12016 ;

6197
6198

12018 ;

6200

12010
12011
12012
12013

;

:
:
;
;
;
;

12014 ;

12017 ;

12019 ;
12020 ;
12021 ;

12022 ;

12023 ;

12024 ;
12025 ;
12026 ;

6184
6185
2139

6201
6202
6203

6204

6205

6206
6207
6208

FUNCTION

INTO MEMORY

'SET UP A FIRST BLK XFERR

.READ THE

5 WORD

"CLOCK OUT A WORD
'READ THE

[N MEMORY
INTO THF

DTAG REGS

DIAG REGISTERS

incr NIB_PTR from 0 to 9 do
'READ THE 10 NIBBLES IN THE WORD
begin
TST_LNG_WRD (.NIB_PTR, .TST_PAT, ERR_FLG);
'COMPARE TST PAT TO NIBBLE UNDER TEST
,ERR_FLG IS_SET

then BAD_NItS_CNT =

_BAD_NIB_CNT

+ 1;

'INCREMENT BAD_NIBBLE

end;

COUNT

IFERR_FLG SET

end;
TST_PAT

6196

6199

.00 A MBUS WRITE

end;

6182
6183

12002
12003
1%88%
1
12006
12007
12008
12009

PA:<NEALE>BL2MLG.BLI.2 (66)

DAT_CLk = ONE;

6174

11994 ;
11995 .

11996 ;

TOPS=20 Bliss=16 v2(206)

ENDSUB;

= not

.TST_PAT;

'REPEAT WITH COMPLIMINT

TST

PAT

end;

it .BAD_NIB_CNT gtr 36

then

'SEE

36 OUT OF

begin
'ERROR IF GTR 36
ERRDF (77, ASYNC, 0);
PRINTB (FIV_FMT, WRD_22, PHR_&, WRD_12, WRD_4S, FN(_14);

pobu (.mi_LON);

DOCLN;

end;

ENDTST;

THE

100 XFERRED WHERE BAD

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0(T-80 09:11

&
1
PAGE 252

SEQ 0255
22=0ct=1980 10:47-44

JMLG

1
1
12034

}2038 042550
2039 042554
2040 0462556
2041 042562
1

12042
12043
12044
12045
12046
12047
12048
12049
12050
12051
12052
12053
12054

MACRO M1113

042564
042566
042570
0462576
042602
042606
042614
042620
042624
042630
042634
042642
042646

12055 042654
12056 042656
12057 042662

12058 042664
12059 062670

12060 042672
12061 042676
12062 042700
12063 042702
12064 042704
12065 042706
12066 042714
12067 042716
12068 042722
12069 062724
12070 042732
12071 042736
12072 042742
12073 042750
12074 042754
12075 042762
12076 042766
12077 042774
12078 043000
12079 043002
12080 043006
12081 043010
12082 043014
12083 043016
12084 043020

004167
024646
012701
005046
005005

104402
152777

141304

$724:

177777

1647142

1462777
150477

000007

1647124

152777

000010

010177
010177
010177

004767
012777
005002
012703
001411
016704
001404
005066
005304
001374
005303
000766
152777

005202
020227
003755
152777

016704
042704

162777
150477
152777

004767
012777
012703
001411
016704
001404
005066
005304
001374
005303

147366
177770

147120
147244
147250
147224

147652
000061

JSR
(Mp

MOV

000040

016704
042704

22-0ct=1980 10:45:32

1%:

CLR
CLR

TRAP

8158
MOV

BIC
BI(B
BIS8

1647156
147024

137226

MOV

BEQ

5%:

000020

1647104

6%:

000004

000040
147232
177770
000007
146764
000010
147532
000071
000001
137110

000004

147006

BEQ
CLR
DEC
BNE
DEC

81S8
INC
CMP
BLE
B1S8
MOV

146770
147036
146704

7%:

8%:
9%

BIC
81(8B
BISB
8158
JSR
Mov
MOV
BEQ
MOV
BEQ
CLR
DEC
BNE
DEC

TWICE

#40,aML .REG+40
R4
ML.DUT,
2177770 ,R4
#7,3ML .REG+40

PC,FIRST.BLK.XFER
;g1.anL.nec

CLR

*, TST PAT

BAD.NIB.CNT

MOV
MOV

-(SP),=(SP)
2-1,R1
-(SP)

RG.@ML.REG+40
R1.aML.REG+170
R1.aML.REG+200
R1.GML.REG*+160

000901

000004

R1,$SAVES

MoV
MOv
MOV

81S8
JSR

T0PS
PA:<

,«
TST.PAT
¢
TST.PAT
TST.PAT,»

#16,aML.REG#+120
#1,R3
6%
LSDLY,R&

4 (SP)
R&
3]

CNT
«,$$TMP2

;

6159
6160
6161
6162
6163
6164

6166
6168

v, 38TMPI

; $$TMP
; $8TMPY

; $8TMP2

#20,3ML.REL+120
R2
., ¥4
R2
$
2
#40,aML
. REG+40
,R&
ML.DUT

CNT
»
CNT,

6169
6166

6170

#177776,R4

#7,aML .REG*40
R4 aML .REG+40

110,am .REG+120

PC,FIRST.BLK.XFER
271,
ML .REG
£ ,R3
108

R4
LSDLY,

; *,33TMP2
;L 88THPY
. $$TMP

$STMPY

;. $8TMP?

6173
6174
6175

6176

HARDWAKD TEST

0643146
043150
043154
043156

20000 ~NO

—

13%:
14%:

144622

144616

15%:

144612

000010

000010
000006
000006

SEQ 0256
f X

BEQ

BEQ
CLR
DEC
BNE
DEC

BR
MOV
MOV
MOV

16%:

147532

MOV

000004

147000
147002
146754

BR
CLR
B1S8

000001
17%:

000011
000004

CLR

MOV
MOV
MOV
ADD

JSR
cMP
BNE
INC
ADD

-l

W
~N

177364

000001

000044

18%:
19%:

#20,aML.REG+120

#1,R3
15¢

MOV
MoV
MOV
MOV
MOV
MOV
MOV

P oe,88TMP2
$$TMP1

4 (SP)
R4

;
:

$8TMP
$STMP1T

;

$$TMP?

149

13%
R3
12%

aML.REG+170,D1.TEMP
aML.REG+200,D2.TEMP
gzL.REG*160.E2.TEMP
- (SP)
R4,
R1,-(SP)
#10,-(SP)
SP, (SP)
PC,TST.LNG.WRD
10(sP)
., M
17%

6(SP)
#6,5P

RO
193

.WORD
.WORD
.WORD

ARR.WRD

.+,

ROR
BHIS
JMP
INC
CMP

BLE
CMP
BLE

LSDOLY,R4

INC
CMP
BLE
INC
CMP
BLE
COM

TRAP

007146
006324
005760
006630
006062
005414
000006

7%
R2

R4
RG,#11
16%
R2
YR
1%
R

TRAP

(=]
»

VW ~NO W NN

OOV

NO NS W

043062
043064
043072
043100
043106
043110
043112
043114
043120
043122
043126
043134
043136
043142

137050

043042
043046
043050
043054
043056
043060

12094
12095
12096
12097
12098
12099

12093 043040

1646764

—_—

000020
000001

12091 043026
12092 043034

12089 043022
12090 043024

PAOMNMNIMPVMNINIMNIMNININ
= b =2 B B D d 2
22 OOOO

4
J
PAGE 253

‘MLG

12086
12087
12088

2100
01
02
03
04
05

23-0CT-80 09:11

67
1

RS
#1
RS,
18$
, #44
(SP)

208

: NIB.PTR

;
:

NIB.PTR,»
TST.PAT
¢«

ERR.FLG,*

;

CRR.FLG,*

; BAD.NIB.(NT

: NIB.PTR

TOPS
PA:<
0000
~N

MACRO M1113

178
180
181

CIMLAAQ ML-11

6184
6186

6188
6185
6184

¢
NIB.PTR,

;
;

ARR.WRD
ARR.WRD,*

6178

TST.PAT

6195

;

6155

TWICE

TWICE,*

;

BAD.NIB.(NT,+

6199

55
115

6202

FENC.14,-(SP)
#URD
.45 .- (SP)
#URD .12.-(5P)
FPHR .4, - (SP)

6203

asvnc

#WRD .22, - (SP)

T
- (SP)
PEIV.EM
06,-{SP)

MACRO M1113

CIMLAAO ML-11 LOG 1€ 1 EST

043274
063276

104451
104444

043270

043300
043304

043310

016700

146672

062706
002706

000016
000006

000207

PAGE 254

SEQ 0257
22-0ct=-1980 10:47:44
22-0ct=-1980 10:45:32

(MLG
:

010600
104414

MOV
TRAP

208:

SP,RO
14

; SP,w

ML .LUN,RO

;

6204

ADD
ADD

#16,SP
#6,SP

;
;

6201
6106

;

6206

RTS

Routine Size:

51
44
PC

177 words

)

: Maximum stack depth per invocation:

043312

004767

043324

000207

043316
043320
043322

104466
006000
103773

177232

T24::

18:

JSR

TRAP
ROR
BLO
RTS

Routine Size:

6209

'<BLt/PAGE>

16 words

PC,8$T2¢
65
RO
1%
PC

6 words

: Maximum stack depth per invocation:

TOPS
PA:<

MOV

TRAP
TRAP

;

2O 0N

OWNESWIN 20000 NN

043264
063266

NO VS NN

D i
D
d
d
d
—t

043312

oD
i

d wid

D e

D i

D ad

D ed

0000 ~NNNNNNNNOOO
O NNNNNNAWNE B 505~

o
D o
D
D
D o
D
D o
o
el
D e
d
D
D
D
d
i
D
d
d
D
e
o
— e

SECTi

2142

PORIALNLPIRININI
NN NI NN
N NI NI AL PR NI NI AN NI NI POND

HARDWARD TEST

23-0(T-80 09:11

0 words

CIMLAAD ML-11

HARDWARD TEST

MACRO M1113

LO GIC T EST

SE CTION

L &
PAGE 255

23-0CT-80 09:11

SEQ 0258
44
:32

b e

N=OOV0ONO
NN —=O

01,8 1,81 V1,0

b ed ed od
b —d od

NI SIS

ooooooroOrOrOOFOOONONOM

POPON)

[pSI ST ST SRS

O O 000000
-~ OV
NN —=2OP
(=4
o

0
0

MORLNLNLALNLNLNL
N NN NNV
ON
LTSN NT N N NT L VLS L8 o S S S I I
I N I Y MNONOA NN
b b b ed b b b D s b [«
S L AN M A AN N A N
AN PIPOPNINIRINININININD
2O O 0»
WA = OOV NOWVISWN
OOV
NO NS W N=O V0 ~NOWNE

—.-—.—l—.—.-‘—.-—l—.-.—l—‘-—.—‘—.—.—.-.—.—.d—‘—‘-—‘—l—‘—.—‘—l_‘-‘-‘—l_‘-—‘—l—l—‘—.—l—l—.—l—l_l—l-‘-.—l-d—-._.__.

SIS MNNNNNNNN%NNNNNNNNNNNNNNNNNNNN
PO
PO ANININ) -d b b od b b d od =
b b

JMLG

6223

TOPS-20 BlLiss=16 v2(206)
PA:<NEALE>BLZ2ML&L.BLI.2 (67)

BGNTST:
les
|
N

TEST NUMBER:

TST 25

TEST NAME:

PPOM SELECTION TEST

|
.

]
.

TEST DESCRIPTION:

DUE TO THE NATURE OF THE DEVICE
AND OF THE ARRAY MODULES' UV

]
.

PROMS, ONLY PROM READS ARE
ALLOWED DURING DIAG TESTING.

|
.

THEREFORE THE ARRAY MODULE UV PROMS
ARE TESTED FOR UNIQUE SELECTION BY:

|
.

AT EACH PRESENT ARQAY MODULE WRITE 127 ARRAY WORDS WITH 1'S/0'S PATTERN.

READ THE UV PROMS AT THEIR RESPECTIVE ARRAY WORD LOCATION AND SEE IFf

|
.

THE PROMS MASK BAD NIBBLE LOCATIONS

INDICATES INCORRECT MASKING).

|}
.

ARRAY MODULE.

|
.

[}

(ENCOUNTERED BAD NIBBLES

COUNT EACH BAD NIBBLE ENCOUNTERED AT AN

|
.

ALLOW A THRESHOLD OF 5 BAD NIBBLES AT ANY ARRAY MODULE.

REPORT PROM SEL ERRORS AT RESPECTIVE ARRAY MODULE

|
|

THRESHOLD

IS EXCEEDED.

If THE

1
.

IMPLICIT

INPUTS:

PD TEMP:

A BIT VECTOR OF 16 BITS WHERE

|
.

THE READ PROM DATA S STORED
AND ACCESSED FROM.

|
.

1
.

|
.

10 BUF

|
.

A VECTOR OF 256 WORDS WHERE

1
.

DATA FOR MBUS READS AND WRITE

|
.

FUNCTION ARE

FOUND.

tocal

'DROP UNJT FLG
'ERROR FLG
'TEST PATTERN
'ERROR COUNT

DODU FLG,

ERR_FLG,
TST_PAT,
ERR_CNT;

DODU_FLG = ZERO;

TST_PAT = ONES;
incr ARR_SEL

from O to .LST_ARR by

.ARR_INC do

'TEST ALL PRESENT ARRAYS

CIMLAAOD ML-11 LOGIC TEST

D e

\I‘\I\\J\\I\\fl\fl\.fl\fl\.fl\.flbbz

267

SEQ 0259
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (67)

begin

ERR

CNT = ZERO;

BGNSUB;

incr TWICE from 0 to 1
begin
CLR_MBUS;

MDY = LTST_PAT;
MLD2 =

MLE2 =

.TST_PAT;
.TST

PAT;

DAT UM = ONE;

MWl = not 255:

MLBA =

10 BUF:

MLCSY

= write;

MLDA = .ARR_SEL;
incr CNT from 0 to 127 do
begin
DELAY

'REPEAT LOOP TWICE

!LOAD DATA DIAG REGISTERS WITH TST_PAT
'SET DATA DIAG MODE
'LOAD WORD COUNT
'LOAD UBUS ADRS
!LOAD SECTOR
‘DO A WRITE FUNCTION

'CLOCK IN 10 WORDS

(ONE US);

DAT_CLK = ONE;
end;

CLR_MBUS
DAT DM = ONE;

MWl = not 255;

!SET DATA DIAG MODE
'LOAD WORD COUNT

= .ARR SEL;
MLCST = read;

'LOAD SECTOR
'00 A READ FUNCTION

incr WD_CNT
begin

'READ THE 10 WORDS

MLBA =

10 BUF:

DELAY

(ONE_US);

from 0 to 127 do

'LOAD UBUS ADRS

PD TEMP = .MLPD;

'GET PROM DATA FOR THIS WORD

RD_LNG_WRD;

'READ DIAG REG FOR THIS WORD

incr NIB_PTR from 0 to 9 do

'LOOK AT ALL 1C NIBBLE

DAY CLK = ONE;
DELAY (ONE_US):

'CLOCK THIS WORD INTO DIAG REG

i; .PD_TEMP [.NIB_PTR] IS_NOT_SET

D D

then

begin

TST_LNG_WRD (.NIB_PTR,

D el D i
e i el
— o

PAGE

22-0ct=-1980 10:47: b4
22-0ct=1980 10:45 :32

D il

D ) D e i

SECTION

23-0CT-80 09:11

;MLG

NN MAOMPRONININI NNV
oo o
WA
— OOV
NO N
WNI =200

el D el i il e D D D ) D
D e D e e e e e D D e D D
P d D D D a2
NI NIAD NI NI NI NINIAL NI AL NI NI NN NN A NI NI PRI NI NI NI NI NI

HARDWARD TEST

MACRO M1113

'FIND GOOD NIBBLES

.TST_PAT, ERR_FLG);

!COMPARE NIBBLE TO TST_PAT

.ERR_FLG IS_SET then ERR_CNT = _ERR_CNT ¢+ 1;

end;

' INCREMENT ERROR COUNT IF ERROR FLG IS SET

end;

IST_PAT = not

.TST_PAT;

REPEAT WITH COMPLIMENT DATA

CIMLAAD ML-1+

HARDWARD

TEST

LOGIC

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

N 4
PAGE 257

12298 :ML4

22-0ct=1980 10:47:44

}gggg :
12301
12302
12303
12304
12305
12306

;
:
;
:
;

12307 ;

12308
12309
12310
12311
12312
12313
12314
12318
12316
12317
12318
12319
12320

;

;
;
;
;
;
:
;
;
;
12321 ;
12322 :

}%%%; :

12331 043326
12332 043332

12333
12334
12335
12336
12337
12338
12339
12340
12341

22-0ct=-1980 10:45:32
6314
6315
6316
6317
6318
6319

6320

6321
6322
6323
6324
6325
6326
6327
6328
6329
6330
6331
6332
6333

6334
6335

016705

12344 043412

062705

12346
12347
12348
12349

150577
010277
010277
010277

043424
043430
043434
043440

12350 043444
12351 043452

142777

152777
012777

'ALLOW 5 ERROR BEFORE ERRORINMG
'ERROR IF

LTR §

PRINTB (FMT"9, .ARR_SEL);
DODU_FLG = ONE;
end;
ENDSUB;
.
it .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;

'DROP THIS UNIT

DODU_FLG IS SET

end;

140526
000016
000010
177777
144766

152777

PA:<NEALE>BL2MLL.BLI.2 (67)

PRINTB (THR_FMT, WwRD 35, WRD_37, WwRD_10);

004167
162706

12343 043406

12345 043416

1f .ERR_CNT gtr S
then
begin
ERRDF (78, ARR DAT, 0):

ENDTST;

005066
012702
016766
016766
005001
000167
005066
104402
005016

TOPS=-20 Bliss=16 v2(206)

end;

6336

043336
043342
043346
043354
043362
043364
043370
043374
043376

12342 043400

SEQ 0260

144744

$725:

000006
00004

000666
000002

000040
146556

177770

000007

146310
146434
146440
146414

000010
177400

1$:
2%:

146332
146314

146346
146230

3%:

JSR
SuB

CLR
MOV
MOV
MOV
CLR
JMP
CLR
TRAP
CLR

BISB
MOV

BIC

BICB

B1SB
MOV
MOV
MOV

BISB
MOV

R1,$SAVES
#16,SP
10(SP)
#-1,R2
LST.ARR,6(SP)

ARR.INC,4(SP)
R1
25%
2(SP)
2
(SP)

#40,3ML.REG+40
ML.DUT,RS

6208

;
:
;

DODU.FLG
«,TST.PAT

;

ARR.SEL

ERR.CNT

6263

;

TWICE

6266

:
;
;

TST.PAT,
s
TST.PAT,»
TST.PAT,e

6269
6270
6271

;

6258
6259
6261

6267

#177770,R5

#7,3ML.REG+40

RS.aML .REG+40
R2,aML.REG+170
R2,aML .REG+200
R2,aML.REG+160

#10,aML.REG+120
#-400,3ML .REG*10

;
:

6272
6273

CIMLAAO ML=11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

12353

23-0CT-80 09:11

B S

PAGE 258

SEQ 0261

22-0ct-1980 10:47:44

22-0ct-1980 10:45:32

;

}S%E‘g

12356 043460
12357 043466

012777
010177

12359 043500
12360 0643502

005003
012704

12358 043472

12361 043506

012777
001411

12362 063510
1233 OL2E1L
12364 043516
12365 043522

016705
O01LOL
005066
005305

12367 043526

005304

12366 043524

12368 043530

12369 043532
12370 043540
12371 043542

010342
146236

000061

000766

152777
005203

7%:

000020

12374
12375
12376
12377

043556
043562
043566
043576

016705
042705
142777
150577

146406
177770
000007
146140

12380 043614
12381 043622
12382 043626
12383 043634

012777
010177
012777
012704

010342
146102
000071
000001

12585 043642

016705

136250

12387 043650
12388 043654

005066
005305

000014

12390 043660
12391 043662

005304
000766

12386 043646

6% :

001374

000177

12384 043640

5¢:

000014

152777

000040

152777 000010
012777 177400

001411

001404

146260

12396 043706
12397 043710
12398 043714

005003
017767
152777
012704
001411
016705
001404

146162

005066
005305
001374
005304

000034

12404 043732
12405 043740
12406 043746

017767
017767
017767

146132
146134
146106

12407 043754

000766

005004

)
; ARR.SEL,*

6274
6275

CLR
MOV

R3
* R4

CNT
P e, $8TMP2

62/8
6280

BEQ

MOV
BEQ
CLR
DEC

146212
146074
146044

9% :

108:

145766
146116

128:
13%8:
14%:

15¢:

168:
1437564
143750
1463744

17%:

6276

;

; $$TMP2

BISB
INC

#20,3ML.REG+120
R3

;
: CNT

6281
6278

BLE

MOV
BIC
BICB
BISB

#40,ML.REG+40
ML.DUT,RS
177770,R5
#7,3ML.REG+40
RS.aML.REG+40

;

6282

#10,aML.REG+120
#-400,3ML.REG+10

;
:

6285
6286

BNE

DEC

BISB
MOV

146076

261, aML .REG
L$OLY,RS
7%
14 (SP)
RS

B1SB

146144

136202

12399 043716
12400 043722
12401 043724
12402 043726

12403 043730

8$:

118:

146236
000020
000001

#10.BUF ,aML .REG+20
R1,3ML.REG+30

CMP

12389 043656 001374
12392 043664
12393 043666
12394 043674
12395 043702

MOV
mOov

MOV
48:

136402

020327
003755

12378 043600
12379 043606

146200

000001

12372 043546

12373 043550

146232

TOPS

PA:<

MOV
MOV
MOV
MOV
BEQ

R3,M77

#10.BUF , aML .REG+20
R1,aML.REG+30
#71,3ML.REG
M,
12%

v, 88TMPI

. $STMP
. $STMPI

LOONT,e

:
ARR.SEL,*
;
x,$8TMP2

MOV

LSDLY,RS

; %, $$TMP

CLR
DEC

14(SP)
RS

. $STMP
$$TMPI

DEC
BR

R4
9%

; $STMP?

BEQ
MOV

17%
LSDLY,RS

BEQ

BNE

CLR
MOV
BISB
MOV
BEQ

118

108

R3
aML .REG+230,PD. TEMP
#20,3ML.REG+120
2 R4
168

CLR
DEC
BNE
DEC

14 (SP)
RS
15%
Ré

MOV
MOV
MOV

aML.REG+170,D1.TEMP
.
TEMP
aML .REG+200.,D2
SML.REG+160,E2.TEMP

CLR

14%

; WD.ONT
:
:
L e, 88TMP2

6287
6288
6289
6290

6292
6294
6295
6296

; v, $8TMP

; $STMP
L $RTMPI

; $$TMP2

. NIB.PIR

6299

CIMLAAO ML-11 LOGIC TEST
HARDWARD TEST SECTIGN

MACRO M1113

12409

5
¢
PAGE 259

SEQ 0262

MLG

22-0ct=-1980 10:47:44

22-0ct=1980 10:45:32

}%2}?
12412 043756
12413
12614
12615
12416
12417
12418

23-0(CT-80 09:11

063760
043762
043764
0643766
063772
043774

12619 063776

12420 044002
12621 044006

12422 044010

12623 044014

12424 0644020
12425 064022

12426 044026

12627 044026

12428 044030

010405

006205
006205
006205
062705
010546
010446

042716

18¢:

011662

177770

012746
005046

000001

062706

000010

004767

005700
001017

000011

12440 044100

126441 044102
12442 044104

12443 046106

062706
005204

003732

005203

020327
003672

005102
005216

12444 044112
12445 044114

021627
003002
000167

12447 046126

003434

12446 064120

12448 066130

026627

000116
007534
000000

12453 044144
12454 064150
12455 044154
12456 044160
12457 044164
12458 064166

012746
012746
012746
012746
010600
104414

12459 044170

12460 0446172
12461 064176
12462 064202
12463 0646204

000006

012746

010116

012746
012746
010600
1046414

CMP

19¢:
20$:

177260

006232
006220
005366
000004

004602
000002

: ERR.CNT

R4, #11

. NIB.PTR,*

: WD.CNT

6292

: TST.PAT
L TWICE

6313
6266

2(SP) ,#5

: ERR.CNT,®

6316

;

6319

#WRD.10,-(SP)

;

6320

R3,#177
3¢

21%
3¢

BLE

22%

(SP), M

.WORD
.WORD
WORD

116
ARR.DAT
0

MOV
MOV
MOV
MOV
MOV
TRAP

#WRD.37.-(SP)
#WRD .35, - (SF)
STHR.FMT,-(SP)
#6,-(SP)
SP.RO
14

MOV

MOV
MOV
MOV
TRAP

6306

6303
6299

BGT
JMP

CMP

6304

:
: NIB.PTR

R2
(SP)

TRAP

005740

10(SP)

COM
INC

CMP

21%:

: ERR.FLG,*

18§

BLE

000005

20(sP) . #1

BLE

CMP

L TST.PAT.«
: ERR.FLG,*

#6,5P
R4

CMP

000001

000002

INC

; NIB.PIR,®

P, (SP)

ADD
INC

INC

000177

104455

12449 064132
12450 044134
12451 064136

12452 066140

R2.-(SP)

BNE

020427

12439 044074

R&,-(SP)

PC.TST.LNG.WRD

000010

12438 044072

RO
208

JSR

000001

: NIB.PIR,*

n0,sp

146616

001002

6301

PC,BLSGT?

004767

ADD

: NIB.PIR,®

#,-(SP)
-($P)

#20,-(SP)

005266

12436 044066

047770, (5P

MOV

000020

12437 064070

MOV

RS
RS
RS
#PD.TEMP,RS
RS,=(SP)
Ré . =(SP)

000020

026627

12434 044056
12435 044062

ST
BNE

R4 ,RS

012746

12631 044042

12433 064052

JSR

ADD

MOV

060616

12432 044050

MOV
CLR

137066

12429 064034

12430 064036

ASR
ASR
ASR
ADD
MOV
MOV

BIC

010446

010246

MOV

TOPS

PA: <

R1,(SP)

#FRT.9,-(SP)
#2,-(SP)
SP.RO
14

. WD.CNT,®

. TWICE,*

. 5P,e

; ARR.SEL,*
; SP,e

6321

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

12465

012766
062706
104467

000001
000016

12474 044232

026627

000010

12476 044242

016700

145720

12478 044250

104444

12477 044246

006000
103002
000167
001004

1044651

12479 044252

066601

12482 044264

000167

12480 044256
12481 044262

12483 044270

12484 044274
12485
12486

020166
003002

062706
000207

177142

000026

12502 044276

12503 044302
12504 044304
12505 044306
12506 044310
1¢507

000001

000004

000006
177100

000016

104466
006000
103773
000207

177024

10(spP) .,

; DODU.FLG,*

6327

MOV

ML.LUN,RO

6330

TRAP

25%:

cMP
BGT

R1,6(SP)
26%

: +,ARR.SEL

6261

26%:

ADD

6208

ROR
BHIS
JMP

CMP

BNE

TRAP

248%:

T25::

1%:

}%g?z

12516 ;

6322
6318
6323

ADD

JMP

RTS

RO
23
2%

248

4(SP),R1

JSR

TRAP
ROR
BLO
RTS

Routine Size:

'<BLF/PAGE>

20 words

PC,8T25

;

66
RO
1%
PC

6 words

; Maximum stack depth per invocation:
6337

; ARR,SEL,*

#16,5P

Routine Size:
244 words
; Maximum stack denth per invocation:

004767

TOPS

PA: <

; +,DODU.FLG
:
;

23$:

MOV
ADD
TRAP

;

12508
12515

22-0ct=1980 10:47:44

22-0ct=1980 10:465:32
#1,26(5P)
#16,5P
67

22%:

12487

12492
12493
12497
12501 044276

SEQ 0263

‘MLG

12468 044206
12469 044214
12470 044220

12475 044240

5
D
PAGE 260

;

}%zgg

12471 0446222
12472 044224
12473 044226

23-0(T-80 09:11

0 words

6334

CZMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:17

S
E
PAGE 261

12518 ;ML4

22-0ct=1980 10:47:44

22-0ct=-1980 10:45:32

}%2%8 ;
12521
12522
12523
12524
12525
12526
12527
12528
12529
12530
12531
12532
12533
12534

;
.
;
;
;

6338
6339
6340
6341

!
BGNTST;

;
;
;
;
;
;
.
;

6344
6345
6346
6347
6348
6349
6350
6351

'
!
'
!
!
!
!
!

12535
12536 ;
12537 ;
12538 ;

SEQ 0264

6342
6343

6352
6353
6354
6355

'ee

'
!

TEST NUMBER:

TST 26

TEST NAME:

READ WRITE ARRAYS WITH PROM DATA

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4L.BLI.2 (68)

TEST DESCRIPTION:
COMBINE THE READING OF ARRAY
MODULE DATA WITH ARRAY MODULE UV PROM DATA AND
FIND A GOOD BLOCK WHERE FURTHER
TESTING WILL BE PERFORMED BY:

!
!

STARTING AT BLOCK O WRITE THE BLOCK WITH SELECTED DATA PATTERNS
AND READ THE BLOCK AVOIDING ANY BAD NIBBLES POINTED TO BY THE
PROM DATA,

SET ERROR FLAG IF ANY BAD NIBBLES ARE ENCOUNTERED IN BLOCK.

}3228 .

g%gg

;

12541

;

6358

REPEAT WRITING/READING THIS BLOCK UNTIL ALL PATTERNS ARE TESTED

12544 ;
}%%22 ;

6361
2%2%

!
E

IF ALL PATTERN HAVE BEEN TESTED AND THE ERROR FLAG IS NOT SET
THEN SAVE THIS BLOCK ADDRESS AS THE GOOD BLOCK ADRS AND EXIT TEST,

ELSE IF THE ERROR FLG HAS SET THEN REPEAT TEST AT THE NEXT ROW.

12542 ;
12543 ;

12547 ;

6359
6360

}ggzg .

gggg

;

12550 ;

6367

12551
12552 ;
12553 ;
12554 ;

12555 ;

12556
12557 ;
12558 ;
12559 ;

12560 ;

12561 ;
12562 ;
12563 .

12564 ;

12565
12566
12567
12568
12569
12570

;
;
;
;
;
:

12571 ;

12572 ;

6364

!
!

6368
6369
6370
6371

6372

6373
6374
6375
6376

6377

6378
6379
6380

6381

6382
6383
6384
6385
6386
6387

6388

6389

!
!
!
!

OR THE ERROR FLAG IS SET,

REPEAT UNTIL A GOOD BLOCK IS FOUND OR LAST ROW IS REACHED.

IF NO GOOD BLOCK IS FOUND BY LAST ROW THEN REPORT ERROR AND

EXIT TEST.

IMPLICIT INPUTS:
RAS INC

LOADED DURING THE INITIALIZATION CODE AND (ONTAINS THE ROW ADDRESS

!
!
!
!

INCREMENT VALUE FOR THIS DRIVE.

PD TEMP:

A SGITVECTOR OF 16 BITS WHERE THE READ PROM DATA |S STORED AND

!
!
!

ACCESSED FROM.
10 BUF:

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE FUNCTION

!
!
!
!'--

ARE FOUND.

local

WRD_CNT,

NIB PIR,

'WORD COUNT

'NIBBLE POINTER

CIMLAAD ML-11 LOGIC TEST

HARDWARD

TEST

MACRO M1113

SECTION

23-0(T7-80 09:11

F
5
PAGE 262

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

JMLG
6390
6391
6392
6393
6394
6395
6396
6397
6398
6399

6400
6401
6402
6403
6404
6405
6406
6407
6408
6409
6410
6411

6412

6413

YA NP S S

T S S

PR TR TR

I PR

I P REL N FEL R R KR KN N

6414
6415

)
e
T
N
J T

nonon NN

oo oo
OO0 o
SN ~N N—A-.A_.—l-._‘—i St — OV
O
W ~N

600

SEQ 0265

6416
6417
6418
6419
6420
6421
6422
6423
6424
6425
6426
6427
6428
6429
6430
6431
6432

6433
64634
6435

6436
6437
6438
6439
6440
64461

'PASS COUNT
'NIBBLE PATTERN
'DON” FLAG
'ERROR FLAG
.SECTOR NUMBER

PASS (NT,

NIB PAT,
DONE FLG,

ERR FLG,
SECTOR_NO:

BONSUB;
PASS CNT

T0PS=-20 Bliss=16 v2(206)

FA:<KNEALE>BL2MLL.BLI.2

-1;

SECTOR_NO = ZEROES;

DONE _FLG = ZERO;
do

)
begin

'THIS LOOP DETERMINES WHEN TO STOP

'THIS LOOP RUNS THE PATTERNS

begin
PASS

CNT

CLR_MBUS;

.PASS_CNT

' INCREMENT THE PASS COUNT

'SET DATA DIAG MODE
'LOAD SECTOR NUMBER
'LOAD WORD COUNT
'LOAD UBUS ADRS

DAT _DM = ONE.

MLDK = .SECTOR_NO;

MLWC = not 255.
MLBA =

I0_BUF;

case .PASS_(NT

IN DSA

from 0 to 3 of

'SELECT A NIBBLE PATTERN

= %0'000000°';

'ZEROES

set

(0]

:
NIB_PAT

(1]

:
NIB_PAT = Xo0'17°';

'ONES

(2]

:
NIB_PAT

= Xo0'12';

'ALTERNATING ONE'S, ZEROES

(3]

:
NIB_PAT

= Xo0'15'

'COMPL IMENT ONE'S,

ZEROES

tes;

incr LD_CNT

from 0 to 9 do

LD_CNG_WRD (.LD_CNT,

.NIB_PAT);

'LOAD NIBBLE PATTERN INTO NIBBLE

SAVE

WRT_LNG_WRD;

'LOAD THE DATA DIAG REGISTERS WiTH NIBBLE SAVE

incr WRT_CNT from 0 to 127 do
begin
DELAY (ONE_US).

'WRITE PATTERN INTO THIS BLOCK

MmLCS1 ="write;

DAT_CLk = DNE:
end;

CLR_MBUS;

‘D0 A WRJTE FUNCTION

(68)

CIMLAAD ML-11

HARDWARD TEST

SR TR PR
P
R PR
TN P N PR S PR P PR
I ETE TR TR P NN P PRI
T
T
T YR
T T
T
S
S

12645
12646
12647
12648
12649
12650
12651
12652
12653
12654
12655
12656
12657
12658
12659
12660
12661
12662
12663
12664
12665
12666
12667
12668
12669
12670
12671
12672
12673
12674
12675
12676
12677
12678
12679
12680
12681
12682
12683
12684

12643
12644

12641
12642

L
RN I RN R TN R RN R

12630 ;MLé
12631
12632
12633
12634
12635
12636
12637
12638
12639
12640

MACRO M1113

06 l C TEST
S EC 1 1ON

23-0CT-80 09:11

PAGE

SEQ 0266
“7: 4 4
22-0ct-1980 10:47:
22-0ct-19 80 10: 45: 32

6442
6443

= read;

'SET DATA DIAG MOD 3
'LOAD SECTOR NUMBER
.LOAD WORD COUNT
.LOAD UBUS ADRS
.DO A READ FUNCTION

WRD_CNT = =1;

'RESET THE WRD COUNT

DAT DM = ONE;

MLDE = _SECTOR_NO;
MLWC = not 255;

6444

6445

MLBA =

MLCSY

6446
6447
6448
6449
6450
64651
6452

DELAY

10_BUF;

(ONE_US);

begin
CNT =
WRD

'READ DIAG REGISGTER

LNG WRD;

NIB_PTR = -1;
do

beqgin

NIB_PTR =
it

6463
6464

6493

_TEST BLOCK FOR NIBBLE PATTERN
| INCREMENT WRD_CNT
IGET PROM DATA
.CLOCK DATA WRD INTO DIAG REG

DELAY (ONE_US):

6461
6462

6465
6466
6467
6468
6469
6470
6471
6472
6473
6474
6475
6476
6477
6478
6479
6480
6481
6482
6483
6484
6485
6486
6487
6488
6489
6490
6491
6492

.WRD CNT

PD TEMP = .MLPD;
DAT CLK = ONE;

6453
6454
6455
6456
6457
6458
6459
6460

TOF>=20 Bliss=16 v2(206)

PA:<NEALE>BLZMLL.BLI.2 (68)

RESET NIBBLE POINTER

'SEARCH AND TEST GOOD NIBBLE>
.INCREMENT NIBBLE POINTE

.NIB_PTR + 1;

.PD_TEMP [.NIB_PTR)

IS_NOT_SET then TST_LNG_WRD

(.NIB_PTR,

.NIB_PAT, ERR_fLG);

end

until

(.ERR_FLG) or (.NIB_PTR eql 9);

end

until

(.ERR_FLG) or (.WRD_CNT eql 127);

end

'REPEAT UNTIL ALL PAT TESTED OR ERROR FLG GETS SET

until (.PASS_CNT eql 3) or (.ERR_FLG [S_SET ).
i; (.PASS_CNT eql 3) and (.ERR_FLG IS_NOT_SET
then

begin

)

'WAS THIS A GOOD BLO(CK?

'YES

DONE_FLG = ONE.
GOSD_BLK = .SECTOR_NO;

'SET DONE FLAG
'GO0D BLOCK GETS THIS SECTOR NO

else

begin
SECTOR_NO - .SECTOR_NO +

PASS_CNT = =1;
env;

.RAS_INC;

'NO

'INCREMENT ROW NO
'RESET PASS COUNT

end

until

(.DONE_FLG 45_SET ) or (.SECTOR_NO eql LLST_ARR ¢ _ARR_INO);
'REPEAT UNTIL GOOD BLK FOUND OR AT LST ROW

ENDSUB;

.SECTOR_NO eql

then

.LST_ARR ¢

.ARR_INC

'SEE

IF WE'RE AT

THE LAST BLOCK

CIMULAAQ ML-11 LOGIC

HARDWARD TEST

12686
12687
12688
12689
12690
12691
12692
12693
12694
12695
12696
12700
12704
12705
12706

d el

d e

D i

ed =D ol

NIV NINIAIPNINI
NN NN NN
NN
~N~N~N~NN N NNNNNNNNNNN N
NI
NI LN PON) =D cd od cod o ad ced b d b o
O N WD S OOV
NOWVNEWN
2O 0

D il
D

N
~n

NN~
N NN
PRV
[, 8]

D el
d
e
e
D e
d
— e

MACRO M1113

SECTION

23-0(T-80 09:11

H
S
PAGE 264

;
;

SEQ 0267

22-0ct=-1980 10:47:44
22-0ct=-1980 10:45:32

;ML
;

044312
044316
044322
12707 044324
12708 044332
044334
044340
044344
044352
044356
044362
044370
044374
044402
044406
044414
044422
044426
044430
044434
044436
044440
044442
727 044444
728 044446
044450
730 044454
[$) 044456
044462
064464
044470
735 0464472
736 044474
737 064476
738 0464502
739 044504
LSTNL VT NY N NT N NI ST ST S TN

TEST

6494
6495
6496
6497
6498
6499
6500
6501

begin
ERRDF

end;

ENDTST;

012766
005002
005066
005266

006305

000014
000022
000030
005001
000410
012701
000405
012701
000402
012701
005005
010546
010146
004767
022626
005205

‘A GOOD BLK NOT FOUND BEFORE LAST BLK
'ERROR AND DROP UNIT

DODU (.ML_LIN);

177777

066507
000010

0);

(68)

DOCLN;

137542
000014

152777
016705
042705
1462777
150577
152777
010277
012777
012777
016605

ARR DAT,

PRINTB (THR_FMT, WRD_14, PHR_10, FNC_15);

004167

162706
104402

(79,

T0PS-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4L.BLI.2

000004
000002
000040
145612
177770
000007
145344
000010
145322

177400

010362
000002
044434

$726:
'

000002
145366

2%:

TRAP
MOV

CLR
CLR
INC
81S8
MOV

8iC
Bl(B
BISB
B1S8

145350
145416
145274

145276

3%:

4%:

MOV
MOV
MOV
MOV
ASL
ADD

.WORD
.WORD
.WORD
.WORD
CLR
BR

6336

R1,85AVES
g14,SP
#-1,2(5P)
R2
4(SP)

2(SP)

¢ PASS.(NT

SECTOR.NO
DONE.FLG

PASS.(NT

ML.DUT.RS
#177770.85

#7.,3ML .REG+40
RS @ML.REG+40

#10,aML
. REG+120

R2,aML.REG+30
#-400,3ML .REG+10
#10.BUF ,aML.REG+20

2(SP) .RS

SECTOR.NO,
*
PASS.CNT
,+

3$(RS),PC

4$-3%

5¢-38
6$-3%
7$-3%

NIB.PAT

6%:

MOV

* ,NIB.PAT

7%:

MOV

9%:

MOV
MOV

000012

000015

8%:

* ,NIB.PAT

CLR

JSR
(MP
INC

6408
6409
6410
64611
€413

* ,NIB.PAT

5%:

6394
6397
6398
6399
6406

#40,aML
. REG+40

MOV

000017

147134

JSR
SuB

R1,-(SP)
PC,LD.LNG.WRD
(SP)+,(SP)+
RS

LD.CNT
LD.CNT,»
NIB.PAT,+
LD.CNT

6417
6413
6420
6413
6423
6413
6426
6429
6430

6429

CIMLAAD ML=-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

12761

020527
003767

000011

127647 064522
12748 044530

016777
016777

143170
1643164

016777

143174

145346

012777
005003
012704

000061

145134

12753 044554
12754 044560
12755 044562
12756 044566
12757 044570
12758 044572

016705
001404
005066
005305
001374
005304

135336

12760 044576
12761 044604

152777
005203

000020

152777

000040

12752 064552

12759 044574

12762 044606
12763 064612

12764 044614

12765 044622

12766 044626
12767 044632
12768 044640

001411

000766

000177

016705

145342

177770

12770 064652

010277

145052

12772 044664
12773 044672
12774 044700

012777
012777
012704

010342
000071
000001

12776 044706

016705

135204

12778 044714
12779 044720
12780 044722
12781 044726
12782 044726

005066
005305
001374
005304
000766

000012

152777

12771 044656 012777

12777 044712

12783 044730
12784 044736
12785 044742
12786 044750
12787 044756
12788 044762
12789 044764
12790 044770

12791 044772
12792 044776
12793 045000
12794 045002
12795 045004

001411

001404

012766
005266
017767
152777
012704

001411
016705
001404
005066

005305
001374

005304

000766

118

12%:

13%:

020327
003755

062705

108:

000012

000007
145074

12775 044704

22-0ct=-1980 10:47:44

22-0ct=1980 10:45:32

145214

14$:

177400

145024

135126
000012

#61,3ML . REG
R3
1 ,RG

;
* WRT.CNT
D ox,88TMP2

6433
6635
6437

MOV
BEQ
CLR
DEC
BNE
DEC

LSDLY,RS
13
12(SP)
RS
12%
R4

; o, $8TMP1

BISB
INC

#20.aML.REG+120
R3

;
. WRT.CNT

6438
6435

BISB

#40,aML.REG+4LD

;

6439

BIC

2177770,
RS

MOV
CLR
MOV
BEQ

MOV

16$:

144712
145042

6430

MOV

15¢:

18%:
19%:
20$:

218

22%:

LD.CNT,e

;

gIsB

145026
145000

000006

D2.TEMP
. aML .REG+200
E2.TEMP.aML .REG+160

T0PS

PA: <

D1.TEMP,aML.REG*170

BICB
BISB

178

177777
000006
145162
000020
000001

MOV
MOV

MOV

145100

145146

RS, #11
9%

CMP
BLE

145116

000010

CMP
BLE

MOV

145350
145322

000001

142777
150577

12769 044644

SEQ (0268

sMLG

12744 044506
12745 044512

12749 044536
12750 044544
12751 044546

5
1
PAGE 265

}%;2%
12746 044514

23-0CT-80 09:11

MOV
MOV
MOV
BEOQ

14$

R3, 9177
10$

ML.DUT,RS

#7.8ML.REG+40
RS.aML.REG*+40

; $STMP
: $STMP1

: $$TMP?

: WRT.CNT,®

#10,aML.REG+120

;

#-400,3ML .REG*+10

R2,aML.REG+30

#10.BUF ,aML .REG+20
#71.3ML.REG
1, RG
18%

6443

:
:
D ox,88TMP2

6445
6446
6447

MOV

LSDLY,RS

; v, 88TMPY

CLR
DEC

12(SP)
RS

; $STMP
: $STMPI

DEC

: $STMP2

MOV
INC
MOV
BISB
MOV

#-1,6(SP)
6(SP)
aML.REG+230,PD. TEMP
#20,3ML.REG+120
R4

: *,WRD.CNT
. WRD.CNT
:
:
Do« ,$8TMP?

BEQ
BNE

BEQ
MOV
BEQ
CLR

DEC

BNE

DEC

17%
168

158

23%
LSDLY,RS
22%
12($P)

. e, 38TMPI

; $STMP
LSS TMPY

; $$1MP2

21
20%

6442

SECTOR.NO,*

6444

6448
6452
6453
6454
6455

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

12797
}%;gg

5
J
PAGE 266

SEQ 0269

(MLG
:

12800 045006
12801 045014
12802 045022

017767
017767
017767

12804 045034

005216

12803 045030
12805 045036

12806
12807
12808
12809
12810
12811

23-0CT-80 09:11

012716

006205
006205
006205
062705
010546
016646

12813 045064
12814 045070

012746
005046

12815 045072
12816 045076
12817 045102
12818 045104
12819 045106
12820 045110
12821 045112

177777

142700
142674
142670

042716

23%:

248

011605

045040
045042
045044
045046
045052
045054

12812 045060

145056
145060
145032

011662
000002

177770

22-0ct=1980 10:47:44
22-0ct-1980 10:45:32
MOV
MOV
MOV

aML.REG*170,D1.TEMP
aML .REG+200,D2.
TEMP
ML .REG+160,E2.
TEMP

INC

(SP)

MOV
MOV

000001

#-1,(SP)

: «,NIB.PTR

6457

(SP).,RS

; NIB.PTR,»

6463

ASR
ASR
ASR
ADD
MOV
MOV

RS
RS
RS
#PD.TEMP
RS
RS, =(SP)
2(SP),=(SP)

MOV
CLR

#1,-(SP)
-($P)

BIC

#7770, (sP)

004767
062706
005700
001011
011646
010146
012746

136004
000010

000016

JSR
ADD
ST
BNE
MOV
MOV
MOV

12823 045120
12824 045126

004767
062706

145534
000006

JSR
ADD

PC.TST.LNG.WRD
86.SP

12826 045136
12827 045140
12828 045142
12829 045146

032705
001012
021627
001332

BIT
BNE
CMP
BNE

#1,RS
26$
(SP),#11
248

BNE
CMP
BNE

26$
6(SP),#177
19%

12822 045116 060616

12825 045130

12830 045150

12831 045154
12832 045156
12833 045184

016605

032705

001004
026627
001264

12834 045166 005004
12835 045170
12836 045176
12837 045200
12838 045202
12839 045204
12840 045210

026627
001002
005204
000403
020527
001030

12842 045214
12843 045216
12844 045220

103010
005705
001006

12848 045236
12849 045242
12850 045250

066702
012766
026627

ADD

000010

25%:

000001

000011

000001

BIT

000006

000177

000002

000003

000001

12851 045256

012766
010267
000405

001410

268%:

27%:

12841 045212 006004
12845 045222
12846 045230
12847 045234

288 :
000001
143072

1464426
177777
0000064

MOV

00004

000002
000001

29%
30$:

CLR

CMP
BNE
INC
BR
CMP
BNE

ROR

BCC
ST
BNE

MOV
MOV
BR

ADD
MOV
CMP
BEQ

TOPS
PA:<

PC,BLSGT2
00,sp
RO
258

(SP),=-(SP)
R1,=(SP)
#1%5,=(SP)

: NIB.PTR

: NIB.PTR,*

; NIB.PTR,«
; NIB.PAT,»

SP, (SP)

: ERR.FLG,*

10(SP) ,RS

: ERR.FLG,*

#1,RS

2(SP) . #3
27%
R4
288
&S,
41
3¢

#1,4(SP)
R2.G0OD . BL K
30%

RAS.INC,R2
#-1,2(SP)
4(SP), 1
32%

6466

: NIB.PTR,+

;

6469

: WRD.CNT,*

;

: PASS.CNT,+

29%
RS
29

6661

6472

6674
: *,DONE.FLG
* SECTOR.NO,*
;

. «,SECTOR.NO
* «.PASS.CNT
: DONE.FLG,*

6u?7
6478
6474

6482
6483
6487

CIMLAAO ML-11 LOGIC

HARDWARD

MACRO M1113

SECTION

~NO~

0o 00 00 OO

V00

(¥, ]

S
S
S
S
P

23-0(T-80 09:11

PAGE 267

SEQ 0270
4 7:464

sMLG

12853
2854
855

TEST

045260
045264
045270
045272
045274
045300
045302
045304
045306
045312
045316
045322

016705
066705
020205
001402
000167

31%:

32%:

000167
016705

012746
012746
012746
010600
104414

016700
104451

045406

MOV
ADD

104467
006000
103002

066705
020205
001026
104455
000117
007534
000000
012746
012746

104444
062706
062706
000207

33%:

007162
006740
005774
005366
000004
1464574

000012
00001¢

34%:

;

004767

104466
006090
103773
000207

176676

(MP
BEQ
JMP

BHIS
JMP

MOV
ADD
(MP
BNE
TRAP

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
TRAP
TRAP
ADD
ADD
RTS

Foutine Size:

Maximum stack

126::
1%:

TOPS
PA:<

LST.ARR,RS

ARR.INC,RS
R2,RS

;

32¢

SECTOR.NO,*

TRAP
ROR

.WORD
.WORD
.WORD

045410
045410
045414
045416
045420
045422

[ 5:32

ARR.INC,RS
R2,R5

SECTOR.NO,*

6495

117
ARR.DAT

6496

#ENC.15,-(SP)
#PHR.10,-(SP)
#WRD
.14 ,-(SP)

#THR.FMT,-(SP)
#4,-(SP)

SP,RC

5P,

6497

ML.LUN,RO
51

&4
#12,5P
#14,SP

6494
6336

287 words

depth per invocation:

PC,8126

BLO

kO
1%

RTS

;

349
55

JSR

TRAP
ROR

6492

LST.ARR,RS

17 words

6499

MACRO M1113

CIMLAAQ ML-11 LOG IC 1 EST

HARDWARD TEST SEC TION

23-0CT-80 C9:11

PAGE 268

5
SEQ@ 0271

22-0ct-1980 10:47: 44
22-0¢t=1980 10:45: 32

SMLG
.

]

)

[
[

12 918 ;
12 919 ;
12 920

.
[

[
»

12
12
:
12924 ;
12925
12926 .
12
;
12
12
12
12
[

[
*
[

[

1
1

LJ
[

[4
.
L4

(4
[
[

[4
LJ
[
®

BGNTST;
lee
]

i
i
i
i
i
i
i
i
i
]
i
i
]

TEST NUMBER:

TST 27

TEST NAME:

REFRESH TIMING TEST

TEST DESCRIPTION:
TEST THE MEMORY ARRAY MODULES
REFRESH TIMING AND CONTROL LOGIC
REG BY:
1.

WRITING ALL ONES
600D BLOCK.

DELAY FOR 2 MS

'
!
E

READ THE GOOD BLOCK FOR ONES.
KEEP COUNT OF BAD NIBBLES
ENCOUNTERED

!
'
E

ALLOW A BAD NIBBLE THRESHOLD
OF 20 BAD NIBBLES OUT OF THE
1280 NIBBLES TESTED.

IF THRESHOLD IS EXCEEDED THEN
REPORT ERROR AND DROP THE UNIT.

INTO THE

[

]
i
i
i
i
]
i
i
i
1
i
'

[
LJ

[
.
L4

.
[4
[4
[4

L4
[
[4
[4
[
LJ

[4
L4
.
[4
[
L
4

IMPLICIT
PD

INPUTS:
TEMP:

A BIT VECTOR OF 16 BITS WHERE
THE READ PROM DATA IS STORED

AND ACCESSED FROM.

?%?BAL OWN LOCATION TO THIS

local

TST_PAT,

ERR_CNT,

ERR_FLG;

BGNSUB;

CLK_MBUS;

ERR_CNT = 2ERO;

'TEST PATTERN
'ERROR COUNT
'ERROR FLAG

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (69

CIMLAAO ML-11 LOGIC TEST

HARDWARD TEST

23-0(T-80 09:11

PAGE

269

SEQ 0272

2-0ct- 198 0 10:47:44
2=0ct-19 8 0 10:45:32
TST_PAT = ONES;

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4L.BLI.2 (69)

MLDT = _TST_PAT;

'LOAD DATA DIAG REGS WITH TST PAT

MLCSY = write;

'SET UP A DATA DIAG MODE XFERR
.00 & WRITE FUNCTION

MLD2 = .TST_PAT;
MLE2 = .TST_PAT;
DAT_DM_XFERTM();

'WRITE BLOCK WITH TST PAT

from 0 to 127 do

incr WRD_CNT

begin
DELAY (ONE _US);

DAT_CLK = ONE;
end;

CLR_MBUS;

!SET UP A DATA DIAG MODE XFERR
'D0 A READ FUNCTION

();

DAT DM_XFER

MLCST = read;
DELAY

‘DELAY FOR 2 MS

(TWO_TH_US);

incr WRD_CNT
begin

'READ THE BLOCK

from 0 to 127 do

PD_TEMP = _MLPD;

'!GET THE PROM DATA
.CLOCK DATA WORD INTO DIAG REG

RD_LNG_WRD;

.READ THE

incr NIB_PTR from 0 to 9 do

'LOOK AT 10 NIBBLES

DAT_CLK = ONF;
DELAY (ONE_US);

begin

PR PR P

PR P P PE PN

PRPR P PR

IEPR

PRPR PR PR PR TR TR PR IR TR TR TN ¥

12969 sMLS
12970 .
12971
12972
12973
12974
12975
12976
12977
12978
12979
12980
12981
12982
12983
12984
12985
12986
12987
12988
12989
12990
12991
12992
12993
12994
12995
12996
12997
12998
12999
13000
13001
13002
13003
13004
13005
13006
13007
13008

MACRO M1113

SECTION

DIAG REG

T ET

it .PD_TEMP [.NIB_PTR] IS_NOT_SET then TST_LNG_WRD (.NIB_PTR,

.TST_PAT, ERR_FLG);

'FIND GOOD NIBBLES AND COMPARE THEM
.ERR_FLG

IS_SETM

then ERR_CNT

JERK_CNT + 1;

!'INCREMENT ERROR COUNT IF ERR_FLG IS SET

T T
S

end;

ENDSUB;

:;QAERR_CNT gtr 20
begin

'ALLOW 20 NIBBLES TO fFAIL

'ERROR I}

GTR 20

(80, ASYNC, 0);
PRINTB (FIv_FMT, WRD 22, PHR_4, WRD_12, FNC_16, WRD_48);
ERRDF

0ODU (.ML_LON);

P S

b e ed =d b -

== O 000 ~NO NI ~N

PNION)
=2

b
i
b
D cnd
d wd el
el

A Ll W AN
W A AN A AN
(=lelelalalelelels] o

R R

end;

DOCLN;
end;

ENDTST;

13064 045602
13265 045606
13066 045614

045620
045624
045632
045636
045640
045644
045646
13074 045652
13075 065654
13076 045656
13077 045660
13078 045662

13067
13068
13069
13070
13071
13072
13073

010477
004767
012777
005001
012702
001411

016703
001404
005066
005303
001374
005302
000766
152777
005201

020127
003755
152777

016703
042703

142777
150377

004767
012777
012702
001411
016703
001404
005066
005303
001374
005302

000766
005001

144276

1%:

R1,$SAVES
=(SP),=(SP)

B1s8

#60,aML
. REG+40

TRAP

MOv

BIC
81(8
BIS8
CLR

1446260

ML.DUT,R3

077776,83

#7,3ML .REG+40

:g.GHL.RE6040

000001

MOV
MoV
MOV
MOV
JSR
MOV
CLR
MOV

1346362

MOV

LSDLY,R3
S$
2(SP)
R3

16446160

8Eq

000002

5¢:

000020

144240

6$:

000177
000040
144366
177770
000007
144120
145002
000071
003720
134252

000002

164142

BEQ

CLR

DEC
BNE
DEC
BR
B1SB
INC
CMpP
BLE
B1SB

MoV

BIC
Bl1(B
8Ise
JSR

1464124

144046

7%:

8%:
9%:
:
108

MoV
MOV

BEQ

MOV

BEQ
CLR
DEC
BNE
DEC
BR
CLR

6550
6552

#-1,R4

177777
1446372
1446376
144352
165114
000061

6501

R&, ML .REG+170

R4 ,aML .REG+200
RG.aML .REG+160
PC.OAT.OM.XFER

:?f,aHL.REG
+1,R2
6%

R2
3$
:%0.8"L.REG*120

)

000040
14452°2
177770
000007
144254

JSR
CMP

$127:

136430

IERIE

004167
024646
104402
152777
016703
042703
142777
150377
005005
012704
010477
010477

SEQ 0273

13029
13033 045424
13034 045430
13035 045432
13036 045434
13037 045442
13038 045446
13039 045452
13040 045460
13041 045464
13042 045466
13043 045472
13044 0465475
13045 045502
13046 045506
13047 045512
13048 045520
13049 045522
13050 045526
13051 045530
13052 045534
13053 045536
13054 045542
13055 045544
13056 045546
13057 045550
13058 045552
13059 045560
13060 045562
13061 045566
13062 045570
13063 045576

NS
PAGE 270

ERR.CNT

«, TST.PAT

¢
TST.PAT,
TST.PAT
¢
TST.PAT
,»

SECTION

23-0CT-80 09:11

HARDWARD TEST

MACRO M1113

D
, CNT
#4R
IR

CIMLAAD ML-11 LOGIC TEST

+,$8TMP?

6554
6555
6556
6557
6558
6559
6560
6562
6564

*,$$TMP1
$STMP
$STMPI

38TMP?2
D
., CNT
WR
WRD.CNT,«

R1,#177

6565
€562

6566

#40,aML .REG+40

ML.DUT,R3

0n77776.R3

#7.,3ML.REG+40
R3.GML.REG+40
PC.DAT.DM.XFER
#71 . amL .REG

#3750,R2

+,38TMP2

LSOLY,R3

; o+, 98 TMPY

108

6569
6570
6571

$STMP

L $$TMPY
$$TMP2
;

WRD.CNT

6573

L0
HARDWARD TEST S 3

MACRO M1113

CIMLAAOD ML-11
13080
13081
13082

13086 045704
12087 045706
13088 045712

~NO
WA 2OV
NOWVE WA 2O 0NN
S WA= OOV

[ o] [=]e]
(VL
P
AWNANANANANINI NI NN N N PONON) b —d = b b oh b b b 2

D
D d e
D i
b
) b o cnd e

N AN N

d e wd e

th b

D d d d D i

d D d D

N L U N AN N N N Y wuuuuwwgww

102 045764
103 045770

oo~

D
d
—

3101 045762

045772
045774
046000
046004
046006
046012
046016
046020
046022
046024
046026
046032
046034
046040
046044
046050
046052
046054
044056
046062
046064
046066
046072
046074
046076
046100
046102
046106
046112
046114
046116

14%:
£H oo

045744
045752
045754
045756
045760

13%:

000002

13094 045730
13095 045736

SEQ 0274
TOPS
PA:<

MOV

8158

MOV

BEQ
MOV

13096
13097
13098
13099
13100

1346204

—_

045714
045720
045722
045724
045726

11%:
12%:

POl
o

13089
13090
13091
13092
13093

—

144240
000020
000001

13085 045700

—

B_.6
FAGE 271

JMLG

13083 045664
13084 045672

A A L W A L Ll AN AN

23-0CT-80 09:11

8tQ
CLR
DEC
BNE
DEC
BR

15%:

MOV
MOV
MoV

16%:

MOV

011662
177770
000001

CLR

ASR
ASR
ASR

MOV
MOV
MOV
ADD

000011

JSR

18%:

000177

ADD

CMP
BNE
INC
INC
CMP
BLE
INC
CMP
BLE
TRAP
ROR

177324
000024
106455

000120

BHIS
19$:

JMP
CMP
BLE

TRAP

.WORD

D e, 88TMP?
.

v, $8TMO1

$$TMPI

;

$$TMP2

.PTR

PTR,
¢

2177770, (5P)

6575
6576
6577

; $STMP

aML.REG+170,D1.TEMP
aML.REG+200,D2.TEMP
ML .REG+160,E2.TEMP

#,-(SP}
-($P)

CLR

17%:

149

MOV

BNE

144620
000006
000001

LSDLY,R3

#PD.TEMP,R3
R3,-(SP)
R2.-(SP)

JSR
ADD
TST

000006

#20,aML .REG+120
”,R2
15%

ADD
MOV
MOV

8IC

135070
000010

TEMP
aML .REG+230,PD.

;

6580
6583

NIB. PTR,*

PC,BLSGT2
#0,sp

17%
R2,-(SP)
R4 .= (SP)
#6.-(SP)
SP, (SP)
PC.TST.LNG.WRD
86.SP
(SP),#1
18%
RS
R2
R2, M1
16%
R1

R1,#177
11¢%
67
RO
19%

. NIB. PTR,
:

TST. PAT,»

ERR. FLG,

;

ERR. FLG,*

;

ERR. CNT

NIB. PIR,

WRD. CNT
¢
WRD. CNT

. NIB. PTR

;

6587

6580
6573

65N

;

¢
ERR. CNT

6595

6598

CIMLAAD ML-11

HARDWARD

TEST

LOGIC

TEST

MACRO M1113

SECTION

= OO0
WA
=2 O W00 NN

046134
066140
046144
046150
046154
046160
046162
046164
046170
046172
046174
046200
046202

007444

SEQ 0275
7:44

143776

000016

000207

20 $:
:

;

046204
046204
046210

046212

046214
046216

004767
104666

177214

006000

CMP

RTS

Routine Size:

JSR

TRAP

ROR
BLO

103773

000207

RTS

:
;

6605

MOV
MOV
MOV
MoV
MOV
MOV
Mov
MOV
TRAP
MOV
TRAP
TRAP
ADD

Maximum stack

T2 7::
1$%:

! <BLF /PAGE>

TOPS

PA:<

.WORD
.WORD

006360
007174
005760
006630
006062
005414
000006

NS WA

046120
046122
046124
046130

SN
NOWVNO VOO NO VS NN

C
6
PAGE 272

JMLG

COOWOOD N NNNNNYNNOOO
NNV NWDIVINWNES
S0

b
D

D
D

D
i

D
D

D o
D e

D e
D

D
d

D
D

N G

D
D

N U

D
D

D o
D

D
h

N AN N

D erd

d
D

D
o

D
d

o
e

D
e
D e

D o

AN AN U U U AN AN N U

D o

D o
e

e
e

Y (N U

e
i

D oD e
e
el

b ed ead cod

AN W U WA A

b e

N N AN N N NN N NN

13136

23-0(T-80 09:11

6599

)
#EIV FRT,=(SP)
#6,-(SP)

SP,RO

14
ML.LUN,RO

6600

46
#6,SP
(SP)+,(SP)+
PC

184 words

depth per invocation:

6597
6501

15 words

6602

PC,9127
66
RO
1%
PC

Routine Size:
6 words
Maximum stack depth per

invocation:

0 words

MACRO M1113

CIMLAAD ML-11 LOGIC TESY
2O 0
SN

i
i
i
;
5

TEST NAME:

ADDRESS COUNTER TEST

TEST DESCRIPI]ON:

TEST THE ABILITY OF

THE ADDRESS

COUNTER TO SUCCESSFULLY COUNT

FROM BLOCK ZERO THROUGH THE
DEVICES LAST BLOCK BY:

i
;
i
i
;
i

NS UIN—-O

AL NN NVNINIA NINIRNIPLNINI
AN NN
NN PO N PONONIAIN) = = b b b
b D b

WRITING THE LAST BLOCK WITH ONES PATTERN.

STARTING AT BLOCK 2ERO WRITE ZEROES INTO ALL BLOCK UP 70 THE

LAST BLOCK ADRS MINUS ONE.

READ THE LAST BLOCK FOR ONES AND ERROR IF ZEROES.

STARTING AT BLOCK 2ERO WRITE ZEROES INTO ALL BLOCK THROUGH THE LAST

BLOCK.

20000 N

READ THE LAST BLOCK FOR ZEROES AND ERROR IF STILL ONES.
INPUTS:

IMPLICIT

TEMP:

A BITVECTOR OF 16 BITS WHERE THE RtAD PROM DATA IS STORED AND ACCESSED FROM.

local
DODU_FLG,

o], BV OB
o O 00~ [« JY R NV SE_Jap

'DROP UNIT FLAG
'ERROR FLG
'ENDING SECTOR NUMBER
!BACKGROUND PATTERN

ERR_FLG,

END_CNT,

BG_PAT;

N LS
NI RN
ST N1 V] AR
» A0
AN AN ANAWM NI AN

BGNSUSB;
CLR_MBUS;

6656
6657

Honw

1ERO;
0000 FLG
ONES
BG PAT
ES:
-

D d d s

NN NN

b o
D o

AN A AN AN

e
e

b d b D e
s

b e

o e

A L W U U Ll AN U U U U A A A AN A

TST 28

;

13209

TEST NUMBER:

—

b —

Dol eleRelVo) [o -

n
b

b e

BGNTST:

199

—

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (70)

200

(v ) A

SEQ 0276

22-0ct-1980 10:45:32

13243

22-0ct=1980 10:47:64

lee

13241
13242 ;

PAGE 273

JMLG

e
e
o
i
e
b

AN N N AN A N AN N

SECTION

b od

D o

HARDWARD TEST

23-0(T-80 09:11

.BG_PAT;
.BG_PAT;
.BG PAT;

'BACKGROUND PAT OF ONES
'LOAD DATA DIAGS WITH BG PAT

DAT DM = ORE;
LASY BLK_XFER ();
MLCSY = write;

'SET DATA DIAG MODE
!SET UP A LAST BLOCK XFERR
'D0 A WRITE FUNCTION

incr WRD_CNT
begin

'WRITE THE LAST BLOCK WITH THE BG PATTERN

DELAY

trom 0 to 127 do

(ONE_US);

DAT_CLk = ONE;

MACRO M1113

CIMLAAQ ML-11 LOGIC TES
TEST

D
e
D ad e

6664

NN U

6665

6666

Ve
B

(¥,

Ve
P
W,
N, Ve
Ve
Ny
BV
Ve BT
B
Ve Ve Ve
B Be Ve
Be
B e

D e
D d e

E
274

SEQ 0277

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32
6658
6659
6660
6661
6662
6663

W AN AN L
(1,81,
¢ NP

D o
D e
W
N
D
d
D
D o
D
D
D el o
D e
el
el
i e
—r i e

3
3
3
3
3275
3 276
3 P44
3278
3
3

SECTION

PAGE

;ML

N AN AN N N

D e

a —

N NN

NN AN
N rRINOND
F 2l o o
oo (VIVLEV VLIV TV, TV, LV AV a8
— O O NONS WO O ~NO~WDN

HARDWARD

23-0(T-80 09:11

6667
6668
6669
6670
6671
6672
6673
6674
6675
6676
6677
6678
6679
6680
6681
6682
6683
6684
6685
6686
6687
6688
6689
6690
6691
6692
6693
6694
6695
6696
6697
6698
6699
6700
6701
6702
6703
6704
6705
6706

6707
6708

6709

TOPS=-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (70)

end;

CLR_ MBUS;
DAT DM = ONE;
LAST BLK_XFER

mLCsT = 1 ead;
DELA Y

'SET DATA DIAG MODE
'SET UP A LAST BLOCK XFERR
.D0 A READ FUNCTION

();

(ONE_US);

'READ THE LAST BLOCK FOR BG PATTERN

incr WD _CNT from 0 to 127 do
begin
PD TEMP = .MLPD;

.GET PROM DATA
.CLOCK OUT THE DATA WORD

DAY CLK = ONE;
DELAY (ONE_US);

'READ

RD_LNG_WRD;

incr NIB_PTR

from 0

begin

'LOOK AT 10 NIBBLES

to 9 do

.PD_TEMP [.NIB_PTR]

T-€ DATA WORD

IS_NOT_SET then TST_LNG_WRD

(.NIB_PTR,

.BG_PAT, ERR_FLG);

'FIND GOOD NIBBLES AND COMPARE
if ERR_FLG
then

'SEE

IS_SET

'ERROR

begin

ERRDF (81, INTER, 0);
PRINTB (THR_FMT, PHR
&, WRD 13, FNC_22);

THEM

ERROR WAS FOUND

FLG IS SET

PRINTB (TWOZFMT, FNCC13, WRD_56);
EXIT_TST,;
end;
end;

end;

END CNT

M.oY

MLD?
MLE?2
incr

= ,LST_BLK JEROES;
ZEROES;
ZEROES;

TWICE

begin

tror

tND AT LAST BLOCK -1
'LOAD DATA DIAG REG WITH (OMP BG PAT

0 to 1

'REPEAT LOOP TWICE

CLR_M8US;
DAT DM = ONE;

'SET DATA DIAG MODE
!SET UP A FIRST BLOCK XFERR
'D0 A WRITE FUNCTION

FIRST_BLK_XFER ();

MLCSY

= write;

incr BLK_CNT

from O to

incr ADRS_CNT
begin

.END_CNT do

from 0 to 127 do

DAT_(LK = ONE;

'CLOCK THE ADDRESS COUNTER UP TO END_CNT

CIMLAAD ML -11 LOGIC TEST
HARDWARD TEST SECTION
13301

:MLG

13304

;

MACRO M1113

23-0C7-80 09:11

13308 ;
13309 ;
13310 ;

6710

CLR_MBUS;
DAT DM = ONE:

6716

DELAY

6714
6715

13313 .

6719

13315 ;
13316 :

13317 ;
13318 :

13319 .

13320 ;
13321 .

from 0 to 127 do

begin

'SET UP A LAST BLOCK XFERR
.DO A READ FUNCTION
'READ THE LAST BLOCK FOR BG PATTERN

PD TEMP = .MLPD;

'GET THE PROM DATA

6723
6724

RD _LNG_WRD;

.READ DATA WORD

ircr NIB_PTR from 0 to 9 do

.LOOK AT 10 NIBBLES

DAY CLK = ONE;
DELAY (ONE_US).

6725

6726
6727

6730

13326 ;

6732

begin

'FIND GOOD NIBBLES AND COMPARE THEM
it

6733

6734
6735

13331 ;

6737

.CLOCK OUT DATA WORD

it .PD_TEMP [.NIB_PTR] IS_NOT_SET then TST_LNG_WRD (.NIB_PTR, .BG_PAT, ERR_FLG);

6731

13328 ;
13329 .

13330 ;

incr WD_CNT

6721
6722

13324

13327 .

(ONE_US);

'SET DATA DIAG MODE

6720

g;gg

13325 .

LASY BLK_XFER ();
MLCST = Fead;

6718

}ggsg :

.ERR_FLG IS_SET

'SEE

begin
ERRDF (82, ASYNC, 0);

"ERROR IF FLG S SET

then

IF ERROR WAS FOUND

6736

PRINTB (THR _FMT, WRD_SO, WRD_S1, WRD_10);
end;

6738
6739
6740
6741
6742
6743

13339 ;

6745

13332
13533
13334
13335
13336
13337

.
.
.
;

13338 ;

;
;
;
.

6746
6747
6748
6749

13345
13346
13347
13348
13349
13350
13351

;
;
;
;
;
;
;

6751
6752
6753
6754
6755
6756
6757

13344 ;

13355

DODU_FLG = ONE;
end;

end;

6744

13340
13341
13342
13343

6750

TOPS=20 Bliss=16 V2(206)

PA:<NEALE>BL2ML4.BLI.2 (70)

end;

671
6712
6713

6717

13314 ;

SEQ 0278

22-0ct=-1980 10:45:32

13311

13312 ;

22-0ct=1980 10:47:46

}%%8% :
13305 ;
13306 ;
13307

PAGE 275

END CNT = .END CNT ¢+ 1;

BG_PAT = not .BG_PAT;
eng;

'NOW END AT THE LAST BLOCK

| COMPL IMENT THE BG PATTERN AND REPEAT

ENDSUB;

it .DODU_FLG IS_SET

then

begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

'DROP THIS UNIT IF DODU_FLG IS_SET

CIMLAAD ML-11

HARDWARD TEST

MACRO M1113

0GIC TEST
S ECTION

23-0(7-80 09:11

6
G_
PAGE 276

SEQ 0279
W7 44
2 2 0 ct-198 0 10:47:
:32
10:45
0
2 2 0 ct-198

JMLG

TV TV

WSS LN

(=l=j=l=]

d =D
D D e
D
D
D e
D
D
D
D
D
D
B
D
D e
s
d
D
D e
e
e
D e
d
i
e
D

(T TV IV TV TV IV TV TV IV TV IV IV T TV I T TV T TN T W T TV TV TN TV YO T T IV T T T
AN LN AN AN AN L NN N NN N U AN N AN N N NN N N NN N AN NN N NN
O
VOOV OOV OOVOOOCE0CO0000
~N~N~NN~N~N ~N~ ~N~NOoO
NOWVMES NN 2OV
NO VNS WA =200~V NN —O00

e
D e
D o
e
d
el e
—

046220
046224
046230
046232
046240
0466244
046250
046256
046262
046266
0466272
046276
046302
046306
046314
046320
046326
046330
046334
046336
046342
046344
046350
046352
046354
046356
040360
046366
046370
046374
046376
046404
046410
0464614
046422
398 046426
399 046434
3400 046440
046446
0466452
046454
066460
0466462
3406 046466
3407 D4L6470
3408 046472
3409 046474
3410 046476

(v VLV
1V ]
2l
ol ol

d =D

3
3363
364
365
366
67

004167

162706
104402
152777

0716705
042705

1462777
150577

005066
012701
010177
010177
010177

152777
004767
012777
005002
012703
001411
016704
001404
005066
005304
001374
005303
000766
152777
005202
020227
003755
152777

016705
042705

162777
150577
152777

004767
012777
012703
001411
016704
001404
005066
005304
001374
005303
000766
005002

135634
000010

$128:

000040

143500

000007

163462

163724
177770

143456

A ¥

BIC
BI(B
Bl1s8
(LR

MOV

1463504

000061

143352

000001

MOV
MOV

8IS8
JSR

2%
1%

133554

000006

000020

143432

143560
177770

000007

1643316

000010
1446134
200071
000001

143364

143312

133436

000006

BEQ

MOV

INC
(mp

BLE
8158

MOV

BIC
BI(B
8158
8158
JSR

7%:

MOv
MOV

BEQ

MOV

8€aQ
(LR
DEC
BNE
DEC

109:

(LR

8%:

6641

6643

#60,aML .REG+40
ML .DUT,RS

0177770 ,85S

#7,9ML .REG+40
RS, aML .REG+40

2(SP)

DODU.FLG

6645

R1,aML.REG*170
R1.,aML.REG+200
R1.aML.REG*160

BG.PAT,
BG.PAT,»
BG.PAT,

6647
6648
6649

* ,BG.PAT

#-1,R1

010, an .REG+120

PC,LAST.BLK.XFER

#1,R3

8158

143232

nd,sp

MOV

6%:

143334

6604

;g1.3HL.REG

CLR

bt ¥

R1,$SAVES

MOV

BEQ
CLR
DEC
BNE
De(C

000177

000040

8158

MOV

000010
164254

TRAP

MOV

000002
1

143572
143576
143552

JSR
Sus

T10PS
PA:<

6%
LSDLY, RS
5%
6(SP)

R&
43

;

WRD.CNT

,88TMP]

«,$$TMP?

$3TMPI

: $8TMP?2

#20,aML .REG+120
R2

WRD.CNT

R2.M77

6650
6651
6652
6654
6656

; 38TMP

6646

WRD.CNT,e

6657
6654

6658

#40,aML .REG+40

ML .DUT,RS

2177770,RS

87,3 .REG+4D
RS aML .REG+4D

210, 3ML .REG+120

PC,LAST.BLK.XFER
#71,3ML .REG

2R3
10%

LSDLY,R&

*,$3TMP?

6661
6562
6663
6664

; v,98TMP)

; $8TMP
;38 TMPI
, $8TMp?
s WDL.(NT

6666

MACRO M1113

CIMLAAD ML=-11 LOGIC TEST

HARDWARD TEST SECTION

13412

PAGE 277

SEQ 0280

ML&

22-0ct=1980 10:47:44

22-0ct=-1980 10:45:32

;

}gz}z
13415 046500
13416 046506
13417 046514

017767
152777
012703

143424
000020
000001

13419 046522

016704

133370

13421 046530
13422 046534
13423 046536
13424 046540

005066
005304
001374
005303

000006

13418 046520

13420 046526

13425 046542
13426 046544
13427 046552
13428 046560

13429 046566
13430 046570

13431
13432
13433
13434
13435

23-0CT-80 09:11

046572
046574
046576
046600
046604

13436 046606

001411

001404

000766
017767
017767
017767

005003
010304

006204
006204
006204
062706
010446

010346

13437 046610 042716

13438 046614
13439 046620

012746
005046

13440 046622
13441 046626
13442 046632
13443 046634
13044 046636
13445 046640
13446 046642
13447 046646
13448 046650
13449 046654

004767
062706
005700
001011
010346
010146
012746
060616
004767
062706

13451 046666

001037

13450 046660

13452 046670

026627

000121
007622
000000

13457 046704
13458 046710
13459 046714
13460 046720
13461 046724
13462 046726

012746
012746
012746
012746
010600
104414

13456 046700

012746

143320
163322
143274

012746
012746
012746

12%:

138

141142
141136
141132

15%:

16%:
011662

MOV
8IsB
MOV

aML.REG+230,PD.TEMP
#20,3ML .REG+120
#1,R3

;
:
. v, $8TMP?

MOV

LSOLY,R&

. e, 88TMPY

CLR
DEC
BNE
DEC

6(SP)
R4
138
R3

; $STMP
: $8TMPT

CLR
MOV

R3
R3,R%

: NIB.PIR
: NIB.PTR,e

R3,-(SP)

: NIB.PTR,s

BEQ

BR
MOV
MOV
MOV

ASR
ASR
ASR
ADD
MOV

MOV

15%

14%

12%
aML.REG*170,D1.TEMP
aML.REG+200,D2.TEMP
aML.REG+160,E2.TEMP
R4
R4
R4
#PD.TEMP,RG
R4 ,=(SP)

177770

BIC

#177770, (5P)

134254
000010

JSR
ADD
ST
BNE
MOV
MOV
MOV
ADD
JSR
ADD

PC,BLSGT?
#10,5P
RO
17%
R3,-(SP)
R1,-(SP)
#12,-(SP)
SP,(SP)
PC,TST.LNG.WRD
#6,5P

000001

MOV
CLR

000012
1440064
000006

000004

000001

17%:

CMP

BNE

TRAP

007254

005770
006630
00°366
000004

13463 046730 012716 006454
13464 046734
13465 0467640
13466 046744

11%:

14%:

104455

13453 046672
13454 0466674
13455 046676

163154
143304

007136
005356
000003

; $$°MP?

6673
6676

: NIB.PTR,*
. BG.PAT,®
: ERR.FLG,*

4 (SP),

: ERR.FLG,*

6680

;

6683

#ENC.22,-(SP)

;

6684

18%

121
INTER
O

MOV
MOV
MOV
MOV
MOV
TRAP

#WRD.13,-(SP)
.4, = (SP)
#PHR
#THR.FMT,-(SP)
#4,-(SP)
SP,RO
14

MOV
MOV
MOV

#ENC.13,-(SP)
#TYO.FAT,-(°P)
23,-(SP)

MOV

6668
6669
6670

#1,-(SP)
-(SP)

.WORD
.WORD
.WORD

MOV

TOPS

PA: <

#URD.56, (SP)

; SP,e

;

6685

CIMLAAD ML-11

HARDWARD

13468
13469
13470
13471
13472
13473
13474
13475
13476
13477
13478
13479
13480
13481
13482
13483
13484
13485
13486
13487
13488
13489
13490

TEST

MACRO M1113

0GIC 1 EST
S ECTION

23-0CT-80 09:11

[_6
PAGE 278

SEQ 0281
4 7:44

JMLG

046750
046752
046754
046756
046762
046766
046770
046774
046776
047000
047004
047006
047012
047014
047020
047024
047030
047032
047040
047044
047050
047056
047062
047070
047074
047102

13491
13492
13493
13494
13495
13496
13497 047104
13498 047106
13499 047110
13500 047116
13501 047120
13502 047124
13503 047126
047130
047132
047134
047142
047146

047152
047160
047164
047172
047176
047204
047210
047212
047216
047220
047224
0 047226
1 047230
2 067232

010600
1064146
104463

062706
000167
005203
020327
003675
005202
020227
003635
016716
005316
005077
005077
005077
005005

000020
000604

016704
042704

143124
177770

MOV
TRAP
TRAP
ADD

18%:

00001

000177
161322

143050
143054
143030

000040

142700

162777
150477

000007

142662

016704
042704

162777
150477
152777

004767
012777
012703
001411
016706
001404
005066
005304
001374
005303
000766

142656
000010
143424

000061

000020

19%:

142730
142576

142702

142576

000007
142554
000010

142560

000071
000001

142474

143376

132700

000006

MOV

21%:

22%:
000040
143022

DEC
CLR
CLR
CLR
(LR
B1SB
BIC
B!(B
B1SB
BISB
JSR

000177

177770

JMP
INC
cmp
BLE
INC
CMP
BLE

MOV

152777

152777
004767
012777
005003
000411
005004
152777
005204
C20427
003771
005203
020316
003765
152777

4 5:32

CLR
BR
CLR

BISB
INC
CMP
BLE
INC
CMP

BLE
BISB
MoV

BIC
BI(B
BISB
B1S8

142626

23%:
243

25%:

SP,RO

SP,
e

#20,sP

37¢
R2

NIB.PTR
¢
NIB.PIR,

R3, a1
16$
R2
R2,M177
1%
LST.BLK, (SP)
(SP)

6666

* END.CNT

6693

END.CNT

aML.REG+170
aML .REG+200
2gL.Reco1bo

“WICE

#40,aML
. REG*40
ML.DUT,RG

6694
6695

6696
6698
6699

1177770.R4

#7.3ML.REG+40
R4 . @ML.REG*+40

#10,
ML .REG+120

PC,FIRST.BLK.XFER
#61,aML .REG

22%

R4
#20,aML.REG+120
R&

R4 X177
21$
R3
R3,(sP)
20%
#40,aML
. REG+40
ML.DUT,R&

;

ADRS.CNT
,»
ADRS.CNT

BLK.CNT
BLK.CNT,END.CNT

6701
6702
6703
6705
6707
6709
6707

6705
6710

077770,
R4

#7,3ML .REG+40
R4 ML .REG+40

#10,3ML .REG+120

JSR
MOV
MOV

#71.aML .REG
#,R3

+,$$TMP2

MOV

R4
LSDLY,

*,$$TMPY

BEQ
CLR
DEC
BNE
DEC
BR

6680
6682
6673

WD.CNT
WD.CNT,

PC,LAST.BLK.XFER

BEQ

TOPS
PA:<

26%

$STMP
$$TMPY

$$TMP?

6713
6714
6715
6716

CIMLAAD ML-11 LOGIC TEST

HARDWARD

TEST

MACRO M1113

SECTION

~N
[V, ]

13566 047430

13567 047432
13568 047434
13569 047436

1 3570 047442

047446
047452
047456
047462
047464

0467466

067474
047500

oo~

£~

(U
B
&L —

000020
000001

26%:
27%:
28%:

132632

29%:

000006

WO~
o
n

30%:
ol ancld

152777

012703
001411
16704
001404
005066
005304
001374
005303
000766
017767
017767
017767
005003
010304
006204
006204
006204
062704
010446
010346
042716
012746
005046
004767
062706
005700
001011
010346
010146
012746
060616
004767
062706
026627
001025
104455
000122

142666

—

017767

[V,]

Po
(V]

047406

047412
047416
047424
047426

005002

P o L
PO

047272
047274

552 047356
53 047360
54 047364
047370
56 047372
57 047374
558 047376
559 047400
047404
oo
- O

D el ad
ih
i
D
D o
)
D
el
D
D
el
D el
D

W [ IV IV IV TV IV TV IV IV [V TV IV (O (Y IV ]
AW VN VTNV
VTN
£ e W W NN N AN N NN NI OO N
O 000 ~ O NN 20000 NN
W

D
el
D o
d S
D
b
wad
e
e
i
b
D e
nd
i
- —

W N N LN AN Y NN N AN N
N
(U LU RV LV LV, ]

—

047234
047236
047244
047252
047256
047260
047264
047266

047276
047300
047302
047310
047316
047324
3543 047326
3544 047330
3545 047332
3546 047334
3547 047336
3548 047342
3549 047344
3550 047346
551 047352

13 571
13 572
13 573
13 574
13 575
13 276
13 77
13578

6
J_
PAGE 279

SEQ 0282
T0PS
PA:<

JMLG

1352¢

13562
13563
13564
13565

23-0CT-80 09:11

1640404

140400
140374

318

32%:

011662
177770
000001

B1SB

#20,a3ML.REG+120
#1,R3

L oe,$8TMP

MOV

BEQ

MOV

BEQ
CLR
DEC
BNE
DeC
BR

MOV
MOV
MoV

CLR

005740
006406

006400
005366
000004

34%:

;
;

$STMP
$%TMP

; $$TMP?

; NIB.PTR
: NIB.PIR,*

29%

28%
AML.REG+170,D1.TEMP
TEMP
aML .REG+200.D2.
agL.REGo160,52.rEnp

MOV

#1,-(SP)
-($P)

ADD

CMP
BNE
TRAP
.WORD
.WORD
.WORD
MOV
MOov
MoV
MOV
MOV
MOV
TRAP
MOv

000014

v, 88TMPI

#PD.TEMP
R4

JSR

33%:

;

ADD
MOV
MOV

MOV
ADD

000001

3¢
{$DLY,R&
30%
6(SP)

RY,R4

ASR
ASR
ASR

TST
BNE
MoV
MOV

143246

.
TEMP
aML.REG+230,PD

MOV

ADD

000012

000001
000012

CLR
JSR

133516

000006
000004

BIC

000010

WD.CNT

CLR

MOV

ADD

INC

R4
R4
R4

R4 ,=(SP)

R3,-(SP)

n 17770, (sP)

¢
NIB.PTR,

;

NIB.PTR,»

6718
6720
6721
6722

6725
6728

PC,BLSGT2
$0,spP
RO

3138

R3,-(SP)
R1 . -(SP)

$12,-(sP)

SP, (SP)
PC.TST.LNG.WRD
26.SP
4(SP)
,M
34

. BG.PAT,*

ERR.FLG,
;

ERR.FLG,*

6732

55
122

6735

#WRD.10,-(SP)
#WRD.51.
- (SP)
#WRD .50, - (SP)
FTHR.FMT,-(SP)
#4,-(SP)

6736

Ssvuc

sp,RO

SP,t

14
#1.14(SP)

. NIB.PIR

24,5P

*,DODU.FLG

6737
6734
6725

CIMLAAD ML-11

TEST

SECTION

SEQ 0283
147:44

001004
016700
104451
1046444

062706
00020/

000001

BGT

177272

35%:

000001

36%:

142400

000010

37%:
.
;

047600
047600
047604
047606
047610
047612

004767

104466

176414

TRAP

ROR

BHIS
JMP
CMP
BNE

Mov
TRAP
TRAP

ADD

RTS

JSR
TRAP
ROR

B8LO
RTS

NIB.PTR,*

s
;

WD.CNT
WD.CNT,»

6718

END.CNT
BG.PAT

6744
6745

—

;

TWICE
TWICE,*

Routine Size:

N
2(sP),
37%
ML.LUN,RO
51

;

44
#10,5P
PC

'<BLF/PAGE>

6750

6604

18 words

6755

PC,$728
66
RO
1%
PC

6 words

22-0ct-1980
22-0ct-1980

6758

DODU.FLG,*

6753

; Maximum stack depth per invocation:

JMLS

6698

6746

Routine Size:
376 words
Maximum stack depth per invocation:

128::
1%:

006000
103773
000207

JMP

—

INC
(MP

176456
000002

000177

TOPS

PA:<

-3

000167
026627

103002

CMP
BLE
INC
CMP
BLE
INC
COM

—

000011

020327
003707
005202
020227
003647
005216
005101
005205
020527
003002
000167
104467
006000

047502
047506
S 047510
047512
047516
047520
047522
047524
047526
047532
047534
047540
047542
047544
047546
047552
047560
047562
047566
047570
047572
047576

:65:32

NV VD ~NOD D AND
o O NO N NN =2 WD NIPIPNORNDWN
[ 5
[ X 23
| ]

D
D
d
D
d
i
D
d
D
d
D
D

3582

WA N
AN A N U U
N NN N NN
AW AWV
WN VNIVINA NNV
0O O O O 0 O O O 0o 0o Co 0o OO 0o OO
oo~ VB W 20000
~NOAWN W

PAGE 280

JMLG

13580
13581

— —

23-0CT-80 09:11

(V. DON—=2

HARDWARD

MACRO M1113

LOGIC TEST

147:44
:45:32

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4L.BLI.2 (70)

MACRO M1113 23-0CT-80 09:11

CIMLAAD ML-11 LOGIC TESY
13639 JMLG
13640 ;
13641
13642
13643
13644 ;
13645
13646
13647
13648
13649
13650
13651
13652
13653

13654
13655

13656
13657
13658
13659
13660
13661
13662

13663

13664
13665
13666
13667

13668

13669
13670
13071
13672
13673
13674
13675
13676
13677
13678
13679
13680
13681
13682

13683
13684

13685

13686
13687
13688
13689
13690
13691
13692
13693

SECTION

6
SEQ 0284
10: 47:44

10 :45:32

6759
6760
6761
6762
6763
6764
6765
6766
6767
6768
6769
6770
6771
6772
6773
6774
6775
6776
6777
6778
6779
6780
6781
6782
6783
€784
6785
6786

lee

TEST NUMBER:

TST 29

TEST NAME :

ARRAY MODULE

SELECTION TEST

TEST DESCRIPTION:

TEST FOR UNIQUE
SELECTION BY:
1.

ARRAY MODULE

WRITING THE RESPECTIVE ARRAY
MODULE POSITION NUMBER INTO
THE FIRST GOOD NIBBLE FOUND

IN THE ARRAY.

PRESENT ARRAYS.

IMPLI CIT

DO FOR ALL

READ THE ARRAYS FOR THEIR
RESPFCTIVE POSTION NUMBERS.

INPUTS:

PD TEMP:

A BIT VECTOR OF 16 BITS WHERE

THE READ PROM DATA
AND ACCESSED FROM.

6787

6788
6789
6790
6791
6792
6793
6794
6795
6796
6797
6798
6799
6800
6801
6802
6803
6804
6805
6806
6807
6808
6809
6810

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (71)

BGNTST;

TEST

[ ]

HARDWARD

PAGE 281

IS STORED

?%?BAL OWN LOCATION TO THIS
10 BUF

A VECTOR OF 256 WORDS WHERE

DATA FOR MBUS READS AND WRITE
FUNCTION ARE

FOUND.

A GLOBAL OWN LOCATION TO
THIS

TEST.

local

'WORDS
'ARRAY
'FOUND
'ARRAY

WRD S _TSTED,
ARR SEL,

FND_GD NIB,
ARR_NUR;

ARR_SEL
ARR”SEL

2EROES;
.ARR_SEL -

.ARR_INC;

TESTED
SELECT
GOOD NIBBLE
NUMBER

'START ARR_SEL BACK ONE ARRAY

CIZMLAAO ML-11 LOGIC T EST

MACRO M1113

HARDWARD TESTY SECTION

23-0CT-80 09:11

PACE 282

13695 :MLG

SEQ 0285

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

}%gg_bl ;

13698 .

6811

13702 ;
13703 ;

6815
6816

WRDS TSTED = ZERO;
DAT DM = ONE;

'SET DATA DIAG MODE

6818
6819

MLBA = ]0_BUF;
ARR_SEL =~ .ARR_SEL + .ARR_INC;

'LOAD [O_BUF
'LOOK AT NEXT ARRAY

13699 ;
13700 ;
13701 ;

13704 :

13705 .
13706

13707 ;
13708 ;

13709 ;

6812
6813
6814

6817

6820
6821
6822

incr ARR_CNT from 0 to .OP_NUM_ARR do
begin
CLR_MBUS;
FND GD NIB = ZERO;

MLWE = not 255;

MLDA = .ARR_SEL;
MLCSY = write;

iLOAD WORD COUNT

'"LOAD DSA WI!TH SELECTED ARRAY AT BLOCK ZERO
'DO A WRITE FUNCTION

6823

13713 ;
13714 ;

6826
6827

PD TEMP = _MLPD;
UR5$_TSTED = WRDS_TSTED + 1;

'GET THE PROM DATA
.COUNT WORDS TESTED

6829

incr CNT from O to 8 do

'LOOK AT 9 NIBBLES

13715 ;

13716 ;

13717 ;

13718 ;

13719 ;
13720 ;
13721 ;

6824
6825

6828
6830

6831

6832
6833
6834

13722

6835

13726 ;

6839

13723 ;
13724 ;
13725
13727 ;

6836
6837
6838
6840

13728 ;

6841

13730
13731 ;

6843

13729 ;

13732 :

13733 .

6842
6844

6845

6846

13734 ;

6847

13736 .

6849

13735 .

6848

'TEST ALL PRESENT ARRAYS

13710 ;

13711 ;
13712 :

'THIS LOOP WRITES ARRAY NUMBERS TO THE ARRAYS

begin
DELAY (ONE_US);

it .PD_TEMP [.CNT] IS_NOT_SET

then

case .CNT from O to 8 of
set

(1]
(2]
(3]

(MLD1)<4&, &> = . ARR_CNT;
:

(MLD1)<8, &> = .ARR_CNT;
:

(MLD1)<12, &> = .ARR_CNT;

(4] :

13739 ;
13740 ;

6852
6853

{s] :

13741 ;

13742 ;

6854

6855

13743 ;

6856

13745 ;

6858

13744

13746 ;

13747 ;

13748 ;

13749 ;

6857

6859

6860
6861

6862

'SELECT AND LOAD GOOD NIBBLE WITH ARRAY C(NT

(MLD1)<0, &> = ARR_CNT;

6850

6851

'FIND A GOOD NIBBLE

begin

13737 ;

13738 ;

TOPS=-20 Bliss"6 v2(206)

PA:<NEALE>BLML&4.BLI.2 (71)

(MLD2)<0, &> = .ARR_CNT;

(MLD2)<4, &> = _ARR_ONT;

(6] :

(MLD2)<8, &> = .ARR_CNT;

(7] .

(MLD2)<1?2, &> = _ARR_CNT;

(8] :

'NIBBLE 0

.NIBBLE 1

'NIBBLE 2

'NIBBLE 3
INIBBLE &

INIBBLE S
.NIBBLE 6

'NIBBLE 7

CIMLAAO ML-11 LOG I C TEST

HARDWARD TEST

MACRO M1113

SEC T 10N

23-0(T-80 09:11

N
6
PAGE 283

e e
T Y E P EN R T I T T T T T
I T R N S
R R B R
N N
I R
N T
A
IR O
A
K YR YRR TP T P TP IR I S
I T
LI IO

T Wi

NI W

Wie

:MLs

SEQ 0286

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32
6863
6864
6865
6866
6867
6868
6869
6870
6871
6872
6873
6874
6875
6876
6877
6878
6879
6880
6881

6882
6883
6884
6885
6886
6887

6888
6889
6890
6891
6892
6893
6894
6895
6896
6897
6898
6899
6900
6901
6902
6903
6904
6905
6906
6907
6908
6909
6910
6911
6912

6913
6914

(MLE2)<8, &> =
tes;

.ARR_CNT;

FND_GD_NIB = ONE;

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (71)

'NIBBLE 8
;E;}Trgggonggo NIBBLE

exitloop;

FLG

end;

DAT_CLK = ONE;
end

until

'CLOCK GOOD NIBBLE

(.FND_GD_NIB IS_SET

) or

it . WRDS_TSTED eql 14
then
begin
ERRDF (111, INTER, 0);
PRINTB (SEV_FMT, WRD_14,
EXIT_TST;
end;

(.WRDS_TSTED eql
'IF

14);

INTO MEMORY & GET NXT PROM WRD

'0O UNTIL FOUND GOOD NIBBLE OR 14 WRDS TSTED

14 WORDS TSTED

'THEN ERROR AND EXIT
PHR_10,

FNC_15,

TESTED

WRD_12, FNC_17, WRD_37, WRD_56);

end;
ARR_SEL =
ARR_SEL =

ZEROES:
.ARR_SEL -

incr ARR _CNT
begi n

!START ARR SEL BACK ONE

.ARR_INC;

from 0 to

.OP_NUM_ARR do

FND_GD_NIB = ZERO;

DAT DM = ONE;

MWl

= not 255:

MLBA = 10_BUF;
ARk SEL = .ARR_SEL

NLDK = .ARR_SE[;
MLCS 1 = read:
do

begin

DELAY

¢+

.ARR_INC;

!TEST

ALL PRESENT

AGAIN

ARRAYS

“SET DATA DIAG MODE
'LOAD WORD COUNT
'LOAD UBUS ADDRESS
'LOOK AT NEXT ARRAY
'LOAD DSA WITH ARRAY
‘00 A READ FUNCTION

SELECT

!THIS LOOP READS ARRAYS FOR ARRAY NUMBERS
(ONE_US);

PD_TEMP =

incr CNT

'GET

_MLPD;

'LOOK AT 9 NIBBLES

from 0 to 8 do

it PD_TEMP [.CNT)
then

THE PROM DATA

IS_NOT_SET

‘FIND

THE GOOD NIBBLES WHERE

begin
DAT_CLK = ONE;

!CLOCK ARRAY WORD QUT

case .CNT

'SELECT

set

(0]

from 0 to 8 of

AND KEAD GOOD NIBBLE

ARR NUM

[S STORED

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

B 7
PAGE 284

13807 MLG

22-0ct=1980 10:47:44

}%ggg ;
13810

13811
13812
13813
13814
13815

;
;
,
;
;

13816 ;

13817 ;

22-0ct-1980 10:45:32

6915

6916
6917
6918
6919
6920

[
(2]

6921

6922

13818 ;

6923

(3]

138¢0 ;
13821 ;

6925
6926

(4]

13819 ;

13822 ;

13823 .

6924

6927

6928

13824 ;

6929

13826
13827
13828
13829
13830

6931
6932
6933
6934
6935

13825 ;

13831

;
.
;
;
;

;

13832 ;
13833 .

13834 ;

13835 .
13836 .

6940
6941

¢%47

2323

13845 ;

6950

13847 ;
13848 ;
13849 ;

6952
6953
6954

13851

6956

;

13852
3853 :
854 ;

tes;

6951

6960

6961

'NIBBLE 0

:
ARR_NUM -

_(MLD1)<4, 4>;

'NIBBLE 1

ARR_NUM = . (MLD1)<8, 4>;

INIBBLE 2

ARR_NUM = ,(MLD1)<12, &>;

'NIBBLE 3

:
ARR_MUM = ,(MLD2)<0, 4>;

.NIBBLE &

ARR_NUM = . (MLD2)<4, &>;
:

'NIBBLE 6

ARR_NUM = ,(MLD2)<12, 4>;
:

ARR_NUM = _(MLE2)<8, &>;

DAT_CLK = ONE;
end

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML&.BLI.2 (71

'NIBBLE $

ARR_NUM = . (MLD2)<8B, 4>;

end;

'NIBBLE 7
'N]BBLE 8

'SET FND GD NIB FLG
'EXIT LOOP

1CLOCK OUT NEXT PROM LOCATION

until .FND_GD_NIB IS_SET;

'REPEAT UNTIL FOUND THF GOOD NIBBLE

it .ARR_CNT neq .ARR_NUM

'SEE IF ARRAY CONTAINS IT'S ARR NUM

then

6955

6957
6958
6959

ARR_NUM = ,(MLD1)<0, &>;

FND_GD_NIB = ONE:
exitloop;

6944
6945

¥§§22 :

13850 ;

(8]

6939

6946

13846

(7]

6937
6938

13841

;

6936

6942
6943

13842 ;

(51

6930

13837 ;
13838 ;
13839 ;
13840 ;

SEQ 0287

begin
'ERROR IF NOT THERE
ERRDF (83, ASYNC, 0);
PRINTB (FOR_FMT, WRD_39, FNC_ 17, WRD_37, WRD_10);

PRINTB (FMTZ14, .ARRZCNT, .ARR_NUM);
end;

ENDSUB;
end;

ENDTST;

CIMLAAOD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

13862

23-0CT-80 09:11

7
c
PAGE 285

SEQ 0288

;ML

22-0ct=1980 10:47:44

22=0ct=-1980 10:45:32

}%ggz
13868 047614

004167

13870 047624
13871 047626
13872 047632

005005
166705
016766

13869 047620

13873 047640
13874 047642

13875 047646

13876 047656
13877 047660
13878 047664
13879 047672

13880 047676
13881 047700
13882 047702

162706

134240
140472
140664

005003
000167

000702

016702
042702
1642777
150277

142310
177770
000007
142042

152777

005016
005004
152777

13883 047710 012777

000040

13890
13891
13892
13893
13894
13895
13896

047750
047754
047756
047762
047764
047766
047770

016702
001404
005066
005302
001374
005301
000766

132142

13898 050000
13899 050002
13900 050004

005204
005002
010201

13901 050006

017767

006201
006201

13907 050024

042716

13904 050014
13905 050020
13906 050022

13908 050030
13909 050034
13910 050036

13911 050042

13912 050046
13913 050050

13914 050052

13915 050054
13916 050056

011662

012746
005046
004767

000001

005700
001155

177770
133040

000010

010201

006301
066107

4$:

141662

6%:

7%:

06270°
O0ly
5
010246

062706

2%:

5%:

142132

R1,$SAVES

;

6757

CLR
SUB
MOV

RS
ARR.INC,RS
OP.NUM.ARR,2(SP)

: ARR.SEL
" «,ARR.SEL
:

6808
6809
£811

#40,aML.REG+40

;

6812

(SP)
R&
#10,aML.REG*+120

: FND.GD.NIB
WRDS.TSTED
:

6814
6815
6816

#10.BUF,aML . REG+20
ARK . INC .RS
RS,aML.REG+30
#61,3ML.REG
# R1

6818
6819
6820
6821
6825

SUB

R3
27%

MOV
BIC
BICB
BISB

ML.OUT,R2
77770,
82
#7.3ML.REG+40
R2.aML.REG+40

MOV

#-400,aML.REG+10

BISB

MOV
ADD
MOV
MOV
MOV
BEQ

MOV
BEQ
CLR
DEC
BNE
DE(
BR

LSOLY,R2
5%
4(SP)
R2
43
R1
{3

INC
CLR
MOV

R4
R2
R2,R1

MOV

ASR

ASR
ASR

ADD
MOV
MOV

BIC

MOV
CLR
JSR

ADD
ST
BNE

MOV
050062

86 .SP

JNP

CLR
CLR
BISB

3g:

000004

006201

13902 050010
13903 050012

18:

141772

141736

JSR

CLR

142046

141774

010342
140374
141774
000061
000001

13897 047772

142064

142110

177400

012777
066705
010577
012777
012701
001411

000002

000010

13884 047716
13885 047724
13886 047730
13887 0477364
13888 047742

13889 047746

$129:

000006

TOPS

PA:<

ASL
ADD

oML .REG+230,PD.TEMP

* ARR.CNT

;

6817

+,$8TMP]

. $STMP
L $STMPY

; $$TMP2

;

: WRDS.TSTED
: CNT
P ONT,e

6826

6827
6829
6831

R
R

#PD
. TEMP,R1
R1,-(SP)
R2.-(SP)

2177770, (SP)

; CNT,e

#,-(SP)
-($P)
PC,BLSGT2

b,
sp
RO
238

R2,R1

R
88 (R1),PC

; CNT,®

6835

CIMLAAD ML-11

HARDWARD TEST

LOGIC

TEST

MACRO M1113

SECTION

13918

7
SEQ 0289

22-0ct=1980 10:47:44

;
050062
050064
050066
050070
050072
05007¢
050076
050100
050102
050104

13931 050106

13932 050112

000022
000040
000072
000112
000146
000164
000216
000236
000272
010301

042701

142777

13933 050120

000412

13936
13937
13938
13939
13940
13941

006301
006301
006301
042701
142777
150177

13934 050122
13935 050124

050126
050130
050132
050134
050140
050146

13942 050152
13943 050154
13944 050156

000511
010301
000301

042701
042777
000413

13949
13950
13951
13952
13953
13954
13955

000301
006301
006301
006301
006301
042701
042777

13948 050174

050176
050200
050202
050204
050206
050210
050214

13956 050222

13957 050226
13958 050230

13959 050232

13960 050236
13961 050244

13962 050246

050250
050252
050254
050256

13967 050260
13968 050264
13969 050272

13970 050276
13971 050300
13972 050302

8% :

177760

000017

9s:
141750

010301
006301

13945 050160
13946 050164
13947 050172

13963
13964
13965
13966

PAGE 286

MLG

}%g%g

13921
13922
13923
13924
13925
13926
13927
13928
13929
13930

23-0(T1-30 09:11

108:

177417
000360
141716

141722

128:
170377
007400

141676

010307

050177

000463
010301

042701

142777
000412

13¢:

007777
170000
141642

177760

000017

141646

042701
142777
150177

000437
010301
000301

148:

158:
141634

010301

006301
006301
006301
006301

11$:

168:

177417
000360
141602

141606

17¢:

188:

22-0ct=-1980 10:45:32

.WORD
"WORD
"WORD
"WORD
"WORD
"WORD
.WORD
"WORD
.WORD
MOV

9%3-8%
10%-8%
12%-8%
13$-8%
15%-8%
16$-8%
18%-8%
19%-8%
213-8%
R3,R1

BICB

#17,3ML.REG+170

BIC

B8R

2177760,
R1

10PS

PA:<

ARR.CNT,®

6839

MOV
ASL

R3,R1
R

: ARR.CNT,®

6842

BR
MOV
SWAB

22%
R3,R1
RI

;
: ARR.CNT,®

6835
6845

R3,R1

: ARR.CNT,+

6848

;
* ARR.CNT,*

6835
6851

: ARR.CNT,®

6254

;
ARR.CNT,®

6835
6857

ASL
ASL
ASL
BIC
BICB
BISB

R1
R1
R1
#1776417,R1
#360,aML.REG+170
R1,aML.REG+170

BIC
BIC
BR

#170377.R1
#7400,3ML .REG+170
148

SWAB
ASL
ASL
ASL
ASL
B¢
BIC

RI
R1
R1
R1
R
07777.R1
#170000,aML .REG+170

MOV

BIS

BR
MOV

BIC

BICB
BR

MOV
ASL
ASL
ASL
ASL

BIC
BICB
B8ISB

BR
MOV

SWAB

R1,3ML.REG+170

22%
R3, R

2177760,
R1

#17.aML.REG+200
17¢

R3,R1
R
R1
R
R

7761781
#360,aML .REG+200
R1,aML.KEG+200

22%
R3,R1
R1

CZMLAAD ML=-11 LOGIC TEST
SECTION

14028 050550

006454
006232
007206
005760
007162
006740
005774
005452
000010

000022
000562
020366

000002

26%:
27%:

R4, #16

WRDS.TSTED,*

25%

;

WRDS.TSTED,*

6829

6870
6872

6874
6877

6878

~—

25%:

FND.GD.NIB,*

CNT
NT ,»

177274
000016

24%
R2
R2,710
24%
7%
#20,aML.REG+120
(sP),,

6866
6867

000016

JMP
8158
(MP
BEQ
CMp
BEQ
JMP
(MP
BNE
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MCV
TRAP
TRAP
ADD
JMP
INC
CMP

*,FND.GD.NIB

1,(sP)

248

R1,8ML.REG+160

141372

#7400,3ML.REG*160

"
[B Y e Y e Y R
Y
R
AN
DN
NVOVOVOVVOO
O
S e o N et

177364

000020
000001

#170377,R1

000010

BR
INC
CMP
BGT

6835
6863

23%:

MOV

ARR.CNT
,»

[]

22%:

SWAB
8IC
BIC
BIS

1414666

Mov

#170000,aML .REG+200
R1,8ML.REG+200
22%
R3,R1

[

20%:

BIC
BIC
BIS
BR

R1
R1
R1
R1
L IIAL

141532

6860

R3,R1

ASL
ASL
ASL
ASL

21%:
170377
007400
1614662
000001

20%

e o

021627
001405
020427
001402
000167
020427
001035
104455

170000
161526

SWAB

MoV

152777

007777

#170377,R1
#7400,3ML.REG+200

005202
020227
003002
000167

19%:

8IC
BIC
BR

D e

050177
012716
000406

161562

000411
010301
000301
042701
062777

170377
007400

X =t

14020 050520
14021 050524
14022 050530
14023 050532
14024 050534
14025 050536
14026 050542
14027 050546

062701
062777
000413
010301
000301
006301
006301
006301
006301
042701
042777
650177

[]

050452
050454
050456
050460
050462
050464
050470
050474
050500
050504
050510
050514

TOPS

14008
14009
14010
14011
14012
14013
14014
14015
14016
14017
14018
14019

050432
050434
050440
050442
050446

SEQ 0290
PA:<

NIV e

14003
14004
14005
14006
14007

JMLG

NBEEOVNINNO

14000 050414
14001 050420
14002 050426

PAGE 287

Pond
o

13974
13975
13976
13977 0502
12978 0¢03
13979 053"
13980 05032
13981 050322
13982 050324
12983 050326
13984 050330
13985 050332
13986 050334
13987 050340
13988 050346
13989 050352
13990 050354
13991 050356
13992 050360
13993 050364
13994 050372
13995 050376
13996 050402
13997 050404
13998 050406
13999 050412

23-0CT-80 09:11

TM«
<

HARDWARD TEST

MACRO M1113

R3,2(SP)

SP,»

: ARR.CNT
;

ARR.(NT
¢

6874
6876
6811

SECTION

14052 050672

14053 050700
14054 050704
14055 050706
14056 050712

14057 050714
14058 050720

14059 050722
050724
050726

050730
050736
050740
050742
050744
050746
050750
050754
050756
050760
050764
050770
050772
050776
051002
051004
14078 051006
14079 051014
14080 051016
14081 051020
14082 051024
14083 051026
14084 051030

23-0CT-30 09:11

PAGE 288

SEQ 0291

22-0 ct=1980 10:47:44
22-0 ct-1980 10:45:32

JMLG
.

[

004767
062706
005700
001070

152777

010201
006301
066107
000022
000030
000036

000516

000010

177400
010342
137436
161036
000071
000001

1641124

318

051024

BtQ

MoV

MOV
ASR
ASR
ASR
ADD
MOV
MOV

(LR

81C

MOV

CLR
JSR

000010
000020

Mov
MOV
ADD
MOV
MOV
MoV

35¢%:

132104

ADD
ST

BNE
8158

141004

36%:

;

ARR,(CNT

gss
ML.DUT,R2

MOV
ASL
ADD

.WORD
.WORD
.WCRD

#7.3ML .REG+40
R2.aML .REG+40
(SP)

FND.GD.NIB

#-400,
ML .REG+10

#10.BUF
,aML .REG+20
ARR. INC,R5
RS,aML.REG+30

. «,ARR.SEL

L oe,$8TMP?

#71,aML.REG

348
LSOLY,R2
33%

ARR.SEL,+

.+,

$$TMPI

. $3TMPY

;

$STMP

;

$$TMP?

4(SP)

329

31%
aML .REG+230,PD.TEMP

R2
RZ2,.R1
R
R1
R1
#PD.TEMP
R
RY,=(SP)

R2,-(SP)

nireeo, (spy

6884
6885
6887
6888
6889

#40,3ML
. REG+40

#10,aML.REG+120

MOV

000001

OP.NUM_ARR,2(SP)

81SB
CLR
B1S8

348:

177770

ARR.SEL
«,ARR,SEL

2177770,R2

13%:

011662

ARR,INC,RS

:
:

BIC

BEQ
(LR
DEC
BNE
DEC

12%:

140724

TRAP

Bls8

8I(8B

141000

000004

CLR
JMP

MoV

1641106

131204

161174

29%:

000040
141350
177770
000007
161102

JMP
CLR
suB

Mov

152777
016702
042702
162777
150277
005016
152777
012777
012777
066705
010577
012777
012701
001411
016702
001404
005066
005302
001374
005301
000766
017767
005002
010201
006201
006201
006201
062701
010146
010246
042716
012746
005046

000002

OO
—

104402

137534
137526

28%:

166705

016766
005004
000167

TOPS
PA:<

BGT

177064

003002
000167
005005

—

16030
14031
14032
14033 050554
1403 050556
14035 050562
14036 050564
14037 050570
14038 050576
14039 050600
14040 050604
14041 050606
14042 050614
14043 050620
14044 050624
14045 050632
14046 050636
14047 050640
14048 050646
14049 050654
14050 050662
14051 050666

14060
164061
14062
14063
14064
14065
14066
14067
14068
14069
14070
1407
14072
14073
14074
14075
14076
14077

MACRO M1113

TEST

—

HARDWARD TEST

LOGIC

CIMLAAD ML-11

: CNT
L

CNT,w

;

CNT,e

;

(NT,»

6891
6892
6893
6894
6895

6896
6897
6901

6902
6904
6906

#,-(SP)
-($P)

PC,BLSGT2

066,59
R

50%
#20,9ML.REG+120
R2.R1
R1

363 (R1) ,PC

378-369%
38%-36%
39%-3¢6%

6909
6911

CIMLAAD mL-1°

HARDWARD

14086
14087
14088
14089
14090
16091
14092
14093
14094
14095

14096
14097
14098
14099
14100
14101

N=OOVDNO
WV
WO o]

b —
el o
el
-

W
P

i ol

—>

d
D

X aF
F

d wd
o
d
—

d o

o
¥ o PP

14102
14103
14104
14105
14106
16107
164108

TEST

MACRO M1113

LOGIC TEST
SECTION

23-0("-80 09:11

PAGE 289

SEQ 0292
4 7:464

JMLé
051032
051034
051036
051040
051042
051044
051046
051052
051054
051060
051062
051066
051076
051102
051104
05

000044
009052
000060
000076
000104
000122

45%-36%

37%:

1641010

38%:

141002

319%:

160774

408%:

117703

140776

(18

117703

140770

429%:

000440
117703
000413
017703
000431
017703
000417
000424

006203
006203
006203
006203
000415
017703
000411
017703
006203

43%:

140752

44%:

140744

45%:
46%:

006203

006203
006203
000492
017703
000303
042703
012716
000404
005202
020227
003661
152777
021627
001233
020403
001434
104455

TOPS
PA:<

40%-36%
419-36%
428-36%
(63-36%
141016

117703

4 5:32

47%:
48%:
49%:

140706

177760

000001

50%:

000010

000020
000001

005740
006232
007206
006250
005400

140614

51%:

47%-36%

aML .REG+170,R3

;

*,ARR, NUM

6915

ML .REG+170,R]

;

*,ARR.NUM

6918

aML.REG+170,R3

;

*,ARR. NUM

6921

aML .REG+170,R3

;

*,ARR .NUM

6924

;

«,ARR .NUM

6927

;
;

*,ARR.NUM
ARR.NU
. NUM
ARR

6930

499

438

(8%

L6%
aML .REG+200,R3
49%

ML .REG+200,R3

R3
R3
R3
R3
49
amL
. REG+200,R3
LB8%
oML, REG+200,R3
R3

R3
R3
R3

48%

2§L.REG*160.R3

#177760,R3
#1,(5P)
51%
R2
R2,710

35%

#20,aML .REG+120
(sp).n
30%
R4 ,R3
52%
55
123
SSYNC

#WRD.10,-(SP)
#URD.37,-(SP)
#ENC.17,-(SP)
#WRD.39,-(SP)

#FOR.FMT,-(SP)

ARR .NUM
ARR .NUM

;

*,ARR.NUM

6933

;
;
;
.
.

. NUM
% ,ARR
ARR.NUM
ARK.NUM
ARR.NUM
ARR.NUM

6936

.
:
;
.

*,ARR.NUM
ARR.NUM
*,ARR_NUM
*,FND.GD.NIS

6939

S CNT

;

6942
6943
6904

CNT,«

6946
FND.GD.NIB,*

6948

,ARR . NUM
ARR.CNT

6950
6953

6954

CIMLAAD ML-11 LOGIC

HARDWARD TEST

SECTION

D
h
o
d oD
rd
D
D
e
e
e
D
D
d
b

AN AN N L AN W AN
PO PO N N O PO N)
N2 2000 NNV
OO ONNOONON S NOONN

WL TV QW LV LV, LV TV LU LV I Aoy

[elelelolelolelolelololalole]le]

000005

005046
000003

000022

g
o

000207

14164
14165
14166
146171

52%:

000002

53%:
564%:
55%:

000006

56$:

177264

14161

-—

23-0CT-80 09:11

7
H
PAGE 290

SEQ 0293

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

JMLG

(LI IV IV

o (W IV IV YU TV U NV TV, IV V. P P 3 =~
WO O ~
o VNN

b
d ek
D
e
b
D
d
e
—

PR W

d e

2W W

d o

aF aF 2 X o

—

16142
16143
14144
16145
14146

MACRO M1113

TEST

;

MOV
MOV
TRAP
Mov
MOV
Mov
MOV
MOV
TRAP
ADD
TRAP
ROR

BHIS
JMP
INC
cmp
BLE
ADD

RTS

Routine Size:

#5,-(SP)

;

SP,RO

14
R3, (SP)
R4 ,=-(SP)
#EMT
14 ,-(SP)
#3,-(SP)

SP,e

: ARR.NUM,
«

SP,RO

T0PS
PA:<

ARR.(ONT,»

¢
SP,

14
#22,5P

6959

6952
6956

564%
29%

: ARR,CNT

R4 ,2(SP)

53%

ARR.CNT,»

6887
6757

#6,5P
PC

425 words

Maximum stack depth per

inyocation:

18 words

146172

14176
14180 051336

14181
14182
14183
14184
164185

14186
14187
14188
14193
164194
14195

051336
051342
051344
051346
051350

004767
104466

176252

129::
1%:

006000
103773
000207

JSR

TRAP
ROR
BLO
RTS

. Routine Size:

;

6962

!<BLF/PAGE>

6959

PC,$T729
66
RO
1%
PC

6 words
per
depth
stack
Maximum

i1nvocation:

0 words

CIMLAAD ML-11 LOGIC

HARDWARD

TEST

puy

—

D o

wd i

)

D ad

P
PR W W oW 0 o N P
P ¥ oF ¥ o Po
~N NNV ~N
nNo
POND)
=
b
o
b
d
b
b d ik b o
N
NPV
NN =20 e
W ~N 2OV

16197 JMLS
14198
14199
14200
14201
14202
14203
14204
14205
14206
14207
14208

TEST

SECTION

»
LSl
Pt
o
-0

—

14242
14243
146244
14245
14246
14247
14248
14249
14250
14251

23-0CT-80 09:11

PAGE 261

7
SEQ 0294

22-0ct=1980 10:47: 44
22-0ct=1980 10:45 132
6963
6964
6965
6966
6967
6968
6969
6970
6971
6972
6973
6974
6975
6976
6977
6978
6979
6980

6981
6982
6983
6984
6985
6986

6987
6988
6989
6990
6991
6992
6993
6994
6995
6996
6997
6998
6999
7000
239

MACRO M11132

7001
7002
7003
7004
7005
7006
7007
7008
7009
7010
on
7012
7013
7014

TOPS=20 Bliss=16 V2(206)
PA:<NEALE>BLZ2ML4.BLL.2 (72)

BGNTSTM;
‘ee

TEST NUMBER:

| TEST NAME:

TST 30

SEQUENCER EXISTENCE TEST

! TEST DESCRIPTION:
]

!
!

TEST SEQUENCER TIMING AND CONTROL
LOGIC FOR EXISTENCE BY:

FIRST WRITING THE GOOD BLOCK VIA DAT_DM MODE WITH A BACKGROUND

VIA A MBUS WRITE FUNCTION WRITE ONES INTO THE GOOD BLOCK.

PATTERN OF

ONES.

THEN VIA DAT_DM READ GOOD NIBBLES IN THE GOOD BLOCK AND XOR THEM

AGAINST THE BACKGROUND PATTERN.

RECORD THE NUMBER OF NIBBLES THAT WERE UNCHANGED OR PARTIALLY C(HANGED

BY THE MBUS WIRTE.

REPORT A FATAL ERROR AND DROP THIS UNIT IF THE NIBBLES TESTED EQUALS
THE

COUNT OF

UNCHANGED NIBBLES.

REPORT AN INTERMEDIATE DIAGNOSIIC MESSAGE if AT LEAST SOME NIBBLES

WERE CHANGED BY THE MBUS WRITE.

| IMPLICIT INPUTS:
PD_TEMP:

A BIT VECTOR OF 16 BITS WHERE THE READ PROM DATA 1S STORED AND ACCESSED FROM.

:
10_BUF

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE FUNCTIONS

ARE

FOUND.

local

BG_PAT,
SUR_BAD,

'BACK GROUND PATTERN
'SUM NIBBLE ARE BAD

ALL”BAD,

'ALL NIBBLES ARE BAD

NIBZTSTED,
RESOLT;

CLR_MBUS:

BG PAT = ONES;
MLB1 = .BG_PAT;

MLD2 = .BG_PAT;

MLE2 =

.BC_PAT;

'NIBBLES TESTED
'RESULTS OF XOR

'BACKGROUND EQL ONES
.LOAD DATA DIAG REG WITH BG PAl

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

7015

14258 ;
14259 ;

7017
7018

16261

;

7020

DELAY

16263 ;
16264 ;
14265 ;

7022
7023
7024

end;

14268 ;

7027

14260 ;

14262 ;

14266 ;
16267 ;
14269 ;

14270
164271
14272
14273
14274
14275

7016
7019

DAT _DM_XFER

();

'SET UP A DATA DIAG XFERR AT THE GOOD BLOCK
'00 A WRITE FUNCTION

incr WD CNT

from Q0 to 127 do

'WRITE BLOLK WITH BG PAT

begin

(ONE US);

DAT_CLK = DONE;
CLR_MBUS;

7028

MLIST = write;

'LOAD FJRST WORD OFf [0_BUF
.MAKE XFERR SET ON ONE ADRS
'SET UP A GOOD BLOCK XFERR
'00 A WRITE FUNCTION

'DELAY UNTIL XFER TO COMPLETE

7038
7039
7040

7035
7036
7037

7041
7042
7043

7044

GD _BLK erR

wuntil

.DRY

0);

[S_SET;

BGNSUB;
CLR_MBUS;
ALL_BAD = ZEROESSUM_BAD = ZEROES,

NIB_“TSTED = 2EROES
DAT DH XFER ();
MLCS1
= read:

'SET UP SAME DATA CIAG XFERR
'DO A READ FUNCTION

incr WD CNT

'READ 113 LONG WORDS

DELAY

(ONE US)

from 0 to 112 do

begin

7045

PD TEMP =

14289
14290
164291
14292

7048
7049
7050
7051

RD_LNG_ WRD:

'READ THE

incr NIB_PTR from 0 to 8 do

'LOOK AT 9 NIBBLES

;
;
;
;

14293 ;

14294 ;
14295 ;

14296 ;

14297 ;

14298 ;
14299 ;
14300 ;

14301 ;

14302 ;
14303 .

14304 ;
14305 ;

14306 ;
14307 ;

7046
7047

7052

7053
7054

_MLPD;

'!GET PROM DATA
!CLOCK OUT THE DATA WORD

14286 ;

14287 ;
14288 ;

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (72)

10 _BUF = ZEROES;
BAY = ONE;

14279 ;
14280 ;
14281 ;

14¢85 ;

SEQ 0295

7025
7026
7029
7030
7031
7032
7035
7034

14282 ;
14283 ;
14284 ;

MLCSY = write;

7021

;
;
;
;
;
;

14276 ;
16277 ;
14278 ;

PAGE 292

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32

146253 ;PLG
14254 ;
14255
14256 ;

14257 ;

23-0(T-80 09:11

DAT CLK = ONE:
DELAY (ONE_US);

.PD_TEHF [.NIB_PTR] eql ZERO

then

7055

NI TSIED = _NIB TSTED ¢+ 1;

7057
7058
7059

it RESULT<O, 4> eql ZERO
then

7056

7060
7061
7062

XOR_LNG_WRD (.NIB_PTR, .BG_PAT,

else

7063

if .RESULT<0, 4> neq X0'17'

7064

7065
7066

ALL_BAD = .ALL_BAD ¢ 1

end;

DATA WORD

'FIND GOOD NIBBLE

' INCREMENT COUNT OF NIBBLES TESTED
'XOR NIBBLE WITH BG PAT

RESULT);

'SEE

IF ALL BITS

' INCREMENT COUNT

IN NIBBLE WERE BAD?
[F

ALL BAD

then SUM_BAD = .SUM_BAD + 1;
'SEE [F SOME BITS IN NIBBLE WERE BAD
'INCREMENT COUNT |F SOME BAD

CIMLAAD ML-11

TEST

MACRO M1113

TEST

SECTION

23-0(T-80 09:11

7
K
PAGE 293

T
YR
YR IR IR IETE T

T Y
TR TR TR FE T
TR YR IR TR
I

7067
7068
7069
7070
707
7072

7073
7074

7075
7076
7077
7078
7079
7080
7081
7082
7083
7084
7085
7086
7087
7088
7089

004167

162706
152777

016705
042705

142777
150577

051476
051500

SEQ 0296

22-0ct=1980 19:47:44
22-0ct-1980 10:45:32

JMLS

OO0

d —
D
D e
D
nd
D e
d md
—

Pl AW W O o
¥
2 2P 0P o o s
N N N AN N NN N N
N [V,
N D cd e e D D D e
s do
OOV
NO NS W
=0 ~O

HARDWARD

LOGIC

012756
012777
016677
016677
004767
012777
005000
012701
0014611
016702
001404
005066
005302
001374

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (72)

end;

ENDSUB;
if NIB_TSTED eql
then

begin

ERRDF

'WHERE ALL NIBBLES XFERR'ED ALL BAD?
'ERROR [F ALL BAD

.ALL_BAD

(84, SYNC, O0);

PRINTB (SEV_FMT, WRD_22, PHR_4, WRD_9, WRD_12, WRD_23,

0oDU (.ML_LON);

else

FNC_5, WRD_19);

DOCLN;
end

if .SUM_BAD gtr ZERC
then
begin

'SEE

SEE NIBBLE WERE BAD?

!SOME BAD IS OK SO GIVE

ERRDF (B85, INTER, 0);
PRINTB (SIX_FMT, PHR
&4, WRD_9, WRD_12, WRD_23, FNC_S5, WRD_19);

INTERMEDIATE

ERROR

end;

ENDTST;
132502
000010

$730:

JSR
sus

000040

140350

81s8

000007

140332

BI(B

000002
000002

000002
140442
140444
140416

000061

140224

140574
177770
140326
177777
177777

1641160

000001
130426

000006

MOV
B8IC

B1S8
MOV
MOV

MOV
MOV

JSR

?EX
1%:
2%:

3%:

MOV
BEQ
MOV

R1,$SAVES

00,sp

7008

#40.aML.REG+40
ML.DUT,RS

#177770,RS

#7.3ML.REG+40
RS ML .REG+40
#-1,2(SP)
#-1,3ML.REG+170

.
:

PC,DAT.DM.XFER
#61 ,3ML.REG
RO

:
:
.

. BG.PAT,»
; BG.PAT,¢

7011
7012
7013
7014

;

WD.CNT
*,38TMP?

7016
7018
7020

L:DLY,RZ

;

*,38TMP

6(SP)

. $STMP

2(SP) ,aML .REG+200
2(SP) ,aML .REG+160

gl,R1

BEQ

DEC
BNE

R2
3%

CLR

6961

;

*,BG.PAT

$STMP

7015

CIMLAAQ ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

14364

005301

14369 051506
14370 051514

152777
005200

000020

152777

000040

042705

177770

164373 051524

000766

020027
003755

14374 051532

016705

14376 051542
14377 051550

142777
150577

14375 051536
14378 051554
14379 051560
14380 051566
14381 051572
14382 051600
14383 057604
164384 051606

14385 051610

14386 051616
14387 051622
14388 051626
14389 051634

005067
152777
004767
012777
105777
100375
104402

152777

016703
042703
142777
150377

4 :

140432

000007
140164

136562
000010
140750
000061
140144
000040

140346
177770
000007
140100

005004
005016
005005
004767
012777
012701

164397 051666

016702

130224

14399 051674
14400 051700
14401 051702

005066
005302
001374

000006

14398 051672

14402 051704

14407 051706

14404 051710
14405 051712
14406 051720
14407 051726

14408 051732
164409 051734
164410 051740
14411 051742
14412 051746
14413 051750
14414 051752
14415 051754
164616 051756
14417 051764
14418 051772

001411

001404

140304

22-0ct-1980 10:47:44

22-0ct=-1980 10:45:32

140754
000071
000001

140152

140100
140122

001411
016702
001404
005066
005302
001374
005301
000766
017767
017767
017767

6$:
7%

140104

140020
8$:

9% :

10$:

000766

140212
000020
000001

137742
140072

118:
12%:
13$:

130156
000006

14$;

15%:
140106
140110
140062

135730
135724
135720

: $$TMP?

BISB
INC

#20,aML.REG+120
RO

;
© WD.CNT

7021
7018

BISB

#40,aML.REG+40

;

7022

10.BUF
#10,aML.REG+40
PC,GD.BLK.XFER
#61,3ML . REG
aML.REG+S0

;
;
;
:
;

7025
7026
7027
7028
7032

#40,aML.REG+40

;

7034

R4
(SP)
RS
NAT.DM.XFER
#01,aML .REG
#1,R1

:
.
.
:
:
.

MOV

LSOLY,R2

;v $8TMP

CLR
DEC

BNE

6(SP)
R2
9%

; $$TMP
: $$TMPI

16%:

RO, #177
13

MOV

ML.DUT,RS

BICB
BISB

#7,3ML.REG+40
RS,aML.REG+40

BIC

140170

TOPS

PA:<

DEC

CMP
BLE

140206

005301

005003
017767
152777
012701

S$:

000177

14390 051640
14391 051642
14392 051644
14393 051646
14394 051652
14395 051660
14396 051664

SEQ 0297

JMLG

164367 051502

14371 051516
14372 051522

L 7
PAGE 294

;

}2%22

14368 051504

23-0CT-80 09:11

CLR
BISB
JSR
MOV
TSTB

BPL
TRAP

BISB

217777085

6%
2

MOV
BIC
BICB
BISB

ML.DUT,R3
#177770,R3
#7,aML.REG+40
R3,aML.REG+40

BEQ

11$

CLR
CLR
CLR
JSR
MOV
MOV
BEG

DEC

CLR
MOV
BISB
MOV
BEQ
MOV
BEQ
CLR

DEC

BNE

DEC

BR
MOV
MOV
MOV

S WD.CNT,®

108

ALL.BAD
SUM.BAD
NIB.TSTED

e, $8TMP2

; $$TMP2

R3
aML .REG+230,PD. TEMP
#20,3ML.REG+120
01 ,R1

: WD.CNT
:
;
. v, $8TMP2

168
LSOLY,R2
15%
6(SP)
R2
14$
R1
138
aML.REG+170,D1.TEMP
ML .REG+200,02.TEMP
ML .REG+160,E2.
TEMP

; *,$8TMPI
; $STMP
. $$TMPY

: $$TMP?

7036
7037
7038
7039
7040
7041

7043
7045
7046
7047

CIMLAAO ML-11 LOGIC

HARDWARD TEST

TEST

MACRO M1113

SECTION

14420
14421
14422
14423 052000
14424 052002
14425 052004
1
0
1

;
14430 052020
14431 052022
14432 052026
14433 052032
14434 052034
14435 052040
14436 052044
14437 052046
14438 052050
14439 052052
14440 052054
14441 052060
14442 052064
14443 052066
14444 052072
14445 052076
14446 052102
14447 052104
14448 052106
1446449 052110
14450 052114
14451 052116
14452 052122

14453 052126
14456 052130
14455 052134
14456 052136
14457 052140
14458 052144
14459 052146
14460 052150
14461 052152
14462 0521564
14463 052156
14464 052160
14465 052162
14466 052164
14467 052166
14468 052170
14469 052174
14470 052200
14471 052204
14472 052210
14473 052214
14474 052220

23-0CT-80 09:11

n
7
PAGE 295

SEQ 0298

22-0ct-198 0 10: 47:44
22-0ct-198 010 :465:32

JMLG

005001

17%:

011662
177770

000001

131042
000010

000004
000012
141262
000012
177760

000017
000006
000006
000010
000160

CLR

ASR
ASR
ASR
ADD

MOV
MOov

R2
R2
R?
#PD.TEMP,R2
R2,=(SP)
R1 =(SP)

CLR
JSR

#,-(SP)
-($P)
PC,BLSGT2

MOV

BIC
MOV

ADD
TST
BNE
INC
MoV
Mov
MOV
ADD
JSR
MoV

BIC

BNE
INC

BR
CMP
BEQ
INC
ADD
INC

CMP

BLE
INC
CMP
BLE

TRAP
ROR

006040
007020
006076
005760
005726
006630
006062

BLO
CMP
BNE
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MoV
MOV
MOV
MOV

M 97770, (SP)

NIB.PTR
NIB.PTR,*

TOPS
PA:<

7050

7052

NIB.PTR,*

no sp

208

RS
R1,-(SP)
4(SP),=(SP)
#2,-(SP)
SP, (SP)
PC.XOR.LNG.WRD
12(SP) ,R2
M77760,R2
18%
R4

19%
R2,M7
19
6(SP)
¥6,SP
R1
R1,#10
17%
R3
R3, #160
12%

NIB.TSTED
¢
NIB.PTR,

BG.PAT,«
RESULT,

RESULT
,*

7058

ALL .BAD

7060
7058

7063

SUM.BAD
NIB.PTR
NIB.PTR,«

: WD.CNT

55
124

7054
7050

7043

WD.CNT,»
7068

67
RO

7$
R5,R4
a1

7055
7056

: NIB.TSTED,ALE-.BAD

7072

7075

SYNC

#uRD .1
#ENC.S
#WRD .2
#URD.12,-(SP)
#WRD.9
#PHR .4
#URD.2

7076

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST

MACRO M1113

SECTION

14476
146477

23-0(T-80 09:11

PAGE 296

7
SEQ 0299

14487 052254
14488 052256
14489 052260
146490 052262
14491 052264
14492 052266
14493 052270
16494 052272
14495 052276
14496 052302
14497 052306
14498 052312
14499 052316
14500 052322
14501 052326
14502 052332
14503 052334
14504 052336
14505 052342
14506 052346
14507
14508
14509
16514
146515
14519
14523 052350
14524 052350
14525 052354
14526 052356
14527 052360
14528 052362
14529
14530
1453

o
o

—

005452
000010
(=]

NS B BN N
AN
(@l Potole Polep ol

(MLG

137722

ct=1980 10:47:44
ct
0 10:45:32
MOV
MOV
MOV
TRAP
MOV
TRAP

#SEV.EMT,=(SP)
210,~(SP)
$P,RO
14
ML .LUN,RO
51

ADD

#22.5P

TRAP

000022
21%:

B8R

0
012746
0

062706
000207

006040
007020
006076
005760
005726
006630
005432
000007
000020
000010

WORD

125

004767

104466

176776

#WRD.25,-(sP)

006000

103773
000207

MOV
MOV
TRAP

#7.-(SP)
SP.RO

7086

#PHR
.4 .= (SP)
#SIX.FMT,=(SP)

SP,«

#20,5P
#10,SP

7084
6961

255 words

depth per

JSR
TRAP
ROR

PC,$T130
66
RO

RTS

BLO
JMLG

#URD .19, -(SP)
#ENC.S,=(SP)

#WRD.12.-(SP)
#WRD.9,~(SP)

Rougine Size:
Maximum stack

130::
1%:

INTER

MOV
MOV

RTS

SUM_.BAD

7085

MOV

ADD
ADD

7074
7072
7082

MOV
MOV

:
:

;

"WORD

MOV
MOV

22¢:

22%

(SP)
22%

.WORD

7077

18T
BLE

TRAP

TOPS
PA:<

invocation:

19 words

7087

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

10PS
PA:<

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0CT-80 09:11

PAGE 297

8
SEQ 0300

22-0ct=1980 10: 47:44
22-0ct=-1980 10:45 :32

JMLG

ALR

BGNTST:
TEST NUMBER:

TST 31

TEST NAME:

SYNC DATA BUS CONTINUITY TEST

'+ +

TEST DESCRIPTION:

TEST THE CONTINUITY OF

BACKGROOND PATTERN OF ONES
VIA MBUS WRITE FUNCTION

WRITE A ZEROES PATTERN INTO
THE

000 ~NO

—O

GOOD BLOCK.

VIA DAT_DM MODE READ GOOD
NIBBLES IN THE GOOD BLOCK FOR
ZEROES.

4.
IMPLICIT

REPEAT WITH COMPLIMENT

DATA AND BACKGROUND PATTERNS.

INPUTS:

PD_TEMP

A BIT VECTOR OF 16 BITS WHERE
THE READ PROM DATA IS STORED
AND ACCESSED FROM.

GLOBAL OWN LOCATION TO THIS TST,
10_BUF

IR IR ITE

—

)

—d

NNNNNNNNVN
NN

I TR TR TR T TN FN

VIA DAT DM MODE WRITE A

INTO THE GOOD BLOCK.

PORININD)
=
b cd ed e b e e ed b

PRI

ETEITEIEIETETE

DATA BUS BY:

A VECTOR OF 256 WORDS WHERE
DATA FOR MBUS READS AND WRITE

IE IE

T Y P PR PR R NE TR TN

THE

SYNCHRONOUS MODULE WRITE PATH

A GLOBAL OWN LOCATION TO

FUNCTION ARE FOUND.

P S

THIS

TEST.

(WRITE PATH)

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BLZ2MLG.BLI.2 (7D)

CIMLAAD ML-11 L 06 l C TEST

14616

14617
14618
14619
14620
14621
14622
14623
16624
14025
14626
14627
14628
14629
14630
14631
14632
14633
14634
14635
14636
164637
14638
14639
14640
14641
14642
14643
14644
14645
14646

14647

23-0CT-80 09:11

¢
PAGE 298

SEQ 0301

22-0ct=-1980 10:47:44
22-0ct=-1980 10:45:32

7153
7154
7155
7156
7157
7158
7159
7160
7161
7162
7163
7164
7165
7166
7167
7168
7169
7170
"N
7172
173
7174
7175
7176
7177
7178
7179
7180
7181
7182
7183
7184
7185
7186
7187
7188
7189
7190
7191
7192
7193
7194

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML&L.BLI.2 (7D

'DROP UNIT FLAG
'BACKGROUND PATTERN
'RESULTS FROM XOR
'TEST PATTERN

86 PKT,
RESULT,

TST_PAT;

DODU_FLG = IERO;

86 P = ZEROES;

‘BG PAT EQL 0°'S
'TST PAT EQL 1°'S

TST_PAT = ONES;

'REPEAT LOOP TWICE

'!cOAD DATA DIAG REG WITM BG PAT

nun

7149
7150
7151
7152

local
DODU _FLG,

7143
71466
7145
7146
7147
7148

o
~n

e
®s
We®s Qo BoBa®e W0 Ve i VeV Ve Te Ve 80 Ve 0 0 V0V Ve % %0 Ve VeV VeV Ve T Vs 0 %09 Ve G

14593 JMLG
14594
14595
14596
14597
14598
14599
14600
16601
14602
14603
14604
14605
14606
14607
14608
14609
14610
14611
14612
14613
14614
14615

§ ec T 10N

—

HARDWARD TEST

MACRO M1113

MLE2 = .BG PAT:
DAT DM _XFER ();
mLcS1 = write;

!SET UP A DATA DIAG XFERR AT
‘D0 A WRITE FUNCTION

incr WD_CNT from 0 to 127 do
beg°n
DELAY (ONE US);

'LOAD BLOCK WITH BG PAT

THE (GOOD BLK

DAT_CLK = ONE.
end;

CLR_MBUS,
BAl = ONE;
10_BUF = ,TST_PAT;

'SET ON FIRST

GD_BLK_XFER (7;
MLTST = write;
do

'DELAY UNTIL XFER TO COMPLETE

.DRY IS_SET;

CLR_MBUS;

DAT DM XFER ();

'SET UP A DATA DIAG XFERR AT
‘DO A READ FUNCTION

MLCS1 = read:
DELAY

ADRS

'SET UP A“GOOD BLOCK XFERR
'90 A WRITE FUNCTION

until

10 _BUF

'FIRST I0_BUF WORD EQL'S TST_PAT

(ONE_US);

'READ 113 LONG WORDS

from 0 to 112 do

incr WD_CNT
begin

PD TEMP = .MLPD;

'GET ThHE PROM DATA
'CLOCK QUT THE DATA WORD

RD_LNG_WRD;

'READ THE DATA WORD

incr NIB_PTR from 0 to 8 do

'LOOK AT 9 NIBBLES

DAY _CLK = ONE;
DELAY (ONE_US);

.PD_TEMP [.NIB_PTR]

then

IS_NOT_SET

'FIND GOOD NIBBLES

SAME BLOCK

CIMLAAD ML-11 LOGIC TEST

HARDWARD

TEST

T
A
I
I
IR
S
IRYN
T

14665
14666
14667
14668
14669
14670
164671
14672
14673
14674
14675
14676
14677

PR
T T

14664

PR TR

16649 ;MLG
14650 ;
14651
14652
14653
14654
14655
14656
14657
14658
14659
14660 ;
14661
14662
14663

14678 ;

14679
14680
14681
14682
14686
14690

;
;
;
;

052364
14691 052370
14692 052372
14693 052374
14694 052376
14695 052402
14696 052404
14697 052406
14698 052414
14699 052620
14700 052424
14701 052432
14702 052436

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE 299

8
SEQ 0302

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (73)

22-0ct=-1980 10:47:44
22-0ct=1980 10:45:32
begin
XOR_LNG_WRD

7195
7196
7197
7198
7199
7200
7201
7202
7203
7204
7205
7206
7207
7208

7209
7210
7211
7212
7213
7214
7215
7216
7217
7218
7219
7220
7221
7222
7223
7224
7225

.TST_PAT, RESULT);

i; LRESULT<0, 4> neq ZEROD

then

'SEE

'XOR NIBBLE

DATA WITH TST_PAT

EQUAL

begin
'"ERROR [F NEQ
ERRDF (86, SYNC, 0);
PRINTB (FIV_FMT, WRD 24, WRD 25, WRD_10, WRD_12,
PRINTB (FMTTS, ,TST_PAT, _RESULT, .NIB_PIR);

FN(_S);

DODU_FLG = ONE;
end

end
end;

ENDSUB;
it

.DODU_FLG

then

IS_SET

'DROP THIS UNIT
'AND EXITS TEST

DODU

IS_SET

begin

D0ODU (.ML_LUN);
DOCLN;
end;

BG_PAT = not

.BG_PAT;

'COMPLIMENT BG_PAT

rs;_PAT = not .TST_PAT;

'COMPLIMENT TST_PAT AND REPEAT

endg.,

ENDTST;

004167
024646
005046
005001
012702
005046
104402
152777
016705
042705
142777

131470

010177

137426

150577

(.NIB_PTR,

$7131:

177777

000040
137550

137324

000007

137306

177770
137302

1$:

JSR
CMP
CLR
CLR
MoV
CLR
TRAP

R1,$SAVES
-(SP),-(SP)
-(SP)
R1
#-1,R2
-(SP)
2

BIC

#117770,R5

BISB
[0}

BI(B
BISB

MOV

#40,3ML .REG+40
ML.DUT RS

;

7089

; DODU.FLG
; BG.PAT
; «,TST.PAT
: TWICE
:

;

7149
7150
7151
7153
7154
7155

: BG.PAT,

7157

#7,3ML .REG+40
RS,SML.REG+40

R1,3ML.REG*+170

:%1,3HL.REG

000001

MoV

1274616

MOV

LSDLY,RS

6%:

000177
000040
137422
177770
000007
137154
000010
135544

137176

000061

137070

000040
137340
177770
000007
137072
137754
00007
000001

137114

000006

137212

000020
000001
001404

127156

137020

8%:
9%:

MOV

ML.OUT,RS

aML
. REG+50
7%

#40,aML .REG+40

2177770.85

#7,3ML .REG+40
RS .@ML.REG*40

PC.DAT.OM. XFER

MoV
MoV

#71.3ML.REG

MOV

%$DLY.R>

8eQ
CLR
DEC
BNE
DEC

CLR

" ,Ré
1§

TEMP
ML .REG+230,PD.

MOV

BEQ
BtQ

*,88TMP?

7180
7181
7182

2L, 88TMPY

; $$TMP

MOV

TST.PAT,
¢

PC,GD.BLK.XFER

#61,aML.REG

B1SB

138

#177770,R5

MOV
1S18
BPL

BEQ

7163

7167

#40,aML
. REG+40

MOV

BIC
8I(8
8158
JSR

137076

WD .CNT
WD.CNT,»

#7.,3ML.REG+40
RS ,aML.REG+40
#10,aML .REG+40
R2,10.BUF

BISB

127224

7%:

$3TMP?
7166

#20,aML.REG+120
R3
R3, %177

ML.OUT,RS

JSR

—

137134

137146

MOV

BIC
B8I(B
BIS8
8158

137160

(=]
o

137740

B1S8
INC
CMp
BLE
BIS8

$$TMP
$$TMPI

NN
- O

137274

RS
4%
R4

add

000020

5%
6(SP)

5%:

BEQ
CLR
DEC
BNE
DEC

*,$8TMPI

NNNNN

000006

v, $8TMP2

—

BEQ

WD.CNT

7159
7160
7161
7163
7165

#20.aML .REG+120

166

L$OLY,RS
15%

;

$3TMP

;

$8TMP?

. WD.ONT

D oe,$8TMP2
o,

$8TMP1

o Jo T Je J
oo ~No
&~

CLR

7158

NSNS~

JSR

137214

BG.PAT,»
8G.PAT,

R1,8ML.REG+200
R1,3ML.REG+160
PC,DAT.DM
. XFER

MOV

000061

14733

14734
14735
14736
14737
14738
14739
14740
14741
14742
164743
14744
14745
14746
14747
14748
14749
14750
14751
14752
14753
14754
164755
14756
16757
14758

MoV
MOov

T0PS

PA:<

140150

:465:3%2

137432
137406

14723
14724
14725
14726
14727
14728
14729
14730
14731
14732

147:464

;MG

OOV
S NWHNNIN
=
H£HONONOS NSO SNO

14719
14720
14721
14722

SEQ 0303

14704
14705
14706
14707 052442
14708 052446
14709 052652
14710
164711
14712
14713
16714
164715
14716
164717
14718

—

SECTION

TEST

HARDWARD

MACRO M1113 23-0(T-80 09:11 PAGE 500

TEST

-~~~

CIMLAAD ML-11 LOGIC

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

F
8
301

SEQ 0304

;MLG
;
000006

148 :

15%:
O =0
OO~

005305
001374
005304
000766
017767
017767
017767
005004
010405
006205
006205
006205
062705
010546
010446
042716
012746
005046
004767
062706
005700
001060
010446
010246
012746
060616
004767
032766
001443

—d
d
b

005066

14760
14761
14762
14763
14764
14765
14766
14767
14768
14769
14770
147N
14772
14773
14774
14775
14776
14777
14778
14779
14780
14781
14782
14783
14784
14785
14786
14787
14788
14789
14790
14791
14792
14793
14794
14795
14796
14797
14798
14799
14800
14801
14802
14803
14804
14805
14806
14807
14808
14809
14810
14811
14812
1481%
14814

TEST

134730
134724
134720

16%:

17$:

011662

6(SP)

;

$STMP

DEC

$8TMP?2

MOV
MOV
MOV

CLR

MOV
ASR
ASR
ASR
ADD
MOV

BIC

MOV
CLR

130042

JSR

000010

136
142

2 746
2 746
2 7466
2
0600
4614
0
6
0
2
2

004366
000004
000001
000026

: NIB.PTR
. NIB.PTR,¢

Ré4.=(SP)

: NIB.PIR,+

RS
RS
RS
#PD.TEMF
RS
RS,=(SP)

#177770, (SP)

7191
7193

" ,-(SP)
-($P)

PC,BLEGT2
19%
R4 ,=(SP)

MOV

#13,-(5P)

BIT

$7,12(5P)

.+, RESULT

7198

TRAP
.WORD

55
126

;

7201

WORD

MOV

#WRD.12,-(SP)

;

7202

ADD
JSR

BEQ

R2.-(SP)

SP, (SP)
PC.XOR.LNG.WRD

18%

#ENC.S,-(SP)

#WRD.10,-(SP)
#WRD.25.-(SP)
#WRD
.24 .~ (SP)
#FIV.FAT,-(SP)
#6.-(SP)
SP,RO
14

MOV
MOV
MOV

30(SP),=(SP)
R2,-(5P)
#FAT.5,-(SP)

R4, (SP)

MOV

8 ,-(SP)

TRAP

MOV

ADD

: NIB.PIR,*
:

TST.PAT,»

RESULT,

7196

SYNC

MOV
MOV
MOV
MOV
MOV
MOV
TRAP

MOV

000036

R4
R4 RS

MOV

000030

aML.REG*170.D1.TEMP
aML.REG*+200.02.TEMP
ML .REG+160,E2.
TEMP

$$TMPY

BNE

MOV

007020
005760
005740
006112
006104
005414
020006

138

#10,5pP

MOV

000012

RS
14$

TOPS
PA:<

ADD
TST

000012
000017

CLR

DEC
BNE

MOV

177770
000001

140266

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32

.WORD

dd—‘—.-‘—.o—.—.—‘.—.-fi—.

HARDWARD

TEST

;

SP,#

: NIB.PTR,+
: RESULT,s
L TIST.PAT,»

SP,RO

#1,36(SP)

: +,DODU.FLG

#26.,5P

7203

SP,e

7204

7203

CIMLAAD ML-11

TEST

14816
14817
14818

14842

14876

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

8
G
302

SEQ 0305
TOPS
PA:<«

ML4

14819 053204
14820 053210
14821 053212
14822 053216
14823 053220
14824 053222
14825 053226
14826 053230
14827 053232
14828 053234
14829 053236
14830 053242
14831 053250
164832 053252
164833 053256
14834 053260
164835 053262
164836 053264
14837 053266
14838 053270
14839 053274
14840 053276
14841 053302

062706
005204
020427
003671
005203
020327
003631

18%;
19¢:

000006

000010

INC
CMP
BLE

000160

104467

TRAP
ROR

006000
103002

000167
026627
001004
016700
104451
104444

005101
005102
005216
021627
003760
062706
000207

177142

000002

000001

20$%:

21%:

136710

22%:

000001
000010

—

;

004767

104466

177054

006000

103773
000207

JMP
CMP

BNE

MOV
TRAP
TRAP

(oM

(OM
INC
CMP
BLE

Routine Size:

Maximum stack

'<BLF/PAGE
>

#6,SP

NIB.PTR,
¢

.
;

WD.CNT
WD.CNT,

7195
7191
7184

7209

2%
1%

2(sP),m
22%

: DODU.FLG,*

7213

7217

ML.LUN,RO

44
R1
R2
(SP)
M
(sP).,.

; BG.PAT
:
:
;

20$%

1ST.PAT
TWICE
TWICE,*

#10,SP

232 words
depth per invocation:

TRAP
ROR

RTS

Routine Size:

: NIB.PIR

R4, #10
17%
R3
R3,#160
12%

PC,8T31
66
RO
19

JSR

8LO
.

7226

BHIS

ADD
RTS

053304
053304
053310
053312
05331
05331

ADD
INC
(MP

BLE

—

14843
14844
14849
14850
14854
14858
14859
164860
14861
14862
14863
14864
14865
14866
14874
14875

TEST

[2V]

HARDWARD

LOGIC

6 words

Maximum stack depth per

24 words

7223

invocation:

0 words

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0(T-80 09:11

PAGE 303

22-0ct=-1980 10:47:44
22-0ct=1980 10:45:32

14878 JMLG
14879 ;
PR TRP PR PR L PR YR TR IR IR I )

BGNTST:
lee
]
]

TST 32

TEST NAME:

SYNC DATA BUS CONIINUITY ,READ PATH

TEST THE CONITNUITY OF THE SYNCHRONOUS MODULE READ

DATA BUS BY:

VIA MBUS WRITE FUNCTION WRITE ONES INTO THE GOOD BLOCK.

VIA MBUS READ FUNCTION READ THE GOOD BLOCK FOR ONES.

REPEAT WITH COMPLIMENT DATA PATTERN.

PN TR TN

]

F R P PN

]

i
i

IMPLICIT INPUTS:
10_BUF

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE

TR T P

e T

;

FUNCTION ARE FOUND.

local
0ODU FLG,

T E T ETR

1ST PAT,
BG_PAT;

‘DROP UNIT FLAG
'TEST PATTERN
'BACKGROUND PATTERN

DODU FLG = 2ERO;
R

TST PAT = ONES;

BG_PAT = ZEROES;
incr TWICE
begin

from O to 1 do

CLR_MBUS;
BAl = ONE;
10_BUF = .T1ST PAT;

GD_BLK_XFER (J;
MLTST = write;
do

'REPEAT LOOP TWICE

'SET ON FIRST 10 _BUF ADRS

'¢FIRST 10_BUF ADRS GET TST PAT
'SET UP A GOOD BLOCK XFERR

'DO A WRITE FUNCTION (WRITES THE TST_PAT)
'DELAY UNTIL XFER TO COMPLETt

until

.DRY [S_SET;

BGNSUB;
CLR_MBUS;

14926

14932

TEST NUMBER:

' TEST DESCRIPTION:

14923
16924
14925
14927
14928
14929
14930
14931

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZMLG.BLI.2 (74)

]

T E P E TRIR IR

14880
14881
14882
14883
14884
14885
14886
14887
14888
14889
14890
148N
14892
14893
14894
14895
14896
14897
14898
14899
14900
14901
14902
14903
14904
14905
14906
14907
14908
14909
14910
146911
14912
14913
16914
14915
16916
146917
14918
14919
14920
14921
14922

SEQ 0306

incr JO CNT from 0 to 255 do

.LOAD 10_BUF WITH BG PAT

GD_BLK_XFER ();

'SET UP A GOOD BLOCK XFERR

10_BUF [.JO_CNT] = .BG_PAT;

7278

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

14934
14935
14936
14937
14938
14939
14940
14941
14942
14943
14944
14945
14946
14947
14948
14949
14950
14951
14952
14953
14954
14955
14956
14957
14958
14959
14960
14961
14962
14963
16964
14965
14966
14967
14971
14975
14976

SECTION

23-0(T-80 09:11

8
1
PAGE 304

22-0ct=1980 10:47:44
22-0¢t=-1980 10:65:32

M4
;

053320
053324
14977 053326
14978 053332
14979 053334
14980 053336
14981 053344
14982 053350
14983 053354
14984 053362
14985 053366
14986 053374
14987 053400

SEQ 0307

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (74)

MLCST = read;

'DO A READ FUNCTION (READ THE TST PAT)

'DELAY UNTIL XFER TO COMPLETE

until

.DRY

IS_SET;

incr 10_CNT from 0 to 255 do

'READ THE 10_BUF FOR TEST PATTERN

i; .10_BUF [.10_CNT] neq .TST_PAT
then

begin
ERRDF

(87,

'SEE IF 10_BUF WORD EQLS TST PAT

'ERROR AND SET DODU_FLG IF NEQ

SYNC, 0);

PRINTB (SEV_FMT, WRD 24, WRD_25, WRD 10, WRD_12, WRD_23, FNC_6, WRD_19);

PRINTB (FMTZ2, .TST_PAT, .107BUF [.!0_CNT], T.TST_PAT xor .I10_BUF C[T10_CNTI));
DODU_FLG = ONE;
end;

ENDSUB;

'DROP THIS UNIT IF DODU_FLG IS SET

i; .DODU_FLG IS_SET

then

begin
DODU (.ML_LUN);
DOCLN;
end;

'COMPL IMENT TST _PAT

TST PAT = not .TST PAT;

'COMPL IMENT BG_PAT AND REPEAT

aGaFAr = not .BG_PAT;
end,;

7309

ENDTST;

004167
005046
012701
005004
005005
152777
016703
042703

130534

162777
150377
152777

010167
004767

$132:

177777

000040
135620

177770

000007
136352

000010

134742

137136

136374
136356

136344

1%:

JSR
CLR
MOV
CLR
CLR

R1,$SAVES
-(SP)
#-1,R1
R4
RS

POV

ML .DUT,R3

BICB
BISB

#7,3ML.REG+4L0
R3, ML .REG+40

BISB

BIC

BISB
MOV

JSR

#40,3aML .REG+40

;
; DODU.FLG
; o+, TST.PAT
: BG.PAT
; TWICE

225

7256
7257
7258
7260
7261

0177776,R3

#10,aML.REG+40
R1,10.BUf

PC,GD.BLK.XFER

;

; TST.PAT,s
;

7263
1264
7265

d e D
AN

0
0
0
0
0
0
0
0
0 20 053536
V21 053540
022 053542

b el
—

8
Sta 0308
144

JMLG

000007

136272

136534
177770

136266

3s:

MOV

010342

136172

5%:
fS:

010342

006040
007030
006076
005760
005740
006112
006104
005452
000010

000002
000002

004224
000004

BIC
BICB
B1SB
CLR

MOV
ASL
MOV

INC
CMP
BLE
JSR

000377
137042
000071
136236

B1SB

Mov
1ST18
BPL

7266
7270

#40,aML
. REG+ED
ML.DUT,R3

7272

aML.REG+SO
2%
2

2017777083

#7,3ML .REG+40
R3.AML .REG+40
R2

R2,R3

R3
R4, 10.BUF (R3)
R2
R2.#377
4%
PC,GD.BLK.XFER
#71,3ML.REG

.WORD
.WORD
.WORD

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
Mov
TRAP
MOV
MOV

B1C
BIC
8IS

MOV
MOv
MOV
MOV
MOV
TRAP

.CNT
¢
LCNT,

PAT
¢
LCNT

ML .REG*S50

#10.BUF ,R3

(R3) ,R1

7275
7276
7275
7278
7279
7283

CLR

MOV
ASL
ADD
CMP
BEQ
TRAP

TOPS

PA:<

#61,a.ML
REG

136310

MOV
1578
BPL
TRAP

000040

2s:

—

136266

: 32

> —e (D
oo

000061
136332

e amd wmd

b e

5023 053546
5024 053552
5025 053556
5026 053562
5027 053566
5028 053572
5029 053576
5030 053602
5031 053606
5032 053610
5033 053612
5034 053614
5035 053616
5036 053622
15037 053626
15038 053630
15039 053632
15040 053634
15041 053640
15042 053644
15043 053646

305

;

o) =]

—_

(9,

(=4

prd

W00 ~NO WV 2NN py

D d D d oD d o d d b —
NN NNV
AN (9

14994 053416
14995 053420
14996 053422
14997 053430
14998 053434
14999 053440
15000 053446
15001 053452
15002 053454
15003 053456
15004 053460
15005 053464
15006 053466
15007 053472
15008 053474
15009 053500
15010 053506

pmay G

14989
14990
14991
14992 053404
14993 053412

PAGE

TEST

23-05(T-80 09:11

HARDWARD

MACRO M1113

CIMLAAQ ML-11

<CNT
¢«

7285
7287

*,TST_PAT

7290

127
SYNC

.1
#WRD
#ENC.6
#URD.?2
#WRD .1
#WRD.1
#WRD .2
.24 ,-(SP)
#WRD
#SEV.FMT,-(SP)
#10,-(sP)
SP.Ru
14
(R3),(SP)
R1,-(SP)

2(SP),(SP)

729N

;

SP,

L TST.PAT,«

R1,2(SP)
(SP)+,(SP)

TST.PAT,+

R1,=(5P)
NEMT.2,-(SP)
¥4 ,-(SP)

;

TST.PAT,»

SP,»

(R3),=(SP)

SP,RO
14

7292

MACRO M1113

0GIC 1 EST
HARDWARD TEST S ECTION

CIMLAAD M -11

15045
15046
15047
15048 053650
15049 053656

15050
15051
15052
15053

053662
053664
053670
053672

15054 053674
15055 053676
15056 053700

15057
15058
15029
15060
15061
15062
15063
15064
15065
15066
15067
15068

15069
15070
15075
15076
15080
15084
15085
15086
15087
15088
15089
15090
15091
15092
15097
15098

053704
053706
053712
053714
053716
053720
053722
053724
053730
053732
053734

K
8
PAGE 306

TOPS
PA:<

012766
062706
005202
020227

003712

000001
000032

000032

000377

7%:

104467
006000

103650
021627
001004
016700
104451
104444
005101
005104

005205
020527
003602
005726
000207

004767

104466

#1,32(SP)

*,DODU.FLG

INC
CMP
BLE

R2
R2,#377
6%

10.CNT
[O.CNT,»

ROR
BLO
CMP
BNE

MOV
ADD

TRAP

000001
136254

8%:

000001

MOV
TRAP
TRAP
oM

COM
INC
CMP
BLE
TST
RTS

177356

JSR

TRAP
ROR

BLO
RTS

Routine Size:

7310

'<BLF/PAGE>

7293
7289
7285
7294

(SP) .41

DODU.FLG,*

7298

7301

ML .LUN,RO

44
R
R4
RS
M
RS,
1%
(SP)+

TST.PAT

BG.PAT

TWICE
TWICE,*

7305

7306
7260

7225

Routine Size:
135 words
Maximum stack depth per invocation:

T3 2::
1%:

006000
103773
000207

#32.5P

20 words

7307

PC,$132
66
RO
19

6 words

; Maximum stack depth per invocation:
;

SEQ 0309

M L4

;

053736
053736
053742
053744
053746
053750

23-0(CT-80 09:11

0 words

CIMLAAOD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE 307

22=0ct=1980 10:47:44
22-0ct=1980 10:45:32

[
[4

[
[
[

[4
[
[4
[

WA 2OV

[4
[4
.
L[4

L4
4

2O VNV

L[J

[
[

4
[4
L
.

[4
4

LJ
L]

=OOB NIV

[
[
[J
[J
[
[

[J
[4

NO NS W

[
[
[
[
[

[

=2 OO

[

[4
[J
.
[4
[

[
[

d
D
ed
—

) el

OO ~NO N B~ W) —

WN 20000 ~NO
NV

NNNNNNNNN
N N N N N N AN A

pury

D b
D e
i

[

i i
D e

D e e e

e e e

D D
D s
D i i e
D D e e

d D e
D e

e e
D e e e

D e
D D
o
D o
o oD
D o

D i e

b b o

b o
s ol
e ol e o

s et e o o o

e e o

WA AV A A A A A VA TEATA AT

i e o e e o

NTATY

b D D o’ D

D d b D e

D D d e o

TA N AN AT

D i i

D e

TN N WA

D e

D d

A NTDNVHAAWNANT TN —
VN

15100 <MLé

SEQ 0310

BGNTST;
‘ee
L}

i
i
i
;
i
:
i
;
i
i
i
i
;
;
i
i
i
i
;
i
i

TEST NUMBER:

TST 33

TEST NAME:

RAM BUS ADRS COUNTER TESY

TEST DESCRIPTJON:
TEST

THE

RAM_BUS ADDRESS

LOADING A REPEATING COUNT OF 0
TO 63 INTO THE NIBBLES OF THE
FIRST 64 WORDS OF

THE

10_BUF.

VIA MBUS WRITE FUNCTION WRITE
THE

CONTENTS OF

THE

INTO THE GOOD BLOCK.

10_BUF

VIA DAT DM READ GOOD NIBBLES

READS.

REPEAT READING NIBBLES UNTIL

113 WORDS ARE READ OR ALL 10 NIBBLES

ARE MASKED.

IMPLICIT

INPUTS:

PD_TEMP

A BIT VECTOR OF

16 BITS WHERE

THE READ PROM DATA IS
AND ACCESSED FROM,

STORED

?%?BAL OWN LOCATION TO THIS

i
i
i
i
i
i
i

THE GOOD BLOCK FOR THE UNBROKEN
COUNT OF 0 TO 63.

ONCE A BAD NIBBLE 1S ENCOUNTERED
MASK THAT NIBBLE FROM FURTHER

;

i
i
i
i
i
i
i
i
i
i
i

ABILITY OF

COUNTERS TO LOAD/UNLOAD THE SKIP
RAM DURING WRITE FUNCTIONS BY:

i
!
;

/WRITE PATH

10_BUF

A VECTOR OF 256 WORDS WHERE

DATA FOR MBUS READS AND WRITE
FUNCTION ARE

FOUND.

GLOBAL OWN LOCATION TO THIS TEST.

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (75)

CIMLAAO ML-11 LOGIC TEST

HARDWARD TEST

MACRC M1113

SECTION

23-0CT-80 09:11

NOVEB NN 2OV

00 OOV OVV OO0

— OOV
800000000
NO VB NN 2O OO0 NON NN
—

ORI
PNVNINDALNINININ)
= = -2

D e

e i

D o

D d e

D ad D e e

d d h e

D o

NNNNNNNN

B d D D el i

D D

D D e

i o

D i

NO NS NN 2O OO NO NS WA —=O O on

D D D o

AW
A VA AW
(VLDAVLD IVi IVDTVdTVDIVe IVDTVi YVD IV)AVD[ d IVDIV,D IV,D IVD IVDIVe IVDLV,D[VD[VolTV,elLVS LV- IVB LVDIVe [V,
[V, |
—
D e o e e
D D o
Pl

D e e
b D b o
D e
s e e e
—

SEQ 03N

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32

15156 JMLG
7

AWV WA WA VLA VAN VAV

PAGE 308

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (75)

[
[J
L[4
J

local
DODU FLG,

WwRD_UNT,

[

NIB_IGNORE

[

PASS CNT,
NIB_PAT;

[4
[]

[
[4
”
[4
L

: bitvector [16],

ERRFLG,
BAD NIB CNT,

[

'DROP UNIT FLAG
'WORD COUNT
'NIBBLE IGNORE FLAGS
'ERROR FLAG
'BAD NIBBLE COUNT
'PASS COUNT
'NIBBLE

PATTERN

DODU_FLG = ZERO;

WwRD_UNT = ZERO;
incr CNT

[

from 0 to 63 do

'LOAD 44 WORDS WITH REPEATING COUNTS OF 0-63

incr PAT_CNT from -1 to 11 by & do
'LOAD NIBBLES
begin
(10_BUF [.WRD_CNT))<0, &> = LPAT_CNT + 1;
'LOAD
'LOAD
(10_BUF [.WRD_CNT))<4, &> = PAT_CNT + 2;
(10_BUF [.WRD_CNT])<8, 4> = LPAT _(NT + 3;
'LOAD
!LOAD
(10_BUF [.WRD_CNT])<12, &> = LPAT_CNT + 4&;
. INCREMENT TO
WRD_CNT = ,WRD_CNT + 1;
end;

[4
[
4
[

[
[
*

IN WORD WITH REPEATING COUNTS OF 0-63
FIRST NIBBLE IN WORD
SECOND NIBBLE [N WORD
THIRD NIBBLE IN WORD

FORTH NIBBLE
NEXT WORD

IN WORD

[
.

[
[

[4
4

L4
[4
[

’
[
[

[
[4
.
L]
4

’
’
[

[J
4

[J
[
[
[
[

BGNSUB;
CLR_MBUS.

GD_BLK_XFER ();
MLTS1 = write:

!SET UP A GOOD BLOCK XFERR
'DO A WRITE FUNCTION

‘DELAY UNTIL

until

.DRY

XFER TO COMPLETE

IS_SET;

CLR_MBUS;
NIB_IGNORE = ZEROES;

PASS CNT = ZEROES:
NIB_PAT = ZEROES;

BAD_NIB_C(NT = ZEROES;

DAT_DM_RFER ();
MLCSY = read:;
DELAY

‘SET UP A DATA DIAG MODE AT THE GOOD BLOCK
!D0 A READ FUNCTION

(ONE_US);

)
begin

'LOOP UNTIL THE BLOCK IS READ OR 9 BAD NIBBI ES FOUND

PD_TEMP = _MLPD;

!GET THE PROM DATA
'CLOCK OUT THE DATA WORD

RD_LNG_WRD;

'READ THE DATA DIAG REGISTERS

incr NIB_PTR from O to 8 do

'LOOK AT 9 NIBBLES

DAY_CLK = ONE;
DELAY (ONE_US);

CIMLAAO ML-11
N no

;2}2

7617

;258

:
:

74621
76422

7426
76427

I
I T T
R A S
N N S
S A
N T I
I
O
ATIR TR WA T
P TR WA

N
8
PAGE 309

SE@ 0312

.PD_TEMP [.NIB_PTR]

then

begin

TST_LNG_WRD

(.NIB_PTR,

.NIB_PAT,

if ERR_FLG IS_SET
then
begin
ERRDF

7430

(88,

'SEE IF THIS NIBBLE FOUND BAD BEFORE
ERR_FLG);

'TEST

THE NIBBLE

'SEE IF TEST FOUND AN ERROR

ARR DAT, 0);

'ERROR AND SET DODU_FLG IS SET

PRINTB (Six_FMT, FNC_18, WRD_S0, WRD_10, WRD_12, FNC_S, WRD_19);

7631

DODU_FLG = ONE;

76432

end
end
else

end
begin
NIB_IGNORE [.NIB_PTR] = ONE;
BAD_NIB_CNT = .BAD_NIB_CNT +
end;

NIB_PAT =
end;
PASS_CNT =
end

;zzg

until

7450
7451
76452
7453
7454
7455

ENDSUB;

7457
7458
7459

'FIND GOOD NIBBLES

it .NIB_IGNORE [.NIB_PTR] IS_NOT_SET
then

7428
7429

7456

IS_NOT_SET

begin

;2%2

7473
7434
7435
7436
7437
7438
7439
7440
7441
7442
7443
7444
7445
7446
7447

T0PS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (75)

begin

7418

7423

;

23-0(T-80 09:11

2 2-0ct-1980 10:47 144
2 2-0ct-1980 10:45 :32

LRI

WA
2O 00NN
NO NN
W= O OO YOS WA =200
NN
WO

ok D D b o
D D D o
)
d D
D o
d D e
b
D o
b o
D e
D
D d
i
D oD
D e o
D o
D o
i
)
D D
el i

MACRO M1113

SECTION

JML4
:

VAWV
AWM WA WM AWML AWVIWA VI
AT
WA VTV
VLA LN (W LU LV JW AV LV, LV [V [V, IV, IV IV IV, ] \¥a)
NINOALALNRNLANIMNLINININIRASNINLRNINIAL NIAIAD AN AL NI AL
R P AL R A NI AL A [AS1aS I ST N1, ST,SI,S] N1,S1,8] .87 .NT.N] ~N
O VNNNVWVWVWAWNWVMWVVANE
S RSB SN
W W AN NN N AN AR NN N PO PO NI PO NI NI PO NN = b b D b pry

b ad

TEST

2O 000 NN

HARDWARD TEST

LOGIC

_NIB_PAT

_PASS_CNT

(,PASS_CNT eql

if .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;
ENDTST;

113)

+
1;

'THIS NIBBLE
1;

IS BAD

.SET THIS NIBBLE NIB_IGNORE
'INCREMENT BAD NIB COUNT

FLAG

'INCREMENT NIB PAT
'"INCREMENT PASS COUNT

(.BAD_NIB_CNT eql 9);

'REPEAT UNTIL COMPLETE

'DROP THIS UNIT

DODU_FLG SET

NEVER FOUND BAD

FARDWARD TEST

[=]
o

(=)

MACRO M1113

SECTION

1 053752

ODQOCOEOD0O00OD00Q0 ~N~N~NN~N~NN~N~
OO NO VSN 2 OO 00 ~NO NS WNY

TEST

004167

162706

005046
005003
005002
012700
010301
006301
062701
010005
005205
04270¢
142717
150511

010005
062795
006305
006305
006305
006305
062705
142711
150511
010005

062705
000305

042705
0642711
050511
010005

062705

5305 054110

000305
006305
006305

006305
006305
042705
042711
050511
005203
062700
020027
003715
005202
020227
003707

104402
152777

016702
042702

142777

130102
000006

$133:

177777

JSR
SuB
(LR
(LR
(LR

MOV
MOV
ASL
ADD
MoV
INC

010342
177760

BIC
BIC(B
BISB

000017

MOV
ADD
ASL
ASL
ASL
ASL

000002

177417

BIC
BICB
BISB

000360

MOV
ADD

000003

SWAB
BIC
BIC
BIS

170377
007400

MOV
ADD

000004

PAGE 310

9
SEQ 0313
7309

R1,8SAVES

DODU.FLG
D
. (NT
WR
CNT

. CNT
v, PAT

D
. CNT,*
WR
#10.8UF
,R1

Rg,RS

7375
7376
7378
7380
7382

PAT.CNT,»

#177760,RS
#17,(R1)
RS, (R1)
RO,R5
#2.,RS
RS
RS
RS
RS
#177617
RS
#360,(R1)
RS, (R1)
RO,RS
#3,RS
RS
#170377,RS
#7400, (R1)

RS, (R{)

RO,RS

PAT.CNT,*

7383

PAT.CNT
¢

7384

PAT.CNT,»

7385

WRD.CNT
* PAT, CNT
PAT.CNT,«

7386
7380

CNT
¢
CNT

7378

SWAB

ASL
ASL
ASL
ASL

007777

BIC
BIC
BIS
INC

170000

000004
000013

ADD
CMP

BLE
INC
CMP
BLE

000077
000040
136002

135556

000007

135540

177770

23-0CT-80 09:11

TRAP

BISB

MOV

BIC
BICB

#7777 RS
#170000, (R1)
RS, (R1)
R3
#4,R0

RO,#13

#40,aML
. REG+40
ML .DUT,R2

0177770.r2

#7,3ML
. REG+40

7387
7389

b
)

LOGIC

CIMLAAD ML-11

HARDWARD TEST

LOGIC

TEST

MACRO M1113

SECTION

15323

9
SEQ 0314

22=0ct=1980 10:47:44

;

15326 054200
15327 054206

150277
004767

15329
15330
15331
15332

054216
054222
054224
054232

105777
100375
152777
016702

15334
15335
15336
15337
15338

054242
054250
054254
054260
054262

142777
150277
005066
005004
005003

15328 054210

15333 054236

15343
15344
15345
15346
15347
15348
15349
15350

PAGE 311

MLG

}g%%g

15339
15340
15341
15342

23-0CT-80 09:11

054264
054266
054272
054300

054304
054306
054312
054314
054320
054322
054324
054326

012777

042702

005005
004767
012777
012701

001411
016702
001404
005066
005302
001374
005301
000766

15351 054330
15352 054336
15353 054344
15354 054350
15355 054352
15356 054356

017767
152777
012701
001411
016702
001404

15360
15361
15362
15363
15364

005301
000766
017767
017767
017767

15357 054360
15358 054364
15359 054366

054370
054372
054374
054402
054410

15365 054416
15366 054420

15367 054422
15368 054424
15369 054426

15370 054430

15371 054434
15372 054436

15373 054440

15374 054442
15375 054446

15376 054450

15377 054454

005066
005302
001374

005001
010100

006200
006200
006200

012702

060602
060002

010046

135534
136332

000061

135462

000040
135732

135506

000007
135464
000004

135470

135526

177770

136334
000071
000001

000006

68 :
78:

135574
000020
000001

135324
135454

8$:
9s:

125540
000006

10$ :

118:
135470
135472
135444

133312
133306
113302

12%:

13¢:

000004

011662

012746

000001

177770

BISB
JSR

R2,aML.REG+4LD
PC.GD.BLK.XFER

TSTB
8PL
BISB
MOV

aML.REG+SO
48
#40,aML.REG+40
ML.DUT,R2

BICB
BISB
CLR
CLR
CLR

#7,aML.REG+4D
R2,aML.REG+40
4($P)
R4
R3

MOV

BIC

135400

125604

062716
010146

042716

4$:

2¢~0ct=1980 10:45:32

CLR
JSR
MOV
MOV
BEQ
MOV
BEQ
CLR
DEC
BNE
DEC
BR

061, 3ML . REG

RS
PC,DAT DM XFER
#71,3ML .REG
1 ,R1
8s
L$DLY,R2
7%
6(SP)
R2
6%
R1
5%

aML .REG+230,PD. TEMP
#20,aML.REG+120
R
12%
LSDLY,R2
1%

DEC
BR
MOV
MOV
MOV

R1
9%
aML.REG+170,D1.TEMP
aML .REG+200.D2.
TEMP
ML .FEG+160.E2.
TEMP

TLR
MOV

ASR
ASR
ASR

MOV

ADD
ADD

MOV

ADD
MOV

BIC

MOV

PA:<

7391

7396

7392

0177770,R2

MOV
BISB
MOV
BEQ
MOV
BEQ
CLR
DEC
BNE

T0PS

:
:
.

NIB.IGNORE
PASS.CNT
NIB.PAT

v, $8TMP1

:
L

$STMP
3STMPI

$$TMP2

. BAD.NIB.CNT
:
:
D w,$8TMP2

7399
7400
7401

7402
7403
7404
7405

7409
7410
7611

:
1.,

88TMP2

;

v, $8TMPY

6(SP)
R2
108

;
:

$STMP
$STMPI

R1
R1,%0

: NIB.PTR
. NIB.PTR,+

7614
7617

0 ,R2

;

7421

RO.-(SP)

;

7617

RO
RO
RO

SP.R?
RO,R2

#PD.TEMP, (SP)
R1,-(SP)

177770, (SP)
" ,-(SP)

. $$TMP2

. NIB.IGNORE
,*

;: NIB.PIR,*

CIMLAAQ ML-11

CIMLAAD ML-11 LOGIC

HARDWARD TEST

MACRO M1113

TEST

SECTION

23-0(T-80 09:11

PAGE 312

9
SEG 0315

22-0ct=-198 0 10: L7:464
22-0ct-198 0 10::45:32

wwuguwww

JMLG

IV IV TV IV IV TV IV IV IV, IV IV 1V

82 054460
83 054462
B4 054466
054472
86 056474
87 054476
88 054500
389 054502
390 054506
hd

391 054512
392 054514
054520
394 054524

395 054526
396 054530

397 054532
398 054534

399
15400
15401
15402
15403
15604
15405
15406
15407

054540
054542
056546
054554
054556
054560
054562
054564
054566

15408 054572

15409 054576

15410 054602

15411 054606

15412
3
4
5

054612
054616
054622
054626

6 054630
7 054632

8 054640
9 054644

0 054650
1 054652
2 054654
3 054656
4 054662
5 054666
6 054670
27 054674
28 054676

29 054702
30 054704
31 054706
32 054712
33 054714

00¢ 46
004767
062706
005700
001066

010246
010146
042716
012746
005046
004767
062706
005700
001065
010146
010346

012746
060616
004767
026627
001033
104455

000130
007534
000000
012746
012746
012746
012746
012746
012746
012746
012746
010600
104414

012766
062706
062706
000414
010246
010146
042716
012746
011646

004767
005205
062706
005203
005201
020127
003642
005204

CLR
JSR

1264614

000010

ADD
1ST
BNE
Mov
MOV

177770
000001

BIC

MoV

CLR
JSR

126362

000010

ADD

1ST
BNE

Mov
MOV
MOV
ADD

000010
136112
000010

JSR
cMp
BNE

000001

TRAP

.WORD
.WORD
. WORD
MOV
MOV
MOV

006040

007020
005760
005740
006400
007216
005432
000007
000001
000020
000006

000026
14%:

15¢:

177770

1264464

000010

0,
sp

RO
15%¢

R2,-(SP)
R1.=(SP)

0117770, (sP)

;
;

NIB.PTR,*
NIB.PAT,»

;

ERR.FLG,*

;

ERR.FLG,*

PC,BLSGT2

RO
168

R1,=(SP)

R3,-(SP)
210,-(sp)
SP, (SP)

PC.TST.LNG.WRD

. #1
10(sP)
14%

7424

74626

55
130

7429

#WRD.19,-(SP)
#ENC.S,=(SP)

7430

SRR.DAT

#WRD.12,-(SP)

#WRD.10,=-(5P)
#WRD .50, - (SP)
#FNC.18.-(SP)
#SIX.FNT,-(SP)
#7,-(SP)

SP.RO

#1,-(SP)
(SP),=(SP)

INC
INC
(MP
BLE
INC

NIB.PTR,e

00,sp

MOV
MOV

ADD

7421

;

#,-(SP)
-(SP)

)
MOV

JSR
INC

16%:

-($P)

PC.BLSGT2

14
#1,26(SP)
#20,5P
86,5P
16%
R2,=-(SP)
R1.-(SP)

81C

000001

000010

MOV
MOV
MOV
Mov
MoV
MOV
TRAP
MOV
ADD
ADD

TOPS
PA:<

17770, (SP)
PC.BLSPU2
RS
#0,5P
R3
R1

R1,M0
13%
R&

;

SP,e

;

+,DODU.FLG

763
7428
7623
1617
7439

; NIB.PIR,*

: BAD.NIB.CNT

. NIB.PAT

. NIB.PTR
: NIB.PTR,*
,

PASS.(NT

744G
7438
7643
7614
7440

CIMLAAQ ML-11 LOGIC
TEST

SECTION

15435
15436
15437
15438 054716
15439 054722
15440 054724
15441 054730
15442 054732
15443 054736
15444 054740
15445 054742
15446 054744
15447 054750
15448 054754
15449 054756
15450 054762
15451 054764
15452 054766
15452 054772
15454

020427
001405
020527
001402
000167
1044667

000161

177372

006000
103002

000167
021627
001004
016700

104451
104444
062706

0060207

177202
000001

15485

18%:

135206

000010

19%:

TRAP
ROR

BHIS
JMP

{Mp
BNE
MOV
TRAP
TRAF
ADD
RTS

055000
055002

055004

055006

;

004767

104466

176752

006000
103773
000207

Maximum stack

33::
$:

9
SEQ 0316

;

7460

'<BLF/PAGE>

7448

: BAD.NIB,.(NT,
«

RO
18%

;

(SP),m
19%
ML.LUN,KO

DODU.FLG,*

7452

7455

&4
#10,sP

7309

265 words
depth per invocation:

BLO

RO
1%

; Routine Size:

e
PASS.CNT,

TOPS

PA:<

8%
67

PC,$133

TRAP
ROR

R4, 4161
17%
RS, 411
17%

JSR

RTS

1577

15478
15483
15484

17%:

BEQ
CmP
8EQ
JMP

. Routine Size:

15461
154672
15466
15470 054774
15471 054774

PAGE 313

22-0ct=-1980 10:47:44
22-0ct=1980 10:45:32
(mp

000011

15455
15456

15472
15473
15474
15475
15476

23-0(T-80 09:11

JMLé

—

HARDWARD

MACRO M1113

TESY

words

7457

6 words

Maximum stack depth per

invocation:

0 words

CIMLAAD ML-11 LOGIC

HARDWARD TEST

WOE
P WP
P

Vs Ve By

e Ve BB

Ve Ve B, W

Be Ve
s Be By ®o Be B
e So ®s ®a 8o Bo
@ e 82

e Ve W,

o
o

NN 2OV
2, OOWNO N

WV
NN 200
NN N =2O0V0~NO

WWWWWWWWMWNNNNNNNNN'\JJ_.._._A.—h_.—l_.._a_ao
&

—

D el o

o e

D i e ad e e

D e e e

D d e

e el e

d e

D ed

D i i oD D e

U WA WA WA A VUL VA A A VWA WA A VWA NS A EA VA WA
AN (U AV LV RV AV ]V, |
1%
(Vo RV, WA WA VA WA WA WA
VA WA VDA WA
TN VAV VWAV
NN N NS

d nd b

IRT

A
R

15487 ;MLG
15488 ;
15489
15490
15491
15492
15493
15494
15495
15496
15497
15498

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE 314

SEQ 0317
10:47:44
10:45:32

7461
7462

7463

7464
7465
7466

1667
7468
74¢€9
7470
134
74672
7473

7474
7475
74676
7677
7478
7479
7480
7481
7482
7483
7484
7485
7486

7487

7488
7489
7490
749
7492
7493
7694
7495
7696
7497
7498
74699
7500
7501
7502
7503
7504
7505
7506
7507
7508

7509

7510
7511
7512

TCPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4L.BLI.2 (76)

;

RGNTST;
les
|

i
i
L}
L}

i
i
i

TEST NUMBER:

TST 34

TEST NAME:

RAM BUS ADRS COUNTER TEST

TEST DESCRIPTION:
TEST ABILITY OF

RAM/BUS ADRS

COUNTERS TO LOAD/UNLOAD THE SKIP

RAM DURING READ FUNCTIONS BY:

|
1

i
i
i
i

:
]

LOADING A REPEATING CCUNT OF 0
TO 63 INTO THE NIBBLES OF THE
FIRST 64 WORDS OF

THE

I0_BUF.

VIA MBUS WRITE FUNCTION WRITE
THE CONTENTS OF THE 10_BUF
INTO THE GOOD BLOCK.

10_BUF

CLEAR OUT THE

VIA MBUS READ FUNCTION READ

i
i
i
i
i
j
i
i
i
i
i
i

/READ PATH

THE GOOD BLOCK FOR THE REPEATING

COUNT OF 0 TO 63.
IMPLICIT

INPUTS:

10_BUF

A VECTOR OF 256 WORDS WHERE
DATA FOR MBUS READS AND WRITE
FUNCTION ARE

FOUND.

A GLOBAL OWN LOCATION TO THIS TEST.

local

DODU FLG,
WwRD TNT,
PATTINC,
SIZTEXP,
POS_EXP,
TEMP;

(LR _MBUS;

00D0_FLG = ZERO;

'DROP UNJT FLAG
'WORD COUNT
'"PATTERN INCREMENT
'S12E EXPRESSION
'POSITIONAL EXPRESSION
' TEMPORARY STORAGE LOCATION

CIMLAAQ ML=11 LOGIC

T €St

MACRO M1113

HARDWARD TEST SECTION

G 9
PAGE 315

23-0(T-80 09:11

15543 ;ML4

22-0ct=1980 10:47:44

}ggzg :

22-Cct-1980 16:45:32

15546 ;
15547

7513
7514

}gggg ;

;g}g

12223 :
.

;212

15552 :
15553 ;
15554 ;

7519
7520
7521

15557
15558 ;

7524
7525

15555 ;
15556

15559 ;

15560 ;
15561

;

15562 ;
15563 ;
15564

15565
15566
15567
15568

;
;
;
;

15569 .

15570 :
15571 ;

15572 ;
15573 ;
15574

15575 ;
15576
15577
15578
15579

:
:
;
:

15580 ;

15581 ;
15582 ;
}gggz :

WRD_CNT

incr COUNT from 0 to 63 do

7526

egin

(10_BUF
(107BUF
(107BUF

[.WRD_CNT1)<0, &> =
[.WRDZCNT))<4, 4> =
[.WRDZCNT))<B, &> =

GD_BLK_XFER ();

'SET UP A GOOD BLOCK XFERR

7,29
7530
7531

'DELAY UNTIL XFER "0 COMPLETE

7532
7533
7534
7535

7536

7537
7538

0
until .DRY

‘DO A WRITE FUNCTION

IS_SET;

BGNSUB;

incr 10 CNT

from O to 255 do

CLR_MBUS;

GD_BLK_XFER ()
MLES! = read:

'SET UP A GOOD BLOCK XFERR
‘D0 A READ FUNCTION

7542

'DELAY UNTIL XFER TO COMPLETE

7541

7543
7544
7545
7546

7547

7548
7549
;ggg

0
until

.DRY

IS_SET;

CLR_MBUS:

SIZZEXP = &;

'FIELD SIZE FOR NIBBLES ALWAYS & BITS

incr COUNT

'READ 64 WORDS

WRD_CNT = 0;

from 0 to 63 do

15591 ;

7558

15594 ;

7561

it .TEMP<.POS_EXP,

7563

then

15597 .

[0_BUF

7539
7540

7556

15596

'CLEAR QUT

10_BUF [.10_CNT] = ZEROES;

15589 ;

15595 ;

'LOAD FIRST NIBBLE IN WORD
'LOAD SECOND NIBBLE IN WORD
'"LOAD THIRD NIBBLE IN WORD

MLTSY = wrate:

7554

15592 .
15593 ;

,PAT_(NT ¢ 1;
,PATC(NT ¢ 2;
_PATT(NT ¢ 3;

end;

15587 ;

15590 :

'LOAD NIBBLES IN WORD WITH REPEATING COUNT OF 0-63

7527

7528

7553
7555

7557

7559
7560

7562
7564

COUNTS OF 0-63

(10BUF [.WRDTCNT))<12, 4> = PAT_(NT ¢ &;
'"LOAD FORTH NIBBLE IN WORD
WRD_CNT = WRE_(NT + 1;
'INCREMENT TO NEXT WORD

7552

15588 ;

_LOAD 64 WORDS WITH REPEATING

1ncerA[_CNT from -1 to 11 by & do

7522
7523

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4L.BLI.2 (76)

= ZERO;

15585 ;

15586 ;

SEQ 0318

incr PAT_CNT from -1 to 11 by & do
begin

IN 10_8BUF

'READ REPEATING COUNTS OF 0-63

POS_EXP = ZERO;

'FIELD SELECTOR SELECTS THE FOUR NIBBLES

TEMP = ,10_BUF [.WRD_CNT];

'GET A WORD OUT OF

incr CNT from 0 to 3 do

'READ THE FOUR NIBBLES IN WORD

PATTINC = ONE;

begin

10_BUF

.SIZ_EXP> neq (.PAT_(NT ¢ _PAT_INC)

' COMPARE NIBBLE WITH RESPECTIVE 0 =63 (NI
'ERROR AND SET DODU_FLG IF NEQ

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

PAGE 316

15599 ;ML4

15603 ;
15604

22-0ct-1980 10:45:32
7565

ERRDF

7567

DODU_FLG = ONE;

7566

15605 ;
15606

7568
7569

15608 ;

1434

15607

15609
15610
15611
15612
15613
15614
15615

;
;
;
;
;
;
;

15616 ;

15617
15618
15619
15620
15621
15622
15623
15627

;
;
;
;
;

POS_EXP =

7572
7573
7574
7575
7576
7577
7578

end;

WRD_CNT =
end;

127044

15633 055020

152777

000040

134712

042705
142777
150577

177770
000007
134670

134674

15634 055026

15638 055050
15639 055054
15640 055060
15641 055062
15642 055066
15643 055072
15644 055074

15645 055100
15646 055102

15647 055104
15648 055110
15649 055114

15650 055116

15651 055120
15652 055124

016705

005066
005066
005002
012703
016604
006304
062704

010305

005205

then

¢ 1;

'POINT

TO THE NEXT NIBBLE

_INCREMENT THE 0-63 COUNT
.GET THE NEXT

IN WORD

[0_BUF WORD

.DROP THIS UNIT

LODU_FLG SET

begin
DODU (.ML_LUN);
DOCLN;
end;

300012

135136

$734:

177777
000002
010342

177760
000017

062705
006305

000002

JSR

1%:
2%:

R1,$SAVES

;

7459

#40,aML.REG+40

;

7509

10(SP)
2(SP)
R2
#-1,R3
2(SP) R4

;
;
;
;¢
;

R3,RS

; PAT.CNT,s

SUB

#12,5P

MOV
BI(
BICB
BISB

ML.DUT,RS
#177770,RS
#7,3ML.REG+40
RS,aML.REG+40

ASL
ADD

R4
#10.BUF ,R&

BISB

000010
000002

042705
142714
150514

010305

.WRD_CNT

.DODU_FLG 1S_SET

004167

15635 055032
15636 055036
15637 055044

.POS_EXP ¢ &;

ENDSUB:

15631 155010

162706

(89, ARR DAT, 0);

PATCINC = .PATTINC ¢ 1;

ENDTST;

15632 055014

PA:<NEALE>BLZ2ML4.BLI.2 (76)

end;

7570

7579

T0PS=20 Bliss=16 V2(206)

PRINTB (Six_FMT, FNC_18, WwRD_50, WRD_10, WRD_12, FNC_6, WRD_19);

7580
7581
7582
7583
7584
7585
7586

;

SEQ 0319
22-0ct=1980 10:47:44

}2289 ;
15602 :

CLR
CLR
CLR
MOV
MOV

MOV
INC

BIC
BICB
BISB

MOV
ADD
ASL

#177760,RS
#17,(R4)
RS, (R&)

R3,RS

#2 RS
RS

DODU.FLG
WRD.CNT
COUNI
,PAT (NT
WRD.CNT,+

; PAT_CNT,e

7512
7513
7515
7517
7519

7520

CIMLAAOD ML-11 LOGIC TEST
15654
15655
15656
15657 0
15658 0
15659 0

15660 0
15661 0

TEST

SECTION

23-0(T-80 09:11

PAGE 317

9
SEQ 0320

22-0ct=-1980 10:47:44
22-0ct-1980 10:45:%2

JMLG
OV
S £ B
NN
OSSOSO
NOoOo

HARDWARD

MACRO M1113

15662 0
15663 0
15664 0
15665 0
15666 0
15667 0
15668 0
15669 0
15670 055172
15671 055176
15672 055200
15673 055202
15674 055204
15675 055206
15676 055210
15677 055214
15678 055220
15679 055222
15680 055226
15681 055232
15682 055236

15683 055240
15684 055242
15685 055246

15086 055250
15687 055254
15688 055262
15689 055266
15690 055270
15691 055272
15692 055274
15693 055276
15694 055300
15695 055304
15696 055306
15697 055312

15698 055314

006305
006305
006305
042705

142714
150514

010305
062705
000305
042705
042714
050514
010305
062705
000305
006305
006305
006305
006305
042705
042714
050514
005266
062703
020327
003713
005202
020227
003705
004767
012777

105777
100375
104402

005003
010304
006304
005064
005203
020327
003770
152777
016704
042704

142777
150477

004767
012777

105777
100375
152777

016704

ASL
ASL
ASL

177617

8I(C
81(8
B1SB

000360

MOV
ADD

000003

SWAB
BI(C
BIC
BIS

170377

007400

MOV
ADD

000004

SWAB

ASL
ASL
ASL
ASL

007777

8IC
BIC
BIS
INC

170000

000002
000004
000013

ADD

cMP
BLE
INC

000077
135266

000061

134462

CMP

136416

BLE
JSR

1%
4%

5%:

010342

000377
000040
134642

134416

000007

134400

177770
134374
135172

00007

134366

000040
134572

134322

134346

MOV

1ST8
BPL

¥4 RS
RS
RS
RS
RS
RS
#7777 ,RS
#170000, (R&)
RS, (R&4)

2(SP)

#4,R3
R3,#13

2%
R2
R2,#77

1%
PC,GD.BLK.XFER
#61,3ML.REG

CLR

MoV
ASL
CLR
INC
(MP

MOV

BIC
BI(B
B1S8
JSR

MOV
1ST8

BPL
8158
MOv

;

PAT_(NT,»

7521

;

PAT.(NT,»

7522

;
;
;

WRD.CNT
v, PAT (NT
PAT.(NT,»

7523
7517

. COUNT
;

COUNT,«

7526
7527
7531

aML .REG+50

TRAP

BLE
BISB

6%:

RS
RS
RS
#177417
RS
#360, (RG)
RS, (RG)
R3,RS
#3,RS
RS
#170377 ,R5
#7400, (R4)
RS, (R&)
R3,RS

l%.BUF(R&)

&3,4377

240,aML
. REG+40
ML.DUT,R&

TOPS
PA:<

;
;

10.CNT
JO.CNT
,»

7535
7536

.,
:

10.CNT
10.ONT,»

7535

7536

$177776.R4

#7,3ML .REG+40

RG . @ML .REG*40

PC GD.BLK.XFER
274
.M .REG

ML .REG*+S0

6%
240,aML .REG+40
ML.DUT,RG

7539
7540
7544

CZMLAAD ML-11 LOGIC

SECTION

05537¢
055402

055410
055414
055422

055426
055430
055434
055436
055442
055446

055450
055456

055460

ORI
— — —

055464
055466
055472
055474

042704

162777
150477

012766
005066
005001
012703
005005
012716
016604
006304
016466
005002
016646
010546
016646
005046
0046767
062706

010304
061604
020004
001433

PAGE 318

9
SEQ 0321
4 7:44

000007
134324
000004
000002

000006

8. 6(SP)

000001
000002

000000

012746
012746
012746
012746

000004

9%:

000012

e
D

020127
003671
104467

,
- ($P)
RS
12(sP),-(SP)

TRAP

.WORD
.WORD
.WORD
MOV

005760
005740
006400
007216
005432
000007

000077

000070
10%:

10.BUF (R&),4(SP)

MOV

ADD
MOV
ADD

006040
007030

CMP
BEQ

000002
000004
000013

2, (SP)

* PAT.CNT
POS.EXP
* PAT
. INC

MOV
CLR

CLR
JSR

125260
000010

000003

2($P)

2(SP) R4

000004

MOV
MOV
MoV
MOV
MoV
MoV
MOV
MOV
TRAP
MOV
ADD
ADD

INC
INC
CMP
BLE
INC
ADD

CMP
BLE
INC
CMP
BLE

TRAP

*,SIZ.EXP

. CNT
WRD

R1
#-1,R3
RS

7%:
8%:

000131
007534

055636
055640
055644
055646

134330

177777

010342

4 5:32

2177770,
R4
#7,3ML .REG+40
R& . aML .REG*40

104455

5755 055612
5756 055616
5757 055620
5758 055624
5759 055630
5 760 055634

b eb e o

177770

000001
000020
000004

5 761
5 762
5 763
5 764

23-0CT-80 09:11

JMLé

b D o

D D i o e

D d el e

e o

d e

e o e

d d e

D D D eV D d i

D e

D B D S b D ad DD DD Db

VIV
AW
AT
A
AN AN
A A AN
AN N NN NN NNV N
SNNNNNNNNNNNNNNNNNSNNNNSNNNNN SNSNSNSNSNSNSNSNSNIN ~

BB BB
2 B
AN NN N
N NN AN N N PO N PO NI NN N PN D b ed ed od o D 2 a —a
~NO N W) = o
NOWVMSB NN 2O VOO VNS WN =20 000NNV oy OO0

HARDWARD TEST

MACRO M1113

TEST

4(SP),=(SP)

-(SP)

PC,BLSGTY
#10,SP
R3,R&
(SP) ,R&
RO,R&

COUNT

¢«
WRD.CNT,
+ , TEMP

CNT

TEMP,*
POS.EXP,
+

TOPS

PA:<

7547
7548
7550
7552
7554
7555
756

7558
7561

SIZ.EXP,*

PAT.CNT,»
PAT.INC,*

10%

55
131

7565

FWRD.19,-(SP)

7566

GRR.DAT

#ENC.6,=(SP)

#WRD.12,-(SP)

#WRD.10.-(SP)
#WRD.50,-(SP)
#FNC.18,-(SP)

¥SIX.FMT,-(SP)

#7,-(SP)

SP RO

14
21,30(5P)

5P
#20,
#4 ,RS
(SP)
R2

R2.#3
9%
2(SP)

SP,t

*,DODU.FLG
+ ,POS.EXP
PAT. INC

(NT
CNT ,»

7567
7564
7570
5N
7558

WRD.CNT
* PAT (NT
PAT.(NT,»

7574
7552

COUNT
,»
COUNT

7550
7575

MACRO M1113

L 0GIC 1 EST
HARDWARD TEST S ECTI ON
CZMLAAD ML-11

19766
15767
15768
15769 055650
15770 055652
15771 055654
15772 055662
15773 055664
15774 055670
15775 055672
15776 055674
15777 055700
15778
15779
15780
15785
15786
15790
15794 055702
15795 055702
15796 055706
15797 055710
15798 055712
15799 055714
15800
15801
15802
15807
15808
15809 ;

23-0(T-80 09:11

K
9
PAGE 319

SEQ 0322
TOPS

JMLé
006000
103606
026627
001004
016700
104451
1046444

062706
000207

000010

ROR
BLO

000001

CMpP
BNE
MOV

134276

000012

PA:<

11%:

TRAP
TRAP
ADD
RTS

: Routine Size:
;

004767

104466

177102

JSR

TRAP

ROR
8LO

103773

000207

RTS

: Routine Size:

;

7587

' <BLF/PAGE>

Maximum stack

;

[

DODU.FLG,

7579

ML.LUN,RO

7582

Lé
#12,SP
PC

7459

221 words

Maximum stack depth per

134::
1%:

006000

RO
3
10(5P),
0N
11%

invocation:

19 words

7584

PC,8734
66
RO
1%
PC

6 wcrds

depth per

invocation:

0 words

CZMLAAD ML-11 LOGIC

L9
PAGE 320

N
P
TN
TR
IR
TR
R
Y
R
S
S
I
I
R
WA
TP
W
LIS

SEQ 0323
TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML&4.BLL.2 (77)

7588

e Be Do Be o BoBe Vs B0 8aVy Te e Ve Bo®aWe®o Ve ®o 0o s To 95 05 0, 0,

15865

SECTION

23-0(T-80 09:17

JMLG

[o Lo To o -To To Jo -To -Jo Yo To ]

HARDWARD TEST

MACRO M1113

TEST

7589
7590
7591
759¢
7593
7594
7595
7596
7597
7598
7599
7600
7601
7602
7603

BGNTST;
lee

TEST NUMBER:

TST 35

TEST NAME:

SYNC DATA BUS BIT UNIQUENESS TEST/WRITE PATH

TEST DESCRIPTION:

TEST SYNCHRONOUS DATA BUS FOR
DATA BIT UNIQUENESS BY:
1.

7627
7628
7629
7630
7631
7632
7633
7634
7635
7636
7637
7638
7639

THE

10 BUF

WITH A SHIFTING

JERO IR A FIELD OF ONES PATTERN.

7604
7605
7606
7607
7608
7609
7610
7611
7612
7613

7614
7615
7616
7617
7618
7619
7620
7621
7622
7623
7624
7625
7626

LOADING THE FIRST 16 WORDS IN

VIA MBUS WRITE FUNCTION WRITE
SHIFTING PATTERN THROUGH THE
DATA BUS AND INTO THE GOOD

8LOCK.

VIA DAT DM MODE READ THE

GOOD BLOCK AND SAVE ALL GOOD

NIBBLE DATA,

SEQUENCE,

STRUCTURE.

IN THEIR PROPER

INTO A STACK

INTERRIGATE STACK STRUCTURE FOR
SHIFTED DATA PATTERN.

IMPLICIT INPUTS:
PD TEMP

A BIT VECTOR OF 16 BITS WHERE
THE READ PROM DATA IS STORED
AND ACCESSED FROM.

GLOBAL OWN LOCATION TO THIS
TST.

10 BUF

JECTOR OF 256 WORDS WHERE
DATA FOR MBUS READS AND WRITE
A

FUNCTION ARE FOUND.

A GLOBAL OWN LOCATION TO
THIS TEST.
STACK

MACRO M1113

CIMLAAD ML-11 L 0GIC TEST
HARDWARD TEST S ECTION
15867
15868
15869
15870
15871
15872
15873
15874
15875
15876
15877
15878
15879
15880
15881
15882
15883
15884
15885
15886
15887
15888
15889
15890

23-0(T-80 09:11

mno
PAGE 321

SEQ 0324

ct=1980 10:47:44
ct=1980 10:45:32

JMLG
;

[
J

.
;
;
.
;
.
.
;

[

’

[J
[J
[4
[

[

[
[

.
;
;

[

[
[

;

.
.

[
[

[
[
[4

[4
[
.

[
L[4
L]

.
[4
e
[
.

[J
[
[
[
.
[4
[
4
[
[
[

[J
[

[4
[
*
[
[

7640
7641
7642
7643
7644
7645
7646
7647
7648
7649

7650
7651

!
!
!
!
!
!
'--

A VECTOR OF 198 BYTE LOCATIONS
WHERE GOOD NIBBLE DATA IS STORED
WHEN STRIPPING AWAY BAD NIBBLE
LOCATIONS OF A BLOCK.

Local
SAV _NIB,

!STORES THE SHIFTED BIT PATTERN
'DROP UNIT FLAG
'NIBBLE PATTERN
'TEST PATTERN
'HOW MANY '17' NIBBLE FATTERN POSITION TO READ
'HOW MANY ‘17°' NIBBLE PATTERN POSITION TU READ
!STACK POINTER

0000 FLG,
NIB_BIT,

7652
7653
7654
7655

TST_PAT,
ALL_ONES_1,
ALLZONES_2,
STK PTR,

7656

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZMLAL.BLI.2 (77)

COUNT;

' COUNTER

7657
7658
7659

BGNSUB;
CLR_MBUS;

7661

TST_PAT = ONE;

'ONE

incr CNT from 0 to 15 do
begin
10 BUF [.CNT) = not ,TST_PAT;

'WRITE 16 WORDS WITH SHIFTING O IN FIELD OF

7660
7662
7663
7664

7665

7666

7667
7668
7669

7670
7671
7672
7673
7674
7675

7676
7677
7678
7679
7680
7681

7682

7683
7684
7685
7686
7687

7688
7689

7690
7691

DODU FLG = ZERO;

IN A FIELD OF

ZEROES

TST_PAT = .TST_PATAONE;

end;

MLTSY = write;

'SET UP A GOOD BLOCK XFERR
'WRITE SHIFTING PATTERN THROUGH SYNC BUS

'DELAY UNTIL

GD_BLK_XFER

0
until

.DRY

();

IS_SET;

1incr CNT from 0 to 8 do
STK_OFF [.CNT] = ZEROES:
(LR_MBUS;
STKPIR = -1;
DAT DM_XFER ();

'ZERO OUT THE NIBBLE OFFSET COUNTERS

'RESET THE STACK POINIER
!SET UP A DATA DIAG XFERR AT
‘DO A READ FUNCTION

MLCS1 = read;
DELAY

XFER TO COMPLETE

THE GOOD BLOCK

(ONE_US);

incr (NI from 0 to 21
begin
PD _TEMP = _MLPD;

DAY CLK = ONE;
DELAY (ONE_US);
RD_LNG_WRD;

'LOAD THE STACK WITH ALL GOOD NIBBLE DATA
'GET THE FTMOM DATA
!CLOCK OUT THE DATA WORD
'READ THE DATA DIAG REGISTERS

1'S,

CIMLAAD ML-11 LOGIC

HARDWARD

TEST

T EST

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

N
9
322

15923 :ML4

22-0ct=1980 10:47:44

}gg%g :
15926 :
15927 ;

7692
7693

incr NIB_PTR frem O to 8 do
begin

;ggg

15930 ;
15931 ;
15932 ;

7696
7697
7698

15934
15935
15936
15937
15938
15939
15940
15941
15942
}ggzz

;
;
:
:

7700
7701
7702
7702
7704
7705
7706
7707
7708
;;?8

STK_PTIR = -1;
NIB BIT = ONE,
ALL_ONES_1 = ZERO;
ALL_ONES 2 = 3;

15945

;

7711

incr BY_FOUR_WRDS

;
.
.

7699

15946 ;

7712

15949 ;

7715

15947 ;
15948 ;
1595G ;
15951 ;

15952
15953 .
15954
15955
15956
15957
15958
15959
15960
15961

15962
15963
15964
15965
15966
15967
15968

:
;
;
;
;
;
:

;
:
;
:
:
:
:

}gggg ;

15971
15972
15973
15974
15975

;
;
;
;
:

15976 :
15977 ;

TOPS=20 Bliss=16 V2(206)

22-0ct=-1980 10:45:32

}gg%g :

15933 .

SEQ 0325

7713
7714
7716
7717

7718
7719

7720
7721
7722
7723
7724
7725
7726
7727

7728
7729

PA:<NEALE>BL2ML4.BLI.2 (77)

'LOOK AT 9 NIBBLES

STK_PTR = _STK_PTR ¢ 1;

.INCREMENT THE STACK POINTER

it .PD_TEMP [.NIB_PTR]) [S_SET
then
STK_OFF [.NIB_PTR] = ,STK_OFF

'SEE

else

LOAD_STACK

(.STK_PTR,

[.NIB_PTR]

.NIB_PTR);

THIS

IS A GOOD NIBBLE

¢+ 9

' INCREMENT NIBBLE OFF

SET

'"ELSE LOAD THE

STACK WITH GOOD NIBBLE

DATA

end;
end;

begin

'RESET THE STACK POINTER
'SHIFTING NIBBLE PAT OF 1 [N FIELD OF 0'S
'READ NO '17' NIBBLE PATTERN ON FIRST PASS
'READ THREE '17°' NIBBLE PATTERN ON FIRST PASS
from 0 to 3 do

incr BY_ONE_WRD

begin
COUNT

from 0 to 3 do

= ZERO;

until .COUNT eql
begin

'READ 4 GROUPS OF

« WORDS

'READ & GROUPS OF

WORD

'CLEAR COUNT

.ALL_ONES_1

COUNT = _COUNT + 1;
STK_PTR = ,STK_PTR +

'READ X NUMBER OF

'17'

NIBBLE PAT

'INCREMENT COUNT
' INCREMENT STACK POINTER

it (.stack [.STK_PTR]) neq %X0'000017'
'COMPARE STACK WITH '17°
then
begin
'ERROR AND SET DODU_FLG [F NEQ
ERRDF (90, SYNC, 0);
PRINTB (SIX FMT. WRD _23, WRD_39, PHR 4, WRD 12, FNC_5, WRD_19);

PRINTB (FMTTS, ONES, .stack [.SiK _FTR1,
DODU_FLG
= ONE;

.STK_ PTR)
;

7730
7731
7732
7733
7734

STK_PTR =

7737
7738
7739
7740
7741

if (.stack [.STK_PTR]) neq (.SAV_NIB)
'COMPARE STACK TO SHIFTED BIT
then
begin
'ERROR AND SET DODU_FLG IF NEQ
ERRDF (91, SYN(C, 0):
PRINTB (Slx FMT. WRD _23, WRD_39, PHR_4, WRD_12, FNC_S, WRD_19);

;;gg

7742
7743

end;

SAV_NIB =

,STK_PTR + 1;

' INCREMENT

( not .NIB BIT) and (Xo0'000017*);

PRINTE (FMTZ15, .STK “PIR);
PRINTB (FMTZS, .SAV_RIB, .stack [.STK_PTR]);

THE

STACK POINTER

'GENERATE THE SHMIFTED BIY

8AD

.
.

R
TN
T
T
TR
TR
IR
I ETR
TR
P
I
AyS
T
A
ALW
W
R
DR
TR

AN od e

d ed e

OO0
~NO NN

oo
[elelelelelelale)

SEQ 0326

0:47:44

0:645:32
77464

7746

7747
7748
7749
7750
7751
7752
7753
7754
7755
7756
7757
7758
7759
7760
7761
7762
7763
7764
7765
7766
7767
7768
7769
7770

COUNT = ZEROES;

untit .COUNT eql
egin

COUNT =

.ALL_ONES_2 do

,STK_PTR

_READ X NUMBER OF

'17' NIBBLE PAT

' INCREMENT COUNT

i; (.stack [.STK_PTR))
then

'INCREMENT

neq %0'000017°

STACK POINTER

'COMPARE STACK POINTER WITH

*17'

begin
'ERROR AND SET DODU_FLG IF SET
ERRDF (92, SYNC, 0);
PRINTB (SIX_FMT, WRD_23, WRD_39, PHR 4, WRD 12, FNC_5, WRD_19);

PRINTB (FMTTS, ONES, .stack [.STk_PTR],
DODU_FLG = DONE;

.STK_PTR);

end;
end;

ng_exr

_NIB_BIT*ONE;

'SHIFT

THE

SMIFTED NIBBLE BIT

'RESET

THE

SHIFTED NIBBLE BIT

end,

NIB_BIT

= ONE;

ALL_ONES_1 = .ALL_ONES_1 + 1;
ALL_ONES_2 = .ALL_ONES_2 - 1;
end;

ENDSUB;

0046167
162706

126136
000016

016705

.CLEAR COUNT

_COUNT + 1;

STK_PTR =

7773
7774
7775
7776
7777
7778
7779
7780
7781
7782

104402
152777

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZML&L.BLI.2 (77)

DODU_FLG = ONE;
end;

7745

[444

024

PAGE

;

7772
16012

23-0CT-80 09:11

HL Y

15979
15980
15981
15982
15983
15984

MACRO M1113

SECTION

CIMLAAO ML-11 LOGIC TEST

HARDWARD TEST

it .DODU_FLG IS_SET
then
begin
pODU (.ML_LUN);
DOCLN;
end;

'READ ONE MORE
'READ ONE LESS

°'17' PATTERN
"17° PATTERN

.DROP THIS UNIT

DODU_FLG SET

ENDTST;

000040

134226

$135:

134002

1$:

J°R
SUB
TRAP

R1,$5AVES
#16,5p

MOV

ML.DUT,R5

BISB

#40,aML . REG+40

7586

;

7656
7658

MACRO M1113 23-0CT-80 09:11 PAGE gZ&

CIMLAAD ML-11 L OGIC TEST
HARDWARD TEST S ECTION
16034
16035
16036
16037
16038
16039
16040
16041
16042
16043
16044
16045
16046

JMLé
0
0
0
055760
055772
056004

16047
16048 0€6014
16049 056016
16050 056022
16051

16052
16053 056036
16054
16055
16056 056046
16057 056052
16058 056054
16059 056060
16060 056062
16061 056070
16062 056074
16063 056100
16064 056106
16065 056112
16066 056116
16067 056122
16068 056130
16069 056134
16070 056136
16071 056142
16072 056144
16073 056150
16074 056152
16075 056154
16076 056156
16077 056160
16078 056162
16079 056170

16080 056176

16081
16082
16083
16084
16085
16086
16087
16088

SEQ 0327

056202
056204
056210
056212
056216
056220
056222
056224

042705

142777
150577
005016
012766

005004
010405
006305
016665
005165
006366
005204
020427
0037¢3
004767
012777
105777
100375
005005
105065

005205
020527
003772

177770
00000~
133760

133764

000001

000010

000010
010342
000010

R4 ,RS
RS
10(SP),10.BU
(RS)
F

010342

10.BUF (RS)

10(SP)

R&
R4, 417

000017
134512
000061
133706

123642

011342

162777
150577

000007
133626
177777

133632

134074
177770

134504
000071
000001
123754

000014

133742
000020

000001

123706

000014

* TST,.PAT

CNT
¢
CNT,

3%:

TST.PAT

CNT
CNT,»

43
#40,aML .REG+40

7666
7663
7669
7670
7674

gzL.REG*SO

RS
STK.OFF (RS)
RS
RS,#10

7660
7661
7€63
7665

TST.PAT
¢

#61,aML.REG

000010
133650

DODU.FLG

PC,GD.BLK.XFER

4%:

000040

012702
004767
012777
012704
001411
016705
001404
005066
005305
001374
005304
000766
005003
017767
152777
012704
001411
016705
001404
005066
005305
001374
005304
000766

#177770,R5
#7,3ML .REG+40
RS ,3ML.REG+40
(SP)
#1,10(sP)

2s:

152777
016705

042705

T0PS

PA:<

CNT

«(CNT)

(NT
¢
INT

7676
7677
7676
7677

ML.DUT,RS

#177770,
RS

#7,aML.REG+40
RS,aML .REG+40

133550

5¢:

MOV

BEQ

#-1,R2
PC,DAT.DM.XFER
#71,aML.REG
#1,R4

8%
L$DLY,RS

+,STK.PTR

v, $8TMP2
+,$3TMP1

69%:

; $STMP
: $8TMPY

7%:

$$TMP?

8%:
9%:
:
108
11%:

12%:

B1SB

ML .REG+230,PD.TEMP
#20,38ML.REG+120
¥ ,R4
13¢

LSOLY,RS

12%
14 (SP)
RS
1%
R4
108

7680
7681
7682
7683

CNT

*,38TMP?

*,$8TMP1

; SSTMP
: $8TMPI

; $8TMP?

7685
7687
7688
7689

CZMLAAD ML-11

HARDWARD

TEST

ooooooooooo0rOrOrONOOOAONOOOOCOOOO
—t e
D e nd D e
— D el d e D D D ) D e d el D
WWNNMNIMNMNONONIMNONIMNIN
= b b b P d s =2 0 2 OO O
S OOV NO VNN
OOV NOWNESWN =200V~

16090
16091
16092
16093 056226
16094 056234
16095
16096
16097
16098

LOGIC

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

D_10

PAGE 325

SEQ 0328
0:47:44
0:45:32

JMLé
017767
017767
017767
005005
005202
010504
006204
006204
00€204
062704
010446
010546
042716
012746
005046
004767
062706
005300
001010
005004
156504
062704
110465

000405
010246
010546

004767

022626
005205
020527
003733
005203
020327
003673
012702
012766
005066
012766
005004
005005
005001
020166
001456
005201
005202
126227

001767

131460
131454
13

MOv

R4
R4
R4
#PD.TEMP
R4
R&,=(SP)

011662

RS ,=-(SP)

$177770, (5P)

177770

000001

NIB.PTR,*

;

7692
7694
7696

NIB.PTR,»

PC,BLSGT2

#10,5P
RO
15%
R4

011342
000011
011342

,R4
STK.OFF(RS)

. «(NIB.PTR),*

R4 ,STK.OFE(RS)

+,*(NIB.PTK)

#11.R4

16%
R2,-(SP)
RS,=-(SP)
PC,LOAD.STA(XK
(SP)+,(SP)+
RS
RS, #10
14$

15%:

133620
16%:

000010

CNT
¢
CN,T

7685

6(SP)

*,STK.PTR
* NIB.BIT
ALL .ONES.1

* ,ALL .ONES.?2

R1,6(SP)

BY.FOUR.WRDS
BY.ONE .WRD
COUNT
COUNT ,ALL.ONES. I

7706
7707
7708
7709
7N
7714
7716
7718

COUNT
STK.PTR
)
*(STK.PTR,»

7720
1721
7723

#3,4(SP)

000004
17$:
19%:

000006

000017

cMP

BEQ

(MPB

BEQ

TRAP

.WORD
.WORD
.WORD

MoV

¢
NIB.PTR,

7696
7700

7692

#1,2(SP)

000002

STK.PTR,

7698

NIB.PTR
NIB.PTR,+

R3
R3,#25
9%
#-1,R2

000025

006040

STK.PTR

-(SP)

000010

011354

NIB.PTR

#1,-(SP)

124570

177777
000001
000006
000003

aML.REG*170,01.TEMP
ML .REG+200,02.TEMP
TEMP
ML .REG+160,E2.

RS
R2
RS ,R4

164%:

106455

000132
007500
000000
012746

138.

TOPS
<
PA:

20%

R1
R2

STACK(R2),M7
19%

132
SYNC
0
#WRD .19, -(SP)

1726

r7e?

CZMLAAD ML-11

TEST

MACRO M1113

TEST

SECTION

SEQ 0329
22-0ct-19 80 10: L7:44
22-0ct=19 80 10::45:32

004366
000004
000001

000030
000017
000002

011354
000012

000030

000012
000012

20$%:

BR
INC
MOV
BIC
CLR
BI1S8
cmp
BEQ
TRAP

006040
007020
005760
006630
006250
006076
005432
000007

005106
000002

011354
000036
004366
000003

.WORD
.WORD
.WORD

SP RO

14
R2, (SP)

STK.PTIR,*

,
(SP)
STACK(R2)

*(STK.PTR)
,»

SP RO

SP,*

- ($P)

¥-1.-(SP)
#E
.S,
MT
- (SP)
06 ,-(SP)

14
#1,30(5P)
#30.5P

*,DODU.FLG
STK.PTR
¢,SAV.NIB

NIB.BIT,SAV.NIB
*(STK.PTR,)¢
+,SAV.NIB

MOVB
MoV
MoV
MOV
MOV
TRAP
MOV
ADD

177777

#SIX_FMT,-(SP)

#7,-(SP)

—_

011354

#WRD.23.-(SP)

= (NN~

CLR

#WRD.3%,-(sP)

216

#WRD.12,-(SP)

#PHR .4, = (SP)

7729
7725
7718
7734
7735

7737

7741

MOV
MOV
MOV
MOV
MOV
MoV
MOV
MOV
MoV
TRAP
MOV
MOV
Mov
MOV
TRAP

#WRD.19,-(SP)
#ENC.S,=<(SP)

Move
MOV
MOV
MOv
MoV

(SP)
STACK(R2),
= (SP)
36(SP),

SAV.NIB,*

SP.RO

SP,¢

CLR

7728

7740

005432
0C0007

NENC.S,-(SP)

€

MoV
MOV
MoV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV

ZWN

007020
005760
006630
006250
006076

TOPS
PA:<

7466

SO NNNNNN
-85
sooocrOrOrOn

(e delel
lelalelelalelels)
prQiFe - ur Y P
Purur G Gur Sur
ey

o wn Nt [V IV IV, TV TV IV, IV IV, PV W 3
[e 22X
F
3V - (=¥ oo N NN
-2 OO0

O 00000OC00C00000
NN~ N~
OB NO NS WA 2O 000 ~JO N

D o
e

) wd
el
i

D e
i

e
D

i
i
el

il e
—

D e
d
d e

—

d
—

oo~

d d
D od

i o
e
-l
i

D nd D e

il
i
D
)

d el e
e

i
i e

) il
D nd

—

D e

oooororOrOrOFOFOFONONOOONONONOM

D d i ad o
e

056464

056470
056474
056500
056504
056510
056514
056520
056522
056524
056526
056530
056534
056540
056544
056550
056552
056554
056562
056566
056570
056572
056600
056606
056610
174 056614
056620
056622
056624
056626
056630
056632
056636
056642
056646
056652
056656
056662
056666
056672
056674
190 056676
056790
056704
056710
056712
056714
6196 056716
6197 056722
6198 056726
6199 056732
6200 056736
ki = —_ —

oo (o Yo Yo Yo Yo Yo Yo Yo Yo Yo Yo i

6147

d ol o

£ 10

PAGE 326

JMLG

16146

—

23-0CT-80 09:11

OW =NV
DN

HARDWARD

LOGIC

#WRD
.17 ,-(SP)
#PHR
.«

,~(SP)

#WRD.39,-(SP)
#WRD .23, -(SP)

#SIX_FMT,=(SP)

#7,-(SP)

SP.RO

14
R2, (SP)
#EMT.15,-(SP)
#2,-(SP)
SP.RO
14
(SP)

2EMT.S.-(SP)
#3,-(SP)

SP,
¢

STK.PIR,»

nee

SP,¢
)
*(STK.PTR,¢

1743

CIMLAAQD ML=-11 LOGIC

HARDWARD TEST

T1EST

MACRO M1113

SECTION

16202

23-0(T-80 09:11

F 10
PAGE 327

SEQ 0330

;MLG

}g%gz

22-0ct=1980 10:47:44

;

16205 056740
16206 056742

104414
012766

16208 056754
16209 056756

005001
020166

16207 056750
16210 056762

062706

001456

16211 056764
16212 056766
16213 056770

005201
005202
12622

16215 057000

104455

16214 056776

001767

16216 057002
16217 057004
16218 057006

000134
007500
000000

16221 057020

012746

16219 C57010
16220 057014
16222 057024

16223 057030
16224 057034

16253 057174
16254 057176
16255 057200

16256 057204

7744

CLR
CMP

R
R1,4(SP)

.
*

COUNT
COUNT,ALL.ONES.2

7747
7749

COUNT
STK.PTR
*(STK,PTIR),*

BEQ

TRAP

;

7757

#WRD.19,-(SP)
#FNC.S,=(SP)

;

7758

134
SYNC
0

MOV

#WRD.18,-(SP)

MOV

0056432
000007

MOV
MOV
MOV
TRAP

MOV

010216

MOV
011354
177777
004366
000004

012766
062706
000717
006366
005205

000001
000030

012766
005266
005366
005204

000001
000006
000004

000002

020527
003002
000167

000003

020427

000003

003002
000167

104467

006000
103002
000167

021627

000030

177264

177230

176522

000001

23%:

000002

24%:

26%:

#WRD.39,-(SP)
#WRD .23, -(SP)

#SIX.FMT,=(SP)
#7.-(SP)
SP.RC
14

R2, (SP)

-($P)
STACK(R2),(SP)
#-1,-(SP)
#EMT.S,
- (SP)
#4,-(SP)
SP.RO
14

(MP
BGT
JMP

RS,#3
248
18%

MOV
ADD
BR
ASL
INC

MOV
INC
DEC
INC

;

STKL.PTR,»

;

v(STK.PIR),«

SP,e

7759

: +,DODU.FLG
:
:
. NIB.BIT
. BY.ONE.WRD

7760
7756
7749
7765
7714

#1,2(5P)
6(SP)
4(SP)
R4

;
:
:
.

7768
7769
7770
1248

;

mmn

(SP),#1

: DODU.FLG,+

775

RG 83
25%
17¢

ROR
BHIS
JMP

RO
268
1%

(MP

#1,30(5P)
#30,5p
22%
2(SP)
RS

BGT
JMP

TRAP

7791
7752
7754

#PHR .4, = (SP)

CLR
MOVB
MOV
MOV
MOV
MOV
TRAP

(MP

258

228

LWORD
WORD
WORD

006250

006076

7739

:
L
;

012746

23%

R1
R2
STACK(R2),#17

BEO

005760

#30,5p

INC
INC
(MPB

MOV

005046
116216
012746
012746
012746
010600
104414

16252 057172

000017

*+,DODU.FLG

006630

057056
057060
057064
057070
057074
057100
057102

16249 057160
16250 057164
16251 057166

011354

;

ADD

012746

16230
16231
16232
16233
16¢34
16235
16236

16245 057140
16246 057146
162647 057152
16248 057156

000004

14
#1,32(5P)

MOV
MOV

012746
012746
010600
104414

16242 057126
16243 057132
16264 057134

218
228

TOPS

PA:<

TRAP
MCV

006040
007020

057040
057044
057050
057052

16237 057104
16238 057112
16239 057116
16240 057120
16241 057124

000032

012746
012746

16225
16226
16227
16228

16229 057054

000007

22-0ct=1980 10:45:32

. BY.ONE.WRD,*

+,NIB.BIT
ALL.ONES.1
ALL.ONES.?
BY.FOUR.WRDS

; BY.FOUR.WRDS,*

)

CIMLAAD ML-11 LOGIC 1C

HARDWARD

TEST

SECT]
ECTION

EST

MACRO M1113 23-0(T-80 09:11 PAGE §28

16258
16259

ML
:

16260

16261 057210

001004

16263 057216
16264 057220

104451
104444

16262 057212

16265 057222

16266 057226
16267

016700

132759

062706

000016

(000207

16268

162764
16275
16279
16283 057230

16284 057230

16289
16290

057234
057236
057240
057242

27%:

278

004767

104466
006000
103773
000207

176462

ML.LUN,RO

;

7778

ADD

#16,SP

;

7586

;

7780

TRAP
TRAP

RTS

Routine Size:

135::

1%:

51
44
PC

357 words

JSR

TRA"
ROR
BLO
RTS

Routine Size:

!<BLF/PAGE>

26 wcrds

PC,8735
66
RC
1%
PC

6 words

; Maximum stack depth per invocation:
7783

TOPS
PA:<

MOV

; Maximum stack depth per inyocation:

16291

16296
16297
16298 ;

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:%2
BNE

;

16269

16285
16286
16287
16288

SEQ 0331

0 words

CITM AAD ML-11

HARDWARD

TEST

16300 JMLG
16301 ;
16302
16303
16304

NO N

W) —

N N AN AN N N AN AN AN N

®e

BNy

e B.

0.0, 0,

®e

[, JE R

d e
D
o
e
b

ooocoorccOrOrO
O

16305
16306
16307

LOGIC

MACRO M1113

TEST

SECTION

23-0(T-80 09:11

H 10
PAGE 329

SEQ 0332

22-0ct=1980 10:4a7:44
22-0ct=1980 10:45:32
7784
7785
7786
7787
7788
7789
7790
7791
7792
7793
7794
7795
7796
1797
7798
7799
7800
7801
7802
7803
7804
7805
7806
7807
7808
7809
7810
7811
7812
7813
7814
7815
7816
7817
7818

7819
7820
7821

7822
7823
7824
7825
7826
7827
7828
7829
7830
7831
7832
7833
7834
7835

T0PS=20 Bliss=16 v2(206)
PA.<NEALE>BL2ML4.BLI.2 (78)

éGNTS';
leo

;

TEST NUMBER:

' TEST NAME:

SYNC DATA BUS BIT UNIQUENESS TEST/READ PA'H

'
'

TST 36

TEST DESCRIPTION:

TEST SYNCHRONOUS DATA BUS READ
PATH FOR DATA BIT UNIQUENESS BY:

]

LOADING THE

VIA MBUS WRITE FUNCTION WRITE SHIFTING PATTERN INTO THE GOOD BLOCK.

CLEAR THE

!
]

FIRST

16 WORDS

IN THE

1ERO IN A FIELD OF ONES PATTERN.

[0_BUF WITH A SHIFTING

10_BUF.

VIA MBUS REA. FUNCTION READ THE SHIFTING PATTERN THROUGH THE

READ

PATH,

]

;

INTERIGATE

THE

10_BUF FOR THE SHIFTING PATTERN,

IMDLIC{é éfifUTS:

A VECTOR OF 256 WORDS WHERF DATA FOR MBUS READS AND WRITE FUNCTION ARD FOUND.

| .

local

DODU FLG,

'DROP UNIT FLAG

TST_PAT;

'TEST PATTERN

CLR_MBUS;

pD0ODJ FLG = ZERO;
TST_PAT = ONE;

'ONE

incr CNT from 0 to 15 do

‘WRITE 16 WORDS WITH SHIFTED O IN A FIELD OF 1'S

begir

10 BUF [.CNT] = not

IN A FIELD OF ZEROES

.TIST_PAT;

TSY_PAT = _TST_PAT“ONE;

end;

GD_BLK_XFER ();

'SET UF A GOOD BLOCK XFERR

'DELAY UNTIL XFER TO COMPLETE

MLTSY = write;

0
until .DRY IS_SET;
BGNSUB;

'"WRITE SHIFTING PATTERN

MACRO M1113

CIMLAAD ML=11 | 06IC 1 £ST
S ECTION

HARDWARD TEST

PAGE 330

SEQ 0333

22-0ct=-1980 10:47:44
22-0ct=-1980 10:45:32

16356 ML
16357
16358
16359
16360
16361
16362
16363
16364
16365
16366
16367
16368
16369
16370
163N
16372
16373
16374
16375
16376
16377
16378
16379
16380
16381
16382
16383
16384
16385
16386
16387
..

ince CNT

'CLEAR OUT THE

from O to 15 do

10_BUF

[.CNT] = ZEROES,

CLR_MBUS;

T0PS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (78)

10_BUF

6D _BLK_XFER ();
MLTSY = read;

'SET UP A GOOD BLOCK XFERR
.READ SHiFTING PATTERN THROUGH SYNC BUS

'DELAY UNTIL XFER TO COMPLETE

0
until .DRY
TST_PAT

IS_SET;
'SHIFTING PATTERN

= ONE;

'READ I0_BUF FOR SHIFTING O IN FIELD OF

incr CNT from 0 to 15 do
begin
if

.10_BUF

then

[.CNT] neq

( not

.TST_PAT)

'COMPARE

[0_BUF

1°S

TO SHIFTED PAT

'ERROR AND SET DODU_FLG IF NEQ
ERRDF (93, SYNC, 0);
PRINTB (FIV_FMT, WRD_23, FNC_ 6, WRD_19, WRD 39, PHR_4);
begin

PRINTB (FMT 2, ( notTM.TST_PAT), .107BUF (.CRT], ( not .TST_PAT xor .I0_BUF [.CNT]1));
DODU_FLG = ONE;

end;
TST_PAT

end;

!SHIFT THE PATTERN AND REPEAT

_TST_PAT“ONE;

ENDSUB.;

16588

16389
16390
16391
16392
16393
16394
16395
16396
16400
16404
16405
16406
16407
16408
16409

23-0(T-80 09:11

it .DODU_FLG
then

'DROP THIS UNIT [F PODU_FLG IS_SET

IS_SET

begin
poduU (.ML_LUN);

DOCLN;

end;

057244
057250
057256
057262
057266
057274

7873

ENDTST;

004167

124610

152777

000040
132706

132462

142777
150577

000007

132444

016705
042705

177770
132440

$736:

JSR

k1,8SAVES

BIC

01177770,
RS

BISB
MOV

81CB

BISB

#40,3ML .REG+40
ML.DUT,RS

#7.,3ML .REG+40

RS,8ML .REG+40

:
:

7782
7815

CIMLAAD ML-11

HARDWARD

16411
16412
164613
16414
16415
16616
16417
16418
16419
16420
16421
16422
16423
16424
16425
16426
16427
16428
16429
164390
16431
16432
16433
16434
16435
16436
16437

TEST

LOGIC

MACRO M1113

TEST

SECTION

057300
057302
057306
057310
057312
057314
057320
057324
057326
057330
057334
057336
057342
057350
057354
057356
057360
057362
057364
057366
057372
057374
057400
057402
16438 057410
16439 057414
16440 057420
16441 057426
164642 057432
16643 057436
16444 0574644
16445 057450
16446 057452
16447 057456
16448 057460
16449 057462
16450 057466
16451 057470
16452 057472
16453 057474
16454 057476
16455 057500
16456 057502
16457 057504
16458 057506
16459 057510
16460 057512
16461 057516
16462 057522
16463 057526
16464 057532
16465 057536

23-0CT-80 09:11

PAGE

J_10
331

SEQ 0334

‘MLG
005005
012704
005000
010001
006301
010461
005161
006304
005200
020027
003765
004767
012777
105777
100375
104402
005000

010001
006301
005061
005200
020027
003770
152777
016703
042703
142777
150377

004767
012777

105777
100375

012704
005002
010201
006301
012703
060103
010401
005101
021301
001447

4 7:464

4 5:32

MOv

RS
# R4

DODU.FLG

MOov
ASL
MOV

R4, 10.BUF (R1)

¢
TST.PAT,

CLR

1%:

CLR

COM

ASL

INC
CMP
BLE
JSR

000017
133200
000051
132374

132330

2%:

3%
4%

CLR

010342

INC
cMp

000017
000040
132554

132330

000007

132312

177770

132306
133104
000071
132300

132254

BLE
B1SB

MOV

BIC

BI(B
BISE
JSR

5%:

000001
6%:

010342

MoV
1ST8
BPL
TRAP
CLR
MOV
ASL

000135

006630
006250
006040
007030
006076
005414

10.BUF (R1)

RO
RO,#17
48
#40,aML
. REG+40
ML.DUT,R3

7824
7821

CNT
¢
CNT,

7836
7837

CNT
“NT,»

7836
7837

$77776,R3

#7,3ML .REG+40
R3.aML.REG+40

7840

PC.GD.BLK.XFER
#71.3ML .REG

#10.BUF ,R3
R1,R3
R& R

ML _REG+SO
5¢

BEQ

R1
(R3) R
7%

.WORD
.WORD
.WORD

MOV
MOV
MOV
MOV
MOv
MOv

7818
7819
7821
7823

7827
7828
7832

aML .REG+S0

MOV
ASL
MOV
ADD
MOV

TRAP

TST.PAT

PC,GD.BLK.XFER
#61,8ML.REG

#1,R4

CLR

CNT
¢
CNT

CNT
CNT ,»

MOV
1518
BPL
MOV

COM
CMP

104455

10.BUF (R1]

v, TST.PAT

TOPS
<
PA:

55
135

7841
7845

+ ,IST.PAT
CNT
CNT ,«

7847
7849
7852

TST.PAT,+

7855

SYNC

#PHR .4, - (SP)

#WRD.39,-(sSP)

#URD
.1G .- (SP)
FENC.6,-(SP)

#urD .28, -(5P)

¥EIV_FRT,-(SP)

7856

CIMLAAO ML-11 LOGIC TEST

HARDWARD TEST

16467
16468
16469
16470 057542
16471 057546
16472 057550
16473 057552
16474 057554
16475 057556
16476 057562
16477 057566
16478 057570
16479 057572
16480 057574
16481 057609
16482 057604
16483 057606
16484 057610
16485 057614
16486 057620
16487 057622
16488 057624
16489 057630
16490 057632
16491 057634
16492 057636
16493 057640
16494 057642
16495 057644
16496 057650
16497 057652
16498 057654
16499

MACRO M1113

SECTION

(O JV YV TV IV IV 15,

e
o
e
i
e
-t el

(o Yo Yo Yo Xo Yo Xo Yo

JMLG

K_10
PAGE 332

SEQ 0335

22-0ct-19 80 10: L7:44
22-0ct-19 80 10: 65:3%2

JMLG
000006

MOV
MOV
TRAP
MOV
MOV

000002
000002

BIC
BIC
BiS

004224
000004

000001
000026

#6,-(SP)

SP.RO

7%:

000017

7857

(R3), (5P

R1,-(SP)

SP,e

*,D0DU.FLG

ADD

TST.PAT
CNT
¢
CNT

ASL
INC
cmp

BLE

132316

MoV
TRAP

8%:

000207

;

004767

104466

177362

Routine Size:

136::
1%:

006000

103773
00G207

7875
7876
7877
7878
7879
7880
7881
7882
7883
7884

DODU.FLG

JSR
TRAP
ROR

BLO
RTS

133 words

depth per invocation:

i TEST NAME:
!

1%
PC

ST 37
ARRAY ADDRESS MuXx TEST

TEST DESCRIPTION:

BGNTST;
TEST NUMBER:

17 words

PC,8T36

]

{

7866

7782

;

lee

7861

7849

7869

ML.LUN,RO

TRAP
RTS

Maximum stack

7858
7854

7862

TRAP

ROR
8LO
DEC
BNE

T0PS

PA:<

SP,*

MOV
MOV
Mov
MOV
MOV
TRAP
Mov

;

057656
057656
057662
057664
057666
057670

23-0CT-80 09:11

22-0ct-198 01 0: 4 7 144
22-0ct-198 01 0 14 5 :32

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4L.BLL.2 (79)

MACRO M1113

CIMLAAO ML-11 LOGIC TEST

7913
7914
7915
7916
7917
7918
7919
7920
7921
7922
7923
7924
7925
7926

TEST FOR UNIQUE MOS RAM ROW
AND COLUMN ADDRESSING BY:

SEQ 0336

FIRST FINDING A ERROR FREE
16K OR 64K CHUNK OF MEMORY.
THIS REPRESENTS ONE ROW OF

WRITE A BACKGROUND OF ALL

WRITE ZEROES INTO THE FIRST
BLOCK OF THE GOOD CHUNK.

READ REMAINING BLOCKS

ONES INTO THE GOOD CHUNK

GOOD CHUNK FOR ONES.

EITHER 16K OR 64K MOS RAMS.

IMPLICIT

INPUTS:

b
s
s
o
e
o

7908
7909
7910
7911
7912

7885
7886
7887
7888
7889
7890
7891
7892
7893
7894
7895
7896
7897
7898
7899
7900
7901
7902
7903
7904
7905
7906
7907

16562
16563
16564
16565
16566
16567
16568
16569
16570
16571
16572
16573
16574
16575
16576
16577 ;
16578
16579

SECTION

L.10
PAGE 332-1

10_BUF

A VECTOR OF

256 WORDS

WHERE DATA FOR MBUS
READ AND WRITE TRANSFERS
CAN BE FOUND.

o e

VWA (L RV IV, SV LV, 1V, }

ooV
- OO0

h
d o
b
d
d
d
b —

oo ooocooorOrO
O

16540
16541
16542
16543
16544
16545
16546
16547

e Bs 8c Boe Ba Ve We Be B¢ Ve Ve Ve Ve Ve B 0V Te Ve e Br Vs 0600 Vo Ve %s 8 Ve Vs Wy B0

16538
16539

TEST

e Vo Ve e Ve W

HARDWARD

23-0CT-80 09:11

local
DSA_ADRS,

'DSA ADRS COUNTER

'FOUND GOOD 16K/64K CHUNK FLAG

FND_GD_CHK;

DSA_ADRS = ZEROES;
DSAZADRS = .DSA_ADRS =

10 BUF = ONES;
BAT = ONE;

.RAS_INC;

begin
DSA_ADRS =

'LOAD FIRST

10 BUF WORD WITH ONES

'SET ON FIRST 1O BUF WORD
'DISABLE ECC

ECC_DIS = ONE;
do

'REST DSA COUNT

‘DO UNTIL FOUND GOOD CHUNK OR LBT

.DSA_ADRS +

.RAS_INC;

'INCREMENT DSA ADRS COUNTER

CZMLAAD ML-11 LOGIC

HARDWARD

TEST

MACRO M1113

TEST

SECTICN

23-0(T-80 09:11

PAGE 333

SEQ 0337

22-0ct-1980 10:47:44
22-0ct-1980 10:45:32

16581 JMLG
16582 ;
16583
16584
16585
16586
16587
16588
16589
16590
16591
16592
16593
16594
16595
16596
16597
16598
16599
16600
16601
16602
16603
16604
16605
16606
16607
16608
16609
16610
16611
16612
16013
16614
16615

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (79)

MLBA = 10_B0OF;
MLDA = .DSA_ADRS;

!16K OR 64K WORDS
'LOAD UBUS ADRS
!LOAD DSA ADRS
'DO A WRITE FUNCTION

‘DELAY UNTIL XFER TO COMPLETE

MLwC

ML_FUNC

@ _C

SIZE;

= write;

0
until .DRY

IS_SET;
'DID XFERR CAUSE AN SC

it .SC IS_NOT_SET
then
begin
MLWC = .Ww_C_SIZE.

MLBA = 10°BOF;
MLDA = .DSA ADRS;
ML_FUNC = WRT_CHK;

'XFERR WAS 0K
'LOAD WORD COUNT
!LOAD UBUS ADRS
'LOAD DSA ADRS
‘D0 A WRITE CHECK FUNCTION

'DELAY UNTIL

if .SC IS_NOT_SET
then
FND_GD_CHK = ONE
else

'1S THIS CHUNK GOOD

0
until .DRY IS_SET;

'YES SET FLG

'NO,

begin
CLR_MBUS;
BAl = ONE;
ECC_DIS = ONE;

XFER TO COMPLETE

CLR AND DO NEXT CHUNK

end;

16617
16618
16619
16620
16621
16622
16623
16624

else

16616

end

.THIS CHUNCK

begin

'CLR AND TRY AT NEXT

CLR_MBUS;
BAl = ONE;
ECC_DIS = ONE;
end;

7967
7968

end

until

(.FND_GD_CHK IS_SET ) or (.LBT IS_SET

it .LBT
then

IS_SET

1S BAD TRY NEXT CHUNCK

);

CHUNCK

'REPEAT UNTIL FOUND GOOD CHUNCK OR AT LBT
'If AT LBT THEN ERROR AND DROP UNIT

begin

ERRDF (111, INTER, 0);
PRINTB (FIV_FMT, FNC_13, FNC_17, WRD_S52, WRD_60, WRD_56);
PRINTB (THR FMT, WRD_14, PHR_10, FNC_15);

00DU (.ML_LON);

7977
7978

else

DOCLN;
end

‘A GOOD CHUNCK WAS FOUND CONTINUE TEST

CIMLAAD ML-11 L 0GIC TEST
HARDWARD TEST S ECTION

8o
T
Ve

16645

BB
B¢
e

16648
16649
16650
16651
16652
16653
16654
16655
16656
16657

16646
16647

16644

16643

16640
166461
16642

16637 ‘MG
16638 ;
16639

16658

10659
16660
16661
16662
16663
16664
16665
16666
16667
16668
16069
16670
16671
16672
16673
16674
16675
16676
16677
16678

16679
16683

16687 057672
16688 057676
16689 057700
16690 057704

MACRO M1113

23-0CT-80 09:11

PAGE

N 10
334

SEQ 0338

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32
7979
7980
7981
7982
7983
7984
7985
7986
7987
7988
7989
7990
7991
7992
7993
7994
7995
7996
7997
7998
7999
8000
8001
8002

8003
8004
8005
80C6
8007
8008
8009
8010
8011
8012
8013
8014
8015
8016
8017
8018
0046167
005001
166701

012767

begin
CLR_MBUS,;
BA] = ONE;
ECC_DIS = ONE;

'DISABLE ECC

MLWC = not 255:

'LOAD WORD COUNT

10 BUF = ZEROES;
MLOA = .DSA ADRS:

'"FIRST BLOCK IN CHUNCK GETS ZEROES
'LOAD DSA

MLBA = I10_BUF;
ML_FUNC ="write;

'LOAD UBUS ADRS
'DO A WRITE FUNCTION

'DELAY UNTIL

until

.DRY

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4L.BLI.2 (79

XFER

TO COMPLETE

IS_SET;

CLR_MBUS;
BAl = ONE;
10 BUF = ONES:

.READ REMAINING BLOCKS

MLBA = 10_BUF;

'LOAD DSA WITH NEXT DSA INCREMENT
'LOAD UBUS ADRS

ECT DIS = ONE;
MLDA = .DSA_ADRS + 1;
MLWC

.W_C_SIZE

+ 256;

.LOAD WORD COUNT WITH LESS ONE

ML_FUNC ="WRT_CHK;

‘D0 A WRITE CHECK FUNCTION

until

'DELAY UNTIL

XFER

BLOCK

TO COMPLETE

.DRY IS_GET;

LWCE

then

FOR ONES

IS_SET

begin
ERRDF

PRINTB

'WERE

(112, ASYNC, O);
(FOR_FMT,

FNC_17,

'"ERROR
WRD_S50,

PRINTB (FMT_9, (.MLDK - 1));
0ODU (.ML_LON);

WRD_60,

ANY BITS DISTURBED

WRITE CHECK FOUND BAD DATA

WRD_14);

DOCLN;
end;

end;

ENDTST;
124110

131762
177777

$137:
130430

JSR
(LR
SuB
MOV

R1,$SAVE2
R1
RAS.INC,R?
#-1,10.BUF

;
:
;
;

DSA.ADRS
*,DSA.ADRS

7873%
7918
7919
7920

MACRO M1113 23-5CT-80 09:11 PAGE 235

CIMLAAD ML-11 LOGIC TEST
SECTION

16742 060222

16743 060224
16744 060226
16745 060232
16746 060236

192777
152777

000010
000002
131734
131726
010342

1%:

131756

= =2 OO
OWN S

000077
000061

’%:

~
~
~

131756

100000

131654

T0PS

131704

000077
000051

3%:

131704

BISB
BIS8
ADD
MOv
MOV
MOV

BI(B
8158
1ST8

BPL
BIT
BNE

8I(B
8ISB
1ST8

BPL

BIT

100000

000001
000040
132072
177770
000007
131624
000010
000002
000001

<
PA:

MOV
MoV
MOV

010342

131646

131630
131616
131670

002000

131604

002000

131574

5%:

6%:

2
2
2
0600

006454
006510
006420
007206
007136
005414

000006

2
2
2

007162
006740
005774

#10,aM
. REG+40
L
82,30 .REG*120
RAS. INC,R1

W.C.SIZE,aML.REG*10
#10.BUF,aML .REG+20
R1,aML .REG+30

277,300 .REG

W.C.SIZE,aML.REG*10
#10.8UF
,aML .REG+20
R1,aML.REG+30

#77,aM .REG

8IT
BEQ
BIT

BEQ

.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
Mov
MOV
TRAP
MOV
Mov
MOV

DSA.ADRS,
*

7930

7939
7940
7941
7942
7946

ML .REG*+50
3%

#40,aML .REG+40

7929

7936

#5
. aML.REG
1

BI1S8

7921
7922
7926
7927
7928

7934

BNE

MOV

aML .REG+S0
23
#100000,8ML
.REG

MOV

BIC
BI1(B
BI1SB
B1S8
B1S8
(MP
BEQ

*,DSA.ADRS

26
ML 1
.REG

#100009,3ML.REG
4%
#1,R0

TRAP

-l i ad

16739 060206
16740 060212
16741 060216

SEQ@ 0339

il O

16692
16693
16694
16695 057712
16696 057720
16697 057726
16698 057732
16699 057740
16700 057746
16701 057752
16702 057760
16703 057766
16704 057772
16705 057774
16706 060002
16707 060004
16708 060012
16709 060020
16710 060024
16711 060032
16712 060040
16713 060044
16714 060046
16715 060054
16716 060056
16717 060062
16718 060064
16719 060072
16720 060076
16721 060102
16722 060110
16723 060114
16724 060122
16725 060130
16726 060134
16727 060136
16728 060144
16729 060146
16730 06015¢
16731 060156
16732 060160
16733 060162
16734 060164
16735 060166
16736 060172
16737 060176
16738 060202

—

HARDWARD TEST

7948
*,FND.GD.CHK

7950
7948
7960

ML.DUT,R2

2177776.,R2

#7,3ML .REG+40

R2.3ML.REG+40

#10,aML
. REG+40
#2.3ML.REG+120
RO.#1

63
g%OOO,BHL.REGOSO

7967
7963
7967

79¢9

#2000,aML .REG+50
7%

55
157

7972

#WRD.56,-(SP)
#WRD.60,-(SP)
#WRD.52,-(SP)
#FENC.17,-(SP)
#ENC.13,-(SP)

7973

6NTER

YEIV_FMT,-(SP)
#6,-(SP)

SP,RO

14
#ENC.15, (SP)
#PHR.10,-(SP)
#URD
.14 ,-(SP)

S2,¢
7974

131704

000026

000040

131436

000007

131420

000010
000002
127776
131360

131406
131460

131662
177770
131414

7%:

MOV
MOV
MOV

8%:

131344

131550

177770
000007
131302
000010
177777
000002
131240
010342

131162

131324

BIC
BICB
8Is8
glsB8

131274
127670
131340

MOV

BISB

MOV

INC

MOV
MOV
MOV
ADD
MoV

131222

000400
131176

8Ic8
BISB
1STB
8PL
81s8

MOV

131306

131176

—

VO~
O

040000

000077
000051

—

0102

010342
000077
000061
000040

MOV
MOV
MOV
TRAP
MoV
TRAP
TRAP
ADD
RTS
BI1sS8
MOV

131216

9%:

BICB
B1SB
TSTB
BPL

BIT

8EQ

TRAP

005774
006510
006400

.WORD
.WORD
.WORD

MOV
MOV
MOV

FTHR
FMT - (SP)
G ,-(SP)
SP,RO
14

—

SEQ 0340
22-0ct-198 0
22-0ct-198 0

BIC
BI(B
B81SB
BI1:8
BISB
CLR

177400

—

16793 060532
16794 060534
16795 060542
16796 060544
16797 060546
16798 060550
16799 060552
16800 060554
16801 060560
16802 060564

005366
000004

(VI]

16791 060520

16792 060526

(1M
PAGE 336

JMLG

~ NN ~N NNSNNWNN ~
-,
~ ONNNOONNNN~
~
~ SNNSNNNVNONWVINYN
~
~

16748
16749
16750
16751
16752
16753
16754
16755
16756
16757
16758
16759
16760
16761
16762
16763
16764
16765
16766
16767
16768
16769
16770
16771
16772
16773
16774
16775
16776
16777
16778
16779
16/80
16781
16782
16783
16784
16785
16786
16787
16788 060502
16789 060506
16790 060512

23-0CT-80 09:11

—

SECTION

OOt
e QO b cd e e
— AN =B NN
=2 NOO W Po)
N
N NNVONINOMNVOWVIN
o

HARDWARD TEST

MACRO M1113

CIM_AAD ML-11 LOGIC TEST

147:44
:465:32

T0PS

<
PA:

Sp'.

7975

ML.LUN,RO

97N
7969
7979

#26,SP
PC

#40,3NL
. REG+40
ML.DUT,R2

#177770,R2

<7.9ML .REG+40
R2,aML .REG+40

#10,aML .REG+40

#2,aML .REG+120
10.BUF
R1,aML.REG+30
#-400,3ML .REG*10
#10.BUF ,aNL.REG+20
#77.3ML .REG

. DSA.ADRS,+

7981
7982
7933
7984
7985
7986

7987

#61.3ML .REG

7991

aML .REG+S0
8%

#40,aML .REG+40
ML.DUT,R2

0177770,R?

#7,aML .REG*40
R2 . aML .REG+40

#10,aML .REG+40
#-1.10.BUF

#2,aML .REG+120

. DSA.ADRS,+

7994
7995
7996
7997

R2,aML .REG+30
#10.BUF
,aML .REG+20
W.C.SIZE.R?

7999

877,30 .REG

8000

ggL.aecoso

8004

#40000,3ML .REG+40
108

8006

#400,R2
R2,3ML.REG+10
#51.3ML.REG

8009

#WRD .14, -(SP)
#WRD.60,-(SP)
#WRD.50,-(SP)

8010

160
SSYNC

CIMLAAD ML-11

HARDWARD TEST

16814
16815
16816

16817
16818
16819
16820
16821
16822
16823
16824
16825
16830
16831
16835
16839
16840
16841
16842
16843
16844
16845

MACPO M1113

SECTION

060570
060574
060600
060604
060606
060610
060614
06061¢
060622
060626

060630
060632
060636
060640
060642
060646

007206
005400
000005

PAGE

o
337

SEQ 0341
2 2 0 c t-1980 10: 47:44
? 4 0 ¢ t-1980 10::465:32

MOv
MOV
MOV
Mov
TRAP
MOov

131114

DEC

004602
000002
131330

000207

000020

108:

;

060650
060650
060654
060656
060660
060662

004767

104466

177016

JSR

RTS

;

8019

Routine Size:

Maximum stack

BLO
:

;

MOV
Mov
Mov
TRAP
MOV
TRAP
TRAP
ADD
RTS

TRAP
ROR

006000
103773
000207

16846

16847
16852
16853
16854

23-0(T-80 09:11

:MLG

——

16813

TEST

16804
16805
16806
16807
16808
16809
16810
16811
16812

LOGIC

' <BLF /PAGE >

Routine Size:

Maximum

stack

ToPS
PA:<

FENC.17,-(SP)

#EQOR.FMT ,=(SP)
£5,-(SP)

SP,RO

;

SP,e
8011

(SP)
ML .REG*30,
(SP)

#EMT.9,-(SP)
#2,-(SP)

SP.,RO

14
ML.LUN,RO

8012

8008
7573

247 words
depth per inyvocation:

14 words

8016

PC,$137
66
RO
1%
P

6 words

depth per

SP..

invocation:

0 words

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SEQ 0342

BONTSTM;
lee

TEST NUMBER:

TST 38

TEST NAME:

NIBBLE OFFSET

TEST

TEST DESCRIPTION:

TEST NIBBLE OFFSET COUNTERS TO OFFSET GOOD NIBBLE DATA A MAX

14 WORDS ON DETECTION OF ALL BAD NIBBLES BY:

LOADING FIRST 2 1/4 WORDS OF THE 10_BUF WITH ZEROES AND THE
REMAINING OF BUFFER WITH ONES.

IETE

VIA PROM R/W MODE FORCE ALL ARRAY NIBBLES BAD.

VIA DAT_DM MODE WRITE THE GOOD BLOCK WITH BACKGROUND
ON ONES.

VIA A MBUS WRITE FUNCTION LOAD IO_BUF

INTO THE GOOD BLOCK.

VIA DAT DM MODE READ FIRST 15 ARRAY WORDS FOR ZEROES AND THE
REMAINING WORDS FOR ONES.
IMPLICIT

INPUTS:

PD_TEMP

A BIT VECTOR OF 16 BITS WHERE THE READ PROM DATA [S STORED AND

®s

16886
16887
16588
16889
16890
16891
16892
16893
16894
16895
16896
16897
16898
16899
16900
16901
16902
16903
16904
16905
16906
16907
16908 ;
16909 ;
16910 ;

T0PS=20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML4.BLI.2 (80)

]

16885

£
PAGE 338

22-0ct=-1980 10:47:44
22-0ct=1980 10:465:32

16856 JMLG
16857 ;
16858
16859
16860
16861
16862
16863
16864
16865
16866
16867
16868
16869
16870
16871
16872
16873
16874
16875
16876
16877
16878 ;
16879
16880
16881
16882
16883
16884

SECTION

23-0(T-80 09:11

®e

ACCESSED FROM.

[0_BUF

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE
FUNCTIONS ARE

FOUND.

local

'DROP UNIT FLAG
'TEST PATTERN
'STARTING WORD
'ENDING WORD
TERROR FLAG

DODU FLG,
TST PAT,
START,
FINISH,
ERR_FLG;

BGNSUB;
CLR _MBUS;

00D0_FLG = ZERO;
incr WD CNT from 0 to 255 do
10_BuF ( .WD_CNT] = ONES;
10_ BufF
10_8 ur
10_8

(0]
(1]

ZEROES;

2EROES;

X0'177760°;

'LOAD 10_BUF WITH ONES

'LOAD FIRST 2 1/4 WORDS WITH ZEROES

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0(T-80 09:11

PAGE 339

SEQ 0343

22-0ct=-1980 10:47:44

16912 ;MLS

22-0ct=-1980 10:45:32

}gg}z ;

TOPS=20 Bliss=-16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (80)

16915 ;

8072

MLD1 = ONES;

"LOAD DATA DIAG REGISTERS WITH ONES

16918 ;
16919 ;

8075
8076

DAT DM_XFER ();
MLCSY = write;

_SET UP A DATA DIAG MODE XFERR
'DO A WRITE XFERR

16921

;

8078

incr WD_CNT from 0 to 127 do

.LOAD BLOCK WITH BG PAT

16923 ;

8080

DELAY

16925 ;

808¢2

end;

14927 ;

8084

16929
16930 ;
16931 ;
16932 :

8086
8087
8088
8089

16916 ;
16917 ;

8073
8074

16920 ;

8077

16922 .

16924 ;

16926 ;

16928 ;

16933 ;

16934 ;
16935
16936
16937
16938

;
;
;
;

16939 ;
16940 ;

8079

MLDZ = ONES;
MLEZ2 = ONES;

begin

8081

8083

8085

8090

8091

8092
8093
8094
8095

8096
8097

(ONE US):

DAT_CLk = ONE;

CLR_MBUS;

WRT'PD (ONES, 19);

'"FORCE ALL NIBBLES BAD

'DELAY UNTIL XFER TO COMPLETE

PROM_RW = ONE;
GD_BLK_XFER ();
MLISY = arite;

0
wuntil

.DRY

'SET PROM READ WRITE
_SET UP A GOOD BLOCK XFERR
'WRITE ZEROES IN FiRST BLOCK WORD LOCATION
'OFFSETTING 14 NIBBLES WITH ZEROES ALSO.

IS_SET.

(LR _MBUS;

START = ZERO:
FINISH = 14;

'START AT THE FIRST BLOCK WORD
TEND AT THE 14°'TH BLOCK WORD

16941 ;
16942 :
16943 ;

8098
8099
8100

TST_PAT = ZEROES;
DAT_DM_XFER ();
MLCSY = read;

'TEST FOR ZEROES IN FIRST 14 WORDS
'SET UP A DATA DIAG MODE XFERR
'DO A KEAD FUNCTION

16946 :

8103

incr TWICE from 0 to 1 do

'READ WORDS O-14 FOR 0°'S AND 15-126 FOR 1°S

16944 ;
16945 ;
16947 ;
16948 ;

8101
8102

8104
8105

16949 ;

8106

16951 ;
16952
16953 ;
16954 ;

8108
8109
8110
8111

16956 :

8113

16950 ;

16955 ;

16957 ;

8107

8112
8114

16958 ;

8115

16960 ;

8117

16959 ;

:636} :
6962

8116

g}}g

16963 ;

8120

16965 ;

8122

16964 ;

16966 ;

8721

8123

DELAY

(ONE_US):

begin

incr WRD_CNT from .START to .FINISH do
begin

'READ BLOCK WORDS FORM START TQO FINISH

PD TEMP = .MLPD;
DAY CLK = ONE;
DELAY (ONE_US):
RD_LNG_WRD;

'GET PROM DATA
'CLOCK OUT THE DATA WORD

incr NIB_PTR from 0 to 8 do

'LOOK AT 9 NIBBLES

if .PD_TEMP [.NIB_PTR) IS_NOT_SET
then

begin

'READ THE DATA DIAG REGISTERS

!'FIND GOOD NIBBLES

TST_LNG_WRD (.NIB_PTR, .TST_PAT, ERR_FLG);
it .ERR_FLG IS_SET

then

begin

ERRDF (94, ARR_DAT, 0);

'COMPARE NIBBLE WITH TST PAT

'SEE 1F COMPARE FOUND AN ERROR

'ERROR AND SET DODU_FLG 1F ERROR FLG SH!

MACRO M1713

CIRLAAO -1 L 0GIC TESY
HARDWARD TEST S ECTION

b b —d

b b =

NO NN
—

b
b b

=2 OO

AOND

ed =D ad e
i o
D
e
e

340

NN S

PRINTB (FM1°6,

DODU_FLG =
end;

2O O
WN
NO WV
2OV
NN
NO WV

]

d
o
D

004167

162700
104402
152777

016704
042704
142777
150477
005066
005002
010203
006303

012763
005202

020227
003767
005067

005067
012767
012777

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZMLGL.BLT.2 (B0)

PRINTB (THR_FMT, WRD &1, WRD_46, WRD_10);

NI O N N PO

it e
D
D e
o
D
d
e

N AN AN NN
N

D o
b

NN AN

d
o
b

d cd o

060732
060734
060736
060740
060746
060750
060754
060756
0607¢2
060766
060774

SEQ 0344

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

BB 85 B B 8 8~ B

;
;

17003 060670
17004 060674
17005 060676
1/006 060704
17007 060710
060714
060722
17010 060726
SNNSNNSYNNNSNNN
[elele] [eleTolelelaleTe)

G 1

;

16989
16990
16991
16992
16993
16994
16998
17002 060664

PAGE

[» -Xo -To Yo T To Yo Yo Yo To To Yo Jo To Te Jo Yo -Jo Jo Jo To Jo Jo [

16968
169¢9
16970
16971
1697¢
16973
16974
16975
16976
16977
16978
16979
16980
16981
16982
16983
16984
16985
16986
16987
16988

23-0(T-80 09:11

ONE;

.NIB_PTKR);

end;
end;

1S1

STAR

PAT
1

rot

'NOW READ FOR ONES

.TST_PAT;

'START A 15
JEND AT 126

FINISH = 126:;

end

ENDSUB;
it .DODU_FLG
then

'DROP THIS UNIT

IS_SET

DODU_FLG SET

begi n
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

$738:

123170

000012

000040

131034

000007

131016

131260
177770
131012

1%:

2%:

000377
127360
127356
177760
177777

010342

TRAP

BISB

MOV

000004

177777

JSR
SuB

8IC
BI(B
BISB
(LR
CLR
MoV
ASL
MOV

INC
CMP
BLE
CLR
(LR
MOV
MOV

8018

R1,$SAVES

512,59

8060
8062

#40,aML .REG+40
ML.DUT,R4

177770,
R4

#7,aML .REG+40
R4 ,aML .REG+40
L(SP)
R?

;
:

DODU.FLG
WD.ONT

80¢LS

R3
#-1,10.BUF(RY)
R2

;

WD.CNT

8066

RZ,R3

R2.,#377
2%
10.BuUf

¢2
10.8UF

#-20,10.BuUf
+4&
#-1,8ML.REG#170

; WD.(NT,»

: WD.ONT,»

8064

8067

8069
8070
8071
8072

CIMLAAQ ML=-11 LOGIC

HARDWARD

17023
17024
17025

TEST

17026 061002
17027 061010
17028 061016
17029 061022
17030 061030
17031 061032
17032 061036
17033 061040
17034 061044
17035 061046
17036 061052
17037 061054
17038 061056
17039 061060
17040 061062
17041 061070
17042 061072
17043 061076
17044 061100
17045 061106
17046 061112
17047 061116
17048 061124
17049 061130
17050 061134
17051 061140
17052 061144
17053 061152
17054 061156
17055 061164
17056 061170
17057 061172
17058 061200
17059 061204
17060 061210
17061 061216
17062 061222
17063 061226
17064 061234
17065 061236
17066 061242
17067 061250
17068 061254
17069 061256
17070 061262
17071 061264
17072 061270
17073 001272
17074 061274
17075 061276
17076 061300
17077 061302

TEST

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

11
341

SEQ 0345

22-0ct=-1980 10:47:44
22-0ct=-1980 10:45:32

;MLG
012777
012777
004767
012777
005001
012702
101411

016703
001404
005066
005303
001374
005302
000766

177777
1772777
131604

3%:

000001

121052

152777
016704
042704
162777
150477

000040

130632

000007

130614

105777
100375
152777
016704

042704

162777
150477
005066

012766
005005
004767
012777
012702
0014M
016703
001404
005066
005303
001374
005302
000766
005004
016601

000023
134566
000100
131364
000061
120560

130730

7%:

BISB

130514

000007

130522

000006
000016

000004

131364

000071
000001

120634

000014

MOV

BIC
BI(B
BI1SB

JSR
BIS8
JSR

8%:

MOV
1818

BPL
BISB

MOV

BI(C
slc8
8158
(LR
MOV

(LR
JSR

130430

9%:
10%:

11%:

000006

INC
(mMpP

BLE
BISB

130646

130540

130516

BEQ

MOV
MOV

000040
130764
177770

CLR

Mov

6%:

000177

130610
177777

:?i,anL.aeG

BEQ
(LR
DEC
BNE
DEC

5%:

000020

012746
012746
004767
152777
004767
012777

MOv

MOV

000010

131056
177770

#-1,9ML.REG+200
#-1,3ML .REG+160

JSR

000061

152777
005201
020127

003755

MOv
MOV

12%:
13%:

MoV
MOV

BEQ

MOV

BEQ
CLR
DEC
BNE
DEC

CLR

MOV

8073

8074

PC,DAT.DM. XFER

1 ,R2
7%

LSOLY,R3

#20,aML.REG*+120
R1

R1.#177
3

10PS
PA:<

; WD.CONT
:

v, 88TMP?

;

*,38TMP1

;
.

$$TMP
$8TMPI

;

$$TMP2

; WD.CNT
; WD.CNT,»

8075
8076
8078
8080

8081
8078

8082

840,
3N .REG+4O
ML.DUT,R4

077770,
R4

#7,3ML .REG*40
RG.AML .REG*40
#-1,-(SP)
#23,-(Sr)
PC,WRT.PD
#100,3ML.REG+120
PC,6D.BLK.XFER
#67,ML
. REG

8085

8u86
8087
8088
8093

aML -REG+50
8s

#40,aML
. REG*4D

ML.DUT,R&

0177770,
r¢4

#7,3ML .REG+40
R4 IML .REG+40
6(SP)
$16,4(SP)
RS
oC,DAT.OM. XFER
271,
an( .REG
" R2
12%

L$DLY,R3

:
;
;

STAR?
¢, FINISH

*,88TMP?

;

*,88TMP

;
;.

$8TMP
$3IMPI

TST_PAT

8096
8097
8098
8099
8100
8101

; $3TMP?
6(SP) ,R1

;

TWICE

START WRD.(NT

8103
8100

WO PRORNINONININNINON)
2 2 b b D = = 2 2O OO0000

Wg—‘ooaflombu‘f\)—loom\lombu’\)—‘oom\J CNEGNN

N\lNNNNNN\INNN\IN\INNNNNNN\ ~N~N~N~

éé= Oct-1980 10: L7:464
22- Oct-1980 10 :465:32

061406

061410
061412
061416

061420
061422
061426
061432
061434
061440
061444
061446
061450
061452
061454
061460
061462

004767
026627
001034

8158

15%:

120556

00001¢

MOV

16$:

17%:

18%:

19%:

MOV

BEQ

Mov

BEQ

CLR
DEC

BNE
DEC
BR

R2,R3
R3
R3Y
RY
#PD.TEMP,R3
R3,=(SP)
R2,=(SP)

CLR

MOV

CLR
JSR

121442

000010

ADD

1ST
BNE

MOV
MOV
MOV
ADD

000020
131172

000020

1046455

000001

JSR

(MP
BNE

TRAP

000136
007534

005740
006336
006264
005366
000004

004470
000002

17%
14 (SP)
R3
16%
R2
15%

MOV
ASR

BIC

000001

L$DLY,R3

aML.REG+170,D1.TEMP
TEMP
aML .REG+200.D2.
ggL.REG*160.E2.TEMP

ASR
ADD
MOV
MOV

177770

e, 88TMP?

MOV
MOV
MOV

ASR

011662

#20,3ML .REG+120
#1,R2
18%

-WORD
.WORD
.WORD
MOV
MoV
MOV
Mov
MOV
MOV
TRAP
MoV
MOV
MOV

$177770, (sP)

,38TMP]

$STMP

;

$8TMPI

;

$$TMP2

;
;

NIB.PIR
NIB.PTR,»

NIB.PTR,»

;
;

NIB.PTR,»
TST.PAT,»

;

ERR.FLG,*

;

ERR.FLG,*

30472

148:

;

223
aML .REG+230,PD.TEMP

000020
000001

130342

WRD.CNT

-0
oOo®

152777
012702
00141
016703
001404
005066
005303
001374
005302
000766
017767
017767
017767
005002
010203
006203
006203
006203
062703
010346
010246
042716
012746
005046
004767
062706
005700
001051
010246
010546
012746
060616

130612

DEC
BR

005301
000534
017767

TOPS

<
PA:

oo
co oo

061306
061310
061312
061320
061326
061332
061334
06134C
061342
061346
061350
061352
061354
17095 061356
17096 061364
17097 061372
17098 061400
17099 061402
17100 061404
—Jdddfl—.—.—.d—‘ddd-‘d—..—l—l_‘_‘—b—.—l—l—..—._._‘_._._‘_.
~NNNNN
— ol e d e o
D D i D il i o D o D e D D
D D s D D b b —d D ad e b

SEQ 0346

JMLG

17079
17080
17081
17082
17083
17084
17085
17086
17087
17088
17089
17090
1709
17092
17093
17094

17101

l 1
PAGE 342

—

SECTION

23-0CT-80 09:11

—

TEST

—

HARDWARD

MACRO M1113

TEST

Qo
b

CIMLAAOD ML-11 LOGIC

0 ,-(SP)
=($P)
PC,BLSGT2
no,sp
RO

218
R2,-(SP)
RS .= (SP)

#20,-(5P)

SP, (SP)
PC.TST.LNG.WRD

. #1
20(SP)
20%
55
136

8118

8120
8123

8RR.DAI

8124

#WRD.10,-(SP)

#WRD .46, - (SP)

#WRD.41,-(SP)
#THR.FAT,-(SP)
#4,-(SP)

SP RO

14
R2,(SP)
#FENT
.6, -(SP)
#2,-(SP)

;

SP,*

;

NIB.PIR,«

8125

CIMLAAD ML-11

061574
061600
061602
061604
061610
061612
061614
061622
061630
061632
061636
061640
061642
061644

0 o o9
W) Te Yo o Fo Yo Yo Yo VIV IV IV IV IV IV LV IV IV W W W W o W
0N
WA —=O 0V
NO WV
NN 20O 00NN

000001
000016
00000’

4«0 061572

218

000010

22%:

000004
000017
000176

000006
000004

177020

000004

000001

23%:

130276

062706
000207

000012

23-0CT-80 09:11
Mov
TRAP
MOV
ADD
ADD

INC

Cmp

BLE
INC

(MP
BLE
COM

24%:
;
;

PAGE

*,DODU.FLG
NIB.PTR
NIB.PTR,*

; WRD.CNT

R1
R1,4(SP)
149%

WRD.CNT,FINISH

Routine Size:

SP,e

#6,5P
R2
R2,#10
19¢%

cMP
TRAP
ROR

MOV
TRAP
TRAP
ADD
RTS

SEQ 0347

14
#1,34(SP)
ne,sp

RS
#17,6(SP)
#176,4(SP)

BHIS
JMP
cMP
BNE

343

SP,RO

MOV
MOV

INC
CmP
BLE

000001

061646
061650
061654
061662
061664
061670

061672
061674
061700

000034

TST.PAT

* ,START

* FINISH

TWICE
TWICE,

R4
M
R4,
13%
(SP)+,(SP)+

23$

19
L(SP),
M

243

LODU.FLG,*

ML.LUN,RO

L4
¥2,sP
PC

263 words

Maximum stack depth per

—a

004767

104466

006000

103773

000207

176756

—

061702
061702
061706
061710
061712
061714

[2]

[s Yo Lo Yo Yo To Bl I
VB WA —=OMN

el
i

D
D

D
e

D
D

D i

D
D

d
d

D
D

d
d

D o

D i

D
D

o
o

)
e
D

d e
D

D
)
D

D pd
d

D o

D
D

B
)
D
i

D el o
D

MACRO M1113

L0
S3

1i1nvocation:

23 words

s
o

d e
i

D
)

d e

d el
e

D el o
—

—

D e

061550
061552
061554
061562
061566

NNNNNNVNNN NNNNNSNSNNNSNNNSNSNNNNSNNNNNNNNNNNN

17135
17136
17137
138
39
D

HARDWARD TEST

J 1

JSR

TRAP
ROR

BLO
RTS

PC,$738
66

1%
PC

8145

CIMLAAD ML-11 LOGIC

HARDWARD TEST

T EST

MACRO M1113

SECTION

23-0CT-80 09:11

K 1
PAGE 34é

SE2 0348

17193

;mLé

22-0ct=1980 10:67:44

17194
17198
17196
17197
17198
17199
17200
17201
17202

;
;
;
;
;
;
;
;
;

8149
8150
8151
8152
8153
8154
8155
8156
8157

!
BGNTST';

;

TEST CS1 FUNCTION ABORTS ON DETECTION OF CLASS 'A' & 'B' ERRORS BY:

17205
17206
17207
17208
17209
17210
17211
17212

;
;
;
;
;
;
;
;

8160
g161
8162
8163
8164
8165
8166
8167

!
!
!
!
!
!
!
!

VIA MBUS WRITE FUNCTION LOAD
PATTERN OF ONES.

CLEAR THE

DO A MBUS READ FUNCTION.
WHILE
MLDA (CLASS 'A' ERROR) READ THE

CLEAR THE

};}g% :

};%82 :

22-0ct=1980 10:45:32

g}gg

!+
' TEST NUMBER:
TST
!
' TEST NAME:
CS1
!
' TEST DESCRIPTION:

17213
17214
17215
17216
17217
17218
17219
17220
17221

;
;
;
;
;
;
;
;
;

B168
8169
8170
8171
8172
8173
B174
8175
8176

!
!
!
!
!
!
!
!
!

17223
172264
17225
17226
17227

;
;
;
;
;

8178
8i79
8180
8181
8182

!
!--

17229 ;

8184

17222 ;

17228 ;

17230 ;

17231
17232
17233
17234
17235

17236
17237
17238
17239

;
;
;
;
;

;
;
;
;

17240 ;

17241 ;
17242 ;
172453 ;

17244 :

17245 ;

TOPS=20 Bliss-16 v2(206)

8177

8183
8185

8186
8187
8188
8189
8190

8191
8192
8193
8194
8195

PA:<NEALE>BL2ML4.BLI.2 (81)

39
FUNCTION ABORT

TEST

THE

GOOD BLOCK WITH BACKGROUND

10_BUF
THE READ IS IN PROGRESS WRITE
[0_BUF FOR ONES.

[0_BUF

'
VIA PROM R/W MODE FORCE UV ERROR TO THE UV ADRS ERROR PROM
(CLASS 'B' ERROR).
DO A MBUS READ.

READ

I0_BUF

FOR ZEROES

IMPLICIT INPUTS:
10_BUF

A VECTOR OF 256 WORDS WHERE DATA FUR MBUS READS AND

WRITE

FUNCTION ARE

FOUND.

C(LR_MBUS;
BAl = ONE;

10_BUF = ONES;

GD BLK_XFER

();

MLIST = write;

'SET ON FIRST

10 BUF

ADRS

'LOAD FIRST 10_BUF ADRS

ISET UP A GOOD BLOCK XFERR

'WRITE BACKGROUND PATTERN

'DELAY UNTIL XFER TO COMPLETE

incr TWICE from 0 to 1 do
begin
BGNSUB;
CLR_MBUS;

'FORCE CLASS °'A' AND CLASS

0
wuntil .DRY IS_SET;

8196
8197
8198

incr CNT from 0 to 255 do
10_BUF [.CNT] = ZERCES;

‘CLEAR OUT

8200

then

if .TWICE eql !

'If 2ND PASS THEN FORCE

8199

'B'

ERROKS

10_BUF

'B' ERROR

CIMLAAD ML-11

TEST

MACRO M1113

SECTION

23-0(T7-80 09:11

PAGE % 5

SEQ 0349

22-0ct=1980 10:47:44
22-0ct=-1980 10:45:32

JMLG

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4L.BLI.2

beqgin

PROM_RW = ONE
;

MLPD = Xo' 777;
end;

();

GD_BLK_XFER

.SET UP A GOOD BLOCK
'DO A READ FUNCTION

MLTST = read:
if

.TWICE

eql

XFERR

'IF FIRST PASS THEN FORCE AN 'A'

O then MLDA = ONES;

ERROR

.DELAY UNTIL XFER TO COMPLETE

o Bo ®o Vo Bo BoeBsBsBs Bo VWeBy B0 Ve 0a Ve VeV To B¢ Vs B Ve B Bs B0 o 8o e s 0e s BB 0e ®e

0
until .DRY IS_SET;

d
D o
D e
D
D
D
d
d
h e
D
D o
D i
)
D
d
D
)
d
D
d
D
d
i
ad e
d e
—

~ ~ ~N~~ SNNSNSNSNSNSNSNSNSNNSNN ~
n N AORONY NN ANV
NI A N
&5
L
o leadoal*a oo N AN UHAVINWVWA
(9, V) - O NOWVNE
NN
OO oo

HARDWARD

LOGIC

if .TWICE egl
then
begin

'SEE WHICH PASS WE'RE ON

incr WRD_CNT

begin

from 0 to 64 do

it .10_BUF
then
begin

ERRDF

[.WRD_CNT] neq ONES

(95, SYNC, 0);

PKINTB (FOR_FMT, PHR_8,
exitloop;

ERROR

'CLASS

'A'

!SEE

XFERR WAY ALLOWED TO CONTINUE

'READ 10_BUF

FOR B3 PAT

ERROR AND EXIT LOOP

ZEROES

FNC_13, WRD_19, WRD_10);

end;

else

end

begin
incr WRD_CNT
begin

from 0 to 64 do

.10_BUF

then

[.WRD_"NT] neq ZEROES

begin

ERROR

.CLASS

'B'

!SEE

XFERR WAS ABORTED

10_BUF

'READ
'ERROR

CLEARED DATA

ONES AND EXIT LOOP

ERRDF (96, SYN(C, 0);
PRINTB (FOR_FMT, PHR_9, FNC_13, WRD_19, WRD_10);
exitloop

end;

end;
it .SC
then

IS_NOT_SET

!SEE

SC BIT SET

(81)

MACRO M1113

CIMLAAD ML-11 L OGIC TESY

HARDWARD TEST

S ECTION

23-0CT-80 09:11

LR
PAGE 34$

22-0ct-1980 10:47 144
22-0ct=1980 10:45 : 32

MLG

17304 ;

begin
ERRDF (104,

NN NN NN NN

D d d
D D e

ENDTST;

061716
061722
061730
061734
061740
061746
061752
061760
061766
061772
062000
062004
062006
062010
062012
062020
338 062024
W

L4
o

(¥]

D e el e

i e

D D D oD o

NN~

ENDSUB;
end;

W
W

D D D D d ) el

AN L U AN AN NN

OO0 ~NOWNE
NN

RELRERELER
IV IV 1V 1V ]

o V] S NN
—

A N [V
RV 1V,

(VI

e
D D i
D e el
D e
e

'ERROR IF NOT SET

SYNC, 0);

end;

NNNSNSNSNNNNSNSNNNNN NNNNY~N ~

D e

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZML4L.BLI.2 (81)

PRINTB (FIV_FMT, WRD_S9, PHR_1, WRD_11, WRD_19, FNC_13)

7340 062036
341 062042
062044
062046
062050
062054
062056
062062
062064
062070
350 062072
062160
062106
062112
062120
062122
062124

—d d e

SEQ 0350

0046167

152777

016703
042703
162777
150377
152777

012767
004767
012777

105777
100375
005003
104402
152777
016702
042702
162777
150277
005000
010001
006301
005061

005200
020027
003770
020327
001006
152777

012777
004767
012777
005002
005703
001004

122100
000040
130234
177770
000607
127766
000010
177777
130550
000061
127744

000040
130144
177770

000007
127676

130010

$739:

MOV

BlC
8I(CB
8158
8158

127772
127760
126354
127700

127720

MOV

1%:

2%:

JSR
MOV
1ST8
BPL

127702

000001
127720
130022
127560

n77770,R3

#7.3ML.REG+40
R3. ML .REG+40

#10,aML .REG+40
#-1,10.BUF
PC,GD.BLK.XFER
#61,aML .REG

aML .REG+50

#40,3ML .REG+40

TRAP

BIC
BI(B
BI1SB
CLR
MOV
ASL

8158
48:

ML.OUT,R3

B1SB

INC
CMP
BLE
CMP
BNE

000377

#40,aML
. REG+4D

1%
R3

CLR

010342

R1,$SAVE3

CLR

MOv

3%:

000100
000777
130430
000071

JSR
B1SB

MOV

JSR

MOV

CLR
TST

BNE

fWICE

ML.DUT,R2
#177770,R2

#7 ML .REG+40
R2.,3ML.REG+40
RO
RO.R1
R1

10.BUF (R1)

CNT
¢
CNT,

RO
RO, #377
3%
M
R3.
49
#100,3ML .REG*+120
#777 ,8ML .REG+230
PC,GD.BLK.XFER
:;1,3HL.REG

(NT
CNT,»

R3
5%

TWICE

TWICE,*

8199
8202
8203
8206
8207
8209

CIMLAAOQ ML-11

LOGIC

HARDWARD TEST

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

N 11
PAGE 347

SE@ 0351

JMLG
005202
012777

1
1
1
)

365 062144

105777
100375

177777
127606

127572

INC

5%:

6%:

010342

177777

005740
006040
007136
006714
005400
000005

062202
17378 062206

17379 062212
17380 062216
17381 062222

}7382 062226
1

7%:

000100

8%:
9%:

1
1
1

010342

1 7395
1 7396
1 7397
1 7398

062270

005740
006040
007136
006726
005400
000005

062302
062306
062312
062316

17404 062322
1746405 062324
17406 062326
17407 062332
17408 062334
17409 062336
17410 062342
17411 062344
17412 062352

B8R
INC
CMP
BLE
MOV
ASL

000014

003742
032777

001026

:
108
11%:

000100
100000

127326

12%:

8219
8222

10.BUF
(R1) ,4-1

55
137

8225

SYNC

#WRD.10,-(SP)
#WRD.19,-(SP)
#FNC.13,-(SP)
#PHR.8,=(SP)

8226

#FOR.FMT ,-(SP)

#5,-(SP)

14
10$
R2
R2,#100

WRD.CNT
WRD.CNT,
«

WRD.CNT
WRD.CNT,

8227
8219

8215
8236
8239

[0.BUF (R1)

.WORD
.WORD
.WORD

140
SYNC

BLE
BIT
BNE

WRD.(NT
WRD.CNT,»

11%

INC
CMP

8213

;
;

BEQ

MOV
MOV
MOV
MOV
MOV
MoV
MOV
TRAP
ADD

TOPS
PA:<

8215

CLR

TRAP

062264
062266

062272
17399 062276

17400
17401
17402
17403

MOV
ASL
(MP

TST

R2
#-1,3ML.REG+30
gHL.REG'SO

8CC
CLR

MOV
MOV
MOV
MOV
MOv
MOV
MOV
TRAP

1
1
1
1

MOV
1578
BPL
ROR

BEQ
TRAP
.WORD
.WORD
. WORD

374 062172
-

1
1
1
1
1

370 062156
371 062164

o
o

NN
NN~
~NO W

22-0ct-198 0 10: 47:44
22-0ct=-198 0 10: 45:32

8242

0
#WRD.10,-(SP)
#WRD.19,-(SP)
#FNC.13,-(SP)
#PHR.9,-(SP)

8243

#FOR.FMT,-(SP)

#5,-(SP)
SP,RO
14
4,sp
12%
R2
R2.#100
9%
#100000,aML
.REG
13%

SP,+

8244
WRD .CNT
WRD.(NT
,»

823
8251

CIMLAAD ML-11 LOGIC

HARDWARD TEST

TEST

MACRO M1113

SECTION

PAGE

348

SEQ 0352
144
: 32

JMLG

062356
062356
062360
062362
062364
062370
062374
062400

TRAP

007136
006040
005750
006542

Mov
Mov
MoV

006504
005414
000006

062404
062410
27 062614
062420
062422
062424
062430

000C16

062432
062434
062636

177346

000001

13%:
14%:

15%:

000207

104466

006000
103773
000207

177236

—

004767

JMP

INC
CMP
BLE
RTS

;
;

062454
062454
062460
062462
062464
062466

Mov
MOV
TRAP
ADD
TRAP
ROR
BHIS

TOPS
PA:<

8254

150
SYNC

8255

#ENC.13,-(SP)
#WRD
.19 = (SP)

#WRD.11.-{SP)
#PHR.1,=(SP)

#WRD .59, - (5P)

#FIV.FuT,=(SP)
26,-(SP)

SP,RO

SP..

8253
8256

n6,SP

RO
15¢%

R3Y
R34

;
;

148
PC

175 words
Poutine Size:
Maximum stack depth per invocation:

TWICE
TWICE,*

81N
8147

11 words

062442
062444
062450
062452

.WORD
.WORD
.WORD
MOv
Mov
Mov

OV
NN —O

17414
17415

23-0C7-80 09:11

JSR

TRAP
ROR

BLO
RTS

PC,$139
66

RO
1%
PC

8259

MACRO M1113

LOG I C TEST
HARDWARD TEST SEC T 10N
CIMLAAD MmL-11

PAGE 349

SEQ 0353

0:647:44
0:45:32

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (82)

BGNTST;

I
T
P
I
P
T
FE
ETEIETEYETE
I
YRR
IR
R
PR

I RN TN RN R

lee
|

i
i
i
;
;
i
i
i
i
i
i

R R
I P RN PR P R

TST 40

TEST NAME:

LAST BLOCK

TEST

TEST THE LAST BLOCK INDICATUR BIT
FOR SETTING/NOT SETTINC AND THE

DSA REGISTER FOR INCREMENTING BY:
1.

DOING MBUS TRANSFERRS AT EACH

BLOCK FROM BLOCK ZERO T0
LAST BLOCK =1 AND TEST LBT
CLEAR AND DSA REGISTER TO BE
INCREMENTED.

TRANSFER

TEST DESCRIPTION:

DO A MBUS TRANSFERR AT

THE

!
!
5

LAST BLOCK.

TEST LBT T0 BE SET AND
TEST FOR CLEAR.
TEST DSA REG Tu BE INCREMENTED.

;

Y ETETEYETE YR TR D TN PR

TEST NUMBER:

;

IMPLICIT

[NPUTS:

10_BUF

A VECTOR OF 256 WORDS WHERE

DATA FOR MBUS READS AND WRITE
FUNCTION ARE

FOUND.

;

A GLOBAL OWN LOCATION TO THIS TEST.

;

local
DODU_FLG;

'DROP UNIT

FLAG

DODU_FLG = ZERO;

incr DSA_CNT
begin
BGNSUB;

from 0 to .L3T_BLK = 1

CLR_MBUS;

OOV
NOWNS
NN =O

AR
WA VAVAVLA
VWAL
[P

e
i
o
o
i
md e
e
e
—

NNNNNNNSNNNNN

17475
17476
17477
17478
17479
17480
17481
17482
17483
17484
17485
17486
17487
17488
17489
17490
17491
17492
17493
17494
17495
17496
17497
17498
17499
17500
17501
17502
17503
17504
17595

ECCDIS = ONE;

MWl = not 255;
MLBA =

17473
17474

17466 sMLG
17467 ;
17468
17469
17470
17471
17472

¢ 12

23-0CT-80 09:11

10 BUF;

MLDA = .DSA (NT;
MLCSY = write;

'D0 XFERRS UP TO THE LAST BLOCK

'DISABLE ECC
'LOAD WORD COUNT
'LOAD UBUS ADRS

'"LOAD DSA WITH DSA CNT

'DO A WRITE FUNCTION

CZMLAAD ML-11 LOGIC TEST

D 12
350

= O 000~

NINONIPNONIRNIAINON)
— —2 —d 2 2

TCPS-20 Bliss~16 v2(206)

PA:<NEALE>BLZML4.BLI.2 (82)

XFER TO COMPLETE

.DRY IS_SET;

it .LBT
then

.SEE

IS_SET

THE LAST BLOCK XFERR BIT SET

'ERROR AND SET DODU_FLG IF
begin
ERRDF (97, ASYNC, 0);
PRINTB (THR_FMT, WRD 27, PHR_S, WRD_29);

W NO VLW

[o Yo -To Yo -To Yo To Yo Jo-Jo To_ Yo Yo ol
NN
N N AN N NN AN N N N N N

v
v
o
ne
8

until

PRINTB (FMT_7,

DODU_FLG = ONE:

SET

.DSA_INT);

end;

if .MLDA neq
then

N 1Y

®s

DELAY UNTIL

.DSA_CNT

¢+

begin
ERRDF (98, ASYNC, 0);

.SEE

THE DSA REG INCREMENTED

'ERROR AND SET DODU_FLG If

NOT

PRINTB (THR_FMT, REG_6, WRD_31, WRD_14);

PRINTB (FMT7, .DSA_INT);
DODU_FLG = ONE;

end;

ENDSUB;

end;

BGNS us;
CLR_MBUS:
ECC” DIS = ONE;
LASY BLK_XFER ();
mLcsY = wWrite;

'DISABLE ECC
'SET UP A LAST BLOCK XFERR
'DO A WRITE FUNCTION

'DELAY UNTIL XFER TO COMPLETE

unti L

A LA U A L A AN N A A AN
[o Yo Yo Yo SV LV AV NP AV 1V,
w N = OO ~NOW
&

G0 0o G0 GO O OO 00 O OO Co OO

Ay
A YA
Y N SEF YR
PSP PTGy

SEQ 0354

2-0ct=1980 10:45:32

R P EI PN PRI T TR

WP
N

o VAUV
o O 00 ~NO

PAGE

2-0ct=1980 10:47:44

PSR TR TR IR TI PRI P TR

NN WA

DN NAWNAUNWNWNVWA
VNN N

2k ulf p o ol W o
N LN U N N AN N NN W
N A NI N NI A ~N
NO VNN~
O Vet RENTe SV N JUF NP Yo XVelo LNTo JV . J JV ~o
A A 2k
— OOV

v VIV
NN AN NN VWA VAN
AL WV NAWNVA

ad e
e

d e

561

SECTION

23-0(T-80 09:11

‘ML

b e e

d e e o e

b =D o

d e e

D d e

D e

D it d D o

D e

D d D o

D oD

d D d o

b ey

NNNSNNNNNNNNNVNNNNNNNNNNNNVNNNNNNNNNN
NN ~

HARDWARD TEST

MACRO M1113

.DRY

IS_SET;

if . MLDA neq
then
begin

.LST_BLK +

ERRDF (101, ASYNC, 0);
PRINTB (THR_FMT, REG_6, WRD_31, WRD_14);

'SEE

DSA REGISTER INCREMENTED

'ERROR AND SET DODU_FLG IF NOT

PRINTB (FMTZ7, .LST_BLK);
DODU_FLG = ONE;
end;

if LBT
then

IS_SET

begin

MLDA = ONES;

it .LBT
then

IS_SET

'SEE

'IF
'SEE

IF LBY BIT SET

SET THEN TRY T0 CLEAR
IFf BIT

CLEARED

HARDWARD TEST

MACRO M1113 23-0CT-80 09:11 PAGE gSi

TEST

SECTION

5EQ 0355

22-0ct-1980 1
22-0ct-1980 1

JMALG

lele]

CIMLAAD ML-11 LOGIC

167:44
145:32

TOPS=20 BlLiss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (8D

NN
SN VIWAWN
[
fol

.ERROR [F NOT
begin
ERRDF (99, ASYNC, 0);
PRINTB (FIV_FMT, WRD_ 27, PHR_2, WRD_11, WRD_17, REG_6);

DODU_FLG = 0

end;

588
589

else

end

begin

ERRDF

(100,

ASYNC,

'LBT NOT SET
'ERROR AND SET DODU_FLG

0);

PRINTB (FOR_FMT, WRD_27, PHR_1, WRD_11, WRD_27);

591

DODU_FLG = ONE;
end;

ENDSUB;
it .DODU_FLG
then

'DROP THIS UNIT

IS_SET

If DODU_FLG SET

begin
DODU (.ML_LUN);

012777
010277
012777
105777
100375

$740:

125632

000040
127442
177770

000007

127174
000002
177400
010342
127136
000061
127144

JSR
(LR

MOV

CLR

127216

1%:

MoV

2%:

TRAP

BISB

MOV

8IC

127200

BI(B
B1SB
B1S8

127246
127130

127132

127100

INC

1%:

MOV
Mov
MoV
MOV
1518
BPL

R1,$SAVEL
R1
R4
LST.BLK,
R2

6%
R2,R3
R3

: DODU.FLG
1 DSA.CNT
: DSA.CNT,e

8261

8304

8306

8329

8307
3308

#40,3ML .REG+40
ML.DUT,RO

2177770,
R0

#7,3ML .REG*40
RO, aML .REG+40
#2.3ML .REG+120
#-400,3ML .REG*10
#10.8UF
, aML .REG+20

R2,aML .REG+30

261,
aML .REG

gzL.REG‘SO

¢«
DSA.CNT,

OO NN
= O

121344

LN AN LM AN N

004167
005001
016704
005002
000541
010203
005203
104402
152777
016700
042700
1462777
150077
152777
012777

el
o
i o
e

ENDTST;

8390

[o -Te Yo Yo -Jo .To )

d e
d
D
D el
d o
D
d
-

062470
062474
14 062476
062502
062504
062506
062510
062512
20 062514
062522
622 062526
062532
062540
062544
062552
062560
062566
062572
062600
062604

NNNNNNNNNNY
oooocccoo

DOCLN;
end;

MACRO M1113

CIMLAAD ML-11 L 06lC 1 EST
HARDWARD TEST S ECTION
17633
17634
17635
17636
17637
17638
17639
17640
176461
17642
17643
17644
17645

062606
062614
062616
062620
062622
0626264
062626
062632
062636
062642
17646 062646
17647 062652
17648 062654
17649 062656
17650 062660
17651 062664
17652 062670
17653 062672
17654 062674
17655 062700
17656 062704
17657 062710
17658 062712
17659 062714
17660 062716
17661 062720
17662 062722
17663 062726
17664 062732
170665 062736
17666 062742
17667 062746
17668 062750
17669 062752
17670 062754
17671 062760
17672 062764
17673 062766
17674 062770
17675 062774
17676 063000
17677 063002
17678 063004
17679 063006
17680 063010
17681 063012
17682 063014
17683 063016
17684 063024
17685 063030
17686 063034
17687 063042

23-0(T-80 09:11

F 12
PAGE 352

SEQ 0356

4 2-0 ct=1980 10:47:44
P4 2-0 ct=1980 10:45:32

;figk

032777
001433

002000

127134

104455

000141
0074644
000000
012746
012746
012746

BI7
8tQ

#2000,
3ML .REG*S0

8320

8323

.WORD
.WORD
.WORD

141
asvnc
#WRD.29,~SP)
#PHR .S, =(SP)

8324

TRAP

006142
006646
006134
005366
000004

MOV
MoV
MOV
MoV
MoV
Mov
TRAP
MoV
MOV
Mov

004520
000002

MoV
TRAP
MOv

000001
000016

127020

ADD

CMP
BEOQ

TRAP

.WORD
.WORD
.WORD

005774
006164
007342
005366
000004

MOV
MOV
MOV
MOV
Mov
MoV
TRAP
MOV
MOV
MOV
MOV
TRAP

004520
000002
000001
000016

5¢:

6%:

000040

126714

000007

126676

127140
177770

150477

126672

7%:

TOPS
PA.<

#wRD
.27 ,-(SP)

FTHR.FAT,=(SP)
24,-(SP)

SP.RO

14
R2,(SP)
REMT.7,-(SP)
#2,-(5P)
SP.RO
14
.R1
#6,5pP

Mov

BIC
BI(B
BISB

8325

SP..

; *,DODU.FLG

5%
5§
142

8326
8322
8329
8332

asvnc

8333

#WRD.14,-(SP)
#WRD.31.-(SP)
#REG.6,-(SP)

STHR.FAT,=(SP)
86 ,-(SP)

SP.RO
14
R2,(SP)
#FERT.7,-(SP)
#2,-(SP)
SP.RO

ROR
8LO
INC
(MP
BLT

TRAP

; DSA.CNT,
e

amL .REG+30.R3

MoV
ADD
TRAP

BISB

: SP,*

SP,*

;

T
DSA.ON,»

SP,»

;

*,DODU.FLG

; DSALONT
: DSA.UNT,»
#460,aML .REG4D
ML.DUT, R4

17777084

#7,3ML .REG+40
R4 .SML .REG40

8334

MACRO M1113 23-0(7-80 09:11 PAGE %53

CIMLAAD M -11 (0 GIC 1 £ES”
HWARDWARD TEST SE CTION
17689
17690
17691
17692 063046

1769% 063054

17694 063060

17695
17696
17667
17698
17699
17700
17701
17702
17703
17704
17705
17706
17707
17708
17709
17710
b
D o
D
D
od
o
D e
d
)

105777
100375

104414

NSNNN NNSNNNNNNYN
~~ NN NSNSNSNNNNN ~
e ~N ANIAD —d b —d e b oD s LV ~N = O 000 NOWN
N ~N

004767
012777

0C000°2

126744

000061

126612

127514

126656

8158
JSR

MOV
1518

8PL
MOV
INC
cmp
BEQ

125234
126622

104455

TRAP

.WORD

Mov
MOV
MoV
MOV

TRAP

125160

004520
000007

012701
062706
032777

000001
000016
002000

012777
032777
001457

177777
002000

001440

.WORD
.WORD
Mov
MOV

005774
006164
007342
005366
000004

016716
012746
012746
010600
1044614

126562

9%:

126512

126524

000143
007444

e
i
el
) el el
—h

10%

000000

ML .REG+SO
8%
LST.BLK,R?

8351

akL.REG+30,R2
9%
55

8354

#WRD .14, = (SP)

8355

145
8sv~c

#WRD.31.=(SP)

#REG.6,-(SP)
STHR.FRT,=(SP)
#4,-(SP)

SP RO

14
LST.BLK, (SP)

TRAP

.WORD
.WORD
.WORD

;

SP,e

8356

NEMT.7
. <(SP)

#2.-(SP)
SP RO
14
R
06,5P

B8R

8344
8345
8349

PC,LAST.BLK.XFER
#61,8ML.REG

TRAP

MoV
Mov
MoV
MOV
MoV
Mov
MoV
MOV
TRAP
MOV
ADD

000001
000016

8343

BIT

BEQ
MoV

T0PS
PA:<

#2,3ML.REG+120

#2000,
3ML .REG*SO
108
#-1,3ML .REG+30
#2000,
3ML . REG+50

BIT

.WORD
.wORD
.WORD

007342
006022
005750
006560
006134
005414
000006

063314
063316

MOV
Mov
MOV
MOV
TRAP
MOV
ADD

BEQ

104455

D el e

152777

900145
007444
000000
012746
012746
012746
012746
012746
010600

7725

22-0ct-1980 10:47:44
22-0ct=1980 10:45:32

H. T

016722
005202
027702
001434

17711

SEQ 0357

SP,e

*,DODU.FLG

8357

8353
8360
8363
8365

11¢

8368

143

ASYNC

8369

#REG.6,- (SP)

#WRD .17, -(SP)

#WRD.11.-(SP)
#PHR.2,<(SP)

#WRD.27,-(SP)

#FIV.FAT,-(SP)
26,-(SP)

SP RO

14
2R

216,5P
1$

144

ASYNC

SP,e
*,D0DU.FLO

8370
8367
8360
8376

CIMLAAQ ML=11

HARDWARD

17745
17746
17747
17748
17749
17750
17751
17752
1775%
17754
17755
17756
17757
17758
17759
17760
17761
17762

17763

17764
17765
17766
17767
17768
17769
17774
17775
17779
1778%
17784
17785
17786
1787
17788
177389
17790

TEST

LOGIC

MACRO M1113

TEST

PAGE

12
354

SEQ 0358

SECTION

: 44
22-0 ct-1980 10 147
22-0 ct-1980 10: 45:32

JMLG
063320
063324
063330
063334
063340
063344
063350
063352
063354
063360
063364
063366
063370
063372
063374
063376
063402
063404
063406

006134
005750
006542
006134
005400
000005
000001
000014

MoV
MOv
Mov
Mov
MoV
MOV
MOV
TRAP
MoV
11%:

104444

000207

12%:

.
©

063410

063410
063414
063416
063420
063422

004767

104466

177054

103773

000207
.
;

17798 ;

83N

'<BLF/PAGE>

MOV
TRAP
TRAP

RTS

Routine Size:

Maximum

1640::
1%:

006000

17796

ADD
TRAP
ROR

BLO
DEC
BNE

126564

17791

17797

23-0(T-80 09:11

stack

JSR
TRAP
ROR
BLO
RTS

Routine
Maximum

Size:
stack

TOPS

PA:<

8377

#WR
.27 ,-(SP)
D
#WRD.11,-(SP)
#PHR.1,=(SP)

#wRD .27, -(sP)

#FOR.FMT,-(SP)

#5,-(SP)

SP,RO

LR
#4,5¢p

SP,»
*,D0DU.FLG

8378
8375
8379

DODU.FLG

8383

RO
78
R1

;

12%

ML .LUN,RO

8386

44
PC

8261

232 words
depth per invocation:

12 words

8388

PC,8T40
66
RO
1%

6 words
depth per

1nvocatior:

0 words

CIMLAAQ ML-11 LOGIC TEST

HARDWARD TEST

17800 MALS
17801 ;
17802
17803 ;

EIEYE

0o 0o J0 OO

OO0V~

——

d nd e
d
D
D
d
D
D
D
D
d
-l

NN
W

D
)
D
i

NN
AN AN
N AN
o
~NOVN
SN

D
e wd
il il
—

~ N NN

d el

NN~NN

) e

NSNNSNSNSNSNSNNSNNSNSNN ~
[o - Jo Jo -To Yo Yo Yo Yo o Jo o Jo.} o 0o
~N N
b d e e cod ed o ed d =4
=4
Py
OOV
NN
NN — [@RVe]o]

17804
17805
17806
17807

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE

1 12

355

SEQ 0359

22-0ct-1980 10:47.46
22-0ct=1980 10:45:32
8392
8393
8394
8395
8396
8397
8398
8399
8400
8401

8402
8403
8404
8405
8406
8407
8408
8409
8410
8411
8412

8413
8414
8415
8416
8417
8418
8419
8420
8421
8422
8423
8424
8425
8426
8427
8428
8429
8430
8431
8432
8433
8434
8435
8436
8437
8438
8439
8440
B44
8442
8443

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZMLGL.BLL.2 (83)

]

;

BGNTST;
‘es

TEST

NUMBER:

TST

§ TEST NAME:

INVALID ADRS TEST

g TEST DESCRIPTIGN:
;
;

TEST

THE

DETECTION OF

ADDRESSES BY:

JLLEGAL DSA

DOING A MBUS WRITE FUNCTION
AT ALL POSSIBLE ILLEGAL DSA
ADDRESSES AND TEST THE

IAE BIT

SET.

INPUTS:

IMPLICIT

10_BUF

A VECTOR OF 256 WORDS WHERE
DATA FOR MBUS READS AND WRITE
FUNCTION ARE

FOUND.

A GLOBAL OWN LOCATION TO
THIS

TEST.

tocal
TAE_CNT;
IAE_CNT =

'INVLID ADRS COUNT

'TEST FOR ALL

begin

IAE_CNT =

BGNSUB;

_JAE_CNT +

CLR_MBUS;

MLDK = .I1AE (NT;
MLWC = not 255;
MLBA = 10_BUF;

MLCSY

= write;

if .IAE
then

IS_NOT_SET

begin

ERRDF

BLOCK + 1

'START AT LAST

.LST_BLK;

(102, ASYNC, 0);

' INCREMENT

INVALID ADDRESSES

1AE_CNT

'LOAD
iLOAD
'LOAD
iDO A

DSA
WORD COUNT
UBUS ADRS
WRITE FUNCTION

'SET

'ERROR

1AE SET
IF

NOT SET

PRINTB (FIV_FMT, WRD_S30, PHR_1, WRD_11, WRD_30, WRD_10);

CIMLAAOD ML-11

HARDWARD

TEST

K
R
TR

17862
17863
17864
17865
17869
17873
17874
17875
17876
17877
17878
17879
17880
17881
17882
17883
17384
17885

17861

17856 ‘ML
17857
17858
17859
17860

063424
063426
063432
063434
063436
063444
063450
063454
063462
063466
063472
063500
063506
17886 063514
17887 063522
17888 063524
17889 063526
17890 063530
17891 063532
17892 063534
17893 063540
17894 063544
17895 063550
17896 063554
17897 063560
17898 063564
17899 063570
17900 063572
17901 063574
17902 063600
17903 063602
17904 063604
17905 063606
17906 063612
17907 063614
17908 063616
17909

LOGIC

MACRO M1113

TEST

SECTION

23-0(T-80 09:11

PAGE

J 12
356

SEQ 0360
144

:32

8444
8445
8446
8447
8448
8449
8450

ENDTST;

010146
016701

124702

005201

10440¢
152777

016700
042700
162777
150077

010177
012777
012777
012777
032777
001026

end;

ENDSUB;
end

untiv

JAE_CNT eql X0'177777°;

$T41:
1%:

000040

126274

000007

126256

010342
000061
002000

126210
126212
126164
126236

126520
177770

126252
126236
177400

2%:

104414

062706

104467

006000
103713
020127
001307
012601
000207

177777

R1,-(SP)

LST.BLK,R1

;

TESTED

*, JAE.CNT
TAE.CNT

8390
8427
8431

MOV

BISB

#40,aML .REG+40
ML.DUT,RO

MOV
MOV
MOV
MOV

#7.3ML.REG+40
RO.aM. .REG+40
R1.aML.REG+30
#-400,3ML .REG+10
#10.BUF
,aML .REG+20
#61.aML .REG

ggooo,anL.aeoooo

8434
8435
8436
8437
8439

TRAP

8442

.WORD
.WORD
.WORD

'REPEAT UNTIL ALL

INC

TRAP

BIT
BNE

005740
006156
005750
006542
006156
005414
000006
000016

MOV
MoV

BIC
BI(B
8158

104455
000146

007444
000000
012746
012746
012746
012746
012746
012746
012746
010600

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BL2MLG4.BLI.2 (83)

MoV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
TRAP

ROR
BLO
(MP
BNE
MoV
RTS

84632

$177776.R0

;
:

[AE.CNT,

146

SSYNC

8443

#WRD.10,-(SP)
#WRD.30,-(5P)
#WRD.11,-(SP)
#PHR.1,-(SP)
#WRD.30,-(SP)

#FIV.FAT,=(SP)
#6,-(SP)

SP,RO

80Me6,5p

R1,#-1
1%

(SP)+,R1

SP,¢

8441
B4k

:
;

TAE.CNT,»

8448

8390

CIMLAAD ML-11 LOGIC

HARDWARD

TEST

MACRO M1113

TEST

SECTION

23-0(T-80 09:11

K 12
PAGE 357

SEQ 0361
“0ct=1980 10:47:44
=0ct=1980 10:45:32

ML&
.
;

063620
063620
063624
063626
063630
063632

004767

104466

177600

T41::
1%:

006000

103773

'<BLF/PAGE>

62 words
depth per

JSR
TRAP
ROR

PC.8TAY
66
RO

RTS

BLO

000207

84651

Routine Size:
Maximum stack

Routine Size:

Maximum stack

_
inyocation:

8 words

8448

6 words

depth

per

TOPS
PA:<

inyvocation:

0 words

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

17986

17985

17984

17983

PIL

AR I

IRWA

IRP

IRI

17946 ;MLG
17947 ;
17948
17949
17950
17951
17952
17953
17954
17955
17956
17957
17958
17959
17960
17961
17962
17963
17964
17965
17966
17967
17968
17969
17970
17971
17972
17973
17974
17975
17976
17977
17y78
17979
17980
17981
17982

17987
17991
17995 063634
17996 063642
17997 063646
17998 063652
17999 063660

MACRO M1113

SECTION

23-0C7-80 09:1%7

PAGE

L 12
358

SEQ 0362

22-0ct-198 8 }8:67:44

22-0ct=-198
8452
8453
8454
8455
8456
8457
8458
8459
8460
8461
8462
8463
8464

8465
8466
8467
8468
8469
8470
8471
8472
8473
8474
8475
8476
8477
8478
8479
8480
8481
8482
8483
8484
8485
8486
8487
8488
8489
8490
152777

016700
042700
142777

150077

:45:32

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BLZMLG.BLT.2 (84)

BGNTST;
lee
|

i
i
;
i
|
i
i
i
i
|
i
i
i
i

TEST NUMBER:

TST &2

TEST

NAME:

ADRS OVERFLOW BIT

TEST

DESCRIPTION:
TEST THE DETECTION OF

THE

TEST

ADDRESS OVERFLOWS BY:

STARTING AT

LAST BLOCK DO A TWO BLOCK

READ THE AOE BIT SET.

TRANSFER.

IMPLICIT INPUTS:
10_BUF

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE
FUNCTIONS ARE

FOUND.

CLR_MBUS;

MLWE = not 511;

‘00 TWO BLOCK XFERR
'LOAD UBUS ADRS

MLBA = 10 BUF,

MLDA = .LST_BLK;
MLCST

'START AT LAST BLOCK
‘DO A WRITE FUNCTION

= write;

'DELAY UNTIL XFER

0
until .DRY
if .AOE
then

IS_SET;
!SEE

IS_NOT_SET

begin

ERRDF

PRINTB
end;

TO COMPLETE

'ERROR

(103, SYNC, 0)

(FOR_FMT, WRD_26,

PHR_1,

WRD_11,

AOE

SET

[F NOT SET

FNC_19);

ENDTST;

000040
126322
177770
000007
126054

126076

126060

$T142:

8158
MOV

BIC
BI(B
B1SB

#40,aML
. REG+40
ML.DUT,RO

$177776,R0

#7.3ML.REG+40
RO.aML .REG+40

8453

CZMLAAD ML-11 LOGIC

—

[0 P

r Qe G S

OV
~NO VW

d
b
)
D
el
i

Qo 0o OO 0o O 00 OO 00 0o
[elelelaloleoleoles]

TEST

SECTION

23-0(T-80 09:11

m12
PAGE 359

SEQ 0363
144
1 32

063772
063774
063776
064002

010342

wooO~
~NOOO
orOnN)
—
S2POOON

177000

124430
000061
126030

001000

126030

063664
063672
063700
062706
063714
063720
063722
063730
063732
063734
063736
063740
0637642
063746
063752
063756
063762
063766

—

18001
18002
18003
18004
18005
18006
18007
18008
18009
18010
18011
18012

TEST

LS,
%Y, V1. ¥}

HARDWARD

MACRO M1113

1%:

006126
005400
000005

062706
000207

000014

’%:

:
;

064004
064004
064010
064012
064014
064016

004767

104466

006000
103773
000207

177624

8483

BNE

3)
55

.WORD
.WORD
.WORD

007230
005750
006542

#1000,aML .REG+60

#-1000,3ML .REG+10
#10.BUF
,aNL .REG+20

TRAP

012746

i:L.REG*SO

8474
8475
8476
8477
8481

MOv
MOv
Mov
MOv
1578
BPL

BIT

Mov
MoV
MoV
MOV
Mov
Mov
MOV
TRAP
ADD
RTS

LST.BLK,aML .REG*30

261 ,3ML.REG
1

8487

#FENC.19,-(SP)
#WRD .11, -(SP)
#PHR
. 1,-(SP)
#URD.26,-(SP)

#FOR.FMT,=(SP)

#5,-(SP)

SP,RO

;

14
#14,5P

PC,8T42

RTS

RO
19

SP,»

8489
8450

JSR
TRAP
ROR

BLO

8486

147
SYNC

Rougine Size:
52 words
Maximum stack depth per

T42::
1%:

TOPS
PA:<

invocation:

6 words

8488

CIMLAAO ML-11 LOGIC

HARDWARD

18053
18054
18055
18056
18057
18058
18099

TEST

18069
18070
18071
18072

18073
18074
18075
18076
18077
18078
18079
18080
18081
18082
18083
18084
18085
18086
18087
18088
18089
18090
18091
18092
18093
18094
18095
18096
18097
18098
18099
18100
18101
18102
18103
18104
18105
18106

MACRO M1113

SECTION

23-0(T-80 09:11

PAGE

N 12
360

SEQ 0364

.mLé
;
;
;

;
;

18060 ;
18061 ;

18062
18063
18064
18065
18066
18067
18068

TEST

;
;
;
;
;
;
;

;
;
;
:

;
;
;
:
;
:
:
;
;
;
;
;
;
;
;
;
;
;
;
:
;
;
;
;
;
;
;
;
;
;
;
;
;
;

18107 ;

TOPS=20 Bliss=16 v2(206)

: 32
8492
8493

8494
8495

8496
8497

8498
8499
8500
8501
8502
8503
8504

8505
8506
8507
8508

8509
8510
851
8512
8513
8514
8515
8516
8517
8518
8519
8520
8521
8522
8523
8524
85¢5
8526
8527
8528
8529
8530
8531
8532
8533
8534
8535
8536
8537
8538
8539
8540
8541
8542
8543

PA:<NEALE-BL2MLGL.BLI.2

)

BGNT ST:
lee

LT ST NUMBER:

TST 43

| TE ST NAME:

SYNC BUS PARITY

]

'
i
i
i

TE ST

]

i
i
)
i
]

i
i
i
i
'

DESCRIPTION:
TEST ABILITY OF
GOOD PARITY BY:

TEST

SYNC BUS TO DETECT

AND GENERATE

VIA MBUS WRITE FUNCTION WRITE ALTERNATING ONES AND ZEROES
DEVICE AND READ THE DPAR BIT CLEARED.

THE

REPEAT WITH SHIFTED DATA

VIA MBUS READ FUNCTION READ THE ALTERNATING PATTERN AND MDPE CLEARED.

IMPLICIT INPUTS:
10_BUF

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITES
FUNCTIONS ARE

it . PAR_DIS
then
begin
PRINTB

FOUND.

1S_SET

(THR_FMT,

EXIT_TST;
end;

'SEE
FNC_3,

CLR_ MBUS;
BAl = ONE;
10_8 UF = X0'125252"';

incr TWICE from 0 to 1
begin
BGNSUB.
GD_BLK_XFER ();

WRD_7,

WRD_37);

PARITY

IS DISABLED

'PRINT MESSAGE

AND EXIT

'SET

10 BUF

ON FIRST

TST

ADRS

'ALTERNATE 1, 0 PATTERN
do

‘REPEAT

LOOP TWICE

MLTST = write;

!SET UP A GOOD BLOCK XFERR
'00 A WRITE FUNCTION

'DELAY UNTIL

until

XFER

TO COMPLETE

.DRY IS_SET;

if .DPAR
then

[S_SET

!SEE

begin
'ERROR
ERRDF (105, SYNC, 0);
PRINTB (FOR_FMT, WRD_23, WRD_6, WRD_7, WRD_9);

end;

DPAR GOT

SET

VYES

(85)

CIMLAAD ML-11 L 0GIC TEST
S ECTION

23-0CT-80 09:11

PAGE

B 13
361

)
WA
N
I
N
W
I
WA
I
T
TR
P ETR
IETE
IR
IR
TR
LI
ALR
A S]
K
X
A
R
I
R
PO
LIPS

064020
064022
;8 064030

SEQ 0365

22-0ct=1980 }8:67.144

JMLG

(=]
WWNANAN NN NN NP NN PRONININ) b b ed ed b Db b e
CWVBWN 200V
NO VNS WWN 2O OV
N VWS WD =2O 0

HARDWARD TEST

MACRO M1113

:45:32

22-0ct=-1980
8544
8545
8546
8547
8548
8549
8550
8551
8552
8553
8554
8555

8556
8557
8558
8559
8560
8561
8562
8563
8564

8565
8566
8567
8568
8569
8570
8571
8572
8573
8574

8575
8576
8577
8578
8579
8580

010146
026727
001021
012746
012746
012746
012746

10 BUF

SHIFT THE

.10 _BJF*ONE;

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2 (85)

10_BUF § REPEAT

'CLEAR OUT ERROR REG & REPEAT

MLER = ZERCES;
ENDSUB;
end;

incr TWICE from O to 1
begin
BGNSLB;
CLR_MBUS;
BAl = ONE;
GD_BLK_XFER ();

'"REPEATE

LOOP

'SET ON FIRST

TWICE

[0 BUF

ADRS

'SET UP A 500D BLOCK XFERR

MLTSY = read:

‘D0 A READ XFERR

.DELAY UNTIL XFER TO COMPLETE

until

.DRY

it .MDPE
then

!SEE

IS_SET

begin
ERRDF

PRINTB
end;

ENDSUB;
10_BUF =

]S_SET;

(106,

SYNC,

IF READ GENERATED BAD PAR[TY

'ERROR IF MDPE SET

0);

‘FOR_FMT, WRD_23, WRD_6, wkD_7, WRD_8);

GD_BLK_XFER T);

MLTST = wrate;

.MAKE DATA PATTERN HAVE ONE LESS ONE
!SET UP A GOOD BLK XFER
'CHANGE THE BACKGROUND IN MEMORY

'DELAY UNTIL

,10_BUF“ONE;

0
until .DRY [S_SET;

YFER TO COMPLETE

end;
ENDTST;

124302

006232
005676
006774
005365

000001

$743:

MoV
(mp

R1,=-(SP)

;

8490
8517

MOV
MoV
MOV
MOV

#IRD . 37,-(SP)
#WRD
., 7,-(SP)
#FNC.3,-(SP)

8520

BNE

PAR.DIS. M
1%

#THR.FAT,-(SP)

CIMLAAD ML=-11 LOGIC

HARDWARD

TEST

MACRO M1113

SECTION

¢ 13
362

SEQ 0366
'3 7:44

064150
0646156
064162

064164

064172
064174
064176
064200
064202
064204
064210
064214
064220
064224
064230
064234
064236
064240
064244
064250
064254
064256
064260
064262
064264
064270
064272
064274
064276
064304

064310
0646314
064322
064326
064334
064340

016701
042701

162777
150177
152777

012767
005001
104402

004767
012777
105777
100375
132777

001424

104455
000151
007500
000000
012746

012746
012746
012746
012746
012746

010600
104414
062706

006367
005077

104467

126062
177770
000007
125614
000010
12525¢
126172

1
00

125566

000040

125636

1%:

125606
12420¢

125566

000014

124072
125504

003724
005001

104402

152777

000040

125434

000007

125416

000010

1256406

000071

125332

125660
177770

125412

004767
012777

126202

5%:

QML .REG+40

JSR

MOV
1ST8

BPL
BIT8
BEQ

MOV
MOov
MOV
MOV
Mov
MOV
MOV
TRAP
ADD
ASL

CLR

TRAP
ROR

000001

TRAP

.WORD
.WORD
. WORD

005726
005676
005670
006076
005400
000005

$177770,
R

#7,3ML .REG+40

MOV

CLR

PC,GD.BLK.XFER
261 ,3ML .REG

aML .REG+50
38

8158

MOV

BIC
BI(B
B1SB
8158
JSR
Mov

TWICE

8525
8526
8528
8529
8531
8532
8536

8538

#40,aML.REG+60
3]

8541

151
SYNC

8542

#WRD.9,-(SP)

FURD.7.=(SP)

#WRD .6 .- (SP)

#RD.2%,-(sP)

SFOR.FMT,-(SP)
5,-(SP)

SP RO
14

SP,¢

8540
8545
8546

#4,SP
10.BUF

anL.REG+60

BLO
INC
CMP
BLE
CLR

TRAP

8517
8519
8522

9%
#40,
ML .REG+40
ML.DUT .R

10, aML .REG+40
#-55526,10.BUf

TRAP

006000

103730
005201
020127

MOV

8IC
BI(B
BISB
BISB

125620

125522

8158

63
#12,5P

152777

TOPS

PA:<

5P,¢

000012
000402
000040

06 ,-(SP)
SP RO

062706
000167

104414
104463

MoV
MOv
TRAP
TRAP
ADD
JMP

~
(v

00000¢

064144

012746
010600

D
D
D
D
d
D
i
D e
d
e
D
—
! i

Lol ol ol elol el oloXe Jo To T
To Yo Yo To Yo Jo BV
NOWVMSWN=O
YO NOWVEWN 20O

064052
064056
064060
064062
064064
064070
064074
064102
064106
066112
064120
0646124
064132
064140
064142

4 5:32

®e

b
b

D
D

o
P

D
D
D
D
D

D
D

el
e e

d o
b

d
)

Jo Jo To To -Jo To Jo To To To To To Yo -To -To Jo Jo -To Jo To To Yo Jo Jo Jo Jo Jo JoJ

166

el
e

PAGE

JMLé

(o Joofo o

— e

23-0CT-80 09:11

#4C,
ML . REG+40

ML.DUT,RO

;

TWICE
TWICE,»

8528

TWICE

8550
8551
8552

#177776,R0

87,3 .REG+40
RO, OML .REG+40

110,
aM .REG+40
PC,GD.BLK.XFER

#71,aML .REG

8554
8555
8550

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

D 13
PAGE 363

SEQ 0367

22-0ct=198 01
22-0ct-198 01

JMLG
064346
064352
064354
064362
064364
064366
064370
064372
064374
064400

0646404
064410
064414
064420
064424
064426
064430
064434
064436
064440
064442
064446
064452
064460
064464
064466

064470
064474
064476
064500

064502
064502
064506
064510
064512
064514

105777
100375

032777
001426

6%:

125376

000400

125356

104455

000152
097500
000000
012746
012746
012746
012746
012746
012746
010600
104414
062706

106467

006000
103715
006367
004767
012777
105777
100375
005201

000014

123674
126070
000061
125264

020127
003677
012601
000207

000001

004767

177312

104466
006000
103773
000207

7%:

8560

BIT
BEQ

#400,3ML .REG*+40
7%

8562

.WORD
.WCRD
.WORD

152
SYNC

BPL

MoV
MOv
MOV
MOV
MOV
MOV
Mov
TRAP
ADD
TRAP

ROR
BLO
ASL

125220

JSR

8%:

143::

TOPS
PA:<

2:L.REG*50

TRAP

005712
005676
005670
006076
005400
000005

146744
:65:32

1518

MOV
1578

BPL
INC

8565

8566

#WRD.8,-(SP)
#WRD.7.=(SP)

#WRD .6 .~ (SP)

#WRD .25, -(sP)

FFOR.FMT,=(SP)

#5,-(SP)

SP'.

SP RO

14
24, SP

8564
8567

5$
10.BUF

8570

8571

PC.GD.BLK.XFER
261,
3ML . REG

ML _REG+S0
8%

8572
8576

;o
;

TWIC
TWIC

ST TN LN
S e S L A
NI ~N
s LN N N RN R RO PO RO NI RO NI PO A ~N
VSN
2O 000 NN
—o
WWW
oo ~ O

N [aSIaST ST NT

s
b
D
d
D
b
D
h ad o
b
b ok
D
d
b
e

00 00 00 00 00 00 0o 0O OO 00 Co 00 0o 00 0o OO OO OO o ]

HARDWARD

TEST

e]le)

CIMLAAO ML-11 LOGIC

8550

(Mp
BLE

M
R1,
5%

(SP)+,R1
PC

8490

JSR

PC,8T43

8578

ROR
BLO
RTS

RO
1%

Mov
RTS

TRAP

[

CIMLAAD ML-11 LOGIC

HARDWARD TEST

18277
18278
18279
18280
18281
18282
18283
18284
18285
18286
18287
18288
18289
18290
18291
18292
18293
18294
18295
18296
18297
18298
18299
18300
18301
18302
18303
18304
18305
18306
18307
18308
18509
18310
18311
18312
18313
18314

TEST

SECTION

23-0(T-80 09:11

PAGE

8582
8583
8584
8585
8586
8587
8588
8589
8590
8591
8592
8593
8594
8595
8596
8597
8598
8599
8600
8601
8602
8603
8604
8605
8606
8607
8608
8609
8610
8611
8612
8613
8614
8615
8616

18316 ;
18317 ;

8618
8619

18315 ;

;
;
;
;
;
.
;
.,
;
;

18328 ;

18329 ;
18330 .
18331 ;

E 13
344

SEQ 0368

22-0ct=1980 10:47:44
22-0ct-1980 10:45:32

:MLL
;

;
;
.
;
;
;
.
;
,
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
.
;
;
.
;
;
;
:
;
;

18318
18319
18320
18321
18322
18323
18324
18325
18326
18327

MACRC M1113

8617

8620
8621
8622
8623
8624
8625
8626
8627
8628
8629

8630

8631
8632
8633

TOPS=20 Bliss=16 v2(208)

PA:<NEALE>BLZ2MLL.BLI.2

]
]

BGNTST;
‘ee
]

i
;
;

;
i
;
i
;
g

TEST NUMBER:

TST 44

TEST

NAME:

WRITE

TEST

DESCRIPTION:
PROVIDES A MBS

READ/WRITE

DATA TRANSFER TROUBLE
LOOP BY:

LOAD APPROPRIATE

LOAD APPROPRIATE RH REGISTERS

DO A WRITE

;
t

DO A WRITE

SHOOTING

IMPLICIT

RH REGISTERS.

FUNCTION.

CHECK FUNCTION.

COMPI IMENT DATA AND

REPFAT,

i
i

READ ML
M

INPUTS:

10_BUf
A VECTOR OF 256 WORDS WHERE
DATA FOR MBUS READ AND WRITE

;
i

FUNCTIONS

A GLOBAL

TEST,

[}

i
;

FOUND.

OWN LOCATION

THIS

i
local

'TEST

TST_PAT;

TST_PAT

incr

PATTERN

= ONES;

TWICE

beqgin

from O to 1

CLR_MBUS;

BAl = ONE;
10_BUF = _TST _PAT;

'"WRITE

READ 1°'S AND 0'S ON MBUS

'SET ON FIRST

10 _BUF

ADRS

'LOAD FIRST 10_BOF ADRS

MLESY = write;

GD_BLK_XFER (7;

'SET UP A GOOD BLOCK XFERR
.DO A WRITE FUNCTION

'DELAY UNTIL

XFER TO COMPLETE

(86)

C{M_AAD ML-11

HARDWARD

TEST

LO GlC

TEST

MACRO M1113

SE CTION

23-0CT-80 09:11

PAGE

365

SEQ 0369

18333 .mLé

18339

18336
18337
18338
18339
18340
18341

;
;
;
;
;
;

18342 ;
18343
18344
18345
18346
18347
18348
18349
18350
18351
18352
18253
18354 :
18355

18356 ;
18357 .
18361

18365
18366
18367
18368
18369

18370
18571
18372
18373
18374
18375
18376
18377
18378
18379
18380
18381
18382

064516
064522
064526
064530
064536

064542
064546
064554
064560
064566
064572
064576
064604
064610
064612
064620
064624
064630

18383 064636

18384 064642
18385 064650
18386 064654

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2MLGL.BLI.2 (86)

0:67:44
0:45:32

18336 ;

8634
8635
8636
8637
8638
8639
8640
8641
8642

8643
8644
8645

8646
8647
8648
8649
8650
8651
8652
8653
8654
8655

0046167
012701
005002
152777
016700
042700
1462777
150077
152777

010167
004767
012777
105777
100375
152777

016700
042700

142777
150077
152777
004767
012777

until

.DRY

IS_SET;

(LR_ MBUS;

BAl = ONE;
6D _BLK_XFER

MLTST
do

unti L

.SET ON FIRST

= WRT_CHK;

'DO A WRITE

it . WCE
then

'SEE

begin
ERRDF (109,

1ST_ PAT
end;

XFER TO COMPLETE

[S_SET;

IS_SET

PRINTB
end;

ADRS

CHECK FUNCTION

'DELAY UNTIL
.DRY

0 BUF

'SET UP A GOUD BLOCK XFERR

();

IF WRITE CHECK ERROR SET

'ERROR IF

SET

TRBLE_LOOP, 0);
FNC_6, WwRD_10, WRD_12, FNC_5, FNC_6, FNC_3);

(SIX_FMT,

not

'COMPL IMENT TST_PAT AND REPEAT

.TST_PAT;

ENDTST;

$744:

117264
177777

000040

125202

000007

125164

000010
123550

125152

000061
125140

125074

000040

125120

000007

125102

00001C

125070

000051

12501¢

125426
177770

125160
125744

125346
177770

125076

125666

1%:

JSR

MOV

CLR
B1SB
MOV

BI(
B:(B
BISB
B1SB

MoV

JSR

2%:

MOV
1518

BPL
8158
MoV
BIC
8I1(B
B1S8
B1SB
JSR
MOV

R1,$SAVE?

#-1 R
R2

#40,3M
. REG+4D
L
ML.DUT,RO
#1777706.R0
#7,aML .REG+40
RO, ML .REG+40

#10,
ML .REG+40
R1,10.BUF
PC.GD.BLK.XFER
#61,3ML .REG

aML .REG+50
2%

;

«, TST.PAT

TWICE

TST.PAT,»

8580
8622
8674

8625

8627
8628
8629
8630
8634

#40,3ML .REG+40
ML.DUT,RO

077776,
R0

#7,aML .REG*40
RO, ML .REG+40

210,
ML .REG+40
PC,GD.BLK.XFER
#51.aML .REG

8637
8638
8639

MACRO M1113 23-0(T-80 09:11 PAGE gbb

CIMULAAD TM -1 LOGIC TEST

HARDWARD

TEST

SECTION

22-0 ct-1980 10:47:44

JMLG

18388
18389
18390
18391
18392
18393
18394
18395
18396
18397

064662
064666
064670
064676
064700
064702
064704
18398 064706
18399 064710
18400 064714
18401 064720
18402 064724
18403 064730
18404 064734
18405 064740
18406 064744
18407 064750
18408 064752
18409 064754
18410 064760
18411 064762
18412 064764
18413 064770
18414 064772
18415
18416
18417
18422
18423
18427
18431
18432
18433
18434
18435
18436

SEQ 0370

125062

040000

1ST8

BPL

BIT

125042

BEQ

TRAP

.WORD
.WORD
WORD

006774
007030
007020
005760
005740
007002
005432
000007
000020

000001
000207

004767

104466

006000

103773

000207

MOV
MOV
MoV
MOV
MOV
MoV
MOv
MOV
MoV
TRAP
ADD

(oM
INC
(MP
BLE
RTS

;
;

064774
064774
065000
065002
065004
065006

22-0ct-1980 10:465:32

177516

aML
. REG+50
3$

8643

8648

1%:

155

BRBLE.LOOP

#ENC.6,-(5P)

)
#ENC.S,=(SP
5

#WRD.12,-(SP)
#WRD .10, -(SP)
FENC
.4, = (SP)

FSIX.FMT,=(SP)

#7,-(SP)

SP.RO

14
#20,5P

CIST.PAT

R
R2
R2,#
18

;

RTS

TWICE

8647
8652
8626

TWICE,»

85480

PC.T44
66
RO
1%

BLO

8649

#FNC.3,-(SP)

TRAP
ROR

JSR

8645

#40000,3ML .REG*40
31

Routine Size:
87 words
Maximum stack depth per

T44::

TOPS
PA:<

_
invocation:

words

8653

CIMLAAD ML-11

HARDWARD

TEST

18442 JMLS
18443 ;
18444
18445

0GIC

1 EST

MACRO M1113

S ECTION

23-0(T-80 09:11

H 13
PAGE 367

22-0ct=-1980 10:167:44
22-0ct=-1980 10:45:32

184N

18492
18493
18494
18495

18496

s
Ve
Ve
Vs Ve
e
Ve
B e ®e Be Ve Be ®eBe®e By Ve Ve B Go ey %o 8o ®e B 8y e e Ts B¢ s s S0 %5 e Bo Ve Bs Vo Ve Be Ve Vs s S Ve Vs Be

1847
18472
18473
18474
18475
18476
18477
18478
18479
18480
18481
18482
18483
18484
18485
18486
18487
18488
18489
18490

18446
18447
18448
18449
18450
18451
18452
18453
18454
18455
18456
18457
18458
18459
18460
18461
18462
18463
18464
18465
18466
18467
18468
18469
18470

SEQ 0371

8657
8658
8659
8660
8661
86562
8663
8664
8665
8666
8667
8668
8669
8670

8671
8672
8673
8674
8675
8676
8677
8678
8679
8680
8681
8682

]

;

BGNTST:
]

i
;
g

TEST

TEST N AME :

;

TEST

)

;
i
;
i
g

8698
8699
8700
870
8702
8703
8704
8705
8706
8707
8708

PROM DATA TEST

VERIFY
ALL

THAT

PRESENT

CHECK

MEMORY

SUM VALUES FOR
ARRAY

UV PROM

LOCATIONS ARE ERROR FREE BY:
1.

DOING MBUS

TRANSFERS

AT ALL PRESENT BLOCKS
AND TESTING THE UNS BIT
TO BE CLEARED.

i IMPLIC IT

INPUTS:

10_BUF

A VECTOR OF 256 WORDS WHERE
DATA FOR MBUS READ AND WRITE
FUNCTIONS

8684
8685
8686
8687
8688
8689
8690
8691

8695
8696
8697

TST &5

N UMBER:

)

8683

8692
8693
8694

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (87)

FOUND.

CHIP 512

INDITATED THE SIZE OF THE

ARRAY

incr

DSA _CNT
begi n

MODULES MOS

from 0 to

BGNS URB;
CLR_MBUS;
ECC DIS = ONE;
mLwl
not 255;
MLBA
10_BUF;
MLDA
MLCS 1

unt L

.DSA_CNT;

= write;

RAMS,

.LST_BLK do

.WRITE

TO ALL PRESENT BLK'S AND (HE(K UNS BIT

'DISABLE ECC
'LOAD WORD COUNT
‘LOAD UBUS ADRS

"LOAD DSA

'D0 A WRITE
'DELAY UNTIL

.DRY

if . UNS
then

FUNCTION
XFER TO COMPLETE

IS_SET;

1S_SET

‘SEE

XFERR CAUSED AN UNS ERROR

;
;
;
;
;

D —

8726
8727
8728
8729

S w N =2 OO0

104402
152777

016700

d ed

(¥,

D
b
o

end

begin

(FMT_8,

.NEED TO KNOW (HIP SIZE
((.DSA_CNTCI1, 4>)

((.DSA_CNT<9, &>)

1)),

+ 1));

TO PRINT ARRAY NUMBER

164K MOS RAM

116K MOS RAM

end;

012746

begin
PRINTB (FMT_B,

end

551 065140
552 065144
553 065150
554 065154
555 065160
256 065162
57 065164
5 58 065166
5 59 G65172
5 60 065176

SET

.DSA_TNT);

.CHIP_SIZ eql 64

then

PRINTB

004167
016702
005001
000536

.ERROR IF

(TWO_FMT, WRD_35, PHR_4);

PRINTB (FMT_9,

else

065010
065014
065020
065022
065024
065026
065034
065040
535 065044
536 065052
537 065056
538 065064
18539 065072
1854C 065100
18541 065104
18542 065112
18543 065116
18544 065120
18545 065126
18546 065130
18547 065132
18548 065134
18549 065136

PRINTB

—O

;

NWOO NN

b e

mummgmmmmmmmmmmmmmmmmmm
VI LTLHA N VLUV
VAN VLN

WA WWANNPOPONIN)
=2 b cd cd ed b ecd d —d b

18505
18506
18507
18508
18509

CO~NO
NN
NN 2 OO

18504

SEQ 0372

begin
ERRDF (107, ARR_DAT, 0);

18502 ;
18503 ;

Y -]

S ECTl

MACRO M1113 23-0(T-80 09:11 PAGE 568

TEST

18498
18499 ;
18500 .,
18501 ;

TEST

[0 Yo Yo -To o
Yo Yo Jo Yo To ]
SNNSNNNSNNNNN

HARDWARD

CIMLAAD ML -1 L 0GIC

ENDSUB;
end;

ENDTST,;

116772
123314

000040

125130

177770
000007
1246662
000002
177400
010342
1246624
000061
124632

040000

$745:

124706

1%:

124734
124616
124620

124632

2%:

R1,$SAVE?
LST.BLK,R2
R1

;
:
: DSA.CNT

8655
8693

8694
8695

;
:
;
; DSA.CNT,e
:
H

8697
8698
8699
8700
8701
8705

#40000,9ML .REG+60

8707

8710

8711

B8R

BISB

#60,9ML .REG+40

BIC
BICB
BISB
BISB
MOV
[0}
[0}
MOV
1578
BPL

#177770,R0
#7,3ML .REG+40
RC,8ML .REG+40
#2,8ML .REG+120
#-400,8ML.REG+10
#10.BUF ,aML .REG+20
R1,8ML.REG+30
#61,3ML .REG
oML .REG+50
2%

TRAP

MOV

124666

124566

JSR
MoV
(LR

BIT

BEQ

TRAP

.WORD

LWORD

ML.DUT RO

153

ARR.DAT

LMWMORD

006630

MOV

#PHR .4 - (SP)

005356
000003

MoV
MOV
MOV

#TW0.FAT,=(5P)
#3,-(SP)
SP.,RO

; SP,e

MOV

R1,(SP)

,»
; DSA.CNT

MOV

SP,RO

000000

006220

MOV

TRAP

004602
000002

MOV
Mov

#WRD .35, -(SP)
14

. 9,-(5P)
#ENT
#2,-(SP)

SP,e

8712

CIMLAAD ML-11 LOGIC

TEST

MACRO M1113

HARDWARD TEST SECTION
18561 065200

18562
18563
18564
18565
18566
18567
18568
18569
18570
18571
18572
18573
18574
18575

18576
18577
18578
18579
18580

065202
065210
065212
065214
065216

065220
065222
065224
065230
065232
065234
065240
065244
065246

065250
065252
065254
065256
065260

18581 065264
18582 065266

18583 065270

104414

026727
001020
010100
006200
006200

0056200
000300
042700
010046
005216
012746
012746
010600
104414

010600
104414

104467

}gggg 065324

000207

18614
1€.1%
18616
18617

065332
065334
065336
065340

000002

000022

006000
103643

005201

18613 065326

RO,=(SP)
(SP)

MOV

b ¥

020102
003640

MOV

5$%:

6%:

;
;

004767

104466
006000
103773
000207

177456

MOV
INC

004546

18591 065316

18596
18597
18608
18612 065326

004546
0C0002

MoV
TRAP

1%:

8714

; DSA.CNT,»

8717

SP,e

:
: DSA.CNT,»

#FEMT .8 ,-(SP)
#2,-(SP)

SP.RO
14

#2°2,5P

ROR
BL"

RO
1%

3P,

;

8714
8721

)

8709

8724

INC

: DSA.CNT

8693

RTS

;

8655

8727

CMP
BLE

K',R2
1%

Routine Size:
103 words
Maximum stack depth per invocation:

T45::

;

48
R1,R0
RO
RO
#177760,R0

ADD

TRAP

SEQ 0373

(HIP.S1Z2.,m00
1%
R1,R0O
RO
RO

RO
RO
#3177760,R0
RO,=(SP)
(SP)
#FMT 8,-(SP)
#2,-(5P)
SP,RO
14

012746

062706

18592 065320
18593 065322

177760

J 13
PAGE 368-1

ASR
SWAB
BIC
MOV
INC
MOV
MOV
MOV
TRAP

177760

010046
005216

18587 065304

18589 045312
18590 065314

(MP
BNE
MOV
ASR
ASR

BR
MOV
ASR
SWAB
BIC

012746

18588 065310

TRAP

000100

000415
010100
006200
000300
042700

18584 065274

18585 065300
18586 065302

123124

23-0CT-80 09:11

JSR

TRAP
ROR
BLO
RTS

PC,$T45
66
RO
1%
PC

;

DSA,.CNT
,»

12 words

MACRO M1°*13

CZMLAAD ML=-11

| 0Gl C TEST
HARDWARD TEST S ECTION
l
18623 ;ML4
18624 ;
18625
18626
18627 ;
18628 ;
18629 ;
18630 ;
18631 ;
18635
18639 065342
18640 065350
18641
18642
18643
18648
18649
18653
18657 065352
18658 065352
18659 065356
18660 065360
18661
18662
18663

18668
18669
18670 ;
18671 ;
18672 ;

27-0CT-80 09:11

K 13

PAGE

369

SEQ 0374

22=-0¢t=-1980 10:47:44
22-0ct=-1980 10:45:32
8731
8732
8732
872
8735
8736
152777

000707

.
'

BGNCLN;

THE

CLEANUP CODING SECTION

HARDWARE

TESTS

104412

[S EXECUTED AFTER
LOGICAL

UNIT,

THE

‘CLEAR

THE

MASS ByS

return;

ENDCLN;

000040

124370

177764

000207

LCLEAN: BISB
RTS

RTS

LASTAD;
BGNSETUP (0);
ENDSETUP;

#40,aML.REG+40

invocation:

.
invocation:

8735

0 words

PC,LCLEAN
12
PC

Routine Size:
& words
Maximum stack depth per

8734
8729

Routine Size:
& words
Maximum stack depth per

LSCLEAN::
JSR
TRAP
.
*

8737
8738
8739

RUN ON

CLR = ONE;

,
;

004767

ARE

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML&.BLI.?2 (88)

0 words

MACRO M1113 23-0(T-80 09:11 PAGE %70

CIMLAAD ML=-11 LOGIC TEST

HARDWARD

18677
18678
18679
18680
18681
18682
18683
18684
18685
18686
18587
18688
18689
18693
18694
18695
18696
18697
18702
18703
18704
18705
18706
18710
18711
18712
18713
18714
18715
18716
18717
18718
18719
18720
18721
18722
18723
18724
18725

18726

TEST

SECTION

SEQ 0375
4 7:44

JMLG

065362
965364
065366

065370
065370

4 5:32

065366
000000
000000

BLSLAS::.WORD
.WORD

065366
000000

LSLAST=

TSFREE::,WORD

TS$FREE
3<T$FREE'<BL$LAS’4>>/2>

4
BLSLAS
0

TSPTHV=

SEND.LINK::

000207

RTS

Routine Size:

0TS external

8736

word

; Maximum stack depth per
8740
8741
8742

0 words

eludom

.GLOBL
.GLOBL

references

BLS$GT2, $SAVES, $SAvi4, $SAVES
$SAVE?Z2, BLSPUZ, BLSGT?

: Size:
: Run Time:

11069 code + 1542 data words
02:15.5

;

103 pages

; Elapsed Time: 04:38.4

000001

invocation:

end

;

T0PS

PA:<

Hemor{ Used:

Compila tion Complete
.END

SEQ 0376

o
[ X~

aDooOGY

[}
T
U
I
[
T
(O
L
LT 2 L I

007622
010342
000100
004000
000041
000041
000041
000041
000041
000041
000041
000041
000040
000041
000041
000041
000041
000041
000041

[ X~}

[alalalalalalalalalalalatalalATaTalATalaTaTaYATAIAY
AT ATAAYAYATATATATAT AT AT AT A

2 OO NO VAL NANN) S b D b D b D e D 2T
A NO VNS NN - O
b

D e

= O

005474
0"5576
002160
002156
002154
002152

FS$AU
FSAU
F$8G
FSCLEA
FS$OU
FSEND
F SHARD
FSHW
FSINIT
F$JMP

007002
007020
007030
007036
007046
007062
005400
000015
000020
000040
000007
000016
000041
000004
000013
000006
000050

EIG.FM=
ELV.FM=
ERRBLK
ERRMSG
ERRNBR
ERRTYP

—h d b d ed md ed

CSRPT = 000025
= 000046
C$SPRI= 000041
CSSVEC= 000037
C$TPRI= 009013
DAT.DM 012626
DFPTBL 002320
DIAGMC= 000000
DIVMOD 003532
011674
DRIVE.
D1.TEM= 007714
D2.TEM= 007716
EF .CON= 000036
EF .NEW= 000035
EF .PWR= 000034
EF.RES= 000037
EF.STA= 000040

004602
006752
007074
037104
007124
007136
007146
007162
007174
007206
007216
007230
006766
007242
007254
007266
006774

000045
000062
000012
000035
000006
000036
000044
000051
CSDRPT= 000024

000047
000033
000003
000021

FMT.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FNC.
FOR.

000041
000041
000041
000167
012574
LAU
004152
LAUTO
004126
LCLEAN 065342
004140
LbU
013636
LD.LNG
LINIT
020600
LOAD.S
012172
040000
LOE
T
000010
LO
004114
LRPT
LST.AR
010340
010334
LST.BL
002110
LSACP
002036
LSAPT
004156
LSAU
002070
LSAUT
LSAUTO
004130
LSCCP
002106
065352
LSCLEA
L$CO
002032
LSDEPO
002011
002130
LSVESC
002076
LSDESP
002060
LSDEVP
LSDISP 002164
002116
LSDLY
002040
LSDTP
LSDTYP 002034
004142
LSOV
002072
LSDUT
LSDVTY
002122
002052
LSEF
002044
LSENVI
002152
LSERRT
TP
002102
LSE
XP
002046
LSE
P4
LSEX
002064
LSEXPS 002066
LSHARD 002344
002120
LSHIME
LSHPCP. 002016
LSHPTP
002022
002320
LSHW
002104
LS$ICP
021512
LSINITY
LSLADP 002026
LSLAST= 065366
002100
LSLOAD
002074
LSLUN
002050
LSMREV
002000
L SNAME
LS$PRIO 002042
[$SRV
[$5U8
[$71S7
JSJMP
LAST.B

000004
000002

000032
000026
000027
000043
000042
000030
000040
000011
000020
000050
000031
000023
000034
000014
000017
000016
000015
000377
000007

OO NO VNS AN
)
—
;;~oco~u>\naw~nannvho

010332
000052
000061
000022

CS$ESEG= 000005
C$EsuB= 000003
CSETST= 000001

aYX~}

= 000400

C$ESCA= 000010

CSREFG=
CSRESE=
CSREVI=
CSRFLA=

M3
PAGE 370-1

000004 6
ESEND
002100
ESLOAD
000035
E2.TEM= 007720
FIRST,
012520
FIV.
005414
FMT.
004164
FMT.
004634
FMT.
004706
FMT.
004742
FMT,
004772
FMT,
005046
FMT.
005106
FMT.
005154
FMT.
005244
FMT.
005300
FMT.
004224
FMT.
004312
FMT.
004336
FMT.
004366
FMT.
004470
FMT.
004520
FMT,
004546

CSERSF= 000054
CSERSO= 000057

C$EXIT=
C$GETB=
CSGETW=
CSGMAN=
C$GPHR=
C$GPLO=
C$GPRI=
C$INIT=
C$INLP=
(SMANI=
=
CSMSG =
CSOPEN=
CSPNTB=
CSPNTF=
CSPNTS=
C$PNTX=
($Qlo =
C$RDBU=

23-0CT-80 09:11
EVL

003340
003740

000053
000003
000055
000056
000060

100000
000004
000010
000020
000040
000100
000200
000400
001000
003714
002760
003102
065362
003726
003470
003244

=
C$EDIT=
CSEROF=
CSERHR=
CSERRO=

[AYaIAX~)

O
£ I T
T
I
T
T
T
1 IO 1 O
T
1 I
T2
T
T T
O
{ IO [
T
L

T I

T T

b ced cd cd o ek
VNS WLIN—=O
N LA

—

—— ——t
—t —t

2 O o o0 [elelelo]
Yor ~Or (VPgV1,8

Pustd Puenl Puml fred feumd
et fu
ot} P
Pt

e
R

Pl P
ot P
Pt ot pum

[ovNeeRooRooRooeRooNooNosRooRoodooNooRooRoodoelooRoo
eo

8170
81700
B1701

]

ARR .16

ASSEMB
ASYNC

007534
010324
010336
000010
00744
000001
000001
0000C2
000004
000010
000020
000040
000100
000200
000400
001000
000002
002000
004000
012000
020000
040000

(22 Y22 Tl

ARR.DA=
ARR
. IN

Il Ayl alalalalalalalalalalalalalalalalalalaalaTAN
AT AT

SYMBOL TABLE
= 000020 G
ADR

MACRO M1113

Z—
o

CIMLAAO ML-11 LOGIC TEST

PNT

006752
006766
006774
007002

177777
177777
177777
177777
1772777

007500
010000
005546
005366
007662
012660

005356
000003
000130
000000
000000

el cnd

600

T$SAVL=
T$SEGL=

065366
000000
000007
000000
000000
€*1900
177777
000000
000021
000000
000000
177777
177717

YY)
(A

007356
007364
004106
004104
004102
012160
012162
012164
005452
002340
005432
011354
011342

o
o
o
o
e

[aIaTAalalaTAYAYATA)

SEQ 0377

011676
007302
007372
007400
007406
007414
007422
007430
007436
007312
007320
007326
007334
007342
007350

006370
006400
006406
006420
006426
006436
006446
006454
006462
006472
006504
006510
006526
006542
006560
006576
006630
006646
006660
006672
006714
006726
006740

b o and el o

006646
006660
006672
006714
006726
001000 6

005712
005726
005740
005750
005760
005770
005774
006006
006014
006022

006360

.AEF
.AEG

007020
007030
007036
007046
007062
007074
007104
007124
007136
007146
007162
007174
007206
007216
007230
007242
007254
007266
007302
007312
007320
007326
007334
007342
007350
007356
007364
007372
007400
007406
007414
007422
007430
007436

OOWVMENNESOONNOON~N—
PO O =
NN S~ POPOND
N (¥,]
=
NN NNNIO
SO O =
OO
MNOMNO & [o 0 2

PHR.
PHR.

OO ~NONA
L NN = =
[=]

PAR.DI
PD.TEM
PHR.
PHR.
PHR.
PHR.
PHR.
PHR.
PHR.
PHR.

005614
005432
005452
005474
005520
005546
005576
005630
005634
005646
005654
005662
005670
005676

JACL
ACM
.ACN
.ACO
.ACP
LACQ
.ACR
.ACS
LACT
.ACU
LACV
CACYW
LACX
LACY
.ACZ
.ADA
.ADB
LADC
.ADD
.ADE
.ADF
.ADG
.ADH
.AD]
.ADJ
.ADK
.ADL
.ADM
.ADN
.ADO
.ADP
.ADQ
.ADR
.ADS
ADT
.ADU
.ADV
.ADW
.ADX
.ADY

.ADZ

OCOOOOOOOODOOOOOO

OSAU
=
O$BGNR=
O$BGNS=
ooy
=
OSERRT=
OSGNSW=
O$POIN=
O0$SETU=

005350
005356
005366
005400

.ACK

006034
006040
006046
006054
006062
006076
006104
006112
006126
006134
006142
006156
006164
006200
006206
006212
006220
006226
006232
006242
006250
006260
006264
006300
006306
006316
006324
006336
006350

ONEF IL=
.} M=
ONE
OP
. NUM
OSAPTS=

005046
005106
005154
005244
005300

.ABU
.ABV
.ABW
.ABX
.ABY
.ABZ
ACA
.ACB
LACC
-ACD
.ACE
LACF
ACG
.ACH
.ACI
ACJ

N 13
PAGE 370-2
VUV VUV VOVOVUVOVUVOVVOUVOVUVOVVUVOVUVIUV
UV
VIUVOVOUVUVOUVOVOVVOUOOUVOOO

NIB.SA
NIN.FM=

002000
000000
000040
000100
000140
000200
000260
000300
000340
002340
010320
004164
004224
004312
004336
004366
004470
004520
004546
004602
004634
004706
004742
004772

23-0CT-80 09:11
OUVUVOVVOVIOVOVVIVIUVUV VUV UVOVOUOUVOVODUVOVUVOVUVIOUVOUOUVUOVOOVOUVOOUO

MSGHZ
4SGH3
MSGH4
MSGHS
MSGH6
MSGH7
MSGST

MACRO M1113

VUV VIV OOV VUV OV VOVOVOV VOV VOV VOV

—

o
o

ML.LUN
ML .REG
MSGH1

purd

ML.OUT

MEM.AR=

eST

VOOV VIV VOOV VOOV IVVOVIVTOVOV VUV IOVOOVOOUOVOOOUOUVOUVOVOUVOVOOOVOOVOVOD
- . L] L] L[] * . L] [] [ ] . . . e L] . . . [] [] » * . . . . . [] » . L) * * ] L] L] . L) . . . . L) L] ]

| L$SPTP

LSSTA
LSSV
LSTEST
LSTIML
LSUNIT
L10000
L10001
L10002
L10003

[2X2aY
A

[\%]

LS$PROT
LSPRT
LSREPP
L$REY
LSRPT
T
LSSOF
L$SPC
LSSPCP

(=4
o

SYMBOL TABLE

[aXaafaYaaYalalaYaYAY
AT YA

CIMLAAQ ML-11 LOGIC

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

SYMBOL TABLE
TS$SUBN=
T8TAGL=
T$TAGN=
T$TEMP=
TSTEST=
1$TSTM=
1$151S=
TSSHAR=
TS$SHW =
T$$PRO=
T$$S0F=
T$$sw =
18
110
TM
112

113
T14
115
116
17
718
119
12
120
121
122
123
124
125
126
127
128

129
13
130
31
132

133

000000
177777
010005
000000
000000
177777
000000
010002
010000
010004
010003
010001
021714
026730
030102
031350

136
735
136
137
138
139
14
140
141
142
143
144
145
15
16
7

G
G
6
6
032616 G
033516 G
033754 6
(25120 G
036060 6
036454 G
037122 6
022402 G
037460 6
040634 G

055702
057230
957656
060650
061702
062454
023462
063610
063420
064004
064502
064774
065326
024354
025340
025412

&
6
G
G
G
G
6
G
6
G
G
G
6
G
G
6

045410 6
046204 6
047600 G

T8
026054 G
19
026320 6
UAM
= 00020C G
WRD.1 = 005630
WRD.10= 005740
WRD.11= 005750
WRD.12= 005760
WRD.13= 005770
WRD.14= 005774
WRD.15= 006006
WRD.16= 006014
WRD.17= 006022
WRD.18= 006034
WRD.19= 006040
WRD.2 = 005634
WRD.20= 006046
WRD.21= 006054

023024 6
052350 G
053304 G
053736 6

WRD.23=
WRD.24=
WRD.25=
WRD.26=

041410 6
042534 6
043312 G
064276 6

051336 6

WRD.22= 006062

054774 G

065372
000000
CRRORS DETECTED:

23-0(T-80 09:11

. ABS.

006076
006104
006112
006126

WRD.27=
WRD.29=
WRD.3 =
WRD.30=
WRD.31=
WRD.32=
WRD.33=
WRD.34=
WRD.35=
WRD.36=
WRD.37=
WRD.38=
WRD.39=
WRD.&4 =
WRD.40=
WRD.41=

B_14
PAGE 370-3

006134
006142
005646
006156
006164
006200
006206
006212
006220
006226
006232
006242
006250
005654
006260
006264

WRD.42= 006300
WRD.43= 006306
WwRD.44= 006316
WRD.45= 006324
WRD.46= 006336
WRD.47= 006350
WRD.48= 006360
WRD.49= 006370
WRD.5 = 005662
weD.50= 006400
WRD.51= 006406
WRD.52= 006420
WRD.53= 006426
WRD.54= 006436
WRD.55= 006446
WRD.56= 006454
WRD.57= 006462

WRD.58= 006472
WRD.59=
WRD.6 =
wep.60=
WRD.61=

006504
005670
006510
006526

SEQ 0378
WRD.7 =
WRD.8 =
WRD.9 =
WRT.CS
WRT.DA
WRT.DS
WwRT.D1
WRT.D2
WRT.D3
WRT.EE
WRT.EL
WRT.ER
WRT.E1
WRT.E2
WRT.MR
WRT.PA

WRT.PD
WRT.RE
WT.DAT
Ww.C.S1
XOR.LN
X$SALWA=
X$FALS=
X$OFFS=
X$TRUE=
$END.L
$PATCH
$SAVEZ
$SAVE3
$SAVEL
$SAVES
$T1
$110

$TN

$112
$113
$T14
$T15

005676
005712
005726
014174
014530
017512
016302
016620
017136
016240
016176
014352
015272
015500
014706
015064

(015732
017622
011670
011664
013354
000000
000040
000400
000020
065370
002720
004006
006022
004040
004060
021522
026334

026744

030116
031364
032632
033532

&
6
6
G
G

$116
$117
$T18
$719
$72
$720
$121
$722
$723
$724
$725
$726
$127
$728
$729
$13

033770
035134
036074
036470
021730
037136
037474
040650
061424
042550
063326
044312
045424
046220
047614
022416

$T75

023476

$130
$T31
$732
$733
$734
$735
$736
$137
$738
$139
$T74
$740
$741
$742
$743
$T44
$745
$76
$17
$78
$79

051352
052364
053320
053752
055010
055716
057244
057672
060664
061716
023040
062470
063424
063634
064020
064516
065010
024370
025354
025426
026070

000
001

VIRTUAL MEMORY USED:
32783 WORDS
( 129 PAGES)
( 82 PAGES)
21558 WORDS
DYNAMIC MEMORY:
00:14:51
ELAPSED TIME:

ML11,ML11/=-SP/CR:SYM=SVC/ML,CZMLAA.DOC ,ML2.P11,B16PG].P11,B16PG2.P11,B16PG3.P11,B16PG4.P11,B16MUL.P11,B16SAV. P11 MLI P11 MLGL. P

DDONoM|eeV—N—eO—e—N=NT!e—OTl|OOTtON(=-=OVN30OAeORONOOSCONVONAOONOAOOONOOOrOVNNISrOTAONrNOOA~TNA(ONOAUNMOOIDNNNOOAVRODOTNMOSOVTNNDUDOODOOENVTUCV®VOPDWULEYOMMMM-.—ONM=OO=WWN=OMnOWoVJWBVO&[4[V-O 4O-a Y[.-

O—NMoZTWNMO.[X—NgW4JIVY1eO[92.oOMOV]N—=M)NOo[~Iea W8ONVMTI—=N0O.MIN)RLoIOOM[NAMONOrheM—-AO0o~nN [V0|KRIBNal OATN—O—MN-g ONO ["UIA|}—[OVNa) a~O—o. [AaoTOe—¥V1}, |I]L eN2.—O0W[ToaSIEV)NldXM~aO30 -OW—M2WV

VOV ¥ O —an

[FEVE])

—WONgOW—N]ygNNVAaNONR[O—o0L—a¥[aVIeNolU—LN-Ne——UnO0aNUonr-Ay.yNOa—~Uo-—a-0—

n-NF<no«Vna[VR]4>-e«, —sN@.® -PO@o=4—d

>[V9]

SEQ 0379

04000
10000

20000

40000

00000
00004
00010
00020
00040
00100
00200
00400
01000

O G0O

Laol[VIlVa]¥NT—o~ [o(VN-]loY 3MeoO

312-15426

370-18713

W nNnOMOON

[oSeXYl GON—A-RTGM’7NNPMMNOGN IOWTMN0W—TOAI—
00001
00001
00002
00004
00010
00020
00040
00100
00200
00400
01000
00002
02000

—a N

3ON~3O—V-Mooy~

MO—NeV-VV~NOOTCOMooOaNOODVAMM)ONO~OVNOOMASNN—NoNVeNVC—O4MOo YMO——gQ—nDaehNNln[O——a—oV]

[
)

.
=

CSETST
CSEXIT
C$GETB
C$GE1W
CSGMAN
(SGPHR
($GPLO
CSGPRI
CSINIT
CSINLP
CSMANI
CSMEM
CSMSG
CSOPEN
CSPNTB
CSPNTF
CSPNTS
CSPNTX
(sal0
CSRDBU
CSREFG
CSRESE
CSREVI

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

000003
000055
000056
000060
000054
000057

000001
000032
000026
000027
000043
000042
000030
000040
000011
000020
000050
000031
000023
000034
000014
000017
000016
000015
000377
000007
000047
000033
000003

D
s
ek
-l
D
)
)
d
e
D

= 000010
= 000005
= 000003

=
=
=
=
=
=

IV AV I IV TV TV TV TV TV TV LV LV LV LV VLV LV LV LV LV LV IV [V TV [V LV LV VLV TV IV LV LV IV IV LV LV [V IV IV IV ]

CSESCA
C$ESEG
CSESUB

CSEDIT
CSERDF
CSERHR
C$ERRO
CSERSF
C$ERSO

(VT IOV

000036
000044
000051
000024
000053

=
=
=
=
=

b cnd wd

C$CVEC
C$DCLN
csooou
CSORPT
Csou

’

000004
000002
Q00045
000062
000012

wald ad e

= 000035
= 000006

=
=
=
=
=

C$CLOS
CsCLPY

($BSEG
(sssus
(SCEFG
cscLCk
CSCLEA

= 000052
= 000061
= 000022

end wnd

($AU
C$AUTO
C$BRK

19-207
#62-338
#78-1689
#74-1441
#7-13
a7~

= 000400
010332

12-155

—

BOE
(MIP.S

003740

Bk R

BLSSHF

LI]

SYMBOL

CREATED BY
MACRO
CN 23-0C7-80 AT
CROSS REFERENCE
REFERENCES
VALUE

L
A =«

LGB
SYMBOL

12-158

09:15

CREF

D 14

vOo1

26-143

26-147

1 2=16 )
4 4 -153

*155-5685

¢155-5705

3¢8-18562

7-65

12-16¢

PAGE 2

SEQ 0380
25-180

CREATED BY

SYMBOL C(ROSS REFERENCE
SYMBOL
VALUE

=
=
=
=
=
=
=

ESEND
ESLOAD
E2.TEM

= 002100
= 000035
= 007720

ERRTYP
EVL

000036
000035
000034
000037
000040
005474
005576
002160
002156
002154

002152
= 000004

FIRSI.
FIV.FM

012520
= 005414

FMT.1
FAT.10

= 004164
= 004634

FMT.11
FMT.12
FMT.13
FMT 14
FMT.15

FMT.16
FMT.17
FMT.18

FMT.2

FMT.3

= 004706
= 004742
= 004772

= 005046
= 005106

= 0051564
= 005244
= 005300

= 006224

= 004312

300-14709

300-14741

311-15340

175-46910

*266-12800 *271-13094 *277-13426 +279-13539 ¢294-14416

#81-1852

G
G
G
G
G
G
G
G
G
G

*301-14768
#81-1853
*301-14769

*266-12801 2271-13095 #277-13427 #279-13540 «294-14417

#78-1672
#78-1673
#78-1674
#78-1671
#78-1670
#79-1726
#79-1729

#7-96
¥#7-96
#7-96
#7-96
#78-1683
#7-13
#7-13
#81-1854

*301-14770

*258-12406 265-12748 *266-12802 £271-13096 ¢277-13428 ¢279-13541
*325-16095 *342-1709¢

232-10547
197-8137
205-8531
211-8950
215-9333
227-10223
272-13146

€EF.CON
EF.NEW
EF.PWR
EF.RES
EF.STA
EIG.FM
ELV.FM
ERRBLK
ERRMSG
ERRNBR

294-16393

233-10590

234-10615

169-6562

174-6873

181-7257

175-6911

189-7715

261-114642

NWOH—=O

= 007716

293-14353

\N=d
b b —a\N
~S O OWVO~N
—_-OO
—

D2.TEM

SEQ 0381

vO1

270-13067

= 000000
003532
011674
= 007714

CREF

E 14

ONEs
=]

002320

DIAGMC
D1VMOD
DRIVE.
DY.TEM

PAGE 3

#7-13%

000046
000041
000037
000013
012626

—=OO00VO—-\wI

=
=
=
=

REFERENCES
#7-13

PO = NPORNIPONON)
— — NN N

DFPTBL

000021
= 000025

ON 23-0(T-80 AT 09:15

s ANPONOND

CSRFLA
CSRPT
CSSEFG
C$SPRI
CSSVEL
C$TPRI
DAT.DM

MACRO

2641-11353
198-8156
205-8548
211-8970
215-9351
229-10349
3N1-14802

252-12053
198-8173
205-8565
211-8987
223-9785
229-10365
331-164665

305-15040

332-16480

252-12075
198-8190
206-8586
211-9030
224-9839
230-10385
335-16740

+294-14418

278-1349¢4
199-8211
206-8626
211-9044
225-9876
230-10401
348-17426

=
=
=
=
=
=

000015
000020
000040
000007
000016
000041

#7-13
#7-13

FSHARD
f SHW
FSINIT
FSJMP
FSMOD
FSMSG
FSPROT

=
=
=
=
=
=
=

000004
000013
000006
000050
000000
000011
000021

FSRPT

= 000012

F$SOFT

= 000005

i [\ )

d e

mh e

LN LM AN 8 LN AN AN AN N

e
e e
e e

i e

N A A A AN AN L

L E &

N\IN\IN\INN\.JNNQNN\‘\JN
¢t

= 000003

F$SEG

= 000017

FSPWR

337-16808

327-16233

[0 JV 1,8

352-17650

352-17670

353-17713

259-12460

337-16814

368-18558

227-10174
229-10377

227-10219
230-10397

347-17400

368-17421

O =N
~
(¥ale -]

woo
—

335-16738

337-16807

193-7916

223-9799

-~ —

&
o

335-16744

a0
O
O

wess

SEQ 0382

vO1

326-16198

—_

—

OO
POWVOD
OO0
NWVIWN—

_ad_.a...

~
[]

—
e

an
O
]

—_

W ~n

— Q0

(V]
]

[o -]

WO
NN

NN
O~
!

NI
OO

~Co
o
"

o
'

CREF

JREENEN

w
~N

PAGE

224-9835

366-18399

215-9347
200-8265
206-8582
211-9069

216-9372
200-8294
206-8622
295-14469

361-18161
366-18404
207-8640
296-14495

207-8669
301-14797

239-11093

305-15023

318-15741

331-16463

261-11429

289-14140

(9, 1,8)

—

NOWONNNNW?W\INONQO‘N—‘W
1

—a_.\‘_g.....-n—-_n_n_n_a_...aw..._.o_a_ao
W20
LAMNIAINO OO NOO O N &
S OWOE O 200 2L N~ =20 —\ YN — O
O
= = S ~JWOONVO
=200 NOWO N
OO
O POWVIRU
NS SMVONY
W)
Y
O—=000000

2 NN

PO NI NI ND N

— NI LNRNJANLNND

NWOWN =200 NO VNN
SO —

PUND

09:15

~ W

FSAU
F$SAUTO
FSBGN
FSCLEA
FSDU
FSEND

?O*-‘O\l—‘
i

= 005400

6149

-0

FOR.FM

S haakxak

= 007046

~GCo oo &

= 007062

FNC.B

366+-18400

FNC.9

#80-1810
#80-1811
#80-1812
#79-1722

(¥

= 007036

AN
= = —2

fFNC.7

RSOV
ON

= 007030

#80-1809

FNC.6

208-8694
312-15408

007266
006774
007002
007020

=
=
=
=

FNC.23
FNC.3
FNC.4
FNC.5

—

el ol

=2 OO0 NO

d e

NSNS N SN —

LIBR
CREATED BY
MACRO
ON 23-0(T-80 AT
SYMBOL CROSS REFERENCE
REFERENCES
SYMBOL
VALUE
#78-1700
FMYT.6
= 004336
FMT.S
= 004266
FMY.6
= 004470
FMY.7
= 004520
FMY.8
= 00454¢
FMYT.9
= 004602
FNC.Y
= 00675¢
FNC.10
= 007076
FNC.11
= 007104
#8
FNC.12
= 007124
FNC.13
= 007136
FNC.14
= 007146
FNC.1S
= 007162
= 007174
FNC.16
FNC.17
= 007206
1]
FNC.18
= 007216
FNC.19
= 007230
FNC.2
= 006766
FNC.21
= 007242
FNC.22
= 007254

CROSS REFERENCE
VALUE
= 000010
= 000002
= 000014
000001

012542

=
=
=
=

ISR
IXE
[ $AU
ISAUTO
I$CLN
180U
I$HRD
ISINIT
I1$MoD
I1$MSG
[$PROT

=
=
=
=
=
=
=
=
=
=
=

010000
000040
020000
007622
010342

000100
004000
000041
000041
000041
000041
000041
000041
000041
000041
000040

SEQ 0383

v01

(REF

7-162

296-14380
331-16442

300-14732
3641-17053

304-14987
346-17330

85-2048

87-2147

*155-5675

3 1115327
3 62-1%3182

317-15§

362-78

324-16C51
365-18375

8-243
8-243

8-244
8-244

8-285
8-285

8-242

8-243

8-244

8-285

8-313

8-330

8-340

305-15008
346-17352
*266-12846

7-150

& BN NN
WO OO0

8-242
8-242

8-244

285-13884
*317-15694
335-16699
*340-17020
*362-18201

161-6017

84-1999
288-14049
318-15724
335-16708
*346-17329
*362 18243

—_

000 &~

8-249

*241-11371

1S,]

e
Jo
.]

[«
-2a¥To
t
rO SN

w~N

~ 0o

8-228

#78-1696
#73-1427
#78-1693
#78-1686
#78-1694
#81-1850
#76-1446

fe]

PN
(VR
O o
LSRV
] o8

o.omoo

%
R
R
RER
RS R
LA R

= 000000

1BE
10V
IER
INTER
[0.8UF

100000
007722

HOE
HW.OR.

. HELP

= 000000

000400
000376
000001
000002
000000
000140
000000
000040
000120
000020
000004
000010

#73-14634
#7-13

=
=
=
=
=
=
=
=
=
=
=
=

33116425
365-18389S

G 14

PAGE 5

G$OFFS
G$OFSI
GSPRMA
G$PRMD
GSPRML
GSRADA
GSRADB
GSRADD
GSRADL
GSRADO
IGSXFER
G$YES

GSNOC

#7-13
#7-13
#7-13
#7-13
#85-2046

D e

010326
000200
000372
000003
000400
000002
000001

REFERENCES

=
=
=
=
=
=

ON 23-0CT-80 AT 09:15

&H -

600D .R
GSCNTO
GSDELM
G$01SP
GSEXCP
GSHILI
Gs$LoL!l

MACRO

\JN\J\J\JN\‘\J?NN\I\‘\IN
]

BN A

6D .BLK

CREATED BY

[AY AT

LIRR
SYMBOL
SYMBOL
FSSRV
FeSUB
FeSW
FSTEST

8-244
7-67

#8-305

7-121

241-11414

287-14
277-13454
239-11091
208-8691
211-9090
87-2148
258-12356
258-12
85-2049
86-2098
305-15
*294-14378 +300-14731 *+304-14986 *305-15004
*324-16045 *324-16046 *331-16419 +331-16420 +331-16
336-16786 *340-17
*336-16767
336-16770 +336-16781
356-17
351-17627
347-17392
*346-17344
347-17370
*365-18374
368-18539

#8-247

7-39

7-105

#7-39

8-337

#8-137

2 96-14492
P4 64-12719
3 10-15279
3 31-16450
3 40-17018 *340-17019
3 59-18005 *362-18179

LR
CREATED BY
MACRO
ON 23-0(T-80 AT 09:15
SYMBOL (ROSS REFERENCE
SYMBOL
VALUE
REFERENCES

I$PTAB
I$PWR
ISRPT
185G
I$SETU
I$SFT
ISRV
I$SuB
I$TST
JSJMP
LAST.B
LAU
LAUTO
LCLEAN
LOU
LD.LNG
LINIT
LOAD.S
LOE
LOT
LRPT

LST.AR

=
=
=
=
=
=
=
=
=
=

000041
000041
000041
000041
000041
000041
000041
000041
000041
000167
012574
004152
004126
065342
00414
013636
020600
012172
= 040000
= 000010
004114

010340

LST.BL

010334

LSACP
LSAPT
LSAU
LSAUT
LSAUTO
L$CCP
LSCLEA
L$CO
LSDEPO
LSDESC
LSDESP
LSDEVP
L$D1SP

002110
002036
0064154
002070
004130
002106
065352
002032
002011
002130
002076
002060
002164

LSDLY

G
G

002116

G
G
G
6
G
G
G
G
G
G
G
G
G

#7-13%
#7-1%
#7-13
#7-13
#7-13
#8-274
#8-288
#7-13
#7-13
#7-13
#7-13
#86-2095
276=13377
ne6-181
L6-98
#46-83
46-100
#369-18639
369-18658
#6-131
46-148
#96-2672
264-12737
#1564-5613
156-5758
#81-1861
325-16119
#78-1695
#78-1684
#66-32
46-49

002040
002034
004142
002072
002122
002052
002044

002152

G
G
G
G
G
G
G

278-13512

M 14

t@ 0384

353-17693

07671445
2155=5677 *155-5692 +155-5693 +156-5719 +156-5720
227=10155 227-10199 257-1233S
267-12856 267-12865
#76-1443
86-2097
*155-5678 *155-5698 *155-5699 «155-5700 +*156=5727 #156=5728 *156=5729
278-13482
351-17614
353-17697
353-17712
356-17874
359-18006
368-18528
#7-65

#7-65
7-65
#7-65
7-65
#7-65
7-65
#7-65
#7-65
7-65
#7-65
#7-65
7-65

N7-65
236-10768
258-12385
276=-13403
gog-}gggg
L2~

LSDTP
LSDTYP
L$OU
L$OUT
LSOVTY
LSEF
| SENV]
LSERRT

276-13399

PAGE 6
CREF
vO1

#7-65
#7-65
7-65
#7-65
7-65
#7-65
#7-65

7-65

#L6-198
#66-100

#369-18657
#7-87
#7-103

158-5831
239-11031
258-12397
277-13419
300-14745

NL6-148
#7-80

#7-96

158-5849
241-11362
265-12753
278-13516
300-14757

162-6058
261-11386
265-12776
279-13532
311-15344

192-7864
241-11399
265-12789
°285-13890
311-15355

199-8219
252-12058
270-13051
288-14055
324-1607C

206-8594
252-12079
270-13071
293-164358
324-16082

211-8995
253-12094
271-13087
294-14397
341-17033

214-9258
258-12362
276-13382
294-14409
341-17069

NN
NN
— —
At

NN POTONIN) — — —

O NONNOWWNO
&
—
O NWNWSNNO
NN
OO
8NN

NOVNES W00 WO N
AN ON

SO
OO

MO
=N

WA= O NN 2 OO N
WOOSTO—=s=20MN00

WWANNNI
NN NN = = —
A

OO0 =2 AN N

OSSN =200 WD
00 NWWN~NO
N
DS
OO 0WO
WO
NN
NN

131-4496

WNAMANNO
NI PNOININ) = = —b

)
—d ard e el

b d b

oo:~o‘o-o~

AN
O NNV

7-1637

154-5655

N —2 —

002440
002670

156-5623

R
e B Y B
RV Y. . B NTe W
NSO
SOV
ONWONNNO
VWD
QO == N =2 NNV
NN
S OONONO

154-5607
#7-139
#7-162
#8-247
#8-288

L
| 2NN
I
I
B
N
)
cd cd =2 O OO NON &

#7-150

b ed e

7-150

]

#8-274

8-274

012166

#66-49

ML.LUN

#8-305

OO WN
— O
COON)
OB N

= 007506
012170

#370-18686

M NAANND NPV PNOND) = — —
N
= OO NN O OO N
NOWVMO
SOOI
]
'
L)

MEM.AR
ML.DUT

L10002
L10003

SEQ 0385

#156-5758

= O
— NS

021512
002026
= 065366
002100
002074
002050
002000
002042
002712
002112
002062
002010
004116
002662
002056
002020
002024
002030
002340
002114
002014
002012
002336
002342

I 14

PAGE 7
vOo1
CREF

M)
b b

LSINIT
LSLADP
LSLAST
LSLOAD
LSLUN
LSMREV
LSNAME
LSPRIO
LSPROT
LSPRT
LSREPP
LSPEV
LSRPY
LSSOFT
LSSPC
LSSPCP
LSSPTP
LSSTA
LSSW
LSTEST
LSTIML
LSUNIT
L 10000
L1000

(Al AlalalalalalAlalalalalaYalalalaYalalalalaYa¥alalaTaYaAYAYAY
Al

"1
MACRO
ON 23-0CT-80 AT 09:15
CREATED BY
SYMBOL CROSS REFERENCE
SYMBOL
R EFERENCES
VALUE
7-65
LSETP
.
002102
G
" 7-65
LSEXPY
002046
LSEXP4
002064
. 7-65
LSEXPS
. 7-65
002066
7-65
LSHARD
002344
#8-226
8-226
7-65
LOHIME
0021¢0
7-65
LSHPCP
002016
7-65
LSHPTP
002022
LSHW
7-65
002320
7-119
#7-119
#7-65
LSICP
002104

OO — — AR
= MUNAIT A O NOO
OV NINO
ANC—
O 1IN INONVOOT—NRMNOOMOE

v
- ONONM M M NM MN I I T T T T I ITN OOO0

-«&

NOEO —
E O ONIMMNOMMA
NONM
NI ONOOOONOM
O TNO~MONM
O OOV~ ANOWVOMI
-

NN ——

N I OMOOAIMNOANIN— OUMNA O OMNIO M OONOON T O ~FO MWN A OO O — — OO

G
011700
ML.REG

J 14

SEQ 0386
PAGE 8
CREF
v0?

09:15
ON 23-0CT-80 AT
MACRO
CREATED BY
SYMBOL CROSS REFERENCE
SYMBOL
VALUE
"M

-«

0O0ONMNINNTMTTNPAONMINAMMMrN—=OOMDACOIOOO—VN
-—

340

329
64

[

LaLl.al

327

OO —

ON~O

~”

(o e a¥ a e o LoLbal.alalal el ala R X RX RX X BN SN JV YV YVoR eRoReloRie VoRVoRVo Lo glo Nlo o oS o N N o -o).o1.of-o].o]

> LS

—d

SEQ 0387
v01
CREF
[
4

14
K
PAGE 9

09:15
MACRO
CREATED BY
SYMBOL CROSS REFERENCE

ON 23-0CT-80 AT
LR

(REATED BY

m_1

SYMBOL CROSS REFERENCE

SYMBOL
MSGH6
MSGH7
MSGS1

NIB.SA

VALUE
000610
002634
002670

007714

MACRO

REFERENCES
<34k
#8-261
8-245
#8-262
8-285
#8-297

#73-1425
82-1917
91-2351
94-2545
(97-0113

81-1854
83-1950
91-2382
94-2560
97-2723

82-1887
90-2302
92-2394
94-2566
e97-2727

82-1893
90-2209
94-2530
94-2570
#97-2735

82-1899
90-2320
94-2533
+96-2689
e97-2736

n2-4

5-1176 _

6-1177

7-34

7-164

8-190

8-353

#73-1431

+155-5674

155-5688

155-5694

155-5709

156-5721

189-7685

#79-1727

ONE.FM

= 005350

#79-1719

0$APTS
0$AU
0$BGNR
OSBGNS
0$DU
O$ERRT
OSGNSW
O$POIN
O$SETU
PAR.DI

010322

=
=
=
=
=
=
=
=
=

PD.TEM
PHR.1
PHR.10

285-13872
n7-13
#7-13
#7-13
#7-13
#7-13
#7-13
n7-13
#7-13
17-13
¥74-1440

00000
000001
000001
000001
000001
000001
000001
000001
000001
010330

011662

#74-1450
#80-1794

= 006740
= 006576

#80-1796

197-8135

198-8154

200-8267

204-851y

205-8529

207-8642

211-8916

211-893

267-12874

287-14018

335-16745

223-9765
24B-11834

223-9782
248-11851

227-10147
348-17424

227-10221
354-17750

295-14428 +300-14753

230-10399
356-17895

233-10583
359-18018

199-8249

200-8296

205-8546

206-8526

207-8671

211-8948

161-6024
295-14473

166-6300
296-14499

174-6865
326-16183

175-6903
327-16222

211-8945
227-10128

211-8968
227-10176

211-9095
229-10379

214-9275
233-10604

241-11425
331-16460
205-8543

253-12137
368-18551
205-8563

272-13144

208-8696
215-9349

169-6550
326-16151
198-8168

#80-1800
#80-1801
#80-1802
#78-1690
4#78-1691

225-9914
347-17379
347-17401

PHR.S

= 006646

PHR.&6

= 006660

#80-1799

000040
000100
000140
000200
000240
000300

277-13434

224-9837

#80-1797
277-13458
#80-1798°

=
=
=
=
=
=

361-18157

223-9801

= 006630

PRIOT
PRIO2
PRIOS
PRIOL
PRIOS
PRIOS

7-65

211-9071

211-9028

PHR.&

= 000000

227-10194

271-13102 +277-13415

198-8171

PHR.3

PRIOO

189-7713

266-12809 +271-13083

193-7884

#80-1803

G
G
G
G
G
G
G
G
G

82-1911
91-2344
94-2543
+96-2700
097-2748

250-12416 +265-12785

218-9525
247-11813

#80-1795

006672
006714
006726
001600
002000

*258-12393

7-65
7-65
7-65
7-65
7-65
7-65
7-65
7-46
7-65
185-7490

215-9313
236-10801

= 006560

=
=
=
=
=

288-14037
N7-46
¥7-46
#7-46
¥7-46
#7-46
N7-46
#7-46
N7-46
N7-46
+155-5668

211-9062
236-10786

PHR.2

PHR.7
PHR.8
PHR.9
PNT'
PRI

158-5863

*279-13528 279-13547 +285-13897 285-13904 ¢288-14062 288-14068 +294-14405
301-14776 +311-15351 311-15374 +324-16078 325-16102 *342-17084 342-17103

= 006542

82-1905
91-2332
94=2541
+96-2696
97-2740

= 005520

OP.NUM

SEQ 0388

81-1853
82-1933
91-2370
94-2558
#97-2776

NIN.FM

= 000001

81-1852
82-1927
91-2362
942550
a97-2713

ONEFIL

PAGE

ON 23-0(T-80 AT

#78-1682

#78-1681
#78-1680
#78-1679
#78-1678
#78-1677
#78-1676

158-5862

193-7901"

198-8151

193-7918

205-8526

211-8985
229-10363
211-8928°

225-9874

198-8188

214-9306

227-10111
199-8209

225-9918

229-10347

214-9287
247-11775

233-10564

214-9290
247-11792

353-17731

206-8584

215-9331
352-17643

MACRO
ON 23-0CT7-80 AT 09:15
CREATED BY
SYMBOL CROSS REFERENCE
REFERENCES
SYMBOL
VALUE
#78-1675
PR1O7
= 000340 6
PRSN
#7-160
183-7355
183-7361
002340 6
PTBL.P

010320

A h'h-h-h-la-la-laciadaciaciaciacincdacincincineinolneincincineinclineincincinelnolnelinsiaciineinolnciineiycinciye
iy i)

004164
004224
004312
004336
004366
004470
004520
004546
004602
004634
004706
004742
004772
005046
005106
005154
005244
005300
005350
005356
005366
005400
005414
005432
005452
005474
005520
005546
005576
005630
005634
005646
005654
005662
005670
005676
005712
005726
005740
005750
005760
005770
005774
006006
006014
006022
0006034
006040

<AAA
.AAB
<AA(
.AAD
.AAE
- AAF
-AAG

bR R-h-h-Rh R

. AAH
.AAl
AAJ
- AAK
<AAL
<AAM
.AAN
.AAD
.AAP
-AAQ
.AAR
-AAS
<AAT
.AAU
<AAV
. AAW
< AAX
-AAY
.AAZ
.ABA
.ABB
.ABL
.ABD
.ABE
.ABF
.ABG
.ABH
.AB!
.ABJ
. ABK
.ABL
.ABM
.ABN
.ABO
.ABP
.ABQ

.ABR

.ABS
.ABT
.ABU
.ABV

#73-1429
155-5669

156-5628
155-5671

#60-704
#61-719
#61-737
n61-744
#61-752
#62-778
#62-786
#62-794
#62-804
#62-813
#63-831
#63-841
#63-849

78-1697
78-1698
78-1699
78-1700
78-1701
78-1702
78-1703
78-1704
78-1705
78-1706
78-1707
78-1708
78-1709

#63-875
#64-892
#64-911
#64-921
#65-939
¥65-941
#65-944
#65-948
#65-952
#65-957
#65-963
#65-969
#65-976
#65-984
#66-996
#66-1005
#66-1007
#66-1011
#66-1013
#66-1015
#66-1017
#66-1019

78-1711
78-1712
78-1713
79-1718
79-1719
79-1720
79-1721
79-1722
79-1723
79-172¢4
79-1725
79-1726
79-1727
79-1728
79-1729
79-1730
79-1731
79-1732
79-1733
79-1734
79-1735
719-1736

n63-864

#66-1023
#66-1027
266-1031
#66-1034
#66-1037
#66-1040
#66-1042
#67-1050
#67-1052
#67-1054
#67-1058
#67-1060

154-5629
155-5679

78-1710

19-1737
79-1738
79-1739
79-1740
79-1741
719-1742
79-1743
79-1744
79-1745
719-1746
79-1747
79-1748

3
‘

PAGE 11

CREF

M 14

SEC 0389

V01

154-5631

154-5632

154-5634

*155-5664

1555665

155-5667

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
P.ABW
006046
P.ABX
P.ABY
P.ABZ

P.ACA
P.ACB

P.ACC

006054
006062
006076

006104
006112

006126

MACRO

ON 23-0CT-80 AT 09:15

REFERENCES
#67-1062
#67-1064
#67-1066
#67-1070
#67-1072
#67-1074
#67-1078
#67-1080
#67-1082
#67-1086
#67-1088
#67-1092
#67-1094
#67-1096
#67-1098
#68-1104

719-1749
719-1750
79-1751
79-1752
19-1753
719-17564
79-1755
19-1756
79-1757
79-1758
79-1759
79-1760
79-1761
79-1762
79-1763
79-1764

P.ACD
P.ACE
P.ACF
P.ACG
P.ACH
P.ACI
P.ACJ
P.ACK
P.ACL
P.ACM
P.ACN
P.ACO
P.ACP
P.ACG
P.ACR
P.ACS
P.ACT
P.ACU
P.ACV
P.ACW
P.ACX
P.ACY
P.ACZ
P.ADA
P.ADB
P.ADL
P.ADD
P.ADF
P.ADF
P.ADG
P.ADH
P.ADI
P.ADJ
P.ADK
P.ADL
P.ADM

006134
006142
006156
006164
006200
006206
006212
006220
006226
006232
006242
006250
006260
006264
006300
006306
006316
006324
006336
006350
006360
006370
006400
006406
006420
006426
006436
006446
006454
006462
006472
006504
006510
006526
006542
006560

#68-1106
#68-1109
268-1111
#68-1114
#68-1116
#68-1120
#68-1122
#68-1125
#68-1127
¥68-1131
#68-1135
#68-1138
#68-1141
#68-1144
#68-1146
#68-1150
#68-1152
#68-1155
#69-1162
#69-1164
#69-1166
#69-1169
#69-1173
#69-1175
#69-1180
#69-1184
#69-1189

719-1765
719-1766
79-1767
79-1768
79-1769
80-1774
80-1775
80-1776
80-1777
80-1778
80-1779
80-1780
80-1781
80-1782
80-1783
80-1784
80-1785
80-178¢
80-1787
80-1788
80-1789
80-1790
80-1791
80-1792
80-1793
80-1794
80-1795

P.ADO
P.ADP
P.ADQ
P.ADR
P.ADS
P.ADT
P.ADU
P.ADV

006630
006646
006660
006672
006714
006726
006740
006752

#69-1203
#69-1208
#70-1216
#70-1220
#70-1226
#70-1230
#70-1234
#70-1238

80-1797
80-1798
80-1799
80-1800
80-1801
80-1802
80-1803
80-1804

P.ADN

(006576

#69-1194

80-1796

PAGE 12
CREF

N 14

V01

€£a 0390

CREATED BY

SYMBOL C(ROSS REFERENCE
SYMBOL
VALUE

P.ADW

006766

MACRO

ON 23-0CT-80 AT 09:15

REFERENCES
#70-1242

006774
007002
007020

#70-1244
#70-1246
#70-1251

80-3806
80-1807
80-1808

P.AEB
P.AEC
P.AED
P.AEE
P.AEF
P.AEG

007036
007046
007062
007074
007104
007124

#70-1256
#70-1259
#70-1263
#70-1267
#71-1274
#71-1280

80-1810
80-1811
80-1812
80-1813
80-1814
80-1815

P.AEH

P.AE]
P.AEJ
P.AEK
P.AEL
P.AEM
P.AEN
P.AED

P.AEP
P.AEQ
P.AER
P.AES
P.AET
P.AEU
P.AEV
P.AEW
P.AEX
P.AEY
P.AEZ
P.AFA
P.AFB
P.AFL
P.AFD
P.AFE
P.AFF
P.AFG
P.AFH
P.AF1
P.AFJ
P.AFK
P.AFL
P.AFM

RAS.IN
RD.DA

RD.DAT

RD.D>

RD.D1

007030

007136

007146
007162
007174
007206
007236
007230
007242

#70-12564

#71-1284

#71-1287
#71-1291
#71-1295
#71-1299
#71-1302
#71-1306
#71-1310

007254
007266
007302
007312
007320
007326
007334
007342
007350
007356
007364
007372
007400
007406
007414
007422
007430
007436
007444
007500
007534
007566
007622
007662

£71-1314
#71-1318
#71-1322
#72-1329
#72-1331
#72-1333
#72-1335
#72-1337
#72-1339
#72-1341
#72-1343
#72-1345
#72-1347
#72-1349
#72-1351
#72-1353
#72-1355
#72-1357
#72-1359
#72-1369
#72-1379
#73-1392
#73-1402
#73-1613

011672

#74-1455
*112-3535
125-4198

011666

017514

016366

#74-1453
-

«143-5071
#143-5056
#131-4487

CREF

815
V01

SEQ 03N

80-1805

P.ADX
P.ADY
P.AD?

P.AEA

PAGE

80-1809

80-1816

80-1817
80-1818
80-1819
80-1820
80-1821
80-1822
80-1823

80-1824
80-1825
81-1830
81-1831
81-1832
81-1833
81-1834
81-1835
81-1836
81-1837
81-1838
81-1839
81-1840
81-1841
81-1842
81-1843
81-1844
81-1845
81-1846
81-1847
81-1848
81-1849
81-1850
81-1851

«155-5684
-

*100-2903
112-3536
#128-4330
143-5072
151-5477
150-5443

*155-5704
-

100-290&
*115-3695
128-4331

166-6305

266-12848

334-16689

335-16697

+103-3061
115-3696
#132-4517

103-3062
+118-3875
132-4518

«106-3218
118-3876
«136-4707

169-6555

174-6870

181-7250

106-3219
#122-4061
136-4708

+«109-3376
122-4062
140-4913

109-3377
+125-4197
140-4914

CREATED BY

SYMBOL CROSS REFERENCE

MACRO

ON 23-0CT-80 AT 09:15

SYMBOL
RD.D?
RD.D3
RD.EE
RD.EL

VALUE
016704
017236
016242
016200

REFERENCES
#135-4677
#139-4880
#128-4328
#125-6195

150-5448
150-5453
151-5467
151-5472

RD.E1
RD.E2
RD.MR
RD.PA
RD.PD

015356
015576
014756
015150
016040

#115-3679
#118-3858
#109-3361
#112-3519
#122-64044

150-5428
150-5433
150-5423
150-5438
151-5462

180-7212
180-7219

131-4493

*131-6501

RD.ER

014422

RD.REG

REG.IN

REG.1
REG.10
REG.11
REG.12
REG.13
REG.14
REG.15
REG.16

REG.2
REG.3
RFG.4
REG.S5
REG.6
REG.7
REG.8
REG.9
RE2
RE3

RE&
RH.ADD

RH.TYP
RH.VEC

020210

=
=
=
=
=
=
=
=

#81-1830
#81-1839
#81-1840
#81-1841
#81-1842
#81-1843
#81-1844
#81-1845

007312
007320
007326
007334
007342
007350
007356
007364
004106
004104

004102
012160

#81-1831
#81-1832
#81-1833
#81-1834
#81-1835
#81-1836
#81-1837
#81-1838
45-66
L5-74

012162
012164

G
¢
-

002340

SIX.FM

= 005432

STACK
sSveeBL

#76-1458

007302
007372
007400
007406
007414
007422
007430
007436

= 005452

STK.Of

#149-5381

011676

SEV.FM
SFPTBL

#103-3046

(£5-83
#77-1633
P77-1634
#77-1635

166-6266

(REF

€15

v01

SEQ 0392

180-7'91

180-7205

169-6513

173-A821

135-4683

+135-4691

225-9915
352-17664

353-17707

353-17728

139-4887

+139-4805

«172-6776

+*173-6816

223-9784
216-9367

225-9871
161-6019
175~6904
#45-96

#45-95
#45-94
#154-5631

*154-5633
«154-5635

154-5642

287-14020

296-14479

305-15029

#79-1724
239-11099

161-6025
239-11176

166-6301
247-11777

169-6551
247-11794

174-6866
247-11815

208-8699
248-11836

211-9098
248-11853

216-9373
296-14500

225-9929
312-15413

011354

#764-1449

*B3-1944

+83-1945

+B3-1953

+83-195¢

325-16138

326-16160

326-16173

326-16196

011342

#76-1447

81-1866

*324-16056

325-16113 +325-16115

7-65
7-65
7-65
7-65

7-65

7-6%5

7-65

= 177777

#79-1725

150-5413

PAGE

#7-150

318-15746

327-16213

326-16154

327-16231

#7-13

#7-22

7-65

7-65
7-65
7-65
7-65

326-16186

7-65

7-65
7-6%
7-65
7-65

327-16225

366-18405

7-65

7-65
7-65
7-65
7-65

7-65
7-65
7=65
7-65

7-65
7-65
7-65
7-65

7-65
[-65
7-65
7-65

7-65
7-65
7-65
7-65

7-65
7-065
7-65
7-65

"1
MACRO
ON 23-0(T-80 AT 09:15
CREATED Bv
SYMBOL CROSS REFERENCE
SYMBOL
VALUE
ENCES

= 177777

0D 15
SEQ 0393

vO!

ON2VA—T -OV—N3M0

<L}&a-l=JboVEaXlXealLalalh

SVCINS

PAGE
CREF

SV(CS
SVCTA [

77777

- 77777

4LR ~

174-6849
199-824¢
1 6 9- 6531
5=
1464
66 301-14795
305-15020
211-9066
236-10797 2 9
362-18190
34717374 347-17396 34 8- 174 19 359-18014
#8-288
#8-247
#7-13
#7-139
- 16 2
#79-1728
186-7534
1 86-7514
7
3 52-17645
352-17665

#81-1847

SSLSYM

TEN.FM
THR.+M

7-162

0000
5546
5366

166-6284

200-829

TSFREE
TSGMAN

TSHILI

7-162

325-16!

363-182

zp..
8-247

211-9023
331-16458

186-7554

259-12655
361-18162

267-"2876

277-13459

277-13448
368-18553

279-13561

312-15400

342-17117

7-65

n7-65

353-17708

#7-65
T$CODE

7-162

NoAG0NR TIWNWONA~NNAOOOaeXJLlE.l.al.al

= 000130

065366
000000

= 000007

370-18681

#7-13
#8-239

8-244

8-240

#8-241

8-241

#8-242

8-242

#8-244

8-240

#8-241

8-241

#8-242

8-242

#8-244

370-18682 #370-18483

8-239

#8-240

MACRO
CREATED BY
CROSS REFERENCE

ON 23-0CT-80 AT 09:15

PAGE

CREF

E 15
vO1

SEQ 0394

ION—OeOOIO X[Ia¥]IZ>O0O000LO2Clr—Oy-—>wvoO~wny

"1
SYMBOL

J
[
Y
V
X
a
&
8
l
U
.
v
a
.
l
l
«
l
K
¥
L
E
a
L
a
b
e
X
a
.
=
L
«
T
O
o
M
8
N
O
—
O
D
O
O
C
M
I
«
[
e
o
a
D
A
2
N
©
M
R
n
d
R
R
e
L
N
R
[
B
"
T
N
I
e
L
0
D
L
)
0
O
I
R
8
O
o
Y
N
1
[
a
W
V
l
a
I
l
~
a
—
l
J
a
l
a
l
a
l
a
l
a
Y
«
o
L
O
l
l
N
l
V
l
.
l
L
y
l
.
e
J
T
I
a
~
o
F
O
V
N
v
z
M
0
C
—
V
m
a
0
e
A
P
o
N
S
B
D
O
~
~
.
O
n
a
a
d
a
d
O
N
e
—
N
M
—
G
0
o
6
a
R
A
D
O
N
G
R
D
M
d
O
R
P
N
C
N
D
6
0
G
a
o
B
e
A
a
D
P
n
a
O
o
d
NOWQMNMA~NMNDToOMNNO0~NONDO LR=X ao0[]o0 IeRB|LoUE7—ANOOgMT~0CONO0OMOVO~aOMOo=MYNA02MV

OoeaYVlobNTVaIlX=aYNla¥hNLala—lalalalalalalalalalBlo-~[)aV¥[]0XV,NJa-VE—X—[o~oN~

TO0OMOM0NIO—0OMONW0NOUMD0IONI0NOe0eOeOee0OeeMIONOANTNN ———OMe~MNOIMNMMN—OMNMNONINXM

4[
[V
] uJd ]

=»n

ML
CREATED BY
MACRO
ON 23-0CT-B0 AT 09:15
SYMBOL C(ROSS REFERENCE
SYMBOL
VALUE
REFERENCES
TM
030102
6
7-103
#201-8335
112
031350
¢
7-103
#208-8728
113
032616
G
7-103
#211-9130
114
033516
G
7-103
#216-9405
115
03375
6
7-103
#219-9571
116
035120
6
7-103
#226-9960
117
036060
¢
7-103
#227-10259

0364564

128

047600

119
12
120
121
122
123
124
125
126
127
129

13
130
31

037122
22602
037460
060634
041410
042534
043312
044276
045410
046204
051336

023024
052350
053304

132
133
134
135
136

053736
054774
055702
057230
057656

139
T4
140

062454
023462
063410

137
138

141
142
143
T44
145
15
16
17
T8
19

G
G

7-103
7-103

G
G
G
6
G

7-103
7-103
7-103
7-103
7-103

6
G
6
G
6
G
G
G
G
G

= 005740

WRD.11

= 005750

= 005630

#280-13621

7-103

063620
064004
064502
06467764
065326
024354
025340
025412
026054
026320

WRD.10

WRD.1

7-103

G
6

= 000200

#230-10423

7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103

060650
061702

UAM

7-103

6
G
¢
G
G
G
G
G
G
G

G
G
G

7-103

7-103
7-103

-1n3
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103

7-103
7-103
7-103

7-103

#78-1688

#79-1730
205-8544
2164-9288
#79-1739
318-15743
#79-1740

207-8670
225-9873

PAGE
(REF

SEQ 039>

#234-10647
#163-6125
#236-10827
#239-11235
#261-11475
#249-11902
#254-12169
#260-12501
#267-12902
#272-13172
#290-14180

#167-6356
#296-14523

#302-14858

#306-15084
#313-15470
#319-15794
#328-16283
#332-16515

#337-16839
#343-17180

#348-17455
#169-6609
#354-17783

#357-17929
#359-18042
#363-18266
#366-18431
#368-18612
#175-6939
#182-7305
#183-7386
#187-7592
#190-7750

193-7885
206-8625
215-9311
181-7243
342-17124
193-7883
211-9027
225-9917

197-8136
207-8672
227-10112
239-11097
347-17376
193-7900
211-9041
227-10110

198-8152
211-8917
229-10348
259-12452
347-17398
193-7917
211-9070_
227-10127

198-8169
211-8929
233-10565
279-13569
356-17892
199-8248
214-9274
229-10346

199-8250
211-8946

200-8297
211-9029

204-8511
211-9072

205-8527
214-9276

289-14136
366-18403
200-8266

301-14799

305-15026

312-15410

200-8295
223-9781
229-10378

206-8623
223-9800
230-10398

207-8641
224-9836
233-10563

223-9764
229-10362

= 00614;

006220
006226
006232
006242
006250
005654
006260
006264
096300
006306
006316
006324
006336

#79-1768
#79-1769
#80-1774
#80-1775
#80-1776
#80-1777
#80-1778

WRD.2”

WRD.5
WRD.30
WRD.31
WRD.32
WwRD.33
WRD.34

WwRD.35
WRD.36
WRD.37
WRD.38
WRD.39
WRD.4
WRD.40
WRD.41
WRD.42
WRD.43
WRD.44
WRD.4S
WRD.46

= 006134
=
=
=
=
=
=

=
=
=
=
=
=
=
=
=
=
=
=
=

005646
006156
006164
006200
006206
006212

362-18195

233-10605

oo WY

O NWVMOO
SHNO 0o 0;'\) OO

rorLRONOND

\¥,]

~N OO~

~NO~

353-17729

6-16496

236-10802
236-10799
295-14474

n
59
52
52
93-7902
56~
5247&7-11772
47-11776

39-11094

1-11427

29€-14496

305-15024

326-16153

326-16185

327-16224

247-11809

268-11830

2648-11847

301-1487

305-15C28

353-17732

354-17748

354=-17751

198-8189

205-8564

211-8969

215-9332

227-10129

229-10364

356-17896
353-17706

247-11791
247-11789
247-11793
241-11428

484848-

1
1
1

331-16464

233-10584

AU
OD O

WRD.29

#79-1753
#79-1754
#79-1755
#79-1756
N79-1757
#79-1732
#79-1758
#79-1759
#79-1760
#79-1761
#79-1762
#79-1763
#79-1764
#79-1765
#79-1766
#79-1767
#79-1733

225-9919

©o
Qo GO

= 006104
= 006112
= 006126

36
53

225-9875

WRD.24
WRD.25
WRD.26

211-9043

287-14019

—

#79-1749
#79-1750
#79-1751
#79-1752

224-9838

267-12875

(381, 91,8 ]

006046
006054
006062
006076

SEQ 0396

v0?

211=-8949

=
=
=
=

NS OO—=

WRD.20
WRD.21
WRD.22
WRD.23

98
14
08

347-17399

#79-1731

= 005634

WRD.2

IR I

200-8293
211-8962
216-9370
229-10360
305-15022
34,8-174622

#79-1744
#79-1745
#79-1746
#79-1747
#79-1748

006006
006014
006022
006034
006040

=
=
=
=
=

WRD.15
WRD.16
WRD.17
WRD.18
WRD.19

353-17705

Nt NON = b e b ed b d N D D b d ek —d ON =4 2 QD O OO
OO =t b s b D NNONNOOSH—=2000NVOO
N —
NOWOOO®MNMNION—=~N
o~
OO W
~N
~ — W
NOCOMN
S =2 ONWMNIWND

#79-1742
#79-1743

WWNRORLMNOND =PRI

= 005770
= 005774

WRD.13
WRD.14

]
NOW—"“\:‘O\"WW

295-144M
366-18402

(REF

&H
=00~
O &~ NN
OD

205-8562
218-9524

PAGE

~NAD
0O

233-10582

#79-1741

D N PO AN N =2 LALN AN AANNDAN = NN RO A

= 005760

REFERENCES

WRD.12

ON 23-0(T7-80 AT 09:15

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

MACRO

61-6021
B1-7245
89-14139

162-6080

181-7244

259-12453

287-14014

289-14137

361-18159

326-16152

326-16184
206-8585

327-16223
211-8986

331-16461
215-9350

227-10177

227-10222

230-10384

239-11167
342-17126
239-11168

239-11182

198-8153

205-8528

205-8545

211-8930

211-8947

214-9289

215-9312

239-11095
239-11170

342-17125

) et =

REATED BY

93-7919

—

199-8210

(REATED BY

SYMBOL CROSS REFERENCE

SYMBOL
WRD.47

WRD.48
WRD.49
WRD.S
WRD.50
WRD.S1

WRD.52

WRD.S3

VALUE
= 006350

=
=
=
=
=

006360
006370
005662
006400
006406

MACRO

ON 23-0CT-80 AT

REFERENCES
#80-1779

#80-1780
#80-1781
#79-1734
#80-1782
#80-178%

= 006420

#80-1784

= 006426

#80-1785

186=-7513
279-1357%
239-11169

174-6861

1764-6863

335-16737

169-6545

174-6860

277-13463

287-14013

335-16735

186=-7533
335-16736
208-8698
186-7512
186-7551
186-7511

186-7553
336-16801
211-9097
186-7532
363-18231
186-7531

247-11773

247-11790

362-18194

363-18233

186-7552

187-7569

361-18160

362-18'93

363-18232

295-14472

296-14498

362-1819¢

146-5220
147-5279

179-7124

179-7154

103-3062

+106-3215

106-3219

«109-3373

122-4062
*140-4910

*125-4196
140-4914

101-2948

103-3046

104-3106

187-7568

= 006462
= 006472
= 006504

#80-1789
#80-1790
#80-179

348-17425

WRT.CS

WRT.DA
WRT.DS

WRY.DY
WRT.D2
WRT.D3
WRT.EE
WRT.EL

WRT.ER
WRT.E1
WRT.E2
WRT.MR
WRT.FA
WRT.PD
WRT.RE

WT.DAT

Ww.C.S!

XOR.LN
X$ALWA

X$FALS
X$0FFS
X$TRUE

$END.L
$PAT(H

$SAVE?

005670
006510
006526
005676
005712
005726

#79-1735
#80-1792
#80-1793
#79-1736
#79-1737
#79-1738

014174

#98-2791

014530
017512
016302
016620
017136
016240
016176
016352

#104-3106
#141-4970
#129-4373
#133-4565
M137-4L764
#126-6247
#123-4112

#101-2948
#113-3579
#116-3752
#107-3263
#110-3419
#119-3933
#145-5183

015272
015500
014706
015064
015732
017622

011670

011664

= 000040
= 000400
= 000020
065370
002720

004006

146-5245
146-5250
147-5259
147-5269
1647-5274

178-7114

179-7146

179-7150
179-7162

179=7127
341-17051
169-6508

179-7158

112-3536
+128-4329

#115-3692
128-4331

£155-5683

«155-5703

37-128

42-37"1

#45-61

365-18365

368-18527

#764-14564

*100-2900

*163-5068

143-5072

#94-2510
#7-13

G
G

1646-5210

178-7117
179-7130
179-7133

#764-1451

013354
= 000000

166-629¢

146-5215
146-5230
166-5235
146-5225
146-5240
147-5264
166-6261

*112-3532
125-4198

SEQ 0397

169-6546

166-6296

"WRD.S57
WRD.S8
WRD.S59

=
=
=
=
=
=

vOl

248-11849
336-168C2

239-11171
239-11175

WRD.6
WRD.60
WRD.61
WRD.7
WRD.8
WRD.9

248-1183¢
318-15744

#80-1786
#80-1787

#80-1788

CREF

247-11811
312-15411
279-13570

= 006436
= 006446

= 006454

PAGE

239-11184
272-131461

WRD.S54
WRD.SS

‘WRC.56

09:15

295-14443

173-6795

100-2904

+«103-3058

166-6306

169-6556

301-14790

115-3696
+132-4516

+«118-3872
132-4518

335-16698

335-16707

336-16787

98-2791

100-2888

181-7251

118-3876
+136-4706

*#122-4058
136-4708

109-3377

#7-13
#7-13
#7-13

#370-18693
#8-327

106-3203
119-3933
145-5183

107-3263
122-4044
149-5381

109-3361
129-4373
192-7852

370-18713

G0-2284

110-3419
131-4487
197-8115

112-3519
133-4565
204-8490

113-3579
135-4677
211-8893

115-3679
137-4764
213-9241

116-3752
139-4BB0
236-10745

118-3858
143-5056
334-16687

$13
$130
$131

052364

$135
$734
$135
$136
$137
$738
$139
$T4
$140
$141
$142
$743
144
$745
$15

053752
055010
055716
057244
057672
060664
061716
023040
062470
063424
063634
064020
064516
065010
023476

$7132

$16
$17
$18

022416
051352

053320

024370

025354
025426

#285-13868
#165-6241
#293-14342
#299-14690
#304-14975
#310-15271
#316-15631
#323-16028
#330-16404
#334-16687
#340-17002
#346-17322
#169-6491
#351-17612
#356-17873
#358-17995
#361-18156

#178-7102
#183-7361
#185-7489

~ Qo
— O~
N
[aS 1o JV_ 18]

—

261-11344
299-14690

#158-5837
#192-7852
#197-8115
#204-8490
#211-8893
#213-9241
#218-9503
#222-9730
#227-10094
#229-10332
#232-10533
#161-6001
#236-10745
#239-11002
#261-11344
#245-11687

SEQ 0398

v01

(V4]

021522
026334
026744
030116
031364
032632
033532
033770
035134
036074
036470
021730
037136
037474
040650
041424
042550
043326
044312
045424
046220
047614

$11
$710
$i
$112
$113
$114
$115
$116
$117
$118
$119
$12
$120
$12
$122
$123
$124
$125
$126
$127
$728
$729

G
6

oo
Hr o

004040
004060

= PAINNNI OWONON00

$SAVEL
$SAVES

PAGE
CRE f

81-1862

O = OO SN2
N O

WO &

004022

REFEREMCES

$SAVEDS

ON 23-0CT-80 AT 299:15

WS ONOOO—00 —

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

MACKRO

NN NO
b
bt b Pt
b D
D Db DD
DS
Db
b b
d N 2 2 D OO OO
AU ANN OO
0000 N NOANNO OO WNNWNE
NS WWWNMNOININ) = = 2 O = OO0 VW
VOO
NNOONE =200V
NSOMWNWN-—ON = O W — O N0 OSSN
o ¥ Yo
WNOO
=N
WOV
S
0O NOWNNI NN NVNOONO
VW no [0 W

CREATED BY

\JWNV\@OU‘O\IJ\OQHNNOOMON? NOONNOST OO

"Ll

154-5613

239-11002
293-14342