Digital PDFs

AH-T827A-MC

February 1984

204 pages

Original

8.5MB

view download

OCR Version

9.9MB

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_bw.pdf

OCR Text

oHy 11 MGTRL DIAG #
CHOMAARD

Bsa

FICHE 01 OF 01

E0ENBED
¥

OB 3O '/

CNDMAAC MVl MCTRL DIAG o1

MACRO M1200

22 FEB 84

15:22

PAGE

5eQ 0001

.TITLE CNOMAAO DMV11 MCTRL DIAG o1
.SBTTL PROGRAM DOCUMENT'
.REM ¢

IDENTIFICATION
PROOUCT

CODE :

T826A MC

PRODUCT NAME:

CNDMAAO DMV

PRODUCT

APRIL

DATE:

MAINTAINER:

ISS

AUTHORS :

11 MICRO CONTROLLER STATIC DIAGNOSTIC PART

1984

DIAGNOSTICS

CHRIS BRIENEN

RAY

MOOIFIED BY;

MARSMHALL

JAKT BERG

PURPOSE :

9 APR

THIS DIAGNOSTIC

THE

MB0S3

INFORMATION

1S DESIGNED TO PERFORM STATIC LOGIC

OR MB064

THIS

FOR

ANY

1984

(HEREAFTER REFERRED

DOCUMENT

SUBJECT

THE

CHANGE

DMV

TESTS FOR
OR

WITHOUT

NOTICE
AND
SHOUWLD
MNOT BE CONSTRUED AS A COMMITMENT By DIGITAL
EQUIPMENT CORPORATION.
OIGITAL EQUIPMENT CORPORATION ASSUMES NO

RESPONSIBILITY

ERRORS

THAT

NO RESPONSIBILITY IS ASSUMED
FOR
SOF TWARE ON EQUIPMENT THAT IS NOT
AFFILIATED

FOLLOWING

ARE

OIGITAL
DEC

COMPANIES.

(C)

1984 By

DIGITAL

TRADEMARKS OF

POP
DECUS

MAY

APPEAR

THME
USE
SUPPLIED

OR
B8v

THIS

DOCUMENT.

RELTABILITY
DIGITAL
OR

EQUIPMENT CORPORATION

DIGITAL

EQUIPMENT

UNIBUS
DECTAPE

CORPORATION:

MASSBUS

OF
ITS

DMV

11)

CNDMAQQ DMVIL MCTR

DIAG

MACRO M1200

22 FEB 84

15:22

Cl
PAGE

3§

5EQ 0002

PROGRAM DOCIMENT
48
49

50
51
52
SX
5S4
SS
S6
5~

58
59
60

sesee

REV

REV B:

ORIGINAL

MODIFICATION

RELEASE

HISTORY

seees

CHRIS BRIENEN,

RAY

MARSHALL

INSTALLED OUISTANDING PATCHES

CVOMAB <> ZNDMAA
CHANGES WERE MADE
(S8C 11/21.+),
SET THE
ODT
FALCON'S

ODT

CVOMAB

TO PRCCuLt

JNOMAA

JAKI BERG
FOR THE

(170000

OCTAL),

JUAN 81

9 APR

FALCON PLUS PROJECTM

CHANGES, MARKED By “;UB KHEV A 0", ARE:
BREAK
VECTOR (LOCATION 140) TO THME STARTING ADORESS OF

ROM

CNDMAQO DMV1IL1 MCTRL

DIAG of

MACRO M1200

22 FEB 84

15:02

D1
PAGE

SEQ 0003

PROGRAM DOCUMENT

63
o4

CONTENTS

PRELIMINARY

GENERAL
bhbbbbh

MARDWARE

MO‘\HOU‘NF‘

©o
O

INTRODUCTION

REQUIREMENTS

PROGRAM REQUIREMENTS

PROGRAM CONSIDERATIONS

OIAGNOSTIC SUPERVISOR
EXECUTION TIMt

.
XXDP
ACT/SLIOE
APT
MEMORY MANAGEMENT
ERROR LOGGING

PROGRAM LOAD MEDIA

O OPERATING INSTRUCTIONS
6.1 LOADING AND STARTING PROCEDURES
6.1.1 LOADING PROCEDURES
6.1.2 STARTING PROCEDURES
6.1.3 ¢ STEPS FOR QUICK AND S MPLE
INITIAL DIALOGUE
OO NN
D WM -

8 O

TEST

.10
.11
.12
.13
.14

U L

[0 X« Xo Wo W 0o No We Wo We ¥o W

7.0

EXECUTION se

PROGRAM OPTIONS
START COMMAND

W0 )

o gle)

65
66

RESTART

COMMAND

CONTINUE COMMAND

PROCEED COMMAND
ADD COMMAND

DROP COMMAND

COMMAND

DISPLAY COMMAND

FLAGS COMMAND
ZFLAGS COMMAND
CONTROL CHARACTERS
HARDWARE PARAME TERS
SOF TWARE PARAME TERS
EXTENOED DISCUSSION OF

DESCRIPTIONS

8.0 ERROR INFORMATION
8.1 ERROR REPORTING

TABLE DIAL OGUE

CNOMAQO DMV11

MCTRL

DIAG o1

MACRO M1200

1
FEB

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

1.0

INTRODUCTICN

THE

MBOS3

PROCESSOR

AND

BASED

MB064

ARE

SINGLE -LINE

COMMUNICATIONS

INTERFACES

SYNCHRONOUS,
WHICH

CAN

MICRO

SUPPORT

BOTH CHARACTER-ORIENTED (DDCMP, BSC,
ETC.) AND BIT ORIENTED
(SOLC, HOLC, 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

CSR ADDRESSING,

READ/WRITE

VIA

TESTING,

AND

ON-BOARD RAM

BIT

AND BASIC
FOLLOWING
EXECJTION

INTERACTION

AND

TESTING.

THE
STATIC
LOGIC
TESTS
WILL
TROUBLESHOOTING CAPABILITIES, SUCH
AS

PROVIDE
EXTENSIVE
TIGMT
SCOPE
LOOPS,

SWITCH
OPTIONS,
AND
ABILITY
TO
“LOCK” ONTO INTERMITTENT
ERRORS.
IN
AODDITION
TESTS
ARE
DESIGNED
AND
STRUCTURED
T0
ACHIEVE
MAXIMUM
FAULT
RESOLUTION
AND
FACILITATE
REPLACEMENT OF THE SMALLEST FIELD REPLACEABLE UNIT.
THIS

PROGRAM

SUPERVISOR

AND

THE
DESIGN
VERSION)
THE
AND SLIDE.

IMPLEMENTED

USING

THE

CONFORMS
PROGRAM

10
THE
SUPERVISOR
IS
COMPATIBLE WITH ACT,

THROUGH
DIALOGUE
WITH
THe
OPERATOR, THE
MODIFICATION OF
DEVICE PARAMETERS, SUCH AS

VECTOR ADDRESSES AND
DEVICE
PRIORITY,
OPERATOR
CAN
SPECIFY
PARTICWAR
TESTS
VARIETY

OIAGNOSTIC

A STRUCTURED PROGRAMMING APPROACH.

LOOPING,

RUNNING,

BECAUSE

( STANDA
ONE
L
APT, XXDP.,

PROGRAM
ALLOWS
BUS ADDRESS,

LSI

IN
ADDITION,
THE
TO
BE
RUN AND A
AND REPORTING MODES.

DEVICE ERRORS WILL BE REPORTED
WILL
INCLUDE
A
TEST
NUMBER
gOOOEA¥D BAD
TEST
DATA,
AND
ONTENTS.

AS THEY
OCCUR.
THE
REPORT
AND DESCRIPTION OF THE ERROR,
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

MB8O53 OR MBO64

COMMUNICATIONS

INTERFACE

3.0 PRELIMINARY PROGRAM REQUIREMENTS
THIS PROGRAM

(CNDMA)

SHOUWLD BE

THE

FIRST

THE

STATIC
DIAGNOSTICS TO BE RUN.
ERRORS
FOUND IN
SHOULD BE CORRECTED BEFORE RUNNING THE OTHERS,

FIVE

DMV

THIS PROGRAM

CNOMAQO DMVIT MCYRL

DIAG a1

MACRO M1200

F1
22 FEB

15:22

PAGE

SEQ 000S

PROGRAM DOCUMENT

168
169
170
171
172

173

174
175
176
177
178
79

180
181
182
183
184
185
186
187
188
189
190

4.0 GENERAL

PROGRAM CONSIDERATIONS

4.1

DIAGNOSTIC

THIS

PROGRAM

SUPERVISOR,
SUPERVISOR,

SUPERVISOR

COMPATIBLE

WITH

THE

STANDAL_ONE

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

4.2

EXECUTION

THE
MAXIMUM
EACH UNIT IS

4.3

TIME REQUIRED
160 SECS.

LOADED

OR CHAIN MODE.

TO RUN

THIS PKOGRAM

PEF

PASS

FOR

xXDP+,

AND

ACT

SLIDE

MAY

RUN

UNDER

AND MAY

RUN

APT

THIS PROGRAM MAY BE LOADED
APT RD) AND RUN IN PROGRAM

MEMORY

4.7

COMBINED

ACT/S5LIDE

IN DUMP MODE

4.6

THE

XXDP.

THIS PROGRAM MAY

4.5

CASE,

WITH
THE
SUPERVISOR

TIME

THIS PROGRAM MAY BE LOADED UNDER
ODuUMP MODE OR CHAIN MODE.

4.4

DIAGNOSTIC

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

THE
APT
OR SCRIPT

SYSTEM
MODE.

( INCLUDING

MANAGEMENT

ERROR

8Y
MODE

NOT

UTIL IZED

THIS PROGRAM,

LOGGING

AT THE END OF EACH PASS ON ALL
THE CUMULATIVE TOTAL NUMBER OF
RESTART COMMAND,

UNITS,
ERRORS

THE PROGRAM PRINTS QUT
SINCE THE LAST START OR

5.0 PROGRAM LOAD MEDIA

223
224

THIS PROGRAM
CAN
BE
LOADED
FROM
PAPER
TAPE
USING
THE
ABSOLUTE
LOADER OR FROM ACT, SLIDE, OR APT SYSTEMS, OR FROM
ANY MEDIA SUPPORTED BY XXDP.,
WHEN
USING
THE
PAPER
TAPE
ABSOLUTE
LOADER,
THE
PROGRAM
SHOULD
B8E
LOADED
FIRST,
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR,
WHEN USING XXDP., THE

DIAGNOSTIC

SUPERVISOR

SHOULD

LOADED FIRST,

FOLLOWED B

CNOMAQQ DMV11 MCTRL

DIAG o1

MACRO M1200

22-FEB 84

15:22

PAGE 6

SEQ 0006

PROGRAM DOCUMENT

THE DIAGNOSTIC PROGRAM,

CNDMAQO DMV1IL1 MCTYRL

DIAG o1

MACRO M1200

22 FEB 84

H1
15:22

PAGE

7
SEQ 0007

PROGRAM DOCUMENT

227
]

359

230
231
232
2
234
235
236
237
238
239
240

241
242

243
244
245
246
24?7
248
249
250
251
252

6.0 OPERATING INSTRUCTTONS
6.1 LOADING AND STARTING PROCEDURES
6.1.1 LOADING PROCEDURES

THIS PROGRAM
MAY
BE
LOADED
FROM
PAPER
TAPE
USING
THE
ABSOLUTE
LOADER.
[T MAY ALSO BE LOADED FROM ANY XXDPe LOAD
MEDIA. WHEN LOADED UNDER XXDP.+, THE DIAGNOSTIC SUPERVISOR
WILL BE LOADED AUTOMATICALLY.
6.1.2 STARTING PROCEDURLS
THE
PROGRAM
STARTS
AT
LOCATION
PROCEDURES TO START THE PROGRAM.
6.1.3 STEPS FOR QUICK

THE
DIAGNOSTIC
WITHOUT READING

AND

SIMPLE

200.

USE

STANDARD

DEC

EXECUTION

CAN
BE EXECUTED STANDALONE UNDER XXDP..
THE REMAINDER OF THIS DOCUMENT. AS FOLLOWS:

254
255
256

A) LOAD AND START DIAGNOSTIC USING RUN COMMAND
B) RECE.VE DIAGNOSTIC SUPERVISOR IDENTIFICATION AND PROMPT
C) ENTER STA<CR>

258

E) GET END OF PASS MESSAGES OR ERROR MESSAGES

257

ggg

(DRS

D) ANSWER HARDWARE AND SOF TWARE QUESTIONS

TO END EXECUTION,

ENTER CONTROL/C

261

262

6.2 INITIAL DIALOGUE

264

AFTER

265
267
268
269
270
271
272
273
274
275
276

THE

PROGRAM AND

IS STARTED,

DRS LOADED
DIAG. RUN TIME SERVICES
CNOMA A O
DMV 11 U CONTRL LOGIC DIAG
UNIT IS M8053 OR M8064
OR>

SUPERVISOR ARE

LOADED AND

PART

THE PROGRAM

THE OPERATOR THEN PROCEEDS BY TYPING ONE OR MORE OF THE
COMMANDS DESCRIBED IN THE FOLLOWING SECTION 6.3. (FOR MORE
DETAILED INFORMATION, REFER 70 THE DZAGNOSTIC SUPERVISOR

217

FUNCTIONAL

279
280
281

6.3 PROGRAM OPTIONS

282
283

THE

THE FOLLOWING IDENTIFICATION IS TYPED

6.3.1

SPECIFICATION).

START COMMAND

C>)

CNOMAQQ DMV11 MCTRy

DIAG o1

MACRO M1200

22-FEB-84

15:22

I1
PAGE

1
SEQ 0008

PROGRAM DOCUMENT

284
285
286
287
288
289
290
291
292
293
294
295
296
297
298

299

300
301
302
303
304
305
306
307
308
309
310
LY
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334

335
336

337
338
339
340

0000500000000 800800004000800000000000000000800040

08000048400804

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

8800400040000 408400408000000400404048000000400000

0000000080044040

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
7O 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.
BE EXECUTED IN NUMERICAL ORDER REGARDLESS OF
THE
SPECIFICATION,
THE
DEFAULT
IS
TO EXECUTE ALL
THIS AND ALL

SWITCHES,

THE

ANGLE BRACKETS

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

TESTS WILL
ORDER
OF
TESTS.
ON

ARE PUNCTUATION

TO BE

TYPED BY

THE

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

A DECIMAL

NUMBER

INDICATING

THE

DESIRED NUMBER

OF
PASSES,
A PASS IS DEFINED AS THE EXECUTION OF THE FULL
DIAGNOSTIC (ALL SELECTED TESTS) AGAINST ALL UNITS SUBMITTED.
THE DEFAULT IS NON-ENDING EXECUTION.
IN THIS CASE EXIT FROM
THE PROGRAM IS ACCOMPLISHED EITHER BY TYPING A CONTROL/C
OR
BY
OCCURANCE
OF AN ERROR WITH THE HALT ON ERROR FLAG BEING

SET.

END OF

THE EXI; IS A RETURN TO COMMAND MODE.
6.3.1.5,

SEE EXAMPLE

6.3.1.3 FLAGS SWITCH (/FLAGS:<FLAG LIST»>)
<FLAG-LIST>
IS
A
SEQUENCE OF ELEMENTS OF
<FLAG=1>, OR <FLAG=0>, SEPARATED BY COLONS,
ONE OF THE FOLLOWING VALUES:

THE FORM <FLAG>,
WHERE <FLAG> MAS

HOE

HALT

LOE

ENTERED WHEN AN ERROR IS ENCOUNTERED
LOOP ON ERROR, CAUSING THE DiAGNOSTIC

IER
IBE
IXE

INHIBIT ERROR REPORTING
INHIBIT BASIC ERROR REPORTS
INHIBIT EXTENDED ERROR REPORTS

PRI
PNT

B0E
UAM

ISR
1DV
Lor

ON ERROR,

CAUSING

COMMAND

MODE

TO LOOP
CONTINUQUSLY WITHIN THE SMALLEST DEFINED BLOCK
OF CODIMG (SEGMENT, SUBTEST, OR TEST) CONTAIN
ING THE ERROR

DIRECT ALL MESSAGES TO A LINE PRINTER
PRINT NuwtR 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

CNOMAA0 DMV11 MCTRL

CIAG 1

MACRO

M1200

22-FEB-84

15:22

PAGE

SEQ 0009

PROGRAM DOCUMENT

2431
232
333

344

345
346
348°
248

349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
308
369
370
371
372
373

374
375
376
377
378
379
380
381
382

THE

FLAGS NAMED OR EQUATED

ARE

CLEARED.

SWITCH
IS
NOT
END OF 6.3.1.5.

FLAG

NOT

ARE

SPECIFIED

SET,

THOSE

CLEARED.

GIVEN ALL FLAGS ARE CLEARED.

EQUATED
IF

THE

TO O
FLAGS

SEE EXAMPLE

6.3.1.4 END OF PASS SWITCH (/EOP:<INCR>)
<INCR>

IS A DECIMAL NUMBER

PASSES)
PRINTED.

IT
IS
DESIRED
THE DEFAULT IS

INDICATING HOW OF TEN (IN TERMS OF

THAT
AT THE

THE
END
END
OF

EXAMPLE AT END OF 6.3.1.5.

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
"4

HARDWARE PARAMETER DIALOGUE

UNITS?2”

WHICH

THE

OPERATOR

COMMENCES WITH
REPLIES

THE

QUESTION

DECIMAL

WITH

NUMBER
N FROM 1 TO 16. 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 BUILY.
EACH P-TABLE IS A CORE-RESIDEN
TABLE
T'
CONTAINING
ALL
THE
HARDWARE
INFORMATION
FOR ONE UNIT.,
THE OPERATOR
MUST

SUPPLY N (NUMBER OF UNITS) VALUES
FOR
EACH
QUESTION.
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,

AF fER

L FOR

THE

VERIFY

FOR

DECIMAL,

IN PARENTHESES AND

THE

HARDWARE

SOFTWARE

EYC.)

THAT

THE

QUESTIONS

TABLES,

ARE

FOR

THE

PARENTHESES.

FOLLOWING

TO BUILD

RADIX

YES/NO)

THE

WHICH DEFINE

BINARY,

DEFAULT

SOF TWARE

THE

DIAGNOSTIC WILL EXECUTE

FOR

VALUE

QUESTIONS

MODE

(QUICK

IN.

WHEN
THE QUESTION “# UNITS?"” IS ANSWERED, 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,

IS
TO
IN
TO

EXAMPLE
:

STA/TESTS:1:2 4:6:8

10/PASS:3/
IER:HOE
FLAGS
=1 : UAM: L:
OE

THIS

CAUSE

COMMAND

CONSISTING OF

ALL

UNITS.,

SAYING

THERE

<FLAG=1>.

COMMAND

PREVIOUSLY
THREE

WILL

TESTS

OTHER

SET,

LETTERS

ARE

THREE

PASSES

1,2,3,4,6,8,9,

THE

NO DIFFERENCE

NOTATION

THAN

NOTE

START

THAT

SCANNED.

AND

ON ALL

BETWEEN

<FLAG=0>
TO

TO BE

MADE.,

EXECUTED
SAYING

EACH PASS

AGAINST

<FLAG>

IS MEANINGFUL

CLEAR

COMMANDS

FLAG

ONLY

ONLY
THAT

THE

AND

ON
WAS

FIRST

1<l
CNDMAQO DMV1l

MCTRL DIAG o1

MACRO M1200

22 FEB

15:22

PAGE

SEQ 0010

PROGRAM DOCUMENT
298

399

400
401
402

403
404
405
406
407
408
409

6.3.2 RESTART

COMMAND

00440080000 000000000000008000800000000000000A88000400004000000

RES(TART)/TESTS: <TEST-LIST>/PASS: <PASS-CNT>/FLAGS:

<FLAG-LIST>/UNITS:<UNIT

LIST>»

$0800088000000000000004000000000000000000000000000000004000

6.3.2.1

TFSTS,

PASS,

AND FLAGS

a11

<TEST-LIST>,
COMMAND.

a1a

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

410
a12
413
a1s
a16
a17
418
419
420
a21
422

423

a24
425
426

427

428
429
a0
431
432
433
a3a
43s
a36
437
438
439
440
a41

442
a43
444
445
445
447
448

449
450
asy

€2

453
454

<UNIT-LIST>

RANGES OF

<PASS CNT>,

AND

SWITCHES

<FLAG-LIST>

ARE

THE

START

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

DECIMAL NUMBERS

(0-5,

10 ETC.)

THAT

SPECIFY

THE

UNITS
TO
BE
TESTED.
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
OROP
COMMAND.
SEE
THE DISCUSSION OF ADD AND DROP COMMANDS BELOW.
DeFAULT
éS 10 BEST ALL UNITS WHICH HAVE NOT BEEN DROPPED BY
A
DROP
OMMAND

6.3.2.3 EFFECT OF RESTART COMMAND
THE
RESTART
COMMAND DIFFERS FROM THE START COMMAND IN THAT
THE P-TALLES FROM THE PREVICJS
START
COMMAND
(THERE
MUST
HAVE
BEEN
ONE)
ARE USED, INSTEAD OF NEW ONES BEING BUILT,
THE UNITS SWITCH GIVES THE ABILITY TO
SELECT
A
SUBSET
OF
THESE .
THE
SOFTWARE DIALOGUE MAY OPTIONALLY BE REEXECUTED

(OPERATOR WILL BE ASKED). THE
COMMAND
CAN
BE
COMMAND
MODE
HAS BEEN REENTERED IN ANY OF THE

USED
AFTER
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

S4004000000000000000000000000000000008000000000000000000800

CONCTINUE )/PASS: <PASS CNT/FLAGS:<FLAG LIST»
0000040000000 00000000000000000080000000000008000000004800040400

6.3.3.1 PASS SWITCH (/PASS:<PASS CNT>)
«PASS

THE

CNT>

SAME

UNSATISFIED PASS

IF NONE REMAINS,

THE

START

CNT

FROM

DEFAULT

COMMAND,

THE

BUT

THE

START

DEFALLT

OR RESTART,

IS NON ENDING EXECUTION,

CNDMAAQO DMV11 MCTRL DIAG #1

MACRO M1200

22-FEB

15:22

PAGE

L1
7

SEQ 0011

PROGRAM DOCUMENT
455
456
457
458
459
460

<FLAG-LIST> IS SAME AS IN
FLAGS RETAIN THEIR CURRENT

461
462
463

6.3.3.3 EFFECT OF CONTINUE COMMAND

464
465
466
467
468
469
470
471
472

473
474
475
476
477

6.3.3.2 FLAG SWITCH (/FLAGS:<FLAG LIST>)

CONTINUE

MUST

MUST HAVE

BEEN

ENTERED

START

COMMAND,

BUT

UNSPECIFIED

VALUE.

A START
OUE

OR RESTART,

HALT

AND COMMAND MODE
ON

ERROR

CONTROL/C.
THE
EFFECT
OF
THE
COMMAND
IS
TO
GO TO THE
BEGINNING OF THE TEST THAT WAS BEING EXECUTED WHEN THE
HALT
OR
CONTROL/C
TOOK PLACE.
SOFTWARE DIALOGUE MAY OPTIONALLY
BE REEXECUTED.
HARDWARE PARAMETERS MAY NOT BE CHANGED.

6.3.4 PROCEED COMMAND

55824004503 040044240800088488004000008008404044048004400008000

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

478

479
480
481
482

483
484
485
486
487
488
489
490
491
492
493
494
495
497
498
499

500
501
502
503
504
505

507

508
509
510
511

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

START
VALUE.

COMMAND,

BUT

UNSPECIFIED

6.3.4.2 EFFECT OF PROCEED COMMAND
PROCEED
MUST FOLLOW A START, RESTART,
MODE MUST HAVC BEEN ENTERED VIA A HALT

THE

COMMAND

FOLLOWING THE ERROR CALL.
PARAMETERS MAY BE ALTERED.

BEGIN

OR CONTINUE.
COMMAND
ON ERROR.
THE EFFECT

EXECUTION

NEITHER

HARDWARE

THE LOCATION

NOR

SOF TWARE

6.3.5 ADD COMMAND
$6000040000000408000004000000000800000000404004000080000000

ADD/UNITS: <UNIT

LIST>

S08000000000400400000000000080000000000000000000000000000080

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

UNIT

UNLTS

MUST

SPECIFIED

ARE

HAVE

ADDED

TABLE

THE

TEST

MEMORY

SEQUENCE,

DUE

EACH

TO AN EARLIER

CNDMA
X0 DMV11 MCTRL

DIAG #1

M1
MACRO M1200

22-FEB

15:22

PAGE

SEGQ 0012

PROGRAM DOCUMENT

S1e2
513
514
515
S1é6
517
518
519
520
521
522
523

524
525
526
S27
528
529
530
531
532
533
534
535
536
537
538
539
540

541
542

543
544
545
546

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.

6.3.6 DROP COMMAND
C000A00400A00004R0AALARAAAEANALALA040000000004040000000004

DROCP)/UNITS: <UNIT-LIST>
580880880082 488880 84488004204 4540404848044888444448080048040040

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

MUST BE FOLLOWED BY

SWITCH MUST BE ENTERED.

A RESTART

OR A CONTINUE

THIS COMMAND

COMMAND.

6.3.7 PRINT COMMAND
SOUAEEE0AA2AE000R0R0L0R0002000400000000080000000040040400

PRI(NT)
BEAAAESAA0AAEEA0A000000000008000400400000000000000000000440

6.3.7.1 EFFECT OF PRINT COMMAND
THE

TOTAL NUMBER OF ERRORS FOR

START
OR
RESTART
COMMAND
STATISTICAL REPORTING) FLAG

EACH

UNIT

ARE
PRINTED.
IS CLEARED.

SINCE

THE

ISR

THE

LAST

(INHWIBIT

6.3.8 DISPLAY COMMAND
SOS0 002400440004 040800000000000000000080000000000000bbtttts

DISC(PLAY)/UNITS: <UNIT-LTGT>
S80850000000000000000808008000045000000800000800000000080042

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

566
567
568

IS AS IN THE RESTART COMMAND.

6.3.8.2 EFFECT OF DISPLAY

COMMAND

THE

ALL

UNITS

IN WHICt

THEY

OUT

THAT

HARDWARE

WERE

THE

TABLES

FORMAT

DROPPED BY

FOR

THE

OPERATOR

UNDER

TEST

ARE

WERE ENTERED.
“DROP°

COMMAND

PRINTED

ANY

UNITS

ARE

CNDMAAO DMV11 MCTRL DIAG o1

MACRO M1200

22-FEB-84

15:22

N1
PAGE

7-6

SEQ 0013

PROGRAM DOCUMENT

569
570
S71
572
573
574
575
576
577
578
S79
580

DESIGNATED.
6.3.9 FLAGS COMMAND
2884408000484 88008048080480040880000000080080440800000008

0808004048

FLA(GS)

88888480840 45848800080808000888808080400000800048040800008000

00048

6.3.9.1 EFFECT OF FLAGS COMMAND
THE

CURRENT

SETTINGS OF

ALL

FLAGS ARE

PRINTED.

6.3.10 ZFLAGS COMMAND
8808808008850 284280480800402848008000008008800404808800004040

00048040084

ZFLCAGS)

088884884804 08000048804808004880400880808080040600400040

00046040484

6.3.10.1 EFFECT OF ZFLAGS COMMAND
ALL FLAGS ARE CLEARED.

6.3.11
A
A

CONTROL

CHARACTERS

CONTROL C (C) ENTERED DURING
RETURN
TO
COMMAND MODE.

CONTROL

(Z)

THE EXECUTION OF

ENTERED DURING ONE

THE

A DIAGNOSTIC

THREE

OPERATOR

DIA! OGUES- 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 OIALOGUE.
A CONTROL O (0) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC
CAUSES
ALL
TELETYPE
OUTPUT
TO
BE
SURPRESSED
FOR
THE

REMAINDER OF THE DIAGNOSTIC OR
WHICH RESTORES NORMAL TELETYPE

6.3.12 HARDWARE
THE
THE

624
625

RESPONSE

TrAAT

WILL

DEVICE CSR ADDRESS

THIS IS
ON
THE

(OCTAL),

VALUE

THE ADDRESS
LSI-BUS,

(0)

TYPED,

TAKEN

COMMAND.
IS
THE

A CARRIAGE RETURN

AT WHICH THE CSR REGISTERS
THE
ALLOWABLE
RANGE
IS

VECTOR ADDRESS

START
MARK

1600207

AND THE DEFAULT VALUE

DEVICE

PARAMETERS

FOLLOWING 3 QUESTIONS WILL BE ASKED ON A
VALUE LOCATED TO THE LEFT OF THE QUESTION

DEFAULT

618
619
620
621
622
623

UNTIL
ANOTHER
OQUTPUT.

(0)

160020.

300

(SELO) RESIDE
160020 177760

CAUSES

CNDMAQO DMVI1 MCTRL

DIAG o1

MACRO M1200

22 FEB 84

15:22

PAGE

Be
7

7
5€Q 0014

PROGRAM DOCLMMENT

626

Pubd
628
629
630
631
o3
633
634
635
636
63~
638
639

THIS IS THE ADDRESS OF THE INPUT
CEVICE.
THE
ALLOWABE
RANGE
OEFAULT VALUE IS 300.

OEVICE PRIORITY LEVEL

INTERRUPT VECTOR
FOR
THIS
IS 000-674 (OCTAL), AND THE

(0) 4

THIS IS THE CPU PRIORITY AT WHICH THE INTERRUPT HANOLERS
OF
THIS
DEVICE
WILL BE EXECUTED.
THE Al LOWABLE RANGE IS O 7,
AND THE DEFAWLT VALUE IS 4.

6.3.13 SOF TWARE PARAMETERS

640
641
64.2
643

NO SOF TWARE PARAMETER QUESTIONS ARE
STATIC LOGIC TESTS.

644
645

6.3.14 EXTENDED DISCUSSION OF P-TABLE DIALOGUE

646
647

648
649
650
651
652
€53
654
655
656
657
658
659
660
661
662

663
664
665
666
667
668
669
670
671
672
673
674
675

676
677
678
£79
680
681
682

THE

FULL CAPABILITY OF

SOON AS

THE

QUESTION

PART

THE HARDWARE DIALOGUE

THE FOLLOWING DISCUSSION OF
AS

ASKED BY

WHAT

HAPPENS

“@ UNITS?”

THE

IS REVEALED B

INTERNALL
Y.
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

ALL
OF
THE
P-TABLES ARE FILLED.
IF THE
LESS THAN N EXPLICIT VALUES
IN
RESPONSE

THE

SLOTS

OPERATOR TYPES IN
TO
A
PARTICWAR

QUESTION, THESE VALUES ARE PLACED IN THE P-TABLES (ONE YALUE
GOING INTO THE PROPER SLOT OF EACH
P TABLE
BEGINNING
WITH
THE
THE

FIRST P-TABLE) UNTIL THE STRING OF VALUES IS EXMAUST
ED.
LAST VALUE IN THE STRING BECOMES THE NEW DEFAWLT 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
MAVE

RECEIVED
THE ROLE
THE

AN
THAT

SERIES

EXPLICIT VALUE IN ANY OF ITS SLOTS NOW ASSUMES
TABLE NUMBER ONE PLAYED IN THE FIRST TRIP.

QUESTIONS

REISSUED

QUESTION HAS RECETVED N EXPLICIT
IN
GIVING
A
STRING
VALUES MAY BE USED TO
NAMED VALUE.
A

STRING

EXAMPLE
), IF

SAMPLE

INCREMENT

RANGE

NOW

RANGE
OF

1),

TRANSLATES

LET

MAY

SEE

GIVEN

VALUES REPRESENT

THE

HOW

THE

LEAST

ONE

OPERATOR.

OF VALUES, COMMAS WITHOUT INTERVENING
INDICATE
A
REPETITION
OF
THE
LAST

VALUES

THE

UNTIL

VALUES FROM

VALUES

THE

ARE

COUWD

A RANGE

NUMERICAL

STRING

STRING 6,8,10

PURE

USE

THE

INCREMENT

THESE

10 FOR

6,7,8,9.10

ADDRESSES,
(AN

DATA,

THIS

(AN

SAMPLE

2).

CAPABILITIES

CNDMAQQ DMV1L MCTRL DIAG ~1

MACRO M1200

FEB

15:22

PAGE

Co
7

SEQ 0015

PROGRAM DOCUMENT

683
684
685
686
687
688
089
690
691
692
693
634
695
696
o097
698
699
700
701
702
703
704
705
706
70°
708
709

CONSTRUCT A SET OF P
AND

THAT

THERE

ARE

TABLES.

THREE

ASSUME

THAT WE HAVE

UNITS,

HARDWARE

PARAMETERS FOR EACH

TABLES.

LET

THE

DESIRED

THE DESIRED VALUE FOR

THE

THIRD PARAMETER BE

( THREE

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

NUMBER

75 FOR

ALL

THE
SECOND
PARAMETER
BE
(0.1,2....,15) EXCEPT FOR UNIT

VALUE

11.

LET

THE
THE

NUMBER 76 FOR
LAST 9 UNITS,

THE

FOLLOWING DIALOGUE

@ UNITS

(D)

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

THE

FIRST

WOULD

VALUFE

FOR

EQUAL
TO
THE
UNTT
NUMBER
12, WHICH SHOWD RECEIVE
THE

UNITS

AND

ACCOMPLISH

THE

NUMBER

FOR

THIS GOAL
:

?2 75
? 0-6
2?2 76
?
?
2?2

7-11,,13
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.

7.0

SLOT

712
713

THE SECOND TIME THRU THE SERIES, TABLES 7 THRU THE END
ARE
GOING TO BE AFFECTED (NOTE THAT THIS PIECE OF INFORMATION IS

711

714

715
716

717

718
719

720

721

722
723
725

726

727

THREE RECEIVES A CONSTANT

PRINTED OQUT FOR THE THE OPERATOR
THE
BEGINNING
OF EACH SERIES).

By A <CR>,
THRU

15,

IN ALL

IN THE FORM
QUESTION 1

SO SLOT ONE STAYS AT CONSTANT

SINCE

NO NEW EXPLICIT

VALUES

ARE

7S5

TABLES.

“UNIT
XX~
AT
IS RESPONDED TO

TYPED

TABLES

IN.

SLOT

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
;gLESSlS THRU 15. SLOT THREE GETS THE VALUE 77 IN TABLES
U

THE

15.

DIALOGUE

16 EXPLICIT

TERMINATED WHEN

THE

SOF TWARE

RECOGNIZES

TwO

THAT

VALUES HAVE BEEN GIVEN FOR AT LEAST ONE QUESTION

(NAMEL
Y QUESTION 2).

CNDMAA0 DMVIi MCTRL

DIAG o1

MACRO M1200

22 FEB 84

De
15:22

PAGE

SEQ 0016

PROGRAM DGCUMENT

729
~30
7.0

TEST

DESCRIPTIONS

;oaooo‘oooooooooooooo.‘ooooooo‘too.ooooooooooooo

TEST

<«DMV-11

oooooooootooAo‘oooooooooooooo‘

AVAILABILITY>

i+ EACH NORMALLY USED CSR

IS ACCESSED WITH A

“TST” OR

“TSTB"

INSTRUCTION AND

1* A BUS TIMEOUT OCCURS (INTERRUPT 8 VECTOR ADDR 4) A FLAG WILL BE SET SHOWING
i¢ WHICH CSR ADDR AND INSTRUCTION FAILED. “T1.MSW" REFLECTS “TST~ INSTRUCTIONS
3¢

AND

"T1 HSB"

REFLECTS

"“TSTB"

INSTRUCTIONS.

EXAMPLES:

HEJ

10
;e
L

IF “TSTB
@8BSEL1"
FAILS,
BIT @ 1 OF “T1.HSB” WILL BE
Ir "TET
&QSELA” FAILS, BIT & 4 OF ' T1 . HSW” WILL BE SET
(NOTE: ONLY EVEN BITS IN “T1.MSW” CAN BE SET).

THE FLAG WORDS ARE OUTPUT

IN BINARY AS

“EXTENDED ERROR

SET.

INFORMATION".

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

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

;ooocoaotoooooo.‘ooooooooo0.00.oooooooo.ooooo

TEST

<MASTER

oooooo‘ooaoaao‘oooooooooacooo.oco

CLEAR,

RUN MICRODIAGNOSTICS>

757

TIME FOR THE MICROOIAGNOSTICS TO BE PERFORMED.

i1¢

MASTER

CLEAR

IN 6502 PROGRAM

ISSUED

MEMORY,

WITH

INTERNAL

772

773
774
775
776
777
778
779
780
781
782
782

784

785

AND

DMV-11,

AND

THORQUGHLY

THE

PROGRAM

NEXT,

THEIR

ALLOWS

SUFFIC'ENT

THESE MICRODIAGNOSTIC

VERIFY

THE OPERATION OF

LOOPBACK,

)

767
768
769
770
771

THE

MICROPROCESSOR CHIP. THEN, THEY CHECK OUT THE DATA
RAM,
THE CSR'S,
AND
PERFORM
A
SIMPLE MESSAGE TEST USING

t¢ USYRT,

765

RESICE

THE <&z

THE 6502°'S ACCESS5 TO
THE 6522 CHIP AND THE

THE LSI-11 PROGRAM READS THE THE CSR'S (SELO SEL6)
AND CHECKS THzM FOR
EXPECTED INITIALIZED
STATES.
IF AN ERROR HAS OCCURRED IN THE 4ICRO

i DIAGNOSTICS THE NUMBER OF THE FAILING TEST WILL BE FOUND IN SELA,
;e (BIT 7) WILL NOT BE SET IN BSEL1.

ANO RUN

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

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

;“0“‘0‘0‘00‘000..000“O.“““..‘O.“.‘t...“o

TEST

.0‘.0000“‘0.“00‘0‘.‘00“‘000

<«CSR

ADDRESSING>

;e FIRST,

;¢

DATA

HALT

THE 6502 UP BY CLEARING ALL CSRS.

PATTERN

INTO

EACH

BSELO-17,

se COMPARE ALL REGS TO EXPECTED VALUES.

THEN,

AND

AFTER

WRITE A DIFFERENT WORD
EACH

WRITE,

READ

AND

HEJ

DATA

PATTERN

001,

002,

060,

004,

030,

010,

014,

020,

006,

040,

003

100,

200,

052,

300,

140,

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

.‘.‘...‘“...“..“‘.‘“.t.

3“00“‘0.00“‘.0.“‘.‘0‘000‘.0‘0"“““00.0."0

TEST 4

1 &

WRITE,

READ,

AND

i¢

COMPARE

THEN,

REPEAT

THIS

USTNG

EfCH

EACH

BYTE

THE

0‘0.0““..0“0‘.‘00‘.0‘0.0‘l

DATA PATTERN B
REMAINING CSR'S,

INTO

BSEL1

BSEL]
.

BSELO.

WHEN 8SEL
L

CNOMAA0 DMVI1 MCTRL

DIAG o1

MACRO M1200

FEB

15:22

PAGE

SEQ 0017

PROGRAM DOCUMENT

~86

‘8

1¢

IS BEING TESTED,

788

i¢

RUN

SET,

790
791

i e

°93
794
795

796

79?
798
799

800

801
802

803
804
805
806
807
808
809
810
811
812
8,3
814

815
816
817
818
819
820
821

822
823
824
825
826

827
828
829
830
831
832
833
834
835
836
8317
838
839

840
841
8472

WILL

NOT

THE PROGRAM ALWAYS SETS BIT

CLEARED,

AND

ALWAYS

CLEARS

7 IN THE DATA PATTERN SO THAT
BIT6

THAT

MCLR

WILL

NOT

004,

010,

020,

040,

100,

HE]

DATA

PATTERN

125,

252,

000,

377,

200,

376,

001,

375,

373,

367,

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

002,

357,

337,

277,

177,

000

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

1000400044040 840408000000000¢

TEST 5

00040004804 40404048000080000080060000002000800800000800008

PERFORM

i»

THEN,

INITIAL

ISSUE

MASTER

CLEAR.,

CLEAR

WRITE

AND READ

356

AND

INTO

CHECK

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

BSELO

AND

BSELO FOR

READ

AND

CHECK

IT,

000.

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

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

TEST 6

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

PERFORM

INITIAL

MASTER

i IT. THEN, ISSUE A RESET
s« CHECK BSELO FOR 000.

CLEAR.

WRITE

INSTRUCTION,

377

INTO BSELO

AND

STALL FOR COMPLETION,

READ

AND

CHECK

AND READ AND

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

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

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

i o

TEST

INVOKES

<CSR,

MAINTENANCE

3 e

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

MICROCODE

INTERACTION>

THIS

s¢
1+
i+
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 MRDY
DOES NOT GET SET, AN ERROR IS REPORTED.

NEXT,

ARE

THE

READ

THE

PROGRAM

AND

MAINTENANCE

LOADS

CHECKED

FOR

SEL4

REQUEST

WITH

EXPECTED

000010

MECHANISM

AND

BSELE

THROUGH WHICH

WITH

125.

THEN,

CONTENTS,

THE

ALL

LSI-11

CSR'S

i* BSEL2 IS THEN LOADED WITH A WRITE COMMAND, WHICH SHOUWLD CAUSE THE MICROCODE

TRANSFER

THE

is EXPECTED CONTENTS,
;e

THEN,

THE

TRANSFER

INTO

PROGRAM LOADS

i IS THEN LOADED

125

THE

252

WITH

INTO

252

BSELO.

INTO

READ

BSEL6.

ALL

BSELO

COMMAND,

ALL

CSR'S

AND

ARE

READS

THEN READ

AND

CHECKS

AND

CHECKED.

WHICH SHOUWLD CAUSE

ARE

READ

3..‘““‘“.““".“.“.“‘.““‘.“.“‘.“.““‘.

AND CHECKED FOR

ALL

CSR'S.

BSEL2

THE MICROCODE

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

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

TEST 8

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

THE

i
;¢

IS LOADED INTO BSEL6 AND A REQUEST IS MADE TO WRITE THE CONTENTS OF BSELe
INTO BSELO. THE PROGRAM THEN READS AND CMHECKS BSELO TO CONTAIN 125.

;¢

PROGRAM PUTS

NEXT,

THE

MICROCODE

RUN FLIP-FLOP

INTO

THE

CLEARED BY

MAINTENANCE

LOOP.

INTO RUN

125

CHARACTER

(BSEL1

BIT

TM).

i+ 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

CNDMAAO DMV11 MCTRL DIAG 01

Fo
MACRO M1200

22 FEB

15:22

PAGE

8 2

SEQ 0018

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
361
882
883
884
885
866
887
888
889
890
891
892
893
894
895
896
897
898
899

i MROY (BSELZ2 BIT 7) NOT SET,
:¢
;¢

AND BSELO STILL CLEARED.

THEN, THE PROGRAM SETS THE RUN FLIP-FLOP AGAIN BY LOADING A 1
AND CHECKS TOR MROY SET WITHIN S50 MICRO-SEC. AND BSELO = 125.

INTO

RUN,

1088480040080 284880000000¢08400800000880008000008080440400484048025040048484404000808800000

1000000008008 0040000000000000000000000000840000000000000000000400000000004000400

;e
i¢
;4
:¢
«

TEST 9

SCRATCHPAD>

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

THE

TEST

. Bsc:$§sING.
.

<«LOW RAM (00-OF)

DATA

PERFORMS

READING,

PATTERN

READ/WRITE

DATA

TESTING

RAM

LOCATIONS

OF,

AND COMPARING ALL BYTES OF DATA PATTERN B IN EACH

125,

252,

000,

377,

001,

002,

004,

010,

020,

040,

200,

376,

375,

373,

367,

357,

337,

277,

177,

000

100,

. 2088880044083 0848488404880080800204880423808088048280000804408000482000004480540002

1808880880088 40888042420028084000040848400080800080008800084840440400800008048040040

TEST

<DATA RAM MOVING

INVERSIONS

(LOC’'S 0018-01FF HEX)>

;& GENERAL DESCRIPTION:
s«
;¢

FIRST, THE 2K BYTE LOCATIONS IN RAM
THEN, THE FIRST LOCATION IS READ AND

THE LOW BIT POSITION,

BBEE$16N

e L
;¢
;&
«
;¢
;¢
;&

THE

RAM,

AND

THIS

ARE LOADED
CHECKED, A

WITH 0'S
SINGLE 1

IS READ AND CHECKED.

INCREMENTING

THE

ADDRESS

THIS

POINT

(SEE NOTE BELOW).
IS WRITTEN INTO

IS DONE FOR ALL
THE

RAM

THEN, THE NEXT B8IT 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 O0'S INSERTED INTO THE RAM INSTEAD OF 1 S,
THIS RESULTS IN THE ENTIRE RAM BEING WRITTEN TO ALL O'S.
THIS TEST CONSTITUTES A THOROUGH TEST OF THE RAM, IT IS CAPABLE OF

;¢ DETECTING THE FOLLOWING FAULTS

STUCK ADDRESS BITS,

UNI-

AND BI-DIRECT

:+ IONAL COUPLING BETWEEN ADDRESS BITS, STUCK MEMORY BITS, AND UNI- AND
;¢ BI-DIRECTIONAL COUPLING BETWEEN MEMORY BITS IN BOTH ROWS AND COLUMNS OF

;¢

MEMORY

MATRIX.

;¢ NOTE:
;¢
;¢

THIS TEST DOES NOT
ARE NOT WRITTEN. IT

CHECK LOCATIONS 0010-001F, SO
DOES TEST LOCATIONS 0000-000F

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

THE "TMPO" REGISTERS ARE USED HERE TO
VARIABLES USED THROUGHOUT THIS TEST,

THAT THE PRIMARY
(SCRATCHPAD RAM)

CSR'S
AND

AS WELL AS 0030-0800 (BASIC RAM),
CONTAIN THE VARIOUS CONSTANTS &
A LIST OF THEIR ASSIGNMENTS SEEMS

;¢ USEFUL SO HERE IT IS:
]

TMPO

POINTS

THE

TMP1

TMP2

TEST

PATTERN

TMPZ

TEST

DATA

FIRST

LOCATION

AFTER

THE

SELECT

THIS

TEST.

REGISTERS.

HEJ

CODE

UNUSED

HEJ

PATTERN

INDEX

UNUSED

THIS

TEST,

THE

CNDMAAO DMVl MCTRL DIAG &1

MACRO M1200

22-FEB 84

15:22

PAGE 8-3

SEQ 0019

PROGRAM DOCUMENT

900
901
902
903
904
905

906
907

908

909
910
911
91§
91
914

915
916
917
918
919
920
921
922
323
24
925
926
927

928
929
930
931
932

9313

934
935S
936
ggg

gig

941
942
943

;e
Iy
Te
;e
R
i

TTMMP4

TEST DATA PATTERN.
THE HIGH BYTE IS THE PATTERN BEING WRITTEN
ON ANY GIVEN PASS AND THE LOW BYTE IS THE PATTER
N THAT WAS
WRITTEN BY THE PREVIOUS PASS THROUGH THE RAM,

TMPS

DATA READ FROM

THE

RAM,

ONLY

THE

LOW BYTE

IS USED.

L
1

TMP6

i
[y

TMPS
TMP9

---

TMPA

RAM ADDRESS BEING

TMP8

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

TMPC

DATA FLAG.
IDENTIFIED
PASS,

TTMMPD

OIRECTION SWITCH.

TMPE

LAST

TO BE

TMPF

ERROR FLAGS.
G6IT 1 SET « THE LAST DETECTED ERROR WAS THE READ
OF THE PREVIOUS DATA BEFORE WRITING THE NEW DATA,
1IF BIT2 IS

HE
i
g
[y
]
i e
ie
i
I
HL
i 8

ie
Y
N

se
18

i e

;e
Iy
1 &
18
ie

TMP7

SET,

TESTED.

BIT O OF THIS WORD IS THE VALUE TQ WHICH THE BIT
IN TMPB IS BEING SET ON EACH WRITE IN THE CURRENT

VALID ADDRESS

THE READ

AFTER

FORWARD

NON ZERO

TESTED.

WRITE

FAILED.

(I.E.

1IF

THE

EITHER

BACKWARD

END OF

RAM)

SET

WHEN

ERROR IS DETECTED, THE SUPERVISOR IS NOT CALL'D AND
THEREFOR
IT'S ERROR COUNTER WILL NOT REFLECT 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.)

§00040000000000440000000000000400000880000000000400000

0004000000000000000000b40

§8000080044400000000000000040000040000000000000000000000
0000000000080000048000008800
i e
TEST 11 <VIA REGISTER ADRESSING>

FEJ

VIA

=»

"6522

VERSATILE

INTERFACE

ADAPTER"

i¢
;¢
;e

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

i»

THEN,

(DDRA,DDRB)

944

;# SET THE PORT PINS FOR QUTPUT MODE.

946

;¢ LOCATION,

956

TO EXPECTED
;¢ CONTENTS. NOTE TMAT SOME VIA REGS ARE ALTERE
D By THE LOADING OF OTHERS,
s« AND THE PROGRAM TAKES THIS INTO ACCOUNT, IN
YHE SETTING OF EXPECTED REG
i* VALUES. THE DATA PATTERN IS CHOSEN TO AVOID ACTIVA
TING THE VIA CHIP (SUCH
i+ AS GENERATING QUTPUTS ON CAl, CA2, CB1, CB2,
OR CAUSING 6502
3+ INTERRUPT REQUESTS).
i+
DOATA PATTERN C (WITH VIA REGS AND THEIR DATA
SHOWN IN OCTAL) :
Y
REGISTER =
00
01
02
03
06
07
12
13
14
15
16
| ¢
;4
OATA = 100, 101, 377, 377, 106, 107, 112, 040, 042,
000, 200, 117

945

947
948
949
950
951
952
953
954
955

DIFFERENT

BYTE

DATA PATTERN C

WRITTEN

INTO EACH

VIA

"EXCEPT THE TIMER REGS 4,5,10,11 OCT) AND AFTER EACM IS
WRITTEN,
i* ALL VIA REGS (EXCEPT 4,5,10,11) ARE READ AND
COMPARED

NEXT,

000

LOADED

INTO

DDRA,

AND DDRB

IS READ

AND

COMPARED

377.

THEN,

CNDMAR0 DMV11

MCTRL

DIAG o1

MACRO M1200

22-FEB 84

He2

15:22

PAGE 8-4

SEQ 0020

PROGRAM DOCUMENT

;¢

THE

953

;¢

READ

959
960

;“‘A“tt.‘.t““““tfi‘“0"t“"t“‘t“.““‘.“‘tt‘t“t‘t‘ttt‘t0““00‘0“0

962

1088824888388 8000040084808080280004080000888080884800 0484080880044 00088400004480400

93
964
965

ia
‘e
;¢

FIRST,

967

;¢

READ/WRITE BITS 0-7 OF

969
970

;¢
1.

%61

966
968

971
972
973
974

377

IS LOADED BACK

AND

TEST

DDRB
A

READING,

COMPARED

INTO DDRA,

AND DDRB

<VIA'S DDRB DATA READ/WRITE>

"DATA DIRECTION REGISTER B"

MASTER
AND

CLEAR

COMPARING

DATA PATTERN B

IS LOADED WITH 000

125,
200,

PERFORMED.

THEN

EACH

252,
376,

BYTE

000,
375,

DATA

377,
373,

PATTERN

001,
367,

002,
357,

004,
337,

040,
000

100,

;““0t“0“0‘0“0‘0“““““““‘tt‘t‘t‘.‘t“‘.t.“‘.‘t“““ttt.t‘t‘o“tt“

;e
;s FIRST, A MASTER CLEAR IS PERFORMED. THEN :
;¢ READ/WRITE BITS O-7 OF VIA DATA DIRECTION REGISTER A ARE
;& READING, AND COMPARING EACH BYTE OF DATA PATTERN B.

983

ggg

020,
177,

WRITING,

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

8
979
980
981

984
985
986
987

TESTED 8Y

010.
277,

;s
30

982

VIA DATA DIRECTION REGISTER B ARE

g;s
6
3;7

AND DDRA

377.

;¢

TEST

13 <VIA'S DDRA DATA READ/WRITE>

ODRA

“DATA DIRECTION REGISTER

DATA PATTERN B

TESTED BY

WRITING,

125,

252,

000,

377,

001,

002,

004,

010,

020,

040,

200,

376,

375,

373,

367,

357,

337,

277,

177,

000

100,

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

8008044080044 04804888380880058000040084083488408080880802204800454400000040000000R

TEST

<VIA'S ORB DATA READ/WRITE>

HLJ

gg?

ORB =+ “QUTPUT REGISTER PORT 8"

992
993
994
995
996

;¢
;¢
;&
;»
;¢

ggg

;“0“0“““‘0““.‘..‘0‘00“0.0“0““““0.“““‘t.0“00““.““0“0““‘

997

1000
1001
1002
1003

1004

]

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.
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004, 010, 020, 040,

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

100,

;.““‘00‘“0“t0““.“““0““.0...“““.“.A.“‘.““0“““0“‘.“‘0“‘0
;.
TEST 15 <VIA'S T1 DATA READ/WRITE>
i

T1 =» ‘TIMER &1"

1005
1006
1007

;8
;¢
;¢

1009
1010
1011
1012
1013

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

THIS TEST WRITES, READS, AND CHECKS THE T1 LATCHES AND COUNTER REGISTERS
WITH DATA PATTERNS IN EACH OF 3 SUBTESTS.

CNOMAQO DMV1l MCTRL DIAG o1

MACRO M1200

22 FEB 84

15:22

Ie2

PAGE 85
LtSEQ 0021

PROGRAM DOCUMENT

1014

1015
1016

;¢ A,
i* B.

181;

101

1019
1020
1855
1
1023
lgeg
1 2
1026
1027

i*
i#
i#
HE]
i#
i
;‘

%ggg

1833

1034
{ggs
6

1037
1038
1039

1040

1041
1042

AND

“T1"

(JUST IN CASE). ACR6 & ACR7 ARE
INTERRUPT ENABLE FLAG IS CLEARED.

IS LOADED WITH THE CURRENT BfTE OF DATA PATTERN B.
IS READ AND COMPARED TO THE BYTE JUST WRITTEN.
IS READ AND CHECKED TO BE DIFFERENT THAN THE TEST BrTE.

F.
G.

TIL-L(ADR 06)
T1L-LCADR 06)

IS LOADED WITH THE COMPLEMENT OF THE CURRENT DATA BYTE.
IS READ AND COMPARED TO THE BYTE JUST WRITTEN.

i« H.
;e

T1L-L(ADR 06)
T1L-H(ADR 05)

IS RE-LOADED WITH O TO MAKE
IS LOADED WITH THE ORIGINAL

T1C-H(ADR 05)

IS READ AND CHECKED

i L.

TIL-H(ADR 07)
T1L-HCADR 07)

IS LOADED WITH THE COMPLEMENT OF
IS READ AND COMPARED TO THE BYTE

s*¢ M.

STEPS C-L ARE REPEATED USING EACH BYTE OF DATA PATTERN B.

i* J.
e
i¢ K.
‘s

T1C-H DECREMENT FAST.
TEST DATA PATTERN BYTE.

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

THAN THE

TEST BYTE.

THE CURRENT DATA BYTE.
JUST LOADED.

;4 SECOND SUBTEST:
;e

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

i
;#

IS LOADED WITH 000 TO CLEAR IT.
IS LOADED WITH A BYTE OF DATA PATTERN 8.

A,
B.

TI1L-H(ADR 07)
TI1L-LCADR 06)

1043
1044
igzg

i C. T1L-LCADR 06) IS READ AND COMPARED TO THE DATA JUST WRITTEN.
i« D. T1L-HCADR 07) IS READ AND COMPARED TO 000.
;s E. STEPS B8-D ARE REPEATED USING EACH BYTE OF DATA PATTERN B.

1047
1048

HLJ
;#+

1049
1051

1052

SET

T1L-LCADR 04)
TIL-LCADR 06)
T1C-L(ADR 04)

]

TO ZERO (MODE 00),

C.
D.
E.

i I.

183?

1
1032

A MASTER CLEAR IS PERFORMED.
ALL LATCHES ARE 1_OADED TO ZEROES

THIRD SUBTEST:

;¢ A.

;¢ B.

TIL-LC(ADR 04)

TIL-H(ADR 07)

CHECKS FOR CROSS

TALK

FROM T1L-H TO T1L L

AND ADDRESSING ERRORS

IS LOAED WITH 000 TO CLEAR

IS LOADED WITH A BYTE

OF DATA PATTERN B.

1053
1054
{832

;¢ C. T1L H(ADR 07) IS READ AND COMPARED TO THE DATA JUST WRITTEN.
s« D. TIL-LC(ADR 06) IS READ AND COMPARED TO 000.
i# E. STEPS B-D ARE REPEATED USING EACH BYTE OF DATA PATTERN B.

1057
1058
1829
1060
1061
1062

i«
DATA PATTERN B = 125, 252, 000, 377, 001, 002, 004, 010, 020,
040, 100,
s
200, 376, 375, 373, 367, 357, 337, 277, 177, 000
3“0000“000“‘..‘t‘0““‘0“000““.‘0““0“‘0‘000‘t0““‘0“‘0‘0“‘0““‘00

1063

HEJ

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

TEST 16 <VIA'S SR DATA READ/WRITE>

SR == “SHIFT REGISTER"

1064

1067
1068

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.

1065

1069
1070

:*
i+

AND COMPARING EACH BYTE
DATA PATTERN B = 125,

OF DATA PATTERN B.
252, 000, 377, 001,

002,

004,

010,

020,

040,

100,

CNDMAQO DMV11 MCTRL DIAG o1

MACRO M1200

22-FEB-84

15:22

PAGE 8 6

SEQ 0022

PROGRAM DOCUMENT

1071

1072

1073
1074
1075
1076
1077
1078
1079

1080
1081
1082
1083
1084

1085

1086
1087

200,

376,

375,

373,

367,

357,

337,

277,

177,

000

(4000000004040 00000000004400000000048000000000000000484000800480800040040804084044

10000008 ASRLA000A0RAKAA0L0RAA0S400ARRCARAA0ALCSA00AA000RR000444040040004048

TEST

ACR

Y
R

17 «VIA'S ACR DATA READ/WRITE>

"AUXILIARY CONTROL REGISTER"

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

ODATA PATTERN B

125,
200,

252,
376,

000,
375,

377,
373,

001,
367,

002,
357,

004,
337,

READING,
010,
277,

020,
177,

040,
000

100,

(0888000000000 0000008048000R0008000080000000480800045404000040400008044000400004004428

1088

(0004000000080 004000 0000000004080 000040404800040080000484000000040004080000402

1089

1091
1092
1093
1094
1095
1096

i *
PCR == “PERIPHERAL CONTROL REGISTER"”
R
:» FIRST, A MASTER CLEAR IS PERFORMED. THEN :
;& READ/WRITE BITS 0-7 OF THE PCR REGISTER ARE TESTED BY WRITING, READING,
:4 AND COMPARING EACH BYTE OF A SUBSET OF DATA PATTERN B.
Y
DATA PATTERN B (SUBSET) =
125, 252, 000, 377, 001, 002, 004, 010, 020,

1090

1097
1098
1099

1100
1101
llgg

TEST

<VIA'S PCR DATA READ/WRITE>

i
040, 100, 200.
;008004040000 0008000000004008000080080484000084008008400408004000800044000000404020

11
ilgg
1
1106

(0808840000080 00000000 0004000080000 04004000000800000404008000000000000804000040
i
TEST 19 <«VIA‘'S IER DATA READ/WRITE>
L
i &
IER == “INTERRUPT ENABLE REGISTER"
HE
;¢ BITS 0-6 OF THE IER CAN BE SET OR CLEARED ON A WRITE, UNDER CONTROL OF THE

1108
iiog

:» WRITTEN INTO IER, AND THE REGISTER
:* ING BYTE OF DATA PATTERN E.

1107

;& SET/CLEAR CONTROL BIT 7.,

%iig

i s

1111

TO TEST THIS , EACH BYTE OF DATA PATTERN D IS
IS READ AND COMPARED

THE CORRESPOND
-

DATA PATTERN D

200,
002,

004,

201,

202,
010,

020,

204,

210,

220,

240,

300,

200,

000,

001,

DATA PATTERN E

000,
174,

001,
170,

003,
160,

007,
140,

017,
100,

037,
000,

077,
000,

177,
125,

117,
000,

177,
052,

176,
000

040,

100,

000,

325,

125,

252,

052

]

1114
i{ig

;e
i s
HEJ

1117
1118
1119
1120

;006840008000 0080040080008808000000800800000800000080008080040008008000000048000s
;““““‘“.““‘.““.““.‘“““‘.‘.‘““‘““‘.““““““““0““0““

iigé

1123
112;
112
1126

i e
ORB == "QUTPUT REGISTER PORT B’
i
OORB == "DATA DIRECTION REGISTER 8"
i s
;¢ FIRST, A MASTER CLEAR IS PERFORMED., NEXT, 377 IS LOADED INTO DORB TO SET
;4 ALL B PORT PINS FOR OUTPUT MODE. THEN, A 000 BYTE IS WRITTEN INTO ORB AND

1127

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

<2
CNOMA
0 DMVl

MCIRL

DIAG @1

MACRO M1200

FEB

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

;¢
;4

THE REGISTER IS READ
PERFORMED AND ORB IS

BACK
READ

AND
AND

CHECKED FOR
CHECKED FOR

000.
377.

THEN,

MASTER

CLEAR

1808440080480 42404082800 0048000000008 08000888000042808408408048400844¢84400408444

YTy

i e
*

H L
H .

<VIA'S DDRB MASTER

DDRB

“DATA DIRECTION REGISTER B"

CLEAR

TEST 21

YV VY Y

VY YY VY

TEST»>

L
L]
HEJ

377 BYTE

zgg 377.

IS WRITTEN

THEN,

INTO DDRB AND

A MASTER CLEAR

THE

IS READ BACK

IS PERFORMED AND DDRB

AND CHECKED

IS READ AND CHECKED FOR

R
HE
L

NOTE:

THIS TESTING IS ALSO DONE IN TEST 23.
IT IS INCLUDED HERE ONLY
PROVIDE TIGHTER LOOPING ON JUST THE DDRB MASTER CLEAR CHECKING.

] 0880480884444 88808084880800 4800008088080 88488000040088882800488408404048080080404

1145

1146

1828040484822 48200220028040 0458080080508 8R40 0080008844888 2840408808800004000040000

TEST 22

<VIA'S DDRA MASTER CLEAR

TEST»>

DDRA

“DATA DIRECTION REGISTER A"

[ 2KJ

;¢ A 377 BYTE IS WRITTEN INTO DDORA AND THE REGISTER IS READ BACK AND CHECKED
;¢

FOR

377.

THEN,

A MASTER

CLEAR

PERFORMED

AND

DDRA

READ

AND

CHECKED

FOR

;¢ 000.
1808888880840 800840802880008008000088028000808040800048800404822480400888004005442

1688284888888 8804484880082884858448500088880800400843828008088085868048480840008004042
LK3K 2

TEST

<«VIA'S

MASTER

A 123 BYTE IS WRITTEN INTO SR
Fch1§36ETHEN. A MASTER CLEAR

:¢

HANGE

CLEAR

TEST»>

"SHIFT REGISTER"

;¢
T

AND THE REGISTER
IS PERFORMED AND

IS
SR

READ BACK AND CHECKED
IS READ AND CHECKED FOR

1088084888088 88840008484004040888044888804804000480840440000804888084000880403000804040s

TEST

ACR

<VIA'S ACR MASTER
"AUXILIARY

CONTROL

CLEAR

TEST»

2R N J

8808848880448 884080808484404884084026080883884488884880484408888854048805008844008024024

;¢

252 BYTE

WRITTEN

INTO

ACR

AND

THE

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.

1604604804080 454054488042380088008444880048300388480308000008080005048840000000000000000

1888404048080 0888844848848088080828004880800880080002088000000000000440040000000
s>

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

1147

TEST
PCR

25
==

<VIA'S PCR MASTER CLEAR
"PERIPHERAL

COMNTROL

TEST>

L 2
CNDMAA0O DMVl

MCTRL

D1AG @1

MACRO M1200

22-FEB 84

15:22

PAGE

8-8

PROGRAM DOCUMENT

1185
1182

;¢ A 377 BYTE IS WRITTEN INTO PCR AND THE REGISTER IS READ BACK AND CHECKED
i e ggg 377. THEN, A MASTER CLEAR IS PERFORMED AND PCR IS READ AND CHECKED FOR

1188

1068884840880 0884800080008488088048848804888088880 8044408400480 4088440444004000020

1187

Hig

1189
1190
1191

1808848044888 808888848800488048882 0480040808804 4880080404004408008008800004084088440244

119

119§

1194

TEST 26 <VIA'S IER MASTER CLEAR TEST>

IER

1195

1198

"INTERRUPT ENABLE REGISTER"

1196
1137

;o A 377 BYTE IS WRITTEN INTO IER AND THE REGISTER IS READ BACK AND CHECKED
) Sgg 377. THEN, A MASTER CLEAR IS PERFORMED AND IER IS READ AND CHECKED FOR

1199

1888444882888 80248008400080000080080084084802000840004480840880854400400000040040

1200

SEQ 0024

CNDMAAO DMV11l MCTRL DIAG @1

Me
MACRO M1200

22-FEB 84

15:22

PAGE

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,

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

WHICH

THE PC

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

MASTER CLEAR FAILURE

THE CONTENTS OF

ALL BYTE

SELECT REG'S

BSELO
BSEL1
BSEL2
BSEL3
000
000
000
000
BSEL4
BSELS
BSEL6
BSEL?
000
000
121
000
BSEL10
BSEL11
B8SEL12
BSEL13
000
000
000
000
BSEL14
BSEL1S
BSEL16
BSEL17
000
000
000
000
FOR

OTHER

REQUIRE

ERRORS,

THE

ADDITIONAL

EXTENDED

ERROR

REPORT

DATA

TO BE

MAY

REPORTED.

ARE:

MOFE

INFORMATION HAD BEEN

IXE FLAG PRIOR TO RUNNING THE TEST,
HAVE BEEN REPORTED IN THE FOLLOWING

EXTENSIVE,

AND

INHIBITED USING

THE
ABOVE
ERROR
SHORTENED FORM :

CLEAR FAILURE

THE

WOULD

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

MASTER

021122

CNDMAAO DMV1l MCTRL DIAG o1
LISTING & ASSEMBLY
1245
1246
1247
1248
1249

1250
1256
1257
1258
1259 002000

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

MACRO M1200

FEB

15:22

N
PAGE

SEQ 0026

CONTRCL

.SBTTL LISTING & ASSEMBLY CONTROL
000000

HELP =0

CONTROL

;

HELP=0

i
002000

NO LIST

HELP

INFORMATION

LIST

.=2000

.MCALL

SvC

SLSTIN= 1
$LSTTAG= 1
SVCINS= 1

SVCTST=
SvCsuB=
SVvCGBL=
SVCTAG=

:
H
i

;

SVC
:

BGNMOD
000001
000001
000001
000001
000001
000001
000001

HELP=1

LISTING

SUPERVISOR MACROS

LU1MOD

:
i
i
s

1
1
1
1

INITIALIZE

LIST INSTRUCTIONS, SHIFTED RIGMT
LIST TEST TAGS, SHIFTED RIGHT
LIST SUBTEST TAGS, SHIFTED RIGHT
LIST GLOBAL TAGS, SHIFTED RIGHT

LIST OTHER TAGS,

SHIFTED RIGHT

CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YQU wWISH
TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS.
CMHANGE THE
SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS.
YOU MAY

CHANGE

THE

SYMBOLS AT ANY POINT

POINTER BGNAU,BGNDU,ERRTBL

IN YOUR PROGRAM.

CNDMA QO DMV11 MCTRL DIAG o1}

MACRO M1200

22-FEB 84

15:22

B3
PAGE

SEG 0027

PROGRAM HEADER

1287
283
1289
1290
1291
1292
1293
|
1295
1296 002000
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

.SBTTL PROGRAM MEADER
|

1 THE PROGRAM HEADER MACRO CHARACTERIZES THIS DIAGNOSTIC.

THE

1DISPOSITION OF

IN SEC.,

tHEADER MACRO'S ARGUMENTS ARE FILE NAME, RELEASE LEVEL, PATCM
THE MOST RECENT PATCH,

MAXIMUM TEST

1AND THE TYPE OF DIAGNOSTIC (O0-SEQUENTIAL,
1tARGUMENTS ARE IN RESPECTIVE ORDER.

TIME

EXERCISER).

THESE

MEADER CNDMA,A,0,110.,0

103

LSNAME
; ;

116

115
101

101
060

LSREV::
LSOEPO:
:
LSUNIT::

000156

040122

LsTImML::
LSHPCP:
;

L$SPCP::
002216
000000

040400

000000
000000

002124
000000
000000

000000
003
003

LIMPTP:
;
LSSPTIP:
LSLADP:

L$STA::
L$CO::
LSDTYP::

LS$APT::
L$DTP::

L$PRIO:
:
LSENVE::
LSEXP]::
LSMREV:

LSEF 3

.ASCII /C/
LASCII /N/
LASCII 707
JASCII /M/
LASCII 7R/
.BYTE
.BYTE
.BYTE

LASCII

/A/

LASCII

70/

. WORD

.WORD

110.

. WORD

L $HARD

.WORD

. WORD

L$Hu

.WORD

WORD

LSLAST

.WORD

. WORD

.WORD

WORD

0
LSDISPATCH

. WORD

.WORD

.BYTE

CSREVISION
CSEDITY

CNDMAAO DMVI1 MCTRL

DIAG ot

MACRO M1200

22 FEB 84

15:22

C3
PAGE

SEGQ 0028

1297
1303

LSREPP;
;

000000

LS$EXPY:

000000

L$EXPS:
;

000000

LSAUT:
:

020400

LSOUT::

020374

LSLUN::

000000

LSDESP:
;

003542

LSLOAD:
:

104035

LSETP::

002236

LSICP::

017622

LS$CCP::

020356

LSACP::

020232

LSPRT::

017614

LSTEST::

000000

L$DLY::

000000

LSHIME
:

000000

.EVEN

003522

. WORD
. WORD

LSDEVP:
;

. WORD
.WORD

$OVTYP

L$SPC::

000000

. WORD
. WORD

000000
000000

. WORD

002052
002054
002056
002056
002060
002060
002062
002062
002064
<064
002066
002066
002070
002070
002072
002072
002074
002074
002076
002076
002100
002100
002102
002102
002104
002104
002106
002106
002110
002110
002112
002112
002114
002114
002116
002116
002120
002120

PROGRAM HEADER

.WORD

L$AY

.WORD

L$0V

.WORD

L$0ESC

EMT

ESLOAD

.WORD

LSERRTBL

.WORD

LSINITY

. WORD

LSCLEAN

.WORD

L$AUTO

.WORD

LSPROT

.WORD
.WORD
.WORD

CNDMAA0 DMVl MCTIRL
DISPATCH

DIAG o1

D3
22 FEB

15:22

PAGEF

SEQ 0029

TABLF

1205
13006
1307
1308
1309
1310
1311
1312 002122
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

1313

MACRO M1200

002212

.SBTTL DISPATCH TABLE

3/////////////////////’/////////////////////////

THE

DISPATCH

1/ IT IS USED BY

TABLE

CONTAINS

THE

STARTING

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

ADDRESS

EACH

THE SUPERVISOR TO DISPATCH TO EACH TEST.

TEST.

VISLLILIIIILI 7008007700770 770772777072777277777727200777

72707077727777077777777/777777

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
030646
030776
031134
036366

DISPATCH

28,

. WORD

LS$DISPATCH:
:

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

.WORC

. WORD
. WORD
. WORD
.WORD
. WOROD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
. WORD
.WORD
. WORD
.WORD
. WORD
.WORD

.WORD

28
T1

T2
T3
T4
TS
Te
17
T8
19

T10
T11
T12
T13
T14
T15
T16
T17
T18
T19

120
121
T22
T23
124
125

126
127
128

CNDMAAO OMV11 MCTRL DIAG o1
DEFALLTY HAKDWARE P

MACRO M1200

22 FEB

15:22

F3
PAGE

SEQ 0030

TABLE

1321
1322
1323
1324
1335
1326

.SBTTL DEFAULT HARDWARE P

TABLE

VILLLL
007070
LL
007707
IL
7 70 7707077
II
770070
LL
7770770
IL
0700700
LL
07,0000LI
00070777

132~
1328

THE

DEFAULT

THE

TEST

15 IDENTICAL

HARDWARE P-TABLE
DEVICE PARAMETERS,

CONTAINS DEFAULT
THE STRUCTURE OF

TO THE STRUCTURE OF

VALUES OF
THIS TABLE

THE RUN-TIME P

TABLE.

BILLLLLLII
200007
II
777077
LV
7 IL
7 770707
ET
070007
IT
0 7720707
II
7077700
LF
0070777
LT
7707

1329 002214

1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347

002214
002216
00c216

BGNHW

000007

L$HW:
;

.WORD

OFPTBL:
;

002216
002220
002222
002224
002226
002230
002232

1348 002234
002234

DFPTBL

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

160020
300
4000
000
000
0
000111

tOMV11 CSR UNIBUS ADDRESS
;OMV11 INTERRUPT VECTOR
;OMV11l INTERRUPT PRIORITY LEVEL
tSWITCH REG. #1 (BOOT ADDRESS)
t1SWITCH REG. @2 (DDCMP ADDRESS)
1H3254EH325S USED
sMISC. CONTROLS:

:
H
H
:

POWER-UP MODE O MASK = 100
0 = NOT JUMPERED FOR MODE O POWER LP

;

BAUD RATE MASK

H
H

JUMPERED FOR MODE O POWER-UP
BOTH WS & W6 REMOVED
7
11

2
»

19,2 K
S6 K

<=2+ DEFAULT

SETTING

77
<s=x

DEFAULT

SETTING

ENDMHW

L10000:

= 4

L10000 L$Huw/2

F3
CNDMAQO OMV11l MCTRL

SOF TWARE P

DIAG a1t

RACRO 1200

22 FEB 84

15:22

PAGE

SEQ 0031

TABLE

1350

.SBTTL SOFTWARE P TABLE

1352
1353
1354
1355

3/ /1117177777777 7777277 7770077227777 77777777777777777777/77777777/7777777777
;7 THE SOFTWARE P TABLE CONTAINS THE VALUES OF THE PROGRAM
:/ PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR.
VR R AR R R AR R
R R N
N
R N N NN
A N
N
NNy

1351

1356

1357 002234
002234
002236

002236

1358 002236

002236

000000

BGNSW

SFPTBL
L$SW::

ENDSW

SFPTBL::

L10001:

.WORD

L10001 L$SW/2

CNDMAAO DMv1l MCTRL DIAG o1
GLOBAL

EQUATES

MACRO M1200

22 FEB

G3
15:22

PAGE

SEQ 0032

SECTION

1360
1361
1362
1363
1364
1365
1366
136~
1368 002236

.SBTTL GLOBAL EQUATES S_CTION
;///////////////////////////////////////////////////////

THE

GLOBAL

EQUATES

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

SECTION CONTAINS PROGRAM EQUATES

ARE USED IN MORE THAN ONE TEST,
$IILVLLLI 7100000008087 700777070777700707077070707777770777

THAT

7777777777727777777777

EQUALS

: BIT DIFINITIONS
100000
040000
020000
010000
004000
002000

8IT15==
8IT14==
BIT13==
BIT12==
8IT11==
BIT10==
B8IT09=»
BIT08==
BITO7==
8IT06==
BITOS==

100000
40000
20000
10000
4000
2000
1000
400
200
100
40

001000
000400
000209
000100
000040
000020
000010
000004
000002
000001

BITO03== 10
B8ITO2=+ 4
8IT01=+ 2
8ITO0== 1§

001000
000400
000200
000100
000040
000020
000010
000004
000002
000001

BIT9==
8IT8==
BIT7==
BIT6=»
B8ITS==
BIT4==
BIT3==
BIT2==
8ITl-=
8ITO0==

B8IT04==

BIT09
BITO08
BITO?
BITO6
BITOS
BITO4
BITO3
BITO2
BITO1
BITOO

i EVENT FLAG DEFINITIONS
.

EF32:EF17 RESERVED FOR

SUPERVISOR

TO PROGRAM COMMUNICATION

000040
000037
000036
000035
000034

]

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

000340
00C 300
000240
000200

PRIORITY

]

PRIO7==

PRIO6==
PRIOS==
PRIO4A==

340
300
240
200

LEVEL

32.
31.
30.
29.
28.
DEFINITIONS

BIT POSITION IN SECOND STATUS WORD
(100000) START COMMAND WAS ISSUED
(040000) RESTART COMMAND WAS ISSUED
(020000) CONTINUE COMMAND WAS ISSUED
(010000) A NEW PASS HAS BEEN STARTED
(004000) A POWER-FAIL/POWER-UP OCCURRED

H3
CNDMAQO DMV1I1

MCTRL

DIAG @1

MACRO M1200

22-FEB-84

15:22

PAGE

15-1

SEG 0033

GLOBAL EQUATES SECTION
000140
000100
000040
000000

PRIO3== 140
PRI0O2== 100
PRIOL== 40
PRIOO== O

;OPERATOR FLAG BITS
EVL==
LOT==
ADR= =
IDU=
ISR==
UAM= =
BOE ==
PNT==
PRI==

010000
020000
040000
100000

IBE ==
IER==
LOE==
HOE==

10000
20000
40000
100000

CNC020

.SBTTL
CSREGS

DEFINE
=
16.

004000

1369
1370
1371
1372
1373
1374
1375
1376

1377

1378

1379
1380
1381

iggg

000004
000010
000020
000040
000100
000200
000400
001000
002000

IXEe==

4
10
20
40
100
200
400
1000
2000

4000

fommmme

THE NUMBER OF CSR'S

mamn-

000070

SBTTL
NPRAOL

NPR ADDRESS REGISTER EQUATES
= 70
;0UT NPR ADRS LO REG

000072

NPRAOX

= NPRAOL
+2

:0UT NPR EXTENDED ADRS REG

NPRAIX

:IN NPR EXTENDED ADRS REG

000071

000074
000075

000076

NPRAOM
NPRAIL
NPRAIM

= NPRAOL
+1

:0UT NPR ADRS HI REG

= NPRAOL
+4
= NPRAOL
+S

:IN NPR ADRS LO REG
:IN NPR ADRS HI REG

NPRAOL
+6

000010

NPRBS?

1384
1385
1386
1387

123000

.SBTTL
NPRDRL

NPR DATA REG EQUATES
= 123000

;NPR DATA REGISTER

1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
{285

123004
000200
000100
000040
000020
000010
000004
000002
000001

.SBTTL
NPRCTL
NPRABT
NPRGO
NPRIO
LSIHLT
NPRBYT
DMVPU
LSIDCL
DMVDAI

NPR CONTROL REG EQUATES
= NPRDRL
+4
= BIT7
= BIT6
= BITS
= BIT4
= BIT3
= BIT2
= BIT1
= BITO

iNPR CONTROL REGISTER
;=1 IF BUS TIME-OUT ON NPR
;SET FOR NOP, CLEAR TO “GO" / O=DONE, 1=BUSY
0 = (LST ==> DMV);
1 = (DMV =s> LSI)
{SETTING THIS WILL “MALT* THE LSI-11 !!
;SET TO 1 TO WRITE BYTE ONLY TO LSI 11
;SET BY MICRO DIAG.
MUST REMAIN SET!!!
:IF SET, WILL CAUSE POWER DOWN CONDITION IN L3I!
; 'DISABLE INIT“ FROM EFFECTING DMV 11

.SBTTL

NPR REQUEST

iggg

1403
1404

123001

NPRDRH

= BIT3

: "BANK SELECT

= NPRDRL
+1

FUNCTIONS

7~ BIT

:NPR DATA HEGISTER

W/IN EXTENDED ADRS.

REG.

LOW BYTE

MIGH BYTE

CNOMAAQ0 DMV1IL1 MCTRL DIAG 21
NPR REQUEST

1405

1406

140~

1408
1409
1410
1411
1412
1413
1414
1415
1416

MACRO M1200

22 FEB 84

13
15:22

PAGE

15 ¢
SEQ 0034

FUNCTIONS

000004
000044
000054

NPRLD
NPRDL
NPRDL B

=
=

DMVPU
DMVPU!NPRIO
DMVPU!NPRIO!NPRBYT

000004
000002

.SBTT L
IRGRE G
IRQA
IRGB

= 123005
= BIT2
= BIM1

000001

PU24

.SBTTL

CONTROL FLAGS FROM P

123005

INTERRUPT

iWORD XFER:
iWORD XFER:
tBYTE XFER:

LSI
DMV
OMV

==> DMv
==> LSI
=35> |SI

REG EQUATES

: INTERRUPT REQUEST REG

;REQUEST
;REQUEST

BIT
BIT

FOR
FOR

XXO
xX4

INTERRUPT
INTERRUPT

'A’
8"

1417

1418
id419
1420

8ITO

TABLE ENTRIES

:POWER-FAIL

(I.E.

VECTORING MODE.

MODE

JUMPERS WS & W6 BNTH REMOVED)

CNOMAAO DMV11 MCTRL DIAG o1

MACRO M1200

22-FEB-84

15:22

PAGE

J3
16
SEQ 0035

SWITCH PACKS
1422
1423

.SBTTL

1424

P80480 8400404000000000
0000000000080
0000 0000000400
0000
0000000000
0000
00040404
0

1425

1426

1427
1428
1429
1430

SWITCH PACKS

FI0888000084000000000000080000000400000080040000008000000004000008000000000000840

121000
121400

SWPBOT
= 121000
SWPDDCMP = 121400

: "BOOT ADDRESS" SWITCH PACK [A200]
: "“DOCMP ADDRESS” SWITCH PACK [N1300)

I<3
CNDMRAO DMV11 MCTRL DIAG ¢1

CSR REG.
1432
1433
1434
1435
1436
1437
1438
1439
1440

DEFINITION FOR MAINT.

MACRO M1200

22 FEB-84

15:22

PAGE

SEQ 0036

LooP

.SBTTL

CSR REG.

DEFINITION FOR MAINT.

LOOP

1008088882808 84048048800800000808004000040048884008088800838408040008834000804000444

.SBTTL
$-

000001
000020

MAINTENANCE REGISTER

BSELO

AR ANAEALRARAANALAANARAR000404000000000000000000000040000040000800400004040

INTERRUPT ENABLE BITS

IENBA
IENBB

= BITO
= BIT4

s INTERKRUPT ENABLE
: INTERRUPT ENABLE

“A”
"B"

1441
1442

1443
1444
1445

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

3008088280888 48848888402408088840048008808888500800004080882004000804084208804408042

.SBTTL

000200
000100
000001

MAINTENANCE REGISTER

BSEL1

~8823808802088840%4088008482488880500480840840088084832008804888004884004000444

;

MAINT.

RUN
MCLR
MREQ

LOOP CONTROL
=
=
=

BITS:

BIT?
BIT6
BITO

1000888800088 400840808080084048048040880008048000288408000884004800200400008800040048

.SBTTL

MAINTENANCE REGISTER

- BSELZ2

1 -~ 880888088808844880488004804080048408000488080008388888888004840080004800800004000042

MAINTENANCE

FUNCTION CODES

000001
000002
000003
000004
000005

REDLOC
WRILOC
REDPAG
WRIPAG
EXECUT

= 1
= 2
= 3
= 4
= 5

sFUNCTION
sFUNCTION
;FUNCTION
+FUNCTION
;FUNCTION

000200

MRDY

;M LOOP REDY

BIT?

CODE
CODE
CODE
CODE
COOE

FOR
FOR
FOR
FOR
FOR

FOR

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

A COMMAND

WHEN

SET

CNOMAAO DMV11 MCTRL

DMV

DIAG M1

MACRO M1200

22-FEB-84

15:22

PAGE

L3
18

SEQ 0037

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

OMv INTERNAL ADDRESSES

1008880080488 80880080080000480042088024208084888484408080044840004848084800484440000400

DMV

H
HERE LYY E

YL Y

;40000000

MICROPROCESSOR REGISTER ADDRESS EQUATES

SLTO
BSLTO
B8SLT1
SLTZ2
8sLT2
8SLT3
SLT4
BSL T4
BSLTS
SLT6
8SLTé
BSLT7

120003

120004
120005
120005
120006
120007
120010
120010
120011
120012
120013
120014
120015
120016
120017

ORB
ORA
ODRB
DDRA
T1CL
TICH
T1LHGO
TiLL
T1LH
T2LL
T2CL
T2CH
SR
ACR
PCR
IFR

IENR
ORAM

VIA'S REGISTERS

=120000

s0RB+1
=0RB +2

=0RB+3

=0RB+4
=0RB+5S
sQRB+5
20RB+6
sORB+7
sQRB+10
sT2LL

=0RB+11
s0RB+12

=0RB+13
=0RB+14

s0RB+15

s0RB+16
=0R8.17

.SBTTL
000200
000100
000040
000020
000010
000004
000002
000001

IFRIRQ
IFRT]
IFRT2
IFRCB1
IFRCB2
IFRSR
IFRCAlL
IFRCA2

2000404804

=020
sSLTO
2SLTO.1
aSLTO2
257102
=SLTO+3
aSLT0+4
=SLT0.4
sSLT0+S
sSLT0+6
=SLTO+6
eSLT0.7

.SBTTL
120000
120001
120002

»>>

BYTE & WORD SELECT REGISTERS

LSBTTL
000020
000020
000021
000022
000022
000023
000024
000024
000025
000026
000026
000027

INTERNAL ADDRESSES

Y Y] 0888848050440 80008040480004468484044880488084480480404040040040000s

VIA‘'S

=BIT?
*BIT6
*BITS5
=B8IT4
=BIT3
=8IT2
=BIT1
=8ITO

"IFR" REGISTER'S BIT

ASSIGNMENTS

+ "IRQ" HAS BEEN ISSUED -- LOGICAL ~“OR' OF BITS O
> o
3*T1” -- TIMER & 1 TIMED-OUY
"T2" -- TIMER & 1 TIMED-OUT
1“CB1" EDGE DETECTED ("K2 LINE UNIT STEP"” O/P SIGNAL FROM SR)
; “CB2" EDGE DETECTED (UNUSED!)
: "SR" REGISTER COMPLETED SHIFT OPERATION
; "CAl" EDGE DETECTED ("K6 MOD RDY H")
1 "CA2" EDGE DETECTED ("K2 CTS H")

M3
CNDMAAO DMVl MCTRL

DIAG &1

MACRO

M1200

22-FEB

15:22

PAGE

SEQ 0038

GLOBAL DATA SECTION

1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
1784 002236
002236
002236

1789
1790
1791
1792
1793
1794
1795
1796

1797
1798

1799
1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824

/1117777777077 77727(7 7707777777777/ 777/77777777777777/777772277/777/77777777777
3/
THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED

IN MORE THAN ONE TEST,

/71111177777 7777777777777777777277777777777777777/777770772777777777777/777/77/7777
1402880808404 0 4040000040088 8082808808000 0 0440400 0880004040808048808840400000

.SBTTL

CONTROL BLOCK FOR STACKED ERROR MESSAGES

-~ 8880884808424

8 0085800000044

A 08080000000 0808040080000000808480040000044042

ERRTBL
000000
000000
000000
000000

ERRTYP: :

.WORD

ERRNBR: :
ERRMSG: :
ERRBLK: :

.WORD
.WORD
.WORD

LSERRTBL::

0
0
0

FHERRAAAAASEAALAAARARAAAREEAAAASA0AMAE00000000004000000000000000000008008000028

.SBTTL

STORAGE FOR DEVICE REGISTERS

$--02808040404000404
4040000800080 000800000004000808488840044028080000800448800000

002246
002246
002250
002250
002252
002252
002254
002254
002256
002256
002260
002260

002262
002262
002264
002264
002266
002270
002272
002274
002276
002300
002302
002304

WSRO

000000

B8SRO:

. WORD

000000

BSR1:

.WORD

000000

BSR2:

.WORD

BSR4 ;

.WORD

000000

B8SRS:

.WORD

000000

BSR6:

.WORD

000000
000000
000000
000000
000000
000000
000000
000000
000000

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

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

0
0
0
0
0
0
0
0
0

000000

WSR2
:
WSR4

WSR6
:
BSR3:
WSR10:
WSR12:
WSR14;
WSR16:

FEERAAEASAEAA000050000K0E00R00A00000400000400008000040000088000000000000042

.SBTTL

MISCELLANEOUS STORAGE

P00 0ANARSEAAR0L000400000000000004480000000040000080008000000004800000000

002306
002310
002312
002314
002316
002320
002322
002324

000000
000000
000000
000000
110400
000007
000000
000000

TDATA:
GDATA:
B8DATA:
XDATA:
DELAY1:
DELAY2:
LOGDEV:

PSTACK:

.WORD
.WORD
.WORD
.WORD

.WORD
.WORD

.WORD

,WORD

OO~Nr0000

1785
1786
1787
1788

002240
002242
002244

.SBTTL GLOBAL DATA SECTION

10400

;s TEST DATA
;EXPECTED DATA
;ACTUAL DATA
;EXCLUSIVE OR BETWEEN

sDELAY

;DELAY

TIME,

3 INST.,

"GDATA" &

TIME FOR M-LOOP FUNCTION,

;LOGICAL

DEVICE NUMBER

"BDATA"

500 MILLISEC.

100 USEC.APPROX.

;CONTAINS BASE LEVEL PROGRAM STACK POINTER

CNOMAAO DMV11 MCTRL DIAG o1

MACRO M1200

22-FEB

15:22

N3
PAGE

SEQ 0039

1858

1859
1860
1861
1862
1863
1864
1865
1866
1867
1868
1869
187¢C
1871
1872
1873
1874

002330

000000

INTWCH:

.WORD

002332
002334
002336
002340
002342
002344
002346
002350

000000
000000
000000
000000
000000
000000
000000
000000

ERRFLG:
REGNUM:

.WORD
. WORD

FRSTIM:
FRSPAS:

DEVMAP:
DEVPTR:
CONSOL:

VI Vs W

G0 €8 B¢ T VS SP We B S8 G Ve G0

We W6 Be

PFLAG:

.WORD
.WORD

.WORD
,WORD
.WORD

.WORD

: INTERRUPT RECEIVED FLAG BYTES.

.WORD

LOW BYTE FOR

ALLOCATLON:

& HIGH BYTE FOR

"B"

1BYTE IS SET NON-ZERO WHEN HANDLER SHOULD BE

i
__WATCHING FOR
:ERROR FLAG

OO0OO0O0O0O00O0O0O

INTFLG:

BF B0

1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857

000000

B WE Ve Ve Ve

1831
1832
1833
1834
1835
1836
1837
1838
1839

002326

@ G0 G0 B VL B0 VS Te Bs

1825
1826
1827
1828
1829
1830

MISCELLANEQUS STORAGE

sREGISTER NUMBER

:FLAG=0
:FLAG=0

IF
IF

INT'S.

ALLOCATION:

-- FOR PASSING ARG.

PROGRAM JUST LOADED
FIRST PASS AFTER LOAD

SEE

INTFLG

“ERR#"

:BIT MAP OF ACTIVE DEVICES
;OEVICE MAP BIT POINTER
:CONSOLE DEVICE FLAG -- NON ZERO = NONE PRESENT
iMISC. 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,
EXCEPT RIGHT HERE.
BIT O

BIT

WHEN SET,

THEY WILL NOT BE DOCUMENTED ANY OTHER PLACE

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

THIS WAS IMPLEMENTED TO SAVE WEAR &
?Eg?LOPHENT SYSTEM WHILE DOING LONG
STS.

TEAR ON THE RXO01 IN THE
TERM TESTING OF ALL OTHER

CPU TYPE.

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.
THE FOLLOWING ABBREVIATIONS ARE USED
IN THE HEADING:
BIT --- IDENTIFIES THE INNERMOST LOOP.
WHICH BIT IS
BEING INVERTED AT EACH LOCATION.
BITS ARE
IDENTIFIED AS O THROUGH 7.
DATA -- 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;

(NOT USED)

SEQ

---

LSB

---

THEN IT IS AGAIN READ & CHECKED FOR THE NEW
VALUE
.
INDICATES THE DIRECTION (FWD OR BKWD) THE TEST

WAS

SCANING

THIS IS

THROUGH RAM WHEN

THE

ERROR

OCCURED.

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

CNDMAQO DMV11 MCTRL DIAG o1

)4
J

MACRO M1200

22 FEB 84

15:22

PAGE 20
SEQ 0040

CURRENT DEVICE PARAMETERS

{gzg
1:;3

1
1880 002352
1881 002352
1882 002352

160000

LSBTTL

CURRENT DEVICE PARAME TERS

$MPCSR

160000

1 INITIAL ASSEMBLED IN CSR ADDRESS

002352
002354
00356
002356
002360
002362
002362
002364
002366
002366
002370
002372
002372
002374
002376
002376
002400
002402
002402
002404
002406
002406
002410

160017

MPCSR;
BSELO:
BSEL :
SELO:
BSEL1:
BSELZ2:
SELZ2:
BSEL3:
BSELA;
SELA;
BSELS:
BSELG6:
SEL6:
BSEL?:
BSEL10:
SEL10:
B8SEL11:
BSEL1Z2:
SEL12:
BSEL13:
BSEL14;
SEL14:
BSEL1S:
BSEL16:
SEL16:
BSELL17:

1907 002412
1908 002414
ig?g 002416

000300
000304
000340

MPIVEC:
MPOVEC:
MPRIOR:

.WORD
.WORD
.WORD

.SBTTL

GEN'L PURPOSE SCRATCH STORAGE

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

.WORD
LMORD
.MORD
.WORD
.MORD
.MORD
.WMORD
.WORD

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

160000
160001
160002
160003
160004
160005
160006

160007

160010

160011

160012
160013

160014
160015
160016

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

002420
002422
002424
002426
002430
002432
002434
002436

000000
000000
000000
000000
000000
000000
000000
000000

. WORD
.WORD

$MPCSR
SMPCSR. 1

. WORD
.WORD

SMPCSR .2
S$MPCSR.3

.WORD
.WORD

$MPCSR 4
SMPCSR.S

.MORD

$MPCSR+6

.WORD
.WORD

SMPCSR.7

$MPCSR:10

.WORD

S$MPCSR.11

.WORD
.WORD

$MPCSR.12
$MPCSR.13

.WORD
.WORD

$MPCSR.14
$MPCSR+ 15

.WORD

$MPCSR+16

.WORD

$MPCSR.17
300
304
340

O
O
O
O
©
O
O
©

;POINTER TO THE DMV11 CSR'S
tPOINTER TO BSELO
$tALTERNATE NAME FOR BSELO

tPOINTER
sPOINTER
1POINTER
sPOINTCR
1POINTE®
tPOINTER
sPOINTER
tPOINTER
tPOINTER
1POINTER
sPOINTER
sPOINTER
,POINTER
POINTER
iFOINTER
;POLINTER
tPOINTER
1POINTER
sPOINTER
sPOINTER
tPOINTER
tPOINTER
tPOINTER

TO SELO
TO B5ELL
TO BSEL?
TO SEL?2
TO BSEL3
TO BSELS4
7O SELS
TO BSELS
TO BSELGE
TO SELG
TO BSEL"
TO BSEL10
TO SEL:O
TO BS5cL1!
TO 8SELL2
TV SEL12
TO BSEL13
TO BSEL14
TO SEL1A
TO BSEL1S
TO BSEL16
TO SEL16
TO BSELL?7

1OMV11 INPUT INTERRUPT VECTOR
1OMV11l OQUTPUT INTERRUPT VECTOR
1OMV11 DEVICE PRIORITY

CNDMAAO DMV11 MCTRL DIAG o1

MACRO M1200

22 FFB 84

,5:22

C4
PAGE

21
SEQ 0041

SCRATCH STORAGE FOR MESSAGE REPORT ING
{ggz

1925
1926
1927
1928
1929
1930
1931
1932
1933
1934
1935

1936
1937
1938
1939
1940
1941
194§
194
1944

002440
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;
TTMP1:
TMP2:
TMPS.
TMP4 ;
TMPS:
TMPG :
TMP7:
TTMPS
TMP9:
TMPA ;
TMPB :
TMPC:
TMPD:
TMPE :
TMPF .
PEWPC:
OLOSP:

.WMORD
.WORD
.WORD
.WORD
.WORD
.MORD
.HMORD
.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

VALLE

CNDMAAO DMV11 MCTRL DIAG ot
sseee

DATA

PATTERN

22-FEB

D4
84

15:22

PAGE

SEQ 0042

seese

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 002526
1971 002530
1972 002531
1973 002532
1974 002533
1975 002534
1976 002535
1977 002536
1978 002537
1979 002540
1980 002541
1981 002542
1982 002543
1983 002544
1984 002545
1985 002546
1986 002547
1987 002550
1988 002551
1989 002552
1990 002553
1991 002554
1992

MACRO M1200

.SBTTL
000020

.EVEN

PATA:;

.SBTTL
000026
125

252

377
001
002

010
020
040

100
376
375
373
367

357
337
277
177

000

.EVEN

PATS:

ssese

DATA PATTERN A

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

PATB PATA 2

(Y
Y Y Y]

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

001

002

004
010
020
040
100
200
052
300
140
060
030
014
006
003

e¢cere

1 USAGE;

18 OF BYTES

+B8SELO
L
$1BSEL
1BSEL2
1BSELS

IN PATTERN

1BSELS

$1BSELS
t1B8SEL6
sBSEL7
$1BSEL10
$1BSEL11
1BSEL12
3BSEL1S
:BSEL14
$1BSEL1S
$1BSEL 16
1BSEL17

OATA PATTERN B seese
PATC-PATB-2

125
252

000
377
001

002

004
010
020

s USAGE:
1@ OF

BYTES

IN PATTERN

CNDMAAO DMV11 MCTRL DIAG o1
sseee

DATA

PATTERN

MACRO M1200

FEB

E4
84

15:22

PAGE

SEQ 0043

essee

1994
1995

1996
1997
1998
1999 002556
2000 002500
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
2C32
2033
2034 002624
2035 002625
2036 002626
2037 002627
2038 002630
2039 002631
2040 002632
2041 002633
2042 0026 34
2043 002635
2044 002636
2045 002637
2046 002640
2047 002641
2048 002642
2049 002643

.SBTTL
3
H

000012
002
003
000
013
006
007
012
014
015
016

.EVEN

377
366

PATC:

sesse DATA PATTERN C

107
112

000
200

100

PATCR:

0,100
13,040
6,106
7.107
12,112
14,042
15,000
16,200

3,366

TABLE

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

106
107
000
000
112
040
042
000
200
000

s TiLL
: TILH
s T2CL
; TeCH
: SR
s+ ACR
;1 PCR
s IFR
; IER
: ORA

000

THE

TABLE

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

TABLE OF

TESTED,

CAN'T

THE

VIA‘S REGISTERS

BEFORE

A REGISTER'S

TICH

TEST PATTERN

A BICB
:
s
;s
31
s
$
s
s
:
1
;i
:
:
1
s
:

ORB
ORA
ODORB
DDRA
TICL

;

BELOW (INSURING

000
I
000
000
377
377
000
000
377
377
000
000
000
377
200
377

AN O/P REGISTER

THE LIST OF EXPECTED CONTENTS OF

;:
s+
;:
;
:

1LOAD UP ORSB
:
ACR
:
TiLL
:
TILH
3
SR
3
PCR
:
IFR
:
IER

100
000
377
366
000

THIS

PATCM:

$1SETUP ORA

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

CONTENTS
000
377
000
000
377
377
000
000
377
377
000
000
000
377
200
377

THE REGISTER NUMBER
IT IS THE SECOND BYTE

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

.BYTE

112
040
042
000
200
000

VIA'S REGISTERS.
VALUE LOADED INTO

<PATCR-PATC-2>/2
2,377
1SETUP ORB AS AN 1/0 (READ/WRITE) REGISTER

THIS
000
377
<56
000
000
106
107
000
000

THE
THE

.WORD
.BYTE

.BYTE

040
106

¢sses

USED By TEST @ 11 TO LOAD UP
LOADED IS THE FIRST BYTE AND

“A" MASKS,

IS DONE USING ITS RESPECTIVE BYTE FROM

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
TILM
TCL -- THIS IS A FREE RUNNING COUNTER
T2CH -- THIS IS A FREE RUNNING COUNTER
SR
ACR
PCR
IFR
IER BIT 7 IS ALWAYS READ AS ZERQ
ORA
THIS REGISTER CAN'T BE TESTED!!

TESTED!

Fg
CNDMAAO DMV11 MCTRL DIAG @1
ssses

DATA PATTERN

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 002664
2070 002665
2071 €J2666
2072 002667
2073 002670
2074 002671
2075 002672
2076 002673
2077
2078
2079
2080
2081
2082 002674
2083 002676
2084 002677
2085 002700
2086 002701
2087 002702
2088 002703
2089 002704
2090 002705
2091 002706
2092 002707
2093 002710
2094 002711
2095 002712
2096 002713
2097 002714
2098 002715
2099 002716
2100 002717
2101 002720
2102 002721
2103 002722
2104 002723

MACRO M1200

22-FEB

15:22

PAGE

SEQ 0044

#2200

.SBTTL
000026
200
201
202
204
210
220
240
300
200

.EVEN

PATD:

000

001
002
004
010
020
040
100
000
325
125

LYY XY

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

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

252
052

.SBTTL
.EVEN

PATE
:

(X Y YY)

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

.BYTE
.BYTE

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

DATA PATTERN D #seses
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
217
377
377
377
376
374

370
360
340
300

200
200
325
200
252
200

ssses

G4
CNDMAAO DMV1l MCTRL DIAG &1
ssese

DATA

PATTERN F

2106
2107
2108

2109 002724

2110 002726
2111 002730
2112 002732
2113 002734
2114 002736
2115
<740
2116 002742
2117 002744
2118 002746
2119 002750
2120 002752
2l2l 002754
2l22 002756
2123 002760
2124 002762
2125 002764
2126 002766
2127 002770
2128 002772
2129 002774
2130 002776
2131 003000
2132 003002
2133 003004
2134 003006
2135 003010
2136 003012
2137 003014
2138 003016
2139 003020
2140 003022
2141 003024
2142 003026
2143 003030
2144 003032
2145 003034
2146 003036

MACRO M1200

22-FEB

15:22

PAGE

SEQ 0045

sesee

.SBTTL

000045
125252

052525
000000

177777
000001
000002
000004
000010
000020
000040
000100
000200
000400
001000

177757
177737
1776177
177577
177377
176777
175777
173777
167777
157777
137777

0777177
000000

.EVEN

PATF
;

sssss DATA PATTERN F

. 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

s0saas

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

CNDMAAO DMV11l MCTRL DIAG o1
sssss

DATA

PATTERN

2148 003040
<149
<150
2151
2152
2153 003040
2154 003042
2155 003043
2156 003044
2157 003045
2158 003046
2159 003047
2160 003050
216l 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

H4
22 FEB

15:22

PAGE

SEQ 0046

sssse

PATG:

.SBTTL
000020
000
200
000
000
033
000
305
000
000
000
000
000
000
000
000

.EVEN
RESFMC:
BSELRS:

4ssea DATA PATTERN RESULTS
.WORD
.BYTE
.BYTE

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

000

RESFT3-RESFMC-2
000

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

TABLE FOR MASTER CLEAR

;BSELLL

:BSEL12
:BSEL13
1BSEL14
;8SEL1S
sBSEL16
;sBSEL17

ssssa DATA PATTERN RESULTS FOR

RESFT3:

.BLKW

16.

ssess

1BSELO
;BSEL1 -- "RUN" BIT SET
;BSEL2
;BSEL3
1BSEL4 -- CODE FOR THE DMV 11
:1BSELS
:BSEL6 -- INDICATING VALID COMPLETION OF U-DIAG.
;sBSEL7
;1BSEL10

LSBTTL

.EVEN

(RESFMC)

TEST

3 (RESFT3)

ssssa

CNDMARO DMV1I1 MCTRL DIAG 21

MACRO M1200

22 FEB

14
15:22

PAGE

SEQ 0047

DATA BLFFER AREAS
2176
2177
2178 003122
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202

.SBTTL

DATA BUFFER AREAS

BUF AREA ;

003322
003324
003326
003330
003332
003334
003336
003340
003342
003344
003346
003350
003352
003354
003356

00336C

003122
003206

.BLKB

256.

i
:

THIS BUFFER HAS SOME
FOR THOSE USAGES.

ALTERNATE

WO
Wl
WS

=
=
*=

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

BUFAREA+128,.
W02
Wle?2

W22

W32

WS
W6
W?

=
=
=
=
*
=

W7.2
W82
“908

W8
WC
W0
Wt

=
=
=
=

WA.2
WwB.2
uWC.?2
W0.2

W8
W9
WA

871

BT2

USES

T0OO.

Wa.2
WS.Q2
W62

WE.2

= BUFAREA

BUFAREA.64

;BYTE
sBYTE

TABLE
TABLE

@& 2

THE

FOLLOWING

LABELS

ARE

PROVIDED

CNDMAAO DMV11l MCTRL
GLOBAL

TEXT

DIAG a1

MACRO M1200

22-FEB 84

15:22

PAGE 28

SEQ 0048

SECTION

228;

.SBTTL GLOBAL TEXT SECTION

22
2206

3 95959000 6 9 06 96 96 96 95 96 96 96 05 05 96 0 96 00 o o o 06 o

2207
2208
2209

;9
1
i

2210
2211

0o o 9

o o o o o o

o 00

o o 906 069 96 96 96 o 9 o o ol o o o o o o o o 0 96 96

THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,
MESSAGES, AND ASCII INFORMATION THAT ARE USED IN
MORE THAN ONE TEST,

3 9096 95 98 08 06 06 06 0 0 0 06 0 06 0 06 0 . 0

0 0 05 0 0 5 06 0 9 95 06 06 0 06 06 05 1 0 0 0 0 0 9 90 0616 0 5 5 006 06 16 0 0 06 9 06 6 o 0 .06 96 96 o o o0 o o o o 96 06

2212

1000000008000 00000000000000000000000000000000000000080000000000000000000000000

2213

;& NAMES OF DEVICES SUPPORTED BY PROGRAM

2214

2215 003522
003522
003522
003525

003530
003533
003536

800000000000 4040000000000000000000000000000000000804000000000000004400400004404

DEVTYP
115
065
117
115
066

070
063
122
070
064

LSOVTYP::
.ASCIZ

060
040

040
060
000

«MBOS3 OR M80O64%

.EVEN

2216
2217

$0000808800008004088000000000000000000000000000000000400000040400040448000400000400

2219

P - -GS AASAA0AAMRAAAEAAAEANAAREA

2218

;¢

2220
2221
000012
2222 003542
003542
003542
104
IC DIAG - PART 1 OF 2/
003545
055
003550
040

115

126

061
125

061
055

103
124
040
107
040
101
055
101
040
117
062

117
122
114
111
104
107
040
122
061
106
000

116
114
117
103
111
040
120
124
040
040

003553
003556
003561
003564
003567
003572
003575
003600
003603
003606
003611

2223
2224

000010

TITLE OF PROGRAM

.RADIX

10.

DESCRIPT

0RAAAAAGENAAAR044000000000000048048000400000008

<DMV-11 U-CONTRL LOGIC DIAG

PART

1 OF 2>
L$DESC::

LASCIZ

.EVEN

/DMV-11 U CONTRL

LOG

I<4
CNOMAQ0O DMV11 MCTRL DIAG #1
GLOBAL

MACRO M1200

22 FEB

15:22

PAGE

SEQG 0049

SUBROUTINES

2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243

.SBTTL GLOBAL SUBROUTINES
N
3/

YIS

LIL1 0070007070077 07 700707770707 777077077772707070770777077777/27777/7777777

N
R R R
SUBROUTINES

R
R R R R R N
ARE CALLED By

R R R R R
MORE THAN

R N AN VI VI
ONE TEST

NI IV IV IV

1008080404848 288080404840584008400885840084388880040088480404800004800440480800000040440

SBTTL
i

MASCLR

MASTER CLEAR SUBROUTINE

FUNCTION:

THIS

2244
2245
2246

SUBROUTINE

FORCES

THE 6502 MICROPROCESSOR

TO EXECUTE

A MINI

17 PART

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

APPROXIMATELY
S00
HUNDRED(S)
MILLISECOND. THIS SUBROUTINE WILL SEND THE
MASTER
CLEAR
COMMAND
AND
DELAY FOR APPROX. S00 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 QUFUE UP AND
THE CARRY BIT IS SET. ELSE, THE CARRY BIT IS5 CLEARED.

2247

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

R
R
THE GLOBAL

: CALLING SEQUENCE:
PC.MASCLR
JSR
:
;

8CC

<ANY

: N$:

ERROR

OTHER

SPECIAL

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

ERROR PROCESSING MAY

DONE

HERE

(I.E.

CKLOOP)>

;- 5080840088802 048448480480300420000808008804358380034038008800000080084084800800040
003614

010146

003616

112777

M ASCLR:
000300

176530

MOV

R1,-(SP)

SAVE

MOvB

OQRUN!MCLR,8BSELL

;SET BOTH THE RUN AND MASTER CLEAR BITS
;7O INITIATE THE MICRODIAGNOSTIC

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

013701
001402
005301
000775

002316

132777

000200

001410

2%:

176510

1%:

MOV

DELAY1,R1

8IT8
BEQ

ORUN, 8BSEL L
3¢

BEQ
DEC
8R

:IF

1$
R1
28

THE RUN BIT

IS SET,

s INITIALIZE

THE LOOP COUNTER FOR DELAY

LOOP

; EXIT DELAY LOOP IF THE TIME HAS EXPIRED
:
ELSE, DECREMENT THE LOOP COUNTER AND
;
CONTINUE TO LOOP.
; TIME-LP!
;CHECK THE RUN BIT
;IF NOT SET, GO REPORT THE ERROR
MICRODIAGNOSTICS ARE COMPLETE.

1CHECK IF ALL MICRODTIAGNOSTICS PASSED.
003646

127737

003654

001004

003656
003664

127737
001420

176514

176500

003050

003046

44:

CcMPB

PBSEL6,BSELRS+6

BNE

s VALID MICRODIAGNOSTIC COMPLETION CODE.
: IF BAD, GO REPORT ERROR

@BSEL4,BSELRS+4

;ELSE,

CHECK FOR

THE

VALID CODE FOR A DMV

;ELSE,

FALL

THE

ERROR REPORTING COOE

cMPB

B8EQ

;THIS CHECKS THE BYTE

: IF

THIS

IN B-SELECT 6 FOR THE

TOO IS CORRECT
INTO

THEN NO ERROR EXISTS

CNDMAQO DMV1l MCTRL DIAG ot
MASCLR

MASTER CLEAR

MACRO M1200

15:22

L4
PAGE 29 1

sEQ

SUBROUTINE

2289 003666
2290 003672

004737

004434

003672
003700
003706
003714
2291 003722
253% 003724
2
2294 003726
2295 003730
2296 003732
2297
2298 003734
2299
2300

012737
012737
012737
012737
000261
000401

000001
000001
003734
005414

3%:

SEC
BR
6%:
7¢:

101

123

JSR
GTOF

PC,GETBSR
204 ,ERR3

tGET THE BSEL REGISTERS FOR DUMPING
:MASTER CLEAR ERROR

}

002236
002240
002242
002244

000241
012601
000207
115

22 FEB 84

.NLIST
20%:
.LIST
.EVEN

CtC
MOV
RTS
BEX
.ASCIZ
BEX

QUEUE

s INDICATE

"“DEVICE FATAL" ERROR # 1
MOV
MOV

THE

MOV
MOV
CALLING ROUTINE THAT

(SP)+,R1
PC

:CLEAR THE CARRY BIT TO
tRESTORE REGISTER ONE
; RETURN TO THE CALLER

07 .EDF ,ERRTYP
#1 ,ERRNBR

#20$ ,ERRMSG
2ERR3,ERRBLK

AN ERROR WAS DETECTED

/MASTER CLEAR FAILURE/

INDICATE

NO ERROR

0050

CNDMAAO DMV11l MCTRL DIAG #1
M-LOOP

MSTCLR

MACRO M1200

22-FEB 84

15:22

SEGQ 0051

.SBTTL

gggg

MSTCLR

2306
2307
2308
2309
2310
231;
231
3313

;:
:
:
:
:
H
H
;s

CALLING SEQUENCE:

2303

14800

2315

012777

2320 003772

012703

000014

2324
2325
2326
2327
2328

132777
001023
004737

000200

176346

004576
000301

002310

000001
000002
014454
005426

002236
002240
002242
002244

2329
2330
2331
2332

004002
004010
004012

004016
004024

004024
004032
004040
004046
004054
004056
004060
004062

010346

077301
012603

012737

012737
012737
012737
012737
000261
000401
000241
000207

140400

176362

M-LOOP

-- MSTCLR

-- MASTER CLEAR & ENTER M-LOOP

AARARRLARRABASR LR AAARRA LA AL

MASTER

CLEAR

AL RARAAAAAREA0200040000000080000408000b00000

& ENTER M-LOOP

JSR
PC,MSTCLR
8CC
N$
;IF NO ERROR OCCURED, PROCEED WITH ROUTINE
ERROR
;AN ERROR MESSAGE HAS BEEN STACKED:
PRINT IT
<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE
(I.E. CKLOOP)>
N$:

2316
ggl; 003762

2321 003776
gggg 004000

PAGE 30

MASTER CLEAR & ENTER M-LOOP

2302

1
2319 003770

0258000800400

MSTCLR:

1¢:

<RESUMPTION OF NORMAL PROCESSING>
085 5800000084840 8 00400008040 000000040004000808404440000040880842

MOV

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

MOV

R3, -(SP)

S08
MOV

R3,1$
(SP)+,R3

8IT8
BNE
JSR

OMROY ,8BSELZ
Ss
PC.GETWSR

MOV

GTOF

#12..,R3

;WAIT FOR THE M-LOOP TO FINISH THE OPERATION

;0ID THE M-LOOP FINISH
s YES,
GOOD.
RETURN
;:GET BYTE SELECT REGISTERS
ORUN!'MCLR!'MREQ,GDATA
s IDENTIFY REQUESTED FUNCTION
EM3,ERR4
: "MRDY” TIMEQUT

S$:
gs:

SEC
B8R
cLC
RTS

;INITIATE M-LOOP

9
PC

QUEUE

"DEVICE FATAL" ERROR @& 2
MOV
MOV
MOV
MOV

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

BIT)

27 _EDF ,ERRTYP
92 .,ERRNBR
OEM3 ERRMSG
#ERR4 ,ERRBLK

SET

CNOMAAO OMV11 MCTRL DIAG #1
M-LOOP

MACRO M1200

N4
15:22

PAGE

SEQ 0052

READ

2334
2335
2336
2337
2338
2339
2340

.SBTTL

M-LOOP

READ

HE) 0"“‘.“"““““““‘““.““““““““.““.“

READ

2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351 004064

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

- READ THE SPECIFIED ADDRESS WITHIN THE DMV-11

CALLING SEQUENCE
:

;

;
;
;

JSR

.WORD
.WORD
ACC

RS,READ

<ADDRESS OF REGISTER WITHIN DMV-11>
<DESTINATION ADDRESS WITHIN LSI-11>
N$
:IF NO ERROR OCCURED,

ERROR

<ANY

i N§:

OTHER

SPECIAL

;AN ERROR MESSAGE

ERROR

PROCESSING

MAY

PROCEED WITH ROUTINE

HAS BEEN STACKED:
DONE

HERE

(I.E.

CKLOOP)>

; - -“““““‘““““““““““““‘.“ \““‘.“““.““““‘..‘.“““.“

004070

012577
112777

004076
004100
004104
004106

010346
012703
077301
012603

004110
004116

132777
001023

000200

176240

004120
2363 004124
2364 004132

004737
012737

004576
000001

002310

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

012737
012737
012737
012737
000261
000401

000001
000003
014500
005426

002236
202240
002242
002244

2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362

22-FEB-84

000241
117735
000205

176272
000001

176260

READ:

000032
18:

MOV
MOVB

(RS)+,8SELS
OREDLOC,8BSEL2

MOV
MOV
S08
MOV

R3, -(SP)
026. .R3
R3,1$
(SP)+.R3

BITB
BNE

OMRDY.®BSEL2
Ss

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

JSR
MOV
GTOF

PC,GETWSR
OREDLOC,GDATA
EM4.ERR4

:GET BYTE SELECT REGISTERS
;IDENTIFY REQUESTED FUNCTION
: "MRDY
" TIMEOUT
:
QUEUE "DEVICE FATAL" ERROR 0

SEC

176172

cs.
6s:

;SETUP SOURCE POINTER
;TELL M LOOP TO GIVE US

;WAIT FOR

THE M LOOP

THE REQUESTED DATA

TO FINISH THE

MOV
MOV
MOV
MOV

;INDICATE AN ERROR HAS BEEN STACKED

B8R

:RETURN WITH THAT INDICATION

cLC
MOVB
RTS

@BSEL6,3(R5)s
RS

; INDICATE “NO ERROR"
;PUT DATA WHERE CALLER WANTS
:RE TURN

OPERATION

o7 .EDF ,ERRTIP
3. ERRNBR

2EM
, ERRMSG
4
0ERR4
, FPRBLK

CNDMAAD DMVil MCTRL DIAG o1
M.-LOOP

READ

MACRO M1200

PAGE

SEQ 0053

2x72

.SBTTL

M-.LOOP

-- READ IMMEDIATE

100000000000000000000000000000000000000000000000

i READL
]

2376

237"

'
i
3
:

JSR
.WORD
.WORD
8CC

ERROR

3
:

0000000000000000000000808000000

- READ IMMEDIATE TME SPECIFIED ADDRESS WITHIN THE DMV 11

CALLING SEQUENCE:

2378
2379
2380
2381

<ANY

N$:

RS,.READ]
<ADDRESS OF REGISTER WITHIN DMV-11>
<DESTINATION -- CONTENTS OF REG. IS PUT MERE>
N
1 IF NO ERROR OCCURED, PROCEED WITH ROUTINE
OTHER

SPECIAL

1AN ERROR MESSAGE

ERROR

PROCESSING

MAY

MAS BEEN STACKED:
DONE

MERE

(I.E.

CKLOOP)>

:--ooooooooooooo.oooooooo‘oooooooooooooooooooooooooooooooooooooooooooooooooooo
004176
004176
004202

012577
112777

004210
004212
004216
004220

010346
012703
077301
012603

004222

132777
001023

2401 004232
2402 004236
2403 004244

004737
012737

004244
004252
004260
004266
2404 004274
2405 004276
2406
2407 004300
2408 004302
2409 004306

012737
012737
012737
012737
000261
000401

014500
005426

000241
017725
000205

176060

2400

15:22

IMMEDIATE

2378
2374
2375

2382
2383
2384
2385
2386
2387
23588
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399

22 FEB 84

004230

176160

000001

READI:

MOV

176146

000015
1%:

000200

176126

004576

000001

002310

000001

002236
002240
002242
002244

(RS).,8SEL4

1SETUP SOURCE POINTER

MOVB

OREOLOC.8BSEL2

MOV
MOV
S08
MOV

R3,-(SP)
013..R3
R3,18
(SP)+,R3

8ITB
BNE

#MRDY , 8BSEL2
St

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

JSR
MOV
GTOF

PC,GE TWSR
OREDLOC,GDATA
EM4 ,ERRA

$GET BYTE SELECY REGISTERS
;IDENTIFY REQUESTED FUNCTION
1 "MROY
" TIMEOUT

;TELL M-LOOP TO GIVE US THE REQUESTED DATA
tWAIT

SEC
BR
S%:

68:

CLC

MOV
RTS

FOR

THE

QUEUVE

M LOOP

TO FINISH

THE

'DEVICE FATAL' ERROR ¢ 4
MOV

MOV
MOV
MOV
AN ERROR HAS BEEN STACKED

s INDICATE
sRETURN WITH THAT

WSEL6,(RS).
RS

sPUT DATA wWHERE
s RE TURN

1 INOICATE

OPERATION

INDICATION

“NO ERROR’

CALLER WANTS

@7 EOF ,ERRTYP
84 ,ERRNBR
0EM4 ,ERRMSG

0ERR4 ,ERRBLK

CNDMAQ0 DMV11 MCTRL OIAG o1
M

LOOP

MACRO M1200

22-FEB-84

15:22

PAGE 33

SEQ 0054

WRITE

2411
o412

LSBTTL

M LOOP

- WRITE THE SPECIFIED DATA INTO THE SPECIFIED DMV-11 ADDRESS

g:{z

2415

2410
241”
2418
2419
2420
2421
g:gg

H
:
3
$
:
H
:

g:gg

3426

2427
D428 004310

~429 004314

2430 004320

WRITE

10080800000004000000000000000000480000000080004800000000000000000000800000000000000

WRITE

CALLING SEQUENCE:
JSR
RS, WRITE
. WORD
<ADDRESS OF REGISTER WITHIN DMV-11>
.WORD
<ADDRESS OF DATA BYTE>
B8CC
NS
1+ IF NO ERROR OCCURED, PROCEED WITH ROUTINE
ERROR
AN ERROR MESSAGE MAS BEEN STACKED:
PRINT IT
<ANY OTHER SPECIAL ERROR PROCESSING MAY BE OONE MERE
(I.E. CKLOOP)>

N$:

:--o‘ooooo‘.oooooooooooooooooooooooooooooooooooooooooooo-oooooooooooooooaooooo
012577
113577

000404

176046
176046

WRITE:

MOV
MOvB

(RS). ,aSELA
8(R5). ,9SELS

MLWRI

$SETUP SOURCE POINTER
$MAKE DATA AVAILABLE TO M LOOP

1 THE REST OF

THIS ROUTINE

THE

SAME AS

"WRITEI

CNOMAQ0 DMV11 MCTRL DIAG ot
M LOUP

WRITE

MACRO M1200

D5
84

15:22

PAGE

SEQ 0055

IMMEDIATE

2432
2433
2434
2435
2436
2437
2438

.SBTTL

M LOOP

WRITE IMMEDIATE

10000000000000000800000000006000000084800000000000

WRITEI

- WRITE

IMMEDIATE

00800000000080000000000080004800

THE SPECIFIED DATA INTO THE SPECIFIED DMV-11 ADORESS

t CALLING SEQUENCE:
i

2439
2440

2441
2442
2443
2444
2445
2446
2447
2448
2449
2450
2451
2452
2453
2454
2455
2456
2457
2458
2459
2460
2461
2462
2463

22 FEB

JSR

i
3
3

.WORD
.WORD
8cC

ERROR

:
$

;

<ANY

N$:

RS5,WRITEI

<ADDRESS OF REGISTER WITHIN DMV-11>
<DATA FIELD -- DATA TO BE WRITTEN IN OMV-11>
N$
1 IF NO ERROR OCCURED, PROCEED WITH ROUTINE
OTHER

SPECIAL

<RESUMPTION OF

1AN.

ERROR

NORMAL

ERROR MESSAGE

PROCESSING

MAY

HAS BEEN STACKED:
DONE

HERE

(I.E.

CKLOOP)>

PROCESSING>

:--ooooooooo.ooooooo.o‘ooooooooooooo‘ooooaooooo.oaoooooooo‘o-coooooooooooooooo
004322
004322
004326
004332

012577
012577
112777

004340
004342
004346
004350

010346
012793
077301
012603

004352
004360
004 362
004 366
004374

001023
004737
012737

004374
004402
004410
004416
2464 004424
2465 004426
2466
2467 004430
2468 Coa432

132777

012737
012737
012737
012732
000261
000401

000241
000205

176034
176034

0000C2

WRITEI:

176016

MLWRI:

000050
18:

000200

175776

C04576
000002

002310

000001
014500
005426

MOV
MOV

MOVB

(R5).,8SELA4
(RS5)+,8S5EL6

OWRILOC,8BSEL2

MOV
MOV
508
MOV

R3,-(SP)
940, ,R3
R3,1%
(SP)+,R3

BITB
BNE
JSR
MOV
GTDF

OMRDY ,8BSEL2
S
PC,GETWSR
SWRILOC,GDATA
EM4 ,ERRA

002236
002240
002242
002244

SEC

B8R
Ss:

63:

CLC

RTS

$SETUP SOURCE POiLNTER
tMAKE DATA AVAILABLE TO M-LOOP
;;TELL M-LOOP

tWAIT FOR

TO WRITE

THE M-LOOP

THE DATA

TO FINISH

THE

10ID THE M-LOOP FINISH
i YES,
GOOD.
RETURN
1GET BYTE SELECT REGISTERS
s IDENTIFY REQUESTED FUNCTION
: "MRDY' TIMEOUT
:
QUEUE 'DEVICE FATAL' ERROR
MOV
MOV
MOV
MOV

s INDICATE AN ERROR HAS BEEN STACKED

tRETURN WITH THAT INDICATION

;RETURN

: INDICATE

“NO ERROR’

OPERATION

@ S

o7 .EDF ,ERRTYF
95, ERRNBR
0EM4 ,ERRMSG
OERRA ,ERRBLXK

CNOMAAQ DMV1I1l MCTIRL DIAG @1
GE TBSR

GET BYTE

MACRO M1200

22-FEB

GETBSR

2500

-- GET BYTE SELECT REGISTERS

1000000008800 004400000408008000080004000000800040040480800040000800045000080008000820

GET

THE CONTENTS OF ALL CONTROL AND STATUS REGISTERS

FUNCTION

THIS

SUBROUTINE

COLLECTS

BYTE SELECT REGISTERS FOR

ENTRY CONDITIONS
EXIT CONDITIONS

2481

2501
2502
2503
2504
2505
2506
2507
2508
2509
2510
2511
2512
2513
2513
2515
2516

PAGE

SEQ 0056

.SBTTL

2471
2472
2473
2474
2475
2476
2477
2478
2479
2480

2436
2497
2498
2499

15:22

SELECT REGISTERS

2470

2482
2483
2484
2485
2486
2487
2488
2489
2490
2491
2492
2493
2494
2495

REGISTERS DESTROYED

NONE

00
o

NONE

]

NONE

THE

CONTENTS OF

THE PURPOSE OF DISPLAY,

o
o0

0000

00
e
J060

¢
Q060

]

o
20000
O
o

0
o

]
0

~=88080000088880000000004000400800400800080088840000000040084440800008000400000800

004434
004442
004450
004456
004464
0caar2
004500
00450
004514
004522
004530
004536
004544
004552
004560
004566
004574

117737
117737
117737
117737
117737
117737
117737
117737
117737
117737
117737
117737
117737
117737
117737
117737

000207

175712
175706
175702
175676
175672
175666
175662
175656
175652
175646
175642
175636
175632
175626
175622
175616

002246
002250
00c252
002254
002256
002260
002262
002264
002266
002270
002272
002274
002276
002300
002302
002304

GETBSR:

MOVB
MOVB
MOVB
MOVB
MOVB
MOVB
MOVB
MOVB
MOvB
RTS

.SBTTL

;

004576
004604
004612
004620
004626
004634
004642
004650
004656

017737
017737
017737
017737
017737
017737
017737
017737
000207

17555%
175546
175544
175542
175540
175536
175534
175532

002246
002250
002252
002254
002256
002260
002262
002264

MOvVB

MOVB
MOVB
MOVB
MOVB
MOVB
MOVB

"WORD"

GETWSR:

88SELO,BSRO
88SEL1,B8SR1
8B8SEL2,BSR2
8B5EL3,BSR3
88SEL4 BSR4
88SELS,BSRS
88SEL6,BSR6
8BSEL7,8BSR7
88SEL10,8S5R10
88SEL11,B8SR11
8B8SEL12,BSR12
8B8SEL13,BSR13
8BSEL14,8S5R14
8BSEL15,8SR1S
@BSEL16,BSR16
ggSEL17.BSR17

;PUT THE CURRENT CSR VALUES INTO THE PRINT-QUT

: TABLE

;RETURN

CALLER

- GET WORD SELECT REGISTERS
GETWSR
VERSION OF ABOVE SUBROUTINE

MOV

MOV
MOV

MOV

MOV
MOV
MOV
RTS

8SELO, WSRO
8SEL2,WSR2
8SEL4,WSR4
8SEL6,WSR6
8SEL10,WSR10
aSEL12,WSR12
@SEL14,WSR14
ggELl6.HSRl6

tMOVE

;BYTE

THE 8 WORD REGTSTERS

TABLE

tRETUKN

TO CALLER

TO THE OTHERWISE

»
CNDMAAD OMvil MCTRL DIAG o}
INITIALIZE

.SBTTL

15:22

PAGE

SEQ 0057

L INITT]

INITIALIZE

TIMER &

1900280000824 482800040800400000088040800808880080A0040800000000000408088400440088004840

INITT1

INITIALIZE

TIMER

CALLING SEQUENCE:

JSR
. WORD
.WORD

2530
2531
2532
2533
2534
2535

2552
2553
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566
2567
2563
2569
2570
2571
2572
573
2574

TIMER & 1

2518
2519
2520
2521
2522
2523
2524
2525
2526
2527
2528
2529

2536
2537
2538
2539
2540
2541
2542
2543
2544
2545
2546
2547
2548
2549
2550
2551

22 FEB

JINITT

MACRO M1200

R5,INITT1
<VALUE LOADED INTO THE T1 LATCH 8 TILL &€ TILH>
«BITS 6 & 7 WILL BE LOADED INTO ~ACR”, BIT S5 WILL BE

:: SEQUENCE OF EVENTS HEREIN:
::
SET THE VIA'S INTERRUPT ENABLE REGISTER ("IER")
SET THE VIA'S "ACR”
::
::
SET TiL-L (ADDR 06)
::
SET TiL-H (ADDR 07)
::
RETURN WITHOUT ANY ERROR CHECKING
18

1000420448808 88428000844008400808008008888840084884880480404008480004480048000400000400000

004660

004662
004666
004672
004676
004704

010146
112537
112537
111537
142737
012501

002455
002457
002467
177477

INITT1:

MOV

;SAVE

(RS)+,TMP61

$tSETUP VALUES TO BE LOADED INTO THE LATCHES

(R5),TMPB .1

sGET & PROCESS BITS FOR ACR €6 & 7

(R5)+,R1

tNOW,

(RS)+ ,TMPT7,.1

MOV

8ICB

002467

R1,-(SP)

MOVB
MOVB
MOVB

QtC<BIT6+BIT7>,TMPB+1

THE

PASSED BIT

THE

CONTROLLING BIT

THE

;EXTRACT

GET

;1CLEARING BIT 6 OF

THE

WRONG POSITION BUT,

;

:
004706
004710
004714
004720
004722
004726

106301
042701
140177
106301
052701
110137

004732
004736
004740
004742

004537
120016
002475
103431

004310

004°44
004750
004752
004754

004537
120013
002466
103424

004064

(BIT 6).

ASLB

AND WE

WILL

"OR"

WILL

BITS 6 £

THE BIT

; WE KNOW WE ARE SETTING OR CLEARING BIT 6

USING

SAVE

THEM FOR LATER

SHOUWD CONTROL

THE OPERATION.

TO BE USED IN SETTING OR

' IER”

- THUS, THE PASSED BIT WILL BECOME

THE BIT

WISH

TO BE

CONTROLLED

ASLB

R1
@tC<BIT6>,R1
R1,3BSEL3
R1

: THIS PUTS THE PASSED BIT INTO BIT 6.
sWHILE HERE, CLEAR ALL OTHER BITS AND
;CLEAR THE INTERRUPT FLAG IN THE SELECT REG.
tNOW THE BIT IS IN THE CONTROLLING POSITION

MOvB

R1,TMPE .1

s THE

JSR
IENR
TMPE +1

RS,WRITE

8CsS

63¢

JSR
ACR

RS,RFAD

;READ THE CURRENT
: THE VIA'S ACR

B8CcsS

638

sEXIT

177677
175440

BIC
8IC8

000100
002475

8IS

0B8I76,R1

1SET BIT 6
CALL

tWRITE TO
:THE VIA'S

WILL

NOW

WRITE

THE

APPROPRIATE

TER

s INTERRUPT ENABLE/DISABLE
;EXIT ON ERROR

TTMTMPB

ON ERROR

INFORMATION

SETTING OF

VALUE

CNDMAAC DMV11 MCTRL DIAG o1
JINITT

INITIALIZE

MACRO M1200

22 FEB-84

15:22

PAGE

(5
36

1
SEQ 0058

TIMER & 1

2575
2576 004756
2577 004762
gg;g 004766

013701
042701
150137

002466
177477
002467

MOV
BIC
BISB

TMPB,R1
iGET THAT VALUE
0tC<BIT6+BIT?>,R1
;CLEAR BITS 6 £ 7
R1,TMPB.1
1ADD CURRENT BITS O

2580 004772
2581 V04776

004537
120013

004310

JSR
ACR

RS, WRITE

JWRITE

638

;EXIT ON ERROR

JSR
T1LL

RS, WRITE

sWRITE T0
:LOW ORDER LATCH REGISTER (TiL-L)

BCS

638

JSR
TILH
TMP7.1

RS, WRITE

IWRITE T0
;HIGH ORDER LATCH REGESTER (TIL-M)
: THE VALUE PASSED

MOV
RTS

(SP)+,R1
RS

;RESTORE R1
:RETURN

2582 005C00
eggs 005002
2584
2585 005004

2586 005010

2587 005012

2533
25
2590
2591
gggg

005014

V02467
103411

004537
120006

TTMMP6 .1

103404

004537
120007
002457

2595 005026
2596 005030
2597
2598
2595

012601
000205

2600
2601
2602
2603
2604 005032
2605

004310

002455

005016
005022
005024

2594

TMPB.
1
BCS

004310

63%:

TO NEW BITS 6 £

THE NEW REGISTER SETTING

70 VIA S ACR

: THE VALUE PASSED
(EXIT ON ERROR

.SBTTL
STALL -- DELAY FOR 10.5 MICRO-SEC'S (ON LSI-11)
HEY 0‘.“““‘.‘.““.““‘0““‘0“.‘..““‘“.‘“‘....‘..““..“...‘.““.‘.
.
: STALL -- THIS SUBROUTINE STAILLS FOR ABOUT 10.5 MICRO-SECONDS
$ - -“‘..“O“““““““‘00‘0‘0‘.““.‘.““0“‘...‘..“.“““‘...‘..0...0
‘.
000207

STALL:

RTS

CNDMAAO DMV11l MCTRL DIAG ot
STREG

STATIC

TEST OF

MACRO M1200

SPECIFIED DMV

5683

22 FEB 84

2609

H5
PAGE

37
SEQ 0059

11 LOCATION
.SBTTL

15:22

STREG

STATIC

TEST

SPECIFIED OMV-11 LOCATION

S ot‘t““““““““C‘“‘“0‘.0““0‘..‘.““00‘0‘0“‘000“.“0‘0“

gexo
611
g61§
61
2614
2615
2616
2617
2618
2619
2620
3621
622
3623
624

i
H
;
H
:
:
H
3
H
H
:
:
H
:
H

2625

STREG

CALLING

005034
005040

010037
010037

005050
005062

005044
005050
005052
005054

004537
000000
002306
103435

004310

2635
2636
2637
gggg

005056
005062
005064
005066

004537
000000
002312
103430

004064

2640
2641
2642
2643
2644
2645
2646

005070
005076

123737
000241

002310

002312

005100
005102
005110
005116

001423
013737
042737

005050
177760

002334
002334

005116
005124
005132
005140
2647 005146

012737
012737
012737
012737
000261

2648 005150

000207

TEST OF

THE

0“‘00“0

SPECIFIED REGISTER

SEQUENCE:

TO BE

TESTED>

JSR
PC.STREG
8CC
N$
:IF NO ERROR OCCURED, PROCEED WITH ROUTINE
ERROR
$AN ERROR MESSAGE HAS BEEN STACKED:
PRINT IT
<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE
(I.E. CKLOOP ) >
N$:

<RESUMPTION OF

NORMAL

PROCESSING>

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

STREG:

2s:

000001
000006
015565
006612

PERFORM A STATIC

2626
2627
5628
62
2630
2631
2632
ggg}

‘.0.‘.0‘.

MOV
MOV

RO,2$
RO,4s

sPUT

JSR
0
TDATA
B8CS

RS, WRITE

sWRITE IT
;248 MODIFIED FROM ABOVE
;ees MODIFIED FROM ABOVE
;ON ERROR, EXIT

JSR
0o
B8DATA
B8CS

RS .READ

10¢

sON ERROR,

cMPB
CLC

GDATA,BDATA

BEQ
MOV

10¢
2% ,REGNUM

8IC
GTDF

2177760,REGNUM
EM25,ERR7

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

10¢

002236
002240
002242
002244
SEC
10%:

RTS

SPECIFIED REGISTER'S ADDRESS

;:READ IT BACK AGAIN
;%¢s MODIFIED FROM ABOVE

IN 1/0 CALLS

sss
eas

see
*

EXIT

:REPORT READ/WRITE ERROR
:
QUEVE "DEVICE FATAL” ERROR & 6
MOV
MOV
MOV
MOV
;s INDICATE THAT AN ERROR WAS D:-TECTED

o7 EDF ,ERRTYP
26 ,ERRNBR
SEM2S , ERRMSG
SERR? ,ERRBLK

15
CNDMAA0 DMv1l MCTRL DIAG &1

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

MACRO M1200

22-FEB

15:22

PAGE

SEQ 0060

MPIMAN

.SBTTL

INTERRUPT HANDLER

-- MPIHAN

1400080080000 00000000 8000000000000 000000000000400400000000040000400008000000000

MPIHAN

COUNT

INTERRUPTS

USUALLY

INTERRUPT

"“A"

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"

ENTERED.,

~ 2800400020080 004400440440044844000008088488880888408840488888448200448044044400

010046

105737
001007
004737

002330

00443%4

002326
005222
000004

MPIHAN

MOV
TSTB

RO, (SP)
INTWCH

BNE
JSR
GEDF

104455
000007
015613
005414
000407
105237
005737
001402
004777
012600

BGNSRV

S$:

108

58
PC,GETBSR
EM34,ERR3

MPIHAN:
:

:SAVE RO

;HAVE WE BEEN TOLD TO WATCH FOR TYPE
;YES, DO NORMAL INTERRUPT PROCESSING

:NO,
H
:

"A"

DUMP REGISTERS AND
REPORT "UNEXPECTED INTERRUPT"
"DEVICE FATAL"” ERROR & 7
TRAP

.WORD
.WORD
. WORD

10$

;GO TO EXIT

INCB

INTFLG

; INCREMENT LOW BYTE OF INTERRUPT COUNTER

BEQ
JSR

10%
PC,AIHILNK

:NO, GET QUT
;YES, GO TO IT

TST

MOV

ENDSRV

IHILNK

(SP)+,RO

;ARE WE EXPECTED TO EXECUTE
;RESTORE

;RETURN TO

INT'S?

CSERDF

7
EM34
ERR3

ANOTHER RQUTINE?

I HOPE IT'S VALID!

INTERRUPTED PROCESS
L10002:

RTI

000002
000000

IHILNK:

.WORD

;POINTER

TO AUXILIARY

INT.

HANDLING ROUTINE

Jo
CNDMAQO DMV1l MCTRL DIAG 41
INTERRUPT MHANDLER

MACRO M1200

22 FEB

15:22

PAGE

SEQ 0061

MPOHAN

.SBTTL

2677
2678
2679
2680

INTERRUPT HANDLER

-- MPOHAN

$10AREAR00ARA0000000000000400400000000000000000000000000000040800000000400000040

;

MPOHAN

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
2694
2695 005252
2696 005256
2697 005262
2698 005264
2699 005270
2700 005272
005272

005272

2701
2702 005274

SIMPLY COUNT

INTERRUPTS

-- USUALLY

INTERRUPT

"B"

THIS ROUTINE WILL INCREMENT THE HIGH BYTE OF "INTFLG" EACH TIME IT IS
"IHOLNK"” IS NON-ZERQ, VECTOR TO THE ADDRESS THEREIN USING

ENTERED.
IF
A "JSR
PC"
1-

010046

105737
001007
004737

088008088804 4888048008408840884480088004480080084088804

002331
004434

000407

001402
004777
012600

002327
005274
000004

MPOMAN

MOV
1518

RO, -(SP)
INTWCH.
3

BNE
JSR
GEDF

104455
000010
015644
005414
105237
005737

BGNSRV

Ss:

10¢:

S5
PC,GETBSR
EM34B,ERR3

MPOMAN:
:

s SAVE RO

{HAVE WE BEEN TOLD TO WATCH FOR TYPE "B"”
:YES, DO NORMAL INTERRUPT PROCESSING
;iNO,
DUMP REGISTERS AND
:
REPORT "UNEXPECTED INTLQRUPT"

“DEVICE FATAL"” ERROR # 8

10¢

;GO TO EXIT

INCB

INTFLG-1

; INCREMENT HIGH BYTE OF

8EQ
JSR
MOV
ENDSRV

10$
PC , 9IHOLNK

THOLNK

(SP)+,RO

THOLNK;

.WORD

IMNT'S?

CS$ERDF
8

EM348B
ERR3

INTERRUPT COUNTER

;ARE WE EXPECTED TO EXECUTE ANQOTHER ROUTINE?
:NO, GET QUT
;YES, GO TO IT I HOPE IT S VALID!

;RESTORE RO
;RETURN TO

INTERRUPTED PROCESS
L10003:

000002
000000

TRAP

.WORD
.WORD
.WORD

B8R
TST

$440480448000400040004040

;POINTER

AUXILIARY

INT.

RTI

HANDLING ROUTINE

CNDMAAO DMV11 MCTRL DIAG @1
GLOBAL ERROR REPORT REPORT

MACRO M1200

IK5
22-FEB-84

15:22

PAGE

SEQ 0062

SECTION

.SBTTL

2704
2705
2706
2707
2708
2709

GLOBAL ERROR REPORT REPORT SECTION

$// /777777777777 7777777%7/7777777777777777777777772777777/7777777777777/77277777777

¥4
s/

THE GLOBAL ERROR REPORT SECTION CONTAINS ERROR MESSAGES
THAT

ARE

USED

IN MORE

THAN ONE

TEST.

3 /7777777777777 7777777777777727777777772777777277777777772/7777/7777/777777727/77777777

2710
2711
2712
2713
2714 005276
005276
2715 005276
2716 005302
005302
005302
2717
2718
2719
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 005422
005412
005412
2727
2728
2729
2730 005414
005414
2731 005414
2732 005420
2733 005424
005424
005424

.EVEN

SBTTL

004737

012072

ERROR HANOLER

-- ERRI

BGNMSG

ERR1

JSR
ENDMSG

PC .NULERR

”NO NOTHING“ HANOLER

sUSE COMMON ROUTINE

:
10004

104423
SBTTL

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

153716

012746
012746
010600
104414
062706
004737
004737

002334
013605
0l2124
000003
000010
011276

ERR1::
TERMINATE ERROR MESSAGE

ERROR HANDLER

ERRZ

CSHSG

MOV

REGNUM, -(SP)

CSR REGISTER ERROR REPORTING

BGNMSG

ERRZ

PRINTB

&FMT02,8TXTS,REGNUM

ERRZ2:
:
MOV
MOV

JSR
PRINTB

PC.XORGB
OFMTO2A,<B,GDATA>,
<R ,EDATA>, <B,XDATA>

002314
002312

002310

012161
000004

000012
011322
012072

TRAP

MOV
MOV
TRAP
ADD

03, -(SP)
SP,RO
CSPNTB
210,SP

CLR
8ISB
CLR
8IS8
CLR
8Is8

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

MOV
MOV

JSR

gagHSG

PC.ERR4S

PC .NULERR

;USE

;DUMP THE BYTE

COMMON ROUTINE

MOV
TRAP
ADD
SELECT REGISTERS
TERMINATE

L1000S:

104423

#TXTS, -(SP)
oFMT02, (SP)

ERROR

TRAP

OFMTO2A, -(SP)
84, -(SP)
SP,RO
C$PNTB
@12,.SP

MESSAGE

CSHSG

pumMP THE BYTE SELECT REGISTERS

004737
004737

104423

011322
012072

BGNHSG

ERRS

JSR
JSR
ENDMSG

S
PC.ERR4
PC,NULERR

ERR3::

;USE COMMON ROUTINE

TO TERMINATE ERROR MESSAGE
L10006:

TRAP

C$MSG

L5
CNDMAAO DMV11 MCTRL

ERROR HANDLER

DIAG o1

ERR3

OUMP

MACRO M1200

THE BYTE

2734
2735
2736
2737 005426
2738
2739
2740
2741
2742

2743
2744
2745
2746
2747
2748
2749
2750
2751

005426
005426
005430
005434
005440
005442
005442
005444
005446
005452
005456
005460
005462
005466

005470
005472
005474
005500
005502
005506
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
005566
005572
005574
005576
2761 005602
2762 005606

005606
005612

22-FEB-84

122701
103013

005046
150116
012746
012746
010600
104415
062706
000425
001001
005001
022701
003002
012701
006301

016146
005046

153716
012746
012746
010600
104415
062706
012601
004737

PAGE

SEQ 0063

SELECT REGISTERS

.SBTTL

010146
113701

15:22

002310
000017

ERROR HANDLER
BGNMSG

ERR4

MOV

R1,-(SP)

MOVB
CMPB
BHIS
PRIN'X

ERR4

M-LOOP

TIMEOUT ERROR HANDL ING

1 SAVE

GDATA,R1
©17.R1
S
OFMTS,<B,R1>

Ss:

000007
000006

6$:
7%:

017532

208

BNE
CLR
cMP
8GT
MOV

6
R1
07.R1
78
96 ,R1

ASL
PRINTX

ERR4:
:
WORKING REGISTER

i SAVE THIS FOR LATER
;sWAS THIS AN M-LOOP REQUEST?
s YES, THEN REPORT THE FUNCTION CODE
:NO,
THEN IT MUST BE A BSEL1 SETTING
CLR
-(SP)
8ISB
R1,(SP)
MOV
oFMTS, (SP)
MOV
82,-(SP)

012400
000002
000006

THE

R1
OFMTSA,<B,GDATA>

MOV
TRAP

SP,RO
CS$PNTX

ADD

%6 ,5P

sIF IT WAS A 17, THIS IS A "NOP" AND
:
THE TEXT POINTER MUST SO REFLECT,
: IS FUNCTION CODE > 7?
;NO,
THEN WE CAN HANOLE IT
sYES, THEN IT'S UNDEFINED
SAY SO

;CONVERT TO A WORD OFFSET
TXTMLT(R1)
:REPORT THE FAILING FUNCTION

002310
012443
000003

MOV
CLR
BISB
MOV
MOV

TXTMLT(R1), (SP)
-(sP)
GDATA,(SP)
OFMTSA, -(SP)
23, (SP)

000010

ADD

210,5P

011710

MOV
TRAP

20$:

MOV
JSR

ENDMSG

(sP)+,R1
PC.ERRSS

sRESTORE THE WORKING REGISTER
sOUMP THE SELECT REGISTERS
L10007:

104423

.SBTTL

013746
012746
012746
012746
010600
104414
062706
004737

002334
013605
012124
000003

013746
013746

002314
002312

000010
011276

ERROR HANDLER

ERRS

WORD SELECT REG.

BGNMSG

ERRS

PRINTB

#FMT02,0TXTS,REGNUM

RAP

PC, XORGB
oFMT10,GDATA,BDATA,XDATA

C$MSG

ERRORS
ERRS:

MOV
MOV
MOV
MOV

MOV
TRAP

JSR
PRINTB

SP,RO
CSPNTX

REGNUM, -(SP)
2IXTS, -(SP)
oFMT02, -(SP)
€3,-(sSP)

ADD

SP,RO
CSPNTB
210,5P

MOV
MOV

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

M5
CNDMAAO DMV11 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
27171 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

-- ERRS
013746
012746
012746
010600
104414
062706
004737

MACRO M1200

-- WORD SELECT REG.

22-FEB

15:22

PAGE

40-2

SEQ 0064

ERRORS

002310
012654
000004
000C12
011710

JSR

ENDMSG

PC,.ERRS$

;e«s

010146
012701

012746
012746
012746
010600
104415
062706

002604
013632
012562

L10010:

005046
152116
005046

005046
152116
005046
152116
012746
012746
010600
104415
062706

012701

005046

C$MSG

THE

FIRST

HALF

THE

REGISTERS

MOV
MOV
MOV
MOV
TRAP

8TXT?,-(SP)
#FMTO6, -(SP)
42, -(SP)
SP,RO
CS$PNTX

#4s

MOV
MOV
PRINTX

R1,-(SP)
@PATCR,R1
oOFMTO06,0TXT7

+PRESERVE R1'S CONTENTS
;POINT TO EXPECTED VALUES

PRINTX

ADD
96,SP
0FHT06A.0TXT8A.<B.(R1)0>.<8.(R1)0>.‘8.(R1)0>.<8.éflé)0>.‘86§g§)0’.<B.(Rl)0>
L

152116

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

TRAP

ERR6

000002

000006

GDATA, -(SP)
#FMT10, -(SP)
24, -(SP)
SP,RO
C$PNTB
#12,5SP

;OUMP THE SELECT REGISTERS

104423

BGNMSG

MOV
MOV
MOV
MOV
TRAP
ADD

014004
012571
000010

000022

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

012637

000003
000010
003122

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

MOV
TRAP
ADD

SP,RO
CSPNTX
022,5P

CLR
BISB
CLR
8IS8

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

MOV

PRINTX

MOV

PRINTX

#8T71,R1

tPOINT

TO ACTUAL VALUES

8ISB
CLR
8IS6
CLR
BIS8
CLR
8Is8
CLR
BISB
CLR
BISB
MOV

MOV
MOV
MOV
TRAP
RDD

OFMTO6A, -(SP)

9FMTO6B,
@3, (SP)
SP,RO
CSPNTX
#10,5P

(SP)

OFHTOGA.OTXTBB.<B.(R1)0>.<8.(R1)0>.<8.(R1)'>.<8.éflé)o>.<B.(R%)o>.<8.(R1)v>
L

(SP

CNDMAAO DMV11 MCTRL DIAG €1
ERROR HANDLER

006014
006016
006020
006022
006024
006026
006030
006032
006034
006036
006040
006042
006046
006052
006056
006060
006062
27177 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 006176
006176
006200
006202
006204

006206
006212
006216
006220
006222

ERR6

MACRO M1200

22-FEB-84

15:22

VIA REGISTER ERRORS W/FULL REG.

NS
PAGE

SEQ 0065

DUMP

152116
005046
152116
005046
152116
005046

8ISB
CLR
8IsB

005046

005046
152116
005046
152116
012746
012746
010600
104415
062706
012701

014021
012571
000010

000022
PRINTX

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

012637
000003

000010
003206

MOV

PRINTX

#8T12,R1

;POINT

TO XOR VALUES

(R1)+,(SP)

8IS8e

(R1)+,(SP)

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

CLR
BISB
CLR
BIS8
MOV

-(SP)
(R1)+,(SP)
-(sP)
(R1).,(5P)
OFMT068B, -(SP)

ADD

152116

005046

152116

005046

152116

014036
012571
000010

000022

000010

#3,-(SP)
SP,RO
CSPNTX

€10,5P

0FHTO6A.0TXT8C.<8.(R1)o>.<8.(R1)o>.<B.(R1)o>.<B.éRé)o>.<Begg§)¢>.<8.(R1)o>

oFMT068,<B,(R1)+¢>,<B,(R1)s>

BISB
CLR

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

CLR
8Is8
CLR
8IS8
CLR
BISB
CLR
8Is8

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

B8ISB

012637
000003

-(SP)

MOV
MOV
MOV
MOV
TRAP
ADD

PRINTX

(R1).+,(SP)

B8ISB

MOV
MOV
TRAP

005046
152116
005046

005046
152116
005046
152116
012746
012746
010600
104415
062706

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

CLR

005046
152116

005046
152116
012746
012746
012746
010600
104415
062706

CLR
81s8
CLR

8IsS8

152116

152116
005046
152116
012746
012746
012746
010600
104415
062706

CLR

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

(R1)+,(SP)

MOV
MOV
MOV
MOV
TRAP
ADD

@TXT8C,-(SP)
OFMTO6A, -(SP)
210, (SP)
SP,RO
CS$PNTX
#22,5P

CLR
8IS8
CLR
8ISB

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

MOV
MOV
MOV
TRAP

ADD

#FMT06B,
03, (SP)
SP,RO
CSPNTX

210,5P

(SP)

CMOMAAQO DMV11 MCTRL DIAG o1
ERROR MANDLER

2781
2782 006226
2783 006232
006232
006236
006242
006246
006250
006252
2784 006256
006256
006260

2785 006332

ERR6

22-FEB

Bé
84

15:22

VIA REGISTER ERRORS W/FULL REG.

012701

0V2614

012746
012746
012746
010600
104415
062706

013717
012562
000002

PAGE

40 4

5EQ 0066

DUMP

1eee PRINT SECOND HALF OF THE REGISTERS eses
OPATCR.8,
,R]
tPOINT TO 2ND MALF OF REGISTERS EXPECTED VALUES

MOV
PRINTX

OFMTO6,0TXT7A

MOV
MOV
MOV

MOV
000006

PRINTX

005046
152116
005046
152116
005046
152116
005046

152116
005046
152116
005046
152116
012746
012746
012746
010600
104415
062706

MACRO M1200

CePNTX

CLR
8I1se
CLR
8I1s8
CLR
8Ise
CLR

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

6 ,SP
®FMTO6A,0TXTBA,<B,(R1)¢>,<B,(R1)e>,<B,(R1)e¢>,¢B,(R1)s>,¢ B.(R1)s>,B,(R1).>

CLR
8I1se
CLR

8158
MOV

014004
012573
000010

2786 006362
2787 006366

005046
152116
005046
152116
005046
152116
005046
152116
005046
152116
005046
152116
012746
012746
012746
010600

104415

®TXTBA, -(SP)
OFMTO6A, -(SP)
€10, -(SP)
SP,RO

(SP)
(R1).,(SP)
(sP)
(R1).,(SP)

012637
000003

oFMT068, -(SP)

MOV

PRINTX

014021
012571
000010

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

022,5P

PRINTX

000010
003132

(R1).,(SP)

CSPNTX

000022

152116

005046
152116
012746
012746
010600
104415
062706
012701

02,-(5P)

SP,RO

TRAP
ADD

8IS8

005046

OTXT7A,
oFMT06,

#811.8. ,R1

ADD

3, -(5P)
SP,RO
CSPNTX
@10,SP

sPOINT TO 2ND MALF OF ACTUAL VALUES
O0FMTO6A,0TXT8B,<B,(R1)e>,<B,(R1)+>,<B,(R1)e>,<B,(R1)e>,<B,(R1)s>,<B,(R1).>
CLR
8158
CLR
8Is8
CLR
8IS6e
CLR
8Is8
CLR
8Is8
CLR
8IS8
MOV

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

(R1).,(SPY

4TX788, (SPY
MIOGA, (SP)

010, -(SP)
SP RO
CSPNTX

CNODMAAO DMV11 MCTRL DIAG o1
ERROR MANDLER

006436

<788 006442
006442
006444

006446
006450
006452
006456
006462
006464
006466
2789 006472
279C 006476
006476
006500
006502
006504
006506
006510
006512
006514
006516
006520
006522
006524
006526
00n532
006536
006542

2791

2792 006602
2793 006604

2794

2795
2796
2797
2798 006612
006612
2799 006612
2800 006616
2801 006620
006620
0066524
006630

ERR6

062706
005046
152116
005046
152116
012746
012746
010600
104415
062706
012701

MACRO M1200

22 FFB 84

15:22

VIA REGISTER ERRORS W/FULL REG.

Cé

PAGE 40 S
SEQ 0067

DUMP

000022
PRINTX

ADOD

OFMT0O6B,<B,(R1)¢>,<B,(R1)e>

CLR

eIrss

CLR
8158

012637
000003

000010
003216

MOV

PRINTX

005046
152116
005046
152116
005046
152116

B812.8, ,R1

tPOINT

TO 2ND MALF 0F XOR VALUES

CLR
B1s8
CLR
8IsB
CLR
8Is8
CLR

152116

BISB8

005046

CLR
8Is8
CLR
8ISB

152116

012746

012746
010600
104415

062706

005046
152116
005046
152116
012746
012746
010600
104415
062706
012601
004737

014036
012571
000010

MOV
MOV

MCv

MOV
TRAP
~DD

000022
PRINTX

&oFMT068,<B,(P1)+>,<B,’R1)+>

CLR

8I1s8

CLR
gIs8
MOV
MOV

012637
000003

MOV
JSR

ENDMSG

(SP).+ ,R1
PC,NULERR

iRESTORE R1
;USE COMMON ROUTINE

ERROR HANDLER

006301

016146
012746
012746

002334

017554
014327
012530

BGNMSG

ERR?

MOVB
ASL

REGNUM,R1
Rl

PRINTB

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

oFMT06B8,
03, (SP)
SP,RO
CSPNTX
210,5P

(SP)

ERR7

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

(R1).,(SP)

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

4TX78C, -(SP)
OFMTO6A, -(SP)

010, -(SP)

SP.RO
CSPNTX
022.5P

(sP)

(R1).,(SP)

-(SP)
(R1).,(SP)
oFMTO68,
- (SP)
03, -(SP)
SP,RO
CSPNTX
210,5P

TERMINATE ERROR MESSAGE
L10011:

104423

113701

MOV
TRAP
ADD

000010

012072

-(SP)

(R1).,(5P)

OFHTOGA.OYXYGC.fe.(Rl)o*.¢B.(R1)o>.<8.(fll)o>.‘B.(Rl)o>.<8.(Rl)»).fB.(Pl)0»

005046

005046
152116
012746

MOV
MOV
MOV
TRAP
ADD

022,5P

TRAP

CeMSG

VIA REGISTER ERRORS

ERR7::
$AS PASSED,

OFMTO7,0TXTVR, TXTVRT(R1)

THIS WAS A BYTE

QFFSET

MOV

TXTVRT(RL)Y, -(SP)

#8TXTVYR, -(5P)

QFMTOT,

(SP)

CNOMAAO DMV11 MCTRL DIAG o1
ERROR HANDLER

006634
006640
006642
006644
2802 006650
2803 006654
006654

006656
006662
006664
006670

006672
006676
006702
006706
006710

006712
2804 006716
2805 006722
006722
006722
2806
2807
2808
2809 006724
006724
2810
2811
c812 006724
2813 006730
2814 006732
2815 006736
2816 006740
2817 006742
2818 006744
2819 006750
006750
006752
006756
006762
006764
006766
2820
2821
2822 006772
006772
006776
007002
007004
007006
2823
2824
2825 007012
007012
007016
007022
007024

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

MACRO M1200

22 FEB

D6
B4

15:22

PAGE

40 6

5€Q 0068

VIA REGISTER ERRORS
000003

000010
o11276

JSR

PRINTB

MOV
MOV
TRAP
ADD

PC ., XORGB

&FMTO2A,<«B,GDATA>,<B,BDATA>,<B,XDATA>

CLR

002314

002312

002310
012161
000004
000012
012072

JSR
ENDMSG

PC,NULERR

tUSE

COMMON ROUTINE

MOV
OFMTO2A,
MOV
84, (SP)
MOV
SP,RO
TRAP
C$PNTB
ADD
212,5P
TERMINATE ERROR MESSAGE

TRAP

BGNMSG
PRINT

002444

000006

007614

ASL

FOR RAM DATA ERRORS

IN STATIC

iGET TEST PATTERN COOE
$ZERO IS UNDEFINED BUT

THERE

TEXT

2%
RO

s IF WITHIN LIMITS, LET IT GO
sELSE, MAKE IT O FOR "UNDEFIMED"

ITXT47P(RO),RO

sGET ADDRESS OF REQUIRED TEXY

sCONVERT

oOFMT47A,RO

s IDENTIFY

TO A WORD
TEST

PATTERN BEING

MOV

PRINTX

LINE

MOV
TRAP
ADD

oFMT478

31STANDARD PORTIOM OF

LINE

MOV

PRINTX

HEADING

LINE

oFMTA7C

MOV
TRAP
ADD

;STANDARD

THAT

RO,

(SP)

82,

(SP)

USED

MOV

HEADING

TO SAY

INDEX

000004

007322
000001

TEST(S)

$THIS IT ALL WE UNDERSTAND FOR NOW

007232
000002

007263
000001

C$MSG

ERRA47?

PRINTX

01274¢€
012746
010600
104415

(SP)

ERRA47?

RO, 06

BLE
CLR

MOV

ERRA47?

TMP2 ,RO
2

cHP

2%:

HEADING LINE

MOV
BEQ

012746
012746
010600
104415
062706

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

L10012:

ERROR HANDLER

010046
012746
012746
010600
104415
062706

(SP)

8IS8
CLR
BIs8
CLR
BISB

104423

0137090
001404
020027
003401
005000
006300
016000

03, (SP)
SP,RO
CSsPNTB
210,5P

PORTION OF

( INE

FMTA7A, -(SP)

SP,RO
CSPNTX
26,5P

oFM7478, -(SP)

o1,

(SP)

SP,.RO
CIPNTX
24 ,5P

MOV

MOV
MOV
TRAP

FMIZTC,
- SP)

1, (SP)
SP,RO
CSPNTX

CNOMAAO DMV1I1 MCTRL

DIAG 21

MACRO M1200

FEB

15:22

PAGE

SEQ 0069

ERR4?

FOR

007026
2826
2827
2828 007032
007032
007036
007042
007044
007046
2829
2830

062706

000004

012746
012746
010600
104415
062706

007350

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
2846 007130
*2847 007134
2848 007136
007136
007140
007142
007144
007150
007152
007154
007160
007164
007170
007172
007174
2849 007200
€850 007206
2851 007210
007210
007214
007229
007222
007224
2852 007230

012746
012746
010600
104415
062706
005037
004737

012121
000001

MOV
MOV

000004

ADD

ERROR HANDLER

2831 007052

RAM DATA

ERRORS

STATIC

TEST(S

HEADING LINE

PRINTX

o&FMTA7E

¢ 4

1 STANDARD PORTION OF

LINE

ADD

04 ,<P

MOV

OFMTAT7E, -(SP)
01, -(SP)

MOV
TRAP

SP,RO
C$PNTX

000001

MOV

000004

GO PRINT
PRINTX

DATA PORTION OF
&NEMWLIN

ADD

ERROR MESSAGE
s TERMINATE

MEADER

CAUSE

BLANK

LINE

MOV
TRAP

007104
007110

CLR
JSR
ENOMSG

ER47CT
PC.ERRA7,

tRE-INITIALIZE THE DATA LINE COUNTER
tUSE COMMON SUBROUTINE TO REPORT DATA
L10013:

104423

ER47CT:
ER47MX:

000000
¢00020

24 ,5P

TRAP

ONEMWL IN,
e1,-(SP)
SP,RO

(SP)

CSPNTX
94 ,SP

C$MSG

.WORD
,WORD

O
16.

: THIS VARTABLE WILL COUNT THE DATA LINES
: THIS CONSTANT LIMITS THE DATA LINES PRI NTED

cMP
BHIS
INC

ERA7CT ,ERATMX
60$
ER4TCT

tHAVE WE REPORTED ENOUGH OF THESE DATA L INES?
s YES,
BYPASS THIS WHOLE ROUTINE AND EXI
iNO,
COUNT THIS LINE

TMP4 ,R1

:GET EXPECTED DATA

ERRA47.:

023737
103044
005237

007104

007106

007104

113701
113703

002450

C74103

MOVB

002452

MOVB

XOR
PRINTX

005046

]

’

150316

005046

153716
005046
150116
013746
012746
012746
010600
104415
062706
023737
001010

002452

012746
012746
010600
104415
062706

010644
000001

000207

TMPS5,R3

;SETUP TO CALCULATE XOR

R1,R3
;CALCULATE XOR OF EXPECTED & ACTUAL DATA
@FMT47G,TMPA,<B,R1>,<B,TMPS>,<B,R3> ;PRINT DATA LINE
CLR

BISB
CLR

’

8IS8
CLR
8Is8
MOV
MOV
MOV
MOV
TRAP
ADD

002464
007407
000005

000014

007104

007106

cMP

BNE

PRINTX

000004

ER4Q7CT ,ER4 TMX

+IF

oOFMTA8I

$ANY

THESE

N
.

TWO RRE EQUAL,

UUT

A MESSAGE

THATY

RTS

(SP)

214,5P

SO,

EFFFCT,
MOV
MOV

MOV
TRAP

60%:

o5, (SP)
SP.RO
CSPNTX

WE WON'T BE PRI NTING

MORE LINES FOR A WHILE,

FUT

OFMTA7G,

ADD

oFMT4R8I,

SP,.RO
CSPNTX
24,5P

CNDMAAO DMV11 MCTRL DIAG &1
ERROR HANDLER

2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868

ERR47

MACRO M1200

FOR RAM DATA ERRORS

007232
007263
007322
007350
007407
007442
007453
007466
007510
007533
007556

045
045
045
045
045
101
101
061
062
101
111

116
116
116
116
116
114
114
040
040
104
116

045
045
045
045
045
114
114
102
102
104
103

c07614
007622
007630

014235
007466
007556

007442
007510

007453
007533

2869
2870
2871
2872
2873
2874
2875 007632
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

F6
15:22

IN STATIC

.NLIST

BEX
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
TXT47C: .ASCIZ
TXT470: .ASCIZ
TXTA7E: .ASCIZ
TXT47f
; .ASCIZ
TXT47G: .ASCIZ
TXT4A7H; .ASCIZ
LIST
BEX
.EVEN
TXT47P; .WORD

FMTA7A;
FMT478:
FMTA47C:
FMTQTE:;
FMT47G:

"TXTML6"

PAGE

SEQ 0070

TEST(S

\SNSS20ATEST PATTERN:
T\
\s#NuS2#A
(ALL VALUES IN OCTAL)\
\sNuS38A
RAM
SHOULD\
\#N#S3SAADDRESS
BE
IS
XOR\
\®N%S4%04%S48038S 3803852803\
\ALL ONES\
\ALL ZEROES\
\1 BIT ALTERNATING\
\2 BITS ALTERNATING\
\ADDRESS IN ADDRESS\
\INCREMENTAL VALUE IN ADDRESS\

TXTML6, TXTA7C,T
TXTA7E, TXT47F
XTA7
,TXT47G, D,
TXT47H

ABOVE

[S DEFINED

PRINT HEADING LINE

012746
012746
010600
104415
062706
032737
001410
012746
012746
010600

104415
062706

012746
012746
010600
104415
062706

012746
012746
C10620

PRINTX

010300
000001
000004
000004

002350

SIT

EqQ

PRINTX

010347
000001

40-8

"UNDEFINED”

iSTANDARD PORTION OF

BIT2,PFLAG

;IF

oft'T488

sPRINT

M-LOOP FUNCTION OEF'S.

ERR48

#0fFMTA8A

THE

EXTENDED

LINE

MOV
MOV
MOV
TRAP
ADD

INFORMATION REQUESTED,

EXTENDED PORTION OF

LINE

000004

010402
000001

2$:

HEADING LINE

PRINTX

aFMT48C

& 2
:STANDARD PORTION OF

LINE

MOV
MOV
MOV
TRAP
ADD

HEADING LINE

PRINTX

oFMTA8E

CSPNTX
94 ,5P

oFMTA488,
21, (SP)
SP,RO

(SP)

CSPNTX
04 ,SP

000004

010427
000001

1
MOV
MOV
MOV
TRAP
ADD

#FMTABA, -(SP)
1, -(SP)
SP,RO

oFMT48C,

o1,

(SP)

SF,RO

CSPNTX
24 ,5P

3
:STANDARD PORTION OF

LINE

3
MOV

MOV

SFMTA8E,
21, (SP)

MOV

SP.RO

(SP)

TNDMAAO DMV11 MCTRL DIAG 41
ERROR HANDLFER

007734
007736
2889 007742
2890 007750
2891 007752
007752
007756
007762
007764
007756
2892
2892
2894 007772
007772
007776
010002
010004
010006
N10012
010016
010022
010022
010022
010024
010026

ERR48

FOR

104415
062706
032737
001410

000004
000004

012746
012746
C1060C
104415
062706

DATA

ERRORS

“MOVING

15:22

G6
PAGE

40-9

SEQ 0071

INVERSION

TRAP

002350

gIé
3

PRINTX

MBIT2,PFLAG
63

1+ IF EXTENDED

#HFMTA48F

iPRINT

ADD
INFORMATION REQUESTED,

EXTENDED

PORTION

LINE

012121
000001

104415
062706
005037
004737

000004
010024
010030

GO PRINT DATA PORTION OF ERROR MESSAGE

6%:

PRINTX

CLR

JSR

ENDMSG

oONEWLIN

ER4BCT

PC,.ERRAS8,

i TERMINATE

HEADER

tRE-INITIALIZE

& CAUSE

C$PNTX

#4,5P

MOV
MOV
MOV
TRAP
ADD

000004

BLANK LINE
MOV
MOV
MOV
TRAP
ADD

THE DATA LINE COUNTER

OFMTA3F, -(SP)
41, (SP)
SP,RO
C$PNTX
¢4 ,5P

ONEWLIN, -(SP)
21, -(SP)
SP,RO
CS$PNTX
04,5P

1USE COMMON SUBROUTINE TO REPORT DATA
L10014;

104423

TRAP

000000
000020

ERABCT:
ER48MX:

010030
010030
010036
010040

22-FEB

010506
000001

012746
012746

010600

MACRO M1200

.WORC
. WORD

O
16.

: THIS VARIABLE WILL COUNT
i THIS CONSTANT LIMITS THE

ER48CT,ER48MX

{HAVE

C$MSG

THE DATA LINES
DATA LINES PRINTED

ERRA48.
:

023737
103117
005237

010024

010026

cMP

BHIS
INC

010024
;

010044
010052
C10054
010060
C10064

032737
001405
012700
113701
000404

010066
010072
010076
010102
010104
010104
010106
010110
010112
010116
010120
010122
010126
010130
010134
010140

012700

113701

013703
074103
005046
150316
005046
153716
005046
150116
013746
010046
012746
012746
010600

000002

002452

i YES,
sNO,

REPORTED ENOUGH OF

002476

BIT
8EQ
MOV

MOVB

24:
a4

PRE -WRITE OR POST-WRITE:

;010 PRE-WRITE ERROR CALL GET US HERE?
iNO, THEN SETUP FOR “POST” IN ERROR MESSAGE

TMP4 ,R1

:GET EXPECTED DATA (BEFORE

#TXT48A,RO

MOV

2TXT488B,R0

MOV
XOR
PRINTX

DATA LINES?

eBIT1, TMPF
23

B8R

MOvVB

THESE

BYPASS THIS WHOLE ROUTINE AND EXIT
COUNT THIS LINE

DETERMINT WHICH ERROR CALL GOT US HERE

010736
002450

010743
002451
00245°

60
ER48CT

TMP4.1,R1

:YES,

sPOINT

SETUP

FOR

"POST"

"“PRE”

IN ERROR

MESSAGE

WRITING NEW VALUE)

TEXT

tGET EXPECTED DATA (AFTER WRITING NEW VALUE)

TMPS,R3
$SETUP TO CALCULATE xOR
R1,R3
sCALCULATE XOR OF
OECTED & ACTUAL DATA
#FMT48G,RO,TMPA,<B,R1>,<
TMPS>
B,
«$> PRINT STSNDARD DATAP%INE

LR
81s8
CLR
8Is8

(S
R3,(SP)
-(SP)
TTMPS,(SP)

8Is8
MOV

R1,(SP)
TMPA, -(SP)

MOV
MOV
MOV
MOV

RO, (SP)
9FMTA8G, -(SP)
o6, (SP)
SP,RO

CLR

002464
010551
000006

(sP)

H6
CNDMAAO DMVl MCTRL DIAG 41

ERROR HANDLER

ERR48

MACRO M1200

104415
062706
032737
001433

000016
000004

2924 010160
2925
2926
2927
2928

013701

2929 010202

042701
00S737
001003
01270C¢

002470

000402

2930 010204
2931 010210
010210
010212

010216
010220
010222
010226

010232
010236
010240
010242
2932 010246
2933 010254
2934 010256
010256
010262
010266
010270
2935
2936
2937
2938
2939
2940
2941
2942
2943
2944

010272

010276
010276

012700

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

002350

010750
010755

000014
010024

062706

000004

010026

10¢:

MOV
PRINTX

#7X748D,R0
;BACKWARD
ofFMT48H,TMPB,R1,R0,<B,TMP9>

;PRINT EXTENDED INFORMATION
CLR
-(SP)
BIS8
TM s,05F)
MOV
RO, -(SP)
MOV
R1, (SP)
MOV
TTMPB, (SP)
MOV
#FMTA8H, (SP)
MOV
85, -(SP)
MOV
SP,RO
TRAP
CS$PNTX
ADD
¢14,5P
;IF THESE TWO ARE EQUAL, WE WON'T BE PRINTING

ERABCT ,ERA8MX
60$
oFMTABI

RTS
BEX

TXT48A:

.ASCIZ

\PRE

FMTA8A:
FMT48B:
FMT48C:
FMT48E:
FMTA8F:
FMTA8G:
FMTA48H:
FMTA8I:

2947 010743

120

117

123

TxT488:

122

106
113

105

127
127

TXT48C:
TxT48D:
LLIST
.EVEN

gggg

.SBTTL

2957 010762

002467

CIPNTX
016,SP

t
MAKE SURE WE ONLY HAVE ONE BIT
;OIRECTION?
:BACKWARD
; F ORWARD

8¢

.NLIST

sANY MORE LINES FOR A WHILE.
SO,
;
PUT OUT A MESSAGE TO THAT EFFECT.

MOV

9FMTA8I, -(SP)

ADD

Q4,5P

01, -(SP)
SP,RO
C$PNTX

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

\#NsS2#APRE OR
(ALL VALUES IN OCTALN
\®SSHAEXTENDED INFORMATION:\
\®NuS3I#APQOST
RAM
SHOULD\
\SNsSS2#AWRITE
ADDRESS
BE
IS
XOR\
\wSS#ABIT
OATA
SEQ
LSB(DECIMAL)\
\#MNuS3sTeS4%04%54%038S3803852%03\
\#S6%01%SS#018S38THS28D2%A,
\
\wNSNsSSSAFURTHER DATA LINES SUPRESSED UNTIL NEW TEST DATAN

.ASCIZ

\POST\

.ASCIZ
.ASCIZ
BE
X

\ FWD\N
\BKWD\

ERROR HANDLER -

0072

:DATA BIT VALUE (0 OR 1)

#tCBITO,R1
TMPD
68
#TXT48C,RO

MOV
MOV
TRAP
60%$:

€Q

;SETUP FOR PRINTING OF EXTENDED INFORMATION

8IC
TST
BNE
MOV

cHP

045
065
04S
045
065
045
066
045

010146
113701

TTMMPC,R1

BNE
PRINTX

116
123
116
116
123
116
123
116

010762
2958 010762
2959 010764

MOV

10¢

000001

000207

040
102

TRAP
ADD
1 IF EXTENDED INFORMATION REQUESTED,

002466
010611
000005

045
045
045
045
045
045
045
045

2948 010750
2949 010755
2950
2951
2952
2953
2954

002462

010644

120

08IT2,PFLAG

6%:
8s$:

010300
010347
010402
010437
010506
010551
010611
2945 010644

2946 010736

PAGE 40

BIT

BEQ

177776
002472

012746

012746
010600
104415

15:22

- FOR DATA ERRORS IN "MOVING INVERSION

010142
010144
2921 010150
2922 010156
2923

010164
010170
010174
010176

22-FEB 84

BGNMSG

ERRS50

MOV
MOVB

R1, (SP)
TMPB+1,R1

ERRSO0

eeaen

FOR REPORTING TIMER & 1 ERRORS

:SAVE R1 FOR CALLER
tGET THE MODE ( AST SETUP

ERRSO:
:

MACRO M1200

CNDMAAO DMV1l MCTRL DIAG @1
ERROR HANDLER

2960
2961
2962
2963
2964
2965
2966
2967
2968
2969

ERRSO

010770

000241

010772
010776
C11000
011002

042701
106101
106101
1061901

FOR

REPORTING

TIMER

22 FEB
@

15:22

011022

2970
2971
2972 011026
011026
011032
011036
011040
011042
2973
2974
2975 011046
011046
011050

cLc

177477

1SEEING AS
;:THE

8IC

atC<BIT6+BIT7>,R1

ROLB
ROLB
ROLB

R1
R1
R1

011054
011056
011062
011064
011070
011072
011076
011102
011106
011112
011114
Ol1116
2976 011122
011122
0l1124
011130
011132
011136
011142
011146
011150
011152
2977

2978
2979 011156
011156
011160
011164

012747
000002

012746
012746
010600

013021
000001

000006

000004

002457

153716
005046
153716
012746
012746
012746
010600
104415
062706

002451

005046

153716
005046
153716
012746

012746

010600
104415
062706

;LOOK & JUST

tPOSITION

THE MODE BEING USED AT

THE

FOR

THE

TIMER

PRINTOUT

WILL BE ROTATED
CLEAR

JUST

;PRINT

THE

PRINTX

;AND

TIME:

THE

HEADING

IDENTIFY

THE

REGISTERS:

O&FMTS0B

VALUES

THAT

WFRE

LOADED

INTO

THE

REGISTERS:

@FMTSOD, <B,TMPB+1>,<B,TMPE+1>

002475

MOV
MOV

oFMTS08,
a1, (SP)

MOV
TRAP

SP,RO
CS$PNTX

ADD

24,5P

216,5SP

CLR
B8ISB

-(SP)
TMPE+1,(SP)

000010

MOV

VALUES READ FROM

THOSE

REGISTERS:

-(SP)
TMPS.1,(SP)
oTxT80, -(SP°
#FMTS50C, -(SP)
26, -(SP)

ADD

MOV
TRAP
ADD

000003

-(SP)
TMP7.1,(SP)
(SP)
TMPA+1,(SP)

SP,RO
CS$PNTX

CLR
8IS
MOV

002454

(SP)

MOV
TRAP

002467
013142

THE

(SP)

SP,RO
CS$PNTX

26,5P

CLR
8Is8
MOV
MOV
MOV

;AND

OFMTSOA,
02,-(SP)

ADD

CLR
BISB
CLR
BISB

PRINTX

R1, -(SP)

OFMTSOC,8TX18D,<B,TMPS+1>,<B,TMPa+1>,<B,TMP7.1>,<B,TMP6+1>
CLR
(SP)
8IS8
TMP6.1,(SP)

002453
014053
013102
000006
000016

INTO

IN CASE.

1 MODE DEF INITION

MOV
TRAP

PRINTX

005046
153716
005046

HAD BETTER

MOV
MOV

002455

153716

005046

THE CARRY BIT

@FMTSOA,R1

PRI*ITX

005046
153716
005046

DATA,

MOV

012746
012746
010600
104415
062706

104415
062706

40-11

SEQ 0073

PRIN"X
010146

ERRORS

:IDENTIFY
011004
011004
011006
011012
011016
011020

PAGE

OFMTSOC,OTXT8E,<B,
TMPS>,<B, TMP4>,<B,TMP7>,<B, TMP6>

CLR
BISB
CLR

-(SP)
TMPB+1,(SP)
oFMTSQD, (SPO

23, -(3%P)

SP,RQ
CSPNTY
210,5P

(5P)
TTMMP6
, (SP)
L SPY

Jb
CNDMAAO DMV1l MCTRL DIAG #1
ERROR HANDLER
011166
011172
Oli174
011200
011202
011206
ollzle
011216
011222
011224
011226
2980 011232
011232
011234
011240
011242
011246
011252
011256
011260
011262
2981
2982 011266
2983 011272
c.84 011274
011274
011274
2985
2986

ERRSO

153716
005046
153716
005046
153716
012746
012746
012746
010600
104415
062706
005046
153716
005046
153716
012746
012746
010600
104415
06270~

004737
012601

104423

MACRO M1200

FOR QEPORTING

TIMER

22-FEB

15:22

PAGE

SEQ 0074

ERRORS

002456

BISB
CLR
8IS8
CLR
8IS8

002450
002452
014070
013102
000006

000016

MOV

PRINTX

MOV
MOV
TRAP
ADD

4&FMT50E,<B8,TMPB>,<B,
TMPD>

CLR

002472

000003
000010

012072

JSR

MOV
ENDMSG

PC,NULERR
(SP)+,R1

;USE COMMON ROUTINE
;RESTORE R1

FOR CALLER

#TXTBE,

4FMTSOC,

%, (SP)
SP,RO
C$PNTX
216,5P

MOV
MOV
MOV
TRAP
ADD

OFMTSOE,
@3, (SP)
SP,RO
C$PNTX
#10,5P

TRAP

(SP)

-(SP)

TTMPD, (SP)

(SP)
TMPB,(SP)

TERMINATE ERROR MESSAGE
L10015:

(SP)

8IS8B

CLR
8Is8

002466
013157

TTMTMP7,(5P)
-(SP)
TMP4,(SP)
(SP)
TMPS,(SP)

C$MSG

(5P)

IK6
CNOMAAO DMV1I1

MCTRL

ERROR HANDLER

SUBROUTINES

2988
2989
2990
2991
2992
2993
2994
2995
299
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012

DIAG o1

MACRO M1200

.SBTTL

FEB

15:22

PAGE

SEQ 0075

ERROR HANDLER SUBROUTINES

PERFORH EXCLUSIVE OR BETNEEN
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

"GDATA"

;PRESERVE

002310
002312
002314

002314

MOV
MOV

XOR
MOV
RTS

GDATA,R1
BOATA,XDATA

R1,XDATA
(SP)+,R
PC

+GET
:AND

"BDATA” PUTTING

WORKING REGISTER

~GOOD" DATA
"BAD" DATA

;PERFORM EXCLUSIVE

sRESTORE R1

3sRETURN

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
005046
153716
005046

PRINTX

4FMT4,0TXT3,8TXT1
MOV

PRINTX

4FMT4A,<B,BSRO>, <B,BSR1>,<B,BSR2>,<B,BSR3»

002254
002252
002250
002246
012305
000005

000014

PRINTX

#FMT4B,0TXT2

013311
012340
000002

000006

002264

MOV
MOV
MOV
MOV
TRAP
ADD

CLR
8ISB
CLR
8158
CLR
8158
CLR
8IS8

(SP)
BSR3,(SP)
-(SP)
B8SR2,(SP)
(sP)
BSR1,(SP)
-(SP)

MOV

eTXT2, (SP)
&FMT4B, (SP?
82, (SP)
SP,RO

MOV
MOV
MOV
TRAP
ADD

MOV

PRINTX

&FMTAC +<B,BSR4>,
<8 ,BSRS5>,<«B,BSR6>,<B,BSR7>

MOV
MOV
TRAP
ADD

CLR

8Is8
CLR

BSRO,(SP)
OFMT4A, -(SP)
85, -(SP)
SP,RO
CSPNTX
214,5P

CSPNTX
86 ,5P

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

CNDMAAO DMV11l MCTRL DIAG 41

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

SUBROUTINE

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

22-FEB 84

15:22

PAGE 41-1

SEQ 007
6

ERR4S$

002262

8ISB

002260

013353
012340
000002
000006

PRINTX

@oFMT4B,8TXT2A

PRINTX

ofMT4A,<B,BSR10>,<B,BSR11>,<B,BSR12>,<B,BSR13>

002274

002272
002270
002266
012305
000005

000006

MOV
MOV
MOV
MOV
TRAP
ADD

OTXT2A, -(SP)
9FMT48, -(SP)
92, -(SP)
SP,RO
C$PNTX
96 ,5P

CLR
B8ISB
CLR
B8ISB
CLR
8158
CLR
BISB

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

MOV
TRAP
ADD

SP,RO
CS$PNTX
14,SP

MOV
MOV
MOV
MOV
TRAP
ADD

@TX728, -(SP)
OFMT48B, -(SP)
02,-(SP)
SP,RO
CSPNTX
#6,SP

CLR
8IS8
CLR
B8ISB
CLR
BIS8
CLR
8Is8
MOV
MOV
MOV
TRAP
ADD

-(SP)
BSR17,.(SP)
-(SP)
BSR16,(SP)
-(SP)
B8SR15,(SP)
-(SP)
BSR14,(SP)
oFMTAC, (SP)
@5, -(SP)
SP,.RO
CSPNTX
#14,5P

MOV
MOV

000014
013412
012340
000002

MOV
TRAP
ADD

-(SP)
BSRS,(SP)
-(SP)
BSR4 ,(SP)
0FMTA4C, -(SP)
@5, (SP)
SP,RO
CS$PNTX
#14,5P

CLR
8I1s8
MOV
MOV

002256
012345
000005

000014

BSR6,(SP)

CLR
8IsB

PRINTX

&FMT4B,oTXT2B

PRINTX

ofFMT4C,<B,BSR14>,<B,BSR15>,<B,BSR16>,<B,BSR17>

RTS

002304
002302

002300
002276
012345
000005

000014

R
i
-11 0
(O ERROR HANDLER SUBROUTINE

I
-- ERRSS

R T
»

]

ERROR HANDLER

MACRO M1200

#FMT4A, -(SP)
95, -(SP)

PP,

CNDMAAO OMV11 MCTRL DIAG #1
ERROR HANDLER SUBROUTINE

3028

3029

3030

011710
011710
011710
011714
011720
011724
011730
011732
011734
011740
011740
011744
011750
011754
011760
011764
011770
011772
011774
012000
012000
012004
012010
012014
012016
012020
012024
012024
012030
012034
012040
012044
012050
012054
012056
012060
012064
012070

3031
3032
3033
3034
3035
3036
3037 012072
012072
012076

012102
012104
012106
3038 012112
3039

MACRO M1200

22-FEB-84

104415
062706

COMMON ERROR SUBROUTINE

012746
012746
012746
010600
104415
062706

013544
012340
000002

013746
013746
013746
013746
012746
012746

002264
002262
002260
002256
012730
000005

TO PRINT

SELECT REGISTERS

HFMTE,2TXT6,4TXTA

MOV
MOV

PRINTX

#FMT11,WSRO,WSR2,WSR4
,WSR6

;DUMP

THE

002246
012730
000005

000014

PRINTX

000006

PRINTX

OFMT4B,2TXT4A

:E.NULERR

012114
000001

062706
000207

000004

PRINTB

4ENDEMB

;USE COMMON ROUTINE

TO PERFORM

“PRINTB

; TERMINATE

ERROR

2TXT76, (SP)
oFMT4, -(SP)

SP,RO
CSPNTX
€10,SP

WSR6, -(SP)
W3R4, -(SP)
WSR2, -(SP)
WSRO, -(SP)
#FMT11, -(SP)
#5,-(SP)
SP,RO
CS$PNTX
014,5P
STXT4A, -(SP)
#FMTAB, -(SP)
92,-(SP)
SP.RO
CSPNTX
06,SP

MOV

WSR16, -(SP)

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

WSR12, -(SP)
WSR10, -(SP)
#FMT11, -(SP)
5, -(SP)
SP,RO
CS$PNTX
214,5P

WSR14, -(SP)

TO TERMINATE ERROR MESSAGE

QENDEMB
"
MESSAGE

MOV
MOV
MOV
PC

oTX74,-(SP)

MOV
MOV
MOV
MOV
TRAP
ADD

MOV

000014
012072

012746
012746
010600

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

OFMT11,WSR10,WSR12,WSR14,WSR16

SUBROUTINE

104414

SEQ 0077

MOV

000010

002254
002252
002250

010600
104415
062706
004737
000207

PRINTX

013504
013607
012245
000003

013746
013746
013746
013746
012746
012746
010600
104415
062706

PAGE 41 2

ERRSS$

ERRS$
012746
012746
012746
012746
010600

M6
15:22

TRAP
ADD

QENDEMB, -(SP)
21, (SP)
SP,RO
CSPNTB
24,SP

CNOMAAO DMV11 MCTRL DIAG #1
FORMAT

SPEC'S

FOR

ERROR

MACRO M1200

HANDLERS

“FMT_

3041
3042
§043

22-FEB 84

044

116

045

FORMAT SPEC'S FOR ERROR HANDLERS -- "FMT___»
Tt
TSNS e
me e e e
c e
reee et
M iesmcescacacccaamaae——a
FORMAT SPEC'S USED BY ERROR HANDLERS ----vcccmecmmcccccn
cmcann
BEX
.ASCIZ

.ASCIZ

/wN/

.ASCIZ
,ASCIZ
MSCIZ

/#NsAFAILING REG = #T#ASEL®02/
/sNsA
EXPECTED:
#03%A
ACTUAL:
/#NwA
THE CONTENTS OF ALLSTHSNST/

045

116

000

NEWLIN:

3049
3050
3051
3052
3053
3054
3055
3056
3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
gggg

045
045
045

116
116
116

045
045
045

FMT02:
FMTO2A:
FMT4:

012124
012161
012245

012305
012340
012345
012400
012443
012530
012562
012571
012637
012654

012730
012747
013021
013102
013142
013157

013174

045
045
045
045
045
045
045
045
045
045

045
045
045
045
045
045

045

116
116
116
116
116
101
116
116
123
116

116
116
116
116
123
123

116

045
045
045
045
045
040
045
045
062
045

045
045
045
045
063
063

062

gg;?

FMT4A:
FMT4B:
FMTAC:
FMTS:
FMTSA:
FMTO7:
FMT06:
FMTO6A:
FMT06B:
FMT10:

§° cceceememeas

3073
3074
3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
ggg?

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

102
040
102
040
040
040
040
102
040
040
040
040
040
040
040
040

123
040
123
040
102
040
040
000
123
122
040
105
101
130
114
122

3092
3093
3094
3095
3096
3097

014105
014111
014125
014142
014164
014205

116
122
127
116
116
123

117
105
122
120
120
105

§ o
105
040
105
040
131
040
040

eec

%03/

‘wTeA)/

IER/

/#N2s#S10%A(TICH & TICL MAVEN'T YET BEEN LOADED)/

TEXT STRINGS FOR ERROR HANDLERS
m

XOR:

/«N%08%08%08%08/
/uNsA
TIMER & 1 MODE:
#01sA
REGISTERS:/
/#N®S1SSATICH
TI1CL
TILH
TIiLL
ACR
IFR
/wNuS3%TeS1%038S3%03%S3803%S3%03/
/#S3%03%S9%N3/
/#S3803%S3%03/

_ASCIZ

.SBTTL

«03%A

/#NsS1#03%SS5S%03%SSH038SS5S%03/
/wNwT/
/#N#SSH03#SSH03%SS$03%SS%03/
/wNsA
WHEN #03%A LOADED INTO B. .1/
/s#NWA
ATTEMPTING "M-LOOP" FUNCTION CODE %02%A
/%A
DETECTED IN #TeTwA --/
/%NsNST/
/#NsT#03%S2%03%S2403%S2803%S28038S2803/
/#S2#03%S2%03/
/wN#A
EXPECTED:%08%A
ACTUAL :%08%A
XOR:%08/

(ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

FMTSOM:

/#NsN/

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

FMT1l:
FMTSOA:
FMTS0B:
FMTSOC:
FMTSOD:
FMTSOE:

3072

B T

.NLIST
ENDEMB:

204; 012121
04

SEQ 0078
7

045

PAGE 42

.SBTTL
:
T
:
S

3045
3046 012114

15:22

“TXT___~

TEXT USED BY ERROR HANDLERS

e ccaeccceme
e
e
acae
aeeaaan

105
105
040
130
103
117
117
105

TxTi:
TXT2:
TXT2A:
TXxTeB:
TxT73:
TX74:
TXTEaA:
TMTS:
TxTé6:
TXT17:
TXT7A:
TXTB8A:
TXxT8B:
TXT8C:
Tx78D0:
TXTBE:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
_ASCI1Z
.ASCIZ
.ASCIZ
.ASCIZ
.ASClzZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ2
.ASCIZ

/BSELO
BSEL1L
8SEL2
BSEL3/
/
BSEL A4
BSELS
BSEL6
BSEL7/
/BSEL10
BSEL11
BSEL12
BS5EL13/
7
BSEl 14
BSEL1S
B8BSEL16
BSEL17/
/ BYTE SELECT REG'S ARE:/
/
SELO
SELZ2
SEL4
SEL6/
7/
SEL10
SEL12
SEL 14
SEL16/
/8/
7 SELECT REG'S ARE:/
/7 REGISTERS
ORB
ORA
ODRB DDRA TICL
T2CL T2CH SR
ACR
PCR
/ EXPECTED:
/ ACTUAL:
/
/ XOR:
/
/ LOADED:
/
~ READ:
/

120
101
111
122
122
124

TXTMLO:
TXTML1:
TXTML2:
TXTML3:
TXTML4A:
TXTMLS:

.ASCIZ
.ASCIZ
.ASCIZL
_ASCIZN
_ASCIZ
,ASCIZ

/NOP/
/READ 1 BYTE~/
/WRITE 1 BYTE/
/NPR-QUT 256 BYTES/
/NPR-IN 256 B“TES/
/SET MICROPROCESSOR

& PC/

- -

eee

TiCH
IFR

eee

emmeeaaa

TILL TILH
IER
ORA

7
/

acena-

CNDMAAO DMV1Ll MCTRL DIAG o1
TEXT

MACRO M1200

STRINGS FOR ERROR MANDLERS

3098 014235
3099 014247
3100
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
3118

B/
22 FEB

15:22

PAGE 42

1
SEQ 0079

“TXT

125
123

116
105

104
124

TXTMLG:
TXTML
7

ASCIZ
.ASCI12

/UNDEF INED/
/SET MAINT INTR

126

111
122
122
104
104

101
102
101
122
122

TXTVR:
TXTVRO:
TXTVR]1:
TXTVR2:
TXTVRS:
TXTVRA;
TXTVRS:
TXTVRG:
TXTVR7:
TXTVRS:

.ASCIZ2
.ASCIZ
.ASCI2
.ASCIZ
.ASCIZ
.ASCI2
.ASCI2
.ASCI2
.ASCIZ
.ASCI2
.ASCI2Z
.ASCI2
.ASCIZ
.ASCIZ
.ASCI2
.ASCIZ
.ASCIZ

/VIA REGISTER
/0RB/
/0RA/

117
117

104
104

124
124
124

103
103
114

114
103
103
000
122
122
122
122
101

TXTVRY:
TXTVRA:
TXTVRB:
TXTVRC:
TXTVRD:
TXTVRE:

TXTVRF
;

/ODRB/

/00RA/
/T1CL
/T1CH/
/TiLL/
7TILN/
7T2CL/

7T12CH/
/SR/
/ACR/
/PCR/
/IFR/
/IER/

/0ORA/

& CLR

INTR

DISABLE

IN CPU

STATUS/

CNDMAAO DMV11 MCTRL DIAG o1
ERROR MESSAGES

MACRO M1200

3131
3132
3133
3134
3135
3136
3137
3138
3139
3140
3141

014634
014667
014733
015013
015110
015170
015243
015275
015355
015442
015477

3130 014611

015532
015565
015613
015644
015675

3147 015735
3148 016016

3154
3155
3156
3157
3158
3159
3160
3161
3162
3163
3164
3165
316€
3167

016067
016135
016203
016251
016305
016341
016406
016450
016536
016600
016666
016730
017012
017054
017122
017174
017240
017305
017354

3168 017417

3169 017471
3171

SEQ 0080

.SBTTL

014454
014500
014515
014540
014564

3149
3150
3151
3152
3153

PAGE

ERROR MESSAGES

"EM_

beos
e
S
eee
o
T
i--- ERROR MFSSAGES USED BY ERROR CALL'S
e Sl
-

3125
3126
3127
3128
3129

3142
3143
3144
3145
3146

15:22

"EM

3120

1
3122
3123
3124

22 FEB 84

115
115
115
103
103

111
122
101
123
123

103
104
123
122
122

EM3:
EMA:
EMS:
EM6:
EM7:

_ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/MICRO-DIAG. FAILURE~/
/MRDY TIMEOUT/
/MASTER CLR FAILURE/
/CSR ADDRESS FAILURE/
/CSR DATA PAT FAILURE/

105
102
042
104
066
066
126
126
126
122
132

130
101
115
115
065
065
111
111
111
105
105

124
104
122
126
060
060
101
101
101
107
122

€M9:
EM14:
EM1S:
EM16:
EM17:
EM17A:
EM20:
EM20A:
EM20B:
EM21:
EM22:

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

/EXTERNAL BUS RESET FAILURE/
/BAD CSR VALUE(S) AFTER MASTER CLEAR/
/"MRDY" DION'T GO LOW WHILE PROCESSING A COMMAND/
/DMV'S RAM LOC. (CORRESPONDING TO BSELO) NOT PROPERLY WRITTEN/
/6502 WRITE FUNC. FAILURE AFTER "RUN" BIT IS SET/
/6502 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 DDRB EFFECTED DORA~/

102

132
122
125
125
122

122
122

042
042
042
126
126

042
042
126
042
126
042
042
042
042
042
042
042
042
042

042
042

123

105
105
116
116
101

101
101

105

122
101
105
105
115

115
115

EM8:

EM22A:
EM25:
EM34:
EM34B:
EM47A:

EMA78:
EMABA:

.ASCIZ

.ASCIZ
.ASCIZ
_ASCIZ
.ASCIZ
_ASCIZ

.ASCIZ
.ASCIZ

/BSELO SET=ALL

ONES/

/ZEROING DDRA EFFECTED DORB/
'READ/WRITE DATA ERROR"
/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/

124
124
124
111
111
124
124
111
124
111
124
124
124
124
120
120
120
120
124

061
061
061
101
101
061
061
101
061
101
061
061
061
061
102
102
102
102
761

EMSOF:
EMS0G:
EMSOM:
EMSOI:
EMS0J:
EMSOK:
EMSOL:
EMSOM:
EMSON:
EMSOS:
EMSOU:
EMSOV:
EMSOW:
EMSOX:

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

\“T1" FLAG NOT SET ON TIMER 1 TIMEOUT\
\"T1" FLAG CLEARED BY READING T1CH\
\VIA‘S TiLL IMPROPERLY LOADED BY WRITING T1CL @ ADOR 4\
\~T1" FLAG CLEARED BY READING T1LL\
\VIA'S TILM IMPROPERLY LOADED BY WRITING T1CH @ ADDR S
\"T1" FLAG CLEARED BY READING T1LM\
\“T1“ FLAG NOT SET AFTER RE-LOADING T1CH & TIMEOUT.
\“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' NOT RESET AFTER BEING CLEARED\

120

102

EM50/:

.ASCIZ

\"PB7" NOT

120

102

EMSOA:
EMSOB:
EMSOC:
EMS00:
EMSOE:

EMSOY:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

.ASCIZ

EVEN

\"T1" FLAG NOT CLEARED BY LOADING T1LM\
\"T1" FLAG NOT CLEARED BY LOADING T1CH\
\“T1” FLAG NOT CLEARED BY READING T1CL\
\VIA'S T1CL NOT DECREMENTING\
\VIA'S T1CH NOT DECREMENTING\

\"PC7" PREMATURELY SET DURING T1 COUNTDOWNA
SET

AFTER SECOND CYCLETM

CNOMAAO DMV1l MCTRL
TEXT

ADDRESS

D7/
DIAG o1

MACRO M1200

TABLES FOR ERROR HANDLERS

22 FEB 84

“TXT
;SBYYL

{01

gl;g 017532

1
3180 017552
3181 017554

glflg 017574
18
3184

PAGE 44

SEQ 0081

g{;E

3177

15:22

_TEXT

ADDRESS

TABLES FOR ERROR MANDLERS

“TXT

TEXT ADDRESS TABLES USED BY ERROR WANDLERS-

- o -

014105

014111

014125

TxTMLT:

.WORD

TXTMLO, TXTMLL, TXTML, TXTMLS, TXTMLE, TXTHMLS, TXTMLE, TXTML?

014327
014345
014413

014351
114420

014355
014425

TIXTVRT:

.WORD
,WORD
.WORD

TXTVR
TXTVRO, TXTVR],TXTVR2, TXTVR3,TXTVR4 , TXTVRS, TXTVR6, TXTVR7
TXTVR8,TXTVRI, TXTVRA, TXTVRB, TXTVRC, TXTVRD, TXTVRE, TXTVRF

LIST

BEX

CNOMAAO DMV11 MCTRL DIAG o1
LOAD DEVICE

PROTECTION

MACRO M1200

22 FEB 84

15:22

PAGE 45

SEQ 0082

TABLE

3186
187

.SBTTL LOAD DEVICE PROTECTION

3189
3190
3191
3192
3193 017614
017614
3194 017614
3195 017616
31% 017620
3197 017622

3/ THIS TABLE IDENTIFIES THE LOAD DEVICE TO THE SUPERVISOR, SO THMAT IT
CAN BE
i/ PROTECTED FROM TESTING. IF DESIRED.
8ILLLLLIIILL07001707707002007777770707777077777727707777700777777707777777777777

3188

TABLE

8ILLLILLILLIELII0 00008207077 20777777007777777770777777777777707777707770707777

BGNPROT

177777

177777
177777

.WORD

.WORD
. WORD
ENDPROT

-1
1
1

sDON’'T CHK CSR ADRS

;DON'T
:OON'T

CHK MASSBUS UNIT NO.
CHK DRIVE NO.

LS$PROT::

CNDMAAO DMV11 MCTRL DIAG @1
INITIALIZE

MACRO M1200

22 FEB

15:22

PAGE

SEQ 0083

SECTION

3199
3200
3201
3202
3203
3204
3205
3206 017622
017622
3207
3208 017622
017622
017626
017632
017636
017642
017644
3209
3210 017650
3211
3212 017654
017654
017660
3213 017662
017662
3214
3215 017664
017664
017670
3216 017672
017672
3217
3218 017674
017674
017700
3219 017702
017702
3220
3221 017704
017704
017710
3222 017712
017712
3223 017714
3224
3225 017716
3226
3227 017722
3228
3229
3230
3231 017722
3232 017726
017726
017732
017736
017742

.SBTTL

INITIALIZE SECTION

$ILLLLLL1
00807777
LLL
70770 777077770
LIL
777777777
LLL
707777777
L77
77777777
L

i/
i/

THE INITIALIZE SECTION CONTAINS THE CODING THAT IS
AT THE BEGINNING OF THE TEST SEQUENCE ON THE NEXT

PERFORMED
UNIT,

VILLLLLIIII1078070000770000770707770771708777777077777777777777

772777777

BGNINIT

L$INIT::
012746
012746
012746
012746

000340
170000
000140
000003

062706

N00010

010637

002324

104437

SETVEC

9140,9170000,
2340

MOV
MOV
MOV
MOV
TRAP
ADD
MOV

SP,PSTACK

:SEE IF PROGRAM JUST STARTED,
012700
104447

READEF

000040

:SEE

READEF

000037

1SEE

000035

;SEE
012700
104447

000036

READEF 0EF .NEW

READEF

108:

GE TPRM

JMP

CONTIN

STARST:
;

005037

012746
012746
012746
012746

002346
000000
020222
000004
000003

MOV

TRAP

acs

TEST

CLR

THE

SETVEC

QEF .START
RO

CSREFG

9EF _.RESTART
RO

CSREFG
RESTRT

YES

NEWST

10%

;(THIS

;ENTER HERE
FOR

#10,5P

MOV
TRAP

QEF .NEW,RO
CSREFG

BCS

NEWST

MOV
TRAP

QEF . CONTINUE
,RO
CS$REFG

BCS

10$

o0EF . CONTINUE

BCOMPLETE

020122

C$SVEC

STARST

YES

IF PROGRAM WAS JUST CONTINUED

103401
0004 36

000137

acs
BR IF

;JB REV A-0O

2340, -(SP)
9170000, (SP)
2140, -(SP)
e3,-(SP)

POINTER

MOV
TRAP

RESTRT

THIS IS A NEW PASS,

BCOMPLETE

103433

STACK

STARST

OEF .RESTART

BCOMPLE TE

1SAVE BASE -LEVEL

BR IF YES

IF PROGRAM JUST RESTARTED,

103435
012700
104447

OEF .START

BCOMPLETE

103417
012700
104447

;00T ROM ADDRESS

PRESENCE

CONSOL

“START”

ABSENCE

sRESET

TO FAR AWAY

COMMAND
A

CONSOLE

“BR'

INSTRUCTION)

ISSUED
TERMINAL.

THE CONSOLE

;SETUP BUS

FOR A

TIMEOUT

TERMINAL FLAG

VECTFR

TEST

FOR A CONSOLE
20, (SP)
MOV
QCONTST, -(SP)
MOV

MOV
MOV

24,
23,

(SP)
(SP)

<NOMANO DMV1l MCTRL DIAG 01

MACRO M1200

22-FEB

15:22

PAGE

G/
46

SEQ 0084

INITIALIZE SECTION
017746
017750
3233 017754
3234 017760
017760
017764
3235
3236 017766
3237
3238
3239 017766
3240
3241 017772
3242
3243 017772
3244 020000
3245 020004
3246
3247
3248 020012
3249 020012
3250 020016
020016
020022

020024
3251 020026
020026
3252 020030
3253 020034
3254
3255 020036
3256 020044
3257
3258
3259
3260 020050
3261 020052
3262 020056
3263 020062
3264 020064
3265 020066
3266
3267
3268
3269 020070
3270 020072
3271 020076
3272 020100
3273
3274 020104
3275 020106
3276 020110
3277 020112
3278 020114
3279 020116
3280
3281 020122

104437
062706
005737

000010

012700

000004

104436

TRAF

177564

1ST
CLRVEC

NEWST:
177777

002340
000001

005237

002322

013700
104442
010001

002322

103403

002344

053737
006337

002344
002344

"RESTART”

012100
010037
022020
010037

012100
006200
006200
006200
006200
010037

000020
002352

CONSOLE

THROUGH WITH THIS BY

002322
002344

NOW

010,5P
“XCSR"

MOV
TRAP

COMMAND

44 ,RO
CS$CVEC

ISSUED

MOV
INC
MOV

9-1,LOGOEV
FRSPAS

tRESFT

LOGICAL

DEVICE

-1

INC
GPHARD

LOGDEV
LOGDEV,R1

; INCREMENT LOGICAL DEVICE NUMBER

1 IICREMENT NO. OF PASSES AFTER LOAD
e8IT0,DEVPTR
+INIT DEVICE MAP BIT POINTERTEST
: GET UNIBUS ADDRESS, VECTOR, PRIOCRITY LEVEL, SWITCH PACKS,
CONNECTOR INFORMATION FOR THIS LOGICAL DEVICE
i

GETPRM:

10$:

;GET P-TABLE POINTER INTO R1

1BR IF DEVICE AVAILABLE

10$

108

8IS

DEVPTR,DEVMAP
DEVPTR

;ELSE, SET BIT FOR THIS DEVICE IN DEVICE MAP
sSHIFT DEVICE MAP BIT POINTER

ASL

MOV
INC
S08

002412

MOV
MOV

002414

MGV

cMP

MOV
ASR
ASR

ASR

ASR
MOV

CONTIN:

BCS

SHIFT DEVICE MAP BIT POINTER

s IF UN-AVAILABLE,

MOV
MOV

¢J24a16

LOGDEV ,.RO
C$GPHRD
RO,R1

DEVPTR
GETPRM

MOV

12¢:

MOV
TRAP
MOV

ASL

B8R
002342

RETURNED WITH A POINTER

012100
012703
012702
010022
005200
077303

SHOULD BE

THE

C$SVEC

;ENTER MERE BEFORE EACH TEST

BCOMPLETE

006337
000766

;WE

TO ACCESS

;CLEAR DEVICE MAP
ClLR
DEVMAP

002342

012737
005237
012737

;ENTER HERE IF

RESTRT:

005037

;TRY

84177564

ADD
TERMINAL

AND

THE

SKIP

THIS

CURRENT

DEVICE

“P

TABLE
"

(R1)+,RO
916. ,R3
MPCSR,R2
RO,(R2).
RO
R3,12%

tGET THE DEVICE CSR ADDORESS
:WE HAVE TO SETUP THIS MANY ADDRESS POINTERS

(R1)+,RO

;GET INTERRUPT VECTOR
$SETUP “A” VECTOR POINTER
+ADD 4 TO VECTOR TO GET ADDRESS OF

RO,MPIVEC
(RO)+,(RO)
RO ,MPOVEC
(R1)+,RO
RO
RO
RO
RO
RO,MPRIOR

{ENTER HERE

: THIS

THE

ADDRESS OF

THE

FIRST

;1SETUP ONE CSR POINTER
sPOINT TO THE NEXT CSR ADDRESS
;LOOP AS LONG AS THERE ARE MORE
;ELSE,
:

;SETUP

FALL THROUGH
P TABLE DATA

~B"

TO CONTINUE

VECTOR POINTER

POINTER

TABLE ENTRIES
GETTING MORE

‘B’ VECTOR

;GET DMv1l DEVICE PRIORITY
i

POSITION

;SETUP OUR VARIABLE FOR INT.,
WHEN A

“CONTINUE" COMMAND

VECTOR INIT

ISSUED

H 7
CNDMAAO DMV11 MCTRL DIAG 21

MACRO M1200

22-FES

15:22

PAGE

46 2

SEQ 0085

INITIALIZE SECTION
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

013746
012746

013746
012746
104437
062706
005037

002416
005152
002412

SETVEC

QOoMPIVEC,OMPIMAN,S8OMPRIOR

;SETUP

“A”

INT.,

VECTOR

CLR
SETVEC

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

MOV
MOV
MOV
MOV
TRAP

000003
000010
005222

013746
012746
013746
012746
104437
062706
005037
005037

002416
005224
002414
000003

012737

000001

000010
005274
002330
002336

IOMPRIOR, (SP)
OMPOHAN, (SP)

MOV

oMPOVEC,

S88se

002346

CONTST:

83, (5P)
CsSVEC

CLR
CLR

THOL NK
INTWCH

ADD
#10,5P
sWE DON'T WANT THE HANDLER TO LINK ELSEWHERE
sRESET “INTERRUPT WATCH' FLAGS (BOTH
A
£ "B’

MOV
ENDINIT

01,FRSTIM
sEND OF

tMARK FLAG FOR NEXT
' INIT* CODE

SUBROUTINES USED BY

“INIT”

CODE

INTERRUPT HANDLER FOR CONSOLE
177777

MOV
MOV

MOV
TRAP

TIME

THROUGH
0017

L10017:

104411

012737
000002

ADD

IOMPRIOR, (SP)
OMPIHAN, -(SP)
IOMPIVEC, (SP)
03,-(SP)
C$SVEC
410,5P

MOV
RTI

©-1,CONSOL

TRAP

CSINIT

sssss

TERMINAL PRESENCE

s INDICATE
;RETURN

THAT

TESTING

CONSOLE

TERMINAL

EXISTS!

(5P)

I/
CNDMAQO DMV11 MCTRL DIAG 21
AUTO DROP UNIT

MACRO M1200

22 FEB 84

15:22

PAGE 47

SEQ 0086

SECTION

gggo
1

.SBTTL

AUTO DROP UNIT

SECTION

3302

3/ /1177777777777 777777 7772777777777 77777777777777777777777777777777777277777777

3303
3304

;7 THE AUTO DROP CODING DETERMINES WHETHER OR NOT
1/ WAS JUST OBTAINED IS READY FOR TESTING, AND IT

X305

$ /1SS

3306

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

SIS

330"

1000000000080000000000080000040800800000000000400804000828440640040808000080808400008

3308
3309

H
H

3310
3311
;glg

H
:
:

3314

ggg? 020270
3322 020274

THE

SAME

TEST

BGNAUTO

012746
012746
012746
012746
104437
062706
005037
012702

013703

000000
020350
000004
000003
000010
002440
000001

002352

105723

006302
103375

3326 020302
3327 020306
3328 020312
3329 ©20314
3330 020316
gggé 020320

013703
012702
005723
006302
006302
103374

002352
000001

012700
104436
005737
001403

000004

013700
10445}
000240

002322

SETVEC

@4,0AD.HIT,00

$SETUP

CLR
MOV

TMPO
#1,R2

sINITIALIZE
sFLAG BIT

MOV
1$:

3323 020276
gggg 020300

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

1 EXCEPT

THAT

TEST

1 --000008000000000008000000000008000000000000080480000000000080000880808008080808

3315
3316 020232

020232
3317 020232
020232
020236
020242
020246
020252
020254
3318 020260
3319 020264

THIS ALGORITHM

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.

2s:

002440

TST8

R2
1

(R3).

sACCESS

MOV
MOV
TST
ASL
ASL
8CC

B8SELO,R3
21.R2
(R3)e.
R2
R2
2%

sRE INIT ADDRESS POINTER
;sRE INIT FLAG BIT
sACCESS THE CSR S By WORDS.

CLRVEC

;RESTORE

TMPO
AD . 0K
LOGDEV

NOP
ENDAUTO

00, (SP)
QAD . HIT, -(SP)
04, (SP)
03, -(SP)
CS$SVEC
910,5P

s INIT ADDRESS POINTER

ASL
8CC

1ST
8EQ
00DV

AD.OK:

B8SELO,R3

LSAUTO:
:
TRAP VECTOR
MOV
MOV
MOV
MOV
TRAP
ADD
TRAP FLAG REGISTER

INVALID ADDRESS

THE

CSR

THE

S By

VECTOR

BYTES.

TO DS
MOV
24 ,R0
TRAP
CsCVEC
INVALID ADDRESS TRAP?

;OID WE GET HIT WITH AN
t1NO,
EXIT TEST
s YES, DROP THIS LOGICAL DEV.

s (FOR

PATCHING

IN A HALT

MOV
TRAP
NECESSARY)

LOGDEV,RO
CsDODU

L10020:

104461
050237
000002

002440

AD.MIT:

BIS
RTI

R2.TMPO

;FLAG THE
;RE TURN

HIT

GET

IT!

TRAP

C$ALTO

J7
CNDMAAD OMV11 MCTRL DIAG #1

MACRO M1200

22-FEB 84

15:22

PAGE 48

SEQ 0087

CLEANUP CODING SECTION

.SBTTL CLEANUP CODING SECTION

3342
3343
3344
3345
3346
3347
3348
3349 020356

020356
3350 02C356
020356
020362
3351 020364
20364
020370
3352 020372

020372
020372

$ILILLIIIII 007777777777 7707 0077707777770/ 27770007077777//7//7/77777777

;/
:/

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

$ /1110170777 777707700700000707007
7770007707070 707770777700707777700777777

B8GNCLN

013700
104436

002412

013700
104436

002414

104412

CLRVEC

@oMPIVEC

CLRVEC

aoMPOVEC

ENOCLN

LSCLEAN::
+RETURN VECTORS TO SUPERVISOR
MoV
TRAP

FoMPIVEC,RO
CSsCveC

MoV
TRAP

@OMPOVEC,RO
CsCVvEC

TRAP

CsCLEAN

L10021:

<7
CNDMAAO DMV11 MCTRL DIAG o1
DROP UNIT

MACRO M1200

22 FEB 84

15:22

PAGE 49
SEQ 0088

SECTION

gggg

.SBTTL DROP UNIT

3356
3357
3358
3359
3360
3361 020374
020374
3362
3363 020374

s/ /SIS
77777
;7 THE DROP UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE
;7 TO NO LONGER BE TESTED.
N AR RN R RN
R R R AR
R R R
RN R
NIy

020374

3364 020376
020376
020376

SECTION

BGNDU

104433
104453

; ISSUE UNIBUS RESET
BRESET
ENDOU

TO CLEAN UP

L$OU: :

L10022:

i
:

TRAP

CSRESE T4~

TRAP

CsDbu

CNDMAAO DMV11 MCTRL DIAG &1
ADD

UNIT

MACRO M1200

22 FEB 84

L7
15:22

PAGE 50

SEQ@ 0089

SECTION

ggbg

.SBTTL

6
3368
3369

3370
3371
3372
3373
3374 020400
020400
3375 020400
020400
020400

ADD UNIT

SECTION

3//117077777770777777727777777777777/777777777727272772777777/7777777777

i/
i/

THE ADD-UNIT SECTION CONTAINS THE CODING
TO BE (A) TESTED FOR THE FIRST TIME, OR

THAT CAUSES A DEVICE
(B) RESUMED IN TESTING.
IF
i/
"EF LAUNIT” IS SET, THE UNIT WILL BE TESTED AS A NEW UNIT,
/0117170777277 7277727077777777777777777777272/777777777772/777777777777

BGNAU

ENDAU
104452

L$AU:
;
L10023:;

TRAP

Cs$Av

M/
CNOMAAO DMV11l MCTRL DIAG #1
TEST

DMV

MACRO M1200

22 FEB-84

15:22

PAGE

SEQ 0090

11 AVAILABILITY
LSBTTL

3393

TEST

DMV-11 AVAILABILITY

10088000088 0440880088808008008884004008008048884808400808084880484200000044400000202
HEd

TEST

DMV-11

AVAILABILITY

HLd

;* EACH NORMALLY USED CSR

IS ACCESSED WITH A

"TST"”

“TSTB”

INSTRUCTION AND

;¢ A BUS TIMEOUT OCCURS (INTERRUPT 8 VECTOR ADDR 4) A FLAG WILL BE SET SHOWING
;» WHICH CSR ADDR AND INSTRUCTION FAILED. "T1.HSW” REFLECTS
;# AND "T1._HSB” REFLECTS "TSTB” INSTRUCTIONS.

“TST”

INSTRUCTIONS

EXAMPLES:

HEJ

i.
L
ie

IF “1ST8 @®BSEL1” FA[LS,
BIT & 1 OF "T1.HSB” WILL BE SET.
IF “TST @&SEL4" FAILS, BIT @ 4 OF "T1.HSW” WILL BE SET
(NOTE: ONLY EVEN BITS IN "“T1.HSW” CAN BE SET).
THE FLAG WORDS ARE OUTPUT

IN BINARY AS

“EXTENDED ERROR

INFORMATION‘,

]

1 --80808848800800000045088840404888854000
28400000040 80000800848008000484004800804020

3394
3395
3396
3397

3398
3399
3400
3401
3402
3403
3404
3405
3407
3408
3409
3410
3411
3412
3413

3414
3415
3416
3417
3418

020402
020402
020406
020412
020416
020416
020422
020426
020432
020436
020440

:
005037
012702
013703

020546
000001
002352

012746
012746
012746
012746

000000
020540
000004
000003

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
020512
020516
020520
020524
020526

012700
104436
005737
001003
005737
001404

BGNTST
CLR
MOV
MOV
SETVEC

"
T1.HSW

a1 ,Re
BSELO,R3
04,0671 HIT,80

s INITIALIZE TRAP FLAG REGISTER

sFLAG BIT FOR BYTE ACCESSED CSR O.
;INIT ADDRESS POINTER
;1SETUP INVALID-ADDRESS TRAP VECTOR
MOV

MOV
MOV
MOV
TRAP
ADD

000010

14:

TS78

020550

MOV

T1.HSW,T1.HSB

;MOVE BYTE

MOV
MOV

¢1,R2
BSELO,R3

;FLAG BIT FOR WORD ACCESSED CSR O.
;RE-INIT ADDRESS POINTER

(R3).

:+ACCESS THE CSR'S BY WORDS.

CLR

2%:

TST

ASL

000004
020546

3s:

T1.HSW

INTERRUPT FLAG TO PROPER LOCATION.

:INITIALIZE TRAP FLAG REGISTER

CLRVEC

+#4

;RESTORE THE VECTOR TO DS

TS7
BNE

T1.HSW
3

;0ID WE GET AN INVALID ADDRESS TRAP?
;:YES, REPORT FAILURE

BEQ
GEDF

T1.0K
T1.EMD,T1.EM)

TST

020550

ASL

B8CC

C$SVEC
#10,SP

;ACCESS THE CSR‘'S BY BYTES.

ASL

8CC
020546
020546
000001
002352

(R3).

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

T1.HSB

;YES,

REPORT

THE ERROR

MOV
TRAP

"DEVICE FATAL"” ERROR & 9

#4 ,RO
CSsCVEC

CNDMAAO DMV11 MCTRL DIAG o1
TEST

DMV-11

020526
020530
020532
020534
3419 020536
020536

050237
000002

3424 020546
3425
3426
3427 020550
3428
3429
3430 020552
020552
3431 020552
020552
020556

020546

TRAP

CSETST

BIS
RTI

R2,T1.HSW

sFLAG THE HIT
:RETURN

000000

T1.HSW:

.WORD

000000

T1.HSB:

.WORD

BGNMSGL

T1.€EM1

;s INVALID ADDRESS TRAP FLAG WORD:
:8ITS 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

013746
012746
012746
010600
104414
062706

002352
020717
000002

000006

012746
012746
010600
104415
062706

000004

012746
012746

021034
000001

PRINTX

021001
000001

PRINTX

3438 020670
3439 020717

101
045

126
116

101
045

T1.EHD:
T1.1:

3441 021034
3442 021106

045
045

116
116

045
062

T1.3:;
T1.4;

3443

C$ERDF
9
T1.EHD
T1.EM1

+1.HIT:

013746
013746
012746
012746
010600
104415
062706

3440 021001

ENDTST

TRAP
.WORD
.WORD
.WORD

L10024:

020626
020630
020632
3424 020636
020636
020642
020646
020652
020656
020660
020662
3435 020666
020666
020666
3436

3437

PAGE S1-1
SEQ 0091

T1.0K:

3421 020540
g:gg 020544

020616
020622

15:22

104455
000011
020670
020552

104401

020566
020570
020572
3432 020576
020576
020602
020606
020610
020612
3433 020616

22-FEB-84

AVAILABILITY

3420 020536

020562

MACRO M1200

010600
104415
062706

@T1.2

IF WE GET

IT!

T1.EM1::
; IDENTIFY ERROR AND ON WHAT DEVICE
MOV
MOV
MOV
MOV
TRAP
ADD

: IF REQUESTED,

PRINTX

&T1.3

&T71.4,T1.HSW,T1.HSB

000010
ENDMSG

L10025:

104423

045

116

062

.NLIST

T1i1.2:

.LIST

LASCIZ

.ASCIZ
LASCIZ

BEX

SP,.RO
CS$PNTB
06,5P

MOV
MOV
MOV
TRAP
ADD

aT1.2, -(SP)
€1, -(SP)
SP.RO
C$PNTX
04 .,5P

MOV
MOV

&71.3,-(SP)
#1,-(SP)

MOV
TRAP
ADD

SP,RO
CSPNTX
4 ,5P

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

T1.HSB, (SP)
T1.HSMW, -(SP)
oT1.4,-(SP)
€3, -(SP)
SP,RO
CSPNTX
#10,S5P

TRAP

C$MSG

BEX

.ASCIZ
.ASCIZ

#2,-(SP)

ALSO INDICATE MISSES ( TRAPS)

000004
020550
020546
021106
000003

MPCSR, -(SP)
eT1.1,-(SP)

'AVAILABILITY TEST (&1)’
'wN®ADMV-11 8 ®0%A NOT RESPONDING TO CSR ACCESSING'
'#N2%S21%ASEL #%S11wABSEL @'
'#NWS1SSAE C A 8 6 4 2 0
FEDCBA9876543210"
‘#N2%A
TRAP FLAGS:4B16%S2%B16°

CNDMAAO DMVIL MCTRL
TEST

3444

OMv

DIAG #1

MACRO M1200

AVAILABILITY

.EVEN

22-FEB 84

b8
15:22

PAGE S1 2

€0 0092

CNDMAAO DMVil MCTRL DIAG o1

MACRO M1200

22-FEB 84

15:22

PAGE 52

TEST

MASTER CLEAR,

RUN MICRODIAGNOSTICS

3401}

.SBTTL

SEQ

TEST 2

0093

- MASTER CLEAR, RUN MICRODIAGNOSTICS

100080000080000000000050000000000000000000800

000800000084000000000600000000000484

.‘

)

TEST

MASTER

CLEAR,

[

t1¢
1+

A MASTER

CLEAR

TIME

THE

FOR

IS ISSUED TO THE DMV-11, AND THE PROGRAM ALLOWS SUFFICIE
NT
MICRODIAGNOSTICS TO BE PERFORMED. THESE MICRODIAGNOSTI
CS RESIDE

t¢ IN 6502 PROGRAM

MEMORY,

AND

1¢

PERFORM

1¢ MICROPROCESSOR CHIP,
THE

CSR'S,

i1 USYRT,
10

s
1e

RUN riCROCIACMOCTING

AND

THEN,

THEY

THOROUGHLY VERIFY THME OPERATION OF THE 6502
CHECK

SIMPLE

WITH INTERNAL LOOPBACK.

OUT

THE DATA RAM,

MESSAGE

TEST

USING

THE

6502'S ACCESS

6522

CHIP

AND

THE

NEXT, THE LSI-11 PROGRAM READS THE THE CSR'S (SELO-S
EL6) AND CHECKS THEM FOR
THCIR EXPECTED INITIALIZED
STATES.
IF AN ERROR MAS OCCURRED IN THE MICRO

1 DIAGNOSTICS THE NUMBER OF THE FAILING TEST WILL BE FOUND IN SEL4,
3o (BIT 7) WILL NOT BE SET IN BSEL1L.

AND RUN

:--osooo.oooooooo.oooooooooooooooooo‘ooooooaooocoooooooooooooooaooooooooooaooo
3

3462

021146

2263

3465 021146
3466 021152
3407 021154

004737
103002

g:gg 021156

000436

3470
3471
3472
3473
3474

021160
021162
021164
021170

005001
005002
016203
062702

3476 021202

001005

021154

3475 021178
3477 021204

BGNTST

T2::

ISSUE A MASTER CLEAR, AND DELAY FOR MICRO-DIAGNOSTICS TO COMPLETE By CALLING

SUBROUTINE MASCLR.

003614

104460

126271

8s:
003040
000002
003040

00235f'

005202

3478 021206
;:;g 021210

005201
005201

g:gé 021212

077310

g:gz 021214

000417

3485
3486
3487
3488
3489
3490

021216
021224
021230
021236
021240
021244

117137
004737
116237
006201
010137

021244
021246
021250
021252

1044S¢
00001
0146
0054

2s:

‘l

’f’

2334

002310

:
ATTEMPT- TO RUN THE
s IF NO ERROR, PROCEED
1ELSE, REPORT IT AND

1%:

EXIT

MICRO DIAGNOSTIC

THIS TEST

TRAP

CSERROR

3 FIRST, INITIALIZE INDEX REGISTERS
C.R
R1
s1R1 IS THE INDEX OF THE BYTE SELECT TABLE
CLR
R2
sR2 IS THE INDEX OF THE RESWTS TABLE
MOV
RESFMC(R2),R3
tGET THE NUMBER OF PATTERNS IN RESWLTS TABLE
ADO
82 ,.R2
sMOVE POINTER TO NEXT BYTE

cMPB

RESFMC(R2),8BSEL(R1)

;COMPARE EXPECTED RESULTS WITH CSR'S.

sAR MISMATCH IS A DEVICE FATAL ERROR

INC
INC

R1
R1

1t INCREMENT POINTER
;3
BY 2
(WORD INCREMENT)

SO8

R3,2$

;CONTINUE

244

s TEST COMPLETE WITH NO ERRORS, GO END TEST.

MOv8
JSR
MOvV8
ASR
MOV
GEDF

SBSEL(R1),BDATA ;0 GET DATA BYTE TMAT FAILED
PC.GETBSR
tGET THE BSEL REGISTERS FOR DUMPING
RESFMC(R2),GDATA ;0 GET EXPECTED RCSULT FROM TABLE
R1
sCONVERT WORD OFFSET TO BYTE CSR @
R1,REGNUM
EM14 ,ERR?
tOEVICE FATAL ERROR, REPORT IT AND END
$
“OEVICE FATAL"” ERROR @ 10
TRAP
.WORD
. WORD
MWORD

INC

002312

PC,MASCLR
8s

BNE

7
;

002322
004434
00£040

JSR
B8CC
ERROR

s INCREMENT

TABLE POINTER

TO LOOP

THROUGH TABLE

TEST
CSERDF
10
EM14
ERRQ

’

CNDMAAO DMVI1 MCTRL DIAG ot
TEST

MASTER

CLEAR,

3491 021254

021254

MACRO M1200

22 FFB 84

15:22

PAGE

SEQ 0094

RUN MICRODIAGNOSTICS

244
104401

ENDTST

L10026:

TRAP

CSETST

CNDMAAQ DMV11l MCTRL
TEST

DIAG o1

MACRO M1200

22 FEB 84

15:22

PAGE

E8
53

SEQ 0095

CSR ADDRESSING

.SBTTL

3503

TEST

CSR ADDRESSING

100888040080 4040000400840284008000800080400400004000480843840404460000840000000800800

HEL

1 8

TEST

CSR

ADDRESSING

;12
;¢

FIRST, HALT THE 6502 UP BY CLEARING ALL CSRS. THEN, WRITE
OF DATA
PATTERN
A INTO EACH OF BSELO 17, AND AFTER EACH

A DIFFERENT
WRITE, READ

WORD
AND

;¢ COMPARE ALL REGS TO EXPECTED VALUES.
]

;1#

DATA

PATTERN

001,

1 e

002,

060,

004,

010,

020,

030, 014, 006,

040,

100,

200,

052,

300,

140,

003

1--08804080800480480808880800800088000004048000800002000408080800400400000008004004008

3504
3505
3506
3507
3508
3509
3510
3511
3512
3513
3514
3515
3516
3517
3518
3519
3520
3521
3522
3523
3524
3525
3526
3527
3528

BGNTST

021256

assssess DETAILED TEST DESCRIPTION ¢scessee

THIS

TEST PROCEEDS AS FOLLOWS:

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

CLEAR
WRITE
WRITE
WRITE

NOTE:

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

(17) CONTINUE TO INCREMENTALLY WRITE DATA-PATTERN-A INTO THE BSR'S,
CHECKING ALL BSR S AFTER EACH WRITE, UNTIL BSR'S COMPLETELY
FILLED WITH DATA-PATTERN-A,

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

CLEAR DMV CSRS AND RESWLTS
021256
021262
021266
021272
021274
021276
021300

3529
3530
3531
3532 021302
3533 021304
3534 021310
3535 021314
+536 021316
3537 021320
3538
3539
3540
3541
3542 021322
3543 021324

012703
013701
012702
005021
005022
005022
077304

000010
002352
003062

MOV

18:

MOV
MOV
CLR
CLR
CLR
so8

TABLE

910,R3

808SEL ,R1
ORESFT3,R2
(R1).
(R2).
(R2).
R3,1%

tGET

& OF

CSRS

:GET 1ST CSR ADDRESS
$tGET 1ST RESUWLTS TABLE ADDRESS
sCLEAR CSR, BUMP POINTER
sCLEAR RESULTS TABLE LOC., BUMP POINTER
: AND DO AGAIN
;LOOP UNTIL ALL DONE

i+ NOW VERIFY CSRS ARE ALL ZEROED
005002
012703

105772

001035
005722
077305

000020
002352

2%:

CLR

sCLEAR BSR ADDRESS

1578
BNE

@BSEL(R2)
5%

+IS THIS CSR=0 ?
s IF NO: GO REPORT ERROR

S08

R3,2%

MOV

1ST

@CSREGS,R3

(R2).

tGET

& OF

YES:

CSRS

BUMP

;D0 UNTIL

INDEX

ALL BSRS CHECKED

3-II'.II.I........I..-‘----I.IIIII..-..'l.'l...'........llll’llll..la:!:-232-3

005001
012703

000020

INITIALIZE INDEX REGISTERS

CLR

MOV

#CSREGS,R3

s INITIALIZE PATTERN INDEX REGISTER
;1GET

NUMBER OF

CSR'S

CNDMAAO OMV11 MCTRL DIAG o1
TEST

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

F8
MACRO

M1200

22-FEB

15:22

PAGE

SEQ 0096

CSR ADDRESSING

021330
021334

016104
005721

THE ?IRSE WORD OF THE DATA TABLE CONTAINS THE NUMBER OF PATTERNS IN

: THE
MOV
TST

002504
PUT

TABLE:
PATA(R1),R4
(R1).

PATTERN

DATA

tINITIALIZE NUMBER OF
tMOVE TABLE POINTER
INTO

AND

PATTERNS

TEST

COUNT

AREA:

CALCULATE INDEX INTO DATA AREA AND TO REGISTER
021336
021340
021342

010102
005742
006302

MOV
TST
ASL

;.
021344
021352

116162
116172

021360
021362
021364

005201
005002
012703

021370
021376
021400
021402

126272
001004
005722
077306

021404

021406

002504
002504

NOW,

003062
002352

000020
003062

SETUP

116237
117237
004737
006202
010237

cMP8

RESFT3(R2),88SEL(R2)

B8R

021436
021440
021442
021444
3584 021446
021446
021446

104455
000013
014540
005304

003062
002352
004434

002310
002312

S$:

OCSREGS,R3

5%
(R2).
R3,4%

R4,3$

244

104401

THE FAILURE

1BUMP DATA POINTER FOR NEXT
s INITIALIZE TABLE INDEX

TIME AROUND

;COMPARE CSR WITH RESULTS

TABLE

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

sLOADING THE NEXT PATTERN INTO NEXT REGISTER
;LOOP UNTIL ALL PATTERNS ARE

TESTED

:7€ST COMPLETE #a<< NO ERRORS >>as
MESSAGE

RESFT3(R2).GDATA ;& GET THE EXPECTED RESULT
ABSEL(R2),BDATA ;4 GET THE FAILED BYTE

ASR
MOV
GEDF

R2
R2 ,REGNUM
EM6,ERR2

PC.GETBSR

TABLE

: INITIALIZE NUMBER OF REGISTERS

MOV8
MOVB

JSR

002334

SELECT REGISTER

R1
R2

: - -PREPARE

021410
021416
021424
021430
021432
021436

THE

INC
CLR

S08

000417

THE EXPECTED RESULTS AREA AND LOAD

PATA(R1),RESFT3(R2) ;UPDATE THE EXPECTED RESULTS
PATA(R1),88SEL(R2) ;PUT PATTERN INTO THE CSR

BNE
TST
So8

077424

+GET INDEX INTO TEST DATA AREA
sIT'S ONE WORD TOO LARGE
tCONVERT FROM BYTE TO WORD INDEX

MOVB
MOvB

MOV

002352

R1,R2
(R2)
R2

:GET

FROM

THE BSEL REGISTERS FOR DUMPING

sCONVERT WORD OFFSET TO BYTE CSR
:GET THE REGISTER THAT FAILED
1ERROR seee DEVICE FATAL #4sas

TABLE

ADDRESS

“DEVICE FATAL” ERROR ¢ 11

TRAP

ENDTST

L10027:

CSERDF

.WORD
.WORD
.WORD

11
EM6
ERRZ2

TRAP

CSETST

CNDMAAO DMV1l MCTRL DIAG &1

TEST 4

MACRO M1200

22-FEB-84

CSR REGISTERS DATA READ/WRITE

3598

.SBTTL

TEST 4

15:22

PAGE 54

5EQ 0097

CSR REGISTERS DATA READ/WRITE

Jo+000000000000000000000000000000000000008000040000000000000000000000000000040

TEST 4 -- CSR REGISTERS DATA READ/WRITE

;e WRITE,
1«

THEN,

;¢

SET.

;# RUN

READ,

REPEAT

BEING

WILL

AND

THIS

COMPARE

USING

TESTED,

EACH

EACH BYTE OF DATA PATTERN B
OF

THE

REMAINING

CSR'S,

THE PROGRAM ALWAYS SETS BIT

NOT BE CLEARED,

INTO REGISTER BSELO.

BSEL1-BSEL17.

WHEN BSEL1

IN THE DATA PATTERN SO THAT

AND IT ALWAYS CLEARS BIT6 SO THAT MCLR WILL NOT BE

)

DATA PATTERN B

125,

252,

000,

377,

001,

002,

004,

010,

020,

040,

200,

376,

375,

373,

367,

357,

337,

277,

177,

000

100,

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

021450
3599 021450

3600

3601
3602
3603 021454
3604 021456
021456

gggs 021460
6

004737

003762

103002
104460

000453
3

3607
3608

:
:

3609

3
;

3613 021462
3614 021464
3615 021466

005001
005002
016103

002526

ggig 021476

113777

000101

160650

ggg? 021504

116137

002526

002310

062702

gggz

PC,MSTCLR

8CC
ERROR

T4::
s CALL. MAINTENANCE READY INITIALIZATION. IF
tMSTCLR SHOUW.D FAIL BECAUSE THE MRDY FLAG DOES
;NOT BECOME SET, A DEVICE FATAL ERROR WILL BE
sREPORTED, AND MSTCLR WILL SET THE “C” BIT
:IF NO ERROR, PROCEED
;ELSE,

REPORT

B8R

EXIT

THIS

AND

TRAP

TEST

CSERROR

THE FIRST BYTE LOCATION OF THE PATTERN B TABLE, USED IN THIS TEST,
CONTAINS THE NUMBER OF TEST PATTERNS OF PATTERN B TABLE., NOT A

1%:

INITIALIZE

INDEX

AND

COUNT

REGISTERS

CLR
CLR
MOV
ADD

R1
R2
PATB(R1),R3

tR1 IS THE ‘PATB' INDEX REGISTER
;R2 IS THE CSR INDEX REGISTER
;R3 CONTAINS THE NUMBER OF BYTES

MOVB

101,8B8SEL1

$STOP THE MICRO-PROCESSOR!!!

MOVB

PATB(R1),GDATA

;GET

02,.R2

sMOVE POINTER

IN PATB

TO FIRST BYTE OF DATA

THE PATB DATA BYTE,

WE ARE

TO USE

OON'T GET CAUGHT BY THE NEXT INSTRUCTION!
"R2” IS AN OFFSET INTO A
WORD TABLE WHICH CONTAINS TiaE ADDRESSES OF THE CSR'S.
THEREFORE, WHEN
R = 0 IT POINTS TO BSELO'S ADDRESS, AND WHEN R2 = 2
IT POINTS TO

; BSEL1'S ADDRESS.

3627 021512
3628 021516
3629

022702
001003

gggg 021520

142737

000300

002310

3634 021526

113772

002310

002352

3635 021534

FIRST,

000002

:
;:
;

JSR

TEST PATTERN,

8%:

3622
3623
3624

2630
631

NOTE

3610
ggié

ggi? 021472

BGNTS1

123772

000002

002310

CcMP
BNE

002352

2%:

o2 ,Re
23

8ICB

QRUN'MCLR,GDATA

MOvVe

GOATA,8BSELO(R2)

CMPB

GDATA,aBSELO(R2)

;IS "BSEL1" BEING TESTED?
:IF YES, ALTER PATB DATA SO THAT BIT 7
sALWAYS SET, AND BIT6 IS ALWAYS RESET,
;ELSE,

USE

PATB DATA AS

;FORCE

PATTERN TO RESET BITS

;PUT PATB DATA
;

COMPARE

IS,

7 & 6

INTO REGISTER BEING

PATTERN JUST

WRITTEN

TESTED

CNDMAAO DMV11 MCTRL DIAG 21
TEST

3636
3637
3638
3639
3640
3641
3642
3643

MACRO M1200

H8
22 FEB

15:22

PAGE

SEQ 0098

CSR REGISTERS DATA READ/MWRITE
021542

001414

BEQ
t+

021544
021550
021556
021562

021562
021564
021566
021570
3644 021572
3645
3646 021574
3647 021576
3648
3649 021600
3650 021602
3651 021606
3652
3653 021610
3654 021610
021610
021610

010237
117237
004737

002334
002352
004434

5%
PREPARE

MOV
MOVB
JSR

002312

GEDF

104455
000014
014564
005304
000406
005201
077336
005722
020227

101336

S$:

248
;
104401

FAILURE

A MATCH.

ELSE,

DEVICE

PC,GETBSR
EM7,.ERR2

:GET THE BSEL REGISTERS FOR DUMPING

R3,1%

(R2).

R2,8<CSREGSs2>
1$

FATAL

ERROR

PRINTOQUT--

1GET THE REGISTER THAT FAILED

INC
S08

BHI

THE

9BSELO(R2),BDATA

cMP

FOR

PASSES

R2 ,REGNUM

B8R

1ST

000040

s TEST

;SCORE

THE BAD DATA

tREPORT

ERROR

“DEVICE FATAL" ERROR &

AND EXIT

THE

TEST

TRAP
. WORD
.WORD
.WORD

CSERDF
12
EM7
ERR2

tMOVE TABLE POINTER
tDECREMENT NUMBER OF PATTERNS LEFT. IF ZERO,EXIT.
:ELSE, CONTINUE TO PATTERN TEST REGISTER

s INCREMENT

THE

INDEX By

sCOMPARE REGISTER INDEX TO NUMBER OF CSR S
:IF R2 > 17, END THE TEST

ENDTST
L10030:;
TRAP

CSETST

CNDMAAO DMV11 MCTIRL DIAG @1

MACRO M1200

22 FEB 84

15:2¢

PAGE 55

SEQ 0099
D>

TEST

BASIC MASTER CLEAR

3662

LSBTTL

TEST S

BASIC MASTER CLEAR

§0000008000000000000084000080004000000000000060008008080000408400000000808008084080
L)

TEST

BASIC

MASTER

CLEAR

HLd

;¢

PERFORM

:¢

THEN,

INITTAL

ISSUE

MASTER

A MASTER

CLEAR.

CLEAR

WRITE

AND READ

356

AND

INTO

CHECK

BSELO

AND

READ

BSELO FOR

000.

AND

CHECK

IT.

3663

;66;

3666 021612
3667
3668
3669 021616
3670 021620
021620

004737

3675 021640

001011

3677
3678
36;9
680
3681 021642
3682
3683
3684 021646
3685 021650
021650

112777

122777

003614

000356

160520

160512

8%:

:
:
004737

003614

104460

000425

3688
3689
3690
3691
3692
3693
3634
3695
3696
3697

021654

122777

021662

001421

021664
021672
021700
021704
021710
021716

112737
117737
004737
105077
012737

021716
021720

104455
000015

021724
3698 021726
3699 021732

005304
105077

000000

160470

9%:

000356
160454
004434
160442
000000

002310
002312

2$:

0L2334

AND DELAY FOR MICRO DIAGNOSTICS

JSR

PC ,MASCLR

8CC
ERROR

MOvB

£356,8BSELO

BNE

:A MISMATCH

CcMPB

PC .MASCLR

8CC
ERROR

cMPB

2000 ,aBSELO

SET

EXIT

THIS

BSEL

TO ALMOST

;& COMPARE

AND DELAY

JSR

1S::
TO COMPLETE By CALLING

:
ATTEMPT- TO RUN THE MICRO DIAGNOSTIC
;tFAILURES WILL BE REPORTED BY THE SUBROUTINE
;1AS DEVICE FATAL AND THE “C" BIT WILL BE SET
1 IF NO ERROR, PROCEED
:ELSE, REPORT IT AND
TRAP
CSERROR
:

£356,8BSELO

ISSUE A MASTER CLEAR,
SUBROUTINE MASCLR.

103002

gggg 021652

021722

SUBROUTINE MASCLR.

104460

000441

676

ISSUE A MASTER CLEAR,

103002

gg?l 021622
72
3673 021624

3674 021632

BGNTST

021612

880068000600 80080000800080000040080000000000000400000000004800000000800840480008

TEST

ALL

ONES

INDICATES A DEVICE FATAL ERROR

FOR MICRO-DIAGNOSTICS

TO COMPLETE

:
ATTEMPT
TO RUN THE MICRO-DIAGNOSTIC
sFATLURES WILL BE REPORTED BY THE SUBROUTINE
:AS DEVICE FATAL AND THE "C' BIT WILL BE SET
:IF NO ERROR, PROCEED
sELSE, REPORT IT AND
TRAP
CS$ERROR

EXIT

THIS

TEST

: THIS REGISTER SHOWD BE ZEROED DURING
s INITIALIZATION
BEQ
244
s IF ZERO, eee TEST PASSES see, ELSE REPORT ERROR
: - PREPARE FOR THE FAILURE PRINTOUT
MOvVB
4356 ,GDATA
;1@ ALMOST ALL ONES IS EXPECTED DATA
~MOve
9BSELO,BDATA
;:SOMETHING OTHER THAN ALL ONES WAS FOUND. SCORE IT.
JSR
PC,GETBSR
tGET THE BSEL REGISTERS FOR DUMPING
CLRB
3BSELO
:DISABLE INTERRUPTS AS A PRECAUTIONARY MEASURE
MOV
00, REGNUM
;tGET THE REGISTER THAT FAILED
GEDF
EMS,ERR?
{REPORT DEVICE FATAL ERROR

DEVICE FATAL"” ERROR & 13-

01451¢

TRAP
.WORD

CSERDF
13

. WORD
A PRECAUTIONARY

ERR2
MEASURE

.WORDC

160420

244

CALLING

CLRB
ENVISI

aBSEL O

;ODISABLE

INTERRUPTS

EMS

J8
CNOMAAO DMVl 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

<8
CNDMAAO DMv1l
TEST

MCTRL

DIAG @1

MACRO M1200

22 FEB

15-22

PAGE

SEQ 0101

BUS RESETY

.SBTTL

3708

- BUS RESET

TEST 6

100800008000 0800000040000004040000000008400000400088040484880000004800840000000800
HEJ

-- BUS RESET

TEST 6

L
e

:1*

PERFORM

;¢

THEN,

INITIAL

ISSUE

]

MASTER

RESET

CLEAR.

WRITE

INSTRUCTION,

377

STALL

INTO

FOR

BSELO

AND

COMPLETION,

READ

AND

AND
READ

CHECK

AND

IT.
CHECK

:» BSELO FOR 000.
L

;

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
3729
3730
3731
3732
3733
3734
3735
3736
3737
3738

3739
3740
3741
3742
3743
3744
3/45
3746
3747

880088000004 000000000000000000000080800000000000406000080000008800088008004008

BGNTST

:
032737
001072

000001

8IT

002350

BNE
:

ELSE,

T6::

48ITO0,PFLAG

:IF BUS RESETS ARE NOT ALLOWED,

ISSUE A MASTER CLEAR,

: CALLING SUBROUTINE MASCLR.
004737

JSR

003614

103002
104460
000465
112777
122777
001035

000377
000377

160366
160360

8s:

PC,MASCLR

REPORTED BY

;AS DEVICE FATAL AND THE

B8R

MOV
CMPB

#377,3aBSELO
€377,39BSELO

:SET ALL BITS IN BSELO
;COMPARE TO ALL BITS SET

BNE

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

013701
105737
005301
001374

002316
002317

022012
022020

122777
001443

000000

24:

160332

000000

THE

SUBROUTINE

"C" BIT WILL BE SET
TRAP

EXIT THIS TEST

CS$ERROR

sA MISMATCH IS A DEVICE FATAL ERROR
:FORCE

AN EXTERNAL

BUS RESET.

THIS SHOWD
TRAP
CSRESET

100 MICROSECONDS

DELAY ABOUT SO0 MILLISECONDS FOR THE MICRODIAGNOSTIC TO COMPLETE

MOV

DELAY!,R1

s INITIALIZE COUNTER

BNE

sNO,

TST8
OEC

CcMPB

BEQ

DELAY1 1
R1

002312

MOVB

002310
002334

MOV
MOV

s THIS IS A DUMMY INSTRUCTION TO LENGTHEN THE DELAY
;sTIME TO GET OUT OF THE DELAY?

;s YES, CHECK FOR REGISTER T0 BE ZERO

; - -PREPARE

160324
004434
160312
000000

TO COMPLETE BY

TO RUN THE MICRO DIAGNOSTIC

WILL

; CAUSE BSELO=0 IN ABOUT

021776
022002
022006
022010

104455

TEST

8CC
ERROR

022054

-ATTEMPT-

;FAILURES

BRESET

117737
004737
105077
012737
012737

THIS

AND DELAY FOR MICRO-DIAGNOSTICS

104433

022022
022030
022034
022040
022046
022054

BYPASS

sA MISMATCH IS A DEVICE FATAL ERROR

;ELSE, END TEST.
FOR

THE

FAILURE

PRINTOUT-

SBSELO,BDATA

;GET

THE

ACTUAL DATA

4000,GDATA
#0,REGNUM

;GET
+GET

THE
THE

EXPECTED DATA
REGISTER THAT FAILED

JSR
CLRB

PC,GETBSR
aB8SELO

GEOF

EM9,ERR2

1GET THE BSEL REGISTERS FOR DUMPING
;OISABLE INTERRUPTS AS A PRECAUTIONARY
sEXTERNAL BUS RESET FAILURE
H
"DEVICE FATAL" ERROR

TRAP

MEASURE

CS$ERDF

CNDMAAO DMV11 MCTRL DIAG o1
TEST

MACRO M1200

22 FEB 84

15:22

PAGE

L8
56

SEQ 0102

BUS RESET

022056
022060
022062

000016
014634
005304

022066
022074
022100
022104
022112
022°20

117737
004737
105077
112737
012737

022120
022122
022124
022126
3756 022130
3757 022134

103455
000017
014611
005304
105077

022134

104401

;;48 022064

000421

MOVB
JSR
CLRB
MOVB
MOV
GEDF

§BSELO,BDATA
PC,GETBSR
8BSELO
#377,GDATA
00, REGNUM
EM8,ERR2

.WORD
.WORD
.WORD

14
EM9
ERR2

3750
3751
3752
3753
3754
3755

022134

160260
004434
160246
000377
000000

160216

002312

1$:

002310
002334

CLRB
ENDTST

@BSELO

1GET THE ACTUAL DATA
1GET THE BSEL REGISTERS FOR DUMPING
;DISABLE INTERRUPTS AS A PRECAUTIONARY MEASURE
;ALL ONES WAS EXPECTED DATA
:GET THE REGISTER THAT FAILED
;BSELO COULD NOT BE SET TO ALL ONES

;

;DISABLE

“DEVICE FATAL" ERROR € 15

TRAP
.WORD
.WORD
_WORD
INTERRUPTS AS A PRECAUTIONARY

L10032:

TRAP

CSERDF
15
EM8
ERR2
MEASURE
CSETST

CNDMAAO DMV11 MCTRL DIAG #1
TEST

CSR,

M8
MACRO M1200

22-FEB-84

15:22

PAGE

SEQ 0103

MAINTENANCE MICROCODE INTERACTION

3779

.SBTTL TEST

CSR,

MAINTENANCE MICROCODE

INTERACTION

(00RAAAANAALA0RARAREAANRAAL00RA040000000400000000404000080
00000820884 0000080408
R

TEST

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
THE PROGRAM THEN CHECKS FOR THE SETTING OF BSELZ2 BIT 7
(MREQ) SET IN BSEL1.
BY
THE MAINTENANCE MICROCOOE WITHIN ABOUT S50 MICRO-SEC., AND IF MROY
(MRDY)
DOES NOT GET SET, AN ERROR IS REPORTED.

&84 »

T &

THEN, THE PROGRAM LOADS 252 INTO BSELO AND READS AND CHECKS ALL CSR'S,
BSELZ2
IS
THEN
LOADED
WITH
A
READ
COMMAND, WHICH SHOULD CAUSE THE MICROCODE TO
ALL CSR'S ARE READ AND CHECKED.
TRANSFER THE 252 INTO BSEL6.

104460
000137

022642

022154
022162

012777
012777

000020
000125

160200
160176

022170
022176

027727
001411

160156

022200
022206
022214
3795 022220
3796
3797 022222
3798 022230
3799 022232
3800 022240
3801 022246
3802 022254
3803
3804 022256
3805 022264
3806 022266

017737
012737
005037
000451

027727
001412
017737
012737
012737
000433

3781

3782
3783

3784
3785
3786
3787
3788
3789
3790
3791
3792
3793
3794

027727
001412
017737

ALL CSR'S

TRANSFER

8580808080080 580880800048 040 000058000008 0080800800808 0840080080804040008000008

T7::

BGNSUB
104402
004737
103003

THEN,

THEN LOADED WITH A WRITE COMMAND, WHICH SHOULD CAUSE THE MICROCODE
ALL CSR’'S ARE THEN READ AND CHECKED FOR
THE
125
INTO
BSELO.
EXPECTED CONTENTS.
TO

BGNTST

022136
022136
022136
022136
022140
022144
022146
022146
022150

3780

BSEL2

125.

2K 3E 2K X

JE JB JX 2

2K N

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

003762

T7.1:

JSR
8CcC
ERROR

PC,MSTCLR
104

JMP

TRAP

csBsSuB

TRAP

C$ERROR

;:PUT THE MICROPROCESSOR IN THE MAINTENANCE LOOP
;s IF NO ERROR,

PROCEED

;ELSE,

REPORT IT AND

ENDT?

EXIT

MOV
MOV

#SLTO,8SELA
2125,3SEL6

:PUT ADDRESS OF SELECT REGISTER O IN 'ADDRESS'

000400

cHP
BEQ

@SELO, @400
1

;ONLY "MREQ" SHOULD BE SET
:IF IT IS, PROCEED WITH TESTING

160146
000400
002334

002312
002310

MOV
MOV

8SELO,BDATA

160130

000200

160120
000200
000002

002312
002310
002334

160100

000020

160070

002312

10¢:

CLR
BR

1$:

2%:

2400,GDATA
REGNUM
44

cMpP
BEQ
MOV

gSELZ.OZOO

MOV
MOV

€200,GDATA
92 ,REGNUM

9SEL2,BDATA

;PUT

THIS

THE DATA

TEST

TO BE WRITTEN

‘DATA‘

REG

;:ELSE, SETUP FOR (& REPORT) THE ERROR
BAD DATA
;i
GOOD DATA
s+
i

REG.

NUMBER

; "MROY” SET?

i YES,

;:
+

(ALSO CHECKED BY

PROCEED WITH TESTING

BAD DATA
GOOD DATA

"MSTCLR")

:
THE REG.
;EXIT TEST

cHP
BEQ

gSEL4.0SLTO

;+COMPARE SELECT REGISTER 4 WITH THE ADDRESS SENT

MOV

aSEL4 ,BDATA

;A MISMATCH

THAT FAILED

A DEVICE FATAL

:GET THE BAD DATA

ERROR

CNDMAAO DMV11 MCTRL DIAG @1
TEST

3807
3808
3809
3810
3811
3812
3813
3814
3815
3816
3817
3818
3819
3820

CSR,

MAINTENANCE

MACRO M1200
MICROCODE

022274
022302
022310

012737
012737
000415

000020
000004

022312
022320
022322
022330
022336

027727
001415
017737
012737
012737

160050

22 FEB 84

002310
002334

000125

MOV
MOV

3s:

CcMP

BEQ
MOV
MOV
MOV

002312
002310
002334

022344

022424
022426
022430
022432
3834 022434
022434
022436
3835
3836 022440
3837 022446
3838
3839 022450
3840
3841 022454
3842
3843 022462
3844 022464
3845 022472
3846 022500
3847 022506

PAGE 57-1

SEQ 0104

022344
022346
022350
022352
3821 022354
022354
022354
3822
3823 022356
022356
022356
3824
3825 022360
3826
3827 022366
3828 022374
3829 022376
3830 022404
3831 022410
3832 022416
3833 022424

15:22

INTERACTION

160040
000125
000006

#SLTO,GDATA
94 ,REGNUM
44

:GET THE GOOD DATA
iGET THE REGISTER NUMBER WHICH FAILED

aSEL6, 24000125
603
&SEL6,BDATA

i THIS PART OF

96 ,REGNUM

THE

TEST PASSES

A MATCH IS FOUND

FAILURE PRINTOUT--

EM7,ERRS

;ELSE,
:

104455
000020
014564
005552
60s$:

THE

tGET THE BAD DATA
:GET THE GOOD DATA
1GET THE REGISTER NUMBER

€000125,GDATA

-PREPARE FOR

GEDF

1 COMPARE SELECT REGISTER 6 WITH THE DATA SENT

AN ERROR HAS BEEN FOUND
"DEVICE FATAL” ERROR # 16

TRAP

CS$EROF

. WORD
.WORD
.WORD

ENDSUB

16
EM7
ERRS

L10034:

104403
; 08Q2000000000000000

BGNSUB

TRAP
CsesuB
B4883000080023003002000000008000030000000800
T7.2:

104402

TRAP

112777

000002

157770

MOVB

QWRILOC,8BSEL2

:SEND THE WRITE LOCATION COMMAND

032777
001421
017737
004737
012737
012737

000200

157762

BIY

{WE

JSR

9200, 88SEL2
5%
3BSEL2,BDATA
PC,GETBSR

GEOF

EM15,ERR2

157754
004434

000002
000002

8EQ

002312

MOV

002310
002334

MOV
MOV

4002,GDATA
42 , REGNUM

SHOULD HAVE

LOST

csBsuB

“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

104455
000021
014733
005304

IMEDIATLY

TESTING BSELZ2

"DEVICE FATAL" ERROR &

17
TRAP
.WORD

ESCAPE

104410
000206

CSERDF
17

.WORD
.WORD

EM1S
ERR?

TRAP

CS$ESCAPE

. WORD

132777
001774

000200

004737

004576

023727

002246

001412
012737
013737
012737
000451

000525
002246
000000

157710

Ss:

8118
8EQ

€200,3BSEL2

;WAIT

JSR

PC.GETWSR

sWHEN IT DOES,

000525

cHP

WSRO, #000525

002310
002312

8EQ

MOV
MOV
MOV

64
#000525,GDATA
WSRO,BDATA

1COMPARE BYTE SELLCT REGISTERS O AND
{REG 0 = 125, REG 1 = 001

002334

B8R

00, REGNUM
9

FOR

: THIS PART

"MRDY"

TO GO HIGH AGAIN

GET CURRENT REGISTER CONTENTS

THE

TEST

PASSES

:GET THE GOOD DATA
;GET THE BAD DATA
:GET THE REGISTER NUMBER
{EXIT

TEST

L10033-,

A MATCH

IS FOUND

DMVLIL MCTRL

DIAG o1

MACRO M1200

CSR, MAINTENANCE MICROCODE
022510

023727

002250

22 FEB

000200

001412
012737
013737
012737
000433

000200
002250
000002

002310
002312
002334

022544

023727

002252

000020

022552
022554
022562
022570
022576

001412
012737
013737
012737
000415

000020
002252
000004

002310
002312
002334

022600
022606
02261v
022616
022624

023727
001415
C12737
013737
012737

022634

022636
022640
3877 022642
022642
02:642
3878 022644
022644
022644

PAGE

SEG 0105

002254

000125

000125
002254
000006

002310
002312
002334

64%:

73:

8%:

cMP

14)
#000200,GDATA
WSR2 ,BDATA
02 ,REGNUM
9t

WSR4,0SLTO

BEQ
MOV
MOV
MOV
BR

8¢
@SLTO0,GDATA
WSR4 ,BDATA
04 ,REGNLA
9

cMe
8EQ
MOV
MOV

WSR6, 0000125
ENOT?
#000125,GDATA
WSR6 ,BDATA

MOV

9 :

WSR2, #000200

8EQ
MOV
MOV
MOV
B8R

i -

022632

15:22

INTERACTION

022516
022520
022526
-022534
022542

022632

B9
84

06 ,REGNUM

PREPARE

GEDF

104455

FOR

THE

EM7,ERRS

1COMPARE BYTE SELECT REGISTERS 2 AND 3

tREG 2

= 200

"MRDY”

IS SET & COMMAND

1REG 3 « 000 SHOWLD BE ZEROES.
1 THIS PART OF

THE

1GET THE GOOD DATA
1GET THE BAD DATA

TEST PASSES

IS5 FOUND

1SUBROUTINE ATTEMPTED TO ZERO THIS LOCATION.
tREG 4 - 020, THE 6502 ADDRESS TO PUT DATA
s+ REG 5 = 000, ZEROED By MSTCLR
1 THIS PART

THE

1GET THE GOOD DATA
1GET

TEST PASSES

A MATCH

IS FOUND

THE BAD DATA

1GET THE REGISTER NUMBER
sEXIT

TEST

tREG 6 = 125, THE WRITE DATA
1 THIS PART OF THE TEST PASSES IF A MATCH IS FOUND
tGET THE GOOD DATA
:GET THE BAD DATA
1GET THE REGISTER NUMBER
t+ REG 7 « 000, ZEROED BY MSTCLR,

FAILURE

PRINTOUT-

sREPORT

ERROR.

‘OEVICE FATAL'

ERROR & 18

TRAP

. WORD

014564
005552
ENDSUB

CSERDF

.WORD
.WORD

EM?
ERRS

TRAP

CSESUB

TRAP

CSETST

L10035:

104403
ENDTST
104401

A MATCH

1GET THE REGISTER NUMBER
(EXIT TEST

000022

ENDT7:

IS CLEARED

L10033:;

CNDMAQ0 DMV11 MCTRL
TEST

DIAG 21

MACRO M1200

22 FEB

CY
15:22

PAGE

SEQ 0106

RUN FLIP FLOP

289X

.SBTTL

TEST 8

RUN FLIP

FLOP

3000“‘.0““0.0.“.“‘.‘0“““.0““000....

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

t e

TEST

THE

RUN

PROGRAM PUTS

FLIP-FLOP

THE

MICROCODE

INTO

THE

MAINTENANCE

LOOP.

125

CHARACTER

1 IS LOADED INTO BSEL6 AND A REQUEST IS MADE TO WRITE THE CONTENTS OF BSEL6
1o INTO BSELO. THE PROGRAM THEN READS AND CHECKS BSELO TO CONTAIN 125.

NEXT,

THE

RUN FLIP-FLOP

CLEARED

INTO RUN

(BSEL1

BIT

7).

1+ BSELO IS THEN CLEARED AND THE REQUEST IS MADE AGAIN TO WRITE THE CONTENTS
1 OF BSEL6 INTO BSELO. THE PROGRAM STALLS FOR SO MICRO-SEC. AND CHECKS FOR
i MROY (BSEL2 BIT 7) NOT SET, AND BSELO STILL CLEARED.

THEN,

THE

PROGRAM

SETS

THE

RUN FLIP-FLOP

AGAIN BY

3¢ AND CHECKS FOR MRDY SET WITHIN S0 MICRO SEC.

AND BSELO =

INTO

125.

RUN,

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

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

022646
022646

3894
3895
3896 022652
3897 022654
022654
3898 022656
3899
3900
3901
3902 022662
3903 022666
022670
3905 022672
3906 022674
022674
3907 022676
3908 022700
3909 022706
3910 022710
3911 022716
3912 022724
3913 022730

022730
022732
022734
022736
3914 022740
022740
022742
3915
3916
3917 022744

3918
5919 022750
3920 022756
3921

BGNTST

i
004737

003762

JSR

103003

104460
000137

023212

3
004537
000020
000125
103002

104460
000545
123777
001416
017737
013737
005037

004322

2s:

JMP

244

JSR

SLTO
125
8CC

ERROR

157436

022670
002334

157444

5%:

002312

002310

B8R
cMPB
B8EQ
MOV

1ELSE,

REPORT

EXIT

RS5,WRITEI

IWRITE

TEST

1 IF

GEDF

EM16,ERRS

REGNUM

THE CSR S AND

MAINTENANCE

LOOP

AND

TRAP

THIS TEST

TSt

THROUGH

THE BACK

CSERROR

DOOR!

DATA

AN ERROR OCCURED,
IT

€

TRAP

EXIT

CSERROR

sDID THE DATA GO INTO BSELQ?

$YES,

NOW

tNO,

SETUP £ PRINT ERROR MESSAGE

iWE'RE

tIF

TRY

WITH

SINGLING OUT

WRITE

“RUN”

SELO FOR

“DEVICE FATAL®

THIS

THE

OION'T

THE

ERROR 2

WORK,

BIT

OFF

MESSAGE

19
TRAP

CSERDF

. WORD
.WMORD
.WORD

19
EM16
ERRS

THERE

TRAP

1IN

142777
112777

THE

PROCEED

INTO BSELO

{REPORT

MOV

ESCAPE

INTO

ADDRESS OF BSELO WITHIN RAM

104410
000250

6502

INTO LOCATION USED BY BSELO

104455
000023
015013
005552

105077

THE

3 IF NO ERROR,

24
104 ,88SELO
118
8SELO,BDATA
108 ,GDATA

CLR

18::

1CALL SUBROUTINE TO INITIALIZE

;PUT

8CC
ERROR

DO NORMAL WRITE

108:

022670

PC,MSTCLR

157402
000200
000002

118:

157376
157372

CLRB

8ICB

MOv8

FBSELO
ORUN,8BSEL
1
AWRILOC, aBSELD

TRYING

WITH

“RUN"

OFF
!

.WORD

SENSE

CSESCAPE

L10036

1CLEAR BSELO AGAIN

tREG’'S ARE ALREADY SETUP FROM PREVIOUS WRITE
;TURN OFF THE RUN BIT
€ HOPEFLLLY THE 6502
1TELL M OOP TO WRITE AGAIN

ALSQ

CNDMAAO DMV11 MCTRL DIAG &1
TEST

MACRO M1200

DY
F.B

15:22

PAGE

SEQ 0107

RUN FLIP-FLOP

3922
3923
3924
3925
3926
3927

3928
3929 022764
3930 022770
3931 022776
3932
3933
3934 023000
2935 023004
3936 023006
3937
3938
3939
3940
3941
3942
3943
3944
3945 023010
3946
3947
3948
3949
3950
3951 023016
3952 023022
3953 023030
3954
3955
3956 023032
3957
3958
3959
3960 023034
3961 023042
3962 023046
3963 023054
3964 023062
3965 023070

023070
023072
023074
023076
3966 023100
023100
023102
3967
3968
3969
3970 023104
1971 023112

$AT
1WE

THIS POINT, THE DMV-11 SHOULD BE QUIESCENT.
IT
HAVE CLEARED "MRDY",
THEREFOR, THERE SHOULD BE

SHOULDN'T
NO CHANGE

EVEN KNOW
IN ANY OF

THAT
THE

tREGISTERS FOR AS LONG AS WE CARE TO WAIT AND WATCH.
THE ONLY CHANGE THAT WE
1COULD POSSIBLY SEE WOULD BE “MRDY” BEING SET AGAIN AND/OR BSELO GETTING
1LOADED WITH THE

TEST DATA

WHICH

IS WHAT

THE

REQUESTED COMMAND

1tACCOMPLISH WHEN THE FUNCTION IS ALLOWED TO RUN AGAIN,
013701
132777
001042

002320
000200

105777

157346

001063
077110

157360

12%:

MOV
8ITB

DELAYZ2,R1
ROy ,8BSELR

BNE

1ST8

BNE
S08

SHOULD

1SETUP AND WAIT FOR A WHILE.
sWHILE WE'RE WAITING, WE MAY AS WELL CHECK

144

1 IF IT GETS SET, WE HAVE AN ERROR BECAUSE
iNOTHING WAS SUPPOSED TO HAPPEN WITHIN

88SELO

tWHILE

1 THE 6502 MICRO-PROCESSOR

154
R1,12¢

WE'RE

IT,

MAY

WELL

LOOK

"'MRDTY*

1BSELO.
THAT ALSO ISN'T SUPPOSED TO CHANGE.
1OECREMENT AND CHECK COUNTER -- LOOP TILL DONE

1 IF _EVERYTHING GOES OK, WE SHOULD FALL OUT OF THE LOOP TO HERE.
OTHERWISE,
1 “MRDY" OR BSELO COULD CHANGE SENOING US TO “143” OR ‘158" RESPECTIVELY TO

iPRINT

AN APPROPRIATE

1IF WE DO GET

TO HERE,

tREQUESTED FUNC TION.

152777

000200

157336

81s8

(WE

HOPE)

ERROR

WE CAN NOW SET

ORUN, 8BSEL 1

iNOW ALL WE MAVE

TO DO

MESSAGE.

IS WAIT

1SET

“RUN'

AND

"RUN“ AND ALLOW

AGAIN AS BEFORE.

1OR BSELO GETVTING SET IS THE VALID CONDITION
iPERFORM IS NOW THE ERROR WE'RE LOOKING FOR.
013701
132777
001070

002320
000200

157326

13s$:

077105

MOV

8IT8

BNE

S08

+IF WE GET HERE,
117737
004737
1.3737
152737
012737

157316

004434
002312
000200
000002

002312

MOVB

JSR

002310
002310
002334

MOvB

81s8

MOV
GEDF

DELAY2,R1

1SETUP

244

sIF

OMRDY, BSEL2

R1,13%

85SEL2,BDATA

BDATA,GDATA

oMROY ,GDATA

@2 ,REGNUM
EM17,ERR2

ESCAPE

THIS

THE ERROR.

TIME

FAILURE

TST

157246

002312

144

MOVB
J3R

"MRDY” SHOUWLD GO NON ZERO

WE CAN ASSUME

THAT SOME THING

iCOMPLETED.
AT LEASE WE WERE ABLE TO GET
16502 MICRO-PROCESSOR RUNNING AGAIN

tDECREMENT AND CHECK COUNTER

TO RESTORE
1SETUP FOR

1GET

sPICK

LOOP

THE ERROR MESSAGE

TILL DONE

GET BAD DATA

THE BSEL REGISTERS FOR DUMPING
THE

THE

THE 6502 TO A RUNNING STATE!

tBETWEEN GOOD £ BAD

THE

ONLY

"MRDY" BIT

DIFFERANCE

s INDICATE THAT WE'RE LOOKING AT BSEL2
tNOW REPORT THE ERROR

“DEVICE FATAL" ERROR @ 20

$EXIT

TEST

(OR LOOP,

MAYBE?)

.WORD
. WORD
.WORD

.WORD

004434

"MRDY

FOR A WHILE,

TRAP

+IF WE GET HERE,
117737

THAT

TO RUN AGAIN

TRAP

104410
000110

004737

1T GETS SET,

104455
000024
015110
005304

EXCEPT

NOT

«ND WAIT

THE 6502

tWHILE WE'RE WAITING,

WE WEREN'T ABLE

PC,.GETBSR

THE MLOOP SHOULD PERFORM THE

CSERDF

20
EML7?
ERR2

CSESCAPE

L10030

BSEL2 CHANGED WHEN THE 6502 WASN'T SUPPOSED TO BE RUNNING!
8BSEL2,BDATA
PC,GETBSR

tGET
tGET

THE UNEXPECTEDLY ALTERED CONTENTS OF
THE BSEL REGISTERS FOR DUMPING

BSELD

CNOMAAO DMV11 MCTRL DIAG &1
TEST

3972
3973
3974
3975

- -

MACRO M1200

E9
22-FEB 84

15:22

PAGE

58-2

SEQ 0108

RUN FLI+-FLOP

023116

113737

023124
023132
023140

142737
012737

023140
023142
023144
023146
3976 023150
023150
023152
3977
3978
3979
3980 023154
3981 023162
3982 023166
3983 023172
3984 023176

104455

023176
023200
023202
023204
3985 023206
023206
023210
3986
3987

002310
002310
002334

MOvB

BICB
MOV

GEDF

000025
015170
005304

ESCAPE

104410

BDATA,GDATA
OMRDY ,GDATA
42 ,REGNUM
EM17A,ERR2

tPICK THE REGISTER'S DATA,
+BETWEEN GOOD € BAD IS THE

1 INDICATE THAT WE'RE LOOKING AT BSELZ2
tNOW REPORT THE ERROR

"DEVICE FATAL"” ERROR ¢ 21

TRAP

$EXIT

TST

THE ONLY DIFFERANCE
"MRDY" BIT

TEST

(OR LOOP,

MAYBE?)

000040

CSERDF

. WORD
. WORD
.WORD

21
EM17A
ERR2

TRAP

CS$ESCAPE

.WORD

L10036

;IF WE GET HERE, BSELO CHANGED WHEN THE 6502 WASN'T SUPPOSED TO BE RUNNING!
117737

004737
105037
105037

157172
004434
002310
002334

002312

15%:

104455
000026
015170
005304

MOVB

JSR
CLRB
CLRB
GEDF

ESCAPE

104410
000002

sIF WE GFT MERE,

3988
3989 023212
023212

023212

002312
000200
000002

244 :
104401

ENDTST

88SELO,BDATA

PC.GETBSR

GDATA

REGNUM
EM17A,ERR?

1ST

THE

;GET THE UNEXPECTEDLY ALTERED CONTENTS OF BSELO
;GET THE BSEL REGISTERS FOR DUMPING
+IT WAS SUPPOSED TO STAY AT ZERO
;s INDICATE THAT WE'RE LOOKING AT BSELO
;NOW REPORT THE ERROR
‘'DEVICE FATAL" ERROR & 22

TRAP
.WORD

$EXIT

TEST

APPEARS

TEST

TO HAVE

(OR LOOP,

MAYBE?)

CSERDF
22

.WORD
.WORF

EM]7A
ERRZ2

TRAP
.WORD

C$ESCAPE
L10036-.

PASSED WITH FLYING COLOURS

L10036:

TRAP

CSETST

CNDMAAO DMV11
TEST

MCTRL

DIAG

o1t

F9
MACRO M1200

22 FFB

15:22

PAGE

SEQ 0109

LOW RAM (00 OF) SCRATCHPAD

LSBTTL

4004

TEST 9

LOW RAM (00 OF
) SCRATCHPAD

1r0000080000000000000000800080000+400000000000000000000000000000000000000008044

1 e

s¢

THIS

TEST

FIRST

i¢ WRITING

ARE

THEN,

READ

AND

THE

DATA

LOW

RAM

ADDRESSING

TEST

RAM

LOCATIONS

INTO EACH LOCATION AND AFTER EACH WRITE,

CHECKED

TEST

(00-OF
) SCRATCHPAD

PERFORMS

THE ADRS

;e BYCHRITING.
;¢ LOCATION,
;e

FOR

PERFORMS

READING,

PATTERN B

EXPECTED

ALL

(00

OF),

THE LOCATIONS

CONTENTS.

READ/WRITE

DATA

TESTING

RAM

LOCATIONS

AND COMPARING ALL BYTES OF DATA PATTERN B

00-OF,

IN EACH

125,

252,

000,

377,

001,

002,

004,

010,

020,

040,

200,

376,

375,

373,

367,

357,

337,

277,

177, 000

100,

i e

[

4005
4006
4007
4008

023214
023214
023220
023222
023222
023224
023224
023226
023230
023236
023244
023250
023254

4009
4010
4011
4012
4013
4014
4015
4016
4017 023260
4018 023264
4019 023266

023266

4020 023270

4021
4022
4023
4024

4025
4026
4027
4028
4029
4030
4031
4032
4033

023270
023272
023274
023300
023306
023310
023310

000804000000 00000000008000080000808080000000000000000000400000880000000004480

H
004737
103003

BGNTST

003762

104460
104410
000152
012737
012737
004737
005037
005037

000001
003777
023402
002450
002452

002444
002474

1$:
28:

004737
103003

023420

002464
002464

PC,MSTCLR
13

:INIT DMV £ ENTER M LOOP
;:IF NO ERROR, PROCEED WITH
;ELSE, REPORT ERROR

ESCAPE

TST

MOV

4%:

002474

5%:

104422

& EXIT

MOV
JSR

92047, , TMPE
PC,T9.RST

CLR

TMP4

; TEST DATA

TESTING WE

sLAST VALID ADDRESS
sRESET TMP3, TMPA, &

WRITE,

sWRITE,

: IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

004737
004737

103001

104260

READ,

& LOOP

023402
023616

8s¢:

CHECK

BYTE

RAM

TRAP

IF ERROR

TO NEXT LOCATION

CSESCAPE

.WORD

L10037-.

TMPA

;POINT

BLOS
BREAK

;NO, TEST ANOTHER BYTE
;ELSE, SEE IF A tC HAS BEEN STRUCK

{HAVE

TESTED

TESTING WE READ & CHECK

JSR

JSR
8CC

ERROR

PC,.T9.RST

PC,RCRAM
9%

ALL

RAM?

THE NEXT

PHASE

TRAP
C$BRK
OF TESTING

DATA WHICH SHOWD ALREADY

;RESET TMP3,

TMPA,

CSERROR

TRAP

INC

3+ EACH LOCATION OF RAM BEING CHECKED.

023312
023316
023322
023324
023324

READ & CHECK EACH LOCATION INDIVIDUALLY.

PC,WRCRAM

THIS PHASE OF

L10037

;sACTUAL DATA

JSR

TMPA , TMPE

CSESCAPE

.WORD

TMPF

8cC
ERROR

cMp

C$ERROR

TRAP

s1DATA GENERATION ALGORITHM CODE

TTMMPS

TRAP

TEST

1 THEN PROCEED

TESTING

01, TMP2

IN THIS PMASE OF

104460

104410
000106
005237
023737
101764

JSR
8CC
ERROR

CLR
:

& TMPF

tREAD & CHECK 1 BYTE OF RAM
; IF NO ERROR, PROCEED

tELSE,

REPORT

TRAP

CS$ERROR

CNDMAAO DMV1l1 MCTRL DIAG o1
TEST

MACRO M1200

22-FEB

15:22

PAGE

SEQ 0110

-- LOW RAM (00-OF) SCRATCHPAD

4034 023326
4035 023332
403¢ 023340
4037 023342
023342
4038
4039
4040
4041
4042
4043
4044
4045
4046

023344
023350
023354
023362
023364
023370
023372
3047 023374
4048 023376
023376
4049 023400
023400
023400
4050
4051
4052
4053 023402
4054 023406
4055 023412

4056 023416

4057
4058
4059

005237
023737
101766

002464
002464

002474

94
.

104422

005037
005237
023727
002730
004537
000173

4060 023420

TMPA
TMPA, TMPE
8s

tPOINT TO NEXT LOCATION
tHAVE WE TESTED ALL OF RAM?
+NO, TEST ANOTHER BYTE
tELSE, SEE IF A tC HAS BEEN STRUCK
s THEN PROCEED

007104
002444
002444

000007

004322

000000

103001

104460

THE

005037
005037
005037
000207

002446
002464
002476

;RESET ERROR PRINT COUNT

RS,WRITEI

1NO, THEN GO DO THIS PATTERN IN RAM
sELSE, CLEAR RAM LOCATION 00B3 (HEX) & EXIT

8CC
ERROR

.+4

H
(THIS WE HOPE,
1 IF NO ERROR, PROCEED

RESET

THE

i+
ADVANCE TO NEXT DATA GEN. ALGORITHM CODE
sHAVE WE DONE ALL THE CODES WE'RE GOING TO DO?

(THIS CONVERTS

sELSE,

REPORT

TO 00B3 HEX.)

WILL CLEAR IT)

1IT7

L10037:

T9.RST:

CLR
CLR
CLR

FOLLOWING

RTS

WRITE, READ,

WRCRAM:

010046

C $BRK
TRAP
OF TESTING

ERQ7CT

104401
s+

PMASE

CLR
INC
cHP
8Ly
JSR
173

ENDTS1

4061
4062 023422
4063
4064 023426
4065 023432
4066 023436
4067 023440
4068 023444

INC
CcMP
BLOS
BRE AK

THREE

TMP3
TMPA
TMPF
PC

TRAP

CS$ERROR

TRAP

CSETST

REGISTERS

; TEST DATA PATTERN INDEX
:RAM LOCATION ADDRESS

;RESET ALL ERROR FLAGS

& CHECK ONE LOCATION

MOV

RO, -(SP)

:SAVE WORKING REGISTERS

004737

023776

JSR

PC,.PATGEN

sGENERATE ONE DATA PATTERN BYTE

002464
000020

MOV

BNE
DEC
BR

TMPA,RO
RO,4SLTO
2$
RO,4SLTO+8.
28
TMP2,
06
124
TTMMP3
12$

1GET ADDRESS WHERE WE CAN CHECK IT MORE EASILY
:+IS ADORESS BELOW THE SELECT REGESTER AREA?
t1YES, GOOD.
IT CAN BE TESTED.
;IS IT ABOVE THE SELECT REGISTER ARtA?

4069 023446
4070 023454
4071 023456
4072 023462

013700
020027
103412
020027
103007
023727
001055
005337
000452

023464
023470

010037
010037

023500
023512

MOV
MOV

RO,4%
RO,8%

$SETUP ALL POINTERS FOR THE CURRENT RAM LOCATION

023474
023500
023502
023504

004537
000000
002450
103442

004310

JSR
. WORD

RS,WRITE
0

iWRITE ONE BYTE OF THE TEST DATA

8CS

i IF ERROR WRITING,

023506
023512
023514
023516

004537

004064

JSR
. WORD

RS ,READ

:READ

000000
002452

jssee MODIFIED FROM ABOVE eese

B8CS

144

1 IF

4073
4074
4075
4076
4077
4078
4079
4080
4081
4082
4083
4084
4085
4086

103435

cHP
B8LO
cMP
BHIS
CHP

000030
002444

000006

002446

es:

434
:

TMP4

8¢%:

TMPS

;YES,

tNO,

GOOD.

CAN BE

;ELSE JUST BYPASS

;:DECREMENT
:

AND

TESTED.

“INCREMENTAL”, BACK UP INDEX
TEST

INDEX TO WHAT

THEN BYPASS

THE

IT WAS BEFORE

12460 MODIFIED FROM ABOVE

;TEST DATA IS IN TMP4
THAT

BYTE

FORGET

BACK

ERROR READING,

“PATGEN’

TESTING

sess

THE ReST

AGAIN

FORGET

THE REST

CNDMAQO DMV11 MCTRL DIAG 21
TEST

MACRO M1200

H9
22 FEB

023546
023554
023562
023570
4093 023576

012737
012737
012737
012737
000402

000027
015675
006724

023600
023604
023606

004737

000261
000401

007110

023610
023612
2101 023614

000241
012600
000207

12%:
144:

023616

010046

RCRAM:

023620

004737

023624
023630
023634
023636
023642
023644
023652

4102
4103
4104
4105
4106
4107
4108
4109
4110
4111
4112
4113
4114
4115
4116
4117
4118
4119
4120
4121
4122
4123
4124
4125
4126
4127
4128
4129

PAGE

59 2

SEQ 0111

123737
001430
132737
001020
112737

4094
4095
4096
4097
4098
4099
4100

1S5:22

LOW RAM (00 OF) SCRATCHPAD
023520
023526
023530
023536
023540
023546

4087
4083
4089
4090
4091
4092

002450

002452

000002

002476

000002

002476

000001

002236
002240

cMPB
B8EQ
BITB
BNE

MOVB

GTOF

1DID WE READ WHAT WE WROTE?
s YES, EXIT
tNO, MAVE WE ALREADY DONE THIS ERROR'S HEADER?
e8IT1, TMPF
EMA7A,ERR47

sYES, ONLY REPORT DATA
sELSE, CALL MONITOR & PRINT HEADING
;QUEVE UP THE ERROR MESSAGE
H
QUEVE "DEVICE FATAL" ERROR & 23
MOV
MOV
MOV

002242
002244

OT .€EDF ,ERRTYP
#23 ,ERRNBR
QEM47A ,ERRMSG

SERRA7 ,ERRBLK

MOV

108
9s:

Pr,ERR47,

10¢:

14¢

(SP)+ RO

3 JUST PRINT DATA
H
& SET THE ERROR FLAG
:
€ GO DIRECTLY TO THE EXIT
tNORMAL EXIT
tRESTORE

WORK

- MAKE SURE
REGISTERS

"RTS*

THE ERROR FLAG IS CLEAR

RO, -(SP)

: SAVE WORKING REGISTERS

023776

PC,PATGEN

;GENERATE ONE DATA PATTERN BYTE

013700
020027

002464
000020

RO,8S5LTO

TMPA ,RO

000030

RO,0SLTO.8.

023654
023660

020027
103007
023727
001046
005337
000443

sGET ADDRESS WHERE WE CAN CHECK IT MORE EASILY
;IS ADDRESS BELOW THE SELECT REGESTER AREA?
1 YES, GOOD.
IT CAN BE TESTED.
;IS IT ABOVE THE SELECT REGISTER AREAR?

023662

010037

023672

023666
023672
023674
023676

004537
000000
002452
103435

004064

023700
023706
023710
023716
023720
023726

123737
001430
132737
001020
112737

002450

000004

002476

023726
023734
023742
023750
4130 023756

012737
012737
012737
012737
000402

000001
000030
015735
006724

002236
002240
002242
002244

004737
000261

007110

4131
4132 023760
4133 023764

103412

002444

23
TMP2,
06
123

000006

GOOD.

CAN BE

TESTED.

sNO, IF "INCREMENTAL", BACK UP INDEX
sELSE JUST BYPASS TEST
;:DECREMENT INDEX TO WHAT IT WAS BEFORE

TMP3
12%

2$:

RO,8

$SETUP POINTER FOR THE CURRENT RAM LOCATION

RS ,READ
0

;READ

8%:

: IF ERROR READING,

002452

TMP4
, TMPS

00247¢

12$
aBIT2, TMPF

sWAS THIS LOC. STILL
$YES, EXIT
+NO, HAVE WE ALREADY

002446

000004

s YES,

0BIT2, TMPF
EMAa7B,ERR4?

AND

THEN BYPASS

THAT

THE

BYTE BACK

TESTING

AGAIN

;eess MODIFIED FROM ABOVE eass

FORGET

THE REST

OK?

DONE

THIS ERROR

MOV

9%
:

10$:

10$

JSR
SEC

PC,ERR47,

S HEADER?

;YES, ONLY REPORT DATA
;ELSE, CALL MONITOR & PRINT HEADING
{QUEVE UP THE ERROR MESSAGE
H
QUEVE “DEVICE FATAL" ERROR 2 24
MOV

B8R

“PATGEN”

MOV
MOV

$JUST

DATA

& SET

THE £RROR FLAG

&7 .EOF ,ERRTYP

#24 ,ERRNBR

SEM4
"B, ERRMSS
#ERRA
TM ,ERRBLK

CNDMAAO DMVI1 MCTRL DIARG &1
9

4134
4135
4136
4137
4138
4139
4140

023766

000401

023770
023772
023774

000241
012600
000207

B8R

148

CLC
MOV

(SP)+,RO

12%:
14$:

PAGE

19
59

SEQ 0112

sNORMAL EXIT

- MAKE SURE

tRESTORE WORK REGISTERS

RTS

€ GO DIRECTLY

THE EXIT

“RTS”

THE ERROR FLAG IS CLEAR

1000048808040 8808000804204808008848008080000804400004004008880000044044000004080000000000

4142
414%
4144
4145
4146
4147
4138
413)
4150
4151

PATGEN

<NEXT SEQUENCIAL

H
H
H
H

;
H

:
:

i
H
H

]

4166 023776
4167 023776
4168 024004
4169 024006

002444

00000°

024010
024016
024020
024022
4174 024030
4175 024032
4176 024034

002444

000004

024036
024044

112737
000443

000377

024046
024052

105037
000440

002450

024054
024062
024064
024072
024074
024102

132737
001404

000001

002446

112737

000125

002450

112737

000252

002450

4170
4171
4172
4173

000430
000424

002446

---

ALL
ALL

ADORESS

ONES
ZEROES

1 BIT ALTERNATING
BITS ALTERNATING
2
-IN ADDRESS

-- INCREMENTAL

cMP

BLY
BEQ
CMP
BLY
BEQ
CMP
BLT
8EQ
B8R

000006

002450

INSTRJUCTTON>

(INDEX IN ADDRESS)

0880608000488 08488480800048040024000008004020444088000400080080840444000020880800440008

PATGEN:

023727
002414
001417
023727
002416
001431
023727
002441
001444
000404

THE TEST PATTERN INOEX INDICATES HMOW FAR INTO THE TEST PATTERN STRING OF
I.E. IT SPECIFIES THE NUMBER OF THE BYTE OF THE WHOLE STRING
BYTES WE ARE.
OF BYTES COMPOSING THE COMPLETE TEST PATTERN,

TEST DATA BYTE FOR A SPECIFIC ELEMENT

TEST PATTERN CODES:

4164
4165

PC,PATGEN

JSR

;

TO GENERATE A

”T"pz'

4160
4ol
4162
4163

SUBROUTINE

<SET TEST PATTERN CODE @ IN
">
<SET TEST PATTERN INDEX IN "TMP3

4152

CALLING SEQUENCE:

[

4153
4154
4155
4156
4157
4158
4159

4184
4185
4186
4187
4188
4189
4190

15:22

- LOW RAM (00-OF) SCRATCHPAD

4141

4177
4178
4179
4180
4181
4182
4183

22 FEB 84

AN
& LN -

TEST

MACRO M1200

TTMMP2, 02
18
2%
TTMMP2,
04
3¢

;0ECODE THE TEST PATTERN IDENTIFIER
10, 1, OR NEGITIVE WILL GIVE 'ALL ONES
;2

"ALL

3
4

=
=

1 BIT ALTERNATING"
'2 BIT ALTERNATING PATTERN

“ADDRESS

4%
TMP3, 26

5
6%
24

ZEROES'

IN ADDRESS'

' INCREMENTAL”

(INDEX IN ADDRESS)

“ALL ZEROES'

;UNDEFINED =

1$:

MOVB
BR

9377,TMP4
60

; "ALL ONES” DATA PATTERN

2s:

CLRB
B8R

TMP4
60§

3 'ALL ZEROES'

3s:

81718
BEQ

21,THMP3

:'1 BIT ALTERNATING'
252“
s IF EVEN, USE

MOve

204
:

B8R

MOV8

208
0125, TMPS
608

#9252, TMP4
603

; IF 00D,

USE

DATA PAITERN

"125*

PATTERN:

10101010

PATTERN:

01010101

PATTERN

CNDMAAO OMV11l MCTRL DIAG @1
TEST

MACRO M1200

22 FEB 84

15:22

PAGE

59 4

SEG 0113

LOW RAM (00-OF) SCRATCHPAD

4191
4192
4193
4194
4195
4196
4197
4198
4199
4200
4201
4202
4203

024104
024112
024114
024122
024124
024132

4204
4205
4206
4207

132737

000001

002446

112737
000414
112737

000063

002450

000214

002450

001404

000410

8ITB
BEQ

81,TMP3

;IF EVEN, USE "214"
: IF 00D, USE “063"

MOVB

22%:

B8R

MOv8

3”2 BIT ALTERNATING” PATTERN

0214, TMP4

PATTERN:

11001100

PATTERN:

00110011

603

;

024134
024142

000404

113757

002464

002450

Ss:

MOVB

TMPA, TMP4
60$

; "ADDORESS IN ADDRESS*

024144
024152

113737
000400

002446

002450

MOvB

TMP3, TMP4
60%

: "INCREMENTAL"

024154
024160

005237
000207

002446

INC

TMP3
PC

: INCREMENT PATTERN INDEX FOR NEXT CALL

BR
B8R

60%$:
62%:

RTS

(INDEX

IN ADDRESS)

(LOC'S 0018-01FF
.SBTTL

TEST

1000888448083

15:22

PAGE 60

SEQ 0114

HEX)
--

DATA RAM MOVING

INVERSIONS

(LOC’'S

s«

;¢

FIRST, THE 2K BYTE LOCATIONS IN RAM ARE LOADED
THEN, THE FIRST LOCATION IS READ AND CHECKED, A

THE LOW BIT POSITION,

BBEE?I%:

¢ L
;¢
;%

THE

RAM,

AND

THIS

WITH 0'S
SINGLE 1

IS READ AND CHECKED.

INCREMENTING

THE

ADDRESS

OO
G0
G
V*

2% BN 2K JN 2% 2N 4

(SEE NOTE BELOW).
IS WRTTTEN INTO

THIS

TO POINT

IS DONE FOR ALL
THE

RAM

THEN, THE NEXT BIT POSITION IS CHOSEN
ARE READ, WRITTEN, AND READ AS BEFORE.

TO INSERT A 1, AND ALL LOCATIONS
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 0'S INSERTED INTO THE RAM INSTEAD OF
THIS RESWLTS IN THE ENTIRE RAM BEING WRITTEN TO ALL 0O'S.
THIS TEST CONSTITUTES A THOROUGH TEST OF THE RAM, IT IS CAPABLE OF

1°'S,

DETECTING THE FOLLOWING FAULTS :
STUCK ADDRESS BITS, UNI- AND BI-DIRECT
IONAL COUPLING BETWEEN ADDRESS BITS, STUCK MEMORY BITS, AND UNI- AND
gé-ggREC;%S?QL COUPLING BETWEEN MEMORY BITS IN BOTH ROWS AND COLUMNS OF THE
MORY

Vo
V¢
G
V¢
VI
VO
G0
We
G
GO

NOTE:
THIS TEST DOES NOT CHECK LOCATIONS 0010-001F,
ARE NOT

WRITTEN.

IT DOES

SO
LOCATIONS 0000-O00OF

TEST

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

“TMP®" REGISTERS ARE USED HERE

VARIABLES USED THROUGHOUT
USEFUL SO HERE IT IS:
TO

THIS

THE

FIRST

AS WELL AS 0030-0800 (BASIC RAM).

TO CONTAIN

TEST.

TMPO

POINTS

TMP1

ce--

TMP2

TEST

PATTERN

TTMP3

TEST

DATA PATTERN

INDEX

TEST

DATA PATTERN.

THE

THAT THE PRIMARY CSR'S
(SCRATCHPAD RAM) AND

THE

A LIST OF

LOCATION AFTER

VARIOUS

CONSTANTS &

THEIR ASSIGNMENTS SEEMS
THE

SELECT REGISTERS.

6
Ve
Go

CODE

UNUSED BY

THIS

UNUSED BY

TEST.

THIS

TEST.

B
Ve
B
G6
Ve

TMP4

HIGH BYTE

ON ANY GIVEN PASS AND THE LOW BYTE
WRITTEN BY
READ

THE

FROM

PREVIOUS PASS

TTMPS

DATA

THE

TMP6
TTMP7
TMP8
TMP9

.---.-

TMPA

RAM ADDRESS BEING

RAM,

THROUGH

ONLY

THE

PATTERN BEING WRITTEN

THE PATTERN THAT WAS

THE

RAM,

LOW BYTE

.»

USED.

TESTED.

BE
G
BE
Ve
®s

2K 2R 2R BK

IR SR IR 2K 2K B

B¢

2R 2N 2R

IR 3K BX IR X

2K 2R 2K JX BN 3K

HEX)

TEST 10 -- DATA RAM MOVING INVERSIONS (LOC'S 0018-O1FF HEX)

;¢ GENERAL DESCRIPTION:

sa¢

0018-01FF

8030840080 0040008800008 0 80400400800 08008000040480048800848044800044

TMPB

BIT

POINTER.

NUMBER

THE

BIT

WITHIN

THE

DATA FIELD

WHICH

BEING SWITCHED ON EACH WRITE WITHIN THE CURRENT PASS,

INVERSIONS

4279

DATA RAM MOVING

22-FEB-84

L K

TEST

MACRO M1200

CNDMAAO DMVI1 MCTRL DIAG 21

TMPC

DATA FLAG.

BIT O OF

THIS WORD

THE

VALUE

TO WHICH

THE BIT

‘

L9
CNDMAQO DMV11l MCTRL DIAG 41

15:22

PAGE

SEQ 0115

DATA RAM MOVING INVERSIONS (LOC'S 0018-01FF HEX)
IDENTIFIED IN TMPB IS BEING SET ON EACH WRITE IN THE CURRENT

PASS.

TMPD

DIRECTION SWITCH.,

= FORWARD

TMPE

LAST VALID ADDRESS TO BE TESTED.

TMPF

ERROR FLAGS.

NON-ZERO

= BACKWARD

®s
GF
W
Ws
Vs

IR K

B¢

X
G+
®¢

2R 2N

B¢

004737
103003

IN WHICH CASE ITS

012737
012737
005037
005037
012737

; INIT DMV & ENTER M-LOOP
: IF NO ERROR, PROCEED WITH TESTING

ESCAPE

TST

000030
003777
002462
002476

177777

ACTUAL

INITIALIZE OUTER LOOP

002440
002474

005037
012703

024244
000020

004537
000000
000000

004322

103003

<---

2s:

3$:

& EXIT TEST

INVERSIONS

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10040-.

ALGORITHM

szazzaszasssasszsassass3zzzss=zzx

---------

%24.,TMPO
92047, , TMPE
TMP9

;INIT. POINTER TO 1°'ST RAM LOC. AFTER SEL REG'S
; IDENTIFY LAST ADDRESS TO BE TESTED

MOV

#-1,TMPC

t+DATA

TTMMPF

;ERROR FLAG -- INDICATE NO ERRORS YET
=

1'S FIRST

INITIALIZE THE AREA BEING TESTED By CLEARING IT TO ZEROES

~--------

ZERO OUT LOCATIONS O THROUGH 10 (HEX) -- THOSE BELOW THE SELECT REGISTERS
CLR
MOV

3
QSLTO,R3

; INITIALIZE ADDRESS
;RAM ADORESS OF BSELO WILL DO AS BYTE COUNT

JSR

RS,WRITEI

$ZERO OUT LOC'S O -

.WORD
0
8CC
ERROR
ESCAPE

024244

REPORT ERROR

MOV
MOV
CLR

CLR

002470

MOVING

;ELSE,

jxzass.sasss

104410
000662
005237
077313

PC.,MSTCLR
1

1$:

024254
024256
4308 024260
4309 024264

JSR
8CC

ERROR

104460

4310

<8805 044040008004800400800002008804040884840040888808400804808080088480884000480040s

003762

104410
000744

THE END OF RAM)

THE LAST DETECTED ERROR WAS THE READ

BGNTST

024252

4307 024254

INVOCATION IS IGNORED.)

024174
4284 024176
4285
4286
4287
4288
4289 024176
4290 024204
4291 024212
4292 024216
4293 024222
4294
4295
4296
4297
4298
4299 024230
4300 024234
4301
4302 024240
4303 024244
4304 024246
4305 024250
4306 024252

1 SET

PRINT COUNT HAS EXCEDED ITS LIMIT

4283

4280
4281
4282

024162
024162
024166
024170
024170
024172
024172

BIT

(I.E.

OF THE PREVIQUS DATA BEFORE WRITING THE NEW DATA.,
IF BIT2 IS
SET, THE READ AFTER WRITE FAILED.
IF EITHER IS SET WHEN AN
ERROR IS DETECTED, THE SUPEF
~“OR IS NOT CALL'D AND THEREFOR
IT'S ERROR COUNTER WILL NOT
LECT THE ERROR -- INSTEAD, THE
DATA LINE IS PRINTED.
(UNLESS THE ERROR HANDLER'S DATA LINE

BN BX 3% BN

22-FEB-84

2% 2% 2% 4

TEST

MACRO M1200

INC

S0B8

.+10
TST

R3,2$

> 10 (HEX)

:
ADDRESS
DATA
:
:IF NO ERROR, PROCEED
sELSE, REPORT IT
H

AND EXIT

THIS TEST

;POINT TO NEXT LOCATION

s IF MORE TO BE DONE, DO IT

TRAP

.WORD

C$ERROR

CSESCAPE

L10040

CNOMAAO OMVi1 MCTRL DIAG o1
TEST

4311
4312
4313
4314
4315
4316
4317
4318
4319
4320
4321
4322
4323

4324
4325
4326
4327
4328
4329
4330
4331
4332
4333
4334
4335
4336
4337
4338
4339
4340
4341

22-FEB-84

15:22

PAGE 60 2

SEQ O
116

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

:
024266
024274
024300
024304

013737
013703
163703
005203

002440
002474
002440

024306

004537

004322

024312
024314
024316
024320
024320
024322
024322
024324
024326
024332
024334

000000
000000
103003

024312

4 :

6$:

104460
104410
000614
005237
077313
105037

024312

002450

ZERO OUT THE REST OF RAM -- ALL LOC'S ABOVE THE SELECT REGISTERS
MOV
MOV
SuB
INC

TMPO,6%
TMPE ,R3
TMPO,R3
R3

tFIRST LOCATION OF TEST AREA (18 HEX)
:START WITH "LAST ADDR. TO BE TESTED"” AND CALC.
tTHE & OF LOCATIONS TO BE TESTED (800 18 (HEX))
i (THIS MAKES SURE WE GET EVERY SINGLE BYTE)

JSR

RS.WRITEI

+ZERO OUT

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

INC
S08

64
R3,4%
TMP4

tPOINT TO NEXT LOCATION
;IF MORE TO BE DONE, DO IT
: THIS IS WHAT WE JUST SET ALL RAM LOCATIONS TO

.WORD
0
8CC
ERROR

024340
024344

005037
005037

002472
002466

024350
024354

005037
112737

002464
000001

CLRB
I R

8s$:

002451

000240
000240

024402
024404
024406
024410
024410
4348 024412
024412
024414
4349
4350
4351
4352 024416
4353 024420
4354 024422
4355 024430
4356 024432
4357 024440
4358 024442

000000
002452
103003

024370
024376

4359 024450

104422

013737
004537

10%:

002464
004064

024402
404 :

104460

002452

002450

000006

002476

000002

002476

THE

TEST

THIS TEST

-------vvecern

AREA

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10040-.

commemecmemccceeaaann

TMPD
TMPB

: "SET FWD SEQUENCE"
(OIRECTION FLAG)
:“SET BIT POSITION = 0"
(BIT POINTER)

CLR
MOVB

TMPA
#BITO,TMP4 .}

INITIALIZE ADDRESS POINTER
INITIALIZE CURRENT & NEXT DATA BYTES

"READ CURRENT

TMPA,40¢%
RS,READ

0
TMPS
BCC
ERROR

.+10

TST

CHECK DATA (FIRST

GEDF

TMPS, TMP4
12%
4BIT1.8IT2,TMPF
424
08IT1, TMPF

EMA8BA,ERR4A8

BUT OUR MEMORY STARTS a

--------veccmmcce
i
i
c e e
e
es

:FIRST

MOV
JSR

NOP
NOP
CMPB
8EQ
8IT
BNE
MOV

; "SET ADDRESS = 0"
SO:
18 HEX.
:

ADDRESS"

NOP
NOP
BREAK

I
000240
000240
123737
001421
032737
001010
012737

ALL

CLR
CLR

ESCAPE

104410
000524

THE

AND EXIT

BEGINNING OF OUTER LOOP

R
024362
024364
024366
024366

4342
4343
4344
4345
4346
4347

MACRO M1200

tC HAS BEEN STRUCK BY OPERATOR
TRAP
C$BRK
+NO,
PUT ADDRESS INTO READ CALL
;GO READ ONE LOCATION
;asss MODIFIED ABOVE «4sa (ADDRESS)
;ADDRESS OF DATA READ
: IF NO ERROR, PROCEED
;ELSE, REPORT IT
TRAP
CS$ERROR
:
AND EXIT THIS TEST
TRAP
CSESCAPE
.WORD
L10040-.

TIME)

SEE

IF A

-------

R
R
R

:CHECK AGAINST EXPECTED DATA
; IF OK, PROCEED
;NO,
MHAS AN ERROR ALREADY BEEN REPORTED?
; YES, JUST PRINT DATA IF WANTED
siNO,
SET FLAG FOR NEXT TIME

i+
:

AND PRINT COMPLETE ERROR MESSAGE
“DEVICE FATAL" ERROR & 25

CNDMAAO DMV11 MCTRL DIAG @1
TEST

DATA RAM MOVING INVERSIONS

024450
024452
024454
024456
4360 024460
4361 024462
4362 024470
4363
4364
4365
4366 024474
4367 024502
4368 024506
4369 024510
4370 024512
4371 024514
024514
4372 024516
024516
024520
4373
4374
4375
4376
4377
4378
4379
4380
4381

104455
000031
016016
007632
000405
012737

004737

000002

010030

002476

22-FEB-84

42%:

BR
MOV

002464
004310

024506

12%:

aas.

104460
104410
000420

013737
004537
000000
002452
103003

002464
004064

024534
464 ;

104460

104410
000372

000240
000240
123737
001421
032737
001010
012737

024602
024604
024606
024610
4394 024612

104455
000032
016016
007632
000405

4395
4396 024614
4397 024622
4398
4399
4400
4401 024626

012737

004737

002451

002452

000006

002476

000004

002476

000004

010030

002476

48%:

i
000240

SEQ 0117

---

148:

;PROCEED WITH TESTING
:INDICATE A "PRE” WRITE ERROR

PC,ERRA48.
WRITE

NEW

TRAP
.WORD
.WORD
.WORD

C$ERDF
25
EM48A
ERR48

1USE ERROR HANDLER ONLY -- NO HEADER

DATA

- ococeoiao
il oom
o,
i

MOV
JSR
.WORD
TMP4 +1
BCC
ERROR

TMPA, 44
RS,WRITE
0

;GET THIS ADDRESS FOR THIS WRITE CALL
;WRITE THE UPDATED DATA IN THIS LOCATION

.+10

iNEW DATA ELEMENT RESIDES
:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

RE - "READ

CURRENT

AND EXIT

ADDRESS"

THIS

IN TMPD.1

TEST

----cc-cucen--

TMPA, 46
RS,READ
©

:GET ADDRESS FOR THIS READ
;READ DATA JUST WRITTEN

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

;

CHECK

NEW DATA

VALUE

AND EXIT

cee

THIS

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10040 .

MOV
JSR
.WORD
TMPS
BCC
ERROR

feceeeanns

024550
024552
024554
024562
024564
024572
024574
024602

PAGE 60 3

123
0BIT1, TMPF

JSR

fommeeeaan

013737
004537
000000
002451
103003

15:22

(LOC‘S 0018-O1FF HEX)

024522
024530
024534
024536
024540
024542
024542
4382 024544
024544
024546
4383

4384
4385
4386
4387
4388
4389
4390
4391
4392
4393

MACRO M1200

TEST

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10040 .

NOP
NOP
CMPB
BEQ
BIT
BNE
MOV
GEDF

TMP4.1,THPS
14
oBIT1.8IT2,TMPF
483
oBIT2, THPF
EMABA,ERRA48

143

;DID THE WRITE WORK CORRECTLY?
:YES,
PROCEED WITH TESTING
;NO,
HAS AN ERROR ALREADY BEEN REPORTED?
iYES, ONLY USE ERROR HANDLER -- NO HEADER PLEASE
iNO,
INDICATE THAT WE'RE PRINTING A HEADER HERE
;REPORT RE-WRITE ERROR
;
“DEVICE FATAL" ERROR & 26
TRAP
CS$ERDF
.WORD
26
,
.WORD
EM48A
.WORD
ERR48
;PROCEED WITH TESTING

oBIT2, TMPF

;INDICATE

MOV

JSR

---NOP

PC.ERRA48.

"FORWARD SEQUENCE

“POST"

:JUST REPORT DATA
2~

WRITE

ERROR

-- NO HEADER

CNOMAAO DMV11 MCTRL DIAG ot
TEST

DATA RAM MOVING

4402 C24630

4403 024634
4404
4405
440¢
4407
4408
4403
4410
4411
4412
4413

005737

001056

MACRO M1200
INVERSIONS

024636

000240

024640

023737

024646
024650

001413
005237

022737

4417 024662

101237

024664
024672
024674

TST

002464

164

002464

023737
101633
000765

000020

002440

002464

HERE

IS,

002464

024676
024700

024712
024714
024720
024724

000240
005037

010024

MAKE

023727

002466

002016
005237
005037
113737

024732

002466
002464
002851

013700

024736

002470

006000

4433 024740

::gg 024744

106137

000137

002450

4436

4437
4438 024750
4439 024752

4440 024756
4441 024762
4442 024764

:::3 024770
4

§ocee
000240
005037

005137
O0C1756

002470

005.37

002472

000755

204

002466

4447 024772
4448 024774
4449 025000

::gg 025002

000240
005737
001413

002464

005317

002464

268 :

528 :

4452

::g}

4455 025006

4456 025014
4457 025016
025024

022737

101031
023737

10142%

000020

002440

002464

HERE

NOP
ST
BEQ

DEC

WE MAKE

cHP

8LO0sS

‘DATA

THE

ONE?
POSITION
ADOR.

SELECT

AREA.

TO THE NEXT ADDRESS AGAIN.

AREA

CAN'T

CHECK?

THIS LOCATION

POSITION?”

ERROR

COUNT

JUST PROCESS

A NEW

THE LAST BIT

POSITION?

“NEXT"

TEST

DATA

VALUE

12*

+POINT

10 BIT

tSWITCH DATA,
IF 1'S, DO O
1 IF WENT TO FORWARD, .....

0SDO

1SWITCH DIRECTION

tELSE,

SEQUENCE

TTMMPA
28s

BACKWARD.....

“ADDRESS = 07’
tHAVE
1YES,

TMFA

JUST PROCESSED THE
CHECK BIT POSITION

iNO,

THE

ADDRESS

oSLTO, TMPA

584
TMPO, TMPA

S84

BIT

tBUILD

SEQUENCE

SURE

THE LAST
CHECKX THE BIT
INCREMENT THE

BELOW

TTMPD

"BKWD'

ADDR.,

WITHIN

ADDRESSING

1YES, THEN WERE WE DOING 1'S OR 0'S
iNO,
THEM INCREMENT THE BIT COUNTER
tRE - INITIALIZE ADORESS POINTER
tUSE “NEXT* DATA AS “CURRENT
DATA
tUSE ONE BIT OF THE "“DATA’ SWITCh TO

TTMPB

---

F ORWARD

ADDRESS
"

THEN WE CAN CHECK

:DID WE

TTMPC
248

“LAST

10$

B8R

8HI
cHP

TMP4 .}

IS, WE WON'T USE IV

564

11IS

tRESET

coM

SEQUENCE

MOV

NOP
CLR

IS NOT

+IS IT BELOW THE BOTTOM ADDRESS?
iNO,
TEST THIS LOCATION
1YES, PERFORM THE INCREMENT AGAIN

ROR

“FWD'

THEN
THEN

s YES,

208
TTMPB
TMPA
TMP4 .1, TMPA
TMPC,RO

“LAST

THIS

PROCESS REVERSE

BUT GO BACK AND DECREMENT

TTMPB,07

com
BEQ

:::2

ADDRESS

ERABCT

JHP

THF

==+>

1 YES,
iNO,

TMPO, TMPA
10
S0

ROLS

5S¢ :

SEQUENCE

1WAS

104

BGE
INC
CLR
MOVB

24s;
S7%:

FORWARD

oSLTO, TMPA

cMP

002451

024362

SURE

“FWD"

DIRECTION

IREVERSE
1 FORWARD

cHe

NOP
CLR

000007

1CHECK

8HI
cMe
8LOS
BR

183

5C0 o118

MEX)

WE WON'T USE

Si$:

60 4

TMPA, TMPE
184
TMPA

BEQ
INC

B10O
p1

PROCESS

NOP
cHP

508

PAGE

264

002474

15:22

THPD

BNE

4426 024704

4458

OO18-O1FF

bo-

4415
4416 024654

4427
4428
4429
4430
4431
4432

(LOC'S

002472

4414

4418
4419
4420
4421
4423
aa2
4424
4425

22-FEB 84

DECREMENT

IS NOT

WITHIN

THE

FIRST

ADDRESS?

AREA.

ADDRESS

SELECT

T[F

BUT GO BACK AND DECREMENT TO THE NEXT ADDRESS AGAIN.
+IS

BELOW

THE

AREA WE

CAN'T

CHECK?

1YES, THEN WE CAN CHECK TMIS LOCATION
$IS 1T BELOW THE BCTTOM ADDRESS?
iNO,

TEST

THIS

LOCATION

CNDMAAO OMvil MCTRL DIAG o1t
TEST

4459 025026

4401
4462
4463 025030
4464 025032
4465 025036
4466 025044

4467 025046
4468 025052

4470
aa7y
4472
3473
4474
4475
4476
4477
4478
4479
4480

025060
025064
025066
025072
025100

025104
025106
025112
025114
448} 025120

4482
4483
4484
4485
4486
4487
4488
4489
4490

025122
025124
025130
025132
025134
4491 025136
025136
4492 025140
025140
025140

4493
4494

22 FEB

15:22

PAGE

Cl10
60 5

SEQ 0119

DATA RAM MOVING INVERSIONS (LOC*'S 0018 O1FF HEX)

4460

4469

MACRO M1200

000765

B8R

524
“"BKWO"

000240
005037
022737
002417
005237
113737
013700
006000
106137
013737
000137

010024
000007

284 :
002466

002466
002451
002470

002450

002451
002474
024362

002464

294

588

NOP
CLR
cMe
BLE
INC

SEQUENCE

ERASCT
e7,1MPB
30
TMPB

MOVB
MOV
ROR
ROLB
MOV

TMPA .1, TMP4Q
TTMTMPC,RO
RO
TMP4
TMPE
, TMPA

JHP

108

“"BKWD" SEQUENCE
000240
005137
001003
005037
000754

002470

1YES,

PERFORM

“LAST

BIT

THE

DECREMENT

POSITION"

tRESET ERROR PRINT

tLAST BIT POSITION?

COUNT

1YES,

CHECK

INO,

INCREMENT BIT POINTER,

1USE

AGAIN

DATA

"NEXT' DATA AS

tUSE ONE BIT OF

THE

"CURRENT" DATA

“DATA” SWITCH TO

tBUILD A NEW “NEXT" DATA VALUE
i
POINT TO LAST ADDRESS AGAIN,
€ TEST IT
!
"DATA

12"

30s:
TTMMPC

324

002466

TTMTMPB

298

$1SWITCH DATA TYPE
tNOW 1'S - - CHECK ADDRESS'S

tNOW 0'S
:

-- POINT

RESET

“LSB'
TO BIT POSITION O AGAIN

ADDRESS

TEST

“STOP

00C240
004537
000173

NOP
JSR
173

004322

R5,WRITEI

103001

8CC

104460

1CLEAR RAM LOCATION OOB3 (HEX) & EXIT

.04

(THIS CONVERTS

(THIS WE HOPE,

ERROR

s IF NO ERROR, PROCEED
$ELSE, REPORT IT

ENDTS?T

1 THATS

ALL

TO 0083 MEX.)

WILL

CLEAR

FOLKS!

IT)

TRAP

CSERROR

TRAP

CSETST

L10040:

104401

.EVEN

CNOMAAO DMV11 MCTRL
TEST

DIAG o1

VIA REGISTER

MACRO M1200

D10

22 FEB

15:22

PAGE

SEQ 0120

ADRESSING

4520

.SBTTL

TEST

VIA REGISTER ADRESSING

1000400404404 00000440000 8040004040000 000000000

00000000000000008000000000000008800048

TEST

:‘

VIA REGISTER ADRESSING

VIA == "6522 VERSATILE INTERFACE ADAPTER"

1*
i¢

THEN,

377

THEN,

MASTER CLEAR
ARE CLEARED BY

IS PERFORMED, NEXT, TIMER 1
WRITING 000 INTO VIA REGS 6

IS LOADED

INTO DATA DIRECTION REGISTERS A,

i SET THE PORT PINS FOR OUTPUT MODE.
1+

DIFFERENT

LATCHES
& 7

BYTE

DATA

PATTERN

WRITTEN

(DORA,DDRB)

INTO

EACH

VIA

i¢ LOCATION,

(EXCEPT THE TIMER REGS 4,5,10,11 OCT) AND AFTER EACH IS WRITTEN,

3¢ CONTENTS.

NOTE THAT SOME VIA REGS ARE ALTERED BY THE LOADING OF OTMERS,

i¢

ALL

VIA

AND

THE

1¢ VALUES.

REGS

PROGRAM

INTERRUPT

TAKES

TMIS

GENERATING OUTPUTS

INTO

ARE

READ

AND

ACCOUNT,

COMPARED

THE

CB2,

SETTING

EXPECTED

CA1,

CA2,

CB1,

REQUESTS).

THE

READ

REG

CAUSING 6502

OATA PATTERN C (WITH VIA REGS AND HEIR DATA SHOWN IN OCTAL)
REGISTER =
00
01
02
03
06
07
12
13
14
15

L
14 NEXT,

i+
i¢

4,5,10,11)

THE DATA PA"TERN IS CHOSEN TO AVOID ACTIVATING THE VIA CHIP (SUCH

i¢

1+
i¢

(EXCEPT

DATA = 100, 101, 377, 377, 106, 107, 112, 040, 042, 000, 200, 117
000 IS LOADED INTO DDRA, AND DDRB IS READ AND COMPARED TO 377. THEN,

377 IS LOADED
AND COMPARED

BACK
TO

INTO

CORA,

AND

DDRB

377,

LOADED

WITH 000

ANO

DDRA

:--‘0000000000“.“‘0““0‘00000‘00‘.“‘000“‘00.‘0‘0‘0‘0“‘00“‘.0“0‘0.00000
4521
4522
4523

4524
4525
4526
4527
4528
4529
4530
4531
4532
4533
4534
4535
4536

025142
025142
025146
025150
025150
025152

025154
025160
025162
025164
025166
025166
025170
025172
025176
025200
025202
025204

fale LNV}

4537 025206
4538
4539
4540
4541 025210
4542 025214
45413

BGNTST

3
004737
103002

003762

10446(
000546

004537
120006

004322

1$:

103002

104460
000537
004537
120007

PC,MSTCLR
1s

s INIT DMV AND START UP
;s IF NO ERROR, PROCEED
;ELSE,
REPORT IT AND

B8R

JSR

RS,WRITEI

;CLEAR

8CC

51LL
ERROR

004322

30¢:

103002
104460
700530

i
013703
012702

JSR
8CC
ERROR

002556
002560

B8R

Til::

THE MAINT.

EXIT THIS CLEAR
THE

TIMER

LOOP

TRAP

CSERROR

TRAP

CSERROR

TRAP

CSERROR

LATCHES

: IF AN ERROR OCCURED,

sREPORT

254

EXIT

JSR
TiLH
0
8CC
ERROR

RS, WRITEI

s+ IF AN ERROR OCCURED,
1REPORT IT €&

B8R

25t

EXIT

LOAD UP THE VIA'S REGISTERS WITH THE FIXED DATA STREAM OF PATTERN

31s:

MOV
MOV

PATC ,R3
OPATC+2,R2

‘C*

tGET COUNT OF @ OF WRITES TO BE PERFORMED
$SETUP POINTER TD REGISTER ADDRESSES & DATA

CNDMAAO OMV11 MCTRL DIAG @1
TEST

4544
4545
4546
4547
4548
4549
4550
4551
4552
4553

FEB

E10
15:22

PAGE

SEQ 0121

VIR REGISTER ADRESSING

025220
025226
025232

012737
152237
112237

120000
025242
025244

025236
025242
025244

004537
000000
000000

004322

025246
025250
025250
4554 025252
4555 025254
4556

103002

4557
4558
4559 025256

4560 025262
4561 025270

4562
4563
4564
4565
4566
4567

025276
025302
025304
025306
025310
025310
4568 025312
4569

4570
4571
4572
4573
4574
4575
4576
4577
4578
4579
4580
4581
4582
4583
4584
4585
4586
4587
4588
4589
4590
4591
4592
4593

MACRO M1200

025314
025320
025324

025242

2%:

Ss:

32%:

012703
012737
012737

000020
120000
003122

004537
000000
000000
103002

004064

6$:

7%:

8s:

104460
000466

025302
025304

33s:

;
012701
012702
012704
012705
012703
005037

025356
025360
025362
025364
025366
025370
025374

012114
012200
074014
042524
001402
005237
077310

025376
025402
025404

005737
001406

025404
025406
025410
025412

104455
000033
015243
005650

MOVB

(R2)+,58

JSR

RS,WRITEI

328

10s:

; IF

THE

DATA

WANT

R3,2$
THE

TO WRITE

see¢
ese

NFSTINATION ADOR.
DATA

AN ERROR OCCURED,

sREPORT

€

TRAP

EXIT

;LOOP UNTIL

THE WHOLE

C$ERROR

TABLE HAS BEEN WRITTEN

VIA'S REGISTERS

MOV
MOV
MOV

OPATCM PATCR,R3
o0RB,
78
0871,8%

JSR

RS,READ

tWRITE ONE REGISTER WITH THE DESIRED DATA

S08

tGET COUNT OF @ OF REG'S TO BE READ
:ADORESS OF FIRST REGISTER
1DESTINATION BUFFER AREA
tREAD ONE REGISTER

;see MODIFIED FROM ABOVE

s¢s

SOURCE

ADDRESS

0
8CC
ERROR

B8R

INC
INC
S08

74
8s
R3,6¢

sPOINT TO NEXT REGISTER
sPOINT TO NEXT BUFFER LOCATION
1LOOP UNTIL ALL REGISTERS HAVE BEEN READ

MOV
MOV
MOV
MOV

002332
002332

MOV

9%:

1t THIS

1sss MODIFIED FROM ABOVE
sees MODIFIED FROM ABOVE

4PATCR,R1

#8T1,R2
8712 ,R4
OPATCM,RS
08. ,R3

CLR

ERRFLG

MOV
MOV
XOR

(R1)s,(RA)
(R2)+,RO

RO, (R4)

8IC
BEQ
INC
S08

(R5)«,(R4).
10
ERRFLG
R3,9¢

TST

ERRFLG

GEDF

EM20,ERR6

B8EQ

;eee MODIFIED IN LINE
: IF AN ERROR OCCURED,

{REPORT

CHECK THE VALUES READ AGAINST

002604
003122
003206
002624
000010
002332

1OR IN REGISTER @ TO BUILD REGISTER ADDRESS

READ BACK

025302
025304

tADDRESS OF FIRST REGISTER

(R2)., 48

ERROR

;

025326
025332
025336
025342
025346
025352

00RB ,4

8CC

104460
000506
077317

005237
005237
077314

MOV

8IsSB8

124

THE

¢+« DESTINATION ADDRESS

IT ¢

TRAP

EXIT

EXPECTED

CSERROR

VALUES

sPOINTER

TO EXPECTED DATA

sPOINTER

tPOINTER TO DATA READ
sPOINTER TO “XOR" VALUES
"MASK'

VALUES

sNUMBER OF WORDS TO BE PROCESSED

tRESET

THE

ERROR FLAG

1GET EXPECTED VALUE (2 BYTES AT A TIME)

tGET ACTUAL VALUE AND SETUP FOR
:DEVELOPE “XOR"

"XOR"

tCLEAR THOSE BITS WE DON'T CARE ABOUT

$IF NO ERROR,

sIF

ERROR,

SKIP NEXT

SET

FLAG

INSTRUCTION

SAY

SO!

iLOOP UNTIL ALL VALUES CHECKED

1WAS THERE AN ERROR DETECTED?
tNO,
PROCEED WITH TESTING
s YES, REPORT A VIA REGISTER ERROR

"DEVICE FATAL"” ERROR @ 27

TRAP

.WORD
.WORD
.WORD

CSERDF

27
EM20
ERR6

F10
CNDMAAO DMV11 MCTRL DIAG o1
TEST

025414
025416

4595
4596
4597
4598 025420
4599 025424

4600 025426

4601 025430
4602 025432

4609
4610
4611
4612
4613
4614

4615
4616

4617
4618

4619

4620

025432

025434

025436
025442
025444
025446
025450
025450
025452
025454
025460
025462
025464
025466
025466
025470
025472
025476
025500
025504
025512

025512
025514
025516
025520
4621 025522
025522
025524
4622
4623
4624
4625
4626
4627
4628

4629
4630
4631
4632
4633

22 FEB-84

15:22

PAGE

SEQ 0122

VIA REGISTER ADRESSING

4594 025414

4603
4604
4605
4606
4607
4608

MACRO M1200

025526
025534
025540
025542
025544
025546
025546
025550
025552
025560
025562
025570

025570
025572
025574

104410
000344

004537

120003

12¢:

004176

15%:

000000

103002

104460
000415
004537
120002

348
:

004322

103002

104460
000534
105737
001413
105037
012737

35%:

004064

25%:
364%:

002312
002310
000002

002334

120003

104455

000035
015477

1GET THE CURRENT VALUE OF THE VIA'S
H
“"DDRA” REGISTER FOR LATER ERROR CHECKING

8CC
ERROR

343

: IF AN ERROR OCCURED,

B8R

25%

JSR
DORB

RS,WRITEI

8CC

B8R

JSR
DORB
BCATA
8cC
ERROR

R5,READ

B8R

7578
8EQ
CLRB
MOV
GEOF

364

BDATA
14

GDATA

02 ,REGNUM

EM21,ERR7

sREPORT

TEST

LOOP

IF REQUESTED
TRAP
CS$ESCAPE
.WORD
L10041
-.

TRAP

CSERROR

TRAP

CS$ERROR

TRAP

CSERROR

EXIT

;LOAD DDRB WITH 000
;IF AN ERROR OCCURED,

sREPORT

EXIT

tREAD

BACK

AND CHECK

:IF AN ERROR OCCURED,

{REPORT

EXIT
s
s THIS SHOUWLD NOW BE ZERO
s IT IS, PRECEDE TESTING

SETUP FOR & REPORT ERROR
;IT ISN'TY
: IDENTIFY THE DDRB REG.
REPORT ERROR
H
‘DEVICE FATAL" ERROR ¢ 28
H

TST

sEXIT FROM

THIS

TEST

025426
004064

002310

14¢:

MOvVB
JSR

DDRA
BDATA

B8CC

37¢

B8R

244

ERROR

002310

002312

000003

002334

37%:

158 ,GDATA

R5,READ

cMP8
BEQ
MOV
GEDF

GDATA,BDATA
164
43 ,REGNUM
EM22,ERR7

C SEROF

28
.WORD
EM21
. WORD
ERR7?
.WORD
LOOP IF REQUESTED
TRAP

.WORD

002312
103002

104460
000504
123737
001411
012737

R5,READI

ESCAPE

104410
000236

113737

JSR
DDRA

THIS

TRAP

104455
000034
015442
006612

004537

tEXIT FROM

ERROR

104460

004537
120002
002312
103002

TST

000000

000406

ESCAPE

CSESCAPE

L10041

s THIS IS WHAT WE EXPECT TO READ NOW
sREAD BACK DDRA IT SHOWD BE = 366

:IF AN ERROR OCCURED,

;REPORT

EXIT
s
;IS IT REALLY A 3772
s YES,

PROCEED WITH

TRAP

CSERROR

TESTING

s IDENTIFY THE DORA REG.
REPORT ERROR
:NO,
“DEVICE FATAL" ERROR 2 29
:

TRAP

. WORD
.WORD

CSEROF

29
EM22

CNDMAAO DMV1l1 MCTRL DIAG @1
TEST

4634

4635
4636
4637
4638
4639
4640
4641
4642
4643
a644
4645
4646

4647
4648
4649
4650
4651
4652
4653
4654
4655
4656

4658
4659
4660
4661
4662
4663
4664
4665
4666
4667
4668
4669

22-FEB 84

G10
15:22

PAGE

SEQ 0123

VIA REGISTER ADRESSING

025576
025600
025600
025602
025604
025610
025612
025614
025616
025616
025620
025622
025626
025630
025632
025634
025634
025636

025640
025644
025646
025650
025654
025656
025662
025670

025670

4657

MACRO M1200

025672
025674
025676

025700
025700
025702

025704
025710
025712
025714
025716
025716
025720
025722
025730
025732
025740
025746

025746
025750
025752
025754
4670 025756
025756
025760

006612

ESCAPE

104410
000160

004537
120002
177777
103002

104460
000460
004537
120003
000000
103002

004322

16$:

17¢:

38¢:

105037

012737

RS,WRITEI

8CC

38¢

8rR

004064

39¢;

002312
002310
000003

8cC

394

: IF

AN ERROR OCCURED,
IT

€

EXIT
s
;AND NOW CLEAR DDRA

s IF

TRAP

CSERROR

TRAP

CS$SERROR

ZEROS

AN ERROR OCCURED,
IT

RS5,READ

:NOW,

DID DDRA GO TQ ZEROES

TS18

BDATA

18$
GDATA

;s YES,

BUT

93 ,REGNUM

;NO,

SETUP FOR

; IDENTIFY THE DDRA REG.
H
REPORT THE ERROR
H
"DEVICE FATAL' ERROR & 30

EM21,ERR?

EXIT

WHAT

ABOUT

DDRB?

AND

TRAP

. WORD

ESCAPE

004064

18¢:

TST

JSR
DORB

R5,READ

8CC

sEXIT

;WHAT

FROM

THIS

ABOUT

TEST

DDRB

LOOP

CSEROF

EM21

. WORD

ERR7

.WORD

L10041

REQUESTED
TRAP
CS$ESCAPE

SHOUWD BE

377 NOW

BDATA

ERROR

002312

025612
000002

025612

002310
002334

40s3:

BR
cMPB
8EQ

MOvVB

MOV

:IF_ AN ERROR OCCURED,

;{REPORT

244
BDATA,17$
24

17$,GDATA

@2 ,REGNUM

EM22A,ERR7?

104455
000037
015532
006612
000002

. WORD
ERR7
IF REQUESTED
TRAP
CSESCAPE
.WORD
L10041
-,

JSR

DDRA
BDATA

GEDF

104410

LOOP

MOV

104410
000060

012737

TEST

;RE LOAD DDRB WITH 377

tREPORT

104455
000036
015442
006612

104460
000420
123737
001414
113737

THIS

244

GEOF

004537
120002
002312
103002

FROM

B8R

8EQ
CLRB

002334

R5,WRITEIL

ERROR

;EXIT

sREPORT

JSR
DDRA

104460
000451
004537
120003
002312
105737
001413

JSR
OORB

ERROR

004322

TST

TRAP

EXIT

$IS IT?

sYES,

EXIT

TEST

SETUP FOR AND
;iNO,
s IDENTIFY THE DDRB REG.

REPORT

“DEVICE FATAL®'

ERROR

ERROR o 31

CSERDF
31
.WORD
.WORD
EM22A
.WORD
ERRTM
IF REQUESTED
TRAP
CSESCAPE
L 10041
. WORD
TRAP

ESCAPE

TST

CS$ERROR

(EXIT

FROM

THIS

TEST

LOOP

CNDMAAO DMV11 MCTRL DIAG 21
TEST

VIA REGISTER

4671
4672 025762

025762
025762

MACRO M1200

15:22

H10

PAGE 61-4

SEQ 0124

ADRESSING

24%:

104401

22 FEB-84

ENDTST

L10041:
TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG o1
TEST

MACRO M1200

22 FEB 84

15:22

PAGE

SEQ 0125

VIA'S DDRB DATA READ/WRITE

.SBTTL

4684

TEST

VIA'S DDRB DATA READ/WRITE

1008800008480 0044800822088004244048080008000480880080000400004044000400400040800202
18

TEST

VIA'S DDRB DATA READ/WRITE

DDRB ==

HEJ

"DATA DIRECTION REGISTER B"

;0 FIRST, A MASTER CLEAR IS PERFORMED. THEN :
;e READ/WRITE BITS 0-7 OF VIA DATA DIRECTION REGISTER B ARE
;¢ READING, AND COMPARING EACH BYTE OF DATA PATTERN 8.
: .

OATA PATTERN B

L
H
H

4685
4686
4687

4688

4689
4690 026000
4691 026004
4632
4693 026006
4694 026006

4695
4696
4697
4698
4699
4700
4701

026006
026006

026010
026014
226020
026024
026030
026032
026032
4702 026034
026034
026036
4703
4704

026040
026040
026040

4705
4706 026042
4707
4708
4709 026044

026044
026044

103003

003762

104460
104410
000046
012701
012103

252,

000,

376,

375,

377,

373,

001,

367,

002,

004,

010,

020,

040,

357,

337,

277,

177,

000

BGNTST

T12::

JSR
8CC
ERROR

PC,MSTCLR
30

ESCAPE

TST

;INIT DMV & START UP THE MAINT. LOOP
:IF AN ERROR OCCURED,

;REPORT

EXIT

30%:
T12.LP:

MOV
MOV

;POINT

@PATB ,R1

(R1)+,R3

;THE

BGNSUB

MOVB
MOvVB
MOV

002306
002310
120002
005034

104460
104410
000006

10¢:

CSESCAPE

SUBTEST ONLY

TESTS THE ONE PATTERN
T12.1:
TRAP
csBSUB

10¢

1WAS AN ERROR FOUND?
s YES, REPORT IT AND.

PC.STREG

ESCAPE

;PERFORM STATIC TEST OF THE SPECIFIED REGISTER

EXIT FROM THE

ENDSUB

TEST.

L10043:

R3,T12.LP

;IF

TRAP

“CKLOOP"

r
so8

L10042-.

TO PATTERN TABLE

sSETUP TEST DATA BYTE FOR "STREG”
;SETUP EXPECTED DATA BYTE FOR “STREG"”
1SPECIFY THE REGISTER BEING TESTED

JSR
8CC
ERROR

ENDTST

104401

TRAP

(R1),TDATA
(R1)+,GDATA
#0DRB,RO

104403
077317

CSERROR

sGET & OF ENTRIES IN TABLE

104402

111137
112137
012700
004737
103003

TRAP

.WORD
002526

100,

0883880084000 0080420000000088448040808000888084008042008880444448084488080442

004737

125,

200,

WRITING,

[]

025764
025764
025770
025772
025772
025774
025774
025776

TESTED Bt

CS$EFROR

IS IMPLIED

TRAP
.WORD

CSESCAPE
L10042 .

TRAP

CSESUB

THERE IS IN FACT MORE DATA, LOOP BACK TO

s TEST

IT.,

ELSE,

FALL OUT OF LOOP AND
L1004.2:

TRAP

TEST

CSETST

CNDMAA0 DMv11l MCTRL DIAG o1
TEST

MACRO M1200

22-FEB

15:22

PAGE

J10
63

SEQ 0126

VIA*S DDRA DATA READ/WRITE

.SBTTL

4722

TEST

VIA'S DDRA DATA READ/WRITE

100N ANAAALA0000000000400000000000000
800000000000 0000000040008000080800044044
i1] 8
L

TEST

VIA'S DORA DATA READ/WRITE

DDRA

“DATA DIRECTION REGISTER A"

HE
Y
L)

;¢
;¢

FIRST, A MASTER CLEAR IS PERFORMED. THEN :
READ/WRITE BITS O0-7 OF VIA DATA DIRECTION REGISTER

:+ READING,
:#

DATA

ARE

AND COMPARING EACH BYTE OF DATA PATTERN B.

PATTERN

TESTED

WRITING,

125,

252,

000,

377,

001,

002,

004,

010,

020,

040,

200,

376,

375,

373,

367,

357,

337,

277,

177,

000

100,

1 -~880584038004282804884888088800000888450448280088038004800800880008044008448842

4723
4724
4725
4726

4727
4728
4729
4730
4731
4732

4733
4734
4735
4736
4737
4738
4739

104410
000046

026062
026066

012701
012103

004737
103003

003762

104460

002526

026122
026122
026122

a743
4744 026124
47as
4746
a747 026126
026126
026126

30%:

T13.LP:

026070

026070
026070

T13::

JSR
8CcC
ERROR

PC,MSTCLR
304

ESCAPE

TST

;INIT DMV &€ START UP THE MAINT, LOOP
: IF AN ERROR OCCURED,

;REPORT

TRAP

EXIT

TRAP

026070

026072
026076
026102
026106
026112
026114
026114
4740 026116
026116
026120

4741
a742

BGNTST

026046
026046
026052
026054
026054
026056
026056
026060

MOV
MOV

#PATB,R1

(R1)+,R3

SUBTEST

ONLY

TESTS

THE ONE
T13.1:

104402

111137
112137
012700
004737
103003

MOVB
MOVB
MOV

002306
002310
120003
005034

104460
104410
000006

10¢:

(R1),TDATA

(R1)+,GDATA
#DDRA,RO

JSR
BCC
ERROR

PC,STREG

10$

:+PERFORM STATIC TEST
:+WAS AN ERROR FOUND?
;YES, REPORT IT AND

ESCAPE

TST

EXIT FROM

ENDSUB

sos

ENDTST
104401

THE

PATTERN
TRAP

csBsu8

TEST.

SPECIFIED REGISTER

TRAP
~“CKLOOP" IS
TRAP
.WORD

L1004S:
R3,T13.LP

;SETUP TEST DATA BYTE FOR "STREG"
sSETUP EXPECTED DATA BYTE FOR "STREG"
sSPECIFY THE REGISTER BEING TESTED

104403
077317

CSESCAPE

L10044a

;POINT TO PATTERN TABLE
sGET & OF ENTRIES IN TABLE
; THE

BGNSUB

.WORD

CS$ERROR

sIF THERE
;TEST IT,

TRAP

C$ERROR
IMPLIED
CS$ESCAPE
L10044 .

CSESLB

IS IN FACT MORE DATA, LOOP BACK T0O
ELSE, FALL OUT OF LOOP AND TEST

L10044;

TRAP

CSETST

IK10
CNDMAAO DMV11 MCTRL
TEST

DIAG #1

MACRO M1200

22-FEB 84

15:22

PAGE 64

SEQ 0127

VIA'S ORB DATA READ/WRITE

.SBTTL TEST 14

4761

-- VIA'S ORB DATA READ/WRITE

104080080042 040 4400404000080

0000040040004 4005408008040040004004444

TEST 14 -- VIA'S ORB DATA READ/WRITE

ORB == "QUTPUT REGISTER PORT 8"

]

;» 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.
-

s«

THEN ,

READ/WRITE BITS 0-7 OF VIA OUTPUY REG. PORT 8 ARE TESTED BY WRITING,
READING, AND COMPARING EACH BYTE OF DATA PATTERN B.
DATA PATTERN B

125,

252,

00O,

377,

001,

002,

004,

010,

020,

200,

376,

375,

373,

367,

357,

337,

277,

177, 000

040,

100,

-8 4800040000080 0484008040048040808480888080040488408080048048850808885088440402

026130
4762 0261390
4763 026134
4764 026136
026136

4765 026140
026140
026142
4766
4707 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 026<14
4785 026216
0c6216
4786

026220
026220
026222

4787
4788 026224

:
004737
103003

003762

104460
104410
000066

004537
120002
1777717
103003

004322

30¢:

BGNTS1
PC,MSTCLR
30¢

s IF AN ERROR OCCURED,

ESCAPE

TST

;REPORT

TRAP

EXIT

TRAP

RS,WRITEI

s INITIALIZE PORT B FOR I/0

8CC

:IF AN ERROR OCCURED,

ESCAPE

TST

MOV

4PATB,R1

;POINT TO PATTERN TABLE
;GET & OF ENTRIES IN TABLE

JSR
ODRB
-1
ERROR

104460

Ti4::

s INIT DMV & START UP THE MAINT. LOOP

JSR
8CcC
ERROR

;REPORT

EXIT

104410
000046

012701
012103

002526

314:
T14.LP:

MOV

(R1)+,R3

s THE SUBTEST ONLY

B8GNSUB

TESTS

012700
004737
103003

MOVB
MOVB

002306
002310
120000
005034

104460

104410
000006

(R1),TDATA
(R1)+,GDATA

MOV
JSR
8CC
ERROR

40RB ,RO
PC.STREG

ESCAPE

TST

10$

L10046-.

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10046-.

TRAP

ENDSLB

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

AND

EXIT FROM THE

TEST.

TRAP
C$ERROR
“CKLOOP" IS IMPLIED
TRAP

.WORD

10¢:

CS$ESCAPE

.WORD

THE ONE PATTERN

T14.1:

104402

111137
112137

CS$ERROR

CSESCAPE

L10046-.

CNDMAAO OMV11l MCTRL DIAG @1
TEST

MACRO M1200

22-FEB 84

15:22

L10

PAGE 64

SEQ 0128

VIA'S ORB DATA READ/WRITE
026224
026224

4789
4790 026226
4791
4792
4793 026230

026230
026230

L10047:

104403
077317

So8

ENDTST
104401

R3,T14.LP

: IF THERE
s TEST IT.

TRAP

CS$ESUB

IS IN FACT MORE DATA, LOOP BACK TO
ELSE, FALL OUT OF LOOP AND TEST
L10046:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG ¢1

22-FEB-84 15:22

PAGE 65

SEQ 0129

T1 DATA READ/WRITE

.SBTTL TEST 15 -- VIA'S Ti1 DATA READ/WRITE
T

TEST
Tl

Yy Y

VY YYYYY YTV

-- VIA'S T1 DATA READ/WRITE

"TIMER 01"

;¢ THIS TEST WRITES, READS, AND CHECKS THE T1 LATCHES AND COUNTER REGISTERS
;4 WITH DATA PATTERNS IN EACH OF 3 SUBTESTS.
R

;# FIRST SUBTEST:

Moo

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

TIL-LCADR 06) ) IS LOADED WITH THE COMPLEMENT OF THE CURRENT DATA BYTE.
TIL-LCADR 06) ) IS READ AND COMPARED TO THE BYTE JUST WRITTEN.
TIL-LCADR 06) IS RE-LOADED WITH O TO MAKE T1C-H DECREMENT FAST.
T1L-H(ADR 05) IS LOADED WITH THE ORIGINAL TEST DATA PATTERN BYTE.
TIL-H{ADR 07) IS READ AND COMPARED TO THE BYTE LOADED INTO TiL-H.

ALL LATCHES ARE LOADED TO ZEROES (JUST IN CASE), ACR6 & ACR7 ARE SET
TO ZERO (MODE 00), AND "“T1” INTERRUPT ENABLE FLAG IS CLEARED.

®>

A MASTER CLEAR IS PERFORMED.

OMmM

SOMETHING TO THE COUNTERS.
AS LONG AS THEY HAVE CHANGED FROM THE
VALUE LOADED TNTO THEM, WE WILL BE SATISFIED.

TIC-L(ADR 04) IS READ AND CHECKED TO BE DIFFERENT THAN THE TEST BYTE.

T1C-H(ADR 0S) IS READ AND CHECKED TO BE DIFFERENT THAN THE TEST BYTE.

B
A
A

AR A

STEPS C-L ARE REPEATED USING EACH BYTE OF DATA PATTERN B.

AR R
A
A
A

.
.
.
.

TIL-H(ADR
TIL-LCADR
TIL-LCADR
TIL-H(ADR
STEPS B-D

07)
06)
06)
07)
ARE

CHECKS FOR CROSS-TALK AND ADDRESSING ERRORS
FROM

TiL-L

T1L-M

IS LOADED WITH 000 TO CLEAR IT.
IS LOADED WITH A BYTE OF DATA PATTERN 8.
IS READ AND COMPARED TO THE DATA JUST WRITTEN,
IS READ AND COMPARED TO 000.
REPEATED USING EACH BYTE OF DATA PATTERN B.

THIRD SUBTEST:

SRR

SECOND SUBTEST:
mooowo>

AR B

AR N

T1L-H(ADR 07) IS LOADED WITH THE COMPLEMENT OF THE CURRENT DATA BYTE.
T1L-H(ADR 07) IS READ AND COMPARED TO THE BYTE JUST LOADED.

CHECKS FOR PROPER LOADING OF LATCHES

IT ALSO CHECKS TO BE SURE THAT THE COUNTER APPEARS TO BE DOING

CHECKS FOR CROSS-TALK AND ADDRESSING ERRORS
FROM

T1L-H

TiL-L

oOm>

VIA'S

4854

TEST

MACRO M1200

Ti1L-LCADR
T1L-H(ADR
T1L-HCADR
TIL-L(ADR

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

CNDMAAO DMV11 MCTRL DIAG 21
TEST

VIA'S

MACRO M1200

22-FEB-84

15:22

PAGE 65-1
SEG 0130

DATA READ/MWRIIE

i« E.
HE

i»

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

PATTERN B8

125,

252,

000,

377,

001,

002,

200,

004,

376,

010,

375,

020,

373,

040,

367,

357,

337,

277,

177,

000

]

100,

---“0‘.““““‘“.‘t““‘““‘“‘t“‘“‘0

“.““#““““‘“t‘“““ttt‘t“‘

4855

BGNTST

026232

T1S::

4856

4857

4858 026232
4859 026236
4860 026240
026240
4861 026242
026242
026244
4862 026246

004737
103003

003762

104460
104410
001030

4864

004537

4867 026252
4868 026254
4869 026256

000000
000000
103003

026260

104460

4870 026260
4871

026262

026262
2872 026264

026266

4880 026270

s INIT DMV € START UP M-LOOP
: IF NO ERRORS, PROCEED
;ELSE, RERPORT ERROR &

ESCAPE

TST

GET

OUT

THE

TEST

\
STEP

JSR

ERROR
ESCAPE

TRAP

CSERROR

TRAP
.WORD.,

CS$ESCAPE
L10050-.

s44---s02

RS,INITT)

sINITIALIZE

THE

TIMER'S

REGISTERS

: WITH ZEROES
: 00 --> ACR6 & ACR7 AND DISABLE
: IF NO ERROR, PROCEED

0
.+10

;ELSE,
TST

REPORT

AND

INTERRUPTS

EXIT

THIS

TEST

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10050-.

:WE WANT THE LEAST ACTIVE OPERATING MODE FOR THIS TIMER
WHILE WE
:IT.
THE MODE WE'RE USING HERE IS DOCUMENTED THUSLY:
“GENERATE
;:TIME-OUT INTERRUPT EACH TIME T1 IS | OADED.
PB7 DISABLED.
"
:AS AN ADDED PRECAUTION, WE ARE DISABLING INTERRUPTS BY
CLEARING
;WITHIN “IER",

BGNSUB

104402

012701

012103

4883 026276
4884 026276

112137

4887 026310
026310
4888
4889
4890
4891 026312
4892 0263i6
4893 006320

#28---44s

PC,MSTCLR
1

o]
. WORD
8CC

104410
001010

:ggé 026274

:ggg 026302

JSR
8CC
ERRCR

*8%---428

004660

4873
4874
4875
4876
4877
4878
4879 0262€6

026266

STEP

1¢:

4863

4865
4866 026246

2%8---4e

013737

002526

MOV

MOV
T16.LP:

002306

002310

MOVB

MOV

THE

;POINT

FIRST

THE

{EXTRACT

THE BYTE

(R1)+,TOATA

;GET

BYTE

TDATA,GDATA

;THE

ONE

TEST DATA

THE

“T1”

FLAG

SUBTEST

#115.1:

APPROPRIATE

(R1)+,R3

TESTING

SINGLE

COUNT FROM THE
THE

TEST

IS NORMALLY

TRAP

PATTERN

TABLE

csBsuB

TABLE

DATA

THE GOOD DATA

100

TRAP

C$BSEG

BGNSEG

104404
:

004537
120004
002206

OPATB,.R!

sBEGIN

ARE
A

004310

s44--

sse

STEP C

JSR
TiCL
TDATA

684-

RS,WRITE

-042s2

sLOAD
: THE

T1L -L(ADDR 04)
TEST

DATA FROM

“TDATA"

CNDMAAO OMv1l MCTRL

DIAG @t

TEST

DATA READ/WRITE

VIA'S

MACRO M1200

4894
4895
4896
4898

026322

4899 026326
4900 026330

4901

0263382
4902 026340
4903 026342
4904 026350

4905

4907
4908
4909
4910
4911
4912
4913
4914

4915

4916
4917

026350
026352
026354
026356

004537
120006
002312
123787
001407
012787

004537
120004
002312
123737
001017
004537
120004
002312
123737
001007

026426
026430
026432
0264 34

104455
000041
015275
006612

4932
4933
4934
4935
4936
4947
4938

BDATA

002312

crP8
BEQ
MOV

002334

GFOFf

026464
026466
026474
026476
026504

026504

eee

YY)

RS
. READ

tREAD T1L L(ADDR 06)

GDATA ,BDATA
ct
6 ,REGNUM

1 IF O, PROCEED
tIOENTIFY THE FAILING REGISTER &

EM20,ERR/

1AND CHECK

1
'

REPORT FAILURE
“"OEVICE FATAL” ERROR ¢ 32
TRAP

. WORD
.WORD
.WORD

004064

002310

105137
105137
004537
120006
002306

004537
120006
002312
123737
0014C7
012737

104455

sees

28:

004064

002310

-008

STEP

JSR

T1CL

BDATA
cMPB
BNE
JSR
T1CL
BDATA
cMPB

002312

002312
002334

eee

1READ

GDATA ,BDATA
a8
RS ,READ

iAND CHECK IT, SEEING AS THE TIMER IS RUNNING,
1 THIS MUST NOT EQUAL THE SET VALUE'
1 IF

T1C-L(ADDR

1TIME?
GDATA,BDATA

MOV
GEDF

04 ,REGNUM
EM20A ,ERR7

IS,

04)

MAYBE WE

JUST READ

RE READ AND CHECK ONE MORE

THE

TIME.

tOTHERWISE,
1+
+

WE MAVE

A LEGITIMATE FAILURE

IDENTIFY THME FAILING REGISTER &
REPORT FAILURE

"ODEVICE FATAL' ERROR o 33

.WORD
.WORD

002306
002310
004310

corMs
coMB
TiLL
TDATA

004064
002310

000006

002312
002334

ees

JSR
TiLL

see

STEP

BDATA
CcMPB
8EQ
MOV
GEDF

1 THE
oo

TEST

DATA

FROM

' TDATA"

'Y}

RS,READ

tREAD TIL L(ADDR 06)

GDATA,BDATA

$AND CHECK 7
1IF 0K, PROCEED
tIDENTIFY THE FAILING REGISTER £

as
06 ,REGNUM

EM20,ERR7

EM20A
ERR”

tUSE THE ONE'S COMPLEMENT THIS TIME
s THE EXPECTED DATA IS ALSO THE COMPLEMENT
tLOAD T1iL L(ADDR 06)

RS, WRITE

CSERDF
33

TDATA
GDATA

JSR

WRONG

sCHECK IT AGAIN, SAM,
t THIS TIME IT SHOUWD BE DIFFERENT.

TRAP
. WORD

STEP

32
EM20
ERR7

RS,READ

B8NE

006---006

CSEROF

YY)

026456
026462

STEP

JSR

;

4929
4930
4931

65 2

104455

012737

026436
026442
026446
026452
4928 026454

see

TiLL

002310

B11
PAGE

000040
015243
006612

4918
4919 026420
4920 026426

4921
4922
4923
4924
4925
4926
4927

060-

004064

;

026360
026 364
026366
026370
026376
026400
026404
026406
026410
026416

15:22

5EQ 0131

489"

22-FFB 84

3+
:

REPORT FAILURE
"DEVICE FATAL®

ERROR @

34
TRAP

CSERDF

CNDMA
A0 OMV1L MCTRL
TEST

4939

VIA ‘S
026506
026510
026512

DIAG 21

MACRO M1200

4943
4944
4945
4946
4947
4948
4349
4950
4951
495.
4953
4954
4955
4956

4957
4958
4959

4960
4961
4962
4963
4964
4965
4966
4967
4968

4969
4970

4971

4972
4973
4974
4975
4976
4977
4978
4979
4980
4981
4982

026572
026574
026576
026600

. WORD
. WORD
.WORD

105137
105137
004537
120006

000001
004537
120005
002306

002306
002310
004322

004537
120007
002312
123737
001407
012737

%0e--.6¢0

8%:

STEP

1
JSR

RS,WRITE

1LOAD

004064

002310

0v231e

000007

002334

sse

oee

004537
120005
002312
012737
105737
001410
123737
001004

026636
026640
026642
026644

104455
000044
015275
006612

THE

ORIGINAL

VALUE

T1L-H(ADDR 05)

TEST DATA FROM “TDATA

JSR
T1LH
BDATA
cMPB8
8EQ

R5,READ

tREAD T1L -H(ADDR 07)

GDATA,BDATA
108

GEOF

EM20,ERR7

tAND CHECK I7
+ [F 0K, PROCEED
sIDENTIFY THE FAILING REGISTER &

MOV

07 ,REGNUM

REPORT

FAILURE

"DEVICE FATAL"” ERROR o 35
TRAP

.WORD
. WORD
. WORD

004064
000005
002306
002310

688

10¢:

-6s8

STEP

JSR

T1CH

8DATA
MOV

002334

TST8

B8EQ
o o]
BNE
GEDF

002312

R5,READ

$READ

05 ,REGNUM
TOATA
144

tWAS

T1C

s IDENTIFY

GDATA,BDATA
144
EM20A ,ERR?

H(ADDR

002306
002310
004310

14%:

ess

STEP

comB

6se

sse

eee

see

TDATA
GDATA

coM8
JSR

TiLH
TOATA

002306

STEP

THE REGISTER BEING CHECKED

THE TEST
s YES, THEN WE

sNO,

CHECK

ITY

DATA
CAN T

009 ?
BE SURE

THE

RESWLTS!

s 17T SHOULON'T = THE LOADED VALUE
:IT OID!
REPORT FAILURE

"DEVICE FATAL" ERROR ¢ 36

1tAND CONTINUE
tUSE

s THE

RS,WRITE

eee

THE ONE'S COMPLEMENT

EXPECTED DATA

[ XX]

TEST

DATA

.WORD
. WORD
. WORD

TESTING

IS ALSO

;LOAD TI1L -H(ADDR 07)
s THE

EM20
ERR7

05)

TRAP

ese

CSERDF

ees-. -086

105137
105137
004537
120007

DATA

XX]

104455
000043
015243
006612

026602
026606
026610
026612
026620
026624
026626
026634
026636

THE

1SET THE LOW LATCH TO MAKE SURE THE HIGH
tCOUNTER IS DOING MOST OF THE WORK

s THE

STEP

34
EM2O
ERR?

--000

JSR

T1CH
TDATA

Ses
-

se¢

tRESTORE

TiLL

004310

TDATA
GDATA
RS, WRITEIL

comMs

coMe

026646
026652
026656
026662
026664

PAGE

000042
015243
006612

026544
026550
026552
026554
026562
026564
026572

15:22

SEQ 0132

026514
026520
026524
026530
026532
026534
026540
026542

Cl1

T1 DATA READ/WRITE

4940
491

4942

22 FEB

FROM

‘ TDATA

THIS
THE

TIME

CSERDF

36
EMCOA

ERR”

COMPLEMENT

CNDMAAD DMV11 MCTRL

DIAG ot

TEST

DATA READ/WRITE

VIA‘S

4983 026666
4984

4985
4986
4987
4988
4989

026672
026674
026676
026704
026706
026714

026714
026716
026720
026722

4990
4991
4992
4993 026724

4994
4995
4996
4997
4998
4999

004537
120007
002312

123737

001407
012737

000007

002212

cMPB

BEQ
MOV
GEOF

002334

R5,READ

tREAD

GDATA,BDATA

1AND CHECK IT
s IF 0K, PROCEED

164
07 ,REGNUM
EM20,.ERR?

T1iL

H(ADDR 07)

tIDENTIFY

REPORT

THE FAILING REGISTER &

FAILURE

"DEVICE FATAL” ERROR & 37

06¢

o060

STEP

¢ee

026276

B8R

208
21s:

T16.LP
R2,20%

;s IF

;ELSE,

BGNSUB

002306
002306

T16.L1:;

002310

004537
120007

DATA,

MOV
MOV

OPATB ,R1
(R1).,R3

MOvB
MOV

(R1)+.,TDATA
TDATA,GDATA

6s8a---408

004322

sBEGIN THE

STEP

JSR

ese

sPOINT

CsESUB

SECOND SUBTEST
715.2:
THE

TRAP
APPRCPRIATE PATTERN TABLE

THE BYTE

tGET ONE BYTE OF

s THE

COUNT FROM THE

THE

csBsuB

TABLE

TEST DATA

TEST DATA IS NORMALLY

THE GOOD DATA TOO

:CLEAR T1L -H(ADDR 07)
sTHE

TEST

DATA FROM

"TDATA®

BGNSEG

104404

TRAP
LX X ]

004310

668

STEP

JSR

TiLL
TDATA

004537

TRAP

DO ANOTHER BYTE

RS,WRITEI]

TILH

{EXTRACT

004537
120006
0027

CS$ESEG

EXIT SUBTEST

L100S1:

112137
013737

TRAP

ERR?

214

JMP
SOB

104403

026750
026750
026754

EM20

ENDSEG

ENDSUB

002526

CSERDF

.WORD
.WORD
. WORD
--00e

100004
:

104402
012701
012103

027004

TRAP

026742
026746

026774
027000
027002

PAGE

16%:

000402
000137
077303

026772
026772

15:22

JSR
TILH
BDATA

026726
026730
026734

026762
026766
026770

B84

3EQ 0133

004064

002310

FEB

006612

104405

026740
026740
026740

DLl

104455
000045
015243

026724
026724

026736
026736
026736

MACRO M1200

004064

-6se

JSR

STEP

¢ee

LY
X )

RS, WRITE

RS ,READ

tLOAD

T1iL

LCADCR 06)

s THE

TEST

DATA FROM

(¥
¥ )

tREAD

TIL -L(ADDR

06)

‘TDATA"

C$BSEG

CNDMAAO DMV1l MCTRL DIAG @1
TEST

5028
5029
5030
S031
S032
S033

S034

VIA'S

MACRO M1200

027010
027012
027014
027022
027024
027032

120006
002312
123737
001407
012737

027032
027034
027036
027040

104455
000046
015243
006612

002310

002312

000006

002334

TiLL
BOATA
cMPB
BEQ
MOV
GEDF

027042
027046
027050
027052
027056
027060
027064
027072

004537
120007
002312
105737
001411
005037
012737

027072
027074
027076
027100

104455
000047
9015355
006612

027116
027116

5058 027120
ggzg 027124

5061 027126
5062 027126
gggz 027132

5065
5066
5067
S068 027140

PAGE 65-5

SEQ 0134

GDATA,8DATA
2t
06 ,REGNUM
EM20,ERR7

sAND CHECK IT
1 IF 0K, PROCEED
tIDENTIFY THE FAILING REGISTER £
; REPORT FAILURE

;

5045
5046
5047
5048 027102
027102
027102
5049
S050 027108
5051 027106
5052 027112
5053
5054 027114
027114
027114
5055
5056
5057 027116

15:22

DATA READ/WRITE

5035

5036
5037
5038
5039
5040
5041
5042
S043
S044

22 FEB 84

E11

004064

%80---6068

2s:

JSR
TiLH
BDATA
1ST8
BEQ
CLR
MOV
GEOF

002312
002310
000007

STEP

002334

“DEVICE FATAL"” ERROR o 38

TRAP
. WORD
.WORD
.WORD

4ee---02020

RS ,READ

sREAD

T1L-H(ADDR 07)

BDATA
104
GDATA
27 ,REGNUM
EM20B ,ERR7

sAND CHECK IT -s IF OK, PROCEED

s6s---608

10¢:

STEP E

4se--

THIS

SHOWD

026750

B8R
JMP
So8

ZERO

TRAP
.WORD
.WORD
.WORD

CSERDF
39
EM208
ERR7

TRAP

CSESEG

TRAP

CsESUB

ENDSEG

20%:
21%:

"DEVICE FATAL' ERROR & 39

10000
:

104405

000402
000137
077303

STILL

s IDENTIFY THE FAILING REGISTER &
;: REPORT FAILURE

;

CS$ERDF
38
EM20
ERR7

2ls
T16.L1
R3,20¢

s IF MORE DATA, DO ANOTHER BYTE
;ELSE, EXIT SUBTEST

ENDSUB
L100S2:

104403

BGNSUB
104402
012701

002526

112137

002306

012103

013737

002306

T16.L.2:

002310

004537

004322

o066

THE

THIRD SUBTEST

715.3:

MOV
MOV

OPATB ,R1
(R1).,R3

TRAP
tPOINT TO THE APPROPRIATE PATTERN TABLE
tEXTRACT THE BYTE COUNT FROM THE TABLE

MOVB

(R1).,TDATA

sGEY

MOV
;

tBEGIN

TDATA,GDATA

--s8s STEP A e4sJSR

s THE

ONE

TEST

BYTE

DATA

THE

-eee

RS5,WRITEI

1CLEAR

T1iL

TEST DATA

IS NORMALLY

LCADDR 04)

THE GOOD DATA

csBgsuB

T0OC

CNDMAAO DMV11 MCTRL DIAG 21
TEST

VIA'S

5069 027144
5070 027146
S071
5072 027150
027150
5073
5074
5075
5076 027152
5077 027156
5078 027160
5079
5080
5081
5082 027162
5083 027166
5084 027170
508S 027172
5086 027200
5087 027202
5088 027210

5089
5090
5091
5092
5093
S094
5095
5096
5097
5098
5099

027210
027212
027214
027216

5110

15:22

PAGE 65-6

SEQ 0135

120004
000000

T1CL
0

BGNSEG

104404

TRAP
i

004537
120007
002306

004537
120007
002312
123737
001407
012737

¢08---220

004310

STEP

JSR
TILH
TDATA
;

088---484

004064
002310

002312

000007

002334

4¢s

RS, WRITE

;LOAD T1L-HC(ADDR 07)

: THE TEST DATA FROM “TDATA"

STEP

JSR
TiLH
BDATA
CMPB
BEQ
MOV
GEDF

ees-

-sea

RS,READ

;READ

GDATA,BDATA
104
&7 ,REGNUM
EM20,ERR?

sAND CHECK IT
s IF OK, PROCEED
s IDENTIFY THE FAILING REGISTER &

004537
120006
002312
105737
001411
005037
012737

027250
027252
027254
027256

104455
000051
015355
006612

027262
027264
027270

000402
000137
077303

0040648

10¢:

002312
002310
000006

002334

STEP

JSR
TiLL
BDATA
TST8
BEQ
CLR
MOV
GEOF

ses-

¢ 40

RS,READ

:READ

BDATA
2s
GDATA
06 , REGNUM
EM20B,ERR?

sAND CHECK 1T
: IF OK, PROCEED

T1L

STEP E

esss

s IDENTIFY

REPORT

THE FAILING REGISTER &

FAILURE

“DEVICE FATAL" ERROR ¢ 41

20$:
21s:

CSERDF

.WORD
. WORD
.WORD

TRAP

CSESEG

TRAP

CSESL8

EM208
ERR?7

ENDSEG
10000
:

027126

EM20
ERR7?7

L(ADDR 06)

TRAP

884---44¢

CSERDF

-ses

BR
JMP
so8
ENDSUB

104403

FAILURE

“"DEVICE FATAL" ERROR

.WORD
. WORD
.WORD

2%:
104405

REPORT

07)

TRAP

027260
027260

T1L-H(ADDR

604---008

C$B8SEG

--40a

104455
000050
015243
006612

027220
027224
027226
027230
027234
027236
027242
027250

027272
027272
027272

22 FEB 84

DATA READ/WRITE

5100
5101
5102
5103 027260
5104
5105
5106
5107
5108
5109

MACRO M1200

F11

21
T16.L2
R3,208

: IF MORE DATA,

DO ANOTHER BYTE

tELSE, EXIT SUBTEST

L10053:

CNDMAAO DMV11 MCTRL DIAG @1
TEST

VIA*S

5111 027274
027274

027274

MACRO M1200

22 FEB 84 15:22

PAGE 65-7

SEQ 0136

DATA READ/WRITE

ENDTST

104401

L10050:

TRAP

CSETST

CNDMAAO DMV11 MCTRL
TEST

VIA'S

DIAG o1

H11
MACRO M1200

FEB-84

15:22

PAGE

SEQ 0137

SR DATA READ/WRITE

5124

.SBTTL

TEST

VIA'S SR DATA READ/WRITE

1000880080480 402302300400023008800044088308800008404848002048080048084040444840000048400
L

TEST

VIA'S

SR DATA READ/WRITE

“SHIFT

FIRST,

A MASTER

CLEAR

i* READ/WRITE BITS 0-7 OF
;¢
t1»

AND COMPARING EACH BYTE
DATA PATTERN B = 125,

200,

HL]

PERFORMED

VIA
OF

SHIFT

DATA

252,

376,

AND

THE

PATTERN B.

000,

375,

377,
373,

ACR

ARE

001,
367,

SET

TO 000.

TESTED BY

002,
357,

004,
337,

THEN

WRITING,

010,
277,

020,
177,

READING,

040,
000

100,

s e

1--80888888880048404848004880004024800044384204082480488848488848300448800084004448

5125
5126
5127
5128

027276
027276
027302
027304
027304
027306
027306
027310

5129
5130 027312
5131 027316
5132
5133 027320
5134 027320
027320
027320
5135
5136 027322
5137 027326
5138 027332
5139 027336
5140 027342
5141 027344
027344
5142 027346
0c 7346
027350
5143
5144 027352
027352
027352
5145
5146 027354
5147
5148
5149 027356
027356
027356

BGNTST
004737
103003

003762

104460

104410
000046
012701
012103

JSR
8cC
ERROR

PC,MSTCLR

30¢

T16::
s INIT DMV € START UP THE MAINT.
:IF AN ERROR OCCURED,

ESCAPE

TST

;sREPORT

EXIT

002526

30%:

MOV
MOV

#PATB,R1

(R1)+,R3

BGNSUB

;POINT

MOvH
MOVB
MOV

002306
002310
120012
005034

JSR
BCC
ERROR

104460

ESCAPE

104410
000006

10¢:

TO PATTERN

TRAP

CS$ESCAPE

TABLE

T16.1:

(R1),TDATA
(R1)+,GDATA

#SR,RO
PC,STREG

;SETUP

TEST

ENDTST

DATA BYTE FOR

10¢

;PERFORM STATIC TEST
;WAS AN ERROR FOUND?
;sYES, REPORT IT AND

FST

csasuB

"STREG"

EXIT

FROM THE

THE

TEST.,

SPECIFIED REGISTER

: IF THERE
$1TEST IT.

TRAP

“CKLOOP" IS
TRAP
.WORD

L10055:
R3,T18.LP

TRAP

;SETUP EXPECTED DATA BYTE FOR “STREG'
s SPECIFY THE REGISTER BEING TESTED

ENDSUB

508

L10054
-,

s THE SUBTEST ONLY TESTS THE ONE PATTERN

104403

104401

CSERROR

;GET 0 OF ENTRIES IN TABLE

104402

077317

TRAP

.WORD

T18.LP:

111137
112137
012700
004737
103003

LOOP

TRAP

CS$ERROR

IMPLIED
CSESCAPE
L100S4 .

CsESUB

IS IN FACT MORE DATA, LOOP BACK TO
ELSE, FALL OUT OF LOOP AND TEST
L10054:

TRAP

CseTST

CNDMAAO DMV11 MCTRL
TEST

VIA'S

DIAG o1l

MACRO M1200

22 FEB-84

I11

15:22

PAGE

SEQ 0138

ACR DATA READ/WRITE

S1el

.SBTTL

TEST

VIA'S ACR DATA READ/WRITE

‘00.‘..‘.“‘.““.““fi““““‘.‘.“““

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

HEJ

TEST

HEJ

VIA'S ACR DATA READ/WRITE

1 e

ACR

"AUXILIARY

CONTROL

[}

;o FIRST, A MASTER CLEAR IS PERFORMED. THEN :
1+
i

READ/WRITE BITS O-7 OF THE
AND COMPARING EACH BYTE OF
DATA

PATTERN

125,

200,

L]
1
H

5163
5164
5165
5166

5167
5168
S109
5170
5171
5172

5173
5174
5175
S176
5177
5178
5179

104410
000046

027374
027400

012701
012103

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

376,

373,

367,

357,

READING,
010,

337,

277,

020,

177,

040,

000

100,

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

“‘.““““““‘t.“‘

BGNTST

027360
027360
027364
027366
027366
027370
027370
027372

027402
027402
027402
027402

ACR ARE TESTED BY WRITING,
DATA PATTERN B.
252, 000, 377, 001, 002, 004,

004737
103003

003762

104460

002526

30$:

JSR
8CC
ERROR

PC,MSTCLR

ESCAPE

TST

MOV

304

T17::

s INIT DMV & START UP THE MAINT.
:IF AN ERROR OCCURED,

:REPORT

oPATB,R1

(R1)+,R3

LOOP

EXIT

;POINT TO PATTERN
:GET @ OF ENTRIES

TABLE
IN TABLE

;s THE

TESTS

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10056-.

T19.LP:

BGNSUB

SUBTEST

ONLY

104402

111137
112137
012700
004737
103003

002306
002310
120013
005034

MOVB
Move
MOV

JSR
8CC
ERROR

104460

ESCAPE

104410
000006

(R1),TDATA
(R1)+,GDATA

QACR,RO
PC,STREG

:SETUP TEST DATA BYTE FOR "STREG"
:SETUP EXPECTED DATA BYTE FOR "STREG“
iSPECIFY THE REGISTER BEING TESTED

10%

:PERFORM STATIC TEST
iWAS AN ERROR FOUND?
:YES, REPORT IT AND

TSTY

EXIT

FROM

THE

TEST.,

SPECIFIED REGISTER

TRAP
“CKLOOP" IS
TRAP

.WORD
10s:

CS$ERROR
IMPLIED
CSESCAPE

L10056

ENDSULB

L100S7:

104403
077317

THE ONE PATTERN
T17.1:
TRAP
csBsSuB

TRAP

508

R3,T19.LP

+IF "HERE
s TEST IT.

CsESLB

IS IN FACT MORE DATA, LOOP BACK TQ
ELSE, FALL OUT OF LOOP AND TEST

ENDTST

104401

L 10056

TRAP

CSETST

CNDMAAO DMV11 MCTRL
TEST

DIAG 91

J11

MACRO M1200

22-FEB-84

15:22

PAGE

SEQ 0139

VIA'S PCR DATA READ/WRITE

.SBTTL

5200

TEST

VIA'S PCR DATA READ/WRITE

PCR

@
@

X
2K
R
BN

5204
5205
5206
5207
5208
5209
5210

5211
5212
5213
5214
5215
5216
5217

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

VIA'S PCR DATA READ/WRITE

"PERIPHERAL

CONTROL

FIRST, A MASTER CLEAR IS PERFORMED., THEN :
READ/WRITE BITS O-7 OF THE PCR REGISTER ARE TESTED BY WRITING,
AND COMPARING EACH BYTE OF A SUBSET OF DATA PATTERN B.

OATA PATTERN B {SUBSET)

K
LK 2B

5201
5202
5203

027442
027442
027446
027450
027450
027452
027452
027454

TEST

2% 4

102828084808 820004000020000408000080040040088008848000080804080000808000000400444s

125,
040,

252,
100,

000,
200.

377,

001,

003762

104460
104410
000050
012701
012703

004,

010,

T18::

JSR
8CC
ERROR

PC,MSTCLR

30¢

sINIT DMV & START UP THE MAINT.,
s IF AN ERROR OCCURED,

ESCAPE

TST

;:REPORT IT &
EXIT

LOOP
TRAP

CS$ERROR

TRAP

CS$ESCAPE

.WORD
002530
002543

020,

~88 8888480084440 00000008408008400800084080484004800080008000200000080804000048

BGNTST
004737
103003

002,

READING,

30¢:

MOV

9PATB.2,R1
OPATB+15,R3

L10060-.

;POINT TO PATTERN TABLE
;GET & OF ENTRIES IN TABLE

T20.LP:

;THE SUBTEST ONLY

BGNSUB

TESTS

104402

111137
112137
012700
004737
103003

002306
002310
120014
005034

MOVB
MOVB
MOV

JSR
8CC
ERROR

104460

ESCAPE

104410
000006

10¢:

(R1),TDATA
(R1)+,GDATA

QPCR,RO
PC,STREG

10¢

TSt

;SETUP

TEST DATA BYTE FOR

:SPECIFY

:PERFORM

ENDTST

104401

“STREG"”

TEST

Tv€

SPECIFIED REGISTER

:WAS AN ERROR FOUND?

:YES,

REPORT

EXIT FROM THE

AND

TEST.

:IF

THERE

sTEST

IT.

IN FACT MORE DATA,

ELSE,

TRAP

CS$ERROR

~CKLOOP" IS IMPLIED

L10061:
R3,720.LP

csBsuB

THE REGISTER BEING TESTED

STATIC

ENDSUB

508

TRAP

;SETUP EXPECTED DATA BYTE FOR “STREG"

104403

077317

THE ONE PATTERN
T18.1:

TRAP

CSESCAPE

.WORD

L10060-.

TRAP

CsESLB

LOOP BACK

FALL OUT OF LOOP AND TEST
L10060:

TRAP

CSETST

CNDMAAO DMV11 MCTRL DIAG 41
TEST

VIA'S

MACRO M1200

22 FEB 84

15:22

PAGE

IK11
69

SEQ 0140

IER DATA READ/WRITE

5243

.SBTTL

TEST

1408828484000

VIA'S IER DATA READ/WRITE

00 0000040000 4400000848080 0800500040000 004800048800404804084008484424

TEST

VIA'S

IER

DATA

READ/WRITE

1 &

IER ==

"INTERRUPT ENABLE REGISTER"”

;» BITS 0-6 OF THE IER CAN BE SET OR CLEARED ON A WRITE, UNDER CONTROL OF THE
;o SET/CLEAR CONTROL BIT 7. TO TEST THIS , EACH BYTE OF DATA PATTERN D IS
;#

WRITTEN

INTO

IER,

AND

THE

READ

AND

COMPARED

THE

CORRESPOND
-

:# ING BYTE OF DATA PATTERN E.
HLJ

DATA

PATTERN

200,

201,

202,

204,

210,

002,

004,

010,

020,

040,

000,

0OO1,

003,

007,

174,

170,

160,

140,

220,

100,

000,

240,

300,

O17,

037,

077,

177,

176,

100,

000,

125,

000,

052,

000

325,

200,

125,

000,

252,

00!,

052

i e

DATA

PATTERN

i e

HE
)
HL
$--883028402

027526

5244 027526
5245 027532
5246 027534
027534
5247 027536
027536
027540
5248
5249 027542
5250 027546
5251 027550
5252
5253 027554
5254 027554
027554
027554
5255
5256 027556
5257 027562
5258 027566
5259 027572
5260 027576
5261 027600
027600
5262 027602
027602
027604
5263
5264 027606
027606
027606
5265
5266 027610

:
004737
103003

003762

104460
104410
000052

012701

012103
012702

002644

30%:

002676

T21.LP:

0048800400043 0080400840080080 0080403808803 06488008408000004030004080448

BGNTST
JSR
8CC
ERROR

PC,MSTCLR
30¢

:INIT DMV £ START UP THE
;IF AN ERROR OCCURED,
;REPORT IT &

ESCAPE

TST

MOV

OPATD,R1

sPOINT

MOV
MOV

(R1)+,R3
OPATE+2,R2

BGNSUB

002306
002310
120016
005034

104460
104410
000006
10$:

(R1).,TDATA
(R2)+,GDATA
#IENR,RO
PC.STREG
10

ESCAPE

TST

SUBTEST ONLY

TESTS

TRAP
.WORD

C$ESCAPE
L10062 .

TABLE

THE ONE PATTERN
T19.1:
TRAP
csBsuB

L10063:

R3,121.LP

CSERROR

;SETUP TEST DATA BYTE FOR "STREG"
:SETUP EXPECTED DATA BYTE FOR “STREG"
sSPECIFY THE REGISTER BEING TESTED
;sPERFORM STATIC TEST OF THE SPECIFIED REGISTER
;:WAS AN ERROR FOUND?
;:YES, REPORT IT AND
TRAP
CSERRUR
:
EXIT FROM THE TEST.
“CKLOOP" IS IMPLIED
TRAP
CS$ESCAPE
.WORD
L1002 .

ENDSUB

SoB

TRAP

TO PATTERN TABLE

104403
077317

LOOP

sGET & OF ENTRIES IN TABLE
sPOINT TO "EXPECTED” DATA PATTERN

s THE

MOvB
MOovB
MOV
JSR
8CC
ERROR

MAINT,

EXIT

104402

112137
112237
012700
004737
103003

T19::

s IF

THERE

IN FACT MORE DATA,

TRAP

Csesus

LOOP BACK

CNDMAAO DMV11 MCTRL DIAG #1
TEST

VIA'S

5267
5268
5269 027612
027612
027612

MACRO M1200

22-FEB-84

15:22

PAGE

L11
A9

SEQ 0141

IER DATA READ/WRITE

s TEST IT.

ELSE,

FALL

OUT

LOOP AND

TEST

ENDTST
104401

L10062:

TRAP

CS$ETST

CNDMAAO DMV11 MCTRL

TEST 20

DIAG #1

MACRO M1200

VIA'S ORB/DDRB MASTER CLEAR

5282

22-FEB 84

15:22

PAGE

M11
70

SEQ 0142

TEST

.SBTTL TEST 20 -- VIA'S ORB/ODRB MASTER CLEAR TEST
(HIRALARABAAAAALRARARAALRARAAARALESAEAAAAAAE040040400000000440404080000408404040
[y

TEST 20

VIA'S ORB/DDRB MASTER CLEAR TEST

ORB ==

i *

DDRB

“QUTPL.,

"DATA DIRECTION REGISTER B"

;4 FIRST,

A MASTER CLEAR

IS PERFORMED.

;% ALL B8 PORT PINS FOR OUTPUT MODE.
;*

THE

IS READ BACK

AND

NEXT,

377

IS LOADED

INTO ODRB

TO SET

THEN, A 000 BYTE IS WRITTEN INTO ORB AND

CHECKED FOR

000.

;# PERFORMED AND ORB IS READ AND CHECKED FOR 377.

THEN,

A MASTER CLEAR

:--““0“t“t‘t‘t“““t“t““t““““tt“‘t‘t“tt“tt‘tt“‘tttt“‘t‘tttt“
5283

027614

5284 027614

004737

5286 027622
027622

104460

5285 027620
5287 027624

027624

103003

003762

JSR

000252

S289 027630
gggg 027636

012737
013737

ESCAPE

000377
002310

002310
002306

1$:
;

:
012700
004737
103003

120002
005034

104460
104410
000216

gggé

5303
5304
5305
S306

027664
027670
027674
027676
027676
5307 027700
027700
5308 027702

012700
004737
103003

S309 027704

004737

5310 027710
5311 027712

027712

120000
005034

as:

104460
104410
000176

103003
104460

;INIT DMV & START UP THE MAINT.

; IF AN ERROR OCCURED,
;REPORT IT &

TST

LOOP

TRAP

EXIT

TRAP

.WORD

ggg}

027644
027650
027654
027656
027656
5299 027660
027660
5300 027662

ERROR

5292
5295
5296
5297
5298

T20::
PC,MSTCLR

B8CC

104410

5288 027626

BGNTST

003762

S$:

MOV
MOV
WE'LL USE

#377,GDATA
GDATA,TDATA
"STREG"”

:SETUP FOR CALL

TO LOAD & CHECK

"ORB" FOR BI-DIRECTIONAL TRANSFERS

"DDRB" WITH 377

[HEREBY

#0DRB, RO
PC.STREG
43

;POINT TO ORB
:LOAD & TEST IT
;IF OK, PROCEED WITH TESTING
;ELSE, REPORT THE ERROR

ESCAPE

TST

& QUIT

©ORB ,RO
PC,STREG
Ss

;POINT TO DDRSB
;LOAD & TEST “ORB"
: IF NO ERROR HERE, PROCEED
;ELSE, REPORT THE ERROR

ESCAPE

TST

& QUIT

JSR

PC MSTCLR

;sISSUE

THE MASTER CLEAR (STAY

;ELSE,

REPORT

ERROR

SETTING uP

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10064-.

TRAP

C $ERROR

TRAP
.WORD

C$ESCAPE
L10064-.

-STREG” TO SET & CHECK "ORB"

MOV
JSR
8CC
ERROR

B8CC

C$ESCAPE

L10064-.

TO STREG

MOV
JSR
8CC
ERROR

NOW WE'LL USE

C $ERROR

104

; IF NO ERROR HERE, PROCEED
IT

IN M LOOP)
TRAP

CS$ERROR

’NDMAAO OMV11 MCTRL DIAG &1
TEST

VIA'S ORB/DDRB MASTER CLEAR

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

5327
5328
5329
5330
5331
5332
5333
5334
5335
5336
5337

MACRO M1200

0271742

004064

10s$:

104460
104410
000136

104455
000052
014515
006612

027772
030000

012737
013737

GDATA

:FOR

JSR
DDRB
BDATA
8CC
ERROR

RS ,READ

;READ

ESCAPE

TST

124

:IF

002312

000002

002310

12¢:

CMPB
8EQ

002334

BDATA,GDATA
14

MOV

TESTING PURPQOSES LATER
THE

"RESET”

VALUE

NO ERROR READING

;ELSE,

REPORT IT

;

& QUIT

IT,

THE

"DDRB*

PROCEED
TRAP

C$ERROR
CS$ESCAPE

: YES,

GOOD.

NOW CHECK

“ORB"

Q0DRBE< 17>, REGNUM
;NO!
BUILD REGISTER & POINTER
EM5,ERR7
:REPORT MASTER CLEAR FAILURE
:
"DEVICE FATAL” ERROR & 42

.WORD
.WORD
002310
002306

14¢:

MOV
MOV

USE

#377 ,GDATA

GDATA,TDATA
“STREG”

120002
005034

MOV
JSR

8CC
ERROR

ESCAPE

104410
000054
002310
004064

16%:

CLR
JSR

ORB
BDATA
8CC
ERROR

104460

ESCAPE

104410
000030

:SETUP FOR

TO LOAD & CHECK

"$0DRB, RO

PC,STREG
16

TST

GDATA

TRANSFERS

CALL

"DDRB”

WITH

EMS
ERR?7

TO STREG

377

THEREBY

SETTING

;:POINT TO ORB

;LOAD & TEST IT
:IF OK, PROCEED WITH

;ELSF,

REPORT

& QUIT

:SETUP FOR

TESTING

THE ERROR

TRAP

CSERROR

TRAP
.WORD

L10064

iNOW READ

18¢

:IF NO ERROR READING

THE

"RESET"

;ELSE,

REPORT IT

;

& QuIT

VALUE

IT,

PROCEED
TRAP

.WORD
002312

000000

002334

18¢:

CMPB
8EQ

MOV

GEOF

GDATA ,BDATA
324

“ORB"

TRAP

002310

CS$ESCAPE

TESTING ORB

RS ,READ

TST

CSERDF

.WORD

000377
002310

L10064
-,

:0ID IT GET CLEARE?

TRAP

104460

001407
012737

C$ESCAPE

L10064
-,

.WORD

"ORB" FOR BY-DIRECTIONAL

123737

& QUIT

TRAP

WE'LL

005037
004537
120000
002312
103003

CLR

GEDF

012700
004737
103003

.WORD

004537
120002
002312
103003

027762
027764
027766
027770

PAGE

TRAP

002310

123737

N1L

15:22

SEQ 0143

ESCAPE

005037

001407
012737

TEST

104410
000162

027744
027752
027754
027762

030006
030012
030016
030020
030020
5338 030022
030022
030024
5339
5340 030026
5341 030032
5342 030036
5343 030040
5344 030042
5345 030044
030044
5346 030046
030046
030050
5347
5348 030052
5349 030060
5350 030062
5351 030070

22-FEB

tWAS IT PROPERLY RESET?
i YES, THIS TEST IS DONE, EXIT
QO0RBE< 17>, REGNUM
;NO!
BUILD REGISTER @ POINTER
EMS,ERR?
{REPORT MASTER CLEAR FAILURE
:
“OEVICE FATAL” ERROR ¢ 43

CSERROR

CSESCAPE

L10064

CNDMAAO DMV11 MCTRL
TEST 20

MACRO M1200

VIA'S ORB/DDRB MASTER CLEAR
030070

5352

DIAG o1

030072
030074
030076

5353 030100
030100
C30100

22 FFB 84

15:22

Ble
PAGE

70 2
5€Q

TEST

104455

000053
014515
006612
32%:
104401

ENDTSY

TRAP

CSERDF

.WORD
.WORD
.WORD

43
EMS
ERR7

TRAP

C3ETST

L10064:

0144

CNDMAAD DMV11 MCTRL DIAG @1
TEST

MACRO M1200

VIA‘S CDRB MASTER CLEAR

22 FEB 84

15:22

Cle
PAGE

SEQ 0145

TEST

S%7

.SBTTL

TEST 21

VIA'S DORB MASTER CLEAR TEST

1000000000000 4000000000000480000000000000000008000000
00000080

00000000000000800000

1o
1@

TEST 21

OORB

"DATA DIRECTION REGISTER 8"

1 e

3¢
1.

VIA'S DDRB MASTER CLEAR TEST

A 377 BYTE IS WRITTEN INTO DCRB AND THE REGISTER
IS
zgg 377. THEN, A MASTER CLEAR IS PERFORMED AND DORB

READ BACK AND CHECKED
IS READ AND CHECKED FOR

1 NOTE:

THIS

TESTING

PROVIDE

IS ALSO DONE

TIGHTER

LOOPING

TEST

JUST

23.

THE

DDRB

INCLUDED MERE

MASTER

CLEAR

ONLY

CHECKING.

$ - -‘.‘000.“‘..‘.“‘0‘.“0“0‘.‘0‘0.0...“00..‘..0‘0

000..“.‘0‘0‘0‘0‘.‘00‘.0.0

5368
5369 030102
5370 030106
5371 030110
030110
5372 030112
030112
030114
S373
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
S396 030210

BGNTS)

030102

T21::
004737
103003

003762

104460
104410
000114
012737
013737
012700

000377
002310
120002

002310
002306

18:

ESCAPE

TST

0377,GDATA

GDATA,TDATA
00DRB
, RO

NOW WE'LL USE

005034

JSR

8CC

ERROR

ESCAPE

104410
000060

"STREG'

FOR

TO SET & CHECK

PC.STREG

TST

TRAP

EXIT

sSUTUP

LOOP

CALL

CSESCAPE

.WORD

L10065-.

TRAP

CSERRJOR

STREG

DODRB'

sLOAD £

TEST

'DORB

sELSE,

REPORTY

& QUIT

s IF NO ERROR HERE,

PROCEED

. WORD

003762

Ss:

104410
000044

JSR
8CC
ERROR

PC,MSTCLR
10$

s LSSUE THE MASTER CLEAR (STAY
s IF NO ERROR HERE, PROCEED
sELSE, REPORT [T

ESCAPE

IST

TRAP

& QUIT

.WORD
002310
004064

123737

002310

10%:

CLR
JSR

GDATA
RS,READ

iFOR TESTING PURPOSES LATER
sNOW READ THE
'RESET' VALUE OF

cMPB

GDATA,BDATA

tWAS

ODRB
BDATA
002312

B8EQ

308

1YES,

PROPERLY

THIS TEST

RESET?

IS DONE, €xI7

CSESCAPE

L10065

IN M-LOOP)

TRAP

005037
004537
120002
002312

CS$ERROR

TRAP

104460

001407

s INIT DMV & START UP THE MAINT.
s IF AN ERROR OCCURED,
sREPORT IT &

MOV

104460

004737
103003

PC,MSTCLR
1s

MOV
MOV

:
004737
1C3003

JSR
8CC
ERROR

'DDRB"

CSERROR

CSESCAPE

L 10065

CNDMAAO DMV1I1 MCTRL
TEST

DIAG o1

MACRO M1200

VIA*'S DDRB MASTER CLEAR

5397 030212
5398 030220

012737

030220
030222
030224
030226

104455

5399
5400 030230
030230
030230

000002

D12

22 FEB 84

15:22

PAGE

1
SEQ 0144

TEST

002334

MOV
GEDF

#DDORBE 17> ,REGNUM
sNO!
BUILD REGISTER
EMS ,ERR7
tREPORT MASTER CLEAR FATILURE

000054
014515
006612

32%:

“"DEVICE

# POINTER

FATAL” ERROR & 44
TRAP

CSERDF

.WORD
.WORD
.WORD

44
EMS
ERR?

TRAP

CSETST

ENDTST
L10065;

104401

1§

v
.

[§
3

1§
L
t

]

v
L

.
C

A
¢

-?L'

“

‘i‘{.

;TT’

MRS

;.'-J

" f%

1§

t Yo

;\‘
»

“-’\

>
-

.
'

“

, -.

Cad

A Y

‘a

&« ‘#fi

CNDMAAO DMVI1 MCTRL DIAG #1
TEST

MACRO M1200

22 FEB 84

15:22

PAGE

Ele
72

SEQ 0147

VIA'S DDRA MASTER CLEAR TEST

.SBTTL

S411

TEST 22

VIA'S DDRA MASTER CLEAR TEST

1000000800000 000000000000800000000000000000000000000000000000000000000000000408

TEST 22 -- VIA'S DORA MASTER CLEAR TEST

DDRA ==

s
:1o

"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 DURA IS READ AND CHECKED FOR

;¢ 000,
1808080840020 0048080008480088008080308800000808008008040440400400008040000080000020

5412
5413 030232
S414 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
5428
5429 030302
5430 030306
5431 030310
030310
5432 030312
030312
030314
5433
5434 030316
5435 030322
5436 030326
5437 030330
5438
5439 030332
5440 030340
5441 030342
5442 030350

BGNTST

;

030232

004737

103003

003762

104460
104410

T22::

JSR
8cC
ERROR

PC,MSTCLR
14

ESCAPE

TST

sINIT DMV & START UP THE MAINT.
1 IF AN ERROR OCCURED,

sREPORT

TRAP

EXIT

TRAP

000114

012737
013737
012700

000377
002310

120003

002310
002306

1¢:

s
004737
103003

MOV

MOV
MOV

005034

104410
000060

S$:

003762

sSETUP FOR CALL

104410
000044

CS$ESCAPE

.WORD

L10066-.

TRAP

CSERROR

TRAP
. WORD

CSESCAPE
L10066 .

TO STREG

'DDRA"

JSR
8CcC
ERROR

PC,STREG

:LOARD £

ESCAPE

TST

& QUIT

JSR
8CC

PC.MSTCLR

1 ISSUE

THE MASTER CLEAR (STAY

ESCAPE

TST

ERROR

104460

CS$ERROR

Q0ODRA ,RO

NOW WE'LL USE "STREG” TO SET & CHECK

104460

004737
103003

0377,GDATA

GDATA,TCATA

LOOP

10s

TEST

“DDRA*

s IF NO ERROR HERE,
:ELSE, REPORT IT

:IF NO ERROR HERE,

sELSE, REPORT IT
:

PROCEED

& QUIT

IN M-LOO0OP)
TRAP

CSERROR

TRAP

CSESCAPE

.WORD

10¢:

005037
004537
120003
002312

002310
004064

123737
001407
012737

002310

002312

000003

002334

CLR

GDATA
RS,READ

1FOR TESTING PURPOSES LATER
tNOW READ THE 'RESET” VALUE OF

CHMPB
8EQ

GDATA,BDATA

;WAS

GEDF

EMS,ERR?

tREPORT MASTER CLEAR FAILURE

JSR
DDRA

"DDRA“

BDATA

MOV

324
s YES,
ODDRAE<1 7> ,REGNUM

IT PROPERLY

RESET?

THIS TEST IS DONE, EXIT
sNO!
BUILD REGISTER & POINTER

“DEVICE FATAL ERROR & 4S5

-.
L10066

CNDMAAO DMV11 MCYRL
TEST

DIAG #1

MACRO M1200

VIA'S DDRA MASTER CLEAR

030350
030352
030354
030356

5443
5444 030360
030360
030360

22 FEB

15:22

PAGE

SEQ 0148

TEST

104455
000055
014515
006612

TRAP

328
104401

CSERDF

. WORD
.WORD
.WORD

45
EMS
ERR7

TRAP

CSETST

ENDTST
L10066:

CNDMAR0 DMV11 MCTRL
TEST

DIAG o1

VIA'S SR MASTER CLEAR

MACRO M1200

22-FEB

15:22

PAGE

Gl2
73

SEQ 0149

TEST
.SBTTL

455

TEST 23

VIA'S SR MASTER CLEAR

TEST

3006000404880 88803840840080880008080080003008440384820440204800588038040200004000040
HEd

TEST

VIA'S SR MASTER CLEAR

TEST

*'§ HIFT

]

;¢ A 123 BYTE IS WRITTEN INTO SR AND THE REGISTER IS READ BACK AND CHECKED
;¢

FOR

123,

THEN,

A MASTER

i+ NO CHANGE.

CLEAR

PERFORMED

AND

READ

AND

CHECKED FOR

]

$--08888030000002808008000808804080008000480808000800004320804300840048400000404408

5456
5457 030362
5458 030366
5459 030370
030370
5460 030372
030372
030374
5461
5462 030376
5463 030402
5464 030404
5465 030406
5466 030414
5467 030422
5468
5449
5470
5471 030426
5472 030432
5473 030434
030434
5474 030436
030436
030440
5475

5476 030442
5477 030446
5478 030450
030450
5479 030452
030452
030454
5480
5481 030456
5482 030462
5483 030464
5484
5485 030466
5486 030474
5487 030476

BGNTST

030362

004737
103003

003762

104460
104410
000120
004537
120013

004322

012737
013737
012700

000123
002310
120012

14:
002310
002306

:
004737
103003

104460
104410
000054
004737
103003

003762

PC,MSTCLR
1$

: IF

ESCAPE

TST

S$:

104410
000040

TRAP

EXIT

TRAP

RS,WRITEI

;FORCE SR TO MODE O

MOV
MOV
MOV

GDATA,TDATA

0123 ,GDATA

;SETUP FOR CALL TO STREG

"STREG"

TO SET

& CHECK

sLOAD & TEST

"SR

:ELSE, REPORT

ESCAPE

TS7

JSR
B8CC

PC,MSTCLR
10¢

s IF NO ERROR MHERE,

ESCAPE

L10067-.

: IF

NO ERROR HERE,

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10067
-.

PROCEED

& QuIT

; ISSUE THE MASTER CLEAR (STAY

tELSE, REPORT

PROCEED

IN M-LOOP)
TRAP

& QUIT

TRAP

.WORD

JSR

004064

123737
001407
012737

002310

002312

cMPB’

000012

002334

MOV

10$:

RS ,READ

sNOW READ THE “RESET" VALUE OF "SR’
(IT SHOULON'T HAVE CHANGED)
H

GDATA,BDATA
324

iWAS IT PROPERLY RESET?
s YES, THIS TEST IS DONE,

BDATA
BEU

CS$ESCAPE

.WORD

'SR"

PC,.STREG

004537
120012
002312

CS$ERROR

@SR ,RO

JSR
BCC
ERROR

ERROR

104460

AN ERROR OCCURED,

;REPORT

JSR

NOW WE'LL USE

005034

:INIT DMV & START UP THE MAINT, LOOP

JSR
8CC
ERROR

ACR
0

000000

123::

OGRE<17> ,REGNUM

sNO!

EXIT

BUILD REGISTER # POINTER

CS$ERROR
CSESCAPE

L1006

CNOMAA0 DMV11 MCTRL DIAG o1
TEST

VIA'S

SR MASTER

MACRO M1200

CLEAR

5489
5490 030514
030514
030514

H12
84

PAGE

73-1

SEQ 0150

GEDF

EM5,ERR7

:REPORT

MASTER CLEAR FAILURE

“"DEVICE FATAL” ERROR & 46

104455
000056
014515
006612

TRAP

32%:
104401

15:22

TEST

5488 030504

030504
030506
030510
030512

22-FEB

CSERDF

.WORD
. WORD
.WORD

46
EMS
FRR7

TRAP

CSETST

ENDTST
L10067:

CNDMAAO DMV1l MCTRL DIAG &1
TEST

MACRO M1200

VIA'S ACR MASTER CLEAR

22-FEB

15:22

PAGE

I1e
74

SEQ 0151

TEST

.SBTTL

5501

TEST 24

VIA'S ACR MASTER CLEAR TEST

1000888800840 40432002204028005042000800800080580000800088000848448408888800085480048

i e

TEST 24 -- VIA'S ACR MASTER CLEAR TEST

i .

ACR ==

"AUXILIARY CONTROL REGISTER"

1 e

s A 252 BYTE IS WRITTEN INTO ACR AND THE REGISTER IS READ BACK AND CHECKED
»

FOR

i 000,
'

252.

THEN,

MASTER

CLEAR

PERFORMED

AND

ACR

READ

AND

CHECKED

FOR

TO VERIFY THAT IT IS CLEARED BY MASTER CLEAR.

~8828800488348400824484008008384880882480040248008080800200008504008488008844000080402

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

BGNTST

030516

004737

103003

003762

104460
104410
000114

012737
013737

C12700

000252
002310
120013

002310
002306

:+
004737
103003

PC,MSTCLR
1s

ESCAPE

TST

MOV
MOV

NOW WE'LL USE

005034

104460
104410
000060

004737
103003

JSR
8CcC
ERROR

MOV

1¢:

T24::

s:INIT DMV & START UP THE MAINT.
:IF AN ERROR OCCURED,

sREPORT

€252 ,GDATA

GDATA, TDATA

LOOP
TRAP

EXIT

TRAP

Ss$:

104460

104410
000044

CSESCAPE

.WORD

L10070-.

TRAP

C$ERROR

;SETUP FOR CALL TO STREG

4ACR,RO

“STREG”

TO SET

€ CHECK

"ACR"
.

:LJAD & TEST

“ACR"

JSR
8CC
ERROR

PC,.STREG
S

; IF NO ERROR HERE,

ESCAPE

TST

;ELSE, REPORT IT

PROCEED

& QUIT

TRAP

LWORD
003762

C$ERROR

JSR

PC ., MSTCLR

B8CC
ERROR

10¢

:ISSUE THE MASTER CLEAR (STAY
:IF NO ERROR HERE, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

& QUIT

IN M LOOP)
TRAP

CSERROR

TRAP

CSESCAPE

.WORD

005037
004537
120013
002312

002310
004064

123737
001407
012737

002310

002312

000013

002334

10¢:

CLR

GDATA

;FOR

JSR
ACR
BDATA

RS,READ

¢{NOW READ

CMPB
8EQ

GDATA,BDATA
32

;WAS

MOV

GEDF

;YES,

TESTING PURPOSES

“RESET"

PROPERLY

THIS

OACRE<17> ,REGNUM
;REPORT
EMS5,ERR?

THE

TEST

;NO!

MASTER

LATER

VALUE

RESET?

DONE,

“ACR"

EXIT

BUILD REGISTER & POINTER

CLEAR FAILURE

CSESCAPE

L10070-.

“DEVICE FATAL" ERROR 2 4~

L10070-.

CNDMAAO DMV11l MCTRL DIAG 21
TEST

VIA'S

030634
030636
030640
030642

5533
5534 030644
030644
030644

MACRO M1200

ACR MASTER CLEAR

22-FEB 84

15:22

PAGE

Jl12
74

SEQ 0152

TEST

104455
000057
014515
006612
32%:
104401

ENDTST

L10070:

TRAP
.WORD
.WORD
.WORD

CSERDF
47
EMS5
ERR7

TRAP

CSETSY

CNDMAAO DMV11 MCTRL DIAG 21
TEST

K12

MACRO M1200

VIA'S PCR MASTER CLEAR

22-FEB 84

15:22

PAGE

SEQ 0153

TEST

5545

.SBTTL
R

TEST 25

VIA'S PCR MASTER CLEAR TEST

Y YYYY I

Iy,

TEST 25

HEJ

VIA'S PCR MASTER CLEAR

TEST

PCR

"PERIPHERAL CONTROL REGISTER"”

« A 377 BYTE IS WRITTEN INTO PCR AND THE REGISTER IS READ BACK AND CHECKED
;e ggg 377. THEN, A MASTER CLEAR IS PERFORMED AND PCR IS READ AND CHECKED FOR
[y 3

1o -0 ARAAARAEAAAAAREARRAAREARAREAANAAAANRAAA000400004000040000008008040

BGNTST

030646

5546
5547 030646
5548 030652
5549 030654
030654
5550 030€56
030656
030660
5551
5552 030662
5553 030670
5554 030676
5555
5556

004737
103003

003762

104460
104410
000114
012737
013737
012700

000377
002310
120014

002310
002306

5557

5558 030702
5559 030706
5560 030710
030710
5561 030712
030712
030714
5562
5563 030716
5564 030722
5565 030724
030724
5566 030726
030726
030730
5567
5568 030732
5569 030736
5570 030742
5571 030744
5572
5573 03074¢
5574 030754
5575 030756
5576 030764

1¢:

004737
103003

PC,MSTCLR
1s
’

sINIT DMV &€ START UP THE MAINT.,
:IF AN ERROR OCCURED,
;REPORT IT &

ESCAPE

TST

NOW WE'LL USE

104460
104410
000060
004737
103003

JSR
8CC
ERROR

MOV
MOV
MOV

005034

T25::

0377 ,GDATA
GDATA, TDATA
oPCR,RO
"STREG"

TRAP

EXIT

TRAP

;SETUP FOR CALL

TO SET & CHECK

LOOP

L10071-.

TRAP

CS$ERROR

TO STREG

“PCR"

JSR
8CC
ERROR

PC,STREG
Ss

;LOAD & TEST "PCR"
:IF NO ERROR HERE, PROCEED
:ELSE, REPORT IT

€ESCAPE

TST

& QUIT

.WORD

Ss:

104460
104410
000044

JSR
8CC
ERROR

PC.MSTCLR
10¢

; ISSUE THE MASTER CLEAR (STAY
sIF NO ERROR HERE, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

TRAP

& QUIT

.WORD

002310
004064

123737
001407
012737

002310

002312

000014

002334

104:

CLR

GDATA

:FOR

CcMPB

GDATA ,BDATA

;WAS IT PROPERLY RESET?

MOV

#PCRE<17> ,REGNUM

ggs

RS,READ

TESTING PURPOSES LATER

+NOW READ

THE

'RESET'

VALUE

PCR

8DATA

B8EQ

GEOF

324

EMS,ERR7?

;YES,

THIS TEST IS DONE, EXIT
;NO!

BUILD REGISTER

CSESCAPE

L10071

IN M LOOP)

TRAP

005037
004537
120014
002312

CS$ESCAPE

.WORD

TRAP

003762

CS$ERROR

& POINTER

sREPORT MASTER CLEAR FAILURE
3
“DEVICE FATAL" ERROR & 48

CS$ERROR

CSESCAPE

L10071

CNDMAAO OMV11l MCTRL DIAG &1
TEST

MACRO M1200

VIA'S PCR MASTER CLEAR
030764
030766
030770
030772

5577
5578 030774
030774
030774

22-FEB-84

15:22

PAGE

75-1

SEQ 0154

"EST

104455
000060
014515
006612

TRAP

32$:
104401

C $ERDF

.WORD
.WORD
. WORD

48
EMS

TRAP

CSETST

ERR7

ENDTST

L10071:

M12
CNDMAAO DMV1l MCTRL DIAG 41
TEST

MACRO M1200

22-FEB-84

15:2¢

PAGE

SEQ 0155

VIA'S IER MASTER CLEAR TEST

.SBTTL TEST 26 -- VIA'S IER MASTER CLEAR TEST

5589

$ 0088802400000 40040480404088040440480454048880004
0804000800045 0 00000040000 004084000004
i

TEST 26

VIA'S IER MASTER CLEAR TEST

1 &

IER ==

1 &

"INTERRUPT ENABLE REGISTER"”

]

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

1 &

FOR 377.
200.

x]
)

THEN,

A MASTER CLEAR

IS PERFORMED AND

IER

IS READ AND CHECKED FOR

2288200248004 6A 0040400880044 0400480 00800000480 0085408800480804084008000008

5590
5591 030776
5592 031002
5593 031004
031004
5594 031006
031006
031010
5595
5596 031012
5597
5598 031016
5599 031024
5600 031032
5601
5602
5603
5604 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

BGNTST

030776

004737
103003

003762

JSR
8CC

PC,MSTCLR
1

sINIT DMV & START UP THE MAINT.,
;:IF AN ERROR OCCURED,

ESCAPE

TST

ERRIR

104460

104410

T26::

:REPORT

IT €&

TRAP

EXIT

TRAP

.WORD

000122

10507~

151334

012737
013737
012700

000377
002310
120016

1$:

103003

CLRB

002310

MOV

002306

MOV

:
004737

NOW WE'LL USE

JSR

005034

8CC
ERROR

104460

ESCAPE

104410
000062

004737
103003

LOOP

9BSELO

€377,.GDATA

GDATA, TDATA

CS$ERROR
CS$ESCAPE

L10072-.

sMAKE SURE NO Q-BUS INTERRUPTS RESULT FROM
TESTING THE IER REGISTER
:
;SETUP FOR CALL TO STREG

@IENR,RO

“STREG"” TO SET & CHECK

PC,.STREG
Ss

TST

' IER"“

;:LOAD &€ TEST "IER"
:IF NO ERROR HERE,
:ELSE, REPORT IT
:

PROCEED

& QUIT

TRAP

CS$ERROR

TRAP

CS$ESCAPE

.WORD

S$:

003762

JSR
8CC

PC . MSTCLR
10

; ISSUE THE MASTER CLEAR (STAY
:IF NO ERROR HERE, PROCEED
;ELSE,

REPORT

ESCAPE

TST

& QUIT

ERROR

104460
104410
000046

IN M-LOOP)
TRAP
TRAP

.WORD

002310

012737
004537
120016
002312

000200
004064

123737
001407
012737

002310

002312

000016

002334

10¢:

MOV
JSR

+200,GDATA
RS . READ

;:FOR TESTING PURPQOSES LATER
sNOW READ THE "RESET” VALUE OF

CcMPB

GDATA,BDATA

:WAS IT PROPERLY RESET?

H#IENRE<17>,REGNUM

IENR

"IER"

BDATA

BEQ

s YES,

THIS

TEST

sNO!

IS DONE,

EXIT

L10072-.

BUILD REGISTER & POINTER

CSERROR
CSESCAPE

L10072

CNOMAAO DMV11 MCTRL DIAG 21
TEST

VIA'S

MACRO M1200

IER MASTER CLEAR

5623
5624 031132
031132
031132
5625

PAGE

76-1

SEQ@ 0156

GEDF
104455
000061
014515
006612

32¢:
104401

15:22

N12

TEST

5622 031122
031122
031124
031126
031130

22-FEB-84

EM5,ERR7

:REPORT MASTER CLEAR FAILURE
H
“DEVICE FATAL"” ERROR

¢ 49

TRAP
.WORD
.WORD
.WORD

CSERDF
49
EMS
ERR7

TRAP

CS$ETST

ENDTST
L10072:

CNDMAAO DMvV11 MCTRL DIAG #1
TEST

VIA

TIMER @

562

| ONE

MACRO M1200
SHOT

022 FEB 84

15:22

PAGE

B4
77

.
SEQ 0157

MODE

.SBTTL

TEST 07

VIA

TIMER @ 1

ONE

SHOT MODF

g o0‘0.00‘.0.00..‘.0.0......‘.“.....“..“..

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

[

TeST

VIA

TIMER

3@
1®

K]
1 e

ONE

THIS TEST VERIFIES THAT THE TIMER
MOOE, IN EACH OF TWO SUBTESTS.

THE

FIFST

SUBTEST,

MASTER

CLEAR

THE

SETTING BOTH ACR7 & ACR6

1 e
s ®

THE

INITIALLY

PROGRAM

DONE

CHECKS

AND

MODE

COUNTER

THE

IS OPERATIONAL

IS PERFORMED
TIMER

TO O,

FOR

CLEARED.

FOLLOWING

SHOT

~T1"

PLACED

FLAG

IN ONE -SHOT

(BIT

THE

MODE

IFR

TO BE

TIL-L
(THIS

K]
1@

(ADR
O4)
& TI1C-H (ADR 0S) ARE BOTH LOADED WITH 252 (OCTAL).
IS
EQUIVALENT
TO
AAAA
(MEX) NR 43,690 (DECIMAL).) LOADING

T1C-H

STARTS

THE

COUNTER,

HEJ

THE

?gCRg;fic:é&Pfir AND

THAT

TIL L

IS LOADED WITH 001

PROGRAM

PERIODICALLY

]

CHECKS

THE

COUNTER

VERIFY

THMAT

IT EVENTUALLY UNDERFLOWS PAST O AND CONTINUES

HL
L

(ADR

04)

000
IN
ORDER TO SET "T1~ WITH A QUICK
IN IFR IS READ AND CHECKED TO BE SET,

e
1@
HEJ

TIC W, TIL-L,
EACH THE “T1"

T1C

T1C-H#

LOADED

WITH

ALMOST

SET AGAIN.

“T1"

CHECKED

AGAIN

INITIATE

IMMEDIATELY)

;éI;L

IS LOADED WITH

125 (OCTAL) AND

T1C

IS LOADED WITH

125,

CLEARED BY
IN

IS READ AND

UNDERFLOW

CHECKED TO BE

UNDERFLOW.

THE

IS LOADED WITH
‘Tl FLAG BIT

€ TIL-H (ADDR'S 05, 06, & 07 RESP.) ARE READ
INTERRUPT FLAG IS CHECKED TO BE STILL SET.

(ADDR 04)

SHOULD

T1C-H (ADR 05)

THE LOADING OF

AND

THE

T1C-H,

TO BE

AND

“T1” BIT

“T1*

BIT

NEW

THE

AFTER

CLEARED.
COUNT

*T1'

DOWN

BIT

IS CHECKED

IS READ

AND

(WHICH

IFR

TO BE

STILL

AND CMECKED

TO BE

THE SECOND SUBTEST,
ALL OF THE ABOVE OPERATIONS ARE REPEATED,
WITH ACR BIT 7 SET T0 1, AND ACR BIT 6 SET TQO O. “PB7" (BIT 7 OF
WILL BE MONITORED FOR ITS EXPECTED LEVELS DURING THIS SUBTEST.

ORB)

-0.0‘00‘0‘.000.“00“‘.‘.‘0“..“‘.“.““...‘.

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

031134
5673 031134
031134
031134
S5 74

BGNTST
BGNSUB

104402

TRAP

CsB S L8

CNDMAAQ OMVI1 MCTRL
TEST

DIAG 21

MACRO M1200

22 FEB

15:22

C13
PAGE

5EQ 0158

VIA TIMER & 1 ONE SHOT MODE

5675
566 031136
S677 031142
5678 031144
03144
5679 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
5696 031226
5697 031232
5698 031234
031236
5700 031240
031240
5701 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

004737
103003

003762

104460
104410
004742
004537
000000
000000
103003

104410
002202
103143
004537
120004
002450
103003

004660

036146

004064

104460

ESCAPE

TST

1¢:

tINIT DMV £ ENTER M LOOP

& EXIT

TESTING
IRAP

CSERROR

TEST

JSR
0
0
8CC
ERROR

RS, INITT]

.+10

1IF NO ERROR, PROCEED
1ELSE, REPORT IT

ESCAPE

TST

JSR
8vC
ESCAPE

s INITIALIZE

MODE

==>

AND

. WORD

TIMER 0 1

PC.GETTH

.+6
SuB

"T1"

INT,

EXIT

THIS

TEST

ENABLE

.WORC

IT'S ALREADY BEEN REPORTED

63
RS,READ

sNO,
tGET

8CC
ERROR

.+10

;s IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

GOOD.
T1CL FOR ERROR MESSAGE

AND

EXIT

THIS

TEST

JSR

RS,READ

;GET

8CC
ERROR

.+10

1+ IF NO ERROR,

ESCAPE

T1CH
TMPS

T1CH FOR ERROR MESSAGE

tELSE, REPORT

AND

JSR
TiLL

RS,READ

8CcC

.10

iGET

CS$ESCAPE

L10073-,

EXIT

CSESCAPE

L10074
-,

TRAP

CSERROR
CS$ESCAPE

. WORD

L10073-.

TRAP

CSERIOR

PROCEED

EXIT

THIS

TEST

TRAP

004064

CSERROR

.WORO

TRAP

004064

FLAG CLEARED

TRAP

$ IS “T1~” SET?
1+ IF NO ERROR, PROCEED

tELSE,

CSESCAPE

L10073

LATCHES

8CC
JSR

T1CL
TMP4

T1LL FOR ERROR MESSAGE

CSESCAPE

. WORD

L10073-.

TRAP

CSERROR

TMP6

ERROR

104460

104410
004626
004537
120007
002456
103007

1 IF NO ERROR, PROCEED WITH
sELSE, REPORT ERROR

TRAP

104460
104410
004646
004537
120006
002454
103003

TRAP

104460

104410
004666
004537
120005
002452
103003

PC.MSTCLR

TRAP

104460

104410
004722
004737
102002

JSR
8CC
ERROR

ESCAPE

s IF NO ERROR,

$tELSE,
TSt

REPORT

PROCEED

AND EXIT

THIS

TESTY

TRAP
004064

JSR

RS,READ

iGET

8CC
ERROR

.+10

1 IF NO ERROR,

TiLH
TTMP7

E SCAPE

TiLH FOR ERROR MESSAGE

tELSE,

REPORT
AND

CSESCAPE

.WORD

LIOO3

TRAP

CSERROR

PROCEED

IT7

EXIT

THIS

TEST

CNDMAQO DMVIL MCTRL DIAG o1
TEST

5714
5715
5716
5717
5718
5719

5720

VIA

031302
031304
031306
031312
031314
031316
031320
031320
031322
031322
031324
031326

031326
031330
031332
031334
5721 031336
031336
031342
031346
031350
031352
3722
5723
S724
5725 031356
726 031364

5727 031370
5728 031372

5729 031374

5730 031376
5731

5732
5733
5734

5735

5736
S737
5738
5739

5740
5741
5742

5743
5744
5745
5746

031376
031400
031400
031402
031404
031410
031412
031412
031414
031416
031420
031424
031426
031330
031432
031432
031434
031434
031436
031440
031444
031446
031450
031452
031452

TIMER

104410
004606
004537
120013
002466
103003

ONE

MACRO M1200
SHOT

22 FEB 84

15:22

PAGE

D13
77 2

MODE

004064

104460

104410
004566

JSR
ACR
TMPB
8CC
ERROR

RS,READ

1GET ACR FOR ERROR MESSAGE

.+10

1+ IF NO ERROR, PROCEED
sELSE, REPORT IT

ESCAPE

T1ST

GEDF

EMSOA,ERRS0O

PRINTX

ofFMTSOM

104455
000062
016067
010762
012746
012746
010600
104415
062706

013174
000001

000004

R
112737

004537

120005
002453

000002

004310

104410
001770
103036
004537
120004
002450
103003

104460

MOVB
JSR

ERROR
ESCAPE

036146

004064

92, TMPS,1

RS,WRITFE

.+10

TST

JSR

T1CH
TMPS
8cC
ERROR

THIS

TEST

CSESCAPE
L10073 .

TRAP

C$ERROR

TRAP
CSESCAPE
.WORD
L10073 .
1YES, REPQORT IT'S NOT BEING CLEARED & INIT.
H
"DEVICE FATAL" ERROR @ SO
TRAP
CSEROF
.WORD
50
.WORD
EMSOA
.WORDC
ERRSQ
s
& SAY THE COUNTERS HAVEN'T BEEN L OADED YET!
MOV
FMTSOM, -(SP)
MOV
o1, (SP)
MOV
SP,RO
TRAP
CIPNTX
ADD
04 ,5P

tINIT

TIMER

:T1C M (ADDR 05)

8ccC

JSR
T1CL
THP4
8CC

AND EXIT

TRAP
.WORD

PC,GETT1
.+6
SuB

ESCAPE
004064

eee--

JSR
8vC
ESCAPE

ERROR

104460
104410
004454
004537
120005
002452
103003

8cC

104460

104410
004510
004737
102002

002453

T1CH
TMPS.
)

103003

SEQ 0159

RS ,READ

:IF

NO ERROR,

tELSE,
i

REPORT

WRITING

INTO

PROCEED

AND EXIT

THIS

TEST

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073 .

TRAP

CSERROR

TRAP
MWORD

CSESCAPE
LiV073 |

TRAP

CSERROR

$IS "T1~ SET?
: IF NO ERROR, PROCEED
]
iELSE, IT'S ALREADY BEEN REPORTED FEXIT
TRAP
CSESCAPE
.WORD
L10074 .

+NO,

tGET

GOOD.
T1CL

FOR ERROR MESSAGE

.+10

:IF NO ERROR, PROCEED
sELSE, REPORT IT

TST

AND EXIT

RS ,READ

tGET

.+10

1+ IF NO ERROR,
sELSE, REPORT

THIS

TESTY

T1CH FOR ERROR MESSAGE

PROCEED
IT

CNDMAAO OMV11 MCTRL
TEST

VIA

5747 031454
031454
031456
5748 031460
S749 031464
5750 031466
5751 031470
5752 031472
031472
5753 031474
031474
031476
5754 031500
031500
031502
031504
031506
5755 031510
031510
031512
5756
5757
5758
5759 031514
5760 031520
5761 031522
5762 031524
5763 031526
031526
5764 031530
031530
031532
5765 031534
5766 031542
5767 031546
5768 031550
5769 031552
5770 031554
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

DIAG o1

TIMER ¢

104410
004434
004537
120007
002456
103003

MACRO M1200

1 ONE-SHOT

22-FEB

E13
15:22

PAGE

SEQ 0160
ESCAPE

TST

AND EXIT

THIS

TEST
TRAP

004064

JSR

R5,READ

8CC
ERROR

.+10

ESCAPE

TST

TILH
TMP7

104410
004414

GEDF

iGET

T1LM FOR ERROR MESSAGE

s IF NO ERROR,

sELSE,

EM508,ERRSO

ESCAPE

104410
001672

suB

REPORT
AND

$YES,

104455
000063
016135
010762

004064

6%:

000377
004310

002445

JSR
ACR
TTMMPB
8CC
ERROR

RS,READ

e SCAPE

TST

MOvVB

JSR
OORB

8cC

ERROR

104460

THIS

IT'S NOT

TEST

BEING

CS$ERROR

TRAP

CSESCAPE

.WORD

CLEARED

"DEVICE FATAL” ERROR o S1

tAND EXIT

SUBTEST

ESCAPE

104410

.+10

: IF

NO ERROR,

sELSE,

REPORT

TRAP

CS$ERDF

.WORD
. WORD
.WORD

St
EMS08
ERRSO

002441

MOvB
JSR
ORB
TMPO.1

104460

AND EXIT

THIS

TEST

s INITIALIZE ORB FOR INPUT/QUTPUT

.+10

;IF NO ERROR,

tELSE,

CS$ERROR

TRAP

CSESCAPE

.WORD

AND EXIT

THIS

8CC
ERROR

.+10

s IF NO ERROR, PROCEED
sELSE, REPORT IT

€ SCAPE

TSy

7%:

8%:

.BYTE
.BYTE

252
252

tLOAD

PROCEED

sSETUP VALUE FOR ORB
;00 IT

R5,L00T1C

L10073%

REPORT IT

0377, TMPO.1
RS ,WRITE

JSR

TRAP

TEST

TRAP

AND EXIT

THIS

TEST

TIMER 2 1

CS$ERROR
CSESCAPE

.WORD

L10073

TRAP

CS$ERROR

TRAP

036114

CSESCAPE

L10074

TRAP

000377
004310

PROCEED

0377,TMP2.1
RS,WRITE

TSTY

L10073

INIT.

;GET ACR FOR LATER ERROR MESSAGES

004332

104410
004304
004537
252
252

TRAP

.WORD

104410

112737
004537
120000
002441
103003

L10073-.

PROCEED

EXIT

REPORT

CS$ESCAPE

.WORD

TRAP

104460

004360
112737
004537
120002
002445
103003

MODE

104460

004537
120013
002466
103003

.WORD

CSESCAPE

L10073%

CNDMAAO DMV11 MCTRL D'AG @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

004737
102002

1 ONE

MACRO M1200

15:22

PAGE

77 4

SEQ 0161

SHOT MODE

036332

1044°0
001556
103404

104455
000064
017305
005276
004737

22 FEB 84

036204

9s:

JSR
8vC
ESCAPE

PC,GETPB7
. +6
SuB

8CS
GEDF

93
EMS50W,ERR1

JSR

PC,.KICKT]

tGET "PB7”.,
IS IT SET?
1+ 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
52
.WORD
EMSOW
.WORD
ERR1
:IT_TAKES SO MLZH TIME TQO CHECK FOR (& MAYBE

103003

104460
104410
004236
000240
000240
000240
004537
120004
002450
103003

104410
004210
123737
001024
004537
120005
002452
103003

004064

104460
104410
004160
004537
120006
002454
103003
104460

104410
004140

004064

THIS ERROR

TIMER

AGAIN

THIS

TEST

ESCAPE

TST

;

ESCAPE
031614

THE

:IF NO ERROR, PROCEED
tELSE, REPORT IT

8CC

002450

OFF

.+10

ERROR

104460

EVEN REPORT)

KICK

BCC
ERROR

NOP
NOP
NOP
JSR
T1CL
TMP4

004064

AND EXIT

:
iNOW WAIT A LITTLE WHILE
:
:READ THE LOW COUNTER

R5,READ

.+10

: IF NO ERROR,

;ELSE,

REPORT

THAT

LET

SHOULD

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10073-.

T1CL

CHANGE

PROCEED
IT

TRAP

TST

CMPB
BNE
JSR
T1CH
THPS
8CcC
ERROR

TMP4 , 73
124
RS,READ

TRAP
.WORD
{MAKE SURE THE COUNTER IS DECREMENTING
;s IT IS, NOW SEE IF THE WIGH COUNTER IS
:GET T1CH FOR ERROR MESSAGE

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

AND EXIT

THIS

JSR
TiLL
TMP6
8CcC
ERROR

R5,READ

sGET

.+10

: IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

GEDF

EMS00D,ERRS0

sIT

TEST

T1LL FOR ERROR MESSAGE

AND EXIT
WASN'T

THIS

REPORT

TEST
THE

FRROR

CS$ERROR
CSESCAPE
L10073-.
TOO

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10073 |

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073 .

"DEVICE FATAL" ERROR o 53

CNDMAAO OMV11 MCTRL DIAG @1
TEST

VIA

TIMER &

031754
031756
031760
031762
5820 031764
5821 031770
5822 031773
5823 031776
5824 032000
5825 032002
032002
5826 032004
032004
032006
5827 032010
5828 032016
5829 032020
5830 032022
5831 032026
5832 032030
5833 032032
5834 032034
032034
5835 032036

104455
000065
016251
010762
012703
004537
120005
002452
103003

5836
5837
5838
5839
5840
5841
5842
5843
5844
5845
5846

5847
5848

032036
032040
032042
032046
032050
032052
032054
032054
032056
032056
032060
032062
032066
032070
032072
032074
032074
032076
032076
032100
032102

032102
032104
032106
032110
5849 032112
032112
032114
5850
5851
5852 032116
5853 032124

1 ONE

MACRO M1200

SHOT

000100
004064

12$:

G13
PAGE

MOV

JSR
T1CH

4100,R3
RS,READ

s INIT,

tREAD

TRAP
.WORD
.WORD
. WORD

CSEROF
53
EMSOD
ERRSO

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10073-.

TRAP

C$ERROR

TIMEOUT VALUE

THE

HIGH COUNTER

B8CC

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

ERROR

002452

031615

cMPB
BNE
508
JSR

004064

TMP5,84

AND EXIT

THIS

TEST

:DID IT CHANGE FROM THE LOADED VALUE?

17¢
R3,13$

RS,READ

i TES, PROCEED WITH TESTING
iNO,
IF NO VIMEOUT, TRY AGAIN
;GET IFR FOR ERROR HESSAGE

BCC
ERROR

.+10

:IF NO ERROR,

ESCAPE

TST

IFR

TMPD

;ELSE,

REPORT

AND

PROCEED

EXIT

THIS

TEST

TRAP

004064

JSR
TiLL

RS,READ

8cC
ERROR

.+10

ESCAPE

:GET

T1LL

FOR ERRUR MESSAGE

CS$ESCAPE

.WORD

L10073-,

TRAP

CSERROR

TRAP
. WORD

CSECSCAPE
L10073-.

TRAP

CSERROR

TMP6

004064

104410
004012

: IF NO ERROR, PROCEED

;ELSE,
:

8CC
ERROR

.+10

:IF NO ERROR,

ESCAPE

ISt

104455
000066
016305
010762
ESCAPE

002445

17¢:

MOV

JSR

8377,TMP2
.1
RS, WRITF

REPORT

TEST

PROCEED

AND EXIT

;ELSE,

:IN

THIS

T1LH FOR ERROR MESSAGE

;ELSE,

EMS0E ,ERRSO

EXIT

;GET

000377
004310

AND

R5,READ

GEDF

104410
001270

REPORT

JSR

TILH
TTMTMMP7

104460

112737
00453%7

TMPS

104460

104410
004032
004537
120007
002456
103003

15:22

SEQ 0162

104460

104410
004052
004537
120006
002454
103003

MODE

104460
104410
004104
123737
001037
077315
004537
120015
002472
103003

22 FEB

REPORT

THIS

THAT

TEST

HIGH COUNTER

TRAP
CSESCAPE
LWORD
L10073 .
ISN'T RUNNING

"DEVICE FATAL” ERROR & S4

THAT

CASE,

CAN'T

TRAP
CSERDF
.WORD
54
.WORD
EMS0E
.WORD
ERRSO
PROCEED WITH TESTING EITHER
TRAP
CSESCAPE
.WORD
L1004 .

1 INITIALIZE ORB FOR INPUT/QUTPUT

H13
CNDMAAO DMV11 MCTRL
TEST

VIA

5854
5855
5856
5857

032130
032132
032134
032136
032136
032140
032140
032142
032144
032152
032156
032160
032162
032164
032164
032166
032166
032170
032172
032176
032177

5858
5859
5860
5861
5862
5863
5864
5865
5866
5867
gggg

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

TIMER

DIAG 21
&

ONE

MACRO M1200
SHOT

ODRB
TMP2 .1
8CC
ERROR

104460

002440
004322

002441

000030
103003

104460
104410
003722
004537
001
000
004737
102002

036114

18¢:
19%:

036146

104410
001174

103426
004537
120006
002454
103003

004064

104460
104410
003660
004537
120007
002456
103003

004064

104460
104410
003640

104455
000067
016341
010762
104410
001116
004737

036332

15:22

PAGE

77-6

SEQ 0163

MOOE

120002
002445
103003

104410
003750
023737
004537
120000

22 FEB 84

20¢:

.+10

1 IF NO ERROR, PROCEED
;ELSE, REPORT 17

ESCAPE

TST

cMP
JSR
ORB
30
8CC
ERROR

TMPO,TMPO. ]
RS,WRITEI

;CLEAR PB7 B8Y WRITING

.+10

s+
(THIS CLEARS DTR £ RTS!
: IF NO ERROR, PROCEED

ESCAPE

TST

;

JSR
.BYTE
.BYTE

RS,LODT1C
1
O

tRE LOAD TIMER & 1 WITH A VALUE
sALMOST IMMEDIATE TIMEQUT
; (ADDRESS OF HIGH BYTE FOR T1C-H (ADDR 05))

JSR
8vC
ESCAPE

PC,GETT1
.+6
SuB

8cCs
JSR
TiLL

208
RS ,READ

;WAS "T1” SET BY THE ABOVE OPERATION?
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
C$ESCAPE
.WORD
L10074 .

AND EXIT

;ELSE,

REPORT

:IF NO ERROR,
sELSE, REPORT

ESCAPE

TST

;

R5,READ

;GET

.+10

: IF NO ERROR,
:ELSE, REPORT

ESCAPE

TST

GEDF

EMSOF ,ERRS0

PC.GETF8?

THIS

TEST

PROCEED
IT

AND EXIT

JSR
TiILH
TMP7
8CC
ERROR

JSR

INTO ORB

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10073 .

TRAP

CS$ERROR

ALSO)

TRAP
CS$ESCAPE
.WORD
L10073 .
WHICH CAUSE AN

;YES, OK -- CONTINUE ERROR CHECKING
;GET TiLL FOR ERROR MESSAGE

.+10

SUB

TEST

AND EXIT

TMP6
8CC
ERROR

ESCAPE

THIS

TEST

T1LH FOR ERROR MESSAGE

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10073 .

TRAP

C$ERROR

PROCEED
IT

AND EXIT

THIS

TEST

TRAP
.WORD
iNO,
BAD NEWS!
REPORT THE FAILURE
:
"DEVICF FATAL‘ ERROR © 55
TRAP
.WORD
.WORD
.MORD
:
AND GET OUT OF SUBTEST
TRAP
LWORD
;tGET 'PB7',
IS IT CLEARED?

CSESCAPE
L10073 .

CSERDF
55
EMSOF
ERRS0
CSESCAPE
L10074 .

CNDMAAO OMV11l MCTRL DIAG 21
TEST

VIA TIMER &

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

5911

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

MACRO M1200

1 ONE-SHOT

8vC

ESCAPE

001104

004064

104410
003550

104410
003520
004737
102002
104410
001000
103425
004537
120006
002454
103003

8CC
ERROR

.+10

ESCAPE

TST

036146

004064

40%:

s IF NO ERROR,

$ELSE,

PROCEED

IT'S ALREADY BEEN REPORTED

TRAP

: IF

NO ERROR,

AND EXIT THIS TEST

8CcC
ERROR

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IV

ESCAPE

TST

;

JSR
T1CH
TMPS

RS ,READ

AND EXIT

;ELSE,
:

+READ

CS$ERROR

THIS

TEST

TRAP

C$ERROR

TRAP

C$ESCAPE

TRAP

T1C-H

(ADDR 05)

SEE

.WORD
.WORD
.WORD

THIS

ISN'T CHECKED BECAUSE
PROCEED

ALMOST

ANYTHING)

ESCAPE

TST

;ELSE, REPORT IT
AND

EXIT

THIS

TEST

TRAP
TRAP

L10073-.

CS$ERDOF

56
EM50W
ERRSO

CLEARS

~T1“

C$ERROR
CSESCAPE

.WORD

L10073-.

TRAP

CS$ESCAPE

;PUT THE CURRENT “T1" VALUE INTO THE CARRY BIT
: IF NCO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
.WORD

;IF SET, READING TiCH DIDN'T CLEAR IT
;GET T1LL FOR ERROR MESSAGE

8CC

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TSY

;

ERROR

IT CAN BE

RS,READ

CS$ESCAPE

L10073

IT'S BEING SET BY TIMER 1 IN MODE O!
"DEVICE FATAL” ERROR & 56

: IF NO ERROR,

8Cs
JSR
T1LL

.WORD

.+10

.¢6
SUB

TRAP

:(THIS VALUE

PC,GETT1

L10074

TRAP

T1LH FOR ERROR MESSAGE

8CC

JSR
8vC
ESCAPE

C$ESCAPE

.WORD

PROCEED

;ELSE, REPORT IV

;GET

EMS0W, ERRS0

EXIT

:IF CLEARED, DORB IS STILL IN CONTROL OF IT
$1GET T1LL FOR ERROR MESSAGE

R5,READ

TMP6

004064

JSR

ERROR

104460
104410
003464
004537
120007
002456
103003

408
RS ,READ

GEDF

104460

. +6
SuB

TiLH
TMP7

104460

004064

PAGE

8CC
JSR

T1LL
TTMP6

104460

104455
000070
017305
010762
004537
120005
002452
103003

15:22

SEQ 0164

104410

104410
003570
004537
120007
002456
103003

MOOE

102002

103024
004537
120006
002454
103003

22 FEB

JSR

RS ,READ

;:GET

8CC

.+10

: IF

AND

EXIT

THIS

TEST

T1LH FOR ERROR MESSAGE

T1LH
TMP?

NO ERROR,

PROCEED

TRAP

L10074

- OK!

CS$ERROR

TRAP

CSESCAPE

.WORD

L1003

CNOMAAO DMV11 MCTRL
TEST

VIA

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

TIMER

DIAG &1
&

ONE

MACRO M1200

SHOT

FEB

J13
84

15:22

PAGE

ERROR
ESCAPE

104410
003444

GEOF

TST

EM50G,ERRS0

004064

21$:

002454

032176

004064

104455
000072
016450
010762
000456

104410
003314

036146

004064

28¢$

:BYPASS

JSR

RS ,.READ

;READ

BCC
ERROR

.+10

ESCAPE

TST

TILL
TMP6

T1LH
TMP?

104410
003362

104460

THIS TEST

TRAP

C$ERROR

TRAP

CSESCAPE

.WORD

L10073

TRAP

CSERDOF

:IF CLEARED!
BAD VIA CHIP!
"DEVICE FATAL"” ERROR & 57
H

CMPB
BEQ
JSR

104460

104410
000630
102415
004537
120007
002456
103003

AND EXIT

.WORD
.WORD

104460

004737
102002

REPORT IT

tELSE,

104455

000071
016406
010762
000507

104410
003412
123737
001415
004537
120007
002456
103003

SEQ 0165

MODE

104460

004537
120006
002454
103003

77-8

23s:

TMP6,18$

234

RS ,READ

THE REST OF

TiL-L

(ADDR

.WORD

THIS SECTION OF

:ELSE, REPORT
:

AND EXIT

THIS

TEST

TRAP

CS$ERRCR

TRAP

CSESCAPE

. WORD

€SCAPE

TST

;

GEDF

EMS0H, ERRSO

;ELSE,
H

AND EXIT

THIS

TEST

C$ERROR

TRAP
.WORD

CSESCAPE
L10073-.

TRAP

CSERDF

REPORT BAD LOAD OF TiL-L (ADDR 06)
DEVICE FATAL” ERROR & S8
.WORD
.WORD
.WORD

;BYPASS THE REST OF THIS SECTION OF

JSR
8vC
ESCAPE

PC,GETT1

;IS "T1' STILL SET?
: IF NO ERROR, PROCEED
tELSE,

IT'S ALREADY

BEEN REPORTED

244

RS,READ

s YES, ALL'S 0K
:GET T1LH FOR ERROR MESSAGE

8CcC
ERROR

.+10

: IF NO ERROR,

ESCAPE

TST

EMS0I,ERRSO

58
EMSOH
ERRSO

TESTING

TRAP

.WORD

EXIY

CSESCAPE

L10074

PROCEED

;ELSE, REPORT IY

tNO!

TRAP

B8R

GEDF

L10073

;CHECK T1L L (ADDR 06) AGAINST LOADED VALUE
: IF SAME, PROCEED
;GET T1LH FOR ERROR MESSAGE

; IF NO ERROR, PROCEED
:ELSE, REPORT IT

JSR
TiLH
7
TMP

ERR50

TESTING

": THIS SHOULD RETURN A 001
: IF NO ERROR, PROCEED

.+10

8Cs

S7
ENSOC

06)

8CcC
ERROR

.+6
SuB

AND EXIT THIS TEST

BAD VIR CHIP!

TRAP

CSERROR

TRAP

CSESCAPE

. WORD

L10073

MACRO M1200

CNDMAAO DMVi1 MCTRL DIAG #1
VIA

TIMER &

032600
032602
032604
032606
5959 032610
5960
5961 032612
5962 032616
5963 032620
5964 032622
5965 032624
032624
5966 032626
032626
032630
5967 032632
5968 032640
5969 032642

104455
000073
016536
010762
000433

TEST

032642
032644
032646
032650
5970 032652
5971
5972 032654
5973 032660
5974 032662
032662
032664
5975 032666
S976 032670

5977
5978
5979
5980
5981
5982
5983
5984

5985
5986
5987
5988

5989
5990

004537
120007
002456
103003

ONE

123737

001405

15:22

PAGE

IK13

004064

002456

036146

104410
000520
103404
104455
000075
016666
010762

032700
032704
032706
032710
032712
032712
032714
032714
032716
032720
032724
032726
032726
032730
032732
032734

004537
120004
002450
103003

032177

004537

TRAP

C$ERROR

TRAP

CSESCAPE

;BYPASS THE REST OF THIS SECTION
OF TESTING

JSR
TILH
TMP?
8CC
ERROR

R5,READ

;READ T1L-H (ADDR 07)

.+10

; IF NO ERROR,

ESCAPE

TST

: THIS

TTMMP7,19%
26%

EM50J,ERR50

SHOULD RETURN A 000

PROCEED

;ELSE, REPORT IT

AND EXIT THIS TEST

;CHECK TiL-H (ADDR 07)
s IF SAME, PROCEED

;ELSE,
H

TRAP

284

:BYPASS THE REST OF

JSR
8vC
ESCAPE

PC.GETTL

.+6
suB

28
EMSOK,ERRS0

.WORD
L10073
AGAINST LOADED VALUE

RS ,READ

THIS

004064

JSR
B8vC
ESCAPE

;ELSE,
sYES,

:NO!
:

PROCEED

IT'S ALREADY BEEN REPORTED

ALL'S

-- EXIT

TRAP

CSESCAPE

.WORD

L10074
-,

BAD VIA CHIP!
"DEVICE FATAL" ERROR & 61

TRAP

8CC
JSR

ALMOST

TST

294
R5,READ

61
EMSOK
ERRS0

ANYTHING)

+IF NO ERROR, PROCEED
;ELSE, REPORT IV

.+6
suB

CS$ERDF

;READ T1C-L (ADDR 04)
s+(THIS VALUE ISN'T CHECKED BECAUSE IT CAN BE

.+10

PC.GETT1

CS$ERDF

.WORD
60
.WORD
EM50J
.WORD
ERRSO
SECTION OF TESTING

"T1» STILL SET?

: IF NO ERROR,

ESCAPE

REPORT BAD LOAD OF T1L H (ADDR 07)
"DEVICE FATAL” ERROR & 60

004064

104410
000454

103024

59
EMS0I
ERRSO

.WORD
.WORD
.WORD

036146

CSERDF

.WORD
.WORD
WORD

CMPB
BEQ
GEDF

26%:

TRAP

B8R

a8cs
GEDF

104460

104410
003174
004737
102002

"DEVICE FATAL" ERROR & 59

104455

032670
03267
03264
032676

SEQ 0166

000074
016600
010762
000412
004737
102002

SHOT MODE

104460
104410
003262

22-FEB

AND EXIT

THIS TEST

TRAP

CSERROR

CS$ESCAPE

LWORD

L10073

TRAP

CSESCAPE

.WORD

L10074

:IS "T1” CLEARED NOW
: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
s YES,

;GET

ALL'S

T1LL FOR ERROR MESSAGE

CNDMAAO DMV11l MCTRL DIAG 41
27

VIA

TIMER &

5991
5992
5993
5994

032740
032742
032744
032746
032746
032750
032750
032752
032754
032760
032762
032764
032766
032766
032770
032770
032772
032774

120006
002454

TEST

5995

5996
5997
5998
5999
6000

6001

6002

6003
6004
6005
6007
6008
6009
6010
6011

6012
6013
6014

6015
6016
6017
6018
6019
6020
6021

6022
6023
6024
6025
6026
6027

032774
032776
033000
033002

033004
033010
033012
033014
033016
033016
033020
033020
033022
033024
033030
033032
033032
033034
033036
033040
033044
033046
033050
033052
033052
033054
033054
033056
033060
033064
033066
033070
033072
033072
033074

15:22

PAGE

L13
77

SEQ 0167
TiLL
TMP6

104460

104410

120007
002456
103003

22-FEB 84

ONE-SHOT MODE

103003

003140
004537

MACRO M1200

004064

104460
104410
003120

8CC
ERROR

.+10

: IF NO ERROR,

ESCAPE

TST

sELSE,

PROCEED

REPORT IT

AND EXIT THIS TEST

JSR

RS,READ

:GET T1LH FOR ERROR MESSAGE

8CC
ERROR

.+10

s IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

TI1LH
TTMMP7

GEOF

EM50C,ERRS50

104455

AND EXIT

THIS TEST

tNO!
:

104410
003070
004737
102002

104410
000350
103426
004537
120006
002454
103003

ESCAPE
036146

004064

104460

;:RE-WRITE

.+10

: IF NO ERROR,

JSR
8vC
ESCAPE

8Cs

PC.GETT1

. +6
SuUB

T1C H (ADDR 05)

AND EXIT THIS TEST

:IS "T1' SET AGAIN
: IF NO ERROR,

;ELSE,

TRAP

C$ESCAPE

PROCEED

8CcC

.+10

+ IF NO ERROR,

ESCAPE

TSY

;ELSE,

TO SET

TRAP

IT'S ALREADY BEEN REPORTED

RS ,READ

TILH

C$ERRCR

.WORD

JSR

TRAP

L10073

L10073-.

CSERDF
62
EMSQC
ERRS50

AGAIN

C$ERROR

CS$ESCAPE

L10073

ESCAPE

-- EXIT

C$ESCAPE

.WORD

L10074

TRAP

CS$ERROR

TRAP

CSESCAPE

AND EXIT

THIS

sGET

.+10

; IF NO ERROR, PROCEED
;ELSE, REPORT IT

TEST

T1LH FOR ERROR MESSAGE

AND

PROCEED

REPORT IT

RS,READ

;

TRAP

.WORD

L10073-,

TMP?7

8CC
ERROR

PROCEED

REPORT IT

:YES, ALL'S WELL (AGAIN?)
;GET TiLL FOR ERROR MESSAGE

ERROR

004064

INTO

324

TILL
TMP6

104460
104410
003034
004537
120007
002456
103003

RS,WRITE

TST

CS$ESCAPE

.WORD

TRAP
.WORD
.WORD
.WORD

;ELSE,

104460

TRAP

BAD VIA CHIP!
"DEVICE FATAL" ERROR # 62

016203
010762

004310

C$ERROR

.WORD

000076

004537
120005
002453
103003

TRAP

EXIT

THIS

TEST

TRAP

CS$ERRCR

CNDMAAO DMVl MCTRL DIAG a1t
TEST

VIA

033074
033076
6028 033100
033100
033102
033104
033106

6029 033110
033110
033112
6030
6031
6032
6033 033114
6034 033122
6035 033.26
6036 033130
6037 033132
6038 033134
033134
6039 033136
033136
033140
6040 033142
6041 033146
6042 033150
033150
033152
6043 033154
6044 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
033216
033220
033222
033224
6057 033226
033226
033230

TIMER

ONE

MACRO M1200
SHOT

22-FEB-84

M13
15:22

PAGE

77-11

SEQ 0168

MODE

104410
003014

GEOF

EMSOL , ERRS0

104455
000077
016730

iNO!

SOMETHING WENT

WRONG!

“"DEVICE FATAL"” ERROR # 63

AND EXIT FROM THIS

TRAP
.WORD
.WORD

010762

.WORD

104410
000272

1127.°
004537
120006
002455
103003

000125
004310

104460
104410
002752
004737
102002
104410
000232
103426
004537
120006

036146

004064

002454

103003
104460

104410
002716
004537
120007
002456
103003

104460
104410
002676
104455
000100
017012
010762
104410
000154

TRAP
.WORD
REPQRT IT

004064

002455

32%:

C$ERDF
62
EMSOL
ERRS0

ESCAPE

SUB

MOvB
JSR
TILL
TMP6+1
8CC
ERROR

9125, TMP6+1
RS,WRITE

;USING A DIFFERENT VALUE
;:RE LOAD T1iL-L (ADDR 06)

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR
8vC
ESCAPE

PC,GETT1
.+6
SuB

8CS
JSR
TLL
TMP6
8CC
ERROR

33¢
RS,READ

:IS "T1” STILL SET?
:IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CS$ESCAPE
.WORD
L10074 .
;YES, ALL'S STILL OK
:GET TiLL FOR ERROR MESSAGE

.+10

;IF NO ERROR, PROCEED
;sELSE, REPORT IT

ESCAPE

TST

JSR
TILH
TMP7
BCC
ERROR

RS,READ

;:GET

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

GEDF

EMSOM, ERRS0

tNO!

ESCAPE

SUB

AND EXIT

THIS

SUBTEST
TRAP
.WORD

CS$ESCAPE
L10073-,

TEST

THIS

TEST

T1LH FOR ERROR MESSAGE

CS$ESCAPE
L10074-.

55 HEX.,

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10073-.

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

L10073-,

TRAP

C$ERROR

TRAP
.MWORD
REPORT IT

C$ESCAPE
L10073 .

AND EXIT

THIS

SOMETHING WENT

TEST

WRONG!

“DEVICE FATAL-

ERROR # 64

AND EXIT FROM THIS

TRAP
.WORD
.WORD
.WORD
SUBTEST
TRAP
.WORD

CSEROF
64
EMSOM
ERRS0
C$ESCAPE
L10074 .

CNDMAAO OMV11 MCTRL DIAG @1
TEST

MACRO M1200

VIA

TIMER &

1 ONE-SHOT MODE

033232
033240
033244
033246
033250
033252
033252
6067 033254
033254
033256
6068 033260
6069 033264
6070 033266
033266
033270
6071 033272
6072 033274
6073 033300
6074 033302
6075 033304
6076 033306
033306
6077 033310
033310
033312
6078 033314
6079 033320
6080 033322
6081 033324
6082 033326
033326
6083 033330
033330
033332
6084 033334
6085 033340
6086 033342
6087 033344
6088 033346
033346
6089 033350
033350
033352
6090 033354
6091 033360
6092 033362
6093 033364
6094 033366
033366
6095 033370
033370
033372
6096 033374

112737
004537
120005
002453

000125
004310

6058
6059
6060
6061
6062
6063
6064
6065
6066

002453

22-FEB-84

15:22

PAGE

N13

77-12
SEQ 0169

33$:

103003

:AND USING THE SAME VALUE AGAIN (55 HEX),

RS, WRITE

+NOW LOAD

. +10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

TST

;

104460
104410
002634
004737
102002

ESCAPE

036146

104410
000114

103044
004537
120004
002450
103003

004064

104460
104410
002520

THIS

{ELSE,

CS$ERROR

TRAP
.WORD

CSESCAPE
L10073 .

PROCEED

IT’'S ALREADY BEEN REPORTED -- EXIT

8cC
ERROR

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

;

+IT WAS,

;GET

TRAP
TEST

:"T1" SHOULD NOW BE CLEARED

: IF NO ERROR,

344
RS5,READ

ALL'S WELL

TRAP
.WORD

THAT END‘S WELL

T1CL FOR ERROR MESSAGE

AND

EXIT

THIS

JSR

RS,READ

:GET

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IV

ESCAPE

TST

T1CH
TMPS

004064

TRAP
TEST

T1CH FOR ERROR MESSAGE

AND EXIT

THLS

TEST

JSR

RS.READ

:GET T1LL FOR ERROR MESSAGE

8CcC
ERROR

.+10

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

ESCAPE

TST

TILL
TMP6

104460
104410
002540
004537
120007
002456
103003

EXIT

TRAP

104460

104410
002560
004537
120006
002454
103003

PC.GETT1
. +6
sSu8

AND

(ADDR 05)

8CC
JSR

T1CL
TMP4

104460
104410
002600
004537
120005
002452
103003

JSR
8vC
ESCAPE

T1C-H

AND EXIT

THIS

TEST

JSR
TiLH

RS,READ

:GET

8CC

.+10

: IF NO ERROR, PROCEEUL
;ELSE, REPORT IT

ESCAPE

TST

T1tH FOR ERROR MESSAGE

THINK!?)

C$ERROR
CSESCAPE

.WORD

L10073-.

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10073-.

TRAP

C$ERROR

TRAP

004064

CS$ESCAPE
L10074-.

C$ESCAPE

.WORD

L10073

TRAP

C$cRROR

TMP7

ERROR

AND

EXIT

THIS

TEST

TRAP

GEOF

EMSON, ERRSO

. WORD

i IT WASN'T!
SOMETHING WENT WRONG!
:
"DEVICE FATAL" ERRNR & 65

CSESCAPE

L10073-,

REPORT

CNOMAAO OMV11 MCTRL DIAG o}
TEST

VIA

033374
033376
033400
033402

6097
6098 033404
033404
033404
6099
6100
0101
6102
6103 033406
033406
033406
6104 033410
6105 033414
6106 033416
033416
6107 033420
6108
6109
6110
6111
6112

033420
033422

033424
033430
033432
033434
033436
033436
6113 033440
033440
6114 033442

TIMER

ONE

MACRO M1200
SHOT

PAGE 77 18
S

MODE

104455
000101
017054
010762

TRAP
.WORD
.WORD
.WORD
344 :

ENOSUB

TRAP
CseSuB
‘.-..-............l.............I.l.........l...-.‘...l...-'.'......‘l.l...'..
i

TEST

TIMER

USING ONE

SHOT

MODE

WITH OUTPUT

ON PB7 ENABLED.

8GNSUB
104402
004737
103003

127.2:
003762

104460

104410
002470

004537
000000
000200
103003

004660

104460
104410
002450

1s:

JSR
8cC
ERROR

PC,MSTCLR
1

1 INIT DMV £ ENTER M LOOP
1 IF NO ERROR, PROCEED WITH
tELSE, REPORT ERROR

ESCAPE

TST

JSR
0
8IT1?
8CC
ERROR

RS,INITT]

ESCAPE

TST

.+10

& EXIT

TEST

s INITIALIZE TIMER o 1
3
O =e> LATCHES
;
MODE 2 € ~T1'
1 IF NO ERROR, PROCEED
$ELSE, REPORT IV

INT.

TEST

AND EXIT

THIS

TRAP

033452
033454
6120 033456
6121
6122 033460
6123 033464
6124 033466
6125 033470
6126 033472
033472

6127 033474

033474
033476
033500
033504
033506
033510
033512
033512

£133 033514

004737
102002

036146

104410
002434
103123
004537
120013
002466
103003

004064

104460
104410
002414
004537
120004
002450
103003
104460

004064

CsBsuB

TESTING
TRAP

CIERRCR

TRAP
.WORD

CSESCAPE
L10073 .

ENABLE

FLAG CLEARED

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10073 .

i MODE 2 IS ONE SHOT MODE WITH OUTPUT ON PB7 CONTROLED Br

6117 033444
6118 033450
6119 033452

CIERDF
65
EMS0ON
ERRSO

L10074:

104403

g}iz

6128
6129
6130
6131
6132

022 FEB B84 15:27

Bl4

TIMER 1

JSR
8vC
ESCAPE

PC.GETT]
.+6
SuB

$IS “T1
SET?
1 IF NO ERROR, PROCEED
tELSE, IT'S ALREADY BEEN REPORTED

8ccC

JSR
ACR
TTMPB
8CC
ERROR

RS ,READ

tNO, GOOD.
sYES, REPORT IT'S NOT BEING CLEARED @
1GET ACR FOR ERROR MESSAGE

.+10

1IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

TST

;

EXIT
TRAP
CSESCAPE
.WORD
L1007S .

AND EXIT

THIS

JSR
T1CL
TMP4Q
8ccC
ERROR

RS,READ

tGET

.+10

1 IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

151

TEST

T1CL FOR ERROR MESSAGE

AND EXIT

THIS

TEST

INIT,

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L1007%-,

TRAP

CSERROR

€0

o170

CNDMAAO OMv1l MCTRL DIAG o1}
TEST

VIA TIMER &

033514
033516
6134 033520
6135 033524
6136 033526
6137 033530
6138 033532
033532
6139 033534
033534
033536
6140 033540
6141 033544
6142 033546
6143 033550
6144 033552
033552
6145 033554
033554
033556
6146 033560
6147 033564
6148 033566
6149 033570
6150 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

033610
033616
033622
033624
033626
033630
033630
033632
033632
033634
033636
033642
033644
033644
033646
033650

6166
6167
6168 033652
6169 033656

104410
002374
004537
120005
002452
103003

ONE

MACRO M1200

SHOT

15:22

PAGE

Cld
77

14
SEQ 0171
TRAP

004064

JSR

RS,READ

BCC
ERROR

.+10

ESCAPE

T1CH
TMPS

tGET

T1CH FOR ERROR MESSAGE

1IF NO ERROR,

$ELSE, REPORT
:

004064

103003

104460
104410
002314

AND EXIT

THIS

TESTY

1GET

8CC
ERROK

.+10

:IF NO ERROR, PROCEED
sELSE, REPORT 1T

ESCAPE

TST

TiLL FOR ERROR MESSAGE

AND EXIT

JSR
TILH
TTMMP?
ecc
ERROR

RS ,READ

tGET

.+10

s IF

ESCAPE

TST

THIS

TEST

T1LH FOR ERROR MESSAGE
NO ERROR,

REPORT

;ELSE,

EMS0A,ERRSO

L10073

TRAP

CSERROR

TRAP
. WORD

L10073

TRAP

CSERROR

tREPORT

THIS

TEST

“T1' NOT

CLEARED 8

INIT,

.WORD

"DEVICE FATAL" ERROR @ 66

TRAP

000002
004310

002453

MOVB

JSR

92, TMPS. 1
RS, WRITE

8cC

.+10

T1CH
TMPS.
1

ERROR

104460

ESCAPE

157

104410
002242
103026
004064

JSR
8vC
ESCAPE

PC,GETT]
.*6
U8

8ccC

JSR

RS ,READ

T1CH

C$ESCAPE
.

CS$ESCAPE

L10073-.

CSERDF

. WORD
.WORD
. WORD

66
EMSOA
ERRSO

TRAP

CSERROR

: INIT TIMER @ 1 By WRITING INTO
:T1C-H (ADDR 05)
s IF

NO ERROR,

PROCEED

1ELSE, REPORT IT
$

AND EXIT

THIS

TEST

TRAP

036146

AND EXIT

CSESCAPE

. WORD

TRAP

104455

004537
120005

CS$ERROR

PROCEED

000102
016067
010762

104410
002256
004737
102002

TRAP

RS,READ

GEOF

112737
004537
120005
002453
103003

L10073

PROCEED

JSR

TiLL
TMP6

CSESCAPE

. WORD

TRAP

104460
104410
002334
004537
120007
002456

MODE

104460
104410
002354
004537
120006
002454
103003

22 FEB

$IS

1 IF

“T1” SE'?

NO ERROR,

tELSE,

. WORD
PROCEED

IT'S ALREADY BEEN REPORTED

.WORD

GOOD.

1GET

T1CH FOR ERROR MESSAGE

1YES,

REPORT

IT'S

NOT

BEING

-- EXIT

TRAP

sNO,

CSESCAPE

L10073

CLEARED

CSESCAPE

L1007S
INIT.

CNDMAAO DMV1I1 MCTRL DIAG @1
TEST

VIA

TIMER @

6170 033660
6171 033662
6172 033664
033664
6173 033666
033666
033670
6174 033672
6175 033676
6176 033700
ol?? 033702
6178 033704
033704
6179 033706
033706
033710
6180 033712

002452
103003

033712
033714
033716
033720
6181 033722
033722
033724
6182

6183
6184
6185
6186
6187
6188
6189
6190
6191

6192

6193
6194
6195
6196
6197

6198

6199
6200
6201
6202
6203

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
£204 034014
034014
034016

1 ONE

MACRO M1200

SHOT

D14
84

15:22

PAGE

15
SEQ 0172

MODE
TMPS

8cC

.+10

1 IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPE

ERROR

104460
104410
002222
004537
120007

22 FEB

AND

EXIT

THIS

TRAP
TEST

TRAP

004064

JSR

RS ,READ

8CcC

.+10

TILH
IMP7

002456

103003

ERROR

104460

ESCAPE

104410

sGET
:IF

T1LH FOR ERROR MESSAGE
NO ERROR,

TST

104455
000103
016135
010762
ESCAPE

AND EXIT

THIS

TEST

003762
000377
004310

104460

104410

002074

;REPORT

"T1"

"DEVICE FATAL’'

NOT

CLEARED

INIT,

. WORD

tAND

EXIT

002445

JSR

PC,MSTCLR

ERROR @ 67
.WORD
. WORD
.WORD

SUBTEST

JSR
ODRB

0377,TMP2.1

RS, WRITE

s INIT DMV & ENTER M-LOOP AGAIN
s INITIAL VALUE FOR DDRB
iLOAD IT7

8cC

.+10

: IF NO ERROR,

MOve

CSESCAPE

L10073-.

CSERDF

67
EMS08
ERRSO

CS$ESCAPE

. WORD

L1007S-,

TRAP

CSERROR

TMP2.1

ERROR

ESCAPE

sELSE,

TST

REPORT

PROCEED

AND EXIT

THIS

TESTY

TRAP

004660

104460
104410
002114
004537
120013
002466
103003

C$ERROR

TRAP

104460

104410
002134
004537
000000
€00200
103003

TRAP

PROCEED

TRAP

104410
002164

004737
112737
004537
120002
002445
103003

L1CO73-.

TRAP

EM508,ERRSO

CS$ESCAPE

. WORC

sELSE, REPORT IT

002202

GEDF

CSERROR

JSR
0
BIT?
8CC
ERROR

R5,INITT]

ESCAPE

TSt

tRE

INITIALIZE

MODE 2 £ CLEARED
NO ERROR, "ROCEED

.+10

: IF

FOR

$tELSE,
:

THE

MAXIMUM

REPORTY

.WORD

TIMER
"“T1"

INT.

FLAG

AND EXIT

THIS

TEST

TRAP

JSR

RS ,READ

. WORD
sGET ACR FOR FUTURE ERROR MESSAGES

8cC

.+10

s+ IF

ACR
TMPB

ERROR

ESCAPE

NO ERROR,

tELSE,

TST

REPORT
AND

TIMEQUT

TRAP

004064

CSESCAPE

L10073

CSERROR
CSESCAPE

L10073

PROCEED

EXIT

TRAP
THIS

TEST

iRAP

.WORD

CSERROR

CSESCAPE

L10073

CNDMAAO DMV11 MCTRL DIAG @1
TEST

MACRO M1200

VIA

TIMER @

1 ONE-SHOT

6205 034020
6206 034024
6207 034025
6208
6209
6210
6211 034026
6212 034032

004537

036114

6213 034034
024034
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 034102
6228 034106
6229 034110
6230 034112
6231 034114
034114
6232 034116
034116
034120
6233 034122
6234 034126
6235 034130
6236 034132
6237 034134

034134
6238 034136
034136
034140
6239 034142
6240 034146
6241 034150
6242 034152
6243 034154
034154
6244 034156
034156
034160

252
252

004737
102002

104410
002052
103070
004537
120015
002472
103003

004064

104460
104410
001732

JSR
.BYTE

RS,LODTIC
252
252

tLOAD TIMER o 1

JSR
8vC
ESCAPE

PC,.GETPB7
. +6

sGET PB7",
IS IT CLEARED?
s IF NO ERROR, PROCEED

.BYTE

SUB

1ELSE,

IT'S ALREADY BEEN REPORTED

8ccC
JSR

93
R5,READ

:1T IS, GOOD
:GET IFR FOR ERROR MESSAGE

8CC
ERROR

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR
T1CL
TMP4

8CC

ERROR

ESCAPE

AND

EXIT

THIS

RS,READ

:GET

.+10

:IF NO ERROR,
;ELSE,

REPORT
AND

004064

JSR

RS,READ

;GET

8CC

.+10

: IF

T1CH
TTMMPS

ERROR

TRAP

C$ERROR

ESCAPE

1ST

;

REPORT
AND

L10073

THIS

TRAP

CSERROR

TEST

JSR

CSESCAPE

L10073-.

TRAP

CSERROR

PROCEED

EXIT

THIS

RS ,READ

1GET

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
{ELSE, REPORT IT

ESCAPE

1ST

T1iLL

. WORD

TEST

TRAP

004064

CS$ESCAPE

.WORD

EXIT

ERROR,

PROCEED

T1CH FOR ERROR MFSSAGE

;ELSE,

CSESCAPE

L10075

TEST

T1CL FOR ERROR MESSAGE

EXIT

. WORG

TRAP

T1LL FOR ERROR MESSAGE

CSESCAPE

.WORD

L10073

TRAP

CS$ERROR

TRAP

.WORD

CSESCAPE
L10073 .

TRAP

CSERRCR

TMP6

104460

104410
001752
004537
120007
002456
103003

TRAP

104460
104410
001772
004537
120006
002454
103003

SEQ 0173

IFR
TMPD

104460

104410
002012
004537
120005
302452
103003

E14
PAGE

TRAP

104460
104410
002032
004537
120004
002450
103003

15:22

MODE

7%:
as:

036332

22-FEB-84

004064

JSR

RS5,READ

1GET

8CC

.+10

; IF

TILH
TMP7

ERROR

ESCAPE

AND EXIT

;

TEST

T1LH FOR ERROR MESSAGE

NO ERROR,

;ELSE,

THIS

REPORT
AND

PROCEED

EXIT

THIS

TEST

TRAP

.WORD

CSESCAPE

L10073-.

CNDMAAO OMV11l MCTRL
TEST 27

DIAG @1

MACRO M1200

0249

6250
6251
6252
6253
6254
6255
6256
6257
6258

6259
6260
6201

6266

6267
6268
6269
6270
6271
6272

6273

6274
6275
6276
6277
6278

15:22

PAGE

SEQ 0174
GEDF

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

104455
000104
017240
010762
004737
103003

034254
034256
034260
034262
034264
034270
034272
034272
034274
034274
034276
034300
034304
034310
034312
034314
034316
034316
034320
034320
034322
034324

104455
000105
016251
010762
004737
103003

6262 034254

6263
6264
6265

22 FEB

VIA TIMER & 1 ONE-SHOT MODE

6245 034162

6246
6247
6248

F14

034332
034334
034336
034342
6279 034344

036204

104460
104410
001706
004737
004737
012703
004537
120004
002450
103003

005032
005032
000100
004064

:
10§

9s:

104410
001652
123737
001013
077315

036204

104460
104410
001614
012703
004537
120005
002452
103003

C$ERDF

.WORD
.WORD
. WORD

68
EMS0V
ERRSO

TRAP

CS$ERROR

ESCAPE

TST

JSR
JSR

+ IF NO ERROR, PROCEED
;ELSE, REPORT IT

AND EXIT

THIS TEST

JSR

PC,STALL
PC,STALL
€100,R3
R5,READ

8CC

.+10

;: IF NO ERROR, PROCEED
sELSE, REPORT IT

ESCAPE

TST

MOV

& PRINT,

START

TRAP
THE

.WORD

TIMER

000100
004064

12¢:
13s$:

PROCESS

DELAY FOR A LITTLE WHILE SO IT CAN DECREMENT

AND EXIT

SURE

THIS

TMP4, 74

tMAKE

124
R3.9¢
EM500,ERRS0

sIT IS, NOW SEE IF
3@ NO:

NOT

64.

002452

004064

034025

CSERROR

TRAP

C$ESCAPE

IS DECREMENTING
TRY

sIT WASN'T -- REPORT THE ERROR

TRAP

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TS7T

TIMER

AND

AGAIN

EXIT

THIS

s INIT,

8CC
ERROR

.+10

: IF NO ERROR, PROCEED
tELSE, REPORT IT

ESCAPe

TST

BNE
S08
JSR
TILL
TMP6

TMPS5,8$

17¢

R3,13s
R5,READ

THE

69
EMS0D
ERRS0

TEST

TRAP

C$ERROR

L10073

TRAP

CS$ERROR

TRAP

CSESCAPE

HIGH COUNTER

AND

EXIT

THIS

iy
TEST

;OID IT CHANGE FROM THE LOADED VALUE?
1 YES,

PROCEED

iNO,

IF NO TIMEOUT,

T1LL

CSESCAPE

. WORD

.WORD

:GET

C$ERDF

.WORD
.WORD
.WORD

ERRQOR MESSAGE PRINTED

TIMEOQUT VALUE

;READ

AGAIN

"DEVICE FATAL" ERROR 9 69

L10073

THE HIGH COUNTER IS TOO

;RESTART

CMPB

TRAP

. WORD

ATTEMPTS,

124

TiCH
TMPS

THEN

TEST

THE COUNTER

PC,KICKT1

JSR

AND

1@ INIT, "REPEAT” VALUE
;READ THE LOW COUNTER

JSR
8CC
ERROR

MOV

CS$ESCAPE

L10073

;

TRAP

104460
104410
001570
123737
001027
077315
004537
120006
002454

TRAP

tBECAUSE THE ERROR MESSAGE TAKES SO LONG TO

cMPB
BNE
S08
GEDF

034024

STILL(?) SET!
"DEVICE FATAL” ERROR ¢ 68

PC,KICKT1
.+10

ERROR

002450

$NO,
3

JSR
8CC
ERROR

T1CL
TMP4

104460

EMS0V,ERRS0

WITH

TESTING

TRY

AGAIN

FOR ERROR MESSAGE

L10073

CNDMAAD OMV11l MCTRL DIAG 21
VIA

TIMER &

6280 034346
6281 034350
034350
6282 034352
034352
034354
6283 034356
6284 034362
6285 034364
6286 034366
o287 034370
034370
6288 034372
034372
034374
6289 034376

103003

TEST

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

MACRO M1200

ONE-SHOT

15:22 PAGEG'NJ- ?8

SEQ 0175

MOOE

104460

104410
001536
004537
120007
002456
103003

22-FEB

004064

8cC
ERROR

.+10

s+ IF NO ERROR,

ESCAPE

TST

THIS

:GET

8CC

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

;

GEOF

EM50E
, ERRS0

TMP7

ERROR

104410
001516

AND EXIT

RS,READ

JSR
TILH

104460

PROCEED

;ELSE, REPORT IT

104455

TEST

T1LH FOR ERROR MESSAGE

AND

;ELSE,
H

EXIT

THIS

TEST

112737

004537
120002
002445

000377
004310

002445

104410
001432
103446
004537
120004
002450
103003

TRAP

CS$ERROR

TRAP
HORD

CSESCAPE
L10073 .

036114

036146

004064

18$:
19¢:

RUNNING

TRAP

CS$ERDF

.WORD
.WORD
.WORD

70
EM50E
ERRS50

TRAP

CS$ESCAPE

L10075-.

.+10

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

TST

JSR
.BYTE
BYTE

R5,L00T1C
1
0

.WORD
L10073-.
;RE-LOAD TIMER & 1 WITH A VALUE WHICH WILL
H
CAUSE AN ALMOST IMMEDIATE TIMEQUT
; (ADDRESS Of HIGH BYTE FOR T1C-M (ADOR 05

JSR
8vC
ESCAPE

PC,GETT1
. +6
suB

AND

EXIT

THIS

TEST

;WAS "T1" SET By THE ABOVE
: IF NO ERROR, PROCEED

;ELSE,

TRAP

CS$ERROR

TRAP

CSESCAPE

OPERATION?

IT'S ALREADY BEEN REPORTED

TRAP

CSERROR

$YES, OK CONTINUE ERROR CHECKING
;GET T1CL FOR ERROR MESSAGE

8CC

.+10

; IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR

RS ,READ

H
;GET

AND EXIT THIS TEST
T1CH FOR ERROR MESSAGE

CSESCAPE

L10075

20$
RS ,READ

T1CL
TMP4

EXIT

.WORD

8CsS
JSR

ERROR

004064

sSETUP DDRB FOR DESIRED DIRECTION OF ORB

ESCAPE

104460
104410
001412
004537

L10073

0377, TMP2.1
RS,WRITE

17%:

104460

004737
102002

C$ESCAPE

.WORD

103003

104410
001454
004537
001
000

TRAP

;IN THAT CASE, WE CAN'T PROCEED WITH TESTING EITHER

ESCAPE

104410
001500

CS$ERROR

REPORT THAT HIGH COUNTER ISN'T
"DEVICE FATAL" ERROR & 70

000106

016305
010762

TRAP

.WORD
.

CSESCAPE

L10073

CNDMAAO OMV11 MCTRL DIAG &1
TEST

6316
6317
6318
6319
6320

6321
6322
0323
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

VIA

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

TIMER

H14
MACRO M1200

ONE-SHOT

T1CH
TMPS

103003

004064

104460

004064

104410
001332

104460

ESCAPE

TST

036332

20%:

1+ IF NO ERROR,

;ELSE,

PROCEED

I7T

REPORT

AND EXIT THIS TEST

;

;:GET T1LL FOR ERROR MESSAGE

.+10

:IF NO ERROR, PROCEED
{ELSE, REPORT IT

ESCAPE

TST

AND EXIT THIS TEST

JSR

RS5,READ

;:GET T1LH FOR ERROR MESSAGE

8CC
ERROR

.+10

:IF NO ERROR, PROCEED

ESCAPE

TST

;

JSR

8vC

EMSOF ,ERRS0

suB
PC.GETPB7
.+6

suB

;ELSE,

TEST

REPORT

TRAP

CS$ERROR

TRAP

.WORD

CSESCAPE
L10073 .

TRAP

CS$ERROR

TRAP

L10073

TRAP

CS$ERROR

TRAP

CSESCAPE
L10073-.

.WORD

THE FAILURE

TRAP

AND

GET

QUT

SUBTEST

.WORD
.WORD
. WORD

TRAP

;GET

"PB7",

s IF NO ERROR,

;ELSE,

.WORD

IT SET?

PROCEED

CS$ESCAPE

. WORC

"DEVICE FATAL" ERROR & 71

.+10

: IF NO ERROR,

ESCAPE

TST

CSERDF
71

EMSOF
ERRSO

CSESCAPE
£10075-.

CONTINUE

:
CHECKING

‘T1"

- EXIT
TRAP
CSESCAPE
L10075 .
. WORD

:GET T1CL FOR ERROR MESSAGE
PROCEED

;ELSE, REPORT IT

AND EXIT THIS TEST
,

RS ,READ

tGET

.+10

: IF NO ERROR,

T1CH FOR ERROR MESSAGE

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-,

TRAP

C$ERROR

TMPS

8CC
ERROR
ESCAPE

1IT'S ALREADY BEEN REPORTED

8CC
ERROR

T1CH

THIS

BAD NEWS!

:YES,

JSR

AND EXIT

:NO,

REPORT

41
RS ,READ

8Cs
JSR
TiCL
TMP4

004064

SEQ 0176

RS,READ

ESCAPE

004064

77-19

JSR
TiLL
TMP6
B8CC
ERROR

ESCAPE

104460
104410
001262
004537
120005
002452
103003

.+10

GEOF

104455
000107
016341
10762

104410
001302
103445
004537
120004
002450
103003

PAGE

T1LH
TMP7

104460

104410
001314
004737
102002

15:22

B8CC

ERROR

104460

104410
001352
004537
120007
002456
103003

B84

MODE

120005
002452

104410
001372
004537
120006
002454
103003

22-FEB

sELSE,
:

PROCEED

REPORT IT.
AND

EXIT

THIS

TEST

CNDMAAO DMV11l MCTRL DIAG a1
TEST

6351
6352
6353
6354
€355
6356

6357
6358
6359
6360
6361
6362
6363

6364
6305
6366
6367
6368
6369

6370

6371
6372
6373

6374
6375
6376
6377
6378
6379
6380

6381
6382
6383
6384
6385
6386

VIA

TIMER &

034646
034650

104410
001242
004537

034A52

034656
034660
034662
034664
034664
034666
034666
034670
034672
034676
034700
034702
034704
034704
034706
034706
034710
034712
034712
034714
034716
034720
034722
034724
034730
034732
034734
034736
034736
034740
034740
034742
034744
034750
034752
034752
034754
034756
034760
034764
034766
034770
034772
0%4772
034774
034774
034776
035000
035004
035006
035010
035012

120006

MACRO M1200

15:22

PAGE

004064

104460

004064

JSR
TILL
TMP6
8CC
ERROR

RS ,READ

$GET TiLL FOR ERROR MESSAGE

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

;

JSR

R5,READ

8CC

.+10

ESCAPE

TST

TI1LH
TMP7?

103003

ERROR

104460
104410
001202

GEDF

EM50S,ERRS50

104455

120005

004064

414

002452

103003

036146

104410
001134
103435

004537
120004

11¢:

004064

002450

103003

104410

001114

004537
120006
002454
103003

004064

EXIT

THIS

; IF NO ERROR,

AND EXIT THIS TEST

H
;NO!
:

C$ERROR

TRAP
.WORD

L10073-.

TRAP

CS$ERROR

C$ESCAPE

TRAP

CSESCAPE

.WORD

L10073-.

TRAP

CSERDF
72

EMSOS
ERRSO

€ EXIT THIS SECTION OF SUBTEST
H
sREAD T1C-H (ADDR 0S) TO SEE IF IT CLEARS “Ti”
s (THIS VALUE ISN'T CHECKED BECAUSE IT CAN BE

: IF NO ERROR, PROCEED
:ELSE, REPORT IT

ESCAPE

TST

ALMOST

ANYTHING)

AND

EXIT

THIS

TEST

JSR
8vC
ESCAPE

PC,GETIL
11$
suB

:PUT

8cs

219

sIF

JSR

RS ,READ

BAD VIA CHIP!
:IF CLEARED!
;GET T1CL FOR ERROR MESSAGE

BCC

.+10

s IF NO ERROR,

ESCAPE

TST

: IF

THE

CURRENT

NO ERROR,

tELSE,

“T1“

PROCEED

VALUE

INTO

TRAP

CSERROR

TRAP

CSESCAPE
L10073 .

.WORD
THE

SET,

CARRY

BIT

EXIT
CSESCAPE
L1007S .
. WORD

IT'S ALREADY BEEN REPORTED

TRAP

ALL'S OK

PROCEED

;ELSE, REPORT IT

AND EXIT THIS TEST

T1LL FOR ERROR MESSAGE

JSR

RS ,READ

;GET

8CC
ERROR

.+10

s IF NO ERROR, PROCEED
tELSE, REPORT IT

TiLL
TMP6

TRAP

.WORD
.WORD
.WORD

T1CL
TMP4

L10073-,

REPORT THAT PB7 DIDN'T GET SET!
“DEVICE FATAL" ERROR & 72

.+10

T1CH
TMPS

CSESCAPE

.WORD

PROCEED

;ELSE, REPORT IT

8CC

28¢%

TEST

;GET T1LH FOR ERROR MESSAGE

RS,READ

ERROR

104460

AND

BR
JSR

ERROR

104460
104410
001150
004737
102002

SEQ@ 0177
TRAP

103003

00C110
017122
010762
000562
004537

77-20

1 ONE-SHOT MODE

002454

104410
001222
004537
120007
002456

22-FEB 84

TRAP

CS$ERROR

TRAP

CSESCAPE
3 ..
L10C

.WORD

CNDMAAO OMV11 MCTRL DIAG &1
27

VIA

TIMER &

035012
6387 035014
035014
035016
6388 035020
6389 035024
6390 035026
6391 035030
6392 035032
035032
0393 035034
035034
035036
6394 035040

104460

TEST

035040
035042
035044
035046
6395 035050
6396
6397 035052
6398 035056
6399 035060
6400 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

104410
001074
004537
120007
002456

MACRO M1200

ESCAPE
004064

104410
001054

104455
000111
016406
010762
000507
004064

21$:

104460

104410

123737

002454

004537
120007
002456
103003

004064

001415

15:22

PAGE

034444

TST

SEQ 0178
TRAP

THIS TEST

.+10

: IF NO ERROR,

ESCAPE

TST

GEDF

EM50G,ERRSO

AND EXIT THIS TEST

:REPORT BAD VIA CHIP!

L10073-.

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10073 .

"DEVICE FATAL” ERROR & 73

TRAP

CSERDF

.WORD
.WORD
.WORD

73
EMS50G
ERRS0

TRAP

CSERROR

TRAP

CS$ESCAPE

28$

;BYPASS THE REST OF THIS SECTION OF TESTING

JSR

RS ,READ

sREAD

TiL-L

;s THIS

8CC
ERROR

.+10

; IF NO ERROR, PROCEED
;ELSE, REPORT IT

SHOULD RETURN A 001

ESCAPE

TS7T

TILL
TMP6

CMPB
BEQ

TMP6,18%
23

JSR

RS,READ

(ADDR

AND EXIT

06)

THIS

TEST

.WORD

;ELSE,

;GET

REPORT BAD LOAD OF

T1iL-L

T1iLH FOR ERROR MESSAGE

8CcC
ERROR

.+10

+ IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

GEDF

EMSOM,ERRSO

AND EXIT THIS TEST

;ELSE,

REPORT BAD LOAD OF

T1L-L

TRAP

C$ERROR

TRAP
. WORD

CSESCAPE
L10073 .

(ADDR 06)

CSERDF

TRAP

;BYPASS

JSR
8vC
ESCAPE

PC,GETT1

sIS "T1” STILL SET?
s+ IF NO ERROR, PROCEED

8Cs

;ELSE,

THE REST OF

.WORD

THIS SECTION OF

IT'S ALREADY BEEN REPORTED

ALL'S

1NO!

BAD VIA CHIP!

74
EMSOM
ERRSO

TESTING

TRAP

s YES,

(ADDR 06)

“DEVICE FATAL" ERROR & 74

.+6
suB

L10073

:CHECK T1L-L (ADDR 06) AGAINST LOADED VALUE
: IF SAME, PROCEED

.WORD
.WORD

036146

CS$ESCAPE

.WORD

PROCEED

REPORT I7

sELSE,

CSERROR

TRAP

8CC
ERROR

104455

000112
016450
010762
000456

AND EXIT

;GET TiLH FOR ERROR MESSAGE

TMP7

104410
000772

104410
000744
103415

RS,READ

TIUH

104460

004737
102002

JSR

TILH
TMP?

104460

001022

J14
84

1 ONE-SHUT MODE

103003

004537
120006
002454
103003

22-FEB

.WORD

EXIT

CS$ESCAPE

L10075

K14
CNDMAAO DMV11 MCTRL
TEST

DIAG #1

MACRO M1200

VIA

TIMER ¢

1 ONE SHOT MODE

6420 035150
6421 035154
6422 035156

004537
120007
002456

004064

6423 03512
6424 035162
035162
6425 035164
035164

*04410

035170
035172
035174
035176

104455
000113
016536
010762

6429 035202

004537

6431 035210
6432 035212
6433 035214
035214
6434 035216
035216
035220

002456
103003

6436 035230

001405

035232

104455

6428

6430 035206

6435 035222
6437 035232

000433
120007

104410
000672

123737

000114
016600
010762
000412

644C 035244

004737

035250

6442 035252

035252

102002

000634
103404

035260
035262
035264
035266

104455
000115
016666
010762

6446
6447

004537

6450 035276

002450

6451 035300
6452 035302
035302

034445

120004

103003

104460

.+10

1 IF NO ERROR, PROCEED

ESCAPE

TST

004064

28%:

C $ERROR

TRAP

C$ESCAPE

.WORD

L10073

TRAP

C $ERROR

TRAP
.WORD

C$ESCAPE
L10073-.

28s

JSR

RS ,READ

;READ T1L-H (ADDR 07)

TMP7
8cc
ERROR

.+10

; THIS SHOULD RETURN A 000
; IF NO ERROR, PROCEED
;ELSE, REPORT IT

FSCAPE

TST

TTMMP7,19$

;CHECK T1L-H (ADDR 07) AGAINST LOALSD VALUE

EMS50J, ERRSO

;ELSE, REPORT BAD LOAD OF TiL-H (ADDR 07)

263

AND EXIT THIS TEST

: IF SAME,

PROCEED

'DEVICE FATAL” ERROR & 76
TRAP

;

28s

;:BYPASS

JSR

PC,GETT1

;IS “T1” STILL SET?

ESCAPE

SUB

;:ELSE,

8vC

TRAP

AND EXIT THIS TEST

;REPORT BAD VIA CHIP!
"DEVICE FATAL" ERROR & 75
;
TRAP
C SERDF
.WORD
75
.WORD
EMSOI
.WORD
ERRSO
;:BYPASS THE REST OF THIS SECTION OF TESTING

.+6

BCS
GEOF

REPORT IT

EMSOI,ERRSO

cMPB

265 :

;ELSE,

GEDF

036146

SEQ 0179

B8CC

BEQ

6448 035270
6449 035274

002456

77 22

{GET T1LH FOR ERROR MESSAGE

TILH

104410

035254
6443 035256
6444 035260

6445

245

104460

035234
035236
035240
gzgg 035242
644]

004064

PAGE

RS ,READ

ERROR

.04460

000724

15:22

JSR
TILH
TMP7

103003

035166
6426 035170

6427 035200

22-FEB 84

JSR

T1CL

TMP4

8cc
ERROR

; IF

28
EMSOK , ERRSO

RS,READ
.+10

eee

NO ERROR,

;YES,
:NC!

TME REST OF

PROCEED

IT'S ALREADY BEEN REPORTED

TRAP

EXIT

.WORD

ALL'S OK
BAD VIA CHIP!

"DEVICE FATAL" ERROR & 77

TRAP
.WORD
.WMORD
.WORD

;READ T1C L CADDR 04) TO CLEAR ‘Tl
ALMOZT

ANYTHING)

: IF NO ERROR, PROCEED
{ELSE, REPORT IT

CSESCAPE
L1007S

CSERDF
77
EMS50K
ERRSO

; (CTHIS VALUE ISN'T CHECKED BECAUSE
i

CSERDF

.WORD
76
.WORD
EM50J
.WORD
ERRS0
THIS SECTION OF TESTING

IT CAN BE

TRAP

CS$ERROR

CNDMAAO OMV11l MCTRL DIAG #1
TEST

VIA TIMER &

6453 035304
035304
035306
6454 035310
6455 035314
6456 035316
035316
035320
6457 035322
6458 035324
035324
035326
035330
035332

6459
6460
6461
6462 035334
6463 035340
6464 035344
6465 035346
6466 035350
6467 035352
035352
6468 035354
035354
035356
6469 035360
6470 035364
6471 035366
6472 035370
6473 035372
035372
6474 035374
035374
035376
6475 035400
6476 035404
6477 035406
035406
035410
6478 035412
6479 035414
6480 035420
6481 035422
6482 035424
6483 035426
035426
6484 035430
6485
6486
6487
6488
6489

035430
035432

035434
035440
035442
035444
035446

104410
000604
004737

102002

MACRO M1200

1 ONE-SHOT

15:22

PAGE

16$:

TST

;

JSR
BvC
ESCAPE

PC,GETT1

+IS

8CC
GEDF

294
EMS0C,ERRSO

16$
su8

002445
004310

ESCAPE

004310

036146

104410
000500

103426
004537

120005
002452
103003

004064

104460
104410
000460
004537
120007
002456
103003

AND EXIT

THIS

TEST

TRAP
.WORD

"T1” CLEARED NOW

;ELSE,

IT'S ALREADY BEEN REPORTED EXIT
TRAP
CS$ESCAPE
.WORD
L10075 .

;sYES, ALL'S 0K
BAD VIA CHIP!
:NO!
"DEVICE FATAL"” ERROR # 78
:

004064

TMP2+1
RS,WRITE

;CHANGE THE DIRECTION OF ORB

.+10

;IF NO ERROR, PROCEED
;ELSE, REPORT IT

TST

HAVE ANY EFFECT ON

RS,WRITE

;RE-WRITE

8CC
ERROR

.+10

; IF NO ERROR, PROCEED
;ELSE, REPORT IV

ESCAPL

TST

JSR
8vC
ESCAPE

PC.GETT1
.6

SuB

+IS

"PB7"

AND EXIT THIS TEST

JSR

TiCH
TMPS+1

INTO

T1C-H (ADDR 0S)

AND EXIT THIS TEST

'T1" SET AGAIN

; IF NO ERROR,

;ELSE,

CS$SERROR

TRAP

CSESCAPE

TRAP

C$ERROR

TRAP

CS$ESCAPE

.WORD
L10073
TO SET T1 AGAIN

TRAP

.+10

; IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TSTY

AND EXIYT

THIS

JSR

R5,READ

sGET

8CC
ERROR

.+10

: It NO ERROR, PROCEED
;ELSE, REPORT IT

TiLH
TMP7?

TRAP

L10073-.

PROCEED

8CC
ERROR

R5,READ

78
EMSOC
ERRS0

IT'S ALREADY BEEN REPORTED -- EXIT

;YES, ALL'S WELL (AGAIN?)
;GET T1CH FOR ERROR MESSAGE

T1CH
TMPS

CSERDF

- IT SHOWDN'T

.WORD

BCS
JSR

CS$ESCAPE
L10073-.

s IF NO ERROR, PROCEED

.WORD
.WORD
.WORD

104460

104410
000514
004737
102002

SEQ 0180

TRAP

104460

104410
000534
004537
120005
002453
103003

ESCAPE

104455
000116
016203
010762

105037
004537
120002
002445
103003

MODE

036146

104410
000570
103004

22-FEB

TEST

T1LH FOR ERROR MESSAGE

CSESCAPE

.MORD

L1007S

TRAP

CS$ERROR

TRAP

CSESCAPE

. WORD

L10073-.

CNDMAAO OMV11 MCTRL DIAG ¢1
TEST

VIA TIMER &

035446
6490 035450
035450
035452
6491 035454

104455
000120
017174
010762
112737
004537
120006
002455
103003

6511
6512
6513
6514
6515
6516

6517
6518

035576
035600

ESCAPE
GEDF

036332

104410
000410
103404

000125
004310

104410
000336
103416
004537
120006
002454
103003
104460

104410

000316

104455

000121

PAGE

77-24

SEG 0181

445

TST

;

THIS

EMSOL ,ERRSO

;

JSR
8vC
ESCAPE

PC,.GETPB7

:GET

8CS
GEOF

. +6
suB

EM50U,ERRS0

.WORD
SOMETHING WENT WRONG!
REPORT IT
"DEVICE FATAL” ERROR # 79

stNO!
:

suB

"“PB7".

C$ERROR

C$ESCAPE

L10073

TRAP

CSERDF

TRAP
.WORD

CS$ESCAPE
L10075-,

.WORD
.WORD
.WORD
AND EXIT FROM THIS SUBTEST

79
EMS50L
C:RRSO

IS IT SET?

: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED

- EXIT
TRAP
CS$SESCAPE

:YES,

iNO,

GOOD.

BAD!

.WORD
REPORT

IT:

NOT

SET

AFTER

"DEVICE FATAL"” ERROR & 80

9125, TMP6+1
RS,WRITE

$USING A DIFFERENT VALUE
:RE-LOAD TiL-L CADOR 06)

8CC
ERROR

.+10

:IF NO ERROR,

ESCAPE

TST

JSR
TiLL

TRAP

TEST

TRAP

ESCAPE

MOVB

AND EXIT

TRAP
.WORD
.WORD
.WORD
55 HEX.,

L10075-.
TIMEOUT

CSERDF
80
EMSQU
ERRS0

TMP6+1

104460
104410
000352
004737
102002

002455

15:22

104410
000422

004737
102002

22-FEB-84

MODE

104410

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

6508
6509
6510

ONE-SHOT

000440

104455
000117
016730
010762

6507

MACRO M1200

104460

035454
035456
035460
035462
0492 035404
035464
035466
6493
6494
6495
6496 035470
6497 035474
6498 035476
035476
035500
6499 035502
6500 035504

6501
6502
6503
6504
6505
6506

M14

036146

004064

JSR
8vC
ESCAPE

PC,GETT1

+IS

AND EXIT

"T1”

STILL

THIS

TEST

TRAP

C$ERROR

TRAP

CSESCAPE

.WORD

SET?

L10073-.

8Cs
JSR

RS,READ

33¢

: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
CS$ESCAPE
TRAP
.WORD
L10075-.
:YES, ALL'S STILL OK

8CC

.+10

+ IF NO ERROR,

ESCAPE

TSY

GEDF

EMSOM,ERRSO

;NO!

TILL
TMP6

ERROR

.+6
suB

PROCEED

sELSE, REPORT IV

;GET

T1LL

FOR ERROR MESSAGE

PROCEED

;ELSE, REPORT IT

AND EXIT

THIS

TEST

SOMETHING WENT WRONG!

TRAP

CS$ERROR

TRAP
.WORD
REPORT IT

CSESCAPE
L10073 .

“DEVICE FATAL"” ERROR ¢ 81

TRAP

.WORD

C$ERDF

CNDMAAO OMV11 MCTRL DIAG #1
TEST

VIA

TIMER &

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
5533 035652
6534 035654
6535 035660
6536 035662
6537 035664
6538 035666

017012
010762

035666

6539 035670
6540
6541
6542
6543
6544

6545
6546

035670
035672
035674
035700
035702
035704
035706
035706
035710
035710
035712
035714

22-FEB-84

15:22

PAGE

N14
77-25

SEG 0182

1 ONE-SHOT MODE

ESCAPE

104410

SuUB

.WORD
.WORD

AND EXIT FROM THIS SUBTEST

TRAP

000300

112737
004537
120005
002453
103003

.WORD

000125
004310

002453

104460
104410
000254
004737
102002

104410
000240
103024

004537
120006
002454
103003

104410
000220
004537
120007
002456
103003

MOVB
JSR
T1CH
TMPS5.1
8CC
ERROR

#125,TMPS+
1
RS,WRITE

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

036146

JSR
8vC
ESCAPE

004064

104460

104410

AND

EXIT

THIS

TEST

i "T1" SHOULD NOW BE CLEARED

: IF NO ERROR,

TRAP

:ELSE,

.WORD

IT'S ALREADY BEEN REPORTED

004064

8CC
ERROR

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

ALL’'S WELL

;GET T1LL FOR ERROR MESSAGE

EXIT

THIS

TRAP
TEST

JSR
TiLH
TTMP7

RS,READ

;GET T1LH FOR ERROR MESSAGE

8CC

.+10

; IF NO ERROR,

ERROR

ESCAPE

004310

344

JSR
T1CH
TMPS+
1

8ccC

ERROR

ESCAPE

;ELSE,

TST

EMSON, ERRS0

REPORT
AND

CSESCAPE

L10073-.

-- EXIT

TRAP
.WORD
THAT END'S WELL (I

+IT WAS,

AND

CS$ERROR

PROCEED

34
RS,READ

GEDF

004537
120005
002453
103003

PC.GETT1
. +6
SuB

C$ESCAPE

L1007S5-.

VALUE AGAIN (S5 HEX),

TRAP

104410
000200

035724
035730
035732
035734
035736
035736
6553 035740
035740

SAME

eCC
JSR

TILL
TMP6

104460

104455
000122
017054
010762

iAND USING THE

EMSOM
ERRS0

:NOW LOAD T1C-H (ADDR 05)

TRAP

104460

035714
035716
035720
035722

6547
6548
6549
6550
6551
6552

MACRO M1200

CS$ESCAPE
L10075-.
THINK'?)

CSERROR
CSESCAPE

.WORD

L10073

TRAP

C$ERROR

TRAP

CSESCAPE

PROCEED

EXIT

THIS

TEST

. WORD
L10073-.
+IT WASN'T!
SOMETHING WENT WRONG!
REPORT IT
:
“DEVICE FATAL' ERROR & 82

RS.WRITE

:RE LOAD T1C M (ADDR S)

.+10

: IF NO ERROR,

TST

;ELSE,

REPORT
AND

TO START

TRAP

CSERDF

.WORD
.WORD
.WORD

82
EMSON
ERRSO

IT AGAIN

PROCEED
IV

EXIT

THIS

TRAP

CSERROR

TRAP

CSESCAPE

TEST

CNDMAAQ OMV11 MCTRL DIAG o1
TEST

VIA

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
036006
6567 036010
6568 036012
036012
6569 036014
036014
036016
6570 036020
6571 036024
6572 036026
6573 036030
6574 036032
036032
6575 036034
036034
036036
6576 036040
€577 036044
6578 036046
6579 036050
6580 036052
036052
6581 036054
036054
036056
6582 036060
6582 036064
6584 036066
6585 036070
6586 036072
036072
6587 036074
036074
036076
6588 036100

036100
036102
036104

TIMER

000150
004737
102002
104410
000134
103054
004537
120015
002472
103003

ONE

MACRO M1200

SHOT

0%6332

004064

104460
104410
000014

JSR
BvC
ESCAPE

8CC

JSR
IFR

ESCAPE
004064

JSR

T1CL

.WORD

PC.GETPB?
Y
SUB

iGET "PB7",
IS IT CLEARED?
+ IF NO ERROR, PROCEED
tELSE, IT'S ALREADY BEEN REPORTED

4a8s

.WORD

+YES, GOOD.

RS ,READ

tGET

.10

L10073-,
EXIT
C$ESCAPE

L10075
.

IFR FOR ERROR MESSAGE

+ IF

NO ERROR,

tELSE,

RS,.READ

PROCEED

REPORT IT
AND EXIT

THIS

TEST

TRAP

;GET T1CL FOR ERROR MESSAGE

CS$ERROR
CSESCAPE

.WORD

L10073
.

TRAP

C $ERROR

TMP4

8CcC
ERROR

.+ 10

ESCAPE

TSt

1 IF

ERROR,

;ELSE, REPORT
;

PROCEED

AND EXIT

THIS

TEST

TRAP

004064

JSR

RS ,READ

:GET

8cC

.+10

:IF NO ERROR,
+ELSE, REPORT

ESCAPE

1£31

T1CH
TTMMPS

FRROR

004064

JSR

RS,READ

tGET

8CC

.*10

s IF

TiLL
TMP6

ERROR

ESCAPE
004064

RS,READ

tGET

8CC

.+10

+IF

ESCAPE

1631

TlLH
TMP7

ERROR

T1CH FOR

ERROR MESSAGE

T1LL

FOR

NO ERROR,

REPORT

ERROR MESSAGE

NO ERROR,

EMS50V,ERRSO

tNO,
:

ERROR

MESSAGE

CSERROR

TRAP

CSESCAPE

.WORD

L10073
.

TRAP

C$ERROR

TRAP

CSESCAPE

.WORD

L10073
.

PROCEED

AND EXIT THIS TEST
BAD!

TRAP

1ELSE, REPORT IT

;

L10073-.

PROCEED

AND EXIT THIS TEST
T1LM FOR

CS$ESCAPE

.WORD

PROCEED
IT

AND EXIT THIS TEST

tELSE,

JSR

GEDF

104455
000123
017240

TRAP

104460

104410
000034
004537
120007
002456
103003

5€Q 0183

ERROR

104460

120006
002454
103003

BIl5
PAGE

TMPD

104460

104410
000054
004537

15:22

MODE

8CC

103003

104410
000074
004537
120005
002452
103003

TRAP

104460

104410
000114
004537
120004
002450

22 FEB

TRAP

JWORD

RPT. PB? NOT DRIVEN LOM

‘OEVICE FATAL'

CSERROR

CSESCAPE

L100°3
.

ERROR o 83

TRAP

.WORD
.WORD

CSERD*

82
EMSOV

CNDMA QO DMV11 MCTRL
TEST

DIAG o1

VIA

TIMER @

036106
6589 036110
036110
036110
6590 036112
036112
036112
6591
6592
659%
0594
6595
6596
£597
6598
659¢

010762

1 ONE

MACRO M1200

SHOT

22 FEB B4

15:22

PAGE

C15

77-27

MODE

48%

.WORD

ERRSO

TRAP

CSESUB

TRAP

Csersy

ENDSUB
L10075:

104403

ENDTST
L1007%;

104401
‘

-----

LODTIC

CALLING SEQUENCE:

:
H

JSR
.BYTE

:
:

e
e

eeeaeas

eeemee

LOAD TIMER ONE AT ADDRESSES 04 & 0S5

.BYTE
«NEXT

R5,LONT1C
<VALUE FOR

T1L L (ADDRESS 04)>

<VALUE FOR T1C-H (ADDRESS 05)>
SEQUENCIAL INSTRUCTION

036114
036120
036124
036130
036132
036134
036140
036142
036144

6634
6635

6637
6638
6629

112537
112537
004537
120004
002451
004537
120005
002453
000205

036146
036152
036154
036156
036160
036160
036162
036164

104460
000262
000207

036166
036170
036174
036176
036200
036202

010046
113700
106100
106100
012600
000207

004537
120015
002472
103003

002451
002453
004310

LOOT1C:

004310

MOvVB
MOVB
JSR
T1CL
TMP4 .1

(RS).,TMP4. 1
(RS)+,TMPS. 1
R5,WRITE

1SETUP TO LOAD T1CL
i
AND T1CH
sLOAC T1C-L (ADDR 04) WITH PASSED PARAMETER

JSR

R5,WRITE

sLOAD

T1CH
TMPS.1

RTS

004064

002472

T1C-H (ADDR 05) WITH PASSED PARAMETER

(THIS WILL ALSO RESET

Ti~ & THE COUNTER)

: GETT1
1

-- GET THE "T1“ FLAG FROM THE VIA'S IFR REGISTER AND PUT
INTO THE “CARRY" BIT

GETT1:

JSR
IFR
TMPD
8CcC
ERROR

1%:

R5,READ

$tGET

1 IF NO ERROR, PROCEED
;ELSE, REPORT IT

IFR REG.

TRAP
sFLAG AN ERROR TO MAINLINE ROUTINE
it
AND TAKE AN ABNORMAL RE TURN

SEV
RTS

MOV
MOVB
ROLB
ROLB
MOV
RTS

RO, (SP)
TMPD, RO
RO
RO
(SP)+,RO
PC

KICKT1

VIA

1PRESERVE RO
1PUT VALUE HERE TO PRESERVE
: “IRQ” GOES INTO CARRY BIT
$"T1" GOES INTO CARRY BIT
tRESTORE RO

TTMPQ

INIT. TIME
@ R1 BY THE FOLLOWING PROCEDURE:

READ

TIL

(ADDR

07)

*O GET

THE

LAST

VALUE

LOADED

INTO

CSERROR

EQ 0184
1

CNDMAAO DMVi1 MCTRL DIAG 01
TEST

6640
6641
6642
6643
6644
6645
6046
6647
6648
6649
6650
6651
6652
6653
6654
6655
6656
6657
6658
6659

VIA

TIMER &

MACRO M1200

ONE-SHOT

D15
22 TEB

15:22

PAGE

SEQ 0185

MODE
WRITE THAT VALUE INTO T1C-H (ADOR 05) TO RESET
AND CAUSEt THE RE-LOADING OF BOTH COUNTERS,
-

036204
036206
036212
036214
036216

010346
004537

120007

103443

012777
113777
113737
142777

036274
036302
036310
036316
6660 036324

012737
012737
012737
012737
000261

112777
012703
132777
001016
077305

120005

002456
002456
000100
000002
000074
000200

000001
000124
014500
005426

012603

144134
144132
002453
144110
144100
144066

10%

: IF

MOV
MOVB
MOVE

eT1CH,8SELA
TMP7 ,8SEL6
TMP7,TMPS.
1
@IFRT1,8BSEL3
OWRILOC,3BSEL2
#60. ,R3
OMRDY ,BBSEL2
10¢
R3,5%
EM4 ,ERR4

;SETUP ADDRESS FOR M-LOOP WRITE
1SETUP DATA FOR SAME

8ITe

SEC

ERROR,

1PUT

HERE

s TELL

THE

WE'RE

M-LOOP

TO WRITE

SOON AS

"MRDY"

“MROY"

QUEUVE

TO WRITE

INTO

THE BYTE FOR US

SET,

EXIT!

TIMEOUT

"DEVICE FATAL'

ERROR & 84
MOV
MOV
MOV

MOV

THE FAILURE & EXIT

CARRY BIT

JSR

PC,GETPB7
FOR PB7 SET

JSR
OR8
TMPO

RS,READ

8cC
ERROR

<TEST

6682

6688

QT EDF ,ERRTYP
084 ,ERRNBR
O0EM4
[ ERRMSG

0ERRA ,ERRBLK

CAN BE

TESTED

CHIP)-

UPON RETURN,

CALLING SEQUENCE:

6674
6675 036332
6676 036336
6677 036340
6678 036342
6679 036344
036344
6680 036346
6681 0356350
6683
65684
6685
6686
6687

THE

IT,

CHECK AGAIN FOR M-READY

+IF NO TIMEOUT,
sELSE,

GOING

JUST IN CASE

:RESTORE REGISTER
sIMMEDIATE RETURN

(SP)+,R3

MOV

BECAUSE

1SETUP TIMEOUT COUNTER
tWAIT FOR M READY TQ BE SET

sINDICATE

RTYS

TOO.

1CLEAR THE INTERRUPT BIT

:+AS

EXIT

6665

6666
6667
6668
6669
6670
6671
6672
6673

8cCs

002236
002240

10s:

000207

FLAG

1SAVE CALLER'S REGISTER CONTENTS
tGET THE CURRENT SETTING OF THE HIGH LATCH

MOVB
MOV

002242
002244

eam

INTERRUPT

R3,-(SP)
RS,READ

8ICB

Ss:

“T1"

JSR

MOV

TILH
TMP7

002456

036220
036226
036234
036242
036250
036256
036262
036270
036272
036274

6661
66062 036326
6663 036330
6664

KICKT1:

004064

-«

THE

036352
036354
036360
036362
036364

004537
120000
002440
103003

004064

GETPB7:

104460

000262
000207

010046
113700
106100
012600
000207

SEV

002440

1$:

RTS

MOV

RO, (SP)
1"P0,RO
RO

MOove

ROLB
MOV
RTS

(SP)+,RO

CLEARED

:GET

WITH

"BCS”

THE REGISTER

"BCC”

THAT

INSTR'S»

CONTAINS

"PB87"

1 IF NO ERROR, PROCEED

1ELSE,

REPORT

;FLAG AN ERROR
t
AND TAKE AN

;PRESERVE

TRAP
TO MAINLINE ROUTINE
ABNORMAL RETURN

THIS REGISTER FOR

THE

CALLER

CSERROR

sPUT ITS CONTENTS HERE SO WE CAN MANIPULATE
:PUT "PB7" INTO THE CARRY BIT
;RESTORE RO FOR THE CALLER
iRETURN WITH “PBT” IN THE CARRY

BITY

CNDMAAO DMV1l MCTRL DIAG 21
TEST

MACRO M1200

22 FEB 84

PAGE

E15S
78

5EQ 0186

TEST

VIA TIMER 1 FREE RUNNING MODE

.SBTTL

6733

15:22

TEST 28

VIA TIMER 1 FREE-RUNNING MODE

TEST

1000040008800 08002840000800040800000008080000000080000000000400000000000080400000200s
1 &

TEST 28

HEJ

VIA

TIMER

1 FREE-RUNNING MODE

TEST

HL]

We
G0
O
Go
¢
B¢
G0
_Ge
Ws
Ve
G
G2
Ge
S
GF
G
Ge
B
Ve
B¢
0
9o
B2
S0
Ge
B¢

OPOODPOEELOEIOEEEEIEELEPLESOIEIPIEIESES

Be
B¢

PROGRAM

PERIODICALLY

CONTINUES

THE LATCHES,

MASTER CLEAR

FOR

THE

COUNTER

TO VERIFr

THAT:

SETTING
THE

AND

TO DECREMENT.

IN THE FIRST SUBTEST,

CHECKS

IS DECREMENTING AND EVENTUALLY REACHES O,

RELOADS FROM

Ti~”

THE FOLLOWING

IS DONE

ACR7
(BIT

AND

THE

IS PERFORMED

TIMER

IS PLACED

TO O £ ACR6 TO 1 (MODE 1).
IN

IFR)

TO BE

INITIALLY

IN FREE RUNNING MODE

AND THE PROGRAM CHECKS

CLEARED.

THEN T1L L (ADR 04) IS LOADED WITH 125 (OCTAL) AND T1C M (ADR 05)
LOADED WITH 125 (OCTAL) STARTING THE COUNTER.
THE
COUNT
IS
ALLOWED
CHECKED TO BE SET.
TIC H (ADR 05)
THE

COUNTER

LO BYTE

THE READ OF

THE

IS ALLOWED

COUNT

AGAIN,

IS READ AND

CLEARED B8Y
SET

B9
®0
90

THE

IS OPERATIONAL

~T1'

IS CHECKED

IS READ AND

T1C L.

THE

AND

WITH

TIC H

IS LOADED WITH 252 (OCTAL) AND

THE LGADING JXF

'T1'

STILL

IS READ AND

SET,

‘Tl' IS READ AND CHECKED 10 BE

252 (OCTAL) AND

T1iC H.

THE

TO BE

TO REACH O ONCE MORE AND

;é% L

CLEARED BY

LOADED

REACH O AGAIN,

“T1'

IS CHECKED TO BE

"Ti~ IS CHECKED TO BE STILL

"T1”

IS READ AND CHECKED

TO BE

[ 2

THIS
TEST
VERIFIES
THAT
THE
TIMER
1
COUNTER
FREE -RUNNING MODE, IN EACH OF TWO SUBTESTS.

THE SECOND SUBTEST, ALL OF THE ABOVE OPERATIONS ARE REPEATED, WITH
PZR7
=
1,
AND ACR6 *= 1 (MODE 3). ALSO, P87 IS VERIFIED FOR PROPER
STATE AT THE PROPER TIME.

0080084000480 0008048800400000080000004800004808300400000888088800840080400080020042

6734

6735
6736
6737

036366
036366
036366
036366
036370
036374
036376

BGNTST

1T28::

BGNSUB
104402
004737
103003

003762

JSR

8CC

ERROR

T28.1:

PC.,MSTCLR
1%

s INIT DMV & ENTER M-LOOP

TRAP

s IF NO ERROR, PROCEED WITH TESTING
$ELSE,

REPORT ERROR

csBsSue

CNDMAAO DMV11 M_TRL DIAG o1
TEST

VIA

036376
6738 036400
036400
036402
6739 036404
6740 036410
6741 036412
6742 036414
6743 036416
036416
0744 036420
036420
036422
6745 036424
6746 036430
6747 036432
036432
036434
6748 036436
6749 036440
036440
036442
036444
036446
6750 036450
036450
036452
6751
6752
6753
6754 036454
6755 036460
6756
6757
6758
6759 036462
6760 036464
6761 036470
6762 036472
036472
036474
6763 036476
6764 036500
6765 036502

036502
036504
036506
036510
6766 036512
036512
036514
6767
6768 036516
6769 036522
6770 036524

vIMER

MACRO M1200

1 FREE RUNNING MODE

22 FEB

15:22

PAGE

SEQ 0187

TEST

104460
104410
001514
004537
000000
000100
103003

ESCAPE

004660

18:

036146

JSR
0
BIT6
8CC
ERROR

R5,INITT1

ESCAPE

TST

JSR
8vC
ESCAPE

104410
000414
103006

8cC
GEOF

.+10

CS$ERROR

.WORD

LATCHES

INT.

TEST

1ELSE,

PC,.GETT1
.6

==>

MODE 1 & "T1”
sIF NO ERROR, PROCEED

REPORT

+IS

“T1”

ENABLE FLAG CLEARED

THIS

SET?

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10076 .

+IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED

SuUB

24
EMS0A,ERRS0

$YES,

TRAP
.WORD

iNO, GOOD.

REPORT

IT'S

NOT

BEING

CLEARED

EXIT

"DEVICE FATAL' ERROR & 85

TRAP

ESCAPE

& EXIT

TEST

036114
125

R5,L00T1C
125,125

005003
004737
102002

036146

R3
PC.GETT1

avC
ESCAPE

104410
000354
103407
077307

.+6
Su8

R3,3$
EMSOF ,ERRS0

ESCAPE

104410
000334

SuB

TRAP

CSESCAPE

: IF

SHOUWD BE

NO ERROR,

1ELSE,

SET,

PROCEED

IT'S ALREADY BEEN REPORTED

s YES,

JSR
T1CH
TMPS

RS,READ

EXIT

.WORD

GOOD.

CSESCAPE

L10077-.

iNO,
IF NO TIMEOUT, LOOK AGAIN
;ELSE, SAY IT WASN'T SET BY T1 TIMEOUT
“DEVICE

+IF

ERROR,

THE

FATAL"

REST

ERROR & 86

THIS

TEST

TRAP

CSERDF

.WORD
.WORD
.WORD

86
EMSOF
ERRSO

UN-DOABLE!

.WORD
4%

L10077-.

IT?

TRAP

004064

CSERDF

s INITIALIZE TIMEOUT COUNTER

:“Tl"

104455
000126
016341
010762

INIT.

85
EMSOA
ERRSO

TRAP

8CS
508
GEOF

CS$ESCAPE
L10077 .

.WORD
.WORD
.WORD

.WORD

004537
125

CS$ESCAPE

L10076-.

AND EXIT

104710
000376

002452

TRAP

TEST

t INITIALIZE TIMER o 1

104455
000125
016067
010762

004537
120005

& EXIT

TRAP

104460
104410
001474
004737
102002

TST

tREADING

(WE

T1CH

OON'T

SHOULDN'T

CARE

WHAT

CLEAR

THIS

I%)

'T1®

CSESCAPE

L10vTM7

CNDMAAO DMV1l1 MCTRL DIAG &1
TEST

VIA

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 036576
6786 036600
6787 036604
6788 036606
036606
036610
6789 036612
6790 036614
6791 036616
6792 036620
6793 036624
6794 036626
6795 036630
6796 036632
036632
6797 036634
036634
036636
6798 036640
6799 036644
6800 036646
036646
036650
6801 036652
6802 036654
036654
036656
036660
036662

TIMER

MACRO M1200

1 FREE RUNNING MODE

104460

000302

PAGE

GL5
78 2

5EQ 0188

.+10

; IF NO ERROR,

ESCAPE

TST

;

B8CS
GEOF

103404

036204

15:22

8CC
ERROR

JSR
8vC
ESCAPE

036146

104410

104455
000127
016406
010762
004737
103003

TEST

103003

104410
001362
004737
102002

22 FEB

6%:

104460
10441¢

PROCEED

;ELSE, REPORT I7

PC.GETT1

AND EXIT

tCHECK

. +6
SUB

“T1”

THIS

TEST

104410
000240
103402
077307
000422
004537
120004
002450
103003

104410
000200
103004

10445S

000130

016203

010762

TRAP

CS$ESCAPE

SHOULD STILL BE

; IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED

TRAP

6$
EMS0G,ERRS0

"DEVICE FATAL'

PC.KICKT1

.+10

; IF NO ERROR, PROCEED
:ELSE, REPORT IT

sKICK

ESCAPE

TST

;

AND EXIT

THIS

CSESCAPE

L10077

ERROR ¢ 87

TRAP

. WORD
.WORD
.WORD
IT OFF AGAIN SO WE CAN PRESERVE

JSR
8CC
ERROR

036146

7s:

CLR
JSR
8vC
ESCAPE

B8CS
S08
004064

8s:

B8R
JSR
TiCL
TMP4

036146

R3
PC.GETT1

.*6
SuB

108

R5,READ

.+10

ESCAPE

TST

JSR

8vC
ESCAPE
8CC
GEDF

CSERDF

TRAP

CSERROR
CS$ESCAPE

L10076

;WAIT FOR IT TO FINISH:
s INITIALIZE TIMEQUT COUNTER
$'71” SHOUWLD BE SET,
IS IT?

8s
R3,7$

8ccC
ERROR

87
EMSOG
ERRSO
TIMING

TRAP

TEST

EXIT

.WORD

:IT IS, GCOD.
;CLEARED BY READING T1CH!!

L10076

SET

.WORD

104460
104410
001260
004737
102002

CS$ERROR

. WORD

001322

005003
004737
102002

TRAP

PC,GETT1

. +6
SuB

104
EMSOC,ERRSO

; IF NO ERROR, PROCEED
;ELSE, IT'S ALRFADY BEEN REPORTED
1 YES,
:NO,

;s IF

GOOD.
IF NO

TIMEQUT,

:READING

TIMEOUT,

T1CL

-- EXIT

TRAP

CSESCAPE

.WORD

L10077-.

LOOK AGAIN

BYPASS NEXT CHECK (THIS DONE ABOVE)
SHOUWD CLEAR

‘'T1”

(WE DON'T CARE WHAT THIS IS EITHER?

: IF

NO ERROR,

PROCEED

;ELSE, REPORT IT
i
;CHECK

AND EXIT
“T1”

TRAP

THIS

TEST

TRAP

.WORD
SHOWD BE CLEARED NOW

: IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED

.WORD

REPORT

CSESCAPE

L10076

- EXIT

TRAP

$IT IS, GOQD.
:NOT CLEARED!

CS$ERROR

CSESCAPE

L1007
-,

IT,

"DEVICE FATAL" ERROR ¢ 88

TRAP

.WORD
.WORD
.WORD

CSERDF

88
EMS0C

ERRSO

CNOMAAO DMV11 MCTRL DIAG 21
TEST

VIA

6803 036664
6804 036666

6805 036672
6806 036674
036674
036676
6807 036700
6808 036702
6809 036704

036704
036706
036710
036712
6810 036714
036714
036716
6811 036720
6812 036726
6813 036732
6814 036734
6815 036736
6816 036740
036740
6817 036742
036742
036744
6818 036746
6819 036752
6820 036754
036754
036756
6821 036760
6822 036762

6823

6824
6825
6826
6827
6828
6829

6830

036762
036764
036766
036770
036772
036772
036774
036776
037004
037010
037012
037014
037016
037016
037020
037020
037022

6831 037024
6832 037030

6833 037032
037032
037034

TIMER

005003
004737

102002

MACRO M1200

FREE-RUNNING MODE

15:22

PAGE

H15
78-3
SEQ 0189

TEST

10$:
12$:

036146

22-FEB 84

CLR
JSR

8vC
ESCAPE

104410
000152
103407
077307

R3
PC,GETT]

tRE-INITIALIZE
tWAIT FOR "T1”

. +6
SuB

+ IF NO ERROR, PROCEED
tELSE, IT'S ALREADY BI‘EN REPORTED EXIT
TRAP
CS$ESCAPE
.WORD
L10077-.
:GOT IT
- GOOD.
iNOT YET.
IF NO TIMEJDUT, TRY AGAIN.
+ELSE, REPORT "T1” NOT RESET
i
"DEVICE FATAL"” ERROR ¢ 89
TRAP
CSERDF
.WORD
89
.WORD
EMSOX
.WORD
ERRS0
:IF ERROR, CAN'T CONTINUE THIS TEST
TRAP
CS$ESCAPE
.WORC
L10077-.
{SETUP FOR AND
i
LOAD TiLL (ADDR 6)

8CS
S08
GEOF

144
R3,12%
EM50X,ERRSO

ESCAPE

Sus

MOvVB
JSR
TILL
TMP6 + 1
8CC
ERROR

2252, TMP6+1
RS,WRITE

.+10

i
WITH 252 OCTAL
: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

104455
000131
017354
010762
104410
000132
112737
004537
120006
002455

000252
004310

002455

14%:

103003

104460
104410
001152
004737
102002

036146

104410
000072
103406

000252
004310

104460
104410
001074

004737
102002

104410
000014

036146

002457

16$:

AND EXIT

THIS

TEST

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10076-.

JSR
8vC
ESCAPE

PC,GETT1
.+6
sSus

i THIS SHOULDN'T CLEAR "T1*
: IF NO ERROR, PROCEED
iELSE, IT S ALREADY BEEN REPORTED

BCS
GEDF

16$
EMSOM,ERRSO

ESCAPE

suB

MOvVB
JSR
TILM
TMP7.1
8CC
ERROR

9252, TMP7.1
RS,WRITE

:IT DION'T -- GOOD.
;WOOPS, IT DID!!
REPORT FAILURE
:
ODEVICE FATAL
ERROR @ 90
TRAP
CSERDF
.WORD
90
.WORD- EMSOM
.WORD
ERRS50
;
THE REST OF THIS TEST IS INVALID T0O!
TRAP
CSESCAPE
.WORD
L10077-,
:SETUP FOR AND
i+
LOAD TiLH (ADDR 7)

.+10

i
WITH 252 OCTAL
:IF NO ERROR, PROCEED
{ELSE, REPORT IT

ESCAPE

TSTY

;

104455
000132
017012
010762

104410
000054
112737
004537
120007
002457
103003

THE TIME)IUT COUNTER
TO GET 5ET AGAIN

JSR
8vC

ESCAPE

PC.GETT1
. +6

SuB

-- EXIT
TRAP
C$ESCAPE
.WORD
L10077-.

AND EXIT

THIS

TEST

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L1007ob-,

$ THIS SHOUWD CLEAR
‘Tl
: IF NO ERROR, PROCEED
+ELSE, IT'S ALREADY BEEN REPORTED
ExXIT
TRAP
CSESCAPE
WORD
L10077-,

CNDMAAO DMV11 MCTRL DIAG #1
TEST

VIA

TIMER

1 FREE-RUNNING MODE

6834 037036
6835 037040

103004

037040
037042
037044
037046

104455
000133
016067
010762

6836 037050

6837 037050
037050
037050
6838

6839 037052
037052
037052
6840 037(54
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
6861 037154
6862 037156
037156
6863 037160
037160
037162
6864 037164
6865 037170
6866 037172
037172
037174
6867 037176

MACRO M1200

22-FEB 84

PAGE

78 4

SEQ 0190

TEST

8cC
GEDF

18¢$:

174403

15:22

115

184
EMSOA ,ERRS0

;IT DID -- GOOD.
:NOP!
REPORT:
"T1" NOT

s THAT'S ALL FOLKS!

ENDSUB

L10077:

003762

104460
104410
001030
112737
004537
120002
002445
103003

000377
004310

002445

104460

104410
001002
112737
004537
120000
002441
103003

000030
004310

104460

104410
000754
004537
000000
000300
103003

004660

104460

104410
000734
004737
102002
104410
000720
103006

TiLH

TRAP
.WORD
.WORD
.WORD

CS$ERDF
91
EMSO0A
ERRS0

TRAP

CsESULB

TRAP

csBsuB

:.S"!.l'll'."!:l.!l—...’.-.-I.I.-’I..'.'Il"ll"ll.8=II.‘I..’I=S‘88==I:S.S’=

BGNSUB
104402
004737
103003

CLEARED By LOADING

“"DEVICE FATAL” ERROR 4 91

036146

002441

1§:

T28.2:

JSR
8CC
ERROR

PC.MSTCLR
1

s INIT DMV & ENTER M-LOOP
;IF NO ERROR, PROCEED WITH
;ELSE, REPORT ERROR

ESCAPE

TST

MOVB
JSR
OORB
TTMMP2.1
8CC
ERROR

0377,TMP2.1
RS,WRITE

:SETUP ODRB

.+10

+IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

& EXIT

TesT
SUCH

AND EXIT

THAT

THIS

ORB

TEST

TESTING
TRAP

CSERROR

TRAP
CS$ESCAPE
.WORD
L10076 .
IS AN INPUT/QUTPUT REG

TRAP

CSERROR

TRAP
CSESCAPE
.WORD
L10076 .
;:CLEAR ALL BITS IN ORB EXCEPT DTR L & RTS L
:
By DOING THIS, WE SHOULD EXPECT PB7 TO BE
s+
CLEARED IF MODE 3 DOESN'T WORK PROPERLY.

MOVB
JSR
OR8
TMPO.1
8CC
ERROR

430, TMPO.1
RS ,WRITE

.+10

s IF NO ERROR,
;ELSE, REPORT

ESCAPE

TSTY

;

PROCEED
IT

AND EXIT

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10076 .

THIS

TEST

JSR
RS,INITT1
0
B8IT7.8I76
8CC
.+10
ERROR

s INITIALIZE TIMER & 1
;
O ==> LATCHES
MODE 3 & “T1"
.IF NO ERROR, PROCEED
;ELSE, REPORT IT

INT.

ESCAPE

TST

TEST

JSR
B8vC
ESCAPE

PC GETTI
.
SUB

8CC

;IS "T1” SET?
;IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED
EXIY
TRAP
CSESCAPE
.WORD
L10100 .
$NO, GOOD.

AND EXIT

THIS

ENABLE

FLAG CLEARED

TRAP

CSERROR

TRAP
LWORD

CSESCAPE
L10076 .

CNDMAAO OMV11l MCTRL DIAG #1
TESY

VIA

TIMER

MACRO M1200

1 FREE RUNNING MODE

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
6897
6898
6899 037306

15:22

PAGE

78 5
SEQ 0191

TEST

6868 037200

037200
037202
037204
037206
6869 037210
037210
037212
6870
0871
6872
6873 037214
6874 037220
6875
6876
6877
6878 037222
6879 037224
6880 037230
6881 037232
037232
037234
6882 037236
6883 037240
6884 037242

22-FEB 84

GEOF

EMSO0A ,ERRSO

;YES,

REPORT

ESCAPE

104410
000702

004537
125

036114
125

2%:

005003
004737
102002

036146

104410
000660
103407
077307

SuB

JSR
.BYTE

RS,LODT1C
125,125

CLR
JSR
8vC
ESCAPE

R3
PC,GETT1
.+6
SUB

8CS
S08
GEDF

53
R3,.4%
EMSOF ,ERRSO

& EXIT

SuB

CS$ERDF
92

EMS0A
ERRS50

.WORD
.WORD

TEST

TRAP

CS$ESCAPE

.WORD

L10100-.

s INITIALIZE TIMEOUT COUNTER
:"T1”

SHOWD BE

SET.

IT?

;IF NO ERROR, PROCEED
sELSE, IT'S ALREADY BEEN REPORTED

EXIT

:NO,

;ELSE,

:IF

IF NO TIMEOUT,
SAY

CSESCAPE

.WORD

:YES, GOOD.
H

ESCAPE

INIT,

TRAP
.WORD

LOOK AGAIN

IT WASN' T

SET 8y

L10100

TRAP

ERROR,

THE

REST

THIS

TEST

CSERDF

.WORD
.WORD
.WORD
IS

TRAP

93
EMSOF
ERRS50

UN-DOABLE!

CSESCAPE

.WORD

036332

5¢:

104410
000626
103406

JSR

PC,.GETPB7

BvC
ESCAPE

. +6
SuB

B8CS
GEOF

364
EM50U,ERRSO

;GET

;ELSE,
; YES,

sNO,

104455
000136
017174
010762
ESCAPE

104410
000610

SuB

=PB7”,

: IF NO ERROR,

PROCEED

TRAP

REPORT

36%:

JSR

RS,REARD

;READING

EXIT

. WORD
IT

NOT

TRAP

.WORD
.WORD
.WORD

& ALLOW RESTART OF THIS SUBTEST
TRAP

T1CH

CS$ESCAPE

L10100

SET,

"DEVICE FATAL" ERROR & 94

.WORD

004064

L10100-.

IS IT SET?

IT'S ALREADY BEEN REPORTED

GOOD.

TIMEOUT

"DEVICE FATAL"” ERROR # 93

104410
000640

004537

CLEARED

TRAP

104455
000135
016341
010762

004737
102002

BEING

"DEVICE FATAL” ERROR @& 92

104455
000134
016067
010762

IT'S NOT

SHOULDN'T

CLEAR

CSERDF

94
EMSOU
ERRSO

CSESCAPE

L10100

K15
CNDMAAO DOMV11 MCTRL DIAG #1
TEST

6900
6901
6902
6903

VIA TIMER

037312
037314
037316
037320.

1 FREE-RUNNING MODE

004737
102002

036146

103406

037356

005003

037360
037364
037366
037366
037370
6918 037372
6919 037374
6920 037376

ESCAPE

104410
000556

104455
000137
016406
010762

37s8:

036146

38%:

104410
000524
103407
077307

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

104410
000472
103404

78 6

JSR
8vC
ESCAPE

39%:

PROCEED

;ELSE, REPORT IT
TST

37
EMS50G,ERR50

CLR

(WE DON'T CARE WHAT THIS IS)

+ IF NO ERROR,

8CS
GEDF

8CS
S08
GEDF

036332

SEQ 0192

;

PC,GETTL
. +6
SuB

SuB

R3
PC,GETT1

TRA?

AND EXIT THIS TEST

TRFe

.WORD

;CHECK »T1"

-- IT SHOWD STILL BE SET

; IF NO ERROR,

CSESCAPE
L10100 .

TRAP
.WO"T

CSERDF
95

ALLOW RESTART OF

s INITIALIZE
sWAIT FOR

.WORD
.WORD
THIS SUBTEST
TRAP
.WORD

TO BE

SET

EMSOL ,ERRSO

;ELSE,
H

JSR
8vC
ESCAPE

PC.GETPB?

8CS
GEDF

.6
SuB

EMS50Z,ERRS0

; YES,

NO CHECK P87
IF NO

TIMEOUT,

LOOK AGAIN.

TIMER NOT REALLY WORKING RIGHT!
"DEVICE FATAL"” ERROR & 96
TRAP

CSEROF

.WORD
.WORD
.WORD

96
EMSOL
ERRS50

TRAP
.WORD

CS$ESCAPE
L10100 .

iNO,

IT'S ALREADY BEEN REPORTED

GOOD.

L10100-.

-- EXIT
TRAP
CSESCAPE
.WORD
L10100-.

;GET P87,
IS IT SET?
: IF NO ERROR, PROCEED

;ELSE,

CSESCAPE

AGAIN

;GOT 1T

YET.,

EM50G
ERRS50

TIMEOUT COUNTER AGAIN

“T1"

suB

TRAP
.WORD

:IT IS, GOOD.
;CLEARED BY READING T1Ch!!
"DEVICE FATAL” ERKOR & 95
:

;NOT

CS$ESCAPE

L10076

PRCTEED

; IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REFPORTED

R3,38$

C$ERROR

IT'S ALREADY BEEN REPORTED -- EXTT

;ELSE,

. +6
suB

ESCAPE

104410
000504

004737
102002

PAGE

JSR
8vC
ESCAPE

ESCAPE

104410
000540

004737
102002

15:22

T1CH
TMPS
8CC
ERROR

104460
104410
000572

22-FEB 84

TEST

120005
002452
103003

037342
037344
037346
037350
6910 037352
037352
037354
6911
6912
6913
6914
6915
6916
6917

MACRO M1200

REPORT

- EXIT

TRAP

CSESCAPE

.WORD

L10100-.

"PB7" NOT SET AFTER SECOND CYCLE

"DEVICE FATAL" ERROR ¢ 97

TRAP

.WORD

CSERDF

9°

CNDMAAO OMV11l MCTRL DIAG #1
TEST

VIA

037432
037434

6931
6932
6933
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

6958
6959
6960
6961
6962

6963
6964
6965

037532
037534
037536
037540
037540
037542
037544
037546
037552
037554
037554
037556
037560
037562
037564

TIMER

MACRO M1200

1 FREE-RUNNING MODE

22-FEB

L15
84

15:22

PAGE

78-7

SEQ 0193

TEST

017471
010762

004727
103003

.WORD
.WORD

036204

6$:

104460
104410
000446
005003
004737
102002

104410
000430
103402
077307
000442
004537
120004
002450
103003

PC,.KICKT1

ESCAPE

TST

.+10

036146

7%:

CLR
JSR
BvC
ESCAPE

;ELSE,
;

PROCEED

REPORT IT
AND

EXIT

THIS

TRAP

TEST

CSERROR

CS$ESCAPE

R3
PC.GETT1
.+6
SuB

;WAIT

FOR IT TO FINISH:
sINITIALIZE TIMEOUT COUNTER
$"T1l" SHOULD BE SET.
IS IT?
: IF NO ERROR, PROCEED

;ELSE,

IT'S ALREADY BEEN REPORTED

L10076-.

EXIT

TRAP

004064

8s$:

8CS
S08
B8R
JSR

T1CL
TMP4

8¢
R3,7$
144

RS5,REARD

8CC
ERRUR

.+10

ESCAPE

TST

CS$ESCAPE

.WORD

:YES, GOOD.
:NO,
IF NO TIMEOUT, LOOK AGAIN
: IF TIMEOUT, BYPASS NEXT CHECK (THIS

;READING T1CL SHUWLD CLEAR

L10100-.
DONE

036146

JSR
8vC
ESCAPE

(WE DON'T CARE WHAT THIS IS EITHER)

; IF

NO ERROR,

;ELSE,

PC,GETT1
.+6

Ssus

PROCEED

REPORT IT
AND EXIT

THIS

TRAP

TEST

:CHECK “T1*
- IT SHOWD BE
:IF NO ERROR, PROCEED

:ELSE,

.WORD

CLEARED NOW

IT'S ALREADY BEEN REPORTED

EM50C, ERRSO

:IT

iNOT

104455
000142
016203
010762

036146

12¢:

ESCAPE

suB

CLR

R3
PC.GETT1
. +6

JSR
8vC
ESCAPE

8CSs
S08
GEDF

su8

144
R3,12%

EM50X,ERRS50

; IF

1S,

.WORD

GOOD.

CLEARED!

"DEVICE

REPORT

C$ERROR

CS$ESCAPE

L10076-.

-- EXIT

TRAP

8CcC

ABOVE)

"T1"

TRAP

GEDF

104410
000336
103407
077307

NO ERROR,

.WORD

104410
000370
103006

104410
000352
005003
004737
102002

1K1K IT OFF AGAIN SO WE CAN PRESERVE TIMING

+ IF

TRAP

104460
104410
000404
004737
102002

JSR
8CC
ERROR

EMS50Z
ERRS50

CSESCAPE

L10100-.

IT,

FATAL"” ERROR & 98

TRAP

IT YET.

;ELSE,
H

GOOD.
IF NO

EXIT

98
EMSOC
ERRS50

.WORD

L10100-.

SUBTEST
TRAP
CS$SESCAPE
.WORD
L10100 .
tRE-INITIALIZE THE TIMEQUT COUNTER
sWALIT FOR “T1" TO GET SET AGAIN
; IF NO ERROR, PROCEED
;ELSE, IT'S ALREAD- BEEN REPORTED -- EXIT
TRAP
CSESCAPE
;GOT
iNOT

THIS ERROR OCCURED,

CSERDOF

.WORD
.WORD
. WORD

TIMEOUT,

TRY

AGAIN,

REPORT "T1' NOT RESE!
“DEVICE FATAL” ERROR & 99

CNDMAAO DMV11 MCTRL DIAG &1
TEST

VIA

TIMER

1 FREE

037564
037566
037570
037572
6946 037574
037574
037576

104455
000143
017354
010762

6968
6969
6970
6971
6972

004537
120006
002455
103003

6967 037600

037606
037612
037614
037616
037620
037620
6973 037622
037622
037624

6974 037626
6975 037632
6976 037634
037634
037636

6977 037640
6978 037642

104410
000316

112737

104410
000272
004737
102002

0376634
037666
€983 037670

104410
000226
103054

037672
037676
037700
037702
037704
037704
6989 037706
037706
037710
6990 037712

6991
6992
6993
6994

037716
037720
037722
037724
037724
6995 037726
037726
037730

6996 037732

104410
000240
004737
102002

004537
120015
002472
103003

ESCAPE

000252

004310

002455

14%:

036146

036332

004064

104460
104410
000206
004537
120004
002450
103003

004064

104460
104410
000166
004537

22 FEB-84

004064

15:22

PAGE

M15
78-8

SEQ 0194

TEST

104410
000256
103406
104455
000144
017012
010762

6984
6985
6986
6987
6988

RUNNING MODE

104460

037642
037644
037646
037650
6979 037652
037652
037654
6980 037656
6981 037662
6982 037664

MACRO M1200

16¢%:

MOvVB

SuB

i IF ERROR,

#252,TMP6+1

:SETUP FOR AND
;i

LOAD

CAN'T

TiLL

CONTINUE

THIS

TRAP
.WORD
.WORD
.WORD
TEST
TRAP
.WORD

C$ERDF
993
EM50X
ERRS0

TRAP

CSERROR

TRAP
.WORD

C$ESCAPE
L10076-.

C$ESCAPE
L10100-.

JSR
TiLL
TMP6+1
8CC
ERROR

RS,WRITE

(ADOR 6)

.+10

;.
WITH 252 OCTAL
: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

;

JSR
8vC
ESCAPE

PC,GETT]
. +6
SuB

8Cs
GEDF

164
EMSOM,ERRS0

: THIS SHOULDN'T CLEAR "T1"
; IF NO ERROR, PROCEED
;ELSE, IT'S ALREADY BEEN REPORTED -- EXIT
TRAP
CS$ESCAPE
.WORD
L10100-.
;IT DION'T -- GOOD.
;WOOPS, IT DID!!
REPORT FAILURE

AND EXIT

THIS

TEST

“DEVICE FATAL" ERROR ¢ 100

THE REST OF

ESCAPE

5UB

JSR
8vC
ESCAPE

PC,GETPB?
. +6
SuB

:"PB7" SHOULD BE LOW HERE
: IF NO ERROR, PROCEED

;ELSE,

BCC
JSR
IFR
TMPD
8CC
ERROR

17$
RS,READ

;IT WASN'T, GOQOD.
;:GET IFR FOR ERROR MESSAGE

.+10

: IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

JSR
T1CL
TMP4
8CC
ERROR

RS,RERD

;GET

.+10

+ IF NO ERROR,
;ELSE, REPORT

ESCAPE

TST

JSR

RS,READ

;:GET

IT'S

ALREADY

AND EXIT

THIS

TEST

BEEN REPORTED

THIS

TEST

T1CL FOR ERROR MESSAGE

TRAP
.WORD

EXIT

CS$ESCAPE
L10100-.

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10076 .

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10076 .

PROCEED
IT

AND EXIT

T1CH FOR

TRAP
C$ERDF
.WORD
100
.WORD
EMSOM
.WORD ~ ERR50
IS INVALID T0O!
TRAP
C$ESCAPE
.WORD
L10100-.

THIS

TEST

ERROR MESSAGE

CNDMAAO DMV11 MCTRL DIAG #1
TEST

VIA TIMER

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
1009 037776
7010 040000
7011 040002
7012 040004
040004
7013 040006

1 FREE-RUNNING MODE

104410
000146
004537
120006
002454
103003

7027
7028
7029

7030
7031

040064
040066

ESCAPE
004064

104410
000034
103006
104455
000146

:IF NO ERROR, PROCEED
:ELSE, REPORT IT

TST

AND EX IT

.+10

;: IF NO ERROR, PROCEED
:ELSE,

TST

002457

;GET

8CC
ERROR

.+10

:IF NO ERROR, PROCEED
;ELSE, REPORT IT

ESCAPE

TST

AND EX IT

:IT

OPERATION, BUT BECAUSE OF WHERE WE ARE
SHOUWWLD BE LOW HERE UNTIL T1 TIMES OUT.
MOvB

JSR
TILH

TEST,

8425, TMP7+1

RS,WRITE

TMP7.1

8CC
ERROR

.+10

ESCAPE

TST

TRAP
.WORD

C$ESCAPE
L10076-.

TEST

THIS

TRAP

CS$ERROR

TRAP

C$ESCAPE

.WORD

TRAP

TEST

SHOULD

NOT

LOW.

BECAUSE

IN THE CYCLING OF

ANY

JSR
8vC
ESCAPEL

PC,GETT]
.*6
sSuB

BCC
GEOF

18$
EMS0A,ERRSO

CSERROR

READ/WRITE

TIMER ¢

"PB7”

sSETUP FOR AND

LOAD

WITH 252

TiLM ( ADDR

0OC TAL

:IF NO ERROR, PROCEED
;ELSE, REPORT I7
H

AND EX IT

THIS

TEST

TRAP
TRAP

036146

L10076-.

TRAP
C$ESCAPE
.WORD
L10076-.
WAS!
REPO RT IT BEING RESET BY WRITTING TiLL
“DEVIC E FATAL” ERROR ¢ 101
TRAP
C$ERDF
.WORD
101
.WORD
EMSOY
.WORD
ERRS0

"PB7"

CS$ERROR

T1LH FOR ERROR MESSAGE

;
i

17¢:

THIS

RS ,READ

ABOVE

TRAP

AND EX IT

000252
004310

REPORT

EMSOY,ERRSO

TEST

TI1LL FOR ERROR MESSAGE

JSR

T1LH
TMP?7

THE

THIS

B8CC

ESCAPE
004064

.+10

sGET

ERROR

104460
104410
000050
004737
102002

78-9

RS,READ

GEDF

112737
004537
120007
002457
103003

N15

JSR
TiLL

TMP6

104460

104455
000145
017417
010762

7026

T1CH
TMPS
8CC
ERROR

103003

040012
040014
040016
040020

PAGE

SEQ 0195

104460

104410
000126
004537
120007
002456

15:22

TEST

104460

104410
000106

040022
040030
040034
040036
040040
040042
040042
040044
040044
040046
040050
040054
040056
040056
040060
040062
040064

22-FEB-84

120005
002452
103003

040006
040010
7014 040012

7015
7016
7017
7018
7019
7020
7021
7022
7023
7024
7025

MACRC 11200

C$ERROR
CSESCAPE

.WORD

L10076

TRAP

CSERDF

.WORD

102

.
s THIS SHOWD C LEAR "T1"
: IF NO ERROR, PROCEED
;ELSE, IT'S AL READY BEEN REPORTED -- EXIT
TRAP
CSESCAPE
. WORD
L10100-.
;1T DID -- GOO D.
;iNOP!
REPORT:
“T1l" NOT CLEARED BY LOADING T1LH
:
"DEVIC E FATAL" ERROR & 102

OMV1l MCTRL DIAG &1

VIA
040070
040072
7032 040074
040074
040076

7033
7034
7035
7036

040100
040104
040106
040110
7087 040112
040112
7038

7039 040114
040114
040114
7040 040116
040116
7041
7042

040116

TIMER

MACRO M1200

FREE -RUNNING MOOE

22 FFB

Bl
15:22

PAGE

5€Q 019%

TEST

016067
010762

104410
000016
004537
000001
000000
103001
104460

ECSCAPE

. WORD
. WORD

suB

TRAP

004660

18¢:

JSR
1
Y
8CC
ERROR

ENDSUB

RS, INITTY

tRE

Y |

s 1F NO ERROR,
sELSE, REPORT

s THAT'S

ALL

INITIALIZE

STOP

L10100

TRAP

CS$ERROR

TRAP

CS$ESLB

TRAP

CSETST

EXIT
[T

FOLKS!

ENDTST

104401

CSESCAPE

. WORD

ITS FINCTIONING

L10100:

104403

EMSOA
ERRSO

L10076;

CNOMAAO DMV 11 MCTRL DIAG 21
HARDWARE

PARAMETER

CODING

MACRO

M1200

FEB

15:22

PAGE

Cle
79

SEQ 0197

SECTION

~04<
~cae

.5SBTTL HARDWARE PARAMETER CODING SECTION

048

SILLLLLIIV 2077077770707 000707700077070777707777777707770700777770777/07777707777

7049
7050
TO51
7052
7053

THE

1/
1/
i/
i/

THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS

r047

054
7055
7056

7057

HARDWARE

PARAMETER

CODING

SECTION

CONTAINS

MACROS

i/ WITH THE OPERATOR.

SIS LIIILLIII 210000780700 7000770 0000000077000 77700207000070707770720777727777

040120
040120
040122

7058
TCSy 040122

040122
040124
040126
040130
7060 040132
040132
040134
040136
040140
7061 040142
040142
040144
040146
040150
040152

BGNHRD

000015

LSHARD:
:
GPRMA

000031
040154
160020
177776
001031
040202
000000
000674
002032
040233
007000
000000
000007

ADDRES,0,0,160020,177776,
YES

GPRMA

VECTOR,2,0,0,674,YES

GPRMD

PRIRTY,4,0,7000,0,7,YES

. WORD
. WORD
. WORD
. WORD

T4CODE
ADDRE
S
TSLOLIM
TeMILIM

. WORD
.WORD
. WORD
.WORD

T$CO0E
VECTOR
TSLOLIM
TSHILIM

.WORD
.WORD
. WORD
. WORD

T$CODE
PRIRTY
7000
TSLOLIM

. WORD

040154

ENDHRD

.EVEN

040154

040154
040202
040233

.WORD L10101 LSHARD
2

104
104
104

105
105
105

126
126
126

BEX
LNLIST
ADDRES: .ASCIZ
VECTOR: ,ASCIZ
PRIRTY:
ASCIZ
LIST
.EVEN

BEX

/DEVICE CSR ADDRESS : /
/DEVICE VECTOR ADDRESS :
/DEVICE PRIORITY LEVEL :

/
/

TSHILIM

CNDMAAO DMVl MCTRL

DIAL €1

D16
MACRO M1200

22 FEB B84

15:22

PAGE

SEQ 0198

SOF TWARE PARAMETER CODING SECTION
:8Z§

.SBTTL

SOF TWARE

PARAMETER

CODING

SECTION

7074

7075

7076

/771177777 7777777777277227777777277777272727777777777777777/77277727777277777777

7077
>C"8
7079

i/
i/
+/

7080

7082
7083

i/
WITH THE OPERATOR,
37707770707 77087777277 7720070707777 72770777777277777772727777777777207777277777

7081

~084
~085 040264
040264
040266
7086 040266
040266

THE SOF TWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED B8Y THE SUPERVISOR TO BUILD P-TABLES.
THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

INTERFRETED BY

MACROS

ALLOW

THE

SUPERVISOR

AS DATA STRUCTURES.
ESTABLISH

THE

COMMUNICATIONS

BUNSF
T
000000

ENDSF
T

L$SOFT::

L10102:

.WORD L10102 L$SOFT
¢

LEVEN

CNDMAAO DMVl MCTRL DIAG o1

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

.SBTTL PATCH AREA FOR DEBUG

PATCH:

108004088800 48400004484000000000400000004000

.SBTTL

7097
7098

040374
7039 0403°4

~100

040374
040376
040400

.=.+100
NOP
NOP
NOP

040366
000240
000240
000240

“ENDMOD" & "“LASTAD"
ENDOMOD

LASTAD

000000
000000

000001

LSLAST::
.END

.EVEN
.WORD
.WORD

CNDMAAO DMV1l MCTRL DIAG 21
SYMBOL

TABLE

ACR
=
ADDRES
ADR
=
AD.HIT
AD.OK
ASSEMB=

120013
040154
000020 G
020350
020344
000010

=
=
=
=
=
=
=
=

G
G
G
G
G
G
G
G

BDATA
BITO
BITOO
8ITO1
B8ITO2
BITO3
B8IT04
BITOS
BITO6
8IT07
B8IT08
BIT09
8IT1
BIT10
8ITi1
8IT12
8IT13
BIT14

=
=
=
=

002312
000001
000001
000002
000004
000010
000020
000040
000100

000200
000400
001000
000002

G
G
G
G

= 002000 G
= 004000 G
= 010000 G

= 020000 G

= 040000 G
8IT15S = 100000 G

8IT2
BIT3

= 000004 G
= 000010 G

BITS
BIT6

= 000040 G
= 000100 G

B8IT4

8I77

BIT8

B8IT9
80E

BSEL
BSELRS
BSELO

BSEL1

BSEL10

BSEL11

= 000020 G

= 000200 G

= 000400 G

=
=

001000 G
000400 G

002352
003042
002352

o2ksa

0Q0d372

020222
000020
000052
000061
000022

C$BSEG= 000004

c$8SUB= 000002

C$CEFG= 000045
C$CLCK= 000062
C$CLEA= 000012

C$CLOS= 000035
CsCLPLl= 000006
C$CVEC= 000036

C$DCLN= 000044

Cs000VU= 000051

C$ERDF= 000055

002404
002406
002410
002356

BSLT2
BSLT3
BSLT4

CONTST
CSREGS=
C$AU
=
C$AUTO=
C$BRK =

002270
002272
002274
002276
002300
002302
002304
002252
002254
002256
002260
002262
002264
003122
003206
003122
002346
020122

002402

B8SEL1S
BSEL16
BSEL17
BSEL2

B8SEL4
BSELS
BSELE6
BSEL7
BSLTO
BSLT1

BSR11
BSR12
BSR13
BSR14
BSR15
BSR16
BSR17
BSR2
BSR3
BSR4
8SRS
BSR6
BSR7
8T1
=
BT2
=
BUFARE
CONSOL
CONTIN

C$DRPT= 000024

002376
002400

BSEL3

BSLTS = 000025
B5LT6 = 000026
BSLT?7 = 000027
BSRO
002246
BSR1
002250
BSR10
002265

002%74

BSEL12
BSEL13

B8SEL14

MACRO M1200

002360

002362
002364
002366
002370
= 000020
= 000021

= 000022
= 000023
= 000024

CsOU
= 000053
C¢EDII<« 000003
C$ERHR=
C$ERRO=
CS$ERSF=
CS$ERSO=

000056
000060
000054
000057

C$ESEG=
CsESUB=
CSETST=
C$EXIT=
CsGETB=
C$GETW=

000005
000003
000001
000032
000026
000027

C$ESCA= 000010

CSGMAN= 000043
CsGPHR= 000042
Cs$GPLO= 000030

22 FEB-84

15:22

CSGPRI=
C$INIT=
C$INLP=
C$MANI=
C$MEM =
C$MSG =

C$OPEN=
C$PNTB=
CSPNTF=
C$PNTS=
C$PNTX=
C4QIO0 =
C$ROBU=
C$REFG=
CS$RESE=
CS$REVI=
CS$RFLA=
CSRPT =
CS$SEFG=
C$SPRI=
"C$SVEC=
C$TPRI=
DDRA
=
DORB
=
DELAY1l
DELAY2
DEVMAP
DEVPTR
OFPTBL

000040
000011
000020
000050
000031
000023

000034
000014
Q00017
000016
000015
000377
000007
000047
000033

000003
000021
000025
000046

000041
000037
000013

120003

120002
002316
002320
002342
002344
002216 G

DIAGMC= 000000

OMVOAI= 000001

OMVPU = 000004
EF .CON=
EF .NEW=

000036 G
0020035 G

EM14

014667

EM16

015013

EF .PUR= 0(0034 G
EF .RES= 0(0037 G
EF .STA= 000040 G

EM1S °~
EM17
EM17A

EM20

EM20A
EM20B
EM21
EM22

014733
015110
015170

015243

015275
015355
015442
015477

EM22A

. 015532

EM478
EM4BA
EMS

015735
016016
014515

EM2S
EM3
EM34
EM34B
EM4
EMA7A

FLlb

PAGE 81

015565
014454
015613
015644
014500
015675

SEQ 0200

EMS0A
EMS08
EMSOC
EM500
EMS0E
EMSOF

016067
016135
016203
016251
016305
016341

FMTO6A
FMTO6B
FMTO7
FMT10
FMT11
FMT4

012571
012637
012530
012654
012730
012245

EMI
ENDEMB
ENDT?
ERRBLK
ERRFLG

014634
012114
022642
002244 G
002332

FMTS0A
FMTS08
FMTSOC
FMTS0D
FMTSOE

012747
013021
013102
013142
013157

EMS50G
EMS0H
EMSOI
EMS0J
EMS0K
EMSOL
EMSOM
EMS50N
EM50S
EMSOU
EMS50V
EMS0W
EMS50X
EMSOY
EM50Z
EM6
EM?7
EM8

ERRMSG

ERRNBR

ERRTYP
ERR1
ERR2

ERR3
ERR4
ERR4$

ERR4A7

ERR47.

ERR48

ERR48.
ERRS

ERRSS$

ERRS0
ERR6
ERR?
ER4A7CT

ER4A7MX

ER4BCT
ER4BMX
EVL
=
EXECUT=
ESEND «
ESLOAD=

FMTO2
FMTO2A
FMTO6

016406
016450
016536
016600
016666
016730
017012
017054
017122
017174
017240
017305
017354
017417
017471
014540
014564
014611

002242 G

002240 G

FMT4A
FMT48
FMTAC
FMT47A
FMT478
FMTA7C
FMT47€
FMT47G
FMT48A
FMT488
FMT48C
FMT48E
FMT48F
FMT48G
FMT48H4
FMT481
FMTS
FMTSA

012305
012340
012345
007232
007263
007322
007350
007407
010300
010347
0104C2
010437
010506
010551
010611
010644
012400
012443

FMTSOM

013174

FRSPAS

002340

002236 G

FRSTIM

005414 G
005426 G
011322

F$BGN = 000040
F$CLEA=s 000007
FsOU
= 000016

005276 G
005304 G

006724 G
007110

007632 G
010030
005552 G

011710

010762 G
005650 G
006612 G
007104

007106

010024
010026
000004 G
000005
002100
000035

012124
012161
012562

F$AU
=
F$AUTO=

002336

000015
000020

FSEND = 000041

F $HARD= 000004

F$HW

= 000013

FS$INIT= 000006
F$JMP = 000050

F$MOD = 0000CO

F$MSG = 000011
FS$PROT= 000021
F$PWR = 000017
FS$RPT = 000012

F$SEG = 000003
F$SOFT=
F$SRV =
F$SUB =
F$SW
=
F$TEST=
GDATA

GETBSR
GETPB?
GETPRM

000005
000010
000002
000014
000001
002310

004434
036332
020010

Glo

(2121~

KICKT1

(212}

000000
000400
GSOFSI-= 000376
G$PRMA= 000001
GS$PRMD
= 000002
GSPRML
= 000000
G$RADA= 000140
G$RADB= 000000
G$RADD*= 00002,
GSRADL
= 000120
G$RADO= 000020
G$XFER= 000004
GS$YES = 000010
HELP
000000
HOE
100000
IBE
010000
IDU
000040
TENBA
000001
IENBB
000020
IENR
120016
IER
020000
= 120015
IFR
IFRCAl= 000002
IFRCA2= 000001
IFRCB1= 000020
IFRCB2= 000010
IFRIRQ= 000200
IFRSR = 000004
IFRT1 = 000100
IFRT2 = 000040
IHILNK
005222
THOLNK
005274
INITT]
004660
INTFLG
002326
INTWCH
002330
= 000004
IRQA
IRGB
= 000002
JRQREG: 123005
= 000100
ISR
= 004000
IXE
IsAY
= 000041
I$AUTO= 000041
TSCLN = 000041
IsOU
= 000041
ISHRD = 000041
I$INIT= 000041
1$MOD - 000041
I$MSG = 000041
- 000040
I$PROT

LODT1C
LOE
=
LOGDEV
=
LoT
=
LSIDCL
LSIHLT=
LU1MOD
L$ACP
LS$APT
L$AU
L $AUT
L$AUTO
LsCCP
LS$CLEA
L$CO
L $DEPO
L$DESC
L$DESP
L $DEVP
L$DISP
LS$DLY
Ls$OTP
L$DTYP
L$OV
L$DUT
L$DVTY
LSEF
LSENVI
LSERRT
LSETP
LSEXP1
L $EXP4
L$EXPS
L $HARD
L$HIME
L sHPCP
LSHPTP
L$HW

L$ICP
LS$INIT
L $LADP
L$LAST
L $LOAD
LSLUN
L$MREV
L $NAME

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$REPP
LSREV
T
L$SOF
L$SPC
L $SPCP
L$SPTP
LS$STA
L$SW
LS$TEST
LSTIM
LSUNIT
L10000
L10001
L10002
L10003
L10004
L1000S
L 10006
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
L 10050
L10051
L10052
L10053

002042

PAGE 81 2

017614
002112
002062
002010
040266
002056
002020
002024
002030
002236
002114
002v14
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
110056
L10057
L 10060

027356
027352
027440

027434

027524
027520
027612
027606
L10063
L 10064
030100
L10065
030230
030360
L 10066
L10067
030514
L10070
030644
030774
L10071
031132
L10072
036112
L10073
033404
L10074
L10075
036110
040116
L10076
037050
L10077
L10100
040114
L10101
040154
040266
L10102
MASCLR
003614
= 000100
MCLR
MLWRI
004332
MPCSR
002352
MPITHAN
005152 G
MPIVEC
002412
MPOHAN
005224 G
MPOVEC
002414
MPRIOR
002416
= 000200
MRDY
MREQ
- 000001
MSTCLR
003762
NEWL IN
o121e21
NEWPC
002500
NEWST
017772
= 000200
NPRABT
NPRAIH» 000075
NPRAIL
= 000074
NPRAIX= 000076
NPRAOH= 000071
NPRAOL
= 000070
NPRAQX= 000072
L10061
L10062

= 000010
NPRBS7
NFRBYTs= 000010

NPRCTL
= 123004
NPRDL = 000044
NPRDLB- 000054
NPRDRH» 123001
NPRORL
= 123000
NPRGO - 000100
NPRIO - 000040
NPRLD = 000004
NULERR
012072
002502
OoLDSP

ORA

=
ORAM
=
ORB
0$APTS»
=
0sAU
»
O$BGNR
0$BGNS»
=
0sDU
OS$ERRT=
O$GNSW+
0$POIN=
0$SETU»

PATA
PATB
PATC
PATCH
PATCM
PATCR
PATD
PATE
PATF
PATG

120001
120017
120000
000000
000001
000000
000000
000001
000001
000000
000001
000000
002504
002526

REDPAG
=
REGNUM
REGO
REG1

002556
,
040266
002624
002604
002644
002674
002724
003040
023776
120014
002350
001000
002000
040233
000000
000040
000100
000140
000200
000240
000300
000340
002324
000001
023616
004064
004176
000001
000003
002334
002420
002422

REG3
REGA
REGS
REG6
REG?
RE SFMC
RESFT3
RESTRT
=
RUN
SELO

002426
002430
002432
002434
002436
003040
003062
0177606
000200
002352

PATGEN
PCR
=

PFLAG
PNT
=
=
PRI
PRIRTY
PRI0O
PRIO1
PRI02
PRIO3
PRIOA
PRIOS
PRIO6
PRIO?7
PSTACK
PU24
=
RCRAM
READ
READI

REDLOC»

REG2

OO0

000002
000001

000041
000041
000041
000041
000041
000041
000041
000041
000041
000167
036204
036114
040000
002322
000010
000002
000020
002000
002110
002036
020400
002070

15:22

none

ISPTAB»
ISPUR =
ISRPY =
I$SEG =
I$SETU=
ISSFT =
ISSRV =
Iss5u8 =
I$TST =
JSIMP =

036146
004576
000200
000372
000003
000400

22-FEB

(nlalalalalqiairlalala
kAT A)

GETT1
GE TWSR
GSCNTO=
G$DELM=
G$DISP=
GSEXCP=
GS$HILI=
GS$LOLI=
GSNO
=
G$OFFS=

]

TABLE

(2 I

SYMBOL

MCTRL DIAG 21

(alala121a 121212121212 121212 (2 12122 12 121 1252121 21 21212121212 1211 1212 12 2 12 1 1 1 A

CNOMAAO DMVl

MACRO M1200

002424

MACRO M1200

CNDMAAO DMV1l MCTRL DIAG &1

TDATA
TMPA
TMPB
TTMPC
TMPD
TMPE
TMPF
TMPO
TMP1
TMP2
TTMP3
TMP4
TTMPS
TMP6E
TMP7
TMPS8
TMPO
TXTMLT
TXTMLO
TXTMLL
TXTML2
TXTMLS
TXTMLA
TXTMLS
TXTML6
TXTML?
TXTVR
TXTVRA

TXTVR1

TXTVR2
TXTVR3
TXTVR4
TXTVRS
TXTVR6
TXTVR?
TXTVRS
TXTVR9
TXT1
TXT2
TXT2A
TXT28
TXT3
TXT4
TXT4A

TXT47C
TXT47D
TXT47E
TXTA7F
TXT47G
TXT47H
TXT47P
TXT48A
TXT488
TXTA48C
TXT48D
TXTS
TMXT6
TXT7?7
TXT7A
TXT8A
TXT88
TXT8C
TXT80
TXT8E
T$ARGC
=
T$CODE
=
TSERRN=
TSEXCP=
T$FLAG*
T$GMANSs
T$HILI=
TSLAST»

MEMORY

014450
017554
014345
014351
014355
014362
014367
014374
014401
014406
014413
014420
013253
013311
013353
013412
013454
013504
013544
007442
007453
007466
007510
007533
007556
007614
010736
010743
010750
010755
013605
013607
013622
013717
014004
014021
014036
014053
014070
000001
002032
000146
000000
000040
000000
000007
000001

000
001

USED:

31952

WORDS

(

125 PAGES)

T$LOLI=

000000

T$LSYM= 010000
T$LTNO= 000034
TSNEST= 177777

T$NSO = 000000
T$NS1 = 000005
T$NS2 = 000002
TS$NS3 = 000003
T$PTNU= 000000
T$SAVL= 177777
T$SEGL= 177777
T$SEKO= 010000
T$SUBN= 000002
T$TAGL= 177777
T$TAGN= 010103
T$TEMP= 000000
T$TEST= 000034
T$TSTM= 177777
T$TSTS= 000001
T$$AU = 010023
T$$AUT= 010020
T$$CLE= 010021
T$$DU = 010022
T$4HAR= 010101
T$$HW = 010000
T$$INI= 010017
T$$MSG= 010025
T$$PRO= 010016
T$$SEG= 010000
T$$SOF
= 010102
T$$SRvV= 010003
T$$SUB= 010100
T$4SW = 010001
T$$TES= 010076
T.EDF = 000001
T.EHRD= 000002
T.ESF = 000000
T.ESFT= 000003
T1
020402 G
TICH
= 120005
TICL
= 120004
TILH
= 120007
T1LHGO= 120005
TILL
= 120006
T1.EMD
020670
T1.EM1
020552 G
T1.HIT
020540
T1.HSB
020550
T1.HSW
020546
T1.0K
020536
T1.1
020717

T1.2

T1.3
1.4
T10

T11
T12
Tie2.
T12.
T13
T13.
T13.
T14
T14.
T14.
T15
T15.
T15.
T1S.
T16
T16.
T16.
T16.
T16.
117
T17.
T18
T18.
T18.
T19
T19, LP
T19. 1
T2
T2CH
TeCL
TaLL
120
T20. LP
T2l
121 LP
T2
123
T24
125
126
127
127
T27.
128
T28.
T28.
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 G
027402
027442 G
027320
027466
027526
027402
027554
021146
120011
120010
120010
027614
027466
030102
027554
030232
030362
030516
030646
030776
031134
0351134
033406
036366
036366
037052
021256

021450

021612
021734

022136
022136
022356
022646
023214
023402
000202
040202
003346
003350
003352
003354
003356
003360
023420
0000¢"
0000¢-.

WO
Wl
We

004310
004322
002246
002256
002260
002262
002264
002250
002252
002254
003322
003324

003326
w3
003330
Wa
003332
WS
003334
W6
003336
W?
003340
w8
003342
W9
002344
XDATA
002314
XORGB
011276
X$HALWA= 000000
X$FALS» 000040
X$0FFSs 000400
XS$TRUE
= 000020
$E
a 000146
SLSTIN= 000001
SLSTTA= 000001
$MPCSR= 160000
sT
= 000034

(a2l

014434
014440
014444

[a1a)

TXTVRO

014430

(a2l

TXTVRB

TXTVRC
TXTVRD
TXTVRE
TXTVRF
TXTVRY

040400
000000
ERRORS DETECTED:
VIRTUAL

SEQ 0202

002464
002466
002470
002472
002474
002476
002440
002442
002444
002446
002450
002452
002454
002456
002460
002462
017532
014105
014111
014125
0141472
014164
014205
014235
014247
014327
014425

ABS.

StLo

SFPTBL
SLTO
SLT2
SLT4
SLT6
SR
STALL
STARST
STREG
SVCGBL
=
SVCINS=
SvCsuB=
SVCTAG=
SVCTST=
SWPBOT=
SWPDDC
=
SSLSYM=

H16

002372
002376
002402
002406
002356
002362
002366
002236
000020
000022
000024
000026
120012
005032
017722
005034
000000
000001
000001
000001
000001
121000
121400
010000
002306

PAGE

oOnO0n

SEL10
SEL12
SEL 14
SEL16
SELS
SEL4

15:22

TABLE

SYMBOL

22-FEB

CNOMAAO DMV11 MCTRL

SYMBOL

TIME:

19748 WORDS

00:08:46

CNDMAA _BIC,CNDMAA_SEQ/CRs
o

MACRO M1200

22 FEB 84

TABLE

DYNAMIC MEMORY:
ELAPSED

DIAG #1

(

75 PAGES)

SP=SV(C34
. MLB/ML,CNDMAA P11

15:22

PAGE

81-4

5EGQ 0203