Digital PDFs

AH-T827A-MC

February 1984

204 pages

Original

89MB

view download

OCR Version

115MB

view download

Document:	CNDMAA0 11-21,DMV-11 DMV11 MCTRL DIAG 1 AH-T827A-MC JUL 1984 gray
Order Number:	AH-T827A-MC
Revision:	0
Pages:	204
Original Filename:	CNDMAA0__11-21,DMV-11__DMV11_MCTRL_DIAG_1__AH-T827A-MC__JUL_1984_gray.pdf

OCR Text

oHy 11 MGTRL DIAG #
CHOMAARD

Bsa

FICHE 01 OF 01

E0ENBED
¥

B1
OBYOND

CNDMAAQ DMV1l MCTRL DIAG o1

MACRO M1200

22-FEB-84

15:22

PAGE

5EQ 0001

.TITLE CNDMAAO DMV11 MCTRL DIAG o1
.SBTTL PROGRAM DOCUMENT
REM ¢

IDENTIFICATION
PRODUCT CODE:

AC -T826A-MC

PRODUCT NAME:

CNDMAAO DMV-11 MICRO-CONTROLLER STATIC DIAGNOSTIC PART

PRODUCT DATE:

APRIL

MAINTAINER:

ISS DIAGNOSTICS

AUTHORS :

g:xang“sfifl"f"

MODIFIED BY:

JAKI BERG

PURPOSE :

1984

9-APR-1984

THIS DIAGNOSTIC IS DESIGNED TO PERFORM STATIC LOGIC TESTS FOR

THE MBOS3 OR MB064 (MEREAFTER REFERRED TO AS THE DMV OR DMv-11)

THE

INFORMATION

THIS DOCUMENT

SUBJECT

CHANGE

WITHOUT

NOTICE
AND
SHOULD
NOT BE CONSTRUED AS A COMMITMENT 8y DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.
NO RESPONSIBILITY IS ASSUMED
FOR
SOF TWARE ON EQUIPMENT THAT IS NOT
AFFILIATED COMPANIES.

THE
USE
SUPPLIED

OR
BY

RELIABILITY
OF
DIGITAL
OR ITS

DIGITAL

DEC

TRADEMARKS OF DIGITAL

PDP

DECUS

EQUIPMENT CORPORATION:

UNIBUS

DEC TAPE

MASSBUS

CNDMAQO DMV11 MCTRL DIAG o1

MACRO M1200

22 -FEB 84

15:22

PAGE

Cl
3

PROGRAM DOCUMENT

a8
a9

sssee MODIFICATION HISTORY ssess

REV A:

34;

REV B: INSTALLED OUTSTANDING PATCHES

57
58
59

ORIGINAL RELEASE

CVOMAB => CNDMAA

CHRIS BRIENEN,

RAY MARSHALL

14 - JAN-81

11-J0 -83

JAKI BERG

9.APR -84

CHANGES WERE MADE TO
CVDMAB
TO PROCuLt
.NDMAA
FOR THE
FALCON-PLUS PROJECT
(SBC-11/21+).
CHANGES, MARKED BY “3;J8 REV A-0", ARE:
- SET THE
ODT BREAK
VECTOR (LOCATION 140) TO THE STARTING ADODRESS OF

FALCON'S ODT ROM (170000-0CTAL
).

258 S90S

CNDMAQO DMV1I1 MCTRL DIAG o1

MACRO M1200

22-FEB -84

15:22

PAGE 4

PROGRAM DOCUMENT

63
64

CONTENTS

1.0 INTRODUCTION

2.0 HARDWARE REQUIREMENTS

3.0 PRELIMINARY PROGRAM REQUIREMENTS

‘s

°3

75
76
7

79
go
1

4.0 GENERAL PROGRAM CONSIDERATIONS
4.1 DIAGNOSTIC

SUPERVISOR

4.2 EXECUTION TIME

4.3 XXDP+
4.4

ACT/SLIDE

4.5 APT

4.6 MEMORY MANAGEMENT
4.7 ERROR LOGGING

5.0 PROGRAM LOAD MEDIA

84
8s
86
87

6.0 OPERATING INSTRUCTIONS
6.1 LOADING AND STARTING PROCEDURES
6.1.1 LOADING PROCEDURES
6.1.2 STARTING PROCEDURES

6.1.3 se STEPS FOR QUICK AND SIMPLE EXECUTION se

89
30
91
92
93

6.2 INITIAL DIALOGUE
6.3 PROGRAM OPTIONS
6.3.1 START COMMAND
6.3.2 RESTART COMMAND
6.3.3 CONTINUE COMMAND

6.3.5 ADD COMMAND

6.3.4 PROCEED COMMAND

6.3.6 DROP COMMAND

6.3.7 PRINT COMMAND

6.3.8 DISPLAY COMMAND

100

6.3.10 ZFLAGS COMMAND

101

102
103

ig;

6.3.9 FLAGS COMMAND

6.3.11 CONTROL CHARACTERS

6.3.12 HARDWARE PARAME TERS
6.3.13 SOF TWARE PARAME TERS

6.3.14 EXTENDED DISCUSSION OF P-TABLE DIALOGUE

igg

7.0 TEST DESCRIPTIONS

108
109

8.0 ERROR INFORMATION
8.1 ERROR REPORTING

ot Suns

CNDMAAO DMV11 MCTRL DIAG o1

MACRO M1200

22-FEB-84

E1l
15:22

PAGE

SEQ 0004

PROGRAM DOCUMENT

111
112

113
114
115

116
117
118
119
120
121
122
123
124

125
126
127
128
129
130
131
132
133
134
135
136
137
138
139

140
141
142
143
144
145
146
147
148

1.0 INTRODUCTICN
THE
MB053
AND
M8064
ARE
SINGLE -LINE SYNCHRONOUS, MICROPROCESSOR BASED COMMUNICATIONS INTERFACES WHICH CAN SUPPORT

BOTH CHARACTER-ORIENTED (DDCMP, BSC,
ETC.) AND BIT-ORIENTED
(SOLC, HDLC, ETC.) PROTOCOLS. THE PURPOSE OF THIS PROGRAM IS

TO PERFORM
DIAGNOSTIC
TESTING
OF THE CSRS, RAM,
MICRO-PROCESSOR
LOGIC
ON
THESE
BOARDS.
THE
FUNCTIONS
WILL BE PERFORMED: DMV RESIDENT U-DIAG

AND BASIC
FOLLOWING
EXECUTION

THE

EXTENSIVE

CSR ADDRESSING, VIA
REGISTER STATIC
BIT
INTERACTION
READ/WRITE TESTING, AND ON-BOARD RAM TESTING.

STATIC

LOGIC

TESTS

TROUBLESHOOTING CAPABILITIES,

SWITCH

OPTIONS,

AND

ABILITY

SUCH

WILL

PROVIDE

TIGHT

SCOPE

AND

LOOPS,

“LOCK” ONTO INTERMITTENT

ERRORS.
IN
ADDITION
TESTS
ARE
DESIGNED
TO
ACHIEVE
MAXIMUM
FAULT
RESOLUTION

AND
AND

STRUCTURED
FACILITATE

REPLACEMENT OF THE SMALLEST FIELD REPLACEABLE UNIT.
THIS

PROGRAM

SUPERVISOR
THE

DESIGN

xsgsao?&
THROUGH

AND

THE

IMPLEMENTED

USING

THE

DIAGNOSTIC

A STRUCTURED PROGRAMMING APPROACH.

CONFORMS

PROGRAM

DIALOGUE

WITH

THE

SUPERVISOR

COMPATIBLE WITH ACT,

THE

OPERATOR,

THE

BECAUSE

( STANDALONE

APT,

XXDP.,

PROGRAM

ALLOWS

MODIFICATION OF
DEVICE PARAMETERS, SUCH AS LSI-BUS ADDRESS,
VECTOR ADDRESSES AND
DEVICE
PRIORITY,
IN
ADDITION,
THE
OPERATOR
CAN
SPECIFY
PARTICULAR
TESTS
TO
BE
RUN AND A
VARIETY OF LOOPING, RUNNING, AND REPORTING MODES.
DEVICE ERRORS WILL BE REPORTED AS THEY
OCCUR.
THE
REPORT
WILL
INCLUDE
A
TEST
NUMBER AND DESCRIPTION OF THE ERROR,
E(ONO?E:PY‘S) BAD
TEST
DATA,
AND
APPLICABLE
DEVICE
REGISTER

2.0 HARDWARE REQUIREMENTS

THE FOLLOWING HARDWARE
LOGIC TESTS:

IS REQUIRED TO RUN THE M8053/8064 STATIC

SBC-11/21+
16K WORDS OF MEMORY
CONSOLE TERMINAL

M8053 OR M8064 COMMUNICATIONS

INTERFACE

5.0 PRELIMINARY PROGRAM REQUIREMENTS
THIS PROGRAM
(CNDMA) SHOULD BE THE FIRST OF THE FIVE
DMV-11
STATIC
DIAGNOSTICS TO BE RUN,
ERRORS
FOUND IN THIS PROGRAM
SHOULD BE CORRECTED BEFORE RUNNING THE OTHERS.

CNDMAQO DMVIL1 MCTRL DIAG a1

MACRO M1200

22-FEB-84

ri
15:22

PAGE 6

SEQ 0005

PROGRAM DOCUMENT

168
169
170
171
i72
173
174
175

176
178

4.0 GENERAL PROGRAM CONSIDERATIONS
4.1 DIAGNOSTIC SUPERVISOR

THIS

PROGRAM

SUPERVISOR,
SUPERVISOR,

COMPATIBLE WITH THE STANDALONE DIAGNOSTIC

AND MUST BE LOADED TO BE
CO-RESIDENT
WITH
THE
OR
BE
PREVIOUSLY COMBINED WITH THE SUPERVISOR

AND LOADED AS A SINGLE FILE.
IN EITHER CASE,
PROGRAM WILL NOT EXCEED 16K OF MEMORY.
4.2 EXECUTION

THE

COMBINED

TIME

THE
MAXIMUM
TIME REQUIRED
EACH UNIT IS 160 SECS.

TO RUN

4.3 XXDP+

THIS PROGRAM MAY BE LOADED UNDER

DUMP MODE OR CHAIN MODE
.

THIS PHOGRAM PER PASS FOR

XXDPs+,

AND

MAY

BE RUN

4.4 ACT/SLIDE
THIS PROGRAM MAY BE LOADED UNDER ACT

SLIDE

AND MAY

BE RUN

IN DUMP MODE OR CHAIN MODE.
4.5 APT
THIS PROGRAM MAY BE LOADED
BY
APT-RD) AND RUN IN PROGRAM MODE
4.6 MEMORY

THE
APT
SYSTEM
OR SCRIPT MODE.

( INCLUDING

MANAGEMENT

MEMORY MANAGEMENT

IS NOT UTILIZED IN THIS PROGRAM,

4.7 ERROR LOGGING

AT THE END OF EACH PASS ON ALL UNITS, THE PROGRAM PRINTS QUT
THE CUMULATIVE TOTAL NUMBER OF ERRORS SINCE THE LAST START OR
RESTART COMMAND.
5.0 PROGRAM LOAD MEDIA
THIS PROGRAM

ABSOLUTE

CAN

LOADED

LOADER OR FROM ACT,

FROM

SLIDE,

PAPER

TAPE

USING

OR APT SYSTEMS,

THE

OR FROM

ANY MEDIA SUPPORTED BY XXDPs,
WHEN
USING
THE
PAPER
TAPE
ABSOLUTE
LOADER,
THE
PROGRAM
SHOULD
BE
LOADED
FIRST,
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR.
WHEN USING XXDP+, THE

DIAGNOSTIC

SUPERVISOR

SHOULD

BE LOADED FIRST,

FOLLOWED B

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84 15:22

PROGRAM DOCUMENT

225

PAGE 6-1

THE DIAGNOSTIC PROGRAM,

SEQ

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

H1
15:22

PAGE

SEQ 0007

PROGRAM DOCUMENT

227
228
229
230
231
232
233
234
235
236
237
238
239

240
241
242
243
244
245
246
247
248
249

250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269

270
271
272
273
274
275
276
277
278
279
280
281
<82
283

6.0 OPERATING INSTRUCTTIONS
6.1 LOADING AND STARTING PROCEDURES

6.1.1 LOADING PROCEDURES
THIS PROGRAM

MAY

LOADED

FROM

PAPER

TAPE

USING

THE

STANDARD

DEC

ABSOLUTE
LOADER.
IT MAY ALSO BE LOADED FROM ANY XXDP+ LOAD
MEDIA. WHEN LOADED UNDER XXDP+, THE DIAGNOSTIC SUPERVISOR
WILL BE LOADED AUTOMATICALLY,

6.1.2 STARTING PROCEDURLCS
THE
PROGRAM
STARTS
AT
LOCATION
PROCEDURES TO START THE PROGRAM,

200.

USE

6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION
THE
DIAGNOSTIC
CAN
BE EXECUTED STANDALONE UNDER XXDP.,
WITHOUT READING THE REMAINDER OF THIS DOCUMENT, AS FOLLOWS:
A) LOAD AND START DIAGNOSTIC USING RUN COMMAND

B8) RECEIVE DIAGNOSTIC SUPERVISOR IDENTIFICATION AND PROMPT (DRS-C>)

C) ENTER STA<CR>
D) ANSWER HARDWARE AND SOF TWARE QUESTIONS

E) GET END OF PASS MESSAGES OR ERROR MESSAGES

TO END EXECUTION,

ENTER

CONTROL/C

6.2 INITIAL DIALOGUE
AFTER

THE PROGRAM AND

IS STARTED,

THE SUPERVISOR ARE LOADED AND

THE FOLLOWING IDENTIFICATION IS

DRS LOADED
DIAG. RUN-TIME SERVICES
CNDMA-A
-0
DMV-11 U-CONTRL LOGIC DIAG
DL%‘IT IS M8053 OR M8064

PART

TYPED

THE PROGRAM

1 OF 2

THE

OPERATOR

THEN PROCEEDS BY

TYPING ONE

OR MORE OF

THE

COMMANDS DESCRIBED IN THE FOLLOWING SECTION 6.3. (FOR MORE
DETAILED INFORMATION, REFER TO THE DIAGNOSTIC SUPERVISOR
FUNCTIONAL SPECIFICATION).
6.3 PROGRAM OPTIONS

6.3.1 START COMMAND

CNDMAQO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

I1
PAGE

7 1

SEQ 0008

PROGRAM DOCUMENT

284
285
286
287
288
289
290
291
292
293

L
L T Y Y Y Y
P P PP PP P YTy Y Y Y I I I I

STA(RT )/TESTS: <TEST-LIST>/PASS: <PASS-CNT>/FLAGS:
<FLAG-LIST>/EOP: <INCR>

SL00480000000000
000000400008
0000 00000000
0000
00000000
000
0000

6.3.1.1 TESTS SWITCH (/TESTS:<TEST-LIST>)
<TEST-LIST>
IS
A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR
RANGES OF DECIMAL NUMBERS (1-5:8-10 ETC.) THAT
SPECIFY
THE
TESTS
TO BE EXECUTED.
THE NUMBERS ARE SEPARATED BY COLONS.
THE NUMBERS RANGE FROM 1 TO THE LARGEST TEST NUMBER
IN
THE

DIAGNOSTIC.
THEY MAY BE SPECIFIED IN ANY ORDER.
TESTS WILL
BE EXECUTED IN NUMERICAL ORDER REGARDLESS OF
THE
ORDER
OF

SPECIFICATION,
THIS AND ALL

THE

SWITCHES,

DEFAULT

TO EXECUTE ALL TESTS.

THE ANGLE BRACKETS

<> ARE PUNCTUATION

USED
IN THE DEFINITION ONLY, AND ARE NOT TO BE
OPERATOR.
SEE EXAMPLE AT END OF 6.3.1.5.

TYPED BY

THE

6.3.1.2 PASS SWITCH (/PASS:<PASS-CNT>)
<PASS-CNT>

PASSES.

IS A DECIMAL NUMBER INDICATING

THE DESIRED NUMBER

A PASS IS DEFINED AS THE EXECUTION OF

THE FULL

DIAGNOSTIC (ALL SELECTED TESTS) AGAINST ALL UNITS SUBMITTED.
THE DEFAULT IS NON-ENDING EXECUTION.
THE PROGRAM IS ACCOMPLISHED EITHER BY

IN THIS CASE EXIT FROM
TYPING A CONTROL/C
OR

BY
OCCURANCE
OF AN ERROR WITH THE HALT ON ERROR FLAG BEING
és‘;.G_T;ESEXIg IS A RETURN TO COMMAND MODE.
SEE EXAMPLE
AT
-

'1.

6.3.1.3 FLAGS SWITCH (/FLAGS:<FLAG-LIST>)
<FLAG-LIST>

<FLAG=1>,

SEQUENCE OF ELEMENTS OF

<FLAG=0>,

SEPARATED BY

ONE OF THE FOLLOWING VALUES:

HOE
LOE

IER
IBE
IXE

PRI
PNT

BOE
UAM
ISR
IDU
LOT

COLONS,

THE FORM <FLAG>,
WHERE

HALT ON ERROR, CAUSING COMMAND MODE TO BE
ENTERED WHEN AN ERROR IS ENCOUNTERED

<FLAG> MAS

LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO LOOP
CONTINUOUSLY WITHIN THE SMALLEST DEFINED BLOCK
OF CODING (SEGMENT, SUBTEST, OR TEST) CONTAINING THE ERROR
INHIBIT ERROR REPORTING
INHIBIT BASIC ERROR REPORTS
INHIBIT EXTENDED ERROR REPORTS

DIRECT ALL MESSAGES TO A LINE PRINTER
PRINT NUMBER OF TEST BEING EXECUTED

BELL ON ERROR
RUN IN UNATTENDED MODE, BYPASSING MANUAL
INTERVENTION TESTS
INHIBIT STATISTICAL REPORTS
INHIBIT DROPPING OF UNITS By DIAGNOSTIC

LOOP ON

TEST

CNDMAAO DMV11 MCTRL CIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

J1
7-2

SEQ 0009

PROGRAM DOCUMENT

341
342
343
344
345
346
347
348

349
350
351
352
353
354
355
356
357
358
359

THE

FLAGS NAMED OR EQUATED TO 1 ARE SET,

ARE CLEARED.

A FLAG NOT

SPECIFIED

THOSE EQUATED TO O

IS CLEARED.

éngz_l 6I§ 1NgT GIVEN ALL FLAGS ARE CLEARED.

THE FLAGS

SEE EXAMPLE AT

6.3.1.4 END OF PASS SWITCH (/EOP:<INCR>)
<INCR> IS A DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS OF

PASSES)
PRINTED.

IT
IS
DESIRED
THAT
THE DEFAULT IS AT THE

EXAMPLE AT END OF 6.3.1.5.

THE
END
END
OF

OF PASS MESSAGE BE
EVERY
PASS.
SEE

6.3.1.5 EFFECT OF START COMMAND
THE
EFFECT OF THE START COMMAND IS TO INITIATE THE HARDWARE
PARAMETER DJALOGUE, THE
SOFTWARE
PARAMETER
DIALOGUE,
AND
THEN THE DIAGNOSTIC TESTS THEMSELVES.

THE

HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION

"& UNITS?”

NUMBER

TO WHICH

N FROM 1

THE

TO 16.

OPERATOR

REPLIES

WITH

DECIMAL

THE TERM "UNIT” REFERS TO THE DEVICE

TO WHICH THIS SERIES OF DIAGNOSTICS IS DEDICATED.
FOLLOWING
THIS
ARE THE QUESTIONS WHEREBY THE P-TABLES THEMSELVES WILL

BE BUILT.
ALL

THE

EACH P-TABLE IS A CORE-RESIDENT' TABLE

HARDWARE

INFORMATION

FOR ONE UNIT.

CONTAINING

THE OPERATOR

MUST SUPPLY N (NUMBER OF UNITS) VALUES
FOR
EACH
QUESTION.
HE
MAY
DO
THIS
BY GIVING ONE ANSWER TO EACH QUESTION (IN
WHICH CASE

THE SERIES OF QUESTIONS WILL BE POSED N TIMES) OR

BY
GIVING
N
VALUES, SEPARATED BY COMMAS, TO EACH QUESTION
(SERIES WILL BE POSED ONCE).
EACH QUESTION IS
FOLLOWED
BY
THE

RESPONSE

OCTAL,
AFTER

RADIX

FOR

DECIMAL,

B FOR BINARY,

L FOR YES/NO) IN PARENTHESES AND

THE

THE PARENTHESES.

DEFAULT

O FOR

VALUE

FOLLOWING
THE HARDWARE QUESTIONS ARE THE SOF TWARE QUESTIONS
TO BUILD THE SOFTWARE TABLES, WHICH DEFINE THE
MODE
(QUICK

VERIFY ETC.) THAT

WHEN

THE DIAGNOSTIC WILL EXECUTE

THE QUESTION

“& UNITS?”

IS ANSWERED,

IN.

MEMORY

STORAGE

ALLOCATED FOR THE P-TABLES, AND IF THERE IS
NOT
ENOUGH
ACCOMMODATE THEM THE MESSAGE “TOO MANY UNITS” IS ISSUED.
THIS CASE THE DIAGNOSTIC MUST BE EXECUTED MORE THAN ONCE
TEST ALL UNITS.

TO
IN
TO

EXAMPLE
:

STA/TESTS:1:2-4:6:8-10/PASS:3/FLAGS: IER:HOE
=1 : UAM: LOE
THIS

COMMAND

WILL

CAUSE

THREE

PASSES

CONSISTING OF TESTS 1,2,3,4,6,8,9,

ALL UNITS.

THERE

SAYING <FLAG=1>.

TO BE MADE,

AND 10

EXECUTED

IS NO DIFFERENCE BETWEEN SAYING

THE NOTATION <FLAG=0>

EACH PASS

AGAINST

<FLAG>

IS MEANINGFUL ONLY

A
COMMAND
OTHER
THAN
START
TO
CLEAR
PREVIOUSLY SET,
NOTE THAT ON ALL COMMANDS
THREE LETTERS ARE SCANNED,

AND

FLAG
THAT WAS
ONLY
THE
FIRST

CNDMAAO DMV1l MCTRL DIAG #1

IK1
MACRO M1200

22-FEB-84

15:22

PAGE

7-3

SEQ 0010

PROGRAM DOCUMENT

398
399

6.3.2 RESTART COMMAND

400
401
402
403
404
405

CAA0000000E00000EEEARAEEAEAALRAAANEAAEARRRARARALLIAAIAAAASS

RES(TART)/TESTS: <TEST-LIST>/PASS: <PASS-CNT>/FLAGS:
<FLAG-LIST>/UNITS:<UNIT-LIST>
A0 LAAAAARAAAAIAARAAARAAAAAAAAAARAEAEAAAEANAAEAAIRLGSS

406

407
408
409
410
411
412

6.3.2.1 TESTS, PASS,
<TEST-LIST>,

COMMAND.

413

AND FLAGS SWITCHES

<PASS-CNT>,

AND

<FLAG-LIST> ARE

AS IN THE

START

6.3.2.2 UNITS SWITCH (/UNITS:<UNIT-LIST>)

414
415
416
417
418
419
420
421

<UNIT-LIST>

A SEQUENCE OF DECIMAL NUMBERS (0,1 ETC.) OR

RANGES OF DECIMAL NUMBERS (0-5,

UNITS

TESTED.

8-10 ETC.)

THAT SPECIFY

THE

THE NUMBERS ARE SEPARATED BY COLONS.

THE NUMBERS MAY RANGE FROM O THRU N-1
(N
IS
THE
NUMBER
OF
UNITS
SPECIFIED IN THE PREVIOUS START COMMAND).
THE NUMBER
INDICATES THE POSITION
OF
THE
P-TABLE
AS
THE
DATA
WAS
ENTERED
DURING THE HARDWARE DIAGLOGUE.
THE UNITS WHICH ARE
SELECTED MUST NOT HAVE BEEN DROPPED
BY
THE
DROP
COMMAND.
SEE
THE DISCUSSION OF ADD AND DROP COMMANDS BELOW.
DEFAULT
ég"'.l’ig";EST ALL UNITS WHICH HAVE NOT BEEN DROPPED BY
A
DROP

422

423
424
425
426

427

428

429
420
431
432
433
434
435

436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454

6.3.2.3 EFFECT OF RESTART COMMAND
THE
RESTART
COMMAND DIFFERS FROM THE
THE P-TACLES FROM THE PREVIOUS
START
HAVE
BEEN
ONE)
ARE USED, INSTEAD OF
THE UNITS SWITCH GIVES THE ABILITY TO

START COMMAND IN THAT
COMMAND
(THERE
MUST
NEW ONES BEING BUILT.
SELECT
A
SUBSET
OF

THESE .
THE
SOFTWARE DIALOGUE MAY OPTIONALLY BE REEXECUTED
(OPERATOR WILL BE ASKED). THE
COMMAND
CAN BE
USED
AFTER
COMMAND
MODE
HAS BEEN REENTERED IN ANY OF THE THREE NORMAL
WAYS:
A) THE REQUESTED NUMBER OF PASSES HAVE BEEN
MADE
B8)
AN
ERROR WAS ENCOUNTERED WITH THE HALT ON ERROR FLAG SET C)
A CONTROL/C WAS ENTERED BY THE OPERATOR.
.
"

6.3.3 CONTINUE COMMAND
G008 04400040000040000000000800000800800000000000000000400

CONC TINUE )/PASS: <PASS -CNT/FLAGS: <FLAG-LIST>

GRA0400004400000000000000RRRRALALALLALAARARRARRRRARISRSRLNS

6.3.3.1 PASS SWITCH (/PASS:<PASS-CNT>)
<PASS-CNT> IS SAME AS IN START COMMAND, BUT THE
DEFAULT
IS
THE UNSATISFIED PASS-CNT FROM THE PREVIOUS START OR RESTART,

IF NONE REMAINS,

THE DEFAULT

IS NON-ENDING EXECUTION,

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

7 -4

SEQ 0011

PROGRAM DOCUMENT
455
456

457
458
459
460
461
462

463
464
465
466
467

468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484

485
486
487
488
489
490

6.3.3.2 FLAG SWITCH (/FLAGS:<FLAG-LIST>)
<FLAG-LIST> IS SAME AS IN
FLAGS RETAIN THEIR CURRENT

START
VALUE.

COMMAND,

BUT

UNSPECIFIED

6.3.3.3 EFFECT OF CONTINUE COMMAND
CONTINUE
MUST
FOLLOW
A START OR RESTART, AND COMMAND MODE
MUST HAVE
BEEN
ENTERED
DUE
TO
A
HALT
ON
ERROR
OR
A
CONTROL/C.
THE
EFFECT
OF
THE
COMMAND
IS
TO
GO TO THE
BEGINNING OF THE TEST THAT WAS BEING EXECUTED WHEN THE
HALT

CONTROL/C

BE REEXECUTED.

TOOK PLACE.

SOF TWARE DIALOGUE MAY OPTIONALLY

HARDWARE PARAMETERS MAY NOT BE CHANGED.

6.3.4 PROCEED COMMAND

2228208000000 0 0004000000000 05000800020 0000 0000000000000 0000

PRO(CEED
) /FLAGS : <FLAG-LIST>
SARAAAAAAAAAARAAAAAAAEER0ALA0AALL4000000000000000000R040

6.3.4.1 FLAGS SWITCH (/FLAGS:<FLAG-LIST>)
<FLAG-LIST>

IS AS IN

THE

START

FLAGS RETAIN THEIR CURRENT VALUE.

COMMAND,

BUT

UNSPECIFIED

6.3.4.2 EFFECT OF PROCEED COMMAND
PROCEED
MUST FOLLOW A START, RESTART, OR CONTINUE.
COMMAND
MODE MUST HAVE BEEN ENTERED VIA A HALT ON ERROR.
THE EFFECT

THE

COMMAND

FOLLOWING THE ERROR CALL.
PARAMETERS MAY BE ALTERED.

BEGIN

EXECUTION

NEITHER

HARDWARE

THE LOCATION

NOR

SOF TWARE

6.3.5 ADD COMMAND
S0004840400080080800004008000004000080008080000000000000440

ADD/UNITS: <UNIT-LIST>
S85000808000800000008000004800000000008000004004000000004000

6.3.5.1 UNITS SWITCH (/UNITS:<UNIT-LIST>
<UNIT-LIST>

IS AS IN THE RESTART COMMAND.

6.3.5.2 EFFECT OF ADD COMMAND
THE UNLITS SPECIFIED ARE

- UNIT

MUST

HAVE

ADDED

P-TABLE

THE

MEMORY

TEST

SEQUENCE.

DUE

EACH

TO AN EARLIER

CNDMAAO DMV11l MCTRL DIAG #1

MACRO M1200

M1
22-FEB-84

15:22

PAGE

7-5

SEQ 0012

PROGRAM DOCUMENT

512
513

HARDWARE DIALOGUE.
THIS
COMMAND
MUST
BE
FOLLOWED
BY
A
RESTART
OR
CONTINUE.
THE UNITS SWITCH MUST BE SPECIFIED.
THE ADD COMMAND IS
MEANINGFUL
ONLY
FOR
UNITS
THAT
WERE
PREVIOUSLY DROPPED.

518

6.5.6 DROP COMMAND

514
515
516
517

519
520
521
S22
523
524
525
526
527

528
529
530

531
532
533
534
535
536
537
538
539

ARAAASAAARRAAAAAARAARARAAARALALAAEAARARARRRANSAIARERERSS

DROCP)/UNITS: <UNIT-LIST>
T

Y Y

6.3.6.1 UNITS SWITCH (/UNITS:<UNIT-LIST>)

<UNIT-LIST> IS AS IN THE RESTART COMMAND.
6.3.6.2 EFFECT OF DROP COMMAND
THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING.
THE UNITS
WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OR
START

COMMAND.
THE
UNITS
SWITCH MUST BE ENTERED.
THIS COMMAND
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND.
6.3.7 PRINT COMMAND
SEAAAAARRAAEER0A0A0040000400044000000000000000000000

PRICNT)
S04 0000004RRRAR400R00000044000000040000000000000000ss

6.3.7.1 EFFECT OF PRINT COMMAND
THE TOTAL NUMBER OF ERRORS FOR
EACH
UNIT
START
OR
RESTART
COMMAND
ARE
PRINTED.
STATISTICAL REPORTING) FLAG IS CLEARED.

SINCE
THE
LAST
THE ISR (INHIBIT

6.3.8 DISPLAY COMMAND
S4480444000404000000000000000000000000000000000000000000000

DISCPLAY)/UNITS: <UNIT-LTST>
SA88004408040000040000000000000000040000000000000000btttttts

6.3.8.1 UNITS SWITCH (/UNITS:<UNIT-LIST>)
<UNIT-LIST>

IS AS IN THE RESTART COMMAND.

6.3.8.2 EFFECT OF DISPLAY COMMAND
THE HARDWARE P-TABLES FOR ALL UNITS UNDER

OUT

THE

FORMAT

THAT WERE DROPPED BY

TEST

ARE

IN WHICH THEY WERE ENTERED.

THE

OPERATOR

“DROP“

COMMAND

PRINTED

ANY UNITS
ARE

CNDMAAO DMV1l MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE

7-6

SEQ 0013

PROGRAM DOCUMENT

569

570
571
572
573
574
575
576
577
578
579
580
581

DESIGNATED.
6.3.9 FLAGS COMMAND
SE4AA0000040000000080040000000000000000000008000

00000000040

FLA(GS)

SA8408400084000000400000000000000000000800000040080800

000040

6.3.9.1 EFFECT OF FLAGS COMMAND
THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED.

583

6.3.10 ZFLAGS COMMAND

S48880880888888888808008008000000000000000880408000000

00000

ZFL(AGS)

888888000 888848088480088008808480000800000000000000004

00000

6.3.10.1 EFFECT OF ZFLAGS COMMAND
ALL FLAGS ARE CLEARED.
6.3.11

CONTROL

CHARACTERS

A CONTROL C (C) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC
CAUSES
A
RETURN
TO
COMMAND MODE.

CONTROL

(Z)

ENTERED DURING ONE OF

THE THREE OPERATOR

DIALOGUES- HARD CORE QUESTIONS (SEE
6.2),HARDWARE
DIALOGUE
(SEE 6.3.1.5), OR SOFTWARE DIALOGUE (SEE 6.3.1.5) CAUSES THE
DEFAULTS TO BE TAKEN FOR THE REMAINDER OF THAT DIALOGUE.
A CONTROL O (0) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC

CAUSES

ALL

TELETYPE

OUTPUT

SURPRESSED

REMAINDER OF THE DIAGNOSTIC OR UNTIL
ANOTHER
WHICH RESTORES NORMAL TELETYPE OUTPUT.

FOR

THE

TYPED,

6.3.12 HARDWARE PARAMETERS
THE
FOLLOWING 3 QUESTIONS WILL BE ASKED ON A START COMMAND.
THE VALUE LOCATED TO THE LEFT OF THE QUESTION
MARK
IS
THE
DEFAULT
VALUE
THAT
WILL
BE
TAKEN
ON
A CARRIAGE RETURN
RESPONSE
.

DEVICE CSR ADDRESS

THIS IS

THE

(0) 1600207

THE ADDRESS AT WHICH THE CSR REGISTERS (SELO) RESIDE

LSI-BUS.

THE

ALLOWABLE

RANGE

(OCTAL), AND THE DEFAULT VALUE IS 160020,

625

DEVICE VECTOR ADDRESS

(0) 300 ?

160020-177760

CNDMAQO DMV1IL1 MCTRL DIAG o1

MACRO M1200

22-FEB-84

15:22

PAGE

7-7

SEQ 0014

PROGRAM DOCUMENT
626

627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642

643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659

THIS IS THE ADDRESS OF

CEVICE.

THE

THE INPUT

ALLOWABLE

RANGE

DEFAULT VALUE IS 300.

DEVICE PRIORITY LEVEL

INTERRUPT VECTOR

FOR

TMIS

IS 000-674 (OCTAL), AND THE

(0) 4 ?

THIS IS THE CPU PRIORITY AT WMICH THE INTERRUPT MANDLERS
OF
THIS
DEVICE
WILL BE EXECUTED.
THE ALLOWABLE RANGE IS 0-7,
AND THE DEFAULT VALUE IS 4,

6.3.13 SOF TWARE PARAMETERS
NO SOF TWARE PARAMETER QUESTIONS ARE ASKED BY PART
STATIC LOGIC TESTS.

THE

6.3.14 EXTENDED DISCUSSION OF P-TABLE DIALOGUE
THE
FULL CAPABILITY OF THE HARDWARE DIALOGUE IS REVEALED BY
THE FOLLOWING DISCUSSION OF WHAT HAPPENS INTERNALLY.
AS SOON AS THE QUESTION

“@ UNITS?”

ANSWERED

(WITK

THE

NUMBER
N,
SAY)
SPACE IN CORE IS ALLOCATED FOR N P-TABLES.
ALL OF THE P-TABLES ARE OF THE SAME FORMAT, AND THERE
IS
A
ONE-TO
ONE
CORRESPONDENCE
BETWEEN
THE MARDWARE PARAME TER
QUESTIONS AND THE SLOTS IN THE P-TABLE FORMAT,

ON THE FIRST TRIP THRU THE QUESTIONS, ALL OF
THE
SLOTS
IN
ALL
OF
THE
P-TABLES ARE FILLED,
IF THE OPERATOR TYPES IN
LESS THAN N EXPLICIT VALUES
IN
RESPONSE
TO
A
PARTICULAR
QUESTION, THESE VALUES ARE PLACED IN THE P-TABLES (ONE VALUE
GOING INTO THE PROPER SLOT OF EACH
P-TABLE
BEGINNING
WITH
THE
FIRST P-TABLE) UNTIL THE STRING OF VALUES IS EXMAUST
ED.
THE LAST VALUE IN THE STRING BECOMES THE NEW DEFAULT AND
IS

USED TO FILL THAT SLOT

IN THE REMAINING P-TABLES.

ON
SUBSEQUENT TRIPS THRU THE QUESTIONS, THE SAME PROCESS IS
CARRIED OUT, EXCEPT THAT THE EARLIEST P-TABLE
NOT
TO
HAVE
RECEIVED
AN
EXPLICIT VALUE IN ANY OF ITS SLOTS NOW ASSUMES
THE ROLE

THE

THAT

SERIES OF

TABLE NUMBER ONE PLAYED

QUESTIONS

REISSUED

IN THE FIRST
UNTIL

TRIP.

LEAST

ONE

QUESTION HAS RECETIVED N EXPLICIT VALUES FROM THE OPERATOR.

IN
GIVING
A
STRING
OF VALUES, COMMAS WITHOUT INTERVENING
Ms :L“:EBE USED TO INDICATE
A
REPETITION
OF
THE
LAST
A

STRING

VALUES

MAY

GIVEN

A RANGE

(6-10 FOR

EXAMPLE). IF THE VALUES REPRESENT PURE NUMERICAL DATA,
THIS
SAMPLE
RANGE
TRANSLATES
TO
THE
STRING
6,7.8,9.10
(AN
INCREMENT OF 1), IF THE VALUES
ARE
ADDRESSES,
THE
SAMPLE

RANGE

NOW

TRANSLATES

LET

SEE

THE

HOW

STRING 6,8,10 (AN INCREMENT

COWD

USE

TMESE

2),.

CAPABILITIES

CNDMAQO DMV11 MCTRL DIAG ~1

MACRO M1200

22-FEB-84

15:22

PAGE

7-8

SEQ 0015

PROGRAM DOCUMENT

683
684
685

CONSTRUCT A SET OF P-TABLES.
AND

11.

LET

UNITS,

12,

THE DESIRED VALUE
FOR
TO
THE
UNTT
NUMBER

WHICH SHOULD RECEIVE

THE DESIRED VALUE FOR THE

THE NUMBER 76 FOR
THE LAST 9 UNITS,

THE FIRST

7 UNITS AND

THE

THIRD PARAMETER BE

THE NUMBER

FOR

THE FOLLOWING DIALOGUE WOUWLD ACCOMPLISH THIS GOAL
:
@ UNITS (D)

UNIT O
<QUESTION 1>
<QUESTION 2>
<QUESTION 3>

UNIT 7
<QUESTION 1>
<QUESTION 2>
<QUESTION 3>

? 75
? 0-6

?
2 7-11,,13-15
2 77

THE
FIRST
TIME THE SERIES IS ASKED, SLOT ONE RECEIVES A 75
IN ALL 16 TABLES.
SLOT TWO RECEIVES THE VALUES 0,1.2,....6
IN
TABLES O THRU 6 AND A CONSTANT 6 IN TABLES 7 THRU 15.
SLOT THREE RECEIVES A CONSTANT 76 IN ALL 16 TABLES.

710

711

712
713
714
715
716

THE SECOND TIME THRU THE SERIES, TABLES 7 THRU THE END
ARE
GOING TO BE AFFECTED (NOTE THAT TMIS PIECE OF INFORMATION IS
PRINTED OUT FOR THE THE OPERATOR
THE
BEGINNING
OF EACH SERIES).

By A <CR>,

717

THRU

718
719
720
721

727

TABLES.
LET
BE
EQUAL

(0,1,2,...,15) EXCEPT FOR UNIT

VALUE

702
703
704
705
706
707
708
709

726

ASSUME THAT WE HAVE

THREE HARDWARE PARAMETERS FOR EACH ( THREE

THE NUMBER 75 FOR ALL 16
THE
SECOND
PARAMETER

700
701

722

THERE ARE

SLOTS IN
THE
P-TABLE,
THREE
HARDWARE
QUESTIONS
IN
THF
OIALOGUE).
LET THE DESIRED VALUE FOR THE FIRST PARAMETER oE

686
687
688
689
690
691
692
693
634
695
696
097
698
699

728
724
725

THAT

15,

IN THE FORM
“UNIT
Xxx*
AT
QUESTION 1 IS RESPONDED TO

SO SLOT ONE STAYS AT CONSTANT

SINCE NO NEW EXPLICIT

VALUES ARE

TYPED

TABLES

IN.

GETS THE VALUES 7,8,9,10,11 IN TABLES 7
THRU
11,
AND
GETS AN 11 IN SLOT 12, AND GETS THE VALUES 13,14,15 IN
;:‘gLESS‘S
U

15.

THRU 15.

THE DIALOGUE

SLOT

THREE GETS

TERMINATED WHEN THE

THE

VALUE

SLOT

IN TABLES

SOF TWARE RECOGNIZES

TWO

THAT

16 EXPLICIT VALUES HAVE BEEN GIVEN FOR AT LEAST ONE QUESTION
(NAMELY QUESTION 2).

CNDMAZO DMV1IL MCTRL DIAG @1

MACRO M1200

22-FEB 84

15:22

PAGE

SEQ 0016

PROGRAM DOCUMENT
729

731

732
733

7.0

TEST DESCRIPTIONS

100000000000 00000000000000000000000000000000

TEST 1

00000000000000000000000000000000

<«DMv-11 AVAILABILITY>

s+ EACH NORMALLY USED CSR IS ACCESSED WITH A “TST” OR “TSTB” INSTRUCTION AND IF
i¢ A BUS TIMEOUT OCCURS (INTERRUPT & VECTOR ADDR 4) A FLAG WILL BE SET SHOWING
3¢ WHICH CSR ADDR AND INSTRUCTION FAILED. “T1.MSW"” REFLECTS “TST“ INSTRUCTIONS

i AND

“T1.HSB" REFLECTS

"TSTB”

INSTRUCTIONS.

EXAMPLES:

i e

ie
ie
L

"TSTB

@BSEL1"”

FAILS,

BIT

1 OF

“T1.MSB” WILL BE

IF "TST
@SEL4" FAILS, BIT & 4 OF “T1.HSW” WILL BE SET
(NOTE: ONLY EVEN BITS IN “T1.HSW" CAN BE SET).

SET,

THE FLAG WORDS ARE OUTPUT IN BINARY AS “EXTENDED ERROR INFORMATION".

;“.‘..“..‘.‘..‘..‘.“...‘.‘..‘.“.‘0‘.“.‘.“.‘.“.‘.

...“‘.O“.....“....‘0

‘“....‘.“.‘...‘...““....‘00.‘.‘....‘.“.“‘....‘.‘.“...0

TEST 2

.‘.“..“.....0‘.

<MASTER CLEAR,

RUN MICRODIAGNOSTICS>

A MASTER CLEAR

ISSUED

THE

DMV-11,

AND

THE

PROGRAM ALLOWS

SUFFIC1ENT

i TIME FOR THE MICRODIAGNOSTICS TO BE PERFORMED. THESE MICRODIAGNOSTIC: RESIDE
i* IN 6502 PROGRAM MEMORY,
AND
THOROUGHLY VERIFY THE OPERATION OF THE £Scz

i¢ MICROPROCESSOR CHIP. THEN, THEY CHECK OUT THE DATA
RAM, THE 6502'S ACCESS TO
s THE CSR'S,
AND
PERFORM
A
SIMPLE MESSAGE TEST USING THE 6522 CHIP AND THE
3¢ USYRT, WITH INTERNAL LOOPBACK,
i

NEXT,

THE

LSI-11

PROGRAM READS

THE

CSR‘'S

(SELO-SEL6)

AND CHECKS

THEM FOR

s THEIR EXPECTED INITIALIZED
STATES.
IF AN ERROR MAS OCCURRED IN THE MICROi DIAGNOSTICS THE NUMBER OF THE FAILING TEST WILL BE FOUND IN SEL4, ANO RUN
3¢ (BIT 7) WILL NOT BE SET IN BSEL1.

;..‘.0“..“‘.‘.‘...‘.“.‘....‘..“..“..0.‘000“..“.‘

.“...“...‘0.‘.“...‘0

;.0..‘.“....‘0“0.“...“.0.““‘.0.“‘.‘...‘.0.“.“.“0

TEST 3

FIRST,

i¢

‘0“.‘.0.0“‘0.0.0..

MALT

DATA

THE 6502 UP BY CLEARING ALL CSRS.
THEN, WRITE A DIFFERENT
PATTERN
A INTO EACH OF BSELO-17, AND AFTER EACH WRITE, READ

i+ COMPARE ALL REGS TO EXPECTED VALUES.

WORD
AND

:®

DATA PATTERN A

i e

001,

002,

060,

004,

030,

010,

014,

020,

006,

040,

003

100,

200,

052,

300,

140,

;‘..‘..‘.““‘.0.‘..0“‘..“‘.....“““..‘..“.

.‘.‘..“‘.‘.““.‘...0.“‘“.‘

10000000000 000000000000000000000000000000000000000000000

TEST

i e

WRITE,

READ,

AND

COMPARE

THEN,

REPEAT

THIS

USING

E/CH BYTE OF DATA PATTERN B
EACH OF THE REMAINING CSR‘S,

000000000000000080000

INTQ REGISTER
BSEL1-BSEL1'.

BSELO.

WMEN BSEL1

DIAG o1

MACRO M1200

22-FEB-84

15:22

PAGE

CNDMAAO DMV11 MCTRL

8-1
SEQ 0017

PROGRAM DOCUMENT
786
787
788

789

790
791
792
793
794
795

796

797
798
799

800
801
802
803
804
805
806
807
808
809
810
811
812
8i3
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840

841
842

i¢ IS BEING TESTED, THE PROGRAM ALWAYS SETS BIT 7 IN THE DATA PATTERN SO THAT
i glél'i WILL NOT BE CLEARED, AND IT ALWAYS CLEARS BIT6 SO THAT MCLR WILL NOT BE
.

i*#

DATA PATTERN B

125,

252,

000,

200,

376,

375,

377,

373,

001,

367,

002,

357,

004,

010,

3‘.“‘.““““‘0““‘“..‘.‘.“‘.‘0.‘.0.“..“‘...0.

337,

277,

020,

177,

040,

000

100,

‘.‘..0."...0.".“..O..‘

1000880000040 000000400000000

TEST 5

0000084000000 00000000000008000000000000800000000s

i¢ PERFORM AN INITIAL MASTER CLEAR. WRITE 356 INTO BSELO AND READ AND CHECK IT.
i* THEN, ISSUE A MASTER CLEAR AND READ AND CHECK BSELO FOR 000.

;‘..“.‘.‘“.‘.““.“‘....‘.‘...“‘.“‘.“‘..‘...0‘...“

.““.‘.““.‘..‘0...

;..00.“.‘.0..“.0‘..‘.‘.““.“0“.““0“0.““0‘000.0.0.

TEST 6

‘00““000000.0‘.0.

i* PERFORM AN INITIAL MASTER CLEAR.
WRITE 377 INTO BSELO AND READ AND CHECK
i# IT. THEN, ISSUE A RESET INSTRUCTION, STALL FOR COMPLETION, AND READ AND
i+ CHECK BSELO FOR 000.
3““.‘.‘“““.‘.‘.““0..“‘.‘..‘“..‘..““.‘.‘...‘.‘..‘

..‘.‘.‘....“...“‘

;““.““.‘.....““.“..“.““.““.......‘.““‘““‘“

TEST

INVOKES

<CSR,

...““.‘0..“‘.‘0‘

MAINTENANCE MICROCODE

INTERACTION>

3¢

THIS

i
3+
s#
i*

AND 6502 CAN COMMUNICATE.
FIRST, A MASTER CLEAR IS DONE WITH ONLY BIT O
(MREQ) SET IN BSEL1. THE PROGRAM THEN CHECKS FOR THE SETTING OF BSEL2 BIT 7
(MRDY) BY THE MAINTENANCE MICROCODE WITHIN ABOUT SO MICRO-SEC., AND IF MROY
DOES NOT GET SET, AN ERROR IS REPORTED.

i#
i*

NEXT,

ARE

THE MAINTENANCE

REQUEST

MECHANISM

THE PROGRAM LOADS SEL4 WITH 000010 AND BSEL6
READ AND CHECKED FOR EXPECTED CONTENTS.

THROUGH WHICH

WITH

125.

THEN,

THE

ALL

LSI-11

CSR'S

3¢ BSEL2 IS THEN LOADED WITH A WRITE COMMAND, WHICH SHOULD CAUSE THE MICROCODE

TRANSFER

EXPECTED

THEN,

THE

TRANSFER

INTO

PROGRAM LOADS 252

i IS THEN LOADED

125

BSELO.

CONTENTS.

THE

252

WITH

INTO

ALL

CSR'S ARE

INTO BSELO AND READS

READ

BSEL6.

THEN READ AND CHECKED FOR

AND CHECKS

ALL

CSR'S.

BSEL2

COMMAND, WHICH SHOULD CAUSE THE MICROCODE

ALL

CSR'S

ARE

READ

;.....“..““"...‘.‘.“..‘0“‘.‘..“‘.“..".‘.

AND

CHECKED.

‘.‘.“““.“‘.‘..“.0..‘.“‘

P80000004000000000000008000000000000040000000000000000

TEST 8

0000000000000000008000000

THE

s
i#
i*
s
;¢

IS LOADED INTO BSEL6 AND A REQUEST IS MADE TO WRITE THE CONTENTS OF BSELe
INTO BSELO. THE PROGRAM THEN READS AND CHECKS BSELO TO CONTAIN 125.
NEXT, THE RUN FLIP-FLOP IS CLEARED BY LOADING A O INTO RUN (BSEL1 BIT 7).
BSELO IS THEN CLEARED AND YHE REQUEST IS MADE AGAIN TO WRITE THE CONTENTS
OF BSEL6 INTO BSELO. THE PROGRAM STALLS FOR SO MICRO SEC. AND CHECKS FOR

PROGRAM PUTS

THE

MICROCODE

INTO

THE

MAINTENANCE

LOOP.

125

CHARACTER

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE 8-2

SEQ o018

PROGRAM DOCUMENT

843
844

845
846

847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869

870
871
872
873
874
875
876
877
878
879
880
861
882
883

884
885
866
887
888
889
890
891
892
893
894
895
896
897
898
899

FE
i1
s

MRDY (BSEL2 BIT 7) NOT SET, AND BSELO STILL CLEARED.
THEN, THE PROGRAM SETS THE RUN FLIP-FLOP AGAIN BY LOADING A 1
AND CHECKS FOR MRDY SET WITHIN 50 MICRO-SEC. AND BSELO = 125.

INTO RUN,

1288882000280 2883048208808 0880008800000 00800 4008800008804 00004880808000000000000
%

1080882080028 284208830000000200088800000000800800880000000082048004000000000000000

TEST 9

1 *

L
L
L
L

THIS TEST FIRST PERFORMS AN ADDRESSING TEST OF RAM LOCATIONS (00-0F), BY
WRITING THE ADRS INTO EACH LOCATION AND AFTER EACH WRITE, ALL THE LOCATIONS
ARE READ AND CHECKED FOR EXPECTED CONTENTS.

@
L
: ®
L
FE

THEN,

THE

TEST PERFORMS READ/WRITE DATA TESTING OF RAM LOCATIONS 00-OF,

B&fi%&l‘m. READING,
L

DATA PATTERN B =

AND COMPARING ALL BYTES OF DATA PATTERN B IN EACH

125,
200,

252,
376,

000,
375,

377,
373,

[

001,
367,

002,
357,

004,
337,

010,
277,

020, 040,
177, 000

100,

1828888088888 08200088000200 8808808800000 808820800000080008800000000
00000000000

1852282882088 02020 248000000000 0000200000800 0208000820200 00008002 8000000000004

TEST

10 <DATA RAM MOVING INVERSIONS (LOC'S 0018-01FF HEX)>

GENERAL DESCRIPTION:
FIRST,

THE 2K BYTE LOCATIONS

IN RAM ARE LOADED WITH O0‘'S

(SEE NOTE BELOW).

THEN, THE FIRST LOCATION IS READ AND CHECKED, A SINGLE 1 IS WRITTEN INTO
THE LOW BIT POSITION, AND THIS IS READ AND CHECKED. THIS IS DONE FOR ALL
E(Y)EJE\?ICI): THE RAM, BY INCREMENTING THE ADDRESS TO POINT TO THE NEXT RAM

THEN, THE NEXT BIT POSITION IS CHOSEN TO INSERT A 1, AND ALL LOCATIONS
ARE READ, WRITTEN, AND READ AS BEFORE. THIS IS CONTINUED FOR ALL BIT
POSITIONS UNTIL THE ENTIRE RAM IS WRITTEN TO ALL 1‘'S. THE ABOVE OPERATIONS
ARE PERFORMED A SECOND TIME, WITH O'S INSERTED INTO THE RAM INSTEAD OF 1'S,
THIS RESULTS IN THE ENTIRE RAM BEING WRITTEN TO ALL 0'S.
THIS

TEST CONSTITUTES A

THOROUGH TEST OF

THE RAM,

IS CAPABLE OF

DETECTING THE FOLLOWING FAULTS :
STUCK ADDRESS BITS, UNI- AND BI-DIRECTIONAL COUPLING BETWEEN ADDRESS BITS, STUCK MEMORY BITS, AND UNI- AND
?EI'-‘&I!';E'C‘;¥2?&L COUPLING BETWEEN MEMORY BITS IN BOTH ROWS AND COLUMNS OF THE
NOTE
;
THIS TEST DOES NOT CHECK LOCATIONS 0010-001F,
ARE NOT WRITTEN.

IT DOES

SO THAT THE PRIMARY CSR'S
TEST LOCATIONS 0000-000F (SCRATCHPAD RAM) AND

LOCATIONS 0020-002F (SECONDARY CSR'S),

AS WELL AS 0030-0800 (BASIC RAM).

THE “TMP&” REGISTERS ARE USED HERE TO CONTAIN THE VARIOUS CONSTANTS &
VARIABLES USED THROUGHOUT THIS TEST.
A LIST OF THEIR ASSIGNMENTS SEEMS
USEFUL SO HERE IT IS:

TMPO

POINTS TO THE FIRST LOCATION AFTER THE SELECT REGISTERS.

TMPL

TMP2

TEST PATTERN ID CODE

TMP3

TEST DATA PATTERN INDEX

-- UNUSED BY

THIS TEST,

-- UNUSED By

THIS TEST,

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84 15:22

PAGE 8-3

20 001%

PROGRAM DOCUMENT
900
901
902
ggz

T
1
‘e

908
909
910
911

i
i
i
T

914
915
Gie
917
918

318
2

;gé
352

925
926
927
928
929
930
931
932
933
934
935
936
gg;

gig
941
942
943

WRITTEN BY

]

i
T

g{g

TEST DATA PATTERN.
THE HIGH BYTE IS THE PATTERN BEING WRITTEN
ON _ANY GIVEN PASS AND THE LOW BYTE IS THE PATTERN THAT
WAS

905
906

907

TTMP4

TMPS

1 *

PASS

THROUGH

ONLY

THE

RAM.

THE LOW BYTE

IS USED.

TTMP?
TTMP8
TTMTMMP9

——
caes
S

TMPA

RAM ADDRESS BEING

TTMPB

BIT POINTER.
NUMBER OF THE BIT WITHIN THE DATA FIELD WHICH
IS
BEING SWITCHED ON EACH WRITE WITHIN THE CURREN
T PASS.

TMPC

DATA FLAG.
BIT O OF THIS WORD IS THE VALUE TO WHICH THE BIT
IDENTIFIED IN TMPB IS BEING SET ON EACH WRITE IN THE
CURRENT

]

i
i
T
i
i

DATA READ FROM THE RAM..

TMP6

THE

1o
)

TESTED.

PASS.

TMPD

DIRECTION SWITCH.

TMPE

LAST

TO BE

VALID

ADDRESS

FORWARD
TESTED.

NON-ZERO
(I.E.

THE

BACKWARD
END

RAM)

s
TMPF
ERROR FLAGS.
BIT 1 SET = THE LAST DETECTED ERROR WAS THE READ
Y
OF THE PREVIOUS DATA BEFORE WRITING THE NEW DATA.
IF BIT2 IS
T
SET, THE READ AFTER WRITE FAILED.
IF EITHER IS SET WHEN AN
;e
ERROR IS DETECTED, THE SUPERVISOR IS NOT CALL'D
AND THEREFOR
TM
IT'S ERROR COUNTER WILL NOT REFLECT THE ERROR
-- INSTEAD, THE
i
DATA LINE IS PRINTED.
(UNLESS THE ERROR HANDLER'S DATA L INE
s
PRINT COUNT HAS EXCEDED ITS LIMIT -- IN WHICH
CASE ITS
e
INVOCATION IS IGNORED.)
;“0““000‘.0“00“‘.“...““.t“‘.““...“.“.‘.“
“‘..0“"..00..‘.“‘0‘.
;““‘t‘0..“.‘““...“00““0“00.00“00‘.‘“‘.““
‘t..‘.“.““..““““.‘
e
TEST 11 <VIA REGISTER ADRESSING>
E

VIA == “§522 VERSATILE INTERFACE ADAPTER"

]

i# A MASTER CLEAR IS PERFORMED, NEXT, TIMER
1 LATCHES
i* ARE CLEARED BY WRITING 000 INTO VIA REGS 6
& 7
;¢ THEN, 377 IS LOADED INTO DATA DIRECTION
REGISTERS A,

(DDRA.DDRB)

944

;¢ SET THE PORT PINS FOR OUTPUT MODE.

946

i LOCATION, (EXCEPT THE TIMER REGS 4,5,10,11 OCT) AND AFTER EACH IS
WRITTEN,
i* ALL VIA REGS

945

947

948

949

950
951
952
953
954

955

956

i«

THEN,

A DIFFERENT BYTE OF DATA PATTERN C

i+ CONTENTS.

IS WRITTEN INTO EACH VIA

(EXCEPT 4,5,10,11) ARE READ AND COMPARED TO EXPECT
ED

NOTE

THAT

SOME VIA REGS ARE ALTERED BY

THE LOADING OF OTHERS

,
i# AND THE PROGRAM TAKES THIS INTO ACCOUNT, IN THE SETTING OF EXPECTED REG
i* VALUES. THE

DATA PATTERN IS CHOSEN TO AVOID ACTIVATING THE VIA
CHIP
i* AS GENERATING OUTPUTS ON CAl, CA2, CBl1, CB2,
OR CAUSING 6502
;¢ INTERRUPT REQUESTS).
i#
DATA PATTERN C (WITH VIA REGS AND THEIR DATA
SHOWN IN OCTAL) :
i*#
REGISTER =
00
01
©02
03
06
07
12
13
14
15
16

DATA =

100,

101,

377,

i# NEXT, 000 IS LOADED INTO DDRA,

106,

107,

112,

040,

042, 000,

200,

AND DDRB IS READ AND COMPARED TO 377.

(SUCH

117

THEN,

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE 8-4

SEQ 0020

PROGRAM DOCUMENT
Q57

THE

958

:#+

READ

959
960
961

122280000000 RARRRR R KRR A AR AR AR AR AR AR AR RA LR AR AR AR AR AR AR

962

;t““.‘..“‘.“““““"0‘“““‘0‘..“0"00.“‘00“.“““‘.0‘0“0“0““0‘

322

965

967
968
969
970

:# READ/WRITE BITS O-7 OF VIA DATA DIRECTION REGISTER B ARE TESTED BY WRITING,
:* READING, AND COMPARING EACH BYTE OF DATA PATTERN B.
:#
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004, 010, 020, 040, 100,
e
200, 376, 375, 373, 367, 357, 337, 277, 177, 000

966

971
972
973
974

g;g
g;g

377

IS LOADED BACK

AND

COMPARED

INTO DDRA,

AND DDRB

IS LOADED WITH 000 AND DDRA

377.

44000000ttt bbis

TEST 12 <VIA'S DDRB DATA READ/WRITE>
DDRB ==

FIRST,

"DATA DIRECTION REGISTER B”

A MASTER

CLEAR

PERFORMED.

THEN

;“.‘t...‘t.““‘“““““tt““.“.0““““0“‘0‘0"t.““.“‘.‘.“‘000.“‘

1288888882008 808000 0020040020000 000000000

RA AL AR LR AR

TEST 13 <VIA'S DDRA DATA READ/WRITE>

DDRA ==

AR 402820240000 000000sbia

"DATA DIRECTION REGISTER A"

979

:# FIRST,

983

980
981
982

ggg

986
987
333

A MASTER CLEAR

IS PERFORMED.

THEN

:* READ/WRITE BITS O-7 OF VIA DATA DIRECTION REGISTER A ARE TESTED BY WRITING,
:» READING, AND COMPARING EACH BYTE OF DATA PATTERN B.
;#
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004, 010, 020, 040, 100,

200, 376, 375, 373, 367, 357, 337, 277, 177, 000

;“00.“0‘.0“t"t“.“““‘.t.A‘.‘0.‘.“‘..““.0“““‘00.“‘0““‘.‘.‘O.‘..

;.‘.“““O.‘.‘.“00.“““t...“.‘.‘0‘t"..0"0‘0..‘..““.‘.““0““0“.t“
e
TEST 14 <VIA'S ORB DATA READ/WRITE>
;‘

33?

992

;# FIRST,

994
995
996

;¢ READ/WRITE BITS 0-7 OF VIA OUTPUT REG. PORT B ARE TESTED BY WRITING,
:* READING, AND COMPARING EACH BYTE OF DATA PATTERN B.
;¢
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004, 010, 020, 040,

993
997

ggg

;‘

ORB == “QUTPUT REGISTER PORT B"
A MASTER CLEAR

IS PERFORMED.

NEXT,

377

IS LOADED INTO DATA

:# DIR, REG. B (DDRB) TO SET ALL B PORT PINS FOR OUTPUT MODE. THEN ,
e

200,

376,

375,

373,

367,

357,

337, 277,

177, 000

100,

;‘0.“““.00“.“‘.0"‘0“.t0‘tt"..0“.“‘““““.““.‘.‘0.“.‘.“‘0‘.‘0"

1000
1001
1002

;0‘0.‘0“0.“‘.““‘t““““.“‘.““““‘0.“.‘“.““0‘..““‘..0..“‘0‘.‘.
N
TEST 15 <VIA'S T1 DATA READ/WRITE>

1004
1005
1006
1007
1008

e
T1 == “TIMER 01"
R
;¢ THIS TEST WRITES, READS, AND CHECKS THE T1 LATCHES AND COUNTER REGISTERS
;# WITH DATA PATTERNS IN EACH OF 3 SUBTESTS.
>

1003

1009
1010
1011
1012
1013

e
;¢ FIRST SUBTEST:
CHECKS FOR PROPER LOADING OF LATCHES
;e
IT ALSO CHECKS TO BE SURE THAT THE COUNTER APPEARS TO BE DOING
;e
SOMETHING TO THE COUNTERS.
AS LONG AS THEY HAVE CHANGED FROM THE
;&
VALUE LOADED INTO THEM, WE WILL BE SATISFIED.

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE 8-5

Ls£0 00

PROGRAM DOCUMENT

1014
1015
1016
18%;
1
1019
1020

{ggé

i# G.
L

i« I.
HE

{ggg

i J.

1032

18;2

1040

1043
1044

18:2

1047

;

T1C-LCADR 04) IS READ AND CHECKED TO BE DIFFERENT THAN THE TEST BYTE.

TIL-LCADR 06)

i* K.
i* L.
L

TIL-HCADR 07) IS READ AND COMPARED TO THE BYTE LOADED INTO TiL-H.

T1C-H(ADR 05) IS READ AND CHECKED TO BE DIFFERENT THAN THE TEST BYTE.
TIL-H(ADR 07) IS LOADED WITH THE COMPLEMENT OF THE CURRENT DATA BYTE.

TIL-H(ADR 07) IS READ AND COMPARED TO THE BYTE JUST LOADED.

i* M. STEPS C-L ARE REPEATED USING EACH BYTE OF DATA PATTERN B.
5

ie
;# SECOND SUBTEST:
i e

TIL-HCADR 07) IS LOADED WITH 000 TO CLEAR IT.
TIL-L(ADR 06) IS LOADED WITH A BYTE OF DATA PATTERN B.

:# D.

T1L-HCADR 07) IS READ AND COMPARED

i* C. TIL-LCADR 06) IS READ AND COMPARED TO THE DATA JUST WRITTEN.
Y

;¢
;¢
;¢
:3#

A,
B.
C.
D.

1064

{822

1067
1068
1069
1070

TO 000.

s# E. STEPS B-D ARE REPEATED USING EACH BYTE OF DATA PATTERN B.

1051
1052
1053
1054

1828
1
1061
1062
1063

CHECKS FOR CROSS-TALK AND ADDRESSING ERRORS
FROM TiL-L TO TiL-H

:# A,
;¢ B.

THIRD SUBTEST:

1057

THE CURRENT DATA BYTE.

TIL-LCADR 06) IS RE-LOADED WITH O TO MAKE T1C-H DECREMENT FAST.
TIL-H(CADR 0S5) IS LOADED WITH THE ORIGINAL TEST DATA PATTERN BYTE.

:#
i

1058

IS LOADED WITH THE COMPLEMENT OF

TI1L-LCADR 06) IS READ AND COMPARED TO THE BYTE JUST WRITTEN.

1048
1049

%822

SET

i# H.
i

%858

1041
1042

TIL-LCADR 04) IS LOADED WITH THE CURRENT BfTE OF DATA PATTERN B.
TIL-LCADR 06) IS READ AND COMPARED TO THE BYTE JUST WRITTEN.

i F.

1026
1027

1037
1038
1039

i# C.
i# D.

i# E.

iggg

A MASTER CLEAR IS PERFORMED.
ALL LATCHES ARE .OADED TO ZEROES (JUST IN CASE), ACR6 & ACR7 ARE
TO ZERO (MODE 00), AND “T1” INTERRUPT ENABLE FLAG IS CLEARED.

1023

{832

i* A,
i B.
i
]

TIL-LCADR
TIL-H(ADR
TIL-H(ADR
TIL-LCADR

CHECKS FOR CROSS-TALK AND ADDRESSING ERRORS
FROM TiL-H TO TiL-L

04) IS LOADUED WITH 000 TO CLEAR IT
07) IS LOADED WITH A BYTE OF DATA PATTERN B.
07) IS READ AND COMPARED TO THE DATA JUST WRITTEN.
06) IS READ AND COMPARED TO 000.

i« E. STEPS B-D ARE REPEATED USING EACH BYTE OF DATA PATTERN B.

i e

DATA PATTERN B

125,

200,

252,

376,

000,

375,

377,

373,

001,

367,

002,

357,

004,

010,

337, 277,

020,

040,

177, 000

100,

000800884884 00008000088800400800000800000000000800008000000000000000000000008

PRS00 04088800000000000000000 000000000 00000000000000000000000000000000004
;e
TEST 16 <VIA‘'S SR DATA READ/WRITE>

"SHIFT REGISTER"

i s

i FIRST, A MASTER CLEAR IS PERFORMED AND THE ACR IS SET TO 000. THEN
:
;* READ/WRITE BITS 0-7 OF VIA SHIFT REGISTER ARE TESTED BY WRITING, READING,
:* AND COMPARING EACH BYTE OF DATA PATTERN B.
i#
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004, 010, 020,
040, 100,

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE 8-6

SEQ 0022

PROGRAM DOCUMENT

1071

1072

1073
1074

200,

376,

375,

373,

367,

357,

337,

277,

177, 000

(428080442 RRAARRAARARARARRARARARRRAERRRAARARRREARLLREARE40400404040000400

1075

(R0 AAALRAARAARAERARRAAAAARAARAARAARRARAARRAARAEAAIRAARAARAAERAEAALAEA0RAES

18;?

18;8

TEST 17 <VIA'S ACR DATA READ/WRITE>

ACR ==

"AUXILIARY CONTROL REGISTER"

1080
1081
1082

:# FIRST, A MASTER CLEAR IS PERFORMED. THEN :
:* READ/WRITE BITS 0-7 OF THE ACR ARE TESTED BY WRITING,
:* AND COMPARING EACH BYTE OF DATA PATTERN B.

1084

i®

1083

1085

1086
1087

DATA PATTERN B

READING,

125,

252,

000,

377,

001,

002,

004,

200,

376,

375,

373,

367,

357,

337, 277,

010,

020,

040,

100,

177, 000

8824008080040 0000004 8008000800008 000000 0000000484040 004008000000000080000444

1088

1040440400400 0ARAARAARRRAAAARAARAARARAARAA004L00040
0840000000000 0000004

{888

TEST 18 <VIA'S PCR DATA READ/WRITE>

{835

PCR

“PERIPHERAL

CONTROL

1093
1094
1095
1096

:# FIRST, A MASTER CLEAR IS PERFORMED. THEN :
:* READ/WRITE BITS 0-7 OF THE PCR REGISTER ARE TESTED BY WRITING, READING,
:* AND COMPARING EACH BYTE OF A SUBSET OF DATA PATTERN B.
e
DATA PATTERN B (SUBSET) =
125, 252, 000, 377, 001, 002, 004, 010, 020,

lggg

8848000000084

i{gg

(0808884840080 8800488400080 00400400400 028000080044 004400800400400400000000040
i &
TEST 19 <VIA'S IER DATA READ/MWRITE>

1
1100
1101

ARSRERA0008R008000400040000008040480808080808048000408

{{8;

IER == “INTERRUPT ENABLE REGISTER"

1106

;% BITS 0-6 OF

1108

;# WRITTEN INTO IER,

1107

1{?3
1111

%%{g

THE IER CAN BE SET OR CLEARED ON A WRITE,

;¢ SET/CLEAR CONTROL BIT 7.
AND

UNDER CONTROL OF

TO TEST THIS , EACH BYTE OF DATA PATTERN D IS

THE REGISTER

:# ING BYTE OF DATA PATTERN E.

THE

IS READ AND COMPARED TO THE CORRESPOND
-

1 &

DATA PATTERN D

= 200,
002,

004,

201,

202,
010,

020,

204,

040,

210,

220,

100,

000,

240,

300,

200,

000,

001,

DATA PATTERN E

= 000,
174,

001,
170,

003,
160,

007,
140,

017,
100,

037,
000,

077,
000,

177,
125,

177,
000,

177,
052,

176,
000

325,

125,

252,

052

1114
{i%z

i
i*

i%l;

:‘tt““‘.t0““00“‘0“‘0“‘00‘..‘0...0‘A‘.‘.“.‘.t‘00‘00“‘..‘.0.‘00‘.‘0‘0‘0

1
1119
1120

{igé
1123

i%gg
1126
1127

(AR AAAEAAARRRRRAAAARRARAAAARARAARASAARE000004000000000000000000000000

TEST 20 <VIA‘'S ORB/DDRB MASTER CLEAR TEST>

)

ORB

1 &

DDRB ==

“QUTPUT REGISTER PORT B"

"DATA DIRECTION REGISTER B"

:* FIRST, A MASTER CLEAR IS PERFORMED. NEXT, 377 IS LOADED INTO DDRB TO SET
;4 ALL B PORT PINS FOR OUTPUT MODE. THEN, A 000 BYTE IS WRITTEN INTO ORB AND

CNDMAAO DMV1l MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

8-7

SEQ 0023

PROGRAM DOCUMENT

1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162

1163

1164
1165
1166
1167
1168
1169
1170

1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184

i*# THE REGISTER IS READ BACK AND CHECKED FOR 000.
;#

PERFORMED

AND ORB

IS READ AND

CHECKED FOR

377,

THEN, A MASTER CLEAR IS

(RRAARRAAAIARAAAERRARARARARRAAAAAAARARARAARAAAAAAAAAAARAARERRtiatbbbabAtL

i e

EEr E

TEST 21

<VIA'S DDRB MASTER CLEAR TEST»>

DDRB

“DATA DIRECTION REGISTER B"

AND

CHECKED

i«

377

BYTE

i . ggg 377.
.

IS WRITTEN

INTO DDRB

AND

THE

IS READ BACK

THEN, A MASTER CLEAR IS PERFORMED AND DDRB IS READ AND CHECKED FOR

:# NOTE:

THIS

PROVIDE TIGHTER LOOPING ON JUST THE DDRB MASTER CLEAR CHECKING.

TESTING

ALSO DONE

TEST

23.

INCLUDED HERE

ONLY

1880882808000 8888 0880080802400 0 0020000000080
R 8RR
L0000 R4S

R ey
R
R

TEST 22 <VIA'S DDRA MASTER CLEAR TEST»>

DDRA == “DATA DIRECTION REGISTER A"

;# A 377 BYTE IS WRITTEN INTO DDRA AND THE REGISTER IS READ BACK AND CHECKED
;# FOR

377.

THEN,

A MASTER

CLEAR

IS PERFORMED AND DDRA

IS READ AND CHECKED FOR

;+ 000.
HEEEEE RS

TEST 23

R R

]

<VIA'S SR MASTER CLEAR TEST»

L
L

SR == "SHIFT REGISTER"

;# A 123 BYTE IS WRITTEN INTO SR
i s zgncaiaéETHEN. A MASTER CLEAR
.
H
1288888828002

AND THE REGISTER
IS PERFORMED AND

IS READ BACK AND CHECKED
SR IS READ AND CHECKED FOR

0000 08084004040 0000 5080082480000 0 0088000000000 0 0000000000

188848885888 08420888828808424 8000880088802 880 8008800000800 08 0008208050000 00000004 0

TEST 24 <VIA'S ACR MASTER CLEAR TEST»

ACR == "AUXILIARY CONTROL REGISTER"

A 252 BYTE

IS WRITTEN

INTO ACR AND

THE REGISTER

IS READ BACK

AND CHECKED

;* FOR 252. THEN, A MASTER CLEAR IS PERFORMED AND ACR IS READ AND CHECKED FOR
;¢ 000, TO VERIFY THAT IT IS CLEARED BY MASTER CLEAR.

1#0888888885488888888888888000088
8208030840880 80 0000224200808 08000000 0000000000

1288484488888 808845480 8888888880800

T
HE

080080000080 08 0002800450000 000000000000

TEST 25 <VIA'S PCR MASTER CLEAR

TEST»

PCR == "PERIPHERAL COMNTROL REGISTER"

0000

CNDMAAO DMV1I1 MCTRL DI1AG #1

MACRO M1200

22-FEB-84 15:22

PAGE 8-8

SEQ 0024

PROGRAM DOCUMENT

1185
lig?

;# A 377 BYTE IS WRITTEN INTO PCR AND THE REGISTER IS READ BACK AND CHECKED
1 * ggg 377. THEN, A MASTER CLEAR IS PERFORMED AND PCR IS READ AND CHECKED FOR

1188

(AR AARARARARARARARARARAARARARARAAARARARAAARRARAARRARAE00000040000040440

1189
1190

1191

AR AERARARARARAAARARARRARERARARARAERAREEARAERAAERLLAR00A0400004000000004040

113%

{igg

L) ;gg 377. THEN, A MASTER CLEAR IS PERFORMED AND IER IS READ AND CHECKED FOR

1
112;

1196

1199

1200

HE
i

TEST 26 <VIA'S IER MASTER CLEAR TEST»>
IER

"INTERRUPT

ENABLE

:# A 377 BYTE IS WRITTEN INTO IER AND THE REGISTER IS READ BACK AND CHECKED

’
L
(A0 RAARRRAARLARARRRAARARERARAAAARARARARAARARARARARAALAREAAALA0A040000000004040

CNDMAAO DMV11l MCTRL DIAG #1

MACRO M1200

22-FEB-84

M2
15:22

PAGE 9

SEQ 0025

PROGRAM DOCUMENT

1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212

1213
1214
1215
1216
1217
1218
1219
1220
1221
1222

1223
1224
1225

1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243

8.0 ERROR INFORMATION
8.1 ERROR REPORTING

ERRORS
ARE
REPORTED
BY
THE PROGRAM AS THEY OCCUR (IF NOT
INHIBITED). THE REPORT CONFORMS TO THE DIAGNOSTIC SUPERVISOR
ERROR
REPORT
FORMAT,
AND CONSISTS OF A DESCRIPTION OF THE
ERROR, THE TEST NUMBER, SUBTEST
NUMBER,
PC
OF
THE
ERROR
CALL,
DEVICE
ADDRESS,
AND
BASIC
AND
EXTENDED
ERROR
INFORMATION.
THE FOLLOWING EXAMPLE PROVIDES A TYPICAL ERROR REPORT,

WHICH

DESCRIBES A "MASTER CLEAR FAILURE" ERROR, AND PROVIDES THE PC
OF THE ERROR CALL AND THE DEVICE REGISTER CONTENTS :

CNDMA DVC FTL ERR 00001 ON UNIT 00 TST 002 SUB 000 PC:

MASTER CLEAR FAILURE

021122

THE CONTENTS OF ALL BYTE SELECT REG'S ARE:
BSELO
BSEL1
BSEL2
BSEL3
000
000
000
000
BSEL4
BSELS
BSEL6
BSEL7?
000
000
121
000
BSEL10
BSEL11
BSEL12
BSEL13
000
000
000
000
BSEL14
BSEL15S
BSEL16
BSEL17
000
000
000
000
FOR OTHER ERRORS, THE REPORT
MAY
BE
MORE
REQUIRE ADDITIONAL DATA TO BE REPORTED.

EXTENSIVE,

AND

IF
EXTENDED
ERROR INFORMATION HAD BEEN INHIBITED USING THE
IXE FLAG PRIOR TO RUNNING THE TEST, THE
ABOVE
ERROR
WOULD

HAVE BEEN REPORTED

IN THE FOLLOWING SHORTENED FORM

CNDMA DVC FTL ERR 00001 ON UNIT 00 TST 002 SUB 000 PC:

MASTER CLEAR FAILURE

021122

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

N2
10

SEQ 0026

LISTING & ASSEMBLY CONTRCL

.SBTTL LISTING & ASSEMBLY CONTROL
000000

HELP=0

NO LIST
LIST

002000

1261 002000

1262

.MCALL
svC

svC

BGNMOD

LU1MOD

INITIALIZE SUPERVISOR MACROS

SVCINS=
SVCTST=
SvCSuB=
SVCGBL
=
SVCTAG=

s s

SLSTIN= 1
SLSTTAG=

1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277 002000
1278

CONTROL LISTING OF HELP INFORMATION

HELP=0
HELP=1

1245
1246
1247
1248
1249
1250
1256
1257
1258
1259 002000
1260

LIST
LIST
LIST
LIST
LIST

INSTRUCTIONS, SHIFTED RIGHT
TEST TAGS, SHIFTED RIGHT
SUBTEST TAGS, SHIFTED RIGHT
GLOBAL TAGS, SHIFTED RIGHT
OTHER TAGS, SHIFTED RIGHT

CHANGE THE VALUES OF THE SVC...

SYMBOLS TO BE ZERO IF YOU WISH

TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS.
CHANGE THE
SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS.
YOU MAY

CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM.
POINTER BGNAU,BGNDU,ERRTBL

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

B3
PAGE

SEG 0027

PROGRAM HEADER

1287
1288
1289
1290
1291
1292
1293
1294
1295
1296

.SBTTL PROGRAM HEADER
|

1 THE PROGRAM HEADER MACRO CHARACTERIZES THIS DIAGNOSTIC.

THE

tHEADER MACRO'S ARGUMENTS ARE FILE NAME, RELEASE LEVEL, PATCH
1DISPOSITION OF THE MOST RECENT PATCH, MAXIMUM TEST TIME IN SEC.,
1tAND THE TYPE OF DIAGNOSTIC (O-SEQUENTIAL, 1-EXERCISER).
THESE
1ARGUMENTS ARE IN RESPECTIVE ORDER.
.
<000
002000
002000
002001
002002
002003
002004
002005
002006
002007
002010
002010
002011
002011
002012
002012
002014

002014
002016
002016
002020
002020
002022
002022
002024
002024
002026
002026
002030
002030
002032
002032
002034
002034
002036
002036
002040
002040
002042
002042
002044
002044
002046
002046
002050
002050
002051
002052

HEADER CNDMA,A,0,110.,0

103

LSNAME
: :

116

115
101

.ASCII
LASCII
LASCII
LASCII
LASCII

/C/

/N/
/07
M/
/A/

.BYTE
101
060

LSREV::
LSOEPO::

LSUNIT::
000156
040122

LSTIML::
LSHPCP:
;

LSSPCP::
002216

LSHPTP:
;

:
L$SPTP:

040400

LSLADP:
;

L$STA::

Ls$CO::
LSDTYP::

.BYTE

LASCII

/A/

LASCII

/707

WORD
. WORD

110.

.WORD

L $HARD

.WORD
.WORD

LSHW

.WORD

LSLAST

.WORD

. WORD

WORD

L$APT::

L$DTP::

L$PRIO:
:

WORD

.WORD

.BYTE
.BYTE

CSREVISION
CSEDIY

LSENVI::.
LSEXPL::
003
003

LSMREV::

LSEF::

LSDISPATCH

CNDMAAO DMVI1 MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE

11-1

SEQ 0028

002064
<064
002066
002066
002070
002070
002072
002072
002074
002074

1297
1303

002076
002076
002100
002100
002102
002102
002104
002104
002106
002106
002110
002110
002112
002112
002114
002114
002116
002116
002120
002120

LSDEVP:
;
LSREPP;
;
LSEXPSY:
;
LS$EXPS:
LS$AUT::

020400

LSDUT::

020374

LSLUN::

000000

002056

002060
002060
002062
002062

. WORD

WORD

. WORD

.WORD
.WORD
WORD

. WORD

LSAV

. WORD

LsOV

WORD

.WORD

L$DESC

EMT

ESLOAD

LODESP::.

003542

LSLOAD::

104035

LSETP::

002236

LSERRTBL

LSICP::

017622

LSINIT

LSCCP::

020356

L$ACP:: )

020232

LS$PRT::

017614

LSTEST::

000000

L$DLY::

000000

LSHIME:
:

000000

.EVEN

SOVTYP

L$SPC::

©O

002056

.WORD

©C

002052
002054

PROGRAM HEADER

LSCLEAN

LSAUTO
L$PROT

.WORD

. WORD

CNDMAAO DMV11 MCTRL DIAG o1
DISPATCH

22-FEB-84

D3
15:22

PAGE

SEQ 0029

TABLE

1305
1306
1307
1308
1309
1310
1311
1312 002122

1313

MACRO M1200

002122
002124
002124
002126
002130
002132
002134
002136
002140
002142
002144
002146
002150
002152
002154
002156
002160
002162
002164
002166
002170
002172
002174
002176
002200
002202
002204
002206
002210
002212

.SBTTL DISPATCH TABLE

RITLILTI
077007
II
0 P 77777777
II
000
II
777 77777077
II
77070
II
07000000
II
00007070
IT
00777

THE

DISPATCH

TABLE

CONTAINS

THE

STARTING ADDRESS OF

EACH

#/ IT IS USED By THE SUPERVISOR TO DISPATCH TO EACH TEST.
RITLTLIIIVIIIIIIITI

000034
020402
021146
021256
021450
021612
021734
022136
022646
023214
024162
025142
025764
026046
026130
026232
027276
027360
027442
027526
027614
030102
030232
030362
030516
030776
031134
036366

DISPATCH

TEST.

PP 7777078777070 700077777777000770000000000077000077000077070

28.

. WORD
LSDISPATCH:
:

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

D
13

SEQ 0030

DEFALLT HAKDWARE P -TABLE

1321
1322
1323
1324
1325
1326
1327
1328
1329 002214

1330
1331
1332
1333
1334
1335
1336
1337
1338
1339

002214
002216
002216

002216
002220
002222
002224
002226
002230

002232

1340
1341
1342

1343
1344
1345
1346
1347

1348 002234
002234

.SBTTL DEFAULT HARDWARE P -TABLE
RILIVI
L TI
2IIPLTIIIIII
II
IIIIII
II
IIITII
TI
IIIIII
II
IIIIIIIIIIII
II
IIIIII
LI
IIIII
I
27

3/
i/

THE
THE

DEFAULT HARDWARE P-TABLE
TEST-DEVICE PARAMETERS.

CONTAINS DEFAULT
THE STRUCTURE OF

VALUES OF
THIS TABLE

i/ IS IDENTICAL TO THE STRUCTURE OF THE RUN-TIME P-TABLE.

RITIILIILLLI
II
IPPIII
IL
PIIILI
11707
II
07770
VI
070
TI
0000007
II
00000EI
0000770
I
07

BGNHW

DFPTBL
L$HW:
:

.WORD

DFPTBL:
:
. WORD

160020

.WORD
.WORD
. WORD
.WORD
.WORD

4000
000
000
0
000111

. WORD

:OMV11 CSR UNIBUS ADDRESS

300

;OMV11 INTERRUPT VECTOR

;OMV11 INTERRUPT PRIORITY LEVEL
:SWITCH REG. @1 (BOOT ADDRESS)
t1SWITCH REG. #2 (DDCMP ADDRESS)
1H3254EH3255 USED
sMISC. CONTROLS:

POWER-UP MODE O MASK = 100
O = NOT JUMPERED FOR MODE O POWER-UP
1 = JUMPERED FOR MODE O POWER-UP
<===

BOTH WS & W6 REMOVED

BAUD RATE MASK
7

19.2 K

= 56 K

DEFAULT

SETTING

77
<==2= DEFAULT SETTING

ENDHW

L10000:

= 4

L10000-L $HW/2

r
CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84 15:22

PAGE

SEQ 0031

SOF TWARE P-TABLE

1350

.SBTTL SOFTWARE P-TABLE

1352

/7718777777777 77772777 7277007777777 777777777777777277777777777777777777777

lg?’z

/7111170777777 77777777272777702777777727777777727777777777777777777777777777

1351

1353
1354

:/ THE SOFTWARE P-TABLE CONTAINS THE VALUES OF THE PROGRAM
:/ PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR.

1357 002234
002234
002236

002236

1358 002236

002236

000000

BGNSW

ENDSW

SFPTBL

L$SW::
SFPTBL::
L10001:

.WORD

L10001-L$SuW/2

CNDMAAO DMV1l MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE

G3
15

SEQ 0032

GLOBAL EQUATES SECTION

1360
1361
1362
1363
1364
1365
1366
1367
1368 002236

.SBTTL GLOBAL EQUATES SLCTION
§ILVIIITIIIIIIIII P77 PP IPI7707 7777777777077 077777777777707070

72720000770700000707777

THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT

3/
ARE USED IN MORE THAN ONE TEST,
BISTIIIIIIIIITI2000277708070027077770700777070070000720707777777

707707777077777

EQUALS
:

s BIT DIFINITIONS
:

BIT1S==
BIT14==
BIT13==
BIT12==
BITll==
BIT10==
BIT09==
BITO8==
BITO7==

100000
40000
20000
10000
4000
2000
1000
400
200

BITO4==
BITO3==
BITO2==
BITOl==
BITO0==

20
10
4
2
1

BITO6== 100
BITOS== 40

BIT9==
BIT8==
BIT7==
BIT6==
BITS==
BIT4==
BIT3==
BIT2==
BITl==
BITO==

BITO09
BITO8
BITO7
BITO6
BITOS
BITO4
BITO3
BITO2
BITOL
BITOO

s+ EVENT FLAG DEFINITIONS
i
EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION
3

000040
000037
000035
000034

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

32.
31.
30.
29.
28,

000340
000300
000240
000200

‘

PRIORITY

PRIO7== 340
PRIO6== 300
PRIOS== 240
PRIO4== 200

LEVEL

DEFINITIONS

+
i
i
+
:

BIT

POSITION

(100000)
(040000)
(020000)
(010000)
(004000)

IN SECOND

STATUS

WORD

START COMMAND WAS ISSUED
RESTART COMMAND WAS ISSUED
CONTINUE COMMAND WAS ISSUED
A NEW PASS HAS BEEN STARTED
A POWER-FAIL/POWER-UP OCCURRED

H3
CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

15-1

SEQ 0033

GLOBAL EQUATES SECTION
000140
000100
000040
000000

PRIO3== 140
PRIO2== 100
PRIOL== 40
PRIOO== 0
:

:OPERATOR FLAG BITS

1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395

1396
1397
1398
1399
1400
1401
1402
1403
1404

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

09200

EVL==
LOT==

ADR==

IDU==

ISR==

UAM==

BOE==
PNT==
PRI==
IXE==
IBE==
IER==

LOE==
HOE==

.SBTTL
CSREGS

16.

NP? ADDRESS REGISTER EQUATES
0
;:OUT NPR ADRS LO REG
NPRAOL
+1
;OUT NPR ADRS HI REG
NPRAOL
«2
:OUT NPR EXTENDED ADRS REG
+4
NPRAOL
:IN NPR ADRS LO REG
NPRAOL
+S
: IN NPR ADRS HI REG
NPRAOL
:IN NPR EXTENDED ADRS REG
+6
BIT3
; “BANK. SELECT 7” BIT -- W/IN EXTENDED ADRS.

000070
000071
000072
000074
000075
000076
000010

NPR DATA REG EQUATES

123000
123001

123000

= NPRDRL
+1

NPR CONTROL REG EQUATES

123004

+4
NPRORL

000200
000100
000040
000020
000010
000002
000001

DEFINE THE NUMBER OF CSR'S

DMVDAI
.SBTTL

BIT?7
BIT6
BITS
BIT4
BIT3
BIT2
BIT1
BITO

NPR REQUEST FUNCTIONS

t+NPR DATA REGISTER
:NPR DATA REGISTER

REG.

-- LOW BYTE
-- HIGH BYTE

sNPR CONTROL REGISTER

i=1 IF BUS TIME-OUT ON NPR

:SET FOR NOP, CLEAR TO “GO" 7 0=DONE, 1=BUSY
30 = (LSI ==> DMV);
1 = (DMV ==> LSI)
;SETTING THIS WILL "HALT” THE LSI-11 !!

:SET TO 1 TO WRITE BYTE ONLY TO LSI-11
:SET BY MICRO-DIAG.
MUST REMAIN SET!!!
s IF SET, WILL CAUSE POWER DOWN CONDITION IN LSI!
: “DISABLE INIT" FROM EFFECTING DMvV-11

CNDMAAO DMV11 MCTRL DIAG &1

MACRO M1200

22-FEB-84

15:22

13
PAGE

15-2

SEQ 0034

NPR REQUEST FUNCTIONS

1405

1406
1407
1408
1409
1410
1411
1412
1413

1414

1415
1416
1417
1418
1419

1420

000004
000044
000054

NPRLD
NPRDL
NPRDLB

= DMVPU
= DMVPU!NPRIO
= DMVPU!NPRIO!NPRBYT

tWORD XFER:
iWORD XFER:
iBYTE XFER:

000002

.SBTTL
IRGREG
IRQA
IRGB

INTERRUPT REG EQUATES
= 123005
= BIT2
= BIT1

s INTERRUPT REQUEST REG
sREQUEST BIT FOR XXO INTERRUPT
;REQUEST BIT FOR XX4 INTERRUPT

000001

PU24

.SBTTL

CONTROL FLAGS FROM P-TABLE ENTRIES

123005

= BITO

LSI
DMV
DMv

==> DMy
==> LSI
==> LSI

sPOWER-FAIL VECTORING MODE.

(I.E.

---

“A~
B~

1 = MODE

JUMPERS WS & W6 BNTH REHOVED)

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84 15:22

PAGE

J3
16

SEQ 0035

SWITCH PACKS

l‘gg
14

.SBTTL

1425

i* SWITCH PACKS

1424

1426

1427
1428
1429
1430

SWITCH PACKS

121000
121400

LE L

SWPBOT
= 121000
SWPDDCMP = 121400

L L L

PPN

L PPN

: "BOOT ADDRESS" SWITCH PACK [A200]
: “DDCMP ADDRESS"” SWITCH PACK [N"300)

K3
CNDMAAO DMV11l MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

SEQ 0036

CSR REG. DEFINITION FOR MAINT. LOOP
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444

.SBTTL

DEFINITION FOR MAINT.

00888800 R AR ARA AR AR AR R AR AR

.SBTTL

000001
000020

1445

1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464

CSR REG.

R AR AR AR AR

MAINTENANCE REGISTER

INTERRUPT ENABLE BITS

IENBA
IENBB

= BITO
= BIT4

R AR R LA

- BSELO

Yy Yy

s INTERRUPT ENABLE
: INTERRUPT ENABLE

A4
Y

LR AL
Yy P Y

2 8480000008000 0 000008000000 08 0080800000800

.SBTTL

MAINTENANCE REGISTER

MAINT.

RUN
MCLR
MREQ

000 AR

PP Y PP PPy Py Ys

0000

000t

- BSEL1

R AR AR AR AR AR

AR R AR R AR A AR AR AR AL

ALAAS

LOOP CONTROL BITS:
= BIT?7
= BIT6
= BITO

3008888008088

.SBTTL

500400000

00000000000

A AR AR

MAINTENANCE REGISTER - BSELZ2

-~ 2088280808000 000 0000000000000

ALEES

“A”
"B"

1008888888808

-~ 2822808800880 0

000200
000100
000001

LOOP

R AR AR AR LR AR08 0000000000004

08 0808800000800 008000 0020000000000 000 0000002

MAINTENANCE FUNCTION CODES

REDLOC
WRILOC
REDPAG
WRIPAG
EXECUT

= 1
=2
= 3
= 4
=5

sFUNCTION
sFUNCTION
;FUNCTION
+FUNCTION
:FUNCTION

CODE
CODE
CODE
CODE
CODE

FOR
FOR
FOR
FOR
FOR

READ A 6502 LOCATION
WRITE A 6502 LOCATION
READ A 6502 MEMORY PAGE
WRITE A 6502 RAM PAGE
EXECUTE AT GIVEN PC

MRDY

= BIT?

;M-LOOP REDY FOR A COMMAND WHEN SET

CNDMAAO DMV1l MCTRL DIAG 1

MACRO M1200

L3
22-FEB-84

15:22

PAGE

SEQ 0037

DMV INTERNAL ADDRESSES

.SBTTL

1466

1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489

1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500

1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522

DMV INTERNAL ADDRESSES

;o0‘0‘0“‘00“.““‘0‘A“‘t“t““.‘““00“0“.‘.0"0‘.‘0t‘0‘.0‘0‘0.00““.0‘

DMV INTERNAL ADDRESSES
;--oo.ctooo.aoa.ooo.ooo.taotooooooo‘oa‘o‘ooooooc.aocooao.ooaoaoootoc.ooa‘.oooo

1 800000006

MICROPROCESSOR REGISTER ADDRESS EQUATES

.SBTTL
000020
000020
000021
000022
000022
000023
000024
000024
000025
000026
000027

=020
=SLTO
=SLTO+1
=SLTO+2

BSLT3
SLT4
BSLT4
BSLTS
SLT6
BSLT6
BSLT7

=SLTO+3
=SLTO+4
=SLTO+4
=SLTO+S
=SLT0+6
=SLTO+6
=SLTO+7

=SLTO+2

.SBTTL
120000
120001
120002
120003
120004
120005
120005
120006
120007
120010
120010
120011
120012
120013
120014
120015
120016
120017

=120000
=0RB+1

TiCL
T1CH
TILHGO
TiLL
TiLH
TaLL
T2CL
T2CH

=0RB+4
=0RB+5
=0RB+5
=0RB+6
s0RB+7
=0RB+10
sT2LL
=0RB+11

SR
ACR
PCR
IFR
IENR
ORAM

VIA'S REGISTERS

ORB
ORA

DDRB
DDRA

&#000000604

BYTE & WORD SELECT REGISTERS

SLTO
BSLTO
BSLTL
SLT2

BSLT2

»>>

=0RB+2
=0RB+3

=0RB+12
=0RB+13
=0RB+14
=0RB+15
=0RB+16
=0R8+17

.SBTTL

VIA'S

"IFR" REGISTER'S BIT ASSIGNMENTS

000020
000010

IFRIRQ
IFRT1L
IFRT2
IFRCB1
IFRCB2

=BIT7
=BIT6
=BITS
=BIT4
=BIT3

: "IRQ” HAS BEEN ISSUED -- LOGICAL "“OR" OF BITS O --> 6
$“T1” -- TIMER ¢ 1 TIMED-OUT
$"T2" -- TIMER ¢ 1 TIMED-OUT
:“CB1"” EDGE DETECTED (“K2 LINE UNIT STEP"” O/P SIGNAL FROM SR)
; "CB2" EDGE DETECTED (UNUSED!)

000001

IFRCA1
IFRCA2

=BIT1
=BITO

:"CA1"” EDGE DETECTED ( “K6é MOD RDY H*")
s”CAZ" EDGE DETECTED ("K2 CTS H")

000200
000100

IFRSR

=BIT2

i “SR” REGISTER COMPLETED SHIFT OPERATION

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

M3
19

SEQ 0038

GLOBAL DATA SECTION

§ILIILTEIII0 7070200020007 700 7000077077707 77777777770777772777707777777777777

THE GLOBAL DATA SECTION CONTAINS DATA

IN MORE THAN ONE TEST.

THAT ARE USED

$IIIIIIIIIIII P77 780277000800770077000070770002707000000000770070070707777077777
1028880088000

.SBTTL
R

RRARRRRA AR

R LR AR AR AR AR AR AR AR R AR

CONTROL BLOCK FOR STACKED ERROR MESSAGES

Y Yy

ERRTYP: :
ERRNBR: :
ERRMSG: :

..WORD
.WORD
.WORD

ERRBLK: :

.WORD

$0088888 8000040240

.SBTTL

LA AR
Y

ERRTBL

44000000040
Yy VY

P Y PP

LSERRTBL::

O
(]
0

RARRR AR LR AR

R AR AL R AR AR RAR AL AR R AR AR ARt RAA R LR NS

STORAGE FOR DEVICE REGISTERS

R Ty
T Y Yy
Y
Y Y Y Y P Y YY

.WORD

BSR1:

.WORD

BSR2:

.WORD

BSR3:

.WORD

BSR4 :

.WORD

BSRS:

.WORD

BSR6:

.WORD

BSR7:
BSR10:
BSR11:
BSR12:
BSR13:
BSR14:
BSR15:
BSR16:
BSR17:

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

WSR10:

WSR12:

WSR14:
WSR16:

WSR6:

WSR4
;

WSR2:

BSRO:

WSRO:

000000000

1777
1778
1779
1780
1781
1782
1783
1784 002236
002236
002236
002240
002242
002244
1785
1786
1787
1788
1789 002246
1790 002246
1791 002250
1792 002250
1793 002252
1794 002252
1795 002254
1796 002254
1797 002256
1798 002256
1799 002260
002260
1801 002262
1802 002262
1803 002264
002264
1805 002266
002270
1807 002272
1808 002274
1809 002276
1810 002300
1811 002302
1812 002304
1813
1814
1815
1816
1817 002306
1818 002310
1819 002312
1820 002314
1821 002316
1822 002320
1823 002322
1824 002324

.SBTTL GLOBAL DATA SECTION

FP0AAAAREAAAEAAAARAAAAEAAAAAARAAAAAAARR00A040000000000000000000000

.SBTTL

MISCELLANEOUS STORAGE

TDATA:

.WORD

XDATA:
DELAY1:
DELAY2:
LOGDEV:

.WORD
.WORD
.WORD
.WORD

PS8 0A00RARRARRRARSARAASALARALAALAAAAARRALARAAAAARRARALRRRNRALRRRRRAS

GDATA:
BDATA:

PSTACK:

.WORD
.WORD

.WORD

OCO~Nr0000

1773
1774
1775
1776

10400

: TEST DATA

:EXPECTED DATA
sACTUAL DATA

;EXCLUSIVE OR BETWEEN "“GDATA" & "BDATA"
;DELAY TIME, 3 INST., S00 MILLISEC.
sDELAY TIME FOR M-LOOP FUNCTION, 100 USEC.APPROX.

+LOGICAL DEVICE NUMBER
;CONTAINS BASE LEVEL PROGRAM STACK POINTER

CNDMAAO DMV1l MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE

19-1

SEQ 0039

MISCELLANEOUS STORAGE

1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857

002326

INTFLG:

.WORD

002330

INTWCH:

.WORD

: INTERRUPT RECEIVED FLAG BYTES.
ALLOCATION:
i
LOW BYTE FOR “A” & HMIGH BYTE FOR “B"
1BYTE IS SET NON-ZERO WHEN HANDLER SHOULD BE

002332
002334
002336
002340
002342
002344
002346
002350

ERRFLG:
REGNUM:

.WORD
.WORD

O
O

+ERROR FLAG
tREGISTER NUMBER

FRSTIM:
FRSPAS:

DEVMAP:
DEVPTR:
CONSOL:

PFLAG:

.WORD
.WORD

.WORD
.WORD
.WORD
.WORD

O
O

1861
1862
1863.
1864
1865
1866

1867
1868
1869
1870
1871
1872
1873
1874

ALLOCATION:

-- FOR PASSING ARG.

tFLAG=0 IF PROGRAM JUST LOADED
sFLAG=0 IF FIRST PASS AFTER LOAD

O
O
O

SEE INTFLG
TO “ERR&"”

:BIT MAP OF ACTIVE DEVICES
;:DEVICE MAP BIT POINTER
sCONSOLE DEVICE FLAG -- NON-ZERO = NONE PRESENT
tMISC. PROGRAM FLAGS

THE ABOVE WORD CONTAINS MISC. FLAGS WHICH CAN ONLY BE ACCESSED BY PATCHING.
IT IS NOT INTENDED THAT THEY BE SET OR CLEARED EXCEPT UNDER VERY UNUSUAL
CIRCUMSTANCES.
THEREFORE, THEY WILL NOT BE DOCUMENTED ANY OTHER PLACE
EXCEPT RIGHT HERE.

BIT O -- WHEN SET,

THOSE TESTS WHICH DO A BUS RESET WILL NOT BE EXECUTED.

THIS WAS IMPLEMENTED TO SAVE WEAR & TEAR ON THE RXO1 IN THE

?Eg%gOPHENT SYSTEM WHILE DOING LONG TERM TESTING OF ALL OTHER
BIT 1

-- CPU TYPE.

(NOT USED)

BIT 2 -- CONTROLS PRINTING OF EXTENDED ERROR INFORMATION DURING “MOVING
INVERSIONS TEST” OF RAM.

NORMALLY ONLY ADDRESS,

GOOD & BAD

DATA, AND XOR WILL BE PRINTED.
IF THIS BIT IS SET HOWEVER,
INFORMATION IDENTIFYING WHERE WITHIN THE ALGORITHM THE ERROR

WAS DETECTED IS REPORTED.

IN THE HEADING:
BIT ---

1858

1859
1860

__WATCHING FOR INT'S.

DATA

THE FOLLOWING ABBREVIATIONS ARE USED

IDENTIFIES THE INNERMOST LOOP.
WHICH BIT IS
BEING INVERTED AT EACH LOCATION.
BITS ARE
IDENTIFIED AS O THROUGH 7.
-- IDENTIFIES THE VALUE TO WHICH THE ABOVE BIT IS

BEING SET (I.E. O OR 1).
IT IS FIRST READ AND
CHECKED FOR EXPECTED CONTENTS; THEN THE BIT IS
INVERTED TO THIS STATE (DATA) AND RE-WRITTEN;
T:EzEIT IS AGAIN READ & CHECKED FOR THE NEW

SEQ
LSB

---

INDICATES THE DIRECTION (FWD OR BKWD) THE TEST
WAS SCANING THROUGH RAM WHEN THE ERROR OCCURED.
--- THIS IS THE LOGICAL LEAST SIGNIFICANT BIT OF THE
RAM ADDRESS AS WE SCAN THROUGH MEMORY.
BY
VARYING THIS, THE ALGORITHM GENERATS NON-SEQUENTIAL ADDRESSING OF RAM AND EFFECTS A MUCH MORE
THOROUGH TEST OF MEMORY.

ve”

CNDMARO DMV1IL1 MCTRL DIAG o1

MACRO M1200

22-FEB-84 15:22

PAGE 20

SEQ 0040

CURRENT DEVICE PARAMETERS
iez’

ig;g

160000

1880 002352
1881 002352
1882 002352
1883 002352
1884 002354
1885 002356
1886 002356
1887 002360
1888 002362
1889 002362
1890 002364
1891 002366
1892 002366
1893 002370
1894 002372
1895 002372
1896 002374
1897 002376
1898 002376
1899 002400
1900 002402
1901 002402
1902 002404
1903 002406
1904 002406
{382 002410
1907 002412
1908 002414
ig?g 002416

002420
002422
002424
002426
002430
002432
002434
002436

CURRENT DEVICE PARAMETERS

SMPCSR

160000

s INITIAL ASSEMBLED IN CSR ADDRESS

160017

MPCSR;
BSELO:
BSEL ;
SELO:
BSEL1:
BSEL2:
SEL2:
BSEL3:
BSELA:
SELA:
BSELS:
BSELG:
SEL6:
BSEL7:
BSEL10:
SEL10:
BSEL11:
BSEL12:
SEL12:
BSEL13:
BSEL14:
SEL14:
BSEL1S:
BSEL16:
SEL16:
BSEL17:

000300
000304
000340

MPIVEC:
MPOVEC:
MPRIOR:

.WORD
.WORD
.WORD

.SBTTL

GEN'L PURPOSE SCRATCH STORAGE

REGO:
REG1:
REG2:
REG3:
REGA ;
REGS:
REG6 :
REG7:

.MORD
.MORD
.MORD
.MORD
.MORD
.MORD
.MORD
.MORD

160000
160001
160002
160003
160004
160005

160006
160007
160010
160011

160012
160013
160014
160015
160016

%g{é
1913
1914
1915
1916
1917
1918
1919
1920

.SBTTL

000000
000000
000000
000000
000000
000000
000000
000000

.MORD
.WORD
.WORD
.WORD

SMPCSR
SMPCSR+1
SMPCSR.2
S$MPCSR.3

.WORD
.WORD

$MPCSR+4
S$MPCSR+S

.MORD
.WORD

S$MPCSR+6
SMPCSR.7

.WORD
.WORD

$MPCSR+10
SMPCSR+11

.WORD
.WORD

SMPCSR+12
$MPCSR+13

.WORD
.WORD

S$MPCSR.14
$MPCSR+15

.WORD

SMPCSR+16
300
304
340

.WORD

$MPCSR.17

O
O
O
O
©
O
O
O

1POINTER TO THE DMV11 CSR'S
tPOINTER TO BSELO
1ALTERNATE NAME FOR BSELO
tPOINTER TO SELO
tPOINTER TO BSEL1L
1POINTER TO BSEL2
tPOINTER TO SEL2
sPOINTER TO BSELS
1POINTER TO BSEL4
tPOINTER 7O SELA
t1POINTER TO BSELS
tPOINTER TO BSELG
tPOINTER TO SEL6®
sPOINTER TO BSEL”
tPOINTER TO BSEL10
;POINTER TO SEL10
;POINTER TO BS:cL11
POINTER TO B8SEL12
tPOINTER TO SEL12
tPOINTER TO BSEL13
tPOINTER TO BSEL14
sPOINTER TO SEL14
s+POINTER TO BSEL1S
tPOINTER TO BSEL16
sPOINTER TO SEL16
t1POINTER TO BSEL17
1OMV11 INPUT INTERRUPT VECTOR
tOMV11 OUTPUT INTERRUPT VECTOR
sOMV11 DEVICE PRIORITY

CNDMAAO DMVI1 MCTRL DIAG o1

MACRO M1200

22-FEB-84

i5:22

C4
PAGE 21
SEQ 0041

SCRATCH STORAGE FOR MESSAGE REPORTING

{:gz

1925 002440

1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940
1941
{g:g
1944

002442
002444
002446
002450
002452
002454
002456
002460
002462
002464
002466
002470
002472
002474
002476
002500
002502

000000

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

.SBTTL

SCRATCH STORAGE FOR MESSAGE REPORTING

TMPO:

.WORD

TMP1:
TMP2:
TMPS:
TMP4 ;
TMPS:
TMP6 :
TMP7:
TMPS :
TMPY:
TMPA ;
TMPB :
TMPC:
TMPD:
TMPE :
TMPF ;
NEWPC:
OLDSP:

.WORD
.WMORD
.WMORD
.WORD
.WMORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O

$SAVE LOCATION FOR A "PC"” VALUE RESET
$SAVE LOCATION FOR A STACK POINTER RESET

VALUE

CNDMAAO DMV11 MCTRL DIAG o1
ssses

DATA

PATTERN

1946
1947
1948
1949 002504
1950 002506
1951 002507
1952 002510
1953 002511
1954 002512
1955 002513
1956 002514
1957 002515
1958 002516
1959 002517
1960 002520
1961 002521
1962 002522
1963 002523
1964 002524
1965 002525
1966

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

MACRO M1200

22- FEB 84

PAGE 22

SEQ 0042

LSBTTL
000020
001
002
004
010
020
040
100
200
052
300
140
060
030
014
006
003

.EVEN

PATA:

000026
125
252
000
377
001
002

sssee DATA PATTERN A seees

.WORD
.BYTE
.BYTE
.BYTE

020
040
100
200
376
375
373
367
357
337
277
177
000

PATB-PATA-2
001

002

010

.BYTE
.BYTE
.BYTE
.BYTE

.EVEN

PATB:

EERE TR

. WORD
.BYTE

PATC-PATB-2

.BYTE
.BYTE
.BYTE

010

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

;
1 USAGE

1@ OF BYTES

$1BSELO
1BSEL1
1BSEL2
1BSEL3

IN PATTERN

1BSELA
1BSELS
1BSEL6
1BSEL7
$1B8SEL10
1BSEL11
:1BSEL12
1BSEL13
1BSEL 14
$1BSEL1S
:1BSEL 16
$1BSEL17

DATA PATTERN B esese

125
252
000
bdd
001
002

.BYTE
002540
002541
002542
002543
002544
002545
002546
002547
002550
002551
002552
002553
002554

15:22

eesse

.SBTTL
002526
002530
002531
002532
002533
002534
002535

:
s USAGE
1@ OF BYTES IN PATTERN

CNDMAAO DMV11 MCTRL DIAG @1
sssee

DATA

PATTERN

22-FEB-84

15:22

E4
PAGE

SEQ 0043

#esee

1994

1995
1996
1997
1998
1999 002556
2000 002560
2001 002562
2002 002564
2003 002566
2004 002570
2005 002572
2006 002574
2007 002576
2008 002600
2009 002602
2010
2011
2012
2013 002604
2014 002605
2015 002606
2016 002607
2017 002610
2018 002611
2019 002612
2020 002613
2021 002614
2022 002615
2023 002616
2024 002617
2025 002620
2026 002621
2027 002622
2028 002623
2029
2030
2031
2032
2033
2034 002624
2035 002625
2036 002626
2037 002627
2038 002630
2039 002631
2040 002632
2041 002633
2042 002634
2043 002635
2044 002636
2045 002637
2046 002640
2047 002641
2048 002642
2049 002643

MACRO M1200

.SBTTL
:
:
000012
002
003
000
013

.EVEN

PATC:

@4esse DATA PATTERN C ssess
USED BY TEST @ 11 TO LOAD UP THE VIA'S REGISTERS.
THE REGISTER NUMBER
LOADED IS THE FIRST BYTE AND THE VALUE LOADED INTO IT IS THE SECOND BYTE
.WORD

.BYTE

006
007
012

.BYTE
.BYTE
.BYTE
.BYTE

3,366
0,100
13,040
6,106

.BYTE
.BYTE
.BYTE
.BYTE

12,112
14,042
15,000
16,200

.BYTE

014
015
016

:
PATCR:

PATCM:

7,107

1SETUP ORB AS AN 1/0 (READ/WRITE) REGISTER

$SETUP ORA AS AN 0O/P REGISTER
;LOAD UP ORB
3
ACR
:
TiLL

IT CAN'T BE TESTED!

TiLH

:
3
:
:

SR
PCR
IFR
IER

THIS TABLE IS THE LIST OF EXPECTED CONTENTS OF THE VIA'S REGISTERS
.BYTE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

3
:

<PATCR-PATC-2>72

2,377

100

000
377
366
000
000
106
107
000
000
112
040
042
000
200
000

:
;:
:
:
:
s
:
s
:
:
:
:
:
;
:

ORB

ORA
DDRB
DDRA
T1CL
TICH
TiLL
TILH
T2CL
T2CH
SR
ACR
PCR
IFR
IER
ORA

THIS IS THE TABLE OF TEST PATTERN “A” MASKS. BEFORE A REGISTER'S
CONTENTS IS TESTED, A BICB IS DONE USING ITS RESPECTIVE BYTE FROM
THE

TABLE

.BYTE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYit
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

.BYTE

BELOW (INSURING

000

377
000
000
377
377
000
000
377
377
000
000
000
377
200
377

i+
:
:
:
s
s
:
i
s
:
:
:
s
s

THAT

“DON‘'T

CARE“

BITS ARE

IGNORED).

ORB

ORA -- THIS REGISTER CAN‘'T BE TESTED!!!
ODRB
DDRA
TICL -- THIS IS A FREE RUNNING COUNTER
TICH -- THIS IS A FREE RUNNING COUNTER
TILL
TILH
T2CL -- THIS IS A FREE RUNNING COUNTER
T2CH -- THIS IS A FREE RUNNING COUNTER
SR
ACR
PCR
IFR
IER -- BIT 7 IS ALWAYS READ AS ZERO

ORA

THIS REGISTER CAN'T

TESTED!!!

F4
CNDMAAO DMV11 MCTRL DIAG #1
sasss DATA PATTERN D

2051
2052
2053
2054 002644
2055 002646
2056 002647
2057 002650
2058 002651
2059 002652
2060 002653
2061 002654
2062 002655
2063 002656
2064 002657
2065 002660
2066 002661
2067 002662
2068 002663
2069
2070 002665
2071 €02666
2072 002667
2073 002670
2074 002671
2075 002672
2076 002673
2077
2078
2079
2080
2081
2082
2083
2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097
2098
2099
2100
2101
2102

MACRO M1200

22-FEB-84

002703
002704
002705
002706
002707
002710
002711
002712
002713
002714
002715
002716
002717
002720
002721
2103 002722
2104 002723

PAGE 24

SEQ 0044

seses

000026

.SBTTL

PATD:

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

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

.BYTE
.BYTE
.BYTE
.BYTE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.SBTTL

002674
002676
002677
002700
002701
002702

15:22

000026

.EVEN

PATE:

LL LY

.WORD
.BYTE
.BYTE
.BYTE
.BYTE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

DATA PATTERN D sssss
PATE-PATD-2
200
201
202
204
210
220
240

300
200
000
001
002
004
010
020
040
100
000
325
125
252
052
DATA PATTERN E
PATF -PATE -2

200
201
203
207
217
237
277
377
377
377
376

#4¢ss

CNDMAAO DMV11 MCTRL DIAG @1
asese

DATA PATTERN F

2118
2119

2120
2121
2122
2123
2124
2125
2126
2127
2128
2129
2130
2131
2132

2133
2134
2135
2136
2137
2138
2139
2140
2141
2142
2143
2144
2145

22-FEB-84

.SBTTL
002724
002726
002730
002732
002734
002736
002740
002742
002744
002746
002750
002752
002754
002756
002760
002762
002764
002766

002770
002772
002774
002776
003000
003002
003004
003006
003010
003012
003014
003016
003020
003022
003024
003026
003030
003032
003034

2146 003036

15:22

PAGE 25

SEQ 0045

2s2eae

2106
2107
2108
2109
2110
2111
2112
2113
2114
2115
2116
2117

MACRO M1200

000045
125252
052525
000000
177777
000001
000002
000004
000010
000020
000040
000100
000200
000400
001000
002000
004000
010000

020000
040000
100000
177776
177775
177773
177767
177757
177737
177677
177577
177377
176777
175777
173777
167777
157777
137777
077777

000000

.EVEN
PATF :

#esse DATA PATTERN F sssss
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
.WORD

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

.WORD

<PATG-PATF -2>/2
125252
052525
000000
177777
000001
000002
000004
000010
000020
000040
000100
000200
000400
001000
002000
004000
010000
020000
040000
100000
177776
177775
177773
177767
177757
177737
177677
177577
177377
176777
175777
173777
167777
157777
137777
077777

000000

CNDMAAO DMV11 MCTRL DIAG #1
ssses DATA PATTERN F

H4
22-FEB-84

15:22

PAGE 26

SEQ 0046

2esse

PATG:

.SBTTL
.EVEN
RESFMC:

#ssse DATA PATTERN RESULTS TABLE FOR MASTER CLEAR (RESFMC) assss
.WORD

RESFT3-RESFMC-2

BSELRS:

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

.SBTTL

#ssss DATA PATTERN RESULTS FOR TEST

RESFT3:

.BLKW

o
w

033

.EVEN

000
200
000
000
033
000
305
000
000
000
000
000
000
000
000
000

—

000020

g 88888888 §8 88 88

2148 003040
2149
2150
2151
2152
2153 003040
2154 003042
2155 003043
2156 003044
2157 003045
2158 003046
2159 003047
2160 003050
2161 003051
2162 003052
2163 003053
2164 003054
2165 003055
2166 003056
2167 003057
2168 003060
2169 003061
2170
2171
2172
2173 003062
2174

MACRO M1200

1BSELO
;BSEL1 -- "RUN" BIT SET
;1BSEL2
;BSEL3
;+BSEL4 -- CODE FOR THE DMV-11
;:BSELS
1BSEL6 -- INDICATING VALID COMPLETION OF U-DIAG.
:BSEL7
:BSEL10
;BSEL11
;BSEL12
;BSEL13
;BSEL14
;:BSEL1S
:BSEL16
;BSEL17
3 (RESFT3) sssse

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE 27

SEQ 0047

DATA BUFFER AREAS
51;?

.SBTTL

2178 003122
2179
2180
2181

BUF AREA :

g{gg

2184
2185
2186
2187

2188
2189

2190

2191
2192
2193

2194
2195
2196
2197

2198
2199

2200
2201
2202

003322
003324
003326
003330
003332
003334

003336

DATA BUFFER AREAS

FOR THOSE USAGES.

WO
Wl
W2
W3

=
=
=
=

W4
WS

256.

THIS BUFFER HAS SOME ALTERNATE USES

BUFAREA+128.
W0.2
Wle2
W2.2

W6 = WS.2

W7
W8
W9

= W6.2
= W7.2
= W8.2

003350
003352
003354

W8
WC
WD

= WA.2
= WB.2
= wWC.2

WA = W9.2

003356
003360

WE
Wk

003122
003206

8T 1
BT2

= WD.2
= WE.2

= BUFAREA
= BUFAREA.64

TOO.

THE FOLLOWING LABELS ARE PROVIDED

s THIS WORD TABLE STARTS IN THE MIDOLE OF “BUFAREA"
:AND IS USED BY "ERR6" FOR PRINTING BYTES

= W3.2
= Wa.2

003340
003342
003344

003346

.BLKB

:BYTE
:BYTE

TABLE @ 1
TABLE @ 2

CNDMAAO DMV11 MCTRL DIAG #1

GLOBAL

MACRO M1200

22-FEB-84

15:22

PAGE 28

SEQ 0048

TEXT SECTION

2204
2205

.SBTTL GLOBAL TEXT SECTION

2207
2208
2209
2210

1
B
1
BT

2206

(FEEEE AR ANBA A A A B E A AR L AR A A B A A A B A A

2211

A AW

2212

(0000000000400

2213

;# NAMES OF DEVICES SUPPORTED BY PROGRAM

2214

o o

o o o

6 K

040 00000 RRAAARARARRARARARRARAREARARRRRARARRNRtRtttttttttis

1 --00ARRARARRRARARAARARRARARAAAARAARRAAAAARARIAARARRARRRAAARARRERARRRENRAEE

2215 003522
003522
003522
003525

003530
003533
003536

DEVTYP
115
065
117
115
066

070
063
122
070
064

LSDVTYP::
.ASCIZ

060
040

040
060
000

2216
2217

#MB80S53 OR M8064%

.EVEN
(400800 RRRRRRAARAARARAAARRRARLRAAARRRRALRARARRARSARAAAALRASAALARR0A00A0000400

2218

;¢ TITLE OF PROGRAM

2219
2220
2221

1R 00RRRRAARRRAARAAARAARAARAIRARARAAAANEARAAERRARA000A0A00A00000000000
000012

2222 003542
003542
003542
104
IC DIAG - PART 1 OF 2/
003545
003550
003553
003556
003561
003564
003567
003572
003575
003600
003603
003606
003611

2223
2224

56 58 509858 5 o6 o o 8 o

THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,
MESSAGES, AND ASCII INFORMATION THAT ARE USED IN
MORE THAN ONE TEST.
(LTI TCILETTE4SET et eT ettt e ettt it
stttotettieeiitetitigteees

055
040
103
124
040
107
040
101
055
101
040
117
062

000010

.RADIX

115

126

061
125
117
122
114
111
104
107
040
122
061
106
000

061
055
116
114
117
103
111
040
120
124
040
040
.RADIX

10.

DESCRIPT

<DMV-11 U-CONTRL LOGIC DIAG

- PART

1 OF 2>
L$DESC:
:

.ASCIZ

.EVEN

/DMV-11 U-CONTRL LOG

CNDMAAO DMV11l MCTRL DIAG #1

I<4
MACRO M1200

22-FEB-84

15:22

PAGE 29

SEQ 0049

GLOBAL SUBROUTINES
2232
2233
2234
2235
2236
2237
2238
2239

.SBTTL GLOBAL SUBROUTINES
3//TIII77777777770777770777777777727777777777777777777777777777777772727777777777

SUBROUTINES ARE CALLED BY MORE

THAN ONE

TEST

IIIIITII 7770077777777 0077777778777777770707007007077777777777707777277777

(0+000ARRRAAARRAAARAAARARARAAAARAEAAEAAAAAARAAAAAEL00004040000000000000004

.SBTTL

2240
2241
2242
2243
2244
2245
2246

:
3

THIS

B
:

H
B
5
;

SUBROUTINE

FORCES

THE 6502 MICROPROCESSOR

TO EXECUTE A MINI

17 PART

APPROXIMATELY
500
HUNDRED(S)
MILLISECOND. THIS SUBROUTINE WILL SEND THE
MASTER
CLEAR
COMMAND
AND
DELAY FOR APPROX. SO0 MSEC. AT WHICH POINT IN
TIME,
THE
STATE
OF
THE
CSR
REGISTERS
IS
TESTED.
IF ANY ONE OF THE
REGISTERS CONTAINS ANYTHING THAT IS NOT EXPECTED, AN ERROR IS QUEUE UP AND
THE CARRY BIT IS SET. ELSE, THE CARRY BIT IS CLEARED.

2250
2251
2252

MASTER CLEAR SUBROUTINE

DIAGNOSTIC OF THE MICRO-PROCESSOR INSTRUCTION SET, RAM DATA AND ADDRESSING
VALIDITY,
AND
A
ROM
CRC
TEST.
THE
CLEAR
SUBROUTINE
EXECUTES
IN

2248
2249

MASCLR -

FUNCTION:

2247

2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2258

THE GLOBAL

VLI

CALLING SEQUENCE:

:
i
i

i N$:

JSR
8CC

PC,MASCLR
N$

:IF NO ERROR OCCURED, PROCEED WITH ROUTINE

ERROR
;AN ERROR MESSAGE HAS BEEN STACKED:
<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE
(I.E.

PRINT IT
CKLOOP)>

:--oooooooaoo‘oo‘o.o‘oo.oooo.oaoooooooo‘ootooooooooooo&ooooo‘oo“o.ooooaoo‘oc‘
003614

010146

003616

112777

MASCLR:

000300

176530

MOV

R1,-(SP)

MOVB

ORUN!MCLR,8BSEL1

SAVE REGISTER ONE

;SET BOTH THE RUN AND MASTER CLEAR BITS

:TO INITIATE THE MICRODIAGNOSTIC

sNOW DELAY LONG ENOUGH FOR THE MICRODIAGNOSTIC TO COMPLETE
003624
003630
003632
003634
003636
003636
003644

013701
001402
005301
000775

002316

132777
001410

000200

2%:

176510

1$:

MOV

DELAY1,R1

BIT8
BEQ

@RUN, 8BSEL1
38

BEQ
DEC
BR

1$
R1
2s

sINITIALIZE

THE LOOP COUNTER FOR DELAY LOOP

; EXIT DELAY LOOP IF THE TIME HAS EXPIRED
:
ELSE, DECREMENT THE LOOP COUNTER AND
i+
CONTINUE TO LOOP.
i TIME-UP!
tCHECK THE RUN BIT -+IF NOT SET, GO REPORT THE ERROR

:IF THE RUN BIT IS SET, MICRODIAGNOSTICS ARE COMPLETE.
:CHECK IF ALL MICRODIAGNOSTICS PASSED.
003646

127737

003654

001004

003656
003664

127737
001420

176514

176500

003050

003046

4s:

CcMPB

9BSEL6,BSELRS+6

BNE

CMPB
BEQ

@BSEL4 ,BSELRS+4
6%

;THIS CHECKS THE BYTE IN B-SELECT 6 FOR THE

s+VALID MICRODIAGNOSTIC COMPLETION CODE.
: IF BAD,

GO REPORT ERROR

;ELSE, CHECK FOR THE VALID CODE FOR A DMV-11
: IF THIS TOO IS CORRECT THEN NO ERROR EXISTS

tELSE, FALL INTO THE ERROR REPORTING CODE

CNDMAAO DMV1l MCTRL DIAG #1
MASCLR

MACRO M1200

22-FEB-84 15:22

PAGE 29-1

SEQ 0050

MASTER CLEAR SUBROUTINE

2289 003666
2290 003672

004737

004434

003672
003700
003706
003714
2291 003722
gggg 003724

012737
012737
012737
012737
000261
000401

000001
000001
003734
005414

2294
2295
2296
2297
2298
2299
2300

003726
003730
003732

000241
012601
000207

003734

115

3%:
002236
002240
002242
002244

SEC
BR

6$:
7%:
101

123

JSR
GTOF

.NLIST
20$:
LIST
.EVEN

CLC
MOV
RTS
BEX
.ASCIZ
BEX

PC,GETBSR
20% ,ERR3

tGET THE BSEL REGISTERS FOR DUMPING
tMASTER CLEAR ERROR

QUEUVE “DEVICE FATAL” ERROR # 1
MOV
MOV

s INDICATE

MOV
MOV
TO THE CALLING ROUTINE THAT

T .EDF ,ERRTYP
#1 ,ERRNBR

(SP)+,R1
PC

;CLEAR THE CARRY BIT TO INDICATE NO ERROR
tRESTORE REGISTER ONE
i+ RETURN TO THE CALLER

AN ERROR WAS DETECTED

/MASTER CLEAR FAILURE/

CNDMAAO DMV1l MCTRL DIAG #1
M-LOOP

MSTCLR

MACRO M1200

22-FEB-84 15:22

PAGE 30

SEQ 0051

-- MASTER CLEAR & ENTER M-LOOP

2302

.SBTTL

gggg

2303

M-LOOP -- MSTCLR

-- MASTER CLEAR & ENTER M-LOOP

1422 RRRRAARAARRARARRLRARARRR
R RS RR AL AR AR AR R AR L2004 E 2000040000000 00000400

MSTCLR -- MASTER CLEAR & ENTER M-LOOP

2306
2307
2308

:+
:
H

2309
2310

CALLING SEQUENCE:
JSR

B8CC

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE

ERROR

gg{z

; N$:

1 -~ 828R

012777

2319
2320
2321
gggg

003770
003772
003776
004000

010346
012703
077301
012603

2324
2325
2326
2327
2328

004002
004010
004012

132777
001023
004737
012737

004024
004032
004040
004046
004054
004056
004060
004062

012737
012737
012737
012737
000261
000401
000241
000207

004016
004024

140400

176362

000014

MSTCLR:

1$:

000200

176346

004576
000301

002310

000001
000002
014454
005426

002236
002240
002242
002244

;IF NO ERROR OCCURED, PROCEED WITH ROUTINE
;AN ERROR MESSAGE HAS BEEN STACKED:

PRINT IT

CKLOOP)>

MOV

#<RUN!MCLR!MREQ>#256.
,8SELO

MOV
MOV
soB
MOV

R3,-(SP)
#12.,R3
R3,1$
(SP)+,R3

BITB
BNE
JSR

#MRDY ,8BSEL?2
;DID THE M-LOOP FINISH
5S¢
;:YES,
GOOD.
RETURN
PC,.GETWSR
;GET BYTE SELECT REGISTERS
#RUN!MCLR!MREQ,GDATA
; IDENTIFY REQUESTED FUNCTION
EM3,ERR4
: "MRDY” TIMEOUT

SEC
BR
CLC
RTS

9s
PC

;INITIATE M-LOOP

;WAIT FOR THE M-LOOP TO FINISH THE OPERATION

$:
s

(I.E.

R AR AR AR AR RRAARARRAARARAARRAARAARAAAEER00000400000000800000044

MOV
GTOF

\£U|

2316
gg%g 003762

2315

PC,MSTCLR

H
:

gg{é

2329
2330
2331
2332

QUEUE "DEVICE FATAL" ERROR & 2
MOV
MOV
MOV
MOV

@7 .EDF ,ERRTYP
€2 .ERRNBR
#EM3 ,ERRMSG
#ERR4 ,ERRBLK

:SET CARRY TO INDICATE ERROR
sEXIT WITH THE “ERROR"” FLAG (CARRY BIT) SET
;CLEAR C BIT FOR NO ERRORS
;RETURN

CNDMAAO DMV11l MCTRL DIAG #1
M-LOOP

MACRO M1200

22-FEB-84

15:22

N4
PAGE 31

SEQ 0052

READ

2334
2335
2336
2337
2338
2339
2340
2341

.SBTTL

004132
004140
004146
004154
2365 004162
004164
2367
2368 004166
2369 004170
2370 004174

T T T

i READ - READ THE SPECIFIED ADDRESS WITHIN THE DMV-11

PP P

CALLING SEQUENCE:

:
:
:

2342

2343
2344
2345
2346
2347
2348
2349
2350
2351 004064
2352 004070
2353
2354 004076
2355 004100
2356 004104
2357 004106
2358
2359 004110
2360 004116
2361
2362 004120
2363 004124
2364 004132

M-LOOP -- READ

JSR
.WORD
.WORD

RS,READ
<ADDRESS OF REGISTER WITHIN DMV-11>
<DESTINATION ADDRESS WITHIN LSI-11>

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE

:
B

: N$:

ERROR

+ IF NO ERROR OCCURED, PROCEED WITH ROUTINE

:AN ERROR MESSAGE HAS BEEN STACKED:

(I.E.

CKLOOP)>

:--0.‘.‘.t.“t.0‘0‘000“..‘00“.0‘0“000.‘\““0“0‘0“00“0“‘.‘00.0“.000.00
012577
112777
010346
012703
077301
012603

176272

000001

176260

000032

1$:

132777
001023

000200

176240

004737
012737

004576
000001

002310

012737
012737
012737
012737
000261
000401

000001
000003
014500
005426

002236
002240
002242
002244

000241
117735
000205

176172

READ:

MOV
MOVB

(R5)+,8SEL4
OREDLOC,8BSEL2

:SETUP SOURCE POINTER
;TELL M-LOOP TO GIVE US THE REQUESTED DATA

MOV
MOV

R3,-(SP)
926. ,R3

sWAIT FOR THE M-LOOP TO FINISH THE OPERATION

soB8

R3,1$

BITB
BNE

OMRDY, @BSEL2
S5

;DID THE M-LOOP FINISH
:YES,
GOOD.
RETURN

JSR
MOV
GTOF

PC,GETWSR
@REDLOC,GDATA
EM4 ,ERR4

:GET BYTE SELECT REGISTERS
s IDENTIFY REQUESTED FUNCTION
: "MRDY" TIMEOUT
:
QUEUE “DEVICE FATAL” ERROR @& 3
MOV
MOV
MOV

MOV

SEC
BR
4 T

6$:

CLC

MOvVB

RTS

(SP)+,R3

MOV
s INDICATE AN ERROR HAS BEEN STACKED
;RETURN WITH THAT INDICATION

@BSEL6,a(R5)+

:PUT DATA WHERE CALLER WANTS IT

s INDICATE

T .EDF ,ERRTIP
#3 ,ERRNBR
9EM4 ,ERRMSG
QERR4A ,FRRBLK

“NO ERROR“

;RETURN

ngliRe) UM 45

i o

CNDMAAO DMV1I1 MCTRL DIAG o1
M-LOOP

MACRO M1200

PAGE

SEQ 0053

.SBTTL

2378
2374
2375
2376
2377

2404
2405
2406
2407
2408
2409

15:22

READ IMMEDIATE

2372

2378
2379
2380
2381
2382
2383
2384
2385
2386
2387
2388
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399
2400
2401
2402
2403

22-FEB-84

M-LOOP

-- READ IMMEDIATE

100000000000000000000000000000000000000000000000

+ READL
H

0000000000000006000000080080868

- READ IMMEDIATE THE SPECIFIED ADDRESS WITHIN THE DMV-11

1 CALLING SEQUENCE:
3

JSR

H
3
H
H

. WORD
<DESTINATION -- CONTENTS OF REG. IS PUT MERE>
8CC
N$
1+ IF NO ERROR OCCURED, PROCEED WITH ROUTINE
ERROR
1AN ERROR MESSAGE HAS BEEN STACKED:
PRINT IT
<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE
(I.E. CKLOOP)>

3 N$:

. WORD

RS,READI

:-.oooooooooocoooooooooooo.ooooooooooooooo.oooooooooooooooo-ooooooooooooocoooo
012577
112777
010346
012703
077301
012603

176160
000001

READI:

176146

000015
1%:

MOV
MOVB

(RS)+,8SELS
OREDLOC,8BSEL2

MOV
MOV
S08
MOV

R3, -(SP)
013, ,R3
R3,1$
(SP)+,R3

1SETUP SOURCE POINTER
;TELL M-LOOP TO GIVE US THE REQUESTED DATA

sWAIT FOR

THE M-LOOP TO FINISH THE OPERATION

132777
001023

000200

176126

BITB
BNE

OMRDY ,8BSEL2
Ss

tDID THE M-LOOP FINISH
1YES,
GOOD.
RETURN

004737
012737

004576
000001

002310

MOV

JSR

PC,.GETWSR

$GET BYTE SELECT REGISTERS

GTOF

EM4 ,ERR4

1 "MRDY"” TIMEOUT

012737
012737
012737
012737
000261
000401

014500
005426

000241
017725
000205

176060

000001

OREDLOC,GDATA

s IDENTIFY REQUESTED FUNCTION

002236
002240
002242
002244

SEC
BR

Ss:

63:

CcLC
MOV
RTS

QUEVE

"DEVICE FATAL"” ERROR ¢ 4
MOV
MOV

MOV
MOV
s INDICATE AN ERROR HAS BEEN STACKED
tRETURN WITH THAT INDICATION

QSEL6,(RS).
RS

:PUT DATA WHERE
1RETURN

s INDICATE

“NO ERROR*

CALLER WANTS

@7 .EDF ,ERRTYP
04 ,ERRNBR
SEM4A ,ERRMSG
QERR4 ,ERRBLK

CNDMAAO DMV11 MCTRL DIAG o1
M-LOOP

MACRO M1200

22-FEB-84 15:22

PAGE 33

SEQ 0054

WRITE

2411

2412

.SBTTL

M-LOOP

- WRITE THE SPECIFIED DATA INTO THE

-- WRITE

$100000000000000000000000000000000000000000000000000000000000000000008

g:{z

2415
2416
2417
2418
2419
2420
2421

+
3
:
:
:
:
H

g:gg

WRITE

00000000080

SPECIFIED DMV-11 ADDRESS

CALLING SEQUENCE:

JSR
.WORD
. WORD
8CC
ERROR

RS,WRITE
<ADDRESS OF REGISTER WITHIN DMV-11>
<ADDRESS OF DATA BYTE>
N$
1 IF NO ERROR OCCURED, PROCEED WITH ROUTINE
1AN ERROR MESSAGE MAS BEEN STACKED:
PRINT

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE MERE

(I.E. CKLOOP)>

g:gg

3 N$:

2426

:--000‘0000000000000000000‘000ooo.oooo000000‘00000.0000oooooooooooooooooo‘oooo

2427
2428 004310
<429 004314
2430 004320

012577
113577
000404

176046
176046

WRITE:

MOV
MOVB

(RS)+,aSELAS
8(RS)+,8SEL6

MLWRI

1SETUP SOURCE POINTER
tMAKE DATA AVAILABLE TO M-LOOP

s THE REST OF

THIS ROUTINE

THE SAME AS

“WRITEL"

CNDMAAO DMV11 MCTRL DIAG @1
M-LOOP

WRITE

MACRO M1200

.SBTTL

2‘33
2433;
24

D5
34

SEQ 0055

M-LOOP -- WRITE IMMEDIATE

i+ CALLING SEQUENCE

2438
2439
2440
244]

5445

PAGE

;00“‘0.0“00‘0‘..‘.‘0“‘0“..‘.‘.....“‘.‘.0.‘.‘0.0.‘.‘...0..0‘000.“‘0.0.000
i WRITEI - WRITE IMMEDIATE THE SPECIFIED DATA INTO THE SPECIFIED DMV-11 ADDRESS
H

g:gfg

3:33

15:22

IMMEDIATE

2432

2442

22-FEB-84

:
3
3
:

JSR
.WORD
. WORD
8CC

446

2‘47

ERROR

N$:

RS,WRITEI
<ADDRESS OF REGISTER WITHIN DMV-11>
¢DMA FIELD -- DATA TO BE WRITTEN IN DMV-11>
;IF NO ERROR OCCURED, PROCEED WITH ROUTINE
AN. ERROR MESSAGE HAS BEEN STACKED:

<RESUMPTION OF NORMAL

PROCESSIM;’

:--0‘0‘.‘0““‘0.‘..0‘...."‘.‘0‘.0‘.....“.‘.“0‘.‘0‘.0.‘.0“0..‘..000.‘..‘00

2448
2449
2450
2451
g:gg

004322
004322
004326
004332

012577
012577
112777

2454
2455
2456
g:?,;

004340
004342
004346
004350

010346
012703
077301
012603

2459
2460
2461
2462
2463

004352
004360
004362
004366
004374

132777
001023
004737
012737

004374
004402
004410
004416
2464 004424

012737
012737
012737
012737
000261

gzgg 004426

2467 004430
2468 C04432

176034
176034
000002

WRITEI:

176016

MLWRI:

000050
1$:

000200

175776

004576
000002

002310

000001
000005
014500
005426

002236
002240
002242
002244

000401

000241
000205

S5$:
6%:

MOV
MOV
MOVB

(RS).,8SEL4
(RS)+,8SEL6
OWRILOC,8BSEL2

$1SETUP SOURCE POINTER
$MAKE DATA AVAILABLE TO M-LOOP
;;TELL M-LOOP TO WRITE THE DATA

MOV
MOV
{e:}
MOV

R3,-(SP)
040, ,R3
R3,1$
(SP)+,R3

sWAIT FOR THE M-LOOP TO FINISH THE OPERATION

BIT8
BNE
JSR
MOV
GTDF

OMRDY ,8BSEL2
Ss
PC,GETWSR
OQWRILOC,GDATA
EM4 ,ERR4

SEC
BR

cLC
RTS

1DID THE M-LOOP FINISH
1YES,
GOOD.
RETURN
$1GET BYTE SELECT REGISTERS
s IDENTIFY REQUESTED FUNCTION
: "MRDY"” TIMEOUT
:
QUEUE "“DEVICE FATAL” ERROR @ S
MOV

MOV
MOV
MOV
;1 INDICATE AN ERROR HAS BEEN STACKED

sRETURN WITH THAT

;s INDICATE
s RETURN

INDICATION

“NO ERROR*"

o7 .EDF ,ERRTYP
05 ,ERRNBR
OEMA ,ERRMSG
@ERR4 ,ERRBLK

CNDMAAO DMV11 MCTRL DIAG @1
GETBSR

MACRO M1200

22-FEB-84 15:22 PAGE 35

-- GET BYTE SELECT REGISTERS

ga;o

.SBTTL

a71
2472

GETBSR

:
H

2476
2477

GET

:
>

2478
2479
2480

ENTRY CONDITIONS

2482

2483

{

2484

2485
2486

EXIT CONDITIONS

175712

002246

GETBSR: MOVB

2496
2497
2498
2499
2500
2501
2502
ggg}

117737
117737
117737
117737
117737
117737
117737
000207

175646
175682
175636
175632
175626
175622
175616

002270
002272
002274
002276
002300
002302
002304

MOVB
MOVB
MOVB
MOVB
MOVE
MOVB
MOVB
RTS

004522
004530
004536
004544
004552
004560
004566
004574

175706
175702
175676
175672
175666
175662
175656
175652

002250
00252
002254
002256
002260
002262
002264
002266

2505

gggg

MOVB
MOVB
MOVE
MOVB
MOVB
MOVB
MOVB
MOVB

017737
017737
017737
017737
017737
017737
017737
017737
000207

- NONE

[
0

Q000
[

o
o 0

o @

D0000

0000 H000 O

00
0
o 0 0
O

175550
175546
175584
175542
175540
175536
175538
175532

002246
002250
002252
002254
002256
002260
002262
002264

S®BSELO.BSRO

{PUT THE CURRENT CSR VALUES INTO THE PRINT-OUT

8BSEL11,BSR11
8BSEL12.BSR12
@BSEL13.BSR13
8BSEL14,BSR14
®BSEL15.BSR1S
@BSEL16,BSR16
8BSEL17.BSR17
PC

{RETURN TO CALLER

@BSEL1.BSR1
8BSEL2,BSR2
SBSEL3.BSR3
8BSEL4,BSR4
SBSELS.BSRS
SBSEL6.BSR6
SBSEL7,.BSR?7
8BSEL10,BSR10

: TABLE

.SBTTL

GETWSR

-- GET WORD SELECT REGISTERS

GETWSR:

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
RTS

8SELO, WSRO
@SEL2, WSR2
9SEL4
, WSR4
8SEL6
. WSR6
@SEL10,WSR10
@SEL12,WSR12
SSEL14.WSR14
@SEL
16, WSR16
PC

:
004576
004604
004612
004620
004626
004634
004642
004650
004656

NONE

:--ooo‘ooo0‘000..0.ooo‘o‘o‘oootooooo‘oooooooooooooooooooo‘oooooooooooooooooooo

117737

117737
117737
117737
117737
117737
117737
117737
117737

REGISTERS DESTROYED - NONE

2487 004434

004432
004450
004456
004464
004472
004500
004506
004514

THE CONTENTS OF ALL CONTROL AND STATUS REGISTERS

FUNCTION - THIS SUBROUTINE COLLECTS THE CONTENTS OF THE
BYTE SELECT REGISTERS FOR THE PURPOSE OF DISPLAY.

:
F
F

2481

2508
2509
2510
2511
2512
2513
25132
2515
2516

-- GET BYTE SELECT REGISTERS

$0000000000000000000000000000000000000000000000000000000tNcrtttttscisstttttstss

2473
24;;
24

2488
2489
2490
2491
2492
2493
2494
2495

S aae

“WORD" VERSION OF ABOVE SUBROUTINE

{MOVE
1BYTE

THE 8 WORD REGTSTERS TO THE OTHERWISE
TABLE

;RETURN TO CALLER

*
CNDMAAO DMV11 MCTRL DIAG @1
JINITTE

MACRO M1200

22-FEB-84

15:22

PAGE

SEQ 0057

INITIALIZE TIMER & 1

2518
2519
2520
2521
2522
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532
2533
2534
2535
2536
2537
2538
2539
2540

2541
2542
2543
2544
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566
2567
2563
2569
2570
2571
2572
2573
2574

.SBTTL

.INITT1

INITIALIZE TIMER ¢ 1

1900000000000000000000000000000000000000000ARRRRRRRALASAARAIARLIRRRRALRAAAAARSS

INITTL

INITIALIZE

TIMER

CALLING SEQUENCE:
JSR
.WORD
.WORD

R5,INITT1
<VALUE LOADED INTO THE T1 LATCH @ TILL & TiLH>
<BITS 6 & 7 WILL BE LOADED INTO "ACR”, BIT S WILL BE
USED TO SET OR CLEAR BIT 6 ("T1”) OF THE INTERRUPT
ENABLE REGISTER ("IER")>

i+ SEQUENCE OF EVENTS HEREIN:
i

::
::
::
EE

SET THE VIA'S INTERRUPT ENABLE REGISTER ("IER")

SET THE VIA'S "ACR"
SET TiL-L (ADDR 06)
SET T1L-H (ADDR 07)
RETURN WITHOUT ANY ERROR CHECKING

1808824020280 280000804000020040802088242000000000200000004000008800800000000000000

004660

004662

004672
004676
004704

010146

112537
112537
111537
142737

012501

002455
002457
002467
177477

002467

INITT1: MOV
MOVB
MOVB
MOvVB
8ICB
MOV
s+

THE PASSED BIT

R1,-(SP)

(RS)+,TMP6+1

:SAVE

THE REGISTER WE WILL BE USING

$SETUP VALUES TO BE LOADED INTO THE LATCHES

(RS)+,TMP7.1
(R5),TMPB+1
tGET & PROCESS BITS FOR ACR € & 7
@tC<BIT6+BIT7>,TMPB+1 ;EXTRACT BITS 6 £€ 7 € SAVE THEM FOR LATER

(R5)+,R1
IS

tNOW, GET THE BIT TO BE USED IN SETTING OR

;CLEARING BIT 6 OF "IER"

IN THE WRONG POSITION BUT,

WE KNOW WE ARE SETTING OR CLEARING BIT 6

(BIT 6).

IT SHOULD CONTROL

THUS,

THE OPERATION.

THE PASSED BIT WILL BECOME

s+ THE CONTROLLING BIT 7 AND WE WILL "OR" IN THE BIT WE WISH TO BE CONTROLLED
004706
004710
004714
004720
004722
004726

106301
042701
140177
106301
052701
110137

004732
004736
004740
004742

004744
004750
004752
004754

ASLB

R1
@tC<BIT6>,R1

s THIS PUTS THE PASSED BIT INTO BIT 6.
sWHILE HERE, CLEAR ALL OTHER BITS AND

R1
o8IT6,R1
R1,TMPE.1

tNOW THE BIT IS IN THE CONTROLLING POSITION
1SET BIT 6
s+ THE CALL WILL NOW WRITE THE APPROPRIATE VALUE

177677
175440

BIC
8ICB

000100
002475

BIS
MOvB

004537
120016
002475
103431

004310

JSR
IENR
TMPE +1

R5,WRITE

tWRITE

BCS

63$

:EXIT ON ERROR

004537
120013
002466
103424

004064

JSR
ACR

RS,READ

;READ THE CURRENT
;THE VIA'S ACR

BCS

638

sEXIT ON ERROR

ASLB

TMPB

R1,8B8SEL3

;1CLEAR THE INTERRUPT FLAG IN THE SELECT REG.

;THE VIA'S IER
s INTERRUPT ENABLE/DISABLE INFORMATION
SETTING OF

CNDMAAC DMV11 MCTRL DIAG @1
JINITTY

INITIALIZE

2575
2576 004756
2577 004762
2578 004766
2579
2580 004772
2581 V04776
2582 005000
2583 005002
2584
2585 005004
2586 005010
2587 005012
2588 005014
2589
2590 005016
2591 005022
2592 005024

o=
2594
2595 005026
2596 005030
2597
2598
259%
2600

2601
2602
2603
2604 005032
2605

013701
042701

MACRO M1200

22-FEB-84

15:22

PAGE

36-1

SEQ 0058

TIMER ¢ 1
002466

177477

150137

002467

004537
120013
002467

004310

MOV
BIC
BISB

TMPB,R1
1GET THAT VALUE
0tC<BIT6+BIT?>,R1
;CLEAR BITS 6 £ 7
R1,TMPB+1
+ADD CURRENT BITS O --> S TO NEW BITS 6 & 7

JSR
ACR

RS,WRITE

tWRITE

B8CS

63$

sEXIT ON ERROR

JSR
TiLL

R5,WRITE

sWRITE

B8CS

63s

$EXIT ON ERROR

JSR

RS,WRITE

tWRITE TO
sHIGH ORDER LATCH REGESTER (T1L-H)
: THE VALUE PASSED

MOV
RTS

(SP)+,R1

sRESTORE R1

TMPB+1

103411

004537
120006
002455
103404

004310

004537
120007
002457

004310

012601
000205

TMP6+1

TiLH
TMP7.1

63$:

.SBTTL

STALL

THE NEW REGISTER SETTING

TO VIA'S ACR

:LOW ORDER LATCH REGISTER (TiL-L)
s THE VALUE PASSED

:RETURN

-- DELAY FOR 10.5 MICRO-SEC'S (ON LSI-11)

300‘.“.““.‘.‘.‘.‘.“..“‘.‘.““..““““.‘.....“

STALL

THIS SUBROUTINE STALLS FOR ABOUT

“..“‘.“.“.‘......“‘

10.5 MICRO-SECONDS

'--“““..‘..“.“‘.‘.‘...".0.““““..‘“.“‘.‘.“‘

....".“....“.0.“‘..

000207

STALL:

RTS

CNDMAAO DMV11 MCTRL DIAG @1
STREG

STATIC TEST OF

MACRO M1200

22-FEB-84 15:22

SEQ 0059

SPECIFIED DMvV-11 LOCATION

568;

.SBTTL

(]

2609

STREG -- STATIC TEST OF SPECIFIED DMV-11 LOCATION

HEZ 0.““..““0..“..‘C‘."....‘.‘.‘.‘...‘0..““0‘.““..0“‘.0‘..0‘..‘.““‘

gg}g

STREG

PERFORM A

STATIC

TEST

THE

SPECIFIED REGISTER

gg%g

; CALLING SEQUENCE:

2614
2615
2216
2617
2618
2619
2620

:
:
3
H
3
:
:

gggé

010037
010037

005050
005062

2630
2631
2632
gggz

005044
005050
005052
005054

004537
000000
002306
103435

004310

2635 005056

004537

004064

2637 005064

gggg 005066

JSR
B8CC
ERROR

PC,STREG
N$

TESTED>

+IF NO ERROR OCCURED, PROCEED WITH ROUTINE
AN ERROR MESSAGE HAS BEEN STACKED:
PRINT IT

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE

(I.E. CKLOOP)>

STREG:

MOV
MOV

RO,2$
RO,4$

;PUT SPECIFIED REGISTER'S ADDRESS

JSR
0
TDATA
BCS

RS,WRITE

10$

sWRITE IT
;#4s MODIFIED FROM ABOVE
;¢es MODIFIED FROM ABOVE
:ON ERROR, EXIT

JSR

RS ,READ

;READ IT BACK AGAIN

BCS

10¢

;:ON ERROR, EXIT

CMPB
cLC

GDATA,BDATA

BEQ
MOV
BIC
GTDF

10$
2% ,REGNUM
£177760,REGNUM
EM25,ERR7

;DID WE READ WHAT WE WROTE?
+ (THIS ISN‘T NEEDED FOR THE ERROR TEST BUT
s+ MUST BE CLEARED ON EXIT IF NO ERROR OCCURED)
s YES, EXIT FROM SUBTEST
;BUILD REGISTER ¢

: - -“.‘.‘..‘.‘.“““.‘0..0..‘..‘...“"...“.‘.‘...“.‘.“.“‘0‘.0......“0‘.

2626
2627 005034
gggg 005040

2636 005062

; N$:

gggi
2625

2640
2641
2642
2643
2644
2645
2646

PAGE 37

000000

2s:

44 ;

002312

103430

005070
005076

123737
000241

005100
005102
005110
005116

001423
013737
042737
|

005116
005124
005132
005140
2647 005146
2648 005150

012737
012737
012737
012737
000261
000207

002310

002312

005050
177760

002334
002334

000001
000006
015565
006612

BDATA

10%:

SEC
RTS

#¢s+
#as

;#¢+ MODIFIED FROM ABOVE s+«
i

;REPORT READ/WRITE ERROR

002236
002240
002242
002244

IN IZ/O CALLS

QUEUVE

; INDICATE

“DEVICE FATAL"” ERROR ¢ 6

MOV
MOV
MOV
MOV
THAT AN ERROR WAS DETECTED

@7 EDF ,ERRTYP
#6 ,ERRNBR
#EM25 ,ERRMSG
2ERR7 ,ERRBLK

15
CNDMAAO DMV1l MCTRL DIAG 1

INTERRUPT HANDLER
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660 005152
005152
2661 005152
005154
005160
005162
005166
005166
005170
005172
005174
2666 005176
2667
005200
2669 005204
2670 005210
2671 005212
2672 005216
2673 005220
005220
005220
2674
2675 005222

MACRO M1200

22-FEB-84

15:22

PAGE

SEQ 0060

-- MPIHAN

.SBTTL

INTERRUPT HANDLER -- MPIHAN

100000 RRREEAREAARERRALREASAAAAAAAAALARARARAAAALAAAAAAAAAARAAALALAEEAAARSESES

i MPIHAN -- COUNT INTERRUPTS
§

B -~

105737
001007
004737

THIS ROUTINE WILL INCREMENT THE LOW BYTE OF “INTFLG” EACH TIME IT IS
IF "IHILNK” IS NON-ZERO, VECTOR TO THE ADDRESS THEREIN USING
A “JSR
PC"

8820808000040 000 0000000000000 0000000000800 0000800

MOV

TSTB
BNE
JSR

002330

004434

GEDF

MPIHAN
RO, -(SP)

INTWCH
54
PC,GETBSR
EM34 ,ERR3

:SAVE RO

AARAL LR

RARALARARSLS

MPIHAN:
:

sHAVE WE BEEN TOLD TO WATCH FOR TYPE “A" INT'S?
;:YES, DO NORMAL INTERRUPT PROCESSING
DUMP REGISTERS AND
:NO,
REPORT "UNEXPECTED INTERRUPT"
;
“"DEVICE FATAL” ERROR @ 7
:
TRAP
.WORD

104455

000007
015613
005414
000407

105237
005737
001402
004777
012600

"A"

ENTERED.

BGNSRV
010046

-- USUALLY INTERRUPT

002326
005222

5%:

10¢:

.WORD
.WORD

10%

;GO TO EXIT

INCB

INTFLG

; INCREMENT LOW BYTE OF INTERRUPT COUNTER

BEQ
JSR

10$
PC,3IHILNK

TST

MOV

ENDSRV

IHILNK

(SP)+,RO

CS$ERDF
7

EM34
ERR3

;ARE WE EXPECTED TO EXECUTE ANOTHER ROUTINE?
sNO, GET OUT

:YES, GO TO IT
;+RESTORE RO

-- I HOPE IT'S VALID!

;RETURN TO INTERRUPTED PROCESS
L10002:

art

000002
000000

IHILNK:

.WORD

;POINTER TO AUXILIARY INT. HANDLING ROUTINE

CNDMAAO DMV11 MCTRL DIAG @1

INTERRUPT HANDLER
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687 005224
005224
2688 005224
2689 005226
2690 005232
2691 005234
2692 005240
005240
005242
005244
005246
2693 005250
2695
2696
2697
2698
2699
2700

005252
005256
005262

005264
005270
005272
005272
005272

2701
2702 005274

MACRO M1200

22-FEB-84

15:22

PAGE

SEQ 0061

- - MPOHAN

.SBTTL

INTERRUPT HANDLER -- MPOHAN

1000000000000 000000000

RN RARARRRRRRRRARARLAARAARARARRRARALAAALLRRALRAASAARALS

i MPOHAN -- SIMPLY COUNT INTERRUPTS -- USUALLY INTERRUPT "B"
THIS ROUTINE WILL INCREMENT THE HIGH BYTE OF "INTFLG"” EACH TIME IT IS
ENTERED.
IF "IHOLNK” IS NON-ZERO, VECTOR TO THE ADDRESS THEREIN USING
A "JSR
PC"
=880

010046

105737
001007
004737,

0808000000000 000000000000 004 0000000800000 0000000

002331
004434

BGNSRV

MPOHAN

MOV
TSTB
BNE
JSR
GEDF

RO, -(SP)
INTUCH+1
S$
PC,GETBSR
EM34B,ERR3

104455

000010
015644
005414
000407

105237
005737

001402
004777
012600

002327
005274

S$:

10$:

4000000000000 00000000

MPOHAN:
:

:SAVE RO
sHAVE WE BEEN TOLD TO WATCH FOR TYPE "B" INT'S?
;:YES, DO NORMAL INTERRUPT PROCESSING

iNO,
:
;

DUMP REGISTERS AND
REPORT "UNEXPECTED INTERRUPT"
"DEVICE FATAL” ERROR @ 8
TRAP

.WORD
.WORD
.WORD

CSERDF

8
EM348B
ERR3

:GO TO EXIT

INCB

INTFLG+1

; INCREMENT HIGH BYTE OF INTERRUPT COUNTER

BEQ
JSR
MOV
ENDSRV

10$
PC, 8IHOLNK
(SP)+,RO

:YES, GO TO IT -- I HOPE IT'S VALID!
+RESTORE RO

.WORD

TST

IHOLNK

;ARE WE EXPECTED TO EXECUTE ANOTHER ROUTINE?
:NO, GET OUT
;RETURN TO INTERRUPTED PROCESS
L10003:

000002
000000

IHOLNK:

;POINTER

TO AUXILIARY

INT.

HANDLING ROUTINE

CNDMAAO DMV11l MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE 40

SEQ 0062

GLOBAL ERROR REPORT REPORT SECTION

g;gg

.SBTTL

2706

3/ /1177777777777 777777 7277777777777 77772727727777777272777277777727777772777277727/77277777

2708
2709

Y4
THAT ARE USED IN MORE THAN ONE TEST.
;/////////////////////////////////////////////////////////////////////////////

2707

g;ig

005302
o 005302

g;lg
1
2720 005304
005304
2721 005304
005304
005310
005314
005320
005324
005326
005330
2722 005334
2723 005340
005340
005342
005346
005350
005354
005356
005362
005366
005372
005374
005376
2724 005402
2725 005406
2726 0054:.2
005412
- 005412

004737

ERROR HANDLER

INe

012072

eee

-- ERR1
SNEN

BGNMSG

ERR1

JSR
ENDMSG

PC,NULERR

SECTION CONTAINS ERROR MESSAGES

“NO NOTHING" HANDLER

EEE

LSRR

EES

.SBTTL
Jros tiens

013746
012746
012746
012746
010600
104414
062706
004737
005046
153716
005046
153716
005046
153716
012746
012746
010600
104414
062706
004737
004737

002334
013605
012124
000003
000010
011276
002314
002312
002310
012161
000004

000012
011322
012072

104423

g;gg

.SBTTL
‘

004737
004737
104423

011322
012072

ERR1
;USE COMMON ROUTINE TO TERHINATE ERROR MESSAGE
L10004:

104423

2730 005414
005414
2731 005414
2732 005420
2733 005424
005424
005424

THE GLOBAL ERROR REPORT

SBTTL
fras

2714 005276
005276
2715 005276
2716 005302

GLOBAL ERROR REPORT REPORT SECTION

TRAP

C$MSG

ERROR HANDLER -- ERR2 -- CSR REGISTER ERROR REPORTING
e sAinsss s ssSARRSROLERABERSBE S EETAPBELEE WEES WS $ 0 S RAEEERIE WSS,
BGNMSG
ERRZ2
ERR2::
PRINTB
&FMTO02,#TXTS,REGNUM
MOV
REGNUM, -(SP)
MOV
#TXTS, -(SP)
MOV
4FMT02, -(SP)
MOV
#3,-(SP)
MOV
SP,RO
TRAP
CSPNTB
ADD
210,SP
JSR
PC, XORGB
PRINTB
#&FMTO2A,<B,GDATA>,<B,EDATA>,<B,XDATA>
CLR
-(SP)
BISB
XDATA,(SP)
CLR.
-(SP)
B8ISB
BDATA,(SP)
CLR
-(SP)
BISB
GDATA,(SP)
MOV
&FMTO2A, -(SP)
MOV
#4,-(SP)
5
MOV
SP,RO
TRAP
CSPNTB
ADD
@12,.SP
JSR
PC.ERR4S
;DUMP THE BYTE SELECT REGISTERS
JSR
PC,NULERR
s USE COHHON ROUTINE TO TERMINATE ERROR MESSAGE
ENDMSG
L10005:
TRAP
C$MSG
EES

SERE

TER

ERROR HANDLER

SRR

SOEEIEE

SRS

-- ERR3 -- DUMP THE BYTE SELECT REGISTERS

-----------------------------------------------------------------------------

BGNMSG

ERR3

JSR
JSR
ENDMSG

PC.ERR4
S
PC,NULERR

ERR3::

;USE COMMON ROUTINE TO TERMINATE ERROR MESSAGE
L10006:

TRAP

C$MSG

CNDMAAO DMV11l MCTRL DIAG 1

ERROR HANDLER
2734
2735
2736
2737 005426
005426
2738 005426
2739 005430

2740 005434
2741 005440
2742 005442
005442

005444
005446
005452
005456
005460
005462
2743 005466
2744
2745 005470
2746 005472
2747 005474
2748 005500
2749 005502
2750 005506
2751 005510
005510
005514
005516
005522
005526
005532
005534
005536
2752
2753 005542
2754 005544
2755 005550
005550
005550
2756
2757
2758
2759 005552
005552
2760 005552
005552
005556
005562

005572
005574
005576
2761 005602
2762 005606
005606
005612

-- ERR3

MACRO M1200

22-FEB-84

‘

001001
005001
022701
003002
012701
006301
016146
005046

153716

012746
012746
010600
104415
062706

012601
004737

SEQ 0063

-----------------------------------------------------------------------------

.SBTTL

005046
150116
012746
012746
010600
104415
062706
000425

PAGE 40-1

-- DUMP THE BYTE SELECT REGISTERS
'

010146
113701
122701
103013

15:22

ERROR HANDLER

-- ERR4

-- M-LOOP TIMEOUT ERROR HANDL ING

----------------------------------------------------------------------------

002310

000017

BGNMSG

ERR4

MOV
MOVB

R1,-(SP)
GDATA,R1

ERR4:;;
:SAVE THE WORKING REGISTER
;SAVE THIS FOR LATER

BHIS
PRINTX

S
@OFMTS,<B,R1>

;:YES,
sNO,

CcMPB

@17,.R1

;WAS THIS AN M-LOOP REQUEST?

012400
000002

TRAP

000006

S$:
000007

000006

THEN REPORT THE FUNCTION CODE
THEN IT MUST BE A BSEL1 SETTING
CLR
-(SP)
BISB
R1,(SP)
MOV
OFMTS, -(SP)
MOV
#2,-(SP)
MOV
SP,RO

6$:
78:

017532

20$

BNE
CLR
cMP
BGT
MOV

6
R1
07,R1
78
#6,R1

ASL
PRINTX

ADD

R1
;:CONVERT TO A WORD OFFSET
&FMTSA,<B,GDATA>,TXTMLT(R1)
sREPORT THE FAILING FUNCTION

MOV
JSR

ENDMSG

(SP)+,R1
PC.ERRSS

‘

013746
013746

002314
002312

000010
011276

ADD

€10,SP

CSPNTX

L10007:

RAP

C$MSG

-----------------------------------------------------------------------------

.SBTTL
l

002334
013605
012124
000003

TXTMLT(R1),-(SP)
-(SP)
GDATA,(SP)
&FMTSA, -(SP)
#3,-(SP)
SP,RO

;RESTORE THE WORKING REGISTER
;ODUMP THE SELECT REGISTERS

104423

013746
012746
012746
012746
010600
104414
062706
004737

MOV
CLR
BISB
MOV
MOV
MOV

TRAP

000010
20%:

#6,SP

;IF IT WAS A 17, THIS IS A “NOP" AND
:
THE TEXT POINTER MUST SO REFLECT.
;s IS FUNCTION CODE > 7?
;NO,
THEN WE CAN HANDLE IT
;s YES, THEN IT'S UNDEFINED -- SAY SO

002310
012443
000003

011710

CS$PNTX

ERROR HANDLER

-- ERR5

-- WORD SELECT REG.

ERRORS

-----------------------------------------------------------------------------

BGNMSG

ERRS

PRINTB

#FMT02,4TXTS,REGNUM

JSR

PRINTB

PC,XORGB

#FMT10,GDATA,BDATA,XDATA

ERRS:

MOV
MOV
MOV
MOV

REGNUM, -(SP)
@TXTS, -(SP)
#FMT02, -(SP)
#3,-(SP)

MOV
MOV

XDATA, -(SP)
BDATA, -(SP)

MOV
TRAP
ADD

SP,RO
CSPNTB
#10,SP

CNDMAAO DMV1l MCTRL DIAG @1

ERROR HANDLER
005616
005622
005626
005632
005634
005€36
2763 005642
2764 005646
005646
005646
2765
2766
2767
2768 005650
005650
2769
2770 005650
2771 005652
2772 005656
005656
005662
005666
005672
005674
005676
2773 005702
005702
005704
005706
005710
005712
005714
005716
005720
005722
005724
005726
005730
005732
005736
005742
005746
005750
005752
2774 005756
005756
005760
005762
005764
005766
005772
005776
006000
006002
2775 006006
2776 006012
006012

MACRO M1200

22-FEB-84

15:22

PAGE 40-2

SEQ 0064

-- ERRS -- WORD SELECT REG. ERRORS
013746
012746
012746
010600
104414
062706
004737

002310
012654
000004
000C12
011710

MOV
MOV
MOV
MOV
TRAP

JSR
ENDMSG

PC.ERRS$

BGNMSG

ERR6

ADD

;:DUMP THE SELECT REGISTERS

002604

012746
012746
012746
010600
104415
062706

013632
012562
000002

005046
152116
005046
152116
012746
012746
010600
104415
062706

012701

005046

SP,RO
C$PNTB
#12,SP

;44 PRINT THE FIRST WALF OF THE REGISTERS #4s

012701

005046
152116
005046
152116
005046
152116
005046
152116
005046
152116
005046
152116
012746
012746
012746
010600
104415
062706

#FMT10, -(SP)

L10010:

104423

010146

GDATA, -(SP)

MOV

MOV
PRINTX

PRINTX

R1,-(SP)

OPATCR,R1
4&FMTO06,8TXT7

sPRESERVE R1'S CONTENTS
;POINT TO EXPECTED VALUES

MOV
MOV

MOV
SP,RO
TRAP
CS$PNTX
AD 0
6,SP
&FMTO6A,4TXT8A,<B,(R1)+>,<B,(R1)+>,<B,(R1)+>,<B,(R1)+>,<B,(R1)+>,<B,(R1)+>
CLR
-(SP)

8ISB
CLR
BISB
CLR

(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)

CLR
BISB
CLR
8IS8
CLR
BISB
MOV
MOV
MOV
MOV

-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
@TXT8A, -(SP)
#FMTO6A, -(SP)
210, -(SP)
SP,.RO

B8ISB

014004
012571
000010

000022

PRINTX

(012637

000003

000010
003122

MOV
PRINTX

QTXT7,-(SP)
OFMTO06, -(SP)

#FMTO06B,<B,(R1)+>,<B,(R1)+>

(R1)+,(SP)

TRAP
ADD

CSPNTX
@22,5P

CLR
BISB
CLR
BISB
MOV

-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
9FMTO6B, -(SP)

MOV
TRAP
ADD

SP,RO
CSPNTX
#10,SP

;POINT TO ACTUAL VALUES
#8T1,R1
0FHT06A.0YX788.<B.(R1)0>.<8.(R1)0>.<B.(Rl)0>.<B.Eflé)0>.<8.ssg)0>.<8.(R1)¢>
L
p
(

CNDMAAO DMV11 MCTRL DIAG @1

ERROR HANDLER
006014
006016
006020
006022
006024
006026
006030
006032
006034
006036
006040
006042

006046

006052
006056
006060
006062
2777 006066
006066
006070
006072

006074

006076
006102
006106
006110
006112
2778 006116
2779 006122
006122
006124
006126
006130
006132
006134
006136
006140
006142
006144
006146
006150
006152
006156
006162
006166
006170
006172
2780

-- ERR6

MACRO M1200

22-FEB-84

15:22

-- VIA REGISTER ERRORS W/FULL REG.

PAGE 40-3

SEQ 0065

DUMP

152116
005046
152116
005046
152116
005046
152116
005046
152116
005046

152116

012746
012746
012746
010600
104415
062706

005046
152116
005046
152116
012746

012746
010600
104415
062706
012701

B8ISB

CLR
BISB
CLR
BISB
CLR
BISB
CLR
BISB
CLR
BISB
MOV

014021
012571
000010

000022
PRINTX

OFMTO6B,<B,(R1)+>,<B,(R1)+>

012637
000003

000010
003206

MOV

PRINTX

005046
152116

#8T72,R1

;POINT TO XOR VALUES

MOV
TRAP
ADD

OFMTO6A, -(SP)
10, -(SP)
SP,RO
CSPNTX
022,5P

CLR
BISB
CLR
BISB
MOV
MOV
MOV
TRAP
ADD

-(SP)
(R1)+,(SP)
-(sP)
(R1)+,(SP)
OFMTO68, -(SP)
#3,-(SP)
SP,RO
CS$PNTX
010,SP

0FHTO6A.OTXTBC.¢8.(R1)0>.<B.(R1)0>.<8.(Rl)0’.‘B.éE&)0>.¢Be§=§)0>.¢8.(fll

)0’

014036

012571
000010

000022

012637
000003

&@FMTO06B,<B,(R1)+>,<B,(R1)+>

(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)

MOV
MOV

@TXT8C, -(SP)
@FMTO6A, -(SP)

MOV
TRAP

SP,RO
CSPNTX

CLR
BISB
CLR
BISB
MOV

-(SP)
(R1).+,(SP)
-(SP)
(R1)+,(SP)
@FMTO06B, -(SP)

ADD

MOV

000010

-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
@TXT88, -(SP)

MOV
MOV

8ISB
CLR
BISB
CLR
BISB
CLR
BISB
CLR
BISB
CLR
8ISB

PRINTX

(R1)+,(SP)

TRAP

ADD

@22,.5P

SP,RO

CSPNTX

#10,5P

CMDMAAO DMV11 MCTRL DIAG o1

ERROR MANDLER
2781

2784 006256

-- ERR6

MACRO M1200

22-FEB-84

15:22

VIA REGISTER ERRORS W/FULL REG.

012701

002614

012746
012746
012746
010600
104415
062706

013717
012562
000002
000006

005046

PAGE 40-4

SEQ 0066

DUMP

jese PRINT SECOND HALF OF THE REGISTERS ese

MOV
PRINTX

PRINTX

152116

OPATCR.8, ,R1
@FMTO06,0TXT7A

1POINT

TO 2ND MALF OF REGISTERS EXPECTED VALUES

;

MOV
MOV

OTXT7A, -(SP)
OFMTO06, -(SP)

MOV
TRAP

SP,RO
CIPNTX

ADD

#6,5P

CLR

-(SP)

OFMTO6A,0TXTBA,<B,(R1)+>,<B,(R1)+>,<B,(R1)s>,<B,(R1)e¢>,¢B,(R1)s>,<B,(R1
8IS8

005046
152116

CLR
8IS8
CLR
8IS
CLR

8IS8
CLR

014004
012571
000010
000022

2785 006332

MOV
MOV

Q@TXT8A, -(SP)
OFMTO6A, -(SP)

MOV
TRAP

SP,.RO
CSPNTX

CLR

8ISB8

2786 006362
2787 006366

012701

PRINTX

005046
152116

-(SP)

(R1).+,(SP)

TRAP

CSPNTX

e3,-(SP)
SP,RO

10,5P

tPOINT TO 2ND MALF OF ACTUAL VALUES
OFMTO6A,0TXT8B,<B,(R1)+>,<B,(R1)+>,<B,(R1)e>,<B,(R1)¢>,<B,(R1)+>,<B,(R1)
e>

CLR
BIS8

CLR
BISB
CLR
8IS8
CLR

B8IS8
CLR
8ISB
CLR
014021
012571
000010

022,.5P

-(SP)
(R1)+,(SP)
OFMTO068, -(SP)

ADD

003132

(SP)
(R1).,(SP)

CLR
81s8
MOV

MOV
MOV

000010

-(SP)
(R1).,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)

(R1)+,(SP)

ADD

012637
000003

(R1)+,(SP)

B8ISB

CLR
81S8

)«>

BISB8

MOV

MOV
MOV
MOV

TRAP

-(SP)
(R1).,(SP)

-(SP)
(R1).,(SP)
-(SP)
(R1).,(SP)
-(SP)

(R1).,(SP)

-(SP)
(R1).,(SP)
-(SP)

(R1).,(SP)

eTXT188, -(SP)

FMTOEA, -(SP)
@10, -(SP)
SP,RO

CSPNTX

CNDMAAO DMV11 MCTRL DIAG @1
ERROR MANDLER

006436
2788 006442
006442
006444
006446

ERR6

062706

2791 006552

2792 006602
2793 006604
2794 006610
2795
2796
2797
2798 006612
006612
2799 006612
2800 006616
2801 006620
006620
006624
006630

PRINTX

104415
062706
012701

000010
003216

012746
010600
104415

062706

005046
152116
005046
152116
012746
012746
010600
104415
062706
012601
004737

15:22

Cé6
PAGE

40-5

SEQ 0067

DUMP

000022

012637
000003

005046
152116
005046
152116
005046
152116
005046
152116
005046
152116
005046
152116
012746
012746

22-FEB-84

VIA REGISTER ERRORS W/FULL REG.

005046
152116
005046
152116
012746
012746
010600

2789 006472
279C 006476

MACRO M1200

OFMT06B,<B,(R1)¢>,<B,(R1)+>

022,5P

CLR
BISB
CLR
BISB

-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)

MOV
MOV
MOV
TRAP

MOV

PRINTX

872.8, ,R1

;POINT

OFHTO6fl.OTXTOC.¢8.(R1)o),¢B,(R1)o>,¢8,(fl1)o»,ca.(fll)o),(fl.(fll).).ca,(fll)o)

CLR
8ISB
CLR
BISB
CLR
8ISB
CLR
BISB
CLR
BISB
CLR
8ISB

MOV
MOV
MGV
MOV

TRAP

000022
PRINTX

ADD

OFMTO06B,<B,(P1)+>,<B,7R1)+>

CLR
8ISB
CLR
BISB
MOV

012637
000003

MOV
MOV

TRAP
ADD

000010
MOV
JSR
ENDMSG

OFMTO6B, -(SP)
03,-(SP)
SP,RO
CSPNTX
010,5P

TO 2ND HALF 0OF XOR VALUES

014036
012571
000010

012072

ADD

(SP).,R1
PC ,NULERR

sRESTORE R1
;USE COMMON ROUTINE

ERROR HANDLER

ERR7

@TXT8C, -(SP)
OFMTO6A, -(SP)
010, -(SP)
SP,RO

CSPNTX

022.5P

-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
OFMT068B, -(SP)

@3, -(SP)
SP,RO

CSPNTX
€10,5P

TERMINATE ERROR MESSAGE
L10011:

104423

-(SP)
(R1).,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1).,(SP)
-(SP)
(R1)+,(SP)
-(SP)
(R1)+,(SP)

TRAP

CS$MSG

VIA REGISTER ERRORS

ERR7

113701

006301

016146
012746
012746

002334
017554
014327
012530

REGNUM,R1
R1

ERR7::
3sAS PASSED,

OFMTO7,0TXTVR, TXTVRT(R1)

THIS WAS A BYTE OFFSET
MOV

MOV

TXTVRT(RL1), -(SP)

@TXTVR, -(SP)

QFMTOT, -(SP)

CNDMAAO DMV11 MCTRL DIAG o1
ERROR HANDLER

2802
2803

2804
2805

006634
006640
006642
006644
006650
006654
006654
006656
006662
006664
006670
006672
006676
006702
006706
006710
006712
006716
006722
006722

280 006722

-- ERR7
012746
010600
104414
062706
004737
005046
153716
005046
153716
005046
153716
012746
012746
010600
104414
062706
004737

MACRO M1200

000010
011276

JSR
PRINTB

002310
012161
000004
000012
012072

JSR
ENDMSG

2825 007012
007012

007016
007022
007024

1USE COMMON ROUTINE

L10012:

003401
005000
006300
016000
010046
012746
012746
010600
104415
062706

012746
012746
010600
104415
062706

MOV
BEQ

000006

CMP

BLE
CLR
ASL
MOV
PRINTX

2s:

TMP2,RO
2%

RO, 06

28
RO
RO
TXT47P(RO),RO
0OFMT47A,RO

@ 2

0FMT478

THERE

PRINTX

oOFMT47C

o 3
:STANDARD PORTION OF LINE

)

TEXT

s IF WITHIN LIMITS, LET IT GO
sELSE, MAKE IT O FOR “UNDEFINED"
:CONVERT TO A WORD INDEX
;GET ADDRESS OF REQUIRED TEXT
s IDENTIFY TEST PATTERN BEING USED
MOV
MOV
MOV
MOV
TRAP
ADD
1STANDARD PORTIOM OF LINE 2

PRINT HEADING LINE

1THIS IT ALL WE UNDERSTAND FOR NOW

000004

007322
000001

ERRA7::

1GET TEST PATTERN CODE
1ZERO IS UNDEFINED BUT

PRINT HEADING LINE

PRINTX

007263
000001

-----------------------

o 1

000006

-- FOR RAM DATA ERRORS IN STATIC TEST(S)

ERR47

007232
000002

012746
012746
010600
104415

-- ERR47

PRINT HEADING LINE

002444

007614
:

ERROR MANDLER

---------------------------

020027

C$MSG

---------------------------------

---------------------------

013700
001404

TRAP

--------------------------------------------

BGNMSG

2822 006772
006772
006776
007002
007004
007006
2823

PC,NULERR

03, -(SP)
SP,RO
CSPNTB
010,5P

CLR
-(SP)
BISB
XDATA,(SP)
CLR
-(SP)
BISB
BDATA,(SP)
CLR
-(SP)
BISB
GDATA,{SP)
MOV
OFMTO2A, -(SP)
MOV
04, -(SP)
MOV
SP,RO
TRAP
CSPNTB
ADD
012,5P
TO TERMINATE ERROR MESSAGE

104423

2809 006724
006724
2810

2820

MOV
MOV
TRAP
ADD

PC , XORGB
@FMTO2A,<B,GDATA>,<B,BDATA>
<B,XDATA>
,

002312

.SBTTL

006736
006740
006742
006744
006750
006750
006752
006756
006762
006764
006766

002314

‘

2814 006732

D6
PAGE 40-6

000003

2807

2812 006724
2813 006730

15:22

-- VIA REGISTER ERRORS

2815
2816
2817
2818
2819

22-FEB-84

TO SAY

THAT

RO, -(SP)
OFMTATA, -(SP)
02, -(SP)
SP,RO
CSPNTX
26,5P

MOV
MOV
MOV
TRAP
ADD

0FMT478, -(SP)
o1, -(SP)
SP,RO
CSPNTX
04,5P

MOV
MOV
MOV
TRAP

OFMTATC, -(SP)
o1,-(SP)
SP,RO
CSPNTX

CNDMAAO DMV11 MCTRL DIAG @1

ERROR HANDLER

-- ERR47

007026
2826
2827
2828 007032
007032
007036
007042
007044
007046
2829
2830
2831 007052
007052
007056
007062
007064
007066
2832 007072
2833 007076
2834 007102
007102
007102
2835
2836 007104
2837 007106
2838
2839 007110
2840
2841 007110
2842 007116
2843 007120
2844
2845 007124
007130
2847 007134
2848 007136
007136
007140
007142
007144
007150
007152
007154
007160
007164
007170
007172
007174
2849 007200
007206
2851 007210
007210
007214
007229
007222
007224
2852 007230

MACRO M1200

FOR RAM DATA ERRORS

062706

000004

012746
012746
010600

007350

22-FEB-84
IN STATIC

15:22

PAGE

SEQ 0069

TEST(S

PRINT HEADING LINE
PRINTX

¢ 4

OFMTATE

104415
GO PRINT DATA PORTION OF ERROR MESSAGE
PRINTX

012746
012746
010600
104415
062706
005037
004737

012121
000001

000004
007104
007110

CLR
JSR
ENDMSG

ONEWL IN

ER4A7CT

PC.ERRA47,

;s TERMINATE HEADER & CAUSE

ER4A7CT:
ER47MX:

MOV
MOV
MOV
TRAP
ADD

OFMTAT7E, -(SP)

1 BLANK LINE

SP,RO
CSPNTX
84 ,5P

MOV

ONEMWLIN, -(SP)

MOV

SP,RO

TRAP
ADD

tRE-INITIALIZE THE DATA LINE COUNTER

CSPNTX
04 ,5P

sUSE COMMON SUBROUTINE TO REPORT DATA
L10013:

104423
000000
000020

04 ,SP

1STANDARD PORTION OF LINE 4

000001

062706

ADD

TRAP

C$MSG

: THIS VARIABLE WILL COUNT

ERA7CT ,ER47MX
60¢
ER47CT

;HAVE WE REPORTED ENOUGH OF THESE DATA LINES?
1YES,
BYPASS THIS WHOLE ROUTINE AND EXIT
iNO,
COUNT THIS LINE

16.

THE DATA LINES

: THIS CONSTANT LIMITS THE DATA LINES PRINTED

ERRA47.:
023737
103044
005237

007104

113701
113703

002450
002452

074103

005046
150316
005046
153716
005046
150116
013746
012746
012746
010600
104415
062706
023737
001010
012746
012746
010600
104415
062706
000207

007106

007104

MOvB
MOVB

XOR
PRINTX

TMP4 ,R1
;:GET EXPECTED DATA
TMPS,R3
;SETUP TO CALCULATE XOR
R1,R3
sCALCULATE XOR OF EXPECTED & ACTUAL DATA
OFMT47G,TMPA,<B,R1>,<B,TMPS>
,<B,R3> ;PRINT DATA LINE

CLR
BISB
CLR

B8ISB

002452

CLR

000014
007104

CMP

007106

BNE
PRINTX

010644
000001

60%:

RTS

ER47CT ,ER47MX
604
OFMT481

-(SP)

R1,(SP)

MOV

85, -(SP)

MOV
TRAP

TMPS,(SP)

BISB8
MOV
MOV

002464
007407
000005

-(SP)
R3,(SP)
-(SP)

ADD

TMPA, -(SP)
OFMTA7G, -(SP)

SP,.RO
CSPNTX

€14,SP

s IF THESE TWO ARE EQUAL, WE WON'T BE PRINTING
sANY MORE LINES FOR A WHILE.,
SO,
+

PUT

UUT

A MESSAGE

THAT

EFFECT.

MOV
MOV
MOV

TRAP
ADD

&FMTA8I, -(SP)
21, -(SP)
SP,RO

CSPNTX
24 ,SP

CNDMAAO DMV11 MCTRL DIAG @1
ERROR HANDLER
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868

007232
007263
007322
007350
007407
007442
007453
007466
007510
007533
007556
C07614
007622
007630

2869
2870
2871
2872
2873
2874
2875 007632

-- ERR47

MACRO M1200

15:22

PAGE 40-8

SEQ 0070

-- FOR RAM DATA ERRORS IN STATIC TEST(S
LNLIST

116
116
116
116
116
114

FMT47A:;
FMTA478B:
FMT47C:
FMT47E:;
FMT47G:

TXT47C:
TXT47D:
TXT47E:;
TXT47F;
TXT47G:
TXTA7H:

111

LIST
.EVEN

014235
007466
007556

TXT47P;

BEX
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
BEX

\SNSS2&ATEST PATTERN:
T\
\#NuS2#A
(ALL VALUES IN OCTAL)\
\sN%S3#A
RAM
SHOULD\
\#N%S3SAADDRESS
XOR\
BE
IS
\®$N%S4%04%S4803%S 3803852803\
\ALL ONES\
\ALL ZEROES\
\1 BIT ALTERNATING\
\2 BITS ALTERNATING\
\ADDRESS IN ADDRESS\
\INCREMENTAL VALUE IN ADDRESS\

.WORD

TXTML6,TXT
TXTA7E,
47C,T
TXT47F XTA7D
,TXT47G, TXT47H
,

“TXTML6”

ABOVE

IS DEFINED AS

“UNDEFINED”

........................

IN THE M-LOOP FUNCTION

........................

EGNMSG

007632

2876
2877
2878 007632
007632
007636
007642
007644
007646
2879 007652
2880 007660
2881 007662
007662
007666
007672
007674
007676
2882
2883
2884 007702
007702
007706
007712
007714
007716
2885
2886
2887
2888 007722
007722
007726
+ 007732

22-FEB-84

....................

ERR48
ERRA48:
:

PRINT HEADING LINE ¢ 1

012746
012746
010600
104415
062706
032737
001410

010300
000001

012746
012746
010600

010347
000001

PRINTX

002350

BIT
BEQ

PRINTX

@FMT48A

s STANDARD PORTION OF LINE 1

TRAP
ADD
INFORMATION REQUESTED,

;elfa.PFLAG

: IF EXTENDED

&FMT48B

sPRINT EXTENDED PORTION OF LINE

104415
062706

010402
000001

2s:

PRINTX

ADD

@ 2

aFMT48C

1 STANDARD PORTION OF LINE 2

MOV
MOV
MOV

TRAP
ADD

PRINT HEADING LINE

012746
012746
C10600

MOV
MOV
MOV

TRAP

PRINT HEADING LINE

012746
012746
010600
104415
062706

MOV
. MOV
MOV

0104327
000001

PRINTX

@FMT48E

#FMTA8A, -(SP)
SP,RO

CS$PNTX
04,5P

oFMTA488, -(SP)

21, -(SP)

SP,.RO

CSPNTX
#4,5P

oFMTA8C, -(SP)

SP,RO
CSPNTX
24 ,5P

@ 3

: STANDARD PORTION OF LINE 3

MOV
MOV

MOV

oFMT48E, -(SP)

21, -(SP)

SP RO

CNDMAAO DMV11 MCTRL DIAG #1
ERROR HANDLFR

007734
007736
2889 007742
2890 007750
2891 007752
007752
007756
007762
007764
007756

gggg

-- ERR48

104415
062706
032737
001410
012746
012746
(©10600
104415
062706

2894 007772
007772
007776
010002
010004
010006
2895 N10012
2896 010016
2897 010022

012746
012746
010600
104415
062706
005037
004737

2098 010022

104423

2899 010024

000000

010022

ggg(: 010026

MACRO M1200

-- FOR DATA ERRORS IN

000004
000004

SEQ 0071

#BIT2,PFLAG
68
OFMT48F

TRAP
ADD
+ IF EXTENDED INFORMATION REQUESTED,

2913 010060
gg{.g C10064
010066
010072
010076
010102
010104
010104
010106
010110
010112
010116
010120
010122
010126
010130
010134
010140

MOV
MOV
MOV
TRAP
ADD

000004

012121
000001

GO PRINT DATA PORTION OF ERROR MESSAGE

6$:

PRINTX

000004
010024
010030

CLR
JSR
ENDMSG

ONEWLIN

:
ER4BCT
PC,.ERR48.
~

ER48CT:

ER4BMX:

.WORC

.WORD

OFMTA3F, -(SP)
#1,-(SP)
SP,RO
CS$PNTX
©4,5P

s TERMINATE HEADER & CAUSE

1 BLANK LINE
MOV
.
MOV
MOV
TRAP
ADD
tRE-INITIALIZE THE DATA LINE COUNTER
sUSE COMMON SUBROUTINE TO REPORT DATA

L10014:

000020

CSPNTX
#4,5P

sPRINT EXTENDED PORTION OF LINE 3

: THIS VARIABLE WILL COUNT

ONEMWLIN, -(SP)
o1, -(SP)
SP,RO
CSPNTX
04 ,SP

TRAP

C$MSG

THE DATA LINES

16.

s THIS CONSTANT LIMITS THE DATA LINES PRINTED

ER48CT ,ER48MX
608
ER48CT

tHAVE WE REPORTED ENOUGH OF THESE DATA LINES?
:YES,
BYPASS THIS WHOLE ROUTINE AND EXIT

ERRA48. :
023737
103117

005237

010024

010026

CMP
BHIS
INC

010024

iNO,

COUNT

i DETERMINT WHICH ERROR CALL GOT US HERE

2910 010044
2911 010052
2912 C10054

BIT
BEQ
PRINTX

010506
000001

gggg

2916
2917
2918
2919
2920

PAGE 40-9

"MOVING INVERSION

002350 -

g%i 010030
2904 010030
2905 010036
ggg? 010040

22-FEB-84 15:22

032737
001405
012700
113701
000404

012700
113701
013703
074103

005046
150316
005046
153716
005046
150116
013746
010046
012746
012746

010600

000002

002476

010736

002450
010743
002451
002452

002452
002464

010551
000006

2%:
4:

THIS LINE

-- PRE-WRITE OR POST-WRITE:

BIT
BEQ
MOV
MOvVB
BR

oBIT1, TMPF
2
@TXT48A,RO

MOV
MOVB
MOV
XOR
PRINTX

@TXT488,R0
;POINT TO “POST" TEXT
TMP4.1,R1
iGET EXPECTED DATA (AFTER WRITING NEW VALUE)
TMPS,R3
iSETUP TO CALCULATE XxOR
R1,R3
iCALCULATE XOR OF
'©ECTED & ACTUAL DATA
oFMT48G,RO,TMPA,<B,R1>,<
TMPS>.
B,
~8> ;PRINT STANDARD DATA LINE

TMP4 ,R1
43

:DID PRE-WRITE ERROR CALL GET US HERE?
iNO, THEN SETUP FOR “POST” IN ERROR MESSAGE
:YES, SETUP FOR "“PRE"” IN ERROR MESSAGE

$GET EXPECTED DATA (BEFORE WRITING NEW VALUE)

CLR
B8ISB
CLR
8ISB
CLR
8ISB
MOV
MOV
MOV
MOV
MOV

-(SP)
R3,(SP)
-(SP)
TMPS,(SP)
-(SP)
R1,(SP)
TMPA, -(SP)
RO, -(SP)
oFMTA8G, -(SP)
26, -(SP)
SP,RO

H6
CNDMAAO DMV11 MCTRL DIAG @1
ERROR HANDLER -- ERR48

010142

104415

010144

062706

2922 010156

001433

2921 010150
2923
2924 010160
2925 010164
2926 010170
2927 010174

2928 010176

2929 010202

2930 010204
2931 010210
010210
010212
010216

010220
010222

010226
010232
010236
010240
010242
2932 010246

2933 010254
2934 010256
010256
010262
010266
010270

010272

2935 010276
2936 010276

2937

2938
2939
2940
2941
2942
2943
2944
2945

2946
2947
2948
2949
2950
2951
2952
2953
2954

010300
010347
010402
010437
010506
010551
010611
010644

010736
010743
010750
010755

032737

013701
042701
005737
001003

MACRO M1200

000016

000004

012700

010755

012746
012746

010600
104415
062706

002350

120
120
040
102

10%:

010644
000001
000004

60$:

$;SETUP FOR PRINTING OF EXTENDED INFORMATION
:DATA BIT VALUE (0 OR 1)
+ MAKE SURE WE ONLY HAVE ONE BIT
+DIRECTION?
;BACKWARD --

MOV
PRINTX

116
123
116
116
123
116
123
116

122
117
106
113

045
065
045
045
065
045
066
045
105
123
127
127

@TXT48C,.RO

:FORWARD - - -

#TXT48D,R0O
;BACKWARD -OFMT48H,TMPB,R1,R0,<B,TMP9>
;PRINT EXTENDED INFORMATION
CLR
-(SP)
BIS8
M2,057
)
MOV
RO, -(SP)

002467

#FMT48I, -(SP)
21,-(SP)
SP,RO
CS$PNTX
%4,5P

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

\wNwS2#APRE OR
(ALL VALUES IN OCTALIN\
\wSSEAEXTENDED INFORMATION:\
\wNwS3#APOST
RAM
SHOULD\
\wNwS2#AWRITE
ADDRESS
BE
IS
XOR\
\wSS5#ABIT
DATA
SEQ
LSB(DECIMAL)\
\#NeS3sTHS4%04%S4%03%S3I03852%03\
\#S6%01%SS#01%S38THS28D2A
.\
\wNeNwSS#AFURTHER DATA LINES SUPRESSED UNTIL NEW TEST DATA\

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
BEX

P4t

;ANY MORE LINES FOR A WHILE.
SO,
:
PUT OUT A MESSAGE TO THAT EFFECT.
MOV
MOV
MOV
TRAP

RTS

TXT48A:
TXT488:
TXT48C:
TXT48D:
.LIST
.EVEN

FMT48A:
FMT4A8B:
FMTA8C:
FMT4B8E:
FMT48F:
FMT48G:
FMT4A8H:
FMT48I:

ER48CT,ERA8MX
604
&FMTA48I

R1,-(SP)
TMPB, -(SP)

MOV
#FMTA8H, -(SP)
MOV
#5,-(SP)
MOV
SP,RO
TRAP
CSPNTX
ADD
214,SP
:IF THESE TWO ARE EQUAL, WE WON'T BE PRINTING

ADD

BEX

.SBTTL

2957 010762

CMP
BNE
PRINTX

.NLIST

010146
113701

TMPC,R1
@+CBITO,R1
TMPD
64

MOV
MOV

010026

016,5P

MOV
8IC
TST
BNE

10$

002466
010611
000005
000014
010024

C$PNTX

s IF EXTENDED INFORMATION REQUESTED,

BEQ

6$:
8s$:

ADD

o8IT2,PFLAG

002462

gggz

010762
2958 010762
2959 010764

’

BIT

MOV

000207

045
045
045
045
045
045
045
045

SEQ 0072

TRAP

002470
177776
002472

010750

005046
153716
010046
010146
013746
012746
012746
010600
104415
062706
023737
001010

PAGE 40-10

-- FOR DATA ERRORS IN "MOVING INVERSION

012706

000402

22-FEB-84 15:22

\PRE \
\POST\
\ FWD\
\BKWD\

ERROR HANDLER -- ERRS0 -- FOR REPORTING TIMER & 1 ERRORS
PRyt

BGNMSG

ERRS0

MOV
MOVB

R1,-(SP)
TMPB+1,R1

:SAVE R1 FOR CALLER
sGET THE MODE LAST SETUP

ERRS0::

RSP

CNDMAAO DMV11 MCTRL DIAG @1
ERROR HANDLER
2960
2961
2962
2963
2964
2965
2966
2967
2968
2969

-- ERRS0

010770

000241

010772
010776
011000
011002

042701
106101
106101
106101

MACRO M1200

FOR REPORTING

TIMER

22-FEB-84
@

PAGE 40-11

SEQ 0073

ERRORS

CcLC
177477

15:22

BIC

ROLB
ROLB
ROLB

$SEEING AS THE CARRY BIT WILL BE ROTATED INTO

;sTHE DATA, WE HAD BETTER CLEAR IT JUST IN CASE.
9tC<BIT6+BIT7>,R1 ;LOOK & JUST THE TIMER 1 MODE DEFINITION

R1
R1
R1

tPOSITION IT FOR PRINTOUT

s IDENTIFY THE MODE BEING USED AT THE TIME:
011004
011004
011006
011012
011016
011020

011022

2970
2971
2972 011026
011026
011032
011036
011040
011042
2973
2974
2975 011046
011046
011050
011054
011056
011062
011064

011070
011072
011076
011102
011106
011112
011114
011116
2976 011122

011122
011124
011130
011132
011136
011142
011146
011150
011152

2977
2978
2979 011156
011156
011160
011164

PRINTX

010146
012746
012746
010600
104415

012747
000002

062706

000006

012746
012746
010600
104415
062706

013021
000001

005046
153716
005046
153716
005046
153716
005046
153716
012746
012746
012746
010600
104415
062706

005046
153716
005046
153716
012746

012746
010600
104415
062706

005046
153716

005046

&FMTSOA,R1

000004

MOV

R1, -(SP)

MOV
MOV
TRAP
ADD

@2,-(SP)
SP,RO
CSPNTX
96,5P

MOV

;PRINT THE HEADING TO IDENTIFY THE REGISTERS:
PRINTX

&FMTS508

MOV
MOV
MOV

:AND THE VALUES THAT WFRE LOADED INTO THE REGISTERS:
PRINTX

TRAP
ADD

CLR
BISB
CLR
BISB
CLR
8ISB
CLR

002457
002451

002453
014053

013102
000006

PRINTX

-(SP)

TMP6+1,(SP)

(SP)

TMP7+1.(SP)
(SP)

TMP4.+1,(SP)
-(SP)
TMPS+1,(SP)
@TXT80, -(SP?
@FMTS0C, -(SP)
96, -(SP)
SP,RO
CS$PNTX

-(SP)

TMPE+1,(SP)

-(SP)

002467
013142
000003

SP,.RO

CSPNTX
;AND THE VALUES READ FROM THOSE
PRINTX

002454

CSPNTX
#4,5P

016,SP

@FMTSOD,
<B

002475

000010

oFMTS08, -(SP)
e1,-(SP)
SP,RO

@FMTSOC,4TX78D,<B,TMPS5+1>,<B,TMP4+1>,<B,TMP7+1>,<B,TMP6+1>

002455

000016

#FMTSOA, -(SP)

#10,SP

REGISTERS:

@oFMTSOC,#TXT8E,<B,TMPS>,<B,TMP4> ,<B,TMP7>,<B, TMP6>

CLR

BISB
CLR

-(SP)

TMP6, (SP)

(SP)

CNDMAAO DMV11 MCTRL DIAG #1
ERROR HANDLER
011166
011172
011174
011200
011202
011206

-- ERRS0

153716

FOR REPORTING

22-FEB-84

TIMER &

15:22

PAGE 40-12

SEQ 0074

1 ERRORS

002456

BISB
CLR
BISB
CLR
BISB

002450
002452

014070
013102

011212
011216
O11222
011224
011226
2980 011232
011232

000006

000016

PRINTX

&FMTSOE,<B,TMPB>,<B,
TMPD>

011240
011242
011246
011252
011256
011260
011262

104423

012072

ADD

#16,5P

TRAP
ADD

000010

004737
012601

OTXT8E, -(SP)
#FMTSOC, -(SP)

CLR
BISB
CLR
BISB
MOV
MOV
MOV

002466
013157
000003

JSR
MOV

ENDMSG

PC,NULERR
(SP)+,R1

TMP7,(SP)
-(SP)
TMP4,(SP)
-(SP)
TMPS,(SP)

MOV
MOV
MOV
MOV

TRAP

002472

011234

2981
2982 011266
2983 011272
<84 011274
011274
011274
2985
2986

MACRO M1200

#6,-(SP)
SP,.RO
CS$PNTX

-(SP)
TMPD,(SP)
-(SP)
TMPB,(SP)
#FMTSOE, -(5P)
#3,-(SP)
SP,RO
CS$PNTX
#10,SP

;sUSE COMMON ROUTINE TO TERMINATE ERROR MESSAGE
sRESTORE R1 FOR CALLER
L10015:

TRAP

C$MSG

IK6
CNDMAAO DMV1l MCTRL DIAG 21

MACRO M1200

22-FEB-84

15:22

PAGE 41

SEQ 0075

ERROR HANDLER SUBROUTINES

.SBTTL

2988
2989
2990

ERROR HANDLER SUBROUTINES

-------

2991
2992

2993

2994
2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012

SUBROUTINES USED ONLY BY ERROR MANDLERS

ERROR HANDLER SUBROUTINE
PERFORM EXCLUSIVE OR BETWEEN
THE RESULT IN “XDATA"

011276
011300

011304

011312

011316
011320

011322
011322
011326
011332
011336
011342
011344
011346
3013 011352
011352
011354
011360
011362
011366
011370
011374
011376
011402
011406
011412
011414
011416
3014 011422
011422
011426
011432
011436
011440
011442
3015 011446
011446
011450
011454

010146
013701
013737
074137
012601
000207

002310

002312
002314

002314

MOV
MOV
MOV
XOR
MOV

RTS

R1, -(SP)
GDATA,R1
BDATA, XDATA
R1,XDATA
(SP)+,R1
PC

----------ccccccnccana-

XORGB

"GDATA" &

"BDATA" PUTTING

;PRESERVE WORKING REGISTER
+GET “GOOD" DATA
:AND "BAD" DATA
;PERFORM EXCLUSIVE OR
;+RESTORE R1
;sRETURN

ERROR HANDLER SUBROUTINE

-- ERR4$

IDENTIFY € DUMP THE BYTE SELECT REGISTERS
012746
012746
012746
012746
010600

013253
013454
012245
000003

062706

000010

104415

005046
153716
005046
153716
005046

153716
005046
153716
012746
012746
010600
104415
062706
012746
012746
012746
010600
104415
062706

&FMT4,8TXT3,8TXT1

PRINTX

&FMT4A,<B,BSRO>,<B,BSR1>,<B,BSR2>,<B,BSR3>

002252
002250

002246
012305
000005

000014

PRINTX

002264

SP,RO

CS$PNTX
10,SP

CLR
BISB
CLR
8ISB
CLR
8ISB
CLR
BISB
MOV

-(SP)
BSR3,(SP)
-(SP)
BSR2,(SP)
-(SP)
B8SR1,(SP)
-(SP)
BSRO,(SP)
OFMT4A, -(SP)
SP,RO

TRAP
ADD

CSPNTX
214,5P

MOV

&FMT4B, -(SP?

&FMT4B,&TXT2

MOV

PRINTX

#TXT1,-(SP)
@TXT3,-(SP)
#FMT4, -(SP)

TRAP
ADD

MOV

013311
012340
000002
000006

MOV
MOV
MOV
MOV

002254

005046

153716
005046

PRINTX

#FMTAC,<B,BSR4>,<B,BSR5>,<B,BSR6>,<B,BSR7>

SP,RO

TRAP
ADD

CSPNTX
%6,SP

CLR
BISB
CLR

-(SP)
BSR7,(SP)
-(SP)

CNDMAAO DMV1l MCTRL DIAG #1
ERROR HANDLER SUBROUTINE
011456
011462
011464
011470
011472
011476
011502
011506
011510
011512

3016 011516
011516
011522
011526
011532
011534
011536
3017 011542
011542
011544
011550
011552

011556
011560
011564
011566
011572
011576
011602
011604
011606
3018 011612
011612
011616
011622
011626
011630
011632

3019 011636

011636
011640
011644
011646
011652
011654
011660
011662
011666

011672
011676
011700
011702
3020 011706
3021
3022
3023

3024

153716
005046
153716
005046
153716
012746
012746
010600
104415
062706

012746
012746
012746
010600
104415
062706
005046
153716
005046
153716
005046
153716
005046
153716
012746
012746

010600
104415
062706
012746
012746
012746
010600
104415
062706

005046
153716
005046
153716
005046
153716
005046
153716
012746
012746
010600
104415
062706
000207

MACRO M1200

22-FEB-84 15:22

PAGE 41-1

SEQ 0076

-- ERR4S$
002262

002260
002256
012345
000005

000014
013353
012340
000002
000006

PRINTX

&FMTA4B,#TXT2A

PRINTX

#FMT4A,<B,BSR10>,<B,BSR11>,<B,BSR12>,<B,BSR13>

002274
002272
002270
002266
012305
000005

8ISB
CLR
8ISB
CLR
B8ISB
MOV
MOV
MOV
TRAP
ADD

BSR6,(SP)
-(SP)
BSRS5,(SP)
-(SP)
BSR4, (SP)
OFMTAC, -(SP)
#5,-(SP)
SP,RO
CS$PNTX
€14 ,5P

MOV
MOV
MOV
MOV
TRAP
ADD

OTXT2A, -(SP)
9FMT4B, -(SP)
#2,-(SP)
SP,RO
CS$PNTX
6,SP

CLR
BISB
CLR
B8ISB
CLR
8ISB
CLR
BISB
MOV

-(SP)
BSR13,(SP)
-(SP)
BSR12,(SP)
-(SP)
BSR11,(SP)
-(SP)
BSR10,(SP)
@FMT4A, -(SP)

MOV
TRAP
ADD

SP,RO
CS$PNTX
@14,SP

MOV
MOV
MOV
MOV
TRAP
ADD

@TXT28, -(SP)
oFMT4B, -(SP)
#2,-(SP)
SP,RO
C$SPNTX
#6,SP

CLR
BISB
CLR
BISB
CLR
BISB
CLR
8ISB
MOV

-(SP)
BSR17,(SP)
-(SP)
BSR16,(SP)
-(SP)
BSR15,(SP)
-(SP)
BSR14,(SP)
@FMTAC, -(SP)

MOV

000014
013412
012340
000002

000006

PRINTX

&FMT4B,4TXT2B

PRINTX

@FMTA4C,<B,BSR14>,<B,BSR15>,<B,BSR16>,<B,BSR17>

002304
002302
002300
002276
012345
000005

MOV
MOV
TRAP
ADD

000014

RTS
e
.

@5, -(SP)
SP,RO
CSPNTX
#14,SP

PC
i

s S

@5, -(SP)

4, e

g e

CNDMAAO DMV11 MCTRL DIAG #1
«essss+.ERROR HANDLER SUBROUTINE
3025
3026 011710
3027 011710
011710
011714
011720
011724
011730
011732
011734
3028 011740
011740
011744
011750
011754
011760
011764
011770
011772
011774
3029 012000
012000
012004
012010
012014
012016
012020
3030 012024
012024
012030
012034
012040
012044
012050
012054
012056
012060
3031 012064
3032 012070
3033
3034
3035
3036
3037 012072
012072
012076
012102
012104
012106
3038 012112
3039

MACRO M1200

M6
22-FEB-84

013504
013607
012245
000003

062706

000010

013746
013746
013746
013746
012746
012746
010600
104415
062706

002254
002252
002250
002246
012730
000005

012746
012746
012746
010600

013544
012340
000002

104415

104415
062706

013746
013746
013746
013746
012746
012746
010600
104415
062706
004737
000207

SEQ 0077

COMMON ERROR SUBROUTINE TO PRINT SELECT REGISTERS
PRINTX

&OFMT4,4TXT6,8TXT4

MOV

MOV
MOV
MOV

MOV

PRINTX

000014

PRINTX

000006

PRINTX

#FMT11,WSRO,WSR2,WSR4,WSR6

;DUMP

&FMT4B,#TXT4A

TRAP
ADD
THE SELECT REGISTERS
MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

&FMT11,WSR10,WSR12,WSR14,WSR16

002264
002262
002260
002256
012730
000005
000014
012072

g?g

SBTTL
012746
012746
010600
104414
062706
000207

PAGE 41-2

-- ERRSS$
éRRS‘

012746
012746
012746
012746
010600

15:22

012114

NULERR:

:E.NULERR

SUBROUTINE

PRINTB

#ENDEMB

000001

000004

RTS

#TXT74,-(SP)

#TXT6,-(SP)
OFMT4, -(SP)
#3,-(SP)
SP,RO
C$PNTX
10,SP

WSR6, -(SP)
WSR4, -(SP)
WSR2, -(SP)
WSRO, -(SP)
#FMT11, -(SP)
#5,-(SP)
SP,RO
C$PNTX
©14,5P

MOV
MOV
MOV
MOV
TRAP
ADD

#TXT4A, -(SP)
#FMT4B, -(SP)
#2,-(SP)

MOV
MOV
MOV
MOV
MOV

WSR16, -(SP)
WSR14, -(SP)
WSR12, -(SP)
WSR10, -(SP)
#FMT11, -(SP)

MOV
TRAP
ADD

SP,.RO
C$PNTX
#14,SP

MOV
MOV

#ENDEMB, -(SP)
21,-(SP)

SP,RO
CSPNTX
#6,SP

;USE COMMON ROUTINE TO TERMINATE ERROR MESSAGE

TO PERFORM

"“PRINTB

#ENDEMB"”

; TERMINATE ERROR MESSAGE

MOV
TRAP
ADD

SP,RO
CSPNTB
24 ,SP

PC
...............................................................

CNDMAAO DMV1l1 MCTRL DIAG ¢1

MACRO M1200

FORMAT SPEC'S FOR ERROR HANDLERS

3041

22-FEB-84

012124
012161
012245
012305
012340
012345
012400
012443
012530
012562
012571
012637
012654
012730
012747
013021
013102
013142
013157
013174

PAGE 42

SEQ 0078

"FMT___*

.SBTTL

012114
012121

15:22

FORMAT SPEC'S FOR ERROR HANDLERS
R

0ttt

rrt

sttt

"FMT___*

aressrnttrrvsssraccnssro

sssnacecssssassssssansss

aes

NLIST
BEX
ENDEMB: .ASCIZ
NEWLIN: .ASCIZ

/®NsN/
/#N/

FMTO2:
FMTO2A:
FMT4:
FMT4A:
FMT4B:
FMTAC:
FMTS:
FMTSA:
FMTO7:
FMTO6:
FMTO6A:
FMTO6B:
FMT10:
FMT11:
FMTSOA:
FMTSOB:
FMTSOC:
FMTS0D:
FMTSOE:
FMTSOM:

.ASCIZ
.ASCIZ
_ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/#NSAFAILING REG = STSASEL®O02/
/®#N$A
EXPECTED:
®O03%A
ACTUAL:
®03%A
XOR:
%03/
/#N$A
THE CONTENTS OF ALLSTSNST/
/#NwS1%03%SSH03¥SSH03%SSH03/
/wNwT/
/#N®SSHO3%SSH03¥SSH03¥SSK03/
/#N$A
WHEN %03wA LOADED INTO BS '.1/
/#NwA
ATTEMPTING “M-LOOP” FUNCTION CODE %02%A “%T#A)/
/%A
DETECTED IN STSTSA --/
/#NSNST/
/#NwTH03%S2%03%S2803%S2%03%52503%S2%03/
/#S2%03%S2%03/
/®N$A
EXPECTED:%08%A
ACTUAL :#08%A
XOR:%08/
/#NwOB8%08%08%08/
/#NwA
TIMER @ 1 MODE:
®O1%A
REGISTERS:/
/#NWS1SSATICH
TICL
TiLH
TiLL
ACR
IFR
IER/
/#N®S3%THS1%03%S3%03%S 3803853803/
/#S3%03%S9wN3/
/#S53%03%S3w03/
/#N2wS108A(TICH & T1CL MAVEN'T YET BEEN LOADED)/

.SBTTL

TEXT STRINGS FOR ERROR MANDLERS

116

116
116
116
116
116
116
116
116

101

116
116

116
116
116
116
116
123
123
116

jocssscnccncns
‘

yiporpagepr

-R

TEXT VOED OY GARDR MAMDLERE

...........................

TEU

.......................

TXT1
TXT2:
TXT2A:
TXT2B:
TXT3:
TXT4:
TXT4A:
TXTS:
TXT6

ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
ASCIZ

TXT?7A:
TXT8A:
TXT88:
TXT8C:
TXT8D:
TXT8E:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

7
/
/
/
/
/

014105
014111
014125
014142
014164
014205

TXTMLO:
TXTML1:
TXTML2:
TXTML3:
TXTML4:
TXTMLS:

.ASCIZ
.ASCIZ
.ASCI%‘
.ASCIZY
.ASCIZ
.ASCIZ

/NOP/
/READ 1 BYTE/
/WRITE 1 BYTE/
/NPR-OUT 256 BYTES/
/NPR-IN 256 BYTES/
/SET MICROPROCESSOR'S PC/

ASCIZ

/BSELO
BSEL1
BSEL2
BSEL3/
/
BSEL4
BSELS
BSEL6
BSEL7/
/BSEL10
BSEL1l
BSEL12
BSEL13/
/
BSEL14
BSEL1S
BSEL16
BSEL17/
/ BYTE
SELECT REG'S ARE:/
/
SELO
SEL2
SEL4
SEL6/
/
SEL10
SEL12
SEL14
SEL16/
/B/
/ SELECT REG'S ARE:/

/ REGISTERS
EXPECTED:
ACTUAL:
XOR:
LOADED:
READ:

<+ «--csrrosrcrsossncnsasansossanses

...........................

013253
013311
013353
013412
013454
013504
013544
013605
013607
013632
013717
014004
014021
014036
014053
014070

TXT7?

“TXT___*
I

ORB

T2CL
/
7/
’
7/
’

ORA

DDRB DDRA T1CL T1CH TiLL TILM /

T2CH SR

ACR

PCR

IFR

IER

ORA

CNDMAAO DMVLIL MCTRL DIAG o1

MACRO M1200

TEXT

STRINGS FOR ERROR MANDLERS

22-FEB-84 15:22

PAGE 42-1
SEQ 0079

“TXT___*

3098 014235
g?g: 014247

125
123

116
105

104
124

TXTML6:
TXTML7:

.ASCIZ
.ASCIZ

/UNDEF INED/
/SET MAINT INTR & CLR INTR DISABLE

3101 014327
3102 014345
3103 014351
3104 014355
3105 014362
3106 014367
3107 014374
3108 014401
3109 014406
3110 014413
3111 014420
3112 014425
3113 014430
3114 014434
3115 014440
3116 014444
3117 014450

126
117
117
104
104
124
124
124
124
124
124
123
101
120
111
111
117

111
122
122
104
104
061
061
061
061
062
062
122
103
103
106
105
122

101
102
101
122
122
103
103
114
114
103
103
000
122
122
122
122
101

TXxTVR:
TXTVRO:
TXTVR1:
TXTVR2:
TXTVRS:
TXTVR4:
TXTVRS:
TXTVR6:
TXTVR7:
TXTVR8:
TXTVR9:
TXTVRA:
TXTVRB:
TXTVRC:
TXTVRD:
TXTVRE:
TXTVRF:

.ASCIZ
.ASCIZ
,ASCIZ
.ASCIZ
,ASCIZ
,ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
_ASCIZ

/VIA REGISTER /
/ORB/
/ORA/
/DDRB/
/DDRA/
/TiCL/
/TiCWw/
/TiLL/
/TiLW/
/T2CL/
/T2CHW/
/SR/
/ACR/
/PCR/
/IFR/
/IER/
/ORA/

3118

IN CPU STATUS/

CNDMAAO DMV11 MCTRL DIAG @1
ERROR MESSAGES
3120
3121
3122
3123
3124
3125 014454
3126 014500
3127 014515
3128 014540
3129 014564
3130 014611
3131 014634
3132 014667
3133 014733
3134 015013
3135 015110
3136 015170
3137 015243
3138 015275
3139 015355
3140 015442
3141 015477
3142 015532
3143 015565
3144 015613
3145 015644
3146 015675
3147 015735
3148 016016
3149 016067
3150 016135
3151 016203
3152 016251
3153 016305
3154 016341
3155 016406
3156 016450
3157 016536
3158 016600
3159 016666
3160 016730
3161 017012
3162 017054
3163 017122
3164 017174
3165 017240
316€ 017305
3167 017354
3168 017417
3169 017471
3170
3171

- -

MACRO M1200

22- FEB-84

15:22

PAGE 43

SEQ 0080

uE"

ERROR MESSAGES

"EM___"

/MICRO-DIAG. FAILURE/
/MROY TIMEOUT/
/MASTER CLR FAILURE/

/CSR ADDRESS FAILURE/
/CSR DATA PAT FAILURE/

/BSELO SET=ALL ONES/

/EXTERNAL BUS RESET FAILURE/
/BAD CSR VALUE(S) AFTER MASTER CLEAR/
/"MRDY" DIDN'T GO LOW WHILE PROCESSING A COMMAND/

/DMV'S RAM LOC.

(CORRESPONDING TO BSELO) NOT PROPERLY WRITTEN/

/76502 WRITE FUNC., FAILURE AFTER "RUN" BIT IS SET/
/76502 STILL RUNNING AFTER "RUN” BIT CLEARED/
/VIA STATIC REGISTER ERROR/
/VIA STATIC REGISTER ERROR -- TIMMER NOT RUNNING/
/VIA STATIC REGISTER ERROR -- TIMMER CROSS TALK ERROR/
/REGISTER NOT PROPERLY ZEROED/

/ZEROING DOR8B EFFECTED DDRA/

/ZEROING DORA EFFECTED DDRB/

‘READ/WRITE DATA ERROR’

EMSOU:;
EMSOV:
EMSOW:
EMSOX:
EMSOY;
EMSOZ:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.EVEN

/UNEXPECTED "A" INTERRUPT/
/UNEXPECTED “B" INTERRUPT/
/RAM DATA ERROR ON INITIAL WRITE/

/RAM DATA ERROR ON RE -READ AFTER TEST AREA FILLED/
/RAM DATA ERROR -- MOVING INVERSIONS TEST/

\"“T1" FLAG NOT CLEARED BY LOADING TiLM\
\"T1" FLAG NOT CLEARED BY LOADING T1CH\
\“T1" FLAG NOT CLEARED BY READING T1CL\
\VIA'S T1CL NOT DECREMENTING\
\VIA'S T1CH NOT DECREMENTING\
\“T1” FLAG NOT SET ON TIMER 1 TIMEOUT\
\"T1" FLAG CLEARED BY READING T1CH\
\VIA'S TiLL IMPROPERLY LOADED BY WRITING T1CL @ ADDR 4\
\“T1" FLAG CLEARED BY READING TiLL\
\VIA'S TILH IMPROPERLY LOADED BY WRITING TiCH @ ADDR S\
\“T1" FLAG CLEARED BY READING TI1LM\
\“T1" FLAG NOT SET AFTER RE-LOADING T1CH & TIMEOQUT\
\"“T1" FLAG CLEARED BY LOADING TiLL\
\“T1"” FLAG NOT CLEARED BY LOADING T1CH\
\"PB7" W/IN VIA NOT SET ON TIMER 1 TIMEOUT\
\"“PB7" NOT SET AFTER TIMER 1 TIMEOUT\
\“PB7" NOT DRIVEN LOW BY LOADING T1CH\
\"“PB7" UNEXPECTEDLY MODIFIED BY TIMER 1\

\“T1" NOY RESET AFTER BEING CLEARED\
\"PC7" PREMATURELY SET DURING T1 COUNTDOWN\
\“PB7" NOT SET AFTER SECOND CYCLE\

CNDMAAO DMV11 MCTRL DIAG o1

MACRO M1200

TEXT ADDRESS TABLES FOR ERROR HANDLERS

3181 017554
3182 017574
3183
3184

15:22

PAGE 44

SEQ 0081

WTXT__ Tn

.SBTTL

3173

3174

3175
3176
3177
3178 017532
3179
3180 017552

22-FEB-84

TEXT ADDRESS TABLES FOR ERROR MANDLERS

"TxT__T~

014105

014111

014125

TXTMLT:

TXTMLO, TXTMLL, TXTML2, TXTMLS, TXTMLE, TXTMLS, TXTMLE, TXTML7

014327
014345
014413

014351
014420

014355
014425

TXTVRT:

TXTVR
TXTVRO, TXTVR1, TXTVR2, TXTVR3, TXTVR4, TXTVRS, TXTVR6, TXTVR7?
TXTVR8,TXTVR9,
TXTVRA, TXTVRB, TXTVRC, TXTVRD, TXTVRE , TXTVRF

LIST

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB 84

15:22

PAGE 45

SEQ 0082

LOAD DEVICE PROTECTION TABLE

gl:?

.SBTTL LOAD DEVICE PROTECTION TABLE

3188
3189

;/////////////////////’/////////////////////I/////////////////////////////////
i/ THIS TABLE IDENTIFIES THE LOAD DEVICE TO THE SUPERVISOR, SO THAT IT CAN BE

)

3190

i/ PROTECTED FROM TESTING.

3191
192

3193 017614
017614
3194 017614

3195 017616

3196 017620
3197 017622

IF DESIRED.

3///////////////////////////////////////////////////////////////

//////////////

BGNPROT

177777

.WORD

-1

sDON'T CHK CSR ADRS

177777

. WORD
ENDPROT

-1

;OON'T CHK DRIVE NO.

177777

.WORD

-1

;DOON'T CHK MASSBUS UNIT NO.

L$PROT::

CNDMAAO DMV1l MCTRL DIAG 1

MACRO M1200

22-FEB-84

15:22

PAGE 46

SEQ 0083

INITIALIZE SECTION
3199
3200
3201
3202
3203
3204
3205
3206 017622
017622
3207
3208 017622
017622
017626
017632
017636
017642
017644

.SBTTL INITIALIZE SECTION
;///////l'/////////////’////////////////////////////////////////

i/ THE INITIALIZE SECTION CONTAINS THE CODING THAT IS
PERFORMED
i/ AT THE BEGINNING OF THE TEST SEQUENCE ON THE NEXT
UNIT.

///////

|////////////////////////////////////I////////////////////////////////

BGNINIT
LSINIT::
012746
012746
012746
012746
104437
062706

3209
3210 017650
010637
3211
3212 017654
017654 - 012700
017660
104447
3213 017662
017662
103417
3214
3215 017664
017664
012700
017670
104447
3216 017672
017672
103435
3217
3218 017674
017674
012700
017700
104447
3219 017702
017702
103433
3220
3221 017704
017704
012700
017710
104447
3222 017712
017712
103401
3223 017714
000436
3224
3225 017716
000137
3226
3227 017722
3228
3229
3230
3231 017722
005037
3232 017726
017726
012746
017732
012746
017736
012746
017742
012746

SETVEC

000340

140,4170000,2340

;0DT ROM ADDRESS

000140
000003
000010

002324

MOV

SP,PSTACK

READEF

@EF .START

READEF

000037

STARST

C$SVEC
€10,SP

MOV
TRAP

QEF .START
RO
CSREFG

B8CS

STARST

©EF .RESTART

BCOMPLETE

RESTRT
L

:SEE IF THIS IS A NEW PASS, BR IF YES
READEF

000035

MOV

QEF .RESTART
RO

TRAP

CSREFG

B8CS

RESTRT

@EF .NEW

MOV

BCOMPLETE
READEF

000036

CSREFG

B8CS

NEMWST

@EF ,CONTINUE

MOV

BCOMPLETE

10¢:

GETPRM

JMP

CONTIN

STARST:

QEF .NEW,RO

TRAP

NEWST

;SEE IF PROGRAM WAS JUST CONTINUED

000000
020222
000004
000003

TRAP
ADD

: SAVE BASE-LEVEL STACK POINTER

:SEE IF PROGRAM JUST RESTARTED, BR IF YES

002346

;JB REV A-0
9340, -(SP)
€170000, -(SP)
#140,-(SP)

:SEE IF PROGRAM JUST STARTED, BR IF YES

BCOMPLETE

020122

MOV
MOV
MOV

10¢

tENTER HERE

$;(THIS IS TO FAR AWAY FOR A
IF

“BR"

OEF .CONTINUE
RO

TRAP

CSREFG

8CS

10¢

INSTRUCTION)

“START” COMMAND ISSUED

TEST FOR THE PRESENCE OR ABSENCE OF A CONSOLE TERMINAL.
CLR

SETVEC

CONSOL

;RESET THE CONSOLE TERMINAL FLAG

sSETUP BUS TIMEOQUT VECTFR

TO TES;OFOR A sgNS?%g)
V
MOV
MOV

MOV

e "\ 2
@CONTST, -(SP)
24, -(SP)

@3, -(SP)

CNDMAAO DMV11l MCTRL DIAG 1

MACRO M1200

22-FEB-84

15:22

PAGE 46-1

SEQ 0084

INITIALIZE SECTION
017746

017750
3233 017754
3234 017760
017760

3235
3236
3237
3238
3239
3240
3241
3242
3243
3244
3245
3246
3247
3248
3249
3250

017764

104437
062706
005737

TST
CLRVEC

012700
RESTRT:
005037

020012
020012
020016

CLR

NEWST :

012737
005237
012737

177777
002340
000001

020016
020022
020024
3251 020026
020026
3252 020030
3253 020034

013700
104442
010001

002322

006337
000766

002344

020036
020044

053737
006337

002344
002344

103403

MOV
INC

DEVMAP

MOV

0-1,LO0GDEV
FRSPAS

o8IT0,DEVPTR

sRESFT LOGICAL DEVICE TO -1
s IIWCREMENT NO. OF PASSES AFTER LOAD
sINIT DEVICE MAP BIT POINTER

; GET UNIBUS ADDRESS, VECTOR, PRIORITY LEVEL, SWITCH PACKS,

" INC

GPHARD

LOGDEV,R1

10s:

000020
002352

10$

;GET P-TABLE POINTER INTO R1

;xr UN-AVAILABLE,

BIS

DEVPTR,DEVMAP

;ELSE,

ASL

DEVPTR

12¢:

(R1)+,RO
016. ,R3
oMPCSR,R2
RO,(R2)+
RO
R3,12%

012100
010037
022020
010037

020104
020106
020110
020112
020114
020116

012100
006200
006200
006200
006200
010037

020122

THE CURRENT

“P-TABLE"

;GET THE DEVICE CSR ADDRESS
:WE HAVE TO SETUP THIS MANY ADDRESS POINTERS
:THIS IS THE ADDRESS OF THE FIRST POINTER
:SETUP ONE CSR POINTER
sPOINT TO THE NEXT CSR ADDRESS
;LOOP AS LONG AS THERE ARE MORE TABLE ENTRIES
;ELSE,

FALL

THROUGH TO CONTINUE GETTING MORE

P-TABLE DATA

(R1)+,RO
RO,MPIVEC

:GET INTERRUPT VECTOR
;SETUP “A” VECTOR POINTER

002414

MOV

RO, MPOVEC

;SETUP "B* VECTOR POINTER

MOV

RO
RO
RO

MOV

RO,MPRIOR

ASR

Co2416

CONTIN:

(R1)+,RO

ASR
ASR
ASR

RO,R1
e

C$GPHRD

SET BIT FOR THIS DEVICE IN DEVICE MAP

MOV
MOV

(RO)+,(RO)+

MOV
s

SHIFT DEVICE MAP BIT POINTER

002412

CMP

LOGDEV ,RO

TRAP

:SHIFT DEVICE MAP BIT POINTER

;
020070
020072
020076
020100

MOV

AND SKIP THIS DEVICE

"R1” WAS RETURNED WITH A POINTER

MOV
MOV
MOV
MOV
INC
s08

;BR IF DEVICE AVAILABLE

DEVPTR

GE TPRM

TEST

; INCREMENT LOGICAL DEVICE NUMBER

ASL

B8R

012100
012703
012702
010022
005200
077303

LOGDEV

BCOMPLETE

002342

CS$CVEC

;ENTER MERE BEFORE EACH TEST

002322

002344

010,5P

“RESTART” COMMAND ISSUED

&Erpggnuecron INFORMATION FOR THIS LOGICAL DEVICE
002322

020050
020052
020056
020062
020064
020066

;ENTER HERE

C$SVEC

;TRY TO ACCESS THE CONSOLE TERMINAL'S “XCSR”
{WE SHOULD BE THROUGH WITH THIS BY NOW
MOV
#4 ,RO

;CLEAR osvxce MAP

002342

017772
017772
020000
020004

80177564
04

TRAP

017766

ADD

104436

005237

3254
3255
3256
3257
3258
3259
3260
3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277
3278
3279
3280
3281

TRAF

000010
177564

;ADD 4 TO VECTOR TO GET ADDRESS OF

“8“ VECTOR

;GET DMV11 DEVICE PRIORITY
RE -POSITION IT

;SETUP OUR VARIABLE FOR

;ENTER HERE WHEN A

INT.

VECTOR

“CONTINUE*“ COMMAND IS ISSUED

INIT'S

H7
CNDMAAO DMV1l MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE 46-2

SEQ 008S

INITIALIZE SECTION

013746
012746
013746
012746
104437
062706
005037

SETVEC

002416
005152
002412

@QOMPIVEC,O®MPIHAN,34MPRIOR

;SETUP

000010
005222

013746
012746
013746
012746
104437
062706
005037
005037

002416
005224
002414
000003

012737

000001

INT,

CLR
SETVEC

000010
005274
002330

CLR
CLR

MOV
MOV
MOV
MOV

TRAP
ADD

THOLNK
INTWCH

177777

002346

sssan

C$SVEC
#10,SP

SMPRIOR, -(SP)
OMPOHAN, -(SP)
SOMPOVEC, -(SP)
@3,-(SP)
CS$SVEC
#10,SP

;WE DON'T WANT THE HANDLER TO LINK ELSEWHERE
;RESET "INTERRUPT WATCH” FLAGS (BOTH "A” & "B")

SUBROUTINES USED BY

sMARK FLAG FOR NEXT
“INIT” CODE

TIME
L

THROUGH
o
|

TRAP

CSINIT

“INIT"” CODE sssss

INTERRUPT HANDLER FOR CONSOLE TERMINAL PRESENCE TESTING

CONTST: MOV

RTI

@-1,CONSOL

;

AMMPRIOR, -(SP)
OMPIHAN, -(SP)
SOMPIVEC, -(SP)
03,-(SP)

IHILNK
;WE DON'T WANT THE HANDLER TO LINK ELSEWHERE
Q4MPOVEC,#MPOHAN,a#MPRIOR
;SETUP “B" INT. VECTOR

MOV
#1,FRSTIM
ENDINIT
;END OF

002336

VECTOR
MOV
MOV
MOV
MOV

TRAP
ADD

104411

012737
000002

"A”

000003

3282
3283 020122
020122
020126
020132
020136
020142
020144
3284 020150
3285 020154
020154
020160
020164
020170
020174
020176
3286 020202
3287 020206
3288
3289 020212
3290 020220
020220
020220
3291
3292
3293
3294
3295
3296 020222
3297 020230
3298

s INDICATE
;RETURN

THAT NO CONSOLE

TERMINAL EXISTS!

CNDMAAO DMV11 MCTRL DIAG @1
AUTO DROP UNIT

MACRO M1200

22-FEB-84

15:22

PAGE 47

SEQ 0086

SECTION

ggg?

.SBTTL AUTO DROP UNILIT SECTION

3302

$//IIIIIIIII 207 8IP 77 7207070777707 707770777077777777777777777777777777/7/777777

3305
3306
330’
3308

s/ /7777708777777 7722707777277077277277027027727777077777777707727772770777777772727707777/72/7777

3303
3304

:/ THE AUTO DROP CODING DETERMINES WHETHER OR NOT
i/ WAS JUST OBTAINED IS READY FOR TESTING, AND IT

HEd 2080828000200 2084004000032000880000000000080000004008000000000800000000000000000002

3309
3310
3311

:
:
:

gglg

3314

BGNAUTO

020232
3317 020232
020232
020236
020242
020246
020252
020254

012746
012746
012746
012746
104437
062706

3322 020274
3323 020276
gggg 020300

105723
006302
103375

005037
012702
013703

3326 020302° 013703
3327 020306 - 012702
3328 020312
005723

3330 020316

gggé 020320

3333 020322
020322
020326
3334 020330
3335 020334
3336 020336
020336
020342
3337 020344
3338 020346
020346
020346
3339 020350
3340 020354

THIS ALGORITHM IS THE SAME AS TEST & 1 EXCEPT THAT TEST 1
WILL JUST REPORT THE FAILURE AND GO ON -- THIS ROUTINE WILL CAUSE THE
DEVICE TO BE DROPPED IF A BUS-TIMEOUT OCCURS WHEN ANY OF THE CSR'S
ARE ACCESSED WITH EITHER A "TST” OR "“TSTB” INSTRUCTION.

3 - ~28280803800200000200400802000000008002000008000000003000480000200000000000000000

3315
3316 020232

3318 020260
3319 020264
gggg 020270

THE DEVICE WHOSE P-TABLE
IS DROPPED IF NOT READY.

000000
020350
000004
000003
000010
002440
000001
002352
1$:

002352
000001

006302

2s:

006302

103374

000004

013700
104451
000240

002322

104461
050237
000002

CLR
MOV
MOV

TMPO
21,R2
BSELO,R3

TSTB
ASL
BCC

(R3).
R2
1s

sACCESS

MOV
MOV
TST

BSELO,R3
#1,R2
(R3).

sRE-INIT ADDRESS POINTER
sRE-INIT FLAG BIT
sACCESS THE CSR'S BY WORDS.

ASL

BCC

012700
104436
005737
001403

002440

AD.OK:

002440

AD.HIT:

LSAUTO::
INVALID-ADDRESS TRAP VECTOR
MOV
MOV
MOV
MOV
TRAP
ADD
sINITIALIZE TRAP FLAG REGISTER
sFLAG BIT
s INIT ADDRESS POINTER

SETVEC

sSETUP

THE CSR'S By

BYTES.

CLRVEC

¢4

;RESTORE

TST
BEQ
DODV

TMPO
AD. 0K
LOGDEV

;OID WE GET HIT
:NO,
EXIT TEST
s YES, DROP THIS LOGICAL DEvV.

NOP
ENDAUTO

BIS
RTI

20, -(SP)
#AD.HIT, -(SP)
04,-(SP)
#3,-(SP)
C$SVEC
€10,SP

THE VECTOR

TO DS

MOV
24 ,RO
TRAP
CsCVvEC
WITH AN INVALID ADDRESS TRAP?

;(FOR PATCHING

IN A HALT

MOV
TRAP
IF NECESSARY)

L10020:
R2, TMPO

;FLAG THE
sRETURN

HIT

WE GET

IT!

TRAP

LOGDEV,RO
CsDODu

CSAUTO

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84

15:22

PAGE 48

SEQ 0087

CLEANUP CODING SECTION
3342
3343
3344
3345
3346
3347
3348
3349 020356
020356
3350 020356
020356
020362
3351 020364
020364
020370
3352 020372
020372
020372

.SBTTL CLEANUP CODING SECTION
gaagaaiaaniinnniiiggy

i/ THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED
i/ AT THE END OF THE TEST SEQUENCE ON A PARTICULAR UNIT,

/1110770777777 77770777777077 0777720020777 777777777077777727727777777777777

BGNCLN
013700
104436

002412

013700
104436

002414

104412

CLRVEC
CLRVEC

@oeMPIVEC

LSCLEAN:
:

;RETURN VECTORS TO SUPERVISOR

@oMPOVEC

MOV

CSCVvEC

MOV

S9MPOVEC,RO

TRAP

CSCLEAN

TRAP

ENDCLN

L10021:

aoMPIVEC,RO

TRAP

CsCveC

CNDMAAO DMV11 MCTRL DIAG @1

I<7
MACRO M1200

22-FEB-84

15:22

PAGE 49

SEQ 0088

DROP UNIT SECTION
3354
3355
3356
3357
3358
3359
3360
3361 020374
020374
3362
3363 020374
020374
3364 020376
020376
020376

.SBTTL DROP UNIT SECTION
;/////////////////////'///////////////////////////////////////////////////////

i/
i/

THE DROP-UNIT SECTION CONTAINS
TO NO LONGER BE TESTED.

THE CODING

THAT

CAUSES A DEVICE

3//////////////////////////////////////////////////////////////////////////

BGNDU

: ISSUE UNIBUS RESET TO CLEAN ULP
104433
104453

i
LS$DU:
:

BRESET
ENDDU

L10022:

TRAP

CSRESE

TRAP

Ccsov

CNDMAAO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB-84 15:22

PAGE SO

’

SEQ 0089

ADD UNIT SECTION
gggg

.SBTTL ADD UNIT SECTION

3368

3369
3370
3371
3372
3373
3374 020400
020400
3375 020400

020400
020400

/1177777777777 77777777277772777777272727777727727277727272272772772772777277777272777

i/ THE ADD-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE
i/
TO BE (A) TESTED FOR THE FIRST TIME, OR (B) RESUMED IN TESTING.
IF
i/
"EF .AUNIT” IS SET, THE UNIT WILL BE TESTED AS A NEW UNIT.
$/ 117777777777 777772772727777777277727777227272772777727272727277272727277272727277277272777

BGNAUV

104452

ENDAU

L$AU:

L10023:

TRAP

C$AU

M7
CNDMAAO DMV11 MCTRL DIAG #1
TEST 1

MACRO M1200

22-FEB-84

15:22

PAGE 51

SEQ 0090

-- DMV-11 AVAILABILITY
.SBTTL TEST 1

3393

-- DMV-11 AVAILABILITY

1022828004000 0000004 A8 020200000000 000 0000400000802 000000500400 0000 0000000000
14

TEST 1 -- DMV-11 AVAILABILITY

:# EACH NORMALLY USED CSR IS ACCESSED WITH A “TST” OR “TSTB” INSTRUCTION AND IF
;% A BUS TIMEOUT OCCURS ( INTERRUPT & VECTOR ADDR 4) A FLAG WILL BE SET SHOWING
:# WHICH CSR ADDR AND INSTRUCTION FAILED. “T1.HSW” REFLECTS “TST” INSTRUCTIONS
;4 AND “T1.HSB" REFLECTS “TSTB” INSTRUCTIONS.

EXAMPLES:

IF “TST8

(NOTE: ONLY EVEN BITS IN “T1.HSW” CAN BE SET).

14
F

IF “TST

@&BSEL1"

FALLS,

BIT @ 1 OF “T1.HSB” WILL BE SET.

®SEL4" FAILS, BIT @ 4 OF “T1.HSW" WILL BE SET

THE FLAG WORDS ARE OUTPUT IN BINARY AS “EXTENDED ERROR INFORMATION".

: BB 282888808808030808088288804008800848
0002800002000 00 0000000040040 00 00000000400
H

3394
3395
3396
3397

020402
020402
020406
020412
020416
020416
020422
020426
020432
020436
020440

005037
012702
013703
012746
012746
012746
012746
104437
062706

020444
020446
020450

105723
006302
103375

020452
020460
020464
020470

013737
005037
012702
013703

020474
020476
020500
020502

005723
006302
006302
103374

020504
020504
020510
3414 020512
020516
020520
020524
3418 020526

CLR

020546

MOV
MOV
SETVEC

002352

T1.HSW

01.R2
BSELO,R3
©4,0T1.HIT,00

;INITIALIZE TRAP FLAG REGISTER

{FLAG BIT FOR BYTE ACCESSED CSR O.
;INIT ADDRESS POINTER
;SETUP INVALID-ADDRESS TRAP VECTOR
:

020540
000004
000003
000010

18:

20, -(SP)
oT1.HIT, -(SP)

MOV

@3, -(SP)

TSTB

020550

002352

2s:

020546

;ACCESS THE CSR'S BY BYTES.

MOV
CLR
MOV
MOV

T1.HSW,T1.HSB
T1.HSW
01.R2
BSELO,R3

;MOVE BYTE INTERRUPT FLAG TO PROPER LOCATION.
s INITIALIZE TRAP FLAG REGISTER
:FLAG BIT FOR WORD ACCESSED CSR O.
:RE-INIT ADDRESS POINTER

(R3)+

;ACCESS THE CSR'S BY WORDS.

ASL
ASL

R2
R2

8CC

CLRVEC

TST
BNE

T1.HSW
3

BEQ

T1.0K

020550

(R3)s

C$SVEC
210,SP

ASL

BCC
020546
020546

MOV
MOV
TRAP
ADD

012700

104436
005737
001003
005737
001404

BGNTST

GEDF

T1.HSB

T1.EWD,T1.EM1

;RESTORE THE VECTOR TO DS

MOV
TRAP
;DID WE GET AN INVALID ADDRESS TRAP?
1 YES, REPORT FAILURE

;YES, REPORT THE ERROR

;

"DEVICE FATAL" ERROR & 9

24 ,RO
C$CVEC

CNDMAAO DMV1l1 MCTRL DIAG #1
TEST

22-FEB-84 15:22

PAGE 51-1
SEQ 0091

-- DMV-11 AVAILABILITY

020526
020530
020532
020534
3419 020536
020536

104455
000011
020670
020552
104401

3421 020540
g:gg 020544

050237
000002

3424 020546
3425
3426
3427 020550
3428
3429
3430 020552
020552
3431 020552
020552
020556
020562
020566
020570
020572
3432 020576
020576
020602
020606
020610
020612
3433 020616
020616
020622
020626
020630
020632
3434 020636
020636
020642
020646
020652
020656
020660
020662
3435 020666
020666
020666
3436
3437
3438 020670
3439 020717
3440 021001
3441 021034

3442 021106

’
T1.0K:

2420 020536

3443

MACRO M1200

ENDTST

TRAP
.WORD
.WORD
.WORD

CS$ERDF
9
T1.EHD
T1.EM1

TRAP

CSETST

L10024:

020546

+1.HIT: BIS
RTI

R2,T1.HSW

:FLAG THE HIT IF WE GET IT!
:RETURN

000000

T1.HSW:

.WORD

000000

T1.HSB:

.WORD

BGNMSG

T1.EM1

s INVALID ADDRESS TRAP FLAG WORD:
iBITS SET INDICATE TRAPS ON WORD ACCESSES
:(BIT & SET = CSR # THAT FAILED)
s INVALID ADDRESS TRAP FLAG WORD:
:BITS SET INDICATE TRAPS ON BYTE ACCESSES
:(BIT @ SET = CSR & THAT FAILED)

PRINTB

&T1.1,MPCSR
'

PRINTX

eoT1.2

013746
012746
012746
010600
104414
062706
012746
012746
010600
104415
062706

002352
020717
000002
000006
021001
000001
000004

012746
012746
010600
104415
062706

021034
000001

013746
013746
012746
012746

020550
020546
021106
000003

010600

104415
062706

T1.EM1::

: IDENTIFY ERROR AND ON WHAT DEVICE
MOV
MPCSR, -(SP)
MOV
aT1.1,-(SP)
MOV
02,-(SP)
MOV
SP,RO
TRAP
C$PNTB
ADD
@6,SP
+ IF REQUESTED, ALSO INDICATE MISSES (TRAPS)

PRINTX

&T1.3

000004

PRINTX

#T71.4,T1.HSW,T1.HSB

000010

L10025:

104423

045

a11.2,-(SP)
e1,-(SP)
SP,RO
CSPNTX
#4,SP

MOV
MOV
MOV
TRAP
ADD

#71.3,-(SP)
@1, -(SP)
SP,RO
CSPNTX
04,5P

MOV
MOV
MOV
MOV

T1.HSB, -(SP)
T1.HSW, -(SP)
T71.4,-(SP)
@3,-(SP)

TRAP
ADD

CSPNTX
#10,SP

TRAP

CsMSG

MOV
ENDMSG

101
045
045
045

MOV
MOV
MOV
TRAP
ADD

126
116
116
116

116

101
045
062
045

062

NLIST
T1.EHMD:
T1.1:
T1.2:
T1.3:

BEX
.ASCIZ
.ASCIZ
.ASCIZ

LIST

BEX

T1.4;

ASCIZ

.ASCIZ

'AVAILABILITY TEST (o01)'
'wNw®ADMV-11 @ #OsA NOT RESPONDING TO CSR ACCESSING'
'wN2#S21%ASEL 0wS11wABSEL o'
'wNwS1S#AE C A 8 6 4 2 0
FEDCBA9876543210'

'#N2#A

TRAP FLAGS:%B16%52%B16"

SP,RO

CNDMAAO DMVI1 MCTRL DIAG o1
TEST

3444

DMV-11

MACRO M1200

AVAILABILITY

.EVEN

22-FEB-84 15:22

PAGE 51-2

CNDMAAO DMV1I1 MCTRL DIAG o1

MACRO M1200

22-FEB-84 15:22

PAGE S2

;

TEST

MASTER CLEAR,

RUN MICRODIAGNOSTICS

3461

SEQ

0093

.SBTTL TEST 2 -- MASTER CLEAR, RUN MICRODIAGNOSTICS
10000800000 000000000000000000000000000000000000

000000000000000000000000000008408

TEST 2 -- MASTER CLEAR, RUN MICROTDIACMOSTICS

1¢ A MASTER CLEAR IS ISSUED

TO THE DMV-11,

AND THE PROGRAM ALLOWS SUFFICIENT

1 TIME FOR THE MICRODIAGNOSTICS TO BE PERFORMED. TMESE MICRODIAGNOSTICS RESIDE
1 IN 6502 PROGRAM MEMORY,
AND
THOROUGHLY VERIFY THE OPERATION OF THE 6502
1* MICROPROCESSOR CHIP. THEN, THEY CHECK OUT THE DATA RAM, THE 6502'S ACCESS T0

THE

CSR'S,

AND

PERFORM

SIMPLE MESSAGE

i1* USYRT, WITH INTERNAL LOOPBACK.

TEST

USING

THE

6522 CHIP AND

THE

3 e

3¢ NEXT, THE LSI-11 PROGRAM READS THE THE CSR'S (SELO-SEL6) AND CHECKS THEM FOR

THEIR EXPECTED INITIALIZED

STATES.

AN ERROR MAS OCCURRED

IN THE MICRO-

1 DIAGNOSTICS THE NUMBER OF THE FAILING TEST WILL BE FOUND IN SEL4, AND RUN
3¢ (BIT 7) WILL NOT BE SET IN BSEL1.
.

:--0to.oooooooooo.oo.oooooo.ooooooocoooco‘ooooooooooooooooo.oooooooooo.ooooooo
H

3462
33:22

021146

3465 021146
3466 021152
3467 021154
021154

SS:gg 021156

3470

3471
3472
3473
3474

T2::

+ ISSUE A MASTER CLEAR, AND DELAY FOR MICRO-DIAGNOSTICS TO COMPLETE By CALLING
:+ SUBROUTINE MASCLR,
)
004737
103002

JSR
8CC
ERROR

000436

005001
005002
016203
062702

3476 021202

001005

3477 021204
3478 021206

003614

104460

021160
021162
021164
021170

3475 021174

126271

BR
8s:
003040
000002

003040

00235,( 28%:
7/

005202
005201

/
7

33:;3 021210

005201

33::5 021212

077310

53::: 021214

000417

3485
3486
3487
3488
3489
3490

117137
004737
116237
006201
010137

021216
021224
021230
021236
021240
021244
021244
021246
021250
021252

BGNTST

10445
00001
0146
005

002322
004434
00§40

2334

002312
002310

1%:

3+ -ATTEMPT- TO RUN THE MICRO-DIAGNOSTIC
3+ IF NO ERROR, PROCEED
tELSE, REPORT IT AND

EXIT THIS TEST

TRAP

CSERROR

!
\

[

3 FIRST, INITIALIZE INDEX REGISTERS

CL.R
CLR
MOV
ADD

R1
R2
RESFMC(R2),R3
2,.R2

sR1 IS THE INDEX OF THE BYTE SELECT TABLE
s1R2 IS THE INDEX OF THE RESULTS TABLE
$1GET THE NUMBER OF PATTERNS IN RESULTS TABLE
tMOVE POINTER TO NEXT BYTE

sA MISMATCH IS A DEVICE FATAL ERROR

INC

S08

R3,28

tCONTINUE TO LOOP THROUGH TABLE

243

s TEST COMPLETE WITH NO ERRORS, GO END TEST.

MOVB
JSR
MOvB
ASR
MOV
GEDF

SBSEL(R1),BDATA ;0 GET DATA BYTE THAT FAILED
PC,GETBSR
$GET THE BSEL REGISTERS FOR DUMPING
RESFMC(R2),GDATA ;0 GET EXPECTED RESWLT FROM TABLE
R1
1CONVERT WORD OFFSET TO BYTE CSR @
R1,REGNUM
EM14 ,ERR2
tsDEVICE FATAL ERROR, REPORT IT AND END

CMPB

BNE

INC
INC

,'
/.

PC,MASCLR
8s

RESFMC(R2),8BSEL(R1) ;COMPARE EXPECTED RESULTS WITH CSR'S.

R2
R1

s INCREMENT TABLE POINTER
s INCREMENT POINTER

By 2

(WORD INCREMENT)

“DEVICE FATAL"” ERROR @ 10

TRAP
.WORD
.WORD
WORD

TEST
CSERDF
10
EM14
ERR2

’

CNDMAAO DMVI1 MCTRL DIAG o1
TEST 2

MASTER CLEAR,

3491 021254

021254

MACRO M1200

PAGE S2-1

SEQ 0094

RUN MICRODIAGNOSTICS

24s:
104401

22-FEB-84 15:22

ENDTST

L10026:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG o1
TEST

MACRO M1200

22-FEB-84

15:22

PAGE 53

SEQ 0095

CSR ADDRESSING

.SBTTL TEST 3

3503

-- CSR ADDRESSING

1008880000000 00800800000000000000000000000002000000800080000000000080000000040

TEST

CSR ADDRESSING

i FIRST, HALT THE 6502 UP BY CLEARING ALL CSRS. THEN, WRITE A DIFFERENT WORD
i* OF DATA
PATTERN
A INTO EACH OF BSELO-17, AND AFTER EACH WRITE, READ AND

+* COMPARE ALL REGS TO EXPECTED VALUES.
L

:* DATA PATTERN A

001,

002,

004,

010,

020,

040,

100,

200,

052,

300,

140,

L
3028002820020 0008080005000000080000800088280000002000820000000000080000000000

3504
3505

3507
3508
3509
3510
3511
3512
3513
3514
3515
3516
3517
3518
3519
3520
3521
3522
3523
3524
3525
3526
3527
3528
3529
3530
3531
3532
3533
3534

.............................................

sssessss DETAILED TEST DESCRIPTION sssssssa

THIS

(1)
(2)
(3)
(4)

TEST PROCEEDS AS FOLLOWS:

CLEAR
WRITE
WRITE
WRITE

ALL CSRS AND VERIFY SAME (CLEARING BSELO1 HALTS 6502)
O1 INTO BSELO; VERIFY BSELO=01,ALL OTHERS=0
02 INTO BSEL1; VERIFY BSELO=01,BSEL1=02,ALL OTHERS=0.
04 INTO BSEL2; VERIFY BSELO=01,BSEL1=02,BSEL2=04
,ALL OTHERS=0

(S) => (17) CONTINUE TO INCREMENTALLY WRITE DATA-PATTERN-A INTO THE BSR'S,
CHECKING ALL BSR'S AFTER EACH WRITE, UNTIL BSR'S COMPLETELY
NOTE:

FILLED WITH DATA-PATTERN-A,

IF AN ERROR OCCURS, THE FIRST BAD BSR NUMBER AND GOOD/BAD VALUES ARE
GIVEN, FOLLOWED BY A COMPLETE BSR DuUMP,

...........................................................................

;+ CLEAR DMV CSRS AND RESULTS TABLE
021256
021262
021266
021272
021274
021276
021300

012703
013701
012702
005021
005022
005022
077304

000010
002352
003062

1$:

MOV
MOV
MOV
CLR
CLR
CLR
so8

@10,R3
S08SEL ,R1
ORESFT3,R2
(R1).
(R2)+
(R2)+
R3,1%

1GET @ OF CSRS

:GET 1ST CSR ADDRESS
sGET

1ST RESULTS TABLE ADDRESS

:CLEAR CSR, BUMP POINTER
sCLEAR RESULTS TABLE LOC., BUMP POINTER
: AND DO AGAIN
;LOOP UNTIL ALL DONE

s+ NOW VERIFY CSRS ARE ALL ZEROED
021302
021304
021310

021316
021320

005002
012703
105772
001035
005722
077305

021322
021324

005001
012703

3535 021314

+536
3537
3538
3539
3540
3541
3542
3543

BGNTST

021256

000020
002352

2s:

CLR
MOV
TSTB
BNE
TST
so8

000020

R2
@CSREGS,R3
@BSEL(R2)
S$
(R2)+
R3,2%

+CLEAR BSR ADDRESS INDEX
1GET @ OF CSRS

+IS THIS CSR=0 ?
s IF NO: GO REPORT ERROR
YES: BUMP INDEX
s+
100 UNTIL ALL BSRS CHECKED

INITIALIZE INDEX REGISTERS
R1
s INITIALIZE PATTERN INDEX REGISTER
9CSREGS,R3
1GET NUMBER OF CSR'S

CLR
MOV

CNDMAAO DMV11 MCTRL DIAG @1
TEST

3547 021330
021334

016104
005721

15:22

PAGE

53-1

SEQ 0096

THE FIRST WORD OF THE DATA TABLE CONTAINS THE NUMBER OF PATTERNS IN

THE TABLE:

MOV

002504

TST

PATA(R1),.R4
(R1)»

+ INITIALIZE NUMBER OF PATTERNS COUNT
tMOVE TABLE POINTER

¢ PUT NEXT PATTERN OF DATA INTO NEXT REGISTER AND TEST AREA:
B

:+
021336
021340
021342

CALCULATE INDEX INTO DATA AREA AND TO REGISTER

3s:

010102

005742
006302

MOV
TST
ASL

R1,R2
-(R2)
R2

:GET INDEX INTO TEST DATA AREA
+IT'S ONE WORD TOO LARGE
sCONVERT FROM BYTE

TO WORD INDEX

SETUP THE EXPECTED RESULTS AREA AND LOAD THE SELECT REGISTER
021344
021352

116162
116172

021360
021362
021364

005201
005002
012703

3567 021370
021376
021400
021402

126272
001004
005722
077306

021404
021406

077424
000417

3568
3569
3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
3580
3581
3582
3583

22-FEB-84

CSR ADDRESSING

3544
3545
3546

3548
3549
3550
3551
3552
3553
3554
3555
3556
3557
3558
3559
3560
3561
3562
3563
3564
3565
3566

MACRO M1200

002504
002504

003062
002352

000020

003062

002352

a%:

MOVB
MOvB

PATA(R1),RESFT3(R2) ;UPDATE THE EXPECTED RESULTS TABLE
PATA(R1),8B8SEL(R2) ;PUT PATTERN INTO THE CSR

INC
CLR
MOV

R1
R2
OCSREGS,R3

CcMPB

RESFT3(R2),8BSEL(R2) ;COMPARE CSR WITH RESULTS TABLE

BNE
TST
S0B
S08
BR

;BUMP DATA POINTER FOR NEXT TIME AROUND
sINITIALIZE TABLE INDEX
s INITIALIZE NUMBER OF REGISTERS

S$
(R2)+
R3,4%

;A MISMATCH IS A DEVICE FATAL ERROR
;BUMP TABLE POINTER BY 2
(WORD INCREMENT)
;CONTINUE TO READ & MATCH ALL REGISTERS BEFORE

R4,3$
24

;LOOP UNTIL ALL PATTERNS ARE TESTED
:TEST COMPLETE #2<< NO ERRORS >>aa»

:LOADING THE NEXT PATTERN INTO NEXT REGISTER

s --PREPARE THE FAILURE MESSAGE -021410

021416
021424
021430
021432
021436

021436
021440
021442
021444
3584 021446
021446
021446

116237
117237
004737
006202
010237
104455
000013
014540
005304

104401

003062
002352
004434

002310
002312

S$:

MOVB
MOVB
JSR
ASR
MOV
GEDF

002334

24%:

ENDTST

RESFT3(R2),GDATA ;& GET THE EXPECTED RESULT FROM TABLE
@BSEL(R2),BDATA ;& GET THE FAILED BYTE
PC,GETBSR
sGET THE BSEL REGISTERS FOR DUMPING
R2
R2 ,REGNUM
EM6,ERR2

;CONVERT WORD OFFSET TO BYTE CSR ADDRESS
;:GET THE REGISTER THAT FAILED
iERROR #sss DEVICE FATAL #242a

“DEVICE FATAL" ERROR ¢ 11

TRAP

.WORD
.WORD
.WORD

L10027:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG 21
TEST 4

MACRO M1200

22-FEB-84

15:22

PAGE

G8
54

SEQ 0097

CSR REGISTERS DATA READ/WRITE

.SBTTL TEST 4

3598

-- CSR REGISTERS DATA READ/WRITE

1000000000000 0000ttttitttittitiiittttttttttttttittiiiiittttsststsstttissttsnntes

TEST 4 -- CSR REGISTERS DATA READ/MWRITE

i* WRITE,
i+

THEN,

:# IS

BEING

Pk 22?

3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
3617
3618
3619
3620
3621
3622
3623
3624
3625
3626
3627
3628

TESTED,

NOT BE

THE REMAINING CSR'S,

BSEL1-BSEL17.

WHEN BSEL1

THE PROGRAM ALWAYS SETS BIT 7 IN THE DATA PATTERN SO THAT

CLEARED,

AND

ALWAYS

CLEARS BIT6

THAT

MCLR WILL

NOT

177, 000

:t-ooooocooo.oooooooo‘oo.o..oo‘oooooo“oooo‘ooo‘oooo‘oooooooooooooooooo.ocoooo
:
BGNTS1
et
004737

003762

103002
104460
000453

FIRST,

8s$:

021462
021464
021466
021472

005001
005002
016103
062702

002526
000002

021476

113777

000101

160650

021504

116137

002526

002310

022702
001003

JSR

PC,MSTCLR

8CC
ERROR

244

1$:

sCALL MAINTENANCE READY INITIALIZATION.
;REPORTED,

AND MSTCLR WILL SET

: IF NO ERROR, PROCEED
;ELSE, REPORT IT AND
s

ggg;Ag:?Tégs NUMBER OF

INITIALIZE

sMSTCLR SHOULD FAIL BECAUSE THE MRDY FLAG DOES
sNOT BECOME SET, A DEVICE FATAL ERROR WILL BE

THE

“C" BIT

TRAP

EXIT THIS TEST

THE FIRST BYTE LOCATION OF THE PATTERN B TABLE,

CS$ERROR

USED IN THIS TEST,

TEST PATTERNS OF PATTERN B

TABLE,

NOT A

INDEX AND COUNT REGISTERS

CLR
CLR

R1
R2

tR1 IS THE 'PATB' INDEX REGISTER
tR2 IS THE CSR INDEX REGISTER

MOVB

101,88SEL1

1STOP THE MICRO-PROCESSOR!!!

MOVB

PATB(R1),GDATA

;GET THE PATB DATA BYTE,

MOV
ADD

:
;
s
:+

3630
3631
3632 021520
3633
021526
3635 021534

EACH BYTE OF DATA PATTERN B INTO REGISTER BSELO.

200, 376, 375, 373, 367, 357, 337, 277,

NOTE

021512
021516

COMPARE

DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004, 010, 020, 040, 100,

3601
3602
3603 021454
3604 021456
021456
3605 021460

WILL

AND

THIS USING EACH OF

021450
3599 021450

READ,

REPEAT

PATB(R1),R3
@2.,R2

tR3 CONTAINS THE NUMBER OF BYTES IN PATB
+MOVE POINTER TO FIRST BYTE OF DATA

WE ARE TO USE

DON'T GET CAUGHT BY THE NEXT INSTRUCTION!
“R2" IS AN OFFSET INTO A
WORD TABLE WHICH CONTAINS TWE ADDRESSES OF THE CSR'S.
THEREFORE, WHEN
R2 = 0 -- IT POINTS TO BSELO'S ADDRESS, AND WHEN R2 = 2 -- IT POINTS TO
BSEL1'S ADDRESS.
CMP
BNE

000002

e2,R2
28

:IS "BSEL1"” BEING TESTED?
:IF YES, ALTER PATB DATA SO THAT BIT
sALWAYS SET,

7 IS

AND BITé IS ALWAYS RESET.

;ELSE, USE PATB DATA AS IS.
142737

000300

002310

113772
123772

002310
002310

002352
002352

2%:

8ICB

ORUN!MCLR,GDATA ;FORCE PATTERN TO RESET BITS 7 € 6

MOVB
CMPB

GDATA,@BSELO(R2)
GDATA,aBSELO(R2)

;;PUT PATB DATA INTO REGISTER BEING TESTED
; COMPARE PATTERN JUST WRITTEN

CNDMAAO DMV11 MCTRL DIAG @1
TEST 4

3636
3637
3638
3639
3640
3641
3642
3643

MACRO M1200

22-FEB-84

H8
15:22

PAGE S4-1
SEQ 0098

CSR REGISTERS DATA READ/MWRITE

021542

001414

BEQ

s TEST PASSES IF A MATCH.

ELSE,

DEVICE FATAL ERROR

t --PREPARE FOR THE FAILURE PRINTOUT-021544
021550
021556

021562

010237
117237
004737

021562
021564
021566
021570
021572

000014
014564
005304
000406

021574
021576

005201
077336

021600
021602
021606

005722
020227

021610
021610
021610
021610

002334
002352
004434

MOV
MOvB
JSR
GEDF

002312

R2, REGNUM

GBSELO(RZ) BDATA

PC,GETBSR
EH?.ERRZ

tGET THE BSEL REGISTERS FOR DUMPING

+REPORT ERROR AND EXIT

104455

THE

TEST

“DEVICE FATAL” ERROR @ 12

TRAP

.WORD
.WORD
.WORD

S$:

INC
sS08
TST

101336

BHI

248
104401

1GET THE REGISTER THAT FAILED
;SCORE THE BAD DATA

R1
R3,1$

(R2)+

?3.0<CSREGSA?>

CSERDF

12
EM7
ERR2

tMOVE TABLE POINTER
sDECREMENT NUMBER OF PATTERNS LEFT. IF ZERO,EXIT.
tELSE, CONTINUE TO PATTERN TEST REGISTER

;INCREHENT

THE REGISTER INDEX By 2

:COMPARE REGISTER INDEX TO NUMBER OF CSR'S
sIF R2

17,

END THE

TEST

ENDTST
L10030:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG @1
TEST

MACRO M1200

22-FEB-84

18
15:22

PAGE S5

SEQ 0099

BASIC MASTER CLEAR

.SBTTL TEST S

3662

-- BASIC MASTER CLEAR

100888888003 000008000000000008A080 00000000000 00800 0002080800800 00000000000000 0
FE

TEST

BASIC MASTER

CLEAR

;¢
:¢

PERFORM INITIAL MASTER CLEAR.
WRITE 356 INTO BSELO AND READ AND CHECK
THEN, ISSUE A MASTER CLEAR AND READ AND CHECK BSELO FOR 000.

IT.

: =80 0000000000000
00000 0000000040080 00000000080 0000800000000 000000000000000
i

021612

BGNTST

:+ ISSUE A MASTER CLEAR, AND DELAY FOR MICRO-DIAGNOSTICS TO COMPLETE BY CALLING
: SUBROUTINE MASCLR.

021612

004737

021616
021620
021620
021622

103002

021624
021632
021640

003614

104460
000441

112777
122777

001011

000356
000356

160520
160512

8s:

JSR

PC,MASCLR

3 -ATTEMPT- TO RUN THE MICRO-DIAGNOSTIC
sFAILURES WILL BE REPORTED BY THE SUBROUTINE

8CC
ERROR

244

MOVB
CMPB
BNE

@356 ,88SELO
©356,3BSELO
2%

+@ SET BSEL TO ALMOST ALL ONES
+ & COMPARE
sA MISMATCH INDICATES A DEVICE FATAL ERROR

+AS DEVICE FATAL AND THE “C” BIT WILL BE SET
: IF NO ERROR, PROCEED
;ELSE, REPORT IT AND

TRAP

EXIT THIS TEST

CSERROR

; ISSUE A MASTER CLEAR, AND DELAY FOR MICRO-DIAGNOSTICS TO COMPLETE By CALLING
: SUBROUTINE MASCLR.
021642

004737

003614

JSR

PC,MASCLR

;

-ATTEMPT-

TO RUN THE MICRO-DIAGNOSTIC

sFAILURES WILL

BE REPORTED By

:AS DEVICE FATAL

AND

THE

SUBROUTINE

“C" BIT WILL BE

SET

021646
021650
021650
021652

103002

8CC

104460
000425

021654

122777

CMPB

021662

001421

BEQ

244

MOVB
MOVB
JSR
CLRB

356 ,GDATA
@BSELO,BDATA
PC,GETBSR
aBSELO

1@ ALMOST ALL ONES IS EXPECTED DATA
s+SOMETHING OTHER THAN ALL ONES WAS FOUND. SCORE
1GET THE BSEL REGISTERS FOR DUMPING
;DISABLE INTERRUPTS AS A PRECAUTIONARY MEASURE

GEDF

EMS,.ERR2

;REPORT DEVICE FATAL ERROR
"DEVICE FATAL"” ERROR @ 13H

021664
021672
021700
021704
021710
021716

112737
117737
004737
105077
012737

021716
021720
021722
021724
3698 021726
3699 021732

104455
000015
01451°S
005304

105077

ERROR

160470

000356
160454
004434
160442

002310
002312

9s:

2%:

; - -PREPARE FOR

MOV

002334

; IF NO ERROR, PROCEED
;ELSE,

REPORT

EXIT

IT AND

s IF ZERO,

see¢ TEST PASSES sees,

;GET

THE REGISTER

ELSE REPORT ERROR

THAT FAILED

TRAP

160420

CLRB

ENDITSI

aBSELD

CSERROR

THIS REGISTER SHOULD BE ZEROED DURING

s INITIALIZATION

THE FAILURE PRINTOUT--

00, REGNUM

TRAP

THIS TEST

;DISABLE

.WORD
.WORD
.WORD
INTERRUPTS AS A PRECAUTIONARY

CSERDF

13
EMS
ERRC
MEASURE

IT.

J8
CNDMAAO DMV11 MCTRL DIAG @1
TEST

MACRO M1200

22-FEB-84 15:22

PAGE 55-1

SEQ 0100

- - BASIC MASTER CLEAR

021732
021732

104401

L10031:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG 21
TEST 6

K8
MACRO M1200

22-FEB-84

15:22

PAGE

SEQ 0101

-- BUS RESET
.SBTTL TEST 6 -- BUS RESET

3708

1008888884080
80080 0000000008000 00 8080088000800

8 000800088000 00 050004000000 004

)
1 e

TEST 6 -- BUS RESET
PERFORM AN

INITIAL

;# THEN,
ISSUE A
;¢ BSELO FOR 000.
*

: «=8 80
3

021734
3709 021734
3710 021742
3711
3712
3713
3714
3715 021744
3716
3717
3718 021750
3719 021752
021752
3720 021754
3721
3722 021756
3723 021764
3724 021772
3725
3726 021774
021774
3727
3728

3730
3731
3732
3733
3734
3735
3736
3737
3738
3739
3740
3741
3742
3743
3744
3745
3746
3747

:
032737
001072

000001

002350

MASTER

RESET

CLEAR.

WRITE

377

INTO BSELO

AND READ AND CHECK

IT.

INSTRUCTION, STALL FOR COMPLETION, AND READ AND CHECK

0000000000000 0000000000000 0000000000040 004000020000 000000 00000000400
BGNTST
BIT
BNE

oBITO,PFLAG
24

T6::

;IF BUS RESETS ARE NOT ALLOWED,
:+
BYPASS THIS TEST

; ELSE, ISSUE A MASTER CLEAR, AND DELAY FOR MICRO-DIAGNOSTICS TO COMPLETE BY
: CALLING SUBROUTINE MASCLR.
004737

003614

103002
104460
000465

112777
122777
001035

000377
000377

160366
160360

8s$:

JSR

PC,MASCLR

8CC
ERROR

8¢

: IF NO ERROR, PROCEED
;ELSE, REPORT IT AND

MOVB

@377,3BSELO

:SET ALL BITS IN BSELO

CMPB
BNE

@377,8BSELO
1

BRESET

104433

-ATTEMPT-

TO RUN THE MICRO-DIAGNOSTIC

+FAILURES WILL BE REPORTED BY THE SUBROUTINE
+AS DEVICE FATAL AND THE “C" BIT WILL BE SET

TRAP

EXIT THIS TEST

CS$ERROR

;COMPARE TO ALL BITS SET
sA MISMATCH IS A DEVICE FATAL ERROR

:FORCE AN EXTERNAL BUS RESET.

THIS SHOULD
TRAP

:CAUSE BSELO=0 IN ABOUT 100 MICROSECONDS

CSRESET

; DELAY ABOUT S00 MILLISECONDS FOR THE MICRODIAGNOSTIC TO COMPLETE

021776
022002
022006
022010

013701
105737
005301
001374

022012
022020

122777
001443

002316
002317

2s:

MOV
TSTB
DEC
BNE

DELAY1,R1
DELAY1.+1
R1
28

s INITIALIZE COUNTER
:THIS IS A DUMMY INSTRUCTION TO LENGTHEN THE DELAY
:TIME TO GET OUT OF THE DELAY?
iNO,
g

CMPB

:YES, CHECK FOR REGISTER TO BE ZERO

160332

BEQ

A MISMATCH IS A DEVICE FATAL ERROR

;:ELSE, END TEST.

; --PREPARE FOR THE FAILURE PRINTOUT-022022
022030
022034
022040
022046
022054

117737
004737
105077
012737
012737

022054

104455

160324

004434

160312

000000
000000

002312
002310
002334

MOvVB
JSR
CLRB
MOV

8BSELO,BDATA
PC,GETBSR
9BSELO
©€000,GDATA

tGET THE
1GET THE
;DISABLE
;GET THE

GEDF

EM9,ERR2

;EXTERNAL BUS RESET FAILURE
H
“DEVICE FATAL" ERROR ¢ 14

MOV

0, REGNUM

tGET

ACTUAL DATA
BSEL REGISTERS FOR DUMPING
INTERRUPTS AS A PRECAUTIONARY MEASURE
EXPECTED DATA

THE REGISTER

THAT FAILED

TRAP

CSERDF

CNDMAAO DMV11 MCTRL DIAG 1
TEST 6

L8
MACRO M1200

22-FEB-84

15:22

PAGE 56-1

SEQ 0102

-- BUS RESET

022056
022060
022062
3748 022064
3749
3750 022066
3751 022074
3752 022100
3753 022104
3754 022112
3755 022! 20

000016
014634
005304
000421

022120
022122
022124
022126
3756 022130
3757 022134
022134
022134

103455

117737
004737

105077
112737

012737

000017
014611
005304
105077

104401

BR
160260
004434
160246
000377

160216

002312

1$:

MOvVB

244:

244

8BSELO,BDATA

JSR
CLRB

PC,GETBSR
8BSELO

MOV
GEDF

MOvVB

002310
002334

CLRB
ENDTST

.WORD
.WORD
.WORD

#377,GDATA

8BSELO

14
EM9
ERR2

1GET THE ACTUAL DATA
tGET THE BSEL REGISTERS FOR DUMPING
:DISABLE INTERRUPTS AS A PRECAUTIONARY MEASURE
sALL ONES WAS EXPECTED DATA
tGET THE REGISTER THAT FAILED
:BSELO COULD NOT BE SET TO ALL ONES
;

"DEVICE FATAL” ERROR & 15

TRAP
.WORD

.WORD
.WORD

CSERDF
15

EM8
ERR2

;DISABLE INTERRUPTS AS A PRECAUTIONARY MEASURE
L10032:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG #1
TEST

-- CSR,

MACRO M1200

22-FEB-84

15:22

PAGE 57

SEQ 0103

MAINTENANCE MICROCODE INTERACTION

3779

.SBTTL TEST 7 -- CSR, MAINTENANCE MICROCODE INTERACTION
1208288808804

ARARAARRAAR R AR R AR A AR AR AR AR AR A AR A AR R RS R AR AR R AR A AR ARG AR

TEST 7 -- CSR, MAINTENANCE MICROCODE INTERACTION

:# THIS
TEST INVOKES THE MAINTENANCE REQUEST MECHANISM THROUGH WHICH THE LSI-11
;# AND
6502
CAN
COMMUNICATE.
FIRST, A MASTER CLEAR IS DONE WITH ONLY BIT O

:* (MREQ) SET IN BSEL1.
THE PROGRAM THEN CHECKS FOR THE SETTING OF BSEL2 BIT 7
:+# (MRDY) BY
THE MAINTENANCE MICROCODE WITHIN ABOUT SO MICRO-SEC., AND IF MRDY
:* DOES NOT GET SET, AN ERROR IS REPORTED.
1 &

:* NEXT, THE PROGRAM LOADS SEL4 WITH 000010 AND BSEL6 WITH 125.
:* ARE READ AND CHECKED FOR EXPECTED CONTENTS.

THEN, ALL CSR'S

;# BSEL2
IS
THEN LOADED WITH A WRITE COMMAND, WHICH SHOULD CAUSE THE MICROCODE
:# TO
TRANSFER
THE
125
INTO BSELO.
ALL CSR'S ARE THEN READ AND CHECKED FOR
:# EXPECTED CONTENTS.
i *

THEN,

;# IS
:*

THE PROGRAM LOADS 252

THEN

TRANSFER

LOADED

THE 252

WITH

INTO BSELO AND READS AND

READ

INTO BSEL6.

ALL

CSR'S ARE

READ AND

: ~= B8R0 R 0000008000000 R R AR AR AR LA AR AR R AR AR AR AR
H

3780

3781
3782
3783

022136
022136
022136
022136
022140
022144
022146
022146
022150

3784
3785
3786 022154
3787 022162
3788
3789 022170
3790 022176

3791
3792 022200
3793 022206
3794 022214
3795
3796
3797
3798
3799

022220

022222
022230
022232
022240
3801 022246
3802 022254
3803
3804 022256
3805 022264
3806 022266

CSR'S.

BSELZ2

CHECKED.

000000000000 0000000000000

BGNTST

T7::

BGNSUB
104402
004737
103003

CHECKS ALL

COMMAND, WHICH SHOULD CAUSE THE MICROCODE TO

TRAP

CcsBSuB

TRAP

C$ERROR

003762

PC,MSTCLR
10$

104460
000137

JSR
8CC
ERROR

;+PUT THE MICROPROCESSOR IN THE MAINTENANCE LOOP
:IF NO ERROR, PROCEED
;ELSE, REPORT IT AND

022642

JMP

ENDT7

012777
012777

000020
000125

160200
160176

MOV

#SLTO,8SELA

:PUT ADDRESS OF SELECT REGISTER O IN 'ADDRESS' REG

027727
001411

160156

000400

CMP
BEQ

@SELO, #400
1$

;ONLY “MREQ" SHOULD BE SET
;IF IT IS, PROCEED WITH TESTING

017737
012737
005037
000451

160146
000400
002334

002312
002310

MOV
MOV
CLR
BR

8SELO,BDATA
#400,GDATA
REGNUM
4%

:
:
:+

027727
001412
017737
012737
012737
000433

160130

000200

000200
000002

160120

002312
002310
002334

160100

000020

160070

002312

027727
001412
017737

10$:

1$:

MOV

CMP

;PUT THE DATA TO BE WRITTEN IN 'DATA’' REGISTER

;ELSE, SETUP FOR (& REPORT) THE ERROR
BAD DATA
GOOD DATA
REG. NUMBER

8SEL2, #200

: "MRDY” SET?

8SEL2,BDATA
#200,GDATA

:
+

BEQ

MOV
BR

#2 ,REGNUM
43

CMP
BEQ
MOV

8SEL4,4SLTO
3s
@SEL4 ,BDATA

MOV
MOV

2$:

#125,aSEL6

EXIT THIS TEST

(ALSO CHECKED BY "MSTCLR")

:YES, PROCEED WITH TESTING
BAD DATA
GOOD DATA

:
THE REG.
;EXIT TEST

THAT FAILED

;COMPARE SELECT REGISTER 4 WITH THE ADDRESS SENT
;A MISMATCH IS A DEVICE FATAL ERROR
;:GET THE BAD DATA

CNDMAAO DMV11 MCTRL DIAG #1
TEST

CSR,

MACRO M1200

MAINTENANCE MICROCODE

012737
012737
000415

000020
000004

002310
002334

3811 022312
3812 022320
3813 022322

027727
001415
017737
012737
012737

160050

000125

ggxs 022336
16
3817
gglg
1
3820 022344

022344
022346

022350
022352
3821 022354
022354
022354
3822
3823 022356

160040

000125

000006

15:22

PAGE S57-1
SEQ 0104

INTERACTION

3807 022274
3808 022302
gggg 022310

3814 022330

22-FEB-84

MOV
MOV
BR

#SLTO,GDATA
04 ,REGNUM
4

+GET THE GOOD DATA
:GET THE REGISTER NUMBER WHICH FAILED

002312

CMP
BEQ
MOV

8SEL6,#000125
604
8SEL6,BDATA

002334

MOV

6 ,REGNUM

;COMPARE SELECT REGISTER 6 WITH THE DATA SENT
1 THIS PART OF THE TEST PASSES IF A MATCH IS FOUND
1GET THE BAD DATA
;GET THE GOOD DATA
1GET THE REGISTER NUMBER

3$:

002310

MOV

#000125,GDATA

; --PREPARE FOR THE FAILURE PRINTOUT-4%:

GEDF

EM7,ERRS

104455
000020

014564
005552

60$:

;ELSE,
3

ENDSUB

AN ERROR HAS BEEN FOUND
“DEVICE FATAL” ERROR ¢ 16
TRAP
.WORD
.WORD
.WORD

C$ERDF
16

EM7
ERRS

L10034:

104403

i 0000000000000000000 > P AR T
BGNSUB

TRAP
CSESUB '
2 < 000000000000000000000000000000000000000000

022356
— 022356

104402

gggg 022360

112777

000002

157770

MOVB

QWRILOC,@BSEL2

;SEND THE WRITE LOCATION COMMAND

3827
3828
3829
3830
3831
3832
3833

022366
022374
022376
022404
022410
022416
022424

032777
001421
017737
004737
012737
012737

000200

157762

157754
004434
000002
000002

002312

BIT
BEQ
MOV
JSR
MOV
MOV
GEDF

#200,88SEL2
S$
@BSEL2,BDATA
PC,GETBSR
#002,GDATA
@2, REGNUM
EM15,ERR2

iWE SHOULD HAVE IMEDIATLY LOST "MRDY".
:GOT WHAT WE EXPECTED,
WAIT FOR READY AGAIN
i SOMETHING WRONG,
SETUP FOR AND REPORT ERROR
:GET THE BSEL REGISTERS FOR DUMPING
:EXPECTED DATA
+WE WERE TESTING BSEL2

022424
022426
022430
022432
3834 022434
. 022434

104455
000021
014733
005304

17.2:

002310
002334

ESCAPE

§8$5 022436

104410
000206

3836 022440
ggg; 022446

132777
001774

000200

ggzg 022450

004737

004576

3841
3842
3843
3844
3845
3846
3847

022454

023727

002246

022462
022464
022472
022500
022506

001412
012737
013737
012737
000451

000525
002246
000000

157710

Ss$:

TRAP

“DEVICE FATAL" ERROR & 17
TRAP
.WORD

T3T

csssuB

.WORD
.WORD

CSERDF
17
EM1S
ERR2

TRAP
.WORD

CSESCAPE
L10033-.

BITB
BEQ

#200,3BSEL2
S

sWAIT FOR

JSR

PC,GETWSR

tWHEN IT DOES,

000525

cMP

WSRO, #000525

002310
002312
002334

BEQ
MOV
MOV
MOV
BR

6%
#000525,GDATA
WSRO,BDATA
©0 ,REGNUM
94

1COMPARE BYTE SELECT REGISTERS O AND 1
+REG 0 = 125, REG 1 = 001
i THIS PART OF THE TEST PASSES IF A MATCH IS FOUND
;GET THE GOOD DATA
iGET THE BAD DATA
tGET THE REGISTER NUMBER
tEXIT TEST

"MRDY” TO GO HIGH AGAIN
GET CURRENT REGISTER CONTENTS

CNDMAAO DMV1I1 MCTRL DIAG o1
TEST

3850
3851

3852 022516
3858 022520
3854 022526
3855-022534
;:gg 022542

3858

3859 022544

3861
3862
3863
3864
3865

22-FEB-84 15:22

B9
PAGE 57-2
SEQ 0105

- CSR, MAINTENANCE MICROCODE INTERACTION

3848
5849 022510

3860

MACRO M1200

023727

000200
002250
000002

023727

002252

000020

000020
002252
000004

002310
002312
002334

002254

000125

001412
012737
013737
012737
000415

3867 022600
3868 022606

023727
001415

3870 022616
3871 022624

013737
012737

;:;g

000200

001412
012737
013737
012737
000433

022552
022554
022562
022570
022576

3869 02261v

002250

(12737

000125

002254
000006

63%:

002310
002312
002334

7%:

8%:

002310

cMP

WSR2, #000200

BEQ
MOV
MOV
MOV
BR

7
0000200,GDATA
WSR2,BDATA
02 ,REGNUM

cMP

WSR4 ,0SLTO

BEQ
MOV
MOV
MOV
BR

8s
oSLTO,GDATA
WSR4 ,BDATA
04 ,REGNUM
9s

s THIS PART OF THE TEST PASSES IF A MATCH IS FOUND
1GET THE GOOD DATA
1GET THE BAD DATA
3GET THE REGISTER NUMBER
sEXIT TEST

cMP
BEQ

WSR6 , €000125
ENDT?7

iREG 6 = 125, THE WRITE DATA
s THIS PART OF THE TEST PASSES IF A MATCH IS FOUND

MOV

002312
002334

MOV
MOV

fi;;

€000125,GDATA

WSR6 ,BDATA
06 , REGNUM

1COMPARE BYTE SELECT REGISTERS 2 AND 3

tREG 2 = 200 -- "MRDY” IS SET & COMMAND IS CLEARED
tREG 3 = 000 SHOULD BE ZEROES.
s THIS PART OF THE TEST PASSES IF A MATCH IS FOUND
1GET THE GOOD DATA
sGET THE BAD DATA
1GET THE REGISTER NUMBER

$EXIT TEST

1SUBROUTINE ATTEMPTED TO ZERO THIS LOCATION.
tREG 4 » 020,

THE 6502 ADDRESS TO PUT DATA

s REG S = 000, ZEROED By MSTCLR

t:GET

THE GOOD DATA

tGET THE BAD DATA
1GET THE REGISTER NUMBER

:+ REG 7 = 000, ZEROED BY MSTCLR.

: --PREPARE FOR THE FAILURE PRINTOUT--

3876 022632

9s:

022632
022634
022636
022640
3877 022642

104455
000022
014564
005552

02:642
3878 022644

104403

022644

104401

022642
022644

ENDT7:

GEDF

EM7,.ERRS

tREPORT ERROR.
.
H
“DEVICE FATAL" ERROR & 18

ENDSUB

L1003S:
ENDTST

L10033:;

TRAP
. WORD
.WORD
.WORD

CSERDF
18
EM7
ERRS

TRAP

CSESUB

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG @1
TEST 8

- -

MACRO M1200

22-FEB-84

15:22

C9
PAGE

SEQ 0106

RUN FLIP-FLOP

3893

.SBTTL

TEST 8

-- RUN FLIP-FLOP

.00““.0.“‘.‘...‘..‘“....‘.“..“‘.0.‘

O..“....‘....‘..0..““..‘0“‘..0.00

3 &

1+
3¢
3¢
1*
14
1#
4¢
3¢
3*

TEST

RUN FLIP-FLOP

THE PROGRAM PUTS THE MICROCODE INTO THE MAINTENANCE LOOP. A 125 CHARACTER
IS LOADED INTO BSEL6 AND A REQUEST IS MADE TO WRITE THE CONTENTS OF BSEL6
INTO BSELO. THE PROGRAM THEN READS AND CHECKS BSELO TO CONTAIN 125.
NEXT, THE RUN FLIP-FLOP IS CLEARED BY LOADING A O INTO RUN (BSEL1 BIT 7).
BSELO IS THEN CLEARED AND THE REQUEST IS MADE AGAIN TO WRITE THE CONTENTS
OF BSEL6 INTO BSELO. THE PROGRAM STALLS FOR SO MICRO-SEC. AND CHECKS FOR
MROY (BSEL2 BIT 7) NOT SET, AND BSELO STILL CLEARED.
THEN, THE PROGRAM SETS THE RUN FLIP-FLOP AGAIN BY LOADING A 1 INTO RUN,
AND CHECKS FOR MRDY SET WITHIN SO MICRO-SEC. AND BSELO = 12S.

3 - -.0...‘...‘.“‘.“....‘....“....‘.“.‘.‘...0‘.0.
.‘.‘.....

.‘..“‘....‘..“‘0

022646
022646

022652
022654
022654
022656

:
004737

003762

103003
104460
000137

023212

BGNTST
18::

JSR

PC,MSTCLR

8CC
ERROR

s+ IF NO ERROR, PROCEED
1ELSE, REPORT IT AND

JMP

246

1CALL SUBROUTINE TO INITIALIZE THE CSR’'S AND

iPUT

THE 6502

EXIT

INTO

THE MAINTENANCE LOOP

TRAP

THIS TEST

CSERROR

+ DO NORMAL WRITE INTO LOCATION USED By BSELO
022662
022666
022670
022672
022674
022674
022676
022700
022706
022710
022716
022724
022730

022730
022732
022734
022736
3914 022740
022740
022742
3915
3916
3917 022744
3918
3919 022750
3920 022756
3921

004537
000020
000125
103002

104460
000545
123777
001416
017737
013737
005037

004322

2s:

10s8:

022670

157444

157436

002312

022670
002334

002310

RS,WRITEI

tWRITE

s IF AN ERROR OCCURED,

24
10% ,88SELO
118
&8SELO,BDATA
108 ,GDATA

EXIT
s
;:0DID THE DATA GO INTO BSELO?

REGNUM

EM16,ERRS

+
:+

sREPORT IT &

sYES,

iNO,

ESCAPE

104410
000250

TST

NOW

TRY

WITH

THE

TRAP

"RUN" BIT

SETUP £ PRINT ERROR MESSAGE

+IF

“DEVICE FATAL" ERROR @

142777
112777

157402
000200
000002

118:

157376
157372

CLRB
B8ICB

MOvB

@BSELO
ORUN, BBSEL 1
OWRILOC,8BSELLD

OFF

THIS WRITE DIDN'T WORK,

tCLEAR BSELO AGAIN

tREG'S ARE

ALREADY

19
TRAP

.WORD
.WORD
.WORD
THERE IS NO

!
+IN TRYING IT WITH “RUN“ OFF
105077

CSERROR

tWE'RE SINGLING OUT SELO FOR THE MESSAGE
:

104455
000023
015013
005552

INTO BSELO THROUGH THE BACK DOOR!

ADDRESS OF BSELO WITHIN RAM
TEST DATA

TRAP
.WORD

CSERDF

19
EM16

ERRS
SENSE

CSESCAPE
L10036-.

SETUP FROM PREVIOUS WRITE

1TURN OFF THE RUN BIT -- & HOPEFULLY
s TELL MLOOP TO WRITE AGAIN

THE 6502 ALSO

DMV11 MCTRL DIAG @1

MACRO M1200

22-FLB-84

D9
15:22

PAGE

58-1

SEQ 0107

-- RUN FLIP-FLOP
$AT

THIS POINT,

THE DMV-11 SHOULD BE QUIESCENT.

SHOULON'T EVEN KNOW

THAT

tWE HAVE CLEARED "MRDY",
THEREFOR, THERE SHOULD BE NO CHANGE IN ANY OF THE
tREGISTERS FOR AS LONG AS WE CARE TO WAIT AND WATCH.
THE ONLY CHANGE THAT WE
+COULD POSSIBLY SEE WOULD BE “MRDY” BEING SET AGAIN AND/OR BSELO GETTING
tLOADED WITH THE TEST DATA -- WHICH IS WHAT THE REQUESTED COMMAND SHOULD
+ACCOMPLISH WHEN THE FUNCTION IS ALLOWED TO RUN AGAIN.
022764

022770
022776
023000
023004
023006

013701
132777
001042

105777

001063
077110

002320
000200

157360

12%:

157346

MOV

BITB

BNE

TSTB

BNE
S08

DELAY2,R1

1SETUP AND WAIT FOR A WHILE.

144

+IF IT GETS SET, WE HAVE AN ERROR BECAUSE

OMRDY,8BSEL2

88SELO

154
R1,12¢

iWHILE WE'RE WAITING, WE MAY AS WELL CHECK

"“MRDY"

tNOTHING WAS SUPPOSED TO HAPPEN WITHIN

s THE 6502 MICRO-PROCESSOR

tWHILE WE'RE AT IT,

WE MAY AS WELL LOOK AT

1BSELO.
THAT ALSO ISN'T SUPPOSED TO CHANGE
.
1DECREMENT AND CHECK COUNTER -- LOOP TILL DONE

+IF EVERYTHING GOES OK, WE SHOULD FALL OUT OF THE LOOP TO MERE.
OTHERWISE,
s “MROY" OR BSELO COULD CHANGE SENDING US TO "143" OR “15$” RESPECTIVELY TO
iPRINT AN APPROPRIATE (WE HOPE) ERROR MESSAGE.

+IF WE DO GET TO HERE, WE CAN NOW SET “RUN” AND THE MLOOP SHOULD PERFORM THE
sREQUESTED FUNCTION,
023010

152777

000200

8IS8

157336

ORUN, 8BSEL1

1SET "RUN” AND ALLOW THE 6502 TO RUN AGAIN

sNOW ALL WE HAVE TO DO IS WAIT AGAIN AS BEFORE.
EXCEPT THAT THIS TIME “MRDY"
1OR BSELO GETTING SET IS THE VALID CONDITION -- NOT THE ERROR.
FAILURE TO
:PERFORM IS NOW THE ERROR WE'RE LOOKING FOR.
023016
023022
023030

013701
132777
001070

023032

077105

002320
000200

157326

13¢:

MOV

DELAY2,R1

1SETUP AND WAIT FOR A WHILE.

+IF IT GETS SET, WE CAN ASSUME THAT SOME THING
sCOMPLETED.
AT LEASE WE WERE ABLE TO GET THE
16502 MICRO-PROCESSOR RUNNING AGAIN
tDECREMENT AND CHECK COUNTER -- LOOP TILL DONE

8IT8

OMRDY ,8SEL2

So8

R1,13%

BNE

tWHILE WE'RE WAITING,

"MRDY” SHOULD GO NON-ZERO

+IF WE GET MERE, WE WEREN'T ABLE TO RESTORE THE 6502 TO A RUNNING STATE!
023034
023042
023046
023054
023062
023070

023070
023072
023074
023076
3966 023100
023100
023102
3967
3968
3969
3970 023104
3971 023112

117737
004737
113737

152737

012737

157316
004434
002312
000200
000002

MOVB
JSR
MOvVB
8ISB
MOV
GEDF

002312
002310
002310
002334

@SEL2,BDATA
PC,.GETBSR
BDATA,GDATA
OMROY ,GDATA
02 ,REGNUM
EM17,ERR2

104455
000024
015110
005304

1SETUP FOR THE ERROR MESSAGE -- GET BAD DATA
tGET THE BSEL REGISTERS FOR DUMPING
sPICK THE REGISTER'S DATA.
THE ONLY DIFFERANCE
+BETWEEN GOOD & BAD IS THE "MRDY" BIT
s INDICATE THAT WE'RE LOOKING AT BSEL2
tNOW REPORT THE ERROR
5
“DEVICE FATAL" ERROR @ 20
TRAP

ESCAPE

104410
000110

TST

$EXIT

TEST

(OR LOOP,

MAYBE?)

.WORD
.WORD
WORD

TRAP

.WORD

CSERDF

20
EM17
ERR2

CSESCAPE

L10036-.

+IF WE GET HERE, BSEL2 CHANGED WHEN THE 6502 WASN'T SUPPOSED TO BE RUNNING'
117737
004737

157246

004434

002312

145

MOVB

J5SR

8BSEL2,BDATA

PC,.GETBSR

tGET

THE UNEXPECTEDLY

ALTERED CONTENTS OF BSEL2

THE BSEL REGISTERS FOR DUMPING

CNDMAAO DMV1l MCTRL DIAG @1
TEST 8

MACRO M1200

PAGE 58-2

SEQ 0108

-- RUN FLIF-FLOP

3972 023116
3973 023124
3974 023132
3975 023140
023140
023142

023144
023146

3976 023150

023150

— 023152

113737
142737
012737

002312
000200
000002

002310
002310
002334

MOvVB
BICB
MOV
GEDF

BDATA,GDATA
OMRDY ,GDATA
02 ,REGNUM
EM17A,ERR2

104455

000025

015170
005304

ESCAPE

104410

TST

tPICK THE REGISTER'S DATA,
THE ONLY DIFFERANCE
sBETWEEN GOOD &€ BAD IS THE "MRDY" BIT
s INDICATE THAT WE'RE LOOKING AT BSELZ2
s1NOW REPORT THE ERROR
5
“DEVICE FATAL” ERROR ¢ 21
TRAP
CSERDF

1EXIT TEST (OR LOOP,

MAYBE?)

000040

.WORD

TRAP

CS$ESCAPE

.WORD
.WORD

.WORD

gg;g
3980
3981
3982
3983
3984

22-FEB-84 15:22

EM17A
ERRZ

L10036-.

;IF WE GET HERE, BSELO CHANGED WHEN THE 6502 WASN'T SUPPOSED TO BE RUNNING!
023154
023162
023166
023172
023176

117737
004737
105037
105037

023176

104455

023200
023202
023204
3985 023206

000026
015170
005304

— 023210

000002

023206

157172
004434
002310
002334

002312

15%:

ESCAPE

104410

ggg;

MOVB
JSR
CLRB
CLRB
GEDF

023212

24%:

104401

TST

tGET THE UNEXPECTEDLY ALTERED CONTENTS OF BSELO
1GET THE BSEL REGISTERS FOR DUMPING
+IT WAS SUPPOSED TO STAY AT ZERO
s INDICATE THAT WE'RE LOOKING AT BSELO
sNOW REPORT THE ERROR
H

sEXIT

“DEVICE FATAL" ERROR @& 22

TRAP

TEST (OR LOOP,

MAYBE?)

.WORD
- .WORD
.WORGr

TRAP

.WORD

;IF WE GET HERE,

3989 023212

SBSELO,BDATA
PC,GETBSR
GDATA
REGNUM
EM17A,ERR2

CSERDF

22
EM17A
ERR2

CSESCAPE
L10036-.

THE TEST APPEARS TO HAVE PASSED WITH FLYING COLOURS

ENDTST

L10036:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG @1
TEST 9

MACRO M1200

22-FEB-84

15:22

PAGE

ro
59

SEQ 0109

LOW RAM (00-0F) SCRATCHPAD

.SBTTL TEST 9

4004

-- LOW RAM (00-0F) SCRATCHPAD

1000000000000 0000000000000000000

TEST 9

0000000000000 000ttttttltttistitttttestttaritntss

LOW RAM (00-0F)

SCRATCHPAD

i THIS TEST FIRST PERFORMS AN ADDRESSING TEST OF RAM LOCATIONS (00-OF), BY
1* WRITING THE ADRS INTO EACH LOCATION AND AFTER EACH WRITE, ALL THE LOCATIONS

ARE READ AND CHECKED FOR EXPECTED CONTENTS.

THEN,

THE

TEST

PERFORMS READ/WRITE

DATA

TESTING OF

RAM LOCATIONS 00-OF,

;s BY WRITING, READING, AND COMPARING ALL BYTES OF DATA PATTERN B IN EACH
;¢ LOCATION,
s

DATA PATTERN B =

125,
200,

252, 000,
376, 375,

377, 001, 002,
373, 367, 357,

004, 010, 020,
337, 277, 177,

040,
000

100,

$--08800880200000000200080000000000000008000000080088008004004008800800004000420

4005
4006
4007

4008
4009
4010
4011
4012
4013
4014
4015
4016
4017
4018
4019
4020

4021
4022
4023
4024

4025
4026
4027
4028
4029
4030
4031
4032
4033

023214
023214
023220
023222
023222
023224
023224
023226
023230
023236
023244

023250
023254

004737
103003

003762

104460
104410
000152
012737
012737
004737
005037
005037

000001
003777
023402
002450
002452

002444
002474

18:
28:

004737
103003

023420

002464
002464

PC,MSTCLR

ESCAPE

TST

MOV

MOV
JSR
CLR

002474

21,TMP2
02047., TMPE
PC,T9.RST
TMP4
TMPS

s INIT DMV € ENTER M-LOOP

T9::

;:IF NO ERROR, PROCEED WITH TESTING

;ELSE, REPORT ERROR
H

& EXIT TEST

1DATA GENERATION ALGORITHM CODE

sLAST VALID ADDRESS
;RESET TMP3,
s TEST DATA
sACTUAL DATA

TMPA,

TRAP

C$ERROR

TRAP

CSESCAPE

.WORD

L10037-.

& TMPF

IN THIS PHASE OF TESTING WE WRITE, READ & CHECK EACH LOCATION INDIVIDUALLY.

104460
104410
000106
005237
023737
101764

JSR
8CC
ERROR

CLR

:+
023260
023264
023266
023266
023270
023270
023272
023274
023300
023306
023310
023310

BGNTST

S$:

104422

tWRITE,

READ,

& CHECK

JSR

PC,WRCRAM

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

B8CC
ERROR

INC

cMP
BLOS
BREAK

TMPA
TMPA
, TMPE
43

1 BYTE OF RAM

& LOOP IF ERROR

sPOINT

TO NEXT LOCATION

TRAP
TRAP

.WORD

CS$ERROR
CSESCAPE

L10037-.

tHAVE WE TESTED ALL OF RAM?
sNO, TEST ANOTHER BYTE
tELSE, SEE IF A *C MAS BEEN STRUCK
s THEN PROCEED TO THE NEXT PHASE

TRAP
C$BRK
OF TESTING

; IN THIS PHASE OF TESTING WE READ & CHECK DATA WHICH SHOULD ALREADY BE IN
+ EACH LOCATION OF RAM BEING CHECKED.
023312
023316
023322
023324
023324

004737
004737
103001

104460

023402
023616

8$:

JSR
JSR
B8CC
ERROR

PC,T9.RST
PC,RCRAM
9

sRESET TMP3, TMPA, & TMPF
;READ &€ CHECK 1 BYTE OF RAM

: IF NO ERROR,

PROCEED

;ELSE, REPORT IT

TRAP

CSERROR

CNDMAAO DMV11l MCTRL DIAG o1
TEST 9

005237
023737
101766

023344
023350
023354
023362
023364
023370
023372
023374
023376
023376
4049 023400
023400
023400

005037
005237
023727
002730
004537
000173
000000

4038
4039
4040
4041
4042
4043
4044
4045
4046
4047
4048

4050
4051

4052

4053
4054
4055
4056

22-FEB-84

15:22

INC

TMPA

PAGE

59-1

SEQ 0110

-- LOW RAM (00-0F) SCRATCHPAD

023326
023332
023340
023342
023342

4034
4035
4036
4037

MACRO M1200

002464
002464

002474

9%:

104422

cMP
BLOS
BREAK

TMPA
, TMPE
8s

tPOINT TO NEXT LOCATION
tHAVE WE TESTED ALL OF RAM?
iNO, TEST ANOTHER BYTE
+ELSE, SEE IF A tC HAS BEEN STRUCK

TRAP

C$BRK

s THEN PROCEED TO THE NEXT PHASE OF TESTING
007104
002444
002444

CLR
INC

ER47CT
TMP

BLT
JSR
173
0

24
RS,WRITEI

cMP

000007

004322

103001

TTMMP2,07

ERROR

104460

sRESET ERROR PRINT COUNT
+
ADVANCE TO NEXT DATA GEN. ALGORITHM CODE
tHAVE WE DONE ALL THE CODES WE'RE GOING TO DO?
tNO, THEN GO DO THIS PATTERN IN RAM
tELSE, CLEAR RAM LOCATION O00B3 (HEX) & EXIT
'
(THIS CONVERTS TO 00B3 HEX.)
;
(THIS WE HOPE, WILL CLEAR IT)
+ IF NO ERROR, PROCEED
:ELSE, REPORT IT

ENDTS1

L10037:

104401

TRAP

CSERROR

TRAP

CSETST

; RESET THE FOLLOWING THREE REGISTERS
023402
023406
023412
023416

005037
005037
005037
000207

002446
002464
002476

T9.RST:

WRITE,

CLR

TMP3

RTS

CLR
CLR
READ,

TMPA
TMPF

: TEST DATA PATTERN INDEX

:+RAM LOCATION ADDRESS
sRESET ALL ERROR FLAGS

& CHECK ONE LOCATION

MOV

RO, -(SP)

1 SAVE WORKING REGISTERS

023776

JSR

PC,.PATGEN

;:GENERATE ONE DATA PATTERN BYTE

002464
000020

MOV
cMP
BLO

023444
023446
023454
023456
023462

013700
020027
103412
020027
103007
023727
001055
005337
000452

cMP
BHIS
cMP
BNE
DEC
BR

TMPA,RO
RO,#SLTO
2s
RO,#SLTO+8.
2$
TMP2, 06
124
TMP3
12¢

:GET ADDRESS WHERE WE CAN CHECK IT MORE EASILY
:+IS ADDRESS BELOW THE SELECT REGESTER AREA?
:YES, GOOD.
IT CAN BE TESTED.
:+IS IT ABOVE THE SELECT REGISTER AREA?
:YES, GOOD.
IT CAN BE TESTED.

023464
023470

010037
010037

023500
023512

MOV

RO,4$

$;SETUP ALL POINTERS FOR THE CURRENT RAM LOCATION

023474
023500
023502
023504

004537
000000
002450

004310

JSR

RS,WRITE
0

tWRITE ONE BYTE OF THE TEST DATA
;#44% MODIFIED FROM ABOVE #seeas

BCS

:IF ERROR WRITING, FORGET

023506
023512
023514
023516

004537
000000
002452

004064

JSR
.WORD

RS,READ
O

;#4ee MODIFIED FROM ABOVE #esa

BCS

+ IF ERROR READING, FORGET THE REST

023420

010046

023422

004737

023426
023432
023436

023440

WRCRAM:

000030
002444
002446

2$:

103442

103435

8%:

MOV

. WORD
TMP4

TMPS

RO,8$

iNO, IF "INCREMENTAL“, BACK UP INDEX
:ELSE JUST BYPASS TEST

;DECREMENT INDEX TO WHAT IT WAS BEFORE “PATGEN“
:+

AND THEN BYPASS

:TEST DATA

;:READ

THE

TESTING

IN TMP4

THE REST

THAT BYTE BACK AGAIN

CNDMAAO DMV11 MCTRL DIAG #1
TEST

MACRO M1200

22-FEB-84

H9
15:22

PAGE 59-2

SEQ 0111

-- LOW RAM (00-OF) SCRATCHPAD

023520
023526
023530
023536
023540
023546

123737
001430
132737
001020
112737

023546
023554
023562
023570
4093 023576
4094
4095 023600
4096 023604
4097 023606
023612
023614

023610

000241
012600
000207

12%:
14%:

023616

010046

RCRAM:

023620

004737

023776

PC,PATGEN

:GENERATE ONE DATA PATTERN BYTE

023624
023630
023634
023636
023642
023644
023652
023654
023660

013700
020027
103412
020027
103007
023727
001046
005337
000443

002464
000020

TMPA,RO
RO,&SLTO

$GET ADDRESS WHERE WE CAN CHECK IT MORE EASILY
+ IS ADDRESS BELOW THE SELECT REGESTER AREA?
s YES, GOOD.
IT CAN BE TESTED.

023662

010037

023672

4119 023666
4120 023672
4121 023674
4122 023676

004537
000000
002452
103435

004064

023700
023706
023710
023716
023720
023726

001430
132737
001020
112737

123737

002450

4087
40838
4089
4090
4091
4092

4098
4099
4100
2101
4102
4103
4104
4105
4106
4107
4108
4109
4110
4111
4112
4113
4114
4115
4116
4117
4118

4123
4124
4125
4126
4127
4128
4129

023726
023734
023742
023750
4130 023756
4131
4132 023760
4133 023764

002450

002452

000002

002476

000002

002476

012737
012737
012737
012737
000402

000001
000027
015675
006724

002236

004737
000261
000401

007110

CMPB

0BIT1, TMPF
EMA7A,ERR47

002240
002242
002244

JSR

MOV
MOV
MOV
MOV

(SP)+,RO

tNORMAL EXIT - MAKE SURE THE ERROR FLAG IS CLEAR
tRESTORE WORK REGISTERS

:SAVE WORKING REGISTERS

002476

9s¢:

10¢:

s YES, GOOD.
IT CAN BE TESTED.
iNO, IF “INCREMENTAL"”, BACK UP INDEX

:ELSE JUST BYPASS TEST

:DECREMENT INDEX TO WHAT IT WAS BEFORE “PATGEN"

AND

THEN BYPASS

THE

TESTING

:SETUP POINTER FOR THE CURRENT RAM LOCATION

RS,READ
0

;READ THAT BYTE BACK AGAIN

8CS

14%

: IF ERROR READING, FORGET THE REST

CcMPB
BEQ
8ITB

TMP4
, TMPS

MOVB
GTDF

002236
002240
002242
002244

:IS IT ABOVE THE SELECT REGISTER AREA?

RO,8$

2%:

002452

o7 .EDF ,ERRTYP
#23 ,ERRNBR
#EMA7A ,ERRMSG
#ERR47 ,ERRBLK

2
RO,0SLTO.8.
23
TMP2, 06
12$
TMP3
12$

00247¢

007110

ONLY REPORT DATA

sELSE, CALL MONITOR & PRINT HEADING
;QUEVE UP THE ERROR MESSAGE
:
QUEUE "DEVICE FATAL” ERROR & 23

3 JUST PRINT DATA
H
€ SET THE ERROR FLAG
:
€ GO DIRECTLY TO THE EXIT "RTS"

PC,ERR47,

002446

004737
000261

s YES,

10$

002444

000001
000030
015735
006724

;DID WE READ WHAT WE WROTE?

tNO, HAVE WE ALREADY DONE THIS ERROR'S HEADER?

000030

012737
012737
012737
012737
000402

TMP4
, TMPS

12$
0BIT2, TMPF

4BIT2, TMPF
EM47B,ERR47

10§

JSR
SEC

PC.ERR47,

;#4ss MODIFIED FROM ABOVE #4ss

sWAS THIS LOC.

s YES,

sNO,

EXIT

STILL OK?

HAVE WE ALREADY DONE

THIS ERROR'S HEADER?

s YES, ONLY REPORT DATA
;ELSE, CALL MONITOR & PRINT HEADING
:QUEVE UP THE ERROR MESSAGE
QUEUE “DEVICE FATAL" ERROR 2 24
:
MOV
MOV
MOV
MOV

3 JUST PRINT DATA
;

€& SET

THE ERROR FLAG

&7 .EDF ,ERRTYP
#24 ,ERRNBR
®EM4
78 ,ERRMSG
#ERR4A7 ,ERRBLK

CNDMAAO DMVI1 MCTRL DIAG @1
TEST 9

MACRO M1200

22-FEB-84 15:22

PAGE 59-3

SEQ 0112
;

-- LOW RAM (00-0F) SCRATCHPAD

‘1§; 023766

000401

4136 023770

000241

4137 023772
:lgg 023774
1

12%:

012600
000207

148

14%

CcLC

MOV
RTS

€ GO DIRECTLY TO THE EXIT

"RTS”

sNORMAL EXIT - MAKE SURE THE ERROR FLAG IS CLEAR

(SP)+,RO
PC

tRESTORE WORK REGISTERS

4140

1000808888 08802088008080800008840000000000000000080800800000000080000040000000004002

4142

4141

: PATGEN -- SUBROUTINE TO GENERATE A TEST DATA BYTE FOR A SPECIFIC ELEMENT

4143

4144

4146

4145
4147

4148

:
:

4163

TEST PATTERN CODES:

1
2
3
4
S

------

ALL ONES
ALL ZEROES
1 BIT ALTERNATING
2 BITS ALTERNATING
ADDRESS IN ADDRESS

6 -- INCREMENTAL

(INDEX IN ADDRESS)

THE TEST PATTERN INDEX INDICATES HOW FAR INTO THE TEST PATTERN STRING OF
BYTES WE ARE.
I.E. IT SPECIFIES THE NUMBER OF THE BYTE OF THE WHOLE STRING

OF BYTES COMPOSING THE COMPLETE TEST PATTERN.

:--o.coooooooooooooo‘oooooooooooooooooaoooooo‘ao‘oooc‘oooooocooooooooooooooooooo

4164
4165

4167 023776

023727

002444

4170 024010

023727

002444

000004

4173 024022

023727

002446

000006

:{;g 024034

000404

4178 024036
:{;g 024044

112737
000443

000377

4181 024046
:{gg 024052

105037
000440

002450

132737

000001

002446

112737

000125

002450

000252

002450

002414
001417
002416
001431

002441
001444

4185 024062

001404

4187 024072
4188 024074
4189 024102

000430
112737
000424

4190

PC,.PATGEN

:%gé

4186 024064

:
:
H
3
:

4159
4160

4184 024054

JSR

:{g;

4174 024030
4175 024032

4152
4153
4154
4155
4156

4171 024016
4172 024020

4150
4151

4168 024004
4169 024006

4149

4166 023776

CALLING SEQUENCE:

002450

PATGEN:

CcMP

TMP2, 82

BLT
BEQ

1
2$

cMP

TMP2, 04

;DECODE

THE

TEST PATTERN IDENTIFIER

30, 1, OR NEGITIVE WILL GIVE
i2 = "ALL ZEROES*"

"ALL ONES*"

BLT
BEQ

3
43

:3
:i4

=
=

“1 BIT ALTERNATING"
"2 BIT ALTERNATING PATTERN"

BLT
BEQ

S5$
68

;1S5
:6

=
=

"ADDRESS IN ADDRESS*
"INCREMENTAL”
(INDEX

;UNDEFINED =

1%:

MOvVB
BR

: "ALL ONES"” DATA PATTERN

2%:

CLRB
BR

TMP4
60$

;1 "ALL ZEROES" DATA PATTERN

3$:

BITB

cMP

01,TMP3

1”1 BIT ALTERNATING" PATTERN

20$

;s IF EVEN,

BR
MOVB
BR

60%
9252, TMP4
60$

;

PATTERN:

10101010

PATTERN:

01010101

0125, TMP4

IN ADDRESS)

"ALL ZEROE.,"

BEQ

MOVB
20%:

TMP3, 06

USE

"252*

; IF ODD, USE "125"

CNDMAAO DMV11 MCTRL DIAG #1
TEST 9

MACRO M1200

22-FEB-84

.- LOW RAM (00-OF) SCRATCHPAD

4191
4192
4193
4194

024104
024112
024114
024122
4195 024124
4196 024132

4197
4198 024134

4199 024142
4200
4201 024144
4202 024152
4203
4204 024154
4205 024160
4206
4207

132737

000001

002446

112737

000063

002450

112737

000214

002450

001404

000414

000410

BITB

BEG
MOVB

22%:

002464

002450

S5$:

113737

002446

002450

6%:

005237
000207

002446

000400

PAGE 59-4

SEG 0113

113757

000404

15:22

60§
:
62%:

MOVB
BR _-'

MOVB

21,TMP3

224

0063, TMP4
604
0214,TMP4
604

1”2 BIT ALTERNATING” PATTERN
+ IF EVEN, USE "214"
+ IF ODD, USE "063"

PATTERN:

11001100

PATTERN:

00110011

B8R

60%

TMPA, TMP4

: “ADDRESS IN ADDRESS”

MOVB

TMP3, TMP4
604

s "INCREMENTAL”

TMP3
PC

s INCREMENT PATTERN INDEX FOR NEXT CALL

LINC

. RTS

(INDEX IN ADDRESS)

CNDMAAO DMV11 MCTRL DIAG 1
TEST

4279

MACRO M1200

22-FEB-84 15:22

PAGE 60

sEQ
0114

DATA RAM MOVING INVERSIONS (LOC'S 0018-01FF HEX)

.SBTTL TEST 10 -- DATA RAM MOVING INVERSIONS (LOC'S 0018-01FF HEX)
1008280080520

0 00

AR RRR AR AR

R AR AR AR R AR R R AR R AR AR AR AR AR AL AR d b kbbbt bbbt bbbtk

TEST

DATA RAM MOVING INVERSIONS

(LOC’'S 0018-01FF HEX)

:* GENERAL DESCRIPTION:

;#
FIRST, THE 2K BYTE LOCATIONS IN RAM ARE LOADED WITH 0'S (SEE NOTE BELOW).
s* THEN, THE FIRST LOCATION IS READ AND CHECKED, A SINGLE 1 IS WRITTEN INTO
;¢ THE LOW BIT POSITION, AND THIS IS READ AND CHECKED. THIS IS DONE FOR ALL
s EEEE?I%: THE RAM, BY INCREMENTING THE ADDRESS TO POINT TO THE NEXT RAM

s#
THEN, THE NEXT BIT POSITION IS CHOSEN TO INSERT A 1, AND ALL LOCATIONS
:* ARE READ, WRITTEN, AND READ AS BEFORE. THIS IS CONTINUED FOR ALL BIT
:# POSITIONS UNTIL THE ENTIRE RAM IS WRITTEN TO ALL 1'S. THE ABOVE OPERATIONS
:+* ARE PERFORMED A SECOND

:#
;¢
;#
;*
i
;¢
i1

TIME,

WITH O'S

INSERTED

;% NOTE:
s+

INTO

THE RAM INSTEAD OF

1'S,

THIS RESULTS IN THE ENTIRE RAM BEING WRITTEN TO ALL 0'S.
THIS TEST CONSTITUTES A THOROUGH TEST OF THE RAM. IT IS CAPABLE OF
DETECTING THE FOLLOWING FAULTS :
STUCK ADDRESS BITS, UNI- AND BI-DIRECTIONAL COUPLING BETWEEN ADDRESS BITS, STUCK MEMORY BITS, AND UNI- AND
BI-DIRECTIONAL COUPLING BETWEEN MEMORY BITS IN BOTH ROWS AND COLUMNS OF THE
MEMORY MATRIX.
THIS TEST DOES NOT CHECK LOCATIONS 0010-001F,

SO THAT

THE PRIMARY

CSR'S

:* ARE NOT WRITTEN. IT DOES TEST LOCATIONS 0000-000F (SCRATCHPAD RAM) AND
;* LOCATIONS 0020-002F

(SECONDARY

CSR'S),

AS WELL AS 0030-0800 (BASIC RAM).

;#
:*

THE "TMP&" REGISTERS ARE USED HERE TO CONTAIN THE VARIOUS CONSTANTS &
VARIABLES USED THROUGHOUT THIS TEST.
A LIST OF THEIR ASSIGNMENTS SEEMS

;* USEFUL SO HERE IT IS:

T
HL

TMPO

POINTS

THE

FIRST

LOCATION AFTER

THE

SELECT REGISTERS.

TMPL

TMP2

TEST PATTERN ID CODE

TMP3

TEST DATA PATTERN

UNUSED BY

THIS

TEST.

i e

INDEX

UNUSED BY

THIS

TEST.

i *

i 4

TMP4

is
ie

1 &

i e

i e
ie
14

TEST DATA PATTERN.

THE HIGH BYTE

THE PATTERN BEING WRITTEN

ON ANY GIVEN PASS AND THE LOW BYTE IS THE PATTERN THAT WAS
WRITTEN BY THE PREVIOUS PASS THROUGH THE RAM,
TMPS

DATA READ FROM

TMP6
TMP7
TMP8

“---------

TMPA

RAM

ADDRESS

TMPB

BIT

POINTER.

TMP9

THE RAM.

ONLY

THE

LOW BYTE

IS USED.

BEING

TESTED.

1 *

;e
i 4

NUMBER

THE

BIT

WITHIN

THE

DATA FIELD WHICH

BEING SWITCHED ON EACH WRITE WITHIN THE CURRENT PASS.
TMPC

DATA FLAG.

BIT

O OF

THIS

WORD

THE

VALUE

TO WHICH

THE

BIT

L9
CNDMAAO DMV11 MCTRL DIAG @1
TEST

MACRO M1200

22-FEB-84

15:22

PAGE 60-1

SEQ 0115

-- DATA RAM MOVING INVERSIONS (LOC'S 0018-01FF HEX)
T

ggggTIFIED IN TMPB IS BEING SET ON EACH WRITE

IN THE CURRENT

i s
HL

TMPD

DIRECTION SWITCH.,

TMPE

LAST VALID ADDRESS TO BE TESTED.

TMPF

ERROR FLAGS. BIT 1 SET = THE LAST DETECTED ERROR WAS THE READ
OF THE PREVIOUS DATA BEFORE WRITING THE NEW DATA.
1IF BIT2 IS
SET, THE READ AFTER WRITE FAILED.
IF EITHER IS SET WHEN AN
ERROR IS DETECTED, THE SUPER''"SOR IS NOT CALL'D AND THEREFOR
IT'S ERROR COUNTER WILL NOT . .FLECT THE ERROR -- INSTEAD, THE
DATA LINE IS PRINTED.
(UNLESS THE ERROR HANDLER'S DATA LINE
PRINT COUNT HAS EXCEDED ITS LIMIT -- IN WHICH CASE ITS
INVOCATION IS IGNORED.)

1 ®

O = FORWARD

NON-ZERO = BACKWARD
(I.E.

THE END OF RAM)

i
i
1
i
s
i*
i
i
L)

: c B2 0200000000000 00 0000000000000 0008080 8800800400000 AR AR AR
:

024162
4280 024162
4281 024166

4282 024170

4283

4284
4285
4286
4287
4288
4289
4290
4291
4292
4293
4294
4295
4296
4297
4298
4299
4300
4301
4302
4303
4304
4305
4306

024170
024172
024172
024174

024176

004737
103003

003762

104410
000744

000030
003777

024216
024222

005037
012737

002476
177777

002462

PC,MSTCLR
1

T10::
sINIT DMV € ENTER M-LOCP
:IF NO ERROR, PROCEED WITH TESTING

ESCAPE

TST

ACTUAL

INITIALIZE OUTER LOOP

005037

024244

024240
024244

004537
000000

004322

024250
024252
024252
4307 024254

103003

024246

024254
024256
4308 024260
4309 024264

012703

104460

104410
000662
005237
077313

024244

INVERSIONS

ALGORITHM

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10040-.

==3szs=z3z223333ss3S23TSTSTISISSTI==3

---cccccccccecerrccccecencecececcccnncnnnnx

MOV
MOV

#24.,TMPO
€2047. , TMPE

sINIT. POINTER TO 1'ST RAM LOC. AFTER SEL REG'S
; IDENTIFY LAST ADDRESS TO BE TESTED

002470

CLR
MOV

TMPF
¢-1,TMPC

;ERROR FLAG -- INDICATE NO ERRORS YET
;DATA = 1'S FIRST

CLR

000020

000000

& EXIT TEST

RRAAS

002440
002474

H
024234

MOVING

;ELSE, REPORT ERROR

j==ssazsssss

ARAL
L LER

024230

4310

JSR
BCC

1$:

012737
012737
005037

BGNTST

ERROR

104460

024176
024204

024212

TMP9

INITIALIZE THE AREA BEING TESTED BY CLEARING IT TO ZEROES

ZERO OUT LOCATIONS O THROUGH 10 (HEX) -- THOSE BELOW THE SELECT REGISTERS
CLR

; INITIALIZE ADDRESS

JSR
.WORD

RS,WRITEI
0

:ZERO OUT LOC'S 0 -->
:
ADDRESS

BCC
ERROR

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

INC
S0B8

3
R3,2$

;POINT TO NEXT LOCATION
: IF MORE TO BE DONE, DO IT

MOV
2s:
3s:

--------

#SLTO,R3

:RAM ADDRESS OF BSELO WILL DO AS BYTE COUNT

10 (HEX)

DATA

AND EXIT THIS TEST

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10040-.

CNDMAAO DMV11 MCTRL DIAG #1
TEST

4311
4312
4313
4314
4315
4316
4317
4318
4319
4320
4321
4322

4342
4343
4344
4345
4346
4347

4348

4349
4350
4351
4352
4353
4354
4355
4356
4357
4358
4359

22-FEB-84

15:22

PAGE 60-2

SEQ 0116

-- DATA RAM MOVING INVERSIONS (LOC'S 0018-01FF HEX)

+
024266
024274

013737
013703

024304

005203

163703

002440

024306

004537

004322

024314

000000

024300

024312

024316
024320
024320
4323 024322
024322
4324
4325
4326
4327
4328
4329
4330
4331
4332
4333
4334
4335
4336
4337
4338
4339
4340
4341

MACRO M1200

000000

MOV
MOV

024332

077313

005237

024312

105037

002450

TMPO,64
TMPE ,R3

+FIRST LOCATION OF TEST AREA (18 HEX)
:START WITH "LAST ADDR. TO BE TESTED” AND CALC.

INC

JSR

RS,WRITEI

+ZERO OUT THE ALL OF

8CC
ERROR

.+10

+ IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

INC

sPOINT TO NEXT LOCATION

CLRB

TMP4

: THIS IS WHAT WE JUST SET ALL RAM LOCATIONS TO

SsuB

4s:

6%:

104460
104410
000614

024334

024312

103003

024324

024326

002440
002474

ZERO OUT THE REST OF RAM -- ALL LOC'S ABOVE THE SELECT REGISTERS

.WORD

005037
005037

sS08

§recmmeeee-

024340
024344

TMPO,R3

002472
002466

8%:

R3,4%

tTHE & OF LOCATIONS TO BE TESTED (800-18 (HEX))
(THIS MAKES SURE WE GET EVERY SINGLE BYTE)

TMPD
TMPB

005037
112737

002464
000001

CLR
MOVB

002451

024362

024364
024366
024366
024370
024376
024402
024404
024406
024410
024410
024412
024412
024414

000240

10¢$:

000240

104422
013737
004537
000000
002452
103003

002464
004064

024402
40$:

104460
104410
000524

024440
024442

024450

000240
000240
123737
001421
032737
001010
012737

002452

002450

000006

002476

000002

002476

C$ERROR

TRAP
.WORD

C$ESCAPE
L10040-.

~----<-cccccccccccacaccccccccccceceaaannnnn

:“SET FWD SEQUENCE"
(DIRECTION FLAG)
: “SET BIT POSITION = 0"
(BIT POINTER)

S“SETlgDaEESS ;OO"

BUT OUR MEMORY STARTS @

INITIALIZE ADDRESS POINTER
;INITIALIZE CURRENT & NEXT DATA BYTES

“READ CURRENT ADDRESS"”

<------e---cccccccccccnccnccccccccccccccacen-

NOP

NOP
BREAK

+FIRST

MOV
JSR
0
TMPS
8CC
ERROR

TMPA,40$
RS ,READ

ESCAPE

TST

goc-cce-e024416
024420
024422
024430
024432

TMPA
#8ITO,TMP4 .1

TRAP

:IF MORE TO BE DONE, DO IT

024350
024354

TEST AREA

AND EXIT THIS TEST

BEGINNING OF OUTER LOOP

CLR
CLR

THE

NOP
NOP
CMPB
BEQ
BIT

BNE
MOV

GEDF

.+10

tC HAS BEEN STRUCK BY OPERATOR
TRAP
C$BRK
iNO,
PUT ADDRESS INTO READ CALL
:GO READ ONE LOCATION
;4#s4s MODIFIED ABOVE #++s (ADDRESS)
+ADDRESS OF DATA READ
: IF NO ERROR, PROCEED
:ELSE, REPORT IT
TRAP
CSERROR
:
AND EXIT THIS TEST
TRAP
CSESCAPE
.WORD
L10040-.

CHECK DATA (FIRST TIME)

YHPS TMP4
12
OBITIoBITZ TMPF

OBITI TMPF

EM48A, ERRAS

SEE

IF A

------c-ccccccccencccncccccccncccccccnana-

1CHECK AGAINST EXPECTED DATA
: IF OK, PROCEED
aNO.
HAS AN ERROR ALREADY BEEN REPORTED?

s YES,
iNO,

JUST PRINT DATA IF WANTED
SET FLAG FOR NEXT TIME

AND PRINT COMPLETE ERROR MESSAGE
“DEVICE FATAL" ERROR & 25

CNDMAAO DMV11 MCTRL DIAG #1
TEST

MACRO M1200

22-FEB-84 15:22

et S
1

-- DATA RAM MOVING INVERSIONS (LOC'S 0018-O1FF HEX)

024450
024452
024454
024456
024460
024462

024470

104455
000031
016016
007632
000405
012737

004737

000002

010030

002476

428:

BR
MOV

123
0BIT1, TMPF

JSR

024474
024502
024506
024510
024512
024514
024514
024516
024516
024520

013737
004537
000000
002451
103003

002464
004310

024506

12%:
44s:

104460
104410
000420

WRITE NEW DATA

MOV
JSR
,WORD
TMP4 +1
BCC
ERROR

TMPA,44$
RS,WRITE
©

ESCAPE

TST

jocescaccns

024522
024530
024534
024536
024540
024542
024542
024544
024544
024546

013737
004537
000000
002452
103003

002464
004064

024534
46%:

104460

MOV
JSR
.WORD
TMPS
BCC
ERROR

joocesccnee

024550
024552
024554
024562

024564
024572
024574
024602

024602
024604
024606

024610
4394 024612
4395
4396 024614

024622

4399
4400
4401 024626

000240
000240
123737
001421
032737
001010
012737

002451

002452

000006

002476

000004

002476

NOP
NOP
CMPB
BEQ

BIT
BNE

MOV
GEDF

.+10

012737

004737

sNEW DATA ELEMENT RESIDES IN TMPD.+1
:IF_NO ERROR, PROCEED
:ELSE, REPORT IT
TRAP
:
AND EXIT THIS TEST
TRAP
.WORD

TMPA,46$
RS,READ

:GET ADDRESS FOR THIS READ
sREAD DATA JUST WRITTEN

.+10

:IF NO ERROR, PROCEED
:ELSE, REPORT IT

TST

AND EXIT

CHECK NEM DATA VALUE

TMPA+1,TMPS
143
OBIT1+8IT2,TMPF
48s
0BIT2, TMPF
EMA4BA,ERR4S

000004

010030

002476

48%:

MOV

JSR

THIS TEST

148:

NOP

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10040-.

:DID THE WRITE WORK CORRECTLY?
iYES,
PROCEED WITH TESTING
;NO,
HAS AN ERROR ALREADY BEEN REPORTED?
:YES, ONLY USE ERROR HANDLER -- NO HEADER PLEASE
iNO,
INDICATE THAT WE'RE PRINTING A MEADER HERE
iREPORT RE-WRITE ERROR

“DEVICE FATAL" ERROR & 26
TRAP

:PROCEED WITH TESTING

OBIT2, TMPF

:INDICATE A “POST* WRITE ERROR

“FORWARD SEQUENCE

C$ESCAPE
L10040-.

----vccceccccccccncancncanceccacccacaccncannna.

143

PC.ERRAS8.

C$ERROR

- ----=cceccececcacmaceecencaccaacanaanax

joosccanans

000240

sGET_THIS ADDRESS FOR THIS WRITE CALL
iWRITE THE UPDATED DATA IN THIS LOCATION

CS$ERDF
25
EM48A
ERR48

= -cccmn
i aceacecc
ccm
icccccca
ece
ccacaaaa
ce
nnas

104455
000032
016016

007632
000405

TRAP
.WORD
.WORD
.WORD

1USE ERROR HANDLER ONLY -- NO HEADER

RE-“READ CURRENT ADDRESS”

ESCAPE

104410
000372

sPROCEED WITH TESTING
:INDICATE A "PRE” WRITE ERROR

PC,ERR48.

josscccsccs

4397
4398

PAGE 60-3

.WORD
.WORD
.WORD

CSERDF
26
EM48A

ERR48

:JUST REPORT DATA -- NO HEADER

---c---ccccccccecancancencnaasccncncacnan

CNDMAARO DMV1Il1 MCTRL DIAG @1
TEST

MACRO M1200

005737
001056

002472

TST
BNE

4406

4407

024636

4409 024640
4410 024646

4411 024650

4412
4413
4414
4415
4416 024654
4417 024662
4418 024664

4419 024672

4420 024674
aa2)
4422
4423
4424 024676
442s 024700
4426 024704
4427 024712
4428 024714
4429 024720
4430 024724
443) 024732
4432 024736
4433 024740
4a3a 024744
4435
4436
4437
4438 024750
4439 024752
4440 024756
4441 024762
4442 024764
4443 024770
44as
4445
4446
4447 024772
4448 024774
4449 025000

4450 025002

4a5)
4452
4453
4454
4455
4456
4457
4458

15:22

B10

PAGE 60-4

S5C€Q 0118

DATA RAM MOVING INVERSIONS (LOC'S 0018-01FF MEX)

4402 C24630
4403 024634
4404
4405

4408

22-FEB-84

000240
023737

001413
005237

002464

002474

002464

16%:
S0$:

022737
101237
023737
101633
000765

000240
005037
023727
002016
005237
005037
113737
013700

006000
106137
000137

000240
005037
005137
0C1756
005137
000755

000020

002464

002440

002464

010024
002466
002466
002464
002451
002470

002451
024362

S1%:

eeena

18s:

NOP
CLR
cMP
BGE
INC
CLR

24s:
57%:

MOVB
MOV

ROR
ROLB
JMP

ceea

208

NOP
CLR
coM
BEQ
coM
BR

002472

005337

268 :

002464
002464

528

i
i
025006
025014
025016
025024

cMP
BHI
cHP
BLOS
BR

000240
005737
001413

022737
101031
023737
101425

000020

002464

002440

002464

1 FORWARD

PROCESS FORWARD SEQUENCE

TMPA, TMPE

“"LAST

1WAS THIS ADDR.

183
TMPA

IS, WE WON'T USE IT

-1

002466
002470

tCHECK DIRECTION -- O = FORWARD
tREVERSE ==+> PROCESS REVERSE ADDRESSING

s YES,
1NO,

ADDRESS"TM

- --cvvvcovocoouwonn
..
.

THE LAST ONE?

THEN CHECK THE BIT POSITION
THEN INCREMENT THE ADDR.

HERE WE MAKE SURE THE ADDRESS IS NOT WITHIN THE SELECT REGISTER AREA.

000007

002450

NOP
cHP
BEQ
INC

TMPD
268

NOP
TST
BEQ
DEC

oSLTO, TMPA
10
TMPO, TMPA
10
SO0
“FWD"

SEQUENCE

+1IS IT BELOW THE AREA WE CAN'T CHECK?
sYES, THEN WE CAN CHECK THIS LOCATION
+1IS IT BELOW THE BOTTOM ADDRESS?
iNO,
TEST THIS LOCATION
1YES, PERFORM THE INCREMENT AGAIN
--

ER4BCT
TMPB,07
208
TMPB
TMPA

SEBEER

“LAST BIT POSITION?”

tUSE “NEXT” DATA AS
tUSE ONE BIT OF THE

RO
TMP4 .1
10

TMPA
288
TMPA

---ccccvoomaaan
...

“CURRENT" DATA
“DATA" SWITCH TO

=«

"PATE

ccisiids
i
rand
smbiy s vens
e e

sPOINT TO BIT O,
sSWITCH DATA,
IF 1'S, DO 0'S;
1 IF WENT TO FORWARD, .....
1SWITCH DIRECTION
1ELSE, BACKWARD.....
SEQUENCE

$tBUILD A NEW “NEXT" DATA VALUE
:
€ TEST IT

TTMMPB
TMPC
24
TMPD
57%
"BKWD"”

tRESET ERROR PRINT COUNT
:DID WE JUST PROCESS THE LAST BIT POSITION?
sYES, THEN WERE WE DOING 1'S OR 0'S
sNO,
THEM INCREMENT THE BIT COUNTER
sRE-INITIALIZE ADDRESS POINTER

TMP4.1,TMPS
TMPC,RO

TAD”

-- BUT GO BACK AND DECREMENT TO THE NEXT ADDRESS AGAIN.

"ADDRESS

02"

IF 0'SDO

- -------.-..

tHAVE WE JUST PROCESSED THE FIRST
1YES,
CHECK BIT POSITION
i1NO,
DECREMENT THE ADDRESS

ADDRESS?

HERE WE MAKE SURE THE ADDRESS IS NOT WITHIN THE SELECT REGISTER AREA.
IF IT
IS, WE WON'T USE IT -- BUT GO BACK AND DECREMENT TO THE NEXT ADDRESS AGAIN.

S6%:

CMP
BHI
CcMP
BLOS

oSLTO, TMPA
584
TMPO, TMPA
58

$IS IT BELOW THE AREA WE CAN'T CHECK?
$YES, THEN WE CAN CHECK THIS LOCATION
$IS IT BELOW THE BOTTOM ADDRESS?
iNO,
TEST THIS LOCATION

CNDMAAO DMV11 MCTRL DIAG @1
TEST

22-FEB-84

15:22

4459 025026

000765

BR
R

025030
025032
025036
025044
025046
025052
025060
025064
025066
025072
025100

4476
aa77 025104
4478 025106
4479 025112

4480 025114
4481 025120
4482
4483
4484

SEQ 0119

000240
005037
022737
002417
005237
113737
013700
006000
106137
013737
000137

010024
000007

28%:
002466

002466
002451
002470

002450

002451
002474
024362

002464

29%:

58%:

002470

308:

002466

ERABCT
e7,TMPB
30%
TMPB
TMP4 .1, TMP4
TMPC,RO
RO
TMP4 .1
TMPE , TMPA
10

"BKWD" SEQUENCE - -

NOP
com
BNE
CLR
BR

§-cmemmean

4486 025122
4487 025124
4488 025130
4489 025132
4490 025134
449) 025136

025136

4492 025140

025140
025140

1YES,

"BKWD" SEQUENCE - -

NOP
CLR
CMP
BLE
INC
MOVB
MOV
ROR
ROLB
MOV
JMP

fressvesnes

000240
005137
001003
005037
000754

524

TTMPC
324
TTMMPB
298
usrw "

PERFORM THE DECREMENT AGAIN

“LAST BIT POSITION"

tRESET ERROR PRINT COUNT

sLAST BIT POSITION?

1 YES, CHECK DATA
1NO,
INCREMENT BIT POINTER,
tUSE

“"NEXT" DATA AS

tUSE ONE BIT OF THE

"CURRENT” DATA

“DATA” SWITCH TO

tBUILD A NEW “NEXT" DATA VALUE
3
POINT TO LAST ADDRESS AGAIN,
€ TEST IT
!
MEATER

sanse cenecnns whwdns snes inbnsesde

00C240
004537
000173
000000
103001

004322

32%:
38¢:

NOP
JSR
173
0
8CC

ERROR

..................

104460

ENDTSY

RS,WRITEI

..................

.EVEN

.....

sCLEAR RAM LOCATION OOB3 (HEX) & EXIT

:
:

(THIS CONVERTS TO 0083 HEX.)
(THIS WE HOPE, WILL CLEAR IT)

s IF NO ERROR, PROCEED
tELSE, REPORT IV

s THATS

ALL

FOLKS!

L10040:

104401

1SWITCH DATA TYPE
tNOW 1'S -- CHECK ADDRESS'S “LSB"
¢NOW 0'S -- POINT TO BIT POSITION O AGAIN
:
RESET ADDRESS & TEST IT
..................

4485

4493
4494

Cl10

PAGE 60-5

DATA RAM MOVING INVERSIONS (LOC'S 0018-01FF HEX)

4460

a4e1
4462
4463
4464
4465
4466
4467
4468
4469
4470
447}
aa72
3473
aa74
4475

MACRO M1200

TRAP

CS$ERROR

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG o1
TEST

MACRO M1200

22-FEB-84

D10
15:22

PAGE 61

SEQ 0120

VIA REGISTER ADRESSING

4520

.SBTTL TEST 11

-- VIA REGISTER ADRESSING

'o0‘...“‘.0.0..“‘.“fi.‘...“‘.‘..“““

.‘....“‘...‘.“.‘...0‘0“...“.“.00

i e

TEST 11

:‘

VIA == “6522 VERSATILE INTERFACE ADAPTER"

1
i¢
1

A MASTER CLEAR IS PERFORMED, NEXT, TIMER 1
LATCHES
ARE CLEARED BY WRITING 000 INTO VIA REGS 6 & 7
THEN, 377 IS LOADED INTO DATA DIRECTION REGIST
ERS A,

-- VIA REGISTER ADRESSING

s# SET THE PORT PINS FOR OUTPUT MODE.

THEN,

A DIFFERENT BYTE

DATA PATTERN C

IS WRITTEN

(DDRA,DDR8)

INTO EACH VIA

3¢ LOCATION, (EXCEPT THE TIMER REGS 4,5,10,11 OCT) AND AFTER EACH IS WRITTEN,

3¢

ALL

VIA REGS

(EXCEPT

4,5,10,11)

ARE

READ AND COMPARED

TO EXPECTED

s+ CONTENTS. NOTE THAT SOME VIA REGS ARE ALTERED BY THE LOADING OF OTHERS,
i
AND

THE PROGRAM

i VALUES.

TAKES

THIS

AS GENERATING OUTPUTS

ON CA1,

s INTERRUPT REQUESTS).

INTO ACCOUNT,

THE

SETTING OF

EXPECTED REG

THE DATA PATTERN IS CHOSEN TO AVOID ACTIVATING THE VIA CHIP (SUCH

DATA PATTERN C

CA2,

CB1,

(WITH VIA REGS AND

100,

101,

377,

CB2,

OR CAUSING 6502

iHEIR DATA SHOWN

106,

107,

112,

040,

IN OCTAL)

042,

000,

200,

117

s NEXT, 000 IS LOADED INTO DDRA, AND DDRB IS READ AND COMPARED TO 377. THEN,
3¢ THE 377 IS LOADED BACK INTO CORA, AND DDRB IS LOADED WITH 000 AND DDRA IS

i¢ READ AND COMPARED

377.

:--.‘...“‘.‘.“.......‘.“...‘....‘..“.“‘...‘.‘.‘..‘.‘“‘.‘.“...‘.‘.‘.‘.C.
H

025142

4521 025142
4522 025146
4523 025150
4524
4525
4526
4527
4528
4529
4530

025150

025152

025154
025160
025162
025164
025166

025166
4531 025170

4532
4533
4534
4535
4536

025172
025176
025200
025202
025204
N25204
4537 025206
4538

4539
4540
4541 025210
4542 025214
4543

;
004737
103002

003762

104460
000537
004537
120007
000000
103002

004322

18:

PC.MSTCLR
1

:IF NO ERROR, PROCEED
;ELSE,
REPORT IT AND

JSR

RS,WRITEI

;CLEAR THE TIMER 1 LATCHES

8CC

208

51LL
ERROR

004322

308

104460
200530

JSR

8CC
ERROR

10446(
000546

004537
120006
000000
103002

BGNTST

B8R

sINIT DMV AND START UP THE MAINT. LOOP

EXIT THIS CLEAR

TRAP

CSERROR

TRAP

CSERROR

TRAP

CSERROR

:IF AN ERROR OCCURED,

;REPORT

IT &

JSR
51LH

RS,WRITEI

BCC
ERROR

318

+IF AN ERROR OCCURED,
:REPORT IT &

EXIT

i LOAD UP THE VIA'S REGISTERS WITH THE FIXED DATA STREAM OF PATTERN “C*
013703
012702

002556
002560

31¢:

MOV

PATC,R3

OPATC+2,R2

$GET COUNT OF @ OF WRITES
iSETUP POINTER

TO BE PERFORMED

TO REGISTER ADDRESSES & DATA

CNDMAAO DMV11 MCTRL DIAG 01
TEST

012737
152237
112237

120000
025242
025244

025236
025242
025244

004537
000000
000000

004322

025246
025250
025250

103002

4554
4555
4556
4557
4558
4559
4560
4561
4562
4563
4564
4565
4566
4567

025252
025254

025242

2%:

4s3:
S$:

104460
000506
077317

32%:

15:22

E10

PAGE 61-1

SEQ 0121

MOV
B8ISB
MOvB

Q0RB,4
(R2)+,48
(R2)+,5%

+ADDRESS OF FIRST REGISTER
tOR_IN REGISTER & TO BUILD REGISTER ADDRESS
s THIS IS THE DATA WE WANT TO WRITE

JSR
0
0o

RS,WRITEI

tWRITE ONE REGISTER WITH THE DESIRED DATA
144+ MODIFIED FROM ABOVE ##s¢
DESTINATION ADDR.
144+ MODIFIED FROM ABOVE e+
DATA

8CC
ERROR

324

+ IF_ AN ERROR OCCURED,
+REPORT IT &

BR
so8

258
R3,2¢

s
EXIT
tLOOP UNTIL

TRAP
THE WHOLE

CS$ERROR

TABLE HAS BEEN WRITTEN

+ READ BACK THE VIA'S REGISTERS
025256
025262
025270

012703
012737
012737

000020
120000
003122

025276
025302
025304
025306
025310
025310
4568 025312

004537
000000
000000
103002

004064

104460
000466

025314
025320
025324

005237
005237
077314

4569
4570
4571
4572
4573
4574
4575
4576
4577
4578
4579
4580
4581

22-FEB-84

VIA REGISTER ADRESSING

4544 025220
4545 025226
4546 025232

4547
4548
4549
4550
4551
4552
4553

MACRO M1200

025302
025304

68:
7%:
8%:

33s:

MOV
MOV
MOV

OPATCM-PATCR,R3
@0RB, 73
oBT1,8

;GET COUNT OF @ OF REG'S TO BE READ
sADDRESS OF FIRST REGISTER
1DESTINATION BUFFER AREA

JSR
0
0
8CC
ERROR

RS,READ

25%

tREAD ONE REGISTER
i4ss MODIFIED FROM ABOVE s+«
SOURCE ADDRESS
i%+s MODIFIED IN LINE «s+ DESTINATION ADDRESS
: IF_ AN ERROR OCCURED,
sREPORT IT &
TRAP
CSERROR
s
EXIT

INC
INC
S08

78
8s
R3,6%

sPOINT TO NEXT REGISTER
sPOINT TO NEXT BUFFER LOCATION
sLOOP UNTIL ALL REGISTERS HAVE BEEN READ

33¢

i CHECK THE VALUES READ AGAINST
025326

025332
025336
025342
025346

012701

012702
012704
012705
012703

025352

005037

4583 025356
4584 025360
4585 025362

012114
012200
074014
042524
001402
005237

025364
4587 025366
4588 025370
4589 025374
4590
4591 025376
4592 025402
4593 025404

025404
025406
025410
025412

077310
005737

001406
104455
000033
015243
005650

002604

MOV

003122
003206
002624
000010

MOV
MOV
MOV
MOV

002332
9s:

002332
10%:
002332

sPOINTER TO EXPECTED DATA VALUES

CLR

#8T1,R2
0B8T2,R4
OPATCM,RS
08.,R3

ERRFLG

tPOINTER TO DATA READ
sPOINTER TO “XOR" VALUES
tPOINTER TO "MASK" VALUES
tNUMBER OF WORDS TO BE PROCESSED
tRESET THE ERROR FLAG

MOV
MOV
XOR
8IC
BEQ
INC
S08

(R1)+,(R4)
(R2)+,RO
RO,(R4)
(R5)+,(R4).
108
ERRFLG

R3,9¢

iGET EXPECTED VALUE (2 BYTES AT A TIME)
$GET ACTUAL VALUE AND SETUP FOR “XOR"
+DEVELOPE "XOR"
:CLEAR THOSE BITS WE DON'T CARE ABOUT
s IF NO ERROR, SKIP NEXT INSTRUCTION
+IF ERROR,
SET FLAG TO SAY SO!
iLOOP UNTIL ALL VALUES CHECKED

TST

ERRFLG

tWAS THERE AN ERROR DETECTED?

BEQ
GEDF

OPATCR,R1

THE EXPECTED VALUES

12%
EM20,ERR6

tNO,
i YES,
;

PROCEED WITH TESTING
REPORT A VIA REGISTER ERROR
“DEVICE FATAL" ERROR @ 27
TRAP
.WORD
.WORD
.WORD

CSERDF
27
EM20
ERR6

CNDMAAO DMV11 MCTRL DIAG @1

F10
22-FEB-84

15:22

PAGE 61-2

SEQ 0122

-- VIA REGISTER ADRESSING

4594 025414
025414
025416
4595
4596
4597
4598 025420
4599 025424

4600 025426
4601 025430
4602 025432

104410
000344

004537
120003
000000
103002

025432
025434
025436
025442
025444
025446
025450
025450
4609 025452
4610 025454
4611 025460
4612 025462
4613 025464
4614 025466
025466
4615 025470
4616 025472
4617 025476
4618 025500
4619 025504
4620 025512

104460
000415
004537
120002
000000
103002

025512
025514
025516
025520
4621 025522
025522
025524

104455
000034
015442
006612

025526
025534
025540
025542
025544
025546
025546
025550
025552
025560
025562
025570

113737
004537
120003
002312
103002

4603
4604
4605
4606
4607
4608

4622
4623
4624
4625
4626
4627
4628

4629
4630
4631
4632
4633

025570
025572
- 025574

12%:

004176

15%:

34%:

004322

004537
120002
002312
103002

104460
000534
105737
001413
105037
012737

35%:

004064

002312

104455

000035
015477

;EXIT FROM THIS TEST

JSR
ODRA

RS5,READI

IGET THE CURRENT VALUE OF THE VIA'S

8CC

: IF AN ERROR OCCURED,

BR
JSR
DORB

254
RS,WRITEI

8CC
ERROR

35%

BR
JSR
DDRB
BDATA
8CC
ERROR

254
R5,READ

002310
000002

TSTB

BEQ
CLRB
MOV
GEDF

002334

36%

BDATA

14%
GDATA
02 ,REGNUM
EM21,ERR?7

ESCAPE TST

104410
000236

104460
000504
123737
001411
012737

TST

104460

000406

ESCAPE

ERROR

TEST

MACRO M1200

025426
004064

002310

002312

000003

002334

14$:

37s:

MOvVB

15$ ,GDATA

-- LOOP IF REQUESTED
TRAP
CS$ESCAPE
.WORD
L10041-.

“DDRA” REGISTER FOR LATER ERROR CHECKING

;REPORT

IT &

EXIT

IT &

EXIT

IT &

TRAP
.WORD
.WORD

CSERDF
28
EM21

.WORD

ERR7

TRAP
.WORD

CSESCAPE
L10041-.

sEXIT FROM THIS TEST -- LOOP IF REQUESTED
;s THIS IS WHAT WE EXPECT TO READ NOW
;READ BACK DDRA

IT SHOULD BE

03 ,REGNUM

;s IDENTIFY THE DDRA REG.

EM22,ERR7

CSERROR

EXIT
s
;s THIS SHOULD NOW BE ZERO
:IT IS, PRECEDE TESTING
SETUP FOR & REPORT ERROR
;IT ISN'T!
;:IDENTIFY THE DDRB REG.
REPORT ERROR
:
“DEVICE FATAL" ERROR ¢ 28
H

EXIT
s
;IS IT REALLY A 3772

GEDF

TRAP

:IF AN ERROR OCCURED,

;REPORT

MOV

CS$ERROR

;READ IT BACK AND CHECK IT

GDATA,BDATA
16$

TRAP

:IF AN ERROR OCCURED,

;REPORT

RS,READ

CMPB
BEQ

CS$ERROR

;LOAD DDRB WITH 000

JSR
DDRA
BDATA
8CC
ERROR

37%

TRAP

= 366

:IF AN ERROR OCCURED,

;REPORT

;s YES,

:NO,

TRAP

CSERROR

PROCEED WITH TESTING

REPORT ERROR

“DEVICE FATAL" ERROR & 29

TRAP
.WORD
.WORD

CSERDF
29
EM22

CNDMAAO DMV11 MCTRL DIAG @1
TEST

G10
15:22

PAGE

61-3

SEQ 0123

006612

104410
000160
004537
120002
177777
103002

104460
000460
004537
120003
000000
103002

004537
120003
002312
105737
001413
105037
012737
104455
000036
015442
006612

025704
025710
025712
025714
025716
025716
025720
025722
025730
025732
025740
025746

004537
120002
002312
103002

025746
025750
025752
025754
4670 025756
025756
025760

004322

16$:

17%:

004322

38%:

004064

39%:

002312
002310
000003

(EXIT FROM THIS

JSR

RS,WRITEI

;RE-LOAD DDRB WITH 377

8CC
ERROR

BR
JSR
DDRA

24
RS,WRITEI

8CC
ERROR

JSR
DDRA
BDATA

RS,READ

:+NOW, DID DDRA GO TO ZEROES

DgRB

TSTB

MOV
GEDF

ESCAPE

IT &

EXIT

TRAP

CSERROR

TRAP

CSERROR

;AND NOW CLEAR DDRA TO ZEROS
;IF AN ERROR OCCURED,

tREPORT

IT &

EXIT

BDATA

18$
GDATA

23 ,REGNUM
EM21,ERR7

;YES, BUT WHAT ABOUT DDRB?
iNO,
SETUP FOR AND
; IDENTIFY THE DDRA REG.

;

REPORT

TST

THE

ERROR

“DEVICE FATAL” ERROR & 30

TRAP

.WORD
.WORD
.WORD

sEXIT FROM THIS TEST

004064

18%:

JSR
OORB

RS5,READ

8CC

BDATA

ERROR

002312
025612
000002

025612
002310
002334

40s:

sYES,

MOVB
MOV

17$,GDATA
@2 ,REGNUM

EM22A ,ERR7

TRAP

ESCAPE

TST

SHOULD BE

CSESCAPE

L10041-.

377 NOW

IT &

TRAP

EXIT

IS IT?

iNO,

EXIT

CSERROR

TEST

SETUP FOR AND

s IDENTIFY THE DDRB REG.

104455
000037
015532
006612

30
EM21
ERR7

:IF AN ERROR OCCURED,

BDATA,17$

ABOUT DDRB

sREPORT

cMPB8

BEQ

iWHAT

CSERDF

-- LOOP IF REQUESTED
.WORD

GEDF

104410
000002

TEST

: IF AN ERROR OCCURED,

;REPORT

104410
000060

104460
000420
123737
001414
113737
012737

TST

8EQ
CLRB

002334

. WORD
ERR7
-- LOOP IF REQUESTED
TRAP
CSESCAPE
.WORD
L10041-.

ESCAPE

104460
000451

025670
025672
025674
025676
4657 025700
025700
025702

4664
4665
4666
4667
4668
4669

22-FEB-84

VIA REGISTER ADRESSING

025576
4634 025600
025600
025602
4635
4636 025604
4637 025610
4638 025612
4639 025614
4640 025616
025616
4641 025620
4642 025622
4643 025626
4644 025630
4645 025632
4646 025634
025634
4647 025636
4648
4649 025640
4650 025644
4651 025646
4652 025650
4653 025654
4654 025656
4655 025662
4656 025670

4658
4659
4660
4661
4662
4663

MACRO M1200

REPORT

ERROR

“DEVICE FATAL" ERROR ¢ 31

{EXIT FROM THIS

CSERDF
31
.WORD
.WORD
EM22A
. WORD
ERR7
LOOP IF REQUESTE D
TRAP
CSESCAPE
L10041
.WORD
-,
TRAP

TEST

CNDMAAO DMV11 MCTRL DIAG #1
TEST

MACRO M1200

22-FEB-84 15:22

H10

PAGE 61-4

VIA REGISTER ADRESSING

4671

4672 025762
025762

025762

248 :
104401

ENDTST

L10041:

TRAP

CSETST

SEQ 0124

CNDMAAO DMV11 MCTRL DIAG @1
TEST

MACRO M1200

22-FEB-84

15:22

PAGE 62

SEQ 0125

VIA'S DDRB DATA READ/WRITE

.SBTTL TEST 12 -- VIA'S DDRB DATA READ/WRITE

4684

1200880800800 0000 0000000000000
i1 *

0 0000000000008

TEST 12.-- VIA'S DDRB DATA READ/WRITE

ODRB == "DATA DIRECTION REGISTER B"

i ®

;# FIRST,

A MASTER CLEAR

IS PERFORMED.

THEN

00 0000840000000 0000000000000000

;* READ/WRITE BITS O0-7 OF VIA DATA DIRECTION REGISTER B ARE TESTED Br WRITING,
;¢ READING, AND COMPARING EACH BYTE OF DATA PATTERN B.
:#
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004,
200, 376, 375, 373, 367, 357, 337,

010,

277,

020,

177,

040,

000

100,

$--080880888080048008880
8008000888000 8 0880000000008 8 0020008000000 00000000004

4685
4686
4687
4688

025764
025764
025770
025772
025772
025774
025774
025776

4689
4690 026000
4691 026004

46932
4693 026006

:
004737
103003

4695
4696
4697
4698
4699
4700
4701

026010
026014
026020
026024
026030
026032
026032
4702 026034
026034
026036
4703
4704 026040
026040
026040
4705
4706 026042
4707
4708
4709 026044

026044
026044

ESCAPE

TST

ERROR

104410
000046

T12::

sINIT DMV &€ START UP THE MAINT. LOOP
:IF AN ERROR OCCURED,

;REPORT

EXIT

002526

30%:
T12.LP:

MOV

OPATB,R1

(R1)+,R3

;:POINT

CS$ESCAPE

L10042-.

TO PATTERN TABLE

s THE SUBTEST ONLY

BGNSUB

MOVB
MOvVB
MOV
JSR
8CC
ERROR

002306
002310
120002
005034

ESCAPE

104410
000006

10¢:

TESTS ;Hg ONE PATTERN
$2.11

(R1),TDATA
(R1)+,GDATA
RO
#0DRB,

;SETUP TEST DATA BYTE FOR "STREG"
;SETUP EXPECTED DATA BYTE FOR “STREG"”

108

;WAS AN ERROR FOUND?
:YES, REPORT IT AND.:-

s SPECIFY THE REGISTER BEING TESTED
sPERFORM STATIC TEST OF .THE SPECIFIED REGISTER

TST

EXIT FROM THE

ENDSUB

soB

ENDTST

CsBSuUB

PC,STREG

TEST.

R3,T12.LP

+IF

THERE

s TEST

IT,

IN FACT MORE DATA,

ELSE,

TRAP

CS$EFROR

TRAP

CSESLB

"CKLOOP" IS IMPLIED
TRAP
CSESCAPE
.WORD
L10042-.

L10043:;

104403

104401

TRAP

104460

077317

CSERROR

;GET & OF ENTRIES IN TABLE

104402
111137
112137
012700
004737
103003

TRAP

.WORD

4694 026006

026006
026006

8CC

PC,MSTCLR
30¢

JSR

003762

104460

012701
012103

BGNTST

LOOP BACK

FALL OUT OF LOOP AND
L10042:

TRAP

TEST

CSETST

CNDMAAO DMV11 MCTRL DIAG &1
TEST

MACRO M1200 . 22-FEB-84

15:22

J10

PAGE 63

SEQ 0126

VIA'S DDRA DATA READ/WRITE

.SBTTL TEST

4722

L L

LTy

TEST

-- VIA'S DDRA DATA READ/WRITE
Yy

DDRA ==
;# FIRST,

YV PPy

VIA'S DDRA DATA READ/WRITE

"DATA DIRECTION REGISTER A"

A MASTER CLEAR

IS PERFORMED.

THEN

i+ READ/WRITE BITS O-7 OF VIA DATA DIRECTION REGISTER A ARE TESTED BY WRITING,
:*
:#

READING, AND COMPARING EACH BYTE OF DATA PATTERN B.
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004,

200,
1~

4723
4724

4725
4726

4727
4728
4729
4730
4731
4732

4733
4734
4735
4736
4737
4738
4739

000046

026062
026066

012701
012103

026072
026076
026102
026106
026112
026114
026114
4740 026116
026116
026120
4741
a742 026122
026122
026122
4743
4744 026124
4745
4746
4747 026126
026126
026126

375,

373,

367,

357,

010,

020,

040,

337, 277,

177,

000

82888220280808 0000202080000 0 0008800000000 0 0000000200000

BGNTST

026046
026046
026052
026054
026054
026056
026056
026060

026070
026070
026070
026070

376,

004737
103003

003762

B8CC

PC,MSTCLR
30¢

ESCAPE

TST

JSR

ERROR

104460
104410
30$:
T13.LP:

MOV
MOV

9PATB,R1

(R1)+,R3

T13::

:IF AN ERROR OCCURED,

;REPORT IT &

EXIT

MOVB
MOVB
MOV
JSR
8CC
ERROR

104460

ESCAPE

104410
000006

10$:

(R1),TDATA
(R1)+,GDATA
#DDRA ,RO
10$

;PERFORM STATIC TEST OF
;:WAS AN ERROR FOUND?
:YES, REPORT IT AND

TST

PC,STREG

EXIT FROM THE

ENDSUB

soB
ENDTST

104401

TRAP
.WORD

C$ESCAPE
L10044-.

C$BSUB

THE SPECIFIED REGISTER

TEST.

TRAP
CS$ERROR
“CKLOOP" IS IMPLIED
TRAP
CSESCAPE
L10044-.
.WORD

L10045:
R3,T13.LP

IRAP

:SETUP TEST DATA BYTE FOR "STREG"
:SETUP EXPECTED DATA BYTE FOR "STREG"
+SPECIFY THE REGISTER BEING TESTED

104403
077317

C $ERROR

;THE SUBTEST ONLY TESTS ;Tg ?Ne PATTERN

BGNSUB

T
002306
002310
120003
005034

TRAP

;POINT TO PATTERN TABLE
{GET @ OF ENTRIES IN TABLE

104402
111137
112137
012700
004737
103003

00000004

sINIT DMV € START UP THE MAINT. LOOP

.
002526

100,

+IF

THERE

s TEST IT,

IS IN FACT MORE DATA,

TRAP

CSESLB

LOOP BACK

ELSE, FALL OUT OF LOOP AND TEST
L10044;

TRAP

CSETST

CNDMAAO DMV11l MCTRL DIAG #1
TEST 14

MACRO M1200

22-FEB-84

K10

15:22

PAGE 64

SEQ 0127

-- VIA'S ORB DATA READ/WRITE

.SBTTL TEST 14 -- VIA'S ORB DATA READ/WRITE

4761

1R RRRRRARARRARRARRARRRRRARARAERALAAAAAR
R AR AR AR AR AR AR A ALK LA AR AR AR LSRR LS
L)

:‘

TEST 14 -- VIA'S ORB DATA READ/WRITE

ORB == "QUTPUT REGISTER PORT B"

]

i FIRST,

A MASTER CLEAR IS PERFORMED.

NEXT,

377 IS LOADED INTO DATA

:# DIR. REG. B (DDRB) TO SET ALL B PORT PINS FOR OUTPUT MODE. THEN ,
+* READ/WRITE BITS 0-7 OF VIA OUTPUT REG. PORT B ARE TESTED BY WRITING,
;* READING, AND COMPARING EACH BYTE OF DATA PATTERN B.
:#

026130
4762 026130
004737
4763 026134- 103003
4764 026136
026136
104460

4765 026140
026140
026142
4766
4767 026144
4768 026150
4769 026152
4770 026154
4771 026156
026156
4772 026160
026160
026162
4773
4774 026164
4775 026170
4776
4777 026172
4778 026172
026172
026172
4779
4780 026174
4781 026200
4782 026204
4783 026210
4784 026214
4785 026216
026216

4786 026220

026220
026222

4787
4788 026224

DATA PATTERN B

TY YT

3
003762

104410
000066

004537
120002
177777
103003

004322

30¢:

104460

R YV Y

PR YRR R

125,

200,

252,

376,

PP YRR RV R R

000,

377,

001,

002,

375, 373, 367, 357,

PR SR SR SRR S

SRS A

004,

010,

020,

RS S RS

RS S

PR R R

337, 277,

BGNTS1
PC,MSTCLR
30¢

ESCAPE

TST

JSR

DDRB
-1
8CC
ERROR

100,

002526

318:

MOV
MOV

RS,WRITEI

31%
TST

;REPORT

IT &

TRAP

EXIT

TRAP

OPATB,R1

(R1)+,R3

104410
000006

10¢:

(R1),TDATA
(R1)+,GDATA
@ORB,RO

MOVB
MOVB
MOV
JSR
B8CC

PC,STREG
10¢

ESCAPE

TST

ENDSUB

CS$ESCAPE

.WMORD

L10046-.

TRAP

C$ERROR

TRAP

C$ESCAPE

;IF AN ERROR OCCURED,

;REPORT

IT &

EXIT

;POINT

L10046-.

TO PATTERN TABLE

;GET @ OF ENTRIES IN TABLE

;THE SUBTEST ONLY TESTS ;TE gue PATTERN

BGNSUB

ERROR

CS$ERROR

;INITIALIZE PORT B FOR I/0

104460

R L 2 22

:IF AN ERROR OCCURED,

104402
002306
002310
120000
005034

;s INIT DMV € START UP THE MAINT. LOOP

.WMORD

T14.LP:

111137
112137
012700
004737
103003

040,

177, 000

Ti4::

JSR
8CC
ERROR

ESCAPE

104410
000046
012701
012103

TRAP

CsBSUB

:SETUP TEST DATA BYTE FOR “STREG"
:SETUP EXPECTED DATA BYTE FOR “STREG”
+SPECIFY THE REGISTER BEING TESTED

;PERFORM STATIC TEST OF THE SPECIFIED REGISTER
;WAS AN ERROR FOUND?
s YES,

REPORT

IT AND

EXIT FROM THE TEST.

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10046-.

“CKLOOP" IS IMPLIED

CNDMAAO DMV11 MCTRL DIAG &1
--

PAGE 64-1

VIA'S ORB DATA READ/WRITE

026224
argo 026224
4790 026226
4791

104403
077317

4793 026230

026230
026230

L10047:
s08

ENDTST

104401

R3,T14.LP

:IF _THERE
s TEST IT.

TRAP

CSESUB

IS IN FACT MORE DATA, LOOP BACK TO
ELSE, FALL OUT OF LOOP AND TEST

L10046:

22-FEB-84 15:22

TEST

MACRO M1200

L10O

TRAP

CSETST

CNDMAAO DMV11l MCTRL DIAG #1

SEQ 0129

.SBTTL TEST 15 -- VIA'S T1 DATA READ/WRITE
12+

RRARRARRRARARRRAR LA AR R RARAAR AR AR AARARAR AR

LR AR R AR AL AR bR

AbALb

bt AR

TEST 15 -- VIA'S T1 DATA READ/WRITE

Tl == "TIMER 01"
THIS TEST WRITES, READS, AND CHECKS THE T1 LATCHES AND COUNTER REGISTERS
WITH DATA PATTERNS IN EACH OF 3 SUBTESTS.

CHECKS FOR PROPER LOADING OF LATCHES
IT ALSO CHECKS TO BE SURE THAT THE COUNTER APPEARS TO BE DOING

FIRST SUBTEST:

SOMETHING TO THE COUNTERS.

AS LONG AS THEY HAVE CHANGED FROM THE

A MASTER CLEAR IS PERFORMED.
ALL LATCHES ARE LOADED TO ZEROES (JUST IN CASE), ACR6 & ACR7 ARE SET
TO ZERO (MODE 00), AND "T1" INTERRUPT ENABLE FLAG IS CLEARED.
T1L-LCADR 04) IS LOADED WITH THE CURRENT BYTE OF DATA PATTERN B.
T1L-LCADR
IS READ AND COMPARED TO THE BYTE JUST WRITTEN.
T1C-LCADR
IS READ AND CHECKED TO BE DIFFERENT THAN THE TEST BYTE.
T1L-LCADR
TiL-LCADR

T1L-LCADR
T1L -H(ADR
T1L -H{ADR
T1C-H(ADR

3 338 88 23

@ >

VALUE LOADED INTO THEM, WE WILL BE SATISFIED.

IfXLHIO"'l!’“Ofl

4854

M10

PAGE 65

-- VIA'S T1 DATA READ/WRITE

IS LOADED WITH THE COMPLEMENT OF THE CURRENT DATA BYTE.
IS READ AND COMPARED TO THE BYTE JUST WRITTEN.
IS RE-LOADED WITH O TO MAKE T1C-H DECREMENT FAST,
IS LOADED WITH THE ORIGINAL TEST DATA PATTERN BYTE.
IS READ AND COMPARED TO THE BYTE LOADED INTO TiL-H.

) IS READ AND CHECKED TO BE DIFFERENT THAN THE TEST BYTE.

T1L-H(ADR 07) IS LOADED WITH THE COMPLEMENT OF THE CURRENT DATA BYTE.
T1L-HCADR 07) IS READ AND COMPARED TO THE BYTE JUST LOADED.

STEPS C-L ARE REPEATED USING EACH BYTE OF DATA PATTERN B.

SECOND SUBTEST:
mooo>»

22-FEB-84 15:22

CHECKS FOR CROSS-TALK AND ADDRESSING ERRORS

FROM TiL-L

TO TiL-H

T1L -H(ADR 07) IS LOADED WITH 000 TO CLEAR IT,
T1L-LCADR 06) IS LOADED WITH A BYTE OF DATA PATTERN B.
T1L-LCADR 06) IS READ AND COMPARED TO THE DATA JUST WRITTEN.
T1L-H(ADR 07) IS READ AND COMPARED TO 000.
STEPS B-D ARE REPEATED USING EACH BYTE OF DATA PATTERN B.

THIRD SUBTEST:
oOo>®»

TEST

MACRO M1200

TiL-LCADR
T1L -H(CADR
T1L -H(ADR
TiL-L(ADR

04)
07)
07)
06)

CHECKS FOR CROSS-TALK AND ADDRESSING ERRORS
FROM TiL-H TO TIL-L

IS
IS
IS
IS

LOADED WITH 000 TO CLEAR IT
LOADED WITH A BYTE OF DATA PATTERN B.
READ AMD COMPARED TO THE DATA JUST WRITTEN.
READ AND COMPARED TO 000.

CNDMAAO DMV11 MCTRL DIAG #1
TEST

VIA'S

MACRO M1200

22-FEB-84

N10O

15:22

PAGE 65-1

SEQ 0130

T1 DATA READ/WRITE

i# E. STEPS B-D ARE REPEATED USING EACH BYTE OF DfiTA PATTERN B.
R

i
L

DATA PATTERN B

000,
375,

377,
373,

001,
367,

002,
357,

Y T

004,
337,

010,
277,

020,
177,

040,
000

100,

BCGNTST

T1S5::
i

026232
026236
026240
026240
026242
026242
026244
026246

252,
376,

026232

125,
200,

004737
103003

*%4---ass

003762

STEP

JSR
8CC

ESCAPE

104410
001030

sas---saa

PC,MSTCLR
1$

ERRCR

104460

TST

s INIT DMV € START UP M-LOOP
:IF NO ERRORS, PROCEED

:ELSE,

GET 'OUT OF THE TEST
|

1$:
;

026246
026252

004537

026256
026260
026260
026262
026262
026264

103003

REPORT ERROR &

%24---a24

004660

STEP

JSR
0
.WORD
8CC
ERROR

104460

ESCAPE

104410
001010

TRAP

CS$ERROR

TRAP

CSESCAPE

.WORD;

L10050-.

#44---sas

RS,INITT1
O
.+10
TST

s INITIALIZE THE TIMER'S REGISTERS
: WITH ZEROES
i 00 --> ACR6 & ACR7 AND DISABLE INTERRUPTS
:IF NO ERROR, PROCEED
:ELSE, REPORT IT
TRAP
C$ERROR
:
AND EXIT THIS TEST
TRAP
CSESCAPE
.WORD
L10050-.

sWE WANT THE LEAST ACTIVE OPERATING MODE FOR THIS TIMER WHILE WE ARE TESTING

+IT.

THE MODE WE'RE USING HERE IS DOCUMENTED THUSLY:

s TIME-OUT

INTERRUPT EACH TIME T1

IS LOADED.

“GENERATE A SINGLE

PB7 DISABLED.
"

8A§TA¥NADgEg PRECAUTION, WE ARE DISABLING INTERRUPTS BY CLEARING THE “T1” FLAG

sWITHIN

“IER”,

BGNSUB
104402
012701
012103

112137
013737

002306
002306

T16.LP;

002310

004310

IRAP

C$BSUB

MOV
MOV

OPATB.R1
(R1)+.R3

;POINT TO THE APPROPRIATE PATTERN TABLE
;EXTRACT THE BYTE COUNT FROM THE TABLE

MOVB
MOV

(R1)+,TDATA
TDATA.GDATA

:GET ONE BYTE OF THE TEST DATA
:THE TEST DATA IS NORMALLY THE GOOD DATA T0O

BGNSEG

104404

004537
120004
002306

:BEGIN THE FIRST SUBTESI115 .

#44---84s

STEP

#?g
L

TDATA

5
C

#4s---2ss

RS,WRITE

:LOAD T1L-LCADDR 04)
s+ THE

TEST DATA FROM “TDATA"

TRAP

C$BSEG

CNDMAAC DMV1IL1 MCTRL DIAG o1
TEST

VIA'S

MACRO M1200

22-FEB-84 15:22

Bll

PAGE 65-2

SEQ 0131

71 DATA READ/WRITE

8R4
4895

4897
4898 026322
4899 026326

4900 026330
4901 026332

004537
120006
002312

123737

4902 026340
4903 026342
4904 026350

001407
012737

026350
026352
026354
026356

104455
000040
015243
006612

4905

004064

002310
000006

4914

026404

4915 026406
4916 026410
4917 026416

4918
4919 026420

4920 026426

4921

002334

026426
026430
026432
026434

004537
120004
002312

123737
001017
004537
120004

002312
123737

001007

012737

004064

:ggg 026454

:g;o
1
4932
4933
4934
4935

002310

002312

004064

002310

026456

--sse

RS,READ

sREAD

GDATA,BDATA

1AND CHECK

cs
06 ,REGNUM
EM20,ERR7

000004

002334

4%;

GDATA,BDATA
%)
RS,READ

sAND CHECK IT. SEEING AS THE TIMER IS RUNNING,
s THIS MUST NOT EQUAL THE SET VALUE!
s IF IT IS, MAYBE WE JUST READ IT AT THE WRONG
t1TIME!
RE-READ AND CHECK ONE MORE TIME.

BNE

GDATA,BDATA
44

1CHECK IT AGAIN, SAM,
s THIS TIME IT SHOUWLD BE DIFFERENT.

MOV

04 ,REGNUM

EM20A,ERR?7

026466
4936 026474
49357 026476
4938 026504

123737
0014C7
012737

026504

104455

coMB
coMs
JSR
TiLL

%88---0606

6%:

002310

002312

sOTHERWISE,
s+
IDENTIFY

000006

002334

WE HMAVE A LEGITIMATE FAILURE
THE FAILING REGISTER &

REPORT FAILURE

"DEVICE FATAL"” ERROR ¢ 33

TRAP
. WORD
.WORD
.WORD

CSERDF
33
EM20A
ERR?

TDATA
GDATA
RS,WRITE

tUSE
s THE

THE ONE'S COMPLEMENT THIS TIME
EXPECTED DATA IS ALSO THE COMPLEMENT
sLOAD TIL-LCADDR 06)

1 THE

TEST DATA FROM

"“TDATA"“

STEP G eee---000

JSR

RS,READ

sREAD

GDATA,BDATA
8s
06 , REGNUM
EM20,ERR7

1AND CHECK IT
1 IF OK, PROCEED
s IDENTIFY THE FAILING REGISTER £
i1 REPORT FAILURE

TiLL
BDATA

CMPB
BEQ
MOV
GEDF

T1C-LC(ADDR 04)

see---0ee

TDATA

004064

CSERDF
32
EM20
ERR7

cMPB
BNE
JSR
T1CL

%88---000 STEP F

002306

120006
002312

TRAP
. WORD
.WORD
. WORD

tREAD

104455
000041
015275
006612

004537

“DEVICE FATAL” ERROR o 32

002306
002310
004310

1 IF Ok, PROCEED
1 IDENTIFY THE FAILING REGISTER &
3+ REPORT FAILURE

RS ,READ

GEDF

105137
105137
004537
120006

TIL -LC(ADDR 06)

JSR
T1CL
BDATA

BDATA
cMPB

002312

026462
026464

eee

%06---000 SIEP E eee--.00e

28:

;
026436
026442
026446
026452

:ggg

4924
4925
4926
4927

cMPB

BEQ
MOV
GEDF

§
026360
026364
026366
026370
026376
026400

STEP

JSR
TiLL
BDATA

002312

439306

4907
4908
4909
4910
4911
4912
4913

%08--.000

TIL-LC(ADDR 06)

“DEVICE FATAL" ERROR ¢

TRAP

CSERDF

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA'S

026506
026510
026512

MACRO M1200

. WORD

015243
006612

105137
105137

004537

026572
026574

104455
000043

002306
002310
004322

4967
4968 026624
4969 026626
4970 026634
4971 026636

4972
4973
4974
4975
4976
4977
4978
4979
4980
4981
4982

026636
026640
026642
026644

8s:

STEP

coMs

880---008

004064

STEP

T1LH

002312

000007

002334

sse---00e

TDATA

tRESTORE

RS,WRITEI

1SET THE LOW LATCH TO MAKE SURE THE MIGH
tCOUNTER IS DOING MOST OF THE WORK

RS,WRITE

1LOAD T1L-H(ADDR 05)
s THE

JSR

002310

GDATA

coms
JSR

TiLL
1
JSR
T1CH
TDATA

BDATA
CMPB
BEQ
MOV
GEDF

THE DATA TO THE ORIGINAL VALUE

TEST DATA FROM

“TDATA"

eee---00e

R5,READ

sREAD T1L -H(ADDR 07)

GDATA,BDATA
108

tAND CHECK IT
: IF OK, PROCEED

@7 ,REGNUM

EM20,ERR7

s IDENTIFY

THE FAILING REGISTER &

REPORT FAILURE

“DEVICE FATAL” ERROR @ 35

TRAP

. WORD
. WORD
. WORD

004064

000005

002306

002310

888---000

10%:

STEP

JSR

MOV
TST8

14%
GDATA,BDATA
148
EM20A,ERR?

104455
000044
015275
006612

105137
105137
004537
120007
002306

002306
002310
004310

%68-- -840

14%:

STEP

coMB

TDATA

TILH
TDATA

®00--

000

see---00e

GDATA

comMs

JSR

STEP

RS,WRITE

CSERDF

35
EM20
ERR7

ses--.000e

@5 ,REGNUM
TDATA

BEQ
cMPB
BNE
GEDF

002312

R5,READ

T1CH

BDATA

1002334

026646
026652
026656
026662
026664

%08---000

015243
006612

004537
120005
002312
012737
105737
001410
123737
001004

34
EM20
ERR7

.WORD

004310

004537
120007
002312
123737
001407
012737

026612

65-3

000042

026544
026550
026552
026554
026562
026564
026572

4960
4961
4962
4963 026602
4964
4965 026610

PAGE

SEQ 0132

026576
026600

15:22

Cl1l

T1 DATA READ/WRITE

026514
026520
026524
026530
026532
026534
026540
026542

22-FEB-84

¢ee- -00e

sREAD T1C-H(ADDR 05)

s IDENTIFY THE REGISTER BEING CHECKED

tWAS THE TEST DATA "000"?
s YES, THEN WE CAN'T BE SURE

THE RESULTS!

sNO, CHECK IT
s IT SHOULDN'T = THE LOADED VALUE
:IT DID!
REPORT FAILURE
5
“DEVICE FATAL" ERROR @ 36

1AND CONTINUE

tUSE

TRAP
.WORD
. WORD
.WORD

TESTING

THE ONE'S COMPLEMENT

THIS TIME

1 THE

EXPECYED DATA

s THE

TEST DATA FROM “TDATA"

IS ALSO

sLOAD T1L-H(ADDR 07)

THE

CSERDF
36

EM20A
ERRT

COMPLEMEN!

CNDMAAO DMV11 MCTRL DIAG o1
TEST

VIA'S

4983 026666
4984 026672
4985 026674

4986
4987
4988
4989

4990

026676
026704

026706
026714

026714
026716
026720
026722

MACRO M1200

004537
120007
002312

123737
001407
012737

002310

002312

000007

002334

tREAD TiL -HCADDR 07)

cMPB
BEQ
MOV
GEDF

GDATA,BDATA
168

1AND CHECK IT
s+ IF OK, PROCEED
1 IDENTIFY THE FAILING REGISTER &
3 REPORT FAILURE

%88---000

16$:

026726
026730
026734

000402
000137
077303

07 ,REGNUM
EM20,ERR7

STEP

“DEVICE FATAL” ERROR ¢ 37

026276

20%:
21s:

BR
JMP
So8

ENDSUB

21
T16.LP
R3,20%

012103

5006 026750
5007 026750
gggg 026754

112137
013737

002526

002306
002306

5010
ggié

002310
;

004537
120007

004322

104404

5021 026774
5022 027000
gggz 027002

004537
120006
002%9%6

OPATB,R1

TRAP

CSESUB

sPOINT

SECOND SUBTEST
T15.2:

TRAP
csssuB
TO THE APPROPRIATE PATTERN TABLE

(R1)+,R3

sEXTRACT THE BYTE COUNT FROM THE TABLE

MOVB
MOV

(R1)+,TDATA
TDATA,GDATA

3:GET ONE BYTE OF THE TEST DATA
s THE TEST DATA IS NORMALLY THE GOOD DATA

TOO

¢86---288 STEP A see---s0s
RS,WRITEI

:CLEAR T1L-HCADDR 07)

sTHE

TEST DATA FROM "TDATA"

BGNSEG
TRAP

;

%46---060

STEP B 466---s0a
'

004310

$025

JSR
TiLL
TDATA
;i

004537

CSESEG

MOV

JSR
TILH

000000

S017 026772
026772
5018
2859

1BEGIN THE

MOV

T16.L1:

TRAP

: IF MORE DATA, DO ANOTHER BYTE
;ELSE, EXIT SUBTEST

L10051:

BGNSUB

104402
012701

CSERDF
37
EM20
ERR7

ENDSEG

104403

S000
5001
5002 026740
026740
026740
5003 026742
gggg 026746

TRAP
.WORD
.WORD
.WORD
see---00a

100004 :

026736

5026
5027 027004

RS,READ

104405

gg%g 026770

JSR
TILH
BDATA

104455
000045
015243
006612

026724
026724

5013 026762
5014 026766

PAGE 65-4

5EQ 0133

004064

4991

026736
026736

15:22

T1 DATA READ/WRITE

4992
4993 026724

4994
4995
4996
4997
4998
4999

22-FEB-84

D11

004064

%006 ---000

JSR

RS,WRITE

;LOAD TIL-LCADCR 06)

s THE

STEP C

TEST DATA FROM "TDATA"

#00---000e

RS,READ

tREAD T1L -L(ADDR 06)

C$BSEG

CNDMAAO DMV11 MCTRL DIAG #1
TEST

5028
5029
5030
5031
5032
5033

-- VIA'S
027010
027012
027014
027022
027024
027032
027032
027034
027036
027040

MACRO M1200

5045

027072
027074
027076
027100

5047
5048 027102
027102
027102
5049
027104
027106
027112
027114
027114
027114

120006
002312
123737
001407
012737

PAGE

E11
65-5

SEQ 0134

TiLL

002310

002312

000006

002334

BDATA
CcMPB
BEQ

MOV
GEDF

g?AfA.flDATA

96 , REGNUM
EM20,ERR7

104455

tAND CHECK IT

s IF 0K,

PROCEED

s IDENTIFY THE FAILING REGISTER &

REPORT FAILURE

“"DEVICE FATAL" ERROR & 38

TRAP

000046
015243
006612

.WORD
.WORD
.WORD

004537
120007
002312

105737

001411
005037
012737

004064

%88---808

2s:

002310

000007

STEP

002334

RS,READ

tREAD T1L -H(ADDR 07)

TST8
BEQ
CLR
MOV
GEDF

BDATA
10¢
GDATA

sAND CHECK IT -- THIS SHOULD STILL BE ZERO
s IF OK, PROCEED

EM208,ERR7

@7 ,REGNUM

s IDENTIFY THE FAILING REGISTER &

REPORT FAILURE

"DEVICE FATAL” ERROR # 39

TRAP

CSERDF

TRAP

CSESEG

TRAP

CSESUB

TRAP

csBSuB

THE GOOD DATA

TQO

.WORD
.WORD
.WORD

006612

s88---088

10¢:

STEP

ENDSEG
10000s
:

026750

:
20§
21s:

BR
JMP
sSo8

21
T16.L1
R3,20%

ENDSUB

: IF MORE DATA,

DO ANOTHER BYTE

sELSE, EXIT SUBTEST

L10052:

104403

104402
012701
012103

002526

027126
027126
027132

112137
013737

002306
002306

:BEGIN THE THIRD SUBTEST

BGNSUB

Ti6.L2:

002310

004537

004322

MOV
MOV

#PATB,R1

MOVB

(R1)+,TDATA

(R1)+,R3

MOV

;

39
EM208
ERR7

#4¢s---22se

104405
000402
000137
077303

38
EM20
ERR7

#sa---40s

104455
000047
015355
;

CSERDF

JSR
T1LH

BDATA

002312

027116
027116
027116
027120
027124

027140

15:22

T1 DATA READ/WRITE

;

027042
027046
027050
027052
027056
027060
027064
027072

22-FEB-84

¢se---s0s

JSR

TDATA,GDATA

STEP

tPOINT TO THE APPROPRIATE PATTERN TABLE
tEXTRACT THE BYTE COUNT FROM THE TABLE
;GET ONE BYTE OF THE TEST DATA

:THE

TEST

DATA

IS NORMALLY

s60---000

RS,WRITEI

715.3:

sCLEAR T1L-L(ADDR 04)

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA'S

5069 027144
5070 027146
5071
5072 027150
027150
5073
5074
5075
3076 027152
5077 027156
5078 027160
5079
5080

MACRO M1200

T1CL
0

BGNSEG

104404

TRAP
;i

004537
120007
002306

104455
000050
015243
006612

5104
5105
5106
5107
5108
5109
5110

%08---284

004064

JSR

000007

CcMPB

GDATA,BDATA

MOV
GEDF

@7 ,REGNUM
EM20,ERR7

:AND CHECK IT
:IF OK, PROCEED

10$

000402
000137
077303

004064

%%8---008

10$:

JSR

TSTB

“DEVICE FATAL" ERROR @& 40

TRAP

2$
GDATA
96 , REGNUM
EM20B,ERR?

STEP

;AND CHECK IT

; IF Ok,

PROCEED

;s IDENTIFY THE FAILING REGISTER &

REPORT FAILURE

“DEVICE FATAL” ERROR ¢ 41

TRAP

20 :
21s:

CSERDF

.WORD
.WORD
.WORD

EM208
ERR7

TRAP

CSESEG

TRAP

CsESLS

¢0e---00s

ENDSEG
10000$:

027126

EM20
ERR7

sREAD TIL-LCADDR 06)

#88---408

CSERDF

#es---2se

BDATA

BEQ
CLR
MOV
GEDF

002334

RS,READ

TiLL

BDATA

002312
002310
000006

STEP

BR
JMP
S08

ENDSUB
104403

REPORT FAILURE

.WORD
.WORD
.WORD

2s:

027262
027264
027270

s IDENTIFY THE FAILING REGISTER &

104405

"“TDATA"

#ta---2sas

sREAD T1L-HCADDR 07)

BEQ

002334

RS5,READ

BDATA

002312

;LOAD T1L-HCADDR 07)
s THE TEST DATA FROM

STEP

C$BSEG

#¢s---aaa

RS,WRITE

T1LH

002310

104455
000051
015355
006612

027260
027260

027272
027272
027272

STEP

JSR
TILH
TDATA

004537
120006
002312
105737
001411
005037
012737

%88---4424%

004310

027210
027212
027214
027216

5100
5101
5102
5103 027260

PAGE 65-6

SEQ 0135

120004
000000

004537
120007
002312
123737
001407
012737

027250
027252
027254
027256

15:22

T1 DATA READ/WRITE

027162
027166
027170
027172
027200
027202
027210

027220
027224
027226
027230
027234
027236
027242
027250

22-FEB-84

F11

21s
T16.L2
R3,20%

: IF MORE DATA, DO ANOTHER BYTE
;ELSE, EXIT SUBTEST
L10053;

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA'S

5111 027274
027274
027274

MACRO M1200

22-FEB-84 15:22

G1l1

PAGE 65-7

SEQ
.

T1 DATA READ/WRITE

ENDTST

104401

L10050:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG @1
TEST

MACRO M1200

22-FEB-84

15:22

H11

PAGE 66

SEQ 0137

VIA'S SR DATA READ/WRITE

.SBTTL

5124

TEST

VIA'S SR DATA READ/WRITE

1008800228800 2000 0000400000000 0 00000000 RR LR

TEST
SR

R AL

A AR

SRR LA

AR LA

AARRA

AL,

-- VIA'S SR DATA READ/WRITE

"“SHIFT REGISTER"

:+» FIRST, A MASTER CLEAR IS PERFORMED AND THE ACR IS SET TO 000. THEN :
:* READ/WRITE BITS O0-7 OF VIA SHIFT REGISTER ARE TESTED BY WRITING, READING,
i AND COMPARING EACH BYTE OF DATA PATTERN B.
:»
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004, 010, 020, 040, 100,

200,

376,

375,

373,

367,

357,

337,

277,

177,

000

$--82882242882800000000020040
0022000000000
000 0000000000000 000000000000 0040s

5125
5126
5127
5128
5129
5130
5131
5132
5133
5134
5135
5136
5137
5138
5139
5140
5141

027276
027276
027302
027304
027304
027306
027306
027310
027312
027316
027320
027320
027320
027320

027322
027326
027332
027336
027342
027344
027344
S142 027346
027346
027350
5143
5144 027352
027352
027352
5145
5146 027354
5147
5148
5149 027356
027356
027356

BGNTST
004737

103003

003762

PC,MSTCLR

ESCAPE

TST

MOV
MOV

(R1)+,R3

oPATB,R1

;POINT

ERROR

104460

104410

T16::

JSR
8CC

30¢

sINIT DMV € START UP THE MAINT. LOOP
s IF AN ERROR OCCURED,
{REPORT

IT &

EXIT

000046

012701

012103

002526

30¢:
T18.LP:

104460

ESCAPE

104410
000006

10%:

(R1),TDATA
(R1)+,GDATA

#SR,RO

108

+PERFORM STATIC TEST OF
:WAS AN ERROR FOUND?

TST

PC,STREG

ENDTST
104401

THE

EXIT FROM THE TEST.

s IF

THERE

s TEST

IT,

IS IN FACT MORE DATA,
ELSE,

FALL

OUT

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L1005S4
-,

TRAP

CSsESLB

“CKLOOP" IS IMPLIED

L10055:
R3,T18.LP

C$8SUB

SPECIFIED REGISTER

:YES, REPORT IT AND

ENDSUB

SoB8

TRAP

$SETUP TEST DATA BYTE FOR “STREG"
:SETUP EXPECTED DATA BYTE FOR "STREG"
:SPECIFY THE REGISTER BEING TESTED

104403
077317

CS$ESCAPE
L10054-.

;THE SUBTEST ONLY TESTS ;rlag clme PATTERN

BGNSUB

MOvB
MOVB
MOV
JSR
8CC
ERROR

TRAP
.WORD
TO PATTERN TABLE

T
002306
002310
120012
005034

CS$ERROR

iGET & OF ENTRIES IN TABLE

104402
111137
112137
012700
004737
103003

TRAP

LOOP BACK

OF LOOP AND

L10054:

TRAP

TEST

CSETST

CNDMAAO DMV11 MCTRL DIAG ¢1
TEST

MACRO M1200

22-FEB-84

15:22

PAGE 67

SEQ 0138

VIA'S ACR DATA READ/MWRITE

S51e2

.SBTTL

TEST

VIA'S ACR DATA READ/WRITE

;o0.0‘.‘.“..“.“‘.0.t0“.‘.‘.‘...““““.“0‘..“

‘.0‘.0‘0“0“‘.0‘00‘0.0“0

TEST

ACR ==

FE
L

i¢

FIRST,

VIA'S ACR DATA READ/WRITE

"AUXILIARY CONTROL REGISTER"

A MASTER CLEAR

IS PERFORMED.

THEN

i* READ/WRITE BITS O-7 OF THE ACR ARE TESTED BY WRITING., READING,

i
i#

AND COMPARING EACH BYTE
DATA PATTERN B = 125,

200,

OF DATA PATTERN B.
252, 000, 377, 001,

376,

375,

373,

367,

002,

357,

004,

010,

337,

277,

020,

177,

040,

000

100,

;~<.."."..‘....“‘..‘..‘0‘...“.“‘...0.““..‘.‘.“““

..‘0“‘.‘..‘.‘..“‘.

5163
5164
5165

5166
5167
5168
5169
5170
5171
S172
5173
5174
5175
5176
5177
5178
5179

BGNTST

027360
027360
027364
027366
027366
027370
027370
027372

104410
000046

027374
027400

012701
012103

027402
027402
027402
027402

027404
027410
027414
027420
027424
027426
027426
5180 027430
027430
027432
5181
5182 027434
027434
027434
5183
5184 027436
5185
5186
5187 027440
027440
027440

004737

103003

003762

JSR
8CC

ERROR

104460

ESCAPE

002526

30$:
T19.LP:

MOV
MOV

PC,MSTCLR
304

T17::

s INIT DMV € START UP THE MAINT. LOOP
:IF AN ERROR OCCURED,

;REPORT

TST

OPATB,R1

(R1)+,R3

BGNSUB

IT &

EXIT

;POINT

104460

104410
000006
10¢:

CS$ESCAPE
L10056-.

:THE SUBTEST ONLY TESTS ;rfi ?’E PATTERN

MOVB
MOVB
MOV
JSR
8CC
ERROR

@ACR,RO
PC,STREG

108

{PERFORM STATIC TEST OF
tWAS AN ERROR FOUND?
:YES, REPORT IT AND

ESCAPE

TST

(R1),TDATA
(R1)+,GDATA

IRAP

CsBSUB

:SETUP TEST DATA BYTE FOR “STREG"
+SETUP EXPECTED DATA BYTE FOR “STREG“
+SPECIFY THE REGISTER BEING TESTED

EXIT FROM THE

THE

TEST.

SPECIFIED REGISTER

TRAP

CS$ERROR

“CKLOOP" IS IMPLIED
TRAP

CSESCAPE

.WORD

L100S6-.

TRAP

CSESLB

ENDSUB
L10057:

104403
077317

TRAP
.WORD
TO PATTERN TABLE

7
002306
002310
120013
005034

CSERROR

:GET @ OF ENTRIES IN TABLE

104402

111137
112137
012700
004737
103003

TRAP

So8

R3,T19.LP

+IF THERE
s TEST IT.,

IS IN FACT MORE DATA, LOOP BACK TQ
ELSE, FALL OUT OF LOOP AND TEST

ENDTST
104401

L10056:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG #1
TEST

MACRO M1200

22-FEB-84

15:22

J11
PAGE 68

SEQ 0139

VIA'S PCR DATA READ/WRITE

.SBTTL TEST 18 -- VIA'S PCR DATA READ/WRITE

5200

12228

ARAARRLRARA R AR RS AR AR

TEST
PCR

18
==

R4 04000004 AR AR

4200000000kttt bbas

VIA'S PCR DATA READ/WRITE

"PERIPHERAL CONTROL REGISTER"

e READ/WRTTE BITS gt_.glngrxs;.rgsgzgnRECISTER ARE TESTED 8Y WRITING, READING,
:* AND COMPARING EACH BYTE OF A SUBSET OF DATA PATTERN B.

DATA PATTERN B

$ -~ 2282808008842

5201
5202
5203
5204

5205
5206
5207
5208
5209
5210
5211
5212
5213
5214
5215
5216
5217

027442
027442
027446
027450
027450
027452
027452
027454
027456
027462
027466
027466
027466
027466

027470
027474
027500
027504
027510
027512
027512
5218 027514
027514
027516
5219
5220 027520
027520
027520
5221
5222 027522
5223
5224 027524
027524
027524

{SUBSET)

125,
040,

252, 000,
100, 200.

377,

001,

00 0000000000000 0 0004000000000

BGNTST
004737
103003

003762

104460

104410

JSR
8CC
ERROR

PC,MSTCLR

ESCAPE

TST

304

002, 004,

T18::

sINIT DMV €& START UP THE MAINT. LOOP
: IF AN ERROR OCCURED,

sREPORT

IT &

EXIT

30$:
T20.LP:

MOV
MOV

#PATB+2,R1
#PATB+15,R3

002306
002310
120014
005034

BGNSUB

MOvVB
MOVB
MOV
JSR
8CC
ERROR

104460

:THE SUBTEST ONLY

ESCAPE

104410
10¢:

(R1),TDATA
(R1)+,GDATA

:SETUP TEST DATA BYTE FOR

CS$ESCAPE

PC,STREG

108

:PERFORM STATIC TEST OF
;WAS AN ERROR FOUND?

TST

oPCR,RO

"STREG"

THE

SPECIFIED REGISTER

:YES, REPORT IT AND

EXIT FROM THE TEST.

ENDSUB

sSo8

TRAP

ENDTST

:IF

THERE

:TEST

IT,

TRAP

IS IN FACT MORE DATA,
ELSE,

CS$ERROR

“CKLOOP“ IS IMPLIED

L10061:
R3,T720.LP

L10060-.

:SETUP EXPECTED DATA BYTE FOR "STREG“
s SPECIFY THE REGISTER BEING TESTED

104403

104401

TRAP

TESTS }Hg ONE PATTERN
18.1:
TRAP
csBSuB

000006

077317

CS$ERROR

:POINT TO PATTERN TABLE
;GET & OF ENTRIES IN TABLE

104402
111137
112137
012700
004737
103003

TRAP

.WORD

002530
002543

020,

00 0000000000000ttt dtis

000050

012701
012703

010,

FALL OUT OF

L10060-.

TRAP

CSESLB

LOOP BACK

LOOP AND

L10060:

CSESCAPE

.WORD

TRAP

TEST

CSETST

CNDMAAO DMV1l MCTRL DIAG #1
_TEST

VIA'S

MACRO M1200

K11

22-FEB-84 15:22

PAGE 69

SEQ 0140

IER DATA READ/MWRITE

5243

.SBTTL TEST 19

-- VIA'S IER DATA READ/WRITE

144220088000 RRRRARRARRARARAR LR AL AR LR AR R AR A AR

A AR R AR AR AR ARAR AR AR LA R AR L AR RARE RS AL S

TEST 19 -- VIA'S IER DATA READ/WRITE

i s

IER ==

1 &

"INTERRUPT ENABLE REGISTER"

1 *

:*»
;%
+#
;#

BITS 0-6 OF THE IER CAN BE SET OR CLEARED ON A WRITE, UNDER CONTROL OF THE
SET/CLEAR CONTROL BIT 7. TO TEST THIS , EACH BYTE OF DATA PATTERN D IS
WRITTEN INTO IER, AND THE REGISTER IS READ AND COMPARED TO THE CORRESPOND
ING BYTE OF DATA PATTERN E.

DATA PATTERN D

= 200,

201,

202,

204,

210,

220,

240,

300,

200,

000,

0OO1,

002,

004,

010,

020,

040,

100,

000,

325,

125,

252,

052

000,

001,

003,

007,

O17,

037,

077,

177,

176,

174,

170,

160,

140,

100, 000, 000,

i
HE

DATA PATTERN E

i e

: =2

880040

027526
5244 027526

5245 027532

H
004737

103003

5246 027534
027534
5247 027536
027536
5268 027540

104410
000052

5249 027542
5250 027546

012701
012103

gggé 027550

003762

012702

002644

5256
5257
5258
5259
5260
5261

027556
027562
027566
027572
027576
027600
027600
5262 027602
027602
— 027604

30s:

002676

T19::
;INIT DMV € START UP THE MAINT.

;:IF AN ERROR OCCURED,

ESCAPE

TST

MOV
MOV

4PATD,R1
(R1)+,R3

;POINT TO PATTERN TABLE
;GET & OF ENTRIES IN TABLE

MOV
T21.LP:

PC,MSTCLR

30¢

ERROR

5253 027554
5254 027554
027554
—— 027554

BCC

HPATE+2,R2

BGNSUB

;REPORT IT &

EXIT

002306
002310
120016
005034

104460

104410
000006

5264 027606
027606
— 027606

10$:
104403

5266 027610

077317

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10062-.

; THE SUBTEST ONLY TESTS THE ONE PATTERN
719.1:

MOVB
MOVB
MOV
JSR
B8CC
ERROR

(R1)+,TDATA
(R2)+,GDATA
#IENR,RO
PC,STREG
10

ESCAPE

TST

L10063:
R3,T21.LP

TRAP

csssuB

;SETUP TEST DATA BYTE FOR "STREG"”
:SETUP EXPECTED DATA BYTE FOR "STREG"”
;SPECIFY THE REGISTER BEING TESTED
;+PERFORM STATIC TEST OF THE SPECIFIED REGISTER
;WAS AN ERROR FOUND?
:YES, REPORT IT AND
TRAP
CSERROR
:
EXIT FROM THE TEST.
“CKLOOP" IS IMPLIED
TRAP
CS$ESCAPE
.WORD
L10062 -.

ENDSUB

S0B

LOOP

;POINT TO “EXPECTED" DATA PATTERN TABLE

104402
112137
112237
012700
004737
103003

125, 000, 052, 000

RRRRR AR AR AR AR AR A AR AR 0240002000000 R0 A0tttk btbbtts

BGNTST
JSR

104460

+ IF

THERE

IN FACT MORE DATA,

TRAP

CSESUB

LOOP BACK

CNDMAAO DMV1l MCTRL DIAG #1
TEST

MACRO M1200

22-FEB-84

15:22

L11

PAGE 69-1

SEQ 0141

VIA'S IER DATA READ/WRITE

s TEST IT.

5267

5268
5269 027612
027612
027612

ELSE,

FALL OUT OF LOOP AND

TEST

ENDTST

104401

L10062:

TRAP

CSETST

CNDMAAO DMV1l MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE

M11
70

SEQ 0142

TEST 20 -- VIA'S ORB/DDRB MASTER CLEAR TEST
.SBTTL TEST 20 -- VIA'S ORB/DDRB MASTER CLEAR TEST

5282

142220

RAARRRRARARRRERRARAL AR AR A2 2422000000000 80 AAAA00024 000000000 000000040400

TEST 20

-- VIA'S ORB/DDRB MASTER CLEAR TEST

i
i
14

ORB == "QUTPUT REGISTER PORT B"
DDRB == "DATA DIRECTION REGISTER B"”

:# FIRST,

A MASTER CLEAR IS PERFORMED.

NEXT,

377 IS LOADED INTO DDRB TO SET

;# ALL B PORT PINS FOR OUTPUT MODE. THEN, A 000 BYTE IS WRITTEN INTO ORB AND
+*# THE REGISTER IS READ BACK AND CHECKED FOR 000. THEN, A MASTER CLEAR IS
;*# PERFORMED AND ORB IS READ AND CHECKED FOR 377.
B

:--‘.“t“tt“tt.‘t““‘0“.0““‘.‘.“00.“.‘t“0‘0“000tt‘ot“t“t.‘.‘..“to
:

027614

5283
5284 027614
5285 027620
5286 027622
027622
5287 027624
027624
027626
5288
5289 027630
027636
5291
5292
5293
5295
5296
5297
5298

027644
027650
027654
027656
027656
5299 027660
027660
027662
5300
5301
5302
5303 027664
027670
5305 027674
5306 027676
027676
5307 027700
027700
027702

5308
5309 027704
5310 027710
5311 027712
027712

004737

103003

003762

104460

104410
000252
012737
013737

000377
002310

002310
002306

1$:

;
i
012700
004737
103003

120002
005034

104460
104410
000216

012700
004737
103003

120000
005034

PC,MSTCLR
1$

sINIT DMV € START UP THE MAINT. LOOP
:IF AN ERROR OCCURED,
;REPORT IT &

ESCAPE

TST

#377,GDATA

:SETUP FOR CALL TO STREG

MOV

GDATA, TDATA

MOV
JSR
8CC
ERROR

#0DRB,RO
PC,STREG
4%

;POINT TO ORB
:LOAD € TEST IT
+ IF OK, PROCEED WITH TESTING
:ELSE, REPORT THE ERROR

ESCAPE

TST

4%:

MOV

JSR

B8CC

EXIT

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10064-.

MWE'LL USE "STREG” TO LOAD & CHECK "DDRB" WITH 377 THEREBY SETTING UP
"ORB” FOR BI-DIRECTIONAL TRANSFERS

NOW WE'LL USE

104410
000176

104460

JSR
8CC
ERROR

ERROR

003762

T20::

;

104460

004737
103003

BGNTST

“STREG" TO SET & CHECK

€ QUIT

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10064-.

TRAP

CSERROR

TRAP

CSESCAPE

"ORB"

®0RB ,RO

;POINT TO DDRB

: IF NO ERROR HERE, PROCEED

PC,STREG

TRAP

:LOAD & TEST “ORB"
:ELSE,

REPORT THE ERROR
& QUIT

ESCAPE

TST

JSR
8CC

PC,MSTCLR
10$

: ISSUE THE MASTER CLEAR (STAY IN M-LOOP)
: IF NO ERROR HERE, PROCEED

ERROR

:ELSE,

REPORT

TRAP

C$ERROR

CNDMAAO DMV1l MCTRL DIAG ¢1
TEST 20

5327
5328
5329
5330
5331
5332
5333
5334
5335
5336
5337

22-FEB-84

15:22

PAGE

N1l
70-1

SEQ 0143

-- VIA'S ORB/DDRB MASTER CLEAR TEST

5312 027714
027714
027716
5313
5314 027720
5315
5316 027724
5317 027730
5318 027732
5319 027734
5320 027736
027736
5321 027740
027740
5322
5323
5324
5325
5326

MACRO M1200

ESCAPE

104410
000162
002310

004537

004064

10$:

104460

104410

000136

027744
027752
027754
027762

123737
001407
012737

027762
027764
027766
027770

104455
000052
014515
006612

027772
030000

012737
013737

030006

012700
004737
103003

002312

002310

JSR

RS,READ

:READ THE

BDATA
8CC
ERROR

124

: IF_ NO ERROR READING IT,
;ELSE, REPORT IT

ESCAPE

TST

"RESET" VALUE OF

THE

000002

002334

000377
002310

002310
002306

"DDRB"

PROCEED
TRAP

€ QUIT

14s%:

MOV
MOV

#377,GDATA
GDATA, TDATA

16$:

002312
103003

\)DDRB.RO

PC,STREG
16%

:LOAD & TEST IT
:IF OK, PROCEED WITH TESTING
:ELSE, REPORT THE ERROR

ESCAPE

TST

CLR
JSR
ORB

ERROR

104460

ESCAPE

104410
000030

002334

TO STREG

MOV

BDATA
8CC

000000

:SETUP FOR CALL

MWE'LL USE "STREG” TO LOAD & CHECK “DDRB” WITH 377 THEREBY SETTING UP
"ORB" FOR BY-DIRECTIONAL TRANSFERS
JSR
8CC
ERROR

002312

CSESCAPE

L10064-.

BOATA.GDATA
:DID IT GET CLEARE?
14
:YES, GOOD.
NOW CHECK "ORB"
ODDR8€<I7> REGNUM
;NO!
BUILD REGISTER @ POINTER
EMS,ERR
:REPORT HASTER CLEAR FAILURE
:
“DEVICE FATAL” ERROR ¢ 42
TRAP
CSERDF
.WORD
42
.WORD
EMS
.WORD
ERR?7

120002

002310

C$ERROR

CMPB
BEQ
MOV
GEDF

005034

002310
004064

CS$ESCAPE
L10064-.

12%:

104410
000054

123737
001407
012737

:FOR TESTING PURPOSES LATER

.WORD

104460

005037
004537
120000

GDATA

TRAP

i
i

030012
030016
030020
030020
5338 030022
030022
030024
5339
5340 030026
030032
5342 030036
5343 030040
5344 030042
5345 030044
030044
5346 030046
030046
030050
5347
5348 030052
5349 030060
5350 030062
5351 030070

€ QUIT

CLR
ODRB

002312
103003

027742

TRAP
.WORD

005037
120002

TST

18%:

CMPB
BEQ
MOV
GEDF

;POINT TO ORB

€ QUIT

GDATA
RS,READ

:SETUP FOR TESTING ORB
iNOW READ THE "RESET" VALUE OF

18$

+IF NO ERROR READING IT,

TST

GDATA,BDATA
324

+ELSE, REPORT IT
€ QuIr

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10064-.

“ORB"

PROCEED

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10064-.

iWAS IT PROPERLY RESET?
s YES, THIS TEST IS DONE,

EXIT
QORBE<17> ,REGNUM
;NO!
BUILD REGISTER @ POINTER
EMS,ERR7
+REPORT HASTER CLEAR FAILURE

“DEVICE FATAL” ERROR & 43

CNDMAAO DMV11 MCTRL DIAG o1

MACRO M1200

22-FEB-84

15:22

Ble
PAGE

70-2

TEST 20 -- VIA'S ORB/DDRB MASTER CLEAR TEST

5352
5353 030100
030100
030100

104455
000053
014515
006612

TRAP

32%:

104401

CSERDF

358

030070
030072
030074
030076

SEQ 0144

TRAP

CSETST

EMS

ERR7

ENDTST
L10064:

CNDMAAD DMV11 MCTRL DIAG @1
TEST

MACRO M1200

VIA'S ODRB MASTER CLEAR

22-FEB-84

15:22

- ¥
PAGE

SEQ 0145

TEST

5367

.SBTTL

TEST 21

VIA'S DDRB MASTER CLEAR TEST

1000000000000 000000000000000000000000000000000000

30000000000000000000000000000

TEST 21 -- VIA'S DDRB MASTER CLEAR TEST

DDRB ==

1 *

3¢

“DATA DIRECTION REGISTER B"

i A 377 BYTE IS WRITTEN INTO DORB AND THE REGISTE
R IS READ BACK AND CHECKED
1o ggg 377. THEN, A MASTER CLEAR IS PERFORMED AND DDRB
IS READ AND CHECKED FOR
.
"
e

i* NOTE:
T
e

THIS TESTING IS ALSO DONE IN TEST 23,
IT IS INCLUDED HERE ONLY
PROVIDE TIGHTER LOOPING ON JUST THE DDRB MASTER CLEAR CHECKING.

;~-““‘.‘“‘.““.‘.‘....‘....‘.“....“.‘..“...‘0....

‘0“‘0.0“....0.0..0‘0

5368
5369 030102
5370 030106
S371 030110
030110
5372 030112
030112
030114
5373
5374 030116
5375 030124
5376 030132
5377
5378
5379
5380 030136
5381 030142
5382 030144
030144
5383 030146
030146
030150
5384
5385 030152
5386 030156
5387 030160
030160
5388 030i62
0301€2
030164
5389
5390 030166
5391 030172
5392 030176
5393 030200
5394
5395 030202
5396 030210

BGNTSI

030102

T2l::
004737
103003

003762

JSR

104460

000377
002310
120002

002310
002306

1¢:

sREPORT

TST

MOV
MOV
MOV

NOW WE'LL USE

005034
..

104460

JSR
BCC

ERROR

“-ESCAPE

104410
000060
004737
103003

s INIT DMV € START UP THE MAINT. LOOP
;s IF AN ERROR OCCURED,

TRAP

EXIT

TRAP

i+
004737
103003

ESCAPE

104410
000114
012737
013737
012700

PC,MSTCLR

8CC
ERROR

1SETUP FOR CALL

"STREG"” TO SET & CHECK
PC,STREG
5%

TST

L10065-.

TRAP

CSERROR

"DDRB"

sLOAD & TEST

"DDRB"

sELSE, REPORT

PROCEED

€& QUIT

TRAP

.WORD

003762

Ss:

JSR

BCC

ERROR

104460

ESCAPE

104410

PC,MSTCLR

104

s ISSUE THE MASTER CLEAR (STAY
+ IF NO ERROR HERE, PROCEED

TST

tELSE, REPORT IT
€ QUIT

000044

005037
004537
120002
002312

002310
004064

123737
001407

002310

108:

002312

CLR
JSR
DDRB
BDATA

GDATA
RS, READ

tFOR TESTING PURPQOSES LATER
iNOW READ THE "RESET” VALUE OF

CMPB
BEQ

GDATA,BDATA
304

1 YES,

tWAS

CSESCAPE

.WORD

TO STREG

s IF NO ERROR HERE,

C$ERROR

IT PROPERLY
THIS

TEST

RESET?

IS DONE,

EXIT

CSESCAPE

L10065-.

IN M-LOOP)
TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10065-.

“DDRB"

CNDMAAO DMV11 MCTRL DIAG @1
TEST 21

HACRO M1200

VIA'S DDRB MASTER CLEAR

5397 030212
5398 030220

012737

030220
030222
030224
030226

104455
000054
014515
006612

5399
5400 030230
030230
030230

000002

‘

;
;

or.

o
A

104401

15:22

PAGE

MOV

GEDF

71-1

SEQ 0146

000“85‘17‘ REGNUM

EMS ,ERR

’

e
r

:
:

32%:

sNO!

BUILD REGISTER # POINTER

“DEVICE

FATAL”

1REPORT HASTER CLEAR FAILURE

ENDTST

10
_

D12

TEST

062334

)

22-FEB-84

AL
=

ERROR

L10065:

TRAP
.WORD
.HORD
.WORD

CSERDF
44
EMS
ERR7

TRAP

CSETST

t
t
t

’\. il s

Qi gL v Foacim

"‘\’.:'o

!
gk|

: W\

iy 3’? A
"‘

)

% 2

& .

e
2

CNDMAAO DMVil MCTRL DIAG @1
TEST 22

MACRO M1200

22-FEB-84

15:22

PAGE

SEQ 0147

VIA'S DDRA MASTER CLEAR TEST

.SBTTL TEST 22 -- VIA'S DDRA MASTER CLEAR TEST

5411

1000000000000 0000000000000tttttttitttttttttttttitiititiatttitssssssssssssisnsnsnes

TEST 22 -- VIA'S DDRA MASTER CLEAR TEST

DDRA ==

"DATA DIRECTION REGISTER A"

;# A 377 BYTE IS WRITTEN INTO DDRA AND THE REGISTER IS READ BACK AND CHECKED
;¢ FOR 377. THEN, A MASTER CLEAR IS PERFORMED AND DDRA IS READ AND CHECKED FOR

:+ 000,
1--888800000200448040800480880800005
2000008008000 000088 4000000000000 0 000000000

BGNTST

030232

5412
5413 030232
5414 030236
5415 030240
030240
5416 030242
030242
030244
5417
5418 030246
5419 030254
5420 030262
5421
5422
5423
5424 030266
5425 030272
5426 030274
030274
5427 030276
030276
030300

004737

103003

003762

104460
104410

T22::

JSR
8CC
ERROR

PC,MSTCLR

ESCAPE

TST

sINIT DMV & START UP THE MAINT.

:IF AN ERROR OCCURED,

sREPORT

IT &

TRAP

EXIT

TRAP

000114

012737
013737
012700

000377
002310

120003

002310
002306

:
004737
103003

MOV
MOV
MOV

18:

104460
104410
000060

004737
103003

030316
030322
030326
030330

005037
004537
120003
002312

002310
004064

030332
030340
030342
030350

123737
001407
012737

002310

002312

000003

002334

S5$:

003762

sSETUP FOR CALL

CSERROR

CSESCAPE

.WORD

L10066-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10066-.

TO STREG

NOW WE'LL USE “STREG” TO SET & CHECK “DDRA"

005034

030302
030306
030310
030310
030312
030312
030314

#377,GDATA
GDATA,TDATA
@DDRA,RO

LOOP

104460

104410
000044
10¢:

JSR
8CC
ERROR

PC,STREG

ESCAPE

TST

JSR
8CC
ERROR

PC.MSTCLR

s ISSUE THE MASTER CLEAR (STAY

ESCAPE

TST

GDATA

1FOR TESTING PURPOSES LATER

CLR

108

sLOAD & TEST

"“DDRA"

:IF NO ERROR HERE, PROCEED

;ELSE, REPORT IT
€ QUIT

:IF NO ERROR HERE, PROCEED
;ELSE, REPORT IT
& QUIT

CSERROR

TRAP
.WORD

CSESCAPE
L10066
-.

RS,READ

CMPB
BEQ

GDATA,BDATA
;WAS IT PROPERLY RESET?
328
s YES, THIS TEST IS DONE, EXIT
ODDRAE<17> ,REGNUM
sNO!
BUILD REGISTER & POINTER
EMS,ERR7
;sREPORT MASTER CLEAR FAILURE

MOV

GEDF

;

“RESET"” VALUE OF

TRAP

JSR

DDRA
BDATA

:NOW READ THE

IN M-LOOP)

"DDRA"

“DEVICE FATAL" ERROR & 45

CNDMAAO DMV11 MCTYRL DIAG #1
TEST 22

MACRO M1200

VIA'S DDRA MASTER CLEAR

030350
030352
030354
030356

5443
5444 030360
030360
030360

22-FEB-84

15:22

Fle
PAGE

72-1

SEQ 0148

TEST

104455
000055
014515
006612

TRAP

. WORD
. WORD
32%:

104401

ENDTST
L10066:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA'S SR MASTER CLEAR

MACRO M1200

22-FEB-84

15:22

G1l2

PAGE 73

388 0808

TEST

5455

.SBTTL

TEST 23

VIA'S SR MASTER CLEAR

TEST

1000000000000 RRRARARRARRARAAARRARRARSRASARAALALAAARAIERRRRRLANIMAALSRARSS

::
:E
i

TEST 23 -- VIA'S SR MASTER CLEAR TEST
SR == "SHIFT REGISTER"
A

123 BYTE

;¢ FOR 123,

WRITTEN

INTO

AND

THE

IS READ BACK

AND CHECKED

THEN, A MASTER CLEAR IS PERFORMED AND SR IS READ AND CHECKED FOR

:* NO CHANGE.
]

1--0080000000000000000000000000000000000000000800000000000800000000000000000008

A 030362

5457 030362

5458 030366
5459 030370
030370
5460 030372
030372

004737

103003

5462 030376

004537

g:g; 030422

120013
000000
012737
013737

012700

004322

1$:

000123
002310

5476 030442
S477 030446
5478 030450
030450
5479 030452
030452
_— 030454

004737
103003

5481 030456

004537

g:gz 030464

002312

5482 030462

5485 030466
5486 030474

5487 030476

TST

120012

ACR
0
MOV
MOV

MOV

NOW WE'LL USE

005034

104460

104410
000054
003762

S$:

104460

104410
000040

120012

ESCAPE

JSR

002310
002306

:
004737
103003

PC,MSTCLR

004064

10%:

;

g:;g
5471 030426
5472 030432
5473 030434
030434
5474 030436
030436
— 030440

JSR

8CC
ERROR

104410

000120

030402
030404
030406
030414

003762

104460

— 030374
5463
5464
5465
5466

BGNTST

‘

€123,GDATA
GDATA,TDATA

3INIT DMV & START UP THE MAINT. LOOP
TRAP

EXIT

TRAP

L10067-.

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10067-.

#SR,RO

“STREG"”

TO SET & CHECK

"SR"

PC.STREG
S$

;LOAD &€ TEST "SR"
: IF NO ERROR HERE,
;ELSE, REPORT IT

ESCAPE

TST

JSR
B8CC
ERROR

PC,MSTCLR
10¢

;ISSUE THE MASTER CLEAR (STAY
s IF NO ERROR HERE, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR

RS,READ

BDATA

002310

002312

cMPB’

GDATA,BDATA

012737

000012

002334

MOV

#SRE<17> ,REGNUM

BEQU

CSESCAPE

.WORD

TO STREG

JSR
8CC
ERROR

CS$ERROR

;:FORCE SR TO MODE O
sSETUP FOR CALL

123737

001407

123::

3IF AN ERROR OCCURED,
;REPORT IT &
;.

RS,WRITEI

bV,

328

& QUIT

THE

"RESET” VALUE OF

;NO!

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10067-.

"SR"

(IT SHOULDN'T HAVE CHANGED)

tWAS IT PROPERLY RESET?

1YES,

IN M-LOOP)

& QUIT

:NOW READ

PROCEED

THIS

TEST IS DONE,

EXIT

BUILD REGISTER & POINTER

CNDMAAO DMV11 MCTRL DIAG @1
TEST 23

MACRO M1200

22-FEB-84 15:22

H12

PAGE 73-1

SEQ 0150

VIA'S SR MASTER CLEAR TEST

5488 030504
030504
030506
030510

2000 030512

5490 030514
030514
030514

GEDF
104455
000056
014515
006612

sREPORT MASTER CLEAR FAILURE
:
"DEVICE FATAL” ERROR @ 46
TRAP
.WORD
.WORD

.WORD

32%:

104401

EMS5,ERR7?

CSERDF
46
EMS
ERR7

ENDTST

L10067:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG 21
TEST

MACRO M1200

VIA'S ACR MASTER CLEAR

22-FEB-84

15:22

PAGE

112

SEQ 0151 -

TEST

.SBTTL TEST 24

5501

-- VIA'S ACR MASTER CLEAR TEST
red

LY T

Ty Yy
Yy
Yy
Yy
Y Y Y Yy Y Y VY Y Y PPy YS

TEST 24
ACR

VIA'S ACR MASTER CLEAR TEST

"AUXILIARY CONTROL REGISTER"

;*# A 252 BYTE IS WRITTEN INTO ACR AND THE REGISTER IS READ BACK AND CHECKED
;# FOR 252. THEN, A MASTER CLEAR IS PERFORMED AND ACR IS READ AND CHECKED FOR
i1+ 000, TO VERIFY THAT IT IS CLEARED BY MASTER CLEAR.
$-~28282

8882004240440

AL R AR

BGNTST

030516

5502
5503 030516
5504 030522
5505 030524
030524
5506 030526
030526
030530
5507
5508 030532
5509 030540
5510 03C546
5511
5512
5513
5514 030552
5515 030556
5516 030560
030560
5517 030562
030562
030564
5518
5519 030566
5520 030572
5521 030574
030574
5522 030576
030576
030600
5523
5524 030602
5525 030606
5526 030612
5527 030614
5528
5529 030616
5530 030624
5531 030626
5532 030634

0080000000008 00000000000

004737
103003

003762

104460
104410
000114

012737
013737

12700

000252
002310
120013

002310
002306

004737
103003

ESCAPE

TST

#252,GDATA

GDATA,TDATA

EXIT

LOOP

TRAP
TRAP

;SETUP FOR CALL

C$ERROR
C$ESCAPE

.WORD

L10070-.

TRAP

CS$ERROR

TO STREG

#ACR,RO

NOW MWE'LL USE "STREG” TO SET & CHECK "ACR" .

005034

104410
000060

JSR
8CC
ERROR

PC,STREG
Ss

;:LOAD &€ TEST "ACR"
:IF NO ERROR HERE, PROCEED

ESCAPE

TST

;ELSE, REPORT IT
& QUIT

TRAP

.WORD

S5$:

003762

104460
104410
000044

JSR
8CC
ERROR

PC,MSTCLR

:ISSUE

THE MASTER CLEAR (STAY

ESCAPE

TST

€ QUIT

10$

: IF NO ERROR HERE, PROCEED
;ELSE, REPORT IT

002310

123737

002310

002312

000013

002334

10$:

004064

CLR
JSR

TRAP
TRAP

ACR

GDATA

;+FOR TESTING PURPOSES LATER

GDATA,BDATA
324

:+WAS IT PROPERLY RESET?
:YES, THIS TEST IS DONE,

EMS,ERR7

;+REPORT MASTER CLEAR FAILURE

RS,READ

tNOW READ

THE

"“RESET"

VALUE OF

“ACR"

BDATA
CcMPB
BEQ
MOV
GEDF

QACRE<17> ,REGNUM

iNO!

CSESCAPE

L10070-.

IN M-LOOP)

.WORD

005037
004537
120013
002312
001407
012737

sINIT DMV & START UP THE MAINT.
:IF AN ERROR OCCURED,
;REPORT IT &

MOV

104460

004737
103003

PC,MSTCLR
1$

MOV

T24::

JSR
8CC
ERROR

MOV

AA s

EXIT

BUILD REGISTER & POINTER

“DEVICE FATAL" ERROR & 47

CSERROR
CSESCAPE

L10070-.

CNDMAAO DMV11l MCTRL DIAG #1
TEST 24

MACRO M1200

VIA'S ACR MASTER CLEAR

030634
030636
030640
030642

3533
5534 030644
030644
030644

Jl12
22-FEB-84

15:22

PAGE

74-1

' SEQ 0152

TEST

104455

TRAP

000057
014515
006612

32¢:

104401

ENDTST

L10070:

CSERDF

.WORD
.WORD
.WORD

47
EMS

TRAP

CSETST

ERR7

CNDMAAO DMV11 MCTRL DIAG #1
TEST 25

MACRO M1200

22-FEB-84 15:22

K12

PAGE 75

20 0153

VIA'S PCR MASTER CLEAR TEST

5545

.SBTTL TEST 25
R

-- VIA'S PCR MASTER CLEAR TEST

Y Y Yy Y Y

Yy Yy Py P

PPy

rys

TEST 25 -- VIA'S PCR MASTER CLEAR TEST

PCR == "PERIPHERAL CONTROL REGISTER”

i* A 377 BYTE IS WRITTEN INTO PCR AND THE REGISTER IS READ BACK AND CHECKED
:#

FOR

377.

THEN,

A MASTER

CLEAR

IS PERFORMED AND PCR

READ

AND

CHECKED FOR

:+ 000,
L

$ -~

" 030646

;

5547 030646
5548 030652
5549 030654
030654
5550 030€56
030656
— 030660

004737
103003

5552 030662
5553 030670
ggg; 030676

012737
013737
012700

104460
104410
000114

000377
002310

120014

002310
002306

1%:

;

030710

5561 030712
030712
5562 030714

004737
103003

104460
104410
000060
004737
103003

003762

5568
5569
5570
gg;g

030732
030736
030742
030744

005037
004537
120014
002312

002310
004064

5573
5574
5575
5576

030746
030754
030756
030764

123737
001407

002310

002312

S$:

000014

002334

104460
104410
000044

012737

2440000000000 0000tRttt

10$:

T25::

JSR
8CC
ERROR

PC,MSTCLR
1$
’

; INIT DMV € START UP THE MAINT.
;IF AN ERROR OCCURED,
;REPORT IT &

ESCAPE

TST

MOV
MOV
MOV

;SETUP FOR CALL TO STREG

NOW WE'LL USE

005034

5563 030716
5564 030722
5565 030724
030724
5566 030726
030726
— 030730

RRR AR AR R AR LA RRARAARAAR AR AR AR AR AR

BGNTST

003762

ggg?
5558 030702
5559 030706
5560 030710

22220200000

EXIT

LOOP

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10071-.

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10071-.

#PCR,RO

"STREG” TO SET & CHECK

"PCR"

JSR
B8CC
ERROR

PC,STREG
S$

;:LOAD & TEST "“PCR"
: IF NO ERROR HERE, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR
8CC
ERROR

PC,MSTCLR
10

ESCAPE

TST

; ISSUE THE MASTER CLEAR (STAY IN M-LOOP)
: IF NO ERROR HERE, PROCEED
;ELSE, REPORT IT
TRAP
CS$ERROR
:
€ QUIT
TRAP
CSESCAPE
I
.WORD
L10071-.

CLR
JSR
PCR
BDATA

GDATA
RS,READ

cMPB
BEQ
MOV
GEDF

GDATA,BDATA
:WAS IT PROPERLY RESET?
324
:YES, THIS TEST IS DONE, EXIT
#PCRE<17> ,REGNUM
:NO!
BUILD REGISTER # POINTER
EMS,ERR7
;REPORT MASTER CLEAR FAILURE

& QUIT

;FOR TESTING PURPOSES LATER
;NOW READ THE "RESET" VALUE OF

"PCR"”

“"DEVICE FATAL" ERROR & 48

CNDMAAO DMV1l MCTRL DIAG #1
TEST 25

MACRO M1200

VIA'S PCR MASTER CLEAR

030764
030766
030770
030772

5577
5578 030774
030774
030774

22-FEB-84

L12
15:22

PAGE

75-1

SEQ 0154

TEST

104455
000060
014515
006612
32$:

104401

CS$ERDF

TRAP
.WORD
.WORD

48
EMS

TRAP

CSETST

ERR7

ENDTST
L10071:

CNDMAAO DMV1l MCTRL DIAG #1

TEST 26

MACRO M1200

22-FEB-84

15:22

M12

PAGE 76

SEQ 0155

-- VIA'S IER MASTER CLEAR TEST

.SBTTL TEST 26 -- VIA'S IER MASTER CLEAR TEST

5589

1202280800000 0000 0000000000000 000500000000 04000000 AR
HE

R AR AR AR

AR R Akttt bb

TEST 26 -- VIA'S IER MASTER CLEAR TEST

IER == "INTERRUPT ENABLE REGISTER"”

:‘

;# A 377 BYTE IS WRITTEN INTO IER AND THE REGISTER IS READ BACK AND CHECKED
;# FOR 377. THEN, A MASTER CLEAR IS PERFORMED AND IER IS READ AND CHECKED FOR

;% 200,
HE

LY TE TR

5590
5591 030776
5592 031002
5593 031004
031004
5594 031006
031006
031010
5595
5596 031012
5597
5598 031016
5599 031024
031032
5601
5602
5603
031036
5605 031042
5606 031044
031044.
5607 031046
031046
031050
5608
5609 031052
5610 031056
5611 031060
031060
5612 031062
031062
031064
5613
5614 031066
5615 031074
5616 031100
5617 031102
5618
5619 031104
5620 031112
5621 031114

004737
103003

JSR

003762

B8CC

ERROR

104460

ESCAPE

104410
000122

151334

012737
013737
012700

000377
002310
120016

1$:
002310
002306

;
103003

PR R

AL SRR

AR R

SRR

RS S

S AR R

L S

005034

104410
000062

Ss:

003762

T26::

PC,MSTCLR

;INIT DMV € START UP THE MAINT. LOOP

;sIF AN ERROR OCCURED,

TST

CLRB

@BSELO

MOV
MOV
MOV

#377 ,GDATA
GDATA, TDAT A
#IENR,RO

;REPORT IT &
EXIT

TRAP

C$ERROR

TRAP

CS$ESCAPE

104410
000046
000200
004064

002310

123737
001407
012737

002310

002312

000016

002334

L10072-.

;MAKE SURE NO Q-BUS INTERRUPTS RESULT FROM

TESTING THE IER REGISTER
:
:SETUP FOR CALL TO STREG

10¢:

:LOAD & TEST "IER"
:IF NO ERROR HERE, PROCEED
:ELSE, REPORT IT

JSR
8CC
ERROR

PC,STREG
Ss

ESCAPE

TST

JSR
BCC

PC,MSTCLR
10$

; ISSUE THE MASTER CLEAR (STAY IN M-LOOP)
: IF NO ERROR HERE, PROCEED
;ELSE,

REPORT

ESCAPE

TST

€ QUIT

MOV
JSR

#200,GDATA
RS,.READ

:FOR TESTING PURPOSES LATER

cMPB
BEQ

GDATA,BDAT A
:WAS IT PROPERLY RESET?
:YES, THIS TEST IS DONE, EXIT
324
#IENRE<17>,REGNUM
sNO!
BUILD REGISTER & POINTER

ERROR

104460

012737
004537
120016
002312

NOW WE'LL USE “STREG"” TO SET & CHECK "IER"

104460

004737
103003

AR PSR RS

.WORD

105077

004737

BGNTST

030776

E L

IENR
BDATA

MOV

& QUIT

:NOW READ THE “RESET" VALUE OF

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10072-.

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10072-.

"IER"

CNDMAAO DMV11 MCTRL DIAG #1

TEST 26

MACRO M1200

22-FEB-84 15:22

N12

PAGE 76-1

SEQ 0156

VIA'S IER MASTER CLEAR TEST

5622 031122
031122
031124
031126
628 031130
5624 031132
031132
031132
5625

GEDF

tREPORT MASTER CLEAR FAILURE
H

104455
000061
014515
006612
32%:
104401

EM5,ERR7

"DEVICE FATAL” ERROR ¢ 49

)

TRAP
.WORD
.WORD
.WORD

CSERDF'
49
EMS
ERR7

TRAP

CSETST

ENDTST

L10072:

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA

TIMER &

5672

MACRO M1200

22 FEB
84 15:22

PAGE

B13
77

SEQ 0157

1 ONE -SHOT MODE

LSBTTL

TEST 27

- -

VIA TIMER @ 1 ONE-SHOT MODE

'oo0.0.0...0.‘....‘.‘....‘.‘0“....“.‘..‘

.‘.....".‘....0.....“.‘00.“‘.0.‘.

TEST 27

VIA

TIMER @

1 ONE-SHOT MODE

THIS TEST VERIFIES THAT THE TIMER 1 COUNTER IS OPERATIONAL
MODE, IN EACH OF TWO SUBTESTS.

IN THE FIRST SUBTEST,
A

MASTER

CLEAR

THE FOLLOWING IS PERFORMED

IS DONE

AND

THE

TIMER

SETTING BOTH ACR7 € ACR6 TO O.
THE

PROGRAM

CHECKS

INITIALLY CLEARED.

FOR

THE

“T1"

IS PLACED

FLAG

IN ONE -SHOT

IN ONE -SHOT MODE BY

(BIT 6)

IN THE

IFR

TO BE

TIL-L
(THIS

(ADR_
04)
& T1C-H (ADR 05) ARE BOTH LOADED WITH 252 (OCTAL).
IS
EQUIVALENT
TO
AAAA
(MEX) DR 43,690 (DECIMAL).) LOADING
T1C-H STARTS THE COUNTER,

THE

PROGRAM

PERIODICALLY

CHECKS

THE COUNTER TO VERIFY

THAT

%Cflse'ficgérli'fit AND THAT IT EVENTUALLY UNDERFLOWS PAST O AND CONTINUES

TIL-L_(ADR

000

04)

IS LOADED WITH 001 £ T1C-H (ADR 0S) IS LOADED WITH

ORDER TO SET

“T1” WITH A QUICK UNDERFLOW.

THE

IN IFR IS READ AND CHECKED TO BE SET.

TIC-H,

TIL-L, € TIL-H (ADDR'S 0S5, 06, & 07 RESP.) ARE READ AND AFTER

EACH THE
T1C-L

T1IC-H

SHOULD

“T1" INTERRUPT FLAG IS CHECKED

(ADDR 04)

IS READ AND

LOADED

UNDERFLOW

WITH

ALMOST

CHECKED TO BE SET AGAIN.
;é%-l.

“T1” FLAG BIT

“T1"

TO BE

IS CHECKED

O AGAIN TO

T1C-H IS LOADED WITH

125,

THE LOADING OF

INITIATE A NEW COUNT DOWN (WHICH

IMMEDIATELY)

IN THE SECOND SUBTEST,

AND

THE

T1C-M,

ALL OF

SET.

TO BE CLEARED.

AND

THME

IS LOADED WITH 125 (OCTAL) AND “T1" BIT

CLEARED BY

STILL

“T1" BIT

IN IFR IS

IS CHECKED TO BE STILL

IS READ AND CHECKED

TO BE

THE ABOVE OPERATIONS ARE REPEATED,

WITH ACR BIT 7 SET TO 1, AND ACR BIT 6 SET TO 0.
WILL BE MONITORED FOR.ITS EXPECTED LEVELS DURING

“P87“ (BIT 7 OF ORB)
THIS SUBTEST,

-‘...‘0.‘6‘0.0.“.0“.“.‘.‘0.““..‘..‘.....0‘.0.

.‘.....‘.....“.....CO....

031134
5673 031134
031134
031134
4

BGNTST

BGNSULB
104402

:
TRAP

CsB S u8

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA

5675
5676 031136
5677 031142
5678 031144
031144
S679 031146
031146
031150
5680 031152
5681 031156
5682 031160
5683 031162
5684 031164
031164
5685 031166

031166

031170
5686 031172
5687 031176
5688 031200
031200
031202
5689 031204
031206
5691 031212
5692 031214
5693 031216
5694 031220
031220
5695 031222
031222
031224
031226
031232
031234
031236
031240
031240
031242
031242
031244
5702 031246
5703 031252
5704 031254
5705 031256
5706 031260
031260
5707 031262
031262
031264
5708 031266
5709 031272
5710 031274
5711 031276
5712 031300
031300
5713 031302

MACRO M1200

22-FEB-84

15:22

-%
PAGE

77-1

5EQ 0158

TIMER @ 1 ONE-SHOT MODE

004737

103003

003762

JSR

8CC
ERROR

104460
104410
004742
004537
000000
000000
103003

ESCAPE
004660

104460
104410
004722
004737
102002
104410
002202
103143
004537
120004
002450
103003

036146

004064

103003

104460

TST

JSR
0
0
8CC
ERROR

RS,INITT1

ESCAPE

TST

JSR
8vC
ESCAPE

;

TRAP

€ EXIT TEST

TRAP

s INITIALIZE TIMER @ 1
:
0 ==> LATCHES
'
MODE O & “T1” INT,

s IF NO ERROR, PROCEED
tELSE, REPORT IT
:

AND EXIT

THIS

TEST

.WORD

PC,GETT1
. +6
SuB

TRAP

$IS ~T1” SET?
: IF NO ERROR, PROCEED
tELSE, IT'S ALREADY BEEN REPORTED

64
RS,READ

sNO, GOOD.
sGET T1CL FOR ERROR MESSAGE

8CC
ERROR

.+10

: IF NO ERROR,

ESCAPE

TST

004064

AND EXIT

THIS

sGET

8CC
ERROR

.+10

+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

RS,READ

8CC
ERROR

.+10

ESCAPE

TST

TiLL
TMP6

$GET
: IF

TEST

T1CH FOR ERROR MESSAGE

AND

EXIT

THIS

TEST

TILL FOR ERROR MESSAGE
NO ERROR,

.WORD

AND EXIT

THIS

RS,READ

tGET

8CC
ERROR

.+*10

+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

CSESCAPE

L10074-.

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10073-.

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

L10073-.

TRAP

CSERROR

PROCEED

sELSE, REPORT IT

JSR

T1LH
TMP7

CSESCAPE

L10073-,

-- EXIT

TEST

TRAP

004064

CSERROR

PROCEED

RS,READ

JSR

CSESCAPE

L10073-,

tELSE, REPORT IT

JSR

T1CH
TMPS

CS$ERRCR

ENABLE FLAG CLEARED

.WORC

8CC
JSR

T1CL
TMP4

104460

104410
004626
004537
120007
002456

+ELSE, REPORT ERROR

TRAP

104460
104410
004646
004537
120006
002454
103003

+ INIT DMV € ENTER M-LOOP

1 IF NO ERROR, PROCEED WITH TESTING

TRAP

104460

104410
004666
004537
120005
002452
103003

18:

PC,MSTCLR
1$

T1LH FOR ERROR MESSAGE

AND

EXIT

THIS

TEST

CSESCAPE

.WORD

L10073-,

TRAP

CSERROR

CNDMAQO DMV11 MCTRL DIAG o1
TEST

031304
031306
031312
031314
031316
031320

031320

5719 031322
031322
031324
5720 031326

031326
031330
031332
031334
5721 031336
031336
031342
031346
031350
031352

5722

22-FEB-84

D13
15:22

PAGE

77-2

SEQ 0159

VIA TIMER @ 1 ONE -SHOT MODE

031302

5714
5715
5716
5717
5718

MACRO M1200

5723
5724
5725 031356
726 031364
5727 031370
5728 031372
5729 031374
5730 031376
031376
5731 031400
031400
031402
5732 031404
5733 031410
5734 031412
031412
031414
5735 031416
5736 031420
5737 031424
5738 031426
5739 031430
5740 031432
031432
5741 031434
031434
031436
5742 031440
5743 031444
5744 031446
5745 031450
5746 031452
031452

104410
004606
004537
120013
002466
103003

TRAP

004064

JSR
ACR

RS,READ

tGET ACR FOR ERROR MESSAGE

8CC

.+10

+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

ERROR

104410
004566

GEDF

EM50A,ERRS0O

AND EXIT

104410
001770
103036
004537
120004
002450
103003

PRINTX

013174
000001

104460

CS$ERROR

TRAP
.WORD

CSESCAPE
L10073-.

OFMTSOM

& SAY

000002
004310

002453

02,TMPS.1
RS,WRITE

ESCAPE

CSERDF

.WORD
S0
.WORD
EMSOA
.WORD
ERRSO
THE COUNTERS HAVEN'T BEEN LOADED YET!
MOV
@FMTSOM, -(SP)
MOV
@1, -(SP)
MOV
SP,RO

000004

TRAP
ADD

CSPNTX
04,5P

TRAP

CSERROR

+INIT TIMER @ 1 BY WRITING INTO
:T1C-H (ADDR 05)

.+10

: IF NO ERROR, PROCEED
sELSE, REPORT IT

TST

AND EXIT

THIS TEST

TRAP

036146

JSR
8vC
ESCAPE

PC,GETT1

.6
suB

:IS “T1” SET?

:IF

NO ERROR,

1ELSE,

004064

8CC
JSR

64
RS,READ

8CC
ERROR

.+10

ESCAPE

TST

T1CL
TMP4

004064

PROCEED

IT'S ALREADY BEEN REPORTED

sNO, GOOD.
iGET T1CL FOR ERROR MESSAGE

REPORT

-- EXIT
CS$ESCAPE

.WORD

L10074-,

TRAP

CSERROR

AND EXIT

THIS TEST

RS,READ

:GET

8CC

.+10

: IF NO ERROR, PROCEED

ERROR

L10073-.

: IF NO ERROR, PROCEED

tELSE,

JSR

T1CH
TTMMPS

CSESCAPE

.WORD

TRAP

104460
104410
004454
004537
120005
002452
103003

TRAP

104460
104410
004510
004737
102002

TEST

“DEVICE FATAL" ERROR ¢ S0

000062
016067
010762

112737

THIS

s YES, REPORT IT'S NOT BEING CLEARED @ INIT.

104455

004537
120005
002453
103003

L10073-,

TMPB

104460

012746
012746
010600
104415
062706

CSESCAPE

" .WORD

T1CH FOR ERROR MESSAGE

;ELSE,

REPORT

TRAP

CSESCAPE

.WORD

L1i0073-,

TRAP

CSERROR

CNDMAAO DMV11 MCTRL DIAG &1
TEST 27

031500
031502
031504
031506
5755 031510
031510
031512
5756

5764
5765
5766
5767
5768
5769
5770

22-FEB-84

15:22

PAGE

E13
77-3

VIA TIMER @ 1 ONE-SHOT MODE

5747 031454
031454
031456
5748 031460
5749 031464
5750 031466
5751 031470
5752 031472
031472
5753 031474
031474
031476
5754 031500

5757
5758
5759
5760
5761
5762
5763

MACRO M1200

104410
004434
004537
120007
002456
103003

ESCAPE

004064

104460
104410
004414

031554

5771 031556
031556
031560
5772 031562
5773 031570
5774 031574
5775 031576
5776 031600
5777 031602
031602
5778 031604
031604
031606
5779 031610
5780 031614
5781 031615
5782

104410
001672

004537
120013
002466
103003

004064

68:

000377
004310

002445

104460
104410
004332
112737
004537
120000
002441
103003
104460
104410
004304
004537
252
252

THIS TEST

RS,READ

1GET

.+10

1IF NO ERROR, PROCEED
1ELSE, REPORT IT

ESCAPE

TST

GEDF

EMS0B,ERRSO

ESCAPE

SUB

TILH FOR ERROR MESSAGE

AND EXIT

THIS TEST

TRAP
.WORD

CSESCAPE
L10073-.

TRAP

C$ERROR

TRAP
CS$ESCAPE
.WORD
L10073-.
;ves. REPORT IT'S NOT BEING CLEARED @ INIT,
“DEVICE FATAL” ERROR @ S1
TRAP
CSERDF
.WORD
S1
.WORD
EMS08
.WORD
ERRSO
tAND EXIT SUBTEST

TRAP
.WORD

104460
104410
004360
112737
004537
120002
002445
103003

AND EXIT

JSR
TILH
TMP?
BCC
ERROR

104455
000063
016135
010762

Jrashe

031514
031520
031522
031524
031526
031526
031530
031530
031532
031534
031542
031546
031550
031552
031554

TST

000377
004310

002441

036114

78:
8s:

s sunsa N

e 8

JSR
ACR
TMPB
BCC
ERROR

RS,READ

:GET ACR FOR LATER ERROR MESSAGES

.+10

:IF_NO ERROR, PROCEED
sELSE, REPORT IT

ESCAPE

TST

AND EXIT

THIS TEST

MOVB
JSR
DORB
TMP2+1
BCC
ERROR

0377,TMP2.1
RS,WRITE

:INITIALIZE ORB FOR INPUT/QUTPUT

.+10

:IF_NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

AND EXIT

THIS

MOVB
JSR
ORB
TMPO.
1
8CC
ERROR

0377,TMPO.1
RS, WRITE

1SETUP VALUE FOR ORB
:00 IT

.+10

+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

JSR
.BYTE
.BYTE

RS,LODT1C
252
252

1LOAD

AND EXIT
TIMER & 1

TEST

THIS TEST

CSESCAPE
L10074-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-.

TRAP

CS$ERROR

TRAP
JWORD

CSESCAPE
L10073-,

160

CNDMAAO DMV1l MCTRL DIAG @1
TEST

VIA TIMER &

5783
5784
5785 031616

5786 031622
5787 031624
031624
031626
5788 031630
5789 031632
031632
031634
031636
031640
5790 031642
5791
5792
5793 031646
5794 031650
031650
5795 031652
031652
031654
5796 031656
5797 031660
5798 031662
5799 031664
5800 031670
5801 031672
5802 031674
5803 031676
031676
5804 031700
031700
031702
5805 031704
5806 031712
5807 031714
5808 031720
5809 031722
5810 031724
5811 031726
031726
5812 031730
031730
031732
5813 031734
5814 031740
5815 031742
5816 031744
5817 031746
031746
5818 031750
031750
031752
5819 031754

MACRO M1200

22-FEB-84

15:22

036332

036204

103003
104460
104410
004236
000240
000240
000240
004537
120004
002450
103003

004064

104460

104410
004140

JSR
8vC
ESCAPE

PC,GETPB7
. +6
SuB

8CS
GEDF

9
EM50W,ERR1

JSR

PC.KICKT1

B8CC
ERROR

.+10

ESCAPE

TST

002450
004064

004064

031614

L T

tGET "PB7”,
IS IT SET?
+ IF NO ERROR, PROCEED
1ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
C$ESCAPE
.WORD
L10074-.
+IT IS,
(SET BY LOADING DDRB & ORB ABOVE)
:IF NOT, TIMER 1 CLEARED IT!!!
i
"DEVICE FATAL"” ERROR & S2
TRAP
CS$ERDF
.WORD
S2
.WORD
EMSOW
.WORD
ERR1
+IT_TAKES SO MUTH TIME TO CHECK FOR (& MAYBE
i
EVEN REPORT) THIS ERROR THAT WE SHOULD
s
_KICK OFF THE TIMER AGAIN
: IF NO ERROR, PROCEED
;ELSE, REPORT IT
TRAP
CSERROR
3
AND EXIT THIS TEST
TRAP
CSESCAPE
.WORD
L10073-.
:
iNOW WAIT A LITTLE WHILE -- LET T1CL CHANGE
3

JSR

RS,READ

TMP4
8CC
ERROR

.+10

+ IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

CMPB
BNE
JSR
T1CH
TMPS
8CC
ERROR

TMP4 , 75
12$
R5,READ

TRAP
CSESCAPE
.WORD
L10073-.
iMAKE SURE THE COUNTER IS DECREMENTING
sIT IS, NOW SEE IF THE HIGH COUNTER IS TOO
;GET T1CH FOR ERROR MESSAGE

.+10

: IF_ NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

T1CL

104460
104410
004160
004537
120006
002454
103003

NOP
NOP
NOP

104460
104410
004210
123737
001024
004537
120005
002452
103003

77-4

SEQ 0161
v

1044°0
001556
103404
104455
000064
017305
005276
004737

F13

1 ONE-SHOT MODE

e
004737
102002

PAGE

:READ THE LOW COUNTER

AND EXIT

THIS TEST

THIS

JSR
TiLL
TMP6
BCC
ERROR

R5,READ

sGET

.+10

: IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

GEDF

EMS0D,ERRSO

TILL FOR ERROR MESSAGE

AND EXIT

sIT WASN'T

;

TEST

THIS

REPORT

TEST
THE ERROR

TRAP

CS$ERROR

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-,

TRAP

CSERROR

TRAP
«WORD

CSESCAPE
L10073-,

"DEVICE FATAL" ERROR & 53

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA

TIMER &

031754
104455
031756
000065
031760
016251
031762
010762
5820 031764
012703
5821 031770
004537
5822 031773
120005
5823 031776
002452
5824 032000
103003
5825 032002
032002
104460
5826 032004
032004
104410
032006
004104
5827 032010
123737
5828 032016
001037
5829 032020
077315
5830 032022
004537
5831 032026 - 120015
5832 032030
002472
5833 032032
103003
5834 032034
032034
104460
5835 032036
032036

032040
5836 032042
5837 032046
5838 032050
5839 032052
5840 032054
032054
5841 032056
032056
032060
5842 032062
5843 032066

5844 032070

5845 032072
5846 032074
032074
5847 032076
032076
032100

5848 032102

032102
032104
032106

032110
5849 032112
032112
032114

ggg&’

5852 032116
5853 032124

MACRO M1200

1 ONE-SHOT

12$%:
13s:

031615

004064

104410

004052
004537
120006
002454
103003

PAGE

)

004064

002456

103003

104460
104410
004012

77-5

SEQ 0162

TRAP
.WORD
.WORD
.WORD

CSERDF
53
EMSOD
ERRSO

TRAP

CS$ERROR

MOV
JSR
TICH
TMPS
8CC
ERROR

#100,R3
RS,READ

s INIT, TIMEOUT VALUE
;READ THE HIGH COUNTER

.+10

;: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

cMPB
BNE
SO08
JSR
IFR
TMPD
8CC
ERROR

TMPS, 84
17
R3,13$
RS,READ

TRAP
.WORD
:DID IT CHANGE FROM THE LOADED VALUE?
s YES, PROCEED WITH TESTING
sNO,
IF NO TIMEOUT, TRY AGAIN
;:GET IFR FOR ERROR MESSAGE

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

AND EXIT

THIS TEST

JSR
TiLL
TMP6
B8CC
ERROR

RS,READ

:GET

.+10

: IF NO ERROR, PROCEED
;:ELSE, REPORT IT

ESCAPE

TST

R
000377
004310

002445

17¢:

AND EXIT

THIS TEST

RS,READ

:GET

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

GEDF

EMSOE ,ERRSO

ESCAPE

SuB

010762

104410
001270

TILL FOR ERRUR MESSAGE

JSR
TiLH
TMP7
BCC
ERROR

104455
000066
016305

112737
004537

G13

TRAP

T1LH FOR ERROR MESSAGE

AND EXIT

THIS TEST

C$ESCAPE
L10073-,

CSERROR

TRAP

004064

104460
104410
004032
004537
120007

15:22

MODE

000100
004064

002452

22-FEB-84

CSESCAPE

.WORD

L10073-.,

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-,

TRAP

CS$ERROR

TRAP
CSESCAPE
. WORD
L10073-.
:ELSE, REPORT THAT HIGH COUNTER ISN'T RUNNI
NG
H
“DEVICE FATAL” ERROR ¢ S4
TRAP
CSERDF
.WORD
54
.WORD
EMSOE
.WORD
ERRSOQ
:IN THAT CASE, WE CAN'T PROCEED WITH TESTING EITHER
TRAP
CSESCAPE
.WORD
L10074 -,

e s descmssscsccsssensssssce

rennnanns

MOVB
JSR

0377, TMP2. 1
RS ,WRITE

s INITIALIZE

ORB FOR INPUT/QUTPUT

CNDMAAO DMV11 MCTRL DIAG #1
TEST

5854
5855
5856
5857
5858
5859
5860
5861
5862
5863
5864

5865

MACRO M1200

22-FEB-84

H13
15:22

PAGE

77-6

SEQ 0163

VIA TIMER & 1 ONE-SHOT MODE

032130
032132
032134
032136
032136
032140
032140
032142
032144
032152
032156
032160
032162
032164
032164
032166
032166
032170
032172
032176
032177

5866
5867
5868
5869
5870
5871 032200
5872 032204
5873 032206
032206
032210
5874 032212
5875 032214
5876 032220
5877 032222
5878 032224
5879 032226
032226
5880 032230
032230
032232
5881 032234
5882 032240
5883 032242
5884 032244
5885 032246
032246
5886 032250
032250
032252
5887 032254

032254
032256
032260
032262
5888 032264
032264
032266
5889 032270

DDRB

120002
002445

TMP2+1

103003

002440
004322

002441

036114

036146

104410
001174

103426
004537
120006
002454
103003

004064

104410
003640

TMPO, TMPO+1
RS,WRITEI

;CLEAR PB7 BY WRITING INTO ORB

8CC

.+10

s+ IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

JSR
.BYTE
.BYTE

RS,LODT1C

JSR
8vC
ESCAPE

PC,GETT1

8CSs
JSR

20¢

s YES, OK

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
sELSE, REPORT IT

ESCAPE

TST

20$:

(THIS CLEARS DTR & RTS!

AND EXIT

THIS

C$ERROR

TRAP

.WORD

C$ESCAPE
L10073-.

TRAP

C$ERROR

ALSO)

TRAP

+ (ADDRESS OF HIGH BYTE FOR T1C-H (ADDR 05))

. +6
SuB

RS,READ

sWAS

“T1"

SET BY

: IF NO ERROR,

;ELSE,

THE ABOVE OPERATION?

PROCEED

IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
C$ESCAPE

AND EXIT THIS TEST

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

SuB
PC,GETF87

L10074
-,

TRAP

C$ERROR

TRAP

CSESCAPE

TRAP

C$ERROR

:GET T1LL FOR ERROR MESSAGE

8CC
ERROR

EMS50F ,ERRS0

. WORD

-- CONTINUE ERROR CHECKING

;:GET

JSR

TEST

TRAP

C$ESCAPE
L10073-.
. WORD
tRE-LOAD TIMER & 1 WITH A VALUE WHICH CAUSE AN
sALMOST IMMEDIATE TIMEOUT

RS,READ

ESCAPE
036332

JSR

GEDF

104455
000067
016341
010762

AND EXIT THIS TEST

CMP
JSR

TILH
TMP7

104460

104410
001116
004737

TST

TiLL
TMP6

104460
104410
003660
004537
120007
002456
103003

ESCAPE

ERROR

104460

004737
102002

:+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ORB
30

103003

104410
003722
004537
001
000

.+10

ERROR

104460

104410
003750
023737
004537
120000
000030

8CC

AND EXIT THIS TEST

iNO,
:

TiLH FOR ERROR MESSAGE

TRAP

“PB7".

IS IT CLEARED?

L10073-.

CSESCAPE

. WORD

L10073-.

TRAP

CSERDF
55

BAD NEWS!
REPORT THE FAILURE
"DEVICE FATAL" ERROR & 55

AND GET OUT OF SUBTEST

:GET

.WORD

.WORD
.WORD
.WORD

TRAP

.WORD

EMSOF
ERRSO

CSESCAPE

L10074
-,

CNDTMMAAO DMV11 MCTRL DIAG #1
TEST 27

5911

22-FEB-84

15:22

PAGE

77-7

SEQ 0164

VIA TIMER & 1 ONE-SHOT MODE

5890 032274
5891 032276
032276
032300
5892 032302
5893 032304
5894 032310
5895 032312
5896 032314
5897 032316
032316
5898 032320
032320
032322
5899 032324
5900 032330
5901 032332
5902 032334
5903 032336
032336
5904 032340
032340
032342
5905 032344

5906
5907
5908
5909
5910

MACRO M1200

032344
032346
032350
032352
032354
032360
032362
032364
032366
032366
032370
032370
032372
032374
032400

5912
5913
5914 032402
032402
032404
5915 032406
5916 032410
5917 032414
5918 032416
5919 032420
5920 032422
032422
5921 032424
032424
032426
5922 032430
5923 032434
5924 032436
5925 032440

8vC
ESCAPE

102002
104410
001104

103024
004537
120006
002454
103003

8CC

004064

104410
003570
004537
120007
002456
103003

104410
003550
104455
000070
017305
010762
004537
120005
002452
103003

004064

104460
104410
003520
004737
102002
104410
001000
103425
004537
120006
002454
103003

036146

004064

103003

CS$ESCAPE

.WORD

L10074-.

TRAP

CS$ERROR

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

AND EXIT

THIS

TEST

TRAP

CS$ESCAPE

.WORD

L10073-.

JSR

R5,READ

:GET T1LH FOR ERROR MESSAGE

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

AND EXIT THIS TEST

GEDF

EMS0W,ERRS0

;ELSE,
:

IT'S BEING SET By TIMER 1 IN MODE O!
“DEVICE FATAL” ERROR # 56

JSR

RS,READ

8CC
ERROR

.+10

ESCAPE

TST

T1CH
TMPS

JSR
BvC
ESCAPE
B8CS

PC,GETT1
.+6

SuB

TRAP

CS$SERROR

CS$ESCAPE
L10073-.

TRAP

CSERDF

.WORD
.WORD
.WORD

56
EMS0W
ERRS0

+READ T1C-H (ADDR 05) TO SEE IF THIS CLEARS “T1“
s(THIS VALUE ISN'T CHECKED BECAUSE IT CAN BE
i

ALMOST

ANYTHING)

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

AND EXIT THIS TEST

TRAP
TRAP

CSERROR
CSESCAPE

.WORD

L10073-.

TRAP

CS$ESCAPE

:PUT THE CURRENT “T1" VALUE INTO THE CARRY BIT
: IF NO ERROR, PROCEED
:ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
.WORD

JSR
TiLL

RS,READ

:IF SET, READING T1CH DIDN'T CLEAR IT
:GET T1LL FOR ERROR MESSAGE

BCC

.+10

+ IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR

RS,READ

:GET

8CC

.+10

: IF

T1LH
TMP7

TRAP
.WORD

ERROR

004064

TRAP

8CC

TMP6

104460
104410
003464
004537
120007
002456

40%:

PROCEED

IT'S ALREADY BEEN REPORTED -- EXIT

+ IF CLEARED, DDRB IS STILL IN CONTROL OF IT
:GET T1LL FOR ERROR MESSAGE

TiLH
TMP7

104460

tELSE,

40
RS,READ

ERROR

004064

+ IF NO ERROR,

JSR

TiLL
TMP6

104460

. +6
SuB

AND EXIT

THIS

TEST

T1LH FOR ERROR MESSAGE
NO ERROR,

PROCEED

L10074-.

-- OK!

TRAP

C$ERROR

TRAP

CSESCAPE

WORD

L10073-.

CNDMAAO DMV11 MCTRL DIAG #1
TEST 27

MACRO M1200

22-FEB-84

15:22

PAGE

J13
77-8

SEQ 0165

VIA TIMER & 1 ONE-SHOT MODE

5926 032442
032442
5927 032444
032444
032446
5928 032450

032450
032452
032454
032456
5929 032460
5930
5931 032462
5932 032466
5933 032470
5934 032472
5935 032474
032474
5936 032476
032476
032500
5937 032502
5938 032510
5939 032512
5940 032516
5941 032520
5942 032522
5943 032524
032524
5944 032526
032526
032530
5945 032532

032532
032534
032536
032540
5946 032542
5947
5948 032544
5949 032550
5950 032552
032552
032554
5951 032556
5952 032560
5953 032564
5954 032566
5955 032570
5956 032572
032572
5957 032574
032574
032576
5958 032600

+ELSE, REPORT IT

ERROR

104460

ESCAPE

104410
003444

TST

EMS0G,ERRS0

GEDF

104455

000071
016406
010762

000507

004537
120006
002454
103003

21s:

004064

104410
003362

104410
000630
103415
004537
120007
002456

103003
104460

104410
003314

sREAD_ TIL-L (ADDR 06)

TST

AND EXIT THIS TEST

TRAP

CS$ESCAPE

L10073-.

;CHECK TiL-L (ADDR 06) AGAINST LOADED VALUE
: IF_SAME, PROCEED
:GET T1LH FOR ERROR MESSAGE

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

EMSOH,ERRS0

284

004064

C$ERRCR

.WORD

AND EXIT THIS TEST
\

JSR
8vC
ESCAPE

BCS

JSR
TILH
TMP7

8CC

ERROR

. +6
SuB
24

ESCAPE
GEDF

PC,GETT1

C$ERROR

TRAP
.WORD

CSESCAPE
L10073-.

TRAP

CSERDF

.WORD
.WORD
WORD

58
EMSOH
ERRSO

:BYPASS THE REST OF THIS SECTION
OF TESTING
+IS “T1" STILL SET?
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

RS,READ

:GET T1LH FOR ERROR MESSAGE

.+10

+ IF NO ERROR, PROCEED
;ELSE, REPORT IT

TST

EM50I,ERRSO

TRAP

;ELSE, REPORT BAD LOAD OF TiL-L (ADDR 06)
"DEVICE FATAL" ERROR & S8
;
-

23s:

TRAP

TMP6,18%
23$
RS,READ

GEDF

036146

C$SERDF
57
ENM5QC
ERRS0
TESTING

CMPB
BEQ
JSR

104455
000072
016450
010762
000456
004737
102002

TRAP
.WORD
.WORD
.WORD

:ELSE, REPORT IT

T1LH
TMP7

104460

:IF CLEARED!
BAD VIA CHIP!
"DEVICE FATAL” ERROR # 57
H

C$ESCAPE

L10073-.

s THIS SHOULD RETURN A 001
: IF NO ERROR, PROCEED

ESCAPE

004064

.WORD

RS,READ

ERROR

032176

C$ERROR

TRAP

1BYPASS THE REST OF THIS SECTION OF

TMP6

002454

TRAP

AND EXIT THIS TEST

28%

8CC

104460
104410
003412
123737
001415
004537
120007
002456
103003

JSR
TiLL

iNO!

AND EXIT THIS TEST
BAD VIA CHIP!

TRAP
.WORD

CSESCAPE
L10074
-,

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

L10073-.

CNDMAAO DMV11 MCTRL DIAG #1
TEST

032642
032644
032646
032650
5970 032652
5971
5972 032654
5973 032660
5974 032662
032662

032664
5975 032666
5976 032670

5985
5986
5987
5988
5989
5990

22-FEB-84

15:22

PAGE

K13
77-9

SEQ 0166

-- VIA TIMER & 1 ONE-SHOT MODE

032600
032602
032604
032606
5959 032610
5960
5961 032612
5962 032616
5963 032620
032622
5965 032624
032624
5966 032626
032626
032630
5967 032632
5968 032640
5969 032642

5977
5978
5979
5980
5981
5982
5983
5984

MACRO M1200

104455
000073
016536
010762

004064

248

:BYPASS THE REST OF

JSR

RS,READ

+READ TiL-H (ADDR 07)

8CC
ERROR

.+10

+ IF NO ERROR,

104460

ESCAPE

TST

104410
003262
123737
001405

002456

032177

TILH
TMP7

CMPB
BEQ
GEDF

TMP7,19¢
26$
EM50J,ERRS0

104455

000074
016600
010762
000412

004737
102002

036146

104410
000520
103404

032670
03267
032674
032676

104455
000075
016666
010762

032700
032704
032706
032710
032712
032712
032714
032714
032716
032720
032724
032726
032726
032730
032732
032734

004537
120004
002450
103003

104410
000454
103024
004537

JSR
8vC

CS$ERDF

TRAP

C$ERROR

: THIS SHOULD RETURN A 000

PROCEED

:ELSE, REPORT IT

AND EXIT THIS TEST

TRAP

L10073-.

TRAP
.WORD
.WORD

CSERDF
60
EM50J

sCHECK TiL-H (ADDR 07) AGAINST LOADED VALUE
: IF SAME, PROCEED
;ELSE, REPORT BAD LOAD OF TiL-H (ADDR 07)
"DEVICE FATAL" ERROR ¢ 60
;

.WORD

;:BYPASS THE REST OF THIS SECTION OF TESTING

PC,GETT1

:IS “T1” STILL SET?
:IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

.+6

ESCAPE

SuB

8CS
GEDF

28
EMSO0K,ERRS0

s YES,

:NO!
§

TRAP
.WORD

ALL'S OK

BAD VIA CHIP!
"DEVICE FATAL"” ERROR # 61

TRAP
.WORD

CSESCAPE
L10074-.

CSERDF
61

EMSOK
ERRS0

:READ T1C-L (ADDR 04)
:(THIS VALUE ISN'T CHECKED BECAUSE IT CAN BE
i ALMOST ANYTHING)
: IF NO ERROR, PROCEED
:ELSE, REPORT IT
ESCAPE

004064

ERRS0

28%

004064

036146

CS$ESCAPE

.WORD

.WORD
.WORD

104460

104410
003174
004737
102002

26%:

TRAP

59
.WORD
.WORD
EMSO0I
.WORD
ERRS0
THIS SECTION OF TESTING

000433

004537
120007
002456
103003

"DEVICE FATAL"” ERROR # 59

JSR
8vC
ESCAPE
8CC
JSR

TST
PC,GETT1
.+6

suB

29$

RS5,READ

AND EXIT

THIS

TEST

TRAP

CSERROR

TRAP

CS$ESCAPE

.WORD

L10073-.

+IS “T1" CLEARED NOW
: IF NO ERROR, PROCEED
:ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP

s YES,

ALL'S OK

tGET T1LL FOR ERROR MESSAGE

.WORD

CSESCAPE

L10074-,

CNDMAAO DMV11 MCTRL DIAG #1
TEST 27

5991
5992
5993
5994

5995
5996
5997
5998

5999
6000
6001

6002

22-FEB-84

15:22

PAGE

L13

77-10

SEQ 0167

VIA TIMER & 1 ONE-SHOT MODE

032740
032742
032744
032746
032746
032750
032750
032752
032754
032760
032762
032764
032766
032766
032770
032770
032772
032774

120006
002454
103003

TiLL
TMP6

104410
003140
004537
120007
002456
103003

004064

104460
104410
003120

104455
000076
016203
010762

033004
6007 033010
6008 033012
033014
6010 033016
033016
6011 033020
033020
033022
6012 033024
6013 033030
6014 033032
033032
033034
6015 033036
6016 033040
6017 033044
6018 033046
6019 033050
6020 033052
033052
6021 033054
033054
033056
6022 033060
6023 033064
6024 033066
6025 033070
6026 033072
033072
6027 033074

004537
120005
002453
103003

8CC

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

[

ERROR

104460

032774
032776
033000
033002

6003

MACRO M1200

AND EXIT THIS TEST

JSR
TILH
TMP7
8CC
ERROR

RS,READ

:GET T1LH FOR ERROR MESSAGE

.+10

:IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

GEDF

EM50C,ERRS0O

iNO!
5

AND EXIT THIS TEST

TRAP

CS$ERROR

TRAP

C$ESCAPE

.WORD

TRAP

.WORD

BAD VIA CHIP!
"DEVICE FATAL" ERROR # 62

TRAP

.WORD
.WORD
.WORD

L10073-.

C$ERROR

CS$ESCAPE

L10073-.
CSERDF

62
EMS0C
ERRS50

6005

004310

104460
104410
003070
004737
102002
104410
000350
103426
004537
120006
002454
103003

036146

004064

104460

104410
003034
004537
120007
002456
103003
104460

004064

RS,WRITE

sRE-WRITE

.+10

:IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

JSR
8vC
ESCAPE

PC,.GETT1
+6

SuB

+IS

INTO T1C-H (ADDR 0S5)

AND EXIT

THIS

TEST

"T1" SET AGAIN

:YES, ALL'S MWELL (AGAIN?)
:GET T1LL FOR ERROR MESSAGE

8CC
ERROR

.+10

: IF NO ERROR,

ESCAPE

TST

TRAP
.WORD

CSESCAPE
L10073-.

AND EXIT

THIS

TEST

RS,READ

:GET T1LH FOR ERROR MESSAGE

8CC

.+10

: IF

ESCAPE

TST

NO ERROR,

CSESCAPE

.WORD

L10074-.

TRAP

CSERROR

TRAP

CSESCAPE

TRAP

CSERROR

PROCEED

;ELSE, REPORT IT

JSR

ERROR

C$ERROR

TRAP

RS READ

TiLH
TMP7

TRAP

+ IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

BCS
JSR

TiLL
TMP6

TO SET T1 AGAIN

.WORD

L10073-,

PROCEED

;ELSE, REPORT IT

AND EXIT THIS TEST

CNDMAAO DMV11 MCTRL DIAG @1
TEST 27

MACRO M1200

22-FEB-84

15:22

M13

PAGE 77-11

SEQ 0168

VIA TIMER & 1 ONE-SHOT MODE

033074
033076
6028 033100

104410
003014

033100
033102
033104
033106
6029 033110
033110
033112
6030
6031
6032
6033 033114
6034 033122
6035 033126
6036 033130
6037 033132
6038 033134
033134
6039 033136
033136
033140
6040 033142
033146
6042 033150
033150
033152
6043 033154
033156
6045 033162
6046 033164
6047 033166
6048 033170
033170
6049 033172
033172
033174
6050 033176
6051 033202
6052 033204
6053 033206
6054 033210
033210
6055 033212
033212
033214
6056 033216

104455
000077
016730
010762

033216
033220
033222
033224
6057 033226
033226
033230

TRAP

GEDF

ESCAPE

104410
000272

112737
004537
120006
002455

000125
004310

104460

104410
000232
103426
004537
120006
002454
103003

002455

32%:

ESCAPE
036146

004064

104460
104410
002716
004537
120007
002456

103003

104460
104410
002676

004064

JSR
8vC
ESCAPE

104410
000154

SOMETHING WENT WRONG!
REPORT IT
"DEVICE FATAL"” ERROR # 63
TRAP

.WORD
.WORD
.WORD
AND EXIT FROM THIS SUBTEST
TRAP

#125,TMP6+1
RS,WRITE

tUSING A DIFFERENT VALUE

.+10

:IF NO ERROR,

TST

tRE-LOAD TiL-L CADDR 06)

CS$ERDF

62
EMSOL
ERRS50

C$ESCAPE

L10074-.

55 HEX.,

PROCEED

:ELSE, REPORT IT

PC,.GETT1
+6

C$ESCAPE

L10073-.

AND EXITV

THIS

TEST

TRAP
TRAP

C$ERROR
C$ESCAPE

.WORD

L10073-.

TRAP
.WORD

C$ESCAPE
L10074-.

TRAP

CSERROR

TRAP

CSESCAPE

TRAP

CSERROR

TRAP

CSESCAPE

SuB

$IS "T1” STILL SET?
s IF NO ERROR, PROCEED
:ELSE, IT'S ALREADY BEEN REPORTED -- EXIT-

333

:YES,

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

;

B8CS
JSR

T1LL
TMP6

RS ,READ

ALL'S STILL OK

;GET T1LL FOR ERROR MESSAGE

AND EXIT THIS TEST

JSR
TILH|
TMP7
B8CC
ERROR

RS,READ

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

GEDF
104455
000100
017012
010762

suB

tNO!
:

.WORD

103003

104410
002752
004737
102002

EMS0L
, ERRSO

.WORD

ESCAPE

:GET T1LH FOR ERROR MESSAGE

.WORD

L10073-.

EMSOM,ERRSO

SuB

iNO!
3

AND EXIT THIS TEST

.WORD
REPORT IT

SOMETHING WENT WRONG!
“DEVICE FATAL" ERROR # 64

TRAP

.WORD
.WORD
.WORD

AND EXIT FROM THIS SUBTEST
TRAP

.WORD

L10073-.

CSERDF

64
EMSOM
ERRS0

CS$ESCAPE

L10074-,

CNDMAAO DMV11 MCTRL DIAG @1
TEST 27

MACRO M1200

22-FEB-84

15:22

PAGE

N13

77-12

SEQ 0169

VIA TIMER & 1 ONE-SHOT MODE

6058
6059

6060
6061
6062
6063
6064
6065
6066

033232
033240
033244
033246
033250
033252
033252
6067 033254
033254
033256
6068 033260
6069 033264
6070 033266
033266
033270
6071 033272
033274
033300
033302
033304
033306
033306
033310
033310
033312
033314
033320
033322
033324
033326
033326
033330
033330
033332
033334
033340
033342
033344
033346
033346
033350
033350
033352
033354
033360
033362
033364
033366
033366
033370
033370
033372
033374

112737
004537
120005
002453
103003

000125
004310

102002

036146

104410
000114

103044
004537
120004
002450
103003

004064

MOVB
JSR
TiCH

#125,TMPS+1
RS,WRITE

BCC
ERROR

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

JSR
8vC
ESCAPE

004064

TEST

:"T1"” SHOULD NOW BE CLEARED
: IF NO ERROR,

ESCAPE

TST

AND EXIT THIS TEST

RS,READ

;:GET T1CH FOR ERROR MESSAGE

B8CC

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

.+10

ESCAPE

TST

ERROR

JSR
TiLH
TMP7

AND EXIT THIS TEST

:GET T1LL FOR ERROR MESSAGE
:IF

NO ERROR,

AND EXIT

THIS

TEST

:GET T1LH FOR ERROR MESSAGE

BCC

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

GEDF

EMSON, ERRSO

TRAP

CS$ESCAPE

TRAP

C$ERROR

TRAP

CSESCAPE

AND EXIT

+IT WASN'T!

;

.WORD

L10073-.

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10073-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-,

TRAP

C$ERROR

TRAP

CSESCAPE

PROCEED

:ELSE, REPORT IT

RS,READ

ERROR

CS$ESCAPE
L10073-.

:GET T1CL FOR ERROR MESSAGE

JSR

B8CC

TRAP
.WORD

.WORD
L10074-.
ALL'S WELL THAT END'S WELL (I THINK!?)

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

RS.READ

CS$ERROR

PROCEED

.+10

JSR

TRAP

:ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

BCC
ERROR

TiLL
TMP6

004064

THIS

:IT WAS,

ERROR

104410

AND EXIT

344
RS,READ

T1CH
TMPS

104460

PC,GETT1
. +6
SuB

iAND USING THE SAME VALUE AGAIN (55 HEX),

¢NOW LOAD T1C-H (ADDR 05)

8CC
JSR

TiCL
TMP4

104460
104410
002600
004537
120005
002452
103003

TMPS+1

104460
104410
002634
004737

002453

THIS

TEST

SOMETHING WENT WRONG!

“DEVICE FATAL" ERROR & 65

REPORT IT

CNDMAAO OMvil MCTRL DIAG o1
TEST

MACRO M1200

22-FEB B84

15:22

PAGE

B14
7718
SEQ 0170

VIA TIMER @ 1 ONE -SHOT MODE

033374
033376
033400
033402

6097
6098 033404
033404
033404

6100
0101
6102
6103 033406
033406
033406
6104 033410
6105 033414
6106 033416
033416
6107 033420
033420
033422
6108 033424
6109 033430
6110 033432
6111 033434
6112 033436
033436
6113 033440
033440
033442
6114
6115
6116
6117 033444
6118 033450
6119 033452
033452
033454
6120 033456
6121
6122 033460
6123 033464
6124 033466
6125 033470
6126 033472
033472
6127 033474
033474
033476
6128 033500
6129 033504
6130 033506
6131 033510
6132 033512
033512
€133 033514

104455

TRAP

000101
017054
010762

.WORD
.WORD

34%:

L10074;

TEST

.MORD

ERRSO

TRAP

CSESUB

TRAP

csesuB

TRAP

CSERRCOR

TRAP

CSESCAPE

ENOSUB

104403
s

CSERDF

65
EMSON

TIMER @

USING ONE -SHOT

MODE

WITH OUTPUT

ON PB7 ENABLED.

BGNSUB
104402
004737
103003

127.2:
003762

104460

104410
002470
004537
000000
000200
103003

004660

104410
002450

036146

104460

ESCAPE

TST

& EXIT TEST

.WORD

JSR
0
8IT7?
8CC

RS,INITT]

.+10

:
0 ==> LATCHES
;
MODE 2 € “T1” INT.
+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

sINITIALIZE TIMER @ 1

AND EXIT

THIS TEST

TRAP

CSERROR

TRAP

CSESCAPE

TIMER 1

JSR
BvC
ESCAPE

-- EXIT

PC,GETT1
. *6
SuB

$IS “T1" SET?
s IF NO ERROR, PROCEED
tELSE, IT'S ALREADY BEEN REPORTED

.WORD

#NO, GOOD.

R5,READ

8CC
ERROR

.+10

+IF NO ERROR, PROCEED

ESCAPE

TST

iGET ACR FOR ERROR MESSAGE

1ELSE, REPORT IT

AND EXIT

THIS

JSR

RS ,READ

tGET

8CC

.+10

+ IF NO ERROR, PROCEED
tELSE, REPORT IT

T1CL
TMP4

ERROR

ESCAPE

CSESCAPE

L1007S-.

1YES, REPORT IT'S NOT BEING CLEARED @ INIT.

JSR
ACR

TMPB

004064

L10073-,

# MODE 2 IS ONE-SHOT MODE WITH OQUTPUT ON PB7 CONTROLED Bv

8CC
004064

L10073-.

ENABLE FLAG CLEARED

TRAP

104460
104410
002414
004537
120004
002450
103003

s INIT DMV £ ENTER M-LOOP
1 IF NO ERROR, PROCEED WITH TESTING
tELSE, REPORT ERROR

.WORD

104410
002434
103123

004537
120013
002466
103003

PC.,MSTCLR
13

ERROR

104460

004737
102002

18%:

JSR
8CC
ERROR

TEST

T1CL FOR ERROR MESSAGE

AND

EXIT

TMIS

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

TRAP
TEST

L10073-,

CSERROR

CNOMAAO DMV11 MCTRL DIAG @1
TEST 27

6134
6135
6136
6137
6138
6139
6140
6141
6142
6143
6144

VIA TIMER @

033514
033516
033520
033524
033526
033530
033532
033532
033534
033534
033536
033540

033544
033546
033550
033552
033552
6145 033554

6146
6147
6148
6149
6150

033554
033556

033560
033564
033566
033570
033572
033572
6151 033574
033574
033576
6152 033600

6153
6154
6155
6156
6157
6158
6159
6160
6161
6162
6163
6164
6165

033600
033602
033604
033606

MACRO M1200

104410
002374
004537
120005
002452
103003

004064

104410
002354
004537

004064

120006
002454
103003

104410
002334
004537
120007
002456
103003

6166
6167
6168 033652
6169 033656

Cl4

77-14
SEQ 0171

104460

PAGE

1 ONE-SHOT MODE

004064

104460

104410

JSR
T1CH
TMPS
8CC
ERROR

R5,READ

1GET

.+10

1+ IF NO ERROR, PROCEED

ESCAPE

TST

T1CH FOR ERROR MESSAGE

1ELSE,

REPORT

AND EXIT

THIS

JSR
TI1LL
TMP6
8CC
ERROR

R5,READ

1GET

.+10

+IF NO ERROR, PROCEED
sELSE, REPORT IT

ESCAPE

TST

TEST

TILL FOR ERROR MESSAGE

AND EXIT

THIS

JSR
TILH
TMP7
8CC
ERROR

RS ,READ

tGET

.+10

+ IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

EMSO0A,ERRS0

TEST

TILM FOR ERROR MESSAGE

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10073-,

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-,

AND EXIT

THIS TEST

TRAP

CSERROR

“T1" NOT CLEARED & INIT.

.WORD

“DEVICE FATAL" ERROR ¢ 66

TRAP
.WORD
.WORD
.WORD

000002
004310

002453

104460
’
036146

104410
002242
103026
004537
120005

tREPORT

;

104455
000102
016067
010762

104410
002256
004737
102002

CSESCAPE
L10073-,

TRAP
GEDF

112737
004537
120005
002453
103003

TRAP
.WORD

002314

033610
033616
033622
033624
033626
033630
033630
033632
033632
033634
033636
033642
033644
033644
033646
033650

22-FEB-84 15:22

004064

R OB A

T 5

MOVB
JSR
T1CH
TMPS.1
8CC
ERROR

92, TMPS. 1
RS,WRITE

.+10

+ IF NO ERROR, PROCEED
1ELSE, REPCORT IT

ESCAPE

T1ST

JSR
8vC
ESCAPE

PC,GETT1
. *6
5SUB

8CC

JSR
T1CH

RS,READ

s INIT TIMER @ 1 BY
:T1C-H (ADDR 0S)

AND EXIT

CSESCAPE

L10073-.

CSERDF
66
EMSOA
ERRSO
S

WRITING INTO

THIS

TEST

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-,

IS “Ti~ SET?
+ IF_ NO ERROR, PROCEED
tELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CSESCAPE
.WORD
L1007S-.
+NO, GOOD.
+YES, REPORT IT'S NOT BEING CLEARED @ INIT,
tGET T1CH FOR ERROR MESSAGE

CNDMAAO DMV11 MCTRL DIAG @1
TEST 27

002452

104460

104410
002222
004537
120007
002456
103003

033712
033714
033716
033720
6181 033722
033722
033724
6182

104455
000103
016135
010762

6198

6199
6200
6201
6202
6203
6204

PAGE

77-15

SEQ 0172

033726
033732
033740
033744
033746
033750
033752
033752
033754
033754
033756
033760
033764
033766
033770
033772

033772
033774
033774
033776
034000
034004
034006
034010
034012
034012
034014
034014
034016

8CC
ERROR

.+10

+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

[

004064

RS5,READ

tGET

8CC

.+10

: IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

;

TILH
TMP?

ERROR

ESCAPE

003762
000377
004310

EM508,ERRS0

SuB

104460
104410
002074

AND EXIT

THIS TEST

sREPORT
H

004660

TRAP

CS$ERROR

sAND EXIT

. WORD
.WORD

SUBTEST

s IF NO ERROR, PROCEED
sELSE, REPORT IT

TST

;

AND EXIT

THIS TEST

TRAP
.WORD

L10075-.

TRAP

CSERROR

004064

ESCAPE

TST

JSR

ACR
TMPB

FOR

MAXIMUM

"T1"

tELSE, REPORT IT

R5,READ

8CC

AND EXIT

CSESCAPE

L10073-.

TIMEOUT

MODE 2 £ CLEARED
:IF NO ERROR, PROCEED
3

THIS TEST

INT.

FLAG

TRAP
TRAP

CSERROR
CSESCAPE

.WORD

L10073-.

TRAP

CSERROR

:GET ACR FOR FUTURE ERROR MESSAGES
+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ERROR

ESCAPE

. WORD

tRE-INITIALIZE THE TI[MER
:

CS$ESCAPE

L10073-.

TRAP
.WORD

.+10

RS,INITT1

CS$ESCAPE

L10073-.

"T1” NOT CLEARED @ INIT.
“DEVICE FATAL" ERRCR @ 67

s INIT DMV & ENTER M-LOOP AGAIN
s INITIAL VALUE FOR DDRB
sLOAD IT

JSR
0
BIT?
8CC
ERROR

CSERROR

. WORC

TRAP

104460

120013
002466
103003

T1LH FOR ERROR MESSAGE

PC,MSTCLR
0377,TMP2+1
RS,WRITE

104460

104410
002114
004537

TRAP

104410
002164

104410
002134
004537
000000
000200
103003

THIS TEST

JSR

GEDF

004737
112737
004537
120002
002445
103003

AND EXIT

TRAP

104460
104410
002202

6193
6194
6195
6196
6197

D14
15:22

TMPS

103003

033706
033710
6180 033712

6192

22-FEB-84

VIA TIMER @ 1 ONE-SHOT MODE

6170 033660
6171 033662
6172 033664
033664
6173 033666
033666
033670
6174 033672
6175 033676
6176 033700
ol77 033702
6178 033704
033704
6179 033706

6183
6184
6185
6186
6187
6188
6189
6190
6191

MACRO M1200

787

AND EXIT

THIS

TEST

TRAP

.WORD

CSESCAPE

L10073-,

CNDMAAO DMV11 MCTRL DIAG @1
TEST 27

MACRO M1200

VIA

TIMER @

1 ONE-SHOT MODE

6205 034020
6206 034024
6207 034025

004537
252
252

036114

6208
6209
6210
6211 034026
6212 034032

6213 034034
034034
034036
6214 034040
6215 034042
6216 034046
6217 034050
6218 034052
6219 034054
034054
6220 034056
034056
034060
6221 034062
6222 034066
6223 034070
6224 034072
6225 034074
034074
6226 034076
034076
034100

6227
6228
6229
6230
6231

6232

6233
6234
6235
6236
6237

034102
034106
034110
034112
034114
034114
034116
034116
034120
034122
034126
034130
034132
034134
034134

6238 034136
034136
034140
6239 034142

6240 034146
6241 034150
6242 034152

6243 034154

034154
6244 034156
034156
034160

22-FEB-84

7%:
8s:

104410
002052
103070
004537
120015
002472
103003

036332

004064

104460
104410
002032
004537
120004
002450
103003

004064

104460
104410
002012

004537
120005
002452
103003

004064

104460
104410
001772
004537
120006
002454
103003

004064

104460
104410
001752
004537
120007
002456
103003
104460
104410
001732

004064

PAGE 77-16
SEQ 0173

JSR
.BYTE
.BYTE

004737
102002

15:22

RS,LODT1C
252
252

sLOAD TIMER o 1

e E

SRR

JSR
BVC
ESCAPE

PC,GETPB?
. +6

BCC
JSR
IFR
TMPD
BCC
ERROR

93
RS,READ

.+10

:IF_NO ERROR, PROCEED
iELSE, REPORT IT

ESCAPE

TST

1GET “PB7”,
IS IT CLEARED?
:IF_NO ERROR, PROCEED
1ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CSESCAPE
.WORD
L10075-.
+IT_IS, GOOD
iGET IFR FOR ERROR MESSAGE

SUB

AND EXIT

THIS

JSR
T1CL
TMP4
BCC
ERROR

RS ,READ

iGET

.+10

:IF_NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

TEST

T1CL FOR ERROR MESSAGE

AND EXIT

THIS TEST

JSR
T1CH
TMPS
BCC
ERROR

RS,READ

sGET

.+10

:IF NO ERROR, PROCEED
iELSE, REPORT IT

ESCAPE

TST

T1CH FOR ERROR MESSAGE

AND EXIT

THIS

JSR
TiLL
TMPE
BCC
ERROR

RS ,READ

1GET

.+10

:IF_NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

TEST

TILL FOR ERROR MESSAGE

AND EXIT

JSR
TILH
TMP?
BCC

RS,READ

1GET

.+10

:IF NO ERROR,

ESCAPE

TST

;

ERROR

THIS TEST

T1LM FOR ERROR MESSAGE

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10073-.

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10073-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-.

PROCEED

1ELSE, REPORT IT
AND EXIT

THIS

TEST

CNDMAAO DMV11 MCTRL DIAG @1
TEST 27

VIA TIMER &

MACRO M1200

6246
6247
6248
6249

6250
6251
6252
6253
6254
6255
6256
6257
6258
6259
6260
6261
6262

6263
6264
6265
6266

6267
6268
6269
6270
6271
6272

6273
6274
6275
6276
6277
6278
6279

034254
034256
034260
034262
034264
034270
034272
034272
034274
034274
034276
034300
034304
034310
034312
034314
034316
034316
034320
034320
034322
034324
034332
034334
034336
034342
034344

22-FEB-84

15:22

PAGE

SEQ 0174
GEDF

EM50V,ERRSO

104455

000104
017240
010762
004737

103003

036204

005032
005032
000100
004064

10¢:

9¢:

104460
104410
001652
123737
001013
077315
104455
000105
016251
010762
004737
103003

002450

034024

ESCAPE

TST

;

JSR
JSR

MOV

JSR

T1CL
TMP4

PC,STALL
PC,STALL
€100,R3
RS,READ

8CC
ERROR

.+10

ESCAPE

TST

JSR

8CC
ERROR
ESCAPE

000100
004064

12%:
13$:

68
EMSOV
ERRSO

1BECAUSE THE ERROR MESSAGE TAKES SO LONG TO

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

AND EXIT THIS TEST
PROCESS & PRINT,

RE-START

TRAP

MOV
JSR
T1CH

CS$ERROR

TRAP
CSESCAPE
.WORD
L10073-.
THE TIMER AND THEN

DELAY FOR A LITTLE WHILE SO IT CAN DECREMENT

:1@ INIT. "REPEAT"” VALUE
;READ THE LOW COUNTER

TMP4, 7%

12¢

R3,9%

EMS00,ERRS0

: IF NO ERROR,

PROCEED

:ELSE, REPORT IT

AND EXIT THIS TEST

i
sMAKE

SURE

THE COUNTER

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

IS DECREMENTING

PC,KICKT1

L10073-.

:IT IS, NOW SEE IF THE HIGH COUNTER IS TOO
:@ NO: IF NOT 64. ATTEMPTS, TRY AGAIN
:IT WASN'T -- REPORT THE ERROR
H
“DEVICE FATAL" ERROR @ 69
TRAP

036204

CSERDF

PC,KICKT1

S08
GEDF

104410

.WORD
.WORD

.WORD

CSERDF

69
EMS00
ERRSO

12$

;:RESTART TIMER AGAIN IF ERROR MESSAGE PRINTED
: IF NO ERROR, PROCEED

TST

:ELSE, REPORT IT
AND

EXIT

THIS

TRAP

TEST

TRAP

s INIT,

TIMEOUT VALUE

CSERROR
CSESCAPE

.WORD
'

L10073-.

TRAP

CSERROR

-TRAP
.WORD

CSESCAPE
L10073-.

RS,READ

;READ THE HIGH COUNTER

8CC
ERROR

.+10

; IF

ESCAPE

TST

TMPS,84
17¢
R3,13$
R5,READ

:0ID IT CHANGE FROM THE LOADED VALUE?
:YES, PROCEED WITH TESTING
iNO,
IF NO TIMEOUT, TRY AGAIN

TMPS

103003

104460

104410
001570
123737
001027
077315
004537
120006
002454

.WORD
.WORD
.WORD

JSR
8CC
ERROR

cMPB
BNE

104460
001614
012703
004537
120005
002452

sNO, STILL(?) SET!
;
“"DEVICE FATAL” ERROR # 68

TRAP

104460
104410
001706
004737
004737
012703
004537
120004
002450
103003

77-17

1 ONE-SHOT MODE

6245 034162
034162
034164
034166
034170
034172
034176
034200
034200
034202
034202
034204
034206
034212
034216
034222
034226
034230
034232
034234
034234
034236
034236
034240
034242
034250
034252
034254

F14

\
002452

004064

034025

NO ERROR,

PROCEED

:ELSE, REPORT IT

;GET

AND EXIT

THIS

TEST

T1LL FOR ERROR MESSAGE

CNDMAAO DMV11 MCTRL DIAG #1
TEST

MACRO M1200

22-FEB-84

15:22

PAGE

Gl4

77-18

SEQ 0175

-- VIA TIMER & 1 ONE-SHOT MODE

6280 034346
6281 034350
034350
6282 034352
034352
034354
6283 034356
6284 034362
6285 034364
6286 034366
0287 034370
034370
6288 034372
034372
034374
6289 034376
034376
034400
034402
034404
6290 034406
034406
034410
6291
6292
6293 034412
6294 034420
6295 034424
6296 034426
6297 034430
6298 034432
034432
6299 034434
034434
034436
6300 034440
6301 034444
6302 034445
6303
6304
6305 034446
6306 034452
6307 034454
034454
034456
6308 034460
6309 034462
6310 034466
6311 034470
6312 034472
6313 034474
034474
6314 034476
034476
034500
6315 034502

103003

.+10

+ IF NO ERROR,

ESCAPE

TST

ERROR

104460
104410
001536
004537
120007
002456
103003

8CC

004064

104410
001516

AND EXIT

THIS

TEST

JSR

RS,READ

$GET T1LH FOR ERROR MESSAGE

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TI1LH
TMP7

104460

PROCEED

;ELSE, REPORT IT

GEDF

EM50E ,ERRS0

AND EXIT THIS TEST

TRAP

C$ERROR

TRAP

CS$ESCAPE

TRAP

C$ERROR

TRAP

CS$ESCAPE

.WORD

ESCAPE

104410
001500

L10073-.

:ELSE, REPORT THAT HIGH COUNTER ISN'T RUNNING
"DEVICE FATAL"” ERROR & 70
;
TRAP

104455
000106
016305
010762

L10073-.

;IN THAT CASE,

CS$ERDF

.WORD
70
.WORD
EMSOE
ERRS0
.WORD
WE CAN'T PROCEED WITH TESTING EITHER
TRAP

.WORD

CSESCAPE

L10075-.

.............................................................................

112737

004537
120002
002445
103003

000377
004310

104460
104410
001454
004537

001
000

002445

17s:

ESCAPE
036114

JSR
.BYTE

0377,TMP2+1
RS,WRITE

:SETUP DDRB FOR DESIRED DIRECTION OF ORB

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

TST

R5,L0DT1C

.WORD
L10073-.
tRE-LOAD TIMER & 1 WITH A VALUE WHICH WILL

AND EXIT THIS TEST

TRAP

CSERROR

TRAP

CSESCAPE

CAUSE AN ALMOST IMMEDIATE TIMEOQUT
:
: (ADDRESS OF HIGH BYTE FOR T1C-H (ADDR 05))

-----------------------------------------------------------------------------

004737
102002

104410
001432
103446
004537
120004
002450
103003

036146

sWAS

RS,READ

208

s YES, OK -- CONTINUE ERROR CHECKING
:GET T1CL FOR ERROR MESSAGE

8CC
ERROR

.+10

: IF NO ERROR,

ESCAPE

TST

ESCAPE

004064

B8CS
JSR
T1CL

TMP4

104460
104410
001412
004537

PC,GETT1
. +6
SuB

JSR
BvC

004064

JSR

RS ,READ

“T1” SET BY

THE ABOVE OPERATION?

:IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

CSESCAPE
L10075-.

TRAP

CSERROR

PROCEED

;ELSE, REPORT IT

:GET

TRAP
.WORD

AND EXIT

THIS

TEST

T1CH FOR ERROR MESSAGE

TRAP

.WORD

CSESCAPE

L10073-,

CNDMAAO DMV11 MCTRL DIAG #1
TEST

6316
6317
6318
6319
6320

6321
6322
6323
6324
6325
6326
6327
6328
6329
6330
6331
6332

6333

6334

6335
6336
6337
6338
6339
6340
6341
6342
6343

6344

6345
6346
6347
6348
6349

6350

H14
MACRO M1200

22-FEB-84

15:22

PAGE

77-19

SEQ 0176

-- VIA TIMER @ 1 ONE-SHOT MODE
034506
034510
034512
034514
034514
034516
034516
034520
034522
034526
034530
034532
034534
034534
034536
034536
034540
034542
034546
034550
034552
034554
034554
034556
034556
034560
034562
034562
034564
034566
034570
034572
034572
034574
034576
034602
034604
034604
034606
034610
034612
034616
034620
034622
034624
034624
034626
034626
034630
034632
034636
034640
034642
034644
034644
034646

120005
002452
103003

104460
104410
001372
004537
120006
002454
103003

ESCAPE
004064

104410
001352
004537
120007
002456

004064

104460

104410
001332

036332

004064

103003

104460

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

AND EXIT

THIS

TEST

RS,READ

:GET TILH FOR ERROR MESSAGE

8CC
ERROR

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR
8vC
ESCAPE

EMSOF ,ERRSO

suB

PC.GETPB7
. +6
suB

AND EXIT THIS TESY

:NO,

BAD NEWS!

)

;

!
AND GET OUT OF SUBTEST

:GET

;

"PB7”.

+IF NO ERROR,
;ELSE,

IS IT SET?

8CC

.+10

:IF NO ERROR,

TRAP

C$ERROR
CS$ESCAPE

.WORD

L10073-.

TRAP

CSERROR

TRAP

CS$ESCAPE
L10073-.

.WORD

TRAP

CSERDF

.WORD

EMSOF
ERRSO

.WORD
.WORD

TRAP

.WORD

CS$ESCAPE
L10075-.

:GET T1CL FOR ERROR MESSAGE
PROCEED

;ELSE, REPORT IT

TRAP

{

TRAP

.WORD

L10073-.

TRAP

CS$ERROR

AND EXIT THIS TEST

;GET T1CH FOR ERROR MESSAGE

8CC

:IF NO ERROR, PROCEED

ESCAPE

ERROR

CS$ESCAPE
L10073-.

PROCEED.

;:YES, CONTINUE CHECKING “T1"

TMPS

.WORD

IT'S ALREADY BEEN REPORTED -- EXIT
5
TRAP
CS$ESCAPE
}
.WORD
L10075-.

RS,READ

TRAP

REPORT THE FAILURE

RS,READ

JSR
T1CH

C$ERROR

"DEVICE FATAL" ERROR ¢ 71

8CS
JSR
T1CL

TST

TRAP

JSR
TILH

ESCAPE
004064

TEST

.+10

ERROR

104460

THIS

8CC
ERROR

TMP4

103003

104410
001262
004537
120005
002452

208:

AND EXIT

;:GET Ti1LL FOR ERROR MESSAGE

ESCAPE

104410
001302

103445

RS,READ

GEDF

104455
000107
016341
10762

004537
120004
002450

TST

TMP?

103003

104410
001314
004737
102002

+ IF_ NO ERROR, PROCEED
tELSE, REPORT IT

JSR

TiLL
TMP6

104460

.+10

:ELSE,

REPORT

IT.
'

AND EXIT THIS TEST

CS$ERROR

CSESCAPE

CNDMAAO DMV11 MCTRL DIAG @1
TEST 27

6351
6352
6353
6354

6355

6356

6357
6358
6359
6360
6361
6362

6363

6364
6365
6367
6368
6369
6370

6371
6372
6373

6374
6375
6376
6377
6378
6379
6380
6381

MACRO M1200

22-FEB-84

15:22

PAGE

77-20

SEQ 0177

-- VIA TIMER & 1 ONE-SHOT MODE
034646
034650
034652
034656
034660
034662
034664
034664
034666
034666
034670
034672
034676
034700
034702
034704
034704
034706
034706
034710
034712

104410
001242
004537
120006
002454
103003

034712
034714
034716
034720
034722
034724
034730
034732
034734
034736
034736
034740
034740
034742
034744
034750
034752
034752
034754
034756

104455
000110
017122

034760
034764
034766
034770
034772
034772
034774
034774
034776
035000
035004
035006
035010

004537
120004
002450
103003

6382
6383
6384
6385
6386 035012

TRAP

004064

104460
104410
001202

004064

41%:

036146

104410
001134
103435

004064

104410

103003

.+10

: IF_ NO ERROR, PROCEED
+ELSE, REPORT IT

ESCAPE

TST

JSR

RS,READ

BCC

ERROR

.+10

ESCAPE

TST

004064

EMS0S,ERRS0

BR
JSR

28$
RS,READ

8CC
ERROR

.+10

ESCAPE

TST

T1CH
TMPS

JSR
BvC
ESCAPE
11$:

104460
001114
004537
120006
002454

BCC
ERROR

. GEDF

104460
104410
001150
004737
102002

tGET T1LL FOR ERROR MESSAGE

TiLH
TTMP?

103003

010762
000562
004537
120005
002452
103003

RS5,READ

TMP6

104460
104410
001222
004537
120007
002456

JSR
TILL

PC.GETT1

11
sus

AND EXIT THIS TEST

;GET T1LH FOR ERROR MESSAGE
: IF NO ERROR,

AND EXIT THIS TEST

sNO!

TRAP
.WORD

L10073-.

TRAP

C$ERROR

TRAP

. WORD
.WORD
. WORD

€ EXIT THIS SECTION OF SUBTEST

sREAD

CS$ESCAPE

T1C-H (ADDR 05)

TO SEE

CSESCAPE

L10073-.

CSERDF
72

EM50S
ERRSO

CLEARS

"T1”

s (THIS VALUE ISN'T CHECKED BECAUSE IT CAN BE

;

ALMOST ANYTHING)

: IF NO ERROR, PROCEED
;ELSE, REPORT IT
:

AND EXIT

THIS

TEST

TRAP

CSERROR

TRAP

CSESCAPE
L10073-.

WORD

;PUT THE CURRENT “T1” VALUE INTO THE CARRY BIT
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTE?Raa EXI T
.WORD

JSR

RS,READ

8CC
ERROR

.+10

:+ IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

:IF

SET,

ALL'S OK

CSESCAPE
L10075-.

: IF CLEARED!
BAD VIA CHIP!
;GET T1CL FOR ERROR MESSAGE

AND EXIT

THIS

TEST

TRAP
TRAP

JSR
TiLL

RS5,READ

iGET T1LL FOR ERROR MESSAGE

8CC

.+10

: IF

ERROR

CS$ERROR

“DEVICE FATAL" ERROR & 72

2ls

TMP6

TRAP

.WORD
REPORT THAT PB7 DIDN'T GET SET!

BCS
T1CL
TMP4

L10073-.

PROCEED

:ELSE, REPORT IT
:

CS$ESCAPE

. WORD

NO ERROR,

tELSE,

REPORT

PROCEED

.WORD

CS$ERROR
CSESCAPE

L10073-.

CNDMAAO DMV11 MCTRL DIAG #1
TEST 27

MACRO M1200

22-FEB-84

Jl14
15:22

PAGE

77-21

SEQ 0178

-- VIA TIMER & 1 ONE-SHOT MODE

035012
6387 035014
035014
035016
6388 035020
6389 035024
6390 035026
6391 035030
6392 035032
035032
©393 035034
035034
035036
6394 035040
035040
035042
035044
035046
6395 035050
6396
6397 035052
6398 035056
6399 035060
035062
6401 035064
035064
6402 035066
035066
035070
6403 035072
6404 035100
6405
6406 035102
6407 035106
6408 035110
6409 035112
6410 035114
035114
6411 035116
035116
035120
6412 035122

035122
035124
035126
035130
6413 035132
6414
6415 035134
6416 035140
6417 035142
035142
035144
6418 035146
6419

104460
104410
001074
004537

120007
002456
103003

ESCAPE
004064

104460
104410
001054

TST

104460
104410
001022
123737
001415
004537
120007
002456
103003

002454

034444

004064

: IF NO ERROR, PROCEED
;:ELSE, REPORT IV

ESCAPE

TST

EMS0G,ERRS0

103415

036146

23s:

AND EXIT

THIS

L10073-.

TRAP

C$ERROR

TRAP

.WORD

tREPORT BAD VIA CHIP!

C$ESCAPE

.WORD

“DEVICE FATAL"” ERROR & 73

CSESCAPE

L10073-.

TRAP

CSERDF

TRAP

CS$ERROR

TRAP

CSESCAPE

28
RS,READ

:READ TiL-L CADDR 06)

)

.+10

ESCAPE

TST

CMPB
BEQ

JSR

RS,READ

TMP6,18$

: THIS SHOULD RETURN A 001

: IF NO ERROR, PROCEED
:ELSE, REPORT IT
:

AND EXIT

THIS

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

;

AND EXIT THIS TEST

C$ERROR

TRAP

CS$ESCAPE

L10073-.

:ELSE, REPORT BAD LOAD OF TiL-L CADDR 06)
"DEVICE FATAL" ERROR & 74
H

:BYPASS THE REST OF

JSR
BvC
ESCAPE

PC,GETT1
. +6

: IF NO ERROR,

TRAP

.WORD

suB

L10073-.

sCHECK T1L-L (ADDR 06) AGAINST LOADED VALUE
: IF SAME, PROCEED
;ELSE, REPORT BAD LOAD OF TiL-L CADDR 06)
;GET T1LH FOR ERROR MESSAGE

.+10

EMSOH,ERRSO

TEST

.WORD

8CC
ERROR

B8CS

TEST

CS$ERROR

.WORD
73
.WORD
EMS0G
.WORD
ERRS0
:BYPASS THE REST OF THIS SECTION OF TESTING

BCC
ERROR

GEDF

104455
000112
016450
010762
000456

104410
000744

YILL
TMP6

TMP7

104410
000772

004737
102002

JSR

TRAP
TRAP

.+10

TILH

104460

TEST

:GET T1LH FOR ERROR MESSAGE

000111
016406
010762
000507

21$:

THIS

RS,READ

GEDF

004064

AND EXIT

JSR
T1LH
TMP7
8CC
ERROR

104455

004537
120006
002454
103003

TRAP
CSERDF
74
.WORD
.WORD
EMSOMH
.WORD
ERRSO
THIS SECTION OF TESTING

$IS "T1" STILL SET?

:ELSE,

PROCEED

IT'S ALREADY BEEN REPORTED -- EXIT

s YES, ALL'S OK
iNO!
BAD VIA CHIP!

TRAP

WORD

CSESCAPE

L10075-.

K14
CNDMAAO DMV11 MCTRL DIAG #1
TEST 27

MACRO M1200

22-FEB-84

15:22

PAGE

77-22

SEQ 0179

-- VIA TIMER & 1 ONE-SHOT MODE

035150
035154
035156
035150
V35162
035162
6425 035164
035164
035166
6426 035170

004537
120007
002456
103003

035170
035172
035174
035176
6427 035200
6428
6429 035202
035206
6431 035210
6432 035212
6433 035214
035214
6434 035216
035216
035220
6435 035222
035230

104455
000113
016536
010762
000433

035232
035234
035236
035240
6438 035242
6439
6440 035244
644]1 035250
644c 035252
035252
035254
6443 035256
6444 035260

104455
000114
016600
010762

6420
6421
6422
6423
6424

6437 035232

035260
035262
035264
035266

6445
6446
6447
6448 035270
6449 035274
035276
6451 035300
6452 035302

035302

004064

104460
°.04410
000724

004537

120007

RS,READ

;GET T1LH FOR ERROR MESSAGE

.+10

+ IF NO ERROR, PROCEED
+ELSE, REPORT IT

ESCAPE

GEDF

004064

24s:

002456

103003

JSR
T1LH
TMP7

002456

036146

TRAP

.WORD

"DEVICE FATAL" ERROR & 75

TRAP
.WORD
.WORD

.WORD

26%:

CSERDF
75
EMS0I

ERRS0

RS,READ

;READ TiL-H (ADDR 07)
: THIS SHOULD RETURN A 000

TMP7,19¢
26$%
EM50J,ERRS0O

AND EXIT THIS TEST

TRAP

CS$ERROR

TRAP

CSESCAPE

.WORD

L10073-.

;+CHECK T1L-H (ADDR 07) AGAINST LOALED VALUE

: IF SAME,

PROCEED

;ELSE, REPORT BAD LOAD OF T1lL-H (ADDR 07) ,
“DEVICE FATAL” ERROR & 76
:

CSERDF
76

.WORD
EM50J
ERRS0
.WORD
THIS SECTION OF TESTING

:BYPASS THME REST OF

PC.GETT1
.+6
SuB

$IS “T1" STILL SET?
:IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

8%
EM50K,ERRSO

TRAP

.WORD

s YES, ALL'S OK
BAD VIA CHIP!
iNO!
"DEVICE FATAL" ERROR # 77
:

TRAP

.WORD
.WORD
.WORD

004064

CS$ESCAPE

L10073-.

;:BYPASS THE REST OF THIS SECTION OF TESTING

TST

JSR
BsvC
ESCAPE

C$ERROR

28s

ESCAPE

BCS
GEDF

104455
000115
016666
010762

104460

TRAP

TRAP
.WORD

104410
000634
103404

004537
120004
002450
103003

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

000412

004737
102002

;REPORT BAD VIA CHIP!

.+10

cMPB
BEQ
GEDF

034445

EM50I,ERRS0

AND EXIT THIS TEST

8CC

ERROR

104460
104410
000672
123737
001405

JSR
TILH
TMP7
8CC
ERROR

CSESCAPE

L10075-.

CS$ERDF

77
EM50K
ERRSO

;READ T1C-L C(ADDR 04) TO CLEAR "TL1"
; (THIS VALUE ISN'T CHECKED BECAUSE IT CAN BE
i ALMOST ANYTHING)
: IF NO ERROR, PROCEED
;:ELSE, REPORT IT

TRAP

CS$ERROR

CNDMAAO DMV1l MCTRL DIAG #1
TEST 27

6454 035310

6455 035314
6456 035316
035316
035320
6457 035322

6458 035324

104410
000604
004737
102002

104455
000116
016203
010762

6462 035334

105037

6461

6463 035340
6464 035344

004537
120002

6466 035350

103003

6465 035346

6467 035352

15:22

L14

PAGE 77-23

SEQ 0180

104460

035356

000534

6470 035364
6471 035366

120005
002453

6469 035360

6472 035370
6473 035372

004537

035374
035376

104410
000514

035406
035410

104410
000500

035412
035414
035420
035422
035424
035426
035426
6484 035430

004737
102002

103426
004537
120005
002452
103003

104410
000460
004537

6488 035444

103003

6486 035440
6487 035442

6489 035446

120007
002456

JSR

PC,GETT1

+IS "T1" CLEARED NOW

8CC

29¢

29s$:

GEDF

CLRB

004310

004064

EM50C,ERRS0

Y -

TRAP
.WORD

CS$ESCAPE
L10073-.

:+ IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
C$ESCAPE
.WORD
L10075-.
:YES, ALL'S OK

iNO!
;

BAD VIA CHIP!
“DEVICE FATAL"” ERROR # 78

TRAP
.WORD
.WORD
.WORD

TSI

CSERDF
78
EMS0C
ERRS0

it e T TR

JSR
DDRB

RS,WRITE

:CHANGE THE DIRECTION OF ORB -- IT SHOULDN'T

8CC

.+10

: IF NO ERROR, PROCEED

ESCAPE

TST

;

HAVE ANY EFFECT ON “PB7"
‘

;ELSE, REPORT IT

AND EXIT THIS TEST

TRAP
TRAP

C$ERROR
CSESCAPE

.WORD

L10073-.

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10073-.

JSR

RS,WRITE

sRE-WRITE INTO T1C-H (ADDR 0S) TO SET T1 AGAIN

8CC

.+10

: IF NO ERROR, PROCEED

ESCAPE

TST

JSR
svC
ESCAPE

PC,GETT1
. +6
SuUB

:IS “T1" SET AGAIN
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED

BCS
JSR
T1CH
TMPS
8CC
ERROR

324
RS,READ

sYES, ALL'S WELL (AGAIN?)
:GET T1CH FOR ERROR MESSAGE

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR

R5,READ

;GET T1LH FOR ERROR MESSAGE

8CC

.+10

: IF NO ERROR, PROCEED

T1CH
TMPS5+1

ERROR

036146

16$
SuUB

AND EXIT THIS TEST

TMP2+1

ERROR

104460

035430
035432
6485 035434

TST

TMP2+1

103003

104460

6475 035400
6476 035404
6477 035406

004310

104410

035372

6474 035374

002445

ESCAPE

8vC
ESCAPE
16$:

002445

035352

6468 035354
035354

036146

104410
000570
103004

035324
035326
035330
035332

6478
6479
6480
6481
6482
6483

22-FEB-84

VIA TIMER & 1 ONE-SHOT MODE

6453 035304
035304
035306

6459

MACRO M1200

T1LH
TMP7

ERROR

:ELSE,

REPORT

AND EXIT

THIS TEST

AND EXIT THIS TEST

:ELSE, REPORT IT

-- EXIT

TRAP
.WORD

CS$ESCAPE
L10075-.

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10073-.

CNDMAAO DMV11l MCTRL DIAG #1
TEST

035454
035456
035460
035462
0492 035464
035464
035466
6493
6494
6495
6496 035470
6497 035474
6498 035476
035476
035500
6499 035502
6500 035504

6507

6508
6509
6510

6511
6512
6513
6514
6515
6516
6517
6518

22-FEB-84

VIA TIMER & 1 ONE-SHOT MODE

035446
6490 035450
035450
035452
6491 035454

6501
6502
6503
6504
6505
6506

MACRO M1200

035504
035506
035510
035512
035514
035522
035526
035530
035532
035534
035534
035536
035536
035540
035542
035546
035550
035550
035552
035554
035556
035562
035564
035566
035570
035570
035572
035572
035574
035576

035576
035600

15:22

PAGE 77-24

104410
000440
104455
000117
016730
010762

ESCAPE

TST

;

GEDF

EMSOL ,ERRS0

;NO!

ESCAPE

104410
000422

SuB

036332

JSR
8vC
ESCAPE

103404

8CS
GEDF

PC,GETPB7
.+6
suB
a4

EM50U,ERRS0

104455

112737

004537
120006
002455
103003

000125
004310

104460
104410
000352
004737
102002
104410
000336
103416
004537
120006
002454
103003
104460
104410
000316

104455
000121

AND EXIT THIS TEST
SOMETHING WENT WRONG!

TRAP

C$ERROR

TRAP
.WORD
REPORT IT

C$ESCAPE
L10073-.

"DEVICE FATAL"” ERROR # 79

TRAP
.WORD
.WORD
.WORD

C$ERDF
79
EMSO0L
CGRRS50

TRAP

C$ESCAPE

AND EXIT FROM THIS SUBTEST

.WORD

104410
000410

000120
017174
010762

SEQ 0181

104460

004737
102002

M14

036146

004064

002455

44s:

IS IT SET?
:GET "PB7”.
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP

.WORD

:NO,
:

€125, TMP6+1
RS,WRITE

sUSING A DIFFERENT VALUE
sRE-LOAD TiL-L CADDR 06)

BCC
ERROR

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

JSR
8vC
ESCAPE

AND EXIT THIS TEST

C$ERDF
80
EMSOU
ERRSO

TRAP

C$ERROR

TRAP

CSESCAPE

.WORD

L10073-.

TRAP
.WORD

CSESCAPE
L10075-.

TRAP

CSERROR

TRAP
.WORD

C$ESCAPE
L10073-.

TRAP

CSERDF

SuB

1IS “T1* STILL SET?
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

PC,GETT1
+6

338

s YES,

RS,READ

;GET T1LL FOR ERROR MESSAGE

8CC

.+10

; IF NO ERROR, PROCEED

ESCAPE

TST

GEDF

EMSOM,ERRS0

;NO!
i

TMP6

ERROR

TRAP
.WORD
.WORD
.WORD

-- 55 HEX.,

JSR
TiLL

8CS

CS$SESCAPE

L10075-.

BAD!
REPORT IT:
NOT SET AFTER TIMEOUT
"DEVICE FATAL” ERROR & 80

MOVB
JSR

TiLL
TMP6+1

L10075-.

;ELSE,

ALL'S STILL

REPORT

AND EXIT THIS TEST

SOMETHING WENT WRONG!
REPORT IT
“DEVICE FATAL" ERROR # 81
.WORD

CNDMAAO DMV11 MCTRL DIAG #1
TEST 27

035666

6539 035670

6545
6546

15:22

PAGE 77-25
SEQ 0182

035670
035672
035674
035700
035702
035704
035706
035706
035710
035710
035712
035714

017012
010762

ESCAPE

104410
000300

112737
004537
120005
002453
103003

suB

104410
000254
004737
102002

104410
000240
103024
004537
120006
002454
103003

000125
004310

002453

33$:

036146

JSR
8vC
ESCAPE

8CcC
JSR

004064

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

TST

103003

104460
104410

SUBTEST

004064

PC,.GETT1
. +6

SuB

34¢

AND EXIT THIS TEST

+“T1" SHOULD NOW BE CLEARED

:IT WAS,

.+10

:IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

AND EXIT

THIS

TEST

JSR

RS,READ

:GET T1LH FOR ERROR MESSAGE

8CC

.+10

: IF_ NO ERROR,

TST

ERROR

ESCAPE

EMSON,ERRS0

TRAP

CSERROR

TRAP
.WORD

C$ESCAPE
L10073-.

TRAP

CS$ESCAPE

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-.

TRAP

CS$ERROR

.WORD
L10075-.
ALL'S WELL THAT END'S WELL (I THINK'?)

8CC
ERROR

TILH
TMP7

PROCEED

:ELSE, REPORT IT
AND EXIT

+IT WASN'T!

THIS TEST
-

TRAP

.WORD

SOMETHING WENT WRONG!

“DEVICE FATAL"” ERROR & 82

TRAP

348

JSR

T1CH
TMPS+1

ERROR

ESCAPE

CSESCAPE

L10073-.

REPORT IT

.WORD
.WORD
.WORD

004310

C$ESCAPE

L10075-.

aIF NO ERROR, PROCEED
:ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

:GET T1LL FOR ERROR MESSAGE

GEDF

004537
120005
002453

THIS

RS,READ

TiLL
TMP6

104410
000200

035724
035730
035732
035734
035736
035736
6553 035740
035740

FROM

EMSOM
ERRSO

iAND USING THE SAME VALUE AGAIN (55 HEX),
:NOW LOAD T1C-H (ADDR 05)

RS,WRITE

ESCAPE

104460

104455
000122
017054
010762

AND EXIT

.WORD

104460
104410
000220
004537
120007
002456
103003

.WORD
.WOR

TRAP

104460

035714
035716
035720
035722

6547
6548
6549
6550
6551
6552

22-FEB-84

N14

VIA TIMER & 1 ONE-SHOT MODE

035602
035604
6519 035606
035606
035610
6520
6521
6522
6523 035612
6524 035620
6525 035624
6526 035626
6527 035630
6528 035632
035632
6529 035634
035634
035636
6530 035640
6531 035644
6532 035646
035646
035650
6533 035652
6534 035654
6535 035660
6536 035662
6537 035664
6538 035666

6540
6541
6542
6543
6544

MACRO M1200

CSERDF

82
EMSON
ERRSO

RS,WRITE

+RE-LOAD T1C-H (ADDR S) TO START IT AGAIN

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

TST

;

AND EXIT THIS TEST

TRAP

CSERROR

TRAP

CSESCAPE

CNDMAAQ DMV1I1 MCTRL DIAG o1
TEST

VIA TIMER @

035742
6554 035744
6555 035750
6556 035752
035752
035754
6557 035756
6558 035760
6559 035764
6560 035766
0561 035770
6562 035772
035772
6563 035774
035774
035776
6564 036000
6565 036004
6566 036006
6567 036010
6568 036012
036012
6569 036014
6570
6571
6572
6573

6574

6575

6576
€577
6578
6579
6580

6581

000150
004737
102002

104410
000134
103054
004537
120015
002472
103003

036332

104410
000074
004537
120005
002452
103003

004064

104410
000014

77-26

SEQ 0183

MODE

JSR
8vC
ESCAPE

8CC

.WORD.

PC.GETPB?

1GET "“PB7”,
IS IT CLEARED?
'
1 IF NO ERROR, PROCEED
tELSE, IT'S ALREADY BEEN REPORTED

suB
48
RS,READ

1 YES, GOOD.
1GET IFR FOR ERROR MESSAGE

8CC
ERROR

.+10

+ IF NO ERROR,

ESCAPE

TST

JSR
IFR

L10073-.

-- EXIT

.WORD

CS$ESCAPE

L10075-.

PROCEED

tELSE, REPORT IT

AND EXIT THIS TEST

JSR
T1CL

R5,READ

:GET T1CL FOR ERROR MESSAGE

8CC

.+10

+ IF NO ERROR,

ESCAPE

TST

ERROR

004064

TRAP
TRAP

C$ERROR
CSESCAPE

.WORD

L10073-.

TRAP

CSERROR

TRAP

CSESCAPE

TRAP

CSERROR

TRAP

CSESCAPE

AND EXIT

THIS

RS,READ

sGET

8CC

.+10

: IF NO ERROR, PROCEED
sELSE, REPORT IT

ESCAPE

T1CH
TTMPS

ERROR

004064

PROCEED

tELSE, REPORT IT

JSR

AND EXIT

THIS TEST

fiS.READ

8CC

.+10

+ IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

TiLL
TMP6

ERROR

tGET

TEST

T1CH FOR ERROR MESSAGE

JSR

T1LL FOR ERROR MESSAGE

AND EXIT

THIS TEST

.WORD

TRAP

004064

JSR

RS ,READ

iGET

8CC

.+10

: IF NO ERROR,

ESCAPE

TST

TILH
TMP
7

ERROR

T1LM FOR ERROR MESSAGE

EM50V,ERRSO

AND EXIT
BAD!

CSERROR

CSESCAPE

L10073-,

TRAP

CSERROR

PROCEED

tELSE, REPORT IT

tNO,

L10073-.

.WORD

THIS TEST

TRAP

GEDF

104455
000123
017240

PAGE

B15

TMP4

104460

15:22

TMPD

104460
104410
000054
004537
120006
002454
103003

22-FEB-84

TRAP

104460

104410
000034
004537
120007
002456
103003

6588

1 ONE -SHOT

104460

104410
000114
004537
120004
002450
103003

MACRO M1200

RPT,

WORD

PB? NOT DRIVEN LOW

CSESCAPE

L10073-,

“"DEVICE FATAL" ERROR 2 83

TRAP

.WORD
.WORD

CSERD*

83
EMSQV

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA

TIMER @

036106
6589 036110
036110
036110
6590 036112
036112
036112
6591
6592

010762

MACRO M1200

ONE-SHOT

22-FEB-84 15:22

L10075:
ENDTST

L10073;

104401

SR SRR SR ST SRS TR

LODTIC

LOAD

H
H
H
H

6602

SREAD

D T

LODT1C:

MOVB
MOvVB
JSR
T1CL
TMP4 .1
JSR
T1CH
TMPS. 1
RTS

0\
n

004310

i+
:
:
B

ggg? 036164

6628
6629
6630
6631
6632
6633
6634
6635
6636

002451
002453
004310

036166
036170
036174
036176
036200
036202

004537
120015
002472
103003

004064

002472

EBRam

GETT1:

18:

CSESUB

TRAP

CSETST

AE SR

TIMER ONE

DA 0

e )

ADDRESSES 04 & 05

0 S

U0 TR

050

$SETUP TO LOAD TiICL
i
AND T1CH
v
sLOAC T1C-L (ADDR 04) WITH PASSED PARAMETER

RS,WRITE

tLOAD T1C-H (ADDR 05) WITH PASSED PARAMETER
s
C(THIS WILL ALSO RESET “T1” & THE COUNTER)

R
JSR
IFR
TMPD
B8CC
ERROR

RS,READ

;GET

s IF NO ERROR, PROCEED
:ELSE, REPORT IT

SEV
RTS

MOV
MOVB
ROLB
ROLB
MOV
RTS

RO, -(SP)
TMPD,RO
RO
RO
(SP).,RO
PC

VIA'S

T1L-H (ADDR 07)

TRAP
:FLAG AN ERROR TO MAINLINE ROUTINE
+
AND TAKE AN ABNORMAL RETURN

1PRESERVE RO
sPUT VALUE HERE TO PRESERVE
+ “IRQ” GOES INTO CARRY BIT
:1"T1” GOES INTO CARRY BIT
:RESTORE RO

YO GET

THE

e A

IFR REG.

S R AR R RS P AW P RAAE R RN AR ST 0 C S PN R S SRS A
e S
KICKT1 -- INIT, TIMER @ 1 BY THE FOLLOWING PROCEDURE
:
READ

(RS)e,TMP4 .1
(RS)+,TMPS.1
RS,WRITE

b
At
g
ittt o el Sl e oot 3 3 LT € R
S
R
AR
S
GETT1 -- GET THE “T1" FLAG FROM THE VIA‘S IFR REGISTER AND PUT
IT
INTO THE "CARRY" BIT

104460
000262
000207

010046
113700
106100
106100
012600
000207

TRAP

JSR
RS,LODPT1C
.BYTE
<VALUE FOR T1L-L (ADDRESS 04)>
.BYTE
<VALUE FOR T1C-H (ADDRESS 05)>
<NEXT SEQUENCIAL INSTRUCTION

112537
112537
004537
120004
002451
004537
120005
002453
000205

ERRSO

CALLING SEQUENCE:

6597
6598
6599
6600

6601

. WORD

ENDSUB

104403

6596

036146
036152
036154
036156
036160
036160
6625 036162

5€Q 0184
5

:
:
:+

036114
036120
036124
036130
036132
036134
036140
036142
036144

77-27

MODE

48s:

6293
0594
6595

6603
6604
6605
6606
6607
6608
6609
6610
6611
6612
6613
6614
6615
6616
6617
6618
6619
6620
6621
6622
6623
6624

PAGE

C15

LAST

VALUE

LOADED

TMPO

INTO

CSERROR

CNDMAAO DMV11 MCTRL DIAG @1
TEST

MACRO M1200

22-FEB-84

15:22

PAGE

77-28

SEQ 0185

VIA TIMER @ 1 ONE-SHOT MODE

:
:
‘

036204
036206
036212
036214
036216

010346
004537
120007
002456
103443

036220
036226
036234
036242
036250
036256
036262
036270
036272
036274

012777

113777
113737
142777
112777
012703
132777
001016
077305

036274
036302
036310
036316
036324

012737
012737
012737
012737
000261

036326
036330

012603

WRITE THAT VALUE INTO T1C-H (ADDR 05) TO RESET THE
AND CAUSE THE RE-LOADING OF BOTH COUNTERS.

----------------------------------------------------------------------------

KICKT1:

004064

MOV
#?fn

R3,-(SP)
RS,READ

1SAVE CALLER'S REGISTER CONTENTS
1GET THE CURRENT SETTING OF THE MIGH LATCH

B8CS

108

s IF ERROR, EXIT

MOV

oT1CH,8SELA

;SETUP ADDRESS FOR M-LOOP WRITE

TMP7

120005
002456
002456
000100
000074
000200

144134
144132
002453
144110
144100
144066

Ss:

MOVB
MOVB
BICB
MOVB

TMP7,8SEL6
TMP7,TMPS.1
@IFRT1,8BSEL3
OWRILOC,®BSEL2

BITB
BNE

OMRDY,@BSEL2
108

MOV

002236
002240
002242
002244

SEC

‘

:
:
s

010046

QUEUE

"DEVICE FATAL” ERROR & 84
MOV

THE FAILURE & EXIT

MOV
MOV

oT .EDF ,ERRTYP

084, ERRNBR

0EM4
, ERRMSG
A
, ERRBLK
0ERR

RESTORE REGISTER

s IMMEDIATE RE TURN

-- PUT THE CURRENT SETTING OF

“PB7" (BIT

7 OF ORB W/IN THE VIA CHIP)

INTO THE CARRY BIT SO IT CAN BE TESTED UPON RETURN.

GETPB7:

333
TMPO

BCC
ERROR
SEV

002440

PC,GETPB7
SET

OR CLEARED WITH

“BCS”

"BCC”

INSTR'S>

-----------------------------------------------------------------------------

104460
000262
000207

106100
012600
000207

<TEST FOR PB7

002440
103003

113700

(SP)+,R3

RTS

JSR

036352
036354
036360
036362
036364

;WAIT FOR M-READY TO BE SET
:AS SOON AS "MRDY" IS SET, EXIT!
:IF NO TIMEOUT, CHECK AGAIN FOR M-READY
tELSE, "MRDY" TIMEOQUT

:
CALLING SEQUENCE

004064

1SETUP TIMEOUT COUNTER

;INDICATE

MOV

IT.

-----------------------------------------------------------------------------

: GETPB?

004537

R3,5%
EM4,ERR4

1SETUP DATA FOR SAME
1PUT HERE TOO. BECAUSE WE'RE GOING TO WRITE
;CLEAR THE INTERRUPT BIT -- JUST IN CASE
;TELL THE M-LOOP TO WRITE THE BYTE FOR US

MOV

108:

000207

036332
036336
036340
036342
036344
036344
036346
036350

060. ,R3

S08
GTOF

000001
000124
014500
005426

“T1" INTERRUPT FLAG

18:

RS ,READ

:GET

THE REGISTER THAT CONTAINS

:IF NO ERROR, PROCEED
1ELSE, REPORT IT

“PB7"

TRAP

i{FLAG AN ERROR TO MAINLINE ROUTINE

RTS

MOV

RO, -(SP)

;PRESERVE THIS REGISTER FOR THE CALLER

ROLB
MOV
RTS

RO
(SP)+,RO
PC

:PUT “PB7" INTO THE CARRY BIT
RESTORE RO FOR THE CALLER
sRETURN WITH “PB7" IN THE CARRY

MOVB

TMPO,RO

AND

tPUT

TAKE

AN ABNORMAL

CS$ERROR

RETURN

ITS CONTENTS HERE SO WE CAN MANIPULATE
BIT

CNDMAAO DMV1L1 MCTRL DIAG #1
TEST

MACRO M1200

22-FEB-84

15:22

PAGE

1D
78

5EQ 0186

VIA TIMER 1 FREE RUNNING MODE TEST

.SBTTL TEST 28

6733

-- VIA TIMER 1 FREE-RUNNING MODE TEST

1000880008000 800000000 0000008000028

TEST 28

THIS

TEST

THE

PROGRAM

8RR ARRRARSALNRLLRRRLLARASAR
S

VIA TIMER 1 FREE-RUNNING MODE
VERIFIES

FREE -RUNNING MODE,

THAT

THE

IN EACH OF

PERIODICALLY

TIMER

TEST

TWO SUBTESTS.

COUNTER IS OPERATIONAL

CHECKS THE COUNTER TO VERIFY

THAT:

IT IS DECREMENTING AND EVENTUALLY REACHES O,
RELOADS FROM THE LATCHES,

AND

CONTINUES TO DECREMENT.

IN THE FIRST SUBTEST,
A

THE FOLLOWING IS PERFORMED :

MASTER CLEAR IS DONE AND THE

SETTING

FOR THE

ACR7?

TIMER IS PLACED IN FREE-RUNNING MODE

TO O £ ACR6 TO 1 (MODE 1). AND THE PROGRAM CHECKS

“T1" (BIT 6 IN IFR)

TO BE

INITIALLY CLEARED.

THEN TiL-L (ADR 04) IS LOADED WITH 125 (OCTAL) AND T1C-H (ADR 05) IS
LOADED WITH 125 (OCTAL) STARTING THE COUNTER.
THE
COUNT
IS
ALLOWED
CHECKED TO BE SET.

REACH O AGAIN,

T1C-H (ADR 05) IS READ AND "T1"
LO BYTE

AND THE

IS CHECKED TO BE STILL SET.

THE

COUNTER

IS READ AND THE

THE

COUNT IS ALLOWED TO REACH O ONCE MORE AND

CLEARED BY THE READ OF T1C-L.

“T1"

IS READ AND CHECKED TO BE

SET AGAIN.

:Tsé%-l.

LOADED

WITH

"T1" IS READ AND

“T1* IS CHECKED TO BE

252 (OCTAL) AND “T1" IS CHECKED TO BE STILL

TIC-H
IS LOADED WITH 252 (OCTAL) AND "T1" IS READ AND CHECKED TO BE
CLEARED BY THE LOADING OF T1C-M.
IN

THE SECOND SUBTEST,

FZR7
=
STATE AT

ALL OF

THE ABOVE OPERATIONS ARE REPEATED, WITH

1,
AND ACR6 = 1 (MODE 3).
THE PROPER TIME.

ALSO,

PB7 IS VERIFIED FOR PROPER

3088888000080 000000008000080000000000300000000000030000000000200000000000000

6734

6735
6736
6737

036366
036366
036366
036366
036370
036374
036376

BGNTST

T28::

BGNSUB
104402
004737

103003

003762

JSR

B8CC

ERROR

T28.1:

PC,MSTCLR

s INIT DMV € ENTER M-LOOP

TRAP

:IF NO ERROR, PROCEED WITH TESTING
;ELSE, REPORT ERROR

csBsue

CNDMAAO DMV1l M_TRL DIAG #1
TEST

VIA

036376
6738 036400
036400
036402
6739 036404
6740 036410
6741 036412
6742 036414

6743 036416
036416
6744 036420

6745
6746
6747

6748
6749

036420
036422
036424
036430
036432
036432
036434
036436
036440

036440
036442
036444
036446
6750 036450
036450
036452
6751

6754 036454

6755 036460
6756

TIMER

1 FREE-RUNNING MODE

036462
036464
036470
036472
036472
036474
6763 036476
6764 036500
6765 036502

036502
036504
036506
036510
6766 036512
036512

22-FEB-84

15:22

PAGE

F15
78-1

TEST

104460

104410
001514
004537
000000
000100
103003

ESCAPE

004660

18:

JSR
0
BIT6
BCC

104410
001474
004737
102002
104410
000414
103006

:ELSE,

TST

JSR
BVC
ESCAPE

PC,GETT1
. +6
SUB

BCC
GEDF

23
EMSOA,ERRS0

ESCAPE

125

036114

125

2s:

036146

3s:

i i

RS,LODT1C

125,125

e S

CLR
JSR
BVC
ESCAPE
B8CS
508
GEDF

A S

R3
PC.GETT1
. +6
SUB
as
R3,3$
EMSOF ,ERRSO

6768 036516
6769 036522
6770 036524

004537
120005
002452

CSESCAPE
L10076-.

ENABLE FLAG CLEARED

THIS

TEST

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10076-.

“DEVICE FATAL” ERROR & 85

& EXIT

;RELOAD

A e

S B

TRAP
.WORD
.WORD
.WORD

TEST

ESCAPE

SUB

TIMER

as:

JSR
T1CH
TMPS

RS,READ

CSESCAPE
L10077-.

1'S COUNTERS WITH NEW VALUES:

e b

e e

“DEVICE FATAL" ERROR & 86
TRAP
.MORD

:IF ERROR,

THE REST OF

THIS

CSERDF
86
.WORD
EMSOF
.WORD
ERRSQ
TEST IS UN-DOABLE!
TRAP
CSESCAPE
.MORD

004064

CSERDF
85
- EMSOA
ERRSO

s INITIALIZE TIMEOUT COUNTER
:“T1” SHOULD BE SET.
IS IT?
:IF NO ERROR, PROCEED
tELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CSESCAPE
.WORD
L10077-.
: YES, GOOD.
iNO,
IF NO TIMEOUT, LOOK AGAIN
tELSE, SAY IT WASN'T SET BY T1 TIMEOUT

;

104455
000126
016341
010762

s 036514

TRAP
.WORD

:IS “T1" SET?
:IF NO ERROR, PROCEED
:ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CS$ESCAPE
.WORD
L10077-.
iNO, GOOD.
:YES, REPORT IT'S NOT BEING CLEARED & INIT.

JSR

.BYTE

104410
000354
103407
077307

104410
000334

CS$ERROR

TRAP
.WORD

005003
004737
102002

SUB

TRAP

AND EXIT

104410
000376

TEST

REPORT

;

104455
000125
016067
010762

004537

& EXIT

sINITIALIZE TIMER o 1
:
O ==> LATCHES
:
MODE 1 € "T1” INT.
:IF NO ERROR, PROCEED

.+10

ESCAPE
036146

TST

RS,INITT1

ERROR

104460

6757

6758
6759
6760
6761
6762

MACRO M1200

tREADING
:

T1CH SHOULDN'T CLEAR

(WE DON'T CARE WHAT

THIS

IS)

“T1"

L10077-.

SEQ 0187

CNDMAAD DMV11l MCTRL DIAG #1
TEST

-- VIA TIMER 1 FREE-RUNNING MODE

6771 036526
6772 036530
036530
6773 036532
036532
036534
6774 036536
6775 036542
6776 036544
036544
036546
6777 036550
6778 036552
036552
036554
036556
036560

6779 036562
6780 036566
6781 036570
036570
6782 036572
036572
036574
6783
6784
6785
6786
6787
6788

6789
6790

6791
6792
6793
6794
6795
6796

6797
6798
6799
6800
6801
6802

MACRO M1200

104460

036146

104410
000302
103404

104455
000127
016406
010762
004737
103003

6%:

104460
104410
001322

036576
036600
036604
036606
036606
036610
036612
036614
036616
036620
036624
036626
036630
036632
036632
036634
036634
036636
036640
036644
036646
036646
036650
036652
036654

005003
004737
102002

036654
036656
036660
036662

104455
000130
016203
010762

104410
000240
103402
077307
000422
004537
120004
002450
103003

104410
000200
103004

G15
78-2

SEQ 0188

.+10

+ IF NO ERROR,

PROCEED

ESCAPE

TST

JSR
8svC
ESCAPE

PC,GETT1

sCHECK "T1" -- IT SHOULD STILL BE SET

suB

;ELSE,

+ELSE, REPORT IT

AND EXIT THIS TEST

TRAP

CS$ERROR

TRAP
.WORD

C$ESCAPE
L10076-.

: IF NO ERROR, PROCEED

64
EMS50G,ERRS0

JSR
8CC
ERROR

PC,KICKT1

ESCAPE

TST

IT’'S ALREADY BEEN REPORTED -- EXIT
TRAP

036146

004064

78:

8s$:

CLR

L10077-.

TRAP

CSERDF

TRAP

CS$ERROR

+IT IS, GCOD.
;CLEARED BY READING T1CH!!
“DEVICE FATAL"” ERROR & 87
H

87
.WORD
.WORD
EMSOG
.WORD
ERRSO
sKICK IT OFF AGAIN SO WE CAN PRESERVE TIMING
: IF NO ERROR, PROCEED

;ELSE, REPORT IT

JSR
BvC
ESCAPE

8CS
SoB8
B8R
JSR

T1CL

AND EXIT THIS TEST

TRAP

;WAIT FOR IT

suB
8s

R3,7$

10$

RS,READ

CSESCAPE

L10076-.

TO FINISH:

s INITIALIZE TIMEQUT COUNTER
$”T1" SHOULD BE SET.
IS IT?
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP

: YES,

GOOD.

+WORD

CSESCAPE

L10077-.

IF NO TIMEOUT, LOOK AGAIN
sNO,
; IF TIMEOUT, BYPASS NEXT CHECK (THIS DONE ABOVE)
sREADING T1CL SHOULD CLEAR "T1"

B8CC

.+10

: (WE DON'T CARE WHAT THIS IS EITHER?
; IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

JSR

PC.GETT1

;CHECK “T1" -- IT SHOULD BE CLEARED NOW
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

TMP4

ERROR

036146

R3
PC,GETT1
. +6

CS$ESCAPE

.WORD

104460

104410
001260
004737
102002

PAGE

8CC
ERROR

8CS
GEDF

036204

15:22

TEST

103003

104410
001362
004737
102002

22-FEB-84

8vC

ESCAPE

. +6
SuB

8CC
GEDF

10$
EM5S0C,ERRS0

AND EXIT THIS TEST

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10076-.

TRAP
.WORD

CSESCAPE
L10077-.

TRAP

CSERDF

+IT IS, GOOD.
REPORT IT,
iNOT CLEARED!
"DEVICE FATAL" ERROR ¢ 88
H

.WORD
.WORD
.WORD

88
EMS0C
ERRS0

CNDMAAO DMV11l MCTRL DIAG #1
TEST

VIA

6803
6804
6805
6806

036664
036666
036672
036674
036674
036676
6807 036700
6808 036702
6809 036704
036704
036706

6810

036710
036712
036714
036714
036716
036720
036726
036732
036734

6811
6812
6813
6814
6815 036736
6816 036740
036740
6817 036742
036742
036744
6818 036746
6819 036752
6820 036754
036754
036756
6821 036760
6822 036762

036762
036764
036766
036770
6823 036772
036772
036774
6824 036776
6825 037004
6826 037010
6827 037012
6828 037014
6829 037016
037016
6830 037020
037020
037022
6831 037024
6832 037030
6833 037032
037032
037034

TIMER

MACRO M1200

1 FREE-RUNNING MODE

005003
004737
102002

PAGE

H15
78-3
SEQ 0189

TEST

10%:
128:

036146

22-FEB-84 15:22

104410
000152
103407
077307

CLR
JSR
8vC
ESCAPE

R3
PC,GETT1
. +6
SuB

8CS
S08
GEOF

148
R3,12%
EM50X,ERRSO

ESCAPE

SuB

MOvB
JSR
TiLL
TMP6+1

9252, TMP6+1
RS,WRITE

tRE-INITIALIZE THE TIMEOUT COUNTER
sWAIT FOR "T1” TO GET %ET AGAIN
+ IF NO ERROR, PROCEED
1ELSE, IT'S ALREADY BIZEN REPORTED -- EXIT
TRAP
CS$ESCAPE
.WORD
L10077-.
:GOT IT -- GOOD.
sNOT YET.
IF NO TIMEJUT, TRY AGAIN.
+ELSE, REPORT "T1” NOT RESET
;
"DEVICE FATAL" ERRCR & 89
TRAP
CSERDF
.WORD
89
.WORD
EMSOX
.WORD
ERRSO
:IF ERROR, CAN'T CONTINUE THIS TEST
TRAP
CSESCAPE
.WORD
L10077-.
:SETUP FOR AND
i+
LOAD TiLL CADDR 6)

104455
000131

017354
010762

104410
000132
112737
004537
120006
002455

000252
004310

002455

14%:

103003

104460

104410
001152
004737
102002

036146

104410
000072
103406

8CC
ERROR

.+10

i
__WITH 252 OCTAL
: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

000252
004310

104460
104410
001074
004737
102002
104410
000014

036146

002457

16$:

THIS

TEST

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10076-.

JSR
8vC
ESCAPE

PC,GETT1
. +6
SuB

i THIS SHOULON'T CLEAR "T1"
: IF NO ERROR, PROCEED
iELSE, IT'S ALREADY BEEN REPORTED

BCS
GEDF

16$
EMSOM, ERRSO

ESCAPE

SuB

MOVB
JSR
TILH
TMP7.1
8CC
ERROR

#252,TMP7.1
RS,WRITE

+IT DIDN'T -- GOOD.
;WOOPS, IT DID!!
REPORT FAILURE
:
"DEVICE FATAL” ERROR & 90
TRAP
CSERDF
.WORD
90
-MORD~
EMSOM
.WORD
ERRSO
3
THE REST OF THIS TEST IS INVALID TOO!
TRAP
CSESCAPE
.WORD
L10077-,
:SETUP FOR AND
i
LOAD TiLH CADDR 7)

.+10

i
__WITH 252 OCTAL
: IF_ NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

104455
000132
017012
010762
104410
000054
112737
004537
120007
002457
103003

AND EXIT

JSR
BvC
ESCAPE

PC,GETT1
)
SuB

-- EXIT
TRAP
CS$ESCAPE
.WORD
L10077-.

AND EXIT

THIS

TEST

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10076-.

i THIS SHOULD CLEAR "T1“
: IF NO ERROR, PROCEED
sELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CSESCAPE
.WORD
L10077-,

CNDMAAO DMV11 MCTRL DIAG #1
TEST 28

VIA TIMER

MACRO M1200

1 FREE-RUNNING MODE

6834 037036
6835 037040

103004

037040
037042
037044
037046
6836 037050
6837 037050
037050
037050
6838
6839 037052
037052
037052
6840 037054
6841 037060
6842 037062
037062
6843 037064
037064
037066
6844 037070
6845 037076
6846 037102
6847 037104
6848 037106
6349 037110
037110
6850 037112
037112
037114
6851 037116
6852 037124
6853 037130
6854 037132
6855 037134
6856 037136
037136
6857 037140
037140
037142
6858 037144
6859 037150
6860 037152
037154
6862 037156
037156
6863 037160
037160
037162
6864 037164
6865 037170
6866 037172
037172
037174
6867 037176

104455
000133
016067
010762

22-FEB-84

15:22

PAGE

115
78-4

SEQ 0190

TEST

8CC
GEDF

18%:

18
EMSOA,ERRSO

:IT DID -- GOOD.
;NOP!
REPORT:
"T1"” NOT CLEARED BY LOADING TiLH
:

"DEVICE FATAL” ERROR # 91
TRAP
.WORD
. WORD
.WORD

s THAT'S ALL FOLKS!
ENDSUB

L10077:

124403

C$ERDF
91
EMSOA
ERRSO

TRAP

CSESUB

:'.....'..-'.-l’-.-l.‘....-.--..-.-.-..---..----.-.-.'"-......-.-."’I..'-."

BGNSUB

104402

004737

103003

003762

104460
104410
001030
112737
004537
120002
002445

000377
004310

002445

000030
004310

004660

103003
104460

104410
000734
004737
102002
104410

000720

103006

TRAP

C$ERROR

TRAP

CS$ESCAPE

TRAP

C$ERROR

TRAP

CSESCAPE

s INIT DMV € ENTER M-LOOP
s IF NO ERROR, PROCEED WITH TESTING
;:ELSE, REPORT ERROR

ESCAPE

TST

& EXIT

TEST

.WORD
L10076-.
:SETUP DDRB SUCH THAT ORB IS AN INPUT/0UTPUT REG

MOVB
JSR
DDRB

8377, TMP2.1
RS,WRITE

B8CC

.+10

s IF NO ERROR, PROCEED

ESCAPE

TST

#30,TMPO.1

. WORD
L10076-.
;CLEAR ALL BITS IN ORB EXCEPT DTR L & RTS L

MOVB
JSR

;ELSE,

REPORT

AND EXIT

RS,WRITE

;

BCC
ERROR

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

?ggo :

DOING

THIS,

THIS TEST

SHOULD EXPECT PB7

TO BE

CLEARED IF MODE 3 DOESN'T WORK PROPERLY.

104460

104410
000754
004537
000000
000300

002441

csBsuB

PC,MSTCLR
1$

ERROR

104460

TRAP

JSR
8CC
ERROR

TMP2+1

103003

104410
001002
112737
004537
120000
002441
103003

18:

T28.2:

036146

AND EXIT

THIS TEST

JSR
RS,INITT1
0
BIT7+BIT6

sINITIALIZE TIMER @ 1
:
O ==> LATCHES
:
MODE 3 € "T1"

ERROR

;ELSE,

B8CC

.+10

ESCAPE

TST

JSR
BvC
ESCAPE

BCC

PC,GETT1
. +6
SuB

: IF NO ERROR, PROCEED
.

REPORT

THIS

CS$ERROR

TRAP

CSESCAPE

.WORD

INT.

AND EXIT

TRAP

TEST

ENABLE FLAG CLEARED
TRAP

CSERROR

TRAP

CSESCAPE

.WORD

1IS "T1* SET?
:IF NO ERROR, PROCEED
sELSE, IT'S ALREADY BEEN REPORTED

TRAP

i1NO,

GOOD.

L10076-.

.WORD

L10076-.
EXIT

CSESCAPE

L10100-,

CNDMAAO DMV11l MCTRL DIAG #1
TEST 28

VIA

TIMER

MACRO M1200

1 FREE-RUNNING MODE

104455
000134
016067
010762
104410
000702

6873 037214

004537

6870

6872

6874
6875
6876
6877
6878
6879
6880
6881

037220

037222
037224
037230
037232
037232
037234
6882 037236
6883 037240
6884 037242
037242
037244
037246
037250
6885 037252
037252
037254
6886
6887
6888
6889 037256
6890 037256
6891 037262
6892 037264
037264
037266
6893 037270
6894 037272
037272
037274
037276
037300
6895 037302
037302
037304
6896

125

ESCAPE

036114

125

6899 037306

2%:
R

005003
004737
102002

036146

4s:

104410
000660
103407
077307

JSR

.BYTE

SuB

:YES, REPORT IT’'S NOT BEING CLEARED @ INIT.

RS5,LODT1C

125,125

"DEVICE FATAL” ERROR & 92

& EXIT

R3
PC,GETT1
. +6
SuB

BCS
SoB
GEDF

S$
R3,4%
EM30F ,ERRS0O

R
036332

S$:

104410
000626
103406
104455
000136
017174
010762

C$ERDF
92
EMSOA
ERRS0

TRAP
.WORD

C$ESCAPE
L10100-.

S b

;RELOAD TIMER 1'S COUNTERS WITH NEW VALUES:

s INITIALIZE TIMEOUT COUNTER
:"T1"” SHOULD BE SET.
IS IT?
: IF NO ERROR, PROCEED
:ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CSESCAPE
.WORD
L10100-.
: YES, GOOD.
:NO,
IF NO TIMEOUT, LOOK AGAIN
;ELSE, SAY IT WASN'T SET BY T1 TIMEOUT

SuB

"DEVICE FATAL" ERROR # 93

:IF ERROR,

THE REST OF

TRAP
CSERDF
.WORD
93
.WORD
EMSOF
.WORD
ERRS0
THIS TEST IS UN-DOABLE!
TRAP
CSESCAPE
.WORD
L10100-.

T T T

JSR
BvC
ESCAPE

PC,.GETPB7
.+6
SuUB

GET 997,
IS IT SET1?
; IF NO ERROR, PROCEED
:ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
C$ESCAPE

BCS
GEDF

36$
EM50U, ERRS0

: YES,
+NO,

ESCAPE

104410
000610

TEST

TRAP
.WORD
.WORD
.WORD

CLR
JSR
8vC
ESCAPE

ESCAPE

104410
000640

004737
102002

EMS0A,ERRS0O

104455
000135
016341
010762

SuUB

GOOD.
REPORT

.WORD

L10100-.

IT NOT SET.

"DEVICE FATAL"” ERROR & 94

& ALLOW RESTART OF

6897

6898

;

GEDF

037210
037212

J15

PAGE 78-5

TEST

6868 037200
037200
037202
037204
037206
6869 037210

22-FEB-84 15:22

TRAP
.WORD
.WORD
.WORD
THIS SUBTEST
TRAP
.WORD

CSERDF
94
EMSOU
ERRS0
CS$ESCAPE
L10100-.

R e
R

004537

004064

36%:

JSR

RS,READ

{READING T1CH SHOULDN'T CLEAR "T1"

SEQ 0191

K15
CNDMAAO DMV11 MCTRL DIAG #1
TEST 28

MACRO M1200

22-FEB-84

15:22

PAGE 78-6

SEQ 0192

-- VIA TIMER 1 FREE-RUNNING MODE TEST

6900 037312
6901 037314
6902 037316
6903 -037320.
037320
6904 037322
037322
037324
6905 037326
6906 037332
0907 037334
037334
037336
6908 037340
6909 037342

120005
002452
103003

037342
037344
037346
037350
6910 037352
037352
037354
69211
6912
6913
6914 037356
6915 037360
6916 037364
6917 037366
037366
037370
6918 037372
6919 037374
6920 037376

104455
000137

037376
037400
037402
037404
6921 037406
037406
037410
6922
6923
6924
6925 037412
6926 037412
6927 037416
6928 037420
037420
037422
6929 037424
6930 037426

104455
000140
016730
010762

037426
037430

104455
000141

T1CH
TMPS

ERROR

104460
104410
000572
004737
102002

036146

104410
000556
103406

016406
010762

104410
000472
103404

JSR
8vC
ESCAPE

PC,GETTL
+6

: IF NO ERROR, PROCEED

BCS
GEDF

37¢
EM50G,ERRS0

CLR
JSR
8vC

036146

ESCAPE

8CS
S08
GEDF

104410
000504

102002

TST

SuB

TRA®

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10076-.

;CHECK "T1" -- IT SHOULD STILL BE SET

;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
.WORD

C$ESCAPE
L10100-.

TRAP
.WORS

CSERDF
95

+IT IS, GOOD.
;CLEARED BY READING Ti1Ch:!!
“DEVICE FATAL” ERROR & 95
H

.WORD
.WORD

ALLOW RESTART OF THIS SUBTEST
TRAP

.WORD

104410
000524
103407
077307

004737

AND EXIT THIS TEST

ESCAPE

104410
000540

005003
004737
102002

; (WE DON'T CARE WHAT THIS IS)
+ IF NO ERROR, PROCEED
tELSE, REPORT IT

8CC

036332

R3
PC,GETT1

. +6
SuUB
39¢

R3,38%

EM50L ,ERRS0

ESCAPE

suB

JSR
8vC

Pcécerpa7

ESCAPE

BCS
GEDF

EMSOG
ERRS0

CSESCAPE

L10100-.

s INITIALIZE TIMEOUT COUNTER AGAIN
sWAIT FOR

"T1"

TO BE SET AGAIN

: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
.WORD

CS$ESCAPE
L10100-.

TRAP

CSERDF

:GOT IT -- NO CHECK P87
sNOT YET.
IF NO TIMEOUT, LOOK AGAIN.
;ELSE, TIMER NOT REALLY WORKING RIGHT!
“DEVICE FATAL" ERROR # 96
i
.WORD
.WORD
.WORD

96
EMSOL
ERR50

TRAP
.WORD

CSESCAPE
L10100-.

SuB

IS IT SET?
:GET "PB7",
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

i YES,

EMS0Z ,ERRS0

iNO,

;

GOOD.

REPORT

TRAP
.WORD

CS$ESCAPE
L10100-.

“PB7” NOT SET AFTER SECOND CYCLE

“DEVICE FATAL" ERROR ¢ 97

TRAP

.WORD

CSERDF

CNDMAAO DMV11l MCTRL DIAG @1
TEST 28

6931
6932
6933

VIA TIMER

037432
037434

6934 037436

6935 037442
6936 037444
037444
6937 037446
037446
037450
6938
6939
6940 037452
6941 037454
6942 037460
6943 037462
037462
037464
6944 037466
6945 037470
6946 037472
6947 037474
6948 037500
6949 037502
6950 037504
6951 037506
037506
6952 037510
037510
037512
6953 037514
6954 037520
6955 037522
037522
037524
6956 037526
6957 037530
037530
037532
037534
037536
6958 037540
037540
037542
6959 037544
037546
6961 037552
6962 037554
037554
037556
6963 037560
037562
6965 037564

MACRO M1200

1 FREE-RUNNING MODE

22-FEB-84

L15

15:22

PAGE

78-7

SEQ 0193

TEST

017471
010762

.WORD
.WORD
5

004737

103003

036204

104460

ESCAPE

104410
000446
005003
004737
102002

104410
000430
103402
077307
000442
004537
120004
002450
103003

036146

78:

tKICK IT OFF AGAIN SO WE CAN PRESERVE TIMING
:IF NO ERROR, PROCEED

TST

R3
PC,GETT1
. +6
SuB

:ELSE, REPORT IT
AND EXIT

THIS

TEST

TRAP

CS$ERROR

TRAP
.WORD

C$ESCAPE
L10076-.

sWAIT FOR IT TO FINISH:
s INITIALIZE TIMEOUT COUNTER
$"T1l" SHOULD BE SET.
IS IT?
: IF NO ERROR, PROCEED

004064

8CC
ERROR

.+10

ESCAPE

TST

;ELSE,

IT'S ALREADY BEEN REPORTED

-- EXIT

.WORD

036146

JSR
8vC
ESCAPE
8CC

GEDF

PC,GETT1
.t
SuB
9¢

EM50C,ERRS0O

(WME DON'T CARE WHAT THIS IS EITHER)

:IF NO ERROR,

PROCEED

:ELSE, REPORT IT
:

AND EXIT

TRAP

THIS TEST

.WORD

036146

9%:

12¢:

CLR

JSR
BvC
ESCAPE

suB

PC,GETT1
. +6

suB

:NOT CLEARED!
REPORT IT,
:
"DEVICE FATAL"” ERROR & 98

+ IF

THIS ERROR OCCURED,

tRE-INITIALIZE

THE

EXIT

SUBTEST
TRAP

.WORD
TIMEOUT COUNTER

sWAIT FOR “T1" TO GET SET
:IF NO ERROR, PROCEED

:ELSE,

.WORD
.WORD
.WORD

GEDF

;GOT

EM50X,ERR50

tELSE,

R3,12%

C$ESCAPE

L10076-.

iNOT

IT'S ALREADY BEEN REPORTED
--

YET.

IF NO

TIMEOUT,

CSESCAPE

L10100-.

-- EXIT

.WORD

GOOD.

REPORT

CSERDF

98
EMSOC
ERR50

AGAIN

TRAP

8CS
SoB8

CS$ERROR

;CHECK “T1" -- IT SHOULD BE CLEARED NOW
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CS$ESCAPE
.WORD
L10100-.
+IT IS, GOOD.

TRAP

ESCAPE

C$ESCAPE

L10100-.

: YES, GOOD.
iNO,
IF NO TIMEOUT, LOOK AGAIN
: IF TIMEOUT, BYPASS NEXT CHECK (THIS DONE ABOVE)
;READING T1CL SHOULD CLEAR "T1"

TRAP

104455
000142
016203
010762

104410
000336
103407
077307

PC,KICKT1
.+10

8s
R3,7$
14
RS,READ

104410
000370
103006

104410
000352
005003
004737
102002

TRAP

104460
104410
000404
004737
102002

CLR
JSR
8vC
ESCAPE

EMS50Z
ERRS0

TRY

“T1" NOT RESET

AGAIN,

“DEVICE FATAL” ERROR & 99

CSESCAPE

L10100-.

CNDMAAO DMV11 MCTRL DIAG #1
TEST

VIA TIMER

037564
037566
037570
037572
6966 037574
037574
037576
6967 037600
6968 037606
6969 037612
6970 037614
6971 037616
6972 037620
037620
6973 037622
037622
037624
6974 037626
6975 037632
6976 037634
037634
037636
6977 037640
6978 037642

6979

6980
6981
6982
€983
6984
6985
6986
6987
6988

6989
6990
6991
6992
6993
6994

6995
6996

037642
037644
037646
037650
037652
037652
037654
037656
037662
037664
037664
037666
037670
037672
037676
037700
037702
037704
037704
037706
037706
037710
037712
037716
037720
037722
037724
037724
037726
037726
037730
037732

MACRO M1200

1 FREE-RUNNING MODE

PAGE

ESCAPE

000252
004310

002455

14%:

MOvVB
JSR
TiLL
TMP6+1
8CC
ERROR
ESCAPE

036146

JSR
8vC
ESCAPE

104410
000256
103406

B8CS
GEDF

suB

9252, TMP6+1

RS,WRITE

.+10
TST
PC,GETT1
. +6

SuB

16$
EMSOM,ERRSO

104455

104410

104410
000226
103054
004537
120015
002472
103003

036332

004064

TRAP

C$ESCAPE

TRAP

C$ERROR

.WORD

:SETUP FOR AND
:
LOAD TiLL CADDR 6)

L10100-.

WITH 252 OCTAL

+ IF NO ERROR, PROCEED
:ELSE, REPORT IT
5

AND EXIT THIS TEST

TRAP

.WORD

: THIS SHOULDON'T CLEAR "T1"
: IF NO ERROR,

:ELSE,

CSESCAPE

L10076-.

PROCEED

IT'S ALREADY BEEN REPORTED -- EXIT
TRAP

.WORD

:IT DIDN'T -- GOOD.
:WOOPS, IT DID!!
REPORT FAILURE
:
“"DEVICE FATAL" ERROR # 100

TRAP

C$ESCAPE

L10100-.

C$ERDF

.WORD
.WORD
.WORD

100
EMSOM
ERRS0

TRAP

CS$ESCAPE

suB

JSR

PC,.GETPB7
.+6

:"PB7" SHOULD BE LOW HERE
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT

8vC
ESCAPE

suUB

THE

REST

THIS

TEST

:IT WASN'T,

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
;:ELSE, REPORT IT

ESCAPE

TST

;

GOOD.

TOO!

L10100-.

CSESCAPE

.WORD

L10100-.

TRAP

CSERROR

TRAP

CSESCAPE

TRAP

CSERROR

:GET IFR FOR ERROR MESSAGE

AND EXIT THIS TEST

JSR
T1CL

RS,READ

:GET T1CL FOR ERROR MESSAGE

8CC
ERROR

.+10

+IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

R5,READ

INVALID

TRAP

178
RS,READ

JSR

.WORD

8CC
JSR
IFR

TMP4

104460
104410
000166
004537

16$:

99
EM50X
ERRS0

:IF ERROR, CAN'T CONTINUE THIS TEST

C$ERDF

.WORD
.WORD
.WORD

ESCAPE

TMPD

104460
104410
000206
004537
120004
002450
103003

SEQ 0194

000144
017012
010762

000240
004737
102002

78-8

TRAP

104460

104410
000272
004737
102002

15:22

TEST

104455
000143
017354
010762
104410
000316
112737
004537
120006
002455
103003

M15
22-FEB-84

AND EXIT

THIS

TEST

.WORD

TRAP

:GET T1CH FOR ERROR MESSAGE

.WORD

L10076-.

CSESCAPE

L10076-.

CNDMAAO DMV11 MCTRL DIAG #1
TEST 28

VIA TIMER

1 FREE-RUNNING MODE

6997 037736
6998 037740
6999 037742
7000 037744
037744
7001 037746
037746
037750
7002 037752
7003 037756
7004 037760
7005 037762
7006 037764
037764
7007 037766
037766
037770
7008 037772
7009 037776
7010 040000
7011 040002

104410
000126
004537
120007
002456
103003

040004

104460

7012

7013

7014

7015
7016
7017
7018
7019
7020
7021
7022
7023
7024
7025

7026

040006
040010
040012
040014
040016
040020

MACRO M1200

15:22

PAGE

N15
SEQ 0195

T1CH
TMPS

B8CC

ERROR

104460

ESCAPE

.+10

+IF NO ERROR, PROCEED

;ELSE,

TST

004064

:GET TILL FOR ERROR MESSAGE

8CC
ERROR

.+10

:IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

#if

040064
040066

104455
000146

104410

000034
103006

TRAP

8CC
ERROR

.+10

: IF_ NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

EM50Y,ERRS0O

AND EXIT THIS TEST

000252
004310

036146

002457

THE ABOVE

OPERATION,

"PB7"

TEST,

IT SHOULD BE LOW.

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10076-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10076-.

TRAP

CSERDF

0252, TMP7.+1
RS,WRITE

:SETUP FOR AND
i+
LOAD TiLH (ADDR 7)

.+10

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

101
EMSOY
ERRSO

NOT BECAUSE OF ANY READ/WRITE

BUT BECAUSE OF WHERE WE ARE IN THE CYCLING OF

MOve
#SR
1LH
TMP7+1
8CC
ERROR

JSR
8vC

C$ESCAPE

L10076-.

+IT WAS!
REPORT IT BEING RESET BY WRITTING T1iLL
:
“DEVICE FATAL" ERROR ¢ 101

SHOULD BE LOW HERE UNTIL T1 TIMES OUT,

17%:

C$ERROR

.WORD

.WORD
.WORD
.WORD

104410
000050
004737
102002

THIS TEST

+GET T1LH FOR ERROR MESSAGE

GEDF

040044
040046
7027 040050
7028 040054
7029
040056
040060
7030 040062
7031

AND EXIT

RS,READ

TMP7

104460

AND EXIT THIS TEST

R5,READ

104455
000145
017417
010762

040042

#if

L
TMP6

104410
000106

112737
004537
120007
002457
103003

REPORT

TRAP

104460

040022
040030
040034
040036
040040

78-9

TEST

120005
002452
103003

104410
000146
004537
120006
002454
103003

22-FEB-84

TIMER @ 1.

“PB7"

WITH 252 OCTAL

AND EXIT

THIS TEST

TRAP
TRAP

.WORD

CSERROR
CSESCAPE

L10076-.

ESCAPE

PC,GETT1
. +6
SuB

i THIS SHOULD CLEAR “T1*
:IF NO ERROR, PROCEED

8CC
GEDF

18$
EMS0A,ERRS0

:IT DID -- GOOD.
iNOP!
REPORT:
“T1" NOT CLEARED BY LOADING TIiLH

;ELSE,

IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CSESCAPE
+WORD
L10100-.
“DEVICE FATAL" ERROR ¢ 102
TRAP

.WORD

CSERDF

102

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA

040070
040072
7032 040074
040074
040076
7033 040100
7034 040104
7035 040106
7036 040110

7037 040112
7038

- 040112

7039 040114
040114
040114
7040 040116
040116
040116

7041
7042
7043

TIMER

MACRO M1200

22-FEB-84

15:22

PAGE

Bl6
78-10

SEQ 0196

1 FREE-RUNNING MODE TEST

016067
010762

104410
000016
004537

000001
000000
103001

104460

ESCAPE

SuUB
-

004660

188:

JSR
1
0
8CC

ERROR

ENDSUB

RS, INITT1

.+4
sTHAT
'S ALL

tRE-INITIALIZE

TO STOP

TRAP

CSESCAPE

. WORD

;IF NO ERROR, EXIT

tELSE,

REPORT

FOLKS!

ENDTST
104401

EMS0A
ERRSO

L10100-.
ITS FUNCTIONI NG

L10100:

104403

. WORD
. WORD

L10076;

TRAP

CSERROR

TRAP

CSESLB

TRAP

CSETST

CNOMAAO DMV11 MCTRL DIAG 21
HARDWARE

MACRO M1200

22-FEB-84

15:22

PAGE

Clé
79

SEQ 0197

PARAMETER CODING SECTION

704
7046

.SBTTL HARDWARE PARAMETER CODING SECTION

7049

7047
7048

§ILLLIIVIIIIITI 7077700700000 0702080000770080000707000077700000700700707070000707

7050

THE

7051
7052
7053
7054
7055

7058
7059 040122

040122
040124
040126
040130
7060 040132
040132
040134
040136
040140
7061 040142
040142
040144
040146
040150
040152
7062

SECTION CONTAINS MACROS

THE

TO ESTABLISH COMMUNICATIONS

NN
NI NNy

L$HARD:
:

000031
040154
160020

177776

001031
040202
000000
000674

002032
040233

GPRMA

ADDRES,0,0,160020,177776,
YES

GPRMA

VECTOR,2,0,0,674,YES

GPRMD

PRIRTY,4,0,7000,0,7,YES

007000
000000
000007

' ENDHRD

040154

040154
7067 040202
7068 040233

THE
ARE

BGNHRD

000015

7063 040154

7069

CODING

i/ MACROS ALLOW THE SUPERVISOR
i/ WITH THE OPERATOR.

7057 040120
040120
040122

7070

PARAMETER

3/ INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.

7056

7064
7065

HARDWARE

3/ THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
i/ MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT

L10101:

104
104
104

105
105
105

126
126
126

BEX
.NLIST
ADDRES: .ASCIZ
VECTOR: .ASCIZ

PRIRTY:

.LIST
.EVEN

ASCIZ

BEX

/DEVICE CSR ADDRESS : /
/DEVICE VECTOR ADDRESS :
/DEVICE PRIORITY LEVEL :

/
/

.WORD L10101-L$HARD/2

.WORD
.WORD
.WORD
LWORD

T$CODE
ADDRES
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD

T$CODE
VECTOR
TsLOLIM
TSHILIM

.WORD
.WORD
.WORD
. WORD
.WORD

T$CODE
PRIRTY
7000
TSLOLIM
TSHILIM

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

D16
22-FEB-84 15:22

PAGE 80

SEQ 0198

SOF TWARE PARAMETER CODING SECTION
zgzg

.SBTTL

7074
7075
7076
7077
7078
7079

7080
7081
7082
7083

SOF TWARE PARAMETER CODING SECTION

RILILIIIIIIIIIIIIIIIII
07772700770 007000700707777770207070027700770707777
i/
THE _SOF TWARE PARAMETER CODING SECTION CONTAINS MACROS
i/
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
THE
i/
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
i/
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE

i/
3/

MACROS ALLOW THE SUPERVISOR
WITH THE OPERATOR,

TO ESTABLISH COMMUNICATIONS

§ILLLILLIIIIILIIP 7070708702800 8 0807000702777 0 7080000070000

0000007070777

7084

7085 040264

040264
040266
7086 040266
040266

BGNSFT

000000
ENDSFT

LS$SOFT::

L10102:

.WORD L10102-L$SOFT/2

.EVEN

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE

EL16
81

SEQ 0199

PATCH AREA FOR DEBUG
7088
7089 040266
7090
7091 040366

7092 040370

7093 040372
7094
7095
7096
7097
7098 040374
7099 040374

040374
040376
040400

.SBTTL PATCH AREA FOR DEBUG

PATCH:

040366
000240

.=,+100

NOP
NOP
NOP

000240
000240

1028000000080

00004080000000000000000000

.SBTTL “ENDMOD"” & "LASTAD"
ENDMOD
LASTAD

000000
000001

LSLAST::
.END

.EVEN
.WORD
. WORD

CNDMAAO DMV11 MCTRL DIAG @1

MACRO M1200

22-FEB-84

15:22

F16

PAGE 81-1

SEQ 0200

SYMBOL TABLE
ACR

120013

ADDRES 040154
ADR
= 000020 G
AD.HIT
020350
AD.OK
020344
ASSEMB= 000010

BDATA
002312
BITO
= 000001 G

BITO0
BITO1
BITO2
BITO3
BITO4
BITOS
BITO6
BITO7
BITO8
BIT09
BIT1

BIT10
BIT11
BIT12
BIT13
BIT14
BIT15

=
=
=
=
=
=
=
=
=
=
=

BIT2
BIT3
BIT4
BITS
BIT6
BIT7
BIT8

BIT9
BOE

BSEL
BSELRS
BSELO

=
=
=
=
=
=

=
=
=
=
=
=
=

002000
004000
010000
020000
040000
100000

000004
000010
000020
000040
000100
000200
000400

G
G
G
G
G
G

G
G
G
G
G
G
G

= 001000 G
= 000400 G

002352
003042
002352

BSEL1

2854

BSEL10
BSEL11

4372
002%74

BSEL12
BSEL13
BSEL14
BSEL1S5
BSEL16
BSEL17
BSEL2

BSEL3
BSEL4
BSELS
BSEL6
BSEL7
BSLTO
BSLT1
BSLT2
BSLT3
BSLT4

000001 G
000002 G
000004 G
000010 G
000020 G
000040 G
000100 G
000200 G
000400 G
001000 G
000002 G

002376
002400
002402
002404
002406
002410
002356

=
=
=
=
=

002360
002362
002364
002366
002370
000020
000021
000022
000023
000024

BSLTS = 000025

CS$GPRI= 000040

EMS0A

016067

BSRO
BSR1
BSR10

C$MANI= 000050
C$MEM = 000031
C$MSG = 000023

EMS0D
EMSOE
EMSOF

016251
016305
016341

B5LT6 = 000026
BSLT7 = 000027

BSR11
BSR12

002246
002250
002265

002270
002272
BSR13
002274
BSR14
002276
BSR15
002300
BSR16
002302
BSR17
002304
BSR2
002252
BSR3
002254
BSR4
002256
BSRS
002260
BSR6
002262
BSR7
002264
BT1
= 003122
BT2
= 003206
BUFARE
003122

C$INIT= 000011
CS$INLP= 000020

C$OPEN= 000034
C$PNTB= 000014

EMS08
EMSOC

EMS0G
EMS0H

CS$PNTF=
CS$PNTS=
C$PNTX=
C$QI0 =
C$RDBU=
CSREFG=
CS$RESE=
CSREVI=
CSRFLA=
CSRPT =
C$SEFG=

000017
000016
000015
000377
000007
000047
000033
000003
000021
000025
000046

EMSOI
EM50J
EMSOK
EMSOL
EMSOM
EMSON
EMS0S
EMS0U
EMS0V
EMSOW
EMS0X

CS$CEFG= 000045

DELAY2
DEVMAP
DEVPTR
DFPTBL
DIAGMC=
OMVDAI=
OMVPU =

002320
002342
002344
002216 G
000000
000001
000004

ENDEMB
ENDT7?
ERRBLK
ERRFLG
ERRMSG
ERRNBR
ERRTYP

C$CLOS= 000035
CsCLP1= 000006
C$CVEC= 000036

EF .PUR= 00034 G
EF .RES= 0({0037 G
EF .STA= 000040 G

CONSOL
CONTIN
CONTST
CSREGS=
C$AU_
=
C$AUTO=
C$BRK =

002346
020122
020222
000020
000052
000061
000022

C$BSEG= 000004

Cs8SUB= 000002
CsCLCK= 000062
CSCLEA= 000012

CSOCLN= 000044

C$DODU= 000051
C$DRPT= 000024
CsDU
=
C$EDIT=
C$ERDF=
CSERHR=
CS$ERRO=
CS$ERSF=
CS$ERSO=

CS$ESCA=
CS$ESEG=
C$ESUB=
CSETST=
CSEXIT=
CSGETB=
CSGETW=
C$GMAN=
CsGPHR=
CsGPLO=

000053
000003
000055
000056
000060
000054
000057

000010
000005
000003
000001
000032
000026
000027
000043
000042
000030

C$SPRI=
"C$SVEC=
C$TPRI=
DDRA
=
DDRB
=
DELAY1

000041
000037
000013
120003
120002
002316

EF .CON= 000036 G
EF .NEW= 000035 G

EM14

014667

EM17
EM17A
EM20
EM20A
EM20B
EM21
EM22

015110
015170
015243
015275
015355
015442
015477

EM1S ©
EM16

EM22A
EM2S
EM3
EM34
EM34B
EM4
EM47A
EM478
EM4BA
EMS

014733
015013

. 015532
015565
014454
015613
015644
014500
015675
015735
016016
014515

EMSOY
EMS0Z
EM6
EM7
EM8
EM9

ERR1
ERR2

ERR3
ERR4
ERR4S

ERR47

ERR47.
ERR48

ERR48.
ERRS
ERRSS
ERRSO
ERR6
ERR7
ER47CT

ER4A7MX
ER4BCT
ER48BMX
EVL
=
EXECUT=
ESEND =
- ESLOAD=
FMTO2
FMTO2A
FMTO6

016135
016203

016406
016450

FMTO6A

012571

FMT10
FMT11
FMT4

012654
012730
012245

FMT06B
FMTO7

FMT4A
FMT4B

016536
016600
016666
016730
017012
017054
017122
017174
017240
017305
017354

FMT4AC
FMT47A
FMT478
FMT47C
FMT47E
FMT47G
FMT48A
FMT488
FMT48C
FMT48E
FMT48F

012114
022642
002244
002332
002242
002240
002236

FMTS0B8
FMTSOC
FMTSOD
FMTSOE
FMTSOM
FRSPAS
FRSTIM

017417
017471
014540
014564
014611
014634

FMT48G
FMT48H
FMT48I
FMTS
FMTSA
FMTSOA

G
G

005276 G
005304 G

005414 G
005426 G
011322

006724 G
007110
007632 G
010030
005552
011710
010762
005650
006612
007104

G
G
G
G

007106
010024
010026
000004 G
000005
002100
000035
012124
012161
012562

012637
012530

012305
012340

012345
007232
007263
007322
007350
007407
010300
010347
0104C2
010437
010506

010551
010611
010644
012400
012443
012747

013021
013102
013142
013157
013174
002340
002336

F$AU
= 000015
F$AUTO= 000020

F$BGN = 000040
F$CLEA= 000007
F$DU
= 000016

FSEND = 000041

F$HARD= 000004
F$HW
= 000013
FS$INIT=
F$JMP =
F$MOD =
F$MSG =
F$PROT=
F$PWR =
F$SRPT =

F$SEG =
F$SOFT=
F$SRV =
F$SUB =
F$SW
=
F$TEST=
GDATA
GETBSR
GETPB?
GETPRM

000006
000050
0000CO
000011
000021
000017
000012

000003
000005
000010
000002
000014
000001
002310
004434
036332
020012

GS$HILI= 000002
GSLOLI= 000001
GSNO
=
G$OFFS=
G$OFSI=
G$PRMA=
GSPRMD
=
GSPRML
=
G$RADA=
G$RADB=
G$RADD=
G$RADL
=
G$RADO=
G$XFER=
GSYES =

IFR

LoDT1C
LOE
LOGDEV
LOT
LSIDCL
LSIHLT
LU1MOD
L$ACP
LSAPT

2121~

HELP
HOE
IBE
IDU
IENBA
IENBB
IENR
IER

KICKT1

IFRCAl=

IFRCB1=
IFRCB2=
IFRIRQ=
IFRSR =
IFRT1 =
IFRT2 =
IHILNK
THOLNK
INITT1
INTFLG
INTWCH
=
IRQA
IRGB
=
IRQREG*=
=
ISR
IXE
=
ISAU
=
I$AUTO=
ISCLN =
IsDU
=
ISHRD =
ISINIT=
1$MOD =
I$MSG =
I$PROT=

IFRCA2=

000041
000041
000041
000041
000041
000041
000041
000040

L$AU
LSAUT
L$AUTO

LsCCP
LS$CLEA
L$CO
L $DEPO
L$DESC
L$DESP
LSDEVP
L$DISP
LSDLY
LSOTP
LSOTYP
L$DU

LsDUT
LSDVTY
LSEF
LSENVI
LSERRT
LSETP
LSEXP1
L$EXP4
L$EXPS
L $HARD
L$HIME
L$HPCP
LSHPTP
L$HW
Ls$ICP
LSINIT
L $LADP
LSLAST
L$LOAD
L$LUN
L$MREV
L $NAME

002000
002110
002036
020400
002070
020232
002106
020356
002032
002011
003542
002076
002060
002124
002116
002040
002034

020374
002072
003522
002052
002044

002236

002102
002046
002064
002066
040122
002120
002016
002022
002216
002104
017622
002026
040400
002100
002074
002050
002000

L$PRIO
L$PROT
L$PRT
L$SREPP
LSREV
L$SOFT
L$SPC
L$SPCP
LS$SPTP
L$STA
L$SW
LSTEST
LSTIML
LSUNIT
L10000
L10001
L10002
L10003
L10004
L10005
L10006
L10007
L10010
L10011
L10012
L10013
L10014
L10015
L10017
L10020
L10021
L10022
L10023
L10024
L10025
L10026
L10027
L10030
L10031
L10032
L10033
L10034
L10035
L10036
L10037
L10040
L10041
L10042
L10043
L10044
L10045
L10046
L10047
L10050
L10051
L10052
L10053

15:22

PAGE 81-2

002042
017614
002112
002062
002010
040266
002056
002020
002024
002030
002236
002114
002014
002012
002234
002236
005220
005272
005302
005412
005424
005550
005646
006610
006722
007102
010022
011274
020220
020346
020372
020376
020400
020536
020666
021254
021446
021610
021732
022134
022644
022354
022642
023212
023400
025140
025762

026044
026040
026126
026122

026230

026224
027274
026736
027114
027272

SEQ 0201
L10054
L10055
L10056
L10057
L10060
L10061
L10062
L10063

027356
027352
027440
027434
027524
027520
027612
027606
030100
030230
030360
030514
030644
030774
031132
036112
033404
036110
040116
037050
040114
040154

L10064

L10065
L10066
L10067
L10070
L10071
L10072
L10073
L10074
L10075
L10076
L10077
L10100
L10101
L10102

040266

MASCLR

003614
= 000100
MCLR
MLWRI
004332
MPCSR
002352
MPIHAN
005152 G
MPIVEC
002412
MPOHAN
005224
MPOVEC
002414
MPRIOR
002416
= 000200
MRDY
MREQ

MSTCLR
NEWL IN

NEWPC
NEWST
=
NPRABT

NPRAIH=
NPRAIL
=
NPRAIX=
NPRAQOH=
NPRAOL
=
=
NPRAOX
NPRBS7=
NPRBYT=

000001

003762
012121
002500
017772
000200
000075
000074
000076
000071
000070
000072
000010
000010
123004
000044
000054
123001
123000
000100
000040

NPRCTL
=
NPRDL =
NPROLB
=
NPRDRH=
=
NPRDRL
NPRGO =
NPRIO =
NPRLD = 000004
NULERR
012072
002502
OoLDSP

ORA

ORB

ORAM

O$APTS=
=
OSAU
=
O$BGNR
=
O$BGNS
OsOVU
=
OS$ERRT=
O$GNSW=
O$POIN=
O$SETU=
PATA
PATB
PATC
PATCH
PATCM
PATCR
PATD
PATE
PATF
PATG

PATGEN
PCR
=
PFLAG
PNT
=

ISPTAB
I$PWR
ISRPT
I$SEG
I$SETU
ISSFT
I$SRV
I$SUB
I$TST
JSJIMP

22-FEB-84

PRI
.
PRIRTY
PRIOO
PRIO1
PRIO2
PRIO3
PRIO4

o000

036146
004576
000200
000372
000003
000400

()

GETT1
GETWSR
GS$CNTO=
G$DELM=
GSDISP=
GSEXCP=

ONOOOOOOOOOOOOOOOOOOOO6

TABLE

00000000000

SYMBOL

MACRO M1200

(AlalalalalAlalrlala
i~ 2 al~)

CNDMAAO DMV11l MCTRL DIAG #1

G16

PRIOS
PRIO6

PRIO7
PSTACK
PU24
=
RCRAM
READ
READI
REDLOC=
REDPAG=
REGNUM
REGO
REG1
REG2

REG3
REGA
REGS
REG6
REG?7
RESFMC
RESFT3
RESTRT
RUN
.
SELO

017766
000200
002352

CNDMAAO DMV11 MCTRL DIAG ¢1

SEQ 0202

014430
014434
014440
014444
014450
017554
TXTVRO
014345
TXTVR1
014351
TXTVR2
014355
TXTVR3
014362
TXTVR4
014367
TXTVRS
014374
TXTVR6
014401
TXTVR?7
014406
TXTVR8
014413
TXTVR9
014420
TXT1
013253
TXT2
013311
TXT2A
013353
TXT28
013412
TXT3
013454
TXT4
013504
TXT4A
013544
TXT47C
007442
TXT47D0
007453
TXT47E
007466
TXT47F
007510
TXT47G
007533
TXT47H
007556
TXT47P
007614
TXT48A
010736
TXT488
010743
TXT48C
010750
TXT48D
010755
TXTS
013605
TXT6
013607
TXT7
013622
TXT7A
013717
TXT8A
014004
TXT88
014021
TXT8C
014036
TXT8D
014053
TXT8E
014070
T$ARGC= 000001
T$CODE
= 002032
TS$ERRN= 000146
TSEXCP= 000000
T$FLAG= 000040
T$GMAN= 000000
TS$HILI= 000007

120012
005032
STARST
017722
STREG
005034
SVCGBL= 000000
SVCINS= 000001
SvCSuB= 000001
SVCTAG= 000001
SVCTST= 000001
SWPBOT= 121000

SWPDDC= 121400
SSLSYM= 010000
TDATA
TMPA
TMPB

TMPC

TMPD
TMPE

TMPF

TMPO
TMP1

TMP2
TMP3

TMP4
TMPS
TMP6

TMP7
TMP8
TMP9
TXTMLT
TXTMLO
TXTML1
TXTML2
TXTML3
TXTML4
TXTMLS
TXTML6
TXTML7
TXTVR
TXTVRA

ABS.

002306
002464
002466

002470

002472
002474

002476

002440
002442

002444
002446
002450
002452
002454
002456
002460
002462
017532
014105
014111
014125
014142
014164
014205
014235
014247
014327
014425

040400
000000

TSLAST=

000001

000

ERRORS DETECTED:

VIRTUAL MEMORY USED:

31952 WORDS

(

125 PAGES)

T$LOLI=
T$LSYM=
TSLTNO=
TSNEST=
T$NSO =
T$NS1 =
T$NS2 =
TSNS3 =
T$PTNU=
T$SAVL=
T$SEGL=
T$SEKO=
" T$SUBN=
T$TAGL=
T$TAGN=
TSTEMP=
T$TEST=
T$TSTM=
T$TSTS=
T$$AU =
T$$AUT=
T$$CLE=
T$$DU =
T$$HAR=
T$$HW =
T$$INI=
T$$MSG=
T$$PRO=
T$$SEG=
T$$SOF=
T$$SRvV=
T$$SUB=
T$$SW =
T$$TES=
T.EDF =
T.EHRD=
T.ESF =
T.ESFT=
Tl
TICH
=
TICL
=
TILH
=
T1LHGO=
TILL
=
T1.EHD
T1.EM1
T1.HIT
T1.HSB
T1.HSW
T1.0K
1.1

000000
010000
000034
177777
000000
000005
000002
000003
000000
177777
177777
010000
000002
177777
010103
000000
000034
177777
000001
010023
010020
010021
010022
010101
010000
010017
010025
010016
010000
010102
010003
010100
010001
010076
000001
000002
000000
000003
020402 G
120005
120004
120007
120005
120006
020670
020552 G
020540
020550
020546
020536
020717

T1.2
Th.9
T1.4
T10
T11
T12
T12.LP
T12.1
T13
T13.LP
T13.1
T14
T14.LP
T14.1
T15
T15.1
T15.2
T15.3
T16
T16.LP
T16.L1
T16.L2
T16.1
117
517.8
T18
T18.LP
T18.1
T19
T19.LP
11%.4
T2
T2CH
T2CL
TaLL
120
T20.LP
T2l
T21.LP
122
123
124
125
126
127
T27 1
127.2
128
128.1
128.2
T3

021001
021034
021106
024162
025142
025764
026006
026006
026046
026070
026070
026130
026172
026172
026232
026266
026740
027116
027276
026276
026750
027126
027320
027360
027402
027442 G
027320
027466
027526
027402
027554
021146
120011
120010
120010
027614
027466
030102
027554
030232
030362
030516
030646
030776
031134
031134
033406
036366
036366
037052
021256

021450
021612

021734
022136
022136
022356
022646
023214
023402
000209
040202
003346
003350
003352
003354
003356
003360
023420

(2 1al~}

TXTVRB
TXTVRC
TXTVRD
TXTVRE
TXTVRF
TXTVRT

002376
002402
002406
002356
002362
002366
002236
000020
000022
000024
000026

XORGB
X$ALWA=
X$FALS=
X$0FFS=
X$TRUE
=
$E
s
SLSTIN=
SLSTTA=
$MPCSR=
=
$T

)

81-3

SR
STALL

H16

002372

SEL12
SEL14
SEL16
SEL2
SEL4
SELo
SFPTBL
SLTO
=
SLT2
=
=
SLT4
SLT6é
=

PAGE

SEL10

15:22

TABLE

22-FEB-84

SYMBOL

MACRO M1200

CNDMAAO DMV11 MCTRL DIAG #1
SYMBOL

MACRO M1200

22-FEB-84 15:22

TABLE

DYNAMIC MEMORY:
ELAPSED TIME:

19748 WORDS

00:08:46

(

75 PAGES)

CNDMAA .BIC,CNDMAA,.SEQ/CR/
-SP=SVC34 . MLB/ML ,CNDMAA P11
£l

PAGE 81-4

S5EQ 0203