Digital PDFs

AH-T831A-MC

April 1984

211 pages

Original

93MB

view download

OCR Version

123MB

view download

Document:	CNDMCA0 11-21,DMV-11 DMV11 LINE UNIT DIAG1 AH-T831A-MC JUL
Order Number:	AH-T831A-MC
Revision:	0
Pages:	211
Original Filename:	CNDMCA0__11-21,DMV-11__DMV11_LINE_UNIT_DIAG1__AH-T831A-MC__JUL_1984_gray.pdf

OCR Text

IR LELINE UNET BTREL.

CNOMCAO

Sl
eige e
RH-TB3LA-MC

FICHE 01 GF 0Z

it
.

CHOMCRO

FICHE 07 OF 02

B
CNOMCAO DMVIL LINE UNIT DIAGI

MACRO M1200

27 FEB-84

15:31

S5EG 0001

PAGE 2

LTITLE CNOMCAO DMV11l LINE UNIT DIAG1
.SBTTL PROGRAM DOCUMENT
.REM ¢

IDENTIFICATION
PRODUCT

CODE::

AC-T830A
-MC

PRODUCT NAME:

CNOMCAO DMV-11 LINE UNIT

PRODUCT DATE:

APRIL

MAINTAINER:

ISS DIAGNOSTICS

AUTHORS :

CHRIS BRIENEN
DAVE HOFFMAN

STATIC DIAGNOSTIC PART

1984

RAY MARSHALL

MODIFIED By:

JAKI BERG

9-APR-1983

PURPOSE :

THIS DIAGNOSTIC

IS DESIGNED TO PERFORM STATIC LOGIC TESTS FOR

THE M8053 OR M8064

THE

INFORMATION IN

NOTICE

AND

SHOULD

(HEREAFTER REFERRED

THIS DOCUMENT

SUBJECT

TO AS

THE DMV OR DMV-11)

CHANGE WITHOUT

NOT BE CONSTRUED AS A COMMITMENT By DIGITAL

EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.

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

THE
USE
SUPPLIED

OR
BY

RELIABILITY
OF
DIGITAL
OR ITS

DIGITAL
DEC

TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:

PDP
DECUS

UNIBUS
DECTAPE

MASSBUS

CNDMCAO DMV11 LINE

(NI'

DIAGL

MACRO M1200

'*R R4

1%5:%]1

PAGF

L1
2

PROGRAM DOCUMENT

50
S1

¢sess MODIFICATION HISTORY sseee

'.Sig

REV

REV B:

58
S9
60
61

CvDMCB => CNDMCA
JAKI BERG
9-APR-34
CHANGES WERE MADE TO
CVDMCB
TO PRODUCE
CNDMCA
FOR THE
FALCON-PLUS PROJECT
(SBC-11721+),
CHANGES, MARKED BY ";JB REV A-0", ARE:
- SET THE
ODT BREAK
VECTOR (LOCATION 140) TO THE STARTING ADDRESS OF

2§

ORIGINAL

RELEASE

INSTALLED OUTSTANDING PATCHES

FALCON'S

ODT

ROM (170000 OCTAL).

BRTIENEN,

HOFFMAN,

MARSGHALL

14-JAN-81
11-J0 -83

SEG 0062

CNDMCAC DMVl LINE

UNI'

DIAGL

MACRO M1200

2 FFB B4

1%5:31

PAGE 4

€5 0002

PROGRAM DOCUMENT
66
67

D LRE e S
69

o (R e

CONTENTS

o o

1.0

2.0 HARDWARE REQUIREMENTS

3.0 PRELIMINARY

76
77

4.0 GENERAL PROGRAM CONSIDERATIONS
4.1 DIAGNOSTIC SUPERVISOR

INTRODUCTION

PROGRAM REQUIREMENTS

4.2 EXECUTION TIME

80
81
82
83
84
gg

4.4
4.5
4.6
4.7

5.0 PROGRAM LOAD MEDIA

87
28
89

6.0 OPERATING INSTRUCTIONS
6.1 LOADING AND STARTING PROCEDURES
6.1.1 LOADING PROCEDURES

4.3

XXDP+

ACT/SLIDE
APT
MEMORY MANAGEMENT
ERROR LOGGING

6.1.2 STARTING PROCEDURES

91
92
93

6.1.3 s STEPS FOR QUICK
6.2 INITIAL DIALOGUE
6.3 PROGRAM OPTIONS

6.3.2 RESTART COMMAND

6.3.1 START COMMAND

6.3.3 CONTINUE COMMAND

6.3.4 PROCEED COMMAND

101
102
103

6.3.8 DISPLAY COMMAND
6.3.9 FLAGS COMMAND
6.3.10 ZFLAGS COMMAND

98
99
100
104
105
106
{g;

AND SIMPLE EXECUTION se

6.3.5 ADD COMMAND
6.3.6 DROP COMMAND
6.3.7 PRINT COMMAND

6.3.11 CONTROL CHARACTERS
6.3.12 HARDWARE PARAME TERS
6.3.13 SOF TWARE PARAMETERS

6.3.14 EXTENDED DISCUSSION OF P-TABLE DIALOGUE

fi)g

7.0 TEST DESCRIPTIONS

111
112

8.0 ERROR INFORMATION
8.1 ERROR REPORTING

CNDMCAO DMv11l LINE UNIT DIAGI

MACRO M1200 22 FEB-84 15:31

PAGE 5 -

PROGRAM DOCUMENT

114
115

{12

1.0 INTRODUCTION

118
119
120
2l
122
123
124
125
1g§,

THE
MB0S53
AND MB8064
ARE
SINGLE-LINE SYNCHRONOUS, MICROPROCESSOR BASED COMMUNICATIONS INTERFACES WHICH CAN SUPPORT

128

THE

STATIC

130

SWITCH

OPTIONS,

129

131
132
13
1

135

136

BOTH CHARACTER-ORIENTED (DDCMP, BSC,
ETC.) AND BIT-ORIENTED
(SDLC, HOLC, ETC.) PROTOCOLS. THE PURPOSE OF THIS PROGRAM IS
TO PERFORM BASIC DIAGNOSTIC
TESTING OF
THE
VIA,
FIFO,
AND USYRT (BCP/BOP MODES) ON
THESE
BOARDS.
THE
FOLLOWING
FUNCTIONS
WILL
BE
PERFORMED:
USYRT
REGISTER ADDRESSING,
USYRT REGISTER STATIC BIT INTERACTION AND READ/WRITE TESTING,
AND BASIC BOP AND BCP Tx TESTING (USING THE TSO STATUS BIT).

LOGIC

TESTS

TROUBLESHOOTING CAPABILITIES,

AND

ABILITY

SUCH

WILL

PROVIDE

TIGHT

EXTENSIVE

SCOPE

LOOPS,

“LOCK” ONTO INTERMITTENT

ERRORS.
IN ADDITION
TESTS
ARE
DESIGNED
AND
STRUCTURED
TO
ACHIEVE
MAXIMUM
FAULT
RESOLUTION AND FACILITATE
REPLACEMENT OF THE SMALLEST FIELD REPLACEABLE UNIT.
THIS PROGRAM IS IMPLEMENTED USING THE

AND

A STRUCTURED PROGRAMMING APPROACH.

DIAGNOSTIC SUPERVISOR

BECAUSE THE

DESIGN

137
igg

CONFORMS TO THE SUPERVISOR
(STANDALONE VERSION) THE PROGRAM
IS COMPATIBLE WITH ACT, APT, XXDP+, AND SLIDE.

140
141
142
143

THROUGH
DIALOGUE
WITH
THE
OPERATOR, THE
PROGRAM
ALLOWS
MODIFICATION
OF DEVICE PARAMETERS, SUCH AS LSI-BUS ADDRESS,
VECTOR ADDRESSES AND
DEVICE
PRIORITY,
IN
ADDITION,
THE
OPERATOR
CAN
SPECIFY
PARTICWAR
TESTS
TO
BE
RUN AND A

146

DEVICE ERRORS WILL BE REPORTED AS THEY

1.:;

147
148
149

150
151

igg

154

155
156

VARIETY OF LOOPING, RUNNING, AND REPORTING MODES.

THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE M8053/8064 STATIC

159

CONSOLE TERMINAL

162

{2
165

166

167
168

REPORT

LOGIC TESTS:

SBC-11/21+

{2?

THE

2.0 HARDWARE REQUIREMENTS

157

158

OCCUR.

WILL
INCLUDE A TEST NUMBER AND DESCRIPTION OF THE ERROR,
GOOD AND BAD
TEST DATA,
AND APPLICABLE DEVICE REGISTER
CONTENTS.

16K WORDS OF MEMORY

M8053 OR M8064 COMMUNICATIONS INTERFACE
3.0 PRELIMINARY PROGRAM REQUIREMENTS
THIS

PROGRAM

(CNDMC)

SHOUWLD

BE THE THIRD

OF THE FIVE DMV-11

STATIC DIAGNOSTICS TO BE RUN (CNDMA/CNDMB SHOULD BE RUN FIRST).

ERRORS FOUND IN THIS
PROGRAM SHOULD BE CORRECTED BEFORE RUNNING
ANY OF THE OTHER LINE UNIT DIAGNOSTICS (CNDMD OR CNDME).

1
CNDMCAQ DMVLIL1 LINE UNIT

DIAGI

MACRO M1200

2¢ FFB-84

15:31

PAGE 6

SEQ 0005

PROGRAM DOCUMENT
17

171
172
173
174
175
176
177
178

179

180
181
182
183
184
185
186
187
188
189
190
191
192

193

4.0 GENERAL PROGRAM CONSIDERATIONS

4.1 DIAGNOSTIC SUPERVISOR

THIS

PROGRAM

SUPERVISOR,
SUPERVISOR,

COMPATIBLE WITH THE

STANDALONE DIAGNOSTIC

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

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

THE

COMBINED

4.2 EXECUTION TIME

THE
MAXIMUM
TIME REQUIRED TO RUN
SECONDS PER PASS FOR EACH UNIT.

THIS PROGRAM IS ABOUT

4.3 XXDP+

THIS PROGRAM MAY BE LOADED UNDER xXDP+,

DUMP MODE OR CHAIN MODE.

AND

MAY

RUN

1IN

4.4 ACT/SLIDE

THIS PROGRAM MAY BE LOADED UNDER ACT OR SLIDE AND MAY BE RUN
IN DUMP MODE OR CHAIN MODE.
4.5 APT

THIS PROGRAM MAY BE LOADED
BY
THE
APT
SYSTEM
APT-RD) AND RUN IN PROGRAM MODE OR SCRIPT MODE.

(INCLUDING

4.6 MEMORY MANAGEMENT

MEMORY MANAGEMENT IS NOT UTILIZED IN THIS PROGRAM.
4.7 ERROR LOGGING

AT THE END OF EACH PASS ON ALL UNITS, THE PROGRAM PRINTS OUT
THE CUMULATIVE TOTAL NUMBER OF ERRORS SINCE THE LAST START OR

RESTART COMMAND.

5.0 PROGRAM LOAD MEDIA
THIS PROGRAM

ABSOLUTE

CAN

LOADED

FROM

PAPER

TAPE

USING

THE

PAPER

TAPE

LOADER OR FROM ACT, SLIDE, OR APT SYSTEMS, OR FROM

ANY MEDIA SUPPORTED BY XXDP..

WHEN

USING

ABSOLUTE
LOADER,
THE
PROGRAM
SHOUWLD
BE
LOADED
FIRST,
.
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR.
WHEN USING XXDP., THE
DIAGNOSTIC
SUPERVISOR
SHOULD
BE LOADED FIRST, FOLLOWED BY

{,1

CNDMCAO DMvIi LINE UNIT DIAGL

MACRO M1200

F¢B-84

15:%1

PAGE »

SEGQ 0006

PROGRAM DOCUMENT

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

THE DIAGNOSTIC PROGRAM,

6.0 OPERATING INSTRUCTIONS

6.1 LOADING AND STARTING PROCEDURES
6.1.1 LOADING PROCEDURES
THIS PROGRAM

MAY

LOADED

243
244
245

6.1.2 STARTING PROCEDURES

247

PROCEDURES TO START

246

FROM

PAPER

TAPE

USING

ThHE

STANDARD

DEC

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

THE

PROGRAM

STARTS

LOCATION

THE PROGRAM,

200.

USE

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

B8) RECEIVE DIAGNOSTIC SUPERVISOR IDENTIFICATION AND PROMPT (DRS-C>)
C) ENTER STA<CR>
D) ANSWER HARDWARE AND SOF TWARE QUESTIONS
E) GET END OF PASS MESSAGES OR ERROR MESSAGES
F) TO END EXECUTION, ENTER CONTROL/C

6.2 INITIAL DIALOGUE
AFTER THE PROGRAM AND THE SUPERVISOR ARE LOADED AND THE PROGRAM

IS STARTED,

THE FOLLOWING IDENTIFICATION IS TYPED :

DRS LOADED
DIAG. RUN-TIME SERVICES
CNOMC -A-0

Dr.. -11 LINE UNIT TESTS
gfl‘lf IS M8053 OR M8064

- PART 1 OF 3

THE OPERATOR THEN PROCEEDS BY

TYPING ONE OR MORE OF THE

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

SPECIFICATION).

6.3 PROGRAM OPTIONS

[
=
N

CNDMCAQ DMVl LINE UNIT

DIAGL

MACRO M1200

2 FFB-84

15:31

PAGE

6 ¢

SEGQ 0067

PROGRAM DOCUMENT
284
285
286

6.3.1

289
290
291
292
293
294
295
296

2828088800800 0 0002040000820 000080000000008000008000000002

287
288

297

298
299
300
301
302
303
304
305
306
307
308
309
310
311
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

START

COMMAND

8202080880002 3808000800000 00000000200000000200000000000040000

STACRT)/TESTS:<TEST -LIST>/PASS: <PASS-CNT>/FLAGS:
<FLAG-LIST>/EOP:<INCR>

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

THE NUMBERS RANGE FROM 1

TO THE LARGEST TEST NUMBER

THE

TO EXECUTE ALL TESTS.

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

THE

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

SPECIFICATION.

THE

THIS AND ALL SWITCHES,

OEFAULT

THE ANGLE BRACKETS <> ARE PUNCTUATION

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

IS 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
ég.“fléisfllu; IS A RETURN TO COMMAND MODE.
SEE EXAMPLE
AT

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

IER
IBE
IXE

PRI
PNT

BOE
UAM
ISR
IDU
LOT

HALT ON ERROR, CAUSING COMMAND MODE TO BE
ENTERED WHEN AN ERROR IS ENCOUNTERED
LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO LOOP
CONTINUOUSLY WITHIN THE SMALLEST DEFINED BLOCK
OF CODING (SEGMENT, SUBTEST, OR TEST) CONTAINING THE ERROR
INHIBIT ERROR REPORTING
INWIBIT BASIC ERROR REPORTS
INHIBIT EXTENDED ERROR REPORTS
DIRECT ALL MESSAGES TO A LINE PRINTER
PRINT NUMBER OF TEST BEING EXECUTED

BELL ON ERROR
RUN IN UNATTENDED MODE, BYPASSING MANUAL
INTERVENTION TESTS
INMIBIT STATISTICAL REPORTS
INHIBIT DROPPING OF UNITS BY DIAGNOSTIC
LOOP ON TEST

CNDMCAQO DMV11 LINE UNIT DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE 6-3
SEG 0008

PROGRAM DOCUMENT

THE

FLAGS NAMED OR EQUATED

1 ARE

SET,

THOSE EQUATED

TO 0O

ARE CLEARED.
A FLAG NOT SPECIFIED IS CLEARED.
IF THE FLAGS
é%fg?
Ig 1N(s)f GIVEN ALL FLAGS ARE CLEARED.
SEE EXAMPLE AT

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

<INCR>

IS A DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS OF

PASSES)
IT
IS
DESIRED
THAT
PRINTED.
THE DEFAULT IS AT THE
EXAMPLE AT END OF 6.3.1.5.

THE
END
END
OF

OF PASS MESSAGE BE
PASS.
SEE

EVERY

6.3.1.5 EFFECT OF START COMMAND
THE
EFFECT OF THE START
PARAMETER DIALOGUE, THE

COMMAND TS TO INITIATE THE HARDWARE
SOFTWARE
PARAMETER
DIALOGUE,
AND
THEN THE DIAGNOSTIC TESTS THEMSELVES.

THE

HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION

“@ UNITS?"

TO WHICH THE

OPERATOR

REPLIES

WITH

DECIMAL

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 BUILT.
EACH P-TABLE IS A CORE-RESIDENT TABLE
CONTAINING
ALL
THE
HARDWARE
INFORMATION
FOR ONE UNIT.
THE OPERATOR
MUST SUPPLY N (NUMBER OF UNITS) VALUES
FOR
EACH
QUESTION.
HE
MAY
DO
THIS
BY GIVING ONE ANSWER TO EACH QUESTION (IN
WHICH CASE THE SERIES OF QUESTIONS WILL BE POSED N TIMES) OR
BY
GIVING
N
VALUES, SEPARATED BY COMMAS, TO EACH QUESTION
(SERIES WILL BE POSED ONCE).
EACH QUESTION IS
FOLLOWED
BY
THE
RESPONSE
RADIX
(D
FOR
DECIMAL,
OCTAL, L FOR YES/NO) IN PARENTHESES AND
AFTER THE PARENTHESES.

FOLLOWING

THE HARDWARE QUESTIONS ARE

B FOR BINARY,
THE
DEFAULT

THE

SOF TWARE QUESTIONS

TO BUILD THE SOFTWARE TABLES, WHICH DEFINE THE
MODE
VERIFY ETC.) THAT THE DIAGNOSTIC WILL EXECUTE IN.

WHEN

THE QUESTION

“@ UNITS?”

ALLOCATED FOR THE P-TABLES,

IS ANSWERED,

O FOR
VALUE

AND IF THERE IS

(QUICK

MEMORY STORAGE

NOT

ENOUGH

ACCOMMODATE THEM THE MESSAGE “TOO MANY UNITS” IS ISSUED.
THIS CASE THE DIAGNOSTIC MUST BE EXECUTED MORE THAN ONCE
TEST ALL UNITS.

TO
IN

EXAMPLE:

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

COMMAND

WILL CAUSE

THREE PASSES

70 BE MADE,

EACH PASS

CONSISTING OF TESTS 1,2,3,4,6,8,9, AND 10
EXECUTED
AGAINST
ALL UNITS.
THERE IS NO DIFFERENCE BETWEEN SAYING <FLAG> AND
SAYING <FLAG=1>. THE NOTATION <FLAG=0> IS MEANINGFUL ONLY ON

A
COMMAND
OTHER
THAN
START
TO
CLEAR
PREVIOUSLY SET.
NOTE THAT ON ALL COMMANDS

FLAG
THAT WAS
ONLY
THE
FIRST

CNDMCAO DMV11l LINE UNIT

DIAGL

MACRO M1200

22-FEB-84 15:31

PAGE& 4

SEG 0009

PROGRAM DOCUMENT
398
399

400
401
402
403
404

405

406
407
408
409
410
a11
412

a13

414

415
416
a17
418
419
420
421
422
423
124

425
426
427
428
429
430
431
432
433
a3a
435
436
437
438
439
440

aa1

442
443
aaa
445
446
447
448
449
450
451
452

453
454

THREE LETTERS ARE

SCANNED.

6.3.2 RESTART COMMAND
G400 0040000000000000000R00ERAN00ERAEICRALARIIRRARERAASASS

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

6.3.2.1

TESTS,

<TEST-LIST>»,

COMMAND.

PASS,

AND FLAGS SWITCHES

<PASS-CNT>,

AND

<FLAG-LIST>

ARE AS

IN THE

START

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

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

RANGES OF DECIMAL NUMBERS (0-5, 8-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
INCICATES THE POSITION
OF
THE
P-TABLE
AS
THE
DATA
WAS
ENTERED
DURING THE HARDWARE DIAGLOGUE.
THE UNITS WHICH ARE
SELECTED MUST NOT HAVE BEEN DROPPED
BY
THE
DROP
COMMAND.
SEE
THE DISCUSSION OF ADD AND DROP COMMANDS BELOW.
DEFAWLT
ES TO"!'EST ALL UNITS WHICH HAVE NOT BEEN DROPPED BY
A
DROP

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

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

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

THE OPERATOR.

6.3.3 CONTINUE COMMAND
00844004000 000000000000000000000000000000000000000000000000

CONCTINUE )/PASS: <PASS -CNT/FLAGS: <FLAG-LIST»>
$80004400800000800000000000000008400000400080800000000000000

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

SAME

START

THE UNSATISFIED PASS-CNT FROM

COMMAND,

THE

BUT

THE

START

DEFAWLT

OR RESTART,

CNDMCAQ DMV11 LINE UNIT DIAGL

MACRO M1200

22 FEB-84 15:31

i1
PAGE -5

SEG 0010

PROGRAM DOCUMENT
455
456
457
458
459
460

I¥

NONE REMAINS,

THE DEFAULT

IS NON-ENDING EXECUTION.

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

COMMAND,

BUT

UNSPECIFIED

6.3.3.3 EFFECT OF CONTINUE COMMAND
CONTINUE
MUST
FOLLOW
A START OR RESTART, AND COMMAND MUDE
MUST HAVE
BEEN
ENTERED
DUE
TO
A
HALT
ON
ERROR
OR
A
CONTROL/C.
THE
EFFECT
OF
THE
COMMAND
IS
TO
GO TO THE
BEGINNING OF THE TEST THAT WAS BEING EXECUTED WHEN THE
HALT
OR
CONTROL/C
TOOK PLACE.
SOFTWARE DIALOGUE MAY OPTIONALLY
BE REEXECUTED.
HARDWARE PARAMETERS MAY NOT BE CHANGED.
6.3.4 PROCEED COMMAND
84080840000 000040000000000000000000000000000000000000000040

PROCCEED)/FLAGS: <FLAG-LIST>
S0480000800000000800000000000000000000000000000000000000000

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

<FLAG-LIST> IS AS IN

FLAGS RETAIN

THE

THEIR CURRENT

START

COMMAND,

BUT

UNSPECIFIED

VALUE.

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

THE

COMMAND

FOLLOWING THE ERROR CALL.

PARAMETERS MAY BE ALTERED.

BEGIN

EXECUTION

NEITHER

HARDWARE

THE LOCATION

NOR

SOF TWARE

6.3.5 ADD COMMAND
S0800800080000400000000004000000000000000000000000000000000

ADD/UNITS: <UNIT-LIST>
4884008004008

000000000000004000000000000000000000000000

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 UNITS SPECIFIED ARE ADDED TO THE
TEST
SEQUENCE.
EACH
UNIT
MUST
HAVE
A
P-TABLE
IN
MEMORY
DUE
TO AN EARLIER

CNDMCAO DMVl LINE UNIT DIAGL

MACRO M1200

22 FFEB-84

| 1

15:31

PAGE 6-6
SEG 0011

PROGRAM DOCUMENT

512
513
514
515
516
517
518
519
520
521
S22
523

524
525
526
527
528
529
530
531

532
533
534
535
536
537
538

HARDWARE

DIALOGUE.

THIS

COMMAND

MUST

FOLLOWED

RESTART
OR
CONTINUE.
THE UNITS SWITCH MUST BE
THE ADD COMMAND IS
MEANINGFUL
ONLY
FOR
UNITS
PREVIOUSLY DRUPPED.

SPECIFIED.
THAT
WERE

6.3.6 DROP COMMAND
L

Yy Py
Yy Yy Iy

DROCP)/UNITS: <UNIT-LIST>
S04 004000004000000000000000000000000000000000000000t0ttss

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

COMMAND .

THE

UNITS

SWITCH MUST BE ENTERED.

THIS COMMAND

MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND.
6.3.7 PRINT COMMAND

S488440000800400000000044000000004004000000000000800000400040

PRICNT)
SA480004000400040000040800000000000000004000000000040000004

6.3.7.1 EFFECT OF PRINT COMMAND
THE TOTAL NUMBER OF ERRORS FOR

EACH

UNIT

START
OR
RESTART
COMMAND
ARE
PRINTED.
STATISTICAL REPORTING) FLAG IS CLEARED.

SINCE

THE

LAST

THE ISR (INHIBIT

6.3.8 DISPLAY COMMAND
4484440408080 08804400884408000000080400000000000000000000400

DIS(PLAY)/UNITS:<UNIT-LIST>
S8888884808000080000004080400004040000000000000000000000000

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

IS AS IN THE RESTART COMMAND.

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

OUT

THE

FORMAT

THAT WERE DROPPED BY

ARE

1IN WHICH THEY WERE ENTERED.

THE

OPERATOR

“DROP”

COMMAND

PRINTED

ANY UNITS
ARE

CNDMCAO DMV11 LINE UNIT DIAGL

M1
MACRO M1200

22-FEB-84

15:31

PAGE

6-7
SEG 0012

PROGRAM DOCUMENT

569
570
571
572
573
574
575
576
577
578

579
580
581
582
583
584
585
586
587
588
589
590
591
592

DESIGNATED.

6.3.9 FLAGS CUMMAND
SRA40400400000008080400000400000000000000000000000000000400

FLA(GS)
L4000 800400048008000000000000000040000000000000800400000400

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

6.3.10 ZFLAGS COMMAND
8885288800888 080800888080 0020800008008 0 8804000000004

0000404

ZFL(AGS)
2288808482848 88000 588000808800 00004480 0400000000808 000000440

6.3.10.1 EFFECT OF ZFLAGS COMMAND
ALL FLAGS ARE CLEARED.

6.3.11

CONTROL

CHARACTERS

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

A DIAGNOSTIC CAUSES

A
CONTROL
Z
(Z)
ENTERED DURING ONE OF THE THREE OPERATOR
DIALOGUES- HARD CORE QUESTIONS (SEE
6.2),HARDWARE
DIALOGUE
(SEE 6.3.1.5), OR SOFTWARE DIALOGUE (SEE 6.3.1.5) CAUSES THE

DEFAULTS TO BE TAKEN FOR THE REMAINDER OF THAT DIALOGUE.

A CONTROL O (0) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC
CAUSES
ALL
TELETYPE
OUTPUT
TO
BE
SURPRESSED
FOR
THE
REMAINDER OF THE DIAGNOSTIC OR UNTIL
ANOTHER
0O
IS
TYPED,
WHICH RESTORES NORMAL TELETYPE OUTPUT,

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

DEVICE CSR ADDRESS

THIS IS

ON
THE
(OCTAL),

(0) 1600207

THE ADDRESS AT WHICH THE CSR REGISTERS

LSI-BUS.
THE
ALLOWABLE
RANGE
AND THE DEFAULT VALUE IS 160020.

DEVICE VECTOR ADDRESS

(0) 300 ?

(SELO) RESIDE

160020-177760

CNDMCAO DMV11 LINE UNIT DIAG1

MACRO M1200

22 FEB-84

15:31

PAGE 6-8

SEG 0013

PROGRAM DOCUMENT

626

627
628
629
630
631
632
633
634
635

THIS IS

THE ADDRESS OF

THE

DEVICE.
THE
ALLOWABLE
DEFAULT VALUE IS 300.
5.

INPUT

RANGE

DEVICE PRIORITY LEVEL

INTERRUPT

VECTOR

FOR

IS 000-674 (OCTAL),
'

(0) 4

THIS

AND THE

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

SWITCH PACK & 1 (BOOT ADDRESS):

SWITCH PACK @ 2 (DDCMP ADDRESS):

(0)

0 ?

THESE REPRESENT THE TWO USER MODIFIABLE 8 POSITION DIP-SWITCHES.
IT\R'E %%SHSBLE RANGES FOR BOTH ARE 000-377 (OCTAL), AND THE DEFAWLTS

BOARD TYPE (0=MB0O64,

THIS

THE

1=M8053-v35,

TYPE OF DMV-11 CURRENTLY

2=MBOS3-EIA)

INSTALLED.

NOTE

(0) 0 ?
THAT

THE

M8053 IS SWITCH SELECTABLE BETWEEN V.35 AND EIA.
7.

THIS

BAUD RATE (0=LOW (19.2K),

1=HIGH (56K)):

THE SPEED AT WHICH THE DMV TRANSMITS AND RECEIVES DATA.

IN THE UNIT IS AN M8064, THE ANSWER IS IGNORED (DEFAULTS TO 56K).
IF THE UNIT IS AN MB053, THEN THE ANSWER SHOULD BE BASED ON THE
“SPEED SELECT SWITCH” LOCATED ON THE BOARD.
6.3.13 SOFTWARE PARAMETERS
NO SOFTWARE PARAMETER QUESTIONS ARE ASKED BY PART
STATIC LOGIC TESTS.

THE

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

“@ UNITS?”

ANSWERED

(WITH

THE

NUMBER
N,
SAY)
SPACE IN CORE JS 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 HARDWARE PARAMETER
QUESTIONS AND THE SLOTS IN THE P-TABLE FORMAT.

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

USED TO FILL THAT SLOT IN THE REMAINING P-TABLES.

CNDMCAO DMV11 LINE UNIT DIAGL

be
MACRO M1200

22-FFB-84

15:31

PAGE

6-9

5EQ 0014

PROGRAM DOCUMENT

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

SERIES OF QUESTIONS

REISSUED

UNTIL

LEAST

ONE

QUESTION HAS RECEIVED N EXPLICIT VALUES FROM THE OPERATOR.

IN GIVING
A
STRING
OF VALUES, COMMAS WITHOUT INTERVENING
VALLEDSV:LA&BE USED TO INDICATE
A
REPETITION
OF
THE
LAST
A

STRING

VALUES

MAY

GIVEN

A RANGE

(6-10 FOR

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

TRANSLATES TO THE STRING 6,8,10 (AN INCREMENT OF 2).

NOW LET
US
SEE
HOW
WE
COWD
USE THESE CAPABILITIES TO
CONSTRUCT A SET OF P-TABLES.
ASSUME THAT WE HAVE 16
UNITS,
AND THAT

THERE ARE THREE MARDWARE PARAMETERS FOR EACH ( THREE

SLOTS IN
THE
P-TABLE,
THREE
HARDWARE
QUESTIONS
IN
THE
DIALOGUE).
LET THE DESIRED VALUE FOR THE FIRST PARAMETER BE
THE NUMBER 75 FOR ALL 16 TABLES.
LET
THE
SECOND
PARAMETER
BE
EQUAL

THE DESIRED VALUE
FOR
TO
THE
UNIT
NUMBER

(0,1,2,...,15) EXCEPT FOR UNIT 12, WHICH SHOUWLD RECEIVE
THE
VALUE
11.
LET THE DESIRED VALUE FOR THE THIRD PARAMETER BE
THE NUMBER 76 FOR
THE LAST 9 UNITS.

THE FIRST

7 UNITS AND THE NUMBER

FOR

THE FOLLOWING DIALOGUE WOUWD ACCOMPLISH THIS GOAL:

@ UNITS (D)

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

2?2 75
? 0-6
? 76

UNIT 7
<QUESTION 1> ?
<QUESTION 2> ? 7-11,,13-15
<QUESTION 3> 2 77
THE
FIRST
TIME THE SERIES IS ASKED, SLOT ONE RECEIVES A 75
IN ALL 16 TABLES.
SLOT TWO RECEIVES THE VALUES 0,1,2.....6
IN
TABLES O THRU 6 AND A CONSTANT 6 IN TABLES 7 THRU 15.
SLOT THREE RECEIVES A CONSTANT 76 IN ALL 16 TABLES.
THE SECOND TIME

THRU THE SERIES,

TABLES 7 THRU THE END

ARE

GOING TO BE AFFECTED (NOTE THAT THIS PIECE OF INFORMATION IS

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

BY A <CR>,
THRU 15,

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

SO SLOT ONE STAYS AT CONSTANT

SINCE NO NEW EXPLICIT VALUES ARE

1IN

TABLES

TYPED 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
TABLES

13 THRU 15.

SLOT

THREE GETS

THE

VALUE

77 IN TABLES

TWO
7

s
-

CNDMCAQ DMV11 LINE UNIT'

DIAGL

MACRO M1200

20 FFB 84

15%:31

PAGE

610

PROGRAM DOCUMENT
740
741
742
743
744
745
746

THRU

THE

15,

DIALOGUE

TERMINATED WHEN

THE

SOF TWARE RECOGNIZES

THAT

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

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

22 FEB-84 15:31

PAGE 7

SEG 0016

PROGRAM DOCUMENT
748
749

750

7.0

752
753
754
755
756
757
758
759

1800888020000

751

760
761

TEST DESCRIPTIONS

000000000 RARARAALRRRRRRRLRARREARSRACRRRRARLLARLLANIGARARARGASISLSES

TEST 1

;¢
;¢

THIS
THIS

:*
;¢
;#

INTERRUPT DISABLE IN PROCESSOR STATUS” COMMAND WHILE IN THE MAINTENANCE
LOOP AND THEN CHECKING FOR BIT 7 OF BSEL3 TO BE SET (THE BIT IS SET
BY THE MICROCODE WHEN THE TBMT INTERRUPT OCCURS).

TEST CHECKS THE OPERATION OF
IS DONE BY ISSUEING THE “SET

THE TBMT (IRG) INTERRUPT,
MAINTENANCE INTERRUPT FLAG

AND

CLEAR

1202028200800 000800880008000008000008080000004000000000000000008000008080000000000

762

763

764
765
766
767
768

769

770
771
772
773
774
775
776
777
778
779
780

781
782
783
784
785
786
787
788
789
790
791
792
793
794
795

1088084284000 0248000008000020000000000000000000480200000080000000000000008000000

TEST 2

<SWITCH SETTING TEST»

]

;& SUBTEST #1:
;*

THE

TWO READABLE

SWITCH PACKS WILL BE

SAMPLED AND COMPARED AGAINST

THE

:# VALUES IN THE P-TABLE. AN ERROR IS REPORTED ON A MISMATCH.
g

:* SUBTEST #2:
;*

THE

SPEED

SELECT

SWITCH (SPDSEL)

IS READ

VIA

THE

VIAORA REGISTER

;# AND COMPARED AGAINST THE BAUD RATE VALUE IN THE P-TABLE.

(BIT

PA4)

IF A MISMATCH

;¢ OCCURS IT WILL BE REPORTED. NOTE: THIS SUBROUTINE IS NOT RUN IF AN M8064
:* BOARD IS BEING TESTED (IT ONLY RUNS S6K... MAKING A SPEED SWITCH USELESS).
HE

;¢

THIS

;*#

ALL SUCCESSIVE PASSES WILL SKIP THIS TEST.

TEST

IS ONLY RUN ON THE FIRST PASS AFTER A

"START”

"RESTART",

1288820202820 8842000022888000280000880082000080008000020000000080008000000800000000

190080000000000000000000000000004000000000000000000000000000000000000000000000

;&
s¢

TEST 3
ALL

<USYRT MASTER CLEAR TEST»

REGISTERS

(BIT 6 OF BSEL 1). ALL REGISTERS ARE THEN CHECKED FOR THE PROPER CONTENTS.
THE

BELOW.

LOADED WITH PATTERN E IN THE SAME SEQUENCE AS FOR

PATTERN

;¢

ARE

s3»

THE

INITIALIZED STATE

USYRT

THEN CLEARED BY

THE REGISTERS

A MASTER

IS CHECKED AGAINST

CLEAR

DATA PATTERN F.

PATTERN E:

377,

366.

PATTERN F:

000,

110.

i e

SEQUENCE OF REGISTERS AS USED WITH PATTERNS E € F:

RDSRL, RDSRH,

TDSRL,

TDSRH, PCSARL, PCSARH, PCR, USYRT STATUS REG

182080888888 82488088004000000880888008800008000000080000080083804028040400000000

LR FBLLLPERIIEBELORBIRALE
LB EAL V0L I000RRBLBSL
AR AV AL IEHBVLLIVARBBRIRR

TEST 4

;¢

ALL

REGISTERS
F

ARE

BELOW.

LOADED WITH PATTERN E IN THE SAME SEQUENCE AS FOR

PATTERN

THE

(BIT O & AO00) IN THE 6522 VIA.

USYRT

THEN

RESET

ASSERTING PROGRAM

RESET

ALL REGISTERS ARE THEN CHECKED FOR

[‘,‘1

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200 22 FEB-84 15:31

PAGE A7-1

SEQ 0017

PROGRAM DOCUMENT

805
ggg

;¢

THE PROPER CONTENTS.

AGAINST

THE INITIALIZED STATE OF

DATA PATTERN F,

THE REGISTERS IS CHECKED

808
ggg

i
i

PATTERN E:
PATTERN F:

377,
000,

366.
110.

g%;

SEQUENCE OF REGISTERS AS USED WITH PATTERNS E € F:

gli

RDSRL, RDSRH,

TDSRL,

TDSRH, PCSARL, PCSARH, PCR,

USYRT STATUS REG

815

:“.‘00..“‘..“t...".00.‘.0.“‘0“.““.‘...0000i..‘....‘.“.‘..‘..‘.o.00.00

818

1888858808088 080804008880008400888
0800800000800 000200800880 040000000000000000¢

gég

821
822
823
824
825
826

;#
;»
;*
:*
:*
;#

816
817

827
ggg

;e
;e

TEST S

FIRST, A MASTER CLEAR IS ISSUED, TO INITIALIZE THE USYRT REGS TO
PATTERN F, THEN, EACH REGISTER IS WRITTEN WITH A BYTE OF PATTERN J,
AND AFTER EACH IS WRITTEN, ALL ARE READ AND COMPARED TO THE CURRENT
EXPECTED VALUES. THIS IS PERFORMED FOR ALL REGISTERS -- INCLUDING THE
READ ONLY REGS -- IN ORDER TO MAKE SURE THAT EACH REGISTER ONLY RESPONDS
TO ITS OWN ADDRESS.
PATTERN F: 000, 000, 000, 000,
PATTERN J: 000, 000, CO1, 002,

000, 000, 000, 110
004, 020, 040, 010

830
831

B
T

834
835

ggg

gg{;

SEQUENCE OF REGISTERS AS USED WITH PATTERNS F & J:
RDSRL, RDSRH, TDSRL, TDSRH, PCSARL, PCSARH, PCR, USYRT STATUS REG

(RGALAR LA

;e
HE

ERLA L HALDLE0EEAA020ADLBEAAEBCHL IR CEB AR L EZGL RIS 2GR LKL G BACLELARBGER

TEST 6

ggg

;¢

WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN G.

840

PATTERN

841

;¢

000,

001, 003, 004, 005, 007,

100,

101,

103,

107, 000, 017, 027, 041, 200, 277, 103, 144, 115, 157, 000.

104,

105,

g:g

1888888888488 88828888080280404008408004808880088808080048820880000200800000000040

844
845

1858888888 8488888028084480888480840480282082808080808000008282082800008000000000042

g:g

TEST 7

ggé

i &

ggz

:“.“0“..“.‘0.0..‘.‘0“‘.“...0“‘..“"“‘0.‘.““.".“0“‘.0..“‘.‘.‘.“

855
856

2824508888880 684044432482800488880008888800 0080200020020

gg;

859

860
861

i*
HE

;»
i

WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN H.
%.

TEST 8

PATTERN

CHECKED.

000,

377,

376,

375,

373,

<R./W BIT TEST OF PCR REGISTER»
IS

LOADED

INTO

PCR

(HIGH)

367,

357,

337,

277,

177,

377,

RIB0BAPALAARRRAS

AND THE DATA READ BACK AND

CNDMCAO DMv1l LINE UNIT

e
DIAGL

MACRO M1200

22-FFB-84

15:31

PAGE

7-2

.SEQ 0018

PROGRAM DOCUMENT

862
863
gg;

:#
i+

866

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

868
a69

(88820000840

RARRAR

g;?

867

PATTERN
I:
000,
041, 102, 143, 204, 245, 306,
(L4,
040,
100,
200,
000, 346, 345, 343, 307,
105, 347, 010, 020, 367, 357, 030, 027, 377.

347,
247,

000,
147,

001,
347,

002,
242,

TEST 9

A RAR A AR08

00000 000000000000 00000000000b0btbasts

]

872
87

g;g

;¢
:*

PATTERN
K
IS
LOADED
INTO
TDSR
(HIGH) AND THE DATA READ BACK IS
COMPARED
AGAINST PATTERN L. (UNPREDICTABLE BITS ARE MASKED OFF TO O

WHEN READING FOR COMPARISON.)

876

g;g

:«

PATTERN

000,

377,

376,

375,

373,

376,

177,

377,

000,

001,

002,

000,

017,

016,

015,

013,

016,

017,

000,

001,

002,

004, 010, 200,

125, 252, 000.

679

PATTERN

ggg

004,

010,

000,

005,

012,

000.

882
883
884

:#
;#
;¢

886
887
888

1088828002008

ggé

WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN M.

893

PATTERN

885

ggg

894

ggg

NOTE
THAT
THE
UNDEFINED BITS (12, 13, € 14) ARE MASKED OFF TO 0'S
FOR THE COMPARISON. ALSO THAT BIT 15 IS A READ/ONLY BIT AND CAN'T BE
SET -- THEREFORE SHOULD ALWAYS BE READ AS A O BY THIS TEST.

188288884000 8440804800084008800440088800800000000000004028084882000208084000000400

HL
L

]

;¢

000,

001,

002,

004,

010,

020,

040,

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

100,

200,

000,

377,

188882888824 884208048820800000000884 8082808002 808000000080200008028008000000000000

897
898

1888288440880

901
ggg

;*
;i

ggg

0008088880084808000480000080 0000848000000 8000000000000000400000000

TEST 10 <R/W BIT TEST OF TXDB REGISTER>

HL
: ®

]

828280000800800088000808080080088004800800008084200200000000004840

TEST 11 <PSEUDO R/W BIT TEST OF RXDB>

WRITE, READ (BUT NO COMPARE) OF EACH WORD IN DATA PATTERN H.
PRIMARILY TO PROVIDE A SCOPE LOOP FUNCTION ON THiIS REGISTER.

THIS

905

i«

908
909

1822248084888 8800888822000 0858008000080 00 0808020000020 004000000002200000000000002

ggg

g{g
912

3{2
915

9216
917

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

1888280808880 0248 8888008000008 8400888408048080800828084020800002000048400080000040

TEST 12 <PSEUDO R/W BIT TEST OF RDSR'S HIGH BYTE>

WRITE, READ (BUT NO COMPARE) OF EACH WORD IN DATA PATTERN H.

PRIMARILY TO PROVIDE A SCOPE LOOP FUNCTION ON THIS REGISTER.

s«

PATTERN

:«

000,

001,

002,

004,

010,

020,

040,

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

100,

200,

THIS IS

000,

377,

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

CNDMCAO DMV1l LINE UNIT DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE

7-3

SEG 0019

PROGRAM DOCUMENT
919
920

;..“‘..“.“..0..““““0-““.“C“.‘.‘0‘..““...‘.‘.“0‘.‘..‘..‘0‘....‘0‘0

ggé

923
924
925

;# FIRST, A MASTER CLEAR IS DONE TO INIT THE DMV, THEN, THE T1 TIMER ON THE
;* VIA CHIP IS PROGRAMMED FOR SQUARE WAVE CLOCK GENERATION ON PB7 (BIT 7
;¢ OF VIA OUTPUT REG B), WITH A BAUD RATE = S6 KBAUD. THIS IS THE MODE OF

927
928
929

:* SCANS ORB REPEATEDLY TO MONITOR THE NULL CLOCK BIT, IN THE FOLLOWING
;¢ SEQUENCE :
;* - THE PROGRAM REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE 1 STATE, AND

226

:* VIA OPERATION WHICH IS USED TO GENERATE THE NULL CLOCK.

930
931
932
933

HL
i s
s
:1*

93;
9
936
937
938
939
940
941

THEN,

THE PROGRAM

IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC (A GROSS TIMEOUT
INTERVAL), AN ERROR IS REPORTED. (AT S6 KBAUD, THE CLOCK SHOWLD
HAVE A PERIOD OF ABOUT 18 MICRO-SEC.)
- THE PROGRAM NEXT REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE O STATE,

HL
egogeg IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC, AN ERROR IS
e
;2 - THE PROGRAM NEXT REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE 1 STATE
T
AGAIN, AND IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC,
1 ®
AN ERROR IS REPORTED.
1888483840488 48040000000R000000400000080040008000084000084040004088880400000080408

942

(4888008800080 000400000000000084000080004840008088000000008000408884808000400000

?’:2

945
946
947
948

;#
;#
;#
;#

949

;¢

950

i s

951

952
953
954
955
956

TEST 13 <«NULL CLOCK TEST»>

1 *

;¢

TEST 14 <BCP TX RESET W/IDLE = O»>

THE USYRT IS INITIALIZED FOR “BYTE-CONTROL PROTOCOL"” (BCP) WITH IDLE
SET TO ZERO AND A 125 SYNC CHARACTER IS LOADED INTO S/AR. A 226 SYNC
CHARACTER IS LOADED INTO TXDB SO THAT THE SOURCE OF SYNC CHARACTERS
CAN BE LATER DETERMINED. THE VALID STATE OF THE USYRT REGISTERS IS

READ AND CHECKED. TXE IS ASSERTED TO ENABLE THE TRANSMITTER LOGIC.
THEN,

TXA

TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE OBSERVING

IT SHOUWWLD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.

)
;#
i s
;#
;*

(TXBE SHOULD GO HIGH; AT THIS TIME THE S/AR'S SYNC CHARACTER SHOULD
BE LOADED INTO TXSO AND TSOM IS AGAIN SET -- DRIVING TXBE LOMW.)
THREE SYNC CHARACTERS ARE SENT/RECEIVED: THE FIRST TWO SYNCHRONIZE
THE RECEIVER, THE THIRD IS DIRECTLY READ (STRIP SYNC IS OFF) AND
COMPARED AGAINST 125 (THE S/AR SYNC CHARACTER).

958
959
960
961

s
T
:#
ie

THE USYRT IS THEN RESET AND REGISTERS ARE AGAIN READ AND CHECKED.
THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY
ONE MARK AND THREE SYNC CHARACTERS (FROM THE S/AR) IS TRANSMITTED.
ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN THE

ggz

188488048800 00000408800400000000080040000004080028040008000080088004000000000408

957

962

;¢

965

966

SEQUENCE.

8888848040000 0000000008400080000008004000080000000000004000000000000848000080028

gg;

969

;¢

970

971
972
973
974
975

IF VALUE READ IS 226, THEN TXDB PROVIDED THE SYNC (IE: ERROR).

;#
;#
i
;¢
;*

TEST 15 <«BCP TX RESET W/IDLE = 1>

THE USYRT IS INITIALIZED FOR "BYTE-CONTROL PROTOCOL" (BCP) WITH IDLE

SET TO ONE AND A 226 SYNC CHARACTERS LOADED INTO S/AR AND TXDB.

THE VALID STATE OF THE USYRT REGISTERS IS READ AND CHECKED. TXE IS
ASSERTED TO ENABLE THE TRANSMITTER LOGIC.
THEN, TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE OBSERVING
TXA -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.
(TXBE SHOULD GO HIGH; AT THIS TIME THE TXDB SYNC CHARACTER SHOULD

e
CNDMCAO DMV11l LINE UNIT

DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE

7-4

SEG 0020

PROGRAM DOCUMENT
976
977
978
979
980
981
982
983
984
985
986

987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001

BE LOADED INTO TXSO AND TSOM IS AGAIN SET -- DRIVING TXBE LOW.)
AFTER THE RECEIVER IS SYNCHRONIZED (TWO SYNC CHARACTERS), TxDB IS
LOADED WITH A 125 AND, WITH TSOM STILL = 1 (SYNC SOURCE = TxDB), THE
USYRT IS AGAIN CLOCKED.
AT THIS POINT, IF THE IDLE BIT WORKED, THE VALUE 125 WILL BE READ
BY THE RECEIVER. OTHERWISE A 226 WILL BE READ, INDICATING TXDB WASN'T
PROVIDING THE SYNC CHARACTERS.
WHEN TXBE GOES HIGH AGAIN, THE USYRT

IS RESET.

ALL REGISTERS ARE AGAIN READ AND CHECKED.

THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY
ONE MARK AND THREE SYNCS (226,226,125 FROM TXDB) ARE TRANSMITTED.
SE&?NCIE.OOPIM WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN THE
1288820288048

0284002 0800800004000

1228208800080 20 0028804000000 AR

TEST

16 <BCP

THE

USYRT

HAVE

BEEN

FROM

S/AR.,

RARLRR AR

L2208 20440 00000000040s

0024004000004 00400000000000000

TX UNDERRUN W/TSOM TERMINATION>

IS INITIALIZED FOR BCP WITH IDLE

CONTROLLED

AR LR

UNTIL

TWO

TRANSMITTED.

USYRT,
NO
DATA
IS
CONDITION.
TXU AND
EXPECTED
ASSERTIONS.
SHOUWLD
BE
THE
MARK
THIS SHOULD FORCE THE
WHILE

1 AND TXC

IS MANUALLY

SYNC CHARACTERS AND ONE DATA CHARACTER (000)
AT

THIS TIME WHEN TXBE

IS ASSERTED BY

THE

LOADED
INTO
TXDB
-FORCING
AN
UNDER RUN
TERR
ARE
CHECKED BOTH BEFORE AND AFTER THEIR
AFTER
THE
FIRST
NON-DATA
CHARACTER (WHICH
CHARACTER) HAS BEEN STARTED, IDLE IS SET TO O.
NEXT NON-DATA CHARACTER TO BE A SYNC CHARACTER

THIS SYNC CHARACTER

IS BEING TRANSMITTED,

TSOM IS

ASSERTED
(CLEARING TXU AND TERR) -- IDLE IS LEFT AT 0. TXBE IS THEN
CYCLED
THROUGH AT LEAST ONE MORE SYNC CHARACTER AND THE TEST IS
ABORTED. ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS
WITHIN THE SEQUENCE.

NOTE:

(R0

LSRN AS

BITS SHIFT OUT OF TX LSB FIRST.

(4544324845520

TEST
THE

452

ALEE R L

LRLLBAELALRLEAR20 5200808302208 00088008208048088884

RARRL L5420

4R LEELLELLREEARRESLESGSRBAR
LIRS EOESRS

17 <BCP TX UNDERRUN W/RESET TERMINATION>

USYRT

IS INITIALIZED FOR BCP WITH IDLE

1 AND TXC IS MANUALLY

CONTROLLED
UNTIL
TWO
SYNC
CHARACTERS AND ONE DATA CHARACTER HAVE
BEEN
TRANSMITTED.
AT THIS TIME WHEN TXBE IS ASSERTED BY THE USYRT,
NO DATA
IS LOADED INTO TXDB -- FORCING AN UNDER RUN CONDITION. TXU
AND
TERR
ARE
CHECKED
BOTH
BEFORE
AND
AFTER
THEIR
EXPECTED
ASSERTIONS.
AFTER THE FIRST NON-DATA CHARACTER (WHICH SHOULD BE THE
MARK
CHARACTER)
HAS
BEEN
STARTED,
IDLE IS SET TO 0. THIS SHOWLD
FORCE
THE
NEXT
NON-DATA
CHARACTER
TO
BE
A
SYNC
CHARACTER.
IMMEDIATELY
AFTER
THIS
SYNC
CHARACTER
HAS
BEING TRANSMITTED, A
PROGRAM RESET IS ISSUED AND ALL REGISTERS ARE CHECKED. ERROR

gggéNmCE WILL

DEPEND

FARKLB G LAV SRR AR R R BRI R E B

1208888888840
:*

TEST

WHERE

IR LARE LA AR AR

THE FIRST ERROR OCCURS WITHIN THE
AL AR ARAERL I AR

LIDGA DAL AR LR

AR E

L ER R A NS D

888400888 8040040800 084080800 0800200880800 0008024 0208000040000 0000

18 <«BCP TX DISABLE

TEST»>

CNDMCAO DMV1l LINE UNIT

DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE

7-5

SEG 0021

PROGRAM DOCUMENT

1033
1034
1035
1036
1037
1038
1039

i#
s+
i+
i#
i*

THE USYRT IS INITIALIZED FOR BCP AND A MESSAGE IS STARTED. ONCE THE
SECOND DATA CHARACTER
IS LOADED INTO TXDB TXE IS DROPPED. TxSO IS
WATCHED TO ASSURE THAT THE CHARACTER BEING TRANSMITTED IS COMPLETED.
WHEN IT
IS, THE USYRT SHOULD DROP TXA AND STOP TRANSMITTING -- THE
LAST CHARACTER LOADED INTO TXDB SHOULD BE LOST.

i e

CHARACTERS LOADED:

125 252

1040
1041
1042
1043
1044
1045
1046
1047
1048
1049

1051
1052
1053
1054

;»
THESE CHARACTERS ARE THEN READ OFF OF THE FIFO AND CHECKED. NOTE
;# THAT NO CLOCKS ARE PROVIDED WHEN RECEIVING THE
CHARACTERS SINCE THEY
T agg SUS?LIED BY THE FIFO SUPPORT LOGIC IN GROUPS OF 4 TICKS (WHEN

1050

CHARACTERS

1282888808800

TRANSMITTED:

1228888820800 0400000000000

125

00 0000000000 RARAARLAR AR R AR ARRAL

RRARRRRAR

ARS8

AL AL

RAAR AR ASALASAL LRSS

SARALAAS

TEST 19 <FIFO STACKING CHARACTERS TEST>

;¢

THE

USYRT

SETUP FOR BCP MODE

WITH NO ERROR DETECTION.

;#
THIS TEST BEGINS BY SYNCHRONIZING THE RECEIVER AND THEN PROCEEDS
:# TO FILL THE 8 CHARACTER RECEIVER FIFO WITH THE CHARACTERS:
;s

1/2(SYNCH),000,377,125,252,347,030,303,1/2(074).

;*#

ALSO NOTE THAT DUE TO FIFO TIMING,

TWO

‘'HALF CHARACTERS'

;# INTO THE FIFO (THE 1ST AND LAST CHARACTERS).

ARE LOADED

:““0‘0‘0‘000“.““‘.00“‘.“.‘0..‘0‘.“.0““.‘00.“"...‘.“‘t...t“..‘..‘
B

TEST 20 <BCP CHARACTER LENGTH TEST>

;#
;¢
:;*

]

THE USYRT IS INITIALIZED FOR BCP WITH NO ERROR CHECKING. TXC IS MANUALLY
CONTROLLED UNTIL TWO SYNC CHARACTERS HAVE BEEN TRANSMITTED.
THEN 3
SUBTESTS FOLLOW, EACH ONE USING A DIFFERENT TRANSMIT CHARACTER LENGTH

STARTING AT FIVE

(S5)

AND ENDING WITH SEVEN (7).

TEST PATTERN:

111 222 333 044 155 266 377
L LTy

(EARAERRIERBBEEH SR ASEFAALAA K

TEST 21

<BOP

BRLE B AL I FAILBIEHBE BB

TABORT/(IDLE

= 0)

GG A AER LSO B OB BTG R

R R B &

TEST>

s
s
s#
3¢
s#
;#
s«

THE USYRT IS INITIALIZED FOR “BIT-ORIENTED PROTOCOL" (BOP) WITH IDLE
SET TO ZERO. TXE AND TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE
OBSERVING TXA -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.
NEXT, TXBE SHOULD GO HIGH; AT THIS TIME AN ALL ZEROS CHARACTER WILL BE
LOADED INTO TXDB DRIVING TXBE LOW. THE TRANSMITTER IS CLOCKED THROUGH
ONE CHARACTER. WHEN TXBE GOES HIGH AGAIN, TABORT IS ASSERTED CAUSING
ABORT TO BE TRANSMITTED. ALL CHARACTERS ARE CHECKED AT TXxSO.

;¢
i

FLAGS, ONE ZERO CHARACTER, AND ONE ABORT CHARACTER IS SENT (INTO THE BIT
?gEKgéaOEEEQOR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN

;¢

THIS

TEST

WILL GO NO FURTHER

INTO

THE

TRANSMIT

SEQUENCE

THAT

ONLY

TWO

(4424044840400 048084 44440428040 442000046042428 2488840802044 222004809 080204004

CNDMCAQ DMV11 LINE UNIT

DIAGL

I"ACRO Micusd

22-FEB-84

15:31

PAGE

7-6

SEG 0022

PROGRAM DOCUMENT

1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115

1116
1117
1118
1119
1120
1121

1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146

FRARRRRARARL AR

i e

:#
s#
:*
s¢

:*
:*
s«
s#
i
i

“

A 02 RR L0208 8000000080000
LARLAAAGALAALASLAS

TEST 22

<BOP

TABORT/(IDLE

TEST»

THE USYRT IS INITIALIZED FOR "BIT-ORIENTED PROTOCOL” (BOP) WITH IDLE
SET TO ONE. TXE AND TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE
OBSERVING TXA -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.

NEXT,

TXBE

SHOULD GO HIGH;

THIS

TIME

AN ALL ZEROS CHARACTER WILL BE

LOADED INTO TXDB DRIVING TXBE LOW. THE TRANSMITTER IS CLOCKED THROUGH
ONE CHARACTER. WHEN TXBE GOES HIGH AGAIN, TABORT IS ASSERTED CAUSING
ABORT TO BE TRANSMITTED. ALL CHARACTERS ARE CHECKED AT TXSO.
THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY TWO
FLAGS, ONE ZERO CHARACTER, AND ONE FLAG CHARACTER IS SENT (INTO THE BIT
ggEKgéaoesggofl LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN
.

RN PR

(0SSR ARAAAAASRRRARAL40400000000000004000000080808808000000000040000040

TEST 23 <BOP TX TXGA (TRANSMIT GO-AHEAD) TEST>

:#
;%
:#
;*#
:#
;#
:#

THE USYRT IS INITIALIZED FOR BOP AND TXE IS ASSERTED. TSOM IS ASSERTED
AND TXA OBSERVED -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.
NEXT, TXBE SHOULD GO HIGH; AT THIS TIME AN ALL ZEROS CHARACTER WILL BE
LOADED INTO TXDB DRIVING TXBE LOW. WHEN TXBE GOES HIGH AGAIN, TXGA
IS ASSERTED CAUSING GA TO BE TRANSMITTED. THE SEQUENCE OF EVENTS IS
CONTINUALLY MONITORED WHILE
TXC
IS MANUALLY CONTROLLED AND ALL
CHARACTERS ARE CHECKED AT TXSO. THIS TEST WILL GO NO FURTHER INTO

;#
:#
:#

AND ONE GA CHARACTER IS SENT (INTO THE BIT BUCKET).
ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN
THE SEQUENCE.

THE

AG LR

TRANSMIT

LS4 AL B

SEQUENCE

ERLALRLBA42

THAT

ONLY

0222025400044

TWO FLAGS,

ONE

ZERO CHARACTER

48084424 0008208485838 58400402248%820

(0008040000000 00000000400000000000000000000000000000000000000000000000000000404

TEST 24 <BOP TX MESSAGE WITHOUT CRC»>
.

1090

1091

s#
s*
;¢

THE USYRT IS INITIALIZED FOR BOP MODE WITH NO ERROR DETECTION. TXC IS THEN
MANUALLY CONTROLLED UNTIL TWO FLAG CHARACTERS HAVE BEEN TRANSMITTED. THEN
A 5 CHARACTER MESSAGE IS TRANSMITTED, RECEIVED, CHECKED, AND TERMINATED

:#
i

-- FLAG CHARACTERS SHOULD FOLLOW THE DATA.
(NOTE: NO BIT STUFFING OCCURS IN THIS TEST)

;¢

(WITH TEOM).

A CHECK

IS MADE

TO ASCERTAIN THAT NO CRC

TEST MESSAGE: FLAG FLAG 000 307 125 252 201 FLAG
R

OR VRC

IS GENERATED

(0400400444400 000040040004080000008844000000000008004000000000000004040400

TEST 25 <BOP RX CHARACTER LENGTH TEST»

s#
s#

THE
IS

s#
s#
s«

TRANSMIT CHARACTER LENGTH STARTING AT TWO (2) AND ENDING WITH SEVEN
(7).
IN EACH SUBTEST,
TWO 8 BIT CHARACTERS WILL BE TRANSMITTED
BEFORE
TXCL
IS CHANGED TO THE CHARACTER LENGTH BEING TESTED. THIS

USYRT
IS INITIALIZED FOR BOP WITH CRC-CCITT PRESET TO 1'S. TXC
MANUALLY
CONTROLLED WUNTIL
TWO FLAG CHARACTTRS HAVE
BEEN

TRANSMITTED.

THEN

SUBTESTS

FOLLOW,

EACH ONE

USING A DIFFERENT

K
CNDMCAO DMV1l LINE UNIT

DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE

7-7
SEG 0027

PROGRAM DOCUMENT
RC;
<4

;¢
HE

1149
1150
ligé

i e
i*
e

-- A
MESSAGE
OF
CHARACTERS
WHICH ARE LESS THEN 8 BITS IS
SENT
AS
A
STREAM OF 8 BIT CHARACTERS AND THE REMAINING
BITS ARE SENT AS A CHARACTER OF LESS THEN 8 BITS OR

1153

1154
1155

11. %gg

CORRESPONDS

TO NORMAL

’

HEADER

DATA

BITS

1 &

USAGE

STREAM
IN

WHERE EITHER:

TWO 8 BIT CHARACTERS IS SENT FOLLOWED BY A

OF DATA CHARACTERS WHICH MAY BE LESS THEN 8

LENGTH

(I.E.

S5,

OR 7 BIT

CHARACTERS).

1158

1159

1160
1161

THE

TEST PATTERN IS:

123 321

111 222 333 044

(AR AR A R AL LR AL L4000 8050000 AL 0000000080000

1162

1288288828008

1165

1167

0 004800

TEST 26 <TX

RARRRRRARA AR

AR R AR

155 266 377

00000 000800000 000000000000400000

0840804004000 0000000000

"SPACING SEQUENCE”>

1166

1168

1169

1170
1171
1172

{{;2

THE

TRANSMITTER IS INITIALIZED AND THE

GOES

ASSERTING

BOTH

HIGH

TSOM

&€

“SPACING SEQUENCE” IS FORCED

TEOM AT THE SAME TIME

-- CHECK THE BIT

STREAM FOR ACCURACY (SPACES) AND COMPLETNESS (16 OF THEM).

;R8240 0 At d Rt R

SMALL

MESSAGE

AL RA ARSI L AL 4800522

IS SENT,.

WHEN TXBE

RL LSRR AEALERILIARALEAARSSLLBEANEAAGEELA

TEST 27 <FIFO OVERRUN INTEGRITY TEST»>

1175
1176

;¢ THIS TEST BEGINS BY SYNCHRONIZING THE RECEIVER AND THEN PROCEEDS TO FILL
;# THE 8 CHARACTER RECEIVER FIFO UNTIL RXOR WITH THE CHARACTERS:

1178
1179
1180
1181

;#
;#
;*
;#

1177

1182

1183

1184

i{gg

1187

1188

flgg
figé

(SYNCH),000,377,125,252,347,030,303,074,125.

THESE CHARACTERS ARE THEN READ OFF OF THE FIFO AND CHECKED. OF IMPORTANCE
IS THE INTEGRITY OF THE LAST OVERRUN-CAUSING FIFO CHARACTER (IT SHOWD
REMAIN INTACT).
NOTE THAT NO CLOCKS ARE PROVIDED WHEN RECEIVING THE
CHARACTERS SINCE THEY

;% ARE SUPPLIED BY THE FIFO SUPPORT LOGIC IN GROUPS OF 4 TICKS (WHEN
:;# RDA = 0).

HEE R E R

TEST 28 <BCP RX OVERRUN SET AND CLEAR TEST»>

THE USYRT IS INITIALIZED AND THREE SUBTESTS ARE PERFORMED.

1193

1194

fig‘é

; ®

-- AN OVERRUN CONDITION IS FORCED,

RECEIVER STATUS REGISTER IS

READ TWICE: ONCE TO VERIFY ROR BIT = 1, AND AGAIN TO VERIFY
THAT

THE FIRST READ CLEARED ROR

1197

}..‘1233

1198

2 -- AN OVERRUN CONDITION IS FORCED (BY THE SAME TECHNIQUE USED IN
(2),

THE USYRT IS RESET AND THE PROPER STATE OF ALL REGISTERS

IS VERIFIED.

1201
1202
1203

)

;e
;s
i

-- AN OVERRUN CONDITION IS FORCED (AS ABOVE). RXE IS THEN DROPPED
AND A DELAY IS PROVIDED TO ALLOW TIME FOR THE FIFO TO FLUSH
(CAUSED BY RDA GOING LOW). RXE IS THEN RE-INITIALIZED AND ROR

—

CNDMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

22 FEB-84 15:31

PAGE

SEG 0024

PROGRAM DOCUMENT

1204

1206

1210

(SR RARAAAAARARAARAAASIAREEAE0024400088800884880808888888808000080000400000000

1205

1207
1208
1209

{5{5
1213

g{g

IS CHECKED = 0.

TERMINATED.

THE RECEIVER IS THEN RE-SYNCHED AND THE TEST IS

(AR RALAASAAARARAERAAARELAASRARIAARRE00A02044044000088880000080888000000000000

TEST 29 <«BCP RX SYNC CHARACTER RECOGNITION>

;#
;#

THE

FOLLOWING

MESSAGE

IS INITIATED WITHOUT ASSERTING RXE AND ONCE

THE DATA IS BEING TRANSMITTED,

RXE

IS ASSERTED (IE:

»):

]

1216

{S{Z
1219
1220
1221
1222

SYNC » SYNC DATA DATA DATA SYNC SYNC SYNC SYNC SYNC DATA DATA DATA

SYNC SYNC DATA DATA DATA SYNC SYNC

:#
;#
:1#

THE RECEIVER SHOULD IGNORE THE FIRST STRING OF DATA CHARACTERS, USE
THE NEXT
TWO SYNC CHARACTERS FOR SYNCRONIZATION, THEN PASS THE REST
OF THE MESSAGE (7 SYNC AND 6 DATA CHARACTERS) THROUGH RXDB REGISTER.

(8244288888840 0 4844084888808 00 888088080 888000088088080005080080000000000000000

1223

1224

1225

ggél
1228
1229

{ggg
1232

{ggz

1288848888888 888 8888084850880

:#
;#

1237

1238

{gig
1241
1242

1523

THE

RECEIVER SHOULD IGNORE THE FIRST STRING OF DATA CHARACTERS,

THREE

TWO

SYNC

USE

CHARACTERS FOR SYNCRONIZATION, IGNORE THE NEXT

SYNC CHARACTERS,

AND PASS THE REST OF THE MESSAGE (4 SYNC AND

6 DATA CHARACTERS) THROUGH RXDB REGISTER.

TEST 31 <BCP RX LOST RXE TEST>

1888488888888

;#
;#

%ggg

1251

SYNC SYNC DATA DATA DATA SYNC SYNC

(8884844848888 448888088084880084800084800088440080440808048800004088000008000400

1245
1246
g:;

SYNC = SYNC DATA DATA DATA SYNC SYNC SYNC SYNC SYNC DATA DATA DATA

USYRT
IS INITIALIZED WITH THE STRIP-SYNC CONTROL BIT ASSERTED.
FOLLOWING MESSAGE
IS THEN INITIATED WITHOUT ASSERTING RXE AND

ONCE THE DATA IS BEING TRANSMITTED, RXE IS ASSERTED (IE: #):

1236

THE
THE

1235

00008 0000084080084 40008088488004480088080800008

TEST 30 <BCP RX STRIP-SYNC TEST>

888 4840088888080 4800804888808008800044800888008888480040800004408

THE USYRT IS INITIALIZED (CRC16,STRIPS,BCP MODE) AND A MESSAGE IS STARTED.
WHILE IN THE MIDDLE
OF
TEXT, RXE IS DROPPED AND THE REACTION OF THE
RECEIVER IS MONITORED.

:t‘t‘t‘t‘.‘t‘.t““t““‘t‘““““ttt“00‘Ot.‘tt‘.0..“‘ttt.“.‘t.“‘t““."

22-FEB-84

15:31

PAGE .

SEQ 00

PROGRAM DOCUMENT

1253

1254
1255

8.0 ERROR INFORMATION

1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294

8.1 ERROR REPORTING

1256

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

THE FOLLOWING EXAMPLE PROVIDES A TYPICAL ERROR REPORT, WHICH
DESCRIBES A "MASTER CLEAR FAILURE” ERROR, AND PROVIDES THE PC
OF THE ERROR CALL AND THE DEVICE REGISTER CONTENTS :
CNDMB DVC FTL ERR 00001 ON UNIT 00 TST 002 SUB 000 PC: 021122

MASTER CLEAR FAILURE

THE CONTENTS OF ALL BYTE SELECT REG'S ARE:

sgggo

BSEL1

BSEL4
000

ngblo

000

BSEL2

BSEL3

BSEL12

BSEL13

000
000
BSELS
BSEL6
BSEL7
000
121
000

BSEL11

000
000
000
BSEL14 BSEL15 BSEL16 BSEL17
000
000
000
000

FOR OTHER ERRORS, THE REPORT
MAY
BE
MORE
REQUIRE ADDITIONAL DATA TO BE REPORTED.

EXTENSIVE,

AND

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

HAVE BEEN REPORTED IN THE FOLLOWING SHORTENED FORM :

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

MASTER CLEAR FAILURE
b4

i\
L

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

CNDMCAO DMV11l LINE UNIT DIAG1

N
MACRO M1200

22-FEB-84

15:31

PAGE

SEQ 0026

GENERAL EQUATES AND DS INVOCATION & SETUP
.SBTTL GENERAL EQUATES AND DS INVOCATION & SETUP

: CONTROL LISTING OF HELP INFORMATION

HELP=0

¢ HELP=1
002000

NO LIST

LIST

.=2000
svC

svC
: INITIALIZE SUPERVISOR MACROS

BGNMOD

LU1MOD

$SLSTIN= 1
SLSTTAG= 1
SVCINS=
SVCTST=
SvCSuB=
SVCGBL
=
SVCTAG=
b e

1296
1297
1298
1299
1300
1301
1302
1303
1309
1310
1311
1312 002000
1313
1314
1315 002000
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329

:
:
:
:

LIST
LIST
LIST
LIST
LIST

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

CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH
TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS.
CHANC THE
SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS.
YOU MAY
CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM.

DMv1l LINE UNIT

DTIAGL

MACRO M1200

2 FEB-84 15:31

B2
PAGE 10

SEG 0027

HEADER

.SBTTL

PROGRAM HEADER

'00

+
+
g

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

POINTER BGNAU,BGNDU,ERRTBL
HEADER

CNDMC,A,0,10.,0

103

/C/
/N/
/D7
/M/

/C7

LSREV::

/A/

L$DEPO:
:

/707

LSUNIT::
LeTIM
::
036674

002224

037462

10.

LSHPCP:;

L$HARD

L$SPCP:
:
;
LSHPTP:

LSk

;
LSSPTP:

LSLADP::

LSLAST

L$STA::

L$CO::

LSDTYP::

L$APT::

LSDTP::

LSDISPATCH

LS$PRIO::

LSENVI::
LSEXPL::
003
003

LSMREV:
:
LS$EF::

.BYTE
.BYTE

0
v

CSREVISION
CSEDIT

CNDMCAQ DMVl LINE UNIT DIAGL

MACRO M1200

.
27 FFB-84

15:31

PAGE

SEQ 0028

1348
1354
1355

002110
002112
002112
002114
002114
002116
002116
002120
002120

LSREPP:; ;

LSDEVP:
:

.WORD
. WORD

$OvVTrP

L$SPC::

. WORD
. WORD

000000

LSEXP4: :
©

002052
002054
002056
002056
002060
002060
002062
002062
002064
002064
002066
002066
002070
002070
002072
002072
002074
002074
002076
002076
002100
002100
002102
002102
002104
002104
002106
002106
002110

PROGRAM HEADER

LSEXPS::

LSAUT::

021602

L$DUT:
:

021576

LSLUN::

000000

LS$DESP:
:

003326

LSLOAD:
:

104035

LSETP: ;

002246

LSICP::

021100

LS$CCP::

021574

L$ACP::

021450

LS$PRT::

021072

LSTEST::

000000

L$DLY::

000000

LSHIME::

000000

.EVEN

. WORD

0
L$AU

. WORD

LSOy

. WORD

LS$DESC

EMT

ESLOAD

.WORD

LSERRTBL

. WORD

LSINIT

. WORD

LSCLEAN

.WORD

L$AUTO

. WORD

L$PROT

.WORD

CNDMCAO DMv1l LINE UNIT'

DIAGL

MACRO M1200

022 FEB-8B4

15:31

PAGE

SEG 0029

DISPATCH TABLE
1357
1358
1359 002122

.SBTTL

SLASH

sy
e vy

1360
1361
1362 002122

THE DISPATCH

TABLE

CONTAINS

THE

STARTING ADDRESS OF

EACH

i/ IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST,

TEST,

SLASH

$3/ /780707777777 777777 7277770887777 777777777777772/77777/777777777777

000037
021604
021764
022764
023150
023552

DISPATCH 31.

. WORD
LSDISPATCH:
:

3888558450080500085000855088

1363
1364 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
002212
002214
002216
002220
1365

DISPATCH TABLE

[‘2

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE

SEG 0030

DEFAULT HARDWARE P-TABLE
1373
1374
1375
1376
1377
1378
1379
1380
1381 002222
002222
002224

.SBTTL

DEFAULT HARDWARE P-TABLE

§ILIIIIIIIIIIIIIIIII
/2770000777700 77 7700000777007 77707770707777707777/77777

i/
i/

THE DEFAULT HARDWARE P-TABLE
THE TEST-DEVICE PARAMETERS.

CONTAINS DEFAULT
THE STRUCTURE OF

VALUES OF
THIS TABLE

¢/ IS IDENTICAL TO THE STRUCTURE OF THE RUN-TIME P-TABLE.
§IIIIILLIIIIIIIIII PP

BGNHW

TI PP ILLIIT PP

LPII P70 PP 2002001077270 070707000777700777

DFPTBL
L$HM:
:

002224

1382
1383 002224

1384 002226
1385 002230
1386
1387 002234
1388 002236
1389 002240
1390 002242
1391
1392
1393
1394 002244
002244

. WORD

DFPTBL:
:
. WORD
. WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD

ENDHW

160020
300
4000
000
000
0
0
1

sOMV11 CSR UNIBUS ADDRESS
;DMV11 INTERRUPT VECTOR
:DMV11 INTERRUPT PRIORITY LEVEL
;SWITCH REG. @1 (BOOT ADDRESS)
;SWITCH REG. @2 (DDCMP ADDRESS)
;:MODULLE IS M8064
1H3254EH3255 USED
:BAUD RATE = S6 K

H
:

0 = 19.2 K
1 =56 K

L100CO0:

= 4

L10000
-L $HW/ 2

CNDMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

22-FEB-84 15:31

F3
PAGE 13

SEG 0031

SOF TWARE P-TABLE
{gg?

.SBTTL

1398
1399
1400
1401
1402
1403 002244
002244
002246
002246
1404
1405 002246
002246

§IL1I7077070700770777777077777777770777707077777777777720077777777077707777
3/ THE SOFTWARE P-TABLE CONTAINS THE VALUES OF THE PROGRAM
i/ PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR.
$ILIIIIIIIIIIIIII 2200070007777 0 7070707777000 707070077 7000770770777 7707777

000000

SOFTWARE P-TABLE

BGNSW

SFPTBL
L$SW::
SFPTBL::

ENDSW

L10001:

.WORD

L10001-L$SW/2

CNDMCAO DMV11 LINE UNIT DIAGL
GLOBAL EQUATES SECTION
1407
1408
1409
1410
1411
1412
1413
1414
1415 002246

MACRO M1200

22 FEB-84 15:31

G35

PAGE
14

SEGQ 0032

-- BASIC EQUATES

.SBTTL

GLOBAL EQUATES SECTION

-- BASIC EQUATES

s/ /11 P7I7 7777077777777 7777777777777777777777777772777777772777777/7/7777/7777777777
s/
THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT

ARE USED IN MORE

THAN ONE

TEST.

$I/IIIIII7 772777007727 07 7707770277777 7777727777777777777277777777777777277777772777

EQUALS
:

: BIT DIFINITIONS

BIT15==
BIT14==
BIT13==
BIT12==
BIT1ll==
BIT10==
BITO9==
BITO8==
BITO7==
BITO6==
BITOS==
BITO4==
BITO3==
BITO2==
BITOl==
BITOO==
:

BIT9==
BIT8==

BIT7==
BIT6==

BITS==
BIT4==
BIT3==
BIT2==
BITl==
BITO==

100000
40000
20000
10000
4000

2000
1000

400

200
100

20
10
4

2
1

BITO9’
B8IT08
BITO7
BITO6
BITOS
BITO4
BITO3
BITO2
BITO1
BITOO

's EVENT FLAG DEFINITIONS
s+
EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION
;

000040
000037
000035
000034

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

;

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

EF .PWR==

(004000) A POWER-FAIL/POWER-UP OCCURRED

i
:

000340
000240
000200

[

PRIORITY LEVEL

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

DEFINITIONS

H3
CNDMCAO DMV11 LINE UNIT DIAGL
GLOBAL EQUATES SECTION
000140
000100
000040
000000

MACRO M1200

22 FEB-84

15:31

PAGE

14 -1
SEG 0033

-- BASIC EQUATES
PRIO3== 140
PRIO2== 100
PRIO1== 40
PRIOO== O
B

;OPERATOR FLAG BITS
000004
000010
000020
000040
000100
000200
000400
001000
002000
004000
010000
020000
040000
100000

EVL ==
LOT==
ADR==
IDU==
ISR==
UAM==
BOE==
PNT==
PRI==
IXE==
IBE==
IER==
LOE==
HOE==

4
10
20
40
100
200
400
1000
2000

4000
10000
20000
40000
100000

CNDMCAO DMV11l LINE UNIT DIAGL
REGISTER DEFINITIONS --

1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443

1449
1450
1451
1452

1453

22-FEB-84

MAINTENANCE REGISTERS

.SBTTL
L

15:31

PAGE

13
15

SEG 0034

SELN & BSELN

:* MAINTENANCE REGISTER

-- MAINTENANCE REGISTERS

Yy Yy

@ O

-Y

SELN £ BSELN
Yy Yy Y

VY VYV

YT VY TS

BSELO

PIREAAAAAANAARRAASAAARAEALERARASAEAAARAAAARAAEAIAARARLERAAREEAAREAAREANAS

000020
000001

IEO
IEI

= BIT4
= BITO

;s "INTERRUPT ENABLE OUT"
: "INTERRUPT ENABLE IN"

s BIT 7 IS ALSO USED BY THE MICROCODE.
ITS LABEL IS "RQI” WHICH STANDS FOR
¢ "REQUIST IN”.
IT'S PART OF THE HANDSHAKING FOR USING THE SEL & BSEL REG'S.
: HOWEVER, THE MAINT. LOOP DOES NOT MAKE USE.OF THIS BIT AND IT IS THEREFORE
: UNNECESSARY TO DEFINE IT HERE.
3882808008802 808808080200 0880080000000 000008408000080088802840000000000000000

s+ MAINTENANCE REGISTER ¢ 1

- BSEL1

1180000008000 0000004000000000RRRRRRRASAEALLRRRLRSIAGRSAAAAAEARAEERLSRRARRASS

000200
000100

000301

RUN
=
MCLR
=
MREQ
=
STRTMLOP=
$

BIT?
BIT6
BITO
RUN!MCLR!MREQ

ek L e B LR

s "RUN” & ALSO CONTROLS 6502 MICROPROCESSOR'S RDY STATE
:MASTER CLEAR
+M-LOOP ACCESS
;INITIATE M-LOOP

ASL LS040 UL

0L RLL0400040002004208428538884NL
022 ESBEBLLSEN

:* MAINTENANCE REGISTER @ 2 - BSEL2

1100888000000 00000000000000000000000000000000000000000000000000000000000000000

000200

MRDY

= BIT?

(FABALFSARBS I

1444

1445
1446
1447
1448

MACRO M1200

+M-LOOP READY
BA LA BAEAABCL ARG R ARG LRER R LA IR BB AR

R LI CEL AP AR EAL G E L AR ARG RBARS TS

s# MAINTENANCE LOOP COMMAND DEFINITIONS
000001
000003

000007

(REASSBAB

LSS

REDLOC
WRILOC
REDPAG
WRIPAG
EXECUT
DOTBMT

1
2
3
4
S
7

=
=
=
=
=
=

L LS008 0 6000200000000

88 00 PEASLD00R222AD L0 0bEeE000b0LbbReELS

;READ LOC. W/IN DMV-11 ---- (SEL4) ===> BSEL6
sWRITE LOC. W/IN DMV-11 --- BSEL6 ===> (SEL4)
;READ BLOCK W/IN DMV-11 --- (SEL6) ==s> (SEL4)
;WRITE BLOCK W/IN DMV-11 -- (SEL4) ===> (SEL6)
:SET 6502'S PC AND EXECUTE -- SEL6 ===> PC
;SET MAINTENANCE INTERRUPT DISABLE IN PROCESSOR

;STATUS ---

[KB7)

==> BSEL3

15
CNDMCAO DMV11l LINE UNIT DIAGL
REGISTER DEFINITIONS

1455

1456
1457

1458
1459

1460
1461
1462
1463
1464

1465

22-FEB-84

120400

1500

1501
1502
1503

PAGE

USYRT

120400

SEG 0035

118808008000

-- USYRT

sUSYRT BASE ADDRESS = A100 (HEX)
ARARARRRRALARRR AR LR R AL RAR

AR AR AARR AR LA RAR ARG

ARRSARRASAS

i USYRT "RECEIVER DATA BUFFER"” REGISTER -- READ ONLY
3822800084000

120400

RDSRL

AARR AR AARRARARARRAA

120400

:ADDRESS OF

AR AR

RS RAARAARALLLGALLSRANLG
S

THIS REG

1282888288800 0480000040000 0 0000000000000

00000088

:* USYRT "RECEIVER STATUS” REGISTER

-- READ ONLY

120401

RDSRH

THIS REG

000200
000160
000010

RERR

= BIT7

+ERROR CHECK

ROR
RABGA

= BIT3
= BIT2

;+RECEIVER OVER RUN
+RECEIVED ABORT/GA CHARACTER

000001

100000
002000
001000
000400

ABC

120401

+ADDRESS OF

. 8176'OIT5'BIT4

REOM
RSOM

= BIT1
= BITO

Y Y Y

Y Y

PPy

VPP

=
=
=
=
=

RERCHK
E

s ASSEMBLED BIT COUNT

.3RECEIVED END-OF -MESSAGE
3RECEIVED START-OF -MESSAGE

3BIT DEFINITIONS ON WORD BASIS :

RXERR
RXOR
RXABGA
RXEOM
RXSOM

SARARALIARLALAS

:8IT DEFINITIONS ON BYTE BASIS :

1480

1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499

15:31

USYRT

.SBTTL

1466

1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479

MACRO M1200

BIT15
BIT11
BIT10
BIT9
BIT8

= BITO
R

;¢ USYRT

sRECEIVED
+RECEIVER
+RECEIVED
sRECEIVED
;RECEIVED

CRC/VRC ERROR
OVER RUN
ABORT/GO AMEAD CHARACTER
END -OF -MESSAGE
START
-OF -MESSAGE

+FLAG TO INVOKE RERR CHK IN SUBROUTINE RXCHAR
L

"TRANSMITTER DATA BUFFER” REGISTER

1008848400080 00000000000000000004000000000800000040000000000000000000000000000

120402

TDSRL

120402

+ADDRESS OF THIS REG

1008880000004 4000008000000000000000004000000000000000000000000000000000000000

s USYRT “TX STATUS AND CONTROL” REGISTER

$I0088400000080408000000000040000000000000000000000000000000000000000000000000

120403

TDSRH

000200
000010

TERR
TGA
TAB
TEOM
TSOM

.
=
=
»

TXERR
TXGA
TXAB

= BIT1
- BITII
= BIT10

000002
000001

100000
002000

......

120403

s+ADDRESS OF THIS REG

:85}
DEFINITIONS ON BYTE BASIS :
BITS
BIT2

BIT1
BITO

: TRANSMITTER UNDERRUN ERROR
s TRANSMIT GO AHEAD
s TRANSMIT ABORT
s TRANSMIT END -OF -MESSAGE
s TRANSMIT START
-OF -MESSAGE

:BIT DEFINITIONS ON WORD BASIS :

s TRANSMITTER UNDERRUN ERROR
s TRANSMIT GO AHEAD
s TRANSMIT ABORT

CNDMCAO DMV1l LINE UNIT DIAGL
REGISTER DEFINITIONS

1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541

1542
" 1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568

- -

001000
000400

MACRO M1200

22-FEB-84

15:31

PAGE

1<%

16-1

SEG 0036

USYRT
TXEOM
TXSOM

= BIT9
= BITS8

s TRANSMIT END -OF -MESSAGE
s TRANSMIT START
-0OF -MESSAGE

PIRRR0R00ARRRREAARAAARARRARARARARRASEARAAAAAAARISE0AAAALLAS0RREEERSARAAAAS

i# USYRT "SYNC/SECONDARY ADDRESS” REGISTER
1108882042000

120404
000226

PCSARL
SYNCH

0 0000 RRA LA AR

= 120404

:*# USYRT

AASAIRERRLR 0000000000000

:STANDARD SYNCH CHARACTER

AR A RARRA SRR RS0

RRARA AR

S KAR

0800200000000

00000000400

“MODE CONTROL"

1305828408800

PCSARH

;ADDRESS
OF THIS REG

= 226

3088288000000

AARAAARA

0 000000000

120405

AR AR AR RAAS R AR AR AL

:ADDRESS OF

240000000000 000000000ss

THIS REG

:BIT DEFINITIONS ON BYTE BASIS:
APA
PROTO

STRIP
SECAD
IDLE

xvyZ

= BIT?
= BIT6

= BITS
= BIT4
= BIT3

s "ALL PARTIES ADDRESS” ENABLE
s+SPECIFIES BOP/CCP PROTOCOL -- O = BOP

:STRIP EXTRA SYNC'S IN CCP MODE, SEE GA CHARS IN BOP
s SECONDARY.ADDRESS MODE -- BOP MODE ONLY
sIDLE € SYNC CHAR. TRANSMISSION CONTROL

. BIT2'BIT1'BITO sCRC/PARITY SELECTION CONTROL

:BIT DEFINITIONS ON WORD BASIS:
APAD

DOCMP
STRIPS
SECADR
IDLES
CRC16
NOCHK
EVRC
OVRC

= BIT15

=
=
=
=
=
=
=
=

s "ALL PARTIES ADDRESS" ENABLE

BIT14
:CODE FOR DDCMP MODE
BIT13
sSTRIP EXTRA SYNC'S IN CCP MODE. SEE GA CHARS IN BOP
BIT12
s SECONDARY ADDRESS MODE -- BOP MODE ONLY
BIT11
sIDLE € SYNC CHAR. TRANSMISSION CONTROL
BIT9!BITS
sCODE FOR CRC-16 SELECTION
BITIO'BIT9'BIT8 sCODE FOR NO ERROR CHECKING
BIT10!BIT8
:CODE FOR VRC EVEN CHECK
BIT10
sCODE FOR VRC 0DD CHECK

F088888000040400000000800000444040000000000000000000000008808000000000000080840

:* USYRT “DATA LENGTH SELECT” REGISTER

3188888888 248808288208042808008808808840080880000
0800880000000 2808800004800004000

120407

PCR

120407

:+ADDRESS OF THIS REG

$BIT DEFINITIONS:
000340
000020
000010
000007

TXDL

= BIT7!BIT6!BITS

RXDL

= BIT2!BIT1!BITO

EXADD
EXCON

= BIT4
= BIT3

; TRANSMIT DATA LENGTH SELECTION

sEXTENDED ADDRESS FIELD -- NOT USED OR TESTED
sEXTENDED CONTROL FIELD -- NOT USED OR TESTED
;RECEIVER DATA LENGTH SELECTION

5880858884880 888884880884808088804045040004
8800800000800 08800000000000080000R2

:# USYRT STATUS REGISTER (ADDR. A400)

Fi00AAAEEA0EA0004000040040400008000800
800080000000 000000000000000000000000

122000

USTATR =

122000

tUSYRT STATUS REGISTER ADDRESS

sBIT DEFINITIONS;

= A400 (HEX)

L3
CNDMCAO DMV11 LINE UNIT DIAGL
REGISTER DEFINITIONS

1569
1570
1571
1572
1573
1574
1575
1576

000200
000100
000040
000020
000010
000004
000002
000001

MACRO M1200

22-FEB-84

15:31

PAGE

16-2

USYRT
RDA
TBMT
RXACT
RSA
TS0
TXACT
TXU
SFR

BIT7
BIT6
BITS
BIT4
BIT3
BIT2
BIT1
BITO

;RECEIVER DATA AVAILABLE

: TRANSMITTER BUFFER EMPTY

;sRECEIVER ACTIVE
;RECEIVER STATUS AVAILABLE
s TRANSMITTER SERIAL OUTPUT
s TRANSMITTER ACTIVE
: TRANSMITTER UNDERRUN

$ SYNC/FLAG RECEIVED

SEG 0037

M3
CNDMCAO DMV11l LINE UNIT DIAGL
REGISTER DEFINITIONS

1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601

1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622

MACRO M1200

22-FEB-84

15:31

PAGE

SEQ 0038

-- €522 VIA CHIP

120000

.SBTTL

VIA

= 120000

-- 6522 VIA CHIP
:VIA BASE ADDRESS

= AQ00 (HEX)

Y Y YV

Y Y Y

:* MODEM & MAINTENANCE CONTROL -- "ORB” 8 BIT PORT B -- WRITE ONLY

PIRAAAAARARARARAEALARARRAAARAEANARNIRARARRAAAAANAAA0A0000000000000000000000

120000

VIAORB

000200
000100

NULCLK
RXEN
TXEN

= BIT?7
= BITé
= BITS

s "NULL CLK L” -- NULL CLOCK
: "RXENL” -- USYRT RECEIVER ENABLE
s "TXENL"” -- USYRT TRANSMITTER ENABLE

RTSND
HDX
TTLOOP
PRESET
DTRL

= BIT3
= BIT2
= BIT1
= BITO
=0

: "RTSND” -- REQUEST TO SEND
3 "HDX" -- HALF DUPLEX
s "SELECT TTL LEVEL LOOPBACK"
s "PRESET H” -;:DTR IS ASSERTED LOW

000020
000010
00C002

DTR

120000.

:ADDRESS OF THIS REGISTER

= BIT4

-- HEX

: "DTR” -- DATA TERMINAL READY

ANREERERLAARDLB A AR AL AR L LR LSRR AE AR

A SR L L0405

004L 020000 KBBARARSEL0BRD

;* MODEM STATUS REGISTER -- “ORA” 8 BIT PORT A -- READ ONLY
1588888088800 0

VIAMS

= 120001

RING
CARIER
MDMRDY
SPEED
CTS

BIT?
BIT6
BITS
BIT4
BIT3
BIT2
BIT1

=
=
=
=
=
=
RCVD&T .=

UMAINT

= BITO

= AOXO

L8000

8000808000804

+ADDRESS OF THIS REGISTER

0 0440008000000 000 8

-- HEX = AOX1

: "RING H" -: "CARRIER H" -s "MODEM RDY H" -: "BAUD RATE SWITCH -- (19.2K/56K)
:"CTS H -- CLEAR TO SEND
+ "TEST MODE H" -: "RCV _DATA H" --

s SELECT USYRT INT LOOPBACK #+SELECT BITs»

1IRAAAAASAAAAAARARASAAAAAAASAAEAAEEAERAERAERAARA0RARASEA0RREAR0RA0RSRRRREEES
;# DATA DIRECTION FOR PORT B -- "“DDRB" -- READ/WRITE

$108000A0AAAAAAEESARAAAAAAA00000000040400000000000000044000840000000000000408

120002

VIADPB

:+
;

1623

sADDRESS OF THIS REGISTER -- HEX = AOX2

ALL BITS ARE DEFINED THE SAME:
THE BIT SETTING DEFINED THE DIRECTION OF ITS RELATED BIT IN BIT PORT B

1624

= 120002

INITIALIZED TO 377 (HEX = FF) -- PORT B IS READ/WRITE

1625
1627
1628
1629
1630
1631
1632
1633
1634

(1088480440404 04080004004000000808000404444004000084048008880000000000000000400

;+# DATA DIRECTION FOR PORT A -- “DDRA” -- READ/WRITE

Fi88A84A4000004
4044444000000 0000404004000000000000000000000

120003

VIADPA

i
i

= 120003

;ADDRESS OF THIS REGISTER -- HEX = AOX3

ALL BITS ARE DEFINED THE SAME:
THE BIT SETTING DEFINED THE DIRECTION OF ITS RELATED BIT IN BIT PORT A

CNDMCAO DMV11l LINE UNIT DIAGL
REGISTER DEFINITIONS

22-FEB-84

15:31

PAGE

17-1

SEQ 0039

-- 6522 VIA CHIP

1635
1636
1637
1638

1639
1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658

MACRO M1200

;

INITIALIZED TO 001 (HEX = O1) -- PORT A IS READ ONLY (EXCEPT FOR

BITO WHICH ENABLES USYRT INTERNAL LOOPBACK).

138888800000 RARARRRRRR AR R AR AR AR R AR AL AR AL AR AL AAR AR AR SRR

;¢ TIMER 1 LOW ORDER (LATCH & COUNTER)
L

120004

VIATIA

120004

A28

“TiL-L" & "T1C-L”

;ADDRESS OF

THIS REGISTER

04000000000000

-- WRITE & READ
T

-- HEX

= AOX4

WHEN WRITING, LOW ORDER LATCH IS LOADED.
WHEN READING,

LOW ORDER COUNTER IS READ.

AR AAEISLAADR A RAARSALARBA AN RS QAL R LA S AL AR A AL L ARBB LA LA ARAAARBARAS LS4 L 0L 200D

:» TIMER 1 HI??EOQDEQ COUNTER & TRIGGER --

Ko S

"TiL-H AND TRIGGER” & "T1C-H"

(22202422204 RBLREERRLRABBRARRAL AR FRAAASABEEAKABIRRAS B A LSS ARASE L2 ABAAA GRS

120005

VIAT1B

120005

;ADDRESS OF THIS REGISTER

-- HEX

= AOXS

¢+

WHEN WRITING; HIGH ORDER LATCH IS LOADED, BOTH LOW & HIGH ORDER LATCHES

WHEN READING, THE HIGH ORDER COUNTER IS READ.

ARE LOADED

INTO THE COUNTER,

AND

THE COUNTER IS STARTED.

s TIMER 1 LOW ORDER LATCH --

"TiL-L" -- READ/WRITE

100084404844 044400400400008000000000
4000088040450 00000000004404000000000040004

120006

VIATIC

s+
+

= 120006

sADDRESS OF THIS REGISTER

THE LOW ORDER LATCH IS READ OR LOADED.
COUNTER WHEN T1MODE (IN VIAACR) = 3

$ i ALAAAAREAAEELEAL AR AL LA LSRR AL AR

-- HEX = AOX6

THIS LATCH IS USED TO LOAD THE

SR LA SA S

LB ALRAr v hS

AR LB AL AR BB

AR KT LA EAK

s# TIMER 1 HIGH ORDER LATCH -- “T1L-H" -- READ/WRITE

FI0888044400004000400000000400000000000440000440000000004004040000000000444040

120007

VIAT1D

;
;#

120007

:ADDRESS OF THIS REGISTER

THE HIGH ORDER LATCH IS READ OR LOADED.
COUNTER WHEN T1MODE (IN VIAACR) = 3

EE T

;# TIMER 2 LOW ORDER (LATCH & COUNTER)

120010

VIAT2A

120010

-- HEX

= AOX7

THIS LATCH IS USED TO LOAD THE

"T2L-L" &

;ADDRESS OF

"T2C-L"

THIS REGISTER

-- WRITE & READ
Y

-- HEX

Py Py P

= AOX8

Py Py

B
CNDMCAQ DMVI1 LINE UNIT DIAGL
REGISTER DEF INITIONS

TIMER 2 :gg?EOEOS:nSOUNTER

120011

VIAT28

120011

"T2L-H AND

TRIGGER”

"T2C-H"

sADDRESS OF

THIS REGISTER

HEX

= AOX9

WHEN WRITING; HIGH ORDER LATCH IS LOADED, BOTH LOW & MIGH ORDER LATCHES
ARE LOADED INTO THE COUNTER, AND THE COUNTER IS STARTED.

WHEN READING,

THE HIGH ORDER COUNTER IS READ.

150000000000000000000000000000000000000000000000000000000000000000000000000000

3¢ SHIFT REGISTER --

"SR”

-- READ/MWRITE

11000000000000000000000000000000000000000000000000000000000000000000000000000s

120012

VIASR

120012

1+ADDRESS OF

THIS REGISTER

HEX

AQOXA

SHMIFTING IS CONTROLLED BY THE SETTING OF VIASRC (ACR2 ---> ACR4) IN VIAACR

1300800880008 000002000000000000000000000000000000000000000000000000000000000000

:¢ AUXILIARY CONTROL REGISTER --

"ACR” -- READ/WRITE

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

120013

VIAACR

000300

TIMODE

= BIT7!BITé

120013

sADDRESS OF

:8IT

s O
s 1

sCONTROL

s
T2MODE

THE MODE OF

TIMER @

= AOXB

1 IN ONE-SHOT MODE

sCONTROLS THE MODE OF

TIMER o 1

PULSE COUNTING MODE
INTERVAL TIMER MODE

= BITA!BIT3!BIT2
Nawh-=O

-- HMEX

TIMER 1 IN CONTINUOUS SQUARE WAVE MODE

= BITS

SRMODE

TIMER

3 O
s 1
000034

THIS REGISTER

PB7 DISABLED -- ONLY T1TO IN VIAIFR REFLECTS TIMEOQUT
PB7 & T1TO REFLECT TIMEOUT

;BIT 6:

1737

1748

TRIGGER

i+
:

1731

1747

€

110000000000000000000000000000000000000000000000000000000000000000000000000000

1732
1733
1734
1735
1736

1741
1742
1743
1744
1745
1746

SEG 0040

1108008000000 00000000000000000000004000000000000000030000000000000000000s0000000

1730

1738
1739
1740

17 2

WHEN WRITING, LOW ORDER LATCH IS LOADED.
WHEN READING, LOW ORDER COUNTER IS READ.

1727
1728
1729

¢
¢

1726

PAGE

- 6522 VIA CHIP

1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725

15:31

1704

22 FFB -84

1692
1693
1694
1695
169¢
1697
1698
1299
1700
1701
1702
1703

MACRO M1200

sCONTROLS THE MODE OF THE SHIFT REGISTER

SR DISABLED
SHIFT IN UNDER CONTROL OF T2, SHFT PULSES GEN'D ON CB1
SHIFT IN AT SvS, CLOCK RATE, SHFT PULSES GEN'D ON CB1
SHIFT IN UNDER CONTROL OF EXTERNAL INPUT PULSES
SHIFT QUT -- FREE RUNNING -- RATE CONTROLLED By T2
SHIFT QUT -- RATE CONTROLLED By T2 -- PULSES ON CB1

CNDMCAQ DMLl LINE UNIT DIAGL
REGISTER DEFINITIONS

MACRO M1200

(. FFEB-84

C4
15:31

000002
000001

1758

1765
1766
1767
1768

1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779

PBLENB
PALENB

SHIFT QUT -SHIFT OUT - -

iPB LATCH CONTROL
tPA LATCH CONTROL

= BIT1
= BITO

-- 1 ENABLES LATCH
-- 1 ENABLES LATCH

3308008008000 00020000000000000000000000000000000000000008000000000080000800000s

1* PERIPHERAL CONTROL REGISTER

"PCR"”

-- READ/WRITE

1308880008000 00000000000000000000000000000000008000000000000000000000000000000

120014

VIAPCR

000340

CB2CTL
CBICTL
CA2CTL

= BIT7!BIT6!BITS
= BIT4
= BIT3!BIT2!BIT1

000016
000001

CAICTL

s+ADDRESS OF THIS REGISTER -- HEX = AOXC

1CB2 MODE
:CB1 MODE
:CA2 MODE
:CA1 MODE

= BITO

SELECT
SELECT
SELECT
SELECT

358088808882 8880800000080000000008008000000000080000200000000000000000000000002

s INTERRUPT FLAG REGISTER --

“IFR"

-- READ ONLY

3388808808800 2800280000000000808000080000000000000000000000080000000000000000000

120015

VIAIFR

000200

FLGIRQ

= BIT7.

FLGT1
FLGT2
FLGCBL
FLGCB2
FLGSR
FLGCA1
FLGCA2

=
=
=
=
=
=
=

sADDRESS OF THIS REGISTER -- HEX = AQOXD

120015

1SET WHEN A FLAG IN THIS REG. GOES HIGH AND
s ITS CORRESPONDING BIT IN VIAIER IS SET.
1(I.E. VIAIER IS THE ENABLE REGISTER FOR THE
tFOR THE SETTING OF IRQ AND THE ISSUEANCE OF
tAN INTERRUPT TO THE 6502 WHEN IRQ IS SET.)

1780

1781
1782
1783

1784
1785
1786

1787

1788
1789
1790

1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803
1804
1805

SvS, CLOCK RATE -- PULSES ON CB1
UNDER CONTROL OF PULSES APPLIED TO CB1

s TIMEOUT OF TIMER 1

BITé
BITS
BIT4
BIT3
BIT2
BIT1
BITO

s TIMEOUT OF TIMER 2
sACTIVE TRANSITION OF PIN 1
sACTIVE TRANSITION OF PIN 1

sCOMPLETION OF 8 SMIFTS

sACTIVE TRANSITION OF PIN 4
sACTIVE

TRANSITION OF PIN 3

V®»

1764

1759
1760
1761
1762
1763

6522 VIA CHIP

1749

1750
1751
1752
1753
1754
1755
1756
1757

PAGE

1500880000000 04000000000000000000000000000000000000000000000000000000000000000

s* INTERRUPT ENABLE REGISTER --

"“IER”

-- READ/MWRITE

120016

VIAIER

sADDRESS OF THIS REGISTER -- HEX = AOXE

000200

INTSC

= BIT?

1308882808808 880084880004000802828080000080008082000200080000082000000000000000000402

120016

WHEN WRITING THIS REG.,

1CONTROLS THE SETTING OR CLEARING OF BITS IN
;THE REST OF IER.
IF = O THE OTHER BITS IN
1 THIS REG., IF SET, WILL CLEAR THEIR RESPECTIVE
;BITS IN THE INT. ENAB. REG..
IF = 1, THE
tRESPECTIVE BITS WILL BE SET.
THE COMMENT ABOVE HOLDS.

D4
CNDMCAQ DMV1I1 LINE UNIT

DIAGL

6522 VIA CHIP

- -

1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816

1817
1818
1819
1820
1821
1822

1823
1824
1825
1826

MACRO M1200

(¢ FFB-84

15:31

PAGE

17 4

SEG 00az

WHEN READING THIS REG.,

THE CURRENT STATE OF

THE

INT.,

ENABLE REG.

;

THE BIT ASSIGNMENTS ARE

THE SAME AS FOR VIAIFR AS DEFINED ABOVE.

IS RETURNED.

10 80802080 0 0080R0RRRRLLRARRRRAAALRSRRARALALRARSALRRALAAGARLALALLRGLALLLIS

:¢ OUTPUT REGISTER A

"ORA”

READ ONLY

(OR READ/WRITE UNDER CONTROL

“DDPA")

110080000000000000000000000000Ntiltttttttttiitittststsitissinittssssssssssssssasss

120017

VIAORA

:
:

= 120017

sADDRESS OF THIS REGISTER -- MEX = AOXF

THIS ADDRESS ACCESSES THE SAME DATA AS “VIAMS" EXCEPT THAT NO “HANDSHAKING"
WILL TAKE PLACE (I.E. THERE IS NO CHANGE IN IRQ OR CA2 AS A RESWLT OF
READING ORA THROUGH THIS ADDRESS)

;THE BIT ASSIGNMENTS ARE THE SAME AS FOR “VIAMS” ABOVE.

CNDMCAQ DMV11 LINE UNIT DIAGL
REGISTER DEFINITIONS

22 FEB-84

15:31

PAGE

4
18

SEG 0042

- MISC

1828
1829

.SBTTL

1830

1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853

MACRO M1200

1100000800000 00000000000

-- MISC
Rt ttttattatatttteaiesittsittsstsstsssinssssisssnss

i+ SWITCH PACKS
130 8 0 80 0

121000
121400

00000 0000000000000 0000000000000 RARRLRSRLARRRRSRGYS

SWPBOT
= 121000
SWPDDCMP = 121400

; "BOOT ADDRESS” SWITCH PACK [A200]
: "ODCMP ADDRESS” SWITCH PACK [A300]

sMISCELLANEOUS EQUATES
001000

100000

TCCHEK
RAMADR

= BIT1S
= 001000

000002
000001

EIAV35S
INTGRL

= BIT1
= BITO

040000
001000

NCRXEN
NOLOOP

= BIT14
= BIT9

:KILL RXEN DURING “INITRN"
sILL TYLOOP DURING “INITRN”

000200

NCTBMT

= BIT?

;DISABLE INITIAL TBMT=0 CHECK IN TXCHAR

100000

NOCRDA
NFCRDA

= BIT1S
= BIT14

:DISABLE INITIAL RDA=0 CHECK IN RXCHAR
:DISABLE FINAL RDA=1 CHECK IN RXCHAR

020000

NCRACT

= BIT13

+FLAG TO REQUEST H3254,5 CHECK
:STARTING ADRS OF RAM PAGE 2 (ADRS 0200 HEX)

s SELECT v.35 OR EIA 423/232C
s SELECT INTEGRAL MODEM

;DISABLE RXACT=1 CHECK AFTER CLOCKING (RXCHAR)

CNDMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

4
22 -FFEB-84

15:31

PAGE

SEG 0044

GLOBAL DATA SECTION
2113
2114
2115
2116
2117
2118

.SBTTL

§ILVILITIILIIIIIIIP0PI7
7707070720070 7 7700707707777 07 7000077777777 70077/777777
i/
THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED
Y4
IN MORE THAN ONE TEST.
/11T IIII7777 7777777777777 7777777777777702777777777777777777777777777777/777777

2119
2120
clz2l
2122

100880808000

RARALRARLRAR LR AR AR AR

+ CONTROL BLOCK FOR STACKED ERROR MESSAGES
$--288288204 0000020000000

2123
2124 002246

002262
002262
002264

002266
002266
002270
002270
002272
002272
002274
002274
002276
002300
002302
002304
002306
002310
2151 002312
2152 002314
2153
2154 002316
2155
2156
2157 002336

.WORD
.WMORD
.WORD
.WORD

1588828888802

LR LAARRARRASLARRAARAASS

O
O
0
O

000000004000 000000000

LSERRTBL:
:

008000000000 0000000000000 08800 8000882000000 000000004000000000040

:* STORAGE FOR DEVICE REGISTERS

118888880088 824000040040408080880800280008800000842000000002000400800004000000

WSRO:

BSRO:
WSR2:
BSR1:
WSR4:
BSR2:
WSR6:

BSR3:

WSR10:

BSR4;

WSR12:

BSRS:

WSR14:

BSR6:
WSR16:
BSR7:
BSR10:

.WORD

:STORAGE FOR DEVICE CSR REGISTERS

LU RRRRERR

2125
2126
2127
2128
2129 002256
2130 002256
2131 002260

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

RRRRRARARR

00 0000400000080 00 0000400000000

ERRTBL

.BLK

002246
002246
002250
002252
002254

2133
2134
2135
2136
2137
2138
2139
2140
2141
2142
2143
2144
2145
2146
2147
2148
2149

GLOBAL DATA SECTION

.BLKW

:THE FIRST 7 ARE FOR THE USYRT'S ACTUAL

16.

:STORAGE FOR VIA REGISTERS FOR PRINTOUT

sREGISTERS.
THE LAST ONE IS FOR THE STATUS
sREG. (USTATR).

CNDMCAO DMv1l LINE UNIT

DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE 20

SEG 0045

GLOBAL DATA SECTION

2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193

1580088080808 00 0000000004000

TDATA:
GDATA:
BDATA:

.WORD

SCRACH:
LOGDEV:

.
.

XDATA:

REGNUM:
PSTACK:
PRIOR:

SUBRPC:
INTFLG:

.
.

ERRFLG:

TIMFLG:
RETADR:
REDBYT:
WRIBYT:

LOADAT:
GOODAT:
BADDAT:

FRSTIM:

SAVEA4:
SAVEG6:
ERROR1:

CHPTYP:
SAVLEN:

DEVMAP: .
DEVPTR:
UNIT:
STARES:
TSTNUM:

00A0ARLRSARARAAAARALA

ARG ARAS

STORAGE
OO0O0COO00000O

2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179

MISCELLANEOUS

CO0000000O000000O00000

2164
2165
2166

(2082424020000

2159
2160
2161
2162
2163

0 0000004000000

RAARARRSLSAAL LSRR S

: TEST DATA
;GO0OD DATA

;BAD DATA
sEXCLUSIVE-OR BETWEEN GOOD AND BAD DATA
;GEN'L PURPOSE SCRATCH WORD
;:LOGICAL DEVICE NUMBER
sCONTAINS A DEVICE REGISTER NUMBER
sCONTAINS BASE LEVEL PROGRAM STACK POINTER
sCPU PRIORITY FOR PRINTOUT
;:PC OF SUBR CALL FOR ERROR REPORTS
s INTERRUPT RECEIVED FLAGS
BIT O FOR TX, BIT 1 FOR RCvV
:
s SUBROUTINE ERROR FLAG
sEVENT TIME-OUT FLAG
:SUBR ERROR RETURN ADDRESS
;LO BYTE CONTAINS BYTE READ FROM LU REG
sLO BYTE CONTAINS BYTE TO LOAD INTO LU REG
sCONTAINS TEST DATA LOADED INTO REG
:STORAGE FOR EXPECTED DATA
;:STORAGE FOR ACTUAL DATA
:FLAG=0 IF PROGRAM JUST LOADED
sSAVE LOC 4 HERE (ERROR TRAP VECTOR)
:SAVE LOC 6 HERE (ERROR TRAP VECTOR)
sSUBR ERR. BIT FLAGS (DEF'D IN GLOBAL EQUATES)
sUSYRT CHIP TYPE,

=0 FOR SMC, ELSE

;SAVED TX AND RCV CHAR LENGTHS
:BIT MAP OF ACTIVE DEVICES
;DEVICE MAP BIT POINTER
sCONTAINS UNIT NO. (1 TO N)
sFLAG TO SHOW NO. OF PASSES SINCE STA OR RES
;NO. OF CURRENT TEST (FOR SOME TESTS)

CNDMCAO DMV11 LINE UNIT

DIAGL

MACRO M1200

22-FFB-84

15:31

PAGE 21

SEQ 0046

GLOBAL DATA SECTION
TRy

BSELO:
SELO:
MPCSR:
BSEL1:
BSELZ2:
SELZ:
BSEL3:
BSELA:
SELA4:
BSELS:
BSEL6:
SEL6:
BSEL7:
BSEL10:
SEL10:
BSEL11:
BSEL12:
SEL12:

BSEL13:
BSEL14:
SEL14:
BSEL1S:
BSEL16:
SEL16:
BSEL17:

MPIVEC:
MPOVEC:
MPRIOR:

LUSWIL:
LUSWI2:
BRDTYP:
TSTCON:
BDRATE
:

CURRENT DEVICE PARAMETERS

42000000000

. WORD
.WORD

160020
160021

:POINTER T0 DMV1l CSR'S
;POINTER T0 BSEL1

.WORD
.WORD

160022

160023

;POINTER 10 SEL2
;POINTER T0 BSEL3

.WORD
.WORD

160024
160025

sPOINTER T0 SCL4
sPOINTER T0 BSELS

.WORD
.WORD

160026
160027

sPOINTER T0 SEL6
sPOINTER T0 BSEL7

.WORD
. WORD

160030
160031

sPOINTER T0 SEL10
;POINTER T0 BSEL11

.WORD
.WORD

160032
160033

:POINTER T0 SEL12
sPOINTER T0 BSEL13

.WORD
. WORD

160034
160035

;POINTER T0 SEL14
;POINTER T0 BSEL15

.WORD

160036
160037

;POINTER 10 SEL16
;POINTER T0 BSEL17

. WORD
.WORD
. WURD
. WORD
.WORD
. WORD
. WORD

. WORD

300
304
240

0000

2195
2196 002472
2197 002472
2198 002472
2199 002474
2200 002476
2201 002476
2202 002500
2203 002502
2204 002502
2205 002504
2206 002506
2207 002506
2208 002510
2209 002512
2210 002512
2211 002514
2212 002516
2213 002516
2214 002520
2215 002522
2216 002522
2217 002524
2218 002526
2219 002526
2220 002530
2221
2222 002532
2223 002534
2224 002536
2225 002540
2226 002542
2227 002544
2228 002546
2229 002550
2230
2231

:OMV11l INPUT INTERRUPT VECTOR

;:OMV11 OUTPUT INTERRUPT VECTOR
:OMV11 DEVICE PRIORITY
sLINE UNIT SWITCH PACK o1
sLINE UNIT SWITCH PACK #2

:0=M8064,

1= M8053/v.35,2=MB053/EIA

s TEST CONNECTOR

INDICATOR

:BAUD RATE = 56 K
0 =

19.2 K

1 = 56K

CNDMCAO DMV11 LINE UNIT

DIAGL

MACRO M1200

T4
22-FEB-84

15:31

PAGE 22

SEG 0047

GLOBAL DATA SECTION

002642
002642
002643
002644
002645
002647
002650

002651

: TABLE OF USYRT REGISTER ADDRESSES
s ADDRESS OF
.WORD
120400

USYREG:

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

120401
120402
120403
120404
120405
120407
122000

jsssss STORAGE FOR DATA READ
REDDAT: .BLKB
8.
it

REGO:
REG1:
REG2:

RDSRL

s ADDRESS OF RDSRH
sADDRESS OF TDSRL
:ADDRESS OF TDSRH

:ADDRESS OF PCSARL

1ADDRESS OF PCSARH
:ADDRESS OF PCR
;:ADDRESS OF USYRT STATUS REG
IN ADDRESS

GEN’L PURPOSE SCRATCH STORAGE

TESTS #esss

8840

.WORD
.WORD
.WORD

0
0
0

REGA:

. WORD

REG6:
REG7:

.WORD
.WORD

0
0

;seess

SCRATCH S TORAGE FOR MESSAGE REPORTING

TTMMP2:
TTMMP3:
TMPA4 ;

. WORD
.WORD
.WORD

REG3:
REGS:

002640

120400
120401
120402
120403
120404
120405
120407
122000

TMPO:
TTMP1:

TMPS ;
TMP6:
TTMP7:

.WORD
.WORD

0
0

. WORD
.WORD

0
0

.WORD
.WORD
.WORD

0
0
0

#sssse

0
0
0

;essss INBUS LU REG BIT MASKS FOR UNPREDICTABLE BITS sssss

w
~
~

002552
002554
002556
002560
002562
002564
002566
2241 002570
2242
2243
2244 002572
2245
2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2256
002622

g £83888

2233
2234
2235
2236
2237
2238
2239
2240

UPBITS:

TOSRNRW:

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

377
000
000
360
000
000
347
200

s MASK FOR
s MASK FOR
FOR
FOR

RDBR
RDSR
TDBR
TDSR

FOR SSAR

FOR PCSAR
FOR PCR

NON-R/W BITS

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

22 -FEB-84

15:31

PAGE

4
SEQ 0043

DATA TEST PATTERNS

PATE:

377
377
377
377
377
377

002652
002652
002653
002654
002655
002656
002657
002660
002661

.SBTTL
DATA TEST PATTERNS
;#e42s DATA PATTERN E #2esss

002666
002667
002670
002671

.BYTE
.BYTE
.BYTE
BYTE
.BYTE
BYIE
.BYTE
.BYTE

377
377
377
377
377
377
377
366

DATA PATTERN F

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

PATG:

.BYTE

;ss48¢

125
252
377

001

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

PATH:

sesss

000
000
000
000
000
000
000
110

;#4422 DATA PATTERN A

002672
002672
002673
002674
002675
002676
002677
002700
002701
002702
002703
002704
002705
002706
002707
002710
002711
002712
002713
002714
002715
002716
002717
002720

002721
002721
002722
002723
002724
2333 002725
2334 002726

PATF
:

002665

8888388

;2es4+

002662
002662
002663
002664

—
—

2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303

IYY
Y

000
001
003
004
005
007
100
101
103
104
105
107
000
017
027
041
200
277
103
144
115
157
000

DATA PATTERN H #s42s

.BYTE
BYTE
.BYTE
.BYTE
.BYTE
.BYTE

125
232
000
377
000
001

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

o
AV

<4
FEB-84

15:31

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
AYTE
SYIE
.BYTE
.BYTE
.BYTE
.BYTE

002
004
010
020
040
100
200
000
377
376
375
373
367
3557
337
277
177
377
000

PAGE

23-1

DATA TEST PATTERNS
2335 002727
2336 002730
2337 002731
2338 002732
2339 002733
2340 002734
2341 002735

2342 002736
2343 002737
2344 002740
2345 002741
2346 002742
2347 002743
2348 002744
2349 002745
2350 002746
2351 002747
2352 002750
2353 002751
2354
2355
2356 002752
2357 002752
2358 002753
2359 002754
2360 002755
2361 002756
2362 002757
2363 002760
2364 002761
2365 002762
2366 002763
2367 002764
2368 002765
2369 002766
2370 002767
2371 002770
2372 002771
2373 002772
2374 002773
2375 002774
2376 002775
2377 002776
2378 002777
003000
003001
003002
003003
003004
003005
003006
003007
003010
003011
003012

002
004
010
020
040
100
200
000
377
376
375
373
367
357
337
277
177

;os4s4 DATA PATTERN I sssss
PATI:

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

.BYTE

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

000
041
102

143

204
245
306
347
000
001
002
004
040
100
200
000
346
345
343
307
247
147
347
242
105
347
010
020
367
357
030
027

377

;o444 DATA PATTERN J #444s

SEG 0049

L 4
CNDMCAO DMV11 LINE UNIT

DIAGI

MACRO M1200

22 FEB-84

15:31

PAGE 23-2

DATA TEST PATTERNS
PATJ:

003013
003013
003014
003015
003016
003017
003020
003021
2400 003022
2401
2402
2403

2392
2393
2394
2395
2396
2397
2398
2399

.BYTE
.BY

.BYTE
.BYTE
.BYTE

2404
2405
2406

2407
2408
2409
2410
2411
2412
2413
2414
2415
2416

2417
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430

2431
2432
2433
2434
2435
2436
2437
2438
2439
2440

.BYTE
.BYTE

377

000
000

003

020
040
010

;ass4s DATA PATTERN K
PATK:

sasssa

;#sss+ DATA PATTERN L
PATL
:

ssssa

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

000
377
376
375
373
376
177
377
000
001
002
004
010
200
125
252
000

000
017
016
015
013
016
017
017
000
001
002
004
010
000
005
012
000

SEG GOS0

M4
CNDMCAC DMV11 LINE UNIT

DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE 24

e tas

DATA TEST PATTERNS
2442
2443
2444
2445
2446
2447
2448
2449
2450
g:gé

2453
2454
2455
2456
2457
2458
2459
2460
2461
2462
2463

003065
003066
003067
003070
003071
003072
003073
003074

000
003
014
060
001
007
037
177

003075
003076
003077
003100
003101
003102
003103
003104
003105

000
140
030
006
100
160
174
177

;242442 DATA PATTERN Q #%#+44
PATQ:
.BYTE
000
.BYTE
003
'
.BYTE
014
‘.BYTE
060
.BYTE
001
.BYTE
007
.BYTE
037
.BYTE
177
;*2s44% DATA PATTERN INVERTED Q #+44s
PATGB:
.BYTE
000
;s INVERTED 000
.BYTE
140
;s INVERTED 003
.BYTE
030
;s INVERTED 014
.BYTE
006
s INVERTED 060
.BYTE
100
: INVERTED 001
.BYTE
160
;: INVERTED 007
.BYTE
174
;s INVERTED 037
.BYTE
177
;s INVERTED 177
ENDPAT:
.EVEN

(7
(7
(7
(7
(7
(7
(7
(7

BIT)
BIT)
BIT)
BIT)
BIT)
BIT)
BIT)
BIT)

CNDMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

22 FEB-84 15:31

PAGE 25

SEG 0052

DATA TEST PATTERNS

2465
2466
2467

2468
2469 003106
2470
2471

2472

2473

;44 RECEIVED DATA BUFFER (64.
RCVBUF: .BLKW
64.

WORDS) ##s

ki
'

CNDMCAQ DMVLIL1 LINE UNIT

DIAGL

MACRO M1200

22 FEE-84

15:31

PAGE 26

SEQ 0057

GLOBAL TEXT SECTION

2475

.SBTTL

GLOBAI

2477

||
THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,
MESSAGES, AND ASCII INFORMATION THAT ARE USED IN

2476

2478
2479

;8
s

2480

& o

SL U

—

MORE THAN ONE TEST.

2481
2482
2483

;ienddsupudedddddsdaEsisriddrcddssyissnsdsdesddcsidddEsugssUrNnssesddsdsuaNsEdaae

2485

110000000000000000000000000000000000000000000000000000000000000000000000000000

1100000000000000000000000000000000000000000000000000000000000000000000008000800

2484

1 NAMES OF DEVICES SUPPORTED BY PROGRAM

2486 003306

DEVTYP

003306
003306
003311
003314
003317
003322

115
065
117
115
066

070
063
122
070
064

LSDVTYP:
LASCIZ

060
040
040
060
000

2487

=MBOST OR M8064s

.EVEN

2488

$100000000000000000000000000000000000000000000000000000000000000800008000000008¢

2490

11000000000000000000000000000000008000003000000000000000000000000000000000080000

2489

;¢ TITLE OF PROGRAM

2491

2492
2493 003326
003326

STS

TEXT SECTION

003326

- PART

1 OF

003331
003334
003337
003342

003345
003350
003353
003356
003361
003364
003367
003372

2494

2495
2496

000012

.RADIX

104

115

126

055
040
116
125

061
114
105
116
040
123
040
120
124
040
040

061
111
040
111
124
124
055
101
040
117
063

124
105
123
040
122
061
106

000

000010

10.
DESCRIPT

<DMV-11 LINE UNIT
_

.RADIX

TESTS

- PART

i OF

LSDESC::

.ASCIZ

.EVEN

/DMV-11 LINE UNIT TE

CNDMCAQ DMVI1 LINE UNIT DIAGL
GLOBAL SUBROUTINE

MACRO M1200

22 FFB-84

e
15:31

PAGE

SEG 0054

SECTION

LSBTTL

GLOBAL SUBROUTINE SECTION

.SBTTL

....M-LOOP

-- MSTCLR

-- MASTER CLEAR AND ENTER M-LOOP

100000000000 000000000000000000000000000000000000000000000000000000000000008000

+
&

MSTCLR -- MASTER CLEAR & ENTER M-LOOP
CALLING SEQUENCE:

PC,MSTCLR
N$

H
H

JSR
8CC

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE

:
o

;s N$:

ERROR

s IF NO ERROR OCCURED, PROCEED WITH ROUTINE

sAN ERROR MESSAGE HAS BEEN STACKED:

PRINT IT

(I.E. CKLOOP)>

<RESUMPTION OF NORMAL PROCESSING»

:--‘oooooooooo.ooooooooo.ooooooooooooooooooooooo‘aooooooooaooooooooooooooooo-o
112777
010346
012703
077301
012603

000301

177072

000030

18:

132777
001023
004737
012737

000200

177054

004210
000301

002400

012737
012737
012737
012737
000261

000001

000401
000241
000207

013211
017030

MSTCLR: MOVB

002246
002250
002252
002254

9%:

s INITIATE M-LOOP

MOV
MOV

R3,-(SP)
024, ,R3

BITB
BNE
JSR
MOV
GTOF

OMRDY ,B8BSEL2
:DID THE M-LOOP FINISH
Ss
sYES,
GOOD.
RETURN
PC,.GETWSR
tGET BYTE SELECT REGISTERS
ORUN!MCLR!MREQ,GDATA
s IDENTIFY REQUESTED FUNCTION
EM3,.ERR4
: “MRDY" TIMEOUT
H
QUEUVE “DEVICE FATAL” ERROR ¢ 1
MOV
MOV
MCV
MOV

S08
MOV

SEC

S$:

SRUN!MCLR!MREQ,SBSEL1

R3,18
(SPY.,R3

B8R

RTS

cLe

sWAIT FOR THE M-LOOP TO FINISH THE OPERATION

sSET CARRY TO INDICATE ERROR

oT _EDF ,ERRTYP
01 .ERRNBR
QEM3 ,ERRMSG
OERR4 ,ERRBLK

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

CNDMCAQ DMv11 LINE UNIT

ceeM-LOOP
2546
2547
2548
2549
2550
2551
2552
2553
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566
2567
2568
2569
2570
2571
2572
2573
2574
2575
2576

- -

DIAGL

22 FEB-84

15:31

PAGE

SEQ 0055

READ

.SBTTL

....M-LOOP

-- READ

300.““.‘..“‘.“.‘.“..“‘.‘..‘..“.“.“0‘.‘.....0...0.0‘.....‘.....0.0...0

READ

THE

SPECIFIED ADDRESS WITHIN

THE

OMV-11

(M8053)

CALLING SEQUENCE:

JSR

RS,READ

:
;
:

_WORD
.WORD
BCC

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE MEKE

: N$:

ERROR

<ADDRESS OF REGISTER WITHIN DMV-11>
<DESTINATION ADDRESS WITHIN LSI-11>
NS
sIF NO ERROR OCCURED, PROCEED WITH ROUTINE

;AN ERROR MESSAGE MAS BEEN STACKED:
(I.E.

PRINT IT

CKLOOP)>

:—-‘.“‘...‘...‘..“‘.“.‘.‘..““.““...".‘..“‘0‘0.0“...0‘..0‘00.“‘.‘0.‘
003476
003502

012577
112777

003510
003512
003516
003520

010346
012703
077301
012603

003522
003530

132777
001023

000200

176746

003532
003536
003544

004737
012737

004210
000001

002400

003544
003552
003560
003566
2577 003574
2578 003576
2579
003600
2581 003602
003606
2583

012737
012737
012737
012737
000261
000401

000001

2585
2586

MACRO M1200

000241
117735
000205

177000

000001

176766

000050

013235
017030

176700

READ:

MOV

MOVB

OREDLOC,@BSEL2

1%:

MOV
MOV
S08
MOV

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

BITB

BNE
JSR
MOV

GTOF

002246
002250
002252
002254

(RS)+,8SELA

;SETUP SOURCE POINTER

;TELL M-LOOP TO GIVE US THE REQUESTED DATA

;WAIT FOR THE M-LOOP TO FINISH THE OPERATION

OMRDY,SBSEL2

:DID THE M-LOOP FINISM

EM4,ERR4

: "MRDY"” TIMEOUT

<
sYES, GOOD. RETURN
PC,GETWSR
;GET BYTE SELECT REGISTERS
OREDLOC,GDATA ; IDENTIFY REQUESTED FUNCTION
:

QUEUE “DEVICE FATAL” ERROR & 2
MOV

MOV
MOV

SEC

S$:
68:

B8R

cLe
MOVB

SBSEL6.3(RS)+

RTS

MOV
;INDICATE AN ERROR HAS BEEN STACKED

{RETURN WITH THAT INDICATION

;INDICATE “NO ERROR”
;PUT DATA WHERE CALLER WANTS IT
sRETURN

T _EDF ,ERRTYP

02 . ERRNBR
9EM4
, ERRMSG

QERR4 ,ERRBLK

CNDMCAO DMVl LINE UNIT DIAGL
<+« .M-LOOP

MACRO M1200

PAGE

SEG 0056

.SBTTL

....M-LOOP

-- READ IMMEDIATE

P40000000400000000080000000000R000000A0RRRLR0REARREARACASA0ILGRARAR0RACEIANAS

READI

READ

IMMEDIATE

THE SPECIFIED ADDRESS WITHIN

THE DMv-11

(M80S3)

: CALLING SEQUENCE:
:

:
:
;

JSR
.WORD
.WORD

R5,READI
<ADDRESS OF REGISTER WITHIN DMV-11>
<DESTINATION -- CONTENTS OF REG. IS PUT HERE>

8CC

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE

:
:

s NS$:

ERROR

s+ IF NO ERROR OCCURED, PROCEED WITH ROUTINE

sAN ERROR MESSAGE HAS BEEN STACKED:
(I.E.

PRINT IT

CKLOOP)>

:--ot.oocooo‘oooooo.aooooooooooo‘ooooooooooooooaooooooooo.oooaooaooooaoooo..o.
003610
003610
003614
003622
003624
003630
003632

2614 003634
2615 003642

2616
2617 003644
2618 003650
2619 003656

003656
003672
003700
003706
2621 003710
2622
2623 003712
2624 003714
2625 003720
2627
2628
2629

15:31

-- READ IMMEDIATE

2588
2589
2590
2591
2592
2593
2594

2595
2596
2597
2598
2599
2600
2601
2602
2603
2604
2605
2606
2607
2608
2609
2610
2611
2612
2613

22 FEB-84

012577
112777

176666
000001

010346
012703

000050

077301

READI:

176654

1%:

012603

176634

132777
001023
004737
012737

004210
000001

012737
012737
012737
012737
000261
000401

000001

000241
017725
000205

013235
017030

176566

002400
002246
002250
002252
002254

MOV
MOvVB

(R5).,8SELA4
OREDLOC,8BSEL2

MOV
MOV
S08
MOV

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

8IT8
BNE

OMRDY ,8BSEL2
Ss

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

JSR
MOV
GTOF

PC,GETWSR
OREDLOC,GDATA
EM4 ERR4

sGET BYTE SELECT REGISTERS
s IDENTIFY REQUESTED FUNCTION
: "MRDY” TIMEOUT

SEC
BR
S$:

6$:

CLC

MOV

RTS

8SEL6,(R5).

:SETUP SOURCE POINTER
;;TELL M-LOOP TO GIVE US THE REQUESTED DATA
;WAIT FOR THE M-LOOP TO FINISH THE OPERATION

QUEUE "DEVICE FATAL" ERROR ¢ 3

MOV
MOV
MOV
MOV

s INDICATE AN ERROR HAS BEEN STACKED
sRETURN WITH THAT INDICATION
s INDICATE

“NO ERROR"

tPUT DATA WHERE CALLER WAWTS IT

sRETURN

T .EDF ,ERRTYP
93 ,ERRNBR
0EMA4 ,ERRMSG
#ERR4 ,ERRBLK

CNDMCAQC DMV11 LINE UNIT DIAGL
ve..M-LOOP

MACRO M1200

22-FEB-84

.SBTTL ....M-LOOP -- WRITE

P8R

ggz

: WRITE
3

2635

2636

2637

BCC
ERROR

: N$:

26‘6

RAARALARINALAAL LRG0

00000

CALLING SEQUENCE:

:
:
:

N AR RRA 000002000000

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

RS,WRITE

22?“;

RRA AR AR AR

JSR

3
:

2640
2641

2638
2639

2652
2653

SEG 0057

2632

2648 003722
2649 003726
ggg 003732

PAGE

WRITE

2631

2647

15:31

.WORD
. WORD

sIF NO ERROR OCCURED, PROCEED WITH ROUTINE
;AN ERROR MESSAGE HAS BEEN STACKED:
PRINT IT

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE

(I.E.

CKLOOP)>

: ~=8882820008000840%8204200040000402000020000000800000800000000000200000000000000002
012577
113577
000404

176554
176554

WRITE:

MOV
MOVB
BR

(RS)+,8SFL4
8(R5)+,8SEL6
MLWRI

;SETUP SOURCE POINTER
;MAKE DATA AVAILABLE TO M-LOOP
;THE REST OF THIS ROUTINE IS THE SAME AS "WRITEI”

1.0

CNDMCAOQ DMVI1 LINE UNIT DIAGL
- ."'LW

WRITE

MACRO M1200

22 FEB-84

15:31

PAGE

SEG 00%8

IMMEDIATE

2656
2657
2658

LSBTTL

....M-LOOP

2885400

-- WRITE

IMMEDIATE

ARLARAR AL ARARRAR GRS

R LA AR AR AR AR AR ASRALAR SR GRALAS

¢+ WRITEI - WRITE IMMEDIATE THE SPECIFIED DATA INTO THE SPECIFIED DMV-11 ADDRESS
‘

+ CALLING SEQUENCE:
i

JSR
.WORD
.WORD
8CC

<ANY OTHER SPECIAL ERROR PROCESSI?G MAY BE DONE HE%E

;

ERROR
N§$:

003752
003760
003762

012577
012577
112777
010346
012703
077301
012603

176542
176542
000002

WRITEI

176524

000050

1$:

132777
001023
004737
012737

000200

176504

004210
000002

002400

004036
004040

012737
012737
012737
012737
000261
000401

000001
000004
013235
017030

002246
002250
002252
002254

004042
004044

000241
000205

003764
003772
003774
004006
004006
004014
004022

MLWRI:

08020000
MOV
MOV

S$:

PRINT IT

(I.E. CKLOOP)>

RRAR AR AL R AR AR RA AR08 0400400000000 0000800000000040000

MOVB

(RS)+,8SELA4
(R5)+,8SEL6

QWRILOC,8BSEL2

:SETUP SOURCE POINTER
sMAKE DATA AVAILABLE TO M-LOOP

MOV
S08
MOV

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

sWAIT FOR THE M-LOOP TO FINISH THE OPERATION

BITB
BNE
JSR
MOV
GTOF

OMRDY ,BBSEL2
S$
PC,GETWSR
OWRILOC,GDATA
EM4 ,ERR4

;:DID THE M-LOOP FINISH
:YES,
GOOD.
RETURN
1GET BYTE SELECT REGISTERS
s IDENTIFY REQUESTED FUNCTION
; "MRDY" TIMEOUT
QUEUVE “DEVICE FATAL” ERROR ¢ 4
:
MOV

SEC
BR
6%:

:AN ERROR MESSAGE HAS BEEN STACKED:

: =8082R80
003734
003734
003740
003744

RS,WRITEI
<ADDRESS OF REGISTER WITHIN DMV-11>
<DATA FIELD -- DATA TOC BE WRITTEN IN DMV-11>
N$
+IF NO ERROR OCCURED, PROCEED WIiH ROUTINE

:
:
H
:

CcLC

RTS

;TELL M-LOOP TO WRITE THE DATA

MOV
MOV
MOV

63
RS

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

s INDICATE “NO ERROR"
;:RETURN

@T.EDF ,ERRTYP
@4 ,ERRNBR
9EMA ,ERRMSG
9ERR4 ,ERRBLK

CNDMCAO DMV11l LINE UNIT
....GETBSR

DIAGL

MACRO M1200

22 -FEB-84

15:31

PAGE

HS
32

SEQ 0059

-- GET BYTE SELECT REGISTERS

2698

LSBTTL ....GETBSR -- GET BYTE SELECT REGISTERS

2699

0888800008000 000000000800

g;gé

2700

g;gg

FUNCTION

2707

2709
S;IO
11

2713

2714
2715
2716
2717
2718
2719
2720
2721

EXIT CONDITIONS - NONE

REGISTERS DESTROYED
28828 8080050000

004046
004054
004062
004070
004076
004104
004112
004120

117737
117737
117737
117737
117737
117737
117737
117737

176420
176414
176410
176404
176400
176374
176370
176364

002256
002260
002262
002264
002266
002270
002272
002274

GETBSR: MOVB
MOVB
MOVB
MOVB
MOVB
MOVB
MOVB
MOVB

2729 004200
3;;‘1’ 004206

117737
000207

176324

002314

MOVB
RTS

2722
2723
2724
2725
2726
2727
2728

004126
004134
004142
004150
004156
004164
004172

117737
117737
117737
117737
117737
117737
117737

176360
176354
176350
176344
176340
176334
176330

002276
002300
002302
002304
002306
002310
002312

2732
37,332
2735
2736
2737
2738
2739
2740
2741
2742
2743

IAALLAS

THIS SUBROUTINE COLLECTS THE CONTENTS OF THE

ENTRY CONDITIONS - NONE

3
:

2712

:
:

2708

AR RAARARRLRAAAR LALLM

BYTE SELECT REGISTERS FOR THE PURPOSE OF DISPLAY.

ARRARAA AR

GET THE CONTENTS OF ALL CONTROL AND STATUS REGISTERS

2703

MOVB
MOVB
MOVB
MOVB
MOVB
MOVB
MOVB

- NONE
ARAR A LA

8BSELO,BSRO
8BSEL1,BSR1
8BSEL2,BSR2
8BSEL3,BSR3
8BSEL4 ,BSR4
8BSELS,BSRS
@BSEL6,BSR6
8BSEL7,BSR7

20460

o
0000

]

AR AR R RR AR

(7]

&
0000

® 0

20000
O
e

Q00

o
0

&
]

R ARARRRRRRARRANRAR LR L0000 0000000

;PUT THE CURRENT CSR VALUES INTO THE PRINT-0UT
; TABLE

8BSEL10,BSR10
8BSEL11,BSR11
8BSEL12,BSR12
@BSEL13,BSR13
8BSEL14,BSR14
8BSEL15,BSR15
8BSEL16,BSR16
8BSEL17,BSR17
PC

sRETURN TO CALLER

.SBTTL ....GETWSR -- GET WORD SELECT REGISTERS
: "WORD” VERSION OF ABOVE SUBROUTINE
004210
004216
004224
004232
004240
004246
004254
004262
004270

017737
017737
017737
017737
017737
017737
017737
017737
000207

176256
176254
176252
176250
176246
176244
176242
176240

002256
002260
002262
002264
002266
002270
002272
002274

GETWSR:

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
RTS

8SELO, WSRO
8SEL2,WSR2
8SEL4 ,WSR4
@SEL6,WSR6
@SEL10,WSR10
8SEL12,WSR12
8SEL14,WSR14
@SEL16,WSR16
PC

;MOVE THE 4 WORD REGISTERS TO THE OTHERWISE
:BYTE TABLE

;RETURN TO CALLER

CNDMCAO DMv11l LINE UNIT
..STUREG

STATIC

DTAGL

MACRO M1200

22 FEB-84

15:31

PAGE

gTM

33
SEG 0060

TEST OF SPECIFIED USYRT REGISTER

2745

.SBTTL

....STUREG

-- STATIC TEST OF SPECIFIED USYRT REGISTER

2746

(0008000 ARRARRAAAAGARARARAARARARAARARALRSRAR0A
0000000000000 04040040000400

g;:g

:
:

g;gg

STUREG -- PERFORM A STATIC TEST OF THE SPECIFIED USYRT REGISTER
CALLING SEQUENCE:

2751
2752
2753

:
H
H

g;gg

H
:

2756

2757

2758

<”"REGNUM” CONTAINS REG INDEX FOR POSSIBLE ERRORS>

JSR

PC,STUREG

B8CC

<ANY OTHER SPECIAL ERROR PROCESSING MAY BE DONE HERE

g;gé

TESTED»>

g;zg

; N$:

ERROR

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

(I.E.

CKLOOP)>

2763

2764
2765 004272

g;gg 004276

(- -200A0R0000000000000800000000000004000000000400080000000080000408080800800480400

010037
010037

004306
004324

2768
2769
2770
g;;é

004302
004306
004310

004537
000000
002376

003722

2773
2774
2775
2776
g;;z

004314
004320
004324
004326
004330

005037
004537
000000
002402
103422

002402
003476

2779
2780
2781
2782
2783

004332
004340

123737
000241

002400

004342
004344

001415

004344
004352
004360
004366

012737
012737
012737
012737

004312

2784 004374
2785 004376

2786
2787
2788

2s$:

103431

000261
000207

000001
000005
013366
017252

4%:

002402

002246
002250
002252
002254

10¢:

MOV
MOV

RO,2$
RO,4%

;sPUT SPECIFIED REGISTER'S ADDRESS IN I/0 CALLS

JSR
.WORD
.WORD

B8CS

RS,WRITE
0
TDATA
10¢

sWRITE IT
;#4& MODIFIED FROM ABOVE
H

CLR
JSR
.WORD
. WORD
BCS

BDATA
RS,READ
0
BDATA
10¢

;CLEAR BOTH BYTES -- JUST IN CASE....
sREAD IT BACK AGAIN
;o2 MODIFIED FROM ABOVE 242+

cMPB
cLC

GDATA,BDATA

BEQ
GTOF

10¢
EM25,ERR7A
:
.

;:DID WE READ WHAT WE WROTE?
3 (THIS ISN'T NEEDED FOR THE ERROR TEST BUT
s MUST BE CLEARED ON EXIT IF NO ERROR OCCURED)
:YES, EXIT FROM SUBTEST
sREPORT READ/WRITE ERROR
QUEVE "DEVICE FATAL"” ERROR ¢ S
MOV
@7 .EDF ,ERRTYP
MOV
@5 ,ERRNBR
MOV
SEM25 ,ERRMSG
MOV
@ERR7A ,ERRBLK
;INDICATE THAT AN ERROR WAS DETECTED

SEC
RTS

ese

;ON ERROR, EXIT

sON ERROR,

EXIT

.SBTTL ....STALL -- DELAY FOR 10.5 MICRO-SEC’'S (ON LSI-11)
00884888800 0400808000800000800000000040880000000008000000000080000800080000000

2789

2790

2791
2792
2793 004400

STUREG:

s STALL -- THIS SUBROUTINE STALLS FOR ABOUT 10.5 MICRO-SECONDS

- -888000000000000000400000000000000000400480400000000480000004008000000000000000

000207

STALL:

RTS

CNDMCAQ DMV11l LINE UNIT

DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE

SEG 0061

.SBTTL

2795
2796
2797
2798
2799
2800
2801
2802
2803

1228080800004

:*# GETURS - LOAD INTO THE 8 WORD STORAGE AREA (UREGS) THE CONTENTS OF THE
i
VARIOUS USYRT REGISTERS
1 ®

i
&

2805
2806
2807
2809
2810
2811
2812
2813
2814
2815
2816
2817
2818
2819
2821
2822
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832
2833
2834
2835
2836
2837
2838
2839
2840
2841
2842
2843

080000000000 0000 0000000000000 0 000000000080 00000000000000000000
s

012737
012737

002316
120400

005037
004537
122000
002334

002334
00347¢

005077
004537
000000
000000

004444
004442

CALLING SEQUENCE:

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

GETURS:

MOV

QUREGS,5$

s INIT POINTER TO REG STORAGE

CLR
JSR
.WORD

UREGS+14.
R5,READ
USTATR

tCLEAR STORAGE WORD
sREAD THE USYRT STATUS REGISTER
$STATUS REGISTER'S ADDRESS WITHIN DMv-11

MOV

.WORD

3s:

003476

4%:
S$:

005237
023727
001772

004442
004442

120406

062737
023727
001355

000002
004442

004444
120410

6%:

000207

CLR

QUSYRT , 44

UREGS-+14.

TABLE

s INIT POINTER TO REGISTER ADDRESSES

sADDRESS ALLOCATED TO THAT REG.

W/IN "UREGS"

JSR
.WORD
.WORD

R5,READ
O
O

ass

:CLEAR STORAGE WORD

INC
cMP
BEQ

4%
4% ,0USYRT+6
64

s INCREMENT REG NO.
s THIS IS NOT A VALID REGISTER ADDRESS
:SO IT MUST BE BYPASSED

ADD
cMP
BNE

02,54
4% ,0USYRT.10
38

s ADVANCE ADDRESS OF STORAGE AREA POINTER
:SEE_IF ALL REGS READ YET
:BR IF NOT

RTS

sRETURN

sREAD A LINE UNIT REG
sREGISTER ADDRESS GOES HERE
:STORAGE ADRS IN TABLE GOES HERE

(8408440008004 0400000004400040000000000000000000004000000000000000000000000000

s# GETVRS: - LOAD INTO THE 16 WORD STORAGE AREA (VREGS) THE CONTENTS OF THE
;e
VARIOUS VIA REGISTERS.
e

CALLING SEQUENCE :

004502
004510
004516
004522
004530
004532
004536

004552
2845 004554

012737
012737
005077
004537
000000
000000
005237

062737
023727
001361
000207

002336

004530
004526

003476
004526
004526

004530
120020

GETVRS: MOV
MOV
3s:

4%:
S$:
6%:

CLR

JSR
.WORD
.WORD
INC
ADD
CMP
BNE
RTS

OVREGS,S5$
OVIA,.48

s INIT POINTER TO REG STORAGE TABLE
s INIT POINTER TO REGISTER ADDRESSES

RS,READ
O
O
44
02,54
4% ,0VIA+16.
3

;READ A VIA REG
sREGISTER ADDRESS GOES HERE
; STORAGE ADRS IN TABLE GOES HERE
; INCREMENT REG NO.
; INCREMENT STORAGE ADRS
;SEE IF ALL VIA REGS READ YET
;B8R IF NOT

854

;CLEAR STORAGE WORD

+RETURN

CNDMCAQ DMv11 LINE UNIT DIAGL
«+«INITT1

2847
2848
2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876

MACRO M1200

22-FFB-84

15:31

PAGE 35

SEQ 0062

INITIALIZE TIMER &1

.SBTTL

....INITT1

INITIALIZE

TIMER &1

;..“““‘..“‘.0.‘0.“““.‘.““““‘.‘0‘).“‘.0‘..0““000...‘0“....00‘0..

s INITT1

- INITIALIZE TIMER ¢ 1

CALLING SEQUENCE:

JSR

RS,INITT1

.BYTE

<BITS 6 & 7 WILL BE LOADED INTO

i.
i

.WORD
.WORD

g
ie
i

.BYTE

]

"ACR”,

BIT S WILL BE

USED TO SET OR CLEAR BIT 6 ("T1”) OF THE INTERRUPT
ENABLE REGISTER ("IER")>
<UNUSED»

:* NOTE:

i BEFORE LOADING AND STARTING THE COUNTER, THE LATCH REGISTER (ACCESSED THRU
3¢ "VIAT1C”) IS LOADED.
THEN, TiL-L IS LOADED AND NEXT, TiC-H.
THIS LAST
s LOAD WILL RESET THE TIMEOUT BIT AND COUNTER LOGIC.
IT IS EXPECTED AT THIS
3#

TIME

(5/25/79)

THAT

THE

INTERRUPT FACILITY OF

THE

VIA CHIP WILL NOT BE

USED

i* -- HOWEVER, ACCESS TO THE INTERRUPT ENABLE BIT IS GIVEN THROUGH THE THIRD
i PARAMETER IN THE CALLING SEQUENCE (BIT S = O WILL CAUSE THIS ROUTINE TO
;# CLEAR THE ENABLE BIT ("T1”) IN “IER".)

1828888888888 8888088 0808008884048 00080208000000880808000
4000400800000 00000000000042

010146
012537
012537
111501
143701
010137
112501

004702
004730
000077
004672

INITT1: MOV
MOV
MOV
MOVB

004610

143701
153701
010137

000177
000100
004632

004537
120016
000000

003734

004537
120013
000000

003610

013701
143701
053701
010137

004642

2%:

004672
004672

R1.,4%
(RS)+,R1

:SETUP CALL SET ACR‘'S BITS 6 &€ 7
sNOW, GET THE BIT TO BE USED IN SETTING OR
:CLEARING BIT 6 OF "IER"”

077.R1

ASLB
ASLB

R1
R1

8ICB

177,R1

BISB
MOV

100,R1
R1,2¢

JSR

RS,WRITEI

VIAIER
.WORD

JSR
3%:

:SAVE THE REGISTER WE WILL BE USING
:SETUP VALUE TO BE WRITTEN IN LATCH
$1SETUP VALUE TO BE WRITTEN IN COUNTER
:GET & PROCESS BITS FOR ACR 6 & 7

BICB

MOV
MOvVB

106301
106301

R1,-(SP)
(R5)+,7$
(R5)+,10¢
(R5),R1

VIAACR
.WORD

MOV
BICB
BIS

MOV

s THE PASSED BIT IS IN THE WRONG POSITION
3BUT, THE PASSED BIT SHOULD CONTROL THE OPERATION.

sWE KNOW WE ARE SETTING OR CLEARING BIT 6 -sTHUS, THE PASSED BIT WILL BECOME THE CONTROLLING
;BIT 7 AND WE WILL “OR” IN THE BIT WE WISH TO
:BE_CONTROLLED (BIT 6).

sFIRST, MAKE SURE ALL UNWANTED BITS ARE CLEARED

s THEN SET BIT 6
s THE CALL WILL NOW WRITE

THE APPROPRIATE VAL'E

sWRITE TO

:THE VIA'S IER
s INTERRUPT ENABLE/DISABLE INFORMATION

RS5,READI

tREAD THE CURRENT SETTING OF

s THE VIA'S ACR
s INTO “3¢"

33,R1
300,R1

:GET THAT VALUE
;CLEAR THE CURRENT SETTING OF BITS 6 & 7

R1,4

:PASS THE NEW REG. SETTING TO APPROPRIATE CALL

4% ,R1

:SET THEM ACCORDING TO THE PASSED VALUES

L5
CNDMCAQ DMv11l LINE UNIT

«+«« INITT1

DIAGL

MACRO M1200

22 -FEB-84

15:31

PAGE

35-1

SEQ 0063

INITIALIZE TIMER @01

004664
004670
004672

004537
120013
000000

003734

004674
004700
004702

004537
120006
000000

003734

004704
004712
004716
004720

113737
004537
120007
000000

004703
003734

004722
004726
004730

004537
120004
00C000

003734

004732
004740
004744
004746

113737
004537
120005

004731
003734

000000

7%:

JSR
VIAACR

RS,WRITEL

.WORD

JSR
VIATIC

RS,WRITEI

.WORD

MOvVB

004720
8$:

10$:
004746

11s:

76+1,8%

sWRITE TO
:THE VIA'S ACR:

: THE NEW REGISTER SETTING
sWRITE

;LOW ORDER LATCH REGISTER (T1iL-L)
: THE VALUE PASSED

JSR
VIAT1D
.WORD

RS,WRITEI

;SETUP FOR AND
;WRITE TO

s THE VALUE PASSED

JSR

RS,WRITEI

.WORD

MOVB
JSR

108+1,11$
RS,WRITEI

;SETUP FOR AND
sWRITE TO

.WORD

; THE VALUE PASSED

VIAT1A

VIAT1B

tHIGH ORDER LATCH REGESTER (T1L-H)
sWRITE T0
;LOW ORDER LATCH & COUNTER (TIL-L € T1C-L)
: THE VALUE PASSED

;HIGH ORDER COUNTER (T1C-H) <ALSO STARTS CTR>

; DON'T WAIT AROUND FOR ANYTHING TO HAPPEN -- JUST RETURN!
004750
004752

012601
005205

MOV
INC

(SP)+,R1
RS

004754

000205

RTS

;BUT FIRST RESTORE R1

;AND PUT RS BACK ON A WORD BOUNDRY (THE LAST

;PASSED PARAM.

+NOW, RETURN

WAS A BYTE, NOT A WORD!)

M5
CNDMCAO DMv1l LINE UNIT DIAGL

cesdINITT2

MACRO M1200

22-FEB-84

15:31

PAGE

SEQ 0064

INITIALIZE TIMER &2

2937
2938
2939
2940

o . INITT2

INITIALIZE

122884800880 00 008080000

TIMER #2

AARRR AR AR RS AR ARRARR AR

s INITT2 - INITIALIZE TIMER @ 2

AL LA

LARRAAR O OANAS

CALLING SEQUENCE:

2941
2942
2943
2944
2945

JSR
.WORD
.BYTE

.BYTE

RS,INITT2
<VALUE LOADED INTO "T2L-L" & "T2C-H">
<BIT S WILL BE LOADED INTO "ACR”, BIT 4 WILL BE USED
TO SET OR CLEAR BIT 5 ("T2") OF THE INTERRUPT ENABLE
REGISTER ("IER")>
<UNUSED>

NOTE:
THEN T2C-H.
THIS SECOND LOAD WILL RESET THE TIMEOUT
IT IS EXPECTED AT THIS TIME (5/25/79) THAT THE
BIT AND COUNTER LOGIC.
INTERRUPT FACILITY OF THE VIA CHIP WILL NOT BE USED -- HOWEVER, ACCESS TO
THE INTERRUPT ENABLE BIT IS GIVEN THROUGH THE SECOND PARAMETER IN THE
EA%%I?GIaquggsfi)(BIT 4 = 0 WILL CAUSE THIS ROUTINE TO CLEAR THE ENABLE BIT
FIRST T2L-L IS LOADED,

R e
e R

004756
004760
004764
004766
004772
004776

010146
012537
111501
143701
010137
112501

005000
005002
005004

106301
106301
106301

005100

INITT2: MOV

MOV

MOVB
BICB
MOV
MOVB

000337
005070

ASLB
ASLB
ASLB

(RS)+,10¢
(R5),R1
337,R1

R1,4%

(RS)+,R1

R1
R1
R1

:SAVE THE REGISTER WE WILL BE USING

:SETUP VALUE TO BE WRITTEN IN COUNTER

:GET & PROCESS BIT FOR ACR 5

$SETUP CALL TO SET OR CLEAR ACR'S BIT 5
tNOW, GET THE BIT TO BE USED IN SETTING OR

s:CLEARING BIT 5 OF "IER”

: THE PASSED BIT IS IN THE WRONG POSITION
:BUT, THE PASSED BIT SHOULD CONTROL THE
sOPERATION.
sWE KNOW WE ARE SETTING OR CLEARING BIT S5 --

s THUS, THE PASSED BIT WILL BECOME THE CONTROLLING
$BIT 7 AND WE WILL “OR” IN THE BIT WE WISH TO
143701
153701
010137

000177

177,R1

005030

B8ICB
BISB
MOV

040,R1
R1,2¢

004537
120016
000000

003734

JSR

RS,WRITEI

.WORD

004537
120013

003610

JSR
VIAACR
.WORD

RS ,READI

013701
143701
053701
010137

005040

MOV

38,R1
040,R1

004537

2%:

000000

3s:

VIAIER

005070
005070

8ICB
BIS
MOV

4%,R1
R1.4$

003734

JSR

RS,WRITEI

:BE_CONTROLLED (BIT 5).
sFIRST, MAKE SURE ALL UNWANTED BITS ARE CLEARED
s THEN SET BIT S
s THE CALL WILL NOW WRITE THE APPROPRIATE VALUE

sWRITE TO
sTHE VIA'S IER

;s INTERRUPT ENABLE/DISABLE INFORMATION
sREAD THE CURRENT SETTING OF
:THE VIA'S ACR
s INTO "3¢"

;GET THAT VALUE

;CLEAR THE CURRENT SETTING OF BIT S5
:SET IT ACCORDING TO THE PASSED VALUE
sPASS NEW REG.
sWRITE TO

SETTING TO APPROPRIATE CALL

CNDMCAO DMV11 LINE UNIT
«++

INITT2

DIAGL

120013
000000

2997 005072
2998 005076
2999 005100

004537
120010
000000

003734

113737
004537

005101
003734

3000
3001 005102
3002 005110
3003 005114
005116

22 FEB-84

15:31

PAGE

36-1

SEQ 0065

INITIALIZE TIMER @2

2994 005066
2995 005070
2996

MACRO M1200

120011
000000

;THE VIA'S ACR

44:

VIAACR
.WORD

R5,WRITEI

:WRITE TO

10¢:

JSR
VIAT2A
.WORD

: THE VALUE PASSED

10$+1,115$
RS,WRTTEI

11¢:

MOvB
JSR
VIATZB
.WORD

:SETUP FOR AND
;WRITE TO
sHIGH ORDER COUNTER (T2C-H) <ALSO STARTS CTR>
s THE VALUE PASSED

005116

s THE NEW REGISTER SETTING
;LOW ORDER LATCH € COUNTER (T2L-L & T2C-L)

; DON'T WAIT AROUND FOR ANYTHING TO HAPPEN -- JUST (JEST) RETURN!
005120
005122

012601
005205

MOV
INC

(SP)+,R1
RS

+BUT FIRST RESTORE R1
+AND PUT RS BACK ON A WORD BOUNDRY (THE LAST

005124

000205

RTS

: THEN RETURN

;PASSED PARAM,

WAS A BYTE,

NOT A WORD!)

B¢,
CNDMCAO DMV11 LINE UNIT DIAGL
. .RSTCHK

- - RESET USYRT 'VERIFY

MACRO M1200

22 FEB-84

15:31

PAGE

37
S5EQ 00%E

ALL USYRT REGS @ RESET STATE

3015
3016
3017
3018

LSBTTL

....RSTCHK

-- RESET USYRT/VERIFY ALL

USYRT REGS @ RESET STATE

$00828888080000008000000000000A000000
000000000000 00000000000000000000000

RSTCHK

3019
3020
3021
3022
3023

MANUALLY RESET

ARE

THE USYRT

IN THEIR RESET STATE.

AND VERIFY

THAT

ALL

AN ERROR MESSAGE

USYRT

REGISTERS

TDENTIFYING

FAILING REGISTER IS STACKED IF ONE IS ENCOUNTERED.

THE

CALLING SEQUENCE:

JSR

RS ,RSTCHK

1008800000000 0000000000000000000008000000000000000000000000A00000000000

RSTCHK;

010146
010246

004537
120000
000031
004537
120000
000030

005001
012702
016137
004537
000000
000000
123722
001432

003734

R1,-(SP)
R2,-(SP)

1 SAVE R1
$1SAVE R2

J?:m

RS, WRITEI

1SET PROGRAM RESET BIT IN VIA ORB REG

DTR!RTSND!PRESET

JSR

003734

002662
002552
003610

MOV
MOV

RS, WRITETY

sCLEAR PROGRAM RESET BIT IN VIA ORB REG

s+ INIT USYRT REC ADRS PTR

USYREG(R1),7¢
RS,READI

1SET USYRT READ ADDRESS
sREAD A USYRT REG

t1DATA READ IS RETURNED HERE

VIAORS
DTR!RTSND

CLR

005172

68:
7%:

8s:

005174

010137
006237
005037
116237
013737

002412
002412
002400
177777
005174

002400
002402

012737
012737
012737
012737
000261
000406

000001
000006
013142
017372

002246
002250
002252
002254

062701
020127
002727
000241
012602
012601
000205

000002
000020

MOV

OPATF ,R2

.WORD

MOV
JSR

.WORD

cHPB

88,(R2).

;:INIT DATA PATTERN POINTER

sUSYRT REG ADRS GOES HERE

1SEE IF REG CONTAINS EXPECTED DATA

BEQ

9¢

MOV

R1,REGNUM

1SET USYRT REG NO. FOR PRINTOUT

CLR
MOVB

GDATA
-1(R2),GDATA

lGET EXPECTED DATA

ASR

MOV

REGNUM

8s, BDATA

1BR IF MATCH

GET WORD OFFSET

sGET ACTUAL DATA

s STACK "USYRT NOT CLEARED BY PROGRAM RESET" MSG
GTOF
EM2,ERR10
:

SEC

BR
9:

ADD

cHP

BLT

10¢:

CcLC
MOV
MOV

RTS

104
@2,R1

R1,016.
6%

(SP)+,R2
(SP)+,R1

QUEVE

“DEVICE FATAL” ERROR @ 6

$SET C BIT TO FLAG ERROR

s TAKE ERROR EXIT

1 INCR USYRT REG ADRS PTR

1SEE _IF ALL REGS READ YET
:BR IF NOT

s¢s CLEAR C BIT FOR NO ERRORS
tRESTORE R2
tRESTORE R1
1¢+ RETURN

MOV
MOV
MOV
MOV

oT .EDF ,ERRTYP

96 ,ERRNBR
0EM2 ,ERRMSC
0ERR10,ERRBLK

CNDMCAQ DMv11 LINE UNIT

..RSTCHK

DIAGL

-- RESET USYRT.VERIFY

3065

ALL

22 FFB-84

USYRT REGS ® RESET

15:31

PAGE

Cé
38

£
SET 0067

STATE

1000000000000 00000000000000000008080800000008000000800000000000000000800000000

3066
3067
3068 005312

010146

3070 005320
3071 005322
gg;g 005324

077101
012601
000207

3069 005314

MACRO M1200

012701

000005

i4 WAITSO - THIS SUBROUTINE STALLS FOR AT LEAST SO MICRO-SEC, AND THEN RETURNS.
1080000000880 000000000000000000000000000000000 0000000800000 00000000000000b000
WAITSO0: MOV
R1, -(SP)
1SAVE R1
3s:

MOV

5. .,R1

S08
MOV
RTS

R1,3$
(SP)+,R1
PC

s INIT COUNTER

tDELAY HERE FOR 23.8 MICRO-SEC'S
sRESTORE R1
;RETURN

gg;g

[

gg;g

THEREFORE, ACTUAL TOTAL DELAY IS 49.35 MICRO-SECONDS

3081

.SBTTL

....SETVIA

3078
3079
3080
3062

;¢ SETVIA

30“

3085

gggg

3089

SET UP THE VIA REGISTERS

THIS SUBROUTINE PROGRAMS THE VIA REGISTERS FOR NORMAL OPERATION,

LOADING THE DDRB, DDRA, ORB, ACR, PCR, IER.

CALLING SEQUENCE :

3088

3115

-- SET UP VIA REGISTERS

1008882800300 000000000000000800800000000000000000008000080000000008000008000000

3083

3091
3092
3093
3094
3095
3096
3097
3098
3099
3100
3101
3102
3103
3104
3105
3106
3107
3108
3109
3110
3111
3112
;{{2

OVERHEAD (JSR, MOV, MOV, MOV, € RTS) ADD UP TO 25.25 MICRO-SEC'S

JSR

PC,SETVIA

1280808800840 0820000820000000000000008000000000000800020000002800848020008000000002

005326
005326
005332
005334
005336
005342
005344
005346
005352
005354
005356
005362
005364
005366
005372
005374
005376
005402
005404
005406
005412
005414
005416

004537
120002
000377
004537
120003
000001
004537
120017

003734

004537
120000
000030
004537
120013
000350
004537
120014
000022
004537
120016
000177
000207

003734

003734
003734

003734
003734
003734

SETVIA:

JSR
RS,WRITEI
VI
377
JSR
RS,WRITEI
VIADPA
001
JSR
RS,WRITEI
VIAOR
000
JSR
RS,WRITEI
VIAORS
DTR!RTSND
JSR
RS,WRITEI
VIAACR
350
JSR
RS,WRITEI
VIAPCR
022
JSR
RS,WRITEI
VIAIER
177
RTS
PC

:SET PORT B FOR OUTPUT MODE
;SET PORT A FOR INPUT MODE
s (BITO IS ONLY OUTPUT BIT)
sDISABLE USYRT

INTERNAL LOOPBACK

sINIT PORT B
1SET ACR FOR
:
:
1SET PCR FOR
a

T1 SQUARE WAVE OUTPUT MODE,
T2 ONE-SHOT OUTPUT MODE,
SR AT SYS CLOCK RATE ON CB1
:
(Bl NEG TRANS INPUT MODE.
CA2 NEG TRANS INPUT HODE.
CA1 NEG TRANS INPUT MODE
aDISABLE ALL MICRO-INTRPTS

sRETURN

CNDMCAQ DMv1l LINE UNIT
<o«

INIDMV

- -

3117
3118
3119
3120
3121
3122
3123
3124
3125
3126 005420
3127 005424
3128 005430
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138
3139
3140
3141
3142
3143
3144
3145
3146
3147
3148
3149
3150
3151
3152

3153
3154
3155
3156
3157
3158
3159

DIAGL

INIT DMv (MCLR,

MACRO M1200

22 FEB-84

15:31

PAGE

D¢,
39

SEG 0063

VIA SETUP)

LSBTTL

....INIDMV

INIT DMV (MCLR,

VIA SETUP)

2208888800000 0000000 0000800000000 0080000000000008000080000000000000000000000

3¢ INIDMV

THIS SUBROUTINE INITIALIZES THE DMv-11,

By DOING A MASTER CLEAR,

i
ie

ENTERING THE M-LOOP, AND PROGRAMMING THE VIA REGS FOR DEFA'LT
OPERATION,

ie
ie

CALLING SEQUENCE :
JSR PC, INIDMV

INIDMV:

JSR
JSR

1808880480080 0040800000000080000000000000000000000000000000000000000000080000s

004737
004737
000207

003374
005326

RTS

.SBTTL

PC,MSTCLR
PC,SETVIA
PC

sMASTER CLR, M-LOOP
:PROGRAM VIA
sRETURN

....CKUSTS -- CHECK USYRT STATUS REGISTERS

2888048000824 44028800 0000440040424 00000¢2008080R0ACLRLL02A0LA0LRASLAEABAL0EESAS

s CKUSTS - THIS SUBROUTINE CHECKS THE USYRT STATUS BY READING THE USYRT
ie
STATUS REGISTER AND COMPARING IT TO THE LOW BYTE OF THE WORD FOLLOWING
ie
THE CALL. IF THERE IS A MISMATCH, THE SUBROUTINE STACKS THE ERROR
i
INFORMATION, AND SETS THE "“C” BIT AND RETURNS.
100800008404 8000804880080000808800880000080080000000400008000008000088000808800804

004537
122000
000000
122537
000241
001430
012737
016537
005037
113737

012737
012737
012737
012737
000261
005205
000205

CKUSTS:

003610

1$:

005440

000007

177777

002402
005440

000001
000007
013760
017372

002412
002400
002402

JSR
USTATR
.WORD

RS,READI

BEQ
MOV
MOV
CLR
MOVB

2
@7 ,REGNUM
-1(RS),GDATA
BDATA
14 ,BDATA

GTOF

EM68,.ERR10

cMPB8
CcLC

(RS)+,18

;READ USYRT STATUS REGISTER

:SEE IF STATUS MATCHES EXPECTED
;:CLEAR C BIT
1BR IF STATUS 0K
:SET USYRT REG NO. FOR PRINTOUT
sGET EXPECTED DATA
:GET ACTUAL DATA

;STACK "USYRT STATUS INCORRECT” ERROR

002246
002250
002252
002254

QUEUVE "DEVICE FATAL” ERROR ¢ 7
MOV

MOV

2%:

SEC
INC

RTS

:SET C BIT FOR ERROR
;s INCREMENT RS PAST ARGUMENT
;RETURN

MOV
MOV

@7 _EDF ,ERRTYP

#7 ,ERRNBR

@EM68 ,ERRMSG
QERR10,ERRBLK

CNDMCAQ DMVl LINE UNIT

«es

CKTACT

-- CHECK

DIAGL

MACRO M1200

3174
3175
3176
3177
3178
3179
3180
3181

3182
3183
3184
3185

LSBTTL

....CKTACT

s CKTACT

i
i *

SEG 0069

-- CHECK TRANSMITTER ACTIVE (TXACT)

- THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF TXACT IN THE USYRT

STATUS

STATE

BIT

AND REPORTS

THE

AN ERROR

WORD FOLLOWING

THE

IS NOT

PROPERLY

SET

THE

CALL.

CALLING SEQUENCE

.WORD

JSR

RS,CKTACT

1880882080000 02800004 200008000000 0080800800000880400000804000000000000000000000

012737
004537
122000
000000
032725
001422

000007
003610

132737

005552

MOV
JSR
USTATR
.WORD
BIT
BEQ
8ITB
BNE

97 ,REGNUM
RS,READI

$1SET REG NO. FOR POSSIBLE ERROR REPORT
sREAD USYRT STATUS

O
#BIT0,(RS).
2%
@TXACT,1$
3§

sGET EXPECTED STATE OF TXACT
:BR IF EXPECTED TXACT = 0
:SEE IF TXACT = 1
;B8R IF TXACT = 1

GTOF

EM69,ERR12

:STACK "TXACT NOT SET" MSG
000001
000010
014007
017722

000423

132737

002246

002252
002254

SEC

2%:
sSTACK

000001
000011
014025
017722

QUEUE “DEVICE FATAL” ERROR ¢ 8

002250

005552

001416

012737
012737
012737
012737
000261
000401
000241
000205

CKTACT:

1$:

000001

001040

012737
012737
012737
012737
000261

002412

3187

3188
3189
3190
3191
3192
3193
3194
3195

PAGE

1008888088008 08800000800040080008000000800000800000000000000000000000000000000

3164

3172
3173

15:31

TRANSMITTER ACTIVE (TXACT)

3161
3162
3163

3165
3166
3167
3168
3169
3170
3171

22 FEB-84

002246
002250
002252
002254

3%:

4s:

BITB
@TXACT,1$
*
BEQ
3
“TXACT NOT CLEARED” MSG
GTOF
EM70,ERR12

SEC
BR

RTS

CcLC

:SET C BIT TO FLAG ERROR

MOV
MOV
MOV
MOV

T .EDF ,ERRTYP
08 ,ERRNBR

9EME69,ERRMSG
@ERR12,ERRBLK

s TAKE ERROR EXIT

;SEE IF TXACT = O
;BR IF TXACT = O

QUEUVE “DEVICE FATAL" ERROR @ 9

:SET C BIT TO FLAG ERROR
: TAKE ERROR EXIT

;CLEAR C BIT FOR NO ERRORS
sRETURN

MOV
MOV
MOV
MOV

97 .EDF ,ERRTYP
€9 ,ERRNBR
QEM70,ERRMSG

9ERR12,ERRBLK

CNDMCAO DMV11 LINE UNIT
.++.CKRACT

DIAGL

MACRO M1200

22 -FEB-84

15:31

PAGE 41

SEQ 0070

-- CHECK RECEIVER ACTIVE (RXACT)

3197
3198

.SBTTL ....CKRACT -- CHECK RECEIVER ACTIVE (RXACT)
12588280008 088000 0080000000
RRRARRRA LA 4000000000004t

3199
3200
gggé

;* CKRACT - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF RXACT IN THE USYRT
;e
STATUS REGISTER, AND REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE
i .
STATE OF BIT O IN THE WORD FOLLOWING THE CALL.
L

3203
3204

i
i

3206

1888882888000 0800008000800 08 0004400000000 00000400000

3205

3207 005676

3208 005676

012737

000007

3212 005714

032725

000001

132737
001040

000040

3209 005704
3210 005710
3211 005712

3213 005720

3214 005722
3215 005730
3216

004537
122000
000000

001422

003610

002412

1$:

3218
3219
3220
3221
3222
3223

005762
005764
005766
005774

012737
012737
012737
012737

:STACK

000261
000423
132737
001416

000001
000012
014047
017722

002246
002250
002252
002254

000040

005712

005776
006004
006012
006020

3224 006026
3225 006030
3226 006032

3227 006034
3228
3229
3230
3231

012737
012737
012737
012737

000261
000401
000241

000205

2%:

:STACK

005776
000001
000013
014065
017722

.WORD

MOV

JSR
USTATR
.WORD

002246
002250
002252
002254

3s:

4s:

47 ,REGNUM

RS,READI
O

sSET REG NO. FOR POSSIBLE ERROR REPORT
;READ USYRT STATUS

BIT

#8ITO0,(RS).

sGET EXPECTED STATE OF RXACT

BIT8B
BNE

ORXACT,1$
3¢

:SEE IF RXACT = 1
;BR IF RXACT = 1

BEQ

005712

3217 005732
005732
005740
005746
005754

CKRACT:

CALLING SEQUENCE :
JSR
RS,CKRACT

"RXACT NOT SET” MSG

GTOF

EM71,ERR12

SEC
BR
44
BITB
ORXACT,1$
BEQ
3
"RXACT NOT CLEARED” MSG
GTDF
EM72,ERR12

SEC
BR
cLC
RTS

as
RS

:BR IF EXPECTED RXACT

= O

QUEUVE “DEVICE FATAL” ERROR ¢ 10

;SET C BIT TO FLAG ERROR
; TAKE ERROR EXIT
;:SEE IF RXACT = 0
;BR IF RXACT = O

QUEVE "“DEVICE FATAL"” ERROR ¢ 11

:SET C BIT TO FLAG ERROR
; TAKE ERROR EXIT
;CLEAR C BIT FOR NO ERRORS
;RETURN

MOV
MOV
MOV
MOV

o7 .EDF ,ERRTYP
€10,ERRNBR
SEM71,ERRMSG
#ERR12,ERRBLK

87 .EDF ,ERRTYP
@11 ,ERRNBR
QEM72 ,ERRMSG
#ERR12 ,ERRBLK

CNDMCAO DMV1l LINE UNIT DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE 42

....CKTBMT -- CHECK TRANSMIT BUFFER EMPTY
3233

,SBTTL

SEQ
....CKTBMT

-- CHECK

TRANSMIT BUFFER EMPTY

323‘

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

3335

3336
3237

ie CKTBMT

1o
ie

STATUS REGISTER, AND REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE
STATE OF BIT O IN THE WORD FOLLOWING THE CALL.

3539
3540
3341

CALLING SEQUENCE :
JSR
RS.CKTBMT
"WORD
<BIT O IS EXPECTED VALUE OF

3243 006036

3244 006036 012737 000007 002412
3245 006044 004537 003610

CKTBMT:

MOV
JSR

07 ,REGNUM
RS.READI

SET REG NO. FOR POSSIBLE ERROR REPORT
:READ USYRT STATUS

3248 006054 032725 000001

18:

BIT

GET EXPECTED STATE OF TBMT

32‘2

THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF

TBMT

IN THE USYRT

TBMT>

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

3246 006050
3247 006052

122000
000000

3249 006060
3250 006062

001422
132737

3251 006070 001040
3252

000100

006052

3253 006072

006072
006100
006106
006114
3254 006122
3255 006124
3256 006126
3257 006134

3258

012737
012737
012737
012737
000261
000423
132737
001416

000001
000014
014107
017722
000100

3260 006166
3261 006170
3262 006172
3263 006174
3264
3265
3266
3267

28
OTBMT.1$

GTOF

EM73,ERR12

SEC

2%:

B8R

BITB
BEQ
GTOF

012737
012737
012737
012737
000261
000401
000241

000205

OTBMT,1$
3s

;STACK “TBMT NOT CLEARED"” MSG

3259 006136

006136
006144
006152
006160

#8IT0,(RS)»

BEQ
BITB

BNE
38
;STACK “TBMT NOT SET* MSG

002246
002250
002252
002254
006052

USTATR
.WORD

000001
000015
014128
017722

:BR IF EXPECTED TBMT
:SEE IF TBMT = 1

:BR IF TBMT = 1
:

3s:
as:

SEC
BR
cLe
RTS

QUEUE “DEVICE FATAL” ERROR @ 12

sSET C BIT TO FLAG ERROR

MOV
MOV
MOV
MOV

T .EDF .ERRTYP
012, ERRNBR
OEM73, ERRMSG
OERR12
. ERRBLK

: TAKE ERROR EXIT

SEE IF TBMT = O
{BR IF TBMT = 0

EM74,ERR12

002246
002250
002252
002254

= 0

as
RS

QUEVE

"DEVICE FATAL” ERROR @ 13

tSET C BIT TO FLAG ERROR
; TAKE ERROR EXIT
:CLEAR C BIT FOR NO ERRORS
s RE TURN

MOV
MOV
MOV
MOV

oT.EDF ,ERRTYP
013, ERANBR
0EM74 ,ERRMSG
SERR12
, ERRBLK

007

o071

CNDMCAO DMV1l LINE UNIT

DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE 43

SEQ 007

....CKRDA -- CHECK RECEIVE DATA AVAILABLE
3269

.SBTTL

....CKRDA -- CHECK RECEIVE DATA AVAILABLE

3270

(008888040000 0004000000000000080004
0000000000004 00040000000004400000000000800400

3272

3271

:* CKRDA - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF RDA IN THE USYRT

35;2

STATUS REGISTER,

AND REPORTS AN ERROR IF

CALLING SEQUENCE
JSR
RS,CKRDA

IS NOT PROPERLY

STATE OF BIT O IN THE WORD FOLLOWING THE CALL.

SET

THE

3275
2276

i *
HL

3278

1888888888000 880888044088008880408000080008880000004048088040040000080000000204

3277

i s

3279 006176

3280 006176
3281 006204

012737
004537

3283 006212
3284 006214

000000
032725

3286 006222
3287 006230
3288
3289 006232

132737
001040

3282 006210
3285 006220

3290
3291

3292
3293

3294

006232
C06240
006246
006254
006262
006264
006266
006274

122000

001422

012737
012737
012737
012737
000261
000423
132737
001416

000007
003610

002412

1¢:

000001

000200

006212

012737
012737
012737
012737

3297 006330
3298 006332
3299 006334
3300
3301
3302
3303

000401
000241
000205

3296 006326

000261

MOV
JSR

€7 ,REGNUM
RS,.READI

:SET REG NO. FOR POSSIBLE ERROR REPORT
;READ USYRT STATUS

. WORD
BIT
BEQ
BIT8
BNE

0
#BITO,(RS).
28
@RDA,18
3

tGET EXPECTED STATE OF RDA
:BR IF EXPECTED RDA = 0
;SEE IF RDA = 1
sBR IF RDA = 1

GTDF

EM75,ERR12

USTATR

:STACK "RDA NOT SET" MSG
000001
000016
014145
017722
000200

002246
002250
002252
002254
006212

2%:

SEC
BR

BITB
BEQ

ORDA,1$
3

GTOF

EM76.ERR12

;STACK "RDA NOT CLEARED”"” MSG

3295 006276
006276
006304
006312
006320

CKRDA:

.WORD

000001
000017
014161
017722

:SET C BIT TO FLAG ERROR
s TAKE ERROR EXIT

SEC

3s:

4%:

BR
cLC
RTS

4%
RS

MOV
MOV
MOV
MOV

&7 .EDF ,ERRTYP
€14 ,ERRNBR
SEM7S ,ERRMSG
@ERR12,ERRBLK

;:SEE IF RDA = O
:BR IF RDA = 0

002246
002250
002252
002254

QUEVE "DEVICE FATAL"” ERROR ¢ 14

QUEVE “DEVICE FATAL"” ERROR @ 15

:SET C BIT TO FLAG ERROR

; TAKE ERROR EXIT
;CLEAR C BIT FOR NO ERRORS
sRETURN

MOV
MOV
MOV
MOV

oT .EDF ,ERRTYP
@15 ,ERRNBR
QEM76 ,ERRMSG
#ERR12,ERRBLK

CNDMCAQ DMV11 LINE UNIT DIAGL
.++.CKRSA

22-FEB-84

15:31

T6
PAGE 44

SEG 0073

-- CHECK RECEIVER STATUS AVAILABLE

3305
3306
3307
3308
3309
3310
3311
3212
3313
3314
3315
3316
3317
3318
3319
3320
3321
3322
3323
3324
3325

3326
3327
3328
3329
3330
3331

3332
3333
3334
3335 006474
3337

MACRO M1200

LBTIL
LT

.. ..CKRSA

CKRSA

THIS

-- CHECK RECEIVER STATUS AVAILABLE

SUBROUTINE

CHECKS FOR

THE PROPER

STATE

Yy Y

RSA

rrm

THE

USYRT

HL
i

STATUS REGISTER, AND REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE
STATE OF BIT O IN THE WORD FOLLOWING THE CALL.

CALLING SEQUENCE

i
ie

JSR
. WORD

RS,CKRSA
<BIT O IS EXPECTED VALUE OF R: \»

MOV
JSR
USTATR

@7 ,REGNUM
RS,READI

BIT
BEQ
BITB
BNE

#BITO,(RS).
2%
ORSA, 14
3

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

012737
004537
122000

000007
003610

032725

000001

132737
001040

000020

000000

001422

002412

CKRSA:

1$:

006352

. WORD

;STACK "RSA NOT SET” MSG
GTOF

012737
012737
012737
012737
000261
000423
132737
001416

012737
012737
012737
012737
000261
000401
000241
000205

000001
000020
014201
017722
000020

002246
002250
002252
002254
006352

EM77,.ERR12

;GET EXPECTED STATE OF RSA
;BR IF EXPECTED RSA = 0
:SEE IF RSA = 1
;BR IF RSA = 1

QUEVE "DEVICE FATAL"” ERROR @ 16
MOV

o7 .EDF ,ERRTYP

MOV
MOV

QEM77 ,ERRMSG
#ERR12,ERRBLK

MOV

2%:

SEC
BR
BITB
BEQ

4
ORSA,1$
3

GTOF

EM78,ERR12

sSTACK "RSA NOT CLEARED” MSG
000001
000021
014215
017722

;SET REG NO. FOR POSSIBLE ERROR REPORT
sREAD USYRT STATUS

002246
002250
002252
002254

3s:

sSET C BIT TO FLAG ERROR
;s TAKE ERROR EXIT
;:SEE IF RSA = 0
:BR IF RSA = 0

’
;SET C BIT TO FLAG ERROR
; TAKE ERROR EXIT

RTS

;RETURN

CcLC

QUEVE "DEVICE FATAL” ERROR @ 17

SEC
BR

;:CLEAR C BIT FOR NO ERRORS

€16 ,ERRNBR

MOV
MOV
MOV
MOV

@7 .EDF ,ERRTYP
€17 ,ERRNBR
SEM78 ,ERRMSG
#ERR12,ERRBLK

CNDMCAO DMV11

..CKROR
3339
3340
3341
3342
3343
3344
3345
3346
3347
3348
3349
3350
3351
3352
3353
3354
3355
3356
3357
3358
3359

3360
3361
3362
3363

LINE UNIT

DIAGL

MACRO M1200

3369
3370
3371
3372

22 FEB-84

15:31

PAGE 45

SEG 0074

-- CHECK RECEIVER OVERRUN
.SBTTL

....CKROR

-- CHECK RECEIVER OVERRUN

122882520000 000000000 0000000000000 0000000000000 0000

RAARRARSASAARLIIALAS

i*# CKROR - THIS SUBROUTINE CHECKS FOR THE OCCURANCE OF RECEIVER OVERRUN IN THE
HL
USYRT RECEIVER STATUS REGISTER (RDSRH), AND REPORTS AN ERROR IF IT IS
;e

NOT

PROPERLY

SET

THE

STATE

BIT

THE

WORD

FOLLOWING

THE

CALL.

ie
i
;e

CALLING SEQUENCE :
RS,CKROR
JSR
.WORD
<BIT O IS EXPECTED VALUE OF ROR»>

1888882888002 000000800 80000080000 000 8000000080000 0 0000800000000 00000000000000s

012737
004537
120401
000000
032725
001422

132737

001040

000001
003610

002412

CKROR:

1$:
000010

006512

MOV
JSR

&1 ,REGNUM
RS,READI

.WORD
BIT
BEQ
BIT8

O
#8IT0,(RS).
2$
OROR, 1%

RDSRH

012737
012737
012737
012737

000001
000022
014235
017722

002246
002250
002252
002254

000010

006512

2%:

SEC
BR
8ITB
BEQ

4
;?0“.10

GTOF

EM91,ERR12

:STACK “ROR NOT CLEARED" MSG
012737
012737
012737
012737
000261
000401
000241
000205

000001
000023
014266
017722

;SET REG NO. FOR POSSIBLE ERROR REPORT
;READ RECEIVER STATUS

;GET EXPECTED STATE OF ROR
;BR IF EXPECTED ROR = 0
:SEE IF ROR = 1
;BR IF ROR = 1

BNE
38
: STACK 'gEgEIVER OVRN NOT SET" MSG
EM90,ERR12

3365

3366
3367

\l()

002246
002250
002252
002254

34:

a%:

SEC
BR
CcLC

RTS

44
RS

QUEUE "“DEVICE FATAL” ERROR ¢ 18

:SET C BIT TO FLAG ERROR

MOV
MOV
MOV
MOV

87T .EDF ,ERRTYP

SERR12, ERRBLK

: TAKE ERROR EXIT

;SEE IF ROR = O
:BR IF ROR = O

QUEUVE "“DEVICE FATAL" ERROR ¢ 19

:SET C BIT TO FLAG ERROR
: TAKE ERROk EXIT

;CLEAR C BIT FOR NO ERRORS

;RETURN

MOV
MOV
MOV
MOV

&7 .EDF ,ERRTYP
919,.ERRNBR
9EM91 ,ERRMSG
9ERR12,ERRBLK

CNOMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

22-FEB-84

1€,
15:31

PAGE 46

SEGQ 0075

«+..CKSEOM -- CHECK RSOM, REOM
3374
3375
3376
3377
3378
3379
3380
3281
3382

+IBTIL

(000000 ARRARARRARARAASALAARALASAARALLAASSLLARARAEARAARAARAS

;# CKSEOM - THIS SUBROUTINE CHECKS FOR THE PROPER STATES OF RSOM, REOM IN THE
i
USYRT RECEIVER STATUS REG (RDSRH) AND REPORTS AN ERROR IF THEY ARE NOT
g
PROPERLY SET TO THE STATES OF BITS 0,1 IN THE WORD FOLLOWING THE CALL.
i
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION

DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE.

e
L
L

CALLING SEQUENCE :
JSR
RS,CKSEOM
<BIT O IS EXPECTED VALUE OF RSOM, BIT 1 IS VALUE OF REOM>

STACKED,

AND

THE

(2828808008000
R R

3388 006636
3389 006644
3390 006650
3392
3393
3394
3395

000007
003610

006654
006660
006662
006670

012737
004537
12G401
000000
032725
001422
132737
001040

006672
006700
006706
006714
006722
006724
006726
006734

012737
012737
012737
012737
000261
000473
132737
001416

000001
000024
013520
017722

3398
3399
3400
3401
3402
3403 006736

3404
3405
3406
3407
3408
3409

006736
006744
006752
006760
006766
006770
006772
007000
007002
007010

012737
012737
012737
012737
000261
000451
032765
001422
132737
001040

002412

1$:

000001
000001

006652

3412
3413
3414
3415

012737
012737
012737
012737
000261
000423
132737
001416

MOV

#7 ,REGNUM

JSR

RS,READI

.WORD
BIT
BEQ
8ITB
BNE

O
BITO,(RS).
2
ORSOM, 18
38

RDSRH

:STACK “RSOM NOT SET” MSG
GTOF
EM29,ERR12

000001

002246
002250
002252
002254
006652

2s:

SEC
BR
BITB
BEQ

6%
ORSOM, 1$
3%

:STACK “RSOM NOT CLEARED" MSG
GTOF
EM28,ERR12
000001
000025
013477
017722

002246
002250
002252
002254

000002

177776

000002

006652

000001
000026
013556
017722

002246
002250
002252
002254

3411 007012

007012
007020
007026
007034
007042
007044
007046
007054

CKSEOM:

C-BIT

000002

006652

3%:

SEC
BR
BIT
BEQ
BITB

6%
#BIT1, -2(R5)
4
;REU‘I.U

BNE
$
sSTACK “REOM NOT SET" MSG
GTOF
EM31.ERR12

4%:

SEC
BR

BEQ

BITB

OREOM,
18

SET,

WHICH LEAVES

THE

ERROR REPORTING

THE

AARRRRR00 0000000000400
0 000000 bbbttt

:SET REG NO. FOR POSSIBLE ERROR REPORT

sREAD USYRT RECEIVER STATUS

;GET EXPECTED STATE OF RSOM
:BR IF EXPECTED RSOM = 0

:SEE IF RSOM = 1

:BR IF RSOM =

QUEVE “DEVICE FATAL” ERROR @ 20

:SET C BIT TO FLAG ERROR

MOV
MOV
MOV
MOV

€T.EDF ,ERRT 1P
€20, ERRNBR
9EM29,ERRMSG
#ERR12,ERRBLK

: TAKE ERROR EXIT
:SEE IF RSOM = O
:BR IF RSOM = 0O

QUEVE “DEVICE FATAL” ERROR @ 21

:SET C BIT TO FLAG ERROR

MOV
MOV
MOV
MOV

@7 .EDF ,ERRTYP
€21 ,ERRNBR
SEM28 ,ERRMSG
#ERR12,ERRBLK

s TAKE ERROR EXIT

sGET EXPECTED STATE OF REOM

;B8R IF EXPECTED REOM = 0
:SEE IF REOM = 1
:BR IF REOM = 1

QUEUE “DEVICE FATAL" ERROR @& 22

:SET C BIT TO FLAG ERROR
; TAKE ERROR EXIT

;SEE IF REOM = O

:BR IF REOM = 0

MOV
MOV
MOV
MOV

@7 .EDF ,ERRTYP
922 ,ERRNBR
@EM31 ,ERRMSG
®ERR12,ERRBLK

L &
CNDMCAO DMV11l LINE UNIT DIAG1I

MACRO M1200

22 FEB-84

15:31

PAGE 46 1

SEG 0076

«...CKSEOM -- CHECK RSOM, REOM

;

3416

; STACK “REOM NOT CLEARED” MSG

3417 007056

007056
007064
007072
007100
3418 007106
3419 007110
3420 007112
;:gé 007114
3423

GTDF

012737
012737
012737
012737
000261
000401
000241
000205

000001
000027
013535
017722

002246
002250
002252
002254
S8:
6$:

SEC
B8R
CLC
RTS

EM30,ERR12

6%
RS

QUEUE "DEVICE FATAL"” ERROR # 23
MOV
o7 .EDF ,ERRTrP
MOV
423 ,ERRNBR
MOV
#EM30,ERRMSG
MOV
9ERR12,ERRBLY
;SET C BIT TO FLAG ERROR
; TAKE ERROR EXIT
;CLEAR C BIT FOR NO ERRORS
sRETURN

CNDMCAO DMV11 LINE UNIT

«+..CHKTSO

DIAGL

ME
MACRO M1200

22-FEB-84

15:31

PAGE

SEQ 0077

-- CHECK TRANSMIT SERIAL OUT BIT

3425
3426

LSBTTL

....CHKTSO -- CHECK TRANSMIT SERIAL OUT BIT

1288280040080 0004 0000400008400 8RR R AR AR AR ALAR

3427

AR ARAR

AR AR RRLSARSAR SRR

i CHKTSO - THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF TSO IN THE USYRT
ie
STATUS REGISTER, AND SETS THE “C” BIT IF IT IS NOT SET TO THE STATE
L
OF BIT O IN THE WORD FOLLOWING THE CALL.

3428
3429
3430
3431
3432
3433

CALLING SEQUENCE

.WORD

3434

JSR

RS,CHKTSO

<BIT O IS EXPECTED VALUE OF TSO»

;‘t.““‘...‘..“‘.0“‘.““.0‘0 088888000008 000 0000000000000

3435 007116
3436 007116
007124
007130
3439 007132
007134
007140
007142
007150

012737
004537
122000
000000
032725
001422
132737

000007
003610

000010

007132

007152
007160
007166
007174
007202
007204

012737
012737
012737
012737
000261
000423

000001
000030
014425
017722

002246
002250
002252
002254

007206
007214

132737
001416

000010

007132

012737
012737
012737
012737
000261
000401
000241
000205

000001
000031
014445
017722

002246
002250
002252
002254

001040

002412

CHKTSO:

1$:

000001

007152

#7 ,REGNUM
RS,READI

;SET REG NO. FOR POSSIBLE ERROR REPORT
;READ USYRT STATUS

O
#BITO,(RS).
sGET EXPECTED STATE OF TSO
BEQ
24
;BR IF EXPECTED TSO = O
BITB
#7S0,1$
:SEE IF TSO = 1
BNE
3
;BR IF TSO = 1
;e4¢ STACK “TSO NOT SET” ERROR #2#
GTOF
EM100,ERR12

BIT

SEC

2%:

007216

007216
007224
007232
007240
007246
007250
007252
007254

MOV
JSR
USTATR
.WORD

MOV
MOV
MOV
MOV

@7 _EDF ,ERRTYP
924 ,ERRNBR
#EM100,ERRMSG
#ERR12,ERRBLK

;: TAKE ERROR EXIT

BITB
@7S0,1$
;SEE IF TSO = O
BEQ
3
:BR IF 7SO = 0
;#42 STACK “TSO NOT CLEARED” ERROR #as
GTOF
EM101,ERR12

SEC

43;

QUEUVE "DEVICE FATAL” ERROR ¢ 24

sSET C BIT TO FLAG ERROR

34:

0000000000000000

RTS

CcLC

QUEVE "DEVICE FATAL" ERROR # 25

:SET C BIT TO FLAG ERROR
: TAKE ERROR EXIT

;CLEAR C BIT FOR NO ERRORS
;:RETURN

MOV
MOV
MOV
MOV
§

@7 .EDF ,ERRTYP
925 ,ERRNBR
#EM101 ,ERRMSG
#ERR12,ERRBLK

CNDMCAO DMV11 LINE UNIT DIAGL
«++..SERIAL

MACRO M1200

22-FEB-84

15:31

PAGE 48

SEQ 0078

-- READ/CHECK TX CHARACTER VIA TSO BIT

3460
3461

3464

.SBTTL

....SERIAL

-- READ/CHECK TX CHARACTER VIA TSO BIT
Yy

3462
3463

i SERIAL
i b
T

THE
AND

3465
3466
3467
3468
3469
3470
3471
3472
3473
3474
3475

NOTE:

i .
ie
is
ie

CALLING SEQUENCE :
RS, SERIAL
JSR
.WORD
<& OF BITS TO BE READ»>
<EXPECTED VALUE OF SERIAL BIT STREAM>
.WORD

3476
3477
3478
3479
3480
3481

010146
010246
010346

007264
007266

005001
012502

007270
007272
007276

006301
004537
000001

007300
007304
007306
007310
007312

004537
000001
103401
005201
077212

007314
007316
007320

012503
020103
001422

007322
007326

010337
010137

SERIAL
:

1$:

011614
007116

2%:

002400
002402

007364

012737
012737
012737
012737
000261
000401

007366
007370
007372
007374
007376

000241
012603
012602
012601
000205

000001

000032
014471
020036

YT YT

LT IrLLIY

TRANSMIT SERIAL OUT
STACKS MESSAGE/SETS

(TSO) BIT OF THE USYRT STATUS REGISTER,
"“C” BIT IF AN INCORRECT CHARACTER IS READ.

"EXPECTED VALUE” ARGUMENT. IS ALWAYS READ RIGHT-TO-LEFT.

ALARRL R AL

AR LR AR08 0044040000000 0000000000000 00040s

MOV
MOV
MOV

R1,-(SP)
R2, -(SP)
R3,-(SP)

:1SAVE R1
:SAVE R2 (TICKS)
$SAVE R3 (EXPECTED_WORD)

CLR
MOV

R1
(RS)+,R2

;CLEAR ASSEMBLED_WORD
;GET @ OF TICKS

ASL

s SHIFT ASSEMBLED_WORD

fSR

RS5,CHKTSO

;CHECK FOR TSO=1

BCS
INC

2s
R1

;BR IF TSO0=0
:7S0=1: SET LSB OF ASSEMBLED_WORD

MOV
CMP
BEQ

(RS)+,R3
R1,R3
3

;GET EXPECTED_WORD
;COMPARE EXPECTED_ AND ASSEMBLED _WORD
:+BR IF CORRECT VALUE READ

MOV
MOV

R3,GDATA
R1,BDATA

;EXPECTED_WORD => GDATA
s ASSEMBLED_WORD => BDATA

GTOF

EM102,ERR13

iSR

soB

RS,STEPLUY

R2,18%

;CLOCK USYRT ONCE

;:LOOP UNTIL NO MORE TICKS

;444 STACK "TRANSMISSION ERROR" MSG s+

007332

007332
007340
007346
007354

Y Y

- THIS SUBROUTINE SERIALLY READS/CLOCKS/CHECKS A CHARACTER FROM

(2822820200 R 0002

007256
007256
007260
007262

002246
002250
002252
002254

38:

4s:

SEC
BR

. +4

CLC
MOV
MOV
MOV

(SP)+ ,R3
(SP)+,R2
(SP)+,R1

RTS

QUEUVE “DEVICE FATAL" ERROR & 26

:SET C BIT TO FLAG ERROR
: TAKE ERROR EXIT
;:CLEAR C BIT FOR NO ERRORS
+RESTORE REGISTERS
s RETURN

MOV
MOV
MOV
MOV

@7 .EDF ,ERRTYP
926 ,ERRNBR
9EM102,ERRMSG

#ERR13,ERRBLK

B/
CNDMCAQ DMyv11

LINE UNIT

... INITRN --

INIT

DIAGL

MACRO M1200

TRANSMISSION OF

22 FFB-84

15:31

PAGE 49

A MESSAGE

3509

.SBTTL ....INITRN -- INIT TRANSMISSION OF A MESSAGE

3510
3511
3512
3513
3514
3515
3316

;00..000.‘00.‘.0‘.0‘0‘0“.“.“0“‘000000.000‘0‘0.000“.00000000‘000.00.000000
3¢ INITRN - THIS SUBROUTINE INITIATES TRANSMISSION OF A MESSAGE, BY LOADING
e
THE USYRT PCSARL,M AND THE PCR WITH THE DATA PASSED IN THE 2 WORDS
e
FOLLOWING THE CALL ; LOADING AND CLOCKING 1 SOM UNTIL THE FIRST
e
SYNCH OR FLAG MAS BEEN SERIALIZED IN THE USYRT, THE PROGRAM MONITORS
e
ALL THE FLAGS IN THE USYRT STATUS REGISTER THROUGHOUT THE PROCESS.
e
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION IS STACKED

g%g

3517

3520

3521

3522
3523
3524

WHICH LEAVES THE ERROR REPORTING AT

OF THE CALLING ROUTINE OR SUBROUTINE
.

THE DISCRETION

CALLING SEQUENCE :
JSR

e
e
i

3525

3526 007400

AND THE C-BIT SET,

RS,INITRN

.WORD
.WORD

<VALUE TO LOAD INTO USYRT PCSARL ,M>
<VALUE TO LOAD INTO USYRT PCR (PASSED IN LO BYTE)>
«SPECIAL VIAORB MASKING VALUE (PASSED IN HI BYTE)>

;..0..‘.0“00‘.00..‘...0.....0..0..‘.0‘000‘...0.“00..0000.000‘00000000.00.000

INITRN:

3527 007400
3528 007402

010146
004537

003734

MOV
JSR

R1,-(SP)
RS,WRITEI

:SAVE R1
sRESET THE USYRT

3531 007412

004537

003734

JSR

RS,WRITEI

;CLEAR USYKT RESET BIT

112537
004537

007434
003734

MOVS
JSR

(RS)+,18
RS,WRITEI

;GET VALUE TO LOAD INTO USYRT PCSARL
;LOAD USYRT PCSARL

3529 007406
3530 007410

120000
000031

3532 007416
3533 007420

120000
000030

3536 007432
3537 007434

120404

3534 007422
3535 007426
3538 007436
3539 007442

3540 007446
3541 007450

3542 007452

3543 007456

3544 007462
3545 007470

3546 007474
3547 007476

112537
004537

120405
000000

112537

005037

113737
004537
120407

VIAORS
RTSND!DTR!PRESET
VIAORS
RTSND!DTR

18:

007450
003734

007476

002456

007476
003734

PCSARL
.MORD

MOVB
JSR

PCSARM
.MORD

MOVB
CLR

002456

MOVB
JSR
33

PCR
.MORD

3548 007500

004537

003734

3551 00751C

004537

003734

200

004537

003734

004537

005432

3549 007504
3550 007506

120013

3552 007514
3553 007516

120006
000300

3555 007524
3556 007526

120007
000000

3554 007520

3557 007530
3558 007534

;ggg 007536

000110

013737

007674

3564 007552

004537

003734

35525 007546
3565 007556

142537
120000

007560

;GET VALUE TO LOAD INTO PCSARH
;LOAD USYRT PCSARM

(RS)+,38

;GET VALUE TO LOAD INTO PCR

33 ,SAVLEN
RS,WRITEI

$SAVE CHAR LENGTM BITS
;LOAD USYRT PCR

SAVLEN

:SET ACR FOR T1 ONE-SHOT MODE

JSR

RS,WRITEI

;LOAD VIA TiL-L

JSR

RS,WRITEI

;LOAD VIA TiL-M

JSR

RS,CKUSTS

8CS

MOV

204,134

1# SET UP DEFAULT VIAORB PARAMETERS

JSR

RS,WRITEI

;SET UP USYRT

VIATIC
300

VIAT1D
000
110

007560

(RS)+,28
RS,WRITEI

RS,WRITEI

VIAACR

103454

3561 007540

JSR

8ICB
VIAORS

(RS)+,138

;CHK USYRT STATUS FOR INIT'D STATE

TBMT

7SO =

+IF ERROR, EXIT SUBROUTINE
;¢ CLEAR ANY SPECIFIED VIAORB BITS.

CNDMCAQ DMV11 LINE UNI'

.. INITRN --

INIT

000142

3568
3569
3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
3580
3581
3582
3583
3584
3585
3586
3587
3588
3589
3590
3591
3592
3593
3594
3595
3596
3597
3598

004537

007562
007566

007570
007572
007576
007600
007602
007606
007610
007612
007614
007620
007622
007626
007630
007632
007640
007642
007644
007650
007652
007656
007660
007662
007666
007670
007672

007674

MACRO M1200

22 FFB-84

15:31

PAGE

49-1

SER 0080

TRANSMISSION OF A MESSAGE

3566 007560

3567

DIAGL

120403

000001
G04537
120402
000226
004537
000000

13%:

TXEN!RXEN!TTLOOP

003734

JSR

RS,WRITEI

$SET TSOM IN USYRT

003734

JSR

RS, WRITEI

t1LOAD SYNCH CHAR INTO TXx BUF

006036

SYNCH
gsa

RS,CKTBMT

;:CHK FOR TBMT = O

BCS
CLR

4]
R1

s+ IF ERROR,

JSR
USTATR

R5,READI
°

tREAD USYRT STATUS REG

BIT8
BNE
INC
cHP
BLT
JSR
1

oTBMT,Ss
64
R1
R1,03
4%
RS, CKTBMT

JSR

RS,CKTACT

+IF ERROR, EXIT SUBROUTINE
;CHK FOR TXACT = 1

RTS

tRESTORE R1
sRETURN (IF C = 1, WE HAD AN ERROR)

TDSRH
TSOM

TDSRL

103427

011614

003610
000100

007630

S5$:

000003

006036

005536

64:
7%:

20%:

iSR

B8CS
1

RS,STEPLUY

TXEN!RXEN!TTLOOP

THIS

VALUE

MIGHT

MODIFIED

ABOVE

EXIT SUBROUTINE

s INIT CYCLE COUNTER
sCLOCK LU FOR 1 CYCLE

1SEE IF TBMT IS SET YET

;B8R IF YES

s INCR CYCLE COUNTER
$SEE IF 3 CYCLES DONE YET
+BR IF LESS THAN 3 CYCLES
:GO STACK "TBMT NOT SET" MSG

sDEFAULT VALUE FOR VIAORB:
;tx AND RX ON USYRT,

ENABLE

ASSERT RTS,

DTR

4
[

CNDMCAQ DMV11 LINE UNIT DIAGL
«+ TXCHAR --

TRANSMIT

MACRO M1200

22 FEB-84

15:31

PAGE

SEG 0081

A CHARACTER

3600
3601
3602
3603
3604

LSBTTL

....TXCHAR

TRANSMIT A CHARACTER

1000000000000000000000000
0000000000000 000 NR0R00R0ANRRRIAIIARAARAGIRSRLAASAS

3605
3606
3607
3608
3609
3610

TXCHAR

THIS

SUBROUTINE

INITIATES

TRANSMISSION OF

A CHAR BY

THE USYRT TDSRL WITH THE DATA PASSED IN THE LO BYTE OF THE WCRD
FOLLOWING THE CALL, AND CLOCKS THE LINE UNIT WITH THE NUMBER OF CYCLES
PASSED IN THE SECOND WORD FOLLOWING THE CALL. THE PROGRAM CONTINUALLY
MONITORS TBMT AND TXACT THROUGHOUT THE PROCESS.
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION
IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE.

CALLING SEQUENCE :

3611
3612
3613
3614
3615
3616
3617 007676
3618 007676
007700
007702
007706
007712
007714
007716
007720
007722
007724
007726
007732
007734

e
ie
ie
ie
i
L
i

ie
L
L
HL

JSR
.WORD
. WORD

RS, TXCHAR
¢DATA FOR TDSRL IN LO BYTE>
<NUMBER OF CYCLES TO CLOCK (IN LO BYTE)»

10000000000000000000000000400800000000000084000000480004000800000040000080080800808480

TXCHAR:

007714
003734

1%:

MOV
MOV
MOV
JSR

R1,-(SP)
R2,-(SP)
(RS)+,18
RS,WRITEI

:SAVE R1
$SAVE R2
1GET DATA FOR TDSRL
sLOAD DATA INTO TDSRL

.WMORD
CLR
CLR

O
R1
ne

sINIT CYCLE COUNT AND CLEAR C BIT
sCLEAR REQ'D CYCLE COUNT

TDSRL

MOVe
005536

3s:

007736
007740

BEQ

(RS)¢ R2

sGET DESIRED NO. OF CYCLES
sBR IF NO CLOCKING DONE

.ilSfl

RS CKTACT

B8CS
cMP

6
R1,R2

;BR TO EXIT IF ERROR
;:SEE IF REQUIRED CYCLES DONE YET

BEQ

;CHECK TXACT = 12

1BR IF YES

007742
007746

000200

BITB
BNE

(RS),oONCTBMT
7

s» CHECK FOR "TBMT=0 CHECK” DISABLE
3 BR IF MSB IS NOT SET

007750
007754
007756
007760
007764
007766
007770
007772
007776
010000
010002
010004
010006

006036

gSR

RS,CKTBMT

sCHECK FOR TBMT

B8CS

;BR TO EXIT IF ERROR

INC
BR

R1
33

sINCR CYCLE COUNT
;:KEEP CLOCKING

MOV
MOV
INC

(SP)+,R2
(SP)+,R1
RS

1RESTORE R2
sRESTORE R1
:ADJUST RS FOR SANE RETURN

011614

006036

74:

S$:

6%:

.ilSR

.{SR

RTS

RS,STEPLUY

RS,CKTBMT

= 0

;CLOCK LU FOR 1 CYCLE

sCHK TBMT

sRETURN (WITH C BIT

IF Eflflm)

CNDMCAQ DMv11l LINE UNIT DIAGL
ve..TXCTRL

£/
HACRG‘ M1200 22-FEB-84 15:31 PAGE 51

SEG 0082

-- CONTROL MESSAGE TRANSMISSTON ( TDSRH)

3655

.SBTTL ....TXCTRL -- CONTROL MESSAGE TRANSMISSION ( TOSRM)

3657
3658
3659
3660
3661
3662
3663

;¢ TXCTRL - THIS SUBROUTINE ALLOWS CONTROL OF MESSAGE TRANSMISSION BY LOADING
e
THE USYRT TDSRH WITH THE DATA PASSED IN THE LO BYTE OF THE WORD
e
FOLLOWING THE CALL, AND CLOCKS THE LINE UNIT WITH THE NUMBER OF CYCLES
1.
PASSED IN THE SECOND WORD FOLLOWING THE CALL. THE PROGRAM CONTINUALLY
ie
MONITORS TBMT AND TXACT THROUGHOUT THE PROCESS.
e
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION
ie
IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE

3656

;‘00“.“0.“‘.0..00““0“.0.‘000‘0‘.‘.“".‘.‘..O..“‘O‘..0..‘0..‘00.‘.0.0‘0

fi;

3670

3672 010010
3673 010012
3674 010014
3675 010020
3676 010024
3677 010026
3678 010030

010146
010246
012537
004537

120403
000000
005001

012502

3681 010036

004537

3682 010042
3683 010044

3684 010046

3685 010050

3686 010052

3687 010056
3688 010060

001422
000001
103416
001411

004537

000000
103410

004537

3691 010070

005201

3692 010072
3693 010074
3694 010100

3695 010102
3696 010104

3697 010106

CALLING SEQUENCE :
JSR
RS, TXCTRL
.WORD
<DATA FOR TDSRH IN LO BYTE>
.MORD
<NUMBER OF CYCLES TO CLOCK>

TXCTRL:

010026
003734
2s:

000001

000761
004537
000001

012602
012601

000205

MOV
MOV
MOV
JSR

R1,-(SP)
R2,-(SP)
(RS)+,28
RS,WRITEI

;SAVE R1
:SAVE R2
:GET DATA FOR TDSRH
;:LOAD DATA INTO TDSRH

O
R1

sINIT CYCLE COUNT AND CLEAR C BIT

BEQ

;BR IF NO CLOCKING DONE

1
BCS

:BR TO EXIT IF ERROR

BEQ

:BR IF YES

TDSRH
.WMORD
CLR

MOV

005536

3s:

020102

3689 010062

3690 010066

e
;e
i
e

;“".“.‘..‘.“.‘..0‘0“.‘“‘..‘.“0‘0‘.‘..0“‘0.0“0......0000.000...000000.

3679 010032
3680 010034

DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE.

3666
3667
3668
3669
3671 010010

JSR

cMP
006036

JSR

0
BCS

011614

006036

R1,R2
RS,CKTBMT

;CHECK TXACT = 1

:SEE IF REQUIRED CYCLES DONE YET
;CHECK FOR TBMT = 0O
;BR TO EXIT IF ERROR

INC

s+ INCR CYCLE COUNT

MOV
MOV

(SP)+,R2
(SP)+,R1

s+RESTORE R2
;RESTORE R1

68:

RS,CKTACT

;:GET DESIRED NO. OF CYCLES

[

JSR

S$:

(RS)+,R2

BR
JSR
1
RTS

RS,STEPLU
3
RS,CKTBMT

sCLOCK LU FOR 1 CYCLE
;KEEP CLOCKING
;CHK TBMT = 1

;RETURN (WITH C BIT

1 IF ERROR)

CNDMCAO DMv11l LINE UNIT DIAGL
. .RXCHAR

MACRO M1200

PAGE 52

SEQ 0083

.SBTTL

....RXCHAR

-- RECEIVE A CHARACTER

125088884000 0080040880000 204000000000 800000 0000000000000 000000000000

0000000bae

:* RXCHAR - THIS SUBROUTINE READS THE USYRT RDSR AND CHECKS THE CONTENTS

3708
3709

3732

15:31

-- RECEIVE A CHARACTER

3700
3701
3702
3703
3704
3705
3706
3707

3710
3711
3712
3713
3714
3715
3716
3717
3718
3719
3720
3721
3722
3723
3724
3725
3726
3727
3728
3729
3730
3731

7
22-FEB-84

i ®

AGAINST

i
L
1e
HL
i

IF BITO = O IN THE SECOND WORD FOLLOWING THE CALL, THE RERR BIT IS
NO7 CHECKED AGAINST THE EXPECTED VALUE. THEN, IT CLOCKS
THE LINE UNIT FOR THE NO. OF CYCLES PASSED IN THE THIRD WORD
FOLLOWING THE CALL. THE PROGRAM CONTINUALLY MONITORS RDA AND RXACT.
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION

DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE.

e
e

L
L
e
e

THE

IS STACKED,

DATA PASSED

THE

AND THE C-BIT SET,

WORD FOLLOWING

THE

CALL.

WHICH LEAVES THE ERROR REPORTING AT

THE

CALLING SEQUENCE :

JSR

.WORD
.WORD
.WORD

RS ,RXCHAR

1282288888028 04004000404000280024000000000220
0048000084002 000008000200840000400

010110
010110
010112
010114
010120
010122
010124
010130
010132
010134
010136
010142
010150
010152
010160
010164
010170
010172
010176
010200
010202
010210
010212

3733
3734
3735
3736
3737
3738
3739
3740
3741
3742
3743 010220

010220
010226
010234
010242
010250
010254
010260
010264
010270
010274

3744
3745
3746
3747
3748
3749
3750
3751 010302

010146
010246
004537
120401
000000
004537
120400
000000
111501
042701
023727
001005
142737
142701
123701
001462
004537
122000
000000

132737

001421
012737

RXCHAR:

003610

2%:

003610

1$:
177400

002456

000347

000200

010132

003610
43:

000007

R1,-(SP)
R2, -(SP)
RS ,READI

:SAVE R1
:SAVE R2
;:READ RDSRH

O
RS,READI

;:READ RDSRL

:BR IF NOT 7-BIT CHARS

BICB
cMPB
BEQ
JSR
USTATR

08177.R1
1$,R1
68
RS,READI

:COMPARE RCV'D CHAR TO EXPECTED
:BR IF MATCH
sREAD USYRT STATUS REG

BITB
BEQ
MOV

eTXV,48
S$
€7 ,REGNUM

B8ICB
3s:

000002

MOV
MOV
JSR
RDSRH
.WORD
JSR
RDSRL
.WORD
MOVB
BIC
cMP
BNE

.WMORD

000001
000033
013717
017722

011350
002412

002400
002400
002402
010132

oBIT7,18

sSTACK "TX UNDERRUN” ERROR
GTDF

012737
012737
012737
012737
000137
005037
005037
110137
005037
113737

O
(RS),R1
;GET EXPECTED RDSRL
€177400,R1
1MASK OFF UNUSED BITS
SAVLEN.OTXDL'RXOL ;SEE IF 7-BIT CHARS BEING USED

Ss:

002402

JMP
CLR

EM54 ,ERR12

208
REGNUM

CLR
MOVB
CLR

GDATA
R1,GDATA
BDATA

GTOF

EM34 ,ERR10

sCLEAR 8TH BIT FOR COMPARE

;SEE IF TX UNDERRUN OCCURRED
;:BR IF NOT
:SET USYRT REG NO. FOR STATUS REG

QUEUVE “DEVICE FATAL"” ERROR @& 27

s TAKE ERROR EXIT
:SET USYRT REG NO.

:SET EXPECTED DATA
;SET ACTUAL DATA

MOVB
14,BDATA
: STACK ”RCV D DATA MISCOMPARE" ERROR

MOV
MOV
MOV
MOV

FOR RDSRL

@7 .EDF ,ERRTYP
€27 ,ERRNBR
@EMS54 ,ERRMSG
#ERR12,ERRBLK

CNDMCAO DMV11 LINE UNIT DIAG1L

MACRO M1200

22-FEB-84 15:31

PAGE 52-1

SEQ 0084

....RXCHAR -- RECEIVE A CHARACTER
010302
010310
010316

012737
012737
012737

000001
000034
013573

3752 010332
3753 010336
3754 010342

000137
116501
042701

011350
000001
177400

3756
3757
3758
3759

010352
010354
010360
010366

001016
000137
012737
005037

3761
3762
3763
3764
3765
3766
3767
3768
3769
3770
3771
3772

010376
010402
010410
010416
010424

005037
113737
012737
032765
001447

010426
010432
010434
010442

132701
001022
132737
001440

010324

3755 010346

3760 010372

012737

123701

110137

017372

68:

010122

011234
000001
002400
002400
002402
010122
000001
000001

002412

000200

010122

002246
002250
002252
002254

012737
012737
012737
012737
000137
132737
001016

000001
000035
013621
017722
011350
000200

010510
010516
010524
010532
3778 010540

012737
012737
012737
012737
000137

000001
000036
013642
017722
011350

132701

000010

3780 010544

010550
010552
010560

001022
132737
001440

010122

;STACK

000010

012737
012737
012737
012737
000137
132737
001016

9s:

010122

;STACK
000001
000037
013346
017722
011350
000010

78
178
21 ,REGNUM
GDATA

:BR IF MISMATCH
s CONTINUE
:SET USYRT REG NO. FOR RDSKH
:SET EXPECTED DATA

R1,GDATA

:SET REG NO. FOR PRINTOUT
;SEE IF RCV ERROR BIT SHOULD BE
;:BR IF YES

10%:

QUEUE "DEVICE FATAL” ERROR ¢ 29

: TAKE ERROR EXIT
;:SEE IF ACTUAL BIT
;:BR IF YES

BITB

OROR,R1

:SEE

208
OROR,2$
114

MOV
MOV
MOV
MOV

IF EXPECTED BIT

:BR IF YES
;SEE IF ACTUAL BIT
:BR IF YES

o7 .EDF ,ERRTYP
#30,ERRNBR
9EM36
, ERRMSG
9ERR12,ERRBLK

= 0O

QUEUE “DEVICE FATAL” ERROR ¢ 31

: TAKE ERROR EXIT
:SEE IF ACTUAL BIT
:BR IF YES

oT.EDF ,ERRTYP
#29, ERRNBR
QEM3S
, ERRMSG
9ERR12,ERRBLK

QUEUE “DEVICE FATAL” ERROR @ 30

;: TAKE ERROR EXIT

JMP
BITB
BNE

IGNORED

:SEE IF EXPECTED BIT = 1
:BR IF YES
:SEE IF ACTUAL BIT = 0O
;BR IF YES

204

10
OROR, 2%
118
CLEARED"” MSG
EM16,ERR12

#ERR10,ERRBLK

:SET ACTUAL DATA

JMP

BNE
BITB
BEQ
"ROR NOT
GTOF

o7 EDF ,ERRTYP
028 ,ERRNBR
9EM34 ,ERRMSG

;COMPARE RCV'D STATUS TO EXPECTED

002246
002250
002252
002254
010122

2%,R1

JMP
20%
BITB
ORERR,2$
BNE
98
"RERR NOT SET” MSG
GTOF
EM36,ERR12

;CHECK ROR BIT

010562

010562
010570
010576
010604
3786 010612
3787 010616
3788 010624

BNE
JMP
MOV
CLR

002246
002250
002252
002254

MOV

; TAKE ERROR EXIT
:GET RDSRH
:MASK OFF UNUSED BITS

CLR
BDATA
MOVB
2% ,BDATA
7%:
MOV
01 ,REGNUM
BIT
ORERCHK ,2(RS)
BEQ
9s
;CHECK RERR BIT
BITB
ORERR,R1
BNE
8s
BITB
ORERR,2$
BEQ
9s
;STACK “RERR NOT CLEARED" MSG
GTOF
EM35,ERR12

8%:

MOV
MOV
MOV

20%
1(RS),R1
©177400,R1

MOVB

002402
002412
000002

QUEUE "DEVICE FATAL” ERROR & 28

JMP
MOVB
BIC

CcMPB

000200

010444
010452
010460
010466
3773 010474
3774 010500
3775 010506
3776
3777 010510

3781
3782
3783
3784
3785

002254

010444

3779

002246
002250
002252

MOV
MOV
MOV
MOV

o7 .EDF ,ERRTYP
@31 ,ERRNBR
QEM16,ERRMSG
9ERR12,ERRBLK

CNDMCAQ DMv1l LINE UNIT DIAGL

«+..RXCHAR

MACRO M1200

:STACK

010626
010634
010642
010650
3791 010656

012737
012737
012737
012737
000137

000001
000040
013332
017722
011350

3793 010662
3794 010666
3795 010670

132701
001022
132737

000004

3792

3796 010676
3797

001440

000004

002246
002250
002252
002254

010700
010706
010714
010722
3799 010730
3800 010734
3801 010742

3802

012737
012737
012737
012737
000137
132737
001016

11$:

010122
:STACK

000001
000041
013657
017722
011350
000004

002246
002250
002252
002254
010122

SEG 008S

010744
010752
010760
010766
3804 010774

012737
012737
012737
012737
000137

000001
000042
013701
017722
011350

3806
3807
3808
3809
3810
3811

132701
001022
132737
001440

000002

012737
012737
012737
012737
000137
132737
001016

000001
000043
013535
017722
011350
000002

000002

002246
002250
002252
002254

010122
:STACK

3815

BITB
BNE
BITB

ORABGA,R1
124
ORABGA,2$

:SEE _IF EXPECTED BIT = 1
:BR IF YES
$SEE _IF ACTUAL BIT = 0

GTOF

EM39,ERR12

BEQ
134
"RABGA NOT CLEARED" MSG

JMP
8178
BNE

20
ORABGA,2$
134

GTOF

EM4A0,ERR12

010122

20%

BITB
OREOM,R1
BNE
14%
BITB
OREOM, 28
BEQ
154
“REOM NOT CLEARED" MSG
GTOF
EM30,ERR12

14%:

JMP
BITB
BNE

20¢
OREOM,2$
15%

GTOF

EM31,ERR12

sSTACK “REOM NOT SET" MSG

3816 011062
011062
011070
011076
011104
3817 011112

012737
012737
012737
012737
000137

000001
000044
013556
017722
011350

3819 011116
3820 011122

132701
001022

000001

;BR IF

YES

QUEUVE "DEVICE FATAL” ERROR ¢ 33

s TAKE ERROR EXIT
:SEE _IF ACTUAL BIT =
;:BR IF YES

15¢:

T .EDF ,ERRTYP
933 ,ERRNBR
@EM39,ERRMSG
@ERR12,ERRBLK

QUEVE "DEVICE FATAL"” ERROR @ 34
MOV
MOV
MOV
MOV

QUEVE "DEVICE FATAL” ERROR ¢ 35

; TAKE ERROR EXIT
:SEE _IF ACTUAL BIT
+BR IF YES

MOV
MOV
MOV
MOV

o7 .EDF ,ERRTYP
034 ,ERRNBR
@EMA0,ERRMSG
®ERR12,ERRBLK

204

; TAKE ERROR EXIT

BITB
BNE

ORSOM,R1
16$

:SEE _IF EXPECTED BIT
:BR IF YES

o7 .EDF ,ERRTYP
#35,ERRNBR
@EM30,ERRMSG
#ERR12,ERRBLK

QUEUVE “DEVICE FATAL" ERROR @ 36

JMP

;CHECK RSOM BIT

o7 .EOF ,ERRTYP
432 ,ERRNBR
QEM14 ,ERRMSG
9ERR12,ERRBL
¥

:SEE_IF EXPECTED BIT = 1
:BR IF YES
:SEE IF ACTUAL BIT = O
:BR IF YES

002246
002250
002252
002254

MOV
MOV
MOV
MOV

s TAKE ERROR EXIT

002246
002250
002252
002254

MOV
MOV
MOV
MOV

: TAKE ERROR EXIT

JMP

13s:

QUEVE “DEVICE FATAL” ERROR & 32

20$

;CHECK REOM BIT

011016

011016
011024
011032
011040
3812 011046
3813 011052
3814 011060

12%:

;

JMP

:STACK “RABGA NOT SET" MSG

3803 010744

011000
011004
011006
011014

"ROR NOT SET" MSG
GTOF
EM14,ERR12

;CHECK RABGA BIT

3798 010700

3818

PAGE 52 2

-- RECEIVE A CHARACTER

3789
3790 010626

3805

22-FEB-84 15:31

H /7

MOV
MOV
MOV
MOV

T .EDF ,ERRTYP
#36 ,ERRNBR
@EM31 ,ERRMSG
9ERR12,ERRBLK

CNDMCAO DMV11 LINE UNIT DIAGL

«+...RXCHAR

22 FEB-84

15:31

PAGE S2 3

SEQ 0O0RE

-- RECEIVE A CHARACTER

3821 011124
3822 011132
3823
3824 011134
011134
011142
3825
3826
3827
3828
3829

MACRO M1200

011150
011156

011164
011170
011176

132737

001440

012737
012737
012737
012737
000137
132737

001016

000001

010122

011234

000001
000045
013477
017722
011350
000001

002246
002250
002252
002254
010122

16%:

sSTACK

012737
012737
012737
012737
000137

013520
017722
011350

000001
000046

011240

005001

116502

000004

011242
011250
011252
011256
011260

136527
001004
004537
000001
103433

000005

011262
011264

020102
001415

011266
011274
011276
011302
011304

136527
001004
004537
000000
103421

GTOF

EM28,ERR12

002252
002254

17s:

000040

18%:

31%:
000005

000200

011320
011326
011330
011334
011336

000005

011340
011344
011346
011350
011354
011356
011360

000006

22%:

000100

19%:

006176

000006

30¢:
20%:
21s:

sSEE

:BR

ACTUAL BIT

IF YES

QUEUE "DEVICE FATAL” ERROR & 37

;s TAKE ERROR EXIT

:SEE _IF ACTUAL BIT
:BR IF

YES

;

QUEVE

MOV
MOV
MOV
MOV

“DEVICE FATAL"” ERROR & 38

204

; TAKE ERROR EXIT

MOVB

4(RS),R2

;GET DESIRED NO. OF CYCLES

CLR

S(R5),4BITS
31
RS ,CKRACT

sCHK FOR RACT = 1

8CS

20¢

:BR TO EXIT IF ERROR

CMP

R1.R2
19¢

S(RS5),eBIT7

;SEE IF REQUIRED CYCLES DONE YET

:BR IF

YES

;¢ SEE IF INITIAL RDA CHECK DESIRED

s* BR

BCS

208

:BR TO EXIT IF ERROR

:SR

RS,STEPLU

;CLOCK LU FOR 1 CYCLE

INC
BR

R1
18¢

s INCR CYCLE COUNT
sCONTINUVE CLOCKING

8IT8B

S5(R5),4BIT6

;CHK FOR RDA = 0

;¢ IS FINAL RDA CHECK TO BE SKIPPED ?

BNE
fSR

304
RS,CKRDA

;1 BR

BCS

204

:BR IF ERROR

ADD

06,R5

sFIX UP RETURN ADRS

B8R

214

MOV
MOV

(SP)+,R2
(SP)+,R1

#6,R5

@71 .EDF ,ERRTYP
038 ,ERRNBR
SEM29 ,ERRMSG
QERR12 ,ERRBLK

YES

22
RS,CKRDA

ggg

MOV
MOV
MOV
MOV

;# IS RXACT CHECK TO BE DISABLED ?

;¢

BNE
gSR

CcLC

#EM28 ,ERRMSG
SERR12,ERRBI¥

sINIT CYCLE COUNT

BITB
BNE
fSR

BEQ

o7 .EDF ,ERRT
7P
037 ,ERRNBR

JMP

BIT8B

006176

011614

JMP
204
8178
QRSOM,2$
178
BNE
“RSOM NOT SET" MSG
GTOF
EM29,ERR12

002246
002250

005676

011306
011312
011314
011316

012602
012601

ORSOM,
28
178

$STACK "RSOM NOT CLEARED" MSG

011200

011200
011206
011214
011222
011230

BITB
BEQ

YES

;CHK RDA =

:SET C = O FOR NO ERROR
: TAKE ERROR-FREE EXIT
sFIX UP RETURN ADDRESS
:SET C BIT FOR ERROR
;RESTORE R2
tRESTORE R1

J7
CNDMCAO DMV11 LINE UNIT DIAGL
...RXCHAR

MACRO M1200

22 FEB-84

15:31

PAGE 52 4
SEG 0087

-- RECEIVE A CHARACTER

3868 011362

000205

RTS

;RETURN

CNDMCAO DMV11l LINE UNIT
.+..RCVIST

DIAGL

1< 7
MACRO M1200

-- RECEIVE FIRST CHARACTER OF

3870
3871
3872
3873
3874
3875
3876

15:31

PAGE 53

SEG 0082

MESSAGE
.SBTTL

....RCV1ST

-- RECEIVE FIRST CHARACTER OF MESSAGE

100004000000 0000000000RRRAAAARRRRRCRSARAEAAAAALAEARAALARERAGEARAAAAARRARIRARSS

s RCVIST

3277
3878
3879
3880
3881
3882
3883
3884
3885 011364
3886 011364

3887
3888
3889
3890
3891

22 FEB-84

011366
011370
011372
011374
011400

011404
011406
011410
011414
011416
011420
011424
011426
011430
011434
011436
011440
011444
011446
011450
011456
011460
011462
011464
011470
011472
011474

011500
011502
011506
011510
011512
011516
011520
011522
011524
011526
011530

- THIS SUBROUTINE RECEIVES THE FIRST CHAR OF A MESSAGE AND MONITORS

i ®
i

THE
RDA

L
i
i
;e
i

RDA = 1. THE PROGRAM CHECKS FOR THIS TO OCCUR WITHIN 3 CYCLES AFTER
THE NO. OF CYCLES PASSED IN THE SECOND WORD FOLLOWING THE CALL.
IF THE SUBROUTINE DETECTS AN ERROR, THE ERROR INFORMATION
IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE.

L
HL
;e

CALLING SEQUENCE :
RS,RCV1ST
JSR
.WORD
<EXPECTED RECEIVER CYCLE COUNT>

]

STATUS OF THE
= O, RSA = O,

RECEIVER.
RSOM = O,

FIRST, A CHECK
THEN, THE LINE

IS MADE
UNIT IS

FOR RXACT = O,
CLOCKED UNTIL

1088880880000 00000000000000000000080000800000000800008800800004000000000040000s

01C146
010246
005001
012502
062702

004537

000000

103446
004537
000000

103442

004537
000000
103436
004537
000001
005201
004537
122000
000000
132737
001006
020102
002762
004537
000001
103414
020165
002004
004537
000000

103405

004537
000001

103401

000241

012602
012601
000205

RCV1ST:

000003
005676

006176

R1,-(SP)
R2,-(SP)
R1
(RS)+,R2
#3,R2
RS,CKRACT

;:SAVE R1
:SAVE R2
sINIT CYCLE COUNT
sGET CYCLE COUNT LIMIT

B8CS

;BR TO EXIT IF ERROR

BCS
SSR

68
RS ,CKSEOM

;BR TO EXIT IF ERROR
;CHK FOR RSOM = O, REOM = O

BCS
fSR

68
RS,STEPLU

;BR TO EXIT IF ERROR
;CLOCK LU FOR 1 CYCLE

INC
JSR
USTATR
.
BITB
BNE

R1
RS,READI

s INCREMENT CYCLE COUNT
;READ USYRT STATUS REG

0
ORDA,2$
3¢

;:SEE IF RDA SET YET
:1BR IF YES

BLT

;BR IF NOT YET

gSR

006636
011614

1$:

003610
000200

MOV
MOV
CLR
MOV
ADD
gSR

011446

2%:

cMP

006176

177776

3s:

006176
005676

4%:

S$:
6%:

RS,CKRDA

R1,.R2

;CHK FOR RXACT

= 0

;CHK FOR RDA = 0

:SEE IF LIMIT EXCEEDED

fSR

RS,CKRDA

BCS
cMP
BGE
gSR

6%
R1,-2(RS)
4%
RS ,CKRDA

:BR TO EXIT IF ERROR
:SEE IF LESS THAN REQUIRED CYCLES
:iBR IF NOT
;GO STACK "RDA NOT CLEARED" MSG

BCS

;BR TO EXIT IF ERROR

BCS
ELE
MOV
MOV
RTS

tBR TO EXIT IF ERROR
sCLEAR C BIT FOR NO ERRORS
;RESTORE R2
;RESTORE R1
sRETURN (WITH C BIT = 1 IF ERROR)

iSR

RS,CKRACT

(SP)+,R2
(SP)+,R1
RS

;GO STACK

“RDA NOT SET"” MSG

;CHK FOR RXACT

CNDMCAO DMV11 LINE UNIT

«++.ENDTRN

DIAGL

MACRO M1200 22-FEB-84 15:31
.SBTTL

....ENDTRN

s ENDTRN

3944 011542
3945 011544
3946 011546
3947 011552
3948 011554
3949 011556
3950 011562
011564

011566
011572
011574
011600
011602

011604
011610
o11612

PAGE
54

SEQ 0089

SHUT DOWN TRANSMITTER/RECEIVER

3926
3927
3928
3929

3930
3931
3932
3933
3934
3935
3936
3937
3938
3939
3940
3941 011532
3942 011532
3943 011536

-- SHUT DOWN TRANSMITTER/RECEIVER
Yy

THIS SUBROUTINE

Y Yy

TERMINATES A MESSAGE By CLEARING TXEN AND RXEN,

;e
R
i s

CLOCKING THE LINE UNIT FOR THE NUMBER OF CYCLES PASSED IN THE WORD
FOLLOWING THE CALL, AND CHECKING FOR THE USYRT TRANSMITTER AND
RECEIVER TO BE SHUT DOWN.

i.
i

IS STACKED, AND THE C-BIT SET, WHICH LEAVES THE ERROR REPORTING AT THE
DISCRETION OF THE CALLING ROUTINE OR SUBROUTINE.

i ®

NOTE:

i*
i e

THE

SUBROUTINE

DETECTS

AN ERROR,

THE

ERROR

INFORMATION

THIS ROUTINE ASSUMES THAT TTLOOP MODE SHOULD BE ENABLED.

CALLING SEQUENCE :

RS,ENDTRN
JSR
<NO. OF CYCLES TO CLOCK»>

1882882808808 808008200020200080000080880000088080800800080808000848840080000000000

012537
004537
000001

103422
004537
000001
103416
004537

ENDTRN:

JSR

RS,CKTACT

(R5).+,2%

;GET DESIRED NO. OF CYCLES TO CLOCK
=

005676

BCS
iSR

64
RS,CKRACT

:BR IF ERROR
;CHK FOR RXACT =

003734

BCS
JSR

64
RS,WRITEI

;CLEAR TXEN AND RXEN IN USYRT

JSR
.WORD
gSR

RS,STEPLY
O
RS,CKTACT

BCS
gSR

64
RS,CKRACT

RTS

011572
005536

011614
005536

MOV
1

¥¥ngg

2%:

005676
6%:

;CHK FOR TXACT

;#& AND KEEP TTLOOP ENABLED #=
H

;CLOCK LU FOR DESIRED NO.

;CHK FOR TXACT

= 0

;:BR IF ERROR
;CHK FOR RXACT

= 0

OF CYCLES

M/
CNDMCAO DMV11 LINE UNIT DIAGL
«+++STEPLU

MACRO M1200

22-FEB-84

15:31

PAGE

SEQ 0090

CLOCK THE USYRT N TIMES

.SBTTL

3963
3964

....STEPLU -- CLOCK THE USYRT N TIMES

(AR AALAAAAAARAAARARARAAAEAAAARAARAAEEAAAAAAAALA004000040000000000400

i« STEPLU - THIS SUBROUTINE CLNCKS THE LINE UNIT FOR THE NUMBER OF CYCLES
i e

PASSED

i.
i*
i e
i

SET UP FOR T1 ONE-SHOY MODE, AND THE T1 LATCHES MUST BE PREVIOUSLY SET
TO CONTROL THE WIDTH OF THE CLOCK PULSE. ALL THAT THIS SUBROUTINE
DOES IS TO LOAD 000 INTO THE HI BYTE OF THE T1 COUNTER, FOR THE
DESIRED NUMBER OF TIMES.

ie
ie
i .

CALLING SEQUENCE :
RS,STEPLV
JSR
.WORD
<NUMBER OF CYCLES TO CLOCK>

THE

WORD FOL.OWING

1882488080800
0 880804000

011614
011614
011616
011620
011624
011626

011630

011632
011634
011636

STEPLU:

010146

012501
004537
120005
000000
005301
001372
012601
000205

003734

1$:

MOV
MOV
JSR
VIAT18
000
DEC
BNE
MOV
RTS

THE

AR AL R4

CALL.

THE

VIA ACR MUST

R4 4404404000000 0 00000000 00000000000

R1,-(SP)
(RS)+,R1
RS,WRITEI

:SAVE R1
s INIT CYCLE COUNTER
;LOAD T1C-H, START COUNTER,

R1
1$
(SP)+,R1

;DECR CYCLE COUNTER
:BR IF ALL CYCLES NOT DONE
;RESTORE R1

;RETURN

BE PREVIOUSLY

CLOCK

YET

1 CYCLE

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

22-FEB-84

N7
15:31

PAGE 56

SEQ 0091

GLOBAL ERROR REPORT SECTION
3993

.SBTTL

GLOBAL ERROR REPORT SECTION

/7177777777777 777777777777777777777777707777777777777777077777777777
i/
THE GLOBAL ERROR REPORT SECTION CONTAINS ERROR MESSAGES
i/
THAT ARE USED IN MORE THAN ONE TEST.
3/ /1117777777777 77777777777777777777777777777777777772777/77727/77777777

.NLIST

011640
011645

116
116

ENDEMB:
NEWLIN:

BEX
.ASCIZ
.ASCIZ

011650
011705
011771
012027
012062
012067
012122
012165

116

FMT2:
FMT3:
FMT4:
FMT4A:
FMT4B:
FMTAC:
FMTS:
FMTSA:

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

/¥NSAFAILING REG = #T#ASEL®01/
/#¥NsA
EXPECTED:
#03WA
ACTUAL:
/8NSATHE CONTENTS OF ALLSTSNST/

012252
012326
012347
012366
012420

FMT10:
FMT10A:
FMT11:
FMT1S:
FMT15A:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/¥NsA

012472
012523
012533
012555
012634
012647
012677
012732
012741
012746
013003
013051

FMT19:
FMT21:
FMT22:
FMT23:
FMT24:
FMT2S:
FMT26:
FMT27:
FMT29:
FMT30:
FMT31:
FMT32:

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

/¥NSATEST #D2#A NOT RUNsN/
/% TH06%N/
/¥NSAFAILING REG: /

013103
013142
013211
013235
013252
013302
013332
013346
013366
013414
013446
013477
013520
013535
013556
013573
013621
013642

EM1:
EM2:
EM3:
EM4:
EMS:
EM6:
EM14:
EM16:
EM2S:
EM26:
EM27:
EM28:
EM29:
EM30:
EM31:
EM34;
EM35:;
EM36:

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

/%NsN/

/9%N/

tUSED TO TERMINATE ERROR MESSAGES
®03%A

XOR:

=03/

;:::?}COSCSSCOSISSIOSISSCOSI

/%NuS58038S5803%S 540345503/
/%NsA
WHEN #03%A LOADED INTO BSEL1l/
/8NSA
ATTEMPTING “M-LOOP” FUNCTION CODE s02%A (#TwA)/

EXPECTED:#08%A

ACTUAL :#08%A

XOR:%08/

/%A
LSI ADDR:%08/
/%N%08%08%08%08
/
/%A
DETECTED IN #TeT#A --/
/%A
DETECTED & TEST PATTERN ELEMENT & wD2/

/%AEXPECTED: w03#SS#AACTUAL: #03%SSeAXOR:
/98NS TSNS TEN/
/9038S5%03%S5403%SS%03%N/
/%S4%03%S58038S5%038S5%03%N/
/8THTEN/
/9TEN/
/#NSAFOR BAUD RATE SPECIFIED,/
/#NSAIMPROPER CONNECTOR TYPE SPECIFIED/
/#NSAFOR OPTION SPECIFIED,/

/REG NOT INITIALIZED BY MST CLR/
/ZUSYRT NOT INITIALIZED BY PROGRAM RESET/
/MICRO-DIAG. FAILURE/
/MRDY TIMEOUT/

/NULL CLK BIT STUCK AT 0/

/NULL CLK BIT STUCK AT 1/
/ROR NOT SET/
/ROR NOT CLEARED/
:
‘READ/WRITE DATA ERROR'
/INCORRECT DATA CHAR RCV'D/
/INCORRECT CRC BYTE RCV‘'D/
/RSOM NOT CLEARED/
/RSOM NOT SET/
/REOM NOT CLEARED/
/REOM NOT SET/
/RCV'D DATA MISCOMPARE/
/RERR NOT CLEARED/
/RERR NOT SET/

#03s%N/

ffi})
&L

CNOMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE 56 1
SEQ 0092

GLOBAL ERROR REPORT SECTION
4050 013657
4051 013701

122
122

101
101

4053 013741

122

105

4052 013717

EM39:
EMAO:

.ASCIZ
.ASCIZ

107

EM66:

.ASCIZ

130

040

125
124

123
130

131
101

EM68:
EM69:

4057 014047
4058 014065
4059 014107

122
122
124

130
130
102

101
101
115

EM71:
EM72:
EM73:

4061 014145
4062 014161

122
122

104
104

101
101

4054 013760
4055 014007
4056 014025

4060 014124

4063 014201
4064 014215

4065 014235

124

102
102

124

122
122

4076

101
101

105

103

102
105
105
123

115
122
122
117

124

122

101

124

4074
4075

123
123

124
124
124
124

4071 014445

:83% 014471

115

105

122

014323
014357
014404
014425

102

101

122

4066 014266

4067
4068
4069
4070

130

123

103

117

EM54:

.ASCIZ
.ASCIZ
.ASCIZ

/RXACT NOT SET/
/RXACT NOT CLEARED/
/TBMT NOT SET/

EM7S:
EM76:

.ASCIZ
.ASCIZ

/RDA NOT SET/
/RDA NOT CLEARED/

EM90:

.ASCIZ

EM70:

EM74:

EM?77:
EM78:

EM91:

EM92:
EM98:
EM99:
EM100:

EM101:

EM102:

.ASCIZ

.ASCIZ
.ASCIZ

.ASCIZ

/TXACT NOT CLEARED/

/TBMT NOT

CLEARED/

/RSA NOT SET/
/RSA NOT CLEARED/

/RECEIVER OVERRUN NOT SET/

/RECEIVER OVERRUN NOT CLEARED/

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/TBMT INTERRUPT TEST FAILURE/
/TERR BIT NOT CLEARED/
/TERR BIT NOT SET/
/7SO BIT NOT SET/

.ASCIZ

/TRANSMISSION ERROR (AS READ BY

.ASCIZ

/7SO BIT NOT CLEARED/

....TEXT STRINGS FOR ERROR HANDLERS

TSO BIT)/

“TXT___*

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

eeemEeeeee...---

gescssescscese TEXT USED BY ERROR MANDLERS - -« ---ecc-ceecmmnameacoanaannaannns

4079
4080

4081 014541

4082
4083
4084
4085
4086
4087
4088

014577
014641
014700
014743
014773
015033
015074

4090
4091
4092
4093

4097
4098
4099
4100

102

123

105

105
040
130
103

TXT7:
TXT7A:
TXT8:
TXT9:

015471
015541
015567
015604
015642
015704
015717
015754
016015
016051

040
104
125
122
040
126
117
040
124
040

040
126
131
123
040
101
102
040
103
040

TXT11B:
TXT12:
TXT13:
TXT14:
TXT15:
TXT16:
TXT17:
TXT18:
TXT19:
TxT20:

130
040
040
040
105
123
104

040

111
122
040
062
040

117
116
040

TXT2:
TXT2A:
TXT28:
TXT3:
TXT4:
TXT4A:
TXTS:

TXT10:
TXTil:
TXT11A:

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

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

.ASCIZ
.ASCIZ
.ASCIZ

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

BSEL1

/ SELECT REG'S ARE:/

122
040
105
101

040
040
040

SN gt

.ASCIZ

040
040
040
040

4094 015341
4095 015361
4096 015433

TXTé6:

015121
015211
015301
015321

105

/BSELO

040
105
040
131
040
040

123

.ASCIZ

040
123
040
102
040
040
000

040

TXT1:

040
102
040
040
040
040
102

4089 015076

4102
4103
4104
4105
4106

/REG MISCOMPARE
/

/USYRT STATUS INCORRECT/
/TXACT NOT SET/

4101

/TX UNDERRUN ERROR/

.ASCIZ
.ASCIZ

.SBTTL

4078

.ASCIZ

/RABGA NOT CLEARED/
/RABGA NOT SET/

BSEL2

RN AT

BSEL3/

/7
BSELA
BSELS
BSEL6
BSEL7/
/BSEL10
BSEL11
BSEL12
BSEL13/
/
BSEL14
BSEL1S
BSEL16
BSEL17/
/ BYTE SELECT REG'S ARE:/
/7
SELO
SEL2
SEL4
SEL6/
7
SEL10
SEL12
SEL14
SEL16/
/B/

7 REGISTERS
/
7 EXPECTED:
7/ ACTUAL:

ORB
ORA
DODRB DORA TICL T1CM TILL TILM /
T2CL T2CH SR
ACR
PCR
IFR
IER
ORA
/
/

/ XOR:
/
/7
N
P
R
R
EGI
ST
E
R
Sy
/
CONTROL
D A T A/
/
OUT ADDR.
IN ADOR./
/DEVICE CSR ADDRESS : 7/
/USYRT REGS :/
/RDSRL
RDSRH
TDSRL
TDSRM/

PCSARL

PCSARH

PCR

USTAT/

/VIA REGS :/
/ORB
ORA
OORB
DORA/
/
TiCL
TiCH
TiLL
TiLW/
~/T2CL
T2CH
SR
ACR/
/
PCR
IFR
IER
ORA/

CNDMCAQ DMv1l LINE UNI'

DIAGL

MACRO M1200

«+++ TEXT STRINGS FOR ERROR MANDLERS
4107
4108 016111
4109
4110 016113
4111
4112
4113
4114
4115
4116
4117

016117
016133
016150
016172
016213
016243
016255

4118
4119 016312
4120 016330

4121
4122
4123
4124
4125
4126
4127
4128
4129

016334
016340
016345
016352
016357
016364
016371
016376
016403

C#
22 FEB-84

4158
4159
4160
4161
4162
4163

56 2

TXTNUL
:

SEQ 0093

TXTMLO:
TXTMLL:
TTMXTML2:
TXTMLS:
TXTMLA:
TXTMLS:
TXTMLG:
TXTML7:

TXTVR:
TXTVRO:
TXTVRL:
TXTVR2:
TXTVRS:
TXTVRA;
TXTVRS:

iCTL-Q

21,0

.
.
.
.

/NOP/
/READ 1 BYTE/
/WRITE 1 BYTE/
/NPR-QUT 256 BYTES/

/NPR-IN 256 BYTES/

/SET MICROPROCESSOR'S PC/

/UNDEF INED/

/ALLOW U-PROCESSOR

/VIA REGISTER
/0RB/
/0RA/

/0DRB/

/DDRA/
/T1CL/
/T1CH/

/TiLL/
/TILH/
/T2CL/
/T2CH/
/SR/
/ACR/
/PCR/
/IFR/
/IER/
/0RA/

/NPR /
/CONTROL
/
/DATA HI/

/DATA LO/

/ADDR.
/RDDR.
/ADDR.
/ADDR.
/RDOR.
/ARDDR.

016557
016573

016607
016622
016630
016636
016644
016652
016661
016670
4156 016674
4157

PAGE

l'Txt---u

4130 016410
4131 016413
4132 016417
4133 016423
4134 016427
4135 016433
4136
4137 016437
4138
4139
4140
4141
4142
4143
4144
4145
4146
4147
4148
4149
4150
4151
4152
4153
4154
4155

15:31

OUT Ex/
OUT HI/
OUT LO/
IN EX/
IN HI/
IN LO/

/USYRT REG /

.ASCIZ

"ASCIZ
BEX

7/
/RDSRL
/RDSRH/
/7
/TDSRL
/TOSRH/
/PCSARL
/
/PCSARH/
/PCR/
/USTAT/

INTERRUPTS/

THIS

(WE

HOPE)

IS HARMLESS

CNOMCAO DMV11 LINE UNIT DIAGH

MACRO M1200

««+.YTEXT ADDRESS TABLES FOR ERROR HANDLERS -4164
4165
4166 016702

016117
016172
016255

016133
016213

016732
016740
4170 016744
016752
016760

016312
016330
016345
016364
016376
016413
016427

016334
016352
016371
016403
016417
016433

016340
016357

4173 016766
016774
017002
4174 017010
017016
017024

016437
016444
016474
016543
016622
016644
016670

016454
016511
016557
016630
016652
016674

016464
016526
016573
016636

4167

4168 016722

4169 016724

4171
4172 016764

4175

4176

15:31

PAGE

56
3

"TXT__T~
............................................................

016113
016150
016243

016710
016716

22 FEB-84

TXTMLO, TXTMLL, TXTML2, TXTMLS, TXTMLA, TXTMLS, TXTMLG, TXTML7

TXTVRT:

TXTVR8,TXTVR9,TXTVRA,
TXTVRB, TXTVRC, TXTVRD, TXTVRE , TXTVRF

016410

016423

016661

TXTVR
TXTVRO, TXTVR1, TXTVR2,TXTVR3,TXTVR4,
TXTVRS, TXTVR6, TXTVR?

TXTNPT;

TXTNP
TXTNPO, TXTNPL, TXTNP2, TXTNP3 , TXTNPA , TXTNPS , TXTNPE , TXTNP7, TXTNPS

TXTURT:

TXTURO, TXTURL, TXTUR2, TXTURS, TXTURA, TXTURS, TXTUR6, TXTUR?

SEQ 0094

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

.++.TEXT ADDRESS TABLES FOR ERROR HANDLERS
4178

4179
4180
4181 017030
4182

4183

4184

4185

4186

4187

4188
4189
4190
4191
4192
4193
4194
4195

017030
017030
017034
017036
017042
017046
017050
017050
017052
017056
017062
017064
017066
017072

017074
017076
017100
017104
017106
017112
4196 017114
017114
017120
017124
017130
017134
017136
017140
4197

4198 017144
4199 017146
4200 017152
4201
4202
4203

017152
017152

017154
017160
017164
017170
017174
017176
017200
4206 017204
4207 017210
017210
017214
017220

-A

105037

010146
013701
022701
002012

010146
012746
012746
010600
104415
000424

aaB

PAGE 57

SEQ 0095

SEEPERS

SRS

SRR

....ERROR HANDLER

002401

-- ERR4

SRS

eSS

ERR4

CLRB

GDATA+1

ERR4:
:
sMAKE SURE BIT 8 DOESN'T PRINT!

17,R1

;WAS THIS AN M-LOOP REQUEST?

@FMTS,R1

iNO,

R1,-(SP)
GDATA,R1

cMP

BGE

PRINTX

-- M-LOOP TIMEOUT ERROR HANDL ING

BGNMSG

MOV
MOV

002400
000017

;SAVE THE WORKING REGISTER
:SAVE THIS FOR LATER

sYES,

THEN REPORT THE FUNCTION CODE

THEN IT MUST BE A BSEL1

SETTING

012122
000002

MOV
MOV
MOV
MOV

R1,-(SP)
OFMTS, -(SP)
92,-(SP)
SP,RO

000006

ADD

96,SP

001001

TRAP

Ss:

022701
002002
012701
006301

000007

016146
013746
012746
012746
010600
104415
062706

016702
002400
012165
000003

012601
004737

15:31

"TXT__T"

.SBTTL

000006

6%:
78

204

BNE
CLR
cMP
BGE
MOV

6
R1
e7,R1

78
#6,R1

020160

204

ASL
PRINTX

R1
@&FMTSA,GDATA,TXTMLT(R1)

sCONVERT TO A WORD OFFSET
;REPORT THE FAILING FUNCTION

MOV
JSR
ENDMSG

(SP)+,R1
PC.ERRS$

;RESTORE THE WORKING REGISTER
;OUMP THE SELECT REGISTERS

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

L10002:

104423
'

CS$PNTX

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

000010

TXTMLT(R1),-(SP)
GDATA, -(SP)
OFMTSA, -(SP)
23,-(SP)
SP,RO
CS$PNTX
@10,SP

C$MSG

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

.SBTTL ....ERROR HANDLER -- ERRS -- WORD SELECT REG. ERRORS
B

4204 017154
017154

4205 017154

22-FEB-84

013746
012746
012746
012746
010600
104414

002412
015074
011650
000003

004737

000010
020134

013746
013746
013746

002404
002402
002400

555

BGNMSG

ERRS

PRINTB

&FMT2,0TXTS,REGNUM

JSR

PC, XORGB

PRINTB

&FMT10,GDATA,BDATA,XDATA

SRR

ERRS:
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

REGNUM, -(SP)
@TXTS, -(SP)
oFMT2, -(SP)
@3,-(SP)
SP,RO
CSPNTB
210,SP

MOV
MOV
MOV

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

CNDMCAO DMV11l LINE UNIT DIAGL
.+..ERROR HANDLER

017224
017230
017234
017236
017240
4208 017244
4209 017250
017250
017250
4210
4211
4212
4213 017252

017252

4214 017252
4215 017256
4216 017260

4217
4218

4219

4220

017260
017264
017270
017274
017300
017302
017304
017310
017314
017314
017320
017324
017330
017334
017340
017342
017344
017350
017350
017354
017360
017362
017364
017370
017370
017370

4221
4222
4223
4224
4225 017372

017372
4226 017372
017372
017376

017402
017406
017412

017414
017416

-- ERRS

012746
012746
010600
104414
062706
004737

Fe
MACRO M1200

- WORD SELECT REG.

22-FEB-84

15:31

PAGE 57-1

SEQ 0096

ERRORS

012252
000004
000012
020160

MOV
MOV
MOV

TRAP

JSR
ENDMSG

PC.ERRSS

MOVB

REGNUM,R1

ADD
;:DUMP THE SELECT REGISTERS

002412

016146
012746
012746
012746
010600
104414
062706
004737

017010
016607
012366
000003

013746
013746
013746
012746
012746
010600
104414
062706

002404
002402
002400
011705
000004

012746
012746
010600
104414
062706

011640
000001

000010
020134

000012

ASL
PRINTB

R1
3AS PASSED,
&FMT15,8TXTUR, TXTURT(R1)

JSP

PC, XORGB

PRINTB

@ENDEMB

BGNMSG

ERR10

PRINTB

oFMT21,0TXT12,MPCSR

PRINTB

SP,RO
C$PNTB
e12,5P

L10003:

104423

113701
006301

OFMT10, -(SP)

ERR7A::

THIS WAS A BYTE OFFSET

MOV
MOV
MOV
MOV
MOV
TRAP

TXTURT(R1), -(SP)

SP,RO

CS$PNTB

€10,5P

&FMT3,GDATA,BDATA,XDATA

000004

104423

013746
012746
012746
012746
010600

104414
062706

002472
015541
012523
000003
000010

MPCSR, -(SP)
OFMT21, -(SP)

SP,RO
CS$PNTB
210,SP

CNDMCAO DMV11 LINE UNIT DIAGL
.+..ERROR HANDLER
4227 017422

4228

4229
4230

4231
4232

4233
4234

4235
4236
4237
4238
4239
4240

017422
017426
017432
017434
017436
017442
017446
017450
017450
017454
017460
017464
017470
017472
017474
017500
017504
017504
017510
017514
017520
017524
017530
017532
017534
017540
017544
017544
017544

-- ERR10

012746
012746
010600
104414
062706
013701
006301

MACRO M1200

22-FEB-84

-- USYRT REG ERROR (XOR,

012533

15:31

PAGE 57-2

PRINTB

aFMT22

MOV
MOV
MOV

000001

000004
002412

016146
012746
012746
012746
010600
104414
062706
004737

017010
016607
012732
000003

013746
013746
013746
012746
012746
010600
104414
062706
004737

002404
002402
002400
012555
000004

000010
020134

000012
020710

MOV

ASL
PRINTB

REGNUM,R1

OFMT27,8TXTUR, TXTURT(R1)

4241

002472
015541
012523
000003

000010

012533
000001

TRAP
ADD

SP,.RO
C$PNTB
@4,5P

sGET PTR TO USYRT REG ASCII
TXTURT(R1), -(SP)

#TXTUR, -(SP>

CS$PNTB

JSR

PRINTB

PC, XORGB
#FMT23,GDATA ,BDATA, XDATA

ADD
:IO.SP
:COMPUTE XOR OF GOOD AND BAD DAT

SP)

JSR
ENDMSG

PC.ERR12$

ADD

:GET € PRINT USYRT REGISTERS

L10005:

104423

4242

SEQ 0097

REG PRINTO

BGNMSG

ERR11

PRINTB

OFMT21,0TXT12,MPCSR

PRINTB

oFMT22

TRAP

oFMT22, -(SP)

e1,-(SP)
SP,RO

000004
002412

4243
4244
4245

016146
012746
012746

016724
016312
012732

C$PNTB
MOV
SL

PRINTB

REGNUM,R1

R1
:GET PTR TO VIA REG ASCII
OFMT27,8TXTVR, TXTVRT(R1)
MOV
MOV
MOV

04 ,SP

TXTVRT(R1), -(SP)
@TXTVR, -(SP)
FMT27,-(SP)

CNDMCAO DMv11 LINE UNIT

.+..ERROR HANDLER

4246
4247

4248
4249

017640
017644
017646
017650
017654
017660
017660
017664
017670
017674
017700
017704
017706
017710
017714
017720
017720
017720

4250
4251
4252
4253
4254
4255 017722
017722
4256 017722

017722
017726
017732
017736

C17742
017744
017746
4257 017752
017752
017756
017762
017764
017766
4258 017772
4259 017776

DIAGL

-- ERR11

012746
010600
104414
062706
004737

013746
013746
013746
012746
012746
010600
104414
062706
004737

MACRO M1200

&
22-FEB-84

PAGE

57-3

SEG 0098

-- VIA REG ERROR (XOR, REG PRINTOUT

000003

MOV
MOV

000010
020134

JSR

PRINTB

002404
002402
002400
012555
000004

PC, XORGB

&FMT23,GDATA,BDATA,XDATA

JSR

020356

ENDMSG

C$PNTB
#10,5P

MOV
MOV
MOV

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

MOV
MOV

04, -(SP)
SP,RO

XOR OF GOOD AND BAD DATA

ADD

PC,.ERR11$

;GET & PRINT VIA REGISTERS
L10006:

104423

SBTTL
‘

«++.ERROR HANDLER

-- ERR12

TRAP

CS$PNTB

e12,5P

C$MSG

-- USYRT REG ERROR (USYRT PRINTOUT)

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

002472
015541
012523
000003

BGNMSG

ERR12

PRINTB

&FMT21,0TXT12,MPCSR

ERR12::
MOV
MOV
MOV
MOV
MOV

MPCSR, -(SP)
0TXTl2.-(SP)
oFMT21, -(SP)
3,-(SP)
SP,RO

ADD

10,SP

TRAP

000010

PRINTB

012533
000001

&FMT22

000004
002412

MOV
ASL
PRINTB

C$PNTB

MOV

oFMT22, -(SP)

TRAP

CSPNTB

MOV
MOV

017010
016607
012732
000003

ADD

REGNUM,R1
R1
:GET PTR TO USYRT REG ASCII
&FMT27,8TXTUR, TXTURT(R1)

01,-(SP)
SP,RO

04,5P

TXTURT(R1), -(SP)

MOV
TRAP

000010
020710

JSR

ENDMSG

ADD

PC,.ERR12S$

1GET € PRINT USYRT REGISTERS
L10007:

4263

4265
4266

:COMPUTE

03, -(SP)
SP,RO

TRAP
ADD

TRAP

000012

4260

4261
4262

15:31

SBTTL

.++..ERROR HANDLER

-- ERR13

@TXTUR, -(SP)
OFMT27,-(SP)
e3,-(SP)
SP,RO

C$PNTB

€10,SP

TRAP

TRANSMISSION/TSO ERROR (XOR, REG PRINTOUT)

18
CNDMCAO DMV11 LINE UNIT
...ERROR HANDLER

DIAGL

-- ERR1Z

MACRO M1200

22 FEB-84

15:31

TRANSMISSION/TSO ERROR (XOR,

PAGE 57 4
SEG 0099

REG

4267
4268 020036

BGNMSG

ERR13

4269 020036

PRINTB

@FMT21,0TXT12,MPCSR

JSR

PC, XORGB

020036

020036
020042
020046
020052
020056
020060
020062
4270 020066

013746
012746
012746
012746
010600
104414
062706
004737

002472
015541
012523
000003

020072
020076
020102
020106
020112
020116

013746
013746
013746
012746
012746
010600

002404
002402
002400
012555
000004

020122
4272 020126

062706
004737

000012
020710

4271 020072

020120

4273 020132

020132

4274

020132

104414

000010
020134

PRINTB

ERR13::

@FMT23,GDATA,BDATA,XDATA

MOV
MPCSR, -(SP
MOV
oTXT12,-(SP)
MOV
OFMT21, -(SP)
MOV
03, -(5P)
MOV
SP,RO
TRAP
CSPNTB
ADD
210,5P
;COMPUTE XOR OF GOUD AND BAD DATA
MOV
MOV
MOV
MOV
MOV
MOV

TRAP

JSR

ENOMSG

ADD
:GET & PRINT USYRT REGISTERS

PC.ERR12$

L10010:

104423

4275

:g;g

.SBTTL
‘

:g;g
4280

----------- cossscsnanne

vvvnnnns ERROR HANDLER SUBROUTINE

4283

PERFORM EXCLUSIVE OR BETWEEN "GDATA” & “BDATA" PUTTING

XORGB:

MOV
MOV
MOV
XOR
MOV

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

4291 020156

4292

010146
013701
013737
074137
012601

002400
002402
002404

002404

RTS

-- XORGB

THE RESWLT IN “XDATA"

000207

4293

B A

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

s 5

;RETURN

SRTER A A B

.SBTTL ........ERROR HANDLER SUBROUTINE -- ERRSS$
‘

4296

4297 020160

4298 020160

020160
020164
020170
020174
020200
020202
020204

062706

014773
015076
011771
000003
000010

o S

B A B

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

ERRSS$;:

012746
012746
012746
012746
010600
104415

CSMSG

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

SBTTL

4286 020134
4287 020136
4288 020142
4289 020150
4290 020154

012,5P

....ERROR HANDLER SUBROUTINES

:ggé

:g:g

CSPNTB

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

PR SUBROUTINES USED ONLY BY ERROR HANDLERS
:

TRAP

XDATA, -(SP)
BDATA, -(SP)
GDATA, -(SP)
OFMT23, -(SP)
04, -(SP)
SP,RO

COMMON ERROR SUBROUTINE TO PRINT SELECT REGISTERS
PRINTX

OFMT4,0TXT6,0TXT4

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

oTXT4, -(SP)
#TXT6, -(SP)
oFMT4, -(SP)
03, -(SP)
SP,RO
CSPNTX
210,SP

DMV11l LINE

UNIT

DIAGL

ERROR HANDLER SUBROUTINE

020210

013746
013746
013746
013746
012746
012746
010600
104415
062706

020250
020254
020260
020264
020266
020270
4301 020274
020274
020300
020304
020310
020314
020320
020324
020326
020330
4302 020334
020334
020340
020344
020346

012746
012746
012746
010600

020350
020354

&
22

FEB-84

104415
062706

15:31

PAGE

575

SEQ 0100

-- ERRS$
PRINTX

020210
020214
020220
020224
020230
020234
020240
020242
020244

4300 020250

MACRO M1200

&FMT11,WSRO,WSR2,WSR4
,WSR6

;DUMP

THE

SELECT

002264
002262
002260
002256
012347
000005

PRINTX

015033

000006

012746
012746
010600
104414
062706
000207

011640
000001

WSR6, -(SP)
WSR4
, -(SP)
WSR2, -(5P)

MOV

oFMT11,-(SP)

PRINTX

000014

PRINTB

&FMT11,WSR10,WSR12,WSR14,WSR16

;DUMP

THE

CSPNTX

MOV
MOV

OTXTA4A, -(SP)
OFMT4B, -(SP)

MOV

SP,RO

MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
MOV

WSR16, -(SP)
WSR14, -(SP)
WSR12, -(SP)
WSR10, -(SP)
OFMT11,-(SP)
05, -(SP)
SP,.RO

@ENDEMB

TRAP

ADD

........ ERROR HANDLER SUBROUTINE

#14,5P

TRAP
CSPNTX
ADD
06 ,5P
SELECT REGISTERS

MOV
RTS

SP,RO

TRAP

ADD

@FMTA4B,4TXT4A

012062
000002

002274
002272
002270
002266
012347
000005

MOV
MOV
MOv

MOV

000014

013746
013746
013746
013746
012746
012746
010600
104415
062706

REGISTERS

CS$PNTX

014,5P
#ENDEMB, -(SP)
SP,RO

CSPNTB

04,5P

-- ERR11$

COMMON ERROR SUBROUTINE TO GET/PRINT VIA REGISTERS

020362
020366
020372
020376

012746
012746
012746
012746

015717
015704
012634
000003

020404
020406
4312 020412
020412
020416
020422

104415
062706

000010

020432
020436
020442

013746
013746
013746
013746
012746
012746
010600

002344
002342
002340
002336
012647
000005

JSR

PRINTX

PC,.GETVRS

@OFMT24,0TXT16,0TXT17

1GET VIA REGS FOR PRINTOUT
oTXT17,-(SP

004502

OFMT24, -(SP

004737

020356

PRINTX

&FMT25,VREGS+0,VREGS+2,VREGS+4,VREGS+6

SP,.RO
CSPNTX
010,SP

1<
CNDMCAO DMV1l LINE UNIT DIAGL

........ ERROR HANDLER SUBROUTINE
020444

062706

000014

020452
020456
020462
020466
020470
020472

012746
012746
012746
010600
104415
062706

015754
012741
000002

020476
020502
020506
020512

013746
013746
013746
013746

002354
002352
002350
00234¢€

4313 020452

4314 020476

020516
020522
020526
020530

012746
012746
010600
104415

000006

062706

000014

020536

012746

016015

020542
020546
020552
020554
020556

4316 020562

012746
012746
010600
104415
062706

000006

013746
013746
013746
013746
012746
012746
010600
104415
062706

002364
002362
002360
002356
012647
000005

020622
020626
020632
020636

012746
012746
012746
010600

016051
012741
000002

020640
020642

4318 020646

020646
020652
020656
020662
020666
020672
020676

020700
020702

4319 020706
4320

104415
062706
013746
013746
013746
013746
012746
012746
010600

104415
062706
000207

15:31

PAGE 57 -6

000014

000006
002374
002372
002370
002366
012677
000005

000014

SEG 0101

-- ERR11S$

PRINTX

@OFMT29

&#TXT18

PRINTX

&FMT26,VREGS+8.,VREGS+10.,VREGS+12.,VREGS+14,

TRAP

CSPNTX

MOV
MOV
MOV
MOV
TRAP
ADD

#TXT18,-(SP)
OFMT29, -(SP)
92,-(SP)
SP,RO
CS$PNTX
#6,SP

MOV
MOV
MOV
MOV

VREGS+14.,-(SP)
VREGS+12.,-(SP)
VREGS+10.,-(SP)
VREGS-8.,-(SP)

ADD

MOV

MOV
MOV
PRINTX

@FMT29,0TXT19

012741
000002

020562
020566
020572
020576
020602
020606
020612
020614
020616

4317 020622

22 FEB-84

012677
000005

020532

4315 020536

4321
4322

104415

020446

MACRO M1200¢

PRINTX

&FMT25,VREGS+16.,VREGS+18.,VREGS+20.,VREGS+22.

PRINTX

&FMT29,0TXT20

PRINTX

RTS

&FMT26,VREGS+24.,VREGS+26.,VREGS+28.,VREGS+30.

#14,5P

OFMT26, -(SP)
95, -(SP)
SP,RO

TRAP

CS$PNTX

MOV

#TXT19,-(SP)

MOV
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

VREGS+22.,-(SP)
VREGS+20.,-(SP)
VREGS+18.,-(SP)
VREGS+16.,-(SP)
oFMi2S, -(SP)
95, -(SP)
SP,RO
CS$PNTX
214,SP

MOV
MOV
MOV
MOV

9TXT20, -(SP)
OFMT29, -(SP)
02,-(SP)
SP,RO

MOV
MOV
MOV
MOV
MOV
MOV
MOV

VREGS+30.,-(SP)
VREGS+28.,-(SP)
VREGS+26.,-(SP)
VREGS+24.,-(SP)
OFMT26, -(SP)
95, -(SP)
SP,RO

ADD

MOV
MOV
MOV
TRAP
ADD

TRAP
ADD

014,5P
OFMT29, -(SP)
#2,-(SP)
SP,RO
CSPNTX
6,SP

C$PNTX
6,SP

CS$PNTX
#14,5P

R e
SBTTL cocevnes ERROR HANDLER SUBROUTINE -- ERR12$

CNDMCAO DMV1l LINE UNIT DIAGL

........ ERROR HANDLER SUBROUTINE
4323
4;2;
432

4326 020710
4327 020714

004737

004402

020714

020720

012746

015604

020724

012746
012746

012634

020730
020734
020736

104415

TRAP

PRINTX

&FMT25,UREGS+0,UREGS+2,UREGS+4
,URLGS+6

OFMT24,-(SP)

CS$PNTX

000005

MOV
MOV

95, -(SP)
SP,RO

ADD

021004
021010
021014
021020
021022

012746
012746
012746
010600
104415

015642
012741
000002

062706

000006

021030
021034
021040
021044
021050
021054

013746
013746
013746
013746
012746
012746

002334
002332
002330
002326
012677
000005

021062

104415

062706
000207

MOV

012647

000014

021064
:ggé 021070

0TXT14,-(SP)

UREGS+6, -(SP)
UREGS+4, -(SP)
URENGS+2, -(SP)
UREGS+0, -(SP)

062706

010600

MOV

MOV
MOV
MOV
MOV

021000

021060

;GET USYRT REGS FOR PRINTOUT

#10,5P

012746
010600

021024

JSR
PC,GETURS
PRINTX- &FMT24,0TXT13,4TXT14

ADD

020770
020774

4330 021030

ERR12$:

03,-(SP)
SP,RO

002324
002322
002320
002316

4329 021004

e iemaeaaaaa
COMMON ERROR ROUTINE TO GET AND PRINTOUT USYRT REGISTER

MOV
MOV

013746
013746
013746
013746

104415

P
H

000003

020744
020750
020754
020760

020776

SEG 0102

-- ERR12S$

oTXT13,-(SP)

000010

012746

PAGE 577

MOV

062706

020764

22-FEB-84 15:31

015567

020740

4328 020744

4333

012746
010600

MACRO M1200

000014

MOV

PRINTX

&FMT29,08TXT1S

PRINTX

&FMT26,UREGS+10,UREGS+12,UREGS+14 ,UREGS+16

.
RTS

FMT2S, -(SP)

TRAP

C$PNTX

MOV
MOV
MOV
MOV
TRAP

#TXT1S,-(SP)
9FMT29,-(SP)
#2,-(SP)
SP,RO
CSPNTX

MOV
MOV
MOV
MOV
MOV
MOV

UREGS+16, -(SP)
UREGS+14,-(SP)
UREGS+12, -(SP)
UREGS+10, -(SP)
#FMT26, -(SP)
#5,-(SP)

TRAP

CSPNTX

ADD

MOV
ADD

214,5SP

#6,5P

SP,RO

#14,5P

CNDMCAO DMV1l LINE UNIT DIAGL

M&
MACRO M1200

22-FEB-84 15:31

PAGE S8

SEQ 0102

LOAD DEVICE PROTECT1OUN TABLE
:;gg

.SBTTL

4337

$/ 7177777777777 77777777777777272777277727277277727727277777772772707727777272727772772/7/7/7/7/77777

4338
4339
4340

i/ THIS TABLE IDENTIFIES THE LOAD DEVICE TO THE SUPERVISOR, SO THAT IT CAN BE
s/ PROTECTED FROM TESTING, IF DESIRED.
$ /7177777777777 7777777777277772777277727277777277277277777727727/7770772777777777777/772777

4341
4342 021072

4343
4344
4345
4346

021072
021072
021074
021076
021100

LOAD DEVICE PROTECTION TABLE

BGNPROT

177777
177777
177777

.WORD
.WORD
.WORD

ENDPROT

-1
-1
-1

sDON'T CHK CSR ADRS
sDON'T CHK MASSBUS UNIT NO.
;:DON'T CHK DRIVE NO.

L$PROT:

CNDMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

22-FEB-84 15:31

PAGE 59

SEQ 0104

INITIALIZE SECTION
:g:g

.SBTTL

4350

$/ /7777777777777 7777777277772772777727727277727772727722777777277772772/77777727277777

4351
4352
Aggz

INITIALIZE SECTION

:/ THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED
+/ AT THE BEGINNING OF THE TEST SEQUENCE ON THE NEXT UNIT.
s/ /7777777777777 77277777777777277772777777777272727277727777772772/77272727777272727777

4355 021100

BGNINIT

4356 021100
4357 021100

021100
021104
021110
021114
021120
021122

4360 021126

012746

012746
012746
012746
104437
062706
010637

;ODT ROM ADDRESS

002414

002420
002454
002452

4366 021156
4367 021160
4368 021166

001007
013737
013737

000004
000006

MOV

MOV
MOV
MOV
TRAP
ADD

000010

005037
005037
005037

005037
005737

140,4170000,4#340

170000
000140
000003

4361 021132
4362 021136
4363 021142
4364 021146
4365 021152

SETVEC

000340

LSINIT::

MOV

CLR
CLR
CLR

002456
002444

;:CLEAR SUBR CALL PC
;CLEAR USYRT CHIP TYPE
;:CLEAR ERROR FLAG

6s
804 ,SAVE4
806 ,SAVE6

:BR IF NOT
:SAVE ERROR TRAP VECTOR

SAVLEN
FRSTIM

;:CLEAR CHAR LENGTH FROM SETUP
:SEE IF FIRST TIME THROUGH AFTER LOAD

000406

4371 021176

013737

002446

000004

6$:

MOV

SAVE4 , 804

;RESTORE ERROR TRAP VECTOR

:g;g 021212

012737

000001

002444

9%:

MOV

:MARK FLAG FOR NEXT TIME THROUGH

4376
4377 021220
021220
021224
4378 021226

" 021226

4380
4381 021230

021230

021234
4382 021236
s 021236

013737

012700
104447

MOV

SAVE6, 806

012700
104447

BCOMPLETE

103411

YES

000037

BCOMPLETE

000035

STARST

;SEE IF PROGRAM JUST RESTARTED,
READEF
©EF .RESTART

103411

—— 021246

BR IF

000040

103415

012700
104447

4388

000006

;SEE IF PROGRAM JUST STARTED,
READEF #®EF .START

4384
4385 021240
021240
021244
4386 021246

002450

BCCAPLETE

MOV
TRAP

QEF .START,RO
CSREFG

BCS

STARST

MOV

9EF .RESTART,RO

BCS

STARST

MOV
TRAP

QEF .NEW,RO
CSREFG

8CS

NEWST

BR IF YES

STARST

;SEE IF THIS IS A NEW PASS,
READEF
®EF .NEW

9170000, -(SP)
2140, -(SP)
03, -(SP)
C$SVEC
©10,5P

INDICATOR

:ggg 021174

:g;g 021204

A-0

:SAVE BASE-LEVEL STACK POINTER

SUBRPC
CHPTYP
ERROR1

CLR
TST

BNE
MOV
MOV

002446
002450

SP,PSTACK

;JB REV

9340, -(SP)

TRAP

CS$REFG

BR IF YES

NEWST

:SEE IF PROGRAM WAS JUST CONTINUED

B9
;_)

CNDMCAO DMVl LINE UNIT DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE 59 1

5EG3 0105

INITIALIZE SECTION
4389 021250

021250
021254
4390 021256
021256
4391 021260
4392

4393
4394
4395
4396
4397
4398
4399

021262

012700
104447

BCOMPLETE

000414

005037

002466

021266
021272
021272

005037

002460

012737
005237
012737

177777
002466
000001

4402
4403
4404
4405 021312
4406 021312
4407 021316

4402

OFEF .CONTINUE

MOV

103473

021262

4400 021300
4401 021304

READEF

000036

STARST:

GETPRM

CLR

STARES

ENDIT

0EF .CONTINUE ,RO

TRAP

CSREFG

8CS

ENDIT

;:CLEAR FLAG TO SHOW JUST HAD STA OR RES

1CLEAR DEVICE MAP
002410

NEWST:

002462

CLR

DEVMAP

MOV
INC
MOV

0-1,LOGDEV
STARES
o8ITO0,DEVPTR

sRESET LOGICAL DEVICE

-1

s INCREMENT NO. OF PASSES SINCE STA OR RES
s INIT DEVICE MAP BIT POINTER

GET UNIBUS ADDRESS, VECTOR, PRIORITY LEVEL, SWITCH PACKS, TEST
CMCTW INFORMATION FOR THIS LOGICAL DEVICE
GETPRM
INC
LOGDEV
s INCREMENT LOGICAL DEVICE NUMBER
GPHARD
LOGDEV,R1
:GET P-TABLE POINTER INTO R1
MOV
:

005237

002410

013700
104442
010001

002410

103403

006337
000766
053737
006337

012102
012703
010223
005202

022703
001373

021370
021374
021400
021406
021412
021416
021422
021426
021432

011137
012137
062737
012137
012137
012137
012137
012137
011137

021436
021436
021440
021442
021444
021446

104433
005000
000240
077002

BCOMPLETE
ASL

002462
002462
002462

002460

10%:

002472

118:

002534

DEVPTR

ENDIT:

8Cs

10¢

MOV

tBR IF DEVICE AVAILABLE
s SHIFT DEVICE POINTER
s SKIP THIS DEVICE

GETPRM
DEVPTR,DEVMAP
DEVPTR

MOV
MOV

(R1)+,R2
OMPCSR,R3

1R2=CSR ADDR VALUE
sR3=POINTER TO CSR ADDR STORAGE AREA

MOV
INC

R2.(R3).
R2

BNE

11$

sPUT CSR ADDRESSES IN 'BSEL'
:BUMP BSEL ADOR
sALL 16 ADDRESSES MOVED ?
t1NO: DO ANOTHER ADDRESS

OBSEL17+2,R3

sSHIFT BIT POINTER

AREA

s YES: CONTINUE

(R1),MPIVEC
(R1)+ ,MPOVEC
04 ,MPOVEC
(R1)+ ,MPRIOR
(R1)+,LUSKIL
(R1)+,LUSKIZ
(R1)+,BROTYP
(R1)+,TSTCON
(R1),BDRATE

1GET DMV11l INPUT INTRPT VECTOR

CLR
NOP

S08

RO, 15¢

RO,.R1

$1SET BIT FOR THIS DEVICE

MOV
MOV
ADD
MOV
MOV
MOV
MOV
MOV
MOV

; ISSUE LSI BUS RESET,
BRESE
15%:

LOGDEV,RO
C$GPHRD

BR
8IS
ASL

cMP

002532

104

TRAP

sGET DMV11 OUTPUT INTRPT VECTOR
+GE" DMV1l DEVICE PRIORITY
$GET LU SWITCH PACK @1

1GET LU SWITCH PACK @2
1GET DMV-11 BOARD TYPE
tGET TEST CONNECTOR INDICATOR

1GET BAUD RATE FOR THIS DEVICE
TO INIT DMvil
TIME DELAY

TRAP
TO ALLOW COMPLETION

1@ OF DMV1l MICRODIAGNOSTICS.

CSRESET

CY
CNDMCAQ DMv11l LINE UNIT

DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE 59 2
SEG 0104

INITIALIZE SECTION
4438 021446

021446
021446

ENDINIT

104411

L10012:

TRAP

CSINIT

CNDMCAO DMV11 LINE UNIT
AUTO DROP UNIT

DIAGL

MACRO M1200

22 FFB-84

DY
15:31

PAGE 60

SEG 0107

SECTION

4440

.SBTTL

4441
4442

§/ 77777777 7777777277277077777777277727727727777727777727272772727027277777277277272272/7727/772727777

4443
4444
4445

AUTO DROP UNIT

SECTION

31/ THE AUTO DROP CODING DETERMINES WHETHER OR NOT THE DEVICE WHOSE P-TABLE
3/ WAS JUST OBTAINED IS READY FOR TESTING, AND IT IS DROPPED IF NOT READY.
$/ /7777787777777 7777727277727277727777277277227727727207277277772078772772777277272727707772/7/77272777

4446
4447
4448

100000000000000000400000000000000000000800000000000480000000000000000000008800000

3449

4450
445]1

:
:

ngg
44

4454

4459 021476
4460 021502
4461 021506

4463 021512

012746
012746
012746
012746
104437
062706

005037
012702
013703
006302
103375

4467
4468
4469
4470

013703
012702
005723
006302

4471 021534
::;g 021536

4474 021540

000000
021566
000004
000003
000010

002622
000001
002472

105723

4464 021514
4465 021516
021520
021524
021530
021532

1$:

002472
000001

2%:

006302
103374

012700
104436
005737

000004

021554

013700

002410

::;g 021562

000240

atte 021560

001403

104451

A CNDMA

TEST

1 EXCEPT

"TST”

"TSTB”

THAT

TEST

INSTRUCTION.

002622

L$AUTO: :

SETVEC

@4,0AD.HIT,00

sSETUP

CLR
MOV
MOV

TMPO
o1,R2
BSELO,R3

sINITIALIZE TRAP FLAG REGISTER
s:FLAG BIT
;INIT ADDRESS POINTER

(R3).

;ACCESS THE CSR’S BY BYTES.

TST8B

ASL
BCC

R2
1s

MOV
MOV
TST
ASL

BSELO,R3
€1,.R2
(R3).

TST

BEQ
DODUV

INVALID-ADDRESS

104461

4483 021566

050237

VECTOR

MOV
MOV
MOV
MOV
TRAP
ADD

AD.HIT:

TMPO

AD.OK
LOGDEV

NOP

BIS

90, -(SP)
QAD .HIT, -(SP)
04, -(SP)
03, -(5P)
CsSVEC
010,SP

R2
R2
sRESTORE

THE VECTOR TO DS

MOV
4 ,RO
TRAP
CS$CVEC
;:DID WE GET MIT WITH AN INVALID ADDRESS TRAP?
;NO,
;:YES,

EXIT
DROP

TEST
THIS LOGICAL CEv.

MOV

TRAP

AD.OK:

002622

TRAP

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

LOGDEV,.RO

C$DODV

;(FOR PATCHING IN A HALT IF NECESSARY)

ENDAUTO

021564

4482

ACCESSED WITH EITHER

CLRVEC

4481 021564

021564

ARE

ASL
8CC

021540
021544
4475 021546

4476 021552
4477 021554

SAME

BGNAUTO

— 021450
021450
021454
021460
021464
021470
021472

THE

:--ooo‘.ooaooooo.oo..oooo.o00000ooooooooooooooooooooo‘o‘ooooooooo.c.ooo.oooooo

4455
4456 021450

4458 021450

THIS ALGORITHM IS

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

L10013:
R2,TMPO

+FLAG THE HIT

IF WE GET

IT!

TRAP

CSAUTO

F9
CNDMCAQ DMv11l LINE UNIT

DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE 60 1

SEG 0108

AUTO DROP UNIT SECTION

4484 021572

44385

0000C2

RTI

;RETURN

CNDMCAO DMV11l LINE UNIT

DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE 61

SEG 0109

CLEANUP CODING SECTION
4487
4488
4489
4490
4491

.SBTTL

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

4492

$ILLIIIIIIIITIIIPI70
0777080707707 077777777007707707770000707700077277777

4493
4494 021574

4495

CLEANUP CODING SECTION

BGNCLN

021574

L$CLEAN:
:

4496

4497 021574

021574
021574

ENDCLN

104412

L10014:

TRAP

CSCLEAN

CNDMCAO DMV11l LINE UNIT DIAGL

9
MACRO M1200

22 FEB-84

15:31

PAGE 62

5EG 0110

DROP UNIT SECTION
4499
4500
4501
4502
4503
4504

.SBTTL

DROP UNIT SECTION

§ILIIIIIIIIIIIIITIIIIIIIIIIIIII
PP II PP 777000707770 00 7770000070777 700077070777777

i/
i/

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

THE

CODING

THAT

CAUSES A DEVICE

§IIVIIIIIIIIIIIP PP 207080702772 80 0707707700700 0707700000700 000777700707777777

4505
4506 021576

BGNDU

021576

4507
4508 021576
021576
4509 021600

021600
021600

s ISSUE UNIBUS RESET TO CLEAN UP
104433

104453

L$DU::

BRESET

ENDDU

L1001S:

TRAP

CSRESET

TRAP

csou

H9
CNDMCAO DMV11l LINE UNIT DIAGL
ADD UNIT

2¢-FEB-84

15:31

PAGE 63

SEG 0111

SECTION

4511
4512
4513
4514
4515
4516

.SBTTL

ADD UNIT SECTION

§IVIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIP
7700000777707 FP007F 7007000000070 070777

i/
3/

4517

THE

ADD-UNIT

SECTION CONTAINS

THE

CODING

THAT

CAUSES A DEVICE

TO BE (A) TESTED FOR THE FIRST TIME, OR (B) RESUMED IN TESTING.
"EF

AUNIT”

SET,

THE

UNIT

WILL

TESTED AS

NEW UNIT.

§IVIIIILIIIIIILIILI 1P IIIIIITIPILI7PIITIILI
700 PPLIPI PP P77 0777270000070 70777777

4518

4519 021602
021602

4520 021602
021602
4521

MACRO M1200

021602

BGNAU
ENDAU
104452

L$AU:

L10016:

TRAP

C$AU

CNDMCAQ DMv11 LINE UNIT DIAGL
TEST

TBMT MICROCODE

MACRO M1200

TNTERRUPT

22 FEB-84

15:31

PAGE 65

SEQ 0112

TEST

LSBTTL

4531

TEST

TBMT MICROCODE

INTERRUPT

TEST

1000000000000 000000RRRRARARARRLIRARRALAAAREAAIIARGINRRRALIAIIARRIRGIIRASARAASS

TEST 1 -- TBMT MICROCODE INTERRUPT TEST

i
;¢
;#

THIS
THIS

;¢
;3¢
i+

INTERRUPT DISABLE IN PROCESSOR STATUS” COMMAND WHILE IN THE MAINTENANCE
LOOP AND THEN CHECKING FOR BIT 7 OF BSEL3 TO BE SET (THE BIT IS SET
BY THE MICROCODE WHEN THE TBMT INTERRUPT OCCURS).

021604

4532
4533 021604
4534 021610
4535 021612
021612
4536 021614
021614
021616
4537
4538 021620
4539 021624
4540 021626
4541 021630
021630
4542 021632

021632
021634

4543
4544 021636
4545

004737

103003

003374

104460
104410
000144

004537
000110

005432

103003

104460

104410
000126

Tl::

JSR
8CC
ERROR

PC,MSTCLR

..a.

sPUT THE MICROPROCESSOR IN THE MAINTENANCE LOOP
: IF NO ERROR, PROCEED
;ELSE, REPORT IT AND

ESCAPE

TST

JSR
110
B8CC

R5,CKUSTS

.+8.

s TBMT=1, TSO=1
: IF ERROR, PRINT REPORT

ESCAPE

TST

;

160632

012777

021654

021656
021664

132777
001013

000200

160612

021666
021672
021700

004737
012737

004210
000007

002400

021700
021702
021704
021706
4557 021710
021710
021712

104455
000047
013235
017030

18:

EXIT THIS TEST

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10017-.

TRAP

CS$ERROR

;CHK USYRT STATUS FOR INIT STATE

AND SKIP REMAINDER OF

TEST

TRAP

s ISSUE “TBMT TEST” COMMAND

#40. ,R3
R3,1$

sWAIT FOR THE M-LOOP TO FINISH THE OPERATION

#MRDY ,8BSEL2

: "MRDY” SHOULD BE HIGH BY NOW.
:BR IF NO ERROR

PC,GETWSR

:GET SELECT REGISTERS
s IDENTIFY REQUESTED FUNCTION
+REPORT “MRDY"” TIMEOUT ERROR...

(SP)+,R3

@D0TBMT ,GDATA
EM4 ,ERR4

"DEVICE FATAL" ERROR @ 39

TRAP

.WORD
.WORD

ESCAPE

TST

sAND EXIT

TEST

.WORD

TRAP

.WORD

004210

S5$:

CSESCAPE

L10017-.

#DOTBMT ,8SEL2

104410
000050
004737

BGNTST

.WORD

010346
012703
077301
012603

4558
4559 021714

28280088000 808888080808 0004000008000 88800000000800888488
4000000000000 0000000

ERROR

021644
021646
021652

4547
4548
4549
4550
4551
4552
4553
4554
4555
4556

TEST CHECKS THE OPERATION OF THE TBMT (IRQG) INTERRUPT,
IS DONE BY ISSUEING THE “SET MAINTENANCE INTERRUPT FLAG AND CLEAR

JSR

PC,GETWSR

:GET CURRENT REGISTER CONTENTS

CSERDF

39
EM4
ERR4

CSESCAPE

L10017-.

l“

CNDMCAQ DMvI1 LINE UNIT DIAGL
TEST

TBMT MICROCODE

4560 021720

4561
4562

4563 021726

4564
4565 021730
4566 021736
4567 021744
4568 021752

021752
021754
021756
021760

4569
4570 021762

4571

021762
021762

023727

MACRO M1200

INTERRUPT

002260

100200
002260
000002

100200

CMP

PAGE 65

002400
002402
002412

WSR2, #100200

BEQ

MOV
MOV
MOV
GEDF

#100200,GDATA
WSR2 ,BDATA
2 ,REGNUM
EM92,ERRS

104455
000050
014323
017154

S5EQ 0113

:COMPARE BYTE SELECT REGISTERS 2 AND 3

sREG 2

200

"MRDY”

SET/COMMAND CLEARED

;REG 3 = 200 -- “TBMT” INTERRUPT BIT SET
:BR IF NO ERROR.

+GET THE GOOD DATA
:GET THE BAD DATA
:GET

THE REGISTER NUMBER

;REPORT
H

"TBMT INTERRUPT FAILURE" ERROR.
"DEVICE FATAL” ERROR @ 40
TRAP

.WORD
.WORD

7%:

104401

15:31

TEST

001415
012737
013737
012737

22 FEB-84

ENDTST

L10017:

CSERDF

40
EM92

.WORD

ERRS

TRAP

CSETST

CNDMCAO DMV1l LINE UNIT DIAGL
TEST 2

SWITCH SETTING

€9
MACRO M1200

22-FEB-84

15:31

PAGE 66

SEQ 0114

TEST

4585

.SBTTL

TEST 2

SWITCH SETTING TEST

$480 8888088880000 0 000000400 ARRRRARAR AL R AR R0 00000400000 0000000000000

TEST 2

i SUBTEST @1:

THE

SWITCH SETTING TEST

TWO READABLE

SWITCH PACKS WILL BE

SAMPLED AND COMPARED AGAINST

i* VALUES IN THE P-TABLE. AN ERROR IS REPORTED ON A MISMATCH.

THE 2

i+ SUBTEST @2:
s THE SPEED SELECT SWITCH (SPDSEL) IS READ VIA THE VIAORA REGISTER (BIT PA4)
i* AND COMPARED AGAINST THE BAUD RATE VALUE

IN THE P-TABLE.

IF A MISMATCH

3# OCCURS IT WILL BE REPORTED. NOTE: THIS SUBROUTINE IS NOT RUN IF AN MB064
s BOARD IS BEING TESTED (IT ONLY RUNS 856K... MAKING A SPEED SWITCH USELESS).
$-

004737

021770
021770
021772
021776
022000
022002
022006
022010

104402
004537
121400
000000
004537
121000
000000

4589
4590
4591
4592
4593
4594
4595
4596 022012
4597 022020
4598
4599 022022

022030

4601
4602 022032

;INIT DMV-11 (MAINT LOOP)

003610

R5,READI
gHPDDCHP

:GET

T3.5W1: .
T3.5W2: .

022000

002542

123737
001405

022010

002540
T3.ERR:

104455
000051
022402
022152

022044
022046
022046
022046

000240

4607
4608 022050
022050
022050
4609 022052

PC, INIDMV

003610

RS,READI
gHPBOT

TRAP

“DDCMP ADDRESS"

C(IT WILL BE PUT HERE)

T3.SW1,LUSWI2
T3.ERR

+® DOES

BEQ

T3.SW2,LUSKI1
T73.0K

+@ DOES BOOT ADDRESS” MATCH P-TABLE VALUE
iNO,
REPORT ERROR

GEDF

T3.EHD,T3.EM1

sREPORT SWITCH SETTINGS DON'T MATCH P-TABLE
:
“DEVICE FATAL” ERROR ¢ 41

sNO,

"DDCMP ADDRESS” MATCH P-TABLE VALUE

REPORT ERROR

TRAP

L10021

104403

T2.2

002544

csBsuB

s+
C(IT WILL BE PUT HERE)
1GET "B0OOT ADDRESS”

104406

104402
005737

ARRRRRAS

T2::

005420

123737
001004

022032
022034
022036
022040
4603 022042
022042
4604

8 5000000000880 0000000000000 0 4000000000000 R0

BGNTST

021764
4586 021764

4587
4588 021770

2888880204000

TST

BRDTYP

:IS THIS AN M8064 ?

CSERDF

.WORD
.WORD
.WORD

41
T3.EHD
T3.EM1

TRAP

CsCLP1

TRAP

CsESUB

TRAP

csBsuB

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 2

SWITCH SETTING

4610 022056

001433

4612 022064
4613 022066

120017
000000

022072

104460

022074
022076

104410
000050

4618 022106

106237

4611

022060

4614 022070
4615 022072
4616 022074

4617 022100
4619
4620
4621
4622

022112
022116
022122
022126

:ggz 022134

004537

MACRO M1200

106237
106237
106237
123737

001404

104455
000052
022700
022341

022146
022146

104403

022150
022150

104401

4626 022146

4627
4628 022150

4630 022152
022152
4631 022152
022152
022156
022162
022164
022166
4632 022172
022172
022176
022202
022204
022206

4633 022212
022212

022216
022222
022224
022226
4634 022232
022232
022236
022242
022246

012746
012746

010600
104414
062706

PAGE 66-1
SEQ 0115

BEQ

003610

JSR

18:

000357

022066

022066
022066
022066
022066

022426
000001

VIAORA
000

108

RS,READI

BCC
ERROR

.+8.

ESCAPE

SUB

:GET

022513
000001

012746
012746
010600
104415
062706

022542
000001

013746
013746
012746
012746

002540
002542
022573
000003

000004

THEN SKIP THIS SUBROUTINE

:STATUS WORD GOES HERE

BICB

@357,1%

;CLEAR ALL BUT

1%
1%
18
1$,BDRATE

002550

ASRB
ASRB
ASRB
CMPB

GEDF

T13.6,T3.EM2

ASRB

BEQ

ENDSUB

B
S
T3.END:

o5 6w R
ENDTST

T3.EM1

PRINTB

&T3.1

TRAP
.WORD

CS$ESCAPE
L10022-.

SPEED SELECT BIT(PA4)

COMPARISON WITH OPERATOR'S REPLY

;

IF YES:

END THE SUBROUTINE/TEST

;REPORT ERROR

“DEVICE FATAL" ERROR & 42

L10022:

BGNMSG

C$ERROR

+IS THE SWITCH IN THE DESIRED POSITION?

108

108 :

TRAP

sRIGHT JUSTIFY SPDSEL SWITCH BIT FOR

SR SR

PR A

e s G

L10020:

:PRINT ERROR MESSAGE

000004

012746
012746
010600
104415
062706

YES:

VIAORA REGISTER

022066

4625 022136
022136
022140
022142
022144

15:31

TCST

103003

142737

22 FEB-84

L 9

PRINTX

#73.2

PRINTX

#T73.3

PRINTX

#T3.4,LUSWI2,LUSWI1

TRAP
.MORD
.WORD
.WORD

CS$ERDF
42
T3.6
T3.EM2

TRAP

CSESUB

TRAP

CSETST

MOV
MOV

o13.1,-(SP)
e1,-(SP)

a s et e

T3.EM1::

MOV
TRAP
ADD

SP,RO
CSPNTB
04,SP

MOV
MOV
MOV
TRAP
ADD

o13.2,-(P)
o1,-(SP)
SP,RO
CS$PNTX
04,SP

MOV
MOV
MOV
TRAP
ADD

073.3,-(SP)
e1,-(SP)
SP,RO
CSPNTX
04 ,SP

MOV
MOV

LUSWI1, -(SP)
LUSWI2, -(SP)

MOV
MOV

#713.4,-(SP)
@3, -(SP)

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 2

4635

4636
4637

4638

4639

4640

M9
MACRO M1200

22-FEB-84

15:31

PAGE 66 -2

SEQ 0116

SWITCH SETTING TEST

022252
022254
022256
022262
022266
022272
022272
022276
022302
022306
022312
022314
022316
022322
022322
022326
022332
022334
022336
022342
022342
022342

4641 022344
022344
4642 022344
022344
022350
022354
022360
022364
022366
022370
4643 022374
022400
022400
022400

010600
104415
062706
105037
105037

MOV

000010
022001
022011

013746
013746
012746
012746
010600
104415
062706

022010
022000
022636
000003

012746
012746
010600
104414
062706

011645
000001

CLRB
CLRB

PRINTX

CS$PNTX

000010

PRINTB

€10,5P

ONEWLIN

ONEWLIN, -(SP)

#1,-(SP)

C$PNTB

000004

#4,SP

ENDMSG

104423

013746
012746
012746

012746
010600

104414

004737

C$MSG

002472
015541
012523
000003
000010
020356

BGNMSG

T3.EM2

PRINTB

OFMT21,0TXT12,MPCSR

JSR
ENDMSG

PC.ERR11$

:GET AND PRINT VIA REGISTERS

L10024:

4645

4647 022402
4648 022426
4650
4651
4652
4653
4654
4655

022513
022542
022573
022636
022700

SP,RO

TRAP
CSPNTX
ADD
#10,SP
T3.SW1+1
lHAKE SURE BITS 8 THROUGH 15 AREN'T REPORTED
T3,.SW2+1
-- ESPECIALLY BIT 8!!
073.5,7T3.5uW1,T73, SH?
MOV
T3.5uW2, -(SP)
T3.SW1,-(SP)
MOV
#73.5,-(SP)
MOV
03, -(SP)
MOV
SP,RO

.NLIST
T3.EHD:
73.1:
73.2:
73.3:
73.4:
73.5:
73.6:
LIST
.EVEN

BEX
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

TRAP

*SWITCH SETTING TEST'

/#NSASWITCH PACK SETTING DOES NOT MATCH P-TABLE ENTRY/

' #NsS22¢A DOCMP
800T’
' SNSS228AADDRESS
ADDRESS'
' SNSS6%AP -TABLE VALUES :#S1#03%S6%03"

' NSS6%AREAD FROM DMV :#S2#03%S6%03'
.ASCIZ
.ASCIZ /SPDSEL SWITCH DOESN'T MATCH P-TABLE BAUD RATE ENTRY/

BEX

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 3

USYRT MASTER CLEAR

MACRO M1200

22-FEB-84

15:31

PAGE 68

SEQ 0117

TEST

4673

.SBTTL

TEST 3

-- USYRT MASTER CLEAR TEST

;00“‘“.‘“““.“““‘..0““‘.““"“““‘.“"0“““‘.“...““.“““.‘
L

i¢

;¢

i¢
e

TEST 3 -- USYRT MASTER CLEAR TEST

ALL

REGISTERS

PATTERN

ARE

BELOW.

(BIT 6 OF BSEL 1).

THE PROPER CONTENTS.

LOADED WITH PATTERN E IN THE SAME SEQUENCE AS FOR
THE USYRT IS THEN CLEARED BY A MASTER CLEAR
ALL REGISTERS ARE THEN CHECKED FOR
THE

INITIALIZED STATE OF

THE REGISTERS

IS CHECKED

AGAINST DATA PATTERN F,
PATTERN E:

377,

366.

SEQUENCE OF REGISTERS AS USED WITH PATTERNS E & F:

RDSRL,

023112

004737
005001
012702
016137
112237
004537
000000
000000
062701
020127
002762
004737
005001
012702
016137
004537
000000
000000
123722
001422
010137
006237
005037
116237
013737

023120

023120
023122
023124
023126
4701 023130

023014

1%:

JSR
CLR
MOV
MOV
MOVB
JSR
.WORD

PC, INIDMV
R1
OPATE ,R2
USYREG(R1),2$
(R2)+,3%
RS,WRITEI
O

CMP
BLT
JSR
CLR
MOV
MOV
JSR

R1,016.
1$
PC,INILMV
R1
OPATF ,R2
USYREG(R1),7¢$
RS,READI

3$:

005420
002662
002552
003610

023056

7%:

8%:

023060
002412
002412
002400
177777
023060

64%:

.WORD
ADD

O
#2,R1

.WORD

CMPB
BEQ
MOV

8%,(R2)
9s
R1,REGNUM

.WORD

ASR

002400
002402

PCSARL,

REGNtTMM

PCSARH,

PCR,

USYRT

AR LR 2040 20

STATUS REG

000

RRA R0 A

T3::

s INIT DMV-11
;sINIT USYRT REG ADRS POINTER
s INIT PATTERN E POINTER
:GET USYRT REG ADRS

;:GET A PATTERN BYTE

iWRITE A USYRT REG

sUSYRT REG ADRS GOES HERE
:DATA BYTE GOES HERE
:INCR REG ADRS PTR
:1SEE IF ALL REGS WRITTEN YET
1BR IF NOT
s ISSUE MASTER CLEAR
s+INIT USYRT REG ADRS PTR
s INIT DATA PATTERN POINTER
:SET USYRT READ ADDRESS
sREAD A USYRT REG
tUSYRT REG ADRS GOES HERE
:1DATA READ IS RETURNED HERE
:SEE IF REG CONTAINS EXPECTED DATA
1BR IF MATCH
$1SET USYRT REG NO. FOR PRINTOUT
:GET WORD OFFSET
:GET EXPECTED DATA

GDATA
-1(R2),GDATA
84 ,BDATA
:GET ACTUAL DATA
sREPORT REG NOT CLEARED BY MASTER CLEAR
GEDF
EM1,ERR10
CLR
MOVB
MOV

104455
000053
013103
017372

TDSRH,

28858888 8800004000000 0000000020000

BGNTST

2%:

000002
000020

TDSRL,

3
005420

002652
002552
023016
003734

RDSRH,

ESCAPE

TST

“DEVICE FATAL" ERROR ¢ 43

TRAP

. WORD
.WORD
. WORD

CS$ERDF

43
EM1
ERR10

MACRC M1200

CNDMCAO DMVl LINE UNIT DIAGL
TEST

USYRT MASTER CLEAR

023130
023132

4702 023134

4703 023140
4704 023144

4705 023146
023146
023146

104410
000014
062701
020127
002737
104401

22 FEB-84

15:31

PAGE

B10
68-1

SEQ 0113

TEST
TRAP

000002
000020

9s:

ENDTST

ADD

CMP
BLT

#2,R1

R1,016.
63

1 INCR USYRT REG ADRS PTR
$1SEE IF ALL REGS READ YET

CSESCAPE

. WORD

L10025-.

TRAP

CSETST

1BR IF NOT

L1002%:

CNDMCAQ DMVl LINE UNIT
TEST

DIAGL

USYRT PROGRAM RESET

MACRO M1200

C10
22 FEB-84

15:31

PAGE 69

5EQ 0119

TEST

4722

.SBTTL

TEST 4

USYRT PROGRAM RESET

TEST

;00.“..0.‘.“‘.‘...“.‘.."..0“.‘..‘00‘.......“0“..‘.0..0.00......‘..‘.0..
kY

TEST 4 -- USYRT PROGRAM RESET TEST

;¢

ALL

REGISTERS

;¢

(BIT O ® ACOO) IN THE 6522 VIA. ALL REGISTERS ARE THEN CHECKED FOR

AGAINST DATA PATTERN F.

;‘

BELOW.

LOADED WITH PATTERN E IN THE SAME SEQUENCE AS FOR

PATTERN

ARE

;¢

THE

THE PROPER CONTENTS.

PATTERN E:
PATTERN F:

377,

000,

USYRT

THE

377,

000,

THEN RESET

INITIALIZED STATE OF

377,

000,

377,

000,

377,

000,

377,

000,

ASSERTING PROGRAM RESET

THE REGISTERS

377,

000,

IS CHECKED

366.

110.

SEQUENCE OF REGISTERS AS USED WITH PATTERNS E £ F:

;e
£l

: « 8800020000000 000200200000000000000000000000000000000000000000400000000000000002
:

;
4723
4724
4725
4726
4727
4728
4729
4730
4731
4732
4733
4734
4735
4736
4737

004737

005420

012702
016137
112237
004537

002652

062701
020127
002762

000002
000020

004537
103003

005126

023202
003734

JSR

023200

18:
2:

104460

4738

023232
023232

CLR
MOV
MOV

MOVB

PC, INIDMV

R1
OPATE ,R2
USYREG(R1),28

(R2)+,3$

sINIT DMV-11

;INIT USYRT REG ADRS POINTER
;INIT PATTERN E POINTER
;GET USYRT REG ADRS

iGET A PATTERN BYTE

- JSR
LMORD
MORD
ADD
cH
BLT

RS,WRITEI
O
O
02.R1
R1.016.
13

;WRITE A USYRT REG
tUSYRT REG ADRS GOES MERE
:DATA BYTE GOES HERE
:INCR REG ADRS PTR
:SEE IF ALL REGS WRITTEN YET
;BR IF NOT

JSR
BCC
ERROR

RS,RSTCHK
.8,

;RESET USYRT/VERIFY SAME
:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE TST

104410

4739
4740
4741 023232

BGNTST

;SKIP TO END OF TEST

0C 2002

CSERROR

TRAP

CS$ESCAPE

TRAP

CSETST

.MORD

ENDTST
104401

TRAP

L10026:

L 10026-.

CNDMCAQ DMv11 LINE UNIT DIAGL
TEST S

MACRO M1200

D10
22 -FEB-84

15:31

PAGE

SEGQ 0120

USYRT REGISTER ADDRESSING TEST

4756

.SBTTL

TEST S

USYRT REGISTER ADDRESSING TEST

1000000000000 00000000000

TEST 5

R0 RR0RRRRRRAARARAREARACARLAARAIARAANIGRRREERRRARRRSS

USYRT REGISTER ADDRESSING TEST

s FIRST, A MASTER CLEAR IS ISSUED, TO INITIALIZE THE USYRT REGS TO
s PATTERN F, THEN, EACH REGISTER IS WRITTEN WITH A BYTE OF PATTERN J,
i1* AND AFTER EACH IS WRITTEN, ALL ARE READ AND COMPARED TO THE CURRENT

s+ EXPECTED VALUES. THIS IS PERFORMED FOR ALL REGISTERS -- INCLUDING THE
:* READ ONLY REGS -- IN ORDER TO MAKE SURE THAT EACH REGISTER ONLY RESPONDS
;¢ TO ITS OWN ADCRESS.
PATTERN F:
PATTERN J:

000,
000,

000,

000,
020,

000,
040,

110
010

SEQUENCE OF REGISTERS AS USED WITH PATTERNS F £ J:

RDSRL,

RDSRH,

TDSRL,

TDSRH,

PCSARL,

PCSARH,

PCR,

USYRT

STATUS REG

$--208882884000000008000000400000800200800000800800000000000800000000000000000000

BGNTST
4757
4758
4759
4760
4761
4762
4763
4764
4765

005420
002572

OPATF ,R2
OREDDAT ,R3

(R2)+,(R3).

1$:

002672

4766

4767
4768
4769
4770
4771
4772
4773
4774
4775
4776
4777
4778
4779
4780
4781
4782
4783
4784
4785
4786
4787

PC, INIDMV

R2,0PATG

002552
003013
023332
023330

023330
023332
002572
120402

000100
003734

002601

R1
R2

2s8:

USYREG(R1),3$

PATJ(R2),4%
44 ,REDDAT(R2)

34,0TDSRL
10¢

:
108

RS,WRITEI
0
0
R3
R4

as:

123764
001420
010437
005037
116437
013737

002552
003610

023352

023354

002572

002412
002400
002572
023354

S$:

USYREG(R3),6%

SS.READI

64:

002400
002402

0
74 ,REDDAT(kS)
8¢

REDOAT(RQ),GDATA

s INIT USYRT REG ADRS PTR FOR WRITING
s INIT INDEX FOR WRITING
1SET USYRT REG ADRS
:SET DATA FOR WRITE
sSET EXPECTED DATA BYTE
:SEE IF WRITING TDSRL
:BR IF NOT

sFIX EXPECTED USTAT VALUE

;WRITE BYTE INTO A USYRT REG

sREG ADRS GOES HERE
s1DATA BYTE GNES HERE

sINIT USYRT REG ADRS PTR FOR READING
s INIT INDEX FOR READING
1SET USYRT REG ADRS
sREAD A USYRT REG
:REG ADRS GOES HERE
;:DATA BYTE READ IS RETURNED HERE

:1SEE IF BYTE READ MATCMES EXPECTED BYTE

iBR IF MATCH

$SET FAILING REG NO. FOR ERROR REPORT
t1GET EXPECTED DATA

74 ,8DATA
sGET ACTUAL DATA
sREPORT REGISTER MISCOMPARE ERROR

GEDF

104455
000054
013741

15::

s ISSUE MASTER CLEAR TO INIT DMV
sINIT PATTERN I POINTER
sINIT PTR TO EXPECTED DATA AREA
sMOV PATTERN F INTO REDDAT TABLE

EM66,ERR10

“DEVICE FATAL"” ERROR ¢ 44

TRAP

.WORD
.WORD

CSERDF

44
EM66

CNDMCAO DMV11l LINE UNIT DIAGL
TEST S

4795

4796
4797

EL1O
22-FEB-84

15:31

PAGE

70-1

SEG 0121

USYRT REGISTER ADDRESSING TEST

023420

017372

023422
023424
023426
023432
023434
023440
023442
023446
023450
023454
023456
023456
023456

104410

4788 023422
4789
4790
4791
4792
4793
4794

MACRO M1200

ESCAPE
000002

ADD

000010
000002
000010

ENDTST

INC
cMP
BLT
ADD
INC
CMP
LT

TST
@2,R3

R4
R4,210
5%
#2,R1
R2
R2,210
2$

.WORD

ERR10O

TRAP

CS$ESCAPE

. WORD
s INCR USYRT REG ADRS PTR FOR READING

L10027-.

+ INCR READ INDEX

:SEE _IF ALL REGS READ YET

:BR _IF NOT ALL READ YET
: INCR USYRT REG ADRS PTR FOR WRITING
s+ INCR WRITE INDEX
:SEE _IF ALL REGS WRITTEN YET
:BR IF NOT ALL WRITTEN YET
L10027:

TRAP

CSETST

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

TEST 6 -- R/W BIT TEST OF PCSAR HIGH BYTE
4806

22 -FEB-84 15:31

.SBTTL

PAGE 71

TEST 6 -- R/W BIT TEST OF PCSAR HIGH BYTE

1I0ARRAEERRRASARAARARARAAAAAAARARARRANAAEAAAANASRIAARLRRIALINAAIANANALAREASIL

TEST 6 -- R/W BIT TEST OF PCSAR HIGH BYTE

::
i*

WRITE,

READ,

;¢

PATTERN

;«

AND COMPARE EACH WORD OF DATA PATTERN G.

000,

001,

003,

004,

107, 000, 017, 027, 041, 200, 277,

005,

103,

007,

144,

100,

115,

101,

103,

157, 000.

104,

105,

1--00000Re Rttt
H

023460
4807 023460
4808 023464

004737
103003

023466

104460

023470
- 023472

104410
000056

4812 023474
4813 023500

012701
012703

4809 023466
4810 023470

:g{g 023504

4816 023512
023512

012737

104402

4818 023514

111137

023520
023524
023530
023534
023536

112137
012700
004737
103003

023536

104460

023540
— 023542

104410
000006

4824 023540

4826 023544

023544

104403

4828 023546
4829

077317

4830 023550

023550

002672
000025

000005

30¢:

002412

PC,INIDMV
308

T6::
s INIT DMV/VIA € START UP MAINT. LOOP
:IF AN ERROR OCCURED,

ESCAPE

TST

MOV
MOV

OPATG,R1
#<PATH-PATG-2>,R3

;REPORT IT &

05 ,REGNUM

BGNSUB

EXIT

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10030-.

;POINT TO PATTERN TABLE
;GET & OF ENTRIES IN TABLE

sERROR INDEX FOR PCSARH

;THE SUBTEST ONLY TESTS THE ONE PATTERN
76.1:

TRAP

002376

MOVB

002400
120405
004272

MOVB
MOV
JSR
8CC
ERROR

(R1),TDATA

(R1)+,GDATA
@PCSARH,RO
PC,STUREG
10¢

:SETUP TEST DATA BYTE FOR "STUREG"”

ESCAPE

TST

ENDSUB

S08
ENDTST

104401

ittt tttttttttitiisttittnttttitttittisttttasttsttttine

JSR
BCC

MOV

10¢:

p— 023544

BGNTST

ERROR

T7.LP:

2017 023512
4819
4820
4821
4822
4823

005420

ittt

;:SETUP EXPECTED DATA BYTE FOR “STUREG"”
;SPECIFY THE REGISTER BEING TESTED
sPERFORM STATIC TEST OF THE SPECIFIED REGISTER
;WAS AN ERROR FOUND?
:YES, REPORT IT AND
EXIT FROM THE TEST.

TRAP

CSERROR

TRAP
. WORD

CSESCAPE
L10030-.

TRAP

CSESUB

“CKLOOP” IS IMPLIED

L10031:
R3,T7.LP

csBSuB

;IF THERE IS IN FACT MORE DATA, LOOP BACK TO
;TEST IT.
ELSE, FALL OUT OF LOOP AND TEST

L10030:

TRAP

CSETST

CNDMCAO DMv1l LINE UNIT DIAGL
TEST

R/W BIT

TEST

MACRO M1200

22-FEB-84 15:31

PAGE

G10O
72

SEG 0123

S/AR REGISTER

4839

.SBTTL

TEST

3000808800040

R/W BIT

TEST OF

S/AR REGISTER

0000 0000000000000 0RRRRRRAAARRRARAR SRR RARRRRARRIRARARARASALSS

1 ®

TEST

;¢

WRITE,

i¢«

PATTERN

READ,

R/W BIT

TEST

AND COMPARE

125,

200,

252,

000,

S/AR REGISTER

EACH WORD OF

000,

377,

000,

376,

375,

DATA PATTERN M.

001,
373,

002,

367,

004,

010,

357,

337,

020,

277,

040,

177,

100,

377,

000

$--08200000000 0040000000040 0 0480000888400 00000808800000048080888000400400000000¢

023552

4840 023552
4841 023556
4842 023560
023560

004737
103003

023562
4896 023564

104410
000056

4845 023566
4846 023572
:g:; 023576

012701
012703
012737

4843 023562

005420

4849 023604

PC, INIDMV
308

ESCAPE

TST

30%:

MOV
MOV
MOV

OPATH,R1
@<PATI-PATH-2>,R3
€4 ,REGNUM

T8.LP:

BGNSUB

002412

023604
2850 023604

104402

4851 023606

111137

002376

MOVB

004737
103003

004272

JSR
B8CC
ERROR

4852 023612
4853 023616

4854 023622
4855 023626

4856 023630
023630
4857 023632
023632
p— 023634

112137
012700

023636

4861 023640

077317

4863 023642

023642

ESCAPE

10¢:
104403

023642

MOVB
MOV

104410
000006

— 023636

4862

002400
120404

104460

4859 023636

sINIT DMV £ START UP THE MAINT. LOOP
:sIF AN ERROR OCCURED,
;REPORT IT &
TRAP
;s

EXIT

TRAP
.WORD

;THE SUBTEST ONLY

77.1:

:SETUP

PC,STUREG
10¢

;PERFORM STATIC TEST OF
;WAS AN ERROR FOUND?

TST

TEST DATA BYTE FOR

TRAP

csBsuB

"STUREG”

:SETUP EXPECTED DATA BYTE FOR “STUREG"
sSPECIFY THE REGISTER BEING TESTED
;YES,

REPORT IT AND

EXIT FROM THE

THE

TEST.

SPECIFIED REGISTER

;IF

THERE

;TEST IT.

TRAP

CSERROR

.WORD

L10032-.

TRAP

CS$ESUB

“CKLOOP" IS IMPLIED
TRAP
CSESCAPE

L10033:
R3,T78.LP

CSESCAPE
L10032-.

TESTS THE ONE PATTERN

(R1),TDATA

(R1)+,GDATA
OPCSARL ,RO

CS$ERROR

;POINT TO PATTERN TABLE
;GET & OF ENTRIES IN TABLE
sERROR INDEX FOR S/AR BYTE

ENDSUB

S08

ENDTST

104401

T7::

JSR
8CC
ERROR

104460

002721
000027
000004

BGNTST

IN FACT MORE DATA,

LOOP BACK

ELSE, FALL OUT OF LOOP AND TEST

L10032:

TRAP

CSETST

CNDMCAQ DMV1l LINE UNIT DIAGL
TEST 8

R/MW BIT

TEST

MACRO M1200

22 FEB-84

15:31

PAGE

H10
73

SEG 0124

PCR REGISTER

4874

.SBTTL

TEST

0880880000040

R/W BIT

TEST

PCR REGISTER

0000 0ARRRRRARAR AR AR AR AR AR RRAAARAR SRR AS LSRRG

LALRRALAGS

1 *

TEST 8 -- R/W BIT TEST OF PCR REGISTER

;¢

PATTERN

CHECKED.

004,

105,

040,

347,

100,

010,

LOADED

INTO

PCR

200,

000,

346,

020,

367,

357,

(HIGH)

030,

345,

027,

AND

343,

377.

THE

DATA READ BACK

307, 247,

147,

AND

347, 242,

L
-~ 2280000 0000000400000 000 0000000000000

023644

4875 023644
4876 023650
4877 023652
023652

004737
103003

023654
e 023656

104410
000056

4880 023660
4881 023664
:gg 023670

012701
012703
012737

4878 023654

005420

4884 023676

023676
208S 023676

111137
112137
012700
004737
103003

023722

104460

023710
023714
023720
023722

4892 023724

023724

—— 023726

TST

30%:

MOV
MOV
MOV

OPATI,R1
#<PATJ-PATI-2>,R3
€6 ,REGNUM

T9.LP:

BGNSUB

002412

002376
002400

MOvVB
MOVB

120407
004272

EXIT

4896 023732

077317

4898 023734

ENDTST

104401

TRAP

CSERROR

TRAP
.WORD

C$ESCAPE
L10034-.

sPOINT TO PATTERN TABLE
;GET & OF ENTRIES IN TABLE
;ERROR INDEX FOR PCR REGISTER

s THE

SUBTEST

ONLY

TESTS

THE

ONE PATTERN

78.1:

TRAP

csBsuB

MOV
JSR
B8CC
ERROR

(R1),TDATA
(R1)+,GDATA

#PCR,RO
PC,STUREG
104

;SETUP TEST DATA BYTE FOR “STUREG"”
:SETUP EXPECTED DATA BYTE FOR "STUREG"

ESCAPE

TST

;SPECIFY THE REGISTER BEING TESTED
4
;PERFORM STATIC TEST OF THE SPECIFIED REGISTER
;WAS AN ERROR FOUND?
;YES, REPORT IT AND
EXIT FROM

ENDSUB

SoB

THE

TEST.

TRAP

“CKLOOP"

L10035:
R3,T79.LP

LOOP

TRAP
10¢:

104403

023734

ESCAPE

104410

023730
Jo— 023730

023734

s INIT DMV/VIA € START UP MAINT.
;IF AN ERROR OCCURED,
sREPORT IT &

000006

4894 023730

4897

78::

PC,INIDMV
30¢

104402

4886 023700
4887 023704
4888
4889
4890
4891

BGNTST

ARRAALRAREN

JSR
B8CC
ERROR

104460

002752
000037
000006

0 0000000000000

:IF

THERE

sTEST IT,

IS IN FACT MORE DATA,

CSERROR

IMPLIED

CS$ESCAPE

.WORD

L10034 -,

TRAP

CS$ESUB

LOOP BACK

ELSE, FALL OUT OF LOOP AND TEST
L10034:;

TRAP

CSETST

CNDMCAO DMVl LINE UNIT DIAGIL

TEST 9 --

10
MACRO M1200

22 FEB-84

15:31

PAGE

SER 0125
2

R/M BIT TEST OF TDSR REGISTER'S HIGH BYTE

4915

.SBTTL

TEST

R/W BIT

TEST

TDSR REGISTER'S HIGH BYTE

1008880000008 000 0000000000000 0 000000040000 000000 0080008808080 0000000000000000
i &

TEST 9 -- R/W BIT TEST OF TDSR REGISTER'S HIGH BYTE

;¢

PATTERN

;*
;¢

COMPARED AGAINST PATTERN L. (UNPREDICTABLE BITS ARE MASKED OFF T0 O
WHEN READING FOR COMPARISON.)

;»

PATTERN

004, 010, 200,

;¢

PATTERN

:«

:¢
;#
;i
k-

LOADED

INTO

TDSR

(HIGH)

AND

THE

DATA

READ BACK

000,

377,

376,

375,

373,

376,

177,

377,

000,

001,

002,

000,

017,

016,

015,

013,

016,

017,

000,

001,

0O2,

125, 252, 000.

004, 010, 000, 005, 012, 000.

NOTE
THAT
THE UNDEFINED BITS (12, 13, € 14) ARE MASKED OFF TO 0'S
FOR THE COMPARISON. ALSO THAT BIT 1S IS A READ/ONLY BIT AND CAN'T BE
SET -- THEREFORE SHOULD ALWAYS BE READ AS A O BY THIS TEST.

: - 8888888800008 0002800080000000000000800000300880000000
000000000000 0000000000000
H

023736

4916 023736
4917 023742
4918 023744
023744

004737
103003

023746
o— 023750

104410
000114

4921 023752

012701

4919 023746

4922 023756
:ggz 023762

005420

104460

012703
012702

003023

000017
003044

4925 023766

023766

BGNTST

79::

JSR
8CC
ERROR

PC, INIDMV
30¢

s INIT DMV/VIA € START UP MAINT.
s IF AN ERROR OCCURED,
;REPORT IT &

ESCAPE

TST

30¢:

MOV

T10.LP:

BGNSUB

MOV
MOV

EXIT

OPATK,R1

sPOINT

Q@<PATL -PATK-2>,R3
OPATL ,R2
;THE

SUBTEST ONLY

TESTS

112137

002376

MOVB

(R1).,TDATA

:SETUP TEST DATA BYTE

4930 024000
4931 024004

004537
120403

003722

JSR
.WORD

RS,WRITE
TDSRH

;WRITE TO DMV-11
; DMV-11 ADDRESS WRITTEN

4934 024010
4935 024014

004537
120403

003476

JSR
. WORD

.WORD

RS,READ
TOSRH

BDATA

;READ FROM DMV-11
; DMV-11 ADDRESS READ FROM

4938 024020
4939 024026
:g:g 024034

042737
023737
001411

177760
002400

BIC
cMP
BEQ

#177760,BDATA
GDATA,BDATA

10¢

sMASK OUT “DON’'T CARE" BITS
;:READ DATA = EXPECTED DATA ?
;WAS AN ERROR FOUND?

4942 024036
4943 024044

012737

000003

MOV
GEDF

03 ,REGNUM
EM25,ERR7A

:YES: SET UP REGISTER NUMBER
;REPORT IT AND

:ggg 024006

:ggg 024016

MOVB

002376

.WORD

002402

002402
002402

002412

(R2)+,GDATA

TDATA

TRAP
.WORD

CS$ESCAPE
L10036-.

THE ONE PATTERN

79.1:

4927 023770

002400

CSERROR

TO PATTERN TABLE

104402

112237

TRAP

;GET @ OF ENTRIES IN TABLE
;+POINT TO “EXPECTED” DATA PATTERN TABLE

o0k 023766

:ggg 023774

LOOP

TRAP

;SETUP EXPECTED DATA BYTE
TO

+ LOCATION OF DATA WRITTEN

LOCATION WHERE READ DATA IS PUT

csBSuB

CNDMCAO DMV11 LINE UNIT DIAGL
TEST

R/W BIT

TEST

024044
024046
024050
024052

104455
000055
013366
017252

024054
- 024056

104410
000006

4944

024054

MACRO M1200

104403

4948 024062

077337

4949

4950 024064

024064

J10
74

SEQ 0126

"DEVICE FATAL” ERROR & 45
-

ESCAPE

TST

EXIT

FROM

ENDSUB

So8

THE

TEST.

“CKLOOP”

L10037:

ENDTST

104401

PAGE

;

10%:

- 024060

15:31

TDSR REGISTER'S HIGH BYTE

4946 024060

024060

22-FFB-84

R3,T10.LP

s IF

THERE IS IN FACT MORE DATA,

sTEST IT.

TRAP
.WORD
.WORD
.WORD

CS$ERDF
45
EM25
ERR7A

TRAP
.WORD

C$ESCAPE
L10036-.

TRAP

CSESUB

IMPLIED

LOOP BACK

ELSE, FALL OUT OF LOOP AND TEST
L10036:

TRAP

CSETST

CNDMCAO DMVil LINE UNIT DIAGL
TEST

R/uW BIT

TEST OF

MACRO M1200

22-FEB-84 15:31

PAGE

<10
75

SEG 0127

TXDB REGISTER

4958

.SBTTL
PR

TEST

RA AR AR AR LA

R/W BIT

TEST OF TXDB REGISTER

A R AR AR ARR LA

AR AR AA R AR

AP L PR 2402220 A 2208000004 000000000

TEST 10 -- R/W BIT TEST OF TXDB REGISTER

WRITE,

READ,

AND

PATTERN

000,

COMPARE EACH WORD OF

DATA PATTERN H.

i«

376,

: =828
4959 024066
4960 024072
4961 024074

H
004737
103003

024074

104460

024076
— 024100

104410
000056

4964 024102

012701

4962 024076

4965 024106
:ggg 024112
4968 024120

024120

o 024120

104402

4970
4971
4972
4973
4974
4975

111137
112137
012700
004737
103003

024122
024126
024132
024136
024142
024144
024144
4976 024146

024146
- 024150

4980 024154

077317

4982 024156

024156

104401

357,

002,

337,

004,

277,

010,

177,

020,

377,

040,

000

100,

200,

T10::

PC, INIDMV
30¢

s INIT DMV/VIA € START UP MAINT.
;s IF AN ERROR OCCURED,
;REPORT IT €

ESCAPE

TST

T11.LP:

BGNSUB

002412

MOV
MOV

000,

377,

#PATH,R1

@<PATI-PATH-2>,R3
@2 ,REGNUM

EXIT

;POINT

LOOP

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10040-.

TO PATTERN TABLE

;GET & OF ENTRIES IN TABLE
;ERROR INDEX FOR TXDB REGISTER

;THE SUBTEST ONLY

TESTS THE ONE PATTERN

T10.1:

TRAP

csBSuUB

MOVB
MOVB
MOV
JSR

(R1),TDATA
(R1)+,GDATA
#TDSRL ,RO
PC,.STUREG

;SETUP TEST DATA BYTE FOR "“STUREG”
:SETUP EXPECTED DATA BYTE FOR “STUREG”
;SPECIFY THE REGISTER BEING TESTED
;PERFORM STATIC TEST OF THE SPECIFIED REGISTER

8CC
ERROR

10¢

;WAS AN ERROR FOUND?
:YES, REPORT IT AND

ESCAPE

TST

EXIT FROM THE

ENDSUB

SOB

ENDTST

001,

JSR
B8CC
ERROR

MOV

002376
002400
120402
004272

367,

BGNTST

308:

10$:

104403

024156

000027
000002

104410
000006

— 024152

4981

002721

104460

4978 024152

024152

005420

012703
012737

373,

R0 R0 4000 AR AR AR R AR AR AR AR AR AR R0 0 0040000000040 000000000000 00s

024066

375,

TRAP
TEST.

“CKLOOP”

L10041:
R3,T11.LP

:IF

THERE

;sTEST IT.

IN FACT MORE DATA,

CSERROR
IS

TRAP
.WORD

TRAP

IMPLIED

CSESCAPE
L10040-.

CS$ESUB

LOOP BACK

ELSE, FALL OUT OF LOOP AND TEST
L10040:

TRAP

CSETST

CNDMCAO DMV1l LINE UNIT DIAGL

MACRO M1200

TEST 11 - PSEUDO R/W BIT TEST OF RXDB
4991

22-FEB-84 15:31

.SBTTL
R

TEST 11

L.10

PAGE 76

S —_—

-- PSEUDO R/W BIT TEST OF RXDB

T PP
Y Y Y YT

TEST 11 -- PSEUDO R/W BIT TEST OF RXDB

i*#

WRITE, READ (BUT NO COMPARE) OF EACH WORD IN DATA PATTERN H.

s«

PATTERN

i«

376,

PRIMARILY

TO PROVIDE

375,

000,

373,

SCOPE

001,

002,

367,

357,

LOOP FUNCTION ON

004,

337,

010,

277,

020,

177,

THIS REGISTER.

040,

377,

100,

200,

THIS IS

00O,

377,

000

:--ootooootooootatt.toooao.ooaotooooooooooooooo.oooao.‘o“toooo‘.ocoootocoo.oo
:

BGNTST

024160
4992 024160
4993 024164

004737
103003

024166

104460

024170
— 024172

104410
000040

4997 024174

012701

002721

30$:

MOV

OPATH,R1

5588(1) 024204

012137

024216

20%:

MOV

(R1)+,2$

5002 024210
S003 024214
S004 024216

004537
120400
000000

003734
2%:

JSR
.WORD
.WMORD

RS,WRITEI
RDSRL
O

;WRITE TO DMV-11
; DMV-11 ADDRESS WRITTEN TO
s+ ACTUAL DATA WRITTEN

5006 024220
5007 024224
5008 024226

004537
120400
000000

003610

JSR
.WORD
.MORD

RS,READI
RDSRL
O

;READ FROM DMV-11
; DMv-11 ADDRESS READ FROM
: READ DATA IS PUT HERE

5010 024230

077313

SOB

R3,20¢

:IF MORE DATA,

4994 024166

4995 024170

:& 024200

5011

012703

5012 024232

024232
024232

005420

000027

JSR
B8CC
ERROR

PC, INIDMV
30¢

Til::
s INIT DMV/VIA €& START UP MAINT.
:IF AN ERROR OCCURED,
;sREPORT IT €&

ESCAPE

TST

MOV

@<PATI-PATH-2>,R3

ENDTST
104401

EXIT

sPOINT

LOOP
TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10042-.

TO PATTERN TABLE

;GET & OF ENTRIES IN TABLE

LOOP BACK TO WRITE/READ IT,

ELSE, FALL OUT OF LOOP AND TEST
L10042:

TRAP

CSETST

CNDMCAO DMV11 LINE UNIT DIAGL

MACRO M1200

22-FEB-84 15:31

M10O

PAGE 77

TEST 12 -- PSEUDO R/W BIT TEST OF RDSR'S HIGH BYTE
5021

.SBTTL

ot P

TEST 12 -- PSEUDO R/W BIT TEST OF RDSR'S HIGH BYTE

FEIRARAARARARARRARRRARRAAARARAAAAAAA
A AARRRRAAASAAAREAAEELEE00000000040000004

TEST 12 -- PSEUDO R/W BIT TEST OF RDSR'S HIGH BYTE

i#
i*

WRITE, READ (BUT NO COMPARE)
PRIMARILY TO PROVIDE A SCOPE

s#
i«

PATTERN
H:
000,
001, 002, 004, 010, 020, 040,
376, 375, 373, 367, 357, 337, 277, 177, 377, 000

: =R

5023 024240

103003

005420

5024 024242
024242
5025 024244
024244
Sese 024246

104410
000040

5027 024250
gggg 024254

012701
012703

002721
000027

gggg 024260

012137

024272

5032 024264
S033 024270

004537
120401

003734

5036 024274
5037 024300
gggg 024302

004537
120401
000000

003610

5040 024304
5041
5042 024306
024306
024306

077313

ggg; 024272

BGNTST

H
004737

JSR

B8CC

ERROR

104460

200,

PC,INIDMV

T12::
sINIT DMV/VIA & START UP MAINT.

:IF AN ERROR OCCURED,
;REPORT IT &

OOO,

377,

EXIT

LOOP
TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10043-.

ESCAPE

TST

30$:

MOV
MOV

OPATH,R1
@<PATI-PATH-2>,R3

20%:

MOV

(R1)+,2%

JSR
.WORD

RS,WRITEI
RDSRH

sWRITE TO DMV-11
; DMV-11 ADDRESS WRITTEN TO

JSR
.WORD
.WORD

RS,READI
RDSRH
O

;READ FROM DMV-11
;: DMV-11 ADDRESS READ FROM
: READ DATA IS PUT HERE

So8

R3,20¢

:IF MORE DATA, LOOP BACK TO WRITE/READ IT,
:
ELSE, FALL OUT OF LOOP AND TEST

000000

2%:

ENDTST
104401

100,

THIS

B AR AR R AR R AR AR AR R AR AL A AL AR AR RS040 044000 AA 040400000ttt attbttan

024234
5022 024234

OF EACH WORD IN DATA PATTERN H.
LOOP FUNCTION ON THIS REGISTER.

.WORD

;POINT TO PATTERN TABLE
;GET & OF ENTRIES IN TABLE

ACTUAL DATA WRITTEN

L10043:;

TRAP

CSETST

CNDMCAO DMV11l LINE UNIT
TEST

NULL CLOCK

DIAG1

MACRO M1200

22-FEB-84

15:31

PAGE

N1O
78

SEQ 0130

TEST

5062

.SBTTL
R

TEST

-- NULL CLOCK TEST

Py Y YY YT

TEST 13 -- NULL CLOCK TEST

s FIRST,

A MASTER CLEAR

IS DONE

INIT

THE DMV.

THEN,

THE

TIMER ON THE

i«
s
s+*#
:#
:*

VIA CHIP IS PROGRAMMED FOR SQUARE WAVE CLOCK GENERATION ON PB7 (BIT 7
OF VIA OUTPUT REG B), WITH A BAUD RATE = 56 KBAUD. THIS IS THE MODE OF
VIA OPERATION WHICH IS USED TO GENERATE THE NULL CLOCK. THEN, THE PROGRAM
SCANS ORB REPEATEDLY TO MONITOR THE NULL CLOCK BIT, IN THE FOLLOWING
SEQUENCE

s#
i#

IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC (A GROSS TIMEOUT
INTERVAL), AN ERROR IS REPORTED. (AT 56 KBAUD, THE CLOCK SHOULD

THE PROGRAM REPEATEDLY CHECKS

HAVE A PERIOD OF ABOUT

THE

STATE,

AND

18 MICRO-SEC.)

THE PROGRAM NEXT REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE O STATE,

i*#

AND

REPORTED.

:i*#

AGAIN,

THE NULL CLOCK BIT FOR

IS NOT FOUND WITHIN SEVERAL

HUNDRED MICRO-SEC,

AN ERROR

THE PROGRAM NEXT REPEATEDLY CHECKS THE NULL CLOCK BIT FOR THE 1 STATE
AND IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MICRO-SEC,

AN ERROR IS REPORTED.

$-~582828 8000800580000
R0 R AR AR AR AR R AL AR08 0400000440000 00000000000

024310
024310
024314
024320
024322
024324
024330

024332

:
004737
004537
120004
000017
004537
120005
000000

005420
003734

BGNTST
JSR
JSR
VIAT1A
19,
JSR
VIAT1B

003734

T13::

PC, INIDMV
RS,WRITEI

;sINIT DMV1L
;LOAD T1C-L,

TiL-L FOR S6K BAUD

RS,WRITEI

:LOAD T1C-H,

T1L-H,

START CLOCK

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

024334
024342
024346
024350
024352
024360
024362
024366

012737
004537

024370
024376
024404
024412

012737
012737
013737
042737

002602

060200

024350

#170000,REGO
RS,READI

0
ONULCLK,
2%
3¢
REGO
1s

002602

024420
024420
024422
024424
024426

170000
003610

000200
024350
000177

002412
002400
002402
002402

90, REGNUM

ONULCLK,GDATA

24 ,BDATA

GEDF

104455
000056
013252
017546

EMS,ERR11

: INIT PROGRAM TIMER
+READ VIA ORB

i SEE _IF CLOCK BIT SET
:BR_IF TIMER DID NOT TIME OUT
+ (TIME OUT = SEVERAL HUNDRED MICRO-SEC)
:SET VIA REG NO. FOR PRINTOUT
:GET EXPECTED DATA
1GET ACTUAL DATA
:CLEAR UNUSED BITS
P

“DEVICE FATAL" ERROR & 46

TRAP

.WORD
.WORD
.WORD

CSERDF

46
EM5
ERR11

CNDMCAO DMv1l LINE UNIT DIAGL
TEST

NULL CLOCK

S088 024430

024430

ot 024432

MACRO M1200

22 FEB-84

ESCAPE

104410

012737

002602

132737

000200

024450

005237
001365

002602

012737
012737
013737

000000
000000
024450

004537
120000
000000

S097 024460

001425

5105
5106 024520
024520

024522
024524
024526
5107 024530

024530
Rans 024532

TRAP

042737

003610

000177

38:

MOV

as;

JSR
VIAORB
LMORD

S$:

BIT

TO BE

CLEARED

2170000,REGO

RS,READI

012737

S113 024546
5114 024550

120000
000000

S115 024552
5116 024560
5117 024562
5118 024566
5119

5120 024570
5121 024576
5122 024604
5123 024612

5124
5125 024620

024620

003610

132737
001023
005237
001365

000200

012737
012737
013737

000000
000200
024550

042737

104455

024622
024624
024626
5126 024630
5127 024630

000060
013252
017546

024630

104401

024630

170000

004537

002602

024550

0ee

;READ VIA ORS

MOV
MOV
MOV

00 , REGNUM
©000,GDATA
S$,BDATA

s INCR TIMER
:BR IF TIMER DID NOT TIME OuT
: (TIME OUT = SEVERAL MUNDRED MICRO-SEC)
$SET VIA REG NO. FOR PRINTOUT
+GET EXPECTED DATA
;GET ACTUAL DATA

6$%:

MOV

8s:

VIAORS
.MORD

002412
002400
002402

002402

177,BDATA

1BR IF CLEARED

;:CLEAR UNUSED BITS

“DEVICE FATAL” ERROR @ 47

TRAP

TST

CSERDF

.MORD
.HORD
.WORD

47
EM6
ERR11

TRAP
.WORD

CSESCAPE
L10044
-,

TO 1 AGAIN

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

(02602

000177

REGO
as

)

.uAn FOR NULCLK BIT TO BE SET

S112 024542

INC
BNE

ESCAPE

‘

+INIT PROGRAM TIMER

sSEE IF CLOCK BIT CLEARED

BIC

104410
000076

gigg

T0O O

ONULCLK,S$

;REPORT NULL CLK STUCK AT 1
GEDF
EM6,.ERR11

000057
013302
017546

L10044-,

BITB
BEQ

002412
002400
002402
002402

FOR NULCLK

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

104455

S111 024534

CSESCAPE

LWORD

170000

5093 024442
5094 024446
S095 024450

5104 024512

TST

000176

‘

5098 024462
5099 024466
5100
5101 024470
5102 024476
5103 024504

78
1

€0 0131

.unn

5096 024452

PAGE

TEST

5583?

5092 024434

15:31

B11

sINIT PROGRAM TIMER

JSR

RS,READI

8ITB
BNE
INC
BNE

ONULCLK,88
9%
REGO
78

1SEE IF CLOCK BIT SET
sBR IF SET
sINCR TIMER
;BR IF TIMER DID NOT TIME OUT

MOV
MOV
MOV

00, REGNUM
ONULCLK,GDATA
84 ,BDATA

+SET VIA REG NO. FOR PRINTOUT
;GET EXPECTED DATA
1GET ACTUAL DATA

BIC

0177,BDATA

sREPORT NULL CLK STUCK AT O
GEDF
EMS,.ERR11

:READ VIA ORS

(TIME OUT

= SEVERAL MUNDRED MICRO-SEC)

;CLEAR UNUSED BITS

“DEVICE FATAL” ERROR @ 48

TRAP

9s:
ENDTST

L10044;

CSERDF

.MORD
.MORD
.WORD

48
EMS
ERR11

TRAP

CSETST

CNOMCAQ DMv1l LINE UNIT DIAGL

MACRO M1200

TEST 14 - BCP TX RESET W.IDLE = O
5149

22 FFB-84

LSBTTL

TEST

15:31

PAGE

Cll
79

SEQ G

-- BCP TX RESET W/IDLE

= O

300“......‘“..“..“.““.“..‘....‘.‘.‘.‘.‘.‘..0.....“.‘0....‘.‘..........
:

TEST

BCP

TX REJET

W/ICLE

THE USYRT IS INITIALIZED FOR "BYTE-CONTROL PROTOCOL” (BCP) WITH IDLE

SET

s«
s«
:#

CHARACTER IS LOADED INTO TXDB SO THAT THE SOURCE OF SYNC CHARACTERS
CAN BE LATER DETERMINED. THE VALID STATE OF THE USYRT REGISTERS IS
READ AND CHECKED. TXE IS ASSERTED TO ENABLE THE TRANSMITTER LOGIC.

;¢

TXA

TO ZERO AND A

THEN,

125 SYNC CHARACTER

IS LOADED

INTO S/AR.

A 226 SYNC

TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE OBSERVING
IT

SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.

;¢
;i
;e

(TXBE SHOULD GO HIGH; AT THIS TIME THE S/AR'S SYNC CHARACTER SHOWLD
BE LOADED INTO TXSO AND TSOM IS AGAIN SET -- DRIVING TXBE LOW.)
THREE SYNC CHARACTERS ARE SENT/RECEIVED: THE FIRST TWO SYNCHRONIZE

;¢
;e
e

COMPARED AGAINST 125 (THE S/AR SYNC CHARACTER).
IF VALUE READ IS 226, THEN TXDB PROVIDED THE SYNC (IE: ERROR).
THE USYRT IS THEN RESET AND REGISTERS ARE AGAIN READ AND CHECKED.

;¢
;¢
;¢

ONE MARK AND THREE SYNC CHARACTERS (FROM THE S/AR) IS TRANSMITTED.
ERROR LOOPING WILL DEPEND (W WHERE THE FIRST ERROR OCCURS WITHIN THE
SEQUENCE.

:¢

THE RECEIVER,

)

THE

THIRD IS DIRECTLY READ (STRIP SYNC

THIS TEST WILL GO NO FURTHER INTO THE

IS OFF) AND

TRANSMIT SEQUENCE

SO THAT ONLY

:--.“..“‘......“‘..‘...‘......“‘..‘....“.‘.“..“‘..‘.....‘..‘..““.....
H

g{gé 024632

004737

005420

S153 024636

004537

007400

5155 024644
5156 024646
5157 024650

000000
103003

5154 024642

024650

5158 024652

024652

043525

104410

000106

5160 024656
5161 024662

004537
000001

010010

5164 024666
5165 024672

004537
000001

010010

5168 024676
5169 024702
g{;g 024704

004537
000001
000010

010010

5172 024706

004537

011364

5173 024712
5174 024714

JSR

PC, INIDMYV

s INIT DMV-11, ENTER M-LOOP

JSR

HS, INITRN

sLOAD 1 SOM, CLK TX UNTIL ACTIVE

0
8CC
ERROR

.+8,

tUSE 8 BIT CHARS
:BR IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

TST

1SKIP TO END OF TEST

sSET DDCMP,NO CHECK,S/AR(SYNC)=125

TRAP

CSERROR

TRAP

C$ESCAPE

.WORD

000010

000000
103003

T14::

DDCMP !NOCHK 125

104460

189 024654

g{g? 024674

BGNTST

5190 024632

JSR
TS

RS, TXCTRL

sOUTPUT 1ST SYNC CHARACTER
sAND KNOCK DOWN TBMT

JSR
TS

RS, TXCTRL

1OUTPUT 2ND SYNC CHARACTER
1AND KNOCK DOWN TBMT

JSR
TS
8.

RS, TXCTRL

sOUTPUT 3RD SYNC CHARACTER (125)
sAND KNOCK DOWN TBMT

JSR

RS,RCvV1ST

;CLOCK AND RCV TSOM

.+8.

1BR IF NO ERROR

0
8CC

L10045-.

CNDMCAO DMVl LINE UNIT
TEST

BCP TX RESET

5175 024716
024716
5176 024720
024720
024722
5177
5178 024724
5179 024730
5180 024732
5181 024734
5182 024736
5183 024740
024740
5184 024742
024742
024744
5185
5186 024746
5187 024752
5188 024754
024754
5189 024756
024756
024760
5190
5191 024762
024762
024762

D11
DIAGL
W IDLE

MACRO M1200

20 FEB-84

PAGE

SEG 0133

ERROR

104460

ESCAPE

104410
000040

004537
000125

15:31

sREPORT

TS1

STACKED ERROR

$SKIP TO END OF TEST

TRAP

CS$ESCAPE
-,
L10045

RS,RXCHAR

;READ AND CHECK FOR S/AR 125 SYNC
: AND CLOCK IN NEXT ONE.

8CC

.+8,

:BR IF NO ERROR

ESCAPE

TST

sSKIP TO END OF

JSR

010110

125

0
8.

103003

ERROR

104460
104410

tREPORT

STACKED ERROR

TEST

000016

005126

104460
104410
000002

ENDTST
104401

CS$ERROR

. WORD

000000
000010

004537
103003

TRAP

JSR
8CC
ERROR

RS ,RSTCHK
.+8.

ESCAPE

TST

TRAP

CS$ERROR

TRAP

. WORD

CSESCAPE
L10045
-,

TRAP

CSERROR

sRESET USYRT/VERIFY SAME
:BR IF NO ERROR

sREPORT

STACKED ERROR

TRAP

L1004S:

CSESCAPE

. WORD

L10045
-,

TRAP

CSETST

CNDMCAO DMV11 LINE UNIT

DIAGL

MACRO M1200

TEST 15 -- BCP TX RESET W/IDLE = 1
5215

22-FEB-84

.SBTTL

TEST

15:31

R AR AR A AR

1
AR AR AR

RR SRRSO ARRRIALAS

TEST 15 -- BCP TX RESET W/IDLE = 1
THE USYRT

IS INITIALIZED FOR

"BYTE-CONTROL PROTOCOL”

(BCP) WITH IDLE

s#
s¢

SET TO ONE AND A 226 SYNC CHARACTERS LOADED INTO S/AR AND TxDB.
THE VALID STATE OF THE USYRT REGISTERS IS READ AND CHECKED. TXE IS

;#
s¢«

(TXBE SHOULD GO HIGH; AT THIS TIME THE TXDB SYNC CHARACTER SHOWLD
BE LOADED INTO TXSO AND TSOM IS AGAIN SET -- DRIVING TXBE LOW.)

:*
i#
s
s«
i#
i#
:*+
;¢
i#
;#
;¢

LOADED WITH A 125 AND, WITH TSOM STILL = 1 (SYNC SOURCE = TXDB), THE
USYRT IS AGAIN CLOCKED.
AT THIS POINT, IF THE IDLE BIT WORKED, THE VALUE 125 WILL BE READ
BY THE RECEIVER. OTHERWISE A 226 WILL BE READ, TNDICATING TXDB WASN'T
PROVIDING THE SYNC CHARACTERS.
WHEN TXBE GOES HMIGH AGAIN, THE USYRT IS RESET.
ALL REGISTERS ARE AGAIN READ AND CHECKED.
THIS TEST WILL GO NO FURTHER INTO THE TRANSMIT SEQUENCE SO THAT ONLY
ONE MARK AND THREE SYNCS (226,226,125 FROM TXDB) ARE TRANSMITTED.
ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN THE
SEQUENCE.

:¢
s«
;¢

-- BCP TX RESET W/IDLE

H 0880008002002 0000000000

E1ll

PAGE 80

i¢«

ASSERTED TO ENABLE THE TRANSMITTER LOGIC.
THEN, TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE OBSERVING
TXA -- IT SHOUWD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.

AFTER

THE RECEIVER IS SYNCHRONIZED (TWO SYNC CHARACTERS),

TXDB

:--cooo.oo.aoo..ooo.ocooo.oo.ooaoooooo.ooo.o.o.o-oooooo..oooo..o.ooooooo‘ooooo
H

- 024764

BGNTST

T15::

gg{g 024764

004737

005420

JSR

5219 024770
5220 024774
5221 024776

007400

5222 025000

004537
047626
000000
103003

JSR
RS, INITRN
;LOAD 1 SOM, CLK TX UNTIL ACTIVE
DOCMP ! IDLES!NOCHK
!SYNCH ;SET DDCMP,STRIP,IDLE,.NO CHECK,SYNCH=226
0
sUSE 8 BIT CHARS

025002

104460

5223 025002
5224 025004

025004

000136

5226 025010

004537

5229 025020
5230 025022

103003

5227 025014
5228 025016

025022

5231 025024

025024

— 025026

5233 025030
5234 025034
5235 025036

000226
000007

s INIT DMV-11, ENTER M-LOOP

B8CC

.+8.

1BR IF NO ERROR

ESCAPE

TST

1SKIP TO END OF

ERROR

104410

— 025006

PC, INIDMV

;REPORT STACKED ERROR
TEST

007676

104410

JSR

RS, TXCHAR

;LOAD 2ND SYNCH,

B8CC
ERROR

.+8.

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

sSKIP TO END OF TEST

SYNCH
7.

TRAP

CS$ESCAPE

TRAP

C$ERROR

TRAP

CSESCAPE

.WMORD

007676

JSR
125
8.

RS, TXCHAR

L10046-.

TX 1ST SYNCH

000116

004537

C$ERROR

.WORD

104460

000125
000010

TRAP

;LOAD 125, TX 2ND SYNCH

L10046-.

CNDMCAO DMVl LINE UNIT DIAGL
TEST

-- BCP TX RESET W/IDLE

5236 025040
5237 025042
025042
5238 025044
025044
025046
5239
5240 025050
5241 025054
5242 025056
5243 025060
5244 025062
025062
5245 025064
025064
025066

025070
025074
025076

025100
025100
025102
025102
025104

5266

MACRO M1200

22 FEB-84

104460
104410
000076
007676

104460
104410
000056
004537

000000

011364

104460

104410
000040
004537
000125

025130
025134
025136
025136
025140
025140
025142
025144
025144
025144

004537
103003

.+8.

ESCAPE

TST

SEG 0135

:BR IF NO ERROR

sREPORT

STACKED ERROR

TRAP

1SKIP TO END OF TEST

JSR
377
8.
B8CC
ERROR

RS, TXCHAR

;LOAD 377,

.+8.

:BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF TEST

TRAP

;REPORT STACKED ERROR

R5,RCV1ST

:CLOCK AND RCV 125

B8CC
ERROR

.+8.

:BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF TEST

RS ,RXCHAR

CS$ERROR
C$ESCAPE

. WORD

L10046
-,

TRAP

C$ERROR

TRAP
. WORD

L10046
-.

TRAP

CSERROR

TRAP

CS$ESCAPE

125

JSR

JSR
125

010110

sREPORT STACKED ERROR

;READ AND CHECK FOR TXDB

CSESCAPE

L10046-.

125 SYNC

103003

a.
8CC

.+8.

ESCAPE

TST

ERROR

104460
104410
000016

005126

JSR
8CC
ERROR

104460

RS,RSTCHK
.+8,

ESCAPE TST

104410

104401

80-1

.WORD

000000
000010

000002

8CC
ERROR

103003

025106
025112
025114
025116
025120
025122
025122
025124
025124
025126

PAGE

103003

004537
000377
000010
103003

15:31

Fil

ENDTST

:BR IF NO ERROR

sREPORT STACKED ERROR

:SKIP TO END OF TEST

sRESET USYRT/VERIFY SAME
:BR IF NO ERROR
:REPORT STACKED ERROR

:SKIP TO END OF TEST

L10046:

TRAP

CS$ERROR

TRAP

.WORD

CS$ESCAPE
L10046-.

TRAP

C$ERROR

TRAP

.WORD

CSESCAPE
L10046-.

TRAP

CSETST

CNDMCAO DMV11 LINE UNIT
TEST

BCP

DIAGL

MACRO M1200

TX UNDERRUN W/TSOM

22 FEB-84

G11

15:31

PAGE 81

SEG 0136

TERMINATION

5284

.SBTTL

TEST

-- BCP TX UNDERRUN W/TSOM TERMINATION

(0100 00AAACARAAANRRAAAAARARALAARAAANSAAEARRAIANACEAARRRAANLEEA0AREA0RRSSGS

i
i#
:+*
i«
:#

THE
USYRT
CONTROLLED
HAVE BEEN
USYRT,

IS INITIALIZED FOR BCP WITH IDLE = 1 AND TXC IS MANUALLY
WUNTIL
TWO SYNC CHARACTERS AND ONE DATA CHARACTER (000)
TRANSMITTED.
AT
THIS TIME WHEN TXBE IS ASSERTED By THE

CONDITION.

DATA

TXU

AND

ASSERTIONS.

LOADED

TERR

ARE

FORCING

UNDER RUN

CHECKED BOTH BEFORE AND AFTER THEIR

i«
:¢

SHOULD BE
THE MARK CHARACTER) HAS BEEN STARTED, IDLE IS SET TO O.
THIS SHOUWLD FORCE THE NEXT NON-DATA CHARACTER TO BE A SYNC CHARACTER

$ -~

IS BEING

TRANSMITTED,

(WHICH

ASSERTED (CLEARING TXU AND TERR) -- IDLE IS LEFT AT O. TXBE IS THEN
CYCLED
THROUGH AT LEAST ONE MORE SYNC CHARACTER AND THE TEST IS
ABORTED. ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS

CHARACTER

s
:¢«
i#

THE

SYNC

NON-DATA

FROM

THIS

FIRST

;¢

WITHIN

WHILE

THE

TXDB

EXPECTED

S/AR.

AFTER

INTO

025146

TEST 16 -- BCP TX UNDERRUN W/TSOM TERMINATION

TSOM

SEQUENCE

NOTE: BITS SHIFT OUT OF TX LSB FIRST.
288828288000 8000208000000 8040428000000400000280004800000400800000000000000000

BGNTST

004737

005420

JSR

5287
5288
5289
5290
5291

004537
047626
040000
103003

007400

JSR
RS, INITRN
DDCMP ! IDLES !NOCHK ! SYNCH
NORXEN
B8CC
.+8.
ERROR

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
;SET DDCMP,STRIP,IDLE
,NO CHECK,SYNCH=226
;USE 8 BIT CHARS, RECEIVER DISABLED
:BR IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

TST

;SKIP TO END OF

JSR
0
B8CC
ERROR

RS,CHKTSO

ESCAPE

TST

;CHECK 1ST BIT OF EXPECTED "SYNCH”
:+ CHARACTER (SHOUWLD BE 0)
;BR IF NO ERROR
sREPORT STACKED ERROR
TRAP
sAND EXIT TEST
TRAP
.WORD

JSR
- "
151
BCC
ERROR

RS,SERIAL

ESCAPE

TST

025152
025156
025160
025162
025164
025164

S292 025166
025166
— 025170
5294
5295
5296
5297

104410
000462

025172
025176
025200
025202
025202
5298 025204
025204
025206

004537
000000
103003

5300 025210
5301 025214
5302 025216

004537
000007
000151

5303 025220
5304 025222
025222
5305 025224
025224

104460

007116

104460
104410
000444
007256

103003

104460
104410

306 025226

000424

5307 025230

004537

PC, INIDMV

T16::

55332 025146

.+8.

;sINIT DMV-11, ENTER M-LOOP

TEST

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10047 -,

JSR

R5,WRITEI

C$ESCAPE
L10047-.

;READ REMAINING 7 BITS OF "SYNCH"” CHARACTER
: (OFF OF TSO BIT)
: EXPECTED BIT SEQUENCE (0010110)
;BR IF NO ERROR
sREPORT STACKED ERROR
TRAP
CSERROR
;AND EXIT TEST
TRAP
CSESCAPE

.WORD

003734

CS$ERROR

:LOAD 1ST DATA CHARACTER (000)

L10047 -,

CNDMCAQ DMV11l LINE UNIT DIAGL
TEST

5308
5309
5310
5311
5312
5313
5314

MACRO M1200

22-FEB-84

15:31

PAGE

81-1

SEG 0137

-~ BCP TX UNDERRUN W/TSOM TERMINATION
025234
025236

120402
000000

025240

004537
000000
000000

010010

JSR
000
0

RS, TXCTRL

:CLEAR TSOM

025250
025254
025256
025260
025262
025262
5320 025264
025264
025266
5321
5322
5323
5324 025270
5325 025274
5326 025276
5327 025300
025300
5328 025302
025302
025304
5329
5330 025306
5331 025312
5332 025314
5333 025316
5334 025324
5335 025326

004537
000010
000151
103003

007256

JSR
8.
151
8CC
ERROR

RS5,SERIAL

sREAD 2ND SYNCH CHARACTER VIA

.+8,

: 8 BIT CHAR/CLOCK TICKS
+ EXPECTED BIT SEQUENCE (010010110)
:BR _IF NO ERROR

ESCAPE

TST

sAND EXIT TEST

JSR

RS,CKUSTS

s+CHECK USYRT STATUS

BCC

.+8.

:BR IF NO ERROR

ESCAPE

TST

025326
025330
025332
025334
5336 025336
025336
025340
5337
5338
5339
5340
5341
5342
5343
5344

104455
000061
014357
017722

025244
025246

5315
5316
5317
5318
5319

5345
5346
5347
5348

TOSRL

000

104460
104410
000364

004537
000114
103003

005432

TXACT!TBMT!TSO

ERROR

104460
104410
000346
004537
120403
000000

133727

001406

003610

025314

FOR TRANSMITTER ACTIVE

C$ERROR
CS$ESCAPE
L10047
-,

(NO

TXU

;sREPORT STACKED ERROR

:SKIP TO END OF TEST

YET!)

TRAP

CSERROR

TRAP

CS$ESCAPE
L10047-,

000200

10%:

JSR
TOSRH

RS,READI

;GET TX ERROR BIT (TO SEE IF SET)

BITB
BEQ
GEDF

108,08177
15¢
EM98,ERR12

:+ TDSRH STORED HERE
:CHECK TERR BIT
: BR IF TERR NOT SET
sREPORT ERROR: "TERR NOT CLEAR"
“DEVICE FATAL"” ERROR & ‘?RAP
5

ESCAPE

TST

sAND EXIT TEST

000

TERR BIT IS IN TDSRH

CSESCAPE
L10047-.

007256

BCC
ERROR

.+8.

sREAD DATA CHARACTER (000) VIA TSO
;+ 8 BIT CHAR/CLOCK TICKS
s+ EXPECTED BIT SEQUENCE (00000000)
:BR_IF NO ERROR

ESCAPE

TST

+AND EXIT TEST

JSR

000

104460

104410
000272
004537
000001

STACKED ERROR

.WORD

104410
000312

004537
000010
000000
103003

sREPORT

TSO

RS.SERIAL

sREPORT STACKED ERROR

TRAP

CSERROR

TRAP

CS$ESCAPE
L10047
-,

.WORD

011614

JSR
1

RS,STEPLU

:GENERATE 1 TICK TO UNDERRUN TX

CNDMCAO DMV11l LINE UNIT
TEST

DIAGL

MACRO M1200

22-FEB-84 15:31

PAGE'81-2

SEQ 0138

BCFP TX UNDERRUN W/TSOM TERMINATION

5349
5350 025370
5351 025374
5352 025376
5353 025400
025400
5354 025402
025402
025404
5355
5356 025406
5357 025412
5358 025414
5359 025416
025424
5361 025426

004537
000116

005432

JSR
RS,CKUSTS
TBMT!TSO!TXACT!
TXU

103003

104410

FOR

TBMT

AND

B8CC

.+8.

1BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF

ERROR

104460

sCHECK USYRT STATUS

:REPORT

UNDERRUN

STACKED ERROR

TRAP

TEST

TRAP

000246

004537
120403
000000
133727
001006

.WORD
003610

025414

200200

:
20§

JSR

RS ,READI

BITB
BNE
GEDF

208 ,081I77
25%
EM99,ERR12

TDSRH
000

104455

000062
014404
017722

ESCAPE

104410
000212

004537

000001

:+ TDSRH STORED HERE
s:CHECK TERR BIT
: BR IF TERR IS SET
sREPORT ERROR:

"TERR NOT

007116

104460
104410
000174

007256

SET”

"DEVICE FATAL” ERROR @ S0

TRAP

:AND EXIT TEST

.WORD
. WORC
.WORD

TRAP

104410
000154

RS,CHKTSO

8CC
ERROR

.+8,

+ CHARACTER (BIT SHOUWLD=1)
1BR_IF NO ERROR

ESCAPE

TST

:AND EXIT

#SR

RS,SERIAL

177
8CC

sREAD MARK CHARACTER VIA TSO
s+ 7 BIT CHAR/CLOCK TICKS

.+8.

:8F° IF NO ERROR

ESCAPE

TST

;REPORT

TEST

CS$ERROR

TRAP
. WORD

CS$ESCAPE
L10047-.

EXPECTED BIT SEQUENCE (1111111)

sREPORT STACKED ERROR

:AND EXIT TEST

003734

RS.WRITEI
PCSARH
PROTO!XYZ

:SET IDLE BIT=0

004537
000010
000377
103003

007256

gSR

+READ MARK CHARACTER VIA TSO
:+ 8 BIT CHAR/CLOCK TICKS
+ EXPECTED BIT SEQUENCE (11111111)

377

.+8,

CSESCAPE
L10047
-,

TRAP

004537
120405
000107

8CC
ERROR

EM99
ERR12

STACKED ERROR

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

RS,SERIAL

CS$ERDF
S0

:CHECK 1ST BIT OF EXPECTED "MARK"

iSR

ERROR

104460

CSESCAPE

1.10047
-,

IF SET)

.WORD

103003

004537
000007
000177
103003

TST

;GET TX ERROR BIT (TO SEE
s+ TERR BIT IS IN TDSRH

CS$ERROR

:BR IF NO ERROR

;REPORT STACKED ERROR

CSERROR
CS$ESCAPE
L10047-,

CNDMCAO OMV1l LINE UNIT DIAGL
TEST

025550
025554
025556

5416

22-FEB-84

15:31

PAGE

J11
81-3

025560
025564
025566
025570
025570
025572
025572
025574

104460

ESCAPE

104410
000124
004537
000010
000151
103003

gSR

007256

151

5418
5419

TRAP

010010

004537

005432

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

:AND EXIT TEST

TRAP

CS$ERROR

TRAP

CS$ESCAPE
L10047-.

JSR

RS, TXCTRL

JSR

RS,CKUSTS

:CHECK USYRT STATUS
s+ FOR TRANSMITTER ACTIVE (NO TXU YET!)
:BR IF NO ERROR
+REPORT STACKED ERROR

TST

:SKIP TO END OF TEST

TXACT!TSO

103003

ERROR

104460

ESCAPE

104410
000056

ASSERT

TSOM (SHOULD CLEAR

TXU,TERR)

TRAP

CS$ERROR

TRAP

CSESCAPE
L10047
-,

.WORD

JSR

003610
025604

000200

17%:

TDSRH
000

BITB
BEQ
GEDF

RS,.READI

17%,08177
18¢
EM98,ERR12

000063
014357
017722

:GET TX ERROR BIT (TO SEE IF SET)
:

TERR BIT

IS IN TDSRH

:+ TOSRH STORED HERE
:CHECK TERR BIT

:+ BR IF TERR NOT SET
;:REPORT ERROR: “TERR NOT CLEAR"

“DEVICE FATAL” ERROR ¢ 51

TRAP
.WORD

.WORD

ESCAPE

104410
000022

TST

C$ESCAPE

L10047-.

EXPECTED BIT SEQUENCE (010010110)

.+8,

TSOM
0

CS$ERROR

sREAD SYNCH CHARACTER VIA TSO
:+ 8 BIT CHAR/CLOCK TICKS

.WORD

004537

004537
120403
000000
133727
001406

RS,SERIAL

B8CC

ERROR

104410
000104

000014

TRAP

sAND EXIT TEST

.WORD

104460

000001
000000

TST

104455

5417

SEG 0139

BCP TX UNDERRUN W/TSOM TERMINATION

025522
5390 025524
025524
025526
5391
5392 025530
5393 025534
5394 025536
5395 025540
5396 025542
025542
5397 025544
025544
025546

5410

MACRO M1200

:AND EXIT TEST

CSERDF
S1

EM98

ERR12

CSESCAPE
L10047-.

READ/CHECK FOR SYNCH CHARACTER
.....................................................................

5421
5422
5423
5424
5425
5426
5427

004537

000010
000151
103003

007256

gsa

151

104460
104410

000002

ENDTST

RS, SERIAL

8CC
ERROR

ESCAPE

TST

sREAD !SYNCH! CHARACTER VIA TSO
:+ 8 BIT CHAR/CLOCK TICKS
s+ EXPECTED BIT SEQUENCE (10010110)
1BR_IF NO ERROR
sREPORT STACKED ERROR
:AND EXIT TEST

TRAP

CSERROR

TRAP
. WORD

CSESCAPE
L10047-.

CNDMCAOC DMV11 LINE UNIT DIAGL
TEST

BCP

025652
025652

MACRO M1200

22-FEB-84 15:31

<11

PAGE 81-4

SEQ 0140

TX UNDERRUN W/TSOM TERMINATION

104401

L10047:

TRAP

CSETST

CNDMCAO DMV11 LINE UNIT DIAGL
TEST

MACRO M1200

22-FEB-84

L11

15:31

PAGE 82

SEQ 0141

BCF TX UNDERRUN W/RESET TERMINATION

5443

.SBTTL

TEST

-- BCP TX UNDERRUN W/RESET

FHRARRRRARRA R AR R

RRAARR AR AR AR AR AR

AR LR

TERMINATION

AR AL AR 200220044080 40000000000000040

TEST 17

-- BCP TX UNDERRUN W/RESET

USYRT

IS INITIALIZED FOR BCP WITH IDLE

THE

TERMINATION
=

1 AND TXC IS MANUALLY

FORCE

i
:#
:*

THE

IMMEDIATELY

AFTER

025654

THIS

SYNC

CHARACTER

HAS

SYNC

CHARACTER.

BEING TRANSMITTED,

PROGRAM RESET IS ISSUED AND ALL REGISTERS ARE CHECKED. ERROR
THE FIRST ERROR OCCURS WITHIN THE
LOOPING WILL DEPEND ON WHERE
SEQUENCE.

$ -2 5288050404000

NON-DATA

A AR AR AR AL AR AR AR

R AR R0 A A AR08 220000000400 0000040000

BGNTST

T17:3

025654

004737

005420

JSR

025660

004537
047626

007400

JSR
RS, INITRN
DDCMP ! IDLES !NOCHK ! SYNCH
NORXEN
BCC
.+8.
ERROR

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
:SET DDCMP,STRIP, IDLE,NO CHECK,SYNCH=226

ESCAPE

:SKIP TO END OF TEST

025666
025670
025672
025672
025674
025674
025676

025700

025704

025706
025710
025710
5457 025712
025712

025714

5458
5459 025716
025722
5461 025724
025726
5463 025730
025730
025732
025732
025734
5465
025736
5467 025742
025744

103003
104460
104410
000354
004537
000000
103003

007116

JSR

0
8CC
ERROR

ESCAPE

104410
000336

tUSE 8 BIT CHARS, RECEIVER DISABLED

:BR_IF NO ERROR
sREPORT STACKED ERROR

;

TRAP
TRAP

RS,CHKTSO
.+8.
TST

007256

._;SR

151

104410
000316

RS,SERIAL

BCC
ERROR

ESCAPE

TST

JSR
TDSRL
000

RS,WRITEI

CS$ESCAPE

L10050-.

s+ CHARACTER (SHOUWLD BE 0)

:BR _IF NO ERROR

+REPORT STACKED ERROR

sAND EXIT TEST

TRAP
TRAP

CS$ERROR
CS$ESCAPE

L10050-.

:READ REMAINING 7 BITS OF “SYNCH" CHARACTER
+ (OFF OF TSO BIT)
+ EXPECTED BIT SEQUENCE (0010110)
:BR_IF NO ERROR

;REPORT STACKED ERROR

sAND EXIT TEST

TRAP
TRAP

.WORD

003734

C$ERROR

sCHECK 1ST BIT OF EXPECTED “SYNCH"

.WORD

000151
103003

004537
120402

TST

s INIT DMV-11, ENTER M-LOOP

.WORD

104460

004537

PC,INIDMV

tLOAD 1ST DATA CHARACTER (000)

CS$ERROR
CS$ESCAPE

L10050-.

CNDMCAO DMV11 LINE UNIT DIAGL
TEST

MACRO M1200

BCP TX UNDERRUN W/RESET

22-FEB-84 15:31

M11
PAGE 82-1

SEQ 0142

TERMINATION

5469
5470 025746
5471 025752
;;g 025754

004537
000000
000000

010010

JSR
000
0

RS, TXCTRL

;+CLEAR TSOM

5474 025756
5475 025762

004537
000010

007256

JSR
8.

R5,SERIAL

tREAD 2ND SYNCH CHARACTER VIA
:+ 8 BIT CHAR/CLOCK TICKS

5476 025764
5477 025766

5478 025770
025770
5479 025772
025772
— 025774

000151
103003

.+8.

: EXPECTED BIT SEQUENCE
:BR_IF NO ERROR

ESCAPE

:AND EXIT TEST

ERROR

104460
104410
000256

;gg

(010010110)

;REPORT STACKED ERROR

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10050-.

z VERIFY THAT TXU AND TERR BITS ARE ZERO AT THIS POINT
8

5483 025776
5484 026002
5485 026004

5486 026006

026006
5487 026010
026010
—— 026012
5489
5490
5491
5492
5493
5494

151
8CC

TSO

004537
000114
103003

026034
026036
026040
026042

104455
000064
014357
017722

003610
026022

000200

10%:

:CHECK USYRT STATUS

i FOR TRANSMITTER ACTIVE (NO TXU YET!)
:BR_IF NO ERROR

ESCAPE

TST

:SKIP TO END OF

JSR
TDSRH
000
8ITB
BEQ
GEDF

R5,READI

:GET TX ERROR BIT (TO SEE IF SET)
:+ TERR BIT IS IN TDSRH
+ TDSRH STORED HERE
sCHECK TERR BIT
:+ BR IF TERR NOT SET
;REPORT ERROR: “TERR NOT CLEAR”

104 ,08IT7
15$
EM98,ERR12

sREPORT STACKED ERROR

ESCAPE

104410

TST

TEST

TRAP

CS$ERROR

TRAP
.WORD

C$ESCAPE
L10050-.

“DEVICE FATAL" ERROR @ S2

:AND EXIT TEST

000204

TRAP
.WORD
.WORD
.WORD

CSERDF
S2
EM98
ERR12

TRAP

CSESCAPE

.WORD

gg;
5499
5500
5501
5502
5503

RS5,CKUSTS

TXACT!TBMT!TSO
8CC
.+8.

ERROR

104410
000240
004537
120403
000000
133727
001406

2006 026046

JSR

104460

026014
026020
026022
026024
026032
026034

5495 026044
026044

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

005432

L10050-.

:+ NOW READ 1ST DATA CHARACTER (AND CHECK TERR=1,TXU=1)

026050
026054
026056
026060
026062
026062
5504 026064
026064

004537
000010
000000
103003

007256

9308 026066

000164

5506 026070
.'53558; 026074

004537
000001

011614

JSR
1

RS,STEPLV

:GENERATE 1 TICK TO {UNDERRUN TX

5509 026076

004537

005432

JSR

R5,CKUSTS

:CHECK USYRT STATUS

104460
104410

15¢:

JSR
8.
000
B8CC
ERROR

RS,SERIAL

ESCAPE

TST

.+8.

sREAD DATA CHARACTER (000) VIA TSO
+ 8 BIT CHAR/CLOCK TICKS
+ EXPECTED BIT SEQUENCE (00000000)
:BR_IF NO ERROR
;REPORT STACKED ERROR
TRAP
:AND EXIT TEST
TRAP

.WORD

CS$ERROR
CSESCAPE

L10050-.

CNDMCAO DMV11l LINE UNIT DIAGL
TEST

MACRO M1200

22-FEB-84

15:31

N11

PAGE 82-2

SEQ 0143

-- BCP TX UNDERRUN W/RESET TERMINATION

5510 026102
5511 026104
5512 026106
026106
5513 026110

026110
026112

5514
5515 026114
5516 026120
5517 026122
5518 026124
5519 026132
5520 026134

026134
026136
026140
026142
5521 026144
026144
026146
5522
5523
5524
5525 026150
3526 026154
5527 026156
5528
5529 026160
026164
5531 026166
5532 026170
026170
5533 026172
026172
026174

000116

TBMT!TSO! TXACT!TXV

103003

104460
104410
000140
004537
120403
000000
133727
001006

8CC
ERROR

.+8.

i FOR TBMT AND TX UNDERRUN
+BR IF NO ERROR
+REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

TRAP

C$ERROR

TRAP

C$ESCAPE
L10050-.

. WORD

003610

026122

104455
000065
014404
017722

000200

20¢:

JSR
TDSRH
000
BITB
BNE
GEDF

ESCAPE

104410
000104

RS,READI

208 ,48BIT7

254
EM99,ERR12

TST

:GET TX ERROR BIT (TO SEE IF SET)

:+ TERR BIT IS IN TDSRH
+ TOSRH STORED HERE
:CHECK TERR BIT
:

BR IF TERR IS SET

+REPORT ERROR:

"“TERR NOT SET"

“DEVICE FATAL" ERROR # 53

TRAP

:AND EXIT TEST

.WORD
.WORD
.WORD

TRAP
.WORD

CS$ESCAPE
L10050-.

B
I
e
e
TR

004537
120405
000107

003734

004537
000001
103003

007116

104460
104410
000056
004537
000007
000177
103003

007256

104460

BIT6!BIT2!BIT1!BITO

:DDCMP FORMAT, NO ERROR CHECKING

iSR

RS,CHKTSO

sCHECK 1ST BIT OF EXPECTED "“MARK"

BCC
ERROR

.+8.

:BR_IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

sAND EXIT TEST

#SR

177

CHARACTER (BIT SHOULD=1)

TRAP

C$ERROR

TRAP

CS$ESCAPE
L10050-.

007256

RS,SERIAL

+READ MARK CHARACTER VIA TSO

7 BIT CHAR/CLOCK TICKS

+ EXPECTED BIT SEQUENCE (1111111)

B8CC

.+8.

ESCAPE

TST

:AND EXIT TEST

gSR

RS,SERIAL

+READ SYNCH CHARACTER VIA TSO
:+ 8 BIT CHAR/CLOCK TICKS
+ EXPECTED BIT SEQUENCE (00000000)

ERROR

104410
000036

103003

RS,WRITEI

.WORD

104460

004537
000010
000151

:CLEAR IDLE BIT

JSR
PCSARH

151

B8CC

ERROR

.+8.

:BR _IF NO ERROR

:REPORT STACKED ERROR

C$ERROR
CS$ESCAPE
L10050-.

:BR_IF NO ERROR

+REPORT STACKED ERROR

TRAP

CS$ERROR

CNDMCAO DMv1l LINE UNIT DIAGL
TEST

BCP

5550 026232

TX UNDERRUN W/RESET

026232

104410

5552 026236
5553 026242
5554 026244
026244
5555 026246
026246
026250
5556 026252
026252
026252

004537
103003

5551 P

MACRO M1200

22 FEB-84

104401

PAGE 82 3

SEG 0Ol44

TERMINATION

ESCAPE

TST

{AND EXIT TEST

.
005126

104460
104410
000002

15:31

1)
B1.2

ENDTST

JSR
8CC
ERROR

RS,RSTCHK
.+8,

sRESET USTYRT/VERIFY SAME
tBR IF NO ERROR
sREPORT STACKED ERROK

ESCAPE

7ST

:SKIP

TO END OF

TEST

L10050:

TRAP

.WORD

L100S0-.

CSESCAPE

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10050-.

TRAP

CSETST

CNDMCAQ DMV11 LINE UNIT DIAGL
TEST

BCF

TXx DISABLE

MACRO M1200

22 FEB-84

15:31

5 ¥,

PAGE 83

SEG 014S

TEST

5568

.SBTTL

TEST

-- BCP TXx DISABLE TEST

3008000000000 00000000000008000000000000000002400000000080000000000000000000000s

TEST 18 -- BCP TX DISABLE TEST

i
s«

THE

USYRT

SECOND

DATA

INITIALIZED FOR BCP

CHARACTER

AND A MESSAGE

STARTED.

ONCE

IS LOADED INTO TXDB TXE IS DROPPED.

TxS0 IS

WATCHED

t¢
:¢

WHEN
IT
IS, THE USYRT SHOULD DROP TXA AND STOP TRANSMITTING
LAST CHARACTER LOADED INTO TXDB SHOUWLD BE LOST.

TO ASSURE

THAT

CHARACTERS LOADED:

THE

CHARACTER BEING

TRANSMITTED

THE

IS COMPLETED.

THE

125 252

CHARACTERS TRANSMITTED:

125

$--000000000000000000000000000000000000000000000000000000000000080000000000000

— 026254

BGNTST

T18::

gg?’g 026254

004737

005420

JSR

5572 026260
5573 026264

004537
043626

007400

JSR
RS, INITRN
DDCMP !NOCHK ! SYNCH

5574 026266
5575 026270
5576 026272

026272

000000
103003

S577 026274
026274
578 026276

104410
000162

5579 026300
5580 026304

004537
000001

010010

004537

010010

ggé 026306
5583 026310

5584 026314

000007

000000

gg:z 026316

00C000

5587
5588
5589
5590
5591

026320
026324
026326
026330
026332
026332
5592 026334
026334
— 026336

004537
000125
000010
103003

5594 026340
5595 026344
5596 026346

004537
000252
000000

5597 026350

5598 026352
026352
5599 026354

;USE 8 BIT CHARS
1BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

;SKIP TO END OF

JSR
TSOM

RS, TXCTRL

sOUTPUT 1ST SYNC CHARACTER
sAND KNOCK DOWN TBMT

JSR

RS, TXCTRL

sCLEAR TSOM (GET READY TO SEND DATA)

JSR
125
8.
8CC
ERROR

RS, TXCHAR

;LOAD 125,

.+8.

1BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

;SKIP TO END OF

JSR
252
0
8CC
ERROR

RS, TXCHAR

1LOAD 252

.+8,

1BR IF NO ERROR

ESCAPE

TST

1SKIP TO END OF

TEST

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10051-.

000

0
007676

104410
000122

104460

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
1SET DDCMP,NO CHECK,SYNCH=226

.+8,

104460

103003

s INIT DMV-11, ENTER M-LOOP

0
8CC

ERROR

104460

PC.,INIDMY

007676

TX 2ND SYNCH

TEST

sREPORT STACKED ERROR
TEST

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L100S51-.

TRAP

CS$ERROR

DMVL1 LINE UNIT

BCP TX DISABLE

MACRO M1200

2o FEB-84

15:3%1

PAGE

”3

SEG 0146

TEST

026354
026356

104410
000102

026360
026364
026366

004537
120000
000102

003734

JSR
RS,WRITEI
VIAORS
RXEN!TTLOOP

;DROP TRANSMIT ENABLE

026370
026374

004537
000007

011614

RS,STEPLU

;CLOCK IN 125

004537

011364

gsa

RS,RCV1ST

;CLOCK AND RCV

BCC
ERROR

.+8.

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

sSKIP TO END OF

ggg

RS ,RXCHAR

;READ AND CHECK FOR 125

8.
8CC

.+8.

;AND CLOCK IN NEXT CHAR.
:BR IF NO ERROR
{REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF

JSR
377

RS,RXCHAR

;READ AND CHECK FOR 377
;es IF 252 IS READ, THEN DROPPING

026376
026402
026404

5613

DIAG1L

D12

026406
026406
026410
026410
026412

026414
026420
026422
026424
026426
026430
026430

000000

TRAP

.WORD

103003

104460
104410
000046
004537
000125
000000
000010
103003

010110

)

ERROR

104460
104410
010110

000000
000010
103003

104410
000002
104401

. 8.

ESCAPE

TST

ERROR

104460

ENDTST

;o6

BCC

.10051-.

(TXE)

125
e

TEST

TRAP
.WORD

TEST

TRAP
. WORD

000024

004537
000377

CS$ESCAPE

TXEN DIDN'T

WORK

CSESCAPE
L10051-.

CSERROR

CS$ESCAPE
L10051-.

!1!¢

:BR IF NO ERROR ssss

;REPORT STACKED ERROR ssss
sSKIP TO END OF

CSERROR

TEST sses

L10051:

CSERROR

TRAP

.WORD

CSESCAPE
L10051-.

TRAP

CSETST

CNDMCAQ DMV1l LINE UNIT DIAGL
TEST

MACRO M1200

FIFO STACKING CHARACTERS

22-FEB-84

PAGE

SEQ 0147

TEST

.SBTTL

5644

15:31

TEST

19 -- FIFO STACKING CHARACTERS TEST

1008888808800 800000 00000000 ARRARRRRARRRARRRRAARARRRARRRALSLNRARRRRERRARRRALSS

TEST

;¢

-- FIFO SIACKING CHARACTERS TEST

THE USYRT IS SETUP FOR BCP MODE WITH NO ERROR DETECTION.
THIS TEST BEGINS BY SYNCHRONIZING THE RECEIVER AND THEN PROCEEDS

TO FILL

THE 8 CHARACTER RECEIVER FIFO WITH THE CHARACTERS:

1/2(SYNCH),000,377,125,252,347,030,303,1/2(074).

THESE CHARACTERS ARE THEN READ OFF OF

THE FIFO AND CHECKED.

NOTE

:# THAT NO CLOCKS ARE PROVIDED WHEN RECEIVING THE
CHARACTERS SINCE THEY
i e GSE SUS?LIED BY THE FIFO SUPPORT LOGIC IN GROUPS OF 4 TICKS (WHEN
1.

= 0).

ALSO NOTE THAT DUE TO FIFO TIMING,

TWO ‘HALF CHARACTERS'

i INTO THE FIFO (THE 1ST AND LAST CHARACTERS).

ARE LOADED

$--888202884840 0484000802000 802882008048800088000000880884000880000000048000000000s

BGNTST

026462
026462

JSR

005420

026466
026472
026474
026476
026500
026500
026502
026502
026504

007400

026506
026512

010010

PC, INIDMV

;INIT DMV-11, ENTER M-LOOP

JSR
RS, INITRN
DDCMP !NOCHK ! SYNCH
0
BCC
. +8.
ERROR

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
:SET DDCMP,NO CHECK,SYNCH=226
;USE 8 BIT CHARS
;BR IF NO ERROR
;REPORT STACKED ERROR
e

ESCAPE

1SKIP TO END OF TEST

TST

TRAP

.WORD

026514
026516
026522
026524

010010

JSR
;son

RS, TXCTRL

JSR

RS, TXCTRL

000
0

;OUTPUT
:
-

C$ERROR
CSESCAPE
L10052-.

1ST SYNC CHARACTERS

;CLEAR TSOM

: FILL THE FIFO WITH CHARACTERS (DATA1l - DATA8)
026526
026532

012702
112237

026724
026542

026536
026542
026544
026546
026550
026550
026552
026552
026554

004537
000000
100010
103003

007676

026556

022702

104460

104410

MOV

@TXTBL3.R2

10$:

000

JSR

RS, TXCHAR

MOVB

(R2)+,10$

NCTBMT#256. !8.
BCC
ERROR

L8,

ESCAPE

TST

'SET UP TABLE POINTER

:SETUP TRANSMIT CHARACTER

; TRANSMIT A CHARACTER

;44 HOLE FOR NEXT TX CHARACTER

iNO CHECK OF INITIAL TBMT=0
;B8R IF NO ERROR
{REPORT STACKED ERROR
:SKIP TO END OF TEST

s
TRAP

.WORD

000146

026736

cMP

OTXEND3,R2

CS$ERROR

CSESCAPE
L10052-.

CNDMCAOQ DMVl LINE UNIT DIAG1
TEST

FIFO

5674 026562
5675
5676 026564
5677 026570
5678

STACKING

CHARACTERS

004537
000005

011614

PAGE

SEG 0143

JSR

RS,STEPLV

)

+ADD A FEW TX

TICKS

s+ FILL UP FIFO.

TO COMPLETELY

I
L
e
T

: THE FIFO IS NOW FULL OF CHARACTERS.
: NOW READ/VERIFY THEM,

012702
112237

026724
026606

004537

010110

15%:
20$:

MOV

@TXTBL3,R2

(R2)+,20%

:SETUP EXPECTED CHARACTER

JSR
000
0
NOCRDA

RS ,RXCHAR

sREAD € CHK CHARACTER

MOvB

104410
000100

:SET UP

TABLE POINTER

s+ HOLE FOR EXPECTED RECEIVE CHAR.
:

8CC

.+8.

ESCAPE

TST

sNO INITIAL CHECK OF RDA=0
:BR

IF NO ERROR

;REPORT STACKED ERROR

ERROR

104460

;SKIP

TO END OF

TEST

022702
001362

026734

CMP
BNE

@TXEND3-2,R2

004537
000015

011614

JSR
15

RS,STEPLV

;CLOCK

004537
000303
000000
100000
103003

010110

JSR
303
0
NOCRDA
8CC
ERROR

RS ,RXCHAR

;READ &€ CHK CHARACTER

ESCAPE

TST

104410
000042

004537
000074
000000
100000
103003

010110

104460
104410
000020

004537
000010
103003
104460

104410

TRAP

C$ERROR

TRAP

C$ESCAPE
L10052-.

.WORD

104460

5719

15:31

BNE

100000
103003

5716
S717
5718

22 -FFB-84

TEST

001363

000000
000000

5714

MACRO M1200

F12

15¢

.+8.

IN LAST FEW CHARACTERS OFF

OF FIFO.

;sNO INITIAL CHECK OF RDA=0
:BR IF NO ERROR

;REPORT STACKED ERROR

sSKIP TO END OF

JSR
074
0
NOCRDA
8CC
ERROR

RS ,RXCHAR

ESCAPE

TST

.+8.

TEST

TRAP
TRAP

JSR
8.

L10052-.

TRAP

CS$ERROR

TRAP

CSESCAPE

TRAP

CSERROR

TRAP

CS$ESCAPE

;REA) &€ CHK CHARACTER

:NO INITIAL CHECK OF RDA=0

RS,.ENDTRN

8CC

.+8.

ESCAPE

TST

ERROR

CS$ESCAPE

.WORD

;BR IF NO ERROR

;sREPORT STACKED ERROR
:SKIP TO END OF

TEST

.WORD

011532

CS$ERROR

:1SHUT DOWN TRANSMITTER, RECEIVER
;:BR IF NO ERROR

;REPORT
;SKIP

STACKED ERROR

TO END OF

TEST

CNDMCAO DMVl LINE UNIT

TEST

DIAGL

MACRO M1200

22 FFB-84

15:31

000002

84 2

ENDTST

SEG 0149

L10052:

104401
Jorscabsnsscnnneness

5722 026724
5723 026725
5724 026726
5725 026727
5726 026730
5727 026731
5728 026732
5729 026733
5730 026734
5731 026735
5732 026736

5734

G12

FIFO STACKING CHARACTERS TEST

026720
5720 026722
026722
— 026722

5733

PAGE

226
226
000
377
125
252
347
030
303
074
000

TXTBL3:

TXEND3:

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

.EVEN

Keewansonss

226
226
000
377
125
252
347
030
303
074
000

o S

: SYNCH
s SYNCH

.WORD

L10052-.

TRAP

CSETST

CNDMCAQ DMV11 LINE UNIT

DIAGL

MACRO M1200

22 FEB-84

15:31

H1Z2

PAGE 85

TEST 20 - BCP CHARACTER | ENGTH TEST
5744

T
.SBTTL

TEST 20

-- BCP CHARACTER LENGTH TEST

(0000000000000 00000000Rttttatttttttt
it titttttttssttesisntsrtstisstssibnsanisncs

TEST 20 -- BCP CHARACTER LENGTH TEST

;¢

THE

:*
:¢
:#

CONTROLLED UNTIL TWO SYNC CHARACTERS HAVE BEEN TRANSMITTED.
THEN 3
SUBTESTS FOLLOW, EACH ONE USING A DIFFERENT TRANSMIT CHARACTER LENGTH
STARTING AT FIVE (5) AND ENDING WITH SEVEN (7).

USYRT

TEST

INITIALIZED FOR BCP WITH NO ERROR CHECKING.

PATTERN:

111

222

333

044

155

266

TXC

IS MANUALLY

377

1--088800000000000000000000000000000000800080008000008000000000008804003000084¢

026740
g;:z 026740

_ BGNTST

H
004737

005420

JSR

PC, INIDMV

s INIT DMV-11,

T20::
ENTER M-LOOP

R
P
P

g;:;

:
‘

5749 026744
026744
026744
5750 026746
5751 026752
5752 026754
5753 026756
S754 026760
026760

S BIT CHARACTERS

BGNSUB
104402
004537
043626
000245
103003

007400

104410
000126

S757 026766
5758 026772
5759 026774

004537
000001
000004

5761 027002
g;gg 027004

000000
000000

5764 027006

012703

027436

5767
5768
5769
S770
5771

027016
027022
027024
027026
027030
027030
5772 027032
027032
— 027034

004537
000000
000005
103003

007676

5774 027036
5775 027042

022703
001363

004537

720.1:

TRAP
csBSuUB
sLOAD 1 SOM, CLK TX UNTIL ACTIVE
:SET CHAR MODE,NO ERROR CHECKING,S/AR=226
s TXCL=RXCL=S BITS
:BR IF NO ERROR
;REPORT STACKED ERROR
TRAP
CS$ERROR

JSR
RS, INITRN
DDCMP !NOCHK ! SYNCH
BIT7!BITS!BIT2!BITO
8CC
.+8.
ERROR

104460

S755 026762
026762
— 026764

5760 026776

SUBROUTINE @ 1:

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

ESCAPE

SuB

;SKIP

TO END OF

TEST

TRAP
.WORD

010010

JSR
TSOM
q,

010010

JSR

RS, TXCTRL

;LOAD 2ND SYNCH,TX

RS, TXCTRL

;CLEAR

CS$ESCAPE
L10054-.

1ST SYNCH

TSOM

000
0
‘...--.-.--...........-...--I.-....-.---..--.......-......--...-.-.I-II

g;gz 027012

5776

112337

027022

104460

104410
000056
027447

10¢:
14:

MOV

T24TBL ,R3

JSR
000
S.
8CC
ERROR

RS, TXCHAR
.+8.

;BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SuB

;SKIP TO END OF

cMP
BNE

0T24TBL +9. ,R3
10%

sALL CHARACTERS TRANSMITTED ?
:+ IF NOT, TX ANOTHER ONE

MOVB

1SET UP DATA TABLE POINTER

(R3).,1%

s INSTALL NEXT TX CHARACTER
:

s TRANSMIT CHARACTER ( ==> RX/FIFO
;*4 HOLE FOR NEXT CHARACTER 2»

TEST

)

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10054 -,

‘lll...-....II-I-.l.--.l.II.I-I.l-.-.III-.......'I.I.‘Il.....l..l....ll

CNDMCAO DMV1l LINE UNIT DIAG1
TEST 20

5777
5778
5779
5780
5781
5782
5783

5784

5785
5786

5787

MACRO M1200

I1e
22-FEB-84

15:31

PAGE

85-1

SEQ 0151

-- BCP CHARACTER LENGTH TEST
027044
027050
027054

012703
112337
142737

027436
027066
000340

027062
027066
027070
027072
027074
027076
027076
027100
027100
027102

004537
000000
000000
100000
103003

010110

5788
5789 027104
5790 027110
5791
5792 027112
027112
027112
5793
5794
5795
5796 027114
027114
027114
5797 027116
5798 027122
5799 027124

027066

40s:

MOV
MOVB

#T24TBL ,R3
(R3)+,4$

;SET UP DATA TABLE POINTER
;INSTALL NEXT EXPECTED RX CHARACTER

JSR

RS,RXCHAR

;READ/CHECK NEXT CHARACTER

BICB

as.

800

NOCRDA

tMASK OUT UNTRANSMITTED BITS
;44 HOLE FOR NEXT

EXPECTED CHARACTER

:NO INITIAL CHECK OF RDA=0

B8CC

.+8,

ESCAPE

SUB

;SKIP TO END OF

cMP
BNE

2T24TBL+7,R3
40

;ALL CHARACTERS CHECKED ?
; IF NOT, CHECK ANOTHER ONE

ERROR

104460

104410

:BR IF NO ERROR

;REPORT STACKED ERROR

TEST

000010

022703
001357

027445

ENDSUB

L10054

104403

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L100S4-.

TRAP

CS$ESUB

: SUBROUTINE & 2: 6 BIT CHARACTERS
‘

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

BGNSUB
007400

027126
5801 027130
027130
5802 027132
027132
027134

T20.2:

TRAP

C$BSUB

TRAP

CSERROR

JSR
RS, INITRN
DDCMP !NOCHK ! SYNCH
BIT7!8IT6!BIT2!BIT1
BCC
.+8.

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
:SET CHAR MODE,.NO ERROR CHECKING,S/AR=226
: TXCL=RXCL=6 BITS
:BR IF NO ERROR

ESCAPE

;SKIP TO END OF TEST

ERROR

SUB

;REPORT

STACKED ERROR

TRAP

.WORD

027136
027142
027144
027146

010010

027152

JSR
;son

RS, TXCTRL

;LOAD 2ND SYNCH.TX 1ST SYNCH

JSR

RS, TXCTRL

;CLEAR TSOM

000
)

027154

CS$ESCAPE

L10055-.

'--'........-.-.-.I-'.-..---.-....'..........--.......I..I...l...-..I.-

027156
027162

012703
112337

027436
027172

027166
027172
027174
027176
5818 027200
027200
5819 027202
027202

004537
000000
000006
103003

007676

5820

027204

104460
104410
000056

20%:

MOV
MOVE

oT24TBL,R3
(R3)+,24

:SET UP DATA TABLE POINTER
;INSTALL NEXT TX CHARACTER

2%:

JSR
200

RS, TXCHAR

; TRANSMIT CHARACTER ( ==> RX/FIFO
;o HOLE FOR NEXT CHARACTER +»

BCC

.+8.

;BR IF NO ERROR

ESCAPE

SUB

;SKIP TO END OF TEST

ERROR

;REPORT STACKED ERROR
:

)

TRAP

CS$ERROR

TRAP

CS$ESCAPE

.WORD

L10055-.

CNDMCAO DMv1l LINE UNIT DIAG1
TEST 20

MACRO M1200

22-FEB-84

15:31

PAGE 85-2
SEG 0152

8CcP CHARACTER LENGTH TEST

5821 027206
c27212
5823
5824 027214
5825 027220
027224
5827
5828 027232
5829 027236
027240
027242
027244
027246
027246
027250
027250
027252

022703
001363

027450

012703
112337

027436
027236
000300

027254
027260

022703
001357

027262
027262
027262

104403

027264
027264
027264
027266
027272
027274
027276
027300
027300
027302
027302
027304

142737

010110

027236

S$:

204

97247TBL+10.,R3

tALL CHARACTERS TRANSMITTED

MOV

#7247TBL ,R3

:SET UP DATA TABLE POINTER
s INSTALL NEXT EXPECTED RX CHARACTER

027445

IF NOT,

TX ANOTHER ONE

(R3).+,5%
#300,5%

s+MASK OUT UNTRANSMITTED BITS

JSR

RS ,RXCHAR

+READ/CHECK NEXT CHARACTER

NOCRDA
8CC

.+8.

sNO INITIAL CHECK OF RDA=0
:BR IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

SuUB

:SKIP TO END OF TEST

CMP
BNE

@T24TBL+7,R3
50¢

;ALL CHARACTERS CHECKED ?
:+ IF NOT, CHECK ANOTHER ONE

MOVB
BICB
000
0

ERROR

;#+ HOLE FOR NEXT EXPECTED CHARACTER

BGNSUB
104402
004537
043626
000347
103003

JSR

007400

TRAP

CSERROR

TRAP

CS$ESCAPE
L10055-.

TRAP

csasuB

TRAP

CS$ERROR

TRAP

CSESCAPE
L10056-.

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
:SET CHAR MODE,.NO ERROR CHECKING,S/AR=226

s TXCL=RXCL=7 BITS

BCC

.+8.

:BR IF NO ERROR

ESCAPE

SUB

:SKIP TO END OF TEST

ERROR

+REPORT STACKED ERROR

.WORD

010010

027324

004537
000001
000006
004537
000000
000000

027326
027332

012703
112337

027436
027342

004537

007676

104460

RS, INITRN

TXDL !RXDL

104410
000126

000007
103003

720.3:

! SYNCH
! NOCHKMP
DDC

104460

000000

CSESUB

027306
027312
027314
027316
027322

027336
027342
027344
027346
027350
027350
027352

cMP

S0s:

BNE

010010

JSR
;son

RS, TXCTRL

:LOAD 2ND SYNCH,TX 1ST SYNCH

JSR

RS, TXCTRL

:CLEAR TSOM

000
0

30¢:

MOVB

MOV

0T24TBL,R3

1SET UP DATA TABLE POINTER
s INSTALL NEXT TX CHARACTER

34:

JSR
000
7.

RS, TXCHAR

s TRANSMIT CHARACTER ( ==> RX/FIFO )
s+ HOLE FOR NEXT CHARACTER »»

(R3)+,3$

:BR_IF NO ERROR

;REPORT STACKED ERROR

ERROR

ESCAPE

SUB

:SKIP TO END OF TEST

TRAP

CSERROR

CNDMCAO DMVI1 LINE UNIT DIAGL
TEST 20

5867
5870
5871
5872
5873
5874
5875
5876
5877
5878
5879
5880

MACRO M1200

22-FEB-84

15:31

PAGE

K12
85-3

SEG 0153

-- BCP CHARACTER LENGTH TEST
027352
027354

104410
000056

027356
027362

022703
001363

027447

027364
027370

012703
112337

027436
027406

027402

004537

010110

TRAP
.WORD
CMP
BNE

#724TBL +9. ,R3
30¢

CS$ESCAPE
L10056-.

sALL CHARACTERS TRANSMITTED ?
s+ IF NOT, TX ANOTHER ONE

‘.Il-....--..'-----fl-..-'.-.8!I-..---...-.--..-I---..--..'.-..’.-3’.'..

027374

027406
027410
027412
027414
027416

142737

000000
000000
100000
103003

027416
5881 027420
027420
027422

104410
000010

027424

022703

027430
027432
027432
027432
027434
027434
027434

000200

027406

60$:

6$:

104460

(01357

027443
027444
027445
027446
027447

#T7247TBL ,R3
(R3)+,6$

JSR

RS ,RXCHAR

8ICB

000
0
NOCRDA
8CC
ERROR

ESCAPE

027445

CcMP

BNE

1SET UP DATA TABLE POINTER
; INSTALL NEXT EXPECTED RX CHARACTER
sMASK OUT UNTRANSMITTED BITS

+READ/CHECK NEXT CHARACTER

i*#+ HOLE FOR NEXT EXPECTED CHARACTER

.+8.

#NO INITIAL CHECK OF RDA=0
:BR IF NO ERROR
sREPORT STACKED ERROR

SuB

:SKIP TO END OF TEST

0T24TBL+7,R3

:ALL CHARACTERS CHECKED ?

ENDSUB
104403

266
377
000
000
000

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

T24TBL:

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

.BYTE
.BYTE
.BYTE
.BYTE
.EYEE
.EVEN

111
222
333
044
155

266
377
000
000
000

i01
:02
:D3
;D4
:05

;06
107
sFILLER 1
sFILLER 2
:FILLER 3

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10056-.

TRAP

CSESUB

TRAP

CSETST

CHECK ANOTHER ONE

L10053:

104401

111
222
333
044
155

IF NOT,

L10056:

ENDTST

027436
027437
027440
027441
027442

MOV
MOvVB

)
&

CNDMCAO DMv1l LINE UNI'
TEST 21

BOF TX

DIAGL

TABORT/(IDLE

5915

MACRO M1200
=

. FFB B4

15:31

PAGE

SEQ 0154

TEST

LSBTTL

TEST

BOP

TABORT/(IDLE

TEST

JHI0A000000000000000000000000000000000R0R0RRCRRRRARRRRRARRSRSARRREERRSRARRRAASS

i
THE

s«
i*

SET TO ZERO. TXE AND TSOM IS ASSERTED AND TXC IS MANUALLY STEPPED WHILE
OBSERVING TXA -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.

:*
i#
;#

LOADED INTO TXDB DRIVING TXBE LOW. THE TRANSMITTER IS CLOCKED THROUGH
ONE CHARACTER. WHEN TXBE GOES HMIGH AGAIN, TABORT IS ASSERTED CAUSING
ABORT TO BE TRANSMITTED. ALL CHARACTERS ARE CHECKED AT TXSO.

FLAGS,

i.
-~

5923
5924
3925
5926
5927
5928

5929
5930
5931
5933
5934
5935

5936
5937
5938
5939
5940
5941

004737

005420

004537
003400

007400

103003
104460

007116

104410
000132
007256

000176
103003

TEST

INITIALIZED FOR

SHOULD GO HIGH;

WILL

“BIT-ORIENTED PROTOCOL”

GO NO FURTHER

ONE ZERO CHARACTER,

THIS

INTO

TIME

THE

AN ALL

TRANSMIT

ZEROS

(BOP)

IDLE

CHARACTER WILL

SEQUENCE

AND ONE ABORT CHARACTER

WITH

IS SENT

THAT

ONLY

(INTO

104410
000112

TWO

THE BIT

28882088802 00080 8080000002 000400400088000000008
0000004080000 0000000004000 000

BGNTST

JSR

PC, INIDMYV

JSR

RS, INITRN

NOCHK
NORXEN
8CC
ERROR

.+8,
TST

sINIT VIA

T21::

;LOAD 1 SOM, CLK TX UNTIL ACTIVE

;BOP MODE, NO ERROR CHECK
;NO RECEIVER ENABLE,USE 8 BIT CHARS
;:BR IF NO ERROR
;REPORT STACKED ERROR
TRAP
;SKIP TO END OF TEST
TRAP

CSESCAPE

L100S7-.

RS,CHKTSO

ESCAPE

TST

sAND EXIT TEST

JSR

RS, SERIAL

176
BCC

.+8.

;READ REMAINING 7 BITS OF "FLAG" CHARACTER
s (OFF OF TSO BIT)
s+ EXPECTED BIT SEQUENCE (1111110)
;:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

.+8,

;CHECK 1ST BIT OF EXPECTED "FLAG"
s+ CHARACTER (SHOULD BE 0)
:BR IF NO ERROR
;:REPORT STACKED ERROR

C$ERROR

JSR
0
8CC
ERROR

:AND EXIT TEST

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10057-.

TRAP

C$ERROR

TRAP

CSESCAPE

.WORD

010010

gggKggaOEEESOR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN

ERROR

104460

004537

THIS

TXBE

.WORD

104460

004537

NEXT,

ESCAPE

104410
000150

004537
000000
103003

USYRT

-- BOP TX TABORT/(IDLE = O) TEST

;¢

5916
5917
5918
5919
5920
5921
5922

TEST 21

JSR
800

RS, TXCTRL

;:CLEAR TSOM

L10057-.

CNDMCAOQ DMV11l LINE UNIT DIAGL

MACRO M1200

TEST 21

= O)

5942
5943
5944
5945
5946
5947
5948
5949
5950

-- BOP TX TABORT/(IDLE

M12
22-FEB-84

15:31

PAGE 86-1

SEQ 0155

TEST

027542
027546
027550

004537
120402
000000

003734

JSR

R5,WRITEI

:LOAD 000 CHARACTER

027552

004537
000010
000176
103003

007256

JSR
8.
176

RS,SERIAL

+READ FLAG CHARACTER VIA TSO
: 8 BIT CHAR/CLOCK TICKS

027556

027560
027562
027564
027564
5951 027566
027566
027570

104410
000052

027572
027576
027600

004537
000004
00C¢000

010010

027602
027606
027610
027612
027614
027614
027616
027616
027620

004537
000010
000000
103003

007256

104410
000022

027622
027626

004537
000007

027632
027634
027634
027636
027636
027640
027642
027642
027642

103003

TDSRL
000

: EXPECTED BIT SEQUENCE (01111110)
:BR_IF NO ERROR

ESCAPE

TST

:AND EXIT TEST

:REPORT STACKED ERROR

TRAP

. WORD

JSR

RS, TXCTRL

:SET TXABT BIT

JS
8.
000
8CC
ERROR

RS,SERIAL

+READ 000 CHARACTER VIA TSO

.+8.

:+ 8 BIT CHAR/CLOCK TICKS
:+ EXPECTED BIT SEQUENCE (00000000)
:BR_IF NO ERROR

ESCAPE

TST

:AND EXIT TEST

JSR

RS, SERIAL

177
8CC
ERROR

.+8,

:READ ABORT CHARACTER VIA TSO
i+ 7 BIT CHAR/CLOCK TICKS
:+ EXPECTED BIT SEQUENCE (1111111)
:BR_IF NO ERROR
+REPORT STACKED ERROR

ESCAPE

TST

TAB
0

104460

007256

027630 TM 000177

104460

104401

. .8.

ERROR

104460

104410
000002

8CC

ENDTST

;:REPORT STACKED ERROR

C$ERROR

TRAP
.WORD

CSESCAPE

TRAP

L10057:

C$ESCAPE

L10057-.

TRAP

:AND EXIT TEST

C$ERROR

CS$ERROR
CS$ESCAPE

.WORD

L10057-.

TRAP

CSETST

CNDMCAO DMV11l LINE UNIT DIAG1L
TEST 22

BOP TX

TABORT/({IDLE

5985

MACRO M1200

22-FEB-84

15:31

PAGE 87

SEQ 0156

TEST

.SBTTL

TEST 22

-- BOP TX TABORT/(IDLE

TEST 22

i#
i#
i*

BOP

TABORT/(IDLE

TXBE

?ggkggaOEEEQOR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN

ONE

ZERO CHARACTER,

007400

JSR
RS, INITRN
NOCHK ! IDLES
NORXEN
8CC
.+8.
ERROR

027706
027712
027714
027716
027720
027720
027722
027722
027724

004537

027726
027732
6010 027734
6011

004537

6007

007116

104460
104410
000132
007256

000176
103003
104460

104410
000112

TIME AN ALL ZEROS CHARACTER WILL BE

AND ONE FLAG CHARACTER

SENT

(INTO

THE

PC,INIDMV

ESCAPE

TST

JSR
0
BCC
ERROR

RS,CHKTSO

ESCAPE

TST

.+8,

JSR
¥,
176
BCC
ERROR

RS, SERIAL

ESCAPE

TST

.+8.

;INIT VIA

T22::

sLOAD 1 SOM, CLK TX UNTIL ACTIVE
;B0P MODE, NO ERROR CHECK, IDLE=1
;NO RECEIVER ENABLE,USE 8 BIT CHARS
;:BR IF NO ERROR
;

;REPORT STACKED ERROR

:SKIP TO END OF TEST

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10060-.

;CHECK 1ST BIT OF EXPECTED "FLAG"
s+ CHARACTER (SHOULD BE
0)
;:BR IF NO ERROR
;REPORT STACKED ERROR
TRAP
;AND EXIT TEST
TRAP
.WORD

JSR
800

RS, TXCTRL

CSERROR
CSESCAPE

L10060-.

;sREAD REMAINING 7 BITS OF "FLAG" CHARACTER
: COFF OF TSO BIT)
; EXPECTED BIT SEQUENCE (1111110)
:BR IF NO ERROR
;:REPORT STACKED ERROR
:AND EXIT TEST

TRAP

CS$ERROR

TRAP

CSESCAPE

.WORD

010010

BIT

R R AR AR LR R L2004 A 2002020484040 0 0000000000000kt

BGNTST

004537

004537
000000
103003

THIS

JSR

027670
027674
027676
027700
027700
027702
027702
027704

TEST

FLAGS,

SHOULD GO HIGH;

005420

104410
000150

PP P PP YYYYYYY

004737

104460

NEXT,

103003

-2 2808080000000 AA AR R RN

007400

:#
i#
i#
s#
s

027650
027654
027656
027660
027662
027662
027664
027664
0276€¢

1) TEST

i1+

027644
027644

;:CLEAR TSOM

L10060-.

CNOMCAO DMV11 LINE UNIT DIAGL
TEST 22

BOP TX TABORT/(IDLE

MACRO M1200

B135
22-FFB-84

15:31

PAGE

SEG 0157

TEST

004537
120402

003734

JSR
TOSRL
000

RS ,WRITEI

1LOAD 000 CHARACTER

027746
027752
027754
027756
027760
027760
6021 027762
027762
027764

004537
000010
000176
103003

007256

JSR
8.
176
8CC
ERROR

RS,SERIAL

+READ FLAG CHARACTER VIA TSO
s+ 8 BIT CHAR/CLOCK TICKS
s+ EXPECTED BIT SEQUENCE (01111110)

ESCAPE

TST

027766
027772
027774

004537
000004
00C000

010010

004537
000010
000000
103003

007256

6012
6013
6014
6015
6016
6017
6018
6019
6020

027736
027742
027744

000000

104460

104410
000052

1BR IF NO ERROR

;:REPORT STACKED ERROR

TRAP

sAND EXIT TEST

TRAP

. WORD
JSR

RS, TXCTRL

JSR
8.
000

RS,SERIAL

TAB
0

8CC

.+8.

ESCAPE

TST

ERROR

104460

104410

+READ 000 CHARACTER VIA TSO

s 8 BIT CHAR/CLOCK TICKS
3+ EXPECTED BIT SEQUENCE (00000000)
1BR_IF NO ERROR
;REPORT STACKED ERROR
sAND EXIT TEST

RS,SERIAL

ERROR

104460
104410
000002

104401

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

007256

ESCAPE
ENDTST

.+8.
TST

CSESCAPE

le'o

sSET TXABT BIT

000022

004537
000010
000176
103003

CS$ERROR

;READ ABORT (FLAG) CHARACTER VIA TSO
s+ 8 BIT CHAR/CLOCK TICKS
s+ EXPECTED BIT SEQUENCE (01111110)
:BR IF NO ERROR
+REPORT STACKED ERROR
TRAP

sAND EXIT TEST

TRAP

L10060:

L10060-.

CSERROR

CS$ESCAPE

.WORD

L10060-.

TRAP

CSETST

CNDMCAQ DMV11 LINE UNIT DIAGL

MACRO M1200

22 FEB-84

15:31

TEST 23 -- BOP TX TXGA (TRANSMIT GO-AMEAD) TEST
6055

.SBTTL

TEST

PAGE

-- BOP TX

% &
88

S~ ——

TXGA (TRANSMIT GO-AHMEAD)

TEST

1000000000000000000000000000
00 RRRRIIRRARARAIIANAIARLARARLI ALIIARRLARRRLGLSS

TEST 23 -- BOP TX TXGA (TRANSMIT GO-AMEAD) TEST

THE

AND TXA OBSERVFD -- IT SHOULD BE ASSERTED WITHIN TWO (2) CLOCK CYCLES.

USYRT

NEXT,

1*¢

CHARACTERS

s«
s
s

;¢
i¢
i
i»
e

INITIALIZED FOR BOP AND

TXBE SHOULD GO HIGH;

TXE

IS ASSERTED.

TSOM

IS ASSERTED

THIS TIME AN ALL ZEROS CHARACTER WILL BE

LOADED
INTO
TXDB DRIVING TXBE LOW. WHEN TXBE GOES HIGH AGAIN, TXGA
IS ASSERTED CAUSING GA TO BE TRANSMITTED. THE SEQUENCE OF EVENTS IS
CONTINUALLY MONITORED WHILE
TXC
IS MANUALLY
CONTROLLED AND ALL
ARE

CHECKED

TxSO.

THIS

TEST

WILL

GO NO FURTHER

INTO

THE
TRANSMIT
SEQUENCE
SO
THAT
ONLY TWO FLAGS, ONE ZERO CHARACTER
AND ONE GA CHARACTER IS SENT (INTO THE BIT BUCKET).
ERROR LOOPING WILL DEPEND ON WHERE THE FIRST ERROR OCCURS WITHIN
THE SEQUENCE.

$--00800000000000000000000000000000000000800000000000800000400000800080000000808480

BGNTST

030040
ggg 030040

004737

005420

JSR

PC, INIDMYV

s INIT VIA

6058 030044
6059 030050

004537
003400

007400

JSR
NOCHK
NORXEN

RS, INITRN

sLOAD 1 SOM, CLK TX UNTIL ACTIVE
;80P MODE, NO ERROR CHECK
:NO RECEIVER ENABLE,USE 8 BIT CHARS

6060 030052
6061 030054
6062 030056

040000
103003

030056

104460

030060
030062

104410
000150

030064
030070
030072
030074
030074
6069 030076
030076
- 030100

004537
000000
103003

6071
6072
6073
6074
6075

030102
030106
030110
030112
030114
030114
6076 030116

004537
000007
000176
103003

030116
— 030120

104410
000112

6078 030122
6079 030126
60890 030130
6081

004537
000000
000000

6063 030060

6065
6066
6067
6068

8CC

.+8.

ESCAPE

TST

1SKIP TO END OF

JSR
0
8CC
ERROR

RS,CHKTSO

sCHECK 1ST BIT OF EXPECTED
3 CHARACTER (SHOWLD BE 0)
tBR IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

TST

sAND EXIT TEST

JSR
P
176
8CC
ERROR

RS,SERIAL

ESCAPE

TST

sREAD REMAINING 7 BITS OF “FLAG” CHARACTER
: (OFF OF TSO BIT)
:+ EXPECTED BIT SEQUENCE (1111110)
1BR IF NO ERROR
;REPORT STACKED ERROR
TRAP
CS$ERROR
sAND EXIT TEST

JSR
000
0

RS, TXCTRL

;CLEAR TSOM

ERROR

007116
3

104460

104410
000132
007256

104460

010010

T23::

.8,

.+8,

1BR IF NO ERROR

;REPORT STACKED ERROR
TEST

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10061-.

"FLAG"

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10061-.

TRAP
.WORD

CSESCAPE
L10061-.

CNDMCAQ DMVl LINE UNIT DIAGL
TEST 23

MACRO M1200

D15
22

FFB-84

15:31

PAGE

SEQ 0199

BOP TX TXGA (TRANSMIT GO-AHEAD) TEST

6082 030132
030136
030140

004537
120402

003734

030142
030146
030150
030152
030154
030154
030156
030156
030160

004537
000010
000176
103003

007256

030162
030166
030170

030172
030176
030200
6100 030202
6101 030204
030204
6102 030206
030206
030210
6103
€104 030212
6105 030216
6106 030220
6107 030222
6108 030224
030224
6109 030226
030226
030230
6110 030232
030232
030232

JSR

TDSRL

000000

gsn

176

004537

000010
000000

010010

ESCAPE

TST

TGA! TEOM

:
+

"FLAG" CHARACTER VIA

7SO

8 BIT CHAR/CLOCK TICKS
EXPECTED BIT SEQUENCE (01111110)

:BR IF NO ERROR

:REPORT STACKED ERROR

TRAP

sAND EXIT TEST

TRAP

RS, TXCTRL

:SET TX GO-AHEAD AND TEOM

RS, SERIAL

;+READ 000 CHARACTER VIA TSO
s+ 8 BIT CHAR/CLOCK TICKS
s+ EXPECTED BIT SEQUENCE (00000000)

CSERROR
CSESCAPE

L10061
-.

007256

gsn

000
BCC

.+8.

ESCAPE

TST

ERROR

104410
000022
007256

gsn

177

103003

104460

104401

.8,

JSR

104460

104410
000002

sREAD

. WORD

103003

004537
000010
000177

RS, SERIAL

BCC

ERROR

104410
000052
004537

:LOAD 000 CHARACTER

000

104460

000012
00C000

RS, WRITET

ENDTST

RS, SERIAL

BCC
ERROR

.+8.

ESCAPE

TST

:BR IF NO ERROR

;sREPORT STACKED ERROR

sAND EXIT TEST

TRAP

CSERROR

TRAP
.WORD

L10061-.

:READ GO-AHEAD CHARACTER VIA TSO
3+ 8 BIT CHAR/CLOCK TICKS
:+ EXPECTED BIT SEQUENCE (O01111111)
:BR IF NO ERROR
sREPORT STACKED ERROR

sAND EXIT TEST

L10061:

CS$ESCAPE

TRAP

CS$ERROR

TRAP

. WORD

CSESCAPE
L10061-.

TRAP

CSETST

CNDMCAO DMVl LINE UNIT
TEST 24

BOF

DIAGL

22 FEB-84 15:31

MACRO M1200

PAGE 89

SEG 0160

TX MESSAGE WITHOUT CRC

.SBTTL

6122

TEST

BOP

TX MESSAGE

WITHOUT

CRC

3000800020840 2000000000000 0 80000 RARARAR AR RRAAEAR AR AARRALILALRARRRSIRRRRALAR

TEST 24

-- BOP

TX MESSAGE WITHOUT CRC

HL
1
HE
.

i*
&

(WITH TEOM).

A CHECK IS MADE TO ASCERTAIN THAT NO CRC OR VRC IS GENERATED

-- FLAG CHARACTERS SHOULD FOLLOW THE DATA.
(NOTE:

NO BYT STUFFING OCCURS IN THIS TEST)

TEST MESSAGE:

FLAG FLAG 000 307

125 252 201 FLAG

L
$-~88882882 008080200080 2000 0000000000000

030234
6123 030234

BGNTST

004737

005420

JSR

PC, INIDMV

030240
030244
030246
030250

004537
003400

007400

JSR
NOCHK

RS, INITRN

BCC

.+8.

030252
6130 030254
030254
030256
6131
6132 030260
6133
6134 030266
6135
6136 030270
6137 030274
6138 030276
6139
6140 030300
6141 030304
6142 030306
6143 030310
6144 030312
030312
6145 030314

104460

ESCAPE

TST

6124

6125
6126
6127
6128
6129

030314
030316

6146
6147 030320
6148 030324
6149 030326
030330
6151 030332
030332
6152 030334
030334

103003

ERROR

104410
000332

0000000000000

T24::

sINIT DMV-11, ENTER M-LOOP

sLOAD 1 SOM, CLK TX UNTIL ACTIVE

:SET BOP MODE,NO CHECK
:USE 8 BIT CHARS
:BR IF NO ERROR
;REPORT STACKED ERROR

:SKIP TO END OF TEST

010010

JSR

RS, TXCTRL

:LOAD 2ND FLAG,

004537

010010

JSR
000
0

RS, TXCTRL

;CLEAR TSOM

004537
000000
000010
103003

007676

JSR

RS, TXCHAR

:LOAD 000,

B8CC

.+8.

:BR IF NO ERROR
:REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

004537

000007

104410
000272

104460

104410

000
8.

ERROR

104460

004537
000307
000010
103003

TSOM
7.

007676

TRAP

CSERROR

CS$ESCAPE

. WORD

L10062-.

TRAP

CSERROR

TX 2ND FLAG

TRAP

CSESCAPE

. WORD

L10062-.

TRAP

CSERROR

TRAP

CS$ESCAPE

TX 000

:LOAD 307,

B8CC

.+8.

:1BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF TEST

ERROR

TRAP

TX 1ST FLAG

RS, TXCHAR

JSR
307
8.

2 000000000000 0000000000

:REPORT STACKED ERROR

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 24

BOP

TX MESSAGE WITHOUT

o153 030336

000252

6154
6155
6156
6157
6158

004537
000125
000010
103003

030340
030344
030346
030350
030352
030352
6159 030354
030354
5300 030356
6161
6162
6163
6164
6165

030360
030364
030366
030370
030372
030372
6166 030374
030374
— 030376
6168
6169
6170
6171

030400
030404

030406
030410
030410
6172 030412
030412
o173 030414

6174
6175
6176
6177
6178
6179

030416
030422
030424
030426
030430
030432

030432
6180 030434
030434
" 030436
6182
6183
6184
6185
6186

030440
030444
030446
030450
030452
030452
6187 030454
030454

007676

104460
104410
000232
004537
000252
000000
103003

007676

104460
104410
000212
004537
000200
103003

011364

104460
104410
000174
004537
000400
000000
000010
103003

010110

104460

004537
000201
000000
103003

007676

104460
104410

000132

6189
6190
6191
6192
6193

004537
000307
000000
000010
103003

22 FEB-84

15:31

ris

PAGE 89-1

SEG 0161

CRC

JSR
125
8.
B8CC
ERROR

RS, TXCHAR

:LOAD

.+8.

:BR IF NO ERROR
:REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF

125;

TEST

RS, TXCHAR

;LOAD 252

.+8.

1BR IF NO ERROR
;:REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF

TEST

JSR
0
8CC
ERROR

RS5,RCV1ST

;:CLOCK AND RCv 000

.+8.

:BR_IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF

JSR
RS ,RXCHAR
RXSOM! 000
0
8.
8CC
.+8.
ERROR

TST

.WORD

L10062-.

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

L10062-.

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

L10062-.

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10062-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10062-.

TRAP

CS$ERROR

TRAP

CSESCAPE

307

JSR
252
0
8CC
ERROR

ESCAPE

104410
000152

100 030456

030460
030464
030466
030470
030472

MACRO M1200

TEST

sREAD € CHK 000, RCV 307
: € CHECK RSOM=1
:BR IF NO ERROR
;REPORT STACKED ERROR

:SKIP TO END OF TEST
o’

JSR
201
0
8CC
ERROR

RS, TXCHAR

:LOAD 201

.+8.

:BR_IF NO ERROR

ESCAPE

TST

+REPORT

STACKED ERROR

:SKIP TO END OF TEST

.WORD

010110

JSR
307
0
8.
BCC

RS ,RXCHAR

;READ & CHK

.+8.

:BR IF NO ERROR _

307,

RCV
?
S

125

L10062-.

CNDMCAQ DMV1L LINE UNIT DIAGL

TEST 24

BOP

6194 030474

104410
000110

6197 030502
6198 030506
6199 030510

004537
000002
000000

030514
6202 030516
030516

104460

6200 030512
6201 030514

104410

6204
6205
6206
6207
6208

030522
030526
030530
030532
030534

004537
000125
000000
000010
103003

030536
6210 030540
030540
-— 030542

104460

104410
000046

6212
6213
6214
6215

004537
000252
000000
020010

6216 030556

6217 030560
030560
6218 030562
030562
219 030564

6220
6221
6222
6223
6224
6225

010110

PAGE

G115
89 2

SEQ 0162

010110

030610

104401

1SKIP

JSR
TEOM
0

RS, TXCTRL

;SET

B8CC
ERROR

.+8.

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF

010110

;:READ & CHK

.+8.

:BR_IF NO ERROR

ESCAPE

TST

:SKIP

125,

TEST

CS$ERROR

TRAP
.WORD

CSESCAPE
L10062-.

TRAP

CS$ERROR

;REPORT STACKED ERROR
TO END OF

sREAD € CHx 252,

TEST

ESCAPE

TST

:SKIP

:READ &€ CHK 201,
: & CHECK REOM

L10062-.

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10062-.

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10062-.

RCv 201

sOON'
T CHECK FOR FINAL RXACT=1
:BR _IF NO ERROR
:REPORT STACKED ERROR
TO END OF

CS$ESCAPE

.WORD

RCv 252

.+8,

TST

TRAP

B8CC

ESCAPE
ENDTST

TEST

TEOM BIT

RS ,RXCHAR

JSR
RS ,RXCHAR
RXEOM!201
0
NFCRDA !NCRACT
8CC
.+8.
ERROR

104460

TO END OF

JSR
125
0
8.
8CC

ERROR

104410
000024

104410
000002

TST

JSR
RS ,RXCHAR
252
0
NCRACT!8.

104460

004537
001201
000000
060000
103003

:REPORT STACKED ERROR

ESCAPE

ERROR

103003

030566
030572
030574
030576
030600
030602
030602
6226 030604
030604
030606
6227 030610

030610

010010

103003

000070

030544
030550
030552
030554

15:31

ERROR

104460

208 030520

6209 030536

(22 FFB-84

Tx MESSAGE WITHOUT CRC

030474
6195 030476
030476
- 030500
6

MACRO M1200

TEST

RCV FIRST FLAG

;DON’'T CHECK FOR FINAL RDA=RXACT=1
:BR _IF NO ERROR
+REPORT STACKED ERROR
TRAP
:SKIP TO END OF TEST

L10062:

CSERROR

TRAP
.WORD

CSESCAPE
L10062-.

TRAP

CSETST

H1s5
CNDMCAQ DMv1l LINE UNIT
TEST 25

DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE

SEQ 0163

BOF RX CHARACTER LENGTH TEST

6249

LSBTTL

TEST 25

BOP RX CHARACTER LENGTH TEST

3000888800002 00000000 0000000000000 0000000000000 0000000080000 00000000000000000s
L

TEST 25 -- BOP RX CHARACTER LENGTH TEST

i
HL

THE

:#
:#

TRANSMITTED.
THEN
6
SUBTESTS
FOLLOW,
EACH ONE USING A DIFFERENT
TRANSMIT
CHARACTER LENGTH STARTING AT TWO (2) AND ENDING WITH SEVEN

;e
:;#
;*

IN EACH
SUBTEST,
TWO
8 BIT CHARACTERS WILL BE TRANSMITTED
BEFORE
TXCL
IS
CHANGED TO THE CHARACTER LENGTH BEING TESTED. THIS
CORRESPONDS TO NORMAL USAGE WHERE EITHER:

USYRT

IS INITIALIZED FOR BOP WITH CRC-CCITT PRESET TO 1'S.

MANUALLY

CONTROLLED

WUNTIL

TWO

FLAG

CHARACTERS

HAVE

TxC

BEEN

i
i.
i .

ie
i
i e

2 -- A HEADER OF
TWO 8 BIT CHARACTERS IS SENT FOLLOWED BY A
DATA STREAM OF DATA CHARACTERS WHICH MAY BE LESS THEN 8
BITS
IN LENGTH
(I.E.
2,
3,
4,
5,
6,
OR 7 BIT

-- A MESSAGE
OF
CHARACTERS
WHICH ARE LESS THEN 8 BITS IS
SENT
AS
A
STREAM OF 8 BIT CHARACTERS AND THE REMAINING
BITS ARE SENT AS A CHARACTER OF LESS THEN 8 BITS OR

CHARACTERS).

THE

: 88080800
:

030612

6250 030612

6251

6253

:
004737

PATTERN

IS:

123

321

111

222

333 044

155 266

377

0000 8000000000020 8 0000000000000 8 0080800080000 0000000000000002
BGNTST
JSR

PC,INIDMV

s INIT DMV-11,

T25::

ENTER M-LOOP

: SUBROUTINE @ 1: 2 BIT CHARACTERS
PR

030616
030616

104402
004537
004226
000002
103003

030634
030636

104410
000344

030640
6263 030644
030646
6265 030650
030654
6267 030656
030660
030664
6270 030666
6271 030670
6272 030672

004537
000001
000007
004537
000000
000000
004537
000123
000010
103003

027634

BGNSUB

030616
6255 030620
030624
6257 030626
030630
6259 030632
030632

6261

005420

TEST

007400

010010

010010
007676

TRAP
;LOAD 1 SOM, CLK TX UNTIL ACTIVE
:SET BOP MODE,CRC-CCITT-1,S5/AR=226

sINITIALLY:

.+8.

ESCAPE

SuB

;SKIP TO END OF TEST

JSR
TSOM
,
JSR
000
0
JSR
123
8.
BCC

RS, TXCTRL

;LOAD 2ND FLAG,TX 1ST FLAG

RS, TXCTRL

;CLEAR TSOM

RS, TXCHAR

;:LOAD 123(HEADER1),

.+8.

:BR IF NO ERROR

ERROR

csBsuB

TXCL=8 BITS / RXCL=2 BITS

B8CC

ERROR

104460

T25.1:

JSR
RS, INITRN
IDLES!SYNCH

BIT1

:BR IF NO ERROR

;REPORT STACKED ERROR

TX 2ND FLAG

;REPORT STACKED ERROR

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10064-.

CNDMCAO DMV1l LINE UNIT DIAGL
TEST 25

MACRO M1200

22-FEB-84 15:31

T15

PAGE 90- 1

JEQ 0164

BOP RX CHARACTER LENGTH TEST

030672
6273 030674
030674
ca7q 030676
6275
6276
6277
6278
6279

104460
104410
000308

030700
030704
030706
030710
030712
030712
6280 030714
030714
copy 030716

004537
000321
000010
103003

6282
6283
6284
6285
6286
6287
6288

004537
120407
000102
004537
000111
000010
103003

030720
030724
030726
030730
030734
030736
030740

6289 030742
030742
6290 030744
030744
ga0y 030746

007676

104460
104410
000264

ESCAPE

SUB

:SKIP

TO END OF

TEST

JSR
321
8.
BCC
ERROR

RS, TXCHAR

;LOAD 321(HEADER2),

.+8,

:BR_IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SUB

:SKIP TO END OF

TEST

007676

JSR
RS,WRITEI
PCR
BIT6!BIT1
JSR
RS, TXCHAR
111
8.
BCC
.+8.

sNOW CHANGE TXCL

ESCAPE

:SKIP TO END OF

ERROR

104460
104410
000238

SUB

C$ERROR

TRAP
.WORD

CSESCAPE
L10064-.

123(HEADER1)

003734

TRAP

CSERROR

TRAP
.WORD

C$ESCAPE
L10064-.

TO 2 BITS TOO

;LOAD 111(DATA1),

TX 321(HEADER2)

:BR IF NO ERROR
:REPORT STACKED ERROR
TEST

TRAP

CS$ERRO!.

TRAP
.WORD

CSESCAPE
L10064-.

‘...--..--.-......-.-.---....-........-..-...-.-.-......---I-.-...--...

6292 030750
6293 030754

012703
112337

033525
030764

6295
6296
6297
6298
6299

004537
000000
000002
103003

007676

030760
030764
030766
030770
030772
030772
6300 030774
030774
g30y 030776

6302 031000

6303 031004

104460
104410
000204

022703

001363

033533

10s:
18:

MOV
MOVB

oT30TBL+1,R3
(R3)+,1$

;SET UP DATA TABLE POINTER
s INSTALL NEXT TX CHARACTER

JSR
000
2.
BCC
ERROR

RS, TXCHAR

;s TRANSMIT CHARACTER ( ==> RX/FIFO
164 HOLE FOR NEXT CHARACTER &s

.+8.

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SUB

:SKIP

cHP

oT30TBL+7,R3

;ALL CHARACTERS TRANSMITTED ?

BNE

108

TO END OF

IF NOT,

TEST

)

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10064-.

TX ANOTHER ONE

'.......-.-......-..--...‘..-..................‘.......--...I...-....-.

6305 031006
6306 031012
6307 031014
6308 031016

6309 031022
6311
6312
6313
6314

031024
031030
031032
031034

6315 031036
6316 031040

031040

004537
000002

000000
004537

000044

004537
000523
000000
100000

103003

104460

010010
011614
010110

JSR
TEOM
)
JSR

36.

RS, TXCTRL

:SET TEOM

RS,STEPLU

AND TX DATA7

SOME FLAGS

JSR
RS, RXCHAR
RXSOM!123
0
NOCRDA

JREAD & CHK 123(HEADER1),
: €& CHECK FOR RSOM=1

ERROR

;REPORT

B8CC

.+8.

RCV 321(MEADER2)

iNO INITIAL CHECK OF RDA=0

iBR IF NO ERROR

STACKED ERROR

TRAP

CS$ERROR

CNDMCAO DMVv11 LINE UNIT DIAGL
TEST 25

J1 J
22 FEB-84

15:31

PAGE

90 ¢

SEG 0165

80P RX CHARACTER LENGTH TEST

6317 031042
031042
031044
6318
6319 031046
6320 031052
6321 031054
6322 031056
6323 031060
6324 031062
031062
6325 031064
031064
031066
6326
6327 031070
6328 031074
6329 031100
6330
6331 031106
6332 031112
6333 031114
6334 031116
6335 031120
6336 031122
031122
6337 031124
031124
6338
6339
6340
6341
6342
6343
6344
6345
6346
6347

MACRO M1200

004537
000321
000000
100000
103003

RS ,RXCHAR

+READ/CHECK 321(HEADER2),RCv 001(DATA1)

B8CC

.+8.

iNO INITIAL CHECK OF RDA=0
:BR IF NO ERROR

ESCAPE

SuB

:SKIP TO END OF TEST

0
NOCRDA
ERROR

033524
031112
000374

004537
000000

010110

000000
100000

031112

20$:

TRAP
TRAP

2$:

MOV
MOVB
BICB

#7T30TBL,R3
(R3).,2%
0374 ,2%

:SET UP DATA TABLE POINTER
s INSTALL NEXT EXPECTED RX CHARACTER
sMASK OUT UNTRANSMITTED BITS

JSR
800

RS ,RXCHAR

sREAD/CHECK NEXT CHARACTER
s*+ HOLE FOR NEXT EXPECTED CHARACTER

NOCRDA

103003

B8CC

.+8.

:NO INITIAL CHECK OF RDA=0
:BR IF NO ERROR
s+REPORT STACKED ERROR

ESCAPE

SuUB

:SKIP TO END OF TEST

ERROR

104460

022703
001357

;REPORT STACKED ERROR

. WORD

012703
112337
142737

031130
031134

TRAP

JSR
321

010110

104410
000114

104410
000054

1SKIP TO END OF TEST

SuUB

.WORD

104460

031126

031136
031142
031144
031146
031150
031152
031152
6348 031154
031154
031156
6349
6350 031160
6351 031164
6352 031166
6353 031170
6354 031172
6355 031174
031174
6356 031176
031176
031200
6357 031202
031202
031202

ESCAPE

104410
000136

TRAP

033531

cMP
BNE

oT30TBL+5,R3
208

:+ IF NOT, CHECK ANOTHER ONE

010110

JSR
802

RS ,RXCHAR

:READ/CHK DATA6(002), RCV DATA7

NCRACT !NOCRDA

B8CC

.+8.

ESCAPE

SuUB

ERROR

JSR

RS ,RXCHAR

RXEOM!003

RERCHK
NOCRDA!NFCRDA!NCRACT

ENDSUB

BCC
ERROR

.+8,

ESCAPE

SuB

C$ERROR

CS$ESCAPE

L10064
-.

CSERROR

CS$ESCAPE

.WORD

L10064
-.

TRAP

C$ERROR

TRAP

CSESCAPE

sALL CHARACTERS CHECKED ?

sNO INITIAL CHECK OF RDA=0

;OON’'T CHECK FOR FINAL RXACT=1

:BR_IF NO ERROR
;+REPORT STACKED ERROR

:SKIP TO END OF TEST

.WORD

010110

CS$ESCAPE

L10064
-.

sREAD/CHK DATA7(003), RCV FIRST FLAG
+€ CHECK RERR BIT=0 (GOOD CRC) & REOM=1
iNO INITIAL CHECK OF RDA=0
sDON'T CHECK FOR FINAL RDA=RXACT=1
:BR IF NO ERROR

+REPORT STACKED ERROR

:SKIP TO END OF TEST

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

L10064

" TRAP

L10064-.

CS$ESUB

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 25

MACRO M1200

22-FEB-84

15:31

PAGE 90-3

SEG 0166

BOP RX CHARACTER LENGTH TEST

6358
6359
6360
6361 031204
031204
031204
6362 031206
6363 031212
€364 031214
6365 031216
6366 031220
031220
6367 031222
031222
031224
6368
6369 031226
6370 031232
031234
031236
031242
031244
031246
031252
031254
031256
031260
031260
031262
031262
031264
031266
031272
031274
031276
031300
031300
031302
031302

031304

031306
031312
6391 031314
031316
031322
031324
031326
6396 031330
031330
6397 031332
031332
031334
6398
6399 031336
6400 031342

125.2:

007400

:LOAD 1 SOM, CLK TX UNTIL ACTIVE
:SET BOP MODE,CRC-CCITT-1,S/AR=226
s INITIALLY: TXCL=8 BITS 7 RXCL=3 BITS
:BR IF NO ERROR
;REPORT

ESCAPE

010010

RS, TXCTRL

:CLEAR TSOM

JSR

RS, TXCHAR

;:LOAD 123(HEADER1),

BCC

.+8.

:BR _IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

SuB

:SKIP TO END OF TEST

TRAP

C$ERROR

TRAP

.WORD

CS$ESCAPE
L10065-.

TRAP

CS$ERROR

TRAP

CS$ESCAPE
L10065-.

TX 2ND FLAG

.WORD

007676

JSR

RS, TXCHAR

:LOAD 321(HEADER2),

B8CC

.+8.

:BR_IF NO ERROR

ESCAPE

SuUB

:SKIP TO END OF TEST

321
a‘

ERROR

104460
104410
000264

TX 123(HEADER1)

sREPORT STACKED ERROR

TRAP

CSERROR

TRAP

CS$ESCAPE
L10065-.

.WORD

003734

JSR
RS,WRITEI
PCR
BIT6!BITS!BIT1!BITO
RS, TXCHAR
JSR
111
8.

007676

104410
000234

:NOW CHANGE TXCL TO 3 BITS TOO
;LOAD 111(DATAl),

TX 321(HEADER2)

8CC

.+8.

:BR IF NO ERROR
s+REPORT STACKED ERROR

ESCAPE

SUB

:SKIP TO END OF TEST

ERROR

104460

012703
112337

JSR

ERROR

104410
000304

004537
120407
000143
004537
000111
000010
103003

:LOAD 2ND FLAG,TX 1ST FLAG

104460

004537
000321
000010
103003

RS, TXCTRL

123

103003

:SKIP TO END OF TEST

JSR
;SOH
800

007676

SuB

STACKED ERROR

TRAP
TRAP

.WORD

033525
031352

10$:

MOV
MOV

csBsuB

:SET UP DATA TABLE POINTER
s INSTALL NEXT TX CHARACTER

CSERROR
CSESCAPE

L10065-.

CNDMCAO DMV11 LINE UNIT DIAG1
TEST 25

6401
6402
6403
6404
6405
6406

MACRO M1200

22-FEB-84 15:31

L 13

PAGE 90 -4

SEGQ 0167

-- BOP RX CHARACTER LENGTH TEST
031346
031352
031354
031356

004537
000000
000003
103003

031360
6407 031362
031362
031364
6408
6409 031366
6410 031372

104460

031360

6411
6412 031374

6413 031400
6414 031402
6415 031404
6416 031410
6417
6418 031412
6419 031416
6420 031420
031422
031424
031426
031426

031430
031430
031432

007676

1$:

SuB

;REPORT STACKED ERROR

;SKIP TO END OF TEST

TRAP

CS$ERROR

TRAP

CSESCAPE

L10065-.

;ALL CHARACTERS TRANSMITTED ?
s IF NOT, TX ANOTHER ONE

JSR

RS, TXCTRL

:SET TEOM

011614

JSR

RS,STEPLV

: AND TX DATA7 + SOME FLAGS

010110

JSR
RS ,RXCHAR
gXSOH!IZS

;READ € CHK 123(HFADER1), RCV 321(HEADER2)
; & CHECK FOR RSOM=1

NOCRDA
8CC
ERROR

.+8.

:NC INITIAL CHECK OF RDA=0
;:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SuUB

;SKIP TO END OF TEST

gSR

RS ,RXCHAR

;READ/CHECK 321(HEADER2),RCV 001(DATAl)

NOCRDA
8CC
ERROR

.+8.

;NO INITIAL CHECK OF RDA=0
:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SUB

;:SKIP TO END OF TEST

104410
000136

031434
031440
031442
031444
031446
031450
031450
031452
031452
031454

004537
000321
000000
100000
103003

031456
031462
031466

012703
112337
142737

033524
031500
000370

031474
031500
031502
031504
031506
031510
031510
031512
031512
031514

004537
000000
000000
100000

010110

;EOH
36.

104460

010110

104460

104410
000114

000054

;:BR IF NO ERROR

4T30TBL+7,R3
10¢

010010

104410

.+8,

cMP
BNE

004537

104460

B8CC

.WORD

033533

103003

: TRANSMIT CHARACTER ( ==> RX/FIFO )
;%% HOLE FOR NEXT CHARACTER #»

ESCAPE

022703
001363

004537
000523
000000
100000
103003

RS, TXCHAR

ERROR

104410
000204

000002
00C000
004537
000044

JSR
000

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10065-.

TRAP
TRAP

.WORD

’

031500

404 :

MOV

oT30TBL ,R3

:SET UP DATA TABLE POINTER

BICB

0370,4%

sMASK OUT UNTRANSMITTED BITS

JSR
000

RS,RXCHAR

MOVB

(R3)+,4¢%

NOCRDA

B8CC

ERROR
ESCAPE

.+8.
SUB

CSERROR
CSESCAPE

L10065-.

;sINSTALL NEXT EXPECTED RX CHARACTER
:READ/CHECK NEXT CHARACTER
;%4 HOLE FOR NEXT EXPECTED CHARACTER

:NO INITIAL CHECK OF RDA=0

:1BR IF NO ERROR

;REPORT STACKED ERROR
;SKIP TO END OF TEST

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10065-.

CNDMCAO DMV11 LINE UNIT DIAG1
TEST 25

MACRO M1200

22-FEB-84

15:31

PAGE 90-5

SEQ 0168

BOP RX CHARACTER LENGTH TEST

6446 031516
6447 031522
6448
6449 031524
6450 031530
6451 031532
6452 031534
6453 031536
6454 031540

031540
6455 031542
031542
031544
6456
6457 031546
6458 031552
6459 031554
6460 031556
6461 031560
6462 031562
031562
6463 031564
031564

022703
001357

033531

004537
000006

010110

000000
020000

103003

#730TBL+5,R3
40¢

;ALL CHARACTERS CHECKED ?
+ IF NOT, CHECK ANOTHER ONE

JSR

RS ,RXCHAR

;READ/CHK DATA6(006),

B8CC

.+8.

;OON'T CHECK FOR FINAL RXACT=1
:BR IF NO ERROR
:REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

006
0
NCRACT

ERROR

104460
104410
001756
004537
001007

CMP
BNE

RCV DATA7

TRAP

.WORD

010110

JSR

RS ,RXCHAR

RXEOM! 007
RERCHK

NFCRDA!NCRACT

B8CC

.+8.

ESCAPE

TST

ERROR

sREAD/CHK DATA7(007),

031572
031572
031572
031574
031600
031602
031604
031606
031606
031610
031610
031612

031614
031620
031622
031624
031630
031632
031634
031640
031642
031644
031646
031646
031650
031650

C$ERROR

CS$ESCAPE

L10063-.

RCV FIRST FLAG

:AND CHECK FOR REOM=1
:+ € CHECK RERR BIT=0 (GOOD CRC)
;DON'T CHECK FOR FINAL RDA=RXACT=1
:BR IF NO ERROR

+REPORT STACKED ERROR

TRAP

:SKIP TO END OF TEST

TRAP

031566
6464 031570
031570
031570
6465

6467

TRAP

.WORD

C$ERROR

CSESCAPE

L10063-.

CS$ESULB

7125.3:

007400

010010

007676

JSR
SYNCH
BIT2
8CC
ERROR

RS, INITRN

ESCAPE

SuB

.+8.

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
+SET BOP MODE,CRC-CCITT-1,S5/AR=226
sINITIALLY: TXCL=8 BITS / RXCL=4 BITS
:BR IF NO ERROR
;:REPORT STACKED ERROR
TRAP

:SKIP TO END OF TEST

TRAP

JSR
;son

RS, TXCTRL

;LOAD 2ND FLAG,TX 1ST FLAG

JSR

RS, TXCTRL

;:CLEAR TSOM

JSR
123
8.
8CC
ERROR

RS, TXCHAR

;LOAD 123(HEADER1),

. +8.

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SuB

:SKIP TO END OF TEST

8°°

csssus

CSERROR

CS$ESCAPE

.WORD

L10066-.

TRAP

C$ERROR

TRAP

CS$ESCAPE

TX 2ND FLAG

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 25

MACRO M1200

22-FEB-84 15:31

N13

PAGE 90-6

SEQ 0169

BOP RX CHARACTER LENGTH TEST

P 031652

000304

6489
6490
6491
6492

031654
031660
031662
031664

004537
000321
000010
103003

031666
6494 031670
031670
- 031672

104460
104410
000264

6496 031674

004537

6498 031702
6499 031704

000204
004537
000111
000010
103003

6493 031666

6497 031700

6500 031710
6501 031712
6502 031714

6503 031716
031716

120407

104460

.WORD
007676

JSR
321
8.
8CC

RS, TXCHAR

:LOAD 321(HEADER2),

.+8.

:BR_IF NO ERROR

ESCAPE

SuUB

:SKIP TO END OF

JSR

RS,WRITEI

sNOW CHANGE TXCL TO 4 BITS TOO

ERROR

003734

PCR

007676

6504 031720
(31720
— Cs81722

104410
000234

6506 031724

012703

033525

6509
6510
6511
6512
6513

031734
031740
031742
031744
031746
031746
6514 031750
031750
— 031752

004537
000000
000004
103003

007676

6516 031754
ggi; 031760

022703
001363

033533

6519
6520
6521
6522
2?543

031762
031766
031770
031772
031776

004537
000002
000000
004537
000044

010010

6525 032000

004537

010110

TEST

:BR_IF NO ERROR

ESCAPE

:SKIP TO END OF TEST

SuUB

123(HEADER1)

;REPORT STACKED ERROR

BIT7!BIT2
JSR
RS, TXCHAR
111
8.
8CC
.+8.

ERROR

:LOAD 111(DATA1),

L10066-.

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10066-.

TX 321(HEADER2)

:REPORT STACKED ERROR

TRAP

CS$ERROR

TRAP
.WORD

CS$ESCAPE
L10066€-.

:'.-..-.--....--.I-..---...-...---..--.--....-.......'-.......'....-'I"

2558; 031730

112337

031740

104460

104410
000204

10¢:
1%:

MOV

@T30TBL+1,R3

:SET UP DATA TABLE POINTER

JSR
000
4,
8CC
ERROR

RS, TXCHAR

; TRANSMIT CHARACTER ( ==> RX/FIFO
s+ HOLE FOR NEXT CHARACTER s

.+8.

:BR IF NO ERROR
;:REPORT STACKED ERROR

ESCAPE

SuB

:SKIP TO END OF TEST

cMP
BNE

#T30TBL+7,R3
10¢

sALL CHARACTERS TRANSMITTED ?
:+ IF NOT, TX ANOTHER ONE

MOVB

(R3)+,1$

s INSTALL NEXT TX CHARACTER
)

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10066-.

'..---...-..--...--.--..-.-'....-.'.'-......--.-......fl----.--.I.--I.'.

6526
6527
6528
6529
6530

032004
032006
032010
032012
032014
032014
6531 032016
032016
032020

000523
000000
100000
103003
104460
104410
000136

011614

JSR
TEOM
o
JSR
36.

RS, TXCTRL

:SET TEOM

RS5,STEPLV

JSR

RS ,RXCHAR

tREAD & CHK

RXSOM!123
0
NOCRDA
8CC
.+8.
ERROR
ESCAPE

SuB

AND TX DATA7

+ SOME FLAGS

123(HEADER1),

&€ CHECK FOR RSOM=1

iNO INITIAL CHECK OF RDA=0
:BR_IF NO ERROR
;REPORT STACKED ERROR
:SKIP TO END OF TEST

RCV 321(HEADER2)

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10066-.

DMV11 LINE UNIT

DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE

SEG 0170

BOP RX CHARACTER LENGTH TEST

032022
032026
032030
032032
032034

032036
032036
032040
032040
032042

004537
000321
000000
100000

B8CC

.+8,

sNO INITIAL CHECK OF RDA=0Q
1BR IF NO ERROR

ESCAPE

SuB

:SKIP TO END OF TEST

ERROR

1044¢0

104410
000114

+REPORT

STACKED ERROR

TRAP

. WORD

012703

032062
032066
032070
032072
032074
032076
032076
032100
032100
032102

004537
000000

032104
032110

022703
001357

033531

032112
032116
032120
032122
032124
032126
032126
032130
032130
032132

004537
000006
000000
020000
103003

010110

032134
032140
032142
032144
032146
032150

004537
001017
000001
060000
103003

032152
032152
032154
6571 032156
032156
032156
6572
6573
6574

+READ/CHECK 321(HEADER2),RCv 011(DATAL)

103003

112337
142737

RS ,RXCHAR

321

NOCRDA

032044
032050
032054

032150

JSR

010110

033524
032066
000360
010110

000000

032066

40s$:

100000
103003

MOV

eT30TBL ,R3

BIC8

0360,4%

JSR

RS ,RXCHAR

NOCRDA
8CC

.+8.

ESCAPE

SuUB

MOVB

000
0

ERROR

104460

104410
000054

(R3).,48

iNO INITIAL CHECK OF RDA=0
tBR_IF NO ERROR

sREPORT STACKED ERROR

sSKIP TO END OF TEST

sALL CHARACTERS CHECKED ?
s IF NOT, CHECK ANOTHER ONE

JSR

RS ,RXCHAR

sREAD/CHK DATA6(006), RCV DATA7

ESCAPE

TRAP
TRAP

JSR

sREPORT STACKED ERROR

TST

RS ,RXCHAR

RXEOM!017

RERCHK
NFCRDA!NCRACT
ERROR

104460

ESCAPE

104410
001346

CSESCAPE

.WORD

L10066-.

1SKIP TO END OF TEST

TRAP

CSERROR

TRAP

CSESCAPE
L10063-.

.WORD

010110

CSERROR

sODON’'T CHECK FOR FINAL RXACT=}
1BR IF NO ERROR

ERROR

104410
001370

sREAD/CHECK MeXT CHARACTER
jee HOLE FOR NEXT EXPECTED CHARACTER

oT30TBL+S,R3

NCRACT

104460

$MASK OUT UNTRANSMITTED BITS

408

006
0

CSESCAPE

L10066-.

1SET UP DATA TABLE POINTER
s INSTALL NEXT EXPECTED RXx CHARACTER

BNE

cHP

CSERRCR

tREAD/CHKX DATA7(017), RCV FIRST FLAG
s+ AND CHECK FOR REOM=-1

s+ &€ CHECK RERR BIT=0 (GOOD CRC)

sOON'T CHECK FOR FINAL RDA=RXACT=1
1BR _IF NO ERROR
+REPORT

TST

STACKED ERROR

1SKIP TO END OF TEST

TRAP

ENDSUB

104403

CS$ERROR

CSESCAPE

L10063-.

CSESUB
i

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

:+ SUBROUTINE @ 4: 5 BIT CHARACTERS

DMVl

LINE UNIT

DIAGIL

MACRO M1200

22 -FFH-84

PAGE

90 8

SEG 0171

BGNSUB

104402
004537

000226
000005

007400

ERROR

104460

ESCAPE

104410
000344
010010

010010

104410

6610

TEST

JSR

RS, TXCTRL

;CLEAR TSOM

igg

RS, TXCHAR

;LOAD

BCC
ERROR

.+8.

;BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SUB

;SKIP TO END OF

CS$ERROR

TRAP

CSESCAPE

123(HEADER1),

TX 2ND FLAG

TEST

TRAP

;LOAD 321(MEADER2),

BCC
ERROR

.+8.

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SUB

:SKIP TO END OF

JSR

003734

PCR

007676

032310

104410
000234

032312
032316

012703
112337

033525
032326

032322
032326

000000

004537

007676

RS,WRITEI

L10067
-,

15T FLAG

RS, TXCHAR

Cs85U8

CSERROR

CSESCAPE

L10067-.

123(HEADER1)

TEST

TRAP

.WORD

104460

6611

;SKIP TO END OF

;LOAD 2ND FLAG,TX

gg?

007676

104410
000264

004537
120407
000245
004537
000111
000010
103003

STACKED ERROR

RS, TXCTRL

104460

6601

:REPORT

JSR
;son
800

007676

004537
000321
000010
103003

6597
6598
6599

SUB

TR/

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
;SET BOP MODE,CRC-CCITT-1,5/AR=226
sINITIALLY: TXCL=8 BITS / RXCL*5 BITS
:BR IF NO ERROR

. WORD

032234

032236
032236
032240

125.4;

JSR
RS, INITRN
SYNCH
BIT2!BITO
BCC
.+8.

103003

032202
032206
032210
032212
032216
032220
032222
032226
032230
032232
032234

6612
6613
6614
6615
6616
6617

15:31

BOP RX CHARACTER LENGTH TEST

032160
032160
032160
032162
032166
032170
032172
032174
032174
032176
032176
032200

6595

Clda

CSERROR

CS$ESCAPE
L10067-.

sNOW CHANGE TXCL TO S BITS TOO

BIT7!BITS!BIT2!BITO
e
RS, TXCHAR
JSR

:LOAD

8.
8CC
ERROR

.+8.

1BR_IF NO ERROR
+REPORT STACKED ERROR

ESCAPE

SUB

1SKIP TO END OF

111(DATA1),

321(HEADER2)

TEST

——
TRAP

.WORD

‘--..-.-.......-.-..-.....-.-......-..........-..-.....-.......-..l'I.-

10¢:

MOV
MOVB

0T30TBL+1,R3
(R3)+,18

1SET UP DATA TABLE POINTER
s INSTALL NEXT TX CHARACTER

1%:

JSR
000

RS, TXCHAR

s TRANSMIT CHARACTER ( ==> RX/FIFO
;¢ HOLE FOR NEXT CHARACTER «»

)

CSERROR
CSESCAPE
L10067-.

D14
DMv11l

LINE

UNIT

DIAGL

MACRO M1200

Jo FFB-84

15:31

5.
8CC

.+8,

ESCAPE

SuUB

PAGE

90 9

SEQ 0172

BOP RX CHARACTER LENGTH TEST

032330
032332
032334

000005

103003

ERROR

1BR_IF NO ERROR

sREPORT STACKED ERROR

032334
032336
032336
032340

104410
000204

032342
032346

022703
001363

033533

032350
032354
032356
032360
032364

004537
000002

010010

JSR
;T)ECH

RS, TXCTRL

;SET

004537
000044

o11614

ggR

RS,STEPLY

032366
032372
032374
032376
032400
032402

004537
000523
000000
100000
103003

010110

JSR

RS ,RXCHAR

tREAD & CHX 123(HEADER1), RCV 321(HEADER2)

104460

1SKIP TO END OF

TEST

TRAP

.WORD

CcMP
BNE

@T30TBL+7,R3
10¢

CS$ERROR

CSESCAPE

L10067-.

:ALL CHARACTERS TRANSMITTED ?
;s IF NOT, TX ANOTHER ONE

‘....-....--...-.......-'.--.III.-.'......--.-.I.l‘-....'..I-'.'l..IIII

032402
032404
032404
032406

032410
032414
032416
032420
032422
032424
032424
032426
032426
032430

000000

gXSG“!IZS

NOCRDA

.+8.

ESCAPE

SuUB

ERROR

104460
104410
000136

004537
000321
002000
100000
103003

8CC

;

AND

TEOM
TX DATA7

SOME FLAGS

€ CHECK FOR RSOM=1

sNO INITIAL CHECK OF RDA=0
:BR _IF NO ERROR

;REPORT STACKED ERROR
:SKIP

TO END OF

TEST

TRAP
TRAP

.WORD

..slgl:

010110

RS ,RXCHAR

NOCRDA
8CC

.+8,

ESCAPE

SuUB

ERROR

104460
104410
000114

CSERROR
CS$ESCAPE

L10067-.

:READ/CHECK 321(HEADER2),RCV 011(DATA1)

sNO INITIAL CHECK OF RDA=0
:BR _IF NO ERROR

sREPORT STACKED ERROR
$SKIP TO END OF

TEST

TRAP

CSERROR

TRAP

CSESCAPE

.WMORD

L10067-.

'-.-...--l..-.......-..-.-.I.-..'......-..............-...-..---I..I.I-

032432
032436

012703
112337

033524
032454
000340

032450
032454
032456
032460
032462
032464
032464
032466
032466
032470

004537
000000
000000
100000
103003

010110

032472
6661 032476
6662

022703
001357

032442

6659

142737

032454

40%:

4%:

MOV

0T307TBL ,R3

:SET UP DATA TABLE POINTER

8ICB

€340,4¢

sMASK OUT UNTRANSMITTED BITS

JSR

RS ,RXCHAR

MOVB

800

NOCRDA
8CC

.+8.

ESCAPE

SUB

ERROR

104460
104410
000054

(R3).,4%

s INSTALL NEXT EXPECTED RX CHARACTER

sREAD/CHECK NEXT CHARACTER

;¢ HOLE FOR NEXT EXPECTED CHARACTER

sNO INITIAL CHECK OF RDA=0
:BR _IF NO ERROR

sREPORT STACKED ERROR
1SKIP TO END OF

TEST

TRAP
TRAP

.WORD

033531

cMP

BNE

@T30TBL +5,R3

sALL CHARACTERS CHECKED ?
:+

IF NOT, CHECK ANOTHER ONE

CSERROR
CSESCAPE

L10067-.

CNDMCAO DMV1l LINE UNIT DIAGL
TEST 25

MACRO M1200

004537
000026

6666 032510
6667 032512

020000
103003

6665 032506
6668 032514
032514

6671 032522

004537

6673 032530

000000

6674 032532
6675 032534

6676 032536

001037

SEGQ 0173

032542
6678 032544

000760

— 032544

104403

032544

RS ,RXCHAR

010110

.+8.

:OON’'T CHECK FOR INITIAL RDA=0
:BR_IF NO ERROR

ESCAPE

TST

:SKIP TO END OF

JSR

RS ,RXCHAR

sREAD/CHK DATA7(037),

;REPORT STACKED ERROR
TEST

:+ € CHECK FOR REOM=1

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10063-.

RCV FIRST FLAG

NFCRDA !NCRACT

sDON'T CHECK FOR FINAL RDA=RXACT=1

ERROR

;REPORT STACKED ERROR

8CC

.+8.

ESCAPE

TST

:BR IF NO ERROR
:SKIP TO END OF

TEST

TRAP

CSERROR

TRAP

CSESCAPE

TRAP

CS$ESUB

.WORD

ENDSUB

‘

RCV DATA7?

s+ € CHECK RERR BIT=0 (GOOD CRC)

RXEOM!037

104410

tREAD/CHK DATAE(026),

NCRACT
8CC

ERROR

103003
104460

L10067:

L10063-.

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

: SUBROUTINE @ 5: 6 BIT CHARACTERS
‘

6682 032546

032546

104402
004537
000226
000006
103003

032570
032574
032576
032600
032604
032606
032610
032614
032616
032620
032622
032622
6701 032624
032624

004537
000001
000007
004537
000000
000000
004537
000123
000010
103003

— 032626

104410
000304

6703 032630

004537

6690
6691
6692
6693
6694
6695
6696
6697
6698
6699
6700

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

BGNSUB

032546
032550
032554
032556
032560
032562
032562
032564
032564
032566

——

PAGE 90 10

RERCHK

060000

032536
6677 032540

032540

JSR
026

104460
104410
001002

6672 032526

010110

000001

6669 032516
032516
— 032520

6688

15:31

BOP RX CHARACTER LENGTH TEST

6663 032500
6664 032504

6683
- 6684
6685
6686
6687

22-FEB-84

007400

104460

125.5:

JSR
R5,INITRN
SYNCH
BIT2!BIT1
8CC
.+8.
ERROR

TR
:LOAD 1 SOM, CLK TX UNTIL ACTIVE
+SET BOP MODE,CRC-CCITT-1,S5/AR=226
s INITIALLY: TXCL=8 BITS / RXCL=6 BITS
:BR _IF NO ERROR
sREPORT STACKED ERROR
TRAP
:SKIP TO END OF TEST
TRAP
.WORD

ESCAPE

SuB

010010

JSR
TSOM

RS, TXCTRL

:LOAD 2ND FLAG,TX

010010

JSR
000
0
JSR
123
8.
8CC
ERROR

RS, TXCTRL

:CLEAR TSOM

RS, TXCHAR

;:LOAD 123(HEADERL1),

.+8.

:BR _IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

SUB

:SKIP TO END OF

JSR

RS, TXCHAR

:LOAD 321(HEADER2),

104410
000344

007676

104460

007676

csssuB

CS$ERROR

CSESCAPE
L10070-.

1ST FLAG

TEST

TX 2ND FLAG

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10070-.

TX 123(HEADER1)

CNDMCAQ DMV1l LINE UNIT DIAGL
TEST 25

22-FEB-84

15:31

PAGE 90-11

SEQ 0174

BOP RX CHARACTER LENGTH TEST

032634
032636
032640
032642
032642
6708 032644
032644
032646
6709
6710 032650
6711 032654
6712 032656
6713 032660
6714 032664
6715 032666
6716 032670
6717 032672
032672
6718 032674
032674
032676
6719
6720 032700
6721 032704
6722
6723 032710
6724 032714
6725 032716
6726 032720
6727 032722
032722
6728 032724
032724
032726
6729
6730 032730
6731 032734
6732
6733 032736
6734 032742
6735 032744
6736 032746
6737 032752
6738
6739 032754
6740 032760
6741 032762
6742 032764
6743 032766
6744 032770
032770
6745 032772
032772
032774
6746
6747 032776
6748 033002
6704
6705
6706
6707

MACRO M1200

000321
000010

321
8.
8CC
ERROR

103003

104460
104410
000264

004537
120407
000306
004537

000111
000010

003734
007676

104410
000234

STACKED ERROR

SuUB

:SKIP TO END OF TEST

JSR
PCR

RS,WRITEI

sNOW CHANGE TXCL TO 6 BITS T0O

BIT7!BIT6!BIT2!BIT1
RS, TXCHAR
JSR

;LOAD 111(DATA1l),

8.
8CC

.+8.

:BR _IF NO ERROR

ESCAPE

SUB

:SKIP TO END OF TEST

ERROR

104460

1BR IF NO ERROR

+REPORT

ESCAPE

111

103003

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10070-.

TXx 321(HEADERZ2)

+REPORT STACKED ERROR

TRAP

CS$ERROR

TRAP

CSESCAPE

.WORD

012703

033525
032714

004537
000000

007676

112337

.+8.

000006

103003
104460

104410
000204

10¢:
1$:

:SET UP DATA TABLE POINTER
s INSTALL NEXT TX CHARACTER

MOV
MOVB

@T30TBL+1,R3
(R3)+,18

JSR
000
6.
8CC
ERROR

RS, TXCHAR
.+8.

:BR _IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

SuUB

:SKIP TO END OF

: TRANSMIT CHARACTER (

==> RX/FIFO

s*+ HOLE FOR NEXT CHARACTER s

)

TRAP

TEST

TRAP

.WORD

022703
001363

033533

004537
000002
000000
004537
000044

010010

cMP
BNE

@T30TBL+7,R3
10¢

L10070-.

CSERROR
CSESCAPE

L10070-.

sALL CHARACTERS TRANSMITTED ?
: IF NOT, TX ANOTHER ONE

‘-......-.....-........-..----.-.-.......--.I--l..I-.-...-.-.-'.'...l-'

004537
000523
000000
100000
103003

011614
010110

104460

104410
000136
004537
000321

JSR

RS, TXCTRL

;SET TEOM

JSR
36.

RS,STEPLV

s+ AND TX DATA7 + SOME FLAGS

JSR

RS ,RXCHAR

sREAD € CHKX 123(HEADER1), RCv 321(HEADER2)

NOCRDA
8CC
ERROR

.+8,

sNO INITIAL CHECK OF RDA=0
:BR IF NO ERROR

ESCAPE

SuUB

:SKIP TO END OF

TEOM
0

8XSOH!123

+ € CHECK FOR RSOM=1

;REPORT STACKED ERROR

TEST

3
010110

JSR
321

RS ,RXCHAR

TRAP

CSERROR

TRAP

CSESCAPE

.WORD

:READ/CHECK 321(HEADER2),RCV 011(DATAl)

L10070-.

CNDMCAO DMV11 LINE UNIT DIAGL
1esT 25

000000
100000
103003

0
NOCRDA

15:31

ESCAPE

SuB

104410
000114

PAGE

90-12

SEG 0175

:NO INITIAL CHECK OF RDA=0
+BR IF NO ERROR

;REPORT STACKED ERROR

TRAP

:SKIP TO END OF TEST

TRAP

.WORD

033524
033042
000300

033036
033042
033044
033046
033050
033052
033052
6765 033054
033054
033056
6766
6767 033060
6768 033064
6769
6770 033066
6771 033072
6772 033074
6773 033076
6774 033100
6775 033102
033102
6776 033104
033104
033106
6777
6778 033110
6779 033114
6780 033116
6781 033120
6782 033122
6783 033124
033124
6784 033126
033126
033130
6785 033132
033132
033132

004537
000000
000000
100000
103003

010110

6789 033134
033134
033134

.+8,

ERROR

012703
112337
142737

033030

B8CC

104460

033020
033024

6/86
6787
6788

22-FEB-84

G144

BOP RX CHARACTER LENGTH TEST

6749 033004
6750 033006
6751 033010
6752 033012
033012
6753 033014
033014
033016

6754
6755
6756
6757
6758
6759
6760
6761
6762
6763
6764

MACRO M1200

033042

40¢:

4%:

MOV
MOvVB
8ICB

2300,48

JSR

RS ,RXCHAR

800

104410
000054

s INSTALL NEXT EXPECTED RX CHARACTER

tMASK OUT UNTRANSMITTED BI1S

sREAD/CHECK NEXT CHARACTER

;#+

HOLE FOR NEXT

EXPECTED

.+8.

:NO INITIAL CHECK OF RDA=0
:BR _IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SuB

:SKIP TO END OF TEST

CHARACTER

033531

cMP
BNE

#T30TBL+S5,R3
404

:ALL CHARACTERS CHECKED ?
: IF NOT, CHECK ANOTHER ONE

004537
000066
000001
020000
103003

010110

JSR
066
RERCHK
NCRACT
8CC
ERROR

RS ,RXCHAR

:READ/CHK DATA6(066), RCV DATA?

ESCAPE

TST

104460
104410
000414

004537
001077
000000
060000
103003

104403

104402

s+ &€ CHECK RERR BIT=0 (GOOD CRC)
sDON'T CHECK FOR INITIAL RDA=0
:BR IF NO ERROR
s+REPORT STACKED ERROR
:SKIP TO END OF TEST

010110

JSR

RS ,RXCHAR

gXEOH!O77

NFCRDA!NCRACT

sREAD/CHK DATA7(077),

:+ € CHECK FOR REOM=1

.+8.

:BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF TEST

ENDSUB

C$ESCAPE

L10070-.

TRAP

CS$ERROR

TRAP

CSESCAPE

L10063-.

RCV FIRST FLAG

:DON’T CHECK FOR FINAL RDA=RXACT=1

B8CC

ERROR

CSERROR

.WORD

104460

104410
000372

TRAP
TRAP

022703
001357

.+8.

CS$ESCAPE

L10070-.

:SET UP DATA TABLE POINTER

NOCRDA
8CC
ERROR

104460

oT30TBL,R3
(R3).,4s

CS$ERROR

;REPORT STACKED ERROR

L10070

125.6

TRAP

CS$ERROR

TRAP

.WORD

CSESCAPE
L10063-.

TRAP

CSESUB

TRAP

csBsuB

CNDMCAO DMV11l LINE UNIT DIAG1
TEST 25

MACRO M1200

22-FEB-84 15:31

H1d

PAGE 90-13

SEQ 0176

BOP RX CHARACTER LENGTH TEST

6790
6791
6792
6793
6794

033136
033142
033144
033146
033150
033150
6795 033152
033152
c70g 033154

004537
000226
000007
103003

6797
6798
6799
6800
6801
6802
6803
6804
6805
6806
6807

033156
033162
033164
033166
033172
033174
033176
033202
033204
033206
033210
033210
6808 033212
033212
cace 033214

004537
000001
000007
004537
000000
000000
004537
000123
000010
103003

6810 033216
6811 033222
6812 033224

004537
000321
000010

6813 033226

6814 033230
033230
6815 033232
033232

007400

104460

104410
000333
010010
010010
007676

104460
104410
000304
007676

103003
04460

104410

000264

6817
6818
6819
6820
6821
6822
6823
6824

033236
033242
033244
033246
033252
033254
033256
033260
033260
6825 033262
033262
033264

004537
120407
000347
004537
000111
000010
103003

6827 033266
6828 033272

012703
112337

033525
033302

6830
6831
6832
6833
6834

004537
000000
000007
103003

007676

033276
033302
033304
033306
033310

RS, INITRN

ESCAPE

SUB

JSR
TSOM
7.
JSR
000
0
JSR
123
8.
BCC
ERROR

RS, TXCTRL

;:LOAD 2ND FLAG,TX

RS, TXCTRL

;CLEAR TSOM

RS, TXCHAR

:LOAD

.+8.

:BR IF NO ERROR
:REPORT STACKED ERROR

ESCAPE

SUB

:SKIP TO END OF

JSR
321
8.

RS, TXCHAR

;LOAD 321(HEADER2),

.+8.

BCC

.+8.

ESCAPE

SUB

ERROR

caye 033234

“26

JSR
SYNCH
RXDL
BCC
ERROR

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
:SET BOP MODE,CRC-CCITT-1,5/AR=226
sINITIALLY: TXCL=8 BITS / RXCL=7 BITS
:BR_IF NO ERROR
;REPORT STACKED ERROR
TRAP
:SKIP TO END OF TEST
TRAP
.WORD

JSR
RS,WRITEI
PCR
TXDL fRXDL
JSR
RS, TXCHAR

007676

111
B,
BCC
ERROR

104460

ESCAPE

104410
000234

123(HEADER1),

TX 2ND FLAG

TEST

TRAP

CSERROR

TRAP
.WORD

C$ESCAPE
L10071-.

123(HEADER1)

:BR IF NO ERROR

:REPORT STACKED ERROR

:SKIP TO END OF TEST

TRAP
TRAP

sNOW CHANGE

TXCL

;LOAD 111(DATA1),

18:

C$ERROR
CSESCAPE

L10071-.

TO 6 BITS TOO
TX 321(HEADER2)

.+8.

:BR IF NO ERROR
;REPORT STACKED ERROR

SUB

1SKIP TO END OF TEST

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10071-.

‘.I.I......-.--...-..--..--.-....-.-...................-...-J.-.--l...-

10s:

C$ESCAPE
L10071-.

1ST FLAG

.WORD

003734

CSERROR

MOV
MOVB

oT30TBL+1,R3
(R3)e,1$

;SET UP DATA TABLE POINTER
:INSTALL NEXT TX CHARACTER

JSR
000
7.
BCC
ERROR

RS, TXCHAR

: TRANSMIT CHARACTER ( ==> RX/FIFO
;4% HOLE FOR NEXT CHARACTER s

.+8.

:BR IF NO ERROR
:REPORT STACKED ERROR

)

CNDMCAO DMV1l LINE UNIT DIAGL
TEST 25

MACRO M1200

22-FEB-84

15:31

114

PAGE 90-14

SEQ 0177

BOP RX CHARACTER LENGTH TEST

033310
6835 033312
033312
033314
6836
6837 033316
6838 033322
6339
6840 033324
6841 033330
033332
033334
033340

104460

ESCAPE

104410

004537
000002
000000
004537
000044

010010

033342
033346
033350

004537
000523
00C000

010110

033354

103003

033360
033362

104410
000136

033364

004537

033374

100000

033376

033400

#T30TBL+7,R3
10¢

JSR
TEOM
0
JSR
36.

011614

TRAP

C$ESCAPE

L10071-.

sALL CHARACTERS TRANSMITTED ?
¢+ IF NOT, TX ANOTHER ONE

000321
000000

010110

012703
112337
142737

033524
033430
000200

033424
033430
033432
033434
033436

004537
000000
000000

010110

AND TX DATA7

SOME FLAGS

sREAD &€ CHK 123(HEADER1),
: &€ CHECK FOR RSOM=1

RCV 321(HEADER2)

:NO INITIAL CHECK OF RDA=0

SuUB

:SKIP TO END OF TEST

JSR

RS ,RXCHAR

sREAD/CHECK 321(HEADER2),RCV O011(DATAl)

8CC

. +8.

:BR_IF NO ERROR

ESCAPE

SuUB

:SKIP TO END OF TEST

ERROR

033406
033412
033416

ESCAPE

NOCRDA

104410
000114

R5,STEPLU

.+8.

321
0

103003

033402
033404

:SET TEOM

8CC

ERROR

104460

RS, TXCTRL

JSR
RS ,RXCHAR
RXSOM!123
0

NOCRDA

033400

033402

CcMP
BNE

100000

104460

033370
033372

C$ERROR

‘...-.--II.-........--'...’.'-II’8-I’.-...--.---...-I.I..-.'--.-II-’-IS

033356

033360

TRAP

TEST

.WORD

033533

033356

:SKIP TO END OF

000204

022703
001363

033352

SuUB

:BR IF NO ERROR

;REPORT STACKED ERROR

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10071-.

:NO INITIAL CHECK OF RDA=0

;:REPORT STACKED ERROR

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10071-.

'.-.--.--.........--..-'--.-.-...............-.-........--.-I-.---.....

6871 033440
033440
6872 033442
033442
033444
6873
6874 033446
6875 033452
6876
6877 033454
6878 033460
6879 033462

033430

40$:

MOV
MOVB
8ICB

0730TBL ,R3
(R3)+,4%
€200,4¢

:SET UP DATA TABLE POINTER
s INSTALL NEXT EXPECTED RX CHARACTER
sMASK OUT UNTRANSMITTED BITS

4%:

JSR
000
0

RS ,RXCHAR

sREAD/CHECK NEXT CHARACTER
i#+ HOLE FOR NEXT EXPECTED CHARACTER

100000
103003

.+8,

iNO INITIAL CHECK OF RDA=0
:BR_IF NO ERROR

ESCAPE

SUB

:SKIP TO END OF TEST

CMP
BNE

0T30TBL+5,R3
40

sALL CHARACTERS CHECKED ?
:+ IF NOT, CHECK ANOTHER ONE

ERROR

104460
104410
000054

022703
001357

033531

004537
000066

010110

‘ LA R

000001

NOCRDA
8CC

LEREEEREEEEREEREREEEREREEEEEEEEEEEREEEREEEEEEEERERRRRRRRR

JSR
066

;REPORT STACKED ERROR

RERCHK

RS ,RXCHAR

sREAD/CHK DATA6(066),

RCV DATA?
’

& CHECK RERR BIT=0 (GOOD CRC)

TRAP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10071-.

CNDMCAO DMV11l LINE UNIT DIAGL
TEST 25

MACRO M1200

22-FEB-84

15:31

PAGE

J14

90-15

SEQ 0178

BOP RX CHARACTER LENGTH TEST

6880 033464
6881 033466
6882 033470
033470
6883 033472
033472
033474
6384
6885 033476
6886 033502
6887 033504
6888 033506
6889 033510
6890 033512
033512
6891 033514
033514
033516
6892 033520
033520
033520
6893 033522
033522
033522

033524
033525
033526
033527
033530
033531
033532

020000
103003

104460

104410
000026
004537
001177
000000
060000

010110

ESCAPE

TST

:DON'T CHECK FOR INITIAL RDA=0
:BR IF NO ERROR

:REPORT

TEST

TRAP

C$ERROR

TRAP

CS$ESCAPE
L10063-.

JSR

RS,RXCHAR

:READ/CHK DATA7(177), RCv FIRST FLAG
+ £ CHECK FOR REOM=1

BCC
ERROR

.+8,

:BR_IF NO ERROR
+REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

;:DON’'T CHECK FOR FINAL RDA=RXACT=1

ENDSUB

TRAP
TRAP

L10071:

ENDTST

L10063:

104401
111
222
333
044
155
266
377

STACKED ERROR

:SKIP TO END OF

RXEOM!177
0
NFCRDA!NCRACT

104460

104403

.+8.

. WORD

103003

104410
000004

NCRACT
BCC
ERROR

30TBL:
. BYTE

.BYTE
.BYTE
.BYTE
.BYTE
BYTE
BYTE
EVEN

111

222
333
044
155
266
377

;02
;D3
;04
;05
;D6
;D7

CSERROR

CSESCAPE

.WORD

L10063-.

TRAP

C$ESLB

TRAP

CSETST

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 26

MACRO M1200

22-FEB-84

15:31

<14

PAGE 91

SEQ 0179

"SPACING SEQUENCE"

6911

.SBTTL

TEST 26

"SPACING SEQUENCE"

144208

RRRRARR AR RRRARRRRRARRAARRAER AR 2420020000808 00 0000000400000

000000000

1 *

i *
i#
:#
i#
i*
2

TEST 26 -- TX "SPACING SEQUENCE"
THE
TRANSMITTER IS INITIALIZED AND THE "SPACING SEQUENCE” IS FORCED
BY
ASSERTING BOTH
TSOM &
TEOM AT THE SAME TIME -- CHECK THE BIT
STREAM FOR ACCURACY (SPACES) AND COMPLETNESS (16 OF THEM). WHEN TXBE
GOES HIGH (=
1)
A
SMALL
MESSAGE
IS SENT.

:--o.oao.oo..o..oa.aoa.-oaoao..ooa.oooaaacoooo..oaaaaaaoocoot.oaooo.o.o.oa..ao
3

033534
6912 033534

6913

6914
6915
6916
6917
6918
6919
6920
6921
6922
6923
6924

3
004737

BGNTST

JSR

005420

PC, INIDMV

T26:

;sINIT VIA

: SET UP USYRT AND VIA REGISTERS
‘

JSR

RS,WRITEI

:SET ACR FOR T1 ONE-SHOT MODE

JSR

RS,WRITEI

sLOAD VIA TiL-L

003734

JSR

RS,WRITEI

;:LOAD VIA TiL-H

003734

JSR

RS,.WRITEI

;RESET THE USYRT

033540
033544
033546
033550

004537
120013
000200
004537

033556
033560
033564
033566

000300
004537
120007
000000

6926
6927
6928
6929
6930
6931

033570
033574
033576
033600
033604
033606

004537
120000
000031
004537

120000
000030

6933
6934
6935
6936
6937
6938

033610
033614
033616
033620
033624
033626

004537
120404
000000
004537
120405
000007

003734

6940 033630
6941 033634
6942 033636

004537
120000
000172

003734

6944
6945
6946
6947

004537
000001
103003

006036

033554

033640
033644
033646
033650
033650
6948 033652
033652
033654

120006

104460
104410
000234

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

003734
003734

003734

VIAACR
200
VIAT1C
300

VIAT1D
000
VIAORB

RTSND!DTR!PRESET

JSR

RS,WRITEI

;CLEAR USYRT RESET BIT

JSR

RS,WRITEI

;LOAD USYRT PCSARL

JSR

RS,.WRITEI

;LOAD USYRT PCSARH

VIAORB
RTSND!DTR
PCSARL
000
PCSARH

xXyZ

:(NO ERROR CHECKING)

JSR

RS,WRITEI

:SET UP USYRT

.ilSR

RS,CKTBMT

;CHK FOR TBMT =

8CC

.+8.

: IF NO ERROR,

ESCAPE

TST

VIAORB
RTSND ! TXEN!RXEN!DTR!TTLOOP

ERROR

PROCEED

;:ELSE, REPORT IT AND

EXIT THIS TEST

TRAP
.WORD

CSERROR
CSESCAPE

L10072-.

DMV11l LINE UNIT

DIAGL

PAGE 91

SEG 0180

RS, TXCTRL

:SET TSOM AND TEOM

011614

JSR

RS,STEPLV

:1 TICK TO START SPACE SEQUENCE

007256

gSR

RS,SERIAL

+READ 000 CHARACTER VIA TSO
:+ 8 BIT CHAR/CLOCK TICKS
:+ EXPECTED BIT SEQUENCE (0000000)
:BR IF NO ERROR
+REPORT STACKED ERROR

010010

033666
033672

004537
000001

033674
033700
033702
033704
033706
033706
033710
033710
033712

004537
000010
000000
103003

033714
033720
033722
033724
033724

004537
000001
103003

104410
00C176

006036

104460
104410
000160

033732
033736
033740

000001
000000

6$:

TSOM!TEOM
0

000

104460

033726
033726
033730

033776

15:31

JSR

004537
000003
000000

033762
033766
033770
033772
033772
033774
033774

22-FEB-84

"SPACING SEQUENCE"

033656
033662
033664

033742
033746
033750
033752
033754
033754
033756
033756
033760

MACRO M1200

8CC
ERROR

.+8.

ESCAPE

TST

("SPACING SEQUENCE")

:AND EXIT TEST

fSR

RS,CKTBMT

;CHK FOR TBMT = 1

8CC
ERROR

.+8.

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

ESCAPE

TST

;

EXIT THIS TEST

C$ERROR

TRAP

.WORD

CS$ESCAPE
L10072-.

TRAP

CSERROR

TRAP

CSESCAPE
L10072-.

.WORD

004537

010010

JSR

RS, TXCTRL

;:CLEAR TEOM

004537
000010

007256

gSR

RS,SERIAL

TSOM
0

B8CC

.+8.

;:READ 000 CHARACTER VIA TSO
: 8 BIT CHAR/CLOCK TICKS
:+ EXPECTED BIT SEQUENCE (00000000)
:BR_IF NO ERROR

ESCAPE

TST

:AND EXIT TEST

000

000000

103003

ERROR

104460
104410
000130
004537
000001
103003

TRAP

;REPORT STACKED ERROR

TRAP

C$ERROR

TRAP

CSESCAPE

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE

.WORD

006036

fSR

RS,CKTBMT

;CHK FOR TBMT = 1

B8CC

.+8.

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

ESCAPE

TST

;

ERROR

104460

104410
000112

EXIT THIS TEST

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

034000
034004
034006
034010
034014

004537
120402
000125
004537
000000

003734
010010

TDSRL
125

JSR

000

RS,WRITEI

:LOAD 125 CHARACTER

RS, TXCTRL

;:CLEAR TSOM

L10072-.

M14
DMV11l LINE UNIT DIAG1
--

MACRO M1200

22-FEB-84

15:31

PAGE 91-2

SEG 0181

"SPACING SEQUENCE
"

034016

000000

034020
034024
034026
034030
034032
034032
034034
034034
034036

004537
000010
000176
103003

104410
000052

034040
034044
034046

004537
120402
000252

003734

JSR
TDSRL
252

RS,WRITEI

:LOAD 252 CHARACTER

034050
034054
034056
034060
034062
034062
034064
034064
034066

004537
000010
000252
103003

007256

JSR
8.
252
B8CC
ERROR

RS,SERIAL

;READ 1ST DATA CHARACTER (125) VIA TSC
;+ 8 BIT CHAR/CLOCK TICKS
: EXPECTED BIT SEQUENCE (01010110)
:BR IF NO ERROR

ESCAPE

TST

034070
034074
034076
034100
034102
034102
034104
034104
034106
034110
034110
034110

0
007256

R5,SERIAL

;READ FLAG CHARACTER (176) VIA

8CC
ERROR

.+8.,

+ EXPECTED BIT SEQUENCE (01111110)
:BR _IF NO ERROR

ESCAPE

TST

:AND EXIT TEST

JSR
8.
176

104460

:+ 8 BIT CHAR/CLOCK TICKS
+REPORT

STACKED ERROR

TRAP

.WORD

104460

104410

.+8.

;REPORT STACKED ERROR

:AND EXIT TEST

000022

004537
000010
000125
103003

007256

104401

TRAP

CS$ESCAPE
L10072-.

8CC

.+8.

ESCAPE

TST

:AND EXIT TEST

ERROR

ENDTST

R5,SERIAL

:REPORT STACKED ERROR

L10072:

C$ESCAPE

L10072-.

CSERROR

:READ 2ND DATA CHARACTER (252) VIA TSO
: 8 BIT CHAR/CLOCK TICKS
; EXPECTED BIT SEQUENCE (10101010)
:BR IF NO ERROR

JSR
8.
125

CSERROR

TRAP

.WORD

104460
104410
000002

TSO

TRAP

CS$ERROR

TRAP

.WORD

CS$ESCAPE
L10072-.

TRAP

CSETST

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 27

MACRO M1200

FIFO OVERRUN INTEGRITY

7037

22-FEB-84

15:31

N14

PAGE 92

SEQ 0182

TEST

.SBTTL
e A2

TEST 27

-- FIFO OVERRUN INTEGRITY

22020242000 R KRR

ARRRRE LR

TEST

AR R AR L RARRAARS AL AL LAAAARSA

AR AL AR R AR AL L044S

TEST 27 -- FIFO OVERRUN INTEGRITY TEST

)

;# THIS TEST BEGINS BY SYNCHRONIZING THE RECEIVER AND THEN PROCEEDS TO FILL

:+* THE 8 CHARACTER RECEIVER FIFO UNTIL RXOR WITH THE CHARACTERS:

(SYNCH),000,377,125,252,347,030,303,074,125.

;# THESE CHARACTERS ARE THEN READ OFF OF THE FIFO AND CHECKED. OF IMPORTANCE
;% IS THE INTEGRITY OF THE LAST OVERRUN-CAUSING FIFO CHARACTER (IT SHOULD

REMAIN

INTACT).

:# NOTE THAT NO CLOCKS ARE PROVIDED WHEN RZCEIVING THE
T

agfi SU%?LIED BY

THE FIFO

SUPPORT

LOGIC

IN GROUPS

OF 4

CHARACTERS SINCE THEY
TICKS

(WHEN

]
]

3-8

7039
7040
7041
7042
7043
7044

005420

034116
034122
034124
034126
034130

007400

7061
7062
7063
7064

AR R AR AR R AL RARARA A AR ARLALA AL LA AL 422048000000 0000000sb00bs

010010

:INIT DMV-11,

JSR

RS, INITRN

;LOAD 1 SOM,

B8CC

.+8.

;:BR IF NO ERROR

ESCAPE

TST

;SKIP TO END OF TEST

JSR
TSOM

RS, TXCTRL

;OUTPUT
:

JSR
000
o

RS, TXCTRL

;:CLEAR TSOM

034146
034152
034154

010010

‘

;s
‘

034156
034162

012702
112237

034462
034172

034166
034172
034174
034176
034200
034200
034202
034202
034204

004537
000000
100010
103003

007676

104460

104410
000254
022702

034475

T27::

PC, INIDMV

ERROR

034130

7065
7066 034206

DDCMP !NOCHK ! SYNCH

7045 034132

7049
7050
7051
7052
7053
7054
7055
7056
7057
7058
7059

JSR

034132
034134
7046 034136
7047 034142
7048 034144

BGNTST

034112
7038 034112

ENTER M-LOOP

CLK TX UNTIL ACTIVE

:SET DDCMP ,NO CHECK,SYNCH=226
;USE 8 BIT CHARS

;:REPORT STACKED ERROR

1ST SYNC CHARACTERS

TRAP

C$ERROR

TRAP
.WORD

CS$ESCAPE
L10073-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10073-.

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

FILL THE FIFO WITH CHARACTERS AND FORCE OVERRUN
............................................................

MOV

#TXTBLA ,R2

;SET UP TABLE POINTER

JSR

RS, TXCHAR

; TRANSMIT A CHARACTER

S$:

MOvVB

10¢:

000

(R2)+,104

NCTBMT#256. !8.

:SETUP TRANSMIT CHARACTER
;4 HOLE FOR NEXT TX CHARACTER

;NO CHECK OF INITIAL TBMT=0

BCC
ERROR

.+8.

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

;SKIP TO END OF TEST

CcMP

#TXEND4 ,R2

;CONTINUE TRANSMITTING UNTIL

CNDMCAO DMV11 LINE UNIT DIAGL
TEST 27

FIFO

7067 034212
7068
7069 034214
7070 034220
7071 034222
7072 034224

034224
7073 034226
034226
034230
7074

7075
7076
7077
7078
7079
7080
7081

MACRO M1200

OVERRUN INTEGRITY

001363
004537
000001

034254

7087 034260

006476

104460
104410
000230

SEG 01873

;sOVERRUN,

JSR

R5,CKROR

sVERIFY RECL..t- "/FRRUN OCCURED

8CC
ERROR

.+8.

;BR IF Ox

ESCAPE

;SKIP TO END OF TEST

sREPORT

STACKED ERROR

TRAP

CSERROR

TRAP

CS$ESCAPE
1007%-.

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

3
004537
000226
00C000
100000
103003

THE RECEIVER SHOULD HAVE OVERRUN.

THE REMAINING FIFO CHARACTERS

010110

JSR

SYNCH

0
NOCRDA
8CC
ERROR

104460

ESCAPE

104410
000206
004537
000000

010110

012702
112237

034465
034312

034306
034312
034314
034316
034320
034322

004537
000000
000000
100000
103003

010110

000000
100000

103003

104460

012702
004537
000333
100010
077205

.+8.

THE LAST ONE).

& CHX CHARACTER
sREAD
s

(THIS CHARACTER ISN'T AFFECTED)

:NO INITIAL CHECK OF RDA=0
i8R _IF NO ERROR
sREPORT STACKED ERROR

:SKIP .TO END OF TEST

TST

TRAP
TRAP

JSR
000
0
NOCRDA
8CC
ERROR

RS ,RXCHAR

ESCAPE

TST

15¢:

MOV
MOV

JSR
0co

034472

007676

30%:

CSESCAPE

L10073-.

.MAS
A "SYNCH" BEFORE OVERWRITTEN

.+8.

sNO INITIAL "CHECK OF RDA=0
1BR IF NO ERROR

sREPORT STACKED ERROR

sSKIP TO END OF TEST

TXTBL4.3 ,R2

(R2)+,208

RS ,RXCHAR

NOCRDA
8CC

.+8.

ESCAPE

TST

ERROR

CSERROR

tREAD €& CHX CHARACTER
8 (THIS IS THE OVERWRITTEN CHARACTER)

TRAP

CS$ERROR

TRAP

CSESCAPE
L10073-.

.WORD

104460

104410
000132
022702
001362

RS RXCHAR

VERIFY THIS AND READ/VERIFY

(ESPECIALLY

. WORD

034276
034302

034350
034352

PAGE

. WORD

104410
000164

034336
034342
034346

15:31

BNE
1

103003

034262
034264
034266
034270
034270
034272
034272
034274

034322
034324
034324
034326
034330
034334

22 FFB-84

TEST

034232
034236
034240
034242
7082 034244
7083 034246
034246
7084 034250
034250
034252

7085

R15

1SET UP TABLE POINTER
$SETUP EXPECTED CHARACTER

tREAD € CHK CHARACTER
se¢ HOLE FOR EXPECTED RECEIVE CMAR.

:NO INITIAL CHECK OF RDA=0

[
BNE

@TXEND4 -3,R2

MOV
JSR
333

04 ,R2
RS, TXCHAR

1BR_IF NO ERROR
;REPORT STACKED ERROR
:SKIP TO END OF TEST

TRAP
TRAP

. WORD

15¢

NCTBMT+256.
!8.
R2,30%
S08

: TRANSMIT 4 EXTRA CHARACTERS
;s TRANSMITTER UNDERRUN.

+FILLER CHARACTER

iNO CHECK OF INITIAL TBMT=0

TO AVOID

CSERROR

CSESCAPE

L10073-.

TEST

FIVD CVERRUN

7112

7113
7114
7115
7116

034354
034360
034362
034364
7117 034366
7118 034370
034370
7119 034372
034372
034374

004537
000303
000000
100000
103003

7121 034376
7122 034402
7123 034404
7124 034406
7125 034410
7126 034412
034412
7127 034414
034414
034416

004537
000074
000000
100000
103003

7120

7128
7129 034420

7130
7131
7132
7133
7134

034424
034426
034430
034432
034454
034434
7135 034436
034436
034440
7136
7137 034442

7138 034446
7139 034450
7140 034452
034452

7141 034454

034454

034456
7142 034460
034460
034460
7143
7144 034462
7145 034463

7146 034464
7147 034465
7148 034466
7149 034467
7150 034470
7151 034471
7152 034472
7153 034473
7154 034474

INTEGRITY

010110

104410
000042
010110

104410
000002

RS ,RXCHAR

NOCRDA
8CC

.+8.

ESCAPE

TST

JSR
074
0
NOCRDA

SEG H184

8CC

.+8.

ESCAPE

TST

sREAD & CHK CHARACTER

+NO INITIAL CHECK OF

RDA-0

1BR IF NO ERROR
sREPORT STACKED ERROK

:SKIP TO END OF

RS ,RXCHAR

JSR
125

TRAP

TEST

TRAP

01183

L10073-.

TRAP

CSERRCR

TRAP

CSESCAPE

TRAP

CSERROR

TRAP

.WORD

CSESCAPE
L10073-.

TRAP

CSERROR

TRAP

CSESCAPE

TRAP

CSETST

;READ & CHK CHARACTER

;BR IF NO ERROR

sREPORT STACKED ERROR
;SKIP

TO END OF

TEST

i READ & CHK FINAL

L10073-.

CHARACTER

.+8.

ESCAPE

TST

;¢ NO INITIAL CHECK OF RDA=0
;¢ BR IF NO ERROR

;¢ REPORT STACKED ERROR
;¢

SKIP

TO END OF

TEST

JSR

RS ,ENDTRN

1SHUT DOWN TRANSMITTER,

8CC
ERROR

.8,

:BR IF NO ERROR

ESCAPE

TST

;SKIP TO END OF

CSESCAPE

.WORD

NOCRDA
8CC
ERROR

CSERROR

siNO INITIAL CHECK OF RDA=0

R5 ,RXCHAR

104410
000020

104460

PAGE

.WORD

104460

103003

JSR
303

ERROR

104460

000011

1 5:31

TEST

ERROR

104410
000064

004537

o2 FFB-84

104460

004537
000125
000000
100000
103003

MACRO M1200

)
DIAGL

CNDMCAQ DMv1l LINE UNIT

RECEIVER

;REPORT STACKED ERROR
TEST

.WORD

L10073:

104401
226
226
000
377
125
252
347
030
303
074
125

L10073-.

CNDMCAO DMvLl LINE UNIT DIAGL
TEST 27

FIFO OVERRUN INTEGRITY

7155 034475

;%gé

MACRO M1200

000

22 FFB-84

15:31

TEST
TXEND4:

.BYTE

.EVEN

000

DL5S

PAGE 92 3

SEG 0145

CNDMCAO DMV11l LINE UNIT DIAGL
TEST 28

BCP RX OVERRUN SET

MACRO M1200
AND CLEAR

7177

22 FEB-84

E15
15:31

PAGE 93

TEST

.SBTTL

TEST

BCP RX OVERRUN SET

AND CLEAR

TEST

100000000000 000000000400000000000400000000000000000000000000000000000000000004
HL

i e

TEST 28

BCP RX

OVERRUN SET

AND CLEAR

TEST

;¢
e

i
i e

THE USYRT IS INITIALIZED AND THREE SUBTESTS ARE PERFORMED.
¢

-- AN OVERRUN CONDITICON IS FORCED, RECEIVER STATUS REGISTER IS
READ

TWICE:

THAT

THE

1 e

ONCE

FIRST

TO VERIFY

READ

ROR BIT

CLEARED ROR

AND AGAIN

TO VERIFY

)

-- AN OVERRUN CONDITION IS FORCED (BY
(2),

USYRT

1S VERIFIED.

e
L
HL
ie

THE

IS RESET

AND

THE

THE SAME TECHNIQUE USED IN

PROPER

STATE

ALL

REGISTERS

3 -- AN OVERRUN CONDITION IS FORCED (AS ABOVE). RXE IS THEN DROPPED
AND A DELAY IS PROVIDED TO ALLOW TIME FOR THE FIFO TO FLUSH
(CAUSED BY RDA GOING LOW). RXE IS THEN RE-INITIALIZED AND ROR
IS CHECKED = O. THE RECEIVER IS THEN RE-SYNCHED AND THE TEST IS
TERMINATED.

e
B

:--ooo‘o..o.ooooo.ooooooooooooooooooootoaocoo-ooooooooooaooaoooooaoooaoocoo.oo
b

034476

7178
7179 034476

034476
034476

BGNTST

;6808000000 s000s SUBTEST

104402

T28.1:

004737

005420

JSR

7182
7183
7184
7185
7186

004537
043626
000000
103003

007400

JSR
RS, INITRN
DDCMP !NOCHK !SYNCH
0
B8CC
.+8,
ERROR

7189 034524

7190 034530
7191
7192
7193
7194

034532
034534
034540
034542

7195 034544
7196 034550
;ig; 034552
7199
7200
7201
7202

034554
034560
034562
034564

T28::

sessssssssssssa

BGNSUB

;igg 034500
034504
034510
034512
034514
034516
034516
7187 034520
034520
- 034522

104460
104410
000112
004537

000001

000007
004537
000001
000010

010010

PC, INIDMV

ESCAPE

SUB

JSR

RS, TXCTRL

TSOM

7.
JSR

010010

004537
000000
000000

010010

004537
000000
103003

006476

TSOM
8.

s INIT DMV-11, ENTER M-LOOP
;LOAD 1 SOM, CLK TX UNTIL ACTIVE
;SET DDCMP, NO ERR CHECKING, SYNCH=226
;USE 8 BIT CHARS
:BR IF NO ERROR
sREPORT STACKED ERROR
;SKIP TO END OF

sOUTPUT

TEST

1ST SYNC CHARACTERS

H
RS, TXCTRL

;OUTPUT

2ND SYNC CHARACTER

JSR
000
0

RS, TXCTRL

sCLEAR TSOM

JSR
0
B8CC
ERROR

RS ,CKROR

;CHECK FOR RXOR

.+8,

;:BR IF NO ERROR
;REPORT STACKED ERROR

= 0

TRAP

csBsuB

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10075-.

SEG 0186

CNDMCAO DMV11 LINE UNIT DIAG1L
TEST 28

~MACRO M1200

22-FEB-34

15:31

PAGE

93-1

SEG 0187

BCP RX OVERRUN SET AND CLEAR TEST

034564
7203 034566
034566
034570
7204
7205 034572
7206 034576

104460
104410
000044

ESCAPE

SuB

;SKIP

T0 END OF

TEST

004537
000116

011614

JSR
78.

RS,STEPLV

sFORCE RECEIVER OVERRUN

7208 034600
7209 034604
7210 034606
7211 034610
034610
7212 034612
034612
034614

004537
000001

006476

JSR
1

RS,CKROR

;CHECK FOR RXOR

B8CC

.+8,

;BR IF NO ERROR

ESCAPE

TST

;SKIP

7214
7215
7216
7217

004537
000000
103003

7207

7213

034616
034622
034624
034626

034626
7218 034630

034630

103003

104410
000262

104410

000002

034634
034634

104403

7220
7221 034636

034636

034636
7222 034640
7223
7224 034644
7225 034650
7226 034652
7227 034654
7228 034656
034656
7229 034660
034660
034662
7230
7231 034664
7232 034670
7233 034672
7234 034674
7235 034700
7236 034702
7237 034704
7238 034710
7239 034712
7240 034714
7241 034720
7242
7243 034722

006476

104460

034632

7219 034634

ERROR

104460

;REPORT

TEST

JSR
0
8CC
ERROR

RS ,CKROR

;CHECK FOR RXOR

.+8.

;BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

SuB

;SKIP TO END OF

sssssss

TEST

L1007S:
SUBTEST

sesssssssssssns

BGNSUB
104402
004737

004537
043626
000000
103003

JSR

007400

JSR
RS, INITRN
DDCMP !NOCHK !SYNCH
0
8CC
.+8.
ERROR

104460

ESCAPE

104410
000054

004537
000001
000007
004537
000001
000010
004537
000000
000000

010010
010010

010010

004537

011614

004537

005126

000116

728.2:

005420

JSR
TSOM
7.
JSR
TSOM
8.
JSR
000
0

PC, INIDMV

SuB

RS, TXCTRL

s INIT DMV-11,

ENTER M-LOOP

sLOAD 1 SOM, CLK TX UNTIL ACTIVE
;SET DDCMP, NO ERR CHECKING, SYNCH=226
;USE 8 BIT CHARS
;:BR IF NO ERROR
;REPORT STACKED ERROR

;SKIP TO END OF TEST

sOUTPUT

1ST SYNC CHARACTERS

H
RS, TXCTRL

sOUTPUT 2ND SYNC CHARACTER

H
RS, TXCTRL

;:CLEAR TSOM

JSR

RS,STEPLVU

;FORCE RECEIVER OVERRUN

JSR

RS ,RSTCHK

;RESET USYRT/VERIFY SAME

78.

TRAP
.WORD

CS$ESCAPE
L10075-.

TRAP

C$ERROR

TRAP
. WORD

CSESCAPE

TRAP

CSERROR

TRAP

. WORD

CSESCAPE
L10075-.

TRAP

CsESUB

TRAP

csBsuB

TRAP

CSERROR

TRAP
.WORD

L10076-.

L10074
-,

= O

ENDSUB
;88808

CS$ERROR

’,

STACKED ERROR

TO END OF

TRAP

CSESCAPE

CNDMCAO DMV1l LINE UNIT DIAGL
TEST 28

7249

103003

034730

104460

034732
034734

104410
000142

034736

104403

7246 034732

7248

22-FEB-84

15:31

BCC

.+8.

G1"
PAGE

034736
034736

034740
034740
034740

ERROR

jottsssssssscsns

BGNSUB

104402

SUBTEST

034746
034752
034754

004537
043626
000000

007400

JSR
RS, INITRN
DDCMP !NOCHK!SYNCH
0

034760
7257 034762
034762
034764

104460
104410
000110

034766

004537

034774
034776
035002
035004
035006
035012
035014
035016
035022

000007
004537
000001
000010
004537
000000
000000
004537
000116

103003

000001

010010

.+8.

ESCAPE

SuB

TSOM

:
JSR
TSOM
8.
JSR
w00
0
JSR
78.

010010

010010
011614

PC, INIDMV

B8CC
ERROR

JSR

setscsssssssnsa

728.3:

JSR

034772

;SKIP TO END OF TEST

L10076:

005420

034756
034760

:BR IF NO ERROR

ENDSUB

004737

7255
7256

SEG 0142

;REPORT STACKED ERROR

ESCAPE TST

034742

7250
7251
7252
7253
7254

93 2

BCP RX OVERRUN SET AND CLEAR TEST

7244 034726
7245 034730

7247

MACRO M1200

s INIT DMV-11, ENTER M-LOOP

CSERROR

TRAP
.WORD

CS$ESCAPE
L10074 -,

TRAP

;:BR IF NO ERROR
sREPORT STACKED ERROR
;SKIP TO END OF TEST

;OUTPUT

RS, TXCTRL

cs8suB

TRAP

CSERROR

TRAP
. WORD

L10077-.

1ST SYNC CHARACTERS

;OUTPUT 2ND SYNC CHARACTER

;:CLEAR TSOM

sFORCE RECEIVER OVERRUN

004537
120000
000042

003734

035034
035040
035044

012701
004737
077103

000050
005312

035046
035052
035054

004537
120000
000142

003734

JSR
RS,WRITEI
VIAORB
TXEN!RXEN!TTLOOP

;TURN ON RECEIVER ENABLE (RXEN)

035056
035062
7285 035064

004537
000000
103003

006476

JSR
0
8CC

RS,CKROR

;:VERIFY CLEARING OF RECEIVER OVERRUN

.+8,

:BR IF NO ERROR

ESCAPE

SuB

;SKIP TO END 0OF TEST

7286 035066
035066
7287 035070
035070

035072

104460

104410
000002

JSR
RS,WRITEI
VIAORB
TXEN!TTLOOP

;:DROP RECEIVER ENABLE (RXEN)
: (RDA SHOULD ALSO DROF, WHICH WILL
s
CAUSE FIFO TO FLUSH ITSELF).

MOV
JSR
S0B8

;DELAY FOR NNN SEC.
s 7O FLUSH ITSELF.

ERROR

CSESCAPE

RS, TXCTRL

#50,R1
PC.WAITSO
R1,10%

CsESUB

TRAP

035024
035030
035032

10$:

sLOAD 1 SOM, CLK TX UNTIL ACTIVE
;SET DDCMP, NO ERR CHECKING, SYNCH=226
;USE 8 BIT CHARS

RS, TXCTRL

RS,STEPLU

TRAP

TO ALLOW FIFQ TIME

sREPORT STACKED ERROR

TRAP

CS$ERROR

TRAP
.WORD

L10077-.

CSESCAPE

CNDMCAO DMVl LINE UNIT
TEST 28

DIAGL

BCP RX OVERRUN SET

HL5
MACRO M1200
AND CLEAR

22 FEB-84

ENDSUB

104403

035076
035076

104401

7289 035076

PAGE 93 3

SEG 0149

TEST

7288 035074

035074
035074

15:31

L10077:

ENDTST

1.10074:

TRAP

CSESB

TRAP

CSETST

CNDMCAO DMV11l LINE UNIT
TEST 29

DIAGL

MACRO M1200

22 FEB-84

15:31

PAGE

213
94

SEGQ 0190

BCP RX SYNC CHARACTER RECOGNITION

.SBTTL

7302

TEST 29 -- BCP RX SYNC CHARACTER RECOGNITION

1008888080080

TEST 29

RRRRRRARR R RS RRRARARARL0 00000000000 0000 0208000000000 00000000040

-- BCP RX SYNC CHARACTER RECOGNITION

THE
FOLLOWING
MESSAGE
IS INITIATED WITHOUT ASSERTING RXE
THE DATA TS BEING TRANSMITTED, RXE IS ASSERTED (IE: «):

AND ONCE

SYNC « SYNC DATA DATA DATA SYNC SYNC SYNC SYNC SYNC DATA DATA DATA
SYNC SYNC DATA DATA DATA SYNC SYNC
THE
THE

RECEIVER SHOULD IGNORE THE FIRST STRING OF DATA CHARACTERS, USE
NEXT
TWO SYNC CHARACTERS FOR SYNCRONIZATION, THEN PASS THE REST

OF THE MESSAGE (7 SYNC AND 6 DATA CHARACTERS) THROUGH RXDB REGISTER.

-~ 228888 0080008000000 00084 0008000008000 0 0800000820082 00080020000000000000000

BGNTST

035100

T29::

035100

005420

JSR

PC, INIDMV

035104
035110
035112
035114
035116
035116
035120
035120
035122

007400

JSR
RS, INITRN
DDCMP ! NOCHK ! SYNCH
NORXEN
BCC
.+8.
ERROR

;LOAD 1 SOM, CLK TX UNTIL ACTIVE
;SET DDCMP,NO CHECK,SYNCH=226
;USE 8 BIT CHMARS; LEAVE RXEN=0
:BR IF NO ERROR
;REPORT STACKED ERROR
i

ESCAPE

;SKIP TO END OF TEST

035124
035130
035132
035134
035140
035142
035144
035150
035152

010010

TST

;INIT DMV-11, ENTER M-LOOP

TRAP

.WORD

010010

003734

JSR

RS, TXCTRL

;OUTPUT

JSR

RS, TXCTRL

;CLEAR TSOM

JSR

RS,WRITEI

;ENABLE RECEIVER (RXEN => 1)

;son

800

VIAORS

CSERROR
CSESCAPE

L10100-.

1ST SYNC CHARACTER

(IGNORED BY RECEIVER)

RXEN! TXEN! TTLOOP

; THE RECEIVER SHOULD IGNORE THE NEXT STRING OF CHARACTERS
035154
035160
035162
035164
035166
035166
035170
035170
035172

7331
7332 035174
7333 035200

004537

007676

000010

BCC

103003

ERROR

104460

ESCAPE

104410
000344
004537
000377

JSR
goo

RS, TXCHAR

.8
TST

;LOAD 000,

TX 2ND SYNCH

:BR IF NO ERROR

{REPORT STACKED ERROR
;SKIP TO END OF TEST

e
TRAP

.WORD

007676

JSR

377

RS, TXCHAR

;LOAD 377,

TX 000

CSERROR
CSESCAPE
L10100-.

CNDMCAO DMV1l LINE UNIT DIAGL
TEST 29

22-FEB-84

15:31

PAGE

94-1

SEG 0191

BCP RX SYNC CHARACTER RECOGNITION

7334 035202
7335 035204
7336 035206
035206
7337 035210

000010
103003

104460

035210
035212

104410
000324

7339 035214
7340 035220

004537
000125
000010
103003

7338

MACRO M1200

7341 035222
7342 035224
7343 035226

035226
7344 035230
035230
035232
7345
7346 035234

7347 035240
7348 035242
7349 035244
7350 035246

104460
104410
00C304
004537
000226
000010
103003

035246

104460

035250
035252

104410
000264

035254
035260
035262
035264
035264
035266
035266
035270

004537
000000

7351 ¢35250

007676

8.
8CC
ERROR

.+8.

:BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF TEST

;REPORT STACKED ERROR

TRAP

L10100-.

TRAP

CS$ERROR

TRAP

CSESCAPE

TRAP

CS$ERROR

TRAP

.WORD

CSESCAPE
L10200-.

TRAP

CSERROR

TRAP

CS$ESCAPE

Tx 377

JSR
125
8.
8CC
ERROR

RS, TXCHAR

:LOAD 125,

.+8.

:BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF TEST

;REPORT STACKED ERROR

JSR
SYNCH

RS, TXCHAR

:TX 125, LOAD SYNCH

B8CC

.+8.

:BR IF NO ERROR
;:REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

ERROR

006176

103003
104460

104410
000246

859

RS, CKRDA

8CC
ERROR

.+8.

ESCAPE

TST

C$ESCAPE

.WORD

007676

CSERROR

L10100-.

:CHECK RECEIVE DATA AVAILABLE
(NO DATA EXPECTED)
H
:BR IF NO ERROR

;REPORT STACKED ERROR

:SKIP TO END OF TEST

WORD

L10100-.

: THE RECEIVER SHOULD SYNCHRONIZE ON THE NEXT TWO SYNC CHARACTERS
; AND THEN READ THE REMAINING ONES.

035272
035276
035300
035302
035304
035304
035306
035306
035310

004537
000226
000010
103003

035312
035316
035320
035322
035324
035324
7374 035326

004537
000226
000010
103003

7368
7370
7371
7372
7373

007676

RS, TXCHAR

8CC

.+8.

ESCAPE

TST

ERROR

104460
104410
000226

104460

JSR
SYNCH

007676

JSR
SYNCH

RS, TXCHAR

8.
8CC
ERROR

.+8,

ESCAPE

TST

:LOAD 2ND SYNCH,

TX 1ST SYNCH

:BR _IF NO ERROR
;REPORT STACKED ERROR

:SKIP TO END OF TEST

TRAP

CS$ERROR

TRAP

.WORD

CSESCAPE
L10100-.

TRAP

CSERROR

;:LOAD 3ND SYNCH, TX 2ND SYNCi
:

:BR IF NO ERROR

;REPORT STACKED ERROR

:SKIP TO END OF TEST

CNDMCAO DMV1l LINE UNIT DIAG1L
TEST

MACRO M1200

22-FEB-84

15:31

<15

PAGE 94-2

SEQ 0192

BCP RX SYNC CHARACTER RECOGNITION

035326
A 035330

104410
000206

7376 035332
7377 035336

004537
000226

7378 035340
7379 035342
7380 035344
035344
7381 035346
035346
. 035350
7383
7384
7385
7386
7387

104460

104410
000166
004537
000226
000000
103003

035366
oy 035370

104410
000146

7390 035372
7391 035376

004537
000000

7393 035402
035402
7394 035404
035404

104410

004537
000226
000000
000010

010110

104460

7404 035432
7405 035436

012702
112237

035540
035474

7408 035450

004537

007676

7410 035456
7411 035460
7412 035462
035462
7413 035464
035464
035466
7414

000000
103003

‘

000000

1044€0
104410
000050

.+8.

:
:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF

JSR
SYNCH
0
BCC
ERROR

RS, TXCHAR

;LOAD STH SYNCH

. +8.

;
:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

;SKIP TO END OF TEST

JSR
0

RS,RCV1ST

;CLOCK AND RECEIVE 3RD SYNCH

BCC

.+8.

:BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF

000001

035454

RS, RXCHAR

C$ESCAPE
L10100-.

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10100-.

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10100-.

TRAP

C$ERROR

3RD SYNCH

TEST

;REPORT STACKED ERROR
TEST

TRAP

C$ESCAPE

.WORD

L10100-.

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10100-.

;RECEIVE/CHECK SYNCH CHARACTER

BCC

.+8.

:BR IF NO ERROR

ESCAPE

TST

;SKIP TO END OF

ERROR

104410
000106

7409 035454

8.
BCC
ERROR

JSR

103003

116237

;LOAD 4TH SYNCH,

SYNCH
0
8.

A 035430

;:gg 035442

RS, TXCHAR

ERROR

104460

7396
7397
7398
7399

7400 035422

011364

103003

000130

7401 035424
035424
7402 035426
035426

007676

104460

i 035406

035410
035414
035416
035420

JSR
SYNCH

000010
103003

035352
035356
035360
035362
035364
035364
7388 035366

7392 035400

007676

TRAP
.WORD

;REPORT STACKED ERROR
TEST

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

MOV
MOVB

OTXTBL1,R2
(R2)+,20%

;SET UP TABLE POINTER
;SETUP EXPECTED CHARACTER

10$:

000

JSR

RS, TXCHAR

;LOAD A CHARACTER

)
BCC
ERROR

. +8.

:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

;SKIP TO END OF

MOVB

1(R2),10$

;SETUP TRANSMIT CHARACTER

;4 HOLE FOR NEXT TX CHARACTER

TEST

TRAP

C$ERROR

TRAP
.WORD

C$ESCAPE
L10100-.

CNDMCAO DMV1l LINE UNIT DIAGL
TEST 29
7415
7416
7417
7418
7419
7420

MACRO M1200

L 15
22 FEB-84

15:31

PAGE 94 -3

SEQ 0193

-~ BCP RX SYNC CHARACTER RECOGNITION

035470

004537

010110

:CLOCK/RECEIVE/CHECK PREVIOUS CHARACTER
:#+« HOLE FOR EXPECTED CHARACTER

8CC
ERROR

.+8.

:BR IF NO ERROR
+REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

035512
035516

022702
001347

035555

#TXEND1 ,R2
S$

035520
035524
035526
035530
035530
7430 035532
035532
035534

004537
0000i0
103003

011532

RS ,ENDTRN

:SHUT DOWN TRANSMITTER, RECEIVER

.+8,

:BR IF NO ERROR
:REPORT STACKED ERROR

TST

:SKIP TO END OF TEST

7431
7432 035536
035536
7433
7434

7435
7436
7437
7438
7439
7440
7441
7442

7443
7445
7446
7447
7448
7449

20¢:

RS,RXCHAR

000000
000000
000010
103003

7422
7423
7424
7425
7426
7427
7428
7429

JSR
000
0
8.

035474
035476
035500
035502
035504
035504
7421 035506
035506
035510

104460

104410
000026

104460

ESCAPE

104410
000002

TRAP
TRAP

CSERROR
CSESCAPE

.WORD

L10100-.

TRAP

C$ERRCR

TRAP

CS$ESCAPE

.WORD

L10100-.

TRAP

CSETST

ENDTST

035536

104401

035540
035541
035542
035543
035544
035545
035546
035547
035550
035551
035552
035553
035554
035555

226
226
000
377
125
226
226
252
101
202
226
226
000
000

.10100:
TXTBL1:

TXEND1:

CNDMCAO DMV11l LINE UNIT DIAGL
TEST 30

MACRO M1200

22-FEB-84

15:31

PAGE 95

SEG 0194

BCP RX STRIP-SYNC TEST

7464

.SBTTL

TEST

Ty P
P PP PP PP PP

LT T

i .
.

THE

RECEIVER

:¢#

THE

6 DATA CHARACTERS) THROUGH RXDB REGISTER.

1=~

2228422020000 0 00000000002

THREE

;‘

004537

007400

7469 035570
7470 035572
7471 035574

040000
103003

035574

104460

Sl 035600

000474

7474
7475
7476
7477
7478
7479

004537
000001
000007
004537
000000
000000
004537
120000

7468 035566

7472 035576
035576
035602
035606
035610
035612
035616
035620

7480 035622
7481 035626

;:gg 035630

063626

IGNORE

THE

FIRST

STRING

DATA CHARACTERS,

CHARACTERS FOR SYNCROMIZATION,

SYNC CHARACTERS,

AND PASS

THE

REST

THE

R AR AR AR ARRRR AR R AR A

MESSAGE

SYNC

T30::

PC, INIDMV

;INIT DMV-11, ENTER M-LOOP

JSR

RS, INITRN

;LOAD

NORXEN
BCC
ERROR

. +8.

;USE 8 BIT CHARS; LEAVE RXEN=0
;:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

;SKIP

JSR
TSOM
7.
JSR

010010

000
0

003734

JSR

RS, TXCTRL

AND

0000000000000 000000db0kts

1 SOM,

CLK

TX UNTIL

ACTIVE

:SET DDCMP,NO CHECK,SYNCH=226

TO END OF

TRAP

TEST

TRAP
010010

USE

IGNORE THE NEXT

JSR

DDCMP ! STRIPS !NOCHK ! SYNCH

;OUTPUT
:

1ST

C$ERROR
CS$ESCAPE

.WORD

L10101-.

TRAP

C$ERROR

TRAP
.WORD

CSESCAPE
L10101-.

SYNC CHARACTER

CIGNORED BY RECEIVER)

RS, TXCTRL

;:CLEAR

TSOM

RS,WRITEI

;:ENABLE RECEIVER (RXEN =>

VIAORB

000142

RXEN! TXEN! TTLOOP
.

7488 035640
7489 035642
7490 035644
035644
7491 035646

SYNC

104410

;:g;
7486 035632
7487 035636

SHOULD

TWO

BGNTST

7467 035562

TEST

:#
:#

005420

STRIP-SYNC

SYNC & SYNC DATA DATA DATA SYNC SYNC SYNC SYNC SYNC DATA DATA DATA
SYNC SYNC DATA DATA DATA SYNC SYNC

004737

BCP RX

THE
USYRT
IS INITIALIZED WITH THE STRIP-SYNC CONTROL BIT ASSERTED.
THE FOLLOWING MESSAGE
IS THEN INITIATED WITHOUT ASSERTING RXE AND
ONCE THE DATA IS BEING TRANSMITTED, RXE IS ASSERTED (IE: »):

)

;:gg 035556

TEST 30 -- BCP RX STRIP-SYNC TEST

i#
i#
i*

035556

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

; THE RECEIVER SHOULD IGNORE THE NEXT STRING OF CHARACTERS
004537

007676

000000
000010

104460

104410
000424

7493 035652

004537

AL R

ettt

JSR

000
8.

103003

035646
- 035650

007676

ittt

utbetiaib

RS, TXCHAR

;:LOAD 000,

Sttt Rl L

TX 2ND SYNCH

BCC
ERROR

.+8,

;BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

:SKIP

JSR

RS, TXCHAR

:LOAD 377,

TO END OF

TEST

TX 000

CNDMCAO DMV11l LINE UNIT DIAGL
TEST 30

MACRO M1200

22-FEB-84

15:31

N15

PAGE 95-1

SEQ 0195

-~ BCP RX STRIP-SYNC TEST

7494
7495
7496
7497

035656
035660
035662
035664
035664
7498 035666
035666
035670

000377

103003

104460

004537
000125
000010
103003

035712
035716
035720
035722
035724

004537
000226
000010
103003

035732
035736
035740
035742
035742
035744
035744
035746

ESCAPE

104410
000404

035672
035676
035700
035702
035704
035704
035706
035706
035710

035724
035726
035726
035730

377
8BCC
ERROR

000010

007676

104460

104410
000364
007676

104460
104410
000344
004537
000000
103003

006176

104460
104410
000326

. +8.

:BR IF NO ERRgg
:REPORT STACKED
ERROR

TST

:SKIP TO END OF TEST

RS, TXCHAR

;LOAD 125,

BCC
ERROR

.+8.

:BR IF NO ERROR
:REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

JSR
SYNCH
8.

RS, TXCHAR

:LOAD SYNCH,

BCC
ERROR

. +8.

;:BR IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

RS,CKRDA

BCC
ERROR

.+8.

ESCAPE

TST

TRAP

CS$ESCAPE

.WORD

L10101-.

TRAP

C$ERROR

TRAP

C$ESCAPE

.WORD

L10101-.

TRAP

CSERROR

TX 125

TRAP

CSESCAPE

.WORD

L10101-.

TRAP

C$ERROR

:CHECK RECEIVE DATA AVAILABLE
:
(NO DATA EXPECTED)
:BR IF NO ERROR

:REPORT STACKED ERROR

:SKIP TO END OF TEST

TRAP

.WORD

C$ERROR

TXx 377

JSR
125
8.

gsfi

TRAP

CSESCAPE

L10101-.

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

: THE RECEIVER SHOULD SYNCHRONIZE ON THE NEXT TWO SYNC CHARACTERS,
: STRIP THE NEXT THREE, AND THEN READ THE REMAINING ONES.
007676

007676

JSR
Sy
8.
8CC
ERROR

RS, TXCHAR

:LOAD 2ND SYNCH,

.+8.

:BR _IF NO ERROR
+REPORT STACKED ERROR

ESCAPE

TST

:SKIP TO END OF TEST

JSR
SYNCH
8.
8CC
ERROR

RS, TXCHAR

.+8.

TX 1ST SYNCH

:LOAD 3ND SYNCH,

TRAP
TRAP

C$ERROR

CSESCAPE

.WORD

L10101-.

TRAP

C$ERROR

TX 2ND SYNCH

:BR IF NO ERROR
:REPORT STACKED ERROR

MACRO M1200

CNDMCAO DMV11l LINE UNIT DIAGL
TEST

BCP

7535 036004

STRIP-SYNC

036004
036006

104410
000266

036010
036014
036016
036020

004537
000226
000010

007676

00C010

007676

:BR _IF NO ERROR
;REPORT STACKED ERROR

ESCAPE

TSt

sSKIP TO END OF TEST

JSR
SYNCH

JSR
252

ESCAPE

RS, TXCHAR

CSESCAPE

.WORD

L10101-.

TRAP

CSERROR

3RD % YNCH

sLOAD STH SYNCH,

TRAP

CSESCAPE

. WORD

L10101-.

TRAP

CSERROR

TRAP

. WORD

CSESCAPE
L10101-.

TRAP

CSERROR

Tx 4TH SYNCH

:1BR IF NO ERROR
;REPORT STACKED ERROR
TST

RS, TXCHAR

sSKIP TO END OF TEST

;LOAD DATAL

,TX ST SYNCH

;:BR IF NO ERROR

;REPORT STACKED ERROR

TST

sSKIP TO END OF TEST

TRAP

CSESCAPE

L10101-.

007676

104460
104410
000166
007676

103003

JSR
347
8.
8CC
ERROR

RS, TXCHAR

ESCAPE

104410
000146

.+8.

:LOAD DATAZ2

,TX DATA1L

:BR IF NO ERROR

sREPORT

STACKED ERROR

sSKIP TO END OF TEST

JSR
030
0
8CC

RS, TXCHAR

;LOAD DATA3

.+8.

:BR IF NO ERROR

ESCAPE

TST

1SKIP TO END OF TEST

ERROR

104460

103003

.+8.

104410
000206

TRAP

8CC
ERROR

104460

TEST

;LOAD 4TH SYNCH,

ESCAPE

104410
000226

$SKIP TO END OF

RS, TXCHAR

8CC
ERROR

104460

004537
000000

TST

103003

004537
000030
000000

95 2

JSR
SYNCH

104410
000246

004537
000347
000010
103003

PAGE

5E%G 01%

ESCAPE

104460

004537
000252
000010
103003

15:31

TEST

103003

004537
000226

2¢ FEB-84

Blo

TRAP

JSR
0

8CcC

CSESCAPE

.WORD

L10101-.

TRAP

CS$ERROR

+REPORT STACKED ERROR

TRAP

.WORD

011364

CSERROR

RS,RCV1ST

;CLOCK AND RECEIVE DATA1

.*8,

:1BR IF NO ERROR

CSESCAPE

L10101-.

DMV11

LINE UNIT

DIAG1

BCP RX STRIP- SYNC

036140
036140
036142
036142
036144

MACRO M1200

22 FEB-84

15:31

PAGE

Cle
9 3

5E3 0197

TEST
sREPORT STACKED ERROR

ERROR

104460

ESCAPE

104410
000130

010110

JSR
252

TST

RS ,RXCHAR

1SKIP TO END OF TEST

004537
000252
000000
000010
103003

036170
7587 036174
7588 036200
7589
7590 036206
7591 036212
7592 036214
7593 036216
036220
036220
7595 036222
036222
036224

012702
112237
116237

036276

004537
000000
000000

007676

036226
036232
036234
036236
036240
036242
036242
036244
036244
036246

004537
000000
000000
000010
103003

036250
036254

022702
001347

036310

cMP
BNE

@TXEND2,R2
Ss

004537
000010
103003

011532

gSR

RS,ENDTRN

;SHUT DOWN TRANSMITTER, RECEIVER

BCC

.+8.

:BR IF NO ERROR

ESCAFPE

T1ST

sSKIP TO END OF TEST

8CC

.+8.

ESCAPE

TST

ERROR

104410
000106

035232
000001

036212

S$:

10$:

103003

.WORD

CSESCAPE
L10101-.

TRAP

CS$ERROR

104410
000050

:BR IF NO ERROR

sREPORT STACKED ERROR

$SKIP TO END OF TEST

TRAP

MOV

oTXTBL2,R2

:SET UP TABLE POINTER
;SETUP EXPECTED CHARACTER
:SETUP TRANSMIT CHARACTER

JSR
800

RS, TXCHAR

:LOAD A CHARACTER
;44 HOLE FOR NEXT TX CHARACTER

8CC

.+8.

;BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF TEST

MOVB
MOVB

ERROR

104460

(R2)+,208
1(R2),10%

;REPORT

STACKED ERROR

010110

20$:

JSR

000
0
a.
8CC
ERROR

L10101-.

TRAP

CSERROR

TRAP

ESCAPE

104410

RS ,RXCHAR

;CLOCK/RECEIVE/CHECK PREVIOUS CHARACTER
;¢ HOLE FOR EXPECTED CHARACTER

.+8,

:BR IF NO ERROR

TST

;SKIP TO END OF TEST

;REPORT

STACKED ERROR

ERROR

104460

ENDTST

;REPORT STACKED ERROR

CSERROR

TRAP

CSESCAPE

TRAP

CSERROR

TRAP

CSESCAPE

TRAP

CSETST

.WORD

L10101:

CSESCAPE

L10101-.

TRAP

. WORD

000026

CSESCAPE

. WORD

.WORD

104460

104401

TRAP

104460

104410
000002

CSERROR

sRECEIVE/CHECK DATA1l (252)

036146
036152
036154
036156
036160
036162
036162
036164
036164
036166

7585

TRAP

L10101-.

CNOMCAQ DMVv1L LINE UNIT
TEST

7615
7616
7617
7618

BCP RX STRIP-SYNC

036276
036277
036300
036301

347
030
226
226

7619 036302
7620 036303

252
101

7621
7622
7623
7624
7625
7626
7627

DIAGL

036304
036305
036306
036307
036310

202
226
226
000
000

MACRO M1200

2. FEB-84

15:31

PAGE

Dln
95 4

TEST
TxTBL2:

TXEND2:
R

.BYTE
.BYTE
.BYTE
.BYTE

347
030
226
226

.BYTE
.BYTE

252
101

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.EVEN

s s

+ SYNCH
$ SYNCH

202
226
226
000
000

s SR

: SYNCH
s SYNCH

SEG 0193

CNDMCAO DMv1l LINE UNIT DIAGL

MACRO M1200

22-FEB-84 15:31

TEST 31 -- BCP RX LOST RXf TEST
7635

.SBTTL

TEST

i
:*
;¢
L

;6;? 036312
6
7638
7639
7640

;
036316

036322
036324

7641 036326

036400

103003

007676

104460

JSR

sINIT DMV-11, ENTER M-LOOP

sUSE 8 BIT CHARS

;REPORT

;SKIP

STACKED ERROR

TO END OF

RS, TXCHAR

sLOAD 2ND SYNCH,

.+8.

:BR IF NO ERROR

TEST

1ST

sREPORT STACKED ERROR

TST

;SKIP TO END OF

010010

JSR

RS, TXCTRL

;CLEAR TSOM

007676

000
0
JSR

RS, TXCHAR

;:LOAD 000,

.+8.

:BR IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

TST

;SKIP TO END OF

JSR
12

RS, TXCHAR

;LOAD 125,

- T
ERROR

.+8.

;:BR IF NO ERROR
sREPORT STACKED ERROR

ESCAPE

TST

:SKIP

000
8.
8CC
ERROR

007676

SYNCH=226

sBR IF NO ERROR

ESCAPE

104460

103003

TST

8CC

104410
000314

000010

ESCAPE

ERROR

104460

004537
000125

.+8.

SYNCH
¥

103003

004537
000000
000000
004537
000000
000010
103003

B8CC

ERROR

104460

PC, INIDMV

T31::

JSR
RS, INITRN
sLOAD 1 SOM, CLK TX UNTIL ACTIVE
DDCMP!STRIPS!IDLES!CRC16!SYNCH ;SET DDCMP, STRIP,IDLE,.CRC-16,

7662 036406
7663 036412

7667 036422

BGNTST

007400

104410
000264

7665 036416
7666 036420
036420

THE USYRT IS INITIALIZED (CRC16,STRIPS,BCP MODE) AND A MESSAGE IS STARTED.
WHILE IN THE MIDDLE
OF
TEXT, RXE IS DROPPF AND THE REACTION OF THE
RECEIVER IS MONITORED.

004537
065626
000000

7660 036402
036402
. 036404

7664 036414

TEST 31 -- BCP RX LOST RXE TEST

JSR

004537
000226
000007

036356
036362
036364
036366
036372
036374
036376
036400

AR A000000000000000000000000000tbass

005420

7645 036336
7646 036342
7647 036344

7652
7653
7654
7655
7656
7657
7658
7659

LARR

004737

104410
000334

7648 036346

RR AR RARAAR RS

1888088800000 040000000004000000000000040008040008040000000000000000080

7642 036330
036330
7643 036332
036332
%48 036334

7649 036350
036350
7650 036352
036352
2651 036354

TEST

036312

SEG 0199

-- BCP RX LOST RXE

:* 0080000002000 00000

Elo

PAGE 96

TEST

TRAP

CS$ERROR

TRAP
.WORD

CSESCAPE
L10102-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10102-.

TRAP

CSERROR

TRAP
.WORD

CSESCAPE
L10102-.

TRAP

CSERROR

SYNCH

TX 2ND SYNCH

TEST

TX 000

TO END OF

TEST

CNDMCAQ DMV11 LINE UNIT DIAGL
TEST

BCP RX LOST RXE

036422
7668

036424

104460

036466
036472
036474
036476
036500
036500
7688 036502
036502
036504

004537
000000
000000

036516
7694 036520
036520
036522
7695
7696 036524
7697 036530
7698 036532
7699 036534
7700 036536
7701 036540
036540
7702 036542
036542
036544
7703
7704
7705
7706
7707 036546

ESCAPE

104410
000224
004537
000377
000010
103003

7692 036514
7693 036516

JSR

252
8.
8CC
ERROR

103003

036446
036452
036454
036456
036460
036460
7681 036462
036462
036464

7689
7690 036506
7691 036512

PAGE

SEG 0200
TRAP

036440
7674 036442
036442
036444

7682
7683
7684
7685
7686
7687

15:31

104410
000244
004537
007676
000252 000010

7675
7676
7677
7678
7679
7680

22 FEB-84

TEST

7669 036426
7670 036432
7671 036434

7672 036436
7673 036440

MACRO M1200

Flo

JSR

377
8.
8CC
ERROR

104460

ESCAPE

104410
000204
007676

:LOAD 252,

.+8.

:BR IF NO ERROR

TST

:SKIP TO END OF TEST

CSERROR

TRAP

CSESCAPE

;REPORT STACKED ERROR

;LOAD 377,

.+8.

:BR IF NO ERROR
;REPORT STACKED ERROR

TST

:SKIP TO END OF TEST

RS, TXCHAR

:LOAD 000

8CC

.+8.

:BR _IF NO ERROR

ESCAPE

:SKIP TO END OF TEST

ERROR

104410
000164
011364

104460

104410
000146

;REPORT STACKED ERROR

RS,RCV1ST

:CLOCK AND RCV 000

8CC
ERROR

..8.

:BR IF NO ERROR

ESCAPE

TST

:SKIP TO END OF TEST

JSR
0

;REPORT

TRAP

CSERRCR

TRAP

CS$ESCAPE

TRAP

CS$ERROR

TRAP

CS$ESCAPE

STACKED ERROR

TRAP

CSERROR

TRAP

CSESCAPE
L10102-.

.WORD

010110

ERROR

104460

ESCAPE

104410
000124

RS ,RXCHAR

;:READ &€ CHK 000, RCV 125

.+8.

:BR_IF NO ERROR
;REPORT STACKED ERROR

TST

:SKIP TO END OF TEST

: TX AND RX NOW SYNC'D. ONE CHARACTER HAS BEEN READ/VERIFIED....
: NOW CLEAR RXEN (RECEIVER ENABLE).
-

004537

003476

EEeE

L10102-.

Tx 252

RS, TXCHAR

JSR

0Cco
0

104460

004537
000000
000000
00001C
103003

TRAP

TXx 125

RS, TXCHAR

. WORD

103003

004537
000000
103003

L10102-.

. WORD

00767€

CS$ESCAPE

. WORD

EEEEEEeee®EEeEEeE®eEE"ee®E®EE.®
...
...
===

L10102-.

CSERROR
CSESCAPE
L10102-.

CNDMCAQ DMV1l LINE UNIT
TEST

.- BCP RX LOST RXE

7708 036552

7709 036554
7710 036556
7711 036560
036560
771 036562
036562

7713
7714

7715

7716
7717
7718
7719
7720
7721

7722

DIAGL

036564

7730

7731
7732
7733

7734

7735

7736

7737

7738
7739
7740
7741
7742

7743

7744

22-FEB-84

15:31

Glo

FAGE 96 -2

SEG 0201

TEST

VIAORB
CGORB

120000
036602

103003
104460
104410

BCC

.+8.

ESCAPE

TST

ERROR

AND PUT

IN LOCATION PROVIDED

:BELOW (CGORB).
:BR IF NO ERROR
:REPORT ERROR

TRAP

.WORD

000104

042737

000100

004537
120000
000000
103003

003734

036602

CGORS:

BIC

ORXEN, CGORB

;:CLEAR RXEN BIT OF ORB STATUS WORD

JSR
VIAORS
.WORD

RS,WRITEI

{WRITE NEW STATUS WORD (W/KXEN=0)

;ACTUAL DATA WRITTEN TO VIAORB

B8CC

ERROR

104460

ESCAPE

104410
000056

.+8.

CS$ERROR
CSESCAPE

L10102-.

:BACK INTO VIAORB

:BR IF NO ERROR
;REPORT ERROR

TST

TRAP

CS$ERROR

TRAP

CSESCAPE
L10102-.

.WORD

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

;

7723
7724

7725
7726
7727
7728
7729

MACRO M1200

RXEN NOW CLEARED.

CHECK USYRT STATUS,

TX ANOTHER CHARACTER,

: CHECK USYRT STATUS AGAIN.

004537
000104

005432

104410
000040

.+8.

:BR IF NO ERROR

ESCAPE

TST

ESCAPE

sTXACT

TBMT

TRAP

C$ERROR

TRAP

CS$ESCAPE

TST

TRAP

CSERROR

TRAP

CSESCAPE

005432

;:BR IF NO ERROR
;REPORT

STACKED ERROR

;SKIP TO END OF TEST

JSR

RS,CKUSTS

;CHK USYRT STATUS FOR PROPER STATE

8CC

. *8.

;:BR IF NO ERROR

ESCAPE

TST

TXACT!TSO! TBMT

ERROR

ENDTST

L10102-.

;LOAD/TRANSMIT 303

.WORD

104460

104401

8CC

RS, TXCHAR
JSR
303
NCTBMT#+256.
!8.
8CC
oWl
ERROR

007676

104410
000020

104410
000002

;:CHK USYRT STATUS FOR PRGPER STATE

. WORD

104460

004537
000114
103003

RS,CKUSTS

ERROR

104460

004537
000303
100010
103003

JSR

TXACT! TBMT

103003

AND

s TXACT

L10102-.

TRAP
TRAP

L10102:

CSERROR
CSESCAPE

.WORD

L10102-.

TRAP

CSETST

CNDMCAQ DMV11l LINE UNIT

DIAGL

MACRO M1200

22-FEB-84

15:31

Hlo

PAGE 97

SEG 0202

~“ARDWARE PARAMETER CODING SECTION
7746
7747
7748
7749

.SBTTL

7750

7751

i/
i/

7752
7753

i/ MACROS ALLOW THE SUPERVISOR
i/ WITH THE OPERATOR.

7756

7765

7766

7767

ARE

THE

TO ESTABLISH COMMUNICATIONS

$ILLLIIIIIIIIIIIIIIP
7077700700070 7 0007707700000 777700007007007770077777777

036672
036674

000041

036674
036676
036700
036702
0367C4
036704
036706
036710
036712
036714
036714
036716
036720
036722
036724
036726
036726
036730
036732
036734
036736
036740
036740
036742
036744
036746
036750
036752
036752
036754
036756
036760
036762
036764
036764
036766
036770
036772
036774

000031
036776
160020
177776

7760
7761 036674

7764

INSTRUCTIONS BUT

i/ INTERPRETED By THE SUPERVISOR AS DATA STRUCTURES.

7757
7758
7759 036672

7763

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

i/ MACROS ARE NOT EXECUTED AS MACHINE

7754
7755

7762

HARDWARE PARAMETER CODING SECTION

001031
037024
000000
000674
002032
037055
007000
000004
000007
003032
037106
000377
000000
000377
004032
037147
000377
000000
000377
005032
037211
000007
000000
000002

007032
037274
000017
000000
000001

BGNHRD
LSHARD:
:

GPRMA

.WORD L10103-LS$HARD/2

ADDRES,0,0,160020,177776,YES

.WORD

GPRMA

VECTOR,2,0,0,674,YES

GPRMD

PRIRTY,4,0,7000,4,7,YES

GPRMD

SW1.M,6,0,377,0,377,YES

GPRMD

SW2.M,10,0,377,0,377,YES

GPRMD

BDTY.M,12,0,7,0,2,YES

GPRMD

BR.M,16,0,17,0,1,YES

T$CODE

.WORD
.WORD
.WORD

ADDRES
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD

T$CODE
VECTOR
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD
.WORD

T$CODE
PRIRTY
7000
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD
.WORD

T$CODE
SW1.M
377
TSLOLIM
TSHILIM

WORD
.WORD
.WORD
.WORD
.WORD

T$CODE
SW2.M
377
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD
.WORD

T$CODE
BDTY.M
7
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD
.WORD

T$CODE
BR.M
17
TsSLOLIM
TS$MHILIM

CNDMCAQ DMVl LINE UNIT DIAGL

MACRO M1200

I'le
2c FEB-84

15:31

PAGE 97-1

SEGQ G203

HARDWARE PARAMETER CODING SECTION
7768
7769 036776

ENDHRD

036776

7770
7771
7772 036776

7773 037024

7774 037055
7775

037106
7776 037147
7777 037211
7778 037274
7779

7780

L10103:
105
105
105
127
127

117

101

126
126
111
111
101
125

NLIST
ADDRES:
VECTOR:

BEX
.ASCIZ
.ASCIZ

SW1.M:
SW2.M:
BDTY.M:
BR.M:
4AIST
.EVEN

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
BEX

PRIRTY:

.ASCIZ

/DEVICE CSR ADDRESS : 7/
/DEVICE VECTOR ADDRESS : /
/DEVICE PRIORITY LEVEL : /
/SWITCH PACK & 1 (BOOT ADDRESS): /
’
/SWITCH PACK & 2 (DDCMP ADDRESS):
/BOARD TYPE (0=M8064, 1=M8053-V.35, 2=MB053-EIA)
/BAUD RATE (0=LOW (19.2K), 1=HIGH (56K)): /

.EVEN

CNDMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

22-FEB-84

J1lo

15:31

PAGE 98

SEG 0204

SOF TWARE PARAMETER CODING SECTION
7782
7783
7784
7785
7786
7787
7788
7789
7790

.SBTTL

SOF TWARE PARAMETER CODING SECTION

i+ THE SOF TWARE PARAMETER CODING SECTION CONTAINS MACROS
i/ THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
THE
i/ MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

i/ INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
:/ MACROS ALLOW THE

7791

7792
7793
7794 037346

037346
037350

7795
7796 037350

037350

SUPERVISOR

THE

TO ESTABLISH COMMUNICATIONS

:/ WITH THE OPERATOR.

GILLIILIILLLIII 7007777700070 077707770000007770007777270007077777772277777

000000

BGNSFT
L$SOFT::
ENDSFT

L10104:

.WORD L10104-Ls$S0OFT/2

.EVEN

CNDMCAO DMV11l LINE UNIT DIAGL
sass2s

PATCH

7798
7799
7800
7801
7802
7803
7804

7805

AREA

FOR

22-FEB-84

037350
037450
037452
037454

0374%0
000240
000240
00240

15:31

PAGE 99

SEG 0205

##2ssa

.SBTTL

#s4e4a PATCH AREA FOR DEBUG

##4444

PATCH:

.=,+100
NOP
NOP
NOP
(EAAAARERARAARARAAAARARAALRAAAAARRS

7806
7807

.SBTTL

7808
7809 037456
7810
7811
7812 037456

7813
7814

DEBUGC

MACRO M1200

037456
037460
037462

"ENDMOD“ STATEMENT

ENDMOD

.SPTTL
006000

LSLAST::

000001

.END

“LASTAD" STATEMENT & END OF PROGRAM
LASTAD
.EVEN
. WORD
.WORD

L 16
CNDMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

22-FEB-84 15:31

PAGE 99-1

SEQ 0206

SYMBOL TABLE

ABC

= 000160

BSRO

021566

BSR11

ADDRES
036776
ADR
= 000020 G

AD.HIT
AD.OK

APA

021562

BSR15

BITO2 = 000004 G

BITO3 = 000010 G
BITO4 = 000020 G
BITOS
BIT06
BITO7
BITO8
BIT09

=
=
=
=
=

000040 G
000100 G
000200 G
000400 G
001000 G

BIT10
BIT11
BIT12
BIT13
BIT14

=
=
=
=
=

002000 G
004000 G
010000 G
020000 G
040000 G

BIT4

= 000020 G

BIT7
BIT8

= 000200 G
= 000400 G

BIT1

= 000002 G

BIT1S = 100000 G
BIT2
= 000004 G
BIT3
= 000010 G
BITS
BIT6é

= 000040 G
= 000100 G

BIT9
=
BOE
=
BRDTYP
BR.M
BSELO
BSEL1
BSEL10
BSEL11
BSEL12
BSEL13
BSEL14

BSEL1S
BSEL16
BSEL17
BSEL2
BSEL3

BSEL4
BSELS
BSEL6
BSEL7

001000 G
000400 G
002544
037274
002472
002474
002512
002514
002516
002520
002522

002524
002526
002530
002476
002500

002502
002504
002506
002510

C$GETB= 000026

002302

ASSEMB= 000010

BADDAT 002442
BDATA
002402
BDRATE 002550
BDTY.M 037211
B8ITO = 000001 G
B8ITOO0 = 000001 G
BIT01 = 000002 G

002300

BSR12

BSR13

= 100000

C$ESUB= 000003

002260
002276

= 000200

APAD

002256

BSR1
BSR10

CSETST= 000001
CS$EXIT= 000032

002304

BSR14

002310

BSR16
BSR17
BSR2
BSR3
BSR4
BSRS
BSR6
BSR7

002274

CA2CTL=
CB81CTL=
CB2CTL=
CGORB
CHKTSO

000016
000020
000340
036602
007116

CKRACT
CKRDA
CKROR
CKRSA
CKSEOM

005676
006176
006476
006336
006636

CHPTYP

CKTACT
CKTBMT
CKUSTS

002454

005536
006036
005432

CRC16 = 001400
CTS
C$AU

= 000010
= 000052

C$AUTO= 000061
C$BRK = 000022

C$BSEG=
csB8SUB=
C$CEFG=
C$CLCK=
C$CLEA=
C$CLOS=
CsCLP1=
C$CVEC=
CS$DCLN=
C$DODU=
CSDRPT=

CsDVU
=
CS$EDIT=
C$ERDF=
CS$ERHR=
C$ERRO=

C$ERSF=
C$ERSO=
C$ESCA=
C$ESEG=

000004
000002
000045
000062
000012
000035
000006
000036
000044
000051
000024

000053
000003
000055
000056
000060

000054
000057
000010
000005

013573

000200

C$GPHR= 000042

EM39

000015
000377
000007
000047
000033

CSRFLA=
C$RPT =
C$SEFG=
C$SPRI=
C$SVEC=

000021
000025
000046
000041
000037

DEVPTR

002462

DOTBMT= 000007
DTR
= 000020

DTRL
= 000000
D.BUG = 000000
EF .CON= 000036 G

EF .NEW=
EF .PWR=
EF .RES=
EF.STA=
EIAV3S=
EM1
EM100
EM101
EM102
EM14
EM16
EM2

EM25
EM26
EM27
EM28
EM29

000035
000034
000037
000040
000002
013103
014425
014445
014471
013332
013346
013142

013366
013414
013446
013477
013520

FMT10
FMT10A
FMT11
FMT1S
FMI15A
FMT19
FMT2
FMT21

012252

EM71
EM72

014047
014065

FMT23
FMT24

012555
012634

014025

G
G
G
G

FMT2S
FMT26
FMT27
FMT29
FMT3

014215

EM90
EMI1
EM92
EM98
EM99

014235
014266
014323
014357
014404

ENDTRN

011532

FMT30

011640
021446
003105

ERRBLK
ERRFLG
ERRMSG
ERRNBR

=
=
=
=

EXECUT=
ESEND =
E$LOAD=
FLGCA1=

FMT31
FMT32
FMT4
FMT4A
FMT4B

FMTAC
FMTS
FMTSA

FRSTIM

012326
012347
012366
012420
012472
011650
012523
012533

012647
012677
012732
012741
011705
012746

013003
013051
011771
012027
012062
012067
012122
012165

002444

002254 G
002424

F$AU
= 000015
F$AUTO= 000020

002452
002246
017372
017546
020356
017722
020710
020036
017030
017154
020160

F$DU
= 000016
FS$END = 000041
F $HARD= 000004

002252 G
002250 G

ERROR1
ERRTYP
ERR10
ERR11
ERR11¢
ERR12
ERR12¢
ERR13
ERR4
ERRS
ERRS$

ERR7A
EVL
EVRC
EXADD
EXCON

FMT22

014107
014124
014145
014161
014201

ENDEMB
ENDIT
ENDPAT

DFPTBL
002224 G
DIAGMC= 000000

FLGT2 = 000040

013701
013252
013717
013302
013741
013760
014007

EM78

C$TPRI= 000013
DDCMP = 040000
DEVMAP
002460

013657

000004

EMA0
EMS
EMS4
EM6
EM66
EM68
EM69

EM73
EM74
EM75
EM76
EM77

CS$REVI= 000003

000020
000010

FLGT1 = 000100

013235

EM70

C$PNTF= 000017
C$PNTS= 000016

013621

FLGCB1=
FLGCB2=
FLGIRG=
FLGSR =

013642

EM4

000040
000011
000020
000050
000031
000023
000034

CSPNTY=
C$QIO =
C$RDBU=
CSREFG=
CS$RESE=

013535
013556

EM36

C$PNTB= 000014

EM34

EM35

C$GPRI=
CS$INIT=
C$INLP=
CS$MANI=
CSMEM =
C$MSG =
C$OPEN=

CARIER= 000100
CA1CTL= 000001

FLGCA2= 000001

C$GETW= 000027

C$GPLO= 000030

002312
002314
002262
002264
002266
002270
002272

013211

EM30
EM31

C$GMAN= 000043

002306

EM3

G
G

G
G
G
G

017252 G
000004 G
002400
000020
000010

000005
002100
000035
000002

F$BGN = 000040
F$CLEA= 000007

F$HW
=
F$INIT=
F$JMP =
F$MOD =
F$MSG =
F$PROT=
F$PWR =
F$RPT =
F$SEG =
F$SOFT=
F$SRV =
F$SUB =

F$SW
=
F$TEST=
GDATA
GETBSR
GETPRM

000013
000006
000050
000000
000011
000021
000017
000012
000003
000005
000010
000002

000014
000001
002400
004046
021312

Mlo
CNDMCAO DMV11l LINE UNIT DIAGL

MACRO M1200

22-FEB-84

15:31

PAGE 99-2

SEG 0207

SYMBOL TABLE

ISPTAB=
ISPWR =
ISRPT =
1$SEG =
I$SETU=
ISSFT =

217

G$RADL
=
G$RADO=
G$XFER=
GS$YES
HDX
HELP
HOE
IBE
IDLE
IDLES
IDV
IEI
IEO
IER
INIDMV
INITRN
INITT1
INITT2
INTFLG
INTGRL
=
INTSC =
ISR
=
=
IXE
ISAU
=
I$AUTO=
ISCLN =
IOV
=
ISHRD =
ISINIT=
I$MOD =
ISMSG =
ISPROT=

[2]~)

G$PRMA=
G$PRMD=
G$PRML
=
G$RADA=
G$RADB*=
G$RADD=

L$DU
L $DUT
LSDVTY
LSEF
LS$ENVI
LSERRT
LSETP
L$EXP1
LSEXPA
LSEXPS
L $HARD
L $HIME
L $HPCP
LSHPTP
L $HW
L$ICP
L$INIT
L $LADP
LSLAST
L $LOAD
L$LUN

L$MREV
L $NAME
L$PRIO
L $PROT
L$PRT
L $REPP
L $REV
L$SOFT
L$SPC

002000
002110
002036
021602
002070
021450
002106
021574
002032
002011
003326
002076
002060
002124
002116
002040
002034
021576
002072
003306
002052
002044
002246
002102
002046

L$SW

LSTEST
LSTIML
LSUNIT
L10000
L10001
L10002
L10003
L10004
L10005
L10006
L10007
L10010
L10012

L1001$

L10014
L10015
L10016
L10017
L10020
L10021
L10022
L10023
L10024
L10025
L10026

L10027
L10030
L10031
L10032
L10033
L10034
L10035

L10036
L10037
L10040
L10041
L10042
L10043
L10044
L10045
L10046
L10047
L10050
L10051
L10052
L10053
L10054

L10055

L10056
L10057
L10060
L10061
L10062

002020
002024
002030
002246
002114
002014
002012
002244
002246
017152
017250
017370
017544
017720
020034

020132
021446

021564
021574
021600
021602
021762
022150
022046
022146
022342
022400
023146
023232
023456
023550
023544
023642
023636
023734
023730
024064
024050

024156
024152
024232
024306
024630
024762
025144
025652
026252
026460
026722
027434
027112
027262
027432
027642
030036
030232
030610

G
G
G
G
G
G
G

033522
031202
031570
L10065
L10066
032156
032544
L10067
L10070
033132
033520
L10071
L10072
034110
L10073
034460
035076
L10074
034634
L10075
L10076
034736
035074
L10077
035536
L10100
036274
L10101
036670
L10102
036776
L10103
037350
L10104
MCLR
= 000100
= 000040
MDMROY
003744
MLWRI
MPCSR
002472
MPIVEC
002532
MPOVEC
002534
MPRIOR
002536

L10063
L10064

(2]

002542

L$SPCP
L$SPTP
L$STA
o

000041
000041
000041
000167
002436
040000
002410
000010
002540

2121112121212
1]

GS$HILI=
GS$LOLI=
GSNO
=
G$OFFS=
G$OFSI=

I$SRV
I$5U8
IsTST
JSJIMP
LOADAT
LOE
=
LOGDEV
=
LoT
LUSWI1
LUSWI2
LU1MOD
LSACP
L$APT
L$AU
L$SAUT
L $AUTO
L$CCP
L$CLEA
L.$CO
L $DEPQ
L $DESC
L $DESP
L $DEVP
L$DISP
L$DLY
L$DTP
L$DTYP

004402
004502
004210
002440

OO OOOOOOOOOOOOOOOOO®

GETURS
GETVRS
GETWSR
GOODAT
GSCNTO=
G$DELM=
G$DISP=
GS$EXCP=

MSTCLR

NCRACT=
NCTBMT=

NEWLIN
NEWST
NFCRDA=
NOCHK =
NOCRDA=

=
NOLOOP
NORXEN=
NULCLK=
OVRC
=
O$APTS=
OSAU

osOV

0$BGNR=
O$BGNS=
OS$ERRT=

O$GNSW=
O$POIN=
0$SETU=
PALENB
=
PATCH
PATE
PATF
PATG
PATH
PATI
PATJ
PATK

REGS
REG?7
REOM
=
=
RERCHK
RERR
=
RETADR
RING

RSA
RSOM
RSTCHK
RTSND =
RUN
=

RXABGA=

CNDMCAO DMV11 LINE UNIT DIAGLI

MACRO M1200

22-FEB-84 15:31

PAGE 99-3
SEG 0208

SYMBOL TABLE
RXACT = 000040
RXCHAR
010110
RXDL
= 000007

RXEN
= 000100
RXEOM = 001000
RXERR

RXOR
=
RXSOM =
SAVE4
SAVE6
SAVLEN

100000

004000
000400
002446
002450
002456

SCRACH
002406
SECAD = 000020

SECADR= 010000

SELO

002472

SEL10
SEL12
SEL14
SEL16

002512
002516
002522
002526

SEL2
SEL4
SEL6

SERIAL
SETVIA
SFPTBL

SFR

002476
002502
002506

007256
005326
002246 G

= 000001

SPEED = 000020
SRMODE= 000034

STALL
STARES
STARST
STEPLU
STRIP =
STRIPS=
STRTML=
STUREG
SUBRPC
SVCGBL=
SVCINS=
SVCSUB=
SVCTAG=
SVCTST=
SWPB0T=
SWPDDC=
SW1.M
SW2.M
SYNCH =
S$LSYM=

TAB
=
TBMT
=
TCCHEK=
TDATA
TDSRH =
TDSRL =
TDSRNR
TEOM
=
TERR
=

004400
002466
021262
011614
000040
020000
000301
004272
002420
000000
000001
000001
000001
000001
121000
121400
037106
037147
000226
010000

000004
000100
100000
002376
120403
120402
002651
000002
000200

TGA
= 000010
TIMFLG
002426
TM
= 000004

TMPO
TMP1

002622
002624

TMP3
TMP4
TMPS
TMP6
TMP7

002630
002632
002634
002636
002640

TMP2

TS0
TSOM

TSTCON

002626

= 000010
= 000001

TSTNUM

TTLOOP=
TXAB
=
TXACT =
TXCHAR

002546

002470

000002
002000
000004
007676

TXCTRL
010010
TXDL
= 000340
TXEN
= 000040

TXTURO
TXTUR1L
TXTUR2

TXTURS
TXTURA

TXTURS

TXTUR6
TXTUR7
IXTVR
TXTVRA
TXTVRB

TXTVRC
TXTVRD
TXTVRE

TXTVRF

TXTVRT
TXTVRO
TXTVR1
TXTVR2

TXTVR3S
TXTVR4
TXTVRS

016622
016630
016636

016644
016652

016661

016670
016674
016312
016410
016413

T$FLAG= 000040
T4GMAN= 000000
TSHILI= 000001

TSLAST= 000001
TSLOLI= 000000

TSLSYM=

000037
177777
000000
000005
000002

016427

T$SEGL=

177777

016724
016330
016334
016340

T$TAGL= 177777
T$TAGN= 010105
T$TEMP= 000000
TS$TEST= 000037

016433

016345
016352
016357

016364
016371
016376

T$$AUT= 010013
T$SCLE= 010014
T$$DU = 010015

TXEOM =
TXERR =

01000
70000

TXT1
TXT10

014541
015341

T$sH = 010000
T$$INI= 010012

TXGA
=
TXSOM =
TXTBL1
TXTBL2
TXTBLS
TXTBLA
TXTMLT

TXTMLO
TXTML1
TXTML2
TXTMLS
TXTMLA
TXTMLS
TXTML6
TXTML7
TXTNP
TXTNPT
TXTNPO
TXTNP1L
TXTNP2
TXTNP3
TXTNP4
TXTNPS
TXTNP6
TXTNP7
TXTNP8
TXTNUL
TXTUR
TXTURT

(.4000
000400
035540
036276
026724
034462
016702
016113
016117
016133
016150
016172
016213
016243
016255
016437
016766
016444
016454
016464

016474
016511
016526
016543
016557
016573
016111
016607
017010

TXT11
TXT11A
TXT118
TXT12
TXT13

TXT14
TXT15
TXT16
TXT17
TX718
TXT19
TXT2
TXT2A
TXT28
TXT20
TXT3
TXT4
TXT4A
TXTS
TXT6

TXT?
TXT7A
TXT8
TXT9
XU
=
T$ARGC=
T$CODE=
TSERRN=
T$EXCP=

016403

015361
015433
015471
015541
015567

015604
015642
015704
015717
015754
016015
014577
014641
014700
016051
014743
014773
015033
015074
015076

015121
015211
015301
015321
000002
000003
007032
000065
000000

125.6
126
127
128

T$TSTM= 177777
T$TSTS= 000001
T$$AU = 010016

TXTVR6
TXTVR7
TXTVR8

TXTVR9

125.2
125.3
125.4
125.5

T4$SUBN= 000000

035555
036310
026736

034475

122

123
T24
T24TBL
125
125.1

T$PTNU= 000000
T$SAVL= 177777

TXEND1
TXEND2
TXEND3
TXENDA

720.3
121

010000

TSLTNO=
TONEST=
TSNSO =
TINS1 =
TENS2 =

016417
016423

720
720.1
120.2

728.1
728.2
728.3

129
T3
T3.EHD

T$$HAR= 010103

T$$MSG=
T$$PRO=
T$$SOF=
T¢$SUB=
T$$SW =

T$$TES=
T.EDF =
T.EHRD=
T.ESF =
T.ESFT=
T1
T1MODE=
T10
T10.LP
T10.1
T11
T11.LP
T12
T13
T14

T15
T16
T17
T18
T19
T2
T2MODE=
T2.1
12.2

T3.EM1

T3.EM2
T3.END

010024
010011
010104
010077
010001

010102
000001
000002
000000
000003
021604
000300
024066
023766
024120
024160
024120
024234
024310
024632

024764
025146
025654
026254
026462
021764
000040
021770
022050

G
G
G
G
G
G
G
G
G
G
G

T3.ERR
T3.0k
T3.S5W1
73.SW2
13.1
13.2
13.3
3.4
3.9
13.6
730
T30TBL
T31
T4
15
16
76.1
17
T7.LP
7.1

T8
T8.LP
18.1
9
T9.LP
19.1
UAM
=
UMAINT=
UNIT

026740 G
026744
027114

027264
027450 G

027644 G

030040 G
030234 G
027436
030612 G
030616

031204
031572

032160

032546

033134
033534 G
034112 G
034476 G

034476
034636
034740

035100 G
022764 G
022402

022152 G

022344 G
022150

022032
022044
022000
022010
022426

022513
022542
022573
022636
022700
035556
033524
03c312
023150
03234
023460
023512
023552
023512
023¢04

G
G
G
G
G

023¢44 G
023604
023676
023736 G
023676
023766
000200 G
000001
002464

CNDMCAC DMV1l1 LINE UNIT DIAGL

Cl
99 4
PAGE
MACRO M1200 22 FFB-84 15:31

. SEG 0209

SYMBOL TABLE

UPBITS

002642

VIAIER= 120016

VIAT1D= 120007

WSRO

002256

XvZ

USTATR= 122000
USYREG 002552
USYRT = 120400

VIAMS = 120001
VIAORA= 120017
VIAORB= 120000

VIAT2B8= 120011
VREGS
002336
WAITSO0 005312

WSR12
WSR14
WSR16

002270
002272
002274

X$FALS= 000040
X$0FFS= 000400
X$ TRUE= 000020

VIADPA= 120003
VIADPB= 120002

VIAT1B= 120005
VIAT1C= 120006

WRITE
WRITEI

UREGS

002316

VIAIFR= 120015

VECTOR 037024
VIA
= 120000
VIAACR= 120013

ABS.

VIAPCR= 120014
VIASR = 120012
VIAT1A= 120004

037462

000000

ERRORS DETECTED:

VIAT2A= 120010

WRIBYT 002434
WRILOC= 000002
wRIMaG= 000004

000
©

VIRTUAL MEMORY USED:
31208 WORDS
( 122 PAGES)
DYNAMIC MEMORY:
19748 WORDS
( 75 PAGES)
ELAPSED TIME:
00:06:36

CONDMCA .BIC,CNDMCA. SEQ/CR/ -SP=SVC34 .MLB/ML. ,CNDMCA .P11

003722
003734

WSR10

WSR2
WSR4
WSR6

XDATA
XORGB

002266

002260
002262
002264
002404
020134

= 000007

X$ALWA= 000000

143
= 000065
SLSTIN= 000001
$LSTTA= 000001
$T

= 000037