Digital PDFs

AH-F832D-MC

October 1981

210 pages

Original

11MB

view download

OCR Version

9.5MB

view download

Document:	CZDMID0 DMR-11 DMR-11 FCTNL DIAG OCT 1981 bw
Order Number:	AH-F832D-MC
Revision:	000
Pages:	210
Original Filename:	CZDMID0__DMR-11__DMR-11_FCTNL_DIAG__AH-F832D-MC__OCT_1981_bw.pdf

OCR Text

DMR-11

FCTNL DIAG

CZDMIDO

AH-FB32D-MC

FICHE 1 OF 2

oot isL

DHR 11

DMR-11

FCTNL DIAG

¢ CZDIDO

AH-FB832D-MC

FICHE 2 OF 2 waoe v usa
COPYRIGH T®

ERi)

12:42

SEQ 0001

PAGE 2

NLIST T0C
.REM @
IDENTIFICATION
CODE:

AC-F830D-MC

PRODIJCT NAME
:

CZDMIDO

PRODUCT DATE:

OCTOBER 1981

MAINTAINER:

DIAGNOSTIC ENGINEERING

AUTHOR:

MIKE O'CONNOR

DMR-11

FCTNL DIAG

= OV

= ed o

d d

b d ed b

PRODUCT

NONE WA =20 000 NN

NN —

C.OMIDO DMR~11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
PROGRAM DGCUMENT
(ZbAID.P1Y
29~JuL~81 11:32

THE INFORMATION IN THIS DOCUMENT IS
SUBJECT
TO
CHANGE WITHOUT
NOTICE
AND
SHOULD
NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR .N THIS DOCUMENT.

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

FOLLOWING ARE

DIGITAL
DEC

(C)

1980,

1981

TRADEMARKS OF

PDP
DECUS

THE
USE
SUPPLIED

OR
BY

RELIABILITY
DIGITAL
OR

BY DIGITAL EQUIPMENT CORPORATION
DIGITAL

EQUIPMENT

UNIBUS
DECTAPE

CORPORATION:

MAS SBUS

OF
ITS

—

| CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11
(ZDMID.P11
29-JuL-81 11:32

29-JuL-81
30A(1052)
PROGRAM DOCUMENT

43
44
45

1
PAGE 3

SEQ 0002

REVISION HISTORY

37
8
%0
41

12:42

REVISION

REASON

DATE

INITIAL RELEASE

5 FEB 80

17 APR 80

?gpfigRT REMOTE LOOPBACK IN TESTS

2. BUG FIX - CONTROL C EXIT OF PROGRAM
WOULD CAUSE UNEXPECTED INTERRUPT ON
RESESSE = PUT MASTER CLEAR

IN CLEAN

BUG FIX = DTR WAS DROPPED WHEN WRITING
MODEM MAINTENANCE BIT
TURNAROUND
.)

?29§D18HECK Of

(AFFECTED MANUF.

M8207 PROGRAM TIMER IN

20 AUG 80

Col

AT ENGINEERING'S REQUEST, CHANGED TEST
26 OCT 81
15 SO THAT [T NO LONGER TESTS DMC MODE
BASC IN RESUME.
ALSO CHANGED TEST 16
SO THAT A MASTER CLEAR IS DONE BEFORE
A BASE [N RESUME AND TEST 16 NOW ONLY RUNS
IN INTERNAL LOOPBACK MAKING THESE CHANGES
GETS AROUND A PROBLEM IN MANUFACTURING.
THE DMR DOCUMENTATION WAS CHANGED TO
SPECIFY THAT A MASTER CLEAR MUST BE DONE
BEFORE A BASE IN RESUME.

. BUG FIX = ALLOWED 1
14.

THIS

REP TO BE SENT IN TEST

IS NECESSARY TO MASK

THE SOFT

ERROR MESSAGE THAT CAN OCCUR WHEN LARGE

MESSAGES ARE

SENT AT LOW BAUD RATES.

CZDMIDO DMR~11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P1

29-JuL-81

11:32

29-JuL-81

PROGRAM DOCUMENT

75
76
77
78
79

12:42

PAGE 4

CONTENTS

1.0

2.0 HARDWARE REQUIREMENTS

3.0 PRELIMINARY PROGRAM REQUIREMENTS

87
88
89

4.0 GENERAL PROGRAM CONSIDERATIONS
4.1 DIAGNOSTIC SUFERVISOR
4.2 EXECUTION TIME

92
93
%

INTRODUCTION

4.3 XXDP+

4.4 ACT/SLIDE

4.5 APT
4.6 MEMOR“ MANAGEMENT
4.7 MEMORY PARITY OPTION
4.8 ERROR LOGGING

5.0 PROGRAM LOAD MEDIA

\),

100

101
102

103
104
105

106
107

108 .
109
110
11
112
113
114
115
116
117
118
119
120
121

122
123
124
125

126

127
128

129
130

6.0 OPERATING INSTRUCTIONS
6.7

LOADING AND STARTING PROCEDURES

6.1.1 LOADING PROCEDURES
6.1.2 STARTING PROCEDURES

6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION
6.2 INITIAL DIALOGUE
6.3 PROGRAM OPTIONS
6.3.1 START COMMAND
6.3.1.1 TESTS SWITCH
6.3.1.2 PASS SWITCH
6.3.1.3 FLAGS SWITCH
6.3.1.4 END OF PASS SWITCH
6.3.1.5 EFFECT OF START COMMAND
6.3.2 RESTART COMMAND
6.3.2.1 TESTS, PASS, AND FLAG SWITCHES
6.3.2.2 UNITS SWITCH
6.3.2.3 EFFECT OF RESTART COMMAND
6.3.3 CONTINUE COMMAND
6.3.3.1 PASS SWITCH
6.3.3.2 FLAGS SWITCH
6.3.3.3 EFFECT OF CONTINUE COMMAND
6.3.4 PROCEED COMMAND
6.3.4.1 FLAGS SWITCH
6.3.4.2 EFFECT OF PROCEED COMMAND
6.3.5 ADD COMMAND
6.3.5.1 UNITS SWITCH
6.3.5.2 EFFECT OF ADD COMMAND
6.3.6 DROP_COMMAND
6.3.6.1 UNITS SWITCH
6.3.6.2 EFFECT OF DROP COMMAND
6.3.7 PRINT COMMAND
6.3.7.1 EFFECT OF PRINT COMMAND

SEQ 0003

" 36
137
138
139

PROGRAM DNCUMENT

12:42

1
PAGE 5

6. 3. 8 DISPLAY COMMAND
6. 3.8.1 UNITS SWITCH
6. 3.8.2 EFFECT OF DISPLAY (OMMAND
3. 9 FLAGS COMMAND
6. 3.9.1 EFFECT OF FLAGS COMMAND
3. 1 0
FLAGS COMMAND
6. 3.10.1 EFFECT OF ZFLAGS C(OMMAND
CONTROL CHARACTERS
3. 1 1
3. 2 HARDWARE PARAMETERS
3. 2 SOF TWARE PARAMETERS
EXTENDED DISCUSSION OF P-TABLE DIALOGUE
3. 14

140
141
142
143
144
145

8.0 TEST DESCRIPTIONS

147
148

9.0 ERROR INFORMATJON
9.1 ERROR REPORTING

146

O
.

134

135

29-JUL-81

08
.

131
132
133

30A(1052)

oo
.
]
[]

(ZDMIDO DMR-11 FUNCTIONAL T%gTS MACY11
CZDMID.PI1
29-JuL-81 1

7.0 DEVICE

INFURMATION TABLES

SEQ 0004

—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.PI

29-JuUL-81

11:32

29-JuL-81

PROGRAM DOCUMENT

12:42

PAGE 6

SEQ 0005

nd —
e
D e
b
e
=D
ed e
e

i
o wvVvIvivohu
o CO~NOWVISWN—=O

149

1.0

INTRODUCTION

THIS
PROGRAM
WILL
BE
IMPLEMENTED
USING
THE
DIAGNOSTIC
SUPERVISOR
AND
A STRUCTURED PROGRAMMING APPROACH.
BECAUSE
THE
DESIGN
WILL
CONFORM
TO
THE
SUPERVISOR
(STANDALONE
VERSIO?%ETHE FROGRAM WILL BE COMPATIBLE WITH ACT, APT, XXDP+,
AND

THROUGH DIALOGUE WITH THE OPERATOR, THE PROGRAM
WIIL
ALLOW
MODIFICATION
OF
DEVICE PARAMETERS, SUCH AS UNIBUS ADDRESS,

VECTOR ADDRESSES AND
TEST CONF IGURATION.
IN
ADDITION,
THE
OPERATOR
(AN
SPECIFY
PARTICULAR
TESTS
TO
BE
RUN AND A
VARIETY OF LOOPING, RUNNING, AND REPORTING MODES.
DEVICE ERRORS WILL BE REPORTED AS THEY
WILL

INCLUDE

GOO?EA?g BAD
CONTENTS.

TEST

OCCUR.

NUMBER AND DESCRIPTION OF

DATA,

AND

APPLICABLE

THE

DEVICE

THE

REPORT
ERROR,

2.0 HARDWARE REQUIREMENTS
THE

FOLLOWING

DIAGNOSTIC

HARDWARE

TESTS:

IS REQUIRED TO RUN THE DMP-11

PDP-11/04,05,10,20,30,34,35,40,45,50,60,
16K MEMORY
CONSOLE TERMINAL

FUNCTIONAL

OR 70

DMR-11

3.0 PRELIMINARY PROGRAM REQUIREMENTS
IT

1S ADVISED THAT THE STATIC DIAGNOSTICS BE RUN BEFORE THESE FUNCTIONAL

géASTQ?SICS.
N

IS ASSUMED THAT

THE

PROCESSOR

IN PROPER WORKING

ENSURE THAT THE SWITCH 1 AT LOCATION E-85 ON THE M8207 IS ON.
IF THIS
SWITCH IS OFF, THE MAINTENANCE BITS IN BSEL1 CAN'T BE USED AND CERTAIN
TESTS WILL BE NOT BE

CORRECTLY RUN.

WHEN CHOSING A CABLE

TEST CONNECTION,

ENSURE

THAT

THE

SWITCH PA(K

E-39 ON THE M8203 IS PROPERLY SET UP FOR THE DESIRED INTERFACE.
IF CHOSING TEST CONFIGURATION OPTIONS 1-4, IT IS NOT NECESSARY 10
SELECT THE INTERFA F, HOWEVER THE BAUD RATE MUST BE CORRECT.
FOR

EXAMPLE IF

IT IS DESIRED TO RUN CONFIGURATION 3 (H3255-EIA),

NOT NECESSARY TO HAVE SWITCH 7 OF

THE SWITCH PACK

IN THE OFF

IT IS

PCSITION.

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P1
29-JUL~-81 11:32
206

29-JUL-81

12:42

PROGRAM DOCUMENT

1
PAGE 7

IT IS, HOWEVER, NECESSARY TO HAVE

WITHIN THE

EIA RANGE.

SEQ 0006
THE BAUD RATE SELETCTED TO BE

NOTE THAT A MANUFACTURING=ONLY PAT(H IS
SPECIAL MANUFACTURING TEST CONNECTORS.
FLAG WORD 'MANUF' TO A NON-ZERO VALUE.
MAINTENANCE BIT IS SET BY A MODEM WRITC
ONBOARD CONNECTORS ARE USED.

REQUIRED TO RUN WHEN USING THE
THIS PATCH WILL CHANGE THE
WHEN THE FLAG IS NON-ZERO, THE
COMMAND IF THE V.35 OR EIA

——d e

)

R [NSTAN 1N T,NT, V1,1, ST}
S Volo NToe YV, F YU, §

211

30A(1052)

4.0 GENERAL PROGRAM CONSIDERATIONS
4.7
THIS

DIAGNOSTIC SUPERVISOR
PROGRAM

COMPATIBLE WITH THE

STANDALONE

DIAGNOSTIC

SUPERVISOR, AND MUST BE LOADED TO BE
CO-RESIDENT
WITH
THE
SUPERVISOR,
OR
BE
PREVIOUSLY COMBINED WITH THE SUPERVISOR
AND LOADED AS A SINGLE FILE.
IN EITHER CASE,
THE
C(OMBINED
PROGRAM WILL NOT EXCEED 16K OF MEMORY.
4.2 EXECUTION TIME
EXECUTION TIME
DMR BAUD RATE.

IS DEPENDENT ON THE PROCESSOR SPEED AND THE
EXAMPLES OF EXECUTION TIME

11/70 WITH CACHE AND DMR AT 2.4K
11/70 WITHOUT CACHE AND DMR AT 2.4K
11/34 AND DMR AT 2.4K

4 AND 1/2 MINUTES
S5 AND 1/2 MINUTES
10 MINUTES

4.3 XXDP+
THIS PROGRAM MAY BE LOADED UNDER XXDP+,
DUMP MODE OR CHAIN MODE.
4.4

AND

MAY

RUN

ACT/SLIDE

THIS PROGRAM MAY BE LOADED UNDER ACT OR SLIDE AND MAY BE
IN DUMP MODE OR (HAIN MODE.

RUN

4.5 APT
THIS PROGRAM MAY BE LOADED

APT=RD)

AND RUN

IN PROGRAM MODE

THE

APT

SYSTEM

SCRIPT MODE.

(INCLUDING

4.6 MEMORY MANAGEMENT

[F MEMORY MANAGEMENT

FUNCTIONAL

IS AVAILABLE,

DIAGNOSTIC.

IS USED BY CERTAIN TESTS

IN THIS

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P1
Sg;

263

264
265
266
Sgg

29-JuL~-81

11:32

29-JUL-81

12:42

PROGRAM DOCUMENT

PAGE 8

SEQ 0007

4.7 MEMORY PARITY OPTION

IF PARITY MEMORY

INSTALLED,

MEMORY

DISABLED BY THE PROGRAM,

PARITY

TRAPS

ARE

4.8 ERROR LOGGING

269
270
271
272
273
S;g

AT THE END OF EACH PASS ON ALL UNITS, THE PROGRAM PRINTS 0OuT
THE CUMULATIVE TOTAL NUMBER OF ERRORS SINCE THE LAST START OR
RESTART COMMAND.

276
277
278
279
280
281
282
283
284
285
286
287

THIS PROGRAM
(AN BE
LOADED
FROM PAPER
TAPE
USING
THE
ABSOLUTE
LOADER OR FROM ACT, SLIDE, OR APT SYSTEMS, OR FROM
ANY MEDIA SUPPORTED BY XXDP+.
WHEN USING
THE
PAPER
TAPE
ABSOLUTE
LLOADER,
THE
PROGRAM
SHOULD
BE
LOADED
FI]RST,
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR.
WHEN USING XXDP+, THE
DIAGNOSTIC
SUPERVISOR
SHOULD
BE LOADED FIRST, FOLLOWED BY
THE DIAGNOSTIC PROGRAM.

Sgg
290

Sg;

293

294

295

Sgg

5.0 PROGRAM LOAD MEDIA

6.0 OPERATING INSTRUCTIONS

6.1 LOADING AND STARTING PROCEDURES
6.1.17

LOADING PROCEDURES

THIS PROGRAM

ABRSOLUTE

MAY

LOADER.

LOADED

FROM

PAPER

TAPE

USING

THE

IT MAY ALSO BE LOADED FROM ANY XXDP+ LOAD

MEDIA. WHEN LOADED UNDER XXDP+,
WILL BE LOADED AUTOMATICALLY.

THE DIAGNOSTIC SUPERVISOR

298
299

%8?

6.1.2 STARTING PROCEDURES

302
%82

THE
PROGRAM
STARTS
AT
LOCATION
PROCEDURES TO START THE PROGRAM.

200.

USE

305
%8?

6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION

308
%?8

THE
DIAGNOSTIC
CAN BE EXECUTED STANDALONE UNDER XXDP+,
WITHOUT READING THE REMAINDER OF THIS DOCUMENT, AS FOLLOWS:

311
312
313
314
315
316

A) LOAD AND START DIAGNOSTIC USING RUN COMMAND
B) RECEIVE DIAGNOSTIC SUPERVISOR IDENTIFICATION AND PROMPT (DRS=(>)
() 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

STANDARD

DEC

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P1T
29-JuL-81 11:32

30A(1052)

29-JUL-81

12:42

PROGRAM DOCUMENT

1
PAGE 9

SEQ 0008

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

IS STARTED,

THE FCLLOWING IDENTIFICATION IS TYPED

DRS LOADED
DIAG. RUN-TIME

SERVICES

DR>
THE OPERATOR THEN PROCEEDS BY

TYPING ONE

OR MORE OF

COMMANDS DESCRIBED IN THE FOLLOWING SECTION 6.3.

THE

(FOR MORE

DETAILED INFORMATION, REFER TO THE DIAGNOSTIC SUPERVISOR
FUNCTIONAL SPECIFICATION).

6.3 PROGRAM OPTIONS

6.3.7

START COMMAND

L2220 SRdRSR00RRRRASRRRRRARRRR
RS2t
R
ddd

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

L3S S0

6.35.1.1

R0t

ARR

RRddt

Ali 2080

RRERd

TESTS SWITCH (/TESTS:<TEST=-LIST>)

<TEST=LIST>

RANGES OF

A SEQUENCE OF

DECIMAL NUMBERS

(1-5:8-10 ETC.)

THAT

(1:2 ETC.)

SPECIFY

THE

TESTS
TO BE EXECUTED.
THE NUMBERS ARE SEPARATED BY COLONS.
THE NUMBERS RANGE FROM 1 TO THE LARGEST TEST NUMBER
IN
THE
DIAGNOSTIC.
THEY MAY BE SPECIFIED IN ANY ORDER.
TESTS WILL

BE EXECUTED IN NUMERICAL ORDER REGARDLESS OF
THE
ORDER
OF
SPECIFICATION.
THE
DEFAULT
IS
TO EXECUTE ALL TESTS.
ON
THIS AND ALL SWITCHES, THE ANGLE BRACKETS <> ARE PUNCTUATION
USED
IN THE DEFINITION ONLY, AND ARE NOT TO BE TYPED BY THE

OPERATOR.

SEE EXAMPLE AT END OF 6.3.1.5.

6.3.1.2 PASS SWITCH (/PASS:<PASS=(NT>)
<PASS=CNT>

PASSES.

DIAGNOSTIC

IS A DECIMAL

A PASS

NUMBER

INDICATING

1S DEFINED AS

(ALL SELECTED TESTS)

THE

DESIRED NUMBER

THE EXECUTION OF

THE

FULL

AGAINST ALL UNITS SUBMITTED.

THE DEFAULT IS NON-ENDING EXECUTION.
THE PROGRAM IS ACCOMPLISHED EITHER BY

IN THIS CASE EXIT FROM
TYPING A CONTROL/C
OR
BY
OCCURANCE
OF AN ERROR WITH THE HALT ON ERROR FLAG BEING
ggg.OFT2E3E¥Ig IS A RETURN TO COMMAND MODE.
SEE EXAMPLE
AT

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

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuUL-81
PROGRAM DOCUMENT
CZDMID.P11
29-JuL-81 11:32
373

12:42

SEQ 0009

PAGE 10

<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

HALT ON ERROR,

LOE

IER
IBE
IXE

THE

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) CONTAIN-~
ING THE ERROR
INHIBIT ERROR REPORTING
INHIBIT BASIC ERROR REPORTS
INHIBIT EXTENDED ERROR REPORTS

PRI
PNT
BOF
UAM

DIRECT ALL MESSAGES ‘0 A LINE PRINTER
PRINT NUMBER OF TEST BEING EXECUTED
BELL ON ERROR
RUN IN UNATTENDED MODE, BYPASSING MANUAL

ISR
IDU
LOT

LOOP ON TEST

INTERVENTION TESTS
INHIBIT STATISTICAL REPORTS
INHIBIT DROPPING OF UNITS BY DIAGNOSTIC

FLAGS NAMED OR EQUATED TO 1

ARE

CLEARED.

END

A FLAG NOT

ARE SET,

SPECIFIED

THOSE EQUATED TO O

CLEARED.

SUéTC? 6I§ 1NgT GIVEN ALL FLAGS ARE CLEARED.
6.3.1.5.

THE

FLAGS

SEE EXAMPLE AT

6.3.1.4 END OF PASS SWITCH (/EOP:<INCR>)
<INCR> IS A DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS OF
PASSES)
IT
IS
DESIRED
THAT
THE
END
OF PASS MESSAGE BE
PRINTED.
THE DEFAULT IS AT THE
END
OF
EVERY
PASS.
SEE

EXAMPLE AT END OF 6.3.1.5.

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

THE
HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION
"# UNITS?'' TO WHICH THE
OPERATOR
REPLIES
WITH
A
DECIMAL

NUMBER

N FROM 1

TO 16.

THE TERM 'UNIT'' KEFERS 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

ALL

THE

HARDWARE

THE

RESPONSE

1S A CORE-RESIDENT TABLE

INFORMATION

FOR ONE UNIT.

CONTAINING

THE OPERATOR

MUST SUPPLY N (NUMBER OF UNITS) VALUES
FOR
EACH
QUESTION.
HE
MAY
DO
THIS
BY GIVING ONE ANSWER TO EACH QUESTION (IN
WHICH CASE THE SERIES OF QUESTIONS WILL BE POSED N TIMES) OR
BY
GIVING
N
VALUES, SEPARATED BY COMMAS, TO EACH QUESTION
(SERIES WILL BE POSED ONCE).
EACH QUESTION IS
FOLLOWED
BY
RADIX

FOR

DECIMAL,

B FOR BINARY,

O FOR

CZDMIDO DMR~17 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-B1
PROGRAM DOCUMENT
CZDMID.P11
29-JuL~-81 11:32
429
430
431

432

433
434
435
436
437
438
439

440
441
442
443

12:42

SEQ2 0010

PAGE 11

OCTAL, L FOR YES/NO) IN PARENTHESES AND
AFTER THE PARENTHESES.

THE

DEFAULT

FOLLOWING
THE HARDWARE QUESTIONS ARE THE SOF TWARE QUESTIONS
TO BUILD THE SOFTWARE TABLES, WHICH DEFINE THE
MODE
(QUICK
VERIFY ETC.) THAT THE DIACNOSTIC WILL EXECUTE IN.

WHEN

THE QUESTION "'# UNITS?'' IS ANSWERED, MEMORY STORAGE IS

ALLOCATED FOR THE

~-TABLES, AND

THERE

NOT

ENOUGH

THAN ONCE

ACCOMMODATE THEM THE MESSAGE '‘TOO MANY UNITS'' IS ISSUED.
THIS CASE THE DIAGNOSTIC MUST BE EXECUTED MORE
TEST ALL UNITS.

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

446

THIS

448

ALL UNITS.

447

449
450
451
452
453
454
455
456

457
458
459
460
461
462
463
464
465
466

467

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

484

:
EXAMPLE

444

445

VALUE

COMMAND

CONSISTING OF

WILL

CAUSE

THREE PASSES

TO BE MADE,

TESTS 1,2,3,4,6,8,9, AND 10

THERE

SAYING <FLAG=1>,

EXECUTED

EACH PASS

AGAINST

IS NO DIFFERENCE BETWEEN SAYING <FLAG> AND

THE NOTATION <FLAG=0> IS MEANINGFUL ONLY ON

A
COMMAND
OTHER
THAN
START
TO
CLEAR
A
FLAG
THAT WAS
PREVIOUSLY SET.
NOTE THAT ON ALL COMMANDS
ONLY
THE
FIRST
THREE LETTERS ARE SCANNED.

6.3.2 RESTART COMMAND
L3822

22d

00822t t0RdSARiRaRRAtRRRRRRStRdtatR
ittt ld

RES(TART)/TESTS:<TEST~LIST>/PASS :<PASS~(NT>/FLAGS:
<FLAG=LIST>/UNITS:<UNIT-LIST>

ANR AR

6.3.2.1

ARR AR

RRRRRRRRANR

AR AR

TESTS, PASS, AND FLAGS SWITCHES

<TEST=LIST>,

<PASS-CNT>,

AND <FLAG-LIST> ARE

THE

START

.
COMMAND

6.3.2.2 UNITS SWITCH (/UNITS:<UNIT=-LIST>)
<UNIT-LIST>
IS
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

INDICATES THE POSITION
OF
THE
P-TABLE
AS
THE
DATA
WAS
ENTERED
DURING THE HARDWARE DIAGLOGUE.
THE UNITS WHICH ARE
SELECTED MUST NOT HAVE BEEN DROPPED
BY
THE
DROP
COMMAND.
SEE
THE DISCUSSION OF ADD AND DROP COMMANDS BELOW.
DEFAULT
éS T0 gEST ALL UNITS WHICH HAVE NOT BEEN DROPPED BY
A
DROP

6.3.2.3 EFFECT OF RESTART COMMAND

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11

485

486

487

488

489
490

49
492
493
494
495
496
4«97
498
499
500
501
502

503
504
505

29-JuL-81

11:32

29-JuL-81

12:42

PROGRAM DOCUMENT

A CONTROL/C WAS ENTERED BY

b
b
b
e
D e
b

THE OPERATOR.

6.3.3 CONTINUE COMMAND
2822283222222

22280

20ddRd

RS2l RitRRRdtRtiRsRiRd
Rl q

: <FLAG-LIST>
CON(TINUE) /PASS : <PASS=CNT/FLAGS
1382222028220

22200

RdRRR0dRR

Rttt

ikt

aladss

6.3.3.1 PASS SWITCH (/PASS:<PASS=(CNT>)
IS

SAME

IF NONE REMAINS,

—d

SEQ 0011

COMMAND
MODE
HAS BEEN REENTERED IN ANY OF THE THREE NORMAL
WAYS:
A) THE REQUESTED NUMBER OF PASSES HAVE BEEN MADE
B)
AN
ERROR WAS ENCOUNTERED WITH THE HALT ON ERROR FLAG SET ()

IN START

THE UNSATISFIED PASS-CNT

VO~
W =

PAGE 12

THE
RESTART
COMMAND DIFFERS FROM THE START COMMAND [N THAT
THE P-TABLES FROM THE PREVIOUS
START
COMMAND
(THERE
MUST
HAVE
BEEN
ONE)
ARE USED, INSTEAD OF NEW ONES BEING BUILT.
THE UNITS SWITCH GIVES THE ABILITY TO
SELECT
A
SUBSET
OF
THESE.
THE
SOFTWARE DIALOGUE MAY OPTIONALLY BE REEXECUTED
(OPERATOR WILL BE ASKED). THE
COMMAND
(AN
BE
USED
AFTER

<PASS-=CNT>

COMMAND,

BUT

THE

DEFAULT

FROM THE PREVICUS START OR RESTART.

THE DEFAULT IS NON-ENDING EXECUTION.

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

(OMMAND,

BUT

UNSPECIFIED

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

6.3.4 PROCEED COMMAND
T
Y

)
: <FLAG=-LIST>
CEED
/FLAGS
PRO(
\ 2222022200802 8222020RRRRRRRRRRAARARRRRARRRRRRRRR2RRR
SRS S

6.3.4.1

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

<FLAG=L]ST>

IS AS

THE

FLAGS RETAIN THEIR CURRENT

START

VALUE.

(OMMAND,

BUT

UNSPECIFIED

(ZDMIDC DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P11
541
542
543
544
545
566
547
548
549
550
551
552
553

29-JuL-81

11:32

29-JUL-81

12:42

PROGRAM DOCUMENT

PAGE 13

SEQ 0012

6.3.4.2 EFFECT OF PROCEED COMMAND
PROCEED

MUST FOLLOW A START,

RESTART,

OR (ONTINUE.

COMMAND

MODE MUST HAVE BEEN ENTERED VIA A HALT ON ERROR.
THE EFFECT
OF
THE
COMMAND
IS
TO BEGIw
EXECUTION AT
THE LOCATION
FOLLOWING THE ERRCR CALL.
PARAMETERS MAY BE ALTERED.

NEITHER

HARDWARE

NOR

SOF TWARE

6.3.5 ADD COMMAND
2232232222820

222

23022

0dRdR22

02222

20dR22

RSttt

das

)

ADD/UNITS:<UNIT-LIST>
ARREER AR AR AR A AR AR AR ANRA R

A AR R

RAARAANRARAR AR

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

UNIT

MUST

HAVE

P-~TABLE

TO THE

TEST

MEMCRY

SEQUENCE.

DUE

EACH

TO AN EARLIER

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

6.3.6 DROP COMMAND
AR

AR AR RREANRR

AN AR RN

ARRK AN

RRNRARRECRRA AR

DRO(P) /UNITS:<UNIT-LIST>
L2828

82208

6.3.6.1

RS2

UNITS SWITCH

<UNIT=LIST>

R0 RRRRR222RRRRSRRRRRRR
RS R/

(/UNITS:<UNIT-LIST>)
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
1242228832228 3232322228230R2RR2RSRSRRERRRRRERRRRRRRRRRRRSR

PRI(NT)

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11

CZOMID.PI
597

598
599

29-JUL-B1

12:42

PROGRAM DOCUMENT

PAGE 14

SEQ 0013

1822322222322 22222 22220282002 22822

8233222222822

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

606
607

6.3.8 DISPLAY COMMAND

609

L2238 223322322802 2222d

610

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

612
613

222Z 2

6.3.7.1 EFFECT OF PRINT COMMAND

602
603
604

611

2822223222223

L2282 2222 0222 2d22 2822

0020030222828

3282222233 232322382 228 2]

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

616

CUNIT=LIST>

618
619

6.3.8.2 EFFECT OF DISPLAY COMMAND

IS AS

SINCE
THE
LAST
THE ISR (INHIBIT

3022222223232 23222322228 22 2]

614

IN THE RESTART COMMAND.

621
622
623
624
625
626
627

THE HARDWARE P-TABLES FOR ALL UNITS UNDER TEST
ARE
PRINTED
GUT
IN
THE
FORMAT
IN WHICH THEY WERE ENTERED.
ANY UNITS
THAT WERE DROPPED BY THE
OPERATOR
'DROP'' COMMAND
ARE
SO
DESIGNATED.

629

LA RSS2SRttt

630

FIA(GS)

632
633
634

6.3.9.1 EFFECT OF FLAGS COMMAND

636

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED.

638
639

6.3.10 ZFLAGS (OMMAND

641

(2222222022222 280300230

631

642

6‘.3

29-JuL-81 11:32

30A(1052)

6.3.9 FLAGS COMMAND

1222222222222

RSt RRRRRRA020RE22222E02t

032N 2222320223232
223 222322224807 ]

ZFL (AGS)

I A0S 2 2280830208800 d8f200R2d220228383033238228323223022282328233222¢)

6.3.10.1 EFFECT OF

ZFLAGS COMMAND

648
649

ALL FLAGS ARE CLEARED.

651

6.3.11

650

2222222 d2d2283282222328 3232232222222 22232

645
646

022282222

CONTROL

(CHARACTERS

—

653
654
655
656
657
658
659

30A(1052)

29-JUL-81

12:42

PRGGRAM DOCUMENT

2
PAGE 15

A CONTROL C (C) ENTERED DURING
A
RETURN
TO
(OMMAND MODE.

CONTRIOL

(I)

SEQ 0014

THE EXECUTION OF

ENTERED DURING ONE OF

THE

A DIAGNOSTIC

CAUSES

THREE OPERATOR

DIALOGUES= HARD CORE QUESTIONS (SEE
6.2) ,HARDWARE
DIALOGUE
(SEE 6.3.7.5), OR SOF TWARE DIALOGUE (SEE 6.3.1.5) CAUSES THE
DEFAULTS TO BE TAKEN FOR THE REMAINDER OF THAT DIALOGUE.

A CONTROL O

CAUSES

ALL

(0)

ENTERED DURING THE EXECUTION OF

TELETYPE

OUTPUT

A DIAGNOSTIC

SURPRESSED

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

FOR

THE

TYPED,

6.35.12 HARDWARE PARAMETERS
THE
THE

FOLLOWING 3 QUESTIONS WILL BE ASKED ON A START COMMAND.

VALUE LOCATED

ggggngE VALUE
NSE

TO THE LEFT OF

THAT

WILL

CSR ADDRESS:

THIS

IS THE ADDRESS AT WHICH THE

THE

(0)

UNIBUS.

THE

VECTOR ADDRESS:

THIS

IS THE ADDRESS OF

THE

MARK

THE

(SELQ)

RESIDE

A CARRIAGE RETURN

(SR REGISTERS

ALLOWABLE

RANGE

IS 160070.

160000-177776

(0) 300 ?
THE

ALLOWABLE

DEFAULT VALUE IS 300.
3.

QUESTION

160070?

(OCTAL), AND THE DEFAULT VALUE

DEVICE.

THE

TAKEN

INPUT

RANGE

INTERRUPT VECTOR

FOR

THIS

IS 000-776 (OCTAL), AND THE

TEST CONFIGURATION INTERNAL (NO CONNECTOR)
H3254 - V.35
(NOTE:
MODE 1-4 ALLOWS
H3254 - INTEGRAL
PROGRAM [NTERFACE SELECTION)
H3255 - RS232C/423
H3255 = RS422
CABLE AND SW PACK INTERFACE SELECTED
(V.35~H3250, INTEGRAL-B(55A=10, RS232C-+1325, RS423/422-H3251)
nwhonunnn

(ZDMID.P1Y

FUNCTIONAL TESTS MA(CY11
29-JuUL-81 11:32

VSN
—2 O

(ZDOMIDO DMR-11

* SELECT THE FOLLOWING ONLY
6 - LOCAL LOOP
7 = REMOTE LOOP
0
5?7

THE MODEM SUPPORTS LOOPBACK «

THIS QUESTION WILL COVER ALL THE POSSIBLE TEST CONFIGURATIONS.
THE DEFAULT IS FOR ACTUAL CABLE LOOPBACK (5).
CONFJGURATION O
WILL ENABLE LINE UNIT (TTL) LOOPBACK.
IF THIS IS SELECTED NO
CABLES OR CONNECTORS SHOULD BE CONNECTED.
CONFIGURATIONS 1-4
WILL SELECT THE INTERFACE REGARDLESS OF THE SWITCH SETTING AS

LONG AS THE PROPER BAUD RATE

6.3.13 SOF TWARE PARAMETERS

IS SELECTED

(l.E.

EIA = 2.4K-19.2K).

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
PROGRAM DOCUMENT
CZDMID.P11
29-JuUL-81 11:32
709
710
71
712
713
714
715
716
717
718
719
720

721

12:42

2
PAGE 16

SEQ 0015

THE ONLY SOF TWARE PARAMETER QUESTION ASKED BY THE DIAGNOSITC
CONCERNS A SOFTWARE TIMEOUT VARIABLE THAT IS USED TO PREVENT

SOF TWARE "HUNG'' CONDITIONS.

THIS VARIABLE IS A VALUE FORM 1-5.

SELECTABLE PROGRAM LOOP TIME-OUT VARIABLE

[REFER TO LISTING 6.3.131

(MAX=5; MIN=1)

(0)

5 ?

THERE ARE TWO FACTORS THAT SHOULD BE CONSIDERED WHEN ANSWERING
THIS QUESTION.
THE FIRST IS PROCESSOR SPEED; THE FASTER THE
PROCESSOR THE HIGHER THE VARIABLE SHOULD BE.
THE SECOND IS

BAUD RATE.
SHOULD BE.

THE SLOWER THE DMR BAUD RATE THE HIGHER THE VARAIBLE
FOR EXAMPLE:

11/70 WITH CACHE AND DMR AT 1 MEG.:

11/34 AND DMR AT 56K:
11740 AND DMR AT 2.4K:

2
3

THE DEFAULT IS 5.
THIS WILL COVER THE WORST CASE
WITH CACHE AND THE DMR AT 2.4K).

(I1.E.

11/70

6.3.14 EXTENDED DISCUSSION OF P-TABLE DJALOGUE
THE
THE

FULL CAPABILITY OF THE HARDWARE DIALOGUE IS REVEALED BY
FOLLOWING DISCUSSION OF WHAT HAPPENS INTERNALLY.

AS SOON AS THE QUESTION "'# UNITS?'"
IS
ANSWERED
(WITH
THE
NUMBER
N,
SAY)
SPACE IN CORE IS ALLOCATED FOR N P-TABLES.

ALL OF THE P-TABLES ARE OF THE SAME FORMAT, AND THERE
IS
A
ONE-TO
ONE
CORRESPONDENCE
BETWEEN
THE HARDWARE PARAMETER
QUESTIONS AND THE SLOTS IN THE P-TABLE FORMAT.

ON THE FIRST
ALL
OF
THE

1RIF THRU THE QUESTIONS, ALL OF
THE
SLOTS
IN
P-TAX_ES ARE FILLED.
IF THE OPERATOR TYPES IN
LESS THAN N EXPLIC ~ VALUES
IN RESPONSE
TC
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

USED TO FILL THAT

SLOT

STRING BECOMES

THE

NEW DEFAULT AND

IN THE REMAINING P-TABLES.

ON
SUBSEQUENT TRIPS THRU THE QUESTIONS, THE SAME PROCESS IS
CARRIED OUT, EXCEPT THAT THE EARLIEST P-TABLE
NOT
TO
HAVE
RECEIVED
AN
EXPLICIT VALUE IN ANY OF ITS SLOTS NOW ASSUMES
THE ROLE THAT TASLE NUMBER ONE PLAYED IN THE FIRST TRIP.
THE SERIES OF QUESTIONS
IS
REISSUED
UNTIL
AT
LEAST
ONE
QUESTION HAS RECEIVED N EXPLICIT VALUES FROM THE OPERATCR.

IN
GIVING
A
STRING
OF VALUES, COMMAS WITHOUT INTERVENING
VALUES MAY BE USED TO INDICATE
A
REPETITION
OF
THE
LAST

NAMED VALUE.

A
STRING
OF
VALUES
MAY
BE
GIVEN
AS
A RANGE (6-10 FOR
EXAMPLE}. IF THE VALUES REPRESENT PURE NUMERICAL DATA,
TH'S

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-B1
PROGRAM DOCUMENT
29-JuL~-81 11:32

CZDMID.P11

776

777

778
779
780

781

782
783
784

785

786
787
788

789
790

791
792

SEQ 0016

PAGE 77

SAMPLE
RANGE
TRANSLATES TO
INCREMENT OF 1). IF THE VALUES

THE

STRING

6.7.8,9,10

(AN

ARE
ADDRESSES,
THE
SAMPLE
RANGE TRANSLATES TO THE STRING 6,8,10 (AN INCREMENT OF 2).
NOW

LET

SEE

HOW

CONSTRUCT A SET OF P-~TABLES.

(COULD

USE THESE CAPABILITIES

ASSUME THAT WE HAVE 16

UNITS,

AND THAT THERE ARE THREE HARDWARE PARAJETERS 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 DESIRED VALUE
FOR
THE
SECOND
PARAMETER
BE
EQUAL
TO
THE
UNIT
NUMBER

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

FOLLOWING DIALOGUE WOULD ACCOMPLISH

# UNITS

UNIT O

(D)

UNIT 7

<QUESTION

16
? 75
? 0-6
? 76

<QUESTION 2> ? 7-11,,13-15
<QUESTION 3> 2 77
-~

765
766
767
768
769
270
771
772
773
774
775

12:42

THIS

GOAL:

—

CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
(ZDMID.P11
793
794
795
796
797
798
799

800

29-JuUL-81

11:32

29-JUL-B1

PROGRAM DOCUMENT

THE

FIRST

TIME

IN ALL 16 TABLES.

12:42

2
PAGE 18

THE SERIES IS ASKED,

SEQ 0017

SLOT ONE RECEIVES A 75

SLOT TWO RECEIVES THE VALUES 0,1,2,....6
TABLES 0 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 IN THE FORM
‘"UNIT
Xxx'' AT
THE
BEGINNING
OF EACH SERIES).
QUESTION_1 IS RESPONDED TO

BY A <CR>, SO SLOT ONE LTAYS AT CONSTANT
THRU 15,

SINCE NO NEW EXPLICIY VALUES ARE

TYPED

TABLES

IN.

SLOT

TWO

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
¥AELE?S13 THRU 15. SLOT THREE GETS THE VALUE 77 IN TABLES 7
HRU

THE DIALOGUE IS TERMINATED WHEN THE SOf TWARE RECCGNIZES THAT
16 EXPLICIT VALUES HAVE BEEN GIVEN FOR AT _EAST ONE QUESTION
(NAMELY QUESTION 2).

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)

12:42

PROGRAM DOCUMENT

7.0 DEVICE

SEE

INFORMATION

PAGE 19

SEQ 0018

TABLES

THE GLOBAL EQUATES SECTION FOR DEVICE CSR BIT DEFINITIONS

8.0 TEST DESCRIPTIONS
TRTR

* % AR

. %
.

RN AR AR AR

AR R AR

AR AR AR RRRRR R RN AR RAARRRR R ARRNRRR AR AR AR AR

TEST 1 - DMR-11
VERIFY THAT ADDRESSING THE 4 UNIBUS (SRS DOES NOT CAUSE A NONEXISTENT MEMORY TRAP.

. W

‘%

THE DMR IS AN NPR DEVICE RESIDING ON A UNIBUS.
COMMUNICATION
BETWEEN THE MAIN CPU AND THE DMR IS ACCOMPLISHED THROJGH A
SET OF FOUR 16-BIT UNIBUS CONTROL AND STATUS REGISTERS (CSRS).
THE FOUR REGISTERS ARE ASSIGNED ADDRESSES IN THE 1/0 PAGE
FLOATING ADDRESS SPACE: 76XXX0 = 76XXX6

%
1
t
t

NOTE: THIS TEST IS REDUNDANT [N THAT STATIC LOGIC TESTS SHOULD
HAVE BEEN RUN BEFORE THESE FREE-RUNNING TESTS WERE STARTED, AND
THEY SHOULD HAVE DETECTED ANY (SR ADDRESSING PROBLEMS.

BUT JUST

IN CASE

t 1223202228200

W AR

TESTS AREN'T RUN, WE'LL BE SAFE.

RRRRRRR2RRRRRRR

AR AAE AR RN

AR R

ROM CRC/CCITT - CHECK ROM POSITION AND

RRRRRR

ittt

R AR AR AN AR AR AN AR RN AR NI A RAANRR RN ®

TEST 2 - DMR-11

MR
1

CALCULATE

CRC/CCITT.

THE

LAST & BYTES CONTAIN INFORMATION ABOUT THE ROM TO CHECK.
THE 1ST
OF THESE BYTES CONTAINS THE ASCII VERSION NUMBER.
THE 2ND BYTE

* %

[

. %

CONTAINS THE ROM NUMBER.
THE 3RD AND 4TH BYTES CONTAIN A NEGATIVE
CRC/CCITT WORD FOR THE ROM.
CHIP ADDRESS RANGE
LOCATION
(HIP NO.
BYTE
ADDRESS RANGE

EQ3
EQ2
EQ4

0
1
2

EOQT
EOQS
E14

LOW
HIGH
LOW

3
4
5

HIGH
LOW
HIGH

000C - 1777
0000 - 1777
2000 - 3777

2000 - 3777
4000 - 5777
4000 - 5777

8,8,8,%;
8, 8,8,

THOSE STATIC

202282

sxnnnxnxnantwn

[MPORTANT

1111111

ga g

AR A AR AR AN SN RN R AR R AW

FOR THIS TEST TO RUN CORRECTLY, ENSURE THAT SWITCH 1 AT LOCATION
E8S ON THE M8207 IS ON.
IF THIS SWITCH IS OFF, BSEL1 WILL BE
LOCKED OUT AND THE MAINTENANCE FEATURES WILL NOT BE ENABLED.

il{
bl
4
* %

8,8,

- W 8222282222200 dd0R2d0ffRRRARRRRRRR00R202002
2220200000000

SUBTEST 1

8¢y

* w

{

bl
b

- ON THE FIRST PASS PRINT THE VERSION # IN EACH ROM

SUBTEST 2 - GENERATE THE CRC-CCITT IN EACH ROM AND COMPARE 1T
IT AGAINST THE CRC BLASTED IN THE ROM
SUBTEST 3 - (COMPARE THE ROM # BLASTED IN THE ROM AGAINST THE
EXPECTED ROM 4,

814
815
816
817
818

29-JuUL~-81 11:32

CZDMID.P11

29-JuL-81

| 4221202302332

023322

8320220232802 RfRARRRRERtRRRRilRRatltlalatslls
]

CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052%
29-JUL-81
CZOMID.PIN
29-JuL-81 11:32
PROGRAM DOCUMENT
869
870

12:42

PAGE 20

SEQ 0019

871

.'ittfittit*ktitt’*l‘!t'tttitt!ttittttttttitttttttttttttttttttttttttttttt

872
873
874

o*
TEST 3 - DMR-11
;* MASTER CLEAR
;% THIS TEST WILL ISSUE 2 MASTER CLEARS.

877

;¢ RUN WHEN THE MICRODIAGNOSTIC BIT (BIT 13 IN SELO) IS CORRECTLY

875
876
878

EACH CALL TO THE MASTER

;* CLEAR ROUTINE WILL ENSURE THAT THE NUN BIT WILL BE SET.
ALSO
;* THE MASTER CLEAR WILL CAUSE THE DIAGNOSTIC MICROTESTS TO BE
;* SET OR CLEARED.

BECAUSE THE RUNNING OF MICROTESTS DEPENDS ON THE

879
880
881
882
883

:*
;%
;*
;*
;»

886

:* WHEN RUNNING THIS TEST, WE EXPECT TO ADD THE RESULTS OF BSEL3

884
885

887

888

889

890
gg;
893
894
895

896

EXCLUSIVE OR OF THE HARDWARE SWITCH 10 ON E134 OF THE M8203 AND
THE MICRODIAGNOSTIC BIT, WE CAN'T KNOW WHETHER THE SETTING OR
CLEARING OF BIT 13 WILL RESULTM IN THE RUNNING OF MICROTESTS.
THEREFORE THE MASTER CLEAR SUBROUTINE WILL TOGGLE (I.E. SET
BIT 13 ONLY ON EVERY OTHER MASTER CLEAR) THE SOFTWARE BIT.

;* THIS WILL ENSURE THAT REGARDLESS OF THE POSITION OF THE
;* HARDWARE SWITCH, MICROTESTS WILL BE RUN FVERY OTHER MASTER CLEAR.
;* AFTER EACH MASTER CLEAR.

;* BSEL3 = 100

;% BSEL3 = 200

;* IF THE RESULT OF
;* REPORTED.

MICROTESTS DISABLED

MICROTESTS RUN SUCCESFULLY

THE 2 MASTER CLEARS IS NOT 300, AN ERROR IS

bl4

;* ADDITIONALLY THIS ROUTINE WILL REPORT WHENEVER THE RESULT OF
;x BSEL3 IS 0.
THIS WILL MEAN THAT THE DEVICE IS NOT A DMR
s+ (I.E. DMC)

:fi'ttttttttt**tt*'tl’fitfitt't'itfi**fit*l'l'*tttittttttt't*t**t'tttttttttttt

897
898
899
900

901

"tt*fittfitfifil’tfittttttt**ti*‘tt*'fitit*itttt*ttttttttttiitttttfi*fi*ttttiti

902

BASE IN COMMANDS

905
906
907
908
909
910
911

;*
J*
;®
.
;*
i
o

SUBTEST 1

382

g}%

914

* %

TEST 4 - DMR-11

SUBTEST 2

- ISSUE A BASE IN
DMR MODE.
ENSURE THAT THE DMR MODE BIT (BIT 4) IS SET IN
THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP
MESSAGE VARIABLES ARE PROPERLY INITIALIZED.
- ISSUE A BASE IN
-~
DM(C MODE.
ENSURE THAT THE DMC MODE BIT (BIT 4) IS CLEAR IN
THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP

MESSAGE VARIABLES ARE PROPERLY INITIALIZED.

"tttt"ttti'tt*tfi'tttitt'tt'tt..t.fitk'lQfifit't'ttlfiitttt'tttttt.tfitl'l'

CZDMIDO DMR-11 FUNCTIONAL TESTS MA(CY11 30A(1052)
29-JUL-81
PROGRAM DOCUMENT
29-JuL-81 11:32

CZDMID.P11

12:42

PAGE 21

SEQ 0020

:ttt*fit*tttittttttttittt‘t'ttt*ttttttfi‘t*t‘fit*t*tt*ttttttttiitttttttt'

;* DMR COMMANDS

SUBTEST 1

:*
o

TEST 5 -~ DMR-11

= ISSUE AN ENABLE EXTENDED ERROR COMMAND AND CHECK THAT
THE EXT.

ENABLE BIT

IS SET

IS SCRATCH PAD 13.

THEN

?éS?B%EREXTENDED ERRON AND CHECK THAT THE ENABLE BIT

:*
o

SURTEST 2

-~ SET REP/SEL TIMER VALUE AND SET THF DMR THRESHOLD
VALUES.
CHECK THAT THE VALUES ARE CORRECT IN

THE BASE

TABLE

AFTER HALTING

THE

DMR.

w
*
4

. * (3222220220

RRRERRRRRRRRlRRRtRdRAsRtR

2288222328020
*

CONTROL

Rttt

RalRRsd]

003 0iRdRidsRtittttst
it
ittt Ratisoltliga
sttt dd]

TEST 6 = DMR-11
IN COMMAND TEST =~

SUBTEST 1

CONTROL

SUBTEST 2

g??TTSLSéfi.

‘x

SUBTEST 3

SUBTEST 4

CONTROL IN, MAINTENANCE MODE.
ENSURE THAT MAINT. MODE
BIT IS SET IN SCRATCH PAD 7.
CONTROL IN USING SELECTED LOOPBACK.
ISSUE A CONTROL IN
USING THE USER SELECTED LOOPBACK.
IF THE LOOPBACK IS

THE

DDCMP MODE.

CLEAR

ENSURE

THAT

IN THE MODEM STATUS WORD,

ALSO ENSURE THAT DDCMP MODE BIT IS SET IN SCRATCH PAD 7.

IN, FULL DUPLEX,

HALF-DUPLEX BIT
HALF

DUPLEX.

ENSURE

THAT

THE

HALF

DUPLEX

- %

NgZEEOgSECT'

| 4

VED.

DMR RUN MODE ACKNOWLEDGE WILL NOT BE

RN AN AR

AN AR AN AR

* A

A A AR AR AN AN AT

AR AR R

* MODEM WRITE

*
*
*
»
*
*
*

SUBTEST 1

SUBTEST 2

AR AR R

A ARAAA RN AR AAAARANARNNANNANARRAAANARANAN
AR RN AN

A AR

IR AR AR

R AR

AR RN

R RN IR AR AR

NI RN RN ER

TEST 7 - DMR-11

COMMAND

- WRITE DATA PATTERNS INTO THE MODEM WRITE REGISTER.
ENSURE THAT ON THE NEXT MODEM READ THAT THE
MICROCODE RETURNS THE PATTERN WRITTEN INTO BSELSG.
- ATTEMPT TO WRITE BOTH THE HALF-DUPLEX BIT AND THE
RTS HOLD BIT.
THE MICROCODE
TO HAPPEN.
WHEN READING THE
THE

HALF~DUPLEX

SHOULD BE

SHOULD NOT ALLOW THIS
MODEM STATUS, ONLY

SET.

A2 A0SR0 00RARRRRtRRRRARRERRRRRaRRARRRSRRARSRRRRRRstslA]

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11

29-JuL-81 11:32

29-JuL-81

PROGRAM DOCUMENT

12:42 PAGE 22

gg?

:tt*"t'*ttttttttttttt'ttttttttttttfittttttlttttttttttttttt'tt'tt'ttt"

969
970
971

i«
o*
i

SURTEST 1

- TRANSMIT A BUFFER THREE TIMES WIHOUT ASSIGNING A
RECEIVE BUFFER. BY ASSIGNING A NO BUFFER THRESHOLD
OF THREE, ENSURE THAT A NO BUFFER ERROR 1S RECEIVED

973
974
975

ix
i
i*

SUBTEST 2

- TRANSMIT A BUFFER WITHOUT A RECEIVE BUFFER.
ASSIGN THE NAKS THRESHOLD OF 3 AND A NO BUFFER
THRESHOLD OF 7. CHECK THAT THE NAKS ERROR COUNT IS

977

:tttttttttttttttttfittttttt'ttttlttfitttttntttfittt'ttt'tttttttt'ttttttt'

978
979
980
981
982

;tt't'ttl'ttltttttt'ttttttt"tttttttttttfitktfittt'tfittttttttwttttt'tttt

968
972

976

983
984

985

986

987
G88

ggg

TEST 8 - DMR-11

AFTER THE THIRD THRANSMISSION.
THREE AFTER SHUTDOWN.

TEST 9 - DMR-11
ow
:* NON-EXISTENT MEMORY (NXM) ERROR (HE(K

:« PERFORM DMR COMMANDS USING NXM ADDRESSES; VERIFY THAT NXM ERROR IS
.« REPORTED [N EACH OF THE FOLLOWING SUBTESTS:
» SUBTEST 1 - BASE IN RESUME COMMAND - BASE TABLE ADDRESS IS NXM
:+ SUBTEST 2 =~ BA/CC IN RECEIVE COMMAND - BA/CC IN ADDRESS IS NXM
x SUBTEST 3 ~ _A/CC IN TRANSMIT COMMAND - BA/CC IN ADDRESS IS NXM
* %

991

;ttttttttttttttttttttttttttt'tttttttttttttttttttttttttttnttttttttttttt

992
993
994
995
996

:t'ttfittttt.ttttttttttt'ttttttttt'tttttttfittttfittttttfittttttttttttttkt

998
999
}88?

:» TIME OUT - FORCE A TIMEOUT AND VERIFY THAT THE ERROR IS REPORTED.
s* THIS TEST WILL ALSO USE AN APPROXIMATE TIMER TO DETERMINE IF THE
;« MB207 1 MSEC. PROGRAM TIMER IS OUT OF RANGE.

997

TEST

10 - DMR-11

. w

100?

Elttttittttttttttttttfititttttttttttttttttttttttttttttttfitttttttt'tt'tt

1004
1005
1006
1007

;.ttttfi'tt'tttttttttttt'tttttttttttfitttttttttttttttttttttttttttttttttt

1009

1003

1008

18;?

1012

1013

:»

TEST 11 - DMR-11

MESSAGE TOO LONG - TRANSMIT A MESSAGE THAT IS TOO LONG FOR THE

RECEIVE BUFFER AND VERIFY THAT THE ''TOO LONG'' ERROR IS RECEIVED.

;ttttttttttttttttttttttt'tttttttt'ttttt'ttttttttfittttttttt"tttfittt‘tt

SEQ 0021

12:42

SEQ 0022

PAGE 23

2833322323222 2333888823002df0230220d
Rt
8tRRRRR 020
RRR2020
RN

TEST 12 - DMR-11

. %

bR4

PROCEDURE

YR
TP

* X

A PROCEDURE

YRR

.
*

P
S

SUBTEST 1
SUBTEST 2

SUBTEST 4
SUBTEST 5

SUBTEST 3

. %

ERRORS -

THE FOLLOWING SHOULD CAUSE

* &

» %

LIPS

N PNININ)
b b D ) b =
W N = OO0 NONN S

D ed nd
b e
e
d
—

o [ololelolelelolole]

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
PROGRAM DOCUMENT
CZDMID.P1
29-JuL-81 11:32

ERROR:

THE DMR-11

TO HALT AND RESPOND WITH

A SECOND BASE IN COMIAND
A CONTROL IN BEFORE A BASE

A BA/CC IN BEFORE A BASE IN

A BA/CC
A BA/CC

IN RCV WITH A BUFFER LENGTH OF 0O
IN XMIT. WITH A BUFFER LENGTH OF 0

> %
t L 3223222322323

22230223233883202322

RR2R280

20282022

2000

20RtRRRddd

tttttt**lttttttttttttt"tt'tt!ttfi'tt*lttttiti'*‘t*i'fi'fitt'itttttttttt

TEST 13 - DMR-11
;* FREE RUNNING FLAG MODE DATA TEST
;* TRANSMIT A MESSAGE AND VERIFY THE RECEIVED DATA IS CORRECT.
. %

i+ IN THIS TEST NO INTERRUPTS ARE USED AND THE LINE UNIT IS IN
;*

INTERNAL

THE

DMR

(TTL)

IS USED

LOOPBACK.

THIS TEST

IS THE FIRST TEST

IN A DATA TRANSMISSION MODE.

IN WHICH

ttlt.*ttitt'tttittfittfitt*'tttitfikt!tttttitttttt'tttitittit'ttit't!t"

2322322333223 22223238¢d2232222222
222
2280020230202
R222RRRRRRRD

TEST

14 - DMR-11

;* IN THIS TEST - SEE IF WE HAVE MEMORY_MANAGEMENT, IF SO SEE IF WE
;* HAVE THE MEMORY TO CHECK BITS 16 & 17 IN SEL6.
THIS WILL ALLGW

:* US TO TRANSFER DATA USING THOSE EXTENDED ADDRESSING BITS. AS IN
;*

Tgég 13 THE

TEST

IS NON-INTERRUPT AND

INTERNAL

(TTL)

LOOPBACK

234222202228 ARRRSRRRRARRRRRRRRRARRRtARSREaRRtaRtlttRlsRtst
Rttt

CZDMIDO DMR-"1 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P1

29-JuL-81

11:32

29-JUL-81

PROGRAM DOCUMENT

12:42

PAGE 24

105
105(3,

RN AR AR RN AR R AR R AR R R AN R R RN R R AN R R AR R R AN R AR AR RN R RN NS

1056

;* DMC MODE

1055

TEST 15 - DMR-11

}82;

;* IN THIS TEST THE DMR WILL TRANSMIT AND RECEIVE 7 BUFFERS.

1059
1060
}82;

.
J*
..

1063
1064

A
M

1068

. %

1065
1066
1067

1069
1070
1071
}8;%

1074

SEQ 0023

ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST
THE RECEIVE/TRANSMIT TABLE.

o
o*
i*
o
M
o
M
. %

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE $BUFFS.
THIS
SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF

SEVEN RECEIVE AND SEVEN TRANSMIT BUFFERS.
THE ROUTINE WILL
ATTEMPT TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING
HIERARCHY:

B.
C.

IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32K.

IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER
THAN 2K BYTES, USE THAT MEMORY
IF NEITHER OF THc PRECEEDING TWO ARE POSSIBLE, USE
THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

AP AR R AR AR AR AR R RN R IR RRAERA AN R RN R AN RRAERRARE RN RN R RE AR

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)

CZOMID.P1

1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087

29-JuL-81

11:32

4383223822223 22230382222
*

;*
;*
| 4
]
»*
L.¢

x
x

x
*
*
*x

*
«

|4
x

*
*
®
bR1
i
.

. N

L[4

* W

[

b
=
e
i
b
i
o
il e

2 BA/CC

HALT
1 BA/CC
HALT

2 BA/CC

HALT

2 BA/CC
HALT

2 BA/CC

HALT
1 BA/CC
HALT

SEQ 0024

28220022322

2Rt

RiRRRaRRddRRRald

= DMR-11
MODE
WILL TRANSMIT AND RECEIVE 7 BUFFERS. DURING THE
HALTED AND RESTARTED BY A BASE-IN RESUME IN THE

BASE IN
CONTROL IN
HALT
MASTER CLEAR
2 BA/CC IN RECE]VE
HALT
MASTER CLEAR
2 BA/C( IN RECEIVE
HALT

2
PAGE 25

MASTER CLEAR

IN RECEIVE
MASTER CLEAR
IN RECEIVE
MASTER CLEAR
IN TRANSMIT
MASTER CLEAR
IN TRANSMIT
MASTER CLEAR
IN TRANSMIT
MASTER CLEAR
IN TRANSM]T
MASTER CLEAR

BASE

IN RESUME

BASE

[N RESUME

BASE

IN RESUME

8ASE

IN RESUME

BASE

IN RESUME

BASE

IN RESUME

BASE

IN RESUME

BASE

IN RESUME

BASE

IN RESUME

ALL BA/(CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST
THE RECEIVE/TRANSMIT

TABLE.

- w

FOLLOWING MANNER:

SoBIFAr
v =0 3B IRIRIC2

-a—hd-d-a_a—hd-a-a_A_ha.aE;_us-da;E;S 8

b
D e
e
e
D b
e
e
il
D e
e
cad i e
D o

TEST 16
IN - DMR
IN THIS TEST THE DMR
TEST THE DMR WILL BE

;* RESUME BASE

1093
1094
1095
1096
1097
1098
1099

12:42

PROGRAM DOCUMENT

1088
1089
1090
10N
1092

)

29-JUL-81

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE $BUFFS.
THIS
SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF
SEVEN RECEIVE AND SEVEN TRANSMIT BUFFERS.
THE ROUTINE WILL

ATTEMPT TO USE
HIERARCHY:

A.
B.

]

)

* %

- X

AS LARGE BUFFERS AS POSSIBLE

IN THE

FOLLOWING

IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32K.
IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER
THAN 2K BYTES, USE THAT MEMORY
IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE
THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

THIS

TEST RUNS

INTERNAL

TTL

ONLY

L4 IS0

2223228232402

RRRRaRRRRRRRRRRRRRRRRRRRRSA

12:42

PAGE 26

SEQ 0025

.'t"ttti"tlttt'fittttfii't'ttitt*'ttfitli!ttttttfittt'ttttttttt*ttttttttt

TEST 17 = DMR=11
v
‘= INTERRUPT DRIVEN EXERCISE
i* IN THIS TEST 64 BUFFERS WILL BE TRANSMITTED AND RECEIVED
. W

‘x ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND
“»
“«

THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE
THE RECEIVE/TRANSMIT TABLE.

CHECKED AGAINST

* %

)

%
*
UK TR YR

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE S$BUFFS.
THIS
SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF

64 RECEIVE AND 64 TRANSMIT BUFFERS.

o
*
*
*
*

IR TR

HY:

A.
B.

THE ROUTINE WILL

A}gggzg ;0 USE AS LARGE BUFFERS AS POSSIBLE

IN THE FOLLOWING

w L2222
RRRR R
a2 2200200 Rt ARtRRRRRRRRRRddd ]

PR Y

RN RN RN RN N AR AR AR A R AR NI AR AR A AR AR AN AR AN

A RN R R R A RN AR RN

RN AR RNNR AR

18 - DMR-11

S
TEST
;* LARGE MESSAGE

LIPS

;* IN THIS MODE

TRANSMIT AND RECEIVE

LARGE BUFFER

. x

;*
;*
;*

I FETR

WA
= O 000NN SN

0&0
o Lo e QLI IV LIV IV IV IV IV P o Y o ol T kol 2l N Y. W
~ m%ugaoomVQMbuw*oomw0mbw-oogw&

- D el e e wnd wd =D e D e e =D e
i D e el cd o D el d D o
D o D sd nd i i D D d ad D d D b ) b D
—d D e el e i i D d e d cd D d d el D i o
) D ) o D il wd e e
o o e d e =D d d d D D d d oy =D =D

CZDOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
PROGRAM DOCUMENT
CZOMID.P11
29-JuUL-81 11:32

THE BA/CC QUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST
THE RECEIVE/TRANSMIT TABLE.

| 4

w
*

*
*

;*
*
*

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE $BUFFS.
THIS
SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF

ONE RECEIVE AND ONE TRANSMIT BUFFER.

ATTEMPT TO USE
HIERARCHY:

A.
8.

THE ROUTINE WILL

AS LARGE BUFFERS AS POSSIBLE

IN THE

FOLLOWING

IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVI 32Kx.
IF THERE IS FREE MEMORY ABOVE THE SUPERV]SOR GREATER
THAN 2K BYTES, USE THAT MEMORY
IF NEITHER OF THE PRECEEDING TWwO ARE POSSIBLE
USE
THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNO,TIC.

2N2222
)]
4 LA S22 SRR dR2RARRRARRARR2RR2RARRR2RR2R2RRRRRR2ARZRRRR

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
R I

PAGE 27

s %

SELIRJREN2EBETR

b o b o

D e ed o

b —d o

d = e e

b e

:» THE BA/CC OUT RECEIVE ANC TRANSMIT WILL BE ACCOUNTED FOR AND
s« THE CHARACTER COUNTS AND 'IFFER ADDRESSES WILL BE CHECKED AGAINST
;*

TR
TR R
Y

d =D

D e

b o oh b ok =D D d b

d D e

TEST 19 - DMR-11
*
;* MAINTENANCE MODE OPERATION

b e cad ed =
—rh b e
nNony AIN) b wd cd b oo
olele)
WA =

SEQ 0026

2
2Rttt
232
2222 2220
222
223222220
2 222322

b o

29-JuL-81 11:32

PROGRAM DOCUMENT

o3
oo
NN NNNNNJ oo
O 0o
SRER2BISIAARANIS

d d D d D ) B—_

CZOMID.P11

12:42

29-JUL-81

THE RECEIVE/TRANSMIT TABLEt.

THICS
THE BUFFERS ARE DETERMINED IN THE SUBROUTINE SBUFFS.
OF
COUNT
CHARACTER
SUBROUTINE WILL DETcRMINE THE ADDRESS AND
WILL
THE ROUTINE
ONE RECEIVE AND ONE TRANSMIT BUFFER.
SIEERQEHI° USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING

* %
b

{

. %

. %
.

THAN 2K BYTES, USE THAT MEMORY

. %

C. IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE
THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

* %
R
.

" IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32K.

B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER

222332222 2222223 3222223233223

2233 3823222222222 20020 8RR ddt Rl

9.0 ERROR INFORMATION

ERROR REPORTING

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

THE FOLLOWING EXAMPLE PROVIDES A TYPICAL ERROR REPORT, WHICH
DESCRIBES AN °''IRDY NOT SET'' ERROR, AND PROVIDES THE PC OF
THE ERROR CALL AND THE PC OF
THE CALL
TO THE SUBROUTINE
?55?2;{?6 IT, THE FAILING REGISTER NAME, AND DEVICE REGISTER

NN WA=
WP,
— OOV

nIrRON N~ —d b bk —d b = 2

ok —h =D

f-\‘)-‘-‘
1S 1N 1N 1S 1aN 1,V 1,0 )
non INSLASLaS

?%gg108¥C FTL ERR 00002 ON UNIT 00 TST 006 SuB 000 PC:

016210

ERROR IN SUBROUTINE CALLED AT PC: 036174

BUFFER STATUS
# OF BUFFERS: 7

BUFFER SIZE: 2048

IN - RCV ASSIGNED:
OUT - RCV RETURNED:

7
0

XMIT ASSIGNED:
XMIT RETURNED:

DMR RUN ACKNOWLEDGE NOT RCVD
(CHECK INTERFACE, BAUD AND TURNAROUND)

7
O

ALL THE MESSAGES IN THE DIAGNOSTIC USE BASIC MESSAGE CALLS.
THEREFORE THE INHIBIT EXTENDED ERROR FLAG WILL HAVE NO
THE INHIBIT BASIC MESSAGES WILL
EFFECT ON THE MESSAGE OUTPUT.
éNHIBIT

THE ERROR MESSAGES.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
PROGRAM DOCUMENT
CZDMID.P11
29-JuL-81 11:32

;

—

LIST

SLSTIN=
$LSTTAG=
SVCINS=
SVCTST
Sv(SuB=
SVCGBL
SVCTAG=

d
)
d ed
D nd
d

)

Ao
W
O

SEQ 0027

INITIALIZE SUPERVISOR MACROS

BGNMOD

000001
000001
000001
000001
000001
000001
000001

—

PAGE 28

SVC

002000

.MCALL

Sv(

—

epetatd

NDALNO N
M

b wd

228

002000

.=2000

00200C

1224
1225
1226
1227

12:42

[

LIST
LIST
LIST
LIST
LIST

INSTRUCTIONS
INSTRUCTIONS,

TEST

TAGS,

SHIFTED RIGHT

SUBTEST TAGS, SHIFTED RIGHT
GLOBAL TAGS, SHIFTED RIGHT
OTHER TAGS, SHIFTED RIGHT

CHANGE THE VALUES OF

THE Sv(C...

SYMBOLS TO BE ZERO IF

YOU WISH

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

CHANGE

002000

THE SYMBOLS AT ANY POINT IN YOUR PROGRAM.

POINTER BGNSW,BGNDU,BGNSFT

C2DMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A{1052)
29-JuL-81
PROGRAM HEADER
CZDMID. P11
29-JuL-81 11:32
.SBTTL

12:42

3
PAGE 29

SEQ 0028

PROGRAM HEADER

s 44

:
:

;
:

THE PROGRAM HEADER MACRO CHARACTERIJIZES THIS DIAGNOSTIC. THE
HEADER MACRO'S ARGUMENTS ARE FILE NAME, RELEALL LEVEL, PAT(CH
DISPOSITION OF THE MOST RECENT PA:CH, MAXIMUM TEST TIME IN SEC.,
AND THE TYPE OF DIAGNOSTIC (O-SEQUENTIAL, 1-EXERCISER).
THESE
ARGUMENTS ARE IN RESPECTIVE ORDER.

HEADER (ZDMI,D,0,600..,0

002000
103
132
104
115

::
LONAME

138

000
000
000
104

060

000000

001130

036744
037700
002174
002224

040100
000000
006000
000000

000000
002124

000000
000000

000000
003

LEREV::

:
L$DEPO:
LSUNIT::
LE$TIML::

LSHPCP::
:
L$SPCP:

:
LSHPTP:
LSSPTP::

LSLADP::

L$STA::

L$CO::

LEDTYP::
:
L$APT:
LSDTP::
L$PRIO::

LSENV]::
LSEXPT::

LOSMREV::

LASCI1
LASCII
JASCII
LASCII
LASCII
.BYTE
.BYTE
.BYTE

/C/
7/
/D/
/M/
/1/

0
0
0

JASCI!

/D/

.ASCI1I

/0/

.WORD

600.

.WORD

L$HARD

.WORD

L$SOFY

.WORD

LSHW

.WORD

L$SW

.WORD

LSLAST

.WORD

L$DISPATCH

.WORD

. WORD

.BYTE

CSREVISION

—

WWW&WWWWWWNNNNNNN
VB NN

DADNAAARRRRERRRRR gwwwWWWwwwwwwwwwww

b
D
D
b
b
D
D
G
S QU QU QU QU ST W QU S
U QY Gy b

—

D ed

)

D e

AN N
N NN NN N NN W W
PORIA)
— = b b b b 2 2 NN — o
=O VNN
W= OVONOIOWNSBWN—=OVONONESW N =2 O D00 NN

(ZOMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P1T
29-JuL-81 11:32
002051
002052
002052
002054

30A(1052)

PROGRAM HEADER

002

12:42

SEQ 0029

PAGE 30

LSEF::

000000
000000

L$SPC::

000000

L$DEVP::

010240

LSREPP::

000000

LSEXP4::

000000

LSEXPS::

000000

:
LSAUT:

000000
002072
002074
02074
002076
002076
002100
002100
002102
002102
002104
002104
002106
002106
002110
002110
002112
002112
002114
002114
002116
002116
002120
002120

29-JuL-81

L$DUT::

023640

LSLUN::

000000

:
L3DESP:

010246

:
LSLOAD:

104035

LSETP::

000000

L$ICP::

020452

LS$CCP::

022046

LSACP::

021756

LSPRT::

020444

LSTEST::

000000

LEDLY::

000000

::
LSHIME

000000

.EVEN

.BYTE

CSEDIT

.WORD
.WORD

0
0

.WORD

LSDVTYP

-WORD

.WORD

-WORD

L$DU

-WORD

L$DESC

EMT

ESLOAD

.WORD

LSINIT

.WORD

LSCLEAN

.WORD

L$SAUTO

.WORD

L$PROT

.WORD

| CZOMIDO DMR-11
CZDMID.P11Y

1362
1363
1364
1265
1366
1367
1368
1369
1370
137
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384

1385
1386
1387
1388
1389
1390
1391

1392
1393

1394
1395
1396

FUNCTIONAL TESTS MACYN
29-JuL-81 11:32

30A(1052)

29-JuL-81

.SBTTL

DISPAT(CH TABLE

DISPAT(H TABLE

12:42

3
PAGE 31

SEQ 0030

/111 /100/07777777077777777777777777777777777777/7/7/77/777//777//7/7/77/7/77777777
s/ THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST.

:/ 1T IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST.

I1II1IIII717777777777777777777700707000770777777777777777777777777777777777777

002122
002122
002124
002124
002126
002130
002132
002134
002136
002140
002142
002144
002146
002150
002152
002154
002156
002160
002162
002164
002166
002170

000023

023720
024230
025544
025676
026724
030136
030716
031340
032042
032554
033000
033160
034064

034614
036360
036462
036550
036620
036670

DISPATCH 19

.WORD

L$DISPAT(CH::

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

19
T

T2
T3
T4
15

16
17

78
19

T10
T11

T12
113
T14
T15

T16
117
718
119

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.PI1
29-JuL-81 11:32

12:42
DEFAULT HARDWARE P-TABLE

30A(1052)

29-JUL-81

SEQ 0031

PAGE 32

1397

.SBTTL

1400

L7777
7770777707707 77/7777/77777777777777/77/77777777/777/77/77777
;/ THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF
s/ THE TEST-DEVICE PARAMETERS.
**NOTE - MANY OF THE P-TABLE VALUES LISTED

1398
1399

1601
1602

1403
1404
1405

DEFAULT HARDWARE P-TABLE

;/ BELOW ARE NOT USED IN THIS DIAGNOSTIC BUT ARE INCLUDED TO AGREE WITH

:/ M8207 & MB203 DIAGNOSTIC P-TABLES.
LI

002172
002172
002174
002174
002174
002176
002200
002202
002204
002206
002210
002212
002214
002216
002220
002222
002222

000013

I7777 7777777777077 70777777777777777777/777777777777777777/7/7777/77777

BGNHW

DFPTBL

:
LSHW:

L 10000-1 $HW/2

.WORD

DFPTBL::

000000
160170

000300
000000
000000
000000
000000
000000
000005
000000
000000

;*«NOT USED - MICROPROCESSOR TYPE
;DMR11 CSR UNIBUS ADDRESS DEFAULT

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.""RD

. **NOT
. **NOT
s **NOT
s ==*NOT

.WORD
.WORD
. WORD

; CABLE TURNAROUND (DEFAULT =
s **NOT USED - BAUD RATE
s *«NOT USED = RUN SWITCH

.WURD

ENDHW

;DMR11

INTERRUPT VECTOR DEFAULT
USED - PRIORITY LEVEL
USED = LINE UNIT
USED - SWITCH PACK #1 (REG 11

USED = SWITCH PACK #2 (REG 15
(REG 16

s axNOT USED - SWITCH PAZK #3

CABLE (5

L10000:

)

CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P11

29-JuL-81

11:32

29-JUL-81

12:42

DEFAULT SOF TWARE P-TABLE

PAGE 33

SEQ 0032

}2%}

LSBTTL

1433
1434

/L1117
7701700177777 7777777777777777077/7777777777077777777/7/7777777
;/ THE SOFTWARE P-TABLE CONTAINS THE VALUE OF THE PROGRAM

}4%9

/1111117771777 7778777777777777777777777777777277777777777777770777777777¢77777

1435

:/ PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR.

16438

1439
1440
}22;

164643
1444
1445
1466

1447
1448
1449
1450
1451

DEFAULT SOFTWARE P-~TABLE

002222

002222
002224
002224

00000

002224

000005

002226
002226

BGNSW

SFPTRL

LESW::
SFPIBL::
SPEED:
ENDSW

.WORD

;PROCESSOR SPEED VARIABLE USED
;TO ALTER THE WAIT VARIABLES.
£L10001:

.WORD

L 10001-L8SW/?2

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.PI
29-JuUL-81 11:32

30A(1052)

29-JUL-81

12:42

GLOBAL EQUATES SECTION

.SBTTL

PAGE 34

SEQ 0033

GLOBAL EQUATES SECTION

IIIIILLIIIPLI 777117777777 77777777777777777777777777777/777/7777/77777

THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT
,/
4
ARE USED IN MORE THAN ONE TEST.
JI11IIIIII117 7777777777777 777777777777777777777077077707770777077777777077727777

002226

DIFINITIONS

100000
40000
20000
10000
4000

Wt
nu
Huuwnnnnnn

100000

—~

i 8

VO—=2NWHN

EQUALS

040000
020000
010000
004000
002000
00:000
000400
000200
000100
000040
000020
000010
000004
000002
000001

1000
400

200
100

2
;

001000

BITO9

000400

BITO

nmnnnunnun

0y
et bmng B

BIT
BIT

= NIOWEHNON

BITO8

oo dvefoelve)

000200
000100
000040
000020
000010
000004
000002
000001

2000

BITO7
BIT06
BITOS
BIT04
BITO3
BITOZ
BITO1
BITOO

* EVENT FLAG DEFINITIONS
*
000040
000037
000036
000035
000034

EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION

EF .START==

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

32.
31.
30.
29.

28.

* PRIORITY LEVEL DEFINITIONS
000340
000300
000240
000200
000140

PRIO7== 340
PRI06== 300

PR105== 240

PRI04== 200
PR103‘— 140

; START COMMAND WAS [SSUED
; RESTART COMMAND WAS [SSUED
. CONTINUE COMMAND WAS ]SSUED
: A NEW PASS HAS BEEN STARTED

;

A POWER-FAIL/POWER~UP OCCURRED

—

)

—‘—j—h—fi_‘—l—dc—l—d—I—l—.l—l—l-l—l—‘-—b-—l—l—l—‘—l—l—.l_j—l_A_‘—Jd—l-l—l—l—l—l—l—)—l_‘_l—l-—.—l—d—l—fl—._l

NANALYA
LA LY, IV, IV, 1)) VIV VTN
TN (VIO N IV RV TV VL IV, RV TV TV TV, SV, R, LV, Y0, [V SV U, JU RV (U RV W, VL LV, LV TN TV AV, IV ]
= = 2 2D I
ISNS S WWWWWWWWINWAINNNINIAINIMNOMNIN)
w (% W (1%, NN
W= OV
o N 3 WM — OV NN
NAVNEWN SOV NN
AN =OVO NN WN—-O

CZDMID.P1Y

29-JuL-81
00010C
000040
000000

29-JuL-81

12:42
GLOBAL EQUATES SECTION

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
11:32

SEQ 0034

PAGE 35

PRIO2== 100
PRIO1== 40
PRI00== 0

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

EvL==

10
20
40
100
200
400

LOT==
ADR==
IDU==
ISR==
UAM==
BOE==
PNT==

1000

PR]I==

2000

IXE==
IBE==
IER==
LOE==

4000
10000
20000
40000

HOE==
RN

100000
RN AN N AR AR N

R A RN A RN R

AR AR AR A AR RN R A AR AR

AN AN R AN

AN RN R A AN

N AR

A AR AR TR A AR A AR AN AR RN AR

R RAN

ANRN R

AN RN N

T AN R R A AR

:SWITCH REGISTER OPTIONS

100000

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

SW15=
SWi4=
Swi3=
Swi2=

100000
40000
20000
10000

SwWw09=
Sw08=
SwQ7=
Swo6=
SW05=
SW04=
Swo3=
Swo2=
swol=
Swoo=

1000
400
200
100
40
20
10
4
2
1

SWi1l=
Swi10=

4000
2000

R R

AR R

A AN R R

R R

R AR A AR R R AR

AR AR AN R R AN R

NN RN AR

AR RN R

:CSR _AND STAUS WORD DEF INITIONS

:SELO (CSR) - BSELO/BSEL1

100000

RUN=
MCLR=
MDIAG=
STLU=
LPLU=
ROMO=
ROMI=
STuP=

BIT15
BIT14
BIT13
BIT12
BITI
BIT10
BIT9
BITS8

000200
000100

RDI-

BIT7

040000
020000
010000
004000
002000
001000
000400

IESET=

BIT6

;SET IF RUNNING
JMASTER CLEAR OF PROCESSOR AND LINE UNIT
;CSR MAINTENANCE - ENABLE MICRODIAGNOSTICS
;CSR MAINTENANCE = STEP LINE UNIT
;CSR MAINTENANCE - LINE UNIT LOOP
: CSR MAINTENANCE
s CSR MAINTENANCE
s CSR MAINTENANCE - USED WITH LOOP LU
JWHEN ASSERTED, XMITTER SHIFTS; CLEAR, REC.
;CSR - DMR11 READY RESPONSE

;CSR = INTERRUPT ENABLE

INPUT =~ DMR11

SHIFTS

INTERRUPTS

CZDOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11
1564

1565
1566

29-JuL~81

11:32

29-JuUL-81

12:42

GLOBAL EQUATES SECTION

PAGE 36

SEQ 0035

JCPU WHEN RDI

SET

IN RESPONSE

;CPU WHEN RDI

CLEARS

TO RQI BEING SET.

000040
000020

RQI=
IECLR=

BITS
BIT4

}ggg

000004

RCvV=

BIT?2

1571
1572

000200

;sSEL2 - BSELZ2/BSEL3
RDO=
BIT7

020000

;sSEL6 - BSEL6/BSEL7
BASEUP= BIT13

010000

RES=

BIT12

;SEL6 - CONTROL OUT - RESPONSE TO DMR MODE BASE
;
TABLE UPDATE (OMMAND.
;SEL6 - BASE IN -- WHEN SET CAUSES

010000

004000

CT1S=

SECN=

BIT1?2

;SEL6 = CONTROL OUT = (TS FAILED

002000
002000
001000
000400
000522

HDX=
(D=
HALTC=
MAINT=
DMR=

BIT10
BIT10
BIT9
BIT8
BIT8.122

000400
000200
000100

000020
000010
000010
000004
000004
000002
000001

1567

1568

}ggz

1575
1576
1577
1578
1579

1580

1581
1582
1583
1584

1585
1586
1587
1588
1589
1590
1591
1592

1593
1594

1595
1596
1597
1598
1599
1600
}28}

000100

000100
000040

1603

IEO=

;CSR ~ REQUEST IN
:CSR - INTERRUPT ENABLE INPUT - DMR11
; (DMR RUN MODE ONLY)

JCSR =

BIT6

BIT11

RESUMPTION OF

OPERATION

NXM=
BITS
STREC=
BIT7
DISCON= BIT6

JSELG6
JSEL6
;SEL6
:
M
JSEL6
;SEL6
;SELG6

- EXTENDED CONTROL OUT - HALT COMPLETED
- DDCMP MAINTENANCE DURING CONTROL IN
- BASE IN -- SET FOR DMR11 MODE
122 IS THE DMR PASSWORD FOR BSEL6 AND
BIT8 SETS THE DMR MODE BIT IN BSEL7Z
= CONTROL OUT = NON EXISTENT MEMORY
- CONTROL OUT = START RECEIVED
- CONTROL OUT = DISCONNECT

TOLOUNG=
MAINT1=
MNTREC=
NOBFR=
MAINTZ2=
TouT=
NAKS=

JSEL6
;SEL6
;SEL6
;SEL6
;SEL6
;SEL6
;SEL6

DTR=
BIT6
DMRRUN= BITS5

BIT4
BIT3
BIT3
BIT?
BITZ2
BIT1
BITO

AR R

AR RN

;SEL6 - MODEM WRITE - DATA TERMINAL READY
;SEL6 - CONTROL OUT - DMR RUN MODE

;:DDCMP COMMANDS - BITS O & 1

000013

IF 1, RECEIVE

;SEL6 - CONTROL IN == START TIME (3 SEC IF SET
;
1 SEC IF CLEAR)
;SEL6 - HALF-DUPLEX
&
CLEAR FOR FULL-DUPLEX
;SEL6 - CONTROL OUT = CD GLITCHED

4282

1619

SETS TO INDICATE DATA READY FOR OUTPUT
;SELZ = SET TO ENABLE DMR11 TO INTERRUPT WHEN RDO

000000
000001
000002
000003
000004
000005
000006
000007
000010
000011
000012

IF 0, TRANSMIT

[NTERRUPTS

TO RQI BEING CLEAR.

;SELZ2 - DMR11

1604

1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618

IN RESPONSE

s INPUT (SELO)
BACCT=
0
CNTRL=
1
HLT=
2
BASEI=
3
BACCR=
4
WMODEM= 5
EXERR=
6
DXERR=
7
DDM(=
10
UPDATE= 11
TIMER=
12

THRESH= 13

CONTROL OUT
MODEM WRITE
CONTROL OUT
CONTROL OUT
MODEM WRITE
CONTROL OUT
CONTROL QUT

=
=
=

MESSAGE TOO LONG
LOCAL MODEM LOOPBA(CK
MAINTENANCE MSG. RECEIVED
NO BUFFER
REMOTE MODEM LOOPBACK
TIME OUT
NAKS THRESHOLD EXCEcDED

AR AR A AR AR AR AR A AR AN A RN AN IR AR AN R RN RN

AN RN RRA A RN NN RS

IN SELO AND SEL2

;BUF ADDRESS AND CHARACTER COUNT TRANSMIT
;CONTROL COMMAND (IN OR 0OUT)
JHALT COMMAND
;BASE IN COMMAND
;BUF ADDRESS AND CHARACTER COUNT RECEIVE
;WRITE MODEM STATUS REGISTER
;ENABLE EXTENDED ERROR NOTIFICATION
;DISABLE EXTENDED ERROR NOTIFICATION
JDESELECT DMC LINE MODE
JREQUEST BASE TABLE UPDATE
JSET REP/SELECT TIMER VALUE

JSET THE FOLLOWING THRESHOLDS:

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P11
29-JuL-81 11:32

30A(1052)

29-JUL-81

12:42

GLOBAL EQUATES SECTION

3
PAGE 37

SEQ 0036

sNAKS RECVD

000014
000015
000017
000007

RRAM=

INTER=

sNAKS SENT
sREP/SEL
sNO BUFFER

;READ M8207 RAM (0-377)

;WRITE INTERFACE IN AX3-15

RMODEM= 17

;OUTPUT (SELZ)
CMD=
14
R

AR AR A

AR KRR

;READ MODEM STATUS

(=NOP)

NOTE: CNTRL IS USED FOR SELZ
; ** MASK USED TO CLEAR COMMAND BITS 0=2 ==
AR

..BASE TABLE OFFSETS

A RN

JNOTE:

ANRR R AR

ANRARRRA

RAXA RN

THE OFFSETS FOR BASE+3.-BASE+10 WERE

s INTENTIONALLY NOT LABELLED, BECAUSE THOSE LOCATIONS
;MUST NOT BE CHANGED IN ORDER TO BE DM( COMPATIBLE.
;THE LABELS BELOW CORRESPOND WITH THOSE USED IN THE

000042
000043
000044
000045
000046
000055
000060
000062
000064
000066
000072
000076

R-

;DMR MICROCODE.
;#R - MESSAGE RECEIVED

A=
T=
X=

44
45
46

J#A - MESSAGE ACKNOWLEDGED
;#T = NEXT MESSAGE TO BE TRANSMITTED
s#X = LAST COMPLETED TRANSMISSION

PRETIM=
THIL=
TH2L=
TH3L=
TH4L=

ISP7=

ISP13=

55
60
62

;#N = MESSAGE TRANSMITTED

€5

;PROGRAMMABLE REP/SEL TIMER VALUE.
s THRESHOLD LEVEL = NAKS RECEIVED .
s THRESHOLD LEVEL = NAKS SENT.
s THRESHOLD LEVEL = REP SENT.
s THRESHOLD LEVEL =~ NO BUFFER AVAILABLE.

s IMAGE OF SCRATCH PAD 13

s IMAGE OF SCRATCH PAD 7

RSS2SRttt
d AR
2R
RRS000 R RdRRR20RR2R R0
R R

: INSTRUCTION DEF INITIONS
000207

RETURN-207
M

1658
1659

1665

;RETURN FROM SUB.

AR SSRRRtRsRRRRdRtdtds
iRt
R
2228022t RR22ER 2221

; MISC. EQUATES
000006
000007
000015
000012

JSR PC]

LLOOP=

;LOCAL MODEM LOOPBACK

(R=
LF=

15
12

sASCII CARRIAGE RETURN
JASCII LINE FEED

RLOOP=

sREMOTE MODEM LOOPBA(K.

CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11

29-JuL-81

11:32

29-JUL-81

GLOBAL DATA SECTION

12:42

PAGE 38

SEQ 0037

}ggg

.SBTTL

1668

1111171770777 7777077777077707777777/777777777777//7/77/77///7777/7777/77//77777

16;}

SIIIIIIITIIITIIIIITI 11701777 17771777077717777770770777107707771777177777777777

1669
1670

;7
./

1673
1674

THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED
IN MORE THAN ONE TEST.

1675

}2;9

:DMR11

1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
}23%

002226
002230
002232
002234
002236
002240
002242

002244
002246

002250

000000
000000
000000
000000
000000
000000
002232
002232
000000
002234
000000
002236
00000C
002240
000000

GLOBAL DATA SECTION

232322332322 233223232220 2280222222322 2220022222

DMRVEC:
DMTVEC:
CSR:
SELZ:
SEL4:
SEL6:
SELO=
BSELO=
BSEL1:
BSELZ2=
BSEL3:
BSEL4=
BSELS:
BSEL6=
BSEL7:

222

2RR0distidda

)]

VECTOR AND REGISTER INDIRECT POINTERS
.WORD
.WORD
WORD
.WORD
WORD
.WORD
CSR
(SR
.WORD
SELZ2
.WORD
SEL4
.WORD
SEL6
.WORD

0
0
O
O
0
O

:DMR11 RECEIVER INTERRUPT VECTOR
:DMR11 TRANSMITTER INT. VECTOR
;POINTER TO DMR11 CONTROL STATUS REGISTER
sPOINTER TO DMR11 CONTROL OUT REGISTER (SEL 2)
JPOINTER TO DMR11 PORT REGISTER (SEL 4)
JPOINTER TO DMR11 PORT REGISTER (SEL 6)
;CSR IS SELO
;LOW BYTE OF CSR
JPOINTER TO DMR11 (SR HIGH BYTE
;LOW BYTE OF SEL?Z
;POINTER TO SEL2 HIGH BYTE
;LOW BYTE OF SEL4
JPOINTER TO SEL4 HIGH BYTE
;LOW BYTE OF SEL6
;POINTER TO SEL6 HIGH BYTE

O
O

1694

""'tttttttttttt‘tttiti’tt't'QRtitfii"ttfiii*t*titttt‘t*'tttttitittt"i'tt

}ggg

; ;OTHER HARDWARE PARAMETERS

1697
1698
}ggg

002252
002254
002256

000000
000000
000000

WTYPE:
DMTURN:
MICRO:

_WORD
.WORD
.WORD

0
0
O

1701

};8%

:PROGRAM CONTROL PARAME TERS

1705

1706
1707
1708
1709
1710
1711
1712

};}Z

1715
1716
1717
1718
1719

1720
1721

S 2224022000220

sMICROPROCESSOR TYPE
s TURN AROUND TYPE (0=7)
JMICRODIAGNOSTICS (IF 1(YES)
0220220000

d2R2020 80282300008 R00R0

- ENABLED)
802002022

002260

000000

DMRFLG:

.WORD

002262

000000

INFACE:

.WORD

002264
002266

000000
000000

FRSTIM:
FRSPAS:

.WORD
.WORD

O
0

;FLAG SET WHEN DMR MODE IS REQUESTED IN
;THE BASE IN COMMAND.
USED TO FLAG THAT
;A DMR MODE ACKNOWLEDGE IS EXPECTED.
JFLAG TO ALLOW_CHANGE OF INTERFACE TYPE
;BY WRITING AX3-15.
FLAG SET/CLEARED IN INIT.
;FLAG=0 IF PROGRAM JUST LOADED
JFLAG=0 IF FIRST PASS AFTER LOAD

0
0
0

;FOLLOWING PARAMETERS ARE USED IN THE
JINTERRUPT TESTS (TESTS 15-19):
JFLAG SET WHEN A CONTROL IN HAS BEEN ISSUED.
;FLAG SET WHEN A BASE IN WITH RESUME DESIRED.
JFLAG SET WHEN A BASE IN WITH DMC MODE DESIRED

002270

002272
002274
002276

002300
002302

000000

000000
000000
000000

000000
000000

STARES:

START:
RESUME:
DMCMDE:

MNTMDE:
MMANAG:

.WORD

.WORD
.WORD
.WORD

.WORD
.WORD

O
O

;FLAG=0 IF

1ST TIME THRU AFTER STA OR RES

JFLAG SET WHEN MAINTENANCE MODE IS DESIRED.
;sFLAG RETURNED IN THE SUBROUTINE $BUFFS

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)

CZDMID.PN
1722
1723
1724

1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735

1736
1737

29-JuL-81

11:32

29-JUL-81

GLOBAL DATA SECTION

12:42

002304

000000

AX3:

.WORD

000000

WMAINT:

.WORD

002310

000000

:
MANUF

.WORD

;BITQ =
;BIT3 :BIT4 =
;BIT6 =
:BIT7 =

TEST BIT (MUST BE SET TO ALLOW SELECT)
INTEGRAL MODEM
v,35
EIA
RS422

JFLAG SET WHEN IT IS NECESSARY TO WRITE

;MODEM MAINTENANCE BITS (MAINTENANCE 1 & 2)
JTHIS FLAG IS SET OR CLEARED IN THE INIT CODE.
sexxwnxnsx MANUFACTURING USE ONLY wxxtnxx
;THIS WORD MAY BE PATCHED TO A NON ZERO WHEN
JMANUFACTURING SPECIAL TEST CONNECTORS ARE

:?8536 Sg?IS WILL ALLOW MAINTENANCE BITS

°;lt*ttttttt*ttttt*tttttttt'tttfit'tttfifi.tfiittt.ttttfi*ittttttttttitiit**

000000

WAITY:

-WORD

002314

000000

WAITZ:

.WORD

002316
002320
002322
002324

000000
000000
000020
000000

WAIT3:
WAITS:

BUFSIZ:
BUFNUM:

.WORD
.WORD
.WORD
.WORD

OO0OO0OC

002326
002330

000000
000000
000000
000000

INRCV:
INXMIT:
QUTRCV:
:
OUTXMT

.WORD
-WORD
-WORD
.WORD

002332
002334

1766

1767

2382283288202

;COUNTER
;COUNTER
;sCOUNTER
;COUNTER
8222000202323

*% MISCELLANEOUS STORAGE

:
TEMP1

SFLAG:
SKIP:

-WORD
.WORD
-WORD
-WORD
.WORD
.WORD

TEMP:

SAVE:

002352

000000

NXMFLG:

.WORD

FLAG:

002354

000000

INFLAG:

- WORD

1768

000000
000000
000000
000000
000000
000000

;VARJABLE IS USED IN THE SUBROUTINE $BUFFS

OO0O0O0O0O0

002336

;WORD1-WORD3 VALUES DETERMINED IN INIT
;CODE DEPENDING ON THE BAUD RATE.
;VALUE FOR TIMEOUT COUNTER
JUSED IN SWAIT SUBROUTINE
¢VALUE FOR TIMEOUT COUNTER USED IN SMSCLR
;AND $CLRQI SUBROUTINES.
JVALUE FOR TIMEOUT COUNTER USED IN $INOUT.
JWORD USED AS OUTER LOOP COUNTER IN $INOUT.
;CALCULATED BUFFER SIZE IN BYTES.
THIS
;# OF RECEIVE & TRANSMIT BUFFERS.

002312

OOOCO

*PROGRAM VARIABLES

1765

1769
1770
1771
1772
1773
1774
1775
1776
1777

SEQ 0038

PAGE 39

;BIT PATTERN TO WRITE INTO AX3-15, WHEN
21T 1S REQUESTED TO ALLOW INTERFACE
;SELECTION. (TEST CONFIGURATION 1-4)

002306

1740
1741
1742

1764

;MMANAG=1, MEMORY MANAGED BUFFERS USED

1738
1739

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

002356

000000

QUTFLG:

.WORD

002360

000000

RESFLG:

.WORD

FOR
FOR
FOR
FOR

# OF
# OF
# OF
# OF

BA/CC
BA/CC
BA/CC
BA/CC

IN RECEIVES.
IN TRANSMITS.
OQUT RECEIVES.
OUT TRANSMITS.

32022220283 22323223283232230¢832002R0f2%R222
2]

:STORAGE FOR TURNAROUND TYPE
;SCRATCH WORD USED FOR MISC. STORAGE IN SuB.
sSCRATCH WORD USED FOR MISC. STORAGE IN SUB.
:SCRATCH WORD USED FOR MISC. FLAG IN SuB.
;FLAG USED IN TEST 15 FOR LOOP CONTROL.

JFLAG USED IN TEST 7 TO MARK WHETHER TO SKIP
;A PORTION OF

THE

TEST.

;FLAG USED TO MARK THAT THE DMR ADDRESS IS NYM

JFLAG USED IN INISR TO FLAG WHEN ALL THE
sBA/CC INS HAVE BEEN DONE.
sFLAG USED IN OUTISR TO FLAG WHEN ALL THE
;BA/CC OUTS HAVE BEEN DONE.
JFLAG USED IN IN ISR TO FLAG THAT THE RESUME

CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuUL-81
CZOMID.P11
GLOBAL DATA SECTION
29-JuL-81 11:32
.WORD

002364

000000

LAST:

.WORD

002366
002370
002372

002374
002376

000000
000000
000000
000000
000000

ERROR:
LOGDEV:
PSTALK:
SUBRPC(:
NESTPC:

.WORD
.WORD
.WORD
.WORD
.WORD

002400

000000

CLRNO:

.WORD

002402
002404
002406
002410
002412
002414
002416

000000
000000
000000
000000
000000
000000
000000

LOCRC:
HICRC:
LLOWORD:

-WORD
.WORD
.WORD

CHIPNO:
:
COUNT

-WORD
.WORD
-WORD
.EVEN

HIWORD:
:
ROMADR

SEQ 0039

s COMMAND HAS JUST BEEN ISSUED.
;FLAG USED IN THE WAIT SUBROUTINES (SWAIT

; & SCLRQI) TO RETURN ERROR CONDITON (SEC)
;WORD USED TO STORE LAST COMMAND PROCESSED IN

ERRFLG:

OOO0O0O

1797
1798
1799
1800
1801

000000

PAGE 40

002362

1790
1791
1792
1793
1794
1795
1796

:THE

INPUT

INTERRUPT ROUTINE.

;ERROR STORAGE
;LOGICAL DEVICE NUMBER
sCONTAINS BASE LEVEL PROGRAM SP
;PC OF SUBR CALL FOR ERROR REPORTS
JFLAG TO NOTIFY WHEN A SUBR IS NESTED
2 IN ANOTHER SUBROUTINE (WHEN SET)
;THIS WORD

INCREMENTED DURING EACH MASTER

THIS WILL ALLOW EVERY OTHER MASTER
;CLEAR.
;CLEAR TO RUN THE MICRO TESTS.

;ROM CHECK VARAIBLES

:CRC STORAGE FOR LOW BYTE CHIP

QOO OOOO

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

12:47

;CRC STORAGE FOR HIGH BYTE CHIP

;TEMP, WORD CONTAINING 2 CONSECUTIVE LOW BYTES
;TEMP. WORD CONTAINING 2 CONSECUTIVE HI BYTES
;POINTER TO ROM ADDRESS.
sCHIP NUMBER BEING CHECKED.
;COUNTER USED IN THE $WAIT SUBROUTINE.

;:**tt*ttttttttt******ti**tt*tt***t****ttt*tttttt***tt***tt*ttttitt*ttt
R

2222200

Rttt

TR YA
A
A
IR

s
P
Shir Pl
St
putr Gt Su

G
QI
U
N
S
PR S

OO0 NN
AN —

00 00 00 0o 00 00 00 00 00

YRR

:BUFFER AREA

002420
002420
002426
002434
002442
002450
002456
002464
002472
002500
002506
002514

177603
047321
143325
014116
105025
111523
137642
135015

157427
163715
142304
052606
123754

151172
166632

165044

052012

030030
143531
066730
053627
016741

031011
105221
04004
172334
111337
145064
063617
026575
070071
031605

$CCITT:

ddC

Rttt

R0t dtRRE02a0RRt0sRRRd
R R

xx CCITT PSUEDO-RANDOM TEST PATTERN xx

THE FOLLOWING 32 WORDS TRANSLATE INTO A 512 BIT PATTERN
THAT WAS GENERATED ACCORDING TO CCITT RECOMMENDATION V.52.

THIS
PATTERN WAS GENERATED BY A 9 BIT SHIFT REGISTER (INITIALIZED
AS 1S) WHOSE S5TH AND 9TH BITS ARE XORED.
THIS XOR RESULT IS SHIFTED
INTO THE 1ST BIT OF THE REGISTER AS THE REGISTER IS SHIFTED RIGHT.
THE 9TH BIT (OR BIT SHIFTED OUT) IS SHIFTED INTO THE BIT PATTERN.

NOTE:

CCITT RECOMMENDED 511 BITS,

ON A WORD BOUNDARY.

-WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

I'VE EXTENDED THIS BY 1 BI!

177603,157427,031011

047321,163715,105221

143325,142304,040041

014116,052606,172334

105025,123754,111337
111523,030030,145064
137642,143531,063617
135015,066730,026575

052012,053627,070071

151172,165044,031605
166632,016741

;;tttttt.tttttttttttttt"t"tt'tt!.ttt'!.fi.tit.t'ttti.'t.'t.'.tttt't"'

;.
002520

000000

TRANSMIT BUFFER (SMALL)

TFLAG:

.WORD

JFLAG FOR STATUS OF

TRANSMIT BUFFER

TO END

—

(ZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A71052)
(ZDMID.P11

29-JuL-81

1834

000044

1835
1836
1837

1838
1839
1840

1841
1842
1843
1844

(002522
002530
002536

002544
002552
002560
002566

041101
044107
047115

052123
055131
032464
000
002570

1845

053125
030460
033466

043105
046113
051121

TCOUNT= 36.

TBUF:

.ASCIZ

12:42

002570

002572

100000
000044
000046

000400

SEQ 0040

.EVEN
A

AR R RN

RFLAG:
.WORD
RCOUNT= 36.
RBUF :
.BLKB

R AR R R AR

BASE :

.BLKB

:: BASE TABLE

002640

PAGE 41

054127
031462
034470

R NN R

38.

1859

}gg?

R AR AR AR R R P

256.

R AR AN R AR R AR

AN AN R AR R AR AR RN O R AR RN AR RN

JFLAG FOR STATUS
s CHARACTER COUNT
:36. BYTE BUFFER
:TO MARK THE END

.EVEN

1822

; CHARACTER COUNT OF TBUF
/ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789/

;. RECEIVE BUFFER (SMALL)

1854

1%2;

062103
045111
050117

GLOBAL DATA SECTION

;gfig
1848
1849
1850
1851
1852
1853

11:32

29~JUL-81

OF RECEIVE BUFFER
OFf RBUF
+ 2 BYTES USED
OF THE RECEIVE BUFFER

AR AN AN R AR N R AR A AN AR AR AR R AR R RN R AR

RAN AN

;MICROPROCESSOR MEMORY ALLOCATION

AR AR AR AR AR AR R R R RN AR AR A RN AR AN RN R R AR R RN RN RN AN RN RN NN RN R AR N KRR

TRANSMIT AND RECEIVE BUFFER POINTERS

1862

003240

000200

XMTBUF: .BLKW

128.

JPOINTERS TO TRANSMIT BUFFERS

122?

003640

000200

RCVBUF:

128.

JPOINTERS TO RECEIVE BUFFERS (UP TO 64).

1863

.BLKW

1866

AR R

;ggg

:: BUFFER AREA (LARGE)

1869

004240

004000

BIGRUF:

R R

AR R AR N AR R A R

.BLKB

4000

WORD FOR ADDRESS AND 1

AN E AR AR AR R A AN R AN N AR AN R

JMAX BUFFER

A AR

(UP TO 64)

WORD FOR CHAR.

AR R AR RN AR AN ANA

(2K BYTES)

COUNT

g%g:{gOP??R-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
GLOBAL TEXT SECTION
29-JuUL-81 11:32
.SBTTL

1870
1871
1872
1873
1874
1875
1876
1877
1878
1879

12:42

PAGE 42

SEQ 0041

GLOBAL TEXT SECTION

Y89535393%3%3333333324035343%0%040%2%0233%33322%32003
83000000y 0 0002020202020

'
oX

THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,

MESSAGES, AND ASCII
MORE

THAN ONE

TEST,

INFORMATION THAT ARE USED IN

8989832343 %3%3%932%233333 5327438333 %32273%3333333%0207%
04227434949 %2%2421214
M 'ttttttttttttfittttt"fi'tt (222202
RR222222222023222

:* NAMES OF

830822202220 it0RRRRR

R4 ]

DEVICES SUPPORTED BY PROGRAM

ttttttttt*tttt*tt*'ttt"'tttt.ttttt'*ttttttt'tt‘tt.ttittit"ttit."t'*".'.'

010240
010240
010240

DEVTYF
046504

030522

<DMR11>

LSDVTYP::

000061

.ASCIZ
.EVEN

/DMR11/

: (2232333233222 22223233 2222222223223 X22222222232328222232223222232222322343242323223223223]

TITLE OF

PROGRAM

:.Q't"‘*"t*'***fi'***."'*"'fi"'**.‘*fi'fi*fi“*“t*.**".t'*tfifi"‘*'*"."....'.

010246
010246
010246
010254
010262
010270

DESCRIPT

046504
043040
047511
042524

026522
047125
040516
052123

<DMR=-11 FUNCTIONAL

TESTS>

030461
052102

LASCIZ

020114

000123

.EVEN

: FORMAT STATEMENTS USED IN PRINT CALLS

1908

L$DESC::

/DMR-11 FUNCTION

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)

29-JUL-81

12:42

GLOBAL SUBROUTINES
.SBTTL

PAGE 43

SEQ 0042

GLOBAL SUBROUTINES

/1111177777 77777777777777777777/777//7777/777/77/777/77777/777/7/7777777/7/7/77777777
;7
THE GLOBAL SUBROUTINES ARE CALLED BY MORE THAN ONE TEST

I EZ2

X822

22222

822222202000

322232202

Rd0dtdRRRRRsRtRad

MACROS - THERE ARE 2 BASIC TYPES OF MACROS USED
1.

SIIIIIIIIITIII7777777707177777777777777777777777777177777777777777777777777777

11:32

TIE

29-JuL-81

NORMAL MACROS -

DMR11 FUNCTIONAL MACROS - THESE MACROS MAY
BE NOTHING MORE THAN A CALL TO A SUBROUTINE,
BUT THEY ARE DISTINCT DMR FUNCTIONS WHICH CAN
DISTINGUISHED BY THE IN-LINE MACRO NAME.

d =D e

h b d =

~NJO NS WO
OV

M) =D =

—

)

d =D

0000V
0OV OVO0

CZOMID.P1T

::ttt'tt't*ttttttfittttt'ttt*tt*fittit'ttti*fi***ki.tttttttttlttttttttttt'

*t*tt*tt*tt*tttttt'ttt'*iittttttttt‘ttttkitttttttttttttttttttttttt't.
.

"CALL MACRO - CALL ROUTINE
= JSR PC, ROUTINE
(NOTE: RETURN IS
EQUATED TO A RTS PC)
:ttt**tttt**t*t**tttt*tt*i*tttt*ttt*tttfltttttttttttltt'ttttt*t‘t'ttttfi

.MACRO
.IF
.52R?$

CALL
ROUTIN
B. ROUTIN
ROUTINE; ## MISSING ROUTINE-EXPANSION ARORT ##

JSR
.ENDM

PC,ROUTIN

x
L
.ENDC

a2 T

WAIT $FLAG MACRO - THIS MACRO INTERPUTS THE $FLAG AS RDI, RQI OR RDO.
IF RDI OR RDO, THE SUBROUTINE CALLED WILL WAIT UNTIL
THE RESPECTIVE BIT IS SET.
IF RQI, THE SUBROUTINE
CALI ED WILL CLEAR RQI AND WAIT UNTIL RDI IS CLEARED.
;;t'tttttttt*ttt*tttt‘*ttt*tt*fittt*tttttfitttfi*tttt*tik*t*tttii*t*'ttttt

.MACRO
WAIT
NLIST
CLIST ME
LIST

$FLAG

"ENDC
IF
ngoc

IDN $FLAG,RO!
PC, $CLROI

-52“??
-MEX

JSR

ENDC

vSR

$FLAG

;xxxx MACRO EXPANSION *xwx

FLAG

:## MISSING FLAG FOR WAIT

IDN $FLAG,RD]

PC,

SWAIT

WORD

IDN $FLAG,RDO

PC, SWAIT

:CLEAR RQ]

- EXPANSION ABORT

AND WAIT FOR

;CALL WAIT ROUTINE

TO BE

‘FLAG THAT WE'RE WAITING FOR RDI
;CALL WAIT ROUTINE

CLEARED.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P1
29-JuL-81 11:32
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
1983
1984
1985

30A(1052)
GLOBAL

29-JUL-81

12:42

SUBROUTINES
.ENDC

.WORD

PAGE 44

SEQ 003

JFLAG THAT WE'RE WAITING FOR RDO
;t‘fifl

AR A N

.NLiIST ME
.ENDM
a2

2202022800280t
Rl
SRR
Rl R

*"CLEAR MACRO - THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE
N

$MSCLR SUBROUTINE

C(LEAR
.MACRO
NLIST
LIST ME
LLIST

JSR

PC.,

$MSCLR

sxexnn MACRO EXPANSION ###»

;ISSUE A DMR MASTER CLEAR
IR

NLIST ME
.ENDM

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZDMID.P11
29-JuL-81 11:32
1986
1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997

30A(1052)

29-JUL=-81

12:42

GLOBAL S!JBROUTINES
SR

3222822202208

Fo4

PAGE 45

20202000000ddiER

SEQ 0044

Sttt

Rlsittstiatillst

ittt

:"BASEIN MACRG - THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE
H

$BASEIN SUBROUTINE

]

(WITH DEFAULT ARGUMENTS

IF ARGUMENTS NOT GIVEN)

""tttttil'tt'ttttfitttt*'t't"ti"tttttfi*tttttitt.tttt""'tttitttt.ttltti

.MACRO BASEIN
NLIST
LLIST ME
LLIST

AF
JSR
1FF
JSR

.ENDC

8
PC,

$A,$8,8(

$A
$BASE]

.WORD
.WORD
.WORD

sxxxx MACRO EXPANSION wnxx

LPLU
BASE
DMR

PC, $BASEI
.WORD
$A
.WORD
$B
.WORD
$C

;CALL BASE IN ROUTINE WITH DEFAULTS
;SET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE
;CALL BASE IN ROUTINE
JMAINTENANCE MODE BITS TO SET
;BASE TABLE ADDRESS
sMODE
:tl’tt

IN BSEL1

LE A2 1

.NLIST Mt
.ENDM

3222080842000t

RaRRE0SRtRRSRSRRRSRtRRRRSst

Rttt RRls

“"CNTRIN MACRO - THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE

$CNTIN SUBROUTINE (WITH DEFAULT ARGUMENTS
IF ARGUMENTS NOT GIVEN)

:
;

".'ttttl'!ttfittttt*t**fii*t*iti***ti't*t*t'tttttttttt*"t“ktt'tttttt't'tt

.MACRO

C(NTRIN

.IF
JSR

B
FC,

$A
S$CNTIN

JSR

PC,

$CNTIN

.NLIST
LLIST ME
LLIST

IFF

.ENDC

.WORD
.WORD

LNLIST ME
.ENDM

sxxxx MACRO EXPANSION

*xw»

;CALL

CONTROL

IN ROUTINE WITH DEFAULT

;CALL

CONTROL

IN ROUTINE

;SEL6 = FULL DUPLEX, RUN MODE,
;SEL6 - (DUPLEX, MODE)
""‘t

LA B

SEC START.

CZDMIDO DMR-11 FUNCTIONAL TESTS MA(CY11 30A(1052)
29-JUL-81
GLOBAL SUBROUTINES
C(ZDMID.PN
29-JuL-81 11:32
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056

2323332232222

;
;

DMRIN MACRO -

12:42

084020

PAGE 46

20080022228

SEQ 0045
00202 RRRRRRRRRRlRRltRstlst
sl R

THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE
$DMRIN SUBROUT INE

e e

.MACRO

DMRIN

IF
.ggn?§

B
DMRIN;

NLIST
LLIST ME
LLIST

.MEX

"ENDC
JSR

$A,$8,8(

sxxxx MACRO EXPANSION *xxx

$A
## MISSING ARGUMENTS-EXPANSION ABORT ##

IF
r

PC, $DMRIN
.WORD
$A
B
$8
WORD
O

;CALL DMR MODE INPUT ROUTINE
S INPUT COMMAND

'E oc

.WORD

:SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)

IF
o

B
WORD

$C
0

:NO SEL6

)

.WORD

;SEL6 VALUE (OR BITS TO SET IN BSEL6)

.EN

.ENDC

:NO SEL4

:l’t'!’

L8 B

& 4

NLIST ME
"ENDM

.'.'tittttttttttlttl’tttttttt'tt*ttit*'t*tttttl"i’ttt'itttttiittfitttttttttt

; SHUTDN MACRO - THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE
$HALT SUBROUTINE
:

.'"ttttttt*t'tfifittttttttt'ttttl’tttttttiittttttttt*ttttttttttttttt'ttittt

SHUTDN
+MACRO
NLIST
LLIST ME
LLIST

JSR

PC,

.NLIST ME
.ENDM

$HALT

srxxx MACRO EXPANSION

*xxx

*hH

LA
& B 1

;sDMR HALT ROUTINE.
RN

CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11
(Zomip.P1
29~JuL-81 11:32

2081

2082

2083

2084
2085
2086
2087
2088

30A(1052)

29-JUL-81

GLOBAL

SUBROUTINES

12:42

RASRRRRR Rl

:"BACCIR MACRO -

PAGE 47
dsR

SEQ 004€

;

2094
2095

1FF

2093

JSR

ENDC

8
PC,

$A
$BACC

PC,

$BACC

.WORD
.WORD
.WORD
.WORD

.WORD
.WORD

sx*xx MACRO EXPANSION xxwx

;CALL BA/CC

[N ROUTINE WITH DEFAULTS

;CALL BA/CC

IN ROUTINE

RQI.BAC(R
;BA/CC IN RETEIVE
RBUF
JRECEIVE BUFFER
T
;RECEIVE CHARACTER COur
RCOUNT
RQI!BACCR

$A
%8B

BA/CC

d cd e

OO0

=P =D

W —'O%@\lg

NN AL N NIN NI NP AU NI AN PO NI NP

—d
d e

b od
ed —h

AWN 2OV

d
i
d ad
il

AR AR AR A AT AR

OVWNR

IN RECEIVE

COMMAND

;BUFFER ADDRESS BITS 0-15
;BA BITS 16/17 AND (CHAR. COUNT

AR AR AT R AT AR AR AN R AR

2 BACCIT MACRO -

L &

AN R RN

NNARARA RN

ANANRNT AN RN

THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE

;
;

$BACC SUBROUTINE (WITH DEFAULT ARGUMENTS
IF ARGUMENTS NOT GIVEN)

""tltttitfitttt*'titttttt'ttttfittfitltt*ttt*fitkfifittttttttttttttttkfittittt

.MACRO

NLIST
.LIST ME
18]

IF
JSR
1FF

JSR

it ed S

CCMMAND

NLIST ME
. ENDM

2104

d e

$A,$B

:tt't

RERAR

ARGUMENTS NOT GIVEN)

.MACRO
BA(CCIR
.NLIST
LLIST ME
LLIST
.IF
JSR

— ol

;.'t'tttttttttttttttttttti'ttttitt*ttttttfitfi'itfli'ttl'tlt'i'i.'t!’ttfi!'i'

2091
2092

WA
D=
Dt 02 = a2

$8ACC SUBROUTINE (WITH DEFAULT ARGUMENTS

;

2089
2090

NINLMN R NINL NN

THIS IS A DMR FUNCTICNAL MACRO WHICH CALLS THE

.ENDC

BACCIT

sxxxx MACRO EXPANSION raxw
8
$A
PC, $BA(C
cCALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI'BACCT
JBA/CC IN TRANSMIT COMMAND
.WORD
TBUF
. TRANSMIT BUFFER ADDRESS
.WORD
TCOUNT
; TRANSMIT CHARACTER COUNT

PC, $BACC
. CALL BA/(CC IN ROUTINE
.WORD
RQ] 'BACCT
;BA/CC IN TRANSMIT COMMAND
.WORD
$A
;BUFFER ADDRESS BITS 0-~15

.WORD

NLIST ME

.ENDM

$A,$B

JBA BITS 16 & 17 AND CHAR.
;"'..

| B B

8¢

COUNT

CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P1N

29-JuL~-81

11:32

29-JUL-81

GLOBAL SUBROUTINES

12:42

PAGE 48

SEQ 0047

2131

,-'-!tttttt"t'ttttttttttttttt'tttttttttttttt'ttt'ttttttt.'ttt'ltttt't"t

2132

.-.'tttttttttt'tttttttttit'tttttttttttttfittttttttt'ttttt'ttt'tttt'ttt.."

2133

;

2136
S};g

;
:

2139
2140

;

3122

NESTING LEVEL

2145
2146

;
;

ENTRY CONDITIONS - FLAG

2148
2149

;
:

5}%@

;

SUBROUTINE SWAIT
FINCTION =

TO WAIT FOR RDI TO BE SET IN SELO
OR RDO TO CE SET IN SEL2

CALLING FORMAT:

JSR
.WORD

512}

PC,
FLAG

SWAIT

(MACRO CALL -- WAIT RDI)

2147

- MAY BE CALLED FROM ANOTHER SUBROUTINE

g}g?

;
:
;
;

2157
2158

;
:

2156

EXIT CONDITIONS

2159

WAIT FOR RDO
WAIT FOR RDI

NESTPC= 1

ROUTINE NESTED WITHIN ANOTHER
SUBROUT INE.

= DELAY COUNTER

(DETERMINED IN INIT.)

ROUTINE NOT NESTED.

- EITHER RDI OR RDO BIT SET AS EXPECTED
OR (ERROR CONDITONS):
1. RDI OR RDO SET, BUT NOT THE EXPECTED ONE
THE USER WILL BE INFORMED.
HOWEVER,
THIS WILL NOT NECESSARILY BE AN ERROR.

2. BIT NOT SET BEFORE DELAY EXPIRED.
THIS WILL RESULT IN A HARD ERROR MESSAGE

;

g}g?

=
=~

WAIT1

2152
2153
2154
2155

=1
=0

AND THE

;

CARRY BIT WILL BE SET.

THE

BIT SET FLAG THE ERROR CONDITION.

2162

;

2165

:-;ttttttttttttttttttttttttttttttttttt*ttttttttttfitttttttttttttttttttttfi

2166

'-'-ttfittttttt*ttt*ttttttttttttttttttttttt'ttttttt*tttttttttttttttttt't"

S}gz

;

2167
2168
2169
2170
2171
2172

010276
010276
010302
010306
010312
010314

005037
005037
005737
001005
011637

002362
002416
002376
000004

002374

2175

010326

017637

000000

002340

S};z
2176

8}8§§g
010334

162737

062716

2177
2178
2179
2180
2181
2182
2183
2184

010340
010342
010344

010046
010146
013701

010350
010350
010352

005000

2186

010360

001036

2185

010352

032777

002374

000002

30%:

171654

CLR
CLR
TST
BNE
MOV

SUB

MOV

002312

000200

REGISTERS DESTROYED - RESTORED

SWAIT:

40$%:

CARRY

ERRFLG
COUNT
NESTPC
108
(SP) , SUBRP(

:CLEAR ERROR FLAG
:CLEAR DELAY COUNTER
;IS THIS NESTED IN ANOTHER SUBROUTINE?
:YES = USE THE SUBRP(C ALREADY CALCULATED.
:SAVE PC AFTER THE CALL TO SWAIT.

#4, SUBRPC

:BACKUP TO THE PC OF

THE ACTUAL CALL

ADD

42,(SP)

A(SP) ,TEMP

:GET THE FLAG FOR RDI OR RDO

MOV
MOV
MOV

RO,-(SP)
R1,-(SP)
WAIT1,R1

:PAST THE FLAG ARGUMENT
:SAVE RO
:SAVE R1
:DELAY COUNTER DETERMINED BY BAUD RATE
;(DETERMINED IN INIT ROUTINE).

CLR

:INNER LOOP COUNT OF DELAY COUNTER

BIT

#RDO,aSEL?2

;1S THE RDO BIT SET IN SEL2?

BNE

60%

:INC THE PC LEFT ON THE STACK TO PQINT

;YES = EXIT BIT CHECK LOOP.

mwgmfww—flg

000000
V00~

b —
D nd
D

Ve
Vo LV}

D
i e
d
el
—

010362
010370
010372
010372
010374

[VelVoXVolleRio

[ S1,S 1,8 1A 91, ¥1,NT VT, VY, ¥1,¥) N

t CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11
C(ZDMID PN
29-JuL-81 11:32

032777
001064

1064422

010432

010434
01043¢
010440
010440
010442
010444
010446
010450
010454
010456
010456
010462
010464
010472
010474
010474
010500
010504
010506
010510
010514

010522
010524
010524
010526
010530
010532
010534
010540
010542
010542
010546
010550
010550
010554
010560
010562
010564
010570

171642

002416

012727

000001

013727
000000
005367
001375
005367
001367

002116

INC

COUNT

s INCREMENT DELAY COUNTER.

;DELAY 100 MICROSECONDS

RC
40%

002362

012746
012746
010600
104414
062706
032777
001422

010620
000001
000004
000001

60%:

002340

012746
012746
010600

010653
000001

062706

000004

MoV

61,(PC)*

002366

R1
308
1,EMG1,ERRG?

TRAP

.WORD
.WORD
-WORD

TST

TEMP

JWERE WE WAITING FOR THE RDO FLAG?

100%
#CNTRL ,ERROR
1008

#CNTRL ,@SELZ
100%
9,EMG9,ERRGZ

INC
BR

ERRFLG
100%

TST

TEMP

PRINTB

#FMS?

8EQ

100%:

OUT ERROR

;3ET ERROR FLAG
;BRANCH TO COMMON EXIT.

BIT
BEQ
ERRDF

70%:

;TIME

ERRFLG
1008

PRINTB #FMS1

171512

;BETWEEN LOOPS.
JREPEAT UNTIL MAXIMUM LOOP SATISFIED.

INC
BR

BNE
CMP
BEQ

002362

005737
001410

C$8RK

. WORD
MOV
.WORD
DEC
BNE
DEC
BNE

DEC
BNE
ERRDF

000001

TRAP

;LOOP UNTIL RO RETURNS TO O

177756

002340

104414

SEQ 0048

177772

005737
001042
022737
001436

000413

PAGE 49

;IS THE RDI BIT SET IN SELO?
JYES = EXIT
sCALL SUPERVISOR = ALLOW CONSOLE INTERRUPT.

DELAY

104455

104455
000011
020040
015124
005237

#RDI,aSELO
70$

DEC
BNE

005301
001344

000001
017716
015124
005237
000445

12:42

BIT
BNE

BREAK

005237
005300
001363
000000

2199

000200

30A(1052)
29-JUL-B1
GLOBAL SUBROUTINES

1008

b$DLY,(PC)*

-6(PC)
.4

=22(PC)
.=20

gSERDF

EMG1
ERRGZ2

JYES - OK, EXIT.

;IS THIS CONTROL OUT ERROR EXPECTED?
;IF YES, DON'T REPORT THE FOLLOWING ERRORS.
JRECEIVED AN RDO, WHEN WAITING FOR RDI

;1S

MOV
MOV
MOV
TRAP
ADD

THIS A CONTROL 0QUT?

#FMS1,~(SP)
#1,-(SP)

SP,RO
CSPNTB

#4,SP

sNO NEED TO CHECK FRROR CODES.
JUNEXPECTED CONTRGL OUT.

TRAP

-WORD
.WORD
.WORD

;SET ERROR FLAG.
JWERE

WE WAITING FOR

THE

RDI

CSERDF
9
EMG9
ERRGZ2

FLAG?

JYES - OK, EXIT
JRECEIVED AN RDI, WHEN WAITING FOR RDO
MOV
MOV
MOV
TRAP
ADD

NFMS2 ,~(SP)
#1,-(SP)

SP,RO
CSPNTB

#4,SP

[

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
CZDMID P11
GLOBAL SUBROUTINES
29-JuL-81 11:32
2243

2244
2245
2246
2247
2248
2249
2250

010570

010574
010576
010602

005737
001002
005037
012601
012600
005737
001401
000261

010602
010604
010606
010612
010614
010616
010616

000207

010620
010626
010634
010642
010650
010653
010660
010666
010674
010702

047045
020117
054105
042105
047045
045
044504
042440
042524
022517

002376

002374

105¢%:

110%:

040445
042523
042520
051040
000
022516
051440
050130
020104
000116

PAGE 50

SEQ 0049

TST
BNE
CLR

NESTPC

;WAS

MoV

(SP)+,R1
(SP)+,R0
ERRFLG
1108

JRESTORE R1
JRESTORE RO

MOV
TST

002362

12:42

BEQ
SEC

105%
SUBRP(

THIS NESTED

;WAS TIIERE AN ERROR (CARRY CLEARED ON TST)
;IF NOT, RETURN WITH CARRY (LEAR

;SET CARRY.

RETURN

042122
020124
052103
044504

FMS1:

LASCIZ

/%NXARDO SET EXPECTED RDIZN/

051101
052105
041505
042122

FMS2:

LASCIZ

/¥NXARDI

.EVEN

IN ANOTHER SUBROUTINE?

;IF YES = LEAVE THE SUBROUTINE PC ALONE
;CLEAR THE PC

SET EXPECTED RDOZN/

CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuL-81 11:32

30A(1052)
29-JUL-81
GLOBAL SUBROUTINES

2268

NN AR AR AN R R

2269

2270

;

%%;2

2275

sg;;

:
:
.
:

2285
2286
2287
2288
2289

:
.
:
.
;

2290

S%gg

2291

2294

&
PAGE 51

SEQ 0050

A AR AN AN AN AN AN R R R R R RPN RN AN AR AN A RN AN AR

R AN

R A

R AR RN R AR AR

A AR A AR AN AR AR RN N

AN AR AR

RN R NN

AN AN AR AR RN NN RN

SUBROUTINE S$CLRQI
FUNCTION =

CALLING FORMAT:

.
.

2280
2281
2282
gggz

NESTING LEVEL

710 CLEAR RQI AND WAIT FOR RDI

JSR

PC,

TO BE CLEARED

$CLRAQI

(MACRO CALL == WAIT RQI)
- MAY BE NESTED WITHIN ANOTHER SUBROUTINE

ENTRY (ONDITIONS - WAITZ2 = DELAY COUNTER (DETERMINED IN INIT. ROUTINE)
NESTPC= 1
ROUTINE NESTED WITHIN ANOTHER
SUBROUT INE.
=0
ROUTINE NOT NESTED.

EXIT CONDITIONS = 1. NON ERROR, DMR READY TO RECEIVE THE NEXT COMMAND
2. ERROR IF RDI DOES NOT CLEAR BEFORE THE
DELAY ROUTINE EXPIRES. AN ERROR MESSAGE WILL
OCCUR.
ALSO A CARRY BIT WILL BE SET TO FLAG
THE ERROR FOR THE USER.

REGISTERS DESTROYED - RESTORED

:~.'tttttttt*ttttt*tttttttttttt*fitttttfittttttttttttt*ttittttttttttttttttt

2295

2296
2297
2298
2299
2300
2301

010706
010706
010712
010720
010724
010726

2302
2304
2305
2306
2307

010740
010740
010742
010744

2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2327
2322
2323

010750
010752
010752
010760
010762
010762
010764
010766
010770
010770
010774
010776
011002
011004
011010

2308

A R A AN

55;9
%%;g

2302

12:42

010732

010750

005037
042777
005737
001005
011637

162737

010046
010146

013701

002362
000040
002376
002374
000004

$CLRQI:

171312

002374

002314
12%:

005000
032777
001427

000200

104422
005300
001371
012727
000000
013727
000000
005367
001375

10%:

000001
002116
177772

171252

RN A A

CLR
BIC
TST
BNE

MOV
SuB
MOV
MOV

AR RN R AR

A R AN AR AR

ERRFLG
#RQJ] ,aSELO
NESTP(C
10%

(SP) , SUBRP(
#4 ,SUBRPC

A R AR

RN R

A AN AR RN AR AR

RN NRAAR RN NS

;CLEAR ERROR FLAG
JREQUEST INPUT CLEAR
;IS THIS NESTED IN ANOTHER SUBROUTINE?
JYES = USE SUBRPC CALCULATED
;SAVE THE PC AFTER THE CALL TO SWAIT.
;BACKUP TO THE PC OF

THE ACTUAL CALL.

MOV

RO,-(SP)
R1,-(SP)

WAITZ2,R1

;SAVE RO
;SAVE R1

CLR

2 INNER LOOP COUNT

BIT
BEQ
BREAK

#RD] ,aSELOD
30%

DEC
BNE
DELAY

RO
20%
1

;1S THE RDI BIT CLEAR IN SELO?
JYES - EXIT
;CALL SUPERVISOR - ALLOW CONSOLE INTERRUPT.
TRAP
($8RK
;LOOP UNTIL RO RETURNS TO O

;GET THE DELAY COUNTER (DETERMINED BY
;BAUD RATE IN INIT ROUTINE)

;DELAY 100 MICROSECONDS

MOV
.WORD
MOV
WORD
DEC
BNE

#,(PC)+
O
LDLY, (PC)+
O
=6(PC)
.~4

29-JuL-81

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81 11:32
GLOBAL SUBROUTINES

CZDMID P11

011012

005367
001367
005301
001352
104455
000001
017716
015124

DEC
BNE
ERRDF

002362

005737
001002
005037

002376

000207

4
PAGE 52

SEQ 0051

177756

005237

012601
012600
005737
001401
000261

12:42

002374

30%:

40%:

002362
50%:

R1
12%
1,EMG1 ,ERRGZ

DEC
BNE

-22(PC)
-20

TRAP
.WORD
.WORD
.WORD

gSERDF

JREPEAT UNTIL MAXIMUM LOOP SATISFIED.

s TIME OUT FRROR

EMG1
ERRG?Z

INC

ERRFLG

:SET ERROR FLAG

TST
BNE
CLR

NESTPC
40%
SUBRP(

;WAS

IF YES - LEAVE THE SUBRP(C ALONE
;CLEAR THE PC

MOV
MOV

(SP)+,R1
(SP)+,R0O
ERRFLG
50%

JRESTORE RO
;WAS THERE AN ERROR? (CARRY CLEARED ON TST)
s]F NOT - RETURN WITH CARRY CLEAR

TST
BEQ
SEC

RETURN

THIS A NESTED ROUTINE?

JRESTORE R1

;SET CARRY.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P1N

29-JUL-81

GLOBAL SUBROUTINES

29~JUL-81 11:3¢

RN A AN AR AR

2349

2350

;

AR R

z
%%g
2355

:
:

CALLING FORMAT:

2358
gggg
2361

:
;

NESTING LEVEL

g%gg

;

52;2

2375

2. IF RUN BIT NOT SET BEFORE DELAY TIMEOUT, ERROR
WILL RESULT. ADDITONALLY THE ERROR MESSAGE WILL
RELAY THE RESULTS OF THE MICROTESTS IF THE RIN

%%gg

BIT IS NOT SET.

THERE IS A PATCH AREA TO ALLOW THESE DIAGNOSTICS

NOTE :

;
;

2376
g%;g

$MSCLR

TESTS BEING RUN ON EVERY OTHER MASTER CLEAR
EXIT CONDITIONS - 1. NO ERROR - DMR11 MICROPROCESSOR INITIALIZED

;
;
;

2370
2371
2372

PC,

(MACRO CALL =-- CLEAR)

CLRNO = EVEN OR ODD COUNT. THE ACTUAL # IS NOT
SIGNIFICANT, HOWEVER IF BIT O IS SET
THEN THE MICROTEST IS SET ALONG WITH
THE MASTER CLEAR. THIS ROUTINE WILL INCR.
THE VALUE. THIS WILL RESULT IN THE MICRO

:
:
;
:
:

2369

JSR

- MAY ONLY BE CALLED FROM IN-LINE CODE (TEST,
SUBTEST OR TEST SEGMENT)
ENTRY CONDITIONS - WAIT2 = DELAY COUNTER (DETERMINED BY INIT. ROUTINE)

2362
2363
2364
2365
2366

RN NS

FUNCTION - TO PERFORM A MASTER CLEAR FOR THE DMR11

5%?9

AR AR AR

AR AR AN A A AN AN RRA RN AR RN RRR AR AR AR

SUBROUTINE $MSCLR

5%12

TO RUN ON A MB8206 (INSTEAD OF MB207).
SHOULD BE FOR DEVELC®OMENT USE ONLY.

THIS

REGISTERS DESTROYED - RESTORED

E:t*ttttttttttttttttttttt*ttttttttt*ttfi*tttttttttttttttittttttttttttttt

2381

2383

SEQ 0052

RN AN AR AR AR R E R R AR A RN RN RN RN AR R R AN AR AR AR R RN

2348

2382

12:42 PAGE 53

IR RN AR

011070

$MSCLR:

RR AR R AR

E AR AR

AR AA NN

RN AR A IRAANRRNRRRCRRAAN AR AR

MOV
SuB
MOV

(SP) ,SUBRP(C
#4 ,SUBRP(
RO,-(SP)

:SAVE PC AFTER THE CALL TO SWAIT.
;BACKUP TO THE PC OF THE ACTUAL CALL
;SAVE RO

CLRB

aBSEL3

;CLEAR BSEL3

2384
2385
2386

011070
011074
011102

011637
162737
010046

002374
000004

sggg

011106

105077

171132

2391

011112

000240

NOP

A A RANRNNA
RRR
RN R RN AR AR AR
RN RKRR
IRAA

2394

011120

000240

NOP

RN AR AR AR AR AR R RAR R

2396
2397
2398

011122
011130
011132

032737
001004
012777

S%gg

2392
2393
2395

2399
2400

26401
2602

2603

011104

011114
011116

011140
011142

011142

011150

002374

MoV

010146

012777

000001

002400

040000

171072

060000

171062

7%:
8$%:

;SAVE R1

;**x PATCH AREA FOR 8206 IF NEEDED =+
;CLR Q#SEL6 -

NOP
NOP

000240
000240

000403

R1,-(SP)

AR RN AR NNRAN

;1S THIS AN ODD MASTER CLEAR.
;IF YES - BR
;ISSUE A MASTER CLEAR.

BIT
BNE
MOV

#B1TU,CLRNO
7%
#MCLR,aSELO

MOV

#MCLR'MD]IAG,aSELO ;ISSUE THE MASTER CLEAR AND TOGGLE
JMICRO TEST SWITCH.

A AR

(ZCMIDO DMR-11

Lo
NNV
O

POND — —b — =

fele)

PONOMNIMNININNININININ)
=
=2
NNYNWVY
OO

a2
O
O

d b

005237
013701

— ed

b e

b ovd

d wed

—

29-JuL-81
00024C
000240

—t

— e
b

OO0

———
Poeur Qe Gauer P

Guusr PPy

OOOOOO0OO0O0OO0O0

s Puar G
s or

2408
2409
2410
2411
2412
2413
2414
2415
2416
2617
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440
2441
2442
2443

2407

—_ P

2405

26406

o QOO0

2404

OO0O00

(ZDMID.P11

FUNCTIONAL TESTS MACY11

11:32

30A(1052)
29~JuL-81
GLOBAL SUBROUTINES

:MOV #RUN,I¥SELO

100000

171032

005300
001371
012727
000000
013727

000001

005367
001375
005367
001367
005301
001352

177772

.'ttttfitt't.tfit't'ttttttttttt't*tttti

s INCR WORD (CHANGE ODD TO EVEN ETC.)
JGET THE # OF 100 MICRO SECOND DELAYS

CLR

s INNER LOOP COUNT

BIT

#RUN,QSELO

;IS THE RUN BIT SET IN SELO?
JYES - EXIT
;CALL SUPERVISOR = ALLOW CONSOLE INTERRUPT.

DEC
BNE
DELAY

40%

%03

;TO WAIT BEFORE EXITING

JLOOP UNTIL RO RETURNS TO 0
;DELAY 100 MICROSECONDS

002116

ROUTINE.

TRAP

C$BRK

MoV

61,(PC)4

MOV

b$DLY,(PC)+

.WORD
DEC
BNE
DEC
BNE

177756
DEC
BNE
ERRDF

108
1,EMG1.,ERRG3

JREPEAT UNTIL MAX LOOP SATISFIED.

;JREPORT RUN NOT SET

000001
017716
40%:

002374

MOV
Mov

CLR
RETURN

(SP)+ ,R1
(SP)+ ,RO
SUBRP(

JRESTORE R1
JRESTORE RO

:TIDY UP SUBRPC

-6(PC)
.4
=-22(PC)
.~20

TRAP

%SERDF

.WORD

EMG1
ERRG3

.WORD
-WORD

015240

011264

THE

.WORD

104455

012601
012600
005037
000207

NEEDED #+

CLRNO
WAIT2,R1

BNE
BREAK

104422

Mov

INC

10%:

SEQ 0053

;%% PAT(H AREA FOR 8206 IF

NOP

002400
002314

PAGE

"t'i'ttitttfi"'lt'tfit.ttttitfittti'tt

NOP
NOP

005000

000000

NOP

000240
000240

032777
001025

12:42

CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
11:32

PAGE 55

SEQ 0054

%N,

el
st ittt
222322322222 2232 2232222222282 8232222222820 Raf
RA
NN
AN
AN
AR
AN
A
AN
AR
AR
R
RN
A
AN
AR
AN RN A AAN AR AR ARNN AR RN NN R AR ANAR N

SUBROUTINE $BASE]
TO PERFORM A BASE

0.0y

FUNCTION -

AR ETR T TE TR
P
R YR E

IN COMMAND

PC,

JSR

$BASE|

.WORD A (SELO MAINTENANCE BITS)
.WORD B (SEL4 - ADDRESS)
.WORD (SEL6 - MODE AND/OR RESUME)
(MACRO CALL -- BASEIN OR BASEIN A,B.(0)

I IR W IR

CALLING FORMAT:

NESTING LEVEL

MAY ONLY BE CALLED FROM IN-LINE CODE
SUBTEST OR TEST SEGMENT)

ENTRY CONDITIONS

A = MAINTENANCE BITS (I.E. LINE UNIT LOOP BA(CK)
B = BASE TABLE ADDRESS (SEL4)
C = MODE + RESUME (SEL6)
INFACE = 0 - NO INTERFACE WRITE REQUIRED
- WRITE INTERFACE (AX3-15)
1

(TEST,

IF NO ERROR - DMR11 BASE TABLE ASSIGNED
IF IN DMR MODE, AND INTERFACE WRITE REQUESTED
WRITE REQUESTED AX3-15.
TIMEOQUT ERRORS ARE DETECTED IN WAIT SUBROUTINES.
3
DMR MODE REQUESTED (USED IN CONTROL IN
D MRFLG = -1
1 .

EXIT CONDITIONS

ROUTINE)

DMC MOLE OR RESUME REQUESTED.

RESTORED

REGISTERS DESTROYED
Ld

':t**t*ttttt*ttttttt*tt*tttttttfitttttt**fitttttttttttti'ttt'fitttitfit'tfi'
':tt*ttt**ttttt**tt*ttttt*ti**tttttttttttttttttttttittttitfitttt'tt*tttt

011266
011266
011272

$BASE]:

011637

162737

002374
000004

002374

112777
012737

000043
000001

170724
002376

004737
000000

103003

010276

(SP) ,SUBRPC

062716
000467

000006

2495
2496
2497
2498
2499

057677
062716
017677
062716
017677

000000
000002
000000
000002
000000

170672

170664
170654

10%:

;SAVE PC AFTER THE CALL TO SWAIT.
;BACKUP TO THE PC OF THE ACTUAL CALL

MOV
SUB

#4 ,SUBRPC

MovB
MOV
WAIT

#RQJ !BASE], ABSELO ;ISSUE THE BASE IN COMMAND.
;FLAG THAT THE NEXT SUBROUTINE
#1 NESTPC
;WAIT FOR RD]
RDI

JSR

PC,

SWAIT

.WORD

BNERROR 108

2493

2494

2644
2445
2446
2647
2648
2649
2450
24651
2452
2453
24654
2455
2456
2457
2458
2459
2460
2461
2662
24663
2464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484
2485
2486
2487
2488
2489
2490
2691
2492

29-JuL-81

GLOBAL SUBROUTINES
0,0,

(ZOMID.PT

12:42

;xxrx MACRO EXPANSION #w=x

;CALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDI
" RANR

& 8 4
LB

*IF NO ERROR, RDI SET ~ PROCEED

ADD

#6, (SP)

;CORRECT STACK FOR ERROR EXIT

8IS

?(SP) ,aSELO

;SET ANY MAINTENANCE BITS
2INC. POINTER.
;SET UP BASE ADDRESS
;INC. POINTER AGAIN

ADD
MOV
ADD
Mov

30%

#2,(SP)

a(SP) ,aSEL&
#2,(SP)

?(SP) ,aSEL6

IS NESTED.

BCC

JEXIT

;SET UP RESUME BIT AND THE HIGH 2 BITS

10%

—

—_

—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P1M
29-JuL~-81 11:32

30A(1052)
29-JUL-81
GLOBAL SUBROUTINES

12:42

§
PAGE 56

SEQ 0055

2500
2501
2502
2503
2504

011364
011370

062716

000002

ADD
WAIT

#2,(SP)
RQ]

011370

004737

010706

JSR

PC, $CLRQI

;OF THE BASE TABLE ADDRESS
JINC. POINTER AGAIN (SHOULD BE AT RETURN PC)
;CLEAR RQ] AND WAIT FOR RD]I TO CLEAR
Jurxn MACRO EYPANSION twwe
;CLEAR RQ] AND WAIT FOR IT TO BE CLEARED.

2506
2507
2508
2509
2510
2511
2512
2513
2514
2515

011374
011374
011376
011404
011406
011414
011416
011416
011422
011424

BERROR

30t

JIF ERROR, EXIT

(MPB
BNE
BIT
BEQ

#122,aBSELS
15%
#RES,aSELE
16%

BCS
;WAS THIS A DMR BASE IN?
;IF NOT, CLEAR DMR FLAG (DMC MODE)
;IS THIS A RESUME?
:IF NOT, PROCEED

CLR
BR

DMRFLG
30%

;CLEAR DMR 7LAG (NO DMR RUN ACKNOWLEDGE).
;SKIP - TO END

MOV

#=-1,DMRFLG

;FLAG THAT DMR MODE WAS REQUESTED.

BNE
BIT
BNE

17%
#RDO,aSELO
30%

MOVB
WAIT

#RQ] ' INTER,QBSELO ;ISSUE WRITE INTERFACE COMMAND.
RD1
JWAIT FOR RDI
;exxx MACRO EXPANSION sxxx
PC, SWAIT
;CALL WAIT ROUTINE
.WORD
0
;FLAG THAT WE'RE WAITING FOR RDI

2505

2516

2517
2518
2519
2520
2521
2522
Sggz

011424

011432
011436
011440

103445
122777
007004
032777
001403

000122

70634

010000

170624

15%:

005037
000432

002260

012737

177777

002260

000001

002366

005737
001424
022737

002262

011446
011450
8}}228

001004
032777
001014

000200

170554

2525
2526
2527
2528
2529

011460
011466

112777

000055

170544

011466
011472

004737
000000

010276

2531
2532
2533
2534
2535
2536
2537

011474
011474
011476

103405
113777

2539
2540
2561
Sg:%

011510
011510
011514
011520

2530

2538

011504

]

004737
005037
005037
000207

16%:

TST
BEQ
CMP

17%

JSR

INFACE
30%
#CNTRL ,ERROR

JRRRR

170544

010706
002376
002374

30%:

30%

1S AN INTERFACE WRITE REQUIRED?
;IF NOT - SKIP TO END
;ARE WE EXPECTING AN ERROR (IN TEST THAT
;FORCES AN ERROR)
;IF NOT PROCEED
;JF EXPECTING AN ERROR - IS RDO SET
:IF YES - DON'T BOTHER CHANGING THE INTERFACE.

IRNKRR

002304

222

TRAK

BERROR

30%

;IF ERROR, BR TO END.

MOVB

AX3,aBSEL7

WAIT

RQ]

JSR

PC, $CLRQ]

B8CS
30%
JWRITE AX3-15. INTERFACE SELECTED
;BY AX3 DETERMINED IN INIT. CODE.
.CLEAR RQI AND WAIT FOR RD! TO CLEAR.
sxxxx MACRO EXPANSION txxx
;CLEAR FQI AND WAIT FOR IT TO BE CLEARED.

CLR
CLR
RETURN

NESTPC
SUBRP(

;CLEAR THE NEST FLAG
;TIDY UP SUBRPC

IRRRR

TeRR

29-JuL-81
| CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
I CZDMID.P1N
GLUBAL SUBROUTINES
29-JuL-81 11:32

2545
2546
2547
2548
2549

PAGE

SEQ 0056

;:tttttttttt*tt*tttfi**i'ttt'ttttt*ttfifi'ttttttttttttfifittttitttttittttttt

SUBROUTINE $CNTIN
FUNCTION

2551

TO PERFORM A CONTROL

CALLING FORMAT:

2552

2553
2556
2555
2556
2557
2558
2559

2578
2579
2580
2581
2582
2583
2584
2585
2586
2587
2588
2589
2590
2591
2592
2593
2594
2595
2596
2597
2598
2599
2600

;:tt*'tfit'*tttt't‘tt"'i""tt'fitkfiftt*ttttkttttttt*ttttit'*tttfikifit'tfi

550

JSR
.WORD

NESTING LEVEL

CNTRIN

C(NTRIN A)

MAY ONLY BE CALLED FROM IN-LINE
SUBTEST OR TEST SEGMENT)

ENTRY CONDITIONS

DMRFLG

EXIT CONDITIONS

IN COMMAND

PC,
SCNTIN
(SEL6 - MAINTENANCE MODE & HDX)

(MACRO CALL

2.
3.

2560
2561
2562
2563
2564
2565
2566
2567
2568
2569
2570
2571
2572
2573
2574
2575
2576
2577

12:42

EXPECT

CONTROL OUT

NO CONTROL OUT,

IF NO ERROR - DMR11

TIMEOQUTS REPORTED

CODE

IN DMR MODE

IN DMC MODE OR RESUME.

CONTROL

IN WAIT

(TEST,

IN PERFORMED

SUBROUTINES

THIS IS A DMR MODE START UP CONTROL

THIS ROUTINE WILL WAIT

FOR A CONTROL

IN,

OUT - DMR RUN.
IF THIS CONTROL OUT IS
NOT RECEIVED,
THIS WILL RESULT IN AN ERROR
MESSAGE AND A REMINDER TO CHECK THE BAUD RATE,
INTERFACE AND TURNAROUND (PROBABLE REASON).

[

[
-

REGISTERS DESTROYED

.
4

2223222028223

[

011522
11522
011526
011534
011542
011550

011550
011554

011556
011556

011637

162737
112777

012737
004737
000000
103003

002374

000004
000041
000001

$CNTIN:

002374
170470
002376

MOV

SuB
MOVB

MOV
WAIT

010276

200000228282 0R0SRRRt0RA0RRRARRRRRRRRSRDSS
D

E 02022002000
2R 222 R0RRRdRaRRRRRRR Rt
tRRARsld R

JSR

(SP)
, SUBRP(
;SAVE PC FROM WHERE THIS SUBR. WAS CALLED.
#4 ,SUBRPC
;BACKUP TO PC OF ACTUAL CALL
#RQI+CNTRL ,aBSELO ;SET UP CONTROL IN COMMAND
#1 ,NESTPC
sFLAG THAT THE NEXT SUBROUTINE IS NESTED.
;WAIT FOR SETTING OF RDI
RDI
sxxxx MACRO EXPANSION *xxx
PC, SWAIT
;CALL WAIT ROUTINE

.WORD

BNERROR 1%

062716
000463

000002

017677
062716
032777
001402
005037

000000
000002
00400
002260

ADD

170444

1%:

170432

5%:

MOV
ADD

BIT
BEQ
CLR
WAIT

;FLAG THAT WE'RE WAITING FOR RDI
c

kAR

“IF NO ERROR - PROCEED

L2
2 8 4

BCC

#2,(SP)

sCORRECT RETURN ADDRESS
JERROR - EXIT

d(SP) ,aSEL6

5%
OMRFLG

sSET MODE DESIRED
sINC. RETURN PC LEFT ON STACK.
;WAS MAINTENANCE MODE REQUESTED?
sIF NOT, LEAVE DMRFLG AS IS.
;CLEAR FLAG = NO RUN MODE CONTROL OuT.

RQJ

;CLCAR RQ] AND WAIT FOR RDI

20%

#2, (SP)
HMAINT ,aSEL6

iuxxse MACRO EXPANSION #+w+

TO CLEAR

(2DMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZDMID.P11
29-JuUL-81 11:32

29-JuL-81

004737

010706

011620
011624
011626
011632

005737
001443
005037

002260
002260

BEQ
CLR

011632
011636

004737
000001

010276

011640
011640
011642
011642
011646
011652
011654
011656
011662
011664
011664

JSR

010600
104414
062706
000421

032777
001005

000004
170342

7%:

O NNNNNINNY
NNN

NONUN)
= — —
WN
H o Yo R N\ eTe Yo 0 0

Gaier St G

gnr G

arS

hur G

olelololele BN olololelololele)
Ghier dhur S

WIN

Py Quer Qs G
—

15S1)N]
OO

DMRFLG

WAIT

RDO

JSR

PC,

DMRFLG

srxxx [TACRO EXPANSION sxx«

;CALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDO

SWAlT

.WORD

000410
170324

10%:

:titt

104455

LA R

;1F NO ERROR - PROCEED

#FMS3

JPRINT

15%

BIT

#CNTRL ,@SEL2
108

8.EMG8,ERRGZ

RUN ACKNOWLEDGE

NOT

BCC

RECEIVED.
MOV
MOV
MOV
TRAP
ADD

;DID WE RECEIVE A CONTROL 0OUT?
;1F YES =~ PROCEED.
JEXPECTED CONTROL OUT NOT RECEIVED.

15%

BIT
BNE

#DMRRUN ,@SEL6

15%
9.,EMGY,ERRGZ

;WAS

THE

DMR RUN MODE BIT

:BR IF OK.

;WRONG CONTROL

005037
005037
000207

002376
002374

040445
052522
047173
043504
020124
022456
045
041505
042524
026105
020104
052524

046504
020116
053517
020105
041522

020122
041501
042514
047516
042126

024101
020113
063122
041040
047101
047122

044103
047111
041501
052501
020104
051101

116

170300

15%:

20%:

OUT RECEIVED.

BIC

#RDO.(MD,aSELZ

;CLEAR RDO AND THE COMMAND BITS

CLR
CLR

NESTP(
SUBRP(

.CLEAR THE NEST FLAG
;CLEAR PC

LASCII

/XADMR RUN ACKNOWLEDGE

LASCIZ

/¥A(CHECK

RE TURN

FMS3:

NOT

SP,RO
C$SPNTB

#4,SP

CSERDF
8
EMGS8
ERRGZ

TRAP

CSERDF
9

.WORD
-WORD
.WORD

000207

#FMS3,-(SP)
#1,-(SP)

SET?

000011
020040
015124

042777

TRAP

.WORD
.WORD
.WORD

ERRDF

La
8 &

;WAS DMR MODE REQUESTED ON BASE IN?
;BR IF NOT (DMC MODE)
;CLEAR DMR RUN MODE FLAG
JEXPECT RDO TO BE SET

20%

BR
BNE
ERRDF

017774
015124

000040

SEQ 0057

JCLEAR RQI AND WAIT FOR IT TO BE CLEARED.

$CLRQI

1ST

PRINTE

011746
000001

000001

PAGE 58

BNERROR 7%

104455
000010

032777
001004

PC,

chNRW

103011

012746
012746

12:42

GLOBAL SUBROUTINES

011614

OOgOOOOOOOOO

2601
260¢7
2603
2604
2605
2606
2607
2608
2609
2610
2611
2612
2613

30A(1052)

RCVD.ZIN/

INTERFACE, BAUD AND TURNAROUND)
IN/

EMG9
ERRGZ

(ZDMIDO DMR-11 FUNCTIONAL TESTS MA(Y11
(ZOMID.P11
29-JuL-81 11:32

2657
2658
2659
2660
2661

012052
012060

052517
000116

042116

30A(1052)
29-JuUL-81
GLOBAL SUBROUTINES

(2245
.EVEN

12:42

PAGE 59

SEQ 0058

CZOMIDO DMR-'1
(ZDMID.P11

FUNCTIONAL TESTS MACY11

29-JuL-81

11:32

30A(1052)
29-JJL-81
GLOBAL SUBROUTINES

12:42

§
PAGE 60

SEQ 0059

".'tfi"l’fil"t"*fi'fifiti't'iiti'*'tt'fittttttfltttttfittfi!ttti'tttt.t't""l'
.‘.'i"tt'ttfi'tttfit'tlfi't.'i'ttt.t'fi'*'tittfi!tiitt'ttt't.titttt't'ttt'tt'

SUBROUT INE $DMRIN
.

]

FUNCTION =

TO PERFORM A DMR MODE

CALLING FORMAT:

NESTING LEVEL

[NPUT

COMMAND

JSR
PC,
$DMRIN
.WORD
COMMAND
.WORD
B
.WORD
(
(MACRO CALL =~ DMRIN A,B,()
=~ MAY BE CALLED FROM IN-LINE CODE (TEST,
SUBTEST OR TEST SEGMENT) OR FROM THE $LOOP
SUBROUT INE

ENTRY CONDITIONS - MUST BE
FOR ALL

IN DMR MODE

COMMANDS EXCEPT WRITE

B = SEL4
C - SEL6

MODEM

FOR MODEM WRITE

B = BITS TO CLEAR IN SEL6
C
BITS TO SET IN SEL6
1 ~ SUBROUTINE NESTED WITHIN ANOTHER SUB.
NESTPC
0 - SUBROUTINE NOT NESTED.
EXIT

CONDITIONS =

IF NO ERROR - DMR11 MODE

INPUT COMMAND PERFORMED.

REGISTERS DESTROYED
.'ttttttitttttl’fitttttttttt*'l‘tttttttttt*ttt'ttt*tttt't'ttttttti'tittttt

"!fit"tttttl’t'ttttttttttt'tittttttttttfiitttttittt (2282282002002

012062
012062
012066
012070
012074
012102
012102
012110
012116
012122
012130
012134

005737
001005
011637
162737

002376

117637
117677

000000
000000
000002
000040
002376
000001

062716
052777
013746
012737

002374
000004

012142

012142
012146

DMRIN:

TST

NESTPC

;1S

Sus

#4,SUBRP(C

JBACKUP TO PC OF ACTUAL CALL

002342
170114

MOvB

@ (SP) ,SAVE

;SAVE

170102

ADD

BIS
MOV

#2,(SP)

JINC RETURN PC LEFT ON STACK.

MOV

002374

002376

BNE
MOV

MOVB

1%
(SP) ,SUBRP(

@ (SP) ,aBSELOD

#RQ1,aSELO
NESTPC,~-(SP)

WAIT

RDI

NESTPC

THIS

INPUT

COMMAND

JSET UP DMR INFUT COMMAND,

;REQUEST INPUT.
;SAVE THE CURRENT NEST FLAG.
JUSE

THE FLAG TO SHOW THE WAIT

JROUTINE IS NESTED.

JWAIT FOR SETTING OF RDI
sovnx MACRO EXPANSION sxne

JSR

PC, BWAIT
.WORD
0

012637

002376

MOv

(SP)+ ,NESTP(

JRESTORE

000004

ADD

#4, (SP)

;UPDATE

062716

SUBROUTINE NESTED?

DMR

010276

BNERROR 5%

;IF YES - DON'T CHANGE
SUBRPC.
;SAVE PC FROM WHERE THIS SUBR. WAS CAILED.

004737
000000

103003

ddRsld

;CALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDI
".fi'!’

THE ORIGINAL NEST FLAG.

;1F NO ERROR, OK - PRCCEED.
RETURN ADDRESS.

B(C

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZOMID P11
29-JuUL-81 11:32

2718
2719
2720
2721
2722
2723
27264
2725
2726
2727
2728
2729
2730
2731
2732
2733
273

2735
2736
2737
2738
2739
2740
2741
2742
2743
2764
2745
2746
2747
2748

2749

#WMODEM, SAVE

170034

MOV

;IS THIS A MODEM WRITE?
;IF YES ~ SET/CLEAR BITS.

170024

ADD
MoV

#2,(SP)
@ (SP) ,aSELS

ADD
BR

#2,(SP)
7%

BIC
ADD
BIS

a(SP) ,aSEL6

002342

000000

012202
012206

062716
017677

000002
000000

012214
012220
012222
012222
012230
012234
012242
012246
012246

062716
000412

000002

047677
062716
057677
062716

000000
000002
000000
000002

012270

005737
001002
005037

002376

005037
000207

002342

002374

SEQ 0060

CMP8
BEQ

000005

012252
012252
012256
0122€0
012264
012264

PAGE 61

JERROR EXIT.

122737
001413
017677

010706

108

000432

004737

12:42

012162
012164
012164
012172
012174

012246

30A(1052)
29-JUL-81
GLOBAL SUBROUTINES

170010

5%:

6%:

167776
7%:

d(SP) ,aSELS

;PASS VALUE FOR SEL4 (VALUE, IF ANY,
;DEPENDS ON THE DMR COMMAND)
;INC., RETURN PC LEFT ON STACK.
;PASS VALUE FOR SEL6 (VALUE,

;DEPENDS ON THE DMR COMMAND)
JINC. RETURN PC LEFT ON STA(K.

ADD

#2,(SP)

;CLEAR MODEM BITS
JINC. RETURN PC LEFT ON STA(K
;SET MODEM BITS
JINC. RETURN PC LEFT ON STA(K.

WAIT

RQ]

;CLEAR RQ] AND WAIT FOR RD]

JSR

PC,

TST
BNE
(LR

NESTP(C

15%

SUBRP(

;BR IF YES
;CLEAR P(C

CLR

SAVE

JRESTORE

10%:

15%:

RE TURN

#2,(SP)

8 (SP) ,aSEL6

JNNAN

$CLRQI]

MACRO

EXPANSION

annw

ANY,

10 CLEAR

;CLEAR RQJ] AND WAIT FOR IT TO BE CLEARED.
:ltfit

JWAS

LA A2

THIS ROUTINE

NUSTED?

TEMP VALUE

—

29-JUL=81

12:42

GLOBAL SUBROUTINES

5
PAGE 62

SEQ 0061

:""'t"."l.."'t'.t."'t....'tlfi.t’..'.tt.ttttti'..tfltt""t't't."

suB ROUTINE $BA(CC
TO PERFORM A BUFFER ADDRESS/CHARACTER

FUNCTION -

COUNT

IN COMMAND

2755
2756
2757
2758
2759
2760
2761
2762
2763
2764
2765
2766
2767
2768
2769
2770
2771

;.."Q'.t.'t".itt".""t""t"..t""tt'."t."'t'.ttfi.t".t"t.'*'

2750
2751
2752
2753
2754

30A(1052)

CALLING FORMAT:

JSR
.WORD
.WORD

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.PI
29-JuUL~-81 11:32

.WORD

SEL6

$BAC(
;BA/CC IN COMMAND
;BUFFER ADDRESS

;BA BITS 16 & 17 AND
. CHARACTER COUNT

(MACRO CALL == BACCIT
(MACRO CALL == BACCIR

MAY ONLY BE

NESTING LEVEL

PC,
SELO
SEL&

OR
OR

CALLED FROM IN-LINE

SUBTEST OR TEST SEGMENT)

BACCIT A,B)
BA(CCIR A.B)
CODE

(TEST,

ENTRY CONDITIONS

EXIT CONDITIONS

IF NO ERROR - DMR11

BA/CC COMMAND

IN PERFORMED

NOT AFFECTED

REGISTERS DESTROYELD

::ttttt**ttttttit*tittitttitt*ttttttttttittttktfittfitt*t'tt**'ttttttttt.

':ttttt*tt*ttt*tti*t'tit"iitt*itttttit*k****tfittttttttttttttt'ttt't'tt

012272
012272
012276
012304
012312
012316
012324

012324
012330

012332
012332
012334
012240
012342
012342
012350
012354

011637

162737
117677

062716
012737
004737
000000
103003

002374

000004
000000
000002
000001

$BACC:

002374

167720

002376

010276

MOV
SuB

(SP)
, SUBRP(

#4 , SUBRP(

a(SP) ,aBSEL 0
#2,(SP)

mMovs
ADD
MOV
WAIT

#1 ,NESTPC
RDI

JSR

PC,

SWAIT

.WORD

;SAVE PC FROM WHERE THIS SUBR. WAS CALLED.
;BACKUP TO PC OF ACTUAL CALL

;SET UP BA/CC COMMAND IN (TRANSMIT OR RECEIVE)

:INC POINTER ON STACK
;FLAG THAT THE NEXT SUBROUTINE IS NESTED.
JWAIT FOR SETTING OF RDI
sxxxx MACRO EXPANSION =xxxx

s CALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDI
*khkkN

“IF NO ERROR - PROCEED

BNERROR 108
ADD
BR

#4, (SP)

;CORRECT STACK FOR ERROR EXIT.
JEXIT

MOV
ADD
MOv

d(SP) ,aSELS
#2,(SP)
a(SP) ,ASELE

;SET BUFFER ADDRESS

000002

ADD
WAIT

#2,(SP)

010706

JSR

PC,

062716
000414

000004

017677
062716
017677

000000
000002
000000

012362
012366

062716

012366

004737

167666

108
:

167656

20%

RQI

$CLRQI

005037
005037

002376
002374

20%:

(LR
CLR

NESTPC
SUBRP(

BCC

10%

s INC POINTER ON STACK
sSET UP BUFFER COUNT AND BUFFER ADDRESS

;BITS 16 £ 17
s INC POINTER ON STACK
;CLEAR RQ] AND WAIT FOR RDI TO CLEAR
sxxxx MACRO EXPANSION wxxx

;CLEAR RQ] AND WAIT FOR IT TO BE CLEARED.
:tttt

012372
012372
012376

L2
& & 4

;CLEAR THE NEST FLAG
;CLEAR PC

KAk N

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.PIN

29-JuL-81

2806

000207

012402

11:32

29-JuUL-81

GLOBAL SUBROUTINES
RETURN

12:42

PAGE 63

SEQ 0062

CZDOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)

CZDMID.P11

29-JuL-81

11:32

29-JUL-81

GLOBAL SUBROUTINES

2807

2808

2809

12:42

R R NN R R R R AN

RN RN AN AN R AR R AN

AR AN

;

5
PAGE 64
R R R AR

SEQ 0063
AR R R R R RN N R R AR RN RN AR AR AR AN

RN R AN AR R AN

RN RN RANA AN AR

A RAN AN AN

RN R AN RS

Sg}?

2812

%g}z

;

CALLING FORMAT:

%g}g

NESTING LEVEL

2819
2820

;
;

ENTRY (ONDITIONS - SHOULD BE DONE AFTER PROPER SHUTDOWN
NESTPC = 1 = SUBROU INE NESTED WITHIN ANOTHER SUB.

2823
2824
2825
2826

.
.
:
:

EXIT CONDITIONS - IF ANY NON-ZER0D VALUE FOUND IN THE BASE TABLE A
SOFT ERROR IS DECLARED.

2829

:-:tttttttttttt*ittttA'tttttttttttttttttttttttttttttttttttttttttttttttt'i

58}2

;

Sggg

2834
2835

2836
2837
2838
2839
2840
2841
2842
2843
2844
2845
2846
2847

2848
2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860

2861
2862

FUNCTION -

ggg;

2830
2831
2832
2833

SUBROUT INE $ERROR

012404
012404
012410

012412
012416

012424
012424
012426
012430
012434
012440
012440
012442
012444
012446
012450

012452
012454
012462
012464
012472
012474
012476
012500
012502
012502
012506
012510
012510

005737
001005

011637
162737
010046
010146
012700
012701

105720
001022
005301
001374
122010
001016
022737
001407
022737
001403
105710
001004
000407
122710
002004

002374
10%:

002643
000006

20%:

000022

002114

000016

002114

000001

JSR

PC,

$ERROR

-~ CAN BE NESTED WITHIN ANOTHER ROUTINE

= 0 - SUBROU INE NOT NESTED.

REGISTERS DESTROYED - RESTORED

N AR AR AR IR AR AR AR AR AR A AR R RN AR R AR RN AN R NARRA AR R AR RN R
$ERROR:
TST
NESTPC
;1S THIS ROUTINE NESTED?
BNE
108
;BR IF YES (PC ALREADY SAVED)

002376

002374
000004

TO CHECK THE FIRST B. BASE TABLE ERROR COUNTS

FOR NON=-ZERO VALUES.

25%:

30%:

R ANRNR RN

MOV
SuB

(SP) ,SUBRP(C
#4 ,SUBRP(C

;SAVE PC AFTER THE CALL TO SWAIT.
;BACKUP TO THE PC OF THE ACTUAL CALL

MOV
MOV
MOV
MOV

RO,-(SP)
R1,-(SP)
#BASE+3,R0
#6. ,R1

;SAVE RO
;SAVE R1
JPOINTER TO ACTUAL BASE TABLE COUNTS.
JCHECK THE 6 NAK BYTES IN THE TABLE

TSTB
BNE
DEC
BNE
CMPB
B8NE
(MP
BEQ
CMP
BEQ
TSTB
BNE
BR

(RO) +
308
R1
208
(RO)+, (RO)
30%
#18. ,LSTEST
25%
M4, LSTEST
25%
(RO)
30%
40%

;IS THE NAK COUNT NON-ZERO?
;IF YES = REPORT SOFT ERROR
;LOOP UNTIL DONE.

CMPB
BGE

#1,(RO)
40%

;IS THE REP 0 OR 1?
;IF YES = OK (WE ALLOW 1 REP BECAUSE
JIN TEST 18 AT LOW BAUD RATES 1 REP IS
JEXPECTED.)

ERRSOFT 5,EMS3,ERRGS

JTHE INSTRUCTION AFTER THE CALL.

;ARE THE REPS THE SAME?
:IF NOT = REPORT ERROR.
;IS THIS TEST 18 (LARGE BUFFER TEST)
;JIF YES - ALLOW 1 REP
;IS THIS TEST 14 ?
J1F YES - ALSO ALLOW 1 REP.
;IF NOT TEST 18 -~ REPORT IF NON ZERO.
;1F ZERO - OK.

JREPORT SOFT ERROR

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
CZDMID.P1
29-JuL-81 11:32
GLOBAL SUBROUTINES

2863
2864
2865

012510
012512
012514

2866
2867
2868
2869
2870
2871
2872
2873
gg;g

012516
012520
012520
012524
012526
012532
012532
012534
012536

2876
2877
2878

012540
012546
012554

2879

104457
000005
012540
015470
005737
001002
005037

PAGE 65

SEQ 0064

TRAP
.WORD
.WORD
4C$:

002376
002374

45%:

012601
012600
000207

040502
041101
051122

12:42

042523
042514
051117

052040
042440
000123

EMS3:

.WORD

TST
BNE
CLR

NESTPC
45%
SUBRP(

;1S THE ROUTINE NESTED?
:BR IF YES
;CLEAR SAVED PC

MoV
MoV
RETURN

(SP)+,R1
(SP)+,R0

JRESTORE R1
JRESTORE RO

,ASCIZ

/BASE TABLE ERRORS/

.EVEN

(SERSOFT
5
EMS3
ERRG4

30A(1052)
29-JUL-81
GLOBAL SUBROUTINES

12:42

S
PACE 66

SEQ 0065

;tQt.ttttttlt'tttttttttttttfittttt*ttti*ttfitt.Q'.tfittt'tttitt'*'i'.ttit

;.tt'tttt.ttttttttittiittttttttittttt*kfittttt**ttttt'i**ttttt.tttttt*'

SUBROUTINE S$HALT

0.0,

08,

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P11
29-JuL-81 11:32

TO SHUTDOWN THE DMR11

0w,

FUNCTION =

EXIT CONDITIONS

= DMR SHUTDOWN

REGISTERS

- NO EFFECT

012562
012562
012566
012574
012602
012606
012614

002374
000004
000042
167426
000001

012614
012620

®s

8.8,

ENTRY CONDITIONS - NONE

;*tttt**ttttlttttt*tti*tttttt*t***tfifi*tt*t*tt*tt*t**tt**tfii**t*tt*tti*

ASESESS RSS20t

$HALT:

002374

167430

002376

010276

RRARRRRERRRRR

MOV
SUR
MOVB

(SP) ,SUBRP(C
#4 ,SUBRPC
#RQI'HLT,aSELOD

MOV
WAIT

#1 NESTPC
RDI

JSR

PC, SWAIT
.WORD
0

CLRB

QSEL?2

R0t

REte0

R0t

103430

012624

004737

010706

103475

012632
012636

004737
000001

012640
012640
012642
012650
012652

012652
012654
012656
012660
012662
012664
012664
012672
012674
012674
012676

103421

032777
001005

010276

000001

167364

104455
000004
012724

015124
000410

032777
001004
104455

000004

001000

167346

R2d

;FLAG THAT WE'RE WAITING FOR RDI
KRNk

20%

;IF ERROR, EXIT

WAIT

RQ]

;CLEAR RQ] AND WAIT FOR RDI TO CLEAR

JSR

PC, $CLRQI

BCS

20%

sxxxx MACRO EXPANSION *w%xx

;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.
xhkKK

BERROR

20%

:IF ERROR, EXIT

WAIT

RDO

JSR

PC, SWAIT

;WAIT FOR RDO
sxxxx MACRO EXPANSION w*xx

s CALL WAIT ROUTINE

BERROR

.WORD

;JWAIT FOR RDI
sxxxx MACRO EXPANSION *xwx

sRN AR

012630
012630
012632

;SAVE THE PC WHEN THE SUBROUTINE WAS CALLED.
;BACK UP TO THE ADDRESS OF THE ACTUAL CALL.
;ISSUE A HALT
:CLEAR _ANY QUTPUT PENDING
;FLAG THAT THE NEXT SUBROUTINE IS NESTED.

;t*t*

012622
012622
012624

8CS

20%

8CS

20%

TRAP
.WORD
.WORD

CSERDF
4
EMS4
ERRGZ2

s CALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDO
:t*it

L35

BERROR

20%

;IF ERROR,

8IT
BNE
ERRDF

#CNTRL ,@SEL?2
10%
4 ,EMS4 ,ERRGZ2

;IS THIS A CONTROL OUT?
:IF YES - PROCEED

20%

8IT
BNE
ERRDF

#HALTC,aSELG
208
4 ,EMS4 ERRG?2

EXIT

;ERROR

.WORD

;1S THE DMR HALTED?

JIF YES - EXIT
+ERROR = NOT EXPECTED CONTROL OUT.

TRAP

.WORD

(SFRDF

29-JuL -81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
GLOBAL SUBROUTINES
CZDMID P
29-JuL-81 11:32

2937
2938
2939
2640
2941
2942

2943

2944
2945
2946
2947
2948

012700
012702
012704
012704
012712
012716
012722

012724
015124
042777
005037
005037
000207

000207
002376
002374

167322

012724
012732
012740

064123
0647127
051117
012744

052125
042440

047506
051122

12:42

6
PAGE 67

SEQ 0066
. WORD
.WORD

000

8IC
CLR
CLR

#RDO!(CMD,aSEL2
NESTP(
StBRP(

LASCIZ

/SHUTDOWN ERROR/

RETURN

EMS4:

LEVEN

;CLEAR RDO AND COMMAND BITS.
;CLEAR THE NEST FLAG
;CLEAR THE PC.

EMS4

ERRG2

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11

29-JuL-81

11:32

29-JuL-81

GLOBAL SUBROUTINES

2949

2950

KRR

2951

RN AR

AR A AR A AR

12:42
R

AR AR AN AN AR AN AN

SEQ 0067

AN R AR R AR AR A AN

;

PAGE 68
AN AN AR AR AN R AR AR

R AR A RN AR AN AN AR AN R AR R

RR AN

AR R AR AR AR A RN R C RN RN AN RN

Sgg%

%ggg

;

gggg

;

ENTRY CONDITIONS - ROMADR =

ROM ADDRESS

%ggg

;

EXIT CONDITIONS

- BSEL6

(ONTENTS OF

2960

REGISTERS

- NO EFFECT

2963
2964

AR
IR

IR AR R R R A AR AR AR R AR RN AR AR RR RN R R RA AN RN AN AR R IR R AN A RA RN R RN AN NS
AR
AR AR AR AN R RPN R R R AN R AR R AR RN R R AN RN R AR RN AR R NR R AR SRR R RN RS

2961
2962

2965

:
:
012744

$ROMO:

FUNCTION = TO READ

THE

CONTENTS OF

2966

012744

005077

113777
052777
012777

002413
001000
121053

67256
167246
167246

MOvB
8IS
MOV

CLR

aSELOD

JINIT

2977

012772
013000
013008
013014
013022

052777
042777
042737
153737
052777

000400
001400
000377
002412
001000

167232
167224
013062
013062
167202

BIS
BIC
BIC
BISB
BIS

#ROM] ,aSELO

;ENABLE SEL6

2967
2968
2969
2970
2971
2972
2973
2974
2975
2976

2978

2979
2980
2981
2982
2983

2984

2985
gggg

2988
2989

012750
012756
012764

013030

013777

167262

SUBROUTINE $ROMO

013062

167202

MOV

013036

052777

000400

167166

8IS

(013044

042777

001400

167160

BI(

013060

i
000207

013062

100000

013052

052777

002000

167152

81S

ROMADR+1,aSEL2
#ROM] ,aSELO
#121053,aSEL6

.WORD

ROM

ROM ADDRESS

;SET HIGH BYTE OF ROM ADDRESS
JENABLE SEL6 TO BE USED AS MAINTENANCE REG.
JSET UP MICROINSTRUCTION TO
JMOVE IBUS~ 2 TO OBUS+~ 13
;(0BUS* 13 IS A SHADOW REGISTER FOR
;BITS 8-11 OF THE PC)
#STUP,aSELO
;CLOCK THE INSTRUCTION
#ROM] !STUP,QSELO ;CLEAR
#377.1%
;CLEAR ADDRESS FIELD OF BRANCH INST,
ROMADR, 1%
;ADD ADDRESS OF BRANUH.

1%$,aSEL6

JSET UP MICROINSTRUCTION TO

;BRANCH IMMEDIATELY TO PC.
BRANCH IS
JNECESSARY TO TRANSFER PC SHADOW REG TO PC
#STUP,aSELO
;CLOCK THE INSTRUCTION
;ROM PC = ROM ADDRESS
#ROM] !'STUP ,aSELO ;CLEAR

#ROMO,SELOD

RETURN
1%:

THE

100000

;CLOCK IN A MAINTENANCE ROM OUT

;ROM CONTENTS ARE NOW IN SEL6.

;MICRO INSTRUCTION OPCODE FOR IMMEDIATE
;BRANCH (ROM ADDRESS 1S ADDED INTO BITS 0~7)

——e

CZOMIDO DMR-11_FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuL-81 11:32
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010

30A(1C

)

12:42

29-JuL-81

GLOBAL SUBROUTINES

SEQ 0068

PAGE 69

::ttttt*tt'tttfitttttl'*tttttttttttt'*t'ttiitittttfitttittttfittittttt.'tt
::*t*tt*ttt**tt*ttt*it*itt'ti*!t*itt*iititt't*ttttitt*t'tttfit"'fit'i'i'

SUBROUTINE $LOOP

]

FUNCTION - TO ISSUE AN EXTENDED CONTROL IN TO SET
UP THE MODEN LOOPBACK DESIRFD BY THE USER.

]

[

ENTRY CONDITIONS -

[

WMAINT = 0 - DON'T WRITE MAINT. BITS
WMAINT = 1 - SET BITS
(WMAINT SET IN INIT CODE)

EXIT CONDITIONS

REGISTERS

[]

]

DMCMDE = 0 - DMR MODE
DMTURN = TURN AROUND CONNECTOR

NOT DESTROYED

4
.

013064
013064
013070

013072
013076
013100
013104
013112
013120
013122
013130
013136
013140

013140
013146
013154
013154
013162
013166
013170
013172
013174
013174
013200
013204

$LOOP:

005737
001041
005737
001436

002276

162737

000004
000006

002374
002254

000004
000010

013170
013172

011637

022737
001007
012737
012737
000406

002306

002374

2222822202220

2222323022320

TST
BNE
TST
BEQ

MOV
SUB

10%:

CMP
BNE
MOV
MOV
BR

00000200t RtRR0dRRRtR0RRRdRtttRRaRRRRRdRRtldl
R

RRRR0R0R2RARS

30%

(SP) ,SUSRP(
#4 ,SUBRP(

#LLOOP ,DMTURN

108
#MAINTZ2,100%

20%

MOV
MOV

AMAINT1,100%
AMAINTZ2,101%

012737

000001

002376

MOV

#1 NESTPC
$DMRIN

.WORD

.WORD
.WORD

002376
002374

CLR
CLR

RE TURN

RRRARRRRRRRdRsE

]

;IN ALL OTHER LOOPBACK CONFIGURATIONS
;SET MAINTENANCE 2 (CONFIG. TYPE 1,3,7)
sENSURE REMCTE LOOPBACK IS CLEAR.
;SET MAINT BIT FOR REMOTE LOOPBACK

WMAINT

013170
013172

005037
005037
000207

#MAINT1,1018

30%

000010
000004

000005
000000
000000

R2R020

THE DMR IN DMC MODE?
SO, EXIT (CAN'T DO DMR MODE INPUT)
WE NEED TO WRITE THE MAINTENANCE BITS?
NOT - EXIT.
;SAVE THE PC AFTER THE CALL TO $LOOP
;BACKUP TO THE PC OF THE ACTUAL CALL.
;1S LOCAL MODEM LOOPBACK DESIRED?
;IF NOT - PROCEED.
JENSURE REMOTE LOOPBACK IS CLEAR.
;SET MAINT BIT FOR LOCAL LOOPBACK

DMCMDE

012737
012737

CALL

NESTP(
SUBRP(

WMODEM

0
O

;1S
;JIF
;DO
JIF

sFLAG THAT

THE NEXT SUBROUTINE

IS NESTED.

;DMR MODE INPUT COMMAND
;WRITE MODEM COMMAND
;PITS TO CLEAR IN MODEM REGISTER
;BITS TO SET IN MODEM REGISTER
;CLEAR THE NEST FLAG
;CLEAR PC.

29-JUL-81
(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(i052)
GLOBAL SUBROUTINES
CZOMID.P1
29-JuL~81 11:32

12:42

6
PAGE 70

SEQ 0069

':ttt*ttt"fit'fi'i'ittt""'tttttttt'fittfitt'ttttttttfittt'ttttitti.'ttttt

':t'fittfiitttifit'ttt"tiQ'itt'fi'ifi'fltt.‘Qt'ttittttt'ttttttttittltttttt't

I
TN I

SUBROUTINE $BUFFS
TO DETERMINE BUFFERS FOR TEST 15 = 19,
THIS
SUBROUTINE WILL USE ONE OF THE FOLLOWING

FUNCTION

TRTETE FE T

THREE BUFFER AREAS:

IF MEMORY MANAGED, 32K - 48K
FREE MEMORY, IF MORE THAN 4% BYTES.
IF 2 OR 3 NOT POSSIBLE, DEFAULT 4K

DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

1.
2.
3.

- JSR

PC,$BUFFS

CALL

CALLED ONLY BY TESTS

16-20

NESTING LEVEL

LI
I
I I

ENTRY CONDITIONS - BUFNUM = # OF RCV & XMIT BUFFERS
EXIT CONDITIONS

=~ MMANAG = 1

MMANAG = 0
RCVBUF
=

MEMORY MANAGEMENT USED

MEMORY MANAGEMENT NOT USED
ADDRESS OF RECEIVE BUFFER (VIRTUAL)

RCVBUF+2 = CHARACTER COUNT
RCVBUF+4 = ADDRESS OF NEXT RECEIVE BUFFER
(UP TO 64 ADDRESSES AND COUNTS)

;
H
H

(VIRTUAL)

)

XMTSUF
=
ADDRESS OF TRANSMIT BUFFER
(UP TO 64 ADDRESSES AND COUNTS)

~ NOT DESTROYED

REGISTERS

:tttttttttRttttt*ttt**t*ti'ttttttt*fititt*ttifitttttt*ttttttttt*'tttti"

':ltttt*itrttt*ttttt*ttti't*tttttfitfi*ttttktt‘fit**t**tttttt**itttttttt't

013206
013206
013212
013220
013224
013224
013230
013234
013240
013244
013246
013252
013256

011637

002374
000004
002352

012746
012746
012746
012746
104437
062706
005737
005737

000340
023630
000004
000003

162737
005037

$BUFFS:

002374

suB
CLR
SETVEC

(SP) ,SUBRPC

#4 , SUBRP(
NXMF LG

;SAVE PC AFTER THE CALL TO $BUFFS
;BACKUP

THE

#4 ,ANOXMEM, #PRI0O7 ;SET UP TRAP 4

THE

(WILL

CALL.

SET

FLAG FOR NXM)

MOV

MOV
MOV

MOV

000010
177572

TST

002352

TST

013262
013264

001143
023727

002120

003000

013272
013274
013302
013302
013306

002537
012737

000001

002302

012700

000340

104441

MOV

BNE
cMP

BLT

MOV
SETPRI

aR177572
NXMFLG

308

LSHIMEM, #3000
30%

#1 ,MMANAG
#PR107

;ADDRESS MEMORY MANAGEMENT REG

;IS THE FLAG STILL CLEARED?
sNOTE: THE FLAG WILL BE SET BY

TRAP
ADD

THE

;IF THERE IS NO MEMORY MANAGEMENT.

#PRIO7 ,-(SP)

H#NOXMEM
- (SP)
#4,-(SP)
#3,-(SP)
CSSVEC
#10,SP

TRAP

;BR TO USE NON-MEMORY MANAG. BUFFERS.

;IS THERE AT LEAST 48K WORDS? (16K WORDS
;FOR BUFFERS)

s1F NOT, USE NON-MEMORY MANAG. BUFFERS.
;FLAG THAT MEMORY MANAGEMENT IS USED
JMAKE SURE WE ARE IN KERNEL MODE.

MOV

TRAP

#PR107,RO
($SPR]

——

CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.PI

29-JuL-81

11:32

29-JuL-81

GLOBAL SUBROUTINES

12:42

3096

3097
3098
3099
3100
3'01
3102
3103
3104
3105
3106
3107
3108
3109
3110
3111
3112
%}}2

sSETTING PRI

013310
013314
013320
013320

012707
012700

172300
000010

012721

077406

013324
013326
073330
013334
013336
013344
013352
013360
013366
013374
013402

005300
001374
012701
005011
012761
012761
012761
012761
012761
012761
012761

000200
000400
002000
002200
002400
002600
007600

3115
3176
3117
3118
%}}8

013410
013414

012703
012704

000400
060000

8}%252

012737

000001

3121
3122

013426
013432

012701
012702

000040
002420

3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138
%}28

3141
3142
3143
3144
3145
3146
3147
3148
3149
3150
3151

PAGE 71

013436
013436

108:

172340
000002
000004
000006
000010
000012
000014
CO00016

177572

16%:

012224

013440
013444
013446
013450
013452
013454
013456
013462
013462
013464
013470
013472
013474
013476

005737
001050
005301
001372
005303
001364
012701

013502
013510
013516
013524
013526
013534
013536
013536
013544
013546
013554

012737
012737
022737
001004
012737
000525

060000
120000
000001

003240
003640
002324

037777

002322

022737
001004
012737
000515

000007

002324

004000

002322

005024
005737
001036
005301
001372
005037

15¢

002352

020000

17%:

002352

177572

20%:

SEQ 0070
SHOULD SHOULD ALSO CLEAR

;BITS 14 & 15
;GET ADDRESS OF KERNEL PDR REG O.
JWRITE PDR REG 0-7.

MOV
MOov

#172300,R1
#8. RO

Mov

#77406,(R1)+

DEC
BNE
MOV
CLR
MOV
MOV
MoV
MoV
MoV
MoV
MoV

RO
10%

#172340,R1
(R1)
#200,2(R1)
#400,4(R1)
#2000,6(R1)
#2200,10(R1)
#2400,12(R1)
#2600,14(R1)
#7600,16(R1)

;ADDRESS OF KERNEL PAR
;PAR 0, ADDRS
0 ;PAR 1, ADDRS 20000 ;PAR 2, ADDRS 40000 ;PAR 3, ADDRS 200000 ;PAR 4, ADDRS 220000 :PAR 5, ADDRS 240000 ;PAR 6, ADDRS 260000 ;PAR 7, ADDRS 160000 -

MoV
MCv

#256. ,R3
#60000,R4

MoV

K1,88177572

;COUNTER FOR OUTER LOOP OF TEST PATTERN
;USE VIRTUAL ADDRESS TO MAP TO PAR 5
;GENERATE A TEST PATTERN IN THE 1ST 8K WORDS
;VIRTUAL ADDRESS 60000 - 111776
;ENABLE MEMORY MANAGEMENT

MoV
MoV

#32. ,R1
HSCCITT ,R2

;COUNTER FOR INNER LOOP OF TEST PATTERN
;ADDRESS FOR 32. WORD TEST PATTERN.

Mov

(R2)+,(R4)+

TST
BNE
DEC
BNE
DEC
BNE
MoV

NXMFLG
29%
R1
16%
R3
15%
#20000,R1

JWRITE TEST PATTERN
;PHYSICAL ADDRESS 200000 - 237776
JFLAG WILL BE SET IF WE ADDRESS NXM.
;1F NXM - DON'T USE MEMORY MANAGEMENTM.
;DO TH INNER LOOP 32. TIMES

CLR
TST
BNE
DEC
BNE
CLR

(R4)+
NXMFLG
29%
R1
17%
k177572

;CLEAR VIRTUAL ADDRESS 120000 - 157776
;DOES AN NXM TRAP OCCUR?
;IF SO DON'T USE MEMORY MANAGEMENT.

MoV
MOv
CMP
BNE
MOV
BR

#60000,XMTBUF
#120000,RCVBUF
41 ,BUFNUM
208
#37777 ,BUFS1Z
60%

;VIRTUAL ADDRESS OF XMIT BUFFER
;VIRTUAL ADDRESS OF RCV. BUFFER
;1S THERE ONLY 1 XMIT & RECEIVE BUFFER?
;IF NOT, BR
;EACH BUFFER IS 16K BYTES

(MP
BNE
MoV
BR

#7 ,BUFNUM
21$
#4000,BUFSIZ
60%

JARE THERE 7 XMIT & RECEIVE (14 TOTAL BUFFER)?
;IF NOT - MUST BE 64 BUFFERS
JEACH BUFFER IS 2K BYTES

JWRITE BiTS FOR THE FOLLOWING PAGE DESCRIPTION
;READ/WRITE ACCESS, 128. BLOCK PAGE LENGTH.
;WRITE ALL PDRS.

;DO THE OUTER LOOP 256.

17776
37776
57776
217776
237776
257776
277776
677776

(BUFFER PAGE
(BUFFER PAGE
(BUFFER PAGE
(BUFFER PAGE
(1/0 PAGE)

1)
2)
3)
4)

TIMES

;COUNTER TO CLEAR THE NEXT 8K WORDS

;TURN OFF MEMORY MANAGEMENT

013556
013556
013564
013566
013566
013572
013572
013576
013576
013602
013604
013604
013606

0O NN

b
b ed
b
b

3200

012737

000376

005037

177572

005037

002302

012700

000004

000511

104436

013614
013616
013622
013624
013630
013632
013632
013640
013644
013644
013652

003406
010237
011200
042700
000405

013734
013742
013744
013746
013752
013752
013756
013762

29%:
30%:

104431

021227

013660
013666
013670
013676
013700
013702
013704
013706
013710
013710
013714
013714
013716
013720
013722
013722
013726

002322

12:42

002000

003240

#376,BUFSIZ
60%

JEACH BUFFER

CLR

a177572

JTURN OFF MEMORY MANAGEMENT

CLR
CLRVEC

MMANAG

sFLAG THAT MEMORY MANAGEMENT NOT USED.

MEMORY

CMP

aR?2,#2000

BLE

35%
R2, XMTBUF
aRZ,RO
#3170,RO
40%

BIC

012737
012700

004240
002000

003240

013737
06003/
010001
022737
001415
022737

003240
003640

003640

000001

002324

000007

00232¢

001004
006201
006201
006201
000405

012704

002322

042737
006200
010001
013702

000001

002322

012703
012704

002420
000040

50%:

51%:

JRESTORE

IS 254.

BYTES.

TRAP 4.

MOV

TRAP

44 RO

CSCVEC

;FIND THE FREE MEMORY AVA'LABLE BETWEEN
TRAP
CSMEM
MoV
RO,R2

;THE DIAGNOSTIC AND THE DRS (SUPERVISOR).
;1S THERE AT LEAST 1K WORDS? (NOTE: CONTENTS
;OF THE RETURNED ADDRESS OF THE START OF FREE
;MEMORY CONTAIN THE AMOUNT OF AVAILABLE MEM.)
;IF NOT AT LEAST 1K, USE DEFAULT BUFFER.
;JUSE THE FREE MEMORY BUFFER.

;SAVE THE WORD SIZE OF THt BUFFER.
;START WITH AN EVEN # OF WORDS.

MOV
MoV

A#B1G3UF ,XMTBUF

;USE THE DEFAULT BUFFER

MoV

XMTBUF ,RCVBUF
RO,RCVBUF
RO,R1
#1 ,BUFNUM
479
#7 ,BUFNUM
45%
g}

;CALCULATE THE RECEIVE BUFFER ADDRESS
;AS STARTING IN THE 2ND HALF OF THE BUFFER.
;BUFFER SIZE IN WORDS.
JARE WE SETTING UP 1 RECEIVE AND XMIT BUFFER?
;IF YES - R1 = BYTE_SIZE FOR BOTH BUFFERS.
JARE WE SETTING UP 7 RCV & 7 XMIT BUFFERS?
;JIF NOT WE MUST NEED 64 R(V & 64 XMIT BUFFERS.
;1 = # BYTES IN THE BUFFERS/8

BEQ
(MP
BNE
ASR

L7%:

002322
000002

ADD
MOV

46%:

010137

J03240

40%:

:
(5%

000007

006201
005304
001375
162737

35%:

SEQ 0071

MOV

MOV
MOV

000001

PAGE

010002

013610

013656

NN
NN NN N

29-JuL-81
0 DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
GLOBAL
SUBROUTINES
P
29-JuUL-81 11:32

ASR
ASR
BR

#2006 ,RO

;1K WORD SIZE.

(1ST HALF

R1
47%

MOV

#7 R4

;DIVIDE BYTES BY 128.

ASR
DEC
BNE

R4
46%

;SHIFT RIGHT

MOV
SuB

R1,BUFSIZ
#2 ,BUFSIZ

;SAVE THE BUFFER SIZE IN BYTES.
;ADJUST BUFFER SIZE BECAUSE WE

BIC
ASR

#1,BUFSIZ

JENSURE WE

START WITH AN EVEN # OF

MOV

H$CCITT,R3
#32. ,R4

;ADDRESS OF
;# OF WORDS

TEST PATTERN
IN THE TEST PATTERN.

MOV
MOV

MOV

FOR XMIT).

RO
RO,R1
XMTBUF ,R?

7 TIMES

;WILL ADJUST BUFFER STARTING ADDRESS.

BYTES.

;# OF WORDS IN ALL XMIT BUFFERS.
;SAVE # OF WORDS IN ALL RCV BUFFERS.
;ADDRESS OF START OF XMIT BUFFERS.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZDMID P11
29-JuL-81 11:32
3208
3209
32°0
321
312
3213
3214
3215

013762
013764
013766
013770
013772
013774
013776
013776
014002
014002
014004
014006

014010
014010
014014
014020
014024
014024
014026
014032
014036
014040
014042
0146044
014050
014054
014060

012312
005300
001403
005304
001373
000766

013702

003640

003640
003640
002324

55%:
56%:

60%:

65%:

002322
002322

SUBROUTINES
DEC
BEQ
DEC
BNE
BR

013700
012701
013702
012703

003240
003240
002324
000004

010021
013711
160321

002322

005703
002002

012703

002322
000001

000004

005302
001357

005037
005037
000207

002352
002374

75%:

PAGE 73

SEQ 0072

(R3)+,(R2)
RO

JWRITE TEST PATTERN INTO ALL XMIT BUFFERS.
JARE ALL THE XMIT BUFFERS WRITTEN?

sCONTINUE WITH TEST PATTERN TILL DONE.

55%

51%
50¢

J1F

YES PROCEED.

;START AT BEGINNING OF

TEST PATTERN.

;ADDRESS OF

CLR
DEC
BNE

+
(R2)

;CLEAR ALL RECEIVE BUFFERS.

RCVBUF ,RO

BUFNUM,R2

MOV
MOV

RO, (R1)+
BUFSIZ,(R1)+

INC
DEC

RO
R2

MOV
MOV
MOV
MOV

MOV
MoV
SUB
ADD
DEC
BNE
INC

RECEIVE BUFFERS

56%

MOV
MOV
MOV

BIT

72%:

RCVBUF ,R2

ADD

70%:

12:42

MOV

BNE

063700
005303
032703
001001
005200

014126
014132
014136

GLOBAL

29-JUL-81

MOV

005022
005301
001375

013700
012701
013702

30A(1052)

#RCVBUF
,R1

BUFSIZ,RO
65%

XMTBUF ,RO

AXMTBUF
,R1

BUFNUM,R?2
#4,R3

RO,(R1)+
BUFSIZ, (R1)
R5,(R1)+
BUFSIZ,RO
R3
#B1T0,R3
72%
RO

;ADDRESS OF RECEIVE BUFFER
;TABLE ADDRESS OF RCV BUFFER POINTERS.
;A OF

RCV.

BUFFERS.

;SAVE THE RECEIVE BUFFER ADDRESS
;SAVE THE BUFFER SIZE
s CALCULATE THE NEXT BUFFER ADDRESS.
s CHANGE EVEN ADDRESS TO ODD & ODD TO EVEN.
;CALCULATE ALL THE BUFFER ADDRESSES.
;ADDRESS OF TRANSMIT BUFFERS
;TABLE OF XMIT BUFFER POINTERS.
JHOF XMIT BUFFERS.

JR3 IS USED TO VARY THE CHARACTER COUNT.
JSAVE THE XMIT BUFFER ADDRESS.
;SAVE THE BUFFER SIZE.
;VARY THE BUFFER SIZE

;CALCULATE THE NEXT BUFFER ADDRESS
;CHANGE THE CHARACTER COUNT VARIABLE.

;1S THE CONTENTS OF R3 ODD
;IF YES, DON'T ADJUST BUFFER ADDRESS.
s CHANGE EVEN TO ODD ETC.
;JWHAT
IS R3.

MOV

R3
75%

#4 ,R3

DEC
BNE

R2
70%

JCALCULATE ALL THE XMIT BUFFERS.

CLR
CLR

NXMF LG
SUBRP(

JRESTORE

TST
BGE

RE TURN

;CONTINUE UNTIL R3 = -1
JRE~INIT.

THE R3 VARJABLE AGAIN.

FLAG USED

;CLEAR PC.

TRAP VECTOR.

—

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
- (ZDMID.PN
29-JuL-81 11:32
3258
3259
3260
3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277
3278
3279
3280
3281
3282
3283
3284
3285
3286
3287
3288
3289
3290
3291
3292
3293

30A(1052)

29-JUL=81

GLOBAL SUBROUTINES

12:42

6
PAGE 74

SEQ 0073

":t!’tttttttt"fi'*!’t'fititit""tttt"fifi'fi*'tt! KRN NARRN AR AN AN

AR AN

":tt*’t'tfififitt"fitfi'tl’i."'t*'tfi'ttfi"t.t'tttt'tttttttitttt.t't.tttt.tt

SUBROUTINE $INOUT
FUNCTION -

ENTRY

TO MANAGE

THE

TO BA/CC OUT

INTERRUPT

IN THE

FROM BASE

INTERRUPT

TESTS

15-19

CONDITIONS - BUFNUM = # OF RCV AND XMIT BUFFERS
ALL BUFFERS SET UP IN
THE $BUFFS SUBROUTINE.
WAIT3
= # OF OUTER LOOP TIMEOUT COUNTERS.
THIS

VALUE

RATE

EXIT CONDITIONS

REGISTERS

2222322282000

IN THE

IS DETERMINED BY

INIT.

SECTICN OF

THE BAUD

CODE.

RO - RS DESTROYED

R2003022REREt2220dR22

2022222222

RRXRRRR

"t**itt*fl'*t*'tfit*ktl’*ttl't*ltttttitiktttttt*ttttttt*kttttttttttttttttt

014140
014140
014144
014152
014160
014166
014174
014202
014210
014214
014220

012737
013737
013737
013737
013737
005037
005037
005037

002374
000004
000001
002324
002324
002324
002324
002354
002356
002272

014224
014230
014234
014240
014244
014244
014250

012702
012703
012704
012705

003640
003240
003640
003240

012700

000200

014252
014260
014266
014266
014272
014272
014272

013737

011637

162737

104441

112777

002316
000143

012701

001000

INOUT:

002374
002376
002326

002330

002332
002334

MOV
SUB
MOV
MOV
MOV
MOV
MoV
CLR

(SP) , SUBRP(
#4 ,SUBRP(
#1 ,NESTPC
BUFNUM, INRCV
BUFNUM, INXMIT
BUFNUM,OUTRCY
BUFNUM,OUTXMT

MoV
MOV
MoV
MOV

H#RCVBUF ,R2

CLR
CLR

SETPRI]

002320
165744

8%:
10%:

104422

INFLAG
OUTFLG
START

#XMTBUF ,R3

H#RCVBUF R4

H#XMTBUF ,R5
#PR104

MOV
MOvVB

WAIT3 WAIT4

MoV

#1000.R1

;sSAVE THE PC AFTER THE CALL TO $LOOP
;BACKUP TO THE PC OF THE ACTUAL CALL.
;FLAG THAT ANY SUBROUTINE USED WILL BE NESTED.
;4 OF BA/CC IN RECEIVES
.4 OF BA/CC IN TRANSMITS
;# OF BA/CC OUT RECEIVES
;# OF BA/CC OUT TRANSMITS
;CLEAR INPUT BA/((C FLAG
s CLEAR OUTPUT BA/CC FLAG
;CLEAR FLAG TO SHOW START UP NOT DONE (SET
sJAFTER CONTROL IN)

;ADDR OF RCV. BUFFER TABLE

(FOR INPUT)

;ADDR OF RCV. BUFFER TABLE

(OUTPUT CHECKING)

;ADDR OF

ADDR OF XMIT BUFFER TABLE
;SET

(FOR

;DMR TO INTERRUPT AT LEVEL S

TO ALLOW THE

MOV

#PR104 ,RO

TRAP

C$SPR]

;TIMEOUT COUNTER DETERMINED BY BAUD RATE.

#IESET!RQI!BASE],aBSELO ;FIRST COMMAND - BASE

IN.

INNER LOOP COUNTER
;OPERATOR

BREAK

INPUT)

(OUTPUT CHECKING)

THE PRIORITY TO LEVEL 4

INTERRUPT ENABLE.

CALL TO
TRAP

C$8RK

;THE SUPERVISOR TO ALLOW CONSOLE INTERRUPT
J(NOTE:

005737
001403
005737
001026

XMIT BUFFER TABLE

002354

TST

BEQ

002356
12%:

TST
BNE

INFLAG
12%
OUTFLG

20%

INFLAG AND OUTFLG SET

sSERVICE ROUTINES)

JARE THE INPUTS DONE?
sIF NOT KEEP CHECKING.
;ARE THE OUTPUTS DONE?
JIF YES EXIT WAIT LOOP.

IN THE

INTERRUPT

(INISR DONE?)
(OUTISR DONE?)

—

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P1
29-JuL-81 11:32

012727
000000
013727

000001

005367
001375
005367
001367
005301
001353
005337
001346

177772

000000

20A(1052)

GLOBAL SUBROUTINES
DELAY

6
PAGE 75

000453

014364
014370
014374
014400
014404
014406
014414
014414
014416
014420
014422
014424
014426
014432
014434
014440
014440
014440
014442
014444
014446
014450
014452
014452

012700
012701
013702
005737
001403
012737
012003
012104
011005
022021
001412
005737
001402
005037

JWAIT 100 MICROSECONDS.

177756
DEC
BNE
DEC

002320

BNE

ERRDF

R1
108
WAIT4

8%
2,EMG2,ERRG1

;CONTINUE IN LOOP UNTIL R1 = 0.

20%:

003640
003240
002324
002302
000001

016164
000420

177572

40%:

41%:

45%:

122324
001005
005305
001374
005302
001353
000411

50%:

# OF

EJFFFRS NOT

60%

JEXIT

MOV
MOV
MOV
TST

#RCVBUF ,RO
#XMTBUF
,R1

JRECEIVE BUFFER POINTER
; TRANSMIT BUFFERS

Mov

MOV
MOV
MOV
CMP

BEQ
TST
BEQ
CLR

ERRDF

BUFNUM,R?

MMANAG
40%

H1,a4177572

(RO) +,R3

(R1)+,R4

aRO,R5
(RO)+,(R1)+

45%

MMANAG

418

a#177572

MOV
.WORD
DEC(

bSDLY,(PC)o

COMPLETE.

TABLE

.=4

=22(PC)
=20

CSERDF
2
EMG2
ERRG1

ADDRESS.

JARE

THE BUFFERS MEMORY MANAGED?

;1F YES - PROCEED.

:TURN ON MEMORY MANAGFMENT

;ADDRESS OF A RECEIVE BUFFER.
;ADDRESS OF A TRANSMIT BUFFER.
s CHARACTER COUNT.
JARE

THE

CHARACTER COUNTS

THE

SAME?

;IF YES - PROCEED.
;1S MEMORY MANAGEMENT TURNED ON?
sIF NOT - SKIP TURN OFF.
;TURN OFF MEMORY MANAGEMENT.

TRAP

JEXIT

(R3)+,(R4)+
508

JARE THE CHARACTERS THE SAME?
o IF NOT - ERROR EXIT
;CHECK ALL THE CHARACTERS

;CHECK ALL THE BUFFERS.

60%

51%

-6(PC)

;¥ OF RCV. AND XMIT BUFFERS.

60%

MMANAG

BNE
DEC
BNE

-WORD
.WORD
.WORD

12,EMG12,ERRG10

RS
45%
R2
40%

002302

61,(PC)0

TRAP

BEQ

002302
177572

MoV

;DECREMENT QUTER LOOP COUNTER
;1F NOT DONE - GO THROUGH INNER LOOP AGAIN.
: TIMEOUT MESSAGE.

;sALSO PRINT

104455
000014
020141

005737
001402

SEQ 0074

002116

017727
014616

014362
014364

014454
014456
014460
014462
014464
014466
014470
014470
014474

12:42

. WORD

1046455
000002

014360

29-JuL-B1

;1S MEMORY MANAGEMENT TURNED ON?
IF NOT - SKIP TURN OFF.

.WORD
.WORD
.WORD

CSERDF

EMG1?2
ERRG10

r—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P11
29~-JuUL~-81 11:32
3370
3371
3372
3373
3374
3375
3376
3377
3378
3379
%%g?

014476
014502
0146502
014502
014504
014506
014510
014512
014512
014516
8}2252

005737
001402
005037

002302

3382
3383
3384
3385
3386
3387
3388
3389
3390
3391
3392
3393
3394
3395
3396

014524
014532
014540
014546

042777
042777
022737
003011

000120
000100
000021

3398
3399
3400
3401

014562
014562
014566

004737
000001

3403
3404
3605

014570
014572
014572

000402

3407

014572

004737

3409
3410
3411

014576
014576
014576

3414
3415
3416

014610
014614

3397

3402

3406

2408

3412
3413

wwwfl
NN IS
»

oMo —_
Wh—O O

3417
3418

005037

177572

30A(1052)
29-JuL-81
GLOBAL SUBROUTINES
51%:

104455
000017
020235
016250

60%:

177572

618
165500
165474
002114

014550
014550

014554
014556
014560

014602
014604

000011
000000
000000

)

012062

6
PAGE 76

SEQ 0075

177572

ERRDF

15,EMG15,ERRG12

TST
BEQ
CLR

MMANAG
61%
aw177572

BIC
BiC
CMP
BGT

MIESET!IECLR,@SELO ;DISABLE BOTH INPUT INTERRUPTS
#1EO,QSEL2
;DISABLE OQUTPUT INTERRUPT
#17.,LSTEST
;1S THIS TEST 17, 18 OR 19 ?
623
;1F NOT - SHUTDOWN.
;NOTE:
;DOING AN UPDATE IN TESTS 17 - 19, ALLOWS
;THE USER TO CHECK OUT REMOTE LOOPBACK BETER.
;A SHUTDOWN WHEN TESTING THE REMOTE LOOPBACK,
;WOULD CAUSE THE CONNECTION TO BE DROPPED.
UPDATE
;D0 A DMR UPDATE.
sexxx MACRO EXPANSION #sax
PC, $DMRIN
cCALL DMR MODE INPUT ROUTINE
.WORD
UPDATE
;INPUT COMMAND
MWORD
O
sNO SEL4
.WORD
O
;NO SEL6

JSR

;TURN OFF MEMORY MANAGEMENT,
TRAP
LWORD
.WORD
.WORD

010276

62$:
012562

000340

002376
002374

WAIT

RDO

JSR

PC, SWAIT
.WORD
1

63%

SHUTDN

JWAIT
sxxxx
;CALL
;FLAG

JRRRR

'35

FOR RDO
MACRO EXPANSION *x*x
WAIT ROUTINE
THAT WE'RE WAITING FOR RDO
KRRK

;SHUT DOWN THE DMR

sxxxx MACRO EXPANSION axwx

JSR

PC., SHALT

SETPRI

#PR107

JRETURN PROCESSOR PRIORITY 10 7

CLR

NESTP(C

;CLEAR NESTED FLAG.

CLR
RETURN

CSERDF
15
EMGI15
ERRG12

;1S MEMORY MANAGEMENT TULRNED ON?
;IF NOT = SKIP TURN OFF.
;TURN OFF MEMORY MANAGEMENT.

IRERR

63%:

012700
104441
005037
005037
000207

CLR

DMRIN
004737

12:42

SUBRP(

;DMR HALT ROUTINE.
JRRNK

;CLEAR PC.

KA KR

MOV
TRAP

#PRIQ7,R0O
C$SPR]

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JUL-81 11:32

29-JUL-81

12:42

6
PAGE 77

SEQ 0076

GLOBAL ERROR REPORT REPORT SECTION

.SBTTL

3424
3425

GLOBAL ERROR REPORT REPORT SECTION

/11111717777 7077777777707777777777/77777777777/77/7/7777/7/7777/77777/77/7/7/7777777777
:/
THE GLOBAL ERROR REPORT SECTION CONTAINS ERROR MESSAGES

3426

3627
3428

3429
3430
3431
3432

30A(1052)

THAT ARE

USED

IN MORE

THAN ONE

TEST.

111111771077 7777777777777777777777777/7777777777777777777777777777777/7/7777777
.EVEN

014616
014616
014616
014616
014622
014626
014632

BGNMSG

013746
012746
012746
010600

002374
016366
000002

062706

000006

014642
014646
014652
014656
014662

017746
017746
012746
012746
010600

165366
165360
016302
000003

014666
014572
014672
014676
014702
014706
014712
014714
014716
014722
014722
014726

062706

000010

017746
017746
012746
012746
010600

165342
165334
016334
000003

062706

000010

013746
012746
012746
010600
104414
062706

002324
017461
000002

013746
012746
012746
010600

002322
017527
000002

014634
014636
014642

014664

014732
014736
014740

014742
014746
014746
014752
014756
014762
014764
014766
014772
014776
015002

015042

104414

104414
062706
005437
005437

PRINTB

005437
005437
063737
063737
063737
063737
013746

002330

#FMG3, SUBRPC

JPC

#FMGT,RSELO,Q5EL2

THAT

;PRINT

ERRGY::

SUBROUTINE WAS CALLED.

SELO AND

SELZ2 CONTENTS.

MOV
MOV

MoV
MOV
TRAP
ADD
MoV
MOV
MoV

MOV

000006

000006
002326
002330
002332
00233,
002324
002324
002324
002324

ERRG1

PRINTB

RFMG2,SEL4G,RSELG

PRINTB

HFMG21,BUFNUM

PRINTB

002326
002330
002332

002334

NEG
NEG
NEG
NEG
ADD
ADD
ADD
ADD
PRINTB

#FMG22 ,BUFSIZ

INRCV
INXMIT

;PRINT

;4 OF

SEL4 AND

SELZ2 CONTENTS.

BUFFERS

;BUFFER SIZE

;NEGATE BUFFER VALUES

MOV
TRAP
ADD

MOV
MOV
MOV
MOV
MOV
TRAP
ADD
MOV
MOV
MOV
MOV
TRAP
ADD

SUBRPC,~(SP)
HFMG3,~(SP)
#2,-(SP)

SP,RO
CSPNTB

#6,SP

@SEL2,=(SP)
@SELO,=(SP)

#FMG1,-(SP)
#3,-(SP)
SP,RO

CSPNTB

#10,SP

aSELG,-(SP)
@SEL4 ,-(SP)
#FMG2,=-(SP)
#3,-(SP)
SP,RO
CSPNTB

#10,SP

- (SP)
BUFNUM,
#FMG21,-(SP)
#2,-(SP)

SP,RO
CSPNTB

#6,SP

MoV
MOV
MOV
MOV
TRAP
ADD

BUFSIZ,-(SP)
#FMG22,~(SP)
#2,-(SP)
SP,RO
CSPNTB

MOV

INXMIT,=-(SP)

#6,SP

OUTRCV
OUTXMT

BUFNUM, INRCV
;CALCULATE BUFFERS ASSIGNED.
BUFNUM, INXMIT
BUFNUM,OUTRCV
;CALCULATE BUFFERS RECEIVED.
BUFNUM, OUTXMT
HFMG23, INRCV, INXMIT

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.PIN
29-JUL-81 11:32
015046
015052

01374¢€
012746
012746
010600

002326
017554
000003

062706

000010

013746
013746
012746
012746
010600

002334
002332
017635
000003

062706

000010

PIONIN)
= b

—

b ad —d

104414

M 6
12:42
PAGE 78
30A(1052)
GLOBAL ERROR REPOFT REPORT SECTION

PRINTB

L10002:

104423

005737
001412

002374

013746
012746
012746
010600

002374
016366
000002

062706

000006

017746
017746
012746
012746
010600
104414
062706

165052
165044
016302
000003

017746
017746
012746
012746
010600

165026
165020
016334
000003

104414

015240
015240
015240
015244
015246

#FMG24,0UTRCV,CUTXMT

ENDMSG

BGNMSG

015230
01523¢
015236
015236
015236

SEQ 0077

29-JuL-81

104414
062706

TST

BEQ

PRINTB

10%:

000010

ERRGZ
SUBRPC
108
#FMG3, SUBRP(

PRINTB

002374

MoV
MoV
MoV
Mov
MOV
TRAP
ADD

MT
. =(SP)
QUTX
OUTRCV,=(SP)
#FMG24 ,-(SP)
#3,-(SP)
SP,RO
CSPNTB
#10,SP

TRAP

CSMSG

MOV
MOV
MOV
MOV
TRAP

= (SP)
SUBRPC,
HFMG3,-(SP)
#2,-(SP)

MOV
MoV
MOV
MOV
MoV
TRAP
ADD

SEL2,-(SP)
@SELO,~(SP)

;IF NOT, DON'T PRINT SUBR. PC
;PC

THAT

SUBROUTINE

WAS

CALLED.

;PRINT

SELO AND SELZ CONTENTS.

HFMG2,RSEL4 ,@SEL6 ;PRINT SEL4 AND SELZ CONTENTS.

MOV
MOV
MOV
MOV
TRAP
ADD

ENDMSG

L10003:
ERRG3
TST
8EQ
PRINTB

SUBRP(
108
#FMG3, SUBRPC

CSPNTB

#10,SP

ERRGZ::
;1S THE ERROR IN A SUBROUTINE?

H#FMG1,SELO,@SEL2

104423

005737
001412

INRCV,=(SP)
#FMG23,-(SP)
#3,-(SP)
SP,RO

ADD

PRINTB

BGNMSG

MOV
MOV
MoV
MOV
TRAP
ADD

ERRG3::
;1S THE ERROR IN A SUBROUTINE?
;IF NOT, DON'T PRINT SUBR. PC
;PC THAT SUBROUTINE WAS CALLED.

TRAP

SP,RO
CSPNTB
#6,SP

#FMG1,-(SP)
#3,-(SP)

SP,RO
CSPNTB

#10,SP

@SEL6,~(SP)
aSEL4,-(SP)

#FMG2,~-(SP)
#3,-(SP)

SP,RO
CSPNTB

#10,SP

C$MSG

CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuL-81 11:32
3536
3537
3538
3539
3540
3541
354¢
3543
3544
3545
3546
3547
3548
3549

015246
015252
015256
015262
015264
015266
015272
015272
015272
015276
015302
015306
015312
015314
015316
015322
015330
015332
015340
015342

015342
015346

015352
015354
015356
015362
015364
015364
015372

015374
015374
015400

015404
015406
* 015410
015414
015416
015416
015416
015422
015426

015430
015432
015436
015440
015440
015444
015446
015446
015452
015456
015460
015462
015466
015466
015466

01374¢€
012746
012746
010600

002374
016366
000002

062706

000006

017746
017746
012746
012746
010600

164736
164730

104414

062706
032777
001043

000010

122777 -.000001

164704

001011

012746
012746
010600

016440
000001

062706
000441

000004

122777
001011

000002

012746
012746
010600
104414
062706
000424

016471
000001

012746
012746
010600

016471
000001

062706
000413

000004

105777

164600

012746
012746
010600

017436
000001

062706

000004

001010

104414

SEQ 0078
MoV
MOV
MOV
MoV
TRAP
ADD

PRINTB

HFMG1,QSELO,@SEL2 ;PRINT SELO AND SEL2 CONTENTS.

016302
000003

164702

104414

12:42
PAGE 79
GLOBAL ERROR REPORT REPORT SECTION

10%:

100000

104414

29-JUL-81

30A(1052)

BIT
BNE
(MPS
BNE

PRINTB

164652

12%:

000004
15%:

20%:

#RUN,@SELO

;1S THE RUN BIT SET

#1,98SEL3
12%

;DID CPU MICRO. FAIL?

208

HFMG4

25%

CMPR
BNE
PRINTB

#2,aBSEL3
15%
HFMGS

25%

PRINTB

H#FMGS

25%

TSTB
BNE

aBSEL3
25%

PRINTB

HFMG19

;IF

RUN SET,

;IF NOT SEE

SP,RO
C$SPNTB
#6,SP

MOV
MoV
MOV
MOV
MoV
TRAP

dSEL2,=(SP)
@SELO,~(SP)

ADD

#10,SP

MOV
MOV
MOV
TRAP
ADD

HFMG4
, - (SP)
#1,-(SP)

#FMG1,-(SP)
#3,-(SP)

SP.RO
CSPNTB

CHECK.

LU FAILED.

;CPU MICRO. FAILED.

SP,RO
CSPNTB

#4,SP

;DID LINE UNIT MICRO. FAIL?

sLINE UNIT FAILED.

MOV
MOV
MOV
TRAP
ADD

sNO RUN - MASTER CLEAR FA]LED.

HFMGS,-(SP)
#1,-(SP)

SP.RO

.CSPNTB
#4,SP

MOV
MOV
MOV
TRAP

H#FEMGS5,=-(SP)
#1,-(SP)

ADD

#4,SP

MOV
MOV
MOV
TRAP
ADD

#FMG19,-(SP)
#1,-(SP)

SP,RO
CSPNTB

;IS BSEL3 STILL 0?
;IF NOT - SEE IF MICRODIAG. RUN.

;DEVICE IS NOT DMR (DMC?)

25%:

ENDMSG

SUBRPC,-(SP)
#FMG3,-(SP)
#2,~(SP)

L10004:

SP,RO

CSPNTB

#4,SP

—————

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID P11
29-JuL-81 11:32
3592
3593
3594
3595
3596
3597
3598

015466
015470
015470
015470
015474
015476
015476

015502
015506
015512
015514
015516
015522

015522
015526
015530

015534
015536
015536
015536

015540
015544
015546
015552
015556
015562
015564
015566
015572
015572
015576
015600
015604
015606
015606
015606
015610
015614
015616
015622
015626
015632

015634
015636
015642
015642
015646
015650
015654
015656

015656

015656
015660
015664

30A(1052)
GLOBAL

29-JUL=-81

ERROR REPORT

12:42

7
PAGE 80

SEQ 0079

REPORT SECTION

104422

BGNMSG

005737
001412

002374

013746

002374
016366

012746
012746
010600
104414

000006

105737
001003
105737
001416

002643

104414

11%:

002645

PRINTB

A#FMG3, SUBRPC

;PC

THAT SUBROUTINE WAS CALLED.

TSTB
BNE
1ST8B
8EQ

BASE+3
11%
BASE+6
12%

PRINTB

#FMG7,<B,BASF+3>,<B,BASE+6>

12%:

TSTB

BASE+5

BEQ

14%

BNE
TST8B

14%:

002647
15%:

002647

SUBRP(C,=(SP)
#FMG3,-(SP)

CLR

-(SP)
+6, (SP)
BASE
=(SP)

MOV
MOV
MOV
TRAP
ADD

PRINTB

#2,-(SP)

SP,RO
C$PNTB
#6,SP

BASE+3, (SP)
HFMG7 ,-(SP)
#3,-(SP)

SP,RO
CSPNTB

#10,SP

13%
BASE +8.
#FMG8,<B,BASE+5>,<B,BASE+8.>

002645
016573
000003

002644

MOV
MoV
MoV
MOV
TRAP
ADD

IN A SUBROUTINE?

;ONLY PRINT NON~ZERO VALUES

002650

105737
001003
105737
001416

005046

ERROR

CLR
B1SB

13%:

000010

153716

THE

JIF NOTM, DON'T PRINT SUBR. PC

BISB

002650

062706

005046

;IS

108

002643
016522
000003

105737
001003
105737
001416

104414

SUBRP(

002646

000010

012746
010600

10%:

002646

062706

005046
153716
005046
153716
012746

TST

BEQ

($MSG

::
ERRGS

000002

062706

005046
153716
005046
153716
012746
012746
010600

ERRG4

TRAP

CLR
BISB
CLR
BI1SB

MOV
MOV
MoV
TRAP
ADD

TST8B
BNE
1ST8B
BEQ

BASE +4
15%
BASE+7
16%

PRINTB

#FMG9,<B,BASE+4>,<B,BASE+7>

CLR
81S8
CLR

- (SP)

BASE+8., (SP)
=(SP)

E
+5, (SP)
BAS
#FMGB,-(SP)
#3,-(SP)
SP,RO
CSPNTB
#10,SP

=(SP)

BASE+7, (SP)
-(SP)

CZDMIDO DMR-11_FUNCTIONAL TESTS MACY11
CZOMID.P11
29-JuL~-81 11:32
015666
015672
015676
015702
015704
015706
015712
015712
015716
015720
015724
015726
015726
015726
015730
015734
015736
015742
015746
215752
015754
015756
015762
015762
015762
015762

15371€
012746
012746
010600

002644
016644
000003

062706

000010

105737
001003
105737
001416

002652

104414

005046
153716
005046
153716
012746
012746
010600
104414

062706

016004
016004
016010
016014
0156020
016024
016026

016030
016034
016034
016040
016044
016050
016052
016054

016060
016060
016060

GLOBAL

29-JuL-81

SEQ 0080

12:42
PAGE 81
ERROR REPORT REPORT SECTION
B1SB

16%:

MOV
MOV
MOV
TRAP
ADD

TST8B
BEQ

BASE+10.
17$
BASE +9.
20%

PRINTE

#FMG10,<B,BASE+10.> ,<B,BASE+9.>

TSTB

BNE

002651
17%:

002652
016715
000003
000010

MOV
MOV
MOV
TRAP
ADD

20%:
ENDMSG

L10005:

104423

BGNMSG
012746
012746
010600

017005
000001

062706

000004

104414

017746
017746
012746
012746
010600
104414

PRINTB

164230

HFMG12

;BA/CC OUT RECV

016446
012746
012746
010600

017166
000002

062706

000006

TRAP

(SP)
SE
+4,
BA
#FMGY,
= (SP)
#3,-(SP)

SP,RO
C$PNTB

=(SP)

BASE+9., (SP)
-(SP)

BASE+10., (SP)
#FMG10,-(SP)
#3,-(SP)

SP,RO
C$PNTB

#10,SP

CSMSG

ERRG7::
MOV
MOV
MOV
TRAP
ADD

#FMG13,aSEL4,aSEL6 ;ACTUAL BA/(CC

#FMG12,~(SP}

#1,-(SP)

SP,RO
CSPNTB

#4,SP

aSEL6,=(SP)
3SEL4 .- (SP)

#FMG135,-(SP)

017036
000003
000010

1046423

ERRG7

164222

062706

104414

CLR
BISB
(LR
BISB

002651

015764

015764
015764
015764
015770
015774
015776
016000

30A(1052)

#3,-(SP)
SP.RO
C$PNTB

PRINTR

177776

#FMG15,-2(R4)

#10,SP

JEXPECTED BA/CC

=-2(R4) ,-(SP)

#FMG1S5,-(SP)
#2,-(SP)

SP,RO
CSPNTB

ENDMSG

#6,SP

L10006:

CSMSG

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDOMID PN
29-JuUL-81 11:32
3704
3705
3706
3707
3708
3709
3710
3711
3712
3713
3714
3715
3716
3717
3718
3719
3720
3721
3722
3723
3724
3725
3726
3727
3728
3729
3730
3731
3732
3733
3734
3735
3736

3737

3738
3739
3740
3741
3742
3743
3744
3745
3746
3747
3748
3749
3750
3751
3752
3753
3754
3755
3756
3757
3758
3759

016062
016062
016062
016062
016066
016072
016074
016076
016102
016102
016106
016112
016116
016122
016124
016126
016132
016132

016136
016142

016146
016152
016154
016156
016162
016162
016162
016164
016164
016164
016164
016170
016174
016200
016204
016206
016210
016214
016214
016214

016216
016216
016216
016216
016222
016226
016232
016236
016240
016242
016246
016246
016246

D 7
12:42
PAGE 82
29-JUL-81
GLOBAL ERROR REPORT REPORT SECTION

BGNMSG

012746
012746
010600

016753

062706

000004

017746
017746
012746
012746

164132
164124
017036

104414

010600
104414
062706

ERRG8
PRINTB

H#FMG11

;BA/CC OUT XMIT

PRINTB

#FMG13,QSEL4,aSEL6

;ACTUAL BA/CC

000003
000010

177776
177774
017112
000003

062706

000010

PRINTB

#FMG14
-4 (R5) ,-2(R5)

;EXPECTED BA/CC

ENDMSG

BGNMSG

104414

062706

ERRG10
PRINTB

177776
177776

#FMG16,-2(R0O) ,-2(R1)

000010

ENDMSG

BGNMSG

012746
010600
104414

062706
104423

& XMIT (CC

L10010:
ERRG11
PRINTB

177774
177774

#FMG17,-4(R0O) ,-4(R1)

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

aSEL6,-(SP)
aSEL4 .- (SP)

SP,RO
CSPNTB

#4,SP

#FEMG13,-(sP)
#3,-(SP)

SP.RO
CSPNTB

#10,5P

-2(R5) ,-(SP)

=4 (RS5) ,-(SP)
#FMG14 ,-(SP)
#3,-(SP)

SP,RO
CSPNTB

#10,SP

TRAP

C$MSG

MOV
0%
MOV
MOV
MOV
TRAP
ADD

=2 R1),~-(SP)
=2(R0) ,-(SP)

#10,SP

TRAP

CHMSH

H#FMG16,-(SP)
#3,-(SP)

SP.RO
CSPNTB

ERRG11::

;RCY BUFFER & XMIT BUFFER

017274
000003

000010

#FMG11,-(SP)
#1,-(SP)

ERRG10::

017215
000003

104423

016146
016046
012746

;RCV CC

MOV
MOV
MoV
TRAP
ADD

MoV
MOV
MOV
MOV
MOV
TRAP
ADD

L10007:

104423

016146
015046
012746
012746
010600

ERRGS::

000001

016546
016546
012746
012746
010600
104414

SEQ 0081

30A(1052)

=4 (R1) ,=(SP)
=4 (RO) ,~(SP)
#FMG17,-(SP)
#3,-(SP)

SP.,RQ
CS$PNTB

ENDMSG

L10011:

CIMSG

—~

(ZDMIDO DMR-11

(ZDMID.P11

3760
3761
3762
3763
3764
3765
3766
3767
3768
3769
3770
3771
3772
3773
3774
3775
3776

FUNCTIONAL TESTS MACY11
29-JuL-81 11:32

BGNMSG

016256
016260
016264
016270
016272
016274
016300
016300
016300

016302
016310
016316
016324
016232

016334

016342
016350
016356
016364
016366
016374
016402
016410
016416
016424
016432
016440
016446
016454
016462
016470
016471
016476

016504
016512
016520
016522
016530
016536
016544
016552
016560
016566

104414

062706

ERRG1?2
DEC
DEC

005303
005304
010446
010346
012746
012746
010600

SEQ 0082

29-JUL-81
12:42 PAGE 83
30A(1052)
GLOBAL ERROR REPORT REPORT SECTION

PRINTB

R3
R4

#FMG18.,R3.R4

ERRG1?::
;BACKUP TO RECEIVE ADDRESS
;BACKUP TO TRANSMIT ADDRESS
;PRINT QUT ADDRESS

017347
000003
000010

ENDMSG

L10012:

104423

040445
020072
020101
020072
000116
040445
020072
020101
020072
000116
040445
020122

041125
047111

046114
020124
047445
040445
044515
051505
046111
000
045
046440
042524
044507
000116
040445
047055
043106
041522
031504
047105
031504

042523
047445
042523
047445

030114
022466
031114
022466

FMG:

LASCIZ

/XASELO:

%06%A SEL2:

Z06IN/

042523
047445
042523
047445

032114
022466
033114
022466

FMG2:

LASCIZ

/%ASEL4:

X06XA SEL6:

XO6IN/

051105
047111
047522
020105
042105
041520
022466
050103
051103
020124
042105

047522
051440
052125
040503
040440
020072
000116
020125
052117
040506
047045

FMG3:

.ASCIZ

/%AERROR IN SUBROUTINE CALLED AT PC:

:
FMG4

.ASCIZ

/%ACPU MICROTEST FAILEDIN/

046101
041511
052123
042514

027125
047522
043040
022504

FMGS:

LASCIZ

/%ALU.

040516
020117
051105
035126
040445
035124
047045

051513
052502
020040
022440
051440
022440
vy

FMG7:

ASCIZ

/%ANAKS-NO BUFFER

X06XN/

MICROTEST FAILEDXN/

RCV:

XD3XA SENT:

XD3XN/

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

P4, ~(SP)
R3,-(SP)
#FMG18,
= (SP)
#3,-(SP)

TRAP

C$MSG

SP.RO
CSPNTB

#10, 5P

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuL-81 11:32

3816
3817
3818
3819

016573

016600
016606
016614
016622
016630
016636
016644
016652
016660
016666
016674
016702
016710
016715
016722
016730
016736
016744
016752
016753
016760
016766
016774
017002
017005
017012
017020
017026
017034
017036
017044
017052
017060
017066
017074
017102
017110
017112
017120
017126
017134
017142
017150
017156
017164
017166
017174
017202
017210

017215
017222
017230
017236
017244
017252

045
026523
040504

047101
040502
040524
053103
022463
052116
022463
040516
042101
042504
035126
040445
035124
047045
051101
041522
031504
047105
031504

020104
020040
020072
020101
020072
000116
051513
044040
020122
022440
051440
022440
000
050105
035126
040445
035124
047045

LASCIZ

/%ANAKS-BAD DATA

RCV:

%D3XA SENT:

ZD3IN/

FMGY:

LASCIZ

/ %ANAKS-BAD HEADER RCV:

XD3XA SENT:

ZD3IN/

FMG10:

LASCIZ

/%¥AREPS=-RCV:

XD3%A SENT:

044515
041503
041440
042116

FMG11:

LASCIZ

/XAXMIT BACC OUT

053103

FMG12:

.ASCIZ

/XARCV BACC OUT

041501

052524

FMG13:

LASCIZ

/XAACTUAL

027122
040445
040525
047125
042045

022465

020103

SEQ 0083

FMGS:

054101
040502
052125
040515
000
051101
041501
020124
047101
020040

044103

Ol‘r(n‘!

30A(1052)
29-JUL-81
12:42 PAGE 84
GLOBAL ERROR REPORT REPORT SECTION

D3N/

COMMANDZN/

COMMANDIZN/

047503

022504

040440
022440
040440
020114
020124

ADDR.

%06%A ACTUAL

COUNT

XD5IN/

054105
042105
027122
040445
041505
047503
042045

042520
040440
022440
042440
042524
047125
022465

FMG14:

LASCIZ

/XAEXPECTED ADDR.

XO06XA EXPECTED COUNT %DSAN/

054105
042105
027122
047045
051101
040510
052517
032504
044515
051101

042520
040440
022440
000
053103
027122
052116
040445
020124
020056

FMG15:

LASCIZ

/XAEXPECTED ADDR.

Z06IN/

FMG16:

LASCIZ

/%ARCV CHAR.

COUNT XDSXA XMIT

(HAR.

fOUNT ZDSZN/

CZOMIDO DMR=-11 FUNCTIONAL TESTS MACY11
(ZDMID.P11

29-JuUL-81

11:32

3872
3873
38764
3875
3876
3877
3878
3879
3880
3881

047503
042045
040445
052502
040440
022466
052111
042506
022440
000

047125
022465
041522
043106
020124
020101
041040
020122
033117

020124
000116
020126
051105
047445
046530
0463125
052101
047045

042101
044504
020123

3882
3883
3884

017260
017266
017276
017302
017310
(017316
017324
017332
017340
017346

3903
3904
3905
3906
3907
3908
3909
3910
3911
3912
3913
3914
3915
3916
3917
3918

017527
017534
017542
017550
017554
017562
017570
017576
017604
017612
017620
017626
017634
017635
017642
017650

3924

017714

045
020101
051105
051040
0421046
033117
042116
020126
020056
000116
040445
042503
042040
000
045
042506
052101
040445
041040
051522
047045
045
042506
042532
022465
040445
020055
051501
042105
040445
044515
044523
022472
000
045
026440
051040
042516
022463
046530
052105
035104
000116

017716
017724

044524
052125

3885
3886
3887
3888
3889
3890
3891
3892
3893
3894
3895
3896
3897
3898
3899
3900
3901

3902

3919
3920
3921
3922
3923

3926
3927

017347
017354
017362

017370
017376
017404
017412
017420
017426
017434
017436
017444
017452
017460
017461
017466
017474
017502
017510
017516

017526

017656
017664
017672
017700
017706

30A(1052)

29-JuL-81

12:42

7
PAGE 85

SEQ 0084

GLOBAL ERROR REPORT REPORT SECTION

FMG17:

(ASCIZ

/%ARCV BUFFER AT Z06%A XMIT BUFFER AT X06IN/

052101
043106
052101

FMG18:

.ASCIZ

/XADATA DIFFERS AT RCv ADDR.

042504
0470640
051115

044526
052117
047045

FMG19:

_ASCIZ

/%ADEVICE NOT DMRIN/

041101
020122
051525
020043
043125
022472
000
041101
020122
020072
000116
047111
041522
044523
022472
020040
020124
047107
031504

043125
052123
047045
043117
042506
031504

FMG21:

.ASCIZ

/XABUFFER STATUSXNXA# OF BUFFERS:ZD3%N/

043125
044523
042045

FMG22:

.ASCIZ

/XABUFFER SIZE:

020040
020126
047107
031504
054040
051501
042105
047045

FMG23:

.ASCIZ

/XAIN

<~ RCV ASSIGNED:XD3XA

XMIT ASSIGNED:%D3IN/

047501
051040
052105
035104
020101
052111
051125
042045

052125
053103
051125
(042045
020040
051040
042516
022463

FMG24:

.ASCIZ

/XAOUT - RCV RETURNED:XD3XA

XMIT RETURNED:%D3XN/

042515
000

047440

EMGY1:

_ASCIZ

/TIME QUT/

053103
027122
040445
054040
042101
047445

X06XA AND XMIT ADDR. XO6AN/

040440
022440
040440
044515
051104
022466

XD5%N/

—

(ZOMIDO DMR=-11 FUNCTIONAL TESTS MACY11
CZDMID.PN
29-JuUL-81 11:32

3928
3929

017727

017734
017742

017750
017756
017764
017772
017774
020002
020010
020016
020024
020032
020040
020046
020054
020062
020067
020074
020102
020110
020116
020124
020132

020140
020141
020146

020154
020162
020167
020174
020202
020210
020215

020402

124
052517
052504
044440
052522
042530
000105
054105
042105
051124
052125
052117
044505
047125
052103
047117
047440

105
026440
044524
046530
052502
040440
042440

H
7
30A(1052)
29-JUL-81
12:42 PAGE 86
GLOBAL ERROR REPORT REPORT SECTION

SEQ 0085

046511
020124
044522
052116
052120
041522

EMG2:

LASCIZ

/TIME

042520
041440
046117
026440
051040
042526
054105
042105
051124
052125
051122
046440
046120
052111
043106
042104
051122

EMGS8:

LASCIZ

/EXPECTED

EMGY:

LASCIZ

/UNEXPECTED CONTROL

EMG10:

LASCIZ

/ERROR = MULTIPLE

027122
051117

EMG1?:

.ASCIZ

/BUFFER ADDR.

040510
051105

041440

EMGTZ:

ASCIZ

/CHARACTER

EMG13:

LASCI2

/ERROR = MULTIPLE

EMG14:

.ASCIZ

/RCVD

EMG1S:

LASCIZ

/DATA ERROR/

EMG16:

LASCIZ

/UNEXPECTED HALT

047117
044440
041117
020055
052116
052120
044524

EMG17:

LASCIZ

/CONTROL

052520
020123
047111
050125

EMG18:

LASCIZ

/SPURIOUS RDO

EMG19:

LASCIZ

/M8207 PROGRAM TIMER OUT OF

052116
051117
051122
046440
046120
051526
053103
051124
040524
052101
047522
054105
042105
020124
053111

030062

040522

042440
000
051117
046125
020105
000
020104
020101
000
020101
000122
042520

020067

OUT

= DURING

CONTROL

INTERRUPTTM

OUT

EXERCISE/

= NOT RECEIVED/

OuT/

XMITS/

ERROR/

COUNT

ERROR/

RCVS/

EXTRA DATA/

RECEIVED/

IN PROBLEM -

[N INTERRUPT ROUTINE/

INTERRUPT/

RANGE/

—

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-Jul-81
12:42 PAGE 87
GLOBAL ERROR REPORT REPORT SECTION
CZOMID.P11
29-JuUL-81 11:32
3984
3985
3986
3987
3988
3589

020410
020416
020424
020432
020440

05112C
020115
020122
043117
042507
020444

043517
044524
052517
051040
000

040522
042515
020124
047101
.EVEN

SEQ 0086

———

E%g:%gOP?TR-11 FUNCTIONAL TESTS MACY11
29-JuL-81 11:32
3990
399
3992
3993
3994

4000
4001
4002
4003
4004
4005
4006
4007

4008

4009

29-JUL-81

12:42

LOAD DEVICE PROTECTION TABLE
.SBTTL

7
PAGE 88

SEQ 0087

LOAD DEVICE PROTECTION TABLE

1111777777777 70077777707777777777777777/7/77/77777/7/7//77777/7/7/777777/7/77777777
s/ THIS TABLE IDENTIFIES THE LOAD DEVICE TO THE SUPERVISOR, SO THAT IT (AN BE
s/ PROTECTED FROM TESTING. IF DESIRED.
1L
I7177 1777777777777 777777777777777777777777/7777777/77/7//77/77///¢7/77/77

3995

3996
3997
3998
3999

30A(1052)

020444
020444

020444
020446
020450
020452

BGNPROT
177777
177777

177777

.WORD
.WORD
.WORD
ENDPROT

LS$PROT::

-1
-1
-1

;DON'T CHECK CSR ADDRESS
JDON'T CHECK MASSBUS UNIT NUMBER
;DON'T CHECK DRIVE NUMBER

—

CZDMIDO DMR~11 FUNCTIONAL TESTS MACY11
CZDMID.P1T
29-JuL-81 11:32
4010
4011
4012
4013

.SBTTL

4024
4025
4026
4027
4028
4029
4030
4031
4032
4033
4034
4035

4036
4037
4038

4039

4040
4041
4042
4043

4044
4045

4046

4047
4048
4049

4050
4051
4052
4053
4054

4055
4056
4057
4058
4059
4060
4061
4062

4063
4064
4065

12:42

7
PAGE 89

SEQ 0088

INITIALIZE SECTION

1111111177077 70777777777777777770777777/777777777/777777/777777///7/7777777
;/ THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED
:/ AT THE BEGINNING OF THE TEST SEQUENCE ON THE NEXT UNIT.
L7777 777777777717777777777777/7777777777777777/77//7777/7/7/77777

4014

4015
4016
4017
4018
4019
4020
4021
4022
4023

30A(1052)
29-JuUL-81
INITIALIZE SECTION

020452
020452

020452
020452
020456

020510
020514
020520
020522
020530

020534
020534
020534
020540

020542
020542
020546
020550
020550
020552
020552
020556
020560

BGNINIT

012700
104441
010637
005037
005037
005037
005037
005037

005037
005737
001005
012737
005037

SETPR]

#PRIO7

;SET DIAGNOSTIC PRIORITY =7

002372
002374
002366
002274
002276
002400

MoV
CLR
CLR
CLR
CLR
CLR

SP,PSTACK
SUBRP(
ERROR
RESUME
DMCMDE
CLRNO

002352
002264

CLR
TST

NXMF LG
FRSTIM

MOV
CLR

#1,FRSTIM
FRSPAS

;STORE
;CLEAR
;CLEAR
;CLEAR
;CLEAR
s CLEAR
;EVERY
;FLAG USED TO MARK A NXM DMR ADDRESS.
;1S THIS THE TIME THROUGH AFTER LOAD?
;IF NOT - ERROR TRAP VECTOR ALREADY SAVED
;FLAG THAT WE'VE BEEN THRU THE 1ST TIME
;CLEAR COUNTER FOR # OF PASSES AFTER LOAD

CLRVEC

JENSURE VECTOR 4 IS IN NORMAL STATE.

READEF

H#EF .START

;1S THIS JUST STARTED?

000340

000001
002266

BNE

002264
1%:

012700
104436

000004

012700
104447

000040

104447

READEF

000037

103412

012700
104447

000035

103410

012700
104447
103013

BCOMPLETE

103416

012700

LSINIT::

000036

020602

000137

021510

020606
020606

005037

002270

STARST:

STARST

A#EF .RESTART

#PR107,RO
Mov
TRAP
C$SPRI
BASE LEVEL PROGRAM STACK POINTER
STORAGE WORD FOR SUBROUTINE PC CALL
ERROR FLAGS
FLAG USED TO ALLOW BASE IN - RESUME.
FLAG USED TO INDICATE DMC MODE
WORD USED TO RUN MICRO TESTS ON
OTHER MASTER CLEAR.

JIF YES - BRANCH.

;1S THIS A RESTART ?

BCOMPLETE STARST

JIF YES - BRANCH.

READEF

;1S THIS A NEW PASS?

H#EF .NEW

BCOMPLETE NEWST

JIF YES - BRANCH

READEF #EF .CONTINUE

;IS THIS A CONTINUATION?

MoV
TRAP

#4 RO
CS$CVEC

MoV
TRAP

HEF _START
RO

BCS

STARST

MOV
TRAP

#EF .RESTAR
RO
T

BCS

STARST

MoV
TRAP

HEF .NEW,RO

BCS

NEWST

MOV
TRAP

HEF . CONTIN.RO
UE

8CC

GETPRM

BNCOMPLETE GETPRM

1IF NOT - GET PARAMETERS

JMP

END

;OTHERWISE - DON'T INITIALIZE.

CLR

STARES

;CLEAR THE FLAG TO SHOW START/RESTART.

CSREFG

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P1T
4066

020612

4070
4071
4C72
4073

020630
020630
020634
020642

4067
4068
4069

4074

4075
4076
4077
4078
4079
40B0
4081

4082
4083
4084
4085
4086
4087
4088
4089
4090
4091
4092
4093
4094
4095

4096
4097
4098
4099
4100
4101
4102
4703
41%
4105
4106
4107
4108
4109
4110
4111
4112
4113
4114
4115

4116
4117
4118
4119
4120
4121

29-JuL-81

11:32

012737
005237
005237

177777
002266
002270

005237
023737
002363

002370
002370

013700
104442
010001

002370

020612
020620
020624

020644

020644
020650
020652
020654
020654
020656
020662

020664
020670
020672
020676
020676
020700
020702
020706
020712
020714

020716
020722
020722
020726

020732
020736
020742
020750
020754
020762
020766
020774
027000
021006
021012
021020
021024
021032
021034

021040
021042
021046
021046
021050

021052
021056
021062
021064
021066
021072

103365
012137
011100
032700
001414
042711

010046
011146
012746
012746
010600
104414

NEWST:

GETPRM:

002012

INC
CMP
BGE

LOGDEV
LOGDEV,LSUNIT
NEWST

sNEXT LOGICAL UNIT TO BE TESTED
;IS THC MAXIMUM UNIT # EXCEEDED?
s1F YES - DO A NEW START

LOGDEV,R1

GETPRM

(R1)+ ,WTYPE
(R1) ,RO
#7 ,RO
108
#7,(R1)
#FINIT1,(R1),RO

000003

002232
002242

002242
002234
000002
002244
000003
002236
000004
002246
000005
002240
000006
002250
000007

002244

002236
002246

002240
002250

000007
000007

021601
000003
000010

118:

;GET THE P-TABLE POINTER INTO R1

;IF NOT AVAILABLE,

MoV
TRAP
MOV

GET THE NEXT ONE
BCC
;MICROPROCESSOR TYPE
;SAVE THE ADDRESS

MOV
MoV

(R1),CSR
(R1) ,BSEL1

BSEL1
(R1) ,SEL2
#2,SEL2
(R1) ,BSEL3
#3,BSEL3
(R1) ,SEL4
#4 ,SELS
(R1) ,BSELS
#5,BSELS
(R1),SEL6
#6,SELG
(R1)+,BSEL7
#7 BSEL7
(R1),RO
#7 ,RO

LOGREV,RO
C$GPHRD
RO,R1
GETPRM

;DOES THIS DEVICE ADDRESS END IN NON-ZERO?
;IF NOT - OK (76XXX0)
JMAKE IT 76XXX0
;INFORM THE USER
MoV
RO,=(SP)
MoV
(R1) ,~(SP)
MoV
H#FINIT1,-(SP)
MOV
#3,-(SP)
MoV
SP,RO
TRAP
CSPNTB
ADD

INC
MOV
ADD
MoV
ADD
MOV
ADD
MOV
ADD
MoV
ADD
MOV
ADD
MOV
BIT
BEQ
BIC
PRINTB

002234

SEQ 0089

JINITIALIZE LOGICAL UNIT NUMBER.
s INCREMENT # OF PASSES AFTER LOAD.
; INCREMENT # OF PASSES SINCE START/RESTART.

021512

10%:

7
PAGE 90

#-1,L0GDEV
FRSPAS
STARES

MoV
MOV
BIT
BEQ
BIC
PRINTB

000007

12:42

Mov
INC
INC

GPHARD

000007

011137
011137

010046
011146
012746
012746
010600
104414
062706

002370

002252

000010

001414
042711

INITIALIZE SECTION

BNCOMPLETE

062706

005237
011137
062737
011137
062737
011137
062737
011137
062737
011137
062737
012137
062737
011100
032700

29-JUL-81

#10,SP

;CSR ADDRESS

;JHIGH BYTE ADDRESS OF (SR
;CONTROL OUT REGISTER ADDRESS
JHIGH BYTE OF

SELZ2

;PORT REG (SEL &) ADDRESS
;HIGH BYTE OF SEL4

;PORT REG (SEL 6) ADDRESS
;HIGH BYTE OF SEL6
;GET VECTOR
;DOES THIS VECTOR END IN NON-ZERO?

11%
;IF NOT = OK (XX0)
#7,(R1)
sMAKE IT XX0
#FINIT2,(R1)
RO ;INFORM THE USER

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

RO,=(SP)
(R1) ,-(SP)
#FINIT2,~(SP)
#3,-(SP)
SP,RO
CSPNTB
#.,SP

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)

29-JUL-81

CZOMID.P1

29~JuUL~81

11:32

INITIALIZE SECTION

4122
4123
4124
4125
4126
4127
4128
4129
4130
4131
4132
4133
4134
4135
4136
4137
4138
4139
4140
4141
4142
4143

011137
011137
011100

002226
002230

MoV
MOV
MOV

021072
021076
021102
021104
021110

000003

CLRB
CLRB

000007

SEQ 0090

PAGE N

(R1) ,DMRVE(
(R1) ,DMTVEC
(R1) ,RO

JRCV. VECTOR
s TRANSMIT VECTOR
sRCV. VECTOR

7(RO)

;CLEAR HI BYTE OF PSW FOR XMIT. VECTOR.
;THIS WILL ENSURE THAT WE DON'T PICK

3(R0O)

;CLEAR HI BYTE OF PSW FOR RCV. VECTOR.
JUP ANY UNEXPECTED BITS IN PROCESSORS
;WHICH USE BITS 11-15 OF

THE PSW.

;IF BIT 11 IS SET IN AN 11/70 ANOTHER

021114

4144

4145
4146
4147
4148
4149

105060
105060

12:42

4150 021172
4151
4152
021176
4153 021202
4154
4155
4156 021206
4157
4158
4159
4160 .021212
4161
021212
4162
021216
4163 021222
4164
02122
4165
021224
4166 021226
4167 021230
4168
4169 021232
4170 021236
4171
021240
4172 021242
4173
4174
021246
4175
4176
4177 021252

062737

000004

002230

ADD

#64 ,DMTVEC

JREGISTER SET MAY BE USED.
;ADJUST XMIT VECTOR

;SET UP ISRS FOR DMR.
;TESTS 15-19.
SETVEC

DMRVEC ,#INISR,#PRI0S

INTERRUPTS ENABLED IN

JINPUT ISR

MOV
MOV
MOV

#PRI0S ,~-(SP)
#INISR,-(SP)
DMRVEC,-(SP)

TRAP
ADD

C$SVEC
#10,SP

012746
012746
013746
012746

000240
022064
002226
000003

062706

000010

012746
012746
013746
012746
104437
062706

000240
023142
002230
000003

062701
012137

000014
002254

ADD
MoV

#14 R1
(R1) + ,DMTURN

s INCR. P-TABLE POINTER.
: TURNAROUND

013700

002224

MOV

SPEED,RO

;GET THE SOF TWARE P-TABLE VALUE GIVEN
;BY THE USER

012701
012702

000002
000012

MOV
MOV

#2 ,R1
#10..R2

JGET FIRST TIMER VALUE
;GET SECOND TIMER VALUE

ASL
ASL
DEC
BNE

; TIMER VALUES X 2

RO
148

.
;

MOV

R1,WAIT1

;SAVE

104437

MoV

SETVEC

DMTVEC,#O0UTISR,#PRIOS

;OUTPUT ISR

MoV
MOV

#PRI0S5,-(SP)
#OUTISR,-(SP)

MOV

#3,-(SP)

ADD

#10,SP

MOV

TRAP

000010

13%:
14%:

006301
006302
005300
001374

010137
006201
006201
010137

002312

002314

ASR
ASR
MOV

010237

002316

MOV

R2.WAIT3

012737

000333

MOy

#333,AX3

002304

R1
R1

R1,WAIT?

DEC SPEED VARIABLE
CONTINUE UNTIL DONE

JHALF
JHALF

DMTVEC,-(SP)
CSSVEC

INCREASING WAIT VALUES

TIMER VALUE FOR SWAIT

THAT VALUE
IT AGAIN.

;SAVE TIMER VALUE FOR SMSCLR AND $CLRQI

s SUBROUTINES.

:TIMER VALUE FOR $INCUT SUBROUTINE.

s CHECK TURNAROUND.

#3,~(SP)

;MASK FOR AX3-15 - BIT CLLARED Wwill

CZDMIDO DMR~11 FUNCTIONAL TESTS MACY11 30A(1052)

CZDMID.P11
4178

4179
4180
4181
(182
4183

021260
021266
021270
021276
021300

4185
4186
4187

021306
021310
021316

41846

4188

4189
4190
4191
4192
4193

4194
4195

4196
4197
4198

4199

29-JUL-81

11:32

022737
001004
042737
000427

000001

002254

000020

002304

022737

000002

002254

00001C

002304

021300

021320

001004
042737
000417

INITIALIZE SECTION

021320
021326
021330
021336

022737
001004
042737
000407

000003

002254

000100

002304

021340
021346

022737
001007

000004

002254

042737

000200

002304

012737

000001

002262

021340

021350
021356
021356

021364

000404

4200
4201
4202
4203

021366
021366
021372
021376

005037
005037

002262
002304

4205

021376

005737

002310

021406
021412
021414
021422

022737
001430
022737
001424

000001

002254

000003

002254

022737
001420
022737
001020
022737
001010

000006

002254

000007

002254

000001

002270

012746
012746
010600
104414
062706

021670
000001

012737
020402

000001

005037

002306

4204

4206

4207

4208
4209
4210
4211

4212
4213
42146
4215
4216
4217
4218
4219
4220
4221
4222

4223
zggg

4226
4227
4228
4229
4230
4231
4232
4233

021402

021424
021424
021432
021434
021442
021444
021452
021454
021454
021460
021464

021466
021470

021474
021474
021502
021504
021504
021510
021510
021510

001410

29-JuL-81

20%:

22%:

25%:

30%:

35%:
40%:

PAGE 92

SEQ 0091

;BE THE

INTERFACE SELECTED.

CMP
BNE
8IC
BR

#1 ,DMTURN
20%
#BIT4 ,AX3
308

CMP

#2 ,DMT!JRN

;IS INTEGRAL REQUESTED?

CMP
BNE
BIC
BR

#3,DMTURN
25%
ABIT6,AX3
308

;IS EIA REQUESTED?
;IF NOT - CONTINUE.
JSELECT EIA(XY2).

CMP
BNE
BIC

#4 ,DMTURN
35%

;1S RS422 REQUESTED?
JIF NOT, DON'T ALLOW INTERFACE CHANGE.

MOV

#1,INFACE

;SET FLAG THAT ALLOWS INTERFACE CHANGE.

CLR
CLR

INFACE
AX3

.CLEAR FLAG - NO INTERFACE
;CLEAR AX3 BITS

CHANGE.

JERARE R

R AR AR AR AR R AR

TST

MANUF
42%

cIF NOT = SET MAINT BIT ONLY FOR MODEM LOOP

CMP
8tQ
mpP
8EQ

#1 ,DMTURN
45%
#3 ,DMTURN
45%

;IS
;IF
;IS
JIF

CMP
BEQ
(MP
BNE
CMpP
BNE
PRINTB

#6 ,DMTURN
45%
#7 ,DMTURN
50%
#1,STARES
45%
#FINIT3

;IS THIS LOCAL LOOP?
;IF YES = SET WRITE MAINT. BIT.
;IS THIS REMOTE LOOP?
JIF NOT - CLEAR MAINT. BIT FLAG
;IS THIS THE FIRST PASS?
;IF NOT - SKIP MESSAGE
JWARN TO USE ONLY TESTS 17-19

MCV
BR

#1,WMAINT
END

JSET FLAG TO WRITE MODEM MAINTENANCE BITS.

CLR

WMAINT

:CLEAR FLAG = DON'T WRITE MAINT.

BNE
BIC
BR

B8R

BEO

“e$.

12:42

228
#B1T3,AX3
30%

#BIT7 ,AX3

40%

;1S V.35 REQUESTED?
JIF NOT - CONTINUE
JSELECT v.35

JIF NOT - CONTINUE.
JSELECT INTEGRAL MODEM.

JSELECT RS422.

R AR AN AN AR AR AR AR

;IS THIS A SPECIAL MANUFACTURING TEST CON.?

JRERRRARKA A AR AR AR A RN

R AR R A ARR NN

000004
002306

45%:
50%:
END:
cwINIT

AR AR R ®

THIS V.35 WITH SPECIAL CONNECTOR?
YES = SET WRITE MAINT. BIT
THIS EIA WITH SPECIAL CONNECTOR?
YES = SET WRITE MAINT. BIT

L10014:

MOV
MOV
MOV
TRAP
ADD

1 OR 2.

KFINIT3,~(SP)
#1,-(SP)
SP,RO
CEPNTB
s ,SP

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11

30A(1052)

29-JuL-81

8
PAGE 93

SEQ 0092

CZDMID.P11

29-JuL-81

11:32

6234
6235
4236

1044M
040445
051101
026440
020114
042515
042522
033117
047516
022466

025052
044516
053440
051501
040440
051523
040445
020124
024501

053440
043516
046111
052523
042104
022440
024040
047445
047045

FINIT1:

_ASCIZ

TRAP
CSINIT
/X%Ax* WARNING - WILL ASSUME ADDRESS 206%A (NOT Z06%A) XN/

045

025101

020052

FINIT2:

.ASCIZ

/XA*» WARNING - WILL ASSUME VECTOR

046114

040440

051523

FINIT3:

_ASCIZ

/XA*x» WITH REMOTE LOOPBACK USE TESTS 17 = 19 ONLY *=IN/

021510
021512
021520

4237

021526

42643
4244

021572
021600

4238
6239
6240
6261
6262

021534
021542
021550
021556
021564

4245

021601

42648

021622

4250
64251
4252
4253

021636
021644
021652
021660

4255

021670

4246
4247
4249

4254

4256
4257
4258
4259
4260
4261
4262
4263
4264

000

021606
021614

040527
020107

021630

046525

021666

000116

021676
021704
021712
021720
021726
021734
021742
021750

047122
020055
020105

052103
047445
047050
031517

051117
022463
052117
0460445

040445

025052

052111
047515
047517
020113
042524
033461
020071
025040

020110
042524
041120
051525
052123
026440
047117
022452

047111
044527

INITIALIZE SECTION

12:42

X03%A (NOT X03%A) XN/

042526

020040
020101
022440
022451
053440

042522
046040
041501
020105
020123
030440
054514
000116

.EVEN

CZOMiDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42
AUTO DROP UNIT SECTION
CZDMID.PI
29-JuL~-81 11:32
4265
4266
4267
4268

.SBTTL

8
PAGE 94

SEQ 0093

AUTO DROP UNIT SECTION

111171177777 777777777777770777777777/7/77777/777/7/77777/77/7/77//77777/7/777/77/77777
;/ THE AUTO DROP CODING DETERMINES WHETHER OR NOT THE DEVICE WHOSE P-TABLE
;/ WAS JUST OBTAINED IS READY FOR TESTING, AND IT IS DROPPED IF NOT READY.
/1111177777777 777777777777777777777777777777777777777777/7777777/777/77777/7/77777

4269
6270

627
6272
6273
4274
4275
4276
6277
4278
4279
4280
4281
4282
4283
4284
4285
4286
4287
4288
4289
4290
4291
4292
4293
4294
4295
4296
4297
4298
4299
4300
4301
4302
4303
4304
4305
4306
4307
4308
4309
4310
4311
4312
4313

021756
021756
021756
021756
021762
021766
021772
021776
022000
022004
022010

BGNAUTO

012746
012746
012746
012746
104437
062706
005037
005777

000340

:
LSAUTO:

SETVEC

#4 ,ANOXMEM #PRIO7 :SET UP NON -EXISTENT MEMORY TRAP VECTOR.

(LR

NXMF LG

023630
000004
000003

000010

002352
160216

TST

aCSR

;CLEAR FLAG THAT WILL BE SET

MOV
#PR107 ,-(SP)
- (SP)
ANOXMEM,
MOV
#4 ,~(SP)
MOV
#3,-(SP)
MOV
TRAP
C$SVEC
#10,SP
ADD
IF NXM OCCURS.

cREFERENCE MEMNRY ADDRESS FOR THE

:TO SEE IF IT EXISTS.

DEVICE

::tt***t*t*ttitktfit*tttttt*tt*t*tttt*tttt*t*tt*ttfittitttttt*'t**ii*tttittttt

; IF THE DEVICE DOESN'T EXIST THE RESULTANT TRAP TO VECTOR 04 WILL
: CAUSE THE DEVICE TO BE DROPPED (SEE INTERRUPT ROUTINE ‘'DROPO4').
; OTHERWISE THE MEMORY REFERENCE IS UNEVENTFUL AND THE DEVICE IS READY.

;;t*t*tttt*ttttttfitt*t*t*fittt**fit**'i*t*ttttfittt**tttt*ttttttt**tttttttt*ttt

022014
022014
022020
022022
022026

022030
022030
022034
022036
022036
022040
022044
022044
022044
022044

012700
104436
005737
001406

000004

013700
104451

002370

104444

005037

CLRVEC

002352

TST
BEQ
DODU

NXMFLG
1%
LOGDEV

002352

CLR

JRETURN VECTOR 04 TO NORMAL STATE

MoV

#4 RO

MOV

LOGDEV,RO

TRAP

;DID NXM OCCUR?
;IF NOT EXIT
;DROP THE DEVICE

TRAP

DOCLN

ENDAUTO
104461

#¢4

NXMFLG

;DO CLEAN UP - FORCE BACK TO INIT CODE.
TRAP
;RESTORE FLAG.

L10015:

TRAP

C$CVEC

C$DODU

CSDCLN

C$AUTO

CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL=~81
12:42
CZDMID.P11Y
CLEANUP CODING SECTION
29-JuL-81 11:32
4314

.SBTTL

4315
6316

022046
022046

4330
4331
4332

022062
022062
022062

4333

4334
4335

PAGE 95

SEQ 0094

CLEANUP CODING SECTION

SIII1111777777777777777207777777777777777777777/777/7777//77/7/7/77777/77/7/7777/7777
;/
THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED AT THE
:/
END OF THE TEST SEQUENCE ON A PARTICULAR UNIT.
THIS SECTION IS REQUIRED

6317
4318
4319
4320
4321
6322
4323
4324
6325
4326
4327
4328
4329

EVEN IF IT IS A NULL CLEANUP

/1111111777777 777777777777777777770°777777777777777777/7/777777777/7777777777

022046
022052
022054
022062

BGNCLN

005737
001003
012777

002352

040000

160150

10%:
ENDCLN

104412

L$CLEAN::
TST
BNE
MOV

NXMF LG

103

#MCLR,aSELO

;WAS

THERE A NXM ERROR?

JIF YES - SKIP MASTER CLEAR.
;ISSUE A MASTER CLEAR.

L10016:

TRAP

C$CLEAN

(ZOMIDO DMR-11

CZOMID.P11T

FUNCTIONAL TESTS MACY11

29~JuL~-81

11:32

30A(1052)

29-JUL-81

12:42

8
PAGE 96

SEQ 0095

GLOBAL INTERRUPT HANDL ING ROUTINES

2%%9

.SBTTL

(338
(339
4340
4341
2%2%

1111177717777 777777777777107777777777777777777777/777777/777777777777777
;/ THE INTERRUPT HANDLING SECTION CONTAINS CODING REQUIRED TO USE
;/ THE "SETVEC® MACRO.
NOTE EVERY INTERRUPT ROUTINE SHOULD SAVE
s/ AND RESTORE RO.
IS
77777777777777777777777777777°77777777777/777777/77777777777777

6344
(345
4346
4347

022064
022064
022064
022066

4349
4350
4351
4352

022074
022100
022106
022110

4348

4353

022070

B8GNSRV

010046
010146
017701
042701
032777
001002
000137

160124

022620

(354
2%22

:
.

4357
022114
022114
022120
022122
022126
022130
022134
022136
022142
022144

4369
4370
4371
4372
4373
4374
4375
4376

022152
022156
022160
022164
022166
022166
022170
022172

4377

2%;3

022150

022176

022701
001533
022701
001537
022701
001461

022701
001444
022701

001417

022701
001410
022701
001572

1%:

000004

000000
000003

000001

PROCESS

000005

BEQ

000015
000002

000565

022200

(384
4385
4386
4387
4388

022200

113777

022206

000561

CMP
BEQ
MP
BEQ
CMP
BEQ

CMP
BEQ
CMP

104455
000021
020307
015124

4380
4381

5%:

2%3%

4£389
4390
4397

RO,-(SP)
R1,-(SP)
aSELO,R1T
#177760,R1
#RD] ,QSELO
1%
NEXT
AR

A A PR

JINPUT INTERRUPT SERVICF ROUTINE
INISR::
;SAVE RO
;SAVE R1

JSAVE THE CONTROL IN COMMAND.

JCLEAR ALL BUT THE COMMAND BITS (0-3)
;IS RDI SET
cIF YES - PROCESS INPUT COMMAND.
s ISSUE NEXT INPUT COMMAND.
N AR RN R AR AN AN AR AN R A AN RN AR AN

AR AN

RN AN

INPUT (CCMMAND

:"ttttttttttttttt'ttttttttttttttttttttttttttttttttttttttt't'ttttttttt

4358
4359
4360
4361
4362
4363
4364
4365
4366
4367
4368

INISR

MOV
MOV
MOV
BIC
BIT
BNE
JMP

160136

177760
000200

GLOBAL INTERRUPT HANDLING ROUTINES

#BACCR,R1
29%
#BACCT R
30%
#BASE] ,R1
20%

;1S
;BR
;IS
;BR
;IS
;BR

THIS A RCV. BA/CC?
IF YES.
THIS A XMIT. BA/CC?
IF YES.
THIS A BASE IN?
IF YES.

108

JBR

#CNTRL ,R1
15%
#JMODEM, R

;IS THIS A CONTROL IN?
;JBR IF YES.
IS THIS A WRITE MODEM?
YES.

CMP
BEQ
CMP
BEQ
ERRDF

#INTER,R1
5%
AHLT R
70%
17,EMG17 ,ERRGZ2

;1S THIS AN INTERFACE WRITE.
:BR IF YES.
;1S THIS A HALT?
SEXIT = IF YES (NOTHING TO SET UP)
;PROBLEM IF IT'S NOT ONE OF THE ABOVE.
TRAP
.WCRD
.WORD

70%

JEXIT

.WORD

; WRITE Ax3-15

022210

002304

160042

MOvB

AX3,aBRSEL7

70%

10%:
:

JWRITE NECESSARY AX3-15 INTERFACE.
;AX3 HAS BEEN DETERMINED [N THE INIT
. CODE.

CS$ERDF
17
EMG17
ERRGZ

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZomMID PN
29-JuL~-81 11:3¢2

30A(1052)
GLOBAL

4395
4396
4397
4398
4399
4400
4401
4402
4403
4404
4405
4406
4407
4408
4409
4610
4411

4412
4613
4414

4415

022210
022216
022220
022226
022234
022236
022236
022244
022252
022254

022737
001007
042777
052777
000546

000006

002254

000004
000110

160012
160004

042777
052777
000537

000010
000104

157774

11%:

157766

15%:

4424
4425

4426
4427
4428
4429
4430
4431
4432
4433
4434
4435
4436
4437
4438
4439
4440
4441
4642
4443
4444
4445
44bé

4447

SEQ 0096

PAGE 97

INTERRUPT HANDL ING ROUTINES

:IS LOCAL MODI:M LOOPBACK DESIRED?

CMP
BNE
BIC
BIS
BR

#LLOOP ,DMTURN

8IC
BIS
BR

#MAINTT ,QSEL6
;ENSURE LOCAL LOOPBACK IS CLEAR.
ADTR!MAINTZ,QSEL6 ;SET MAINTENANCE 2 BIT AND DIR.

11%
;BR [F NOT
MMAINTZ2 ,QSEL6
SENSURE REMO.E LOOPBACK [S CLEAR.
HDTR.MAINT1,aSEL6 ;SET MAINTENANCE 1 BIT AND DITR.
70$

70%

;CLEAR RQI

* CONTROL IN
022254
022260
022262
022270
022272
022272
022276
022300

005737

001404
012777
000530

005077
000525

002300
000400

MNTMDE

MOV

#MAINT ,aSELS

(LR
BR

aSEL6
70%

JFULL DUPLEX - NON-MAINT. MODE.

MOV

HBASE ,aSEL4

;BASE TABLE ADDRESS.

TST
BNE
MOV
BR

DMCMDE

ARE

BEQ

157750
17¢:

157742

20%:

17%

70%

;1S MAINTENANCE MODE REQUESTED
;BR IF NOT
;REQUEST MAINT.

MODE

*BASE IN

4416

4417
4418
4419
4420
4621
4422
4423

12:42

. MODEM WRITE

4392

4393
4394

29-JUL~81

022300

012777

002640

022306
022312
022314
022322
022324
022324
022330
022330
022334
022336
022344
022346
022346
022354

005737
001004
012777
000402

002276

005077

157710

005737
001004
052777
000406

002272

052777
012737

010000

005737
001004
052777
000465

002254

042777

004000

022362
022362
022366
022370
022376
022400
022400
022406

000461

000522

000100

177777

004000

157730

157716

22%:

23%:
157670
157664

:
248

002360

TST
BNE
BIS
BR

BIS

MOV

25%:
157634
157624

CLR

27%:

TST
BNE
BIS
BR

IN DMC MODE?

#DMR ,@SEL6

23%

:BR IF YES
.DMR MODE.
;CHECK LOOPBACK.

aSEL6

:DMC MODE

START

;IS THIS THE FIRST BASE IN?
;IF NOT - SET RESUME.
;ON FIRST BASE IN SET RDO INT.ENABLE.

22%

24%

#1EQ,aSELZ

25%

#RES,aSEL6
#-1,RESFLG

DMTURN

27$

#LPLU,QSEL
O

70%

BIC

#LPLU,QSELO

70%

*BA/CC IN RCV

;SET RESUME
;FLAG

THAT

THIS

IS A BASE

IN RESUME

COMMAND

s (THIS WILL BE USED LATER IN THIS ISR TO
;DECIDE WHAT THE NEXT COMMAND WILL BE)
;1S INTERNAL LOOPACK REQUESTED?
;BR IF NOT - CLEAR LU LOOP
;SET THE LINE UNIT LOOPBACK BIT
;CLEAR RQI AND EXIT.
sCLEAR LINE UNIT LOOPBACK (CONNECTOR OR
s CABLE)
;CLEAR RQI AND EXIT

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.PIN
4448
4449
4450
4651
6452

2222

4455
4456
4457

022410
022410
022414
022420

022424

4458

022426
022426

46460
4461
4462
4463

022436
022442
022442
022446

4459

4464
L465

L466
4467

4468
L4L69
4470
4471
4472
4473
4474
4475

4476

4477
4478
4479
4480
4481
L4482
4483
4484
4485
L4486

4L487

4488

29-JuUL~-81

022432

005337
012277
012277

000406

11:32

002330

012377

157576
002302

022450

052777

040000

022456

010246

022472
022476
022502
022504
022510

022512

022520
(022522
022522
022526
022530
022536
022540
022540
(022546

017702
042777

157552
160000

042702
022702
001421
022702
001004

017777
060000

052777

020000

157562

157516

022702
001004
052777

120000
040000

157500

000403
052777

060000

157470

42%:
44%:

012602
000400

4492
4493
4494

(022552
022552

010137

002364

022556
022562

005737
001011

002276

022564
022566
022570
022576

012601
012600
052777
042777

000020
000040

DEC
MOV
MOV

70%:

}

74634

7 426

PAGE 98

INRCV
(R2)+,SELS
(R2)+,aSEL6

408%

;BA/CC
;

IN XMIT

SEQ 0097

:DECREMENT COUNTER
JRCV BUFFER ADDRESS
JRCV CHARACTER COUNT

DEC

INXMIT

;DECREMENT COUNTER

MOV

(R3)+,aSELS

;XMIT CHARACTER COUNT.

TST
8EQ

MMANAG
708

BIS

MIT14,a55L6

JARE THE BUFFERS MEMORY MANAGED?
JIF NOT SKIP CONVERTING VIRTUAL ADDR
;7O PHYSICAL ADDR.
;SET BIT 16 OF PHSICAL ADDRESS (I.E.

MOV

R2,=-(SP)

BIC
CMP
BEQ
CMP
BNE

”17777 ,R2
#60000,R2
448
#100000,R2
41%

8IS
41%:

;

MOV
BIC

157544

000412

022546
022550

4500
4501
4502
4503

40$:

12:42

INTERRUPT HANDL ING ROUTINES

MOV

100000

4489
223?

4495
4496
L497
4498
4499

30%:

157600

005737
001441

(022460
022464

29%:

002326
157616
157614

005337

012377

GLOBAL

29-JUL-81

(R3)+,aSELSG

aSEL4 R
#160000,aSELS

MIT13,aSELS

JXMIT BUFFER ADDRESS.

;VIRTUAL ADDR 60000 = PHYSICAL ADDR 200000
;SAVE R2 (NEXT RCV BUFFER ADDRESS)
;SAVE THE VIRTUAL ADDRESS.
;CLEAR BITS CORRESPONDING TO THE PAGE #
JIN THE VIRTUAL ADDRESS.
sSAVE ONLY THE PAGE # IN THE SAVED ADDR.
;1S THIS PAGE 3?
JIF YES, PHYSICAL ADDRESS CALCULATED
;IS THIS PAGE 4?
;IF NOT SEE IF IT°'S PAGE 4 OR 5

JSET BIT FOR PHYSICAL ADDR (1.E.

;ADDR 100000 = PHYSICAL ADDR.

443

CMP
BNE
8IS

#120000,R2
42%
#BIT14,0SELS

448

BIS

#RITI4'BIT13,aSEL4

MOV
BR

(SP)+ ,R?2
70%

MOV

R1,LAST

IST
BNE

DM(CMDE
80%

MOv
MOV

(SP)+ R
(SP)+,R0

BIS
BIC

VIRTUAL

220000

;1S THIS PAGE 4?
:1F NOT, MUST BE PAGE 5.
;SET BIT FOR PHYSICAL ADDR (].E. VIRTUAL
;ADDR 120000 = PHYSICAL ADDR. 240000
;SET BIT FOR PHYSICAL ADDR

(I1.E.

;ADDR 140000 = PHYSICAL ADDR. 260000

#1ECLR,QSELO
#RQ] ,aSELO

VIRTUAL

JRESTORE R2 (NEXT RCV BUFFER ADDRESS)
;CLEAR RQI AND EXIT

:SAVE THE

INPUT COMMAND

(USED

;TO DETERMINE NEXT INPUT COMMAND)
JARE WE IN DM(C MODE?
;IF YES = DON'T USE [ECLR
JNOTE: INTERRUPT CAPABILITY FOR RQI
;CLEAR IS ONLY AVAILABLE IN DMR MODE.

:RESTORE R1
JRESTORE RO

sSET INTERRUPT ENABLE FOR RDI CLEAR.
;CLEAR RQ]

INT.

GENERATED WHEN RDI

—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuUL-81
12:42 PAGE 99
CZ0MID. P11
GLOBAL INTERRUPT HANDL ING ROUTINES
29-JuL-81 11:32
4504
4505
(506
507
4508
4509
4510
L4511
4512
(513
4514
4515
4516
4517
4518
4519
4520
4521
4522
4523
4524
4525
4526
4527
4528
4529
4530
4531
4532
4533
4534
4535
4536
4537
4538
4539
4540
4541
4542
4543
4544
4545
4546
4547
4548

022604

000002

022606
022606
022614

042777

157416

BIC
CALL

#JECLR,QSELO

$CLRQI

JRETURN AND WAIT FOR RQI

CLEAR

sENSURE

FOR RDI

INTERRUPT ENABLE

;CLEAR RQI

'-.tt"itt*l’fitfiti"t'tttttttttt

AND WAIT FOR RDI

8RS0

INTERRUPT.
CLEAR

TO CLEAR.

IS CLR.

RdRRRRRRARRRRRRaRdRRARERd

: RDI CLEAR = DETERMINE NEXT INPUT COMMAND.
4

.'"tttt'tttttttt'ttttttfit**fitt.tttfitfi'ttfittti"fit*tttt'ttittitttt‘t'tt

022620
022620
022626
022630
022634
022636
022642
022644
022650
022652
022652
022656
022660
022664
022666
022670
022670
022676
022700
022706
022710
022716

022737
001011
005737
001537
005737
001403
005737
001131

000002

005737
001404
005737
001434
000441

002276

022737
001411
022737
001414
022737
001417
000424

000003

002364

000015

002364

000005

002364

005737
001404

002262

4554

023016

002356
110%:

002272

005737
001404

002306

112777

000145

005237
112777
000461

002272
000141

005737
001424
005737
001415
032737
001411
005737

002326

000001

002360

1118:

157274
117%:

157256

130%:
157242

150%:

002326

KHLT ,LAST

;WAS

TST
BEQ
TST
BEQ
BR

DMCMDE
111$
START

JARE WE IN DMC MODE?
;1F NOT (DMR MODE) - (HECK INTERFACE.
JHAVE WE DONE A CONTROL IN?

CMP
BEQ
cMP

MBASE] LAST
115%
#INTER,LAST

;WAS THE LAST COMMAND A BASE IN ?
;IF YES - SEE IF INTER. OR M. WRITE IS NEEDED?
JWAS THE LAST COMMAND AN AX3-15 WRITE?

CMP
BEQ
BR

AWMODEM , LAST

TST

TST
BEQ
TST
BEQ
TST
BNE

BEQ

115%:

002274

CMP

BNE

002354

000155

000467

002364

002274

112777

000476

4549
4550
4551
4552
4553

4555
4556
4557
4558
4559

;CLEARS IN RESPONSE.

RTI

000020

SEQ 0098

1109
RE SUME
170%
INFLAG
1108
OUTFLG
1708

1308
1508

THE

LAST

COMMAND A HALT?

;1F NOT - PROCEED.
JARE WE TESTING RESUME?
;IF NOT, DON'T ISSUE ANOTHER COMMAND.
2 INPUT BUFFER DONE?
;1F NOT, PROCEED.
;OUTPUT BUFFER DONE?
sIF YES, DON'T ISSUE ANOTHER COMMAND.

;IF NOT, DO IT.
;OTHERWISE = KEEP CHECKING ON NEXT COMMAND.

117$%

IF YES - CHECK FOR MODEM WRITE.

130%
1508

;1F YES = ISSUE A CONTROL IN.
KEEP CHECKING FOR NEXT COMMAND.

;WAS

THE

LAST

COMMAND A WRITE MODEM.

BEQ
MOVB
B8R

INFACE

117%
:BR IF NOT
:;SEET!RQI!INTER.QBSELO ;ISSUE AN AX3-15 WRITE COMMAND.

;1S AN AX3-15 WRITE NEEDED?

TST
BEQ

WMAINT

JWRITE MAINT

START

JSET FLAG THAT (CONTROL

MovB
BR

INC

OR 2?

1308
s IF NOT - SKIP WRITE MODEM COMMAND.
?;ggET!RQl!UMODEM.aBSELO ;ISSUE A MODEM WRITE COMMAND
IN WAS ISSUED.

MOvVB

#IESET!RQI!CNTRL,aBSELO ;ISSUE A CONTROL

TST
8EQ
TST
BEQ
BIT
8EQ
ST

INRCV
160%
RE SUME
153%

JARE ALL THE BA/CC IN RCVS DONE?
;IF YES = BR TO SEE IF XMITS DONE.
;1S A TEST OF RESUME REQUESTED?
;BR IF NOT.

153%

;BR IF NOT.

170%

#BI1T0, INRCV
RESFLG

;1S THIS AN ODD COUNT?
JWAS

THE

LAST

COMMAND A BASE

[N RESUME?

CZDOMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZDMID.P11
29-JUL-81 11:32
4560
4561
4562

023022

8
I
30A(1052)
29-JuL-81
12:42 PAGE 100
GLOBAL INTERRUPT HANDLING ROUTINES

001004

BNE

152%

4563

4564

4565
4566

4567
4568
4569

4570
4571

4572
4573
4574
4575
4576
4577
4578
4579

4580
4581

ISSUE BA/(C

THALT ="TO TEST RESUME.
:0CCUR ONLY WHEN RESUME

NOTE: THIS WILL
IS REQUESTED,

:FOLLOWING EVERY OTHER BA/((

023024
023032

023034
023034
023040
023040
023046
023050
023050
023054
023056
023062
023064
023072
023074
023100

4582
4583
4584
4585
4586
4587
4588
4589
4590
4591
4592
4593

023102
023110
023112
023112
023116
023116
023124
023126
023126

4595
4596
4997

023134
023134
023136

4599
4600

023140
023140

4601

;1F YES,

SEQ 0099

023140

112777
000440

000142

005037

002360

112777
000432

000144

005737
001424
005737
001415
032737
001411
005737

002330

001004

157200
1528:

157164

153$:
1608:

002274
000001

(02330

002360

000142

157122

005037

002360

112777
000403

000140

157106

012737

177777

002354

1628:
163$:
165$:
1708

012601
012600

(NEVER FOLLOWING A RESUME)

#JESET!RQI'HLT,@BSELO ;HALT |T
1703

CLR

RESFLG

MOVB
BR

#IESET!RQI!BACCR,@BSELO ;ISSUE A BA/CC
1708

18T
BEQ
TST
BEQ
BIT
BEQ
TST

INXMIT
1658
RE SUME
163$
#8ITO,INXMIT
1638
RESFLG

MOVB
BR

NOTE: THIS WILL
:0CCUR ONLY WHEN RESUME IS REQUESTED,
:FOLLOWING EVERY OTHER BA/((
:COMMAND
(NEVER FOLLOWING A RESUME)
#IESET!RQI!HLT,@BSELO ;HALT IT
1708

CLR

RESFLG

MOVB
BR

#IESET!RQI!BACCT,aBSELO ;ISSUE A BA/CC
1708

MOV

#-1, INFLAG

:FLAG THAT ALL BA/CC INS DONE.

MOV
MOV

(SP)+,R1
(SP)+.RO

;RESTORE R1
RESTORE RO

BNE

112777
000411

:COMMAND

MOVB
BR

162

:CLEAR FLAG.

IN RCV.

COMMAND.

;ARE ALL THE BA/CC IN XMITS DONE?
:IF YES, SET THE FLAG
IS A TEST OF RESUME REQUESTED?
:BR IF NOT.
:IS THIS AN ODD COUNT?
:BR IF NOT.
:WAS THE LAST COMMAND A BASE IN RESUME?
:IF YES, ISSUE BA/((
HALT = TO TEST RESUME.

;CLEAR BASE

IN RESUME FLAG.

ENDSRV

IN XMIT COMMAND.

L10017:

000002

RTI

4603

;tittfitttttt*t*tttttt!tttttttt***it'*t*ittttttttttttttttttttttttttitt

4604

:ttt*tttt*tttttttttfiittttit'ttfitttittttfitttttt*l*ttttt*ttttti'ttitttt

4605

4606
4607
4608
4609
4610
4611
4612

4613
4614
4615

023142
023142
02314¢
023144
023152
023154
023154
023156

023160

BGNSRV
010046
032777
001006
104455
000022
020353

000200

157062

OUTISR
MOV
BIT
BNE

RO,=(SP)
#RDO,QSEL2
5%

ERRDF

18,EMG18,ERRG2

:OUTPUT INTERRUPT SERVICE ROUTIN
OUTISR::
: SAVE RO
IS THE RDO OUT BIT SET?
:IF YES - Ok _TO PROCEED,
:OTHERWISE REPORT

SPURIOUS

INTERRUPT

TRAP
.WORD
.WORD

CSERDF
18
EMG18

p—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID P11
4616

W617
4618

4619

4620
4621
4622
4623
4624
4625
4626
4627
4628

29-JuL-81

11:32

015124
000137

023566

023162
023164
023170
023170
023176
023200

032777
001452
032777
001013
032777
001407
000137

GLOBAL

000001

157036

001000

157032

000040

157022

023676

7%:

104455
000011
020040
015124
000570

023272
023300
023306
023310
023310
023310
023312
023314
023316
023320
023324
023324
023230
023332
023340
023342
023342
023344
023346
023350
023352
023354
023354
023362

005737
001403
005737
001146

002354

005737
001414
012777
000240
000240
052777

002274

112777

000543

5%:

10%:

002356
15%:

8
PAGE 107

SEQ 0100
.WORD

60%

BIT
BEQ
BIT
BNE
BIT
BEQ
JMP

ACNTRL ,@SEL?2
20%

;IS THIS A CONTROL CUT
;IF NOT - PROCESS BA/CC OuT

10%
#DMRRUN ,@SEL6
ggg

JIF IT IS - SEE IF WE SHOULD RESUME.
;IS THIS DMR RUN MODE ACKNOWLEDGE?
;é;1¥07 = REPORT ERROR

ERRDF

9.EMGY,ERRGZ

HHALTC ,aSELG

21S

SJUNEXPECTED CONTROL CUT.

65%

JEXIT ROUTINE

TST
BEQ

INFLAG
15%
OUTFLG
60%

;ARE THE INPUTS DONE?
;BR IF NOT
;ARE THE OUTPUTS DONE?
;IF YES - ALL DONE, EXIT

RE SUME
16%
#MCLR,QSELO

;IS A RESUME REQUESTED?
;IF NOT - BRANCH TO ERROR.
;ISSUE A MASTER CLEAR.

#]1EO,QSEL2

:RESET INTERRUPT ENABLE (MASTER
sCLEAR - CLEARS ALL BITS)

BNE

TST

156744

000100

156734

MOV
NOP
NOP
BIS

000143

156724

MOVB

#IESET!RQI'BASEI,®SELO

65%

;BRANCH 0QUT.

ERRDF

16,EMG16

JERROR =~ UNEXPECTED HALT.

B8R

023566

20%:

002302
040000

156700

104455

000013
020116
015124
000505
140000
156650

156656

21%:

ISSUE A BASE

TRAP
.WORD

EMGS
ERRGZ

TRAP

C$ERDF

.WORD
.WORD
.WORD

608

TST
BEQ
BIT

MMANAG
408

;ARE THE BUFFERS MEMORY MANAGED?
;IF NOT - NO NEED TO DETERMINE PHYS.

BNE
ERRDF

21%
11.EMG11,ERRG2

;PROCEED - IF BIT SET.

;1S BIT 16 OF THE PHYSICAL ADDR SET?
;(1.E. BUFFER SHOULD BE IN PHYSICAL
;ADDRESS RANGE: 200000 - 277776)

ADDR.

.WORD
.WORD
.WORD

60%

BIC

#BIT15!BIT14,aSEL6 ;CLEAR THE EXTENDED ADDRESS BITS.

@SEL4 ,R2

16
EMG16

TRAP

BR
MOV

g$ERDF

. WORD
. WORD

JMP

H#BIT14 ,QSELG

ERRGZ

THIS CONTROL OUT A HALT?

040000

001005

042777
017702

JMP

BEQ

104455
000020

005737
001452
032777

12:42

INTERRUPT HANDLING ROUTINES

TST

16$:

020250
000000
000137

29-JUL-81

;SAVE BITS 0-15 OF THE PHYSICAL ADDRESS.

CSERDF

11
EMG11
ERRG?2

SEQ 0101

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42 PAGE 102
GLOBAL INTERRUPT HANDLING ROUTINES
CZOMID P11
29-JuUL-81 11:32
4672
4672
4674
4675
4676
4677
4678
4679
4680
4681
4682

023366
023372

0642702
042777

023400
023402
023404
023412
023414
023414
023420
023422
023430
023432

005702
001004
052777
000421

023432

4713

4714

4727

023436
023440
023446
023450
023450
023456
023456
023464
023466
023472
023476
023500
023502
023502
023504
023506
023510
023512
023514
023514
023520
023522
023522
023524
023526
023530
023532
023534
023534
023540
023544
023546
023546
023550
023552
023554
023556
023560
023562
023562

023566

017777
160000

060000

022702
001004
052777
000412

020000

022702

040000

001004
052777

100000

156636

156624

22%:
156606

23%:

120000

156570

052777

140000

156560

032777
001023
005337
022577
001406
005725

000004

156550

000403

24%:

#7777 ,R2
#160000,aSELS

TST
BNE
BIS
BR

cMP
BNE
BIS
BR

#20000,R2

CMP
BNE
BIS
BR

#40000,R2

;1S THIS PAGE 5?
;IF NOT - MUST BE PAGE 6
;SET BITS FOR PAGE 5.

#140000,3SELS

;SET BITS FOR PAGE 6.

#RCV,aSEL2

;1S THIS A RECV. BUFFER?
;IF YES ~ PROCESS THE BUFFER.

40%:

156520

005337
022477
001406

002332

41%:

50%:

156472

017724

156452

#100000,SEL4

40%

24$
#120000,aSELS
40%

51%:

60$:

;IS THIS PAGE 4?
¢IF NOT = KEEP CHECKING
;SET BITS FOR PAGE 4.

sDECREMENT BA/CC OUT XMIT.

;IS THE XMIT BUFFER ADDRESS CORRECT?
;IF

YES - PROCEED.

sINCR. POINTER FOR ERROR MESSAGE.
¢IF NOT - ERROR

TRAP

60%

SEXIT ROUTINE

CMP
BEQ
ERRDF

(R5)+,QSEL6
60%
12,EMG12,ERRGS

;1S THE CHAR. COUNT CORRECT?
JIF OK = EXIT ROUTINE.
;IF NOT = ERROR

CSERDF

-WORD
.WORD
.WORD

1
EMG11

TRAP

CSERDF
12

.WORD
.WORD
.WORD

60%

JEXIT

DEC

OUTRCV
(R4)+,aSELS
51%
11,EMG11,ERRG?7

;DECREMENT BA/CC OUT RCV
;1S THE RCV BUFFER ADDRESS CORRECT?
;IF OK = PROCEED

BEQ
ERRDF

104455

000013
020116
015764
005724
000402

23%

(RS5)+,aSELS
418
(RS)+
11.,EMG11,ERRGS

104455

000014
020141
016062
000415

40%

ouTXMT

104455

022577
001422

22%

#60000,aSEL
4

508

002334
156540

000013
020116
016062
000425

;SAVE ONLY PAGE ADDRESS BITS.
;CLEAR PAGE ADDRESS BITS IN SEL4
;JDETERMINE PAGE # FOR VIRTUAL ADDRESS.
;IS THIS PAGE 3?
sIF NOT CHECK FOR OTHER PAGES
;SET BITS FOR PAGE 3.

BIC
BIC

TRAP

.WORD
.WORD
.WORD

TS1
B8R

(R4)+

60%

;UPDATE POINTER
JEXIT ROUTINE

MOV

9SEL6, (R4) +

s CHANGE THE CHARACTER COUNT TO WHAT
;WAS RECEIVED.

ERRGS

EMG12
ERRG8

CSERDF
1

EMG11

ERRG7

CZDMIDO DMR-11 FUNCTIONAL TESTS MA(CY11
CZDMID PN
29-JuL-81 11:32
4728
4729
4730
4731
4732
4733
4734
4735
4736
4737
4738
4739
4740
4741
4742

4743
4744
4745

4746
4747
4748
4749
4750
4751
4752

4753
4754

023566
023572
023574

023626

005737

001011
005737
001006

L 8
30A(1052)
29-JuL-81
12:42 PAGE 103
GLOBAL INTERRUPT HANDLING ROUTINES

002334

TST

OUTXMT

csHAVE ALL

THE

TST

OUTRCV

JHAVE ALL

THE RECEIVES BEEN DONE?

8I1C

#1E0,aSEL2

;CLEAR THE OUTPUT INTERRUPT

81C

ARDO!CMD,aSEL2

.CLEAR THE RDO BIT.

BNE

002332

61$

042777
012737

000100

177777

156424
002356

042777
012600

000207

156410

655

ENDSRV

SEQ 0102

BNE

MoV
MoV

65%

#=1,0UTFLG
(SP) +,RO

XMITS BEEN DONE?

s IF NOT, CONTINUE
;IF NOT, CONTINUE
:FLAG AS DONE.
JRESTORE RO

L10020:

000002

RTI

.'t*tt*t*t*tfitt*tt*ifi!’fittt'ttttttttttttiittttfiitttfitt'ttttt'ttt'tt'tt.

:tttttttt*ttttt*tt*ttt**'t*'t*ttiittflt'fifitttttfitt't'tttl.ttttl\‘ LA R

023630
023630
023630

023636
023636
023636

BGNSRV

012737

000001

002352

MOV

ENDSRV

000002

NOXMEM

RS Q)

:
NOXMEM:

NXMFLG

sSET FLAG

MEMORY ADDRESSED

IS NON-EXISTENT.

L10021:

RTI

CZ0MIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
DROP UNIT SECTION
(Z0MID.PN
29-JuUL~-81 11:32
4755
4756
4757
4758
(759
4740
(751
6’62

4763
«/"6h
(765

.SBTTL

SEQ 0103

PAGE 104

DROP UNIT SECTION

1111177777777 777777777717777777777777/77777/777//77/7/7/7777777/77/7//777777/777777
:/ THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE
:/ TO NO LONGER BE TESTED.
JIIIIILL1177777777777770777777777777777777777777777777/77/7777/777777777/77777

023640
023640

BGNDU

013746
012746
012746
010600

002370
023670
000002

062706

000006

104417

023666
023666
023666
023670
023676
023704
023712

L$DU::

BRESET

104433

4766

$767
(768
4769
4770
L77
4772
4773
4774
4775
4776
4777
4778
4779
4780
4781
4782
4783
4784

12:42

PRINTF

;ISSUE UNIBUS RESET TO CLEAN UP
#FMDROP,LOGDEV

ENDDU

L10022:

104453

047045
052111
040445
050120
023720

040445
022440
042040
042105

047125

031104

047522
000

FMDROP:

.ASCIZ

.EVEN

/XNXZAUNIT XD2XA DRGPPED/

TRAP

CPRESET

MOV
MOV
MoV
MOV

LOGDEV,=(SP)

#FMDROP ,-(SP)
#2.-(SP)

TRAP
ADD

SP,RO
CSPNTF
#6,SP

TRAP

csbu

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42 PAGE 105
TEST 1 - DMR CSR VERIFICATION
CZOMID.P1
29-JuL-81 11:32
.SBTTL

4785
4786
4787
4788
4789
4790

4825
4826
4827
4828
4829
4830
4831
4832
4833
4834
4835
4836
4837
4838
4839
4840

TEST 1 - DMR CSR VERIFICATION

BBNBB NEBNBBENBN B

1333232322228

4791
4792
4793
4794
4795
4796
4797
4798
4799
4800
4801
4802
4803
4804
4805
4806
4807
4808
4809
4810
4811
4812
4813
4814
4815
4816
4817
4818
4819
4820
4821
4822
4823
4824

0022380

023720
023720
023724
023730
023734
023740
023742
023746
023752

202 0Rd0d2

THE DMR IS AN NPR DEVICE RESIDING ON A UNIBUS.
COMMUNICATION
BETWEEN THE MAIN CPU AND THE DMR IS ACCOMPLISHED THROUGH A
SET OF FOUR 16-BIT UNIBUS CONTROL AND STATUS REGISTERS (CSRS).
THE FOUR REGISTERS ARE ASSIGNED ADDRESSES IN THE 1/0 PAGE
FLOATING ADDRESS SPACE: 76XXX0 = 76XXX6
NOTE: THIS TEST IS REDUNDANT IN THAT STATIC LOGIC TESTS SHOULD
HAVE BEEN RUN BEFORE THESE FREE-RUNNING TESTS WERE STARTED, AND
THEY SHOULD HAVE DETECTED ANY (SR ADDRESSING PROBLEMS.

BUT JUST IN CASE THOSE STATIC TESTS AREN'T RUN, WE'LL BE SAFE.
220000

012746
012746
012746
012746
104437
062706
005037
005001

000010
002352

CLR
CLR

;

[

822202t R20dRR0A00R200R2228020d
RS

#4 ,#LOCATE ,#PRI0O7 :SET UP NON -EXISTENT MEMORY TRAP VECTOR.
MOV

1 2822320222208

;

[

156252
000002
156244

013700
104451

002370

MEMORY REFERENCE

104444

156230

002352

012700

000004

INTERRUPT ROUTINE
THE

DEVICE

‘LOCATE').

OTHERWISE

THE TRAP
THE

IS READY FOR FURTHER TESTS

TST
MOV

@SELO
#2,R1

;TEST THE CSR AT 76XXX0
;sSAVE THE OFFSET OF THE NEXT CSR

MOV
TST
MOV
TST
TST

#4 ,R1
aSEL4
#6 ,R1
SEL6
NXMFLG

:SAVE THE OFFSET OF THE NEXT CSR
sTEST THE CSR AT 76XXX4
JSAVE THE OFFSET OF THE NEXT CSR
sTEST THE CSR AT 76XXX6
;WAS THERE A TRAP?

DODY

LOGDEV

BEQ

THE

002288202820 830d0¢200RdCRC82020002R0d2F2R2RE22232323%34823;

IS UNEVENTFUL AND

@SEL?2

108

;TEST THE CSR AT 76XXX2

;IF NOT - EXIT.

;DROP THE DEVICE

MOV

TRAP

DOCLN

002352

(SEE

#LOCATE ,-(SP)
#4,-(SP)
#3,-(SP)
CSSVEC
#10,SP

820 2dtRRdCRRARRRttRsRtt
R
Rt 0d2a0d0028t00RRRtRRRRtatsRREE

TST

000004
156236
000006

005037

;4 CSRS WE ARE ADDRESSING.

IF ADDRESSING ANY ONE OF THE CSRS RESULTS IN A TRAP TO VECTOR 04,

222222882 d

005777
012701
005777
012701
005777
012701
005777
005737
001406

;FLAG USED IN THE TRAP ROUTINE.
JUSE REGISTER TO REMEMBER WHICH OF

00228200020

; WILL REPORT THE ERROR

#PRIO7 ,-(SP)

MOV
MOV
MOV
TRAP
ADD

NXMFLG
R1

024032
024032
024032

T1::

SETVEC

000340
024042
000004
000003

24016
024016
024022
024024
024024
024026

BGNTST

023754
023760
023764
023770
023774
024000
024004
024010
024014

220220 d28ciiitRRiltstR
ittt didd

TEST 1 - DMR-11
VERIFY THAT ADDRESSING THE 4 UNIBUS CSRS DOES NOT CAUSE A NONEXISTENT MEMORY TRAP.

. % 1228822232028

023720
023720

SEQ 0104

;DO CLEAN UP - FORCE BACK TO INIT CODE.
THE

FLAG.

TRAP

CLR

NXMF LG

:RESTORE

CLRVEC

:RETURN VECTOR 04 TO NORMAL STATE

MOV

LOGDEV,RO
C$DODU

CSDCLN

#4 RO

CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11
cZomiID P
29-JuUL-81 11:32
“841
4842
4843
(844
4845
4846
4847
(848
4849
4850
4851
4852
4853
4E54
4855

4856

4857
4858
4859
4860
4861
4862
4863
4864
4865
(866

4867

4868
4869
4870
4871
4872
4873
4874
4875
4876
4877
4878
4879
4880
4881
4882
4883
4884
4,885
4886
4887

024036

024040
024040
024040
026042
024042
026042
024044
024050
024052
074052
€ 4054
024056
024060
024062
024066
024066
024066
024072
024074
024100
024104
024106
024110
024114
024116
024116

30A(1052)

29-JuUL-81

TEST 1

12:42

9
PAGE 106

SEQ 0105

- DMR (SR VERIFICATION

10443¢€

ENDTST

L10023:

104401
BGNSRV

010046
005737
001006
104455
000006
024120
000000
005237
016146
010146
012746
012746
010600
104415
062706
012600

024116

000002

024120
024126
024134
024142
024147
024154
024162
024170
024176
02404
024212
024220
024226

042101
020123
020122
050101
045
051503
046105

024501

047445
047504
052117
047520
000

024230

002352

"0%:

002232

ENDSRV

051104
051105
020055
032040
031523
020122
042045
040440
022466
051505
051040
042116

051505
047522
051124
000
040445
051450
022461
020124
020101
047040
051505
047045

RO,=-(SP)

BNE

NXMFL G
10%

:SAVE RO

ERRDF

6,EMTO

;DEVICE FATAL ERROR
JNON=-EXISTENT DEVICE ERROR

INC

NXMF LG

JSET

PRINTX

#FMTO,R1,CSR(RT1)

CSETST

JHAVE WE HAD AT LEAST 1 PREVIOUS TRAP?
JIF YES, DON'T BOTHER DECLARING ANOTHER

THE

;PRINT

FLAG
THE

(SP)+ RO

;RESTORE RO

CSR

THAT

EMTO:

LASCIZ

/ADDRESS ERROR -

FMTO:

LASCIZ

/XS3%ACSR

TRAP
.WORD
. WORD
.WORD

DOESN'T RESPOND.
MOV
MOV
MOV
MoV
MOV
TRAP
ADD

L10024:

.EVEN

TRAP

LOCATE::

MOV
TST

MOV

($CVEC

JINTERRUPT SERVICE ROUTINE

LOCATE

024147
000003
000010

TRAP

RTI

TRAP 4/

(SELXD1XA)

AT X06XA DOES NOT RESPONDZN/

CSERDF
6
EMTO
0

CSR(R1) ,-(SP)

R1,-(SP)
#FMTO,=-(SP)
#3,-(SP)

SP,RO
CSPNTX

#10,SP

12:42
29-JuL-81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
TEST 2 - ROM CHECK
CZDMID.P11
29-JuL-81 11:32

4888
4889
4890
4891
4892
4893
4894
4895
4896
4897
4898
4899
4900
4901
4902
4903
4904
4905
4906
4907
4908
4909
4910

SEQ 0106

107

AR AR

ARRE

ANRA

RARANER RN

ANAAARRRARNARRRN

»
%

LOW

0000 - 1777

LOW

2000 - 3777

HIGH

2000 - 3777

4000 - 5777
4000 - 5777

LOW
HIGH

EETEP IR

cxkwnenknnwvwnrrts

[MPORTANT

;* FOR THIS TEST

TO RUN CORRECTLY,

e I

0000 - 1777

HIGH

VNS

T
R
IE

%
%

A
e
N

%
%
%

T
N

E03

EQ2
E04
EOT
EOS
E14

Y E

AT A

E TR

TEST 2 - DMR-11
THE
;* ROM CRC/CCITT - CHECK ROM POSITION AND CALCULATE CRC/CCITT.
1ST
THE
;* LAST 4 BYTES CONTAIN INFORMATION ABOUT THE ROM TO CHECK.
THE
Z2ND
BYTE
;* OF THESE BYTES CONTAINS THE ASCII VCRSION NUMBER.
THE 3RD AND 4TH BYTES CONTAIN A NEGATIVE
;* CONTAINS THE ROM NUMBER.
;« CRC/CCITT WORD FOR THE ROM.
CHIP ADDRESS RANGE
BYTE
ADDRESS RANGE
LOCATION
(HIP NO.

;* E85 ON THE M8207 IS ON.

ENSURE

kAR R AR AR R AR R A RARRRRNRRRN
R AR

THAT SWITCH 1

AT LOCATION

IF THIS SWITCH IS OFF, BSEL1 wiILL BE

‘» [OCKED OUT AND THE MAINTENANCE FEATURES WILL NOT BE ENABLED.

S
e

024242
024244
024250
024256
024256
024262
024266
024272
024274

024276
024302
024302
024306
024314
024322
024322

%
%

P
S
S

*
%
»

R
T
T
L

024230
024230
024230
024230
024230
024232
024240

2233282000002

%
¥

4911

4912
4913
4914
4915
4916
4917
4918
4919

PAGE

TEST 2 = ROM CHECK

.SBTTL
AR

8228

L0020

2022800dRRRRtRCR0CERR2asaRdRditRtitissdd

SUBTEST 1 - ON THE FIRST PASS PRINT THE VERSION # IN EACH ROM
SUBTEST 2 - GENERATE THE CRC-CCITT IN EACH ROM AND (OMPARE IT
IT AGAINST THE CRC BLASTED IN THE ROM
SUBTEST 3 - (COMPARE THE ROM # BLASTED IN THE ROM AGAINST THE
EXPECTED ROM #.

EEEEEl2 2208200002200
2 2R
0020020000080
Rt aRidlddd s

BGNTST

T2::

BGN ) us
104402

022737
001061
005004
012705
012737

013746
012746

012746
010600
104414
062706

000001

000001
001774

002270

T2.1:
CMP
BNE

#1,STARES

CLR

R4
#1,R5
#1774 ,ROMADR
#FMT1,LOGDEV

MOV
MOV
PRINTB

002412

002370

;# OF

THE

1%:

025540
025542
025542

$ROMO
IBSELG,REV]

csBsSuB

1ST ROM

J# OF NEXT ROM

;ADDRESS OF BYTE CONTAINING # IN ROMS O & 1

;MICROCODE VERSION

025204
000002

000006

TRAP

;1S THIS THE FIRST PASS?
;IF NOT - SKIP THIS SUBROUTINE.
;GET VERSION # FROM EACH ROM AND PRINT IT OUT

MoV
MOV
MOV
MOV
TRAP
ADD

LOGDEV,=(SP)

HFMT1 ,-(SP)
#2,-(SP)

SP,RO
CSPNTB

#6,SP

;GET ROM CONTENTS.
JSAVE THE ASCII REVISION # OF THE ROM

CALL
MOVB
MOVB

aBSEL7,REV2

PRINTB

#FMT2,R4 ,#REV1, RS HREV?

gaygTTHE

REV.

# OF

THE NEXT ROM

MoV

WREVZ,~(SP)

—

29-JUL-81

CZOMIDO DMR-11 FUNCTIONAL TESTS MACYU 30A(1052)
CZOMID.P1

12:42

T 2 - ROM CHECK

29-JuL-81 11:32

SEQ 0107

PAGE 108

MoV

4944 024326 01054¢
4945
4946
(947
(948
4949
4950
232%

024330
024334
024336
026342
024346
024350
024352

012746 025540
010446
012746 025253
012746 000005
010600
104414
062706 000014

4953
4954
4955
4956

024356
024362
024364
024370

022705
001410
062704
062705

4958

024402

000737

4957

4959

024374

4960
4961

024404
024404

(963

024404

4962

4964
L4965

4966

4967

024404

4972
4973
2g;g

6976

000005

000002
000002

002000

024406

104402

002344

005037

024414

005004

024416

005037

002412

012737

177777

002402

4979
4980

024430
024436

012737
012701

177777
001000

(002404

10%:

L10026:

12.2:

TRAP

C$ESUB

TRAP

($B8SLB

:USE THE FLAG TO MARK WHEN AN ERRDF
:HAS BEEN DETECTED IN THIS TEST.
:START CRC CHECK WITH ROM 0O

CLR

FLAG

CLR

ROMADR

;R4 IS THE ROM #., THE LOCATION FOR THE
*ROM IS CONTAINED IN THE TABLE 'ROMLOC'.
:BEGIN AT ROM ADDRESS 0

MOV

#-1,LOCRC

:INITIALIZE CRC WORD FOR THE LOW BYTE

MOV
MOV

#-1,HICRC
#1000,R1

JINIT. CRC WORD FOR THE HIGH BYTE.
SCOUNTER FOR LOOP TO READ THE ROM CONTENTS

;CALCULATION.

SAND CALCULATE THE CRC - THE COUNTER ISFOR512.,
EACH
*BECAUSE 2 ADDRESS LOCATIONS ARE READ
:PASS (I.E. THE ROMS ARE 1K X 8 BITS)

4982
4983

4984

4985

zggé

: THIS ROUTINE WILL CALCULATE/CHECK THE CRC 2 ROMS AT A TIME.

: BECAUSE A ROM OUT WILL OUTPUT THE ROM CONTENTS (I.E. 16 BITS)

4986

4989

024442

4991
4992
4993
4994

024446
024454
024462
024466

4990

4995
4996
4997

4998
4999

#REV1,~(SP)
R4 ,-(SP)
RFMTZ ,~(SP)
#5,-(SP)
SP,RO
CSPNTB
#14,SP

*ADDRESS OF BYTES CONTAINING NEXT ROM REV #S.

BGNSULB

0246422

4981

#2000, ROMADR

RS5,-(SP)

;ARE WE DONE?
JIF YES - EXIT
:INCR. ROM NUMBERS
:

104403

4977

4978

#5,RS
5%
#2 R4
#2,R5

5%:
ENDSUB

024410

024422

tMP
BEQ
ADD
ADD

ADD

002412

024406

L4968 024406
4969
4970
4971

062737

MOV
MOV
MOV
MOy
MOV
TRAP
ADD

024442

024472
024500

024506

20%:

117737
117737
005237

155566
155570
002412

002406
002410

117737
117737

155542
155544

002407
002411

005237

002412

:GET THE ROM CONTENTS

CALL

$ROMO

MOVB
MOVB

ABSELG6,LOWORD+1 ;SAVE THE NEXT LOW BYTE.
ARSEL7.HIWORD+1 ;SAVE THE NEXT HIGH BYTE.
*NOTE: AT THIS POINT LOWORD IS A WORD WHICH

MOVR
MOVB
INC
CALL

INC

BSEL6,LOWORD
ABSEL7.HIWORD
ROMADR
$ROMO

ROMADR

:SAVE THE LOW BYTE OF THE ROM CONTENTS.
;SAVE THE HIGH BYTE OF THE ROM CONTENTS.
:INCREMENT THE ROM ADDRESS POINTER
“GET THE CONTENTS OF THE NEXT ROM ADDRESS

;HAS 2 (ONSECUTIVE LOW BYTES OF ROM CONTENTS.
“INCREMENT THE ROM ADDRESS POINTER

12:42
CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29~ JUL-81
CZDMID.P1T
29-JuUL-81 11:32
TEST 2 - ROM CHECK

5000
288%

024512
024514

005301
001443

DEC
BEQ

5003
gggg

024516
024522

012703

5009
5010
5011

024524
024530

006037
006037

5012

5013
5014
S015
5016

5017
5018
5019
S020
5021
5022
5023
5024
5025
5026
5027
5028
5029
5030
5031
5032
28%2

024522

000241

024534
024536
024542
024546

102011
012702
043702
042737

024554
024560
024560
024562
024566

000020
002402
002406

050237

102010
002402
102010
002402

000241
006037
006037

002404
002410

024572

102011

024574
024600
024604
024612
024616
024616
024620
024622
024624

012702
043702
042737
050237

25%:

102010
002404
102010
002404

002402
30%:

002404
35%:

005303
001340
000707

40%:

5035
5036

5040

5041
5042
5043
5044
5045
5046
5047
5048
5049
5050
5051
5052
5053
5054
5055

R1
40%

SEQ 0108

;ARE WE FINISHED WITH THESE 2 ROMS?
:IF YES, CHECK CRC

MOV
CLC

#16.,R3

ROR
ROR

LOCRC
LOWORD

BV(
MOV
BIC
BIC

308
#102010,R2
LOCRC,RZ2
#102010,L0CRC

CLC
ROR
ROR

HICRC
HIWORD

BV(

35%

MOV
BIC
BIC
BIS

#102010,R2
HICRC,R2
#102010,HICRC
RZ,HICRC

DEC
BNE
BR

R3
25%
208

BIS

;16 BITS TO CONSIDER
;CLEAR THE CARRY

;ROTATE BITO INTO THE CARRY BIT
JROTATE BITO INTO C AND THE OLD C INTO BIT1S
:ARE THE BITS 15 & BITS 0 THE SAME?
:IF

YES

(v IS CLEAR), DON'T DO THE CRC

:NOTE: V IS THE EXCLUSIVE OR CF BITO & BIT15.
:CRC/CCITT POLYNOMIAL

R2.LOCRC

;CLEAR THE CARRY
JROTATE BIT O INTO C
;ROTATE OLD C INTO BiT15 (SIGN) & BITO INTO C
;ARE THE BITS 0 OF HICRC & HIWORD THE SAME?
:IF YES (V IS CLEAR), DON'T DO THE CRC.
JNOTE: V IS THE EXCLUSIVE OR OF BITO & BIT1S.
:CRC/CCITT POLYNOMIAL

;DO ALL

16 BITS

:GET THE CONTENTS OF

THE NEXT 2 ROM ADDRESSES.

: AT THIS POINT WE'VE READ THE CONTENTS AND CALCULATED THE CRC FOR
; 2 ROM ROMS (ONE LOW BYTE & ONE HIGH BYTE).
ALSO WE'VE READ THE

gggg

5039

9
PAGE 109

: CRC/CCITT CALCULATION - CONVERT THE WORD (LOWORD & HIWORD)
:
A SERJAL STREAM FOR CALCULATION.

5006
5007

5008

: CRC BLASTED INTO THE LAST 2 BYTES OF THE ROM (IN LOWORD/HIWORD)
024624

005137

024636
024640

001427
005737

002344

024644
024646
024654
(024654
024656
024660
024662
024664
024664
024664
024670

001007
012737

000001

024630

023737

002402

104455
000007
025472
000000

013746
013746

002406

LOCRC

BEQ
TST

50%
FLAG

BNE
MOv
ERRDF

41%
#1,FLAG
7,EMT1

PRINTB

#FMI13,R4,LOCRC,LOWORD

CMP

002344

41%:

002406
002402

COM

LOCRC,LOWORD

: COMPLEMENT THE CALCULATED CRC

;IS THE CRC IN ROM THE SAME AS THE

:CALCULATED CRC?
;IF YES = CHECK THE HIGH BYTE CRC (NEXT ROM)
:HAS AN ERRDF ALREADY BEEN DECLARED (REMEMBER
:WE'RE IN A LOOP)
:IF YES, DON'T BOTHER WITH ANOTHER ERRDF.
:FLAG THAT ERRDF HAS BEEN DETECTED.

;ROM ERROR

TRAP
.WORD
.WORD
.MWORD

CSERDF
7
EMT1
O

MOV
MOV

LOWORD ,-(SP)
LOCRC,~(SP)

(ZDMIDO DMR-11
(ZDMID.P11

5056
5057
5058
5059
5060
5061
5062
5063
5064
5065
5066
5067
5068
5069
5070
5071
5072
5073
5074
5075
5076
5077
5078
5079
5080
5081
5082
5083
5084
5085
5086
5087
5088
5089
5090
5091
5092
5093
5094
5095
5096
5097
5098
5099

iy
i
i
i
i
i
P

200000

viuaVIIVHLAWN

5101

024674
024676
024702
024706
024710
V24712
024716
024716
024720
024724
024732
024734
024740
024742
024750
024750
024752
024754
024756
024760
024760
024760
024764
024770
024772
024776
025002
025004
025006
025012
025012
025016
025020
025022
025026
025026
025026
025026

025030
025C30
025030
025032
025036
025040
025046

025046
025052

025056
025060
025060
025064

FUNCTIONAL TESTS MACY11

29-JuL-81 11:32
01044¢€
012746
012746

001007
012737

002404
002404

TEST 2 - ROM (CHECK

PAGE 110

SeQ 0109
MoV

50%:
002410

002344
000001

002410
002404

012746
012746
0104600

025330
000004

062706

000012

022704
001403
005204
000137

000005

INC
(oM
(MP
BEQ
TST
MOV

ERRDF

PRINTR

JINCR ROM #
;COMPLEMENT THE CALCULATED CRC FOR THE H] BYTE
;sROM CRC AND CALCULATED CRC THE SAME?

FLAG

;HAS AN ERRDF

60%
51%

#1,FLAG
7,EMT1

;IF

YES - CHECK THE ROM LOCATIONS.

JWE'RE

:IF

ALREADY BEEN DECLARED

IN A LOOP)

0246422

70%:

CMP
BEQ

HAS BEEN DETECTED.

TRAP

#FMT3 R4 ,HICRC ,HIWORD

INC
JMP

#5 R4

;IF

;CHECK

70%

10%

WE'VE

DONE

JEXIT WHEN DONE

ROMS 0-5,

L10027:

BGNSUB

002344

117701

155162

001775

000402
117701

155164

002412

12.3:
CLR
CLR

10%:

15%:
17%:

WE'RE

FLAG

MOv

R4
#1775 ,ROMADR

CALL
MOVB

$ROMO
aBSEL6 R

B8R

17%

MOVB

aRSEL7,R?

CSERDF

. WORD
.WORD
.WORD

7
EMT1
0

MOV
MOV
MOV

HIWORD,=-(SP)
HICRC,-(SP)
R4 ,-(SP)

MoV
MOV
TRAP
ADD

#4,-(SP)
SP.RO
CSPNTB
#12,SP

#FMT3,~(SP)

DONE.

THE NEXT KOM.

104403

005037
005004
012737

(REMEMBER

YES, DON'T BOTHER WITH ANOTHER ERRDF.

;FLAG THAT ERRDF
;ROM ERROR

MOV

60%:

SP,RO
CSPNTB
#12,SP

R4
HICRC
HICRC ,HIWORD

ENDSUS

104402

R4 ,-(SP)

HFMT3,-(SP)
#4,-(SP)

MOV
TRAP
ADD

8NE

002344

5S1%:

013746
013746

104414

12:42

MOV
MoV

104455
000007
025472
000000

010446

29-JUL-81

025330
000004
000012

005204
005137
023737
001427
005737

30A(1052)

;CLEAR FLAG

:BEGIN AT ROM 0
;ADDRESS OF BYTE

TRAP

($ESUB

TRAP

(s8suB

CONTAINING ROM #

JGET ROM CONTENTS
;SAVE THE CONTENTS OF
;FOR ROMS 0,2.4

THE LOW BYTE

:SAVE THE CCNTENTS OF

THE HIGH BYTE

;FOR ROMS 1,3.5

—

025064
025070
025072

o} VYV ESAND =2 OO 00 NN BN

iy
i G
Sl
S
S
i
i
i
S
— PO

no NIPOPNIPNONIN)
= b —d b b o b D =

(VAN TV IV, IV TV, RV TV, TV, LV, [V, LV, IV, IV, 1V, |

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZOMID.P11
29-JuL-81 11:32

OO‘O%O‘O‘O\O\U\U\\I\V\\AU\\AU‘\A\AJ\J\
NOWNBWNV=0OVO
NN
WA= O000

—t —d

)

) e

D md e

)

) =D

(UL RV LV, LV, LV LV, LV, IV AV LV, LV, LV, LV, [V, IV IV, [V, LV, [V, 1V, ]

177760

BIC

#4C17,R1

002344

TST

FLAG

001007
012737

000001

(MP
REQ

BNE

002344

025202
025202
025202
025204
025212
025c20
025226
025234
025242
025250
025253
025260
025266
025274
025302
025310
025316

025324
025330

010446
010146
005046
156416
012746
012746
010600
104414
062706

TEST 2 = ROM CHECK

MOV

ERRDF

104455

025170
025176
025200
025200
025200
025200

12:42

042701
020104
001427
005737

000007
025512
000000

025136
025142
025144
025146
025152
025152
025156
025160
025162
025166

5147

29-JUL~-81

30A(1052)

18%:

PAGE

SeEa 0110

111

R1,R4
208

;CONVERT THE ASCII BYTE TO AN OCTAL WORD.
;IS THIS THE EXPECIED ROM #
JIF YES = 0K,

189

;1F YES, DON'T BOTHER WITH ANOTHER ERRDF.

#1,FLAG

7,EMT?

;HAS AN ERRDF ALREADY BEEN DECLARED
JWE'RE IN A LOOP)
:FLAG

“HAT

;ROM ERROR

ERRDF

HAS BEEN DETECTED.

TRAP

.WORD
.WORD
.WORD

PRINTB

RFMT4 ,<B,ROMLOC(R4)>,R1,R4
MOV
MOV

(LR
BISB

025531

025414
000004

000012

022704
001410
005204
032704
001334

000005

062737
000723

002000

20%:

000001

002412
30%:
ENDSUR

MoV
MOV
MOV
TRAP
ADD

CMP
B8EQ
INC

45 ,Ré4

8IT
BNE

30%
R4
#BIT0,R4
15%

:DID WE FINISH THE LAST ROM?
;IF YES = SKIP TO THE END
JPOINT TO THE NEXT ROM #
;1S THIS AN ODD #
;IF YES GO BACK AND READ THE HIGH BYTE

ADD

#SQOO.ROMAE

;INCR. ADDRESS POINTER TO NEXT ROM #.

L10030:

104403
ENDTST

104401

047045
051103
020105
044523
020116
042045
047045
045
042045
020055
022440
051101
022462
042522
022524
040445

040445
041517
042522
047117
047125
022463
000
051101
022462
042522
022524
046517
020101
027126
000116
047522

(REMEMBER

L10025:

044515
042117
044526
044440
052111

FMT1:

LASCIZ

/XNXAMICROCODE REVISION IN UNITXD3ZA:2%N/

046517
020101
027126
022516
042045
020055
022440

FMT2:

LASCIZ

/%AROMZD2XA - REV.

022515

FMT3:

LASCIZ

/%AROMXD2XA:

R4, =(SP)
R1,~(SP)
-(SP)
ROMLOC
(R4) , (SP)
HFMTS ,-(SP)
#6,-(SP)

SP,RO
CSPNTB

CSESUB

TRAP

CSETST

%TANXAROMZDZ2XA - REV. ZTIN/

(RC

EMT?2
0

TRAP

035101

CALCUATED CRC -%06%A

gSERDF

IN ROM =06%N/

CZDMIDO DMR-11

FUNCTIONAL TESTS MACY11

CZDMID. P11

29-JuL-81

11:32

5168
5169
5170
5171

031104
040503
042524
020103
040445
020103
046517
022466
040445
040445
047522
022461
047510
042502
022440
022451

040445
041514
020104
022475
020040
047111
036440
000116
022505
044440
020115
020101
046125
051040
030504
000116

025472
025500
025506
025512
025520
025526

051103
052111
047522
047514
047117
051117

026503
020124
000122
040503
042440
000

025531
025534

0G3
001
025540
000000
000000

002
005

025336
025344
025352
025360
025366
025374
025402
0256410

LB ILE RGO 28BRIR

b o} o

)

b o

O
O O OO 0 00
00 00

[V IV, TV IV 1Y, LV, IV, 1V, LV, IV, IV, IV, IV 1V, |

025414
025422
025430
025436
025444
025452
025460
025466

025540
02554¢

30A(1052)

29-Jut -81

12:42

TEST 2 - ROM CHE(CK

9
PAGE 112

SEQ 0111

020072
040525
051103

033117
051103
051040
047445

031104
020123
062045
051450
020104
046517
040445

FMT4:

LASCIZ

/%AEXD2%A 1S ROM XD1%A (SHOULD BE ROM XD1XA) XN/

041503
051105

EMT:

LASCIZ

/CRC=-CCITT ERROR/

064524
051122

EMTZ:

.ASCIZ

/LOCATION ERROR/

ROMLOC:

BYTE 3,2,4,1,5,14.

JROM O = ROM LOCATION 3 ETC.

REV1:

.EVEN
.WORD
.WORD

;JASCI1
JASCII

004

016

REVZ:

0
0

VALUE OF
VALUE OF

THE REV.
THE REV.

NUMBER
NUMBER

CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11 304(1052)
CZDMID.P1Y

29-JuL-81 11:32

29-JUL-81

9
PAGE 113

SEQ 0112

TEST 3 - MASTER CLEAR AND MICROTEST

TEST 3 ~ MASTER CLEAR AND MICROTEST

.SBTTL

5200
5201
5202
5203
5204
5205
5206
5207
5208

12:42

R Rdiatitit ittt h

I
R
T
TR T
TR
E
TR T
AT
R

N
I NN I
I
X NI
R IEYE
IE

I I SRII IB NN NNNNNSN NN PN BE RNN N

2322222222 222223322223 2322322223223 2222222222

MASTER CLEAR

TEST 3 - DMR-11

THIS TEST WILL ISSUE 2 MASTER CLEARS. EACH CALL TO THE MASTER
CLEAR ROUTINE WILL ENSURE THAT THE NUN BIT WILL BE SET. ALSO
THE MASTER CLEAR WILL CAUSE THE DIAGNOSTIC MICROTESTS TO BE
RUN WHEN THE MICRODIAGNOSTIC BIT (BIT 13 IN SELO) IS CORRECTLY
SET OR CLEARED. BECAUSE THE RUNNING OF MICROTESTS DEPENDS ON THE

EXCLUSIVE OR OF THE

HARDWARE SWITCH 10 ON E134 OF THE MB203 AND

THE MJCRODIAGNOSTIC BIT, WE CAN'T KNOW WHETHER THE SETTING OR

CLEARING OF BIT 13 WILL RESULT IN THE RUNNING OF MICROTESTS.

THEREFORE THE MASTER CLEAR SUBROUTINE WILL TOGGLE (I.E. SET
BIT 13 ONLY ON EVERY OTHER MASTER CLEAR) THE SOF TWARE BIT.
THIS WILL ENSURE THAT REGARDLESS OF THE POSITION OF THE
HARDWARE SWITCH, MICROTESTS WILL BE RUN EVERY OTHER MASTER (LEAR.

WHEN RUNNING THIS TEST, WE EXPECT TO ADD THE RESULTS OF BSEL3
AFTER EACH MASTER CLEAR.

BSEL3 = 100
BSEL3 = 200

MICROTESTS DISABLED
MICROTESTS RUN SUCCESFULLY

éEPSQEEgESULT OF THE 2 MASTER CLEARS IS NOT 300, AN ERROR IS

ADDITIONALLY THIS ROUTINE WILL REPORT WHENEVER THE RESULT Of
THIS WILL MEAN THAT THE DEVICE IS NOT A DMR
??EE3 égcg.

il
233
2800ttt
322323
2238233233 2232222223sRat
2222228323222 223323222222

BGNTST

025544
0255446
025544

025544
025550
025550
025552
025554
025560
025562
025562
025566
025572
025574
025576
025602
025604
025604
025610

025610
025614
025614

:MACRO FOR MASTER CLEAR

CLEAR
004737

104410
000072
105777
001011

011070

154464

012746
012746
010600

017436

062706
000420

000004

117701

154434

004737

011070

104414

104410

JSR

PC, $MSCLR

ESCAPE

TST

T3::

;xexxx MACRO EXPANSION #wwxn

;ISSUE A DMR MASTER CLEAR

;it*.

LA 8 A4

;IF ERROR, BR TO TEST END.

éaga

?gSEL3

;1S THERE A DMR RESPONSE?

PRINTB

#FMG19

JREPORT DEVICE NOT DMR.

0C0001

1%:

MOVB

aBSEL3,R1

JSR

PC, SMSCLR

ESCAPE

TST

CLEAR

TRAP

CSESCAPE
L10031-.

MOV
MOV
MOV
TRAP
ADD

#FMG19,-(SP)

.WORD

#1,-(SP)

SP,RO
(SPNTB

4 ,SP

;SAVE THE RESULT OF THE FIRST MASTER CLEAR.

MASTER CLEAR AGAIN.

Jawnx MACRO EXPANSION wxw=

;ISSUE A DMR MASTER (LEAR
:ttt.

LA R &4

;IF ERROR, BR TO TEST END.

TRAP

CSESCAPE

CZDMIDO DMR~11 FUNCTIONAL TESTS MACY1) 30A(1052)
CZOMID.PY
29-JuL-81 11:32
00002¢

5258
5259
5260
5261
5262
5263

025624

060102

025632

001404

5265

025634

104455

5264

5266
5267
5268

5269
5270

5271
gs;g
5274
5275

5276
5277
5278

025620

025626

025634

117702

154420

122702

000300

025636
025640
025642

000003
025646
015240

025644
025644

1046401

025646
025654

044515
051505

025644
025644

025662
025670

020124
042514

MOVB

aBSEL3,R?2

CMPB

1300 R2

ERRDF

3 EM73 ERRG3

ADD

BEQ

R1,R2

051103
020124
047503
0425264

0S21
0475
0501
0001

EMT3:

SEQ 0113
.WORD

JADD THE RESULTS OF THE 2 CLEARS
JNOTE: ONE SHOULD BE 100 - MICRO TESTS NOT
;ENABLED AND ONE SHOULD BE 200 - MICRO TESTS
sSUCCESFULLY RUN,
JWAS THE MICROTEST COMPLETED?
;IF YES = 0K

JMICROTEST NOT COMPLETED

TRAP

L10031:
LASCIZ

.EVEN

L10031-.

;SAVE THE RESULTS OF THE SECOND MASTER CLEAR

5%:
ENDTST

PRV
To N

025616

5257

Q ad —d

5256

29-JUL
=81
12:42 PAGE 114
T 3 - MASTER CLEAR AND M]CROTEST

/MICROTEST NOT COMPLETED/

CSERDF

.WORD
.WORD
.WORD

3
EMT3
ERRG3

TRAP

CSETST

CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P1

29-JuL-81

11:32

29-JuL-81

TEST 4 - BASE

12:42

SEQ 0114

PAGE 115

IN COMMAND

TEST & - BASE IN COMMAND

LSBTTL

:tt*fi*'t!fi*Q"*‘*fi**fifi"*i""***ttR*i*tfifi'tttttttfittfififittttttt*"'tt"

TEST 4 - DMR-11

BASE IN COMMANDS

SUBTEST 1

- ISSUE A BASE

M
:*x
M

SUBTEST 2

MESSAGE VARIABLES ARE PROPERLY INITIALIZED.
- ISSUE A BASE IN - DM(C MODE.
ENSURE THAT THE DMC MODE BIT (BIT 4) IS CLEAR IN

[

I
i

I
I

DINR MODE.

ENSURE THAT THE DMR MODE BIT (BIT 4) IS SET IN
THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP

THE MICROCODE SCRATCH PAD 7 AND THAT THF DDCMP
MESSAGE VARIABLES ARE PROPERLY INITIALIZED.

:'ttl’kttt*i**fit*fitfit'fit'fi*"tQQ*'t‘!’tl’*'*"t*ififit*ittt*i*tttitfitt*titt*i'
025676
025676
025676
025676
025676
025700

BGNTST

104402

025700

004737

025704
025704
025706

104410
000244

004737

011070

:MACRO FOR MASTER CLEAR COMMAND

JSR

PC, SMSCLR

ESCAPE

TST

TRAP

011266

:ISSUE A DMR MASTER CLEAR

:kfi.i

;IF ERROR, BR TO TEST END

TRAP

0,BASE.,DMR

:BASE IN COMMAND WITH NO MAINTENANCE,
;BASE=BASE TABLE ADDRESS, AND DMR-11 MODE

JSR

PC, $BASEI]

:CALL BASE IN ROUTINE

ESCAPE

104410
000226

025726

004737

012562

025732

132737

000020

.WORD

025740
025742
025742
025744
025746
025750
025752

001004

BASE
DMR

TST

104455
000024

108:

sexxx MACRO EXPANSION wwanx

;MAINTENANCE MODE BITS TO SET IN BSEL1
;BASE TABLE ADDRESS
;MODE

:fi*fit

1 8 2 8 4

;1F ERROR, BR TO TEST END

TRAP

.WORD

SHUTDN

002732

CSESCAPE

L10032~-.

BASEIN

.WORD
.WORD

025722
025722
025724
025726

csBsSuB

Jexex MACRO EXPANSION wwxxn

.WORD

000522

026374
000000

T4.1:

CLEAR

025710
025710
025714
025716
025720

T4::

BGNSUB

C$ESCAPE

L10032-.

;xxex MACRO EXPANSION wxx»
:DMR HALT ROUTINE.

JSR

PC, $HALT

BITB

#8174 ,BASE+]SP7 ;SEE If THE DMR MODE BIT IS SET IN THE

BNE
ERRDF

10%
20,EMT4

"fitfi*

1 2.8 4 1

:DMR SCRAT(CH PAD REGISTER 7 (BASE TABLE
;LOCATION CONTAINS AN IMAGE OF SP7)

;0K IF SET - BR

TRAP

.WORD
.WORD
.WORD

s CHECK MESSAGE EXCHANGE VALUES

C$ERDF

20
EMT4
0

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P11
5335

5336
5337
5338

5339
5340

5341
5342
5343
5344
5345

5346

5347
5348
5349
5350
5351
5352
5353
5354

g%gg

5357
5358
5359
5360
5361
5362
5363

5364

5365

5366
gggg

5369
5370
5371
5372
5373
5374
5375
5376
5377
5378
5379
5380
5381
5382
5383
5384

5385
5386
5387
5388
5389
5390

29-JUL-81

12:42

PAGE 116

29-JuL-81

11:32

TEST 4 - BASE IN COMMAND

105737
001015
105737

002702

T1STB
BNE
TST8B

025752
025756
025760
025764
025766

025772
025774
026002
026004
026010

026012

001012
105737

001097
122737
001003
105737
001404

026012
026012
026014
026016
026020

104455
000024
026421
026154

026022

104403

026022
026022
026022

026024
026024
026024
026026

026026

026032

026032
026034

002703

BNE
TSTB

002704
000001

002705

002706
20%:

026050

BNE
CMPB
BNE
TS18B
BEQ

20%
BASE +A
208
#1 ,BASE+T
208
BASE +X
308

FRRDF

20,EMTS5,ERRT

;s IN THE BASE TABLE.

; MR (MESSAGE RECEIVED) = 0?
JERROR IF NON ZERO
; AN (MESSAGE TRANSMITTED) = 0?

JERROR IF NON ZERO
; MA (MESSAGE ACKNOWLEDGED) = 0?

JERROR IF NON ZERO
; AT (NEXT MESSAGE # TRANSMITTED) = 1?
JERROR IF NOT EQUAL TO 1.
5 X (LAST MESSAGE TRANSMITTED) = 0?

30%:
ENDSUB
:

L10033:

BGNSUB

104402
004737

011070

104410
000116

004737
000000
002640
000000

011266

104410

026052
026054

000100

026054

004737

012562

026060

132737

000020

026066
026070
026070

001404
104455

T4.2:

CLEAR

026036
026036
026042
026044
026046

BASE+R
208
BASE+N

JSR

PC, SMSCLR

;MACRO FOR MASTER CLEAR COMMAND
sanax MACRO EXPANSION #xxx
;ISSUE A DMR MASTER CLEAR

ESCAPE

TST

JIF ERROR, BR TO TEST END

BASEIN

O0,BASE.O

JSR

PC, $BASE!
.WORD
0
.WORD
BASE
.WORD
O

ESCAPE

TST

IERRR

TRAP
.WORD
.WORD
.WORD

C$ERDF
20
EMTS
ERRT1

TRAP

CSESULB

TRAP

ce8suUB

TRAP
.WORD

CSESCAPE
L10032-.

T3 %]

;BASE IN COMMAND WITH NO MAINTENANCE
;AND DMC MODE.
Junxx MACRO EXPANSION wwxx
;CALL BASE IN ROUTINE
JMAINTENANCE MODE BITS TO SET IN BSEL1
;BASE TABLE ADDRESS
;MODE
IR
KRN
;IF ERROR, BR TO TEST END

TRAP

.WORD

SHUTDN

002732

SEQ 0115

CSESCAPE

L10032-.

sunex MATRO EXPANSION axxx
;DMR HALY ROUTINE.

JSR

PC, SHALT

8118

#BIT4 ,BASE+]ISP7 ;SEE IF THE DMR MODE BIT IS CLEAR [N THE
;DMR SCRATCH PAD REGISTER 7 (BASETABLE
;LOCATION CONTAINS AN [IMAGE OF SP7)
108
;0K IF CLEAR - BR
20,EMT6
TRAP
C$ERDF

BEQ
ERRDF

INRRR

KRR®

m 9
12:42
PAGE 117
CZDMIDO DMR-11_FUNCTIONAL TESTS MACY11 30A(1052)TE 29-JuL-81
ST
- BASE IN COMMAND
CZDMID.P1N
29-JuL-81 11:32
026072
026074
026076
026100

000024
026467
000000

026100
026104
026106
026112
026114
026120
026122
026130
026132
026136
026140
026140
026140
026142
026144
026146
026150
026150

105737
001015
105737
001012
105737
001007
122737
001003
105737
001404

026150
026150

026152
026152
026152
026154
026154
026154
026160
026162

.WORD
.WORD
.WORD

10%:

002703

= 0?
ERROR IF NON ZERO
AN (MESSAGE TRANSMITTED) = 0?

002704

;

(MESSAGE ACKNOWLEDGED)

;

(NEXT MESSAGE # TRANSMITTED)

(LAST MESSAGE

000001

;

H#R

(NESSAGE RECEIVED)

:ERROR IF NON ZERO

JERROR IF NON ZERO

002705

002706
20%:

30%:

L10034:

104403
ENDTST

L10032:

104401

105737

002702

005046
153716
012746
012746
010600

002702
026526
000002

062706

000006

105737

002703

001413

005046
153716
012746
012746
010600

002642
026557
000002

062706

000006

104414

TRANSMITTED)

20,EMT5,FRRT1

ENDSUB

001413

= 0?

;ERROR IF NOT EQUAL TO 1.

BGNMSG

20
EMT6
0

s CHECK MESSAGE EXCHANGE VALUES
:IN THE BASE TABLE.

002702

104455
000024
026421
026154

104414

026240
026244

SEQ 0116

ERRT1
TSTR
BEQ
PRINTB

BASE+R
;IS #R = 02
1%
;0K ~ IF ZERO
HFMTS,<B,BASE+R> ;PRINT 4R

= 1?

= 0?

TRAP
.WORD

.WORD
-WORD

CSERDF
20
EMTS
ERRTI

TRAP

($ESUB

TRAP

CSETST

ERRT1::

=(SP)
BASE+R, (SP)
HEMTS,=(SP)
#2,-(SP)

1%:

SP,RO
CSPNTB
#6,SP

TSTB

BEQ
PRINTB

BASE+N

JIS AN = 02
;0K = IF ZERO

#FMT6,<B,BASE+N> ;PRINT #N

=(SP)

E
+2, (SP)
BAS

NFEMT6,~(SP)
#2,-(SP)

SP,RO

2%:

CSPNTB
#6,SP

N 9
12:42 PAGE 118
29- JUL-81
(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
TEST & - BASE IN COMMAND
CZOMID P11
29-JuL-81 11:32
5447
5448
5449
5450
5451
5452
5453
5454
5455
5456
5457
5458
5459
5460
5461
5462
5463

026244
026250

005046
153716

012746
012746

5481
5482
5483
5484
5485
5486
5487
5488
5489
5490
5491

5492
5493
5494
5495

5496
5497
5498
5499
5500
5501
5502

002704

T1STB
BEQ

PRINTB

122737
001413

005046

105737

002706

026364
026366
026372
026372
026372
026372

104414

026374
026402
026410
026416

;IS #A = 02

sOK = IF ZERO

NFMT7,<B,BASE+A> ;PRINT #A

CLR
8158

002705

3%:

MOV
MoV
TRAP
ADD

CMPB
BEQ

PRINTB

002705
026641
000002

001413

026362

0000C1

153716
012746
012746
010600
104414
062706

026342
026344
026344
026346
026352
026356

BASE +A

002704
026610
000002
000006

5464
5465
5466

5467
5468
5469
5470
5471
5472
5473
5474
5475
5476
5477
5478
5479
5480

105737

001413

SEQ 0117

000006

A ¥

002706
026672
000002

062706

000006

CLR
B1SB
MOV
MOV

MOV
TRAP
ADD

1STB

BEQ

PRINTB

005046
153716
012746
012746
010€00

#1,BASE+T
JIS AT = 12
4%
;0K = IF ONE
H#FMT8,<B,BASE+T> ;PRINT AT

BASE +X
5%

HFMT9,<B,BASE+X>

026474
026502
026510
026516
026524

046440
042507
040511
024523
041440
052103
104
042117
046504
020124
046103
000104

;PRINT #X

026526

040445

-(SP)

BASE+T, (SP)
RFMT8,=-(SP)
#2,-(SP)
SP,RO

CSPNTB
w6,SP

MOV

-(SP)
E
+X, (SP)
BAS
#FMTY
- (SP)
#2,-(SP)

TRAP
ADD

CSPNTB
#6,5P

TRAP

C$MSG

CLR
BISB
MOV

MOV

5%:
ENDMSG

L10035:

020122
041040
052117
000
041504
051505
053040
046102
047040
051117
000
041515
020105
020122
047516
040505

047515
052111
051440

EMT4:

LASCIZ

/DMR MODE BIT NOT

050115

EMTS:

LASCIZ

/DDCMP MESSAGE

046440
020055
044502
020124

EMT6:

LASCIZ

/DMC MODE

051043

024040

FMTS:

LASCI2

/XANR

040523
051101
024105
052117
042522

SP,RO
CSPNTB
#6,SP

IS X = 02
;0K = IF ZERO

104423

046504
042504
047040
052105
104

=(SP)

E
+A, (SP)
BAS
HFMT7,-(SP)
#2,-(SP)

SET/

VARIABLE(S)

- DMR BIT NOT

CORRECT/

CLEARED/

042522
(MSG. RCVD)

NOT

= XD3AIN/

CZOMIDO DMR-11

CZDMID. P11

5503

5504

—

b
rd sd e
d —d e
—t

N elo BNTo QV P JVTI N L o

VN AWVIN
NN NI wh
(I IV VL L L IV IV, LV ) vt

5505
5506
5507
5508
5509

026534
026542
026550
026556
026557
026564
026572
026600
026606
026610
026616
026624
026632
026640
026641
026646
026654
026662
026670
026672
026700
026706
026714
026722

FUNCTIONAL TESTS MACYT

B 10

30A('|052)T 2 9-JuL-81

SEQ 0118

12:42
PAGE 119
&4
BASE IN COMMAND
EST

29-JuL-81

11:32

051515
053103
022440
000
045
046450
046530
020075

027107
024504
031504

051040
036440
047045

021501
043523
05211
042045

020116
020056
020051
022463

FMT6:

LASCIZ

/AN

040445
051515
045503

040443

027107
020051
031504

024040
040440
036440
047045

FMT7:

LASCIZ

/XASA (MSG. ACK)

XD3XN/

021501
054105
052111
042045

020124
020124
020051
022463

FMT8:

LASCIZ

/YART

(NEXT

XMIT)

D3N/

054043
052123
024524

024040
054040
036440
047045

FMTY:

LASCIZ

/XARX

(LAST

XMIT)

D3N/

000116

022440

031504

.EVEN

(MSG.

XMIT)

ID3AIN/

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZ0MID.P11
29-JuL-81 11:32

30A(1052)

2 9-JuL-81

TEST

12:42

c 10
PAGE 120

SEQ 0119

5 - DMR COMMANDS
TEST

.SBTTL

S = DMR COMMANDS

224232322323 22232233222 2232282222220 2222232222222222202222232222222220d
228022/

8,0,
N,N,

%
%
%

ISSUE AN ENABLE EXTENDED ERROR COMMAND AND CHECK THAT
THE EXT. ENABLE BIT 15 SET IS SCRATCH PAD 13.
THEN
DISABLE EXTENDED ERROR AND CHECK THAT THE ENABLE BIT
1S CLEAR,
- SET REP/SEL TIMER VALUE AND SET THE DMR THRESHOLD
VALUES.
(HECK THAT THE VALUES ARE CORRECT IN
THE BASE

0B,

5 - DMR-11

TABLE AFTER HALTING

THE

DMR.

B0y

SuBT EST 2

TEST

;* DMR COMMANDS
*
SUBT EST 1
=

2332220223223 0220220220222t
R0
0RaRRRaRRRtRRdtRRdRdd Al

026724
026724
026724
026724
026724
026726
026726

BGNTST

T5::

BGNSUB
104402

004737

15.1:

JMACRO FOR MASTER CLEAR COMMAND

CLEAR

011070

JSR

PC,

SMSCLR

;ISSUE A DMR MASTER CLEAR
*

ESCAPE

104410

004737
004000
002640
000522

011266

104410

000312

004737

026772

JSR

PC,

$BASE!

.WORD
.WORD
.WORD

LPLU
BASE
DMR

012062

s CALL BASE IN ROUTINE WITH DEFAULTS
;SET LINE UNIT LOOP
;BASE TABLE ADDRESS

;DMR-11 MODE
22

000274

;IF ERROR, BR TO TEST END

DMRIN

EXERR

;ENABLE EXTENDED ERROR NOTIFICATION

JSR

PC, S$DMRIN
EXERR
.WORD

O
O

sxxxx MACRO EXPANSION

PC,

ESCAPE

TST

$SHALT

JNO SEL4
JNO SEL6

B 2 4
L2

AW AKX

THE

TRAP

.WORD

DMR

;erxx MACRO EXPANSION
;DMR HALT ROUTINE.
cANRXRN

026776

CSESCAPE
L10036~.

;CALL DMR MODE INPUT ROUTINE
; INPUT COMMAND

;HALT

JSR

TRAP
.WORD

& 8
LR

;IF ERROR, BR TO TEST END

TST

SHUTDN

012562

8 &
L2

TST

ESCAPE

104410

LINE UNIT LOOP,

ESCAPE

LWORD
.WORD

004737

CSESCAPE
L10036-.

sxxxn MACRO EXPANSION wxxx

026766
026766
026770
026772

TRAP

TO TEST END

JBASE IN COMMAND WITH

BASEIN

026754
026760
026762
026764

.WORD

026750
026750
026752
026754

ERROR,

000330

026736

026736
026742
026744
026746

1 2

RN RN

;IF

TST

c$8suB

swnxx MACRO EXPANSION xxxx
»

026732
026732
026734

TRAP

2 3
LA

L8
B &

*IF ERROR, BR TQ TEST END

CSESCAPE

L10036-.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11

29~-JuL-81 11:32

5584 026776 10441C
5585 027000 000264
5586 027002 132737 000001
5587

5588

5589
S590
5591

027010

027012
027012
027014

002736

001005

104455
000030
5592 027016 027574
5593 027020 000000
5594

5595

5596

5597
5598

5599
5600
5601

5602

5603

5604
5605
5606

5607
5608
5609
5610

5611

027022

027024

027026

027030
027032
027034

027036
027042
027044
027046

5615
5616
gg}g

027054

5620

004737

0040C0

004737
000007
000000
000000

027050
027052

104410
000212

027054

004737

027060

5624

027072

001404

5626
5627
5628
5629

027C74
027076
027100
027102

104455
000030
027574
000000

5632
gggz

027104
027104

104403

5625

5630
5631

5635

5636
5637

5638
5639

027064
027074

027104
027104

132737

027110

108

104402

; IMAGE OF SCRATCH PAD 13.
;BIT SET - OK.

;ERROR EXT ENABLE CLEAR

ERRDF

24 EMT?7

208

BASEIN

LPLU,.BASE,RES.DMR ;BASE IN COMMAND WITH RESUME SET.

JSR

PC, SBASE]

.WORD

LPLU

DXERR

JSR

PC, SDMRIN
DXERR
.WORD
O
.WORD
O
.WORD

JSR
ESCAPE

000001

002736

BITB
BEQ

ERRDF

20%:
ENDSUB

IANEK

REEN

;DISABLE EXTENDED ERROR NOTIFICATION.
sawxn MACRO EXPANSION wawxx
;CALL DMR MODE INPUT ROUTINE
;INPUT COMMAND
JNO SEL&
;NO SEL6
JERRR

KRR R

;1F ERROR, BR TO TEST END

P(, SHALT

JHALT THE DMR
saxxx MACRO EXPANSION sxxx
;DMR HALT ROUTINE.

T57

;1F ERROR, BR TO TEST END.

S RRRN

TRAP
.WORD

CSESCAPE
L10036~.

222

TRAP

CSESCAPE

.WORD

L10036-.

TRAP
.WORD
.WORD
.WORD

CSERDF
24
EMT7
O

TRAP

C$ESLB

TRAP

csBsuB

#BITO,BASE+ISP13 ;CHECK EXT ENABLE BIT IN THE BASE TABLE.
:IMAGE OF SCRAT(H PAD 13.
208

24 ,EMT7

;IF CLEAR OK

;ERROR EXT ENABLE SET

L10037:
15.2:
CLEAR

CSt RDF
24
EMT7
O

:MAINTENANCE MODE BITS TO SET IN BSEL1

TST

SHUTDN

012562

TRAP
.WORD
.WORD
.WORD

;wewx MACRO EXPANSION xxx»
;CALL BASE IN ROUTINE

;BASE TABLE ADDRESS
BASE
RES!DMR ;MODE

DMRIN

BGNSUB

027106

027106
027106

BNE

ESCAPE

104410

000202

5622
5623

BITB

($ESCAPE
TRAP
.WORD L10036-.
#31TO,BASE+ISP13 ;CHECK EXT ENABLE BIT [N THE BASE TABLE.

.WORD
.WORD

012062

SEQ 0120

TEST S - DMR COMMANDS

002640
010522

027062

5621

011266

027036

027050

5619

108:

027024

5612

5613
5614

000430

29-JuL-81

D10

12:42 PAGE 121

;JMACRO FOR MASTER C(LEAR COMMAND
sxnxv MACRO EXPANSION xww»

CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZOMID.PI
29-JuL-81 11:32
5640
5641
5642
5643
5644
5645
5646
5647
5648
5649
5650
5651
5652
5653
5654
5655
5656
5657

5658
5659
5660
5661
5662
5663
5664
5665
5666
5667
5668
5669
5670
5671
5672
5673
5674
5675
5676
5677
5678
5679
5680
5681
5682
5683
5684
5685
5686
5687
5688
5689
5690
5691
5692

5693
5694
5695

027110

0047%7

011070

30A(°052)

E 10

29-JuL-81

12:42
PAGE
TEST S - DMR (COMMANDS

JSR

PC, SMSCLR

SEQ 0121

122

;ISSUE A DMR MASTER CLEAR

LA
A 8]

‘RN RW

027114
027114
027116

ESCAPE

1046410

027126
027126

027130

027132
027132
027134
027136

027136
027142
027144
027146

027150
027150
027152

BASE IN

004737
004000
002640
000522

011266

JSR

ESCAFE

104410

000130

004737
000012
000000
000054

TRAP

.WORD

000146

027120

;IF ERROR, BR TO TEST END

TST

012062

TST

JBASE IN COMMAND WITH LINE UNIT LOOP,
8 &4
sx*sxx MACRO EXPANSION L2
;CALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS
:DMR-11 MODE
.'lttt

;1F

L2 2 8

ERROR, BR TO TEST END

DMRIN

TiIMER,0,54

;SET REP/SELECT TIMER VALUE

JSR

PC, SDMRIN

;CALL DMR MODE

ESCAPE

104410

PC, $BASE]
LPLU
.WORD
.WORD
BASE
.WORD
DMR

.WORD
.WORD
.WORD

TIMER
0
54

TST

CSESCAPE
L10036-.

TRAP

.WORD

C(S$ESCAPE
L10036~.

swxxt MACRO EXPANSION xxxx

INPUT ROUTINE

;INPUT COMMAND
;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)
;.t.'

;IF

L2 2

ERROR, BR TO TEST END

000112

TRAP

.WCRD

CSESCAPE
L10036~.

;SET THRESHOLD VALUES AS FOLLOWS:

027154
027154
027160
027162
027164

027166
027166
027170
027172

027172

004737
000013
005403
002015

012062

THRESH,5403,2015

JSR

PC, SDMRIN
.WORD
THRESH

.WORD
.WORD

ESCAPE

104410

000074

004737

DMRIN

5403
2015

TST

JSR

PC,

=
=
=
=

NAKS RECEIVED (3)
NAKS TRANSMITTED (13)
REP/SEL SENT (15)
NO BUFFFER (4)

sxnxx MACRO EXPANSION wwxx

;CALL DMR MODE INPUT ROUTINE
. INPUT COMMAND

;SEL4 VALUE
;SEL6 VALUE
;fittt

(OR BITS TO CLEAR IN BSEL6)
(OR BITS TO SET IN BSEL6)
L2281

;IF ERROR, BR TO TEST END

SHUTDN

012562

;BSEL4
;BSELS
;BSEL6
;BSEL7

$HALT

JHALT THE DMR.
;evex MACRO EXPANSION #xw«
;DMR HALT ROUTINE.
:fil**

027176
027176
027200
027202
027210
027212

ESCAPE

104410

000064
122737
001020
122737

000054

002715

000015

002724

(MPS
BNE

CMPS

TST

;IF

#15 ,BASE
+ TH3L

TIME

TRAP

.WORD

[N BASE TABLE.

;1F NOT 54, BR TO ERROR.
;CHECK REP.

.WORD

CSESCAPE

L10036-.

ERROR, BR TO TEST END

#54 ,BASE +PRETIM sCHECK REP/SEL
108

TRAP

IN BASE TABLE.

CSESCAPE

L10036-.

C(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZ0MID P11
29-JuUL-81 11:32
95696
5697
5698
5699
5700
5701
5702
5703

5704

5705

5706
5707
5708
5709
S710
571
5712
5713
5714
5715
5716

5717
5718
5719
5720
5721
5722
5723
5724
5725
5726
5727
5728
5729
5730
5731
5732
5733
5734
5735
5736
5737
5738

5739
5740
5741
5742
5743
5744
5745
5746
5747
5748
5749
5750
5751

027220
027222
027230
027232
027240
027242
027250
027252
027252
027252
027254
027256
027260
027262
027262
027262
027262
027264
027264
027264

027266
027266
027266
027266
027272
027276
027302
027306
027310
027312
027316
027316
027320
027324
027330
027334
027336
027340
027344
027352
027354
027754
027356
027362

001014
122737
001010
122737
001004
122737

001404

30A(1052)

29-JUL=-81

TES T

12:42

SEQ 0122

5 - DMR COMMANDS

000003

002720

108
#3_ BASE+THIL

000013

002722

#13,BASE+TH2L

000004

002726

#4 BASE + THGL

10$

108

208§

10%:

;IF NOT 15, BR TO ERROR.
“CHECK NAK RCVD. THRESH.
CHECK NAK SENT

SIF NOT 3, BR TO ERROR.
THRESH.

“IF NOT 13, BR TO ERROR
*CHECK NO BUF.

THRESH.

L10040:
L10036:

005046
153716
012746
012746
010600
104414

062706

122737

001413
005046

153716

012746
012746
010600
104414

;PRINT

SELO AND

SEL?

PRINTB

24
EMT8

TRAP

(S$ESUB

TRAP

(CSETST

MOV

aSEL2.-(SP)

TRAP

(S$PNIB

ERRTZ::

ADD

C(MPS
BEQ

PRINTB

#S4 BASE+PRETIM ;1S REP/SEL TIME
1%
:BR IF OK
#FMT12.<B.BASE+PRETIM> ;PRINT 1T

OK?

OUT.

002715
027713
000002

000003

002720
027750

1%:

CMPB

#3,BASE+THIL

PRINTB

#FMT13,<B,BASE+THIL> ;PRINT

BEQ

#10,SP

BISB

TRAP
ADD

C$PNTB
#6.,SP

#FMT11.-(SP)
#2,-(SP)
SP.RO

CLR
BISB

-(SP)
,
(SP)
BASE+PRETIM

TRAP
ADD

(SPNTB
#6,5P

CLR
BISB

~(SP)
BASE¢THIL.
(SP)

MOV
MOV
MOV

002720

aSELO,~(SP)
#FMG1
.= (SP)
#3,-(SP)
SP,RO

BASE+ISP13,(SP)

MOV
MOV
MOV

002715

ERRT3

#FMT11,<B,BASE+ISP13> :PRINT OUT THE IMAGE OF SC?A;CH PAD(;és

002736
027662
000002
000006
000054

CS$ERDF

.WORD
_WORD

122737
001413

012746

TABLE.

MOV
MOV
MOV
MOV

000010

000006

153716

#FMGT ,@SELC,@SEL2

016302
000003

062706

005046

ERRT3
PRINTB

152742
152734

TABLE.

"WORD

ENDTST

BGNMSG

TABLE.

TRAP

104601

062706

IN BASE

20%:

104403

104414

IN BASE

“IF &, ALL CHECKS OK = EXIT

ENDSUB

017746
017746
012746
012746
010600

IN BASE

24.EMT8,ERRT3

104455

000030
027625
027266

PAGE 123

AFMT12,-(SP)
#2,-(SP)
SP.RO

;1S NAK RCVD OK?

:BR IF OK.

IT OuT

MOV

NFMT13,=(SP)

6 10
PAGE 124
12:42
052)T
29=-JuUL=81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY 1T 30A(1
(COMMANDS
DMR
=
EST S
29-JuL-81 11:32
(Z0MID.PN
5752

5753
5754
5755
5756
5757
5758
5759
5760
5761
5762
5763
5764

5765

5766

5767
5768
5769
5770
5771
5772
5773
5774
5775
5776
5777
5778
5779
5780
5781
5782
5783
5784
5785

5786
5787
5788

5789

5790
5791
5792

5793
5794
5795
5796
5797
5768
5799
5800
5801
5802
5803
5804
5805
5806
5807

027424
027430
027432
027434
027440
027440
027446
027450
027450
027452
027456
027462
027466
027470
027472

01274¢€
010600

062706

000006

027476
027504
027506
027506
027510
027514

122737

000015

027476

104414

000006

122737

000013

005046

153716

012746
012746
010600
104414

001413

027530
027534
027534
027542
027544
027544
027546
027552
027556
027562
027564
027566
027572
027572
027572
027572

062706

000006

122737

000004

027574
027602
027610
027616
027624
027625
027632
027640
027646
027654

054105
051122
052111

027662
027670

001413

005046

153716
012746
012746
010600

002726
030077
000002

062706

000006

104414

(MPB

BEQ
PRINTR

#13 ,BASE +TH2L

002724

3%:

CMPR
BEQ

#15 ,BASE+TH3L
(3

CLR
BISB

¥
A

CMPB

BEQ
PRINTR

#FMT1S,<B,BASE+TH3L> ;PRINT [T QUT

#4 ,BASE + THGL

CSPNTB

#6,SF

=(SP)

L,
BASE+THZ(SP)
#FMT14,-(SP)
#2,-(SP)

SP,RO
CSPNTB

;1S REP LEVEL OK?
;BR IF OK.

(LR
BISB

MOV
MOV
MoV
TRAP
ADD

002726

#2,=-(SP)
SP,RO

;1S NAK SENT 0K?

:BR IF 0K,
3%
W#FMT14 ,<B,BASE+THZL> ;PRINT IT QUT

MoV
MOV
MOV
TRAP
ADD

PRINTB

002724
030042
000002

104414

002722

2%:

002722
030005
000002

005046
153716
012746
012746
010600

027520
027524
027526

MOV
MOV
TRAP
ADD

000002

062706

001413

SEQ 0123

~-(SP)

(SP)
BASE+TH3L,
#FMT15,-(SP)
#2,-(SP)

SP,RO
CSPNTB

#6,SP

;1S NO BUFFER LEVEL OK?

b)
;BR IF OK.
#FMT16,<B,BASE+TH4L> ;PRINT IT 0QUT

CLR

BISB

MOV
MOV
MOV
TRAP
ADD

5%:
ENDMSG

:
L1004

104423

027124
051117
044440
042522

042440
041040
041516
052103

EMT7:

JASCIZ

J/EXT. ERROR BIT INCORRE(CT/

046440
047111
047503
020104
000122

EMTS:

JASCIZ

/DMR MODE INPUT ZOMMAND ERROR/

051105

051115
020105
020124
047101
047522

040445
020105

046511
043117

043501
051440

FMT11:

.ASCIZ

/ZAIMAGE OF

SP 13 = XD3IN/

TRAP

=(SP)

BASE +TH4L , (SP)
#FMT16,-(SP)
#2,-(SP)

SP.RO
CSPNTB

#6,SP

C$MSG

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID PN
29-JuL-81 11:32
5808
5809
5810
5811
5812
5813
5814
5815
5816
5817
5818
5819
5820
5821
5822
5823
5824
5825
5826
5827
5828
5829
5830

027676
027704
027712
027713
027720
027726
027734
027742
027750
027756
027764
027772
030000
030005
030012
030020
030026
030034
030042
030050
030056
030064
030072
030077
030104
030112
030120
030126
030134

02012C

000

030136

30A(1052)

29-JuL-81

TEST

12:42

H 10

SEQ 0124

PAGE 125

S = DMR COMMANDS

031461
031504

036440
047045

051101
046105
020105
020105
022463
040516
042126
051505
036440
047045
047101
047105
042522
020104
022463
042522
052116
051505
036440
047045
047101
043106
051110
042114
031504

050105
052040
040526
020075

FMT12:

LASCIZ

/%AREP=-SEL

020113

FMT13:

LASCIZ

/%ANAK RCVD

THRESHOLD = XD3%N/

FMT14:

LASCIZ

/XANAK

THRESHOLD - XD3IN/

FMT1S:

LASCIZ

/%AREP SENT THRESHOLD = ZD3IN/

FMT16:

LASCIZ

/XANO BUFFER THRESHOLD = XD3XN/

000116

052040
047510
022440
000
045501
020124
044123
020075
000116
020120
052040
047510
022440
000
020117
051105
051505
036440

047045

.EVEN

SENT

TIME

VALUE

= XD3AN/

—

——

| CZDMIDO DMR-11 FUNCTIONAL TESTS MACY'1 30A(1052)
- CZOMID.P11

29=-JuL-81 11:32

29-JuL=-81

SEQ 0125

TEST 6 - C(ONTROL IN COMMAND

TEST 6 - CONTROL IN COMMAND

LSRTTL

ggz?

110

12:42 PAGE 126

58{,2

'-""Qtlt!Qttt'ttttttt'tttttt'tttt.t'ttt'tt'tntt!'ttttltt'tttt'ttttttt

5845
5846
5847
5848

:*
L
i
;¢

L
:*

5843
5844

5849

5850

5851
5852
5853
5854

M
;*
M)
.

5856
5857

i
i

030136

5862

030136

5864
5865
5866

5867
5868

030136

104402

030140

004737

030140

030144

5872
5873
5874
5875
5876
5877

030150

5878

5879

5880

5881
5882
5883
5884
5885

5886

5887

5888

030144
030146

104410
000404

030150
030154
030156
030160

004737
004000
002640
000522

030162

030162
030164
030166

104410
000366

030166
030172

004737
000000

5889
5890

030174
030176

030176

000354

5893
5894
5895

030200
030206

052777

ggg%

SUBTEST &

BIT IS SET.

ENSURE THAT MAINT. MODE

BIT IS SET IN SCRAT(CH PAD 7.
- CONTROL IN USING SELECTED LOOPBACK. ISSUE A CONTROL IN
USING THE USER SELECTED LOOPBA(CK. [IF THE LOOPBACK IS
NOT CORRECT, DMR RUN MODE ACKNOWLEDGE WILL NOT BE
RECEIVED.

T6::

BGNSUB

030136

5869

5870
5871

- CONTROL IN, MAINTENANCE MOCE.

BOGNTST

030136

5860

5863

SUBTEST 3

."tt'tt'tt'ttt'tttttt.t't"tttttttttttfififitt'tttttttt'ttttitt'tttitt't

S858

5861

SUBTEST 2

= CONTROL IN, FULL DUPLEX, DDCMP MODE. ENSURE THAT
THE HALF~DUPLEX BIT [5 CLEAR [N THE MODEM STATUS WORD,
ALSO ENSURE THAT DDCMP MODE BIT IS SET IN SCRAT(H PAD 7.
= (ONTROL IN, HALF DUPLEX. ENSURE THAT THE HALF DUPLEX

SUBTEST 1

5855

5859

TEST 6 - DMR-11
TEST COMMAND
IN
CONTROL

16.1:

TRAP
.WORD
DUPLEX)
(FULL
IN
CONTROL
FOR
:MACRO

CSESCAPE
L10042-.

TST

:IF ERROR, BR TO TEST END.

PC, S$BASEI]
LPLU
.WORD
BASE
.WORD
DMR
.WORD

;MACRO FOR BASE IN COMMAND
Jannx MACRO EXPANSION xwxx
:CALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE

TST

:IF ERROR, BR TO TEST END.

ESCAPE

CNIRIN
JSR
ESCAPE

104410

C$ESCAPE
L10042-.

ESCAPE

JSR

011522

TRAP
.WORD

PC, $MSCLR

BASE IN

011266

ceBSUB

JSR

(LEAR

011070

TRAP

;MACRO FOR MASTER CLEAR
;xwwe MACRO EXPANSION wwawx
;ISSUE A DMR MASTER (LEAR

PC, SCNTIN
O
.WORD
TST

INRAN

IERRR

(222

AANK

cwenx MACRD EXPANSION waxx
;CALL CONTROL IN ROUTINE WITH DEFAULT

:SEL6 = FULL DUPLEX, RUN MODE, 1 SEC START.

221

W
AR

:IF ERROR, BR TO TEST END.

TRAP

LWORD

000057

152024

BIS
WAIT

#RC] 'RMODEM,aSELO ;SET RQ] AND READ MODEM (OMMAND
;WAIT FOR RD] TO BE SET
RDI
;axnn MACRO EXPANSION ware

CSESCAPE

L10042-.

J 10
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42 PAGE 127
TEST 6 = CONTROL IN COMMAND
CZDMID P11
29-JuL-81 11:32
5896
5897
5898
5899
5900
5901
5902
5903
5904
5905
5906
5907
5908
5909
5910
5911
5912
5913
5914
5915
5916

5917
5918

5919
5920
5921
5922
5923
5924
5925

5926
5927
5928
5929
5930
5931
5932
5933
5934
5935
5936
5937
5938
5939
5940
5941
5942
5943
5944
5945

030206
030212

004737

030214
030222
030224
030224
030226
030230
030232
030234
030234

032777
001404

030234

004737

000000

JSR

PC,

BIT

#7464 ,aSELS

010276
000020

152014

104455
000025
030554
000000

BEQ
ERRDF

030244
030244
030246
030250
030256
030260
030260
030262
030264
030266
030270
030270
030270
030270
030272
030272
030272
030274

030274
030300
030302
030204

10%:

010706

004737

012562

WAIT

RQ!

JSR

PC,

JSR

:'Qfifi

| 8

2 3 4

;IS THE HDX BIT SET IN MODEM STATUS REG?
;0K = IF BIT CLEAR
JERROR HDX BIT SET

TRAP

$CLRQI

ESCAPE

000020

PC,

SHALT

002732

104455
000025
030604
000000

TST

JHALT DMR
senex MACRO EXPANSION #nxx
;DMR HALT ROUTINE.
;IF

BlTB

S%iTL,BASE*XSP? ;1S

ERRDF

21,.EMT10

kRN

ERROR,

EXIT.

TRAP

THE DDCMP RUN BIT SET

L10043:

BGNSUB

004737
002000

030314
030314
030316

104410

000234
052777

IN [IMAGE OF
TRAP

104403

004737
004000
002640
010522

.WORD

;ERROR DDCMP RUN BIT NOT SET

20%:
ENDSUR

T6.2:
BASE IN

011266

JSR

LPLU,BASE ,RES!DMR ;BASE IN WITH RESUME.
sexxx MACRO EXPANSION wwxx

PC,

$BASE!

.WORD

.WORD
.WORD

011522

CNTRIN

HDX

JSR

PC,

ESCAPE

000057

151704

BIS
WAIT

sCALL BASE

IN ROUTINE

JMAINTENANCE MODE BITS TO SET

BASE
sBASE
RES!DMR ;MODE

TABLE ADDRESS

"'Ifii

SCNTIN

.WORD

LPLU

HDX

AR N

L2 8

CSESCAPE

L10042-.

SP 7.

CSERDF

.WORD

TRAP

C$ESUB

TRAP

cs8suB

.WORD

104402

C$ERDF

21
EMTO

;CLEAR RQ] AND WAIT FOR RDI TO CLFAR.
Jenrn MACRO EXPANSION rxxx
;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.

:*‘.‘

104410

000304
132737
001004

JFLAG THAT WE'RE WAITING FOR RDI

.WORD

SHUTDN

030306
030312

030326

108
21,EMT9

JCALL WAIT ROUTINE

""*'

030306

030320

LWORD
.WORD

030240
030240

SWAIT

WORD

SEQ 0126

EMT10

IN BSEL1

;CONTROL IN COMMAND WITH HDX.
sexexx MACRO EXPANSION wrxx
;CALL CONTROL IN ROUTINE

;SEL6 - (DUPLEX, MODE)

:tttt

;IF

ERROR,

TO TEST

LA & B

END.

TRAP

.WORD

#RQ] !RMODEM,aSELO ;SET RQI AND READ MODEM COMMAND
RDI
JWAIT FOR RD] TO BE SET

CSESCAPE

L10042-.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID P11
29-JuL-81 11:32
5952

5953

5954
5955

030326
030332

004737

030334
030342

032777
001004

000000

00002C

151674

030360
030360
030360

030362
030362
030362
030364

004737

BIT

#3174 ,aSELS
108

SWAIT

.WORD

21,eMT11

;eves MACRO EXPANSION wwax
JCALL WAJT ROUTINE
JFLAG THAT WE'RE WAITING FOR RDI
;."'

SHALTY

L3844

21S THE HDX BIT SET

THE

:DMR HALT ROUTINE.
:'..'

030370
030370
030372
030374

104410
000160

004737
004000
002640
000522

011070

011266

PC,

ESCAPE

TST

SMSCLR

JSR

011522

TST

CNTRIN

MAINT

JSR

PC,

ESCAPE

000130
004737

MAINT

JSR

PC,

SHALT

(SESCAPE

cCALL BASE IN ROUTINE WITH DEFAULTS
sSET LINE UNIT LOOP
sBASE TABLE ADDRESS

;DMR-11 MODE
:ttit

LA R

TRAP
.WORD

CSESCAPE
L10042-.

TRAP
.WORD

L10042-.

sexxx MACRO EXPANSION wxxx

s CALL CONTROL IN ROUTINE
;SEL6 - (DUPLEX, MODE)

AR N

;1F ERROR, BR TO TEST END.

TST

SHUTDN

012562

L10042-.

sMACRO FOR CONTROL IN (MAINT. MODE)

SCNTIN

.WORD

TRAP
.WORD

;IF ERROR, BR TO TEST END.

ESCAPE

ce8suB

suwxx MACRO EXPANSION ®xwx

;tttt

104410

L2 &

;MACRO FOR BASE IN COMMAND

BASE
DMR

TRAP

;ISSUE A DMR MASTER CLEAR

;IF ERROR, BR TO TEST END.

PC, $BASEI
.WORD
LPLU

C$ESLB

sexwn MACRO EXPANSION xrxx
:fi.t.

.WORD
-WORD

000142

004737
000400

;MACRO FOR MASTER CLEAR

JSR

TRAP

16.3:

BASEIN

104410

030424

1 8

L10044:

CLEAR

CSERDF
21
EMT11
0

DMR.

BGNSUB

104402

TRAP
.WORD
.WORD
.WORD

Sxsse MACRO EXPANSION *%#»

104403

004737

030420
030420
030422
030424

IN MODEM STATUS REG?

;0K = IF BIT SET
ERROR HDX BIT CLEAR.

:HALT

SHUTDN
PC.,

SEQ 0127

ENDSUB

030364

030374
030400
030402
030404

PC,

JSR

012562

K 10
PAGE 128

IN COMMAND

JSR

BNE
ERRDF

108:

030354

12:42

TEST 6 = CONTROL

010276

104455

030354

29-JuL=-81

30A(1052)

JHALT
;ovxx MACRO EXPANSION wxxx

;DMR HALT ROUTINE.
:t!t.

Akkk

CSESCAPE

L 10
CZDOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL~-81
12:42 PAGE 129
TEST 6 - CONTROL IN COMMAND
CZDMID.P11
29-JuL-81 11:32

030430
030430
030432
030434
030442
030444
030444

030446
030450
030452
030454
030454
030454
030454
030456
030456
030456

FSCAPE

104410

000120
132737
001004

000002

002732

BITB
BNE
ERRDF

030464

030474
030476

030504

030506
030506
030514
030514
030520

030522
030524
030526
030526
030530
030532

ERROR,

TEST END.

:8%71.8ASE*ISP7 ;1S THE MAINTENANCE BIT SET IN IMAGE OF

21.EMT1?2

;ERROR =~ MAINT, BIT NOT SET.

16.4:

104402
CLEAR

104410
000064

005737
001004
052737
000403

042737

011070

002254

030542
030546

004737
000000

ESCAPE

TST

SMSCLR

;IF

DIATURN

BIC

#LPLU,100%

CALL

$RASE !

ESCAPE

. WORD

.WORD
. WORD

TST

BASE
DMR

21
EMT12
0

TRAP

C$ESLB

TRAP

c$BSLB

TO TEST END.

TRAP

;IS INTERNAL LOOPBACK REQUESTED?

;BASE

IN COMMAND.

SMAINTENANCE BITS (L. U.
;BASE TABLE ADDRESS.
;DMR MODE.
;IF

ERROR, BR TO TEST

.WORD

END.

TRAP

$LOOP

JEXTENDED DMR COMMAND TO SET MAINT.

ESCAPE

TST

;IF

BITS

ERROR, BR TO TEST END.

TRAP

;MACRO FOR CONTROL IN (FULL DUPLEX)
SCNTIN

.WORD

CSESCAPE

L10042-.

. 1F NEEDED. THIS WILL ALLOW MODEM LOOPBACK
;1F THE USER REQUESTED IT.
.WORD

PC,

CSESCAPE

L10042-.

LOOPBACK?)

CALL

JSR

CSERDF

.WORD
.WORD
.WORD

.WORD

CNTRIN

011522

ERROR,

;CLEAR LINE UNIT LOOPBACK.

030520

SP 7.

;1F NOT, BR
;SET LINE UNIT LOOPBACK.

004000

100%:

1 2. 8

1%
g&PLU.100$

030520

CS$ESCAPE

L10042-.

;MACRO FOR MASTER CLEAR
sanexe MACRO EXPANSION xxx«
;ISSUE A DMR MASTER (LEAR
."I"'

004000

ENDSUB

104403

PC,

TST

104410
000022

104410
000012

JSR

BNE
BIS

000000
002640
000522

TRAP

1 10045:

BGNSUB

004737

TRAP

.WORD

104403

030536
030536
030540
030542

030550
030550
030550

;IF

108:
ENDSUB

030460
030460

TST

SEQ 0128

CSESCAPE

L10042~.

sewxx MACRO EXPANSION nxax
;CALL CONTROL IN ROUTINE WITH DEFAULT

;SEL6 = FULL DUPLEX, RUN MODE,
*ARRYN

12
28 4

L10046:

SEC START,

TRAP

($FSuB

CZDMIDO DMR~-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P11

6066

6067
6068
6070
6071
6072
6073
6074
6075
6076
6077
6078
6079
6080
6081
6082
6083
608«
6085
6086
6087

29-JuL-81

11:32

030552

29-JuL-81

12:42

TEST 6 = CONTROL

m10

PAGE 130

ENDTST

030552
030552

104401

030554
030562
030570
030576
030604
030612
030620
030626
030632
030640
030646
030654
030662
030666
030674
030702
030710

042110
020124
044127
020116
042104
052522
020124
042523
042110
020124
042523
047105
042110
040515
046440
044502
020124

020130
042523
047105
042106
046503
020116
047516
000124
020130
047516
020124
044440
000130
047111
042117
020124
042523

044502
020124
044440
000130
020120
044502
020124

SEQ 0129

IN COMMAND

L10042:

EMTS:

LASCIZ

/HDX BIT SET WHEN IN FOX/

EMT10:

.ASCIZ

/DDCMP RUN BIT NOT SET/

044502
020124
044127
020116

EMT11:

_ASCIZ

/HDX BIT NOT SET WHEN IN HDX/

027126
020105
047516
000124

EMT12:

_ASCIZ

/MAINT. MODE BIT NOT SET/

.EVEN

TRAP

CSETST

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
¢Z0MID.PIN
29-JuL-81 11:32
6091

30A(1052)

TEST 7 - MODEM WRITE COMMAND

030740

030742
030742
030744
030746
030752
030756
030756
030762
030766
030770
030772
030774
030774
030776

NN TN AR R

NN R RN

NN R A RN R R AR

R RARARRARRARRRS

INTO THE MODEM WRITE REGISTER.

0
¥

TR Y

030730
030734
030736

030724
030724
030726
030730

susT EST 2

030720

R AR RN R

TEST 7 - DMR-11
* MODEM WRITE COMMAND
- WRITE DATA PATTERNS
suBT EST 1

PR S

030716
030716
030716
030720

TR YT IPRE

030716
030716

A AT

ENSURE THAT ON THE NEAT MODEM READ THAT THE
MICROCODE RETURNS THE PATTERN WRITTEN INTO BSELG.

= ATTEMPT TO WwRITE BOTH THE HALF-DUPLEX BIT AND THE
THE MICROCODE SHOULD NOT ALLOW THIS
RTS HOLD BIT.
TO HAPPEN.
WHEN READING THE MODEM STATUS, ONLY
THE HALF-DUPLEX SHOULD BE SET.

SEQ 0130

12:42
PAGE 131
TEST 7 - MODEM WRITE COMMAND

.SBTTL
A

N 10

29-JuL-81

A58

E2222822002

2202222022222

2202

Rttt

2R02d00dRRAERR4D

BGNTST

T7::

BGNSUB

104402

004737

104410

000232

004737
004000
002040
000522

17.1:

;MACRO FOR MASTER CLEAR

CLEAR

011070

JSR

PC,

ESCAPE

TST

S$MSCLR

JSR

104410

|& 8

000005
031162

012237
004737
00000
000377

030772
012062

10%:

;BASE IN COMMAND.

srsxx MACRO EXPANSION w%xx

;CALL BASE IN ROUTINE WITH DEFAULTS
;SET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE

:ttit

L8 BB

TST

;1F ERROR, BR TO TEST END.

MOV
L [0)%

#5,R1
#MODEM,
R2

s COUNTER
sPATTERN TO WRITE

(R2)+,15%

JWRITE PATTERN

JSR

000000

15%:

104410
000162

ESCAPE

PC,SUMRIN

.WORD

.WORD
.WORD

TST

WMODEM

377
0

CSESCAPE
L10047-.

.WORD

ESCAPE

MOV

TRAP

000214

012701
012702

c$8suB

;ISSUE A DMR MASTER CLEAR

;1F ERROR, BR TO TEST END.

PC, $BASE]
.WORD
LPLU
.WORD
BASE
DMR
.WORD

TRAP

Jexxn MACRO EXPANSION nwxx
:*tfit

BASE IN

011266

TRAP
-WORD

INTO MODEM

s ISSUE DMR MODE COMMAND

;WRITE MODEM COMMNAD
;CLEAR ALL BITS IN BSEL6
;SET THE BITS IN BSEL6 (FROM PATTERN)
;IF

ERROR, BR TO TEST END.

IRAP
A

.WORD

031000
031006

052777

000057

031006

004737

010276

151224

BIS
WAIT

JSR

#RQ] !RMODEM,aSELO ;SET RQI AND READ
MODEM COMMAND
JWAIT FOR RDI TO BE SET.
svext MACRO EXPANSION xawe
PC, SWAIT
sCALL WAIT ROUTINE

RD]

CS$ESCAPE
L10047~.

(SESCAPE
L1004 7~.

8 1
12:42
PAGE 132
29-JuL-81
CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
TEST
7
MODEM
WRITE
COMMAND
CZOMID.P11
29-JuL-81 11:32
6147
6148
6149
6150
6151
6152
6153
6154
6155
6156
6157
6158

6159
6160

616’
6162

6163

6164
6165

031012
031014
031014
031016
031020
031020
031026
031030
031034
031034
031036
031040
031042
031044

.WORD

00000C
ESCAPE

151274

030772

031050
031050
031052
031054
031056
031060
031060
031060
031060
031062
031062
031062

03077¢

MOV

ERRDF

031174

25%:
010706

dBSELG,15%
25%
158 ,R3

TRAP

22 .FMT13,LRRT2

WAIT

RQ]

JSR

PC,

;SAVE

THE PATTERN FOR THE ERROR MESSAGE.

;WRIiTE MODEM ERROR

sxaxx MACRO EXPANSION wexx

ESCAPE

005301
001337

DEC

30%:

BNE

L2
2 8

L10050:

BGNSUB

17.2:

104402

000060
052777
004737
000000

151122

010276

104410
000040
122777

C$ESUB

TRAP

(sBSUB

WMODEM, 377,21

JATTEMPT TO WRITE MODEM HDX AND RTS.

JSR

PC., $DMRIN
.WORD
WMODEM

;CALL DMR MGCDE INPUT ROUTINE
: INPUT COMMAND
;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)

ESCAPE

000057

TRAP

DMRIN

.WORD
.WORD

104410

CSESCAPE
L10047-.

;DECREMENT COUNTER
;CONTINUE UNTIL ALL 5 PATTERNS TRIED.

R1
10%

104403

012062

.WORD

TRAP

ENDSUB

004737
000005
000377
000021

TO CLEAR.

;IF ERROR, EXIT TEST.

TST

377
21

;axxx MACRO EXPANSION *#xx

:fi*'t

LA 2

;1F ERROR, BR TO END.

TRAP

JSR

.WORD
#RQ] !RMODEM,aSELO ;SET RQI AND READ MODEM COMMAND.
JWAIT FOR RDI TO BE SET
RDI
sexxx MACRO EXPANSION wxxx
PC, SWAIT
;CALL WAIT ROUTINE

ESCAPE

TST

BIS

WAIT

.WORD

151110

CMPB

#20,dRBSEL6E

CSESCAPE
L10047-~.

JfLAG THAT WE'RE WAITING FOR RDI
:titi

. IF

ERROR,

L2 2

EXIT

TEST.

TRAP

.WORD

000020

CSERDF

22
EMT13
ERRTZ2

;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.
2
2 8

104410
000106

TRAP
.WORD
.WORD
.WORD

sCLEAR RQ] AND WAIT FOR RDI
$CLRQI

CSESCAPE
L10047~.

;DID T.E MICROCODE COPY THE BITS?
JIF YES CONTINUE

C31064
031064
031070
031072
031074

CMPS
BEQ

104455
000026
031226

004737

NARN

;IF ERROR, EXIT TEST.

TST

.WORD

031044

;FLAG THAT WE'RE WAITING FOR RDI
"'tt'

104410
000142

127737
001406
013703

SEQ 0131

;IS ONLY HDX SET?

C$ESCAPE

L10047-~.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11
6203
6204
6205
6206
6207

29-JuL-81

031130
031132
031136
031136
031140
031142
031144
031146
031146
031146

00140¢€

012703

11:32

MOV

ERRDF

10%:

010706

031152
031152
031156
031156
031156

004737

SEQ 0132

JIF

22,EMT13,ERRT?

YES = OK

;SAVE

THE PATTERN FOR THE ERROR MESSAGE.

TRAP
.WORD

.WORD
.WORD

WALT

RQI

JSR

PC, $CLRQI

JSR

012562

PAGE 133

108

#21,R3

SHUTDN

PC, $HALT

;CLEAR RQ] AND WAIT FOR RDI
swrxx MACRO EXPANSION *xxx
;tttt

1 3

*DMR HALT ROUTINE.
;tttt

000000
000252

005046
157716
010346
012746
012746
010600
104414
062706

000376
000357

000001

8 8 1

LA & & ¢

L10051:

ENDTST

031162
031170

TO CLEAR.

;esx*x MACRO EXPANSION ###x

104403

104401

L10047:

MODEM:

_WORD

BGNMSG

ERRT?
PRINTB

CS$ERDF
22
EMTI13
ERRTZ2

:CLEAR RQI AND WAIT FOR IT TO BE Cl EARED.

ENDSUB

031160
031160
031160

031174
031174
031174
031174
031176
031202
031204
031210
031214
031216
031220
031224
031224
031224

12:42

TES T 7 - MODEM WRITE COMMAND

BEQ

000021

104455
000026
031226
031174

004737

29-JuL~81

C 1

0,376,1,252.357 ;PATTERN TO WRITE

TRAP

C$ESUB

TRAP

CSETST

CLR
BISB

-(SP)
aBSELG6, (SP)

MOV

#FMT19,-(SP)

INTO MODEM

ERRTZ::

#FMT19,R3,<B,aBSEL6>

151036

MOV

R3,-(SP)

031252
000003

MOV

#3,-(SP)

000010

TRAP
ADD

(SPNTB
#10,SP

TRAP

C$MSG

MoV
ENDMSG

L10052:

104423

031226
031234
031242
031250

051127
047515
051105
000
031252

052111
042504
047522

031252
031260
031266
031274
031302
031310

040445
020105
042523
047445
046440
043040

051127

020105
020115
020122

EMT13:

L.ASCIZ

/WRITE MODEM ERROR /

.EVEN

047111

033114
022463
042117
051117

052117
041040
020072
020101
046505
040515

FMT19:

_ASCIZ

/%AWROTE

IN BSEL6:

X03%XA

MODEM FORMAT

[N BSEL6:

X03ZN/

SP,RO

—

CZOMIDO DMR-11 FUNCTIONAL TESTS M#°
C(ZDMID.P11
29-JuL-81 11:32
6259
6260
6261

6262
6263
6264
6265

031316
031324
031332

020124
042523
047445

047111
033114
022463

041040
020072
000116

30A(1052)

D 11
29-JuL=-81
12:42 PAGE 134
TEST 7 - MODEM WRITE COMMAND

.EVEN

SEQ 0133

3 1

12:42
PAGE 135
29-JuL-~81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
TEST 8 - NO BUFFER ERROR
CZDMID.PI1
29-JuL~-81 11:32
TEST 8 - NO BUFFER ERROR

.SBTTL

%
%

suBT EST 2

SuUBT EST 1

2282

03020202020

20000

RRRRRRlsRRslas

tnd )

= TRANSMIT A BUFFER THREE TIMES WIHOUT ASSIGNING A
RECEIVE BUFFER.,
BY ASSIGNING A NO BUFFER THRESHOLD
=

OF THREE, ENSURE THAT A NO BUFFER ERROR IS RECEIVED
AFTER THE THIRD THRANSMISSION.
TRANSMIT

A BUFFER

WITHOUT

ASSIGN THE NAKS THRESHOLD OF
THRESHOLD OF
THREE

22022

TEST 8 ~ DMR-11

IR IRIR
IR

2228022222002

2
»

6266
6267
6268
6269
6270
6271
6272
6273
6274
6275
6276
6277
6278
6279
628C
6281
6282
6283
6284
6285
6286
6287
6288
6289
6290
6291
6292
6293
6294
6295
6296
6297
6298
6299
6300
6301
6302
6303
6304
6305
6306
6307
6308
6309
6310
6311
6312
6313
6314
6315
6316
6317
6318
6319
6320
6321

SEQ 0134

AFTER

(HECK

SHUTDOWN.

THAT

RECEIVE

BUFFER.

3 AND A NO BUFFER

THE NAKS ERROR COUNT

:t"tfilttttttIfittttt.ttt'tttt'tfifitittt".ttitttkt*tttttttt'fittt*tt"t’

031340
031340
031340
031340
031340
031342

BGNTST

104402

031342

004737

031346
031346
031350
031352

104410
000416

031352

031356

031360
031362

031364
031364
031366
031370
031370
031374

18::

BGNSUB

004737
004000
002640
000522

CLEAR

011070

JSR

PC,

$MSCLR

JSR

ESCAPE

011522

A DMR MASTER

_RROR,

1 2

PC, $BASEI]
.WORD
LPLU

BASE
DMR

MAINT

JSR

PC.,

TO TEST

:BASE TABLE ADDRESS
*DMR-11 MODE
;tttt

ESCAPE

104410
000366

& 4

END.

L2 8

MAINT

TST

TRAP

012062

:1F

ERROR,

BR TO TEST

END.

SREP SENT = 377
‘NO BUFFER = 3

DMRIN

THRESKH, 1777771777

JSR

PC,

$DMRIN

.WORD

THRESH

CSESCAPE

L10053-.

ANNK

TRAP

.WORD

031402

CSESCAPE

L10053-.

;SEL6 - (DUPLEX, MODE)

:NAKS RCVD = 377
*NAKS SENT = 377

004737
000013

.WORD

:MACRO FOR CONTROL IN (FULL DUPLEX AND MAINT)
sexxx MACRO EXPANSION #x%x
“CALL CONTROL IN ROUTINE

;SET THRESHOLDS:

031402
031406

TRAP

8¢

ERROR, BR TO TEST END.

:ttfit

031376
031376
031400

.WORD

$CNTIN

.WORD

(sBSUB

;xxxx MACRO EXPANSION *xx
;CALL BASE IN ROUTINE WITH DEFAULTS
SSET LINE UNIT LOOP

:1F

CNTRIN

TRAF

CLEAR

:MACRO FOR BASE IN COMMAND

.WORD
.WORD

000400

:ISSUE

:IF

BASEIN

011266

;MACRO FOR MASTER CLEAR
sxxxe MACRO EXPANSION =xxxx
;tttt

ESCAPE

104410

004737
000400

18.%:

sexxx MACRO EXPANSION swws
*CALL DMR MODE INPUT ROUTINE

;INPUT COMMAND

($ESCAPE

L10053-.

[

C2DMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
C(ZOMID.P11

6322
6323

031410
031412

6325
6326

031414

6324

6327
6328
6329

6330
6331
6332
6333
6336
6335

7336
63237

6338
6339
6340
6341
6%2%
6

29-JuL-81 11:32

031414
031416
031429

031424
031424

031424
031430
031432

031436

104410
000350
012700

004737
000040
002522

004737
000001

031444
0314644
031446
031450
031452
031454
031462
031464
031464
031472

6355
6356
6357
6358
6359
6360

031474
031476
031500
031502
031504
031506

104455
000010
017774
015124
000410

031514
031516
031516
031520
031522
031524

001004

6361

6362
6363
6364
6365
6366
6367
6368
6369
6370
6371
6372

012272

031474

031506

104410
000320
005300
001404
042777
000760
032777
001005

032777

000207
000001

150552
150542

10%:

150524

20%:

042777

000207

6373
6374

031534
031540

004737
000001

010276

6376
6377

031542
031542

104410

150500

30%:

;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)
INRRR

222

#3,R0

;JSET UP A COUNTER

BACCIT

JBA/CC IN COMMAND FOR TRANSMIT
suennen MACRO EXPANSION xwxxn
PC, $BA(C(C
JCALL BA/(CC IN ROUTINE WITH DEFAULTS
.WORD
RQI'BACCT
+BA/CC IN TRANSMIT (COMMAND
.WCRD
TBUF
;TRANSMIT BUFFER ADDRESS
TCOUNT

;TRANSMIT

JRRAN

CHARACTER

JSR

PC, SWAIT
.WORD
1

JWAIT
Jxnrn
;CALL
JFLAG

ESCAPE

TST

;IF RDO NOT SET, BR TO TEST END.

DEC
B8EQ
8IC

RO
10%
#RDO!CMD,aSEL2

;DEC COUNTER
;TRANSMIT FOR 3 TIMES.
;CLEAR BACC OUT TRANSMIT.

BIT
BNE

#CNTRL ,QSEL2
20%

;IS THIS A CONTROL OUT?
;IF YES, PROCEED.

8.EMG8 ,ERRG?2

FOR RDO TO BE SET
MACRO EXPANSION wrex
WAIT ROUTINE
THAT WE'RE WAITING fOR RDO
AR
N

JEXPECTED CONTROL OUT NOT RECEIVED.

TRAP
.WORD
.WORD
.WORD

30%

SEXIT

BIT

#NOBRFR,aSEL6

;IS THE NO BUFFER FLAG SET?

;IF YES - 0K, PROCEED.
JWE'RE NOT GETTING EXPECTED RESULT
TRAP
WORD
.WORD
.WORD
;(EITHER CONTROL OUT OR NOBUF /NAKS)

BIC
WAIT

#RDO!CMD,aSELZ2
RDO

JSR

PC., $WAIT
.WORD
1

.CLEAR CONTROL OUT
JEXPECT ANOTHER BA(CC QuT.
suerxx MACRO EXPANSION wwew
;CALL WAIT ROUTINE
JFLAG THAT WE'RE WAITING FOR RDO

TST

;1F ERROR, BR TO END.

ESCAPE

TRAP
.WORD

CSESCAPE
L10053-.

;TRANSMIT AGAIN

30%
9,EMGY,ERRGZ

CSESCAPE
L10053-.

ARNRN

RDO

JRRER

TRAP
LWORD

COUNT

WAIT

BNE
ERRDF

104455
000011
020040
015124

177777
1777

MOV

ERRDF

000004

SEQ 0135

;IF ERROR, BR TO TEST END.

JSR

010276

PAGE 136

TST

.WORD

031526
031526
031534

6375

1%:

F 11

ESCAPE

000046

6344
6345
6346
6347
6348
6349
6350
6351
6352
6353

6354

.WORD
.WORD

000003

12:42

TEST 8 - NO BUFFER ERROR

177777
001777

031436
031436
031442

29-JuL-81

INRNR

CSERDF
8
EMGS8

ERRGZ?

C$ERDF
9
EMGY
ERRG?

ARRR

TRAP

($ESCAPE

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZDMID.P11

29-JuL-81

6378

031544

000222

6380
6381
6382
6383
6384
6385
6386
6387
6388
6389
6390

031554

6379

222 RERRXERR
S NN S 00 NN

6410

031546

031554
031560
031560
0371569
031560

031562
031562
031562
031564

042777

000207

004737

012562

150460

29-JuL-81

SEQ 0136

12:42
PAGE 137
TEST 8 - NO BUFFER ERROR

BIC
SHUTDN

#RDO'!CMD,SEL2

JSR

PC,

$HALT

CLEAR BACC OUT.

;tttt

BGNSUB

004737

031570
031570
031572
031574

104410
000174

031574
031600
031602
031604

004737
004000
002640
000522

011070

011266

031620
031620
031622

104410

PC,

ESCAPE

TST

JSR

ESCAPE

000156

004737
000000

;MACRO FOR MASTER CLEAR

$M3CLR

;1F

$BASEI

.WORD
.WORD
.WORD

LFLU
BASE
DMR

TST

JSR

ESCAPE

TRAP

csB8SLB

TO TEST

TRAP

CSESCAPE

8¢

END.

.WORD

:DMR-11 MODE
;l***

1 2 8. 8 4

ERROR, BR TO TEST END.

TRAP

.WORD

PC,

$CNTIN

.WORD

TST

;MACRO FOR CONTROL IN (FULL DUPLEX)
Jexnex MACRO EXPANSION waxx
;CALL CONTROL IN ROUTINE WITH DEFAULT

:SEL6 - FULL DUPLEX, RUN MODE,
:t**t

:IF

ERROR,

L 2 8 81

TO TEST END.

000144

TRAP

;SET THRESHOLDS:
:NAKS RCVD = 3

031624
031630
031632
031634

004737
000013
001403
003777

012062

DMRIN

THRESH, 1403,3777

JSR

PC, $DMRIN
.WORD
THRESH

.WORD
.WORD

1403
3777

:NAKS SENT = 3
;REP SENT = 377
;NO BUFFER = 7

Jexnx MACRO EXPANSION wxxx
;CALL DMR MODE INPUT ROUTINE
;INPUT COMMAND

;SEL4 VALUE
:SEL6 VALUE
"tt'fi

(OR BITS TO CLEAR IN BSEL6)
(DR BITS TO SET IN BSEL6)
LA 8

CSESCAPE

L10053-.

SEC START.

.WORD

031624

L10053-.

Jxxxe MACRO EXPANSION wx2ax
;CALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS

;IF

CNTRIN

011522

ERROR,

L 8

;MACRO FOR BASE IN COMMAND
PC,

($ESULB

Jaxxr MACRO EXPANSION wrxx
;ISSUE A DMR MASTER CLFAR
;*ttt

BASEIN

104410

031612
031616

18.¢2:

JSR

TRAP

ANAERR

L10054:

CLEAR

L 10053-.

sexex MACRO EXPANSION wawe
;DMR HALT ROUTINE.

104403

104402

.WOKD

JHALT DMR

50%:
ENDSUB

031564

031606
031606
031610
031612

11:32

30A(1052)

CSESCAPE

L10053-.

H 11

6434
6435
6436
6437
6438
6439
6440
6441
6442
6443
644
6445
6446

6447

6448
6449
6450
6451
6452

6453
6454
6455
6456
6457
6458
6459
6460
6461
6462

6463
6464

6465

6466

6467
6468
6469

6470
6471
6472
6473
6474
6475
6476
6477
6478
6479
6480
6481
6482

031636
031636
031640
031642

104410
000126

031642
031646
031650
031652

004737
000040
002522
000044

031654
031660
031662
031662
031664
031666
031674
031676
031676
031700
031702
031704
031706
031710
031710
031716
031720
031720
031722
031724

031726

JSR

012272

000001

104455
000010

017774
015124
000410

031730

6486
6487
6488
6489

031764
031764
031764
031764

PC,

ESCAPE

TST

032777
001004

000004

150322

20%:

30%:
004737
123727
001004
123727
001404

012562

TO TEST END.

;FLAG THAT WE'RE WAITING FOR RDO
:'**fi

RDO NOT

1 4 8

SET,

TEST

END.

.WORD

CSESCAPE
L10053-.

.WORD
.WORD
.WORD

CSERDF
8
EMG8
ERRGZ

TRAP

;IS THIS A CONTROL 0OUuT?
;IF YES, PROCEED.
JEXPECTED CONTROL OUT NOT RECEIV?gAP

30%

JEXIT

BIT

ANORFR ,aSEL6

;IS

ERRDF

9,EMGY ,ERRG?

WE'RE NOT GETTING EXPECTED RESU%;AP

30%

.IF

THE NO BUFFER

FLAG SET?

YES - OK, PROCEED.

.WORD
.WORD
.WORD
s (EITHER CONTROL OUT OR NOBUF /NAKS)
SHUTDN
S$HALT

000003

BASE+3,#3

002646

000003

BASE+6,#3

35%

408

CSERDF
9

EMG9
ERRGZ

Jexxx MACRO EXPANSION »axx
;DMR HALT ROUTINE.
"fitfit

XNKK

*NAKS REC. ~ NO BUFFER = 3?
;IF NOT ERROR

;NAKS SENT = NO BUFFER - 32
JIF Ok - SKIP.

23,EMT20,ERRTS

TRAP
.WORD

.WORD
.WORN

40%:
ENDSUB

CSES CAPE

L1005%~.

;WAIT FOR RDO TO BE SET
sennsx MACRO EXPANSION xxxaw
;CALL WAIT ROUTINE

;IF

#CNTRL ,@SEL?2
20%
8 ,EMG8,ERRG2

|2 8

000027
032026
031770

104403

TRAP
WORD

;uaent MACRO EXPANSION wwawx
sCALL BA/CC IN ROUTINE WITH DEFAULTS

;'Q‘t

002643

104455

RQ] 'BACCT
JBA/CC IN TRANSMIT COMMAND
TBUF
; TRANSMIT BUFFER ADDRESS
TCOUNT
;TRANSMIT CHARACTER COUNT

SWAIT

.WORD

PC,

35%:

ERROR,

BR
BNE

104455
000011
020040
015124

$BACC

.WORD
.WORD
.WORD

JSR

BIT
BNE
ERRDF

150340

PC,

RDO

104410

000102
032777
001005

;IF

;BA/CC IN COMMAND FOR TRANSMIT

WAIT

010276

031730
031730

6484

6485

004737

TST

BACCIT

031654
031654

031734
031742
031744
031752
031754
031754
031754
031756
031760
031762

6483

ESCAPE

:
108

SEQ 0137

12:42
PAGE 138
-JUL-81
29
T 8 -~ NO BUFFER ERROR

CZOMIDQC DMR-11 FUNCTIONAL TESTS MACY1 30A(1052)
(ZDMID.P11
29-JuUL-81 11:32

L10055:

TRAP

CSERDF

23
EMT20
ERRT4

($ESLB

—

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZDMID.P11
29-JuL-81 11:32
6490
6491
6492
6493
6494
6495
6496
6497
6498
6499
6500
6501
6502
6503

6505
6506
6507
6508
6509
6510
6511

6512
6513
6514

031766
031766
031766

031770
031770
031770
031770
031772
031776
032000
032004
032010
032014
032016
032020
032024
032024
022024
032026
032034

30A(1052)

29-JUL=-81

TE ST

12:42

In
PAGE 139

ENDTST

L10053:

104401

BGNMSG

005046
153716
005046
153716
012746
012746
010600
104414

062706

ERRT4
PPINTB

#FMG7,<B,BASE+3>,<B,BASE+6>

CLR
B1SB
CLR
B1S8

002643
016522
000003
000G10

MOV
MoV
MOV
TRAP
ADD

ENDMSG

042440
000

EMT20:

TRAP

L10056:
ASCIZ
.EVEN

/NAKS ERROR/

CSETST

ERRT4::

002646

104423

040516
051122
032042

SEQ 0138

8 -~ NO BUFFER ERROR

TRAP

-(SP)

BASE+6, (SP)
=-(SP)

BASE+3, (SP)

HFMG7 ,-(SP)
#3,-(SP)
SP,RO
CSPNTB
#10,SP

C$MSG

CZ0MiDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11

29-JuL-81

11:32

62}5

29-JuL=-81

12:42

J 1

PAGE 140

SEQ 0139

TEST 9 = NON-EXISTENT MEMORY ERROR

.SBTTL

TEST 9 = NON-EXISTENT MEMORY ERROR

TEST 9 - DMR-11

251(7)

6519
6520
6521
6522
6523

;% NON=-EXISTENT MEMORY (NXM) ERROR CHECK
;% PERFORM DMR COMMANDS USING NXM ADDRESSES; VERIFY THAT NXM ERROR IS
;% REPORTED [N EACH OF THE FOLLOWING SUBTESTS
;*
SUBTEST 1
- BASE IN RESUME COMMAND - BASE TABLE ADDRESS IS NXM
;v
SUBTEST 2 - BA/CC IN RECEIVE COMMAND - BA/CC IN ADDRESS IS NXM

2526

:ttttttttttttttttttttttttt'ttttttttttttt*ttttttttttttttttttttttttttttt

6518

625?

6527
6528
6529
6530
6531
6532
6533
6534

032042
032042
032042
032042
032042
032044

104402

€536
6537
6538
6539
6540

032050
032050
032052
032054

104410
000500

6542
6543
6544
6545

032054
032060
032062
032064

004737
004000
002640
000522

6548
6549
6550
6551
6552
6553

032066
032066
032070
032072

104410
000462

032072

004737

6555
6556
6557

032076
032076
032100

104410
000452

6546
6547

6554

6558

gggg

032102

6561
6562
6563

032110

6565

032114

6564

6566
6567
6568

6569
6570

012737

BA/CC IN TRANSMIT COMMAND - BA/CC IN ADDRESS IS NXM

19::
19.1:
CLEAR

011070

JSR

PC, $MSCLR

;MASTER CLEAR MACRO
;uaexx MACRO EXPANSION wxxwx
s JSSUE A DMR MASTER (LEAR

ESCAPE

TST

.IF ERROR, BR TO TEST END

BASE IN
011266

JSR

ESCAPE

004737

032116
032120

160000
150522

000000

:BASE
PC, $BASE]
.WORD
LPLU
.WORD
BASE
.WORD
DMR

000001

002366

011266

cs8sLB

TRAP
.WORD

CSESCAPE
L10057-.

KKKk

IN COMMAND - DMR MODE

suerxx MACRO EXPANSION wxxx

;CALL BASE IN ROUTINE WITH DEFAUL TS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE

INARR

Awk

;IF ERROR, BR TO TEST END

JSR

PC, $HALT

JHALT
sarxsx MACRO EXPANSION xxax
sDMR HALT ROUTINE.

ESCAPE

TST

.IF

MOV

#CNTRL ,ERROR

;THIS FLAG WILL INHIBIT CONTROL OUT

SHUTDN
012562

IRENX

TRAP

TST

BASEIN

032110

032122

BGNSUB

004737

6541

SUBTEST 3

BGNTST

032044

6535

RN R R AR RN AR AR R ANR R AR R R A AR AR R R RA R A AR R R NN AR AN RN RS

JSR

JERRK

CSESCAPE
L10057-.

TRAP
LWORD

CSESCAPE
L10057-.

ERROR, BR TO TEST END.

;ERROR REPORTING - BECAUSE WE EXPECT ONE.

JBASE IN RESUME COMMAND WITH NXM BASE TABLE.
0,160000, BIT15'BIT14'RES'DMR
;xann MACRO EXPANSION axxx
PC, $BASE]
:CALL BASE IN ROUTINE
.WORD
0
JMAINTENANCE MODE BITS TO SET IN BSEL1
.WORD
160000
;BASE TABLE ADDRESS
.WORD
BIT15!BIT14!RES!DMR
;MODE
IRERK

WAIT

TRAP
.WORD

RDO

XARR

JWAIT FOR RDO TO BE SET

K 11

12:42
PAGE 141
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY1 30A(1052)TE§?-JUL-81
9 - NON-EXISTENT MEMORY ERROR
CZOMID.P11
29-JuL-81 11:32

6571
6572
6573
6574
6575
6576
6577
6578
6579
6580
6581
6582
6583
6584
6585
6586
6587
6588
6589
6590
6591
6592
6593
6594
6595

6596
6597
6598
6599
6600

6602
6603
6604
6605
6606
6607
6608
6610
6611
6612

cONONWN

33888

6613

032122
032126

004737

032130
032136
032140
032140
032142
032144

032777
001005

000001

JSR

010276
000001

150076

104455

032777
001004

000400

150060

015124
042777
005037
032204
032204
032206
032206
032206
032210
032210

BIT
BNE
ERRDF

000207

002366

150034

10%:

20%:
ENDSUB

PC,

SWAIT

.WORD

#CNTRL ,@SELZ
108

8.EMG8,ERRGZ

sexxx MACRO EXPANSION wwxx

;CALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDO
:ti*t

TRAP
-WORD

20%

JEXIT

BIT
BNE
ERRDF

#NXM,QSEL6

;IS THE NXM FLAG SET?

BIC
CLR

#RDO!
CMD ,@SEL2
ERROR

;IF

L10060:

004737

19.2:
CLEAR

011070

JSR

PC,

SMSCLR

ESCAPE

104410

000334

004737
004000
002640
000522

032232
032232
032234
032236

104410
000316

032236
032242

004737
000000

011266

JSR

ESCAPE

PC, $BASE!
.WORD
LPLU
.WORD
BASE
DMR
.WORD

JSR

ESCAPE

.WORD
.WORD

EMGS
ERRGZ

TRAP

C$ESLB

TRAP

($BsuUB

TRAP

.WORD

;CALL BASE IN ROUTINE WITH DEFAULTS
sSET LINE UNIT LOOP
;BASE TABLE ADDRESS

;DMR-11 MODE
;t**t

L2 8 8 ]

TRAP

;MACRO FOR CONTROL IN (FULL DUPLEX)
PC,

$CNTIN

WORD

TST

CSESCAPE

L10057-.

sxxxx MACRO EXPANSION xwxx

.WORD

CNTRIN

011522

;IF ERROR, BR TO TEST END.

TST

gSERDF

s ISSUE A DMR MASTER CLEAR

;MACRO FOR BASE IN COMMAND

BASEIN

TRAP
.WORD

;JMACRO FOR MASTER CLEAR
sxxxk MACRO EXPANSION *x«x

;IF ERROR, BR TO TEST END.

TST

EMG8
ERRGZ

;CLEAR RDO AND THE COMMAND BITS
JALLOW ERROR REPORTING

BGNSUB

104402

gSERDF

YES = ERROR REPORTED CORRECTLY

104403

032220
032224
032226
032230

032244

.WORD
.WORD

JUNEXPECTED CONTROL OUT RECEIVED

:tt*t

032214
032214
032216
032220

L 8.8 &4

;1S THERE A CONTROL OUT REPORTED ?
;IF YES, PROCEED.
JEXPECTED CONTROL OUT

20%
9.EMG9Y,ERRGZ

SEQ 0140

sxxxx MACRO EXPANSION =xxw

CSESCAPE

L10057-.

;CALL CONTROL IN ROUTINE WITH DEFAULT
;SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START.
:tfi'*

:IF ERROR, BR TO TEST END.

CZDMIDO DMR-11 FUNCTIONAL TESTS MA(CY11
CZDMID.P11
29-JuL-81 11:32
032244
032246
032250

SEQ 0141

12:42
PAGE 142
ST 9 - NON-EXISTENT MEMORY ERROR

30A(1052)TE 29-JuL-81

10441C

000304
012737

TRAP

000001

002366

Mov

#CNTRL ,ERROR

.WORD

JINHIBIT CONTROL OUT ERROR REPORTING AGAIN.

sBA/CC IN REC. COMMAND WITH NXM
032256

032256
032262
032264
032266

004737
000044

PC,

$BACC

.WORD

004737
000040
002522
000044

JSR

012272

004737
000001

010276

032310
032316
032320
032320
032322
032324
032326
032330
032332
032332
032340
032342
032342
032344
032346
032350

032777
001005

000001

PC,

$BACC

.WORD
.WORD
.WORD

L. 2.2
8 4

;CALL BA/CC

IN ROUTINE WITH DEFAULTS

:*tt*

BIT

#CNTRL ,@SEL?
10%

SWAIT

.WORD

sxxxx MACRO EXPANSION wwxx

RQI!BACCT
:BA/CC IN TRANSMIT COMMAND
TBUF
: TRANSMIT BUFFER ADDRESS
TCOUNT
;TRANSMIT CHARACTER COUNT

PC,

ERRDF

000400

147700

000207
002366

BIT

ANXM, QSEL6

;1S THE NXM FLAG SET?

ENDSUB

#RDO.CMD,@SEL2
ERROR

8 81

JEXPECTED CONTROL OUT

SEXIT

BIC
CLR

1 8

;1S THERE A CONTROL OUT REPORTED ?
;IF YES, PROCEED.

20%

20%
9.EMGY,ERRGZ

;FLAG THAT WE'RE WAITING FOR RDO

BNE
ERRDF

147654

8,EMG8,ERRGZ

L2 2

;WAIT FOR RDO
sxxxx MACRO EXPANSION *xwx
;CALL WAIT ROUTINE
sRARK

104455
000011
020040
015124

TRAP
.WORD

.WORD
.WORD

;1F YES - ERROR REPORTED CORRECTLY
JUNEXPECTED CONTROL OUT RECEIVED

BGNSUB

19.3:
CLEAR

C$ERDF

8
EMGS8
ERRGZ2

TRAP

.WORD
.WORD
.WORD

CSERDF
9
EMG9
ERRGZ

TRAP

C$ESULB

TRAP

csssuB

;CLEAR RDO AND THE COMMAND BITS.
:ENABLE ERROR REPORTING
L10061:

104403

106402

IN RECEIVE COMMAND

;BA/CC IN XMIT

JSR

017774
015124
000410

042777
005037

IN ROUTINE

;BA/CC

sRhhNk

RDO

104455
000010

032777
001004

;CALL BA/CC

160000
;BUFFER ADDRESS BITS 0-15
BIT15!BIT14!RCOUNT
;BA BITS 16/17 AND CHAR. COUNT

WAIT

147716

sxxxx MACRO CXPANSION x#wx

RQI!BACCR

BACCIT

032302
032306

032366
032366
032366
032370

JSR

.WORD
.WORD

032302

032352
032352
032360
032364
032364
032364

160000,81T15'BIT14 'RCOUNT

160000
160044

032270
032270
032274
032276
032300

;ADDR = 760000 AND A CHARACTER COUNT

BACCIR

012272

($ESCAPE
L10057-.

;MACRO FOR MASTER CLEAR
;xxxx MACRO EXPANSION xxnx

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuL~-81 11:32

032370
032374
032374
032376
032400

032400
032404
032406
032410
032412
032412
032414
032416
032416
032422

032424
032424
032426
032430

032430
032434
032436
032440

032442
032442
032444
032446

004737

011070

104410

000154

004737
004000
002640
000522

011266

JSR

PC,

ESCAPE

JSR

ESCAPE

011522

JSR

ESCAPE

000124

BACCIR

012272

JSR

000044

012737

SEQ 0142

;ISSUE A DMR MASTER CLEAR
:*ttt

:IF

L 2 2 3 4

ERROR,

BR TO TEST END.

PC, $BASEI
LWORD
LPLU

BASE
DMR

TST

:MACRO FOR BASE IN COMMAND
Sxxax MACRO EXPANSION sxw»
*CALL BASE IN ROUTINE WITH DEFAULTS
:SET LINE UNIT LOOP
*BASE TABLE ADDRESS

*DMR-11 MODE
:ttfit

000001

002366

MCV

TRAT

.WORD

:MACRO FOR CONTRGL IN (FULL DUPLEX)
PC,

$CNTIN

.WORD

ixxax MACRO EXPANSION #w#w
“CALL CONTROL IN ROUTINE WITH

“SEL6 = FULL DUPLEX, RUN MODE,
;tt**

:IF

1 2 2 8¢

ERROR,

032454
032460
032462
032464

BACCIT

004737
000040

012272

JSR

160000
140001

TO TEST END.

SEC START.

TRAP

.WORD

:BA/CC IN RCV

032466
032472

004737

010276

032474
032502

032777
001005

000001

147532

CSESCAPE

L10057-.

Sxxxx MACRO EXPANSION ###
PC. $BACC
SCALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI'BACCR
:BA/CC IN RECEIVE COMMAND
_WORD
RBUF
;RECEIVE BUFFER
"WORD
RCOUNT
:RECEIVE CHARACTER COUNT
ST

:1F

#CNTRL,ERROR

1 3 8. 8¢

ERROR,

:INHIBIT

TO TEST END.

TRAP

.WORD

;ADDRESS (760000) AND A CHAR. COUNT = 1

PC,

$BACC

.WORD
.WORD

:tttt

WAIT

RDO

JSR

PC,

BIT
BNE

HCNTRL ,@SEL2
108

SWAIT

WORD

:CALL BA/CC

IN ROUTINE

RQI'!BACCT
sBA/CC IN TRANSMIT COMMAND
160000
;BUFFER ADDRESS BITS 0-15

BIT15!BIT14!1

;BA BITS 16 & 17 AND CHAR. COUNT
1 8.2 21

;WAIT FOR RDO TO BE SET.
sxxxk MACRO EXPANSION *xxx
;CALL WAIT ROUTINE

JFLAG THAT WE'RE WAITING FOR RDO
;ttit

CSESCAPE

L10057-.

CONTROL OUT ERROR REPORTING AGAIN.

160000,81T15!BIT14!1
sxwxx MACRO EXPANSION wxxx

.WORD

032466

CS$ESCAPE

L10057-.

DEFAULT

;JBA/CC IN XMIT COMMAND WITH NXM BUFFER
032454

CSESCAPE

L10057-.

2 3 3

;IF ERROR, BR TO TEST END.’

;ttt*

ESCAPE

TRAP

.WORD

CNTRIN

104410

104410
000106

$MSCLR

.WORD
.WORD

000136

004737
000044
002572

M 11
12:42
PAGE 143
TEST 9 = NON-EXISTENT MEMORY ERROR

29-JuL-81

BASE IN

104410

004737
000000

30A(1052)

ARKKN

;1S THERE A CONTROL OUT REPORTED ?
;IF YES, PROCEED.

N1
12:42
PAGE 144
29~ JUL-81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
TEST
9
-~
NON-EXISTENT
MEMORY ERROR
CZOMID.P11
29-JuL-81 11:32
6739
6740
6741
6742
6743
744

6745
6746
6747
6748
6749
6750
6751
6752
6753
6754
6755
6756
6757
6758
6759
6760
6761
6762
6763
6764
6765
6766
6767
6768

032504
032504
032506
032510
032512
032514
032516
032516
032524
032526
032526
032530
032532
032534
032536
032536
032544

032550
032550
032550

032552
032552
032552

ERRDF

104455

000410

032777
001004

000400

147514

104455
000011
020040
015124

042777
005037

JEXPECTED CONTROL OUT

TRAP

.WORD
.WORD
«WORD

20%

JEXIT

BIT
BNE
ERRDF

ANXM,QSEL6

;1S THE NXM FLAG SET?
;IF YES - ERROR REPORTED CORRECTLY
JUNEXPECTED CONTROL OUT RECEIVED

20%
9.EMGY,ERRGZ

TRAP

.WORD
.WORD
.WORD

000207
002366

147470
ENDSUB

104403
ENDTST
104401

8.EMG8 ,ERRGZ

SEQ 0143

BIC
CLR

#RDO
CMD ,@SEL2
!
ERROR

C$ERDF
8
EMG8
ERRG2

CSERDF
9
EMG9

ERRGZ

;CLEAR RDPO AND THE COMMAND BITS.

sDON'T INHIBIT CONTROL OUT ERRORS
L10062:

L10057:

TRAP

C$ESLB

TRAP

CSETST

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuL~81 11:32

30A(1052)

B 12
12:42
PAGE 145
29-JuL-81
TEST 10 - TIME OUT ERROR

SEQ 0144

2;98

LSBTTL

6771

Ie
e A
T Y

€772
6773
6774

I
TEST
10 - DMR-11
;* TIME OUT - FORCE A TIMEOUT AND VERIFY THAT THE ERROR IS REPORTED
;v THIS TEST WILL ALSO USE AN APPROXIMATE TIMER TC DETERMINE IF THE

6777

Etttttttttttt*ttttttttttttttttttttttttttttttttttttttttttttttttt'tttttfi

g;;g

6778
6779
6780
6781
6782
6783

6784
6785

6786
6787
6788
6789
6790
6791
6792
6793
6794

6795
6796
6797
6798
6799
6800

;x M8207 1 MSEC PROGRAM TIMER IS OUT 07 RANGE.
- %

032534
032554
032554

BGNTST
CLEAR

032554

004737

032560
032560
032562
032564

104410
000214

032564
032570
032572
032574

004737
004000
002640
000522

6801

032576

6804
6805
6806

032576
(32602
032604
032606

004737
000013
177777
177601

032610
032610
032612
032614

104410
000164

6817

032614
032620
032622
032624

004737
000012
000000
000010

6819
6820
6821
6822
6823

032626
032626
032630
032632

104410
000146

6802
6803

6807

6808
6809
6810
6811
6812
6813
6814
6815
6816
6818

6824

TEST 10 - TIME OUT ERROR

011070

$MSCLR

JSR

PC,

ESCAPE

TST

:IF ERROR, BR TO TEST END.

PC, $BASEI]
.WORD
LPLU
.WORD
BASE
.WORD
DMR

;MACRO FOR BASE IN COMMAND
Jrexxx MACRO EXPANSION xxw«
;CALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS
:DMR-11 MODE

BASEIN
011266

012062

T10::
;MACRO FOR MASTER CLEAR
suxwk MACRO EXPANSION #xex
;ISSUE A DMR MASTER CLEAR

JSR

JRRRR

JERER

AREN

TRAP
.WORD

NARN

;SET THRESHOLD VALUES AS FOLLOWS:
;BSEL4 = NAKS RECEIVED (377)
JBSELS = NAKS TRANSMITTEL (377)
JBSEL6 = REP/SEL SENT (1)
:BSEL7 = NO BUFFFER (377)

DMRIN

THRESH,177777,177401

JSR

PC, $DMRIN
.WORD
THRESH
.WORD
177777
.WORD
1776401

savnx MACRO EXPANSION xanx
. CALL DMR MODE INPUT ROUTINE

; INPUT COMMAND
;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)
22321

ARNR

ESCAPE

TST

;IF ERROR, BR TO TEST END

DMRIN

TIMER,0,10

JSR

PC., $DMRIN
.WORD
TIMER
.WORD
0
.WORD
10

;SET REP/SEL TIMER
suevax MACRO EXPANSION wwarx
;CALL DMR MODE INPUT ROUTINE
; INPUT COMMAND
;SELS VALUE (OR BITS TO CLEAR IN BSELS6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)

TS7

;IF ERROR, BR TO TEST END.

ESCAPE

CNTRIN

CSESCAPE
L10063-.

JRRRR

TRAP
.WORD

CSESCAPE
L10063-.

TRAP
LWORD

CSESCAPE
L10063-.

ERRK

JMACRO FOR CONTROL IN (FULL DUPLEX)
savxx MACRO EXPANSION sxwn

c 12
12:42
PAGE 146
29-JuL-81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
TEST 10 - TIME OUT ERROR
CZDMID.P11
29-JUL-81 11:32
032632
032636

032640
032640
032642

004737
000000

011522

JSR

ESCAPE

104410

TST

;CALL

CONTROL

IN ROUTINE WITH DEFAULT

JSEL6 - FULL DUPLEX, RUN MODE,
:tt*t

;IF

ERROR,

TO TEST END.

004737
000005

012062

DMRIN

WMODEM,0,BIT4

JSR

PC, SDMRIN
.WORD
WMODEM

.WORD
.WORD

000000
000020

TRAP

012272

JSR

000044

O
BIT4

032670
032670
032672
032674

104410
000104

032674
032700

004737
000001

ESCAPE

010276

PC,

000072
023727

032714

003005

032716
032716
032720
032722
032724

104455
000023
020402
000000

002416

;USE WRITE MODEM COMMAND TO SET HALF DUPLEX.
sxxxx MACRO EXPANSION wxx«
;CALL DMR MODE INPUT ROUTINE
:INPUT COMMAND
;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)

;SEL6 VALUE

:*t*t

(OR BITS TO SET IN BSEL6)
1. 8.8 8 1

sxxxx MACRO EXPANSION wxxx
: CALL BA/CC IN ROUTINE WITH DEFAULTS
RQI!BACCT
:BA/CC IN TRANSMIT COMMAND
TBUF
s TRANSMIT BUFFER ADDRESS
TCOUNT
TRANSMIT CHARACTER COUNT

TST

RDO

JSR

PC,

011610

L10063-.

$BACC

.WORD
.WORD
.WORD

WAIT

ESCAPE

104410

C$ESCAPE

;BA/CC IN XMIT BUFFER

BACCIT

004737
000040
002522

SEC START.

JBLIND THE RECEIVER BY GOING INTO HDX.

;t***

032702
032702
032704
032706

LA 2 24

.WORD

032656
032656
032662
032664
032666

SCNTIN

.WORD

000134

032644
032644
032650
032652
032654

PC,

SEQ 0145

;IF

SWAIT

.WORD

TST

COUNT, #5000.
8GT

ERRDF

19,EMG19

ERROR,

EXIT

TRAP

.WORD

;WAIT FOR THE READY OUT.
sxxxx MACRO EXPANSION #xxx
;CALL WAIT ROUTINE

CSESCAPE

L10063-.

;FLAG THAT WE'RE WAITING FOR RDO
:tttt

;IF

Ahkkk

ERROR,

EXIT.

TRAP

;CHECK THE SOFTWARE TIMER COUNT.
;THE

.WORD

CSESCAPE

L10063-.

TIMER VALUE WAS DETERMINED

JEMPIRICALLY ON A 11/04, 11/34, 11/40, 11/70.
;IF OK - PROCEED

;ttttt*ttt*t*ttfitt*t*tt*ttt**titttttttt

;IMSEC PROGRAM TIMER - OUT OF

TRAP

.WORD
.WORD
WORD

RANGE.

C$ERDF

19
EMG19
O

;IF THIS ERROR OCCURS, CHECK THE MB207
;MICROPROCESSOR AS FOLLOWS:
JRESET THE DMR, SCOPE E-69, PIN 4 TO VERIFY
:THAT THE TMSEC TIMER IS OUT OF RANGE.
:tttttitfifii"fifitttfittt"'tit*ttttfitttt'

032726
032730
032730
032736

000423

032777
001005

000001

147276

25%

BIT
BNE

#CNTRL ,@SEL2
108

;IS THIS A CONTROL OUuT
;1F YES, PROCEED.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuL~81 11:32
032740
032740
032742
032744
032746
032750
032752
032752
032760
032762
032762
032764
032766
032770
032772
032772

032777
001004

032772

004737

30A(1052)

29-JUL-81

000002

104455
000011
020040
015124

147260

10%:

20%:

012562

D 12
PAGE 147

8,EMG8,ERRGZ

JEXPECTED A CONTROL OUT.

208

JEXIT

BIT

#TOUT ,aSEL6

;WAS

ERRDF

9.EMG9,ERRGZ

20%

SHUTDN

JSR

PC,

$HALT

25%:

032776
032776
032776

ENDTST
1044017

THE

-WORD
.WORD
.WORD

CSERDF
8
EMG8
ERRGZ

TRAP
.WORD

CSERDF
9

TRAP

TIME OUT REPIRTED?

JIF YES, EXIT
JUNEXPECTED ERROR.

. WORD
.WORD

EMGY
ERRG?2

TRAP

CSETST

sxxxx MACRO EXPANS]ION #ww»
;sDMR HALT ROUTINE.
cRARNK

032776

SEQ 0146

TEST 10 - TIME OUT ERROR

ERRDF

104455
000010
017774
015124
000410

12:42

[

L2
2 4 ¢

L10063:

E 12
CZDMIDO DMR-11 FUNCTIONAL TESTS MA(CY11 30A(1052)
29-JuUL-81
12:42 PAGE 148
CZDMID.P11
29-JuL=-81 11:32
TEST 11 - MESSAGE TOO LONG ERROR

SEQ 0147

2882

.SBTTL

6507

6908
6909
gg}?

v
:*
:*

TEST 11 - DMR-11
MESSAGE TOO LONG - TRANSMIT A MESSAGE THAT IS TOO LONG FOR THE
RECEIVE BUFFER AND VERIFY THAT THE ''TOO LONG'' ERROR IS RECEIVED.

6912
6913
6914
6915

033000
033000
033000

:-ttttttttttt*t*ttttttttt*tttttttttttttttttttttttttittttttttttttttttttt
BSGNTST
T11::
(LEAR
;MACRO FOR MASTER CLEAR

231;

033000

004737

6919
6920
6921
6922

033004
033004
033006

104410
000150

6925
6926
6927
6928

033010
033014
033016
033020

004737
004000
002640
000522

6916

6923
6924

6929

6930
6931
6932
6933
6934
6935
6936
6937

6938

6939
6940
6941
6942
6943
6944
6945
6946
6947

6948

6949

6950
6951
6952
6953
6954
6955
6956
6957
6958
6959
6960

TEST 11 - MESSAGE TOO LONG ERROR
AR

R RN

RN AR

R AR

AR RN R AN

AR AR RN

RRRN

. %

033010

033022
033022
033026
033026

011266

033034
033034
033036
033040

104410
000120

033040
033044

004737
000044

033050

000022

033052

012737

ESCAPE

TST7

ESCAPE

011522

JSR

ESCAPE

BACCIR
012272

JSR

002572

002366

MOv
BACCIT

004737
000040
002522
000044

PC, $BASEI]
.WORD
LPLU
.WORD
BASE
.WORD
DMR

012272

JSR

;ISSUE A DMR MASTER CLEAR
cHNAR

;MACRO FOR BASE IN COMMAND
seeax MACRO EXPANSION wwrex

TRAP
.WORD

C$ESCAPE
L10064-.

JCALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS
;CMR-11 MODE
JhRRR

['S2 2

T3T

;IF ERROR, BR TO TEST END.

PC., $CNTIN
.WORD
0

.WORD
L10064-.
;MACRO FOR CONTROL IN (FULL DUPLEX)
sennr MACRO EXPANSION wrxx
;CALL CONTROL IN ROUTINE WITH DEFAULT
JSEL6 = FULL DUPLEX, RUN MODE, 1 SEC START.

TST

;IF ERROR, BR TO TEST END.

JRRER

TRAP

C$ESCAPE

TRAN

TRAP
CSESCAPE
.WORD
L10064-.
RBUF ,RCOUNT/?2
;SET UP THE RECEIVE BUFFER WITH 1/2 BUF. SPACE
savax MACRO EXPANSION xrnx
PC, $BACC
;CALL BA/CC IN ROUTINE
.WORD
RQI 'BACCR
JBA/CC IN RECEIVE COMMAND
.WORD
RBUF
;JBUFFER ADDRESS BITS 0-15

.WORD

000001

sevne MACRO EXPANSION wwnx

;IF ERROR, BR TO TEST END.

CNTRIN

033060
033060
033064
033066
033070

PC, $MSCLR

JSR

000132
004737
000000

JSR

BASEIN

104410

033026
033032

033C46

011070

RCOUNT/?2

#CNTRL ,ERROR

IRERN

;BA BITS 16717 AND CHAR. COUNT
ERRR

;THIS FLAG WILL DISABLE ANY CONTROL OUT ERROR
;REPORTING BECAUSE WE ARE INTENTIONALLY
JCAUSING ONE IN THIS TEST.
JBA/CC IN XMIT COMMAND
Jaanxr MACRO EXPANSION wwaxx
PC, $BACC
;JCALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI'BACCT
;BA/CC IN TRANSMIT (OMMAND
.WORD
TBUF
;TRANSMIT BUFFER ADDRESS
.WORD
TCOUNT ; TRANSMIT (CHARACTER COUNT
PR
CERER

——

CZDMIDO DMR~11 FUNCTIONAL TESTS MACY11
CZDMID.P11

6961
6962
6963
6964
6965
6966
6967
6968
6969
6970
6971
6972
6973
6974
6975
6976
6977
6978
6979
6980
6981
6982
6983
6984

29-JuL~-81 11:32

033072
033072
033072
033076

30A(1052)
10%:

004737
000001

010276

F 12
12:42
PAGE 149
29-JuL-81
TEST 11 -~ MESSAGE TOO LONG ERROR
WAIT

RDO

JSR

PC,

SWAIT

LWORD

SEQ 0148

;WAIT FOR RDO TO BE SET
srnxx MACRO EXPANSION e«

;CALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDO
AR

033100
033100
033102
033104
033112
033114
033114
033116
033120

033122
033124
033126
033126
033134
033136
033136
033136
033140
033142
033144

ESCAPE

104410

000054
032777
001005

000001

147122

104455
000010
017774
015124
000410

032777
001004

000020

47104

BIT
BNE
ERRDF

20%:
30%:

104455

;IF RDO NOT SET, BR TO TEST END.

#CNTRL ,@SEL?

20%
8.EMG8,ERRGZ

;1S THIS A CONTROL OuT?
;IF YES, PROCEED
SEXPECTED CONTROL OUT.

TRAP

.WORD
.WORD
.WORD

4<0%

SEXIT

BIT
BNE

#TOLONG,@SEL6

;1S THE TOO LONG BIT SET?

ERRDF

G.EMGY,ERRGZ

JWE'RE NOT GETTING EXPECTED RESULT

40%

;IF

YES,

002366

033152

004737

012562

40%:

CLR
SHUITDN

ERROR

JSR

PC,

SHALT

TRAP

JRESTORE ERROR FLAG
JHALT THE DMR.

CSERDF
8
EMG8
ERRG2

TO NORMAL

(SERDF

EMGY
ERRGZ2

STATE.

sxxxx MACRO EXPANSION w*w«

:DMR HALT ROUTINE.
kRN

ENDTST

CSESCAPE
L10064~.

TEST OK = FINISH UP,

.WORD
. WORD
.WORD

005037

104401

TRAP

.WORD

000011
020040
015124

033146
033146
033152

033156
033156
033156

A 24
LA

[

LA
A B

L10064:

TRAP

(SETST

G 12
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuUL-81
12:42 PAGE 150
TEST 12 - PROCEDURE ERRORS
CZDMID.P11
29-JuL-81 11:32
.SBTTL

7002
7003
7004
7005
7006
7007
7008
7009
7010
7011
7012
7013
7014
7015

7016
7017
7018
7019

7020
7021
7022

7023
7024
7025

7026
7027
7028
7029

7030
7031
7032

TEST 12 - PROCEDURE ERRORS

AR AR RN NN

%
%
%
%
%

*»
%

;

. %

PROCEDURE

E RN R AR R AN RN AR R A RN

R R AR

A RN RN RO R AR AN

ERRORS -

THE FOLLOWING SHOULD CAUSE
A PROCEDURE ERROR:

THE DMR-11

R NS

TO HALT AND RESPOND WITH

SUBTEST 1
SUBTEST 2
SUBTEST 3

=
-~

A SECOND BASE [N COMMAND
A CONTROL IN BEFORE A BASE IN
A BA/CC IN BEFORE A BASE IN

SUBTEST S

A BA/CC IN XMIT. WITH A BUFFER LENGTH OF 0

SUBTEST 4

TEST 12 - DMR-11

SEQ 0149

A BA/CC IN RCV WITH A BUFFER LENGTH OF O

;t‘*i*‘**'*tfi*itlQ*tfifi'li"'fififi"*!*tfitfifi"*t"'i'*flt"ifii'ttitt"'t"
033160
033160
033160
033160
033160

BGNTST

CLEAR

004737

011070

JSR

033166

004737

033200

012737

004000
002640
000522

011266

JSR

033216

000001

0C2366

033226
033226
033230
033232
033240
033242
033242

:tt.'

MOV

004737
004000
002640
000522

011266

JSR

004737
000001

DMR

;DMR-11 MODE
:ttt:

#(NTRL ,ERROR

104410

000632
032777
001005
104455

000001

146774

DMR

RDO

JSR

PC, SWAIT

ESCAPE

TST

BNE
ERRDF

L2 2 81

;JTHIS FLAG WILL DISABLE ANY CONTROL OUT ERROR
;REPORTING BECAUSE WE ARE INTENTIONALLY

;SECOND BASE IN
sxxxx MACRO EXPANSION w#xx
;CALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS

PC, $BASE]
.WORD
LPLU
.WORD
BASE

WAIT

BIT

L2 2

;CAUSING ONE IN THIS TEST.

.WORD

010276

($BSUB

;xxex MACRO EXPANSION swx»
*CALL BASE IN ROUTINE WITH DEFAULTS
:SET LINE UNIT LOOP
;BASE TABLE ADDRESS

PC, $BASEI
.WORD
LPLU
.WORD
BASE

BASEIN

033220

033220
033224

BMSCLR

.WORD

033206

PC,

TRAP

JMASTER CLEAR MA(RO
Jwxwsx MACRO EXPANSION x#xr
;ISSUE A DMR MASTER CLEAR

BASEIN

033166
033172
033174
033176

033212
033214

T12.1:

104402

033162
033162

T12::

BGNSUB

.WORD

#CNTRL ,aSEL?2
1 0%

8,EMG8,ERRGZ

;:DMR-11 MODE
S RRER

;WAIT FOR RDO TO BE SET
;xxxx MACRO EXPANSION wxxx

;CALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDC
JRNRK

1222

;IF RDO NOT SET, BR TO TEST END.

;IS THIS A CONTROL 0OUT?
;IF YES, PROCEED.
JEXPECTED CONTROL OuT

TRAP

(SESCAPE

.WORD

L10065~.

TRAP

CSERDF

H 12

SEQ 0150

CZDMIDO DMR~11 FUMCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42 PAGE 151
TEST 12 - PROCEDURE ERRORS
(ZDMID.P11
29-JuL~-81 11:32
033244
033246
033250

017774
015124

000410

032777
001004

001000

146756

104455
000011
020040
015124

062777
005037
033306

033310
033310
033310

000207
002366

146732

7085

7089

15%

JEXIT

BIT
BNE
ERRDF

WHALTC,QSEL6

.1S THE HALT - PROCEDURE ERROR BIT SET?
;IF YES - ERROR REPORTED CORRECTLY
JUNEXPECTED CONTROL OUT RECEIVED

15%:
ENDSUB

BIC

CLR

15%
9.,EMGY,ERRG2

#RDO!CMD,aSEL?
ERROR

T12.2:

104402

004737

011070

033316

012737

000001

033324

005037

002260

JSR

002366

PC,

SMSCLR

MOV

#CNTRL ,ERROR

CLR

DMRFLG

7097
7098
7100
710
7102
7103
7104

7105

7106

7107
7108
7109
7110
7111
7112
7113

TRAP

($ESLB

TRAP

c$8suLB

EMG9
ERRGZ

FLAG

BGNSUB

CLEAR

C$ERDF

.WORD
.WORD
.WORD

:CLEAR RDO AND THE COMMAND BITS

JRESTORE

L10066:

JMASTER CLEAR MATRO
crxxx MACRO EXPANSION

wwww

:'Qtt

AN K

;ISSUE A DMR MASTER CLEAR

;THIS FLAG WILL DISABLE ANY CONTROL OUT ERROR
;REPORTING BECAUSE WE ARE INTENTIONALLY

;CAUSING ONE IN THIS TEST.
sCLEAR FLAG THAT IS SET IN BASEIN IN ORDER
2TO FLAG

THAT A CONTROL

OUT-DMR RUN MODE

;sCOMMAND IS EXPECTED (THIS FLAG WAS SET IN

7091

7093
7094
7095

TRAP

104403

033312
033312

10%:

8
EMG8
ERRGZ2

.WORD
.WORD
.WORD

00001C

033330

033330
033334

;THE PREVIOUS SUBTEST BASEIN)

;CONTROL IN

CNTRIN

004737
000000

011522

JSR

PC,

SCNTIN

.WORD

sxnxx MACRC EXPANSION w»x«

;CALL CONTROL IN ROUTINE WITH DEFAULT
;SEL6 = FULL DUPLEX, RUN MODE, 1 SEC START.
:*t"

033336
033336
033342

023344
033344
033346
033350
033356
033360

004737
000001
104410
000514

032777
001005
104455
000010

017774
015124

010276

WAIT

RDO

JSR

PC,

ESCAPE

000001

146656

8IT
BNE
ERRDF

4 4

JWAIT FOR RDO TO BE SET
SWAIT

.WORD

TST

#CNTRL ,aSEL?
108

8.EMG8,ERRGZ

sxxax MACRO EXPANSION wxxx

;CALL WAIT ROUT INE

;FLAG THAT WE'RE WAITING FOR RDO
:iitt

LR &

;IF RDO NOT SET, BR TO TEST END.
;1S THIS A CONTROL 0OUT?
;IF

TRAP

’

CSESCAPE

.WORD

L10065-.

TRAP

CSERDF

YES - PROCEED.

JEXPECTED CONTROL OUT

.WORD
.WORD
.WORD

8
EMGS8
ERRGZ2

CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZ0MID.PTT

29~-JuL-81 11:32

033370

108

00041C
032777
001004

001000

146640

107455
000011

020040
015124
033412
033420
033424
033424
033424
033426
033426
033426

042777
005037

000207
002366

15%

JEXIT

BIT
BNE
ERRDF

#HALTC ,aSELG
15%
9,EMGY,ERRG?

;1S THE HALT - PROCEDURE E£RROR BIT SET?
;IF YES - ERROR REPORTED CORRECTLY
JUNEXPECTED CONTROL OUuT RECEIVEDTRAP
.WORD
.WORD

BIC

1466146

ENDSUB

CLR

ERROR

EMGY
ERRGZ

TRAP

C$ESUB

TRAP

csBSUB

;CLEAR RDO AND THE COMMAND BITS.
;RESTORE FLAG

L10067:

T12.3:

;MASTER CLEAR MA(CRO

CLEAR
011070

033434

012737

000001

002366

JSR

PC, S$MSCLR

MoV

#CNTRL ,ERROR

033442

BACCIR

033442
033446
033450
033452

JSR

004737
000044
002572
000044

012272

004737
000001

000376
032777
001005
104455
000010
017774
015124
000410

032777
001004

108
001000

146522

;THIS FLAG WILL DISABLE ANY (ONTROL OUT
;REPORTING BECAUSE WE ARE INTENTIONALLY
:CAUSING ONE IN THIS TEST.
:BA/CC IN RCV. COMMAND

RBUF

RCOUNT

;RECEIVE CHARACTER COUNT

;ti*fi

1 2 8 84

:WAIT FOR RDO TO BE SET

JSR

PC, SWAIT
1
.WORD

:CALL WAIT ROUTINE
:FLAG THAT WE'RE WAITING FOR RDO

TST
#CNTRL ,@SELZ
10%
8,EMG8,ERRG?

15%

B8IT

#HALTC ,aSELGE

BNE
ERRDF

ERROR

;RECEIVE BUFFER

RDO

BIT
BNE
ERRDF

146540

1 2 8 3 4

WA]IT

ESCAPE
)00001

;1SSUE A DMR MASTER (CLEAR

:t**t

;enxx MACRO EXPANSION wxxx

.WCRD

104410

sxnexx MACRO EXPANSION xwex

:CALL BA/CC IN ROUTINE WITH DEFAULTS
PC, $BACC
:BA/CC IN RECEIVE COMMAND
RQI'BACCR
.WORD
.WORD

010276

CSERDF
9

.WORD

104402

004737

033510
033516
033520

#RDO.CMD,@SEL2

BGNSUB

033454

7169

B8R

104403

033430

033462
033462
033464
033466
033474
033476
033476
033500
033502
033504
033506
033510

SEQ 0151

158

033430

033454
033460

I 12

12:42
PAGE 152
TEST 12 - PROCEDURE ERRORS

29-JuL-81

159%
9,EMGY ,ERRGZ2

;xxxx MACRO EXPANSION xwwn
;i!’*fi

1 2 2 & ]

;IF RDO NOT SET, BR TO TEST END.
;1S THIS A CONTROL QUT?
:IF YES - PROCEED.
CEXPECTED CONTROL 0uT

JEXIT

TRAP

CSESCAPE
L10065~.

TRAP

CSERDF
8
EMG8
ERRG?Z

.WORD

.WORD
.WORD
.WORD

;IS THE HALT - PROCEDURE ERROR BIT SET?

;IF YES = ERROR REPORTED CORRECTLY
SUNEXPECTED CONTROL OUT RECEIVED

J 12

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42 PAGE 153
TEST 12 - PROCEDURE ERRORS
CZOMmMID P11
29-JuL~81 11:32
7170
n
7172
7173
7174
7175
7176
7177
7178
7179
7180
2181
7182
7183
7184
7185

7186
7187
7188
7189
7190
719N
7192
7193
7194
7195
7196
7197
7198
7199
7200

7201

7202
7203
7204
7205
7206
7207
7208

7209
7210

7211
7212

7213
7214
7215
7216
7217
7218
7219
7220
7221
7222
7223
7224
7225

033520
033522
033524
033526
033530
033530
033536
033542
033542
033542

033544
033544
033544
033546
033546

SEQ 0152

104455
000011
020040
015124

042777
005037

000207
002366

146476
ENDSUB

BIC
CLR

#RDO!CMD,aSEL2

ERROR

;CLEAR RDO AND

THE

JRESTORE FLAG

L1007C:

BGNSUB

004737

T12.4:

;MASTER CLEAR

CLEAR

011070

JSR

PC,

SMSCLR

104410
000306

033556
033562
033564
033566

004737
004000
002640
000522

ESCAPE

011266

JSR

PC, $BASE!
.WORD
LPLU
.WORD
BASE

DMR

TST

JSR

ESCAPE

033612

000001

033620

004737
000040
002522

012272

002366

($BSUB

ERROR,

EXIT.

TRAP

.WORD

;SET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE
:***'

ERROR,

L2 &

EXIT.

.WORD
;ASSIGN A BA/CC IN RECEIVE BUFFER
PC,

$BACP

.WORD

TST

;BA/CC IN RECE1VE COMMAND

JRECEIVE BUFFER
;RECEIVE CHARACTER COUNT
"l't*'

;IF

XN AIN

ERROR,

EXIT.

TRAP

.WORD

MOV

#CNTRL ,ERROR

;THIS FLAG WILL DISABLE ANY CONTROL

BACCIT

TBUF ,0

;ASSIGN A BA/CC

JSR

PC, $BACC
.WORD
RQ] 'BACCT

.WORD
.WORD

000000

WAIT

RDO

OuT

CSESCAPE

L10065~-.

JERROR REPORTING BECAUSE WE ARE INTENTIONALLY
;CAUSING ONE.
IN XMIT BUFFER LENGTH = 0.

sxexn MACRO EXPANSION txxx
;CALL BA/CC IN ROUTINE

TBUF
O

CSESCAPE

L10065-.

sanxte MACRO EXPANSION =axn
JCALL BA/CC IN ROUTINC WITH DEFAULTS

RQJ] !BACCR
RBUF
RCOUNT

($ESCAPE

L10065~-.

TRAP

.WORD
.WORD

033606
033606
033610

TRAP

suaxxx MACRO EXPANSION wwww
;CALL BASE IN ROUTINE WITH DEFAULTS

;IF

BACCIR

012272

CSESUB

YRR W

;BASE IN COMMAND

.WORD

ESCAPE

033574
033600
033602
033604

033632

;1F

BASEIN

033570
033570
033572
033574

033620
033624
033626
033630

TST

TRAP

Jxxxx MACRO EXPANSION w*xxn
;ISSUE A DMR MASTER CLEAR
:*'**

033552
033552
033554
033556

.WORD
.WORD

( $ERDF
9
EMG9Y
ERRG¢

COMMAND BITS.

104403

104402

TRAP
.WORD

;BA/CC

IN TRANSMIT COMMAND

;BUFFER ADDRESS BITS 0-15
;BA BITS 16 & 17 AND CHAR. COUNT
:".‘

;WAIT

12 8 3]

FOR RDO

TO BE

SET

(ZDOMIDO DMR-11 FUNCTIONAL
CZDMID P11
29-JuL -81
7226
7227
7228
7229
7230
7231

7232

7233

033630
033636

004737
000001

033640
033640
033642
033644
033652

TES®
e

MACY1T

010276

000001

146362

104455
000010
017774
015124
000410

032777
001004

00100C

166344

033714
033720
033720
033720

033722
033722
033722
033724
033724

JSR

PC,

ESCAPE

TST

BIT
BNE
ERRDF

10%:

000207
002366

146320

SWAIT

.WORD

sxennx MACRO EXPANSION wwwxx

sCALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDO
;it'fl

#CNTRL ,aSELZ

108
8,EMG8,ERRGZ

;IS THIS A CONTROL 0UT?
;1F YES - PROCEED.
JEXPECTED CONTROL OuT

15%:

BIC
CLR

#RDO! CMD,@SEL2
ERROR

T12.5:

PC,

SMSCLR

033734
033740
033742
033744

ESCAPE

004737
004000
002640
000522

TST

IMASTER CLEAR
Jaxxsx MACRO EXPANSION wxwx

011266

JSR

033760

ESCAPE

000001

002366

TRAP

C$ESLB

TRAP

cs$8suB

TRAP

CSESCAPE
L10065~.

PC, $BASEI
.WORD
LPLU
.WORD
BASE
DMR
.WORD
TST

MOV

#CNTRL ,ERROR

BACCIR

RBUF ,0

EMGS
ERRGZ2

A kR

:IF ERROR, EXIT.

.WORD

swrxx MACRO EXPANSION **xx

s CALL BASE IN ROUTINE WITH DEFAULTS
;SET LINE UNIT LOOP
;BASE TABLE ADDRESS

;DMR-11 MODE

IRERR

033746
033746
033750
033752

;1SSUE A DMR MASTER CLEAR

sBASE IN COMMAND

BASEIN

CSERDF

TRAP
.WORD

JCLEAR RDO AND THE COMMAND BITS.
;RESTORE FLAG
L10C71:

JSR

000130

CSERDF
8
EMGS8
ERRGZ

.WORD
-WORD
.WORD

.WORD
.WORD

CLEAR

104410

TRAP

;1S THE HALT - PROCEDURE ERROR BIT SET?
;IF YES - ERROR REPORTED CORRECTLY
JUNEXPECTED CONTROL OUT RECEIVED

KRR

033730
033730
033732
033734

L10065-.

#HALTC ,@SEL6

15%
9.EMGY ,ERRGZ

CSESCAPE

.WORD

BIT

BGNSUB

011070

TRAP

SEXIT

104403

004737

L2 8 8]

;IF RDO NOT SET, BR TO TEST END.

15%

ENDSUB

104402

SEQ 0153

ERRDF

104455
000011
020040
015124

042777
005037

K 12
29-JuUL-81
12:42 PAGE 154
TEST 12 - PROCEDURE ERRORS

30A(1052)

;IF ERROR, EXIT.

renn

TRAP

.WORD

CSESCAPE
L10065-.

sTHIS FLAG WILL DISABLE ANY CONTROL OUT
;ERROR REPORTING BECAUSE WE ARE INTENTIONALLY
s CAUSING ONE.
JASSIGN A BA/CC IN RF(C. BUFFER LENGTH = 0

CZDMIDO DMR=11 FUNCTIONAL TESTS MACY11
CZOMID.P11
29-JuL-81 11:32
7282
7283
7284
7285
7286
7287
7288
7289
7290
7291
7292
7293
7294
7295

7296
7297

033760
033764
033766
033770

033772
033776
034000
034000

034002
034004

034012
034014
034014
034016
034020
034022
034026
034026
034026
034034
034036
034036
034040

7312
7313
7314
7315
7316
7317
7318
7319
7320
7321
7322

034044
034046
034046
034054
034060
034060
034060

034042

034062
034062
034062

004737
000001
104410
000060
032777
001005

010276

TEST

000001

146222

001000

SEQ 0154

PC, $BACC

.WORD
.WORD

;BUFFER ADDRESS BITS 0-15
:BA BITS 16/17 AND CHAR. COUNT

.WORD

RQI!BACCR

RBUF
O

RDO

JSR

PC, SWAIT
.WORD
1
TST

#CNTRL ,@SEL?
10%
8,EMG8,ERRGZ

;*ttt

;BA/CC

IN RECEIVE

COMMAND

LA 2 24

;JWAIT FOR RDO TO BE SET
sxxxx MACRO EXPANSION *w%xx

s CALL WAIT ROUTINE
JFLAG THAT WE'RE WAITING FOR RDO
:tt**

;IF RDO NOT SET, BR TO TEST END.

;1S THIS A CONTROL 0OUT?
;1F YES - PROCEED.
SEXPECTED CONTROL OUT

TRAP
.WORD

.WORD
.WORD

15%

JEXIT

BIT
BNE

H#HALTC ,@SEL6
15%

;IS THE HALT - PROCEDURE ERROR BIT SET?
;IF YES - ERROR REPORTED CORRZCTLY
JUNEXPECTED CONTROL OUT RECEIVED

9,EMG9,ERRGZ

TRAP

020040

015124

042777
005037

000207
002366

146160

15%:
ENDSUB

104403
ENDTST

104401

TRAP
.WORD

ERRDF

104455
000011

L 12
PAGE 155
sexnxx MACRO EXPANSION xrnn
;CALL BA/CC IN ROUTINE

WAIT

BIT
BNE
ERRDF

146204

12:42

12 - PROCEDURE ERRORS

ESCAPE

104455
000010
017774
015124
000410
032777
001004

29-JUL-81

JSR

012272

033772

7298
7299
7300
7301
7302
7303
7304
7305
7306
7307
7308
7309
7310
7311

004737
000044
002572
000000

30A(1052)

BIC

CLR

#RDO!
CMD ,aSEL2
ERROR

CSESCAPE

L10065-.

CSERDF
8
EMGS8
ERRG2

CSERDF

.WORD
.WORD
-WORD

EMG9
ERRG2

TRAP

C$ESUB

TRAP

CSETST

;CLEAR RDO AND THE COMMAND BITS.
;JRESTORE FLAG
L10072:

L10065:

m12

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
12:42 PAGE 156
CZ0MID.PN
29~-JuL-81 11:32
TEST 13 - DATA TEST

SEQ 0155

;ggz

LSBTTL

7325

7326

. *

7329
7330
7331

;* IN THIS TEST NO INTERRUPTS ARE USED AND THE LINE UNIT IS IN
;* INTERNAL (TTL) LOOPBACK.
THIS TEST IS THE FIRST TEST IN WHICH
;* THE DMR IS USED IN A DATA TRANSMISSION MODE.

7327
7328

034064
034064
034064

7337
7338
7339
7340
7341

7344
7345
7346
7347
7348
7349

7350
7351
7352

7353

7354
7355
7356
7357
7358
7359

7360
7361
7362
7363
7364

AR N AN R AR TR AR RN R A AR R AR ANAANARARANARN AR

RN RN RN AN

N AN

TEST 13 - DMR-11

AR R R RN RN RN RN RN AR R NN R AR A RN AR AR R RN

A AN RN

BGNTST

AN AR AR RN R

113:

013700

000044

MOV

RCOUNT ,RO

;BYTE COUNT FOR RECEIVE BUFFER

034074
034100
034100
034102

012701

002572

MOV

#RBUF ,R1

;USED FOR DelLIMITOR
;ADDRESS OF RECEIVE BUFFER

CLRB
DEC
BNE

(R1)+
RO
108

;CLEAR A BYTE [N THE BUFFER
JCONTINUE - UNTIL ENTIRE BUFFER DONE

034106
034112
034116

005037
005037

002520
002570

CLR
CLR
CLEAR

TFLAG
RFLAG

034116

004737

011070

JSR

PC,

JCLEAR TRANSMIT FLAG
;sCLEAR RECEIVER FLAG
JMACRO FOR MASTER CLEAR
sexxx MACRO EXPANSION xxxx
;ISSUE A DMR MASTER CLEAR

ESCAPE

TST

;IF

TST
BNE
8IS
BR

DMTURN
11%
#LPLU,100%
12%

;IS INTERNAL LOOPBACK DESIRED?
;1F NOT, CLEAR INTERNAL LOOPBACK.
JSET LINC UNIT LOOPBACK.

BIC

#LPLU,100%

;CLEAR LINE UNIT LOOPBA(CK.

CAl L

$BASE ]

JBASE IN COMMAND.

034070

241064

034122
034122

034124

034126
034132
034134
034142
034144
034144
034152

034152

;ggg

034156
034160
034162
034164
034164
034166

7369
7370
7371
;g;%

034170
034174
034174
034176

7374
7375
7376
7377
7378

034200

7365
7366

AN AR AR R

7333
7334
7335

;%2%

RN R

;% FREE RUNNING FLAG MODE DATA TEST
:* TRANSMIT A MESSAGE AND VERIFY THE RECEIVED DATA IS CORRECT.

7332

7336

TEST 13 - DATA TEST

034200
034204

062700

000002

ADD
10%:

105021
005300

001375

104410
000466
005737
001004
052737
000403
042737

002254

004000

024156

004000

034156

000000
002640
000522

11%:

12%:
100%:

104410
000424

104410
000414

#2,R0O

$MSCLR

ESCAPE

.WORD
.WORD
.WORD
TST

CALL
ESCAPE

$LOOP
TST

0
BASE
DMR

CNTRIN

004737
000000

011522

JSR

PC, $CNTIN
.WORD
O

;2 ADDITIONAL BYTES AT END OF BUFFER ARE

JRRNR

ARNKK

ERROR, BR TO TEST END.

TRAP
.WORD

CSESCAPE
L10073-.

JMAINTENANCE BITS (LINE UNIT LOOP)
;BASE TABLE ADDRESS
;DMR MODE
;IF ERROR, BR TO TEST END.
TRAP
.WORD

(SESCAPE
L10073-.

;DMR COMMAND TO SET MAINT. BITS
:IF ERROR, BR TO TEST END.

TRAP
LWORD

CSESCAPE
L10073-.

JMACRO FOR CONTROL IN (FULL DUPLEX)
sevnne MACRO EXPANSION wwxe
;CALL CONTROL IN ROUTINE WITH DEFAULT
JSEL6 - FULL DUPLEX, RUN MODE, 1 SEC START.
"'t'!
NRA K

N 12

SEQ 0156

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
12:42 PAGE 157
TEST 13 - DATA TEST
CZDMID.P11
29-JUL-81 11:32
7379

034206
034206
034210

ESCAPE

104410

034224
034224
034226

ERROR,

TEST END.

BACCIR

004737
000044
002572

012272

JSR

000044

:BUFFER ADDRESS/(CHARACTER COUNT REC.

sxxxx MACRO EXPANSION wwwx
PC, $BACC
:CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI!BACCR
sBA/CC IN RECEIVE COMMAND
.WORD
RBUF
JRECEIVE BUFFER
.WORD
RCOUNT
RECEIVE CHARACTER COUNT
:ttt*

ESCAPE

104410

TST

;IF

ERROR

L2 2

BACCIT

004737
000040
002522
000044

034242
034242
034244

104410

(I.E.

RDI

NOT SET),

012272

JSR

;BUFFER ADDRESS/CHARACTER COUNT XMIT.

sxxxx MACRO EXPANSION wxxx
PC, $BACC
;CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI!BACCT
;BA/CC IN TRANSMIT COMMAND
.WORD
TBUF
s TRANSMIT BUFFER ADDRESS
.WORD
TCOUNT
TRANSMIT CHARACTER COUNT
;tttt

ESCAPE

ESCAPE
TRAP
.WORD

TST

;IF

ERROR

(I.E.

RDI

NOT SET),

ESCAPE

20%:

004737

103552
032777
001405

010276

000001

145750

104455
000011
020040
015124
000541

032777
001035

TRAP

.WORD

034246
034246

000004

145726

25%:

WAIT

RDO

JSR

PC,

BFRROR

52%

;IF ERROR - RDO NOT SET, END TESéCS

BIT
BEQ
ERRDF

#CNTRL ,@SEL?Z
25%

21S THIS A CONTROL OUT COMMAND ?
;IF NOT - PROCEED

SWAIT

.WORD

9.EMGY,ERRGZ

CSESCAPE

L10073-.
IN

CSESCAPE
L10073-.

;WAIT FOR RDO
sxxxx MACRO EXPANSION ®xxx
;CALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDO
;tt*t

L2 2 &

JUNEXPECTED CONTROL OuT RECEIVEDTRAP
-WORD
-WORD
-WORD

52%

BIT
BNE

H#RCV,aSEL?

;TRANSMIT OR RECEIVE

TFLAG

;1S

10,EMG10,ERRG2

;ERROR MULTIPLE

40%

LA & 2

000346

000001

L10073-.

000364

034230
034234
034236
034240

CSESCAPE

TRAP

.WORD

034230

034246
034252

;IF

000402

034212
034212
034216
034220
034222

TST

;BR FOR RECEIVE

52%

CS$ERDF
9

EMG9
ERRGZ

¢ CHECK TRANSMIT

7433
7434

034310
034314
034316
034316
034320
034322

005737
001405
104455
000N12

020067

002520

TST

BEQ
ERRDF

30%

THIS

JYES = OK

THE

FIRST

TRANSMIT DONE?

TRANSMITS

TRAP

.WORD
.WORD

C$SERDF

EMG10

—

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID P11
29-JuL-81 11:32
7435
7436
7437
7438
7439
7440
74641
7642

7443

74644
7445
7446
7447
7448
7449
7450
7451

7452
7453
7454
7455

7456
7457
7458
7459
7460
7461

7462
7463
7464
7465
7466
7467
7468
7469
7470
74671
7472
7473
7474
7475
7476
7477
7478
7479
7480
7481
7482
7483
7484
7485
74858
7487
7488
7489
7490

034324
034326
034330
034330
034336
034344
034346
034346
034350
034352
034354
034356
034360
034360
034366
034370
034370
034372
034374
034376
034400

015124
000525
012737
022777
001405

177777
002522

002520

30A(1052)

30%:

145672

022777
001470

000044

145652

TEST

32%:

104455
000014
020141
015124
000500

B8 13

SEQ 0157

12:42
PAGE 158
13 - DATA TEST

52%

MOV

#-1,TFLAG
ATBUF ,aSELS

CMP
BEQ
ERRDF

104455

000013
020116
015124
000511

29-JuL-81

328

11,EMG11,ERRGZ

52%

CMP
BEQ
ERRDF

#TCOUNT ,aSEL6

50%
12,EMG12,ERRG2

.WORD

ERRGZ

;FLAG THAT TRANSMIT CHECK IS DONE.
;TRANSMIT BUFFER ADDRESS CORRECT?

;YES - PROCEED
;BUFFER ADDRESS ERROR

;COUNT CORRECT ?
;YES - PROCEED
;CHARACTER COUNT ERROR

TRAP
.WORD
.WORD
.WORD

TRAP

.WORD
.WORD
-WORD

52%

(SERDF
1

EMG11
ERRGZ2

CSERDF
12

EMG12
ERRGZ2

;CHECK RECEIVE
034402
034402
034406
034410
034410
034412
034414
034416
034420
034422
034422
034430

034436
034440
034440
034442
034444
034446
034450
034452
034452
034460
034462
034462

034504

005737
001405

40%:

002570

104455
000015

020167
015124
000470
012737
022777
001405

177777
002572

002570

145600

104455
000013
020116
015124
000454

022777
001405

000044

41%:

145560

43%:

012700
012701
012702

000044
002522
002572

44%:

RFLAG

13,EMG13,ERRG?

52%

MOV

#-1,RFLAG
HRBUF ,aSEL4

CMP
BEQ
ERRDF

104455

000014
020141
015124
000443

TST
BEQ
ERRDF

4£3%
11.,EMG11,ERRG?

B8R

52%

cMP
BEQ
ERRDF

#RCOUNT ,aSEL6
44%

12.,EMG12 ,ERRG2

52%

MOV
MOV
MOV

#RCOUNT ,RO
#TBUF ,R1
#RBUF ,R2

;1S THIS THE FIRST RECEIVE DONE
;YES - PROCEED
sMULTIPLE RECEIVES

TRAP

.WORD
.WORD
.WORD

;FLAG THAT RECEIVE CHECK HAS BEEN DONE.
;1S THE RECEIVE BUFFER ADDRESS CORRECT?
;YES - PROCEED
;BUFFER ADDRESS ERROR
TRAP

.WORD
.WORD
.WORD

;IS THE BUFFER COUNT CORRECT?
;YES - PROCEED
;CHARACTER COUNT ERROR

TRAP

-WORD
.WORD
-WORD

;SET UP FOR DATA CHECK (CHARCATER COUNT)
:GOOD DATA POINTER
JRECEIVE DATA POINTER

CSERDF
13

EMG13
ERRG2

CSERDF
11

EMG11
ERRGZ

CSERDF

EMG12
ERRG?

c 13
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
12:42 PAGE 159
TEST 13 - DATA TESST
CZOMID.P1
29-JuL-81 11:32

SEQ 0158

749N
7492
7493
7494

7495
76496
7497
7498
7499
7500
7501
7502
7503
7504
7505
7506
7507
7508
7509
7510
7511
7512
7513
7514
7515
7516
7517
7518
7519
7520
7521
7522
7523
7524
7525
7526
7527
7528
7529
7530
7531
7532
7533
7534
7535
7536
7537

034510
034510
034512
034514
034516
034520

122122
00101
005300
001374
005712

034522

001412

45%:

104455
000016
020215
015124
000422

034540
034542
034544
034546

46%:

104455
000017
020235
015124
000415

034550
034556
034562
034564
034570
034570
034574
034576
034602
034602

042777
005737
001002
000137

000213
002570

005737

002520

034602

004737

001002
000137

034246

145456

50%:

51%:

52%:

012562

ENDTST
104401

;1S THE DATA THE SAME ?
;IF NOT, BRANCH TO DATA ERROR MESSAGE

aR2

:THIS SHOULD BE 0 - REMEMBER WE CLEARED

BEQ
ERRDF

50%
14 ,EMG14,ERRG2

;IF OK = PROCEED
;RECEIVED EXTRA DATA

2(5)5

52%

ERRDF

15,EMG15,ERRGZ

;CONTINUE CHECKING UNTIL DONE WITH BUFFER.

;2 EXTRA BYTES DURING BUFFER INIT.

TRAP

;DATA ERROR

52%

CSERDF

.WORD
.WORD
.WORD

14
EMG14
ERRGZ2

TRAP

CSERDF

.WORD
.WORD
.WORD

TRANSMIT OR RECEIVE

034606

034612
034612
034612

(R1)+,(R2)+
46%

BR
;

034550

CMPB
BNE
DEC
BNE
TST

15
EMG15
ERRGZ2

CHECK DONE

BIC
TST
BNE
JMP

H#RDO+RCV+CMD,@SEL2 ;CLEAR RDO, RCV & COMMMAND BITS (0,1)
RFLAG
;1S THE RECEIVE DONE ? (IF DONE, FLAG = -1)

51%
20%

JYES - SEE IF TRANSMIT DONE
;sNO - GO BACK AND DO IT.

TST
BNE
JMP

TFLAG

;1S THE

52%
20%

SHUTDN
JSR

PC,

$HALT

CALL

$ERROR

TRANSMIT DONE

JYES = BR TO SHUTDOWN
:NO - DO IT

;SHUTDOWN DMR
sxxxx MACRO EXPANSION %% «x
;DMR HALT RCUTINE.
:tttt

;CHECK BASE

L& 2 &4

TABLE AND REPORT ANY SOFT ERRORS

L10073:

TRAP

CSETST

p————

CZDMIDO DMR-11 FUNCTIONAL TESTS MA(CY11
CZDMID.P11
29-JuL-81 11:32

30A(1052)

29-JUL-81

12:42

D 13

PAGE 160

SEQ 0159

TEST 14 - EXTENDED ADDRESSING DATA TEST

;ggg

.SBTTL

7540

7561
7562

;
.*

7564
7545
7546
7547

;* US TO TRANSFER DATA USING THOSE EXTCNDED ADDRESSING BITS. AS IN
;% TEST 13 THE TEST IS NON-INTERRUPT AND INTERNAL (TTL) LOOPBACK IS
s+ USED.
*

7543

AR AR AR R AR

TEST
IN THIS TEST - SEE

7549
7550
7551
7552

034614
034614

7554
7555
7556
7557
7558
7559
7560
7561
7562
7563
7564
7565
7566
7567
7568
7569
7570
7571
7572
7573
7574
7575
7576
7577
7578
7579
7580
7581
7582
7583
7584
7585
7586
7587
7588

034614
034620
034624
034630
034634
034636
034642
034646
034652
034652
036656
034660

012746
012746
012746
012746
104437
062706
005037
005737

000340
023630
000004
000003

012700

000004

034664
034666
034672
034676

001404
005037
000137

034676
034704
034706
034712
036712
034712
034716

023727
002002
000137

002120

012700
104441

000340

034720
034724
034730
034730

012701
012700
012721

172300
000010

034734

005300

7553 034614

7589

R AR R

AR AR

R RN RN RN

AR AR AN N RN R AN RN AR

14 - DMR-11
If WE HAVE MEMORY_MANAGEMENT,

:* HAVE THE MEMORY TO CHECK BITS 16 & 17 IN SEL6.

7548

7590
7591
7592
7593

TEST 14 - EXTENDED ADDRESSING DATA TEST

034736
034740
034744
034746

RA AN AR AR R

AR RN R RN AR R A RN R

BGNTST
.ENABL

104436
005737

001374
012701
005011
012761

LSB

AN AR

AN TN RARARN

SO SEE

ANE AR AN R P AR NAANRCRRRARNAS

T14::
;ENABLE LOCAL BLOCK - NEEDED BECAUSE OF
USE
OF SYMBOLIC LABELS "RSEL4'' ETC.

SETVEC #4,ANOXMEM, #PRIO? ;SET UP TRAP VECTOR &

000010
002352

IF WE

THIS WILL ALLOW

MoV
MoV
MOV
MoV
TRAP
ADD

#PR107,~(SP)
#NOXMEM,
- (SP)
#4,-(SP)
#3,~(SP)
CSSVEC
#10,SP

CLR
TST
CLRVEC

NXMFLG
177572
#¢4

002352

TSi

NXMFLG

002352
036236

8EQ
CLR
JMP

108
NXMF LG
85%

;CLEAR FLAG - SET IF TRAP TO 4.
;ADDRESS MEMORY MANAGEMENT REGISTER.
JRESTORE TRAP VECTOR 4
Mov
#4 ,RO
TRAP
CSCVEC
;1S THE FLAG STILL CLEARED?
JNOTE: THE FLAG WILL BE SET BY TRAP &
;IF THERE IS NO MEMORY MANAGEMENT.
;1F FLAG IS CLEARED, PROCEED WITH TEST.
:RESTORE FLAG
SEXIT = CAN'T TEST WITHOUT MEM. MANAG.

cMP
BGE
JMP

LSHIMEM, #2200
158
85%

:NOTE: LSHIMIM IS SIZE OF TOTAL MEMORY IN
;PAGE ADDRESS REGISTER FORM - DETERMINED BY
;BY DIAGNOSTIC SUPERVISOR AT STARTUP.
;DO WE HAVE ENOUGH MEMORY TO ADDRESS BIT 16?
;IF YES = PROCEED WITH TEST
;IF NOT - EXIT

SETPRI

#PRIO07

;MAKE SURE WE ARE

MOv
MoV

#172300,R1
#8. RO

MOv

#77406, (R1)+

DEC

177572

108:

002200

036236

15%:

20%:

077406

172340
000200

000002

BNE
MoV
CLR
MOV

208
#172340,R1
(R1)
#200,2(R1)

IN KERNEL MODE.
MOV
#PR107,RO
TRAP
C$SPRI
;SETTING PRI SHOULD ALSO CLEAR BITS 14 &15
;IN PSW WHICH PLACES PROCESSOR IN KERNEL MODE.
:GET ADDRESS OF KERNEL PDR_
REG 0
:GOING TO WRITE PDR REG 0-7
;WRITE BITS FOR THE FOLLOWING PAGE DESCRIPTION
;READ/WRITE ACCESS, 128. BLOCK PAGE LENGTH.
;WRITE ALL PDRS
;GET ADDRESS OF KERNAL PAR 0
;PAR 0, ADDRS
0
17776
:PAR 1, ADDRS
20000
37776

C2DMIDO DMR=-11 FUNCTIONAL TESTS MACY11
CZDMID.PIN
29-JuL~-81 11:32
7594
7595
7596
7597
7598

034754
034762
034770
034776
035004

012761
012761
012761
012761
012761

000400
000600
001000
002000
004000

7601
7602
7603

035020
035024

012703
012704

7605

035030

;283

7604

;PAR
;PAR
;PAR
;PAR
;PAR

000100
120000

MOV
MoV

#64. ,R3
#120000,R4

;sCOUNTER FOR OUTER LOOP OF TEST PATTERN GEN.
;USE VIRTUAL ADDRESS TO MAP TO PAR 5
;GENERATE A TEST PATTERN [N THE 1ST 4K

005037

002352

CLR

NXMF LG

035034
035040
035044
035050
035054
035056

012746
012746
012746
012746
104437
062706

000340
023630
000004
000003

035070
035074
035100

012701
012702

000040
002420

035034

;2}2

8%2898

7615
7616
7617
7618

012761

012737

035100

01224

7621

035102
035106

7623
7624
7625
7626
7627
7628

035112
035114
035116
035120
035124
035124

005737
001014
005301
001372
005303
001364
012701

7619
7620

7622

7629
7630

035110

007600

000010

000001

004000

005024

002352

005037

177572

012700
104436
005737
001417

000004

7643
7644
7645

7647
7648
7649

035170
035172
035176

010446
012746
012746

035170

SETVEC

177572

218

22%:

002352

104455
000023
036240
000000

23%:

24%:

#7600,16(R1)

ADDRS 40000
ADDRS 60000
ADDRS 100000
ADDRS 200000
ADDRS 400000

;PAR 7, ADDRS 160000

57776
77776
- 117776
=~ 217776
- 417776

=~ 177776 (1/0 PAGE)

JBYTES OF PAR 5 (VIRTUAL ADDR 1200C0 - 127776)
; ENSURE FLAG IS CLEARED

#4,#NOXMEM,#PRI0O7 ;SET UP TRAP VECTOR 4 (WILL SET FLAG)

#PRI07,~(SP)
H#NOXMEM
- (SP)
#4 ,-(SP)
#3,-(SP)
C$SVEC
#10,5P

#1,a8177572

JENABLE MEMORY MANAGEMENT

MOV
MoV

#32.,R1
#$CCITT ,R2

;COUNTER FOR INNER LUOP OF TEST PATTERN GEN.
;ADDRESS FOR 32. WORD TEST PATTERN

MOV

(R2)+,(R4)+

JWRITE

TST
BNE
BNE
DEC
BNE
MOV

NXMFLG
248
R1
22%
R3
21%
#4000,R1

CLR

(R4)+

iST
BNE
DEC
BNE

NXMFLG
24%
R1
23%

CLR
CLRVEC

177572
#4

;TURN OFF MEMORY MANAGEMENT
JRESTORE TRAP &4 TO SUPERVISOR

TST
BEQ
ERRDF

NXMF LG
25%
19,EMTZ2?

;WAS THIS AN ERROR EXIT
;IF NOT, PROCEED.

TEST PATTERN INTO 4K BYTES

; (PHYSICAL ADDRESS 200000 - 207776)
JNXM TRAP 4?
;IF

YES = EXIT

;DO THE INNER LOOP 32.

TIMES

;DO THE OUTER LOOP 128.

PRINTB

#FMT25,R4

TIMES

;COUNTER TO CLEAR THE NEXT 4K BYTES.
;CLEAR OQUT

THE ENTIRE PAR

; (PHYSICAL ADDRESS 210000 - 217776)
JNXM TRAP 4?
JIF

YES = EXIT

036276
000002

MoV
MoV
MoV
MOV
TRAP
ADD

MOV

DEC

005737
001002
005301
001372

7646

mMov

002352

035126
035132
035134
035136
035140
035140
035144
035144
035150
035152
035156
035160
035160
035162
035164
035166

7631
7632
7633
7634
7635
7636
7637
7638
7639
7640
7641
7642

000016

2,
3,
4,
5,
6,

SEQ 0160

#400,4 (R1)
#600,6(R1)
#1000,10(R1)
#2000,12(R1)
#4000, 14 (R1)

035012

000004
0C0006
000010
000012
000014

E 13
29-JuL-81
12:42 PAGE 161
TEST 14 - EXTENDED ADDRESSING DATA TEST
MOV
MOV
MoV
MOV
MOV

7606

7607
7608
7609
7610
7611
7612

30A(1052)

MoV
TRAP

#4 ,RO
C$CVEC

TRAP
.WORD
.WORD
.WORD

CSERDF
19
EMT22
O

MOV
MOV
MOV

R4, -(SP)
NEMT2S5 ,~(SP)
#2,-(SP)

F13

SEQ 0161

12:42
PAGE 162
29-JuL-~81
(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
TEST 14 - EXTENDED ADDRESSING DATA TEST
CZDMID.P11
29-JuL~81 11:32

7656

7657
7658
7659
7660
7661
7662

035202

035216
035216

01060C
104414
062706
000137

035216

004737

035222
035222
035224

104410

035226
035232
035234
035242
035244
035244
035252
035252
035256
035260
035262
035264
035264
035266
035270
035274
035274
035276

000006
036236

25%:

011070

85%

CLEAR
JSR

PC,

SMSCLR

ESCAPE

;sISSUE A DMR MASTER CLEAR

ARAN

:1F ERROR, BR TO TEST END.

TST

TRAP

.WORD

001012

005737
001004
052737
000403

002254
004000

035256

042737

004000

035256

000000
002640
000522

#LPLU,100%

2 1S INTERNAL LOOPBACK DESIRED?
;1F NOT, CLEAR INTERNAL LOOPBA(K.
;JSET LINE UNIT LOOPBACK.

BIC

#LPLU,100%

;CLEAR LINE UNIT LOOPBACK.

CALL

$BASE|

;BASE

ESCAPE

.WORD
TST

TST
BNE
BIS
BR

100%:

104410

DMTURN

30%
32%

.WORD
.WORD

O
BASE
DMR

TRAP

.WORD

104410

$LOOP
TST

;DMR COMMAND

TO SET MAINT.

;1F ERROR, BR TO TEST END.

TRAP

035206
035306
035310

104410

000726

035312
035316
035322

005037
005037
005037

002520
002570
002346

035326
035334

012737
012737

010000
050000

035342
035346

005037
012737

035400
050000

011522

JSR

ESCAPE

PC,

SCNTIN

.WORD

sxxxx MACRO EXPANSION #xwx

;CALL CONTRGL IN ROUTINE WITH DEFAULT
;SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START.
:.ti'

;IF

TST

LA AR

ERROR, BR TO TEST END.

TRAP

.WORD

CLR
CLR
CLR

TFLAG
RFLAG

035364

MOV
MOV

#10000,RSEL4

035402

(LR
Mov

€35362

35%:

CALL

CSESCAPE

L10074-.

JMACRO FOR CONTROL IN (FULL DUPLEX)

(NTRIN

004737
000000

CSESCAPE

L10074-.

BITS

WORD

000740

035300
035304

CSESCAPE

L10074-.

IN COMMAND.

JMAINTENANCE BITS (LINE UNIT LOOr)
;BASE TABLE ADDRESS
:DMR MODE
;1F ERROR, BR TO TEST END.

000750
CALL
ESCAPE

SP,RO
(SPNTB
#6,SP

;MACRO FOR MASTER CLEAR
senee [TACRO EXPANSION saw«
;*ttt

€35300

035354
035354

JMP

MOV
TRAF
ADD

SFLAG

7650
7651
7652
7653
7654
7655

CS$ESCAPE

L10074-.

;CLEAR TRANSMIT FLAG
;CLEAR RECEIVE FLAG
;CLEAR SECOND LOOP FLAG
;IF SFLAG = 0, THEN THIS IS A TEST OF BIT 16
;1F SFLAG = -1, THEN THIS IS A TEST OfF BIT 17

JRECEIVE BUFFER ADDRESS (BITS 0-15)

#31T14!10000,RSEL6 ;REC BUFFER ADDR BIT 16 SET AND 4K
;BYTE RECEIVE CHARACTER COUNT
;TRANSMIT BUFFER ADDRESS (BITS 0-15)
TSEL4
#B1T14110000,TSEL6 ;XMIT BUFFER ADDR BIT 16 SET AND 4K
;BYTE XMIT CHARACTER COUNT
$BAC(C

;ISSUE THE BUFFER ADDR/ CHAR COUNT COMMAND

(ZDOMIDO DMR-11 FUNCTIONAL TESTS MACY11
C(ZDMID.P11
29-JuUL-81 11:32
7706
7707
7708
7709
7710
7711
7712
7713
7714
7715
7716
7717
7718
7719
7720
7721
7722
7723
77264
7725
7726
7727
7728
7729
7730

7731
7732

7733
7734
7735

7736

7737
7738
7739
7740
7741
7742
7743
7744
7745
7746

7747
7748
7749
7750
7751
7752
7753
7754

7755
7756
7757

7758
7759
7760

7761

035360

035366
035370
035372
035376
035400
035402
035404
035404
035406
035410
035410
035410
035414

035416
035416
035420
035422
035430
035432
035432
035434
035436
035440
035442
035446
035446
035454
035456
035462
035464
035464
035466
035470
035472
035474
035500
035500
035506
035514
035516
035516
035520
035522
035524
035526
035532
035532
035540

000044
000000
000000

30A(1052)

RSELS:
RSEL6:

104410
000646

TSEL4:
TSELG:

104410

000630

000001

TEST

G 13

PAGE 163

5EQ 0162

14 ~ EXTENDED ADDRESSING DATA TEST

.WORD
ESCAPE

WORD
.WORD

TST

RQI'BACCR

O
0

;COMMAND FOR BA/CC

;BJUFFER ADDRESS BITS 0-15
JBUFFER ADDR BIT 16 + (HAR.
;IF

ERROR,

END

IN RECEIVE

TEST

COUNT
TRAP

.WORD

000040
000000
000000

004737

12:42

29-JuL-81

40%:

010276

CALL

$BA(C

ESCAPE

TST

.WORD
.WORD
.WORD

;ISSUE

THE BUFFER ADDR/ CHAR COUNT COMMAND

RQI.BAC(CT
;COMMAND FOR BA/CC IN TRANSMIT
0
;BUFFER ADDRESS BITS 0-~15
:BUFFER ADDR BIT 16 + (CHAR. COUNT
;IF

ERROR,

END

TEST

TRAP

.WORD

WAIT

RDO

JSR

PC,

SWAIT

.WORD

(SESCAPE

L10074~,

CSESCAPE

L10074-.

JWAIT FOR RDO TO BE SET
;exrx MACRO EXPANSION txxw
;CALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDO
a3 821

ESCAPE

104410

TST

;IF

RDO NOT

SET BEFORE

TIMEOUT,

.WORD

000616

032777
001406

000001

144604

BIT

8EQ
ERRDF

104455
000011
020040

015124
000137
032777
001040
005737
001406

036226

000004

144560

50%:

002520

012737
023777
001406

036226

177777
035400

002520

55%:

144522

023777
001502

036226
035402

144500

569%:

50%
9,EMGY,ERRGZ

;IS

THIS A CONTROL

OUT

TRAP

B8IT

#RCV,QSEL2
60$
TFLAG
55%
10,EMG10,ERRGZ2

;1S THIS A TRANSMIT OR RECEIVE?
:BR FOR RECEIVE
;IS THIS THE 1ST TRANSMIT DONE
;IF YES, PRGCEED
;MULTIPLE TRANSMITS

JMP

80%

JEXIT

MOV
cMp

#=-1,TFLAG

;FLAG THAT THE

56%
11,EMG11,ERRG2

;IF OK, PROCEED WITH CHECK.
;BUFFER ADDRESS ERROR

TRANSMIT

CSERDF

.WORD
.WORD

9
EMGY

TRAP

CSERDF

.WORD

JEXIT

TSELG,QSELS

L10074-.

COMMAND?

:NO - PROCEED
JUNEXPECTED CONTROL OuUT.

80%

BEQ
ERRDF

104455

000013
020116
015124
000137

#CNTRL ,@SELZ

JMP

TST
BEQ
ERRDF

104455

000012
020067
015124
000137

END TEST
TRAP
CSESCAPE

ERRG?

.WORD
.WORD
.WORD

10
EMG10
ERRG?

TRAP

CSERDF

IS DONE.

;]S THE BUFFER ADDRESS CORRECT?

JMP

80%

JEXIT

CMP
8tQ

TSEL6,aSELE
70%

;1S THE
JIF OK,

.WORD
.WORD
. WORD

CHAR. COUNT
PROCEED

(CORRECT?

M
EMG11
ERRG?

—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.PYT
29-JuL-81 11:32

7762
7763
7764
7765
7766
7767
7768
7769
7770
77N
7772
7773
7774
7775
7776
7777
7778
7779
7780
7781
7782
7783
7784
7785
7786
7787
7788
7789
7790
7791
7792
7793
7794
7795
7796
7797
7798
7799
7800
7801
7802
7803
7804
7805
7806
7807
7808
7809
7810

7811
7812
7813

7814
7815
7816
7817

035542
035542
035544
035546
035550
035552
035556
035556
035562
035564
035564

035566
035570
035572
035574
035600
035600
035606
035614
035616
035616
035620
035622
035624
035626
035630
035630
035636
035640

035640
035642

035644
035646
035650
035650
035654
035656
035662

035666
035672
035674
035¢74
035700
035704
035710
035710
035716
035716
035720
035722
035724
035726
035730
035730
035734

30A(1052)

005737
001406

036226

60%:

002570

012737
023777
001405

036226
177777
035362

002570

61%:

144422

000013
020116
015124
0u0s577
035364

1644402

104455
000014
020141
015124

005737
001007

TST

62%:

63%:

002346

H 13

SEQ 0163

12:42
PAGE 164
14 - EXTENDED ADDRESSING DATA TEST
12,.EMG12,ERRG2

;CHARACTER COUNT ERROR - OR EXT MEM PROBLEM
TRAP

.WORD
.WORD
- WCRD

80%

JEXIT

RFLAG

;1S THIS THE 1ST RECEIVE DONE

61%
13,EMG13,ERRG?

;1F

sMULTIPLE RECEIVES

80%

JEXIT

MOV

#-1,RFLAG
RSEL4 ,@SELS

;FLAG

62%

11,EMG11,ERRGZ

THAT

THE

RECEIVE

TRAP

80%

SEXIT

CMP
BEQ
ERRDF

RSEL6,RSEL6

;1S THE CHAR. COUNT CORRECT?
;1F OK, PROCEED
;CHARA(CTER COUNT ERROR

12,EMG12,ERRG2

SFLAG

65%

TRAP

(SERDF

sWHICH EXTENDED ADDRESS ARE WE

EMG11
ERRGZ2

TRAP

CSERDF

#4000,R0

012702
000406

130000

MoV

#130000,R2
66%

JWHICH WILL MAP TO 200000
;THE REC BUF. MAPS TO 210000
;GO COMPARE THE XMIT AND REC BUFFERS

012700
012701
012702

010000

MOV
MOV
MOV

#10000,R0

JIN THE TEST OF BIT 17 WE SENT 8K BYTES

#140000,R2

;THE XMIT BUFFER MAPS TO 200000
;THE REC BUF. MAPS TO 400000

012737

000001

MOv

M ,an177572

s TURN MEMORY MANAGEMENT BACK ON.

CMP

(R1)+,(R2)+
68%
RO
679
70$

;1S THE DATA THE SAME?
;IF NOT THERE IS A DATA ERROR.
;CHECK ENTIRE BUFFER

177572

: TURN MEMORY MANAGEMENT

120000
140000

022122
001003
005300
001374
000407

005037

177572

66%:

67%:

68%:

DEC
BNE
BR

CLR
ERRDF

#120000,R1

15,EMG15,ERRGZ

EMG12
ERRGZ

CHECKING?

:BR FOR BIT 17 (HECK
sIN THE TEST OF BIT 16 WE SENT 4K BYTES

MoV
MOV

-WORD
.WORD
. YORD

004000
120000

65%:

CSERDF
13

EMG13
E-RG2

012700
012701

#120000,R1

ERRGZ

-WORD
.WORD
.WORD

.WORD
.WORD
-WORD

TST

EMG1¢

IS DONE.

21S THE BUFFER ADDRESS (ORREC(CT?
¢1F OK, PROCEED WITH CHECK.
;BUFFER ADDRESS ERROR

63%

CSERDF

YES, PROCEED

JMP

CMP
BEQ
ERRDF

104455

023777
001404

JMP
BEQ
ERRDF

104455

000015
020167
015124
000137

TEST

ERRDF

104455
000014
020141

015124
000137

29-JuL-81

JTHE XMIT BUFFER BEGAN AT THIS VIRTUAL ADDR

;IF DATA OK, PROCEED WITH TEST.
;DATA ERROR

OFF
.

—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZomID.PN
29-JuL-81 11:32
7818

7819
7820
7821

7822
7823
7824
7825
7826
7827
7828
7829
7830
7831
7832
7833
7834
7835
7836
7837
7838
7839
7840
7841

035734
035736
035740
035742
035744
035746
035746
035752
035760
035764
035766
035772
035772
035776
036000
036004
036004
036010

036012
036020
036026
036030
036034

30A(1052)

113

12:42
PAGE 165
29-JuL~81
EST 14 -~ EXTENDED ADDRESSING DATA TEST

SEQ 0164
TRAP

10445%
000017

.WORD
.WORD

020235

015124

208

000530
005037
042777
005737
001002
000137

177572

000213
002570

166254

005737
001002
000137

002520

005737
001106

002346

012737
023727
002477
005037
005037

177777
002120

80%

CLR
BIC

M177572
;TURN NMEMORY MANAGEMENT OFF.
#RDO+RCV+CMD,aSEL2 ;CLEAR RDO, RCV & COMMMAND BITS

TST

035410

BNE

JMP
157

22%

035410

002346
004200

JEXIT

RFLAG

;IS THE RECEIVE DONE

4«03

sNO - GO BACK AND DO IT.

71%

JYES - SEE

(IF

TRANSMIT DONE

;1S

JMP

40%

:NO - DO IT

TST
BNE

SFLAG
80%

JHAVE WE ALREADY TESTED BIT
;IF SC - END OF TEST

MOV

#-1,SFLAG

JFLAG SO WE DON'T COME

BLT
CLR

80%
TFLAG

;IF NOT - END OF TEST.
;CLEAR FLAGS FOR NEXT TEST

CLR

72%

TRANSMIT DONE

;JYES - SEE IF

LSHIMEM #4200
RFLAG

THE

TFLAG

BNE

002520
002570

.WORD

THERE

DONE,

( SERDF

15
EMG15
ERRG/¢

(0,1)

FLAG = =1)

IS MORE
17

THIS WAY AGAIN.

;IS THERE ENOUGH MEMORY TO TEST BIT 17?

JSET UP TO TEST BIT 17, IF THERE IS ENOUGH MEMORY.

sJTHIS TEST WILL TRANSMIT 8K BYTES STARTING AT PHYSICAL ADDRESS 200000
;7O PHYSICAL ADDRESS 400000.
THE TRANSMITTED BUFFER STILL CONTAINS
;THE

036142
036144
036146
036150
036150

’

TEST PATTERN GENERATED

RSEL4

CLR
MOV

TSELS
;TRANSMIT BUFFER ADDRESS (BITS 0-15)
#BIT14'20000,TSELG6 ;XMIT BUFFER ADDR BIT 16 SET AND 8K
;BYTE XMIT CHARACTER COUNT
#10000 ,R1
:COUNTER TO CLEAR 8K BYTES

035362
12000C

035364

005037
012737

035420
060070

035402

012701
012704

010000
140000

[ [01Y)
MOV

005037

002352

CLR

012746
012746
012746
012746
104437
062706
012737

000340
023630
000004
000003

005024
005737
001002
005300
001372

005037

24$

MOV

(LR

002352

177572

MoV

SETVEC

177572

75%:

16 TEST.

CLR

005037
012737

000010
000001

IN THE BIT

#140000,R4

NXMFLG

:VIRTUAL ADDRESS THAT WILL MAP INTO PAR 6
:WITH THE PHYSICAL ADDRESS 400000
;ENSURE FLAG IS CLEAR

#4 ,ANOXMEM, #PRIO? ;SET UP TRAP TO VECTOR &4 (WILL SET FLAG)
MOV
MOV
MOV
MOV

#1, 4177572

;TURN ON MEMORY MANAGEMENT

(R4) +

;CLEAR 400000 =~ 417776

75%
RO
74%

JIF

TST

NXMF LG

CLR

177572

BNE
DEC
BNE

JRECEIVE BUFFER ADDRESS (BITS 0-15)

#BIT15120000,RSEL6 ;REC BUFFER ADDR BIT 17 SET AND 8K
;BYTE RECEIVE CHARACTER COUNT

;DOES A NXM TRAP 4 OCCUR?

YES, EXIT

TURN OFF MEMORY MANAGEMENT

TRAP
ADD

#PR107 ,-(SP)
#NOXMEM
, - (SP)
#4 ,-(SP)
#3,-(SP)
CSSVEC
#10,SP

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID P11
29-JuL-81 11:32
7874
7875
7876
7877
7878

036154
036154
036160

012700
104436
005737
001002
000137

30A(1052)

000004

002352
035354

76%:

104455
000023
036240
000000

010446
012746
012746
010600
104414
062706

004737

12:42

13
PAGE 166

CLRVEC

JRESTORE

TST
BNE
JMP

NXMFLG
76%

ERRDF

19,EMT22

TRAP 4

;WAS THIS AN ERROR EXIT?
;IF YES = REPORT ERROR

000006

80%:

HFMT25
R4

012562

SHUTDN
JSR

PC,

SHALT

85%:

036236

ENDTST

036240
036246
036254
036262
036270
036276

036304
036312

036356

023516
051104
054105
042105
051117
042515
040440
051523
020045
047040
051505
026440
020120

020124
051505

042524
046440
000131
047515
042104
022440
047504
052117
047520
052040
022464

$ERROR

;CHECK BASE

.DSABL

LSB

;DISABLF LOCAL SYMBOL BLOCK

CS$ERDF

.WORD
.WORD
.WORD

19
EMTZ2?2

MOV
MOV
MoV
MOV
TRAP
ADD

R4 ,~(SP)
HFMT25,-(SP)

#2,~(SP)
SP,RO
CSPNTB
#6,SP

TABLE AND REPORT ANY SOFT ERRORS

L10074:

EMT22:

.ASCIZ

/CAN'T ADDRESS EXTENDED MEMORY/

FMT25:

.ASCIZ

/%XAMEMORY ADDRESS %06% DOES NOT RESPOND -

.EVEN

TRAP

CALL

104401

040503
04210
020123
042116
046505
0460445
054522
042522
033117
051505
051040
04217
040522
000116

#4,R0
CSCVEC

;SHUTDOWN DMR
sxxxx MACRO EXPANSION xwxxx
;DMR HALT ROUTINE.
:tttt

036236

MoV
TRAP

sSTART THE SECOND TEST

036276
000002

036232

036236
036236

SEQ 0165

TEST 14 - EXTENDED ADDRESSING DATA TEST

PRINTE

036226

29-JuL-81

TRAP

TRAP 42N/

CSETST

K13
CZOMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuUL-81
12:42 PAGE 167
TEST 15 - DMC MODE TEST
CZDMID.P11
29-JUL-81 11:32
.SBTTL

SEQ 0166

TEST 15 - DMC MODE TEST

:t*ttttttt*‘t't'*i."fi'."'tttt't'.**ifitt*fitfi'tttittttt'ttittttittttt'

TEST 15 - DMR-11

ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE
THE RECEIVE/TRANSMIT TABLE.

CHECKED AGAINST

A}EEQEZ
H

TO USE AS LARGE BUFFERS AS POSSIBLE

HY:

A.
B.

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE $BUFFS.
THIS
SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF
SEVEN RECEIVE AND SEVEN TRANSMIT BUFFERS.
THE ROUTINE WILL

% DMC MODE
* IN THIS TEST THE DMR WILL TRANSMIT AND RECEIVE 7 BUFFERS.

IN THE

FOLLOWING

°*

ESES RS2SR0

BGNTST

036360
036360
036360

005737

002306

036364
036366
036374
036400
036406

001035
012737
005037
012737
005037

000007
002274
000001
002300

002324

002276

2R RtRdR302222000

20020222 RR2C08dR28RR8RRd0R02RddRR

WMAINT

;DO WE NEED TO WRITE MODEM

BNE
MOV
CLR

408
#7 . BUFNUM
RE SUME

“IF YES, WE CAN'T RUN THIS TEST.
‘# OF RCV & XMIT BUFFERS.
“FLAG NOT TO USE RESUME.

*MAINTENANCE 1 OR 2 ?

MOV
CLR

#1.DMCMDE
MNTMDE

036412

CALL

S$BUFFS

;DETERMINE 7 RCV &

036416

CLEAR
JSR

PC,

:MASTER CLEAR
txwxx MACRO EXPANSION saww
“ISSUE A DMR MASTER CLEAR

ESCAPE

TST

036416

004737

036422
036422
036424

104410

011070

036440
036440

:ttt*

;IF

ERROR,

7 XMIT PUFFERS

12 8

8 4

EXIT TEST

TRAP

000034

.WORD

036426
036426
036432
036434
036436

SMSCLR

*FLAG SET TO REQUEST DMC MODE.
*FLAG NOT TO REQUEST MAINTENANCE MODE.

;ISSUE A DMR MODE BASEIN
;IN DMR MODE, IF A INTERFACE IS REQUIRED

BASEIN

004737
004000
002640
000522

104410

011266

JSR

PC, $BASEI
.WORD
LPLU
.WORD
BASE

.WORD

ESCAPE

CSESCAPE

L10075-.

TST

DMR

;TO BE WRITTEN - IT WILL BE DONE.
sxxxx MACRO EXPANSION xxx«
;CALL BASE IN ROUTINE WITH DEFAULTS
sSET LINE UNIT LOOP
;BASE TABLE ADDRESS

:DMR-11 MODE
:Rttt

;IF ERROR, EXIT TEST

ARRK

TRAP

C$ESCAPE

L 13
CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuUL-81
12:42 PAGE 168
CZDMID.P1M
29-JuL-81 11:32
TEST 15 - DMC MODE TEST
7978
7979
7980
7981

036442
036444

00001¢

036444

004737

7983
7984
7985
7986
7987
7988

036450
036450
036452

104410
000006

7991
7992
7993
7994
7995
7996
;ggg

036454

7999

036460

7982

7989
7990

8000
8001
8002
8003
8004

SHUTDN
012562

JSR

PC, SHALT

JHALT
sarxx MACRO EXPANSION weex
;DMR HALT ROUTINE.

ESCAPE

TST

;IF ERROR, EXIT TEST.

INRRN

CALL

$INOUT

LWORD

L10075-.

KRN

TRAP
CSESCAPE
.WORD
L10075-.
JAFTER SETTING INTERFACF OR LOOPBACK MAINT.
;(CAN'T BE DONE
.DMC MODE.

036460
036460
036460

SEQ 0167

IN DMC MODE),

START

;THIS ROUTINE WILL MANAGE ALL THE DMR
;COMMANDS ISSUED IN THE INTERRUPT ROUTINES
;(FROM BASE IN UNTIL SHUT DOWN).
BESJNES
;CONTROLLING THE SOFTWARE TIMEOUT, THIS
;ROUTINE WILL ALSO CHECK THAT BUFFER
; CHARACTER COUNTS AND ADDRESSES ARE CORRECT
JAND THAT THE DATA IS CORRECT IN THOSE BUFFERS

40%:

ENDTST
104401

L10075:

TRAP

CSETST

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.PI
29-JuL-81 11:32

m13
30A(1052)
29-JUL-81
12:42 PAGE 169
TEST 16 - DMR MODE (RESUME) INTERRUPT TEST

2889

.SBTTL

8008

;32 2323322232322 2342332332402332224223242242223202322322323282222023022280282322282432¢232 |

8009

TEST 16 - DMR MODE

(RESUME)

SEQ 0168

INTERRUPT TEST

TEST 16 - DMR-11

8010

;* RESUME BASE

8012
8013

;% TEST THE DMR W]LL BE HALTED AND RESTARTED BY A BASE-IN RESUME IN THE
;v FOLLOWING MANNER:

8011

IN - DMR MODE

;* IN THIS TEST THE DMR WILL TRANSMIT AND RECEIVE 7 BUFFERS. DURING THE

8014

8015
8016
8017
8018
8019
8020
8021

i
;v
x
o *
. *
;*
ox

8022

8023
8024
8025
8026
8027
8028
8029

o*
I*
M
i
i*
I
M

8030
8031

i
o*

gg%%

BASE IN
CONTROL
HALT
2 BA/CC
HALT
2 BA/CC
HALT
2 BA/CC

IN
MASTER CLEAR
IN RECEIVE
MASTER CLEAR
IN RECEIVE
MASTER CLEAR
IN RECEIVE

1 BA/CC
HALT
2 BA/CC
HALT
2 BA/CC
HALT
2 BA/CC

IN RECEJIVE
MASTER CLEAR
IN TRANSMIT
MASTER CLEAR
iN TRANSMIT
MASTER (LEAR
IN TRANSMIT

HALT

MASTER CLEAR

HALT
MASTER CLEAR
1 BA/CC IN TRANSMIT

HALT

MASTER CLEAR

BASE IN RESUME
BASE IN RESUME
BASE

IN RESUME

BASE

IN RESUME

BASE

IN RESUME

BASE IN RESUME
BASE

IN RESUME

BASE

IN RESUME

BASE IN RESUME

8034
8035

o *
I

ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST

8038
8039
8040

;%
M
M

8043

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE $BUFFS.
THIS
SUBROUTINE WILL DETERMINE THE ADDRESS AND (CHARACTER COUNT Of
SEVEN RECEIVE AND SEVEN TRANSMIT BUFFERS.
THE ROUTINE WILL
ATTEMPT TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING
HIERARCHY:
A. IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32K.
B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER
THAN 2K BYTES, USE THAT MEMORY
C. IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE

gg%g

8041
8042

o
i*

8044
8045
8046

o*
o
X

ggzg

THE RECEIVE/TRANSMIT TABLE.

THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

. %

8049

8050

"*fil’fi't**tfit***t*tt*ttfi""*"*"‘t*i"fi**"t*fi*'*'**fifi*‘t*'.'tttfit“tt"itt'

8051
8052
8053
8054
8055
8056
8057
gggg

036462
036462
036462
036470
036474
036502
036510
036514

8060

036520

BGNTST

013737
005037
012737
012737
005037
005037

002254
002254
000007
000001
002276
002300

002336
002324
002274

MOV
CLR
MOV
MOV
CLR
CLR

DMTURN, TEMP1
DMTURN
#7 ,BUFNUM
#1,RESUME
DMCMDE
MNTMDE

T16::
;SAVE OFF LOOP TYPE
JFORCE INTERNAL LOOP
s OF RCV & XMIT BUFFERS.
;JFLAG SET TO REQUEST USE OF RESUME.
JFLAG CLEARED - DMR MODE.
JFLAG NOT TO REQUEST MAINTENANCE MODE.

CALL

$BUFF S

;DETERMINE 7 RCV &

7 XMIT BUF*E
<5

CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)

CZDMID.P11
8062
8063
8064
8065

8066
8067

8068
2898

8071
8072

29-JuUL=-81

11:32

036524

036524
036530

036530
036532

§9-JUL-81

12:42

TEST 16 - DMR MODE

N 13

CLEAR

004737

011070

104410
000014

036534

JSR

PC, $MSCLR

ESCAPE

TST

;IF ERROR, EXIT TEST

CALL

$INOUT

;THIS ROUTINE WILL MANAGE ALL THE DMR
;COMMANDS ISSUED IN THE INTERRUPT ROUTINES

JRNAR

TRAP
.WORD

CS$ESCAPE
L10076~-.

;(FROM BASE IN UNTIL SHUT DOWN).
BESIDES
;CONTROLLING THE SOFTWARE TIMEOQUT, THIS
JROUTINE WILL ALSO CHECK THAT BUFFER
;s CHARACTER COUNTS AND ADDRESSES ARE CORRECT
;AND THAT THE DATA IS CORRECT IN THOSE BUFFERS

8080

036540

013737

8082
8083

036546
036546

104401

8081

SEQ 0169

INTERRUPT TEST

;MASTER CLEAR
Jarnn MACRO EXPANSION wern
;ISSUE A DMR MASTER CLEAR

8073
8074
8075
8076
8077

8075

PAGE 170

(RESUME)

036546

002336

002254

ENDTST

MOV

TEMP1 ,DMTURN

JRESTORE LOOP TYPE
L10076:

TRAP

CSETST

CZOMIDO DMR=11 FUNCTIONAL TESTS MACY11 30,
CZDMID.PY
29-JuL~-81 11:32
8085

1052)

B 14

29-JuUL=-81
12-.2 PAGE 171
TEST 17 = DMR I )E INTERRUPT EXERCISE

SEQ 0170

LSBTTL

TEST 17 - DMR MODE INTERRUPTM EXERCISE

TEST 17 - DMR-11

ggg?

.2 3222323222223 23222222233X22223223232222222222222232222220232R2R2R2R2aRadla]

8089

8092

:' ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND

gggg

8088

ggg?

INTERRUPT DRIVEN EXERCISE

.- IN THIS TEST 64 BUFFERS WILL BE TRANSMITTED AND RECEIVED

8093

:+ THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST
THE RECEIVE/TRANSMIT TABLE.

(.1

8096

8098

8097

8099
8100

iw
i

8101

8102

8104
2182

B
I

8103

8.
C.

IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32K.
IF

THERE

IS FREE MEMORY ABOVE THE SUPERVISOR GREATER

THAN 2K BYTES, USE THAT MEMORY

IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE
THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

:'tttttttttt*tttttttttttttttttttttt'tfittttktttttttttttttttttttttfit'tttt
036550

BGNTST

036550
03655C

012737

000100

8112
8113
g}}g

036556
036562
036566

005037
005037
005037

002274
002276
002300

g};g
8118
8119

MoV

#64 . ,BUFNUM

T17::
:# OF RCV & XMIT BUFFERS.

CLR
CLR
CLR

RE SUME
DMCMDE
MNTMDE

:FLAG CLEARED IN ORDER NOT TO USE RESUME.
:FLAG CLEARED TO A_LOW DMR MODE.
FLAG NOT TO REQUEST MAINTENANCE MODE.

036572

CALL

$RUFFS

:DETERMINE 64 RCV &

036576

CLEAR

8120

036576

004737

8122
8123
8124
g}sg

036602
036602
036604

104410
000012

8127
8128
8129
8130
8131
8132

036606

g}gg

036612

8137
8138

036616

8140

036616

002324

011070

64 XMIT BUFFERS

:MASTER CLEAR
xxax MACRO EXPANSION »xws

JSR

PC, $MSCLR

ESCAPE

TST

:1F ERROR, EXIT TEST

CALL

$INOUT

:THIS ROUTINE WILL MANAGE ALL THE DMR
:COMMANDS ISSUED IN THE INTERRUPT ROUTINES
; (FROM BASE IN UNTIL SHUT DOWN).
BESIDES
:CONTROLLING THE SOF TWARE TIMEOUT, TKIS
;ROUTINE WILL ALSO CHECK THAT BUFFER
;CHARACTER COUNTS AND ADDRESSES ARE CORRECT

g}gz

8139

IN THE FOLLOWING

8109
g}}?

8121

THE ROUTINE WILL

ATTEMPT TO USE AS LARGE BUFFERS AS POSSIBLE
HiERARCHY:

THIS

THE ADDRESS AND CHARACTER COUNT OF

64 RECEIVE AND 64 TRANSMIT BUFFERS.

i x

8107
8108

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE $BUFFS.

SUBROUTINE WILL DETERMINE

:ISSUE A DMR MASTER CLEAR
IXRRR

TRAP
.WORD

CSESCAPE
L10077-.

;AND THAT THE DATA IS CORRECT IN THOSE BUFFERS

(036616

CALL
ENDTST
104401

$ERROR

:CHECK BASE TABLE FOR SOFT ERRORS

L10077:

TRAP

CSETST

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P11
8141

¢9-JuL-81

11:32

29-JuUL~81

12:42

C 14

PAGE 172

TEST 17 - DMR MODE INTERRUPT EXERCISE

SEQ 0171

D 14

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
12:42 PAGE 173
CZDMID.PIN
29-JUL-81 11:32
TEST 18 - DMR MODE LARGE MESSAGE
814§

SEQ 0172

.SBTTL

TEST 18 - DMR MODE LARGE MESSAGE

TEST

g}z‘

:t*ttttttttttttttttt*ttttttt*ttttittttttttt"fitt't'ttfi'tttt'ttttfi'tn"

8146

;% LARGE MESSAGE

8145

18 - DMR-11

g}zg

;% IN THIS MODE TRANSMIT AND RECEIVE 1 LARGE BUFFER

8149
8150

;% THE BA,CC OUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND
;+ THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST

.+ %

g}g%

i« THE RECEIVE/TRANSMIT TABLE.
.

8153

g}g%

8154
8155
8156
8157
8158
8159
8160
8161

8164

X
o
L
P
x
o
x
P

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE $BUFFS.

THIS

SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF
ONE RECEIVE AND ONE TRANSMIT BUFFER.
THE ROUTINE WILL
ATTEMPT TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING
HIERARCHY:
A. IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32K.
B. IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER
THAN 2K BYTES, USE THAT MEMORY
C. IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE

THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

E*'tt*t*ttttttt**ttt\t**tt**ttttt*ttttttttttttiit*tttttttttttttttttfi't

8165
g;gg

036620
036620

BGNTST

g}gg

036620

012737

000001

8170
8171
g};;

036626
036632
036636

005037
005037
005037

002274
002276
002300

g};g

MOV

#1,BUFNUM

;# OF RCV & XMIT BUFFERS.

CLR
CLR
CLR

RE SUME
DMCMDE
M. TINE

;FLAG CLEARED IN ORDER NOT TO USE RESUME.
SFLAG CLEARED TO ALLOW DMR MODE.
SFLAG NOT TO REQUEST MAINTENANCE MODE.

036642

CALL

$BUFFS

;DETERMINE 1

8176
8177
8178
8179
8180
8181
8182
g}gz

036646

CLEAR

8185
8186
8187
8188
8189
8190

036656

8193
8194
8195
8196
8197

036662

036646

004737

036652
036652
035654

106410
000012

011070

002324

T18::

SMSCLR

RCV &

XMIT BUFFER

:MASTER CLEAR
‘axxx MACRO EXPANSION *#xx
SISSUE A DMR MASTER CLEAR
IRARR
TR XK

JSR

PC,

ESCAPE

TST

;IF

CALL

$ INOUT

;THIS ROUTINE WILL MANAGE ALL THE DMR
"COMMANDS ISSUED IN THE INTERRUPT ROUTINES
S (FROM BASE IN UNTIL SHUT DOWN).
BESIDES
*CONTROLLING THE SOF TWARE TIMEOUT, THIS
*ROUTINE WILL ALSO CHECK THAT BUFFER
*CHARACTER COUNTS AND ADDRESSES ARE CORRECT

gggg

ERROR, EXIT TEST

TRAP
.WORD

CSESCAPE
L10100-.

SAND THAT THE DATA IS CORRECT IN THOSE BUFFERS
CALL

$ERROR

;CHECK BASE TABLE FOR SOFT ERRORS
*NOTE: NORMALLY ANY NON-ZERO ERROR COUNT IS
*REPORTED: HOWEVER IN THIS TEST A REP COUNT
SOF 1 IS ALLOWED, BECAUSE AT LOW BAUD RATES
JWE WOULD EXPECT 1 REP.

——

e e

—_—

(ZDMIDO DMR-11 FUNCTIONAL TESTS MA(CY11
CZ0oMID.P11
29-JuL-81 11:32

30A(1052)

E 14

29-JUL-81
12:42 PAGE 174
TEST 18 -~ DMR MODE LARGE MESSAGE

SEQ 0173

8198

8199
8200
8201
858%

036666
036666
036666

ENDTST
104401

L10100:

TRAP

(SETST

—

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZbMID.PN?
29-JuL-81 11:32
8206
8205
8206
8207
8208
8209
8210
8211
8212
8213
8214
8215
8216
8217
8218
8219
8220
8221
8222
8223
8224
8225
8226
8227
8228
8229
8230
8231
8232
8233
8234
8235
8236
8237
8238
8239
8240
8241
8242
8243
8244
8245
8246
8247
8248
8249
8250
8251
8252
8253
8254
8255
8256
8257
8258

30A(1052)

29-JUL-81

12:42
PAGE 175
TEST 19 - DMR MAINTENANCE MODE MESSAGE
TEST

.SBTTL

SEQ 0174

19 - DMR MAINTENANCE MODE MESSAGE

:ttl’ttttttt'fittt*.tfi*it""tt**t*tt*tttt*tt*tttttttti*tttttttttttttttt

TEST 19 - DMR-11
o
‘« MAINTENANCE MODE OPERATION
. %

tx THE BA/CC OUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND
"t

THE

CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE

‘« THE RECEIVE/TRANSMIT TABLE.

CHECKED AGAINST

- %

THE BUFFERS ARE DETERMINED IN THE SUBROUTINE $BUFFS.
THIS
SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF
ONE RECEIVE AND ONE TRANSMIT BUFFER.
THE ROUTINE WILL
ATTEMPT TO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING

i
v

HIERARCHY:
A.

C.
.

P A A

BGNTST

036670
036670
036670

012737

000001

036676
036702
036706

005037
005037
012737

002274
002276
000001

AN AR AR

RN AN R A AN AR AR AR AAA AN A AR

A AR AANNARNRANACRARAARANARNARAA
AR AN

719

002324

MOV

#1,BUFNUM

;A4 OF

002300

CLR
CLR
MOV

RE SUME
DMCMDE
#1 . MNTMDE

;DON'T ALLOW RESUME
sFLAG CLEARED TO ALLOW DMR MODE.
JFLAG SET TO REQUEST MAINTENANCE MODE.

036714

CALL

$BUFFS

JDETERMINE 1 RCV &

036720

CLEAR

JSR

PC,

JMASTER CLEAR
sexxx MACRO EXPANSION xwxw«
;ISSUE A DMR MASTER CLEAR

ESCAPE

TST

36720

004737

036724
036724
036726

104410

011070

SMSCLR

RCV & XMIT BUFFERS.

:titt

;1F

ERROR,

1 XMIT BUFFER

LA &

EXIT

TEST

TRAP

000012

.WORD

035730

CALL

$ INOUT

JTHIS ROUTINE WILL MANAGE

036734

CALL

$ERKOR

;CHECK BASE TABLE FOR SOFT ERRORS

036740
036740
036740

ENDTST
104401

ALL

CSE SCAPE

L10101-.

THE DMR

; COMMANDS [SSUED IN T{E INTERRUPT ROUTINES
; (FROM BASE IN UNTIL SHUT DOWN).
BESIDES
;CONTROLLING THE SOFTWARE TIMEOUT, THIS
JROUTINE WILL ALSO CHECK THAT BUFFER
;CHARACTER COUNTS AND ADDRESSES ARE CORRECT
JAND THAT THE DATA IS CORRECT IN THOSE BUFFERS

L10101:

TRAP

(3FTST

-—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZDMID.P1
29-JuUL-81 11:32
8259
8260
8261
8262
8263
8264
8265
8266
8267
8268
8269
8270
8271
8272
8273
8274
8275

8276
8277
8278
8279
8280
8281
8282
8283
8284
8285
8286
8287
8288
8289
8290
8291
8292
8293
8294
8295
8296
8297

8298
8299
8300
8301
8302
8303
8304
8305
8306
8307
8308
8309
8310
8311
8312
8313
8314

30A(1052)

29-JUL=-81

12:42

G 14
PAGE 176

SEQ 0175

HARDWARE PARAMETER CODING SECTION

.SBTTL

HARDWARE PARAMETER CODING SECTION

;t'ttttttttttttttttttt"*'l’tttl‘ttfiQt*lttfitttttttttt.tttttttttttt'tt"t'

THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THER SUPERVISOR TO BUILD P-TABLES.
THE
MACROS ARE NOT EXECUTED AS MACHINE ;NSTRUCTIONS BUT ARE
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.
"'fit'ttittfitit'tti**'*ttttt*itttttitt"ttfitt*t*itttt.tt*titttttttt'ttt'

036742
036742
036744

036744
036744
036746
036750
036752
036754
036754
036756
036760
036762
036764
036764
036766
036770
036772
036774

BGNHRD

000015

::
L$HARD
GPRMA

001031
036776
160000
177776

GPRMA

002031
037014
000000
000776

GPRMD

010032
037035
000007
000000
000007

P1,2.0.,160000,177776,YES

.WORD

P2,4,0,0,776,YES

P3,20,0,7.0,7,YES

036776

037070
037076
037104
037112
037120
037122
037130
037136

L10102:

051503
051104
000040
042526
040440
051523
124
047503
051125
020116
040
044440
040516
020117
041505
005015
020040
031510
020055

P1
TSLOL IM
TSHILIM

.WORD
.WORD
.WORD
.WORD

T$CODE
P2

.WORD

ENDHRD

020122
051505

042101
035123

P1:

.ASCIZ

/CSR ADDRESS:

052103
042104
020072
051505
043116
052101
006455
030040
052116
020114
047503
047524

051117
042522
000
020124
043511
047511
012
036440
051105
047050
047116
024522

P2:

LASCIZ

/VECTOR ADDRESS:

P3:

LASCII

/TEST

LASCII

020061
032462
027126

020075
020064
032463

LASCII

T$CODE

. WORD
.WORD
.WORD

.WORD
.WORD
.WORD
.WORD

036776

.WORD L10102-L$HARD/2

TSLOLIM
TSHILIM
T$CODE

P3
7
IM
TSLOL
TSHILIM

.EVEN

CONF IGURATION =/<CR><LF>

0 = INTERNAL

(NO CONNECTOR)/<CR><LF>

- H325% - v.35

(NOTE:

MOUC

1-4 ALLOWS/<CR><LF>

CZDMIDO DMR~11 FUNCT]IONAL TESTS MACY11
(ZOMID P11
29-JUL-81 11:32

037144
037152
037160
037166
037174
037202
037203
037210
037216
037224
037232
037240
037246
037254
037262
037270
037276
037304
037312
037320

02004C
047050
020040
030440

020040
035105
042504
040440
006523

031040

036440
032065
052116
020114
043517
047111
041501
062514
024516
020063
032462

031462
031462
020040
031510
020055
006462

037576
037604
037612
037620

042117
050125
020123
040502

040

041440
040440
020127
044440
040506
046105
006504
040

024040
044055
020054
051107
032503
026060
051040
026503
020054
027463
031510
005015
020052
052103
043040
044527
046116
052040

12:42

PAGE 177

SEQ 0176

HARDWARE PARAMETER CODING SECTION

PROGRAM INTERFACE SELECTION)/

.HJ\.II

/2 = H3254

INTEGRAL

LASCII

<CR><LF>/

H3255 = RS232C/<57>/423/<CR><LF>

020075
020065
031064

LASCII

/& = H3255 = RS422/<CR><LF>

036440

.ASCI1

5 = CABLE AND SW PACK

020040
032463
030065
042524
041055
030455

LASCI1

(V.35-H3250,

031123
031510
051522
031064
032462

031063
032462
031064
026462
024461

LASCI!

042523
052040
046117
043516
020131
042510
046505
047520
047514
045503

042514
042510
047514
047440
043111
046440
051440
052122
050117
025040

LASCII

031063

037324
037332
037340
037346
037351
037356
037364
037372
037400
037406
037414
037422
037425
037432
037440
037446
037454
037462
037470
037472
037500
037506
037514
037522
n37530
037532
037540
037546
037554
037562

037570

020 040
052 117
047 515
032 055
053 517

29-JUL~81

8315
8316
8317
8318

30A(1052)

044440
040522
051120
020115
043122
042523
047511
020040
031510
020055
041462
005015

020064
032462
051522
012
032440
041101
042116
040520

052116
042503
041505

012
020040
027126
031063
047111
046101
040465

051522

032057

042514

INTERFACE

SELECTED/<CR><LF>

051440
045503
051105
051440
042524
INTEGRAL-B(C55A~10,/

RS232C-H325, RS423/<57>/422-H3251)/<C(R><L¥>

SELECT

THE

FOLLOWING ONLY

THE

MODEM SUPPORTS

LOOPBA(K

_—

- (ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052) 29-JuL-81 12:42 IPAGE 178
CZDMID.P1

8371
8372
8373
8374
8375
8376
8377
8378
8379
8380

037676
037634
037642
037650
037652
037660
037666
037674

29-JuL-81

11:32

00501%
020075

020040
047514
047514

020066
040503
050117

LASCIT

<CR><LE>/

020067
047515
047517

020075
042524
006520

LASCIZ

020114
005015
020040
042522
046040
000G12

HARDWARE PARAMETER CODING SECTION

.EVEN

6 = LOCAL LOOP/<CR><LF>

7 = REMOTE LOOP/<(R><LF>

SEQ 0177

J 14

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
12:42 PAGE 179
CZDMID.P11
29-JuL~-81 11:32
SOF TWARE PARAMETER CODING SECTION
8381
8382
8383

.SBTTL

8384

8385
8386
8387
8388
8389
8390

;
:
;
;
;
;

8391

8392
8393
8394
8395
8396
8397
8398
8399
8400
8401
gzg%

(037676
037676
037700
037700
037700
037702
037704
037706
037710
037712

8408
8409
8410
8411
8412
8413
8414
8415
8416
8417
8418
8419
8420
8421
8422
8423
gzgg

037712
037720
037726
037734
037742
037750
037756
037764
037765
037772
040000
040006
040014
040022
040030
040C36

8433
8434
8435
8436

A AN

AN N AR R

R A AN AN AR R AR AN R AR AR R AN

R R AR

THE SOFTWARE PARAMETER CODING SECTION (CONTAINS MACROS
THAT ARE USED BY THER SUPERVISOR TO BUILD P-TABLES.
THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.
BGNSF
7

000005

LESOFT::
GPRMD

000032
037712
000007
000001
000005

$1,0,0,7,1,5,YES

037712

L10103:
042523
041101
047522
046040
044524
052125
040511
012
133
020122
051511
033040
056463
040515
046440
020051
040042

042514
042514
051107
047517
042515
053040
046102

052103
050040
046501
020120
047455
051101
006505

042522
047524
044524
031456
020040
036530
047111
000

042506
046040
043516
030456
024040
035465
030475

S1:

040066
040070
040072
040074
040074

040066
000240
000240
000240

.EVEN

JASCII

/SELECTABLE PROGRAM LOOP TIME-OUT VARIABLE/<CR><LF>

.ASCIZ

/[REFER TO LISTING 6.3.13]1

(MAX=5; MIN=1) /

.EVEN
JERRANRAARENNRNRARES

040042

.WORD L10103~-L$SOFT/2

.WORD
.WORD
.WORD
.WORD
.WORD

ENDSFT

8426

8432

SOF TWARE PARAMETER CODING SECTION

"t.'t'l’."tt*fi**t*"'***"t“’fi't**l’*i'fi"*"'**t"ifitti'tfifiktt"t't"""

8404
8405
2289

8427
8428
8429
8430
8431

SEQ 0178

PAT(CH:

.=.+20.
NOP
NOP
NOP
R

AN AR

PATCH

AREA

ARRARNARRNAAAA
AN AR
AN CNAR

NN TR AN RN AN R AR AR N AR E AR A RR RN KA ARSI AR R RN RN

R AR RS ®

ENDMOD
LASTAD

.EVEN

TS$(CODE
$1
7
TSLOLIM
TSHILIM

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)

CZDMID P11

29-JuL-81

8437
8438
8439

00000C
000000

8440

040074
040076
40100

000001

11:32

29-JuUL-81

12:42

K 14

SEQ 0179

PAGE 180

SOF TWARE PARAMETER CODING SECTION

LSLAST::
.END

. wORD
.WORD

¢
0

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuL-81 11:32
A
=
ADR
=
ASSEMB=
AX3
BACCR =

000044
000020 G
000010
002304
000004

BACCT = Q00000
BASE
002640

BASEI =
BASEUP=
BIGBUF
BITO
=
BITOO =
BITO1 =
BITO2 =

000003
020000
004240
000001
000001
000002
000004

BITO3 = 000010
BIT04 = 000020

BITOS = 000040
BITO6 = 000100
BITO7
BITO8
BIT09
BIT1
BIT10

BIT11
BIT12
BIT13
BIT14
BIT15
BIT2
BIT3
B'T4
Bi1TS
BIT6
BIT?
BIT8
BIT9
BOE
BSELO

=
=
=
=
=

=
=
=
=
=
=

=
=
=
=
=
=
=
=
=

000200
000400
001000
000002
002000

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

16404
15164
1231
17248
1612#

SEQ 0180

5340

5601

5447

5651

1608%#
1857#

2533
4359
4361
2840

4177%
4570

4181+
6636

4186%
6712

4191«
6946

4196+
7145

4202+
7206

4384
7284

5374
5458
5701
5918
6613
16114

5385
5462
5729
5937
6693
2483

3657

5397
5469
5735
5988
6792
3300

3662

5399
5473
5739
6011
6927
4363

3664

5401
5561
5746
6044
7031
4531

4418

5403
5586
5750
6123
7042
4646

53132

5605
5600
5757
6296
7196

5324

5336

2396

3173

3244

4557

4486
4486
6638

3648

G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G

L 14
30A(1052)
29-JUL-81
12:42 PAGE 182
CROSS REFERENCE TABLE =-- USER SYMBOLS

15764
1869#
1489#
14784
1477#
1476#

14754

1476#

14734
14726
14714
14704
14694
1488#
14684
1467#
1466#
1465#
14668
16463#
*.87#
1486#
1485#
14864
1483%4
1482#
14814
1480#
15204
1685

3655

3176
1601
1489
1488
1487

4590
3607

6957
3630

7386
7220
3632

7706
7398
3639

5624
5622
5761
6404
7en

5428
5651
5768
6475
7363

5635
5693
5772
6477
7673

4577

5139

5586

5622

4659
6729

4670
7849

6567

6638

6729

5324

5385

5899

5918

5956

6839

1592
1591
1587

1593
4196
1590

4191

2581+

2703+

2781+

3300n

4541t

4S46r

4550+

3563

3581

4099*

4100%

5238

5248

5257

4991
4108
3182
3477
3153«

4995
4384x
3186
7950%
3197

5105
4940
3225
8055+
3198+

6153
4992
3236
B110%
3200%

6202
4996
3283
B168%
3228

6235
5109
3284,
8228+
229

6334
3609

€440
3614

6644
3616

6727
3623

6845
3625

7714
3641

3646

5439
5695
5779
6499
7972

5447
5697
5783
6501

5451
5699
5876
6544

7699

7702

7852

4565s

4570+

4585e

3285

3286

3339

3457

3260

3242

3464

5338

5340

5342

5344

1486

1485

1484
1483

1482
1481
1480
1600
1558

1596
1566
1565
1563
1562
1560
1559

6011
1583
1581
1578
1576
4465
4670
1598
1597
1595
159
1573
1572
1586
1585

2483+

2525+

4095%

4096*

2389+

3553

4103%
2508
2533«

4104+
4939
4107+

1557
1556
1555
1556
1553

1569

1584
1580
4476
4482
6567
1599
4186
4181

BSEL1
bSEL2 =
BSEL3
BSELL =
E+.5
BSELG =
BSEL7
BUFNUM

002242
002234
002244
002236
002246
002240
002250
002324

BUFSIZ

002322

- 002000

16864
16874
1688#
16894
16904
16914
16924
17534
3476
17524
15844

3143
3475
3145+

3148
3476
3150+

M 14

SEqQ 0181

12:42
PAGE 183
29-JuL-81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CROSS REFERENCE TABLE =-- USER SYMBOLS
CZOMID.PN
29-JuL-81 11:32
18014
17914

CHIPNO
CLRNO
M
=

1629#

CNTRL

2396
2639

2409~

7314

COUNT
CR

) =
A
= d a2
-

4039
4836
4834

2227
4651
5409
6465
7057
7451

CSERHR=
(SERROC=
=
(SERSF
CSERSO=
CSESCA=

000056
000060
000054
000057
000010

CSESEG= 000005
C$ESUB= 000003

CSETST= 000001

CSEXIT= 000032

C$GETB= 000026
CSGETW= 000027
CSGMAN= 000043

6349

6370

6379

6592

6672

6754

7071

7124

7175

2581

2621
6879

2923
6951

4365
6970

4550
7035

4619
7054

6352

6453

6558

8336

8340

8355

8371

8375

8408

6025

6110

3373
5265

4374

€737
7237

8330

7415

7730

4094+

4283

2418

3305

5099
6531

5299
6600

5359
6680

7020

5547

5637

4294

4841

7564

7638

7876

2329

2433

2624
4708
5705
6587

2633
4718
5902
6657

2926
4855
5921
6666
7170
7507

{R62

7079

5863

5932

7132

7183

2935
5048
5959
6740

3328
5072
6014
6749

7086

5975

7258

7107

7139

b md i

r R

B
e T
Y e
S

3
3

S
S
S

CSCEFG=
C$CLCK=
CSCLEA=
C$CLOS=
C$CLP1= 000006
CSCVEC=
CSDCLN=
C$DODU=
CSDRPT=
=
(DU
(CSEDIT=
=
CSERDF

=
(SAU
CSAUTO=
C8BRK =
C8BSEG= 000004
($85uUB=

N [ASTASTANT
NI ST N1 ST N1 U1
WYy
VT V7,8 ]
W AN AN N AN AN AN AN NN N
N

CSR
c1s

4028+
4736
7825
2519
6720
7278
6861
8312

7791

4664

7818

7882

7119
7482

7161
7500

7236
7642

7245
7733

6882
7309
7754

5255
5667
6047
6345
6687
6968
7371
7984

5566
5916
6167
6451
6821
7212
7681

5613
5993
6290
6556
6859

5095
6489
5151
8002

5928
7179
6492

6062

7276
7718

6999

5329
6355
6891
7418
7763

N 14

12:42
PAGE 184
29-JuUL-81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CROSS REFERENCE TABLE =~ USER SYMBOLS
CZDMID.P11
29-JuL-81 11:

12314
12314
12314
12314
12314
12314
12314
12314
6509
12314

000042
000030
000040
000011
000020
000050
000031
000023

C$OPEN= 000034
C$PNTB= 000014

12314
3525
3691
5060
5765
12714
12314
12314
12314
12314
12314
12314

CSPNTF=
CSPNTS=
C$PNTX=
C$QI0 =
CSRDBU=
CSREFG=
CSRESE=

000017
000016
000015
000377
000007
000047
000033

CSRFLA=
CS$RPT =
C$SEFG=
C$SPRI=
C$SVEC=
C$TPRI=
DDMC
=
DFPTBL
DIAGMC=
DISCON=
DMCMDE
DMR
=

000021
000025
000046
000041
000037
000013
000010
002174 G
000000
000100
002276
000522

DMRFLG
DMRRUN=
DMRVEC
DMTURN

002260
000040
002226
002254

DMTVEC
DTR
=
DXERR =
EF .CONEF .NEW=
EF .PWR=
Ef .RES=
EF .STA=

002230
000100
000007
000036
000035
000034
000037
000040

EMG10
EMG11
EMG12
EMG13
EMG14
EMG15

020067
020116
020141
020167
020215
020235

C$REVI= 000003

FEMG1

017716

G
G

G
G
G

12314

12314
12314
12314
12314
12314
12314
16164
14094
1231
‘5924
17194
15874
6545
17064
1594%
1678#
16984
6035
16794
15934
16154
14964
14974
14984
16954
14944

2209

39454
39494
3356
39574
39614
3375

4076
4234
3164
3496

3592

3673

3702

3730

3745

3759

3775

5482

5792

6244

2222
3540
3698
5084
5776

2617
3559
3718
5244
6240

3438
3569
3726
5432
6505

3446
3577
3741
5443

3454
3587
3755
5455

3461
3604
3771

3468
3620

3492
3652
4223
5733

3508
3668

4935
5743

3517
3683

5466

4091
5477

3484
3636

4950

4053

4058

3297

SN
O

C$GPHR=
C$GPLO=
C$GPRI=
C$INIT=
C$INLP=
CSMANI=
CSMEM =
C8MSG =

SEQ 0182

4022
4280

7581
4811

7558

7611

7863

4027«
5314
6614
2516+
4623
4140
4153«
7664
4132+
4401

4420

4496
5601

7952«

5877

8057+
5938

8113«

6793
2603

4525
5652
6928
2605+«

7043

5989
7197

8171~
6045
7272

8231«
6124
7364

6297
7674

6405

4184
8054+

4189
8080+

4194

4208

4210

4213

4215

4396

4437

2435

39264
74464
7484

7475

7756
7793

7784

4772

7651

7891

4179
572

5754

4867
4043
47656
1309

3095
3082

4048

4142

5562
6694
2597+
4179
8053
6147

7746
4701
4710
7774

4720
7453

7509

7820

7765

7032
7089+

7973

(ZDMIDO DMR=11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.PU

EMG16

29-JuL-81

12:42

B 15

PAGE 185

SEQ 0183

CROSS REFERENCE TABLE == USER SYMBOLS

EMG17
EMG18
EMG19
EMG2

020301
020353
020402
017727

017774

39664
39714
39794
39834
3330
%g%g

46>3
4376
4615
6869
39284
39354

6357

6458

€580

6659

6742

6884

6975

7059

7112

7163

7238

EMGY

020040

2229

2635

39414

4630

6366

6467

6589

6668

6751

6893

6985

7068

7121

2937

29454

42314
2211x

2231%

2249

2297«

2333«

2341

2332
6468

2627
6581

2636
6590

2929
6660

2938
6669

35004
6743

4377
6752

4616
6885

4631
6894

4667
6976

6358
6986

2519

4025%

6558+

6593«

6629+«

6673+

6720%

6755«

6951+

6989+

7035+

5043

5046%

5067

5070«

5100~

5115

5118+

EMG8

EMS3

FMS4

EMTO
EMT
EMTI0
EMT11
EMT12
EMT13
EMT2
EMT20
EMT22
EMT3

EMTSL
EMTS

EMTS

EMT?7

EMT8
EMTO
END
ERRFLG
ERRG1
ERRG10
ERRG11
ERRG12
ERRG2

ERRG3
ERRG4
ERRG7
ERRG8

ERROR

ERRT1
ERRTZ2
ERRT3
ERRT4
EVL
=
EXERR =
ESEND =
ESLOAD=
FINITT
FINIT2
FINITS
FLAG

020250

11:32

29-JUL-81

7172
2865

012540

012724

2928

7247
28764

7311

024120
025472
030604
030632
030666
031226
025512
032026
036240
025646

4857
5050
5923
5961
6016
6159
5122
6483
7644
5267

48744
5074
60744
60784
60834
6208
51884
65114
7884
52744

026421

5350

5411

54884

027574

5592

5628

57954

026374

5331

026467

027625
030554
021510
002362
014616
016164
016216
016250
015124

015240
015470
015764
016062

002366

026154
031174
027266
031770
000004
000006
002100
000035
021512
021601
021670
002344

5392

G
G
G
G
G

G
G
G
G
G
G
G
G
G

54844
54954

62474
79074

5800#
60704
4228
2168+
34324
37344

2436
2866
36784
37054

35324
35964
4721
4702

4711

7072«
5351
6160

7086
5412
6209

7125
56234
62324

15144
16144

5571

7821

17854

5708
6484

12314
12314

4088
4116
4220
17664

7069
7466

2216

57184
64964

7735

51854

5707
5904
4061
1779%
3331
3357
37484
3376
2210
6367
7060
7454

37624
2230
6459

7420

7113
7476

7122
7485

7164
7503

7173
7510

7239
7736

7248
7747

7303
7757

7421
7775

7435
7785

7445
7794

5268

7139«

7176%

7214x

7251x

7278«

7315+

1333

42354
L4245n
L2554
4969+

7312
7766

CZDMIDO DMR-11_FUNCTIONAL TESTS MACY11
CZOMID.P1T
29-JuL-81 11:32
FMDROP
FMG1
FMG10
FMG11
FMG12

FMG13

FMG14
FMG15
FMG16
FMG17
FMG18
FMG19
FMG2
FMG21
FMG22
FMG23
FMG24
FMG3
FMG4
FMGS
FMG7
FMG8

FMGY
FMS1
FMS2
FMS3
FMTO
FMT1
FMT11
FMT12
FMT13
FMT14
FMT15
FMT16
FMT19

FMT2

023670
016302
016715
016753
017005

017036

017112
017166
017215
017274
017347
017436
016334
017461
017527
0175>4
017635
016366
016440
016471
016522
016573

016644
010620
010653
011746
024147
025204
027662
027713
027750
030005
030042
030077
031252

025253

FMT25
FMT3

036276
025330

FRSPAS

002266

FMT4
FMTS
FMT6
FMT7
FMT8
FMT9

FRSTIM
F$AU
=
F$AUTO=
F$BGN =

025414
026526
026557
026610
026641
026672

002264
000015
000020
000040

4769

3443
3665
3707
3680
3688
3723
3695
3738
3752
3768

29~-JuL-81

c15

12:42
PAGE 186
CROSS REFERENCE TABLE == USER SYMBOLS

30A(1052)

3546

37822

5722

3601

3794

SEQ 0184

38464

3584
3451

3458
3465
3481
3489
3435
3556
3566
3617
3633
3649
2219
2237

3537
38044
6502

2614
4864
4932

5730
5740
5751
5762
5773
5784
6237

4947
7648
5057

5130
5429
56440
5452
5663
5474

79124

51¢74

17124
17114

3500

4607

5150
5415
5644
5916
6047
6190

3532

4746

5229
5419
5656
5927
6053
6199

3596

4763

5236
5423
5667
5931
6061
6221

4018
4967

5354
5613
5862
6009
6150
6310

D 15
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42 PAGE 187
CROSS REFERENCE TABLE -~ USER SYMBOLS
(ZDMID.P1
29-JuL-81 11:32

1231»
1231#
12314
4333
4967
5296

5483
5656
5890
6020
6128
6245

6409

6556
6718

8109
4323

4763
1234
4602
5094
5298
5544
5667
5916

6022
6140
6280
6418
6595
6757
6914
7105
7255
7380
7903

8124
8434
8272

8124

4331
4776
3497
4741
5096
5306
5546
5684
5927
6024
6150
6282

6435
6597
6759
6921
7127
7257

7392

7905

8139

000200
000372
000003

6451
6627
6830

6491
6679
6859
710°
7276

6496
6687
6903

7984

8052
8394

8068
8434

7074
7257
7533

7201
7371
7903

8139

7661

8257

8182

3760

3530
4753
5098
5318
5554
5691
5929
6033
6167
6290
6451
6599
6761
6932
7129
7265

6117
6227
6398
6549
6707

6830

7076
7231
73h6
7718

7019
7190
7323
7681

8052
8242

8141

7127
7295
7676

4307
4964
5273
5421
5644
5881
6009

4920
5236
5415
5632
5860
5982
6069
6221
6386
6528
6679

7404
7946

8084
8295

8293

1234

8434
3495

3748

3500
3758

3528
3762

3532
3774

3596
5481

3678
5791

3701
6232

6025
0675

5359
6061
6680

5419
6915
8139

5545
6998
8167

7018

3672
5718

3705
6243

3729
6496

5547
6174

5632
6179

5714

5861
7321

6067

4005

5927
639
7178

020630

6398
6595
6779
6998

6941
7182
7352
7718

4607
4968

=
FESW
FETEST-

GE TPRM
GS$(NTO=
GSDELMG$DISP-

7710

1424
4233

3998

FSRPT
F$SEG
T
F$SOF
F$SRV
FeSUB

7334

1407
4018

3632
3744
F $PROT
F $PWR

7178

6386
6549
6757

NOwW

J00016
000041

7156
7321
7690

6377
6538
6718
6932

4921
6491
7947

2422

4746
5099
5970

6531
7253

5230
6761
8053

4871
5354

Nt
= —2

FSEND

FSCLEA= (00007

6698
6914
7131
7317
7681
8082

6345
6530
6707
6921

[0 Yo
3V,]
~ — &

6327
6528

SEQ 0185

8201

7020

8228

7074

7335

8257

—

D
e
b
b
D cd

GSNO
= 000000
GSOFFS= 000400

G$OFSI= 000376

IBE
IDU
IECLR
1EQ
IER
IZSET

INFACE
INFLAG

=
=
=
=
=
=

010000
000040
000020
000100
020000
000100

000040
000041
000041
000041
I1$SEG - 000041
1$PROT=
1SPTAB=
1$PWR =
I$RPT =

d
od
D

8286
8286

8398

8276

8281

8286

8398

8276

8281

8286
7063

8398

1351
5020«
4996«
4377

1392
5026
5021+

iy — e

8281
8281
8281
8398

4621

1904

5027«
5065

4565

7167

7242

7306

5028+
5078

5064«

5065

5079

4565

4570

4585

4590

4646

4553

4557

36744
5718#

36784
57934

37034
62324

37054
624654

64964

5358
6282

5544
6390

5546
6528

5636
6530

4585

4508
4644

4733

3382

4541
4201+
4520

4546

4550

4593«

4634

3474
4533
3475
5729
5918

3480

4450%

3479

4458+

6011

42354
84344
34974
3I7L84

35004
37604

35304
3762%

35324
37764

35934
54234

35964
54834

4920
5931
6779

6922
5974
6914

4567

5098
6106
7019

6109

5229

3470+

4369

[AY"}

4516

7116

4502
4429

3309

INXMIT 002330
ISP13 = 000076
000072
000100
004000
000041
000041
009041
000C41
000041
000041
000041
000041

SEQ 0186

8398

8276
8276
8276
8286

4198+

002262
002354

022064
INISR
INRCV
002326
INTER = 000015
ISP7
ISR
=
IXE
=
ISAU
I1$AUTO=
I$CLN =
=
1$DU
I$HRD =
I$INIT=
1$MOD =
IMSG =

CROSS REFERENCE

E 1S

12:42
PAGE 188
TABLE -- USER SYMBOLS

29-JuL-81

~NOV
ety
5}
WO
— 00~

HALTC =
HDX
=
HELP
=
HICRC
HIWORD
HLT
= 00000¢
HOE
= 100000

r
® L2 X

G$RADL=
G$RADO=
G$XFER=
GS$YES =

GSRADD=

000001
(000002
(000000
000140
000000
000040
000120
000020
000004
000010
001000
002000
000000
0C2404
002410
QOO

GSPRMA=
G$PRMD=
G$PRML=
GSRADA=
G$RADB=

R RERER
22 R

GBEXCP= 000400
GSHILI= 000002
GSLOLI= 000001

30A(1052)

POV
NN NNV NN NDNVUNONC
PN
WW NN NN WWWNINNNNINNWN.

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.PI1
29-JuL-81 11:32

3471
5622
5385

4539

4541

4577

4307#
4333
L7784

6024

7017

7078

7257

7334

7550

37314

7946

rZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
(ZDMID.P11

29-JuL~-81

I$SETU= 000041
I$SFT = 000041
I$SPRV = 000041
T$SuB = 00004°

LAST
Lf

002364
= 000012
LLOOP = 000006
LOCATE
024042 G
LOCRC
002402
LOE
= 040000 G
LOGDEV
002370
LOT
= 000010 G
LOWORD
002406
LPLU
= 004000

LSDTYP
(DU
($DUT
LSDVTY

002110
002036
002070
021756
002106
022046
002032
002011
010246
002076
002060
002124
002116
002040

002034
023640
002072
010240

G
G
G
G
G
G
G
G
G

G
G
G
G
G
G
G
G

F 15

PAGE 189

SEQ 0187

TABLE ~= USER SYMBOLS

8166

8227

84074
L3454

LO602H

46074

L7418

47468

47538

LBLOA

4B734

5296
57134
60634
6488F

52984
5860
6106
64904

53544
58624
61094
5528

53564
59274
61744
65304

53584
59294
61764
65954

54154
S9314
61784
65974

54174
59704
62214
6599

5544
59728
62234
66754

55464
5974k
6280
667TH

56324
60204
62824
66794

56344
60224
63864
67574

56364
60244
63884
67594

57114
60614
63904
6779

4967
5358
5636
5916
6069%
62804
6451

6698
69054
7131
7334w
7690
8068
82574

5150
5379
5656
5948
6109
6290
64934

6707
6914
7156
7352
7710
80824
82594

51524
54194
5667
5974
6117
6301
65284

50294
54214
5684
5982
6128
6310
6530

5236
5544M
5691
5993
6140
6327
6538

5255
5546
57144
6002
6150
6345
6549

82274

6687
69034
7105
73234
7681
80524
8242

5098
5366
5644
5931
61064
6282
64O1H

6122

6295

12314
52714
5554
57164
6009
6167
6377

JSIMP - 000167

CROSS REFERENCE

12:42

8109

6914
72554

I$TST = 000041

29-JUL-81

8052
12314
83944
12314
12314

LSACP
($4PT
($AUT
LSAUTO
L$CCP
LSCLEA
L$CO
LSDEPO
LSDESC
LSDESP
LSDEVP
($DISP
LSDLY
[$DTP

11:32

30A(1052)

6556
6786
69984
7231
7404
79464
81414
12314

4804

7017
72578

4804H
52734
5566
58604
6024
6178
6390

6599
6810
70004
7257
7533%
7963
81664

4920

70194
73174

4B4LH
52964
5577
5862
6033
6190
6398

6607
6821
70174
7265
75354
7977
8182

49228

70744
73194

4BLOH
5298
5584
5870
6047
6199
6409

6618
6830
7019
7276
75504
7984
82014

49628

70764
7334

49204
5306
5613
5881
6053
62254
6418

6627
6851
7052
7295
7661
80014
82034

L964H

70784
7550

4922
5318
5620
5890
60674
62274
6435
6679
6859
7078
73214
7676

80034

L9678

71274
7946

50944

7129
8052

S0964

71314
8109

17834
16634

4494+
8302

4516
8306

4531
8312

4533
8330

4535
8336

8340

8355

8371

4808
17964

48494
4977%

5009«

5015

5016%

5017«

5039+

5040

5055

4067+

4071%

4072

4075

4298

4768

4833

4931

4991%
4439
6343

4995+«
4442
6612

5010%
5560
6692

5040
5599
6791

5054
5650
6926

5875

5936

5987

2320

2424

3317

16604

15264
1786#
15154
17984
15574

9223

13404
12984
13244
1341
13384
1330
12044
10764
1331
13304
13164
1301
13464
13004

12964
1227
13064
1317

3018

439

42734
43234

18914
13714
2197
47634

1883«

7050

7041

7195

5098&

71784
8166

S1464

71804
8227

6718
6921
7182
7366
7718
8084#

67614
6932
7190
7371
7727
81094

8375

8408

6037

6040

7270

7356

51484

71824

67634
6941
7201
7380
75034
8126

7359

5229

7253«

677
6968
7212
7392
7905#
813

766h

—_

(ZOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81 12:42 GPAZE 190
CROSS REFERENCE TABLE -~ USER SYMBOLS
1

LSEF

LSENV]
LSETP
LSEXP
LSEXP4

002052
002044
002102

LSEXPS
L $HARD
LSHIME
LSHPCP
LSHPTP
LSHW
LSICP
LSINIT
LSLADP

LSLAST
L$LOAD
LSLUN
LSMREV
L SNAME
LSPRIO
LSPROT
LSPRT
L$REPP
LSREV
T
L$SOF
L $SPC
LSSPCP
LSSPTP
LSSTA

LESW

LSTEST
LSTIML
LSUNIT
L10000
L 10001
L10002

L10003
L 10004
L1000S
L w006
L10007
L10010
L10011
L10012
L1004
L10015
L10016
L10017
L10020
L10021
L10022
L 10023
L10024
L10025
L 10026
L10027

29-JuL-81
[aInlafalalalalalalalalalnlalalnlalalalalnlalalalalalalnlalalal o

(ZDMID.P11

11:32

8272
3089

82734

1407

1408#

7838

40184

84304

3998«

8394

83954

1439

14404

2849
4072
14244

14464

024404
025026

7575

2851

3384

SEQ 0188

r—

—

025200
025644
026152
026022

L10040
L10041
L10042
L10043
L10044
L10045
L10046
L10047
L10050
L10051
L10052
10053
L10054
L10055
L10056
L10957
L 10060
L 10061
L10062
L10063
L 10064
L 10065
L10066
L10067
L 10070
L10071
L10072
L10073
L10074
L10075
L10076
L10077
L10100
L10101
L10102
L10103

MANUF
MCLR
MDIAG
MICRO
MMANAG
MNTMDE
MNTRE
C
MODEM
N

SEQ 0189

54194

5567

5578

5585

5614

5621

5645

5657

5668

5685

5692

57144

5882

5891

5917

5949

5983

5994

6003

6010

6034

6048

6054

6129

6141

6151

6168

619

6200

62254

6302

6311

6328

6346

6378

6399

6410

6419

6436

6452

64914

6550

6557

6608

6619

6628

6688

6699

6708

6719

67614

6811
6933
7106

6822
6942

6831

6852
69984
7202

6860

69034

7157

5969
719N

7213

7232

7266

7277

7296

73214

7367
7677

7372
7682
7985

7381
7691
80014

7393
771

7405
7719

75334
7728

79C34

4409

3026

3027

5998
4397
4396

4400
4401

2401

4327

4641

3340

3349
8114

3368
8172+

3378
8232+

4205

2398
2401

000043

CRCSS REFERENCE

H 15

12:42
PAGE 191
TABLE == USER SYMBOLS

5380

80824
81394
82014
82574
82944
84064
2595
3021
3020

MAINT?

29-JuL-81

52714
5367

7978

MAINT
MAINTI

30A(1052)

ANPY

L10030
L10031
L10032
L10033
L10034
L10035
L10036
L10037

(9,19,]

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID P11
29-JuL-81 11:32

3092+
4407

7953«

8058+

62284
5238

5399

5635

3159+

6306

4462

4657

60674

—

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P11
29-JuL-81 11:32
= 000001

020612

NEXT
NOBFR =
NOXMEM
NXM
=
NXMFLG

022620
000004
023630
000400
002352

QUTFLG

002356

OUTRCV
OUTXMT

002332
002334

OUTISR

O$APTS=
0$AU
=
O$BGNR=
O$BGNS=
O$DU
=
O$ERRT=
OSGNSW=
O$POIN=
O$SETU=

=
2484
2902+

7608

7860

4851

7555
6746
3126

4859

3135

3255«

3288+

3311

4522

4636

4734~

32857
3286+

3472+
3473«

3476
3477«

3488
3487

4714+
4694%

4730
4728

4276

6361

6277

6584
3076+
4837+

4073

6462

L7464

6663
3085

46074

000000
000000
000000
000001
000001
000000
000001
000001
000000

1292
1324
1318
12504
12504
1334
12504
12504
1278

8437

5693

5735

3296
4138

4145

040042

PRI
=
PRIOO =
PRIOT =
PRIO2 =
PRIO3 =
PRIO4 =
PRIOS =
PRIOG6 =
PRIOZ =
PSTACK
Pl
P2
P3
R
-

002000
000000
000040
000100
000140
000200
000240
000300
000340
002372
036776
037014
037035
000042

PNT
= 001000
PRETIM= 000055

RES
=
RESFLG
RESUME
RETURNREVI
REV2
RFLAG
RLOOP =

2335
2868

2243
2804+

023142

PATCH

RBUF
RCOUNT=
RCV.
=
RCVBUF
RDI
RDO
=

2299
2832

2170
2783

L0664
L5154

(02572
000C44
000004
003640
000200
000200

010000
002360
002274
000207
0255640
025542
002570
000007

InlalalalaNEN A

NEWST

16014
17894

002376

a1l

NAKS

NESTPC

115

12:42
PAGE 192
30A(1052)
29-JuL-81
CROSS REFERENCE TABLE == USER SYMBOLS

3078
4023«

18504
18454
15694
18644

15624

15724
7071
15784
17774
17184
16544
4939«
4940~
18484
16614

82964
8299#
83024
5336
6713
6638
4692
3142+
2187
2185
7124

2510

4433«
4026+
4945
4943
7345+«

7560«

7565

SEQ 0190

2540+
2941~

2582+
3029+«

2641+
3036+

2697
3282*

2706
3413+

2707+«

2714+

4030~

4282*
7605+«

4295
7620

4302~
7630

4325
7639

4748+
7857«

4813«
7868

4807

7554

7580

7607

7859

6672

6754

7569«

1284
1326
1288
1350

5739

3094

3411

4021

5397
6947
6714

5424

5428

6948

7147

7338
7335

7387
7388

7470
7479

7490
7488

3179+
2311
2522

3180«
4350
2639

3215

3224

3291

3293

3337

2940
7314

4736
7825

6349

6370

6379

6592

4559
4518

64568%
4555

4579
4575

7951~

8056+

8112+

8170«

8230+

7469

7517

7769

7778

7826

7841+

7424

7175
4432

51954
51964

7460

7146

7516

7250

5601

7207

7739

5938

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZOMID.P11

29-JuL-81

11:32

29-JuL-81

12:42

J 15

PAGE 193

SEQ 0191

CROSS REFERENCE TABLE == USER SYMBOLS

RMODEM= 000017
ROMADR 002412
ROMI
= 001000

1626#
18004
15594

5893
2967
2968

5950
2976
2974

6143
4929%
2977

6192
4957%
2983

4974+

4993x

4999+

5102+

5142+

RQI

15654
4570

2298
4585

2483
4590

6946

2525
4646

6957

2581
5893

2705
5950

2900
6143

3300
6192

4503
6334

4541
6440

4546
6636

4550
6644

4565
6712

77074
77084
2415
2702%

7779
7788
3551
2720

7848x
7849x

2744~

2187
2974
4639%

2298+
2977x
4442+

2311
2981x
4502%

2398+
2983x
4503%

2401*
2984%
4508

2415
3382«
4641+

2495
3442
4646

2522
3513
4823

2705%
3545
5721

2900%
3551
5893x

2966*
4327+
5950+

2968+
4348

1687
4097
6370=
;;gg

2185
409Bx
6379%
7124x

2226
4429x
6453
7158

2621
4609
6575
7175+

2639%
4619
6592+
7233

2901=
46h4r
6654
7250%

2923
4692
6672+
7297

2940
4733x
6737
7314%

2967
4736%
6754*
7415

3383+«
4825
6879
7426

3441
5720
6970
7516%

3512
6349w
7054
7730

2722%
L476%
5956
2510
3686
L4452+
6663

279%x
4482x
7439
2593«
3713
4460%
6746

3450
4486
7470
2595

3521
4671
7751
2630

3687
4673%
7779
2725«

3714
L4677%

4101+
4L6B2x

4102+
4687+

4418%
4690

4451+
4695

4465+

4621

4396%
4623

2730%
4397+
4659

2796+
4401+

2932
4409+

2969+
4412«

7063

7116

2732«
4400*
4670%
7167

7242

7306

7448

ROMLOC
025531
ROMC
= 002000

= 000040

RRAM
= 000014
RSEL4
035362
RSEL6
035364

RUN
SAVE
SECN
SELO

= 100000
002342
= 004000
= 002232

5129
15584

6727

16244
7698+
7699+

1553#
17658
15814
16848

2973«

g?gg

51924
2984

6845

7145

7206

7220

7284

7386

7398

7706

7714

6143+

SEL2

002234

16814
3544
6352
7071+

SEL4

002236

SEL6

002240

16828
64459%
4715
16834

1689
4468
4827
1691

G422

4425%

6462

2497x
L4469%
5899
2499+
3520
L432x
6584

7695«

7796

7834

70 57%

4069x

4217

4924

4527

4549«

2978«

6361
SFLAG
SFPTBL
SKIP
SPEED

002346
002224 G
002350
002224

17678
164414
17684
16434

STARST
START
STLU =
STREC =
STUP
SUBRPC

020606
002272
010000
000200
000400
002374

4045
17178
15564
15914
15604
17884
2579«
2899«
3504
12314
1294
1322
1348
3705

STARES

002270

Sv(GBL~ 000000

SVCINS= 000001

17138

12314
1281
1307
1331
1374

3449

4156

4064+

4050
3289+

40634
4427

6105«
6888

4706%
6979

4705

4725

4829

2973
2172+
2580
2942+«
3533
12414
1296
1324
1371
3734

2974
2173x
2642+
3016+
3536
1265
1298
1326
1408
3748

2981
2245x
2699%
3017+
3597
1274
1300
1328
1409
3762

2983
2301x
2700x
3037«
3600
1276
1302
1330
1440
3998

2302*
2742«
3074x
4024%
1278
1304
1332
1441
4018

2337x
2779
3075+

2384*
2780*
3256+

2385+
2805
3280*

2440%
2834«
3281*

2480
2835«
3414v

2481+
2870+
3434

2541+
2898«
3501

1280
1306
1334
1883
4273

1282
1308
1336
1891
4323

1284
1311
1338
3432
4345

1286
1314
1340
3500
4607

1288
1316
1342
3532
4746

1290
1318
1344
3596
4763

1292
1320
1346
3678
4849

1238#

1266

1267

1268

1269

1270

1271

1272

1273

1275

1277

1279

1283
1309
1333
1375

1285
1310
1335
1376

1287
1312
1337
1377

1289
1313
1339
1378

1291
1315
1341
1379

1293
1317
1343
1380

1295
1319
1345
1381

1297
1321
1347
1382

1299
1323
1349
1383

1301
1325
1370
1384

1303
1327
1372
1385

1305
1329
1373
1386

{

CZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11
C(ZOMID.P11
29-JuL~-81 11:32
1387

2197
2222
2319

1388

2198
2223
2320

K 15
30A(7052)
29-JUL-81
12:42 PAGE 194
CROSS REFERENCE TABLE =~ USER SYMBOLS
1389

2199
2227
2321

1390

2200
2228
2322

1407

2201
2229
2323

1439

22C2
2230
2324

1884

2207
2237
2325

SEQ 0192

L 15
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JUL-81
12:42 PAGE 195
CZDMID.P11
29-JuL-81 11:32
CROSS REFERENCE TABLE == USER SYMBOLS

5975
6021
6128

5982
60¢5
6129

5983
6033
6140

5993
6034
6141

5994
6047
6150

6002
6048
6151

6003
6053
6157

SEQ 0193
6016
6117
6168
6234
6302
6366
6436
6483
6509
6588
6659
6708

6786
6868
6922

6985

7069
7128
7183
7245

7301

7371
7432

7464
7502

7563
7643
7681
7736

8289
svsus= 000001
SVCTAG= 000001

12314
6109
12314

12404
6178
124284

4922
6282
1424

4967
6390
1446

5098
6530
3495

5298
6599
3528

5358
6679
3591

6024

3774
5150
6761

8139

SVCTST= 000001

12314

SW00
Sw01
Sw02
SwW03
Swo4

15484
15474
15464
15454
15444

SW05
Swo6
Sw07
Sw08

=
=
=
=
=

=
=
=
=

000007
000002
000004
000010
000020

000040
000100
000200
000400

7017

15434
15424
15414
15404

12394
7334

4804

7550

4920

7946

5229

8052

5296

8109

5544

8166

6914

CZDMIDO DMR-11_FUNCTIONAL TESTS MACY11
CZOMID.P1N
29-JuL-81 11:32
SW10 =
SW11
=
swi2
=
Swi3
=
Swi4
=
SwiS5
=
S$LSYM=

T
=
TBUF
TCOUNT=
TEMP
TEMP1
TFLAG
THRESH=
THIL
=
TH2L
=
TH3L
=
TH4L
=
TIMER =
TOLONG=
TOUT
=
TSEL4
TSEL6
T$ARGC=

002000
004000
010000
020000
040000
100000
010000

037712

000045
002522
000044
002340
002336
002520
000013
000060
000062
000064
000066
000012
000020
000002
035400
03540¢
000002

T$CODE= 000032
TSERRN= 020023

TSEXCP= 000000
T$FLAG= 000040

30A(1052)

M 15
12:42
PAGE 196
TABLE == USER SYMBOLS

29-JuL-81

CROSS REFERENCE

72544

5462
6846
6847

6958
6959

7221
7400

7399
7448

7489

7521

7693«

7741

7750%

7840+

5458

5783

37454
50954
59714
66764
80024

57124
64894
7318#

35294
47524
56334

7438

37024

36734
L8454
57154
64924
73224

34964
L7404
54824
62444
71794

2234

SEQ 0194

63874

6804

3592#

L7774

L8724

57924
65094
75344

37594
51474
60214
67584
8083#

37754

51514
60624

67624
81404

42344
52724

82024

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
29-JuL-81 11:32

CZDMID.P1
TSGMAN=
TSHILI=
TSLAST=
T$LOLI=
T$LSYM=

000000
000005
000001
000001
010000

TSLTNO= 000023
TSNEST= 177777

TENSO
TENST

000000
000005

12314
82764
12314
82764
12314

4306
5355
6175
6999
8258

84404
12314

8284

82864

8290

8398#

8402

82814
1447
4601
5420
6226

8283
3496
4740
5482
6244

82864
3529
4752
5633
6387

8289
3592
4777
5712
6489

83984
3673
4845
5715
€492

8401
3702
4872
5792
6509

14468

34324

7128

8407

7179

7322

7534

5151
6062
6762
8140

34954

35004

35284

35324

35914

432384
4B71R
5354k
57914
61744
65084
70184
75334
B272r

4331
49214
53594
58614
61794
6529
70204
75514
82934

L3458
49234
S415A
58634
62214
65314
70744
79034
83944

46008
L9624
S4194
59274
62254
65954
70798
79474
B4LOSHA

LOO7H
4968BA
54234
59324
62324
6600
71274
80014
B43ia

L7398
50944
S481a
59704
62434
66754
71324
80534

16394
3729
43234

1446
3734k
4331

34328
3744
43454

3495
37484
4600

35004
3758
46078

3528
37624
4739

35324
3774
47468

6761
8053#

67804
8082

6903
81104

69154
8139

6998
8167#

70184
8201

7321
82284

73354
8257

7533
82724

5711
6283#

58634
6386

T$PTNU- 000000
T$SAVL- 177777
T$SEGL~ 177777

7127
12314
12314
12314

12314
58604

65994
80524
12314
12314
40184

52304
60254
67804
81674
13724
13854

37014
4B44N
53184
5567
5657
5882

484K
5791

4962

4LB71
58614
49684

49214
6067
5094

37294

5150
61074
50994

3734k

52304
6225
5146

3744

5271
62328

52994

3775

5147
6021
6758
8083

L3054
LBLOE
52994
57184
61104
64964
69984
73354
82574

37054

3759

5095
5971
6676
8002

42734
LB44A
S2974
57144
61074
64914
69154
73214
B2284

37014

14394

7318

3745

42334
LBOSH
52714
57114
60674
64BBA
69034
73174
82014
8434
1424
37054
4305

36784

14244

7254

3730

4963
5928
6596
7904

40184
L7764
52304
S637#
60614
63914
67804
72584
B1674
12344
16078
3701
42734

49234

T$TEMP- 000000

82814

14074

TENS2 - 000002

T$TAGL= 177777
T$TAGN= 010104

4332
5416
6222
7075
8295

SEQ 0195

1234k

36724

4844
57184

T$SUBN= 000000

8279
84374
8278
1425

N 15
30A(1052)
29-JUL-81
12:42 PAGE 197
CROSS REFERENCE TASBLE == USER SYMBOLS

3748

5297#
6243
5354

37588

5419
62814
53594

37624

5272
6068
6904

8202

35964

L7468
50994
55454
59754
62814
66804
71784
80824

39984

47518
51464
55474
60204
62834
67574
7.334
81104

40054

3591
39984
4751

35964
4005
47638

3672
40184
4776

36784
4233
4805#

75514
8293

7903
83944

79474
B4OS

8001

54234
6491
5415

37744

4234

5481
64964
55474

55454
6508
5632

47634
51504
56324
60254
63864
67614
72534
8139

5714
65294
S637#

5927
63914

59324
6488

5970
65314

5975#
6595

6020
66004

60254
6675

6061
66804

61104
6757

6174
70204

61794
7074

6221
70754

4B04H
58624

49208
59314

49224
59748

49674
60244

50984
61064

52294
61094

52964
61788

S29BN
62B0#

S358F
62824

5544
63904

SS546M
65284

56364
65304

14074
L2738
S2974
61074
69154

14394
L3234
S29GK
61104
70184

34324
L3454
S3594
61794
70204

35004
LOQ7H
54234
62324
70794

35324
4746
SS545K
62814
71324

35064
L7638
55474
62834
71834

36784
LBOSA
S6374
63914
72584

37054
4BAOR
S7184
64964
73354

37344
49214
58614
65294
75514

37484
49238
58634
65314
79474

37628
49684
59328
66004
B0S34

39984
50994

59754
66804
B110#

13734

13744

13754

13764

13774

13784

13794

13804

13814

13824

13834

13848

37584
50948
53664
55844
5684%
59164

37744
5146
5367
5585
5685
5917

40054
51504
53794
56134
56914
5927#

42334
5236
5380
5614
5692
59488

43054
5237
56154
56204
57114
5949

43314
52554
54194
5621
57144
55704

L6004
5256
5481
56324
57914
5982¢#

47394
52714
55544
56444
58704
5983

L7518
53064
5555
5645
587
59938

L7768
5307
55664
56564
58814
5994

7132#

66798
B1094

B228F

13864

37294
4LB71
5319
55774
56674
5890#

7178

6779
81664

8272
13874

3744
4962
53544
5578
5668
5891

71834

6914k
82274

B394A
13884

7253

70174

13894

7258%

70194

13904

7317

7078%

13914

71314

1424

71824

14464

72578

34954

73348

35284

75508

35914

79464

36724

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZDMID.P11
29-JuUL-81 11:32
60024
61174
61994
63454
64514
6608
6719
6859#
7053
7213
7353

6003
6118

30A(1052)

CROSS REFERENCE

60094
61284

62214
63774
6488#
6619
67614

T$TSTM= 177777

81394
8434k
12314
58604
6599
8052#

2863
3438

3549
3691
4022
4280
4718
4950
5236
5379
5566
5691
5870
5993
6128
6244
6409
6549
6687
6859

010015
010N16
010022
010102
010000
010014
TEEMSG= 010056

8243

4922
5974

4967
6024

5098
61064

5590
5715
5902
6014
6157
6301
6451
6587
6718
6891
7075

8083
12314

42734
43234
L7634

70174
B440
2227
3095
3468
3587
3718
4053
4306
4811
S060
5272

SEQ 0196

60534

60474
6151
63014

6141
62904
63984
65384

66754

68104
69324
71564

69414

7202
73214
75334
77274
81244
83984

71784
7277
73924
77104
80C1#
82764

7266
73804
76904
79844

7019

52964
6178
7131

5358
6282
7257

2329
3297
3496
3620
3741

2433

35004

3528

35324

75504

6142
4651
4855

4091
4613
4841

5120
5348
5477
5644
5776
5959
6062
6206
6377
6505
6657
6810
6973
7132
7258

6310

52304
80534

5546
6528#

3328
3517
3652
3755

5613
5725
5916
6021
6167

7818
8140

60614
61904
63274
64354
65954
6708
68514
69984

64054
65494
6688
68214

5420

7201
7322
7482
7681
7863
8182

49214
79474

73354

7372
7682
7978

6456
6596
6740
6904
7079
7212
7352
7500
7690
7876
8202
52974
81104

7179

T$SAUT=
T$SCLE=
T$$0U =
T$SHAR=
TSSHW =
TSSINI=

82424

56416

7300
7451
7651
7782

T$TSTS= 000001

82014

4048
4301
4777
5048
5265

7052

60334

60204
61404
62434
63864
65084
€628
6787
6922
71274
7265~

69144
82274
2222
3082
3461
3577
3710

12314

B 16

12:42
PAGE 198
TABLE == USER SYMBOLS

6010
6129
62254
6378
64914
66274
7864
69214
7106
72534
73714
76814
79774

7662
79034

TSTEST= 000023

29-JUL-81

7904

7404
7581
7744
7977

7611
7754
798¢

8002

58614
82284

61074

65294

67804

69154

35964

3672

3701

37054

3729

82724

14074
40184

34320

3495

3591

3678#

37344

c 16
12:42
PAGE 199
29-JuL-81
CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CROSS REFERENCE TABLE == USER SYMBOLS
CZOMID.P11
29-JuL-81 11:32

3744
39984

T$$PRO= 010013
T$$SOF= 010103

T$$SRV= 010024

37484
8406

T$8SUB= 010072

3758

37628

3774

46074
49684
5927

4739
5094
59324
6488
71834

63914
7178

T$SSW = 010001

49214
5554
5870

T$$TES= 010101

61074
6327
6607
6851

7190

2.3
T3

025030
025544

74.1
T4.2
TS
15.1
15.2
16
T6.1
16.2
T6.3
16.4
17
17.1
17.2
18

024406

025676

025676
026024
026724
026724
027106
030136
030136
030272
030362
030456
030716
030716
031062
031340

(212

T2.2

[alalaln)

023720
032554
033000
033160
033160
033310
033426
033544
033722
034064
034614
036360
036462
036550
036620
036670
024230
024230

OOONOOOO

T
T10
T11
712
T12.1
T12.2
T12.3
T12.4
T12.5
113
114
T1S
116
117
T18
119
T2
T2.1

7392
7963
82284

49224
49674
5098#

61064
62804

54234

SEQ 0197

5481

5791

6243

64964

6508

L7664
50994
5970
65314
7253

L84H
52994
6020
66004
7317

53594
6061
66804

55474
6174

5632
61754

56374
6221

5150
5566
5881
6117
6345
6618
6859
7201

52304
5577
5890
6128
6377
6627
6903
7212

5255
5613
5948
6150
6409
6698
6921

52974

5318
5667
6009

8242

8257

7404
7977

7533
7984

7265
7661

80534

5644
5993
6190

6435
6718
6941

7295
7681
8082

70204

6225

7074

70794

5379
5691
6047

6538
6810

7052
7366
7727
81674

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
CZDMID.P11

29-JUL-81

11:32

18.1
18.2
19

031340
031562
032042 G

62824
63904
1380

19.2
19.3

032206
032366

65954
66794

19.1

032042

UAM
=
UPDATE=
WAIT]
WAIT2
WAIT3
WAIT4
WMAINT
WMODEM=

000200 G
000011
002312
002314
002316
002320
002306
000005

65304

15194
16174
17468
176488
17504
17514
173266
16138

16428
18624

$BACC

2778%
7283
2479%4
6542
3073#

6333
7385
5311
6564
7956

1697#

XSALWA=
X$FALS=
X$OF
F S=
X$TRUE=

000000
000040
000400
000020

$BASEl

011266

$BUFFS
$CCITT
$CLRQI

013206
002420
010706

011522

18174
22964
o578

SOMRIN

012062

269

$ERROR
SHALT

012404
012562

SINOUT
SLOOP
$LSTIN=
$LSTTA=
$MSCLR

014140
013064
007 0,
00,001
011070

$ROMO
SWAIT

012744
010276

SCNTIN

012272

= 040100

12314
12314
12314
12314

PAGE 290

SEQ 0198

65284

X
= 000046
XMTBUF
003240

002252

12:42

CROSS REFERENCE TABLE -- USER SYMBOLS

3394
2180
2306
3299
3299x
3014
2720
4080+
5344
3141+«

WIYPE

29-JuL-81

D 16

4172+
4230%
4367

4544
4535

7947
4546

6136

6184

6837

5405
3171+

5469
3176«

5473
3179

3203

3234

3235

3292

3294

3338

6439
7397
5372
6611
8061

6635
7706
5559
6691
8117

6643
7714
5598
6790
8175

6711

6726

6844

6945

6956

7144

7205

_
7219

S649
6925
8235

5874
7029

5935
7040

5986
7194

6043
7269

6121
7362

629
7672

6402
7970

2737
6057

2801
6305

2912
6413

4510
eb22

5909
6702

6164
6B25

6213
6936

7095

7376

5677

6135

6183

6320

6428

6803

6814

5688

5913

5966

6006

6217

6382

6473

5640
7083

5866
7136

5978
7186

6029
7261

6113
7348

6286
7657

639%
7959

5943

7616
2601
5997

3031

3393

5570

5606

5660

28314
28974
6553
3279%
3011#
12364
12374
2383#

7531
%07
6898
7952
6050

7899
5322
6992
8072
7370

8136
5383
7527
8128
7680

B81%
5581
7896
8186

8254
5617
7981
8246

8064
29654
21674
9;3?

5232
6603

8120
4939
2487
92?6

5251
6683

8178
4991
2528
9;5;

5302
6782

5362
6917

5550
7024

5105
2608

2711

6651

6734

6855

6964

2918

3400

7048

7101

5896

5953

6146

12244
2948%
55274
5871
6129
6399
6699

18424
3320
5555
5882
6141
6410
6708

18504
3322
5567
5891
6151
6419
6719

18624
47844
5585
5949
6191
6452
6811

18644
4BB7A
5614
5983
6200
65134
6822

18694
51944
5621
5994
62514
6539
6831

2200
5237
5645
6003
62N
6550
6852

2202
5256
5657
6010
6302
6557
6860

2323
5307
5668
6034
6311
6608
6922

2325
5319
5685
6048
6328
6619
6933

2427
5367
5692
6054
6346
6628
6942

2429
5380
58374
6118
6378
6688
6969

6534

7053
7381
8069

3122
2504
SBES

4169+
2410
4174+
3325+
4227
3031

7106
7393
8125

3205
2537

7157
7405
8183

8238
4995
2585
6447

18574
39894
5578
5917
6168
6436
6787
7191
7662
8243

6572

7202
7677
B4a24n

7213
7682
B42BH

2786

7232
7691

2905

7266
7711

7277
777

7296
7728

7353
7964

7152

7367
7978

7227

7372
7985

CZDMIDO DMR-11_FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81 11:32

CZDMID.P11

BGNPRO
BGNPTA
BGNRPT
BGNSEG
BGNSET
BGNSFT
BGNSRV
BGNSUB

BGNSW
BGNTST
BNCOMP
BNERRO
BREAK
BRESET
CALL
CKLOOP

CLEAR

cLoCK
CLOSE
CLRVEC

CNTRIN

7281

7383
7217
5933

6724
5596

6842
5647
7192

6954
5872
7267

7968

2531

2908

2914

2921

7413

3499

3531

3595

3677

4606
4966
6598

4745

5097
6678

4848
5297
7018

4919

5228
8165

2588
2313

19324
7713

19764
6681
1L
»

1L
1#
14
14
14
1L
1L
1%

6281

14
14
7549
4
14
1L
1%

1L4

20194

COMMEN
DELAY
DESCR!
DEVTYP
DISPAT
DISPLA
DMRIN
DOCLN
DODU
DORPT
ENDAL

1
1L
14
1
»
104
20394
1#
»
1
1

tNDCLN
ENDCOM
ENDDU
ENDHRD

1
1»
14
1#

F*iLAUT

7203

6943
6641
5557

6923

4044

2506

7142

SEQ 0199

7395
5984

6119

6292

6400

6540

6562

6609

3704

3733

3747

3761

5422

5717

6231

6495

5357
7077

5545
7130

7181

5635

5861
7256

5930

5973

6023

6108

6177

5295
8226

5543

5859

6105

6279

6527

6778

6913

7016

7333

2611

2715
3304

2789

4938
7991

4990

4994
8071

5104
8116

6042
8127

6049
8135

7361
8174

8185

7369

7530
8193

8234

8245

8253

5300
7022

5360

5548
7134

5638
7184

5864
7259

5976
7346

6027
7655

6111
7957

6284
8062

6392
8118

6532
8176

6601
8236

4037
5995

4292
6055

4839

6411

7562

7636
6620

6700

6823

6934

7093

7374

7684

2317

2421

3314

5604
4835
4832

5658

5675

6181

6318

6426

6801

6812

6834

7027
4049

7038
4054

4
1L
»
14
»
»

6709
6437
5370

—

8COMPL
BERROR
BGNAU
BGNAUT
BGNCLN
BGNDU
BGNHRD
BGNHW
BGNINI
BGNMOD
BGNMSG

20864
21124
19914
6689
1#
1#
1%
1%
1L

PO
PN NN
NN PO
NN NN NN NN N NN NN

BACCIR
BACCIT
BASEIN

E 16

12:42
PAGE 202
CROSS REFERENCE TABLE -~ MACRO NAMES

29-JUL-81

14
1L
14
14

8108

4078

24617
8060
7081

6303

7874

7671

7679

7705

—

F 16

SEQ 0200

(ZDMIDO DMR=-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42 PAGE 203
CROSS REFERENCE TABLE =~ MACRO NAMES
| CZOMID.P11
29-JyuL-81 11:32

ENDSUB

ENDSW
ENDTST

EQUALS
ERRDF

ERRHRD

ERROR
ERRSF
ERRSOF
ERRTBL
ESCAPE

X
R
%

—d

4870

6173

6220

6224

6490

6902

6997

7320

7532

2925

2934
5119
6354
6982

3353
5328
6455

3372
5347
6464

4373
5389
6480
7118
7506

4612
5408

5583
6001
6326
6697

6008
6344
6706

5619

5643
6046
6397
6785

7316

5270
8200

5418
8256

5713

6066

2328

2432

2623

2632

6739

5920
6748

6866

6013
6881

5254
5690
6139
6450
6850

5305
5869
6149
6537
6858

5317
5880
6166
6548
6920

5365
5889
6189
6555
6931

5553
5947
6289

8123

8241

d
b
b —d
b
d
b —md ok
d

14
14
14

MANUAL
MEMORY
MSBYTE

34
314

6060

7252

7294
7976

5145
6756

4707
7308
7771

7351

7073

4717
5958
76417
7781

7983

7365
8067

1272

1273

K111

6019

7177

3773

7962

14
14

5926

5631

7299
7762

7230
7717

6507

5414
7126

5901

5655

624¢

5353

2226

14
14
14
1#
14

INLOOP

LASTAD

4750

5790

3757

3728

4698

7169
7732
i

14
14
14
14
14
14
14
14
14
14

10SETU
I0STAR

4738

5480

3743

3700

14
14
4627
5589
6586

GETBYT
GETPR]
GE TWOR
GMANIA
GMANID
GMANIL
GPHARD
GPRMA
GPRMD
GPRML

HEADER

3671

5149
8138

7902

[ASTASTAS AN TANTAC T AN TN 1 N1 N1 N1, N 1 V1, ¥
NN NN NN NN NN

EXIT

3590

5093
6674

6052
6408
6809

FEQUAL

3527

14
1#
14
14
14
14
6385
1#
14

4004

ENDRPT
ENCSEG
ENDSET
ENDSF T
ENDSRV

14
14

14623
4232
8433
3494

ENDPRO
ENDPTA

ENDMSG

ENDMOD

1231»
3a
PO
NN
~ oo
0o NN NN NN NININWN

14
14

fo ST JH P

ENDHW
ENDINI

31#

4074

8275
8285

8280
8397

1264

8435
3163

12654

1271

4854

7431
7790

7370

5047
6156
6890
7441
7817

5710

5071
6205
6972
7450
7881

6617
6967
7391

7065
7481

7462

5565
5981
6300
6626
7051
7403

5576
5992
6309
6686
7104
7660

7155
7675

7109
7499

5612

7189
7680

6032
6376
6717
7200
7689

6577
7160
7641

7211
7709

G 16

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuUL-81
12:42 PAGE 204
CZDMID.P1
29-JuL-81 11:32
CROSS REFERENCE TABLE == MACRO NAMES
MSCHEC
MSCNTO

MECOUN

w1231
1#
12314

W
35364
37134

1231
3544k
37214

;gz;l
M$DATA
MSDECR

MSDEF A
MSENDE

14
1298
1330
W
43054
54194
63864

73214
14
14
43314
S4814

€4884
MSERR]

M$ESCA

75334
14
46134
54004
65784
71614
76428

1#
5555

MSEXCP

MSEXIT
M$E XSE

MSEXTJ
M$GEN

22194
35564
37364

54384

82814

22374
35664
37504
54504

82864

2614
3574
37664

54614

83984

3434A
35844
LOBOH

3441m
36004
41144

34498
36134
42204

36294
47682

3464K
36454
4BG2H

34794
36614
49314

34874
36804
49438

1286
1318
1348
37294
S094m
60614

1288
1320
18834
3744k
51464
60674

1290
1322
18914
37584
51504
6174k

S472k

S720A

5728k

3L57K

5738

12314
1300
1332
12318
43314
54814

12654
1302
1334
1424k
4600
56324

1274
13044
1336
14468
47394
S7114

1276
1306
1338
34954
4751H
S7148

1278
1308
1340
35284
4776M
57914

1280
1311
1342
35914
LBLA4A
59274

1282
1314
1344
36724
LB714
59704

1284
1316
1346
37014
49624
60204

75334
12314
12314
L6004
56324

79034
82764
1426k
47304
S7114

80014
82814
14464
L7S5TH
57148

80824
B286#4
34954
4776k
57914

81394
83984
35284
4BLLA
59274

B2014

82574

82934

64BBH

64914

65084

6508

65954

G67SH

79034
12314
L6282
55904
65874
71704

BOOl#
22074
4651
56264
66574
72368

80824
22278
L66LK
57054
66664
72454

81394
23294
L4699
59024
67404
73004

12312
55664

52364
5567

5237
55774

52554
5578

77338

77448

7754

77634

66754

67574
82014
24334
4708
59214
67494
73094
77724

5256
5584#

67574

67614

57498

1296
1328

3774k
S2714
622184

L0054
53544
62254

42334
54154
62434

43054
54164
63864

29354
51204
63554

33284
52654
63644

33544
53294
64564

3373
53484
64654

L3744
53904
64814

53664
5621

5367
56444

53794
5645

5380
S6564

55544
5657

B434M
29264
50724
62064
69734
74518

5318#
5614

5319
56204

5307
56134

1294
1326

37744
53544
62254

84054
28634
50484
61574
6BIIM
74424

77914

1292
1324

3758
S2714
62218

B293#4
26338
4LBSSH
60144
68824
74324

53064
5585

64984

3744
S1504
61744

82574
26244
47184
59594
68674
74184
77824

62344

84344

37294
51464
60674

69034

57824

84054

37014
50944
60614

6998

78184

7074m

78824

7127

69834
74638

71278

35204
37074
51264

69984

36728
496K
60204

70744

S7714

35124
3694
50784

69034

35914
L8714
59704

67614

57604

3504

36864
50544

71788

70574
74738

7178%

72538

70664
74824

72534

73178

71104
75004

73174

73214

71194
75074

56674
5949
61174
6291
64184
6619
68214
696G

5668
5682#
6118
63014
6419
6627#4
6822
70524

5684#
5983
61284
6302
64354
6628
68304
7053

5685
59934
6129
63104
€436
66874
6831
71054

56914
5994
61404
631
64514
6688
68514
7106

5692
6002#
6141
63274
6452
66984
6852
71564

58704
6003
61504
6328
65384
6699
68594
7157

5871
6009%
6151
63454
6539
67074
6860
71904

58814
6010
61674
6346
65494
6708
69214
7191

5882
60334
6168
6377#
6550
67184
6922
72014

58904
6034
61904
6378
65564
6719
69324
7202

5891
60474
619N
63984
6557
67864
6933
72124

59164
6048
61994
6399
6607#
6787
69414
7213

5917
6053#
6200
6409%
6608
68104
6942
72314

59484
6054
62904
6410
66184
6811
69684
7232

1
565
6053#
6409
68104

12314
56674

52364
56844

52554
S6914

53064
S8704

53184
58814

S3664
58904

S3794
S9164

5554
59484

SS5664
59824
63014
66274
70524

55774
59934

SS58LA
60024
63274
6698
71564

S56134
60094
63454
67074
71904

S6204
60334
63774
6718
72014

S64LH
6047#
63984
67864
72124

12904
13224

12924
13244

12944
13264

12964
13284

72654
7393
77278

MS$ESCS

;gg;#

B2764

SEQ 0201

72314
77184
14

14
0

1L
14
12984
13304
14614

7266
74044
7728

72768
7405
79634

7277
76614
7964

72954
7662
79774

7296
6764
7978

7352#
7677
79844

7353
76814
7985

73664
7682
80684

61174
64184
68214
72654
77278
12314

61284
64354
68304
72764
79634
82764

61404
64514
68514
72954
79778
82814

61504
6538
68594
73524
79844
82864

61674
65494
69214
73664
B06BA
83984

61904
65564
€934
73718
B124#

61994
66074
69414
73804
B1824

62904
66182
69684
73924
B2424

12314
12314
13004

12654
13024

12744
13044

12764
13064

12784
13084

12804
13114

12824
13146k

12844
13164

12314
12314

13324
14464

1334
1883¢

13364
18914

13384
34324

13404
34954

13424
35004

134464
35284

13464
35324

7367
76904
8069

73714
7691
81244

74044

63104
66874
71054
76614

12864
13184

1288
13204

13484
35914

13714
35064

7372
77104
8125

76764

1408Bx
36724

73804
7711
8182¢#

76814

14094
3678%

7381
77184
8183

76904

14248
37014

73924
7719
82424

77104

14404
37054

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
. ZDMID.P11
29-JuL-81 11:32

3720
46004
S094#
SS46H
A06124
64914

37344
46074
S098&
56324
60674
6L96K

14
14

12314
12314
43314

70174
gzgg:

MSGENB
MSGETS

43054
54194

63864
MSGETT

73214
1
56564

MSGNIN

S54814
648BF
75334
12314
S667%

70744
80014
14248

42734
4LB71A
54154
59314
62804
67614

43054
4920
S4194
S9704
62824
6779

43234
4922
54234
59744
63864
6903

43314
49624
54814
60204
63904
69144

37014

37294

3744

37588

37744

400SH

72534
82014

72574
82274

73174
82574

73214
82/34

7334k
8294h

75334
83954

50944
60614

51468
60674

S150#
6174K

52714
62214

79034
52364
56844

80014
52554
S6914

80824
53064
58704

81394
53184
58814

B2014
53664
58904

82574
S3794
S9164

82934
5554k
59484

B4OSK
S55664
59824

B434w
S5577h
59934

7178

53544
62254
72534

5584
60024

S6134
60094

56204
60334

67074
721904
76818

67184
72014
76904

64914

65084

61674

7977
12654

79844
12744

BOGBA
12764

13004

13024

14
1278%
1293

12318
1279
12944

12654
12804
1295

66758

61504

6451
68514
72954

13324
1440
L2734

65954

61404

64354
68304
72764

13304
14394
40184

1309
13244
1339
13754
13904
2200
22304
23294
24358
262784
29274
31614
33284
34354
34524
3469
34964
35214
3544
35740
3604#
36334
3662
36874
3709

36724

42334
LBLO#
53584
59274
62434
67578

49624
60204

1328¢
1409
39984

13084
1323
13384
137644
13894
2199
22294
2325
634K
26268
29264
30954
3322
34348
34514
34684
3493
35204
35454
3570
3603
3632
36614
36864
37084

35914

71828
B1664

40184
LBLLA
53544
58624
62324
66794

LB71H
59704

79634
12344

8395

35284

71784
81394

39984
4BOLA
5298
SB60#
62254
6675

4BL4A
S927H

77274
12314

83944

34954

71314
81094

3774M
4776
52964
S7914
62214
€599F

L7764
S7OIM

77188
14

12984

14468

7127#
80824

37624
L7638
S2714
57184
61788
65954

4751
57148

61284

12964

70784
80524

37588
L7518
S2294
5714k
61744
65304

4739
S71
1A

61174

6418%
68214
72654

37488
L7468
S1504
S7114
61094
65284

SEQ 0202

L600M
56324

60534

64094
€810#
72314
M$GNGB

70194
79464

3744
47304
S5146#
56364
61064
65084

H 16
30A(1052)
29-JUL=-81
12:42
PAGE 205
CROSS REFERENCE TABLE == MACRO NAMES

65384
68594
73528
13044

6757

6761k

61904

61994

B124A
12784

B1824
12804

55494
69214
73664

65564
69324
7371k

13064

13084

66074
69414
73804
13114

69034

62904

66184
69684
73924
B242oH
12824

13144

69988

7074k

71278

63014

63104

63274

63454

12844

12864

12882

12904

1292«

6627H
70524
74048
13164

G6B7A
71054
76618
13184

66988
71564
76764
13204

13224

63774

1324w

1334#
1441
43238

13364
18834
L3458

13384
18914
LOO7H

13404
34324
4746

13424
35004
L7634

13444
35324
LBAOH

13464
35964
54234

13484
36784
5718

13704
37054
62324

1371
3734k
6496H

14074
37484
B272#

1266
1281
12964

1267
12824
1297

1268
1283
12984

1269
12844
1299

1270
1285
13004

127214
12864
1307

1272#
1287
13024

12734
1288#
1303

12748
1289
13044

1275
12904
1305

12764
1291
13064
1321
13364
13724
13874
2197
22274
2323

84364

8439

1310
1325
13404
13764
14074
2201
2237
23304
24364
26334
29284
3162¢
33294
34364
3453
34794
35044
3522#
35474
35754
3605
36344
36634
3688#
37104

13114
13264
1341
13774
14394
2202
22384
2331
24914
26344
29294
31644
33304
3437
34548
34804
35054
3523%
3548
3576
36134
3635
3664
36894
3711

1312
1327
13424
13784
18834
22074
2239
23324
25074
26354
29354
31654
33314
34384
3455
34814
35064
3524
35494
35774
3614
36364
36654
3690
372134

13134
13284
1343
13794
1884
22084
22404
2418
2532k
26364
29364
32964
33544
3439
34578
34824
3507
35254
3550
3578
36154
3637
36664
36914
37144

13144
1329
13444
13804
1885
22094
2241
24224
25894
27164
29374
32974
33554
34414
34584
3483
35084
3526
35564
35844
3616
36454
3667
3692
37154

1315
13304
1345
13814
18914
22104
23144
2423
26128
27904
29384
33054
33564
34428
34594
34840
3509
35294
35574
35854
36174
3646
36682
36944
37164

13164
1331
13464
13824
1892
22 94
23184
2424
2614A
28634
30784
33154
33574
34438
3460
3485
35124
35364
3558
3586
36184
36474
3669
36954
3717

1317
13324
1347
13834
1896
22204
2319

2425
2615
2864
30794
3316
33734
34444

34614
34874
35134
35374
35594
3587#
3619
3648
36734
36964
37184

13184
1333
13484
13844
21904
2221
2320
2426
2616
2B65SH
30804
3317
3374
3445
3462
34884
35144
35384
3560
3588
36204
36494
36804
3697
3719

1319
13344
1349
13854
21954
22228
2321
2427
26178
28664
30814
3318
33754
36468
364648
34894
35154
3539
35664
3592#
3621
36504
36814
36984
37218

13204
1335
13704
13864
2196
2223
2322
2428
2618
29094
30824
3319
33764
3447
34654
34904
3516
35404
35674
36004
36294
3651
3682
3699
37224

2429
26244
29154
3083
3320
34114
34494
3L66M
3491
35174
3541
3568
36014
3630
36524
36834
37024
3723

CZDMIDO DMR-11 FUNCTIONAL TESTS MACY11
CZOMID.P11
29-JuL-81 11:32
3725
3753«

40384
L0764

41194

L2214
43014
46304
47094
4771
4845
4931#
49634

50734
5122#
S5241#
5318#
5380#
5431
S4554
5478
S613#
56684
5724
S7434
5766
57924
59224
59934
60484
6158#
6222#
63024
63774
64574
65004
65784
66284
67074
67874
68824
69684

70584
71194
71734
72454
73034
73924
764444
74834
7557#
76424
76824
77464
77834
78634

37264
3754

40394
L0774
4120
6222
43064
46314
47104
W7724
48554
49324
49684
50744
51234
S2424
53194
53904
54324
5456
54824
56144
56844
57254
5744
7R

58634
59234
59944
60534
61594
62264
63104
6378#
64584
6501
65794
66574
67084
68104
68834
69694
70594
71204
71794
72464

73094
73934
764454
74844
75584
76434
76904
77474
77844
7864

3727
37554

40424

40794
41384
42234
43324
46514
47114
4773
48564
4933n
50484
50754
S1264
5243
53294
53914
5433
54614
55474
56204
56854
5726
57494
5772
58704
59244
6002#
60544
61604
62344
63114
63874
64594
65024
65804
66584
67184
68114
68844
69734

70604
71214
71834
72474
73104
74044
74514
74854
7559
76444
76914
7754H

77854
78754

37304
3756

40434

40864
41394
4224

L374K

L6524
4718#

L7774

L8574
4934
50494
5078#4
51274
52444
53304
53924
5438%
5462
55544
56214
56914
57284

I 16
12:42
PAGE 206
29-JuUL-81
CROSS REFERENCE TABLE == MACRO NAMES

SEQ 0203

30A(1052)
37364
37594

40454
40874
41404
42344
43754
46534
47194
48074
48584
49354

50504
5079#
51284
5245
53314
53934
5439
54634
55554

56264
56924
5729
57514
S774#
58814
59324
60094

60684
6168#
62364
63284
63984
64664
6504
65874

6660#
67404
68224
68914
69754
70674
71284
7191#
72544
7312#
74144
74534
75014
75644
76474
77114
77564
77924
78824

37374
37668

37384
37674

58824
59484
60104

40484
40894
41424
L2774
L3774
LO6LH
47214
48094
4LBO3A
L9434
50544
50814
51304
52564
53484
54104
54414
5465
55674
56284
57064
S7314
5753
57764
5890#
59454
60144

61754
62378
63454
63994
64674
65054
65884
66664
67414
68304
68924
69764
70684
71324

61794
62384
63464
64094
64684
6506
65894
66674
67424
68314
68934
69834
70694
71564

404748
40884
L1418
42768
43768
46548
47204
4808#
4B62A
4936
S0514
50804

5129
52554
53324
54094
54404
54644
35664
56274
57054
57304
57524
5775

61104

72014
72584
73184
74184

74548
75024
75804
764848
7718%4
77578

77938
78834

61174

72024
7265#
73224
74194

74634
75034
75814

76494
77194
77634

77944
78844

37394
37084

40504
4090

4143
42784
4004
L6654
L7394
48104
48644
LOL4N
50554
5082#
51314
52654
53494
54114
5442
S4664
55774
56294
57074
5732
57544
5777
58914
59594

60154
61184

3740
37694

40524
40914
41454

L2794

4601
L6664
4740
48114
48654
49454
50564

5083
5132
52664
53504
54124
54434
5467
55784
56334
5708#4
57334
5755
57824
59024
59604
60164
61284
61914
62404
63564
64184
64824
65314
65964
66694
67494
68524
6904LH
6985#
70794
71614
72134
72764

73534
74214
74654
75084
76084
76514
7728#
77654
78194
78874

3742
37714

40554
41144
L1474
4281
4614M
L6994
4752
48334
48674
N
LOLT
50584

5085
5134
52684
53554
54204
54504
5473
55854
56444
57154
57384
5761
57844
59044
59624
60214
61404
62004
62444
63584
64354
6484n

65394

66074
66804
67514
68604
69224
69994
71064

71634
72324
72954
73674
74334
74734
75104
76104

76614
7734H
77724
78214
78894

37504
37754

«C58#
41164
L1454
42944
46164
47014
L7684
48364
48714
4949

50604
50994
S151#
52994
53664
5428
54524
S4754
55914
S6564
57214
57404
57634
5786
59164
59754
60334
61504
62074
62904
63654
64514
64924
65504
66184
66884
6758#
68684
69334
70524
1114
21704
72374
73004
73724
76354
74754
7554
7612
76764
77364
17744
78604
78914

37514
40214
40604
G117

37524

40224
40754
4118
42204
42994
4&708#
47704
48414
49234
4951
SQ72#

51214
52374
5307+
53794
S4304
5454
S4L778
55934
56674

5723
§742
57654
5788
59214
59834
60474
61574
62094
63014
63674
64564
6499
65574
66274
66994
67864
68704
69424
70574
71134
71724
72394
7302#
73814
74434
74824
75564
76384
76814
77454
77824
7862#
79044

(ZDMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052) 29-JuL-81 12:42 JPAgE 207
79634

MEGNLS
M$GNSU

MSGNTA

MSGNTE
MSHAPT
MSHNAP
M$INCR

29-JuUL-81

82024
8288

79644

11:32

79774

80694
8279
8401

52984

SS464
71314

71824

49224

5098+
66794
34954

»
701

142644
47394
57114
6508#
80014
4804m
8052#
12654
12654
12344

28634
3L4L6H
35594
36984
37754

70794
72124
73354
75074
77104
79044

MEMASK
MSMCHI
MSMCLO
MS$MSK1
M$POP

80684
8278
8400

82764
8375w

63774
6505#
6618#
67794
69324

M$10SE

79854

82724
83944

42344
L6644
48454
50724
52724
54094
55664
57054
58634
So82#4
61054
6226#

M$LDRO

79844

82434
8290
65304

81664

L7764
5791#

66754
81394
52294
81664
14394

2935#

34614
35774
37054
40184
42804
47084
48554
50954
52974
54204
55844
57154
58814
60024
61174
62404
63904
6528#
66574
67864
69684
71104
72364
73664
75504
77274
79474
81824

30944
75634

32964

14244
46004

34954
47514
57144
65954

56324
64914

SEQ 0204

CROSS REFERENCE TABLE == MA(CRO NAMES

76374

36724

3584

L84L4LN
59274
67574
82014
52964
82274

49624
60204
69034

21904
30824
34684
35874
37104

22224
31624
34924
35964
37264
40434

82934
5860#

CZOMID.PI

40224
42944
47184
L8674
50984
52984
564234

43014
L7634
49214,
51204
53064

75514
77334
79634
82024

54434
56204
57334
59164
60214
61504
62814
64094
65314
66794
68304
69994
1314
72574
73924
75644
77544
79844
82284

24114

55904
57184

58904
60094
61284
6244H

63914
65294
66664
6810#
69734

71194
72454

73714

78754

35914

LBL4H

59274
67574

56364
37014
50944

60614
69984
8294
61064

22274
31644
34964
36044
37304

4048#
43064
L7664
49224
51334

53184
54554

56264

57434
59214
60244
61574
62824
64184
65384
66804
68514
70174
71324
72584

80834
82814
8402

81254
8283
84 564

81404
8284
84374

81824
82864
8438#

8183
8287

58624

59744

60244

61054

61784

37294
51464
60674

3758#

52714
62214

42334
54154
62434
73174

43054

71784

37744
53544
62254
72534

67794

6914n

70174

73344

23294
33284
35174
36524
37454

24184
33544
35254
36684
37484
40914
43740

2433
33734

26174
34124
35324

72574

70744
84054
62804

22404
32974
35004
36204
3734m
40534
43234

4Q764

43454
4804H#
49504
52294

47724
4923

51474
53294
54664
56334
5754k
59284
60254
61674
62834
64354
65494
66874

53554
564824
56374
S7764
59324
60474
61784
63014
64564
65784
67074
68824
70204
71704
72954
74424

74044
75814
77634

48054
49634

52304
53584
55444

56444
57874
59484
60534

35294
36734
37554
L1194
46074
48114
49674
52364

53594
55454
56564
57924
59594

5{19#

73214

37594
L1420
46134
48344
49684

52444
53664
55464
S6674

70524
21794
73004
74514
76514
78184

69044
70574
7182#
73094
74634
76614
78634

8109#

5860#
59714
60684
61994
63454
64894
65994
67494
69144
70664
71834
73184
74734
76764
78764
81104

60624
61904

61794
63104
64654
65874
67184
68914

64814
65964

80834

63274

67404

8002#
82424

76424
77914
80684
83944

40384

40424

40574

40754

42934

4298#

36724
L8714
59704

37014
49624
60204

3758#
51504
61744

37740
52714
62214

40054

L2334
54154

67614

69034

37294
50944
60614
69984

37440
51464

60674
70744

71274

7178#

53544
62254
72534

62434
7317#

CZOMIDO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052) 29-JuL-81 12:42 KPlgE 208
29-JuL-81 11:32

CZDMID.P1
MSPRIN

M$PUSH

73214

35364
37134
52414
76474

7533
1231»
3544m
37214
54274
78874

12314
4273
5098#
56364
61094
6531

71314

MSPUT

8110
12314
35364
37134

4L943H

MSPUT

S771#

12314
3442

3481
3522
35844
3649
37074
3751
41384

4769
4945
5127
54614
5741

79034

CROSS REFERENCE

80824
26144
35744
37664
54614
16394
46074

5230
58604
6179
6674

7183
82274
26144

35664
37504
51264
64984
22374
34494
3488
3537
3601
3663
3714
37664

4141
4808
4948

8139«
3434H
35844

TABLE

82014
34614
36004

40864

L1144

34324

35004
47634
5297
58624
62804
67794
7258

S4724

L7464

57204

82724
34344
35844

40864

54274
76074
26144
3451
3490
35444
36134
3666
3716

SEQ 0205

== MACRO NAMES

82574
34494
36134

42204

57284

35324

48044

82934
34574

3512#
36944
50784
62344

36294
4768#
57384

35964
4805
5299
59314
62824
69144
7335

51264
64984

39984

49674
55464

6529

70784

8053

35124
3694#

34494
36134
41384
S450#4

48624

S7494

78594

3436
34794
35204
35744
3695
3739

3768

4116
4279
4943w

4146
4810

5082
5452
S738#
62344
7610

5055
5242
5475

6237

MSRAD|
M$RBRO
MSRNRO
MSSETS

3520#
3707#

7648
12314
12314
12314
12314

MESTAR
MeSVC

60214
4091
42984
47664
48624

49224

L 16
CZDOMIDO DMR~11 FUNCTIONAL TESTS MACY11 30A(1052)
29-JuL-81
12:42 PAGE 209
CZDMID.P1T
CROSS REFERENCE TABLE == MACRO NAMES
29-JuL-81 11:32
4950
5120

49624
51264
53064
5420
55544
56844
57604
5921
6014
61284
6226
63864
6492
6600
6749
6904

L9674
51464
5329
5432
SS774
5705
57714
5928
6021
61504

4968
5147

5348
54384
55844
57114
5776
59314

5048
51504
53544

SEQ 0200

5072

5443

7075
71824
7300
7451
7611
7754
79634

M$TLAB

50994
53554

METSTL

35924
37414

37714

L1420

49504

49634

50604

49354
52444

ID0O DMR=11 FUNCTIONAL TESTS MACY11 30A(1052)
10.P1

29-JuL-81

52554
56208
56268
57654

59714
61174
62838
G451
66008
67624
69734

MSWORD

21614
7300w
76734
76904
78914
1w
1382

PRINTF
PRINTS
PRINTX
READBU

READEF

RFLAGS

SETPRI
SETVEC

59824
61404
63014
6LOSH
6618
6B10
69994

12314
1383

46134
4667
4857
5266
54094
5708

4614
4699%
4858
5267
5410
5902#

7904k

6016
6365

23294
2636
3330

6578%
6669
6884

6017
6366
6579
67404
6885

7248
7434

73004
7435

7058
71614

74738
7510
7756
7792
8437
1w
w
W

7474
76428
7757
7793
8438
1234
12314
12314

3535
3712
5437

3543
3720
5449

52724
SLL3M
S6374
S7874

71794
73184
75004
77188
79634
13044
1384

6015
63644
6484
6668
6883
7247
7433

PRINTB

71704
73094
7482¢
77104

2230
2635
3329

70574
7122

OPEN
POINTE

S9754
6128%
62904
64L56H
60074
67864
69834

2229
<634
33284

377
4666
4856
5265#
5393
5767

M$XFER

52654
54324
SO334
S7764

11:32

7059
7162

7475
7643
77634
7794

1249

12314

2218

1
12318
14
12314
W
12314
w1231

4767

3555
3735
5460

29-JUL-81

52994
S45SH
S644Lx
S7924

59934
61504
63104
GLBIN
6627H
68214
70204
71834
73224
75074
77278
7977k
1313
1385

2330
28634
3351

4615
4700
50484
5268
5611
5903

61574
6367
6580
6741
68914
7060
7163

7301
764428

7476
7644
7764
78184

S3064
SGO6N
S6S564
58634

60024
61574
63274
64LBOX
S657K
68304
70524

71904
7352K
75344
7733m
79844
13704
1386

2331
2864
33544

53184
5477k
S6674
S8704

60094
61674
63458
64928
66664
68514
70574

72014
73664
75584
7744k
80024
1372
1387

6158
64564
6581
6742
6892

2332
2865
3355
L6284
4702
5050
5330
55904
5905
6159
6457
65874
6743
6893

7302
7443

7303
7444

4616
4701
5049
53294
5612
5904

70664
7164
764824
7645
7765
7819

7067
71704

7483
77334
7766
7820

2236

2613

3573
3765
5719

3583
4085
5727

3565
3749
5471

3433

PAGE 210

SEQ 0207

53294
54828
S5684x
58814

60144
€1754
63554
6505
66764
68594
70664

72124
73714
75644
7754

S3484
SSLTA
S6914
58904

60214
61794
63644
65094
6680
6BO67A4
70754

1373
1388

7231
73804
7SBIA
T763K
80834
1374
1389

4629
47084
5051
5331
559
59214

4630
4709
5072#
5332
5592
5922

80684

24334
2866
3356

6160
6458
6588
6749
6894
7068
7171

73094
7445

7484
7734
77728
7821

3440

2434
29264
3357

62064
6459
6589
6750
69734
7069
7172

7310
74518

7485
7735
7773
78824

3448

S3554
S5554M
57054
59024

60254
61904
6377
65314
66B7A
68824
7079

7236M
73924
7611
77728
81244
1375
1390

2435
2927
33734

4631
4710
5073
33484
5593
5923

6207
64654
6590
6751
6974

71104
7173

7311
7452

75004
7736
7774
7883

3456

S359M
55664
S7124
59164
60334
6199
63874
6538F
6698F
68914
71054

72454
74044
76384
77824
B14OM
1376
22074

2436
2928
3374

LOS5TH
4711
5074
5349
56264
5924

6208
6466

4041

404¢

4051

4056

1w
1

12314
12314

3093
3077

3295
4137

3410
4144

4020
4275

53664
S577a
S7154
59214

60478
62064
63914
65494
6707
6904k
71104
7254
TL1BA
76424
77914
81824
1377
2208

26244
2929
3375

4652
47184
5075
5350
5627
59594

53794
55844
5725
59284

60534
62224
63984
65564
6718
69214
71194
7258
7432
76514
7B184
B2024
137
2209

2625
29354
3376

4653
4719
51204
5351
5628
5960

60624
62268
6409
6578
67404
69324
7128%

7265
74420
7661K
78634
82424
1379
2210

2626
2936
43748

4654
4720
5121
53904
5629
5961

60684
5240
64184
65874
6749
69414
71324
72764
7451
76764
78764
82584
1380
22278

2627
2937
4375

LE6LN
4721
5122
5391
57054
5962

S416#4
56204
57544
59594

61104
62444
64354
65964
67584
69684
71564

72954
74634
76814
78824

1381
2228

26334
2938
4376

L6065
48554
5123
5392
5706
6014#

7312
7453

74184
76454
7502
7745
77824
7885

7503
7746
7783
82764

75074
7747
7784
82814

7508
7754M
7785
82864

7509
7755
77914
83984

3463

3478

3486

3503

3511

3519

7501
77448
7775
7884

3599
4113
5737

3612
4219
5748

3628
4930
5759

3644
4942
5770

7579
4806

7553

7606

7858

7112
7237

3660
5053
5781

7113
7238

7419
74634

3679
5077
6233

6356
64814
6660
6869
6984

54094
56134
57438
59484

66574
6752
6975
7111
72364

63554
6468
6659
6868
69834

53904
55904
57334
59324

6209
6467
6658
68674
6976

4861

12314
12314

CROSS REFERENCE TABLE == MACRO NAMES

12:42

71194
7239

7420
7464

3685
5125
6497

6357
6482
66664
6870
6985

6358
6483
6667
6882#»
6986

76421
7465

74324
7466

7120
726454

3693
5240
7646

121
7246

3706
5426
7886

—

CZOMIDO DMR=-11 FUNCTIONAL TESTS MACY11
(ZDMID.P11
29-JuL-81 11:32
2G71#
6990

SHUTDN

L
4
1»
19474

SLASH
STARS
Sv(
WAl

3398

6962

ABS.

5320
7894

7979

5381

5579

5615

5686

5911

5964

6004

6215

6380

6471

6551

6896

2485
5894

1230
2502
5907

2526
5951

2535
6144

2583
6162

2599
6193

2606
6211

2709
6339

2735
6371

2784
6445

799
6570

2903
6649

2910
6732

2916

7525
12314
12314
1229%
7046
12314

1231#
1231

040100

000

ERRORS DETECTED:

7099

7150

7225

7289

7408

CZDMID/1,CZDMID. SEQ/DOC/CRF/NL:-~ 0C/SOL=SVC34R.MLB,CZDMID.P11
RUN-TIME: 34 42 4 SECONDS
RUN=TIME RATIO: 140/81=1.7
(37 PAGES)
(ORE USED:
19K
DOTUMENT

PAGES:

SEQ 0208

3405

1L
L
1

XFER
XF ERF
XFERT

1
c
12:42 PAGE 211
29-JUL-81
(ROSS REFERENCE TABLE == MACRO NAMES

30A(1052)

208

7721

6852