Digital PDFs

AH-S390A-MC

February 1981

400 pages

Original

183MB

view download

OCR Version

253MB

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

CZMLAAD ML=-11 LOGIC TEST

SEQ 0007

LTITLE CZMLAAD ML-11 LOGIC TEST
.SBTTL

USER DOCUHENTATIO:EH ¢

e
PRODUCT CODE
:

AC-5388A=MC

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 CONSTRUED AS A COMMITMENT BY DIGITAL

EQUIPMENT CORPORATION.

DIGITAL EQUIPMENT CORPORATION ASSUMES NO

RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR

NO RESPONSIBILITY

IS ASSUMED

SOF TWARE ON EQUIPMENT THAT

AFFILIATED COMPANIES.

FOR

IS NOT

THE

USE

SUPPLIED

IN THIS DOCUMENT.

RELIABILITY

DIGITAL

ITS

1981 BY DIGITAL EQUIPMENT CORPORATION

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:
DIGITAL
DEC

PDP
DECUS

UNIBUS
DECTAPE

MASSBUS

CZMLAAD ML=-11 LOGIC TEST
TABLE OF

;°
G47-

MACRO M1113

CONTENTS

1
]
1

USER DOCUMENTATION

PROGRAM HEADER AND TABLES
MISCELLANEOUS CODING SECTION
HARDWARD TEST SECTION

23-0CT-80 09:11

¢
PAGE 2

SEQ 0002

MACRO M1113

CZMLAAD ML-11 LOGIC TEST
'USER DOCUMENTATION

23-0C7-80 09:11

PAGE 3

SEQ 0003

TABLE OF CONTENTS

NOWVIS WSO

ERROR INFORMATION

PERFORMANCE AND PROGRESS REPORT

DEVICE

TEST

€

OPERATING INSTRUCTIONS
COMMANDS
SWITCHES

FLAGS
HARDWARE QUESTIONS

SOF TWARE QUESTIONS
EXTENDED P-TABLE DIALOGUE
QUICK STARTUP PROCEDURE

v
v

INFORMATION TABLES

SUMMARIES

———
—

.
o
I
o
o
"

I
e
P

SYSTEM REQUIREMENTS

RELATED DOCUMENTS AND STANDARDS
DIAGNOSTIC HIERARCHY PREREQUISITES

oo
NOND

GENERAL INFORMATION

PROGRAM ABSTRACT

S-S0

MACRO M1113

CZMLAAD ML-11 LOGIC TEST
USER DOCUMENTATION

23-007-80 09:11

1.0

GENERAL

1.1

PROGRAM ABSTRACT

3
PAGE &

SEQ 0004

INFORMATION

DIAGNOSTIC ENGINEERING WAS CONTRACTED BY MEMORY ENGINEERING TO MAKE THIS
DIAGNOSTIC
IN ORDER TO AID MEMORY ENGINEERING TO DESIGN AND DEBUG THE

:t‘}}. AID FIELD SERVICE FOR FIELD REPAIRS AND

INSTALLATIONS

THIS DIAGNOSTIC PRODUCT WILL BE DESIGNED TO TEST
FROM
ML=11 UNITS OFF A SINGLE RH11 OR RH70 CONTROLLER.

ONE

THE FUNCTIONAL LEVEL (FRU) OF THIS DIAGNOSTIC PRODUCT WILL BE

THE

EIGHT
TO

THE

LOGIC FUNCTION LEVEL
(I.E. DRIVE SELECTION). UPON DETECTION OF AN
ERROR BY THE DIAGNOSTIC, THE LOGIC FUNCTION AND RESPECTIVE MODULE
WHICH IT IS LOCATED ON WILL BE PRINTED TO THE OPERATOR.
THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC
RUNTIME SERVICES SOFTWARE (SUPERVISOR).
THESE SERVICES PROVIDE

THE_ INTERFACE TO THE OPERATOR AND TO THE SOF TWARE ENVIRONMENT.
THI'S PROGRAM CAN BE USED WITH XXDP+, ACT, APT, SLIDE AND PAPER
TAPE.
FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER
TO THE XXDP+ USER'S MANUAL.
THERE IS A BRIEF DESCRIPTION OF
THE RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT.
1.2

- SYSTEM REQUIREMENTS

THE HARDWARE DESIGN IS EXPECTED TO CONFORM TO THE STANDARDS SET
IN THE MASSBUS SPECIFICATION (DEC STANDARD 159:.

PDP=11 WITH MINIMUM OF 28K WORDS OF MEMORY
CONSOLE TERMINAL
RH11 OR RH70
1

10 8 ML=11 DRIVES ON INTERMIXED RUS

XXDP+ LOAD MEDIA

1.3

1.4

RELATED DOCUMENTS AND STANDARDS

SUPPRGC.DOC

SUPINT.MEN

SUPFUN.C

XXDPPLUS.DOC

BLISS LANGUAGE GUIDE

BLISS-16 USER'S GUIDE

DIAGNOSTIC HIERARCY PREQEOUISITES

FORTH

CIMLAAD ML-11 LOGIC TEST
USER DOCUMENTATION

“.

MACRO H1J13

’

23-0CT-80 09:11

PAGE 4-1

IT WILL BE ASSUMED THAT PRIOR TO THE RUNNING OF THIS

ALL
APPROPRIATE
(PU,
BEEN SUCCESSFULLY RUN.

SEQ 0005

DIAGNOSTIC

THAT

MAIN MEMORY AND RH CONTROLLER DIAGNOSTICS HAVE

THIS DIAGNOSTIC WILL HOWEVER PERFORM MINIMAL RH TESTS
TO ENSURE
ITS
S6§STANCE AND BASIC FUNCTIONALITY BEFORE LOGIC TESTS ARE ALLOWED TO
2.0

OPERATING INSTRUCTIONS-

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

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

CONTINUE

PROCEED

EXIT
ADD

DROP
PRINT

DISPLAY
FLAGS

IFLAGS

CONTINUE FROM AN ERROR HALT

RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY:)
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE
CONSIDERED TO BE ACTIVE AT START TIME

DEACTIVATE A UNTT
PRINT STATISTICAL INFORMATION (IF

IMPLEMENTED
4.0)
SECTION
=
DIAGNOSTIC
THE
BY
TYPE A LIST OF ALL DEVICE INFORMATION
TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3)

CLEAR ALL FLAGS (SEE SECTION 2.3)

A COMMAND CAN 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 TES S SPECIFIED IN

/PASS:DDDDD
/FLAGS:FLGS

THE LIST.

LIST

IS
A STRING OF

TEST

NUMBERS, FOR EXAMPLE - /TESTS:1:5:7-10,
THIS LI1ST WILL CAUSE TESTS 1,5,7,8,9,10 TO
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.

MACRO M1113

CIZMLAAD ML=-11 LOGIC TEST

USER DOCUMENTATION

23-0CT-80 09:11

PAGE 4-2

1
SEQ 0006

/EOP:DDDDD

REPORT END OF

PASS MESSAGE AFTER EVERY

JUNITS:LIST

TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED

DDDDD PASSES ONLY.

(DDDDD = 1 TO 64000)

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

SWITCH USAGE:

EXAMPLE OF

START/TESTS:1=5/PASS:1000/E0P:
100
THE EFFECT _OF

THIS COMMAND WILL BE:

TESTS 1

THROUGH 5 WILL BE

EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY.

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

YOU MAY,

BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH
COMMAND
.

START

RESTART
CONT INUE
PROCEED

TESTS

PASS

FLAGS

EOP

UNITS

X
X

X
X
X

DROP
ADD

PRINT
DISPLAY
FLAGS
ZFLAGS

X
X
X

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

HOE

HALT ON ERROR = CONTROL IS RETURNED TO
RUNTIME SERVICES COMMAND MODE

LOE
IER®
IBR*

IXR#
PRI

LOOP ON ERROR
INHIBIT 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

CIZMLAAD ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

23-0(CT=-80 09:11

PNT

PAGE &-3

PRINT TEST NUMBER AS TEST EXECUTES

BOE
UAM
ISR

"BELL'' ON ERROR
UNATTENDED MODE (NO MANUAL INTERVENTION)
INHIBIT STATISTICAL REPORTS (DOES NOT
APPLY 10 DIAGNOSTICS WHICH DO NOT SUPPORT
STATISTICAL REPORTING)

IDR

INHIBIT PROGRAM DROPPING OF UNITS

ADR

EXECUTE AUTODROP CODE

LOOP ON TEST

LOT
EVL

EXECUTE EVALUATION (ON DIAGNOSTICS WHICH
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

HARDWARE QUFSTIONS

WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT
THE USER FOR HARDWARE INFORMATION BY TYPING '‘CHANGE HW (L) ?"
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 ''Y'', THE RUNTIME SERVICES WILL ASK FOR THE NUMBER
OF UNITS C(IN DECIMAL).
YOU WILL THEN BE ASKED THE FOLLOWING
QUESTIONS FOR EACH UNIT.
PARAMETER CODING CALLS

GPRMA

MSGH1,0,0,0,177777,YES

:RH ADDRESS

GPRMD

MSGH&.6.D.77.1,16.,YES

*NUMBER FO ARRAYS

GPRMD
GPRML

MSGH6,12.0,7,0,7,YES
MSGH7.14.1.YES

GPRMD
GPRMD
GPRML

MSGH2.2.0.77,11,70.YES
MSGH3.4.0.777,0.777,YES
MSGHS.10,1,YES

‘RH TYPE
*RH VECTOR ADDRESS
*DRIVE OPTIONS

:DRIVE NUNBER
"PARITY DISABLED

PARAMETER CODING MESSAGES
MSGH1:

MSGH2:
MSGH3:
MSGH4:
MSGHS5:
MSGH6:
MSGH7:

.ASCIZ

.ASCIZ
.ASCIZ
.ASCIZ
LASCIZ
.ASCIZ
.ASCIZ

SAMPLE DIALOGE

/RH ADDRESS?/

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

SEQ 0007

CIMLAAO ML=-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

DR> STA

23-0CT-80 09:11

PAGE 4=-4

SEQ 0008

<(R>

CHANGE HW <L>
# UNITS <D>

7?2

<(R>

<(CR>

UNIT 0

RH ADDRESS <0> 176400

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

<(R>

RH VECTOR ADDRESS <0>
204
?
<(R>
NUMBER OF ARRAYS MODULES
? <D>
16
?
14
<(R>
?
Y
<L>
IS DRIVE OPTION AN ML11A 2
ML-11 DRIVE NUMBER ? <0>
0
?
<(R>
<(R>
?
IS PARITY DISABLED ? <L> N

2.5

<(R>

SOFTWARE QUESTIONS

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

"'y*',
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:

L.ASCIZ

/PRINT SERIAL NO.?/

SAMPLE DIALOGE
PRINT SERIAL NO.

2.6

<L>

N ?

<(R>

EXTENDED P-TABLE DIALOGUE

WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES
IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST
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 EIGHT UNITS (SUB-DEVICES) ATTACHED TO 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 4-5

IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE

Q-FACTOR.

THIS Q-FACTOR MAY BE O OR 1.

BELOW IS A SIMPLE WAY

T0 BUILD A TABLE FOR ONE XY11 WITH EIGHT UNITS.
# UNITS (D)

B<CR>

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

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

0<CR>

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

UNIT &
CSR ADDRESS (0) ?

SUB-DEVICE # (0) ?

Q-FACTOR (0) 0 ?

<(CR>

160000<CR>
3<(R>

<CR>

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

Q-FACTOR (0) 0 ?

UNIT 6
CSR ADDRESS (0) ?

SUB-DEVICE # (0) ?

Q-FACTOR (0) 0 ?

<CR>

160000<CR>

5<CR>

<(CR>

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

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

Q-FACTOR (0)

<(R>

NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR 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

DO NOT VARY SIGNIFICANTLY FRCM UNIT TO UNIT.
NOT VERY EFFICIENT.

THE PROCEDURE SHOWN 15

THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SP EC 17 1CA Tl ONS HOWEVER.
| CATION
%EIYSR?UILD THE SAME TABLE USING THE MULTIPLE SPECIFICAT

SEQ 0009

CIMLAAQ ML-11 LOGIC TEST
USER DOCUMENTATION

MACRO Mi113

23-0CT-80 09:11

# UNITS (D) 7

1
K
PAGE 4-6

B<CR>

UNIT 1

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

Q-FACTOR (0) 0 ?

1,0<CR>

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

Q-FACTOR (0) 0 ?

O<CR>

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

(0)

0 ?

1<(R>

AS YOU CAN SEE 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 IS 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 TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA
FROM THE FIRST NUMBER TO THE SECOND.
IN THIS CASE, SUB-DEVICES
2, 3, & AND 5 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 TWO UNITS ARE
SPECIFIED IN THE THIRD PASS.

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

# UNITS (D)

8<(R>

UNIT 1

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

AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING
A NULL FIELD) TELL THE RUNTIME SERVICES 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 S0HZ (IF THERE
IS A CLOCK) QUESTIONS

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

SEQ 0010

MACRO M1113 23-0CT-80 09:11 PAGE k-71

TEST

SEQ 0011

FILE FOR THIS PROGRAM

. TYPE "'START"

CIMLAAD ML-11 LOGIC
USER DOCUMENTATION

. 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 1)SING ONLY

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

THE

THESE 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 IS SET
THE GENERAL ERROR MESSAGE

NAME

TYPE

IS OF

NUMBER

ERROR MESSAGE

THE

FORM:

ON UNIT NUMBER

.WHERE; NAME = DIAGNOSTIC NAME

TYPE = ERROR TYPE (SYS FATAL,
NUMBER = ERROR NUMBER

(SECTION 2.3).

TST NUMBER PC:XXXXXX

DEV FATAL,

HARD OR

SOFT)

UNIT NUMBER = 0 = N (N IS LAST UNIT 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.
THIS PERMITS EXTENSIVE ERROR MESSAGE PRINTING AT MINIMAL
STORAGE REQUIREMENTS.

THE FOLLOWING DEMONSTRATES TYPICAL ERROR MESSAGES:

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

CIMLAAD ML-11 LOGIC TEST
'USER DOCUMENTATION
%

MACRO M1113

23-0CT-80 09:11

PAGE 4-8

ASYNCHRONOUS MODULE FAILURE

EXCESSIVE DATA ERRORS DURING INITIAL ARR RD_WRT
ML11 DVC FTL ERR

00112 ON UNIT 03 TST 037 SuB 000 PC : 056466

ASYNCHRONOUS MODULE FAILURE
ARRAY ADRS MULTIPLEXER FAILURE
FAILED AT DSA: 000000

3.2.1 ERROR NUMBER DEFINITION
ERROR NO.

FAILING LOGIC

DRIVE DID NOT RESPOND

DSA REG READ/WRITE ERROR
DURING DRIVE SEL TEST

UNIQUE DRIVE SELECTION

ML REGISTER READ WRITE

ML REGISTER READ WRITE
ONES/ZEROES ERROR

ML REGISTER INITIALIZATION

CONTROL BUS BAD PARITY
NOT DETECTED

WITHIN 1.5 US

ERROR

ONES/ZEROES ERROR

ERROR

CONTROL BUS GOOD PARITY

NOT DETECTED.

CONTROL BUS BAD PARITY
GENERATED.

ARRAY SIZING LOGIC ERROR

GO BIT NOT CLR AFTER

NOOP FUNCTION

ILF BIT SET DURING NOOP
FUNCTION

OP] BIT SET DURING NOOP
FUNCTION

GO BIT NOT SET DURING WRITE

DRY BIT NOT CLEAR DURING
WRITE CHECK FUNCTION

CHECK FUNCTION

SEQ@ 0012

CIMLAAOD ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

23-0(CT-80 09:11

N 1
PAGE 4-9

DRY BIT SET WHEN GO SET

ILF SET DURING WRITE
CHECK FUNCTION

OPI BIT SET DURING WRITE

GO BIT NOT CLEAR AFTER WRITE

DRY BIT NOT SET AFTER WRITE

GO BIT NOT CLEAR AFTER WRITE

CHECK FUNCTION 'ASYNC FAILURE'
CHECK

FUNCTION

*SYNC

FUNCTION'

CHECK FUNCTION

CHECK FUNCTION
CHECK FUNCTION

"ASYNC FAILURE'

'SYNC FAILURE'

GO BIT NOT SET DURING WRITE

FUNCTION

DRY BIT CLEAR WITH GO CLEAR

DRY BIT SET WITH GO BIT

DURING WRITE FUNCTION.

ILF BIT SET DURING WRITE

FUNCTION

OPI BIT SET DURING WRITE FUNCTION

GO BIT NOT CLEAR AFTER WKITE
FUNCTION 'ASYNC FAILURE'

GO BIT NOT CLEAR AFTER WRITE

FUNCTION 'SYNC FAILURE'

33
34

CHECK FUNCTION

SEQ 0013

DURING WRITE CHECK FUNCTION

.
i

DRY BIT NOT SET AFTER WRITE

FUNCTION.

GO BIT NOT CLEAR AFTER WRITE
FUNCTION

'ASYNC

FAILURE'

GO BIT NOT CLEAR AFTER WRITE
FUNCTION "ASYNC FAILURE'

GO BIT NOT SET DURING READ
FUNCTION.

m—_——

S—

'CZMLAAO ML=11 LOGIC TEST
'USER DOCUMENTATION

|
l

MACRO M1113

DRY BIT SET WHILE GO CLEAR
DURING READ FUNCTION.

DRY BIT SET WHILE GO SET
DURING READ FUNCTION.

PAGE 4-10

23-0CT-80 09:11

ILF BIT SET DURING READ

FUNCTION.

OP] BIT SET DURING READ

GO BIT NOT CLEAR AFTER READ

GO BIT NOT CLEAR AFTER READ
FUNCTION 'SYNC FAILURE'

DRY BIT NOT SET AFTER READ

GO BIT NOT CLEAR AFTER READ
FUNCTION "ASYNC FAILURE'

GO BIT NOT CLEAR AFTER READ
FUNCTION "SYNC FAILURE'

fedy

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

OPI 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 NOT CLEAR AFTER
WRITING A ONE TO IT

WRITING A ONE TO OTHER
DRIVES ATA BIT CLEARED

FUNCTION

"ASYNC FAILURE'

FUNCTION

SEQ 0014

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

'USER DOCUMENTATION

23-0CT-80 09:11

¢
2
PAGE 4-11

THIS DRIVES ATA BIT

56
|

GO BIT NOT CLEARED AFTER
SEARCH FUNCTION
ILF BIT SET DURING SEARCH

FUNCTION

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

ATA BIT NOT SET AFTER
SEARCH FUNCTION

OPI BIT SET DURING SEARCH
FUNCTION AT PRESENT ARRAYS

ATA BIT SET AFTER SEARCH
AT NOT PRESENT ARRAYS.

GO BIT NOT CLEAR AFTER

ILF BIT SET DURING
READ=IN=-SET FUNCTION

OPI BIT SET DURING

UV BIT NOT SET AFTER

GO BIT NOT CLEARED
AFTER ILLEGAL FUNCTION

ILLEGAL FUNCTION NOT
DETECTED

OP] BIT SET WITH ILLEGAL
FUNCTION°

READ=IN=-PRESET FUNCTION

READ=IN=-PRESET FUNCTION
READ=IN-PRESET

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

MEMORY ARRAY PROM

NIBBLE OFF SET COUNTS

UNS BIT SET WITH GOOD
UV DATA

UNS BIT SET WITH GOOD

CHECK SUM ERRORS DURING
INITIAL PRCM READS

GREATER THAN 14 DETECTED.

SEQ@ 0015

'CIMLAAD ML-11 LOGIC TEST

MACRO M1113

'USER DOCUMENTATION

23-0CT-80 09:11

0
2
PAGE 4=-12

UV DATA

|
|

UNS BIT NOT SET WITH BAD
UV DATA

UNS BIT NOT SET WITH BAD

MEMORY ARRAY PROM ROW/

BAD NIBBLE THRESHOLD OF

UV DATA

COL DATA ORING ERROR

36 EXCEEDED DURING

%?é;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
EXISTENCE TEST WERE IN
ERROR (FAIL UNIT)

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

SYNC BUS DATA BIT
WRITE PATH CONTINUITY

MODULE

SELECTION FAILURE

FAILURE

SYNC BUS DATA BIT

READ PATH CONTINUITY
FAILURE.

RAM BUS ADRS COUNTER
FAILURE TO LOAD/UNLOAD

SKIF RAM DURING WRITE
FUNCTION

SEQ 0016

MACRO M1113 23-0CT-80 09:11 PAGE 36-1%

'CIMLAAOD ML-11 LOGIC TEST
'USER DOCUMENTATION

RAM BUS ADRS COUNTER
FAILURE TO LOAD/UNLOAD

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
FAILURE (SHIFTED BiT
NIBBLE PATTERN)

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

FAILURE DURING
'A' ERROR.

CLASS

CS1 FUNCTION ABORT

FAILURE

DURING CLASS

'B' ERROR

LBT BIT SET BEFORE

DSA REGISTER INCREMENT

A LAST BLOCK.TRANSFER

FAILURE DURING NON LAST

BLOCK TRANSFERS.
99

LBT BIT NOT CLEAR
AFTER *LOADING DSA REG

100

LBT BIT NOT SET

101

DSA REGISTER
INCREMENT FAILURE

AFTER A LAST BLOCK
TRANSFER

AFTER A LAST BLOCK
TRANSFER
102

IAE BIT NOT SET AT
INVALID SECTOR ADDRESSES

SEQ 0017

CIZMLAAD ML=-11 LOGIC TEST

USER DOCUMENTATION

MACRO M1113

23-0CT-80 09:11

103

AOE BIT NOT SET
AFTER ADDRESS OVERFLOW

104

SC BIT NOT AFTER
(S1 FUNCTION ADORT

105
106

107

PAGE 4-14

GOOD DATA BUS

PARITY NOT 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

LOOP TECT

SHOOTING

110

UNIQUE REGISTER
SELECTION TEST FAILURE

FAILURE TO FIND GOOD
MOS RAM ROW DURING

ARRAY ADRS MuUx TEST
(INTERMEDIATE DIAG MSG)

112

113
114

UNIQUE ARRAY MODULE
ROW/COL ADDRESSING
FAILURE

DRIVE TYPE REGISTER VALUE

WAS NOT CORRECT

TRE BIT SET UNEXPECTEDLY

DURING A WRITE CHECK TRANSFER
(INTERMEDIATE DIAG ERROR)

115

TRE BIT SET UNEXPECTEDLY

DURING A WRITE TRANSFER

(INTERMEDIATE DIAG ERROR)

116

TRE BIT SET UNEXPECTEDLY
DURING A READ TRANSFER
(INTERMEDIATE DIAG ERROR)

117

TRE BIT DID «OT SET AFTER
A REGISTER MODIFICATION ERROR
(EXCEPTION WAS NOT ASSERTED)

4.0 PERFORMANCE AND PROGRESS REPORTS

SEQ 0018

USER DOCUMENTATION

23-0CT-80 09:11

‘

6 2
PAGE 4-15

MACRO M1113

SEQ 0019

AT THE END OF EACH PASS, THE PASS COUNT 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.

SECTION 2.2 DESCRIBES SWITCHES.

5.0 DEVICE INFORMATION TABLES
HARDWARE DEFAULT PTABLE

.WORD
.WORD
.WORD
.WORD

176400
70
204
16.

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

.WORD

;ML=11 DRIVE NUMBER

.WORD
.WORD

;1S DRVE OPTION ML11A,

;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 ZERQ'S TEST

TEST REGISTERS READ WRITE CAPABILITY AND UNIQUENESS

TST4.

READ WRITE REGISTER SHIFTING ONE'S AND ZEROES

TEST REGISTERS FOR UNIQUE DATA BITS.
TSTS.

TEST REGISTERS FOR CORRECT INIT DATA.
TST6.

TEST FOR UNIQUE REGISTER SELECTION

TST7. PRINT DRIVE SERIAL NUMBER

PRINT THE CONTENTS OF
ANSWERED ‘YES'.

TST8.

(-BUS PARITY

MLSN

THE

SOFTWARE

QUESTION

WAS

0=NO

CIZMLAAD ML-11 LOGIC TEST

CZMLAAO ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

23-0CT-80 09:11

TEST IF DRIVE CAN DETECT BAD PARITY
GOOD PARITY,

H
2
PAGE 4-16

(=BUS

SEQ 0020
AND

GENERATE

TST9. MEMORY SIZING

SEE IF MEMORY SIZING LOGIC DETECTS AND RECORD CORRECT
OF ARRAYS PRESENT.
TST10.

NO=-OP FUNCTION

SEE
TST11.

NUMBER

A NO-OP FUNCTION CAN BE EXECUTED.

WRITE

SEE

CHECK FUNCTION

IF A WRITE CHECK FUNCTION CAUSES THE DRIVE TO HANG.

TST12. WRITE FUNCTION
SEE

A WRITE FUNCTION CAUSES THE DRIVE

TO HANG.

TST13. READ FUNCTION

SEE
TST14.

IF A READ FUNCTION CAUSES THE DRIVE
CLEAR FUNCTION

SEE
TST15.

IF A CLEAR FUNCTION CAN BE EXECUTED.
COMPOSITE FRROR BIT

EEEOAF
TST16.

TEST

EACH INDIVIDUAL ERROR BIT

IN MLER CAUSES

(OMPOSITE

ATA BIT

TEST

TST17.

TO HANG.

THE ATA BIT

CAN BE

SET

AND CLEARED.

SEARCH FUNCTION

SEE IF A SEARCH FUNCTION CAN BE EXECUTED ON ALL PRESENT ARRA¥s.

TST18.

READ

TEST
TST19.

IN PRESET

IF A READ IN PRESET FUNCTION SETS VOL V H.

ILLEGAL FUNCTION

SEE IF WRITING AN ILLEGAL FUNCTION TO CS1 CAN BE DETECTED AND
THAT A TRANSFER IS NOT

TST20.

INITIATED.

TEST TO SEE IF WRITING TO SPECIFIC REGISTERS ARE
ABORTE%
WHILE
THE( DRIVE
IS ACTIVE.. SEE IF WRITING TO NON-SPECIFI
REGISTERS ARE ALLOWED WHILE DRIVE IS ACTIVE.

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

USER DOCUMENTATION

TST21.

23-0(T-80 09:11

2
PAGE 4=17
|

SEQ@ 0021

INITIAL PROM TEST

TEST PROMS FOR EXISTENCE.

1ST22. PROM 'OR'
TEST

FUNCTION TEST

THE PROM DATA ORING FUNC

TST23. UV ERROR TEST

ES%BRQBILITV OF UV ERR PROMS TO DETECT ALL POSSIBLE CHECK SUM
TST24.

INLTIAL ARRAY TEST

TEST ARRAY TIMING AND CONTROLFOR EXISTENCE.
1S125. PROM SELECTION TEST
TEST FOR UNIQUE PROM SELECTION.

1ST26. READ WRITE 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 TO SEE

IF MEMORY CAN BE REFRESHED.

TST28. ADDRESS COUNTER

TEST THE ADDRESS COUNTER FOR ABILITY
POSSIBLE MEMORY ADDRESSES.

COUNT

THROUGH

ALL

TST29. ARRAY MODULE SELECTION

TEST FOR UNIQUE ARRAY MODULE SELECTION
TST30.

SEQUENCER EXISTENCE TEST

TEST TO SEE IF BASIC SEQUENCER TIMING EXISTS.
TST31. SYNC DATA BUS CONTINUITY/WRITE PATH

TEST SYNCHRONOUS DATA BUS WRITE PATH FOR CONTINUITY BY
ING WRITING ONE'S AND ZERO'S.

READ-

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

MACRO M1113 23-0CT-80 09:11 PAGE 4-18

'CIMLAAQ ML-11 LOGIC TEST
USER DOCUMENTATION

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

)

LOAD/UNLOAD
I

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

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.

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.

CS1

FUNCTION ABORT

SEQ 0022

CIZMLAAD 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

TO COMPLETE.

ALLOWED

TST40. LAST BLOCK INDICATOR

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

BELOW

THE

INVALID ADDRESS TEST

FOR ALL ILLEGAL DSA ADDRESSES READ THE

IAE BIT SET.

TST42. ADDRESS OVERFLOW

TEST FOR ADE ON TRANSFERS WHICH EXTEND BEYOND THE LAST BLOCK.
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.
TST45. PROM DATA TEST

VERIFY THAT CHECK SUM VALUES FOR ALL PROM LOCATIONS ARE CORRECT.

'CIMLAAO ML-11 LOGIC TEST

'PROGRA? HEADER AND TABLES

.SBTTL

002000

2
SEQ 0024

PROGRAM HEADER AND TABLES
.ENABL

ABS,AMA

)

2000

BGNMOD

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

c4e

46 002000

POINTER ALL

65 002000

HEADER

ML11,A,0,1800.,0

NAMES OF DEVICES SUPPORTED BY THIS PROGRAM

DEVTYP <ML-11>

80 002122

TEST DESCRIPTION

DESCRIPT <ML-11 LOGIC TEST>

87 002130

THE GLOBAL ERROR TABLE

(INFORMATION

USED IN A CALL TO THE MACRO "‘ERROR'")
96 002152
002152
002154
002156
002160

000000
000000
000000
000000

ERRTBL

ERRTYP::
ERRNBR: :

ERRMSG: :
ERRBLK::

LWORD
WORD

.WORD
.WORD

O
O

O
0

she

———

0O ~NO VN 8N WNRY —

[

- ——

]

R&S

; THE DISPATCH TABLE CONTAINS THE STAKTING ADDRES OF EACH TEST.
; IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST.

33
35 000000
36
38
39 002000

‘

MACRO M1113 23-0CT-80 09:11 PAGE $

DISPATCH 45

002162
Jhe

THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF
THE TEST-DEVICE PARAMETERS.
THE STRUCTURE OF THIS TABLE
IS IDENTICAL TG THE STRUCTURE OF THE HARDWARE P-TABLES,
AND IS USED AS A '‘TEMPLATE" FOR BUILDING THE P-TABLES.

'CZMLAAQ ML-11 LOGIC TEST

PROGRAM HEADER AND TABLES

MACRO M1113

119 002316

23-0CT=80 09:11
DFPTBL
176400
70
204
16.

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

:ML=11 DRIVE NUMBER

176400
000070
000204
000020

WORD
WORD
WORD
WORD

136 002332

000000

.WORD

}%g 002334

000001

LWORD

000000

.WORD

139 002336

;1S PARITY DISABLED,

1=16K,

1=YES,

0=64K
O0=NO

: THE DEFAULT SOFTWARE P=-TABLE CONTAINS VARIOUS DATA USED BY THE
: PROGRAM AS OPERATIONAL PARAMETERS.
THESE PARAMETERS ARE SET
: g?"eT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR AT RUN

148
149
150 002336

162 002342
163

:1S DRVE OPTION ML11A,

144
145
}29

}gg 002340

ENDHW

140
1461
142
143

129

SEQ 0025

BGNHW

131 002320
132 002322
133 002324
134 002326

135 002330

PAGE 7-1

000000

PRSN:

BGNSW

SFPTBL

LWORD

ENDSW

:PRINT SERIAL NUMBER, 1=YES,

O0=N2

—

———

——

(CIPLAAQ ML-11 LOGIC TEST

MACRO M1113

PROGRAM HEADER AND TABLES

23-0CT-80 09:11

PAGE 8

SEQ 0026

NN
NN NN N NNV ~No
PNONININIMNIRINON
= b S

NOWVS
NN 2OV ~NOs w

189

THE HARDWARE 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.

002342

BGNHRD

239 002344
240 002354
241 002366
242 002400
243 002412
244 002420
245 002432
6
247 002440

GPRMA

MSGH1,0,0,0,177777,YES

GPRMD

MSGH&4.6.D.77,1,16.,YES

237

MSGH2.2.0.77,11,70,YES
MSGH3.4.0.,777,0.777,YES
MSGHS.10,1,YES

MSGK6.12.0.7.0,7,YES
MSGH7.14.1.YES

WS WO WO

e
D
e
e
e
—

N =PI
=) —

)

- N

e (\) =

—_ NS O

e e

) ad ad cd ad

ENDHRD

260 002556
261 002610
¢62 002634

GPRMD
GPRML

—

002440
002454
002502
002525

GPRML

256
257
258
259

GPRMD
GPRMD

MSGH1:

.ASCIZ

/RH ADDRESS?/

.ASCIZ
.ASCIZ

/RH VECTOR ADDRESS?/
/NUMSER OF ARRAY MODULES?/

M3GH2:

.ASCIZ

MSGHS:

.ASCIZ

/1S DRIVE OPTION AN ML11A?/

.geg*z

/1S PARITY DISABLED?/

MSGH3:
MSGH4:

MSGH6:

MSGH7 :

.ASCIZ

/IS RH AN '70' OR '112/

/ML-11 DRIVE NUMBER?/

L
I

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.

27; 002660

BGNSFT

285 002662

GPRML

283 002670

ENDSFT

297 002670

.EVEN

120

122

MSGS1:

LASCIZ
.EVEN

MSGS1,0,1,YES

/PRINT SERIAL NO.?/

;PRINT DRIVE SERIAL NUMBER?
:

pi-

lczmuo ML-11 LOGIC TEST
|PROGRAM HEADER AND TABLES
«

300
301
302
303

MACRO M1113 23-0CT-80 09:11 PAGE B8-1 3

BGNPROT

177777
177777
177777

-1
-1
-1

311 002720
312
327 002720

328 002720

337 002760

'HAI

J4e
;s THIS TABLE IS USED BY THE RUNTIME SERVICES
; W0 PROTECT THE LOAD MEDIA.
i--

305 002712

307 002712
308 002714
g?g 002716

SEQ 0027

;OFFSET INTO P-TABLE FOR CSR ADDRESS
;OFFSET INTO P-TABLE FOR MASSBUS ADDRESS
;OFFSET INTO P-TABLE FOR DRIVE NUMBER

ENDPROT
$PATCH::

.BLkW
ENDMOD

'CIMLAAO ML-11 LOGIC TEST

'MISCELLANEOUS CODING SECTION

6 ;M3

:
;

8
Y3

|
|

23-0CT-80 09:11

0001

0002
0003
0004
0718

;
;
3
;
;
;

0719
0720
0721
0722
0723
0724

50 004122
51 004124
52
53

0725
N726

REQUIRE

!
5

BGNRPT;

RETURN;

ENDRPT;

LRPT:

177772

0728
0729
0730
0731
0732

83 004126
84
85
86

9N
92
96
100 004130

’

word

JSR
TRAP

RTS

Routine Size:

0733
0734
0735
0736
0737

!
!
!
E

0 words

0725

& words

0 words

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 IMMEDIATELY
DROPPED FROM TESTING.
ISSUE A ''DODU'' FOR THOSE THAT DON'T RESPOND.

BGNAUTO;
RETURN;

ENDAUTO;

LAUTO:

RTS

; Routine Size:

1 word

: Maximum stack depth per invocation:

0716

000207

004767

PC,LRPT
25

; Maximum stack depth per invocation:

.
;
;
69 ;
70 ;
;
32
;
¥

Routine Size:

LSRPT::

0727

n
72
3
74
+

RTS

: Maximum stack depth per invocation:

;

TOPS=-20 Bliss=16
v2(206)
PA:<NEALE2M
3 1.2 (1)

'MACRO.REQ';

104425
000207

SEQ 0028

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

000207

004767

54
62

63
64
65
66
67
68

MODULE ML3 =
BEGIN

40
41

45
49 004116

=0ct=1980 11:31:46
29-Sep=1980 10:13:18

;
3
3
;

4 I
22 ;
26
27
28
32 004114
33
34
35

9
N

10
11
12
13
14
15
16
17
18
19
20

PAGE 46

,
.

MACRO M1113

177772

LSAUTO: : JSR

PC,LAUTO

0726

0736

0 words

'HA

CZMLAAOD ML-11 LOGIC TEST

MISCELLANEOUS CODING SECTION

i
D i

D e

D
i
D
D o

D i o

D i

20
g
g2
"+
2

3
3
3
3
3

4
4

e
e i

S
5
5
5
g

162
163
164
165

boogum-flflum—o

i
D i
s
i
i
—

OO0

OO NNNN

166
167
168
169
170

TRAP
RTS
: Routine Size:

PAGE 46-1

SEQ 0029

61
PC
& words

; Maximum stack depth per invocation:

0738

;

;M3

29-Sep=-1980 10:13:18

0739

;

0740
0741
0742

;
3
3
8

0743
0744
0745
0746

004140

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

TO NO LONGER BE

TESTED.

8GNDU;

RETURN;

ENDDU;

000207

LDU:

RTS

; Routine Size:

004767
104453
000207

177772

L$DU::

JSR
TRAP

RTS

; Routine Size:

PC
1 word

;
;
;
;

0737

0745

0 words

PC,LDU
53

& worfs

: Maximum stack depth per i1nvocation:
:

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

: Maximum stack depth per invocation:

004142
004146
004150

l
'HA

0 words

17-0ct=1980 11:31:46

W3
18
;
19
;

———e

104461
000207

04
0
1

23-0CT-80 09:11

0 words

0747
:

;
;ML3
;

;

3
:
004152

0748
0749
0750
0751

0752

0753

0754
0755
0756
000207

' THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
' TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK
;

TC THE

TEST

CYCLE.

17-0ct=-1980 11:31:46

29-Sep=-1980 10:13:18

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

BGNAU;

RETURN;

ENDAU;

LAU:

RTS

; Routine Size:

1 word
:
: Maximum stack depth per invocation:

0746

0 words

—

;

101 004134
102 004136
S OOVOWNV=OPYOSTOOVWN=NWN=O
0NV
WN-=0OWm

,
g

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

MISCELLANEOUS CODING SECTION

20? 004162

004767
104452

177772

23-0CT-80 09:11

L$AU::

000207
;

JSR

PC,LAU

RTS

TRAP

Routine Size:

PAGE 46-2

SEQ 0030
0755

& words

: Maximum stack depth per invocation:

198 004154
199 004160

PONS = = s s s
S OOVONON
=

MACRO M11 13

0757
0758
0759

0 words

END

ELUDOM

:
17=0ct=19 8 0 1 1 311:46
29-Sep=19 8 0 1 0: 1 3:18

ML3

Size:

Run Time:

20 code + 0 data words
00:01.9

Elapsed Time: 00:07.1

Hemor{ Used:
12 pages
Compilation Complete

TOPS

PA:<

MACRO M1113

CIMLAAD ML-11 LOG 1C 1 TEST
HARDWARD TEST SECT ION

23-0CT-80 09:11

22-0ct-1980 10:47:44

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

g 3

9 .

1 &
13 ;

14 ;

0001

MODULE ML4 =

0004
0005

' PRETTY BLF
!

0002
0003

0006

BEGIN
!

!'<BLF/NOERROR>

0007
0008

_KEY>
!<BLF/LOWERCASE
!

18 ;

0010

19 ;

20
2l
22
gs

0009

0011

REQUIRE

;
¢
;
3

0012
1496
1497
1498

g9 3
26 ;

1500
1501

e
29 :
30
S\ 2

1503
1504
1505
1506

ONES =
lERO =
ZEROES
NUM OF

33 .
34 ;
)
5 :
ST

1508
1509
1510
1511
1512

'
'MLCST FUNCTION CODES
!
NOOP = 1,
DRV CLR = Xo'11"',

40 :
L ;
&2 :

1515
1516
1517

WRT_CHK = Xo0'S1%,
write = Xo0'61',
read = %0'71"',

32 ;

38 ;
39 ;.

45
44
45
4“6

;
;
;
;

47 ;

49 ;

50 ;
-3 I

1499

1533
1534

1532

1535

Xo'177777°',
0,
= 0,
REG
= 22,

FIECD_S1Z = 4,

RD_IN PRE = %0'21"',
SEARCA = Xo0'31',

!
! DELAY ARGUMENTS
!
ONE US
= 1,

FRTY US = 40

1523

58 ;
59 ;

60 :

Lliteral

1522

1527
1528
1529
1530
1531

57 ;

1518
1519
1520
1521

1525
1526

'BLISS INTERFACE MODULE

!
' CONSTANT LITERALS

1513
1514

.
;
:
;

52
53
54
3
56

require 'BLSMAC.REQ';

1507

1524

TOPS=20 Bliss-16 V2(206)

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

COMMANDS

15 ;
16 ;
17 ;

SEQ 0031

.SBTTL HARDWARD TEST SECTION

1
6 ;MLS

10 ;
1" ;

F_3
PAGE 47

TWO_TH_US = 2000;

'DATA BIT OF

ONE

'DATA PATTERN OF ONES
'DATA BIT OF ZERO
'DATA PATTERN OF ZEROES

'NUMBER OF BLOCKS IN GLOBAL STORAGE 'ML-REG'
'FIELD SIZ FOR FIELD DECLARATIONS 'WORD_MAP'

'NOOP FUNCTION
'DRIVE CLEAR FUNCTION
'READ IN PRESET FUNCTION
'SEARCH FUNCTION
'WRITE CHECK FUNCTION
'WRITE FUNCTION
'READ FUNCTION

'ONE MICRO SECOND DELAY
'FORTY MICRO SECOND DELAY
!TWO THOUSAND MICRO SECOND DELAY

!
' FIELD DECLARATIONS

eld
WORD_MAP =
set

REGISTER_ADD = [0, 0, 16, 01,

FORCE_HITM= [1, 0, 16, 0],
FORCE LO = (2, 0, 16, 0)

DONT_CARE = (5, 0, 16, 0]

'MAPS GLOBAL STORAGE 'ML_REG' INTO REGISTER PERSONALITIES
'REGISTERS ADDRESS
1T
FORCED H I BITS
'REGISTERS
I
'REGISTERS FORCEDLO BITS
'REGISTERS IGNORE BI
Bl TS

CZMLAAD ML=11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT=-80 09:11

PAGE 48

62 :MLG

gg ;

|
|

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

}ggg

tes,

NIB_MAP =

set

1539
1540

NIB_O = [0, 0, 4, 03,
NIBZ1 = [0, 4. 4, 03,

'NISBLE 0 BITS <0:3>
INiBBLE 1 BITS <4:7>

1542

NIB-3 = [0, 12, 4, 01,

INIBBLE 3 BITS <12:15>

70 :
72 :
73
7%

75 :
77 :

78 ;
79 :

1541

1543
1544
1545

1546
1547

1548

1549
1550
1551

NIBZ2 = [0, 8,

4, 0]

NIBZ4 = [1. 0, 4, 03,
NIBS = (1, 4. 4. 0],
NIBZ6 = [1, 8, 4, 0]

NIBT7 = (1, 12, &, 03,
NIB8 = [2. B,

NIBC9 = (2. 12, 3, 0]
tes.,

'<BLF/PAGE>

TOPS=20 Bliss=16 V2(206)

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

'MAPS OWN STORAGE NIB_SAVE INTO TEN FOUR BIT NIBBLES

68 :
69 :

76 :

SEQ 0032

22-0ct-1980 10:47:44

22 :

65 .

INIBBLE 2 BITS <B8:11>

INIBBLE 4 BITS <16:19>
INIBBLE 5 BITS <20:23>
INIBBLE 6 BITS <24:27>

INIBBLE 7 BITS <28:31>
INIBBLE 8 BITS <32:35>

INIBBLE 9 BITS <36:39>

CZMLAAD ML=11 LOGIC

HARDWARD TEST

T EST

MACRO M1113

SECTION

23-0CT=-80 09:11

H
3
PAGE 49

82 ;ML&

22-0ct=1980 10:47:44

gz :
85
86
87
88
89

1552
1553
1554
1555
1556

92 ;

1559

90 ;
91 ;

93 ;
9% ;

22-0ct=1980 10:45:32

.
;
;
;
;

.
|

95 ;

9%
97 ;
98 ;
99 ;

100 ;
101 ;

102 ;

103 ;

104 ;
105 ;

106 ;
107 ;
108 ;
109 ;

110 ;

SEQ 0033

1557
1558

!
)
! OWN STORAGE
!

own

NIB_SAVE

block

[3]

HW_OR _TBL

ARR_INT :

volatile,

field

PTBL_PTR : volatile,
OP_NUM_ARR : volatile,

1563
1564
1565
1566

6000 BLK : volatile,
PAR BIS : volatile,
CHIP_SIZ : volatile,
LST_BLK : volatile,

1567
1568

1569

1570
1571
1572

: vector [9, byte] volatile,

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

w C_SIZE : volatile,
RASTINC : volatile,
WT_DATA : volatile,

1577

DRTVE _TYPE

}}; :

}g;g

113 ;
114 ;

1580
1581

RD-DATA

volatile,

: volatile,

REG_INIT_FLG;
EQUALS;
!<BLF/PAGE>

'STORES HARDWARE ORED PROM DATA DURING PROM OR FUNC

'HARDWARE P-TABLE POINTER
'OPERATORS NUMBER OF ARRAY INPUTTED
'GOOD BLOCK ADRS
'PARITY DISABLE FLAG
'MOS RAM CHIP SIZE
'LAST ADDRESSABLE BLOCK

10_BUF : vector [256] volatile,

STK_OFF

volatile,
'STORAGE LCCATION TO SAVE NIBBLE DATA READ DURING DIAG MODE

'ARRAY SELECTION INCREMENT VALUE

ARRZ16 : volatile,
LST_ARR : volatile

1573
1574
1575
1576

(NIB_MAP)

vector [127) volatile,

1560
1561
1562

TOPS=20 Bliss=16 V2(206)

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

'MAX NUMBER OF ARRAY ALLOWED
'LAST ADDRESSABLE ARRAY

'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

WARDWARD TEST

MACRO M1113

SECTI ON

23-0CT-80 09:11

PAGE S0

116 ;MLG
}}; 3
119
120
121
122
29
126
125
126
127

;
;
;
;
3
;
;
;
;

}%g :

1582
1583
1584
1585
1586
-1587
1588
1589
1590

130 ;

1593

133
134
135
136
137
138

1596
1597
1598
1599
1600
" 1601

}ggg

;
;
;
;
;
;

139 ;
140 ;

141

. 1602
. 1603

;

142 ;

global
'
!

THIS STRUCTURE

THE REGISTERS FORCED HI AND FORCED LOW BITS ARE PRELOADED

IS LOADED DURING THE

INIT CODE AND

5 WILL CONTAIN THE ML11 REGISTER PERSONALITIES AND BUS ADRS.
;

INTO THE STRUCTURE USING THE ATTRIBURE 'PRESET'.

ML_REG: blockvector [NUM_OF REG,FIELD_SIZ] field(WORD_MAP)
preset (
C0,FORCE_HI]
= %0'004000',
'MLCS?
[0,FORCE"LO]
= X0'173701°',
[0,DONT_TARE]
= %0'160200',
(5.FORCE_LO)
[(5,FORCE _HI]

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

'MLDS

[5.00ONT_CTARE]

= %0'000100°',

1606

144 ;
145 ;
146 ;

1607
1608
1609

(6,FORCE_LO]

= %0'014620',

!'MLER

[(7.DONT_CARE]

= %X0'177400°',

'MLAS

149 ;

1212

(8,FORCE_LO]

C10,FORCE_LO)

= %0'100000°,

'MLPA

£10,DONT_TARE]

= %0'177400°',

12; 3
1

}b}?

}g? 3

152

153
154
155
156
157
158
159
160

;

;
;
;
;
;
;
;
;

161 ;
162 ;

163 ;
164 ;
165 ;
166 ;

167 ;

168 ;

169 ;
170 ;

}ng

1615

1619
161
1618
1619
1620
1621
1622
1623

1624
1625

C(11,FORCE_HI)

= X0'000020',

'MLMR

= X0'000110',

'MLDT

C11,FORCETLO)
[11,00NT_TARE]

= Xo0'177666',
= X0'000001°',

(13,FORCE_LO]

= X%0'140300',

'MLE1

[14,FORCE_LO]

= X0'100300°,

'MLE?2

(17 ,FORCE_LO])

= %0'010000°,

'MLEE

[21,DONT_TARE] = X0'000000°
Y volatile,

'MLCS2

1626
1627
1628

RH_ADD,
RH_TYP,

'RH CONTROLLER BASE ADDRESS
'RH CONTROLLER TYPE

163

MLTLUN,

‘ML LOGICAL UNIT NO.

1629

163

1232
1633

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

!
! GLOBAL STORAGL
!
'<BLF/NOFORMAT>

1604
1605

143 ;

SEQ 0034

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

}gg;

}%} 3

RH_VEC,

ML_DUT;
!<BLF/FORMAT>

'RH CONTROLLER VECTOR ADDRESS

'ML DRIVE NUMBER

'HARDWARD TEST

MACRO Mi113

TEST

SECTION

23-0(T-80 09: n

PAGE 51

3
SEQ 0035

29‘0‘000‘0000‘

ooooorrOrOrOrOOMONOM oo
O
&S5BS
NN WNINW
oo o ONONO VUYWAY wn VSN0
—
W~ W N = O V00NV
—=O 0 ~NOAWV
S
W
OV
~NOV &~ W

=2
=
==

D e
e

il
e
D e
e

e
e

=
2

D
e

—

TICFO

g REGISTER NAMES:
[0 REGISTER_ADDIX,

LWC
=
ML REG [1,REGISTER_ADDIX,

M nREG[2.REGISTER_ADDIX,
M nREG[3.REGISTER_ADDX,

'CONTROL AND STATUS REGISTER 1
'WORD COUNT REGISTER

'UNIBUS ADDRESS REGISTER

'DESIRED ADDRESS REGISTER

ALcs

.ML_REG (4,REGISTER_ADDIX,

'CONTROL AND STATUS REGISTER 2

.ML_REG [5,REGISTER_ADDIX,

'DRIVE STATUS REGISTER

.ML_REG [6,REGISTER_ADDIX,

'ERROR REGISTER

.ML_REG (7,REGISTER_ADDIX,

'ATTENTION SUMMARY REGISTER

.ML_REG [8,REGISTER_ADDIX,

'LOOK AHEAD REGISTER

.ML_REG cs.neclsrsn_AooJx.

'PROM ADDRESS REGISTER

.ML_REG [9.REGISTER_ADDIX,

'DATA BUFFER REGISTER

.ML_REG [10,REGISTER_ADDIX,

'MAINTENANCE REGISTER

.ML_REG [11.REGISTER_ADDIX,

'DRIVE

ALDS
=
MLER =

MLAS =
ALLA =

=
ALPA

MLDB
=
RALMR =

ALDT =

2
X2
2
2
2
2

OOV

e
e
) b e e

TOPS=20 Bliss-16 V2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (D)

§ MACRO DEFINITIONS

e e

NYO NS W

rororororNrONORONON
e ———

e e

I T

N T

L LR L LR LR A

: 32

e T T

T Tl

D T

T T

il D
il
D
D
il
D ald cald
i
il
il
)
i

b - o
- o
—

VOO0 OO 0000 COEO0O0000000 NNNN~N ~
VS WN =20 OONO
NS WN—=OVO~NONWN &~

172 ;ML&
173 ;

[12.Recxsren_AooJx.

'SERIAL NUMBER REGISTER

[13.REGISTER_ADD]!.

'ECC CRC WORD REGISTER 1

[14,REGISTER_ADDIX,

'ECC CRC WORD REGISTER 2

[15,REGISTER_ADDIX,

'DATA DIAGNOSTIC REGISTER 1

(16,REGISTER_ADDIX,

'DATA DIAGNOSTIC REGISTER 2

[17.REGISTER_ADDIX,
.ML_REG (18.,REGISTER_ADDIX,

ALPD =
.ML_REG (19,REGISTER_ADDIX,
LBA
ML_REG

TYPE REGISTER

[20,REGISTER_ADDIX,

'ECC ERROR REGISTER

'ECC ERROR LCOATION REGISTER
'PROM DATA REGISTER

'BUS ADDRESS EXTENSION REGISTER

—-

CIMLAAD ML-11 LOGIC

'HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09: n

PAGE 52

228 iMLs
l

230

231
232
233
23
235
236
e
238
239
240
241
242
243
244
245
246
247
248
249
250

;

3
;
;
;
;
;
;
;
;
:
;
;
;
;

M 1686
1687
1688
1689
1690
M 1691
1692
M 1693
1694
M 1695
1696
M 1697
1698
M 1699
1700
M 1701
,1702
M 1703
1704
M 1705

!
! BIT ASSIGNMENTS:
!
SC
=
(HLCS1)<1S 1R,
TRE
=
(HLCS1)<14 2%,
MCPE
=
(HLCS1)<13 1>%,
DVA
(HLCS1)<11 1>%,
RDY
(HLCS1)<7,1>!.
IE =
(MLCS1)<6,1>%,
GO =
(MLCS1)<0,1>%,
ML FUNC =

2
253
254
255

3
;
;
;

M 1707
1708
M 1709
1710

DLT
(HLCSZ)<1S 1>%,
WCE
=
(HLCSZ)<16 1>%,

257
258
259
260
261
262
263
264
265
266
267
268
269
270

;
;
;
;
;
;
;
;
;
;
;
;
;
:

.
;
;

251 ;

256 ;

M1711

M 1727
1728

CLR
(HLCSZ)<S 1>X,

276 :
277 :

M7
1732

;

278 ;

279 ;

280 ;
281 ;
282 :

1726

'MLCST BIT ASSIGNMENTS

M 1729
1730

M 1733

1734

M 1735
1736
M 1737

TP SRt Lo -0

'MLCS2 BIT ASSIGNMENTS

PE
=

272 ;
273 ;

(HLCSZ)<6 1>%,

PAT
=
(HLCSZ)<4 1>%,

BAl
(HLCSZ)(S 1>X,
DRV _NUM

TOPS=20 Bliss=16 v2(206)

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

'CONTROL AND STATUS REGISTER
3

(HLC§1)<0 6>%,

'(HLCSZ)<13 1>%,
NED
(HLCSZ)<12 1%,
NEM
(HLCS2)<11 1>%.,
PGE
(HLCSZ)<10 1%,
MXF
(HLCSZ)<9 L,
MDPE
=
(HLCS2)<8 1>X%,
ORD
(HLCSZ)<7 1>%,
=
IRDY

274 :
7S :

1706

MLCS3 =
.ML_REG [21,REGISTER_ADDIX,

1712
M 1713
1714 .
M 1715 .
1716
Mm 1717
1718
M 1719
1720
M 1721
1722
M 1723
1724
M 1725

2’y

SEQ 0036

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

229 ;

(nLc527<o 3>!

ATIN =
(MLDS)<15,1>%,
COMP_ERR =

'MLDS BIT ASSIGNMENTS

CZMLAAD ML=-11 LOGIC TEST

'CIMLAAD ML-11 LOG l C TEST
'HARDWARD TEST SEC 1 ION

23-0CT-80 09:11

k.3

PAGE 53

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

N NN NN N

ONOWVES
W

2O 00
NOWVSWN
S NN =2OVONO VS WN =20V

4
P
P
4
g
4
Y
Y
————
——
—
S
Y
U
N
N
N
ISR

R T T L L

—

T L L L

LRAL LR

NNNNNNNNNNNNSNSNSNNNNNNNNNNNNN
OO
O VWVIWVIVIVIVIVIVIVIWVISES SNBSS

284 ;MLG

T T
T T TR TRTR R T

MACRO M1113

765

(MLDS)<14,1>%,
MOL =

(MLDS)<12,1>%,
LBT =
(MLDS)<10,1>%,
DPR =
(HLDS)<8 1>%,
DRY
(HLDS)(? 1>%,
(HLDS)<6 1>%,

(HLE§)<1S,1>%,

'MLER BIT ASSIGNMENTQ

(HLER)<14 1>%,
OPl =

(HLER)<13.1>X.

IAE =
(MLER)<10,1>X,
AOE =

(MLER)<9,1>X%,
ECH =
(MLER)<6,1>X%,
DPAR =
(MLER)<5,1>%,
CPAR =
(MLER)<3,1>%,
=
RMR

(H%E:)<2+ 198
(H%E§)<1108,
(MLER)<0,1>%X,
ARR TYP =

(MLMRY<10,1>%,
ML _NUM_ ARR

(MLMRY <11, S>1
REF _MAR

(MLMRY<7, 1>!
PROM_ RH

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

(MLMR)<5,1>%,
=
DAT CLK

(HLNR7<4 1>1
DAT

(HLHR7<3 1>!
=
DCK_EN

(MLMR)Z2, 1>1
ECC DlS =

(MLMR)Z1,1>%,
ECC DH

'MLMR BIT ASSIGNMENTS
.

Siont o §

'CIMLAAD ML-11 LOGIC TEST

MACRO M1113y 23-0CT-80 09:11

!HARDUARD TEST SECTION

PAGE 54

’

‘MLG

SEQ 0038

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

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

(MLMR)<0,1>%,

DRV _TYP =

.
.
L

CRC_ERR =

(MLEEY<13,1>%,

g MISCELLANEOUS MACRO DEF INITIONS:

.
.

.
.
L

.
.

.
.
L4
.

1
.
.

.
.

3
L4
.
.

.
.

ERXEFY

EXE=:

NO VB WN SO OVONOWNSWN 2O CONOWVNSWN=OC

.
.

00 00 00 00 Co 00 GO Co 00 0O 0o 0o GO GO CO 0O GO CO GO Co CO Co OO OO

.
.

dddfldfl“dddfldflddddddddddflddd—.-‘d-‘dd

b ed e e ed oD e e e e ©O
NN NN NN WwwWhNNONON POMPNVPONIND

'TEST IF BIT IS EQUAL 1
'TEST IF BIT IS EQUAL 0

eql 0%,

IS_SET =
eql 1%,
IS_NOT_SET =

'MLEE BIT ASSIGNMENTS

(MLEET<14,1>%,

(MLEEY<15,1>X,
SGL_ERR =

'MLDT BIT ASSIGNMENTS

UNC_ERR =

(MLDTT<0,1>%,

REG_ADRS =

'READS REGISTERS ADDRESS FROM PERSONALITY TABLE

.HLR?EG[.index.REGISTER_ADDJX.

'READS REGISTERS FORCED HI BITS FROM PERSONALITY TABLE

)

'READS REGISTERS FORCED LO BITS FROM PERSONALITY TABLE

ML_REGL.index,FORCE_HIIX,
Lo =

ML_REGL.index,FORCE_LOJX,
IGNORE =

'READS REGISTERS DONT_CARE BITS FROM PERSONALITY TABLE

ML_REGL.index,DONT_CAREIX,
MLE2_MASK =

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

M__REGL14,DONT_CARE]X,
WRT_MASK =

'GENERATE MASK DATA PATTERN USING REGISTER FORCE LO, HI AND IGNORE B
:
.lfigggfngas((not .L0) and (.HI or .TST_PAT))X,
'CLEAR MASS BUS RESTORE DRIVE NUMBER

CLR = ONE; DRV_NUM = ML _DUTX,

'<BLF/SYNONYM IS _SET = EQC 1 + >

1<BLF/SYNONYM IS_NOT_SET = EQL 0+>
i DIAGNOSTIC DATA REGISTER MACROS

RD_LNG_WRD =
D1_TEMP = .MLD1;

'READ DATA DIAG REGS INTO BIND LOCATIONS

D2"TEMP = .MLD2;

E2"TEMP = .MLE2%,
WRT_LNG_WRD =

MLD1 = .D1_TEMP;

'LOADS DATA DIAG REG WITH CONTENTS OF BIND LOCATIONS

CIMLAAN ML=-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION
396 ;ML4

23-0CT-80 09:11

PAGE 55

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

22-0ct=1980 10:45:32

%83 :
399

M 1842

400 ;

1844
1845

403 ;ML4
406
407
408
69
610
41
412
613

;
;
;
;
;
;
;
;

414 ;
415 ;

416 ;
417 ;
418 ;
419 ;
420 ;

621 ;

622
423
424
425
426

1846
1847
1848
1849
1850
1851

1852
1853

1854
1855

1868

FMT_1 = uplit (Xasciz'XAWROTE: X06XA
READ: XO6XININ'),
FMTZ2 = uplit (Xasciz'XAGOOD DATA: XO06XA
BAD DATA: X06%A

FMTC3 = uplit
FMTZ4 = uplit
FMT 5 = uplit
FMT-6 = uplit

XOR: X06ININ'),
(Xasciz'XADRIVE SN: XO6XINXN'),
(Xasciz'XABIT IN ERROR: XO6XNXN'),
(Xasciz'X¥AGOOD NIB DATA: X02XA
BAD NIB DATA: X02%A
NIB POS: XO4ZINZIN'),
(Xasciz'%ANIB IN ERROR: !Dk!N!N ¥,

FMT_7 = uplit (Xasciz"XAFAILED AT: XO6XNXN')

FMT_9 = uplit (Xasciz'XAFAILED AT DSA: XO6XNIN'),
FMT10 = uplit (Xasciz'XABIT<15:10>: XB6XA
BIT<9 0>: XIB1OANIN'),
FMT_11 = uplit (Xasciz'XAFAILING REG ADRS: XO6XNIN'),
FMTZ12 = uplit (Xasciz'XAFAILING FUNC: XO06XNAN'),
FMT-13 = uplit (Xasciz' XAOFF_SET CNT FOR NIB : ID2 XA = XD2 INXN'),

1867

FMTC14 = uplit (Xasciz'XAWROTE: XD2XA

FMT_16 = uplit (Xasciz'XAFAILING REG: X06XA GOOD DATA Y06%XA BAD DATA: XO6XNXIN'),
'

433 ;
434 ;

1873
1874

! ERROR MESSAGE MAPPING FORMATS
!

436 ;
437 ;
438 ;
439 ;

1876
1877
1878
1879

440 ;
441 ;
442 ;
445 ;
444 ;

222 3

W7
448
449
450
451

;
;
;
;
;

452 ;

1880
1881
1882
1883
1884

FMT_17 = uplit (Xasciz'XNXADIAGNOSING UNIT XO1XNIN')
FMT_18 = uplit (Xasciz'XATIMED OUT DURING MBUS IOZXA FUNCENXIN'),

ONE_FMT = uplit "(Xasciz"XTIN')

TWO_FMT = uplit (Xasciz' ITITIND)
THR_FMT = uplit (Xasciz' ATXTXTANG)
FOR_FMT = uplit (Xasciz' ITXTXTXTING)
FIV_FMT = uplit (Xasciz' ITXTXTATETING)

SIX_FMT = uplit (Xasciz' LTXTXTXTXTRITANG)
SEV_FMT = uplit (Xaeciz' XTXTATXTXTATATANG)
EIG_FMT = uplit (Xasciz’ LTXTXTXTXTATATITANG)
NIN_FMT = uplit (Xasciz' !T!TlT!T!T!T!T!T!T!N )
TEN_FMT = uplit (!asc1z'%T!T!T!T!T!T!Y!T!T!T!N

ELV_FMT = uplit (Xasciz' ATXTXTXTXTXTATATATRTXTANG),

}ggg

1887
1888
1829
1890
1891

! DIAGNOSTIC VOCABULARY
!
!
! WORDS
!
.
:

1892

READ: XD2XNIN')

FMT_15 = uplit (!asciz'!ANlBBLES XFERED BEFORE ERROR: ¥DSXN'),

1869

1875

FMT_8 = uplit (Xasciz'XAREPLACE ARR MOD: !DZiN!N ),

1870
}g;;

435 ;

TOPS=-20 Biiss=16 v2(206)

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

bind
!
! ERROR DATA MAPPING FORMATS
!

1861

428 ;

629 ;

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

!
! BIND DECLARATIONS
!
:

1860

1862
1863
1864
1865
1866

430 ;
2%} :

!<BLF/PAGE>

1856
1857
1858
1859

;
;
;
;
;

427 ;

MLE2 = .E2-renpi
'

282 :

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

MLD2 = .D2_TEMP;

1843

401 ;
402 ;

&Y
TOPS=20 Bliss=16 v2(206)

WRD_1 = uplit (Xasciz' 6Q'),

SEQ 0039

—

MACRO M1113 23-0CT-80 09:11 PAGE 25-1

CIMLAAO ML-11 LOG

'HARDWARD TEST SEC
453
454

Hnmwnnn

uplit (Rasciz' DRV_RDY'),

uplit (Xasciz' ILFY),

uplit (Xasciz' OP1'),
uplit (Rasciz' BAD'),
uplit (%asciz' GOOD'),

SEQ 0040

1Cll
HAI

CIMLAAD ML-11 ng IC 1 EST

'HARDWARD TEST S

TION

MACRO M1113

23-0CT-80 09:11

&
C
PAGE 56

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

459 ;ML4

O
O
R

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

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'),

WA —=O
2O 00NV
2O VO NO VS W

OONO VB NN 2O VO NOWVNS W

D cnld il
il

i
-

b il

b wild cnld i

il il

D i

D il

D il i

B i

VOOV OOV OOV OOV O OO VOOV O VIOV OV OOV OOV OOV OO OOV OOVOOVOCO

= b
b d D e e ed b
HNHNANNANANNNW WRIMNLMNONOIRNININONININ

R
L T R
OR I
O
I
R
R
R
O NO P
O R
T T T O
OT

494
495
496
497

TR TETETE

493

TETETETE

492

467
4L68
469
470
L7
472
473
L74
475
476
477
478
479
480
481
482
483
484
485
486
4LB7
488
489
490
49

1898

463
464
465
466

462 ;

;
;

460 ;
461

SEQ 0041

WRD_14
WRD_15
WRD_16
WRD_17
WRD_18
WRD_19
WRD_20
WRD_21
WRD_22
WRD_23
WRD_24
WRD_25
WRD_26
WRD_27
WRD_29
WRD_30
WRD_31
WRD_32
WRD_33
WRD_34
WRD_35
WRD_36
WRD_37
WRD_38

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit

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

FAILURE'),
ATA'),
ATIN'),
WRITING'),
Vv'),
FUNC'),
TRE'),
RMR'),
EXCESSIVE'),
MBUS'),
DATA'),
CONTINUITY'),
AOE'),
LBT'),
PREMATURLY'),
IAE'),
INCREMENT'),
WITH'),
uv'),
UNS'),
PROM'),
OR'),
SELECT'),
REG'),

WRD_39 = uplit (Xasciz' UNIQUE'),
WRD_40 = uplit (Xasciz' 14'),
WRD_41 = uplit (Xasciz' NIBBLE CNT'),
WRD_42 = uplit

WRD_43
WRD_44
WRD_45
WRD_46

=
=
=
=

uplit
uplit
uplit
uplit

WRD_48
WRD_49
WRD_50
WRD_51
WRD_52
WRD_53
WRD_54
WRD_55
WRD_56
WRD_57
WRD_58
WRD_59

= uplit
= uplit
= uplit
= uplit
= uplit
= uplit
= uplit
= uplit
= uplit
= uplit
= uplit
= uplit

(Xasciz' GIR'),

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

WRD-47 = uplit (Xasciz' COURT'),
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'
(Rasciz'
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'
(Xasciz'

DELAY'),
TESTS'),
ADRS'),
COUNTER'),
REG'),
TESTED'),
NIBBLE'),
ALL'),
TEST')
XFERED'),
NIBBLES'),
SC'),

2
HAI

MACRO M1113

CZHLAAO ML=11 LOG IC 1 EST

WRD_60 = uplit

T
N
TR T
T
T
e
Tl
T
TR T
T
R
R
TR TR TR T
T
T

(Rasciz’ MULTIPLEXER'),

URD “61 = uplit (Xasciz' UNEXPECTED')
:

PHRASES

PHR 1 = uplit (!asciz Bl T NOT SET')
PHR_2 = uplit (1asc1: BI T NOT CLR'),
PHRZ3 = uplit (Rasciz’ NO RESPONCE AFTER 1.5 Us"),

PHRZ4
PHRS
PHRC6
PHRZ7
PHR_8
PHRZ9

= uplit
= uplit
= uplit
= uplit
= uplit
= uplit

(!ascgz
(1ascgz
(Xasciz'
(Rasciz’
(Rasciz’
(Xasciz'

?HR-IO = uplat (Xasciz’
!

DATA ERRORS')
Bl T SET').
Bl T c
THER DRIVES'),
OF
CL ASS S A')
(L ASS S B') ’
T 0 F FIND' ),

FUNCTIONS

FNC 1 = uplit

SEQ 0042
e
~no S~

—————
R R 4
N

OO0 OOV OV OOOOVOO0
(o X
LV IV IV IV LV LW T R
R
OV
NO VW
—-O

R
T
T
T
L

[

L
LR L
L
PR T
L

AT
T
AT
VI

534

D_ 4
PAGE 57

JMLG

T WA

—
WWWWNINNIND
NNV
=
W= O OWONOWVNEWN =200V~ wn

AW w

'HARDWARD TEST SEC TION

23-0CT-80 09:11

(Rasciz' MEM SIZING'),

FNCZ2 = uplit (Rasciz’ NOOP'),

FNC_3 = uplit (Xasciz' DRV'),
FNC_&4 = uplit (Xasciz' WRITE CHECK'),
FNC_5 = uplit (Xasciz’ WRITE'),
FNC_6 = uplit (!asclz READ'),
FNC_7 = uplit (!ascgz CLEAR'),
FNC_8 = uplit (!asc]z COMP saaon s
FNC_9 = uplit (Xasci2' SYS CLR'),
FNC_10 = uplit (Xasciz' SEARCH')|
FNC_11 = uplit (Rasciz’ READ=-IN-PRESET"),

FNC_12 = uplit
FNC_13 = uplit
FNC_14 = uplit
FNC_15 = uplit
FNC_16 = uplit
FNC_17 = uplit
FNC_18 = uplit
FNC_19 = uplit
FNC_21 = uplit
FNC_22 = uplit
fNC_ZS = uplit
!

(Xasciz'
(Rasciz'
(Xasciz'
(!asctz'
(!asciz
(!asc!z
(Rasciz’
(RXasciz'
(Xasci2'
(Xasciz'
(Xasciz'

ILLEGAL'),

ABORT'),
ARR RD WRT'),

600D atx').
REFRESH'),
ARRAY'),

RAM-BUS'),

OVERFLOW'),
CHK_SUM'),

LASTY BLK'),

INITIALIZE®

REGISTERS

REG 1 = uplit (Xasciz' MLCS1Y),

REG_2 = uplit
REG_3 = uplit
REG_4 = uplit
REG_S = uplit
REG_6 = uplit
REG_7? = uplit
REG_8 = uplit
REG_9 = uplit

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

MLDS'),
MLER'),
MLMR'),
MLAS'),
HLDA')
MLDT*)
HLPA';

L
.

’

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

CIZMLAAD ML-11 LOGIC TEST
SECTION

23-0CT-80 09:11

&
E
PAGE 58

)
L
L
L
L
L
LU

e
e
D
e
e b

= O
o WSS

o DVDDVDDVVOD

(2] oooooo
9

I
N
R
R
R

uplit
uplit
uplit
uplit
uplit
uplit
uplit

(Rasciz'
(Xasciz'
(Xasciz'
(Xasciz'
(Rasciz'
(Xasciz'
(Xasciz'

MLE
MLE
MLD
MLD
MLEE
MLEL
MLPD'

g MODULES IN ERROR MESSAGES

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'),

ISR

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

TRBLE_LOOP

= uplit

(Xasciz'TROUBLE SHOOT LOOP ERRORS'),

TSR

' DATA DIAGNOSTIC REGISTER SAVE LOCATIONS

D1_TEMP = NIB_SAVE,

D2_TEMP = NIB_SAVE (1, 0.
E2_TEMP = NIRCSAVE [2. 0,

T
LI

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

5N JMLG
572
573

m mmmmmm

HARDWARD TEST

MACRO M1113

2025

| <BLF /PAGE >

16, 01,
16, 0);

CIZMLAAOD ML-11 LOGIC TEST

MACRC M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

4
F
PAGE 59

SEQ 0044
A

H,
routine LOAD_STACK
begin

(STK_PTR, NIB_PTR)

novalue

FUNCTIONAL DESCRIPTION:

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

. -

AND STORES IT INTO THE STRUTTURE

*STACK' REWRITING ANY BAD NIBBLE
éi;ficx' LOCATIONS WITH GOOD NIBBLE
FORMAL PARAMETERS:

STK_PTR
POINTS TO PRESENT DEPTH OF THE
'"STACK' WHERE PRESENT GOOD NIBBLE
DATA IS TO BE STORED.

NIB_PTR
POINTS TO CURRENT NIBBLE POSITION BEING
MANIPULATED.

IMPLICIT INPUTS:

STACK

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

.
.
.
. .

TR TR T E

R RR T E TR T

e T

P O T R T R

L R

. -

N OOV

[ [olelelelelele
e
WO NN
w WWWW
~ WA = OV~

1 3¢

]
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (6)

STK_OFF

vector of 9 byte LOCATIONS WHICH
STORES AWAY 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 OUTPUTS:
'STACK' LOADED WITH GOOD NIBBLE
DATA

COMPLETETION CODES:

NONE

SIDE EFFECTS:

NONE

case .NIB_PTR from 0 to 8 of

'SELECT NIBBLE DATA TO BE LOADED INTQO THE STACK

CZMLAAD ML=11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT=-80 09:11

655 ;MLL
ggg }
2078
2079
2080

662 ;

2082

;

2083
2084

666 ;

2086

667 ;
668 ;

669 ;

670 ;

2094

678 ;

2098

2099
2100

682 :

2102

2103
2104

686 ;

2106

2107
2108

23? 3

g}}?

(4]

2112

694 ;

2114

stack [(.STK_PTR.- (.STK_OFF [.NIB_PTR]))]
= .NIB_SAVE [NIB_ 4];

'LOAD NIBBLE DATA & INTO SELECTED STACK LOCATION

(5]

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

'LOAD NIBBLE BATA 5 INTO SELECTED STACK LOCATION

(6l

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

'LOAD NIBBLE DATA 6 INTO SELECTED STACK LOCATION

(71

2109

692 ;

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

'LOAD NIBBLE BATA 3 INTO SELECTED STACK LOCATION

2105

087 ;
688 ;

695 ;
696 ;
697 ;
701

stack [(.STK_PTR = (.STK_OFF [.NIB_PTR]))] = .NIB_SAVE [NIB_2];

'LOAD NIBBLE BATA 2 INTD SELECTED STACK LOCATION

2101

683 ;
684 ;

693 ;

(2]

2097

679 :
680 ;

689 ;

'LOAD NIBBLE BATA 1 INTO SELECTED STACK LOCATION

2093
2095
2096

685 ;

:
stack [(.STK_PTR = (.STK_OFF [.NIB_PTR]))]
= .NIB_SAVE (NIB_1];

2090

675
676 ;

681 ;

2089

674 ;

677 ;

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

'LOAD NIBBLE BATA 0 INTD SELECTED STACK LOCATION

2087
2088
2091
2092

673 ;

(0l

2085

671 ;
672 :

stack [(.STK_PTR = (.STK_OFF [.NIB_PTR)))]
= .NIB_SAVE [NIB_7];

'LOAD NIBBLE BATA 7 INTO SELECTED STACK LOCATION

(8]

2113
2115
2116
2117

end;

045
122
105
045

101
117
072
117

stack [(.STK_PTR = (.STK_OFF [.NIB_PTR]))] = .NIB_SAVE [NIB_8];

'LOAD NIBBLE DATA 8 INTO SELECTED STACK LOCATION

tes,;

702

703
704 004164
705 004167
706 004172
707 004175

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

set

2081

663 ;
664 ;

665 ;

SEQ 0045

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

658 ;
659 ;
660 ;

661

PAGE 60

127
124
040
066

P.AAA:

.ASCII
LASCII
LASCID
ASCIT

/%AW/
/RCT1/
/E: /
/%067

CIMLAAD ML=-11 LOGIC T EST

HARDWARD TEST

MACRO M1113

SECTION

709

23-0CT-80 09:11

JMLG

;}?

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
0043641
004344
004347
004352
004355
004360
004363
004366

045
040
122
104
045
045
16
045
117
040
124
040
066
040
040
104
101
072
117
101
040
117
040
066
045
045
122
105
116
045
045
116
045
m
m
105
117
040
066
045

045

101
040
105
072
117
116
000
101
117
104
101
045
045
040
102
040
124
040
066
040
040
122
045
045
116
101
mm
040
072
117
116
000
101
124
116
122
122
045
045
116
101

754
755
756
757
758
759
760

004374
004377
004402
004405
004410
004413
004416

040
102
101
072
17
10
040

116
040
124
040
062
040
040

753 004371

761 004421
762 004424
763 004427

117

101
116
040

117

104
1%
104

040
040
101
040
066
045

107
104
101
072
117
101
040
101
104
101
045
045
040
130
072
117
116
000
104
126
123
040
066
045

P.AAB:

102
040
040
122
072
117
116
000
107

P.AAD:

104

m
104
101
045
045
040
102
040
102
101

P.AAC:

P.AAE:

&
SEQ 0046

22=0ct=1980 10:47:44

712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752

PAGE 61

22-0ct=1980 10:45:32
LASCIT
LASCIT
LASCII
LASCII
LASCII
LASCIT
LASCIT
L.ASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
Al
LASCII
LASCII
LASCIT
LASCIT
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
L.ASCII
LASCII
LASCII
LASCII
LASCIT
.ASCII
LASCIL
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT

/%A /
7/
/REA/
/D: /
/%067
/7XNX/
/N/<00>
/XAG/
/00D/
/7 DA/
/TA:/
7 X0/
/76%A/
£ - 4
/7 BA/
/D D/
/ATA/
/: %/
/706%/
/A
7/
/7
x/
/OR:/
7 %0/
/76%N/
/7XN/<00>
/X%AD/
/RIV/
/E S/
/N: /
/%067
/XNX/
/N/<00>
/XAB/
717/
/IN/
/ERR/
/0R:/
7 X0/
/76%N/
/7XN/<00>

LASCII

/00D/

.ASCII
LASCII
LASCII
LASCII
JASCID
LASCII
JASCII
LASCIT

LASCII
LASCII
LASCII

/XAG/

/7 NI/
/B D/
/ATA/
/7: X/
/02%/
/A
/7
/7
B/
/AD /
/NIB/
/7 DA/

TOPS

PA:<

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

765

772
773
774
775

004432
004435
004440
004443

004446
004451
004454
004457

004534
004537
004542
004545

004546
004551
004554
004557
004562

004565
800 004570
801 004573
802 004576
803 004601
804 004602
805 004605
806 004610
807 004613
808 004616
809 004621

810 004624
811 004627
812 004632
813 004634
814 004637
815 004642
816 004645
817 004650
818 004653
819 004656

124
040
062
040
040
102
117
040
064
045
045
11
M
105
117
040
064
045
045
101
105
101
040
066
045
000
045
105
101
040
122
117

040
062
045
000
045
101
105
101
104
072

117
116
000
045
1M
061
061
072
102
101

22-0ct=1980 10:45:32

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

072
117
101
040

LASCII
LASCII
LASCII
LASCIDI

/TA:/
/7 %0/
/72%A/
/
/

116
000
116
040
040
122
072
104
116
000
106
114
040
072
17
116
000

LASCIT
LASCIT
_ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
JASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII

/74%N/
/7XN/<00>
/%AN/
/1B /
/IN/
/ERR/
/OR:/
/7 XD/
/4%N/
/7%N/<00>
/X%Af/
/AIL/
/ED /
/AT:/

101
120

122
114

103
101
040
104

045
045
116
101
1M
104
124
123
040

066
045
000
101
124
065
060
040
066
040

M
120
072
117

LASCII
LASCII
LASCII
LASCII

P.AAF:

P.AAG:

P.AAH:

105
122
115

072
104

LASCII
LASCII
LASCIT
LASCIT

.ASCII
LASCII

106
114
040
040
101
045

P.AAl:

102
074
072
076
045
045
040

P.AAJ:

045
116

/7 NI/
/B P/
/70S:/
/7 %0/

/7 X0/
/76%N/
/7%N/<00>
<00>

/XAR/
/EPL/

LASCII
LASCIT
LASCII

/ACE/
/ AR/
/R W/

LASCID
LASCII
LASCII
.ASCII
JASCII
.ASCII1
LASCII
LASCII
LASCILD
LASCII
LASCII
JASCII
.ASCII
JASCID

/72%N/
/7XN/<00>
<00>
/XAFf/
/AIL/
/ED /
/AT /
/DSA/
/: %/
/06%/
/NXIN/
<0C><00>
/XAB/
/71T«

“ASCil

LASCII
LASCII

116
000

SEQ 0047

22=0ct=1980 10:47:44

776 004462
777 004465
778 004470
779 004473
780 004476
781 004501
782 004504
783 004507
784 004512
785 004515
786 004520
787 004523
788 004526
789 004531
790
791
792
793
794
795
796
797
798
799

&
[
PAGE 62

MLG

_?,g(_;
768
769
770
771

23-0CT-80 09:11

LASCIDT
LASCIL
ASCIT
ASCII

/0D:/
/7 XD/

/15:/
710>/
/: X/
/B6%/

TOPS

PA:<

CIMLAAD ML=-11 LOGIC T EST

HARDWARD TEST

MACRO M1113

SECTION

821

040
1M1
o”n
076
045
060
045
© 045
101
1M
040
107
104
072
117
116
000
045
101
111
040
116
040
066
045
040
117
137

040
124
072
072
102
045
116
101
m
116
122
040
122
040
066
045

102
074
060
040
061
116
000
106
114
107
105
101
123
045
045
116

101
1M
116
106
103
045
045
116
045
106
123

106
114
107
125
072
117
116
000
101
106
105

853 005006

116

124

040

116
040
045
040
040
045
040
045
000
101
117
072
+104
101
040
105
. Q722
104
116
000
101

1M
072
104
045
075
104
045
116

852 005003

o ———

124

106

040
102
040
062
101
040
062
116
000
045
122
105
045
045
040
122
104
045
045
116
045

040

LE g

P.AAK:

P.AAL:

P.AAM:

103

127
124
040
062
040
040
101
040
062
045
116

22-0ct=1980 10:45:32
LASCII
ASCID
LASCII
LASCII
LASCII
LASCII
LASCII
ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
ASCIY
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
JASCII
LASCII
LASCIT
LASCIT
_ASCI]
.ASCII
LASCII

/7 B/
/71T¢</
/79:0/
/>: /
/7%B1/
/70%N/
/7XN/<00>
/XAf/
/AIL/
/ING/
/ RE/
/G A/
/DRS/
/1 ¥
/706%/
/NXN/
<00>
/XAF/
/AIL/
/7ING/
/7 FU/
/NC:/
/7 X0/
/76XN/
/7%N/<00>
/ XA/
/OFF/
/7 _SE/

LASCII

/NT /

ASCIT

122

LASCII

P.AAN:

P.AAO:

SEQ 0048

22-0ct=1980 10:47:44

824 004661
825 004664
826 004667
827 004672
828 004675
829 004700
830 004703
831 004706
832 004711
833 004714
834 004717
835 004722
836 004725
837 004730
838 004733
839 004736
840 004741
841 004742
842 004745
843 004750
844 004753
845 004756
846 004761
847 004764
848 004767
849 004772
850 004775
851 005000

855 005014
856 005017
857 005022
858 005025
859 005030
860 005033
861 005036
862 005041
863 005044
864 005046
865 005051
866 005054
867 005057
868 005062
869 005065
870 005070
871 005073
872 005076
873 005101
874 005104
875 005106

PAGE 63

(ML

g%%

854 005011

23-0CT-80 09:11

ALY
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCIT
LASCII
LASCII
.ASCII
LASCII
JASCI1
LASCII
LASCII
ASCIl
LASCII
LASCIL
LASCIT
LASCII
LASCII
.ASCIi

/Y ¢/

/FOR/

4 Wl
/B :/
/7 XD/
/72 %/
/A =/
7 XD/
/72 %/
/NIN/
<00><00>
/XAW/
/ROT/
/E: 7
/%02/
/XA /
¥
¢
/REA/
/D: /
/%XD2/
/ZXNX/
/N/<00>
/XAN/

TOPS

PA:<

MACRO M1113

g;g

PAGE 64

SEQ 0049

22-0ct=1980 10:47:44

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

TOPS

PA: <
.

880 005111

102

LASCII

/18BB/

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
901 005207
902 005212
903 005215
904 005220
905 005223
906 005226
907 005231
908 005234
Y09 005237
910 005242
911 005244
912 005247
913 005252
914 005255
915 005260
916 005263
917 005266
918 005271

040
105
104
105
122
105
117
040
063
000
045
101
m
040
107
045
045
107
104
101
072
117
101
101
104
101
045
045
116
045
101
101
117
116
125
124
117

130
122
040
106
105
122
122
045
045
000
101
m
116
122
072
117
101
117
040
124
040
066
040
104
101
072
117
116
000
116
104
107
123
107
116
040
061

106
105
102
117
040
122
072
104
116

045

1
045
045
116

ASCII
LASCII
LASCII
LASCI1
LASCII
LASCII
LASCII
LASCII
ASCIT
LASCIT
.ASCII
ASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
ASCIT
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCIT
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
CASCIT
LASCIT

7 XF/
/ERE/
/D B/
/EFO/
/RE /
/ERR/
/OR:/
7 XD/
/3%IN/
<00><00>
/XAF/
/ZAIL/
7ING/
/ RE/
/G: /
/%067
/%A /
/G00O/
/D D/
/ATA/
7: %/
706%/
/A B/
/AD /
/DAT/
/A: /
/%067
/73NX/
/N/<00>
/INX/
/AD1/
/AGN/
/0S1/
/NG /
/UNI1/
/T %/
701%/

101
115
040
124
125
116
115
123

124
105
117
040
122
107
102
040

881 005114

—————

(MLG

877

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

23-0CT-80 09:11

CZMLAAO ML=11 LOGIC TEST

'HARDWARD TEST SECTION

114

116
000
045
m
104
125
104
m
040
125
045
045
106

———————————

105

117
101
125

123

106

114
107
105
040

ASCII

P.AAP:

066
040
117
104
101
045
045
102
040
124
040
066
045

045
11
116
m
040

062
040
116

P.AAQ:

P.AAR:

LASCII
LASCIT
.ASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCIT
LASCI1

/LES/

/NIN/
<00>
/XAT/
7IME/
/7D 0O/
/Ut /
/DUR/
ZING/
7 mB/
7uS /
7%02/
/%A /
/FUN/

Y
.

CIMLAAO ML=11 LOGIC T EST

MACRO M1113

"HARDWARD TEST SECTION

933
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

045
116

116
000

124
000
124
045
000
124
045
116

045
000
045
116

P.AAS:

045
124
000

P.AAU:

124
045
124
000
124
045
124
045
000

045
124
045
000
045
124
045
116

P.AAV:

958 005435
959 005440
960 005443
961 005446
962 005451
963 005452
964 005455
965 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
981 005537
982 005542
983 005545
984 005546

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

045
124
045
116

045

124
045
124
000

P.AAX:

124
045
124
045
124

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

P.AAY:

045
124
045
124
045
124
000

P.ABA:

045

P.ABB:

985 005551

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

045

124

045
124

124

000
124
045

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

124

045

124
045

124

045
124

JASCII
LASCIT

P.AAT:

P.AAW:

P.AAZ:

LASCIT
.ASCII
JASCII
LASCII
JASCIT
CASCIT
.ASCII
LASCIT
JASCIT
LASCII
.ASCII
LASCIT
LASCIT
JASCII
.ASCII
ASCIT
LASCIT
JASCII
LASCII

.ASCII

/CIN/
/7XIN/<00>

<00>
/%TX%/
/N/<00><00>
/%T%/
/TIN/
<00><00>
/%T%/
/T%1/
/7%IN/<00>
<00>
/%T%/
/T%1/
/7%XT%/
/N/<00><00>
/XT%/
/TX1/
/7%XTX%/
/TIN/
<00><00>

/XT%/

JASCIT /717
JASCII /%T%/
LASCIT
/TXT/
CASCII /7%N/<00>
LASCII <00>
.ASCII
/XT%/
LASCII
/T%1/
LASCIT /7XT%/
LASCIT
/TX1/
LASCIT
/7XTX/
CASCII /N/<00><00>
.ASCII /XT%/
JASCIT
/TX1/
JASCII
/%T%/
LASCII /T%1/
JASCIT /7%TX/
JASCIT /TIN/
CASCIT <00><00>
.ASCII /XT%/
LASCIT /7X1/
JASCII /%T%/
LASCIT /7TX1/
LASCIT /7%T%/
JASCIT /7X1/
JASCIT /7XIN/<00>
LASCII <00>
.ASCII /%T%/

LASCIT

LASCIT
JASCII

/1%1/

/XT%/
/T%1/

986 005554
987 005557

SEQ 0050

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

957 005432

L &
PAGE 65

SMLG

ggg

‘-1»

23-0CT-80 09:11

T0PS

PA:<

[

LOG IC 1 EST

'CZMLAAD ML=11
HARDWARD TEST SECTION

MACRO M1113

989

23-0CT-80 09:11

sMLG

992 005562
993 005565
994 005570
995 005573
996 005576
997 005601
998 005604
999 005607
1000 005612
1001 005615
1002 005620
1003 005623
1004 005626
1005 005630
1006 005633
1007 005634
1008 005637

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

1010 005645

009

1012 005651
1013 005654
1014 005657

106
040
m

000
117
000

000
120
000

1016 005665
1017 005670
1018 005673
1019 005676

104
040
117
040

000
107
104
120

000
117
000
101

1021 005704
1022 005707
1023 005712
1024 005715
1025 005720

13
117
040
116
101

040
124
107
105
124

116
000
105
122
105

1027 005726
1028 005731
1029 005734
1030 005737
1031 005740
1032 005743

040
24
124
000
040
122

104
105
105

105
103
104

P.ABL:

122
122

P.ABM:

106
122

P.ABN:

125
116

P.ABO:

124

P.ABP:

101
125

P.ABQ:

1011 005646

1015 005662

1020 005701

1026 005723

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

PAGE 66

104

040

122

104

123
040
124
000
040
122
107
040
000
040
m

124
045
124
000
124
045
124
045
124
045
124
045
000
107

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

P.ABD:

104
137

P.ABE:

122
122

000

114

P.ABF:

102

000

105
117

000
101
105
000
104
m
000
101
106
114

101

124

000

P.ABC:

ASCIT
LASCIT
LASCIT
LASCII
.ASCII
LASCIT
LASCIT
LASCIT
LASCIDI
LASCIT
LASCIT
LASCIT
ASCII
.ASCII
LASCII
.ASCII
LASCII

/7%XT%/
/7T%1/
/7%T%/
/N/<00><00>
/%T%/
/7T%1/
/%TR/
/7T%1/
/7%XTX%/
/7T%1/
/%XTX%/
/TXN/
<00><00>
/ GO/
<00>
/ DR/
/V_R/

LASCII

<00>

LASCII
.ASCII
LASCIT

/F/7<00><00>
/ OP/
/71/7<00><00>

ASCII
L.ASCII
LASCII
.ASCII

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

LASCIT
LASCII
.ASCII
.ASCII
LASCII

/Y N/
/07/<00>
/ GE/

.ASCII
LASCII
LASCII
LASCII
.ASCII
.ASCII

/ DE/
/TEC/
/TED/
<00>
/ ER/
/ROR/

LASCII

P.ABG:
P.ABH:

P.ABI:
P.ABJ:

P.ABK:

SEQ 0051

]

gg?

1009 005642

LJASCII

.ASCII

LASCII

LASCII
LASCII
LASCI!
LASCII
.ASCII
LASCIT
LASCII
ASCII
LASCII
.ASCII
LASCILT

/70Y/<00>
/7 IL/

/ BA/

/RIT/

/NER/
/ATE/

/D/<00><00>

/75/<00>
/ AF/
/TER/
<00><00>
7/ DU/
/RIN/
/7G/<00>
/ AT/
<00>
/ FA/
SIwy/

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

TOPS

PA: <

——

———————

—

MACRO M1113

SECTION

—

23-0CT=-80 09:11

sMLG

}&9
122

105

101

000

1049 006005
1050 006006

000
040

1052 006014
1053 006017
1054 006022
1055 006025
1056 006030
1057 006033
1058 006034
1059 006037
1060 006040

040
124
040
M
116
000
040
000
040

1062 006046
1063 006051
1064 006054
1065 006057
1066 006062

040
105
040
122
040

1051 006011

101

124
000
122
M
000

P.ABS:

126

P.ABU:

125
000

P.ABV:

123
126
000
102
000
101
117
M

101
116
127
124
107

103
123
105
040
« 12§
040

1074 006112
1075 006115

040
116

103
124

1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099

124
040
105
040
124
040
105
124
114
040
105
040
103
115
124
040
124
040
000
040
123
040
117

1073 006107

1076 006120

006123
006126
006131
006134
006137
006142
006145
006150
006153
006156
006161
006164
006167
006172
006175
006200
006203
006206
006211
006212
006215
006220
006223

124

116

101

125

000

122
000
115
000
130

000

P.ABT:

P.ABW:
P.ABX:
P.ABY:

P.ABZ

P.ACA:
P.ACB:

13
101
000
1véh
000
120
115
125
13
m
000
m
122
105
000
127
110
125

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

125
000
120
115

116
000
122
000

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

P.ABR:

006065
006070
006073
006076
006101
006104

116

000

126

106
103
124
000
122
000
105
105
1M
000
115
123
104

1061 006043

22=0ct=1980 10:47:44

1048 006002

PAGE 67

SEQ 0052

1045

1067
1068
1069
1070
1071
1072

—

{CZMLAAD ML=-11 LOGIC TEST
HARDWARD TEST

<00>
7/ AT/

LASCII
LASCII
LASCII
LASCII

7/ AT/
/TN/<00>
7 WR/
/1117
/NG/<00>
<00>
7/ vv/
<00>
/7 Fu/

LASCII

LASCII
LASCII
.ASCII
LASCII
L.ASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII

LASCII

.ASCII
LASCII

LASCII

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

P.ACF:
P.ACG:

P.ACH:
P.ACI:

P.ACJ:
P.ACK:

/RE/<00>

LASCII
ASCII

LASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCI1
LASCII
LASCII
L.ASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII

/7A/<00><00>

/NC/<00>

/7 TR/
/E/<00><00>
7/ RM/
/R/<00><00>
7/ EX/

/CES/
/SIv/
/E/<00><00>
/ MB/
7US/<00>
/7 DA/

/TA/<00>

7/ co/
/NTI1/

/NUL/

/7TY/<00>
7/ A0/
/E/<00><00>
/ LB/
/71/7<00><00>
/ PR/
/EMA/
/TUR/
/7LY/<0C>
7/ IA/
/E/<00><00>
/ IN/
/CRE/
/MEN/
/71/7<00><00>
/7 w1/
/TH/<00>
/7 uv/
<00>
/7 UN/
/5/<00><00>
/ PR/
/70M/<00>

TOPS

PA: <

po———— ———

———————————
- ==

'CIMLAAOD ML-11 LOGIC TEST
HARDWARD TEST SECTION

—

-———

23-0CT-80 09:11

B 5
PAGE 68

sMLG

}}8%
006232
006235
006240
006242
006245

006250
006253
006256
006260
006263
006264
006267
006272
006275

1120 006300
1121 006303
1122 006306
1123 006311
1124 006314
1125 006316
1126 006321
1127 006324
1128 006327
1129 006332
1130 006335
1131 006336
1132 006341

1133 006344

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
1148 006414
1149 006417
1150 006420
1151 006423
1152 006426
1153 0064 31
1154 006434
1155 006436

040
000

040
114
124
040
107

040
M
105
040
000
040
102
105
116

040
122
040
1m
000
040
105
040
11
101
000
040
106

105

000
040
125
000
040
114

000
040
123
000
040
122
040
125
105
000
040
107
040
123
104
040

117

122

P.ACL:

1
105
000
122
000

105
103

P.ACM:

105
000
116
125

P.ACN:

064

P.ACP:

116
102
040
124
107
000
127
114
000
124
000
111
124
114

111
114
103
000
246
000
110
105

P.ACQ:

122
000
116
111
000

P.ALTs

117
137

106
123

P.ACV:

125
121
000
061

P.ACO:

P.ACR:
P.ACS:

P.ACU:

124

000

103
116
000
104
101

117
124

P.ACW:

105
13

P.ACX:

105
125

P.ACY:

104
000
117
124

P.ACZ:

105

P.ADB:

000
124
124
00C
101
123
103
116
122
122

000
126
124
000

116

000

000
105
105
111

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

JASCII
LASCII
L.ASCII
LASCII
LASCII
ASCIL
LASCII
L.ASCII
LASCII
LASCII
LASCIT
L.ASCII
LASCII

/ OR/
<00>
/ SE/
/LEC/
/71/<00>
/ RE/
/7G/<00><C0>
7/ UN/
/1Qu/
/E/<00>
7/ 14/
<00>
/ NI/
/BBL/
/E C/
/NT/<00>
/7 G1/
/R/<00><00>
7/ WHW/
/ILE/
<00><00>
7 TTMW
/7E/<00><00>
7/ IN/
/1117
/AL/<00>
<00>
/ OF/
/F_S/

LASCII
L.ASCII
LASCII
LASCII
.ASCII
JASCII

<00>
/ co/
/UNT/
<00><00>
/ DE/
/LAY/

.ASCII
LASCII
LASCII
.ASCII
LASCII

LJASCII
LASCIT
LASCII
JASCII
LASCII
.ASCII
.ASCII
LASCII
LASCII

LASCII

P.ADA:

P.ADC:
P.ADD:

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

1104 006226
1105 006231

1111
1112
1113
1114
1115
1116
1117
1118
1119

——

MACRO M1113

1101

1106
1107
1108
1109
1110

LASCII
L.ASCII
LASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
.ASCII
LASCIT
.ASCII
LASCII
LASCIT
.ASCII

7ET/<00>

<00><00>
/ TE/
/STS/
<00><00>
/ AD/
/RS/<00>
7/ CO/
/UNT/
/ER/<00>
<00
/ RE/
/G/<00><00>
/ TE/
/STE!
/7D/7<00>
/ NI/

TOPS

PA:<

———

—

'CIMILAAQ ML=11 LOGIC TEST
'HARDWARD TEST SECTION

MACRO M1113

LSy

1160 006441

105
040
114
040
123
040
105
104
040

102
000
101
000
124
124
130
122
000
116

1171 006500

105

1170 006475

102

114
114

000
105
000
106
105

123
123

103

P.ADI:

115
124
114
105

125
11
105
122

P.ADJ:

125
130
103

116
120
124

P.ADK:

111
116
040

P.ADL:

111
116
040
122

P.ADM:

117
105
117
105
106
122
056

P.ADN:

P.ADO:

122
122

101
040
122
123

102
040
124

111
123
000

P.ADP:

1179 006524

000

1183 006537

105

104

000

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

124

1180 006526
1181 006531
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

040
105
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

P.ADG:
P.ADH:

000
040
000
040
114
120
130

P.ADF:

111
114
000

102

1172 006503
1173 006504
1174 006507
1175 006510
1176 006513
1177 006516
1178 006521

P.ADE:

102
040
124

040
000
104
101

000

SEQ 0054

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

/BBL/

ASCII

/BBL/

ASCII
.ASCII
ASCII
.ASCII
JASCII
.ASCII
JASCII
CASCII
.ASCII
ASCII

125

22-0ct=1980 10:47:44

1161 006444
1162 006446
1163 006451
1164 006454
1165 006457
1166 006462
1167 006465
1168 006470
1169 006472

PAGE 69

MLG

&" }}gg

23-0CT-80 09:11

/E/<00>
/ AL/
/L/<00><00>
/ TE/
/ST/<00>
/ XF/
/ERE/
/D/<00>
/ NI/

ASCIT
.ASCII
JASCII
.ASCII

/ES/<00>
<00>
/ SC/
<00>
/ MU/

"ASCII

<00><00>

CASCII
ASCII
ASCII

.ASCII
ASCII
ASCII

/LTI/
/PLE/
/XER/

/ UN/
/EXP/
/ECT/

ASCII

/ED/<00>

CASCII
"ASCII
.ASCII
CASCII
ASCII
JASCII
"ASCII
.ASCII
JASCII
ASCII
CASCII
ASCII
"ASCII
ASCIT

/SET/
<00><00>
/ BI/
/T N/
/0T /
/CLR/
<00><00>
/ NO/
/ RE/
/SPO/
/NCE/
7 AF/
/TER/
7 1.7

JASCI1
"ASCII

/ERR/
/ORS/

.ASCII
TASCII
CASCII

CASCII
JASCII
.ASCII
CASCII

"ASCII

.ASCIl
CASCII
TASCII
CASCI1

7 B/
/T N/
/0T /

/5 U/
75/<00>
/ DA/
/TA /

<00><00>

/ Bl/
/1 S/
/ET7<00>
<00>

TOPS

PA:<

AED:

JAEE:
G

AEC:
Gt Gt Bt P

AEA:

.AEB:
Bt Pt Bt Pt B

.ADZ:
P

e e D) B D) B D D

-_-—_ONONNO
= O—=-NO
=WV
W OWVMNIONONO

—

LADY:
Bt Bt Bt Bt B

JADW:

LADX:
Bt Bt Bt bt B

O—=—=
O—=N

ON—=
OWsHr

[ B

b b d
OO
NWW

e R

o
o
o

[
T

—_—
NSO
Do

e e

OO -—
Ow-—

Y e

ON—=0O0OMNNIND
oOwsrowvimnsor

[ B

o
B ) D
ONOONOO—=—
= WWOONSINNN

ADS:

LADT:

.ADU:

LADV:

Bt Bt et Bt Bt Bt Bt Bt Bt Bt Bt Bt Bt Bt Bt Bt $d bt Bt Bt Bt Bt Bt Bt B

[

D e
OON
SO

.ADR:

Gt Gt G

-—————~—--—--t—-o—.-—-—-u—n—.—ou—-—a-——-u—o—u-n—a—v--—u—-u-t-t—o—-—-—#n—-.—-t—.—t—.u—u—-—o—-.—

>
>
PPP>P>>PP>> > >
P P PP P2 D P D DD
P PRt
wwunnuunnuow
T
e
e
T L T LT X X
L
X
e e L L L
T
e e
L
L U Li L L
L a a lad a
e ilninlisinlinlinlzalislalsialislisislislislislizalislialialialalalalialslalaTalalalalalalfalalelale
el et e Y e Y L e Lo Lo

P. ADQ:

PP P

b
O
Vi

e e e D)
e e B e D) D
OCONMNNNOON—=OWH—=
WWSs NOSFOONNNIOWM

o
o

e )-

MACRO M1113

O
=t
NN—=O0O0O
NSOV

=
o

000

Ot
et OOt
OOWONS
=
OW=0ONC~N

(=1

006771
006774
006777
007002
007005
007010
007013

—

'HARDWARD TEST SEC TION

43
44
¢45
46
47
4«8
49

N NN NN NN N ~N
LSS LSS AN
&
WWNINNININIMNIMNIMNONIN
= b
s
~N
=S OOVONOWVESWN 2OV~ W

———————— Y

NN'&)NNNNNNNNNNNNNN
MMU\M\B\:\I‘WWM
RS

'CZMLAAO ML-11 LOG IC 1 EST
23-0CT-80 09:11

<00>
/ Sc/

5
0
PAGE 70

‘ML
/ Bl/
/T C/
/LR/<00>
<00>
/ OF/
/ 01/
/HER/
/ DR/
/1VE/

/5/<00><00>

/ CL/
/ASS/
/ A/<00>

<00>
r CLY

/ASS/

<00>
/ 10/
'Biti

/ B/<00>

<00>
/ ME/

/ND/<00>

/M S/
/1117

/NG/<00>
/ NO/

/0P/<00>

/ DR/

/ WR/
/1TE/
/ CW/
/ECK/
<00><00>
/ WR/
/1TE/
<00><00>
/ RE/

/N/<00><00>

/AD/<00>

<00><00>
/ CL/
/EAR/

/ CO/
/WP /
/ERR/

/0R/<00>

/ SY/
/S C/
/LR/<00>

SEQ 0055

7:44

5:32

PA:<

TOPS

CZMLAAOD ML-11 LOGIC T EST
'HARDWARD TEST

MACRO M1113

SECTION

1269

5
E
PAGE 71

sMLG

}%;?

1272
1273
1274
1275
1276
1277
1278

23-0CT-80 09:11

22-0ct=1980 10:47:44

:
007077
007102
007104
007107
007112
007115
007120

1279 007123
1280 007124
1281 007127

101
110
040
101
M
120
123

1282
1283
1284
1285
1286
1287
1288
1289

007132
007135
007136
007141
007144
007146
007151
007154

000
040
114
101
000
040
117
000
040
122
104

1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1501
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311

007162
007165
007170
007173
007174
007177
007202
007205
007206
007211
007214
007216
007221
007224
007227
007230
007233
007236
007241
007242
007245

040
117
102
000
040
106
123
000
040
122
000
040
115
125
000
040
105
114
000
040
113

1313
1314
1315
1316
1317
1318

007253
007254
007257
007262
007265
007266

000
040
123
102
000
040

1322 007302

040

1290 007157

1312 007250

1319 00727
1320 007274
1321 007277
1323 007305

122

122
000
122
104
116
122
105

103
105
055
055
105
124

P.AEF:

m
105
114

114
107
000

P.AEG:

101
122
000
101
040
137

102
124

P.AEH:

122
122
127

P.AEl:

124

000
117
040
113

P.AEJ:

122
122
110

105
105
000

P.AEK:

101
101
000
122
055
123

122
13

P.AEL:

101
102
000

P.AEM:

117
122
117

126
106
127

P.AEN:

103
137

P.AEO:

115

1170
123

000

114
124
114

101
040
113

P.AEP:

imm
101
132

m
124
114
105

116

11
M
000

103

123

061

114

125

107
104
114

115§

SEQ 0056

22-0ct=1980 10:45:32

LASCII
/ARC/
LASCII
/7H/<00>
.ASCII */ RE/
LASCII
/AD=/
LASCII
/IN-/
ASCII
/PRE/
LASCII
/SET/
LASCIT
LASCII
LASCII

LASCII
LASCIT
.ASCII
LASCII
LASCII
.ASCII
LASCII
LASCII

ASCIT

<00>
/ IL/
/LEG/

/7AL/<00>
<00>
/ AB/
/ORT/
<00><00>
/ AR/
/R R/
/D W/

/RY/7<00>

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

7/ GO/
/0D /
/BLK/
<00>
/ RE/
/FRE/
/SH/<00>
<00>
/ AR/
/RAY/
<00><00>
/ RA/
/mM-B/
/7US/7<00>
<00>
/7 ov/
/ERF/
/7LOW/
<00>
/ CW/
/K.S/

<00>
/ LA/
/ST
/
IBLK/

P.AEQ:

LASCIT
.ASCII
LASCII
LASCII
LASCII
ASCII

P.AER:

ASCII

/7 ML/

LASCII

LASCII
LASCIT
LASCID
LASCID

7UuR/<00>

IN/
/1T1/
/ALLY/
/1E/7<00>

/7CS1/

TOPS

PA: <

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION
1325

:
.
.
!

1328
1329
1330
1331

007310
007312
007315
007320

000
040
104
040

000
115
123
115

116
000
114

P.AES:

1333 007326

040

115

114

;
;
'
f

1332 007323
1334 007331
1335 007334
1336 007337

1337 007342

1338 007345
1339 007350
1340 007353

1341 007356

1342 007361
1343 007364
1344 007367
1345 007372
1346 007375

1347 007400

1348 007403
1349 007406
1350 007411
1351 007414
1352 007417
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

105

115
040
101

040

104
040
104
040
120
040
123
040

105

040

105
040
104
040
104
040
105
040
105
040
120
101
116
122
117
040
104
105
101
125
000
123
103
117
125
115
125
040
m

122
000
101

122

000

122
115
123

000
114
000

101
115
124

000
11¢
000

101
115
116
115
061

000
11
000
114
000

062
115
061
115
- 062
115
. 105
115
114
115
104
123
103
117
125
115
125
040
m
122

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

115

114

115

114

115

P.AET:

LASCIT
L.ASCII
LASCII
LASCII

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

P.AEU:

LASCII

7/ ML/

P.AEV:
P.AEW:

P.AEX:
P.AEY:

P.AEZ:
P.AFA:
P.AFB:

P.AFC:
P.AFD:
P.AFE:
P.AFF:

P.AFG:
P.AFH:

13
110
116
123
117
114
106
114

116
122
117
040
104
105
101
125

P.AFI:

122

P.AFJ:

105

PAGE 72

000

SEQ 0057

}g%g

23-0(CT-80 09:11

LASCII

LASCII
LASCII
LASCII

.ASCII

/ER/<00>
/MR/<00>
/ ML/
/AS/<00>
/ ML/

LASCII
LASCII
LASCII

/DA/<00>
7/ ML/
/DT/7<00>

LASCII
.ASCII
LASCII
L.ASCII
LASCII

/PA/<00>
/7 ML/
/SN/<00>
7/ ML/
/E1/<00>

.ASCII

/ ML/

LASCII
/E2/<00>
.ASCII
7/ ML/
/D1/<00>
LASCITI
LASCII
/7 ML/
/D2/<00>
LASCII
L.ASCII
/ ML/
/EE/<00>
LASCII
ASCII
/7 ML/
LASCII
/ZEL/<00>
.ASCII
7/ ML/
LASCII
/PD/<00>
.ASCII
/ASY/
LASCII
/NCH/
LASCII
/RON/
LASCII /0US/
LASCILI
/7 MO/
LASCII
/DUL/
JASCII */E F/
LASCII
/AIL/
LASCII
/URE/
LASCIT <00>
/SYN/
LASCII
LASCII
/CHR/
LASCII
/0ONO/
LASCII
/uS /
/MOD/
LASCII
LASCII /ULE/
/7 FA/
LASCII
JASCID
/1Lvy/

LASCII
LASCIT
.ASCII

22-0ct=1980 10:47:44

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

/RE/<00>
<00>
/ARR/

TOPS

PA:<

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

1381

1384
1385
1386
1387
1388
1389
1390

;

MACRO M1113

23-0CT-80 09:11

6.5
PAGE 73

SEQ 0058

MLG

}%g%

22-0ct=1980 10:47:44

:
007537
007542
007545
007550
007553
007556
007561

101
104
101
117
114
106
114

131
101
040
104
105
101
125

040
124
115
125
040
111
122

1392 007566
1393 007571
1394 007574
1395 007577
1396 007602
1397 007605
1398 007610
1399 007613
1400 007616
1401 007621
1402 007622
1403 007625
1404 007630
1405 007633
1406 007636
1407 007641
1408 007644
1409 007647
1410 007652
1411 007655
1412 007660
1413 007662
1414 007665
1415 007670
1416 007673
1417 007676
1418 007701
1419 007704
1420 007707
1421 007712
1422
1423
1424
1425 007714
1426 007714
1427 007722

115
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

105
122
101
101
115
125
040
111
122

115
131
122
131
117
114
106
114
105

P.AFK:

116
122
104
124
104
107
123
103
105
101
000
122
102
040
117
040
117
105
117
000

124
115
11
105
11
116
124
040
123
107

P.AFL:

117
114
123
117
114
120
122
122

P.AFM:

1391 007564

1428 007722
1429 010320

105

000

22-0ct=1980 10:45:32
ASCILI
LASCII
ASCIT
LASCII
LASCII
LASCIT
LASCII

/AY /
/DAT/
/A M/
/0DU/
/LE /
/FAL/
/LUR/

LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCI1
LASCIT
LASCII
LASCII
LASCII
LASCII

/MEM/
/ORY/
7 AR/
/RAY/
7/ MO/
/DUL/
/E F/
/AIL/
/URE/
<00>
/INT/
/ERM/
/EDI1/
/ATE/
7 D1/
/AGN/
/0ST1/
/1C /
/MES/
/SAG/
/E/<00>
/TRO/
/uBL/
/E S/
/H0O/
/T L/
/00P/
7/ ER/
/ROR/
/5/<00>

LASCII

NIB.SAVE:
.BLKW
HW.OR.TBL:

BLKW

PTBL.PTR:
BLKW

1430 010320
1431 010322

OP .NUM.
ARR :

1434 010326

GOOD .BLK :

1432 010322
1433 010324

BLKW
ARR.INC:.BLKW

/E/<00>

177
1

1
1

TOPS

PA:<

HARDWARD TEST

SNNNNNNNNNNSNNNNNSNNNNSNNNNNNNY
AN AN AN NN NN NN NI PO NI NO N = b b b
b b

00
=00~

01
0
0
0

VBN = ONO VS NN 2O NO VS W

-l i
)
i
D D D i
D i
D e
D i i
D i i i i i il i
N
D D
i

[elelelelelelelelelelelelelelelelelelelsrlelalelelelele]

—
e

.BLKW

STACK:

PD.TEMP: .BLKW

.BLKW

LST.ARR: .BLKW
10.BUF: .BLKW
STK.OFF: .BLKB
JEVEN

—

ARR.16:

W.C.SIZE:
.BLKW

RAS.INC:.BLKW
WT.DATA: .BLKW
RD.DATA:.BLKW
DRIVE.TYPE:
.BLKW
REG.INIT.FLG:

.BLKW

ML.REG::.BYTE

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

.BYTE
.BYTE

011354
011662
011664
011664
011666
011670
011672
011674
011674
011676
011676

(HIP.SIZ:
.BLKW
LST.BLK:.BLKW

1447 011342
1448

BLKW
PAR.DIS:.BLKW

—

010326
010330
010332
010332
010334
010336
010340

H
5
PAGE 74

SEQ 0059

22-0ct=19 80 10: 47:44
22=0ct=19 80 10: 45:3%2

JMLG

1446 010342

1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475

23-0CT-80 09:11

oleleleleolelelelelelelalelelelelolele
el e

1436
1437
1438
1439
1440
1441
1442
1443
1444
1445

SECTION

MACRO M1113

TOPS

PA:<

CIMLAAD ML-11 LOGIC TEST

CIZMLAAQ ML=11 LOGIC T EST

HARDWARD TEST SECTION

149

1 5
PAGE 75

sML&

22-0ct=1980 10:47:44

000
000
000
000
000
000
000

BYTE
BYTE
BYTE
BYTE
BYTE
.BYTE
BYTE

0
0
0
0
0
0
0

1502 011746
1503 011747
1504 011750
1505 011751
1506 011752
1507 011754
1508 011756
1509 011760
1510 011761
1511 011762
1512 011763
1513 011764
1514 011766
1515 011767
1516 011770
1517 011771
1518 011772
1519 011773
1520 011774
1521 011775
1522 011776

000
000
000
000
010600
025077
000100
000
000
000
000
014620
000
000
000
000
000
000
000
000
177400

.BYTE
BYTE
BYTE
.BYTE
.WORD
.WORD
.WOKD
.BYTE
.BYTE
.BYTE
BYTE
WORD
.BYTE
BYTE
.BYTE
BYTE
.BYTE
.BYTE
.BYTE
.BYTE
WOKD

0
0
0
0
10600
25077
100
0
0
0
0
14620
0
0
0
0
0
0
0
0
=400

1531 912011

000

.BYTE

1523 012000
1524 012001
1525 012002
1526 012003
1527 012004
1528 012006
1529 012007
1530 012010
1532 012012
1533 012013
1534 012014
1535 012015
1536 012016
1537 012017
1538 012020
1539 012021
1540 012022
1541 012023
1542 012024
1543 012026
1544 012030
1545 012031

000

.BYTE

000
000
000
000
100000
000
000
000
000
000
000
000
000
000
000
000
000
000
000020
177400
000
000

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

SEQ C060

22-0ct=1980 10:45:32

011736
011737
011740
011741
011742
011743
011744

1501 011745

23-0CT-80 09:11

}23%
1494
1495
1496
1497
1498
1499
1500

MACRO M1113

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

0
0
0
0
=100000
0
0
0
0

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

TOPS

PA:<

CIMLAAQ ML-11 LOGIC TEST
TE
HARDWARD TEST SECTION

MACRO M1113

1547

JMLG

}gzg

1550
1551
1552
1553

1554
1555
1556
1557
1558

1559
1560
1561
1562
1563
1564
1565

1566
1567
1568
1569
1570
1571
1572
1573
1574
1575

23-0CT-80 09:11

012041
012042
012043
012044
012045

012046
012047
012050
012051
012052
012053
012054

012056
012057
012060
012061
012062
012063
012064
012066
012067
012070

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

000
000
000
000

BYTE
BYTE
BYTE
.BYTE
.BYTE

BYTE
BYTE
BYTE
.BYTE
.BYTE
.BYTE
.WORD

.BYTE
.BYTE
.BYTE
.BYTE
BYTE
.BYTE
JWORD
BYTE
.BYTE
JBYTE

- .BYTE
.BYTE

.00
», BYTE

000
000
000
000
000
000
000
000
000
000
000
000
000

o, .BYTE
J.BYTE
BYTE
.BYTE
.BYTE
.BYTE
.BYTE
BYTE
BYTE
.BYTE
.BYTE
BYTE
BYTE

000

BYTE

1593 012112
1594 012113
1595 012114
1596 012116
1597 012117

000
000
010000
000
000

1599 012121
1600 012122
1601 012123

000
000
000

1598 012120

.WORD
LWORD
LWORD
.BYTE

000
000
000
C00
000
000
140300

000
000
000
000
000
000
100300
000
000
000

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

000110
177666
000001
000

000
000
000
000
000

22-0ct=1980 10:47:44

3
012032
012034
012036
012040

2.7

PAGE 76

110
=112
1
0
O
0
0
0

0
0
O
0
0
OC
0
=37500
O
0
0
O
0
O
=775C0
0
O
O
O
O
8
0
0
O
0
0
0

BYTE
BYTE
.WORD
BYTE
.BYTE

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

BYTE
BYTE
.BYTE

0
0
O

TOPS

PA:<

1638
1639
1640
1641
1642
1643
1644

1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
004000

002000
001000
000400
000200
000100
000040
000020
000010
000004
000002
000001
001000
000400
e o

)

]

)

]

) e

e =

(e T

D e

D i

D
-

RO R

NI RO RO PRI RIA) =

b b

b s

2 O Oo

)

D el

o
o
o

e e

5 NN

—_

= O

JE QU I

)

OV S

NN W NN N N RO N

2 ONO NS W

BN 5N 8 8 0 5

RS S

NOO VIS WN =SONO VS NN

.BYTE
.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
WM. VEC::. BLKW
ML.LUN::. BLKW

NOOOO VWIS

LSLSTSTLNUSTNT NN SESENTNTNTNTNTSEST
NS STNTNTST NS STNTL ST NT ST NT N

—

[=]leleleleleleleleleleleleleleoleoleleleleleoleleleleolelelelelels]le]

NOWVSWN=OOVONOWVS
NN =00V NOWVNSWN—=20O0~N

NN N N N N NN R

000

.BYTE

::.BLKW

et ileleleleleloleleleoleleoleleleleoleleoleolelelelelelelele
o]

MACRO M1113

[+ Pelelelelelelelelelelel
B
it
HNHO=NWSs
VO NO OO —=NOWSsSWN

) o

010000
b

100000
040000
020000

bq Bt B0 bt b

000000

bt B

-l

1603

bt St be P

)

1604
1605
1606

SECTION

e b

'HARDWARD TEST

—

|
oocoroooorororororororOrOFONMONCONMONMONOMOCONMOCONOMOMOMCONMCONOH o

CIMLAAD ML=11 LOGIC TEST
23-0CT-80 09:11

K5
PAGE 77

JMLG

=100000
40000

SEQ 0062

22-0ct=198 0 10: 47:44
22-0ct=198 0 10 :45:32
TOPS
PA:<

CIMLAAD ML-11 LOGIC T £ST

'HARDWARD TEST SECTION

_MAZRO M1113

1659

23-0CT-80 09:11

PAGE 78

JMLG

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

}gg?

1662
1663
1664
1665
1666
1667
1668

000200
000100
000040
000020
000010
000004
000002

BIT7==
BITé==
BITS==
BIT4==
BIT3==
BIT2==
BIT1==

200
100
40
20
10
4
2

1670
1671
1672
1673
1674

000040
000037
000036
000035
000034

EF .START==
EF .RESTART==
EF .CONTINUE==
EF .NEW==
EF .PWR==

40
37
36
35
34

PRIOG==
PRIOS==
PRIO4==
PR103==
PRI02==
PRIO1==
FVL==
LOT==

300
240
200
140
100
40
0
4
10

IDY==
ISR==
UAM==
BOE==
PNT==
PR]==
IXE==
IBE==
IER==
LOE==
HOE==
FMT.1=
FMT.2=
FMT.3=
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=

40
100
200
400
1000
2000
4000
10000
20000
40000
=100000
P.AAA
P.AAB
P.AAC
P.AAD
P.AAE
P.AAF
P.AAG
P.AAH
P.AAl
P.AAJ
P.AAK
P.AAL
P.AAN
P.AAN
P.AAO
P.AAP
P.AAQ

1669

1675

1676
1677
1678
1679
1680
1681

1682

1683
1684

1685

1686
1687
1688
1689
1690
1091
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1703\~
1709
1710
1711
1712
1713

000001

BITO==

000340

PRI0O7==

000300
000240
000200
000140
000100
000040

000000

PRI00==

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

ADR==

SEQ 0063

TOPS

PA:<

340

|
'CIMLAAO ML=11 LOGIC TEST

'HARDWARD TEST SECTION
1715
};}?

MACRO M1113

23-0CT-80 09:11

SEQ 0064

MLG
:

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

1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731

005300
005350
005356
005366
005400
005414
005432
005452
005474
005520
005546
005576
005630
005634

FMT.18=
ONE.FMT=
TWO.FMT=
THR.FMT=
FOR.FMT=
FIV.FMT=
SIX.FMT=
SEV.FMT=
EIG.FMT=
NIN.FMT=
TEN.FMT=
ELV.FMT=
WRD. 1=
WRD . 2=

1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
1750
1751

005654
005662
005670
005676
005712
005726
005740
005750
005760
005770
005774
006006
006014
006022
006034
006040
006046
006054
006062

WRD.4=
WRD . S=
WRD . 6=
WRD. 7=
WRD . 8=
WRD.9=
WRD.10=
WRD.11=
WRD.12=
WRD.13=
WRD.14=
WRD.15=
WRD.16=
WRD.17=
WRD.18=
WRD.19=
WRD . 20=
WRD.21=
WRD.22=

£ .ABG
P.ABH
P.ABI
P.ABJ
P.ABK
P.ABL
P.ABM
P.ABN
P.ABO
P.ABP
F.ABQ
P.ABR
P.ABS
P.ABT
P.ABU
P.ABV
P.ABW
P.ABX
P.ABY

1761

006206

WRD.33=

P.ACI

1732

005646

1752
1753
1754
1755
1756
1757
1758
1759
1760

006076
006104
006112
006126
006134
006142
006156
006164
006200

1762

1763
1764
1765
1766
1767
1768
1769

PAGE 79

006212

006220
006226
006232
006242
006250
006260
006264

WRD . 3=

WRD.23=
WRD . 24=
WRD.25=
WRD . 26=
WRD.27=
WRD. 29=
WRD. 30=
WRD.31=
uao.§§=

WRD. 34=

WRD . 35=
WRD. 36=
WRD.37=
WRD. 38=
WRD. 39=
WRD.40=
WRD.41=

P.AAR
P.AAS
P.AAT
P.AAU
P.AAV
P.AAW
P.AAX
P.AAY
P.AAZ
P.ABA
P.ABB
P.ABC
P.ABD
P.ABE

P.ABF

P.ABZ
P.ACA
P.ACB
P.ACC
P.ACD
P.ACE
P.ACF
P.ACG
P.ACH

P.ACJ

P.ACK
P.ACL
P.ACK
P.ACN
P.ACO
P.ACP
P.ACQ

§
.

TOPS
PA:<

'CZMLAAD ML-11 LOG 1 TEST

PAGE 80

2> 3» 3= = o 3o 3> 3> 3= 3> 3= 3» 3u 3» 3o 3> 3 e
O0O0000O o QOO
—_—_romMMmo o O>N<<XE<C
-0

vvvvvvvvvvv‘vv‘vvvv‘vvvvvvv‘vvvvvvvvv‘vvvvvvv‘q‘v‘vv‘vvvv‘vv‘v‘v

—

>
o

o
o
o
«

> 3> 3> 3> 3>
=iri-d-i~]
VOVOVO

-ADT

.ADU

ODUVOZ B M N reXTOMOOD>»> ~ < xE<

PRl
Bl
> 3> 3> 3»

FNC.

. ADM
.ADN

o
o
“
o
o

FNC.
FNC.

-ADJ
.ADK

mMmmMmmMmmmmmmmmmmmmmm o OO0

W= OONOWVISWMN=O 1 I 100NN N=OOVNO
VI NN
OOV NO WV SN

[ "% o§ o) o

of wf of of wf of =f =

DDV VDDV VDVVV VOO
OO0V 0O0U0O0DO0O0D0D0oD0o0

007254
007266

007242

PHR.
FNC.

5
SEQ 0065

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

NN;\J—‘-.—.—.—‘—.—'—.—.-‘o“fiom&u'\)—.-‘oaflombu'\’—.oom\fl\fl\fl\fl\fl\flm\h\flbb&‘“bbbb

1824
1825

1823

DVOO

007124
007136
007146
007162
007174
007206
007216
007230

007074
007104

vVvECE
XXOO

1815
1816
1817
1818
1819
1820
1821
1822

1813
1814

PHR.
PHR.
PHR.
PHR.
PHR.
o>

006560
006576
006630
006646
006660
006672
006714
006726
006740
006752
006766
006774
007002
007020
007030
007036
007046
007062

s lalal

1795
1796
1797
1798
1799
1800
1801
1802
1503
1804
1805
1806
1807
1808
1809
1810
1811
1812

alalalalnlalalalalalialalalalel

006526
006542

WRD.

el
X

1793
1794

006510

WRD.
WRD.
WRD.

1792

006300
006306
006316
006324
006336
006350
006360
006370
006400
006406
006420
006426
006436
006446
006454
006462
006472
006504

ZZZ

1777
1778
1779
1780
1781
1782
1783
1784
1785
1786
1787
1788
1789
1790
1791

23-0CT-80 09:11

;ML

TR
T T T T

1771
1772
1773
1774
1775
1776

SECTION

ZZTZTZTZTZTZTZTZTZTZTZTZIZZ

HARDWARD TEST

MACRO M1113

TOPS
PA:<

MACRO M1113

1827

007302
007312
007320
007326
007334
007342
007350
007356
007364
007372
007400
007406
007414
007422
007430

1848

007534

1853

1854
1855
1856
1857
1861 012172

007436
007444
007500

ARR.DAT=

P.AFJ

E2.TEMP=

012702
060102
016601

006300
066007
000022

000040
000056
000074
000112
000130
000156
000174
000240

005003

P.AFK
P.AFL
P.AFM
NIB.SAVE

D2.TEMP=

171624
000012

000012
012226

JSR
MOV

R1,$SAVE3
12(sP) ,R1

MOV

12(SP) RO

MOV
ADD
MOV

000014

1%:

2%:

NIB.SAVE+2

NIB.SAVE
+4

LOAD.STACK:

011342

TOPS

PA:<

P.AFG
P.AFH
P.AF1

007720

016600

1879 012250

P.AER
P.AES
P.AET
P.AEU
P.AEV
P.AEW
P.AEX
P.AEY
P.AEZ
P.AFA
P.AFB
P.AFC
P.AFD
P.AFE
P.AFF

REG.16=
ASYNC=
SYNC=

007716

1867 012214

1871 012230
1872 012232
1873 012234
1874 012236
1875 012240
1876 012242
1877 012244
1878 012246

REG.1=
REG.2=
REG.3=
REG.4=
REG.5=
REG.6=
REG.7=
REG.8=
REG.9=
REG.10=
REG.11=
REG.12=
REG.13=
REG.14=
REG.15=

MEM.ARR=
INTER=
TRBLE.LOOP=
D1.TEMP=

004167
016601

1868 012220
1869 012222
1870 012226

¢2=0ct=-1980 10:45:32

007566
007622
007662
007714

1862 012172
1863 012176

1864 012202
1865 012206
1866 012210

22=0ct=1980 10:47:44

1830
1831
1832
1833
1834
1835
1836
1817
1838
1839
1840
1841
1842
1843
1844

1849
1850
1851
1852

SEQ 0066

sMLG

}g%s

1845
1846
1847

B 6
PAGE 81

23-0CT-80 09:11

ASL
ADC
.WORD

.WORD
WORD
.WORD
.WORD
.WORD
.WORD
.WORD
LWORD

CLR

#STK.OFF ,R2
R1,R2
14(SP) ,R1
RO
1$(RO) ,PC
2%-1%

:
: NIB.PTR,*
:

STK.PTR,¢

2026
2081

: NIB.PTR,*

2077

2081

3%-1%

4$-1%
5%-1%
6%-1%

7%-1%
9%-1%
10%-1%
14%-1%

—_——

————————————

CZMLAAD ML-11 LOGIC T EST
HARDWARD TEST SECTION

MACRO M1113

HARDWARD TEST SECTION
]

1881
1882
1883
1884 012252
1885 012254
1886 012256
1887 012260
1888 012264
1889 012266
1890 012270
1891 012272
1892 012274
1893 012276
1894 012302

BISB
MOV

3%:

012310
012312
012314
012320
012322
012324
012326
012330
012332
012336
012340

1909
1910
1911
1912

012344
012346
012350
012354

R3.RO

MOV

4%:

MoV

5%:

175356

BR
CLR
BISB
Mov
suB
Mov

6%:

CLR
BISB

MoV
SuB
MOV

175342
7%:

175324

CLR
BISB
MoV
suB

175374

1908 012342

1913 012356
1914 012360
1915 012362
1916 012364
1917 012366
1918 012372
1919 012374
1920 012376
1921 012400
1922 012402
1923 012404
1924 012406
1925 012410
1926 012412
1927 012414
1928 012420
1929 012422
1930 012424
1931 012426
1932 012430
1933 012432
1934 012436
1935 012440

suB

MoV

175412

8%:

9%:

BR
CLR
B1SB
MOV
suB
MOV
ASR
ASR
ASR
ASR

CLR
B1SB
MoV
SuB
MOV

175276
108:

CLR
BISB

MoV

175260

11%:

(R2) ,R3

CLR
BISB

MOV

SuB
Mov
ASR
ASR

TOPS
PA:<

R1,RO

R3.RO
NIB.SAVE
,R3
138
R3
(R2) ,R3

SuB

175430

SEQ 0067
22-0ct-1 98 0 10: 47:44
22-0ct=1 98 0 10::45:32

JMLS

1895 012304
1896 012306
1897
1898
1899
1900
1901
1902
1903
1904
1905
1906
1907

6
C
PAGE 82

2085

R1,R0

NIB.SAVE
,R3
8%
R3
(R2) ,R3
R\,RO

2089

R3,R0

?IB.SAVE.RB

2093
R3,R0

NIB.SAVE
,R3
11%

DDV VDVZVDVDA~ADZVVD~D

=S NOO =0 =W

|
|

23-0CT-80 09:11

2097

2101

2105
(R2) ,R3

R3.RO

N1B.SAVE+2,R3

12%
R3
(R2) ,R3

R1,R0

R3,RO

N1B.SAVE+2,R3
R3
R3

2109

'CZMLAAO ML=11 LOGIC TEST

'CIMLAAD ML-11 LOG ICT EST
'HARDWARD TEST SECTION

MACRO M1113

1937
}ggg
006203
006203
000303

1944 012456

105060

1945 012460

1946 012464
1947 012466

1948 012470
1949 012472
1950 012474
1951 012500
1952 012502
1953 012506
1954 012512

}822 012516
1957

}ggg

1964

PAGE 83

SEQ 0068

sMLG
:

1940 012442
1941 012444
1942 012446

1943 012450

23-0CT-80 09:11

042703
150360

000207
005003

151203
160301
016703
000303
042703
105061
150361

000207

177760

011354

12%:
13%:

011354

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

BIC

CLRB

BISB

14%:
175220
177760
011354
011354

R3
R3
R3

#177760,R3

STACK(R0)

R3,STACK(RO)

RTS
CLR

PC
R3

s
3

2077
2113

RTS

2026

BISB
SuB
MOV
SWAB
BIC
CLRB
BISB

; Routine Size:
;

TOPS
PA: <

(R2),R3
R3,R1
NIB.SAVE+4
,R3
R3
#177760,R3
STACK(R1)
R3,STACK(RT)
107 words

Maximum stack depth per

invocation:

& words

CIZMLAAO ML-11 LOGIC C TEST

'HARDWARD TEST

MACRO M1113

SECTION
l

23-0CT-80 09:11

PAGE 84

L1966 ;ML4

5010

ONOWVMSWN
2OV
NO VS WN 20OV

FUNCTIONAL DESCRIPTION:
A REPEATEDLY CALLED SEQUENCE OF
ASSIGNMENT EXPRESSION TO LOAD
THE DSA, BUS ADRS AND WORD COUNT
REGISTERS WITH APPROPRIATE INFORMATION
BEFORE MASS BUS TRANSFERS CAN
COMMENCE .

LOADS A MASS_BUS BLOCK XFERR AT
BLOCK ZERO.

ZEROES;

'LOAD THE DSA REG WITH SECTOR ZERO

not 255;

iLOAD WORD COUNT REG WITH COMPLIMENT 256

10_BUF ;

iLOAD THE BUS ADDRESS REG WITH [0 BUF ADRS

(TIT

@
>

D
il
D
D
B
D
D
D
D

PO RO N N N N PO PRON) — —

D
D
D

!
!
:
|
:
1
E

D
D
il
i
i
i
ad
-

novalue =

66
540

000207

FIRST.BLK.XFER:
- CLR
aML .REG+30
MOV
#10.BUF ,aML .REG+20

MOV
RTS

;

Routine Size:

:
:

#-400,3aML.REG+10

9 words

; Maximum stack depth per

invocation:

0 words

oo ~NON
W

520

2003

2004

(7)

0
0
2000 0
588; 0

TOPS=20 Bliss=16 V2(206)

PA:<NEALE>BLZ2ML4.BLI.2

— NN
N

routine FIRST_BLK_XFER

132

;
:
;
;
;
;
;
;
;
;
;
;
;

NN N NN

;
;
:
;
;
;

1976 ;

1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987
1988
1989
1993
1997
1998
1999

22~

;

LSLST NS NSENSLSESSTST
S SNT SN NSNS N

i
1967
|
1968
L1969
1970
1971
1972
1973
1974
1975

SEQ 0069

LSTLST.NT.¥)

CZMLAAD ML=11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE 85

22-0ct=1980 10:47:44

2012 ;MLé

22-0ct=1980 10:45:32

%g}z :

2015 ;
2016 ;

2139

2018
2019
2020
2021
2022
2023
2024
2025
2026

;
;
;
;
;
;
;
;
;

2028
2029
2030
2031
2032
2033

;
;
;
;
.,
;

2152
2153
2154
2155
2156
2157

2035 ;
2036

2159
2160

MLDA = .GOOD BiLK;
MLBA = 10_BUF;

2162

end;

2027 ;

2034 ;

2037 ;

2038 ;
2042
2046 012542

2047 012542
2048 012550

2049 012556

2050 012564
Sgg; 012572
2053
5828
2060

2151

2158

2161

152777
016777
012777
012777

000207

TOPS=20 Bliss=16 v2(206)

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

routine GD_BLK_XFER : novalue =

2140
2141
2142
2143
FALT
2145
2146
2147
2148
2149
2150

2017 ;

SEQ 0070

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

!
!
!
==

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

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
6GO0D .BLK ,aML .REG+30

H
3

2158
2159

MOV
RTS

#-400,aML .REG+10
PC

3
:

2161
2139

MOV

#10.BUF ,aML .REG+20

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

0 words

2160

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE 86

2062 ;ML4

22-0ct=1980 10:47:44

il
il
i
il
il
i
-

2096 012574
2097 012602
2098 012610
2099 012616
5}8? 012624

5
6
7
8

9
0
1

lee

FUNCTIONAL DESCRIPTION:
A REPEATEDLY CALLED SEQUENCE OF
ASSIGNMENT EXPRESSIONS TO LOAD
THE DSA, BUS ADRS AND WORD

COUNT REGISTERS WITH APPROPRIATE
INFORMATION BEFORE A MBUS
TRANSFER CAN COMMENCE

LOADS A MASS BUS BLOCK

TRANSFER AT THE LAST BLOCK
ADDRESS

!e-

begin
ECC_DIS = ONE;

MLDA = .LST_BLK;
MLBA = 10_BUF;

end;

152777
016777
012777
012777
000207

2102
5}83
2109

routine LAST_BLK_XFER : novalue =

2
3

177216
177120
177102
177064

'DISABLE ERROR CORRECTION

'"LOAD DSA REG WITH THE LAST BLOCK ADRS
'LOAD BUS ADRS REG WITH THE 10_BUF ADRS

MLWC = not 255;
000002
175526
010342
177400

'LOAD WORD COUNT REG WITH COMPLIMENT 256

LAST.BLK.XFER:

BISB
MOV
MOV
MOV
RTS

#2,3ML.REG+120
LST.BLK,aML.REG+30
#10.BUF ,aML .REG+20
#-400,3ML.REG+10
PC

; Routine Size:
13 words
; Maximum stack depth per invocation:
.

TOPS=20 Bliss=16 v2(206)

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

3
}
:
:
0 words

21
21
21
21
21

O~ 0o Co 0o O
NN
—

il
i
D il
D
D il
D
il

2087 ;
2091
2095 012574

3
4
S

S W =200V
No

il
il
il

=
-

2086

2084
2085

2081
2082
2083

2080

2077
2078
2079

o000
NN NN NNNNN~vNoOrOrOrOrOO O

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

5822 :
2065
2066
2067

SEQ 0071

CZMLAAD ML=-11 LOGIC TEST

HARDWARD TEST

2111

MACRO M1113

SECTION

23-0(CT=-80 09:11

PAGE 87

;mLé

22-0ct=1980 10:47:44

%H% :

22-0ct=1980 10:45:32

2114 ;
2115 ;
2116 ;

2186
2187
2188

routine DAT_DM_XFER : novalue =

2118 ;

2190

SI\Y 2
2119 ;

2120 ;
2121 ;
2122 ;

2123 ;

2124 ;

e\es ;

2126
g1er
2128
2129
2130
i
2132
2133

;
3
;
.
;

2189
2191

2192
2193
2194
2195

2196

2197

;
;

2198
2199
2200
2201
2202
2203
2204
2205

2136 :

2208

2134 ;
2135

2137 ;

2141
2145 012626

2146 012626
2147 012634
2148 012642
2149 012650
g}g? 012656
2152
%}gg

2159

SEQ 0072

2206
2207
2209

152777
016777
012777
012777
000207

TOPS=20 Bliss=16 v2(206)

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

!¢+
!

FUNCTIONAL DESCRIPTION:

A REPEATEDLY CALLED SEQUENCE

!
!
!

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

TRANSFER CAN COMMENCE

!
!
!
!
!'=-

LOADS A MASS BUS BLOCK TRANSFER,
IN DIAGNOSTIC MODE, AT THE GOOD
BLOCK ADRS.

INFORMATION BEFORE A MASS BUS

.
beqgin
DAT DM = ONEt;

'SET DATA DIAG MODE

MLWC = not 255;

'LOAD WORD COUNT REG WITH COMPTIMENT 256

MLDA = .GGOD BLK;
MLBA = 10_BUF;

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

end;

000010
175466
010342
177400

177164
177066
177050
177032

DAT.DM.XFER:

BISB
MOV
MOV
MOV
RTS

;
;

#10,aML.REG+120
GOOD .BLK ,aML .REG+30
#10.BUF ,aML .REG+20
#-400,3ML.REG+10
PC

Routine Size:
13 words
Maximum stack depth per

:
invocation:

2
:
;
3
3
0 words

;
2205
2206
2207
2208
2186

CZMLAAD ML=11 LOGIC T EST

MACRO M1113

8 :

2234

g%%g

1:;

2237

2239

4 ;
S :
6

97 ;

2198 ;
2199 ;
2200 ;

%%8} 3
2203 ;

2204 ;
2205 ;
2206 :
2207 ;
%58% :

2210 ;

e
.
S
S
e
.
.
.
.
.

2238
2240
2241
2242

2243

2244
2245
2246

CURRENT TEST PATTERN.

IF THE

‘

TWO VALUES ARE NOT EQUAL AN

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 CALL
IMPLICIT INPUTS:

NIB_SAVE

BLOCK OF 3 WORDS TO STORE

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

IMPLICIT OUTPUTS:
!=--

NONE

%gz;

.ERR_FLG = ZERO;

ICLEAR THE ERROR FLAG BACK IN THE CALLING ROUTINE

2249

case .(NIB_NUM) from 0 to 9 of

'SELECT THE NIBBLE TO BE TESTED

2250
2251
2252
2253
%ggg

set

(ol :

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

'TEST NIBBLE O AND SET ERR FLG IF NEQ

2256

2211 ;
2212 ;
2213 ;

2257
2258
2259

2215 ;

2261

2214 ;

2233

FUNCTIONAL DESCRIPTION:
COMPARES THE CURRENT NIBBLE
POSITION IN "NIB_SAVE' WITH THE

ERROR FLG IS SET WHICH THE
CALLER CAN INTERIGATE

6 ;

: novalue =

S :

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

egin

—

rout;ne.TST_LNG_URD (NIB_NUM, NIB_PAT, ERR_FLG)

=S OVONOWVNSWN
2OV
NN WN—=O

SEQ 0073

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32
NN
NN
N NN
NN
STSI ST NT ST NI ST NI ST SIS SISIS NI NI SIS 1SS IS S L]
WIWNNINININOININOININININ
= b b B e b —d D e b

—
W
WN=OO0VO NV
=2O VNV
B W

PAGE 88

sML4
:

o
d o o

MNOROMNNIA NN

D o

NN NN

D o

D e

NN NN NN RN NN

D o

NN NN NN

VO OVOOVOOVOOEOEOO
NN NN NNNN~N~NoCcrCrCr OO OO O

HARDWARD
TEST
SECTION
R
.

23-0CT-80 09:11

2260

(1] :

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

‘

g
'

;

CZMLAAD ML-11 LOGIC T EST

'HARDWARD

TEST

MACRO M1113

SECTION

23-0CT-80 09:11

L2217 MLG
1;
%%}3 :

J 6
PAGE 89

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

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

2220
2221
2222
2223
%%%g

;
;
;
;
3

2262
2263
2264
2265
S%gg

2226
2227
2228
2229

;
;
;
;

2268
2269
2270
2271

2233
2234
2235
2236
2237
2238
2239
2240
22461
2242
2243
2244
2245
2246
2247
?223

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

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

2250
2251
2252
2253

;
;
;
;

2292
2293
2294
2295

2256
2257
2258
2259

;
;
;
;

2298
2299
2300
2301

2262 ;
2263 ;
2264 ;
2265 ;
2266 ;
2267 ;
2268 ;
2269
2270 ;
227 ;

2304
2305
2306
2307
2308
2309
2310
2in
2312
2313

%g%? 3

2232 ;

r44

%%gg 3

5%2(1) 3

'TEST NIBBLE 1 AND SET ERR FLG IF NEQ
(2]

:
it .NIB_SAVE

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

'TEST NIBBLE 2 AND SET ERR FLG IF NEQ
(3]

%g;g

:
it

.NIB_SAVE

[NIB_3] neq

2274

.(NIB_PAT)<0, 4> then

.ERR_FLG = ONE;

'TEST NIBBLE 3 AND SET ERR FLG IF NEQ

(4] :
it

.NIB_SAVE [NIB_4] neq .(NIB_PAT)<0, 4> then .ERR_FLG = ONE;
'TEST NIBBLE & AND SET ERR FLG IF NEQ

[5]

:
it

.NIB_SAVE [NIB_5] neq .(NIB_PAT)<0, 4> then .ERR_FLG = ONE;
'TEST NIBBLE 5 AND SET ERR FLG If NEQ

(6]

:
it .NIB_SAVE [NIB_6] neq .(NIB_PAT)<0, 4> then .ERR_FLG = ONE;
'TEST NIBBLE 6 AND SET ERR FLG IF NEQ

k7]

5539

:
if

.NIB_SAVE

[NIB_7] neq

.(NIB_PAT)<0, 4> then .ERR_FLG = ONE;

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

%gg%

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

tes;
end;

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

SEQ

0074

|
|
|

CIZMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

PAGE 90

2273 :ML4
2274 ;

2275
2279
2283 012660

004167
016600

171122
000010

2287 012672

016601

000014

005010

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

006301
066107
000024
000052
000110
000140
000200
000226
000264
000314
000354
000404

2301 012734
2302 012740
2303 012744
2304 012750
2305 012752
2306 012754

062702
016701
042701
020102
001577
000574

2300 012730

012704

TST.LNG.WRD:

1$:

000012

2%:

2307 012756

016601

000012

3$:

2310 012772

006202

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

2318 013014

042701
016702
006202
006202
006202
042702
020201
001560
000555

016601

2319 013020 042701

177760
174750
177760

177760
174722

000012

177760

4$:

2320 013024 016702 174664
2321 013030
2322 013032
2323 013036
2324 013040
2325 013042

2326 013044

000302
042702
020201
001544
000541

016601

000012

;
. ERR.FLG,*

2210
2247

MOV

14(SP) ,R1

: NIB.NUM,+

2249

12(SP) ,R2

. NIB.PAT,+

2254

12(SP) ,R1

. NIB.PAT,*

2260

. NIB.PAT,+

2266

. NIB.PAT,+

2212

5%:

(RO)

ASL
ADD
LWORD
.WORD
WORD
.WORD
.WORD
'WORD
.WORD
.WORD
"WORD
WORD

R1
1$(R1),PC
28-1%
3%-1%
4$-1%
5%-1%
6$-1%
7%-1%
8%-1%
9%-1%
108-1%
118-1%

BIC
MOV
BIC
CMP
BEQ
BR

#177760,R2
,R1
NIB.SAVE
#177760,R1
R1,R2
13§
128

BIC
MOV

#177760,R1
NIB.SAVE
,R2

ASR
ASR
ASR
BIC
CMP
BEQ
BR

R2
R2
R2
#177760,Kk2
R2,R1
13§
128

MOV

12(SP) ,R1

BIC

R1
177760,

SWAB
BIC
CMP
BEQ
BR

R
#177760.R2
R2,R1
13§
12%

MOV

177760

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

R1,$SAVER
10(SP) ,RO

ASR

177760

1A
: 32

SEQ 0075

JSR
MOV
CLR

016602

2308 012762
2309 012766

-Oct-

2284 012660
2285 012664

2286 012670

MOV

NIB.SAVE
,R2

12(SP) ,R?

'CIZMLAAO ML=11 LOGIC TEST

MACRO M1113

{HARDWARD TEST SECTION
l

23-0CT-80 09:11

L 6
PAGE 91

SEQ 0076

22-0ct=-198 0 10:147:44
22-0ct=-198 0 10: 45:32

JMLG

177760

000012
177760

6%:

174576
177760

000012
177760

7%:

177760
174512

8%:

177760
174462

SWAB
BIC
CMP
BEQ

9%:

016702

177760
124424

#177760,R2
R2,R1

sP) ,R1

7760 ,R1

;

NIB.PAT,+

2278

;

NIB.PAT,*

2284

; NIB.PAT,+

2290

; NIB.PAT,*

2296

NIB.PAT

2302

.SAVE+2,R2

7760,R2
R

P),R1
760,R1
.SAVE+2,R2

77760,R2
R1

(sP),R1
#177760,R1

NIB.SAVE+2,R2
R

#177760,R2

MOV

BIC

MoV
ASR
ASR

ASR
ASR
SWAB

177760

000012

ASR
ASR
ASR
BIC
CMP
BEQ
BR
MOV
BIC

MOV

177760

000012

BIC
CMP
BEQ
BR
MOV
BIC
MOV

ASR;s

177760

000012

BIC

MOV

174550

2353 013150
2354 013152
2355 013154
2356 013156
2357 013162
2358 013164
2359 013166
2560 013170
2361 013174
2362 013200
2363 013204
2364 013206
2365 013212
2366 013214
2367 013216
2368 013220
2369 013224
2370 013230
2371 013234
2372 013236
2373 013240
2374 013242
2375 013244
2376 013246
2377 013252
2378 013254
2379 013256
2380 013260
2381 013264
2382 013270

MOV

gIB.SAVE,RZ

NN~

ASR
ASR
SWAB
BIC
CMP
BEQ

#177760,R1

~Nwv

BIC

Mov
ASR
ASR

WNA~APAPs

177760
174634

TOPS
PA:<

-t
D VWO DDV
V2DV

10%:

CMP
BEQ
BR
MoV

BIC

MOV

SP) ,R1

R
7760,

,R2
B.SAVE+4

[

———

—

lcznuuo ML=11 LOGIC TEST
HARDWARD TESTSECTION

MACRO M1113
\

2384

000302
042702
020201

2391 013306

000417

2390 013304 001422

177760
-

016601 000012

2393 013314 0427017 177770

2403 013346
%28? 013352
2406
%Z?;
24613

PAGE 92

2387 013274
2388 '013276
2389 013302

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

23-0CT-80 09:i11
e

016702
006202
006202
006202
006202
000302
042702
020201
001402

012710
000207

174374

177770

000001

SWAB
BIC
CMP

R2
#177760,R2
R2,R1

12%

BIC

177770, R

MOV
RTS

1, (RO
PC

BEQ
118:

12$:
13$:

SEQ 0077

%ggz

2392 013310

’

MOV
MOV
ASR
ASR
ASR
ASR
SWAB
BIC
CMP
BEQ

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

TOPS

PA:<

13§

12(SP) ,R1

NIB.SAVE +4,R2
R2
R2
R2
R2
R2
#177770,%2
R2,R1
13§

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

3 words

: NIB.PAT,*

2308

;
;

2310
2210

r—

S—

CIMLAAOD ML-11 LOGIC T EST

HARDWARD TEST SECTION

—

MACRO M1113

S—

23-0CT-80 09:11

PAGE 93
SEQ@ 0078

2615 ;ML4

22=0ct=1980 10:47:44

%2}9 :

22-0ct=1980 10:45:32

2418 ;

2419 ;
2420 ;
2421 ;
2422 ;
2423 ;
2424 ;
2425 ;
2426 ;
2427 ;
2428 ;
2429 ;
2430 ;
24631 ;
2432 ;
2433 ;
2434 ;
2435 ;
2436 ;
2437 ;
2438 ;
2439 ;
2440 ;
2441 ;
2442 ;
2443 ;
2444 ;
2445 ;
2646 ;
2647 ;
244LB ;
2449 ;
2450 ;
2451 ;
2452 ;
2453 ;
2454 ;
2455 ;
2456 ;
2457 ;
2458 ;
2459 ;
2460 ;
2461 ;
2462 ;

2463 ;

2464 ;
2465 ;
2466 ;

2467 ;

2468 ;
2469 ;

TOPS=20 Bliss=16 v2(206)

2314

;

2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
e3e?
2328
. 2329
2330
2331
2332
2333
233
2335
2336
SN
2338
2339
2340
2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358

2359

routine XOR_LNG_WRD (NIB_NUM, NIB_PAT, RESULT)

begin

!4e
! 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

!
!
!
!
!
!
!
!
!

!
2
!
!

: novalue =

CASE SELECT EXPRESSION TO

SELECT THE CURRENT NIBBLE TO BE
EXAMINED
NIB_PAT
CURRENT NIBBLE PATTERN TO BE
XOR'ED

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
!
MLD2 AND MLE2 AFTER A
!
DIAGNOSTIC MODE READ.
!
! IMPLICIT OUTPUTS:
NONE
!'-case .(NIB_NUM)
set

from 0 to 9 of

,
5
!
3

'SELECT THE NIBBLE TO BE XOR'ED

[ol :
.RESULT = _NIB_SAVE [NIB_0] xor .NIB _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

2360
2361
2362

(2] :
. «RESULT = _NIB_SAVE [NIB_2] xor .NIB _PAT;

2364
2365

[3]

2363

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

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

j
'
,

—

CZMLAAD ML-11 LOGIC T EST

—

MACRO M1113

HARDWARD TEST SECTION

———————————————————

23-0CT-80 09:11

B 7
PAGE 94

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

2471 ;MLG
%2;% :

4674 ;

%2;2 3

%%2;

2366

LRESULT = .NIB_SAVE [NIB_3] xor .NIB_PAT;

2477 ;
2478 ;

2369
2370

(4] :
LRESULT = .NIB_SAVE [NIB_4] xor .NIB_PAT;

2481 ;
24LB2 ;

2373
2374

£s] :
LRESULT = .NIB_SAVE [NIB_5] xor .NIB PAT;

24LBS ;
2486 ;

2377
2378

(6] :
LRESULT = .NIB_SAVE [NIB_6] xor .NIB_PAT;

2489 ;
2490 ;

2381
2382

(73 :
LRESULT = .NIB_SAVE [NIB_7] xor .NIB_PAT;

2493 ;
2494

2385
2386

(8] :
LRESULT = .NIB_SAVE [NIB_8] xor .NIB PAT;

2496 :
2L97 ;
2498 ;

2388
2389
2390

(9] :

2500 ;
2501 ;
2502 ;

2392
2393
2394

%2;3 :

%zgz }
%zgg 3

5235 :
2495 ;

2499 ;

2506

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

IXOR NIBBLE § AND STORE RESULTS IN THE ADRS CONTAINED IN .RESULTS

%g;g

2387

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

LRESULT = .NIB_SAVE [NIB_9] xor .NIB_PAT

2391

end;

016600

000020

2515 013374
2516 013376

006300
066007

2518 013404
2519 013406
2520 013410
2521 013412
2522 013414
2523 013416
2524 013420

000036
000062
000070
000076
000120
000136
000144

2517 013402

2525
gggg

2528 013422
2529 013424

000024

000162
000176

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

tes;

170460
000016

016602

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

gggz

2511 013354 004167
2512 013360 016601

2514 013370

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

%ggg

2513 013364

SEQ 0079

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

%g;;

2510 013354

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

XOR.LNG.WRD:

000014

013402

JSR
MOV

R1,$SAVE4
16(SP) ,R1

MOV

20(sP) ,RO

MOV

1$%:

;ML
:

14(SP) ,R2

ASL
ADD

RO
1$(RO) ,PC

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

3%-1%
4%-1%
5%-1%
6%-1%
8%-1%
9%-1%
10%-1%

.WORD

.WORD
WORD

:
: NIB.PAT,*

2314
2354

: NIB.NUM,+

2350

; RESULT,*

2%-1%

12%-1%
15%-1%

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

TOPS
PA:<

2530 013426 016712

174262

28:

MOV

NIB.SAVE, (R2)

2354

2533 013440 016703

174250

3%:

MOV

NIB.SAVE R}

2358

2531 013432
2532 013436

042712
000472

177760

BIC
BR

#177760, (R2)
17%

MACRO M1113

CIZMLAAOD ML-11 LOG

HARDWARD TEST SEC

2534 013444
2535 013446
2536 013450
2537 013452
2538 013454
2539 013460
2540 013462
2541 013464
2542 013470
2543 013472
2544 013476
2545 013500
2546 013504
2547 013510
2548 013512
2549 013514
2550 013516
2551 013520
2552 013522
2553 013526
2554 013530
2555 013532
2556 013534
2557 013536
2558 013540
2559 013544
2560 0712546
2561 013552
2562 013554
2563 013556
2564 013560

177760
4s:

174216

5%:

174212
177760

6$:
7%:

ASR
ASR
ASR
ASR
BIC
MOV
BR
MoV
BR
MOV
BR
MoV
BIC
MOV
BIC

BIC
BIS

010412
010103
041203

040112
050312
000207

118:

174130

12%:

177760

148

174114

15%:

177770

16%:
17%:

sMLG

ASR
BR

MOV

MoV
ASR
ASR
ASR
ASR
BR
MOV
SWAB

BIC
BR

MOV

ASR
ASR
ASR
ASR
SWAB
BIC
MOV
MoV
BIC

— e

174144

9%:

RTS
MoV
ASR
ASR
ASR

wvuneoe

174152

8%:

174170

2565 013562

2566 013564
2567 013570
2568 013572
2569 013576
2570 013600
2571 013604
2572 013606
2573 013610
2574 013612
2575 013614
2576 013616
2577 013622
2578 013624
2579 013626
2580
2581
2582
2583 013630
2584 013632
2585 013634
2590
2591

174224

23-0CT-80 09:11

c 7
PAGE 94-1

SEQ 0080

R3
R3
R3
R3
#177760,R3
R3,(R2)
7%

,R4
NIB.SAVE

2362

?{g.savs,aa

2366

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

2370

13%

(R2) ,R&

R1, (R2)
R& . (R2)

2350
2374

R4
NIB.SAVE+2
R4

14%
NIB.SAVE+2,Ré4
13%
R4
NIB.SAVE+2
R4
R4

2378

2382

R4
R&

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

2386

2390

#177770,R4
R4, (R2)
R1.R3

(R2) ,R3

22-0ct-198
22-0ct-198

TOPS
PA:<

2314

MACRO M1113

'HARDWARD TEST SECTION

23-0CT-80 09:11

0D 7
PAGE 95

2593 :ML4

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

%ggg 3
2596 ;

2395

routine LD_LNG_WRD (NIB_NUM, NIB_PAT)

2598
2599
2600
2601

;
;
;
;

2397
2398
2399
2400

!¢+
! FUNCTIONAL DESCRIPTION:
!
LOADS 'NIB_SAVE' WITH UNIQUE

2603
2604
2605
2606

;
;
;
;

2602
2403
2404
2405

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

2608 ;

2607

2597

2396

2602 ;

2401

2406

2607 ;

2609 ;
2610 ;
2611 ;

2408
26409
2610

2612 ;

2611

begin

NIBBLE PATTERNS PRIOR TO WRITING

NIB_NUM

!
!
!

THE CURRENT NIBBLE TO BE LOADED

CASE SELECT EXPRESSION TO SELECT

NIB_PAT

CURRENT NIBBLE PATTERN TO BE

2612
2413
2614
24)s

!
!
!
!

2618
2619
2620
2621
2622
2623
2624
2025

;
;
;
;
;
;
;
;

2617
2618
2419
2620
2621
2622
24623
2424

!
THE DATA TO BE WRITTEN
!
INTO MLD1 MLD2 MLE2
!
! IMPLICIT OUTPUTS:
!
NIB_SAVE IS LOADED WIH
THE "CURRENT NIBBLE PATTERN
!
'--

2627 ;
2628 ;
2629 ;

2426
2427
2428

2617 ;

2616

2626 ;

2425

2429

2630 ;

LOADED

IMPLICIT INPUTS:
NIB_SAVE

BLOTK OF 3 WORDS TO STORE

case .(NIB_NUM) from 0 to 9 of
set

[0l :

NIB_SAVE [NIB_0] = .NIB_PAT;

2631 ;
2632 ;

2430
2431

(1) :

2634 ;
2635 ;

2433
2434

(2] ¢

2436
2437

(3] :

2439
2440

[4] :

2643 ;
2644 ;

2442
2443

[(s] :

2646 ;

2445

2432

2633 ;

2435

2636 ;

2637 ;
2638 ;

2438

2639 ;

2640 ;
2641 ;

2441

2642 ;

2444

2645 ;

2446

2647 ;

———

TOPS=20 Bliss=16 v2(206)

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

: novalue =

2613
2614 ;
2615 ;
2616 ;

—_——
e
—_—

SEQ 0081

NIB_SAVE [NIB_1]) = .NIB_PAT;

NIB_SAVE [NIB_2] = .NIB_PAT;

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

NIB_SAVE [NIB_5] = .NIB_PAT;

[6] :

'SELECT THE NIBBLE LOCATION IN NIB_SAVE TO BE LOADED

'LOAD NIBBLE 0 WITH NIB_PAT
'LOAD NIBBLE 1 WITH NIB_PAT

'LOAD NIBBLE 2 WITH KIB_PAT

'LOAD NIBRBLE 3 WITn NIB_PAT
'LOAD NIBBLE & WITH NIB_PAT

'LOAD NIBBLE 5 WITH NiB_PAT
Y

CIZMLAAD ML=-11 LOGIC T EST

'CZMLAAO ML-11 LOGI c1 EST

MACRO M1113

(HARDWARD TEST SECT ION

23-0CT-80 09:11

PAGE 96

(7]

(8l

SEQ 0082

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

sMLG
2650 ;

(9]
tes;

2459

2672 013636
2673 013636
2674 013640
2675 013644
2676 013650
2677 013652
2678 013656
2679 013660
2680 013662
2681 013664
2682 013666
2683 013670
2684 013672
2685 013674
2686 013676
2087 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

010146
016600
016601
006301
066107
000024
000040
000064
000102
000134
000150
000174
000212
000244

000262
042700
142767
000433
006300
006300
006300
006300
042700

142767

000421
000300
042700
042767
000412
000300

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

NIB_SAVE [NIB_6]

NIB_PAT;

'LOAD NIBBLE 6 WITH NIB_PAT

NIB_SAVE [NIB_7]

NIB_PAT;

'LOAD NIBBLE 7 WITH NIB_PAT

NIB_SAVE [NIB_8]

.NIB_PAT;

'LOAD NIBBLE 8 WITH NIB_PAT

NIB_SAVE [NIB_9]

NIB_PAT

'LOAD NIBBLE 9 WITH NIB_PAT

end;

LD.LNG.WRD:

000004
000006

013656

177760

000017

17746417
000360
170377

007400

1%:

174000

MOV
MOV
MOV
ASL
ADD
.WORD

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

2%:

BIC

3%:

ASL

173754
4%:

173736

5%:

BICB
BR
ASL
ASL
ASL

BIC
BICB
BR
SWAB
BIC
BIC
BR
SWAB

1
(SP)
R1,
4(S
( P ),RO
( P )LR1
6(S

R1
$( R1),PC
2 $- $
3 $- 1 $
1
48-1%

. NIB.PAT,*

; NIB.NUM,
¢+

2395
2429
2425

5%-1%
7%-1%
8%-1%
9%-1%

108-1%
12%-1%

138-1%
#177760,R0

2429

217.N18.SAVE

2432
R

#177417,R0
#360,NI1B.SAVE
6%
RO
#170377,R0
#7400,N1B.SAVE
6%
RO

2435

2438

MACRO M1113

CIMLAAD ML=11 LOGIC T EST

HARDWARD TEST SECTION

2704

2707 013762

006300

007777

2713 014004

050067

173704

2715 014012
2716 014016

042700
142767

2718 014026

006300

2712 013776 042767

2714 014010 000467

2719 014030
2720 014032
2721 014034
2722 014036
2723 014042
2724 014050

2725 014052

2726 014054
2727 014060

2728 014066

2729 014070

2730 014072
2731 014074
2732 014076
2733 014100
2734 014102
2735 014106
2736 014114

2737 014120
2738 014122

2739 014124
2740 014130
2741 014136

2742 014140

2743 014142
2744 014144
2745 014146
2746 014150
2747 014152

000433

006300
006300
006300
042700
142767
000421

000300

042700
042767
000412

170000

177760
000017

173710
173672

177417
000360

000423
000300

042700
042767
000412

170377
007400

9%:
173630

108:

007777

170000

173576

170377
007400

173602

107777

2749 014164

050067

173530

g;gg 014172

000207

118$:

ASL

BIC

#170000,N1B.
SAVE

BIS

RO
RO
RO
#7777.R0

RO,NIB.SAVE

15¢

;

ASL

;

2444

SWAB

;

2647

ASL
ASL
ASL
BIC
BICB
BR

BIC
BIC
BR

SWAB

ASL
ASL
ASL
ASL
BIC
BIC
BIS

SWAB

RO
RO
RO
#1776417,R0
#360,NIB.SAVE+2
11%

#170377,R0
#7400 ,NIB.SAVE+2
1%

RO
RO
RO
RO
#7777.R0
#170000,N18.
SAVE +2
RO,NIB.SAVE +2

;

ASL
ASL
ASL
ASL
BIC

RO
RO
RO
RO
#107777,R0

2441

2450

;

;
:

#170377,R0
NIB. SAVE +4
#7400,
148

.
.

2425
2453

2456

+4
#70000,N1B.SAVE

BIS

E
RO,NIB.SAV+4

RTS

MOV

;

15$
RO

BIC
BIC
BR

BIC

2625

#177760,R0
#17.NIB.SAVE+2

138:

158:

TOPS

PA: <

BIC
BICB

128:

14$:

SEQ 0083

22-0ct=1980 10:45:32

BR
SWAB

173562

000300

012601

7%:

173646

000300

006300
006300
006300
006300
042700
042767
050067

6% :

2748 014156 042767 070000 173534
2753
2754

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

8s:

006300
006300
006300
006300
042700

2750 014170

;

MLG

006300
006300
006300
042700

2717 014024

¥
£
PAGE 97

;

%_7,82
2708 013764
2709 013766
2710 013770
2711 013772

23-0CT-80 09:11

(SP)+,R1

: Routine Size: 111 words
: Maximum stack depth per inyocation:

;
2 words

2395

MACRO M1113

CZMLAAD ML=11 L 0GIC T EST

'HARDWARD TEST § ECTION

23-0CT-80 09:11

PAGE 98

SEQ 0084

TOPS-20 Bliss=16 v2(206)-

2760 ;ML4
;

TR T

)

;
;
;
;
;
;
;

E TR

ETE TE TE TE

~
W

N
~

2762
2763
2764
2765
2766
2767
2768
2769

n
~

|
|

2761

PA:<NEALE>BLZML4.BLI.2

2787
2791 014174

2792 014200

2799 014224
2800 014230
2801 014234
2802 014236
2803 014242
2804
2805
2806
2811
2812

2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2477
2478
2479
2480
004167
016600

006300
006300

006300
010001
016100
056600
046100
016102
050002
010277
000207

routine WRT_CS1

begi n

(TST_PAT,

index)

(14)

novalue =

s
E FUNCTIONAL DESCRIPTION:

LOADS THE CONTROL & STATUS REGISTER 1 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 7O SELECT THE CURRENT REGISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE MASK INFORMATION.

MLCS1
end;

167606

000010

'LOAD GENERATED WRT_MASK PATTERN INTO MLCS1

= WRT_MASK;

WRT.(CS1:JSR

MoV

ASL
ASL
ASL
MOV
MOV

011702
000012
011704
011706

MOV

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

MOV
RIS

BIS
BIC

BIS

175436

R1,8SAVE?2
10(SP) ,RO

TST.PAT,+

RO,R2

R2,aML.REG

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

;

2460
2479

2460

'CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

2522
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532

: novalue =

FUNCTIONAL DESCRIPTION:

COMPARES THE CONTENTS OF THE
CONTROL & STATUS REGISTER 1

IF THE COMPARE IS NOT EQUAL THEN
THE FORMAL PARAMETER 'ERR FLG' IS

eggégnso A ONE TO INDICATE THE
FORMAL PARAMETERS:

TST _PAT

INDEX

e e S e

DATA PATTERN TO BE MASKED AND

GENERATED BY THE MACRO 'WRT_MASK'

COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST.

2510
2511
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521

index, ERR_FLG)

WITH THE MASKED DATA PATTERN

S =

2846 ;
2847 ;
2848 ;
2849 ;
2850 ;
2851 ;
2852 :
2853 ;
2854 ;
2855 ;
2856 ;
2857 ;
2858 ;
2859 ;
2860 ;
2861 ;
2862 ;
2863 ;
2864 ;
2865 ;
2866 ;
2867 ;
2868 ;

2509

284S ;

(TST_PAT,

l44¢

. -

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

2483

24LB4
2485
2LB6
24LB7
2488
2489
2490
2491
2492
2493
2494
2495
2496
2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507
2508

;
;
;

2820
2821
2822
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832
2833
2834
2835
2836
2837
2838
2839
2840
2841
2842
2843
2844

2LB2

2819 ;

routine RD_CS1
begin

i
{

2481

2818

_E
PAGE 99

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

2814 ;ML4
2815 ;
2816
2817 ;

. o

.
|
|
|

23-0CT-80 09:11

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

THE ROUTINE CALL.

IMPLICIT INPUTS:
WT_DATA

GETS LOADED WITH THE GENERATED

WRT_MASK DATA PATTERN THUS ALLOWING

CALCER TO PRINT FAILING GOOD DATA.

RL DATA

GETS LOADED WITH DATA READ FROM THE

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

AND BAD REGISTER DATA

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

MACRO M1113

CIZMLAAD ML-11 LOGI C TEST

'HARDWARD TEST SECT ION

23-0CT-80 09:11

PAGE 100

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

JMLG
R

RD_DATA

2908

2909
2910
2915
2916

WRT MASK;

.MLTS1 or .IGNORE:

.WT_DATA neq .RD_DATA then .ERR_FLG = ONE;

167536
000010
000012

RD.CS1:

JSR
CLR
MOV

ASL
ASL
ASL

MOV
MOV

BIS
BIC

010267

026767
001403
012776
000207

MOV
BIS
MOV
MOV

'READ THE REG FCR WRT_MASK

!SET ERROR FLAG IF NEQ

end;

010267
017702
056102

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

'CLEAR ERROR FLAG
I SAVE THE DATA WR'TTEN TO THE REGISTER
'READ AND SAVE THE REGISTER

.ERR_FLG = ZERO;

WT_DATA

TR LRI TE
°°°°°°°°°°°°°°°°°

5 014340
2906 014342
2907 014350

SEQ 0086

332

175332

000001

000010

BIS
MOV
CMP
BEQ
MOV
RTS

R1,$SAVE2

@10(SP)
12(SP) ,RO

;

RO
RO
v
RO
RO,RT ML.REG+2(R1)
,RO
14(SP) RO
ML.REG+4(R1)
,RO
ML.REG+6(R1)
,R2
RO, R2
R2,WT.DATA

;

ERR.FLG
INDEX,*

TST.PAT,+

2535

aML
. 7€G,R2
ML.REG+6(R1)
,R2

R2,RD.DATA
?;.DATA.RD.DATA

2537
;

#1,310(SP)
PC

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

2481
2533
2534

3 words

*,ERR.FLG

2481

CZMLAAD ML=11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION

;

23-0CT=-80 09:11

2918 ;ML4

22-0ct=1980 10:45:32

2541
2542

routine WRT_ER (TST_PAT, index)
begin

2924 ;
2925 ;
2926 ;

2544
2545
2546

%g:g

'4e
! FUNCTIONAL DESCRIPTION:
!

;

2929 ;
2930 ;
2931 ;

2549
2550
2551

! FORMAL PARAMETERS:
!
TST_PAT
!

2933 ;
2934 ;

2553
2554

!
!

2923 ;

%3% 3

2932 ;

2935 ;

2936 ;

2937 ;
2938 ;

2939 ;
3822 3

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

%gg? 014420
2962
Sggg

SEQ 0087

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

%g}g :

L2921 ;
2922
%

7
d
PAGE 101

2543

2552
2555

2556

2557
2558

2559
2560

004167
016600

006300
006300
006300
010001
016100
056600
046100
016102
050002
010277

000207

TOPS=20 Bliss=16 v2(206)

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

: novalue =

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

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.

MLER = WRT_MASK;
end;

167430
000010

011702
000012
011704
011706
175340

'LOAD GENERATE WRT_MASK PATTERN INTO MLER

WRT.ER: JSR
MOV

ASL
ASL
ASL
MOV
MOV
BIS
BIC
MOV
BIS
MOV

RTS

R1,$SAVE2
10(sP),RO

3
s INDEX,*

RO
RO
RO
RO,R1
ML.REG+2(R1)
,R0O
12(SP) RO
ML.REG+4(R1)
RO
ML.REG+6(R1)
,R2
RO,R2
R2,3ML.REG+60

: TST.PAT,«

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

2541
2559

3 words

2541

CIMLAAO ML=-11 LOGIC T EST

MACRO M1113

;HARDUARD TEST SECTION

2971 MG
%g;% 3

23-0CT-80 09:11

K 7
PAGE 102

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

2974 ;

2561

routine RD_ER (TST_PAT, index, ERR_FLG)

2976
2977
2978
2979
2980
2981
2982
2983
2984
2985
2986

:
;
;
;
;
;
:
;
;
;
;

2563
2564
2565
2566
2567
2568
2569
2570
2571
2572
2573

'+¢
' FUNCTIONAL DESCRIPTION:
!
!
COMPARES THE CONTENTS OF THE
!
ERROR 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

2988
2989
2990
2991
2992

;
;
;
;
:

2575
2576
2577
2578
2579

!
ERROR.
!
' FORMAL PARAMETERS:
!
!
TST_PAT

2994
2995
2996
2997
2998

;
:
;
;
:

2581
2582
2583
2584
2585

3000 ;
3001 ;

2587
2588

3003 ;

2590

2975 ;

2987 ;

2993

2999 ;
3002 ;

3004 ;
3005
3006
3007
3008
3009
3010

;
;
;
;
;
;

3011 ;
3012 ;

3013 ;

3014 ;
3015 ;

3016 ;
3017
3018
3019
3020
3021
3022

;
;
;
:
;
.

3023 ;

3024 ;
3025 ;

2562

2574

2580

2586

2589

begin

ASSIGNED A ONE TO INDICATE THE

DATA PATTERN TO BE MASKED AND

!
!
!
!
!

!
!
!
!

: novalue =

COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST.

INDEX
USED BY THE MACRO WRT MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,

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

CONTAINS THE ADDRESS (PASSED BY REF)

2591

2598

GETS LOADED WITH THE GENERATED

CALCER TO PRINT FAILING GOOD DATA.

2592
2593
2594
2595
2596
2597

2599

2600
2601
2602

!
OF THE CALLERS ERROR FLG TO ENABLE THE
!
CALLER TO EXAMINE THE ERROR STATUS
!
OF THE ROUTINE CALL.
!
! IMPLICIT INPUTS:
WT_DATA
!
!

!
!

2603- !

WRT MASK DATA PATTERN THUS ALLOWING
RD DATA

GETS LOADED WITH DATA READ FROM THE

REGISTER THUS ALLOWING CALLER
2604 !
TO PRINT FAILING BAD DATA.
2605 *4
2606 !
' IMPLICIT OUTPUTS:
2607
GLOBAL LOCATION WR_DATA
2608 !
AND RD DATA LOADED WITH GOOD
!
2609

2610
2611
2612

!
!--

AND BAD REGISTER DATA

SEQ 0088

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

MACRO M1113

'CZMLAAD ML-11 LOGI C TEST
'HARDWARD TEST SECT ION

23-0CT-80 09:11

PAGE 103

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

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

'CLEAR THE ERROR FLAG

ERR_FLG = 4 ERO;

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

WT_DATA = WR T _MASK;
RD_DATA = .MLER or .IGNORE;

it .WT_DATA neq .RD_DATA then

.ERR_FLG = ONE;

'READ THE REG FOR WRT_MASK

d e

~NOWVNES W

oooororOrOrOMON

!SET ERROR FLAG IF NEQ

end;

167360
000010

RD.ER:

000012

JSR

CLR

MOV
ASL
ASL
ASL
MOV
MOV

’

BIS
BIC
MOV
BIS
MOV
MOV

BIS

175162
175154

175154

000001

000010

MOV

CMP
BEQ
MOV
RTS

; Routine Size:

R1,$SAVE2
@10(SP)
12(SP) RO

ERR.FLG
*
INDEX,

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

;

14(SP) ,RO
ML.REG*+4(R1)
,RO

2616
2618

* ,ERR.FLG

#1,310(SP)
PC

35 words

invocation:

2561
2614
2615

TST.PAT,«

ML.REG+6(R1)
,R2
RO,R2
R2,WT.DATA
aML.REG+60,R2
ML.REG+6(R1)
,R2
R2,RD.DATA
*I.DATA,RD.DATA

; Maximum stack depth per

TR
IR IR IR
-

v
o
W
oo

W
o
W
&»

3027 ;MLL
3028 ;

3046 014422
3047 014426
3048 014432
3049 014436
3050 014440
3051 014442
3052 014444
3053 014446
3054 014452
3055 014456
3056 014462
3057 014466
3058 014470
3059 014474
3060 014500
3061 014504
3062 014510
3063 014516
3064 014520
3065 014526
3066
3067
3068
3073
3074

SEQ 0089

3 words

2561

0GI
TEST
'CZMLAAD ML-11 LOGIC
HARDWARD TEST SECTI
ECTION

MACRO M1113

23-0CT-80 09:11

L4
PAGE 104

3076 ;ML&

22=0ct=1980 10:47:44

3080
3081
3082
3083
3084

;
;
;
;
;

2622

2623
2624
2625
2626
2627

routine WRT_DA (TST_PAT,

LOADS THE DESIRED SECTOR WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK

3087 ;
3088 ;
3089 ;

2630
2631
2632

' fORMAL PARAMETERS:
|
TST_PAT
|

3091 ;
3092 ;

2634
2635

!
|

2637

‘

3093 ;

3094 ;

3095 ;
3096 ;

3097 ;

?933 3

2636

2638
2639

2640
2641

3106 014530
3107 014534

004167
016600

3111, 014546
3112 014550

010001
016100

3108 014540
3109 014542
3110 014544

3113 014554

006300
006300
006300

056600

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.

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

INDEX

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

MLDA = WRT_MASK;

%}}g 014576
3120
g}gl
3127

016102
050002
010277

000207

'LOAD MLDA WITH GENERATED WRT_MASK PATTERN

end;

167252
000010

011702
000012

3114 014560 046100 011704

3115 014564
3116 014570
3117 014572

: novalue =

!4+
! FUNCTINNAL DESCRIPTION:
|

%g%g

2633

index)

begin

%ggz H

3090 ;

T0PS=20 Bliss=16 v2(206)

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

22-0ct=1980 10:45:32

%8;; :
3079 ;

SEQ 0090

011706
175132

WRT.DA: JSR
MOV
ASL
ASL
ASL

R1,$SAVE2
10(sP) RO

3
s INDEX,*

RO
RO
RO

[[0)'}
MOV

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

BIC

ML.REG*4 (R1) ,RO

RTS

BIS

MOV
BIS
MOV

12(SP),RO

‘

; TST.PAT,+

ML.REG+6(R1)
,R2
RO,R2
N
R2,3ML .REG+30 .

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

2622
2640

3 words

2622

———

———————————————

[CZMLAAQ ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

SIS

23-0C7-80 09:11

FO Y
PAGE 105

22'8ct-1980 10:47:
22=0ct=1980 10:45:
routine RD_DA (TST_PAT,
begin

index, ERR_FLG)

novalue

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

eggégnso A ONE TO INDICATE THE

Rl LY LW Lo L

i e e e

LW W L L

D i e

D i i

D e

i e

) i

D D i o

D e

D o

D i

LY LV LV LV LV o W TV IV VW LV LV T TV T T

D D

D e o

D e

D D e

TP T [V T TV TV T TR T

OO NNNNNNNNNNOOOOOOOOOO\VNWVWVIWVIWVIWVIWIWWIWN
LSS BN BN IS 0 2 5N 0 0 S NN
WG N W
W= OOV NOWVMSWN<LOOVONOWVNSWN
=0V NO WV WN=O VNV WN = OO0 NN NS NN —

3129 H, T
3130 ;

SEQ 0091

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

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

—

HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE 106

RD_DATA = .MLDA or .IGNORE;

'READ AND SAVE THE REGISTER

=
L]

ISAVE THE DATA WRITTEN TO THE REGISTER

3209 014622
3210 014624
3211 014630
3212 014634
3213 014640
3214 014644
3215 014646
3216 014652
3217 014656
3218 014662
3219 014666
3220 014674
3221 014676
3222 014704

end;

167202

RD.DA:

000010
000012

JSR

R1,$SAVE?2

MOV

12(SP) ,RO

: INDEX,*

CLR

ASL
ASL
ASL
MOV

011702
000014
011704
011706

17264776

174776

000001

000010

MOV
BIS
MOV

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

BEQ

MOV
RTS

; Routine Size:

: ERR.FLG

RO
RO
RO
RO,R1

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

CMP

1%:

a10(sm

MOV
BIS
BIC
MOV

BIS
MOV

175016

175052
011706
175004

'READ THE REG FOR WRT_MASK

'SET ERROR FLAG IF NEQ

— e d s

WWWN NN

'CLEAR THE ERROR FLAG

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

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

RO,R2
R2,WT.DATA

2696

*I.DATA.RD.DATA

#1,310(SP)

: *,ERR.FLG

35 words

2642
2694
2695

: TST.PAT,*

: Maximum stack depth per invocation:

SR
LTOT e S|

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

.ERR_FLG
= ZERO;

wT_DATA = WRT MASK ;

3195 ;
3203 014600
3204 014604
3205 014610
3206 014614
3207 014616

SEQ 0092

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

3185 ML4
3186 ;

MACRO M1113

3 words

2698

2642

CIMLAAD ML-11 LOGIC TEST

—————

—

CIMLAAO ML=-11 LOGIC TEST

MACRO M1113

HARDUARD TEST SECTION

23-0CT-80 09:11

c 8
PAGE 107

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

3233 ;ML4
3234 ;
(TST_PAT,

index)

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

novalue =

routine WRT_MR
begin

SEQ 0093

T
L

FORMAL PARAMETERS:

TST_PAT

|
i

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

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.

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

HL:R = WRT_MASK;

—

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

TR TR TRLI

FUNCTIONAL DESCRIPTION:

Fo
o

l44

'LOAD MLMR WITH GENERATED WRT_MASK PATTERN

end,

3264
3265 014716
3266 014720
3267 014722
3268 014724
3269 014726
3270 014732

3¢71 014736
3272 014742
3273 014746
3274 014750
3275 014754
3276
3277
3278
3283
3284

——————————————

167074
000010

WRT.MR: JSR
MOV

011702
000012
011704

050002

010277

000207

011706
175044

R1,$SAVE2
10(SP) ,RO

3
;

INDEX,*

MOV
BIS

ML.REG+2(R1)
RO
12(SP) RO

;

TST.PAT,*

MOV
BIS

ML.REG*6(R1)
,R2
RO,R2

ASL
ASL
ASL
MOV

BIC

MOV

RTS

RO
RO
RO
RO,R1

ML.REG+4(R1)
RO

R2,aML.REG+120

;
20 words )
; Routine Size:
on:
invocati
per
depth
; Maximum stack

3
3 words

2702
2720

2702

| CIMLAAD ML-11 ng l c1 EST
1 ION
HARDWARD TEST §

MACRO M1113

23-0CT-80 09:11

D 8
PAGE 108

3286 ;ML4

22-0ct=1980 10:47:44

g%g; 3

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

3591 :

5754

g%gz :

%;%g

; FUNCTIONAL DESCRIPTION:

3295 :

2728

gggg ;

g;g;

;

3292 :

3296 :
3297 :

2725

2729
2730

egin

!4+

2733

ggg% ;

g;gz

;

3304 :

2734

%;gg

2737

3307 ;

2740

3309

2762

3308 ;
gg}g ;

2741

5;22

2747

;

FORMAL PARAMETERS:

TST_PAT

OF THE RFGISTER UNDER TEST.

3314

2748
5;28

eggégneo A ONE TO INDICATE THE

;

3315
gg}g 3

IF THE COMPARE IS NOT EGUAL THEN

THE FORMAL PARAMETER 'ERR FLG'

DATK PATTERN TO BE MASKED AND

2745

2746

GENERATED BY THE MACRO 'WRT_MASK'.

3312 :
3313 .

MAINTENANCE REGISTER WITH THE
MASKED DATA PATTERN

gggg ;

COMPARES THE CONTENTS OF THE

|
!

3300 :
3301

: novalue =

rout;ne_RD_HR (TST_PAT, index, ERR_FLG)

%%38 S

COMPARED AGAINST THE CONTENTS

INDEX

USED BY THE MACRO WRT MASK TO

!
;

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

SELECT THE CURRENT REGISTERS ADDRESS,

33518 :

2751

ERR FLG

3320 :
3321 ;

2753
2754

!
!

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

3319 .

2752

CONTAINS THE ADDRESS (PASSED BY REF)

OF THE ROUTINE CALL.

gg%g :

g;gz

;

3326 -

2759

BETS LOADED WITH THE GENERATED

gggg 3

%;g}

;

CALCER TO PRINT FAILING GOOD DATA.

3327 :

2760

3330 :

2763

3332 .
gggz :

2765
g;gg

!
:

3331 ;

2764

WRT MASK DATA PATTERN THUS ALLOWING

RD DATA

GETS LOADED WITH DATA READ FROM THE

3335 :

2768

i IMPLICIT OUTPUTS:

g;gg :

g;;}

3340

2773

3334
31337 .

2769
2770

!
!

i--

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 (21)

SEQ 0094

CIMLAAD ML-11 LOGIC TEST
:HARDUARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

PAGE 109

3342 ;MLG

ggzz 3

3345 ;

3346 ;

2347 ;
ggzg 3

SEQ 0095

22-0ct=1980 10:47:44

2774

2775

22-0ct=1980 10:45:32
.ERR _FLG = ZERO;

UT-DITA = WRT MASK;
RD_DATA = .MLPR or .IGNORE;

%gg? :

%;gg

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

3352
g%g} :

2781
2782

end;

0041567

167024

3363 014766

016600

000012

3367 015000

3368 015002
3369 015006
3370 015012

3371 015016

3372 015022
3373 015024

006300
006300
006300

010001

01610Q
056600
046100

016102

050002
010267

3374 015030

017702

3377 015044

026767

3379 015054

012776

375 015034
376 015040

3378 015052

ggg? 015062
3382
;ggg

056102
010267

001403

000207

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

'READ THE REG FOR WRT_MASK

'SET ERROR FLAG IF NEQ

RD.MR:

3362 014762 005076 000010

3364 014772
3365 014774
3366 014776

'CLEAR THE ERROR FLAG

2776
%;;;

3361 014756

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML&4.BL1.2 (21)

JSR

R1,$SAVE2

2722

MoV

12(SP) ,RO

: INDEX,*

2776

CLR

ASL
ASL
ASL

[ [0]"

011702
000014
011704

310(sP)
RO
RO
RO

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

174640

BIS
MOV

RO,R2
R2,WT.DATA

011706
174626

BIS
MOV

[ [0]"

174764

MOV

174620

000001

000010

; TST.PAT,«

ML.REG+6(R1)
,R2

aML.REG+120,R2

2777

CMP

WT.DATA,RD.DATA

2779

MOV

#1,310(SP)

: *,ERR.FLG

BEQ

1%:

2775

RO,R1

MOV
BIS
BIC

011706

: ERR.FLG

RTS

ML.REG*+6(R1),R?
R2,RD.DATA

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

2722

:
3 words

3389

CIMLAAD ML-11 LOGIC 1 EST

HARDWARD TEST

3391

;MLS

3394
3395
3396
3397
3398
3399
3400
3401

;

MACRO M1113

SECTION

23-0CT-80 09:11

fF
8
PAGE 110

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

%%3% :
L
‘

‘

22-0ct=1980 10:45:32

;
;
;
:
;
;

2783
2784
2785
2786
2787
2788
2789
2790

routine WRT_PA (TST_PAT,
begin

3604 ;

279%

3406 ;

2795

3402 ;
3403 ;

3405 ;

2791
2792

2794

3407 ;

2796

gz:; 3

2800

3408 ;
3409 ;
3410 ;

2797
2798
2799

3419 015064

004167

3421 015076
3422 015102
3423 015104
34264 015106
3425 015110
3426 015112
3427 015116

016600
006300
006300
006300
010001
016100
056600

3429 015126
3430 015132
3431 015134

016102
050002
010277

3420 015070

3428 015122

3432 015140
gzgz 015146
3435
g:z?

3442

SEQ 0096

152777

046100

142777
000207

index)

TOPS=20 Bliss=16 v2(206)

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

: novalue =

!++
' EUNCTIONAL DESCRIPTION:
!
LOADS THE PROM ADDRESS REGISTER WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK
! FORMAL PARAMETEPRS:
!
TST _PAT

!
!

CURRENT DATA PATTERN TO BE LOADED IN THE REGISTER.
INDE
X

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

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

PROM_DIS = ONE;
MLPA = WRT_MASK;
PROM_DIS = ZERO;

'SET PROM DISABLE BIT
'LOAD MLPA WITH GENERATED WRT_MASK PATTERN
'CLEAR PROM DISABLE BIT

end;

166716

000040

000010

174722

WRT.PA: JSR

011702
000012
011704
011706

174640
000040

R1,$SAVE2

MOV
ASL
ASL
ASL
MOV
MOV
BIS

10(SP) ,RO
RO
RO
RO
RO,R1
ML.REG+2(R1),RO
12(SP),RO

INDEX,*

TST.PAT,»

MOV
BIS
MOV

ML.REG+6(R1)
,R2
RO,R2
R2,aML.REG+100

BISB

BIC

174652

BI(B
RTS
;
;

046.8HL.REG0120

ML.REG+4(RY)
RO

#40,3ML .REG+120
PC

Routine Size:
26 words
.
Maximum stack depth per invocation:

}
3
3 words

278%

2797

2798

2799
2783

routine RD_PA

D ol
b
b
i
s
)
ad o

00 Co Co OO Co Co Co Co OO Co OO

R
R R
R
N
N
N
L U
O
L
L
A R D

111

(TST_PAT,

index,

ERR_FLG)

i
i
i
i
i
i
i
i
i
i
i~
i
i
i
i
i

COMPARES THE CONTENTS OF

#ROM ADDRESS REGISTER

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

gggégneo 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

SELECT THE CURRENT REGISTERS ADDRESS.

FORCED HI, FORCED LO AND DCN'T CARE

MASK

INFORMAT ION.

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.

;

O T T P O D D

;

IMPLICIT INPUTS:
WT _DATA

GETS LOADED WITH THE GENERATED

;

WRT MASK DATA PATTERN THUS ALLOWING

;

CALCER TO PRINT FAILING GOOD DATA.

;

RD DATA

;

novalue

FUNCTIONAL PESCRIPTION:

R
L R

PAGE

le4

;

AT E T E T E T E

3487
3488
3489
3490

begin

;

3476
3477
3478
3479
3480
3481
3482
3483
3484
3485
3486

I PRTR TR

3475

23-0CT-80 09:11

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

3444 ;MLG
3445 ;
3446
3447
3448
3449
3450
3451
3452
3453
3454
3455
3456
3457
3458
3459
3460
3461
34662
3463
3464
3465
3466
3467
3468
3469
3470
347
3472
3473
3474

MACRO M1113

—

CIZMLAAD ML-11 L 06 l
HARDWARD TEST S EC 1

GETS LOADED WITH DATA READ FROM THE

|
|

!
:
:

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA

;
.--

AND RD_DATA LOADED WITH GOOD

AND BAD REGISTER DATA

CIMLAAD ML=-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

H 8
PAGE 112

3500 ;ML4
%gg% 3

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

3503 ;

2853

%289 :

%ggg

3504
3505 ;

SEQ 0098

ERR_FLG = ZERO;

'CLEAR THE ERROR FLAG

RD_DATA = .MLPA or .IGNORE;

'READ AND SAVE THE REGISTER

2854
2855

PROMTMDIS = ONE;
WT_DATA = WRT_MASK;

%ggg :

gggg

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

3510 ;

2860

PROM_DIS = ZERO;

%2}} 3

2861

004167

3521 015160
3522 015166
3523 015172
3524 015174
3525 015176
3526 015200
3527 015202
2528 015206
3529 015212
3530 015216
3531 015222
3532 015224
3533 015230
3534 015234
3535 015240
3536 015244

152777
016600
006300
006300
006300
010001
016100
056600
046100
016102
050002
010267
017702
056102
010267
026767

011702
000014
011704
0311706
174440
174544
011706
174426
174420

174420

3538 015254

012776

000001

000010

%22? 015270

000207

3537 015252

3539 015262
3542

ggl‘.g

005076

001403

142777

'SET THE PROM DISABLE BIT
'SAVE THE DATA WRITTEN TO THE REGISTER

166632

000010
000040
000012

000040

RD.PA:
174632

174530

'CLEAR THE PROM DISABLE BIT
JSR

R1,$SAVE2

BISB
MOV
ASL
ASL
ASL
MOV
MOV
BIS
BIC
MOV
BIS
MOV
MOV
BIS
MOY
CMP

#40,3ML.REG+120
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?
RO,RZ
R2,WT.DATA
oML .REG+100,R2
ML.REG+6(R1)
,R2
R2,RD.DATA
WT.DATA,RD.DATA

;
:

INDEX,*

TST.PAT,«

MOV

#1.,310(SP)

;

RTS

CLR

8EQ

1%:

BICB

; Routine Size:
;

!READ THE REG FOR WRT_MASK

'SET ERROR [F NEQ

end;

3519 01515

3520 015154

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

al10(SP)

: ERR.FLG

146 aML.REG+120
41 words

Maximum stack depth per

invocation:

2853

2854
2855

;

2856

;

2858

;
3 words

2801

*,ERR.FLG

2860

2801

CIMLAAD ML-11

'HARDWARD TEST

LOGIC

MACRO M1113

TEST

SECTION

23-0CT-80 09:11

PAGE 113

sMLG

SEQ 0099

2=0ct=198 0 10:47: 44
2=-0ct=198 0 19:45 :32

3552 .

routine WRT_E1

begi n

(TST_PAT,

index)

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

novalue =

LOADS THE ECC CRC WCRD REG 1 WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK

FUNCTIONAL DESCRIPTION:

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.

TR IR

ECC D M = ONE

3588 0

3589 015334
3590 015340
3591 015342

3592 015346
3593 015354
3594
3595
3596
3601
3602

2878
2879

004167
152777
016600
006300
006300
006300
010001
016100
056600
046100
016102
050002
010277
142777
000207

'SET ECC DIAG MODE
'LOAD MLE1 WITH GENERATED WRT_MASK PATTERN
‘CLEAR ECC DIAG MODE

MLET = WRT M ASK;
ErRO;
ECC_ DM = ZER
end;

166510

000001
000010

174514

WRT.E1:

MOV
ASL
ASL
ASL
MOV
MOV

011702
000012
011704
011706
174502

000001

JSR
B1SB

BIS
BIC

MOV

BIS

MOV

174444

BI(B
RTS

;
;

R1,$SAVE?
#1,3ML.REG+120
10(SP) RO

INDEX,*

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

12(SP) RO
ML.REG+4(R1)
,RO
ML.REG+6(R1)
,R2

;

R2,aML.REG+150

gz.SHL.REGO120

Routine Size:
26 words
Maximum stack depth per

invocation:

2862
2876
2877

TST.PAT,+

2878
2862

3 words

MACRO M1113

CIMLAAD ML-11 LOGIC T EST
'HARDWARD TEST

PAGE 114

8
SEQ 0100
T0PS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (25)

3604 ;ML
.

;

.
.

routine RD_E1
begin

;
;
;
;
;
;
;
;
;
;

l+¢

.
.

.
o

=
=

COMPARES THE CONTENTS OF THE
ECC CRC WORD REGISTER 1
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

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

1
L)

novalue =

.
.

index, ERR_FLG)

(TST_PAT,

! FUNCTIONAL DESCRIPTION:
-

3605
3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
3617
3618
3619

SECTION

23-0CT-80 09:11

SELECT THE CURRENT REGISTERS ADDRESS,

MASK INFORMATION.

L]
.
.

- -

-0

.
.

. -

.
L

RTINS
SR
SRR Iu,

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

MACRO M1113

—

CIMLAAD ML-11 L 06 l
'HARDWARD TEST § EC 1

23-0CT-80 09:11

K 8
PAGE 115

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

CsScasSsnsns
N

ECC_DM = ONE;
WI_BATA = WRT_MASK;
RDCDATA = .MLE1 or .IGNORE;

3681 015366
3682 015374
3683 015400
3684 015402
3685 015404
3686 015406
3687 015410
3688 015414
3689 015420
3690 015424
3691 015430
3692 015432
3693 015436
3694 015442
3695 015446
3696 015452
3697 015460

3098 015462
3699 015470
3700 015476

'CLEAR ECC DIAG MODE
;

end;

152777
016600

006300

166424

000010
000007
000012

RD.E1:

174424

142777
000207

#1,3ML.REG+120
12(SP) RO

:
: INDEX,*

310(sP)

ASL
ASL
ASL
MOV

RO
RO
RO
RO,R1

174232
174406

BIS
MOV
MOV

174220
174212

174212

MOV
ggg

000001
000001

000010
174322

BIS

1%:

R1,$SAVE2

CLR

MOV
BIS
BIC
MOV

011706

012776

JSR

BISB
MOV

011702
000014
011704
011706

'READ THE REG FOR WRT_MASK

'SET ERROR FLAG IF NEQ

ECC_DM = ZERO;

004167
005076

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

'SET ECC DIAG MODE
iSAVE THE DATA WRITTEN TO THE-REGISTER
'READ AND SAVE THE REGISTER

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

—

W
o

N
o~
o

3660 ;MLL
3661 ;

3675
3679 015356
3680 015362

SEQ 0101

MOV
g%ge

ERR.FLG

ML.REG+2(R1),R0
14(SP) RO
ML.REG*+4 (R1),R0
ML.REG+6(R1),R2
RO,R2
R2,WT.DATA
aML .REG+150,R2
ML.REG+6(R1),R2
R2,RD.DATA

2880
2931
2932
2933

; TST.PAT,+

2934

¥;.DA1A.RD.0A1A

2936

#1,310(SP)
gg.anL.aEG0120

: *,ERR.FLG
;

2938

:
: Routine Size: 41 words
: Maximum stack depth per invocation:

3 words

2880

CZMLAAD ML-11 LOGIC

HARDWARD TEST SECT

3711 MLA
3712 ;:
3713
3714
3715
3716
3717
3718
3719
3720
3721
3722
3723
3724
3725
3726
3727

;
;
;
;
;
;
;
;

TEST

MACRO M1113

23-0CT-80 09:11

routine WRT_E2 (TST_PAT, index)
begin

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

2956
2957
2958
2959
2960
2961
2962
2963
2964
2965

!
!
!
!
!
!
!
!
'--

3739 ;

3740 ;

3741 ;
3742 ;
3743 ;

%;23 3

3752 015500
3753 015504

2955

2966

2967

2968
2969
2970
2971

004167
152777

3761 015540
3762 015544
3763 015550
3764 015554

3765

056600
046100
016102
050002

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

ECC_DM = ONE;

'SET ECC DIAG MODE

MLE2 = WRT_MASK;
MLE2 MASK = %0'000000';
ECC_DM = ZERO;

{LOAD MLE2 WITH GENERATED WRT_MASK PATTERN
'RESTORE MLE2_MASK
'CLEAR ECC DIAG MODE

MLEZ_MASK = %0°'177700';

iIMASK OUT DATA DIAG BITS

end;

166302
000001

174306

WRT.E2: JSR
BISB

MOV

ASL
ASL
ASL
MOV
MOV

011702
000012
011704
011706

;ML&

BIS
BIC
MOV
BIS

R1,$SAVE2
#1,aML.REG+120

:
:

10(SP) ,RO

s INDEX,*

#-100,ML .REG*+166
RO
RO
RO
RO,R1
ML.REG+2(R1),R0O

12(SP) ,RO
ML.REG+4 (R1),RO
,R2
ML.REG+6(R1)
RO,R2

010277

MOV

174276

3769 015562 005067 174300
3770 015566 142777 000001
%;;z 015574 000207

174224

CLR
BICB
RTS

R2,aML.REG+160

ML.REG+166
#1,aML.REG:120
PC

;

2941
2966

2967

2968

; TST.PAT,»

TOPS

22-0ct=1980 10:47:44

PA: <

22-0ct=1980 10:45:32

g;gg

3768 015556

SEQ 0102

: novalue =

!
REGISTER 2 WITH A DATA PATTERN
!
GENERATED BY THE MACRO
WRT_MASK
!
!
| FORMAL PARAMETERS:
!
TST_PAT
!

3755 015520 016600 000010
006300
006300
006300
010001
016100

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

!4+
' FUNCTIONAL DESCRIPTION:
!
!
LOADS THE ECC CRC WORD

3754 015512 012767 177700 174346

3756 015524
3757 015526
3758 015530
3759 015532
3760 015534

L 8
PAGE 116

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

2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951
2952
2953
2954

3728 ;
3729
3730
3731
3732
3733
3734
3735
3736
3737
3738

o
= -

—

:
;
-

2969
2970
2941

——

'CIMLAAD ML=11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

LJR.

PAGE 117

22-0ct=1 980 10:47:44
22=0ct=1 980 10:45:32

JMLG
routine RD_E2 (TST_PAT,
begin

index, ERR_FLG)

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

novalue

144

FUNCTIONAL DESCRIPTION:

COMPARES THE CONTENTS OF

THE

ECC CRC WORD REGISTER 2
WITH THE MASKED DATA PATTERN
GENERATED BY THE MACRO 'WRT_MASK'

IF THE COMPARE IS NOT EQUAL THEN
THE FORMAL PARAMETER 'ERR_FLG' IS

gagégNED A ONE TO INDICATE THE
FORMAL PARAMETERS:
TST _PAT

DATA PATTERN TO BE MASKED AND

COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST.

T L T L L

L L T L L L L L L L L

L LA L

SEQ 0103

T L L

INDEX

USED BY THE MACRO WRT _MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,

ERR_FLG

CONTAINS THE ADDRESS (PASSED BY REF)

e
-

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

e
A

e T
e
e
e
s
T
T
R E
R
R
TR IR

INFORMATION.

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

T T

L L

FORCED HI, FORCED LO AND DON'T CARE

MASK

[

CZMLAAO ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

8
SEQ 0104

=0ct=1980 10:447: b
t-1980 10:45: 32

MLE2 HASK i
- o 177700°;

LRI

WT_DATA = WRT_MASK;
RD_DATA
= .MLE2 or .IGNORE;
if

3868 015642
3869 015646
3870 015652
3871 015656

3872-015660

3873 015664
3874 015670
3875 015674
3876 015700
3877 015706
3878 015710
3879 015716
3880 015722
3881 015730
3882
3883
3884

.WT_DATA neq

.RD_DATA then

.ERR_FLG = ONE:

ECC_DM = ZERO;

end;

006300
006300
006300
010001
016100
056600
046100
016102
050002
010267
017702
056102
010267
026767
001403
012776
005067

142777
000207

166204

000010
000001

177700
000012

RD.E2:

174204
174244

011702
000014
011704
011706
174004
174170
011706
173772

JSR

R1,$SAVE2

(IR

a10(sP)

MOV

#-100,
ML .REG+166

ASL
ASL
ASL
MOV

RO
RO
RO
RO,R1

98]
MOV

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+160,R2
ML.REG+6(R1)
,R2
R2,RD.DATA

173764

000001

000010

MOV

#1.,310(SP)

000001

174070

BICB

#1,3ML.REG+120

CLR

RTS

INDEX,*

12(SP) RO

173764

174144

ERRLFLG

#1,3ML.REG+120

MOV
BIS
BIC
MOV
BIS
MOV
MOV
BIS
MOV

ggg

'READ THE REG FOR WRT_MASK

'SET ERROR FLG IF NEQ
'RESTORE MLE2 MASK
'CLEAR ECC DIAG MODE

MLE2 MASK = Xo0'000000°;

004167
005076
152777
012767
016600

TOPS=20 Bliss=16 v2(206)

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

'CLEAR ERROR FLAG
!SET ECC DIAG MODE
'MASK OUT DATA DIAG BITS
'SAVE THE DATA WRITTEN TO THE REGISTER
'READ AND SAVE THE REGISTER

.ERR FLG zeno

ECC DM =

TR IR IR LRI

W
oo
b
»

015576
015602
015606
015614
015622
015626
864 015630
015632
866 015634
015636

—

PAGE 118

JMLS
TR T

3836

23-0CT-80 09:11

: TST.PAT,+"

3029
3031

gl.oAIA.ao.oATA

* ERR.FLG

ML.REG+166
PC

; Routine Size:
&6 words
; Maximum stack depth per invocation:

3 words

3034
3035
2972

—

———e

'CIZMLAAOD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE 119

9
SEQ 0105
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BLI.2 (28)

3890 ;ML4
routine WRT_PD (TST_PAT,

index)

begin

: novalue =

!00

;

FUNCTIONAL DESCRIPTION:

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

'
!
!
;
5

FORMAL PARAMETERS:

TST_PAT

;

LOADED IN THE REGISTER.

CURRENT DATA PATTERN TO BE
INDEX

USED BY THE MACRO WRT_MASK
TO SELECT THE CURRENT REGISTERS
ADDRESS, FORCED HI, FORCED
LO AND DON'T CARE MASK
INFORMAT ION

!
!
!
!
;
foo

!SET PROM READ WRITE
!SET DATA DIAG MODE

PROM RW = ONE;

DAT BM = ONE;
MLPD = WRT _MASK;
DAT CLK = ONE;
PROM RW = ZERO;
DAT_DM = ZERO;

'LOAD MLPD WITH GENERATED WRT_MASK PATTERN
!D0 A DATA CLK
'CLEAR FROM READ WRITE
'CLEAR DATA DIAG MODE

end;

004167
152777
152777

3942

046100

166050

000100 174054
000010
000010

011702
000012
011704

174046

WRT.PD: JSR

BISB

R1,$SAVE2

#100,aML.REG+120

BISB
MOV

#10,3ML.REG+120
10(SP) ,RO

MOV
BIS
BIC

ML.REG+2(R1),R
RO
12(SP)
ML.REG+4(R1),RO

ASL
ASL
ASL
MOV

RO
RO
RO
RO,R1

INDEX,
*

;

TST.PAT,+

3037
3063
3064
3065

|CZMLAAO ML-11 LO
HARDWARD TEST SE

MACRO M1113

23-0CT-80 09:11

PAGE 120

9
SEQ 0106

ML&
3948 016002
3949 016006
3950 016010
3951 016014
3952 016022
3653 016030
3954 016036
3955
3956

011706

176114

1
1
0

77
777

e c————————————————————————————————

000020

000100
000010

173776
173770
173762

MOV

ML.REG+6(R1),R2

BISB
BICB

#20,aML.REG+120
#100,aML.REG+120

BIS
MOV

BICB
RTS

RO,R2
R2.aML.REG+230

#10,aML.REG+120
PC

; Routine Size:
35 words
g
; Maximum stack deptl per invocation:

——

3 words

—_———

noro
nono

—_—

TOPS
PA:<

|CZMLAAO ML=11 LOGIC TEST
HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

PAGE 121

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

JMLG
routine RD_PD
begin

L]
.
.

(TST_PAT,

index,

ERR_FLG)

novalue =

le4

.
o

.
.

FUNCTIONAL DESCRIPTION:

COMPARES THE CONTENTS OF

PROM DATA REGISTER

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
gg;égNED A ONE TO INDICATE THE

.
.
.
.

.
.

.
.
.

—_————

.
.

—

.
.

FORMAL PARAMETERS:
TST _PAT

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

—

D il e

NN b
-~ OOV

e e h e = b OO OO o
NO VB WN=O VN w

AN N AN N N N AN AN AN N AN N NN NN N

SEQ 0107

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

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

CIZMLAAD ML-11 LOGIC TEST

'HARDWARD TEST

SECTION

4021

4024 ;

3122

6026 ;

3124

23-0CT-80 09:11

E_9

PAGE 122

;ML4

4025

;

4027 ;
4028 ;

28%3 :

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

g}g;
- g}%g

4033 ;
4034 ;

3131
3132

2828 ;

3134

3133

4044 016040

004167

4046
4047
4048
4049

152777
152777
016600
006300

4045 016044

016050
016056
016064
016070

005076

4050 016072
4051 016074
4052 016076

006300
006300
010001

4055
4056
4057
4058

046100
016102
050002
010267

4053 016100
4054 016104
016110
016114
016120
016122

4059 016126
4060 016132
4061 016136
4062 016142
4063 016150
4064 016152

4065 016160

4066 016166
16174

4070

016100
056600

DAT_BM = ONE;
WT_DATA = WRT_MASK;

'SET DATA DIAG MODE
'SAVE THE DATA WRITTEN TO THE REGISTER

'SET PROM READ WRITE

'READ AND SAVE THE REGISTER

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

DAT_DM = Z2ERO;

'CLEAR DATA DIAG MODE

end;
165742

000010

000100
000010
000012

RD.PD:

173742
173734

011704
011706
173542

R1,$SAVE2

;

3070

BISB
BISB
MOV
ASL

#100,aML .REG+120
#10,aML .REG+120
12(SP) RO
RO

f
;
;

INDEX,*

3124
3125
3126

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

;

TST.PAT,»

aML.REG+230,R2

;

WT.DATA,RD.DATA
1%
#1,310(SP)

s
;

#10,3ML.REG+120
PC

;
;

CLR

MOV

173776
011706
173530
173522

173522

000001

000010

142777
000207

000010

173624

000100

JSR

ASL
ASL
MOV
MOV
BIS
BIC
MOV
BIS

011702
000014

173632

18:

'READ THE REG FOR WRT_MASK

'SET ERROR FLAG IF NEQ
'CLEAR PROM READ WRTE

PROM RW = ZERO;

017702
056102
010267
026767
001403
012776

142777

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

'CLEAR ERROR FLG

RD-DATA = .MLPD or .IGNORE;

TOPS=-20 Bliss=16 v2(206)

.ERR_FLG = ZERO;

PROM"RW = ONE;

3125
3126

28%} :

4035 ;

SEQ 0108

22-0ct=1980 10:47:44

28%% :

238

MACRO M1113

MOV
BIS
MoV
CMP
BEQ
MOV

BICB

BICB
RTS

310(sP)

; ERR.FLG

3123

RO
RO
RO,R1

ML.REG+4(R1),R0
ML.REG+6(R1)
,R2
RO,R2
R2,WT.DATA

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

#100,3ML.REG+120

: Routine Size:
&7 words
'
; Maximum stack depth per invocation:

;

3 words

3127
3129

*,ERR.FLG

3132

3133
3070

MACRO M1113

'HARDWARD TEST SECTION

routine WRT_EL
begin

SEQ 0109

index)

: novalue =

DUMMY ROUTINE CALL TO ASSIST IN THE READ

FUNCTIONAL DESCRIPTION:

FORMAL PARAMETERS:
1ST_PAT

DATEK PATTERN TO BE MASKED AND

COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST

WRITE REGISTER ALGORITHEM

INDEX

USED BY THE MACRO WRT_MASK TO

SELECT THE CURRENT REGISTERS ADDRESS,

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

MASK

—=O VNN
WNONS W

000207

(TST_PAT,

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

les

OO0V

~NONW

VIV
SS SNBSS
BB BB UIWNINWNW

o
o

— Y ———

NN
N N N N N N N N N N N NN NN NN NN NN

- [P

016176

F
9
PAGE 123

22-0ct -1980 10: 47:44
22-0ct -1980 10 145:32

4076 ;MLG
4077 ;
4078
4079
4080
4081
4,082
4083
4084
4085
4086
4,087
4,088
4089

23-0CT-80 09:11

ERROR LOCATION REG IS READ ONLY
return;

end;

WRT.EL:

;

RTS

Routine Size:

3135

word

; Maximum stack depth per invocation:

0 words

CIZMLAAOD ML-11 LOGIC TEST

MACRO M1113

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

.
.

.
©

.
L
I3

.
.

4159
4160
4161
4162
4163
4164
6165
4166
4167
L168
4169
4170
L1717
L6172

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

D
i

N N NN

D i
D i
i
D
D i
D
i e

routine RD_EL

begin

.
.

.
k2

.
.

;
;

477 ;
.

(TST_PAT,

index,

ERR_FLG)

SEQ 0110

novalue =

‘44

FUNCTIONAL DESCRIPTION:

i
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i
i

FORMAL PARAME TERS:
TST_PAT

ERR_FLG

!
:

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

;
i
i
i
i
i
|

617% ;
L1174 ;

6175
676

4157 ;
4158 ;

—

VOO OVOOVOVOVOPOOOOWOOO
NN NNNNNN~N~NoOr
OO~
NOWVSWN 2OV
NOWVMESWN 2O VNV
WN =O 000NN
W
—

D e

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

N AN N LN WA N N WA U AN U

6126
6127
6128
6129
6130
6131
6132
6133
3%
4135
6136
L1137
4138
4139
6140
L1141
4142
6143
L1144
4145
4146
L147
4148
6149
4150
4151
6152
4153
6154
6155
4156

G_9

PAGE 124

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

N N AN N NN NN N WA N NN NN AN N

4123 JMLG
6124 ;
6125

23-0CT-80 09:11

i
i
i
i
i
i
i
i

COMPARES THE CONTENTS OF THE
ERROR LOCATION REGISTER
WITH THE CONTENTS OF TST_PAT.

IF THE COMPARE IS NOT EQUAL THEN

THE FORMAL PARAMETER 'ERR FLG'
sggégNED A ONE TO INDICATE THE

DATK PATTERN TO BE MASKED AND

COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST
X
INDE

USED BY THE MACRO WRT _MASK TC

SELECT THE CURRENT REGISTERS ADDRESS,

FORCED HI, FORCED LO AND DON'T CARE

MASK

INFORMATION.

CONTAINS THE ADDRESS (PASSED BY REF)

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;

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

CIMLAAD ML-11 LOGIC TEST
SECTION

WT_DATA
RD-DATA

4184
4185
4186
4187
N
4195 016200
4196 016204
6197 016212
4198 016220
4199 016226
4202
4203
4204
4209
4210

PAGE

H
9
125

SEQ@ 0111

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

6179 sMLG
4180 ;
4181
4182
4183

4200 016230
4201 016236

23-0CT-80 09:11

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

LTIST PAT;

MLEC;

.RD_DATA neq

TOPS=20 BlLi-s=16 v2(206)
PA:<NEALE>SLZ2ML4.BLI.2 (31)

.ERR_FLG = ONE;

'READ REGISTER FOR WT_DATA

@2 (SP)
6(SP) ,WT.DATA
ML .REG+220,RD.DATA

ERR.FLG

.WT_DATA then

000207

000001

000002

1$:

CLR
MOV
MOV

CMP
BEQ
MOV
RTS

173456
173452
173442

RD.EL:

?E.DATA.UT.DATA

#1,32(SP)

* ERR.FLG

;

Routine Size:

16 words

; Maximum stack depth per invocation:

TST.PAT
,»

000002
000006
173702
173446

end;

HARDWARD TEST

MACRO M1113

0 words

3212
3213
3214
3216
3161

CIZMLAAD ML-11 LOGIC TEST

MACRO M1T13

HARDWARD TEST SECTION
|

23-0(T-80 09:11

1.9

PAGE 126

SE@ 0112
TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BLI.2 (32)

ORI

WA
= OOV
NO NS W —=00

(P T TV TP IO TR T TV T TV T TV T TV T )
S LSS S ST S ST ST ST ST SIS ST.ST.N]
NN N NN PO RN PO NI RO RO NI N —»

sMLG
routine WRT_EE
begin

(TST_PAT,

index)

: novalue =

l+e

FUNCTIONAL DESCRIPTION:

DUMMY ROUTINE CALL TO ASSIST IN THE READ

WRITE REGISTER ALGORITHEM

|
.

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, FORCED LO AND DON'T CARE

|
.

MASK INFORMATION.

|
.

3242

3243
016240

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 LOGIC T EST
'HARDWARD TEST SECTION

L4258 ;ML
|
4259 ;
4260

;
;
;
;
;
;
;
;
;
;
;
:
:
;
;
;
;
;
:

3244
3245
3246
3247
3248
3249
3250
3251
3252
3253
3254
3255
3256
3257
3258
3259
3260
3261
3262

4282
4283
4284
4285
4286
4287
4288
4289
4¢90

;
;
;
;
;
;
;
;
;

3265
3266
3267
3268
3269
3270
3271
3272
3273

4293 ;
4294 ;
4295 ;
4296 ;
4297 ;
4298 ;
4299 ;
4300 ;
4301 ;
4302 ;
4303 ;
4304 ;
4305 ;
4306 ;
4307 ;
4308 ;
4309 ;
4310 ;
4311 ;
4312 ;

3276
3277
3278
3279
3280
3281
328¢
3283
3284
3285
3286
3287
3288
3289
3290
3291
3292
3293
3294
3295

4291 ;
4292 ;

———

9
J_
PAGE 127

SEQ b113
22-0ct=-1 980 10:47:146
22-0ct=1980 10 :45:32

4261
4262
4263
4264
4265
4266
4267
4268
4269
4270
4271
4272
427%
6274
4275
4276
4277
4278
4279

4280 ;
4281 ;

23-0CT-80 09:11

3263
3264

3274
3275

routine RD_EE
begin

(TST_PAT,

i~dex, ERR_FLG)

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BL1.2 (33)

: novalue =

;

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

eggagneo A ONE TO INDICATE THE
FORMAL PARAMETERS:
TST _PAT

DATK PATTERN TO BE

COMPARED AGAINST THE CONTENTS
OF THE REGISTER UNDER TEST.
INDEX

USED BY THE MACRO MLEE 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 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 = ,TST PAT;
RD_DAT A = MLEE;

'CLEAR THE ERROR FLAG
'SAVE DATA WRITTEN TGO THE REGISTER
'READ AND SAVE THE REGISTER

MACRO M1113

CZMLAAO ML-11 LOGI C TEST

'HARDWARD TEST SECT ION

OOOOOOO

scsvsse

K
9
PAGE 128

SEQ 0114
14b
:32

4314 JMLG
6315
6316
W37
4318
4319

23-0CT-80 09:11

.RD_DATA neq

.WT_DATA then

.ERR_FLG = ONE;

000002
000006
173630
173404

173414
173410
173400

000001

000002

RD.EE:

CLR
MOV
MOV
CMP

BEQ

1%:

MOV

RTS

; Routine Size:

82(SP)

ERR.FLG

#1,32(SP)

* ERR.FLG

c—

et ———————————————————————————

¢+
TST.PAT,

6(SP) ,WT.DATA
oML .REG+210,RD.DATA
?2.DATA.UT.DATA
PC

16 words

: Maximum stack depth per invocation:

'READ MLEE FOR TST_PAT

!SET THE ERROR FLAG IF NEQ

end;

000207

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

0 words

3292
3293
3294
3296

3244

—
——

routine WRT_D1
begin

4351
4352
4353
4354
4355
4356
4357
4358
4359
4360
4361
4362
4363
4364

4365
4369
437% 016302
4374 016306
4375 016314
4376 016320
4377 016322
4378 016324
4379 016326
4380 016330
4381 016334
4382 016340
4383 016344
4384 016350
4385 016352
4386 016356
4387 016364
4388
4389
4390
4395
4396

index)

(TST_PAT,

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

: novalue =

FfUNCTIONAL DESCRIPTION:

LOADS THE DATA DIAG REG 1 WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK

FORMAL PARAMETERS:
TST _PAT

gggginr DATA PATTERN TO BE LOADED IN THE REGISTER.

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

MLDT = WRT MASK:
DAT_DM = ZERO;
end;
165500

000010
000010

056600
046100
016102
050002
010277
142777
000207

WJ\
~no &~

SEQ@ 0175
oo

643465 ;MLG
4346 ;
6347
4348
4349
4350

L_9

PAGE 129

\I!N

'HARDWARD TEST § ECT

23-0CT-80 09:11

MACRO M1113

CZFLAAO ML-11 L 06I

173504

WRT.D1:

011702
000012
011704
011706
173512

000010

'LOAD MLD1 WITH GENERATED WRT_MASK PATTERN
'CLEAR DATA DIAG MODE
JSR

R1,$SAVE2

ASL
ASL
ASL
MOV

RO
RO
RO
RO,R1

BISB
MOV

173434

ML.REG+2(R1),RO
12(sP) RO
ML.REG+4(R1),RO
ML. REG*b(R1) R2
RO,R

BICB

#10,aML.REG+120

RTS

;

MOV
BIS
BIC
MOV
BIS

MOV

Routine Size:

;

#10,3ML.REG+120
10(SP) ,RO

TST.PAT,

;

26 words

INDEX,*

R2,3ML.REG+170

; Maximum-stack depth per invocation:

:
:

;

3 words

'CZMLAAO ML-11 LOG 1C TEST

MACRO M1113

HARDWARD TEST SECTION

23-CCT-80 09:11

m 9

PAGE 130

4398 ;ML4

22-0ct=1980 10:47:44

;
;
;
;
;
;
;
;
;

3318
3319
3320
3321
3322
3323
3324
3325
3326

routine RD_D1
begin

4411 ;
412 ;

3328
3329

!
!

L4614 ;

3331

4410 ;

44613 ;

4415
4416
44617
4418
4419

;
;
;
;
;

6621
4422
4423
44624
4425

;
;
;
;
;

4420 ;

4426 ;

4427 ;

3327

3330
3332
3333
3334
3335
3336

3337

4+
' FUNCTIONAL DESCRIPTION:
!
:
!
COMPARES THE CONTENTS OF THE
!
DATA DIAG REGISTER 1
!
WITH THE MASKED DATA PATTERN

GENERATED BY THE MACRO ''WRT_MASK''.
IF THE COMPARE IS NOT EQUAL THEN

ASSIGNED A ONE TO INDICATE THE

DATA PATTERN TO BE MASKED AND

FORCED HI, FORCED LO AND DON''T CARE

3352

MASK INFORMATION.

!
!
!

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

4439 ;

"3356

4441 ;

3358

4443 ;

3359

3360

4444 ;
4445 ;
4446 ;

3361
3362
3363

4450 ;

3367

4447 ;
4448 ;
4449 ;
4451 ;
4452 ;

3364
3365
3366

3368
3369

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

!
!
!

'
!
!

ERR FLG

4436 ;
4437 :

3357

A
.

SELECT THE CURRENT REGISTERS ADDRESS,

!
!
!

!
!

3355

;

COMPARED AGAINST THE CONTENTS
OF THE RFGISTER UNDER TEST.

33,8

‘

!
ERROR.
!
! FORMAL PARAMETERS:
!
"\
!
TST _PAT

3353
3354

4442 ;

THE FORMAL PARAMETER 'ERR_FLG'' IS

3344

3343

3349
3350
3351

4440 ;

: novalue =

INDEX
USED BY THE MACRO WRT _MASK TO

4432 ;
4433 ;
44634 ;

4438 ;

index, ERR_FLG)

!
!
!
!
!

3345
3346
3347

4435 ;

(TST_PAT,

3338
3339,
3340
3341
3342

4428 ;
4429 ;
4430 ;

4431 ;

TOPS=20 Bliss=16 v2(206)

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

22-0ct=1980 10:45:32

2283 :

4601
44602
4403
6404
4405
4406
4407
4408
4409

SEQ 0116

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

MACRO M1113

'CIMLAAO ML-11 LOGIC TEST
|HARDWARD TEST SECTION

4494 016434

4495 016436
4496 016444
4497 016450
4498 016454
4499 016462
4500 016466

4501 016474
4502 016500
4503 016504

4504
4505
4506
4507

016506
016510
016512
016514

N 9

PAGE 131

SEQ@ 0117

22=0ct=1980 10:47:44
22=0ct=1 980 10:45:32

L4564 ;MLG
4455 ;
4456
4457
4458
4459
4460

4461
6462
4463
4464
4465
4466
4467
L4e8
4469
4470
47N
4472
4473
4474
4475
4476
G477
4478
4479
4483
4487 016366
4488 016372
4489 016376
4490 016404
4491 016412
4492 016420
4493 016426

23-0CT-80 09:11

'CLEAR THE ERROR FLG
‘SET DATA DIAG MODE

.ERR _FLG = ZERO;

DAT DM = ONE;
ML _FUNC = write;
DAT_CLK = ONE;
it

'LOAD MLCS1 WITH WRITE FUNCTION
‘D0 A DATA (LK
!SEE IF CALLER IS REG INIT TEST
!SET ERROR FLAG IF NEQ

.REG_INIT_FLG IS_SET

thenb

.
egin

'CLEAR MBUS TO GENERATE INIT DATA

CLR_MBUS;

DAT-DM = ONE;
REG_INIT_FLG = ZERO;
end;

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

WT_DATA'= WRT_MASK;
RD-DATA = .MLD1;

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

CLR_MBUS

165414

000010

iCLEAR TRE MBUS

RD.D1:

JSR

R1,$SAVE2

CLR

a10(sP)

000010
000077
000061
000020
173244

173414
173266
173260
173372
000001

BISB
BICB
BISB
BISB
gng

#10,aML.REG+120
#77.aML.REG
#61.aML.REG
#20,aML.REG+120
§§G.1ult.rLG.c1

000040

173274

BISB

#40,aML.REG+40

BIC

R1
177770,

173520

177770

000007
173252

MOV

BICB
BISB

173256

000010 173324
173176

000012
-

011702

'READ MLD1 FOR WRT_MASK

'SET ERR FLG IF NEQ

end;

004167
005076
152777
142777
152777
152777
026727
001021
152777
016701°
042701
162777
150177
152777
005067
016600
006300
006300
006300
010001
016100

TOPS-20 Bliss=16 v2(206)

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

BISB
1%:

CLR

MOV

ASL
ASL
ASL
MOV

MOV

ML.DUT,R1

#7,3ML.REG+40
R1,aML.REG+40

;

: ERR.FLG
s
;

;

#10,aML.REG+120

;

12(SP) ,RO

: INDEX,*

REG. INIT.FLG
RO
RO
RO
RO,R1

ML.REG+2(R1),RO

;

3381
3382
3385

——————————

(CIMLAAD ML=11 LOGIC TEST

MACRO M1113

(HARDWARD TEST SECTION

4509
4510
(511
4512 016520
4513 016526
4514 016530
4515 016534
4516 016536
4517 016542
4518 016550
4519 016556
4520 016560
4521 016566
4522 016574
4523 016600
45264 016604
6525 016612
4526 016616
4527
4528
4529
4534
4535

23-0CT-80 09:11

8_10
PAGE 132

SEQ 0118

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

:MLG
056600
076100
016102
050002
010267
017767
026767
001403
012776
152777
016702
042702
142777
150277
000207

173122

173112

000010
173144
000007
173122

173126

BIS
BIC
MOV
BIS
MOV
MOV

14(SP) ,RO
ML.REG+4 (R1),RO
ML.REG+6(R1)
,R2
RO,R2
R2.WT.DATA
ML .REG+170,RD.DATA

BEQ
MOV
BISB
MOV

28
#1,910(5P)
#40,aML.REG+40
ML.DUT,R2

BICB
BISB

#7,3aML.REG+40
R2,3ML.REG+40

CMP

2%:

BIC

RTS

;

TOPS
PA:<

TST.PAT,*

3386
3388

RD.DATA,WT.DATA

* ,ERR.FLG

#177770,R2

3318

; Routine Size:
77 words
; Maximum stack depth per

.
invocation:

3 words

¢ 10

———————

CZMLAAOD ML-11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE 133

2-0ct=1 980 10:47:44
2-0ct=198 0 10:45:32

4588

routine WRT_D2 (TST_PAT,
begin

TRTELETETETE
DR T
TR
T
R
T T T
)

&
w
&H

4537 ;ML
4538 ;

4561
4565 016620
4566 016624
4567 016632
4568 016636
4569 016640
4570 016642
4571 016644
4572 016646
4573 016652
45764 016656
4575 016662
4576 016666
4577 016670
4578 016674
4579 016702
4580
4581
4582
4587

SEQ 0119

index)

TOPS-20" Bliss=16 Vv2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (36)

novalue =

!09

FUNCTIONAL DESCRIPTION:

i
i

FORMAL PARAMETERS:
TST _PAT

LOADS THE DATA DIAG REG 2 WITH A DATA PATTERN GENERATED BY THE MACRO WRT_MASK

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.

!SET DATA DIAG MODE

DAT DM = ONE;

3410

004167
152777

016600

006300
006300
006300
010001
016100
056600
046100
016102
050002
010277

162777
000207

'LOAD MLD2 WITH GENERATED WRT_MASK PATTERN

MLDZ = WRT MASK;
DAT_DM = 2ERO;

'CLEAR DATA DIAG MODE

end;

165162

000010
000010

173166

WRT.D2:

000010

BISB
MOV
ASL
ASL
ASL
MOV

011702
000012
011704
011706
173204

JSR

MOV
BIS
BIC
MOV
BIS

MOV

173116

giga

R1,$SAVE2
#10,dML.REG+120
10($P) ,RO
RO
RO

L INDEX,*

3393
3407
3408

RO
RO,R1

ML.REG+2(R1),RO

;

12(SP),RO

ML.REG+4 (R1),RO
,R2
ML.REG*+6(R1)
RO,R2
R2.aML .REG+200

ggé.iflL.REG+120

Routine Size:
26 words
: Maximum stack depth per invocation:

;

TST.PAT,+

3409
3393

3 words

[

vb“1o

CIZMLAAD ML-11 LOGIC TEST
'HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

PAGE 134

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

JMLG

.
’
L

.
.

L]
.
.
L
L

L]
L
.

.
.
.

L]
.
.

routine RD_D2 (TST_PAT,
begin
E

i
i
i

i
i
i
i
|

i
i
|

i
i
|
!

2
.

.
.

L
.
.
L

.
.

.
.
.
.
.
K
.
s

.
.
L
‘

4640 ;
L6461 ;
.

4643 ;
4644 ;
.
.

index, ERR_FLG)

: novalue =

les

SEQ 0120

!
|

FUNCTIONAL DESCRIPTION:

COMPARE THE CONTENTS OF THE
DATA DIAG REGISTER 2

WITH THE MASKED DATA PATTERN

GENERATED BY THE MACRO ''WRT_MASK''.

IF THE COMPARE IS NOT EQUAL THEN THE
FORMAL PARAMETER '‘ERR _FLG'' IS

eggéguso A ONE TO INDTCATE THE
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, FORCED LO AND DON'T CARE

MASK INFOMATION.

ERR FLG

!
'
5

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

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
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 (37)

CIMLAAD ML=11 LOG] C1 EST
'HARDWARD TEST

SECT ION

23-0CT-80 09:11

E 10

PAGE 135

SE@ 0121

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

;MLG

.ERR_FLG = ZERO;

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (37)

'CLEAR ERROR FLAG

DAT DM = ONE;
ML_FUNC = write;
DAT_CLK = ONE;

'SET DATA DIAG MODE

'LOAD WRITE FUNC TO CS1
‘DO A DATA CLOCK

if .REG_INIT_FLG IS_SET
then

!SEE IF CALLER IS REG INIT TEST
!CLEAR MBUS TO GENERATE INIT DATA

begin

CLR_MBUS;
DATCDM = ONE;
REG_INIT_FLG = ZERO;
end;
WT_DATA = WRT_MASK;

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

RD_DATA = .mLD2;
if

3482
3483

N~
o~
N~

o OO NNNOO~N
o ONNNN==a~N

W OO N=-=NNN~N

4680
4681
4,682
4683
4684
4,685
4685
4687
4688 016772
4689 017000
4690 017004
4691 017012
4692 017016
4693 017022
469 017024
4695 017026
4696 017030
4697 017032
4698 017036
4699 017042

004167
005076
OO == =00—=200—=—

016704
016710
016714
016722
016730
016736
016744
016752
016754
016762
016766

- OWVIVISS
S 2O W
S
oo
o

4646
4647
4648
L649
4650
4651
4652
4653
4654
4655
4656
4657
4658
4659
4660
4661
4662
4663
4664
4665
4666
4667
4668
4669
4673
4677
4678
4679

MACRO M1113

006300
006300
010001
016100
056600
046100

.RD_DATA neg

.WT_DATA then

.ERR_FLG = ONE;

'SET ERROR FLAG IF NEQ
'CLR MASS BUSS

CLR_MBUS;
end;

165076

000010
000010
000077
000061
000020

RD.D2:

173076
172750
172742
173054

172726

000001

000040
173202
177770
000007
172734
000010

172756

172660

000012

011702
000014
011704

'READ MLD2 FR WRT_MASK PATTERN

JSR

CLR
BISB
BICB
BISB
BISB
g:g

BISB
MOV
BIC
BICB
BISB
BISB

172740
173006
1%:

CLR

R1,$SAVE2
310(sP)
#10,aML.REG+120
#77.3ML .REG
#61.3ML .REG
#20.aML.REG+120
$§G.1~11.rLG.x1

3466
3468

3470

#40,aML
. REG+40
ML.DUT,R1

$177776,m1

#7,3ML.REG+40
R1.aML.REG+40

#10,aML .REG+120

MOV

REG.INIT.FLG
12(SP) ,RO

MOV
BIS
BIC

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

ASL
ASL
ASL
MOV

ERR.FLG

3411
3463
3464
3465

;

INDEX,*

;

TST.PAT,»

3472
3473
3476

CIZMLAAD ML-11 LOGIC TEST

'HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

F 10

PAGE 136

SEQ 0122

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

JMLG
|

011706

|
4704 017046
4705 017052

4706 017054

017060
017066
017074
017076
017104

4707
4708
4709
4710
4711
4712

elelele
-]

000207

172610
173014
172600

4
4

000001
000040

0
6

173052
177770
000007
172604

MOV
BIS
MOV

MoV
CMP

BEQ

2%:

MOV
BI1SB
MOV

BIC
BICB
BISB
RTS

ML.REG+6(R1),R2
RO,R2
'
R2.WT.DATA

3477
3479

ML .REG+200,RD.DATA
S%.DATA,UT.DAIA

;

#1,310(SP)

#40,aML
. REG+40

*,ERR.FLG

ML.DUT,R2
#177770,R2

#7,aML
. REG+40

g%.aHL.REG¢40

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

;

TOPS
PA:<

3411

3 words

CIMLAAO ML-11 L 0GIC | EST
MARDWARD TEST

MACRO M1113

S ECTI ON

23-0CT-80 09:11

6_10
PAGE 137

SEQ 0123

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

4727 ;MLG
4728 ;
4729
473%0
473
R O

routine WRT_D3 (TST_PAT,
begin

index)

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BL2ML4.BL1.2 (38)

novalue =

FUNCTIONAL DESCRIPTION:

LOADS THE DATA DIAG
REGISTER 3 WITH A DATA PATTERN
GENERATED BY THE MACRO

;

TR TETEIETETETE PR TR T TR T T T T T

i
i
i

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,

i
;
i

FORCED

LO AND DON'T CARE MASK
INFORMATION.

o
!SET DATA DIAG MODE
'MASK OUT ECC CRC WORD BITS

DAT DM = ONE:

MLEZ_MASK = %0'000377';

'LOAD MLE2 WITH GENERATED WRT_MASK PATTERN

MLE2 = WRT_MASK;
MLE2 MASK = X0'100300°';

'RESTORE MASK

DAT_DM = ZERO;

'CLEAR DATA DIAG MODE.

end;

164644
000010
000377
000010

L4764 017136
4765 017142

046100
016102

050002

010277
012767

142777

000207

172650
172710

000010

R1,$SAVE2
#10,aML.REG+120

MOV
BIS
BIC
MOV

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

BIS
MOV
MOV

RO,R2
R2,aML .REG+160

ASL
ASL
ASL
MOV

011702
000012
011704
011706

172640
100300

WRT.D3: JSR
BISB
MOV
MOV

;ML4

172640

172564

g%ga

#377 ,ML.REG+166
10(SP) ,RO

#-77500,ML .REG+166
#10,3ML.REG+120
PC

3484
3510
3511
3512

*
INDEX,

TST.PAT,+

22-0ct-198 01 0: 4 7:44
22-0ct-198 01 0: 4 $:3¢

;

TOPS
PA:<

3513
3514
3484

PR——

Fo
~
p
W

N O T

CZMLAAO ML=11 LOGIC T EST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-8009:11

H 10

PAGE 138

L4791 ;MLG

22-0ct=1980 10:47:44

2;3% 3
;

ll:;glg :

22-0ct=1980 10:45:32
%2}‘7’

routgne RD_D3 (TST_PAT,
e

3518

2;33 :

ggg?

: FUNCTIONAL DESCRIPTION:

4800 -

3502

gg%g

4801 ;
4802 :

3523
3504

4805 :
2ggg :

2382 :
4806 ;

3519

!4+

index, ERR_FLG)

COMPARES THE CONTENTS OF THE

i
|

DATA DIAG REGISTER 3
WITH THE MASKED DATA PATTERN

3507

IF THE COMPARE IS NOT EQUAL THE

g;gg

3508

GENERATED BY THE MACRO "'WRT_MASK''.
FORMAL PARAMETER "‘ERR FLG'' IS

23362"50 A ONE TO INDTCATE THE

4809 :
23}? :

3531
gggg

: FORHAL PARAME TERS :

4812 :

3534

4814 :

3534

4813 ;
2%}2 :

4817 :
4818 ;

4819 :
4820 ;

3535

gggg

3539

OF THE RFGISTER UNDER TEST.

ggzz

4823

3545

4825 ;
4826 ;

3547
3548

235; 3

3542

235; 3
4824 ;

DATA PATTERN TO BE MASKED AND

3541

3546

g;gg

:
!
!

4831 :

3553

23;2 3

gggg

4835 :

3557

4837 ;

3559

4832 ;

4836 ;

23;3 :

3554

TST _PAT

3540

3558

gggg

COMPARED AGAINST THE CONTENTS

INDEX

USED BY THE MACRO WRT MASK TO

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.

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.

4840 :

3562

| IMPLICIT OUTPUTS:

4842 ;

3564

4841

;

2322 :
4845 :

3563

gggz
3567

GLOBAL LOCATION WR_DATA

AND BAD REGISTER DATA

: novalue =

L4796 ;
L4797 ;

SEQ 0124

AND RD DATA LOADED WITH GOOD

TOPS=20 Bliss=16 v2(206)

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

MACRO M1113

CZMLAAD ML-11 LO GIC TEST

HARDWARD TEST SE CTION

4888 017312
4889 017314
4890 017322
4891 017326
4892 017332
4893 017340
4894 017344
4895 017352
4896 017356
4897 017362
4898 017364
4899 017366
4900 017370

NN N NN NN NN
N N NN

;

4862 ;
4863 ;
4864 ;
4865 ;
4866 ;
LB67 ;
4B68 ;
4869 ;
4870 ;
4871 ;
4872 :
4LB76
4880 017236
4881 017242
4882 017246
4883 017254
4884 017262
4885 017270
4886 017276
4887 017304

000~~~ ~ NNNNNNNOO
- O 000 ~ OIS
W
= O 000

;
;
;
;
;
;
;
;
;
;
;

SEQ 0125

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32
vy Vi AT
WA

4861

1.10

PAGE 139

:MLG
;

4LBLT
LBLB
4849
4850
4851
4852
4853
4854
4LB5S
4856
4857
4858
4859
4860

23-0CT-80 09:11

3582

.ERR_FLG = ZERO;

'CLEAR ERROR FLAG

DAT DM = ONE;
ML _FUNC = write;
DAT_CLK = ONE;

'LOAD WRITE FUNCTION TO MLCS1
iDO A DATA CLOCK

MLE2 MASK = %o'000377';

iSET DATA DIAG MODE

it .REG_INIT_FLG IS_SET
then

'SEE IF CALLER IS REG INIT TEST
ICLEAR MBUS TO GENERATE INIT DATA

begin

CLR_MBUS;

DAT DM = ONE;

REG_INIT_FLG = ZERO;
end;

WT_DATA = WRT_MASK;
RD_DATA = .MLE2 or .IGNORE;

ISAVE THE DATA WRITTEN TO THE REGISTER
iREAD AND SAVE THE REGISTER

it .WT_DATA neq .RD_DATA then .ERR_FLG = ONE;
3589
3590

004167
005076
012767
152777
142777
152777
152777
026727
001021
152777

016701
042701
162777

150177
152777

005067
016600
006300
006300
006300
010001

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

MLE2 MASK = %0'100300';

CLR_MBUS;

'CLEAR THE MASS BUS

end;

164544

RD.D3:

000010

000377 172612
000010
000077
000061
000020
172366

172536
172410
172402
172514
000001

000040

172416

172642

177770

000007
172374

172320

#377 ,ML.REG*+166

BISB
BICB
BISB
BISB
gn:

#10,aML.REG+120
#77.aML.REG
#61,aML.REG
#20,aML.REG+120
?Ec.lulr.rLG.p1

#40,aML.REG+40

MOV

ML.DUT,R1

BICB
BISB

#7,aML.REG+40
R1.aML.REG+40

BIC

BISB

1%:

;

a10(sP)

BISB

172400

R1,$SAVE2

CLR

MOV

000010 172446
000012

JSR

CLR

MOV

ASL
ASL
ASL
MOV

'READ THE REG FOR WRT_MASK

* ERR.FLG
;
;

;
;

;

#177770,R1

#10,aML.REG+120

;

12(SP) ,RO

: INDEX,*

REG.INIT.FLG
RO
RO
RO
RO.R1

;

3579
3580
3583

CIMLAAD Mi-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

4902
6382
4

016100
056600
046100
016102
050002
010267

011702
000014
011704
011706

4912 017426
4913 017430

056102
010267

4914 017434

4915 017442

017702

026767

001403

172250

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

011706
172236

BIS
MOV

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

BEQ

172434

[[0]

172230

012776

000001

000010

4918 017460
4919 017466

152777
016702

000040
172476

172252

142777
150277

000007
172230

4920 017472

4921 017476
4922 017504

23%2 017510
4925

23%?

4932

012767

042702

000207

100300

177770

172406
172234

CMP

2%:

SEQ 0126

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

,
MOV
BIS
BIC
MOV
BIS
MOV

4916 017444

4917 017452

J 10
PAGE 140

;MLG
:

4905 017372
4906 017376
4907 017402
4908 017406
4909 017412
4910 017414

4911 017420

23-0CT-80 09:11

MoV

BISB
MoV

BIC

8I(B
BISB

RTS

: Routine Size:

T0PS
PA:<

: TST.PAT,«

@ML.REG+160,R2

WT.DATA,RD.DATA

#1,310(SP)

: *,ERR.FLG

#-77500,ML.REG+166

#40,aML.REG+40
ML.DUT,R2

3584
.

3586

)

3588

#177770,R2

#7,aML.REG+40
R2,aML.REG+40

86 words
: Maximum stack depth per invocation:

3
3 words

3516

CZMLAAQ ML=11 LOGIC TEST
'HARDWARD TEST SECTION
j

;

4934 ;MLG

23%2 3
4937
4938
4939
4940
4941
4942
4943
4944
4945
4946

;
;

MACRO M1113

22-0ct=1980 10:45:32

;
;
;
;
;
;
;

4948
4949
4950
4951
4952

;
;
;
;
;

3602
3603
3604
3605
3606

!
!
!
!
!

4954
4955
4956
4957
4958
4959
4960
4961
4962
4966

;
;
;
;
;
;
;
;
;

23;2 017512

3601

3607

3608
3609
3610
3611
3612
3613
3614
3615
3616

‘

4979

index)

!
!
!
==

!
!

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BL1.2 (40)

: novalue =

'++
! FUNCTIONAL DESCRIPTION:
!
DUMMY ROUTINE CALL TO ASS'ST
!
WRITE REGISTER ALGORITHEM
!
! FORMAL PARAMETERS:
!
TST_PAT

IN THE READ

DATK 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, FORCED LO AND DON'T CARE
MASK INFORMATION.

DRIVE STATUS REG IS READ ONLY
return;
end;

000207

WRT.DS: RTS

4972

Lg;g

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

routine WRT_DS (TST_PAT,
begin

4953 ;

PAGE 141

:
3591
3592
3593
3594
3595
3596
3597
3598
3599
3600

4947 ;

23-0CT-80 09:11

;
.

Routine Size:

PC
1

3
word

; Maximum stack depth per invocation:

0 words

359

(CZMLAAO ML=11 LOGIC TEST
'HARDWARD TEST SECTION

23-0CT-80 09:11

L 10

PAGE 142

. -

.
e
S

T
L T
R L
P P
P
e

index,

ERR_FLG)

novalue =

FUNCTIONAL DESCRIPTION:

COMPARES THE CONTENTS OF THE
DRIVE STATUS REGISTER WITH THE
MASKED DATA PATTERN

GENERATED BY THE MACRO 'WRT_MASK'.
IF THE COMPARE IS NOT EQUAL THEN

THE FORMAL PARAMETER

'ERR _FLG'

egségneo A ONE TO INDICATE THE

FORMAL PARAMETERS:

TST_PAT

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 REGISTERS ADDRESS,
FORCED HI, FORCED LO AND DON'T CARE

S e

e
e e
s
T
R E T E T

(TST_PAT,

R L T L LA LN L R
DRTR P
R PR PR TR DR

begin

P L

routine RD_DS

R
R

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

JMLG

4981

MACRO M1113

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

IMPLICIT OUTPUTS:
GLOBAL LOCATION WR_DATA

AND RD DATA LOADED WITH GOOD

AND BAD REGISTER DATA

'WARDWARD TEST § EC T

23-0CT-80 09:11

PAGE 143

SEQ 0129

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

5037 ;MLS
5038 ;

£~
&~

.WT_DATA neq .RD_DATA then .ERR_FLG = ONE;

5058 017524
5059 017530
5060 017532
5061 017534
5062 017536
5063 017540
5064 017544
5065 017550
5066 017554
5067 017560
5068 017562
5069 017566
5070 017572
5071 017576
5072 017602
5073 017610
5074 017612

5075 017620
5076
5077
5078
5083
5084

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

'!READ THE REG FOR WRT_MASK

!SET ERROR FLAG IF NEQ

end;

5056 017514
5057 017520

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

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

.ERR_FLG = ZERO;

WT_DATA = WRT_MASK;
RD_DATA = .MLDS or .IGNORE;

MACRO M1113

EST

o
= -

CIMLAAO ML=11 L 0G l

—

164266
000010
000012

RD.DS:

JSR
CLR
MOV

ASL
ASL
ASL
MOV

011702
000014
011704
011706

MOV
BIS
BIC
MOV
BIS

172102
172156
011706
172070
172062

172062

MOV
MOV
BIS
MOV
ggg

000001

000010

MOV
RTS

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

Routine Size:

ERR.FLG
INDEX,*

;

TST.PAT,+

RO,R2
R2,WT.DATA
aML.REG+50,R2
,R2
ML.REG+6(R1)

3672

R2,RD.DATA
WT.DATA,RD.DATA
1%
#1,310(SP)

3674

; *,ERR.FLG

35 words
; Maximum stack depth per invocation:

3617
3670
3671

3 words

3617

'CZMLAAD ML=-11 LOGIC TEST
HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11
‘

N 10

PAGE 144

SEQ 0130

5086 ;ML4

22-0ct=1980 10:47:44

gggg :
5089
5090
5091
5092
5093
5094
5095
5096
5097
5098
5099
5100
5101
5102
5103
5104
5105
5106
5107

;
;
:
;
;
:
:
;
;
:
:
;
;
;
;
:
;
;
;

5109
5110
5111
5112
5113

22-0ct=1980 10:45:32
3678
3679
3680
3681
3682
3683
3684
3685
3686
3687
3688
3689
3690
3691
3692
3693
3694
3695
3696

routine WRT_REG (TST_PAT, REG_SEL, index)
begin

;
;
;
;
;

3698
3699
3700
3701
3702

!
!
!
!
!

5115 ;
5116 :

3704
3705

!
!

5108 ;

5114 ;

5117 ;

5118
5119
5120
5121
5122
5123
5124
5125
5126
5127
5128
5129
5130
5131
5132

5133
5134
5135
5136
5137
5138

;
:
;
;
;
;
;
;
;
;
;
;
;
;
;

;
;
;
;
:
;

5139 ;
5140 ;

3697

3703

3706

3707
3708
3709
3710
3711
3712
3713
3714
3715
3716
3717
3718
3719
3720
3721

3722
3723
3724
3725
3726
3727

3728
3729

TOPS=20 Bliss=16 v2(206)

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

: novalue =

4+
' FUNCTIONAL DESCRIPTION:
!
A ROUTINE TO SELECTIVELY
!
CALLED ROUTINES WHICH
!
WRITE TO INDIVIDUAL ML11
!
REGISTERS
!
! FORMAL PARAMETERS:
!
REG_SEL
!
CASE SELECT EXPRESSION TO
!
SELECT THE WRITE REGISTER
!
ROUTINE TO CALLED
!
!
TST _PAT
!
DATA PATTERN WHICH THE SELECTED
!
REGISTFR WILL BE TESTED AGAINST

INDEX
LOADED WITH THE ML REG 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.

THIS ENABLES THE CALLING TEST TO FIND
THE FAILING REGISTER ADDRESS.

case .REG_SEL from 0 to 13 of
set

'SELECT THE WRITE REGISTER ROUTINE CALL

:
WRT_CS1

(.TST_PAT,

;
.index = 0);

'CALL ROUTINE TO LOAD MLCS?1

(1)

:
WRT_ER (.TST_PAT,

.index = 6);

.
'CALL ROUTINE TO LOAD MLER

(21 :
WRT_DA (.TST_PAT,

_
.index = 3);

'CALL ROUTINE TO LOAD MLDA

(3]

:
WRT_MR (.TST_PAT,

.
.index = 10);

'CALL ROUTINE TO LOAD MLMR

(4]

;

Pr——

——

'CIMLAAO ML=11 LOGIC TEST

—

S——

—

Eaadad ¥

MACRO M1113 23-0CT-80 09:11

'HARDWARD TEST SECTION

g}zz :

|
L

5145 ;
5146 ;

3730
3731

5149
§150
5151
5152
5153
5154
5155
5156
5157
5158
5159

3734
3735
3736
3737
3738
3739
3740
3741
3742
3743
3744

;
;
;
;

;
;
;
;
;
;
5160 ;
5161 ;

22-0ct=1980 10:45:32

5165 ;

3750

3749

;
:
;
;
;
;
;

3751
3752
3753
3754
3755
3756
3757

5174 ;
g};g :

3759
3760

$173 ;

'CALL ROUTINE TO LOAD MLE1

[s) :
WRT_E2 (.TST_PAT, .index = 14);

'CALL ROUTINE TO LOAD MLE2

(6l

:
WRT_PA (.TST_PAT,

(7]

(93
(103
.

(1]

WRT_D1

.index = 8);

(.TST_PAT, .index = 15);

'CALL ROUTINE TO LOAD MLD1

WRT_D2 (.TST_PAT, .index = 16);

'CALL ROUTINE TO LOAD MLD2

WRT_D3 (.TST_PAT, .index = 14);

'CALL ROUTINE TO LOAD MLE2

:
WRT_PD (.TST_PAT,

'CALL ROUTINE TC LOAD MLPD

.index = 19j;
'

.index = 17);

'CALL ROUTINE TO LOAD MLEE

:
WRT_EL (.TST_PAT,

.index = 18);

'CALL ROUTINE TO LOAD MLEL

(13] :
WRT_DS (.TST_PAT,

.index = 5);

'CALL ROUTINE TO LOAD MLDS

tes;

end;

5183 017622
5184 017626

004167
016600

164160
000010

WRT.REG:JSR
MOV

R1,$SAVE2
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
.WORD
.WORD
LWORD
.WORD
.WORD
.WORD
.WORD

14(SP) ,R1

R2
1$(R2) ,PC
2%-1%
3%-1%
4$-1%
5%-1%
£%-1%
7%-1%
B8%-1%

: TST.PAT,+

'CALL ROUTINE TO LOAD MLPA

WRT_FE (.TST_PAT,

(123

3758

TOPS=-20 Bliss=16 v2(206)

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

(.TST_PAT, .index = 13);

(8]

3745

5162 ;
5163 ;

5166
5167
5168
5169
5170
5171
$172

WRT_E1

3732
3733

3746
3747
3748

5164

SEQ 0131

22-0ct=1980 10:47:44

5147 ;
5148 ;

PAGE 145

L5142 ;MLG

‘

——

'CZMLAAO ML=11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION

5199

000174
000212

2%:
17710

174256

000006

3$:

000003

000012

000015

SS2SE
'
RS
L

176522

(rO)

-(SP)
PC,WRT.CS1

16$

R1,=(SP)
#3.(RO)
(RO),=(SP)
PC,WRT.DA

5%:

MOV
MOV
MOV

R1,-(SP)

6%:

JSR
BR

MOV
MOV
MOV

JSR

7%:

MOV
MOV
MOV

JSR

8%:

MOV
MOV
MOV

JSR

9%:

176222

000020

14%-1%
158-1%
R1,-(SP)

MOV
Mov
MoV
JSR

175022

000017

138-1%

4%:

175454

000010

CLR
CLR
JSR

108=1%
118-1%
12%-1%

JSR

175264

000016

Mov

9%-1%

PC,WRT.ER

174716

17770

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

R1,=(SP)
#6. (RO)

174556

108:

SEQ 0132
22-0ct-198 0 10: 47:44
22-0ct=198 0 10: 45:32

MOV
MoV
MOV

174416

o
o
o

£ 1

PAGE 146

23-0CT-80 09:11

(ROY,-(sP)

16$

#12,(RO)

(ROY,=(SP)

PC,WRT.MR

16$
R1,-(SP)

05, (RO)

(ROY,-(SP)
PC,WRT.E1

16$

R1,-(SP)
#16, (RO)
(RO),=-(SP)
PC,WRT.E2
R1,-(SP)

10, (RO)

(RO ,=(SP)
PC,WRT.PA

16$

MOV
MoV
MoV

R1,-(SP)

JSR

PC,WRT.D1

MOV
MOV
MOV

R1,=(SP)

JSR
BR

n?, RO

(RC),=(SP)

16$

220, (RO)

(RO, =(SP)
PC,WRT.D2

16$

TOPS
PA:<

C2
'HA

'CIMLAAD ML=11 LOGI C TEST

MACRO M1113

'HARDWARD TEST SECT l ON

SEQ 0133

JMLG

000021

13%:

176070

000022

14%:

176010

000005

022626
000207

177306

15%:

16%:
;
;

MOV
MOV
MOV

JSR
BR
MoV

MOV
Mov

JSR
BR

MOV
MOV
MOov

JSR
CMP

RTS

Routine Size:
Maximum stack

[
R

[

3714
3748
A

- ~Ov0
) Onv

-4 1 DV

s
~OYv0
VW
~r
o v

3745

3714
3751

-(SP)
,

175600

MOV
MOV
JSR

Ow.

12%:

JSR
BR
MOV

MOV

177022

000023

MOV
MOV

o v

5066 020134
5267 020136
5268 020142
5269 020144
5270 020150
5271 020152
5272 020154
5273 020160
5274 020162
5275 020166
5276 020170
5277 020172
5278 020176
5279 020200
5280 020204
5281 020206

000016

11%:

TOPS
PA:<
V-V~ ROD—-V~\|D0O
=D
——
P
oA~
OO
'
£~
£ ~r~

P
——

NN == =000
soonsrOoo0MNvoO

~N
wn

ViV
YA
VWA wn

D 1N

PAGE 147

23-0(CT-80 09:11

(RO)

(RO) ,=(SP)

PC,WRT.EE

166

3714
3754

R1,=(SP)

#22, (RO

(RO),=(SP)
PC,WRT.EL

3714
3757

16$
R1,=-(SP)
#5,(RO)

(RO) ,=(SP)

PC,WRT.DS

3679
3678

(SP)+,(SP)+

12% words

depth per

'
1nyocation:

5 words

CIMLAAD ML=11 LOGIC

HARDWARD TEST

T EST

MACRO M1113

SECTION

23-0CT-80 09:11

5292 ;ML4

3765
3766
3767
31768

gggz 3

330
¢
5307 :

22-0ct=1980 10:45:32

3764

5299
5300 ;
5301 ;
5302

5298 ;

22-0ct=1980 10:47:44

routine RD_REG (TST_PAT, REG_SEL, ERR_FLG) : novalue =

3763

g;gg

3774
3775

5312 :

3778

REG_SEL

5314

3780

%;g;

5317 :

3783

gg;g ;

g;gg

5318 ;

5321 :
§322 :

3352 3
S5

5325 ;
5326 ;

g%%g 3

5329 :

3784

3787

3788

%;gg
3791
3792

g;gz

ST _PAT

DATA PATTERN WHICH THE SELECTED

i-case .REG_SEL from 0 to 13 of
[0l

5335 .

3801

(3] :

5338 .

3804

(4] :

5341

3807

(53 :

5344

3810

(6] :

g§as ;

L6 ;

gggg
gg}}

;

RD_CS1 (.TST_PAT, 0, .ERR_FLG);

21 :

gg:g :

'SELECT THE READ REGISTER ROUTINE CALL

set

3798

gggz

533

ggzg :

‘

SELECT THE WRITE REGISTER

(13 :

gggg

ROUTINE TO CALLED

3795

gggg ;

CASE SELECT EXPRESSION TO

g;gg

OF THE ROUTINE CALL.

gggq ;

§§§2 :

REGISTERS.

2%}2 $

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

g;;g

3779

' FUNCTIONAL DESCRIPTION:
!
A ROUTINE TO SELECTIVELY
!
CALLED ROUTINES WHICH
!
READ TO INDIVIDUAL ML11

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

5313 ;

TOPS=20 Bliss=16 V2(206)

!
!

gg}? :

egin

0
Bt
gt
3773 |
CONTAINS THE ADDRESS (PASSED BY REF)

5308 :
5309 ;

SEQ 0134

3761

5297 :

E 11

PAGE 148

2%82 :

5295

RD_ER (.TST_PAT, 6,

'CALL ROOUTINE TO READ MLCS1

.ERR_FLG);

'CALL ROUTINE

RD_DA (.TST_PAT, 3, .ERR_FLG),
RD_MR

(.TST_PAT,

10,

.ERR_FLG);

(.TST_PAT,

13,

.ERR_FLG);

RD_E2 (.TST_PAT,

14,

.ERR_FLG);

RD_PA (.TST_PAT, B,

.ERR_FLG);

RD_E1

TC READ MLER

'CALL ROUTINE TO READ MLDA

*°

'CALL ROUTINE

TO READ MLMR

'CALL ROUTINE

TO READ MLE1

'CALL ROUTINE

TO READ MLE?

'CALL ROUTINE

TO READ MLPA

CIZMLAAD ML=11 LOGIC

HARDWARD TEST

TEST

MACRO M1113

SECTION

23-0(T=80 09:11

‘

PAGE

5348 ;ML4
;
;
3
;
;
;
;
;
;
;
;
;
;
;
;
:
;
;
;
;
:
3

3813
3814
3815
3816
3817
3818
3819
3820
3821
3822
3823
3824
3825
3826
3827
3828
3829
3830
3831
3832
3833
3834
3835

004167
016600
016601

5385 020230
93586 020232

006302
066207

5387 020236
5388 020240
5389 020242
5390 020244
5391 020246
5392 020250
5393 020252
5394 020254
5395 020256
5396 020260
5397 020262
5398 020264
5399 020256
5400 020270

5401 020272

SEQ 0135

2¢=0ct=1980 10:45:32

5381 020210
5382 020214
5383 020220

5384 020224

149

22-0ct=1980 10:47:44

gggg 3
95551
5352
3399
5354
5355
5356
5357
5358
5359
5360
5361
5362
5363
5364
5365
5366
5367
5368
5369
5370
5371
5372
2%;;

F 1N

016602

000034
000050
000066
000104
000122
000140
000156
000174
000212
000230
000246
000264
000302
000320

010146

TOPS=20 Bliss=16 v2(206)

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

(7]

:
RD_D1

(.TST_PAT,

15,

.ERR_FLG);

'CALL ROUTINE

TO READ MLD!

(8]

:
RD_D2

(.TST_PAT,

16,

.ERR_FLG);

'CALL ROUTINE

TO READ MLD?2

(9]

:
RD_D3 (.TST_PAT,

14,

.ERR_FLG);

'CALL ROUTINE
.TO READ MLE?

{10l

:
RD_PD (.TST_PAT,

19,

.ERR_FLG);

'CALL ROUTINE TO READ MLPD

(1]

:
RD_EE

(.TST_PAT,

17,

.ERR_FLG);

'CALL ROUTINE

TO READ MLEE

(121

:
RD_EL

(.TST_PAT,

18,

.ERR_FLG);

‘CALL ROUTINE

TO READ MLEL

(13)

:
RD_DS (.TST_PAT, 5,

.ERR_FLG);

'CALL ROUTINE

TO READ MLDS

tes;
end;

163572
000010
000014
000012
020236

RD.REG:

1%:

2%:

JSR
MOV
MOV
MoV

R1,$SAVE?
10(SP) ,RO
14(SP) ,R1

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

2%-1%
3%-1%
4%-1%
5%-1%
6%-1%
7%-1%
8%-1%
9%-1%
10%-1%
11%-1%
12%-1%
13%-1%
14%-1%
15%-1%

ASL
ADD

MOV

12(SP) ,R2

R2
1$(R2),PC

R1,-(SP)

:
: ERR.FLG,*
: TST.PAT,e

: REG.SEL,*

3761
3793

3789

3793

MACRO M1113

HARDWARD TEST SECTION

5403
5404
5405
5406 020274
5407 020276

5408 020300
5409 020304

5411
5412
5413
56414

020310
020314
020316
020322

5425 020360
5426 020362
5427 020366
5428 020370
5429 020374
5430 020376
5431 020400
5432 020404
5433 020406
5434 020412

5435 020414
5436 020416
5437 020422
5438 020424
5439 020430
5440 020432

5456 020506
5457 020512

23-0CT-80 09:11

6 1N
PAGE 150

JMLG
005046
010046
004767
000532
010146
012746
010046
004767
000523
010146
012746
010046
004767
000514
010146
012746
010046
004767
000505
010146
012746
010046
004767
000476
010146
012746
010046

004767
000467
010146
012746
010046
004767
000460
010146
012746
010046
004767
000451
010146
012746
010046
004767
000442
010146
012746
010046
004767

000433
010146
012746
010046

000006

3%:

174100

000003

4%:

174240

000012

5%:

174400

000015

6%:

7%:

8%:

174520

000017

9%:

000020

108:

176220

000016
176534

000023

11%:

TOPS

PA:<

CLR

-(SP)

JSR
BR

16$

3789
3796

16$

3789
3799

MOV
MOV
MOV

JSR
BR
MOV
MOV
MOV

JSR
BR
MOV

MOV
MOV

JSR
BR

MOV
MOV
MOV

BR
MOV
MOV

JSR
BR

MOV
MOV
MOV

JSR
BR

MOV
MoV
MOV

JSR

175720

7:44

:45:32

MOV

175164

000010

JSR

174762

000016

MOV

173740

SEQ 0136
Lk

CIMLAAD ML=11 LOGIC TEST

MOV
MOV
MOV

RO,=(SP)
PC.RD.CS
R1,=(SP)
#6,-(SP)
RO,=(SP)
PC.RD.ER
R1,=(SP)
#3,-(SP)
RO.-(SP)
PC.RD.DA
16$
R1,=(SP)

#12,-(5P)

RO,=(SP)

PC.RD.MR
16%
R1,=(SP)

3789
3805

RO,=(SP)
PC.RD.E1
16%
R1,-(SP)

3789
3808

#5,-(sP)

#éb,-(5P)
RO, =(SP)

PC.RD.E2
16%
R1,-(SP)
#10,-(5P)
RO, ~(SP)
PC.RD.PA

16%
R1,-(SP)

#M7,-(sP)

RO, =(SP)
PC.RD.D1

16%

R1,-(SP)

#20,-(5P)

JSR

RO, -(SP)
PC.RD.D2

MOV
MOV
MOV

R1,-(SP)
#6,-(SP)
RO,-(SP)

JSR

MOV
MOV
MOV

3789
3802

16%

PC.RD.D3

R1,=(SP)

02%,-(cp)
= (SP)
RO,

3789
3811

3789
3814

3789
3817

3789
3820

3789
3823

MACRO M1113

CIZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

5459
5460

5461
5462

5463
5464
5465
5466
5467
5468
5469
5470
5471
5472
5473
5474
5475
5476
5477
5478
5479 020576
5480
5481
5482
5487
5488
5489

23-0CT-80 09:11

H 11

PAGE 151

SEQ 0137
TOPS
PA:<

JMLG

004767
000424

175320

012746
010046
004767
000415
010146
012746
010046
004767
000406
010146
012746
010046
004767
062706
000207

000021

010146

13%:

175504
14%:

JSR
BR
[0}
MOV

MOV

R1,=(SP)

MOV

RO,=(SP)
PC RD.EL
16%
R1,=(SP)
#5.-(SP)
RO.=(SP)

JSR
BR

MOV

175424

JSR
BR

000005
176722
000006

16%:
:

16$

RY,=(SP)
#21,-(5P)
RO,=(SP)

MOV

000022

158

PC,RD.PD

MOV

MOV
MOV

JSR
ADD

RTS

Routine Size:

PC.RD.EE

' <BLF/PAGE>

3789
3829

16%

#22,-(SP),

3789
3832

PC.RD.DS
#6,S5P

3762
3761

124 words

: Maximum stack depth per invocation:
3836

3789
3826

6 words

CIZMLAAD ML=-11 LOGIC TEST

'HARDWARD TEST

5491

MACRO M1113

SECTION

23-0CT=-80 09:11

I 11
PAGE 152

;ML4

22-0ct=1980 10:47:44

gzg% :

3837
3838
3839
3840
3841
3842
IR43
3844
3845
3846
3847
3848
3849
3850
3851
3852
2853
3854

5514 ;

3857

5515
5516
5517
5518
5519
5520
gg%;

TOPS=20 Bliss=16 v2(206)

22-0ct=1980 10:45:32

i
5494 ;
5495
,
5496 ;
5497 ;
5498 :
5499 :
5500 ;
5501 ;
5502 :
5503 ;
5504 ;
5505 ;
5506 ;
5507 :
5508 ;
5509 ;
5510 ;
5511 ;

gg‘% :

SEQ 0138

gggg

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

!
BGNINIT;
!
INITIALIZATION CODE 1S EXECUTED AT THE BEGINNING OF EACH
!
PASS, WHEN POWER DOWN/POWER UP HAS OCCURRED, OR WHEN THE
!
OPERATOR HAS ISSUED A START, RESTART OR CONTINUE COMMAND.
!
DURING INITIALIZATION, THE 'GPHARD' MACRO IS USED TO GET
!
P-TABLE IMFORMATION FOR THE LOGICAL UNIT UNDER TEST. THE
!
NUMBER OF UNITS AVAILABLE FOR TESTING IS CONTAINED IN A
!
HEADER LOCATION ('LSUNIT').
local
OFFSET;
external
LSUNIT;

if not READEF
then

(EF_CONTINUE)

'SKIP INIT CODE

CONTINUE

begin

'START GPHARDS AT LUN O AND LOAD ‘ML _REG'

if READEF (EF_START)
then
begin
ML_LUN = =1;

'SEE

THIS

IS THE VERY FIRST PASS

;
;
;
;
;
;
:

3858
3859
3860
3861
3862
3863
gggg

gggz :

gggg

it .ML_LUN geq .LSUNIT then DOCLN;

99¢9 ¢
gggg :

3868
gggg

end
until (GPHARD (.ML_LUN, PTBL_PTR)) neq 0;

5528 ;
5529 ;
5530 ;

3871
3872
3873

RH_ADD = .((.PTBL_PTR)
RH_TYP = . ((.PTBL_PTR)
RHTMVEC = .((.PTBL_PTR)

5533 ;
5534 ;
5535 ;

3876
3877
3878

incr COUNT from 0 to 21 do
'LOAD THE REGISTER ADDRESS FOR THIS UNIT
begin
ML REG [.COUNT, REGISTER_ADD] = .RH_ADD ¢ .OFFSET;

5537
5538
5539
5540
5541
5542

3880
38561
3882
3883
3884
3885

324

;

ggg; 3

5536 ;

:
;
;
;
;
;

5543 ;
»

5544 ;
5545 ;

%g;g

OFFSET = 0;

3879

3886

3887
3888

begin
ML_LUN =

'THIS IS CATEGORY

.ML_LUN + 1;

+ 0);
+ 2);
+ 4);

CODE

' INCREMENT LOGICAL UNIT NUMBER

!START OVER IF ALL UNITS HAVE BEEN TESTED
'REPEAT THE GPHARD UNTIL A O IS RETURNED

'GET BASE RH ADDRESS FOR THIS UNIT
'GET RH TYPE FOR THIS UNIT
'GET RH VECTOR FOR THIS UNIT

"INIT OFF SET COUNT

OFFSET = .OFFSET + 2;
end;

else

end

begin

it READEF (EF_NEW) then ML_LUN = =1;
do

'IS THIS A NEW PASS

'IF NEW PASS START GPHARDS AT LUN 0

INTO ML_REG

Ten

MACRO M111 3

CIMLAAC ML-11 LOGIC TEST

HARDWARD TEST SECTION

23-0C7-80 09:11

J 1
PAGE 153

22-0ct=1980 10:47:44

sMLG

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

R R

T I

T T T T

T L T

T T

P LR L

LA LR

L
L

3889

SEQ 0139

3890
3891
3892
3893
3894
3895
3896
3897
3898
3899

3911
3912
3913

3914

3915

it .((.PTBL_PTR) + B) IS_SET

'CALCULATE ML11 16K MOS RAM PARAMETERS

then

begin

DRIVE TYPE = %0'000110';

W C_STZE= X0'140000°';
RASTINC
= 1o 200°';
CHIP SIZ
=

ARR_INC = zo1000'= %o' 17'-

ARRT16<9,

LST_BLK<9, 4> = .OP_NUM_ARR;

LSTBLK= .LST_BLK or %0'777';

else

end

begin

= %0'000111°;
DRIVE TYPE

3923
3924
3925
3926
3927

W C STZE = %0'000000°;
RASTINC= X0'1000°;
cnxP SIZ= 64;
ARR_INC = Xo' 4000°;
ARRTM16<11, 4> = %0'74°;

LSTTARR<11, 4> = .OP_NUM_ARR;
LST_BLK<11, 4> = .OP_NUM_ARR;
LST_BLK= ,LST BLK or %0%3777';

3928

3929

3930
3931

3926
3937

LSTTARR<Y, 4> = .OP_NUM_ARR;

3922

3935

'START OVER IF ALL UNITS ARE TESTED

'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

3918

3932
3933
3934

it .ML_LUN geq .LSUNIT then DOCLN;

MmL_buTt = L((.PTBL PTR) + 10);
= . ((.PTBL_PTR) + 6) = 1;
OP"NUM_ARR
608D BCK = ZEROES;
ARR_T6 = ZEROES;
LST_ARR = ZEROES;
LST_BLK = ZEROES;

3917
2920
3921

'IF NOT GET NEXT LUN PTABLE

= .((.PTBL PTR) + 12);
PAR DIS

3916
3919

ML_LUN = .ML_LUN ¢ 1;

end;

3906
3907

3910

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

end
until (GPHARD (.ML_LUN, PTBL_PTR):

3900
3901
3902
3903
3904
3905

3908
3909

T0PS-20 Bliss=16 V2(206)

'EXPECTED DRIVE TYPE VALUE
'WORD COUNT SIZE FOR 16K WORD XFER
'RAS INCREMENT FOR 16K RAMS

'CHIP SIZE
!ARRAY INCREMENT
!ARRAY 16
'LAST ARRAY
'LAST BLOCK

'CALCULATE 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;

PRINTB (FMT_17, .ML_LUN);
CLR_MBUS;

end;

ENDINIT;

'TELL OPERATOR WHICH UNIT IS BEING TESTED
‘CLEAR MASS BUS

CZMLAAD ML-11 LOGIC TEST

'HARDWARD TEST

MACRO M1113

SECTION

{

23-0(T-80 09:11

PAGE

K 11
154

SEQ 0140
TOPS
PA:<

JMLG

5613020600
5614 020604
5615 020610
5616 020612
5617 020614
5618 020616
5619 020622
5620 020624
5621 020626
5622 020634
5623 020640
5624 020646
5625 020650
5626 020652
5627 020656
5628 020660
5629 020664
5630 020670
5631 020672
5632 020700
5633 020704
5634 020712
5635 020716
5636 020724
5637 020726

5638 020730
5639 020732
5640 020734
5641 020736
5642 020740
5643 020744
5644 020746
5645 020752
5646 020756
5647 020760
5648 020764
5649 020766
5650 020770
5651 020774
5652 020776
5653 021000
56564 021006
5655 021012
5656 021020

004167
012700
104447

103001
000207
012700
104447
103061
012767
005267
026767
002401
104444
016700
104442

163216
000036

012767

005267
026767
002401

LSUNIT

JSR

R1,$SAVE?
#36,R0
47

MOV
TRAP

BHIS

000040

177777
171326
171322

1%:

171332
161144

177777

171154
171150

2%:

171250

171240

4%:

5%:
171160
160772

3857

MOV
INC

#-1,ML.LUN
ML.LUN

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

CMP
BLT

BEQ

171260

3835
3853

RTS
MOV
TRAP

BHIS

3%:

171310

010067 167434
005767 167430
001761
017767
167422
167414
016701
016167 000002
016701
167402
016167 000004
005002
005001
010100
006300
006300
00630
016703 171214
06020
010360 011700
062702 000002
00520
020127 000025
003761
000426
012700., 000035
104447 .
103003 .

LINIT:

.GLOBL

CLR
CLR

MOV
ASL
ASL
ASL
MOV
ADD
MOV
ADD
INC

CMP
BLE
BR

MOV
TRAP

BHIS

MOV

INC
CMP

BLT

3860
3864
3866

ML.LUN,LSUNIT

3869

PTBL.PTR

R2,R3
R3,ML.REG(RO)
#2,R2
R1
R1,#25
4%
8%
#35,R0
47

3871
3872
3873
;
;
;

OFFSET
COUNT
COUNT,+

3874
3876
3878

; OFFSEY,*
;

*,0FFSET

;

COUNT,+

: COUNT

3879
3876

3857
3886

#-1,ML.LUN
ML.LUN

H%.LUN.L‘UNIT

3890
3892

MACRO M1113

'CIMLAAD ML-11 L OGIC TEST
|HARDWARD TEST S ECTION

SEQ 0141
TOPS
PA:<

(MLG

MOV

000001

CMP
BNE

000110

MoV
MOV
MOV
MOV
MOV

140000

000200
000020
001000
017000

BIS

167110

160777
017000
167104
167062

000111
170360

166754

MOV
SWAB
ASL

BIC
BIC
BIS

167110

MoV
SWAB
ASL

BIC
BIC
BIS
BIS

167056
167044
170374
170354
167012
166776
167002
166774

9%:

MOV

CLR

MOV
MOV
MOV

BIC
BIS
MOV

SWAB

ASL
ASL

3900

3901

6(R1),R3

R3
R3,0P.NUM.ARR
D
. BLK
GOO
ARR.16
LST.ARR

LST.BLK
PTBL.PTR,R1
, #1
10(R1)
9%
#110,0RIVE.TYPE

167214
167214
167220
167216
167206
167166
000010

DEC
Mov
CLR
CLR
CLR
CLR

14(R1) ,PAR.DIS
PTBL.PTR,R1
12(R1) ,ML.DUT
PTBL.PTR,R1

171100

1672264
000006

3899

#-40000,w.C.SIZE

000012

6%
PTBL.PTR,R1

#20,CHIP.SIZ

167252

167236

MOV
MOV
MOV
MOV
rOov
MOV

PTBL.PTR

#200,RAS
. INC

#1000, ARR
. INC
#17000,ARR.
16

OP.NUM.ARR.R3

000014

8%:

3895

ML.LUN,RO
42
RO,PTBL.PTR

RTR

167250

BEQ

R3
R3
#160777,R3
#17000,LST.ARR
R3,LST.ARR

g;.uun.Aan.as

R3
#160777.R3
#17000,L57.BLK
R3,LST.BLK

#777,LST.BLK

108
#111,DRIVE.
TYPE
W.C.SIZE
RAS . INC
#1000,
#160,CHIP.S1Z

#4000, ARR. INC
#74000,ARR.
16

#60000.
ARR .16
OP .NUM.ARR.R3
R3
R3
R3

167262
167256

TRAP
MOV
TRAP
MOV
TST

7%:

17113¢

TETECE

104444

016700

160777
017000
167052
000777

uur

L 1
PAGE 155

ONONONNONNY
KONO SO
o

VWA S
OO

e
e

e
o

D e

o
D e

b e

D
i
e

b e cd o

D e
e
e

A ND NI N
A

e
e

o
e

5694 02

oo
N ~N

oo
O0
W ~N

5691 02

5689 02

— i

mgmmmaflflflfl

Vi VNN

oo oooccrOrOrOFOFONON
©o
Co Co
co~NO VS
W =00~

5675 0

oPNV

l=i=1=] =l=l=l=lelelelelel=]
ROUNUNTN NN NT NN N TN ¥

5668 021050.
5669 021056
5670 021062
5671 021070

L
|

5658
9659
5660
5661 021022
5662 021024
663 021030
5664 021032
5665 021036

23-0CT-80 09:11

3902
3903
3904
3905
3907
3910
3911
3912
3913

3914
3915
3916

R—

—

MACRO M1113

(CZMLAAD ML=11 L OGIC TEST

'HARDWARD TEST § ECTION

23-0CT-80 09:11

PAGE 156

SEQ 0142
22-0ct=19 01 0: 4 7:14
22-0ct=19 01 0 14 5: 32

JMLG
6
5717 021354
5718 021356
5719 021362
5720 021370
021374
5722 021400
5723 021402
5724 021404
5725 021406
5726 021410
5727 021414
5728 021422
5729 021426
5730 021434
5731 021440
5732 021444
5733 021450
5734 021452
5735 021454
5736 021462
5737 021466
5738 021472
5739 021500
5740 021504
5741 021510
5742
5743
5744

006303
042703

103777
074000
166744
166722

166712

003777

166700

170526
005244
000002

042703
142777
150377
062706
000207

166750

103777
074000

166706

000040
170502
177770
000007
170234
000006

R3
#103777,R3
#74000,LST.ARR
R3,LST.ARR

108:

170256

BIS

MOV
MoV
Mov
MoV
TRAP

BISB
MOV

BIC
BICB
BISB

170240

ADD
RTS

: Routine Size:
s

004767
104411

000207

177062

OP.NUM.ARR,R3

3929

#3777,057.BLK

3930
3933

R3
R3
R3
R3
#103777.R3
#74000,(ST.BLK
R3,LST.BLK
ML.LUN,=(SP)

PEMT.AT,-(SP)
#2,-(SP)

TRAP
RTS

SP.RO
14

#177770.R3

#7,3ML .REG+40
R3.aML.REG+40
#6.5P

3855
3835

229 words

invocation:

7 words

3935

PC,LINIT
11

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

S —

SP‘.

#40,3ML
. REG*40
ML.DUT,R3

Maximum stack depth per

L$INIT::JSR

TOPS

PA:<

0 words

L
CIMLAAD ML=11

MACRO M1113

'HARDWARD TEST
§

23-0CT-80 09:11

PAGE

5769 JML4
5770 ;

N 11
157

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

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

v
.
.

* BGNTST;

les

TEST NUMBER:

TST 1

TEST NAME:

DRIVE PRESENT

El
.

TEST

.
.
L)

2
.
L)

TEST DESCRIPTION:
THIS TEST READS THE DESIRED SECTOR
ADDRESS REGISTER OF THE DRIVE UNDER
TEST, DELAYS 100 uS,
READS THE
NED BIT OF MLCS2

.
v,

IF SET, AN ERROR MESSAGE

PRINTED AND THE UNIT

IS DROPPED

.
.

IMPLICIT

INPUTS:

!NONE

k
.

.
.

L]
.
.

.
L4
L
L

.
.

local
DODU_FLG,

!DROP UNIT FLAG
‘TEMP STORAGE LOCATION

SAVE;

BGNSUB;
CLR_MBUS

DCDU_FLG
= ZERO;
SAVE= .MLDA;

‘READ A DRIVE REGISTER
'DELAY 1 US

- DELAY (ONE US)

E
.
.
o
.
L)

if .NED IS_SET
then
begin

ERRDF

‘TEST THE NED BIT

(1, ASYNC, 0);

PRINTB (ONE FHT, PHR _3);

‘IF

SET

THEN REPORT ERROR AND SET DODU_FLG

DODU_FLG = ONE;

end;

.
K

.
.
L4

.
.
.

ENDSUB;
if .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;
.

ENDTST;

'DROP

THJS UNIT

DODU

IS_SET

]

'CIMLAAO ML-11 LOGIC TEST

MACRO M1113

{HARDWARD TEST SECTION

23-0CT-80 09:11

B 12

PAGE 158

SEQ 0144

5845 021562
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

150277

005003

001410
016702

WERRETR——

000040
170424
177770

000007
170156

$71:

170200

1%:

2%:

160314

4%:

010000

170114

R1,8SAVE4
=(SP)

BISB

#40,aML
. REG*+40
ML.DUT,R2

TRAP

BIC
BICB
BISB
CLR

170162

170140
000001

JSR
TST
MOV

3%:

5%:

MoV
MoV

BEQ

MOV

BEQ

CLR
DEC
BNE
DEC
BR
BIT
BEQ

TRAP

.WORD
.WORD
.WORD

006576
005350
000002

5864 021646

5865 021652
5866 021654
5867 021656
5868 021662
5869 021666
5870 021670
5871 021672
5872 021674
5873 021676
5874 021700
5875 021704
5876 021706
5877 021710
5878 021712

162312

LSOLY

000001
000006

6%:

BLO
DEC
BNE

170262

005726
000207

MoV
MoV
MOV
MOV
TRAP
Mov
ADD
TRAP
ROR

7%:

MOV
TRAP
TRAP

TST

RTS

3937
3963
3965

1177770,
R2

#7,3ML .REG+40

sz.anL.necoao
3
aML.REG+30,R4
#1.R1

5%
L$DLY,R2

; DODU.FLG
; *,SAVE
; *,$8TMP?

;

*,$8TMP1

;

$$TMP

3967
3968
3969

; $STMPI

; $$TMP2

3971

#10000,aML .REG+40

6%
?S

3974

ASYNC

004167
005746
104402
152777
016702
042702
142777

.GLOBL

#PHR.3,-(SP)
#ONE .FMT,-(SP)
#2,-(SP)

SP,RO
14

3975
.

SP‘.

; *,DODU.FLG

3976
3973
3977

;

3981

DODU.FLG

3984

3937

—

._:._r;_

i HARDWARD TEST SECTI ON

23-0CT-80 09:11

5880

JMLG

5882
5883
5884

; Routine Size:

5881

SEQ 0145

22-0ct=1980 10:47:44

gggg

5891
5895
5899
5900
5901
5902
5903
gggg

PAGE 159

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

; Maximum stack depth per

021714
021714
021720
021722
021724
021726

004767
104466
006000
103773
000207

177602

5906

JSR
TRAP
ROR
BLO
RTS

; Routine Size:

gg?g

5913
5914 ;

T1::
1%:

;

3989

!<BLF/PAGE>

invocation:

6 words

invocation:

PA:<

9 words

PC,$T1
66
RO
1%
PC

Maximum stack depth per

TOPS

0 words

3986

MACRO M1113

| CIMLAAC ML-1 1 LOGIC TEST

'CZMLAAO ML=11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION
5916
5917
5918
5919
5920
5921
5922
5923
5924
5925
5926
5927
5928
5929
5930
5931
5932
5933
5934
5935
5936
5937
5938
5939
5940
5941
5942
5943
5944

D 12

PAGE 160

SEQ 0146
47:44
:45:32

ML4
;
;
;

5945 :
5946
5947

23-0CT-80 09:11

TOPS=20 Bliss=16 v2(206)
PA:<NEALE>BL2ML&4.BLI.2 (45)

3990
3991
3992
3993
3994
3995
3996
3997
3998
3999
4000
4001
4002
4003
4004
4005
4006
4007
4008
4009
4010
4011
4012
4013
4014
4015

!
BGNTST;

4017
4018

MLDA = .ML_DUT;
SAVE = .MLDA;

'LOAD THIS DRIVES DRIVE NO. INTO ITS DSA REG

4020
4021

if .SAVE neq .ML_DuUT
then

!SEE IF DSA HAS DRIVE NUMBER

4016

!+¢
; TEST NUMBER:
TST 2
!
' TEST NAME:
DRIVE 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.
!
!
! IMPLICIT INPUTS:
ML_DUT
!
!
LOADED DURING THE INITIALIZATION CODE AND CONTAINS THE DRIVE
NUMBER OF THE DRIVE PRESENTLY BEING TESTED.
!
!-Llocal
DODU_FLG,

SAVE;

BGNSUB;

CLR_MBUS;

DODD_FLG = ZERO;

begin

4023

ERRDF (2, INTER, 0);

4026
4027

EXIT_TST;
end;

4024
4025

incr DRV_SEL from 0 to 7 do

4031
4032

if .DRV_SEL neq .ML_DUT
then
begin
DRV _NUM = ,DRV_SEL;

MLDX = .DRV_SE[;

DELAY (ONE_0S);
end;

4040

'READ THE REGISTER BACK

'ERROR AND EXIT TEST IF DSA NEQ DRIVE NUM

PRINTB (SIX_FMT, PHR 4, WRD 12, FNC_3, WRD_37, WRD 13, REG_6);
PRINTB (FMT2, .mL_pOT, .SAVE, (.MLTDUT xof .SAVE)T;

4029

4039

'DROP UNIT FLAG
' TEMPORARY SAVE LOCATION

DRV_NUM = .ML_DUT;
SAVE = .MLDA;

'WRITE DRV NO OF OTHER DRIVES INTO THEIR RESPECTIVE DSA REG.

'SKIP IF .DRV_SEL EQL TO THE DRIVE UNDER TEST (DUT)
'SELECT DRIVE TO BE WRITTEN TO

'WRITE DRIVE SEL NO. INTO ITS DSA REG
'DELAY 1 US

'SELECT THE DUT
'READ ITS DSA REG

CZMLAAD ML-11 LOGIC T ES
HARDWARD TEST SECTION

R
D

O
oo
&~

5972 :ML4
5973 ;
5974
5975 ;

6001 021730
6002 021734
6003 021736
6004 021740
6005 021746
6006 021752
6007 021754
6008 021760

MACRO M1113

23-0(T-80 09:11

SEQ 0147

22=0ct=1980 10:47:44
22=0ct=1980 10:45:32
4042
4043
6044
4045
4046
4047
4048
4049
4050
4051
4052
4053
4054
4055
4056
4057
4058
4059
4060

004167
005746

104402
152777

016703
010302
042702
142777
150277
005005
010377
017704

it .SAVE neq
then

begin

ERRDF

.ML_DUT

!SEE

(3, ASYNC, 0);

PRINTB (THR_FMT, FNC 3, WRD_37, WRD_14);
PRINTB (FMT 1, ML_pd1, .SAVE);

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

IF WRITTING TO OTHER DRIVES CHANGE

'ERROR AND SET DODU_FLG IF

ITS VALUE

CHANGED

DODU_FLG = ONE;
end;

ENDSUB;
if .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;

'DROP UNIT

DODU_FLG IS_SET

ENDTST;

162124

$72:

000040

167772

177770
000007
167746

167752

170216

167730
167724

JSR
TST

R1,$SAVES

3988

BISB

#40,3ML.REG+40
HL.DgT.R3
R3.R

4012
4014

TRAP

MOV
MOV

BIC
BICB
BISB
CLR

Mov
MOV

CMP

BEQ

TRAP
.WORD

6025 022050

E 12

PAGE 161

007342
005770
006232
006774
005760
006630
005432

.WORD
.WORD

MoV
MOV
MoV
MOV
MOV
MOV
MOV

~(SP)

#177770,R2

#7,aML.REG+40

:%.OHL.REG*AO
R3,aML.REG+30
aM( .REG+30,R4
R4 .R3
2%
55
2

DODU.FLG
«,SAVE

s SAVE

4016
4017
4018
4020

4023

6u1ea

#REG.6,-(SP)

#WRD.1%,-(5P)

#WRD.37.-(SP)
#ENC.3,=(SP)

#WRD.12,-(S5P)

#PHR
.4, = (SP)
#SIX.FMT,=(SP)

4024

CIZMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

6027

012746
010600
104414

6034 022070
6035 022072
6036 022074
6037 022076
6038 022100
6039 022102
6040 022106

010403
041603
040416
050316
010446
016746
012746

6042 022116
6043 022120
6044 022122

016716

012746

010600
104414
104463

6045 022124
6046 022130
6047 022132
6048 022136
6049 022140

062706
000522
016700
005003
020300

6051 022144

010302

6050 022142

6052 022146
6053 022152
6054 022160

000007

170100

2%:

38:

000001

6057 022174
6058 022176
6U59 022202

001410
016702
001403

167560

48:

157714

5% :

005301

6% :

6065 022216

005203

7%:

6068 022226

010003

6070 022234
6071 022242

142777
150377

6074 022254

001435

6076 022260
6077 022262
6078 022264

000003
007444
000000

6080 022272
6081 022276

012746
012746

6066 022220
6067 022224

001375

000767

020327
003745

000007

6065 022230 042703 177770

000007
167472

6Q72 022246 017704 167456
6073 022252 020400
6075 022256
6079 022266

MOV
BIC
BIC
BIS
MOV
MOV
MOV

R4 ,R3
(SP),R3
R4, (SP)
R3. (SP)
Ré.=(SP)
ML .DUT,=(SP)
NFMT.2.=(SP)

167476

012746 005774

006232
006774

; SP,e

ML.DUT, (SP)

: SAVE,+

4025
,

; SAVE,*
: SAVE,®

#4,-(SP)

: SP,
e

ADD
BR
MOV
CLR
CMP

#30,5P
10%
ML.DUT,RO
R3
R3,RO

;
:
:
* DRV.SEL
: DRV.SEL,*

4020
4022
4031
4029
- 4031

MOV

R3,R2

: DRV.SEL,*

4034

R3.aML .REG+30

: DRV.SEL,*

4035

7%
LSDLY,R2
6%

. o« $8TMP

BEQ

14
63

BIC
BICB
BISB

#177770.R2
#7,3ML.REG+40
R2,ML.REG+40

MOV

#1,R1

BEQ
MOV
BEQ

CLR
DEC

BNE

DEC

(SP)
R2
54,

: o+, 88TMP?

403%6

: $$TMP
. $STMP

. $$TMP?

INC

: DRV.SEL

4029

MOV

RO,R3

;

4039

BI(B
BISB

#7,3ML .REG+40
R3,aML.REG+40

BEQ

aML .REG+30,R4
R4 ,RO
8%

; *,SAVE
. SAVE,+

;

4040
4042
4045

#WRD .14, - (SP)

;

4046

CMP
BLE

BIC

MOV
CMP

TRAP

104455

T0PS
PA:<

SP,RO

MOV

167540

005016
005302

6064 022214

#7,-(SP)
SP,RO
14

TRAP
TRAP

170032

6056 022170 012701

010377

MOV
MOV
TRAP

MOV

001425

6055 022164

6063 022212

22-0ct=1980 10:47:44

MOV

000030

177770
000007
167554

6062 022210

SEQ 0148

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

MOV

170062
004224
000004

042702
142777
150277

6060 022204
6061 022206

PAGE 162

:MLG

6030 022054
6031 022060
6032 022062

6041 022112

;

2859

6033 022064

23-0(T-80 09:11

WORD
"WORD
MORD

MOV

MOV
MOV

R3,#7
3%

#177770.R3

3
ASYNC
O

#WRD.37.-(SP)
#ENC.3,-(SP)

: DRV.SEL,*

CZMLAAD ML-11 LOGIC TEST
'HARDWARD TEST SECTION

;

MACRO M1113

6083
012746
012746

6090 022316

010416

010600
104414

6091 022320
6092 022324

016746
012746

6094 022334

010600

6095 022336

012746
104414

6096 022340
6097 022344
6098 022350

012705
062706
104467

6102 022362

005305

6099 022352
6100 022354
6101 022356

6103 022364

006000
103002
000167

001004

6104 022366

016700

6107 022376

005726

6105 022372
6106 022374

g}gg 022400

SEQ 0149

sMLG

6086 022302
6087 022306

6093 022330

PAGE 163

22=0ct=1980 10:47:44

22-0ct=1980 10:45:32

gggg

6088 022312
6089 022314

23-0CT-80 09:11

6 12

104451
104444

000207

005366
000004

000003

177354

6110
g}}g

MCvV

R4, (SP)

8%:

9%:

108:

; SP,e

: SAVE,+

4047

ML.DUT,=(SP)
. 1,=-(5P)
#FEMT

MOV

SP,RO

: SP,0

MOV
ADD
TRAP

#1,RS
#20,SP
67

; *,DODU.FLG
3
:

4048
4044
4049

DEC

4053
4056

TRAP

SP,RO
14

MOV
MOV

[ [0]"

167574
.

#THR.FMT,=(SP)
#4,-(SP)

MOV
TRAP

167644
004164

000001
000020

MOV
MOV

T0PS

PA:<

ROR
BHIS
JMP

#3,-(SP)
14

RO
9%
1%

MOV

ML.LUN,RO

; DODU.FLG
:

TST

(SP)+

3988

4058

BNE

TRAP
TRAP

RTS

108

51
44
PC

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

19 wordes

6117

6121

6125 022402

6126 022402

6127 022406
6128 022410
6129 022412
g}g? 022414

004767

104466
006000
103773
000207

177322

6132
g}i?
6142

6143 ;

T2::

1%:

JSR

TRAP
ROR
BLO
RTS

PC,$T2
66
RO
1%
PC

;: Routine Size:
6 words
: Maximum stack depth per invocation:
4061

!<BLF/PAGE>

0 words

HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

H 12
PAGE 164

22-0c¢t=1980 10:47: 4

6145 ;MLG

22-0ct=1980 10:45: 3

6146 ;

6188
6189
6190
6191
6192
6193
6194
6195
6196
6197
6198
6199

L
L
L
A
LR L
LR L
T TL P
TR L T
T T
T
T
T
L
T T
T
T

6177
6178
6179
6180
6181
6182
6183
6184
6185
6186
6187

6175
6176

4063

4064
4065
4066
4067
4068
4069
4070
4071
4072

4073
4074

4075

4076
4077
4078
4079
4080
4081
4082
4083
4084
4085
4086
4,087
4088
4089
4090
4091
4092
4094

4095

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZML4.BLI.2

(46)

]

BGNTST;
+4

TEST NUMBER:

TST

TEST NAME:

READ WRITE REG ONES/ZEROES

TEST

TEST DESCRIPTION:

THIS TEST WRITES AND READS A DATA PATTERN OF ALL ONES AND ZEROES TO ALL
OF THE ML11'S READ / WRITE REGISTERS.
ROUTINES WRT_REG AND RD_REG ACCEPT ARGUMENTS TO FURTHER § ELECT ROUTINES

WHICH ACTUALLY PERFORMS THE READING AND WRITING OF THE RE GISTERS.
THE UNIT

IS DROPPED ON DETECTED ERRORS.

IMPLICIT INPUTS:

WT_DATA

LOADED 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 REGISTER

(REPRESENTS BAD DATA).

ERR_FLG,

'ERROR FLAG PASSED TO ROUTINES

index,
DODU_FLG;

POINTS TO REGISTER PRESENTLY BEING TESTED
'DROP UNIT FLAG

TSTOPAT,

'TEST PATTERN

DODU_FLG = ZERO;

TST_PAT = ONES;

'LOAD TEST PAT WITH ONES

6173
6174

incr TWICE
TR T e

6164
6165
6166
6167
6168
6169
6170
6171
6172

6163

6160
6161
6162

4062

6147
6148
6149
6150
6151
6152
6153
6154
6155
6156
6157
6158
6159

SEQ 0150
~N S~

CZMLAAD ML-11 LOGIC TEST

begin

from 0 to 1

incr REG_SEL from 0 to 10 do
begin
BGNSUB;
CLR_MBUS;

'REPEAT LOOP TWICE

'TEST ELEVEN WRITE/READ REGISTERS

WRT REG (,TST_PAT, .REG_SEL, index);
RO_REG (.TST_PAT, .REG_SEL, ERR_FLG);

'WRITE TO THE REGISTER
'READ THE REGISTER

it ERR_FLG IS_SET

'SEE

then

IF READ FOUND AN ERROR

begin

‘IF ERROR FLAG IS_SET THEN ERROR AND SET DODU_7LG

selectone .REG_SEL cf

'SELECT WHICH MODULE FAILED

set

CIMLAAD ML=11 LOGIC

HARDWARD TEST

TEST

MACRO M1113

SECTION

6201

;ML&

6204
6205
6206
6207
6208
6209
6210
6211
6212
6213
6214
6215

;
;
;
;
;
:
;
;
:
;
:
;

4114
4115
4116
4117
4118
4119
4120
(AP
4122
4123
4124
4125

6217
6218
6219
6220

;
;
;
;

4127
4128
4129
4130

23-0(T=-80 09:11

I 12
PAGE 165

22-0ct=1980 10:47:44

2%8% :

6216 ;

6221
6222
6223
6224
6225
6226
6227
6228
6229
6230
6231
6232
25§;

SEQ 0151

22-0ct=1980 10:45:32
(0 to 3] :
ERRDF (&, ASYNC, 0);

'ASYNC MODULE FAILURE

(4 to 5] :
ERRDF (&,

'SYNC MODULE FAILURE

(6 to 10]
ERRDF
tes;

SYNC, 0):

:
(4, ARR_DAT, 0);

PRINTB (FMTT16, .ML REG (.index, REGISTER _kopl1, .47 DATA .RD_DATA);
DODU_FLG
= ONE;
end;
ENDSU'S;
end;

413
4132
(133
4134
4135
4136
4137
4138
4139
4140
4141
6142
4143

if .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;

'DROP THIS UNIT

ENDTST;

6241 022416

004167

161416

6243 022424
6244 022426
6245 022432
6246 022434
6247 022436

005004
012702
005001
005003
104402

6245 022446

016700

6248 022440

152777

6250 022452

042700

6253 022470

010246

6251 022456
6252 022464
6254 022472

142777
150077

010346

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

PRINTB (SIX_FMT, PHR 4, WRD_12, FNC_S5, FNC_6, WRD_52, WRD_56);

4126

024646

'ARRAY DATA MODULE FAILURE

;
:
:
;
:
:
:
;
:
:
;
;
;

62462 022422

TOPS=20 Bliss=16 v2(206)

TST_PAT = not
end;

.TST_PAT;

167516

177770

000007
167250

167272
167254

$13:

JSR

R1,$SAVEL

1$:
2%:

CLR
MOV
CLR
CLR
TRAP

R&
#-1,R2
R1
R3
2

:
;
:
;
:

177777

000040

'REPEAT AGAIN WITH COMPLIMENT DATA

(MP

BISB
MOV

BIC

BICB
B1SB

MOV

MoV

=(SP),=(SP)

#40,aML .REG+40
ML.DUT,RO

THE DODU_FLG IS_SET

4060
DODU.FLG
*,TST.PAT
TWICE
REG.SEL

4095
4096
4098
4101
4102

4103

#177770.R0

#7,3ML .REG+40
RO. QML .REG+40

R2,-(SP)

R3,-(SP)

: TST.PAT,»

: REG.SEL,*

4105

MACRO M1113

CIZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0CT-80 09:11

PAGE

J 12
166

SEQ 0152
147:44
:45:32

JMLG
000010

MOV
ADD

175114

JSR

MOV
MOV
MOV

000012
175464
000012

ADD

JSR

CMP

000001

BNE

#10,-(SP)

SP, (SP)

;

INDEX,*

R2,(SP)
R3 =(SP)

;
;

TST.PAT,«
REG.SEL,*

SP, (SP)
PC.RD.REG

;

ERR.FLG,*

;

ERR.FLG,*

PC WRT.REG

#12,-(5P)
#1
12(5P),

‘BLT
CMP
BGT

000003

4106

4108
4112

; REG.SEL

TST

;

REG.SEL,*
4116

TRAP

.WORD
.WORD
.WORD

000004

6279 022564
6280 022566
6281 022572
6282 022574
6283 022576
6284 022600
6285 022602
6286 022604

000005

060006

6287 022606

6¢88 022612
6289 022614
6290 022620
6291 022622
6292 022624
6293 022626
6294 022630
6295 022832
6296 022636
6297 022642
6298 022646
6299 022652
6300 022656
6301 022662
6302 022666
6303 022672
6304 022674
6305 022676
6306 022702
6307 022706
6308 022712
6309 022714
6310 022716

3%:

4112

CMP
BLT
CMP

BGT

4%:

000012

;

REG.SEL,*

;

REG.SEL,*

TRAP

4119

.WORD
.WORD
.WORD
BR
CMP
BLT
CMP

4112

BGT

;

REG.SEL,*

4122

TRAP

012746
012746
012746
012746

010600
104414

016716
016746
016600
006300
006300
006300

006454
006420
007030
007020
005760

000007
166770
166762

000036

5%:

TOPS
PA:<

.WORD
.WORD
.WORD

MOV

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP

MOV
MOV
MOV
ASL
ASL
ASL

6125

#WRD .56, - (SP)
#WRD.52.-(SP)
#ENC.6,=(SP)
#ENC.S.-(SP)

#WRD.12,-(SP)

#PHR
.4, = (SP)
#SIX.FMT,=(SP)
#7,-(SP)
SP RO
14
RD.DATA, (SP)
WT.DATA. =(SP)

36(SP)
, RO

RO
RO
RO

;

P,
6126

INDEX,*

'CIMLAAO ML=-11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION

TOPS

sMLG

PA:<

011700
005154
000004
000001
000030
000012

MOV
MOV
MOV
MOV
TRAP
MOV
ADD

6%:

ADD

020127
003614
005304
001004
016700
104451
104444

INC
CMP
BLE
DEC
BNE

167152

;

104466

MOV
TRAP
TRAP

7%:
:

004767

177366

006900
103773
000207

CMP

RTS

Routine Size:

JSR

;

!<BLF/PAGE>

SP,*

SP.RO

14
#1,R4

#30,5P

*,DODU.FLG

4127
4110
4102
4128

REG.SEL
REG.SEL,*

4101

TST.PAT
TWICE
TWICE,*

4133
4098

DODU.FLG

4136

ML.LUN,RO

4139

44
(SP)+,(SP)+
PC

4060

131

words

Maximum stack depth per

TRAP
ROR

BLO
RTS

; Routine Size:

L144

#FEMT.16,-(SP)
¥4 ,-(SP)

BLO
INC
CMP
BLE
COM

000001

022626
000207

ML.REG(RO) ,=(SP)

TRAP
ROR

000012

6347

63548
6352
6356 023024
6357 023024
6358 023030
6359 023032
6360 023034
023036

SEQ 0153

invocation:

24 words

6312
6313
6314
6315 022720
6316 022724
6317 022730
6318 022734
6319 022736
6320 022740
6321 022744
6322 022750
6323 022754
6324 022756
6325 022760
6326 022762
6327 022764
6328 022770
6329 022772
6330 022774
6331 022776
6332 023002
6333 023004
6334 023006
6335 023010
6336 023014
6337 023016
6338 023020
6339 023022
6340
6341
6342

—_—

K 12
PAGE 167

23-0CT-80 09:11

6141

“PC,$T3
66
RO
1%
PC

6 words
Maximum stack depth per

]

invocation:

0 words

MACRO M1113

CIZMLAAOD ML=11 LOGIC TEST

'HARDWARD TEST SECTION

23-0CT-80 09:11

L 12

PAGE 168

SEQ 0154

6376 JMLG
6377
6378

:32

TOPS=20 Bliss=16 v2(206)

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

BGNTST:

LR TR LR L L A

l4e

TEST NUMBER:

TST &

TEST NAME:

READ WRITE REG SHIFTING ONES/ZEROCES TEST

TEST DESCRIPTION:
THIS TEST WRITES AND READS A

T T T L L P

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.

T T L

THE DRIVE
ERRORS.
IMPLICIT INPUTS:
WT_DATA

T
T
R T T
e T T T L
e
e
R TR
TR TR T TR
T
R

IS DROPPED ON DETECTED

“nn
4172

6173

174
6175
4176
677
6178
6179
4180
4181
4182
4183
4184
4185
4186
6187
4188
4189
4190
N
4192
4193
6194
4195
4196

COADED BY READ REGISTER ROUTINES AND

CONTAINS THE DATA PATTERN WRITTEN TO THE

REGISTERS (REPRESENTS GOOD DATA).
RD DATA

COADED BY THE READ REGISTER ROUTINES AND
CONTAINS THE DATA PATTERN READ FROM THE

local
ERR_FLG,
TST PAT,
index,
DODU_FLG;

'ERROR FLAG PASSED TO ROUTINE
'TEST PATTERN

'POINTS TO REG PRESENTLY BEING TESTED
!DROP UNIT FLAG

DODU_FLG = ZEROD;

TST_PAT = ONE;

'LOAD TST_PAT WITH A 1 IN A FILED OF 0'S

incr SHIFT from 0 to 15 do
begin

'DO SHIFT 16 TIMES

incr TWICE
begin

from 0 to 1 do

'REPEAT LOOP TWICE

(ZHLAAO ML-11 LOGIC TEST
sNARDHARD TEST SECTION
.
6432 ;MLG

MACRO M1113

23-0CT-80 09:11

Mm12

PAGE 169

22=0ct=1980 10:47:44

gzgz ;

22-0ct=1980 10:45:32

6435 ;

4197

6437 ;
6438 ;

4199
4200

BGNSUB;
CLR MBUS

glzz? :

ggg

RD_REG (.TST_PAT, REG SEL, ERR_FLG);

6436 ;

6439 ;

6442 ;
6443
6444
644S
6446
6447
64LLS
6449
6450
6451
6452

6453
6454
6455
6456
6457

;
;
;
;
;
;
:
;
;
:

;
;
;
;
;

6458 ;

6459 ;

6460 ;
6461 ;

6462
6463
6464
6465
6466

6474
6475
6476
6477
6478
6479

;
;
;
;
;
;

2232 :

then

4221

selectone .REG_SEL of
set

'FIND WHICH MODULE FAILED

'ASYNC MODULE FAILURE

(4 to 5] :
ERRDF (5, SYNC, 0);

'SYNC MODULE FAILURE
'ARRAY DATA MODULE FAILURE

ENDSUB;
end;

TST_PAT = not .TST_PAT;
end;

4232
4233

'REPEAT WITH A O IN A FIELD OF 1°'S

TST_PAT
= _TST_PAT“ONE;
end;
if .DODU_FLG IS_SET
then

‘

begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

6491 023040

004167

161014

6493 023046
6494 023050
6495 023054
6496 023056
6497 023060

005005
012703
005001
005002
005004

024646

[0 to 3] :
ERRDF (5, ASYNC, 0);

DODU_FLG= ONE;

4242

6492 023044

'IF THE ERROR FLAG IS_SET THEN ERROR

end;

4229
4230

4236
4237
4238
4239
4240
42461

'READ THE REGISTER

PRINTB (FMT-16, .ML_REG[.index, REGISTER_ADD], .WT_DATA, .RD_DATA);

4223

4235

'WRITE TO THE REGISTER

PRINTB (SIX_FMT, PHR 4, WRD_12, FNC_5, FNC_6, WRD_52, WRD_ 56);

4222

4234

'TEST ELEVEN READ/WRITE REGISTERS

'SEE IF THE READ FOUND AN ERROR

(6 to 10] :
ERRDF (S ARR_DAT, 0);
tes;

4220

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

begin

4215
4216
4217
4218
4219

423

6473 ;

if .ERR_FLG YS SET

4205
4206
4207
4208
4209
4210
4211
4212
4213
4214

6469 ;
6472 ;

WRTTMREG (.TST PAT, .REG_SEL, index);

4204

4224
4225
4226
4227
4228

6470 ;
6471 ;

begin

4201

;
;
;;
;

6467 ;
6468 ;

incr REG_SEL from 0 to 10 do

4198

SEQ 0155

TOPS=20 Bliss=16 vc(206)

'SHIFT THE 1 iN THE FIELD OF 0°'S

.
-

'DROP THIS UNIT IF DODU_FLG IS SET

$T4:

JSR

R1,$SAVES

1%:
2%:

CLR
MOV
CLR
CLR
CLR

RS
#1,R3
R1
R2
R4

: DODU.FLG
: *, TST.PAT
: SHIFT
: TWICE
. REG.SEL

000001

CMP

=-(SP),=(SP)

4143
s
:
‘

4188
4189
ALY
4194
6197

sm—

'CZMLAAD ML-11 L

'HARDWARD TEST

6498 023062

MACRO M1113

6499 023064

000040

6500 023072
501 023076
6502 023102
6503 023110
6504 023114
6505 023116
6506 023120
6507 023124
6508 023126
6509 023132
6510 023134
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
6524 023202
6525 023204
6526 023210
6527 023212
6528 023216
6529 023220

166624

TRAP

166646

BISB

MOV

BIC
BI(B
BISB

166630

MOV
MOV
MOV
ADD

000010
174470

JSR

000003

MOV
MOV
MOV
ADD
JSR
CMP
BNE
TST
BLT
CMP

000004

TRAP
.WORD
.WORD
.WORD
BR
CMP

000012
175040
000012

000001

ON12

PAGE 169-1

4%:

000005

SEQ 0156

4198
4199

#40,
. aML
REG+40
ML.DUT,RO

#177770,R0

#7,3ML .REG+40
RO,aML .REG*+40
R3,=(SP)
Ré = (SP)

;
:

TST. PAT ,*
REG. SEL,*

SP, (SP)

;

INDE X,*

R3. (SP)

R& . =(SP)

;
;

¢+
18T LPAT
REG. SEL,*

SP, (SP)

ERR. FLG,*

12(5P)
, #1
7%

;

ERR. FLG,*

4204

;

REG. SEL

4208

REG. SEL,*

0n0,-(sp)
PC.WRT.REG

#12,-(SP)
PC.RD.REG

BGT

BLT

;

REG. SEL,*

;

REG. SEL,*

000006

SS.:« .

000012

104455
000005
007534

;

REG.

CMP

;

REG.

BLT

BGT

JMLG

006454
006420
007030
007020
005760
006630
005432
000007

.WORD
.WORD
.WORD
BR
CMP

6%:

TRAP
.WORD
.WORD

.WORD
MOV

MOV
MOV
MOV
MOV
MoV
MOV
MOV
MOV
TRAP

4202

42084 4215 |

TRAP

020427
002407
020427
003004

4201

4212

CMP
BGT

6530 023222

6531 023224
6532 023226
6533 023230
6534 023232
6535 023236
6536 023240
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

23-0CT-80 09:11

4208

4218
ARR.DAT

TOPS
PA:<

0
#WRD.56,-(SP)
#WRD.52,-(SP)
#ENC.6,=(SP)
#FNC.S.=(SP)

#WRD.12,-(5P)

#PHR
.4, - (SP)
#SIX.FAT,=(SP)

#7,-(SP)
SP RO
14

SP"

'CIMLAAQ M L-1

MACRO M1113

iHARDUARD TEST
6555 023322
6556 023326
6557 023332
6558 023336
§59 023340
6560 023342

6564 023360
6565 023362
6566 023364
6567 023370
6568 023374
6569 023400
6570 023402
6571 023404
6572 023406
6573 023410
6574 023414
6575 023416
6576 023420
6577 023422
6578 023426
6579 023430
6580 023432
6581 023434
6582 023440
6583 023442
6584 023444
6585 023446
6586 023452

6587 023454
6588 023456
6589 023460
6590
6591
6592
6600
6601
6605
6609 023462
6610 023462
6611 023466
6612 023470
6613 023472
6614 023474

RD.DATA, (SP)
WT.DATA,=(SP)

011700
005154
000004

MOV
MOV
MoV
MOV
TRAP
MOV
ADD
ADD
TRAP
ROR
BLO
INC

ML.REG(RO) ,=(SP)

7%:

103626

000017

104466

INDE,X*

36(SP) RO

#EMT.16,-(SP)
¥4 ,-(SP)

SP,RO

SP,¢

14
#1,R5
#30,sP
I}Z,SP

*,DODU.FLG

166514

8%:

6197

COM

TST.PAT
TWICE
TWICE,*

4229
4194

ASL
INC

TST.PAT

4232
619N

DODU.FLG

4235

SHIFT
SHIFT,«

Mov
TRAP
TRAP

ML.LUN,RO

RTS

CMP

Routine Size:

JSR
TRAP

6143

(SP)+,(SP)+
137 words

PC,874

ROR

66
RO

RTS

BLO

4238

Maximum stack depth per

T4::
1%:

4223

4206
4198
4224

REG.SEL
REG.SEL,*

CMP
BLE
DEC
BNE
.

;

006000
103773
000207

4222

INC
CMP
BLE

000001

177352

SEQ 0157

CMP
BLE

000012

;

004767

PAGE 169-2

MOV
MOV
MOV
ASL
ASL

006000

104451
104444
022626
000207

23-0CT-80 09:11

166344
166336
000036

000001
000030
000012

005204
020427
003622
005103
005202
020227
003614
006303
005201
020127
003606
005305
001004
016700

invocation:

25 words

4240

'HARDWARD TEST

SECTION

23-0CT-80 09:11

€13

PAGE 170

BGNTST;
l44

TEST NUMBER:

TST 5

TEST NAME:

N I

O P

L I P I

|
.

TEST DESCRIPTION:
THIS TEST TESTS THE ABILITY OF
ALL ACCESSIBLE ML11 REGISTERS
TO CLEAR OUT REGISTER DATA OFf

ONE'S AND ZEROES PATTERN.

|
.

ROUTINE WRT REG WRITES A

PATTERN TO THE SELECTED REGISTER.

|
.

i
.

A MASS BUS CLEAR IS DONE.

|
.

THEN ROUTINE RD REG READS THE

SELECTED REGISTER FOR CLEARED DATA

L T I T

INITIALIZATION TEST

A I I

THE DRIVF

IS DROPPED ON DETECTED ERRORS.

THIS TEST WILL ALSO READ THE

DRIVE TYPE REGISTER FOR ITS
INITIAL REGISTER VALUE.

IMPLICIT INPUTS:

REG_INIT FLG

THIS GLOBAL FLAG TELLS THE ROUTINES

WHICH READ THE DATA DIAGNOSTIC
REGISTERS (RD_D1, RD D2, RD D3)

T0 DO A MBUS TLEAR BEFORE READING
}Egrasexsren DURING THE REG INIT

THIS FLAG IS NEEDED DUE TO THE UNIQUE
MANNER IN WHICH THESE REGISTERS
MUST BE READ.

R T P P T D R P L R R R

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

RD DATA

LOADED BY THE READ REGISTER ROUTINE

TR T R T E

AND CONTAINS THE DATA PATTERN READ FROM
THE REGISTER (REPRESENTS BAD DATA).

DRIVE TYPE

LOADED DURING THE INITIALIZATION CODE AND
STORES THE EXPECTED CONTENTS OF THE DRIVE

TRIR IR

MACRO M1113

TYPE REGISTER.

local

T
|

'CZMLAAO ML=-11 LOGIC TEST

CIZMLAAD ML-11 LOGIC TEST

HARDWARD TEST SECTION

23-0CT-80 09:11

MACRO M1113

D 13

PAGE 171

22-0ct=1980 10:47:44

6676 ;MLL

22-0ct=1980 10:45:32

22;; :

6679 :
6680 ;

6681 ;

6682 ;
6683 ;
6684 ;

6685 ;

4297
4298

TST_PAT,
ERRCFLG,

4300
4301
4302

CLR _DATA,
SAVE,
DODU_FLG;

4299

4303

6686 ;
6687 ;

4304
4305

6690 ;

4308

6688 ;
6689 ;
6691 ;

4306
4307
4309

6692 ;
6693 ;

4310
4311

6696 ;
6697 ;

4314
4315

6694 ;
6695 ;

6698 ;

gggg 3

6701 ;

4312
4313

4316

2%};

4319

index,

'POINTS TO REG PRESENTLY BEING TESTED

'STORES CALCULATED REGISTER CLEAR DATA
' TEMPORARY STORAGE LOCATION
'DROP UNIT FLAG

ML REG [19, FORCE HI)= Xo'177777';
REG_INIT_FLG = ZERO;

'BACKGROUND PATTERN

incr TWICE from 0 to 1 do

'REPEAT LOOP TWICE

begin

incr REG_SEL from 0 to 13 do
begin
BGNSUB;
CLR HBUS

WRT REG .TST PAT, .REG_SEL, index);

CLR DAIA (.A1) or (.IBNORE);
then

2%5;

RD_REG (.CLR_DATA, .REG_SEL, ERR_FLG);

6711 ;

4329

it .ERR_FLG IS_SET

g;}i :

:%g}

6715 ;

4333

6718 ;
6719 ;

4336
4337

6712 ;

6716 ;
6717 ;

6720 ;
6721 ;

6722 ;

6723 ;

6724 ;

6725 ;

6726 ;
6727 ;

6728 ;

6729 ;
6730 ;

2%52

4330

4334
4335

4338
4339

4340
4341

then

REG_INIT_FLG = ONE;

'Ok 10 CLE/R THESE REG'S HERE

'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

8. 1. 2. L W, 13 ¢
ERRDF (6, ASYNC, 0);
4, 3, 113

ERRDF (6, SYNC, 0);

(6 to 10] :

4344
4345

tes.;

ERRDF (6 ARR_DAT, 0);

4346

PRINTB (SIX_FMT,

4348

DODU_FLG = ONE;

4347

'WRITE REGISTER WITH BACKGROUND

'CALCULATE THE CLEARED DATA PATTERN

begin
CLR_MBUS;
end

4342

4343

'TEST THIRTEEN REGISTERS

it (LREG_SEL neq 7) and (.REG_SEL neq 8) and (.REG_SEL neq 9)

g;?g :

6;8; :

'CLR DATA FOR MLPD !S ONES

oooU FLG= ZERO;
TST_!BAT= ONES;

else

;
;
;
;
;

TOPS=20 Bliss=16 v2(206)

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

'TEST PATTERN
'ERROR FLAG PASSED TO ROUTINE

4320
4321
4322
4323
«324

6702
6703
6704
6705
6706

SEQ 0159

'ASYNC MODULE FAILURE

'SYNC MODULE FAILURE
'ARRAY DATA MODULE

PHR 4, WRD_ 12, WRD 52, WRD 23, WRD 52, WRD_56);

PRINTB (FMTTM16, .ML REG (.index, REGISTER_ABD], .CLR DATA TRD_DATA);

HARDWAPD TEST

SECTION

23-0CT-80 09:11

PAGE

£E_13
172

SEQ 0160

6732 ;MLL

6733 ;
6734
6735
6736
6737
6738
6739
6740
6741
6742
6743

:32
end;

ENDSUB;
end;
ST_ PAT
end;

6760

6761
6762
6763
6764
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

= not

'REPEAT WITH COMPLIMENT BACKGROUND PAT

.TST_PAT;

ML_REG (19, FORCE_WI] = ZEROES;

6744
6745
6746
6747
6748
6749
6750
6751
6752

6753
6754
6755
6756
6757
6758
6759

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (48)

'RESTORE MLPD FORCED_HI

NOW TEST THE DRIVE TYPE REGISTER

i
if .MLDT neq
then

.DRIVE_TYPE

! COMPARE REG CONTENTS TO CALCULATED VALUE

beain
ERRDF (113, ASYNC, 0);
PRINTB

(TWO_FMT,
A

REG

7. PHR_4);

PRINTB (FMT_2, .DRIVE_TYPE,

437
4372
4373
4374
4375

4376
4377
4378
4379

004167
162706
012767
005067
005005
012702
005001
005004
104402
152777
016703

042703

142777

end;

if .DODU_FLG
then
begi n

.SAVE);
'DRGP THIS UNIT

IS_SE)

DODU_FLG IS_SET

DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

160356
000006
177777
166156

$15:
166416

177777

000040

166422
177770
000007

JSR
SuB

MOV

CLR
CLR

MOV

(LR
CLR

TRAP

166176

BISB

166160

BIC
BI(B

MOV

R1,$SAVES
¥6,5P
#-1,ML.REG+232
:gG.lNIT.FLG

#-1.R2
R1
R

#40,aM
. REG#+40
L
ML.DUT,R3

#177770,R3

#7,3ML
. REG*40

4242

DODU.FLG

*, IST.PAT

TWICE
REG.SEL

4304
4305
4306
4307
4309
6312
6313
6314

T o~

MACRO M1113

CIZMLAAD ML-11 LOGIC TEST

CIZMLAAD ML-11 LOGIC TEST
HARDWARD TEST

MACRO M1113

SECTION

F_13
PAGE 173

SEQ 0161
1L7:44
:45:32

JMLG

6787
6788
6789
6790 023560
6791 023564
6792 023566
6793 023570
6794 023574
6795 023576
6796 023602
6797 023606
6798 023610
6799 023612
6800 023614
6801 023616
6802 023622
6803 023626
6804 023632
6805 023636
6806 023640
6807 023644
6808 023646
6809 023652
6810 023654
6811 023662
- 6812 023666
6813 023672
6814 023700
6815 023704
6816 023706
6817 023714
6818 023720
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

166154

BISB

000012

BIS

Mov

CMP
BEQ
CMP
BEQ
CMP
BEQ
BISB

000010
000011

000040
166302
177770
000007
166034

000001
000006

166056

MOV

BIC
BICB
BISB

166040

165762

3%:

4%:

000014
174254
000014

BLT

000003
000014

5%:

000015
6%:

000004

7%:

000005

020427

000013

MOV
MOV
MOV
MOV
ADD

JSR
CMP
BNE
TST

000001

8%:

;
;

TST.PAT,«
REG.SEL,*

sP, (SP)

;

INDEX,*

12(SP) .RO

;

INDEX,*

MOV

ASL
ASL
ASL
MOV
MOV

011702
011706
000006
000007

R4 =(5P)

#12,-(5P)

JSR

174020

000012

R3,aML .REG+40
R2.-(5P)

MOV
MOV
MOV
ADD

CMP
BLE
CMP
BLT
CMP

PC WRT.REG

RO,R3
ML.REG+2(R3)
,RO
ML.REG+6(R3)
RO
RO,6(SP)
R4, #7

3%
RG,#10
38

R4, #11

: #,CLR.DATA

;

REG.SEL,*

;

REG.SEL,*

;

REG.SEL,*

Cme

4317

4319

ML.DUT,RO

#177770,R0

#7,3ML.REG+40

2?.3HL.REG*4O

#1 ,REG.INIT.FLG

4319
4325
4327

6(SP), (SP)

: CLR.DATA,+
.

REG.SEL,*

SP, (SP)

;

ERR.FLG,*

;

ERR.FLG,*

4329

;

REG.SEL

4333

;

REG.SEL,*

;

REG.SEL,*

;

REG.SEL,*

k& ,=(SP)
#14,-(SP)

PC,RD.REG
.N
14(SP)

12%

4337

TRAP

BLT
CMP
BLE

64316

4321

#40,3ML
. REG+40

BGT

.WORD
.WORD
.WORD
BR
(MP

TOPS
<
PA:

4333
;

REG.SEL,*

;

REG.SEL,*

;

REG.SEL,*

CZMLAAD ML=11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

6843
2322
001005

6848 024030
6849 024032
6850 024034

000006
007500
000000

6851 024036
6852 024040
6853 024044
6854 024046
6855 024052

6856 024054

104455

000412
020427
002407
020427
003004

9% :

000006

104455

6861 024070
6862 024074
6863 024100
6864 024104
6865 024110
6866 024114
6867 024120
6868 024124
6869 024126

012746
012746
012746
012746
012746
012746
012746
010600
104414

006420
006076
006420
005760
006630
005432
000007

016646
016346
012746

000032
011700
005154

6871 024134
6872 024140
6873 024144

6874 024150

6875 024154
6876 024156

6877 024160
6878 024164

6879 024170
6880 024174

6881 024176
6882 024200
6883 024202

6884 024206

6885 024210
6886 024214

6887 024216
6888 024220
6889 024222
6890 024226
6891 024230

012746

016716
012746

010600
104414

012705
062706

062706
104467

006000
103002
000167

005204

104455

6896 024252

001431

000161

007444

10%

.WORD
.WORD
LWORD

6
SYNC
0

BLT
CMP
BGT

11%
R4, #12
11%

TRAP

gR
(MP

000012
.
177324

12%:
]

13%:

14%:

165672
165564

165426

15%:

1%
R&4 ,#6

;
: REG.SEL,*

4340
4333

: REG.SEL,*

;

4343

#WRD.56,=(SP)

;

4346

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP

#WRD.52,-(SP)
#WRD.23,-(SP)
#WRD.52,-(SP)
#WRD.12,-(SP)
#PHR
.4, = (SP)
#SIX.FMT,=(SP)
#7,-(SP)
SP,RO
14

MOV

TOPS
PA:<

6
ARR.DAT
0

RD.DATA, (SP)

; SP,e

6347

MOV
MOV
MoV

32(SP),=(SP)
ML.REG(R3),-(5P)
#FMT.16,-(SP)

MOV
TRAP

SP,RO
14

: SP,e

#12,5P
67

:
;

4313
4349

; REG.SEL

6312

R2
R1

: TST.PAT
: TWICE

4354
4309

CLR
CMP

ML.REG#+232
aML.REG+130,DRIVE.TYPE

:
:

4357
4364

TRAP

.WORD

ASYNC

#4,-(SP)

MOV
ADD

#1,RS
#30,SP

ROR
BHIS
JMP

RO
14%
2%

ADD
TRAP
INC

CMP
BLE

COM
INC

177274

.WORD
.WORD
LWORD

MOV

000001
000030

000001

6895 024250

BNE

MOV

000004

020127
003002
000167

005102
005201

118%:

165536

000015

005067
027767

6897 024254

006454

020427
003772

6892 024234
6893 024240
6894 024246

SEQ 0162

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

TRAP

000006
007534
000000

6870 024130

10%:

000012

6857 024056
6853 024060
6859 024062

6860 024064

6_13
PAGE 174

;ML
)

6846 024024

6847 024026

23-0CT-80 09:11

(MP
BGT
JMP
BEQ

.WORD

R4, #15
13%

R1.M
15%
1%
16%

161

: CLR.DATA,+*

: *,DODU.FLG
3

4348
4331

: REG.SEL,*
:

: TWICE,

4367

CIMLAAO ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

6899

6902 024256

|
'

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

000000

012746

012746
012746
012746
010600
104414

010416

016746
012746
012746
010600
104414

165362
004224
000003

016700

165624

6921 024346

062706

000006

001004

104451
104444

000207

6924
6925

6940 024354

004767

6944 024366
6945
6946

000207

6941 024360
6942 024362
6943 024364

6947

6952 ;

MOV
MOV
MOV
MOV
TRAP

MOV

16%:

17%:

MOV
MoV
MCV
MOV
TRAP

ADD
DEC

#PHR .4 ,=(SP)

104466
006000
103773

4380

177116

15::

1%:

TOPS

PA: <

4368

; SP,+

4369

: SAVE,*

R4, (SP)

DRIVE.TYPE,=(SP)
#EMT.2,-(SP)
#3,-(SP)
SP,RO
14

;3 SP,¢

#16,5P
RS

3
; DODU.FLG

4366
4372

MOV

ML.LUN,RO

4375

ADD

#6,SP

4242

6377

BNE

TRAP
TRAP

RTS

JSR

TRAP
ROR
BLO
RTS

!<BLF/PAGE>

#REG.7,-(SP)
#TWO.FMT,=(SP)
#3,-(SP)
SP,RO
14

17%

51
44
PC

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

6930
6931
6935

6939 024354

22-0ct=1980 10:45:32

MOV

007350
005356
000003

6918 024336

ggg% 024352

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

006630

000016

6919 024342
6920 024344

SEQ 0163

sMLG

062706
005305

6917 024334

H_13

PAGE 175

;

ggg?

6903 024260

23-0CT-80 09:11

26 words

PC,8T5

66
RO
1%
PC

: Routine Size: 6 words
: Maximum stack depth per invocation:

0 words

CIZMLAAOD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

113

PAGE 176

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

6954 ;ML4
2325 :
o}

6957
6958
6959
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 :
6991 ;

6992 ;
6993 :
6994

6995 ;

6996 ;

6997 ;

4381
4382
4383
4384
4385
L4386
4387
4388
4389
4390
4391

4392
4393
4394
4395
4396
4397
4398
4399
4400
4401

4402
4403
4404
4405
4406
4407
4408
4409
4410
4411

4412

44613
4414
4415

4416
4417
4418

4419

4420

+¢
' TEST NUMBER:
TST 6
!
REGISTER SELECTION TEST
| TEST NAME:
*
| TEST DESCRIPTION:

i
|
|
|
|
|
!
i

THIS TEST TESTS FOR UNIQUE REGISTER
SELECTION BY FIRST WRITING A BACKGROUND
PATTERN INTO ALL READ/WRITE REGISTERS

IT THEN WRITES A COMPLIMENT
BACKGROUND PATTERN INTO ONE REGISTER
AND READS THE REMAINING UNWRITTEN
REGISTERS FOR AN UNCHANGED BACKGROUND
PAT

!
!

!
THIS PROCEDURE IS REPEATED UNTIL ALL
REGISTERS HAVE BEEN WRITTEN WITH A
!
!
COMPLIMENT BACKGROUND PATTERN.
!
| IMPLICIT INPUTS:
NONE
!
!
Llocal

DODU FLG,

TST_PAT,
ERRTFLG,
index;

pop0 FLG= ZERO;

TST_PAT = Xo' 125252 ;

4424

WRTTPA (.TSTTPAT. 8):

7001
7002
7003
7004
7005
7006
7007
7008

4425
4426
44627
4428
4429
4430
43
4632

'DROP UNIT FLAG

'TEST PATTERN
'"ERROR FLAG PASSED 7O ROUTINE;
'POINTS TO REGISTER PRESENTLY BEING TESTED.

BGNSUB;
CLR _MBUS;

4421
4422

4423

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

!
!
!
BGNTST;

WRTZCS1 (.TST_PAT, 0);
URT_ER k. TSY_FAT 6);

6999
7000

SEQ 0164

WRT-DA (.TSTCPAT, 3);

'LOAD TST PAT WITH ALTERNATE 1'S & 0°'S

'WRITE A BACKGROUND INTO ALL THE DIRECTLY
'ACCESSABLE READ WRITE REGISTERS

WRTTE1 (.TSTCPAT, 13);
WRT_E2 (.TST_PAT, 14);
incr CNT_1 from O to & do
begin
1ST_PAT = not .TST_PAT;
;
case .CNT_1 from 0 to 4 of

'WRITE A COMPLIMENT PATTERN INTO ONE REGISTER
'GENERATE THE COMPLIMENT PAT

'SELECT THE REGISTER TO WRITE

INTO

CIMLAAD ML-11 L

HARDWARD TEST S

7010 sMLG
7011
7012
7013
7014
7015
7016
7017
7018
7019
7020
7021
7022
7023
7024
7025
7026
7027
7028
7029
7030
7031
7032
7033
7034
7035
7036
7037
7038

R T

TR D LR L L

7039
7040
7041

1 EST
ION

MACRO M1113

23-0(T-80 09:11

PAGE

SEQ 0165

38 }8§2;2§3
44633
4434
4435
4436
4437
4438
4439

4440
4481
4442

4443

4444
4445
4446
4447
4448
4449
4450
4451
4452
4453
4454
4455
4456
- 4457
4458
4459
4460
4461
4462
4463
4464
4465
4466
4467
4468
4469
4470
L4671
4472

4473
L474
4475
4476
477
4478
4479
4480

4481
4482
4483
4484

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLML4.BLI.2 (49)

set

[0l
1]

L2)

(3]
(4]
tes;

TST_PAT

WRT_CS1

WRT_ER

(.TST_PAT

0);

'FIRST PASS WRITE COMP PAT TO MLCST

'SECOND PASS WRITE COMP PAT TO MLER

(.TST_PAT, 6);

¢
WRT_DA (.TST_PAT, 3);

ITHIRD PASS WRITE COMP PAT

TO MLDA

WRT_PA (.TST_PAT, 8);

'FORTH PASS WRITE COMP PAT TQ MLPA

WRT_E1 (.TST_PAT, 13);

'FIFTH PASS WRITE COMP PAT TO MLE1

= not

'COMPLIMENT

.TST_PAT;

incr CNT_2 from
begin

.CNT_1

¢+ 1

to 5 do

case .CNT_2 from 0 to 5 of

TST_PAT BACK TO BACKGROUND

'NOW READ THE REMAINING UNWRITTEN REGISTERS FOR AN
'UNCHANGED BACKGROUND
'SELECT

THE

TO READ

set

(0l
(1]

[2]

(3]

RD_CS1 (.TST_PAT, index = 0, ERR_FLG);
:

(.TST_PAT,

index

6, ERR_FLG);

'READ MLER

:
RD_DA (.TST_PAT,

index

3, ERR_FLG);

'READ MLDA

RD_ER

index

8, ERR_FLG);

'READ MLPA

(.TST_PAT,

index

13, ERR_FLG);

'READ MLE1

RD_E2 (.TST_PAT, index

14, ERR_FIG);

'READ MLE2

RD_E1

tes;

(.TST_PAT,

RD_PA

(4] :

£}!

!READ MLCSI

it .ERR_FLG
;
then
begin

IS_SET

selectone .(NT_2 of
set

'SEE

READ FOUND AN ERROR

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

TR TR TR TR T

R P PR

7113 024440

7114 024442
7115 024446

7116 024450
7117 024454
7118 024460
7119 024462

SEQ 0166

2=-0ct=1980 10: 7:44
2=0ct=1980 10: 5:32
(0 to 2]

4485
4486
4487
4488
4489
4430
4491

ERRDF

4507
4508
4509
4510

004167
005746

104402
152777

016703
042703

1462777
150377

005005
012704
010446
005046
004767
010416
012746
004767
010416
012746

7110, ASYNC, 0);

(3 to 5] :
ERRDF (110, ARR_DAT, 0);

'ASYNC MODULE FAILURE

'ARRAY DATA MODULE FAILURE

tes;

4492
4493

4494
4495
4496
w497
4498
4499
4500
4501
4502
4503
4504
4505
4506

TOPS=20 Bliss=16 v2(206)

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

PRINTB

(THR_FMT, WRD 38, WRD_37, WRD_1J);

PRINTB (FMT 16, .ML_REG [.index, REG TSTER_ADD],
DODU_FLG = ONE;

.WT_DATA, .RD_DATA);

end;

end;
end;

L I I I TR

7075
7076
7077
7078
7079
7080
7081
7082
7083
7084
7085
7086
7087
7088
7089
7090
7091
7092
7093
7094
7098
7102 024370
7103 024374
7104 024376
7105 024400
7106 024406
7107 024412
7108 024416
7109 024424
7110 024430
7mm
7112

K_13
PAGE 178

7074

R I I

N I

7066 sMLG
7067 ;
7068
7069
7070
7071
7072
7073

23-0CT-80 09:11

ENDSUB;

'DROP THIS UNIT

it .DODU_FLG IS_SET
then

IF DODU_FLG IS_SET

begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;
157464

000040

$76:

165332

1%:

JSR

TST
TRAP

BISB

R1,$SAVES

4379

#40,aML
. REG+40

44615
L4617

E(SP)

MOV
BIC

ML.DUT,R3

125252
.

BISB
CLR
MOV
MOV

:B.GHL.REGfko
5
R4
#-52526

167526

JSR

165556
177770

000007

165310

000006
167672

000003

165314

BICB

CLR

MOV

MOV
JSR

MOV

#177770,R3

#7,3ML .REG+40

R4 ,-(SP)
-(SP)

PC,WRT.CST
R&4, (SP)
#6,-(SP)
PC,WRT.ER
R4, (SP)

#3,-(SP)

;: DODU.FLG

4619
4420
4621

3
:

2 1SV .PAY
TST.PAT,«

;

TST.PAT,»

6422

: TST.PAT,»

4423

CIZMLAAOD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

L_13

PAGE 179

SEQ 0167
22~0ct=19 80 10: 47:44
22-0ct=19 80 10:45:32

JMLG
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 024550
7142 024552
7143 024554
7144 024556
7145 024560
7146 024562
7147 024566
7148 024570
7149 024572
7150 024576
7151 024602
7152 024604
7153 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

004767
010416
012746
004767
010416
012746
004767
010416
012746
004767
005001
005104
010103
006303
066307
000012

JSR

170036

MOV
MoV

000010
170360

JSR
MoV
MOV

000015
170554

JSR

MOV
MOV

000016
170750
2%:

024544

3$:

4%:

167406

000006
167550
000003
167712

000010

5%:

170424

6%:

010446

.WORD
.WORD
.WORD
~ .WORD
.WORD

CLR
JSR

MoV
MoV

MoV
MOV

8%:
9%:

JSR
COM

7%:

11%:

12%:

PC,WRT.DA
R& . (SP)

;

181, PAT ,*

4624

PC,WRT.PA
R& . (SP)

;

,«
TST. PAT

4425

PC.WRT.E1
R&. (SP)

;

TST. PAT,+

4426

;

CNT.
187,
CNT.

4428
4430
4432

,+
181, PAT

4436

: TST PAT¢«

44632
4439

: TST. PAT ,+

4432
4442

R4 ,=(SP)

,+
: TST. PAT

PC,WRT.PA
9%
RG4 ,-(SP)

181

#10,-(SP)

#15,-(sP)
#16,-(SP)

PC,WRT.E2
R
R4

MOV

PC,WR1.CS1
9%
R4 ,=(SP)
#6,-(SP)
PC,WRT.ER

R4 ,=(SP)
#3,-(SP)
PC,WRT.DA

n0,-(sp)

ns,-(sp)

MOV

PC.WRT.E1
R4
R1,R3

MOV
ASL
ADD

R3,RO
RO
118(RO) ,PC

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

MoV

;
;

3S(R2).PC

MOV

JSR
BR
MOV
MOV
JSR
BR
MOV

10%:

024664

MoV
ASL
ADD

JSR

170232

000015

JSR
CLR
COM

TOPS

PA:<

22%

PAT ,*

6432
4445

4432
L448

;

T8Y. PAT

CNT .1.CNT.2

4451
4453

;

CNT 2,

4456

1S3 PAT ,»

4460

|CZMLAAD ML=11 LOGIC TEST
'HARDWARD TEST SECTION

MACRO M1113

Conn

005002

7182 024706
7183 024712
7184 024714

012746
060616
004767

005046

7185 024720 000461
7187 024724
7188 024730
7189 024732
7190 024736

7191 024740

010446

012702
010246
012746
060616

167324

000030

7194 024750
7195 024754

012702
010246

000003

7197 024762

060616

7199 024770
7200 024772

000435
010446

7192 024744 000447
7193 024746. 010446

13%:

000006

167456

14%:

7196 024756 012746 000030 ,

7201 024774
7202 025000

004767

012702
010246

7204 025006

060616

7206 025014
7207 025016

000423
010446

004767

000010

7213 025040
7214 025042

7215 025044
7216 025050

060616
004767

000411
010446

012702
010246

15%:

060616
004767

168:

7221 025072

881064

000016

7223 025076

002410

225 0251064

003005

7227 025110
7228 025112
7229 025114

000156
007444
000000

7231 025120

020327

7220 025064 026627 000030 000001
7222 025074

7224 025100

7226 025106

178:

: ERR.FLG,*

MOV

R4 ,=(SP)

; TST.PAT,«

JSR

PC.RD.ER

MOV
MOV
MOV
ADD

BR
MOV
MOV
MOV

18%:

#6,R2
R2.=(SP)
#30,-(5P)
SP, (SP)

: «, INDEX
. INDEX,*

18%
R4 ,-(SP)

;
;s TST.PAT,«

#3.R2
R2.-(SP)

: «, INDEX
: INDEX,*

#30,-(SP)

;
; TST.PAT,«

MOV

#30,-(5P)

MOV
MOV

PC.RD.DA

; ERR.FLG,*

18%
R4 ,-(SP)

;
L IST.PAT,*

MOV

#5,R2

BR
MOV

MOV
MOV

#6,R2
R2,-(SP)

BR
MOV

18$
R&,=(SP)

4456
4472

: INDEX,*

#30,-(5P)

SP, (SP)
PC.RD.E1

4456
4469

: *, INDEX

R2,-(SP)

ADD
JSR

:
:

: «, INDEX
. INDEX,+

SP, (SP)

PCRD.PA

4456
L466

#10,R2
R2,-(SP)

JSR

4456

4463

: ERR.FLG,*

18%
R4 ,-(SP)

: ERR.FLG,*

;
L TST.PAT,+

4456
4475

: +, INDEX
: INDEX,*

#30,-(5P)

30(sP) ,#1

: ERR.FLG,*

4478

: CNT.2

4482

CMP

R3,#2

: (NT.2,+

TRAP

;

208

;

ADD
JSR

CMP

BNE

BGT

198:

;

BR
MOV

000003

18§

: ERR.FLG,*

BLT

000002

-($P)

SP, (SP)

MOV

104455

7230 025116 000412

#30,-(SP)
SP, (SP)
PCRD.CST

MOV

005703

020327

MOV
ADD
JSR

MOV

170316

170512

: INDEX

ADD

7217 025052 012746 000030

7218 025056
7219 025060

JSR

170134

7208 025020 012702 000015
7209 025024 010246
7210 025026 012746 000030
7211 025032
7212 025034

CLR

ADD

167610

TOPS

PA: <

22-0ct=1980 10:45:32

MoV

7203 025002 012746 000030
7205 025010

SEQ 0168

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

000030

004767

7198 024764

PAGE 180

ML&

7180 024702

7186 024722

;};8
7181 024704

23-0CT-80 09:11

SP, (SP)
PC.RD.E2
218

198

.WORD
"WORD
"WORD

156
ASYNC
0

(MP

R3,#3

: ERR.FLG,*

P CNT.2,+

4486
4482

—

'CIMLAAO ML-11 LOGI 1 EST
HARDWARD TEST SECT ION

MACRO M1113

23-0CT-80 09:11

N 13

PAGE 181

SEQ 0169

gOv\mbbbuwuNN
osfrOoOrNOONSTNVONS

D e

ViV
oY AAWD

JMLG

002407

BLT

000005

005740
006232
006242
005366
000004

(MP
BGT

20%:

164472
164464

7253 025206
7254 025210
7255 025212
7256 025214

000001
000022
000006

7262 025240
7263 025244
7264 025250
7265 025252
7266 025256
7267 025260
7268 025264
7269 025266
7270 025270
7271 025274
7272 025276
7273 025302
7274 025306
7275 025310
7276 025312

000005
177370

¢1$:
22%:

000016

177056

23%:

248%:

s
&uw

v
NN
N

(%]

~
N
oo

o
NN

000207

MOV
MOV
MOV
TRAP
MOV
ADD

ADD
INC

CMP

JMP

CMP

INC
CMP
BGT
JMP

ADD

TRAP
ROR

BHIS

25%:

164636

005726

MOV

MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV

208

R3,#5

26%:

JMP

TOPS
PA:<

(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)
R2.RO

4493

*
INDEX,

ML .REG(RO) ,=(SP)
FEMT.16,-(SP)
0 ,-(SP}

SP RO

SP,+*

14
#,RS

*,DODU.FLG

#25,5p
#6, 5P

(NT.2
(NT.2,*

BGT

000004
177230

TRAP
.WORD
.WORD
.WORD

MOV
ASL
ASL
ASL
MOV

011700
005154
000004

7257 025220
7258 025224

22-0ct=198 010 147:44
22-0ct-198 0 10:145:32

(SP)+,(SP)+
R1
R1,44

(NT.1
(NT. 1,

24$
2%

#16,5P

6494
4480
4454
4453

4429
4428

4415
4499

25%
1%

DEC

MOV
TRAP
TRAP

ML.LUN,RO

4506 |

RTS

Lh
(SP)+

4379

BNE

TST

DODU.FLG

26%

: Routine Size:
244 word; Maximum stack depth per invocation:

28 words

4503

——

———

’

'CZMLAAO ML=11 LOGI c1 EST

MACRO M1113

'HARDWARD TEST SECT ION

}
|

B 14

PAGE 182

SEQ 0170

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

JMLG

7290

TOPS
PA:<

7297

7301

7305 0

004767
104466
006000
103773
000207

177024

16::

1%:

———————

JSR

TRAP

ROR
BLO
RTS
;
;

—

23-0CT-80 09:11

'<BLF/PAGE>

4508

PC,8T6
66

RO
1%
PC

Routine Size:
6 words
Maximum stack depth per

invocation:

0 words

—

—
—
ey

;

CZMLAAO ML=-11 LOGIC TEST
'HARDWARD TEST SECTION

MACRO M1113

23-0CT=80 09:11

PAGE 183

SEQ 0171

7322 :MLG

22=0ct=1980 10:47:44

22-0ct=1980 10:45:32

;%%2
7325 ;
7326 ;

4512
4513

!
!

7327 ;
7328 ;

4514
4515

BGNTST;

7330 ;
7331 ;

4517
4518

' TEST NUMBER:
|

7329 ;

7332 ;

7333 .

7334
7335
7336
7337
7338
7339
7340
7341
7342
7343
7344
7345

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

;%29 :
7348 ;

7349 ;
7350 ;

7354
7355
7356
/557

4516

!++

4519

‘

4520

TEST NAME:

external

4535

if .PRSN IS_SET then PRINTB (FMT_3, .MLSN);

4536
4537

7363 025364
7364 025370
7365 025374
7366 025400

017746
012746
012746
010600

164450
004312
000002

7369 025410

000207

7377
7378
7382

7386 025412

104414
062706

7387 025412

004767

7391 025424

000207

7388 025416
7389 025420
7390 025422

104466
006000
103773

'PRINT DRIVE SERIAL NO. IF ANS IS YES.

ENDTST;

154760

7367 025402
7368 025404

'LOCATION WHERE ANSWER TO SW QUESTION IS STORED

PRSN;

026727

001012

p
.

PRINT SERIAL NUMBER

' TEST DESCRIPTION:
'
UPON A YES RESPONSE TO THE
'
SOF TWARE QUESTION 'PRINT SERIAL NO?'
'
PRINT OUT THE DRIVE UNDER TEST
'
SERIAL NUMBER.
i
' IMPLICIT INPUTS:
NONE
|
|
-

7361 025354

7362 025362

TST 7

4521
4522
4523
4524
4525
4526
4527
4528
4529
4530
4531
4532

zggz

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML&.BLI.2 (50)

000006

177736

)

Q00001
!

$717:

1%:
17::

1%:

.GLOBL

PRSN

CMP

PRSN,#1

MOV
MOV
MOV
MOV

aML.REG+140,-(SP)
#FMT.3,-(SP)
#2.-(SP)
SP.RO

: SP,e

RTS

JSR

PC,$17

RTS

BNE

TRAP
ADD

TRAP
ROR
BLO

14
#6,5P

66
RO
1%

4535

;
:

4510

4535

CIZMLAAOD ML-11 LOGIC 1C T EST

MACRO M1113

HARDWARD TEST SECTI ON

23-0CT-80 09:11

D 14
PAGE 184

7397 ;ML&

22=0ct=1980 10:47:44

;ggg 3
7400
7401
7402
7403
76404
7405
7406
7407
7408
7409
7410
76411
7612
7413
7614
7415
7416
7617
7418
7419
74620
7621
7622
7423
74624
7625
74626
7627
7428

7429
7430
76431
7432
746433
7634

4539
4540
4541

!
!
BGNTST;

;
;
;
;
;

4543
4544
4545
4546
4547

'++
' TEST NUMBER:
!
' TEST NAME:
!

4550
4551
4552
4553
4554
4555

!
!
!
!
!
!

;
;

;
;
;
;
;
;

;
;
;
;

;
;
;
;
;
;
;
;

;
;
;
;
;
;

7435 ;
746436 ;

7637
7438
7439
7440
746;
7442

;
;
;
;
3

;

7443 ;

7444 ;
7445 ;

7446
7447
7448
7449
7450

22-0ct=1980 10:45:32

;
;
;

;

;
;

;
7651 ;

SEQ 0172

4542

4548
4549

4556
4557
4558
4559

4560
4561
562
4563
4564
4565
4566
4567

4568
4569
4570
4571
4572
4573

4574

4575

4576
4577
4578
4579
ng?
4

4582

4583
4584

4585
4586
4587
4588
4589

4590

!
!

TOPS=20 Bliss=16 v2(206)

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

TST 8
(=-BUS PARITY TEST

TEST DESCRIPTION:
TEST THE CONTROL BUS PARITY

DETECTION AND GENERATING BY:

!
!
!
!

WRITING BAD PARITY TO DEVICE
AND TEST CPAR SET.

WRITING GOOD PARITY TO DEVICE
AND TEST CPAR CLR.

READING DEVICE AND TEST GNOD
PARITY GENERATION BY READING
MCPE CLR.

!
!

' IMPLICIT
!
!
!--

INPUTS:

NONE

local

SAVE,
TST_PAT;

if .PAR_DIS IS_NOT_SET
then

'TEMPORARY SAVE LOCATION
'TEST PATTERN
i
'SEE IF PARITY IS DISABLED

be?in

'BEGIN IF PARITY IS ENABLE

incr TWICE from 1 to 2 do
begin
CLR_MBUS;
PAT = ONE;
MLDA = .TST_PAT;

'REPEAT LOOP TWICE

if .CPAR IS_NOT_SET

'READ CPAR BIT SET

TST_PAT = %0'125252";

then

'"ALTERNATING 1, 0 PATTERN

'GENERATE EVEN PARITY BY SETTING THE PAT BIT
'WRITE BAD PARITY ON CONTROL BUS

beain

ERRDF (7, ASYNC, 0);
'ERROR IF NOT SET
PRINTB (THR_FMT, WRD_S, WRD_7, WRD_9);
end;

CLR_MBUS;
MLDK = ,TST_PAT;

'CLEAR OUT PAT BIT
'WRITE ODD PARITY CONTROL BUS

CZMLAAD ML=11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

E 14

PAGE 185

7453 :ML4

22-0ct=1980 10:47:44

;22? :
|
|

7456
7457
7458
7459
7460
76461
7462
7463
7664

;
;
;
;
:

;

7466 ;

4601

7465 ;
7667
7468
7669
7470
767

:
;

7673
76374
7475
7676
7677
7478
7479
7480
;23;

:
:
;
:
;
;
:
:
:

:
;

7472 :

CLR_MBUS:

SAVE = .MLDA;

4602
4603
4604
4605
4606

it .MCPE IS_SET
'SEE IF GENERATED GOOD PARITY
then
begin
ERRDF (9, ASYNC, 0);
'ERROR IF MCPE IS_SET
PRINTB (THR_FMT, WRD_6, WRD_7, WRD_8);

4607

TST_PAT =
end;
else

125252
000001

7495 025456

016700

164506

152777 000040

042700

177770

142777
150077

000007
164240

7500 025506

010177

164216

7502 025520

001022

7504 025524

000007

7499 025500

7501 025512

7503 025522

7505 025526
7506 025530

152777

132777
104455

007444
000000

'JUST PRINT MESSAGE

IF PARITY

IS DISABLED

ENDTST;

012701
012702

7497 025466
76498 025474

'REPEAT WITH SHIFTED DATA

p
/
PRINTB (TWO_FMT, WRD_7, WRD_53);

76492 025440
7493 025444

7496 025462

,TST_PAT*ONE;

end

156370
162672

001171

'READ A REGISTER FROM DUT

end;

004167
005767

7494 025450

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

4600

4,608
4609
4610
4611
4612
4613
4614
4615
4616

i¢ .CPAR IS_SET
'READ CPAR BIT CLEARED
then
begin
ERRDF (8, ASYNC, 0);
'ERROR IF SET
PRINTB (THR_FMT, WRD_6, WRD_7, WRD_9);
end;

7489 025426
7490 025432

7491 025436

TOPS=20 Bliss=16 V2(206)

22-0ct=1980 10:45:32
4591
4592
4593
4594
4595
4596
4597
4598
4599

;

SEQ 0173

$78:

JSR
ST

R1,$SAVE3
PAR.DIS

3
:

4537
457

MOV
MOV

#-52526,R1
#,R2

; *,TST.PAT
voe, TWICE

4574
4576

MOV

ML.DUT,RO

BNE

164262
164244

000020

164232

000010

164240

18:

BISB
BIC

BICB
BISB

BISB
MOV

BITB
BNE

TRAP

.WORD

.WORD
.WORD

#40,aML.REG+40

4577

#177770,R0

#7,aML.REG+40
RO,aML.REG+40

#20,aML.REG+40

;

#10,3ML.REG+60

;

R1,aML.REG+30
2%

5§
7

ASYNC
0

4579

: TST.PAT,+

4580

4585

4582

MACRO M1113

TEST
CZMLAAD ML-11 L 0GiC
i
TION
§ ECTI

7508
7509
7510

005726
005676
005662
005366
000004

7513 025542

025546
025552
025556
025560
025562
025566
025574
025600
025604
025612
025616
025622
025630
025632
7528 025634
7529 025636
7530 025640
7531 025642
7532 025646
7533 025652
7534 025656
7535 025662
7536 025666
7537 025670
7538 025672
7539 025676
7540 025704
7541 025710
7542 025714
7543 025722
7544 025726
7545 025732
7546 025740
7547 025742
7548 025744
7549 025746
7550 025750
7551 025752
7552 025756
7553 025762
7554 025766
7555 02577°
7556 025776
7557 026000
7558 026002
7559 026006
7560 026010
7561 026012
7562 026016

F 14
186

SEQ 0174

‘MLG

7511 025532
7512 025536

7514
7515
7516
7517
7518
7519
7520
7521
7522
7523
7524
7525
7526
7527

PAGE

000012
000040
L2777

164370
177770

164144

000007

164126

000010

164130

164122
164106

2%:

TOPS
PA:<
MOV
MOV
MOV
MOv
MOV
MOV
TRAP
ADD

BISB

MOV

BIC
BICB
BISB

MOV

BITB
BEQ
TRAP

.WORD
.WORD
.WORD

005726
005676
005670
005366
C0000¢4
000012
000040
164260
177770
000007
164012
163776
020000

164034

3%:

003614

000002

BISB

MOV

BIC
BI(B
BISB

164016

163740

SP RO

SP,

4584
4587

#40,aM
. REG+40
L
ML.DUT,RO

#177770,R0

#7,3ML.REG+40
RO, aML .REG+40
R1.aML.REG+30

TST.PAT,

glo.anL.aeooeo

4590
4592

4595

#WRD.9,-(SP)
#WRD.7.-(SP)
#WRD.6,-(S5P)
#THR.FMT ,=-(SP)
#4,-(SP)

4596

10
Sstc

SP RO

14
#12,SP
#40,3ML
. REG+40
ML.DUT,RO

4594
4597

$177770,R0

#7,3ML .REG+40
RO.@ML .REG+40

4600
4602

ML .REG+30,R3

TRAP

4605

#WRD.8,
= (SP)
#URD.7.-(SP)
#WRD.6.=(SP)

4606

.WORD
.WORD
.WORD
MOV

4%:

#4,=(SP)

MOV

BIT
BEQ

005712
005676
005670
005366
000004
000012

MOV
MoV
Mov
MOV
MOV
MOV
TRAP
ADD

4586

#WRD.9,=-(SP)
#WRD.7,=(SP)
#WRD.5,-(SP)
#THR.FMT,=(SP)

HARDWARD TEST

23-0CT-80 09:11

MOV
MOV
MOV
MOV
MOV
TRAP
ADD
ASL

INC
(MP
BLE

* SAVE

#20000,aML
. REG
4$
1
3sv~c

#THR.FMT,=(SP)
24 ,-(SP)

SP.RO
14

R
R2
R2,#2
1%

P,
TST.PAT
TWICE
TWICE,*

4604
4609
4576

CIMLAAD ML-11 LOGI C1 EST

'HARDWARD TEST

|
i

7572 026042

SECT ION

026020
026022
026026
026032

006426
005676
005356
000003

7571 026036
7573 026044

7574 026046
7575 026052
7576
7577
7578
7583
7584
7588

7592
7593
7594
7595

23-0CT-80 09:11

G 14

PAGE

187

SEQ 0175

22-0ct=19 80 10: 47:44
22=0ct=19 80 10: 45:32

;MLG

7564
7565
7566
7567
7568
7569
7570

MACRO M1113

026054
026054
026060
026062

7596 026064
7597 026066
7598
7599
7600
7605
7606
7607 ;

5%:

000010

;

104466

177346

MOV

MOV
MOV
MOV
MOV
TRAP
ADD
RTS

;

004767

RTS

Routine Size:

Maximum

78::
1%:

006000
103773
000207

stack

JSR

TRAP
ROR

BLO
RTS

! <BLF/PAGE>

4571

#WRD.53,=-(5P)
#WRD.7,-(SP)

4614

#TWO.FMT,=(SP)

#3,-(SP)

14
#10,SP
PC

sp'.

4537

139 words

depth per invocation:

9 words

L614

PC,$78
66
RO
1%
PC

Routine Size:
6 werds
; Maximum stack depth per
L4617

TOPS
PA:<

invocation:

0 words

CZMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0(CT-80 09:11

H 14

PAGE 188

7609 ;MLS

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

;g}? :
7612 ;
7613 ;

L7614

4618
4619

BGNTST;

4622

'++

4625

7615 ;

[
.

7617 ;
7618 ;

4623
4624

7620 ;

h626

7616 ;

7619 ;
7621 ;
7622 ;

7623
7624
7625
7626
7627
7628
7629

;
;
;
;
;
;
;

7630 ;
7631 ;

7632 ;

7633
7634
7635
7636
7637
7638
7639

4621

4627
4628

4629
4630
4631
4632
4633
4634
4635

4636
4637

4638

;
;
;
;
;
;
;

4639
4640
4641
4642
L6463
4oLy
4645

7041 ;

4647

7640 ;

7642 ;
7643 ;
7644 ;

7645 ;

7646 ;

7647 :

7648 ;
7649 ;

7650 ;

'
!

TEST NUMBER:

T1ST 9

TEST NAME:

MEMORY SIZING TEST

!
!

TEST DESCRIPTION:

!
!
!
!
!
!
!
'
!
!

THIS TESTS THE ML11°'S SIZING
LOGIC BY CCMPARING THE
OPERATORS INPUTED NUMBER OF 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 TO THE
SOF TWARE QUESTION:
NUMBER OF ARRAYS PRESENT?

!
!
' --

4646

local

4648
4649
4650

BGNSUB;
CLR_MBUS;

4651

4652

4653

4654
4655

DODU_FLG;

'DROP UNIT FLAG

DODU_FLG = ZERO;

if (.OP_NUM_ARR + 1) neq .ML_NUM_ARR

then

begin

'SEE IF DRIVE SIZED SAME NO. OF ARRAYS AS OP [NPUTED

4656

ERRDF (10, ASYNC, 0);

7652 ;
7653 ;

4658
4659

PRINTB (FMT-2, (.OP_RUM_ARRTM+ 1), .ML_NUM_ARR);
DODU_FLG = ONE;

7657 ;

4663

7651 ;

7654 ;
7655 ;
7656 ;

7658 :

7659 ;

7660 ;

7661 ;

7662 ;
7663 ;

PRINTB (TWO_FMT, FNC_1, WRD_14);

4657
4660
4661
4652

ENDSUB;

4664

if .DODU_FLG IS_SET

4665

4666

4667

4668
4669

TOPS=20 Bliss=16 v2(206)

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

!
!

4620

SEQ 0176

'IF NOT EQL THEN ERROR AND SET DODU_FLG

end;

then

begin

DODU (.ML_LUN);
DOCLN;
end;

'DROP THIS UNIT IF DODU_FLG iS_SET

CIMLAAD ML=11 LOGIC T EST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

[ 14
PAGE 189

7665 :ML4

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

;229 :

7668 ;

;ggg ;

7677 026070

7678 026074
7679 026076

22=0ct=1980 10:45:32

4670

4671

ENDTST;

004167

155726

104402
152777

000040

7681 026110

042701

177770

7684 026126
7685 026130

005002
016701

7680 026106

7682 026114
7683 026122

7686 026134
7687 026136
7688 026142
7689 026144
7690 026146
7691 026150
7692 026152

7693 026156
7694 026160
7695 026162

7696 026164

7697 026166

016701

142777
150177

005201
017703
006203
006203
006203
000303
042703
010100
020003
001444

7700 026174

012746

026200
026204
026210
026214
026216

7706 026220

7707 026224
7708 026226
7709 026230
7710 026232

7711 026234
7712 026240

7713 026242
7714 026246
7715 026250

7716 0262564
7717 026260
7718 026262

000007
163612

162166
163656

177740

104455

007444

7701
7702
7703
7704
7705

164060

000000

012746
012746
012746
010600
104414

163634
163616

1%:

JSR

005774

006752
005356
000003

163574

042703
010316

177740

012746
010600
104414

000003

016746 - 162054
005216
012746 004224

R1,$SAVE3

TRAP
BISB

2
#40,aML.REG+40

BIC

#177770, R

MOV

BICB
BISB

LR
MOV

INC
MOV
ASR
ASR
ASR
SWAB
BIC

ML.DUT,R1

#7,aML.REG+40
R1,3ML.REG+40

4656

;

4657

ASYNC

MOV
MOV
MOV
MOV
TRAP -

#FENC.1,=(SP)
#TWO.FMT,=(SP)
#3,-(SP)
SP,RO
14

ASR
ASR
ASR
SWAB

R3
R3
R3
R3

MOV
MOV
TRAP

;

WORD

MOV
INC
MOV

4o47
4649

BIC
MOV

4616

:
:

4651
4653

JWORD

MOV

;

: DODU.FLG
:

MOV
CMP
BEQ

MOV

TOPS=-20 Bliss=16 V2(206)

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

R2
OP .NUM.ARR,R1

R1
ML .REG+120,R3
R3
R3
R3
R3
#177740,R3
R1,R0
RO,R3
2%

.WORD

017703

006203
006203
006203
000303

$79:

TRAP

000012

7698 026170

7699 026172

SEQ 0177

#WRD .14, =(SP)

ML .REG+120,R3

SP,e

;

#177740,R3
R3, (SP)

OP .NUM.ARR,-(SP)
(SP)
#EMT.2,-(SP)

#3,-(SP)
SP,RO
14

:SP,e

4658

MACRO M1113

HARDWARD TEST SECTION

7720
7721
7722
7723 026264
7724 026270
7725 026274

012702
062706

104467

006000

005302
001004
016700

7727 026300

7728 026302

7729 026304
7730 026306

7731 026312

7732 026314
7733 026316
7734
7735
7736
7741
7742
7746
7750
7751
7752
7753
7754
7755
7756
7757
7758
7763
7764
7765

J 14
PAGE 190

SEQ 0178

22=0ct=-1980 1
22-0ct=1980 1

sMLG

7726 026276

23-0CT-80 09:11

000001
000016

2%:

103675

104451
104444

:45:32

TOPS
PA:<

*,DODU.FLG

4659
4655
4660

DODU.FLG

6664

TRAP

MOV

3%:

:47:44

ROR

BLO
DEC
BNE

163654

000207

MOV
ADD

CIZMLAAD ML-11 LOGIC TEST

TRAP
TRAP

;

4667

ML.LUN,RO

L4616

RTS

76 words

Routine Size:

; Maximum stack depth per

inyocation:

words

{
026320
026320
026324
026326
026330
026332

004767

104466

177544

19::
1%:

006000
103773

JSR
TRAP
ROR

BLO

000207

RTS

;

Routine Size:

4P(,ST9
66

RO
1%
PC

6 words

: Maximum stack depth per invocation:
;

4672

! <BLF/PAGE>

4669

0 words

CZMLAAD ML=11 LOGIC T EST
'HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

7767 ;ML4

7775
7776

;
:
;
;
;
;
:
;

7777
7778
7779
7780 ;
7781 ;
7782 :

7783 ;

7784
7785
7786
7787
7788
7789
7790
7791
7792
7793
7794
7795
7796
7797
7798
7799
7800
7801
7802

22-0ct=1980 10:45:32
4673
!
L674¢ !
4675
BGNTST;
4676
LETT
'++

4678
4679

4680
4681
4682
4683
L684
4685

4686

!
!

'
!
!
!
!
!

TEST NUMBER:

TST 10

TEST NAME:

NO-OP FUNCTION TEST

TEST DESCRIPTION:
TEST IF THE DRIVE CAN PERFORM
A NO OP FUNCTION WITH OuT

HANGING THE DRIVE.

L687
4L688
4689
4690
4691
4692
4693
4696
4695
4696
4697
4698
4699
4700
4701
4702
4703
4704
4705

BGNSUB;
CLR_MBUS;

7805 ;

4708

DELAY (ONE_US);

7806 ;
7807 ;
7808 ;
7809 ;

7810 ;
7811 ;

7812 :

7813 ;
7814 ;

7815
7816
7817
7818
7819

;
;
;
;
;

7821

;

7820 ;

4706
4707

4709
4710
4711
4712

!
!
A NO_OP FUNCTION IS WRITTEN
!
INTO MLCST.
!
THEN GO AND ERROR BITS ARE
!
CHECKED FOR CORRECT STATES.
!
!
THIS UNIT IS DROPPED ON DETECTED
!
ERRORS.
!
' IMPLICIT INPUTS:
NONE
!
!
==
Local
DODU_FLG;

4723
4724

'DO A NOOP FUNCTION
'DELAY 1 US

if .GO IS_SET
then

'SEE

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

4718
4719
4720
4721
4722

'DROP UNIT FLAG

DODU FLG = ZERO;
MLCST = NOOP;

4713
4714
4716
4717

TOPS=20 Bliss=16 v2(206)

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

;

;
;
:
;
;
;
;
;
;
;
:
;
;
:
;
:
;
;
:

7803 ;
7804 ;

SEQ 0179

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

;;gg 3
7770
777
7772
7773
7774

K 14

PAGE 191

DODU_FLG = ONE;
end;

if _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 LOGIC TEST
'HARDWARD TEST

SECTION

7823 ;ML4

&~
&.

ETETETETETE
TR TR TR TN T
I
T
TR
- T

W
wn

7852 026324
7853 026340
7854 026342
7855 026344
7856 026352
7857 026356
7858 026362
7859 026370

7860 026374
7861 026376
7862 026404

7863 026410
7864 026412
7865 026416

7866 026420
7867 026422
7868 026424

4725
4726
4727
4728
4729
4730
4731
4732
4733
4734
4735
4736
4737
4738
4739
4740
47461
4742
4743

004167
005746
104402
152777

016701
042701
142777
150177
005002
012777
012700
001410
016701
001403
005016

005301
001375
005300
000767
132777

7874 026444
7875 026446
7876 026450

23-0CT-80 09:11

L 14
PAGE 192

7824 ;

;

MACRO M1113

001430
104455
000013
007444
000000

if .OPI
then

SEQ 0180

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

'SEE

CPI

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

SET

begin
ERRDF (13, ASYNC, 0);
'ERROR AND SET DODU_FLG IF
PRINTB (FIV_FMT, WRD 4, PHR_S, WRD_11, FNC_2, WRD_19);

SET

DODU_FLG = ONE;

end;

ENDSUB;

i; .DODU_FLG IS_SET
then

'DROP THIS UNIT IF

DODU_FLG IS_SET

begin
DODU (.ML_LUN);

DOCLN;
end;

ENDTST;

155446
000040
163612

177770

000007
163344

000001

$710:
163366

1%:

163274
2%:

4%:
163240

BISB

5%:

R1,$SAVEZ2
-(SP)
2

#40,3ML .REG+40

MOV

ML.DUT,R1

BICB

#7,3ML .REG+40

BISB
CLR
MOV

3%:

000001

TST
TRAP

BIC

163350

153500

JSR

MOV
BEQ

CLR
DEC
BNE
DEC
BR
BITB
BEQ

TRAP

.WORD

4671

4702
4704

; DODU.FLG
$

4706
4707
4708

#177770,
R

R1,aML.REG+40
R2
#1,3ML.REG

#1,R0
5%

: o« ,88TMP2

LSDLY, R

; o+, 88TMP1

(SP)
R1
3%
RO
2%
#1,3ML.REG
6%

: $$TMP
: $$TMP

ASYNC

: $8$TMP2
4710

473

MACRO M1113

'CZMLAAO ML-11 LOG

HARDWARD TEST SEC

7878
7879
7880
7881
7882
7883
7884
7885
7886

026452
026456
026462
026466
026472
026476
7887 026502
7888 026506
7889 026510
7890 026512
7891 026516
7892 026522
7893 026530
7894 026532
7895 026534
7896 026536
7897 026540
7898 026542
7899 -026546
7900 026552
7901 026556
7902 026562
7903 026566
7904 026572
7905 026576
7906 026600
7907 026602
7908 026606
7909 026612
7910 026620
7911 026622
7912 026624
7913 026626
7914 026630
7915 026632
7918 026636
7917 026642
7918 026646
7919 026652
7920 026656
7921 026662
7922 026666
7923 026670
7924 026672
7925 026676

7926 026702
7927 026704
7928 026706
7929 026710
7930 026712
7931 026714
7932 026720

23-0CT-80 09:11

" 14

PAGE 193

SEQ 0181
22-0ct-1
22=-0ct=1

iML&
006040

000006
000001
000016
000001

163230

6%:

000001
000016
020000

163140

78%:

#WRD.19,-(SP)
#FNC.2,=(SP)

TRAP

“721

#WRD.19,-(SP)
#FNC.2,-(SP)
#WRD.11,-(SP)
#PHR.5,~(SP)
#WRD.3,-(SP)

4722

BITB
BEQ

MOV
MOV
MoV
MOV
MOV
MoV
MOV
MOV
TRAP
MOV
ADD

BIT
BEQ

TRAP

.WORD
.WORD
.WORD

006040
006766
005750
006646
005654
005414
000006
000001
000016

163246

8%:

4714

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

.WORD
.WCRD
.WORD

006040
006766
005750
006646
005646
005414
000006

TOPS
PA:<

MOV
MOV
MoV
MOV
MOV
MoV
MoV
MOV
TRAP
MOV
ADD
TRAP
ROR

BLO
DEC
BNE

MOV
TRAP

#WRD.11,-(5P)
#PHR.2,=(SP)
#WRD.1.=(SP)

#FEIV.FAT,=(SP)
#6,-(SP)

SP,RO
14

#1,R2

0né,se
#1,3ML.REG+60
7

; *,DODU.FLG'

4715
4712
4718

14
GSYNC

#FIV.FMT,=(SP)
#5,-(SP)

SP,RO

14
" ,R2
#16,SP

;

*,DODU.FLG

#20000,aML .REG+60
8%
55

4723 |

4720
4726

4729

15
8SYNC

4730

#WRD.19,-(SP)
#FNC.2,=(SP)
#URD.11,-(SP)
#PHR.5,=(SP)

#WRD.4,-(SP)
#FIV.FMT,-(SP)
#6,-(SP)

SP,RO

;

*,DODU.FLG

:» DODU.FLG

4731
4728
47%2
4736

4739

'CZMLAAO ML=11 LOGIC TEST

MACRO M1113

§NARDUARD TEST SECTION

23-0CT-80 09:11

N 14
PAGE 194

]

SEQ 0182

‘ML

7938 026724
7939 026726
7940
7941
7942
7947
7948
7952
7956 026730
7957 026730
7958 026734
7959 026736
7960 026740
7961 026742
7962
7963
7964
7969
7970
7971 ;

104444

005726
000207

9%:
;

22-0ct=-198 0 10: 47:44
22-0ct=198 0 10: 45:32
TRAP

RTS

TST

Routine Size:

(SP)+
126 words

; Maximum stack depth per

004767

104466

177400

110::
1%:

006000

103773
000207

JSR
TRAP
ROR

PC,$T10
66
RO

RTS

BLO
;

koutine Size:

4671

invocation:

; Maximum stack depth per invocation:

L4744

!<BLF/PAGE>

11" words

L4741

6 words

TOPS.
PA:<

0 words

—

'CIMLAAD ML-11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION
i

|
|

7973 JMLG
7974 ;
7975
7976
.

7977 ;
7978 ;
7979 ;
7980
.

7981
7982
7983
7984
7985
7986

;
;
;
;
;

L4
.

.
.

7987 ;
7988 ;
.

7989
7990
7991
7992
7993
7994
7995
7996
7997

;
;
;
;
;
;

.
.

;
;

.
L4

;

.
.
L

.
.

.
L4

L4
L
.
L
.
.
.
.

.
.
.
.
.
k)
.
.
.

.
.
.

23-0CT-80 09:11

B 15

PAGE 195

SEQ 0183

22-0ct-1980 10 147 44
22-0ct=19 80 10:45:32
4745
4746
4747
4748
4749
4750
4751
4752
4753
4754
4755
4756
4757
4758

BGNT $T;
le¢

TE ST NUMBER:

TST 11

TE ST NAME:

WRITE CHECK FUNCTION T EST

TE ST DESCRIPTION:

TEST IF THE DRIVE CAN PERFORM
A WRITE CHECK FUNETION WITHOUT
HANGING THE DRIVE*

4759
4760
4761
4762

A WRITE CHECK FUNCTION IS WRIT TEN

INTO MLCS1.

THEN GO AND ERROR BITS ARE

4763

CHECKED FOR CORRECT STATES

4764
4765

4766
4767
4768
4769
4770
&7
4772
4773
4774
4775
4776
&7
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)

THIS UNIT
ERRORS.

IM PLICIT

IS DROPPED ON DETECT ED

INPUTS:

NONE

loca L
DODU_FLG;

iDROP UNIT FLAG

BGNS us;
CLR_MBUS;

poD0 _FLG = ZERO;
FIRST _BLK_XFER ();
MLCS 17= WRT_CHK;

'SET UP A FIRST BLK XFERR
'D0 A WRITE CHECK FUNCTION

. GO 1S_NOT_SET

'SEE IF THE GO BIT GOT SET

then

beg1n

ERRDF (14, ASYNC, 0);

'ERROR IF NOT SET

if .DRY IS_NOT_SET
then

'SEE IF THE DRY IS SET WHILE GO IS CLEARED

PRINTB (FIV_FMT, WRD_1, PHR_1, WRD_12, FNC_4, WRD_19);

begin

'ERROR IF CLEARED
ERRDF (15, ASYNC, 0);
PHR_6);
WRD_1,
WRD_43,
PHR_1,
PRéNTB (FIV_FMT, WRD_2,
end;

DODU_FLG = ONE;
end

'SET DODU_FLG

'CIZMLAAQ ML-11 L 06 l C TEST
'HARDWARD TEST S EC 1 ION

MACRO M1113

23-0CT-80 09:11

4797

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

else

;;.DRY IS_SET
en

L O

R O 2

SEQ 0184

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

;ML

begin

L O

ERRDF

'THE GO IS SET SO SEE IF DRY IS CLEARED

(16, ASYNC, 0);

'ERROR IF LRY [S SET

PRINTB (FIV_FMT, WRD_2, PHR_2, WRD_43, WRD_1, PHR_ 3);

DODU_FLG = ONE;
it JILF
then'

IS_SET

b~g1n

ERRDF

(17, ASYNC, 0);

'SEE

PRIN® (FIV_FMT, WRD 3, PHR_S, WRD_12,

DODU_FLG
= ONE;

ILF

IS SET

'ERROR IF SET

FNC_4, WRD_19);

end;

I T

O R

end;

if .OP1 IS_SET
then
begin

'SEE

IF OPI

IS SET

ERRDF (18, ASYNC, 0);
'ERROR IF SET
PRINTB (FIV_FMT, WRD_4, PHR_S5, WRD_12, FNC_4, WRD_19);

DODU_FLG = ONE;

DELAY

(FRTY_US);

it .DRY
then

IS_NOT_SET

'WAIT FO XFERR TO COMPLTE

'SEE

DRY IS SETS AFTER XFERR

begin

it .GO IS_SET

then

begin

CLR_MBUS;

TELA

T ETE

T ETR TR P T TR T

end;

R TR

it .GO IS_SET then ERRDF

'"IF DRY IS NOT SET THEN SEE

'IF THE GO IS SET THEN TRY TO CLR GO
(19, ASYNC, 0) else ERRDF

(20, SYNC, 0):

en
eg1n

I T S R

IF GO IS SET

'IF GO IS STILL SET THEN ASYNC FAILURF
PRéNTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_4, WRD_19)>
'ELSE SYNC MODLE FAILURE
else

RRDF (21, ASYNC, 0);
'ERROR GO AND DRY BCTH CLEARED
PRINTB (Flv FMT, WRD_2, PHR_1, WRD_11, FNC_4, WRD_19);
end;

DODU_FLG
= ONE;
end;

¢ 15

PAGE 196

if .GO IS_SET

'SET THE DODU_FLG

'SEE IF THE GO IS SYlLL SET

MACRO M1113

CIMLAAD ML-11 LOGI C TEST

HARDWARD TEST SECT ION

b ok
d
b
— b

b s
N NOMNOMNIN
=~ W
=O Yo ~NO~

oo O 0o 0o 00 Co o O 0o

TR T

8085 JMLG
8086 :
8087
8088
8089
8090
8091
8092
8093
8094
8095
8096
8097
8098
8099
8100
8101
8102
8103
8104

026744
026750
026752
026754
026762
026766
026772
027000
027004
027006
027012
027020
027026

23-0CT-80 09:11

D 15

PAGE 197

SEQ 0185
47: 44

:45:32
4849
4850
4851

4852
4853
4854
4855
4856
4LRS57
4858
4859
4860
4861
4862
4863
4864
4865
4866
4867
4868

004167
005746

104402
152777

016701
042701

142777
150177
005002

004767
012777
132777

081057

then

begin
CLR_MBUS;

TOPS=20 Biiss=-16 V2(206)

PA:<NEALE>BL2ML4.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 = ONE;

'IF GO IS STILL SET THE ASYNC FAILUR

'ELSE SYNC MODULE FAILURE

end,

ENDSUB;

'DROP THIS UNIT IF DODU_FLG IS_SET

if .DODU_FLG IS_SET
then

begin

DODU (.ML_LUN);

DOCLN;
end;

ENDTST;
$T11:

155036

000040
163202
177770

000007
162734

163506

000051
000001

104455
000016

162756

162740

162660

162652

1%:

JSR
TST
TRAP
BISB

MOV

BIC
BI(B
BISB
CLR
JSR
MoV

BITB
BNE

TRAP

006040
007002
005760
006542

005630
005414
000006

.WORD
.WORD
.WORD

MOV
MOV
MOV
MOV

MOV
MoV
MoV

L4743

R1,8$SAVE?2
«{5P)

4774

6776

#40,aML
. REG+40
1
UT,R
ML.O

#177776,R1

#7,3ML .REG+40

:;.iHL.RE6040

PC,FIRST.BLK.XFER
#51,aML.REG
#1,aML.REG

DODU.FLG

4778

4779
4780
4782

2%
55

4785

#WRD.19,-(5P)

4786

16
asvuc
FENC.4,~(SP)

#WRD.12,-(SP)

,
= (SP)
#PHR.1
#WRD .1.-(SP)

#EIV.EMT,=(SP)
#6.-(SP)

'
CIMLAAD ML-11 LOG Ic 1 EST

MACRO M1113

'HARDWARD TEST SECTION

8140

ML4

g}:%

|
|

8143 027074
B144 027076

010600
104414

8146 027106

001056

8148 027112

000017

8151 027120

012746

8145 027100
8147 027110

8149 027114
8150 027116

132777

000200

MOV
TRAP

162642

007444
000000

TRAP

;

4791

;

4792

MOV

#WRD.1.=(SP)

8157 027150

MOV

8158 027154
8159 027156

010600
104414

8160 027160
8161 027164
8162 027166
8163 027172

8164 027174

8165 027176

8166 027200

8167 027202

8168 0272064

8169 027210

012746

062706
000427
105777
100030

006542
005634
005414

000006

000016

2%:

162556

104455

000020

000000

012746

8177 027244
8178 027250
8179 027254
8180 027262

8181 027264

8182 027266
8183 027270
8184 027272

012702
062706
132777

001430

MOV
TRAP

SP.RO
14

;
:
:

TRAP

;

BPL

MOV

#PHR.S,-(SP)

#WRD .1 .- (SP)

MOV
MOV
MOV
MOV
MOV
TRAP

#PHR.2,-(SP)
#WRD.2,-(SP)

BEQ

MOV

000001
000016
000001

104455

000021
007444
000000

3$:

162476

4$:

012746

007002

012746
012746
012746
012746
010600
104414

006646
005646
005414
000006

012702 000001

4790
4795
4799

;

4802
4803

#WRD .43, -(SP)
#FIV.FMT,=(SP)
#6,-(SP)

SP.RO
14

; SP,e

MOV
ADD
BITB

" ,R2
0né,sp
#1,3ML.REG+60

: *,DODU.FLG
:
:

4804
4801
4807

TRAP

;

4810

#WRD.19,-(SP)

4811

.WORD
"WORD
JWORD

21
ASYNC
0

MOV

FENC .4, =(SP)

MOV

8194 02733¢

ASYNC
0

006560
005634
005414
000006

8187 027304 012746 005760
8188 027310
8189 027314
8190 027320
8191 027324
8192 027330
8193 027332

MOV

8186 027300

005630

; SP,e

#16,5P
{3
aML.REG+S0

012746 006040

8185 027274

#6,-(SP)

ADD
BR
TSTB

WORD

8170 027214 012746 006306
8171 027220 012746
8172 027224 012746
7173 027230 012746
8174 027234 012746
8175 027240 010600
8176 027242 104414

#RD.4%,-(5P)

#PHR.1.=(SP)
#WRD.2,=(SP)
REIV.FMT,=(SP)

"WORD

006646

#PHR.6,=(SP)

MOV
MOV
MOV

.WORD

007444

ASYNC
0

MOV

012746
012746
012746

"WORD
WORD

8153 027130 012746 006306
8154 027134
8155 027140
8156 027144

; SP,e

4788

.WORD

005630

TOPS

PA:<

;

MOV

012746

22-0ct=1980 10:45:32

#200,aML.REG*S0

006660

8152 027124

SP,RO
14

22-0ct=1980 10:47:44

BITB
BNE

104455

SEQ 0186

;

,
|

23-0CT-80 09:11

E 15
PAGE 198

MOV
MOV
MOV
MOV
MOV
TRAP

MOV

#WRD.12,-(SP)

= (SP)
#PHR.S,
#WRD.3,-(SP)
#FIV.FMT,=-(SP)
26,-(SP)
SP.RO
14

#,R2

. SP,a

: +,DODU.FLG

4812

8196
8197
8198
8199 027340
8200 027344
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 N27460
8226 1462
8227 027470
8228 027472
8229 027500
8230 027502
8231 027510
8232 027514
8233 027520
8234 027526
8235 027532
8236 027540
8237 027542
8238 027544
8239 027546
8240 027550
8241 027552
8242 027554
8243 027556
8244 027560
8245 027562
8246 027564
8247 027570
8248 027574
8249 027600
8250 027604

SECT ION

23-0CT-80 09:11

f 15
PAGE 199

SEQ 0187

22-0ct=19 0 10: 4
22-0ct=19 01 43

JMLG
062706
032777
001430

000016
020000

162406

5%:

104455

000022
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414

012702
062706
012700
001410
016701
001403
005016
005301
001375
005300
000767

.WORD
.WORD
.WORD

006040
007002
005760
006646
005654
005414
000006

000001
000016
000050

6%:
7%:

152450

8%:
9%:

000200

162260

132777

000001

162200

000040
162454
177770
000007

162230
162212

000001

162140

001452
152777
016701
042701

142777
150177
132777

001405
104455
000023
007444
000000
000404
1046455
000024
007500
000000
012746
012746
012746
012746
012746

ADD

BiT
BEQ

TRAP

132777

001106

Co Co

HARDWARD TEST

MACRO M1113

162206

10%:

MOV
MOV
MoV
MoV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD
MOV

BEQ

MOV

BEQ
CLR
DEC

BITB
BEQ
BISB
MOV

BIC
BICB
BISB
BITB
BEQ
TRAP

TOPS

PA:<

4809

06,5P

0%0600.8HL.REG’60

4815

55
22

4818

#WRD.19,-(SP)

4819

)

SSYNC
#ENC.4 ,-(SP)

#WRD.12,-(SP)
#PHR.5,=(SP)

#WRD
.4 ,-(SP)
#FIV.FMT,=(SP)
#6,-(SP)
SP,RO

14
#1,R2
#16,5P
#50,R0
10%

LSDLY,R1

BNE
DEC

BITB
BNE

CIMLAAD ML-11 LOGI C1 EST

SP,¢

;

*,DODU.FLG

L e, 88T
;

4820
4817
4823

*,38TMPI

;. $$TMP
; $$TMPI

; $8TMP?
#200,3ML .REG+50

4825

#1,aML.REG

4829

15%

13$
#40,3ML .REG+40
ML.DUT,R1

4831

177770,
R

#7,3ML.REG+40
R1.aML .REG+40
#1.3ML .REG
1%

4834

.WORD
.WORD
.WORD

006040
007002
005750
006560

005630

11%:

TRAP

12%:

MoV
MOV
MOV
MOV
MOV

.WORD
.WORD
.WORD

#WRD.19,-(SP)
#FENC.4,=(SP)

#WRD
. 11,-(5P)
#PHR.2,=(SP)
#WRD.1.-(SP)

4837

CIMLAAO ML=11 LOGIC

HARDWARD TEST

TEST

MACRO M1113

SECTION

8252
g%gz

23-0CT=-80 09:11

6 15

PAGE 200

SEQ 0188

JMLG
3

8255 027610
8256 027614
8257 027620
B258 027622
8259 027624
8260 027626
8261 027630
8262 027632
8263 027634
8264 027636
8265 027642
8266 027646
8267 027652
8268 027656
8269 027862
8270 027666
8271 027672
8272 027674
8273 027676
8274 027702
8275 027706
8276 027714
8277 027716
8278 027724

8279 027730

012746
012746
010600
104414
000424
104455
000025
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414
012702
062706
132777
001455
152777
016701

005414
000006

000040
162240

162014

C00007
161772
000001

161776

042701

8280
8281
8282
8283
8284
8285
8286
8287

027734
027742
027746
027754
027756
027760
027762
027764

142777
150177
132777
001405
104455
000026
007444
000000

8289
8290
8291
8292

027770
027772
027774
027776

104455
000027
007500
000000

8288 027766

8293 030000

012746

012746
012746
012746
012746
012746
012746
010600

8302 030040
8303 030044
8304 030050

012702
062706
104467

8305 030052
8306 030054

006040
007002
005750
006542
005634
(05414
000006
000001
000016
000001

177770

000404

8294 030004
8295 030010
82v6 030014
8297 030020
8298 030024
8299 030030
8300 030034

8301 030036

13%:

104414

C06000
103002

14%:

161764

15%:

007002
005750
006560
005630
005414
000006

000001
000016

MOV
MOV
MOV
TRAP
Bl
TRAP
.WORD
LWORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD
BITB
BEQ
BISB
MOV

#FIV.FMT ,=(SP)
#6,-(SP)
SP,RO
14
14%
55
2§
ASYNC
0
#WRD.19,=(SP)
#ENC.4,=(SP)
#WRD.11,=(SP)
#PHR.1,=-(SP)
#WRD.2,-(SP)
#FIV.FMT,=(SP)
#6,-(SP)
SP,RO
14
#1,R2
#16,5°
#1,3ML.REG
18%
#40,3ML . REG+40
ML.DUT,R1

BICB
BISB
BITB
BEQ
TRAP
LWORD
.WORD
WORD

#7,3ML.REG+40
R1,aML.REG+40
#1,3ML.REG
16%
55
26
ASYNC
O

BIC

161724

16$:

006040

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

17%:

=138

MOV
MOV
MOV
MOV
MOV
MOV
MOV

#FNC.4,=(SP)
#WRD.11,-(SP)
#PHR.2,-(SP)
#WRD.1,-(SP)
#FIV.FMT,=(SP)
#6,-(SP)
SP,RO

18%:

MOV
ADD
TRAP
ROR
BHIS

:
;

;

4,829
4841

4842

;

SP,e

;
;
;

*,DODU.FLG

_
4845
4827
4848

;

4850

;

4853

17%

55
27
SYNC
O

TRAP

;] .0

#177770,R1

TRAP
.WORD
.WORD
.WORD

MOV

TOPS
PA:<

#WURD.19,-(SP)

4855

; SP,

1 ,R2
#16,5P
67
RO
19%

; *,DODU.FLG
:
:
4

4856
4850
4857

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

8308
8309
8310

8311 030056
8312 030062
8313 030064
8314 030066
8315 030072
8316 030074
8317 030076
gg}g 030100

8336 030102
8337 030106
8338 020110
8339 030112
g§2? 030114

000167
005302
001004
016700
10445
104444
005726
000207

176670

19%:

162074
20%:

SEQ 0189

22-0ct=-198 010 :47:44
22-0ct=-198 0 10: 45:32

JMP
DEC BNE
MOV
TRAP
TRAP
18T
RTS

1%
R2
20%
ML.LUN,RO
51
A
(SP)+
PC

: Routine Size:
303 words
; Maximum stack depth per invocation:
.

004767
104466
006000
103773
(00207

176636

8342
8343

8348
8349
8350 ;

PAGE 201

sMLG
:

8320
8321

8326
8327
8331
8335 030102

23-0(T-80 09:11

T11:
1%:

JSR
TRAP
ROR
BLO
RTS

! <BLF/PAGE>

4861
4864

L4743

18 words

PC,.$TIN
66
RO
1%
PC

* Routine Size:
6 words
: Maximum stack depth per invocation:
4B69

; DODU.FLG

TOPS
PA:<

4866

0 words

CZMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0(T-80 09:11

115

PAGE 202

SEQ 0190

t=1980 10:47:44

TETETETETE ETETETE TR TR B O

% %,

Y PR

TRLR TE

TETE

I T

;MLG

ct=1980 10:45:32
4870
4871
4872
4873
4874
4875
4876
4877
4LB78
4879
4880
4,881
4882
4,883
4884
4885
4886
4,887
4,888
4,889
4890
L8N
4892
4893
4894
4895
4896
4897
4898
4899
4900
4901
4902
4903

]

BGNTST:
'+4
|

i
i
i

TEST NUMBER:

TST

TEST NAME:

WPITE

4921

12
FUNCTION TEST

TEST DESCRIPTION:

TEST IF THE DRIVE CAN PERFORM A WRITE FUNCTION WITHOUT

;

HANGING THE DRIVE.

A WRITE FUNCTION IS WRITTEN INTO MLCS1.

;

CHECKED FOR CORRECT STATUS.

local

DODU_FLG;

THEN GO AND ERRCR BITS ARE

THIS UNIT 1S DROPPED ON DETECTED ERRORS.

'DROP UNIT FLAG

BGNSUB;
CLR_MBUS;

00D0_FLG = ZERO;
FIRST_BLK_XFER 1);

'SET UP A FIRST BLOCK XFERR

i; .GO IS_NOT_SET

'SEE IF THE GO IS SET

MLCS1 = write;
then

'DO A WRITE FUNCTION

'ERROR IF NOT SET
begin
ERRDF (24, ASYNC, 0);
1, PHR_1, WRD_12, FNC_S5, WRD_19);
PRINTB (FIV_FMT, WRD

if .DRY IS_NOT_SET

then

4904
4905
4906

4907
4908
4909
4910
(M
4912
4913
4914
4915
4916
917
4918
4919
4920

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML&.BLI.2 (55)

'SEE IF DRY SET WITH GO CLEAR

begin
ERRDF (25, ASYNC, 0);

PRINTB (FIV_FM1, WRD_2, PHR_1, WRD_43, WRD_1, PHR_6);
end;

DOZU_FLG = ONE;

else

'GO IS SET DURING FUNCTION

it .DRY IS_SET

then

'SEE IF DRY CLEAR WITH GO SET

'ERROR IF SET:
bealn
ERRDF (26, ASYNC, 0);
PRINTB (FIV_FMT, WRD_2, PHR_2, WRD_43, WRD_1, PHR_5);

DODU_FLG = DNE;
end;

if JILF IS_SET

then

'SET DODU_FLG

'DID FUNCTION CAUSE ILF

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST SECTION

8408 ;ML
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
8441
8442
8443
8444
B44S
8446
8447
8448
8449
8450
8451
8452
8453
8454
8455
8456
8457
8458
8459
8460
8461
8462

23-0(CT-80 09:71

J s

PAGE 203

SEQ 0191

22-0ct=-1980 10:47:44
22-0ct=1980 10:45:32
4922
4923
4924
4925
4926
4927
4928
4929
4930
4931
4932
4933
4934
4935
4936
4937
4938
4939
4940
4941
4542

4943

g
RRDF

(27, ASYNC, 0):

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

'ERROR [F YES

PRINTB (FIv FMT, uno_s. PHR_S, WRD_12. FNC_S, WRD_19);
oogu FLG = ONE;
en

if .OP1
then

IS_SET

'DID FUNCTION CAUSE 'OP!

begin
'ERROR IF YES
ERRDF (28, ASYNC, 0);
PRINTB (FIV_FMT, WRD &, PHR_S, WRD_12, FNC_5, WRD_19);

oogu FLG = ONE;
en

DELA Y

(FRTY_US);

b; .DRY
then

IS_NOT_SET

'WAIT FOR XFERR TO COMPLETE

'SEE IF DRY CLEARED AFTER XFERR

begin

if .GO IS_SET

'TST GO CLR IF DRY NOT SET

then

4944
begin
'CLEAR GO IF STILL SET
4945
CLR_MBUS;
4946
4947
it .G0 IS_SET then ERRDF (29, ASYNC, 0) else ERRDF (30, SYNC, 0);
4948
{TST 6O TO DETERMINE FAILING MOD
4949
PRéNYB
(FIV_FMT,
WRD_1,
PHR_2,
WRD_11,
FNC_5,
WRD_19);
4950 4951
en
4952
else
'DRY NOT SET AND GO CLEARED
'REPORT ERROR
4953
3
4954
RRDF (31, ASYNC, 0);
annre (FIv_FMT, WRD 2, PHR_1, WRD_11, FNC_5, WRD_19);
4955
4956
end;
4957
'SET DODU_FLG
4958
= ONE;
DODU_FLG
4959
end;
4960
'SEE IF GO CLEARED AFTER XFERR.
if .GO IS_SET
4961
4962
then
4963
begin
'CLEAR GO IF STILL SET
4964
CLR_MBUS;
4965
'TST GO TO DETERMINE
4966
if .GO IS_SET then ERRDF (32, ASYNC, 0) else ERRDF (33, SYNC, 0);
4967
4968
PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_5, WRD_19);
L969
Dogu FLG= DNE;
4970
en
4971
4972
ENDS UB;

4973

FAILING MOD

CIZMLAAOD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

K 15
PAGE 204

8464 ML

22-0ct=1980 10:47:44

g:gg :

8467 ;

22-0ct=1980 10:45:32

4974

8468
8469
8470
8471

;
;
:
:

4975
4976
4977
4978

8473
8474
. 8475
8476

;
:
:
;

4980
4981
4982
4983

8478
8479 :
8480 ;
8481 ;

4985
4986
4987
4988

8472 ;

. 8L77

gzgg :

8490 030116

8491 030122
8492 030124
8493 030126
8494 030134

4979

4984

if .TRE IS_SET

then

if .DODU_FLG IS_SET
then
DOBU (.ML_LUN);
DOCLN;
end;

ENDTST;

004167

153664

$T12.

000007
161562

161566

8501 030172
8502 030200
8503 030202
8504 030204
8505 030206
8506 030210

132777
001057
104455
000030
007444
000000

000001

8508 030216

012746

8500 030164

8507 030212

8509 030222
8510
8511
8512
8513
8514
8515

030226
030232
030236
030242
030246
030250

8516 030252
8517 030260

042701

012777

177770
162334

000061

012746

006040

012746

005760

012746
012746
012746
012746
010600
104414

132777
001056

'DROP THIS UNIT IF DODU_FLG SET

begin

142777
150177
005002
004767

030144
030152
030156
030160

TESTING

end;

161604

8495 030140

'SEE IF XFERR CAUSED A TRANSFER ERROR

DODU_FLG = ONE;

4989

005746
104402
152777
016701

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML&.BLI.2 (5%)

begin
'REPORT ERROR IF SET AND CONTINUE
ERRDF (115, INTER, 0);
PRINTB (SIX_FMT, WRD_61, WRD_20, PHR_S, WRD_12, FNC_5, WRD_19);

000040
162030

8496
8497
8498
8499

$ZQ 0192

161506

161500

-(SP}
2
#40,3ML .REG+40
ML.DUT,R1 °

BICB
BISB
CLR
JSR

#7,aML.REG+40
R1,3ML.REG+40
R2
PC,FIRST.BLK.XFER

BIC

MOV

BITB
BNE
TRAP
WORD
.WORD
WORD
MOV

MOV

006542
005630
005414
000006

161470

R1,$SAVE2

ST
TRAP
BISB
MOV

MOV

007020

000200

1$:

JSR

MOV
MOV
MOV
MOV
MOV
TRAP

BITB
BNE

;

4868

;
;

4887
4889

: DODU.FLG
;

4891
4892

;

4895

;

4898

#177770,
R

#61,3ML.REG

#1,3ML.REG
2%
55
30
ASYNC
O

#WRD.19,-(SP)

;

#FENC.S,=(SP)

;

#WRD.12,-(SP)

#PHR.1,=(SP)
#WRD.1,=(SP)
#FIV.FMT,=(SP)
#6,-(SP)
SP,RO
14

#200,aML.REG+S0
3

;

4893

4899

SP,e

4901

CIZMLAAD ML-11 LCGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

L 15

PAGE 205

SEQ 0193

22=-0ct=19 80 10: 47:44
22-0ct=19 8¢ 10::45:32

(W LV IV IV IV LV IV, ]
NN

sMLG

8528 030302
8531 030316
8532 030322
8533 030326
8534 030330
8535 030332
8536 030336
8537 030340
8538 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 030472

8566 030476
8567 030502
8568 030504
8569 030506
8570 030512
8571 030516
8572 030524
8573 030526

104455
000031

TRAP

.WORD
.WORD
.WORD

006660
005630
006306
006542
005634
005414
000006

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

000016
2%:

161404

006646

005630
006306
006560
005634
005414
000006
000001
000016
000001

3%:
161324

4%:

1STB
BPL
TRAP
.WORD
.WORD
.WORD
MOV
MoV
MOV
MOV
MOV

MOV
MOV
MOV
TRAP
MOV
ADD

BITB
BEQ

TRAP

.WORD
.WORD
.WORD

006040

MOV
MoV
MOV
MOV
MOV

005414°
000006
000001
000016
020000

161234

5§%:

MoV
MOV
MOV
TRAP
MOV
ADD

BIT

TRAP

55
N

TOPS
PA:<

4904

ASYNC

4905

#PHR.6,=(SP)
#WRD .1 .= (SP)

#irD.4%,-(5P)
#PHR.1,=(SP)
#WRD.2.=(5P)

#FIV.FMT,=(SP)
#6,-(SP)

SP.RO

14
#16,5P

I,
4903

3%
ML .REG+50

4908
4912

55
32

4915

#PHR.S,=(SP)
#WRD
.1 .= (SP)

4916

Ssvnc

#WRD.43,-(5P)

#PHR.2,=(SP)
#WRD.2.-(SP)
#FIV.FMT,=(SP)
#6,-(SP)

SP.RO

14
#.R2
06é,5P
#1,3ML.REG+60

;

SP,*

;

+,DODU.FLG

5%
55
33

4917
4914
4920

4923

6svnc

4924

#WRD.19,-(SP)
#ENC.S,=(SP)

#RD.12,-(SP)
#PHR.S,
= (SP)

#WRD.3.-(SP)

#EIV.FMT,=(SP)
#6,-(SP)

SP.RO

14
#,R2
é,sp

#20000,aML .REG+60

;

*,DODU.FLG

4925
4922
4928

4931

'CZMLAAD ML=11 LOGIC TEST

'HARDWARD TEST

MACRO M1113

SECTION

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 030612
8554 030614
8595 030620
8596 030622
8597 030624
8598 030626
8599 030630
8600 030632
8601 030634
8604 030652
8605 030654
8606 030662
8507 030666
8608 030672
8609 030700

SEQ 0194
4 7:44

sMLG

000034
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414

012702

001410
016701
001403

000001
000016
000050

6%:
7%:

151276

8%:
9%:

000200

161106

000001

161026

000040

161056

161302
177770

161040

000001

160766

000006

108:

000007
161034

4 5:32

.WORD
.WORD
.WORD

006040
007020
005760
006646
005654
005414
000006

006040

8629 030774

M5
PAGE 206

23-0CT-80 09:11

MoV
MOV
MOV
MOV
MOV
MoV
MOV
MOV
TRAP
MOV
ADD
MOV

BEQ
MoV

BEQ

SSYNC

BITB
BNE
BITB
BEQ
BISB
MOV

BIC
BICB
BISB
BITB
BEQ
TRAP
.WORD
.WORD
.WORD
11%:

TRAP

12%:

MOV
MOV
MOV
MOV
MOV
MOV
MoV
MOV
TRAP

.WORD
.WORD
. WORD

4932

#WRD.19,-(SP)
#FENC.5,-(SP)

#WRD.12,=(S5P)

#PHR.
= (SP)
S,
.4 .= (SP)
#WRD

#EIV.FMT,=(SP)

#6,-(SP)

SP RO
14

né,sp
#50.R0
108

L$DLY,R1

CLR
DEC

BNE
DEC

TOPS
PA:<

; *,DODU.FLG

L\, $8TMP2

4933
4930
4936

; %, $$TMPT
;
;

$$TMP
$$TMPI

;

38$TMP2
4938

#200,3ML .REG+50
15%

4942

#1,3aML.REG

13%
#40,3ML
. REG+40
ML.DUT,R1

6944

#177770,R1

#7,3ML.REG*+40
R1.3ML.REG+40

#1.3ML .REG

4947

#WRD.19,-(SP)

4950

.5,=(SP)

#WRD.11,-(sP)
#PHR.2,=(SP)
.1, =(SP)
#WRD

#FIV.FMT,=(SP)
.

SP..

'CZMLAAQ ML-11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION

23-0CT-80 09:11

N 15

PAGE 207

SEQ 0195

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

JMLG
|

13%:

006040
007020
005750
006542
005634
005414
000006
000001
000916
000001

160612

000040

160642

000007

160624

000001

160552

D
D
e
e
D
) e
—

S WNWWIN
N =
OO NNOOO

161066
177770
160620

14%:

15%:

i ch

A
i

L
L

D i o

D
D

ld e
i

W L

D
i

T L

.WORD
.WORD
.WORD

MOV
MOV
MOV
MoV
MoV
MOV
MoV
MOV
TRAP
MOV
ADD

BITB
BEQ
BISB
BIC
BICB
B1SB
BITB
BEQ

4942
4954

14%

55
37

Ssvuc
4955

#WRD.19,=(SP)
#ENC.S,=(SP)

#WRD.11,-(sP)

#PHR.1,=(SP)
#WRD.2,=(SP)

#EIV.FMT,=(SP)
#6,=(SP)

SP,RO

14
#1,R2
16,5,

SP'.

;

*,DODU.FLG

4958
4940
4961

#1,3ML.REG

18%
#40,3ML
. REG+40
ML.DUT,R1

4963

#177770,
R

#7,3ML .REG+40
R1.aML.REG+40
#1.3ML .REG

4966

0
#WRD.19,-(SP)

4968

TRAP
.WORD
.WORD

ooMNON) b cd e e s b
own
O
BSOSO

[=lelelelelalelalelelelelelall=l=1=

—
WA

TRAP

MOV

16%:

8679

TOPS
PA:<

006040
007020
005750
006560
005630
005414
000006

17%:

000001
000016

001432
104455

176670
040000

18%:

160436

19%:

.WORD
BR
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD
TRAP
ROR

BHIS
JMP
BIT
BEQ

TRAP

#ENC.5,=-(SP)
#WRD.11,-(SP)
#PHR.2,-(SP)
#WRD.1,-(SP)
#FIV_FMT,=(SP)
#6,-(SP)

SP.RO

T
" ,R2
#16,5P

RO
19%
1%
#40000,3ML .REG

SP"

; *,DODU.FLG
-

4969
4963
4970

6974
L4977

MACRO M1113

EST

o
& —

'HARDWARD TEST § 3

'CIMLAAD ML=11 L 0

B 16

23-CCT-80 09:11

PAGE 208

SEQ 0196

JMLG

8729 031350
8730 031354
8731 031356
8732 031360
8733 031362
8734
8735
8736

000001
000020

MOv
MoV
MOV
MOV
MOV

MOV

20%:

160626

21%:

005726
000207

MOV
MOV
MOV
TRAP
MOV
ADD

DEC
BNE

MOV
TRAP
TRAP
TST
RTS

163
INTER

004767

104466
006000
103773
000207

176542

.20,-(sm)

#7.-(5P)

SP RO

SP"

14
#,R2

3
»
’

026 SP

;

21$

*,DODU.FLG
DODU.FLG

4979
4976
4982

ML.LUN,RO

4985

L
(SP)+
PC

4868

Routine Size:

JSR
TRAP
ROR
BLO
RTS

4978

#WRC
., 19 -(SP)
#ENC.S 2(SP)
#WRD.1é -(SP)
#PHR.S 2(<P)
#WRD
.
#WRD .61.- (SP)
#SIX.FMT,=(SP)

333 words
per invocation:
depth
stack
; Maximum
:

—

8728 031350

006040
007020
005760
006646
006046
006526
005432
000007

w —

8700 031310
8701 031314
8702 031316
8703 031320
8704 031324
8705 031330
8706 031332
8707 031334
8708 031340
8709 031342
8710 031344
8711 031346
8712
8713
8714
8719
8720
8724

.WORD
.WORD
.WORD

TOPS
PA:<

18 words

4987

PC,8T12
66
RO
1%
PC

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

0 words

'CZMLAAQ ML-11 LOGIC TEST
HARDWARD TEST

|
1

MACRO M1113

SECTION

23-0CT-80 09:11

€ 16
PAGE 209

SEQ 0197

B742 ML

B743 ;
B74&

8745

;

8746
8747
8748
8749
8750
8751
8752
8753
8754
8755
8756
8757
8758
8759
8760
8761
8762
8763
8764
8765
8766
8767
8768
8769
8770

;
;
:
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;

8772
8773
Bi74
8775

;
;
;
:;

8771

;

8776 ;
8777 ;

8778 ;
8779 ;
8780 ;
8781 ;
8782 ;
8783 ;
8784 ;
8785 ;
8786 ;
8787 ;
8788 ;
8789 ;
8790 ;
8791

;

8792 ;
8793 ;
879 ;
8795 ;

8796 ;

44
132
4990

4991
4992
4993
4994
4995
4996
«997
4998
4999
5000
5001
5002
5003
5004
5005
5006
5007
5008
5009
5010
5011
5012
5013
5014
5015

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

BGNT St:
l+4

TEST NUMBER:

TST 13

TEST NAME:

READ FUNCTION TEST

TEST

DESCRIPTION:

TEST IF THE DRIVE CAN PERFORM
A READ FUNCTION WITHOUT
HANGING THE DRIVE.

A READ FUNCTION IS WRITTEN

INTO MLCST

THEN GO AND ERROR BITS ARE

CHECKED FOR CORRECT STATES.

THIS UNIT
ERRORS.

IMPLICIT

IS DROPPED ON DETECTED

INPUTS:

NONE

5016

5017
5018

5019
5020
5021
5022

5023
5024
5025
5026
5027
5028
5029
5030
5031
5032
5033
5034
5035
5036

5037
5038
5039
5040

5041

loca L
DODU_FLG;

'DROP UNIT

FLAG

BGNSUB;
CLR_MBUS;

0oD0_FLG = ZERO;
FIRST_BLK_XFER ();

MLCS 1
it

read;

!SET UP A FIRST BLK XFERR
‘DO A READ FUNCTION

IF GO GOT SET

.60 IS_NOT_SET

!SEE

begi n

'ERROR IF

then

ERRD F

(34, ASYNC, 0);

CLEAR

PRINTB (FIV_FMT, WRD
1, PHR_1, WRD_12, FNC_6, WRD_19);
if . DRY 1S_NOT_SET
then
beg1n

!TST DRY SET WITH GO CLEAR

'ERROR [F NOT SET

ERRDF (35, ASYNC, 0);
PRINTB (FIV_FMT, WRD
2, PHR_1, WRD_43, WRD_1, PHR_6):
end;

pODU _FLG = ONE;

'SET DODU_FLG

CIMLAAD ML-11 LOGIC iC T EST

MACRO M1113

;HARDUARD TEST SECTI ON

8798 ;ML4

|
’

8801 ;
8802 ;

23-0CT-80 09:11

D 16
PAGE 210

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

gggg :

8804 ;

5042
5043
5044
5045

8806 ;
8807 ;
8808 ;

5047
5048
5049

8810 ;

5051

8812 ;

5053

8814 ;
8815 ;

5055
5056

8818 ;
8819 ;

5059
5060

8803 ;
8805 ;

8809 ;

8811 ;

8813 ;

8816 :
8817 ;

8820 ;
8821

;

8822 ;
8823 ;
8824 ;

8825 ;

else

end

if .DRY IS_SET

then

5046

502

5052

5054

5062

5063
5064
5065

'"ERROR IF SET
begin
ERRDF (36, ASYNC, 0);
PRINTB (FIV_FMT, WRD
2, PHR_2, WRD_43, WRD_1, PHR_S);
end;

then

begin
ERRDF (37, ASYNC, 0);
end;

if .OPI IS_SET

then

5066

DODU_FLG = ONE;

end;

DELAY (FRTY_US);

8530 ;

5071

it .DRY IS_NOT_SET

8834 ;

5075

8831 ;
8832 .
8833 ;

8835 ;
8836 ;

8837 ;

8838 ;

5072
5073
5074

5076
5077

'DID FUNCTION CAUSE OPI

begin
'ERROR IF YES
ERRDF (38, ASYNC, 0);
PRINTB (FIV_FMT, WRD 4, PHR_S, WRD_12, FNC_5, WRD_19);

5069

5070

'ERROR IF YES

PRINTB (FIV_FMT, WRD 3, PHR_S, WRD_12, FNC_S5, WRD_19);
DODU_FLG = ONE;

8828 ;

8829 ;

'DID FUNCTION CAUSE ILF

if .ILF IS_SET

5067
5068

'SEE IF DRY IS CLEAR

DODU_FLG = ONE;

5057
5058
5061

TOPS=20 Bliss=16 v2(206)

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

'GO BIT GOT SET

8826 :

8827 ;

SEQ 0198

then

:
begin

if .GO IS_SET

then

5078

begin

CLR_MBUS;

5079

'WAIT FOR XFERR TO COMPLETE

'IS DRY SET AFTER XFERR

'TEST GO CLEAR WITH DRY NOT SET
'CLEAR GO

8839 ;

5080

if .GO IS_SET then ERRDF (39, ASYNC, 0) else ERRDF (40, SYNC, 0);

8841 ;
8842 ;

5082
5083

'TST GO TC DETERMINE FAILING MOD
WRD_19);
FNC_5,
WRD_11,
PHR_2,
WRD_1,
(FIV_FMT,
PRINTB

8844 ;

5085

8848 ;
8849 ;

5089
5090

8840 ;

8843 ;

8845 ;
8846 ;
8847 ;
8850 ;

8851 ;
8852 ;

5081

5084

5086
5087
5088
5091

5092
5093

else

end

'G60 BIT CLEAR WITH DRY NOT SET

'REPORT ERROR
begin
ERRDF (41, ASYNC, 0);
,
PRINTB (FIv_FMT, WRD 2, PHR_1, WRD_11, FNC_S5, WRD_19);
end;

DODU_FLG = ONE;
end;

'SET DODU_FLG

'CZMLAAO ML=-11 LOGIC T EST
'HARDWARD TEST SECTION

.
l

23-0CT-80 09:11

E 16
PAGE 211

BBS5G4 ;ML4
gggz :

| TMN.8857 ;

MACRO M1113

8858 ;
8859 ;

5094

5095
5096

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

if .GO IS_SET

then

'SEE IF GO CLEAR AFTER XFERR

begin

'CLEAR GO IF STILL SET

CLR_MBUS;

ggg? 3

gggg

ggg% ;

g?gg

it .GO IS_SET then ERRDF (42, ASYNC, 0) else ERRDF (43, SYNC, 0);

8864 ;

5101

PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_5, WRD_19);

8866
8867
8868
8869
8870
8871

‘5103
5104
5105
5106
5107
5108

end;

8865

;
;
;
;
:
;

8872 :
8873 :
8874 ;

8875 ;

5102

5109
5110
5111

5112

ENDSUB;

if .TRE IS_SET
'SEE IF XFERR CAUSED A TRANSFER ERROR
then
begin
'REPORT ERROR IF SET AND CONTINUE TESTING
ERRDF (116, INTER, 0);
PRINTB (SIX_FMT, WRD_61, WRD_20, PHR_S, WRD_12, FNC_6, WRD_19);

DODU_FLG = ONE;

5113
5114
§115

8880
8881
8882
8883
8884
gggg

;
;
;
;
;
;

5117
5118
5119
5120
5121
5122

ENDTST;

8593 031364

004167

152416

8895 031372
8896 031374

104402
152777

:
000040

8894 031370

5116

005746

8897 031402

016701

8899 031412
8900 031420

142777
150177

8898 031406 042701
8901 031424
8902 031426
8903 031432
8904 031440

005002
004767
012777
132777

8906 031450

104455

8905 031446
8907 031452

8908

001057

end;

if .DODU_FLG IS_SET

then

160562

177770

000007
160314

161066
000071
000001

8914 031464

012746

8913 031460

012746

R1,$SAVE2

;

4989

1$:

TRAP
BISB

2
#40,3ML .REG+40

;
;

5020
5022

R2
PC,FIRST.BLK.XFER
#71,3ML.REG
#1,3ML.REG

; DODU.FLG
:
;
;

5024
5025
5026
5028

;

5031

ML.DUT,R1

BICB
BISB

#7,3ML .REG+40
R1,aML.REG+40

CLR
JSR
MOV
BITB

160240
160232

-(SP)

MOV

BIC

160320

BNE

;

WORD

#177770,
R

LWORD ASYNC

.WORD

007030

MOV

#ENC.6,-(SP)

006542

MOV

#PHR.1,=(SP)

006040

8915 031470 012746 005760
8916 031474

JSR

MLG

891

000000

160336

$T13:

TRAP

8903

8912 031456

'DROP THIS UNIT IF DODU_FLG SET

begin
DODU (.ML_LUN);
DOCLN;
end;

000042

8911 031454 007444

!TST GO TO DETERMINE FAILING MOD

DODU_FLG = ONE;

B876 ;
8877 :
8878 :

8879 :;

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

SEQ 0199

MOV

#WRD.19,-(SP)

#WRD.12,-(SP)

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

T0PS
' PA:<

5032

EST
HARDWARD TEST SECTION

MACRO M1113 23-0CT-80 09:11 PAGE 21‘-1

CIMLAAD ML-11 LOGIC T

8917 031500
8918 031504
8919 031510

012746
012746
012746

MOV
MOV
MOV

#WRD.1,-(SP)
#FIV.FMT,=(SP)
#6,-(SP)

8921 031516
8922 031520
8923 031526
8924 031530
8925 031532
8926 031534
8927 031536
8928 031540
8929 031544

104414
132777
001056
104455
000043
007444
000000
012746
012746

TRAP
BITB
BNE
TRAP
JWORD
JWORD
"WORD
MOV
MOV

14
#200,aML.REG+S0
3¢
55
43
ASYNC
0
#PHR.6,=(SP)
#WRD.1.=(SP)

MOV
MOV
MOV
MOV
MOV
TRAP
ADD
BR
TSTB
BPL
TRAP
JWORD
"WORD
"WORD
MOV
MOV

#PHR.1,=(SP)
#WRD.2,-(SP)
#FIV.FMT,=(SP)
#6,-(SP)
SP.RO
14
#16,5P
3
@ML.REG+50
4$

8948 031640 012746 006560

MOV

#PHR.2,=(SP)

8950 031650
8951 031654
8952 031660
8953 031662

MOV
MOV
MOV
TRAP

#FIV.FMT,=(SP)
#6,-(SP)
SP.RO
14

8920 031514

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

8949 031644

8954 031664
8955 031670

8956 031674

010600

012746

012746
012746
012746
012746
010600
104414
062706
000427
105777
100030
104455
000044
007444
000000
012746
012746

012746
012746

012746
012746
010600
104414

012702
062796

132777

8957 031702

001430

8959 031706
8960 031710
8961 031712

000045
007444
000000

8958 031704

8962 031714
8963
8962

005630
005414
000006

000200

005630

006306

MOV

006542
005634
005414
000006
000016
160136

2%:

006646
005630

006306

MOV

005634
005414
000006

000001
000016

000001

MOV

160056

4&$:

104455

MOV
ADD

BITB
BEQ

TRAP

006040

8966 031720

012746

007020

8968 031730
8969 031734
8970 031740
8971 031744
8972 031750
8973 031752

012746
012746
012746
012746
010600
104414

006646
005646
005414
000006

8967 03172¢6

160222

006660

012746

896

MOV

012746 005760

.WORD
"WORD
"WORD

DMLG
2

MOV

;

$P.RO

55
44
ASYNC
0
#PHR.S,=(SP)
#URD .1 .- (SP)

#WRD.43,-(SP)

SEQ 0200

;5P

;

5034

;

5037

;

5038

#WRD .43, - (SP)

SP,e

:
:
:

5036
5041
5045

5048
.

5049

#WRD.2,=(SP)

#1,R2
#é,sp

#1,aML.REG+60

;

SP,w

; *,DODU.FLG
:

5050
5047

5053

;

5056

#URD.19,-(SP)

45
ASYNC
0

MOV

#ENC.S,-(SP)

MOV
MOV
MOV
MOY
MOV
TRAP

#PHR.S,
= (5P)
#URD.3,-(SP)
#FIV.FAT,=(SP)
#6,-(SP)
SP.RO
14

MOV

#WRD.12,-(S5P)

; SP,w

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

5057
TOPS
PA:<

CZMLAAO ML-11 LOGIC T EST

HARDWARD TEST SELTION

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
8978 031774

8982 032004

157766

23-0CT-80 09:11

58%:

#,R2
#16,5P

BEQ

BIT

104455

TRAP

#ENC.S5,=(SP)

MOV

8991 032044
8992 032050

012702
062706

006646
005654
005414
000006

000001
000016

8993 032054 012700 000050

8994 032060
8995 032062
8996 032066
8997 032070

001410
016701
001403
005016

8999 032074

001375

8998 032072

7%:

150030

005301

‘

;

SEQ 0201

5058
5055

MOV

#50.,R0

5061

5064

;

5065
s
:

; SP,e

#1,R2
#6b,sP

: *,DODU.FLG
:

108
LSDLY, R
9%
(SP)

: «,$$TMPT

5066
5063

e, $8TMP2

5069

; $STMP
L $STMPI

. $$TMP

BIT8

#200,aML.REG+S0

5071

DEC

BNE

005300

9002 032102

132777

000200

157640

132777

000001

157560

BITE

#1,aML.REG

5075

152777

000040

157610

BISB

#40,aML.REG+40

;

5077

9008 032134 042701

177770

;

5080

000767

9003 032110

001106

9005 032120

001452

9007 032130

016701

9009 032140
9010 032146

142777
150177

9012 032160
9013 032162
9014 032164
9015 032166
9016 032170
9017 032172

001405
104455
000047
007444
000000
000404

9021 032174
9022 032176
9023 032200
9024 032202

104455
000050

007500
000000

9026 032210
9027 032214
9028 032220
9029 032224

012746
012746
012746
012746

9004 032112
9006 032122

9011 032152

9018
8858

132777

160034

000007
157566

000001

012746

005414

BNE

157572

128:

158
13§

ML.DUT,R1

BICB
BISB

#7,aML.REG+40
R1,aML.REG+40

BITB

157520

MOV

BIC

118:

007020
005750
006560
005630

BEQ

ML4
:

9025 032204 012746 006040

9030 032230

108:

DEC

9000 032076

9001 032100

9%: »

: *,DODU.FLG
:

#WRD.12,=(5P)

#PHR.S,=(SP)
#WRD .4 .~ (SP)
#EIV.FMT,=(SP)
#6,-(5P)
SP.RO
14

BEQ
MOV
BEQ
CLR

8$:

#WRD.19,-(SP)

MOV
MOV
MOV
MOV
MOV
TRAP

MOV
ADD

MOV

8984 032014 012746 005760
012746
012746
012746
012746
010600
104414

#20000,aML .REG+60
46
ASYNC
O

MOV

007020

PAGE 211-2

JWORD
"WORD
"WORD

006040

8985 032020
8986 032024
8987 032030
8988 032034
8989 032040
8990 032042

012746

MOV
ADD

G 16

BEQ
TRAP
.WORD
"WORD
WORD
BR

TRAP
.WORD
.WORD
WORD

MOV

MOV
MOV
MOV
MOV
MOV

#177770,R1

#1.aML.REG
1%
55
&7
ASYNC
0
128

S5
50
SYNC
O

#WRD.19,-(SP)

#ENC.S,=(SP)
#WRD.11,-(SP)
#PHR.2,=(SP)
#URD.1.-(SP)

#EIV.FMT,=(SP)

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

TOPS
PA:<

5083

MACRO M1113

CIMLAAD ML-11 L 0

HARDWARD TEST § 3

9031 832234

000006

13%:

9043 032276
9044 032302
9045 032306
9046 032312
9047 032314
9048 032316
9049 032322
9050 032326
9051 032334
9052 032336
9053 032344
9054 032350
9055 032354
9056 032362
9057 032366
9058 032374
9059 032376
9060 032400
9061 032402
9062 032404
9063 032406
9064 032410
9065 032412
9066 032414
9067 032416
9068 032420
9069 032424
9070 032430
9071 032434
9072 032440
9073
9074
9075
9076 032444
9077 032450
9078 032454
9079 032456
9080 032460
9081 032464

9082 032470 9083 032472
9084 032474
9085 032476
9086 032502 032777
9087 032510 001432

006040
007020
005750
006542
005634
005414
000006
000001
000016
000001

157344

000040

157374

000007

157356

000001

157304

157620
177770
157352

14%:

158%:

23-0CT-80 09:11
MOV
MOV
TRAP

#6,-(SP)

TRAP

55
51

.WORD
.WORD
.WORD

MOV
MOV
MoV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

BITB
BEQ
BISB

MoV
BIC
BICB
BISB

BITB
BEQ
TRAP

16%:

17%:

006040
007020
005750
006560
005630

JMLG

005414
000006

000001
000016

176670

040000

18%:

157170

19%:

H 16

PAGE 211-3

SEQ 0202
.

SP.RO

¢
SP,

14+

5075
5087

14%

Ssvuc

5088

#URD.19,-(SP)
#ENC.5,=(SP)

#WRD.11,-(sP)

#PHR.1,=(SP)
#WRD.2.=(SP)
FEIV.FMT,=(SP)
#6,-(SP)

SP.RO

14
#1,R2
éb,sp

Sp‘.

*,DODU.FLG

5091
5073
5094

#1,3ML .REG

18%
#40,3ML
. REG+40
ML.DUT,R1

5096

#177770,R1

#7,3ML.REG*40
R1.aML.REG+40

#1.3ML .REG

5099

0
#WRD.19,-(SP)

5101

16$

.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

#FNC.5,=(SP)
#WRD.11,-(SP)
#PHR.2,-(SP)
#WRD.1,-(SP)

#FIV_FMT,=(SP)
#6,-(5°)

SP,RO

14
#1,R2

#16,5P

RO
19%
1%
#40000,aML .REG

20%

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

¢
SP,

;

*,DODU.FLG

TOPS
PA:<

5102
5096
5103

5107

006040
007030
005760
006646
006046
006526
005432
000007

9099 032556
9100 03262
9101 032564
9102 032566
9103 032572
9104 032576
9105 032600

000001
000020

91N
9112
9113
9118

208:

157360

9106 032602

9107 032606
9108 032610
9109 032612
9110 032614

.WORD
.WORD
.WORD

21%:

000207

*
.

;

5110

164

éursn

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

#WRD.19,-(SP)

BNE

21%

DEC

SEQ 0203

#ENC.6,=(SP)

#WRD.12,=(5P)
#PHR.S - (SP)

#wrD.20.-(5P)

#WRD.61.=(SP)
#SIX.FMT,=(5P)
#7,-(5P)

SP.RO

SP,¢

14
TRY.
#20,5P
R2

. «,DODU.FLG

. DODU.FLG

— ) —
WV ON

TRAP

[ 16
PAGE 211-4

— ot
-

23-0CT-80 09:11

CZMLAAD ML-1

HARDWARD TES

MACRO M1113

MOV
TRAP
TRAP

ML.LUN,RO

5118

44
(SP)+

4989

RTS

TST

Routine Size:

333 words

Maximum stack depth per

;
invocation:

18 words

9119

9123
9127
9128
9129
%130
9131
9132
9133
9134
9135

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

sMLS

032616
032616
032622
032624
032626
032630

004767

104466
006000
103773
000207

176542

T13:2
15:

JSR

TRAP

ROR
BLO
RTS

PC,$713
66

RO
1%
PC

TOPS
PA:<

5120

CIZMLAAD ML-11 LOGIC

HARDWARD

TEST

MACRO M1113

SECTION

J 16
23-0CT-80 09:11. PAGE 212

SEQ 0204

9141

;ML4

22=0ct=1980 10:47:44

9144
9145
9146
9147
9148
9149
9150
9151
9152

;
;
;
;
;
:;
;
;
;

5124
5125
5126
5127
5128
5129
5130
5131
5132

!
BGNTST;

;

TEST IF THE DRIVE CAN PERFORM A CLEAR FUNCTION WITHOUT HANGING THE DRIVE.

g}gz :

g}gg

A CLEAR FUNCTION IS WRITTEN INTO MLCST.

9157
9158
9159
9160
9161
9162
9163
9164
9165
9166

:
;
;
;
;
;
;
;
;
;

5137
5138
5139
5140
5141
5142
5143
5144
5145
5146

!
!
!
!=--

THEN GO AND ERROR BITS ARE CHECKED FOR CORRECT STATUS.
THIS DRIVE IS DROPPED ON DETECTED ERRORS.

BGNSUB;
CLR_MBUS;

9168 ;
9169 ;

5148
5149

MLER = ONES;
MLCS1 = DRV_CLR;

'SET BITS IN ERROR REGISTER
'DO A CLEAR FUNCTION

'SEE

g}:% :

g}gz :

9167 ;

9170 ;
9i71

9172

;
:

9173 ;
9174 ;
9175 ;
g};g :

22=0ct=1980 10:45:32

g}gz

5147

5150
5151

5152

5153
5154
5155

'++
! TEST NUMBER:
TST 14
!
! TEST NAME:
CLEAR FUNCTION TEST
!
! TEST DESCRIPTION:

local
DODU_FLG;

DODU_FLG = ZERO;

DELAY (ONE_O0S);
.GO IS_SET

then

g}gg
5158
5159
5160

if .DRY IS_SET
then

9185 ;

5165

DODU_FLG = ONE;

;
;
;
;

9186
G187
9188
9189
9190
9191
9192
9193

;
:
;
;
;
;
;
:

9194 ;

9195 ;

begin

5161
5162
5163
5164
5166
5167
5168
5169
5170
5171
5172
5173

5174

5175

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

'DROP UNIT FLAG

‘DELAY

GO CLEARED AFTER FUNCTION

begin
'ERROR IF SET
ERRDF (44, ASYNC, 0);
PRINTB (FIV_FMT, WRD_1, PHR_S, WRD_11, FNC_3, FNC_7, WRD_19);

9178 ;
9179 ;
9180 ;

9181
9182
9183
9184

TOPS=20 Bliss=16 v2(206)

'TST DRY CLEAR WITH GO SET
'"ERROR

SET

ERRDF (45, ASYNC, 0);
PRINTB (FIV_FMT, WRD_2, PHR_S, WRD_43, WRD_1, PHR_S);
end;

else

end

'SET DODU_FLG

'GO CLEARED AFTER FUNCTION

it .DRY IS_NOT_SET
'TST DRY SET WITH GO CLFAR
then
begin
'"ERROR IF NOT SET
ERRDF (46, ASYNC, 0);
PRINTB (FIV_FMT, WRD_2, PHR_1, WRD_43, WRD_1, PHR_6);

DODU_FLG = ONE;

end;

CZMLAAO ML-11 LOGI C TEST
HARDWARD TEST SECT ION

9223

O VOVOVOVOYVOOVOLO000COO0000C000N0
NNNN
COONOWVNSWN
2OV
NV
WOV
~No

9201
9202
9203
9204
9205
9206
9207
9208
9209
9210
9211
9212
9213
9214
9215
9216
9217
9218
9219
9220
9221
9222

23-0CT-80 09:11

K 16
PAGE 213

SEQ 0205

2 2=0ct=1980 10:47:44
2 2=0ct=1980 10:45:32
ot A AR AL L
LV TV TV IV TV IV IV TV RV IV LV LV IV, TV LV TV LV TV IV
) o o cd o e o
D D oD D e D D
D D D DD D DD

9197 ;ML4
9198 ;
9199
9200

MACRO M1113

it JILF IS_SET
then
begin
ERRDF (47, ASYNC, 0);
PRINTB (FIV_FMT, WRD 3, PHR_S, WRD_12,

DODU_FLG = ONE;

'DID FUNCTION CAUSE

'ERROR IF
FNC_3,

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

YES

FNC_7, WRD_19);

end;

it .OPI
then

IS_SET

'DID FUNCTION CAUSE OPI

begin

ERRDF (48, ASYNC, 0);
PRINTB (FIV_FMT, WRD
4, PHR_S, WRD_12,

DODU_FLG
= ONE;

'ERROR
FNC_3,

FNC_7,

YES
WRD_19);

end;

'TEST ERROR REGISTER FOUR CLEAR

if .MLER neq ZERO
then

'ERROR IF NOT CLEAK
begin
ERRDF (49, ASYNC, 0);
PRINTB (SIX_FMT, FNC 3, FNC_7, WRD_19, WRD_14, WRD_13, REG_3);

end;

ENDSUB;
if .DODU_FLG
then
be

IS_SET

!DROP THIS UNIT

DODU_FLG SET

~N
W
W

DO U (.ML_LUN);
DOCLN;
end;

9241 032632
9242 032636
9243 032640
9244 032642
9245 032650
9246 032654
9247 032660
9248 032666
9249 032672
9250 032674

5209

ENDTST;

004167
005746

151150

104402
152777

016701
042701
142777

150177

005002
012777

$T14:

000040
157314

157070

000007

157052

177777

157056

177770
157046

1%:

JSR
TST

R1,$SAVE?
=(SP)

B1SB

#40,3ML .REG+40
ML.DUT,R1

TRAP

MOV

BIC

BI(B
BISB
(LR
MOV

5122

5143
5145

0177770,

#7,3ML.REG+40

:;.GHL.REGOAO
#-1,3ML.REG+60

. DODU.FLG

5147
5148

MACRO M1113

CIZMLAAD ML-11 LO GIC 1 EST

HARDWARD TEST SE CTION

23-0CT-80 09:11

L 16

PAGE 214

SEQ 0206
s bk

JMLG

9265 032736
9266 032744
9267 032746

9268 032750

9269
9270
9271
9272
9273
9274
9275

032752
032754
032756
032762
032766
032772
032776

9276 033002
9277 033006
9278 033012
9279 033016
9280 033020
9281 033022

9282 033026
9283 033030
9¢84 033032
9285 033034
9286 033036
9287 033040
9288 033044
9289 033050
9290 033054
9291 033060
9292 033064
9293 033070
9294 033074
9295 033076
9296 033100
9297 033104
9298 033110

9299 033114
9300 033116
9301 033124
9302 033126
9303 033130
9304 033132
9305 033134
9306 033136

012777
012700
001410
016701
001403
005016
005301
001375
005300
000767
132777
001464
104455
000054
007444
000000
012746
012746
012746
012746
012746
012746
012746
012746
010600
104414
105777
100026
104455

000055
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414

062706
012702
062706
000434
132777
001030
104455
000056
007444
000000
012746

000011
00001

156770

2%:

167174

3%:
4%:

000001

156734

5%:

:32
MOV
MOV

BEQ

MOV

BEQ
CLR
DEC
BNE
DEC
BITB
BEQ
TRAP

.WORD
.WORD
.WORD

006040
007036
006774
005750
006646
005630
005414
000007

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MoV
TRAP
1ST8
BPL
TRAP

156722

.WORD
.WORD
.WORD

006646
005630
006306
006646
005634
005414
000006

#11,9ML.REG
f1,R

5%
k&DLY.R1

;

$STMP
$STMPT
;

$$TMP?

II,BHL.REG

5152

55
54

5155

#WRD.19,-(SP)
#ENC.7,=(SP)
#FNC.3.-(SP)
#WRD.11,-(SP)
#PHR.S,=(SP)
#WRD.1.-(SP)

5156

Sstc

#FIV.FMT,=(SP)
#7,-(SP)

SP RO
14

SP,*

aML .REG+50
6%
55
55

5158

#PHR. 5 -(SP)
#WRD.1.=(SP)

5162

5161

ssvuc

#WRD.43, -(5P)
FFIV.FMT,=(SP)
#6,-(SP)

SP,RO

6%:

000200

7%:

156624

5149
5150

*,$8TMP1

#PHR.S.=(SP)
#WRD.2.=(SP)

000016
000001
000020

14
#16,5P
n RZ

#20,5pP

8%
#200,aML .REG+50
8%
59
56
ASYNC

006660

+, $$TMP?

TOPS
PA:<

#PHR.6,-(SP)

SP,¢

*,DODU.FLG

MACRO M1113

CZMLAAOD ML-11 LOGIC TEST
'HARDWARD TEST SECTION
|

PAGE 215

SEQ 0207
22=0ct=1 980 10:4 7: L
22-0ct=1 980 10:4 5: 32

sMLG

—

931
9316 033166
9317 033172
9318 033174
9319 033176
9320 033202
9321 033206

)

005630
006306
006542
005634
005414
000006
000001
000016
000001

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

MoV

MOV
MOV
MoV
MOV
MOV
MOV
TRAP
MOV

156544

8S:

ADD

BITB
BEQ

TRAP
.WORD
.WORD

.WCRD
MoV
MOV

006040
007036
006774
005769
006646
005646
005414
000007
000001
000020
020000

9339 033302

9340 033310
9341 033312
9342 033314
9343 033316
9344 033320
9345 033322
9346 033326
9347 033332
9348 033336
9349 033342
9350 033346
9351 033352

156450

9%:

MOV
MOV
MOV
MOV
MoV
MoV
MoV
TRAP
MoV
ADD

BIT

BEQ

TRAP

.WORD
.WORD
.WORD

006040
007036
006774

005760
006646
005654
005414
000007
000001
000020

001430
104455
000061
007444
000000

—

23-0CT-80 09:11

M 16

156356

10%:

MOV
MoV
MOV
MOV
MOV
MOV
MOV
MoV
MOV
TRAP
MOV
ADD
TST

BEQ

TRAP
.WORD

.WORD
.WORD

TOPS
PA:<

#WRD.1,-(SP)

#URD .45, - (5P)

#PHR.1,=(SP)
#WRD.2,=(SP)
#FIV.FMT,=(SP)
#6,-(SP)

SP.RO

SP,*

14
#1.R2
#é,sp
#1,3ML .REG+60
9%

*,DODU.FLG

5174
517
5177
5180

55
57

ASYNC

5181

#WRD .1
FENC.7
FENC.3

#WRD.12,-(SP)

#PHR.S
#WRD.3,-{SP)

#EIV.FMT,=(SP)
#7,-(SP)

SP.RO

14
#.R2
#20,SP

SP,¢

;

*,DODU.FLG

#20000,aML .REG+60
108

5182
5179
5185

55
60

5188

#WRD.19,-(SP)
#FNC.7,-(SP)
#ENC.3.=(SP)

5189

ASYNC

#WRD.12,-(SP)

#PHR.S,
= (SP)
#WRD
.4 .= (SP)
#FIV.FMT,=(SP)
#7,-(SP)

SP.RO

SP,*

#,R2

*,DODU.FLG

#20,sp

. REG+60
ML
1%
55
61

ASYNC

5190
5187
5193
5196

'CZMLAAD ML-11 L OGIC TEST
'HARDWARD TEST S ECTION
9364
9365
9366
9367 033414
9368 033420
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
9406 033516
9407 033522
9408 033524
9409 033526
9410 033530
9411
9612
9413 °
9418 ;ML4
9419 ;
942C
9421 ;

23-0CT-80 09:11

N 16
PAGE 216

SEQ 0208

JMLG

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

007320
005770
005774
006040
007036
006774
005432
000007
000020

005302
001004
016700

104451
104444
005726
000207

177142

11%:

*
12%:

156460
13%:

;

004767

104466

177110

BHIS
JMP
DEC
BNE

MOV
TRAP
TRAP
TST
RTS

Routine Size:

103773

000207
:

;

'<BLF/PAGE>

13%

SP'.

;

DODU.FLG

44
(SP)+
PC

218 words

depth per

BLO

RO
1%
PC

Routine Size:

ML.LUN,RO

PC,8T14

RTS

TOPS

PA:<

5197

JSR

TRAP
ROR

006000

5210

MoV
MOV
MOV
MOV
MOV
MOV
MoV
MOV
MOV
TRAP
ADD
TRAP
ROR

Maximum stack

o —

|
|

MACRO M1113

invocation:

6 words

Maximum stack depth per

19 words

5207

;

invocation:

0 words
22-0ct=1980 10:47:44
22-0ct=1980 10:45 132

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

MACRO M1113

23-0CT-80 09:11

PAGE 217

.1
SEQ 0209
L4
:32

9423 sMLG

9426
9425
9426
9427
9428
9429
9430
9431
9432
9413
9434
9435
9436
9437
9438
9439
9440
9441
9442
9443
9444
9445
9446
9447
9448
9449
9450
9451
9452
9453
9454
9455
9456
9457

9458

9459
9460
9461
9462
9463
9464
9465
9466

;

:
:
3
3
;

5211
5212
5213
5214
g%}g

!
BGNTST;
'+
; TEST NUMBER:

TST 15

2%};

: TEST NAME:

COMPOSIT ERROR TEST

3
3
:
:

5219
5220
5221
g%%%

! TEST DESCRIPTION:
TEST TO SEE IF SETTING EACH
!
BIT IN THE ERRCR REGISTER
!
CAUSES A COMPOSIT ERROR BY:
;

:
:
:
3
3
3
3
:
:
:
3

5224
5225
5226
5227
5228
5229
5230
5231
5232
5233
5234
5235

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.
!
!
! IMPLICIT INPUTS:
NONE
!==

3
5

5238
5239

3
§

:
:

5236
5237

lccal
DODU_FLG,

DAT PAT,
SKIP_MASK;

:
:

DODU_FLG
= ZERO;
= X0'163157';
SKIP MASK
DAT_PAT = ONE;
DODJ_FLG= ZERO;

:
:
:
3
3

5245
5246
5247
5248
5249

incr COUNT from 0 to 15 do
begin

S
3
:
3
;
:
3

9467
9468
9469
9470
9471
9472 :
9473 :
9474
875 3
9476 :
9477 :

5244

5250
5251
5252
5253
5254
5255
5256

5257
5258

5259
5260

5261

5262

'DROP UNIT FLAG
'DATA PATTERN

'POINTS TO MLER READ ONLY BITS

CLR_MBUS;

5240
5241
5242
5243

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

if (.DAT_PAT and .SKIF_MASK) neq ZERO
then
begin
BGNSUB;

'LCAD SKIP MASK

'DATA PATTERN SET BIT O IN MLER

'WRITE AND SHIFT DATA PAT 10 MLER 16 TIMES
'SKIP IF DAT_PAT FALLS ON READ ONLY BIT

MLER = .DAT_PAT;

'WRITE DATA_PAT TO MLER

it .COMP_ERR IS_NOT_SET
then
beg1n

'SEE IF DAT_PAT CAUSED A COMP ERROR

'ERROR 1F NO COMP ERROR
ERRDF (50, ASYNC, 0);
PRINTB (FOR FMT, FNC_8, PHR_1, WRD_12, FNC_8);

PRINTB (FMT 4, .DAT FAY)
DODU_FLG= ONE;
end;”

CIMLAAD ML-11 L OGIC TEST
HARDWARD TEST S ECTION

CIZMLAAO ML-11 LOGIC 1C T EST

HARDWARD TEST

MACRO M1113

SECTI ON

23-0CT-80 09:11

1
¢
PAGE 218

9479 ;ML4
gzg? :
g
'
i

9482 :

9483
9484
9485
9486
9487
9488

9489
9490
L9491
9492
9493
9494

;
;
;
;
;
:
;
:

:
;
;

3233 :

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

5264
5265
5266
5267
5268
5269
5270
5271
5272
5273
5274
5275

5276

9503 033532

004167

9505 033544

016704

9507 033554
9508 033562

142777
150477

9504 033536

9506 033550

152777

042704

9509 033566
9510 033570
9511 033574
9512 033600
9513 033602

005001
012704
012702
005003
030204

9515 033606
9516 033610

104402
010277

9514 033604

9517 033614

9518 033622

9519 033624

9520 033626

ENDSUB;

DAT_PAT = .DAT_PAT*ONE;

001035

if .DODU_FLG IS_SET

then

'DROP UNIT IF DODU_FLG IS_SET

begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

150302

000040
156420

177770

000007
156152

156174

$T15:

1%:
156144
040000

104455

2%:

156126

JSR

R1,$SAVEL

MOV

ML.DUT,R4

BICB
BISB

#7,3ML.REG+40
R&4,aML.REG+40

BISB
BIC

156156

163157
060001

CLR
MOV
MOV
CLR
BIT

3¢

WORD

MOV

#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

010216

;
: DAT.PAT,*

012746

9531 033670

2
R2,aML .REG+60

.WORD

9523 033634

MOV

§237

:
%,
%
:
;

#40000.aML .REG+50

"WORD

5209

R1
#-14621,R4
#1,R2
R3
R2.R4

BIT
BNE

;

#177770,R4

TRAP
MOV

007444

9524 033640 012746 005760

#40,aML.REG+40

BEQ

TRAP

000062

000000

!SHIFT DAT_PAT TO NEXT BIT AND REPEAT

end;

001447

032777

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

end;

9521 033630

9522 033632

SEQ 0210

DODU.FLG
SKIP.MASK
DAT.PAT
COUNT
DAT.PAT,SKIP.MASK

5240
5241
5242
5245
5248
5250
5252

5254

5257

;

5258

ASYNC

#FNC.8,-(SP)

#PHR.1,=(SP)
#FNC.8.-(SP)
#FOR.FMT,=(SP)
#5,-(SP)
|
SP,RO
14
:

R2, (SP)

#ERT.4,-(SP)

: SP,«

. DAT.PAT,s

5259

|
-

MACRO M1113

HARDWARD TEST SECTION

9534
9535
9536
9537
9538
9539
9540

23-0CT-80 09:11

D 1
PAGE 219

SEQ 0211

sMLG
}
033676
033702
033704
033706

012746
010600
104414
012701

9542 033716
9543 033720
9544 033722
9545 033724
9546 033726
9547 033730
9548 033734
9549 033736
9550 033740

104467
006000
103731
006302
005203
020327
003722
005301
001004

9541 033712

9551 033742

9552 033746
9553 033750

gggg 033752

062706

016700
104451
104444

000002
000001

000020

4%:
000017

156220

000207

004767
104466

gg;g 033766

000207

177552

T15::

1%:

006000
103773

TRAP
ROR
BLO
ASL
INC
CMP
BLE
DEC
BNE

67
RO
2%
R2
R3
R3,#17
1%
Rl
5%

ADD

TRAP
TRAP

RTS

#20,5p

gggz
!<BLF/PAGE>

;

*,DODU.FLG

: DAT.PAT
s COUNT
; COUNT,»
; DODU.FLG

5260

5256

5261

5266
5245
.

5269

5272

5209

5274

RTS

RO
1%

6 words

13 words

]

8
y

; Maximum stack depth per invocation:
5277

SP,»

;

51
44

PC,$T15
66

Routine Size:

;

TOPS
PA:<

ML.LUN,RO

JSR
TRAP

ROR
BLO

9578

9585
9586 ;

#2,-(SP)
SP,RO
14
.

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

9572 033754
9573 033760
9574 033762
9575 032764

MOV
MOV
TRAP
MOV

MOV

5%:

9556
gggg
9563
9567
9571 033754

3%:

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

0 words

e ————————————

JIMLAAD ML=11 LOGIC T EST

CIZMLAAD ML-11 LOGIC TEST

HARDWAPD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

E_1
PAGE 220

SEQ 0212

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

;ML

TOPS=-20 Bliss=16 v2(206)
PA:<NEALE>BLZML4.BL1.2 (58)

BGNTST;
l44

TEST NUMBER:

TST

TEST NAME:

ATA BIT

TEST

TEST DESCRIPTION:

ESST THE ATA BIT FOR SETTING

5291

SETTING A BIT
REGISTER.

IN THE ERROR

TEST THE ATA BIT FOR CLEARING
AFTER BEING SET BY:

1.
2.

WRITING A FUNCTION TO MLCST.
WRITING A ONE INTO THIS
UNITS ATA BIT

TEST THE ATA BIT FOR NOT
AFTER BEING SET BY:
1.

VO NO VNS W

BN
AT

=2 OOV
NOWNSWN=O

d b
cd e
b

T AWV LY
T
VA
T WA
WA

N N U

PN RN PRI RO NI NI N =

WRITING A ONE INTO THE
ATA BIT OF THE OTHER
UNITS.

INPUTS:

NONE

b d b

N AN AN AN NN N NN N NN W W NN

IMPLICIT

CLEARING

local

ATA_SAVE
DAT_PAT;

: bitvector (8],

CLR_MBUS;

MLER = ONE;

'DATA PATTERN

!SET THE ATA BIT

MLER = ZERO;
ATA_SAVE = .MLAS;

if .ATA_SAVE
then

'STORES ALL 8 ATA BITS ON READS AND WRITES

[.ML_DUT]

'READ THE ATTN REGISTER

IS_NOT_SET

begin
ERRDF (51, ASYNC, 0);

'SEE IF THIS DRIVES ATA BIT IS SET

'ERROR AND EXIT_TST IF NOT SET
PRINTB (FOR_FMT, WRD_15, PHR_1, WwRD_11, FNC_8);

EXIT_TST;
end;

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

TR TR TR TR

T E

)
PAGE 221%

SEQ 0213

if .ATTN IS_NOT_SET

then

begin

ERRDF (52, ASYNC, 0);

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

'SEE IF THE ATTN BIT IS SET

'ERROR AND EXIT_TST IF NOT SET

PRINTB (FIV_FMT, REG_2, WRD_16, PHR_1, WRD_11, FNC_8);
EXIT_TST;
end;

MLCS1 = NOOP;

'TRY TO CLEAR THE ATA BIT WITH NOOP FUNC

if .ATTN IS_SET

'SEE

then

IF ATA GOT CLEARED

begin

'ERROR AND EXIT_TST IF SET
ERRDF (53, ASYNC, 0);
PRINTB (FOR_FMT, WRD_15, PHR_2, WRD_11, FNC_2, WRD_19);
EXIT_TST;

OO Wi
S OO0 NO NS NN —

W
&

AW (W IV TV IV LV LV, TV LV TV TV IV TV IV IV TV TV TV RV TV TV TV TV TV TV RV LV LW LW TV LV LV TV V]

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

363

T L L

T
L

PRTR TR

PR LR T LR L

e Se e e

9644 H
9645 ;
9646
9647
9648
9649
9650
9651
9652
9653
9654
9655
9656
9657
9658
9659
9660
9661
9662
9663
9664
9665
9666
9667
9668
9669
9670
9671
9672
9673
9674
9675
9676
9677
9678
9679
9680
9681
9682

SECTION

WA WA T AT A
T AT
NN NN NN NN NN N
OO0 NNNNNNNNN
- OO0 NONWNES
NN —

HARDWARD TEST

23-0CT-80 09:11

end;

ATA_SAVE = .MLAS;

'READ THE ATTENTION REGISTER

i; LATA_SAVE [.ML_DUT] IS_SET

'SEE IF THE ATA REG GOT CLEARED BY NO-OP

then

begin

ERRDF (58, ASYNC, 0);
PRINTB (FIV_FMT, WRD 15, PHR_2, WRD_11, FNC_2, WRD_19);
end;

BGNSUB;

MLER = ONE;

'SET THE ATA BIT

ATA_SAVE = ZEROES;

'CLEAR ATA_SAVE

MLAS = .ATA_SAVE;

'TRY TO CLEAR THE ATA BY WRITING TO IT.

MLER = ZERO;

ATAZSAVE [.Mi_DUT] = ONE;
if (ATTN IS_SET

then

'SET ATA_SAVE FOR THIS DRIVE
'SEE IF THE ATA GOT CLEARED

begin

ERRDF (54, ASYNC, 0);
'ERROR IF NOT CLEARED
PRINTB (FIV_FMT, WRD_15, PHR_2, WRD_11, WRD_17, REG_5);
end;

ENDSUB;
BGNSUB:

MLER = ONE;

'SET THE ATA BIT

DAT_PAT = ONEt;

'DATA PATTERN OF ONE IN FIELD OF ZEROES

incr ATA_SEL from 0 to 7 do
begin

'REPEAT LOOP 8 TIMES

MLER = ZERO;

i; .ATA_SEL neq .ML_DUT
then

'SKIP IF ATA_SEL EQLS THIS DRIVE NO.

CIMLAAD ML-11 LOGIC I1C T EST
HARDWARD TEST SECTI ON

MACRO M1113

6 1
PAGE 222

23-0CT-80 09:11

9700 ;ML4

22=-0ct=.380 10:47:44

3;83 :

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

3;82 :

gggg

begin

MLAS = .DAT_PAT;

it .ATA_SAVE [.ML_DUT] IS_NOT_SET
'SEE IF THIS DRIVE ATA IS CLEARED
then
begin
ERRDF (55, ASYNC, 0):
'ERROR AND EXIT LOOP IF CLEARED
PRINTB (SIX_FMT, WRD_15, PHR_6, WRD_11, WRD_17, REG_5, PHR_7);

ATA_SAVE = _MLAS;

:
;
:
:
;

5386
5387
5388
5389
5390

9713
9714
9715
9716
9717

;
;
:
;
:

5392
5393
5394
5395
5396

9721

5400

ENDSUB;

9730 033770
9731 033774
9732 034002

004167
152777
016700

150044
000040

9734 034010

042704

9718 ;
9719 ;
9720 ;

g;gg 3

9733 034006
9735 034014
9736 034022

5391

5397
5398
5399

5401

010004

034054
034056
034060
034062

9748 034064

9749 034070
9750 034074

9751 034076

§752 034102

9753 034106

DAT_PAT = _DAT_PAT*ONE;
end;

010602
060201
010146
010046

042716

156162

177770

000001

177770

012746
005046

000001

062706

000010

004767
005700

'SHIFT DAT_PAT AND REPEAT

ENDTST;

155720
155724

006201
006201
006201

9744
9745
9746
9747

end;

005077
017746
010001

9741 034046
9742 034050
9743 034052

9738 034034
9739 034040
9740 034044

'READ ATA REG BACK

exitloop;
end;

000007
155712

012777

'WRITE DAT PAT TO ATA REGISTER

PRINTB (FMT_7, .DAT_PAT);

142777
150477

9737 034026

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

5383

9707
9708
9709
9710
9711

9712 ;

TOPS=20 Bliss=16 v2(206)

147000

155736

155716

155724

$T16:

JSR
BISB

R1,$SAVEL
#40,aML.REG+40

BIC

#177770,R4

MOV
MOV

BICB
BISB

ML.DUT,RO
RO, R4

#7,aML.REG+40
R&4,aML.REG+40

;
;

5276
5315

5318

MOV

#1,3ML .REG+60

;

ASR
ASR
ASR
MOV
ADD
MOV
MOV

R1
R1
R1
SP,R2
R2.R1
R1,=(SP)
RO, =(SP)

: ATA.SAVE,*

CLR
MOV
MOV

BIC

MOV
CLR

JSR

ADD
ST

ML .REG+60
aML.REG*70,=(SP)
RO,R1

;
. «,ATA.SAVE
;

5319
5320
§322

#177770, (5P)
#1,-(SP)
-(SP)

PC,BLSGT2

0n0,sp
RO

r———

9703 ;

9704 ;

SEQ 0214

MACRO M1113

9755

23-0CT-80 09:11

PAGE 223

SEQ 0215

ML&

3529

22-0ct-1980 10:47:44

:
001026

BNE

9760 034114
9761 034116
9762 034120

000063
007444
000000

.WORD
"WORD
WORD

9765 034132

012746

9759 034112

9763 034122
9764 034126

104455

TRAP

;

5325

5326

63
ASYNC
0

007046
005750

MOV
MOV

#FNC.B,=(SP)
#WRD . 11 -(SP)

034142
034146
034152
034154
034156

012746
012746
010600
104414
104463

005400
000005

MOV
MOV
MOV
TRAP
TRAP

#FOR.FMT,=(SP)
#5,-(SP)
SP,RO
14
63

9775 034174

001026

006542

MOV

9772 034160
6773 034164
9774 034166

9776 034176

062706
000467
032777
000064
007444
000000

9783 034222

012746

9784 0346226
9785 034232
9786 034236
9787 034242
9788 034244
9789 034246

9790 034250
9791 034252
9792 034260
9793 034264

9794 034266

000014
100000

155554

1%:

104455

9777 034200
9778 034202
9779 034204

9780 034206
9781 034212
9782 034216

MOV

ADD
BR
BIT
BNE

TRAP

007312
005414
000006

MOV
MOV
MOV
MoV
TRAP
TRAP

100031

000001
155464

155420

2%:

BR
MOV
TST
BPL

104455

TRAP

9795 034270
9796 034272
9797 034274

000065
007444
000000

9799 034302

012746

006766

9801 034312

012746

006560

9803 034322
9804 034326
9805 034332
9806 034334
9807 034336

012746
012746
010600
104414
104463

005400
000006

000016
000544

MOV

3$:
4$:

5333

#ENC.B,=(SP)
#WRD . 11 -(SP)
#PHR.1,=(SP)

;

5334

#REG.2,=-(SP)
#FIV.FMT,=(SP)
#6,-(SP)
SP.RO
14
63

MOV
MOV
MOV
TRAP
TRAP

ADD
JMP

;

SP,e

3%
¥1,3ML.REG
aML . REG+50

;
:
:

;

5343

#WRD. 19 -(SP)

;

5344

#ENC.2,-(SP)

MOV

062706
000167

;

MOV

9800 034306 012746 005750

9808 034340
9809 034344

65
ASYNC
O

MOV

9802 034316 012746 006006

,322
5324
5330

.WORD
JWORD
WORD

9798 034276 012746 006040

;
:
:

#WRD.16,-(SP)

012746
012746
012746
010600
104414
104463

#14,5P
48
#100000, ML .REG+50

MOV

MOV
MOV
MOV

000433
012777
005777

#WRD.1§ -(SP)

64
ASYNC
0

007046
005750
006542

006014

#PHR.1,=(SP)

.WORD
"WORD
WORD

012746
012746
012746

PA:<

012746
012746

9766 034136 012746 006006

TOPS

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

9758 034110

9767
9768
9769
9770
9771

5330
5338
5340

#WRD .1i -(SP)
#PHR.2,~(SP)

#WRD.15,-(SP)

#FOR.FMT,-(SP)
#6,-(SP)
SP.RO
14
63

#16,5P
12%

: SP,w

;
;

5340
534

CZMLAAO ML=-11 LOGIC TEST
HARDWARD TEST SECTION

CIMLAAD ML=-11 LOGIC TEST
SECTION

9811
9812
9813
9814 034350
9815 034354

9816 0343°0
9817 034362
9818 034364
9819 034366
9820 034370
9821 034372
9822 034374
9823 034400
9824 034404
9825 034410
9826 034412
9827 034416
9828 034422
9829 034424
9830 034426
9831 034430
9832 034432
9833 034434
9834 034436
9835 034442
9836 034446
9837 034452
9838 034456
9839 034462
9840 034466
9841 034472
9842 034474

9843 034476
9844 034502
9845 034504
9846 034512
9847 034516
9848 034520
9849 034524
9850 034526
9851 034530
9852 034532
9853 034534
9854 034536
9855 134540
985, J34544
9857 034550
9858 034554
9859 034556
9861

9862 034574
9863 034576
9864 034600
9865 034602

23-0CT-80 09:11

PAGE 224

3
SEQ 0216

2 2 0 C t -198 0 10: 47:44
2 2 0 C t -198 010 :45:32

JMLG
017716
016701
006201
006201
006201
010602
060201
010146
016746
042716
012746
005046
004767
062706
005300
001026
104455
000072
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414
062706
104402
012777

005077
005016
016701
006201
006201
006201
010602
060201
010146
016746
042716
012746
011646
004767

100026
104455
000066
007444

5%:

155570
177770
000001

MOV
MOV
ASR
ASR
ASR
MOV
ADD
MOV
MOV

BIC
MOV
CLR
JSR

146464

000010

ADD

DEC
BNE

TRAP
.WORD
.WORD

.WORD

006040
006766
005750
006560
006006
005414
000006
000016

000001

155242

155246

155444

146556

155154

CLR
CLR

MoV
ASR
ASR
ASR
MOV
ADD
MOV
MOV

155424
177770
000001

000010

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
TRAP
Mov

BIC

MOV
MOV

155200

JSR

MOV
TST
BPL
TRAP
.WORD

.WORD

,
(SP)
ML .REG+70
R1
R1
R1
SP,R2
R2 R
R1.=(SP)
ML .DUT,=(SP)
2177770, (5P)
#1,-(SP)
-($P)

« ATA,SAVE

;

TOPS
PA:<

5348
5350

ATA.SAVE
,*

PC,BLSGT2

n0,sp

6%
55
72

5353

ssvnc

5354

#WRD.19,-(SP)
#FNC.2,-(SP)
#WRD.11,-(SP)
#PHR.2,=(SP)

#WRD.15,-(SP)

#FIV.FMT,=-(SP)
#6,-(SP)

SP,*

SP.RO

14
#16,5P
~n

HARDWARD TEST

MACRO M1113

#1,3ML.REG+60

oML .REG+60
(SP)
ML.DUT,R1

;

ATA.SAVE
,+

ML .DUT,=(SP)

0177770, (sP)
#1,-(SP)
(SF),=(SP)

PC,BLSPU2
)
,aML .REG+70
10(SP

ML .REG+S0
7%

ASYNC

ATA.SAVE
,+

5362
5364

5367

MACRO M1113

CIZMLAAD ML-11 LOGI C TEST
SECT 10N

SEQ 0217

22-0ct=198 0 10: 47:44
22-0ct=198 0 10:145:32

000006
000016
000010

000001
155060
000001
155256

9898 034734
9899 034736
9900 034740
9901 034742

9902 034744

9903 034746

177770
000001
146116

000010

006672
007334

746

000007

7%:

155064

8%:

TRAP
ADD
ADD
TRAP
ROR

BLO

TRAP
MOV

CLR

MOV

9%:

CLR

MoV

CMP
BEQ
MOV
MOV
MOV
ASR
ASR
ASR
MOV

0
#REG.S,~

#WRD .17,

#WRD 18,

.
14
#16,SP
#10.5P

SP,

#1,3ML.REG+60

ML .REG+60

#1.R4
R3

ML.DUT,R2
R3,R2
10$
R4 ,aML.REG+70
(SP)
ML .REG+70,
R2,R1
R1
R1
R1

SP,RO

#1,-(SP)
-(SP)

TST
BNE
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

(SP)

SP,RO

MOV

ADD

5368

)

#FEIV.FMT,=(SP)
#6,-(SP)

RO,R1
R1,=(SP)
R2.=(SP)

CLR
JSR

TOPS
PA:<

#WRD.11.-(SP)
H#PHR 2,

ADD
MOV
MOV

BIC

VUV
~ 0 0V~

.WORD
MOV
MOV
MOV
MoV
MOV
MOV
MOV
MOV

007334
006022
005750

000000

9873 034616
9874 034622
9875 034626
9876 034632
9877 034636
9878 034642
9879 034644
9880 034646
9881 034652
9882 034656
9883 034660
9884 034662
9885 034664
9886 034666
9887 034674
9888 034700
9889 034704
9890 034706
9891 034712
9892 034714
9893 034716
9894 034722
9895 034726
9896 034730
9897 034732

NN NN N NN NN

JMLG

NS~

9867
9868
9869
9870 034604
9871 034606
9872 034612

PAGE 225

HARDWARD TEST

23-0CT-80 09:11

* ,DAT.PAT

ATA.SEL

ATA.SEL,*

DAT.PAT,+

* ATA.SAVE

5371
5373
5374
5375
5377
5380
5383
5384
5386

ATA.SAVE
,+

#177770, (sP)
PC,BLSGT2

caé.sp
R

108

55
67

5389

#PKR.7,-(SP)
#REG.S.-(SP)

5390

ssvuc

#WRD.17,-(SP)

#WRD.11.-(SP)
#PHR .6, = (SP)

#WRD.15,-(5P)

#SIX.FMT,-(SP)
#7,-(5P)

C
l

MACRO M1113

EST

o
= —

CIMLAAD ML-11 L 0
'HARDWARD TEST S 3

23-0CT-B0 09:11

1
K
PAGE 226

SEQ 0218
22-0ct=-198 010 :47:44
22-0ct=198 0 10: 45:32

JMLG

9923
9924
9925
9926 035044
9927 035046
9928 035050
9929 035052
9930 035056
9931 035062

004520
000002
000024
108:

9935 035074

000007
106467

006000
103664

005726
000207

MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
ADD
BR
ASL

SP,RO

; DAT.PAT,«

SP,RO

FEMT.7,=(SP)
#2,-(SP)

104466

006000
103773

«
;

DAT.PAT

ATA SEL
ATA.SEL,*

5397
5377

BLE
TRAP

5398

12%:

BLO
TST

5276

ROR

RTS

o —

Routine Size:

TRAP
ROR

PC,8$T16
66
RO

RTS

JSR

17 words

5400

:
_
6 words
; Maximum stack depth per invocation:

!<BLF/PAGE>

;

11%:

; Routine Size:

5402

5392

InNC

BLO

000207

539

o
CP

#24,5P

:
300 words .
n:
invocatio
per
depth
; Maximum stack

176644

SP"

14
R4, (SP)

cmpP

;

004767

TOPS
PA:<

0 words

MACRO M1113

CZMLAADO ML-11 LOGIC TEST

'HARgg;RD TEST SECTION
7 ;MLG

.
|

|
|

9978
9976
9980
9981
9982
9983
9984

;

5403
5404
5405

!
!
BGNTST;

;
9985 ;
9986 ;
9987 ;

5407
5408
5409
5410

'+
! TEST NUMBER:
|
' TEST NAME:

5413
5414
5415

|
'
|
'
1
'
'
!
‘
'
|
|
'

9993
9994
9695
9996
9997
9998
9999
10000

10001

;

;
;
;
;
;

;
;
;
;
;
;
;
;

;

5411
5412

5416
5417
5418
5419
5420
5421
5422
5423
5424

5425
5426
5427

10006
10007
10008
10009
10010
10011

;
;
;
;
;
;

5429
5430
5431
5432
5433
5434

10013
10014
10015
10016
10017

;
;
;
;
;

5436
5437
5438
5439
5440

10005 ;

10012 ;

10018 ;

10019 ;

10025

;
;
;
;
;

10026 ;

10027 ;
10028 ;
10029 ;

10030 ;

5406

10002 ;
10003 ;
10004

10020
10021
10022
10023
10024

PAGE 227
TOPS-20 Bliss=16 v2(206)
PA:<KNEALE>BL2ML4.BLI.2 (59)

;
;
;

9988
9989
9990
9991
9992

23-0CT-80 09:11

10031 ;
10032 ;ML4
10033 ;

5428

5435

5441

5442

5443
5444
5445
5446
5447

5448

5449

5450
5451
5452

5453
5654

SEQ 0219

TST 17
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.

DOING SEARCH FUNCTIONS AT ALL
PRESENT ARRAYS' AND TEST ATTN
SET

DOING SEARCH FUNCTIONS AT ALL
NOT PRESENT ARRAYS' AND TEST

ATTN CLEARED.

' IMPLICIT INPUTS:
!
|
i-

NONE

CLR_MBUS;

MLDK = ZEROES;

MLCS1
= SEARCH:

‘D0 A SEARCH FUNCTION

if .GO IS_SET
then
beain

'SEE IF GO IS SET

ERRDF (56, ASYNC, 0):

'ERROR [F NOT SET

PRINTB (FIV_FMT, WRD_1, PHR_2, WRD_11, FNC_10, WRD_19);
end;

if .ILF IS_SET
then
g

RRDF (57, ASYNC, 0);

'SEE

ILF

IS SET

'ERROR [F SET

PRINTB 'FIV FMT, WRD_3, PHR _S5, WRD_11, FNC_11, FNC_10, WRD_19);
end;

it .ATTN IS_NOT_SET
_
then
begin

‘SEE IF ATIN IS SET

-0ct=-1980 10:4 7:44
-0ct=1980 10:45:32

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

CZMLAAD ML-11 LOGIC T EST
NAggggzo TEST SECTION
10035
10036
10037
10038
10039
10040
10041

;
:
;
;
;
;
;

5455
5456
5457
5458
5459
5460
5461

10043 ;
10044 ;

5463
5464

10042 ;

10045 ;
10046 ;
10047 ;

5462

10050 ;
10051 ;
10052 ;

5470
5471
5472

10054
10055
10056
10057
10058

;
;
;
;
;

5474
5475
5476
5477
5478

10063 ;

5483

10059
10060
10061
10062

;
;
;
;

10064 ;

10069
10070
10071
10072
10073

5489
5490
5491
5492
5493

10074 ;

10075 ;

10076
10077
10078
10079
10080
10081

;
;
;
:;
;
;

10082 ;
10083 .

10087
10088
10089
10090

'READ ATTN

.OPI

004167

10096 035146

016703

152777

IS_SET

begin
ERRDF (60, ASYNC, 0);
'ERROR IF NOT SET
PRINTB (Flv FMT, WRD &4, PHR_S5, WRD_12, FNC_10, WRD_19);
end;

ENDSUB;
end;

if .OP_NUM_ARR Lss %0'006017'
then
incr ARR_SEL from .LST_ARR +

'SEE IF LSS 17 ARRAYS ARE PRESENT
.ARR_INC to .ARR_16 by

begin

.ARR_INC do

‘DO A"SEARCH AT ALL NOT PRESENT
!ARRAYS IF LSS 17

BGNSUB;
CLR_MBUS;

MLDX
= .ARR SEL:
MLCS1
= SEARCH;

'LOAD DSA REG WITH ARR_SEL
'DO A SEARCH FUNCTION

if .OP1 IS_NOT_SET
then
begin
ERRDF (61, ASYNC, 0);

'SEE IF OPI

IS SET

'ERROR IF NOT SET
PRINTB (rxv FMT, WRD 4, PHR_1, WRD_12, FNC_10, WRD_19);

5495

10094 035134

10095 035140

'LOAD DSA REG WITH ARR_SEL
'DO A SEARCH FUNCTION

PRINTB (FMT_9, .ARR SEL)

5494

5502
5503

'DO SEARCH AT ALL PRESENT ARRAYS

MLDX
= .ARR SEL:
MLCS1= SEARCH;

then

5487
5488

5496
5497
5498
5499
5500
5501

SEQ 0220

.ARR_INC do

BGNSUB;
CLR_MBUS:

S484

5485
5486

;
;
;
;
;

begin

5473

10065 ;
10066 ;

10067 ;
10068 ;

incr ARR_SEL from O to .LST_ARR by

5469

5479
5480
5481
5482

PAGE 227-1

begin

5467

5468

10053 ;

else

23-0CT-80 09:11

ERRDF (59, ASYNC, 0);
'ERROR IF NOT SET
PRINTB (FIV_FMT, WRD 16, PHR_1, WRD_12, **r_i0, WRD_19);
end

5465
5466

10048 ;

10049 ;

MACRO M1113

PRINTB (FMT_9, .ARR SEL)
end;
ENDSUB;
end;

end;
ENDTST;

146662

000040
155016

JMLG
:

154572

$117:

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

JSR

R1,$SAVED

MOV

ML.DUT,R3

BISB

#40,9ML .REG+40

T0PS
PA:<

5401

5405

HARDWAR® TEST

10097 035152
10098 035156
10099 035164
10100 035170
10101 035174
10102 035202
10103 035210
10104 035212
10105 035214
10106 035216
10107 035220
10108 035222
10109 035226
10110 035232
10111 035236
10112 035242
10113 035246
10114 035252
10115 035256
10116 035260
10117 035262
10118 035266
10119 035274
10120 035276
10121 035300
10122 035302
10123 035304
10124 035306
101%5 035312
10126 035316
10127 035322
10128 035326
10129 035332
10130 03533¢
10131 035342
10132 035346
10133 035350
10134 035352
10135 035356
10136 035364
10137 035366
10138 035370
10139 035372
10140 035374
10141
10142
10143
10144 035376
10145 035402
10146 035406
10147 035412
10148 035416
10149 035422
10150 035426
10151 035432

10152 035434

10153 035436

MACRO M1113

CIZMLAAD ML-11

177770

000007
154550
154534
000031
000001

23-0CT-80 09:11

BIC
BICB
BIsSB
(LR
MOV

154554
154476
154470

BITB
BEQ

TRAP

.WORD
.WORD
.WORD

006040
007074

MOV
MOV

MoV

005414
000006

000016
000001

154464

18:

MOV
MOV
MOV
MOV
MOV
TRAP
ADD
BITB

BEQ

TRAP

.WORD
.WORD
.WORD

006040
007074
007104
005750
006646
005646
005414
000007

000020
100000

MOV
MOV
MOV
MOV
MOV
MOV
MOV

154364

28:

MOV
MOV
TRAP
ADD

BIT
BNE

N1
PAGE 227-2

SEQ 0221

#177770,R3
#7 ML .REG+40
R3,aML .REG+40
ML .REG+30
#31,aML.REG
:1,3HL.REG

5435
5436
5438

5441

#WRD.19,-(SP)
#FENC.10,-(SP)
#WRD.11,-(SP)
#PHR.2,-(SP)
#WRD.1,-(SP)

5442

70
SSYNC

#FIV.FMT ,=(SP)
#6,-(SP)

SP.RO

SP"

14
#16,5P
#1,3ML.REG+60

5440
5445

2%
55

5448

SSYNC
#WRD.19,-(SP)
#FNC.10,-(SP)
#ENC.11,-(SP)
#WRD.11,-(SP)
#PHR.S5,-(SP)
#WRD.3,-(SP)

5449

#FIV.FMT,=(SP)

#7,-(SP)

SP,RO

SP‘.

5447
5452

§100000.anL.R56050

5455

TRAP

.WORD
.WORD
.WORD

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

006040
007074

5456

000016

TOPS
<
PA:

SP'.

5454

———

CIZMLAAD ML-11 L

HARDWARD TEST S

MACRO M1113

RTS
Mov
MoV

10154 035442

0155 035444
56 035450
57 035454
58 035456
5
60

-]
OO0O000O0O OO0 O0O0O0O0O0O0O000 el=l=l=l=l=l=lelelolelelelolelolelolololelololololeololalelelalelolelelol
i
I I
— i
D e D D e el D D D i e il D i D

CLR
BR

154250

62 035474
63
64
65

154232

wi [VIV IV
~ HEW
2
OO

wn
wh

v VIV

o [=1=T=]
W WNW

o
w
WNW

=l=1=

oo
=l=l=]
SO

004602
000002

—

o
ad

BIT
BEQ

ADD
CMP

&~
N

Mov

002102

152454

000017

016701

010177

2
153776

;

ARR.SEL

5462
5463

g%OOOO.iHL.REG060

5465
5466
5468

547

#WRD.19,-(SP)
#FNC.10,-(SP)
#WRD.12,-(SP)
#PHR.S,=(SP)

5472

#31,aML.REG

;

ARR.SEL,*

74
SSYNC

#WRD
.4 ,-(SP)
. FMT,=(SP)
#FIV
#6,-(SP)

SP,RC

14
R1,(SP)

#FMT.9,-(SP)
#2,-(SP)

;

5473

ARR.SEL,*

SP,RO

5470
5474

BLO

o
W

o
w

RO, ML .REG+40
R1,aML.REG+30

MoV
MOV
MOV
MOV
MOV
MOV
MoV
MoV
TRAP
MOV
MOV
MOV
MOV
TRAP
ADD
TRAP
ROR

006040
007074
005760
006646
005654
005414
000006

LST.ARR,P2
ARR.INC,R3

BIC
BICB
BISB
Mov

MOV

SEQ 0222
5452
5461

BISB

TRAP

.WORD
.WORD
.WORD

000022

[elelelelalalelelelelel]

i ad

)
b —
b

b
=P

VOO0 VOO
b=l

154154
154226

B 2

PAGE 227-3

6%
2
. REG+40
#40,aML

TRAP

D o

= O O®~NO
N &~ W N=O
SIRARRE N
W N=O
8382% NS

0o OO0 ~NNNNNN ~ NN~
o
Co Co OO O ©0 oo

020000

R T

p——p————— —-

PPN
i
i D i D o ik D e d D ik e

23-0CT-80 09:11

———

p—

;
:

5461

*,ARR.SEL
ARR.SEL,*

BLE
CMP
BGE

MOV
ADD
MOV
MOV

LST.ARR,R1

5482

TRAP

5484
5485

154034

BISB

154016

BICB
B1SB

MoV

5479

OP .NUM.ARR,#17
108

22-0ct-198
22-0ct-198

ARR. INC,R1
ARR.16,R3
ARR.INC,R2
9%

#40,aML .REG+40
ML.DUT,RO

TOPS
PA:<

#177770,r0

#7,3ML .REG+40
RO. ML .REG+40
R1.aML.REG*30

;

ARR.SEL,*

5487

r--

'CIMLAAD ML=11 L
'HARDWARD TEST §

EST

WWWWWWNW N

NO VNS W

[=lelelelelelelelele]

W= OO

NN NN NN NN

006040
007074
005760

NN
RLN NN TR

000022

8%
35
75

8%:

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
ADD
TRAP
ROR

SEQ 0223
5488
5490

#20000
ML . REG+60
,

5493

ASYNC

5494

#WRD
.
#PHR.1,=(SP)
#WRD
.4, - (SP)
#FIV.FMT,=(SP)
#6,-(SP)

14
R1, (SP)
#EMT.9,-(SP)

#2,-(SP)
SP,RO

9%:

003707
000207

10 $:

SP"

;

ARR.SEL,*

Sp’.

5495

5492
5496

#22,SP
'
.
:

ADD
CMP

BLE
RTS

*,ARR.SEL
ARR.SEL,*

5482
5401

: Routine Size:
234 words
; Maximum stack de' n per 1nvocation:

—

BLO

242
e4?

13 words

—

10264 036072

|f————
—

BNE

.WORD
.WORD
.WORD

004602
000002

34 036044
35 036046
36 036050
37 036052
38 036054
239 036056
240

#31,aML.REG

BIT

€

PAGE 227-4

MOV

TRAP

35770

0259 036060
10260 036060
10261 036064
10262 036066
10263 036070

|
1

153 74 0
154 01 2

23-0C7-80 09:11

NN
v

D
e
D e
)
D
e
e

000031
020000

000000

ooC 08000
NN
»

D o

D e

D i

D o

[elelelelelelolelolelelololelalclclocloleleleleclelel]

10211 035732
740

MACRO M1113

004767

104466

006000
103773

000207

177050

T 1 7::
1 $:

JSR
TRAP
ROR
BLO
RTS

PC,$T17
RO
1%
PC

5501

MACRO M1113

I EST

HARDWARD TEST SEC 1 l ON

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

BGNTST;
l+e

! TEST NUMBER:
-

=000 ~NON W
NO VS W
WN—=OVONOWVNEWN 2O VNS WN =200V
N=O VNV

Li
:32
VIV
WA
T AT AT AT
T T T T AT
T A AT AT
T AT AT AT T T
i
i
T
VIVTAIAT AT AT
TTTAT AT T AT AT T T T AT T AT AT T T
A T
T
AT
vy Ay
i
VIS BB WHWWHWUHWWWWHWWWWNOI
N NN NN NNPON) = e ed b e ed d s 2 2 OO OOO

PR
P
P
I P P P
I
TETR TR
T

2 OOVONOWVESWN=O

T T T TR TR TR T T e

e
b
POND

SEQ 0224

;

D cd —d e e

NN NN N NN N W W NN

e
e
b

=lelelelelelelelelelelel=

PAGE 228

(ML

R TR TR TR TR TR TR T

10271

23-0CT-80 09:11

—

'CZMLAAO ML=11 LOG l C

TEST NAME:

TST 18
READ

TEST DESCRIPTION:
TEST THE READ

IN PRESET TEST
IN PRESET FUNCTION BY:

PERFORMING A READ-IN-PRESET FUNCTION AND
AND VV FOR SET

CLR_MBUS;

/ NOT

SET.

TESTING GO, ERROR BITS

MLCS1 = RD_IN_PRE;

‘DO A READ IN PRESET FUNCTION

if .GO IS_SET
then

'SEE

IF GO IS NOT SET

begin

'ERROR IF SET
ERRDF (62, ASYNC, 0);
PRINTB (FIV_FMT, WRD
1, PHR_2, WRD_11, ENC_11, WRD_19);

end;
if JILF
then

IS_SET

'SEE

ILF

IS NOT SET

begin

'ERROR IF SET
ERRDF (63, ASYNC, 0);
PRINTB (FIV_FMT, WRD
3, PHR_S, WRD_11, FNC_11, WRD_19);

end;

if .OPI
then

IS_SET

'SEE

IF OPI

IS NOT SET

begin

'ERROR IF SET
ERRDF (64, ASYNC, 0);
PRINTB (FIV_FMT, WRD 4, PHR_S, WRD_11, FNC_11, WRD_19);
end;

if .vv IS_NOT_SET
then

begin
ERRDF (65, ASYNC, 0);

'SEE

IF vv IS SET

'ERROR IF NOT SET

PRINTB (F{V_FMT, WRD 18, PHR_1, WRD_11, FNC_1i, WRD_19);
end;

ENDTST;

MACRO M1113

CIMLAAOD ML-11 LOGIC TEST

'HARDWARD TEST SECTION
l

23-0CT-80 09:11

E_2
PAGE 229

SEQ 0225

22-0ct=19 80 10: 47:44
22=0ct=19 80 10 145:32

JMLG

328
332 036074
333 036102
334 036106
335 036112
336 036120
0337 036124

000040
154062
177770
000007

153614

—

000021
000001

0340 036142
0341 036144
342 036146
343 036150
344 036152
345 036156
346 036162

153636

#177770,R0

#7,3ML.REG+40
RO,aML .REG+40

15 3620

153 546
153540

o
o

o
W
o

Y
QN S
N

012746
012746
012746
010600
104414

062706
132777
001426
104455
000077
007444
000000

006040
007104
005750
006560
005630
005414
000006
000016
000001

:I.OHL.REG

5522
5524

5527

#WRD.19,-(SP)
#ENC.11.-(SP)
#WRD.11.-(SP)
#PHR.2,-(SP)
#WRD.1,=(SP)

5528

#FEIV.FMT,=(SP)
#6,-(SP)

SP.RO

153534

Sp"

14
#16,5P

5526
5531

#1,3ML .REG+60

1§:

2%
55

5534

77
3svuc

012746
012746
012746
012746
012746
012746
012746
010600

006040
007104
005750
006646
005646
005414
000006

062706
032777
001426
104455
000100
007444
000000
012746
012746
012746
012746

000016
020000

104414

10377 036
10378 0363
10379 0363

#21
ML .REG
,
76
Ssvnc

P
———— Y

[=lolelelololololelelolele] [=1=]

348 036172
349 036176
350 036202
351 036206
352 036210
353 036212
354 036216
355 036224
356 036226
0357 036230
10358 036232
10359 036234
10360 036236
10361 036242
10362 036246
10363 036252

5506

#40,aML
. REG+40
ML.DUT,RO

$T118:

TOPS
PA:<

006040
007104
005750
006646

5535

#WRD.19,-(5P)
#ENC.11.-(SP)
#WRD.11,-(SP)
#PHR.S,=-(SP)
#WRD.3,-(SP)
#FIV.FMT,=(SP)
#6,-(SP)

153450

2%:

SP,RO

TRAP
ADD

14
#16,5P

TRAP

3g
55

BIT
BEQ

.WORD
.WORD
. WORD

MOV
MOV
MOV
MOV

#20000,aML .REG+60

SP"

5533
5538
5541

100
ssvnc

#WRD.19,-(SP)
FENC.11.-(SP)
#WRD .11.-(SP)
#PHR.S,-(SP)

5542

‘ CIZMLAAD ML-11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION
|

10381

012746
012746
012746
010600
104414

005654
005414
000006

10390 036366

132777

000100

10389 036362

062706

10391 036374

001026

10393 036400
10394 036402
10395 036404

000101
007444
000000

10397 036412
10398 036416
10399 036422

012746
012746
012746

10392 036376

10396 036406

10400 036426
036432
036436
036442
036444

10405 036446
}8289 036452

000016

153354

3%:

104455

SEQ 0226

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

MOV
MOV
MOV
MOV
TRAP

#WRD
.4 ,=(SP)
#FIV.FMT,=(SP)
#6,-(SP)
SP,RO
14

BITB

l106.aHL.RE6050

ADD

BNE

TRAP

006034

MOV

012746
012746
010600
104414

062706
000207

005414
000006

000016

MOV
MOV
MOV
TRAP

4%:

ADD
RTS

5548

#WRD.19,-(SP)

5549

#WRD.18,-(SP)

#EIV. FHT -(SP)
#6,-(SP)
SP,RO
14

10423 036454

10424 036454

036460
036462
036464
036406

004767

104466
006000
103773
000207

177414

10430

1%:

JSR

TRAP
ROR
BLO
RTS

; Routine Size:

5553

!<BLF/PAGE>

5P,

3
3

5547
5503

5550

7 words

PC,$T18
66
RO
1%
PC

6 words
:
: Maximum stack depth per invocation:

10431

10439
10440
10441 ;

T18::

#16,5P
PC

120 words
:
: Maximum stack depth per invocation:

10414
10415
10419

5540

; Routine Size:

10409

#FNC.11,=(SP)
#WRD . 11 -(SP)
#PHR.1,=(SP)

012746

SP,*

5545

MOV
MCV
MOV

MOV

007104
005750
006542

TOPS

PA:<

101
ASYNC
O

006040

#16,SP

LMWORD
.WORD
.WORD

012746

10408

10429

sMLG

10384 036342
10385 036346
10386 036352
10387 036356
10388 036360

10425
10426
10427
10428

PAGE 230

}8%2%

10401
10402
10403
10404

23-0CT-80 09:11

0 words

10485

AT T T T T AT A N AT AT
T WA T
T
T

bl‘

LA
TEST DESCRIPTION:

v Vi ViV

T T

VYUYWL
000000000000 NN~ N~ N~ NN~NOrOrOM oo
WN =0V~
S~
VIS W =000~ o s =00V~ OV

ILLEGAL FUNCTION TEST

T AT A T A

10473
10474
10475
10476
10477
10478
10479
10480
10481
10482
10483
10484

5:32

TOPS=20 Bliss=16 v2(206)

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

lee

TEST NAME:

10464
10465
10466
10467
10468
10469
10470
10471
10472

7:44

BGNTST;
TST 19

10463

SEQ 0227

]

TEST NUMBER:

VIV

10461
10462

€ 8¢ ®e Bs 8o ®eBe s8¢ %cGe 00000000000 0s%0 05 %0 0s %0050 000000000000 00000000T000 0000000000t

NeSe LR

10443 sMLG
10444 ;
10445
10446
10447
10448
10449
10450
10451
10452
10453
10454
10455
10456
10457
10458
10459
10460

6.2
PAGE 231
OO
©o Co
oo

HARDWARD TEST SECTION

23-0CT-80 09:11

MACRO M1113

CZMLAAOD ML-11 LOGIC TEST

TEST THE DETECTION OF

ILLEGAL

EUNCTIONS WRITTEN TO MLCST
¥

WRITING ALL POSSIBLE

FUNCTIONS TO MLCS1.

ILLEGAL

THEN

TEST GO AND ERROR BITS CLEARED.

IMPLICIT INPUTS:

NONE

local
BAD_BITS,
BAD_FUNC;

'STORES A COUNT TO GENERATE BAD FUNCTIONS
'STORES GENERATED BAD FUNCTION

BAD_BITS = ZEROES:

'CLEAR BAD BITS

incr CNT_1

from 0 to 2 do

'REPEAT LOOP 3 TIMES

BAD_BITS = .BAD_BITS + X0'2';

'ADD 2 TO BAD_BITS

begin

'REPEAT LOOP GENERATING 'GOOD' FUNCTIONS

incr CNT_2 from Xc'1' to %0'71' by %0'10' do

begin

BGNSUB;
CLR_MBUS;

BAD'FUNC= .CNT_2 + .BAD_BITS;
FIRST BLK XFER 1);
MLCS1= .BAD_ FUNC:
if JILF IS_SET
then
begin

if .GO IS_SET
then

egin

3or (66, ASYNC, 0);

'ADD BAD_BITS TO (NT_2 GENERATING BAD FUNCTIONS

'SET UP K FIRST BLOCK XFERR

'LOAD MLCS1 WITH TWO BAD FUNCTIONS
IS SET

'SEE

ILF

'IF

ILF

IS SET THEN SEE IF GO IS SET

'ERROR [F GO SET WITH BAD FUNCTION

PRINYB (FIV FMT, WRD_1, PHR_2, WRD_11, FNC_12, WRD_19);
PRINTB (FMTZ12, .BAD FUNC);

CIMLAAD ML-11 L OGIC TEST
HARDWARD TEST S ECTION

MACRO M1113

23-0CT-80 09:11

H 2
PAGE 232

SEQ 0228

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

10499 MLS
10500 ;

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

R A

end;

i
il
il
i
)
i

O ONO"WV

i D

—

o oooororOrO0rO
TM

vivio
v
v

I
L
R
L
N

ILF

end;
it .OPI
then

IS_SET

'SEE

OPI

IS SET

begin

ERRDF (68, ASYNC, 0);
'ERROR IF SET
PRINTB (FIV_FMT, WRD
&, PHR_S, WRD_12, FNC_12, WRD_19);

T T

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 (FMTZ12, .BADZFUNC);

PRINTB (FMTZ12,

.BAD_FUNC);

end;

ENDSUB;
end;

end;

036470
036474
35 036476
)36 036500
537 036504
10538 036510
10539 036512
10540 036514
10541 036516
10542 036524
10543 036530
10544 036534
10545 036542
10546 036546
10547 036550
10548 036554
10549 036560
10550 036566
10551 036570
10552 036576

end

rwNNNNNNN—‘—&_.-‘—I—‘_J-J-J
WOWVB NN 2O 00NN
(NN =

D i

il il

D i

D il

D i

[eleleleleloleleleleleleleleololelelelolelele]

else

5629

ENDTST;

004167
005004
005001
062704
012702
010405
060205
104402
152777
016700
042700
1462777
150077
010503
004767
010377
132777
001440
132777
00147

145364

$7T19:

JSR
CLR

R1,$SAVES
R4

;
. BAD.BITS

000002
000001

1$:

ADD

#2 R4

«,BAD.BITS

ADD

R2.RS

2%:

000040
153440

153214

000007
153172

153176

177770

3%:

CLR

MOV
MOV

TRAP
BISB
MOV

BIC

BICB

153172

000001

153102

: #.CNT.2
: BAD.BITS,*

2
#40,aML.REG+40

:
:

ML.DUT,RO

CNT.2.¢

5584
.

5586

5588
5592

5589
5590

#177770.R0

#7,3ML.REG+40

RO,aML.REG+40
RS.R3

MOV
BITB
BEQ
BITB

R3.aML.REG
#1.aML.REG+60
48
#1,aML.REG

BEQ

: CNT.1

#1.R2
R4 RS

BISB
MOV

JSR

153744
153120
000001

5552
5582

PC.FIRST.BLK.XFER

: «,BAD.FUNC
:
: BAD.FUNC,*
:

5502
3593
5594
5596

;

5600

MACRO M1113

CIMLAAQ ML-11 LOG I1C TEST

HARDWARD TEST SEC TION

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

104455

000102
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600
104414
010316
012746
012746
010600

TRAP

.WORD
.WORD
.WORD

006040
007124
005750
006560
005630
005414
000006

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
Mov
MOV
MOV
MOV
TRAP

004742
000002

104414

000433
104455

000103
007444
000000
012746
012746
012746
012746
012746
012746
012746
010600

4%:

006040
007124
005750
006542
005646
005414
000006

104414

004742
000002
000022
020000

152770

5%:
6%:

TRAP

.WORD
.WORD
.WORD
MoV
MOV
MOV
MOV

MO\
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
ADD

BIT
BEQ

102

ASYNC

5604

#WRD.19,-(SP)
#FENC.12,-(SP)
#WRD.11,-(SP)
#PHR.2,=(SP)
#WRD.1,=(SP)

#FIV_ FMT,=(SP)
#6,-(SP)

SP.RO

14
R3, (SP)
#FMT.12,-(SP)
#2,-(SP)

SP,RO

SP"

;

BAD.FUNC,+*

Sp,'

5602
5611

#WRD.19,-(SP)
#FNC.12,-(SP)

5612

#WRD.11,-(SP)
#PHR.1,-(SP)

#WRD.3,-(SP)
#FIV.FMT,=(SP)
#6,-(SP)

SP'.

SP,RO

R3, (SP)
#FEMT.12,-(SP)
#2,-(SP)
SP.RO

; BAD.FUNC,*

14
#22,5P

;

8746

5610
5616
5619

000006

.WORD
.WORD
.WORD
MoV

5620

MOV
MOV
MOV
MOV

MOV
MOV

005654
005414

5613

P,0

;%0600,3!L.REG*60

2746
2746
2746
2746

5605

5%
55
103
SSYNC

TRAP

006040
007124
005760
006646

TOPS
PA:<

5603

10558 036602
10559 036604
10560 036606
10561 036610
10562 036614
10563 036620
10564 036624
10565 036630
10566 036634
10567 036640
10568 036644
10569 036646
10570 036650
10571 036652
10572 036656
10573 036662
10574 036664
10575 036666
10576 036670
10577 036672
10578 036674
10579 036676
10580 036700
10581 036704
10582 036710
10583 036714
10584 036720
10585 036724
10586 036730
10587 036734
10588 036736
10589 036740
10590 036742
10591 036746
10592 036752
10593 036754
10594 036756
10595 036762
10596 036770
10597 036772
10598 036774

SEQ 0229

JML4

=
|-

10554
10555
10556
10557 036600

1.2

PAGE 233

23-0CT-80 09:11

#6,-(SP)

SP.RO

SP'.

=
=S OOV

004742
000002
000022

PAGE 234

22-0ct=19 80 10:47: L4
22-0ct=19 80 10:45: 32

037132

10052 037134

020127
003002
000167
000207

000002
177360

8%:
;

104466

177342

006000
103773

TRAP
ROR
BLO

SP,RO

5630

Routine Size:

Maximum

stack

JSR

TRAP
ROR

RTS

!<BLF/PAGE>

l‘t

5621

14
#22,5P

5618
5622

5588
5584

5552
141

words

depth per invocation:

15 words

5627

PC,8$T19
66

RO
1%
PC

_
:
; Routine Size: 6 words
; Maximum stack depth per invocation:
10661
10662 ;

; BAD.FUNC,*

JMP
RTS

BLO

000207

14
R3, (SP)
#EMT,12,-(SP)
#2,-(SP)

T0PS

BGT

;

004767

TRAP
MOV
MOV
MOV
MOV
TRAP
ADD

BLE
INC
CMP

—
g

10647 037122
10648 037122
10649 037126
10650 037130

o e

SEQ 0230

ADD
CMP

oTM

RS
~N

WW
N~

(=1~

10627 037106
10628 037112
10629 037114
10630 037120
10631
10632

7%:

000010
000071

4 037076

-h

o
o

23-0CT-80 09:11

JMLG

10610

NO NS WM

2222222222222

NN POPINIRIND
= b b b
b e s s

MACRO M1113

EST

o
E =

'HARDWARD TEST SEC

—t—

'CZMLAAD ML-11 LOG

0 words

MACRO M1113

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

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

BGNTST;

lee

TEST NUMBER:

TST 20

TEST NAME:

TEST DESCRIPTION:
TEST

WRITTING TO MLCS1, MLDA
AND MLER WHILE THE DRIVE

IS BUSY AND TEST RMR

BIT SET.

THE DETECTION OF

gsGlSTER MODIFICATION REFUSED
1.

10681
10682
10683
10684
10685

SEQ 0231

22-0ct=1980 10:47:44
22-0ct=1980 10:45:3¢

10680

K_2
PAGE 235

ALSO SEE

THE DRIVE ASSERTED

EXCEPTION BY TESTING THE TRE BIT SET.

IMPLICIT

INPUTS:

NONE

TR TR T
TR

10664 JMLG
10665 ;
10666
10667
10668
10669
10670
10671
10672
10673
10674
10675
10676
10677
10678
10679
TETETETTE

23-0CT-80 09:11

incr CNT from 0 to 2 do

'REPEAT LOOP 3 TIMES

MLCST = write;

'DO A WRITE FUNCTION

case .CNT from 0 to 2 of

'WRITE TO SELECTED REGISTERS FORCING RMR

begin
BGNSUB;
CLR_MBUS;

set

ol
(1)
(2]
tes;

MLCST

= X0'000000°';

MLDA = ONES;

MLER = ONES

DELAY (FRTY_US);

if .RMR IS_NOT_SET

then

begin

'SEE IF RMR GOT SET

———

CIZMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

10720 ;ML4
10721 ;
10722
10723
10724
10725
10726
10727
10728
10729
10730
10731
10732
10733
10734
10735
10736
10737
10741
10745 037136
10746 037142
10747 037144
10748 037146

10749 037150
10750 037156

10751

10752 037166
10753 037174

10757
10758
10759
10760
10761

037212
037216
037220
037222

5683
5684
5685
5686
5687
5688
5689
5690
5691
5692
5693
5694
5695
5696
3697

004167
005746
005002
104402
152777
016701

042701

142777
150177

012777
010201
006301
066107

10763 037232

10764 037240
10765 037242
10766 037250
10767 037254
10768 037256
10769 037262
10770 037264
1071
10772 037270
10773 037272
10774
10775
10776
10777 037274
10778 037276

10779 037304
10780 037306
10781 037310
10782 037312

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

SEQ 0232

'ERROR IF NOT SET
(69, ASYNC, 0);
PRINTB (FOR_FMT, WRD 21, PHR_1, WRD_11, WRD_21);
end;

ERRDF

if .TRE
then

!SEE IF DRIVE ASSERTED EXCEPTION P

IS_NOT_SET

1ESTING TRE

begin

ERRDF (117, SYNC, 0);
PRINTB (FOR_FMT, WRD_20, PHR_1, WRD_11, WRD_21);
end;

ENDSUB;
end;

ENDTST;

$120:

144644

000040
153006
177770
000007
152540
000061

152562

1%:

BIC
8I(B
BISB

152472

2%:

3s:

177777

152470

4s:

177777

152510

5%:

78:

142634

152454

MOV
MOV
ASL
ADD

.WORD
.WORD
.WORD
CLR

MOV
BR
MOV
MOV

BEQ

MOV

8%:

BEQ
CLR
DEC

9%:

DEC

sMLG

000004

JSR
TST
CLR
TRAP
BISB
MOV

152544

037216

000050

000767
132777
001024
104455
000105
007444

PAGE 236

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

152450

10762 037230

23-0CT-80 09:11

108:

R1,$SAVE2
-(SP)
R2

5629

5659

CNT

5660
5661

#40,3ML
. REG+40
ML.DUT,R1

#177770,R1

#7,3ML .REG+40

R1.aML.REG*+40

#61,aML .REG

R2,R1
R1
28(R1),PC

5663
5665

CNT,»

3$-2%

4$-2%

58-2%

ML .REG

6%
#-1,3ML.REG+30
6%
#-1,3ML.REG+60
#50,R0
10%
%SDLY.R1

*,$8$TMP2
+,$$TMPY
$STMP
$$TMP1

$$TMP2

22-0ct-198 0 10:4 7 H 4
22-0ct-198 0 10:145: 3 2

TOPS

PA:<

7%
#4 ,aML .REG+60

5680

TRAP
.WORD

5683

BITB

.WORD

11$
105

ASYNC

—

S——

MACRO M1113

CIMLAAD ML-11 L 0
HARDWARD TEST § 3
10783 037314

10810 037442
10811 037444
10812 037446
10813 037452
10814 037454
10815 037456
10823
10827 037460
10828 037460
10829 037464
10830 037466
10831 037470
10832 037472
10833
10834
10835

.WORD

006054

000005

10789 037342
10790 037346
10791 037350
10792 037352
10793 037356
10794 037364
10795 037366
10796 037370
10797 037372
10798 037374
10799 037376
10800 037402
10801 037406
10802 037412
10803 037416
10804 037422
10805 037426
10806 037430
10807 037432

000014
040000

23-0CT-80 09:11

152314

118:

MoV
MOV
MoV
MOV
MoV
MOV
MOV
TRAP
ADD
BIT

BNE

TRAP
.WORD
.WORD

.WORD

006054
005750
006542
006046
005400
000005
000014

128:

000002

000207
004767

1046466

006000
103773

000207

177452

1%:

MOV
MOV
MOV
MOV
MOV
Mov
MoV
TRAP
ADD

PAGE 236-1

SEQ 0233

0
#WRD.21,=(SP)

5684

#URD.11.=(SP)
#PHR.1,~(SP)

#WRD.21,-(5P)

#FOR.FMT,=(SP)
#5,-(SP)

SP.RO

14
#14,5P

5682
5687

#40000,
aML . REG
128
55

5690

165
SYNC

5691

#WRD.21,-(SP)
#WRD.11.=(SP)
#PHR.1,~(SP)

#WRD .20, -(5P)

#FOR.FMT,=(SP)
#5,-(SP)

SP.RO

SP'.

5689
5692

TRAP
ROR
BLO
INC
CMP
BLE
TST
RTS

JSR
TRAP
ROR
BLO
RTS

SP"

;
;

CNT
=
CN,T

5659
5629

5695

PC,$T20
66

RO
1%
PC

: Routine Size: 6 words
: Maximum stack depth per invocation:

0 words

Fi0n

IMLAAD ML-11 LOGIC TEST

ARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

N2
PAGE 237

10841 ;ML4
10842 ;

10843

10844
10845
10846
10847
10848
10849
10850
10851
10852
10853
10854
10855
10856
10857
10858
10859
10860
10861
10862
10883
10864
10865
10866
10867
10868
10869
10870
10871
10872
10873
10874
10875
10876
10877
10878
10879
10880
10881
10882
10883
10884
10885
10886
10887
10888
10889
10890
10891
10892
10893
10894
10895

;
;
;

;
;
;
;
;
;

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

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

SEQ 0234
A
45:32

5699
5700
5701

$75¢
5703
5704
5705
5706
5707

5708
5709
5710
5711
5712
5713

5714
5715
5716
5717
5718
5719
5720
5721
5722
5723
5724
5725
5726
5727
5728
5729

5730
5731
5732
5733
5734
5735
5736
5737
5738
5739
5740
5741
5742
5743
5744
5745
5746
5747
5748
5749
5750

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

BGNTST;
'ed

{

TEST NUMBER:

TST 21

g TEST NAME : initial PROM TEST
i TEST DESCRIPTION:
TEST THE MEMORY ARRAYS' PROM
TIMING AND CONTROL LOGIC FOR
INITIAL PROM READS BY:

READING 14 PROM LOCATIONS
AND TESTING FOR:

B.
IMPLICIT

CHECK SUM ERRORS AT
EACH ROW COLUMN ADRS

SUM OF EACH PROM BIT SET

<9,0> GTR 14.

INPUTS:

local
OFF _SET_CNT

NONE

: vector (10, bytel,

ROW_ORED_COL : bitvector [16],
R _CTSAV
: b1tvector [16],
PROM_ADRS,
CHK_Sum,
CHK SUM_ERR,
BAD_NIB_CNT,
CNTT14 _BAD,
poo0 _fLG,
ERR_FLG;

*COUNTS EACH NIBBLE OFFSET
!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;

DOD0_FLG
= ZERO;

PROMTMDIS = ONE;
= ZEROES;
CHK_SUM_ERR

*SET PROM DISABLE MODE

incr CNT from 0 to 9 d

'CLEAR OFFSET COUNTS

incr ADRS_CNT from 0 to 14 do

'READ PROM DATA FROM 15 ARRAY WORDS

OFF_SET_CNT [. CNT] ZEROES;

begin”

ROW_ORED_COL

= ZEROES;

‘CLEAR ROW OREDP COL

SAVE

LOCATION

'canAAO
ML=11 LOGIC TEST
'HARDWARD TEST SECTION

MACRO M1113 23-0CT-80 09:11 PAGE 338

10897 :ML4

SEQ J235
22=0ct=1980 10:47:44

}8333 :

22-0ct=1980 10:45:32

TOPS=20 Bliss=16 v2(206)

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

}838? :

g;g;

PROM_ADRS = ,ADRS_CNT;

'GET COPY OF ADRS_CNT

10902 ;
10903 ;

5753
5754

incr TWICE from 0 to 1 do
begin

'READ ROW AND COL DATA FOR THIS ARRAY WORD

10905 ;
10906 ;

5756
5757

ERRTFLG = zeao
MLPE= .PROM ADRS:

10904 ;

10907 ;

5755

5758

10908 ;

5759

}83}? :

g;g}

10909 ;

5760

BAD_NIB_CNT
= ZEROES;

DELAY (ONE

C_SAV = PLPD

incr BIT_CNT from 0 to 9 do

'LOADING MLPA INITIATES PROM READ
'GET THE ROW OR COL DATA
'COUNT NUMBER BITS SET IN <9:0>

}gg}% .

g;gz

10914 ;
10915 ;

CHK_SUM = .R_C_SAV<10, 3>;

}83}9 :

5765
5766

g;g;

if LR_C_SAV [13) IS_SET then CHK_SUM = .CHK_SUM + 1;

'ADD IN BIT 13

183}3 :

g;gg

if LR_C_SAV [14) IS_SET then CHK_SUM = _CHK_SUM + 1;

'ADD IN BIT 14

10920 ;

5771

if .R_C_SAV [15) IS_SET then CHK_SUM = _CHK_SUM + 1;

'ADD IN BIT 15

10922 ;

5773

10921

;

§772

10923 ;
10924 ;
10925 ;

5774
5775
5776

10927
10928
10929
10930
10931

:
;
;
;
;

5778
5779
5780
5781
5782

10933 ;
10934 ;
10935 ;

5784
5785
5786

10926 ;

10932 ;

10936 ;
10937 :
10938 ;
10939 ;

10940 ;

10941 ;

10942 ;
10943 ;
10944 ;

it .R_C_SAV [.BIT_CNT] IS_SET then BAD_NIB_CNT = .BAD_NIB_CNT + 1;

it .R_C_SAV [15] IS_SET

then

5777

'I1S BIT 15 SET

begin

it .BAD_NIB_CNT Lss .CHK_SUM then ERR_FLG = ONE;
else

5783

5787
5788
5789
5790

'GET THE CHECK SUM BITS

end

begin

if .BAD_NIB_CNT neq .CHK_SUM then ERR_FLG = ONE;

if .ERR_FLG IS_SET
then

'WAS THERE A CHECK SUM ERROR

5791

gin
'REPORT INTERMEDIATE ERROR IF YES
RRDF (70, INTER, 0);
PRlNTB (Slx FMT, FNC_21, uao 10, WRD_12, WRD_45, WRD_35, FNC_6);

5793
5794

DODU_FLG
= ONE;
end;"

5792
5795

PRINTB (FMT 10, .CHK sun RC SAV)

5796

nou ORED_COL
= (.ROW_ORED_COL) or (.R_C_SAV)

10947 ;
10948 ;

5798
5799

end;

183%3 :

10951 ;

'SET ERROR FLG IF CHECK SUM ERROR

end;

10945 ;

10946 ;

'SET ERROR FLG IF CHECK SUM ERROR

5797

ggg?

5802

'OR ROW AND COLUMN DATA

PROM_ADRS
= (.PROM_ADRS) or (Xo' 20007, " IGET COLUHN DATA
incr index from 0 to 9 do

'GET TOTAL OFF SET COUNTS FROM THE 15 ARRAY WORDS

it .ROW_ORED_COL [.index) IS_SET then OFF_SET_CNT [.index) = .OFF _SET_CNT [.index] ¢ 1;

MACRO M1113

'CIMLAAO ML-11 LOGIC TEST
'HARDWARD TEST SECTION
10953 sMLG

NNN—..—.—D—J—D—D—J—!—D-‘ o
NN=OOVONOWVSWN=O 0

IV IV IV TV IV IV IV IV IV IV IV IV IV ]

00 0o Co 0o Co 00 OO 0o OO OO J0 0o 0O 0O

CNT_14_BAD = ZEROES;

'COUNT HOW MANY OFFSET COUNTS GEQ 14

incr CNT from 0 to 9 do

it .OFF_SET_CNT [.CNT) geq 14 then CNT_14_BAD = .CNT_14_BAD + 1;
'WAS ANY CFf_SET COUNTS GTR ZERO

if .CNT_14_BAD neq ZERO
then
begin

ERRDF

(71, ARR_DAT, 0);

'ERROR

then

el se

PRINTB (SIX_FMT, WRD_55, WRD_S54, WRD_46, WRD_S51, WRD 42, WRD_40)

be?in

N TR I TN TR
I EE T TR
ITETETETETE TR T DR
°°°°°

YES

'PRINT MESSAGE

'FIND OFFSETS GEQ 14

LCNT, (.OFF_SET_CNT [.CNTD));

'PRINT NIBBLE POSITION AND COUNT

end;

DODU_FLG = ONE;
end;

'!DROP THIS UNIT IF DODU_FLG SET

if .DODU_FLG IS_SET
then
begin

DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

§88888%
— e
i b

VIS
W =O Vo~

'ERROR

'IF RO THEN PRINT WHICH ONES WERE

if .OFF_SET_CNT [.CNT) geq 14 then PRINTB (FMT_13,

OO0 O0O0O0

il D e il
i D
D i e - s Dl i
D D

YES

PRINTB (FOR_FMT, WRD_46, WRD_47, WRD_42, WRD_40);

000007
152204
000002
000040

il
il

'WERE ALL 10 NIBBLE OFFSETS GEQ 14

if .CNT_14_BAD eql 10

144360
000030

—
-

SEQ 0236

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

2=0ct=19

incr CNT from 0 to 9 do

10998

TOPS=-20 Bliss=16 v2(206)

2=0ct=19

end;

L L
I R O R
L
N T
R
R
I D
R T

PAGE 239

10954
10955
10956
10957
10958
10959
10960
10961
10962
10963
10964
10965
10966
10967
10968
10969
10970
10971
10972
10973

23-0(CT-80 09:11

000040

152452
177770

000016

$721:

152226

JSR
SuB

R1,$SAVES

5697

ML.DUT,RS
7777585

5738

MOV
BIC

#40 . aML . REG+40

Bi(B
BISB
CLR
?{38

#7,3ML.REG+40
RS ,aML.REG+40

MOV

#6,R1

BISB

sMLG

152210
152252
1%:

#30,5P

2(SP)
:SO.SHL.RE6*120

DCDU.FLG
(HK.SUM.ERR

'CZMLAAO

~
w
~
~N

000011

D e

D D D D D D i

d- e

2%:

000004

38:
152156
4%:

142262

000014

152252

000012

7%:

8%:

D D il

D i e e o

D e

R R R AR R SRR
Vi PR AAMAE
& ZIESFER goooooooooo
PAV
8] =S OOV
o
NOWVI WO
(=21

5%:

6%:

36 037646
37 037650
38 037652

il i

000010
000006

000006
000001

o
o

W
~
N

orC0

~
~

000004

(=l=1=]

000010

=
w

CNT

5745

ADRS.CNT
ROW.ORED.COL
ADRS.CNT ,PROM.ADRS
TWICE
BAD.NIB.CNT
ERR.FLG
PROM.ADRS , *

5748
5750
5751
5753
5755
5756
5757

(R1)

BEQ
CLR
DEC
BNE
DEC
BR

¢«
CNT,

4 (SP)

( SP)

LSDLY,R2

*,$8$TMP2

# 1,R?

9%:

$$TMP
$$TMP

$$TMP2

SSHR

177770

000040

000013

000100

000013

108:

5761
5763

BIT.CNT
BIT.CNT,+

CLR

R.C.SAV,
*

BIT.CNT,*

R2.=(SP)

#177770, (5P)

,-(SP)
-($P)
PC,BL®CIi2

#0,sp

DEC
BNE
INC
INC
CMP

RO
9%

MOV
ASR

ASR
SWAB
BIC

BITB
BEQ
INC
BITB
BEQ

5759

« R.C.SAV

MOV
ASR
ASR
ASR
MOV
ADD

BLE

5758

*,$8$TMP1

MOV

ADD

000012

o0
O =
ow
- PO
=2 PO
O O
8NN
S NNWN

&
=

R2
R2,#1
1%
RS
10(SP)
R2.6(SP)

MOV

CLR
JSR

000011

W
NN~
NN~
VS

OO0O

OFF.SET.CNT,+
CNT,

6 (SP) ,aML.REG+100

BEQ

SEQ 0237

SP,R1
R2.R1

MOV
MOV

MOV

JMLG

NNN

N =

[=l=1=]

CLR
CLR
CLR

143156

W NN
NN~
NN~
WO

D D i

D D
e

D D D D

D e

D i i e

D i e

D
i

MOV

MOV
MOV

177770
000001

D e

D o

D i

CMP
BLE
CLR
CLR

0.3

PAGE 239-1

ADD

D i

000012

7 037740

—

23-0CT-80 09:11
ADD
ADD
CLRB
INC

o
w

NONONVIMNINININ)
— = sVS
W =000~ o

—

[elelelolelelolelelelelelelelelelolelololelele) o

060601
060201

D e

D D D D D

D D D i e

D o

'HARDWARD
|
|

MACRO M1113

LOGIC TEST
SE CTION

BAD.NIB.CNT

4 (SP)

BIT.CNT

5761

12(SP) ,R3
R3

R.C.SAV,CHK.SUM

5765

R3
R3
#177770,R3
#40,13(SP)
108
R3
#100,13(SP)

K
. SUM
CH
CHK.SUM
*,(HK.SUM

R2
R2,.

BIT.CNT,*

K
. SUM
CH

*,R.C.SAV+]

CHK.SUM

* R.C.SAV#]

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

TOPS
PA:<

5767
5769

S ODOOOOD

95 040102

o~
&~

&
RRRRRRRERRR o

40142

0150

&8N

—

o000

0160

CMP

13%:

000001
000001

14%:
15%:

007030
006220

006324
005760
005740
007242
005432
000007

MOV
TRAP
MoV
MOV

004634
000003

MOV

MOV
MOV

TRAP

000030
000010
000006

MOV

16%:

000001

000010

BR
CMP
BEQ
MoV
CMP
BNE
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOov
MOV

000032

177364

BCC
BGE

000004

000001
000026
000012
002000

ROR

;ML

ADD

BIS
BIS
INC
CMP
BGT
JMP

CHK.SUM

5773

BAD.NIB.CNT,CHK.SUM

5777

BAD.NIB.CNT,CHK.SUM

5783

* ERR.FLG

5787

ERR.FLG,*

5790

INTER
5791

FENC.6

#WRD. 35,
#WRD .4

#WRD .1
#WRD.10.-(SP)
#ENC.21.-(SP)

#SIX.FMT,=(SP)

#7.-(SP)

SP RO

SP,+

32(SP), (SP)

R.C.SAV,
¢+

R3,=-(SP)
#EMT.10,-(5P)
#3,-(SP)
SP.RO
14

#1,30(SP)
#26,5P
12($P) ,10(SP)
#2000,6(SP)
R4
#1
R4,
17%

SP,¢*

*,DODU.FLG
R.C.SAV,ROW.ORED.COL

* ,PROM.ADRS

TWICE
TWICE,*

22-0ct-1980 10:4 7 HA 4
22-0ct-1980 10::45: 3 2
INDEX
INDEX,*

ROW.ORED.COL
,*

R2,-(SP)

5792

CHK.SUM,«

CLR

MOV
ASR
ASR
ASR
MOV
ADD
ADD
MOV
MOV

571

R.C.SAV+]

000004

TSTB
BPL
INC
INC

—

12%:

17%:
18%:
o

VONOWVNES
W =200~

i e e

i o e e

D i

D D D

i i

D e

Ntk
e e e e s et = 2 O O OO

D e

OOOOO

97 040112
98 040116

000013

SEQ 0238

CHK.SUM

R3
R2
13(SP)
12%

1076 040020
1077 040022
1078 040024
079 040026
080 040030
081 040032
1082 040036
1083 040040
1084 040042

118:

INC
CLR

PAGE 239-2

'HARDWARD TEST S
11073 040010
'
11074 040012

23-0CT-80 09:11

S V=
g =2~
=0 0D o
o VION WD) = N~ SN A~ WD LN
O~
o
L
PNPAPANA

MACRO M1113

'CZMLAAD ML=-11 L

INDEX,*

5793
5789
5796
5797
5753

TOPS
PA:<

5800
5802

'CIMLAAO ML=11 LOGIC T EST

'HARDWARD TEST SECTION
©
11130 060250
042716

11131 040254
11132 040260
11133 040262

012746
005046
004767

11135 040272
11136 040274
11137 040276
11138 040302
11139 040304
11140 040306
11141 040310
11142 040312
11143 040316

005300
001005
012701
060601
060201
105211
005202
020227
003742

11134 040266

11144 040320
11145 040322

11146 040326

062706

005205
020527
003002

11147 040330
11148 040334
11149 040336
11150 040340
11151 040344
11152 040346

000167
005000
005001
012702
060602
060102

11154 040354
11155 040356

103401
005200

11157 040362
11158 040366

020127
003764

11153 040350
11156 040360

11159 040370
11160 040372

11161 040374

121227

005201

MACRO M1113
177770

000001

142614

000016

177240

000016

020027

000012

11167 060412

012746

006260

11170 040426

012746

006336

11171 060432

11172

012746
012746
012746

006436

111;3
11174

11175 040436
11176 060442
11177 040446
11178 040452
11179 040454
11180 0460456

11181 040460
11182 0460462
11183 040466
11184 040472
11185 040476
11186 040502

: OFF.SET.CNT,+
: INDEX,*

: ADRS.CNT
: ADRS.CNT,*

5748

JMP
CLR
CLR
MOV
ADD
ADD

2%
RO
R1
#16,R2
SP,R2
R1.R2

; CNT.14.BAD
: CNT
:
s OFF.SET.CNT,»
: CNT,+

5806
5808
5810

BLO
INC

22%
RO

ONT.14.BAD

CMP
BLE

R1,#11
21%

INC

20$

(R2),#16

BEQ

RO
27%

.WORD
"WORD

107
ARR.DAT

CNT,#

5808

CNT.14.BAD

5812

. CNT.14.BAD,*

5817

#WRD .40, - (SP)

;

5819

23%

MOV

RO,#12

BNE

MOV

5815

MOV
MOV

:
:

;

WORD

MOV

;ML

RO
19%
#16,R1
SP,R1
R2,R1
(R1)
R2
R2,#11
18$

RS
RS, #16

CMP

006300
006406

#1,-(SP)
-($P)
PC,BLSGT2

5800

CMPB

22%:

SEQ 0239

INDEX
INDEX,*

TRAP

11165 040404

11168 060416
11169 040422

21%:

104455

001024

n0,sp

DEC
BNE
MOV
ADD
ADD
INCB
INC
CMP
BLE

000107
007534

11166 040410

20$:

005700
001505

000000

ADD

BGT

000016
000011

#177770, (SP)

INC
CMP

000016

11162 040376
11163 040400
11164 040402

198

£
9
PAGE 239-3

BIC

MOV
CLR
JSR

000010

000011

23-0CT-80 09:11

#WRD.42.-(SP)
#WRD.S51.=(SP)
#WRD .46, =(SP)

#WRD
.54 .- (SP)

22-0ct=1980 10:47:44

012746
012746
012746
010600
104414
022626

000445
012746

012746
012746
012746
012746

006446
005432
000007

006260
006300
006350
006336
005400

238:

22-0ct=1980 10:45:32

MOV
MOV
MOV
MOV
TRAP
CMP

#WRD.55,~(SP)
#SIX.FMT,=-(SP)
#7,-(5P)
SP,RO
14
(SP)#+,(SP)+

MOV

#URD.42,=(SP)

BR
MOV

MOV

MOV
MOV

26%
#WRD .40, = (SP)

#URD
.47 .~(SP)

#WRD .46, =(SP)
#FOR.FMT,=-(SP)

;
:

TOPS

PA:<

SP,+

5817
5822

CIMLAAD ML-11 LO
HARDWARD TEST SE

MACRO M1113

1"
n

000016

SN
oo

MOV
MOV

004772
000003

MOvV

000010

TRAP
ADD

MOV

ADD
ADD

MOVB

4 040564

25%:

000011

001004
016700
104451
104444

062706
000207

000001
000014
000002

000016

26%:

000001

27%:

151344

000030

28%:
:
;

004767

1046466

040646

CLR
MOV

CMPB
BLO
CLR

(ol=l=]

24%:

wh
w

85N

MOV
MOV
TRAP

000032

w
~N

o
»
o

000005

4 040530
o000

1
1"
"
1
1"
1
1
1"
1"
1"
1
1
1
"
"
1"
1
1"
1
1
1"
n
11
1
1
1"
1
1
1"
1"
n
1
n
1"
1"
1"
1
1"

NOMNMRRLNINININIA NN RI AN
AN AN NI NI NINI NI NINININD b b b e el d d s s
WNLANNIND
= b o
s o o
(elelolele] VOO0
S NN
O VOO0
~N
~N
o~

11187 040506

23-0CT-80 09:11

006000
103773
000207

176634

INC

CMP
BLE
MOV

(R1), (SP)
R2,=(SP)
#EMT.13,-(SP)
#3,-(SP)

24%

2(SP),m
28%

RO
1%

*,DODU.FLG

5831
5814
5834

5697

ROR

5824

5837

bé

304 words
depth per 1nyvocation:

CNT
CNT,

DODU.FLG,*

PC,8T21

RTS

SP,*

14
#10,sP
R2
R2,#11

JSR

BLO

«
CNT,

SP,RO

#30,5P

TRAP

OFF .SET.CNT,

5824
5826

-(SP)

ADD

Routine Size:

CNT
«
CN,T

ML.LUN,RO

RTS

SP,*

14
R2
#32,R1

BNE
MOV

Maximum stack

Tel::
1%:

SP,RO

ADD

TRAP
TRAP

SEQ 0240

#5,-(SP)

#1,16(SP)
#14,SP

CMP

6_3

PAGE 239-4

29 words

5839

CIMLAAD ML=-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

295

296
297
298
299
300

L L

!
!
BGNTST;

5847

l4e
|
! TEST NUMBER:

TST 22

i TEST NAME:

PROM OR FUNCTION TEST

L L

5843
5844
5845

|
|

TOPS-20 Bliss=16 v2(206)
PA:<NEALE>BLZ2ML&4.BL1.2 (64)

| TEST DESCRIPTION:

e T

|
|
|

T T

5860

TEST THE HARDWARE ORING Of

THE MEMORY ARRAYS' PROM
ROW COLUMN DATA BY:

:
E
:
:

T T

oo
o
O

HARDWARE ORED ROW COLUMN
DATA.

THEN IN PROM DISABLE MODE

AND VIA SOF TWARE CONTROL,
READ AND OR PROM ROW

COLUMN DATA AND COMPARE

READING AND STORING 128

AGAINST THE RESPECTIVE
STORED HARDWARE CRED DATA.

i IMPLICIT INPUTS:
|

NONE

|
|

_BITS,

e
e
R
R

@Ng\flgw’\)—'°~1fl\IOUll\wN—‘OOONO\fiJ“WN—‘OOQNOU\J‘WN—‘OOO

293
294

SEQ 0241

R R R

— e
i
D
D
A

289
290
gg;

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

e
T E R

D e
D e D i e
D el i e e i D
e D i D i D D i i D e i i D e Dl D
i i i D o s
-p———————————
P
e e ettt
PONININININ NN NN NN NN NN N NN NN
N NN NN
NN MNONNVNN NN
OO
NNV
S S
©0 0o 0o 0o GO OO Co 0o GO NNNNNNNNNNOOO

11246 ;MLS
11247 ;

PAGE 240

5879
5881

'PROM ROW DATA

“BITS,
" ORED

'"PROM COL DATA
'SOF TWARE CALCULATED PROM ORED DATA

pobu_ FLG;

‘DROP UNIT FLAG

W SAVE,

'SOF TWARE

PROM ORED DATA

CLR_MBUS;

5882
5883

0OD0 FLG = ZERO;
DAT DM = ONE;

FIRST_BLK_ XFER ();
ML_tUNC ="write;

'SET UP A FIRST BLOCK XFER
'DO A WRITE FUNCTION

5887
5888

incr PROM_ADRS from 0 to 127 do
begin~

'READ AND STORE 128 HARDWARE PROM ORED DATA

5884
gggg

5889

5890
5891
5892

5893
5894

DELAY (ONE _US);

HW_OR_TBL [.PROM_ADRS] = .MLPD;
DAT_C[K = ONE;
end;

CLR_MBUS:

'READ HARDWARE PROM ORED DATA
'CLOCK NEXT ONE OUT

‘

'CZMLAAD ML=11 LOGIC TEST
'HARDWARD TEST SECTION
11302 ;MLG
|
}}ggz 3
|

MACRO M1113

23-0CT=-80 09:11

PAGE 241
22=' ct=1980 10:47:44

¢2=0ct=1980 10:45:32

TOPS=20 Bliss=16 v2(206)

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

}}%82 :

gggg

PROM_DIS = ONE;

'SET PROM DISABLE MODE

11307 ;

5897

incr PROM_ADRS from 0 to 127 do

'CALCULATE 128 SW ORED DATA & COMPARE TO MW TABLE

11309 ;

5899

11308 ;

11310
1311
11312
11313
11314
11315

;
;
;
;
;
;

}}g}g :

5898

11320 ;
11321 ;

5910
5911

11323 ;
11324 ;

5913
5914

5915
5916
5917
5918

11330
11331
11332
11333
11334
11535

;
;
;
;
;
;

5920
5921
5922
5923
5924
5925

11344 040650

11345 040654

11346 040660

5919

000040

005066
152777
004767

11355 040734

152777

11356

151276

177770

000007
151030

150736

JSR

R1,$SAVES

;

5841

BISB

#40,aML .REG+40

;

5879

: DODU.FLG
;
;

5882
5883
5884

SUB

MOV

BIC

151034

000061

142777 000077

BI(B
BISB

CLR
BISB
JSR

150744

BICB

(MLG

BISB

#0,spP

ML .DUT,RS

$77770,R5

#7,3ML .REG+40
RS,aML.REG+40

4(SP)
#10,aML.REG+120
PC,FIRST.BLK.XFER

#77,3ML.REG
#61,aML .REG

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

:
0050C’
0127v%

000001

11362 040752

016703

141140

11364 040760

005066

000006

11363 040756

151052

151076

11359 040742
11360 040744

11361 040750

$122:

000004
000010
151572

1}%2;
1

'DROP THIS UNIT IF DODU FLG IS_SET

begin
DODU (.ML_LUN);
DOCLN;
end;

152777

11351 040710
11352 040714
11353 040722

'COMPARE SW £ HW ORED
'IF NEQ THEN ERROR

if .DODU_FLG IS_SET

then

143204

142777
150577

'GET RESPECTIVE HARDWARE ORED

end;

162706 000010

11349 040676
11350 040704

'SAVE COL DATA
'CALCULATE SOF TWARE ORED

end;

004167

11348 040672 042705

'SAVE ROW DATA
'ENABLE COLUMN DATA ADRS

PRINTB (FMT"2, .SW_ORED<O, 95, .HW_SAVE<O, 95, (.SW_ORED<O, 9> xor .HW_SAVE<OD, 9>));
DODU_FLG = ONE;

ENDTST;

016705

begin
ERRDF (76, ARR DAT, 0);

'LOADING MLPA INITIATES A PROM READ

PRINTB (FOR_FMT, WRD 35, WRD_36, WRD_19, PHR_4);

5926

11347 040666

11354 040726

it (.HW_SAVE<O, 9>) neq (.SW_ORED<O, 9>)

then

§912

;
;
;
;

}}%28 3

HW_SAVE = .HW_OR_TBL [.PROM_ADRS];

5909

11325
11326
11327
11328

11329 ;

DELAY (ONE UT);
R BITS = .MLPD;
MCPA = .PROM_ADRS or %0'2000';
DELAY (ONE_US);
C BITS = MLPD;
SW_ORED = .R_BITS or .C BITS;

gggg

5908

11322 ;

MLPA = .PROM _ADRS;

5900
5901
5902
5903
5904
5905

11318 ;

11319 ;

begin

001411

001404

SEQ 0242

1%:

2%:
3%:

CLR
MOV

R2
1,/

: PROM.ADRS
; o+, 38TMP2

MOV

LSDOLY,R3

o+ ,38TMPY

6(SP)

: $STMP

BEQ

CLR

5885
8
TOPS

PA:<

5887
5889

'CZMLAAO ML=11 LOGIC TEST
'HARDWARD TEST SECTION
11365 040764 005303
11366 060766 001374
11367 040770 005301
11368 040772

000766

11370 040776
11371 041000

006303
017763

11369 040774

11372 041006
11373 041014
11374 061016
11375 041022

11376 041024

MACRO M1113

48:

010203

5%:
151124

152777
005202
020227

000020

152777

000040

003750
016705

11379 041042
11380 041050

142777
150577

11382 041062
11383 041064
11384 041070

005001
010177
012702

11386 041076

016703

141014

11388 041104
11389 041110
11390 041112
11391 041114
11392 041116

005066
005303
001374
005302
000766

000006

11395 041130
11396 041134

052703
010377

002000
150640

11381 061054

11385 0410764

11387 041102

11393 041120
11394 041126

11397 041140
11398 041144

11399 041146
11400 041152
11401 041156
11402 041150
11403 041162
11404 041164
11405 041156

152777

001411

001404

017766
010103

012702
001411

016703
001404
005066
005303
001374
005302
000766

151132

177770

000007
150664

000040

11408 041200

016605

051605

BIC

7%:

8$:

000001

140744
000006

108:

118:

128:

138:

000002

148:

11410 041204

11411

ML4

: PROM.ADRS,*

5890

#20,aML.REG*120
R2
R2,M177

;
: PROM.ADRS
: PROM.ADRS,+

5891
5887

#40,aML.REG*40

;

5892

5895

ML.DUT,RS

$177770.R5

R1
R1,aML.REG+100
#.R2

, FROM_ADRS
© PROM.ADRS,*
1o« $8TMP2

MOV

LSDLY,R3

; v, $8TMPI

CLR
DEC

: $STMP
L $STMPI

DEC
BR

6(SP)
R3
8%
R2
7%

BIS
MOV

#2000,R3
R3,aML.REG+100

BEQ

BNE

MOV
MOV

#40,aML.REG+120
108

: $$TMP2

: «,R.BITS
: PROM.ADRS,*

5901
5902

MOV

1 .R2

: %, $8TMP2

5903

MOV
BEQ
(LR
DEC
BNE
DEC
BR

LSDLY,R3
138
6(SP)
R3
12%
R2
1%

; +,$8TMPI

MOV

2(SP) RS

: R.BITS,SW.ORED

BEQ

MOV
ASL

14$

; $STMP
L $STMPI

: $STMP2

ML .REG+230, (SP)

; +,C.BITS

(SP) ,RS

: C.BITS.SW.ORED

R1,R%
R3

1«14 041206

MOV

HW.OR.TBL(R3) R4

.« HW.SAVE

11416 041214 042702
11417 061220 010403
11418 041222 042703

177000
177000

BIC
MOV
BIC

#177000,R2
R4 ,R3
#177000,R3

: HW.SAVE,*

11419 061226

020302

11421 041232

104455

11420 041230 001450

MOV

CMP

BEQ

TRAP

RS . R2

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

007722

010502

5905

22-0ct-1980 10:45:32

016304

11415 041212

5904

. PROM.ADRS

5897
5899
5900

ML .REG+230,2(SP)
R1,R3

MOV

006303

R2,R3

CLR
MOV
MOV
BEQ

SEQ 0243

: $$TMP

#7,aML.REG+40
RS.aML.REG+40

BIS

11409 041202 010103

: $STMPI

BICB
BISB

BISB
6%

000002

R3
ML .REG+230,HW.OR.
TBL (R3)

MOV

9%:

1510064

ASL
MOV

MOV

BISB

150736

R3
38
R
2%

BLE

150670

PAGE 241-1

DEC
BNE
DEC
BR

BISB
INC
CMP

150706

150710
000001

11406 041170 017716 150734
11407 041174

151004

000177

11377 041032

11378 041036 042705

007722

23-0CT=80 09:11

. SW.ORED,*

TOPS
PA:<

5908

R3,R2

15¢

;

5911

'CZMLAAD ML-11 LOGIC TEST

MACRO M1113

WARDWARD TEST SECTION

11422 06}234
11423 041236
11424 041240
11425 041242
11426 041246
11427 041252
11428
11429
11430
11431
11432
11433

11434 041300
11435 041302
11436 041304
11437 041306
11438 041310
11439 041312
11440 041316
11441 041320
11442 041324
11443 041330
11444 041334
11445 041336

11446 041340
11447 041346

11448 041352
11449 041354
11450 041360
11451 041362
11452 041370

11453 041372

11454 041376

11455 041400
11456 041402
11457 041406
11458
11459
11460
1147
11475 041410
11476 041410
11477 041414
11478 041416
11479 041420
11480 041422

.WORD
.WORD
.WORD

006630
006040
006226
006220
005400
000005

041256
041262
041266
041272
041274
041276

23-0CT=80 09:11

MOV
MOV
Mov
MOV
MOV
MOV
MOV
TRAP
MOV
MOV

BIC
BIC
8IS

177000
177000

012766
062706
005201
020127
003641
026627
001004
016700

000001
000024

062706
000207

000010

104451
104444

15%:

000177

000004

000001

150570
16%:

114
3RR.DAT

#WRD.19,-(5P)

#WRD.36,=(SP)

#WRD.35,-(SP)
#FOR.FMT,=(SP)
#5,-(SP)

SP,RO

SP,+

R4 ,R3
RS, (SP)
RS ,R2

HW.SAVE
,*
SW.ORED,*

HW.SAVE
,*

MOV

RS,=(SP)

SW.ORED,*

MOV
MOV
TRAP
MOV
ADD

INC
CMP
BLE
CMP
BNE

MOV
TRAP
TRAP
ADD
RTS

#177000, (SP)
#177000, (SP)

004767

104466

006000

103773
000207

122::
1%:

JSR
TRAP
ROR
BLO
RTS

5913

NFMT.2,=(SP)
#4,-(SP)

SP,e

SP.RO

14
#1,30(SP)
vfia,sp

*,DODU.FLG
PROM.ADRS
PROM.ADRS
,*

R1,m77
6%
4(SP) .M
16%
ML.LUN,RO
51

DODU.FLG,*

5914
5910
5897

5919

5922

Lh
#10,sP

5841

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

177234

5912

#PHR.4,=(SP)

MoV

BIC
MOV

000030

SEQ 0244

R2.(SP)
R2.(SP)
R4 . =(SP)

BIC

004224
000004

K 3

PAGE 241-2

PC,$122
66

RO
1%
PC

20 words
5924

—————

——————

E——

RE——

|CIMLAAD ML=11 LOGIC TEST

MACRO M1113 23-0CT-80 09:11 PAGE 942

HARDWARD TEST SECTION
11486 ;ML4

22-0ct=1980 10:45:32

11489
11490
11491
11492
11493

;
;
;
;
;

5928
§929
5930
5931
5932

!
!
BGNTST;

11495
11496
11497
11498
11499
11500
11501
11502
11503

;
;
;
;
;
;
;
;
;

5934
§935
5936
§937
5938
5939
5940
5941
5942

!
| TEST NAME:
UV ADRS ERROR TEST
!
' TEST DESCRIPTION:
!
!
TEST THE DETECTION OF UV ADRS
!
ERRORS BY:
!
!
1.
GENERATING PROM DATA PATTERN

11506
11507
11508
11509

;
;
;
;

11511
11512
11513
11514
11515
11516
11517
11518
11519

;
;
;
;
;
;
;
;
;

5950
5951
5952
5953
5954
5955
5956
§957
5958

11524 ;

5963

11494 ;

§933

11504 :
11505 ;

5943
5944

5945
5946
5947
5948

11510 ;

11526 ;

11527 ;
11528 ;
11529 ;

11530 ;

11531
11532
11533
11534

5949

;
;
:
;

11525 ;

;
;
;
;

5959
5960
5961
5962

! TEST NUMBER:

!
!

!
!
!
!

!
!
!
|
!
!
!
!
!

5978
5979

NONE

local

DODU_FLG,

'DROP UNIT FLAG

PROMTMDATA : bitvector [16],

ISTORES PROM DATA

HIGH_CNT,
Low ONT,
TEMP,

ERR_FLG,

GTR_FLG;

5969

5975

TEST ERROR CONDITIONS FOR
CORRECT RESPONCE TO GOOD/
OR BAD PROM DATA.

!
!--

5968

5976
5977

VIA DAT DM AND PROM R/W

MODES PRESENT GENERATED

IMPLICIT INPUTS:

5967

11537 ;
11538 ;

TST 23

PROM DATA TO THE UV ADRS
ERR PROM.

5966
5970
§971
5972
5973

TOPS=20 Bliss=16 v2(206)

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

FROM 0 TO X0'177777' AND
DETERMINE WHETHER RESPECTIVE
PATTERN 1S GOOD/OR BAD
PROM DATA.

5965

5974

11539 ;
11540 ;

!¢+

5964

11535 ;

11536 ;

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

}}23; 3

11520
11521
11522
11523

-3

ISTORES PROM DATA CHECK SUM BITS

'STORES SUM OF PROM DATA BITS <9:0>
' TEMPORARY STORAGE
'ERROR FLAG

ISETS WHEN PROM DATA BIT 15 IS A ONE

DODU_FLG = ZERO;
PROM_DATA = -1;

begin

_DATA = .PROM_DATA + 1;
PROM
BGNSOB;
CLR_MBUS;
ERRTFLG = ZERO;

ITEST ALL POSSIBLE PROM DATA COMBINATIONS
' INCREMENT PROM_DATA

e
e

CZMLAAO ML-11 LOGIC TEST

WARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

PAGE 243

5984

incr BIT_CNT from 0 to 9 do

5986

R T

'COUNT PROM DATA BITS <9:0>

if .PROM_DATA [.BIT_CNT] IS_SET then LOW_CNT = .LOW_CNT + 1;
'GET PROM DATA CHECK SUM BITS

5988

HIGH_CNT = .PROM_DATA<'0, 3>;

5990

if .PROM_DATA [13) IS_SET then HIGH_CNT = _HIGH_CNT + 1;

'ADD IN BIT 13 IF SET

5992

it .PROM_DATA [14] IS_SET then HIGH_CNT = .HIGH_CNT + 1;

'ADD IN BIT 14 IF SET

5994

if .PROM_DATA [15] IS_SET then HIGH_CNT = _HIGH_CNT + 1;

'ADD IN BIT 15 IF SET

5996

if .PROM_DATA [15) IS_SET then GTR_FLG = ONE;

5998
5999
6000
6001
6002

DAT _DM_XFER ();
PROM_RE = ONE;
MLPD = .PROM_DATA;
MLCS1 = 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

6004

if .UNS IS_SET

'SEE IF PROM DATA CAUSED A UV ERROR

6005

o
o
(=4
o

N
LR TR LR T T
L LR L LA LA LA
L L L P LR
T
L L TR L
O T LR L
e T T T

HIGA_CNT = ZEROES;
GTR_FLG = ZERO;

6008

6009

6010

6011

6012

then

'SET FLAG IF BIT 15 IS SET

begin

if .GTR_FLG IS_SET

then

begin

'UNS IS_SET. SEE If GTR FLG IS SET
'LOAD TEMP WITH PROM DATA

TEMP = .PROM_DATA;

'SEE IF THESE BITS ARE SET IN PROM DATA

if .TEMP eql %0'162000"

'THESE BITS SET AUTOMATICALLY CAUSE A UNS

.TEMP and io'162000';

TEMP

6014

6015

then

6016

begin

i; .LOW_CNT geq .HIGH_CNT

gg}g

then

6021

begin

ERRDF (72, ARR DAT, 0);

1LOW<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;

6022
6023
6024

end;

i
o
i
T
T
T A T
VT A
VAT
TG,

VWA AW VI
WMV
VIV WAV

D d
D d D i

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

LOW _CNT = ZEROES,;

5981
5982

6020

D e

VYNV NNV S 5H 8NSNNNNN NNNNOOOOOOOONOO

VNS WN=OOVONOWVESWN—-O0 oo
WA
— 838 IRNFRERZE VONOWVESW N=OOVONO
$3P282

D D
D

D d Do
D

D D
D o

D o

D o
D i

D D e i i i D
D d e

) D i i e
e

i D i e
D

D i

D e

i i D i D i D o

D i
i

e i e

D i

i D

— o

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

11542 :ML4
11543 ;

SEQ 0246

6026
6028

6029

6030

end;

else

end

begin

'GTR FLG IS NOT SET

————

e’

wiie

|CZHLAAO ML=11 LOGIC TEST

MACRO M1113 23-0CT=80 09:11 PAGE 24&

|HARDWARD TEST SECTION

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

6032
6033

if .LOW_CNT eql .HIGH_CNT
then
°~

'LOW<9:0> SHUULD BE NEQ HIGH<15:10>

be81n

6035
6036

TOPS=20 Bliss=16 v2(206)
P*:<NEALE>BL2ML4.BLI.2 (65)

'ERROR IF EOQL

ERRDF (73, ARR _DAT, 0);
PRINTB (SIX_FMT, WRD_34, PHR_S5, WRD_32, WRD_6, WRD_33, WRD_24);

6037
6038

ERR_FLG = ORE;
end;

6040

end

6042
6043
6044
6046
6047
6048
6049
6050

else

end

'UNS WAS NOT SET

begin
if .GTR_FLG IS_SET
then
begin
TEMP = _PROM_DATA;

ggg%

'LOAD TEMP WITH PROM DATA
'SEE IF THESE BITS ARE SET IN PROM DATA

:; .TEMP neq %0'162000'

'IF THESE BITS ARE SET THEN UNS SHOULD BE SET

6056

begin
ERRDF (74, ARR DAT, 0);

'ERROR UNS IS NOT SET

PRINTB (SIX FMT, WRD_34, PHR_1, WRD_32, WRD_S, WRD_33, WRD_24);

6057

ERg_FLG = ORE;

6059
6060

else

6062
6063

'BITS 162000 ARE NOT SET

begin
if .LOW_CNT Lss .HIGH_CNT
then
=
beg1n

6065

ERRDF

6066
6067

'LOW<9:0> SHOULD BE GEQ HIGH<15:10>
'ERROR IF

(75, ARR DAT, 0);

LSS

PRINTB (SIX _FMY, WRD_34, PHR_1, WRD_32, WRD_S, WRD_33, WRD_24);
ERR_FLG = ONE;

6068

end;

6070

6072
6073
6074

'SEE IF ~TR FLG IS_SET

TEMP = . TEMP and %0'162000°';
en

6054
6055
o
o

NI TR SR TSI TR TR T
I LTI TE I
TN T
DR
PRTE PR DR
PRPR FE

P IIIIINIISNS NN
VAWV

N=OOVB®NOWVEBWN =0V~

PETETETEDE TE

W= OOV®NOVNS WOV

A A

U‘NNNNNNNNNN-&—-—-n..n--o.‘_o—n_.°°°8
NOWVSWNN =00V~
522232

SEQ 0247

end

else

end

begin

!GTR_FLG IS NOT SET

TETE

D el e

D il el il

D i el

D il

i
D e

D il D il

il il

el el

A TE R
PEPR TE PR

WIWNW

ooooooor0rOr
O OrOFOFMOMCOCMCOCOCOOCOCOCOTO

D e

D i

D il

D D

D il

D A

D D e

D e

D i

D o

D D e

D d D D D

D e

D D o

D i i

) D D ) D D D B o

D e

D D i

D i

11598 ;MLé
11599 ;

6076
6077

6079
6080

6081

6082

if .LOW_CNT neq .HIGH_CNT
'LOW<9:0> SHOULD EQL WIGH<15:10>
then
begin
'ERROR IF NEQ
ERRDF (108, ARR_DAT, 0);
.
PRINTB (SIX FMT WRD_34, PHR_1, WRD_32, WRD_S, WRD_33, WRD_24);

ERR_FLG = ORE;
end

e
e

'CZMLAAD ML-11 LOGIC TEST

MACRO M1113

HWARDWARD TEST SECTION

11654 ;ML4
11655 ;
11656
11657 ;
11658 ;
116959 ;
11660 ;
11661 ;
11662 ;
11663 ;
11664 ;
11665 ;
11666 ;
11667 ;
11668 ;
11669 ;
11670 ;
11671 ;
11672 ;
11673 ;
11674 ;
11675 ;
11676 ;
11677 ;
11678 ;
11679 ;
11683
11687 041424
11688 041430
11689 041434
11690 041440
11691 041446
11692 041452
11693 041454
11694 041462
11695 041466
11696 041472
11697 041500
11698 041504
11699 041506
11700 041512

11701 041514
11702 041520
11703 041522
11704 041524
11705 041526
11706 041530
11707 041532

23-0CT-30 09:11

B &
PAGE 245

SEQ 0248

22-0ct-198 0 10:47:YA
22-0ct~ 1980 10: 45:32
6084
6085
6086
6087
6088
6089
6090
6091
6092
6093
6094
6095
6096
6097
6098
6099
6100
6101
6102
6103
6104
6105
6106
004167

162706
005066
012766
005266
104402

152777
016705
042705
142777
150577
005001
005066
005003
005066
005005
010504
006204
006204
006204
012702

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (65)

end

end;
if .ERR_FLG IS_SET
then
b egin
PRINTB (FMT_7,

DODU_FLG = ONE;

!SEE
.PROM_DATA);

IF ERROR FLG GOT SET

'PRINT FAILING PROM_DATA AND SET DODU_FLG

end;

ENDSUB;
end
until .PROM_DATA eql X0'177777';

!TRY ALL BIT COMBINATIONS

'DROP THIS UNIT IF DODU_FLG IS SET

if .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

142430
000012
000006
177777
000010

000040
150502
177770
000007
150234

$723:
000010

1$:

150256

MOV

INC
TRAP

BISB
MOV

150240

000002
000004
3%:

000010

JSR
suB
CLR

BIC
BI(B
BISB
CLR
CLR
CLR
CLR
CLR
MOV
ASR
ASR
ASR
MOV

R1,$SAVES

6(SP)
#-1,10(SP)
QO(SP)

:
;
;

#40,3ML . REG+40
ML.DUT,RS

;

#12,5P

5926
DODU.FLG
*,PROM.DATA
PROM.DATA

#177770,R5

#7,3ML.REG+40
RS .aML .REG+40
R

2(SP)
R3

4(SP)
RS
RS,R4
R4
R4
R4

ERR.FLG
: LOW.CNT
* HIGH.CNT

: GTR.FLG
: BIT.CNT
P BIT.CNT,+

5971
5972
5976
5977

r—-

—

'CZMLAAOD ML=11 LOGIC T EST

MACRO M1113

HARDWARD TEST SECTION

11709

060602
060204
010446

11716 041546

042716

11720 041564

11721 041570
11722 041572

11723 041574

11724 041600

11725 041602
11726 041606

11727 041610

11728 041614
11729 041616
11730 041620
11731 061622

11732 061626

010546
012746
005046
004767

020527
003745

000011

000040

000011

000100

000011

005203
001401

11737 041650

005203

11739 041654

105766

11738 041652 005005

11740
041660
11741 041662
11742 041664

100002
005205
005203

11744 041670
11745 041672

103003
012766

11747 041704

11748 041712

11749 041716

48:

132766

177770

000004

152777 000100

150106

010577

000010

150206

11750 041722 012777 000061

147750

11752 041736 032777 040000

150014

11751 041730

152777

11753 041744

001500

11754 041746

026627

11756 041756

010516

11755 041754

001042

S%$:

7%:
000001

016605

000020
000004

8%:

021627

162000

11760 041772

026603

000002

11759 041770

11761 041776
11762 042000

11763 042004

001003

002002
000167

104455

000422

CMP
BLE

10(SP) ,R3

: PROM.DATA,HIGH.CNT

5988

#40,11(5P)

: «.PROM.DATA+1

5990

CLR

#100,11(SP)

: HIGH.CNT

: *,PROM.DATA+1

11(SP)

: PROM.DATA+1

BCC
MOV

8%
#.4(SP)

JSR

HIGH.CNT
HIGH.CNT
HIGH.CNT
%, HIGH.CNT

. HIGH.CNT

7%
RS
R3

ROR

:
:
:
.

BPL
INC
INC

PC,DAT.DM
. XFER

BISB

#100,aML.REG+120

MOV

RS, aML .REG+230

BISB

#20.aML.REG+120

10(SP) ,RS

: HIGH.CNT

. «,GTR.FLG

5992

5994
5996

5998

. PROM.DATA,+

6000

5999

#61,3ML.REG

6001

#40000, ML .REG+60

6004

128

6002

CMP

4(SP) .M

. GTR.FLG,*

6008

MOV

RS, (SP)

; «,TEMP

CMP

(SP) ,#-16000

. TEMP,+
«.TEMP
.

6011
6012
6014

2(SP),R3

: LOW.CNT,HIGH.CNT

6018

BNE

BIC

2115777, (sP)

BNE

BGE
JMP

108
168

CMP

10%:

. BIT.CNT,*

5984

BEQ

9% :

RS, #11
3%

. BIT.CNT

TSTB

: BIT.CNT,»

. LOW.CNT

INC

; PROM.DATA,
*

2(SP)

BIT

000001

RO
4$

BEQ

BITB

TOPS

PA:<

n0,sp

R3
R3
R3
#177770.R3

MOV

150062

#177770, (sP)

ASR
ASR
SWAB
BIC

MOV

11757 041740 042716 015777

11758 061764

INC

BITB

6% :

000011

150722

INC

MOV

006005

004767

#1,-(SP)
-($P)
PC,BLSGT2

DEC
BNE

000010

006203
006203
000303
042703

MOV
CLR
JSR

ADD

016603

132766

11746 041700

141316

000002

005205

MOV

SP,R2
R2.R4
RG,=(SP)
RS ,=(5P)

BIC

000001

005266

005300
001002

11735 041640

11743 0461666

177770

000010

001401

11736 041646

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

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

062706

11733 041634

11734 061636

SEQ 0249

SMLG

11712 041536
11713 041540
11714 061542

11717 041552
11718 041556
11719 041560

C &
PAGE 246

}};}?

11715 041544

23-0CT-80 09:11

TRAP

6021

'CIMLAAO ML=11 LOGIC T EST
'HARDWARD TEST SECTION

MACRO M1113

11765

23-0CT-80 09:11

D &
PAGE 247

MLG

22-0ct-1980 10:47:44

22-0ct=1980 10:45:32

H;gg
11768 042006
11769 042010
11770 042012

000110
007534
000000

11773 042024

11772 042020

012746
012746

11775 062034
11776 042040
11777 042044
11778 062050
11779 042054
11780 0462056

012746
012746
012746
012746
010600
104414

11771 042014

11774 042030

11781 042060
11782 042062

11783 042066

11784 042070

110
ARR.DAT
0

MOV
MOV

#WRD.33,-(SP)
#WRD .6, = (SP)

006104

MOV

012746

006200

MOV

000556
026603

001157

006206
005670
006646
006212
005432
000007

MOV
MOV
MOV
MOV
MOV
TRAP

000002

118:

104455

000111
007534
000000

11789 042104

012746

11788 042100

LWORD
"WORD
WORD

012746

11785 042072
11786 062074
11787 042076

BR
(MP
BNE

TRAP

WORD
"WORD
WORD

#WRD .24 ,=(SP)

#PHR.5,=(SP)
#WRD
.34 ,-(SP)
#SIX.FMT,=(SP)
#7,-(SP)
SP.RO
14

;

6035

;

6036

16%

111
ARR.DAT
O

11790 042110

012746

005670

MOV

#WRD .6, = (SP)

11792 042120

012746

006646

012746
012746
010600
104414

005432
000007

11793 042124

042130
042134
042140
042142

11798 042144
11799 042146
11800 042154

11801 042156

012746 006200
012746

000524
026627
001067

006212

000004

010516

11802 042160 042716 015777
11803 042164

11804 042170

11805 042172

021627
001427

000112
007534
000000

11810 042206
11811 042212

012746
012746

11809 042202

162000

104455

11806 042174
11807 042176
11808 042200

12%:

MOV
MOV
MOV
TRAP

#SIX.FMT,=(SP)
#7,-(SP)
SP,RO
14

BR
CMP

6037
6046

MOV

RS, (SP)

; *,TEMP

6049

CMP

(SP) ,#-16000

L OTEMP,«

6052

;

6055

#URD .24, = (SP)

;

6056

BNE

BIC

BEQ

#WRD .33, -(SP)
#WRD .5, ~(SP)

MOV
MOV
TRAP

11819 042246

000463

138

MOV
MOV

11816 062236
11817 042242
11818 042244

000007

215777, (sP)
112
ARR.DAT
O

MOV

012746
010600
104414

148

WORD
.WORD
WORD

11812 042216 012746 006200
11813 042222 012746 006542
11814 062226 012746 006212
005432

; SP,e

;
P GTR.FLG,*

MOV

012746

#WRD
.34 ,-(SP)

15%
4(SP), M

TRAP

006206
005662

#WRD.32,-(SP)

#PHR.5, = (SP)

MOV

000001

#WRD.33,-(SP)

MOV

006104

11815 042232

012746

MOV

SP,w

6023
6032

#WRD .24, - (SP)

11791 062114

;

;
. LOW.CNT,HIGH.CNT

MOV

6022

15%
2(SP) ,R3

006104

006206

;

TOPS

PA:<

#WRD.32,~(SP)

012746

11794
11795
11796
11797

SEQ 0250

MOV

L« TEMP

6050

#WRD.32,-(SP)
#PHR.1,-(SP)

#WRD .34, - (SP)

#SIX.FMT,=-(SP)

#7,-(SP)
SP.RO
14

15%

; SP,w

;

6057

MACRO M1113

CZMLAAO ML-11 LOGIC TEST
SECTION

SEQ 0251

22-0ct=198 0 10: 47:44
22-0ct=-198 0 10 145:32

(== ~NONONOr
O VNN

rVJVJNN—‘
SO N oo~ OSSOSO

(oleleloleleleleleleleled

006104
006206
005662
006200
006542
006212
005432
000007

—

~
o~ NO

14%:

MOV
TRAP

SP RO

#WRD.32,-(SP)

#PHR.1,~(SP)
#WRD .34, = (SP)
¥SIX.FMT,=(SP)
#7,-(SP)

SP,+

L LOW.CNT,HIGH.CNT

CMP

19%:

N
r
W
~N

000001
000020
000001

16$%:

004520
000002

2446
2450

000001
000006

2460
2464

000014
17%:

026627

000006

MOV

ADD

CMP
BNE
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

TRAP
ROR

6067
6076
6079

6080

#WRD .24, = (SP)
#WRD.33.-(SP)
#WRD.5,~(SP)

#WRD.32,-(SP)
#PHR.1,~(SP)

#URD .34, - (SP)

#SIX.FMT,=(SP)
#7,-(SP)

SP.RO

14
R

#20,5P

R1, 41
17%
RS.-(SP)
FEMT.7,-(SP)
#2,-(SP)

SP.RO

14
#1.14(SP)

#6.SP

SP,e
.

«,ERR.FLG

. ERR.FLG,*

6081
6C78
6088
6091

SP.,+

*+ ,DODU.FLG

6092
6090
6093

BHIS

176754
176740

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MoV
TRAP

6062

6066

#WRD.33.-(SP)
#URD.5,=(SP)

BEQ

.WORD
.WORD
.WORD
MOV

006104
006206
005662
006200
006542
006212
005432
000007

%
2
-

#URD
.24 ,=(SP)

TRAP

5
PO
N
&~

MoV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

000002

RRIRRRRRRIVLLY

.WORD
.WORD

TOPS
PA:<

6065

.WORD

~ 5 V2
22 20 2%2t 2
FRRFRRIRRRRRRRR ~N
oo

; LOW.CNT,HIGH.CNT

CMP
BGE

TRAP

6 042414

FEFEFEEREase

13%:

000002

2 042376
53 042402

E &
PAGE 248

JMLG

FIIIIIIIIN

—.-._‘-.-‘-...‘_._.-.—‘-l-._‘-‘—‘_l—.—.—l-l—.-.-l-l—.—._.l—l-‘—._l—i_‘—l—l—l—.—l—l-a-‘-l—'_.—-I—b-‘_.—._.-—._._‘ -‘-‘_‘—.-‘dddddd-‘—‘-.—._‘-‘-‘—‘—.-‘-‘—l—.-‘-l_._..—.—l-._.-‘_‘_.—‘-l—l—l-fl-‘—‘_‘_‘_‘—‘—‘—‘_‘—l_‘—‘_‘_‘ 00 0o 0o 0o 0O OO OO 00 Co 0O 0o 00 Co OO Co OO 0o OO oo
©o 0o Co Cx: 0o 00 Co
Vi
WWNWW
W W WWWWWKN WNONRONINONINONY ~
Vi
W
~NO NS WY —
=S OV NOWVESWN
2O VNV WN - OV
W=
O OV~
VIS
N =0

HARDWARD TEST

23-0CT-80 09:11

18%:

000001

19%:

JMP
INC

BEQ
JMP
CMP

6097
DODU.FLG,*

6099

CIZMLAAD ML-11 LOGIC T EST
INARDUARD TEST SECTION
|

11877

11880 042514

;

MACRO M1113

042516
042522
042524
042526
042532

001004

016700
104451
104444
062706
000207

SEQ 0252

22=0ct=1980 10:47:44

000012

20%:
:

11893
11894
11898
11902 042534

11903 042534

042540
042542
042544
042546

11916
11917 ;

22-0ct=1980 10:45:32

BNE

147444

11888

11908
11909
}}8}2

11887

11904
11905
11906
11907

PAGE 249

sMLG

Hg;g

|
11881
11882
11883
11884
}}ggg

23-0CT-80 09:11

MOV
TRAP
TRAP
ADD
RTS

Routine Size:

20%

ML.LUN,RO
51
44
#12,5P
PC
292 words

; Maximum stack depth per invocation:

004767

104466
006000
103773
000207

176664

1¢9::

1%:

;
;
6107

!'<BLF/PAGE>

JSR

TRAP
ROR
BLO
RTS

66
RO
1%
PC

invocation:

6102

5926

6104

19 words

PC,$T123

Routine Size:
6 words
Maximum stack depth per

TOPS

PA:<

0 words

CZMLAAD ML=11 LOGIC T EST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

G &
PAGE 250

11919 ;ML4

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

Hgg? :
11922
11923
11924
11925
11926

22-0ct=1980 10:45:32

;
;
;
;
;

6108
6109
6110
6111
6112

!
!
BGNTST;

11928 ;

6114

11927 ;

TEST NUMBER:

TST 24

6115
6116
6117
6118
6119
6120
6121
6122
6123
6124

!
!
!
!
!
!
!
!
!
!

TEST NAME:

INITIAL ARRAY TEST

6127
6128
6129
6130
6131
6132

!
!
!
!
!
!

11948 ;
11949 ;
11950 ;

6134
6135
6136

!
!
!

11952 ;
11953 ;
11954 ;

6138
6139
6140

!
!
!

;
;
;
;
;
;
;
;
;
;

11941
11942
11943
11944
11945
11946

;
;
;
;
;
;

11939 ;
11940 ;

11947 ;

11951

;

11955 ;

11956 ;
11957 ;
11958
11959
11960
11961

;
;
;
;

11962 ;

11963 ;
11964 ;

11965 ;
11966 :

11967 ;
11968 ;

11969

11970 ;

1972 :

11973 ;

6113

!4+

11929
11930
11931
11932
11933
11934
11935
11936
11937
11938

SEQ 0253

6125
6126

6133

6137

6141

6142
6143

6144
6145
6146
6147

6148

6149
6150
6151
6152

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.

ARE

INITIALLY TESTED BY:

VIA DAT DM MOD WRITE DATA PATTERNS

OF 1'S END 0'S TD S ARRAY

WORDS.
2.

TEST EACH NIBBLE

!
' IMPLICIT
!
!'--

IF 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;

incr TWICE from 0 to 1 do

6159

FOR

NIBBLE ENCOUNTERED.

6155

6138

(&4 BITS)

1'S AND 0'S AND COUNT EACH BAD

BAD_NIB_CNT = ZERCES;

6156

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

TEST DESCRIPTION:

6153
6154

TOPS=20 Bliss=16 v2(206)

begin

LR
L MBUS 2

MLDY = .TST_PAT;

'REPEAT LOOP TwICE

'"LOAD TEST PATTERN INTO DIAG REGISTERS

MACRO M1113

CZMLAAD ML-11 LOG IC 1 EST

'HARDWARD TEST SEC TION

6160

R
R P

SEQ 0254

6168
6169

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

.TST_PAT;

MLE2 = .TST_PAT;
= ONE;
DAT DM

!SET DATA DIAG MODE
'SET UP A FIRST BLK XFERR
‘DO A MBUS WRITE FUNCTION

incr CNT from 0 to & do
begin
DELAY (ONE_US);

'CLOCK 5 WORDS INTO MEMORY

DAT_CLK = ONE;
end;

L
R

MLD2 =

FIRST_BLK_ XFER O);
MLCS1 = write:

R T T
R I

O
oo

PAGE 251

144
:32

O 0o

CLR_MBUS;

6174
6175

DAT DM= ONE;
FIRST_BLK XFER 0;
MLCS1 = read:

'SET DATA DIAG MODE
'SET UP A FIRST BLK XFERR
‘DO A READ FUNCTION

6179
6180

incr ARR_WRD from 0 to 4 do
begin
DAT_CLK = ONE;

'READ THE 5 WORD IN MEMORY

R
R T T I I I T TR

D
D
D

D
N
D

D
i

D i
D

OOV 3
(olel]
S885%

i
—

DELAY

'CLOCK OUT A WORD

INTO THF DIAG REGS

RD_LNG_WRD;

'READ THE DIAG REGISTERS

incr NIB_PTR from 0 to 9 do
begin

'READ THE

TST_LNG_WRD

6187
6188

(.NIB_PTR,

.ERR_FLG IS_SET

LTST_PAT,

ERR_FLG);

then BAD_NIB_CNT =

10 NIBBLES

!COMPARE

.BAD_NIB_CNT

IN THE WORD

TST PAT

TO NIBBLE

UNDER

TEST

+ 1;

R TR

(ONE_US);

DELAY (ONE_uS),

R TR

— —

- e

D e

D L

11975 JMLG
11976 ;
11977

23-0(T-80 09:11

' INCREMENT BAD_NIBBLE COUNT

re
O rr
T R I E TR T ATEATE TR

TST_PAT

ENDSUB;

= not

.TST_PAT;

'REPEAT WITH COMPLIMINT TST PAT

end;

if .BAD_NIB_CNT gtr
then

'SEE

36 OUT OF

'ERROR IF GTR 36
begin
ERRDF (77, ASYNC, 0);
PRINTB (FIV_FMT, WRD 22, PHR_4, WRD_12, WRD_45, FNC_14);

I E TR

pODU (.Mi_LON);

DOCLN;

R
R
TR

022

IFERR_FLG SET

end;

e e
POND) =

b b

b e

= OO0 NV
NN —

i
-

D i

NN
NN
[olelelolelelelalelole]

end;

62
6208

end;

ENDTST;

THE

100 XFERRED WHERE BAD

CIMLAAQ ML-11 LOG | C

MACRO M1113

1 EST

HARDWARD TEST SEC 1 l ON

23-0CT-80 09:11

&
1
PAGE 252

SEQ 0255

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

12056 042656
12057 042662

12058 042664
12059 042670
12060 042672

016704
042704

162777
150477

010177
010177
010177
152777
004767
012777
005002
012703
001411
016704
001404
005066
005304
001374
005303
000766
152777

005202
020227
003755
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

152777

016704
042704

142777
150477
152777

004767
012777
012703
001411
016704
001404
005066
005304
001374
005303

000040
147366
177770
000007

147120
147244
147250
147224

000010

147652
000061

147142

1%:

147156
147024

4%:

5%:
147104

6%:

000004

000040
147232
177770
000007
146764

000010
147532
000071
000001

137110

000004

BISB
JSR

PC,FIRST.BLK.XFER

CLR

MOV

BEQ
MOV

000004

147006

BEQ
CLR
DEC
BNE
DEC

BISB
INC
CMP
BLE
BISB
MOV

BIC
BI(B
BISE
BISB
JSR

146770
147036
146704

7%:

8%:
9%:

BIC
BI(B
B1SB

MOV

2%:

#~1,R1
-(SP)
RS

#40,aML
. REG+40
R&4
ML.DUT,
#177770.R4
#7,3ML.REG+40
R4 .aML .REG*+40

B1SB

MoV
MOV
MoV

137226

000020

TRAP

MOV

147124

000001

CLR
CLR

=-(SP) ,=(SP)

MOV
MoV

BEQ

MOV

BEQ
(LR
DEC
BNE
DEC

R1.3ML.REG+170
R1.aML.REG*+200
R1.aML.REG*+160

#10,aML .REG+120
531.anL.asc
#1,R3
6%
R4
LSDLY,

MoV

TOPS

PA:<

6106

R1,$SAVES

SeNenLna

177777

JSR
CMP

152777

$724:

141304

12047 042606
12048 042614
12049 042620
12050 042624
12051 042630
12052 042634
12053 042642
12054 042646
12055 042654

004167
024646
012701
005046
005005
104402

« TST.PAT

BAD.NIB.CNT
TWICE

¢
TST.PAT,
,«
PAT
TST.
TST.PAT,»

2039 042554
2 040 042556
2 041 042562
204
2043 042566
204
204
2 046 042602

d e

JMLG

CNT

*,$8TMP?

6152
6153
6155
6156
6157

6159
6160
6161
6162
6163
6164
6166

6168

«,$$TMP1
$STMP
$$TMPY

$
#20,3ML.REG#+120
R2
R2,#4

$$TMP?
CNT
CNT ,»

6169
6166
6170

#40,aML
. REG+40
,R&
ML.DUT

177770,
R4

#7,aML .REG+40
R4 ML .REG+40

#10,3ML .REG+120

PC,FIRST.BLK.XFER

#71,3ML .REG
#1,R3

*,$3TMP?

LSDLY,R4
9%

+,$8TMPY

10$

$$TMP
$$TMPY

$$TMP2

6173
6174
6175

6176

MACRO M1113

'HARDWAKD TEST SECTION

Lol
o

—
—

146764

000020
000001
137050

000004

13%:

15%:

—

147000
147002
146754

14%:
oo

12095 043046
12096 043050
12097 043054
12098 043056
12099 043060
12100 043062
12101 043064
12102 043072
12103 043100
12104 043106
12105 043110
12106 043112
12107 043114
12108 043120
12109 043122
12110 043126
12111 043134
12112 043136
12113 043142
12114 043146
12115 043150
12116 043154
12117 043156
12118 043160
12119 043164
12120 043166
12121 043170
12122 043172
12123 043174
12124 043176
12125 043202
12126 043204
12127 043210
12128 043212
12129 043216
12130 043220
12131 043222
12132 043224
12133 043226
12134 043230
12135 043234
12136 043240
12137 043244
12138 043250
12139 043254
12140 043260

000766

12089 043022
12090 043024

PAGE 253

SEQ 0256
7:44

JMLG

(o Yo Yo 3

12086
12087
12088

23-0CT-80 09:11

'CZMLAAD ML=11 LOGIC TEST

16%:

000010
147532

000010
000006
000006

000001
17%:

000011

5:32

MOV

7%
R2
#20,aML .REG+120
#1.R3

MOV

R4
LSDLY,

BR
CLR
BISB

BEQ

BEQ
CLR
DEC
BNE
DEC

MOV
MoV
MoV

CLR

MOV
MOV
MOV
ADD

JSR
CMP
BNE
INC
ADD

INC

BLE
INC
CMP
BLE
COM

000004

ARR.WRD

*,$8TMP2

15$

6178
6180
6181

*,$$TMP1

148
4&(SP)
R&

$$STMP
$$TMP1

13%
R3
12%
aML.REG+170,D1.TEMP
aML.REG+200,D2.TEMP

$$TMP2

22L.REG*160.EZ.TEHP

NIB.PTR
NIB.PTR,*
TST.PAT,+

R&4,=(SP)
R1,-(SP)
#10,-(SP)
SP, (SP)
PC,TST.LNG.WRD
10(sP) ,#
17%

6184
6186

ERR.FLG,*

tRR.FLG,*

BAD.NIB.CNT

6(SP)

#6,SP
R4
R4, #11
16%
R2
R2, ¥4
11%

TOPS

PA:<

NIB.PTR
NIB.PTR,*

6188
6185
6184

;

ARR.WRD
ARR.WRD
,*

6178

;

TST.PAT

6195

ROR
BHIS
JMP
INC
CMP

TWICE
TWICE,*

6155

CMP

BAD.NIB.CNT,*

6199

TRAP

177364

000001

000044

18%:
19%:

BLE

6202

TRAP

007146

006324
005760
006630
006062
005414
000006

.WORD
.WORD
.WORD

MOV
MOV
MOV
MoV
MoV
MOV
MOV

#ENC.14,-(SP)
#URD
.45 . - (SP)
#URD .12.-(SP)
#PHR .4, - (SP)

#WRD .22, - (SP)

#EIV.FAT,-(SP)
26.-{SP)

6203

CZMLAAOD ML-11 LOG l ¢ TEST
'HARDWARD TEST SECT
ECTION
1

BERNNOVESWN SOOWVN=0OWVNHWN =000 NV

PAGE 254

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

22-0ct=1980 10:45:32

h
e
e o
D
D
D
D
D
D
D
D
o
b

23-0CT-80 09:11

JMLG

OO NNNNNNNYNOOO
P NNNNNWNE S

i
D i i o
D s
D
i
D o
D
D
)
D
D
D i
s
D
i
i
D i
o
i
-

12142
PONOARLNNNNNNNDN
NN
NN NN NN

MACRO M1113

K &

043264
063266

010600
104414

043274
043276

104451
104444

043270
043300
043304

043310

016700

146672

062706
0062706

000016
000006

000207

MoV
TRAP

; SP,e

MOV

ML.LUN,RO

6204

ADD
ADD

#16,5P
#6,SP

;
3

6201
6106

6206

TRAP
TRAP

20%:

SP,RO
14

RTS

; Routine Size:

51
44

177 words

)

: Maximum stack depth per invocation:

043312

004767

043324

000207

043316
043320
043322

104466
006000
103773

177232

T24::

1%:

JSR

TRAP
ROR
BLO
RTS

Routine Size:

!<BLF/PAGE>

16 words

PC,$124

66
RO
1%
PC

6 words

;

: Maximum stack depth per invocation:
6209

TOPS
PA:<

0 words

'CIMLAAO ML-11 LOGIC T st

MACRO 1113

'HARDWARD TEST SECTION

23-0CT-80 09:11

L &

PAGE 255

12186 :ML4

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

}%}g; :

12189
12190
12191
12192
12193
12194
12195
12196
12197
12198

SEQ 0258

;
;
:
;
;
;
;
;
;
;

6210
6211
6212
6213
6214
6215
6216
6217
6218
6219

!
BGNTST;

}%582 3

g%gg

TOPS=20 Bliss=16 v2(206)

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

6220
6221
6222
622
6224

!4+
' TEST NUMBER:
TST 25
!
' TEST NAME:
PROM 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:

}%%89 :

g%gg

;

AT EACH PRESENT ARRAY MODULE WRITE 127 ARRAY WORDS WITH 1°'S/0'S PATTERN.

12208 ;
12209 ;
12210 ;

6229
6230
6231

!
!
!

READ THE UV PROMS AT THEIR RESPECTIVE ARRAY WORD LOCATION AND SEE IF
THE PROMS MASK BAD NIBBLE LOCATIONS (ENCOUNTERED BAD NIBBLES
INDICATES INCORRECT MASKING). COUNT EACH BAD NIBBLE ENCOUNTERED AT AN

}%%}2 3

2%§§

;

ALLOW A THRESHOLD OF S BAD NIBBLES AT ANY ARRAY MODULE.

REPORT PROM SEL ERRORS AT RESPECTIVE ARRAY MODULE IF THE

12199
12200
12201
12202
12203

;
;
;
;
;

12211 ;
12212 ;

12215 ;
12216
12217
12218
12219

;
;
;
;

12221
12222
12223
12224

;
;
;
;

12226
12227
12228
12229
12230
12231

;
;
;
;
;
;

12220 ;

12225 ;

12232 ;

12233 ;

12234 ;

12235 ;
12236 ;

12237 ;

12238 ;
12239 ;

12240 ;

6232
6233

6236

6237
6238
6239
6240

62641

6242
6243
6244
6245

6246

6247
6248
6249
6250
6251
6252

6253

6254

6255

6256
6257
6258

6259
6260

6261

!
!

!
!
'
!

ARRAY MODULE.

THRESHOLD IS EXCEEDED.

IMPLICIT INPUTS:
PD _TEMP:

A BIT VECTOR OF 16 BITS WHERE

!
!
!
!

THE READ PROM DATA IS STORED
AND ACCESSED FROM,
10_BUF

A VECTOR OF 256 WORDS WHERE

!
!
!
!'~--

DATA FOR MBUS READS AND WRITE
FUNCTION ARE FOUND.

local

DODU_FLG,

'DROP UNJT FLG

TSTPAT,

'TEST PATTERN

ERR_FLG,
ERRZCNT;

'ERROR FLG

'"ERROR COUNT

DODU FLG = ZERO;

TST_PAT = ONES;

incr ARR_SEL from 0 to .LST_ARR by .ARR_INC do

!TEST ALL PRESENT ARRAYS

———

————

'CZHLAAO ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

PAGE

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

12242 ;ML4

12243
12244
12245
12246
12247
12248
12249
12250

;

;
;
;
;
;
;

6262
6263
6264
6265
6266
6267

12252 ;
12253 ;
12254 ;
12255 ;
12256 ;
12257 ;
12258 ;
12259 ;
12260 ;
12261 ;
12262 ;
12263 ;
12264 ;
12265 ;
12266 ;
12267 ;
12268 ;
12269 ;
12270 ;
12271 ;
12272 ;
12273 ;
12¢74 ;
12275 ;
12276 ;
12277 ;
12278 ;
12279 ;
12280 ;
12281 ;
12282 ;
12283 ;
12284 ;

6269
6270
6271
6272
6273
6274
6275
6276
6277
6278
6279
6280
6281
6282
6283
6284
6285
6286
6287
6288
6289
6290
6291
6292
6293
6294
6295
6296
6297
6298
6299
6300
6301

12251

;

12285
12286
12287
12288
12289
12290

;
;
;
;
;
;

12292
12293
12294
12295
12296

;
;
;
;
;

12291

;

SEQ 0259

6268

begin
ERR _CNT = ZERO;

BGNSUB;

incr TWICE from 0 to 1 do
begin
CLR_MBUS;

MLDT = .TST _PAT;
MLD2 = .TST_PAT;
MLE2 = .TST PAT;
DAT DM
= ONE;

MLl = not 255MLBA = 10 _BUF;

MLDA = .ARR SEL;

MLCS1 = wrifte;

incr CNT from 0 to 127 do
begin
DELAY (ONE _US);

'REPEAT LOOP TWICE

!LOAD DATA DIAG REGISTERS WITH TST_PAT
'SET DATA DIAG MODE
!LOAD WORD COUNT
‘LOAD UBUS ADRS
'LOAD SECTOR
!D0 A WRITE FUNCTION

!CLOCK IN 10 WORDS

DAT_CLK = ONE;
end;

CLR_MBUS;

DAT DM= ONE:;

MLDA
.ARR SEL
MLCST1 = read:

!SET DATA DIAG MODE
!LOAD WORD COUNT
'LOAD UBUS ADRS
'LOAD SECTOR
‘DO A READ FUNCTION

incr WD_CNT from 0 to 127 do

'READ THE 10 WORDS

MLWE = not 255;
MLBA

10 _BUF;

DELAY (ONE US):

begin

PD_TEMP = _MLPD;

DAY CLK
ONE
DELAY (ONE_US);
RD_LNG_WRD;

incr NIB_PTR from 0 to 9 do

'GET PROM DATA FOR THIS WORD
'CLOCK THIS WORD INTO DIAG REG
'READ DIAG REG FOR THIS WORD

'LOOK AT ALL 1C NIBBLE

if .PD_TEMP [.NIB_PTR] IS_NOT_SET

6302
6303
6304
6305
6306
6307

then

'FIND GOOD NIBBLES

rs?_an,uno (.NIB_PTR, .TST_PAT, ERR_FLG);
in

!COMPARE NIBBLE TO TST_PAT

if LERR_FLG IS_SET then ERR_CNT = ERR_CNT + 1;

6308

6309
6310
6311
6312
6313

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

end;

' INCREMENT ERROR COUNT IF ERROR FLG 1S SET

end;

IST_PAT = not

.TST_PAT;

'REPEAT WITH COMPLIMENT DATA

froveeans

'CIMLAAD ML-17 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

N 4

PAGE 257

12298 ;ML4
12299 ;
WWW WKWK

12302
12303
12304
12305
12306

;

;
;
;
;
;

12307 ;
12308 ;
12309 ;
12310 ;
12311 ;
12312 ;
12313 ;
12314 ;
12318 ;
12316 ;
12317 ;
12318 ;
12319 ;
12320 ;
12321 ;
12322 ;
12323 ;
12327
12331 043326
12332 043332
12333 043336

12343 0434

12344 0434
12345 0434
12346 0434

RERSREEIRNS

12334 043342
12335 043346
12336 043354
12337 043362
12338 043364
12339 0433
12340 0433
12341 0433
12342 0434

22-0ct=19 80 10: &7: 44
22-0ct=19 80 10::45:32
oocororOrOM

12300

12301

12347 0434
12348 0434
12349 043440
12350 043444
12351 043452

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

end;
if . ERR_CNT gtr S
then

begin

ERRDF

'ALLOW 5 ERROR BEFORE ERRORING
'ERROR [F

(78, ARR_DAT, 0):

GTR 5

PRINTB (THR_FMT, WRD_35, WRD_37, WRD_10);
PRINTB (FMT'9, .ARR_SEL);

DODU_FLG = ONE;

end;

ENDS uB;
it .DODU_FLG IS_SET
then

‘DROP THIS UNIT

IF DODU_FLG IS SET

begin
DODU (.ML_LUN);

DOCLN;
end;

end;

ENDTST;

162706

140526

000016
000010
177777
144766
1464744

$125:

CLR

MoV
MOV
MoV

000006
J00004

000666
000002

000040

1466556
177770
000007
146310
146434
1466440
146414

000010
177400

JSR
suB

146332
146314

146346
146230

38:

CLR
JMP
CLR
TRAP
CLR
BISB

MOV

BIC
BI(B
BISB
MOV
MOV
81SB

MoV

R1,$SAVES

#6,5P

10($P)
#-1,R2
LST.ARR,6(5P)
ARR.
INC .4 (SP)
R

25%
2(SP)
2

(sP)
#40,3ML
. REG+40

RS .aML .REG+40
R2.aML.REG+170
R2.aML .REG+200
R2 ML .REG+160

#10,aML .REG+120
#-400,3ML .REG+10

; DODU.FLG
: *,TST.PAT
s

ARR.SEL

s ERR.CNT

; TWICE

s
:
:

TST.PAT,«
TST.PAT,»
TST.PAT,»

[—————

S——

t—

'CIMLAAOD ML-11 LOG l % TEST
HARDWARD TEST SECT

—e

———

MACRO M1113

12353

23-0CT-80 09:11

R—=,

PAGE 258

5
SEQ 0261

:MLG

22-0ct=1980 10:47:44

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

;

}gggg

TOPS

PA:<

12356 043460 012777 010342

146232

MOV

#10.BUF ,aML .REG+20

;

6274

12358 043472

146200

MOV

261, ML .REG

;

6276

12357 043466

010177

12359 043500
12360 043502

005003
012704

12361 043506
12362 043510
1233 042814
12364 043516
12365 043522
12366 043524

12367 043526
12368 043530

12369 043532
12370 043540
12371 043542

012777

001411
016705
001404
005066
005305

146236

000061

000001

48:

136402
000014

6%:

001374

005304
000766

152777
005203

7%:

000020

146260

12372 043546

020327
003755

12374 063556

016705

12376 043566
12377 043574

142777
150577

000007
146140

146144

12380 043614
12381 063622
12382 043626
12383 043634

012777
010177
012777
012704

010342
146102
000071
000001

146076

12385 043642

016705

136250

005066
005305

000014

12373 043550

000040

12375 043562 042705

177770

146406

12378 043600 152777 000010
12379 063606 012777 177400

12386 043646

12387 043650
12388 043654

001411

001404

005304

12392 043664
12393 043666
12394 043674
12395 043702

005003
017767
152777
012704

12391 043662

146162

12396 043706
12397 043710
12398 043714
12399 043716

12400 043722
12401 043724

005305
005304

126404 043732
12405 043740
12406 043746

017767
017767
017767

12403 043730

12407 043754

000766

005004

DEC
BR

108:

145766
146116

128:
138:
148:

000014

15¢:

168:
143754
143750
1463744

17%:

R1,3ML.REG+30

R4
5%

MOV

ML.DUT,RS

R3,M177

#40,aML.REG+40

: $$TMP2

;
: CNT

6281
6278

;

6282

;
:

6285
6286

P CNT,*

#177770,RS

#7,3ML .REG+40
RS,aML.REG+40

#10,aML.REG+120
#-400,3ML.REG+10

#10.BUF ,aML . REG+20
R1,3ML.REG+30
#71,3ML.REG
",k
12$

:
: ARR.SEL,*
:
L e, $8TMP2

MOV

LSDLY,RS

; %, $$TMP1

CLR
DEC

14(SP)
RS

; $STMP
: $$TMP

DEC

: $STMP?

CLR
MOV
BISB
MOV

R3
aML .REG+230,PD. TEMP
#20,3ML.REG+120
R4

: WD.CNT
:
:
D oa,$8TMP2

BEQ

BNE
BR

BEQ
MOV
BEQ
CLR

108

17%
LSDLY,RS
16%
14 (SP)

: $$TMP
L $ETMPI

DEC

: $STMP?

MOV
MOV
MOV

aML.REG+170,D1.TEMP
ML .REG+200.D2.
TEMP
OML.REG+160,E2.TEMP

BNE
BR

CLR

158
148

6287
6288
6289
6290

6292
6294
6295
6296

; «,$8TMPI

DEC

6278
6280

: $$TMP
: $STMPI

6275

; o+, 88TMP1

BLE

BEQ

: CNT
L ox,$8TMP2

8$
LSDLY,RS
7%
14 (SP)

#20,3ML.REG+120
R3

MOV
MOV
MOV
MOV

: ARR.SEL,*

R3
#1,R4

BISB
INC

BISB
MOV

9% :

136202

146132
146134
146106

BNE

BICB
BISB

146044

001374

12402 043726

DEC

BIC

146212
146074

000766

001411
016705
001404
005066

BEQ
MOV
BEQ
CLR

BISB

118:

146236
000020
000001

CLR
MOV

CMP

12389 043656 001374
12390 043660

8$:

000177

152777

12384 043640

MOV

: NIB.PIR

6299

‘

'CIMLAAD ML-11 LOG Ic 1 EST

MACRO M1113

'WARDWARD TEST SECTION
|

12409

12413 043760
12414 043762
12415 043764

010405

188:

006205
006205
006205

12417 043772
12418 043774

010546
010446

12420 044002
12421 044006

012746
005046

000001

12423 044014

062706

000010

12419 043776 042716

12424 044020
12425 044022

12426 044024

12427 044026

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

004767

005700
001017

MOV

R4 ,RS

ADD

#PD.TEMP,RS

ASR
ASR
ASR

MOV
MOV

177770

BIC

MOV
CLR

137066

JSR

010246

RS,=(SP)
R4 ,-(SP)

197770, (sP)

MOV

R&,=(SP)

RO
208

R2,-(SP)

MOV

#20,-(SP)

12430 044036

JSR

PC.TST.LNG.WRD

12431 044042

026627

000020

005266

000010

020427

000011

12432 044050

12434 044056
12435 044062
12436 044064

004767

001002

062706
005204

12437 044070 003732

12438 044072

005203

126441 044102
12442 044104

005102
005216

12444 044112
12445 044114

003002
000167

12439 044074
12440 044100

12443 044106

146616

000006

020327
003672

000177

021627

000001
177260

ADD

000001

CMP

BNE

19¢:
208 :

12446 044120 026627 000002 000005 21$:

INC

: ERR.FLG,*

10(SP)

: ERR.CNT

198

ADD
INC

#6,5P
R4

BLE

18§

R4, #11

. NIB.PTR,+

INC

: WD.CNT

6292

COM
INC

R2
(SP)

; TST.PAT
; TWICE

6313
6266

2(SP) ., #5

. ERR.CNT,+

6316

;

6319

#WRD.10,-(SP)

;

6320

#4,-(SP)
SP.RO
14

; SP,w

CMP

CMP
BLE

CMP

R3, 4177
13§

(SP), M

BGT
JMP

218
38

22%

CMP

.WORD
"WORD
WORD

116
ARR.DAT
O

12453 044144
12454 044150
12455 044154

012746
012746
012746

MOV
MOV
MOV

#WRD.37.-(SP)
#WRD.35,-(SP)
#THR.FMT,-(SP)

12456 044160
12457 044164
12458 044166

12459 044170

12460 044172
12661 044176
12462 044202
12463 044204

TRAP

012746
010600
104414

000004

010116

012746
012746
010600
104414

006232
006220
005366

004602
000002

6306

6303
6299

000116
007534
000000

005740

6304

:
: NIB.PTR

12449 044132
12450 044134
12451 044136

012746

: TIST.PAT
¢

20(SP) . #1

BLE

12452 044140

: NIB.PTR,+

: ERR.FLG,*

003434

104455

; NIB.PTR,*

SP, (SP)

126447 044126

12448 044130

6301

PC,BLSGT2

12428 044030 012746 000020
060616

TOPS

PA:<

" ,-(SP)
-($P)

n0,sp

MOV

: NIB.PTR,*

RS
RS
RS

ADD

ST
BNE

010446

12429 044034

12433 044052

SEQ 0262

12416 043766 062705 011662

12422 044010

PAGE 259

:MLG

}%2}?

12412 043756

23-0CT-80 09:11

MOV

MOV
MOV
TRAP

MOV

MOV
MOV
MOV
TRAP

R1,(SP)

#FNT.9,-(SP)
#2,-(SP)
SP,RO
14

* WD.CNT,+

: TWICE,+

: ARR.SEL,*
; SP,#

6321

'CIMLAAD ML-11 LOGIC T EST

MACRO M1113

'HARDWARD TEST SECTION

12465

12468 044206
12469 044214
12470 044220

012766
062706
104467

000001
000016

12474 044232

026627

000010

12476 044242

016700

145720

12479 044252

066601

000004

12483 044270

062706

000016

12477 044246
12478 044250

12480 044256
12481 044262
12482 044264

12484 044274
12485
12486

006000
103002
000167
001004
104451
104444

020166
003002
000167
000207

177142

000026
22%:
000001

000006
177100

12502 044276

004767

12506 044310
12507

000207

12503 044302
12504 044304
12505 044306

104466
006000
103773

177024

12508

22=0ct=1980 10:45:32

MOV
ADD
TRAP
ROR
BHIS
JMP

CMP

BNE

MOV
24%:

25%:

26%:

TRAP
TRAP

ADD

CMP
BGT
JMP

ADD

RTS

125::

1%:

; *,DODU.FLG
:
3

6322
6318
6323

10(spP) ,

: DODU.FLG,*

6327

ML.LUN,RO

6330

4(SP),R1

: *,ARR.SEL

6261

#16,SP

6208

24%
51
L4

R1,6(SP)
26%
1%

PC,$125

RTS

!'<BLF/PAGE>

20 words

66
RO
1%

6 words

: Maximum stack depth per invocation:
6337

; ARR,.SEL,*

JSR

TRAP
ROR
BLO

TOPS

PA:<

#1,26(5P)
#16,SP
67
RO
23
2%

: Routine Size:

12509

12514
12515
12516 ;

23%:

SEQ 0263

22-0ct=1980 10:47:44

: Routine Size:
244 words
: Maximum stack denth per invocation:

12487

12492
12493
12497
12501 044276

sMLG

}%229

12475 044240

D 5
PAGE 260

;

12471 044222
12472 044224
12473 044226

23-0CT-80 09:11

0 words

6334

CZMLAAD ML-11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION

PAGE 261

TEST NUMBER:

TST 26

TEST NAME:

READ WRITE ARRAYS WITH PROM DATA

TEST DESCRIPTION:

= e =

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:

REPEAT WRITING/READING THIS BLOCK UNTIL ALL PATTERNS ARE TESTED

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.
REPEAT UNTIL A GOOD BLOCK IS FOUND OR LAST ROW IS REACHED.

SET ERROR FLAG IF ANY BAD NIBBLES ARE ENCOUNTERED IN BLOCK.

e
S
S

O T T T T

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.

N T T T T

T T

PRPR

R TR LR LR LA L R

‘44

OR THE ERROR FLAG IS SET.

IF NO GOOD BLOCK IS FOUND BY LAST ROW THEN REPORT ERROR AND

EXIT TEST.

IMPLICIT INPUTS:
RAS

_INC

LOABED DURING THE INITIALIZATION CODE AND CONTAINS THE ROW ADDRESS

TRTR

INCREMENT VALUE FOR THIS DRIVE.

PD TEMP:

A SITVECTOR OF 16 BITS WHERE THE READ PROM DATA [S STORED AND

ACCESSED FROM.

10_BUF:

A VECTOR OF 256 WORDS WHMERE DATA FOR MBUS READS AND WRITE FUNCTION

NN PN NN NN NN RN
PN NN NNV
AN NN NN

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

BGNTST;

R
R
PR TR TR
T

NN NN

VT
AW
VA T AT T
VT
TV
T AT
Y
NN NNV
VWV VAT
Y YWYV YLD VIVIT
VYV NNV
NG NS DBEBEBEEESFDNHEHNENWWHWWWWWNINDNDNDRDNINDNONN)
NN wo oo oo
OVONOWVNEWN
2O
VONOWVS
W
=0V
NOWVNESWN
=00V
NOWVNEWNN =00
OV
WN
2O
N=O0VoO~N

_.—l—.—.—.-‘-‘..‘-‘—!-._..—.-.-.-‘_.—l-.—l-l-.—l—l-l—.—b_._-l-l_l—.-.—.—...._..—l—l—l—.-‘-‘—l_‘—-fl—h—l—l—l_‘_‘_fld

SEQ 0264

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

12518 H

AORLRNLALNLNLNLALN N RLANL NN

23-0CT-80 09:11

ARE

local

WRD_CNT,
NIB_PTR,

FOUND.

'WORD COUNT

'NIBBLE POINTER

MACRO M1113

CIMLAAD ML-11 L 06 l C TEST
HARDWARD TEST S 3¢ T ION

23-0CT-80 09:11

PAGE 262

22-0ct=1980 10:47: 2k

22-0ct=1980 10:45: 32

—

mmmmmmmmmmmgwmmwmmwmmmm

————— i

— g

e T

)

OO NN
NN NN NN NN NN
oo o
NN~
[=]elele] o
O
~
SN o
D00~
[+ ]

12574 sMLG
575

DONE

LG,
ERR FLG,
SEC TOR_NO:

.
.

B
.

BGNSUB;
PASS _CNT

.
.

.
.
.

=1;

!THIS LOOP DETERMINES WHEN TO STOP

begin
do

begin

CLR_MBUS;

MLBA = [0_BUF;

'SET DATA DIAG MODE
'LOAD SECTOR NUMBER
'LOAD WORD COUNT
'LOAD UBUS ADRS

case .PASS_CNT from 0 to 3 of

'SELECT A NIBBLE PATTERN

MLWC = not 255;

;

.
.

[0l

.
.

.
.
.

(2]

6424
6425

6430
6431
6432

.
.

'ZEROES

%0'17';

'ONES

NIB_PAT = %0'12';

'ALTERNATING ONE'S,

ZEROES

'COMPL IMENT ONE'S, ZEROES

NIB_PAT = %0'15'

incr LD_CNT

from 0 to 9 do

LD_LNG_WRD (.LD_CNT,

incr WRT_CNT from 0 to 127 do

'WRITE PATTERN INTO THIS BLOCK

MLCST ="write;

DELAY (ONE_US);

6440
6441

'LOAD NIBBLE PATTERN INTO NIBBLE SAVE

'LOAD THE DATA DIAG REGISTERS WITH NIBBLE SAVE

DAT_CLK = DNE;

.NIB_PAT);

WRT_LNG_WRD;

begin

NIB_PAT

%0'000000°*;

tes.

.
.

NIB_PAT

(3] :

IN DSA

set

' INCREMENT THE PASS COUNT

+ 1;

MLDA = .SECTOR_NO;

,PASS_CNT

DAT DM = ONE;

!THIS LOOP RUNS THE PATTERNS

PASS CNT =

'SECTOR NUMBER

DONE_FLG = ZERO;

'ERROR FLAG

SECTOR_NO = ZEROES;

TOPS=20 Bliss=16 v2(206)

FA:<NEALE>BL2ML4.BLI.2 (68)

'PASS COUNT
!NIBBLE PATTERN
'DONT FLAG

PASS_CNT,
NIB P:ré

SEQ 0265

end;

CLR_MBUS;

‘D0 A WRJTE FUNCTION

CZMLAAD ML=11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

G S
PAGE 263

12630 ;ML4

22=0ct=1980 10:47:44

22-0ct=1980 10:45:32

}%g%g :
12633 ;

6442

12635
12636
12627
12638
12639

6444
6445
6446
6447
6448

12634 ;

;
;
;
;
;

12640 ;
12641 ;

12642 ;
12643 ;

12644 ;
12645 ;
12646 ;
12647 ;

12648 ;

SEQ 0266

6443

DAT DM = ONE;

'SET DATA DIAG MODE

MLWC = not 255;
MLBA = 10_BUF;
MLCS1 = read;
DELAY (ONE_US);
WRD_CNT = =1;

'LOAD WORD COUNT
'LOAD UBUS ADRS
‘DO A READ FUNCTION

MLDK = .SECTOR_NO;

6449
6450

6451
6452

6453
6454
6455
6457

'LOAD SECTOR NUMBER

'RESET THE WRD COUNT

begin
WRD CNT = ,WRD CNT + 1;

'TEST BLOCK FOR NIBBLE PATTERN
' INCREMENT WRD_CNT

RD_LNG_WRD;

'READ DIAG REGISGTER

PD_TEMP = .MLPD;
DAY CLK = ONE;
DELAY (ONE_US);

6456

TOPS=20 Bliss=16 v2(206)

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

NIB_PTR = -1;

'GET PROM DATA
'CLOCK DATA WRD INTO DIAG REG
'
'RESET NIBBLE POINTER

12649 ;
12650 ;

6458
6459

}ggg% :

gzg;

begin
NIB_PTR = .NIB_PTR ¢ 1;

12654 :

6463

it .PD_TEMP [.NIB_PTR] IS_NOT_SET then TST_LNG_WRD (.NIB_PTR, .NIB_PAT, ERR_FLG);

12656 ;

6465

12651

;

12655 ;

12657 ;
12658 ;

6464

6468

12661 ;
120662 ;

6470
6471

'SEARCH AND TEST GOOD NIBBLE>

" INCREMENT NIBBLE POINTE

end
until (.ERR_FLG) or (.NIB_PTR eql 9);

6466
6467

12659 ;

12660 ;

6460

end

6469

until (.ERR_FLG) or (.WRD_CNT eql 127);

}%ggz 3

gz;%

until (.PASS_CNT eql 3) or (.ERR_FLG IS_SET );

'REPEAT UNTIL ALL PAT TESTED OR ERROR FLG GETS SET

12665
12666
12667
12668
12669

;
;
;
;
;

6474
6475
6476
6477
6478

it (.PASS_CNT eql 3) and (.ERR_FLG IS_NOT_SET )

'WAS THIS A GOOD BLOCK?

12671

;

6480

12673 ;

6482

12670 ;

12672 ;

12674 ;

12675 ;
12676 :
12677 ;

12678 ;

12679 ;

6479

6481

then

6484
6485
6486

6487

6488

6489

12683 ;

6492

begin
DONE_FLG = ONE;

GOOD_BLK = .SECTOR_NO;

else

end

'YES
'SET DONE FLAG

'GOOD BLOCK GETS THIS SECTOR NO

begin

'NO

PASS_CNT = =1;

'RESET PASS COUNT

SECTOR_NO = .SECTOR_NO + .RAS_INC;

6483

12680 ;

12681 ;
12682 ;

end

enc;

' INCREMENT ROW NO

end

until (.DONE_FLG i5_SET ) or (.SECTOR_NO eql .LST_ARR + .ARR_INC);

6490
6491

ENDSUB;

6493

then

it .SECTOR_NO eql .LST_ARR + .ARR_INC

'REPEAT UNTIL GOOD BLK FOUND OR AT LST ROW
'SEE IF WE'RE AT THE LAST BLOCK

'CIMLAAD ML-11 LOGIC TEST
SECTION

23-0CT=-80 09:11

H S
PAGE 264

22-0ct=1980 1
22-0ct=1980 1

12686 ;ML4
12687 ;

ENDTST;

004167

137542

DOCLN;
end;

145366

000007

145350

000010

145416

145612
177770

145344

145322
177400

010342
000002
044434

28:

b il i e

#-1,2(5P)
R2
4(SP)

2(SP)

#40,3ML
. REG+40

#10,3ML.REG+120

R2, ML .REG*30
#-400,3ML .REG+10
#10.BUF ,aML .REG+20

145274

145276

PASS.CNT

PASS.CNT,*

6394
6397
6398
6399
6406

6408
6409
6410
6411
6413

3$(RS) ,PC

3%:

4%-3%

4%:

7$-3%
R1

5$-3%
6%-3%

5%:

000012

8$
#17,.R1
8%
#12,R1

000015

7%:
8%:

#5.R1
RS

SECTOR.NO
DONE .FLG

SECTOR.NO,
*

gésp>.n§

000017

147134

* PASS.CNT

ML.DUT,RS
#177770.R5
#7.,3ML .REG+40
RS . aML .REG+40

RS ,=(SP)

R1,-(SP)
PC,LD.LNG.WRD
(SP)+,(SP)+
RS

NIB.PAT
T

000004
000002
000040

TRAP

000002

6336

R1,$SAVES
514,SP

* ,NIB.PAT

177777

JSR

Se%e

$726:

000014

b
- el il

(68)

DODU (.ML_LON);

9%:

005205

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BLI.2

'A GOOD BLK NOT FOUND BEFORE LAST BLK
'ERROR AND DROP UNIT

012766
005002
005066
005266
152777
016705
042705
142777
150577
152777
010277
012777
012777
016605
006305
066507
000010
000014
000022
000030
005001

ERRDF (79, ARR DAT, 0);
PRINTB (THR_FMT, WRD_14, PHR_10, FNC_15);

LRTETE

162706
104402

begin

i il

NS NNNNNNNYIYYYNNY

b i i D i D el i D i i D i i D B s i
N DSLSLASIOSLS
TSNS ST NI ST NI SIS LSS N
~~
N N NNVNVMNVMNIN)
= b b
b e D b
~ o W FUNSOOVBNOVEWN=O

2709 044334
044340
044344
044352
044356
04436
04437
044374
044402
044406
044414
044422
044426
044430
044434
044436
044440
044442
044444
2728 044446
2729 044450
2730 044454
2731 044456
2732 044462
2733 044464
2734 044470
2735 044472
2736 044474
2737 044476
2738 044502
2739 044504

6494
6495
6496
6497
6498
6499
6500
6501

147:44
145:32

12688
12689
12690
12691
12692
12693
12694
12695
12696 ;
12700
12704 044312
12705 044316
12706 044322
12707 044324
12708 044332

SEQ 0267

HARDWARD TEST

MACRO M1113

* NIB.PAT

LD.CNT
LD.CNT,»
¢
NIB.PAT
LD.CNT

6417
6413
6420
6413
6423
6413
6426
6429
6430

6429

MACRO M1113

CIZMLAAD ML-11 LOGI C1 ES
SECT ION

12779 044720
12780 044722
12781 044724
12782 044726
12783 044730
12784 044736
12785 044742

5
SEQ 0268
TOPS

— NN

—

000001

MOV
MOV
MOV
MoV
4

000061

135336

000012

000020

145214

145116

000007
145074
000010
145052
177400

145100

145342
177770

010342
000071
000001

BIC
BI(B
BISB
B1SB

15%:
16%:

17%:

177777
000006
145162

000020
000001
135126

000012

000006
144712
145042

BISB
INC
CMP
BLE
BISB
MOV

145024
145026
145000

000012

RS
12%
R4
11%
#20,aML.REG+120
R3
R3, 4177
10$
#40,3ML
. REG+40

BNE
DEC

14%:

18%:
19%:

MOV
MOV
MOV
MoV
MOV

BEQ

MoV

BEQ
CLR
DEC

BNE
DEC
BR

MOV
INC
MOV

B1SB

20%:

21%:
22%:

:§1,3HL.REG

DEC

13%:

MOV

BEQ
MOV

BEQ
CLR
DEC
BNE
DEC
BR

;

LD.CNT,*

6430

D1.TEMP,aML.REG*170
D2.TEMP,aML .REC+200
E2.TEMP,aML.REG+160

#1,R4
14%

BEQ
CLR

145146

135204

CLR

RS, #11
9%

MOV
BEQ
MOV

12%:

000177
000040

PA:<

CMP
BLE

WO
S~
SO0

143174
143170
143164

000011
Y

NN NINNNONNNON
N NN NN
NNNNNNY -~

1 2746 044514
1 7647 044522
48 044530
1
1
49 044536
1
50 044544
1
51 044546
1
52 044552
1
53 044554
1
54 044560
1
55 044562
1 756 044566
1 757 044570
1 758 044572
1 759 044574
1 760 044576
1 761 044604
1 762 044606
1 763 044612
1 764 044614
1 765 044622
1 766 044626
1 767 044632
1
1
1
1
1 2772 044664
1 2773 044672
1 2774 044700
1 2775 044704
1 2776 044706
1 2777 044712
1 2778 044714

020527

Pl
ok ok o

12743
12744 044506
12745 044512

PAGE 265

JMLG

12741
12742

L
X

HARDWARD TEST

23-0CT-80 09:11

LSDLY,RS
13%
12(SP)

; WRT,CNT

;

*,$8TMP?

;

*,$8TMP1

;
;

$STMP
$$TMP1

6433
6435
6437

. $$TMP2
;
;

WRT,CNT
WRT.CNT,*

6438
6435

6439

ML.DUT,RS

177770,R5

#7,3ML.REG*+40
RS aML .REG+40

#10,3ML .REG+120
R2,3ML.REG*30

#-400,3ML .REG+10

;

SECTOR.NO,*

#.R4

;

*,$8TMP?

LSDLY,RS

;

*,$8TMP1

;
;

$STMP
$$TMP1

18%

17%
12(SP)
RS
16%
R&

15%
#-1,6(SP)
6(SP)

*,WRD.CNT
WRD.CNT

#1.,R4

;

*,88TMP?

L$DLY,RS
22%

;

*,$8TMP1

12(SP}
RS

;
;

$STMP
$$TMPI

; $$TMP2

#20,3ML.REG+120

23$

21%

20%

6446

6447

; $$TMP?
;
;

oML .REG+230,PD.TEMP

644k

6445

#10.BUF
,aML .REG+20
#71.3ML .REG

6442

6443

6448
6452
6453
6454
6455

;CZHLAAO ML-11 LOG l C 1 EST

MACRO M1113

'HARDWARD TEST SEC T l ON

SEQ 0269

22-0ct=-198 0 10: 47 :44
22-0ct=-198 0 10:145:32

000002

ADD
MoV
MOV

000001

Mov

U‘NN—‘—‘-‘O? ~N

i
i
i

000006
000010
000001

o
o

il i il

VIS
8N 0

BIT

BNE

000002

000003

NOONSNO

28%:

000001

143072

~N
~

o
o

144424
177777
000004

000004

000002
000001

BNE
CMP
BNE

29%:
30%:

TOPS
PA:<

6457
6461

6463

#1,-(5P)
-($P)

#10,spP

258

NIB.PTR,*
NIB.PAT,+

(SP),=(SP)
R1,-(SP)
#14,-(SP)

ERR.FLG,*

SP, (SP)

PC.TST.LNG.WRD
#6,SP

10(SP) ,RS

26$

ERR. FLG,*

6466

NIB.PTR,*

(SP),#11

248

6469

#1,RS

26%
6(SP) ,M77

WRD.CNT,

CLR

PASS.CNT,«

CMP
BNE
INC

CMP
BNE

6472

6474

ROR

BCC

TST
BNE
MoV
MOV

PNON)
b b b b

i
-

26%:

27%:

000001

NON
oo
(v
V.Y
8
oo

MOV
ADD
JSR
ADD
MOV

000001

000177

NIB.PTR,*

PC,BLSGT2

000011

000006

2(5P) ,=(SP)

(SP) RS
RS
RS
RS
#PD.TEMP,RS
RS,=(SP)

CLR
JSR

BIT
BNE
CMP

25%:

* NIB.PTR
NIB.PTR
NIB.PTR,*

177770, (5P)

MOV

000016

#-1.(SP)
(SP)

BIC

ADD
TST
BNE
MOV

145534

o
o
o
o

osroornvoo

136004
000010

001410

INC
MOV
ASR
ASR
ASR

aML.REG+170,
aML .REG+200,
ML .REG*+160,

ADD
MOV
CMP

BEQ

* ,DONE.FLG

#1,4(SP)
R2,G00D.BLK

306

RAS.INC,R2
#-1,2(SP)

L(SP) .,

328

SECTOR.NO,*
R

011662

MOV
MOV
MOV
Mov

24$:

177770

pa—y —a

RRRRRRRRRERRRRRFRRRRIIRRRRRLR
RRERRRRRRRRRRR
VAWV WA
VARV VA AV AW ViV AT AV ATV Y AT YV TV VWD

- OV

EIFHR

00 Oo Oo o Oo OO oo 00 O Vo Cx: 0o 00 0o 00 0o 0o 0o O O GO 0o 0 0O OO OO OO Co OO OO 0O
W
NN N RO RO NN RO NI NI N = b b b b e b b o b
%l
WN 2OV
NOWVNSWN SO0V
NOWVESWN-O
~NOW SWNN-=0O00

03 045030
804 045034
805 045036
06 045040
07 045042
808 045044

0o Co

~N
~N

5
Vi

NNU;NNNNNN
o

23%:

ddddddddd_‘d—.—.ddd-‘—.-.dd‘d-‘—‘d—‘d-‘—l_‘-‘—.—l—.—l—.—.—._‘-‘—b_.-.—._.—D—‘-J-J

PAGE 266

‘MLG

12797
12798

NN
NN N
rororurRRDNNDNDRONDNDNDNDNDNDNOND NNV

[
|

23-0CT-80 09:11

.l SECTOR.NO
.' PASS.CNT

00 NE.FLG,*

6477
6478
6474
6482
6483
6487

HARDWARD TEST SEC

MACRO M1113

EST

o
2 =

[CIMLAAD ML-11 LOG

————

MOV
ADD

W
W

wviwvn

(=1 =]

N~
W

12874 045342
12875 045346
12876 045352
12877 045356
12878 045362
12879 045364

1 2880 045366
1 2881 045372
1 2882 045374
1 2883 045376
1 2884 045402
1 2885 045406
1 2886
12887
12888
12
12
12
12902 045410
12903 045410

045414
045416
045420
045422

010600
104414

016700
104451
104444
062706
062706
000207

32%:

33%:

BHIS
JMP
[(]

144574

34%:

ADD

MOV
MOV
MOV
TRAP
MOV
TRAP
TRAP
ADD

ADD

RTS

; Routine Size:
;

004767

104466

006090
103773
000207

176676

LST.ARR,RS
ARR.INC,RS

TOPS
PA:<

SECTOR.NO,*

JSR
TRAP
ROR

BLO
RTS

6492

LST.ARR,RS

ARR.INC,RS
R2,R5
348

;

SECTOR.NO,*

6495

117

ARR.DAT

6496

#ENC.15,-(SP)
#PHR.10,-(SP)
#WRD
.14 ,-(SP)

#THR.FMT,-(SP)
#4,-(SP)

SP,RO
14

6497

ML.LUN,RO
51

Sl
#12,5P
#14,5P
PC

6494
6336

287 words

Maximum stack depth per

126::
1%:

;

47:44
45:32

ROR

CMP
BNE
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV

007162
006740
005774
005366
000004

000012
000014

CMP

BEQ
JMP
TRAP

31%:

871 045332
©o
o

-1980
-1980

RRRRRRIIIRLR

D i
D i
D
e
r— o

SEQ 0270

56 045260
57 045264
8 045270
5272

o NN

K 5
PAGE 267

;ML

12853
12854

12904
12905
12 906
12 907

23-0CT-80 09:11

PC,$126
66
RO
1%
PC

invocation:

17 words

6499

——

'CZMLAAD ML=11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 C9:11

SEQ 0271

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

sMLG

]

BGNTST;
lee

TEST NUMBER:

TST 27

TEST NAME:

REFRESH TIMING TEST

TEST DESCRIPTION:
TEST THE MEMORY ARRAY MODULES
REFRESH TIMING AND CONTROL LOGIC
REG BY:

WRITING ALL ONES INTO THE
GOOD BLOCK.

DELAY FOR 2 MS

READ THE GOOD BLOCK FOR ONES.
KEEP COUNT OF BAD NIBBLES
ENCOUNTERED

R T L L

L L

L L L L L L L L L LR AL L L

PAGE 268

ALLOW A BAD NIBBLE

THRESHOLD

OF 20 BAD NIBBLES OUT OF THE

L L

1280 NIBBLES TESTED.

IF THRESHOLD IS EXCEEDED THEN
REPORT ERROR AND DROP THE UNIT.

IMPLICIT INPUTS:

PD_TEMP:
T

A BIT VECTOR OF 16 BITS WHERE

THE READ PROM DATA IS STORED
AND ACCESSED FROM.

E R

TR R R

?g?BAL OWN LOCATION TO THIS

local

TST_PAT,

ERRZCNT,
ERRZFLG;
BGNSUB;
CLR_MBUS:

ERRTMCNT = ZERO;

'TEST PATTERN
'ERROR COUNT
'ERROR FLAG

TOPS=20 Bliss=16 v2(206)

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

CIZMLAAO ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

12969 :ML4

12973
12974
12975
12976
12977

:
;
;
:
:

12978 ;
12979 ;

12980 ;

12981

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

MLDY = .T1ST PAT
MLD2 = .TST_PAT;
MLE2 = .TST_PAT;
DAT_DM_XFERTM();
MLCST = write;

'LOAD DATA DIAG REGS WITH TST PAT

6562

incr WRD_CNT from 0 to 127 do

'WRITE BLOCK WITH TST PAT

6561

6563

6564

12984 ;
12985 ;

6567
6568

12986 ;
12987 ;
12988 ;

12989 ;
12990 :;

12991 ;

12992 ;

12993 ;
12994 ;
12995 ;
12996 :

6565
6566

6569
6570
6571

6572
6573

6574

6582

}gggg :

gggg

13004 ;

6587

;
;
;
;
;
;
;

13012 ;

13013 ;

6596

13014 :

6597

13016 ;
13017 ;

6599
6600

13015 ;

13018
13019
13020
13021

;
;
;
;

CLR_MBUS;

'SET UP A DATA DIAG MODE XFERR
'DO A READ FUNCTION
'DELAY FOR 2 MS

incr WRD_CNT from 0 to 127 do

'READ THE BLOCK

begin

PD TEMP = .MLPD:

IGET THE PROM DATA

incr NIB_PTR from 0 to 9 do

'LOOK AT 10 NIBBLES

DAT CLK = ONF;
DELAY (ONE_US);
RD_LNG_WRD
begin

gggz

6595

6598
6601
6602
6603
6604

(ONE US):

DAT_DM_XFER ();
MLCS1
= read;
DELAY (TWO_TH_US);

6581

6588
6589
6590
6591
6592
6593
6594

ISET UP A DATA DIAG MODE XFERR
DO A WRITE FUNCTION

DAT_CLK = ONE;
end;

6579

12999 :;

13005
13006
13007
13008
13009
13010
13011

DELAY

6576
6577
6578
6580

}%882 :

begin

6575

12997 :

12998 ;

TST _PAT = ONES:

TOPS=20 Bliss=16 v2(206)

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

6556
6557
6558
6559
6560

;

12982 ;
12983 ;

SEQ 0272

22-0ct=1980 10:47:44

}%g;? 3
12972 ;

PAGE 269

'CLOCK DATA WORD INTO DIAG REG
_
'READ THE DIAG REG

it .PD_TEMP [.NIB_PTR] IS_NOT_SET then TST_LNG_WRD (.NIB_PTR, .TST_PAT, ERR_FLG);
'FIND GOOD NIBBLES AND COMPARE THEM

it .ERR_FLG IS_SET then ERR_CNT = .ERK_CNT + 1; 'INCREMENT ERROR COUNT IF ERR_FLG IS SET
end;

end;
ENDSUB;

if .ERR_CNT gtr 20

then

8
ERRDF

(B0, ASYNC, 0);

'ALLOW 20 NIBBLES TO FAIL

'ERROR IF GTR 20

PRINTB (FIV_FMT, WRD 22, PHR_4, WRD_12, FNC_16, WRD_48);
DODU (.ML_LON);
DOCLN;
end;
ENDTST;

—————

'CZMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

004167

136430

$127:

000040

144276

000007
144254

144260

1%:

&»

P
P
WWW
o
&»
o

VTV

WO
=

FERISEREREGRRVERERNSIE

177777
144372
164376
144352
145114
000061

T Y

BIC
BI(B
BISB
CLR

JSR

144160

2%:
3%:

134362

000002

5%:

000020

7 045660

8 045662

144240

6$:

000040
144366
177770
000007
144120
145002

000071
003720
134252

000002
005302
000766
005001

g A

PAGE 270

6501

6550
6552

=(SP),=(SP)

#40,aML .REG+40

R3,aML.REG+40
RS

PC.OAT.DM.XFER

BEQ
CLR
DEC
BNE
DEC

BISB

«, TST.PAT
TST.PAT,»
TST.PAT,»
TST.PAT,+

R4, ML .REG+170
R4 . aML .REG+200
R&.aML .REG+160

MOV
BEQ
MoV

ERR.CNT

#-1,R4

#61,aML .REG

CLR

SEQ 0273

R1,$SAVES

MOV

R
#1.R2

. CNT
WRD

LSDLY,R3
5%
2(sP)

«, $$TMP1

4%
R2

3%
:%0.3!L.REG¢120

*,$$TMP2

; $STMP
; $$TMPI

: $$TMP2
WRD.CNT
,+
WRD.CNT

R1,.M77

000177

VWY A

5654
045656

CMP
TRAP
BISB

MOV
MOV
MOV
MOV

000001

W
-

AR R R R R R R R Vi
R RRRRRPRRRRRRRRRRRKRRR
i
v v
T
T YA A YA A A N .-

~NONW »
WONO VS WN =00V

OCOO00O0O0O

ViV

VS WN-OY

T T

SR SO N
W

— Y

Y
Y
W

————— g——

333333
it i g ges g 333 §O U‘S \I‘WWU‘V‘U‘U‘%WU‘U‘V‘U‘U‘U‘

041 045464

JSR

MOV

13029
13033 045424

23-0CT-80 09:11

6566

#40,3ML.REG+40

1464142
144124

R3.aML.REG+40

PC,DAT.DM.XFER

#71 ,aML .REG

144046
7%:

BEQ

8%:

CLR

gs;éo.az

LSOLY,R3
9

6565
6562

+,$8TMP2
o+,

6569
6570
6571

$8TMP1
$S$TMP
$$TMPT

; $$TMP2
D
. CNT
WR

6573

'CZMLAAOD ML-11 LOGIC 1 EST

MACRO M1113

HARDWARD TEST SECTION

13080
}ggg‘l

JMLG
3

23-0CT-80 09:11

B_6

PAGE 271

SEQ 0274

1305% 045664 017767 144240 143770 118:

MOV

ML .REG+230,PD. TEMP

;

13085 045700

012702

MOV

0 ,R2

: «,$8TMP2

12087 045706

016703

134204

005066
005303
001374
005302
000766
017767
017767
017767

000002

13084 045672

13086 045704

13088 045712

13089 045714
13090 045720
13091 045722
13092 045724
13093 045726
13094 045730
13095 045736
13096 045744

13097 045752
13098 045754

13099 045756
13100 045760
13101 045762
13102 045764
13103 045770
13104 045772

13105 045774

152777

001411

001404

005002
010203

006203
006203
006203
062703
010346
010246

042716

000020

000001

144134
144136
144110

13118 046044

13119 046050
13120 046052

13121 046054

13122 046056

010446
012746
060616
004767
062706

13125 046066

021627
001001
005205

005202

020227

005201

020127

13126 046072 003674

13127 046074

13128 046076
13129 046100
13130 046102

13131 046106

13134 046116

135070

000006

000001

000011

006000
103002
000167

020527

178:

18%:

104455

000120

177324

158

;

L$DLY,R3

; o+, $8TMP1

CLR
DEC
BNE
DEC
BR
MOV
MOV
MoV

2(SP)
R3
138
R2
128
aML.REG+170,D1.TEMP
ML .REG+200.,D2.
TEMP
OML.REG+160,E2.TEMP

; $STMP
: $STMPY

ASR
ASR
ASR
ADD
MOV
MOV

R3
R3
R3
#PD.TEMP,R3
R3,=(SP)
R2,-(SP)

BEQ

CLR
MOV

148

R2
R2.R3

#$177770, (sP)

MOV
CLR

#,-(SP}
-($P)

ADD

n0,sp

ST
BNE
MOV
MOV
MOV
ADD
JSR
ADD

CMP

RO
17%
R2,-(SP)

R4 ,-(SP)
#6.-(SP)
SP. (SP)
PC.TST.LNG.WRD
#6,SP

(SP), M

18%
RS

CMP

R2, M1

INC

BLE

TOPS
PA:<

6575

6576

6577

; $STMP2

; NIB.PTR
. NIB.PTR,*

6580
6583

; NIB.PTR,*

PC,BLSGT2

BNE
INC

CMP

198:

#20,3ML.REG+120

MOV

BLE

000177

000024

BEQ

JSR

104467

13132 046112 003432

13133 046114

000001

144620
000006

BISB

BIC

005700
001011
010246

13123 046062 003734

13124 046064

158:

177770

062706 000010

13113 046024
13114 046026
13115 046032
13116 046034
13117 046040

141756
141752
141746

011662

13109 046012

13110 046016
13111 046020
13112 046022

138:

168:

012746
005046

004767

128:

148:

13106 046000
13107 046004

13108 046006

144120

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

16$

R1,#177

: NIB.PTR,*
; TST.PAT
,»

: ERR.FLG,*

: ERR.FLG,*
: ERR.CNT

6587

: NIB.PTR

6580

: WRD.CNT

6573

: NIB.PTR,*

: WRD.CNT,*

TRAP

6591

CMP

RS, #24

: ERR.CNT,*
;

6595
6598

ROR
BHIS
JMP

BLE

TRAP

.WORD

RO
198
1%

20$
S5

120

piy

&
o

no*
&~

046120

D o
D
o
D

D
B
D
—

oo
N
nNO SO

oooor

[=1=]
KRRR

D
D e

€6

PAGE 272

SEQ 0275

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

143776

0 046164
1 046170

2 046172
3 046174

000016

000207

20%:
;
;

MOV
MOV
MOV
TRAP
MOV
TRAP
TRAP
ADD

CMP

RTS

Routine Size:

TOPS
PA:<

ssvnc

6599

#WRD .48, ~(SP)
#ENC.16.=(SP)
#WRD.12.-(SP)
#PHR .4 , = (SP)

#WRD.22 ,=(SP)

WFIV.FAT,=(SP)
#6,-(SP)

SP.RO

14
ML.LUN,RO

6600

44
#16,5P
(SP)+, (SP)+
PC

184 words

Maximum stack depth per

SP"

invocation:

6597
6501

15 words

& 046200
5 046202

.WORD
.WORD
MoV
MoV
MoV
MoV
MOV

006360
007174
005760
006630
006062
005414
000006

i
D

~ N~ [ e
AL I
IV IV IV IV IV IV VW W
» W 00 £~ W00~
Voo ~NO~

e
I

R N
N

NN N

e e TP

N N N N

d D

N Y (N U U

N N LN W

23-0CT-80 09:11

MACRO M1113

P o B ol v [V TV W
W
=00 oo~ o

gy -

NN NN N W N NN N w

L
'CIMLAAD ML-11
HARDUARD TEST S

046204
046204
046210
75 046212
76 046214
77 046216

004767

104466

177214

T2 7::
1%:

006000

JSR

TRAP

ROR
BLO

103773

000207

RTS

Routine Size:

6 words

; Maximum stack depth per invocation:
6605

!<BLF/PAGE>

6602

PC,$T127
66
RO
1%

0 words

MACRO M1113

EST

o
Z -

'HARDWARD TEST SEC T

—

CIZMLAAD ML-11 LOG l

23-0CT-80 09:11

ugwwuuwuwuww

R E T e

P T T

L T

LR T L T T LR L LR L L LR LR LR LA LR AL

BGNTST;

AN
NOAN RN N
oo
o
SN N AN N NN WIWNWNO RO NN NNV NVONINN) = S D
D s b b
W =OVOENOWVSWN
SO0V NV UWN-=O O
(=1 BNV

- D

il D i e

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

D D e

s D i i

D i

WMM%U‘V‘V‘WWU‘U‘U‘U‘U‘U‘V‘WV‘WW W W N NN NN W NN NN

D i

o
o

R
95
96
97
98
99

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

T T

)

—

) e

D i

)

SEQ 0276
22-0ct=19 8 010 167:4 b
22-0ct=-198 0 10:45:32

13189 H, )
190 ;
92
93

D_.6

PAGE 273

{ TEST NUMBER:

TST 28

g TEST NAME:

ADDRESS COUNTER TEST

' TEST DESCRIPTION:

|
|
|
:

TEST THE ABILITY OF THE ADDRESS
COUNTER TO SUCCESSFULLY COUNT
FROM BLOCK ZERO THROUGH THE
DEVICES LAST BLOCK BY:

;
:
:

;

i
;

STARTING AT BLOCK ZERO WRITE ZEROES INTO ALL BLOCK UP TO THE

LAST BLOCK ADRS MINUS ONE.

READ THE LAST BLOCK FOR ONES AND ERROR IF ZEROES.

WRITING THE LAST BLOCK WITH ONES PATTERN.

STARTING AT BLOCK ZERO WRITE ZEROES INTO ALL BLOCK THROQUGH THE LAST

BLOCK.

READ THE LAST BLOCK FOR ZEROES AND ERROR IF STILL ONES.
IMPLICIT INPUTS:
PD TEMP:

A BITVECTOR OF 16 BITS WHERE THE READ PROM DATA IS STORED AND ACCESSED FROM.

local
DODU_FLG,

ERR_FLG,

END CNT,

BG_PAT;

'DROP UNIT FLAG
'ERROR FLG
'ENDING SECTOR NUMBER

!BACKGROUND PATTERN

BGNSULB;
CLR_MBUS;

0000 FLG = ZERD;
BG_PAT = ONES;
MLB1 = .BG_PAT;

'BACKGROUND PAT OF ONES
'LOAD DATA DIAGS WITH BG PAT

DAT DM = ORE;
LAST BLK_XFER ();
MLCSY = write;

!SET DATA DIAG MODE
'SET UP A LAST BLOCK XFERR
‘DO A WRITE FUNCTION

incr WRD_CNT trom 0 to 127 do

'WRITE THE LAST BLOCK WITH THE BG PATTERN

KLD2 = .BG_PAT;
MLE2 = .BG PAT;

begin
DELAY (ONE_US);

DAT_CLK = ONE;

HARDWARD TEST S

MACRO M1113

—

CIMLAAD ML-11 L

23-0CT-80 09:11

E_6
PAGE 274

22-0ct=1980 10:47:44

O
L
L
L
L O
L
A
L
T
A T

CLR_MBUS;
DAT DM = ONE;

LAST _BLK_XFER ();
MLCST = Fead;

!SET DATA DIAG MODE
'SET UP A LAST BLOCK XFERR
‘DO A READ FUNCTION

incr WD_CNT from 0 to 127 do

'READ THE LAST BLOCK FOR BG PATTERN

DELAY (ONE_US);
begin
PD_TEMP =

RD_LNG_WRD

'READ THE DATA WORD

incr NIB_PTR from 0 to 9 do
begin

'LOOK AT 10 NIBBLES

IS_NOT_SET then TST_LNG_WRD (.NIB_PTR,

.BG_PAT, ERR_FLG);

'FIND GOOD NIBBLES AND COMPARE THEM
it .ERR_FLG
then

R T

.PD_TEMP [.NIB_PTR]

'SEE

IS_SET

ERROR WAS FOUND

'ERROR IF

begin

ERRDF (81, INTER, 0);
PRINTB (THR_FMT, PHR_4,

FLG IS SET

WRD_ 13, FNC_22);

PRINTB (TWOFMT, FNC_13, WRB_56);

R TR TR
" TETEIEIETE TR TR T

!GET PROM DATA
'CLOCK OUT THE DATA WORD

_MLPD;

DAT_CLK = ONE;
DELAY (ONE_US);

o
o

377
3
3
3

LEETETETE DR TN I T R TR R

—

D o

L T

D o

D i

261

D o

i
o
D
D o

3276

TOPS=-20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (70)

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

NN N NN N N NN N N NN N
RN

sMLG

3
3
3
3

SEQ 0277

EXIT_TST;
end;
end;

end;

.END AT LAST BLOCK -1
'LOAD DATA DIAG REG WITH COMP BG PAT

END_CNT = ,LST_BLK - 1;

MLDY = ZEROES;

MLD2 = ZEROES;
MLE2 = ZEROES;
incr TWICE

begin

from 0 to 1

CLR_MBUS;
DAT_DM = ONE;

FIRST_BLK_XFER ();

MLCST

= write;

incr BLK_CNT

from 0 to .END_CNT do

incr ADRS_CNT from 0 to 127 do
begin
DAT_CLK = ONE;

'REPEAT LOOP TWICE
'SET DATA DIAG MODE

'SET UP A FIRST BLOCK XFERR
‘DO A WRITE FUNCTION

'CLOCK THE ADDRESS COUNTER UP TO END_CNT

CIMLAAD ML-11 LOGIC T EST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

13301 ;MLé
6710
6711
6712
6713

13310 ;
13311 ;

6716
6717

13312 ;

13313 ;

13314 :

13315 ;
13316 ;

15317 ;
13318 ;

13319 ;

13320 ;
13321 ;

}g%%% s

incr UD'(NT from 0 to 127 do

(ONE_US);

begin

'GET THE PROM DATA

672%
6724

RD _LNG_WRD;

'READ DATA WORD

incr NIB_PTR from 0 to 9 do

'LOOK AT 10 NIBBLES

6721
6722

DAT CLK = ONE;
DELAY (ONE _US) ;

6725

6726
6727

it .PD_TEMP [.NIB_PTR] IS_NOT_SET then TST_LNG_WRD (.NIB_PTR,

it .ERR_FLG IS_SET

then

6737

13340
13341
13342
133453

;
;
:
;

6746
6747
6748
6749

13345
13346
13347
13348
13349
13350
13351

;
;
;
;
;
;
;

6751
6752
6753
6754
6755
6756
6757

'SEE IF ERROR WAS FOUND

begin
'"ERROR IF FLG IS SET
ERRDF (82, ASYNC, 0);
PRINTB (THR_FMT, WRD_50, WRD_S51, WRD_10);

DODU_FLG = ONE;
end;

end;

6744
6745

6750

.BG_PAT, ERR_FLG);

'FIND GOOD NIBBLES AND COMPARE THEM

6733

6738
6739
6740
6741
6742
6743

'CLOCK QUT DATA WORD

begin

g;%g

)

'READ THE LAST BLOCK FOR BG PATTERN

PD TEMP = _MLPD;

;
;
;
;
;
;

13355

'SET UP A LAST BLOCK XFERR
'DO A READ FUNCTION

6720

13332
13533
13334
13335
13336
13337

13344 ;

DELAY

6719

6734
6735
6736

13338 ;
13339 ;

'SET DATA DIAG MODE

6718

13328 ;
13329 ;
13330 ;

13331 ;

CLR_MBUS;
DAT DM = ONE;

LASY BLK_XFER ();
MLCST = Fead;

6730
6731
6732

TOPS=20 Bliss=16 v2(206)

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

end;

6714
6715

13324 ;
13325 ;
13326 ;
13327 ;

SEQ 0278

22-0ct=1980 10:45:32

;
;
;
:

13308 ;
13309 ;

22-0ct=1980 10:47:44

}%%8% 2
13304
13305
13306
13307

PAGE 275

END CNT = _END CNT + 1;
BG_PAT = not .EG_PAT:
ena;

'NOW END AT THE LAST BLOCK
'COMPL IMENT THE BG PATTERN AND REPEAT

ENDSUB;

if .DODU_FLG IS_SET

then

begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

'DROP THIS UNIT IF DODU_FLG IS_SET

CIMLAAO ML=11 LOGIC T EST
HARDWARD TEST SECTION

MACRO M1113

13357

SEQ 0279

22=0ct=1980 10:47:44

13363 046220

004167

|
|

13365 066230
13366 046232
13367 046240

104402

13369 046250
13370 046256
13371 046262

13364 046224

000010

152777
076705

000040
143724

143500

142777
150577
005066

000007
143456
000002

143462

010177

143572

042705

13372 046266

012701

13373 046272

13374 046276
13375 046302

13376 046306

13377 046314
13378 046320
13379 046326
13380 046330
13381 046334
13382 066336
13383 046342
13384 046344

135634

162706

13368 04624k

010177
010177

152777

004767
012777
005002
012703
001411
016704
001404
005066

177770

143576
143552

000010
144254
000061

020227
003755

000177

016705

143560

13393 046376

13394 046404

000020

152777

000040

177770

143432

13400 046440

012777

143232

13402 046452

001411

13408 046472

001404
005066
005304
001374

BICB
BISB
CLR

#7,3ML.REG+40
RS,aML.REG+40
2(SP)

: DODU.FLG

6645

R1,3ML.REG*+170

. BG.PAT,+

6647

BIC

MOV
MOV

BISB

000071

000001

133436
000006

6%:

JSR
MOV
CLR
MOV
BEQ
MOV
BEQ
CLR

DEC
BNE
DE
BR

BISB
INC
(MP
BLE

BISB

9% :

005002

10%:

R1.aML.REG+200
R1. ML .REG*+160

#10,aML.REG+120

PC,LAST.BLK.XFER
#61,aML .REG
R2
#1,R3
6%
LSDLY R4
5%
6(SP)

R4
48
R3
{1

MOV
BEQ

MOV

BEQ
CLR
DEC
BNE

DEC

(LR

6643

: «,BG.PAT

: BG.PAT.+
: BG.PAT.e

3
:
: WRD.CNT
P oe,$8TMP?
:

e, $8TMP

3STMP

6646

6648
6649

6650

6651
6652
6654
6656

L $STMPI
: $$TMP2

#20,aML.REG+120
R2

;
© WRD.CNT

6657
6654

#40,aML.REG+40

;

6658

#10,aML.REG+120

;

6661

#71.aML REG

6663

R2,M77
2%

#7,3ML.REG+4D
RS.aML.REG+40

MOV

8s:

#-1,R1

BICB
BISB

JSR

017777085

ML.DUT,RS

BISB
7%:

n0,sp

MOV

BIC

143316

005303

13409 046474 000766

13410 046476

6641

143334

143364

046460
046462
046466
046470

;

4$:

152777 000010

13403 0464564 016704

¢
#40,aML.REG*40
ML.DUT,RS

38:

13398 046426

000007
143312

13399 046434 004767 144134
012703

TRAP
BISB
MOV

2%:

042705

13401 046446

1%:

5% :

152777
005202

142777
150577

6604

143352

13395 046410
13396 046414
13397 046422

;

143504

000006

13391 046370
13392 046374

13389 046360
13390 046366

R1,$SAVES

SUB

MOV

133554

PA:<

JSR

MOV

000001

005304
001374
005303
000766

22-0ct=1980 10:45:32

10PS

$728:

177777

13385 046350
13386 046352
13387 04635¢
13388 046356

13404
13405
13406
13407

G_6
PAGE 276

MLG

}%%23

23-0CT-80 09:11

WRD.CNT,+

#177770,R5

PC,LAST.BLK.XFER
#.R3
10$

LSDLY,R&
9%
6(SP)
R4
8%

D oe,$8TMP?

6664

; v, 88TMPY
; $STMP
; $STMPY

. $$TMP2

; WD.CNT

6562

6666

MACRO M1113

CZMLAAD ML-11 LOGI C TEST

HARDWARD TEST SECT iON

23-0CT-80 09:11

PAGE 277

SEQ 0280

2 2 0 C t-198 0 10: 47:44
2 2 0 C t-198 0 10::45:32

o
D e

D i
D
D
D
i
el il e
—

NN
e~
Pl
o S NWNWWW
N = OV ~NOrW

13443 046634

12%:

133370

13%:

000006

NN~
oo

14%:

15%:

16%:

011662
177770

MOV

MOV
MOV

LSDLY,R&

*,$$TMPI

6(SP)

$STMP
$S$TMPT

BEQ

BEQ
(LR
DEC
BNE
DEC
BR

MOv
MOV
MOV

CLR

MOV
ASR
ASR
ASR
ADD
MOV
MOV
MOV

CLR

134254
000010

JSR

ADD
TST

BNE

MOV
MOV
MOV
ADD

000012

JSR

144004

007254
005770
006630
005366
000004

006454
007136

005356
000003

000001

17%:

ADD

CMP
BNE
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV

15%
14%

13%
R3
12%

aML.REG+170,D1.TEMP
TEMP
aML .REG+200,D2.
TEMP
0,E2.
aML .REG+16

; v, $8TMP?

R3,R4

R3.-(SP)

NIB.PTR,*

R4
R4
R4
R4
#PD.TEMP
R&,=(SP)

2177770, (sP)

6669

6670

$$TMP?

NIB.PTR
NIB.PTR,*

TOPS
PA:<

6668

TEMP
aML.REG+230,PD.
#20,aML.REG+120
#1,R3

BISB

BIC

000001

000006
000004

61 046724
62 0466726
63 046730
3464 046734
3465 046740
3466 046744

11%:

-d
b
b

012703
001411
016704
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

143424
000020
000001

—

152777

Pl
o

017767

046500
046506
0466514
046520
046522
046526
046530
046534
046536
046540
046542
046544
046552

D il

D i

D e

A -

RREppppgggggggggggeggg &~
gydunuunnonannununannvnohu—ha-a-a—W
20V
NO VIS NN =00V ~NONW

f"L‘

6673
6676

#1,-(SP)
-($P)

PC,BLSGT2
#10,sP
RO
17%
R3,=(SP)
R1.=-(SP)

$2,-(sP)

SP, (SP)
PC.TST.LNG.WRD
#6.SP
M
4(SP),
18%

NIB.PTR,*
BG.PAT
,+

ERR.FLG,*
ERR.FLG,*

6683

55
121
INTER
0
#FNC.22,-(SP)
#WRD.13.-(SP)

#PHR
.4, = (SP)
#THR.FMT,=(SP)
#4,-(SP)

SP.RO
14

#WRD.56, (SP)
#ENC.13.-(SP)

#TW0.FMT,-(5P)
#3,-(5P)

6680

6684

3 P

6685

(i~

CIMLAAD ML-11 L 0
HARDWARD TEST S 3

MACRO M1113

C TEST
l ON

13470
13471 046750
13472 046752
13473 046754
13474 046756
13475 046762

TRAP

000011

13494
13495
13496
3497

143424

141322

000040
143124
177770
000007
142656
000010

el i

047070
047074
047102
047104

000061

98 047106
199 047110

000020

142700

19%:

142662

142730
142576

142702

218:

—2

o
R
~

SR o

3
—

NSNS

FRERRRRRRRRRR RR

VIV

oo
NNN-.-‘-.-J-.-‘-‘..—.-.%
N=OOVONO
WV WN—=O

WAV AV AWDNY W

D il
il

22%:

507 047142

N AN U AN U

D i

D i el

D Dl

D i

N AN N NN NN N 4 0 U

N O

000177

000040
143022
177770
000007
142554
000010
143376
000071
000001
132700

000006

000766

JMP
INC
CMP
BLE
INC
CMP
BLE
MoV

143050
143054
143030

500 047116
501 047120
502 047124
503 047126
504 047130
505 047132

N Y

18%:

000177

13491 047050
13492 047056
13493 047062

TRAP
ADD

000020
000604

13477 046770
13478 046774
13479 046776
13480 047000
13481 047004
13482 047006
13483 047012
13484 047014
13485 047020
13486 047024
13487 047030
13488 047032
13489 047040
13490 047044

SEQ 0281

22-0ct-198 0 10: 47:44
22-0ct=198 0 10: 45:32
MOV

13476 046766

—

I_6

PAGE 278

JMLG

13468
13469

AN U U

23-0CT-80 09:11

142576

DEC
CLR
CLR
CLR
(LR
BISB
MoV

BIC
B!(B
BISB
BISB
JSR
Mov
CLR
BR
CLR
BISB
INC
CMP
BLE
INC
CMP

BLE
BISB
MoV

BIC
BI(B
BISB
BISB
JSR

142560

142626
142474

23%:
24$%:

25%:

MOV
MOV

BEQ

MOV

BEQ
CLR
DEC
BNE
DEC
BR

SP,RO
14

SP,*

#20,SP
37%
R2
R3, 411

166

R2
R2.M177
1%
LST.BLK, (SP)
(SP)

aML.REG+170
aML.REG+200
ggL.REG*160
#40,aML
. REG+40
ML.DUT,R&

TOPS
PA:<

NIB.PTR
NIB.PTR,+*

6680
6682
6673

WD.CNT
WD.CNT,*

6666

* END.CNT
END.CNT

6693

TWICE

6694
6695
6696
6698
6699

#177770.R4

#7,3ML.REG+40
R4 ML .REG+40

#10,3ML.REG+120

PC,FIRST.BLK.XFER

:g1,8HL.REG

22%

R4
#20,aML.REG+120
R4

RG,#177
21%
R3
R3, (SP)
20%
#40,aML
. REG+40
ML.DUT,R4

BLK.CNT
ADRS.CNT
ADRS.CNT
,*
ADRS.CNT

; BLK.CNT
BLK.CNT,END.CNT

6701
6702
6703
6705

6707
6709
6707
6705
6710

#177770.R4

#7,3ML .REG+40
R4 . aML .REG+40

#10,3ML.REG+120

PC,LAST.BLK.XFER

#71,3ML .REG
#,R3

+,$8TMP2

26%
R4
LSDLY,
25%
6(SP)

$STMP

24%
R3

$$TMP?

238

+,$$TMP

$STMP1

6713
6714
6715
6716

28%:

132632

29%:

000006

308:
31%:

o~ N

P
P

58 047376

32%:

011662

VSN =00V~
oo~

N~ NNNNNNYOOO

VIV
AWDA

SEQ 0282

22-0ct=19 80 1
22-0ct=19 80 1
CLR

WD .CNT

BISB

#20,3ML.REG+120
#1,R3

*,$8TMP?

MoV
MoV

BEQ

MoV

BEQ
CLR

DEC
BNE
DEC

33%:

BNE

.WORD

34%:

MOV
ADD
INC

147:44
:45:32

TOPS

PA:<

6718
6720
6721
6722

«,$$TMP1

$$TMPY

NIB.PTR
NIB.PTR,*

6725
6728

R3.-(SP)

#177770, (sP)
#1,-(SP)
-($P)

#6,5P

MOV
MOV
MOV
MOV
MOV
MOV
TRAP

000014

Ré
R4
R4
#PD.TEMP,R4
R&4,=(SP)

ADD
CMP

.WORD

000001
000012

$$TMP?

PC,BLSGT2
#10,5P
RO

TRAP
.WORD

005740
006406
006400
005366
000004

29%
R3

JSR
ADD
TST
BNE
MOV
MOV
MOV
ADD

JSR

000001

$STMP

R3,R4

ASR
ASR
ASR

CLR

000012

LSDLY,R4
308
6(SP)

MOV

CLR

Mov

133516

3§

28%
AML.REG+170,D1.TEMP
TEMP
aML .REG+200.,D2.
2?L.REG*160.EZ.TEHP

BIC

000010

TEMP
aML .REG+230,PD.

MoV
MOV
Mov

ADD
MOV
MoV

177770
000001

143246
000006
000004

R
——————
S
[P

J_6
PAGE 279

33%

R3,-(SP)
R1.-(SP)

NIB.PTR,*

SP, (SP)

ERR.FLG,*

#2,-(5P)
PC.TST.LNG.WRD

., M
4(SP)

349
55

,«
BG.PAT

ERR.FLG,*

6732
6735

122

ASYNC

v
~N

553 047360
554 047364
gSS 047370

000001

&5
RO
v

~
~N
&H
P

~N~
NN

20
&~

wvi
i wvi

152777

012703
001411
C16704
001404
005066
005304
001374
005303
000766
017767
017767
017767
005003
010304
006204
006204

26%:
27%:

142666
000020

W NN N WY NN NN W

047336
047342
047344
047346

017767

005002

38 047300
539 047302
3540 047310
13541 047316
13542 047324
13543 047326
13544 047330
13545 047332
13546 047334
13547
13548
13549
13550

23-0CT-80 09:11

sMLG

o
&~

%U‘WWU‘NNNNN
WN =20V
~NOrW ~

VT AV AT wn

SECTION

VIV AT

h —
B o
i
D o
d
D
i

N N N WV N NN NN N NN

d e

NN w

'HARDWARD TEST

MACRO M1113

CIZMLAAO ML-11 LOGIC TEST

#4,-(SP)
SP RO
14
#1.14(SP)

$2,sp

6736

SP,+

+,DODU.FLG
NIB.PTR

6737
6734
6725

13580
000011

000001
177272

35%:

&H
f

~
v

8 &3

597 047546
598 047552
599 047560
1 047566

2 047570

~NOo W

03 047572
04 047576

NOw

K 6

PAGE 280

SEQ 0283
22-0ct=198
22-0ct=198

CMP
BLE
INC
CMP
BLE
INC

000177

594 047540
595 047542

176456
000002

016700

142400

062706
000207

000010

104451
104444

000001

36%:

37%:

R?
R2,#177

WD.CNT
WD.CNT,*

6718

(SP)

END.CNT
BG.PAT

6744
6745
6698

27%

COM
INC
(MP

TRAP

ROR

BHIS
JMP
CMP
BNE

047600

004767

104466

176414

006000
103773
000207

128::
1%:

TWICE
TWICE,*

35¢
19s

6746

36$
1

)
2(sPM
37%

DODU.FLG,*

H%.LUN,RO

6753
6604

RTS

Lo
#10,sP

ADD

JSR
TRAP
ROR

BLO
RTS

18 words

6755

PC,$728
66
RO
1%
PC

6 words
; Maximum stack depth per invocation:
22-0ct=-1980 1
22-0ct=-1980 1

!<BLF/PAGE>

6750

MOV
TRAP
TRAP

; Routine Size:

6758

TOPS
PA:<

NIB.PTR,*

32§

R
RS
RS,
M

BGT
JMP

47:44
:45:32

R3,#11

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

WIN NN
S OONO VNN =YW

23-0CT=80 09:11

NN
SHrnoornvooNY
= - -ago

g uuuuuwuu WIN N NN N NN N
SREELEE
SR SEEsEEsE
R
= 5 2D DS RS &

—‘_...._.—.-J—.—.—‘—l_.-.—l—.-l_..—.—.—‘_‘-.—._‘-J_.—l-.—l_‘—l—.-‘_‘-‘-‘—l-‘—.—._l—-._.
W
ViV

MACRO M1113

EST

Z -

'HARDWARD TEST SEC

—
—

'CIMLAAD ML=11 LOG

147 144
:45: 32

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BL1.2 (70)

'CZMLAAD ML=11 LOGIC IcC 1 TEST

MACRO M1113

;HARDHARD TEST SECTION
L

23-0CT-80 09:11

L 6
PAGE 281

13639 ;MLG

22-0ct=1980 10:47:44

}%22? :

13642 ;

13643
13644
13645
13646

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

;
;
;
;

6760
6761
6762
6763

13650 ;

6767

13647 ;
13648 ;
13649 :
13651

13652
13653
13654
13655
13656
13657
13658
13659
13660
13661
13662
13663
13664

;

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

13665 ;
13666 ;

13667 ;
13668
13669
13670
13071
13672
13673
13674

;
;
;
;
:
;
;

13676
13677
13678
13679
13680
13681
13682
13683
13684
13685

:
;
;
;
;
;
;
;
;
;

13675 :

13686 ;

13687 ;
13688 ;

13689 ;

13690 ;
13691 ;

}%ggg :

SEQ 0284

6764
6765
6766
6768

6769
6770
6771
6772
6773
6774
6775
6776
6777
6778
6779
6780
6781
6782
6783

€784

!
BGNTST;
'++
' TEST NUMBER:
TST 29
!
' TEST NAME:
ARRAY MODULE SELECTION TEST
!
' TEST DESCRIPTION:
!
!
TEST FOR UNIQUE ARRAY MODULE

!
!
!
!
!
!
!
!
!
!
!
!
!

SELECTION BY:

6793
6794
6795
6796
6797
6798
6799
6800
6801
6802

!
!
!
!
!
!
!
!'--

6804
6805

6806

6807
6808

gggg

WRITING THE RESPECTIVE ARRAY
MODULE POSITION NUMBER INTO
THE FIRST GOOD NIBBLE FOUND
IN THE ARRAY.
DO FOR ALL
PRESENT ARRAYS.

READ THE ARRAYS FOR THEIR
RESPFCTIVE POSTION NUMBERS.

IMPLICIT INPUTS:
PD TEMP:

!
!
!
!
!
!
!

6803

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

6785
6786
6787
6788
6789
6790
6791

6792

TOPS=20 Bliss=16 v2(206)

A BIT VECTOR OF 16 BITS WHERE
THE READ PROM DATA IS STORED
AND ACCESSED FROM.
GLOBAL OWN LOCATION TO THIS
TST.
10 _BUF

A VECTOR OF 256 WORDS WHERE

DATA FOR MBUS READS AND WRITE
FUNCTION ARE FOUND.
A GLOBAL OWN LOCATION TO
THIS TEST.

Llocal

WRDS TSTED,

'WORDS TESTED

FND_GD NIB,

'FOUND GOOD NIBBLE

ARR_SEL,
ARR_NUR;

ARR_SEL = ZEROES;

ARRTMSEL = .ARR_SEL = .ARR_INC;

'ARRAY SELECT

'ARRAY NUMBER

'START ARR_SEL BACK ONE ARRAY

[

e e

—

—_—

—

(CIMLAAO ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE 282

13695 ;ML4

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

22-0ct=1980 10:45:32

?y
}ggg
13698 ;

6811

13702 ;
13703 ;

6815
6816

WRDS TSTED = ZERO;
DAT DM = ONE;

'SET DATA DIAG MODE

6818
6819

MLBA = 10_BUF;
ARR_SEL = .ARR_SEL + .ARR_INC;

'LOAD 10_BUF
'LOOK AT NEXT ARRAY

13699 ;
13700 ;
13701 ;

13704 :

13705 ;
13706 ;

13707 ;
13708 ;
13709 ;

6812
6813
6814

6817

6820
6821
6822

13710 ;

6823

13713 ;

6826

13711 ;
13712 ;

6824
6825

incr ARR_CNT from 0 to .OP_NUM_ARR do
begin
CLR_MBUS;
FND _GD NIB = ZERO;

MLWE = not 255;

MLDR = ARR_SEL;
MLCST = write;
do

'LOOK AT 9 NIBBLES

13716 ;

6829

incr CNT from 0 to 8 do

13718 ;

6831

6832
6833
6834

13722 ;

6835

13726 ;

6839

13723 ;
13724 ;
13725 ;
13727 ;

13728 ;

13729 :

13730 ;
13731 ;

13732 ;

13733 ;

6836
6837
6838
6840

then

case .CNT from 0 to 8 of
set

[0l

6847

13736 ;

6849

6848

(MLD1)<4, 4> = .ARR_CNT;
(MLD1)<B, 4> = _ARR_CNT;

(3] :

(MLD1)<12, &> = _ARR_CNT;

13737 ;

6850

(4] :

13739 :
13740 ;

6852
6853

[s) :

13738 ;

13741 ;

13742 ;

6851

6854

6855

(MLD2)<0, &> = .ARR_CNT;

(MLD2)<4, 4> = .ARR_CNT;

13743 ;

6856

(6] :

13745 ;
13746 ;

6858
6859

7] :

13748 ;

6861

13744 ;

13747 ;
13749 ;

6857

6860
6862

'SELECT AND LOAD GOOD NIBBLE WITH ARRAY CNT

21 :

6846

'FIND A GOOD NIBBLE

(MLD1)<0, 4> = .ARR_CNT;

6843
6844

6845

'COUNT WORDS TESTED

begin

1] :

13734 ;

13735 ;

if .PD_TEMP [.CNT] IS_NOT_SET

6841

6842

'LOAD DSA WITH SELECTED ARRAY AT BLOCK ZERO
'DO A WRITE FUNCTION

'GET THE PROM DATA

gg%g

13719 ;
13720 ;
13721 ;

iLOAD WORD COUNT

PD TEMP = _MLPD;

}%;}g 3

6830

'TEST ALL PRESENT ARRAYS

'THIS LOOP WRITES ARRAY NUMBERS TO THE ARRAYS

begin
DELAY (ONE_US);

WRBS_TSTED = .WRDS_TSTED + 1;

13717 ;

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

(MLD2)<B, 4> = .ARR_CNT;

(MLD2)<12, &> = .ARR_CNT;

(8] :

'NIBBLE 0
'NIBBLE 1
'NIBBLE 2

'NIBBLE 3
'INIBBLE &

'NIBBLE 5
'NIBBLE 6

'NIBBLE 7

'CZMLAAO ML=11 LOGIC T EST

MACRO M1113

HARDWARD TEST SECTION

13751

:MLG

13754
13755
13756
13757
13758
13759
13760

:
;
;
;
;
;
;

wWew

VYV

vie

"N\

}%;g

23-0CT-80 09:11

N 6
PAGE 283
SEQ 0286

22-0ct=1980 10:47:44

}%32} 3

22-0ct=1980 10:45:32
6863
6864
6865
6866
6867
6868
6869

tes;

(MLE2)<B, 4> = ARR_CNT;

FND_GD_NIB = ONE;
exitloop;
end;

gg;?

DA;_CLK = ONE;

TOPS=20 Bliss=16 v2(206)

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

'NIBBLE 8
'SET FOUND GOOD NIBBLE FLG
'EXIT THE LOOP

'CLOCK GOOD NIBBLE INTO MEMORY & GET NXT PROM WRD

}g;gz 3

gg;%

until (.FND_GD_NIB IS_SET ) or (.WRDS_TSTED eql 14);

13765
13766
13767
13768

;
;
;
;

6874
6875
6876
6877

13770
13771
13772
13773

;
;
:
;

6879
6880
6881
6882

if .WRDS_TSTED eql 14
'IF 14 WORDS TSTED
then
begin
'THEN ERROR AND EXIT TESTED
ERRDF (111, INTER, 0);
PRINTB (SEV_FMT, WRD_14, PHR_10, FNC_15, WRD_12, FNC_17, WRD_37, WRD_56);
EXIT_TST;
end;

13769 ;

13774 ;
13775 :
}%;;9 :
13778 ;

6878

ARR_SEL = ZEROES:
ARRZSEL = .ARR_SEL = .ARR_INC;

'START ARR SEL BACK ONE AGAIN

6887

incr ARR_CNT from 0 to .OP_NUM_ARR do

'TEST ALL PRESENT ARRAYS

6888
6889
6890

13784 :

6893

13785 ;
13786 ;

13787 ;
13788 ;
13789 ;

13790
13791
13792
13793
13794

;
;
;
;
:

13797
13798
13799
13800
13801
13802
13803
13804
13805

:
;
;
;
;
;
;
;
;

}%;gz 3

end;

6883
6884
2332

13779 ;
13780 ;
13781 ;

13782 :
13/83 ;

'DO UNTIL FOUND GOOD NIBBLE OR 14 WRDS TSTED

6891
6892

begin
BGNSUB;
CLR_MBUS;
FND_GD_NIB = ZERO;
DAT DM = ONE;

6894
6895

MLBA = 10_BUF;
ARk_SEL =".ARR_SEL +

6899
6900
6901
6902
6903

6896
6897
6898

2382

6906
6907
6908
6909
6910
6911
6912
6913
6914

'SET DATA DIAG MODE

1wl = not 255;

iLOAD WORD COUNT
.ARR_INC;

#.DK = .ARR_SE[;
MLCSY = read;

'LOAD DSA WITH ARRAY SELECT
‘DO A READ FUNCTION
'THIS LOOP READS ARRAYS FOR ARRAY NUMBERS

begin
DELAY (ONE_US);
PD_TEMP = "MLPD;

'GET THE PROM DATA

incr CNT from 0 to 8 do
it .PD_TEMP [.CNT)
then
=
begin
DAT_CLK = ONE;
case .CNT
set
(0l

'LOAD UBUS ADDRESS
'LOOK AT NEXT ARRAY

'LOOK AT 9 NIBBLES
IS_NOT_SET

from 0 to 8 of

'FIND THF GOOD NIBBLES WHERE ARR NUM IS STORED
'CLOCK ARRAY WORD OUT
'SELECT AND READ GOOD NIBBLE

r————

——
e
e

|
|CIMLAAO ML=11 LOGIC TEST

—————

|HARDWARD TEST SECTION
|

——

————

—

————

——

—

g 7
MACRO M1113 23-0CT-80 09:11 PAGE 284

13807 ;ML4

22-0ct=1980 10:47:44

}%283 3

22-0ct=1980 10:45:32

13810 ;
13811 ;

6915
6916

13813 ;

6918

13812 ;

13814 :

6917

6919

13815 ;

6920

13817 ;

6922

13816 ;

6921

ARR_NUM = ,(MLD1)<0, &>;

'NIBBLE 0

:
ARR_NUM = ,(MLD1)<4, &>;

'NIBBLE 1

:
ARR_NUM = ,(MLD1)<8, 4>;

‘NIBBLE 2

13818 ;

6923

(3]

13820 ;
13821 ;

6925
6926

(4]

13819 :
13822
13823
13824
13825
13826
13827
13828
13829
13830
13831
13832
13833
13834

;
;
;
;
;
;
;
;
;
;
;
;
:

13835 ;
13836 ;

6924

6927
6928
6929
6930
6931
6932
6933
6934
6935
6936
6937
6938
6939

6942
6943

13841 ;

6946

13842 ;

(s]

6940
6941

13837 ;
13838 ;
13839 ;
13840 ;

SEQ 0287

'NIBBLE 3

:
ARR_NUM = ,(MLD2)<0, &>;

'NIBBLE 4

ARR_NUM = ,(MLD2)<4, &>;

'NIBBLE §

(6]

:
ARR_NUM = ,(MLD2)<8, &>;

'NIBBLE 6

(71

:
ARR_NUM = ,(MLD2)<12, &>;

'NIBBLE 7

(8]

:
ARR_NUM = ,(MLE2)<8, &>;

'NIBBLE 8

tes;

FND_GD_NIB = ONE;
exitloop;

6944
6945

€947

ARR_NUM = ,(MLD1)<12, &>;

end;

DAT_CLK = ONE;
end

TOPS=20 Bliss=16 v2(206)

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

'SET FND GD NIB FLG
'EXIT LOOP

'CLOCK OUT NEXT PROM LOCATION

}ggzz }

ggzg

until .FND_GD_NIB IS_SET;

'REPEAT UNTIL FOUND THE GOOD NIBBLE

13845 ;

6950

if .ARR_CNT neq .ARR_NUM

'SEE IF ARRAY CONTAINS IT'S ARR NUM

13847 ;
13848 ;
13849 ;

6952
6953
6954

13851

6956

13846 ;

13850 ;

;

13852 ;
.
;
;
;

13853
13854
13855
13856
13860

6951

then

6955

6957
6958
6959
6960
6961

begin
'ERROR IF NOT THERE
ERRDF (83, ASYNC, 0);
PRINTB (FOR_FMT, WRD_39, FNC_17, WRD_37, WRD_10);

PRINTB (FMT 14, .ARRZCNT, .ARR_NUM);

end;

ENDSUB;
end;

ENDTST;

——

—

————

(CZMLAAD ML=11 LOGIC TEST

—

MACRO M1113

'HARDWARD TEST SECTION
13862

23-0CT-80 09:11

PAGE 285

SEQ 0288

:MLG

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

}gggz

13868 047614

004167

13870 047624
13871 047626

005005
166705

13873 047640
13874 047642

005003
000167

000702

13876 067654

016702

142310

13878 067664
13879 047672

142777
150277

13869 047620

162706

134240

$729:

000006

140472

13872 047632 016766 140464 000002
13875 047646

152777

13877 047660 042702
13880 047676
13881 047700
13882 047702

005016
005004
152777

13884 047716
13885 047726
13886 047730
13887 047734
13888 047742

012777
066705
010577
012777
012701

13883 047710 012777

13889 047746
13890 047750
13891 047754
13892 047756

13893

—

047762

13894 047764

001411
016702
001404
005066

005302

005301
000766

13898 050000
13899 050002
13900 050004

005204
005002
010201

13901 050006
13902 050010

177770

017767

000007
142042

142046

000010

142110

010342
140374
141774
000061
000001

141774

177400

141736

011662

13908 050030
13909 050034

012746
005046

000001

177770

13910 050036 004767 133040
13911 050042 062706 000010
005700
001155

13915 050054
13916 050056

006301
066107

010201

6%:

7%:

062701
O01u:<s
010246

13912 050046
13913 050050

2%:

48:

141662

050062

R1,$SAVES

;

6757

CLR
SUB

RS
ARR. INC,RS

: ARR.SEL
: «,ARR.SEL

6808
6809

R3
27%

ARR.CNT

SUB

#6,SP

MOV

OP.NUM.ARR,2(SP)

BISB

#40,9ML .REG+40

BIC

#177770,R2

CLR
JMP

MOV

CLR
CLR
BISB

5%:

142132

JSR

BICB
BISB

3s:

000004

13904 050014
13905 050020
13906 050022

13907 050024 042716

1%:

141772

132142

006201
006201

13903 050012 006201

13914 050052

142064

001374

13895 047766
13896 047770

13897 047772

000040

TOPS

PA:<

6812

(SP)
R&
#10,aML.REG+120

; FND.GD.NIB
: WRDS.TSTED
:

6814
6815
6816

#10.BUF ,aML.REG+20
ARR. INC.RS
RS, ML .REG+30
#61,3ML .REG
R

:
. «,ARR.SEL
: ARR.SEL,*
:
L ox,$8TMP2

6818
6819
6820
6821
6825

#7,3ML.REG+40
R2,aML.REG+40

#-400,3ML .REG+10

BEQ
MOV
BEQ
CLR

6%
LSDLY,R2
5%
4(SP)

DEC

BNE

MOV

ML .REG+230,PD. TEMP

ASR
ASR

R1
R

DEC
BR

INC
CLR
MOV

ASR

ADD
MOV
MOV

BIC

MOV
CLR

JSR

6817

; v, $8TMP1
: $STMP
: $STMPI

: $STMP2

R4
R2
R2,R1

; WRDS.TSTED
: CNT
: CNT,*

;

6826

6827
6829
6831

#PD.TEMP,R1
R1,=(SP)
R2.=(SP)

177770, (sP)

: CNT,®

#,-(5P)
-($P)

PC,BLSGT2

n0,sp

MOV

R2,R1

ASL
ADD

R1
38

ADD

ST
BNE

4811

ML.DUT,R2

MOV

MOV
ADD
MOV
MOV
MOV

RO
238

R
88 (R1),PC

: CNT,®

6835

CZMLAAD ML=11 LOGIC TEST

'WARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

13918

MLG

1?921 050062 000022

8%:

.WORD

9%-8%

9%:

MOV

R3,R1

}sggg

13922
13923
13924
13925
13926
13927
13928
13929

050064
050066
050070
050072
050074
050076
050100
050102
13930 050104

000040
000072
000112
000146
000164
000216
000236
000272

13931 050106

13932 050112
13933 050120
13934 050122
13935 050124
13936 050126
13937 050130
13938 050132
13939 050134
13940 050140
13941 050146

042701

142777
000412
010301
006301
006301
006301
006301
042701
142777
150177

13942 050152
13943 050154
13944 050156

13945 050160
13946 050164
13947 050172

13948 050174

13949 050176
13950 050200
13951 050202
13952 050204
13953 050206
13954 050210

13955 050214

13956 050222

13957 050226
13958 050230

010301

000511
010301
000301

042701
042777
000413

177417
000360
141716

141722

170377
007400

141676

138:

141642

000463
010301

006301
006301
006301
006301
042701

170000

177760

000017

141646

13970 050276 000437
010301

000301

148:

158:
141634

010301

142777
150177

11$:

128:

050177

13963 050250
13964 050252
13965 050254
13966 050256
13967 050260

13972 050302

141750

108:

007777

042777

142777
000412

13971 050300

000017

000301
006301
006301
006301
006301
042701

13959 050232 042701

13968 050264
13969 050272

177760

010301

13960 050236
13961 050244

13962 050246

168:

177417
000360
141602

141606

PAGE 286

7
SEQ 0289

22-0ct=1980 10:47:44

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

BIC

BICB
BR
MOV
ASL
ASL
ASL
ASL
BIC
BICB
BISB

BR
MOV
SWAB

10%-8%
12%-8%
138-8%
158-8%
16$-8%
18%-8%
19%-8%
218-8%

6839

: ARR.CNT,+

6842

22%
R3,R1
R1

;
* ARR.CNT,+

6835
6845

R3,R1

: ARR.CNT,*

6848

;
: ARR.CNT,+

6835
6851

: ARR.CNT,+

6854

;

6835

#17,3ML.REG+170
1%
R3,R1
R
R1
R1
R1
$177617,R1
#360,aML.REG+170
R1,aML.REG+170

#170377,R1
#7400,3ML .REG+170
14%

SWAB
ASL
ASL
ASL
ASL
BIC

R1
R1
R1
R1
R1
#7777.R1

BIC

BIS

BR
MOV

BIC

BICB
BR

MOV
ASL
ASL
ASL
ASL
BIC

178:

BICB
BISB

188:

MOV

SWAB

PA:<

; ARR.CNT,+

#177760,R1

BIC
BIC
BR

MOV

22-0ct-1980 10:45:32

TOPS

#170000,aML .REG+170
R1,aML.REG+170

22%
R3,R1

#177760,R1

#17,3ML.REG+200
178

R3.R1

R
R
R1
R1
$177617,01

#360,3M .REG+200
R1,aML.REG+200

22%

R3,R1
R1

ARR.CNT,*

6857

|
'CIMLAAD ML=-11 LOGIC TEST
'HARDWARD TEST SECTION
{

MACRO M1113

13974

23-0CT-80 09:11

E 7
PAGE 287

SEQ 0290

JMLG

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

}%g;g

13977 050204
13978 050310
13979 050318

042701
042777
000413

13981
13982
13983
13984
13985

000301
006301
006301
006301
006301

13980 050320

050322
050324
050326
050330
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
14000 050414

14001 050420
14002 050426

042701
042777
050177

000411
010301

000301
042701
042777
050177

012716
000406
005202

020227
003002
000167

152777
021627

001405
020427
001402
000167

14008 050452

001035

14009 050454

020427

000157

14013 050464

012746

14014 050470
14015 050474
14016 050500
14017 050504
14018 050510
14019 050514
14020 050520
14021 050524
14022 050530
14023 050532
14024 050534

14025 050536
14026 050542
14927 050546

14028 050550

19%:

007777
170000
141526

141532

20%:

21%:
170377
007400
141462

141466

000001

22%:
23%:

000010
177364

000020
000001

141372

24§:

177274

000016

007622
000000

012746
012746
012746
012746
012746
012746
012746
012746
010600
104414
104463

062706
000167
005203

020366

BIC
BIC
BR

#170377,R1
#7400,aML.REG+200
20%

SWAB
ASL
ASL
ASL
ASL

R1
R1
R1
R1
R1

Mov

BIC
BIC
BIS

BR
Mov

25%:

000022
000562
000002

27%:

22%
R3,R1

:
; ARR.CNT,*

6835
6863

#1,(SP)
24%
R2

; *,FND.GD.NIB
:
; CNT

6866
6867
6829

#20,3ML .REG+120
(SP), M

:
; FND.GD.NIB,*

6870
6872

#7777,%1
#170000,aML .REG+200
R1,3ML.REG+200

R2,#10
24%
7%

B1SB
CMP
CMP
BEQ
JMP

25%
R4, #16
25%
2%

BNE

26%

(MP

6874

6877

6878

157

MOV
MoV
MOV
MOV
MoV
MOV
MOV
MOV
MCV
TRAP
TRAP

#WRD.37,-(SP)
#FNC.17,-(SP)
#WRD.12,-(SP)
#FNC.15,-(SP)
#PHR.10,~-(SP)
#WRD.14,-(SP)
#SEV.FMT ,-(SP)
#GC,-(SP)
SP,RO
14
63

CMP

: WRDS.TSTED,*

; WRDS.TSTED,*

INTER
0

ADD
JMP
INC

: CNT,»

R4, #16

.WORD
LWORD

MoV

26%:

6860

CMP
BGT
JMP

MOV
BR
INC

.WORD

006232
007206
005760
007162
006740
005774
005452
000010

; ARR,.CNT,+

R1
#170377,R1
#7400,aML.REG+160
R1,3ML.REG+160

TRAP

006454

R3,R1

SWAB
BIC
BIC
BIS

BEQ

000016

104455

14010 050456

14011 050460
14012 050462

141562

010301

14003 050432
14004 050434
14005 050440
14006 050442

14007 050446

170377
007400

TOPS

PA:<

#WRD.56,-(SP)

#22,5P
56%
R3

R3,2(SP)

: SP,e

$
:
; ARR.CNT

: ARR.CNT,*

6874
6876
6811

CIZMLAAOD ML-11 LOGI C TEST
SECT ION

E
7
PAGE 288

SEQ 0291

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

000516

161106

000071
000001

29%:

31s:

000004

32%:

33%:
161174

140724

34%:

35%:

011662

ARR.CNT

TRAP

BISB

MOV
MOV
ADD
MOV
MOV
MOV

BEQ

BEQ
CLR
DEC
BNE
DEC
BR
MOV

CLR
MOV
ASR
ASR
ASR

BIC
MOV
CLR
JSR

132104

000010

ADD
TST

BNE
Bl1SB

141004

36%:

OP.NUM.ARR,2(SP)
355

MOV
ASL
ADD

.WORD
.WORD
.WCRD

TOPS
PA:<

6884
6885
6887
6888
6889

#40,aML
. REG+40

ML.DUT,R2

#177770,Rr2

#7,3ML.REG*40
R2.IML.REG+40
(SP)
#10,aML.REG+120

#-400,3ML.REG+10

#10.BUF
,aML .REG+20
ARR.
INC
RS
RS,aML.REG*30
#71,aML.REG
#,R1

FND.GD.NIB

* ARR,SEL
ARR.SEL,*

«,$8TMP2

6891
6892
6893
6894

6895
6896
6897
6901

*,$$TMPI

MOV

ADD

000001

051024

JMP

MOV
MOV

177770

000020

CLR

BIC
BICB
BISB
CLR
BISB

141000

131204

ARR.SEL
« ,ARR.SEL

MOV

177400
010342
137436
141036

OO —

000010

141102

SuB

RS
ARR. INC,RS

Mov

000007

177770

1641124

016702
042702

000040
141350

152777

CLR

000002

28%

JMP

137534
137526

28%:

BGT

TETECETE

177064

003002

14060 050724

14061 050726
14062 050730
14063 050736
14064 050740
14065 050742
14066 050744
14067 050746
14068 050750
14069 050754
14070 050756
14071 050760
14072 050764
14073 050770
14074 050772
14075 050776
14076 051002
14077 051004
14078 051006
14079 051014
14080 051016
14081 051020
14082 051024
14083 051026
14084 051030

23-0CT-80 09:11

JMLG

—

14030
14031
14032
14033 050554
14034 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
14052 050672
14053 050700
14054 050704
14055 050706
14056 050712
14057 050714
14058 050720
14059 050722

HARDWARD TEST

MACRO M1113

$$TMP
$$TMPT

ggL.REG0230.PD.TEHP

$$TMP2

R2,R1

CNT
CNT,»

#PD.TEMP
,R1
R1,=-(SP)
R2.=-(SP)

CNT ,»

R1
R1
R1

#177770, (SP)

6902
6904
6906

#,-(5P)
-($P)

PC,BLSGT2

n0,sp

50%

#20,aML.REG+120
R%.R1
R

368(R1) ,PC
379-36%
38%-36%
39%-36%

©(NT,+

6909
6911

CIMLAAD ML=17 LOGIC 1 E>7

MACRO M1113

HARDWARD TEST SECTION

14086
}:gg;
14089
14090
14091
14092
14093
14094

23-0CT-80 09:11

R ¥
PAGE 289

SEQ 0292

JMLG
3
051032
051034
051036
051040
051042
051044

000044
000052
000060
000076
000104
000122

14096 051052

000440

14098 051060

000413

14095 051046

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

40%-36%
418-36%
42%-36%
448-36%
458-36%
47%-36%

49%

117703

141016

378:

MOVB

117703

141010

388:

MOVB

14099 051062

017703

141002

398:

MOV

164101 051070

017703

140774

408:

117703

140776

41$:

117703

140770

42%:

017703

140752

44$:

017703

140744

458:

14119 051146 017703

140706

47%:

14122 051160
14123 051164
14124 051166

000001

14097 0510564

14100 051066

000431

14102 051074 000417

14103 051076
14104 051102

000424

14106 051110
14107 051112
14108 051114
14109 051116
14110 051120

006203
006203
006203
006203
000415

14112 051126

000411

14105 0511064

164111 051122

14113 051130
14114 051134
14115 051136
14116 051140
14117 051142
14118 051144

006203
006203
006203
006203
000492

14120 051152
14121 051154

000303
042703

14125 051170

020227

000010

152777
021627

000020
000001

14126 051174

14127 051176
14128 051204

14129 051210

14130 051212

14131 051214

012716
000404
005202

003661

001233

43%:

46%:

48%:
49%:

177760

020403

508 :

140614

S1%$:

@ML.REG+170,R3

: *,ARR.NUM

6915

@ML.REG*170,R3

: *,ARR.NUM

6918

aML.REG+170,R3

: «,ARR.NUM

6921

aML.REG+170,R3

: «,ARR.NUM

6924

aML.REG+200,R3

; *,ARR.NUM

6927

@aML.REG+200,R3

: *,ARR.NUM

6930

aML.REG+200,R3

: =,ARR.NUM

6933

MOV

aML .REG+200,R3

: +,ARR.NUM

6936

MOV

aML.REG*+160,R3

: *,ARR.NUM

6939

#,(SP)
51%
R2

: «.FND.GD.NIB
:
: CNT

6942
6943
6904

BR
BR

MOV

B8R

MOVB
BR

MOVB
ASR
ASR
ASR
ASR
BR

MOV
BR

ASR
ASR
ASR
ASR
BR

SWAB
BIC

MOV
BR
INC

CMP

BLE

49%

R3
R3
R3
R3
49%
48%

R3
R3
R3
R3
48%

R3
#177760,R3

R2,#10

35§

: ARR.NUM
: *,ARR.NUM

: CNT,*

: ARR.CNT,ARR.NUM

6950

TRAP

;

6953

WORD

ASYNC
O

6954

000000

.WORD

308

52%

123

14136 051226

012746

005740

MOV

#WRD.10,-(SP)

14140 051246

012746
012746

006250
005400

MOV
MOV

#WRD .39, -(SP)
#FOR.FMT,=-(SP)

006232
007206

ARR.NUM
ARK.NUM
ARR.NUM
ARR.NUM

R4 ,R3

14135 051224

012746
012746

*
:
*
.

ARR.NUM
ARR.NUM
ARR.NUM
ARR.NUM

CMP

BNE

.WORD

14137 051232
14138 051236
164139 051242

.
:
.
:

6946
6948

000123
007444

46%

;
. FND.GD.NIB,*

14133 051220

14134 051222

48$

#20,3aML.REG+120
(SP),#1

BEQ

104455

438

BISB
CMP

001434

14132 051216

TOPS
PA:<

MOV
MOV

#URD.37,-(SP)
#ENC.17.-(5P)

CIZMLAAD ML-11

MACRO M1113

0G IC T ES
EC TION

HARDWARD TEST

23-0CT-80 09:11

H
7
PAGE 290

SEQ 0293
22-0ct=1980
22-0ct=1980

ATV
AW

i
e

062706

104467

103002

W
N
o

—

W
o

—d

000022

000167
005204
020466
003772
062706
000207

52%:

000002

53%:
54%:
55%:

000006

56%:

177264

MOV
MOV
TRAP
MOV
MOV
MoV
MOV
MOV
TRAP
ADD

#5,-(SP)

ROR

TRAP

BHIS
JMP
INC
CMP
BLE
ADD
RTS

; Routine Size:

~NoOo

D
d

005046
000003

006000
W
N

[elelelelelelelalelel=]

104414

162 051330
163 051334

ol
o o oo

PN -

000005

104414

010316
010446
012746
012746
010600

b e
iy -

OV
O 0o

i
e

v VI

i
i
D
i
D

— D

[=1=]

D
i

D d

P o o

D d

d
D

O o o o

012746
010600

d e

W =0V~

(W IV IV IV IV IV V.V P 2%
20 =

h e

JMLS

Maximum stack

SP,RO

14
R3, (SP)

R& ,=-(SP)
FEMT
14 ,-(SP)

#3,-(SP)

SP,RO

SP"

;
;

+«
ARR.NUM,
ARR.CNT,+

SP,'

14
#22,SP

T0PS
PA:<

6955

6952
6956

54%
29%

;
;

R4 ,2(SP)

53%

ARR.CNT
ARR.CNT,+

6887

6757

#6,SP
PC

425 words

depth per inyocation:

18 words

14172

14176

14180
14181
14182
14183
14184
14185

051336
051336
051342
051344
051346
051350

14186
14187
14188
14193
14194
14195 ;

004767

104466

176252

006000
103773
000207

129::
1%:

JSR
TRAP
ROR

BLO
‘RTS

; Routine Size:
6 words
; Maximum stack depth per

6962

'<BLF/PAGE>

6959

PC,$729
66
RO
1%
:
.
invocation:

0 words

'CIMLAAD ML-11 LOG 1 C TEST

MACRO M1113

'HARDWARD TEST SEC T ION

23-0CT-80 09:11

PON) =

b d d

=S OV NOWVESWND

14200
14201
146202
14203
16204
146205
146206

;
;
;
;
;
;
;

.
.

.
k

44
|
:

;

.
.
.
.
L

.
o
.
.

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

BGNTST:

SEQ 0294

;

2=0ct=1980 10:47: L4
2=0ct=1980 10:45: 32

16197 H
14198 ;

14199

PAGE 291

TEST NUMBE R:

TST 30

TEST NAME:

SEQUENCER EXISTENCE TEST

TEST DESCRIPTION:
TEST

SEQUENCER TIMING AND CONTROL

LOGI C FOR EXISTENCE BY:
.

;

:
!
;

FIRST WRITING THE GOOD BLOCK VIA DAT_DM MODE WITH A BACKGROUND

PATTERN OF

ONES.

VIA A MBUS WRITE FUNCTION WRITE ONES INTO THE GOOD BLOCK.
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 CHANGED
BY THE MBUS WIRTE.

;

REPORT A FATAL ERROR AND DROP THIS UNIT IF THE NIBBLES TESTED EQUALS
THE COUNT OF UNCHANGED NIBBLES.

N
.
.
.
L4

.
.
.
L4

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 IS STORED AND ACCESSED FROM.
10_BUF:

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE FUNCTIONS

ARE

FOUND.

.
.

.
.
L)
’

.
.

.
k2
.
.
L4

local

BG_PAT,

'BACK GROUND PATTERN

NIB_TSTED,
ALLBAD,
RESOLT;

'NIBBLES TESTED
'ALL NIBBLES ARE BAD
'RESULTS OF XOR

SUR_BAD,

CLR_MBUS;

BG PAT = ONES;
MLB1 = .BG_PAT;
MLD2 = .BG_PAT;
MLE2 = .BG_PAT;

'SUM NIBBLE ARE BAD

'BACKGROUND EQL ONES
'LOAD DATA DIAG REG WITH BG PAT

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

14253 ;MLG

MACRO M1113

23-0CT-80 09:11

4 7
PAGE 292

;

}2%2@ s

SEQ 0295

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

TOPS=20 Bliss=16 v2(206)

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

14256 ;
|
14257 ;

7015
7016

DAT_DM_XFER ();
MLCSY = write;

ISET UP A DATA DIAG XFERR AT THE GOOD BLOCK
'DO A WRITE FUNCTION

16259 ;

7018

incr WD_CNT from 0 to 127 do

'WRITE BLOCK WITH BG PAT

14258 ;

14260 ;
14261 ;

14262 ;

14263 ;
146264 ;
14265 ;

14266
14267
14268
14269

;
;
;
;

14271

;

14270 ;

16272
14273
146274
14275
14276
16277
14278
14279

;
;
;
;
;
;
:
;

14280 ;
14281 ;
14282 ;
14283 ;

14284 ;

14285 ;

14286 ;

14287 ;
14288 ;

14289 ;

14290 ;

14291 ;

14292 :

14293 ;

14294 ;
14295 ;

7017

7019
7020

7021

7022
7023
7024

14307 ;

end;

CLR_MBUS;

10 BUF = ZEROES;
BAT = ONE;

MLEST = write;

'LOAD FIRST WORD OF 10_BUF
IMAKE XFERR SET ON ONE "ADRS
'SET UP A GOOD BLOCK XFERR
'DO A WRITE FUNCTION

7030

‘DELAY UNTIL XFER TO COMPLETE

7029

7031
7032
7033
7034
7035
7036
7037
7038

7039
7040
7041
7042

7043
7044

7045

7046
7047

7048

7049

7050
7051

7052

7053
7054

GD_BLK_XFER ();

0
wuntil .DRY IS_SET;

BGNSUB;
CLR_MBUS;
ALL_BAD = ZEROES:
SUM_BAD = ZEROES;
NIB_TSTED = ZEROES;

DAT DM_XFER ();
MLCS1 = read;

'SET UP SAME DATA DIAG XFERR
'DO A READ FUNCTION

incr WD_CNT from 0 to 112 do

'READ 713 LONG WORDS

DELAY (ONE_US):
begin

PD TEMP = .MLPD;

'GET PROM DATA

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

it .PD_TEMF [.NIB_PTR] eql ZERO

then

begin

'CLOCK OUT THE DATA WORD

'F IND GOOD NIBBLE

7055

NIB_TSTED = .NIB_TSTED + 1;

' INCREMENT COUNT OF NIBBLES TESTED

;8%3

i; LRESULT<0, &> eql ZERO

'SEE IF ALL BITS IN NIBBLE WERE BAD?

7060
14304
14305

DAT_CLK = ONE;

7025
7026
7027
7028

7056

14303

begin
DELAY (ONE _US);

7061

XORLNG_WRD (.NIB_PTR, .BG_PAT, RESULT);
then

else

'INCREMENT COUNT [F ALL BAD

if .RESULT<0, 4> neq X0'17' then SUM_BAD = .SUM_BAD + 1;

7063
7065
7066

ALL_BAD = .ALL_BAD + 1

'XOR NIBBLE WITH BG PAT

end;

'SEE IF SOME BITS IN NIBBLE WERE BAD
'INCREMENT COUNT IF SOME BAD

'CIMLAAD ML-11 L OGIC TEST

MACRO M1113

\HARDWARD TEST S ECTION

23-0CT-80 09:11

K 7
PAGE 293

14309 ;MLG

SEQ 0296

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

ENDSUB;

DOCLN;
end

DODU (.ML_LON);

else

.SUM_BAD gtr ZERO

then
T T

—

'WHERE ALL NIBBLES XFERR'ED ALL BAD?
iERROR IF ALL BAD

begin
ERRDF (B4, SYNC, 0);
PRINTB (SEV_FMT, WRD_22, PHR_&, WRD_9, WRD_12, WRD_23, FNC_S5, WRD_19);

i;
F
W

.ALL_BAD

it .NIB_TSTED eql
then

—

FoR P

TR LRPR LR

oF oF o

R TN

310 ;

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

'SEE

SEE NIBBLE WERE BAD?

begin

'SOME BAD IS OK SO GIVE INTERMEDIATE ERROR
0);
INTER,
ERRDF (85,
Pngurs (SIX_FMT, "PHR 4, WRD_9, WRD_12, WRD_23, FNC_S, WRD_19);

(==

endg,

344 051362

7089

ENDTST;

004167
162706
152777
016705
042705
1462777
150577
012766

132502

012777

6
14355 051454
14356 051456
14357 051462
14358 051464
14359 051470
14360 051472
14361 051476
14362 051500

000010

JSR

R1,$SAVES

;

6961

;

7008

SUB

#0,sp

000040
140574

140350

BISB
MOV

#40,aML.REG+40
ML.DUT,RS

000007

140332

BICB

#7,3ML.REG+40

177770

140326
177777
177777

000002
000002

141160

000061

000001
130426

000006
001374

$730:

BIC

000002
140442

BISB
MOV
MOV

140224

MOV

140444
140416

MOV
MOV
JSR

1%:

28:

3$:

CLR

MOV
BEQ
MOV
BEQ
CLR
DEC
BNE

#177770,R5

RS,aML.REG+40
#-1,2(SP)
#-1,3ML.REG+170

;
;

PC,DAT.DM.XFER

;

2(SP) ,aML.REG+200
2(SP) ,aML.REG+160

#61,3ML.REG
RO

#1.R1
5%
LSDLY,R2
4%
6(SP)
R2
{1

*,BG.PAT

: BG.PAT,*
. BG.PAT.*

;

: WD.CNT

Cox,$8TMP?
;

o, $8TMPI

: $STMP
: $$TMP1

7011
7012
7013
7014
7015
7016
7018
7020

——

———

'CZMLAAO ML=11 LOGIC Ic

1 TEST

MACRO M1113

HARDWARD TEST SECTION

14364

005301
000766
152777

14371 051516
14372 051522

020027
003755

000177

14374 051532

016705

140432

14376 051542
14377 051550

142777
150577

005200

48:

000020

152777

000040

14375 051536 042705

177770

14378 051554
14379 051560
14380 051566
14381 051572

005067
152777
004767
012777

14383 053604
14384 051606

100375
104402

000007
140164

136562
000010
140750
000061

14382 051600 105777 140144

14385 051610

152777

000040

14386 051616 016703 140346

14387 051622

042703

14390 051640
14391 051642
14392 051644
14393 051646
14394 051652
14395 051660

005004
005016
005005
004767
012777
012701

14388 051626
14389 051634

14396 051664
14397 051666
14398 051672
14399 051674
14400 051700
14401 051702
14402 051704

14403 051706

14404 051710
14405 051712
14406 051720
14407 051726
14408 051732

142777
150377

001411
016702
001404
005066
005302
001374
005301

177770

000007
140100

140754
000071
000001

140304

14411 051742
14412 051746
14413 051750
14414 051752
14415 051754
14416 051756

14417 051764
14418 051772

SEQ 0297

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

22-0ct=1980 10:45:32

140122

001411

001404

005066
005302
001374
005301

000766
017767

017767
017767

6% :
7%:

11$:
128:
13$:

148:

15¢:
140106
140110
140062

135730
135724
135720

TSTB

BPL
TRAP

BISB

BICB
BISB

9% :

000006

CLR
BISB
JSR
MOV

BIC

8$:

137742
140072

: WD.CNT,*

MOV

108:

140212
000020
000001

RO,#177
1%

BICB
BISB

140020

000006

(MP
BLE

INC

BIC

140104

130224

: $$TMP2

BISB

R
2%
#20,3ML.REG+120

MOV

140152
140100

DEC

BISB

140170

000766

005003
017767
152777
012701

S%:

140206

14409 051734 016702 130156
14410 051740

L 7

PAGE 294

MLG

14367 051502
14368 051504
14369 051506

14373 051524

;

}23322

14370 051514

23-0CT-80 09:11

16%:

CLR
CLR
CLR
JSR
MOV
MOV
BEQ
MOV
BEG
CLR

#40,aML.REG+40
ML.DUT,RS

;

* WD.CNT

;
:
:
:

7025
7026
7027
7028

;

7034

: ALL.BAD
: SUM.BAD
NIB.TSTED
:
:
: o« $8TMP2

7036
7037
7038
7039
7040
7041

$177770.R5

#7,aML.REG+40
RS.,aML.REG+40

10.BUF
#10,aML.REG+40
PC,GD.BLK.XFER
#61,aML .REG

aML.REG+50
6%
2

#40,aML.REG+40

ML.DUT,R3

#7,aML.REG+40
R3,aML.REG+40

R4
(SP)
RS
. DAT.DM.XFER
#71,aML .REG
#1,R1

R3
ML .REG+230,PD. TEMP
#20,aML.REG+120
#,R1

: WD.CNT
:
:
P e, $8TMP?

MOV

LSDLY,R2

; +,38TMPI

CLR
DEC

: $STMP
: $$TMP

DEC

6(SP)
R2
148
R

MOV
MOV

aML .REG+200.D2.
TEMP
ML .REG+160.E2.
TEMP

BNE

BR
MOV

7032

#177770.R3

CLR
MOV
BISB
MOV
BEQ

7018
7022

DEC
BNE
DEC

BEQ

7021

;

1%
LSDLY,R2
108
6(SP)
R2
9%
R

TOPS

PA:<

16%
15%

138
ML .REG+170,D1.TEMP

; +,$8TMPI
; $STMP
: $STMP

; $STMP2

: $STMP2

7043
7045
7046
7047

|CZMLAAD ML-11

LOGI E TEST

14420
005001
010102

14426 052006

006202

17¢:

006202

006202
062702
010246
010146

042716

177770

012746
005046
004767

14436 052044
14437 052046

005700
001027

14440 052054
14441 052060
14442 052064

016646
012746
060616

000004
000012

016602

000012

16444 052072

14445 052076
14446 052102

14447 052104
14448 052106
14449 052110
14450 052114
16451 052116

14452 052122
14453 052126

14454 052130
14455 052134

14456 052136

14457 052140
14458 052144

14459 052146

005205
010146

004767

042702
001002

005204
000405
020227
001402
005266

000001

062706
005201

020127
003722

000010

020327
003662

000160

005203

104467

ST
BNE

INC
MOV
MOV

MOV
ADD
JSR

MOV

177760

000006

ASR

ADD

141262

000006

R
R1,R2

MOV
CLR
JSR

131042

000017

CLR
MOV

INC

CMP
BLE

000124

MORD

CMP

007500

14468 052170

012746

000000

TRAP

WORD

012746
012746
012746

005760
005726
006630

14474 052220 012746 006062

PC.XOR.LNG.WRD

MOV
MOV
MOV

MOV

7050
7052

: NIB.PIR,*

: NIB.TSTED
. NIB.PTR,+

7055
7056

; BG.PAT,+

: RESULT,*

12(SP) .R2

: RESULT,*

7058

R4
198
R2,M7

; ALL.BAD
:
:

7060
7058
7063

#6,SP
R1

: SUM.BAD

:
: NIB.PTR

7054
7050

: WD.CNT

7043

;

7068

R3,#160
12$
RO
7

: NIB.PTR,*

: WD.CNT,*

RS, R4

: NIB.TSTED,ALE-.BAD

7072

;

7075

21%

124

SYNC

#FNC.S,-(SP)

MOV

14471 052206
14472 052210
14473 052214

L(SP) ,=-(SP)
#12,-(SP)
SP, (SP)

MOV

14470 052200 012746 006076

007020

RS
R1,=(SP)

MOV

012746

RO
20$

WORD

006040

14469 052174

; NIB.PTR
. NIB.PTR,*

TOPS

PA: <

n0._sp

R1,#10
17$

ADD
INC

BNE

14467 052166

SEQ 0298

#,-(SP)
-($P)
PC,BLSGT2

CMP
BLE

198:
208:

001037

14466 052164

147770, (sp)

19§
6(SP)

14463 052156

104455

RZ
#PD.TEMP,R2
R2,=(SP)
R1.=(SP)

BEQ
INC

188:

INC
BR
CMP

TRAP

020504

#177760,R2
18%

ROR
BLO

14465 052162

ity

M7
PAGE 295

BIC
BNE

006000
103615

14464 052160

22-0ct=1980 10:47:44

14460 052150
14461 052152

14462 052154

22-0ct=1980 10:45:32

BIC

14435 052040 062706 000010

14443 052066

23-0CT-80 09:11

ASR
ADD
MOV
MOV

011662

14432 052026
14433 052032
16434 052034

14438 052050
14439 052052

JMLG

14423 052000
14424 052002

14431 052022

}2253

14427 052010
14428 052012
14429 052016
14430 052020

MACRO M1113

HARDWARD TEST SECTION

14425 052004

#WRD.19,-(SP)

#urD.2%,-(sP)
#URD.12,-(SP)
#WRD.9,
= (SP)
#PHR .4 = (SP)

#WRD.24,-(SP)

;

7076

|
|

'CZMLAAD ML-11 LOGIC T EST

MACRO M1113

HARDWARD TEST SECTION

14476

012746
012746
010600
104414
016700
104451
104444
062706
000432
005716
003430
104455
000125
007622
000000
012746
012746

14497 052306
14498 052312
14499 052316
14500 052322
14501 052326
14502 052332
14503 05%334
14504 052336
14505 052342
}:?89 052346

012746
012746
012746
012746
012746
010600
104414
062706
062706
000207

14496 052302

14530
14531

SEQ 0299

22-0ct=1980 10:47:44

14479 052224
14480 052230
14481 052234
14482 052236
14483 052240
14484 052244
14485 052246
14486 052250
14487 052254
14488 052256
14489 052260
14490 052262
14491 052264
14492 052266
14493 052270
14494 052272
14495 052276

14508
14509
14514
14515
14519
14523
14524
14525
14526
14527
}2253

PAGE 296

sMLG

}22;:

'
l
;
‘

23-0CT-80 09:11

012746

005452
000010
137722

000022
21%:

006040
007020

006076

MOV
MOV
MOV
TRAP
MOV
TRAP
TRAP
ADD
BR
TST
BLE
TRAP
.WORD
.WORD
.WORD
MOV
MOV

#SEV.FMT,=(SP)
#10,-(SP)
SP,RO
14
ML.LUN,RO
51
44
#22,5P
22%
(SP)
22%
55
125
INTER
O
#URD.19,~-(SP)
#FNC.5,=(SP)

MOV
[ (]
MOV
MOV
MOV
MOV
TRAP
ADD
ADD
RTS

#WURD.12,-(SP)
#WRD.9,-(SP)
#PHR.4 ,-(SP)
#SIX.FMT,=-(SP)
#7,-(SP)
SP,RO
14
#20,SP
#10,SP
PC

MOV

005760
005726
006630
005432
000007
000020
000010

22-0ct=1980 10:45:32

22%:

052354
052356
052360

052362

004767
104466
006000
103773
000207

176776

130::
1%:

JMLG
3

JSR
TRAP
ROR
BLO
RTS

PA:<

SP,

7077

3
3
;

7074
7072
7082

SUM.BAD

7085

7086

#URD.2%,-(SP)

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

052350
052350

TOPS

PC,$T730
66
RO
1%
PC

;

SP,»

3
3

7084
6961

7087

19 words

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

TOPS
PA:<

e
e

'CIMLAAD ML-11 LOGIC TEST

MACRO M1113

|HARDWARD TEST SECTION
!

23-0CT-80 09:11

PAGE 297

8
SEQ 0300

22-0ct-198 0 10:47: Lh
22-0ct=-198 0 10:45: 32
]

BGNTST;
TST 31

! TEST NUMBER:

SYNC DATA BUS CONTINUITY TEST (WRITE PATH)

TEST NAME:

TEST DESCRIPTION:

TEST THE CONTINUITY OF

THE

S
e

VIA MBUS WRITE FUNCTION
WRITE A ZEROES PATTERN INTO
THE GOOD BLOCK.

.
.

BACKGROOUND PATTERN OF ONES
INTO THE GOOD BLOCK.

e
S
= S
.
0
-

VIA DAT DM MODE WRITE A

VIA DAT_DM MODE READ GOOD
NIBBLES IN THE GOOD BLOCK FOR
ZEROES.

REPEAT WITH COMPLIMENT

DATA AND BACKGROUND PATTERNS.

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

A VECTOR OF 256 WORDS WHERE
DATA FOR MBUS READS AND WRITE
FUNCTION ARE FOUND.

. -

7127

e Ry

—

~N~NNN

D —D

NNNNNNNNNNNNYY

o e
b e cd
RN PONIN) =D ed e
NO NS WN=O
oVEs
W NN=O 0

SYNCHRONOUS MODULE WRITE PATH
DATA BUS BY:

A GLOBAL OWN LOCATION TO
THIS TEST.

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

CIMLAAD ML-11 L0 6 l C TEST
'HARDWARD TEST
SE C T ION
14593 JMLG
14594
14595
L O

(

PAGE 298

8
SEQ 0301
TOPS=20 Bliss=16 v2(206)

1980 10:47:44

PA:<NEALE>BLZML 4.BLI.2 (%

22-0ct=1980 10:45:32
local
DODU _FLG,
BG _PAT,

'DROP UNIT FLAG
!BACKGROUND PATTERN
'RESULTS FROM XOR
'TEST PATTERN

RESULT,

TST_PAT;

L R T

R I

23-0CT-80 09:11

DODU_FLG = ZERO;

BG_PKT = ZEROES;

'BG PAT EQL 0'S
'TST PAT EQL 1'S

TST_PAT = ONES;

incr TWICE from 0 to 1
begin
BGNSUB;
CLR_MBUS;

moY
BG PAT;
BG PAT;
MLD2
MLE2 = .BG PAT;

DAT_DM_ XFER O:

'REPEAT LOOP TWICE

'.OAD DATA DIAG REG WITH BG PAT

MLCST = write;

'SET UP A DATA DIAG XFERR AT
‘DO A WRITE FUNCTION

incr WD_CNT from 0 to 127 do

!LOAD BLOCK WITH BG PAT

THE GOOD BLK

A
A
PRL ETR T TR T R R R
DT T T
P PR PR
e e
e

14598
14599

14597

14596

I E T E

TRTR IR TR

[}

MACRO M1113

begin

DELAY

(ONE _US);

DAT_CLK = ONE;
end;

CLR_MBUS;
BAl = ONE
I0_BUF = ,TST_PAT;

GD_BLK_ XFER (7;
MLES1= write;
do

10 BUF

ADRS

'FIRST 10_BUF WORD EQL'S TST_PAT
'SET UP A"GOOD BLOCK XFERR
'DO A WRITE FUNCTION

'DELAY UNTIL XFER TO COMPLETE

until

'SET ON FIRST

.DRY IS_SET;

CLR_MBUS;

DAT DH XFER {);
MLCS1
= read;

!SET UP A DATA DIAG XFERR AT SAME BLOCK
‘D0 A READ FUNCTION

incr WD_CNT from 0 to 112 do
begin

'READ 113 LONG WORDS

DELAY (ONE US)

PD_TEMP

.MLPD;

DAY CLK
ONE
DELAY (ONE_US);
RD_LNG_ WRD;

incr NIB_PTR from 0 to 8 do

.PD_TEMP [.NIB_PTR] IS_NOT_SET

then

'GET THE PROM DATA
'CLOCK QUT THE DATA WORD
'READ THE DATA WORD

'LOOK AT 9 NIBBLES
'FIND GOOD NIBBLES

CIMLAAD ML-11 LOGIC T EST
'HARDWARD TEST SECTION
J
i

MACRO M1113

begin
XOR_LNG_WRD (.NIB_PTR,

14652

14653

14654
14655
14656
14657
14658
14659
14660
14661
14662

SEQ 0302

'SEE

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

'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, FNC_5);

PRINTB (FMTTS, .TST_PAT, _RESULT,

DODU_FLG = ONE;

.NIB_PTR);

end

14664
14665
14666

14701
14702 052436

.TST_PAT, RESULT);

LRESULT<0, 4> neq ZERD

then

14663

14699 052420

PAGE 299

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

14649 ;MLG
14650 ;
14651

14667
14668
14669
14670
14671
14672
14673
14674
14675
14676
14677
14678
14679
14680
14681
14682
14686
14690 052364
14691 052370
14692 052372
14693 052374
14694 052376
14695 052402
14696 052404
14697 052406
14698 052414

23-0CT-80 09:11

end
end;

ENDSUB;
it

.DODU_FLG IS_SET

then

'DROP THIS UNIT
'AND EXITS TEST

DODU

IS_SET

begin

DODU (.ML_LUN);
DOCLN;
end;

BG_PAT = not

.BG_PAT;

'COMPL IMENT BG_PAT

rs;_PAt = not .TST_PAT;

'COMPL IMENT TST_PAT AND REPEAT

end,

ENDTST;

004167
024646
005046
005001
012702
005046
104402
152777
016705
042705
142777
150577
010177

131470

$131:

177777

000040
137550

137324

000007

137306

177770
137302

137426

JSR
CMP
CLR
CLR
MOV
CLR
TRAP

BISB
MOV

BIC

BI(B
BISB

MOV

R1,$SAVES
-(SP),=(SP)
-(SP)
R
#-1,R2
-(SP)
2

#40,3ML .REG+40

ML .DUT,RS

7089

; DODU.FLG
; BG.PAT
; +,TST.PAT
; TWICE

7149
7150
715
7153
7154
7155

; BG.PAT,»

7157

#177770,RS

#7 ,3ML.REG+40

RS,aML .REG+40

R1,3ML.REG+170

CIMLAAO ML=11 LOGIC TEST

MACRO M1113 23-0CT-80 09:11 PAGE §oo

'HARDWARD TEST SECTION
I

;

14704

sMLG

14707 052442 010177
14708 052446
14709 052452

010177
004767

14711 052464
14712 052466

005003
012704

14713 052472
14714 0524764
14715 052500
14716 052502
14717 052506
14718 052510
14719 052512
14720 052514

14721 052516
14722 0525264

012777

001411
016705
001404
005066
005305
001374
005304
000766

137432

137406
140150

000061

152777

000040

14727 052546 042705

177770

14726 052542

016705

137422

14728 052552
14729 052560

142777
150577

000007
137154

14731 052572
14732 052576
14733 052602
14734 052610

010267
004767
012777
105777

135544
137740
000061
137134

14735 052614
14736 052616
14737 052624

14738 052630
14739 052634
14740 052642

100375
152777
016705

042705

142777
150577

14741 052646
14742 052652
14743 052660

004767
012777
012704

14745 052666
14746 052672
14747 052674
14748 052700

016705
001404
005066
005305

14750 052704
14751 052706

005304
000766

14744 052664

14749 052702

14752 052710
14753 052712
14754 052720
14755 052726

14756 052732

14757 052734
14758 052740

001411

4$:

5%:

000177

152777

000006

020327
003755

14730 052564

2%:

127416

000020

14725 052534

22=0ct=1980 10:47:44

22-0ct=1980 10:45:32

000010

137274

000007
137072

137076

137754
000071
000001

108:

005003
017767
152777
012704

137212
000020
000001

016705
001404

127156

136742
137072

#61,aML .REG

7161

CLR
MOV
BEQ
MOV
BEQ
CLR
DEC
BNE
DEC
BR

BISB
INC

11%:
12%:

13$:

R1,3ML.REG+160
PC.DAT.DM.XFER
R3
#,R4

6%
LSDLY,RS
5%
6(SP)
RS
4%
R4
3$

; BG.PAT,»
:
: WD.CNT
L oe,$8TMP2

7159
7160
7163
7165

; e, $8TMPI
: $STMP

L $S$TMPI
: $$TMP2

#20,aML.REG+120
R3

;
: WD.CNT

7166
7163

#40,3ML.REG*+40

;

7167

;

7170

PC.DAT.DM.XFER
#71,3ML .REG
R4

.
:
L oa,$8TMP2

7180
7181
7182

MOV
BEQ
CLR
DEC

LSDLY,RS
108
6(SP)
RS

; %, $8TMP1

DEC
BR

R4
13

. $$TMP2

R3, 4177
2%

MOV

ML.DUT,RS

BICB
BISB

#7,aML.REG+40
RS.aML.REG+40

MOV
JSR
MOV
TSTB

#10,aML.REG+40
R2,10.BUF
PC,GD.BLK.XFER
#61,aML.REG
aML.REG+50

7%
#40,aML.REG+40
ML.DUT,RS

BICB
BISB

#7,aML.REG+40
RS,aML.REG+40

JSR
MOV
MOV

BEQ

BNE

CLR
MOV
BISB
MOV

BEQ
MOV
BEQ

#177770.RS

BPL
BISB
MOV

BIC

9%:

001374

001411

7%:

8s:

000006

MOV

BISB

137020

127224

7158

BIC

137146

137114

: BG.PAT,*

BISB

137160

137070

R1,3ML.REG*+200

CMP
BLE

137176

000040
137340

177770

6%:

T0PS

PA:<

MOV

MOV
JSR

137214

000001

152777
005203

14723 052526
14724 052532

SEQ 0303

}2;82

14710 052456

L OIST.PAT,«
3
:
:

7171
7172
7173
7177

017777085

1n§

. $$TMP
L $STMPI

R3
ML .REG+230,PD. TEMP
#20,aML.REG+120
#1,R4

; WD.CNT
:
:
D e, $8TMP2

L$DLY,RS
158

: v, $8TMP

166

7184
7186
7187
7188

MACRO M1113

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

23-0CT-80 09:11

PAGE 301

SEQ 0304

JMLG
000006

14%:

15%:

134730
134724
134720

14771 053000
14772 053002
14773 053004
14774 053006
14775 053010
14776 053012
14777 053016
14778 053020

011662

14779 053022

177770
000001

14780 053026
14781 053032
14782 053034
14783 053040
14784 053044
14785 053046
14786 053050
14787 053052

22=0ct=1980 10:47:44
22-0ct=1980 10:45:32
(LR
DEC
BNE
DEC

16%:

MOV
MOV
MoV

17%:

MOV

CLR

ASR
ASR
ASR

130042

000017

MOV
MOV
MOV
ADD

000012

i e O e i
~O
&S0
&~O

= OO000O0O0—=0000

0416
6646
0246

— e

14807 053150
14808 053154
14809 053156
14810 053162
14811 053166
14812 053170
14813 053172
14814 053200

2746
2746

007020
005760
005740
006112
006104
005414
020006

000001
000026

000036

R2,=(SP)

;
;

NIB.PTR,+
TST.PAT,+

SP, (SP)

; RESULT,*

#17,12(5P)

;

PC,BLSGT2
#10,spP
RO
198
R&,=(SP)

#12,-(5P)

.WORD
.WORD
.WORD
MOV

126
SYNC

MOV
TRAP

004366
000004

NIB.PTR,+

PC.XOR.LNG.WRD

MOV
MOV
MOV
MOV
MOV
MOV

000030

;

#177770, (5P)

JSR
BIT
BEQ

TRAP

14796 053104
14797 053106
14798 053112
14799 053116
14800 053122
14801 053126
14802 053132
14803 053136
14804 053142
14805 053144
14806 053146

NIB.PTR
NIB.PTR,*

#1,-(5P)
-($P)

BNE

140266

;
;

MOV

ADD
TST

000012

$$TMP?

13%
aML.REG+170,D1.TEMP
oML .REG+200,D2.TEMP
gHL.REG’160.E2.TEHP

#PD.TEMP,RS
RS,=(SP)
R& =(SP)

CLR
JSR

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

; $$TMP
; $$TMPY

;

ADD
MOV
MOV

BIC

000010

6(SP)
RS
14%

18%

TOPS
PA:<

*,RESULT

7191
7193

7196

7198
7201

7202

#FNC.S,=(SP)

#WRD.12,-(5P)

#WRD.10,=(SP)
#WRD.25,-(SP)
#WRD.
24 .~ (SP)

#FIV.FAT,-(SP)
#6,-(5P)

SP.RO

14
R4, (SP)

30(SP),~(SP)

R2,-(SP)
#FAT.S,-(SP)

#6,-(5P)

SP RO

14
#1,36(SP)
#26,5P

SP‘.

:
;
:

NIB.PTR,»
RESULT,+
1S1.PAY
¢

Sp..

;

*,DODU.FLG

7203

7204
7200

CZMLAAD ML-11 LOGIC TEST

MACRO M1113 23-0CT-80 09:11 PAGE gOZ

HARDWARD TEST SECTION

14816

MLG

14819 053204
14820 053210

062706
005204

14822 053216

003671

14824 053222
14825 053226

020327
003631

14823 053220

14826 053230

020427

005203

006000
103002
000167

14831 053250

001004

14832 053252

14833 053256

14834 053260

177142

016700

136710

104451

062706

000001

021627
003760
000207

14860 053310
14861 053312
14862 053314
14863 053316
14864

ADD
INC

#6,SP
R4

BLE

17$

(MP

R4 ,#10

104466
006000
103773
000207

177054

; WD.CNT

7184

TRAP

7209

2(sP), n

; DODU.FLG,*

721%

MOV

ML.LUN,RO

7217

TRAP

CMP
BLE

R1
R2
(SP)

(sP).m
20%

: BG.PAT
: TST.PAT
: TWICE

7221
7222
7153

#10,SP

7089

722%

ROR
BHIS
JMP

CMP

BNE

COM
COM
INC

RTS

131::

JSR

TRAP
ROR
BLO
RTS

: Routine Size:

14866

R3,#160
12%

: WD.CNT,»

RO
21%
1%

22%
51

;

66
RO
1%
PC

6 words

!<BLF/PAGE>

TWICE,*

24 words

PC,8T31

: Maximum stack depth per invocation:
7226

7195
7191

ADD

1%:

3
; NIB.PTR

; NIB.PTR,*

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

004767

T0PS

PA:<

INC

TRAP

000010

14865

14874
14875
14876 ;

21%:

000001

14849
14850
14854

14859 053304

20%:

22%:

14843
14844

14858 053304

22=0ct=1980 10:47:44

22=0ct=1980 10:45:32

CMP
BLE

104444

14840 053276
14842

000160

000002

005101
005102
005216

14841 053302

18%:
19%:

000010

026627

14835 053262
14836 053264
14837 053266
14838 053270
14839 053274

000006

104467

14827 053232
14828 053234
14829 053236

14830 053242

SEQ 0305

}:g};

14821 053212

0 words

MACRO M1113

CIMLAAD ML-11 LOG IC 1 EST

'HARDWARD TEST SEC TION

PAGE 303

SEG 0306

22-0ct=-198 8 }8:67: 44
:45:32
22-0ct=198

14878 sMLG

TOPS=-20 Bliss=16 v2(206)

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

BGNTST;
l+¢
|
;

TEST NUMBER:

TST 32

TEST NAME:

SYNC DATA BUS CONIINUITY /READ PATH

TEST DESCRIPTION:

TEST THE CONITNUITY OF THE SYNCHRONOUS MODULE READ

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.

i IMPLICIT INPUTS:
;

local

10_BUF

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE

FUNCTION ARE FOUND.

DODU_FLG,
TST PAT,

BG_PAT;

'DROP UNIT FLAG
'TEST PATTERN

'BACKGROUND PATTERN

DODU_FLG = 2ERO;

1ST PAT = ONES;

BG_PAT = ZEROES;

TR T ET TR

T T T

DATA BUS BY:

;

T T

TN PRT PR TR PR TR TR TR D R R L

T ETR LR

23-0CT-80 09:11

incrbTU!CE from 0 to 1 do

'REPEAT LOOP TWICE

egin

CLR_MBUS;

BAI = ONE;

'SET ON FIRST ]0_BUF ADRS

GD_BLK_XFER (7;
MLTST = write;

'SET UP ATGOOD BLOCK XFERR
'DO A WRITE FUNCTION (WRITES THE TST_PAT)

I0_BUF = ,TST_PAT;

'FIRST 10_BUF ADRS GET TST PAT
'DELAY UNTIL XFER TO COMPLETE

until .DRY IS_SET;
BGNSUB;
CLR_MBUS;
14929
14930
14931
14932

incr 10 _CNT from 0 to 255 do
10_BUF [.10_CNT] = .BG_PAT;

‘LOAD I0_BUF WITH BG PAT

GD_BLK_XFER ();

'SET UP A GOOD BLOCK XFERR

MACRO M1113

CIZMLAAOD ML-11 LOGIC TEST

HARDWARD TEST SECTION

L P L L LN LA L

MLCS 1

SEQ 0307

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

‘DO A READ FUNCTION (READ THE TST PAT)

= read;

'DELAY UNTIL XFER TO COMPLETE

incr 10_CNT from 0 to 255 do

'READ THE 10_BUF FOR TEST PATTERN

0
until .DRY IS_SET;

if .10_BUF [.I0_CNT] neq .TST_PAT

T P L

then

'SEE IF

10_BUF WORD EQLS TST PAT

'ERROR AND SET DODU_FLG IF NEQ

beain

ERRDF (87, SYNC, 0);

PRINTB (SEV_FMT, WRD 24, WRD_25, WRD_10, WRD_12, WRD_23, FNC_6, WRD_19);

PRINTB (FMT~2, .TST_PAT, .10_BUF C.I!O_CNTJ, T.TST_PAT xor .I0_BUF [Z10_CNTI));
ONE;

DODU_FLG =
end;

ENDS uUB.;

14954

14962
14963
14964

T T

'DROP THIS UNIT IF DODU_FLG IS SET

.DODU_FLG IS_SET

then

14955
14956
14957
14958
14959
14960
14961

begin
DODU (.ML_LUN);
DOCLN;

end;
TR TR TR TR

| 8
PAGE 304

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

1493 ;ML4
14935 ;
14936
14937
14938
14939
14940
14941
14942
14943
14944
14945
14946
14947
14948
14949
14950
14951
14952
14953

14965
14966
14967
14971
14975 053320
LA

23-0CT-80 09:11

14976 053324
14977 053326
14978 053332
14979 053334

14981 053344
14982 053350
14983 053354
14984 053362
14985 053366
14986 053374
14987 053400

PAT = not

'COMPLIMENT TST _PAT

.TST _PAT;

'COMPL IMENT BG_PAT AND REPEAT

PAT = not .BG_PAT;
end;
7309

ENDTST;

004167
005046
012701
005004

130534
177777

136374

000007

136356

000010

136344

136352

134742
137136

JSR
CLR

MoV

000040
136620
177770

004767

$132:

1%:

CLR
CLR
BI1SB
MOV

BIC
BI(B
BISB
B1SB
MOV
JSR

R1,$SAVES
=-(SP)
#-1,R1

3
; DODU.FLG
: «,TST, PAT

R&4

#40,3ML .REG+40
ML.DUT,R3

: BG.PAT
;

TWICE

7225
7256
7257
7258
7260
7261

#177776,R3

#7,3ML .REG+40
R3.aML.REG+40

#10,3ML .REG+40

;

PC,GD.BLK.XFER

R1,10.BUF

IST.PAT,s

7263
1264
7265

CZMLAAD ML=11 LOGIC( TEST

MACRO M1113

iHARDHARD TEST SECTION
14989

14994 053416
14995 053420

14996 053422

012777
105777
100375
104402

000061
136332

000040

14998 053434

042703

177770

15001 053452
15002 053454

005002
010203

14999 053440
15000 053446

15003 053456
15004 053460

15005 053464

15006 053466
15007 053472

016703
142777
150377

006303
010463

005202

020227
003770

15008 053474
15009 053500
15010 053506

004767
012777
105777

15012 053514
15013 053516

005002
010203

15011 053512

15014 053520
15015 053522
15016 053526
15017 053530

15018 053532

100375

006303
062703
021301
001454

136534

000007
136266

000127
007500
000000

15023 053546

012746

136266

136310

2%:
3%:

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

22-0ct=1980 10:45:32

136272

010342

;
:

7266
7270

BISB

#40,aML.REG+4D

;

7272

BIC

#177776.83

: 10.CNT
: 10.CNT,#

7275
7276

BPL
TRAP

CLR
MOV
ASL
MOV

INC

000377

137042
000071
136236

#61,3ML .REG
@aML.REG+S50

BICB
BISB

010342

CMP
BLE

136172

JSR
MOV
TSTB

68 :

CLR
MOV

BPL

ASL
ADD
CMP
BEQ

TRAP

15034 053614
15035 053616
15036 053622
15037 053626
15038 053630
15039 053632

010146
046616
040166
052616
011346
010146

15041 053640
15042 053644
15043 053646

012746
010600
104414

15033 053612 011316

MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP

MOV

000002
000002

15040 053634 012746 004224
000004

R2
R2.R3

R3
R&,10.BUF (R3)

: BG.PAT,*

7275

PC,GD.BLK.XFER
#71,3ML .REG
aML.REG+50

;
:
:

7278
7279
7283

R2
R2,R3

: 10.CNT
10.CNT,»

7285
7287

R3
#10.BUF ,R3
(R3),R1
7%

10.CNT,+

TST.PAT

7290

#WRD.19,-(SP)

;

7291

#WrD.2%,-(5P)

#WRD.12.-(SP)
#WRD.10.=(SP)
#WRD.25.=(SP)
#WRD
. 24 . = (SP)
#SEV.FAT,-(SP)
#10,-(SP)
SP,RO
14

(R3), (SP)

MOV
BIC
BIC
BIS
MOV
MOV

R1,-(SP)
2(5P), (SP)
R1,2(5P)
(SP)+, (SP)
(R3),-(SP)
R1.-(SP)

MOV
MOV
TRAP

0 ,-(SP)
SP.RO
14

MOV

* 10.CNT

R2,#377
4$

#ENC.6,~(SP)

MOV

005760
005740
006112
006104
005452
000010

#7,aML.REG+40
R3,aML.REG+40

MOV

15024 053552 012746 006076
012746
012746
012746
012746
012746
012746
010600
104414

ML.DUT,R3

127
SYNC
0

MOV

15025 053556
15026 053562
15027 053566
15028 053572
15029 053576
15030 053602
15031 053606
15032 053610

2%
2

.WORD
.WORD
'WORD

006040
007030

TOPS

PA:<

MOV
TSTB

MOV

48:

104455

15019 053534
15020 053536
15021 053540

15022 053542

152777

14997 053430

PAGE 305

ML&

}233?

14992 053404
14993 053412

23-0CT-80 09:11

#FMT.2,-(SP)

: SP,e

;

; TST.PAT,»
. TST.PAT,+

. TST.PAT,+
: SP,w

7292

CIZMLAAD Mi-11 LOGIC TEST
'HARDWARD TEST SECTION

MACRO M1113

15045

012766

15050 053662
15051 053664
15052 053670
15053 053672
15054 053674
15055 053676

005202
020227
003712
104467
006000
103650

15057 053704
15058 053706
15059 053712
15060 053714
15061 053716
15062 053720
15063 053722
15064 053724
15065 053730
15066 053732
15067 053734
15068
15069

15070
15075
15076
15080
15084 053736

15085 053736

15086 053742
15087 053744
15088 053746
15089 053750
15090
15091
}ggg;

———

15098 ;

SEQ 0309

22=0ct=1980 10:47:44

15048 053650

15056 053700

PAGE 306

JMLG

12829

15049 053656

23-0CT-80 09:11

062706

021627

001004
016700
104451
104444
005101
005104
005205
020527
003602
005726
000207

000001

000032

090032

000377

000001
136254

000001

7%:

22=0ct=1980 10:45:32

104466
006000
103773
000207

7310

177356

#1,32(SP)

;

*,DODU.FLG

7293

INC
CMP
BLE
TRAP
ROR
BLO

R2
R2,#377
6%
67
RO
3%

;
;

10.CNT
JO.CNT,»

7285

ADD

CMP

BNE
MOV
TRAP
TRAP
8%:
COM
COM
INC
CMP
BLE
TST
RTS
:
_
: Routine Size:

!<BLF/PAGE>

132::

1$:

PA:<

MOV

#32,5P

;

(sp),.n

8%
ML.LUN,RO
51
44
R1
R4
RS
RS .M
1%
(SP)+
PC

JSR

TRAP
ROR
BLO
RTS
"
; Routine Size:
; Maximum stack

729

; DODU.FLG,*

7298

7301

: TST.PAT
: BG.PAT
: TWICE
: TWICE,*

7305
7306
7260

66
RO
1%
PC

invocation:

7225

20 words

PC,$T732

6 words
depth per

7289

135 words
.
; Maximum stack depth per invocation:

004767

TOPS

0 words

7307

CIMLAAO ML-11 LOGIC IC T

|HARDWARD TEST SECTI ON

EST

MACRO M1113 23-0CT-80 09:11 PAGE %07

15100 ;ML&

22-0ct=1980 10:47:44

}2}85 3
15103
15104
15105
15106
15107
15108
15109
15110
15111
15112
15113
15114
15115
15116
15117
15118
15119
15120
15121
15122
15123
15124
15125
15126

22-0ct=1980 10:45:32

;
;
;
;
:
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;

7311
7312
7313
7314
7315
7316
7317
7318
7319
7320
7321
7322
7323
7324
7325
7326
7327
7328
7329
7330
7331
7332
7333
733,

!
!
BGNTST;

15128 ;

733

15127 ;

7335

15129
15130
15131
15132
15133
15134

;
;
;
;
;
;

7337
7338
7339
7340
7341
7342

15136
15137
15138
15139
15140
15141
15142
15143
15144
15145
15146
15147
15148

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

7344
7345
7346
7347
7348
7349
7350
7351
7352
7353
7354
7355
7356

15150
15151
15152
15153

;
;
;
;

7358
7359
7360
7361

15135 ;

15149 ;

15154 ;

SEQ 0310

7343

7357

7362

'+e
' TEST NUMBER:
TST 33
!
' TEST NAME:
RAM BUS ADRS COUNTER TEST /WRITE PATH
!
' TEST DESCRIPTION:
!
!
TEST ABILITY OF THE RAM_BUS ADDRESS
!
COUNTERS TO LOAD/UNLOAD THE SKIP
!
RAM DURING WRITE FUNCTIONS BY:
!
!
1.
LOADING A REPEATING COUNT OF 0
!
TO 63 INTO THE NIBBLES OF THE
!
FIRST 64 WORDS OF THE 10_BUF.
!
!
2.
VIA MBUS WRITE FUNCTION WRITE
!
THE CONTENTS OF THE 10_BUF
!
INTO THE GOOD BLOCK.
!
!
3.
VIA DAT_DM READ GOOD NIBBLES IN

!
!
!
!
!
!

!
!
'
!
!
!
!
!
!
!
!
!
!

!
!
!
!

THE GOOD BLOCK FOR THE UNBROKEN

COUNT OF 0 TO 63.

ONCE A BAD NIBBLE IS ENCOUNTERED
MASK THAT NIBBLE FROM FURTHER
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 STORED
AND ACCESSED FROM.
GLOBAL OWN LOCATION TO THIS
TST.

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>BL2ML4.BLI.2 (75)

—_——

06
'CZMLAAD ML=11 LOGI

'HARDWARD TEST SEC
eC T

MACRO M1113

—

23-0CT-80 09:11

m.8
PAGE 308

DODU_FLG,

WRD_CNT,

NIBZIGNORE

ERRTFLG,

'DROP UNIT FLAG

'WORD COUNT

: bitvector [16],

'NIBBLE IGNORE FLAGS

'ERROR FLAG

BAD_NIB_CNT,

'BAD NIBBLE COUNT

PASS_CNT,
NIB_PAT;

'PASS COUNT
'NIBBLE PATTERN

DODU_FLG = ZERO;

WRD_CNT = ZERO;

'LOAD 44 WORDS WITH REPEATING COUNTS OF 0-63

incr CNT from 0 to 63 do
incr PAT_CNT from =1 to 11 by
begin
(10_BUF
.WRD_CNT1)<0, 4>
(10_BUF
(10_BUF
(10_BUF
WRD _CNT
end;

<4, 4>
-WRDZCNT))
<8, 4>
.WRD_CNT1)

L L
L R

WND
NV

local

R T T T I I I
I
N T

NOT VNS WN =00V
UWN SOV

N S Iy U I TR TR I
L TN
L
L
T L D

VNV

(oo

'LOAD NIBBLES IN WORD WITH REPEATING COUNTS OF 0-63

PAT_CNT + 1;
LPATCNT + 2;
PATTCNT + 3;

"WRDTMCNT)<12, &> = PAT_CNT + &;
LWRD_CNT + 1;

BGNSUB;
:CLR_MBUS;

GD_BLK_XFER ();
-flLfSl = write;
3

0
until .DRY IS_SET;

'LOAD FIRST NIBBLE IN WORD
'LOAD SECOND NIBBLE IN WORD
'LOAD THIRD NIBBLE IN WORD

'LOAD FORTH NIBBLE IN WORD

!INCREMENT TO NEXT WORD

'SET UP A GOOD BLOCK XFERR
‘D0 A WRITE FUNCTION
'DELAY UNTIL XFER TO COMPLETE

D
PRPR L
s T
e
R
I E T

SRECSSEVIRJRER2
eI
[
o

D il
i
i

PORLNIALNININTNINIRIN)
=

I R TR

it D il
il il
S
D i
D il
D

D
D D e
DA TN

D i

D e D i D
D
TA LA
A

il il e
i

D i

i D

D el D i D
i D D e
AT
T A VTAY TV

D o il D
D D e i B D e
ViAW
T
W VI

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

TR TR

59
60
61

il i

D d D D D i
B D D
D i
T
T
T A NN T AWV

158

SEQ 0311

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

15156 JMLG
15157 &

"nr-=ree

CLR_MBUS;
NIB IGNORE = ZEROES;

PASS CNT = ZEROES;
NIB_PAT = ZEROES;

BAD_NIB_CNT = ZEROES;

DATDM_RFER ();
MLCSY = read;

DELAY (ONE_US);
do

:
begin

!SET UP A DATA DIAG MODE AT THE GOOD BLOCK
‘D0 A READ FUNCTION

'LOOP UNTIL THE BLOCK IS READ OR 9 BAD NIBBLES FOUND

DAT_CLK = ONE;

'GET THE PROM DATA
'CLOCK OUT THE DATA WORD

RD_LNG_WRD;

'READ THE DATA DIAG REGISTERS

incr NIB_PTR from 0 to 8 do

'LOOK AT 9 NIBBLES

PD_TEMP = .MLPD;

DELAY (ONE_US);

VIS W ~N

WINWWWWWWWWRIN
RN RN NN = o D -

23-0CT-80 09:11

PAGE 309

SEQ 0312

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

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

begin

:; .PD_TEMP [.NIB_PTR] IS_NOT_SET

NO NS WN = OV

'FIND GOOD NIBBLES

begin
:; .NIB_IGNORE [.NIB_PTR] IS_NOT_SET
en

begin

TST_LNG_WRD

(.NIB_PTR,

.NIB_PAT,

:; ERR_FLG IS_SET

VO NOWVNBWN 2OV

begin
ERRDF (88, ARR DAT, 0);

'SEE
ERR_FLG);

THIS NIBBLE FOUND BAD BEFORE
'TEST

THE NIBBLE

'SEE IF TEST FOUND AN ERROR
'ERROR AND SET DODU_FLG IS SET

PRINTB (Six_FMT, FNC_18, WRD_50, WRD_10, WRD_12, FNC_S, WRD_19);
DODU_FLG = ONE;

end
end
end
elseb
;

!THIS NIBBLE

egin

NIB_IGNORE

[.NIB_PTR] = ONE;

BAg-NIB,CNt = .BAD_NIB_CNT + 1;

IS BAD

'SET THIS NIBBLE NIB_IGNORE FLAG

' INCREMENT BAD NIB COUNT

end;

NIB_PAT =

24k

end;

D e

PAZS_CNT =

D il
D
- ol D s -l
— il

EE, A

MACRO 1113

D D d

D ed D D

D D D e D
VI

D D i
T

D ol
Vo

D D ) D i
VL
T

\fl\fi\fl\fl\fl\fl\fim\h\fi\fl\fl\fiw\.fl\h\'
VIV AT NN
TV VWA
NN NN NN NN NN NN
&~

D e D i D o
VA VATV v

CZMLAAD ML-11 LOGI C TEST
HARDWARD TEST SECT ION

until

_NIB_PAT

PASS_CNT

(.PASS_CNT eql

113)

+
1;

'INCREMENT NIB PAT
' INCREMENT

(.BAD_NIB_CNT eql 9);

PASS COUNT

'REPEAT UNTIL COMPLETE

ENDSUB;

Z; .DODU_FLG IS_SET
en

begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

!DROP THIS UNIT IF DODU_FLG SET

NEVER FOUND BAD

130102
000006

$133:

MoV

010342

ADD
MoV

MoV
ASL

INC
BIC
BI(B
BISB

177760
000017

MoV
ADD
ASL
ASL
ASL
ASL

000002

177417

BIC
BI(B
BISB

000360

MOV
ADD

000003
170377
007400

[=lelelelelelelelelole] [elelelalel=l=

b cd o cd cd b e

d d

= OOV
NOANSWNN=O

007777
170000

000004

000077
000040
136002

135556

000007

135540

177770

BI1SB

MOV

BIC
BI(B

7309

* PAT.CNT

WRD.CNT,*
#10.8BUF
,R1
RO,RS
RS
#177760,R5
#17,(R1)
RS, (R1)
RO,RS
#2.,RS
RS
RS
RS
RS
#1774617,RS
#360, (R1)
RS, (R1)

#7777 ,RS
#170000, (R1)
RS, (R1)
R3
#4,R0
RO,#13

TRAP

SEQ 0313

DODU.FLG
D
. CNT
WR
CNT

BIC
BIC
BIS
INC

CMP
BLE
INC
CMP
BLE

R1,$SAVES

RS
#170377,RS
#7400, (R1)

ADD

000013

162777

SWAB
BIC
BIC
BIS

MOV
ADD
SWAB
ASL
ASL
ASL
ASL

000004

56142
54144
54150
54152

JSR
suB
CLR
CLR
CLR

177777

s ONOWNO

—

NU‘V‘N8°ON
o
[=lelelelap
o
~

-O000

(=lele]

gOONO\fiJ‘

SNISNNSNSNNSNSN

15271 053752
756

POND

22
£32gs2sssss

\HARDWARD TEST SECTION
I

WACRO 1113 23-0C1-80 09:11 PAGE 310

'CIMLAAD ML=11 LOGIC TEST

RS, (RT)

RO.RS

,*
PAT.CNT

;

PAT.CNT,»

7383

PAT.CNT,*

7384

PAT.CNT,»

7385

. CNT
WRD
* PAT,CNT
PAT.CNT,*

7386
7380

CNT

7378

R2
R2, 477
1%

2
#40,aML .REG+40
ML.DUT,R2

n77770,R2

#7,3ML .REG+40

;

; CNT,»
7387
7389

Txe
|

MACRO M1113 23-0CT-80 09:11 PAGE 511

'CIMLAAO ML=11 LOGIC TEST

'HARDWARD TEST

SECTION

|
|

SEQ 0314

22-0ct=19 80 10: 47:44
2¢=0ct=19 80 10::45:32

5
NN OO
\-flbg noSsSNoORO
on

O0O0O0O0O [=l=lel=la)

004767
012777
105777
100375
152777

135462

#61,3ML.REG
22L.aecoso

4%:

135506

#40,aM
. REG+40
L

ML.DUT,R2

#177770,R2

135470

#7 ML .REG+40
R2.aML .REG+40

R3
R5

PC,DAT.DM.XFER

135400

#1,R1

5%:

8s
L$DLY,R2

& 054350

125540

$$TMP?

wviun

324

454

aML .REG+230,PD.TEMP

8%:

#20,3aML.REG+120
£1.R1

12%
LSOLY,R2

9%:

1%
6(SP)
R2
10%
R1
9%

108:

SsSNO

S8BT
&
NWW
-t ONNN

VIV WAL W

000006

1
1

11%:

aML.REG+170,D1.TEMP
aML.REG+200,D2.TEMP
oML .REG+160,E2.TEMP

12%:

S
N

rWNN
oo~

13%:

VIVAWAWDA

7404
7405

$STMP
$$TMPT

7%:

135574
000020
000001

*,$$TMP2

7403

*,$8TMP1

6%:

000006

BAD.NIB.CNT

7399
7400
7401
7402

NIB.IGNORE
PASS.CNT
NIB.PAT

4(SP)
R4

125604

TOPS
PA:<

7391
7392
7396

PC.GD.BLK.XFER

&~
~N
o
~N

AV AV AV IV IV

R2,aML.REG+40

136334
000071
000001

[elelelelelelelalololelelelal=loidd o

A
A
R
Y
— g
——— i
S
S
S
T NN
N

150277

= OV ~NOWV
WN=O VOO

NV W)

FREEEe \fl\h\-fl\fl\h\h\fi\fl\.flg FRELRERERY uuuguvcuuuwNNNNN

T i

)

i i
T
VAV AV VWA AT AW
N N N NN N NN A NN W N NN

JMLG

T
Tt T T
VWAV
VUL VT AT A
AT
VAT AV AW VIV AT
W WL
NN NN
NN NN NN NN
NNNNNNNY
O
VNV
NONW
S WIN) -oo
NOWVES
N
-

*,$8TMP2
;

7409
7410
7411

*,$8TMP1
$$TMP
$$TMP1

$$TMP2

NIB.PTR
NIB.PTR,*

7414
7617

7621

000004

NIB.IGNORE
,*
7617
#PD.TEMP, (SP)
R1,-(SP)

011662

062716
012746

177770
000001

MoV

117770, (5P)

#,-(SP)

NIB.PTR,

CIMLAAOD ML-11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION
|

15379

15383 054462

005046

004767

15385 054472
19386 054474

005700
001066

15388 054500

010146

126414

000010

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

CLR
JSR

-(SP)

ST
BNE

RO
15%

ADD

010246

MOV

15389 054502 042716 177770
000001

005700
001065

ST
BNE

15397 054532

010346

MOV

010146

MOV

15398 054534 012746 000010

15399 054540

060616

15401 054546

026627

15400 054542

15402 054554

15403 054556

004767

001033

000001

000130
007534
000000

15408 054572

012746

15417 054632

012746
012746
012746
012746
012746
010600
104414

012766 000001

15418 054640 062706 000020
15419 054644 062706 000006
15420 054650 000414
15421 054652 010246
15422 054654

010146

15424 054662
15425 054666
15426 054670

012746
011646
004767

148:
158:

000001

126444

15427 054674 005205
15428 054676 062706 000010

15429 054702 005203
15430 054704

15431 054706

005201

020127

15432 054712 003642

1543% 054714

005204

000010

168:

: ERR.FLG,*
;

7426
7429

#WRD.19,-(SP)

;

7430

14%

#ENC.5,=(SP)

#WRD.12,-(SP)

MOV
MOV
MOV
MOV
MOV
MOV
TRAP

#WRD.10,-(5P)
#WRD.50,=(SP)
#FNC.18.-(SP)
#SIX.FMT,=-(SP)
#7,-(SP)
SP.RO
14

ADD
ADD
BR

#20,5P
#6,5P
16

:
:

R1.=(SP)

177770, (sP)

NIB.PTR,*

RS
#10,5P

: BAD.NIB.CNT
:

7440
7438

* NIB.PTR

7614

MOV

BIC

15423 054656 042716 177770

7424

L NIB.PAT.+

10(sP) .M

MOV

000026

; NIB.PTR,*

; ERR.FLG,*

130
ARR.DAT
0

MOV

005740
006400
007216
005432
000007

7421

; NIB.PTR,*

SP,(SP)

.WORD
"WORD
WORD

MOV

15409 054576 012746 005760

15410 054602
1511 054606
15412 054612
15413 054616
15414 054622
15415 054626
15416 056630

R3.-(SP)

PC.TST.LNG.WRD

TRAP

007020

R1.,=(SP)

JSR

BNE

006040

RO
168

#10,-(sP)

CMP

#,=(SP)
-(SP)
PC,BLSGT2

MOV
ADD

104455

15404 054560
15405 054562
15406 054564

15407 054566

136112

000010

R1,=(SP)

#10,sp

15394 054524
15395 054526

126362

R2,=(SP)

ADD

MOV
CLR
JSR

15393 054520 062706 000010

n0,sp

177770, (sP)

012746
005046
004767

TOPS
PA:<

PC,BLSGT2

BIC

15390 054506
15391 054512
15392 054514

15396 054530

SEQ 0315

;

15384 054466 062706
15387 054476

0.9

PAGE 312

ML4

}2%3?

15382 054460

23-0CT-80 09:11

#1,26(SP)

R2,=(SP)

MOV
MOV
JSR

#,-(SP)
(SP),=(SP)
PC,BLSPU2

INC

INC
ADD
INC

CMP

BLE

INC

R1.#10

13§

: SP,w

: +,DODU.FLG

: NIB.PAT

* NIB.PTR,+

; PASS.CNT

7431

7428
7423
7617

7439

7443
.

1445

CIMLAAD ML-11 LOGIC T

HARDWARD TEST SECTION

EST

MACRO M1113 23-0CT-80 09:11 PAGE 513

15435

|
|
‘

;MLG

15438 054716

020427

000161

15440 0547264

020527

000011

15639 054722

15441
15442
15443
15444

054730
054732
054736
054740

15445 054742
15446 054744

15448 054754

15447 054750
15449 054756

15450 054762

15451 054764

15452 054766
15453 054772

15454

001405

001402
000167
104467
006000

103002
000167

177372

177202

021627

000001

016700

135204

001004

104451

104444

062706

0060207

000010

15455
}gzg?

22=0ct=1980 10:47:44

22-0ct=1980 10:45:32

15470 054774

15471 054774

004767

15475 055006

000207

15472 055000
15473 055002
15474 055004

15476

104466
006000
103773

176752

15477

R4, #161

; PASS.CNT,«

CMP

RS, #11

; BAD.NIB.CNT,
¢

17%:

BHIS
JMP

18%
3%

18%:

BEQ
JMP
TRAP
ROR

CMP

17%
8%
67
RO

133::

1%:

7452

MOV

ML.LUN,RO

7455

TRAF

RTS

ADD

19§

#10,5P

JSR

PC,$733

RTS

TRAP
ROR
BLO

6 words

! <BLF/PAGE>

7309

7457

21 words

66
RO
1%

: Maximum stack depth per invocation:
7460

7448

: DODU.FLG,*

TRAP

19%:

17§

TOPS

PA:<

(sp),m

BNE

; Routine Size:

15478

15483
15484
15485
;

(MP

BEQ

: Routine Size:
265 words
: Maximum stack depth per invocation:

15462
15466

SEQ 0316

}g:%?

0 words

MACRO M1113

CIZMLAAD ML-11 LOGIC TEST

HARDWARD TEST SECTION

F
9
PAGE 314

23-0CT-80 09:11

22-0ct=1980 10:47:44
22-0ct=1980 10:45:32
7461
7462
7463
7464
7465
7466
7667
7468
74€9
7470
7647
7472

e T

P T

L L L

L L L LR L L L L D

7474
7475
7476

7481
7482

BGNTST;
le4
|

i
i
i
i
i
i
i
;
i
i
i
i
i
i
;
i
;

TEST NUMBER:

TST 34

TEST NAME:

RAM BUS ADRS COUNTER TEST /READ PATH

TEST DESCRIPTION:
TEST ABILITY OF

RAM/BUS ADRS

COUNTERS TO LOAD/UNLOAD THE SKIP

RAM DURING READ FUNCTIONS BY:

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

INTO THE GOOD BLOCK.

10_BUF

CLEAR OUT THE 10_BUF

VIA MBUS READ FUNCTION READ
THE GOOD BLOCK FOR THE REPEATING

i
i
i
i
i
i
;
i
;
;
;
;
i
i

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.

'DROP UNJT FLAG

DODU_FLG,

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

local

Lol wwwwwwuwuuwwmmmmwmmm—-aaa_-...-..._._.._.o [=y=
= O OB NO NS WN = OOV NO NS W
=200
NOWVNS W
=00 o~

VAW

el I

WA WA A WA WA A
WA WA WA WA TR

[P
pp——— ——
R
P
P P
P
e

VAN TN
AN VI T AT A T A TN
AT AT AT
TV VATV
VT AW Vi

TR IETETETE TR TR

T T

15487 JMLG
15488 ;

15489
15490
15491
15492
15493
15494
15495
15496
15497

SEQ 0317

'WORD COUNT

WRD_TUNT,

PATCINC,
SIZTEXP,
POSTEXP,
TEMP;

CLR_MBUS;

DODO_FLG = ZERO;

'PATTERN INCREMENT
'SI2E EXPRESSION
'POSITIONAL EXPRESSION
' TEMPORARY STORAGE LOCATION

CIMLAAD ML=11 LOGIC T

MARDWARD TEST SECTION

EST

MACRO M1113 23-0CT-80 09:11 PAGE g15

15543 ;ML4

TOPS=20 Bliss=16 v2(206)

22-0Cct=1980 16:45:32

15546 ;
15547 ;

7513
7514

}gggg :

;g};

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

}ggzg 3
‘ggzg :

;g}z

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

WRD_CNT = ZERO;

incr COUNT from 0 to 63 do

\ncerAT CNT from =1 to 11 by 4 do
egin

'LOAD 64 WORDS WITH REPEATING

'LOAD NIBBLES IN WORD WITH REPEATING COUNT OF 0-63

15552 ;

7519

(10_BUF [.WRD_CNT))<0, 4> = ,PAT_CNT ¢

15556 ;

7523

WRD_CNT = ,WRB_CNT + 1;

' INCREMENT TO NEXT WORD

15553 ;
15554 ;
15555 ;
15557 :

7520
7521
7522

7525

15560 ;

7527

15559 ;
15561

;

15562 ;
15563 ;
15564 :
15565 ;

7526

7528

7529
7530

15566 ;
15567 ;
15568 ;

7531
753%2
7533
7534
7535

15570 ;
15571 ;

7537
7538

15569 ;

15572 ;
15573 ;

(107BUF [.WRDZCNT))<4, 4> = ,PAT_(NT ¢ 2;
(10ZBUF [.WRD_CNT))<B, 4> = ,PAT(NT + 3;
(10°BUF [.WRD “INT1)<12, 4> = .PAY _CNT + &;

7524

15558 ;

7536

end;

'LOAD FIRST NIBBLE IN WORD

'LOAD SECOND NIBBLE IN WORD
'LOAD THIRD NIBBLE IN WORD
'LOAD FORTH NIBBLE IN WORD

GD_BLK_XFER ();

'SET UP A GOOD BLOCK XFERR

'DELAY UNTIL XFER TO COMPLETE

MLESY = write;
0

until

.DRY

COUNTS OF 0-63

'DO A WRITE FUNCTION

IS_SET;

BGNSUB;
incr 10 _CNT from 0 to 255 do

10_BUF [.10_CNT]
= ZEROES;

CLR_MBUS;

'CLEAR OUT

10_BUF

7539
7540

GD_BLk_ XFER ();
MLTS! = read;

'SET UP A GOOD BLOCK XFERR
'DO A READ FUNCTION

15575 :

7542

'DELAY UNTIL XFER TO COMPLETE

15580 ;
15581 ;

7547
7548

SIZTEXP = &;
URD CNT = 0;

'FIELD SIZE FOR NIBBLES ALWAYS & BITS

;gg?

incr COUNT from 0 to 63 do

'READ 64 WORDS IN 10_SUF

15574 ;
15576
15577
15578
15579

;
:
;
:

15582 ;

}gggz :

7541

7543
7544
7545
7546

7549

15585 ;

7552

15587 ;
15588 ;

7554
7555

15586 ;

7553

0
wuntil .DRY [S_SET;
CLR_MBUS;

incr PAI cut from =1 to 11 by 4 do
be

EXP = ZERO;
PAT INC = ONE;

'READ REPEATING COUNTS OF 0-63
'"FIELD SELECTOR SELECTS THE FOUR NIBBLES

TEMP= ,10_BUF [.WRD_CNT];

'GET A WORD OUT OF 10_BUF

incr CNT from 0 to 3 do
begin

'READ THE FOUR NIBBLES IN WORD

}gggg :

;ggg

15591 ;
15592 ;

7558
7559

15594 ;

7561

it .TEMP<.POS_EXP, .SIZ_EXP> neq (.PAT_CNT + _PAT_INC)

7563

then

15593 ;

15595 ;

15596 ;

15597 ;

7560

7562
7564

' COMPARE NIBBLCE WITH RESPECTIVE 0 =63 (NI

begin

]

'ERROR AND SET DODU_FLG !F NEQ

CIMLAAD ML=-11 LOGIC TEST

'HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

H
9
PAGE 316

SEQ 0319

2-0ct=1980 10:47:44

2=0ct=1980 10:45:32
(89, ARR DAT, 0);
PRINTB (SIX _FMT, FNC _18,
ERRDF

DODU_FLG = ONE;

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BL2ML&.BLI.2 (76)

WRD_S0, WRD_10, WRD_12, FNC_6, WRD_19);

POS_EXP =
PAT_INC =
end;

WRD_CNT =

oooororOFOMOMONOFOFOOOOOFONOM

dddddddddddfldddddddddddd-‘dd-‘d_‘—._‘—‘_‘_‘d_‘
wviviyoa
Y ATV
A
YYD
Vi VIV AV WTVVWA W

end;

" INCREMENT THE 0-63 COUNT
'GET

¢+ 1;

THE NEXT

[0_BUF

'DROP THIS UNIT

if .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;

255010

~N
NN
22000 ~u-u8:
~roorORN

—

[=leTe]

ViYW VIV
Vi
AT vV

CoO0000O (=l{=l=1=]

ViAW

FAIIIIISS

N = OO~ VIS

———

_WRD_CNT

'POINT TO THE NEXT NIBBLE

IN WORD

WORD

ENDSUB;

055014
055020
634 055026
5635 055032
5636 055036
5037 055044
5638 055050
5639 055054

,POS_EXP ¢+ &;
.PAT_INC + 1;

7586

ENDTST;

004167

127044

162706
152777

016705
042705
1462777

150577
005066
005066
005002

012703
016604
006304
062704
010305
005205
042705
142714
150514

010305
062705
006305

200012
000040
135136
177770

000007
134670
000010
000002
177777
000002

010342
177760

000017
000002

$734:
134712

JSR
SUB

R1,8SAVES
#12,5P

MOV

ML.DUT,RS

BI(B

#7,3ML .REG+40

BISB

BIC

134674

1%:
2%:

7459
7509

#177770,RS

RS,aML.REG+40
10(SP)
2(SP)
R2

MoV
INC
BIC
BI(B
BISB

R3,RS
RS
#177760,RS
#17,(R4)
RS, (R&)

MOV
ADD
ASL

DODU_FLG SET

#40.IML .REG+40

BISB
CLR
CLR
CLR
MOV
MOV
ASL
ADD

#-1,R3
2(SP) R4
R&
R4
#10.BUF

R3.RS
#2,R5
RS

DODU.FLG
. CNT
WRD
COUNI
* ,PAT.CNT
WRD.CNT
,+
;

PAT.CNT,»

;

PAT_(NT,»

7512
7513
7515
7517
7519

7520

CIZMLAAO ML=11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113 23-0CT=80 09:11 PAGE %17

SEQ 0320

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

iMLG
:

15654
}gggz
15657
15658
15659
15660
15661
15662

055126
055130
055132
055134
055140
055144

006305
006305
006305
042705
142714
150514

15664 055150
15665 055154
15666 055156
15667 055162
15668 055166

062705
000305
042705
042714
050514

000003

062705
000305
006305
006305
006305
006305

000004

005266
062703

000002
000004

15663 055146

15669 055170

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

010305

020327
003713

000013

005202

15686 055250
15687 055254
15688 055262

004767
012777
105777

15689 055266
15690 055270

15691 055272
15692 055274

15693 055276
15694 055300

15695 055304

15696 055306
15697 055312

170377

007777
170000

020227
003705

100375
104402

005203

134642

15701 055332
15702 055340

142777
150477

152777

15700 055326 042704

000040

177770

134416

15704 055350 012777 000071

134322

15705 055356

105777

15706 055362
15707 055364
15708 055372

100375
152777
016704

3%:

135172

134366

000040
134572

2(SP)
#4,R3

: WRD.CNT
i «,PAT.CNT

7523
7617

INC

; COUNT

7515

JSR
MOV
TSTB

PC,GD.BLK.XFER
#61,aML.REG
aML.REG+S0

;
:
;

7526
7527
7531

R3
R3,R4

: 10.CNT
: 10.CNT,»

7535
7536

; 10.CNT

7535

#40,aML.REG+40

;

7536

PC,GD.BLK.XFER

;

7539

aML.REG+S0

7544

BPL
TRAP

CLR
MOV
ASL
CLR

CMP
BLE

134416
134400

004767

7522

INC

000007
134374

15703 055344

; PAT.CNT,

CMP
BLE

010342

016704

R3,RS

CMP
BLE

15699 055322

15698 055314

7521

INC
ADD

000377

: PAT.CNT,

BIC
BIC
BIS

020327
003770

#3,RS
RS
#170377,RS
#7400, (R4)
RS, (R&)

R3,RS

ADD
SWAB
ASL
ASL
ASL
ASL

005003
010304
006304
005064

ADD
SWAB
BIC
BIC
BIS

MOV

000077

135266
000061
134462

RS
RS
RS
#177417,R5
#360, (R&)
RS, (R&G)

MOV

007400

042705
042714
050514

15683 055240
15684 055242
15685 055246

177417
000360

ASL
ASL
ASL
BIC
BICB
BISB

134346

BISB
MOV

BIC

#4 RS
RS
RS
RS
RS
RS

#7777.R5
#170000, (R&)
RS, (R&)
R3.#13
2%

R2,#77
1%

3s
2

R&
10.BUF (R&)

R3,#377
5%

ML.DUT,R4

#7,3ML.REG+40
R&4,aML.REG+40

MOV

#71,9ML . REG

1ST8

BPL
BISB
MOV

: PAT.CNT,*

. COUNT,+

: 10.CNT,+

17777084

BICB
BISB

JSR

6%:

TOPS
PA:<

6%
#40,aML.REG+40
ML.OUT,R4

7540

MACRO M1113

'HARDWARD TEST SECTION

23-0CT-80 09:11

PAGE 318

9
SEQ 0321

22-0ct=198 01
22-0ct=198 01

JMLG

|
177770
000007
134324
000004
000002

000006

010342

8%:

15751 055576
15752 055602
15753 055606
15754 055610
15755 055612

CLR

000004

MOV
9%:

MOV

000012

v
&~

W
N

2(SP)

. CNT
WRD

COUNT

* PAT.CNT
POS.EXP
* PAT.INC
,+
D
. CNT
WR

#1,(SP)
R

,4(SP)
BUF
(R&4)
10.
R2

+ , TEMP

CNT

+
TEMP,
POS.EXP,*

4&(SP) ,=(SP)

RS,=(SP)
12(SP) ,=(SP)

TOPS

PA:<

PC,BLSGTY
#10,sP

125260

000010

7547
7548
7550
7552
7554
7555

7956

7558
7561

SIZ.EXP,*

=(SP)

PAT.CNT
PAT.INC,+

7565

000001
000020
000004

7566

#WRD.19,-(SP)
#ENC.6,=(SP)

006040
007030
005760
005740
006400
007216
005432
000007

#WRD.12,-(5P)
#WRD.10,-(SP)
#WRD .50, =(SP)
#FNC.18.-(SP)

#SIX_FMT,=(SP)

MOV

#7,-(SP)
SP RO
14
#1,30(5P)

ADD

#4 RS

TRAP

000070
108:

000003

R3,. M3

TRAP

*,DODU.FLG
* POS.EXP
PAT.INC

(SP)

2(SP)

000077

SP,¢

#20,5P

R2
R2,#3
9%

000002
000004
000013

*,SIZ.EXP

5734 055510
5735 055512
5736 055514
5737 055516
5738 055520
5739 055522
5740 055524
5741 055530
5742 055534
5743 055540
5744 055544

MOV

R4, QML .REG*40

#4,6(SP)

2£SP),R4

000004
728 055466
729 055472
730 055474

MoV
7%:

000001
000002

147:44
:45:32

#177770,R6
#7,9ML .REG+40

134330

177777

'CZMLAAD ML=11 LOGIC TEST

CNT

¢
CNT

7567
7564
7570
757
7558

WRD.CNT
* PAT.CNT
PAT.CNT

7574
7552

COUNT
T
COUN,»

7550
7575

MACRO M1113

CIZMLAAD ML-11 LOGI 1 EST
'HARDWARD TEST SECT ION

15766
15767
15768
15769 055650
15770 055652
5771 055654
1

1 5772 055662
1 5773 055664
1 5774 055670

5775 055672
5776 055674
35777 055700

23-0CT-80 09:11

006000
103606
026627
001004
016700

22-0ct=-198 0 10: 47:44
22-0ct=198 0 10 145:32

104451
1046444

062706
000207

000010

ROR
BLO
CMP
BNE
MOV

000001

134276

000012

11%:

;

15795 055702
15796 055706
15797 055710
15798 055712
15799 055714
15800
15801
15802
15807

15808
15809 ;

SEQ 0322

;ML

TRAP
TRAP
ADD
RTS

; Routine Size:

15794 055702

K
9
PAGE 319

004767

104466

177102

006000

103773
000207

RO
4%
10(sP) .M
11%
ML.LUN,RO

221 words

JSR

TRAP
ROR

BLO
RTS

7459

invocation:

' <BLF/PAGE>

19 words

7584

PC,$T34
66

RO
1%
PC

:
_
; Routine Size: 6 werds
; Maximum stack depth per invocation:
7587

7579
7582

L
#12,5P
PC

Maximum stack depth per

134::
1%:

; DODU.FLG,

TOPS

PA:<

0 words

CZMLAAO ML=-11 LOGIC T

HARDWARD TEST SECTION

L
.

EST

MACRO M1113 23-0CT-80 09:17 PAGE %20

15811 ;ML4
15812 ;

15813

15814
15815
15816
15817
15818

7588
7589
7590
7591
7592

!
!
BGNTST;

15820 ;

7594

15821 ;
15822
15823
15824
15825
15826
15827
15828

;
;
;
;
;
;

15829 ;

15830 ;
15831

;

15832 ;

15833 ;
15834 ;

15835 ;
15836 ;

15837 ;

15838 ;

15839 ;
15840 ;
15841 ;
15842 ;

15843
15844
15845
15846
15847
15848
15849

;
;
;
;
:
;
;

15851
15852
15853
15854
15855
15856
15857

;
;
;
;
;
;
;

15850 ;

15858 ;

15859 ;
15860 ;
15861
15862
15863
15864
15865

;

;
;
;
;

SEQ 0323

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

;
;
;
;
;

15819 :

7593

7595

!4+

! TEST NUMBER:

TST 35

! TEST NAME:

SYNC DATA BUS BIT UNIQUENESS TEST/WRITE PATH

7596
7597
7598
7599
7600
7601
7602

!
! TEST DESCRIPTION:
!
!
TEST SYNCHRONOUS DATA BUS FOR
!
DATA BIT UNIQUENESS BY:
!
!
1.
LOADING THE FIRST 16 WORDS IN

7604

7603
7605

7606

7607
7608
7609
7610

!
!
!
!

7611

7613
7614
7615

!
!
!

7617
7618
7619
7620
7621
7622
7623

!
!
!
!
'
!
!

7612

7616

7624

7625
7626
7627
7628
7629
7630
7631

7632

7633
7634
7635

7636
7637
7638
7639

!
!
!
!
!
!
!

!
!
!
!

R
SRS S U TS WS ML Ly SN

THE 10 BUF WITH A SHIFTING

ZERO IN A FIELD OF ONES PATTERN.
2.

VIA MBUS WRITE FUNCTION WRITE

SHIFTING PATTERN THROUGH THE

DATA BUS AND INTO THE GOOD
BLOCK.

VIA DAT DM MODE READ THE

600D BLOCK AND SAVE ALL GOOD

NIBBLE DATA, IN THEIR PROPER
SEQUENCE, INTO A STACK
STRUCTURE
.

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

A JECTOR OF 256 WORDS WHERE

DATA FOR MBUS READS AND WRITE
FUNCTION ARE FOUND.
A GLOGBAL OWN LOCATION TO
THIS TEST.
STACK

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

MACRO M1113

'CIMLAAD ML-11 ng IC TEST

{HARDWARD TEST SECTION

15913
15914
15915
15916
15917
15918
15919
15920
15921

;
;
;
;
;
;
;
;
;

m9
PAGE 321

SEQ 0324
Ll
:32

7640

7641

7642
7643
7644
7645
7646

7647

7648
7649
7650
7651
7652

7653
7654
7655
7656
7657
7658
7659
7660
7661

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

15867 ;ML4
15868 ;
15869
15870 ;
15871 ;
15872 :
15873 ;
15874 ;
15875 ;
15876 ;
15877 ;
15878 :;
15879 :;
15880 ;
15881 ;
15882 ;
15883 ;
15884 ;
15885 ;
15886 ;
15887 ;
15888 ;
15889 ;
15890 ;
15891 ;
15892 ;
15893 ;
15894 ;
15895 ;
15896 ;
15897 ;
15898 ;
15899 ;
15900 ;
15901 ;
15902 ;
15903 ;
15904 ;
15905 ;
15906 ;
15907 ;
15908 ;
15909 ;
15910 ;
15911 ;
15912 ;

23-0CT-80 09:11

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

A VECTOR OF 198 BYTE LOCATIONS
WHERE GOCD NIBBLE DATA IS STORED
WHEN STRIPPING AWAY BAD NIBBLE
LOCATIONS OF A BLOCK.

local
SAV_NIB,

pop0 FLG,
NIB_BIT,
TST PAT
ALL ONES L
ALL ONES 2
STK"PTR,
COUNT;

!STORES THE SHIFTED BIT PATTERN
'DROP UNIT FLAG
'NIBBLE PATTERN
'TEST PATTERN

'HOW MANY '17' NIBBLE PATTERN POSITION TO READ
'HOW MANY "17°' NIBBLE PATTERN POSITION TO READ
'STACK POINTER
'COUNTER

BGNSUB;
CLR_MBUS;

poDU_FLG= ZERO;
TST_PAT
= ONE;
incr CNT from 0 to 15 do
begin

'ONE

IN A FIELD OF ZEROES

'WRITE 16 WORDS WITH SHIFTING O IN FIELD OF 1°'S.

10 BUF [.CNT]) = not .TST_PAT;

rs; PAT
= ,TST PAT‘ONE
en

GD_BLK_XFER ();

MLESY = write;

!SET UP A GOOD BLOCK XFERR
'WRITE SHIFTING PATTERN THROUGH SYNC BUS

'DELAY UNTIL XFER TO COMPLETE

until

.DRY IS_SET;

incr CNT from 0 to 8 do

STK_OFF [.CNT] = ZEROES;

CLR_MBUS;

'ZERO OUT THE NIBBLE OFFSET COUNTERS

= =1;
STK_“PIR
DAT DM_XFER ()
MLCS1
= read;

'RESET THE STACK POINIER
'SET UP A DATA DIAG XFERR AT THE GOOD BLOCK
‘D0 A READ FUNCTION

incr CNT from 0 to 21 do

'LOAD THE STACK WITH ALL GOOD NIBBLE DATA

DELAY (ONE US)

begin

DAT CLK = ONE;

'GET THE FTMJM DATA
!CLOCK OUT THE DATA WORD

RD_LNG_ WRD?

'READ THE DATA DIAG REGISTERS

PD TEMP

.MLPD;

DELAY (ONE_US);

'CIMLAAD ML-11 LOGIC TEST

MACRO M1113

!HARDUARD TEST SECTION
|

23-0CT-80 09:11

N9
PAGE 322

195923 ;ML4

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

}gggg :

TOPS=20 Bliss=16 v2(206)

22-0ct=1980 10:45:32

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

15926 :
15927 ;

7692
7693

15930
15931
15932
15933
15934
15935
15936
15937
15938
15939
15940
15941
15942

;
;
;
;
;
;
;
:
;
;
;
;
;

7696
7697
7698
7699
7700
7701
7702
7703
7704
7705
7706
7707
7708

STK_PTR = =1;
NIBIBIT = ONE.
ALL_ONES_1 = ZER

'RESET THE STACK POINTER
'SHIFTING NIBBLE PAT OF 1 IN FIELD OF 0°'S
'READ NO '17' NIBBLE PATTERN ON FIRST PASS

15945 ;

7711

incr BY_FOUR_WRDS from 0 to 3 do

'READ 4 GROUPS OF & WORDS

15947 ;
15948 :;

7713
7714

}gg%g :

}ggzz 3

15946 ;
15949 ;

;ggg

;;?g

7712
7715

15950
15951
15952
15953
15954
}g;gg

;
;
:
;
;
:

7716
77
7718
7719
7720
;;g;

15957
15958
15959
15960
15961
15962
15963

;
;
;
;
;
;
;

7723
7724
7725
7726
7727
7728
7729

15965
15966
15967
15968

;
:;
;
;

7731
7732
7733
7734

15971
15972
15973
15974
15975

;
;
;
;
;

15964 ;

}2398 :

15976 :
15977 ;

incr NIB_PTR from 0 to 8 do
begin

STK_PTR = ,STK_PTR + 1;

7737
7738
7739
7740
7741

7742
7743

' INCREMENT THE STACK POINTER

it .PD_TEMP [.NIB_PTR) IS_SET
'SEE IF THIS IS A GOOD NIBBLE
then
STK_OFF [.NIB_PTR] = .STK_OFF [.NIB_PTR] + 9
' INCREMENT NIBBLE OFF SET IF BAD
else
LOAD_STACK (.STK_PTR, .NIB_PTR);
'ELSE LOAD THE STACK WITH GOOD NIBBLE DATA
end;

end;

ALL_ONES_2 = 3;

'READ THREE "17' NIBBLE PATTERN ON FIRST PASS

begin

incr BY LONE_WRD from 0 to 3 do

'READ 4 GROUPS OF

begin

COUNT
= ZERO;

'CLEAR COUNT

until

'READ X NUMBER OF

.COUNT eql .ALL_ONES_1 do
egin
COUNT = .COUNT + 1;
STK_PTR = .STK_PTR + 1;

WORD

'17' NIBBLE PAT

' INCREMENT COUNT
' INCREMENT STACK POINTER

it (.stack [.STK_PTR]) neq %o0'000017'
'COMPARE STACK WITH *17°
then
g1n
'ERROR AND SET DODU_FLG IF NEQ
RRDF (90, SYNC, 0);
PRINTB (Slx FMT, WRD_23, WRD 39, PHR &, WRD 12, FNC _5, WRD_19);

PRINTB (FMTTMS, ONES,
DODU_FLG
= ONE;
end;
"

7730

;;gg

'LOOK AT 9 NIBBLES

.stack [.STK _PTR1,

.STR_ PTR);

end;
STK_PTR = ,STK_PTR ¢ 1;

'INCREHENT THE STACK POINTER

SAV'NIB = ( nof .NIB _BIT) and (%0'000017%)

'GENERATE THE SHIFTED BIT

it (.stack [.STK_PTR]) neq (.SAV_NIB)
'COMPARE STACK TO SHIFTED BIT
then
8
'ERROR AND SET DODU_FLG IF NEQ
RRDF (91, SYNC, 0);
PRINTB (Slx FMT. WRD _23, WRD_39, PHR_4, WRD_12, FNC_5, WRD_19);
PRINTB (FMT15, .STK “PIR);
PRINTB (FMTTS, .SAV_RIB, .stack [.STK_PTR));

15982
15983
15984
15985
15986
15987
15988
15989
15990
15991
15992
15993
15994
15995
15996
15997
15998
15999
16000
16001
16002
16003
16004
16005
16006
16007
16008
16009
16010
16011
16012
16013
16014
16015
16016
16017
16018
16019
16020
16024
16028

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

055716

16029 055722
16030 055726
16031 055730
16032 055736

———

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

15979 :ML4

15980 :
15981

SEQ 0326

7744
7745
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
7771
7772
7773
7774
7775
7776
7777
7778
7779
7780
7781
7782
004167

162706
104402
152777
016705

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4&.BLI.2 (77)

DODU_FLG = ONE;

end;

'CLEAR COUNT

COUNT = ZEROES;

until

.COUNT eql

.ALL_ONES_2 do

egin

'READ X NUMBER OF

"17' NIBBLE PAT

' INCREMENT COUNT
'INCREMENT STACK POINTER

COUNT = _COUNT + 1;
STK_PTR = ,STK_PTR + 1;

it (.stack [.STK_PTR])) neq %0'000017'
'COMPARE STACK POINTER WITH
then
'ERROR AND SET DODU_FLG IF SET

‘*17°'

Palor (92, SYnC. 0):

PRINTB (SlX FMT, URD 23 WRD 39, PHR 4, WRD 12, FNC_5, WRD_19);

PRINTB (FMTTMS, ONES,

DODU_FLG = ONE;

.stack [.sTk PTRJ STK_ PTR);

end;
end;

NIB_BIT =
end;
NIB_BIT = ONE

ALL_ONES_1 =
ALL 0NES_2 =
end;

'SHIFT THE SHIFTED NIBBLE BIT

_NIB_BIT*ONE;

.ALL_ONES_1 + 1.
,ALL_ONES_2
= 1;

'RESET THE SHIFTED NIBBLE BIT

'READ ONE MORE '17' PATTERN
'READ ONE LESS '17' PATTERN

ENDSUB;

‘DROP THIS UNIT IF DODU_F(G SET

if .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;

ENDTST;

126136
000016

000040
134226

$735:

134002

JER
SuB
TRAP

BISB
MOV

R1,$5AVES
#16,5P
2

#40,aML .REG+40

ML.DUT,RS

7586

7656
7658

WARDWARD TEST SECTION

|
|

WACRO 1113 23-0CT-80 09:11 PAGE 323

'CIMLAAD ML=11 LOGIC TEST

CIMLAAO ML=11 LOGIC TEST

'HARDWARD TEST

MACRO M1113 23-0CT=80 09:11 PAGE gz«

SECTION

16034

sMLG

}gggz
042705
142777

16040 055760

005016

16043 055772

010405

16041 055762
16042 055770

16044 055774
16045 055776
16046 056004
16047 056010
16048 056014
16049 056016
16050 056022
16051 056024
16052 056030
16053 056036
16054 056042
16055 056044
16056 056046
16057 056052
16058 056054
16059 056060
16060 056062
16061 056070

16062 056074

150577

012766
005004

006305
016665
005165
006366
005204
020427
003763
004767
012777
105777
100375
005005
105065
005205
020527
003772
152777
016705

042705

177770
000007

133740

000001

000010
010342
000010

133632

177770

000001

16082 056204

016705

16086 056220
16087 056222
16088 056224

001404
005066
005305
001374
005304
000766

3s:
4%:

133650

012704

16083 056210
16084 056212
16085 056216

123642

000040
134074

16080 056176

001411

010342

000010

000007
133626
177777
134504
000071
00000%

16081 056202

CLR

000010

011342

142777
150577
012702
004767
012777
012704
001411
016705
001404
005066
005305
001374
005304
000766
005003
017767

152777

BISB

000017

134512
000061
133706

000014

6$:
7%:

133742

000020
123706

000014

133472

133622

8s:
9%:

108:
11$:
12%:

RS.aML.REG+40

: DODU.FLG

7660

R4 ,RS

: CNT,*

7665

ASL
MOV
COM
ASL
INC
CMP
BLE
JSR
MOV
1STR
BPL
CLR
CLRB
INC
CMP
BLE
BISB
MOV

RS
10(SP), 10.BUF (RS)
10.BUF (RS)
10(SP)
R4
RG, M7
2%
PC,GD.BLK.XFER
#61,aML.REG
@ML.REG+S0
3$
RS
STK.OFF (RS)
RS
as 10

cao ML .REG+40
ML .DUT,RS

BICB
BISB
MOV
JSR
MOV
MOV
BEQ
MOV
BEQ
CLR
DEC
BNE
DEC
BR
CLR
MOV

#7,3ML.REG+40
RS.aML.REG*40
#-1,R2
PC,DAT.DM . XFER
#71,3ML.REG
#.,R4
8
LSDLY,RS
7%
14 (SP)
RS
63
R&
5%
R3
aML.REG+230,PD. TEMP

MOV

#1,R4

BISB
BEQ
MOV

BEQ
CLR
DEC
BNE
DEC
BR

PA:<

(SP)

#1,10(5P)
R&

MOV

TOPS

#177770,R5
#7,aML.REG+40

MOV
CLR

BIC

133550

123754

22-0ct=1980 10:45:32

BIC
BICB

133764

28:

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

22-0ct=1980 10:47:44

16037 055742
16038 055746

16039 055754

SEQ 0327

:
:

w,TST.PAT
CNT

TST.PAT,*

:
:

TST.PAT
CNT

CNT,»

7661
7663

7666
7663

;
:
;

7669
7670
7674

: CNT
; *(CNT)
: CNT
:OINT,*

7676
7677
7676

;

7677

: «,STK.PIR
2
;
: o« ,$8TMP2

7680
7681
7682
7683

#177770, RS

#20,aML.REG+120
13§

LSDLY,RS

12%
14 (SP)
RS
1%
R4
10%

; o+, 88TMPI
; $SSTMP
. $STMP
:

$$TMP?2

:
:

CNT

:ox,$8TMP2
; o+, $8TMPI

; $STMP
: $STMPI
:

$$TMP2

7685
7687

7688
7689

MACRO M1113 23-0CT-80 09:11 PAGE gZS

CIMLAAD ML-11 L 0GIC T EST
'HARDWARD TEST § ECTION

13%:

16094 056234

16095 056242

16096 056250

14%:

0O 4 [elelelelelelelelelalalelald

ooocorOn
NN
SN
SO SO
VIV

goNo

oo oo
NN WWNW

Vi Vi

DEC
BNE
CLR
BISB

ADD
MOovB

RS, =(SP)

NIB.PTR,*

R&
R4
R4
#PD.TEMP
R4
R4 ,=(SP)

2177770, (sP)

RO
15%
R&

,R&4
OFF
STK.(RS)

#11.R4
R4, STK.OFF
(RS)
16$

000004

Mov

#3,4(SP)

CLR

198:

000006

000017

CLR
CLR
CLR
CMP
BEQ
INC
INC
CMPB
BEQ
TRAP

.WORD
.WORD
.WORD
MOV

NIB.PTR,*

7692
7694
7696

#10,5P

000002

JSR
CMP
INC
CMP
BLE
INC
CMP
BLE

STK.PTR

TOPS
PA:<

n,-(SP)
-($P)
PC,BLSGT2

MOV
Mov

17%:

006040

NIB.PTR

RS
RS,#10
14$
R3
R3,#25
9%
#-1,R2
#1,2(SP)

16%:

000025

012746

RS
R2
RS, R4

R2,-(SP)
RS .=(SP)

000010

011354

P
aML.REG+17 0,D1.TEM
.
aML.REG+200,D2.TEMP
ML .REG+16 0,E2.TEMP

MOV
MoV

133620

W
~
~N

JSR

ADD

15%:

nathJNJ-O—ha-a-a-a-a-n-‘-ac>c><><>c>gz
WNN=0O0~NOW
oo
~ W= O VRNV
o

BIC

011342
000011
011342

000003

MOV
ASR
ASR

MoV
CLR

124570
000010

177777
000001
000006

CLR
INC

ADD
MOV
MOV

177770
000001

56316
56320

MOV
MOV
MoV

ASR

011662

PR
N 1Lt NV S

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

‘ML

16090
16091
16092
16093 056226

Ltk

SEQ 0328

PC.LOAD.STACK
(SP)+,(SP)+

,*
*(NIB.PTR)

* «*(NIB.PTR)
STK.PTR,
+

NIB.PTR,*

7698

7696
7700

NIB.PTR
NIB.PTR,*

7692

CNT
CNT,

7685

*,STK.PTR

6(SP)

* ,NIB.BIT
ALL .ONES.1

* ,ALL.ONES.?2

R1,6(SP)

BY.FOUR.WRDS
BY.ONE .WRD
COUNT
T
.ONES.1
UN
,ALL
CO

7706
7707
7708
7709
71
7714
716
7718

COUNT
STK.PTR
)
*(STK.PTR,*

7720
72
7723

20%

R1
R2

STACK(R2) ,#17
19%

7726

0
#URD.19,-(SP)

1727

132
SYNC

CIZMLAAD ML-11 LOGIC TEST

MACRO M1113 23-0CT-80 09:11 PAGE 526

HARDWARD TEST SECTION

16146

MLG

}2}2;

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

16149 056464

012746

007020

MOV

#ENC.S,=(SP)

16151 056474

012746

006630

MOV

#PHR .4, = (SP)

006076
005432
000007

MOV
MOV
MOV
MOV
TRAP
MOV
CLR
MOVB
MOV
MOV

16150 056470
16152 056500

16153 056504
16154 056510
16155 056514
16156 056520
16157 056522
16158 056524
16159 056526
16160 056530
16161 056534
16162 056540
16163 056544

16164 056550
16165 056552
16166 056554

16167 056562
16168 056566
16169 056570
16170 056572
16171 056600

16172 056606

012746
012746

012746
012746
012746
010600
104414
010216
005046
116216
012746
012746
012746

010600
104414
012766

062706
000717
005202
012766
046666

005003

16173 056610
16174 056614
16175 056620

156203
020366
001455

16177 056624
16178 056626
16179 056630

000133
007500
000000

16181 056636

012746

16176 056622

16180 056632

1613§ 056642
16183

056646

16184 056652

16185 056656
16186 056662
16187 056666
16188 056672
16189 056674

16190 056676
16191
16192
16193
16194

SEQ 0329

056700
056704
056710
056712

16195 056714

16196 056716
16197 056722
16198 056726
16199 056732

005760

MOV

006250

MOV

011354
177777
004366
000004

MOV

000001
000030

000030

000017

000012

000002

011354
000012

104455

000012

MOV
TRAP
MOV

208:

ADD
BR
INC
MOV
BIC

010216

006076
005432
000007

032746
012746
010600
104414

005106
000002

116216
016646
012746
012746

011354
000036
004366
000003

005016

16200 056736 010600

#30,5P
198
R2
#17,12(SP)

2(SP),12(5P)

SP,
¢

STK.PIR,*

*(STK.PTR),*

7728

: SP,#

: *,DODU.FLG
:
:

: STK.PTR
: v,SAV.NIB

* NIB.BIT,SAV.NIB

7734
7735

7740

#WRD.19,-(SP)

;

77461

MOV

#ENC.S,=(SP)

MOV

MOV
MOV
MOV
MOV
TRAP

MOV

#(STK.PIR),*
«,SAV.NIB

7737

#PHR .4, - (SP)

#WRD.39,-(5P)

#WRD .23, =(SP)
#SIX.FMT,=-(SP)
#7.,-(SP)
SP.RO
14

R2, (SP)

#EMT.15,-(SP)
#2,-(SP)
SP.RO
14

MOVB
MOV
MOV
MOV

STACK(R2),(SP)
36(SP), = (5P)
#EMT.S.=(SP)
#3,-(5P)

MOV

P
:

#WRD.12,-(SP)

MOV
MOV
MOV
TRAP

CLR

7729
7725
7718

;

STACK(R2),R3
R3,12(SP)
21%
133
SYNC
0

MOV

012746
012746
012746
010600
104414

SP.RO
14
#1,30(5P)

;

005760

006250

0 ,-(SP)

.WORD
.WORD
WORD

012746

#WRD .23, =(SP)
#SIX.FMT,=(SP)
#7,-(5P)
SP.RO
14
R2, (SP)
-($P)
STACK(R2),(SP)
#-1,-(5P)
#ENMT.S,=(SP)

TRAP

BISB
CMP
BEQ

MOV

006630

#WRD.39,-(SP)

006040

012746

#WRD.12,=(5P)

CLR

012746

007020

TOPS

PA:<

; SP,#

. STK.PTR,+

7762

: SP,#

(SP)

SP.RO

; SP,#

; *(STK.PTR)
,*
SAV.NIB.*

7743

MACRO M1113

CIMLAAD ML-11 L

HARDWARD TEST

000001
000032

uNNNNNNNNNNNNNNNNNNNNN

011354

CLR
CMP

BEQ
INC
INC
(MPB
BEQ
TRAP
.WORD
.WORD
.WORD

000017

006040
007020
005760
006630
006250
006076
005432
000007

CLR

MOVB
Mov
MoV
MOV
MOV
TRAP
MOV
ADD

177777

004366
000004

v
~

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV

011354

SEQ 0330

22-0ct=19
22-0ct=19
TRAP
MOV
ADD

000032

000004

3? 057056

N
W
(V1
¥]

)
D
il
i
D el
D el
D
D
i
D
i
D i
D i
D
i
D
il
D
i

16208 056754

F 10

PAGE 327

SMLG

16202
16203
16204
16205 056740
16206 056742
16207 056750
ooorororOrOFOFOCOCOMOCOOOCOMOrOOrOrOrONOFOMOM

23-0CT-80 09:11

000001
000030

000030

23%:

000002

000003
177264
000001

000006
000004

000002

24%:

000003
177230

000167
021627

176522

000001

25%:

26%:

#1,32(5P)

*,DODU.FLG

R
R1,4(SP)

COUNT
COUNT ,ALL.ONES.2

R
R2

COUNT
STK.PTR

#35,5P
23%

STACK(R2) ,#17
22%
55
134

INC
CMP
BGT
JMP

TRAP
ROR

BHIS
JMP
(MP

7744
7739
7747
7749

775
7752
7754
7757

7758

#WRD.19,-(SP)
#ENC.S,=(SP)

#WRD.12,=(SP)
#PHR .4, =(SP)

#WRD.39,-(SP)
#WRD.23,-(SP)

#SIX.FMT,=(SP)
#7,-(SP)

SP RO

14
R2, (SP)

STK.PIR,

(SP)
STACK(R2),

,+
*(STK.PTR)

-($P)

#-1,-(5P)

7759

#ENMT.S,=(SP)
0 ,-(SP)

SP.RO

14
#1,30(5P)

SP,¢

*,DODU.FLG
NIB.BIT
BY.ONE .WRD
BY.ONE.WRD
,*

INC
(MP

INC
DEC

TOPS
PA:<

SYNC

ASL

MoV

)
*(STK.PTR,*

BGT
JMP

47:44
145:32

#1,2(SP)

6(SP)

4L (SP)

¥
H
R4

25%

* NIB.BIT

ALL .ONES.1
A_L.ONES.2
BY.FOUR.WRDS
BY.FOUR.WRDS,*

17%

7760
7756
7749
7765
7714

7768
7769
7770
771

26%

1%
(sp)y,n

DODU.FLG,*

7775

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113 23-0(T-80 09:11 PAGE 328

16258

MLG

16261 057210

001004

16263 057216
16264 057220

104451
104444

16262 057212
16265 057222

16266 057226
16267

016700

132750

062706

000016

(000207

16268
16269

16274
16275
16279
16283 057230

16284 057230

16289

22=0ct=1980 10:47:44

22-0ct=1980 10:45:32

;

}gszg

16285
16286
16287
16288

SEQ 0331

057234
057236
057240
057242

27%:

27%

MOV

ML.LUN,RO

7778

ADD

#16,5P

7586

7780

TRAP
TRAP

RTS

51
44

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

004767

104466
006000
103773
000207

176462

16290

135::

1%:

JSR

TRA’
ROR
BLO
RTS

; Routine Size:

7783

! <BLF/PAGE>

26 wcrds

PC,$135
66
RC
1%
PC

6 words
: Maximum stack depth per invocation:

16291

16296
16297
16298 ;

BNE

T0PS

PA:<

0 words

CITM AAD ML=11 LOGIC TEST
HMARDWARD TEST SECTION

MACRO M1113

23-0CT-80 09:11

H 10

PAGE 329

16300 ;MLé

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

}g%g% :
16303 ;

16304 ;
16305

16306 ;
16307 ;
16308 ;

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

7785
7786

}g%?g 3

;;g?

&+
' TEST NUMBER:
!

16311
16312
16313
16314
16315
16316
16317

;
;
;
;
;
;
;

7792
7793
7796
7795
7796
7797
7798

'
!
!
!
!
!
!

16320 ;
16321 ;
16323 ;
16324 ;

16322 ;

; TEST NAME:

VIA MBUS WRITE FUNCTION WRITE SHIFTING PATTERN INTO THE GOOD BLOCK.

7801
7802

!
!

CLEAR THE

7804
7805

!
!

VIA MBUS REA. FUNCTION READ THE SHIFTING PATTERN THROUGH THE

INTERIGATE THE I0_BUF FOR THE SHIFTING PATTERN.

7803

}g%%% :

;g}?

7808
7809

;

7812

16334 ;

7815

16532 ;
16333 ;

16335 ;
16336 ;

16337 ;
16338 ;

TEST DESCRIPTION:
TEST SYNCHRONOUS DATA BUS READ
PATH FOR DATA BIT UNIQUENESS BY:

;

;;33

!
!

16331

SYNC DATA BUS BIT UNIQUENESS TEST/READ PATH

LOADING THE FIRST 16 WORDS IN THE
ZERO IN A FIELD OF ONES PATTERN.

7806
7807

TST 36

16325 ;
16326 ;
16327 :
16328 ;

TOPS=20 Bliss=16 v2(206)

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

BGNTST;

7787
7788
7789

}g%}g 3

SEQ 0332

7813
7814
7816
7817

!
!

[0_BUF WITH A SHIFTING

10_BUF.

READ PATH.

IMPLICIT INPUTS:
10_BUF

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE FUNCTION ARD FOUND.

low

local
DODU_FLG,

'DROP UNIT FLAG

TST_PAT;

'TEST PATTERN

CLR_MBUS;

7818
7819

0pODU _FLG = ZERO;
TST_PAT = ONE;

'ONE IN A FIELD OF ZEROES

16340 ;

7821

incr CNT from O to 15 do

'WRITE 16 WORDS WITH SHIFTED O IN A FIELD OF 1'S

16342 ;

7823

16339 ;

16341

;

16343 ;

16344 ;
16345 ;

16346 ;
16347 ;

7820

7822

begin

10 BUF [.CNT] = not

7824

7825
7826

.TST_PAT;

TST_PAT = _TST_PAT*ONE;

end;

7827
7828

GD_BLK_XFER ();
MLTS! = write;

'SET UF A GOOD BLOCK XFERR
'"WRITE SHIFTING PATTERN

16349 ;

7830

'DELAY UNTIL XFER TO COMPLETE

16353 ;
16354 ;

7834
7835

BGNSUB;

16348 ;

16350 ;
16351 ;
16352 ;

7829

7831
7832
7833

0
wuntil .DRY IS_SET;

MACRO M1113

CIMLAAD ML-11 LOGI c1 EST

HARDWARD TEST

SECT ION

23-0CT-80 09:11

1.10
PAGE 330

SEQ 0333

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

16356 ;ML4
16357 ;
16358
16359
16360
16361
16362
16363
16364
16365
16366
16367

incr CNT

'CLEAR OUT THE 10_BUF

from 0 to 15 do

10_BUF [.CNT] = ZEROES;

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

'SET UP A GOOD BLOCK XFERR
'READ SHiFTING PATTERN THROUGH SYNC BUS

'!DELAY UNTIL XFER TO COMPLETE

TST_PAT = ONE;

!SHIFTING PATTERN

incr CNT from 0 to 15 do
begin

'READ [0_BUF FOR SHIFTING O IN FIELD OF

CLR_MBUS;

GD_BLK_XFER ();
MLES1 = read;

16382
16383
16384

L I
L
L
R
L I T

.10_BUF

N T I T

then

[.CNT] neq

(

not

.TST_PAT)

'COMPARE

[0_BUF

1°'S

TO SHIFTED PAT

'ERROR AND SET DODU_FLG IF NEQ

begin

ERRDF (93, SYNC, 0);
PRINTB (FIV_FMT, WRD_23, FNC_6, WRD_19, WRD_39, PHR_4);

T T

PRINTB (FMT 2, ( not .TST_PAT), .10_BUF (.CNT], ( not .TST_PAT xor .I10_BUF [.CNT]));
Dogu_rLG = ONE;

end,
R

16371
16372
16373
16374
16375
16376
16377
16378
16379
16380
16381

ST_ PAT =
end;

A TETE LR R DI DI TR R

16368
16369
16370

0
until .DRY IS_SET;

I TRETEIETITE

16385
16386
16387
16588
16389
16390
16391
16392
16393
16394
16395
16396
16400
16404 057244

16405 057250
16406 057256
16407 057262
16408 057266
16409 057274

'SHIFT THE PATTERN AND REPEAT

.TST_PAT*ONE;

ENDSUB;
it .DODU_FLG
)
then
begi n

'DROP THIS UNIT IF DODU_FLG IS_SET

IS_SET

DODU (.ML_LUN);
DOCLN;

end;

7872
7873

ENDTST;

004167

124610

152777

000040

132462

1462777
150577

000007

132444

016705
042705

132706
177770

132440

$736:

JSR
BISB
MOV

R1,$SAVES
#40,aML.REG+40
ML.DUT,RS

BICB
BISB

#7,3ML.REG+40
RS,aML.REG+40

BIC

#$177770.RS

7782
7815

'HARDWARD TEST

MACRO M1113

SECTION

J_10

PAGE 331

SEQ 0334
22=0ct=19 01
22-0ct=19 01

JMLG

005005
012704

CLR

Mov

1%:

16420 057320
16421 057324
16422 057326
16423 057330
16424 057334
16425 057336
16426 057342
16427 057350
16428 057354
16429 057356
16430 057360

ASL

INC
CMP
BLE
JSR

000017
133200
000041
132374

132330

2%:

FINIIIIINSS

3%:

D e

000017

D e

4%:

010342

000040
132554
177770
000007
132306

—

40 057420

VWAV w
NNNNNNNSN ~
VIV VIV
VAW i

133104

000071
132300

MOV

BIC
BICB
BISE
JSR

132312

132234

5%:

MOV
1STB
BPL
MOV

uwNN-‘—.-flg R
[« ,NT<
A NT. 3 o

006630
006250

#,RG

R4,10.BUF (R1)

10.BUF (R1]

CNT
¢+
CNT,

10.BUF (R1)

RO
RO,#17
43
#40,aML
. REG+40
ML.DUT,R3

47
4

TOPS
PA:<

7818
7819
7821
7823

TST.PAT,«
TST.PAT

7824
7821

7827
7828
7832

aML.REG+50
SS

CNT
CNT ,*

7836
7837

CNT
CNT ,»

7836

7837

#177770,R3

#7,3ML .REG+40

R3,aML.REG+40

7840

PC.GD.BLK.XFER

7841
7845

#71,3ML.REG

2:L.REG*50
#1,R4

.WORD
.WORD
.WORD

MOV
MOV
MOV
MOV
MOV
MOV

* TST.PAT

PC,GD.BLK.XFER
#61,aML.REG

COM
CMP
BEQ

MOV
ASL
MOV
ADD
MOV

DODU.FLG

CNT
CNT,»

R2
R2,R1
R1
#10.BUF ,R3
R1,R3
R4 ,R1
R1
(R3),R1
7%

CLR

TRAP

MOV
ASL

BLE
BISB

132330

CLR

INC
CMP

6%:

010342

MoV
1ST8
BPL
TRAP

CLR

000001

Vo ~yOrW
NN
VB

=l=lelelalelell

P33T

i
D e
h
e
i
e

CLR

Mov
ASL
MOV

COM

16441 057426
16442 057432
16443 057436
16444 057444
16445 057450
16446 057452
16447 057456
16448 057460
16449 057462
16450 057464
16451 057470
52 057472
5 3 057474
5 4 057476
5 057500
5
5
5
5

r—

23-0CT-80 09:11

CZMLAAD ML-11 LOGIC TEST

55
135

* TST.PAT

CNT
CNT,+

7847
7849
7852

TST.PAT
¢+

7855

SYNC

#PHR .4, - (SP)

#WRD.39,-(SP)

#WRD.1G.-(SP)
#ENC.6,-(SP)

#WrRD.2%,-(sP)

#FIV.FMT,-(SP)

7856

CZMLAAD ML-11 LOGI ¢ 1EsT

MACRO M1113

'HARDWARD TEST SECTION
|
16467

}2223

16470 057542

012746

16473 057552

011316

16471 057546
16472 057550
16474 057554
16475 057556
16476 057562
16477 057566
16478 057570
16479 057572
16480 057574
16481 057600
16482 057604
16483 057606

16484 057610
16485 057614
16486 057620
16487 057622
16488 057624

12298 057654

MOV

MOV
BIC
BIC
BiS
MOV
MOV
MoV
MOV
MOV
TRAP

0000602
000002

004224
000004

000001
000026

78:

000017

MoV
ADD
ASL
INC

#6,=(SP)
SP.RO
14

(R3),(5P)

7862

; DODU.FLG

7866

MOV

ML .LUN,RO

7869

TRAP

7782

7871

R2,#17

001004

BNE

DEC

104444

TRAP

8%:

16500

RTS

; Routine Size:

16501

; CNT,
e

133 words

; Maximum stack depth per invocation:

16506
16507
16511

16515 057656

16516 057656

16517 057662
16518 057664
16519 057666
16520 057670

16525 ;ML4

004767

104466
006000
103773
000207

177362

136::

1%:

JSR

TRAP
ROR
BLO
RTS

PC,8T36
66
RO
1%
PC

17 words

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

22-0ct-1980 10:45:32

}gggg ;

16528 ;
16529 ;

7875
7876
7877
7878
7879

16530 ;
16531 ;
16532 ;

16533 ;
16534 ;
16535
16536 ;

!
!
BGNTST;

7880
7881
7882
7883
7884

16537 ;

: SP,»

#1,R5
#26,5P
R4
R2

RO
3%

000207

T R

!++

! TEST NUMBER:
!
! TEST NAME:
!
'

TST 37

ARRAY ADDRESS MUX TEST

TEST DESCRIPTION:

——

7857

7858
7854
7861
7849

TRAP

132316

SP,»

R1,=(SP)
2(SP),(SP)
R1,2(SP)
(SP)+,(SP}
(R3),=(SP)
R1,-(SP)
#FEMT.2,-(SP)
#4,-(SP)
SP,RO
14

ROR
BLO

104451

PA:<

; *,DODU.FLG
}
; TST.PAT
; ONT

CMP

104467

016700

16497 057652

MOV
TRAP

006000
103647

16495 057644

16496 057650

MOV

005305

SEQ 0335
22-0ct=1980 10:47:44
T0PS

22-0ct=1980 10:45:32

BLE

16493 057640

16494 057642

000006

012705
062706
006304
005202

16491 057634
16492 057636

16490 057632

PAGE 332

010146
046616
040166
052616
011346
010146
012746
012746
010600
104414

020227
003713

K10

JMLG

010600
104414

16489 057630

23-0CT-80 09:11

TOPS-20 Bliss=16 v2(206)

PA:<NEALE>BL2ML4.BL1.2 (79)

MACRO M1113 23-0CT-80 09:11 PAGE %32-1

CIZMLAAD ML-11 LOGIC TEST
L L]
R LR L A L
L T

P LA R

16538
16539
16540
16541
16542
16543
16544
16545

E L
T

SEQ 0336

TEST FOR UNIQUE MOS RAM ROW

;

AND COLUMN ADDRESSING BY:

FIRST FINDING A ERROR FREE

WRITE A BACKGROUND OF ALL

WRITE ZEROES INTO THE FIRST

READ REMAINING BLOCKS IN

|
i
:

:
:

16K OR 64K CHUNK OF MEMORY.
THIS REPRESENTS ONE ROW OF
EITHER 16K OR 64K MOS RAMS.

ONES INTO THE GOOD CHUNK
BLOCK OF THE GOOD CHUNK.
GOOD CHUNK FOR ONES.

T T T
R T T

g
i
i
i

10_BUF
A VECTOR OF 256 WORDS

WHERE DATA FOR MBUS
READ AND WRITE TRANSFERS

CAN BE FOUND.

R TR P

P P

g IMPLICIT INPUTS:

local
DSA_ADRS,

!DSA ADRS COUNTER

DSA_ADRS = ZEROES;
DSA"ADRS = .DSA_ADRS = .RAS_INC;

'REST DSA COUNT

'FOUND GOOD 16K/64K CHUNK FLAG

FND-GD_CHK;

10 BUF = ONES;
BAT = ONE;

'DISABLE ECC

R
IR

begin
DSA_ADRS = .DSA_ADRS +

'LOAD FIRST 10 BUF WORD WITH ONES

'SET ON FIRST TO BUF WORD

ECC_DIS = ONE;

W
w

L *J

—

HARDWARD TEST SECTION

!DO UNTIL FOUND GOOD CHUNK OR LBT
.RAS_INC;

' INCREMENT DSA ADRS COUNTER

CZHLAAO ML-11 LOGIC TEST

MACRO M1113

'HARDWARD TEST SECTION

23-0CT-80 09:11

m10

PAGE 333

16581 ;ML4

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

}g;fi% :

22-0ct=1980 10:45:32

16584 ;

7927

MLWC = U C SIZE;

'16K OR 64K WORDS

16587
16588
16589
16590
16591

;
;
;
;
;

7930
7931
7932
7933
7934

ML_FUNC = write;

'DO A WRITE FUNCTION

16593
16594
16595
16596
16597

;
;
;
;
;

7936
7937
7938
7939
7940

16600 ;

7943

16585 ;

16586 ;
16592 ;

16598 ;
16599 ;

16601 ;

16602
16603
16604
16605
16606
16607
16608

7928

7929
7935

16610 ;
16611 ;
16612 ;

7953
7954
7955

16013 ;

16617 ;

7960

16618 ;

16619 ;

16620 ;

16621 ;

16622 ;
16623 ;

if .SC IS_NOT_SET
then
begin

'DID XFERR CAUSE AN SC

MLWC = .W_C_SIZE;
MLBA = 10°B0F;

MLDA = .DSA ADRS
ML_FUNC = WRT_CHK

7959

'1S THIS CHUNK GOOD

begin

'
end

begin

CLR_MBUS;

BAI = ONE

7964

end;

7965
7966

'YES SET FLG

INO, CLR AND DO NEXT CHUNK

end;

7962

7963

'LOAD DSA ADRS
'DO A WRITE CHECK FUNCTION

it .SC IS_NOT_SET
then
FND_GD_CHK
= ONE
CLR_MBUS;
BAl = ONE
ECC_DIS = ONE;

7961

'LOAD WORD COUNT
'LOAD UBUS ADRS

'DELAY UNTIL XFER TO COMPLETE

else

'XFERR WAS 0K

0
until .DRY IS_SET;

7956

7957
7958

16616 ;

'DELAY UNTIL XFER TO COMPLETE

0
until .DRY IS_SET;

7952

16614 ;
16615 ;

'LOAD UBUS ADRS

'LOAD DSA ADRS

7944

7945
7946
7947
7948
7949
7950
7951

80F ;

MLDA = oSA ADRS

7941
7942

;
;
;
;
;
;
;

16609 ;

MLBA =

TOPS=20 Bliss=16 v2(206)

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

'THIS CHUNCK IS BAD TRY NEXT CHUNCK
'CLR AND TRY AT NEXT CHUNCK

ECC_DIS = ONE;

end

;gg;

until (.FND_GD_CHK IS_SET ) or (.LBT IS_SET );

!REPEAT UNTIL FOUND GOOD CHUNCK OR AT LBT

16626 ;

7969

if .LBT IS_SET

'IF AT LBT THEN ERROR AND DROP UNIT

16629 ;

7972

}22%% :
16627 ;
16628 ;

16630 :

16631 ;

16632 ;

16633 ;
16634 ;

16635 ;

7970
7971

then

ERRDF (111, INTER, 0);

7973

PRINTB (FIV_FMT, FNC_13, FNC_17, WRD_52, WRD_60, WRD_56);
PRINTB (THRTFMT, WRD_14, PHRZ10, FNC_"155;

7974
7975

7976
7977

7978

begin

poDU (.ML_LON);

else

DOCLN;
end

'A GOOD CHUNCK WAS FOUND CONTINUE TEST

'CZMLAAD ML-11 L0
g%g
TEST

MACRO M1113

HARDWARD TEST
§
SE

23-0(T-80 09:11

16637 ;MLG
16638 ;

BAl = ONE:

7983
7984
7985

10 BUF = ZEROES;
MLDA = .DSA_ADRS;
MLWC = not 255;

[+ ]

o
o

7986
7987
7988
7989
7990
7991
7992
7993

T
T
TN
TR
DI
DI
DI
PR DETRLR DI
TETE
A
DR TR TE

MLBA = 10_BUF;
ML_FUNC = urxte.

'DISABLE ECC
'FIRST BLOCK IN CHUNCK GETS ZEROES
'LOAD DSA
*LOAD WORD COUNT
‘LOAD UBUS ADRS
‘D0 A WRITE FUNCTION

'DELAY UNTIL XFER TO COMPLETE

0
until .DRY IS_SET;
CLR_MBUS;

BAI= ONE;

7996
7997
7998

ECT_DIS = ONE;
MLDK = .DSA ADRS + 1;
MLBA = 10 BOF;

8000

ML_FUNC ="WRT_CHK;

'LOAD DSA WITH NEXT DSA INCREMENT
'LOAD
UBUS ADRS
'LOAD WORD COUNT WITH LESS ONE BLOCK
'DO A WRITE CHECK FUNCTION

'DELAY UNTIL XFER TO COMPLETE

7999

ECC_DIS = ONE;

7994

7995

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

begin
CLR_MBUS;

7981

7982

SEQ 0338

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

16687 057672
16688 057676
16689 057700
16690 057704

N_10

PAGE 334

8001
8002
8003
8004
8005
80C6
8007
8008
8009
8010

8011

MLWC = .W-C SIZE + 256;

0
until .DRY IS_SET;

it .WCE IS_SET
‘WERE ANY BITS DISTURBED
then
begin
'ERROR IF WRITE CHECK FOUND BAD DATA
ERRDF (112, ASYNC, 0);
PRINTB (FOR_FMT, FNC_17, WRD_50, WRD_60, WRD_14);

PRINTB (FMTTM9, (.MLDA - 1));

8012

8013
8014
8015
8016
8017
8018

DODU (.ML LUN)

DOCLN;
end;

end;
ENDTST;

004167
005001

124110

012767

177777

166701

'READ REMAINING BLOCKS FOR ONES

10 BUF = ONES;

131762

$T37:
130430

JSR
CLR

SUB

MOV

:}.$SAVEZ
RAS.INC,R1
#-1,10.BUF

DSA.ADRS

*,DSA.ADRS

7873
7918
7919
7920

'HARDWARD TEST SECTION

1669
1669

16694

SEQ 0339

22-0ct=198 0 10: 47:44
22-0ct=1980 10 145:32

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 060026
16711 060032
16712 060040
16713 060044
16714 060046
16715 060054
16716 060056
16717 060062
16718 060064
16719 060072
16720 060076
16721 060102
16722 060110

152777
152777
066701
016777
012777
010177
142777
152777
105777
100375
032777
001030
016777
012777
010177
142777
152777
105777
100375
032777
001003
012700
000422
152777
016702
042702
142777
150277

16724 060122
16725 060130
16726 060134
16727 060136
16728 060144
16729 060146
16730 060154
16731 060156
16732 060160
16733 060162
16734 060164
16735 060166
16736 060172
16737 060176
16738 060202
16739 060206
16740 060212
16741 060216
16742 060222
16743 060224
16744 060226
16745 060232
16746 060236

152777
020027
001404
032777
001670
032777

16723 060114

—

MACRO M1113 23-3CT-80 09:11 PAGE 335

LOG TEST
|'CIMLAAD ML-11 LOGIC
|

152777

001447
104455
000157
007622
0000
012746
012746
012746
012746
012746
012746
012746
010600
104414
012716
012746
012746

000010
000002
131734
131726
010342
131756
000077
000061

1%:

BISB
B1S8

2%:

TSTB

100000

000077
000051

BICB

3%:

131704

1STB

* ,DSA.ADRS

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

DSA.ADRS
,+

#7790
. REG

#61.3ML .REG

131646

4%:

002000

131604

002000

131574

7929

7930

#100000,aML
.REG
1)

7936

#10.8UF
,aML .REG+20
R1,aML.REG+30

7940
7941
7942

7939

#77,9ML .REG

DSA.ADRS
,+

#51.3ML .REG

7946

ML .REG+50
3%

7948
¢ ,FND.GD.CHK

#40,aML
. REG+40
nL.ogt R2

7950
7948
7560

#177770,R2

131630

131616
131670

BISB

7921
7922
7926
7927
7928

7934

aML.REG+50
2%

#100009,3ML
. REG
48
#1.R0

131624

000001
000040
132072
177770
000007
131624
000010
000002
000001

RAS. INC,R1

W.C.SIZE,aML.REG+10

131654
010342
131704

100000

#2,30L .REG+120

W.C.SIZE,aML.REG*10
BI(B

131756

#10,3M
. REG+40
L

TOPS

PA:<

BISB

5%:

6%:

B1S8

#7,3ML .REG+40
R2.IML .REG+40

#10,
ML . REG+40
#2 ,3ML.REG+120
#
RO,

6%
:%OOO.SHL.REGOSO

FND.GD.CHK,
*

7962
7963
7967

#2000,3ML .REG+50
7%
5%
157

7969

#URD.56,-(SP)
#WRD.60,-(SP)
#WRD.52,-(SP)
#FNC.17,-(SP)
#ENC.13,-(SP)

7973

7972

6NTER

006454

000006

007162
006740
005774

#EIV.FAT,-(SP)
#6,-(SP)

SP,RO
14

#ENC.15, (SP)
#PHR.10,~(SP)

#WRD
.14 ,-(SP)

S2,¢
7974

|
|

HARDWARD TEST SECTION

16800 060554
16801 060560

r.--_._

16802 060564

100375
032777
001441
104455
000160
007444
000000

012746
012746
012746

131436

7%:

040000

MoV

BIC
BI(8
BISB
BB
BISB
CLR

131420
131406
131460

MOV
MoV
MOV

8%:

000040
131550
177770
000007
131302
000010
177777
000002

131240
010342
131162
000400
131176
000077
000051
131216

BIsB

BI(B
BI1SB
TSTB
BPL
BISB

MOV

BIC
BI(B
BIS8
BISB
MOV

B1SB

Mov

INC

MoV
MoV
MOV
ADD
MOV

9%:

BI(B
BI1SB
TSTB
BPL

BEQ

TRAP
.WORD

005774
006510
006400

.WORD
.WORD

MOV
MOV

MoV

44
#26,5P
PC

#40,aML
. REG*40
ML.DUT,R2

#$177770,r2

27,3ML
. REG+40
R2 . aML .REG+40

#10,aML
. REG+40

#2,3ML.REG+120
10.BUF
R1,aML.REG+30
#-400,3ML .REG+10
#10.BUF
,aML . REG+20
#77.3ML .REG

000040
131662
177770
000007
131414
000010
000002
127776
131360
177400
010342
000077
000061
131344

14
ML.LUN,RO

000026

SP,*

SP,RO

131704

#THR.FMT ,=(SP)
#6,-(SP)

Mov

MOV
MOV
TRAP
MOV
TRAP
TRAP
ADD

DSA.ADRS
,*

005366
000004

TOPS

PA:<

16755 060256
16756 060262
16757 060264
16758 060266
16759 060272
16760 060274
16761 060302
16762 060306
16763 060312
16764 060320
16765 060324
16766 060332
16767 060340
16768 060344
16769 060350
16770 060356
16771 060364
16772 060372
16773 060400
16774 060404
16775 060406
16776 060414
16777 060420
16778 060424
16779 060432
16780 060436
16781 060444
16782 060452
16783 060460
16784 060462
16785 060464
16786 060470
16787 060476
16788 060502
16789 060506
16790 060512
16791 060520
16792 060526
16793 060532
16794 060534
16795 060542
16796 060544
16797 060546
16798 060550
16799 060552

012746
012746
010600
104414
016700
104451
104444
062706
000207
152777
016702
042702
142777
150277
152777
152777
005067
010177
012777
012777
142777
152777
105777
100375
152777
016702
042702
142777
150277
152777
012767
152777
010102
005202
010277
012777
016702
062702
010277
142777
152777
105777

#61,3ML.REG

gHL.REG050
$
#40,aML
. REG+40
ML.DUT,R2

$177770.R2

#7,3ML .REG+40
R2.aML.REG+40

#10,3ML
. REG+40
#-1,10.BUF

#2,3ML .REG+120
R1.R2
R2
R2,aML .REG+30
#10.BUF
,aML .REG+20

#400,R2
R2,aML.REG+10

16753
060252
167564 060254

22-0ct=198 0 10:47: L4
22-0ct=198 0 10:45: 32

sMLG

PETE

16748
16749
16750
16757 060242
16752 060246

SEQ 0340

MACRO M1113 23-0CT=80 09:11 PAGE 236

CIMLAAD ML-11 LOGIC TEST

DSA.ADRS,*

7994
7995
7996
7997

7999

#77,
ML .REG

8000

aML .REG+50

8004

#51.3ML
. REG

9$
#40000,3ML .REG+40
10%

8006

8009

#URD
.14 ,-(SP)
#WRD .60, ~(SP)
#WRD.50,-(SP)

8010

160
8SYNC

E TEST

MACRO M1113 23-0CT-80 09:11 PAGE g37

CIMLAAO ML-11 LOG
HARDWARD TEST SECTION
16804

sMLG

}2882
012746

16810 060604

010600

16811 060606
16812 060610

16813 060614
16814 060616

16815 060622
16816 060626

16817 060630
16818 060632
16819 060636
16820 060640

16821 060642

}ggg% 060646

16824
16825
16830
16831
16835
16839 060650

16840 060650

16841 060654
16842 060656

16843 060660

16844 060662
16845
16846

012746
012746

104414
017716

005316
012746
012746
010600

007206

005400
000005

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

WENC.17,=(5P)

MOV

SP,RO

MOV
MOV

131114

14
aML.REG+30,(SP)

MOV
MOV

#2,-(SP)
SP,RO

104414
016700
104451

131330

TRAP
MOV
TRAP

062706

000020

ADD

104444

000207

TRAP

10%:

#FOR.FMT,=(SP)
#5,-(SP)

TRAP
MOV

DEC
MOV

004602
000002

RTS

004767

104466
006000

177016

137::
1%:

103773

JSR

TRAP
ROR

BLO

000207

RTS

;

Routine Size:

(SP)
#EMT.9,=-(SP)

;

14
ML.LUN,RO
51
44

#20,SP

)

8019

!<BLF/PAGE>

SP,®

8012

8008

8016

7873

14 words

66
RO

; Maximum stack depth per invocation:

80N

PC,$137

6 words

TOPS

PA:<

;] W,

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

16847

16852
16853
16854 ;

22-0ct=1980 10:47:44

16807 060570

16808 060574
16809 060600

SEQ 0341

0 words

‘

HARDWARD TEST SEC 1

16856
16857
16858
16859
16860
16861
16862
16863
16864
16865
16866
16867
16868
16869
16870
16871
16872
16873

SEQ 0342

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

TOPS=20 Bliss=16 v2(206)

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

BGNTST;

;
;
:
;
;
;

i
i
i
|

;
:

TEST NUMBER:

TST 38

TEST NAME:

NIBBLE OFFSET TEST

TEST DESCRIPTION:

TEST NIBBLE OFFSET COUNTERS TO OFFSET GOOD NIBBLE DATA A MAX
OF 14 WORDS ON DETECTION OF ALL BAD NIBBLES BY:

i
i
i
i
i
i
i
i

;
;
;
;
16874 ;
16875 ;
16876
16877 ;
16878 ;
16879 ;
16880 ;
16881 ;
16882 ;
16883 ;
16884 ;

i
i
i

;
;
;
;
;
;
;
;
;

;
;
;
;

:
;
;
;

;
;

VIA PROM R/W MODE FORCE ALL ARRAY NIBBLES BAD.

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.

REMAINING OF BUFFER WITH ONES.

ON ONES.

i
i
i
i
i
i
i
i

LOADING FIRST 2 1/4 WORDS OF THE I10_BUF WITH ZEROES AND THE
VIA DAT_DM MODE WRITE THE GOOD BLOCK WITH BACKGROUND

16885

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

MACRO M1113 23-0(T-80 09:11 PAGE 533

EST

CIMLAAD ML-11 LOG l

IMPLICIT INPUTS:
PD_TEMP

A BIT VECTOR OF 16 BITS WHERE THE READ PROM DATA IS STORED AND
ACCESSED FROM,

10_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
'ERROR FLAG

DODU FLG,
TST PAT,
START,
FINISH
ERR_FLG;

BGNSUB;
CLR_MBUS;

DOD0_FLG = ZERO;
incr WD CNT from 0 to 255 do
10_BUF ( .WD_CNT] = ONES;

lEROES;

JEROES,

X0'177760°;

'LOAD 10_BUF WITH ONES

'LOAD FIRST 2 1/4 WORDS WITH ZEROES

CIMLAAD ML=-11 LOGIC TEST

MACRO M1113

HMARDWARD TEST SECTION

23-0CT=-80 09:11

PAGE 339

SEQ 0343

22-0ct=1980 10:47:44

16912 ;ML4

22-0ct=1980 10:45:32

}gg}i 3

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

incr WD_CNT from 0 to 127 do
begin

'LOAD BLOCK WITH BG PAT

16916 ;
16917 ;

16920 ;

16921 ;
16922

16923 ;

16924 ;
16925 ;

16926 ;
16927 ;

16928
16929
16930
16931
16932

;
;
;
;
;

8073
8074
8077

8078
8079

8080

MLD2 = ONES;
MLE2 = ONES;

DELAY

8081
8082

8083
8084

(ONE US);

DAT_CLKk = ONE;
end;
CLR_MBUS;

8085
8086
8087
8088
8089

WRTTMPD (ONES, 19):
PROM RW = ONE;
GD_BLK_XFER ();
MLTSY = write;

'FORCE ALL NIBBLES BAD
'SET PROM READ WRITE
'SET UP A GOOD BLOCK XFERR
'WRITE ZEROES IN FIRST BLOCK WORD LOCATION
'OFFSETTING 14 NIBBLES WITH ZEROES ALSO.

16934 ;

8091

'DELAY UNTIL XFER TO COMPLETE

16939 ;
16940 ;

8096
8097

16933 ;

16935
16936
16937
16938

;
;
;
;

16941 ;
16942 ;
16943 ;
16944 ;

8090

8092
8093
8094
8095

8098
8099
8100
8101

16945 ;

8102

16947 ;
16948 ;

8104
8105

16946 ;

16949 ;
16950 ;

16951 ;
16952 ;
16953 ;
16954 ;

16955 ;

16956 ;

8103
8106
8107

8108
8109
8110
8111
8112

8113

16957 ;

8114

16959 ;

8116

16958 ;

16960 ;

8115

8117

}63%} :

g}}g

16963 ;

8120

16965 ;

8122

16964 ;

16966 ;

8i21

8123

0
wuntil .DRY IS_SET;
CLR _MBUS;

START = ZERO:
FINISH
= 14,

'START AT THE FIRST BLOCK WORD
'END AT THE 14°'TH BLOCK WORD

TST_PAT = ZEROES;
DAT DM_XFER ();
MLCS1 = read;

'TEST FOR ZEROES IN FIRST 14 WORDS
'SET UP A DATA DIAG MODE XFERR
‘DO A KEAD FUNCTION

incr TWICE from 0 to 1 do

'READ WORDS 0-=14 FOR 0'S AND 15-126 FOR 1°'S

DELAY (ONE_US);
begin

incr WRD_CNT from .START to .FINISH do
begin

'READ BLOCK WORDS FORM START TO FINISH

PD TEMP = .MLPD;
DAT 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);
if .ERR_FLG IS_SET

then

g\h

ERRDF (94, ARR_DAT, 0);

'COMPARE NIBBLE WITH TST PAT

'SEE IF COMPARE FOUND AN ERROR

'ERROR AND SET DODU_FLG IF ERROR FLG SH!

MACRO M1713 23-0CT-80 09:11 PAGE 340

CIMLAAD ML=11 L 06 IC 1 EST

HARDWARD TEST

S 18 TION

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

(8D)

NOAWn S

PRINTB (THR_FMI, WRD 41, WRD_46, WRD_10);

PRINTB (FM176, .NIB_PTR);
ONE;

DODU_FLG =
end;

OV
NO VS WN
2OV
VIS NN

D il

OO Co GO OO Co OO 0o Or OO OO OO OO

00 00 0o Co Co Co GO OO 0O O

o
el
[* ]

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2

end;
end;

ST PAT = not
STAR T =15;
FINISH = 1 26;
end

'NOW READ FOR ONES

.TST_PAT;

'START A 15
'END AT 126

ENDSUB;
if .DODU_FLG
then

'DROP THIS UNIT

IS_SET

If DODU_FLG SET

begi n
DODU (.ML_LUN);

DOCLN;
end;

ENDTST;

3
&~

BB NHNWNWWNWN
W WWWO NI OO NN

16968 ;ML4
169¢9 ;

16998
17002 060664
17003 060670

123170

$738:

000012

17004 060674

17005 060676

17006
17007
17008
17009

SEQ 0344

060704
060710
060714
060722

000040
131260

131034

000007
131012
000004

131016

177770

1%:

003767
005067
005067
012767
012777

000377
127360
127356
177760
177777

010342

SuB

TRAP

BI1SB
MOV

2%:
177777

JSR

BIC
BI(B
BISB
CLR
CLR
MOV

ASL
MOV

INC
CMP
BLE
(LR
(LR
MOV
MOV

8018

R1,$SAVES
#12,5P

8060
8062

#40,9ML
. REG+40
ML.DUT,R4

#177770.R4

#7,3ML .REG+40
Ré .AML .REG+40
4 ($P)

R2
R2,R3
R3
#-1,10.BUF
(R3)
R2
2, 4377

10.BUF

+2
10.BUF

F
#-20,10.BU+4
#-1,aML.REG#170

; DODU.FLG

8064

WD.CNT
WD.ONT,»

B0LS

; WD.CNT
,»
; WD.ONT

8066

;
;

8067

8069
8070
8071
8072

23-0CT=80 09:11

PAGE

1
341

SEQ 0345

22-0ct=1980 10:47:44
22=0ct=1980 10:45:3%2

sMLG

177777
177777
131604

MOV

:?i.iHL.REG

000061

3%:

000001

000007

130614

D e
i
i
D i el e
)
i
D i
D
D
il
D i
D il
D il
i
Dl
D e
e
i

NN
= =

RSINNITRIRERER oo RERNIXINESRERFRES

b
i

130632

—

6%:

000040
131056

L$DLY,R3

5%:

000010

000020

— e

#1,R2
7%

121052

[=lele
]
NNV
oo

22885822222228822888 R3S AR &8

NNNNNNNY

[slelelelelelel]

-l

D i

b i

D ol

b wd ald wb

SERFEREREETL
NNNNNNNNN%NNNNNNNN

ViV
i
NOwV SN

ad ad b ad e ad i o i D i
N~ SNNNNNY
g

OCOC OO0 o

D s o

OOV®NO VWA

b i

NsflNNNNNNNNN
ERRERERRR R

17033 061040
17034 061044
17035 061046
17036 061052
17037 061054
17038 061056
17039 061060

130730

7%:

000177

177770

130610
177777

000023
134566
000100
131364
000061
130560

000040
130764
177770
000007
130516
000006
000016
131364

000071
000001

120634

000014

#-1,aML.REG+200

#-1,3ML.REG+160
PC,DAT.DM. XFER

BLE
BISB

:%0.3!L.REG*120
R1,m77

;

*,$8TMP1

;
;

$STMP
$STMPI

;

$$TMP2

; WD.CNT
; WD.CNT,
+

8073
8074
8075
8076
8078
8080

8081
8078

8082

#40,aM
. REG+40
L
ML.DUT,R4

#177770,R4

#7,3ML .REG+40
RG . aML .REG+40
#-1,-(SP)
#23,-(Sp)
PC,WRT.PD

8085

#100,3ML .REG+120

130646

130514

BISB

WD.CNT

; *,$8TMP2

TOPS

PA:<

8%:

8086

8087

PC,GD.BLK.XFER
#61,3ML.REG

8088
8093

ML .REG+50
8%

130540

#40,aML
. REG+4D
ML.DUT,R4

130522

#7,3ML .REG+40
R4 QML .REG+40

$177770.R4
6(SP)

000004

916,4(SP)
RS
PC,DAT.DM. XFER

#71,3ML .REG

130430
9%:

#,R2
12

10%:

1%
14 (SP)

LSDLY,R3
R

: START
; *,FINISH

TST.PAT

;

*,$8TMP?

;

*,38TMPI

;

$STMP

8096
8097
8098
8099
8100
8101

; $8TMPY
; $$TMP?

000006

12%:

13%:

6(SP) ,R1

;

TWICE

: START WRD.CNT

Qo G

HARDWARD TEST

MACRO M1113

CIMLAAD ML-11

CIMLAAO ML-11 LOG l % TEST

HARDWARD TEST

SECT

MACRO M1113 23-0CT-80 09:11 PAGE §‘2

17079

ML&

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

22-0ct=1980 10:45:32

};83?
17082 061306
17083 061310

005301
000534

17087 061332

001411

17084 061312
17085 061320
17086 061326
17088 061334
17089 061340
17090 061342
17091 061346

17092 061350
17093 061352
17094 061354
17095 061356

17096 061364
17097 061372

17098 061400
17099 061402
17100 061404

17101 061406

17102
17103
17104
17105

SEQ 0346

017767
152777
012702

130612
000020
000001

016703
001404
005066
005303

120556

001374
005302
000766
017767

017767
017767

005002
010203

17¢:
130506

130510
130462

000001

17110 061440

062706

000010

17114 061452

17115 0614564

17116 061460
17117 061462

17118 061466

17119 061474

17120 061476

004767

005700
001051

026627
001034

000000

17131 061536

17132 061540
17133 061544

131172

000020 000001

104455

17123 061504

17125 061512
17126 061516
17127 061522
17128 061526
17129 061532
17130 061534

121442

012746 000020

000136

17124 061506

177770

010546

17121 061500

17122 061502

011662

010246

060616
004767

012746
012746
012746
012746
010600
104414

010216

012746
012746

BEQ

MOV
BEQ
CLR
DEC
BNE

004470
000002

L$OLY,R3
178
14 (SP)
R3

; %, $8TMPI

18%

aML .REG+200.D2.
TEMP
aML .REG+160.E2.
TEMP

CLR
MOV

ASR

ASR
ADD
MOV
MOV

BIC

R2
R2,R3
R3

R3
#PD.TEMP,R3
R3,-(SP)
R2.-(SP)

#177770, (5P)

ADD

#10,sP

MOV

R2,-(SP)

ST
BNE

MOV

ADD
JSR

CMP

BNE

RO
218

RS . =(SP)

#20,-(sP)

8113
8115

: NIB.PIR,®

: NIB.PIR,*
:

TST.PAT.+

8118

: ERR.FLG,*

20(SP) . #1

: ERR.FLG,*

8120

;

8123

;

8124

208

136

MOV
MOV
MOV
MOV
MOV
TRAP

#WRD
.46 .= (SP)
#WRD
.41 .= (SP)
FTHR.FMT,=(SP)
#4,-(SP)
SP,RO
14

MOV
MOV

; NIB.PIR
: NIB.PTR,+

SP, (SP)

PC.TST.LNG.WRD

ARR.DAT
0

MOV

; $$TMP2

PC,BLSGT2

WORD

MOV

: $STMP
L $STMPI

#,-(SP)
-($P)

JSR

8108
8109
8110

ML .REG+170,D1.TEMP

MOV
CLR

"WORD

006336
006264
005366
000004

;
:
L oe,$8TMP?

MOV
MOV

MOV

: WRD.CNT

ML .REG+230,PD. TEMP
#20,aML.REG+120
#,R2

168
R2
158

WORD

005740

R
22%

DEC
BR

TRAP

007534

012746

18%:

MOV
BISB
MOV

ASR

012746
005046

17113 061450

126324
126320

006203

17107 061426
17108 061432

17111 061444
17112 061446

126330

198:

006203
062703
010346
010246

17109 061434

168:

006203

042716

14$:
15¢:

000014

061410
061412
061416
061420

17106 061422

130342
130472

DEC
BR

TOPS

PA: <

#WRD.10,-(SP)

R2, (SP)

#EMT.6,-(SP)
#2,-(5P)

; SP,#

: NIB.PIR,+

8125

CZMLAAD ML-11 LOGIC

TEST

MACRO M1113 23-0CT-80 09:11 PAGE iAS

HARDWARD TEST SECTION

17135 061550
17136 061552
17137 061554
17138 061562
17139 0615
17140 061572
17141 061574

010600
104414
012766
062706
062706
005202
020227

17143
17144
17145
17146
17147

005201
020166
003640
005105
012766

17142 061600

061602
061604
061610
061612
061614

17148 061622
17149 061630

003700

012766
005204

000034
20%:
21%:

000010

22%:

000004

000017
000176

000006
000004

MOV
TRAP
MOV
ADD
ADD
INC
CMP

SP.RO
14
#1,34(5P)
#6,5P
#6,5P
R2
R2,#10

: W,

INC
CMP
BLE
COM
MOV

R1
R1,4(SP)
14%
RS
#17,6(SP)

; WRD.CNT
; WRD.CNT,FINISH

8106

R4, M1
13%

;
;
;
;

;

8133
8134
8135
8103

BLE

MOV
INC

17150 061632
17151 061636
17152 061640

022626

CMP
BLE
CMP

17154 061644
17155 061646
17156 061650
17157 061654
17158 061662

006000
103002
000167
026627
001004

ROR
BHIS
JMP
CMP
BNE

17153 061642

17159 061664
17160 061670
17161 061672
17162 061674
;;}gz 061700

020427
003621

000001
000016
00000

000001

104467

016700
104451
104444
062706
000207

TRAP

177020
000004

23%:

130276

000012

17165
}?1??

24%:

MoV
TRAP
TRAP
ADD
RTS

17172
17176
17180 061702

17181 061702

061706
061710
061712
061714

004767

104466
006000
103773
000207

176756

738::

1%:

JSR

TRAP
ROR
BLO
RTS

;
3
:

#176,4(SP)
R&
(SP)+,(SP)+
67

TWICE,*

;

8126
8122
8117
8113

8060

ML.LUN,RO
51
44
#12,SP
PC

66
RO
1%
PC

TST.PAT
*,START
*,FINISH
TWICE

RO
23%
1%
4(sP), M
24%
N

PC,$T738

*,DODU.FLG

; NIB.PTR
; NIB.PTR,*

19§

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

[4)

17182
17183
17184
17185

000001

SEQ 0347

8136

LODU.FLG,*

8140

8143

8018

8145

23 words

CIMLAAD ML=11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT=80 09:11

K 11
PAGE 344

SEQ 0348

17191

;ML4

22-0ct=1980 10:47:44

17194
17195
17196
17197

8149
8150
8151
8152
8153
8154
8155
8156
8157

!
BGNTST;

17202

;
;
;
:
;
;
;
;
;

;

TEST CS1 FUNCTION ABORTS ON DETECTION OF CLASS 'A' & 'B' ERRORS BY:

17205
17206
17207
17208
17209
17210
17211
17212

;
;
;
;
;
;
;
;

8160
8161
8162
8163
8164
8165
8166
8167

!
!
!
!
!
!
!
!

VIA MBUS WRITE FUNCTION LOAD THE GOOD BLOCK WITH BACKGROUND
PATTERN OF ONES.

CLEAR THE

DO A MBUS READ FUNCTION.
WHILE THE READ IS IN PROGRESS WRITE
MLDA (CLASS 'A' ERROR) READ THE [0_BUF FOR ONES.

17214
17215
17216
17217
17218
17219
17220
17221

;
:
;
;
;
;
;
;

8169
8170
8171
8172
8173
8174
8175
8176

!
!
!
!
!
!
!
!

CLEAR THE I0_BUF

17223
17224
17225
17226
17227

;
;
;
;
;

8178
8179
8180
8181
8182

!
!==-

17229 ;

8184

};}gg 3

17198

17199
17200

17201

};%82 3

17213 ;

17222 ;

17228 ;

17230 ;

17231
17232
17233
1723%
17235

22-0ct=1980 10:45:32

g}gg

8168

8177

8183
8185

;
;
;
;
;

8186
8187
8188
8189
8190

17239 ;
17240 ;

8194
8195

17236 ;
17237 ;
17238 ;
17241 ;
17242 ;
17243 ;

17244 ;

17245 ;

8191
8192
8193

TOPS=20 Bliss=16 v2(206)

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

e+
! TEST NUMBER:
TST 39
!
' TEST NAME:
CS1 FUNCTION ABORT TEST
!
' TEST DESCRIPTION:

10_BUF

.
VIA PROM R/W MODE FORCE UV ERROR TO THE UV ADRS ERROR PROM
CLASS 'B' ERROR).
DO A MBUS READ.

READ 10_BUF FOR ZEROES

IMPLICIT INPUTS:
10_BUF

A VECTOR OF 256 WORDS WHERE DATA FUR MBUS READS AND

WRITE FUNCTION ARE FOUND.

CLR_MBUS;
BAI = ONE;

'SET ON FIRST

GD BLK_XFER ();

'SET UP A GOOD BLOCK XFERR

10_BUF = ONES;

MLTSY = write;
do

wuntil

10 BUF ADRS

'LOAD FIRST 10_BUF ADRS

'WRITE BACKGROUND PATTERN

'DELAY UNTIL XFER TO COMPLETE

.DRY IS_SET;

incr TWICE from 0 to 1 do
begin
BGNSUB;

'"FORCE CLASS "A' AND CLASS 'B' ERRORS

CLR_MBUS;

8196
8197
8198

incr CNT from 0 to 255 do
10_BUF [.CNT) = ZEROES;

‘CLEAR QUT

8200

then

if .TWICE eql 1

'1F 2ND PASS THEN FORCE 'B' ERROR

8199

10_BUF

MACRO M1113 23-0CT-80 09:11 PAGE &65

"CIMLAAD ML-11 LOGIC TEST
'HARDWARD TEST
|

SECTION

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

172647

:MLG

17250
17251
17252
17253
17254
17255

;
;
;
;
;
;

8201
8202
8203
8204
8205
8206

17259 ;

8210

17248 ;
17249

17256 ;
17257 ;
17258 ;
17260
17261
17262
17263
17264
17265
17266
17267

17268
17269
17270
17271
17272

17273
17274
17275
17276
17277

17278
17279
17280
17281
17282

17283
17284
17285
17286
17287
17288
17289
17290
17291
17292
17293
17294
17295
17296
17297
17298
17299
17300
17301

;
;
;
;
;
;
;
;

;
;
;
;
;

;
;
;
;
;
;
;
;
;
;

;
;
;
;
;
;
;
;
;
:
;
;
;
;
;
;
;
;
;

SEQ 0349
TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZ2ML4.BLI.2 (81)

begin

PROM_RW = ONE:

MLPD = RX0'777';
end;

8207
8208
8209

MLEST = read:

GD_BLK_XFER ();

'SET UP A GOOD BLOCK XFERR
‘D0 A READ FUNCTION

'IF FIRST PASS THEN FORCE AN 'A' ERROR

8211
8212
8213
8214
8215
8216
8217
8218

!DELAY UNTIL XFER TO COMPLETE

if .TWICE eql O
then
begin

!SEE WHICH PASS WE'RE ON

.TWICE eql O then MLDA = ONES;

0
until .DRY IS_SET;

8219
8220
8221
8222
8223

incr WRD_CNT

begin

if .10_BUF
then
begin

8224
8225
8226
8227
8228
8229
8230
8231
8232
8233

8234
8235
8236

8237
8238

[.WRD_CNT] neq ONES

'A' ERROR

'SEE

XFERR WAY ALLOWED TO CONTINUE

'READ 10_BUF

FOR BG PAT

'ERROR AND EXIT'LOOP IF ZEROES
ERRDF (95, SYNC, 0);
PRINTB (FOR_FMT, PHR_8, FNC_13. WRD_19, WRD_10);
exitloop;

end;

end;
else

end

‘CLASS 'B' ERROR

begin
incr WRD_CNT from 0 to 64 do
begin

8239
8240
8241
8242
8243
8244
8245
8246

.10_BUF

then

[.WRD_“NT] neq ZEROES

'SEE

IF XFERR WAS ABORTED

'READ 10_BUF

CLEARED DATA

'ERROR IF ONES AND EXIT LOOP
begin
ERRDF (96, SYNC, 0);
PRINTB (FOR_FMT, PHR_9, FNC_13, WRD_19, WRD_10);
exitloop

end;

8247

8248
8249
8250
8251
8252

from 0 to 64 do

'CLASS

end;

it .SC
then

IS_NOT_SET

'SEE

SC BIT SET

—

CZMLAAD ML-11 L 0GIC TEST

MACRO M1113

HARDWARD TEST § ECTION

23-0CT-80 09:11

PAGE 34$

SEQ 0350

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

17303 ;ML4
17304 ;

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

'ERROR IF NOT SET
ERRDF (104, SYNC, 0);
PRINTB (FIV_FMT, WRD S9, PHR_1, WRD_11, WRD_19, FNC_13)

begin
end;

ENDSUB;
end;

ENDTST;

127676

127720

1%:

2%:

3%:

000377
000001

000100
000777
130430
000071
001004

CLR

TSTB
BPL

TRAP

BISB

BIC
BI(B
BISB
CLR
MoV
ASL

CLR
INC
CMP
BLE

010342

127720
130022

127560

CMP
BNE

4%:

#10,aML
. REG+40
#-1.10.BUF
PC,GD.BLK.XFER
#61,3ML
. REG

MOV

127702

#7,3ML.REG+40
R3.aML.REG+40

?zL.REGOSO

#7,3ML.REG+40
R2.aML .REG+40
RO
RO,R1
R1

10.BUF (R1)

RO
RO,#377

3%
M
R3.

PC,GD.BLK.XFER

TST
BNE

;
s

CNT
CNT,»

#$177770.R2

JSR

CLR

TWICE

#40,
ML .REG+40

BISB
MOV

;

ML .DUT,R2

4%
#100,aML .REG+120

MoV

Ougaa
Wwn
Ow

000040
130144
177770
000007

127700

$77770,R3

JSR
MOV

Mov

815

ML.DUT,R3

O 00

127760
126354

#40,
ML . REG+4D

BIC
BICB
BISB
BISB

8147

R1,$SAVE3

MoV

127772

000061
127744

JSR
BISB

wd eud

$139:

130010

122100

©o 0o 0o 0000

———

CoCoCo

s CNT
;

CNT,»

;

TWICE,*

8202
8203

#777.3ML.REG+230
:51.3HL.REG

R3
5%

8199 |

; TWICE

8207
8209

(CZMLAAD ML-11 LOGI

MACRO M1113

'HARDWARD TEST SECT

23-0CT-80 09:11

PAGE 347

SEQ 0351

ZRRACLERRLER

—

3
R R R RRRRRR

NJNNNNNNNNNNNNNNNN

JMLG

375 062174

NNNNNNNSNSN

377 062202
378 062206
379 062212
380 062216

381 062222

INC

5%:

MOV
1STB

R2
#-1,3ML.REG+30

aML
. REG+50

6%:
010342

177777

CMP

BEQ

TRAP

.WORD
.WORD
.WORD

005740
006040
007136
006714
005400
000005

MOV
MOV
MOV
MOV
MoV
MOV

000100

TRAP
BR
INC
CMP

7%:

BLE

8%:
9%:

010342

CLR

MoV
ASL

TST
BEQ

TRAP

.WORD
.WORD
.WORD

005740

MOV
MOV
MOV

005400
000005
000014

108:
11$%:

000100
100000

127326

12%:

8215

BCC
CLR

MOV
ASL

- MOV
MOV
TRAP
ADD

INC
CMP
BLE
BIT
BNE

TOPS
PA:<

8213

ROR

W
~N

~N
N
W
&~

389 062246
7390 062250
391 062252

NN~
W

127572

&»
&~

22222
ONONON

SRR
RN
P&
2334

382 062226
383 062230

177777
127606

22-0ct=198 0 10: 47:44
22-0ct-198 010 145:32

s WRD.CNT

WRD.CNT,»

10.BUF(R1) ,0-1
7%

8219
8222

8225

137
SYNC
0
#URD.10,~-(SP)
#WRD.19,-(SP)
#FNC.13,-(SP)
#PHR .8, (SP)

8226

#FOR.FMT,=(SP)

#5,-(SP)

SP,RO

14
10%
R2

R2,#100
6%
12%
R2
R2,R1
R1

s
s

WRD.CNT
WRD.CNT,«

: WRD.CNT
5

WRD.CNT,»

10.BUF (R1)
1 1%

140
SYNC

#WRD.10,-(SP)
#WRD.19,-(SP)
#FNC.13,-(SP)
#PHR.9,-(SP)

#FOR.FMT,~-(SP)

#5,-(SP)

SP.RO

14
#14,5P
12%
R2
R2.,#100
9%
#100000,aML
.REG
13%

: SP,»
8244
; WRD.CNT

WRD,.CNT,»

8236
8251

p———-

fHARDUARD TEST SECTI

MACRC M1113

EST

06
CIMLAAD ML=11 LOGIC

23-0CT-80 09:11

PAGE g‘lz

SEQ 0352

22-0ct=1980 10: 47:44
22-0ct=1980 10: 45:%2

007136
006040
005750
006542
006504
005414
000006
000016

17441
17446
17447
17451
17455 062454
17456 062454
17457 062460
17458 062462
17459 062464
17460 062466

177346

000001

MOV
MOV

MOV
MOV
MoV
MOV
MoV

13%:
14%:
15%:

000207

TRAP
ADD
TRAP
ROR

BHIS
JMP
INC
CMP
BLE
RTS

004767

104466

006000
103773
000207

177236

JSR

TRAP
ROR

BLO
RTS

8254

150

gvuc

8255

#FENC.13,=(SP)

#WRD.19.=(SP)
#WRD.11,=(SP)
#PHR.1,=(SP)

#WRD.59,-(SP)

#FIV.FUT,=(SP)
#6,-(5P)

SP,RO

SP'.

8253
8256

#6,5P

158
2%

R3
01
R3,

;
;

14$
PC

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

—_—

17435 062442
174636 062444
17437 062450
17438 062452
17439
17440

.WORD
.WORD
.WORD
Mov

i
s
D
i
-

NNNNSNNSNNNNYN
PR oF 2P o o o 0 op 2 o

TRAP

TOPS

PA:<

PC,$739
66

RO
1%
PC

TWICE
TWICE,*

819

8147

11 words

8259

MACRO M1113 23-0CT-80 09:11 PAGE §69

CIMLAAD ML-11 L 06l C TEST
'MARDWARD TEST S ECTION
l

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

JMLG
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;

TOPS=20 Bliss=16 v2(206)

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

.
.

.
.
.

.
.

@
.

’
.

BGNTST;
'+

TEST NUMBER:

TST 40

TEST NAME:

LAST BLOCK TRANSFER TEST

TEST DESCRIPTION:
TEST THE LAST BLOCK INDICATOR BIT
FOR SETTING/NOT SETTING AND THE

DSA REGISTER FOR INCREMENTING BY:
1.

“
.

.
.
.
.

.
.
L

DOING MBUS TRANSFERRS AT EACH
BLOCK FROM BLOCK ZERO TO

LAST BLOCK =7 AND TEST LBT
CLEAR AND DSA REGISTER TO BE
INCREMENTED.

DO A MBUS TRANSFERR AT
THE LAST
TEST LBT
TEST FOR
TEST DSA

BLOCK.
TO BE SET AND
CLEAR.
REG TU BE INCREMENTED.

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.

L
.

AL ALY

508 ;

VIV

P b e
e
e i e O
OOV
NOWVE
NN -

D i adh
D il
i
D e
e

SNNNNNNNNNNNSN ~N =~

17466
17467
17468
17469
17470
17471
17472
17473
17474
17475
17476
17477
17478
17479
17480
17481
17482
17483
17484
17485
17486
17487
17488
17489
17490
17491
17492
17493
17494
17495
17496
17497

—

SEQ 0353

.
.

.
.
.

.
.
.
k3
.
.
o

local
DODU_FLG;

'DROP UNIT FLAG

DODU_FLG = ZERO;

incr DSA_CNT from 0 to .LST_BLK = 1 do
begin
BGNSUB;
CLR_MBUS;
ECC DIS = ONE;

MW = not 255;
MLBA = 10 _BUF;

MLDA = .DSA_CNT;
MLCS1 = 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

CIMLAAD ML-11 LOG IC TEST

MACRO M1113

HARDWARD TEST SE SECTION

17522 MLG

|
L

17525
17526
17527
17528
17529
17530
17531
17532
17533

23-0CT-80 09:11

D 12
PAGE 350

22-0ct=1980 10:47:44

};ggz 3

22-0ct=1980 10:45:32

;

8315
8316
8317
8318
8319
8320
8321
8322
8323

17535 ;
17536

8325
8326

;
;
;

;
;

17534 ;

0
until .DRY

8327
8328

17540 ;

8330

TCPS-20 Bliss=16 v2(206)

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

'DELAY UNTIL XFER TO COMPLETE
IS_SET;

it .LBT IS_SET
then
begin
ERRDF (97, ASYNC, 0);

8324

17537 ;
17538 ;

17539 ;

SEQ 0354

'SEE

IF THE LAST BLOCK XFERR BIT SET

'ERROR AND SET DODU_FLG IF SET

PRINTB (THR_FMT, WRD_27, PHR_S, WRD_29);

PRINTB (FMT 7, .DSA_INT);
DODU_FLG = ONE:

end;

8329

if .MLDA neq .DSA_CNT + 1

then

'SEE

THE DSA REG INCREMENTED

17541 ;
17542 ;
17543 ;

8331
8332
8333

17546
17547
17548
17549
17550
17551
17552
17553

;
;
;
;
;
;
;
;

8336
8337
8338
8339
8340
8341
8342
8343

BGNSUB;
CLR_MBUS;
ECCDIS = ONE;

'DISABLE ECC

17556 ;
17557 ;

8346
8347

'DELAY UNTIL XFER TO COMPLETE

if .MLDA neq .LST_BLK + 1

'SEE IF DSA REGISTER INCREMENTED

17544 ;
17545 ;

17554 ;
17555 .

17558 ;
17559 ;
17560 ;

17561 ;

17562 ;

8334
8335

8344
8345

8348
8349
8350

8351

8352

17563 ;
17564 ;
17565 ;

8353
8354
8355

17568 ;
17569 ;

8358
8359

17566 :
17567 ;
17570 ;

17571 ;
17572 ;

17573 ;

17574 ;

17575 ;

17576 ;

PRINTB (FMT 7, .DSA_INT);
DODU_FLG = ONE;

end;
ENDSUB;
end;

LASY BLK_XFER O);
MLCST = write;
0
wuntil .DRY IS_SET;

then

8356
8357

8360
8361
8362

8363
8364

8365

8366

begin
'ERROR AND SET DODU_FLG IF NOT
ERRDF (98, ASYNC, 0);
PRINTB (THR_FMT, REG_6, WRD_31, WRD_14);

begin
ERRDF (101, ASYNC, 0);
PRINTB (THR_FMT, REG_6, WRD_31, WRD_14);

'SET UP A LAST BLOCK XFERR
'DO A WRITE FUNCTION

'ERROR AND SET DODU_FLG IF NOT

PRINTB (FMTZ7, .LST_BLK);
DODU_FLG = ONE;
end;

if .LBT IS_SET

then

begin

'SEE IF LBT BIT SET

MLDA = ONES;

'IF SET THEN TRY TO CLEAR IT

it .LBT IS_SET

'SEE IF BIT CLEARED

then

MACRO M1113 23-0CT-80 09:11 PAGE 551

CIMLAAD ML=-11 LOGIC T EST

HARDWARD TEST SECTION

SEQ 0355

22-0ct=1980 10:4 7: L4
22-0ct=1980 10:4 5 :32

17578 ;ML4
17579 ;

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

'ERROR [F NOT
ERRDF (99, ASYNC, 0);
PRINTB (FIv_FMT, WRD 27, PHR_2, WRD_11, WRD_17, REG_6);
begin

DODU_FLG = ONE;

TR TR TN
T T

end;

else

begin

T T

ERRDF

(100, ASYNC, 0);

PRINTB (FOR_FMT, WRD_ 27,

DODU_FLG = ONE;

end

'LBT NOT SET
'ERROR AND SET DODU_FLG

PHR_1, WRD_11, WRD_27);

end;

ENDSUB;
R TR
R I R
TR

o TR

If DODU_FLG SET

125632

010203
005203

1%:

000040

127442
177770

17627 062560
17628 062566
17629 062572
17630 062600
17631 062604

127216

000007
127174
000002

127200

010342
127136
000061

127132

177400

127144

2%:

MOV

INC
TRAP

BISB
MOV
BIC

BICB
BISB
BISB

127246

127130

127100

JSR
CLR
MOV
CLR
BR

MOV

3s:

MOV
MOV
MOV

;gla

8261

R1,$SAVESL
R1

LST.BLK,R&
R2
6%
R2,R3
R3

DODU.FLG

; DSA.CNT
;

DSA.CNT,»

8304
8306

8329

8307

3308

#40,aML .REG+40
ML.DUT,RO

#177770.,R0

#7,3ML .REG+40
RO. ML .REG+40
#2.3ML .REG+120

#-400,3ML .REG+10
#10.8BUF
,aML .REG+20
R2,3ML.REG+30
#61,aML .REG

ggL.asc*so

¢«
DSA.CNT

il
il il el

$740:

WP
W
—-=O

005001
016704
005002
000541

121344

NN
AN N AN N

004167

Qo o Oo OGP 00 00

N
&~
N

ENDTST;

O
o

=00
oo
I~

NN~

'DROP THIS UNIT

if .DODU_FLG IS_SET
then
begin
DODU (.ML_LUN);
DOCLN;
end;

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION
17633

17637 062614

17638 062616

17639 062620

032777

001433

002000

127134

22-0ct=1980 10:47:44

22-0ct=1980 10:45:32

104455

17642 062626

012746

#2000,3ML .REG*S0

;

8320

TRAP

;

8323

8324

MORD

141

.WORD

ASYNC

006142

MOV

#WRD.29,=(SP)

17644 062636 012746 006134

MOV

#WRD
.27 ,-(5P)

17647 062652

MOV

000000

012746

17645 062642
17646 062646

012746
012746

17648 062654

1046414

010600

17649 062656

010216

17653 062672

104414

17654 062674
17655 062700
17656 062704

012701
062706
027703

000001
000016
127020

17658 062712

104455

17659 062714

001433

007444

17662 062722

012746

17663 062726
17664 062732
17665 062736
17666 062742
17667 062746
17668 062750

17669 062752

17670 062754
17671 062760
17672 062764
17673 062766

48:

000000

012746
012746
012746
012746
010600
104414

010216

012746
012746
010600
104414

: DSA.CNT,*

TRAP

006000
103642

17679 063006 005202

TRAP

;

8332

;

8333

BEQ

127140

17685 063030 042704 177770
17686 063034
17687 063042

142777
150477

000007
126672

126714
126676

ASYNC

MOV
MOV
MOV
MOV
MOV
TRAP

#WRD.31,-(SP)
#REG.6,=(SP)
#THR.FMT,=(SP)
#4,-(SP)
SP,RO
14

MOV
MOV
MOV
TRAP

#EMT.7,-(SP)
#2,-(SP)
SP,RO
14

#WRD.14,=(SP)

R2, (SP)

; SP,e

: DSA.CNT,*

833

; SP,e

R
#16,5P
67

; *,DODU.FLG
:
:

8335
8331
8336

INC

: DSA.CNT

8306

BLT

;
:

8339
8341

MOV
ADD
TRAP
ROR
BLO

TRAP
BISB

000040

142

7%:

016704

WORD

104402
152777

17684 063024

: SP,e

8326
8322
8329

CMP

17682 063014
17683 063016

8325

: *,DODU.FLG
;
;

6%:

002635

#FMT.7,-(SP)
#2,-(SP)
SP,RO

#1,R1
#16,5P
aML .REG+30,R3

17680 063010 020204
17681 063012

MOV
ADD
CMP

MOV

17674 062770 012701 000001
17675 062774 062706 000016
17676 063000 104467
17677 063002
17678 063004

R2, (SP)

MOV

004520
000002

#THR.FMT,=(SP)
#4,-(SP)

MOV

"WORD

006164
007342
005366
000004

#PHR.S5,=(SP)

: SP,e

MORD

005774

SP,RO

MOV
MOV
MOV

000142

17660 062716

17661 062720

MOV
MOV

TRAP

004520
000002

17657 062710

MOV

005366
000004

012746
012746
010600

17650 062660
17651 062664
17652 062670

.MORD

006646

T0PS

PA:<

81T

BEQ

000141

007444

17643 062632

SEQ 0356

17640 062622

17641 062624

PAGE 352

};ggg

17636 062606

23-0CT-80 09:11

RO
2%

R2,R&
2
#40,aML.REG*+40

MOV

ML.DUT, R4

BICB
BISB

#7,aML.REG+40
R&4,aML.REG+40

BIC

117777084

: DSA.CNT,*

CIMLAAD ML-11 LOGIC TEST
HARDWARD TEST SECTION

MACRO M1113 23-0CT-80 09:11 PAGE 253

17689

JMLG

};ggg
17692
17693

SEQ 0357

22-0ct=1980 10:47:44

;
063046
063054

152777
004767

000002
127514

17695 063066

105777

126656

17696 063060
17696 063072

17657 063074

17698 063100
17699 063102
17700 063106

17701 063110

012777
100375

016702

005202
027702
001434

000061

126744

126612

8% :

125234

000145
007444
000000

17706 063124
17707 063130

012746
012746

#2,aML .REG+120
PC,LAST.BLK.XFER

;
:

8343
8344

TSTB

aML.REG+S0

;

8349

MOV
BPL

INC
CMP
BEQ

126622

TRAP

17712 063150
17713 063154

17714 063160
17715 063164
17719 0631?6

016716

012746
012746
010600
104414

17717 063170
17718 063174

012701
062706

17720 063206

001440

17719 063200

032777

17721 063210
17722 063216

012777
032777

17724 063226

104455

17723 063224

001457

17725 063230

000143

17727 063234

000000

17726 063232

17728 063236

125160

MOV

004520

MOV

000002

000001
000016

MOV
MOV
TRAP

002000

126542

177777
002000

126512
126524

9%:

#2,-(SP)
SP,RO
14

;

#2000, aML .REG+S0

17733 063262
1773 063266
17735 063272
17736 063274

012746
012746
010600
104414

005414
000006

MOV
MOV
MOV
TRAP

MOV

MOV
ADD
BR
TRAP

LWORD
"WORD
WORD

143

#WRD.17,-(SP)

8356
SP,e

8357
8353

8363
8365

#REG.6,=(SP)

11%

SP,e

: *,DODU.FLG
:

ASYNC

MOV
MOV

108 :

;

#EMT.7,-(SP)

"WORD

005750
006560

000144
007444
000000

LST.BLK, (SP)

;

012746
012746

17741 063312
17742 063314
17743 063316

;

MOV

000001
000016

#THR.FMT,=(SP)
84 ,-(SP)
SP,RO
14

TRAP

17730 063246
17731 063252

012701
062706
000426
104455

8355

;
;

MOV

17737 063276
17738 063302
17739 063306
17740 063310

;

#-1,3ML.REG+30
#2000, 3ML .REG+S0

WORD

006134

#WRD.14,=-(SP)

MOV
BIT

007342

012746

8354

10$

012746

17732 063256

;

BEQ

LWORD

17729 063242 012746 006022

#1,R1
#6,5P

BEQ

007444

8351

MOV
ADD

BIT

8345

;

R2
a¥L.REG+30,R2
9%

#WRD.31.=(SP)
#REG.6,=(SP)

MOV
MOV
MOV
TRAP

005366
000004

;

LST.BLK,R2

MOV
MOV

17708
17709
17710
17711

012746
012746
010600
104414

145
ASYNC
O

MOV

063134
063140
063144
063146

#61,3ML .REG

.MORD
"WORD
MORD

17705 063120 012746 005774

006164
007342

T0PS

PA:<

BISB
JSR

MOV

104455

17702 063112
17703 063114
17704 063116

22-0ct=1980 10:45:32

;

8360
'

8368
8369

#WRD.11.-(SP)
#PHR.2,=(SP)

#WRD.27,-(SP)

#FIV._FAT,=(SP)
#6,-(SP)
SP,RO
14

#,R1
#6,5P
1%
S5
144
ASYNC
0

; SP,e

; *,DODU.FLG
:
;
:

8370
8367
8360
8376

CIMLAAD ML=11 LOGIC T EST
HARDWARD TEST SECTION

MACRO M1113

17745
};;2?

23-0CT-80 09:11

W12

PAGE 354

sMLG
3

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

17748 063320

012746

006134

MOV

#WRD .27 ,-(SP)

17751 063334

012746

006134

MOV

#RD.2%,-(5P)

17749 063324
17750 063330
1775§
17753
17754
17755

012746
012746

063340
063344
063350
063352

012746
012746
010600
104414

17756 063354
17757 063360
17758 063364

012701
062706
104467

17759 063366
17760 063370

005750
006542

005301

17763 063376

016700

17762 063374

001004

17764 063402

104451

17765 063404

000001
000014

11%:

MOV
ADD
TRAP

000207

#FOR.FMT ,=(SP)
#5,-(SP)
SP,RO
14

; DODU.FLG

8383

MOV

ML.LUN,RO

8386

TRAP

8261

8388

ROR
BLO

RTS

RO
7%

12%
51

232 words
.
* Maximum stack depth per invocation:

17784 063410

004767

17/87 063420
17788 063422
17789
17790

103773
000207

17785 063414
17786 063416

104466
006000

177054

T40::

1%:

JSR

PC,$140

BLO
RTS

1%
PC

TRAP
ROR

; Routine Size:

:
'<BLF/PAGE>

12 words

66
RO

6 words

; Maximum stack depth per invocation:
8391

SP,e

8378
8375
8379

; Routine Size:

17774
17775
17779
17783 063410

;

8377

; *,DODU.FLG
:
:

TRAP

12%:

;

#WRD.11,=(SP)
#PHR.1,=(5P)

TO0PS
PA:<

LR
#4,5P
67

BNE

126564

17768
17769

17796
17797
17798 ;

MOV
MOV
MOV
TRAP

DEC

104444

};;g? 063406

MOV
MOV

005400
000005

006000
103611

17761 063372

17791

SEQ 0358

0 words

MACRO M1113 23-0CT-80 09:11 PAGE ;55

CIMLAAD ML=11 LOGIC TEST

HARDWARD TEST SECTION

17823

17824
17825
17826
17827
17828
17829
17830

17831

;ML4
;
;
;
;
;
;
;
;
;
;
:;
;
;
;
;
;
;
;
;
;
:;
;
;
;
;
;
;
;
;
;
;
.

17832
17833
17834 ;
17835 ;
17836 ;

17837 ;
17838 ;
17839
17840
17841
17842
17843
17844

17845
17846
17847
17848
17849
17850
17851
17852
17853
17854

;
;
;
;
;
;

;
;
;
;
;
;
;
;
;
;

ll‘

17800
17801
17802
17803
17804
17805
17806
17807
17808
17809
17810
17811
17812
17813
17814
17815
17816
17817
17818
17819
17820
17821
17822

SEQ 0359
7:44

5 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
8441
8442
8443

TOPS=20 Bliss=16 v2(206)

PA:<NEALE>BLZML&.BLI.2 (83)

BGNTST;
'+

TEST NUMBER:

TST 41

TEST NAME:

INVALID ADRS

TEST

TEST DESCRIPTION:
TEST THE DETECTION OF
ADDRESSES BY:

ILLEGAL DSA

DOING A MBUS WRITE FUNCTION
AT ALL POSSIBLE ILLEGAL DSA
ADDRESSES AND TEST THE

IAE BIT SET.

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.

tocal
1AE_CNT;

'INVLID ADRS COUNT

IAE_CNT = .LST_BLK;

'START AT LAST

'TEST FOR ALL

begin
IAE_CNT = JJAE_CNT + 1;

BGNSUB;

CLR_MBUS:

MLDK = .IAE CNT:
MLWC = not 255;
MLBA =

10_BUF;

MLCST1 = write;
if .IAE IS_NOT_SET
then
begin

ERRDF

(102, ASYNC, 0);

BLOCK + 1
INVALID ADDRESSES

' INCREMENT 1AE_CNT
'LOAD
iLOAD
{LOAD
iDO A

DSA
WORD COUNT
UBUS ADRS
WRITE FUNCTION

'SET

'ERROR

IAE SET
1F

NOT SET

PRINTB (FIV_FMT, WRD_30, PHR_1, WRD_11, WRD_30, WRD_10);

CIMLAAD ML-11 LOGIC TEST

MACRO M1113

HARDWARD TEST SECTION

23-0CT-80 09:11

J 12

PAGE 356

17856 ;ML&

22-0ct=1980 10:47:44

};ggg s
17859 ;

17860 :
17861 :

17862
17863
17864
17865
17869
17873

:
:
:
:

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

8445
8446

8447
8448
8449
8450

ENDSUB;
end
untii .IAE_CNT eql %0'177777';

016701
005201

124702

17877 063436
17878 063444

152777
016700

000040
126520

126274

142777
150077

000007
126252

126256

17879 063450

042700

17882 063466
17883 063472
17384 063500

010177
012777
012777

17886 063514

032777

17880 063454
17881 063462

177770

17888 063524
17889 0635%6
17890 063530

001026

17891 063532

17895 063550

012746

17896 063554
17897
17898
17899
17900

063560
063564
063570
063572

17901 063574
17902 063600
17903 063602

MOV
INC

TRAP

LST.BLK,R1
R1

#40,3aML.REG+40
ML.DUT,RO

BICB
BISB

#7,aML.REG+40
RO,aML.REG+40

MOV

#61.,3ML .REG

BIC

126212

002000

126236

BIT

126164

R1,=(SP)

BISB
MOV

MOV
MOV
MOV
BNE

TRAP
JWORD
"WORD

WORD

#2000, ML . REG+60

3¢

17905 063606

020127

177777

17907 063614

012601

103713

17906 063612 001307
000207

BLO

CMP

BNE

MOV
RTS

8434
8435
8436

8437

8439

8443

#WRD.30,-(5P)

ADD
TRAP
ROR

IAE.CNT,+

;

MOV

8432

8442

006156

MOV
MOV
MOV
TRAP

8427
8431

;

012746

005414
000006

8390

55
146
ASYNC

#WRD.10,-(SP)
#WRD.30.=(5P)
#WRD.11.-(SP)

012746
012746
010600
104414

«,1AE.CNT
IAE.CNT

;

:
:
:

MOV
MOV
MOV

MOV

:
:

R1.aML .REG*30
#-400,3ML .REG+10
#10.BUF ,aML .REG+20

005740
006156
005750
006542

;

#177770.R0

012746
012746
012746

000016

};383 063616

2%:

MOV

126210

062706
104467
006000

17904 063604

1%:

104455

000146
007444
000000

17892 063534
17893 063540
17894 063544

$T41:

126236
177400
010342

17885 063506 012777 000061
17887 063522

'REPEAT UNTIL ALL TESTED

ENDTST;

010146

104402

TOPS=20 Bliss=16 v2(206)

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

end;

063424
17874 063626
17875 063432

17876 063436

SEQ 0360

#PHR.1,-(SP)

#FIV.FMT,-(SP)
#6,-(SP)
SP.RO
14

; SP,w

#16,5P
67
RO

;
:

R1.#-1

(SP)+,R1

8441
8444

IAE.CNT,®

8448

8390

MACRO M1113

(CIMLAAD ML-11 LOGI 1 EST
HARDWARD TEST

SECT ION

23-0CT-80 09:11

K 12
PAGE 357

SEQ 0361

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

JMLG

f Routine Size:

62 words

; Maximum stack depth per invocation:
7
7

;929 063620

guuuvc

VOO VOO O0
P opAV
WO N
WIS NN

b
o
-

NN SNISNSNSNSNN

931 063624

17944

063630
063632

004767

104466

177600

T61::
18:

006000
103773

;

8451

PC,8T41
66
RO

RTS

BLO

000207
;

;

JSR
TRAP
ROR

'<BLF/PAGE>

Routine Size:

8 words

8448

6 words

Maximum stack depth per

TOPS
PA:<

invocation:

0 words

MACRO M1113 23-0CT-80 09:11 PAGE %58

CIMLAAD ML-11 LOGI C TEST
'HARDWARD TEST SECT 10N

SEQ 0362

17946 ;ML4
17947 ;

4é
: 32

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

]

BGNTST;

L I I

O I

TEST NUMBER:

TST 42

i
i
i

TEST NAME:

ADRS OVERFLOW BIT

O T

;
i
i

TEST DESCRIPTION:
TEST THE DETECTION OF

;
i
i
i
i

O T I O

TEST

ADDRESS OVERFLOWS BY:

STARTING AT THE LAST BLOCK DO A TWO BLOCK TRANSFER.

READ THE AOE BIT SET.

IMPLICIT INPUTS:
10_BUF

A VECTOR OF 256 WORDS WHERE DATA FOR MBUS READS AND WRITE
FUNCTIONS ARE

FOUND.

CLR_MBUS;

MLWE = not 511;

MLDA = .LST_BLK;
MLCST1 = write;

‘D0 TWO BLOCK XFERR
‘LOAD UBUS ADRS
!START AT LAST BLOCK
‘DO A WRITE FUNCTION

'DELAY UNTIL XFER TO COMPLETE

N T T T R T R T R I

MLBA =

[0 _BUF,

0
until .DRY IS_SET;
if .AOE
then

'SEE

IS_NOT_SET

AOE SET

'ERROR IF NOT SET

begin

ERRDF (103, SYNC, 0)
PRINTB (FOR_FMT, WRD 26, PHR_1, WRD_11, FNC_19);

&
=

AR TR TR

end;

8490

ENDTST;

152777

000040
126322
177770
000007

016700
042700
142777
150077

126054

126076

126060

$T42:

BISB
MOV

BIC
BICB
BISB

#40,a
. REG+40
ML
ML .DUT,RO

#177776,R0

#7,9ML .REG+40
RO. QML .REG*+40

8453

CZMLAAD ML-11 LOG IC 1 EST
HARDWARD TEST SECTION

MACRO M1113

18001

012777
012777
016777
012777
105777

177000
010342
124430
000061
126030

126016
126020
126022
125764

18010 063722

032777

001000

126030

18012 063732

100375

001024

000147
007500
000000

18017 063746
18018 063752
18019 063756
18020 063762
18021 063766
18022 063772
18023 063774

012746
012746
012746
012746
012746
010600
104414

18024 063776

}gggz 064002

012746

062706

000207

22-0ct=1980 10:45:32

000014

#-1000,aML .REG+10
#10.BUF ,aML .REG+20
LST.BLK,3ML.REG*30
#61,3ML .REG
ML .REG+50

F
:
3
3
:

8474
8475
8476
8477
8481

BIT

#1000,3ML .REG+60

8483

TRAP

8486

#FNC.19,-(SP)

8487

BPL

?%:

LMWORD
WORD
MWORD

147
SYNC
O

MoV
MOV
MOV
MoV
MOV
MOV
TRAP

#WRD.11,=(SP)
#PHR.1,-(SP)
#WRD.26,-(SP)
#FOR.FMT,=(SP)
#5,-(SP)
SP,RO
14

MOV

005750
006542
006126
005400
000005

004767

18047 064016

000207

104466
006000
103773

177624

T42::

1%:

TOPS

PA:<

MOV
MOV
MOV
MOV
TSTB

ADD

RTS

JSR

PC,8$742

RTS

TRAP
ROR
BLO

: SP,e

#14,5P

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

18043 064004

18044 064010
18045 064012
18046 064014

22=0ct=1980 10:47:44

BNE

007230

18027
18028

18033
18034
18038
18042 064004

1%:

104455

18013 063734
18014 063736
18015 063740

18016 063742

SEQ 0363

JMLG

18004 063664
18005 063672
18006 063700
18007 063706
18008 063714

18011 063730

m12
PAGE 359

}ggg%

18009 063720

23-0(T-80 09:11

66
RO
1%

8485

8488

8450

6 words

'NARDUARD TEST S

MACRO M1113

(CIMLAAD ML-11
L

—

23-0CT-80 09:11

N 12

PAGE 360

18053 :mL4
18054 ;

SEQ 0364

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

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

]

BGNTST:
TEST NUMBER:

TST 43

TEST NAME:

SYNC BUS PARITY TEST

TEST DESCRIPTION:
TEST ABILITY OF
GOOD PARITY BY:

I
I

I
I
I

= O 000NV
WA

VIV
T
VWD

VIA MBUS WRITE FUNCTION WRITE ALTERNATING ONES AND ZEROES TO THE
DEVICE AND READ THE DPAR BIT CLEARED.

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

if .PAR_DIS 1S_SET
then
begin
PRINTB

(THR_FMT,

EXIT_TST;
end;

'SEE
FNC_3, WRD_7, WRD_37);

CLR HBUS

BAl =

10 aur i
- o 125252';

incr TWICE from 0 to 1
begin
BGNSUB;
GD_BLK _XFER ();

& 58 B NN
N WNW
WV = O OO0 ~NO W

VWA WA
T
VA AW

G0 GO Co OO GO 0O GO OO OO 0O OO 0O

LRTR
TRT TR Tl T T T L
R

LRLR

$2
~

il
i
D

(=lelelele]

il
—

D N

)
D

o 0o O

Dl
—

O 0o 0o OO O

SYNC BUS TO DETECT AND GENERATE

00 0o Co 0o o o 0o GO GO Co 0O 0O

oo
o
oo

PARITY

IS DISABLED

'PRINT MESSAGE AND EXIT

'SET

ON F!RST

10 BUF

TST

ADRS

'ALTERNATE
1, 0 PATTERN
do

'REPEAT LOOP TWICE

MLESY = write;

'SET UP A GOOD BLOCK XFERR
‘DO A WRITE FUNCTION

'DELAY UNTIL XFER TO COMPLETE

until

.DRY IS_SET;

if .DPAR IS_SET
then
begin

ERRDF

(105, SYNC, 0);

'SEE

‘ERROR

PRINTB (fOR FMT, WRD_23, WRD_6, WRD_7, WRD_9);
end;

DPAR GOT
[F

SET

YES

HARDWARD TEST SECTION

18109 ;ML4
18110 ;
18111
1811% 3

18113
18114
18115
18116
18117
18118
18119
18120
18121
18122
18123

;
;
;
;
;
;
;
;
;
;
;

8544
8545
8546
8547
8548

8549
8550
8551

18128
18129
18130
18131
18132
18133
1813
18135
18136
18137
18138
18139
18140

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

18143
18144
18145
18146
18147
18148

;
;
;
;
;
;

18156 064020

010146

18126 ;

18127 ;

18141 ;
18142 ;

18152

18157 064022
18158 064030
18159 064032
18160 064036
18161 064042
18162 064046

13
SEQ 0365

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

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

18124 ;
18125 ;

WACRO M1113 23-0CT-80 09:11 PAGE 361

TEST
CIMLAAD ML-11 LOGIC
LOG

026727
001021
012746
012746
012746
012746

TOPS-20 Bliss=16 v2(206))

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

'SHIFT THE 10 _BUF § REPEAT

10 BUF = ,10 BUF*ONE;

'CLEAR OUT ERROR REG & REPEAT

MLER = ZEROES;
ENDSUB;
end;

incr TWICE from 0 to 1
begin
BGNSUB;
CLR_MBUS;
BAI = ONE;
GD_BLK_XFER ();

'REPEATE LOOP TWICE

'SET ON FIRST

MLIST = read;
do

'DO A READ XFERR

'DELAY UNTIL XFER TO COMPLETE

until

10 BUF ADRS

'SET UP A GOOD BLOCK XFERR

.DRY IS_SET;

if .MDPE
then

'SEE IF READ GENERATED BAD PARITY

IS_SET

'ERROR IF MDPE SET
begin
ERRDF (106, SYNC, 0);
PRINTB (FOR_FMT, WRD_23, WRD_6, WKD_7, WRD_B);
end;

ENDSUB;
10_BUF =

GD BLK_XFER T);

MLTST = write;

'MAKE DATA PATTERN HAVE ONE LESS ONE
'SET UP A GOOD BLK XFER
!CHANGE THE BACKGROUND IN MEMORY

'DELAY UNTIL XFER TO COMPLETE

,10_BUF“ONE;

unti? .DRY IS_SET;
end;
ENDTST;
124302

006232
005676
006774
005365

000001

$T43:

MOV
(MP
BNE
MoV
MOV
MOV
Mov

R1,-(SP)
PAR.DIS
.M
1%

#WRD.37,-(SP)
#WRD.7,-(SP)
#FNC.3,-(SP)
#THR.FMT,-(SP)

8490
8517

8520

MACRO M1113 23-0CT-80 09:11 PAGE §62

CIMLAAD ML-11 L

HARDWARD TEST S

SEQ 0366

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

JMLG

18164
18165
18166
18167
18168
18169
18170
18171
18172

064052
064056
064060
064062
064064
064070

18174
18175
18176
18177
18178

064102
064106
064112
064120
0641264

18173 064074

18179 064132

18180 064140

18181 064142

18182 064144

18183 064150
18184 064156

18185 064162
18186 064164
18187 064172
18188 064174
18189 064176
18190 064200
18191 064202
18192 064204
18193 064210
18194 064214
18195 064220
18196 064224
18197 064230
18198 064234
18199 064236
18200 064240
18201 064244

18202 064250
18203 064254
18204 064256
18205 064260
18206 064262

18207 064264
18208 064270
18209 064272
18210 064274
18211 064276
18212 064304
18213 064310
18214 064314
18215 064322
18216 064326
18217 064334

18218 064340

000004

000012
000402
000040
126062

177770

MoV

MOV
TRAP
TRAP
ADD

125636

000007

125620

000010
125252

125606
1246202

125614

126372

125522

000040

125566

JMP
B1SB

MOV

BIC
BICB
BISB
BISB
MOV

2%:

000051

125566

1%:

3%:

CLR

TRAP

JSR

MOV
1ST8
BPL

BITB
BEQ
TRAP

.WORD
.WORD
. WORD

005726
005676
005670
006076
005400
000005
000014

124072
125504

4%:

125434

125416
125404

000071

CLR

TRAP
ROR

000001

000040

MOV
MOV
MOV
MOV
MOV
MoV
MOV
TRAP
ADD
ASL

125332

5%:

#6,-(SP)
SP.RO

TOPS

PA:<

SP,*

8517
8519
8522

#12,sP
9%
#40,aML
. REG*40
ML.OUT .R1

#$177770,R1

#7,3ML.REG+40
R1 ML .REG*+40

#10,aML
. REG+40

:;sésze.xo.aur
2

TWICE

8525
8526
8528
8529

8531
8532
8536

PC,GD.BLK.XFER
#61,3aML.REG
gHL.REG*SO
$
#40,3ML.REG+60
4%

8538
8541

151
SYNC
0
#WRD.9,=(SP)
#URD.7.=(SP)

8542

#WRD .6 .= (SP)

#WRD.2%,-(sP)

#FOR.FMT,=(SP)
#5,-(SP)

SP.RO

14
#14,5P
10. BUF

SP,+

8540
8545
8546

ML
. REG+60

BLO
INC
CMP
BLE
CLR

TRAP

BISB

TWICE
TWICE,*

8528

TWICE

8550
8551
8552

MOV

BICB
BISB
BI1SB
JSR
Mov

#7,3ML .REG+40
RO ML .REG+40

910,
ML .REG+40
PC,GD.BLK.XFER

#71,9ML .REG

8554
8555
8556

D 13
PAGE 363

SEQ 0367

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

005712
005676
005670
006076
005400
000005

N
o

18239 064430
18240 064434
18241 064436
18242 064440
18243 064442
18244 064446
18245 064452
18246 064460

250 064474
251 064476

18266 064502
18267 064502
18268 064506
18269 064510
18270 064512
18271 064514

.WORD
.WCRD
.WORD

MOV
MOV
MoV
MOV
MOV
MoV
MoV

000014

006367
004767
012777
105777
100375

005201
020127
003677
012601
000207

004767

123674
126070

000061

125264

7%:

BLO
ASL

125220

JSR

8%:

000001
9%:

177312

TRAP
ADD
TRAP
ROR

MoV
1STB
BPL
INC

CMP
BLE

152
SYNC
0
#WRD.8,=(SP)
#URD.7.=(SP)

8566

#URD .6 .= (SP)

#urD.2%,-(5P)

FEOR.FMT,=(SP)

#5.-(SP)

SP.RO

SP'.

14
#14,SP

8564
8567

5%
10.BUF

8570
8571
8572
8576

PC,GD.BLK.XFER
#61,3ML.REG

aML.REG+50

8550

(SP)+,R1
PC

8490

JSR

PC,$T43
66

8578

TRAP
ROR

000207

RTS

103773

8565

MoV
RTS

006000

104466

8562

TRAP

#400,3ML .REG*40
7%

BEQ

8560

BIT

125356

TOPS

PA:<

22L.REG’SO

—

000400

TSTB
BPL

—

6%:

125376

o
o

LNVSW

23-0CT-80 09:11

—

NN ~N

WA NN
NN NN N
O 00 NONVV SN
—o
W

MACRO M1113
JMLG

TSR

—

——

CZMLAAD ML=11 L 0
'WARDWARD TEST § 3

BLO

RO
1%
PC

CZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

:ML&
;
;
;
;
;
;
;
;
;
,
;

8582
8583
8584
8585
8586
8587
8588
8589
8590
8591

18292
18293
18294
18295
18296
18297
18298
18299
18300
18301
18302
18303
18304
18305
18306

:
;
;
;
;
;
;
;
;
;
;
;
;
;
;

8594
8595
8596
8597
8598
8599
8600
8601
8602
8603
8604
8605
8606
8607
8608

18308
18509
18310
18311
18312
18313
18314
18315
18316
18317
18318
18319

4
;
;
;
;
;
;
;
;
;
;
;

8610
8611
8612
8613
8614
8615
8616
8617
8618
8619
8620
8621

18307 ;

18320
18321
18322
18323

;
;
;
;

18324 :
18325 ;
18326 ;

18327 ;
18328 ;

18329 ;
18330 ;
18331 ;

SEQ 0368
22=0ct=1 980 10:47 144
22-0ct=1980 10 :45:32

18277
18278
18279
18280
18281
18282
18283
18284
18285
18286
18287
18288
18289

18290 ;
18291 ;

MACRC M1113 23-0CT-80 09:11 PAGE 564

8592
8593

8609

8622
8623
8624
8625

8626
8627
8628

8629
8630
8631
8632
8633

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

!
!
BGNTST;
!4+
! TEST NUMBER:
TST &4
!
! TEST NAME:
WRITE READ ML11
!
! TEST DESCRIPTION:
!
!
PROVIDES A MBUS READ/WRITE
!
DATA TRANSFER TROUBLE SHOOTING
!
LOOP BY:
!
!
1.
LOAD APPROPRIATE RH REGISTERS.
!
DO A WRITE FUNCTION.
!
!
2.
LOAD APPROPRIATE RH REGISTERS
!
DO A WRITE CHECK FUNCTION.
!
!
3.
COMPI IMENT DATA AND
!
REPEAT.
!
! IMPLICIT INPUTS:
!
!
10_BUF

A VECTOR OF 256 WORDS WHERE

!
!
!
!
!
!
!
'=--

DATA FOR MBUS READ AND WRITE
FUNCTIONS I35 FOUND.
A GLOBAL OWN LOCATION TO THIS
YESY.

local
TST_PAT;

'TEST PATTERN

TST_PAT = ONES;
incr TWICE from 0 to 1 do
begin
;
CLR_MBUS;
BAl = ONE;
10_BUF = ,TST_PAT;

GD_BLK_XFER (7;
MLTSY = write;
do

'WRITE READ 1'S AND 0'S ON MBUS
!SET ON FIRST

10 _BUF

ADRS

'LOAD FIRST 10_BOF ADRS

'SET UP A GOOD BLOCK XFERR
‘DO A WRITE FUNCTION

'DELAY UNTIL XFER TO COMPLETE

CZMLAAD ML-11 LOGIC TEST

HARDWARD TEST

SECTION

18333 :MLé
18334 ;
335

23-0(T-80 09:11

PAGE

F 13

B
-

(LR_MBUS;
= ONE;
GD_BLK_XFER ();

'SET UP A GOOD BLOCK XFERR

'DELAY UNTIL XFER TO COMPLETE

10 _BUF

ADRS

if . WCE
then

'SEE

IS_SET

begin

IF WRITE CHECK ERROR SET

'ERROR

SET

(109, TRBLE_LOOP, 0);
PRINTB (SIX_FMT, FNC_&, WRD_10, WRD_12, FNC_5., FNC_6, FNC_3);

ERRDF

end;

.
-

= not

'COMPL IMENT TST_PAT AND REPEAT

.TST_PAT;

1ST_ PAT
end;

000040

125426
177770

125202

000007

125164

000010
123550

125152

000061
125140

125074

000040

125120

000007

125102

00001C
125666
000051

125070

125160
125744

125344
177770

125076

004767
012777

$T44:

125016

1%:

JSR

MoV

CLR
BISB
MOV

BIC
B:(B
BISB
B1SB

MoV

JSR

2%:

MOV
TSTB

BPL
BISB

MOV

BIC
BI(B
BISB
BI1SB
JSR
MOV

R1,$SAVE2

« TST.PAT
TWICE

#-1.R1
R2
#40,aM
. REG+40
L

ML.DUT,RO

8580
8622
8624
8625

#177770.R0

#7,aML .REG+40
RO QML .REG+40

#10,
ML . REG+40
R1,10.BUF
PC.GD.BLK.XFER
#61,3ML
. REG

aML .REG+50
28

0w,

117264
177777

004167
012701
005002
152777
016700
042700
1462777
150077
152777

ENDTST;

®e

8655

'DO A WRITE CHECK FUNCTION

0
until .DRY IS_SET;

B
D i

'SET ON FIRST

MLTST = WRT_CHK;

B
D e
el

el o

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

.DRY IS_SET;

BAI

=O Ve~

until

D L
D
D
D
D
D
B
B
D

345 ;

—

SEQ 0369

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

MACRO M1113

TST.PAT
¢+

8627
8628
8629
8630
8634

#40,aML
. REG+40
ML.DUT,RO

177776,R0

#7,3ML .REG+40
RO, aML .REG+40

#10,aML .REG+40
PC,GD.BLK.XFER
#51,3ML .REG

8637
8638
8639

CIMLAAD ML-11 LOGIC T

HARDWARD TEST SECTION

EST

MACRO M1113 23-0(T-80 09:11 PAGE 266

18388

sMLG

18391 064662

105777

125062

18393 064670

032777

040000

18394 064676

18395 064700

100375

001430

3%:

125042

000155
007662
000000

18400 064714
18401 064720

012746
012746

012746
012746
012746
012746
010600
104414

012746

18409 064754
18410 064760
18411 064762
18412 064764

18413 064770

}gfi}g 064772

062706
005101
005202
020227

003657

18433 065000
18434 065002
18435 065004
18436 065006

BIT

#40000,aML .REG+40

8645

TRAP

8648

#FNC.3,-(SP)

8649

MOV
MOV

#ENC.6,-(SP)
#ENC.S5,=-(SP)

005740
007002
005432
000007

MOV
MOV
MOV
MOV
MOV
TRAP

000020

MOV

4%:

000001

ADD
COM
INC
(MP

BLE

RTS

000207

; Routine Size:

18417

18432 064774

8643

007030
007020

18416
18422
18423
18427
18431 064774

155
TRBLE.LOOP
O

18402 064726 012746 005760
18403 064730
18404 064734
18405 064740
18406 064744
18407 064750
18408 064752

aML.REG+S0

WORD
.WORD
WORD

006774

#WRD.12,-(SP)
#WRD .10,-(SP)

#FENC.4,=-(SP)
#SIX.FMT,=(SP)

#7,-(SP)
SP,RO
14

004767

104466
006000
103773
000207

177516

1%:

JSR

TRAP
ROR
BLO
RTS

3 P,

#20,5P
R1
R2
R2.”

87 words

PC,8T44
66
RO
1%
PC

; TST.PAT
; TWICE

8647
8652
8624

8580

8653

; TWICE,*

; Maximum stack depth per invocation:

T44::

TOPS

PA:<

TSTB

BPL

BEQ

104455

18396 064702
18397 064704
18398 064706

18399 064710

22=0ct=1980 10:47:44

22-0ct=1980 10:45:32

}gggg
18392 064666

SEQ 0370

11 words

CIMLAAD ML-11 LOGIC TEST

HARDWARD TEST

MACRO M1113

SECTION

23-0CT-80 09:11

H13
PAGE 367

22=0ct=19 80 10 167:44
22=0ct=19 80 10::65:32

18442 ;MLG
18443 ;

18444
18445
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
18471

;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
:
;
;
;
;
18472 ;
18473 ;
18474 ;

8657
8658
B659
8660
B661
8662
8663
B664L
8665
8666
8667
8668
8669
8670
8671
8672
8673
8674
8675
8676
8677
8678
8679
8680
8681
8682
8683
8684
8685
8686

!
!
BGNTST;

18476
18477
18478
18479
18480
18481
18482
18483
18484
18485

8688
8689
8690
8691
8692
8693
8694
8695
8696
8697

!
!
!
!'-

18475 ;

;
:
;
;
;
;
;
;
;
;

18486 ;

18487 ;

18488 ;

18489
18490
18491
18492
18493
18494
18495
18496

;
;
;
;
;
;
:
;

SEQ 0371

8687

8698

8699

8700

8701
8702
8703
8704
8705
8706
8707
8708

T0PS=20 Bliss=16 v2(206)

PA:<NEALE>BLZML4.BLI.2

'+
! TEST NUMBER:
TST 45
!
' TEST NAME:
PROM DATA TEST
!
! TEST DESCRIPTION:
!
!
VERIFY THAT CHECK SUM VALUES FOR
!
ALL PRESENT MEMORY ARRAY UV PROM
!
LOCATIONS ARE ERROR FREE BY:
!
!
1.
DOING MBUS TRANSFERS
!
AT ALL PRESENT BLOCKS
!
AND TESTING THE UNS BIT
!
TO BE CLEARED.
!
! IMPLICIT INPUTS:
!
!
10_BUF
!
!
A VECTOR OF 256 WORDS WHERE
!
DATA FOR MBUS READ AND WRITE
!
FUNCTIONS IS FOUND.

!
!
!

CHIP S1Z

INDITATED THE SIZE OF THE

ARRAY MODULES MOS RAMS.

incr DSA_CNT from 0 to .LST_BLK do
begin
BGNSUB;
CLR_MBUS;
ECC_DIS = ONE;

MLWE = not 255;
MLBA = |0 BUF;

MLDA = .DSA_CNT;
MLCSY

= write;

TO ALL PRESENT BLK'S AND C(HECK UNS BIT

'DISABLE ECC
'LOAD WORD COUNT
'LOAD UBUS ADRS
'LOAD DSA
‘D0 A WRITE FUNCTION

'DELAY UNTIL XFER TO COMPLETE

0
until .DRY

'WRITE

IS_SET;

it .UNS IS_SET
then

‘SEE

XFERR CAUSED AN UNS ERROR

(87)

CIMLAAD ML-11 LOGIC TEST

MACRO M1113 23-0CT=-80 09:11 PAGE %68

qug:sgb TEST SECTION
18499 ;
18500 ;

8709
8710

begin
ERRDF (107, ARR_DAT, 0);

18502 ;

8712

PRINTB (FMT_9, .DSA_TINT);

18501

;

18503
18504
18505
18506
18507
18508

;
;
;
;
;
;

18511

;

18509 ;
18510 ;

18512
18513
18514
18515

8711

871%
8714
8715
8716
8717
8718

if .CHIP_SIZ eql 64
then
begin
PRINTB (FMT_B, ((.DSA_CNT<11, 4>)
end

8719
8720

else

8721

18517 ;
18518 ;
18519 ;
18523

8727
8728
8729

ENDTST;

18527 065010

004167

116772

18529 065020
18530 065022

005001
000536

18528 065014

18531 065024
18532 065026

18533 065034
18534 065040
18535 065044
18536 065052

18537 065056
18538 065064
18539 065072
18540 065100
18541 065104
18542 065112

016702

104402
152777

016700
042700
142777
150077

begin

PRINTB (FMT_8,

8722
8723
8724
8725

8726

end

$T45:

123314

000040
125130
177770
000007
124662

124704

032777

040000

124632

18546 065130

104455

18547 065132

000153

1%:

124666

18544 065120

001470

+ 1)),

‘64K MOS RAM

((.DSA_CNT<9, &>) + 1));

16K MOS RAM

124566

2%:

JSR

R1,$SAVE2

CLR
BR

R1
6%

; DSA.CNT

MOV
BIC
BICB
BISB

ML.DUT,RO
#177770,R0
#7,3ML .REG+40
RO,aML .REG+40

MOV

TRAP
BISB

:
3
3
; DSA.CNT,»
:
3

8697
8698
8699
8700
8701
8705

BIT

#40000,9ML .REG+60

8707

TRAP

8710

8711

BPL

BEQ

012746

006630

MOV

18553 065150
18554 065154
18555 065160
18556 065162

012746
012746
010600
104414

005356
000003

MOV
MOV
MOV
TRAP

18558 065166
18559 065172
18560 065176

012746
012746
010600

004602
000002

010116

8693

#2,3ML.REG+120
#-400,3ML.REG+10
#10.BUF ,aML .REG+20
R1,3ML.REG+30
#61,3ML.REG
aML.REG+50

BISB
MOV
MOV
MOV
MOV
T1STB

18551 065140

18557 065164

8655

8694
8695

.WORD
.WORD

.WORD

18552 065144 012746 006220

3
3

007534

000000

LST.BLK,R2

2
;
#40,aML .REG+40

18548 065134

}gggg 065136

'NEED TO KNOW CHIP SIZE TO PRINT ARRAY NUMBER

end;

124734
124616
124620

18545 065126

SET

ENDSUB;

000002
177400
010342
124624
000061
124632

100375

end;

152777
012777
012777
010177
012777
105777

18543 065116

'ERROR

PRINTB (TWO_FMT, WRD_35, PHR_4);

;
;
;
;

18516 ;

SEQ 0372

MOV

MOV
MOV
MOV

153

ARR.DAT

#PHR .4 ,=(SP)

#WRD.35,-(SP)

#TWO.FMT,=(SP)
#3,-(SP)
SP,RO
14

R1,(SP)

#ENT.9,-(SP)
#2,-(SP)
SP.RO

; SP,¢

; DSA.CNT,*
; SP,¢

8712

CIZMLAAD ML-11 LOGIC TEST

'HARDWARD TEST

18561 065200

SECTION

104414

18562 065202
18563 065210
18564 065212
18565 065214
18566 065216
18567 065220
18568 065222

026727
001020
010100
006200
006200
006200
000300

18573 065240
18574 065244
18575 065246
18576 065250
18577 065252
18578 065254
18579 065256
18580 065260
18581 065264
18582 065266

012746
010600
104414
000415
010100
006200
000300
042700
010046
005216

18569
18570
18571
18572

065224
065230
065232
065234

18583 065270
18584 065274
18585 065300
18586 065302

18587 065304

18588 065310

18589 065312
18590 065314

042700
010046
005216
012746

012746
012746
010600
104414

062706

104467

123124

3%:
177760

004546

005201

}gggg 065324

000207

020102
003640

#2,-(5P)
SP,RO
14
4%
R1,R0
RO
RO
#177760,R0
RO,=(SP)
(SP)

004767

18415 065334
18616 065336
18617 065340

006000
103773
000207

104466

177456

1%:

;

DSA.CNT,»

;

SP,e

8717

:
* DSA.CNT,»

#FMT
. 8,-(SP)
#2,-(SP)
SP.RO
14

#22,SP

ROR
BLO

RO
1%

;

SP,¢

8714
8721

8709

8724

INC

: DSA.CNT

8693

RTS

8655

8727

CMP
BLE

Routine Size:

T45::

8714

#177760,R0
RO,=(SP)
(SP)
#FMT
. 8,-(SP)

ADD

TRAP

1.R2
1%
103 words

: DSA.CNT,»

; Maximum stack depth per invocation:

18613 065326

18614 065332

b1 ¥

;

}ggg;

18612 065326

4%:

6%:

18596

MOV
MOV
TRAP
BR
MOV
ASR
SWAB
BIC
MOV
INC
MOV
MOV
TRAP

SEQ 0373

(HIP.SIZ,#100
%
R1,R0
RO
RO
RO
RO

MoV

000002

J 13
PAGE 368-1

CMP
BNE
MOV
ASR
ASR
ASR
SWAB
BIC
MOV
INC
MOV

004546
000002

000022

23-0CT-80 09:11
TRAP

000100

177760

006000
103643

18591 065316

18592 065320
18593 065322

MACRO M1113

JSR

PC,8$T45

ROR
BLO
RTS

RO
1%
PC

TRAP

12 words

CIMLAAD ML-11 L 0Gl C TEST
'HARDWARD TEST § ECTION
I

23-0CT-80 09:11

K 13

PAGE 369

BGNCLN;

TESTS ARE RUN ON A LOGICAL UNIT.

'CLEAR THE MASS BUS

return;

ENDCLN;
152777

000207

000040

124370

LCLEAN: BISB
RTS

;
;

065352
18658 065352
18659 065356
18660 065360
18661

18662
18663
18668
18669
18670 ;
18671 ;
18672 ;

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

THE CLEANUP CODING SECTION IS EXECUTED AFTER THE

HARDWARE

CLR = ONE;

TETEIR
I

el
-

oo
o

065342
18640 065350

SEQ 0374

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

18624 ;
18625

—

;

|
|

MACRO M1113

004767
104412

177764

JSR
TRAP
RTS

;
*

8737
8738
8739

LASTAD;

BGNSETUP (0);
ENDSETUP;

Routine Size:
& words
Maximum stack depth per

LSCLEAN::

000207

#40,3ML .REG+40

invocation:

8734
8729

8735

0 words

PC,LCLEAN
12
PC

Routine Size:
& words
Maximum stack depth per

0 words

MACRO M1113 23-0CT-80 09:11 PAGE &70

'WARDWARD TEST
|

18677
18678
18679
80
81 065362

18693 065370
18694 065370

SECTION

SEQ 0375

22-0ct=198 01
22-0ct=198 01

JMLG

065366
000000
000000

BLSLAS:: .WORD
WORD

065366
000000

LSLAST

TSFREE::.WORD

RTS

Routine Size:

8736

word

; Maximum stack depth per invocation:
8740
8741
8742

0 words

end

eludom
: 0TS external references

.GLOBL
.GLOBL

Size:

Run Time:

BL$GT2, $SAVES, $SAVE4L, $SAVES
$SAVEZ2, BLSPUZ2, BLSGT1

11069 code + 1542 data words

02:15.5

Elapsed Time: 04:38.4

Hemor{ Used:
103 pages
Compilation Complete
000001

:45:32

TOPS

PA:<

BLSLAS+L
0

SEND.LINK::
;

147:44

TSFREE
<<TSFREE=<BLSLAS*4>>/2>

TSPTHV

000207

(=1

'CIMLAAO ML=11 LOGIC TEST

.END

——

(lHLAAO ML-11 LOGIC TEST
|SYMBOL TABLE

|ADR

= 000020 G

8170 = 000001
81700 = 000001
BIT01 = 000002
BiT102 = 000004
BIT03 = 000010
B1T04 = 000020
BITO5 = 000040
81706 = 000100
81707 = 000200
BITO8 = 000400
81709 = 001000
BIT1
= 000002
BIT10 = 002000
BIT11 = 004000
BIT12 = 010000
BIT13 = 020000
BIT14 =
040000
BIT15 = 100000
BIT2 = 000004
BIT3 = 000010
BIT4 = 000020
BITS = 000040
BIT6é = 000100
BIT7 = 000200
BIT8 = 000400
BIT9 = 001000

BOE
= 000400
CHIP.S 010332
CSAU_ = 000052
C$SAUTO= 000061
C$BRK = 000022
C$BSEG= 000004
($85uB= 000002
CSCEFG= 000045
CSCLCK= 000062
CSCLEA= 000012
C$CLOS= 000035
CSCLP1= 000006
CSCVEC= 000036
CSDCLN= 000044
($00DU= 000051
CSDRPT= 000024

(Al lalalalalalalalalalalalalalalalalalalalalalalalalalalalalalala
AT AT A)

ARR.DA= 007534
ARR.IN 010324
ARR.16 010336

MACRO M1113

CS0U = 000053
CSEDIT= 00000;
CSERDF= 00005
CSERHR= 000056
CSERRO= 000060
CSERSF= 000054
CSERSO= 000057
CSESCA= 000010
CSESEG= 000005
CSESUB= 000003
C$ETST= 000001
CSEXIT= 000032
CSGETB= 000026
CSGETW= 000027
CSGMAN= 000043
CSGPHR= 000042
C$GPLO= 000030
C$SGPRI= 000040
C$INIT= 000011
CSINLP= 000020
CSMANI= 000050
CSMEM = 000031
CSMSG = 000023
CSOPEN= 000034
CSPNTB= 000014
CSPNTF= 000017
CSPNTS= 000016
CSPNTX= 000015
C$QI0 = 000377
C$RDBU= 000007
CSREFG= 000047
CSRESE= 000033
CSREVI= 000003
CSRFLA= 000021
CSRPT
= 000025
C$SEFG= 000046
C$SPRI= 000041
C$SVEC= 000037
C$TPRI= 009013
DAT.DM 012626
DFPTBL 002320 G
DIAGMC= 000000
DIVMOD 003532
DRIVE. 011674
D1.TEM= 007714
D2.TEM= 007716
EF .CON= 000036 G
EF .NEW= 000035 G
EF .PWR= 000034 G
EF .RES= 000037 6
EF.STA= 000040 G
EIG.FM= 005474
ELV.FM= 005576
ERRBLK 002160 G
ERRMSG 002156 G
ERRNBR 002154 G
ERRTYP 002152 6

23-0CT-80 09:11
EVL
=
ESEND =
ESLOAD=
E2.TEM=
FIRST,
FIV.FM=

FMT.1 =
FMT.10=
FMT.11=
FHT.1§=
FMT.13=
FMT.14=
FMT.15=
FMT.16=
FMT.17=

FMT.18=
FMT.2 =
FMT.3 =
FMT.4 =

FMT.5 =
FMT.6 =
FMT.7 =
FMT.8 =
FMT.9 =
FNC.1 =
FNC.10=
FNC.11=
FNC.12=
FNC.13=
FNC.14=
FNC.15=
FNC.16=
FNC.17=

M.13
PAGE 370-1

000004 G
002100
000035
007720
012520
005414
004164
004634
004706
004742
004772
005046
005106
005154
005244

005300
004224
004312
004336

004366
004470
004520
004546
004602
006752
007074
007104
007124
007136
007146
007162
007174
007206

FNC.18= 007216
FNC.19= 007230
FNC.2 = 006766
FNC.21= 007242
FNC.22= 007254
FNC.23= 007266
FNC.3 = 006774
FNC.4 = 007002
FNC.5 = 007020
FNC.6 = 007030
FNC.7 = 007036
FNC.8 = 007046
FNC.9 = 007062
FOR.FM= 005400

FSPWR = 000017
000012
000003

FSRPT =
F$SEG =
F$SOFT=
F$SRV =
F$suB =
F$SW =
FSTEST=

000005
000010
000002
000014
000001

GSPRMA=
GSPRMD=
GSPRML=
GSRADA=
GSRADB=
GSRADD=

000001
000002
000000
000140
000000
000040

GD.BLK 012542
600D.B 010326
GSCNTO= 000200
GSDELM= 000372
G$DISP= 000003
GSEXCP= 000400
GSHILI= 000002
GSLOLI= 000001
GSNO = 000000
GSOFFS= 000400
GSOFSI= 000376

GSYES = 000010
HELP
HOE

= 000000
= 100000

HW.OR.
IBE
=
IDU
=
IER_
=
INTER =
10.BUF
=
ISR
IXE
=
ISAU_ =

007722
010000
000040
020000
007622
010342
000100
004000
000041

F$BGN = 000040

1$AUTO= 000041
ISCLN = 000041
I1$DU = 000041
ISHRD = 000041
ISINIT= 000041
I$MOD = 000041
I$MSG = 000041

FSOU =
FSEND =
FSHARD=
FSHW =
FSINIT=
F$JMP =

I$PWR =
ISRPT =
I$SEG =
I$SETU=
I$SFT =

000041
000041
000041
000041
000041

FSAU
F$SAUTO= 000020

000016
000041
000004
000013
000006
000050

000041
000041
000041
000167
012574
004152
004126
065342
004140
013636
020600
012172
040000
000010
004114
010340
010334

FSMOD = 000000
FSMSG = 000011
FSPROT= 000021

LSPRIO

002042

SEQ 0376

(2 X~

[alalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalAl

SZIAND WL-11 LOGIC TEST

MACRO 1113

LSPROT 002;12 9

PRI

(L$SOFT

PRIO& = 000200 G

SYMB

LSPRT
LSREPP
LSREV
(LSRPT

002112
002062
00201C
004116

6
6
6
G

LSSPC
LSSPCP
LS$SPTP
LSSTA
LSSV
LSTEST
LSTIML
LSUNIT
L10000
L10001
L10002

002056
002020
002024
002030
002340
002114
002014
002012
002336
002342
002440

G
G
6
6
G
G
6
6

MEM.AR=
ML.DUT
ML.LUN
ML.REG

007566
012170 6
012166 G
011700 G

L10003

MSGH1
MSGH2
MSGH3
MSGH4
MSGH5
MSGH6
MSGH?
MSGS1
NIB.SA
NIN.FM=

002662 G

002670

002440
002454
002502
002525
002556
002610
002634
002670
007714
005520

ONEF IL= 000001
ONE.tM= 005350
OP.NUM 010322
0$APTS= 000001
0$AU = 000001
0$BGNR= 000001
0$BGNS= 000001
0s$OU = 000001
OSERRT= 000001
OSGNSW= 000001
O$POIN= 000001
0$SETU= 000001
PAR.DI
010330
PD.TEM 011662
PHR.1 = 006542
PHR.10= 006740
PHR.2 = 0065460
PHR.3 = 006576
PHR.4 = 006630
PHR.5 = 006646

PHR.6 = 006660
PHR.7 = 006672

PHR.8 = 006714
PHR.9 = 006726
. PNT
= 001000 6

PRICO
PRIOT1
PRIO%
PRIOS

= 002000 G
=
=
=
=

000000
000040
000100
000140

G
G
G
G

PRIOS =
PRIO6 =
PRIO7 =
PRSN
PTBL.P
P.AAA
P.AAB
P.AAC
P.AAD
P.AAE
P.AAF

000240
000300
000340
002340
010320
004164
004224
004312
004336
004366
004470

G
6
G
6

P.AAG
P.AAH
P.AAI
P.AAJ
P.AAK

P.AAL
P.AAM
P.AAN
P.AAD
P.AAP
P.AAQ
P.AAR
P.AAS
P.AAT
P.AAU

P.AAV
P.AAW
P.AAX
P.AAY
P.AAZ
P.ABA
P.ABB
P.ABC
P.ABD
P.ABE
P.ABF
P.ABG
P.ABH
P.ABI
P.ABJ
P.ABK
P.ABL
P.ABM
P.ABN

P.ABO

P.ABP
P.ABQ
P.ABR
P.ABS
P.ABT

004520
004546
004602
004634
004706

004742
004772
005046
005106
005154
005244
005300
005350
005356
005366
005400

SRR

23-0CT-80 09:11

P.ABU 006034
P.ABV
P.ABW
P.ABX
P.ABY

006040
006046
006054
006062

P.ACA
P.ACB
P.ACC
P.ACD
P.ACE
P.ACF
P.ACG
P.ACH
P.ACI
P.ACJ
P.ACK

006104
006112
006126
006134
006142
006156
006164
006200
06506
06212
006220

P.ABZ

P.ACL
P.ACM
P.ACN
P.ACO
P.ACP

P.ACQ
P.ACR
P.ACS
P.ACT
P.ACU
P.ACV
P.ACW
P.ACX
P.ACY
P.ACZ

006076

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

005740
005750

P.ADA
P.ADB
P.ADC
P.ADD
P.ADE
P.ADF
P.ADG
P.ADH
P.ADI
P.ADJ
P.ADK
P.ADL
P.ADM
P.ADN
P.ADO
P.ADP
P.ADG
P.ADR
P.ADS

005770
005774

P.ADU
P.ADV

005414
005432
005452
005474
005520
005546
005576
005630
005634
005646
005654
005662

005670
005676

005712
005726
005760
006006
006014
006022

P.ADT

P.ADW
P.ADX
P.ADY

PAGE 370-2

P.ADZ

007020

P.AEE

007074

P.AEA
P.AEB
P.AEC
P.AED
P.AEF
P.AEG
P.AEH
P.AEl
P.AEJ
P.AEK
P.AEL
P.AEM
P.AEN
P.AE0
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.AFC
P.AFD
P.AFE

REG.IN 011676

007030
007036
00704
00706

REG.1 =
REG.10=
REG.11=
REG.1§8

007302
007372
007400
007406

007104
007124
007136
007146
007162
007174
007206
007216
007230
007242
007254

REG.14=
REG.15=
REG.16=
REG.% =
REG.3
=
REG.4 =
REG.5 =
REG.6 =
REG.7 =
REG.8 =
REG.9 =

007422
007430
007436
007312
007320
007326
007334
007342
007350
007356
007364

RH.VEC
SEV.FM=
SFPTBL
SIX.FM=
STACK
STK.OF
SVCGBL=
SVCINS=
SVCsuB=
SVCTAG=

012164 6
005452
002340 G
005432
011354
011342
177777
177777
177777
177777

007266
007302
007312
007320
007326

007334
007342
007350
007356
007364
007372
007400
007406
007414
007422

REG.13= 007414

RE2
RE3
RE4
RH.ADD
RH.TYP

004106
004104
004102
012160 G
012162 6

006672
006714

P.AFF
P.AFG
P.AFH
P.AFI
P.AFJ
P.AFK
P.AFL
P.AFM
RAS.IN
RD.CST
RD.DA
RD.DAT
RD.DS
RD.D1
RD.D2
RD.D3
RD.EE
RD.EL
RD.ER

007430
007436
007444
007500
007534
007566
007622
007662
011666
014244
014600
011672
017514
016366
016704
017236
016242
016200
014422

SVCTIST=
SYNC
=
SSLSYM=
TEN.FM=
THR.FM=
TRBLE.=
TST.LN
TWO.FM=
T$SARGC=
T$CODE=
TSERRN=
TSEXCP=
TSFREE
TSGMAN=
TSHILI=
“TSLAST=
T$LOLI=
TSLSYM=
TSNEST=

006740
006752

RD.E2
RD.MR

015576
014756

TSNS1 = 000021
T$SPTHV= 000000 G

006560

006576
006630
006646
006660
006726

006766
006774
007002

RD.E1

RD.PA
RD.PD
RD.REG

015356
015150
016040
020210

177777
007500
010000
005546
005366
007662
012660
005356
000003
000130
000000
000000

065366 G

000000
000007
000000
000000

010000
177777

TSNSO = 000000
T$SPTNU= 000000
T$SAVL= 177777
T$SEGL= 177777

SEQ 0377

CZMLAAD ML-11 LOGIC TEST
'SYMBOL TABLE

MACRO M1113 23-0CT-80 09:11 PAGE 3703

SEQ 0378

' T$SUBN= 000000
T$TAGL= 177777
TSTAGN= 010005
T$TEMP= 000000
T$TEST= 000000
T1$T1STM= 177777
1$157S= 000000
TSSHAR= 010002
T$$HW = 010000
T$$PRO= 010004
T$$S0F= 010003
T$$SW = 010001
mn
021714 G
110
026730 G
T
030102 6

134
135
136
137
138
139
14
140
141
142
143
144
145
5
T

055702 6
057230 6
057656 6
060650 G
061702 G
062454 6
023462 6
063410 G
063620 6
064004 G
064502 G
064774 G
065326 G
024354 G
025340 6

WRD.27= 006134
WRD.29= 006142
WRD.3 = 005646
WRD.30= 006156
WRD.31= 006164
WRD. i* 006200
WRD.33= 0062
WRD. 34= 00621
WRD.35= 006220
WRD.36= 006226
WRD.37= 006232
WRD.38= 006242
WRD.39= 006250
WRD.4 = 005654
WRD.40= 006260

WRD.7 = 005676
WRD.8 = 005712
WRD.9 = 0057;6
WRT.CS 014174
WRT.DA 014530
WRT.DS 017512
WRT.D1 016302
WRT.D2 016620
WRT.D3 017136
WRT.EE 016240
WRT.EL 016176
WRT.ER 014352
WRT.E1 015272
WRT.E2 015500
WRT.MR 014706

$116
$117
$718
$719
$12
$120
$121
$122
$123
$724
$125
$726
$127
$728
$729

033770
035134
036074
036470
021730
037136
037474
040650
041424
042550
043326
044312
045424
0466220
047614

113
114
115

032616 G
033516 6
033754 G

T8
19
UAM

026054 G
026320 6
= 000200 G

WRD.42= 006300
WRD.43= 006306
WRD.44= 006316

WRT.PD
WRT.RE
WT.DAT

$730
$T31
$732

051352
052364
053320

036960 6
036454 G
037122 6
022402 G
037460 6
040634 6
041410 6
04%534 6
043312 6

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

112

031350 G

116

035120 6

117
118
119
12
120
121
122
123
124

125
126
127
728
129
13
130
131
132

133

WRD.1 = 005630

044276 G
045410 6
046204 G
047600 G
051336 6
023024 G
052350 6
053304 G
053736 G

WRD.19= 006040
WRD.2 = 005634
WRD.20= 006046
WRD.21= 006054
WRD.22= 006062
WRD.23= 006076
WRD.24= 006104
WRD.25= 006112
WRD.26= 006126

054774 G

065372
000000
ERRORS DETECTED:

025412 6

. ABS.

WRD.41= 006264

WRD.45= 006324

WRD.46= 006336
WRD.47= 006350
WRD.48= 006360
WRD.49= 006370
WRD.5 = 005662
WRD.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= 006504
WRD.6 = 005670
WRD.60= 006510
WRD.61= 006526

WRT.PA

015064

Ww.C.SI

011664

015732
017622
011670

XOR.LN 013354
X$ALWA= 000000
X$FALS= 000040
X$O0FFS= 000400
X$TRUE= 000020
SEND.L 065370 G
$SPATCH 002720 &
$SAVEZ2
004006 G
$SAVES
004022 G

$SAVEL
$SAVES
$T1
$710
$T1
$712
$113
$714
$715

004040 6
004060 6
021522
026334
026744
030116
031364
032632
033532

$713

$7133

$734
$135
$736
$137
$738
$739
$T4
$740
$741

$742
$743
$744
$745
$715
$76
$17
$18
$19

022416
053752

055010
055716
057244
057672
060664
061716
023040
062470
063424

063634
064020
064516
065010
023476
024370
025354
025426
026070

000
001

VIRTUAL MEMORY USED:
32783 WORDS
( 129 PAGES)
DYNAMIC MEMORY: 21558 WORDS ( 82 PAGES)
ELAPSED TIME: 00:14:51

ML11,ML11/=SP/CR:SYM=SVC/ML,CZMLAA.DOC ,ML2.P11,B16PG1.P11,B16PG2.P11,B16PG3.P11,B16PG4.P11,B16MUL.P11,B16SAV.P11 ML3. P11 ML4.PTT

PAGE 1

SEQ 0379

vo1

P
0N"
Wt Neee
NJ NN
00
i
NO —gNnN
VOO
ala¥] (¥

CREF

€ 14

000010
007444

ASSEMB
ASYNC

000001
000001
000002
000004
000010
000020

$°g3s83 3ss55s8sg3e383388s28

#81-1846

186-7529
198 8183

206-8579
211-9015
218-9521
227-10139
233-10599
353-17703

223-9761
227-1017
236-1078
353-1772

=10342
-13139

#78-1666
#78-1665
#78-1664
#78-1663

BLSGT1

224-9859

312-15426

370-18713

—-—
wuen
OMo
alaV]Lo LY(a1l

TN Me—NN

="WNWI—= =OOO

7-13

POee—qONdO—fNC—dBOtO@otbtO)dd=et4Pt0>)eetSt

=
=
=
=
=
=

IL~ gFM @E3 N— P0 ONM k3&Ne~ P0 O -N— LN eoTYo —-0NY NONOFOoN—@-NhNO

=sal ¥l~F

uslNnoel—auln"oWdD=ol
"

O 5

..-

&=8«OT< - WNMN

3G
M0
~
F
—
«3MO
—~F ~OF O a0
OMO
30O wVe

oom

MACRO ON 23-0CT-B0 AT 09:15
ML
CREATED BY
|SYMBOL CROSS REFERENCE
R;FEREN(ES
SYMBOL VALUE
'ADR
¥ 8-1685
= 0000%2 G

-_—0

—-e LaBlasl

G—O~ "L

68-18548
267-12866

180-7228
198-8149

185-7505
198-8166

169-6522
193-7896

173-6834
193-7913

-6897
8130
8524

229-10 358
279-13 567

2249865
229-10374
289-14134

225-9912
230-10394

200-8286
211-8911
214-9285
224-983 2

47-11786

47-11769
-1712%
-1285

256-16798

205-8541
211-8960
215-9343
227-10106
233-10559
352-17640

205-8558
211-8980
215-9361
227-10122
233-10578

352-17660

L1
CREATED BY MACRO ON 23-0C7-80 AT 09:15
SYMBOL CROSS REFERENCE
SYMBOL
VALUE
RiFEREN(ES
BLSSHF
003740 6
12-155
12-158
12-162

'BOE
|CHIP.S

C$AU
CSAUTO
C$BRK
($8SEG
($8SuB
CSCEFG
(s$CLCK
CSCLEA
($CLOS
CSCLP1
CSCVEC
CSOCLN
($00DU
CSDRPT
C$OU
CSEDIT
CSERDF
CSERHR
CSERRO
CSERSF
CSERSO
CSESCA
CSESEG
($ESUB
CSETST
CSEXIT
(SGETB
C$GE'W
CSGMAN
CSGPHR
($GPLO
CSGPRI
CSINIT
CSINLP
CSMANI
CSMEM
CSMSG
CSOPEN
CSPNTB
CSPNTF
CSPNTS
CSPNTX
(sal0
CSRDBU
CSREFG
CSRESE
CSREVI

= 000400
010332

= 000052
= 000061
= 000022
= 000004
= 000002
= 000045
= 000062
= 000012
= 000035
= 000006
= 000036
= 000044
= 000051
= 000024
= 000053
= 000003
= 000055
= 000056
= 000060
= 000054
= 000057
= 000010
= 000005
=
000003
= 000001
= 000032
= 000026
= 000027
= 000043
= 000042
= 000030
= 000040
= 000011
= 000020
= 000050
= 000031
= 000023
= 000034
= 000014
= 000017
= 000016
= 000015
= 000377
= 000007
= 000047
= 000033
= 000003

PAGE 2
CREF
vO1

'23°§g;

26-143

26=147

12-16%
24-15

#78-1689
#74=1441

+155-5685

+155-5705

368-18562

#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13
#7-13

7-65

#7-13
7-65

D 14
SEQ 0380

13=191
25-180

19-175
31-192

19-178
31-196

19-182
31-202

19-186

32-234

mL1Y
CREATED BY
MACRO ON 23-0CT-80 AT 09:15
'SYMBOL CROSS REFERENCE
REFERENCES
'SYMBOL
VALUE
#7-13
CSRFLA = 000021
#7-13%
l(tRPY
= 000025
#7-13%
|CS$SEFG = 000046
#7-13
(C$SPRI = 000041
#7-13
000037
=
CSSVEC
#713
C$TPRI
= 000013
#87-214
DAT.DM
012626

= 007716

EF.CON
EF.NEW
EF.PWR
EF.RES
EF.STA
EIG.FM
ELV.FM
ERRBLK
ERRMSG
ERRNBR
ERRTYP
EVL
ESEND
ESLOAD
E2.TEM

=
=
=
=
=
=
=

FIRS!.
FIV.FM

012520
= 005414

FMT.1

FMT.10
FMT.11
FMT.12
FMT.13

FMT.14
FMT.15
FMT.16

FMT.17
FMT.18
FMT.2
FMT.3

=
=
=
=

000036
000035
000034
000037
000040
005474
005576
002160
002156
002156
002152
000004
002100
000035
007720

= 004164

=
=
=
=

004634
004706
004742
004772

=
=
=
=

005244
005300
004224
004312

= 005046
= 005106
= 005154

SEQ 0381

270-13067

293-14353

174-6893

175-6910

294-14393

300-14709

300-14741

311-15340

G
*

#81-1852

265-12746 *266-12800 *271-13094 #277-13426 +279-13539 +294-14416
*342-17095
265-12747 *266-12801 #271-13095 277-13427 +279-13540 +294-14417
*342-17096

*301-14768 +

#81-1853

G
G
G
G
G
G
G
G
G
G

*301-14769 +

#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 +3

#84-1997
#79-1723

265-12748 *266-12802 *271-13096 *277-13428 *279-13541 *294-14418
*342-1709/
232-10547 261-11353 252-12053 252-12075 278-13494
199-8211
-8156
206-8626
211-9044
225-9876
230-10401
348-17426

15364

200-8255
207-8644
211-9076

227-10113
233-10566
353-17733

#78-1697
#78-1706
#78-1707
#78-1708
#78-1709
#78-1710
#78-1711
#78-1712
#78-1713
#79-1718
#78-1698
#78-1699

2
3

1
2

2
2

2
3
1
1

1
1

D2.TEM

£ 14

233-10590

234-10615

169-6562

174-6873

181-7257

002320
= 000000
003532
011674
= 007714

DFPTBL
DIAGMC
D1VMOD
DRIVE.
D1.TEM

PAGE 3
vo1
CREF

175-6911

189-7715

2641-11442

305-15040

332-16480

FNC.7
FNC.8
FNC.9
FOR.FM

=
=
=
=

007036
007046
007062
005400

F$AU
FSAUTO
F$BGN
FSCLEA
F$DU
FSEND

=
=
=
=
=
=

000015
000020
000040
000007
000016
000041

FSHARD
FOHW
FSINIT
FSJMP
FSMOD
FSMSG
FSPROT
FSPWR
FSRPT
F$SEG
F$SOFT

=
=
=
=
=
=
=
=
=
=
=

000004
000013
000006
000050
000000
000011
000021
000017
000012
000003
000005

68-18583

SEQ 0382

327-16233

352-17650

352-17670

353-17713

337-16814

368-18558

227-10174
229-10377

227-10219
230-10397

347-17400

348-17421

= 007030

48-11862

259-12460

NN
-

FNC.6

Q07074
007104
007124
007136
007146
007162
007174
007206
007216
007230
006766
007242
007254
007266
006774
007002
007020

O
wN
WN

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

FNC.10
FNC.11
FNC.12
FNC.13
FNC.14
FNC.1S5
FNC.16
FNC.17
FNC.18
FNC.19
FNC.2
FNC.21
FNC.22
FNC.23
FNC.3
FNC.&
FNC.5

= 006752

= 004602

—

[FNC.1

[FMT.9

#78-1702
#78-1703
#78-1704

oo~

= 004470
= 004520
= 004546

OMNININ)
— = —b —d -2

FMT.6
FMT.7
FMT.B

e N
d e e d e e e i
N e b D
W=00WHMWNNINNWOOONO®O
SFOMOSNTO—=00
=WV
0 =N
VION = =2 8 JWOOANNO
-0 NO
O
ONNOWVINOWSSTNOONO
W

PAGE &
CREATED BY MACRO ON 23-0CT-80 AT 09:15
ML
SYMBOL CROSS REFERENCE
vol
CREF
REFERE
NCES
SYMBOL
VALUE
#78-1700
FMT.6
= 006336
FMT.S
#78-1701
= 004366
326-16162 326-16198

227-10145
229-10361
233-10602
347-17378

287-140

335-16744

289-14138
318-15745

335-16738

337-16807

193-7899

193-7916

223-9799

224-9835

366-18399

216-9372
200-8294
206-8622
295-14469

361-18161
366-18404
207-8640
296-14495

207-8669
301-14797

305-15023

318-15741

331-16463

239-111
363-182

241-11429

289-14140

SYMBOL
FSSRV
FSSUB
FSSW
FSTEST

VALUE
= 000010
= 000002
= 000014
= 000001

GOOD.B
GSCNTO
GSDELM
GSDISP
GSEXCP
GSHILI
GSLOLI
GSNO
GSOFFS
GSOFSI
GSPRMA
GSPRMD
GSPRML
GSRADA
GSRADB
GSRADD
GSRADL
GSRADO
GSXFER
GSYES

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

HJ.OR.

IBE
IDU
IER
INTER

10.BUF

SEQ 0383

vO1

012542

294-14380
331-16442

300-14732
34117053

304-14987
346-17330

305-15008
346-17352

010326
000200
000372
000003
000400
000002
000001
000000
000400
000376
000001
000002
000000
000140
000000
000040
000120
000020
000004
000010

85-2048

B87-2147

+155<5675

+266-12846

8-240
8-240

8-241
8-241

8-242
8-242

8-241
8-245

8-242
8-285

8-244

8-245
8-240

8-285
8-241

8=244

8-240

8-241

8-242

8-243

8 249

8-276

8-291

8-313

8-330

£2461-11371

2641-11414

= 100000
007722

010000
000040
020000
007622

010342

ISR
IXE
ISAU
ISAUTO
ISCLN
I$DU
ISHRD

=
=
=
=
=
=
=

ISMOD
I$MSG
ISPROT

= 000041
= 000041
= 000040

ISINIT

CREF

6 14

7=162

= 000000

=
=
=
=

PAGE S

7-150

000100
004000
000041
000041
000041
000041
000041

= 000041

HELP

REFE;ENCES

GD.BLK

ON 23-0CT-80 AT 09:15

#78-1696
#73-1427
#78-1693
#78-1686
#78-1694
#81-1850
#74-1446

285-13884
*317-15694
335-16699
*340-17020
+362-18201

#78-1687
#78-1692
#7-13

161-6017

84-1999
288-14049
318-15724
335-16708
*346-17329
*362-18243

7-30

7-48

7=-67

8-243
8-243

7-105

277-13454
239-11091
211-9090
208-8691
85-2049
86-2098
87-2148
258-12356
2294-164378 +300-14731 +304-14986 *305-15004
*324-16045 *324-16046 *331-16419 +331-16420
33616767 336-16770 +336-16781
336-16786
*346-17344 347-17370 347-17392 351-17627
+365-18374
368-18539

#7-39

8-337

#8-337

324-16C51
365-18375

311-1532
362-1818

8-244
8-244

8-245
8-245

8-285
8-285

8-245
7-152

WNNO W
— O N

"11
CREATED BY MACRO
SYMBOL CROSS REFERENCE

296-1449?2
264-12719
310-15279
331-16450 '33
*340-17018 *340-17019
359-18005 *362-18179

W14
PAGE 6
M1
MACRO ON 23-0CT-80 AT 09:15
CREATED BY
vO1
SYMBOL CROSS REFERENCE
CREF
REFERENCES
SYMBOL
VALUE
#7-13
ISPTAB = 000041
#7-1%
= 000041
[$PWR
#7-13
= 000041
ISRPT
#7-13
= 000041
I1$SEG
#7-13
I$SETU = 000041
#8-288
#8-274
= 000041
I$SFT
#7-13
= 000041
I$SRV
#7-13
= 000041
I$SUB
#7-13%
= 000041
L 18TST
#7-13
= 000167
1JSJMP
#86-2095
012574
LAST.B
276-13377 276-13399 278-13512
353-17693
46-198
#46-181
LAU
004152
#46-83
46-100
LAUTO
004126
#369-18639
LCLEAN
065342
369-18658
#66-131
L6-148
LDU
004140
#96-2672
LD.LNG
013636
264-12737
#154-5613
156-5758
LINIT
020600
#81-1861
LOAD.S
012172
325-16119
#78-1695
LOE
= 040000
#78-1684
LOT
= 000010
#46-32
004114
L6-49
LRPT
*155-5693
*156-5720
*156-5719
*155-5692
#74-1445
*155-5677
LST.AR
010340

267-12856

010334

#764-1443

LSACP
LSAPT
LSAU
LSAUT
LSAUTO
LSCCP
LSCLEA
L$CO
LSDEPO
LSDESC
LSDESP
LSDEVP
LSDISP
LSDLY

002110
002036
004154
002070
004130
002106
065352
002032
002011
002130
002076
002060
002164
002116

#7-65
#7-65

LSDTP
{ LSDTYP
L$DU
LSDUT
LSDVTY
LSEF
LSENVI
LSERRT

002040
002034
004142
002072
002122
002052
002044
002152

[Alalalalalalalal

[AlalalalalalalalalalalalalAl

LST.BL

278-13482

7-65
#7-65
7-65
#7-65
7-65
#7-65
#7-65
7-65
#7-65
#7-65
7-65
#7-65

236-10768
258-12385
276-13403
300-14714
342-17088

#7-65
#7-65
7-65
#7-65
7-65
#7-65
#7-65
7-65

227-10155 227-10199 257-12335
267-12865
*156-5728
*156=5729
*155-5700
*156-5727
+155-5698
*155-5699
*155-5678
86-2097
351=17614
353-17697
353-17712
356-17874&
359-18006
368-18528

#46-198
#46-100

#369-18657

5EQ 0384

ML
CREATED BY
MACRO
ON 23-0CT=80 AT 09:15
SYMBOL CROSS REFERENCE
SYMBOL
VALUE
REFERENCES

LSETP
LSEXP1
LSEXPL
LSEXPS
LSHARD
LSHIME
LSHPCP
LSHPTP

LSHW
LSICP
LSINIT
LSLADP

LSLAST

LSLOAD
LSLUN
LSMREV
LSNAME
LSPRIO
LSPROT
LSPRT
LSREPP
LSREV
LSRPT
LSSOF T

LS$SPC

002102
002046
002064
002066
002344
002120
002016
002022

6
G
G
G
G
G
G
G

002320
002104
021512
002026

G
G
G
G

002100
002074
002050
002000
002042
002712
002112
002062
002010
004116
002662

G
G
G
G
G
G
G
G
G
G
G

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
7-65
7-65
£7-65
#7-65
#7-65

= 065366

002056

LSSPCP
LSSPTP
L$STA

002020
002024
002030

G
G
G

LSTIML
LSUNIT

002014
002012

G
G

L10001
L10002
L10003

002342
002440
002670

LSSV
LSTEST

L1000V0

MEM.AR
ML.DUT

#7-65
#7-65
#7-65
#7-65
7-65
#7-65
#7-65
#7-65

002340
002114

002336

= 007566
012170

G
G

#7-65

7-65
#7-65
#7-65
#7-65

7-119

7-150
8-226
8-274

#81-1849
#77-1637

158-5841
173-6811

200-8278
222-9732
229-10333
257-12343
278-13507
304-14981
330-16406
ggg-}gg%;
ML.LUN

012166

#77-1636
156-5730

201-8314

8-226

#8-226

7-119

#7-119

PAGE 7
CREF
vOo1

I 14
SEQ 0385

#156-5758

#370-18686

#8-305

#46-49
8-274

#8-274

7=-150

#7-150

154-5607

154-5623

154-5655

131-4496

132-4522

135-4686

136-4712

139-4890

140-4919

+«155-5670

156-5736

204-8494
224-9815
232-10542
258-12374
285-13876
305-14997
331-16438
351-17621

206-8606
224-9822
236-10750
264-12712
288-14042
310-15319
335-16719
352-17684

207-8653
224-9848
239-11005
265-12765
293-14345
311-15332
336-16761
356-178/8

211-8897
224-9855
241-11347
270-13037
294-14374
316-15634
336-16776
358-17996

211-9007
225-9890_
241-11377
270-13063
294-14386
317-15699
340-17006
762-18174

211-9053
227-10096
245-11694
276-13367
299-14698
317-15708
341-17045
362-18212

213-9245
227-10161
252~ 12045
276-13394
300-14726
323-16032
341-17058
365-18369

218-9505
227-10206
252-12070
278-13489
300-14737
324-16061
346-17324
365-18380

*154-5621
158-5874

*154-5622
163-6104

154-5623
167-6335

154-5626
169-6585

*154-5653
175-6918

+154-5654
181-7280

154-5655
190-7730

155-5662
193-7931

#7-139
#7-162
#8-247
#8-288

161-6005
178-7106

208-8707

162-6033
185-7495

211-9106

162-6039
186-7520

216-9384

162-6047
186-7540

219-9551

163-6091
189-7680

239-11211

165-6249
192-7856

241-11453

169-6500
197-8119

249-11881

172-6783
199-8231

254-12147

| ML

CREATED BY

ML.REG

011700

ON 23-0CT-80 AT 09:15

PAGE 8
CREF
Vo1

J 14

SEQ 0386

- ONNMMMMMMMMNS I I I I I I I TN OO O ONNMNNMNNOOOOOO OO

SYMBOL CROSS REFERENCE
SYMBOL
VALUE

MACRO

MACRO
CREATED BY
SYMBOL CROSS REFERENCE

PAGE 9

CREF

K 14

SEQ 0387

vo1

e e e ee e e

OTNV

TEEEE R

00 0 0 0 0

(ICICICIC

ON 23-0CT-80 AT 09:15

" 1

MACRO ON 23-0CT-80 AT 09:15
CREATED BY
SYMBOL CROSS REFERENCE
REFERENCES
SYMBOL
VALUE
MSGH6
002610
MSGH7
002634

NIN.F

ONEF1
ONE .F
OP .NUM

OSAPTS
0%$AU
OS$BGNR
0$BGNS
0$DU
OSERRY
OSGNSW
OSPOIN
O$SETU

PAR.DI
PD.TEM

PHR.1

NO—MNA.

002670
007714

05520
00001

05350
010322
= 000001
000001
000001
000001
000001
000001
000001
000001
000001
010330
011662

#2-4
¥79-1719
#73-1463

5=1176
158-5863
*155-5674

#7-13
"
7
7
7

H7-46
K7-46

-18

1
1

SEQ 0388

2
2
2
2

=19

=23
=25

2
2
2

288-14037

285-13872

L 14

=27

Bl
el

2
2
2
2

7-34

7-164

8-190

8-353

155-5688

155-5694

155-5709

156=5721

189-7685

*96-2700
*97-2748

227-10194

7-65

13
#74-1440
#74-1450

*155-5668

*258-12393

185-7490
25912416 +

279-13547 +285-13897

*279-13528

= 006542

374 «

5
5

#80-1797

= 006646

2
2

189-7713

8157

2785 266-12809 +271-13083 27
3904 +288-14062 288-14068 *29
6078 325-16102 +342-17084 34
v
205-8529
2
227-10147
51
348-17424

2 *277=-13415 277-13434
295-14428 +300-14753

1
1
1

8
1
1

229-10347

233-10564

207-8671

211-8948

425

253-12137

272-13144

87
775

205-8563
214-9290
247-11792

206-8584
215-9331
352-17643

206-8624

PHR.S

94 2
*97-2740

6-1177

0 v= -—

MSGST
NIB.SA

PAGE 10
CREF
VOl

161-6024

277-13458

295-14473

296-14499

208-8696
215-9349

211-8945
227-10128

211-8968
227-10176
205-8526

#80-1798

193-7901

#80-1799
#80-1800
#80-1801
#80-1802
#78-1690
#78-1691
#78-1682
#78-1681
#78-1680
#78-1679
#78-1678
#78-1677
#78-1676

166-6300

—

198-8151
225-9914
347-17379
347-17401

193-7918

211-8985
229-10363
211-8928

353-17731

"1
CREATED BY MACRO ON 23-0CT-80 AT 09:15
PAGE 11
SYMBOL CROSS REFERENCE
CREF
V01
SYMBOL VALUE
REFERENCES
PR107
000340 G
#78-1675
PRSN
002340 G
#7-160
183-7355
183-7361
PTBL.P
010320
#73-1429
156-5628
154-5629
154-5631
155-5669
155-5671
155-5679
P.AAA
P.AAB

P.AAC
P.AAD
P.AAE
P.AAF
P.AAG
P.AAH
P.AAlL
P.AAJ
P.AAK
P.AAL
P.AAM
P.AAN
P.AAD
P.AAP
P.AAQ
P.AAR
P.AAS
P.AAT
P.AAU
P.AAV
P.AAW
P.AAX
P.AAY
P.AAZ
P.ABA
P.ABB
P.ABL
P.ABD
P.ABE
P.ABF
P.ABG
P.ABH
P.ABI
P.ABJ
P.ABK
P.ABL

P.ABM
P.ABN
P.ABO
P.ABP
P.ABQ
P.ABR
P.ABS
P.ABT
P.ABU
P.ABV

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
0060
006014
006022
000034
006040

#60-704
#61-719

#61-737
#61-744
#61-752
#62-778
#62-786
#62-794
#62-804
#62-813
#63-831
#63-841
#63-849
#63-864
#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
#66-1023
#66-1027

#66-1031
#66-1034
#66-1037
#66-1040
#66-1042
#67-1050
#67-1052
#67-1054
#67-1058
#67-1060

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
78-1710
78-1711
78-1712
78-1713
79-1718
79-1719
79-1720
79-1721
79-1722
79-1723
79-1724
79-1725
79-1726
79-1727
79-1728
79-1729
79-1730
79-1731
79-1732
79-1733
79-1734
79-1735
79-1736
79-1737
79-1738

79-1739
79-1740
79-1741
79-1742
79-1743
79-1744
79-1745
79-1746
79-1747
79-1748

.
i

SEC 0389

154-5632

154-5634

*155-5664

155-5665

155-5667

—

w11

co——

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
P.ABW
006046
P.ABX
006054

P.ABY
P.ABZ
P.ACA
P.ACB
P.ACC
P.ACD
P.ACE
P.ACE
P.ACG
P.ACH
P.ACI
P.ACS
P.ACK
P.ACL
P.ACH
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.ADE
P.ADF
P.ADG
P.ADH
P.ADI
P.ADJ
P.ADK
P.ADL
P.ADM
P.ADN
P.ADO
P.ADP
P.ADQ
P.ADR
P.ADS
P.ADT
P.ADU
P.ADV

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
006360
006370
006400
006406
006420
006426
006436
006446
006454
006462
006472
0065
006510
006526
006542
006560
006576
006630
006646
006660
006672
006714
006726
006740
006752

—

MACRO

—

ON 23-0CT-80 AT 09:15

REFERENCES
#67-1062
#67-1064

#67-1066
#67-1070

#67-1072
#67-1076

#67-1078
#67-1080
#67-1082
#67-1086
#67-1088
#67-1092
#67-109
#67-1096

#67-1098
#68-1104
#68-1106
#68-1109

#68-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-1186
#69-1189
#69-119
#69-1203
#69-1208
#70-1216
#70-1220
#70-1226
#70-1230
#70-123
#70-1238

79-1749
79-1750
79-1751
79-1752
79-1753
79-1754
79-1755
79-1756
79-1757
79-1758
79-1759
79-1760
79-1761
79-1762
79-1763
79-1764
79-1765
79-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
80-1796
80-1797
80-1798
80-1799
80-1800
80-1801
80-1802
80-1803
80-1804

PAGE 12
CREF

N 14
VO

<£a 0390

~N a0

SEQ 0391

OMe—-o

Calala'lon .Y
=—

V-iOeOL~]NO

3O M —

B 15

o—g

KVZ"CDEFGH!JKLHNOPQRSTUVUXVlABLQEFGHlJKL”ISA

h ALAL~ ad b 4
t ot ot ot trtrtrtrbrtbrtot Aelele
o g g et etetelelelelelel
R (elelelelelelealelelelal

-—

106-3219
*122-4061
136-4708

+109-3376
122-4062
«140-4913

109-3377
0125-4197
140-4914

CREATED BY

SYMBOL CROSS REFERENCE

'SYMBOL
RD.D

RD.D3
RD.EE
RDUEL
RD.ER
RO(E1
RD.E2
RD.MR
RD-PA
RD.PD
RD.REG

REG. IN

REG.1
REG.10
REG.11
REG.12

REG.13
REG.14
REG.15
REG.16
REG.2
REG.3
REG.4
REG.S
REG.6
REG.7
REG.8
REG.9
RE2
RE 3
RE
RH.ADD
RH.TYP
RH.VEC

VALUE
0197?2

0172
016242
016200
014422
015356
015576
014756
015150
016040
020210

=
=
=
=

=
=
=
=
=
=
=
=
=
=
=
=

= 005452
002340

STACK

SIX.FM

STK.OF

SvCGBL

REFERENCES
#135-467

#74-1458

007302
00737
007400
007406

SEV.FM
SFPTBL

ON 23-0CT-80 AT 09:15

#139-4880
#128-4328
1125-4195
#103-3046
£113-3679
#118-3858
#109-3361
#112-3519
#1122-4044
#149-5381

011676

007414
007422
007430
007436
007312
007320
007326
007334
007342
007350
007356
007364
004106
004104
004102
012160
012162
012164

MACRO

#81-1830
#81-1839
#81-1840
#81-1841

G
¢
-

#81-1842
#81-1843
#81-1844
#81-1845
#81-1831
#81-1832
#81-1833
#81-183%
#81-1835
#81-1836
#81-1837
#81-1838
4S-66
45-74
45-83
#77-1633
#77-1634
#77-1635

CREF

€15

VD1

SEQ 0392

150-5448

150-5453
151-5467
151-5472
150-5413
150-5428
150-5433
150-5423
150-5438
1515462
166-6266

131-4493

180-7191
180-7212
180-7219

180-7205
169-6513

173-8821

135-4683

+135-4691

225-9915
352-17664

353-17707

353-17728

#131-4501

139-4887

+«139-4895

«172-6776

+173-6816

223-9784
216-9367
225-9871
161-6019
175-6904
#45-96
#45-95
M45-9%
*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-9920
312-15413

011354

#764-1449

*B3-1944

+B83-1945

+83-1953

+83-1954

325-16138

326-16160

326-16173

326-16196

011342

#74-1447

81-1864

*324-16056

325-16113 +325-16115

7-65
7-63
7-65
7-63
7-63
7-63
7-65
7-65
7-65

7-65
7-65
7-65
7-65
7-63
7-65
7-63
7-65
7-65

7-65
7-65
7-65
7-63
7-65
7-65
7-63
7-63
7-65

7-65

= 005432

= 177777

#79-1725
#7-150

PAGE 14

318-15746
327-16213

1713

7-65
7-65
7-65
7-65
7-65
7-65
7-65
7-63
7-65

326-16154

327-16231

#7-22

326-16186

7-65

327-16225

7-65

366-18405

7-65

7-65
7-65
7-65
7-65
7-65
7-65
7-63
7-65
7-65

7-65
7-65
7-65
7-65
7-65
7-65
7-65
7-63
7-65

7-65
7-65
7-65
7-65
7-65
7-65
7-65
7-65
7-65

MLl
CREATED BY MACRD
SYMBOL CROSS REFERENCE

PAGE 15
CREF
vo1

D15
SEQ 0393

OT0w W-5 -3oy~—
"-2WN)]iOM3 NaoM

NOo~Oo~

SO O ~ )

o OVNONMN

Ndewa04"aNl"

> > PAWLWT XNIA & e WO Re

b Q- E X Z2EO W ZO W~

> >

WG(6MaONAV0INROYGMNSA

ON 23-0CT-80 AT 09:15

MACRO
"L
CREATED BY
SYMBOL CROSS REFERENCE
VALUE

= 000000
= 000000

REFERENCES

8-239

#8-240

PAGE 16
CREF
vo1

E 15
SEQ 0394

8-240

#8-241

8-241

#8-2462

8-242

#8-244

7-162

#8-226

8-247

#8-274

8-288

#8-305

#370-18687

NYeaVloaYVNlToaWTlXbealelablalalbalalalalalal~DBNl

NONNOO0O0Oe0OeX0O%N%CO&eNO%0NC&OLNC&OVRLO&NVI&LIL &ILTB—UBNLLR
0—NeMrrrrr
eeeee e
.oO]NN
R
N
R
N
L
L
LL
o).oOF.0o1O1.0o oO1Y0.DOOO0NON OOOOL OoMIO OINITO TN<L

—NOLOPXadlOeleOlel0elCeOlel0elOele0lOeleOleMlIeleT]lIaTlYelTe
IvO-(al0JVOa0lNROaX0lOa0l=eOal0Oa-0lObaeOlaOlaMlIalTalOele0l ~DNoNl

SYMBOL
TSLAST
TSLOLI

ON 23-0CT-80 AT 09:15

UILR) NLR. NULRNMeagKcLlelelelelelAeeeeXeeMNOeeeaeWVMAMMK
"

8-274

7-150
#159-5899
#194-7956

8-288
=162

=k32

ULIOBRA

m11

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
111
112

030102
031350

6
G

114
115
116
17
118
119

033516
033754
035120
036060
036454
037122

113

12
120
121
122
123
124
125
126
127
128
129
13
130
131
132

133
134
135
136
137
138
139
14
140
141
142
143
T4h
145
15
16
17
18
19

032616

022402
037460
040634
041410
042534
043312
044276
045410
046204
047600
05133
023024
052350
053304
053736

054774
055702
057230
057656
060650
061702
062454
023462
063410
063620
064004
064502
064774
065326
024354
025340
025412
026054
026320

UAM

= 000200

WRD.10

= 005740

| WRD.11

= 005750

WRD.1

= 005630

MACRO

ON 23-0CT-80 AT 09:15

REFERENCES
7-10
7-103

#201-8335
#208-8728

G
6
6
G
G
6

7-103
7-103
7-103
7-103
7-103
7-103

#216-9405
#219-9571
#226-9960
#227-10259
#230-10423
#234-10647

G
6

7-103
7-103

G
G
G
G
G
6
G
G
G
G
6
G
G

G
6
6
G
G
G
G
G
6
G
G
G
G
G
G
G
G
G
G

7-103

7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
7-103
=103
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
214-9288
#79-1739
318-15743
#79-1740 ~

207-8670
225-9873

PAGE

CREF

F 15
VO

SEQ 0395

#211-9130

#163-6125
#236-10827
#239-11235
#241-11475
#249-11902
#254-12169
#260-12501
#267-129G2
#272-13172
#280-13621
#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-89%46

200-8297
211-9026

204-8511
211-9072

205-8527
214=9276

289-14136
366-18403
200-8266
223-9764
229-10362

301-14799

305-15026

312-15410

200-8295
223-9781

206-8623
223-9800

207-8641
224-9836

229-10378

230-10398

233-10563

362-18195

005654

WRD.40
WRD .41
WRD .42
WRD.43
WRD .44
WRD.45
WRD .46

006260
006264
006300
006306
006316
006324
006336

#79-1768
#79-1769
#80-1774
#80-1775
#80-1776
#80-1777
#80-1778

WRD.30
31
WRD.
WRD. 32
WRD.33
WRD. 34
WRD.35
WRD. 36
WRD.37
WRD.38
WRD. 39

nnnunEEN
N

WRD.4

#79-1753
#79-1754
#79-1755
#79-1756
#79-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

006134

006142
005646
006156
006164

006200
006206
006212

233-10605

=200

211-8915
%27-10220
05-15025

215-9330

216-9368
189-7700

2 77-13457
216-9369

267-12875

287-14019

223-9802
227-10148
225-9916

224-9838

225-9875

225-9919

~No~

~NOwW oo
el l=] oo
coONO~N p—y

215-9314
211-9096
236-10787
272-13145
295-14470

019
644

~ &~ o

006104
006112
006126

208-8695
227-10175
301-14798

199-8208

169-6549

272-13143

326-16182

336-16800

353-17729

296-14494
347-17399

205-8530

198-8172

236-10802
236-10799
295-14474

211-8932

211-8949

331-16464

296-14496

305-15024

326-16153

326-16185

327-16224

247-11788
305-15027

247-11809

248-11830

248-11847

301-14801

305-15028

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

233-10584

368-18552

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-11182
198-8170

205-8528

205-8545

211-8930

211-8947

214-9289

215-9312

253-12135
239-11185

342-17125

L=l

WRD .24
WRD.?2S
WRD .26
WRD.27
WRD .29

211-9043

359-18017

193-7898

own

#79-1749
#79-1750
#79-1751
#79-1752

348-17423

—_-O
NY

006046
006054
006062
006076

SEQ 0396

205-8560
211-9025
224-9834
230-10396
318-15740

WRD.20
WRD.21
WRD .22
WRD.23

Nou—ob\‘nouuu
UL
ONNNNOWNN?—'NW&WO‘O&O
i1
UL
I
I
I
A
)
4 — =
OO OO'}JO
N
N
ed e
e ed O8N b 2 QO OOD
= ~O 0o Co N=0OVOvY

#79-1731

=) = =2 PO NN NN NN =2 NN N NN AN = N NN A =
SO NWVIWO =0
OO~ S SV OWVVNVO

005634

= POWNND
OWSs
W

200-8293
211-8962
216-9370
229-10360
305-15022
348-17422

#79-1744
#79-1745
#79-1746
#79-1747
#79-1748

WRD.?2

WRD.
3

o \l? —O

006006
006014
006022
006034
006040

353-17705

615

236-10800
166-6299

#79-1742
#79-1743

005770
005774

=
oe

205-8562
218-9524
295-14471
366-18402

N
YOO b e d d
WEENNO
= b cd =
P NSO
NN
VW
=N O ~

#79-1761

PAGE 18
CREF
vo1

QD —d e
—
N
Wit ded
WONNON
o Lo ]

233-10582

POND
WW

p Py

VWO ~NOAW

D VDOVDOD
lvlololele)

PR i

o
o0

€CLCECCE
€C

REFERENCES

WROMNOMRON =N
=N —=OvwNnN

005760

WRD.12

ON 23-0CT-80 AT 09:15

— i

SYMBOL CROSS REFERENCE
VALUE
SYMBOL

MACRO

NN
=N
O oo

(REATED BY

199-8210

239-11183

WRT.D3
WRT.EE
WRT.EL
WRT.ER

WRT.E1
WRT.E2

WRT.MR
WRT.PA
WRT.PD
WRT.RE
WT.DAT

w.C.S!
XOR.LN

XSALWA
X$FALS
XSOFFS
X$TRUE
SEND.L
SPATCH

$SAVE2

#1461-4970
#129-4373
#133-4565
#137-4764
#126-6247
#123-4112
#101-2948
#113-3579
#116-3752
#107-3263
#110-3419
#119-3933
#145-5183
#74-1454
*112-3532
125-4198
*143-5068
#746-1451
#94-2510
#7-13

011664
013354
000000
000040
000400

000020

065370

002720
004006

6
6
6

H 15

&S~ 00
ey

SEQ 0397

O N — —
O
=
—

NNN=NO—=~N
- =2 N
WVO oMW
N = NN WO oW
=
NN NO W

oao«:do-oo
1
"

D AN —
b
N

335-16736

- PN

— b
O =2 2 OO 2N —

\VNANNOONONW
N —
O -

—
N —

(o e T N, A R |
N = =2 NN — N

186-7533

N N 00O~ 00 —(NTD

WRT.CS
WRT.DA
WRT.DS
WRT.D1
WRT.D2

PAGE 19
CREF
vo1

169-6545

— e e

WRD .60
WRD.61
WRD.7
WRD.8
WRD.9

348-17425
SOOI
VOOV OO0OO —=—=N

WRD.6

006454
006462
006472
006504
005670
006510
006526
005676
005712
005726
014174
014530
017512
016302
016620
017136
016240
016176
014352
015272
015500
014706
015064
015732
017622
011670

—

| WRD.S

#80-1779
#80-1780
#80-1781
#79-1734
#80-1782
#80-1783
#80-1784
#80-1785
#80-1786
#80-1787
#80-1788
#80-1789
#80-1790
#80-1791
#79-1735
#80-1792
#80-1793
#79-1736
#79-1737
#79-1738
#98-2791
#104-3106

S PON) = = PO

REFERENCES

SY
WRD.4
WRD .48
'WRD .49

WRD.S0
WRD.S51
WRD.S52
WRD.S3
WRD.54
WRD.5S
WRD .56
WRD.S7
WRD.58
WRD.59

ON 23-0CT-80 AT 09:15

ML
CREATED BY MACRO
SYMBOL CROSS REFERENCE

248-1183¢
318-15744

248-11849
336-16802

174-6861

174-6863

335-16737

174-6860

277-13463

287-14013

335-16735

267-11773

247-11790

362-18194

363-18233

186-7552

187-7569

361-18160

362-18193

363-18232

295-14472

296-14498

362-1819¢2

106-3219
*122-4058
136-4708

*109 -3373

179-7146
179-7154

106-3215
118-3876
136-4706
7

42-371
107-3263
122-4044
149-5381

368-18527

#45-61
4

192-7

370~ 1

98-2791
112-3519
133-4565
204-8490

336-16787

122 -4062
*140 -4910

109-3377
*125-4196
140-4914

CREATED BY

SYMBOL CROSS REFERENCE
SYMBOL
VALUE
'$SAVES
004022 G
$SAVEL

$SAVES

|
38

004040

004060

MACRO

ON 23-0CT-80 AT 99:15

aersasnces

12-1
1857«39
#45-76

13-191
189-7677
94-2511

261-11344

245-11687

318-196

299-14690
#158-5837

|$110

021522
026334

#192-7852

$112

030116

#204-8490

$T11

'$113

026744

031364

#211-8893

211-9131

#310-15271

313-15471

#213-9241
#218-9503
#222-9730
#227-10094
#229-10332
#232-10533
#161-6001
#236-10745
#239-11002
#261-11344
#245-11687
#252-12038
#257-12331
#264-12704
#270-13033
#276-13363
#285-13868
#165-6241
#293-14342
#299-14690
#304-14975

$734
$735
$736
$737
$738
$739
$T4
$740

055010
055716
057244
057672
060664
061716
023040
062470

#316-15631
#323-16028
#330-16404
#334-16687
#340-17002
#346-17322
#169-6491
#351-17612

$T41
$T42
| $T43
$T44
$745
$75
$76
$17
| $18

063424
063634
064020
064516
065010
023476
024370
025354
025426

194-7957

201-8336

032632
033532
033770
035134
036074
036470
021730
037136
037474
040650
061424
042550
043326
064312
045424
046220
047614
022416
051352
052364
053320

053752

304-14975
159-5900

#197-8115

(8714
$715
$T16
$T17
$718
$719
$72
$720
$121
$722
$123
$724
$125
$126
$127
$728
$729
$13
$730
$T31
$732

$733%

42-37

#356-17873
#358-17995
#361-18156
#365-18365
#368-18527
#172-6773
#178-7102
#183-7361
#185-7489

208-8729

216-9406
219-9572
226-9961
227-10260
230-10424
234-10648
163-6126
236-10828
239-11236
261-11476
249-11903
254-12170
260-12502
267-12903
272-13173
280-13622
290-14181
167-6357
296-14524
302-14859
306-15085
319-15795
328-16284
332-16516
337-16840
343-17181
348-17456
169-6610
354-17784

357-17930
359-18043
363-18267
366-18432
368-18613
175-6940
182-7306
183-7387
187-7593

18-153

PAGE 20

CREF

vO1

227-10094
158-5837

346-17322
165~ 6241

31-183
370-18712
218-9503

222-9730

351-17612

252-12038

257-12331

264=12704

270-13033

276-13363

#45-85

310-15271

19-207

SEQ 0398

161-6001

316-15631

169-6491

323-16028

32-234

172-6773

330-16404

#65-68

81-1862
370-18712

178-7102

232-10533

340-17002

370-18712

285-13868

154=5613

239-11002
293-14342