Digital PDFs

AH-F832A-MC

May 1980

184 pages

Original

10MB

view download

OCR Version

9.2MB

view download

Document:	CZDMIA0 DMR11,DMP11 DMR11 FCTNL DIAG MAY 1980 bw
Order Number:	AH-F832A-MC
Revision:	000
Pages:	184
Original Filename:	CZDMIA0__DMR11,DMP11__DMR11_FCTNL_DIAG__AH-F832A-MC__MAY_1980_bw.pdf

OCR Text

TNL DoRE
L ECB
DMRLL 2H
[ERLL:DK

AH-FB32A-MC
FICHE 1 0 F 1

e
em
Am
i
MADE IN USA

NLIST

SEQ 0001

LTITLE CZDMIAO DMR-11 FUNCTIONAL TESTS
S?g;L PROGRAM DOCUMENT

NLIST

TOC

.REM a

IDENTIFICATION
PRODUCT CODE:

AC-F830A-MC

PRODUCT NAME:

(CZDMJAO

PRODUCT DATE:

FEBRUARY 1980

MAINTAINER:

DIAGNGSTIC ENGINEFRING

AUTHOR :

MIKE O°'CONNOR

DMR-11

FCTINL DIAG

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 IN THIS DOCUMENT.

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

(C)

DEC

OR
BY

RELIABILITY
OF
DIGITAL
OR ITS

1980 BY DIGITAL EQUIPMENT CORPORATION

THE FOLLOWING ARE

DIGITAL

THE
USE
SUPPLIED

TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:

PDP

DECUS

UNIBUS

DECTAPE

MASSBUS

—

» & o o
ey

1
CONTENTS

1.0 INTRODUCT
ION

2.0 HARDWARE REQUIREMENTS
3.0 PREL IMINARY PROGRAM REQUIREMENTS
4.0 GENERAL PROGRAM CONSIDERATIONS
4.1 DIAGNOSTIC SUPERVISOR

2 EXECUTION TIME
3 XXDP+

4 ACT/SLIDE

.5 APT
6 MEMORY MANAGEMENT
.7 MEMORY PARITY OPTION

4.8 ERROR LOGGING

5.0 PROGRAM LOAD MEDIA

(o NN
eN

A} LNWLNfi NNWND
wwww
Mo

S AR T COMMAND
1 TESTS, PASS, AND FLAG SWITCHES

.2 UNITS SWITCH
.3 EFFECT OF RESTART COMMAND
1
1 PASS SWITCH

.2 FLAGS SWITCH
3 EFFECT OF CONTINUE COMMAND

E
.5 FLAGS SWITCH
EFFECT OF PROCEED (OMMAND
¢
1 UNITS SWITCH
.2 EFFECT OF ADD COMMAND

WNWNO WD WO LNLN)WLN

O*O«@O*\IO\O*O\OO*U\O*O*J\O*O‘O*LNO*O*ONO*O*O\O\O\

W
W

o))
o

6.0 OPERATING INSTRUCTIONS
6.1 LOADING AND STARTING PROCEDURES
6.1.1 LOADING PROCEDURES
.1.2 STARTING PROCEDURES
6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION
.2 INITIAL DIALOGUE
.3 PROGRAM OPTIONS
6.3.1 START COMMAND
.3.1.1 TESTS SWITCH
.1.2 PASS SWITCH
.1.3 FLAGS SWIT(CH
.1.4 END OF PASS SWITCH
1.5 EFFECT OF START COMMAND

COMMAND
ITS SWITCH
FFECT OF

DROP COMMAND

E CT OF PRINT COMMAND
OMMAND

TS SWITCH
ECT OF DISPLAY COMMAND

SEQ 0002

LN"V

)

oS COMMAND
9 1 EFFECT OF FLAGS COMMAND
Z FLAGS COMMAND
.10.1 EFFECT OF 2FLAGS COMMAND
C ONTROL CHARACTERS

—20
W
(AN

w
WWWW

7.0 DEVICE

]

o
OO‘OO

u»l

_a-a_a._ao..ao\ O

SEQ 0003

HARDWARE PARAME TERS

SOF TWARE PARAME TERS
.14 EXTENDED DISCUSSION OF

INFORMATION TABLES

8.0 TEST DESCRIPTIONS

P-TABLE

DIALOGUE
-

3.0 ERROR INFORMAT]ON
9.1 ERROR REPORTING

—_—

SEQ 0004

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
XESS§E?BETHE PROGRAM WILL BE COMPATIBLE WITH ACT, APT, XXDP+,
THFOUGH DIALOGUE WiTH THE OPERATOR,

THE PROGRAM

WILL

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 REFORTING MODES.

DEVICE ERRORS WILL BE REPORTED AS THEY
OCCUR.
THE
REPORT
WILL
INCLUDE
A
TEST
NUMBER AND DESCRIPTION OF THE ERROR,
?83?53?3 BAD
TEST
DATA,
AND
APPLICABLE
DEVICE
REGISTER

2.0 HARDWARE REQUIREMENTS
THE
FOLLOWING
HARDWARE
DIAGNOSTIC TESTS:

IS REQUIRED

TO RUN THE

DMR-11

FUNCTIONAL

PDP-11/04,05,10,20,30,34,35,40,45,50,60, OR 70
16K _MEMORY
CONSOLE TERMINAL
DMR=11

3.0 PRELIMINARY PROGRAM REQUIREMENTS
IT IS ADVISED
%éng??ééCS.

THAT THE STATIC DIAGNOSTICS BE RUN BEFORE THESE FUNCTIONAL
IT 1S ASSUMED THAT THE PROCESSOR IS IN PROPER WORK ING

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 PACK

E-39 ON THE MB203 IS PROPERLY SET UP FOR THE DESIRED INTERFACE.
IF CHOSING TEST CONFIGURATION OPTIONS 1-4,

SELECT THE

EXAMPLE

INTERFACE,;

IT IS NOT NECESSARY TO

HOWEVER THE BAUD RATE MUST BE

IT IS DESIRED TO RUN CONFIGURATION 3

NOT NECESSARY

TO HAVE

SWITCH 7 OF

IT 1S, HOWEVER, NECESSARY TO HAVE

WITHIN THE EIA RANGE.

THE

CORRECT.

(H3255-EJA),

SWITCH PACK

IN THE OFF

¥FOR

POSITION.

THE BAUD RATE SELETCTED TO BE

4.0 GENERAL PROGRAM CONSIDERATIONS

SEQ 0005
4.1

DIAGNOSTIC

THIS

PROGRAM

SUPERVISOR
IS

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
COMBINED

PROGRAM WILL NOT EXCEED 16K OF MEMORY.

4.2 EXE
1. ION
C 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.«K
11/34 AND DMR AT 2.4K

4 AND 1/2 MINUTES
S AND 1/2 MINUTES
10 MINUTES

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

AND

MAY

RUN

4.4 ACT/SLIDE
THIS PROGRAM MAY BE

LOADED UNDER ACT OR SLIDE

IN DUMP MODE OR (HAIN MODE.

AND MAY BE

RUN

4.5 APT
THIS PROGRAM MAY BE LOADED
BY
APT=RD) AND RUN IN PROGRAM MODE

THE
APT
SYSTEM
OR SCRIPT MODE.

(INCLUDING

4.6 MEMORY MANAGEMENT

IF MEMORY MANAGEMENT IS AVAILABLE,

FUNCTIONAL

DIAGNOSTIC.

IS USED BY CERTAIN TESTS

4.7 MEMORY PARITY OPTION

IF PARITY MEMORY
IS
INSTALLED,
DISABLED BY THE PROGRAM.

MEMORY

PARITY

TRAPS

ARE

4.8 ERROR LOGGING
AT THE END OF EACH PASS ON ALL
THE CUMULATIVE TOTAL NUMBER OF

RESTART COMMAND.

UNITS,
ERRORS

THE PROGRAM PRINTS OUT
SINCE THE LAST START OR

IN THIS

5.0 PROGRAM LOAD MEDIA
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
LOADER,
THE
PROGRAM
SHOULD
BE
LOADED
FIRST,
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR.
WHEN USING XXDP+, THE
DIAGNOSTIC
SUPERVISOR
SHOULD
BE LOADED FIRST, FOLLOWED BY
THE DIAGNOSTIC PROGRAM.

6.0 OPERATING INSTRUCTIONS
6.1

LOADING AND STARTING PROCEDURES

6.1.1

LOADING PROCEDURES

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

6.1.2 STARTING PROCEDURES
THE

PROGRAM

PROCEDURES

STARTS

TO START

THE

LOCATION

PROGRAM.

200.

USE

STANDARD

DEC

6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION
THE

DIAGNOSTIC

CAN

BE EXECUTED STANDALONE UNDER XXDP+,

WITHOUT READING THE REMAINDER OF

THIS DOCUMENT, AS FOLLOWS:

A)
B)

LOAD AND START DIAGNOSTIC USING RUN COMMAND
RECEIVE DIAGNOSTIC SUPERVISOR IDENTIFICATION AND PROMPT

TO END EXECUTION,

C) ENTER STA<CR>
D) ANSWER HARDWARE AND SOF TWARE QUESTIONS
E) GET END OF PASS MESSAGES OR ERROR MESSAGES

(DRS-(C>)

ENTER CONTROL/C

6.2 INITIAL DIALOGUE
AFTER THE PROGRAM AND THE SUPERVISOR ARE LOADED AND
IS STARTED, THE FOLLOWING IDENTIFICATION IS TYPED :

THE PROGRAM

DRS LOADED
DIAG. RUN~TIME SERVICES

DR>
THE OPERATOR THEN PROCEEDS BY

TYPING ONE OR MORE OF

THE

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

SPECIFICATION).

SEQ G006
LS

6.3 PROGRAM OPTICNS
SEQ 0007

6.3.1

START COMMAND

AAAAALAS
sl dtdl st ALES
22222222322
ARd
22
L T2 LY

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

AR A

AR AR AN AR AR AN R R AR A R AN NN R RN RN NNNNNNRRRNP AR

I &

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

BE EXECUTED IN NUMERICAL ORDER REGARDLESS OF
THE
ORDER
SPECIFICATION.
THE
DEFAULT
IS
TO EXECUTE ALL TESTS.
THIS AND ALL SWITCHES,

OF
ON

THE ANGLE BRACKETS <> ARE PUNCTUAT]ON

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

TYPED BY THE

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

IS A DECIMAL

NUMBER

INDICATING

THE

DESIRED NUMBER

Of
PASSES.
A PASS IS DEFINED AS THE EXECUTION OF THE FULL
DIAGNOSTIC (ALL SELECTED TESTS) AGAINST ALL UNITS SUBMITTED.

THE DEFAULT IS NON-ENDING EXECUTION.
IN THIS CASE EXIT FROM
THE PROGRAM IS ACCOMPLISHED EITHER BY TYPING A CONTROL/C
OR
BY
OCCURANCE
OF AN ERROR WITH T.“E HALT ON ERROR FLAG BEJNG
?%.OFT2E3E¥I; IS A RETURN TO COMMAND MODE.
SEE EXAMPLE
AT

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

SEQUENCE

ELEMENTS

<FLAG-">, OR <FLAG=0>, SEPARATED BY
ONE OF THE FOLLOWING VALUES:

COLONS,

THE

FORM <FLAG>,

WHERE

<FLAG> HAS

HCE

HALT ON ERROR,

LOE

LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO LOOP
CONTINUOUSLY WITHIN THE SMALLEST DEFINED BLOCK

IER
IBE
IXE

PRI~
PNT

BOE
UAM

ISR
IDU
LOT

CAUSING COMMAND MODE

ENTERED WHEN AN ERROR 1S ENCOUNTERED

TO BE

OF CODING (SEGMENT, SUBTEST, OR TEST)
ING THE ERROR
INHIBIT ERROR REPORTING
INHIBIT BASIC ERROR REPORTS
INHIBIT EXTENDED ERROR REPORTS

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

CONTAIN-

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

THE

FLAGS NAMED OR EQUATED TO 1

ARE CLEARED.

ARE

SET,

THOSE

A FLAG NOT SPECIFIED IS CLEARED.

E:[I)TS;{ 61.55 1N9T GIVEN ALL FLAGS ARE

CLEARED.

EQUATED TO 0

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
"W UNITS?'' 7O WHICH THE
OPERATOR
REPLIFS
WITH
A
DECIMAL
NUMBER
N FROM 1 TO 16. THE TERM "UNIT'' REFERS TO THE DEVICE
TO WHICH THIS SERIES OF DIAGNOSTICS IS DEDICATED.
FOLLOWING
THIS
ARE THE QUESTIONS WHEREBY THE P-TABLES THEMSELVES WILL
BE BUILT.
EACH P-TABLE IS A CORE-RESIDENT TABLE
CONTAINING
ALL
THE
HARDWARE
INFORMATION
FOR ONE UNIT.
THE OPERATOR
MUST SUPPLY N (NUMBER OF UNITS) VALUES
FOR
EACH
QUESTION.
HE
MAY
DO
THIS
BY GIVING ONE ANSWER TO EACH QUESTION (IN
WHICH CASE THE SERIES OF QUESTIONS WILL BE POSED N TIMES) OR
BY
GIVING
N
VALUES, SEPARATED BY COMMAS, TO EACH QUESTION
(SERIES WILL BE POSED ONCE).
EACH QUESTION IS
FOLLOWED
BY
THE
RESPONSE
RADIX
(D
FOR
DECIMAL,
B FOR BINARY, O FOR
OCTAL, L FOR YES/NO) IN PARENTHESES AND
THE
DEFAULT
VALUE
AFTER THE PARENTHESES.
FOLLOWING
THE HARDWARE QUESTIONS ARE THE SOF TWARE QUESTIONS
TO BUILD THE SOFTWARE TABLES, WHICH DEFINE THE
MODE
(QUICK

VERIFY ETC.)

THAT THE DIAGNOSTIC WILL EXECUTE

IN.

WHEN
THE QUESTION "# UNITS?'' IS ANSWERED, MEMORY STORAGE IS
ALLOCATED FOR THE P-TABLES, AND IF THERE IS
NOT
ENOUGH
TO
ACCOMMODATE THEM THE MESSAGE ''TOO MANY UNITS'' IS ISSUED.
IN
THIS CASE THE DIAGNOSTIC MUST *BE EXECUTED MORE THAN ONCE
TO
TEST ALL UNITS.

:
EXAMPLE

STA/TESTS:1:2~4:6:8-10/PASS:3/FLAGS: IER:HOE=1:UAM: LOE
THIS
COMMAND
WILL CAUSE THREE PASSES TO BE MADE, EACH PASS
CONSISTING OF TESTS 1,2,3,4,6,8,9, AND 10
EXECUTED
AGAINST
ALL UNITS.
THERE IS NO DIFFERENCE BETWEEN SAYING <FLAG> AND
SAYING <FLAG=1>. THE NOTATION <FLAG=0> IS MEANINGFUL ONLY ON

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

SEQ 0008

6.3.2 RESTART COMMAND
R

A R

AR R AR R AR AR AR NN

AR RN

RRARNN

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

AAAASASARAsRd

6.3.2.1

s22222223 2228222223323

TESTS, PASS, AND FLAGS SWITCHES

<TEST=LIST>,

<PASS-CNT>,

COMMAND
.

AND

<FLAG-LIST> ARE

THE

START

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

A SEQUENCE

RANGES OF DECIMAL NUMBERS

DECIMAL

(0-5,

NUMBERS

8-10 ETC.)

(0,1

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
(I_S TO TEST ALL UNITS WHICH HAVE NOT BEEN DROPPED BY

DROP

6.3.2.3 EFFECT OF RESTART COMMAND
THE
RESTART
COMMAND DIFFERS FROM THE START COMMAND IN 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
SUBSCT
OF
THESE. ~ THE
SOF TWARE DIALOGUE MAY OPTIONALLY BE REEXECUTED

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

6.3.3 CONTINUE COMMAND
LA

AR SRS

SRt

iRl

llssss

gttt

2223233232322

222222208]

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

Rdd

sadsdssiadiisti

t22222222

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

IF NONE REMAINS,

THE DEFAULT IS NON-ENDING EXECUTION.

6.3.3.2 FLAG SWITCH (/FLAGS:<FLAG=LIST>,
<FLAG-LIST>

SAME

FLAGS RETAIN THEIR CURRENT

START

VALUE.

COMMAND,

BUT

UNSPECIFIED

SEQ 0009

6.3.3.3 EFFECT OF CONTINUE COMMAND
CONTINUE
MUST
FOLLOW
A START OR RESTART, ANC 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
L AAA AR

AldRd

lss

stttz 2222222222222
2

PRO(CEED) /FLA
: <FLAG-LIST>
GS
TR

RN AR AR AR AR AN NN R RN AN P AN AN N RARANRNN

AR AANNARARRNN

6.3.4.1 FLAGS SWITCH (/FLAGS:<FLAG=LIST>)
<FLAG-LIST> IS AS IN

THE

START

FLAGS RETAIN THEIR CURRENT VALUE.

(OMMAND,

BUT

UNSPECIFIED

6.3.4.2 EFFECT OF PROCEED COMMAND
PROCEED

MUST FOLLOW A START, RESTART, OR CONTINUE.

COMMAND

MODE MUST HAVE BEEN ENTERED VIA A HALT ON ERROR.
THE EFFECT
Of
THE
C(OMMAND
IS
TG
BEGIN
EXECUTION
AT
THE LOCATION
FOLLOWING THE ERROR CALL.
PARAMETERS MAY BE ALTERED.

NEITHER

HARDWARE

NOR

SOF TWARE

6.3.5 ADD COMMAND
LAASEALARS

SRR

ild

stz

Y22

2220020

ADD/UNITS:<UNIT=-LIST>
AR R

A AR AR RN

AN AR AR AN A

AR AN AR A RN AR AR

RRANR

A ANRR

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

IS AS

IN THE RESTART

COMMAND.

6.3.5.2 EFFECT OF ADD COMMAND
THE UNITS SPECIFIED ARE ADDED

TO THE

TEST

SEQUENCE.

EACH

UNIT
MUST
HAVE
A
P-TABLE
IN
MEMORY
DUE
TO AN EARLIER
HARDWARE DIALOGUE.
THIS
COMMAND
MUST
BE
FOLLOWED
BY
A
RESTART
OR
CONTINUE.
THE UNITS SWITCH MUST BE SPECIFIED.
THE ADD COMMAND IS
MEANINGFUL
ONLY
FOR
UNITS
THAT
WERE
PREVIOUSLY DROPPED.

6.3.6 DROP (OMMAND

SEQ 0010

AAAAAARARAR

2R 2223222222222
2232323822322 2220281

DRO(P) /UNITS:<UNIT=LIST>
TR AN AN AN AN

AR TN NN TR RN

AN RN A AN

RN RN ANANNNA RN RN

AARAAS

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

IS AS

IN THE

RESTART

COMMAND.

6.3.6.2 EFFECT OF DROP COMMAND
THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING.
THE UNITS
WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OR
START
COMMAND.
THE
UNITS
SWITCH MUST BE ENTERED.
THIS COMMAND
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND.

6.3.7 PRINT COMMAND
LA

SRR

dldl

slI et

PRI(NT)
AR

28222223

TR AR

RN AR AR AR AR AR RN AN AN R ARANRRARARARANARARARA
AR ANARK

6.3.7.1 EFFECT OF PRINT COMMAND
THE

TOTAL NUMBER OF

ERRORS FOR

EACH

UNIT

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

SINCE

THE

ISR

THE

LAST

(INHIBIT

6.3.8 DiISPLAY COMMAND
AR

AR AR AR AR AN AN R

AR AR RR AR AN

RN NAANNRAARRANRANRRNNAR

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

AR AR AT AT AN

A AR AN AR AN A RARRARAN R AR AARNR A AR

AN RN

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

IS AS

THE

RESTART

COMMAND.

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

TEST

ARE

PRINTED

OUT
IN
THE
FORMAT
IN WHICH THEY WERE ENTERED.
ANY UNITS
(;?‘S\}G:EA?EDDROPPED BY THE
OPERATOR
'DROP''
(OMMAND
ARE
SO

6.3.9 FLAGS COMMAND
TR

R AR AR AN

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

FLA(GS)
AR

A AN AN R AN AR A AR AR

R A AR AR AN AN AN RRARAANR RN

SEQ 0011

6.3.9.1 EFFECT OF FLAGS COMMAND
THE CURRENT

SETTINGS OF

SEQ 0012

ALL FLAGS ARE PRINTED.

6.3.10 ZFLAGS COMMAND
LAARA
Rl
AAALA
il
s dds sl tils ARSAd
sl
ilz IS
ed
2T L T

<t L (AGS)
LAARAAAASS

ARt

dad

ssss

izl el

ISz

6.3.10.1 EFFECT OF ZFLAGS COMMAND
ALL FLAGS ARE

6.3.11

CLEARED.

(ONTROL

CHARACTERS

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

CONTROL

(Z)

EXECUTION OF A DIAGNOSTIC

ENTERED DURING ONE OF

THE

CAUSES

‘e

THRES OPERATOR

DIALOGUES= HARD CORE QUESTIONS (SEE
6.2) ,HARDWARE
DIALOGUE
(SEE 6.3.1.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 (0) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC
CAUSES
ALL
TELETYPE
OUTPUT
TO
BE
SURPRESSED
FOR
THE
REMAINDER OF THE DIAGNOSTIC OR UNTIL
ANOTHER
O
IS
TYPED,
WHICH RESTORES NORMAL TELETYPE OUTPUT.
¥

6.3.12 HARDWARE PARAMETERS
THE

FOLLOWING 3 QUESTIONS WILL BE ASKED ON A START COMMAND.

(SR ADDRESS:

THIS

THE VALUE LOCATED TO THE LEFT OF THE QUESTION
MARK
IS
THE
gggégh;e VALUE
THAT
WILL
BE
TAKEN
ON
A CARRIAGE RETURN

(0)

160070?

THE ADDRESS AT WHICH THE

(SR REGISTERS

ON
THE
UNIBUS.
THE
ALLOWABLE
RANGE
(OCTAL), AND THE DEFAULT VALUE IS 160070.

VECTOR ADDRESS:

THIS

DEVICE.

THE

ALLOWABLE

DEFAULT VALUE IS 300.

RESIDE

INPUT

RANGE

INTERRUPT VECTOR

IS 000-674

FOR

THIS

(OCTAL), AND THE

nwnnnn

—=O

TEST CONFIGURATION -

VBN

(SELO)

160000-177776

(0) 300 ?

THE ADDRESS OF

THE

INTERNAL (NO CONNECTOR)
H3254 - v.35
(NOTE:

H3254 - INTEGRAL
H3255 ~ RS232(/423
H3255 - RS422

MODE 1-4 ALLOWS

PROGRAM INTERFACE SELECTION)

CABLE AND SW PACK INTERFACE SELECTED

(V.35-H3250,

INTEGRAL-BCS55A-10, RS232C-H325, RS423/422-H3251)

* SELECT THE FOLLOWING ONLY
6 = LOCAL LOOP
7 = REMOTE LOOP
Q)
5?7

THE MODEM SUPPORTS LOOPBA(CK +

SEQ 0013

THIS QUESTION WILL COVER ALL THE POSSIBLE TEST
THE DEFAULT IS FOR ACTUAL CABLE LOOPBACK (5).,

CONFIGURATIONS.
CONFIGURATION O

WILL ENABLE LINE UNIT (TTL) LOOPBACK.
IF THIS IS SELECTED NO
CABLES OR CONNECTORS SHOULD BE CONNECTED.
CONFIGURATIGNS 1-4
WILL SELECT THE INTERFACE REGARDLESS OF THE SWITCH SETTING AS
LONG AS THE PROPER BAUD RATE IS SELECTED (I.E. EJA - 2.4K-19.2K).

6.3.13 SOF TWARE PARAMETERS
THE

ONLY

SOF TWARE

PARAMETER QUESTION ASKED BY

CONCERNS A SOF TWARE TIMEOUT VARIABLE

SOF TWARE 'HUNG'' CONDITIONS.

THAT

DIAGNOSITC

THIS VARIABLE IS A VALUE FORM 1-5.

SELECTABLE PROGRAM LOOP_TIME-OUT VARIABLE

[REFER TO LISTING 6.3.13]1

THE

IS USED TO PREVENT

(MAX=5; MIN=1)

(0)

§ ?

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:
2

11/40 AND DMR AT 2.4K:

THE DEFAULT

JILL COVER THE WORST CASE

IS 5.

THIS

WITH CACHE AND THE DMR Al 2.4K).

(I.E.

11/70

6.3.14 EXTENDED DISCUSSION OF P-TABLE DIALOGUE
THE
THE

FULL CAPABILITY OF THE
FOLLOWING DISCUSSION OF

HARDWARE DIALOGUE IS REVEALED BY
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 TRIP THRU THE QUESTIONS, ALL OF
THE
SLOTS
IN
ALL
OF
THE
P-TABLES ARE FILLED.
IF THE OPERATOR TYPES IN
LESS THAN N EXPLICIT VALUES
IN
RESPONSE
TO A
PARTICULAR
QUESTION, THESE VALUES ARE PLACED IN THE P-TABLES (ONE VALUE
GOING INTO THE PROPER SLOT OF EACH
P-TABLE
BEGINNING
WITH
THE

FIRST P-TABLE)

UNTIL

THE

STRING OF

VALUES

IS EXHAUSTED.

THE LAST VALUE IN THE STRING BECOMES THE NEW DEFAULT AND
USED TO FILL THAT SLOT IN THE REMAINING P-TABLES.

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

THE SERIES OF QUESTIONS
IS REISSUED UNTIL AT LEAST ONE
QUESTION HAS RECEIVED N EXPLICIT VALUES FROM THE OPERATOR.

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,
THIS
SAMPLE
RANGE TRANSLATES TO THE STRING 6,7,8,9,10 (AN
INCREMENT OF 1). IF THE VALUES ARE ADDRESSES,
THE SAMPLE
RANGE TRANSLATES TO THE STRING 6,8,10 (AN INCREMENT OF 2).
NOW LET US SEE HOW WE
(COULD USE THESE CAPABILITIES TO
CONSTRUCT A SET OF P-TABLES.
ASSUME THAT WE HAVE 16 UNITS,
AND THAT THERE ARE THREE HARDWARE PARAMETERS FOR EACH (THREE
SLOTS IN THE
P-TABLE,
THREE
HARDWARE QUESTIONS
IN THE
DIALOGUE).
LET THE DESIRED VALUE FOR THE FIRST PARAMETER BE
THE NUMBER 75 FOR ALL 16 TABLES.
LET THE 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

THE LAST 9 UNITS.

FOR

THE FOLLOWING DIALOGUE WOULD ACCOMPLISH THIS GOAL:
# UNITS

(D)

UNIT O

<QUESTION 1> ? 75

? 0-6

<QUESTION 3> ? 76

UNIT 7

<QUESTION 1> ?

<QUESTION 2> 2 7-11,,13-15

| <QUFSTION 3> 2 77
i

& o o
>+

THE ROLE THAT TABLE NUMBER ONE PLAYED IN THE FIRST TRIP.

THE
FIRST
TIME THE SERIES IS ASKED, SLOT ONE RECEIVES A 75
IN ALL 16 TABLES.
SLOT TWO RECEIVES THE VALUES 0,1,2.....

TABLES O THRU 6 AND A CONSTANT 6 IN TABLES 7 THRU 15.

SLOT THREE RECEIVES A CONSTANT 76 IN ALL 16 TABLES.

THE SECOND TiME THRU THE SERIES, TABLES 7 THRU THE END
ARE
GOING TO BE AFFECTED (NOTE THAT THIS PIECE OF INFORMATION IS
PRINTED OUT FOR THE THE OPERATOR IN THE FORM ‘UNIT
Xxx'' AT
THE BEGINNING OF EACH SERIES).
QUESTION_1 IS RESPONDED TO

BY A <CR>, SO SLOT ONE STAYS AT CONSTANT

TABLES

THRU 15, SINCE NO NEW EXPLICIT VALUES ARE TYPED 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

¥A2LE?513 THRU 15. SLOT THREE GETS THE VALUE 77 IN TABLES 7
HRU

15.

THE DIALOGUE IS TERMINATED WHEN THE SOF TWARE RECOGNIZES THAT
16 EXPLICIT VALUES HAVE BEEN GIVEN FOR AT LEAST ONE QUESTION

(NAMELY QUESTION 2).

SEQ 0014

7.0 DEVICE

SEQ 0015

INFORMATION TABLES

SEE THE GLOBAL EQUATES SECTION FOR DEVICE CSR BIT DEFIMITIONS

8.0 TEST DESCRIPTIONS
*

*
*

TEST 1 - DMR-11
VERIFY THAT ADDRESSING THE & UNIBUS CSRs DOES NOT CAUSE A NONEXISTENT MEMORY TRAP.

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

*
x

*
*

* LAARAR LSRRl

o
;*
:*
s
:*
;%

lsss

AR AR AN AN RN

st d

R R

A AR

izl

ezl

22232332232222222282 8

R ARRANNRARRARARARRRNR
AR AR RN

TEST 2 - DMR-11
ROM CRC/CCITT - CHECK ROM POSITION AND 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/CCITYT WORD FOR THE ROM.

0
i

LOCATION

i
i
i
o
o
i

CHIP NO.

EO3
EQ2
EQ4
EO1
EOS
E14

- %

0
1
2
3
4
5

CHIP ADDRESS RANGE
BYTE
ADDRESS RANGE

LOW
HIGH
LOW
HIGH
LOW
HIGH

CRRARERRRER AR AR IMPORTANT
;* FOR THIS

TEST

111111

TO RUN CORRECTLY,

;* E85 ON THE MB8207 IS ON.

0000
0000
2000
2000
4000
4000

TIT]

1777
1777
3777
3777
5777
5777

gkt kA A AR AR AR AR R AR AR AR AN RN AN AN

ENSURE

THAT SWITCH 1

AT LOCATION

IF THIS SWITCH IS OFF, BSEL1 WILL BE

;* LOCKED OUT AND THE MAINTENANCE FEATURES WILL NOT BE ENASLED.

RN A

A AN A A

AR AR AR R

AR R AN AN AR RANARN PR AR AN N RN

IR PETREYR]

AR R

*
*

SUBTEST 1 - ON THE FIRST PASS PRINT THE VERSION # IN EACH ROM
SUBTEST 2 - GENERATE THE CRC-CCITT IN EACH ROM AND COMPARE [T

SUBTEST 3 - COMPARE THE ROM # BLASTED IN THE ROM AGAINST THE
EXPECTED ROM #.

IT AGAINST

LAAARAAAAAS

ARl

THE

addlilll

CRC BLASTED

ettt

THE

ROM

T 2222222222222222112%;

t"t't‘it"tt!tttt't'Qtfi"tt'fittttttti'Q*fit*ittt'tfit*fit*fiti'*itiititt

TEST 3 - DMR-11

.*
:*
;*
;*
:*
.

[

MASTER CLEAR
THIS TEST WILL ISSUE 2 MASTER CLEARS.
EACH CALL TO THE MASTER
CLEAR ROUTINE WILL ENSURE THAT THE RUN 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 CON THE
:* 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 RESULT IN THE RUNNING OF MICROTESTS.

THEREFORE

THE MASTER CLEAR SUBROUTINE WILL

;* BIT 13 ONLY ON EVERY OTHER MASTER CLEAR)

[]

TOGGLE

(].E

SET

THE SOF TWARE BIT.

;% THIS WILL ENSURE THAT REGARDLESS OF THE POSITION OF THE
. * HARDWARE SWITCH, MICROTESTS WILL BE RUN EVERY OTHER MASTER CLEAR.
;* WHEN RUNNING THIS TEST, WE EXPECT TO ADD THE RESULTS OF BSEL3
.+ 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

t
*

ADDITIONALLY THIS ROUTINE WILL REPORT WHENEVER THE RESULT OF

??EE3 éaCQ

THIS WILL MEAN THAT THE DEVICE IS NOT A DMR

* W

. W LA

AASAR SRRl

FASEA S

ARl

BASE

sttt

iadidd sl

282222322

sttty

22222223

2222222222222

TEST 4 - DMR-11
IN COMMANDS

*
*

SUBTEST 1

-~ ISSUE A BASE IN
DMR MODE.
ENSURE THAT THE DMR MODE BIT (BIT &)

;*
)4

SUBTEST 2

- ISSUE A BASE IN

DMC MODE.

ENSURE THAT THE DMC MODE BIT

(BIT 4)

IS CLEAR

THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP
MESSAGE VARIABLES ARE PROPERLY INITIALIZED.

*
*
* LA

IS SET

THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP
MESSAGE VARIABLES ARE PROPERLY INITIALIZED.

ARAS SRS

dal

Rt dd

sl ettt

tttktttttttttfi*'tttt*tttfi*t*tfit't*t*tttttk*itit*tt*t

t***t***tttttt***

;* DMR COMMANDS

;¥

SUBTEST 1

EXT.

ENABLE

BIT

SET

?éS@?EEREXTENDED ERROR AND

* %

;*
;¥

- ISSUE AN ENABLE EXTENDED ERROR COMMAND AND CHECK THAT
THE

TEST 5 - DMR-11

SUBTEST 2

=~ SET REP/SEL
VALUES.
THE BASE

- W

SCRATCH PAD

CHECK

THAT

13.

THEN

THE ENABLE BIT

TIMER VALUE AND SET THE DMR THRESHOLD

CHECK THAT THE VALUES ARE (CORRECT
TABLE AFTER HALTING THE DMR.

- %
. % LA A

SRS

ARl

sss

2202828220232

32T

SEQ 0016

TEST 6 - DMR-11
IN COMMAND TEST -

CONTROL

=~ CONTROL IN, FULL DUPLEX, DDCMP MODE.

SUBTEST 2

- g?#TFIQCS)LSéI;J HALF DUPLEX.

SUBTEST 3

-~ CONTROL IN, MAINTENANCE MODE.

BF B

ENSURE THAT THE HALF DUPLEX

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
g(E)ZE(IIOFEQgECT. DMR RUN MODE ACKNOWLEDGE WILL NOT BE

B
5

ENSURE THAT

THE HALF-DUPLEX BIT IS CLEAR IN THE MODEM STATUS WORD,
ALSC ENSURE THAT DDCMP MODE BIT IS SET IN SCRATCH PAD 7.

SUBTEST &

VED.

BN BN

SEQ 0017

SUBTEST 1

)

»
»

ttttitt'tt'ttttt'tttttttttttttttttttttttttttttttttttktttttttttttttgtt 2

LSRR

SRR

ettt

2222222222222

828R

tii*tt*'t'ittittt'ttttt*t*tttttt*ttttttt*tfitttttt*ttfi***tttttt*tttttt

TEST 7 - DMR-11
;* MODEM WRITE COMMAND
*
SUBTEST 1
- WRITE DATA PATTERNS INTO THE MODEM WRITE REGISTER.
*

*
*
*

ENSURE

SUBTEST 2

RSttt

MR AALASAS SRS RSttt

SUBTEST 1

isddadds

sttt

syl

diddadsssddssiis stz

s2223233 3232222222222

222222222220

RECEIVE BUFFER.

BY ASSIGNING A NO BUFFER

THRESHOLD

OF THREE, ENSURE THAT A NO BUFFER ERROR IS RECEIVED

AFTER

SUBTEST 2

THE

THIRD

ASSIGN THE NAKS
THRESHOLD OF 7.
THREE

SRRl

THRANSMISSION.

- TRANSMIT A BUFFER WITHOUT A RECEIVE BUFFER.

o>
" LA

THE

INTO BSEL6.

-~ TRANSMIT A BUFFER THREE TIMES WIHOUT ASSIGNING A

;*
S

THAT

PATTERN WRITTEN

TEST 8 - DMR-11

S
;*

THE

=~ ATTEMPT TO WRITE BOTH THE HALF-DUPLEX BIT AND THE

RETURNS

RTS HOLD BIT.
THE MICROCODE SHOULD NOT ALLOW THIS
TO HAPPEN.
WHEN READING THE MODEM STATUS, ONLY
THE HALF-DUPLEX SHOULD BE SET.

b LAARAASA

THAT ON THE NEXT MODEM READ

MICROCODE

add

AFTER
s

THRESHOLD OF 3 AND A NO BUFFER
CHECK THAT THE NAKS ERROR COUNT

SHUTDOWN.
dsi

teets

ettt

8232322222

22222222

ttttttttttttttttttttttttt*ttttttttttt'tttttttt*tttttttttttt'

ttttttttt

TEST 9 - DMR-11
;* NON-EXISTENT MEMORY (NXM) error check

:* Perform DMR commands usm8 NXM addresses, verify that NXM error
;% reported IN EACH OF THE FOLLOWING SUBTESTS:

’

;*
;*

SUBTEST 1

SUBTEST 2
SUBTEST 3

BASE

IN RESUME COMMAND - BASE

TABLE ADDRESS

IS NXM

BA/CC IN RECEIVE COMMAND - BA/CC IN ADDRESS IS NXM
BA/CC IN TRANSMIT COMMAND - BA/CC IN ADDRESS [S NXM

R4 TR AR A AR

A AR AR

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

TR AN R RN

AR RARRAT RN AN AR

.Q‘..

"*ttt't'tt'tttttttti*tt'ttktttfifi'ttttt'tiiVt"ttt*'fi*fitttt't*"tti't

TEST

10 - DMR-11

TIME OUT - FORCE A TIMEOUT AND VERIFY

. %

A A A

AAAAAAAARSRSRR

oY
;*
:*

MESSAGE

AR AN AR AR AR R

RN RN R

THAT

THE

iltitssizl

TEST 11 - DMR-11
TOO LONG - TRANSMIT A MESSAGE

THAT

SEQ 0018

ERROR IS REPORTED

AR R R AR AN NN R AR ARAANNA R AT RN

stz

IS TOO LONG FOR THE

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

3tttttttttttttttttttt*tttttttttttt*ttttttttitttttttttttttkttttttt*tttt
A

sl ettt
e e e sttt z
2222222

TEST 12 - DMR-11

PROCEDURE

ERRORS -

THE FOLLOWING SHOULD CAUSE
A PROCEDURE ERROR:

SUBTEST
SUBTEST
SUBTEST
SUBTEST
SUBTEST

1
2
3

=~
-

&
5

LSRR

ARl

=
s

THE

DMR-11

A BA/CC
A BA/CC

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

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

TO HALT AND RESPOND WITH

A SECOND BASE IN COMMAND
A CONTROL IN BEFORE A BASE IN
A BA/CC IN BEFORE A BASE IN

LX)

MAAARASAS SRS AS

2222

222220000020

R RRANAR AR RS AN ARANRR AR AR RN

;%
;%

NN AR

TEST 13 ~ DMR-11

:* FREE RUNNING FLAG MODE DATA TEST
;* TRANSMIT A MESSAGE AND VERIFY THE RECEIVED DATA

CORRE(CT.

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 [S USED

IN A DATA TRANSMISSION MODE.

AASASEASARAA
s i
ittt
dldR
y
lats
2282223223222
dsd
2222222)

PR IR TR

R A AR

AN A AR R R AR A AR R

TEST

;% IN THIS TEST - SEE
;* HAVE

THE MEMORY

AR AN AN RSP AR AR AR AR AR AN

AN AR ARNRRANRRARE RS

14 ~ DMR-T1

IF WE HAVE MEMORY MANAGEMENT,

TO CHECK BITS

16 &

17 IN SEL6.

SO SEE

THIS WILL

IF WE

ALLOW

;* US TO TRANSFER DATA USING THOSE EXTENDED ADDRESSING BITS. AS IN
;* ngg 13 THE TEST IS NON-INTERRUPT AND INTERNAL (TTL) LOOPBACK IS

;* U

LR N

tttttt'it.t‘*ttttttttt*tittttittttttttttt'*ttttttl

titttltttt't"tt‘tt

MAMAAAAAARALAASAASAA
AR RARSlRRet R
Rttt iiil
ittt
tiissid)

TEST 15 = DMR-11

> %

;* RESUME BASE IN - DMC MODE
%
=+
WILL NOT RUN IF MODEM LOOPBACK

SEQ 0019

[]

* X

[]

]

00,00
e
BN,
®e

R
N
T
D

SRR

lllflll..ll#"l'lll'l"‘ll"‘ll..llll

IS SELECTED

IN THIS TEST THE DMR WILL TRANSMIT AND RECEIVE

TEST THE DMR WILL BE
FOLLOWING MANNER:

BASE IN
(ONTROL IN
-

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT
BASE
1 BA/CC IN RECEIVE
HALT
BASE

IN RESUME

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT
BASE
1 BA/CC IN TRANSMIT
HALT
BASE

IN RESUME

2 BA/CC

IN RECEIVE

2 BA/CC IN RECEIVE

2 BA/CC IN TRANSMIT

2 BA/CC
2 BA/CC

DURING THE

HALTED AND RESTARTED BY A BASE-IN RESUME

HALT

2 BA/CC

7 BUFFERS.

IN TRANSMIT
IN TRANSMIT

THE

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.

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

SEVEN RECEIVE AND SEVEN TRANSMIT BUFFERS.

A}ggg;EH;O USE AS LARGE BUFFERS AS POSSIBLE
H

IN THE

FOLLOWING

A.
B.

AR A A

THE ROUTINE WILL

A RN AR AN

IF THERE IS MEMORY MANAGEMENT, USE A PAGE ABOVE 32K.
IF THERE IS FREE MEMORY ABOVE THE SUPERVISOR GREATER
THAN 2K BYTES, USE TKAT MEMORY
IF NEITHER OF THE PRECEEDING TWO ARE POSSIBLE, USE

THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC
R AN RN A RN R AN ARERANARARRAR A RAN AR

NIREANNRAN AR AN RO RO

RTRR

SEQ 0020
MAALLALAS A2l

]

d 2282222222222
2220222
X
X
R
AR
R 2Y

TEST 16 -~ DMR-"1
;+ RESUME BASE IN - DMR MODE
;* IN THIS TEST THE DMR WILL TRANSMIT AND RECEIVE
b

[

;*
;+

*
x
4

®
*

*
*
«

*
*
A4

*
*

*
*
*

TEST THE DMR WILL BE
FOLLOWING MANNER:

BASE IN
CONTROL

HALTED AND RESTARTED BY

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

2 BA/CC

IN RECEIVE

2 BA/CC IN RECEIVE

7 BUFFERS.

DURING ThHE

A BASE-IN RESUME

THE

2 BA/CC IN RECEIVE
HALT
BASE IN RESUME
1

BA/CC

IN RECE]VE

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT
BASE
1 BA/CC IN TRANSMIT
HALT
BASE

IN RESUME

2 BA/CC IN TRANSMIT
2 BA/CC

2 BA/CC

IN TRANSMIT
IN TRANSMIT

IN RESUME

*
«

»
b 4

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.

*
*

*
*
*
*

THE BUFFERS ARE DETERMINED

HIERARCHY:
A.

*
*

*
.

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

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 f)F THE PRECEEDING TWO ARE POSSIBLE, USE
THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

RN ®

R A AR R AN

AR R R

AR RN

AR AR

AN RN AR R

AR AN AR RN R

AR A ANNANNRRARARARI

0!."0.!.0.';

tttttttt'ttt't'ttttttttttttt'tttttttttttt'tttttttttttttttttttttttt'tt

TEST 17 - DMR-11
:* INTERRUPT DRIVEN EXERCISE
o ¥ IN THIS TEST 64 BUFFERS WILL BE TRANSMITTED AND RECEIVED

SEQ 0021

o 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

. %

THE BUFFERS ARE

* %

t
i
t

Q
t
Q

t AR

SRS
b

]

DETERMINED

IN THE

ARt

RSl

AN RN

LARGE ME SSAGE

AR AR RN AR R R R R AN

AN NN

TEST

t
t
t
t
t
t
-

%
* %

THE BUFFERS ARE DETERMINED

A R kw

LARGE BUFFER

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.

B.
C.

- %
<

AR RAR AR ARRANNNANNANRNR R AR

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

MESA SALSEAR S

THIS

18 - DMR-11

$BUFFS.

sttt sttt
22 e
0222 223232222222222]
z

;% IN THIS MODE TRANSMIT AND RECEIVE 1
;%
'+
;%

SUBROUTINE

SUBROUT INE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF
64 RECEIVE AND 64 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.
8. 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.

‘%

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 BYTF DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.
sl

sttt

et e22222222222222227

e, .- .

it"i"'tt"‘itt*'t"t't'ttti.t'i*!fit*ttttiti*itttfifi****t*tfi**"ttttt

TEST 19 - DMR=11
.+ MAINTENANCE MODE OPERATION
»

SEQ 0022

;* THE BA/CC QUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND

Sen.ns

;*
;*

THE
THE

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

THE BUFFERS ARE DETERMINED

M
.%

IN THE SUBROUTINE $BUFFS.

THIS

SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF
ONE RECEIVE AND ONE TRANSMIT BUFFER.
THE ROUTINE WILL

A}EE%E’JO USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING

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

- %

- %
- %

* %
b

CHECKED AGAINST

3 R

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.

AR AR

AR AN A AN

AN AN R RN AR RRRARRRANRARNN

RNATRRAAR

9.0 ERROR INFORMATION

9.1

ERROR REPORTING

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

DESCRIBES

“‘IRDY

WHICH

NOT SET'' ERROR, AND PROVIDES THE PC OF

THE ERROR CALL AND THE PC OF
THE
CALL
TO
THE
SUBROUTINE
g&P?E?L%gG IT, THE FAILING REGISTER NAME, AND DEVICE REGISTER

(TZ%BERG%\T/C FTL ERR 00002 ON UNIT 00 TST 006 SuB 000 PC:

ERROR IN SUBROUTINE CALLED AT PC: 036174
STATUS OF BUFFERS
NUMBER OF BUFFERS: 7
BUFFER SIZE: 2048
IN
- RCV ASSIGNED:
7
XMIT ASSIGNED:
OUT = RCV RETURNED:
0
XMIT RETURNED:
DMR RUN ACKNOWLEDGMENT NOT RECEIVED
(CHECK INTERFACE, BAUD AND TURNAROUND)

016210

7
O

ALL THE MESSAGES IN THE DIAGNOSTIC USE BASIC MESSAGE CALLS.
THEREFORE THE INHIBIT EXTENDED ERROR FLAG WILL HAVE NO

EFFECT ON THE MESSAGE OUTPUT.
INHIBIT THE ERROR MESSAGES.

THE

INHIBIT BASIC MESSAGES WILL

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11

SEQ 0023

;

——

uvn

INITIALIZE SUPERVISOR MACROS

INSTRUCTIONS

T INSTRUCTIONS, SHIFTED RIGHT
T TEST TAGS, SHIFTED RIGHT

wnnununwvnm

rerer—

d
b

$LSTIN=
SLSTTAG=
SVCINS=
SVCTST=
SVCSuB=
SVCGBL=
SVCTAG=

:
;
;
H
002000

2
PAGE 2

BGNMOD
000001
000001
000001
000001
000001
000001
000001

2223
2224
2225
2226

SVC

2215
2216
2217
2218
2219
2220
2221

2223

MCALL
SvC

002000
002000

09:36

.TITLE CZDMIAQ DMR-11 FUNCTIONAL TESTS
.=2000

2211
2212
2213

002000

2194
2203
2204
2205
2206
2207
2208
%5?3

13-MAR-80 09:34

13-MAR-80

CZDMIA.P11

30A(1052)

} SUBTEST TAGS,

SHIFTED RIGHT

GLOBAL TAGS, SHIFTED RIGHT
OTHER
TAGS, SHIFTED RIGHT
T

CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH
TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS.
CHANGE THE
SYMBOLS TO BE MINUS~ONE TO NOT LIST THE EXPANSIONS.
YOU MAY
CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM.
POINTER BGNSW,BGNDU,BGNSFT

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA.P1T

30A(1052)

13-MAR-80

.SBTTL

PROGRAM HEADER

c44

09:36

PAGE 2-1

THE PROGRAM HEADER MACRO CHARACTERIZES

SEQ 0024

THIS DIAGNOSTIC.

HEADER MACRO'S ARGUMENTS ARE FILE NAME, RELEASE LEVEL, PATCH

;

AND THE TYPE OF DIAGNOSTIC (0-SEQUENTIAL, i-EXERCISER).

;

DISPOSITION OF

ARGUMENTS ARE

THE MOST RECENT PATCH, MAXIMUM TEST TIME IN SEC.
THESE
IN RESPECTIVE ORDER.

HEADER CZDMI,A,0,600.,0

::
LENAME

LSREV::
LSDEPO::

000000
001130
036534
037470

002174
002224
037744
000000
000000
000000
000000

002124
000000

000000
000000

003

THE

LSUNIT::
::
LSTIML

LSHPCP::
L$SP(CP::
:
LSHPTP:

LSSPTP::

LSLADP::

L$STA::
L$CO::

LEDTYP::

:
LSAPT:
:
L$DTP:

L$PRIO::
LSENVI::
LSEXPT::

LOMREV::

.ASCI1I
.ASCIlI
LASCI!
.ASCI1
LASCI1I
.BYTE
.BYTE

/¢/
/7/
/D/
M/
/1/

LASCII

/A/

LASCII

70/

.WORD

600.

.WORD

L$HARD

.WORD

T
L$SOF

.WORD

LSHW

.WORD

L$SW

-WORD

LSLAST

.WORD

LSDISPATCH

.WORD

BYTE

CSREVISION

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
(3)
(5)
(4)
(5)
(5)

002051
002052
002052
002054
002056

(5)
(4)
(5)

002060
002060
002062

(5)

002064

(4)

002056

002062

(4)
(5)
(4)
(5)
(4)
(5)
(4)
(5)
(&)
(5)
(4)
(5)
(4)
(5)
(4)
(5)

002064
002066
002066
002070
002070
002072
002072
002074
002074
002076
002076
002100
002100
002102
002102
002104

(5)
(4)
(5)

002106
002106
002110

(5)
(4)
(5)
(4)

2262

0021

(4)

002110

0021
002}
002
002 1

b =d b

(5)

QOO
N

(4)

002104

002

PON) —

(4)

30A(1052)
13-MAR-80
PROGRAM HEADER

09:36

2
PAGE 2-2

SEQ 0025

003
LS$EF::

000000
000000

L$SPC::

000000

LSDEVP::

010230

LSREPP::

000000

LSEXP4::

000000

LSEXPS::

000000

LSAUT::

000000
023522

000C00

L$DUT::

LSLUN::

L$DESP::

010236

.BYTE

C$EDIT

.WORD
.WORD

0
0

.WORD

L$DVTYP

.WORD

-WORD

.WORD

L$DU

.WORD

L$DESC

LSLOAD::
‘EMT
LSETP:

104035
000000

LSICP::

020514

L$CCP::

021770

LSACP::

021700

LSPRT::

020506

LSTEST::

000000

LEDLY::

000000

LSHIME::

000000

.EVEN

ESLOAD

.WORD

LSINIT

.WORD

L$CLEAN

-WORD

LSAUTO

.WORD

L$PROT

.WORD

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1T
13-MAR-80 09:34

SS;?

2272
2273
2274

(4)
(3)
(6)
(6)
(6)

(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)
(6)

2278
2285

2286
2287
2288
2289

09:36

2
PAGE 2-3

SEQ 0026

.SBTTL DISPATCH TABLE

JI1111117777777777777777777777777777777777777777777777777777777777777777777777
s/ THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST.
;/ 1T IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST.

SS;%

2277

30A(1052)
13-MAR-80
DISPATCH TABLE

/111117177777 77770777777770777777777777777777777777777777777777727777777777777

002122

(002122
002124
002124
002126
002130

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

000023
023602
024120
025434
025566
026644
030056
030636
031260
031762
032474
032676
033056
033762
034456
036166
036272
036340
036410
036460

DISPATCH 19
WORD
LSDISPATCH::

WORD
WORD
.WORD
WORD
WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
WORD
.WORD
.WORD
LWORD
MWORD
.WORD
.WORD
.WORD

19
T1
T2
T3
T4
TS
T6
T7
T8
T9
T10
T11
T12
T13
T14
T15
T16
T17
T18
T19

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

2291
2292
2293
2294
2295
2296
2297
2298

30A(1052)
13-MAR-80 09:36
DEFAULT HARDWARE P-TABLE
.SBTTL

PAGE 2-4

SEQ 0027

DEFAULT HARDWARE P-TABLt

SIIIITIIII7777777777777777777777777777777777777727777777777777777777777777777

:/ THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF
**NOTE = MANY OF THE P-TABLE VALUES LISTED
;/ THE TEST-DEVICE PARAMETERS.
;/ BELOW ARE NOT USED IN THIS DIAGNOSTIC BUT ARE INCLUDED TO AGREE WITH
;/ M8207 & MB203 DIAGNOSTI( P-TABLES.

SIVETIIIIITI77777777777077770777777777777777777777777/77777777777777/777777777

2300

BGNHW

000013

DFPTBL

LSHW::

WORD

L10000-L$HW/2

DFPTBL::

000000

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

160070

0
160070
300
0
0
000
000
000
5
0
0

s **NOT

;**NOT

USED
USED
USED
USED
USED

=
-

PRIORITY LEVEL
LINE UNIT
;ttmf
SWITCH PACK #1 (REG 1 1)
:«*NOT
SWITCH PACK #2 (REG 1 5)
Jx«NQT
SWITCH PACK #3 (REG 1 6)
. CABLE TURNAROUND (DEFAULT = CABLE( 5))
s **NOT USED - BAUD RATE
; **NOT USED ~ RUN SWITCH
JaxNOT

ENDHW

.SBTTL

USED - MICROPROCESSOR TYPE

;DMR11 CSR_UNIBUS ADDRESS DEFAULT
;DMR11 INTERRUPT VECTOR DEFAULT

L10000:

DEFAULT SOF TWARE P-TABLE

SIII1LI11177777777777777777777777777777777777777777777777777777777777/77777777
;/ THE 50FTWARE P-TABLE CONTAINS THE VALUE OF THE PROGRAM

:/ PAR-METERS THAT CAN BE CHANGED BY THE OPERATOR.
JILIIIILIITI77777777777777777777777777777777777/777777777777777777777777777¢77

002222
002222
002224
002224
002224

002226
002226

000001

BGNSW

SFPTBL

LESW::

SFPIBL::

000005

SPEED:
ENDSW

.WORD

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

WORD

L10001-L8$SW/2

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09 :34
CZDMIA.P11

30A(1052)

vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvva

)

PAGE 2-5
SEQ 0028

GLOBAL EQUATES SECTION

SIIIIIIITI777777777777777777777777777777777777777777777/770/7777/7777777777777
:/
THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT
o/
ARE USED IN MORE THAN ONE TEST.
/////////////////////////////////////////////////////////////////////////////

002226

N PN
) md

EQUALS

> BIT DIFINITIONS

TN IENID N TN IO NN N PN PN N PN N PN TN TN N PN NN PN PN PN PN PN PN PN PN PN PN N PN PN PN PN PN PN PN PN PN PN PN PN PN
—t ek md e e d D b ) e wd ad d D el e oed ) ) e e ad cad el eed ) ) ) e D ) ) —d D D e D e d e b cnd d D D

09:36

GLOBAL EQUATES SECTION

.SBTTL

2342

13-MAR-80

BIT15== 100000
BIT14== 40000
BIT13== 20000
BIT12== 10000
BIT11== 4000
BIT10== 2000
BIT09== 1000
BIT08== 400
BITQ7== 200
BIT06== 100
BITOS== 40
BITO4== 20
BIT03== 10
BIT02== 4
BITO1== 2
BIT00== 1

BIT9==
BIT8==
BIT7==
BITé==

BIT5==
BIT4==

BIT3==
BIT2==
BIT1==

BITO==

BIT09
BIT08

BITO7

BIT06
BITO0S
BIT04
BIT03
BIT02
BITO?
8IT00

* EVENT FLAG DEFINITIONS
:

EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION

EF.START==

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

32.

31.
30.
9.
28.

* PRIORITY LEVEL DEFINITIONS

000140

PRIO7==
PRI06==
PRI0S==
PRI04==
PRI03==

340
300
240
200
140

: START COMMAND WAS ISSUED

* RESTART COMMAND WAS 1SSUED
* CONTINUE COMMAND WAS ISSUED
* A NEW PASS HAS BEEN STARTED
: A POWER-FAIL/POWER-UP OCCURRED

CZDMIAO DMR-11 FUNCTIONAL TECTS MACY11
CZDMIA.P11
13-MAR-80 09:34

(1)
(1

000100
000040
000000

Sk
(1)
1)
(1)

(1)

(1)
1)
1
1)
1)
(1)
1)
(1)
(1)
(1)

23"4

2361
2362
2363
23

000100
000200
000400
001000
002000
004000
010000
020000
040000
100000

ISR==
==
BOE==
PNT==
PRI=
IXE==
IBE==
IER==
LOE==
HOE==

000040

1DU==

4
10
20

100
200
400
1000
2000
4000
10000
20000
40000
100000

.'.'*tt*t*fii**ttfi*'!’*ttt'i*tt*ttfi*ttttitttfitttttkfittfltfitittfittttttitt*ttt

.‘"tit*tttt*tt**t**t*t'fi*ttit*'i*t*t*tfiitt**‘tl‘t**“*Qitttttt*tt*tttt't*t

sSWITCH REGISTER OPTIONS

100000

040000

020000
010000
004000
002000
001000

000400
000200
000100
000020

000010
000004
000002
000001

2366

2367
2368
2369
2370
2371
2372
2373
2374
2375
2376
2377
2378
2379

PRI00== 0

Evi==
LOT==
ADR==

S%fig

2351
2352
2353
2354
2355
2356
2357
2358
2359
2360

PAGE 2-6

PRI02== 100
PRIOT== 40

000004
000010
000020

23‘.6

2350

;OPERATOR FLAG BITS

2345

2349

30A(1052)
13-MAR-80
09:36
GLOBAL EQUATES SECTION

swi5=

Swik=

100000

40000

Swi3=
swi2=
swil=
Swi0=
SW09=
SwWOB=
Sw07=
Swo6=
SW05=
Swok=

400
200
100
40
20

Swo0=

Sw03=
SW02=
Swol=

20000
10000
4000
2000
1000

10
4
2

*t*tt"t*ttt*tti*fil*t'iittttfi*lttttttQi*tl‘tt!‘fiitttifit'*ti*ti*tt*"iitt

100000
040000
020000
010000
004000
002000
001000
000400

000200
000100

sCSR AND STAUS WORD DEFINITIONS
:1SELO (CSR) - BSELO/BSEL1
RUN=
BIT1S5
;SET IF RUNNING
MCLR=
BIT14
JMASTER CLEAR OF PROCESSOR AND LINE UNIT
MDIAG= BIT13
:CSR MAINTENANCE - ENABLE MICRODIAGNOSTICS

STLU=
LPLU=
ROMO=
ROMI=
STUP=

BIT1?
BIT11
BIT10
BIT9
BITS

RDI=
IESET=

BIT?
BIT6

;CSR MAINTENANCE - STEP LINE UNIT
(SR MAINTENANCE - LINE UNIT LOOP
*CSR MAINTENANCE
*CSR MAINTENANCE
:CSR MAINTENANCE = USED WITH LOOP LU
UHE“ ASSERTED, XMITTER SHIFTS: CLEAR, RtC. SHIFTS
*CSR - DMR11 READY RESPONSE
;CSR = INTERRUPT ENABLE INPUT - DMR11 INTERRUPTS

SEQ 0029

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

PAGE 2-7

SEQ 0030

;CPU WHEN RDI SET IN RESPONSE TO RQI BEING SET.
;CSR = REQUEST IN
:CSR = INTERRUPT ENABLE INPUT - DMR11 INTERRUPTS
:CPU WHEN RDI CLEARS IN RESPONSE TO RQI BEING (.EAR.
; (DMR RUN MODE ONLY)
;CSR - IF O, TRANSMIT
&
IfF 1, RECEIVE

000040
000020

RQI=
IECLR=

BITS
BIT4

000004

RCv=

BIT2

000200
000100

RDO=
IEO=

020000

BASEUP= BIT13

;SEL6 - CONTROL OUT - RESPONSE TO DMR MODE BASE

010000

RES=

BIT12

;SELS - BASE IN -- WHEN SET CAUSES

010000
004000

CTS=

BIT1?

;SEL6 ~ CONTROL OUT =~ CTS FAILED
sSEL6 - CONTROL IN -- START TIME (3 SEC IF SET

002000
002000
001000
000400
000522

000400
000200
000100
000100

000040
000020
000010
000010
000004
000004
000002
000001

;. SELZ - BSELZ/BSEL3

BIT
BIT6

;. SEL6 - BSEL6/BSEL?

SECN=

BIT11

HDX=

BIT10

HALTC=
MAINT=

DMR=

BIT9
BITE8
BIT8!122

NXM=
STREC=
DISCON=
DTR=
DMRRUN=
TOLONG=
MAINT1=
MNTREC=
NOBFR=
MAINTZ=

BIT8
BIT7
BIT6
BIT6
BITS
BIT4
BIT3
BIT3
BIT?2
BIT?2

(D=

TOUT=
NAKS=

BIT10

BIT1
BITO

;SEL2 - DMR11 SETS TO INDICATE DATA READY FOR QUTPUT

;SEL2 = SET TO ENABLE DMR11 TO INTERRUPT WHEN RDO

TABLE UPDATE COMMAND.

RESUMPTION OF OPERATION

1 SEC IF CLEAR)

;SEL6 - HALF-DUPLEX & CLEAR FOR FULL=-DUPLEX
;SEL6 - CONTROL OUT - (D GLITCHED
;SELG6 - EXTENDED CONTROL OUT - HALT COMPLETED
;SELO - DDCMP MAINTENANCE DURING CONTROL IN
;SEL6 ~ BASE IN ~- SET FOR DMR11 MODE
:
122 IS THE DMR PASSWORD FOR BSEL6 AND
:
BIT8 SETS THE DMR MODE BIT IN BSEL7
;SEL6 - CONTROL OUT ~ NON EXISTENT MEMORY
;SEL6 -~ CONTROL OUT - START RECEIVED
;SELG - CONTROL OUT -~ DISCONNECT
;SELG - MODEM WRITE - DATA TERMINAL READY
;SEL6 - CONTROL OUT - DMR RUN MODE
;SEL6 - CONTROL OUT - MESSAGE TOO LONG
;SELO - MODEM WRITE - LOCAL MODEM LOOPBACK
;SEL6 - CONTROL OUT - MAINTENANCE MSG. RECEIVED
;SEL6 - CONTROL OUT - NO BUFFER
:SEL6 -~ MODEM WRITE -~ REMOTE MODEM LOOPBACK

;SEL6 - CONTROL OUT - TIME OUT
;SEL6 - CONTROL OUT - NAKS THRESHOLD EXCEEDED

ttttttfi**t**ttttttititttttttt‘!tttttt (2882282222222

..DDCMP COMMANDS ~ BITS O & 1

000013

TIMER=
THRE SH=

b DN ONN SN
—=O

= O

s INPUT (SELO)

BAC(CT=
CNTRL=
HLT=
BASE 1=
BACCR=
WMODEM=
EXERR=
DXERR=
ODMC
=
UPDATE=

—
W

2380
2381

30A(1052)
13-MAR-80 09: 36
GLOBAL EQUATES SECTION

d282

2322222222222

IN SELO AND SELZ

;BUF ADDRESS AND CHARACTER COUNT TRANSMIT
;CONTROL COMMAND (IN OR OUT)
JHALT COMMAND
;BASE IN COMMAND
:BUF ADDRESS AND CHARACTER COUNT RECE]VE
;WRITE MODEM STATUS REGISTER

;ENABLE EXTENDED ERROR NOTIFICATION
;DISABLE EXTENDED ERROR NOTIFICATION
sDESELECT DMC LINE MODE
;REQUEST BASE TABLE UrDATE
;SET REP/SELECT TIMER VALUE
;SET THE FOLLOWING THRESHOLDS:

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

30A(1052)
13-MAR-80
09:36
GLOBAL EQUATES SECTION

2436
2437
2438

24639

000014
000015
000017

RRAM=
14
INTER=
15
RMOCEM= 17

2644
Szzg

000007

sOUTPUT (SEL2)
(MD=
7

2[,1,7

SEQ 0031

:NO BUFFER

;READ M8207 RAM (0-377)
;WRITE INTERFACE IN AX3-15
;READ MODEM STATUS (=NOP)
NOTE:

;

CNTRL IS USED FOR SEL?2
%% {AASK USED TO CLEAR COMMAND BITS 0=2 #»

'-‘-t*ttkttttttttttktttttQttttttttttt*ttittttttttt*tttttttttttttttttttttt

2648

:;BASE TABLE OFFSETS

2449

2454

3
PAGE 2-8

;NAKS RECVD
;NAKS SENT
:REP/SEL

2640
2641
%22%

2450
2451
2452
2453

;NOTE:

00004?2

R-

THE

OFFSETS

FOR BASE+3.-BASE+10 WERE

;INTENTIONALLY NOT LABELLED, BECAUSE THOSE LOCATIONS
;MUST NOT BE CHANGED IN ORDER TO BE DMC COMPATIBLE.
; THE LABELS BELOW CORRESPOND WITH THOSE USED IN THE
;DMR MICROCODE.

;#R - MESSAGE RECEIVED

2455
2456
2457
2458
2459
2460
2461
2662

000043
000044
000045
000046
000055
000060
000062
000064

N=
A=
T=
X=
PRETIM=
THiL=
TH2L=
TH3L=

43
44
45
46
55
60
62
64

J#N - MESSAGE TRANSMITTED
;#A - MESSAGE ACKNOWLEDGED
;#T = NEXT MESSAGE TO BE TRANSMITTED
;#X = LAST COMPLETED TRANSMISSION
;PROGRAMMABLE REP/SEL TIMER VALUE.
;THRESHOLD LEVEL - NAKS RECEIVED .
; THRESHOLD LEVEL - NAKS SENT.
;THRESHOLD LEVEL - REP SENT.

Szgg

000076

ISP13=

;s IMAGE DOF SCRATCH PAD 13

24663
24664

000066
000072

2467

000207

2472

2474

2478

;THRESHOLD LEVEL - NO BUFFER AVAILABLE.
; IMAGE OF SCRATCH PAD 7

;: INSTRUCTION DEFINITIONS

2473

2475
52;9

66
72

;; tttttttttttttttttttittttttitttttttttttt*tttttttttfiitttl | 2233222222223

gzgg

%2;?

TH4L=
ISP7=

RE TURN=207

:RETURN FROM SUB.

JSR PC]

:.'ttttttttttttttttttttt'tittttttttttttttttttttfittttittttt*tttttttttt'tt

000015
000012

. MISC. EQUATES

CR=
LF=

15
12

;ASCII CARRIAGE RETURN
JASCII LINE FEED

CZDMIAO DMR-11 FUNCTIONAL TEZTS MACY11
13-MAR-80 09:34
CZDMIA. P11

2480
2481
2482
2483

30A(i052)
13-MAR-B0
GLOBAL DATA SECTION
.SBTTL

09:36

PAGE 2-9

SEQ 0032

GLOBAL DATA SECTION

SIITIIIITILI777777777777777777777777777777777/7777/7777/77777/77777777/7777777777

2484

THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED

:/
IN MORE THAN ONE TEST.
/’///////////////////////////////////////////////////////////////////////////

2485
2486
2487

2488

2489
2490
2691
2492
2493
2494
2495

. ttt't*l'ttttfittttttttt't"t.ttt'ttt!tfitittt.ittt.'t*tt'ttttt*tttttttt

:DMR11

DMRVEC:
OMTVEC:
CSR:

26496

.WORD
.WORD
.WORD

O
O
0

LWORD
.WORD

O
O

SELZ:

.WORD

SELO=
BSELO=
BSEL1:
BSEL2=
BSEL3:

(SR
CSR
.WORD
SELZ2
.WORD

SELG:
SELG:

2497
2498
2459
2500
250
2502
2503

VECTOR AND REGISTER

BSEL4=

BSELS:
BSEL6=
BSEL7:

SEL4

.WORD
SEL6
.WORD

INDIRECT POINTERS

;DMR11 RECEIVER INTERRUPT VECTOR
;DMR11 TRANSMITTER INT. VECTOR
;POINTER TO DMR11 CONTROL STATUS REGISTER

;POINTER TO DMR11

;CSR IS SELO
;LOW BYTE OF CSR
;POINTER TO DMR11 (SR HIGH BYTE
;LOW BYTE OF SEL2
sPOINTER TO SELZ2 HIGH BYTE

O
0

sPOINTER TO DMR11
JPOINTER TO DMR11

CONTROL OUT REGISTER (SEL 2)

PORT REGISTER (SEL 4)
PORT REGISTER (SEL 6)

;LOW BYTE OF SEL4

;POINTER TO SEL4 HIGH BYTE
;LOW BYTE OF SEL6
;POINTER TO SEL6 HIGH BYTE

. tt!tttttttttt'tttt't""t’tfittt*tfitttfitttttttttttt'itttttfitttttfittt'Q

::OTHCR HARDWARE PARAME TERS

002252
002254
002256

000000
000000
000000

WIYPE:
DMTURN:
MICRO:

_WORD
.WORD
.WORD

O
O
O

sMICROPROCESSOR TYPE
s TURN AROUND TYPE (0-7)
sMICRODIAGNOSTICS (IF 1(YES)

- ENABLcD)

- tt.t'tttttttfit'ttQtti'"'ttttttttttfi*ttltQt'tfittttttifitt.ttttf
itttt*t'

:PROGRAM CONTROL

PARAME TERS

002260

000000

DMRFLG:

.WORD

;FLAG SET WHEN DMR MODE IS REQUESTED IN
:THE BASE IN COMMAND.
USED TO FLAG THAT

002262

000000

INFACE:

.WORD

SJFLAG TO ALLOW CHANGE OF

FRSTIM:
FRSPAS:

_WORD
_WORD

0
0

;FLAG=0 IF
;FLAG=0 IF

002264
002266
002270

000000

002272
002274
002276

020000

002302

000000

STARES:

START:

RESUME:

DMCMDE:
MNTMDE:
MMANAG:

.WORD

_WORD

.WORD

.WORD
.WORD
.WwORD

0
0
0

;A DMR MODE ACKNOWLEDGE IS EXPECTED.

;BY WRITING AX3-15.

JFLAG=0 IF

INTERFACE TYPE

FLAG SET/CLEARED IN INIT.

PROGRAM JUST LOADED
FIRST PASS AFTER LOAD

1ST TIME

THRU AFTER STA OR RES

JFOLLOWING PARAMETERS ARE USED IN THE
s INTERRUPT TESTS (TESTS 15-19):

JFLAG SET WHEN A CONTROL
JFLAG SET WHEN A BASE

IN HAS BEEN ]SSUED.

IN WITH RESUME DESIRED.

;FLAG SET WHEN A BASE IN WITH DMC MODE DESIRED
JFLAG SET WHEN MAINTENANCE MODE IS DESIRED.
;FLAG RETURNED IN THE SUBROUTINE $BUFFS

CZDMIAO DMR~-11 FUNCTIGNAL TELTS MACY11
13-MAR-80 09:34
CZDMIA.P11

2536
2537
2538
2539
2540
25641
2542
2543
2544
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554

2555

2556
2557
2558
2559
2560
2561

30A(1052)

13-MAR-80

GLOBAL DATA SECTION

09:36

3
PAGE 2-10

SEQ 0033

JMMANAG=1, MEMORY MANAGED BUFFERS USED
002304

000000

AX3:

.WORD

;BIT PATTERN TO WRITE

INTO AX3-15, WHEN

1T IS REQUESTED TO ALLOW INTERFACE
JSELECTION. (TEST CONFIGURATION 1-4)
;BITO = TEST BIT (MUST BE SET TO ALLOW SELECT)

JBIT3 = INTEGRAL MODEM
:BIT4 = v.35
;BIT6 = E]A

002306

000000

WMAINT:

ALAS

.WORD

:BIT7 = RS422

*PROGRAM VARIABLES

JFLAG SET WHEN IT

]IS NECESSARY TO WRITE

sMODEM MAINTENANCE BITS (MAINTENANCE 1 & 2)
;THIS FLAG IS SET OR CLEARED IN THE INIT CODE.

22222222220

;WORD1~WORD3 VALUES DETERMINED IN INIT
*CODE DEPENDING ON THE BAUD RATE.

002310

WAIT1:

_WORD

;VALUE FOR TIMEOUT COUNTER

002312

WAITZ2:

.WORD

;VALUE FOR TIMEQOUT COUNTER USED IN SMSCLR

002314
002316
002320
002322

WAIT3:

_WORD

;VALUE FOR TIMEOUT COUNTER USED IN SINOUT.

WAIT4:
BUFSIZ:
BUFNUM:

002324

INRCV:
INXMIT:
OUTRCV:
OUTXMT:

002332

000000
000000
000000
000000
000000

_WORD
.WORD
.WORD

O
O
O

_WORD
WORD
.WORD
.WORD

0
O
0
O

A A AR AR R AR AN A AN A AN

:* MISCELLANEOUS STORAGE

TEMP:

SAVE:

FLAG:

SFLAG:
SKIP:

WORD

.WORD

.WORD
.WORD

O
0

sUSED IN SWAIT SUBROUT INE

;AND $CLRQI SUBROUTINES.

sWORD USED AS OUTER LOOP COUNTER IN SINOUT.
;CALCULATED BUFFER SIZE IN BYTES.
;# OF RECEIVE & TRANSMIT BUFFERS.
THIS

SVARIABLE IS USED IN THE SUBROUTINE $BUFFS
;COUNTER
COUNTER
sCOUNTER
;COUNTER

FOR
FOR
FOR
FOR

#
#
#
#

OF
OF
OF
OF

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

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

RN AR AR R RN AR NN AR AT AN NN ANRRRRANANARRNNAAN

AN RAANR

;SCRATCH WORD USED FOR MISC.

STORAGE

sSCRATCH WORD USED FOR MISC.

FLAG IN SUB.

;SCRATCH WORD USED FOR MISC.

STORAGE

IN SuB.

IN SUB.

;FLAG USED IN TEST 15 FOR LOOP CONTROL.
sFLAG USED IN TEST 7 TO MARK WHETHER TO SKIP

;A PORTION OF THE TEST.
002000
000000
000000
000000

000000

INFLAG:

.WORD

;FLAG USED IN INISR TO FLAG WHEN ALL THE

OUTFLG:

.WORD

;FLAG USED IN OUTISR TO FLAG WHEN ALL

.WORD

RESFLG:

ERRFLG:

.WORD

LAST:

WORD

;BA/CC INS HAVE BEEN DONE.

;BA/CC OUTS HAVE BEEN DONE.

JFLAG USED

IN IN ISR TO FLAG THAT

;COMMAND HAS JUST BEEN [SSUED.

JFLAG USED IN THE WAIT SUBROUTINES

THE

THE RESUME

(SWAIT

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

;THE

INPUT

INTERRUPT ROUTINE.

CZDMIAOC DMR-11 FUNCTIONAL TECTS MACY11
CZDMIA.P11
13-MAR-80 09:34

2592

2593
2594
2595
2596

002360

002362
002364
002366
002370

30A(1052)
13-MAR-80
GLOBAL DATA SECTION

000000
000000
000000
000000
000000

NESTPC:

000000

ERROR:
LOGDEV:

.WORD
.WORD

SUBRPC:

.WORD

CLRNO:

.WORD

PSTACK:

.WORD

09:36

0
0

PAGE 2-11

SEQ 0034

sERROR STORAGE
sLOGICAL DEVICE NUMBER

;CONTAINS BASE LEVEL PROGRAM SP

sPC OF SUBR CALL FOR ERROR REPORTS

SFLAG TO NOTIFY WHEN A SUBR IS NESTED

s IN ANOTHER SUBROUTINE (WHEN SET)

sTHIS WORD IS INCREMENTED DURING EACH MASTER

;CLEAR.

THIS WILL ALLOW EVERY OTHER MASTER

;CLEAR TO RUN THE MICRO TESTS.
2603
2604
2605
2606
2607

2608

00237¢
002376
002400
002402
002404

LOCRC:

HICRC:

.WORD

HIWORD:
ROMADR:
CHIPNO:

.WORD
.WORD
.gegg

LOWORD:

002406

.WORD

sROM CHECK VARAIBLES

;CRC STORAGE FOR LOW BYTE CHIP

sCRC STORAGE FOR HIGH BYTE CHIP

O
O
0

;TEMP. WORD CONTAINING 2 CONSECUTIVE HI BYTES
;POINTER TO ROM ADDRESS.
;CHIP NUMBER BEING CHECKED.

;TEMP. WORD CONTAINING 2 CONSECUTIVE LOW BYTES

:;tttt*tttfifitttttfitttttt'ttttfitttt**iitlfifitttttt*i't.ttttttfitttt'titttt
::ttttttt**tttt**t*ttttttttt'fitttfi*fi.tti**t'fitt*tttittttttitittttttttt'

;;BUFFER AREA
:

¢ CCITT PSUEDO-RANDOM TEST PATTERN »=

; THE FOLLOWING 32 WORDS TRANSLATE INTO A 512 BIT PATTERN

; THAT WAS GENERATED ACCORDING TO CCITT RECOMMCNDATION V.52.
THIS
. PATTERN WAS GENERATED BY A 9 BIT SHIFT REGISTER (INITIALIZED
: AS 1S) WHOSE 5TH 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.

2623
2624
2625
2626
2627
2628
2629
2630
2631
2632
2633
2634

002410
002410
002416
002424
002432
002440
002446
002454
002462
002470
002476
002504

177603

157427
163715
142304
052606
123754

016741

031011
105221
040041
172334
111337
145064
063617
026575
070071
031605

$CCITT:

. NOTE: CCITT RECOMMENDED 511 BITS,
; ON A WORD BOUNDARY.
.WORD
LWORD
WORD
-WORD
.WORD
.WORD
.WORD
.WORD
-WORD
.WORD
JWORD

I'VE EXTENDED THIS BY 1 BIT TO END

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

::ttittttttttttttttttt't'itttttttttttitttttttfitlttt.ttttttittttitfittttt

;. TRANSMIT BUFFER (SMALL)
TFLAG:

042103
045111
050117
053125
030460
033466

.WORD

LASCIZ

/ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789/

TCOUNT= 36.
TBUF :

;FLAG FOR STATUS OF

; CHARACTER COUNT OF

TRANSMIT BUFFER

TBur

CZDOMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

2642

30A(1052)
13-MAR-80
GLOBAL DATA SECTION

002560

09:36

PAGE 2-12

SEQ 0035

.EVEN
::l*tttttti.fitttQtt*"i"'tttfitt'ttttttt*tt.*ttttttttttttttttitttlttttt

;. RECEIVE BUFFER (SMALL)
2648
2649
2650

002560

002562

000000
000044
000046

RFLAG:

.WORD

RBUF :

.BLkB

38.

RCOUNT= 36.

;FLAG FOR STATUS OF RECEIVE BUFFER

sCHARACTER COUNT OF RBUF

:36. BYTE BUFFER + 2 BYTES USED
:TO MARK THE END OF

.EVEN
RS

*: BASE TABLE
2657

002630

000400

BASE:

.BLKB

dddldtd

sttt

256.

ltl22

SRR Sl

;;

TRANSMIT AND RECEIVE BUFFER POINTERS

ittt

2288283232282

222¢2

:MICROPROCESSOR MEMORY ALLOCATION

2222222

THE RECEIVE BUFFER

sl ittty
2222202]

2662

003230

000200

XMTBUF: .BLKW

128.

;POINTERS TO TRANSMIT BUFFERS

(UP TO 64)

2664

003630

000200

RCVBUF:

1728.

;PGINTERS TO RECEIVE BUFFERS

(UP TO 64).

.BLKW

R AR AR R

A AR AR AR AR

;1 WORD FOR ADDRESS AND 1 WORD FOR CHAR. COUNT

AR A AR AR A A AR AR RN AR RN AR

N NN RN AN TR AN

;. BUFFER AREA (LARGE)
2669

004230

004000

BIGBUF:

.BLKB

4000

;MAX BUFFER

(2K BYTES)

R AN RN

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA.P11

(4)

(3
(2)
2688
2689
2690
2691

.SBTTL

09:36

3
PAGE 2-13

SEQ 0036

GLOBAL TEXT SECTION

2 2222493922498994484449444998909949493344433334333433334903%888888
3893849944344
;¥4
THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,

;§

MESSAGES
ANE AECII INFORMATION THAT ARE USED IN

TR XY

EZZX%XZXXXZZZXXXXXXXXXXZXXXZXXXZZZZ%ZXZXXZXZXZXXXXXZ!ZXZXZZ%Z%Z%Z%Z%ZXZZZ%%ZZ%
MAEAAE

AR E

ity

; NAMES OF DEVICES SUPPORTED BY PROGRAM

010230
010230
010230

iRl

DEVTIYP

046504

030522

A A

2222232382 2222222222

i Nd stt
Y222 22232322
t
222222222 )

<DMR11>

LSDVTYP::
LASCIZ
.EVEN

000061
AR

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

A AR AR

ARA

/DMR11/

;* TITLE OF PROGRAM

2692

AR AR AR A A AR

DESCRIPT

(3)
(3)
(3)
(3)
(2)
2693
2694
2695
2696

13-MAR-80

GLOBAL TEXT SECTION

2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687

30A(1052)

010260

046504
043040
047511
042524

026522
047125
040516
052123

AR AR AR AT AR

<DMR-11

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

FUNCTIONAL TESTS>

030461
052103
020114
000123

LSDESC::

LASCIZ

.EVEN

FORMAT STATEMENTS USED

IN PRINT

CALLS

/DMR-11 FUNCTION

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

CZDMIA.P11

13-MAR-80 09:34

13-MAR-80

GLOBAL SUBROUTINES

09:36

3
PAGE 2-14
SEQ 0037

%;}%

.SBTTL

7%
2715

11111117777 777777777777777777777777777777777777277777777777777777777777777777
2/
THE GLOBAL SUBROUTINES ARE CALLED BY MORE THAN ONE TEST

%;}9

2718

2719

GLOBAL SUBROUTINES

SIII11117771777777777777777777777777777771777777717777177777777777777777777777

"tttt*ttttttttttttttt*tttttttttfittttttttttttttttttttttttttt*tttttttttt

2720
2721
2722
2723
2724
2725

;
;
;
;
;
:

2728

E.tttttttttttttttt*tttttttttttttnttttttttttttttttt*ttttt*t*tttttttttttt

2730

. ttitttttt*t*ttttt*ttttttt*ttttttttttfit*tttittttttttttt*tttttttttttttt

5;59

2729

2731
2732
2733

2734
2735
2736
2737
2738
2739
2740
2761
2742

2743

MACROS - THERE ARE 2 BASIC TYPES OF MACROS USED
1. NORMAL MACROS 2. 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.

; CALL MACRO - CALL ROUTINE
= JSR PC, ROUTINE
;
(NOTE: RETURN IS EQUATED TO A RTS PC)
:;ttttttttttttt*t**tt*ttttttittttttttttttttt*tt*ttt*ttttttttt*tttttttt*
.MACRO
JIF
.ERROR
MEXIT
.ENDC
JSR
.ENDM

CALL
ROUTIN
B. ROUTIN
ROUTINE; ## MISSING ROUTINE-EXPANSION ABORT ##
PC,ROUTIN

e tttttttttttttttttttttttttttttttttt*ttttt*tt1tttttttttt*tttttttttttttt

2744
2745
2746

; 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

2748

.'ttt*tttttttttttttttttttttttttttt*tttttttttttittttt*ttt*ttttt*tttttttt

2747

2749
2750
2751
2752
2753
2754
2755
2756
2757
2758
2759
2760
2761
2762
2763
2764
2765
2766
2767

;

CALLED WILL CLEAR RQI AND WAIT UNTIL RDI IS CLEARED.

.MACRO WAIT
.NLIST
LIST ME
LIST
JF
.ERROR
MEXIT
.ENDC
JF
JSR
.ENDC
JIF
JSR

.ENDC
JIF
JSR

$FLAG

sxxxx MACRO EXPANSION #xxx
B. $FLAG
FLAG
;## MISSING FLAG FOR WAIT - EXPANSION ABORT ##

IDN $FLAG.RQ]
PC, $CLRQI

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

IDN $FLAG,RDI
PC, SWAIT
WORD
O

;CALL WAIT ROUTINE
JFLAG THAT WE'RE WAITING FOR RDI

IDN $FLAG,RDO
PC, SWAIT

:CALL WAIT ROUTINE

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
13-MAR-80
CZDMIA.P11
13-MAR-80 09:34
GLOBAL SUBROUTINES

2768
2769
2770
2771
2772
2773
2774
2775
2776
2777
2778
2779
2780
2781
2782
2783

2784
2785
2786
2787
2788

ENDC

09:36

m3
PAGE 2-15
SEQ 0038

LWORD

;FLAG THAT WE'RE WAITING FOR RDO
IRRAR

rann

.NLIST ME
. ENDM
AR

AR AR AR A AR

AR AR R AR

R RN A AR

AN AR AN RNN RN RN AR AR

E CLEAR MACRO =~ THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE

$MSCLR SUBROUT INE
L

.MACRO
C(LEAR
NLIST
LIST ME
LIST
JSR

AN AR Ad

PC,

$MSCLR

sxxxx MACRO EXPANSION wxxx

;ISSUE A DMR MASTER CLEAR
:ttifi

NLIST ME
.ENDM

L2 8

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:3¢4

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

2790

2N
2792
2793

2794

2795
2796
2797
2798

RN RN

AR R

2800

2801
2802
2803
2804
2805
2806
2807
2808
2809
2810

2819

2820
2821

2822

2823
2824
2825
2826
2827
2828
2829

gg%?

2832
2833
2834

2835

2836
2837

AR R AR AR RN RN R

A AR AR AR AR R R AR

3
PAGE 2-16

SEQ 0039

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

AR AN A

.MACRO BASEIN
.NLIST
LIST ME
LIST

$A,$8,$(

JSR

.IFF
JSR

-ENDC

2811

2818

ARNN AR

BASEIN MACRO = THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE
;
$BASEIN SUBROUTINE (WITH DEFAULT ARGUMENTS
H
IF ARGUMENTS NOT GIVEN)

2799

2812
2813
2814
2815
2816
2817

09:36

A AN

AR AR AR R R RN RAR AR AN

R A AR

R AR AR

saxxx MACRO EXPANSION wxxw

PC, $BASEI
.WORD
LPLU
.WORD
BASE
.WORD
DMR

;CALL BASE IN ROUTINE WITH DEFAULTS
¢SET LINE UNIT LOOP
;BASE TABLE ADDRESS
:DMR-11 MODE

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

;CALL BASE IN ROUTINE
JMAINTENANCE MODE BITS TO SET IN BSEL1
;BASE TABLE ADDRESS
:MODE
IRRRK

.NLIST ME
.ENDM

SRR AR AR R AR AR R A R AT R

A AN A RN A NN AR

222"

AN NAN KRR AR A RN

AANNAANEAKNARRE

; CNTRIN MACRO - THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE

;

$CNTIN SUBROUTINE (WITH DEFAULT ARGUMENTS

IF ARGUMENTS NOT GIVEN)

SRR AR AR AR R AR AR

MACRO
CNTRIN
.NLIST
LLIST Mt
LLIST

AT AR AN ARRANRA N AR RNARAARRRA AR N AR ARRANANNANRARR AR

s*xxx MACRO EXPANSION xxx<

.IF
JSR

B
$A
PC, SCNTIN

sCALL CONTROL IN ROUTINE WITH DEFAULT

JSR

PC, SCNTIN
.WORD
$A

;CALL CONTROL IN ROUTINE
;SEL6 - (DUPLEX, MODE)

IFF

-ENDC

.WORD

NLIST ME
.ENDM

;SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START.

JRERR

212

CZDMIAO DMR-11 FUNCTIONAL T§STS MACYT1
13-MAR-80 09
CZDMIA.P11

30A(1052)

13-MAR-80

09:36

GLOBAL SUBROUTINES
AR

AR A

AR AR AR AR AR

AR RN R AR AR AN A AN AR

NN NNRRRR I AR AR AR

THIS IS A DMR FUNTCTIONAL MACRO WHICH CALLS THE

;

4
PAGE 2-17
SEQ 0040

AR R AR AR A AN

; DMRIN MACRO =

$DMRIN SUBROUT INE

eI
ImImmmmTM

.MACRO
DMRIN
NLIST
LIST ME
LLIST
IF
.5§§?§

"ENDC

JSR

$A,$8,$C

sxxxx MACRO EXPANSION wxax
$A
## MISSING ARGUMENTS-EXPANSION ABORT ##

B
DMRIN;

IF
e

PC. SDMRIN
.WORD
$A
B
$8
WORD
O

:NO SEL4

-ENDC

.WORD

;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)

LWORD

:NO SEL6

'ENDC

.WORD

;SEL6 VALUE (OR BITS TO SET IN BSEL6)

$8
$C

;CALL DMR MODE INPUT ROUTINE
*INPUT COMMAND

:tttt

L 2 2 3¢

NLIST ME
-ENDM

AR AR

:
;

SHUTDN MACRO - THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE
$HALT SUBROUT INE

AR AT

AR A A AN A AN AT AR AR AR R AR KRR R AN AR R AR A NRA AR AN ARRANARRAARAN N R RN AN,

AT A A AN R AN

AR R AR RN AR AR RN R AR RN AN NN R AR AR R RRRA R AR

.MACRO
SHUTDN
NLIST
.LIST ME
LLIST

JSR

PC,

SHALT

srnxax MACRO EXPANSION wxxs

:DMR HALT ROUTINE.
"tt*t

.NLIST ME
.ENDM

LA 8

AN AN

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1T
13-MAR-80 09:34

2887
2888
2889
2890
2891
2892
2893
2894
2895
2896
2897
2898

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

09:36

4
PAGE 2-18
SEQ 0041

;:**tttittttit*Qtt*ttttt'tttttttfittttt*tttttfittt.tt*tttttQ'tttt*tltttit

. BACCIR MACRO =

THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE

H
;

$8ACC SUBROUTINE (WITH DEFAULT ARGUMENTS
IF ARGUMENTS NOT GIVEN)

[

:'tttt**tt.t'*"tQt**'ttt'**tttkt**fi*tttt*t'tttttttttt'tttttttttttt*tt'

’

.MACRO

BACCIR

IF
JSR

B
$A
PC, $BACC
;CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI!BACCR
;BA/CC IN RECEIVE COMMAND
.WORD
RBUF
JRECEIVE BUFFER
.WORD
RCOUNT
RECEIVE CHARACTER COUNT

.NLIST
LLIST ME
LLIST

$A.$8

sxrtenx MACRO EXPANSION wawx

LIFF
JSR

PC, $BACC
:CALL BA/CC IN ROUTINE
.WORD
RQI'BACCR
;:BA/CC IN RECEIVE COMMAND
.WORD
$A
;:BUFFER ADDRESS BITS 0-15
.WORD
$8
:BA BITS 16/17 AND CHAR. COUNT

.ENDC

:*tt*

L8 8

& ¢

NLIST ME
.ENDM

AAAASERE

LRttt

:"BACCIT MACRO :
;

e R

R AR R AR A

dddlldldsits

JSR
IFF

JSR

.ENDC

et e

82288222222

THIS IS A DMR FUNCTIONAL MACRO WHICH CALLS THE

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

AN AN R AR AR R R AR AR AR A RAN AN R AR RAAAARNARNRRARNNRARNRAANRANRRARNRAR

.MACRO
BACCIT
.NLIST
.LIST ME
LLIST
.

stttz

$A.$8

saxsn MACRO EXPANSION

wxxx

PC, $BACC
. CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI!BACCT
;BA/CC IN TRANSMIT COMMAND
.WORD
TBUF
;TRANSMIT BUFFER ADDRESS
.WORD
TCOUNT
;TRANSMIT CHARACTER COUNT

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

.WORD

%8B

;BA BITS 16 & 17 AND (CHAR.

;tt*t

NLIST ME
. ENDM

LR R

COUNT

CZOMIAO DMR~11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZOMIA.P11

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

09:36

LSS

4
PAGE 2-19
SEQ 0042

CERARARNRRARANAN
RN AR

AR RN N

Rdldddddl

R R AR R AN AN RN

AN AR AR R AR ARA I RAANT AN

szttt

233022232222

SUBROUTINE $WAIT
FUNCTION

TO WAIT FOR RDI

TO BE

SET

OR RDO TO BE SET IN SELZ2

CALLING FORMAT:

IN SELO

JSR
PC,
SWAIT
.WORD
FLAG
(MACRO CALL -- WAIT RDI)

NESTING LEVEL

MAY BE

ENTRY CONDITIONS

FLAG

CALLED FROM ANOTHER SUBROUT INE
=1

WAIT FOR RDO

WAIT FOR RDI

= 0

ROUTINE NOT NESTED.

WAIT1 = DELAY COUNTER (DETERMINED IN INIT.)
NESTPC= 1
ROUTINE NESTED WITHIN ANOTHER
SUBROUTINE .

EXIT CONDITIONS

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.

005037
005737
001005
011637

002354
002370

162737

002366
000004

010320

017637
062716

000000
000002

010324
010326
010330

010046
010146
013701

010334
010334
010336
010336
010344
010346

002366

002334

10%:

30%:

000200

171670
171656

:
408

BNE
MOV
SuB

MOV

[

<
m

—

0
(=]

1%]

1%]
—
m

002310

000200

(2]

CLF

005000

032777
001034
032777

]

THIS WILL RESULT IN A HARD ERROR MESSAGE
AND THE CARRY BIT WILL BE SET.
THE CARRY
BIT SET FLAG THE ERROR CONDITION.

ERRFLG
NESTPC
108
(SP)
, SUBRPC
#4 , SUBRPC
a(SP) ,TEMP

RESTORED

;CLEAR ERROR FLAG
;IS THIS NESTED IN ANOTHER SUBROUTINE?

JYES = USE

THE SUBRPC ALREADY CALCULATED.

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

:GET THE FLAG FOR RD]I OR RDO
JINC THE PC LEFT ON THE STACK TO POINT

ADD

#2,(SP)

MOV
MOV
MOV

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

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

(LR

SINNER LOOP COUNT OF DELAY COUNTER

8IT
BNE
BIT

#RDO,QSEL2

60%

#RD1,QSELO

JPAST THE FLAG ARGUMENT

;1S THE RDO BIT SET IN SELZ2?

JYES = EXIT BIT CHECK LOOP,

;1S THE RDI BIT SET IN SELO?

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA. P11
2995
2996
(3)
2997

010354
010356

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

001062

2998
2999
(2)
(2)
(2)
(2)
(2)
(2)
(2)

000001

4
PAGE 2-20

SEQ 0043

BNE

70%

JYES - EXIT
;CALL SUPERVISOR - ALLOW CONSOLE INTERRUPT.

DEC
BNE
DELAY

RO
40%
1

;LOOP UNTIL RO RETURNS TO O

BREAK

010356

09:36

TRAP

;DELAY 100 MICROSECONDS

81,(PC)+

002116

b$DLY,(PC)*

177772

-6(PC)
.~4

177756

(2)

DEC

BNE
ERRDF

30$
1,EMG1,ERRG?

;BETWEEN LOOPS.
JREPEAT UNTIL MAXIMUM LOOP SATISFIED.
;TIME OUT ERROR

002354
60%:

002334
0C0001

ESERDF

.WORD

EMG1
ERRG2

ERRFLG
100%

:SET ERROR FLAG
;BRANCH TO COMMON EXIT.

TST

TEMP

;WERE WE WAITING FOR THE RDO FLAG?
JYES - 0K, EXIT.
;IS THIS CONTROL OUT ERROR EXPECTED?
;IF YES, DON'T REPORT THE FOLLOWING ERRORS.
;RECEIVED AN RDO, WHEN WAITING Fgg RDI
Vv

171532

8IT
BEQ

002354
70%:

010550
010554

402370

#CNTRL ,3SELZ
1009

9 ,EMG9,ERRG?

;IS THIS A CONTROL OUT?
sNO NEED TO CHECK ERROR CODES.
JUNEXPECTED CONTROL OUT.

ERRFLG
100%

:SET ERROR FLAG.

TST

TEMP

JWERE WE WAITING FOR

100%
#FMS?2

4, SP

CSERDF
9

EMGY
ERRGZ

INC
BR
BEQ
PRINTB

010641
000001
000004

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

SP,RO
CSPNTB

ERRDF

002334

100%
#CNTRL ,ERROR
1008

PRINTB #FMS1

010600
000001
000004
000001

INC
BR

BNE
cMP
BEQ

002360

=22(PC)
.=20

TRAP

.WORD
.WORD

012746

($8RK

THE RDI

FLAG?

JYES =~ OK, EXIT
JRECEIVED AN RDI, WHEN WAITING FOR RDO

#FEM
- S2
(SP)

#1,-(SP)

SP,RO
CSPNTB

100$:

#4,SP

TST

BNE

NESTPC

105%

JWAS THIS NESTED

;1F

IN ANOTHER SUBROUTINE?

YES - LEAVE THE SUBROUTINE PC ALONE

CZDMIAO DMR-11 FUNCTIONAL TE,LTS MACY 11
CZDMIA.P11
13-MAR-80 09:34

010556
010562
010562
010564
010566
010572
010574

010576
C10576

3035

3036
3037
3038

010600
010606
010614
010622
010630
010636
010641
010646
010654
010662
010670
010676

005037
012601
012600
005737
001401
000261

002366

054105
047111
022517

13-MAR-80

GLOBAL SUBROUTINES
1058

T
002354
1108

09:36

PAGE 2-21
SEQ 0044

CLR

SUBRP(

:CLEAR

MoV

(SP)+.R1

:RESTORE R1

ERRFLG

*WAS

MOV

BEQ

000207

047045
020117
044127
050130
043516
047045
045
044504
053440

30A(1052)

SEC

(5P) + RO

1108

THE PC

"RESTORE RC
THERE AN ERROR

*SET CARRY.

RE TURN

0460445
042523
047105
041505
051040
000
022516
051440
042510
042520
020107
000116

042122
020124
042440
044524
044504

FMS1:

.ASCIZ

/INYARDO SET WHEN EXPECTING RDIXN/

051101
052105
020116
052103
042122

FMS2:

LASCIZ

/XINXARD]

.EVEN

(CARRY (LEARED ON TST)

“IF NOT, RETURN WITH CARRY CLEAR

SET WHEN EXPECTING RDOXN/

CZDMIAO DMR~11 FUNCTIONAL TECZTS MACY11
13-MAR-80 09:34
CZDMIA.P11

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

09:36

&
PAGE 2-22

SEQ 0045

.‘"ttttitiitt'fit"i'l"fi""it'i*iifitfififi'ttfilttttitfittttt*tttttfitt'tttttt
""ttttit'l*ttfittlttfil"'"'iifi*fi*tttfitttttfitfiifittttfitfitfittttil'fittt"t'

SUBROUTINE $CLRQI

FUNCTION =

TO CLEAR RQI AND WAIT FOR RDI TO BE CLEARED

CALLING FORMAT:

NESTING LEVEL

ENTRY CONDITIONS ~ WAIT2 = DELAY COUNTER (DETERMINED IN INIT. ROUTINE)

JSR

$CLRQ]

- MAY BE NESTED WITHIN ANOTHER SUBROUTINE

PC,

(MACRO CALL -- WAIT RQI)

NESTPC= 1

ROUTINE NESTED wITHIN ANOTHER

ROUTINE NOT NESTED.

SUBROUT
INE .

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

:'"*tl’tt‘ktttittttttt*t*ti"tl"ttfifitfifit*fi**ttfitktiittt'tififltt'tt'tttt*tt'
010702
010702

010706
010714
010720
010722

010726
010734
010734
010736
010740

010744
010744
010746
010746
010754

",'tiit*ttti*tttttfitt*'t*'itfifit’fii'tit*fittttfittflt**iitt*tt*tfittttttfit'tit

005037
042777
005737
001005
011637
162737

010046
010146
013701

002354
000040
002370

002366
000004

$CLRQI:

171316

BNE

002366

MOV

10
T

002312
12

005000

032777
001427

000200

104422

005300
001371

012727

000001

013727
000000
005367
001375

002116
177772

CLR
BIC

171256

ERRFLG
#RQI,ASELO

;CLEAR ERROR FLAG
*REQUEST INPUT CLEAR

NESTPC

*1S THIS NESTED

(SP) , SUBRP(

*SAVE

108

SUB

#4 , SUBRPC

Moy

RO,=(SP)

IN ANOTHER SUBROUTINE?

*YES - USE SUBRPC CALCULATED
THE PC AFTER THE CALL

TO SWAIT.

:BACKUP TO THE PC OF THE ACTUAL CALL.

;SAVE RO

MOV
MOV

R1.~(SP)
WA T2 R1

*SAVE R1
‘GET THE DELAY COUNTER (DETERMINED BY
*BAUD RATE IN INIT ROUTINE)

(LR

: INNER LOOP COUNT

BIT
BEO
BREAK

#RD],QSELO
308

;1S THE RDI BIT CLEAR IN SELO?
SYES - EXIT

DEC
BNE
DELAY

RO
208
1

*CALL SUPERVISOR - ALLOW CONSOLE

;LOOP UNTIL RO RETURNS TO 0
:DELAY 100 M]CROSECONDS

INTERRUPT.

TRAP

(C$BRK

MOV
.WORD
MOV
LWORD
DEC
BNE

#1,(PC)+
O
LSDLY, (PC)+
0
-6(PC)
.~4

E%gnifio DMR=-11

&
OO

EEIA

DEC
BNE
ERRDF

10445?
00000

020014
015070
005237

002354
002370
002366

012601
012600
005737
001401
000261
000207

09:36

4
PAGE 2=23

SEQ 0046

177756

005301

)

011062

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

001352

ZREREFR

WNNINVNONIN)
— —

OOASHNOOONSN

D
d e

caid

d cwd

d ad

[elolalolololololelels)

005367
001367

d e
b
d

- Ganrd

(5)
()

—_— —

(4)

3089
3090
3091

(2)
(2)

2229292922222222e2

P11

FUNCTIONAL TELTS MACY11
13-MAR-80 09:34

50%:

sSET ERROR FLAG

TST

NeSTPC
40%
SUBRPC

;IF

MOV

002354

TST

50%:

;TIME OUT ERROR

ERRFLG

CLR

BEQ
SEC
RETURN

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

=-22(P()
-20

TRAP
.WORD

gSERDF

;REPEAT UNTIL MAXIMUM LOOP SATISFIED.

INC

BNE
40%:

R1
12%
1,EMG1,ERRG2

DEC
BNE

;WAS

.WORD
.WORD

EMG1
ERRG2

THIS A NESTED ROUTINE?

YES = LEAVE

;CLEAR THE PC

THE SUBRPC ALONE

;RESTORE R1

JRESTORE RO

;WAS

THERE AN ERROR?

(CARRY (LEARED ON TST)

;IF NOT = RETURN WITH CARRY CLEAR
;SET CARRY.

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
3108

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES
IR

R AN AR R A R R R

A AN

R AN R AR A A R R A

)

AN R AR AR RN AN AR AR A NN AR

TO PERFORM A MASTER CLEAR FOR

CALLING FORMAT:

THE DMR11

JSR
PC,
$MSCLR
(MACRO CALL == CLEAR)

NESTING LEVEL

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

CODE

(TEST,

e —d e

)

) nd

e
Y I

d o

FUNCTION -

ENTRY CONDITIONS - gAéLS = DELAY COUNTER (DETERMINED BY INIT. ROUTINE)
L
= 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
TESTS BEING RUN ON EVERY OTHER MASTER CLEAR

YR
PO YO
PO O

d
d
d
b
d

EXITTM

TCRE

b
—t

CONDITIONS - ;.

—

W (U

—

RN TR AR AN N ROANAN RN RN

A A A AN AN AN N R AN N AR A AR RN AN NN R AANRARARNRA AN

NO ERROR - DMR11

MICROPROCESSOR INITIALIZED

IF RUN BIT NOT SET BEFORE DELAY TIMEOUT, ERROR
WILL RESULT.
ADDITONALLY THE ERROR MESSAGE WILL

RELAY THE RESULTS OF
BIT IS NOT SET.

AN N

RRRD
RN
AN
t\uuv-*croés~qgkngduuu

4
PAGE 2-24

SUBROUTINE $MSCLR

N N

;

NOTE
:

THE MICROTESTS IF

THE RUN

THERE IS A PATCH AREA TO ALLOW THESE DIAGNOSTICS
TO RUN ON A MB206 (INSTEAD OF M8207).
THIS

SHOULD BE FOR DEVELOPMENT USE ONLY.

N N

REGISTERS DESTROYED - RESTORED

NN
N N

SEQ 0047

N N NN NN WNWWW NN WINN N N W NN

RN AN

RN R

aS I,ST,81,01,81,81,¥] NNV ==
D
OV
N NS W N—=OVO~NONISWN—=O

3109

09:36

SR AR R

011064

3145
3146
g}zg

011064
011070
011076
011100

011637
162737
010046
010146

002366
000004

g}gg

011102

105077

171136

3151
3152
3153
g}gg

011106
011110
011112
011114

000240
000240
000240
000240

3156
3157
3158
3159
3160
%}2}

011116
011124
011126
011134
011136
011136

032737
001004
012777
03

3163

011144

012777

SRS

$MSCLR:
002366

AN AR

R AR AR AR AR AR R AN R R AN NN

MOV
SUB
MOV
MOV

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

;SAVE RO
:SAVE R1

CLR8

aBSEL3

;CLEAR BSEL3

(SP
, SUBRPC
)
#4 , SUBRPC

NOP
NOP
NOP
NOP

000001

002372

040000

171076

060000

171066

8$:

BIT
BNE
MOV
BR
MOV

NN AAANRNRRR AR AR

RN RR

st sttt
Yy
T
2322222222222

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

;*tttfit*ttttttttttttti*ittttttti'ttt

;*x PATCH AREA FOR 8206 IF NEEDED «+
;CLR Q#SEL6 SRR AARRRA R RN AN AN A ANRARANR AR AR

g?ITO.CLRNO
AMCLR,aSELO

;1S THIS AN ODD MASTER CLEAR.
JIF YES - BR
J1SSUE A MASTER CLEAR.

#MCLR!MD]AG,aSELO ;ISSUE THE MASTER CLEAR AND TOGGLE
sMICRO TEST SWITCH.

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P
13-MAR-80 09:34

3164
3165
3166
%}gg

011144
011146
011150
011152

000240
000240
000240
000240

3169
%};?

011154
011160

005237
013701

3172
3173
3174
3175
3176
3177

011164
011164
011166
011166
011174
011176

(3)
3178
3179
3180
(2)
(2)
(2)
(2)
(2)
(2)
(2)
(2)

011176
011200
011202
011204
011204
011210
011212
011216
011220
011226
011226
011232

3181
3182
3183

011234
011236
011240

(5)

011242

(4)

(5)
(5)

011240

011244
011246

002372
002312

INC
MoV
10%:

100000

171036

104422
005300
001371

012727
000000
013727
000000
005367
001375
005367
001367
005301
001352

09:36

NOP
NOP
NOP
NOP

005000

032777
001025

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

000001

&
PAGE 2-25
SEQ 0048
"Qfitfiitfitt't..t'*Q'ittt*i'tttttttttt

ixx PATCH AREA FOR 8206 IF NEEDED **

MOV #RUN,QWSELO

.’ttfi*'Qfittttfitfittttfitttttttfitttttttt

CLRNO
WAIT2,R1

:INCR_WORD (CHANGE ODD TO EVEN ETC.)
:GET THE # OF 100 MICRO SECOND DELAYS

:TO WAIT BEFORE EXITING THE ROUTINE.

CLR

: INNER LOOP COUNT

BIT
BNE
BREAK

#RUN,QSELO
408

;1S THE RUN BIT SET IN SELO?
SYES = EXIT
:CALL SUPERVISOR - ALLOW CONSOLE INTERRUPT.

DEC
BNE
DELAY

RO
208
1

;LOOP UNTIL RO RETURNS TO 0

;:DELAY 100 M]CROSECONDS

002116

177772
177756

DEC
BNE
ERRDF

104455

R1
10%
1.EMG1,ERRG3

012601
012600
005037

3189

011260

000207

MOV
.WORD
MOV
.WORD
DEC
BNE
DEC
BNE

#1,(PC)+
0
LSDLY, (PC)+
0
-6(PC)
=4
~22(PC)
.=20

TRAP

CSERDF

-WORD
.WORD

EMG1
ERRG3

:REPORT RUN NOT SET

.WORD

020014
015204

011250
011250
011252
011254

($BRK

:REPEAT UNTIL MAX LOOP SATISFIED.

000001

3184
3185
3186
%}gg

TRAP

40%:
002366

MOV
MOV
(LR
RETURN

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

JRESTORE R1
JRESTORE RO
;TIDY UP SUBRPC

’

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA.P11

3193
3194
3195
3196
3197
3198
3199
3200
3201

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

09:36

&
PAGE 2-26

SEQ 0049

':tttt.!ttfit*flt*.t*ttttit'**tfifit*ittfittfitt'tttttttt***tttttttttttltt'tt
S

R R AR AR RN AR AR

AN TN T AR R A AN R AR RN R AN N AR AN N AR AR NN RARARARR RN P&

sus ROUTINE $BASE]
FUNCTION

TO PERFORM A BASE

JSR
PC,
$BASE|
.WORD A (SELO MAINTENANCE BITS)
.WORD B (SEL4 ~ ADDRESS)
.WORD C (SEL6 - MODE AND/OR RESUME)
(MACRO CALL == BASEIN
OR
BASEIN A,B,()

NESTING LEVEL

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

ENTRY CONDITJIONS

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

(TEST,

TR TR TR T

CALLING FORMAT:

IN COMMAND

EXIT CONDITIONS

IF NO ERROR - DMR11 BASE TABLE ASSIGNED

IN DMR MODE, AND INTERFACE WRITE REQUESTED

WRITE REQUESTED AX3-15.

3. TIMEOUT ERRORS ARE DETECTED IN WAIT SUBROUTINES.
DMRFLG = =1
DMR MODE REQUESTED (USED IN CONTROL IN

REGISTERS DESTROYED

ROUT INE)

DMC MODE OR RESUME REQUESTED.

RESTORED

AR LA RS

AL SRRttt

e RANNRNA LA RS

011262
011262
011266
WWNWNINWN
W
W
RRAR NN
= —
b b
—3
KOOJ\OO\O H,2rO ON
N

jelelelalelolelelele

Phur G
ur Gou-Qunr Ponur G Guur S Shuer S
et
b oo
e
b e
b

e S-S uurd
b ed
—2

Bele BN ol

011274

!:
$BASE

002366
000004

002366

000043
000001

170730
002370

010266

a ittt
Y2222 2202222

il dallsslasd
stz lzz
Iz isiss
T T
TR RL LR s
LL LS

MOV
SuB

(SP
, SUBRP(
)
#4 ,SUBRPC

MOvVB
MOV
WAIT

#RQ] !BASEI, @BSELO ;ISSUE THE BASE IN COMMAND.
#1 ,NESTPC
sFLAG THAT THE NEXT SUBROUTINE
RDI
;WAIT FOR RD]

JSR

PC,

SWAIT

WORD

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

sxwxx MACRO EXPANSION #axx

sCALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDI

s RERN

BNERROR 10%

103003

062716
000467

057677

170676

170670

017677

170660

:
108

IS NESTED.

L 2. 8 2

;IF NO ERROR, RDI SET - PROCEED

BCC

ADD
BR

#6, (SP)

:Cg??ECT STACK FOR ERROR EXIT

BIS
ADD
MOV
ADD
MOV

3(SP) ,aSELO
#2,(SP)
3(SP) ,@SEL4
#2,(SP)
a(SP) ,aSEL6

;SET ANY MAINTENANCE BITS
;INC. POINTER.
;SET UP BASE ADDRESS
s INC. POINTER AGAIN
:SET UP RESUME BIT AND THE HIGH 2 BITS

30%

108

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
3244
3245
3246
(1)

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

09:36

;OF THE BASE TABLE ADDRESS

062716

000002

ADD
WAIT

#2,(SP)
RQI

011364

004737

010702

JSR

PC, $CLRQI

103445
122777
001004

000122

170640

032777
001403

010000

170630

005037
000432

002260

012737
005737
001424
022737

177777
002262

002260

000001

002360

15%:

001004
032777
001014

000200

170560

112777

000055

170550

011462
011466

004737
000000

010266

16%:

17%:

011504
011504
011510
011514

L 2

103405
113777

002304

170550

004737
005037
005037
000207

01C6702

002370
002366

30%:

244

BERROR

30%

;IF ERROR, EXIT

(MP8
BNE
BIT
BEQ

#122,3BSEL6
15%

;WAS THIS A DMR BASE IN?
sIF NOT, CLEAR DMR FLAG (DMC MODE)

#RES ,@SEL6

;IS

16%

8(CS

THIS A RESUME?

CLR
BR

DMRFLG

30%

;SKIP = TO END

MOV
TST
BEQ
CMP

#-1,DMRFLG
INFACE

;FLAG THAT DMR MODE WAS REQUESTED.
;1S AN INTERFACE WRITE REQUIRED?

#CNTRL ,ERROR

;ARE WE EXPECTING AN ERROR

BNE
BIT
BNE
Mov8
WAIT

30¢

;IF NOT, PROCEED

;CLEAR DMR FLAG (NO DMR RUN ACKNOWLEDGE).

308

;1F NOT - SKIP TO END

;FORCES AN ERROR)

17%

(IN TEST

THAT

;IF NOT PROCEED

#RDO,dSELOD
308

:IF EXPECTING AN ERROR - IS RDO SET
sIF YES ~ DON'T BOTHER CHANGING THE INTERFACE.

JSR

ARQI!INTER,@BSELO ;ISSUE WRITE INTERFACE COMMAND.
RDI
;WAIT FOR RDI
sunxxx MACRO EXPANSION #wwx
PC, SWAIT
;CALL WAIT ROUTINE

BERROR

308

;IF ERROR, BR TO END.

MovB

AX3,BSEL7

JWRITE AX3~15.

WAIT

RQI

JSR

PC,

sCLEAR RQI AND WAIT FOR RDI TO CLEAR.
sxxex MACRO EXPANSION wxwx
;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.

.WORD

;FLAG THAT WE'RE WAITING FOR RDI
SRRkK

011500
011500

sINC. POINTER AGAIN (SHOULD BE AT RETURN P(C)
;CLEAR RQI AND WAIT FOR RDI TO CLEAR
sankx MACRO EXPANSION #wxx
;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.
:tttt

011442
011444
011452
011454
011454
011462

011470
011470
011472

PAGE 2-27

SEQ 0050

011360
011364

011370
011370
011372
011400

AARK

BCS
INTERFACE SELECTED

;BY AX3 DETERMINED IN INIT. CODE.

$CLRGI

sRRAN

CLR
CLR

RETURN

NESTPC

SUBRPC

;CLEAR THE NEST FLAG

. TIDY UP SUBRPC

LA
2 2 ¢

308

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.PYY
13-MAR-80 09:34

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

09:36

M4
PAGE 2-28
SEQ 0051

;;t*tttttfifit**tfitt*tt"'tttt****t*ttfitttfitttifittttttttttttttttttttttttt
;;*ttttttfitttttttttttttttttt***ttttttt*tfittti*ttttttt*tt*t**ttfitfi*ttttt

SUBROUTINE SCNTIN

FUNCTION =

TO PERFORM A CONTROL IN COMMAND

CALLING FORMAT:

NESTING LeVEL

JSR
PC,
SCNTIN
.WORD
A (SEL6 -~ MAINTENANCE MODE & HDX)
(MACRO CALL == CNTRIN
OR
C(NTRIN A)
= MAY ONLY BE CALLED FROM IN-LINE CODE
SUBTEST OR TEST SEGMENT)

ENTRY CONDITIONS - DMRFLG = =1
0
EXIT CONDITIONS - 1.

(TEST,

EXPECT_
CONTROL OUT IF IN DMR MODE
NO CONTROL OUT, IN DMC MODE OR RESUME.

IF NO ERROR - DMR11

CONTROL IN PERFORMED

2. TIMEOUTS REPORTED IN WAIT SUBROUTINES
3. IF THIS IS A DMR MODE START UP CONTROL IN,
THIS ROUTINE WILL WAIT FOR A CONTROL
OUT - DMR RUN.
IF THIS CONTROL QUT IS

Se %o By 000,y

N, L

NOT RECEIVED,
THIS WILL RESULT IN AN ERROR
MESSAGE AND A REMINDER TO CHECK THE BAUD RATE,
INTERFACE AND TURNAROUND (PROBABLE REASON).

REGISTERS DESTROYED

E:t****ttttttt*‘**'*****t**fi'*fi****QQ'****‘**.*'tififi***'*.ti*fli'i*'.'*.
::**'i****t***fit**t*t*t****i****t****tflfi**'*.*i**t**fi‘****fi*t"'*fii""

011637

162737
112777

012737
004737
000000

002366
000004
000041

000001

$CNTIN:

002366

MOV

#4 , SUBRPC

MOV

#1 ,NESTPC

JSR

PC, SWAIT
.WORD
O

MOVB

170474

002370

WAIT

010266

(SP) ,SUBRPC

SuB

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

#RQI+CNTRL,3BSELO ;SET UP CONTROL IN COMMAND

RDI

;FLAG THAT THE NEXT SUBROUTINE

*WAIT FOR SETTING OF RDI
iaxxx MACRO EXPANSION #ww

*CALL WAIT ROUTINE
:FLAG THAT WE'RE WAITING FOR RDI
;ltfit

103003

062716
000463

000002

017677

000000
000002
000400
002260

s
170450

ARKK

BNERROR 18

*IF NO ERROR - PROCEED

ADD

;CORRECT RETURN ADDRESS

B8R

#2,(SP)

20%

acc

*ERROR =~ EXIT

MOV
ADD
BIT
BEQ
CLR

#2,(SP)
MMAINT.QSEL6
5$
DMRFLG

$INC. RETURN PC LEFT ON STACK.
-WAS MAINTENANCE MODE REQUESTED?
*IF NOT, LEAVE DMRFLG AS IS.
:CLEAR FLAG - NO UN MODE CONTROL OUT.

WAIT

ROl

:CLEAR RQI AND WAIT FOR RDI TO CLEAR

170436
s

a(SP) ,aSEL6

IS NESTED.

;SET MODE DESIRED

sexxx MACRO EXPANSION xwwx»

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1T
13-MAR-80 09:34
011610

011614

004737

30A(1052)

GLOBAL SUBROUTINES

010702

JSR

005737
001443
005037

002260
002260

010266

012746
012746
010600

011742
000001

062706
000421

000004

032777
001005

000001

104414

170346

NNO

NNNNNN
A) = b —d cd b

G
huer
Yo
G
o Qi

PC, $CLRQI

;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.

032777
0C1004

DMRFLG
RDO

JSR

PC,

DMRFLG

7%:

2 44

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

20%

sxtxe MACRO EXPANSION ww#«

SWAIT

WORD

L 2

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

cRREkR

L 8 2 24

:IF NO ERROR - PROCEED

HFMS3

sPRINT RUN ACKNOWLEDGE NOT RECEIVED.

MoV
MoV
MOV
TRAP
ADD

15%
BIT

#CNTRL ,@SEL2

ERRDF

8.EMG8,ERRGZ

108

;DID WE RECEIVE A CONTROL OUT?
;IF YES - PROCEED.
sEXPECTED CONTROL OUT NOT RECEIVED.

TRAP

000010
020072
015070
000410
elelolelele]

4
PAGE 2-29
SEQ 0052

TST
BEQ
CLR
WAIT

PRINTB

104455

3353

BNERROR 7%

103011

011742
011750
011756
011764
011772
012000

09:36

sRNAN

004737
000001

011740

13-MAR-80

000040

170330

10%:

15%

BIT

H#DMRRUN ,QSEL6

ERRDF

104455

15%
9.EMGY,ERRGZ

;WAS

THE DMR RUN MODE BIY

:BR IF OK.

;WRONG CONTROL

005037
005037
000207

002370
002366

040445

046504
020116
053517
042515
052117
044505

020122
041501
042514
052116
051040
042526

024101
020113
043122
041040
047101

044103

116

170304

15¢%:

20%:

047111
041501
052501
020104

FMS3:

#4 ,SP

CSERDF

8
EMGS8
ERRGZ

TRAP
-WORD
.WORD

OUT RECEIVED.

BIC

#RDO!CMD,SEL2

;CLEAR RDO AND THE COMMAND BITS

CLR
CLR

NESTPC
SUBRP(

;CLEAR THE NEST FLAG
;CLEAR PC

LASCII

/XADMR RUN ACKNOWLEDGMENT NOT RECEVEDXN/

LASCIZ

/%A(CHECK

RETURN

SP.RO
CSPNTB

.WORD
.WORD
.WORD

.WORD

000207

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

SET?

000011
020136
015070
042777

INTERFACE, BAUD AND TURNAROUND)
%N/

C$ERDF

EMGY
ERRGZ

13~-MAR-80
CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
GLOBAL SUBROUTINES
13-MAR-80 09:34
CZDMIA. P11

012046
012054

000116

047122
042116

5
PAGE 2-30

SEQ 0053

051101
022451
.EVEN

;

012062

052524
052517

09:36

2223223222332 222232232232222322

2322233222323 22223233223223283232232283d3323232223322232302R2
200222003838 RdR)

8282338222223

222

208RdR000dRdRsdRdd)

SUBROUTINE $DMRIN
FUNCTION -

TO PERFORM A DMR MODE

CALLING FORMAT:

JSR

PC,

.WORD
LWORD

B
C

.WORD

COMMAND

INPUT COMMAND

$DMRIN

(MACRO CALL == DMRIN A.B,(C)

-~ MAY BE CALLED FROM IN-LINE CODE

NESTING LEVEL

(TEST,

SUBTEST OR TEST SEGMENT) OR FROM THE $LOOP

SUBROUT INE

ENTRY CONDITIONS - MUST BE IN DMR MODE

IO I

FOR ALL

FE T

FOR MODEM WRITE

IEIEIATEFE YT

B = BITS TO CLEAR IN SEL6
C = BITS TO SET IN SEL6

NESTPC = 1 -~ SUBROUTINE NESTED WITHIN ANOTHER SUB.
0 -~ SUBROUTINE NOT NESTED.

EXIT CONDITIONS - IF NO ERROR - DMR1" MODE INPUT COMMAND PERFORMED.

PRI

REGISTERS DESTROYED

SIRRRRRR | S22 8322333328223

—

ek med wmd

012104
046

2
36

—

PIRAAAAN 2333238228222

3303

0
4

DMRIN:

005737
001005
011637

002370
000004

002366

117637
117677
062716
052777
013746
012737

000000
000000
000002

002336
170112

162737

002366

000040

170100

000001

002370

COMMANDS EXCEPT WRITE MODEM

B = SEL4
C = SEL6

1%:

TST

BNE
MOV
sSuB

ADD

BIS
MOV

MoV

2832333

300

3238823282823

8222200t

22232022

8RR

2800200020222 232283%222)]

000000000ttt

NESTPC

;1S THIS SUBROUTINE NESTED?

a(SP) ,SAVE

;SAVE DMR INPUT COMMAND

#2, (SP)

sINC RETURN PC LEFT ON STACK.

1%
(SP) ,SUBRP(
#4,SUBRPC

a(SP) ,aBSELO
#RQJ ,ASELO
NESTPC,-(SP)
#1 ,NESTPC

aRadll

;IF YES = DON'T CHANGE
SUBRPC.
;SAVE PC FROM WHERE THIS SUBR. WAS CALLED.
;BACKUP TO PC OF ACTUAL CALL

sSET UP DMR INPUT COMMAND.

JREQUEST INPUT,
;SAVE THE CURRENT NEST FLAG.

;JUSE THE FLAG TO SHOW THE WAIT

;ROUTINE IS NESTED.

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

30A(1052)

GLOBAL SUBROUTINES

09:36

(]
PAGE 2-31
SEQ 0054

RD]

;WAIT FOR SETTING OF RDI

saxxx MACRO EXPANSION #xwx

012144
012150

004737
000000

010266

JSR

PC, SWAIT
WORD
O

012152
012156
012156
012160
012164

012637

002370

MOV

(SP)
+ NESTPC

JRESTORE THE ORIGINAL NEST FLAG.
;IF NO ERROR, OK - PROCEED.

062716
000433

000004

ADD

#4, (SP)

sUPDATE RETURN ADDRESS.
;ERROR EXIT.

122737

000005

002336

(MPB

#MIMODEM, SAVE

000000

170032

MOV

a(SP) ,aSELS

;1S THIS A MODEM WRITE?
sIF YES - SET/CLEAR BITS.

012176

103003

001413
017677

012204
012210

062716
017677

000002
000000

012216
012222

062716
000412

000002

047677
062716
057677
062716

000000

012250
012254
012254
012260
012262
012266
012266
012272

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

;ifitt

004737

BNERROR 5%
BR

5%:

BEQ

170022

170006

167774

7%:

010702

LA 2

;PASS VALUE FOR SEL4

ADD

#2, (SP)

BIC
ADD
BIS
ADD

a(SP) ,aSEL6
#2,(SF)
a(SP) ,aSEL6
#2,(SP)

;CLEAR MODEM BITS
sINC. RETURN PC LEFT ON STACK
;SET MODEM BITS
JINC. RETURN PC LEFT ON STACK.

WAIT

RQ1

PC,

002370

;CLEAR RQI AND WAIT FOR RDI TO CLEAR

sxwxx MACRO EXPANSION wwx«

$CLRQI

;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.

005037

002366

005037
000207

002336

15%:

AR
R

NESTPC

15%
SUBRP(C

;BR _IF YES
;CLEAR PC

CLR
RE TURN

SAVE

JRESTORE TEMP VALUE

A AR A A AN
RS S

1 2. 2.84

TST

BNE
CLR

IF ANY,

#2,(SP)
o (SP) ,aSEL6

8CC

DMR COMMAND)
LEFT ON STACK.
SEL6 (VALUE, IF ANY,
DMR COMMAND)
LEFT ON STACK.

sRkAR

005737
001002

(VALUE,

ADD
MOV

JSR

10%:

;DEPENDS ON THE
JINC. RETURN PC
;PASS VALUE FOR
;DEPENDS ON THE
;INC. RETURN PC

6%:

10%

AR A

;WAS THIS ROUTINE NESTED?

AR AR A AR R AR R AT A A AN AR AR NN RN AN

AR AR N RN

s stt
Y I T
t
2222222282222

SUBROUTINE $BACC
FUNCTION 0,0,

Ry
A

WAIT

Ve B8,V

Volo IR NTe XV, P YV TGP Y o 104

SRR

012144

3420

13-MAR-£D

TO PERFORM A BUFFER ADDRESS/CHARACTER

COUNT IN COMMAND

CALLING FORMAT:

JSR

SELO

.WORD

SEL6

.WORD

.WwORD

SEL4

$BACC

:BA/CC IN COMMAND
*BUFFER ADDRESS

‘BA BITS 16 € 17 AND

. CHARACTER COUNT

(MACRQ CALL == BACCIT
(MACRO CALL =-- BACCIR

OR
OR

BACCIT A,B)

BACCIR A,B)

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES
TP YRRYYRR S

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

09:36

PAGE 2-32

SEQ 0055

NESTING LEVEL

MAY ONLY BE

CALLED FROM IN-LINE

SUBTEST OR TEST SEGMENT)

CODE

(TEST,

ENTRY CONDITIONS

162737
117677

012334

004737
000000

AL
SRR

RSl

NOT AFFECTED

et ddlddsddsilslsel
222222222222
szestslf
2 22282222283
?l

AR AR AR A AT

AT AR AN

(SP)
, SUBRP(
#4 , SUBRP(
a(SP) ,aBSEL 0
#2,(SP)
#1 NESTPC
RDI

002370

010266

R AR AR N AR

RN RANRARARAARERNRR AN

A AR

;SAVE PC FROM WHERE THIS SUBR. WAS CALLED.
.BACKUP TO PC OF ACTUAL CALL
;SET UP BA/CC COMMAND IN (TRANSMIT OR RECEIVE)
s INC POINTER ON STACK

sFLAG THAT THE NEXT SUBROUTINE

;WAIT FOR SETTING OF RDI

sCALL WAIT ROUTINE
sFLAG THAT WE'RE WAITING FOR RDI
kk

BNERROR 108

103003
062716
000414

000004

012356

017677
062716
017677

000000
000002
000000

012364
012370

062716

000002

012370

004737

167664

10%:

167654

005037
005037
000207

002370
002366

20%

JEXIT

MOV
ADD

a(SP) ,aSEL4
#2,(SP)
a(SP) ,@SEL6

ADD
WAIT

#2,(SP)

:SET BUFFER ADDRESS
s INC POINTER ON STACK
;SET UP BUFFER COUNT AND BUFFER ADDRESS
;BITS 16 8 17
s INC POINTER ON STACK
;CLEAR RQI AND WAIT FOR RDI TO CLEAR

JSR

PC, $CLRQI

s CORRECT STACK FOR ERROR EXIT.

RQI

CLR
CLR

SRR AR A A

NESTPC
SUBRPC

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

2 44

L3
8 &4

;CLEAR THE NEST FLAG
;CLEAR PC

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

SRRt

108

sexxx MACRO EXPANSION w»xxe
.

RETURN

MALEE

BCC

#4,(SP)

20%:

L4
8 21

;IF NO ERROR - PROCEED

ADD
BR

MoV

010702

IS NESTED.

sxnkx MACRO EXPANSION #aww

PC, SWAIT
.WORD
O

012334
012336
012342

012374
012374
012400
012404

REGISTERS DESTROYED

002366
167716

ANRNRRAREN

2222222222228

SUBROUTINE $ERROR
TR
P T

012326
012332

062716
012737

002366
000004
000000
000002
000001

012326

[f NO ERROR - DMR11 BA/CC COMMAND IN PERFORMED

g
011637

LIPS

012274

LI
TR TP

TR TP IS

EXIT CONDITIONS

FUNCTION -

CALLING FORMAT:

TO CHECK_THE FIRST 8.
FOR NON-ZERO VALUES.

JSR

PC,

BASE

S$ERROR

TABLE ERROR COUNTS

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

3503
3504
3505
3506
3507
3508
3509
3510
35N
3512
3513

09:36

PAGE 2-33

SEQ 0056

NESTING LEVEL

C AN BE NESTED WITHIN ANOTHER ROUTINE

ENTRY CONCITIONS

SHOULD BE DONE AFTFR PROPER SHUTDOWN
NESTPC
1 = SUBROUTINE NESTED WITHIN ANOTHER SUB.

0 -~ SUBROUTINE NOT NESTED.

EXIT CONDITIONS

I F_ANY NON-ZERO VALUE FOUND IN THE BASE TABLE A
SOFT ERROR IS DECLARED.

REGISTERS DESTROYED

RESTORED

AR AR

012406
012406
012412
012414
012420

012426
012426
012430

005737
001005
011637
162737

010046
010146
012700
012701

SERROR

002370
002366
000004

AR A AR AR R

TST
BNE

MCv

002366

SuB

10%:

002633
000006

AN N A AR AR RN AN AR AR

AN AR

NESTPC
108
(SP
, SUBRP(
)
#4 ,SUBRPC

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

20%:

105720

A AN

A AR AR RN AR AR AN

#18. LSTEST

25%

(RO

122710

000001

30%:
104457

000005
012532
015464

005737
001002
005037
012601
012600
000207

002370
002366

(MPB

BGE

40%:

45%:

;1S THIS ROUTINE NESTED?
;BR IF YES (PC ALREADY SAVED)
;SAVE PC AFTER THE CALL TO SWAIT.
;BACKUP TO THE PC GF THE ACTUAL CALL

;THE

INSTRUCTION AFTER THE

CALL.

;SAVE RO

;SAVE R1

;IS THE NAK COUNT NON-ZERQ?
;IF YES = REPORT SOFT ERROR

30%

002004

RN RN

(RO)+

20%
(RO)+, (RO)
30%

25%:

sPOINTER TO ACTUAL BASE TABLE COUNTS.
;CHECK THE 6 NAK BYTES IN THE TABLE

002114

A AN A RARNR AN AR I AARRAAN

R AN AR AR RN AR R AR AN A NN ANRRRARRA AR

#BASE
+3 RO

30%

000022

AR R AR

;LOOP UNTIL DONE.

JARE THE REPS THE SAME?

:IF NOT - REPORT ERROR.
;IS THIS TEST 18 (L.LARGE BUFFER T EST)
;IF YES = ALLOW 1 REP

;IF NOT TEST 18 - REPORT IF NON ZERO.

40%

;IF ZERO - OK.

#1,(RO)
40%

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

ERRSOFT 5,EMS3,ERRG4

JREPORT SOFT ERROR

TST
BNE
CLR

NESTPC

45%
SUBRP(

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

MOV
mMov

(SP)+ ,R1
{SP)+ R0

JRESTORE R1
JRESTORE RO

RE TURN

TRAP
.WORD
.WORD
.WORD

gsERSOFT

EMS3

ERRG4

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

3555

3556

3557
3558
3559
3560
3561
3562
3563

012532
012540
012546
012554

0537105

044440

042523
042514
012560

047522
020116
052040
000

051522
040502

30A(1052)
13-MAR-B0
GLOBAL SUBROUTINES

EMS3:

.ASC1Z

09:36

5
PAGE 2-34
SEQ 0057

/ERRORS IN BASE TABLE/

041101

.EVEN

AR A A A A A AN N A AR AR AT A RN AR AR AR RANRNNN RN RN AR

AR AR A AR

AR AT

AT A A AR

AN RNRRRARRAANAN

AR RS

AN AR AR AN AR RN A AR AR RN N

AR AR R AR NN RN

SUBROUTINE SHALT
FUNCTION - TO SHUTDOWN THE DMR11

ENTRY CONDITIONS - NONE
EXIT CONDITIONS

- DMR SHUTDOWN

REGISTERS

- NO EFFECT

::t*t**tttttt*tttti*ttfitttttit*titttit*t*titi*ifitt*'t*tttttttttfittfit'tt
A

012560
012560
012564
012572
012600
012604
012612

012612
012616

011637

162737
112777
105077

012737

004737
000000

il il

adt

103430

012622

004737
103425

012630
012634

004737
000001

sISSUE A HALT
;CLEAR ANY OQUTPUT PENDING
JFLAG THAT THE NEXT SUBROUTINE IS NESTED.

002370

#1 ,NESTPC
RDI

@SEL?

PC,

SWAIT

.WORD

010266

;BACK UP TO THE ADDRESS OF

032777
001C05
104455

000001

167366

THE ACTUAL (ALL.

;WAIT FOR RDI

sunxx MACRO EXPANSION *wxn
;CALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDI
LA 2

BERROR

20%

;1F ERROR, EXIT

WAIT

RQI

;CLEAR RQI AND WAIT FOR RD] TO CLEAR

JSR

PC.

$CLRQI

BCS

;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.
LR 2

2 4

BERROR

20%

;IF ERROR, EXIT

WAIT

RDO

JSR

PC,

;WAIT FOR RDO
sxwxx MACRO EXPANSION xex+

SWAIT

.WORD

8CS

20%

BCS

20%

TRAP

CSERDF

SCALL WAIT ROUTINE

:FLAG THAT WE'RE WAITING FOR RDO
TR

BERROR

208

*IF ERROR, EXIT

BIT
BNE
ERRDF

#CNTRL ,aSELZ

;1S THIS A CONTROL UT?
;IF YES - PROCEED
;ERROR

10%
4 ,EMS4 ERRG?

20%

srxex MACRO EXPANSION waws

chRRR

103421

22223228)

#RQI'HLT,aSELO

;*ttt

012626
012626
012630

22222232

;SAVE THE PC WHEN THE SUBROUTINE WAS CALLED.

#4 , SUBRPC

010702

(SP)
, SUBRP(

002366
167432

010266

:tt'fi

012620
012620
012622

012636
012636
012640
012646
012650
012650

002366
000004
000042
167430
000001

$HALT:

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

012652

3593
3594
3595
3596
3597

3598

3599

032777
001004

012702
012702
012710
012714
012720
012722
012730
012736

001000

167350

PAGE 2-35
SEQ 0058

10%:

. WORD

20%

8IT
BNE
ERRDF

#HALTC ,aSEL6
208
4 ,EMS4 L ERRGZ

000207
002370
002366

167324

044123
047127

052125
042440
000

047504
051122

20%

.WORD

.WORD
8IC

CLR
CLR

RETURN

EMS4:

.ASCIZ

4
EMS4

ERRGZ

;1S THE DMR HALTED?
JIF YES = EXIT
JERROR - NOT EXPECTED CONTROL OUT.
TRAP
.WORD

042777
005037
005037
000207

051117
012742

09:36

. WORD
.WORD

0445
000004
012722
015070
—

(4)
(5)
(5)
(5)

000004
012722
015070
000410

(5
(5)
(5)

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

#RDO!CMD,aSEL?

NESTP(C
SUBRP(C

CSERDF
4
EMS4

ERRGZ

;CLEAR RDO AND COMMAND BITS.

.CLEAR THE NEST FLAG
sCLEAR THE PC.

/SHUTDOWN ERROR/

.EVEN

:;ttttfitttttttttt*tttttitt'tt!tttttfitttt**tfitttttttittttittt'ttittttttt
:;ttt'ttttfit**ttttfit'tttt'tttttfitfitttttfififiQtttttt'ttttttttitttitttttti'

3612

VOO~V
NS W

SUBROUTINE $ROMO
FUNCTION -

TO READ

THE

CONTENTS OF

THE ROM

ENTRY CONDITIONS - ROMADR =

ROM ADDRESS

EXIT CONDITIONS

- BSEL6

C(ONTENTS OF ROM ADDRESS

REGISTERS

=~ NO EFFEC

012742
012742
012746
012754
012762

LAAA

ARd

sttt

ellizlll

222222222202

:;tttttttfittttttttt'tttt'*itit*t*ifittit.tt'tttt*fitttti'tttfiifi'it'tttttt

$ROMO:

005077
113777

052777
012777

121053

167260
167250
167250

CLR

MOvB
BIS

MOV

@SELO

ROMADR+1,aSEL2
#ROM] QSELO

#121053.3SEL6

JINIT

.SET HIGH BYTE OF ROM ADDRESS
;ENABLE SEL6 TO BE USED AS MAINTENANCE REG.

:SET_UP MICROINSTRUCTION TO
;MOVE 18US* 2 TO 0BUS* 13

;(0BUS* 13 IS A SHADOW REGISTER FOR

012770
012776
013004
013012
013020
013026

052777
042777
042737
153737
052777
013777

000400
001400
000377
002404
001000
013060

167234
167226

013060
013060
167204
167204

BIS
BIC

BIC
8IS
BIS
MOV

;BITS 8-11 OF THE P()

#STUP,QSELO
sCLOCK THE
#ROMI !STUP,QSELO ;CLEAR

#377,1%
ROMADR, 1%
#ROM; ,aSELO
1$,aSELG

INSTRUCTION

;CLEAR ADDRESS FIELD OF BRANCH INST.
;ADD ADDRESS OF BRANCH.
;ENABLE SEL6
;SET UP MICROINSTRUCTION TO

;BRANCH IMMEDIATELY TO PC.

BRANCH IS

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
13-MAR-80
CZDMIA.P11
13-MAR-80 09:34
GLOBAL SUBROUTINES

013034
013042

013050

052777

042777
052777

013056

000207

013060

100000

000400

001400
002000

167170
167162
167154

09:36

5
PAGE 2-36

;NECESSARY TO TRANSFER PC SHADOW REG TO PC

BIS

#STUP,aSELO

BIC

#ROM]. STUP,aSELO’ ; CLEAR

BIS

*CLOCK THE

.WORD

INSTRUCTION

*ROM PC
= ROM ADDRESS

#ROMO. aSELD

;CLOCK IN A MAINTENANCE ROM OUT

*ROM CONTENTS ARE NOW IN SEL6.

RETURN

1$:

SEQ 0059

100000

;MICRO INSTRUCTION OPCODE FOR IMMEDIATE

:BRANCH (ROM ADDRESS IS ADDED INTO BITS 0-7)

""Qfi'tfi"fi'tfi.tkfi**t'"*'t****tfifi’i.t'*fi*wfi"iitQ.tfi*tttfittfi"'fi"'t'
"'fi'tfitfikfifi'fittfi*fifi"Q"'.'t.'*tfitfi**tfififi.t*fifi'fi't'ttt*ititit*"tfitttt

SUBROUT
INE $LOOP

FUNCTION - TO ISSUE AN EXTENDED CONTROL IN TO SET

UP THE MODEM LOOPBACK DESIRED BY THE USER.

ENTRY CONDITIONS =

WMAINT = O - DON'T WRITE MAINT. 3ITS
WMAINT = 1

= SET BITS

(WMAINT SET

DMCMDE = 0 - DMR MODE

IN INIT CODE)

DMTURN = TURN AROUND CONNECTOR

EXIT CONDITIONS

;

REGISTERS

- NOT DESTROYED

:’fiti****ttkfi*fi*tt*i*'t'litttttfitfii**fitifl*ttfi**tt*tkfitit*iitttiit'titi.
* tittfit**ifiit*ttttfi*t'ti"tttttt*tfit*'ttttfitfit'ttttiit'fittttttfitttitt'

${ 00P:

002276

TST

DMCMDE

;1S

TST

WMAINT

DO WE NEED

BNE

002306

002366
000004
000006

002366
002254

000004
000010

013166
013170

BEQ
MOV
SuB
P
BNE
MOV

MOV
BR

108

308

30$
(SP) , SUBRPC
#%, SUBRPC
#6.DMTURN
10§
#MAINT2,1008

#MAINT1.1018
208

Gur G

N
=
b

Gar Giuer P

el —h
d
—

iar G

—

AN AN N AN AN NN

QOOOOCOOD

Qa4

'
012737
012737

000010
000004

013166
013170

012737

000001

002370

000005
000000
000000

100$:
107$:

THE DMR

*IF SO, EXIT

IN DMC MODE?

(CAN'T DO DMR MODE

TO WRITE

INPUT)

THE MAINTENANCE BITS?

S1F NOT = EXIT.
*SAVE THE PC AFTER THE CALL TO SLOOP
:BACKUP TO THE PC OF THE ACTUAL CALL.
:1S LOCAL MODEM LOOPBACK DESIRED?
*IF NOT - PROCEED.
:ENSURE REMUTE LOOPBACK IS CLEAR.

'SET MAINT BIT FOR LOCAL LOOPBACK

:IN_ALL OTHER LOOPBACK CONFIGURATIONS

*SET MAINTENANCE 2 (CONFIG. TYPE 1.3.7)

MOV
MOV

#MAINT1,1008
#MAINT2.1018

:ENSURE REMOTE LOOPBACK IS CLEAR.
:SET MAINT BIT FOR REMOTE LOOPBACK

MoV

#1,NESTPC

;FLAG THAT THE NEXT SUBROUTINE IS NESTED.

CALL

SDMRIN
.WORD

WORD
WORD

WMODEM

0
0

*DMR MODE INPUT COMMAND
:WRITE MODEM COMMAND

BITS TO CLEAR IN MODEM REGISTER
:BITS TO SET IN MODEM REGISTER

E%gfl{:Op??R-ll FUNCTIONAL TESTS MACY11
13-MAR-80 09:34

013172
013172
013176
013202

005037
005037
000207

002370
002366

30%:

CLR
(LR

AR AR Rl
AN

A A A R

PAGE 2-37
SEQ 0060

JCLEAR THE NEST FLAG
.CLEAR PC.

AT A AR AR R AR TR R AN AR AN A AR AN AN

Y
AR

2222323220 2222222222T

RANRRAN NN

AR AR AR

NESTPC
SUBRP(

RETURN

09:3¢

SUBROUTINE $BUFFS

FUNCTION = TO DETERMINE BUFFERS FOR TEST 15 -~ 19,

SUBROUTINE WILL USE ONE OF

THREE BUFFER AREAS:

CALL

- JSR

NESTING LEVEL

THE FOLLOWING

THIS

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

DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

PC,$BUFFS

CALLED ONLY BY TESTS

16-20

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

REGISTERS

= NOT DESTROYED

—

@
=

hn gl

A
I NI
P

= 1
MEMORY MANAGEMENT USED
MMANAG = 0
MEMORY MANAGEMENT NOT USED
RCVBUF
=
ADDRESS OF RECEIVE BUFFER (VIRTUAL)
RCVBUF+2
=
(HARACTER COUNT
RCVBUF+4
=
ADDRESS OF NEXT RECEIVE BUFFER
(UP TO 64 ADDRESSES AND COUNTS)
=
ADDRESS OF TRANSMIT BUFFER (VIRTUAL)
(UP TO 64 ADDRESSES AND COUNTS)

WL I

PN TR

1.
2.
3.

LRI

3696
3697
3698
3699
3700
3701
3702
3703
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

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

:;tttttt*ttt*t*ttttttttt**t*ttttt*t*tttktttt**it*t*tttttttttfittittt*tt'
AR

013204
013204
013210
013216
013222
013222
013226
013232
013236
013242
013244
013250
013254

011637

162737

005037

002366
000004
002340

012746
012746
012746
012746

000340

062706
v05737
005737

000010
177572
002340

104437

$BUFFS:

A A A A

AR R AR A

A AR R R

AR R AR R AN AR AR AR AR AR AN RRRRNNRAANNNNRNNANRRRN

MOV
EEE

(SP) , SUBRPC
nggUBRPC

SETVEC

44 ANOXMEM, #PRIO7 ;SET UP TRAP 4

023512
000004
000003

;SAVE PC AFTER THE CALL TO $BUFFS
;BACKUP TO THE PC OF THE CALL.

(WILL

SET FLAG FOR NXM)

MOV
MOV
MOV

MOV

TST
TST

177572
FLAG

TRAP
ADD

;ADDRESS MEMORY MANAGEMENT REG
;1S THE FLAG STILL CLEARED?
;NOTE: THE FLAG WILL BE SET BY THE TRAP

#PRI07 ,-(SP)

#NOXMEM,
- (SP)
#4 ,-(SP)
#3,-(SP)

CSSVEC
#10,SP

CZDMIAO DMR~11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

3746
3747
3748
3749
3750
3751
3752
(3)
(3)

3753
3754

013260
013262

001143
023727

013270
013272

002537
012737

(13300

013300
013304

013306
013312
013316
013316

013322

012700
104441

002120
000001

172300
000010

012721

077406

003000
002302

N12761

012703
012704

000400
060000

012737

000001

012701
012702

000040
002410

005303
001364
012701

005024
005737
001036
005301
001372
005037
012737
012737

5
PAGE 2-38

30%
LSHIMEM, #3000

BLT

308

SETPRI

#1,MMANAG
#PRIO7

10%:

;FOR BUFFERS)

;IF NOT, USE NON-MEMORY MANAG. BUFFERS.

;FLAG THAT MEMORY MANAGEMENT

IS USED

;MAKE SURE WE ARE IN KERNEL MODE.

#77406, (R1)+

JWRITE BITS FOR THE FOLLOWING PAGE DESCRIPTION

#400.4(R1)

#2000,6(R1)

#2200.10(R1)

#2400.12(R1)
#2600.14 (R1)
#7600.16(R1)

#256. ,R3
#60000,R4

177572

15%:

16$:

17%:

002340

#1,4177572

;ADDRESS OF KERNEL PAR 0
;PAR 0, ADDRS
0 - 17776
;PAR 1, ADDRS 20000 - 37776
;PAR 2, ADDRS 40000 - 57776

:PAR 3, ADDRS 200000 - 217776 (BUFFER PAGE 1)

;PAR &, ADDRS 220000 - 237776 (BUFFER PAGE 2)
;PAR 5, ADDRS 240000 - 257776 (BUFFER PAGE 3)

:PAR 6, ADDRS 260000 ~ 277776 (BUFFER PAGE &)
:PAR 7, ADDRS 160000 - 677776 (1/0 PAGE)

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

(R2)+,(R4)+

JWRITE TEST PATTERN
;PHYSICAL ADDRESS 200000 - 237776
JFLAG WILL BE SET IF WE ADDRESS NXM.
sIF NXM - DON'T USE_MEMORY MANAGEMENT.
;DO TH INNER LOOP 32. TIMES

15%
#20000,R1

(R4)+

29%
R1

17%

003230
003630

;READ/WRITE ACCESS, 128. BLOCK PAGE LENGTH.
;WRITE ALL PDRS.

#32. ,R1

#8CCITT ,R2

FLAG

177572

#PRIO7,RO
C$SPRI

#172300,R1
#8. RO

RO
108
#172340,R1
(R1)
#200,2(R1)

000002
000004
000006
000010
000012
000014
000016

020000

120000

;1F THERE IS NO MEMORY MANAGEMENT.
;BR TO USE NON-MEMORY MANAG. BUFFERS.
;IS THERE AT LEAST 48K WORDS? (16K WORDS

sSETTING PRI SHOULD SHOULD ALSO CLEAR
;BITS 14 £ 15
;GET ADDRESS OF KERNEL PDR REG O.
;WRITE PDR REG 0-7.

002340

060000

SEQ 0061

MOV
TRAP

012224

005737
001050
005301
001372

09:36

BNE
cMP
MoV

172340

000200
000400
002000
002200
002400
002600
007600

13-MAR-B0

GLOBAL SUBROUTINES

000340

012701
012700

005300
001374
012701
005011
012761
012761
012761
012761
012761
012761

30A(1052)

;D0 THE OUTER LOOP 256. TIMES
sCOUNTER TO CLEAR THE NEXT 8K WORDS
;CLEAR VIRTUAL ADDRESS 120000 - 157776
;DOES AN NXM TRAP OCCUR?

sIF SO DON'T USE MEMORY MANAGEMENT.

aw177572

;TURN OFF MEMORY MANAGEMENT

#60000 , XMTBUF

;VIRTUAL ADDRESS OF XMIT BUFFER
;VIRTUAL ADDRESS OF RCV. BUFFER

#120000, RCVBUF

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

3800
3801
3802
3803
3804
3805
3806
3807
3808
3809
3810
%g};

013514
013522
013524
013532
013534
013534
013542
013544
013552
013554
013554
013562

3813
3814
3815
3816
3817
(3)
(3)

013564
013564
013570
013570
013574
013576
013600

(3)

013602

104431

3818
(3)

013602

037777

002320

022737
001004
012737
000515

000007

002322

004000

002320

012737
000511

000376

002320

005037

177572

005037

002302

012700
104436

000004

013606

021227

013612
013614
013620
013622
013626
013630
013630
8}%223

003406
010237
011200
042700
000405

013642
013650
013654

3846
3847
3848
3849
3850
3851

002322

010002

3832
3833
3834

3837
3838
3839
3840
3841
3842
3843
3844
3845

000001

013604

3819
3820
3821
3822
3823
3824
3825
3826
3827
3828
3829
ggg?

3835
3836

022737
001004
012737
000525

013656
013664
013666
013674
013676
013700
013702
013704
013706
013706
013712

013712
013714
013716
013720
013720
013724

012737

20%:

21%:

29%:

30%:

002000

003230
000001
004230

003230

012700

002000

013737
060037
010001

003230
003630

003630

022737
001415

000001

002322

022737
001004
006201
006201
006201
000405

000007

002322

012704

000007

002320
000002

35%:

408

45%:
46%:

006201
005304
001375
010137
162737

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

47%:

002320

09:36

5
PAGE 2-39

CMP
BNE
MOV
BR

#1 ,BUFNUM
20%
#37777,BUFSIZ
608

;1S THERE ONLY 1 XMIT & RECEIVE BUFFER?
;IF NOT, BR
;EACH BUFFER IS 16K BYTES

CMP
BNE
MOV
BR

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

;ARE THERE 7 XMIT & RECEIVE (14 TOTAL BUFFER)?
;I1F NOT = MUST BE 64 BUFFERS
;EACH BUFFER IS 2K BYTES

MOV
BR

#376,8UFS1Z
60%

;EACH BUFFER IS 254. BYTES.

CLR

177572

;TURN OFF MEMORY MANAGEMENT

CLR
CLRVEC

MMANAG
#4

JFLAG THAT MEMORY MANAGEMENT NOT USED.
JRESTORE TRAP 4.
MOV

MEMORY

aR2, #2000

BLE
MOV
MoV
BIC
BR

35%
R2 , XMTBUF
@R2,RO
#B1T0,RO
40%

MOV

A#B1GBUF ,XMTBUF

MUV

#2000,R0

MOV
ADD
MOV

XMTBUF ,RCVBUF
RO ,RCVBUF
RO.R1

#4,RO
TRAP
C$CVEC
;FIND THE FREE MEMORY AVAILABLE 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
JMEMORY CONTAIN THE AMOUNT OF AVAILABLE MEM.)
;IF NOT AT LEAST 1K, USE DEFAULT BUFFER.
;USE THE FREE MEMORY BUFFER.
sSAVE THE WORD SIZE OF THE BUFFER.
;START WITH AN EVEN # OF WORDS.
;USE THE DEFAULT BUFFER (1ST HALF FOR XMIT).

;1K WORD SIZE.

; CALCULATE THE RECEIVE BUFFER ADDRESS
;AS STARTING IN THE 2ND HALF OF THE BUFFER.
;BUFFER SIZE IN WORDS.

cMP
BEQ
CMP
BNE
ASR
ASR
ASR
BR

#1 ,BUFNUM
47%
47 ,BUFNUM
453
R1
R1
R1
47%

MoV

#7,R4

;DIVIDE BYTES BY 128.

ASR
DEC
BNE

R1
R4
46%

JSHIFT RIGHT 7 TIMES

MOV
SuB

R1,BUFSIZ
#2,BUFS]Z

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

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?
;1F NOT WE MUST NEED 64 RCV & 64 XMIT BUFFERS.
;R1 = # BYTES IN THE BUFFERS/8

SEQ 0062

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

3852
3853
3854
3855
3856
3857
3858
3859
3860
3861
3862
3863
3864
3865
3866
387

013732
013740
013742
013744
013750
013750
013754
013760
013760
013762
013764
013766
013770
013772
013774

3868
3869
3870
3871
3872
3873
3874
3875
3876
3877
3878
3879
3880
3881
3882

014006
014006
014012
014016
014022
014022
014024
014030

3885

014040

3883
3884

3887
3888
3889
3890
3891
3892
3893
3894
3895
3896
3897
3898
3899
3900
3001
3902
3903
3904
3905

013774
014000
014000
014002
014004

014034
014036

014042
014046
014052
014056
014062
014062
014064
014070
014072
014076
014100
014104
014106
014110
014110
014112
014114
014120
014120
014122

042737
006200
010001
013702

000001
003230

012703
012704

002410
000040

012312
005300
001403
005304
001373
000766
013702

003630

005022
005301
001375

013700
012701
013702

003630
003630
002322

010021
013721
063700

002320
002320

005200
005302

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

002320

508:
518:

558:
56:

608:

658:

001370

013700
012701
013702
012703
010021
013711
160321
063700
005303
032703
001001
005200

005703
002002
012703
005302
001357

003230
003230
002322
000004

708:

002320
002320
000001

728:
000004

75$:

09:36

PAGE 2-40

SEQ 0063

sWILL ADJUST BUFFER STARTING ADDKESS.
JENSURE WE START WITH AN EVEN # OF BYTES.
;# OF WORDS IN ALL XMIT BUFFERS.

BIC
ASR
MOV
MOV

#1.BUFSIZ
RO
RO,RT
XMTBUF,R2

;ADDRESS OF START OF XMIT BUFFERS.

MOV
MOV

#$CCITT,R3
#33..R4

;ADDRESS OF TEST PATTERN
;4 OF WORDS IN THE TEST PATTERN.

MoV
DEC
BEQ
DEC
BNE
BR

(R3)+, (R2)
RO
558
R4
51$
508

;WRITE TEST PATTERN INTO ALL XMIT BUFFERS.
SJARE ALL THE XMIT BUFFERS WRITTEN?
;IF YES PROCEED.
;CONTINUE WITH TEST PATTERN TILL DONE.

MOV

RCVBUF,R2

;ADDRESS OF RECEIVE BUFFERS

(R
DEC
BNE

R+

;CLEAR ALL RECEIVE BUFFERS.

MOV
MOV
MOV

RCVBUF ,RO
#RCVBUF
R1
BUFNUM,R2

;ADDRESS OF RECEIVE BUFFER

MOV
MOV
ADD

INC
DEC
BNE

RO, (R1)+
BUFSIZ,(R1)+
BUFSIZ.RO
RO
R
65%

;SAVE THE RECEIVE BUFFER ADDRESS
;SAVE THE BUFFER SIZE
;CALCULATE THE NEXT BUFFER ADDRESS.
s CHANGE EVEN ADDRESS TO ODD & ODD TO EVEN.
;CALCULATE ALL THE BUFFER ADDRESSES.

MOV
MOV
MOV
MOV

XMTBUF RO
AXMTBUF
R1
BUFNUM,R2
#4.R3

;ADDRESS OF TRANSMIT BUFFERS
;TABLE OF XMIT BUFFER POINTERS.
SHOF XMIT BUFFERS.

;R3 IS USED TO VARY THE CHARACTER COUNT.

MOV
MOV
SB
ADD
DEC
BIT
BNE
INC

RO, (R1)+
BUFSIZ,(R1)
R3,(R1+
BUFSIZ.RO
R3
#BITO,R3
728
RO

sSAVE THE XMIT BUFFER ADDRESS.
sSAVE THE BUFFER SIZE.
;VARY THE BUFFER SIZE
sCALCULATE THE NEXT BUFFER ADDRESS
s CHANGE THE CHARACTER_COUNT VARIABLE.
;1S THE CONTENTS OF R3 ODD
;IF YES, DON'T ADJUST BUFFER ADDRESS.
;CHANGE EVEN TO ODD ETC.

IST
BGE
MOV

R3
75%
#4,R3

JWHAT IS R3.

DEC
BNE

R2
708

sCALCULATE ALL THE XMIT BUFFERS.

sSAVE # OF WORDS

IN ALL RCV BUFFERS.

;START AT BEGINNING OF TEST PATTERN.

;TABLE ADDRESS OF RCV BUFFER POINTERS.
;# OF RCV. BUFFERS.

JCONTINUE UNTIL R3 = -1

JRE=INIT.

THE R3 VARIABLE AGAIN.

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
3908
3909
3910
3911
3912
3913
3914
3915
3916
3917
3918
3919
3920
3921
3922
3923
3924
3925
3926
3927
3928

014126
014130
014134

005037
005037
000207

CLR
CLR

R
MR

5
PAGE 2-41

RSttt

SFQ 0064

;RESTORE FLAG USED IN TRAP VECTOK.
.CLEAR PC.

SUBRP(

AR AR AR A AR

AL LSS

09:36

FLAG

RETURN

A AR AR R AN AR AR R AR A AR

Rttt

ittt

sttt

AT RN R AR RARA

AR N A AN ARk

it ssttisglstiissezzeszsssay

SUBROUTINE SINOUT
FUNCTION - TO MANAGE THE INTERRUPT FROM BASE IN
TO BA/CC OUT IN THE INTERRUPT TESTS 15-19

ENTRY CONDITIONS - BUFNUM = # OF RCV AND XMIT BUFFERS

ALL BUFFERS SET UP IN
THE $BUFFS SUBROUTINE.
= # OF OUTER LOOP TIMEOUT COUNTERS.
THIS VALUE IS DETERMINED BY THE BAUD
RATE IN THE INIT. SECTION OF CODE.

WAIT3

ety BN,
“. Coe

3933

3937

13-MAR-80
GLOBAL SUBROUTINES

002340
002366

3929
3930
3931
3932

3934
3935
3936

30A(1052)

SRR

014136
014136

INOUT

014142
014150

002366
002370
002324
002326
002330
002332

014156
014164
014172
014200
014206
014212
014216

014222
014226
014232
014236
014242
014242
014246
014250
014256
014264
014264
014270
014270
014270

REGISTERS

= RO - R5 DESTROYED

R AR A AN AN A AR

MOV

iit

dtsdiddddeddsi

AR NIRRT AAAAA

(SP) ,SUBRPC

#4 , SUBRP(

MOV
MOV
MOV
MOV

#1 ,NESTPC
BUFNUM, INRCV
BUFNUM, INXMIT
BUFNUM,OUTRCV

CLR
CLR

OQUTFLG
START

MOV
CLR

BUFNUM, OUTXMT
INFLAG

MOV
MOV

#RCVBUF ,R2
AXMTBUF ,R3

MOV
SETPRI

H#XMTBUF ,R5
#PRIO4

MOV

012700
104441

#RCVBUF ,R4

tiii

eSS

LLLR

AR AR ARRARARARARNRRNRRAAAN
AR
ANER

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

sFLAG THAT ANY SUBROUTINE USED WILL BE NESTED.

;4 OF BA/CC IN RECEIVES
:# OF BA/CC IN TRANSMITS
:# OF BA/CC OUT RECEIVES
;4 OF BA/CC OUT TRANSMITS
sCLEAR INPUT BA/CC FLAG
:CLEAR OUTPUT BA/CC FLAG
;CLEAR FLAG TO SHOW START UP NOT DONE (SET
;AFTER CONTROL IN)
;ADDR OF RCV. BUFFER TABLE (FOR INPUT,
;ADDR OF XMIT BUFFER TABLE (FOR INPUT)
;ADDR OF RCV. BUFFER TABLE (OUTPUT CHECKING)
;ADDR OF XMIT BUFFER TABLE (OUTPUT CHECKING)
;SET THE PRIORITY TO LEVEL 4 TO ALLOW THE
MOV
TRAP

112777

002314
000143

012701

001000

104422

SuB

012702
012703
012704
012705

013737

EXIT CONDITIONS

002316
165746

MOV

8%:
10%:

WAIT3 WAIT4

C$SPRI

sDMR TO INTERRUPT AT LEVEL 5
;TIMEOUT COUNTER DETERMINED BY BAUD RATE.

MOVB

#IESET!RQI!BASE] ,@BSELO ;FIRST COMMAND - BASE

MOV

#1000,R1

BREAK

#PR104
RO

IN.

s INNER LOOP COUNTER
;OPERATOR INTERRUPT ENABLE.
;THE

CALL TO
TRAP

SUPERVISOR TO ALLOW CONSOLE

C$8RK
INTERRUPT

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1
13-MAR-80 09:34
1

30A(1052)
13-MAR-80
GLOBAL SUBROUTINES

09:36

5
PAGE 2-42
SEQ 0065
;(NOTE:

014272

005737
001403
005737
001026

002346

012727
000000
013727
000000

000001

TST
BEQ

002350
12%:

TST
BNE

DELAY

INFLAG AND OUTFLG SET IN THE

INFLAG
12%
OUTFLG

20%

s SERVICE ROUTINES)
sARE THE INPUTS DONE?
sIF _NOT KEEP CHECKING.
;ARE THE OUTPUTS DONE?
;IF YES EXIT WAIT LOOP.

sWAIT 100 MICROSECONDS.

(INISR DONE?)
(OUTISR DONE?)

002116
177772
177756

014346
014350
014350
014352
014354
014356
014360
014362

R1
108
WAITS

002316

8%
2,EMG2,ERRG1

000453

20$:

012700
012701
013702
005737
001403
012737

JEXIT

#RCVBUF ,RO

JRECEIVE BUFFER POINTER TABLE ADDRESS.

BUFNUM,R2

:# OF

MMANAG

177572

408

”,aM177572

40%:

(RO)+,R3
(R1)+ Ré

ar0,RS

(RO)+,(R1)+
45%

002302
177572

MMAMNAG
418

a#177572

41%:

122324

001005
005305

LSDLY, (PO)+

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

CSERDF
2
EMG2
ERRG1

s TRANSMIT BUFFERS
RCV.

AND XMIT BUFFERS.

JARE THE BUFFERS MEMORY MANAGED?
:IF YES = PROCEED.
;TURN ON MEMORY MANAGEMENT

;ADDRESS OF A RECEIVE BUFFER.
;ADDRESS OF A TRANSMIT BUFFER.
s CHARACTER COUNT.
;ARE THE CHARACTER COUNTS THE SAME?
:IF YES - PROCEED.
;IS MEMORY MANAGEMENT TURNED ON?
sIF NOT = SKIP TURN OFF.
;TURN OFF MEMORY MANAGEMENT.

12,EMG12,ERRG10

104455
000014
020241
016160

000420

1.0

sDECREMENT OQUTER LOOP COUNTER
:IF NOT DONE - GO THROUGH INNER LOOP AGAIN.
: TIMEOUT MESSAGE.

60%

#XMTBUF
,R1

012003

€146446
(14450
(14450
J14452
014454

sCONTINUE IN LOOP UNTIL R1 - 0.

MoV
. WORD
MOV
. WORD
DEC
BNE
DEC
BNE

TRAP
. WORD
.WORD
.WORD
JALSO PRINT # OF BUFFERS NOT COMPLETE.

2
020025
014562

001402
005037

INTERRUPT

TRAP

.WORD

45%:
DEC

60%

SEXIT

(R3)+,(R4)+
508
RS

JARE

-WORD
THE

CHARACTERS THE

SAME?

;1F _NCOT - ERROR EXIT
sCHECK ALL THE CHARACTERS

CSERDF
12

EMG12
ERRG10

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA PN
13-MAR-80 09:34
014456
014460
014462
014464
014466
014466
014472
014474
014500

014506
014510
014510
014514
014516
014522
014522
014530

30A(1052)

GLOBAL SUBROUTINES

104455
0000 17
020341
016244

014542
01454
014546

014550
014554
014560

SEQ 0066

JCHECK ALL THE BUFFERS.

508

60%

518

TST
BEQ
C.R

MMANAG
518
aw177572

;1S MEMORY MANAGEMENT TURNED ON?
cIF NOT = SKIP TURN OFF.
JTURN OFF MEMORY MANAGEMENT.

ERRDF

15,EMG15,ERRG12
TRAP

LMWORD
.WORD

605

005737
001402
005037

002302

042777
042777

000120
000100

177572

615
165502
165476

.WORD

TST

MMANAG

BIC
BIC

#IESET!]IECLR,aSELO ;DISABLE BOTH INPUT INTERRUPTS
#I1EC,QSEL?
;DISABLE OUTPUT INTERRUPT

BEQ
CLR

61%
aw177572

SHUTDN

004737

6
PAGE 2-43

45%
R2
40%

014536
014536

09:36

BNE
DEC
BNE
BR

002302
177572

13-MAR-80

012560

JSR

PC,

SHALT

012700
104441
005037
005037
000207

000340
002370
002366

(LR

CLR

RETURN

.SBTTL

#PRIO7
NESTPC

SUBRP(C

15
EMGI1S

ERRG12

;1S MEMORY MANAGEMENT TURNED ON?

;IF NOT = SKIP TURN OFF.
;TURN OFF MEMORY MANAGEMENT.

;SHUT DOWN THE DMR
saxnxx MACRO EXPANSION waxx

;DMR HALT ROUTINE.

"fi**t

SETPR]

CSERDF

1 8.8 31

JRETURN PROCESSOR PRIORITY TO 7
;CLEAR NESTED FLAG.

MOV
TRAP

#PRI07,RO
C$SPR]

;CLEAR PC.

GLOBAL ERROR REPORT REPORT SECTION

AIIIIII1177777777777777777777777777777777777777777777777777777777777777777777

THE GLOBAL ERROR REPORT SECTION CONTAINS ERROR MESSAGES

:/
THAT ARE USED IN MORE THAN ONE TEST.
;////////é/é/////////////////////////////////////////////////////////////////
.EVEN

014562
014562
014562
014562
014566
014572

BGNMSG

013746
012746
012746

002366
016362
000002

ERRG1

PRINTB

#FMG3, SUBRP(

;PC

ERRG1::
THAT SUBROUTINE WAS CALLED.

MOV

MOV
MOV

SUBRP(C,=-(SP)

#FMG3
- (SP)
#2.-(SP)

CZOMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR=-80 09:34

(3)

(6)
(4)
4044
(9)
(8)
(7)
(6)

(3)
(4)
(4)
4045
(9)
(8)
(7)

014576

014600
014602
014606
014606
014612
014616
014622

014626
014630

014632
014636
014636
014642
014646

(6)
(3)
(4)
(4)
4046
(8)
(7)
(6)
(3)
(&)
(4)
4047
(8)
(7)
(6)
(3)
(4)
(4)
4048
4049
4050
4051
4052
4053
4056
4055
4056
(9)
(8)
(7)
(6)
(3)
(4)
(4)
4057
(9)

014652
014656
014660
014662
014666
014666
014672
014676
014702
014704
014706
014712
014712
014716
014722
014726
014730
014732
014736
014742
014746
014752
014756
014764
014772
015000
015006
015006
015012
015016
015022
015026
015030
015032
015036
015036

(6)

015052

(8)
(7)

(3)
(&)

015042
015046

015056

015060

C 6
30A(1052)
13-MAR-80 09:36 PAGE 2-44
GLOBAL ERROR REPORT REPORT SECTION

SEQ 0067

010600
104414
062706

0177646
017746
012746
012746
010600
104414
062706
017746
01774
012746
012746
010600
104414
062706

MOV
000006

000010

000006

013746

002320

000006
002324

013746

002326

013746
013746
012746
012746

010600
104414

PRINTB

#FMG1,aSELO.RSEL2 :PRINT SELO AND SEL2 CONTENTS.

#FMG2,aSEL4.@SEL6 :PRINT SEL4 AND SEL2 CONTENTS.

#FMG21,BUFNUM

#FMG22.BUFSIZ

:# OF BUFFERS

:BUFFER SIZE

017625
000002

002326
002330
002332
002322

013746
012746
012746
010600
104414
062706

PRINTB

002322
017545
000002

005437
005437
005437
063737

063737
063737
063737

PRINTB

165376
165370
016330
000003

013746
012746
012746
010600
104414
062706

012746
012746
010600
104414
062706
005437

PRINTB

165422
165414
016276
000003

002322
002322
002322

NEG

002324
002326
002330
002332

NEG
NEG
NEG
ADD

ADD
ADD
ADD
PRINTB

INRCV

INXMI
T
OUTRCV
OUTXMT
BUFNUM, INRCV

:NEGATE BUFFER VALUES

002332
002330
017733
000003

($PNTB
#6,SP

MOV
MOV
MOV
MOV

ASEL2,~(SP)
ASELO.~(SP)
#FMGT
.- (SP)
#3,-(SP)

MOV
TRAP

SP.RO
CSPNTB

ADD

#10,SP

MOV
MOV
MOV

ASEL6,~(SP)
ASEL4.~(SP)
AFMG2.
- (SP)

MOV
MOV
TRAP
ADD

#3,-(SP)
SP.RO
CSPNTB
#10,SP

MOV

BUFNUM,
= (SP)

MOV
MOV
MOV
TRAP
ADD

#FMG21
.~ (SP)
#2,-(SP)
SP.RO
C$PNTB
#6.,SP

MOV

BUFSIZ,~(SP)

MOV
MOV
MOV
TRAP
ADD

#EMG22
.~ (SP)
#2,-(SP)
SP.RO
C$PNTB
#6.SP

MOV

INXMIT,-(SP)

; CALCULATE BUFFERS ASSIGNED.
BUFNUM_ INXM] T
BUFNUM.OUTRCV ; CALCULATE BUFFERS RECEIVED.
BUFNUM
., OUT XMT
#FMG23,INRCV, INXMIT

002324
017652
000003
000010

SP,RO

TRAP
ADD

PRINTB #FMG24 ,0UTRCV,OUTXMT

MOV
MOV
MOV
MOV
TRAP
ADD

INRCV, =< (SP)
#FMG23,-(SP)
#3,-(SP)
SP.RO
CSPNTB
#10,SP

MOV
MOV
MOV
MOV

OUTXMT ,=(SP)
OUTRCV.~(SP)
#FEMG24
.- (SP)
#3,-(SP)

TRAP

CSPNTB

MOV

SP.RO

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
(4)

(3)
(3)

015062

015066
015066
015066

062706

000010

POPNIA)
= —d —

005737
001412

002366

013746
012746
012746
010600
104414
062706

002366
016362
000002

017746
017746
012746
012746
010600

165106
165100

015204
015204

(8)
(7)
(6)
(3)
(4)
(4)

(9)
(8)
(7)
(6)
(3)

015204

015210
015212

6
PAGE 2-45
SEQ 0068

ENDMSG

L10002:

)

10%:

ERRGZ

TST

B8EQ
PRINTB

PRINTR

SUBRP(
108

#FMG3, SUBRPC

017746
017746
012746
012746
010600

165062
165054
016330
000003

000010

PRINTR

001412

013746
012746
012746
010600
104414
062706

015236
015242
015246
015252
015256

017746
017746
012746
012746
010600

002366

000006
164772
164764

016276
000003

10%:

C$MSG

MOV
MOV
MoV
MOV
TRAP
ADD

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

#FMG1,aSELO,RSEL2 ;PRINT SELO AND SEL2 CONTENTS.

H#FMG2 ,dSEL4L ,BSELS ;PRINT SEL4 AND SEL2 CONTENTS.

L10003:
ERRG3

SUBRP(C
10%

#FMG3, SUBRPC

CSPNTB
#6,SP

aSEL2,=(SP)
@SELO,-(SP)

MOV
MOV
MOV
MOV
MOV

#FMGT ,~(SP)

ADD

#10,SP

MOV
MOV
MOV
MOV

aSEL6,~(SP)
aSEL4,-(SP)
HFEMG2
, = (SP)
#3,~-(SP)

TRAP
ADD

TST
BEQ
PRINTB

002366
016362
000002

TRAP

;IF NOT, DON'T PRINT SUBR. PC

;PC THAT SUBROUTINE WAS CALLED.

104423

005737

#10,SP

ERRG?::

ENDMSG

BGNMSG

ADD

;1S THE ERROR IN A SUBROUTINE?

016276
000003
000010

015212
015216
015222
015226
015230
015232

015236
015236

000006

062706

104414
062706

(3)

09:36

GLOBAL ERROR REPORT REPORT SECTION

BGNMSG

104414

015202
015202

13-MAR-80

104423

015070

(3)
(3)

30A(1052)

#3,-(SP)
SP,RO
CSPNTB

SP,RO
CSPNTB
#10,SP
CSMSG

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

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

P(C

THAT SUBROUTINE WAS CALLED.

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

SP,RO
CSPNTB
#6,SP
PRINTB

#FMGT,RSELO,QSEL2 ;PRINT

SELO AND SEL2 CONTENTS.

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

#FMG1,-(SP)

#3,-(SP)

SP.RO

CZDOMIAO DMR-11 FUNCTIONAL TEZTS MACY11
CZDMIA.P11
13-MAR-80 09:34
(4)
(4)

4076
4077
4078
4079
4080
(7)

015260
015262
015266
015274

(6)
(3)
(&)
(4)
4081
4082

(4)
4094

4095

4096
4097

(7)
(6)
(3)

(4)
(4)
4098
4099
(3)

(3)

4100
4101
4102

164736

#RUN ,QSELO

122777
001011

000001

164740

#1,3aBSEL3

012746
012746

016434

015402
015404
015404
015410
015412
015412
015416
015422
015424
015426
015432
015432
015440
015442
015442
015446
015452
015454
015456
015462
015462
015462
015462

000002

012746
012746
010600

016465
000001

015464

062706
000440

000004

012746

016465
000001

208
12%

HFMG4

105777
001010

164634

012746
012746
010600
10444
062706

017473
000001

000100

012746
012746
010600

017516
000001

000004

#10,SP

MOV

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

TRAP

16470€

12%:

30%
CMPB
BNE

PRINTS

#2,aBSEL3
15%
#FMGS

20%:

30%

PRINTB

HFMGS

308

1STB
BNE

aBSEL3
25%

PRINTB

164604

25%:

CMPB
BNE

PRINTR

#FMG19

JLINE UNIT FAILED.
-

sNO RUN - MASTER CLEAR FAILED.

ADD

#4,SP

MOV
MOV

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

TRAP
ADD

4, SP

MOV
MOV

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

TRAP
ADD

#4 ,SP

MOV
MOV

#EMG19,-(SP)
#1,-(SP)

TRAP
ADD

#4,SP

MOV
MOV

#FMG20,-(SP)
#1,-(SP)

TRAP
ADD

#4,SP

TRAP

CEMSG

SP,RO
CSPNTB

;1S BSEL3 STILL 07

;IF NOT - SEE IF MICRODIAG. RUN.

sDEVICE IS NOT DMR (DM(?)

#100,aBSEL3

;WERE MICRODIAGNOSTICS DISABLE?

#FMG20

;MICRODIAGNOSTICS DISABLED

30%

SP,RO
CSPNTB

;DID LINE UNIT MICRO. FAIL?

000004

122777
001010

062706

;IS THE RUN BIT SET
;IF RUN SET, CHECK.
:DID CPU MICRO. FAIL?
;IF NOT SEE IF LU FAILED.
;CPU MICRO. FAILED.

C$PNTB

ADD

MoV

000004

104414

SEQ 0069

000001

122777
001011

104414

1RAP

000010
100000

000004

4083
4084
4085
(7)
(6)
(3
(4)

(4)
4086
4087
4088
7
(6)
(3)
(4)
(4)
4089
4090
4091
4092
4093
(7)
6)
(3)
(4)

104414

062706
032777
001043

30A(1052)
13-MAR-80 09:36 PAGE 2-46
GLOBAL ERROR REPORT REPORT SECTION

30%:

SP,RO
CSPNTB

SP.RO
CSPNTB

ENDMSG

L10004:

104423

BGNMSG

ERRG4

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:3¢4

CZDM]IA. P11

(3)

4103
4104
4105
(8)
(7)
(6)
(3)
(4)
(4)
4106
4107
4108
4109
4110
41N
6112
12
(9
(8)
(8)
(7
(6)
(3)

015464

015510

(4)

(4)
4113
4114
4115
4116
4117
4118
4119
(9
(9
(8)
(8)
(7)
6)
(3)
(4)
(4)
4120
4121
4122
4123
4124
4125
4126
(9)
(9)
(8)
(8)
(7)
(6)
(3)

005737
001412

002366

013746
012746
012746
010600

002366
016362

104414

000006

105737
001003
105737
001416

002633

09:36

PAGE 2-47

GLOBAL ERROR REPORT REPORT SECTION
TST

SUBRPC

PRINTB

#FMG3, SUBRPC

BEQ

10%:

002636
118:

10$

SEQ 0070
::
ERRGS

;IS

THE ERROR IN A SUBROUTINE?

;PC

THAT SUBROUTINE WAS CALLED.

JIF NOT, DON'T PRINT SUBR. P(

MOV
MOV
MOV
TRAP
ADD

TST8B
BNE

BASE +3
11%

TSTB

BASE +6

PRINTB

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

BEQ

002633
016557
000003

000010

TRAP
ADD

TSTB

BASE+5

TSTB

BASE +8.

PRINTB

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

BNE

002640
13%:

BEQ

SP.RO
CSPNTB
#6,SP

12%

CLR
81s8
CLR
B1S8
MOV
MOV

12%:

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

JONLY PRINT NON-ZERO VALUES

002636

002635

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

+3, (SP)
BASE
H#FMG7 ,-(SP)
#3,-(SP)

SP,RO
CSPNTB

#10.sP

13%

14%

=(SP)

002640

BASE+8., (SP)

002635
016630
000003

BASE+5, (SP)

000010

002634

-(SP)

#FMGB,-(SP)
#3,-(SP)
SP,RO
CSPNTB
#10,5P

14%:
TSTB

BASE +4

7ST8

BASE +7

PRINTB

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

BNE

002637
15%:

015672
015676

13-MAR-80

000002

062706

005046
153716

30A(1052)

BEQ

15%

16%

~(SP)

002637

BASE+7, (SP)

002634
016701
000003

BASE
+4, (SP)
H#FMGY ,~(SP)
#3,-(SP)

-(SP)

SP,RO

CZDOMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
(4)
(4)
6127
4128
4129

015700
015702
015706
015706
015712

6131
6132
6133
(9)

015720
015722
015792
015722

4130

(9)
(8)
(8)
(7)

(6)

(3)
(&)
(4)
4134
4135
(3)
(3)
4136
4137
4138
4139
(3)
4140
(7)
(6)
(3)
(&)
(&)
4141
(9)
(8)
(7)
(6)
(3)
(4)
(¢)
4142
(8)
(7)
(6)

(3)

(&)
(4)
4143

(3)

4522
4145
(3)
4146
(7)

015714

015724
015730
015732
015736

015742

015746
015750
015752
015756
015756
015756
015756

104414
062706
105737
001003

105737

001416

005046
153716
005046
153716
012746

012746

010600
104414
062706

000010
002642

002641

015760
015764
015770
015772
015774

016000
016000
0160046

016010

016014
016020
016022
016026
016030
016030

016034
016040
016044

016046
016050
016054

016054

016056
016056
016056
016056

16$:
TSTB
BNE

BASE+10.
17%

PRINTB

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

002641

002642
016752

000003

000010

208$:
ENDMSG
L10005:

000004
164234
164226
017073
000003

016446
012746
012746

177776
017223
000002

PRINTB

#FMG12

:BA/CC QUT RECV

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

MOV
TRAP
ADD

SP.RO
C$PNTB
#10,SP

TRAP

($MSG

MOV
MOV
MOV
TRAP
ADD

NFMG12,-(SP)
#1,-(SP)
SP,RO
($PNTB
#4,SP

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

ASEL6, - (SP)
BSEL4L .~(SP)
#FMG1%,-(SP)
#3,-(SP)
SP.RO
(SPNTB
#10,SP

MOV
MOV
MOV
MOV

-2(R4) ,=(SP)
#FMG15.-(SP)
#2,-(SP)

TRAP
ADD

(SPNTB
#6,SP

000010

000006

TRAP

(SMSG

PRINTB

#FMG15,-2(R4)

;EXPECTED BA/CC

ENDMSG

L 10006:
BGNMSG

017010

MOV

#FMG11,-(SP)

#3,-(SP)

ERRG7::

#FMG13,0SEL4,aSEL6 :ACTUAL BA/(CC

104423

012746

CLR
BISB
CLR
BISB
MOV

ERRG7
PRINTB

017042
000001

017746
017746
012746
012746
010600
104414
062706

104414
062706

(SPNTB
#10,SP

MOV

BGNMSG

010600

1RAP
ADD

-‘—§~“TS+BH‘\ gASE+9

104423

012746
012746
010600
104414
062706

SEQ 0071

17%:

015760
0157260

015760

30A(1052)
13-MAR-B0
09:36 PAGE 2-48
GLOBAL ERROR PEPORT REPORT SECTION

ERRGS

PRINTB

#FMG11

:BA/CC OUT XMIT

SP.RO

ERRGS::

CZDOMIAO DMR-11 FUNCTIONAL TECTS MACY11
CZOMIA.P11
13-MAR-80 09:34
(6)

(3)

016062

016066

(&)
(4)
4147
(9)
(8)
(7)
(6)
(3)
(4)
(4)
4148
(9)
(8)
(7)
(6)
(3)
(&)
(4)
4149
(3)
(3)
4150
4151
4152
(3)
4153
(9)
(8)
(7)
(6)

016160
016160
016160
016160
016164
016170
016174

(%)
(4)
4154
(3)

016202
016204
016210
016210

(3)

4;;;
/156

(3)
4157
(9)
(8)
(7)
(6)

016070
016072
016076
016076
016102
016106
016112
016116
016120
016122
016126
016126
016132
016136
016142
016146
016150
016152
016156
016156
016156

016200

016210

010600

104414
062706

000010

016546
016546
012746
012746

177776
177774
017147
000003

062706

016212
016212
016212
016216
016222

016226

016232
016234
016236
016242
016242
016262

4160

016244

016244
016244

PRINTB

164136
164130
017073
000003

000010

#FMG13,3SEL4,aSEL6

;ACTUAL BA/CC

PRINTB #FMG14,-4(RS) ,=2(RS)

104414
062706

ERRG10

PRINTB

177776
177776
017252
000003

MOV
MOV

ASEL6.-(SP)
3SEL4 .- (SP)

000010

#FMG16,-2(R0),~2(R1)

ENDMSG

;RCV CC & XMIT CC

ERRG11

A#FMG17,-4(R0),=4(R1)

ERRG11::
:RCV BUFFER & XMIT BUFFER

000003

000010

ENDMSG

L10011:

104423
BGNMSG

#FMG15,-(sP)

#3,-(5P)

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

-2(R5) ,=(SP)
-4 (R5) .=(SP)
#FMG14 ,-(SP)
#3,-(SP)
#10,SP

TRAP

($MSG

MOV
MOV
MOV
MOV

<2(R1) ,=(SP)
-2(R0O) .-(SP)
#EMG16.~ (SP)
#3,-(SP)

TRAP
ADD

C$PNTB
#10,5P

TRAP

C$MSG

MOV
MOV
MOV

MOV
TRAP
ADD

MOV

=4 (R1) ,~(SP)
-4 (RO) .=(SP)
REMG17
.- (SP)
#3,-(SP)
SP.RO
C$PNTB
#10,SP

TRAP

(SMSG

SP.RO
CSPNTB
#10,SP

SP.RO
CSPNTB

ERRG10: :

L10010:

PRINTB

177774
177774
017331

SP.RO

MOV

BGNMSG

005303

CSPNTB
#4,SP

L10007:

104423

016146
016046
012746
012746
010600
104414
062706

TRAP
ADD

MOV
TRAP
ADD

:EXPECTED BA/CC

ENDMSG

BGNMSG

010600

#1,-(SP)

MOV

104423

016146
016046
012746
012746

MOV

000004

017746
017746
012746
012746
010600
104414
062706

010600
104414

SEQ 0072

000001

016212

(3)
(4)
(&)
4158
(3)
4§§$
(3)
4161

012746

H 6
30A(1052)
13-MAR-B0
09:36 PAGE 2-49
GLOBAL ERROR PEPORT REPORT SECTJON

ERRG12

DEC

ERRG12::
;BACKUP TO RECEIVE ADDRESS

SP.RO

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1T
13-MAR-80 09:34
4162
4163
(9)
(8)
(7)
(6)
(3)
(4)

(4)
4164

(3)
(3)
4165

016246
016250
016250
016252
016254
016260
016264
016266
016270
016274
016274
016274

005304

010446
010346
012746
012746

30A(1052)
13-MAR-80 09:36 PAGE 2-50
GLOBAL ERROR PEPORT REPORT SECTION
DEC

PRINTB

#FMG18,R3,R4

SEQ 0073

sBACKUP TO TRANSMIT ADDRESS

JPRINT OUT ADDRESS

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

017404
000003
000010

ENDMSG

L10012:

4166

4167

4168
4169
4170
Gan

6172

4173

4174

016276
016304
016312
016320
016326

016330
016336
016344
016352
016360
016362
016370
016376
016404
016412

042523
047445
042523
047445

030114
022466
031114
022466

FMG1:

LASCIZ

/XASELO:

XO6X%A SEL2:

X06IN/

042523
047445
042523
047445

032114
022466
033114
022466

FMG2:

.ASCIZ

/XASE'
4: XO6XA SEL6:

X06XIN/

051105

047522
051440
052125
040503
040440
020072
000116
020125
052117
040506
047045

FMG3:

LASCIZ

/%AERROR

FMG4 :

LASCIZ

/%ACPU MICROTEST FAILEDIN/

016420
016426
016434
016442
016450

IN SUBROUTINE CALLED AT P(C:

4175

027125
047522
043040
022504

FMG5:

LASCIZ

/%ALU.

4176

051040
046440
020122
020122
042105

FMG6:

LASCIZ

/%ANO RUN - MASTER CLEAR FAILEDAN/

4177

045501
041040

FMG7:

JASCIZ

/XANAKS=NO BUFFER

022463

020101

X06XN/

MICROTEST FAILEDIN/

RCV:

XD3XA SENT:

XD3XIN/

TRAP

R4 ,~(SP)

R3,-(SP)

#FMG18,-(SP)
#3,-(SP)

SP,RO
CSPNTB

#10,SP

C8MSG

CZDMIAO DMR-11 FUNCTIONAL T§STS MACY11
CZDMIA.PI1
13-MAR-80 09

016614

052116

4178

4179

4180

020072
000116
051513
042040
020040
022440
051440
022440
000
045501
020104
051105
020072
020101
020072
000116
051520
020072

4181

30A(1052)

13-MAR-80

09:36

PAGE 2-51

GLOBAL ERROR REPORT REPORT SECTION

SEQ 0074

FMG8:

LASCIZ

/XANAKS=-BAD DATA

R(CV:

XZD3XA SENT:

XD3IN/

FMGY:

LASCIZ

/%ANAKS=-BAD HCADER RCV:

%D3%A SENT:

XD3IN/

FMG10:

LASCI2Z

/XAREPS=RCV:

XD3IN/

FMG11:

LASCIZ

/XAXMIT BACC OUT COMMANDAN/

XD3XA SENT:

022504
4182

020126
047440
046517
047045

FMG12:

LASCIZ

/%ARCV BACC OUT COMMANDIN/

4183

052103
020040
020056
020101
046101
052116
032504

FMG13:

LASCIZ

/¥AACTUAL

4184

050130
020104
020056
020101
052103
052517
032504

FMG14:

LASCIZ

/XAEXPECTED ADDR.

X06X%A EXPECTED COUNT %DSXN/

4185

050130
020104

FMG15:

JASCIZ

/XAEXPECTED ADDR.

Z06XN/

FMG16:

LASCIZ

/%ARCV CHAR.

4186

046530

052111

0
041440

ADDR.

%00XA ACTUAL

COUNT

COUNT ZDSXA XMIT CHAR.

XDSIN/

COUNT X%DSXN/

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

041440
022440
000
053103
042506
022440
054040
052502
040440
022466

S;’R?G:}Nggi

4188

040510
052517
N

R
&
PN
¢

4187

017310
017316
017324

4189

K 6
30A(1052)
13-MAR-80
09:36
PAGE 2- 52
GLOBAL ERROR REPORT REPORT SECTION

SEQ 0075

FMG17:

.ASCIZ

/XARCV BUFFER AT XO6XA XMIT BUFFER AT X06IN/

FMG18:

LASCIZ

/XADATA DIFFERS AT RCV ADDR.

042104
033117

040524
042506
020124
042101
047445
047101
052111
027122
047045

042101
020105
046504

053105
047516
022522

FMG19:

LASCi2

/XADEVICE NOT DMRIN/

051103
020124
046102
000
040524

FMG20:

LASCIZ

/%AMICROTEST DISABLEDXN/

FMG21:

LASCIZ

/XASTATUS OF BUFFERS XNXANUMBER OF BUFFERS:XD3%N/

4190

419N

043117

X06%A AND XMIT ADDR.

4192

043125
044523
0642045

FMG22:

LASCIZ

/XABUFFER SIZE:

4193

020040
020126
047107
031504
054040

FMG23:

LASCIZ

/%AIN

- RCV ASSIGNED:XD3XA

XMIT ASSIGNED:%D3IN/

052125
053103
051125
042045
020040

FMG24:

LASCIZ

/%ACUT - RCV RETURNED:XD3XA

XMIT RETURNED:%D3IN/

4194

017732
017733
017740
017746
017754
017762

022472
000
045
026440
051040
042516
022463

XDSXIN/

051501
042105
047045

020101

%O06%N/

CZDMIAO DMR~11 FUNCTIONAL TESTS MACY11
CZDMIA.P1T
13-MAR-80 09:34

017770
017776
020004
020012

30A(1052)

13-MAR-80

09:36

6
PAGE 2- 53

GLOBAL ERROR REPORT REPORT SECTION

SEQ 0076

046530
052105
035104
000116

052111
051125
042045

051040
042516
022463

044524
052125
124
052517
052504
044440

042515
000
046511
020124
044522
052116
052120
041522

047440

EMGI:

LASCIZ

/TIME OUT/

020105
020055
043516
051105
042440
051511

EMGZ:

LASCIZ

/TIME OUT - DURING INTERRUPT EXERCISE/

042520
041440
046117

052103
047117
047440

EMGS8:

LASCIZ

/EXPECTED CONTROL OUT - NOT RECEIVED/

4200

EMG9:

LASCIZ

/UNEXPECTED CONTROL OUT/

4201

EMG10:

.ASCIZ

/ERROR = MULTIPLE

4202

EMG11:

LASCIZ

/BUFFER ADDRESS ERROR/

EMG12:

.ASCIZ

/CHARACTER COUNT ERROR/

EMG13:

LASCIZ

/ERROR - MULTIPLE RCVS/

EMG14:

LASCI2Z

/RECEIVED EXTRA DATA/

EMG15:

LASCIZ

/DATA ERROR/

EMG16:

JASCIZ

/UNEXPECTED HALT RECEIVED/

EMG17:

.ASCIZ

/CONTROL

4195

64197
4198

4199

4203
4204

4205

4206

4207

051122

051117
020241
020246
020254

XMITS/

103

040522
041440
042440
000
051117
046125
020105
000
044505
054105
040504

052103
052517
051122
105
026440
044524
041522
122

042526
051124
040524
104

020101

4208

020124

053111
4209

103
046117
051120

0467117
044440
041117

IN PROBLEM -

INTERRUPT ROUTINE/

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

5 17
000
123
517
117
122

020055
052116
052120
044524

047111

052520
020123
04711
050125

044522
042122
042524
000124

M 6
30A(1052)
13-MAR-80 09:36 PAGE 2 -54
GLOBAL ERROR REPORT REPORT SECTION

EMG18:

.ASCIZ

SEQ 0077

/SPURIOUS RDO INTERRUPT/

.EVEN

.SBTTL

LOAD DEVICE PROTECTION TABLE

////////////////////////////////////////////////////////////////////////////
;/ THIS TABLE IDENTIFIES THE LOAD DEVICE TO THE SUPERVISOR, SO THAT IT CAN BE
:/ PROTECTED FROM TESTING. If DESIRED.
/////////////////////////////////////////////////////////////////////////////

(3)

020506
020506

BGNPROT

020506
177777
020510 77777
177777
020512

.WORD
.WORD
.WORD

020514

ENDPROT

.SBTTL

LSPROT::
-1
-1
-1

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

INITIALIZE SECTION

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

/////////////////////////////////////////////////////////////////////
(3)
(3)
(3)

020514
020514
020514
020514
020520
020522
020526
020532
020536
020542

BGNINIT

LSINIT::

000340
002364
002366
002360
002274
002276

SETPRI

Mov
CLR
CLR
CLR
CLR

HPRI07

SP,PSTACK
SUBRP(
ERROR
RE SUME
DMCMDE

;SET DIAGNOSTIC PRIORITY = 7

MOV

TRAP

;STORE BASE LEVEL PROGRAM STACK POINTER

;CLEAR
.CLEAR
;CLEAR
;CLEAR

#PR107,RO
C$SPRI

STORAGE WORD FOR SUBROUTINE PC CALL
ERROR FLAGS
FLAG USED TO ALLOW BASE IN - RESLWE
FLAG USED TO INDICATE DMC MODE

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052) 13-MAR-80 09:36 N PAgE 2=55

CZDMIA. P11
4254

4255

020546

13-MAR-80 09:34

005037

020552

002372
002264
000001
002266

020572
020572
020572
020576

INITIALIZE SECTION

1%:

012700
104436

000004

012700

000040

104447

000037

103412

012700
104447

000035

103410

012700
104447

000036

103013
000137

021510

005037

002270

012737
005237
005237

177777

005237
023737
002363

002362
002362

013720

002362

104442

CLRNO

TST

FRSTIM

MoV
CLR

#1,FRSTIM
FRSPAS

sCLEAR WORD USED TO RUN MICRO TESTS ON
;EVERY OTHER MASTER CLEAR.
;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

;ENSURE VECTOR 4 IS IN NORMAL STATE.

READEF

103416

012700

CLR
BNE

002264

STARST:

002362

NEWST:

GETPRM:

002012

#EF .START

oIS THIS JUST STARTED?

BCOMPLETE STARST

JIF YES - BRANCH.

READEF

;IS THIS A RESTART ?

#EF .RESTART

BCOMPLETE STARST

:IF YES - BRANCH.

READEF

;1S THIS A NEW PASS?

#EF .NEW

BCOMPLETE NEWST

S IF YES - BRANCH

READEF #EF .CONTINUE

;1S THIS A CONTINUATION?

020714
020720
020722
020726
020730

000007
000007

#4 RO
C$CVEC

MOV

#EF .STAR
,RO
T

BCS

STARST

MOV
TRAP

WEF _.RESTART
,RO

8CS

STARST

MOV
TRAP

HEF .NEW,RO

8CS

NEWST

MOV
TRAP

HEF . CONTINUE
,RO

TRAP

"$REFG

CSREFG

JIF NOT - GET PARAMETERS

JMP

END

;OTHERWISE - DON'T INITIALIZE.

CLR

STARES

;CLEAR THE FLAG TO SHOW START/RESTART.

MOV
INC
INC

#-1,LOGDEV
FRSPAS
STARES

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

INC
cMP
EGE
GPHARD

LOGDEV
LOGDEV,LSUNIT
NEWST
LOGDEV,R1

sNEXT LOGICAL UNIT TO BE TESTED
;IS THE MAXIMUM UNIT # EXCEEDED?
;IF YES - DO A NEW START
;GET THE P-TABLE POINTER INTO R1

BNCOMPLETE

002252

MOV
TRAP

BNCOMPLETE GETPRM

010001

103365

SEQ 0078

MOV
MOV

BIT

BEQ
BIC

GETPRM

(R1)+,WTYPE
(R1) ,RO

47 .RO

10$
47, (R1)

GETPRM

MOV
TRAP
MOV

LOGDEV,RO
CSGPHRD
RO,R1

BCC

GE TPRM

;IF NOT AVAILABLE, GET THE NEXT ONE

sMICROPROCESSOR TYPE

;SAVE THE ADDRESS

;DOES THIS DEVICE ADDRESS END [N NON-ZERQ?
JIF NOT = OK (76XXX0)
JMAKE IT 76XXx0

CZCMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-B0 09:34
6292
(9)
(8)
(7)
(6)
(3)
(4)
(4)

020734
020734
020736
020740
020744
020750
020752
020754

4294
6295
4296
4297
4298
4299
4300
4301
6302
4303
4304
4305
4306
4307
4308
4309
4310
4311
6312
4313
(9)
(8)
(7)
(6)
(3)
(6)
(4)
4314
4315
4316
4317
64318

020760
020764
020770
020774
021000
021006
021012
021020
021024
021032
021036
021044
021050
021056
021062
021070
021072
021076
021100
021104
021104
021106
021110
021114
021120
021122
021124
021130
021130
021134
021140
021142

4293

4319

4320
4321
4322
4323
4324

2%52

4327
4328
4329
4330
(7)
(6)
(5)

020760

021146

021152

010046
011146
012746
012746
010600
104414
062706

011137
011137
005237
011137
062737
011137
062737
011137
062737
011137
062737
011137
062737
012137
062737
011100
032700
001414
042711
010046
011146

012746
012746
010600
104414
062706

011137
011137
011100
105060
105060

062737

30A(1052)
13-MAR-80
INITIALIZE SECTION
PRINTB

09:36

7
PAGE 2-56

SEQ 0079

#FINIT1,(R1),RO :INFORM THE USER

021512
000003

MoV
MOV
MOV
MOV

000010

TRAP
ADD

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

108:

002234
002244
002236
002246
002240
002250

000007

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

(R1),CSR
(R1) ,BSEL1
B3EL1
(R1) ,SEL2
#2,SELZ
(R1) ,BSEL3
#3,BSEL3
(R1) ,SEL4
#4,SELS
(R1) ,BSELS
#5,BSELS
(R1) ,SEL6
#6,SELS
(R1)+,BSEL7
#7 ,BSEL7
(R1) ,RO
#7,R0
118
#7,(R1)
#FINITZ2,(R1),RO

JHIGH BYTE ADDRESS OF

;HIGH BYTE OF

(SR

;PORT REG (SEL 4) ADDRESS

JHIGH BYTE OF SEL4
;PORT REG (SEL 6) ADDRESS
;HIGH BYTE OF SEL6
sGET VECTOR
;DOES THIS VECTOR END IN NON-ZERO?
;IF NOT - OK (XX0)
JMAKE IT XX0
: INFORM THE USER

RO,=(SP)
(R1) ,=(SP)
HFINIT2 ,~(SP)
#3,-(SP)

SP,RO
CSPNTB

000010

11$:

002226
002230
000003

000007

000240
021772
002226

#10,SP

SELZ2

#10,sP

MoV
MOV
MOV
CLRB

CLRB

002230

ADD

(R1) ,DMRVEC
(R1) ,DMTVEC
(R1) ,RO
3(R0)

7(RO)

#4 ,DMTVEC

;RCV. VECTOR
:;?éNSMIT VECTOR

cRCY,

VECTOR

;CLEAR HI BYTE OF PSW FOR RCV. VECTOR.
;CLEAR HI BYTE OF PSW FOR XMIT. VECTOR.
sTHIS WILL ENSURE THAT WE DON'T PICK
sUP ANY UNEXPECTED BITS IN PROCESSORS

sWHICH USE BITS 11-15 OF THE PSW.
IE
;IF BIT 11 IS SET IN AN 11/70 ANOTHER
JREGISTER SET MAY BE USED.
sADJUST XMIT VECTOR

JTESTS 15-19.
012746
012746
013746

#3,-(SP)
SP,RO
CSPNTB

;CONTROL OUT REGISTER ADDRESS

sSET UP ISRS FOR DMR.
021160
021160
021164
021170

(R1) ,=(SP)

#FINIT1,-(SP)

s CSR ADDRESS

021605
000003

000004

RO,=(SP)

SETVEC

DMRVEC,#INISR,#PRIOS

s INPUT ISR

INTERRUPTS ENABLED IN

MOV
MOV
MOV

#PRI0S,~(SP)

#INISR,-(SP)

DMRVEC,~(SP)

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
(4)
(3)
(2)
4331
(7)

(6)
(5)
(4)
(3)
(2)
4332
4333

433%
4335
4336
4337
4338
4339

021174
021200
021202
021206
021206

4365

4366
4367
4368
4369
4370
4371
4372
4373
4374
4375
4376
4377

SEQ 0080

021212
021216
021222
021226
021230

000240
023054
002230
000003

021234
021240

062701
012137

000014
002254

ADD
MOV

#14 R
(R1)+,DMTURN

;INCR. P-TABLE POINTER.
: TURNAROUND

021244

013700

002224

MOV

SPEED,RO

;GET THE SOFTWARE 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

R1
R2
RO
14%

MoV
ASR
ASR

;SAVE TIMER VALUE FOR SWAIT
JHALF THAT VALUE

MOV

R1,WAIT1
R1
R1
R1,WAITZ2

MOV

R2,WAIT3

;TIMER VALUE FOR $INOUT SUBROUTINE.

MoV

#333,AX3

CMP

#1,DMTURN

s CHECK TURNAROUND.
JMASK FOR AX3-15 - BIT CLEARED WILL
sBE THE INTERFACE SELECTED.

021270
021274
021276

4360

PAGE 2-~57

012746
012746
013746
012746
104437
062706

4350
4351
4352

4361
4362
4363
4364

000003

021250
021250
021254
021260
021260
021262
021264
021266

4355
4356
4357
4358

09:36

012746
104437
062706

4340
4341
4342
4343
4344
4345
4346
4347
438

4353

30A(1052)
13-MAR-80
INITIALIZE SECTION

021300

000010

SETVEC

000010

ADD

138:
148:

BNE
002310

002312

010237

002314

021310

012737

000333

002304

021316

022737

000001

002254

021336

021344
021346
021354
021356
021356
021364
021366
021374
021376
021376
021404
021406

001004
042737
000427

000020

002304

022737

000002

002254

000010

002304

000003

002254

042737
000407

000100

002304

022737
001007
042737

000004

002254

001004
042737
000417

022737
001004

000200

MOV

TRAP

021304

021324
021326
021334
021336

[SR

MoV

001374

010137

sOUTPUT

MOV
MOV

006301
006302
005300

010137
006201
006201

DMTVEC,#OUTISR,#PRIOS

MOV
TRAP
ADD

002304

208:

228:

258:

BNE
BIC
BR

JHALF

1T AGAIN.

;SAVE TIMER VALUE FOR SMSCLR AND $(LRQ]

: SUBROUTINES.

;1S V.35 REQUESTED?

;IF NOT - CONTINUE

JSELECT v.35

#2 ,DMTURN

22%
#B1T3,AX3
30%

;1S INTEGRAL REQUESTED?
;1F NOT - CONTINUE.
sSELECT INTEGRAL MODEM.

CMP
BNE

#3 ,DMTURN

;1S EIA REQUESTED?
sIF NOT - CONTINUE.
SSELECT EIA(XYZ).

(MP
BNE
BIC

#4 ,DMTURN

BIC
BR

25%
#BIT6,AX3
308

35%
#BIT7 ,AX3

#3,-(SP)
CSSVEC

#10,SP

; DEC SPEED VARIABLE
; CONTINUE UNTIL DONE INCREASING WAIT VALUES

BNE
BIC
BR

CMP

#PRIOS,~(SP)

#OUTISR,=(SP)
DMTVEC,~(SP)

TIMER VALUES X 2

208

#BIT4 AX3
308

#3,-(SP)
CSSVEC
#10,SP

;1S RS422 REGUESTED?

s1F NOT, DON'T ALLOW INTERFACE CHANGE.

;SELECT RS422.

021454
021462
021464
021472
021474
021474

000001

002262

35%:

005037
005037
022737
001414

000001

002254

000003

002254

000006

002254

000007

002254

012737
000402

000001

005037

002306

104411

040445
051101
026440
020114

025052
044516

002306

4402
4403

022451

40%:

453:
50%:
END:
ENDINIT

053440
043516
046111
052523
051115
042522
033117
047516
022466

4401

022463
052117
040445

30%:

SEQ 0081

MOV
BR

#1,INFACE
40%

;SET FLAG THAT ALLOWS INTERFACE CHANGE.

CLR

INFACE
AX3

;CLEAR FLAG = NO INTERFACE CHANGE.

#1,DMTURN

;IS THIS v.35?

CLR

CMP
BEQ
CMP
BEQ
CMP
BEQ
CMP
BNE

45%

#3 ,DMTURN
45%
#5,DMTURN

45%

#7 ,DMTURN

50%

;CLEAR AX3 BITS
;IF

YES - SET WRITE MAINT.

BIT

THIS EIA?
YES - SET WRITE MAINT. BIT
THIS LOCAL LOOP?
YES - SET WRITE MAINT. BIT.
THIS REMOTE LOOP?
NOT - CLEAR MAINT. BIT FLAG

MOV

#1,WMAINT
END

;SET FLAG TO WRITE MODEM MAINTENANCE BITS.

CLR

WMAINT

;CLEAR FLAG - DON'T WRITE MAINT.

FINIT1:

_ASCIZ

/XAxx WARNING - WILL ASSUME DMR ADDRESS Z%06%A

FINIT2:

.ASCIZ

/X%A** WARNING - WILL ASSUME DMR VECTOR

047445
047050
031517
000116

.EVEN

.SBTTL

1 OR 2.

L10014:

4405
4406
4407
4408
4409
4410
4411

4412
44613

PAGE 2-58

bt breg Bmag By

021422
021424
021424
021430
021434
021434
021442
021444
021452

012737
000404

09:36

TDnTnTTMMOD

021414

30A(1052)
13-MAR-80
INITIALIZE SECTION

et brmg b

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

AUTO DROP UNIT SECTION

TRAP
CSINIT
(NOT X%06XA)IN/

XC3XA (NOT %O3XA)2IN/

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
4414
4415

L4616
4417
4418
4419
(3)
4420
4421
(7)
(6)
S)
4)
3
2)
4422
4423
6424
4425
44626
4427
4428
4429
4430
4431
4432
3

30A(1052)

13-MAR-80

09:36

AUTO DROP UNIT SECTION

PAGE 2-59

SEQ 0082

SIILILIITIT77777777777777777777777777777777777777777777777777777477777777777
:/ 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.
SIIIIIIII777777777777777177777777777777777777777777777777777777777777777777777

021700
021700

021700
021700
021704
021710
021714

021720
021722
021726
021732

BGNAUTO

012746
012746
012746
012746
104437
062706
005037
005777

LSAUTO::
SETVEC

000340
023512
000004
000C03
000010
002340

CLR

160274

TST

#4 ANOXMEM,#PRIO7 ;SET UP NON -EXISTENT MEMORY TRAP VECTOR.
MOV
#PRI107,-(SP)
MOV
#NOXMEM,
- (SP)
MOV
#6,-(SP)
MOV
#3,-(SP)
TRAP
C$SVEC
ADD
#10,SP
FLAG
;CLEAR FLAG THAT WILL BE SET IF NXM OCCURS.

aCSR

JREFERENCE MEMORY ADDRESS FOR

:TO SEE

SRRl

sttt

dal

IT EXISTS.

stttz

THE DEVICE

22022222

; IF THE DEVICE DOESN'T EXIST THE RESULTANT TRAP TO VECTOR 04 WILL
; CAUSE THE DEVICE TO BE DROPPED (SEE INTERRUPT ROUTINE °‘DROP04').
. OTHERWISE THE MEMORY REFERENCE IS UNEVENTFUL AND THE DEVICE IS READY.

012700
104436

005737
001406

013700
104451

104444

005037

CLRVEC

000004

002340

FLAG

:DID NXM OCCUR?

DODU

LOGDEV

;DROP THE DEVICE

CLR

2222222322222

JRETURN VECTOR 04 TO NORMAL STATE
MoV

TRAP

#4 ,RO

C$CVEC

;IF NOT EXIT

MOV
TRAP
;DO CLEAN UP - FORCE BACK TO INIT CODE.

DOCLN

002340

TST

BEQ

002362

ettt

FLAG

JRESTORE

FLAG.

LOGDEV,RO
C$DODU

TRAP

CSDCLN

CSAUTO

ENDAUTO

021766

L10015:

104461

.SBTTL

CLEANUP CODING SECTION

JIIIILIIIIIT7777077777777777777777077777777777777777777777777777777177777777
./

THE

END OF

CLEANUP

THE

CODING

SECTION CONTAINS

THE

CODING

TEST SEQUENCE ON A PARTICULAR UNIT.

THAT

IS PERFORMED AT

THE

THIS SECTION IS REQUIRED

CZDMIAO DMR-11 FUNCTIONAL TEZTS MACY11
CZDMIA.P11
13-MAR-80 09:34
4456

4457
4458
4459
(3)
4460

4461

(3)
(3)
4462
4463

30A(1052)
13-MAR-80 09:36
CLEANUP CODING SECTION

7
PAGE 2-60

SEQ 0083

EVEN IF IT IS A NULL CLEANUP

IIVIIIIITII177770777777077777777777777777777777777777777777777777777777777777

021770
021770

021770
021770
021770

BGNCLN

L$CLEAN::

JNULL CLEANUP

ENDCLN

L10016:

104412

TRAP

CS$CLEAN

G464
4465
4466
4467

4468
4469
4470

.SBTTL

4471

4477
(3)
4478
4479
4480
4481
4482
4483
4484

4485
4486
4487
4488
4489
4490
4491
4492

4493

4494
4495
4496
4497
4498
4499
4500
4501
4502
4503
4504
4505
(4)
(5)

INTERRUPT HANDLING ROUTINES

SIILITIILLT777777777777777777777777777777777777/77/7777/7777777/7777777

4472
4473
4474

4475
4476

GLOBAL

;/
;/

THE
THE

INTERRUPT HANDLING SECTION CONTAINS CODING REQUIRED TO USE
'SETVEC' MACRO.
NOTE EVERY INTERRUPT ROUTINE SHOULD SAVE

;/ AND RESTORE RO.

ILII11777777777777777770777777777777777777777777777/77777777777777777

021772
021772
021772
021774
021776

BGNSRV

010046
010146
017701
042701

022016

160230
177760

000200

INISR
MOV
MOV
MOV

81C
BIT
BNE

160216

022526

JMP

:INPUT INTERRUPT SERVICEIS?g;INE
RO,-(SP)
R1,-(SP)
@SELO,R1

#177760 ,R1
ARDI ,@SELO
1%

;SAVE RO
;SAVE R1
sSAVE THE CONTROL

IN COMMAND.

sCLEAR ALL BUT THE COMMAND BITS (0-3)
;IS RDI SET
sIF YES = PROCESS INPUT (OMMAND.
s ISSUE NEXT INPUT COMMAND.

:ttttt*tttitt'tt'tttttt**ttit*t*tfitt*fi*fit'tt't'ifittttttt'tttttttttt't

* PROCESS INPUT COMMAND
022022
022022
022026
022030

022034
022036
022042
022044
022050

;ttttt*'fi.ttttt't*t'Qtt*tt*ttt!t'tt*tfiit'tittfitttfitttttttt'ttttittt't

022701
001533
022701
001537

000004

000000
000003

000001
000005

000015
000002

022074
022076

104455

000021

1%:

#BACCR.R1

(MP

#BASE ] ,R1

BEQ
(MP
BEQ
BEQ

mMpP
BEQ

;IS THIS A RCV. BA/(CC?

29%
#BACCT ,R1
30%

;BR IF YES.
;IS THIS A XMIT. BA/C(C?
;BR IF YES.

20%

;BR IF YES.

;1S THIS A BASE

IN?

#CNTRL ,R1
15¢%

;IS THIS A CONTROL IN?
;BR IF YES.

BEQ
(MP
BEQ

108
#INTER,R1
5%

;BR IF YES.
;1S THIS AN INTERFACE WRITE.
:BR IF YES.

BEQ
ERRDF

708
17,EMG17 ,ERRGZ

JEXIT = IF YES (NOTHING TO SET UP)
;PROBLEM IF IT'S NOT ONt OF THE ABOVE.

CMP

(TMMP

#MMODEM, R

AHLT R

;IS THIS A WRITE MODEM?

;IS THIS A HALT?

TRAP

.WORD

CSERDF

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.PIM
13-MAR-80 09:34
(5)
(5)
2289

022100
022102
022104

4508
4509
42}?

022106

4512
4513
4514
4515
4516
4517
4518
4519

022106

113777

022114

000561

020405
015070
000565

70%

JEXIT

SEQ 0084
.WORD

EMG17

.WORD

ERRG?2

5%:

;
; WRITE AX3-15
002304

160134

022116

MOVB

AX3,38SEL7

70%

JWRITE NECESSARY AX3-15 INTERFACE.
;AX3 HAS BEEN DETERMINED IN THE INIT
. CODE.

10%:

;

225?

: MODEM WRITE

4522
4523
4524
4525
4526
4527
4528
4529
4530
4531
{532

022116
022124
022126
022134
022142
022144
022144
022152
022160
022162

4535
4536
4537
4538

022162
022166
022170
022176

022737
001007
042777
052777
000546
042777
052777
000537

000006

002254

000004
000010

160104
160076

000010
000004

160066
160060

11%:

15%:

cMP
BNE
BIC
BIS
BR

#6,DMTURN
1%
AMAINT2 ,9SELS
AMMAINTT ,9SELS
708

;IS LOCAL MODEM [LOOPBACK DESIRED?
;BR [F NOT
JENSURE REMOTE LOOPBACK IS CLEAR.
;SET MAINTENANCE 1 BIT

BIC
BIS
BR

#MAINTT QSELE
MMAINT? ,@SEL6
70%

;ENSURE LOCAL LOOPBACK IS CLEAR.
;SET MAINTENANCE 2 BIT.
;CLEAR RQ]

2%43

;CONTROL IN

005737
001404
012777
000530

002300

005077
000525

160034

000400

4539
4540
4541
4542
(543

022200
022200
022204
022206

2229

022206

012777

002630

4548
4549

022214
022220

005737
001004

002276

160042
17%:
20%:

zgzé

4550
4551
4552
4553
4554
4555
4556
4557
4558
4559

30A(1052)
13-MAR-80 09:36
PAGE 2-61
GLOBAL INTERRUPT HANDL ING ROUTINES

TST
BEQ
MOV
B8R

MNTMDE
17%
MAINT ,aSELS
708

;1S MAINTENANCE MODE REQUESTED
‘BR IF NOT
JREQUEST MAINT. MODE

CLR
BR

aSEL6
70%

JFULL DUPLEX - NON-MAINT. MODE.

MOV

#BASE ,aSELS4

;BASE TABLE ADDRESS.

TST
BNE

DMCMDE
22%

JARE WE IN DMC MODE?
;BR IF YES

;BASE IN

022222
022230
022232
(022232
(022236
022236
022242
022244
(022252
022254

012777
000402

000522

005077

160002
)
002272

005737
001004
052777
000406

000100

160022

160010

22%:
23%:

157762
24%:

MOV
B8R

#DMR ,aSEL6
23%

;DMR MODE.
;CHECK LOOPBACK.

CLR

aSEL6

;DMC MODE

TST
BNE
BIS
BR

START
243
#1EO,QSEL2
25%

;1S THIS THE FIRST BASE IN?
JIF NOT - SET RESUME.
;ON FIRST BASE IN SET RDO INT.ENABLE.

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
4560
4561
4562
4563
4564
4565
4566
4567
4568
4569
4570
4571
64572
4573
4574
4575
4576
4577
4578
4579
4580
4581
4582
4583
4584
4585
4586
4587
4588
4589
4590

45N

4592

022254
022262

022270

022314

022316
022316
022322

022326
022332

022334
022334
022340
022344
022350
022350
022354

4600
4601
4602
4603
4604

022400
022404
022410
022412
022416
022420

4606
4607

4608
4609
4610
4611
4612

4613

4614

4615

157756

25%:

005737
001004
052777
000465

002254

004000

157726

042777

004000

157716

27%:

000461

09:36

7
PAGE 2-62

INTERRUPT HANDL ING ROUTINES
BIS
MOV

002352

005337
012277
012277
000406

29%:

002324

157710
157706

WRES ,@SEL6
#-1,RESFLG

SEQ 0085

;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)

1St

DMTURN

;1S INTERNAL LOOPACK REQUESTED?

BNE
BIS
BR

27%
#LPLU,QSELO
708

*BR IF NOT - CLEAR LU LOOP
SSET THE LINE UNIT LOOPBACK BIT
*CLEAR RQI AND EXIT.

BIC

#LPLU,SELO

;gkgf?)LJNE UNIT LOOPBACK

B8R

708

*CLEAR RQ] AND EXIT

(CONNECTOR OR

022356

022426
022430
022430
022434
022436

022444
022446
022446

DEC
MOV
MOV
BR

INRCV
(R2)+,SELG
(R2)+,aSEL6
408

:DECREMENT COUNTER
*RCV BUFFER ADDRESS
*RCV CHARACTER COUNT

‘BA/CC IN XMIT

022372

4605

010000
177777

GLOBAL

13-MAR-80

‘BA/CC IN RCV

4593
4594
4595
4596
4597

4598
4599

052777
012737

30A(1052)

005337
012377
012377

002326

005737
001441

002302

052777

040000

010246
017702
042777

042702
022702
001421

052777

30%:

157672
157670

157644
160000

40%:

157654

157636

TST

MMANAG

JARE

157610

120000

040000

157572

060000

157562

THE BUFFERS MEMORY MANAGED?

:1F NOT SKIP CONVERTING VIRTUAL ADDR

2 TO _PHYSICAL ADDR.

MOV
MOV

R2,~(SP)
@SEL4 ,R2

sSAVE R2 (NEXT RCV BUFFER ADDRESS)
;SAVE THE VIRTUAL ADDRESS.

BIC
MP
BEQ

#7777 ,R2
#60000,R2
448

sSAVE ONLY THE _PAGE # IN THE SAVED ADDR.
;1S THIS PAGE 3?
sIF YES, PHYSICAL ADDRESS CALCULATED

TMMP

#160000,3SEL4

#100000,R2
418

#BI1T13,3SEL4
449

;SET BIT 16 OF PHSICAL ADDRESS (I.E.

;VIRTUAL ADDR 60000 = PHYSICAL ADDR 200000
;CLEAR BITS CORRESPONDING TO THE PAGE #

;IN THE VIRTUAL ADDRESS.

;1S THIS PAGE 4?
sIF NOT SEE IF IT'S PAGE 4 OR S

-SET BIT FOR PHYSICAL ADDR (I.E, VIRTUAL
;ADDR 177000 = PHYSICAL ADDR. 220000

#120000,R2

;1S THIS PAGE 4?

#BI1T14 ,aSELS
44s

;SET BIT FOR PHYSICAL ADDR (I.E. VIRTUAL
;ADDR 120000 = PHYSICAL ADDR. 240000

BNE

42%

BIS

#B1T14!BIT13,3SEL4 ;SET BIT FOR PHYSICAL ADDR (I.E, VIRTUAL
;ADDR 140000 = PHYSICAL ADDR. 260000

8IS
BR

42%:

708

JXMIT BUFFER ADDRESS.
JXMIT CHARACTER COUNT.

#BIT14,aSELG

BIS
41%:

(R3)+,aSEL4
(R3)+,aSEL6

BIS

CMP

000403

052777

;DECREMENT COUNTER

8IC

100000

000412

022702
001004
052777

INXMIT

BEQ

017777
060000

020000

DEC

MOV
MOV

;1F NOT, MUST BE PAGE 5.

CZDMIAO DMR-11 FUNCTIONAL TECTS MACY11

CZDMIA.PI11
4616

4617
22}8
4620
4621
4622
4623
46246
4625
4626
4627
4628
L4629
4630
4631
4632

022454

13-MAR-80 09:34
012602
000400

022460
022460

010137

002356

022464
022470

005737
001011

002276

022472
022474

012601
012600

052777
042777

22%2

022512

000002

4635
4636
4637

022514
022514
022522

042777

4638

000020
000040

15752¢
157520

4646
4647

JRESTORE RZ2 (NEXT RCV BUFFER ADDRESS)
;CLEAR RQI AND EXIT

MOV

R1,LAST

TST
BNE

DMCMDE
80%

MOV
MOV

(SP) + ,R1
(SP)+ RO

JSAVE THE INPUT COMMAND (USED
;TO DETERMINE NEXT INPUT COMMAND)
;ARE WE IN DM(C MODE?
;IF YES - DON'T USE IECLR
JNOTE: INTERRUPT CAPABILITY FOR RQ]
JCLEAR IS ONLY AVAILABLE IN DMR MODE.
;RESTORE R1
JRESTORE RO
;SET INTERRUPT ENABLE FOR RDI CLEAR.
;CLEAR RQ] - INT. GENERATED WHEN RDI]
cCLEARS IN RESPONSE.

#IECLR,QSELO
#RQ] ,aSELOD

157510

JRETURN AND WAIT FOR RQ! CLEAR INTERRUPT.

80%:
BIC
CALL

#IECLR,aSELO
$CLRQ]

JENSURE INTERRUPT ENABLE FOR RDI CLEAR IS CLR.
:CLEAR RQ] AND WAIT FOR RD! TO CLEAR.

:
; RDI CLEAR - DETERMINE NEXT INPUT COMMAND.

022526

022526
022534

022536
022542

022544
022550
022552
022556
022560
022560
022566
022570
022570
022574

4659

022576

4660
4661
4662
4663
4664
4665
4666
4667
568
«H69
4670
4671

SEQ 0086

(SP)+,R2
708

RT]
000020

PAGE 2-63

'°'!’.*..**fifi**'*""t'*"**.fi*'*'.fi.*'t*"fi*fi'*.*'*'Q.'*Q't‘l’fifi'fii""'

4548
4649
4650
4651
4652
4653
4654
4655
4656
4657

4658

MOV
BR

BIS
8IC

4642
4644
4645

09:36

70%:

4639
222?

L6463

13-MAR-80

GLOBAL INTERRUPT HANDL ING ROUTINES

44%:

022454
022456

022476
022504

30A(1052)

022737
001015

005737
001541

005737
001403
005737
001133

112777

000527

005737

001032

022737

000002

002274
002346

002350

000143

157444

000003

005737
001407
005737
001004

002262

022634
022642

112777
000501

000155

000015

106%:
110$:

002276

022604
022606
022614
022616
022620
022620
022624
022626
022632

001405
022737
001413
000421

002356

:'***t'**'**t't"t"i"t"**.*fi*fi'fi**.******fi**'flt*“'***fi'.'it**'t*fi'i't
CMP
BNE
TST
8EQ
1ST
B8EQ
TST
BNE

INFLAG
106%
OUTFLG
1708

MOVB

HIESET!RQ] 'BASE],aSELO ;ISSUE A BASE IN.
170%

JEXIT

TST

DMCMDE

;ARE WE

CMP

#BASE ] ,LAST

BNE
002356

002356

115%:

BEQ
cMP
BEQ
BR
TST
BEQ
TST
BNE

002272

157370

MOVB
BR

#HLT ,LAST
1108

RE SUME
170%

130%

115%
#INTER,LAST
117%
1308
INFACE
117%
START
117%

;WAS THE LAST COMMAND A HALT?
;IF NOT - PROCEED.
JARE WE TESTING RESUME?
JIF NOT, DON'T ISSUE ANOTHER COMMAND.
;INPUT BUFFER DONE?
;IF NOT, BASE IN.
;OUTPUT BUFFER DONE?
;1F YES, DON'T ISSUE ANOTHER COMMAND.

IN DMC MODE?

JIF YES - DON'T BOTHER CHECKING MODEM

JWRITE AND AX3-15 WRITE COMMANDS
;JWAS THE LAST COMMAND A BASE

IN ?

JIF YES - SEE IF INTER. OR M. WRITE IS NEEDED”?
cWAS THE LAST COMMAND AN AX3-1S WRITE?
JKEEP CHECKING FOR NEXT COMMAND.

;IS AN AX3-15 WRITE NEEDED?
:BR IF NOT
;WAS CONTROL IN ISSUED?
JIF YES = NO NEED TO REWRITE AX3-15. THIS
.SHOULD HAVE BEEN DONE ON THE 1Si BASE IN.
HIESET.RQI.INTER,QBSELO ;ISSUE AN AX3-15 WRITE COMMAND.

170%

CZDMIAQO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
4672
4673
4674
4675
4676
4677
4678
4679
4680
4681
4682
4683
4684
4685
4686

4687

4688
4689
4690
4691
4692
4693
469%
4695
4696
4697
4698
4699
4700
4701
4702
4703
4704
4705
4706

4707

4708
4709
4710
4711

4712
4713
4714
4715
4716
4717

4718
4719
4720

022644
022644
022650
022652
022660
022662
022662
022666
022670
022674
(022702
022704
022704
022710
022712

022716

022720
022726
022730
022734

005737
001404
112777
000472

002306

005737
001006
005237
112777
000461

002272

005737
001424
005737
001415
032737
001411
005737
001004

002324

000145

002272
000141

7
30A(1052)
13-MAR-80 09:36 PAGE 2-64
GLOBAL INTERRUPT HANDL ING ROUTINES
1178:

157352
130s:

157330
1508:

002274
000001

TST
BEQ
MOVS
BR

WMAINT
1308

1ST
BNE
INC
MOVB
BR

START

;WAS A CONTROL IN ISSUED?

START

$SET FLAG.

TST
BEQ
TST

BEQ

002324

BIT
BEQ
TST
BNE

002352

SEQ 0087

JWRITE MAINT1 OR 2?
;IF NOT - SKIP WRITE MODEM COMMAND.
q;(E)gET'RQI'WODEMLOBSELO ;ISSUE A MODEM WRITE COMMAND

150%

;IF YES - SKIP

158§ET'RQI'CNTRLLABSELO ;ISSUE A CONTROL

INRCV

JARE ALL THE BA/CC IN RCVS DONE?

160%

sIF YES = BR TO SEE IF XMITS DONE.

1538

:BR IF NOT.

1538

:BR
IF NOT.

RE SUME

#81T0, INRCV
RESFLG

152%

;IS A TEST OF RESUME REQUESTED?

;1S THIS AN ODD COUNT?

;WAS THE LAST COMMAND A BASE

;1F YES,

ISSUE BA/CC

IN RESUME?

SHALT ="TO TEST RESUME.
NOTE: THIS WILL
;OCCUR ONLY WHEN RESUME IS REQUESTED,

;FOLLOWING EVERY OTHER BA/CC(

022736
022744
022746
022746
022752
022752
022760
022762
022762
022766
022770
022774
022776
023004
023006
023012

112777
000440

000142

005037

002352

112777
000432

000144

005737
001424
005737

002326

032737
001411
005737
007004

000001

001415

157266
1528:

157252

1538

1608:

002274
002326

002352

MOVB
BR

;COMMAND
(NEVER FOLLOWING A RESUME)
1;8§ET'RQI'HLTLABSELO ;HALT IT

CLR

RESFLG

MOV
BR

f;ggET!RQI!BACCR.ESELO ;ISSUE A BA/CC

TST
BEQ
TST
BEQ
BIT
BEQ
TST
BNE

INXMIT

165%

RE SUME
163%

#BITO, INXMIT
163%

RESFLG

162%

;CLEAR FLAG.

IN RCV.

COMMAND.

JARE ALL THE BA/CC IN XMITS DONE?

;IF YES, SET THE FLAG

;1S A TEST OF RESUME REQUESTED?
:BR IF NOT.

:1S THIS AN ODD COUNT?
:BR IF NOT.

:WAS

THE LAST COMMAND A BASE

:IF YES,

ISSUE BA/(CC

JHALT = TO TEST RESUME.

[N RESUME?

NOTE:

THIS WILL

;OCCUR ONLY WHEN RESUME 1S REQUESTED,

023014
023022
023024
023024
023030
023030

4721
4722
4723
472

023036
023040
023040

4726
4727

023046
023046

112777
000411

000142

005037

002352

112777
000403

000140

157174

012737

177777

002346

012601

157210
162:

163$:

165$:

MOVB
BR

FOLLOUING EVERY OTHER BA/(CC
COMMAND
(NEVER FOLLOWING A RESUME)
l{;ggET'RQIJHLT, NBSELO SHALT IT

CLR

RESFLG

MOVB
BR

q;ggET!RQI!BACCT.wSELO ;ISSUE A BA/CC

MOV

#-1,INFLAG

JFLAG THAT ALL BA/CC

MOV

{(SP)+,R1

JRESTORE R1

;CLEAR BASE

1708

IN RESUME

FLAG.

IN XMIT COMMAND.

INS DONE.

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA. PN

4728
4729

4730
(3)
(2)
4731

023050
023052
023052
023052

012600

MOV

(SP)+,RO

SEQ 0088

JRESTORE RO

ENDSRV

L10017:

000002
SRR AR A AR A AR AR RN AN AR
JRRRARR

023054
023054
023054
023056
023064

30A(1052)
13-MAR-80 09:36 PAGE 2-65
GLOBAL INTERRUPT HANDL ING ROUTINES

BGNSRV

010046
032777
001006

000200

157150

104455
000022

RN AN

AN AR A AR A RN AR

AR AR RARNARNE AN

000137

023450

032777

000001

4749
4750
4751

OUTISR

sOUTPUT INTERRUPT SERVICE ROUTINE
RO,=~(SP)

MOV
BIT
BNE

#RDO,QSEL?2

ERRDF

18.EMG18,ERRG2

4767

000040

157110

BIT

#DMRRUN ,aSEL6

BEQ

7%:

10%:

OUTISR::

;SAVE RO

;IS THE RDO OUT BIT SET?
;IF YES = OK TO PROCEED.
;OTHERWISE REPORT SPURIOUS INTERRUPT
TRAP
.WORD
.WORD
.WORD

15%:
16%:

023450

20%:

002302
040000

157016

20%

H#HALTC ,QSEL6

108

;IS
; IF
;1S
;IF
;IS

[

4
[
[

JMP

65%

é;l¥07 = REPORT ERROR

ERRDF

9.EMGY,ERRG2

sJUNEXPECTED CONTROL OUT.

TST

TST
BNE
TST

TRAP

.WORD
.WORD
.WORD

65%

SEXIT ROUTINE

INFLAG
15%
OQUTFLG
60%

;ARE THE INPUTS DONE?
;BR_IF NOT
¢ARE THE OUTPUTS DONE?
;IF YES = ALL DONE, EXIT

BNE

65%

RE SUME

;1S A RESUME REQUESTED?
;1F YES - OK, BR TO EXIT

ERRDF

16,EMG16

sERROR = UNEXPECTED HALT.

JMP

60%

TST
BEQ
BIT

MMANAG
4<0%

#BIT14,3SELG

CSERDF
18
EMG18
ERRG2

THIS A CONTROL OUT
NOT -~ PROCESS BA/CC OUT
THIS CONTROL OUT A HALT?
IT IS = SEE IF WE SHOULD RESUME.
THIS DMR RUN MODE ACKNOWLEDGE?

108

8EQ

002274

023214

#CNTRL ,@SELZ2

157120

002350

005737
001452
032777

60%

001000

002346

4764
4765

JMP

BIT
BEQ
BIT

023500

(5
(5
(5)
4752
4753
4754
4755
4756
4757
4758
4759
4760
4761
4762
(4)
(5)
(5)
(5)
4763

4768

157124

5%:

NANANNNNS

AR A AR AR AN AR AR IR A AR A AR A AR R AN AR RAARRCRANARANRRRA
NN AR RN AR AS

020457

015070

RTI

TRAP

.WORD
.WORD
.WORD

CSERDF
9

EMG9
ERRGZ

C$ERDF

EMG16
0

JARE THE BUFFERS MEMORY MANAGED?
s1f NOT = NO NEED TO DETERMINE PHYS. ADDR.

;1S BIT 16 OF

THE PHYSICAL ADDR SET?

;(I.E. BUFFER SHOULD BE

IN PHYSICAL

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY
1 30A(1052)
13-MAR-80 09:36 PAGE 2-66
CZDMIA.P11
13-MAR-80 09:34
GLOBAL INTERRUPT HANDL ING ROUTINES
4769
4770
W7N
(4)

023222

001005

(3
(%)
(3)
4772
4773

W774
4775
4776
4777
4778
4779
4780
4781

BNE
ERRDF

140000
156766

156774

160000

156754

017777

023254
023262
023264

060000

022702
001004
052777
000403

120000

8IC

TST

21S THIS PAGE 3?

#60000,3SEL4
408

:SET BITS FOR PAGE 3.

#20000,R2

;1S THIS PAGE 42

#100000,8SEL4
408

:SET BITS FOR PAGE 4.

032777

000004

156666

22%

23$

002332
156656

:DETERMINE PAGE # FOR VIRTUAL ADDRESS.

:1F NOT CHECK FOR OTHER PAGES

:IF NOT ~ KEEP CHECKING

;1S THIS PAGE §?

#120000,8SEL4

:SET BITS FOR PAGE 5.

#140000,@SEL4

:SET BITS FOR PAGE 6.

#RCV,QSEL2
508
OUTXMT
(RS)+,aSEL4
418
(R5) +
11,EMG11,ERRG8

;1S THIS A RECV. BUFFER?
*IF YES - PROCESS THE BUFFER.
:DECREMENT BA/CC OUT XMIT.
:IS THE XMIT BUFFER ADDRESS CORRECT?
:IF YES -~ PROCEED.
:INCR. POINTER FOR ERROR MESSAGE.
:IF NOT = ERROR

408

:
408

:IF NOT - MUST BE PAGE 6

TRAP

022577
001422

156636

41%:
BEQ
ERRDF

104455

000014
020241
016056
000415

005337
022477
001406

002330

156610

50%:

DEC
BEQ

11
EMG!1
ERRG2

:SAVE ONLY PAGE ADDRESS BITS.

#40000,R2

243

24%:

(SERDF

#81T15'BIT14,8SEL6 ;CLEAR THE EXTENDED ADDRESS BITS.
DSEL4,R2
:SAVE BITS 0~15 OF THE PHYSICAL ADDPESS.
-CLEAR PAGE ADDRESS BITS IN SEL4

156706
156676

LWORD
.WORD
.WORD

#160000,3SEL4

BIC

23%:

140000

TRAP

#7777 .R2

156724

052777

200000 - 277776)

:PROCEED ~ IF BIT SET.

MOV
BIC

22%:

040000

11,EMG11,ERRG2

+ADDRESS RANGE:

608

156742

020000
100000

21$:

218

SEQ 0089

608

;EXIT ROUTINE

(R5)+,RSEL6
608

;1S THE CHAR. COUNT CORRECT?
:IF OK -~ EXIT ROUTINE.
:IF NOT - ERROR

12,EMG12,ERRG8

11
EMG11
ERRGS

TRAP

(SERDF

WORD
.WORD
.WORD

60%

JEXIT

OUTRCV
(RG)+,3SEL4
51¢

:DECREMENT BA/CC OUT RCV
:1S THE RCV BUFFER ADDRESS CORRECT?

*1F OK - PROCEED

CSERDF

.WORD
.WORD
.WORD

12
EMG12
ERRGS

E%gfl}:Op??R-11
4813
(4)
(5)
(%)
()
4814
4815
4816
4817
4818
4819
4820
4821

FUNCTIONAL TESTS MACY11
13-MAR-80 09:34

ERRDF

104455

51s

023510

017724

156570

005737

002332

005737

002330

042777
012737

000100
177777

002350

042777
012600

000207

156526

608

QSELG, (R4) +

;CHANGE THE CHARACTER COUNT TO WHAT
;WAS RECEIVED.

TST

OUTXMT

JHAVE ALL

THE XMITS BEEN DONE?

TST

OUTRCV

JHAVE ALL

THE RECEIVES BEEN DONE?

MOV

65%

023512
023512

000001

1
EMG11
ERRG?

65%

;IF NOT, CONTINUE

BI(C

#1E0,aSEL2

#-1,0UTFLG

:FLAG AS DONE.

sCLEAR THE OUTPUT INTERRUPT

8IC
v

#RDO!CMD ,QSEL2
(SP)+,RO

;CLEAR THE RDO BIT.
sRESTORE RO

L10020:

RTI

AR AR AR AR AR A AN AR AN AN AR AR RN AR AARRRN A ARANAA RN A NNNRAAAAARRN AR
AR

BGNSRV

012737

CSERDF

sIF NOT, CONTINUE

000002
R

.WORD
.WORD
.WORD

MOV

658

023520
023520
023520

TRAP

;UPDATE POINTER
SEXIT ROUTINE

BNE

023512

11,EMG11,ERRG/

(R4)+
60%

61%

ENDSRV

SEQ 0090

TST
BR

BNE

156542

30A(1052)
13-MAR-80 09:36 PAGE 2-67
GLOBAL INTERRUPT HANDLING ROUTINES

002340

R AR

A AR AR AR

AR AR A A AR AR RN R AR AR AR

NOXMEM

MOV

:
NOXMEM:

#1,FLAG

ENDSRV

JSET FLAG IF MEMORY ADDRESSED IS NON-EXISTENT.

L10021:

000002

.SBTTL

AN AR A AN AR RN ARRRRRRARRNS

RTI

DROP UNIT SECTION

LTI 777777777777777177177777777777777777777777777777777777777777777777777

s/ THE DRGP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE

;/ TO NO- LONGER BE TESTED.
SII111LT7777777777777777777777777777777777777777777777777777777717777777777

BGNDY

023522
023522
023522
023522
023524
023524

/”

104433

013746

002362

L SDU ..

BRESET
PRINTF

;ISSUE UNIBUS RESET TO CLEAN UP
4#FMDROP,LOGDEV

(RAP

CSRESET

MOV

LOGDEV,~(SP)

CZDMIAO DMR-11

CZOMIA.P11

) CTIONAL TESTS MACY11 30A(1052)

13-MAR-80 09:34

() 023530 012746

6)
3

Q)
(&)
4857

858
(3

3
4859
4860
4861

02353,
053320
023562
053544

023550
053330

033550

013746
016600

104417
062706

13-MAR-80 09:36 PAGE 2-68

DROP UNIT SECTION

SEQ 0091

023552
000002

MOV

#FMDROP ,~(SP)

000006

TRAP
ADD

CSPNTF
#6,SP

MOV
MOV

ENDDU

104453

L10022:

#2,-(SP)
SP,RO

TRAP

C$DU

023552

023360
093566
023574

047045

052111
040445
050120

040445
022440
042040
042105

8%;}62

FMDROP:

.ASCIZ

/ZNXAUNIT XD2%A DROPPED/

047522
00C

.EVEN

.SBTTL

TEST 1

- DMR CSR VERIFICATION

;t!**t*'*'t**t*'*fi..'t"tt't*tfit**lttttt**tfifi*fitt't*ttt*t'fiitttfittt*tt
o
TEST 1 - DMR-11
;* VERIFY THAT ADDRESSING THE 4 UNIBUS CSRS DOES NOT CAUSE A NON;% EXISTENT MEMORY TRAP.
.1

;% THE DMR IS AN NPR DEVICE RESIDING ON A UNIBUS.

COMMUNICATION

;* BETWEEN THE MAIN (PU AND THE DMR ]S ACCOMPLISHED THROUGH A
;% SET OF FOUR 16-BIT UNIBUS CONTROL AND STATUS REGISTERS (CSRS).

THE FOUR REGISTERS ARE ASSIGNED ADDRESSES

;% FLOATING ADDRESS SPACE: 76XXX0 = 76XXX6

IN THE

]/0 PAGE

- %

J%
;%
;%
;%

:tit*t*t*tttit*ttfi**tit"'itt'*k..ttttitfiQ.Q'it*fi.tfitfififitfifitt'tifit'ttt

BGNTST

(7)

(6)
(5)
(4)
(3)
(2)
4888
4889

023602

023606
023612
023616
023622
023624
023630
023634

012746

012746
012746
012746
104437
062706
005037
005001

T1::

SETVEC

000340
023724
000004
000003

44 ,ALOCATE ,#PRIO7 .SET UP NON -EXISTENT MEMORY TRAP VECTOR.

MOV

#PR107 ,-(SP)

MOV
MOV
TRAP
ADD

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

MOV

000010
002340

CLR
CLR
R

A AR R

FLAG
R1
AN AR A AR AR

JFLAG USED IN THE TRAP ROUTINE.
sUSE REGISTER TO REMEMBER WHICH OF

;4 CSRS WE ARE ADDRESSING.

T A R R AR R AN R AN AR AN N AR AN AN RN R R AR AN NN RN

#LOCATE ,-(SP)

THE

RRA RN

IF ADDRESSING ANY ONE OF THE CSRS RESULTS IN A TRAP TO VECTOR U4, THE TRAP

WILL

REPORT

THE ERROR

; MEMORY REFERENCE

(SEE

INTERRUPT ROUTINE

°‘LOCATE').

OTHERWISE

THE

1S UNEVENTFUL AND THE DEVICE IS READY FOR FURTHER TESTS

FZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34
4896
4897
4898
4899
4900
4901
4902
4903
4904
4905
4905
4907
(3)
(3)
4908
(3)
4909
4910
4911
(3)
(3)
4912
4913
(3)
(3)
4914
4915
4916
(3)
N7
4918
4919
4920
4921
(4)
(5)
(5)
(5)
4922
4923
4924
(9
(8)
(7)
6)
(3)
(4)

30A(1052)

AR A AR A

005777
012701
005777
012701
005777
012701
005777
005737
001406
013700
104451
023710
023714
023714
023714
023720
023722
023722
023722
023724
023724
023724
023726
023732

023734
023734
023736
023740
023742

023744
023750
023750

104444

156370
000002
156362
000004
156354
000006

AR AN AR AR

TST
MOV
TST
MOV
TST
MOV
TST
TST
BEQ
DODU

156346

002340
002362

13-MAR-80 09:36 PAGE 2-69
TEST 1 - DMR CSR VERIFICATION
N

AN RN RN AR A A N

aSELO

#2,R1

aSEL?2

#4 ,R1
aSELS
#6,R1
aSEL6
FLAG

103
LOGDEV

DOCLN

005037

002340

012700
104436

000004

10%:

JTEST
; SAVE
JTEST
;SAVE
JTEST
2 SAVE
JTEST

SEQ 0092
AN NN AN

THE CSR AT 76XxXx0

JIF NOT -~ EXIT.
.DROP THE DEVICE

CLR

FLAG

JRESTORE THE FLAG.

CLRVEC

JRETURN VECTOR 04

002340

104455

002340

10%:

002232

STATE

LOCATE
MOV
TST

RO,-(SP)

ERRDF

6.EMTO

FLAG

10%

INC

FLAG

PRINTX

#FMTO,R1,CSR(RT)

MOV

#4 ,RO

TRAP

CSETST

EMTO:

LASCIZ

C$CVEC

:
LOCATE:

;DEVICE FATAL ERROR
SNON-EXISTENT DEVICE ERROR

;SET THE FLAG

(SP) +,R0O

TRAP
.WORD
.WORD
.WORD

;PRINT THE CSR THAT DOESN'T RESPOND.
MOV
MGV
MOV
MOV
MOV
TRAP
ADD

JRESTORE RO
L10024:

042101
044523
051122

CSDCLN

;SAVE RO
JHAVE WE HAD AT LEAST 1 PREVIOUS TRAP?
sIF YES, DON'T BOTHER DECLARING ANOTHER

000002

020122
051505
042440

LOGDEV,RO
C$DODU

s INTERRUPT SERVICE ROUTINE

024040
000003

ENDSRV

051503
051104
043516

TO NORMAL

L10023:

BNE

000010

024002
024010
024016

RAP

TRAP

BGNSRV

016146
010146
012746
012746
0600

MOV
TRAP

;DO CLEAN UP - FORCE BACK TO INI; CODE
.

104401

000006
024002
000000
005237

THE OFFSET OF THE NEXT (SR
THE CSR AT 76XXX2
THE OFFSET OF THE NEXT (SR
THE CSR AT 76XXX4
THE OFFSET OF THE NEXT (SR
THE CSR AT 76XXX6
;WAS THERE A TRAP?

ENDTST

010046
005737
001006

AN N NN AN NANR AN A RN SRR

/CSR ADDRESSING ERROR - TRAP &/

RTI

CSERDF
6

EMTO
0

CSR(R1) ,-(SP)

R1,-{SP)
#FMTO,~(SP)
#3,-(SP)

SP,RO
CEPNTX

#10,SP

CZDMIAD DMR~11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

4929

4930

024024
0

024112

051117
040522
051445
051123
022514
020051
033117
042517
020124
047117

026440

022504

052040
000064
041501
042523
040445
022440
042040
047516
050123
000116

4935

30A(1052)

FMTO:

LASCIZ

3EQ 0093

/%S3XACSR (SELXD1XA) AT X06%A DOES NOT RESPONDIN/

.EVEN

SBTTL
A

TEST 2 - ROM (HECK

AELEEESs

ittt

tll

szl

0222222322

;* ROM CRC/CCITT -~ CHECK ROM POSITION AND CALCULATE

CRC/CCITT.

4939

13~MAR 80
09:36 PAGE 2-70
TEST 1 =~ DMR (SR VERIFICATION

2222220

TEST 2 - DMR-11

THE

;% LAST &4 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
BYTE
ADDRESS RANGE

o %

LOCATION

CHIP NO.

£02

LOW
HIGH

0000 - 1777
0000 - 1777

HIGH
LOW
HIGH

2000 - 3777
4000 - 5777
4000 - 5777

£03

TM
o

EO4
EO1

J®

E14

0
2
3

EOS

J®

- %

:t*ttttttttttttt UOPORTANT
;%

FOR

THIS

TEST

PEITTTIII
]

TO RUN CORRECTLY,

‘= E85 ON THE M8207 IS ON.

ENSURE

A AR AR NN R AR ARRANARAS
AN

THAT SWITCH 1

AT LOCATION

THiS SWITCH IS OFF, BSEL1 WILL BE

;«+ LOCKED OUT AND THE MAINTENANCE FEATURES WILL NOT BE ENABLED.

AR AALEL

:t
"t
;t
;t
;t
MR AAAAE

022737
001061

024132
024134

005004
012705

s st
eIl
t
I3 T
R2332
t
22222222

SUBTEST 1 - ON THE FIRST PASS PRINT THE VERSION # IN EACH ROM
SUBTEST 2 - GENERATE THE CRC-CCITT IN EACH ROM AND COMPARE T
IT AGAINST THE CRC BLASTED IN THE ROM
SUBTEST 3 - COMPARE THE ROM # BLASTED IN THE ROM AGAINST THE
EXPECTED ROM 4,

024120
024120
024120
024120
024120
024122
024130

SRRt Rt

222222222220

BGNTST

T2::

BGNSUB

104402

12.1:

000001

002270

CMP
BNE
CLR

MOV

#1,STARES
5%
R4

#1,R5

TRAP

cs8suB

;1S THIS THE FIRST PASS?
;IF NOT = SKIP THIS SUBROUTINE.
;GET VERSION # FROM EACH ROM AND PRINT [T OuT
;# OF

THE

1ST ROM

‘4 OF NEXT ROM

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09: 34
4973
4976
(8)
(7)
(6)
(3)
(4)
(4)
4975

4976

4977
23;3

4980

026140
024146
026146
026152
026156
024162
026164
024166
024172

024172

026176
024204

024212

(11) 024212
(10) 024216
(9)
024220

012737

001774

0137246
012746
012746
010600
104414
062706

002362
025074
000002

117737
117737

156036
156040

012746
010546
012746

025432

010446
0127646

(3)
(4)
453%

024236
026240
0242642

010600
104414
062706

000014

4982

0246246

022705

000005

4984
4985
4986
4987
4988
4989
4990
(3)

024254
024260
024264
024272

062704
062705
062737
000737

000002
000002
002000

4983

(3)
4991

4992
4993
(3)

(3)
4994

4995
4996
4997

4998
éggg

5001
5002
5003
5004
5005
5006
5007
5008
5009

024252

024274
024274
0246274
024274
024276
0246276

012746

001410

13-MAR-80 09:36
TEST 2 - ROM CHECK
MOV
PRINTR

#1774 ,ROMADR
#FMT1,LOGDEV

8
PAGE 2-71

SEQ 0094

;ADDRESS OF BYTE CONTAINING # IN ROMS 0O & 1
:MICROCODE VERSION
MOV
LOGDEV,~(SP)
MOV
#FMT 1 ,-(SP)
MOV
#2,-(SP)
MOV
TRAP
ADD

1%:
CALL

025430
025432

$ROMO

@BSEL6,REV1
@BSEL7.REV2

PRINTB

#FMT2,R4,#REV1.RS,#REV?

025143
000005

*SAVE THE ASCII REVISION # OF THE ROM
gaygrrnf REV. # OF THE NEXT ROM
MOV

#REV2,-(SP)

MOV
MOV

RS,-(SP)
#REV1,-(SP)

MOV
MOV

MOV

MOV
TRAP
ADD
cMP

BEQ

ADD
ADD
ADD
BR

002404

#5 RS

[X3

#2 R4
#2.RS
#2000 ,ROMADR
1%

SP,RO
CSPNTB
#6,SP

:GET ROM CONTENTS.

MOVB
MOVB

025430

026224
024226
024232

002404

000006

(8)
(7)

(6)

30A(1052)

R4 ,=(SP)
#EMT2,
= (SP)
#5,-(SP)
SP.RO
CSPNTB
#14,SP

;ARE WE DONE?

SIF YES - EXIT

*INCR. ROM NUMBERS
:
:ADDRESS OF BYTES CONTAINING NEXT ROM REV #S.

5%
ENDSUB

L10026:

104403

TRAP

CSESUB

BGNSUB

12.2:

024276
024300

104402
005037

024304

005004

024306

005037

002404

024312
024312

012737

177777

002374

024320
024326

012737
012701

177777
001000

002376

002340

CLR

FLAG

CLR

ROMADR

MOV

#-1,LOCRC

MOV
MOV

#-1,HICRC
#1000 ,R1

TRAP
($BSUB
:USE THE FLAG TO MARK WHEN AN ERRDF
:HAS BEEN DETECTED IN THIS TEST.
*START CRC CHECK WITH ROM 0
‘RG IS THE ROM #.
THE LOCATION FOR THE
*ROM IS CONTAINED IN THE TABLE °'ROMLOC'.

*BEGIN AT ROM ADDRESS 0

108
:
;INITIALIZE CRC WORD FOR THE LOW BYTE
*CALCULATION.
SINIT. CRC WORD FOR THE HIGH BYTE.
;COUNTER FOR LOOP TO READ THE ROM CONTENTS
:AND CALCULATE THE CRC - THE COUNTER IS 512..
;BECAUSE 2 ADDRESS LOCATIONS ARE READ FOR EACH

:PASS (I.E.

THE ROMS ARE 1K X 8 BITS)

CZOMIAD DMR-11 FUNCTIONAL TESTS MACY1]
13-MAR-80 09:34
CZDMIA. P11
5010
501
5012
5013

5014
5015
5016
5017

30A(1052)

13-MAR-80 09:36
TEST 2 - ROM (HE(K

PAGE 2-72

SEQ 0095

: BECAUSE A ROM OUT WILL OUTPUT THE ROM CONTENTS (I.E. 16 BITS)

;

024332

20%:
117737
117737

5676
5700

002400
002402

024370

117737
17737

5652
5654

002401
002403

024376
024402
026404

005237
005301
001443

002404

005237

THIS ROUTINE WILL

CALL

CALCULATE/CHECK

GET THE ROM CONTENTS

@BSEL7 HIWORD

;SAVE THE HIGH BYTE OF THE ROM CONTENTS.

BSELO,LOWORD

INC
CALL

ROMADR
$ROMO

MovVB

CRC 2 ROMS AT A TIME,

$ROMO

MOvB

mMove

THE

;SAVE

THE LOW BYTE OF

THE ROM CONTENTS.

s INCREMENT THE ROM ADDRESS POINTER
;GET THE CONTENTS OF THE NEXT ROM ADDRESS

aBSELG.LOWORD+1 ;SAVE THE NEXT LOW BYTE.

MOVB

@BSEL7,HIWORD+1

INC
DEC
qu

ROMADR
R1
40$

;SAVE THE NEXT HIGH BYTE.
sNOTE: AT THIS POINT LOWORD IS A WORD WHICH

JHAS 2 CONSECUTIVE LOW BYTES OF ROM CONTENTS.

:INCREMENT THE ROM ADDRESS POINTER
SARE WE FINISHED WITH THESE 2 ROMS?
“IF YES, CHECK CRC

; "CRC/TCITY CALCULATION = CONVERTTM THE WORD “(LOWORD RHIWORD)"T0

024406
024412
024412
024414
0246420

026424
024426
024432
024436
024444
024450
024450
024452
024456

024462
024464
024470
024474
024502
024506

012703

000020

25%:

002374
002400
102011

012702
043702
042737
050237

002374
102010
002374

002374
30%:

102011

102010

002376
102010
002376

#16. .R3

:16 BITS TO CONSIDER

cLe
ROR
ROR

LOCRC
LOWORD

;CLEAR THE CARRY
*ROTATE BITO INTO THE CARRY BIT
*ROTATE BITO INTO C AND THE OLD €

308

sNOTE: V IS THE EXCLUSIVE OR OF BITO & BIT15.

MOV
8IC

002376
002402

012702
043702
042737
050237

MOV

B8vC

102010

002376

35%:

024512
024514

40%:

= ~

A SERIAL STREAM FOR CALCULATION.

BIC
BIS
CLC

#102010,R2
LOCRC,R2

INTO BIT1S

JARE THE BITS 15 € BITS 0 THE SAME?
;IF YES (V IS CLEAR), DON'T DO THE CRC
sCRC/CCITT POLYNOMIAL

#102010,LOCRC
R2,LOCRC
:CLEAR THE CARRY

ROR
ROR

HICRC
HIWGRD

;ROTATE BIT O
sROTATE OLD C

8v(

35%

MOV
BIC
8IC
BIS

#102010,R2
HICRC,R2
#102010,HICRC
R2,HICRC

:CRC/CCITT POLYNOMIAL

DEC
BNE
BR

R3
25%
20%

;DO ALL 16 BITS

INTQO C
INTO BIT15

(SIGN)

& BITO

INIO C

JARE THE BITS O OF HICRC & HIWORD THE SAME?
YES

'NOTE:

(Vv IS CLEAR), DON'T DO THE CRC.

IS THE EXCLUSIVE OR OF BITO & BIT15.

;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
CRC BLASTED INTO THE LAST 2 BYTES OF THE ROM (IN LOWORD/HIWORD)

;
024514
024520

002374
002374

002400

Com
Mp

LOCRC

LOCRC,LOWORD

sCOMPLEMENT THE CALCULATED CRC .
;1S

THE

CRC

IN ROM THE

SAME

THE

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

024526
024530

024534
024536
024544
024544
026546
024550
024552
024554
024554

001427
005737

002340

001007
012737

000001

41%:

002400
002374

024716
024716
024716
024716

000001

104455
000007
025362
000000
002402
002376

062706

000012

022704
001403
005204
000137

000005

41%

;CALCULATED CRC?

JIF YES ~ (HECK THE HIGH BYTE CRC

(REMEMBER

JWE'RE IN A LOOP)
JIF YES, DON'T BOTHER WITH ANOTHER ERRDF.
;FLAG THAT ERRDF HAS BEEN DETECTED.
;ROM ERROR
TRAP
CSERDF
. WORD
7
EMTI
. WORD
.WORD
0

PRINTB

H#FMT3,R4,LOCRC
L OWORD
,

R4
HICRC
HICRC ,HIWORD

MOV
MOV
MOV

LOWORD ,=(SP)
LOCRC,~-(SP)
R4 ,-(SP)

MoV
MCV
TRAP
ADD

#4,-(SP)
SP,RO
CSPNTB
”2,SP

002402

60%

FLAG

51%

002340

#1,FLAG
7.EMT

PRINTB

JIF YES = CHECK THE ROM LOCATIONS.

sHAS AN ERRDF

JWE'RE

ALREADY BEEN DECLARED

IN A LOOP)

;FLAG THAT ERRDF HAS BEEN DETECTED.
;ROM ERROR
TRAP

70%:

CSERDF

. WORD
.WORD
-WORD

7
EMT1
0

MOV
MOV
MOV

HIWORD ,~-(SP)
HICRC,=-(SP)
R4 ,-(SP)

MOV
MOV

#4,-(SP)
SP.RO

#FMT3,R4 ,HICRC ,HIWORD

TRAP
ADD

cMP
BEQ
INC
JMP

(REMEMBER

JIF YES, DON'T BOTHER WITH ANOTHER ERRDF.

MOV

60%:

HFMT3, -(SP)

;INCR ROM #
. COMPLEMENT THE CALCULATED CRC FOR THE H] BYTE
;ROM CRC AND CALCULATED CRC THE SAME?

025220
000004

024312

(NEXT ROM)

JHAS AN ERRDF ALREADY BEEN DECLARED

& ,FLAG
7.EMT1

50%:

ENDSUB
104403

FLAG

SEQ 00%6

MOV

51%:

013746
013746
010446
012746
012746
010600
104414

50%

8
PAGE 2-73

MOV
ERRDF

002340
001007
012737

025220
000004

002376
002376

024630
024632
024640
024640

BNE

002340

000012

024624

13-MAR-80
09:36
TEST 2 - ROM (HECK
BtQ
TST

104455
000007
025362
000000

013746
013746
010446
012746
012746

30A(1052)

#5.R4

70%

10%

;IF WE'VE DONE ROMS 0-5,

JEXIT WHEN DONE
JCHECK

HFMT3,-(SP)

CSPNTB
#12,SP

WE'RE DONE.

THE NEXT ROM,

L10027:

TRAP

C$ESUB

024720
024720
024720
024722
024726
024730
024736
024736
024742
024746
024750
024750
024754
024754
024769
024762
024764

024770

005037
005004
012737

001775

117701

155272

002340
002404

000402
117701

155274

042701
020104
001427
005737

177760

001007
012737

15%:
17¢%:

002340
0000C1

002340

WWNWNWN

8vvomwo~mbum-

—lf\f‘\—l.—lf\’\a—l—a—l—a—b—l—ld—l
WWNI
2NN

LRIV AV, (W, LV, LV, LV, [V LV, IV, |

104414

025060
025066
025070
025070
025070
025070

025072
025072
025072
025074

PAGE 2-74

SEQ 0097

FLAG
R4

#1775 ,ROMADR

;CLEAR FLAG
JBEGIN AT ROM 0
;ADDRESS OF BYTE CONTAINING ROM #

CALL
MovB

$ROMO
aBSEL6,RT

JGET ROM (ONTENTS

JSAVE THE CONTENTS OF

THE LOW BYTE

THE HIGH BYTE

;FOR ROMS 0,2.4

($8suUB

178

MOVB

BSEL7,R1

<SAVE THE CONTENTS OF
JFOR ROMS 1,3.,5

8IC
(MP
BEQ
TST

#*C17 ,R1
R1,R4

;CONVERT THE ASCI] BYTE TO AN OCTAL WORD.
oIS THIS THE EXPECTED ROM #
.
JIF YES - OK.
JHAS AN ERRDF ALREADY BEEN DECLARED (REMEMBER

BNE
MOV
ERRDF

18%

;IF YES, DON'T BOTHER WITH ANOTHER ERRDF.

7.EMT?

;ROM ERROR

PRINTB

20%

FLAG

#1,FLAG

JWE'RE

;FLAG

IN A LOOP)

THAT ERRDF

HAS BEEN DETFCTED.

TRAP

#FMT4L,<B,ROMLOC (R4)>,R1,R4

025421
025304
000004
000012

022704

000005

062737
000723

TRAP

CLR
CLR
MOV

18%:

062706

001334

T2.3:

CSERDF

7
EMT?2

.WORD
.WORD

—

104402

000007
025402
000000

025050
025052
025056

13-MAR-80
09:36
TEST 2 - ROM CHECK

BGNIUB

010446
010146
005046
156416
012746
012746
010600

30A(1052)

104455

o o PN

D d

b d

vivivi v

-\ NSNS Db

d e

D o

QOO

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

MOV
MOV
CLR

R/ ,=-(SP)
R1,-(SP)
-(SP)

BISB

:
208

000001
002000

.WORD

002404

ROMLOC(R4), (SP)

MOV
MOV
MoV
TRAP
ADD

cMP
BEQ
INC
BIT
BNE

#5,R4
R4

#81T0,R4
15%

JPOINT TO THE NEXT ROM #
;1S THIS AN ODD #
JIF YES GO BACK AND READ THE HIGH BYTE

ADD

#2000,ROMADR
108

s INCR., ADDRESS POINTER YO NEXT ROM #.

30%:

308

AFMTSL ,-(SP)
#4 ,-(SP)
SP,RO
CSPNTB
#12,SP

;DID WE FINISH THE LAST ROM?
cIF

YES = SKIP TO THE END

ENDSUR

£10030:

104403

TRAP

C$ESUB

ENDTST

104401

047045

L10025:
040445

044515

FMT1:

LASCIZ

/XNXAM](CRO(ODE REVISION IN UNITXD3XA:IN/

TRAP

‘CSETST

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

5133

5134

5135

37
5138

5140

8
PAGE 2-75

SEQ 0098

051103
020105
044523
020116
042045
047045

025150
025156
025164
025172
025200
025206

042045
020055
022440
051101
022462
042522

022462
042522
022524
046517
020101
027126

046517

020101
027126
022516
042045
020055
022440

FMT2:

.ASCIZ

/X%AROMXD2%A - REV.

025220
025226
025234
025242
025250
025256
025264
025272
0
025304
025312
025320
025326
025334
025342
025350

040445
031104
040503
042524
020103
040445
020103
046517

047522
040445
041514
020104
022475
020040
047111
036440
000
022505
044440
020115
020101
046125
051040
030504

022515
020072
040525
051103
033117
051103
051040
047445

FMT3:

_ASCIZ

/XAROMYD2%A:

031104
020123

FMT4:

_ASCIZ

/XAEXD2%A IS ROM XD1%A (SHOULD BE ROM XD1XA)IN/

041503
051105

EMT1:

_ASCIZ

/CRC-CCITT ERROR/

044524
051122

EMT2:

ASCIZ

/LOCATION ERROR/

ROMLOC:

.BYTE 3,2,4,1,5,164,

;ROM 0 - ROM LOCATION 3 ETC.

REV1:
REVZ2:

.EVEN
_WORD
.WORD

¢ASCI] VALUE OF
sASCI] VALUE OF

045

040445
040445

047522
022461
047510
042502

051101

025356

022440
022451

025362
025370
025376
025602
0256410
025416

051103
052111
047522
047514
047117
051117

026503
020124
000122
040503
042640
000

025421
025424

003
001
025430
000000
000000

002
005

025430
025432

000116

042117
044526
044440
052711
035101
XTXNXAROMZD2%A - REV.

CALCUATED CRC =%06%A

XTIN/

CRC IN ROM =%06%N/

042045
051450
020104
046517

040445

004
016

0
O

THE REV. NUMBER
THE REV. NUMBER

—

)

D md

d wd ad

Vi
S OS
WV AN =2 OO0 00 NON

d d

[V IV IV VIV 1V, IV, [V, 1V IV IV, 1V

5141
5142
5143

13-MAR-80
09:36
TEST 2 - ROM (HECK

025102
025110
025116
025126
025132
025140

025143

041517
042522
047117
047125
022463
000

30A(1052)

.SBTTL

TEST 3 - MASTER CLEAR AND MICROTEST

;'l".tfifitttttt!ttttitttt't'tttfititltttt'it!ttti.t.tittttt!t.it

'tttttt

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

EACH CALL TO THE MASTER

O
N
NP
AT YV
TN YO
T
I

I
T

B
I

I
8
13-MAR-B0 09:35 PAGE 2-76
TEST 3 - MASTER CLEAR AND MICROTEST

SEQ 0099

CLEAR ROUTINE WILL ENSURE THAT THE RUN 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 M8203 AND
THE MICRODIAGNOSTIC 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 QTHER MASTER CLEAR.
WHEN RUNNING THIS TEST, WE EXPECT TO ADD THE RESULTS OF BSEL3

AFTER EACH MASTER CLEAR.

BSEL3 = 100
BSEL3 = 200

égpsggEgESULT OF

=
=

MICROESTS DISABLED
MICROTESTS RUN SUCCESFULLY

THE 2 MASTER CLEARS IS NOT 300, AN ERROR IS

TN R

5170

2P 2F ZF I

—

RRORORONOR
A
SELEHEARZLL
S
[o -]

LV, IV, TV, TV, TV, [V, TV, [V, [V, TV, ] w

NN
Y NS BF

5156
5157

30A(1052)

NP RN NP B

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

ADDITIONALLY THIS ROUTINE WILL REPORT WHENEVER THE RESULT OF

BSEL3 IS 0.
(1.E.

DMC)

THIS WILL MEAN THAT THE DEVICE IS NOT A DMR

AR AN A AR AT R AR AR R AR R

025434
025434
025434
025434

R PR R AN A AR A A AR AN AN A NN AN RN AN RANNARR AN IANNRRAN

BGNTST

2
CLEAR

004737

011064

JSR

;MACRO FOR MASTER CLEAR

PC, SMSCLR

ixxax MACRO EXPANSION #+%w

{ISSUE A DMR MASTER CLEAR
:tt*t

- fetetesSIXZR

(4)

025440
025440
025442
025444
025450
025452
025452
025456
025462
025464
025466
025472
025474
025474
025500
025500

ESCAPE

104410

000072
105777
001011

154574

012746
012746

017473
000001

000004

TST

;IF ERROR, BR TO TEST END.

IS8

amsEL3

;1S

PRINTB

#FMG19

:REPORT DEVICE NOT DMR.

THERE A DMR RESPONSE?

TRAP

CSESCAPE

.WORD

L10031-.

MOV
MOV
MOV

#EMG19,~(SP)
#1,-(SP)
SP.RO

TRAP
ADD

C$PNTB
#4,SP

117701

154544

MOVB
CLEAR

aBSEL3.R1

;SAVE THE RESULT OF THE FIRST MASTER CLEAR.
:MASTER CLEAR AGAIN.

004737

011064

JSR

PC,

1ISSUE A DMR MASTER CLEAR

SMSCLR

sxxxx MACRO EXPANSION sxwx

:tttt

025504

025514

ESCAPE

154530

MOVB
ADD

TST

@BSEL3,R2
R1,R2

ANXRK

:IF ERROR, BR TO TEST END.

TRAP

CSESCAPE

.WORD
L10031-.
THE SECOND MASTER CLEAR

;SAVE THE RESULTS OF
:ADD THE RESULTS OF THE 2 CLEARS

sNOTE: ONE SHOULD BE 100 - MICRO TESTS NOT
;ENABLED AND ONE SHOULD BE 200 - MICRO TESTS
JSUCCESFULLY RUN.

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

5196
5197
5198
(4)

025516
025522
025524
025524

(5)
(5)
(5)
5199
5200
(3)
(3)

025526
025530
025532
025534
025534
025534
025534

5202

025536
025544

5203

025552
025560

122702
001404

30A(1052)

000300

CMPB
BEQ
ERRDF

104455
000003
025536
015204

13-MAR-80
09:36 PAGE 2-77
TEST 3 - MASTER CLEAR AND MICROTEST

#300,R2
5%
3,EMT3,ERRG3

sWAS THE MICROTEST COMPLETED?
;IF YES - 0K
;MICROTEST NOT COMPLETED

5%
ENDTST

044515
051505

020124
042514

051103
020124

047503
042524

05211
04751

EMT3:

.ASC1Z

05011
00010

A AN AR

0,08, 8,0,
R

BN,

—

3
EMT3

.WORD

ERRG3

TRAP

CSETST

A A AR AR AR AR RN R AR AN AR AR RN RARRARRNR RN NN AR

TEST 4 - DMR-11
IN COMMANDS

BASE

AR AR A AT AR RN
8, 9, 8,

5210

.WORD
.WORD

.EVEN

TEST & - BASE IN COMMAND

CSERDF

/MICROTEST NOT COMPLETED/

.SBTTL

2555

TRAP

L10031:

104401

5208

SEQ 0100

SUBTEST 1

=~ ISSUE A BASE IN
DMR MODE.
ENSURE THAT THE DMR MODE BIT (BIT 4)

SUBTEST 2

=~ ISSUE A BASE IN DM(C MODE.
ENSURE THAT THE DMC MODE BIT (BIT 4)

IS SET IN
THE MICROCODE SCRATCH PAD 7 AND THAT THE DDCMP
MESSAGE VARIABLES ARE PROPERLY INITIALIZED.
THE MICROCODE

MESSAGE

SCRATCH PAD 7 AND THAT

VARIABLES ARE

PROPERLY

IS CLEAR IN
THE DDCMP

INITIALIZED.

5223

5224
(3)
5225
(3)
(3)
5226
1)
(1)

5229
(3)
(3)

5230
5231
(1)
(1)
(1)

025566
025566
025566
025566
025566
025570
025570

025574

025574
025576

AN AR R AR A AR

R R

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

T4.1:

104402

CLEAR
004737

011064

104410
000244

004737
000000

011262

ANARIRARRRRRANRN

T4::

BGNSWB

025600
025600
025604

AR A

BOGNTST

;MACRO FOR MASTER CLEAR COMMAND

JSR

PC,

ESCAPE

TST

$MSCLR

BASEIN

0,BASE,DMR

JSR

PC, $BASEI
.WORD
O

TRAP

C88SUB

TRAP
.WORD

CSESCAPE
L10032-.

;axnt MACRO EXPANSION xxxx
;ISSUE A DMR MASTER CLEAR
JRERR

ARAR

;1F ERROR, BR TO TEST END

;BASE IN COMMAND WITH NO MAINTENANCE,
;BASE=BASE TABLE ADDRESS, AND DMR-11 MODE

savan MACRO EXPANSION wwwx
sCALL BASE IN ROUTINE
;MAINTENANCE MODE BITS TO SET

IN BSELT

CZDMIAO DMR-11 FUNCTIONAL T%gTS MACY11
CZDMIA.P11T
13-MAR-80 09
(1)

é};

5232
5233
(3)
(3)
5%??

025606

025610

025612

ESCAPE

012560

gsgg

025622

132737

000020

5237
5238
5239

025630
025632

001004

025632
025634
025636
025640

025642

(5)
(5)
(5)
5255
5256
(3)
(3)
5257

025704
025706
025710
025712
025712
025712
025712

000024
026311
026044

(3)
(3)
5%??

025714
025714
025716

104402

025716

004737

5260
5261
(3)
(3)

DMR

sBASE TABLE ADDRESS
sMODE

TST

LA 8

;IF ERROR, BR TO TEST END

002722

TRAP

.WORD

C$ESCAPE
L10032-.

sasens MACRO EXPANSION #wxx

JSR

PC, SHALT

BITB

#BIT4 ,BASE+]SP7 :SEE IF THE DMR MODE BIT

BNE
ERRDF

10%
20,EMT4

sDMR HALT ROUTINE.
ti*t

LA 2

& 4

IS SET IN THE
;DMR SCRATCH PAD REGISTER 7 (BASE TABLE

:LOCATION CONTAINS AN IMAGE OF SP7)
;0K IF SET - BR

TRAP

-WORD
.WORD
.WORD

10%:

CSERDF
20
EMTS
0

;CHECK MESSAGE EXCHANGE VALUES

105737
001015
105737
001012
105737
001007
122737
001003
105737
001404

E};

BASE

SEQ 0101

SHUTDN

104455
000024
026264
000000

025642
025646
025650
025654
025656
025662
025664
025672
025674
025700
025702
025702

5258

8
PAGE 2-78

;tttt

004737

(6)

IN COMMAND

.WORD

025616

5242
52643
52644
5245
5246
5247
5248
5249
5250
5251
5252
5253
5254

09:36

.WORD

z};

5240

TEST & - BASE

002630

104410
000226

5241

13-MAR-80

000522

025612
025614
025616

(4)
(5)
(5)
(5)

30A(1052)

025702

002672
002673
002674
000001

002675

002676

20%:

104455

TSTB
BNE
1ST8
BNE
TSTB
BNE
(MPB
BNE
TSTB
BEQ

BASE+R
208
BASE +N
20%
BASE +A
208
#1 BASE+T
20%
BASE +X
308

ERRDF

20,EMTS5,ERRT1

IN THE BASE TABLE.
#R (MESSAGE RECEIVED)
= 0?
ERROR IF NON ZERO
; AN (MESSAGE TRANSMITTED) = 0?
;ERROR IF NON ZERO
: WA (MESSAGE ACKNOULEDGED) = 07

ERROR IF NON ZERO

;

(NEXT MESSAGE # TRANSMITTED)

;

(LAST MESSAGE TRANSMITTED)

JERROR IF NOT EQUAL TO 1.

30%:
ENDSUB

L10033:

104403

025714

= 0?

TRAP

.WORD
-WORD
.WORD

CSERDF
20
EMTS
ERRT1

TRAP

C$ESUB

TRAP

cs8suUB

IRAP
.WORD

CSESCAPE
L10032-.

BGNSUB
T4.2:

CLEAR
011064

JSR

JMACRO FOR MASTER CLEAR COMMAND

PC, SMSCLR

sxxxx MACRO EXPANSION wwaxx

;ISSUE A DMR MASTER CLEAR

;tt*i

025722
025722
025724

= 1?

104410
000116

ESCAPE

TST

AKX

;IF ERROR, BR TO TEST END

CZDMIAQD?R-11 FUNCTIONAL TESTS MACYT1
CZDMIA.P1
13-MAR-80 09:34

5263
5%??

025726

(1)
(1)
(1)
é};

025726
025732
025734
025736

5265

5266
(3)

(3)
5%?;

004737
000000
002630
000000

30A(1052)

011262

13-MAR-80 09:36 PAGE 2-79
TEST 4 - BASE IN COMMAND

SEQ 0102

BASE IN

0.BASE.O

;BASE IN COMMAND WITH NO MAINTENANCE
sAND DMC MODE.

JSR

PC, $BASE]
. WORD
0
WORD
BASE

sCALL BASE IN ROUTINE
;MAINTENANCE MODE BITS TO SET IN BSEL1
:aegg TABLE ADDRESS

.WORD

sanax MACRO EXPANSION #wen

* KAk
R

L2
2 2]

[

025740
025740

025742
025744

ESCAPE

104410
000100

TST

sIF ERROR, BR TO TEST END

.WORD

SHUTDN

g};

025744

004737

012560

gggg

025750

132737

000020

5270
5271
5272

025756
025760

001404

suxxn MACRO EXPANSION *wwx
:DMR HALT ROUTINE.

JSR

PC,

BITB

H#B1T4 ,BASE+ISP7 *SEE IF THE DMR MODE BIT IS CLEAR IN THE
;DMR SCRATCH PAD REGISTER 7 (BASETABLE

BEQ
ERRDF

108

SHALT

s RARR

(4)
(5)
(5)

(5)
5273
5274
5275
5276
5277
5278
5279
5280
5281
5282
5283
5284
5285
286
5287
(4)
(5)
(5)
(5)

5288
5289
(3)
(3)
5290
5291
(3)
(3)
5292
5293
(3)
5294

025760
025762
025764

025766
025770

025770
025774

025776
026002
026004
026010
026012
026020
026022

026026
026030
026030
026030
026032
026034
026036
026040
026040
026040
026040

026042
026042
026042

026044
026044
026044

002722

104455
000024
026357

000000

105737
001015
105737
001012
105737
1007
122737
001003
105737
001404

20, EMT6

1. 2.2
8 4

:LOCATION CONTAINS AN IMAGE OF SP7)
;0K IF CLEAR - BR

TRAP

.WORD
.WORD
.WORD

108:
002672

002673
002674

000001

002675

002676
20%:

104455
000024
026311
026044

C$ESCAPE
L10032-.

TRAP

s CHECK MESSAGE EXCHANGE VALUES
s IN THE BASE TABLE.
; H#R (MESSAGE RECEIVED) = 0?
ERROR IF NON ZERO
; AN (MESSAGE TRANSMITTED) = 0?
;ERROR IF NON ZERO
; NA (MESSAGE ACKNOWLEDGED) = 0?
ERROR IF NON ZERO

1STB
BNE
TSTB
BNE
1STB
BNE
(MP8
BNE
7STB
BEQ

ERRDF

;

(NEXT MESSAGE # TRANSMITTED)

;

(LAST MESSAGE

SERROR IF NOT EQUAL TO 1.

TRANSMITTED)

CSERDF
20
EMT6
0

= 1?

= 0?

20,EMTS ERRT1

CSERDF
20
EMTS5
ERRT

30%:
ENDSUB

L10034:

104403

TRAP

C$ESUB

TRAP

CSETST

ENDTST

L1003¢2:

104401

BGNMSG
105737

002672

ERRT1
TSTB

BASE+R

;1S AR = 0?

ERRT1::

CZDMIAOP?TR-11 FUNCTIONAL TESTS MA{Y1I
CZDMIA
13-MAR-80 09:34

026050
026052
026052
026054
026060
026064
026070

30A(1052)TE 13-MAR-80

S T 4 = BASE

001413

BEQ

PRINTB

005046
153716
012746
012746
010600

002672
026423
000002

062706

000006

105737
001413

002673

104414

09:36

8
PAGE 2-80

IN COMMAND

1%
;0K = IF ZERO
HFMTS,<B,BASE+R>’ PRINT 4R
~(SP)

E
+R, (SP)
BAS
HFMTS ,-(SP)
#2,~(SP)

SP,RO
CSPNTB

1%:

#6,SP
TSTB
BEQ
PRINTB

BASE +N

;IS N = 0?

#FMTG,<B,BASE+N>

;OK - IF ZERO
;PRINT #N

002632
026454
000002

005046
153716
012746

122737

005046
153716
012746

012746
010600
104414

002674

TSTB

BEQ

PRINTB

026262
026262

000001

002675

PRINTB

105737
001413

002676

-(SP)
BASE+A, (SP)
#FMT7 ,-(SP)
#2,-(SP)

SP,RO
CSPNTB

#6,SP

#1,BASE+T
SIS AT = 12
43
;0K - IF ONE
#FMT8,<B,BASE+T> ;PRINT 4T
=(SP)
BASE+T, (SP)
HFEMT8,-(SP)
#2,-(SP)
SP,RO

002675
026536
000002
000006

SP,RO
CSPNTB
#6,SP

IS KA = 0?
0K - IF ZERO
#FMT7,<B,BASE+A> ;PRINT #A

MOV
MOV
TRAP
ADD

CMPS
BEQ

H#FMTE,-(SP)
#2,-(SP)

CLR
BISB

3s:

=(SP)

+2, (SP)
BASE

BASE +A

002674
026505
000002

062706

005046

TRAP
ADD

2%:

000006
001413

CLR
BISB
MOV
MOV

000006
105737
001413

SEQ 0103

4%:

CSPNTB
#6,SP

TSTB
BEQ
PRINTB

BASE +X
5%

JIS X
= 0?

;0K
- IF ZERO

RFMT9,<B,BASE+X> ;PRINT #X

002676
026601
000002

CLR
81s8
MOV
MOV

000006

TRAP
ADD

5%:
ENDMSG

-(SP)
BASE+X, (SP)
HEMTO, ~(SP)
#2,~(SP)

SP,R0O
CSPNTB
#6,SP

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA.P11
3
(3)
5316
5317

5318

30A(1052)

13-MAR-80

TEST & - BASE

09:36

8
PAGE 2-81

IN COMMAND

SEQ 0104

026262
026262

L10035:
020122

EMTS:

LASCIZ

/DMR MODE BIT NOT SET/

052117
000
041504
051505
053040

EMTS:

LASCIZ

/DDCMP MESSAGE

041040

046102
047040

VARIABLE(S)

NOT CORRECT/

051117
000
041515
020105
020122
041040
052117
051101

046440
020055
047515
052111
041440
042105

EMT6:

LASCIZ

/DMC MODE

021501
043523
042126
042045

020122
020056
020051
022463

FMTS:

.ASCIZ

/XA#R

(MSG.

RCVD)

= XD3AIN/

5322

047043
027107
024524
031504

024040
054040
036440
‘047045

FMT6:

LASCIZ

/XAAN (MSG.

XMIT)

= XD3IN/

5323

21501
043523
024513
042045

020101
020056
020040
022463

FMT7:

ASCIZ

/XA#A

(MSG.

ACK)

= ZD3AN/

5324

652043

024040
046440
020117
020051
022440
000
020130
020124
042514
046530
020075
000116

FMT8:

ASCIZ

/XA#T

(NEXT MSG TO XMIT)

- XD3AN/

FMT9:

LASCIZ

/XA#X

(LAST COMPLETED XMIT)

- XD3AN/

5319

5320
5321

5325

022453

042522

-EVEN

-~ DMR MODE BIT NOT

CLEARED/

TRAP

C$MSG

CZOMIAO DMR-11 FUNCTIONAL TESTS MACYT1
CZDMIA.P
13-MAR-80 09:34

30A(1052)

g%%z

LSBTTL

$33S

AN AR

5336
5337
5338
5339

13-MAR-80 09:36 PAGE 2-82
TEST 5 - DMR COMMANDS

SEQ 0105

TEST S - DMR COMMANDS
AR RN R AR R

RN NN AN AR AR A RN R

A AR R R AR A AN

RARNCARR AN AR

I
TEST 5 - DMR-11
;* DMR COMMANDS
;%
SUBTEST 1
=~ ISSUE AN ENABLE EXTENDED ERROR COMMAND AND CHECK THAT
I
THE EXT. ENABLE BIT IS SET IS SCRATCH PAD 13.
THEN

§§29

?éS?fi%EREXTENDED ERROR AND CHECK THAT THE ENABLE BIT

. %

5342
5343
2%22

;*
o*
o
. %

5346

S347

5248
(3)
5349
(3)
(3)
5350
D)
(1)

(1)

SRR

026644
026644
026644
026644
026644
026646
026646

5351
5352
(3)
Ségé

026652
026652
026654

5354

026656

)
(1)

(1)

(1)
(1)

(1)

5355
5356
(3)
(3)

5357
)
1)
(1)
(1)
(1)
(1)

5358
5359
(3)
(3)
5360
1)

SUBTEST 2

026656

026662

026664
026666

BGNTST

104402
004737

004737

004000

A A AR A AR AR NN AN AN R AR

AR AR AN AR AN AR NAANANNAR

T5::
15.1:

011064

JSR

ESCAPE

011262

JSR

002630
(00522

004737
000006

026702
026704

000000
000000

026706
026706
026710
026712

104410
000274

026716

;MACRO FOR MASTER CLEAR COMMAND

PC,

$MSCLR

TST

004737

$BASEI]

.WORD

.WORD
.WORD

ESCAPE

012064

LPLU

BASE
DMR

TST

JSR

PC, SDMRIN
LWORD
EXERR

O
O

TST

SHUTDN
012560

TRAP
.WORD

CSESCAPE
L10036-.

L2 22

LINE UNIT LOOP,

sxnnx MACRO EXPANSION wwxw
sCALL BASE IN ROUTINE WITH DEFAULTS

sSET LINE UNIT LOOP

;BASE TABLE ADDRESS
;DMR-11 MODE
IRRRN

ARNK

TRAP
.WORD
;ENABLE EXTENDED ERROR NOTIFICATION

EXERR

.WORD
.WORD

($BSUB

;IF ERROR, BR TO TEST END

DMRIN

ESCAPE

JRRRN

;BASE IN COMMAND WITH
PC,

TRAP

sxwrex MACRO EXPANSION wxew
;ISSUE A DMR MASTER CLEAR

;IF ERROR, BR TO TEST END

BASE IN

026674
026700

5361

CLEAR

104410
000330

104410
000312

026712

RN RN R RN AR

BGNSUB

026670
026670
026672
026674

g}g

= SET REP/SEL TIMER VALUE AND SET THE DMR THRESHOLD
VALUES.
CHECK THAT THE VALUES ARE CORRECT IN
THE BASE TABLE AFTER HALTING THE DMR.

sexxw MACRO EXPANSION wxww
cCALL DMR MODE INPUT ROUTINE
;INPUT COMMAND

;NO SEL4
JNO SEL6
IRRAN

AAAR

;IF ERROR, BR TO TEST END

JHALT THE DMR

JSR

PC, SHALT

ESCAPE

TST

CSESCAPE
L10036~.

sxxxx MACRO EXPANSION xaxx

;DMR HALT ROUTINE.
KR KR

;IF ERROR, BR TO TEST END

TRAP
.WORD

CSESCAPE
L10036~.

CZOMIAOQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

104410
000264
132737

5364

026730

001005

e
N N
s O ND W

—d ed ed

N " " W

-—d
wd b
N

i
NN
A~ AN
NN

[V, ]

~es AN A A~ W W
b cnd b NJHANAN
N~
N N s (N
e N-

000001

002726

9
PAGE 2-83

SEQ 0106

026744
026744
026750
026752
026754

004737
004
002630
010522

011262

108

026756
026762
026764
026766

012064

.WORD
.WORD
.WORD

20%
BASE IN

LPLU,BASE ,RES!DMR ;BASE

JSR

PC, $BASEI
.WORD
LPLU
.WORD
BASE
.WORD
RES!DMR

IN COMMAND WITH RESUME SET.

sxwwx MACRO EXPANSION #wx

sCALL BACE IN ROUTINE
JMAINTENANCE MODE BITS TO SET IN BSEL1
;BASE TABLE ADDRESS
;MODE

026774

004737

;DISABLE EXTENDED ERROR NOTIFICATION.

JSR

PC, SDMRIN
.WORD
DXERR
WORD
O

sCALL DMR MODE INPUT ROUTINE
;INPUT COMMAND
sNO SEL4

TST

srwsx MACRO EXPANSION +xxx

;NO SEL6

;IF

SHUTDN

012560

JSR

ESCAPE

027012
027014

(4)
(5)
(5)
(5)
5379
5380
(3)
(3)

027014
027016
027020
027022
027024
027024
027024
027024

5382
(3)
(3)
5383

027026
027026
027026
027030

000001

002726

BITB

001404
104455
000030
027514
000000

BEQ
ERRDF

LA S

ERROR, BR TO TEST END

JHALT THE DMR
PC,

SHALT

TST

L10036-.

TRAP
.WORD

C$ESCAPE

TRAP

.WORD
.WORD
.WORD

CSERDF
24
EMT7
0

TRAP

C$ESUB

RAP

cs8suB

LA 8 21

;IF ERROR, BR TO TEST END.

L10036~.
#BITO,BASE+ISP13 ;CHECK EXT ENABLE BIT [N THE BASE TABLE.
. IMAGE OF SCRATCH PAD 13,
20%
;IF CLEAR OK
24 ,EMT7
JERROR EXT ENABLE SCT

L10037:

104403

CSESCAPE

.WORD

;xxtn MACRO EXPANSION #xwx

20%:

ENDSUB

TRAP

¢:DMR HALT ROUTINE.
;tttt

000202
132737

DXERR

ESCAPE

000212

L 32

DMRIN

WORD

104410

CSERDF
24
EMT7
0

;ERROR EXT ENABLE CLEAR

"t*t*

026770
026770
026772
026774

TRAP

;BIT SET - OK.

24 EMT7

:*ttfi

026756

C$ESCAPE

L10036~.
#B1TO,BASE+ISP13 ;CHECK EXT ENABLE BIT IN THE BASE TABLE.
s IMAGE OF SCRATCH PAD 13,

g[
H
»

10%:

1RAP

. WORD

[o)

o
no

104455

09:36

TEST 5 - DMR COMMANDS

BITB

104410

5377
5378

13-MAR-80

BNE
ERRDF

o
n
o
~

N
N

d
b ad

ung?n
£48

026716
026720
026722

[, 1V, TV, o

(3)
(3)
5362

30A(1052)

BGNSUB

15.2:

104402

CLEAR

sMACRC FOR MASTER CLEAR COMMAND
sxrxx MACRG EXPANSION *wxe

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

é};

004737

011064

PC,

SMSCLR

Sgeog
NS
o

N
o
Nt

(3)
(3)

SEQ 0107

;ISSUE A DMR MASTER (LEAR
cRRNR

8 84
L2

[

027034

ESCAPE

104410

TST

s IF ERROR, BR TO TEST END

TRAP

000146

.WORD

BASEIN

;BASE IN COMMAND WITH

o
N

§§

N
N
o
N

o N

d
d o
e
b

PN NN~

(9, 1V, ]

\N’\flwg

[V, ]

ad
e
cnd el
-

PN NN
N N N

13-MAR-80 09:36
PAGE 2-84
TEST 5 - DMR COMMANDS

JSR

|V,&IV,SITE
] Eg

5384

027030

30A(1052)

027046
027050

004737
004000
002630
000522

011262

JSR

PC,

$BASEI

.WORD
.WwORD
.WORD

LPLU
BASE
DMR

;CALL BASE IN ROUTINE WITH DEFAULTS
sSET LINE UNIT LOOP
;BASE TABLE ADDRESS

;DMR-11 MODE
*NAkN

027056
027062
027064
027066

ESCAPE

104410

000130
004737
000012
000000
000054

012064

TST

LA A2

;IF ERROR, BR TO TEST END

DMRIN

TIMER,O,54

JSR

PC, SDMRIN
.WORD
TIMER

.WORD
.WORD

0
54

;SET REP/SELECT TIMER VALUE

ESCAPE

104410

CSESCAPE
L10036~.

;CALL DMR MODE INPUT ROUTINE
s INPUT COMMAND

;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET [N BSEL6)
* kAR

027070
027072

TRAP

sarnx MACRO EXPANSION swxw

027070

LINE UNIT LOOP,

sxxen MACRO EXPANSION #axe

027052
027052
027054
027056

C$ESCAPE

L10036~.

;IF ERROR, BR TO TEST END

TRAP
.WORD

000112

C$ESCAPE
L10036~-.

;SET THRESHOLD VALUES AS FOLLOWS:

;BSEL4 = NAKS RECEIVED (3)
JBSELS = NAKS TRANSMITTED (13)

027074
(1)
(1)
(1)
1)
(1)

(3)
(3)
(1)

(3)
(3)

027074
027100
027102

027104

DMRIN

004737
000013
005403
002015

012064

JSR

BSEL6 = REP/SEL SENT (15)
;BSEL7 = NO BUFFFER (&)
THRESH, 5403,2015
PC, $DMRIN
.WORD
THRESH

.WORD
.WORD

5403
2015

;axxx MACRO EXPANSION #wxx

:CALL DMR MODE INPUT ROUTINE
s INPUT COMMAND

;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)
2

027106
027106
027110
027112
027112

027116
027116

027120

027122
027130
027132

ESCAPE

104410

000074

004737

TST

JSR

PC,

;1F ERROR, BR TO TEST END

SHUTDN

012560

SHALT

JHALT THE DMR.
srxwx MACRO EXPANSION *xwx

;DMR HALT ROUTINE.

:*tt'

ESCAPE

104410

000064
122737
001020
122737

000054
000015

002705
002714

CMPB
BNE
(MPB

TST

JCHECK REP.

TRAP

TIME

IN BASE

.WORD
TABLE.

THRESH.

IN BASE

TABLE.

;IF NOT 54, BR TO ERROR.

C$ESCAPE

L10036~.

8¢

:IF ERROR, BR TO TEST END

#82BASE+PRETIM ;(HE(K REP/SEL

#15,BASE +TH3L

LA 2

TRAP
.WORD

C$ESCAPE
L10036-.

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

5407
5408
5409
5610
5611
5412

027140
027142
027150
027152
027160
027162

54614
5415

027172
027172

5613
(&)
(5)
(5)

(S)

5416

5617
(3)
(3)

027170

027172
027174
027176

027200

027202

001014
122737
001010

122737
00100
122737

001404

027202
027202
027202

104403

027204

104401

(8)
(7)
(6)
(3)
(4)
(4)

027206
027206
027206
027206
027212
027216
027222
027226
027230
027232

017746
017746
012746
012746
010600
104414
062706

(8)
(8)
(7)
(6)
(3)
(&)
(4)

027236
027240
027244
027250
027254
027256
027260

005046
153716
012746
012746
070600
104414
062706

5423
54264
5425
(8)
(8)
(7)
(6)

(3)

(&)
(4)

027264
027272
027274
027274

027276
027302
027306

027312

027314
027316

5426
56427

027322
027322

5429
(8)
(8)
(7)

027332
027332
027334
027340

5628

027330

002712

000004

002716

BNE
CMP8
BNE

(MP8
BNE
CMPB

108
03 LBASE+THIL
108
013 LBASE+THZL
108
04 BASE +THLL

ERRDF

24 ,EMT8,ERRT3

BEQ

10%:

20§

sCHECK NAK SENT THRESH. IN BASE TABLE.
;IF NOT 13, BR TO ERROR

sCHECK NO BUF. THRESH. IN BASE TABLE.

JIF &, ALL CHECKS OK = EXIT

20$:

L10036:

000010
002726.
027602
000002
000006

000054

000006

122737

000003

005046
153716
012746

ERRT3

153022
153014
016276
000003

005046
153716
012746
012746
010600
104414
062706

001413

L10040:

ENDTST

BGNMSG

122737
001413

SEQ 0108

;IF NOT 15, BR TO ERROR.
JCHECK NAK RCVD. THRESH. IN BASE TABLE.
JIF NOT 3, BR TO ERROR.

ENDSUB

5620
(3)
5421
(9)

027236

000013

027206

027204
027204

5422

002710

13-MAR-80
09:36 PAGE 2-85
TEST S - DMR COMMANDS

104455
000030
027545

5418
(3)

Sé?é

000003

30A(1052)

.WORD

CSERDF
24
EMTS8
ERRT3

TRAP

C$ESUB

TRAP

CSETST

MCV
MOV
MOV
MOV
MOV
TRAP
ADD

aSEL2,-(SP)
aSELO,-(SP)
#FMG1 ,-(SP)
#3,-(SP)
SP,RO
C$PNTB
#10,SP

CLR
BISB
MOV
MOV
MOV
TRAP
ADD

-(SP)
BASE+ISP13, (SP)
#FMT11,-(SP)
#2,-(SP)
SP,RO
C$PNTB
#6,SP

CLR
BISB
MOV
MOV

-(SP)
BASE+PRETIM, (SP)
#FMT12,-(SP)
#2,-(SP)

TRAP
ADD

CSPNTB
#6 SP

(LR
8]1S8
MOV

~(SP)
BASE+TH1L. (SP)
REMT13,-(SP)

ERRT3::

PRINTB

#FMG1,aSELO,QSEL2 ;PRINT SELO AND SEL?2

PRINTB

#FMT11,<B,BASE+ISP13> ;PRINT OUT THE IMAGE OF SCRATCH PAD 13

002705

TRAP
.WORD
.WORD

CMPB
BEQ
PRINTB

#54 LBASE+PRETIM ;IS REP/SEL TIME OK?
BR IF OK
#FMTT? <B, BASE*PRETIM) JPRINT IT OUT,

002705
027633
000002

MOV

002710
027670

002710

1%:

(MPB

#3,BASE+THIL

PRINTB

A#FMT13,<B, BASE*THTL) PRINT IT QUT

BEQ

SP,RO

;1S NAK RCVD OK?

‘BR IF oK.

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34
(6)
(3)

(4)
(4)

027344
027350

5430
5431
5432
5433
(8)
(8)
(7

012746

122737

001413

005046
153716
012746

012746
010600

(6)

(3)

000006

TRAP
ADD

000013

001413

122737

000015

(8)

005046
153716
012746
012746

(6)

(3)

(4)
(4)

5438
5639
5440
5441
(8)
(R)
(7)
6)
3)
(4)
(4)

5442
5443
(3
(3)
5444
5445
5446

5447

S448
5449

001413

027472
027476
027502
027504
027506
027512
027512
027512
027512

005046
153716

(MPR
BEQ

#13,BASE+TH2L

002714

3s:

#FMT14,<B,BASE+TH2L>

;PRINT

PRINTB

z;sBASE+TH3L

=(SP)

L
, (SP)
BASE+TH2
NFMT14 ,-(SP)
#2,-(SP)

SP,RO
CSPNTB
#6,SP

;IS
?EPOkEVEL 0K?

#FMT15,<8B, BASE+TH3L> SPRINT IT OUT

=(SP)

002714
027762
000002

000004

SP,RO
CSPNTB
#6,5P

[T ouT

ADD

CMPS
BEQ

#2,-(SP)

;IS NAK SENT 0K?
;BR
:BR
IF OK .

CLR
8158
MOV
MOV
MOV

BASE +TH3L , (SP)

#FMT15,~-(SP)
#2,-(SP)

000006
122737

2%:

002712
027725
000002

5436

(8)
(7)

002712

PRINTR

000006

5437

SEQ 0109
MOV

062706

5434
5635

F
9
13-MAR
~MAR-80 09:36 PAGE 2-86
TEST 5 - DMR COMMANDS

000002

(4)
(4)

104414

30A(1052)

002716

4%:

SP,RO
CSPNTB
#6,SP
CMPB
BEQ

PRINTB

#4 ,BASE
+ TH4L

;IS NO BUFFER LEVEL OK?

:BR IF OK.

RFMT16,<B,BASE+TH4L> :PRINT

IT OUT

(LR

002715
030017
000002
000006

=(SP)

B1S8

BASE +TH4L , (SP)

MOV
MOV
TRAP
ADD

#2,~(SP)
SP,RO
CSFNTB
#6,SP

TRAP

CEMSG

#FMT16,-(SP)

ENDMSG

L10041:

027514
027522
027530
027536
027544
027545
027552
027560
027566
027574

027124
051117
044440
042522

042440
041040
041516
052103

EMT7:

.ASCIZ

/EXT.

051115
020105
020124
047101
047522

046440
042111
047503
020104
000122

EMTS8:

JASCIZ

/DMR MODE INPUT

027602
027610

046511
043117

043501
051440

FMT11:

_ASCIZ

/XAIMAGE OF

ERROR BIT

INCORRECT/

COMMAND ERROR/

SP 13 = XD3AN/

CZDMIAOC DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1
13-MAR-80 09:34

5450

5651

027616
027624
027632
027633
027640
027646
027654
027662
027670

020120
022440
000
045
051455
046511
052514
042045
040445

031461
031504

036440
047045

051101
046105

050105

5452

020124

044123
020075
000116
020120
052040
047510
022440

5453

9454

031504

000
020117
051105
051505
036440
047045

30A(1052)

13-?AR-80
TEST

09:36

PAGE 2-87

DMR COMMANDS

SEQ 0110

FMT12:

.ASCIZ

/%AREP-SEL

FMT13:

_ASCIZ

/XANAK RCVD THRESHOLD = XD3AN/

FMT14:

(ASCIZ

/%ANAK

FMT15:

L_ASCIZ

/XAREP SENT THRESHOLD = %D3AN/

FMT16:

.ASCIZ

/XANO BUFFER THRESHOLD = XD3%N/

SENT

TIME

VALUE = XD3IN/

THRESHOLD = XD3AN/

.EVEN

.SBTTL

TEST 6 - DMR-11
IN COMMAND TEST -

SUBTEST 1

-~ CONTROL IN, FULL DUPLEX, DDCMP MODE.

SUBTEST 2

- g??T?gLsé¥. HALF DUPLEX.

SUBTEST 3

-~ 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
zggEgeggECT. DMR RUN MODE ACKNOWLEDGE WILL NOT BE

SUBTEST 4

IF BE BF BN B

CONTROL

R AR AR AR AR KRR R R R AR RAARRE R AN A RN ANRRRCNRRR

ENSURE THAT

THE HALF-DUPLEX BIT IS CLEAR IN THE MODEM STATUS WORD,
ALSO ENSURE THAT DDCMP MODE BIT IS SET IN SCRATCH PAD 7.

ENSURE THAT THE HALF DUPLEX

5474
5475
5476
5477
5478
5479
5480
(3)

AR AR AR AR R RN

IN COMMAND

KRR

TEST 6 - CONTROL

SRR

030056
030056

BGNTST

A A AR R AN RN RN

RN A

AN R AN RN A AN NN AN A AN RN I RRN AR

AR ANNRRARNOINRNCTANS

To::

CZDMIAO DMR-11 FUNCTIONAL TECTS MACY11
CZDMIA.P11
13-MAR-B0 09:34
5481
(3)
(3)
5482
1)

030056
030056
030056
030060
030060

30A(1052)

13-MAR-80

09:36

TEST 6 -~ CONTROL

9
PAGE 2-88

IN COMMAND

SEQ 01

BGNSUB
T6.1:

104402

CLEAR

004737

011064

JSR

PC,

$MSCLR

;MACRO FOR MASTER (LEAR
sx*vx MACRO EXPANSION #xen
;ISSUE A DMR MASTER CLEAR
;Q'tt

ESCAPE

104410
000404

004737
004000
002630
000522

:1F

JSR

KARAN

ERROR, BR TO TEST END.

ESCAPE

PC,

$BASEI

.WORD
.WORD
.WORD

LPLU
BASF
DMR

TST

030114
030114
030116
030120
030126

030126
030132

() =

8 \mv\wég\t
~—

Py
WA

[V,]

atate

b
ek b

030134
030142
030144
030144
030146
030150
030152
030154
030154
030154

004737
000000

104410
000354

011516

ESCAPE

052777

000057

004737
000000

010266

032777

001404

000020

030164
030164
030166

152104

BIS

WAIT

JSR

L& 8

TO TEST END.

8IT
BEQ
ERRDF

TRAP

10%:

004737

010702

PC,

SCNTIN

LWORD

TST

sxxxx MACRO EXPANSION wawx
:CALL CONTROL IN ROUTINE WITH DEFAULT

:SEL6 = FULL DUPLEX, RUN MODE,

:tttt

:IF

L 3. 8 2 1

ERROR, BR TO TEST END.

SEC START.

TRAP

000304

L10042-.

#RQI 'RMODEM,@SELO ;SET RQI AND READ MODEM COMMAND
RD]
;WAIT FOR RDI TO BE SET
ixwxe MACRO EXPANSION x»ws
PC, SWAIT
*CALL WAIT ROUTINE

JWORD

:FLAG THAT WE'RE WAITING FOR RDI

#B1T4,aSELG
108

21,EMT9

1 8.8 8 1

1S THE HDX BIT SET IN MODEM STATUS REG?
‘0K - IF BIT CLEAR

:ERROR HDX BIT SET

.WORD
.WORD
JWORD

WAIT

RQI

JSR

PC,

$CLRQI

(SERDF

21
EMT9
0

;CLEAR RQI AND WAIT FOR RDI TO CLEAR.
teaxe MACRO EXPANSION txss
:CLEAR RQ] AND WAIT FOR IT TO BE CLEARED.
L2 2

*HALT DMR

JSR

PC.

ESCAPE

1ST

SHALT

iasax MACRO EXPANSION #aws
:DMR HALT ROUTINE.
:tttt

104410

CSESCAPE

.WORD

:‘ttt

012560

L10042-.

;JMACRO FOR CONTROL IN (FULL DUPLEX)

SHUTDN

004737

C$ESCAPE

.WORD

;ttii

152074

TRAP

030160
030160

JSR

CSESCAPE

L10042-.

sSET LINE UNIT LOOP
;BASE TABLE ADDRESS
;:DMR-11 MODE
;IF ERROR, BR

CNTRIN

030106
030112

TRAP

sMACRO FOR BASE IN COMMAND
stxtex MACRO EXPANSION wane
sCALL BASE IN ROUTINE WITH DEFAULTS

:tttt

104410
000366

cs8suB

.WORD

BASE IN

011262

TRAP

:1fF

ERROR,

ANARKR

EXIT.

TRAP

.WORD

(SESCAPE

[ 10042~.

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1Y
13-MAR-80 09:34

(4)
(5)

030170
030176
030200
030200
030202

030204
030206
030210
030210

(3)
(3)

030212
030212

030214

030214
030220
030222
030224

09:36

TEST 6 ~ CONTROL

002722

BITB
BNE
ERRDF

104455

(3)
(3)

PAGE 2-89

IN COMMAND

SEQ 0112

ggiT4.BASE*ISP7 ;IS THE DDCMP RUN BIT SET

21,EMT10

000000

TRAP

20%:
ENDSUB

L10043:

1044C3
BGNSULB

104402

16.2:
BASE IN

011262

JSR

010522

030226

LPLU,BASE ,RES'DMR ;BASE

IN WITH RESUME.

Jxnne MACRO EXPANSION sxnx
PC, $BASE!
;CALL BASE IN ROUTINE
.WORD
LPLU
JMAINTENANCE MODE BITS TO SET
.WORD
BASE
;JBASE TABLE ADDRESS
.WORD
RES'DMR ;MODE

004737

002000

011516

CNTRIN

HDX

JSR

PE,

$CNTIN

.WORD

HDX

ESCAPE

000234
052777
030246

004737
000000

000057

151764

8IS
WAIT

010266

JSR

TST

030274
030274
030274

032777
001004

;JSEL6 ~

104455
000025
030552
000000

004737

151754

8IT

BNE
ERRDF

10%:

012560

030302

ENDSUB

104403
BGNSUB

TRAP

C$BSUB

1 44 31

(DUPLEX, MODE)

1 3

2 1

TRAP

#B]T4L ,aSELS
10%
21,EMT11

PC,

SHALT

CSESCAPE

L10042-.

;FLAG THAT WE'RE WAITING FOR RDI
L3 8

;1S THE HDX BIT SET [N MODEM STATUS REG?

;OK = IF BIT SET
JERROR HDX BIT CLEAR.

TRAP

CSERDF

.WORD
.WORD
.WORD

21
EMTT
O

1 RAP

C$ESUB

JHALT THE DMR.
Jaxxe MACRO EXPANSION xxxx
:DMR HALT ROUTINE.
:fifi*‘

030300
030300
030300

C$ESLB

#RQ] 'RMODEM,QSELO ;SET RQ] AND READ MODEM (COMMAND
RDI
JWAIT FOR RDI TO BE SET
Jranx MACRO EXPANSION #xxx
PC, SWAIT
;CALL WAIT ROUTINE

SHUTDN

JSR

TRAP

.WORD

;fi"'

000020

21
EMT10
0

IN BSEL1

;IF ERROR, BR TO TEST END.

.WORD

CSERDF

LWORD
.WORD
.WORD

JCONTROL IN COMMAND WITH HDX.
sxnxr MACRO EXPANSION sxwx
;CALL CONTROL IN ROUTINE
;**fi*

104410

SP 7.

;ERROR DDCMP RUN BIT NOT SET

;t'fi*

030226
030232

[N [MAGE OF

000025
030524

030212

o = O
NN

000020

13-MAR-80

v
v v NN
OOV~ v v O

n et

AL
ron
VAN A~~~ VA

o mh P ALY 20V 2L R

VI
(4l %Al
AAAVINNIA A AAWNNA

R e e T GuE YN [ WY L T P D GRS R o )

\4\4\4\4(}83

b md

o
N

Iun
ALY,]
ANN A AA AV
A A

—

i md

030210
030210

(3)
(3)

132737
001004

30A(1052)

1 3

3§

L10044:

1)
9D

030302
030302
030304

104402

030304

004737

13-MAR-80

09:36

TEST 6 ~ CONTROL

PAGE 2-90

IN COMMAND

SEQ 0113
T6.3:

CLEAR

011064

JSR

JMACRO FOR MASTER CLEAR

PC,

SMSCLR

030314
030320
030322
030324

ESCAPE

104410

000160

004737
004000
002630
000522

TST

011262

JSR

PC,

$BASEI]

.WORD
.WORD
.WORD

LPLU
BASE
DMR

L 2 2

104410
000142

030332
030336

004737
000400

ESCAPE

011516

TST

;CALL BASE IN ROUTINE WITH DEFAULTS
sSET LINE UNIT LOOP
;BASE TABLE ADDRESS
:DMR-11 MODE
L 2

MAINT

JSR

PC,

$CNTIN

.WORD

MAINT

¢sMACRO FOR CONTROL IN (MAINT.
sunex MACRO EXPANSION wxww

104410
000130

030344

004737

ESCAPE

TST

;SEL6 - (DUPLEX, MODE)

JSR

PC,

SHALT

JHALT
sunsx MACRO EXPANSION wwex
:DMR HALT ROUTINE.

ESCAPE

104410

000002

002722

BITB
BNE
ERRDF

TST

ESCAPE
0042-~.

L 8.2 81

;IF ERROR, BR TO TEST END.

SHUTDN

012560

TRAP
. WORD
MODE)

sCALL CONTROL IN ROUTINE
;ttfit

030340
030340
030342
030344

8 2]

;If ERROR, BR TO TEST END.

CNTRIN

CS$ESCAPE
L 10042-.

sMACRO FOR BASE IN (OMMAND
sxntx MACRO EXPANSION wxws

sNRAK

030326
030326
030330
030332

TRAP
.WORD

s ISSUE A DMR MASTER CLEAR

;IF ERROR, BR TO TEST END.

BASE IN

c$8suB

saewx MACRO EXPANSION #wxw
;tttt

030310
030310
030312
030314

TRAP

(3)
{3)
5523

30A(1052)

CZDMIAQ DMR~11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

TRAP

CSESCAPE
L10042-.

TRAP
. WORD

CSESCAPE

-WORD

L2
4 21

;IF ERROR, BR TO TEST END.

L10042-.
#B1T1,BASE+]SP?7 ;1S THE MAINTENANCE BIT SET IN IMAGE OF SP 7.
10%
21,EMT12
JERROR - MAINT. BIT NOT SET.
C$ERDF

21
EMT12
0

10%:
ENDSUR

030374
030376
030376

030376

TRAP

C$ESUB

TRAP

(s8sSUB

BGNSUB
16.4:

104402

030400
030400

L10045:

104403

CLEAR

004737

011064

;MACRO FOR MASTER CLEAR
JRRRN

JSR

PC,

$MSCLR

MACRO

EXPANSION

rxxx

;ISSUE A DMR MASTER CLEAR

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

30A(1052)

K 9
13-MAR-8 0 09:36 PAGE 2-9
TEST 6 - C ONTROL IN COMMAND

SEQ 0114

;ttfifi

104410
000064

005737
001004
052737
000403
042737

ESCAPE

002254

TST

;1F ERROR, BR TO TEST END.

DMTURN

;1S INTERNAL LOOPBACK REQUESTED?

1%
#LPLU,100%

JSET LINE UNIT LOOPBACK.

004000

030440

004000

030440

8IC

#LPLU,100%

;CLEAR LINE UNIT LOOPBACK.

CALL

$BASE|
.WORD

;BASE IN COMMAND.
sMAINTENANCE BITS (L. U. LOOPBA(K?)
;BASE TABLE ADDRESS.
:DMR MODE.
;1F ERROR, BR TO TEST END.

100%:

.WORD

ESCAPE

104410

000022

CALL

ESCAPE

104410

.WORD

TST

BASE

DMR

.IF NOT, BR

TRAP
.WORD

$LOOP

SEXTENDED DMR COMMAND TO SET MAINT. BITS

TST

. WORD

CNTRIN

011516

JSR

sMACRO FOR CONTROL IN (FULL DUPLEX)
PC,

SCNTIN

.WORD

C$ESCAPE
L10042~.

cIF NEEDED. THIS WILL ALLOW MODEM LOOPBACK
¢IF THE USER REQUESTED IT.
:IF ERROR, BR TO TEST END.
TRAP

000012

CSESCAPE
L10042-.

TRAP
.WORD

BNE
BIS
BR

000000
002630
000522

004737
000000

TST

wRER

CSESCAFE
L10042-.

saxax MACRO EXPANSION #xxx

sCALL CONTROL IN ROUTINE WITH DEFAULT
;SEL6 = FULL DUPLEX, RUN MODE, 1 SEC START.

;ttti

AARR

ENDSUB

L10046:

104403

TRAP

C$ESUB

TRAP

CSETST

ENDTST

L10042:

104401

042110
020124
044127
020116
042104

020130

044502
020124

EMTO:

ASCIZ

/HDX BIT SET WHEN IN FDx/

EMT10:

LASCIZ

/DDCMP RUN BIT NOT

044502

EMT11:

LASCIZ

/HDX BIT NOT

027124
020105
047516

EMT12:

JASCIZ

/MAINT.

SET/

020124

020124
044127
020116

5571

044502

020124

SET WHEN

MODE BIT NOT

IN HDX/

SET/

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

5572
5573
5574
5575
5576
5577
5578
5579

030630

020124

042523

30A(1052)

13-MAR-80

09:36

TEST 6 - CONTROL

000124

PAGE 2-92

IN COMMAND

SEQ 0115

.EVEN

TEST 7 - MODEM WRITE COMMAND

.SBTTL
R

AR AR

R AR R

A AR

AN A AN AR AR AR AN AR RN AR

AN RN

ARN AN

AN NN NON

TEST 7 - DMR-11

‘+ MODEM WRITE COMMAND
;v

SUBTEST 1

SUBTEST 2

. %

ix
;t

= WRITE DATA PATTERNS INTO THE MODEM WRITE REGISTER.
ENSURE THAT ON THE NEXT MODEM READ THAT THE
MICROCODE RETURNS THE PATTERN WRITTEN INTO BSEL6.
= ATTEMPT TO WRITE BOTH THE HALF-DUPLEX BIT AND THE
RTS HOLD BIT.
THE MICROCODE SHOULD NOT ALLOW THIS
TO HAPPEN.,
WHEN READING THE MODEM STATUS, ONLY
THE HALF-DUPLEX SHOULD BE SET.

oK
:tttttttttt**tt*fiitttt*t'itttt*tttt*tttttttt*tt*tttt****tt*t**fittttitt

BGNTST

T7::

BGNSUB

T7.1:

104402

004737

CLEAR

011064

JSR

JMACRO FOR MASTER CLEAR
PC,

SMSCLR

ESCAPE

000232

004737
004000
002630
000522

TST

011262

JSR

sCALL BASE IN ROUTINE WITH DEFAULTS
;SET LINE UNIT LOOP
;BASE TABLE ADDRESS

;DMR-11 MODE
chNkN

ESCAPE

.WORD

sanxnx MACRO EXPANSION wxx<

104410
000214

TST

CSESCAPE
L10047-.

Rk
K

;BASE IN COMMAND.
PC, $BASEI]
WORD
LPLU
.WORD
BASE
.WORD
DMR

TRAP

sunxxx MACRO EXPANSION wwxx

;IF ERROR, BR TO TEST END.

BASE IN

C$B8SUB

;ISSUE A DMR MASTER CLEAR
INRAR

104410

TRAP

L8
2 21

;IF ERROR, BR TO TEST END.
.WORD

012701
012702

000005
031102

012237
004737
000005
000377
000000

030712
012064

10%:

15%:

MOV
MOV
MOV
JSR

#5,R1

s COUNTER

(R2)+,15%

JWRITE PATTERN
- ISSUE DMR MODE COMMAND
;WRITE MODEM COMMNAD
;CLEAR ALL BITS IN BSEL6
;SET THE BITS IN BSEL6 (FROM PATTERN)

#MODEM,R2
PC,SDMRIN
.WORD
WMODEM

.WORD
WORD

377
O

;PATTERN TO WRITE

INTO MODEM

CSESCAPE

L10047-.

m9
CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
13-MAR-80 09:36 PAGE 2-93
CZDMIA.P1T
13-MAR-80 09:34
TEST 7 - MODEM WRITE COMMAND

030720
030726

ESCAPE

104410

TST

;IF ERROR, BR TO TEST END.

052777
004737
000000

000057

151304

BIS
WAIT

010266

JSR

#RQI !RMODEM,QSELO ,SET RQI AND READ

RDI

ESCAPE

MODEM COMMAND

sWAIT FOR RDI TO BE SET.

PC, SWAIT
.WORD
O

shwnx MACRO EXPANSION wwew

sCALL WAIT ROUTINE
JFLAG THAT WE'RE WAITING FOR RDI
;ttti

TST

LA 4 A

;IF ERROR, EXIT TEST.

(=3

3
&

127737

.WORD

151274

030712

CMPS
BEQ
MoV
ERRDF

030712

104455

000026
031146
031114

004737

CSESCAPE
L10047-.

TRAP

000142
001406
013703

C$ESCAPE

L10047-.

.WORD

104410

TRAP

000162

030726
030732

xivivivieietel

030714
030714
030716

SEQ 0116

25%:

010702

aBSELE,15%
25%
15% ,R3

22,EMT13,ERRTZ

WAIT

RQI

JSR

PC.

ESCAPE

TST

$CLRQI

;01D THE MICROCODE COPY THE BITS?
;IF YES CONTINUE
sSAVE THE PATTERN FOR THE ERROR MESSAGE.
sWRITE MODEM ERROR

;CLEAR RQ] AND WAIT FOR RDI TO CLEAR.
;exxx MACRO EXPANSION *xx+
;CLEAR RQI AND WAIT FOR IT TO BE CLEARED.
a2
2 41

104410

000106
005301
001337

DEC

BNE

30%:

L 4. %81

;IF €RROR, EXIT TEST.

TRAP

.WORD

;DECREMENT COUNTER

10%

CSERDF
22
EMT13
ERRTZ2

CSESCAPE

L10047-.

;CONTINUE UNTIL ALL 5 PATTERNS TRIED.

ENDSUR

L10050:

104403

TRAP

C$ESUB

TRAP

cs8sSUB

BGNSUB

17.2:

104402
DMRIN

031014

004737
00000 5
000377
000021

012064

JSR

WMODEM, 377,21
PC, SDMRIN
.WORD
WMODEM

.WORD
.WORD

377
21

SATTEMPT TO WRITE MODEM HDX AND RTS.
saxwx MACRO EXPANSION #wxx

;CALL DMR MODE INPUT ROUTINE
s INPUT COMMAND
;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)

SRRk

031016
031016
031020
031022
031030

104410
000060

052777

ESCAPE

000057

151202

BIS

WAIT

TST

KRR
K

.IF ERROR, BR TO END.

TRAP
WORD

#RQI!RMODEM,RSELO ;SET RQI AND READ MODEM COMMAND.

RDI

;WAIT FOR RD] TO BE SET
sxxxx MACRO EXPANSION *xxw

C$ESCAPE
L10047~.

N 9
CZOMIAO DMR-11 FUNCTIONAL T EETS MACY11 30A(1052)
13-MAR-80 09:36 PAGE 2-94
CZDMIA. P11
13-MAR-80 09:3
TEST 7 - MODEM WRITE COMMAND

031030
031034
031036
031036
031040

031042
031050

004737
000000

010266

PC, SWAIT
WORD
O

;CALL WAIT ROUTINE
JFLAG THAT WE'RE WAITING FOR RDI

ESCAPE

TST

;IF

104410

122777
001406
012703

000020

151170

CMPB
BEQ

000021

MOV

ERRDF

#20,38SEL6
108

#21,R3

22,EMT13,ERRT?

;SAVE

gkwmmd-‘_a_n_n
OHNOD DD

—) d ) md b md D wd wad b

-0 8

— —ad

puiiy

b
—

d ) mad )l

TRAP

. WORD
.WORD
.WORD

10%:

010702

WAIT

RQI

JSR

PC,

$CLRQI

CSERDF

22
EMTI3
ERRTZ2

cCLEAR RQI AND WAIT FOR RD]I TO CLEAR.
swxxx MACRO EXPANSION wanx
JCLEAR RQI AND WAIT FOR IT TO BE CLEARED.

;fi*i*

1 3.8 2 4

SHUTDN

004737

012560

JSR

PC,

$HALT

sxxxk MACRO EXPANSION wxax
;DMR HALT ROUTINE.
AKX

ENDSUB

L10051:

104403

L10047:

104401

000000
000252

000376
000357

000007

MODEM:

.WORD

BGNMSG

ERRT?
PRINTB

TRAP

C$ESUB

TRAP

CSETST

CLR
BISB
MOV

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

0,376,1,252,357 ;PATTERN TO WRITE INTO MODEM

#FMT19,R3,<B.aBSEL6>

:
ERRT?Z:

151116

031172

000003

L 81Y)
MOV

#FMT19,-(SP)
#3,-(SP)

TRAP

C$PNTB

MOV

000010

ENDMSG

L10052:

031170

C$ESCAPE

L10047-.

THE PATTERN FOR THE ERROR MESSAGE.
TRAP

ENDTST

—

8 |

TEST.

;IS ONLY HDX SET?
JIF YES - OK

.‘fit*t

03
03

EXIT

WORD

031072

031076
031076
031076

L2 8

ERROR,

000040

004737

031072

JSR

;fit**

104455
000026
031146
031114

1)
1)

SEQ 0117

052111
042504
047522

020105
020115
020122

EMT13:

_ASCIZ

/WRITE MODEM ERROR /

SP_RO

ADD

#10,SP

TRAP

CEMSG

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13~-MAR-8C 09:34
5659

031172
031200
031206
031214
031222
031230
031236
031244
031252

052117
041040
020072
020101
046505
040515
041040
020072
000116

040445
020105
042523

047445

FMT19:

LASCIZ

/XAWROTE

PAGE 2-95
)

IN BSEL6: XO03XA

MODEM FORMAT IN BSEL6: X¥03IN/

.EVEN

TEST 8 - NO BUFFER ERROR

®
¥

SUBTEST 1

¥
¥
%

SUBTEST 2

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

THREE, ENSURE THAT A NO BUFFER ERROR IS RECEIVED

AFTER THE THIRD THRANSMISSION.
- TRANSMIT A BUFFER WITHOUT A RECEIVE BUFFER.
ASSIGN THE NAKS THRESHOLD OF 3 AND A NO BUFFER
THREE

LSS

BGNTST

AL ettt

CHECK THAT THE NAKS ERROR COUNT

AFTER SHUTDOWN.

T8::

78.1:

104402
CLEAR

011064

JSR

JMACRO FOR MASTER CLEAR

PC,

SMSCLR

031272

ESCAPE

;ISSUE A DMR MASTER CLEAR

JSR

031306
031310

CNTRIN

PC, $BASE]
.WORD
LPLU
.WORD
BASE
.WORD
DMR

1ST
MAINT

cs8suB

;IF ERROR, BR TO TEST END.

TRAP

;MACRO FOR BASE IN COMMAND
;axsxx MACRO EXPANSION wxwx
;CALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;JBASE TABLE ADDRESS

;DMR=-11 MODE

:fittfi

ESCAPE

L8 8

.WORD

BASE IN

011262

TRAP

sxxxx MACRO EXPANSION *xxe
;fii*t

031266
031266
031270
031272

At dddldsdlss
sttt
tlses
T22222222222
elsl
2222228

BGNSUB

004737

AR AN

= TRANSMIT A BUFFER THREE TIMES WIHOUT ASSIGNING A
RECEIVE BUFFER.
BY ASSIGNING A NO BUFFER THRESHOLD

THRESHOLD OF

AR RN

TEST 8 - DMR-11
OF

Re%s

e, N8

8,0,

AR AR AR A AR AR

031262

8 10

TEST 7 - MODEM WRITE COMMAND

.SBTTL

031260
031260
031260
031260
031260
031262

09:36

.EVEN

5661

031172

13-MAR-80

5660

30A(1052)

CSESCAPE

L10053-.

1 3.2 8 1

;IF ERROR, BR TO TEST END.

i RAP

WORD

CSESCAPE

L10053-.

:MACRO FOR CONTROL IN (FULL DUPLEX AND MAINT)

SEQ 0118

c10

CZDMIAO DMR-71 FUNCTIONAL T%gTS MACY11 30A(1052)
13-MAR-80
09:36 PAGE 2-96
CZDMIA.P1
13-MAR-80 09
TEST 8 - NO BUFFER ERROR
1

1)
)
a)
(1)
5691

004737
000400

011516

JSR

PC, $CNTIN
.WORD

MAJNT

SEQ 0119

stewxe MACRO EXPANSION wwwx

:CALL CONTROL
:SEL6 ~

IN ROUTINE

(DUPLEX, MODE)

:ttfifi

5692
(3
(3)
5693

ESCAPE

104410
000366

004737
000013

;IF ERROR, BR TO TEST END.

012064

DMRIN

THRESH,177777,1777

JSR

PC. SDMRIN
.WORD
THRESH

177777

.WORD
.WORD

001777

(% 1V, |

N
N

031344
031350
031352
031354

004737
000040
002512
000044

ESCAPE

000003

1%:

012274

MOV

177777
1777

TST

:SEL4 VALUE
:SEL6 VALUE

(OR BITS TO CLEAR IN BSEL6)
(OR BITS TO SET IN BSEL6)

:SET UP A COUNTER

004737
000001

010266

;BA/CC IN COMMAND FOR TRANSMIT

JSR

104410

TBUF
TCOUNT

WAIT

RDO

JSR

PC, SWAIT
L.WORD
1

ESCAPE

TST

031412
031414
031414
031416
031420
031422
031424

DEC

BEQ

;BA/CC IN TRANSMIT COMMAND
:TRANSMIT BUFFER ADDRESS
:TRANSMIT CHARACTER COUNT

10%

RN N

;WAIT FOR RDO TO BE SET
sexex MACRO EXPANSION ##%=
SCALL WAIT ROUTINE

:FLAG THAT WE'RE WAITING FOR RDO
1 2. 8 8 1

*IF RDO NOT SET, BR TO TEST END.
:DEC COUNTER

TRAP
.WORD

000207

150632

BIC
BR

#RDO'CMD,RSEL2
1%

:CLEAR BACC OUT TRANSMIT.
:TRANSMIT AGAIN

032777
001005

000001

150622

BIT
BNE
ERRDF

#CNTRL ,@SEL2
208
8,EMG8,ERRG?

;1S THIS A CONTROL OUT?
;IF YES, PROCEED.
:EXPECTED CONTROL OUT NOT RECEIV?QAP

000010
020072
015070
000410

308

C$ESCAPE

L10053-.

STRANSMIT FOR 3 TIMES.

042777
000760

104455

C$ESCAPE
L10053-.

PC, $BACC
.WORD
RQI'BACCT

ttfit

000320

TRAP
.WORD

;%% MACRO EXPANSION ##x*
:CALL BA/CC IN ROUTINE WITH DEFAULTS

;tt*t

031356
031362

whNk

;1F ERROR, BR TO TEST END.

#3.R0

.WORD
.WORD

031356

CSESCAPE
L10053-.

;aset MACRO EXPANSION ###w
*CALL DMR MODE INPUT ROUTINE
;INPUT COMMAND

BACCIT

AN N
s
Nt N

—

——d ad —d

AN
NN AN A~

SFD_J—J_J—LJ

104410
000350
012700

TRAP

:SET THRESHOLDS
‘NAKS RCVD = 377
:NAKS SENT = 377
SREP SENT
= 377
*NO BUFFER
= 3

;tttt

031334
031334
031336
031340
031344
031344

2 1

.WORD

031322
031322
031326
03133C
031332

TST

L2 2

SEXIT

.WORD
.WORD
.WORD

CSERDF

8
EMG8
ERRG2

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1T
13-MAR-80 09:34
5717
5718
5719
5720
(4)

031426
031426
031434
031436
031436
031440
031442
031444
031446
031446
031454
031454
031460

031462
031462
031464
031466
031474

031474
031500
031500
031500
031500
031502
031502
031502
031504
031504

032777
001004

000004

150604

30A(1052)

20%:

0 10

13-MAR-80
09:36 PAGE 2-97
TEST 8 - NO BUFFER ERROR

8IT
BNE
ERRDF

104455
000011

ANOBFR,QSEL6

30$

9.EMGY,ERRGZ

SEQ 0120

;1S THE NO BUFFER FLAG SET?
;IF YES - OK, PROCEED.
;WE'RE NOT GETTING EXPECTED RESULT

020136
015070

042777

000207

004737

010266

000001

150560

BIC
WAIT

#RDO!CMD ,@SEL?2
ROO

JSR

PC, SWAIT
1
.WORD

ESCAPE

TST

104410

004737

000207

150540

012560

;CALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDO
L2 .8 8

;IF ERROR, BR TO END.

BIC
SHUTDN

#R
! CMD,QS
DO
EL2

JSR

PC,

$HALT

;CLEAR BACC OUT.

JHALT DMR

sxxnx MACRO EXPANSION

=xwx

;*t"

L8 2.8 1

:DMR HALT ROUTINE.

. WORD

L10053~.

TRAP

C$ESUB

TRAP

($8SUB

TRAP

CSESCAPE
L10053-.

50%:

ENDSUB

L10054:

104403
BGNSUB

18.2:

104402
CLEAR

004737

011064

JSR

ESCAPE

104410

JMACRO FOR MASTER CLEAR

PC,

$MSCLR

Jxxnee MACRO EXPANSION xxxx

;ISSUE A DMR MASTER CLEAR

TST

1 2

3 1

;IF ERROR, BR TO TEST END.

000174

BASEIN

004737
004000
002630
000522

011262

JSR

sMACRO FOR BASE IN COMMANC
PC, $BASEI
.WORD
LPLU
.WORD
BASE

.WORD

DMR

ESCAPE

104410

TST

;CALL BASE IN ROUTINE WITH DEFAULTS
sSET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE

CNTRIN

004737
000000

011516

JSR

PC,

LA 8

;IF ERROR, BR TO TEST END.

000156

S$CNTIN

.WORD

srxnte MACRO EXPANSION waxx

:tttt

031532
031536

CSESCAPE

sxxan MACRO EXPANSION #xxx

;'**.

031532

TRAP

;CLEAR CONTROL OuT
SEXPECT ANOTHER BACC OUT.

:*iflt

000222
042777

ERRGZ2

; (EITHER CONTROL OUT OR NOBUF /NAKS)

30%:

CSERDF
9
EMG9

TRAP
.WORD
.WORD
. WORD

TRAP

.WORD
¢MACRO FOR CONTROL IN (FULL DUPLEX)
srenete MACRO EXPANSION xaw

C$ESCAPE

L10053-.

;CALL CONTROL IN ROUTINE WITH DErAULT
;SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START.
:t*fit

LA B

CZDMIAOQ DMR-11 FUNCTIONAL TESTTMS MACY11
CZDMIA.P11
13-MAR-80 09:34

5739

5740
(3)
(3)
5741
5742
5743
5744
5745

031540

031540
031542

30A(1052)

E 10

13-MAR-80 09:36 PAGE 2-98
TEST 8 - NO BUFFER ERROR
ESCAPE

1
000

;1F

ERROR, BR

031556
031556
031560
031562

CSESCAPE

L10053-.

004737
000013
001403
003777

012064

DMRIN

THRESH,1403,3777

JSR

PC.,

SDMRIN

.WORD
.WORD

.WORD

THRESH
1403

3777

JNAKS SENT = 3
JREP SENT = 377
:NO BUFFER = 7

sannn MACRO EXPANSION wxsw
.CALL DMR MODE INPUT ROUTINE

; INPUT COMMAND
;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)

;SEL6 VALUE (OR BITS TO SET IN BSELS)
:fit*fi

TRAP

sSET THRESHOLDS:
JNAKS RCVD = 3

031544
031550
031552
031554

NN NN~ Qo
NN
AN~ N
1Y NN QaGLY
A A ANN A A
AN
AN oD o ed ad NN\ = ed cd ad —d
ChOWAU“nt«)grn\huuhunntwnuunuuu
WA~
v N =
VOO N~
v ONN S
NN W e W N\
o o v N

TO TEST END.

.WORD

031544

5764

SEQ 0121

031562
031566
031570
031572

ESCAPE

104410

031574

031602

BACCIT

004737
000040
002512
000044

012274

JSR

004737
000001

010266

BR TO TEST END.

TRAP

JBA/CC IN COMMAND FOR TRANSMIT

104410
000102

WAJT

RDO

JSR

PC.,

ESCAPE

000001

150420

BIT
ERRDF

SWAIT

.WORD

000410

032777
001004

TST
#CNTRL ,@SEL2

20%
8.EMG8,ERRG2

1 3

8 8 4

JWAIT FOR RDO TO BE SET
saeax MACRO EXPANSION wwnx
JCALL WAIT ROUTINE

JFLAG THAT WE'RE WAITING FOR RDO
:1F
;1S

L2 2

RDO NOT SET, BR TO TEST END.
THIS A CONTROL OUT?

TRAP

.WORD

;IF YES, PROCEED.
JEXPECTED CONTROL OUT NOT RECEIVED.

TRAP

000010
020072
015070
000004

150402

30%

BIT

ANOBFR ,QSEL6

ERRDF

104455
000011
020136
015070

30%
9,EMGY,ERRG?

JEXIT
;IS

.WORD
.WORD
.WORD

.WORD
.WORD
WORD

; (EITHER CONTROL OUT OR NOBUF /NAKS)
SHUTDN

(SESCAPE

L10053-.

CSERDF

8
EMG8
ERRGZ

THE NO BUFFER FLAG SET?

oIF YES - OK, PROCEED.
JWE'RE NOT GETTING EXPECTED RESULT

TRAP

30%:

CSESCAPE

L10053-.

sanwwx MACRO EXPANSION wxsax
PC, $BACC
.CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI'BACCT
;BA/CC IN TRANSMIT COMMAND
.WORD
TBUF
s TRANSM]IT BUFFER ADDRESS
.WORD
TCOUNT
;TRANSMIT CHARACTER COUNT

:tt*t

104455

031650
031650

ERROR,

;tttt

10%:

032777
001005

031646

;IF

000126

031574
031574
031600

TST

1 4

C$ERDF

9
EMGO
ERRGZ

CZDMIAO DMR-11 FUNCTIONAL TECTS MACY11
CZDMIA P11
13-MAR-80 09:34

012560

031654

123727
001004
123727
001404

002633

000003

002636

000003

(4)

031702

BASE+3,#43

:DMR HALT ROUTINE.

BNE
(MPB

35%
BASE+6,43

ERRDF

23 ,EMT20,ERRTS

408

L8
& &

*NAKS REC. - NO BUFFER = 3?
;IF NOT ERROR

sNAKS SENT = NO BUFFER = 3?

JIF 0K - SKIP.

.WORD

CSERDF
23
EMT20

.WORD

ERRT4

TRAP

C$ESUB

TRAP

CSETST

40%:
ENDSUR

L10055:

104403

ENDTST

L10053:

106401

BGNMSG

ERRT4
PRINTB

ERRTS::

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

=(SP)

002636

BASE+6, (SP)

002633
016557

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

~(SP)

000003

000010

031746
031754

040516
051122
031762

0642440
000

EMT20:

L10056:
.ASCIZ

CEMSG

/NAKS ERROR/

.EVEN

.SBTTL

TEST 9 - NON-EXISTENT MEMORY ERROR

:tfit'tt'*tttttfitttttttt'titttttt*tfittttttt'fifififitttttt'ltltttt""ttttt
b

TEST 9 - DMR-11
NON-EX]STENT MEMORY (NXM) ERROR CHECK

PERFORM DMR COMMANDS USING NXM ADDRESSES;
BN N

104423

031744

#10,SP

ENDMSG

S.esn.n,

5781

C(MPS

srxxx MACRO EXPANSION wawe

TRAP

031704
031704

(9)

(8)
(8)
(7)
(6)
(3
(4)
(4)
5779
(3)
(3)
5780

PC, SHALT

SEQ 0122

000027
031746
031710

5772
5773
(3)
(3
5774
(3)
(3)
5775
5776
5777
(3)
5778
{9)

104455

5771

JSR

8EQ

35%:

(5)
(5)
(5)

F 10
13-MAR-80 09:36 PAGE 2-99
TEST 8 - NO BUFFER ERROR

chARR

—

5766
5767
5768
5769
5770

004737

(VLLV,]

5765

031650

(1)
M
(1)

30A(1052)

REPORTED IN EACH OF

SUBTEST 1
SUBTEST ¢

VERIFY

THE FOLLOWING SUBTESTS:

THAT NXM ERROR

BASE IN RESUME COMMAND - BASE TABLE ADDRESS IS NXM
BA/CC IN RECEIVE COMMAND - BA/(C IN ADDRESS IS NXM

CZOMIAO DMR-11 FUNCTIONAL TELTS MACY11
13-MAR-80 09:3¢4
CZDMIA, P

5797
5798
5799
5800
(3)
5801
(3)
(3)
5802

G 10

30A(1052)

;*
: L¢

13-MAR-80
09:36 PAGE 2-100
TEST 9 - NON-EXISTENT MEMORY ERROR

SUBTEST 3

MAAALAARAS

031762
031762
031762
031762
031762
031764
031764

BGNTST

BA/CC
RR

SEQ 0123

IN TRANSMIT COMMAND - BA/CC

ARl

IN ADDRESS

031774
032000
032002
032004

(LcAR

011064

JSR
ESCAPE

104410

000500

004737

004000
002630
000522

011262

JSR

ESCAPE

PC,

SMSCLR

TST

(¥,

(9,19,

(YalV,]

—~ ~ 0 0000~~~
~Q0O00 ~ ~ o~~~
& — — b —d wd ——d —d D ol ) ] cand =D ——d b —
~r
e O OO N
(NN W S
N W N

012560

JSR

PC, $BASEI
.WORD
LPLU
.WORD
BASE
DMR
.WORD

TST

;ISSUE A DMR MASTER CLEAR
12 X

000001

002360

011262

010266

032050

000001

;IF

SHALT

TST

CSESCAPE

L10057-.

L 8. 8 3 1

ERROR, BR TO TEST END

TRAP

LWORD

CS$ESCAPE

L10057-.

Jrwxx MACRO EXPANSION wwwx

;DMR HALT ROUTINE.

L 2

3¢

;IF ERROR, BR TO TEST END.

TRAP

"“WORD

MOV

#CNTRL ,ERROR

BASEIN

0.160000,B1T15'BIT14'RES
! DMR

JSR

PC, $BASEI
;CALL BASE [N ROUTINE
.WORD
0
JMAINTENANCE MODE BITS TO SET
.WORD
160000
:BASE TABLE ADDREgSDE
.WORD
BIT15!BIT14!RES!DMR

CSESCAPE

L10057-.

sTHIS FLAG WILL INHIBIT CONTROL
' QUT
;ERROR REPORTING - BECAUSE WE FXPECT ONE.

BASE

IN RESUME COMMAND WITH NXM BASE

TABLE.

stxex MACRO EXPANSION wwwx

WAIT

RDO

JSR

PC,

BIT

#CNTRL ,@SEL2

ERRDF

8.EMG8,ERRG?

SWAIT

WORD

108

IN BSEL1

L&
2 8

JWAIT FOR RDO TO BE SET
sxxne MACRO EXPANSION wwxw

sCALL WAIT ROUTINE
:FLAG THAT WE'RE WAITING FOR RDO
:itt.

150156

.WORD

;CALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS
:DMR-11 MODE

*RANR

032042
032046

TRAP

J*xxn MACRO EXPANSION wxxxx

032042

JHALT
PC,

C$8SLB

cexnen MACRO EXPANSION wxas

:***'

t SCAPE

TRAP

;BASE IN COMMAND ~ DMR MODE

SHUTDN

032030
032030
032034
032036
032040

2222222k

;IF ERROR, BR TO TEST END

000462

032016

032016
032020
032022

JMASTER CLEAR MA(CRO

BASEIN

104410

032012

19.1:

104402

004737

19::

:t!'.

032012

BGNSUB

;It't

031770
031770
031772
031774

IS NXM

;IS THERE A CONTROL OUT REPORTED ?

;IF YES, PROCEED.

:EXPECTED CONTROL OUT
TRAP

.WORD

CSERDF
8

CZDMIAOD DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
(%)
(5)
5820
5821
5822
5823
5824

3GA(1052)

13-MAR-80

000400

150140

032124
032124

032126
032126
032126
032130
032130

000207
002360

150114
END5SUB

SEG 0124

.WORD
.WORD

20%

JEXIT

BIT

ANXM,aSEL6

;IS THE NXM FLAG SET?

9.EMG9.,ERRG?

JUNEXPECTED CONTROL OUT RECEIVED

BNE
ERRDF

104455
000011
020136
015070

042777
005037

H 10
PAGE 2-101

TEST 9 ~ NON-EXISTENT MEMORY ERROR

020072
015070
000410
032777
001004

09:36

8IC
CLR

20%

#RCMD
DO
,@SEL?
!
2

ERROR

cIF

YES - ERROR REPORTED CORRECTLY

032140

032144
032146
032150

L10060Q:

104403

.WORD

CSERDF
9
EMG9
ERRGZ

TRAP

CSESUR

TRAP

c$8sSUB

BGNSUB

19.2:

104402

004737

CLEAR

011064

JSR

;MACRO FOR MASTER CLEAR
PC,

SMSCLR

Jexnwn MACRO EXPANSION wtxe

;ISSUE A DMR MASTER CLEAR

ESCAPE

104410

000334

004737

TST

JSR

032152
032152
032154
032156

ESCAPE

PC, $BASEI
.WORD
LPLU
.WORD
BASE
DMR
.WORD
TST

JMACRO FOR BASE IN COMMAND
sunxx MACRO EXPANSION wanx

011516

JSR

;DMR-11 MODE

I 2 %

;MACRO FOR CONTROL
PC,

$CNTIN

.WORD

ESCAPE

000001

002360

MOV

TST

004737

012274

TRAP

CSESCAPE

L10057~.

sxwan MACRO EXPANSION wxan

cCALL CONTROL IN ROUTINE WITH DEFAULT
JSEL6 = FULL DUPLEX, RUN MODE, 1 SEC START.
L 2

3 1

TRAP

CSESCAPE

WORD
L10057-.
sINHIBIT CONTROL OUT ERROR REPORTING AGAIN.
BA/CC

032176

CSESCAPE

L10057-.

;IF ERROR, BR TO TEST END.

#CNTRL ,ERROR

. WORD

.WORD
IN (FULL DUPLEX)

:"‘.*

032164
032164
032166
032170

TRAP

. CALL BASE IN ROUTINE WITH DEFAULTS
cSET LINE UNIT LOOP
;BASE TARBLE ADDRESS

;IF ERROR, BR TO TEST END.

CNTRIN

032156
032162

;IF ERROR, BR TO TEST END.

BASE IN

011262

L 2 4

:fi"*fi

032176

TRAP
.WORD
.WORD

JCLEAR RDO AND THE COMMAND BITS
;ALLOW ERROR REPORTING

"‘.“

032134
032134
032136
032140

EMGS8
ERRGZ

IN REC.

COMMAND WITH NXM

ADDR = 760000 AND A CHARACTER COUNT = 3.

BACCIR

160000, 81T15'BIT14'RCOUNT

JSR

PC,

$BACC

;exxx MACRO EXPANSION swxx

SCALL BA/CC IN ROUTINE

NN o e S
o e
o o
s N
e W

e
ad e

133

00 N

—

PN N NN NN

(ALY,]
PN NN

— e
d

CZDMIAOC DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA. P11

032202
032204
032206

30A(1052)

3-MAR-80

09:36

I 10

PAGE 2-102

TES T 9 - NON-EXISTENT MEMORY ERROR

000044

.WORD
.WORD
.WORD

160000
140044

RQ]'BACCR
;BA/CC IN RECEIVE COMMAND
160000
;BUFFER ADDRESS BITS 0-15

BIT1S!BIT14!RCOUNT
;'.*Q

032210
032210
032214
032216
032220

BACCIT

004737

012274

JSR

002512
000044

SEQ 0125

:BA BITS 16717 AND CHAR. COUNT
12 2

JBA/CC IN XMIT

PC,

$BACC

suaxan MACRO EXPANSION wxex
. CALL BA/CC IN ROUTINE WITH DEFAULTS

.WORD

RQ]'BACCT

.WORD

TCOUNT

.WORD

TBUF

;BA/CC IN TRANSMIT COMMAND

;s TRANSMIT BUFFER ADDRESS

;TRANSMIT CHARACTER COUNT
:fifi'fi

032222
032222
032226

004737
000001

010266

032230
032236
032240
(32240
032242
032244

032777
001005

000001

032306
032306
032306
032310
032310

JSR

PC,

BIT

#CNTRL ,@SEL?2
10%
8 ,EMG8,ERRG?

SWAIT

.WORD

;WAIT FOR RDO
sxxae MACRO EXPANSION txnx
sCALL WAIT ROUTINE

JFLAG THAT WE'RE WAITING FOR RDO

032320

L3 8

8 4

;1S THERE A CONTROL OUT REPORTED ?
;IF YES, PROCEED.
cEXPECTED CONTROL OUT

000400

147760

.WORD

20%

JEXIT

BIT

ANXM,QSELS

;1S

ERRDF

9.,EMG9,ERRG?

JUNEXPECTED CONTROL OUT RECEIVEDTRAP

20%

JIF

THE NXM FLAG SET?

000011
020136
015070
042777
005037

000207
002360

147734
ENDSUB

BIC
CLR

#RDO.CMD,aSEL?

ERROR

CSERDF
8
EMGB
ERRGZ

YES - ERROR REPORFED CORRECTLY

;CLEAR RDO AND

THE

.WORD
.WORD
.WORD

CSERDF
9
EMGY
ERRGZ2

TRAP

C$ESUB

TRAP

cs8suB

COMMAND BITS.

JENABLE ERROR REPORTING

L10061:

104403
BGNSUB

19.3:

104402

CLEAR

004737

011064

JSR

PC,

$MSCLR

JMACRO FOR MASTER CLEAR
cvxxx MACRO EXPANSION sxxx
;ISSUE A DMR MASTER CLEAR
"fifii'

032314
032314
032316
032320

3 4

TRAP
.WORD
.WORD

000010
020072
015070
000410

104455

032272
032272
032300
032304
032304
032304

RDO

ERRDF

104455

032777
001004

032270

WAIT

L 2 8

;fi*ifi

147776

ESCAPE

104410

TST

;IF

000154

011262

JSR

ERROR, BR TO TEST END.

TRAP

.WORD

BASE IN

004737

ANRK

PC,

$BASEI

JMACRO FOR BASE IN COMMAND
sxxxx MACRO EXPANSION *xx»
sCALL BASE IN ROUTINE WITH DEFAULTS

($ESCAPE

L10057-.

CZDMIAO DMR~11 FUNCTIONAL TEZTS MACY11
CZDMIA.P11
13-MAR-80 09:34
(1)
(1)
(1)

032324
032326
032330

004000
002630
000522

5868
5869
(3)
(3)
5870

032332
032332
032334
032336

104410
000136

(1)

032336
032342

004737
000000

5871
5872
(3)
(3)
5873

032344
032344
032346
032350

104410
000124

(1)
(1)
(1)

032350
032354
032356
032360

004737
000044
002562
000044

5874
5875
(3)
(3)
2236

032362
032362
032364
032366

104410
000106
012737

)
(1)
1)

(1)
(1)

(1)

011516

BACCIR
012274

ESCAPE

000001

032406

g};

032406
032412

004737
000001

010266

5883
5884
5885
(4)
(5)
(5)
(5)
5886
5887
5888
5889

032414
032422
032424
032424
032426
032430
032432
032434
032436
032436
032444

032777
001005

000001

(1)
(1)

JSR

002360

012274

147612

104455
000010
020072
015070

000410

032777
001004

JSET LINE UNIT LOOP
sBASE TABLE ADDRESS
;DMR-11 MODE
JRRRS

000400

147574

108
:

SEQ 0126

TST

;IF ERROR, BR TO TEST END.

PC, SCNTIN
.WORD
O

surtex MACRO EXPANSION xxwx
cCALL CONTROL IN ROUTINE WITH DEFAULT
JSEL6 = FULL DUPLEX, RUN MODE, 1 SEC START.

TST

:IF ERROR, BR TO TEST END.

TRAP
.WORD
;JMACRO FOR CONTROL IN (FULL DUPLEX)

JRARR

CSESCAPE
L10057-.

12322

;BA/CC IN RCV

TRAP
.WORD

C$ESCAPE
L10057-.

sexnx MACRO EXPANSION wwwx
PC, $BACC
.CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI!BACCR
;BA/CC IN RECEIVE COMMAND
.WORD
RBUF
JRECEIVE BUFFER
.WORD
RCOUNT
RECEIVE CHARACTER COUNT
IRRRN

5882

000040
160000
1460007

JSR

ESCAPE

032374

032400
032402
032404

LPLU
BASE
DMR

CNTRIN

(1)

(1)
(1)
(1)
(1)
5881

.WORD
.WORD
.WORD

ESCAPE

032374

004737

J 10

13-MAR-80
09:36
PAGE 2-103
TEST 9 - NON-EXISTENT MEMORY ERROR

5878
5879
5880
)

30A(1052)

NRRR

TST

;1F ERROR, BR TO TEST END.

MOV

#CNTRL ,ERROR

LWORD
L10057-.
JINHIBIT CONTROL OUT ERROR REPORTING AGAIN.

BACCIT

;BA/CC IN XMIT COMMAND WITH NXM BUFFER
;ADDRESS (760000) AND A CHAR. COUNT =1
160000,BIT15!'BITi4!1

JSR

PC, $BACC

1CALL BA/CC IN ROUTINE

WAIT

RDO

;WAIT FOR RDO TO BE SET.

JSR

PC, SWAIT
.WORD
1

sxnxxx MACRO EXPANSION xxxx
;CALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDO

BIT
BNE
ERRDF

H#CNTRL ,@SEL2
108
8,EMG8,ERRGZ

.WORD
.WORD
.WORD

TRAP

CSESCAPE

senxx MACRO EXPANSION xanw

RQI'BACCT
,BA/CC IN TRANSMIT COMMAND
160000
;BUFFER ADDRESS BITS 0-15
BIT15!BIT14!1
;JBA BITS 16 € 17 AND CHAR. COUNT
IRRRR
Ty

MR N

KARK

20%

;IS THERE A CONTROL OUT REPORTED ?
;IF YES, PROCEED.
SJEXPECTED CONTROL OUT
TRAP
.WORD
.WORD
.WORD
JEXIT

BIT
BNE

ANXM,QSEL 6
20%

;IS THE NXM FLAG SET?
sIF YES = ERROR REPORTED CORRECTLY

CSERDF

8
EMG8
ERRGZ2

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA.P11
5890
(4)
(5)

(9
(5)

032446
032446
032450
032452
032454
032456

032470
032470
032472
032472
032472

30A(1052)

13-MAR-80

K 10
PAGE 2-104

TEST 9 - NON-EXISTENT MEMORY ERROR

ERRDF

104455
000011
020136
015070

042777
005037

09:36

9,EMG9.ERRG2

SEQ 0127

;UNEXPECTED CONTROL OUT RECEIVED
TRAP

.WORD
.WORD
.WORD

000207

002360

147550

BIC
ENDSUB

CLR

#RDO! CMD,&SEL2
ERROR

;CLEAR RDO AND THE COMMAND BITS.
JDON'T

[NHIBIT CONTROL OUT ERRORS

L10062:

104403

ENDTST

L10057:

104401

.SBTTL

(SERDF

TRAP

(SESUB

TRAP

CSETST

TEST 10 - TIME OUT ERROR

tttttttttttttttttttt*ttttttt*t*tttttttttttttttttt*tttttt*ttttttttttfit

I
TEST
10 - DMR-11
i* TIME OUT - FORCE A TIMEOUT AND VERIFY THAT THE ERROR IS REPORTED
tttttttttttttttt*tt**t"*tt*tttttttttttttt*tttttt*ttt*ttttttttttttttt

032474

BGNTST

032474
032474

032474

CLEAR

004737

011064

JSR

;MACRO FOR MASTER CLEAR

PC,

SMSCLR

txxxx MACRO EXPANSION wwww

SISSUE A DMR MASTER CLEAR

;tttt

032500
032500
032502
032504

104410
0C0172

032504
032510
032512
032514

004737
004000
002630
000522

ESCAPE

TST

T10::

;IF

L 2 2

2 4

ERROR, BR TO TEST END.
TRAP

.WORD

BASEIN

011262

JSR

PC, $BASEI
WORD
LPLU
.WORD
BASE
.WORD
DMR

:MACRO FOR BASE IN COMMAND
saxxn MACRO EXPANSION wwwsw
*CALL BASE IN ROUTINE WITH DEFAULTS
:SET LINE UNIT LOOP
:BASE TABLE ADDRESS
:DMR-11 MODE
;tttt

122 81

;SET THRESHOLD VALUES AS FOLLOWS:

:BSEL4 = NAKS RECEIVED (377)
*BSELS = NAKS TRANSMITTED (377)
*BSEL6 = REP/SEL SENT (1)
032516

032516

004737

012064

-BSEL7

DMRIN

THRESH,177777.177401

JSR

PC, SDMRIN

= NO BUFFFER (377)

sutxsx MACRO EXPANSION saww

:CALL DMR MODE

INPUT ROUTINE

CSESCAPE

L10063-.

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA P
13-MAR-80 09:34

032522
032524
032526

032530
032530
032532
032534

032534

032540
032542
032544

032546
032546
032550
032552

032552
032556

30A(1052)

13-MAR-80

.WORD

177777
177601

.WORD
WORD
ESCAPE

104410
000142

012064

004737
000000

177777
177401

TST

TIMER,0.1

JSR

PC, $DMRIN

ESCAPE

.WORD

TIMER

O
1

TST

JSR

s INPUT COMMAND
JSEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)
;tttt

ESCAPE

104410

004737

012064

;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)
s hkAhAN

032576

TST

DMRIN

WMODEM,0,BIT4

JSR

PC, $DMRIN
.WORD
WMODEM

O
BIT4

012274

JSR

032614
022620
032622
032622

ESCAPE

104410

000062

004737
000001

010266

L2
4 2 4

CSESCAPE
L10063-.

sxxxs MACRO EXPANSION wwxx

;CALL DMR MODE INPUT ROUTINE
s INPUT COMMAND

;SEL4 VALUE (OR BITS TO CLEAR IN BSEL6)
;SEL6 VALUE (OR BITS TO SET IN BSEL6)

JRRAKX

L2.2
8 4

;BA/CC IN XMIT BUFFER

suntn MACRO EXPANSION wxxx

PC, $BACC
:CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI'!BACC T
;BA/CC IN TRANSMIT COMMAND
.WORD
TBUF
s TRANSMIT BUFFER ADDRESS
TCOUNT
.WORD
s TRANSMIT CHARACTER COUNT
TST

WAIT

RDO

JSR

PC,

ESCAPE

TRAP
.WORD

;BLIND THE RECEIVER BY GOING INTO HDX.
;USE WRITE MODEM COMMAND TO SET HALF DUPLEX.

SWAIT

.WORD

TST

;IF ERROR, EXIT

TRAP

;WAIT FOR THE READY OUT.
sxxxx MACRO EXPANSION wwxx

CSESCAPE

.WORD

L10063-.

TRAP

C$ESCAPE

sCALL WAIT ROUTINE
;FLAG THAT WE'RE WAITING FOR RDO
:tt'fi

104410

C$ESCAPE

L10063-.

;CALL CONTROL IN ROUTINE WITH DEFAULT
;SEL6 ~ FULL DUPLEX, RUN MODE, 1 SEC START.

;IF ERROR, BR TO TEST END.

BACCIT

004737

TRAP

sensx MACRO EXPANSION wxww

SwkkKk

032610
032610
032612
032614

1 2. 2.24

sMACRO FOR CONTROL IN (FULL DUPLEX)
PC, SCNTIN
WORD
O

C$ESCAPE

sCALL DMR MODE INPUT ROUTINE
; INPUT COMMAND

.WORD

.WORD
.WORD

032576

TRAP

sunten MACRO EXPANSION #wxx

000112

032564

032564
032570
032572
032574

.WORD
L10063-.
;SET REP/SEL TIMER TO MINIMUM (100 MSECS)

s RRRN

032560
032560
032562

L4 2

;IF ERROR, BR TO TEST END.

CNTRIN

011516

SEQ 0128

;1F ERROR, BR TO TEST END

.WORD
.WORD

000124

PAGE 2-105

THRESH

DMRIN

000000
000001

104410

L 10

TEST 10 -~ TIME OUT ERROR

000013

004737
000012

09:36

;IF ERROR, EXIT.

L& &

CZDMIAQO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.PIN
13-MAR-80 09:34
(3)
5941

032624
032626

5943

032636

5942

032634

(4)
(5)
(5)
(5)
5944
5945
5946
5947
5948
(4)
(5)
(5)
(5)
5949
5950

032636
032640
032642
032644
032646
032650
032650
032656
032660
032660
032662
032664
032666
032670
032670

(1)

032670

5951
5952
(3)
(3)

032674
032674
032674

5953
5954

000050
032777
001005

000001

30A(1052)

147400

032777
001004

000002

147362

10%:

104455

000011
020136
015070

004737

20$:

SRR

5960
5961

S
;%

ggg%

5967
5968
(3)
(3)
5969
)
(1)
(1)
(1)
(1)
1)

5970

8.,EMu8 ,ERRG2

JEXPECTED A CONTROL OUT.

208

JEXIT

BIT
BNE
ZRRDF

#TOUT ,QSEL6
20%
9,EMG9,ERRG?Z

JWAS THE TIME OUT REPORTED?
JIF YES, EXIT
JUNEXPECTED ERROR.

108

PC, SHALT

%
. %

.WORD

L10063-.

TRAP
.WORD
.WORD
.WORD

CSERDF
8
EMG8
ERRGZ

;IF YES, PROCEED.

TRAF

C$ERDF

.WORD
.WORD
.WORD

9
EMG9
ERRG?

TRAP

CPETST

sunxxk MACRO EXPANSION waxx

;DMR HALT ROUTINE.
IRRKK

L1222

L10063:

1044601

5959

ERRDF

ENDTST

.SBTTL

(1
(1)

IS THIS A CONTROL OUT

JSR

5955
5956
gggg

5964
5965
(3)
5966

#CNTRL ,aSEL?2

SHUTDN

012560

SEQ 0129

BIT
BNE

104455
000010
020072
015070
000410

M 10
13-MAR-80 09:36 PAGE 2-106
TEST 10 ~ TIME OUT ERROR

TEST 11 - MESSAGE TOO LONG ERROR
KRR N AR R AR AR AN A

AR NN AN AN R AN RRARR AR AR R A RN KRR ANRARNNANAARNR

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.

Ettttttttttttttttttttttttttttt*tttt*ttttttttttitttttttttt*ttttttttittt
BGNTST
T11::
CLEAR
;MACRO FOR MASTER CLEAR

032676
032676
032676
032676

004737

032702
032702
032704
032706

104410
000150

032706
032712
032714
032716

004737
004000
002630
000522

011064

JSR

PC, $MSCLR

ESCAPE

TST

BASEIN
011262

JSR

PC, $BASEI]
WORD
LPLU
.WORD
BASE
.WORD
DMR

sanxx MACRO EXPANSION *aax
;ISSUE A DMR MASTER CLEAR

JRRKK

1 33 31

;IF ERROR, BR TO TEST END.

TRAP
WORD

JMACRO FOR BASE IN COMMAND
sanan MACRO EXPANSION %rxx
;CALL BASE IN ROUTINE WITH DEFAULTS

JSET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE

JERAR

Antn

CSESCAPE
L10064~.

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

CZOMIA.P1

5971
(3)
(3)
5972
(1)
(1)
(1)
1)

5973
5974
(3)
(3)
5975
)
(1)
(1)
(1)
(1)
M

5976
5977
5978
5979
5980
1)
(1)
(1)
(1)
(1)
1)

5981
5082
(1

032720
032720
032722
032724

104410
000132

032724
032730

004737
000000

032732
032732
032734
032736

104410
000120

032736
032742
032744
032746

004737
000044
002562
000022

032750

N 10
PAGE 2-107

TEST 11 - MESSAGE TOO LONG ERROR

ESCAPE

TST

CNTRIN
011516

012274

012737

000001

;IF ERROR, BR TO TEST END.

TRAP
.WORD
JMACRO FOR CONTROL IN (FULL DUPLEX)

032756
032762
032764
032766

sanas MACRO EXPANSION *wwx
JCALL CONTROL IN ROUTINE WITH DEFAULT
;SEL6 = FULL DUPLEX, RUN MODE, 1 SEC START.
RN
ANRR

ESCAPE

TST

oIF ERROR, BR TO TEST END.

MOV

BACCIT
004737
000040
002512
000044

012274

JSR

032770
032770

5983
(3)
(3)
5984
5985
5986
(4)
(5)

032776
032776
033000
033002
033010
033012
033012
033014

5987
5988
5989
5990
5997
5992

033022
033024
033024
033032
033034
033034

033016
033020

033034
033036
033040
033042

10%:
004737
000001

010266

RBUF,RCOUNT/Z2

TRAP
CSESCAPE
.WORD
L10064~.
JSET UP THE RECEIVE BUFFER WITH 1/2 BUF. SPACE

sxnxx MACRO EXPANSION wwxxx
PC, $BACC
.CALL BA/CC IN ROUTINE
.WORD
RQI!BACCR
;BA/CC IN RECEIVE COMMAND
.WORD
RBUF
;BUFFER ADDRESS BITS 0-15
.WORD
RCOUNT/2
;BA BITS 16/17 AND CHAR. COUNT

#CNTRL ,ERROR

s*xxx MACRO EXPANSION xxxw
PC, $BAC(C
.CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI'BACCT
;BA/CC IN TRANSMIT COMMAND
.WORD
TBUF
;TRANSMIT BUFFER ADDRESS
. WORD
TCOUNT
;TRANSMIT CHARACTER COUNT
IRRRK

WAIT
JSR

ESCAPE
000001

147224

8IT
BNE
ERRDF

104455
000010
020072
015070

000410

032777
001004
104455
000011
020136
015070

000020

147206

30%:

12224

;THIS FLAG WILL DISABLE ANY CONTROL OUT ERROR
;REPORTING BECAUSE WE ARE INTENTIONALLY
;CAUSING ONE IN THIS TEST.
JBA/CC IN XMIT COMMAND

RDO
PC., SWAIT
.WORD
1

TST
#CNTRL ,@SEL?2
208
8.,EMG8 ,ERRGZ

JWAIT FOR RDO TO BE SET

sxxnx MACRO EXPANSION wxxx

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

104410
000054
032777
001005

CSESCAPE
L10064~-.

PC, SCNTIN
.WORD
0

JSR

002360

SEQ 0130

JSR

BACCIR

032756

032770
032774

(&)
(5)
(5)
(5)

09:36

JRRRR

(1)
g};

(5)
(5)

13~MAR-80 09:34

13-MAR-80

KRR

oIF RDO NOT SET, BR TO TEST END.
;1S THIS A CONTROL OUT?
;IF YES, PROCEED
JEXPECTED CONTROL OUT.

TRAP
.WORD

C$ESCAPE
L10064~.

TRAP
.WORD
.WORD
.WORD

CSERDF
8
EMG8
ERRGZ

40%

JEXIT

8IT
B8NE

#TOLONG,dSEL6
40%

;1S THE TOO LONG BIT SET?
JIF YES, TEST OK =~ FINISH UP.

ERRDF

9.EMG9,ERRGZ

JWE'RE NOT GETTING EXPECTED RESULT

TRAP
.WORD
.WORD
.WORD

CSERDF
9

EMGS
ERRG?

E%g:%:OP?TR-11

13-MAR-80 09:34

032044
033044
033050

005037

002360

033050

004737

012560

30A(1052)

40%:

8 1
13-MAR-80
09:36
PAGE 2-108
TEST 11 - MESSAGE TOO LONG ERROR

CLR
SHUTDN

ERROR

JSR

PC. $HALT

SEQ 0131

JRESTORE ERROR FLAG TO NORMAL
JHALT THE DMR.

033054
033054
033054

;DMR HALT ROUTINE.

sttt

dsais

ses

szttt

1222222222222%5

TEST 12 - DMR-11

0,8,

%
%

N
W,

%
%
%
*

Ny
Ny
By

CSETST

TEST 12 - PROCEDURE ERRORS

PROCEDURE ERRORS THE FOLLOWING SHOULD CAUSE
A PROCEDURE ERROR:

SUBTEST 1
SUBTEST 2

SUBTEST 3

SUBTEST 4
SUBTEST 5
AR R A

THE DMR-11

TO HALT AND RESPOND WITH

A SECOND BASE IN COMMAND
A CONTROL IN BEFORE A BASE IN

A BA/CC IN BEFORE A BASE IN

A BA/CC IN RCV WITH A BUFFER LENGTH OF 0
A BA/CC IN XMIT. WITH A BUFFER LENGTH OF 0

AR AR R AR AR AN AR AN R AR AN

ARRRNARNRN A ANNN A AN RN

T12::

BGNSUB

T12.1:

104402
CLEAR

004737

011064

JSR

PC,

SMSCLR

033064

BASEIN

004737
004 000

011262

JSR

002630
000522

PC, $BASE]
LWORD
LPLU
.WORD
BASE
.WORD
DMR

000001

002360

MOV

BASE IN

#CNTRL ,ERROR

c$BSUB

1 3. 8 8 1

saxxx MACRO EXPANSION sxwxx
sCALL BASE IN ROUTINE WITH DEFAULTS
;SET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE
sHRAR

012737

TRAP

;MASTER CLEAR MACRO
sxxxx MACRO EXPANSION s+xx
;ISSUE A DMR MASTER CLEAR
;fit*i

033104

TRAP

BGNTST

033060

033076

& 1

L10064:

033064
033070
033072
033074

104401

033060

| 2

ENDTST

.SBTTL

033056
033056
033056
033056
033056

STATE.

Jexax MACRO EXPANSION +xvw

:fi.*.

5993

5994
5995
5996
(1)
(1)
1)
5997
5998
5999
6000
(3)
(3)

FUNCTIONAL TESTS MACY11

L 2

8 4

:THIS FLAG WILL DISABLE ANY CONTROL OUT tRROR

SREPORTING BECAUSE WE ARE INTENTIONALLY
sCAUSING ONE IN THIS TEST.
;SECOND BASE

sutxs MACRO EXPANSION xxxs

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

004737
004000
002630
000522

30A(1052)

011262

cn
13-MAR-80 09:36 PAGE 2-109
TEST 12 - PROCEDURE ERRORS
JSR

PC, $BASE]
.WORD
LPLU

.WORD
.WORD

BASE
DMR

SEQ 0132

;CALL BASE IN ROUTINE WITH DEFAULTS
2SET LINE UNIT LOOP
;BASE TABLE ADDRESS

;DMR-11 MODE

;tt't

004737
000001
033124
033124
033126
033130
033136
033140
033140
033142
033144
033146
033150
033152
033152
033160
033162
033162
033164
033166
033170
033172

033204

033206
033206
033206

010266

RDO

JSR

PC,

SWAIT

.WORD

ESCAPE

104410

000632
032777
001005

000001

14707¢

BIT
ERRDF

104455

000010
020072
015070
000410

032777
001004

001000

147060

BIT

BNE
ERRDF

104455

15T

;WAIT FOR RDO TO BE SET
sensn MACRO EXPANSION wenx

sCALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDO

;t*tt

LA 2

;IF RDO NOT SET, BR TO TEST END.

#CNTRL ,@SEL2

108
8,EMG8,ERRGZ

;IS THIS A CONTROL OUT?

;IF

YES,

042777
005037

TRAP

C$ESCAPE
L10065~.

TRAP

CSERDF
8
EMGS8
ERRGZ2

.WORD

PROCEED.

;EXPECTED CONTROL OUT

.WORD
.WORD
.WORD

15%

JEXIT

#HALTC ,aSEL6

;IS THE HALT - PROCEDURE ERROR BIT SET?

15%
9.EMGY,ERRGZ

;IF YES =~ ERROR REPORTED CORRECTLY
JUNEXPECTED CONTROL OUT RECEIVED

TRAP

000011
020136
015070

. WORD
.WORD
.WORD

000207
002360

147034

8IC
ENDSUS

(LR

#RDO!CMD,QSEL?2

ERROR

CSERDF
9
EMG9
ERRGZ2

JCLEAR RDO AND THE COMMAND BITS
+RESTORE FLAG
L10066:

104403

C$ESUB

TRAP

($8suB

BGNSUB

T12.2:

104402

033210

WAIT

L2 2

CLEAR

004737

011064

JSR

sMASTER CLEAR MACRO

PC,

$MSCLR

srxex MACRO EXPANSION wwww

;ISSUE A DMR MASTER CLEAR

:t**t

033214

012737

000001

033222

005037

002260

002360

MoV

#CNTRL ,ERROR

(LR

DMRFL
G

L 2.8 8

;THIS FLAG WILL DISABLE ANY CONTROL OUT ERROR
;REPORTING BECAUSE WE ARE INTENTIONALLY
sCAUSING ONE IN THIS TEST.
;CLEAR FLAG THAT IS SET IN BASEIN IN ORDER

;TO FLAG THAT A CONTROL OUT-DMR RUN MODE

;COMMAND IS EXPECTED (THIS FLAG WAS SET IN

033226
033226

;THE PREVIOUS SUBTEST BASEIN)

CNTRIN

004737

011516

JSR

;CONTROL IN
PC,

$CNTIN

saxnk MACRO EXPANSION #xxw

sCALL CONTROL

IN ROUTINE WITH DEFAULT

CZDMIAO DMR-11 FUNCTIONAL TECTS MACY11
CZDMIA.P11
13-MAR-80 09:34
(1)
(1)

6059
6060
(1)
(
(
(

033232

30A(1052)

0D 11
13-MAR-80 09:36 PAGE 2-110
TEST 12 -~ PROCEDURE ERRORS

000000

.WORD

JSEL6 - FULL DUPLEX, RUN MODE,
:'*tfl

033234
033234
033240

033242
033242
033244
033246
033254
033256

004737
000001

010266

104410
000514
032777
001005

000001

146760

104455
000010
020072
015070
000410

001000

146742

104455
000011
020136
015070

042777
005037

033324
033324
033324

000207
002360

146716

15%:
ENDSUB

JSR

PC, SWAIT
.WORD
1

ESCAPE

TST

)

)
)
)
;

#CNTRL ,aSEL2

ERRDF

8,EMG8,ERRG?2

108

JEXIT

BIT

AHALTC,aSEL6

;1S

ERRDF

9.,EMG9,ERRGZ

ERROR

TRAP

CSERDF
8
EMG8
ERRGZ

YES - PROCEED.

15%

#RDO.CMD,aSELe

CSESCAPE
L10065~.

JEXPECTED CONTROL OuT

15%

TRAP

.WORD

;1S THIS A CONTROL ouT?

;IF

.WORD
.WORD
.WORD

THE HALT - PROCEDURE

ERROR BIT SET?

cIF YES - ERROR REPORTED CORRECTLY
H UNEXPECTED CONTROL OUT RECEIVED

TRAP
.WORD

CSERDF

.WORD
.WORD

EMGS
ERRG2

TRAP

C$ESUB

TRAP

($8suB

CLEAR RDO AND THE COMMAND BITS.
: RESTORE FLAG

BGNSUB
T12.3:

104402
CLEAR

004737

011064

JSR

PC.,

SMSCLR

MASTER CLEAR MACRO
xxsx MACRO EXPANSION swxxx
ISSUE
A DMR MASTER CLEAR
:

012737

000001

002360

MCV

#CNTRL ,ERROR

BACCIR

004737
000044
002562
000044

012274

JSR

PC., $BACC
_WORD
"WORD
"WORD

: CALL BA/CC IN ROUTINE WITH DEFAULTS
RQI'BACCR
;BA/CC IN RECEIVE COMMAND
RBUF
sRECEIVE BUFFER
RCOUNT
JRECEIVE CHARACTER COUNT
c kN

WAIT

RDO

L 4 88

sTHIS FLAG WILL DISABLE ANY CONTROL OUT ERROR
sREPORTING BECAUSE WE ARE INTENTIONALLY
CAUSING ONE IN THIS TEST.
BA/CC IN RCV. COMMAND
wxxx MACRO EXPANSION xaxx

033352

12 2

L10067:

033340
033340
033344
033346
033350

1 SEC START,

;FLAG THAT WE'RE WAITING FOR RDO

L 8.2 &

033332

% ]

;1F RDO NOT SET, BR TO TEST END.

BIT

BIC
CLR

(2 3

JWAIT FOR RDO TO BE SET
suntr MACRO EXPANSION *awnw
JCALL WAIT ROUTINE

104403

033326

RDO

;t*fit

032777
001004

033322

WAIT

SEQ 0133

L. 8.8
& 1

;WAIT FOR RDO TO BE SET
saxxx MACRO EXPANSION *xax

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY1
CZDMIA. P
13-MAR-80 09:34
1)
(1)
1)

€085
(3)
(3)

033352
033356

004737
000001

30A(1052)

010266

13-MAR-80 09:36 PAGE 2-111
TEST 12 - PROCEDURE ERRORS
JSR

PC,

ESCAPE

TST

SWAIT

WORD

SEQ 0134

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

104410

000376
032777
001005

000001

146642

BIT
BNE
ERRDF

104455
000010
020072

015070

000410
032777
001004

001000

146624

005037

8IT

ERRDF

104455
000011
020136
015070

042777

10%:

000207
002360

146600

15%:

BIC
CLR

ENDSUB

;IF RDO NOT SET, BR TO TEST END.

#CNTRL ,@SEL2

108

8.EMG8,ERRG?

;IS THIS A CONTROL OUT?

;IF

TRAP

.WORD

CS$ESCAPE
L10065~.

TRAP
.WORD
.WORD
.WORD

C$ERDF
8
EMG8
ERRGZ

YES - PROCEED.

;EXPECTED CONTROL oOuT

158

JEXIT

NHALTC,aSEL6

;IS THE HALT - PROCEDURE ERROR BIT SET?
;IF YES
-~ ERROR REPORTED CORRECTLY
JUNEXPECTED CONTROL OUT RECEIVED

15%
9.EMGY,ERRG2

#RDO! CMD,aSEL2

ERROR

CSERDF
9

TRAP
.WORD
.WORD
.WORD

EMG9
ERRGZ

TRAP

CeESLB

TRAP

cs8suB

TRAP

CSESCAPE
L10065~.

;CLEAR RDO AND THE COMMAND BITS.
JRESTORE FLAG
L10070:

104403

BGNSUB
T12.4:

104402
(LEAR

004737

011064

JSR

;MASTER CLEAR

PC.,

$MSCLR

saxxx MACRO EXPANSION w*xnx

;ISSUE A DMR MASTER CLEAR

;tttt

ESCAPE

104410

000306

004737
004000
002630
000522

TST

;IF

BASE IN

011262

JSR

ERROR,

x kKK

EXIT.

;BASE IN COMMAND

PC,

$BASEI

.WORD
.WORD
.WORD

LPLU
BASE
DMR

suaxxx MACRO FEXPANSION xxxx
;CALL BASE IN ROUTINE WITH DEFAULTS

sSET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE

;tti*

ESCAPE

104410

000270

BACCIR

012274

002562

JSR

.WORD

TST

;IF

ERROR,

1. 2.8 8

EXIT.

TRAP

.WORD
JASSIGN A BA/CC IN RECEIVE BUFFER
sanax MACRO EXPANSION #aww
PC, $BACC
; CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQI!BA(C(R
;BA/CC IN RECEIVE COMMAND
.WORD
RBUF
JRECEIVE BUFFER
'

CSESCAPE
L10065~.

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACYT1
CZDMIA.P11
13-MAR-80 09:34

é};

033502

033516

1)
(1)
(1)

033516
033522
033524
033526

(1)

6113
6114
Q)
(1)

033504
033504
033506
033510

000044

104410
000252
012737

004737
000040
002512
000000

033530

6115

033536

004737

000001

033536
033540
033542

104410
000220
032777
001005

(4)
(5)
(5)
(5)
6119
6120
6121
6122

033552
033554
033556
033560
033562
033564
033564
033572

104455
000010
020C’
015070
000410

032777
001004

(4)
(5)
(5)
(5)

033574
033576
033600
033602

104455
000011
020136
015070

6123

033550
033552

033574

6124
6125
6126
6127
(3)
6%3&

033604
033604
033612
033616
033616
033616

6129
(3)
(3)
6130
1)
E};

033620
033620
033620
033622

6131

ESCAPE

000001

002360

012274

RCOUNT

033622

042777
005037

010266

00001

001000

000207
002360

146464

#CNTRL ,ERROR

BACCIT

TBUF,0

.
146446

146422

10%:

15%:

ENDSUB

RECEIVE CHARACTER COUNT

RDO

JSR

PC,

ESCAPE

TST

SWAIT

.WORD

#CNTRL ,aSEL?2
10$
8.EMG8,ERRG2

sxxnex MACRO EXPANSION wwww
cCALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDO
- AhK Kk

ARAR

;1F RDO NOT SET, BR TO TEST END.
;IS THIS A CONTROL 0UT?
;IF YES - PROCEED.
JEXPECTED CONTROL OUT

TRAP
.WORD

C$ESCAPE
L10065~-.

TRAP
.WORD
.WORD
.WORD

C$ERDF
8
EMG8
ERRGZ2

15%

JEXIT

BIT
BNE
ERRDF

HHALTC ,dSELG
15%
9.EMG9,ERRG?2

1S THE HALT - PROCEDURE ERROR BIT SET?
JIF YES - ERROR REPORTED CORRECTLY
SUNEXPECTED CONTROL OUT RECEIVED

8IC
CLR

A#RDO!CMD,@SELZ2
ERROR

112.5:

JSR

JMASTER CLEAR
PC, $MSCLR

TRAP
.WORD
.WORD
.WORD

CSERDF
9
EMG9
ERRG?2

TRAP

($ESUB

TRAP

($B8SUB

;CLEAR RDO AND THE COMMAND BITS.
JRESTORE FLAG
L10071:

CLEAR
011064

KRAkK

JWAIT FOR RDO TO BE SET

BGNSUB

004737

'TT2

TRAP
CSESCAPE
.WORD
L10065-.
sTHIS FLAG WILL DISABLE ANY CONTROL OUT
;ERROR REPORTING BECAUSE WE ARE INTENTIONALLY
;CAUSING ONE.
JASSIGN A BA/CC IN XMIT BUFFER LENGTH = 0.

104403

104402

SEQ 0135

sxxxx MACRO EXPANSION wwnx
PC, $BACC
.CALL BA/CC IN ROUTINE
.WORD
RQI!BACCT
JBA/CC IN TRANSMIT COMMAND
.WORD
TBUF
;BUFFER ADDRESS BITS 0-15
WORD
O
JBA BITS 16 & 17 AND CHAR. COUNT

WAIT

8IT
BNE
ERRDF

)

v ;IF ERROR, EXIT.

TST

MOV

JSR

033530
033534

6117
6118

.WORD

JNRRR

g};

(3)
(3)
6116

F 11
13-MAR-80
09:36 PAGE 2-112
TEST 12 - PROCEDURE ERRORS

6107
6108
(3)
(3)
6109
611C
6111
6112
)
(1)

30A(1052)

svxxx MACRO EXPANSION *wnx
;1SSUE A DMR MASTER CLEAR
‘RN N

NN
N

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMiA P
13-MAR-80 09:34

033626
033626
033630
033632

000112

011262

JSR

ESCAPE

o D

000001

00236C

e
o o =2 O N N

PC, $BASE]
.WORD
LPLU
. WORD
BASE
.WORD
DMR

004737
000044
002562
000000

T37

N N

TRAP

. WORD

BACCIR

RBUF ,0

012274

JSR

PC,

| 2

ERROR,

;THIS

FLAG WILL

TRAP
DISABLE

033670
033674

033676
033676
033700
033702
033710
033712
033712
033714
033716

033720
033722
033724
033724
033732
033734
033734
033736
033740
033742
033744
033744
033752
033756
033756
033756

004737
000001

010266

$BA(C

JSR

PC,

RBUF

ESCAPE

TST

SWAIT

.WORD

000001

146324

BIT

ERRDF

104455
000010
020072
015070
000410

032777
001004

JBA BITS 16/17 AND CHAR.

L 2

#CNTRL ,aSEL2

108
8.EMG8,ERRG?

COUNT

;WAIT FOR RDO TO BE SET
Jxwnx MACRO EXPANSION wwxx
;CALL WAIT ROUTINE

;FLAG THAT WE'RE WAITING FOR RDO
;IF

oIS

| 2

RDO NOT SET,

8 1

BR TO TEST END.

.WORD

THIS A CONTROL 0OUT?

15%

001000

146306

8IT

AHALTC ,aSELG

ERRDF

9.,EMG9,ERRGZ

15%

000207
002360

146262

BIC
ENDSUB

ARDO! (MD,aSELZ2

ERRGR

CSESCAPE

L10065-.

JIF YES - PROCEED.
JEXPECTED CONTROL OUT

.WORD
.WORD
.WORD

JEXIT
;IS

;IF

THE HALT - PROCEDURE

ERROR BIT

YES - ERROR REPORTED CORRECTLY

JUNEXPECTED CONTROL OUT RECEIVED

020136
015070

104403

TRAP

104455
000011

042777
005037

OUT

;BA/CC IN RECEIVE COMMAND

;BUFFER ADDRESS BITS 0-15

"'**Q

104410
000069
032777
001005

CONTROL

CSESCAPE

L10065-.

JASSIGN A BA/CC IN REC. BUFFER LENGTH = 0

.WORD
RDO

ANY

.WORD

Junnn MACRO EXPANSION wwxx
cCALL BA/CC IN ROUTINE

RQJI !BACCR

WAIT

3 |

EXIT.

;"fi'

033670

JERROR REPORTING BECAUSE WE ARE INTENTIONALLY
s CAUSING ONE.

.WORD

C$ESCAPE

L10065~.

sxwax MACRO EXPANSION txne
;CALL BASE IN ROUTINE WITH DEFAULTS
JSET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR~-11 MODE
;IF

b
RS G GRS 2

NN N N

ERROR, EXIT.

<BASE IN COMMAND

#CNTRL ,ERROR

012737

033656
033662
033664
033666

;IF

BASE IN

104410

033656

o
D

TST

SEQ 0136

"'...

oonor o

e =D — —

000130

004737

G 11
13-MAR-80 09:36 PAGE 2-113
TEST 12 - PROCEDURE ERRORS
ESCAPE

104410

004000
002630
000522

(030
Loy
D nd N NN PN N N md

wwwr.a_a_a_a_a_lww
&W
\‘gvvm
N2 s N s N

6132
(3)

30A(1052)

;CLEAR RDO AND

JRESTORE FLAG

THE

CS$ERDF

8
EMGS8
ERRGZ

SET?

TRAP

(SERDF

.WORD
.WORD
.WORD

9
EMGO
ERRG?Z

TRAP

CSESUB

COMMAND BITS.

L10072:

CZDMIAQ DMR-11 FUNCTIONAL TEZTS MACY11
13-MAR-80 09:34
CZDMIA.P11
(3)
(3)
6157
6158
6159
6160
6161
6162
6163
6164
6165

033760
033760
033760

L10065:

.SBTTL
RN AN RN AR AR

AR AR

R RN R R R R AR AR AR NN NN ANNNNNANNNNARRRARR
AR AR AR R
AR
R

FREE RUNNING FLAG MODE DATA TEST
TRANSMIT A MESSAGE AND VERIFY THE RECEIVED DATA

033772
033776
033776
034000
034002

AN R R

AN AN N RN R RN NN ARNARRREARNNN RN NRN RN RN AR

BGNTST

013700
062700
012701

000044
000002
002562

105021

LJ0s:

T13::

RCOUNT ,RO

;BYTE COUNT FOR RECEIVE BUFFER

MOV

#RBUF ,R1

JUSED FOR DELIMITOR
;ADDRESS OF RECEIVE BUFFER

CLRB
DEC

BNE

(R1)+
RO
108

;CLEAR A BYTE IN THE BUFFER
;CONTINUE = UNTIL ENTIRE BUFFER DONE
;CLEAR TRANSMIT FLAG
:CLEAR RECEIVER FLAG
:MACRO FOR MASTER CLEAR

MOV
ADD

#2.R0

034004
034010
034014

002510
002560

(LR
CLR

TFLAG
RFLAG

034014

0110¢4

JSR

PC,

CLEAR

b cd —d

N
"

JSR

— emd

:9\,\—\.~&gffgiogg

oo
o

011262

SMSCLR

;2 ADDITIONAL BYTES AT END OF BUFFER ARE

sxwax MACRO EXPANSION *##+

:ISSUE A DMR MASTER CLEAR

TST

ESCAPE

;MACRO FOR BASE IN COMMAND

PC, $BASEI
.WORD
LPLU
.WORD
BASE
.WORD
DMR
ST

TRAP

.WORD

sCALL BASE IN ROUTINE WITH DEFAULTS
;SET LINE UNIT LOOP
;BASE TABLE ADDRESS

;DMR-11 MODE

TRAP

WORD

JSR

PC,

ESCAPE

TST

SCNTIN

.WORD

CSESCAPE

L10073-.

saxxx MACRO EXPANSION *wwx»

;IF ERROR, BR TO TEST END.

CNTRIN

011516

LA £ 2

;IF ERROR, BR TO TEST END.

;ttti

b
md

CORRECT.

CARRANANRAAR
A AN
A AR

033762
033762
033762
033766

BASE IN

b ad

;* IN THIiS 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.

ESCAPE

-‘fiUNJNI\-‘fi“\a;-‘f\fiu\t\’\

CSETST

TeEST 13 ~ DMR-11

- %

*
*

TRAP

TEST 13 - DATA TEST

;tttt

SEQ 0137

104401

6166

6167
6168
6169
6170
6171
6172
(3)
6173
6174
6175
6176
6177
6178

H 1

13-MAR-80
09:36
PAGE 2-114
TEST 12 - PROCEDURE ERRORS

ENDTST

8,0,

6156

30A(1052)

;MACRO FOR CONTROL IN (FULL DUPLEX)
saxwx MACRO EXPANSION wxxw

CSESCAPE

L10073-.

sCALL CONTROL IN RCUTINE WITH DEFAULT
;SEL6 - FULL DUPLEX, RUN MODE, 1 SEC START,

;tt't

;IF

LA 8

ERROR, BR TO TEST END.

CZDMIAO DMR-11

CZDMIA. P11

Nt N

d wwd —ad

Nt N
N

b coed
—

N b and d d b d O
8 00~
" " v
e N Luoe

30A(1052)

SEQ 0138

104410

.WORD

034054

;BUFFER ADDRESS/CHARACTER COUNT REC.
;awan MACRO EXPANSION e###

BACCIR

004737
000044
002562

012274

JSR

000044

PC, $BACC
;CALL BA/CC IN ROUTINE WITH DEFAULTS
.WORD
RQ] .BACCR
;BA/CC IN RECEIVE COMMAND
.WORD
RBUF
JRECEIVE BUFFER
-WORD
RCOUNT
;RECEIVE CHARACTER COUNT
;tttt

ESCAPE

104410

TST

JIF

L 2

ERROR

(I.E.

RDI

NOT

SET),

000364

ESCAPE
TRAP

.WORD

BACCIT

004737
000040
002512
000044

CSESCAPE
L10073-.

TRAP

012274

JSR

;BUFFER ADDRESS/CHARACTER COUNT XM]T.
PC,

$BA(CC

.WORD

.WORD
.WORD

Jexnx MACRO EXPANSION w*ex«
JCALL BA/CC IN ROUTINE WITH DEFAULTS

RQI!'BACCT
TBUF
TCOUNT

C$ESCAPE
L10073-.
IN

:BA/CC IN TRANSMIT COMMAND

; TRANSMIT BUFFER ADDRESS
;TRANSMIT CHARACTER COUNT
;t*tt

L 2

NN AN A

I N

13-MAR-80 09:36 PAGE 2-115
TEST 13 - DATA TEST

000402

D e

(o0)

o = D~
o~

034050
034052

FUNCTIONAL TESTS MACY11
13-MAR-80 09:34

(3)

ESCAPE

104410

TST

cIF

ERROR

(I.E.

RDI

NOT

000346

004737
000001

010266

WAIT

RDO

JSR

PC,

SWAIT

.WORD

032777
001405

000001

146106

JFLAG THAT WE'RE WAITING FOR RDO

104455

000011
020136
015070
000541
032777
001035

NN S

005737
001405
104455

146064

52%

cJF ERROR - RDO NOT SET, END TESéCS

BIT
BEQ
ERRDF

#CNTRL ,@SEL2

;IS THIS A CONTROL OUT COMMAND ?

;]F NOT - PROCEED
UNEXPECTED CONTROL oOuT RECEIVEDT
.WORD
.WORD
.WORD

52%

BIT
BNE

#RCV,aSEL2

;TRANSMIT OR RECE]IVE

TFLAG

;IS

10,EMG10,ERRGZ

;ERROR MULTIPLE

40%

;BR FOR RECEIVE

52%

CSERDF
9
EMG9

ERRG2

s CHECK TRANSMIT

A~~~
VNS
=
=

000004

L 2

BERROR

25%
9.,EMG9,ERRG?

C$ESCAPE
L10073-.

;WAIT FOR RDO
suennn MACRO EXPANSION waxx
JCALL WAIT ROUTINE

;tttt

103552

ESCAPF
TRAP

.WORD

20%:

6213

SET),

000012
020165
015070

002510

TST
BEQ
ERRDF

30%

THIS

JYES - 0K

THE

FIRST TRANSMIT DONE?

TRANSMITS

TRAP

.WORD
.WORD
.WORD

CSERDF

EMG10
ERRGZ

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1Y
13-MAR-B0 09:34

6217
6218
6219
6220
6221
6222
(4)
(5)
(5)
(5)

6223
6224
6225
6226
6227

(4)
(5)
(5)
(5)
6228
6229
6230
6231
6232

6233
6234
6235
(4)
(5)
(5)
(5)

6236
6237
6238
6239
6240
6241
(4)
(5)
(5)
(5)

6242
6243
6244
6245
6246
(&)
(5)
(5)
(5)

6247
6248
6249
6250
6251
6252

034170
034172
034172
034200
034206
034210
034210
034212
034214
034216

034220
034222
034222
034230
034232
034232
034234
034236
034240
034242

000525
012737
022777
001405

177777
002512

002510
146030

30A(1052)

308:

104455
000013
020214
015070

000511

022777
001470

000044

146010

32%:

104455
000014
020241
015070
000500

J 1
13-T§R -80 09:36 PAGE 2-116
TEST
- DATA TEST

52%

MOV
cMP
BEQ
ERRDF

#-1,TFLAG

ATBUF ,aSEL4

32%

11.EMG11,ERRG?

52%

CMP
BEQ
ERRDF

#TCOUNT ,QSEL6

50%
12,EMG12 ,ERRG2

SEQ 0139

sFLAG THAT TRANSMIT CHECK IS DONE.
s TRANSMIT BUFFER ADDRESS CORRECT?
¢YES - PROCEED

;BUFFER ADDRESS ERROR

:COUNT CORRECT ?
;YES - PROCEED
s CHARACTER COUNT ERROR

TRAP
.WORD

.WORD
.WORD

EMG11
ERRG2

TRAP

CSERDF
12

.WORD
.WORD
.WORD

52%

CSERDF

EMG12
ERRGZ2

;CHECK RECEIVE

034244
034244
034250
034252
034252
034254
034256

034260

034262
034264
034264
034272
034300
034302
034302
034304
034306
034310

034312
034314
034314
034322
034324

005737
001405

40%:

002560

104455
000015
020267
015070

177777
002562

002560
145736

41%:

104455
000013
020214
015070

034324
034326
0343
034332

104455
000014
020241
015070

034334
034336
034336
034342
034346

000443

012700
012701
012702

41%
13,EMG13,ERRG2

;IS THIS THE FIRST RECEIVE DONE ?

;YES - PROCEED

JMULTIPLE RECEIVES

TRAP

52%

MOV
CMP
BEQ
ERRDF

#-1,RFLAG

#RBUF ,aSEL4

43$
11,EMG11,ERRGZ

.WORD

CSERDF
13

EMG13
ERRG2

sFLAG THAT RECEIVE CHECK HAS BEEN DONE.
;1S THE RECEIVE BUFFER ADDRESS CORRECT?

;YES = PROCEED

;BUFFER ADDRESS ERROR

CSERDF
1

000454

022777
001405

RFLAG

.WORD
.WORD

000470

012737
022777
001405

TST
BEQ
ERRDF

000044

145716

43%:

52%

cMP
BEQ
ERRDF

449

#RCOUNT ,aSEL6

12,EMG12,ERRGZ

EMG11
ERRGZ

;1S THE BUFFER COUNT CORRECT?

JYES = PROCEED

;CHARACTER COUNT ERROR

TRAP

.WORD
.WORD
.WORD

000044
002512
002562

44%:

52%

MOV
MoV
MOV

#RCOUNT
RO
#TBUF ,R1
#RBUF ,R2

;SET JP FOR DATA CHECK (CHARCATER COUNT)

.GOOD DATA POINTER
JRECEIVE DATA POINTER

CSERDF
12

EMG12
ERRG?

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

30A(1052)
45%:

122122

001011
005300
001374
005712
001412
104455
000016
020315
015070
000422

46%:

005737
001002
000137

004737

CMPB
BNE
DEC
BNE
TST

(R1)+,(R2)+

;1S THE DATA THE SAME ?

52;

;CONTINUE CHECKING UNTIL DONE WITH BUFFER.

BEQ
ERRDF

508
16 ,EMG14 ,ERRG2

4L6$

aR2

ERRDF

000213
002560
034110

002510
034110

145614

;IF NOT, BRANCH TO DATA ERROR MESSAGE

;THIS SHOULD BE 0 - REMEMBER WE CLEARED

;2 EXTRA BYTES DURING BUFFER INIT.
:IF OK - PROCEED
;RECEIVED EXTRA DATA

TRAP

15,EMG15,ERRG2

BIC
TST
BNE
JMP

51%:

TST

51%
20%

;YES = SEE IF TRANSMIT DONE
;NO - GO BACK AND DO IT.

TFLAG

;IS THE

20%

:NO - DO IT

TRANSMIT DONE

;YES = BR TO SHUTDOWN

SHUTDN

PC,

CALL

$ERROR

$HALT

saexe MACRO EXPANSION #xxw

;DMR HALT ROUTINE.
JRARR

AANRY

L10073:

A AR R AR N AR

TEST

IN THIS TEST - SEE

:* HAVE

TRAP

TEST 14 - EXTENDED ADDRESSING DATA TEST

AR AR AR

;CHECK BASE TABLE AND REPORT ANY SOFT ERRORS

104401

R A

15
EMG15
ERRG?2

ENDTST

6293

CSERDF

s SHUTDOWN DMR

JSR

.SBTTL

TRAP

ERRG2

CHECK DONE

52%

JMP

012560

14
EMG14

#RDO+RCV+(CMD ,aSEL2 .CLEAR RDO, RCV & COMMMAND BITS (0,1)
RFLAG
;1S THE RECEIVE DONE ? (IF DONE, FLAG = =1)

BNE

52%:

CS$ERDF

LWORD
.WORD
.WORD

.WORD
.WORD
.WORD

TRANSMIT OR RECEIVE

50%:

;DATA ERROR

52%

6267

SEQ 0140

52%

104455
000017
020341
015070
000415

042777
005737
001002
000137

K11
13-MAR-80 09:36 PAGE 2-117
TEST 13 -~ DATA TEST

AN AN A RAA AR AR RN NN NN AN RN R AR

14 - DMR-11
IF WE HAVE MEMORY MANAGEMENT ,

THE MEMORY TO CHECK BITS 16 & 17 IN SEL6.

NN AN RRNNRARNSN NS

SO SEE

THIS wilL

IF WE

ALLOW

CSETST

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.PI1
13-MAR-80 09:34

6297
6298
6299
6300
6301
(3)
6302
6303
6304
(7)
(6)
(5)
(4)
(3)
(2)
6305

6306
6307

(3)
(3)
6308
6309
6310
6311
6312

6313
6314
6315
6316
6317
6318
6319
6320
6321
6322
(3)
(3)
6323
6324
6325
6326

30A(1052)

13-MAR-80 09:36 PAGE 2-118
TEST 14 - EXTENDED ADDRESSING DATA TEST

SEQ 0141

;% US TO TRANSFER DATA USING THOSE EXTENDED ADDRESSING BITS. AS IN
e rggg 13 THE TEST IS NON-INTERRUPT AND INTERNAL (TTL) LOOPBACK IS
v

t
' tt**ttttttttttt'iti'*"ttttfit'tttttttt..i*tttt.'tttt"tttt'tt'ttt't'

BGNTST

034456
034456

034456
036456
034462
034466

034472

034476
034500
034504
034510
034514
034514
034520
034522
034526
034530
034534
034540

034540

034546
034550
034554
034554
034554
034560

LENABL

012746
012746
012746

012746

104437
062706
005037
005737

012700
104436
005737

001404
005037
000137

023727

002002
000137
012700
104441

LSB

ENABLE LOCAL BLCCK = NEEDED BECAUSE OF
OF SYMBOLIC LABELS 'RSEL4'" ETC.

SETVEC #4,#NOXMEM, xpa107 ser UP TRAP VECTOR 4

000340
023512
000004

CLR
ST
CLRVEC

177572

000004

002340

BEQ

002340
036044

002200

036044

000340

6327
g%%g

012701
012700

172300
000010

012721

077406

6330
6331
6332
6333
6334
6335
6336
6337
6338
6339
6340

034576
034600
034602
034606
034610
034616
034624
034632
034640
034646
034654

005300
001374
012701
005011
012761
012761
012761
012761
012761
012761
012761

208

172340

000200
000400
000600
001000
002000
004000
007600

MOV

#3.-(SP)

TRAP

000010
002340

034562
034566
034572
034572

#PRIO7,=(SP)

MOV
MOV

000003

002120

MOV

000002

CLR
JMP

FLAG

108

FLAG
85$

cTMP
BGE
JMP

LSHIMEM, #2200
15$
85$

SETPRI

#PR107

;CLEAR FLAG - SET IF TRAP TO 4.
*ADDRESS MEMORY MANAGEMENT REGISTER.
*RESTORE TRAP VECTOR 4.
MOV
TRAP

;1S

THE

FLAG STILL

CLEARED?

CSSVEC

#10,SP

#4 RO

CSCVEC

INOTE: THE FLAG WILL BE SET BY TRAP 4
*IF THERE IS NO MEMORY MANAGEMENT.

;1F FLAG IS CLEARED, PROCEED WITH TEST.

*RESTORE FLAG
SEXIT = CAN'T TEST WITHOUT MEM. MANAG.

:NOTE: LSHIMEM 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
;MAKE SURE WE ARE IN KERNEL MODE.
MOV
TRAP

#PR107,RO
(SSPRI

;SETTING PRI SHOULD ALSO CLEAR BITS 14 &15
:IN PSW WHICH PLACES PROCESSOR IN KERNEL MODE.

MOV

#172300,R1
#8..RO

*GOING TO WRITE PDR REG 0-7

MOV

#77406,(R1)+

;WRITE BITS FOR THE FOLLOWING PAGE DESCRIPTION

DEC
BNE
MOV
CLR
MOV
MOV
MOV

RO
20$
4172340 R1
(R1)
#200,2(R1)
#4004 (R1)
#600.6(R1)

SWRITE ALL PDRS

MOV

#2000.12(R1)

MOV

000016

FLAG
177572
#4

ADD

ANOXMEM
, = (SP)
#4,-(SP}

MOV

#1000.10(R1)

#4000.14(R1)
#7600.16(R1)

:GET ADDRESS OF KERNEL PDR

REG O

*READ/WRITE ACCESS, 128. BLOCK PAGE LENGTH.

;GET ADDRESS OF KERNAL PAR 0
:PAR 0. ADDRS
0 17776
PAR 1. ADDRS
20000 37776
AR 2. ADDRS 40000 57776
AR
3. ADDRS 60000 77776

&. ADDRS 100000

- 117776

PAR 6. ADDRS 400000

- 417776

AR
5. ADDRS 200000

:PAR 7. ADDRS 160000

-~ 217776

- 177776 (1/0 PAGE)

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

034662

034666

012703
012704

000100

005037

002340

012746
012746
012746
012746
104437
062706
012737

000340
023512
000004
000003
000010
000001

012701
012702

000040
002410

30A(1052)

005737
001014
005301
001372

002340

012701

004000

005024

CLR

SETVEC

LR
PAGE 2-119

#64. ,R3

#120000,Re:
FLAG

177572

30%:

sCOUNTER FOR OUTER LOOP OF TEST PATTERN GEN.
sUSE VIRTUAL ADDRESS TO MAP TO PAR 5

cGENERATE A TEST PATTERN IN THE 1ST 4K
;BYTES OF PAR 5 (VIRTUAL ADDR 120000 - 127776)
ENSURE FLAG IS CLEARED

#4 ,ANOXMEM, #PRIO?;SET UP TRAP VECTOR 4 (WILL SE;OFLAG)

sCOUNTER FOR INNER LOOP OF TEST PATTERN GEN.

33S

31S
R3
308

sNXM TRAP 4?
JIF YES = EXIT
;DO THE INNER LOOP 32.

TIMES

;DO THE OUTER LOOP 128.

TIMES

(R4)+

cCLEAR OUT THE ENTIRE PAR
s (PHYSICAL ADDRESS 210000 - 217776)

33$

32$

CLR
CLRVEC

PRINTB

SJWRITE TEST PATTERN INTO 4K BYTES

s (PHYSICAL ADDRESS 200000 - 207776)

;COUNTER TO CLEAR THE NEXT 4K BYTES.

DEC
BNE

TST
BEQ
ERRDF

;ADDRESS FOR 32. WORD TEST PATTERN

#4000 ,R1

FLAG

002340

C$SVEC

#10,SP

#32. .R1

FLAG

33s:

#4,-(SP)
#3,-(SP)

;ENABLE MEMORY MANAGEMENT

(R2)+,(R&)+

32%:

TRAP
ADD

#PRIO7,-(SP)

#NOXMEM,
- (SP)

H1,a4177572
#SCCITT,R2

31s:

000004

177572

FLAG

349
19,EMT22

JNXM TRAP 4?

;IF YES - EXIT

;TURN OFF MEMORY MANAGEMENT

JRESTORE

TRAP &4 TO SUPERVISOR

JWAS THIS AN ERROR EXIT
;IF NOT, PROCEED.

#4 ,RO

C$CVEC

CSERDF
19
EMT22
0

HFMT2S
R4

R4 ,~(SP)
NEMT25,~(SP)
#2,-(SP)
SP,RO
CSPNTB

036104
000002
000006
036044

SEQ 0142

MOV
MOV
MOV

002340

177572

09:36

TEST 14 - EXTENDED ADDRESSING DATA TEST
MOV
MOV

120000

012224

13-MAR-80

34%:

JMP

CLEAR

#6,SP

85%

;MACRO FOR MASTER CLEAR

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY1
CZDMIA.P11
13-MAR-80 09:34
9P
2};

035060

004737

30A(1052)

011064

N1
3 -80 09:36 PAGE 2-120
ST
114 -~ EXTENDED ADDRESSING DATA TEST
JSR

PC, $MSCLR

;*wax MACRO EXPANSION ++es
:ISSUE A DMR MASTER CLEAR
*hARR

Khkhn

]

)
)
)

;
)

(3)
(3)
)

)

;

5
(3)
(3)

035066
035070

000756

035070
035074
035076
035100

004737

035102

035102
035104

035106

035112

ESCAPE

104410

004000

JSR

011262

ESCAPE

104410
000740

000000

011516

JSR

(3)
(3)

PC,

$BASE]

.WORD

JWORD
.WwORD
.WORD

LPLU
BASE
DMR

TST

sxnewx MACRO EXPANSION #a#x

;DMR-11 MODE
sRARKX

L 2.2 24

;IF ERROR, BR TO TEST END.

TRAP

.WORD

sMACRO FOR CONTROL IN (FULL DUPLEX)
PC,

SCNTIN

.WORD

sCALL CONTROL IN ROUTINE WITH DEFAULT
sSEL6 = FULL DUPLEX, RUN MODE,

SEC START.

L 3.4 21

104410
000726

035120
035124
035130

005037
005037
005037

002510
002560
002342

035134
035142

012737
012737

010000
050000

035170
035172

MOV
MOV

035150
035154

005037
012737

035206
050000

035210

CLR
MoV

#81T714!10000, TSEL6 :XMIT BUFFER ADDR BIT 16 SET AND 4K

CALL

$8ACC

CLR
CLR
(LR

035174

RSEL4:
RSEL6:

104410

000646

035200
035204
035206
035210
035212

000040
000000
000000

035216
035216

:IF ERROR, BR TO TEST END.

TFLAG
RFLAG

;IF SFLAG
= 0, THEN THIS IS A TEST OF BIT 16

:IF SFLAG = =1, THEN THIS IS A TEST OF BIT 17
#10000,RSEL4
:RECEIVE BUFFER ADDRESS (BITS 0-15)
#BI1T14!10000,RSELS ;REC BUFFER ADDR BIT 16 SET AND 4K
BVTE RECEIVE CHARACTER COUNT
TSEL4
TRANSMIT BUFFER ADDRESS (BITS 0-15)
;RYTE XMIT CHARACTER COUNT

WORD
.WORD

TST

; ISSUE THE BUFFER ADDR/ CHAR COUNT COMMAND
;COMMAND FOR BA/CC IN RECEIVE
;BUFFER ADDRESS BITS 0-15
;BUFFER ADDR BIT 16 + CHAR. COUNT
;IF ERROR, END TEST

RQI !BACCR

O
O

.WORD

‘

CALL
TSEL4:
TSELG6:

40%:

ESCAPE

$8A(CC

. WORD
.WORD

.WORD

TST

RDO

CSESCAPE

L10074-.

;ISSUE
RQI 'BACCT

0
O

THE BUFFER ADDR/ CHAR COUNT COMMAND
.COMMAND FOR BA/CC IN TRANSMIT
:BUFFER ADDRESS BITS 0-15
;BUFFER ADDR BIT 16 + (CHAR. COUNT

:IF ERROR, END TEST

TRAP

.WORD

WAIT

CSESCAPE
L10074-.

;CLEAR RECEIVE FLAG
;CLEAR SECOND LOOP FLAG

SFLAG

TRAP

104410

000630

ESCAPE

TRAP
.WORD

sCLEAR TRANSMIT FLAG

35%:

035176

035212
035214

TST

CSESCAPE

L10074-.

sansex MACRO EXPANSION wxxx

035114
035114
035116

ESCAPE

CSESCAPE

L10074-.

sCALL BASE IN ROUTINE WITH DEFAULTS
sSET LINE UNIT LOOP
;BASE TABLE ADDRESS

tttt

000044
000000
000000
(3)

TRAP

sMACRO FOR BASE IN COMMAND

CNTRIN

035162

;IF ERROR, BR TG TEST END.

BASEIN

002630
000522

004737

SEQ 0143

;WAIT

FOR RDO

TO BE

SET

CSESCAPE
L10074~-.

_a_.;mmm‘\—l_.a—l_aww_ad_l—l_a
00 N~ "
ey NN S N
o N e o S

CZDMIAO DMR-11 FUNCTIONAL TESTS MACYT
13-MAR-80 09:34
CZDMIA P

64619

035216
035222
035224
035224
035226

035230
035236
035240
035240
035242
035244
035246
035250
035254
035254
035262
035264
035270

004737
000001

30A(1052)

010266

13-MAR-80

09:36

B 12
PAGE 2-121

TEST 1¢ - EXTENDED ADDRESSING DATA TEST
JSR

PC,

SWAIT

WORD

sexen MACRO EXPANSION #wxs

;CALL WAIT ROUTINE

JFLAG THAT WE'RE WAITING FOR RDO

SRR

ESCAPE

104410

TST

SEQ 0144

L8
2 34

;IF RDO NOT SET BEFORE TIMEOUT, END TEST
TRAF

000616

032777
001406

.WORD

000001

104455
000011
020136
015070
000137

036034

032777

000004

164776

144752

BIT
BEQ
ERRDF

508%:

002510

JEXIT

BIT

#RCV ,aSEL2

;IS THIS A TRANSMIT OR RECEIVE?
;BR FOR RECEIVE
;1S THIS THE 1ST TRANSMIT DONE
;1¢ YES, PROCEED
;sMULTIPLE TRANSMITS

ERRDF

012737
023777
001406

1727777
035206

002510

55%:

144714

015070
000137

036034

023777

035210

001502

144672

56%:

60%

TFLAG

55%

10.EMG10,ERRG2

JMP

80%

JEXIT

MOV

#=1,TFLAG
gSEL4.BSEL4

JFLAG THAT THE TRANSMIT IS DONE.
;IS THE BUFFER ADDRESS CORRE(CT?
;1F OK, PROCEED WITH CHECK.

BEQ
ERRDF

104455
000013
020214

;1S THIS A CONTROL OUT COMMAND?
JNO - PROCEED
JUNEXPECTED CONTRCOL 0OUT.

80%

BEQ

036034

508
9.EMGY ,ERRG2

JMP

TST

035272

#CNTRL ,@SELZ

11,EMG11,ERRG2

TRAP

002560

036034

60%:

61%:

CSERDF

.WORD
.WORD
. WORD

TRAP

CSERDF

.WORD
.WORD
.WORD

¢BUFFER ADDRESS ERROR

EMG9
ERRGZ

EMG10
ERRGZ2

CSERDF
11
EMG11

ERRGZ2

JMP

80%

JEXIT

CMP
BEQ
ERRDF

70%
12,EMG12 ,ERRG2

TSELG,QSELS

;1S THE CHAR. COUNT CORRECT?
;1F OK, PROCEED
s CHARACTER COUNT ERROR - OR EXT MEM PROBLEM
TRAP

036034

CSESCAPE
L10074~.

JMP

80%

JEXIT

TST
BEQ
ERRDF

RFLAG

;IS THIS THE 1ST RECEIVE DONE
;1F YES, PROCEED
JMULTIPLE RECEIVES

JMP

61%

13,EMG13 ERRG2

80%

SEXIT

CSERDF
12

.WORD
.WORD
.WORD

EMG12
ERRGZ

TRAP
.WORD
.WORD
.WORD

CSERDF
13
EMG13
ERRG2

CZOMIAO DMR~11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
6442
6443
6444
6445
(4)
(5)
(5)

(5
6446
6447
6448
6449
6450

035406
035414
035422
035424
035424
035426
035430
035432
035434

012737
023777
001405

002560

035172

144574

104455
000014
020241
015070

(5)

035462
035464
035470
035474
035500
035502
035502
035506
035512
035516
035516

62%:

63%:

002342

CMP
BEQ
ERRDF

#-1,RFLAG
RSEL4.GSEL4

6
11,EMG11 ,ERRG2

SEQ 0145

sFLAG THAT THE RECEIVE IS DONE.

;1S THE BUFFER ADDRESS CORRE(CT?
;1F OK, PROCEED WITH CHECK.
:BUFFER ADDRESS ERROR

80%

JEXIT

RSEL6,QSEL6

;IS THE CHAR. COUNT CORRECT?
:IF OK, PROCEED
:CHARACTER COUNT ERROR

63%

12,EMG12,ERRGZ

TRAP

TST

SFLAG

65%

sWHICH EXTENDED ADDRESS ARE WE

012702
000406

130000

MOV

#130000,R2
66%

012700
012701
012702

010000
120000

MOV
MOV
MOV

#10000,RO
#120000,R1
#140000,R2

;THE XMIT BUFFER MAPS TO 200000
;THE REC BUF. MAPS TO 400000

012737

000001

MOV

A ,aN177572

:TURN MEMORY MANAGEMENT BACK ON.

{(R1)+,(R2)+

;IS THE DATA THE SAME?
;IF NOT THERE IS A DATA ERROR.
;CHECK ENTIRE BUFFER

177572

035216
002510

035216

67%:

68%:

177572

000213
002560

66%:

70%:

164446

MP
BNE
DEC
BNE
CLR
ERRDF

CLR
B8IC
BNE
JMP
TST

72%:

68%

C$ERDF

BNE
JMP

12
EMG12
ERRGZ

;GO COMPARE THE XMIT AND REC BUFFERS

;IN THE TEST OF BIT 17 WE SENT 8K BYTES

RO
67%
708

:IF DATA OK, PROCEED WITH TEST.

an177572
15,EMG15 ,ERRG2

:TURN MEMORY MANAGEMENT OFF.
:DATA ERROR

80%

TST

71%:

TRAP

CHECKING?

#4000,RO
#120000,R1

140000

11
EMG11
ERRG?

:BR FOR BIT 17 CHECK
;IN THE TEST OF BIT 16 WE SENT 4K BYTES
sTHE XMIT BUFFER BEGAN AT THIS VIRTUAL ADDR
sWHICH WILL MAP TO 200000
;THE REC BUF. MAPS TO 210000

MOV
MOV

65%:

C$SERDF

.WORD
.WORD
.WORD

004000
120000

012701

022122

035612

CMP
BEQ
ERRDF

104455

€ 12

13-MAR-80 09:36 PAGE 2-122
TEST 14 ~ EXTENDED ADDRESSING DATA TEST
MOV

144614

000013
020214
015070
000577

023777
001404

(4)

177777
035170

30A(1052)

TRAP

.WORD
.WORD
.WORD

SEXIT

C$ERDF

15
EMG15
ERRG?

H177572
;TURN MEMORY MANAGEMENT OFF,
#RDO+RCV+CMD,@SEL2 ;CLEAR RDO, RCV €& COMMMAND BITS (0,1
RFLAG
;1S THE RECEIVE DONE 2 (IF DONE, FLAG = =1)
718
SYES - SEE IF TRANSMIT DONE
40%
:NO - GO BACK AND DO IT.
TFLAG

72%
40%

s1S THE TRANSMIT DONE ?

JYES - SEE

sNO - DO IT

THERE

IS MORE

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

6486
gzgg

035612
035616

005737
001106

002342

6489
6490
6491
6492
gzgz

035620
035626
035634
035636
035642

012737
023727
002477
005037
005037

177777
002120

002342
004200

002510
002560

6495
6496
6497

(7)
(6)
(5)
(4)
(3)
(2)

6510

6511
6512
6513
6514
6515
6516
6517

6518
6519
6520
(3)
(3)
6521
6522
6523
6524
6525
(4)
(5)
(5)
(5)
6526
(8)
(7)
(6)

D “<
13-MAR-80 09:36 PAGE 2-123
TEST 14 - EXTENDED ADDRESSING DATA TEST

SEQ 0146

TS1
BNE

SFLAG
80%

JHAVE WE ALREADY TESTED BIT 17
;IF SO - END OF TEST

MOV
(MP
8LT
CLR
CLR

#-1,SFLAG
LSHIMEM, #6200
80%
TFLAG
RFLAG

;FLAG SO WE DON'T COME THIS WAY AGAIN.
;1S THERE ENOUGH MEMORY TO TEST BIT 172
:IF NOT -~ END OF TEST.
;CLEAR FLAGS FOR NEXT TEST

:SET UP TO TEST BIT 17, IF THERE 1S ENOUGH MEMORY.
2THIS TEST WILL TRANSMIT 8K BYTES STARTING AT PHYSICAL ADDRESS 200000
:TO PHYSICAL ADDRESS 400000.
THE TRANSMITTED BUFFER STILL CONTAINS

gzgg

6500
6501
6502
6503
6504
6505
6506
6507
6508
6509

30A(1052)

sTHE

035646
035652

035660

005037
012737

005037

035170
120000

035206

035664

012737

060000

035672
035676

012701
012704

010000
140000

035702

005037

002340

035706
035712
035716
035722
035726
035730

012746
012746
012746
012746
104437
062706

000340
023512
000004
000003

035706

035734
035742
035742
035744
035750
035752
035754

035756
035756
035762
035762
035766
035770
035774
035776
036002
036002
036002
036004
036006
036010
036012
036012
036014
036020

000010

012737

000001

005024
005737

002340

005037

177572

012700
104436
005737
001002
000137

000004

001002
005300
001372

104455
000023
036046
000000
010446
012746
012746

CLR
MoV

035172

CLR

035210

MOV

MoV
MOV

CLR

177572

74%:

75%:

002340

035162

TEST PATTERN GENERATED IN THE BIT 16 TEST.

76%:

SETVEC

#4,#NOXMEM,#PRIO7;SET UP TRAP TO VECTOR 4 (WILL SET FLAG)

MOV

#1,a8177572

;TURN ON MEMORY MANAGEMENT

CLR
TST

BNE
DEC
BNE

(R4) +
FLAG
75%
RO
74%

;CLEAR 400000 - 417776
;DOES A NXM TRAP 4 OCCUR?
sIF YES, EXIT

CLR
CLRVEC

177572
44

sTURN OFF MEMORY MANAGEMENT
JRESTORE TRAP 4

TST
BNE
JMP

FLAG
76%
35%

ERRDF

19,EMT22

PRINTB
036104
000002

RSELS
JRECEIVE BUFFER ADDRESS (BITS 0-15)
#B81715!20000,RSEL6 ;REC BUFFER ADDR BIT 17 SET AND 8K
BYTE RECEIVE CHARACTER COUNT
TSELS
TRANSMIT BUFFER ADDRESS (BITS 0-15)
#81T714!20000, TSEL6 :XMIT BUFFER ADDR BIT 16 SET AND 8K
:BYTE XMIT CHARACTER COUNT
#10000,R1
:COUNTER TO CLEAR 8K BYTES
#140000,R4
;VIRTUAL ADDRESS THAT WILL MAP INTO PAR 6
;WITH THE PHYSICAL ADDRESS 400000
FLAG
. ENSURE FLAG IS CLEAR

#FMT?25,R4

;WAS THIS AN ERROR EXIT?
;IF YES =~ REPORT ERROR
;START THE SECOND TEST

MOV
MOV
MOV
MOV
TRAP
ADD

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

MOV
TRAP

#4 ,RO
CS$CVEC

TRAP
.WORD
WORD
.WORD

CSERDF
19
EMT?22
0

MOV
MOV
MOV

R4 ,-(SP)
REMT2S,~(SP)
#2,-(SP)

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

062706

004737

000006

85%:
END

rst

JSHUTDOWN DMR

PC, S$HALT

.DMR HALT ROUTINE.

L 2 2

CALL

$ERROR

;CHECK BASE

.DSABL

L3R

;DISABLE

TABLE AND REPORT ANY SOFT ERRORS

LOCAL

SYMBOL BLOCK

L10074:

TRAP

EMT 22:

.ASCIZ

/CAN'T ADDRESS EXTENDED MEMORY/

FMT 25:

.ASCIZ

/XAMEMORY ADDRESS X06% DOES NOT RESPOND - TRAP 4IN/

.EVEN

.S8 TTL
c kW LS

040440
051523
020045
047040
051505
026440
020120

020124
051505
042524
046440
000131
0467515
0462104
022440
047504
052117
047520
052040
022464

023516
051104

040503
042101
020123
042116
046505
040445
054522
042522
033117
051505
051040
042116
040522
000116

TEST
AR

ARt

15 - DMC MODE

(RESUME)

INTERRUPT

TEST
222222322222222

TEST 15 = DMR-11

RESUME BASE IN - DMC MODE
*«
WILL NOT RUN IF MODEM LOOPBACK IS SELECTED

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

TEST THE DMR WILL BE HALTED AND RESTARTED BY A BASE-IN RESUME
FOLLOWING MANNER:

BASE IN
CONTROL IN

HALT
BASE IN RESUME
2 BA/CC IN RECEIVE
HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

2 BA/CC IN RECEIVE

2 BA/CC IN RECEIVE
1 BA/CC

SP,RO
CSPNTB
#6,SP

Jenxnx MACRO EXPANSION xwax

104401

6538
6539
6540
6541
6542
6543
6544
6545
6546
6547
6548
6549
6550
6551
6552
6553
6554
6555
6556
6557
6558
6559
6560
6561
6562

SEQ 0147

.'*"""

6537

PAGE 2-124

TEST 14 - EXTENDED ADDRESSING DATA TEST

JSR

6534
6535
6536

E 12

SHUTDN

012560

6529
6530
6531
6532
6533
(3)
(3

09:36

MOV
TRAP
ADD

80%:

1)
1§ D)
(1)

104414

6527
6528

13-MAR~-80

010600

(3)

(4)
(4)

30A(1052)

[N RECEIVE

IN THE

CSETST

CZDMIAO DMR-11 FUNCTIONAL TELTS MACYT
CZDMIA.P11
13-MAR-80 09:34

30A(1052)

(3)
6589
6590
6591
6592

6593

659
6595

N
¢
¥

N
%

SEQ 0148

2 BA/CC IN TRANSMI
T

HALT

BASE IN RESUME

HALT

BASE IN RESUME

2 BA/CC IN TRANSHIT

2 BA/CC IN TRANSMI7
HALT
BASE IN RESUME

1 BA/CC IN TRANSMIT
HALT
BASE

IN RESUME

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

X
B
%

T
T
e

B
X

%
*

B.
C.

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:

6563

6564
6565
6566
6567
6568
6569
6570
657
6572
6573
€574
6575
6576
6577
6578
6579
6580
6581
6582
6583
6584
6585
6586
6587
6588

F 12

13-MAR-80 09:36 PAGE 2=125
T 15 - DMC MODE (RESUME) INTERRUPT TEST

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.

SRR R AR RN

036166
036166
036166

005737

036172

001036

036174
036202
036210
036216

012737
012737
012737
005037

A AR AR AR AR AR AR A A AN RAARNNARRRANNRNANRN RN

BGNTST

002306

000007
000001
000001
002300

002322
002274
002276

TST

WMAINT

BNE

40%

MOV

#7 ,BUFNUM

T15::

;DO WE NEED TO WRITE MODEM
JMAINTENACE 1 OR 2?
;IF YES WE CAN'T RUN THIS TEST
;(NOTE: CAN'T WRITE MODEM IN DMC MODE)

;# OF RCV & XMIT BUFFERS.

MOV
MoV
CLR

#1,RESUME
#1,DMCMDE
MNTMDE

JFLAG SET TO REQUEST DM(C MODE.
;FLAG NOT TO REQUEST MAINTENANCE MODE.

036222

CALL

$BUFFS

;DETERMINE 7 RCV &

036226

CLEAR
PC,

shvnnxe MACRO EXPANSION #xnw
;ISSUE A DMR MASTER CLEAR

036226

004737

011064

JSR

SFLAG SET TO REQUEST USE OF RESUME.

JMASTER CLEAR

SMSCLR

cTRANN

036232
036232
036234

ESCAPE

104410

TST

2 &
L8

;IF ERROR, EXIT TEST

TRAP

000034

.WORD

036236
030236
036242
036244
036246

7 XMIT BUFFERS

;ISSUE A DMR MODE BASEIN
;IN DMR MODE, IF A INTERFACE IS REQUIRED
;7O BE WRITTEN -~ IT WILL BE DONE.

BASE IN

004737
004000
002630
000522

011262

JSR

PC, $BASE]
.WORD
LPLU
.WORD
BASE
.WORD
DMR

sutxx MACRO EXPANSION wwex

sCALL BASE IN ROUTINE WITH DEFAULTS
;SET LINE UNIT LOOP
;BASE TABLE ADDRESS
;DMR-11 MODE
TANNNR

LA A2

C$E SCAPE

L10075~.

CZDMIAQ DMR~11 FUNCTIONAL TEZTS MACY11
13-MAR-80 09:34
CZDMIA. P11

036250
036250
036252
036254
036254

036260
036260
036262

30A(1052)

ESCAPE

104470

000016

004737

G 12

13-MAR-80
09:36
PAGE 2-126
TEST 15 -~ DMC MODE (RESUME) INTERRUPT
TST

JSR

PC,

SHALT

JHALT
saxsxn MACRO EXPANSION #exe
;DMR HALT ROUTINE.
;t*tt

ESCAPE

104410

SEQ 0149

;IF ERROR, EXIT TEST

SHUTDN

012560

TEST

TST

TRAP

.WORD

C$ESCAPE
L10075-.

TRAP

CSESCAPE

LA 2

:IF ERROR, EXIT TEST.

000006

. WORD
L10075~.
JAFTER SETTING INTERFACE OR LOOPBACK MAINT.

;(CAN'T BE DONE IN DMC MODE), START IN

-B3saesess

SR NV NENY & XVeTs LN

.DMC MODE.

036264

CALL

$INOUT

sTHIS ROUTINE WILL MANAGE ALL

THE DMR

;COMMANDS ISSUED IN THE INTERRUPT ROUTINES

; (FROQM BASE

IN UNTIL SHUT DOWN).

BESIDES

;CONTROLLING THE SOF TWARE TIMEQUT, THIS
;ROUTINE WILL ALSO CHECK THAT BUFFER

;CHARACTER COUNTS AND ADDRESSES ARE CORRE(T

JAND THAT THE DATA IS CORRECT IN THOSE BUFFERS
036270
036270
036270
036270

40%:

ENDTST

L10075:

104407

LSBTTL

TEST

16 - DMR MODE

(RESUME)

INTERRUPT

TRAP

TEST

"fit'.*‘**fifi*'**tfi‘***""'*t"*fi*fi***fiQ*fi*'*'fi"****Q"*

"*fi**'*"""'

M
;*
;*
;*
;*
o*
o

TEST 16
RESUME BASE IN - DMR
IN THIS TEST THE DMR
TEST THE DMR WILL BE
FOLLOWING MANNER:
BASE IN
CONTROL IN
HALT

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

BASE

IN RESUME

Ix
J*

¢ BA/CC IN RECEIVE
HALT
BASE IN RESUME

o *

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT

BASE

IN RESUME

HALT
2 BA/CC

BASE
IN TRANSM]T

IN RESUME

o
M

2 BA/CC IN RECEIVE

1 BA/CC IN RECEIVE

2 BA/CC IN TRANSMIT

CSETST

CZDOMIAO DMR-11

CZDMIA.P11

FUNCTIONAL TECZTS MACY11

13-MAR-80 09:34

30A(1052)

13-MAR-80

09:36

H 12
PAGE 2-127

TEST 16 - DMR MODE (RESUME* INTERRUPT TEST

SEQ@ 0150

6654
6655
6656
6657
%28

;*
i
o
R
o*

HALT
BASE IN RESUME
2 BA/CC IN TRANSMIT
HALT
BASE IN RESUME
17 BA/CC IN TRANSMIT
HALT
BASE IN RESUME

6660
6661

o
ow

ALL BA/CC OQUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND
THE CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST

6664
6665
6666
6667
6668
6669
6670
6671
6672

;*
o*
;*
I
i*
o*
o
o
I

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

[

&;2

THE RECEIVE/TRANSMIT TABLE.

THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

6675

6676

6677

_-tttt*ttt*tt*tttttttttttttttttttttntttt*tt*ttttttttttttttttttttttttt't

036272

(3)

036272

6680

036306

6678
6679
&g}

BGNTST

012737
012737

000007 ,002322
000001 002274

MOV
MOV

#7 ,BUFNUM
#1,RESUME

036312

005037

002300

CLR

MNTMDE

DMCMDE

;FLAG CLEARED - DMR MODE.

$BUFF S

;DETERMINE 7 RCV &

005037

002276

CLR

6683

036316

CALL

6685

036322

CLEAR

036322

()

T16::

036272
036300

004737

011064

JSR

;# OF RCV & XMIT BUFFERS.
;FLAG SET TO REQUEST USE OF RESUME.

:FLAG NOT TO REQUEST MAINTENANCE MODE.

:MASTER CLEAR
PC., $MSCLR

;axex MACRO EXPANSION xwx=

:ISSUE A DMR MASTER CLEAR
B

6686
6687

(3)
(3)
6688
6689

6690
6691
6692

036326

036326
036330

104410
000006

036332

6693
6694

7 XMIT BUFFERS

ESCAPE

TST

CALL

$INOUT

18
2 3

;IF ERROR, EXIT TEST

TRAP
.WORD

CSESCAPE
L10076~.

sTHIS ROUTINE WILL MANAGE ALL THE DMR

;COMMANDS ISSUED IN THE INTERRUPT ROUTINES
;(FROM BASE IN UNTIL SHUT DOWN). BESIDES
;CONTROLLING THE SOF TWARE TIMEOUT, THIS

JROUTINE WILL ALSO CHECK THAT BUFFER
;CHARACTZR COUNTS AND ADDRESSES ARE CORRECT

&gg

JAND THAT THE DATA IS CORRECT

IN THOSE BUFFERS

6697

6698

6699
(3)
(3)

6700
6701

036336
036336
036336

ENDTST

104401

L10076:

RAP

CSETST

CZDMIAO DMR-11 FUNCTIONAL TEZTS MACY11
CZDMIA.P1
13-MAR-80 09:34
6702
€703

30A(1052)

13-MAR-80

TEST 16 -~ DMR MODE

LSBTTL
R

09:36

I 12

PAGE 2-128

(RESUME)

TEST 17 - DMR MODE
AR AR AR A AN A RN AR R

TEST

INTERRUPT

TEST

SEQ 0151

INTERRUPT EXERCISE

R R R AR AR AR R AR NN NN N NNNNNNNNNRORN AR RN

17 - DMR-11

;* INTERRUPT DRIVEN EXERCISE
: IN THIS TEST 64 BUFFERS WILL BE TRANSMITTED AND RECEIVED

:' ALL BA/CC OUTS RECEIVES AND TRANSMITS WILL BE ACCOUNTED FOR AND
THE
THE

:*
.

i*
o
;v
-

CHARA(CTER COUNTS AND BUFFER ADDRESSES WILL BE
RECEIVE/TRANSMIT TABLE.

THE BUFFERS ARE DETERMINED

CHECKED AGAINST

IN THE SUBROUTINE $BUFFS.

THIS

SUBROUTINE WILL DETERMINE THE ADDRESS AND CHARACTER COUNT OF
64 RECEIVE AND 64 TRANSMIT BUFFERS.
THE ROUTINE WILL
QIESQQZH;O USE AS LARGE BUFFERS AS POSSIBLE IN THE FOLLOWING

i*
.*
i

B.
C.

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

* N

DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

Efit*tttt**t**tttttQ*Qti"itttfitfi*tifitt*fi*tttttfi**tt‘ttttttttflt'ttlt*t

BGNTST

012737

000100

005037
005037
005037

002274
002276
002300

002322

MOV

#64 . ,BUFNUM

117
;# OF RCV & XMIT BUFFERS.

CLR
CLR
CLR

RE SUME
DMCMDE
MNTMDE

;FLAG CLEARED IN ORDER NOT TO USE RESUME.
JFLAG CLEARED TO ALLOW DMR MODE.
;FLAG NOT TO REQUEST MAINTENANCE MODE.

CALL

$BUFF S

;DETERMINE 64 RCV &

CLEAR

004737

011064

JSR

;JMASTER CLEAR

PC,

SMSCLR

sexxx MACRO EXPANSION wxwx

;ISSUE A DMR MASTER CLEAR
:tt*t

036372
036372
036374

ESCAPE

104410

64 XMIT BUFFERS

TST

L84

;IF ERROR, EXIT TEST
TRAP

000012

.WORD

036376

CALL

$INOUT

CSESCAPE

L10077-.

;THIS ROUTINE WILL MANAGE ALL THE DMR

:COHHANDS ISSUED IN THE INTERRUPT ROUTINES

;(FROM BASE

IN UNTIL SHUT DOWN).

:CONTROLLING THE SOF TWARE TIMEOUT,

BESIDES

THIS

;ROUTINE WILL ALSO CHECK THAT BUFFER
sCHARACTER COUNTS AND ADDRESSES ARE CORRECT

:AND THAT THE DATA IS CORRECT IN THOSE BUFFERS
036402
036406

CALL

ENDTST

$ERROR

;CHECK BASE

TABLE FOR SOFT ERRORS

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

(3)
(3)
6752
6753
6754
6755
6;29

036406
036406

30A(1052)

J 12
13-MAR-80
09:36 PAGE 2-129
TEST 17 - DMR MODE INTERRUPT EXERCISE

SEQ 0152

L10077:

1044601

.SBTTL

2758

TEST 18 - DMR MODE LARGE MESSAGE

I
TEST
18 - DMR-11
;* LARGE MESSAGE
;% IN THIS MODE TRANSMIT AND RECEIVE 1
. %

LARGE BUFFER

6763

;* THE BA/CC OUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND

g;gg

6764

;% THE (HARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST
° %

6767
6768
6769
6771
6772
6773
6774
6775

2;35

036410

012737

000001

6783
6784
g;gg

036416
(036422
036426

005037
005037
005037

002274
002276
002300

2;2;
6789

6796
6797
6798

6799

THE 2K BYTE DEFAULT BUFFER WITHIN THIS DIAGNOSTIC.

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

;tttttt**ttQtttttttttttt'ttttttt*ttttttttt*ttttttttttttttttttttttttttt

036410
036410

6793
6794
6795

ATTEMPT TO USE AS LARGE BUFFERS AS PGSSIBLE IN THE FOLLOWING

- %

6779
6536

6790
6791
(3)
6§3%

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

o
o
o
J*
*

2%9

(1)

THE RECEIVE/TRANSMIT TABLE.

S
oTM
i

6770

(1
(1)

CSETST

.tttttt*tttttttttttttttttttttttt*tttttttttttttttttttfitttttttttt*ttttt.

6759
6760
g;g}

6778

TRAP

BGNTST

T18::
002322

MOV

#1 ,BUFNUM

;¥ OF RCY & XMIT BUFFERS.

CLR
(LR
CLR

RE SUME
DMCMDE
MNTMDE

;FLAG CLEARED IN ORDER NOT TO USE RESUME.
sFLAG CLEARED TO ALLOW DMR MODE.
sFLAG NOT TO REQUEST MAINTENANCE MODE.

036432

CALL

$BUFF S

JDETERMINE 1 RCV &

036436

CLEAR

036436

(036442
036442
036444

036446

004737

104410
000012

011064

JSR

ESCAPE

CALL

1 XMIT BUFFER

;MASTER CLEAR

PC,

$MSCLR

TST

$INOUT

sxxxx MACRO EXPANSION sxxx
;ISSUE A DMR MASTER CLEAR

JRRKR

KRR

;IF ERROR, EXIT TEST

TRAP
.WORD

C$ESCAPE
L10100-.

sTHIS ROUTINE WILL MANAGE ALL THE DMR
:COMMANDS ISSUED IN THE INTERRUPT ROUTINES
s (FROM BASE IN UNTIL SHUT DOWN).
BESIDES

CONTROLLING THE SOF TWARE TIHEQJT THIS

ROUTINE WILL ALSO CHECK THAT BUFFER
sCHARACTER COUNTS AND ADDRESSES ARE CORRECT

:AND THAT THE DATA 1S CORRECT

IN THOSE BUF FERS

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

6800
6801

6802
6803
6804
6805

30A(1052)

036452

K 12

13-MAR-80
09:36
PAGE 2-130
TEST 18 -~ DMR MODE LARGE MESSAGE

CALL

$ERROR

6806

6807

036456
036456
036456

;CHECK BASE TABLE FOR SOFT ERRORS

;NOTE: NORMALLY ANY NON-ZERO ERROR COUNT IS
JREPORTED; HOWEVER IN THIS TEST A REP COUNT
;0F 1 IS ALLOWED, BECAUSE AT LOw BAUD RATES
;WE WOULD EXPECT 1 REP.

ENDTST

L10100:

104401

2EEEEELLE

O~NRAWVNESWN=0O

6808
(3)
(3)

SEQ 0153

.SBTTL

TRAP

CSETST

TEST 19 - DMR MAINTENANCE MODE MESSAGE

*tttttt*ttttttfik**tttttt'tifi‘t*ttttttfittttttttttttttttfittfittttt*ttttt
!

TEST 19 - DMR-11

;* MAINTENANCE MODE OPERATION

6819
6820

.‘r THE BA/CC OUT RECEIVE AND TRANSMIT WILL BE ACCOUNTED FOR AND
;* THE (CHARACTER COUNTS AND BUFFER ADDRESSES WILL BE CHECKED AGAINST

235,12

.* THE RECEIVE/TRANSMIT TABLE.

6823
6824
6825
6826
6827
6828
6829
6830
6831
gg%%

;%
o
o
o
o*
o*
;%
S
o*
o*

6834
6835

:-tttt*ttttttttttttttttttttttttttfitttt*ttttttt*tttitttttttttttttttttttt
BGNTST

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

{(3)
gg%g

026460
036460
036460

012737

000001

6838
6839
%?

036466
036472
036476

005037
005037
012737

002274
002276
000001

002322

MOV

#1 ,BUFNUM

T19::
;@ OF RCV & XMIT BUFFERS.

002300

CLR
CLR
MOV

RE SUME
DMCMDE
#1 ,MNTMDE

;DON'T ALLOW RESUME
;FLAG CLEARED TO ALLOW DMR MODE.
JFLAG SET TO REQUEST MAINTENANCE MODE.

036504

CALL

$BUFFS

JDETERMINE 1 RCV &

6844

036510

CLEAR

(1)
1)

036510

6845
6846
(3)
(3)

036514

036514
036516

004737

104410
000012

011064

1 XMIT BUFFER

+MASTER CLEAR

JSR

PC, $MSCLR

ESCAPE

TST

cwnxx MACRO EXPANSION wrxx

;ISSUE A DMR MASTER CLEAR
IeRRR
ARKN

;IF ERROR, EX]T TEST
1 RAP
.WORD

CSESCAPE
L10101-,

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

30A(1052)

L 12
13-MAR-80 09:36 PAGE 2-131
TEST 19 - DMR MAINTENANCE MODE MESSAGE

SEQ 0154

6848
6849
6850
6851
6852
6853
6854

036520

CALL

$INOUT

sTHIS ROUTINE WILL MANAGE ALL THE DMR
:COMMANDS ISSUED IN THE INTERRUPT ROUTINES
;(FROM BASE IN UNTIL SHUT DOWN).
BESIDES
;CONTROLLING THE SOFTWARE TIMEOUT, THIS
JROUTINE WILL ALSO CHECK THAT BUFFER
sCHARACTER COUNTS AND ADDRESSES ARE CORRECT
JAND THAT THE DATA IS CORRECT IN THOSE BUFFERS

6856

036524

CALL

$ERROR

;CHECK BASE TABLE FOR SOFT ERRORS

6859
(3)
(3)

036530
036530
036530

ENDTST

L10101:

104401

6866

.SBTTL

6869

AR AR AR A AR

6870
6871
6872
6873
6874
6875

:
;
;
:
;
;

6876

036532
036532
036534

6880
(4)
(4)
(4)
(4)
6881
(4)
(4)
(4)

036534
036534
036536
036540
036542
036544
036544
036546
036550

6882
(4)
(4)
(4)
(4)
(4)

036554
036554
036556
036560
036562
036564

036552

036566
(3)

CSETST

HARDWARE PARAMETER CODING SECTION
AR

A A A AN A

AR AR A AR

R R R AN R AR RN

ANN AR

AR AR

NANAN

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

ttttttttttttttttt*tttttttttfitttttttttttttk*ttfifittttttfitttttt*ttt*titt

6878
(3)
(3)

(4)

TRAP

036566

000015

001031
036566
160000
177776
002031
036604
000000
000776

010032
036625
000007
000000
000007

BGNHRD

LSHARD::
GPRMA

GPRMA

GPRMD

.WORD L10102-L$HARD/?2

P1,2,0,160000,177776,YES

P2,4,0,0,776,YES

P3,20,0,7.0,7,YES

ENDHRD

.WORD
.WORD
.WORD
.WORD

T$CODE
P1
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD

T$CODE
P2
TSLOLIM

WORD

TSHILIM

.WORD
.WORD
WORD
.WORD

T$CODE
P3
7
TSLOLIM

.WORD

TSHILIM

VEN
L10102:

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
6885
6886

036574
036602

051503

051104
000040

SEQ 0155

020122

042101

P1:

.ASCIZ

/CSR ADDRESS: /

P2:

.ASCIZ

/VECTOR ADDRESS: /

P3:

LASCII

/TEST CONFIGURATION =/<CR><LF>

LASCIT

INTERNAL

051505

035123

6888

036604
036612
036620
036625

042526
040440
051523
126

052103
042104
020072
051505

051117
042522
000
020124

6889

036653

040

030040

036440

036702

041505

047524

024522

6890

036712
036720
036726
036734
036742
036750
036756
036764

020040
031510
020055
020040
047050
020040
030440
046114

020061
032462
027126
020040
052117
047515
032055
053517

020075
020064
032463
020040
035105
042504
040440
006523

ASCIT

H3254 - v.35

(NOTE:

6891

036773
037000

031040
031063

H3254

PROGRAM INTERFACE SELECTION)/

044440
040522
051120

036440
032065

LASCII

037006
037014
037022

040
044040
026440
043505
020040

6892

037060

005015

020040

020063

LASCIT

<CR><LF>/

6893

037102
037110

031462
031462

041462
005015

032057

6896

037114
037122
037130

020040
031510
020055

020064
032462
051522

LASCID

6895

037141
037146
037154
037162
037170
037176
037204

040
041440
040440
020127
044440
040506
882;82

012
032440
041101
042116
040520
052116
042503
041505

020075
020065
031064

036440
042514
051440
045503
051105
051440
042524

CASCIT

/05

CABLE AND SW PACK INTERFACE SELECTED/<CR><LF>

037215
037222
037230

040
024040
044055

020040
027126
031063

020040
032463
030065

LASCIT

(V.35-H3250,

689

(NO CONNECTOR)/<CR><LF>

INTEGRAL

MODE 1-4 ALLOWS/<CR><LF>

052116
020114
043517

6887

036566

M 12
30A(1052)
13-MAR-80 09:36 PAGE 2-132
HARDWARE PARAMETER CODING SECTION

3 = H3255 - RS232(/<57>/423/<CR><LF>

H3255 = RS422/<CR><LF>

INTEGRAL-B(55A-10,/

g%gp%:Op??R-ll FUNCTIONAL TESTS MACY11

13-MAR-80 09:34

037236
037244
037252

020054

6897

13-MAR-80

09:36

N 12

PAGE 2-133

HARDWARE PARAMETER CODING SECTION

SEQ 0156

047111
046101
0640465

062524
041055
030455

031123
031510
051522
031064
032462

031063
032462
031064

LASCII

/ RS232C-H325, RS423/<57>/422-H3251)/<CR><LF>

026462
024461

LASCII

/+ SELECT THE FOLLOWING ONLY IF

LASCII

<CR><LF>/

047514

042514
042510
047514
047440
043111
046440
051440
052122
050117
025040
020066
040503
050117

020067
047515
047517

020075
042524
006520

CASCIZ

6898

6899

000012

30A(1052)

THE MODEM SUPPORTS LOOPBACK «/

6 = LOCAL LOOP/<CR><LF>

7 = REMOTE LOOP/<CR><LF>

.EVEN

.SBTTL

AR
.

SOF TWARE PARAMETER CODING SECTION

AR AR AR

A AT AT AR AR

A AN A AN RN

R AR N AN AR AR

AR ANRANRNAARARARRNRS

THE SOF TWARE 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.
SRR

037466
037466
037470
037470
037470
037472
037474
037476
037500

000005

AN A AN

AR R R AN N R AN AR AR R AR A ARANRN R AR AR

ANAAR

AN RN RN

BGNSFT

L$SOFT::

000032
037502
000007
000001
000005

GPRMD

.WORD L10103-L$SOFT/?2

51,0,0,7,1,5,YES

.WORD
.WORD
.WORD
.WORD
.WORD

TSCODE
$1
7
TSLOLIM
TSHILIM

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA P11
13-MAR-80 09:34

B 13

30A(1052)
13-MAR-80 09:36 PAGE 2-13¢4
SOF TWARE PARAMETER CODING SECTION

037502

SEQ 0157

ENDSFT

037502

L10103:

037502
037510
037516

828628

046102

6925

042522
047524
044524
031456
020040

037626

020051

037632

036530
047111
000

$1:

037732
037734
037736

037732
000240
000240
000240

042506

066040

-ASCIZ

/[REFER TO LISTING 6.3.131

(MAX=S5; MIN=1) /

.EVEN
RARKRRRNKNR A A& & &

PAT(CH:

PATCH

AREA

ARAAARK A AR KRR R AR AN AR AR AR

.=.+100

NOP

NOP
NOP
R AR

A AN AR

AN AR

R R

R AN AR A A RN

AR AR R RN NN CRR R

R AR NN AR RN R AR AN AY

ENDMOD

037740

037740
037742
037744

/SELECTABLE PROGRAM LOOP TIME-OUT VARIABLF/<CR><LF>

063516
030456
024040
035465
030475

SRR

037740

-ASCII

066501
020120
047455
051101
006505

SRR

037632

.EVEN

LASTAD
000000
000G00
000001

.EVEN

LSLAST: :
.END

et
W

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
A
= 000044
ADR
= 000020 G
ASSEMB= 000010

AX3
002304
BACCR = 000004
BACCT = 000000
BASE
002630

5247

5280

5303

3268

(358w
4701
4721
4107

§362+
5844
5704

4491
4493

3526

4546
5282

000003
020000
004230
000001
000001
000002
000004

BITO3 = 000010

BITO4 = 000020
BITOS = 000040
BIT06 = 000100

BIT07 = 000200
BITOB = 000400

BITO9
BIT1
BIT10
BIT11
BIT12

=
=
=
=
=

001000
000002
002000
004000
010000

BIT13 = 020000

BIT14 = 040000
BIT15 = 100000
BITZ2 = 000004
BIT3 = 000010
BIT4
= 000020
BITS = 000040
BIT6 = 000100
BIT7 = 000200
BIT8 = 000400
BIT9 = 001000
= 000400
BSELO = 002232

BSEL1
002242
BSELZ = 002234
BSEL3
002244
BSEL4 = 002236
BSELS
002246
BSEL6 = 002240

BSEL7
BUFNUM
BUFSIZ
(D

002250
002322

002320

002000

InInlalalalalalalalnlalalalalalalalalalalalalalaYala)

5362
5429
5599

BASEl =
BASEUP=
BIGBUF
BITO
=
BITO0 =
BITO1 =
BITO2 =

c 13

30A(1052)
13-MAR-80 09:36 PAGE 3
CROSS REFERENCE TABLE -~ USER SYMBOLS

SFQ 0158

5305

6406

4109

4128

5235
5294
5375
5433
5735
6187

6103
3232

4495

3829
2417

3826

5276
5311
5423
5526

5969

4708

5123

5362

5375

2400
2396

4604
4610
5814

4614
4614
5844

4767
5880

4774

5814

5844

5880

5235

5268

5493

5500

5514

5934

2408
2407
2403

2409
4377

4372

3314+

3401+

409

2415
4367
4362

6501

6393

6396

6504

4681+

4696+

4701+

4716+

5187

519

3942

3943

3981

4046

3893

3895

4047

2406

5020
4512+

3837
6593+
3850+

CZDMIAO DMR-11 FUNCTIONAL T%STS MACY11
CZDMIA P11
13-MAR-80 09
CHIPNO 002406
CLRNO
002372
(MD
= 000007

26084
25984
g#gg#

CNTRL = 000001

24254

CR
CSR

CTS

= 000015
002232

= 010000

C$AU = 000052
C$AUTO= 000061
C$BRK = 000022
CE3SEG= 000004
Cs8suUB= 000002

CS$CEFG= 000045

C$CLCK= 000062

C$CLEA=
C$CLOS=
C$CLP1=
C$CVEC=
CSDCLN=
C$00DU=
C$DRPT=
C80U =
C$EDIT=
C$ERDF=

22094

CSETST= 000001

22094

C$EXIT=
C$GETB=
C$GETW=
CSGMAN=
C($GPHR=

22094
22094
22094
22094
22094

4285

6283

PAGE 3-1

SEQ 0159

5723

5726

5826

5859

5892

6043

6071

6095

3314

3336

3590
5977
6414
6895

4497

4681

6027

4743
6034

5713
6051

5754
6062

5810
6079

6897

6899

6900

6924

5481
6075

5506
6099

5522
6129

5540

5595

4010

4505

3959

22094
%gggl

D 13

5710

22094
22094
22094

23964

09:36

TABLE ~=- USER SYMBOLS

5883
6143
6892
4423

4990
5729
4913

000032
000026
000027
000043
000042

CROSS REFERENCE

5817
6086
24754
24944

CSESEG= 000005
C($ESUB= 000003

000056
000060
000054
000057
000010

13-MAR-80

L2564+

22094
22094
22094
22094
22094
22094
22094
22094
22094
22094
4740
5254
5720
5992
6222
6445
22094
22094
22094
22094
22094
5385
5533
5692
5836
5971
6186
6610
22094
%ggg#

CSERHR=
C$ERRO=
CSERSF=
C$ERSO=
C$ESCA=

000012
000035
000006
000036
000044
000051
000024
000053
000003
000055

30A(1052)

5941
6204
6894
4924

5984

5225
5830

5258
5863

5349
6021

5382
6047

4911

6307

6371

6520

3343

3592
4921

4461

3817

4436
4435

4432

4858

2251
3003

4751
5272

5756
6036
6227
6450

3546
5181
5389
5544
5701
5839
5974
6189
6687

6533

4813
5495
5851

6093

6264

5502
5856
6118
6374

3973
5084
5536

6145
6423

5198

5948
6206
6434

5239
5715
5986
6216
6439

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDHlA P11
13-MAR-80 09:34
C$GPLO= 000030

22094
22094
2209#
22094
22094
22094
22094
5779
22094
22054
4067
4140
5074

13-MAR-80
09:36 PAGE 3-2
CROSS REFERENCE TABLE == USER SYMBOLS

SEQ 0160

4399

3818

4058

4068

3011
4073

3020
4075

4141

5086
5437

4856

4099

4135

4154

4158

5315

5443

5655

3333
5184
5654

4043
4085
w147
5296
5778

4046
4097
4157

4047
4105
4163

4057
4119
£312

4064
4126
4974

5425

4066
4133
4980
5429

4266

4268

4270

3952

4020
4331

4248
44621

6322

4887

6304

6347

6510

4253+
5231
5834
3256+
4747
4330
4334

4548
5354

4624

4656
5387
5969
333C

6595~

5867
3325+«

5368
5916
3328

5485
6025
6054«

6680+
5507
6030

6731«
5526
6103

6784«
5555
6133

6839+
5599
6187

5687
6381

5735
6606

4360

4365

4370

4375

4385

4387

4389

439

4522

4565

4325«

4331

3183
6423

41974

6222
6246

6241
6434

6429
6450

6445

4142

5118
5641

4080
6146

5309

EMG16

020354

5313

542¢

4924
4264
4855

2251

3752
3742

4330

[a]alalnlal

56433
22094
22054
22054
22094
22094
22094
22094
22094
22094
22094
22094
22094
22094
22094
2432
23004
2209

E 13

30A(1052)

4771
42044

4802
4807

4813

42074
4762

6264

6473

6439

6227

CZOMIAQ DMR-11 FUNCTIONAL TECTS MACY11
CZDMIA.P11
13-MAR-80 09:34

EMG17
EMGIB
EMG2

020405
020457
020025

EmMG8

020072

EMGS

020136

EMS3

012532

42094
42104

3973
3338
6145
3014
6093
3546
3592

4505
4740
L1964

L1954

30A(1052)

13-MAR-80

09:36

F 13
PAGE 3-3

CROSS REFERENCE

TABLE == USER SYMBOLS

5715

5756

5819

5851

5885

5943

5986

6036

6064

6088

6118

42004

4751

6205

5720
6416

5761

5824

5856

5890

5948

5992

6041

6069

3004

3015«

3028

3069+

3092«

3100

3091

3338

3597

60614

5715

6222
6450

6027+

6150

SEQ 0161

36044

4921

51274

5072
5502
5516
5536

56584

EMTS

026264

EMTS

026357

ERRGZ

ERRG3
ERRG4
ERRG?
ERRG8

ERROR
ERRT1

ERRTZ
ERRT3
ERRT4

=
EVL
EXERR =

027514
027545
030474

54464

021510
002354
014562
016160
016212
016244

015070

015204
015464
015760
016056

43984

21alalalal

END
ERRFLG
ERRG1
ERRG10
ERRG11
ERRG12

53184

5761
6064
6241

(212 ala)

EMT7
EMT8
EMTO

026311

4807

002360
026044

031114
027206
031710

5819
6069
6246

5856
6118
6416

5885
6123
6423

4505
5890
6145
6429

4740
5943
6150
€434

4751

6439

4771
5986
6216
6445

5840+
6126+

5860
6136+

5876+
6153«

5893+

5977+

5995+

4422+

4433

4888+

4905

5948

5198

aoooc

EMTS

[V,
¥ 3
—

65364

3259
6072+
52934
56534

4251«

5810+
6096+

3744

3783
5068
6372

3792

6079+

FMDROP

023552

48614

6365

5071+

6509

3908+
5080
6514

5083+
6521

5097+

—h

4994+

ESEND = 002100
ESLOAD=
5

6305+

6308

017516
017545
017625
017652
017733

FMG4
FMGS
FMGH

016434
016465
016516

FMG3

FMG?7

FMGS
FMG9
FMS1
FMS2
FMS3
FMTO
FMT1

FMT11

FMT12
FMT13
FMT14

FMT1S5

FMT16

FMT19

FMT?2

016330

016362

016557

016630
016701
010600
010641
011742
024040
025074

027602

027633
027670
027725

027762

030017

031172

025143

FMT25
FMT3
FMT4
FMTS
FMT6

036104
025220
025304
026423
026454

FMTS
FMTO
FRSPAS
FRSTIM
FSAU
=
F$AUTO=
F$BGN =

026536
026601
002266
002264
000015
000020
000040

FMT?7

026505

41774

41784
41794

5621

4105

41734

G834

5184
41724

4073

L1754
5778

30344
30354
33524

49294

51324
54494
54504

54514
54524
54534
54544
56614
51334
6526
5086
51354
53214
53224
53234
53244
53254
4259«
4256
4419

2212

4459
5096

65374
51344

NI
S O

FMG20
FMG21
FMG22
FMG23
FMG24

FMG?2

L1714

017147
017223
017252
017331
017404
017473

017073

4075

NN
ES NN O —
OO
=
WO
WO OWWN

FMG14
FMG1S
FMG16
FMG17
FMG18
FMG19

FMG13

4066
4180#
(1814
41824
4147
41844
41854
41864
41874
4188%4
41894
4067
41904
41914
41924
41934
41944
4064
41744
4088

SEQ 0162

VLIV IV, TV, TW I L

016276
016752
017010
(017042

G 13

30A4(1052)
13-MAR-80
09:36 PAGE 3-4
CROSS REFERENCE TABLE -- USER SYMBOLS

AL
S O

FMG1
FMG10
FMG11
FMG12

OO0

CZDMIA.P11

FUNCTIONAL TESTS MACY11
13-MAR-80 09:34

NIANNCO

CZDMIAO DMR-11

CZDMIAC DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

5628
5707
5801
5872

5630
5725
5804
5875

5634
5729
5807
5894

6075
6154
6403
6738

6085
6156
6409
6751

6097
6172
6412
6779

6099
6186
6533
6791

6102
6189
6588
6808

6105
61N
6602
6835

6108
6195
6608
6846

6115
6199
6610
€859

6127
6283
6625
6878

4068

4099

4135

4143

4149

4154

9224
5352
5417
5522

5225
5356
5418
5525

22094
22094
22094

4461

5096
5261
5380
5487

5540

5628
5707

F $HARD= 000004

FSHW
= 000013
FEINIT= 000006
F$JMP = 000050

FSMOD = 000000
FSMSG = 000011
F$PROT= 000021
FSPWR = 000017
FSRPT = 000012

F$SEG = 000003

F$SOF
T= 000005
FESRV = 000010

F$SUB = 000002

FeSW
= 000014
FSTEST= 000001

GETPRM
GSCNTO=
GSDELM=
G$DISP=

020666
000200
000372
000003

GSEXCP= 000400

GSHIL
I= 000002
G$LOL
I= 000001

SEQ 0163

5623
5701
5800
5869

5965

FSCLEA= 000007
FSDU
= 000016
FSEND = 000041

H 13

30A(1052)
13-MAR-80
09:36 PAGE 3-5
CROSS REFERENCE TABLE =~ USER SYMBOLS

5968

4459
4853
2212

4730

5129
5266
5382
5490

5544

5971

4461
4858
4058

4830

5131
5289
5385
5499

5556

5630
5725

5634
5729

5872
5968
6085
6156
6409

5875
5971
6097
6172
6412

5894
5974
6099
6186
6533

22094

6878

6884

22094
22094
22094

2300
4246

2314
4399

22094
22094
g;gg

<12
4042
4154

6935
4058
4156

22094
22094

4223

4229

22094
22094

6918
4477

6922
4730

5974

4839

5178
529N
5389
5504

5560

5637
5731

5637
5731
5809
5896

5983

4858

5181
5315
5392
9506

5562

5647
5734

5647
5734
5828
5912

6000

4885

5190
5348
5401
5N

5649
5737
5830
5915

6020

4913

5200
5349
5403
5520

5653
5740
5833
5925

6021

4926

5682
5749
5836
5928

6033

5683
5753
5839
5931

6045

6129
6301
6677
6918
4158

5686
5773
5861
5938

6047

6132
6389
6687
6935
4164

5689
5774
5863
5940

6061

6142
6385
6727

4399

4439

5256
5372
5481
5533

5258
5374
5484
5538

4967

4990

4993

5601

5611

5233
5361
5480
5531

6073

6135
6383
6699

4966

5229
5359
5443
5528

5692
5777
5866
5952

5094

5566

5593

5595

5598

5683
5753

5686
5773

5689
5774

5615

5692
5779

5623

5649
5737

5655
5740

5682
5749

5701
5800

5896
5983
6102
6189
6588

5912
6000
6105
6191
6602

5915
6020
6108
6195
6608

5925
6021
6115
6199
6610

5928
6033
6127
6283
6625

5931
6045
6129
6301
6677

5938
6047
6132
6380
6687

5940
6061
6135
6383
6699

5952
6073
6142
6385
6727

5965
6075
6154
6403
6738

4061
4158

4068
4160

4070
6164

4099
5293

4102
5315

4135
5420

4139
5443

4143
5653

4145
5655

4149
5777

4735

4830

4835

4839

4916

4926

5258
5562
5863

5289
5595
5894

5349
5628
6021

5380
5630
6045

22094
22094

22094
5382
5647

6047

22094
22094

5593
6283
4271
22094
22094
22094
22094
22094
22094

4967
5417
5683

6073

2325
4885

4990
5481
5729

6075

2329
4913

5649
6301
4818

5682
6533
4286

2999

3088

4993
5504
5731

5094
5506
5773

5096
5520
5801

6097

6099

6127

4966

5131

5178

5774
6588

5800
6625

3180

3968

5896
6677

5129
5522
5828

6129
5200

5912
6699

5225
5538
5830

6154
5224

5952
6727

5256
5540
5861
529N

5965
6751

5348

6000
6779

5618

6020
6808

$480

6156
6835

5566

6172
6859

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA. P11
GENO

= 000000

GSOF FS=
GSOFSI=
GSPRMA=
GSPRMD=

000400
000376
000001
000002

GHPRML= 000000

GSRADA= 000140
GSRADB= 000000
GSRADD= 000040

GSRADL= 000120

GSRADO= 000020
GSXFER= 000004
GSYES = 000010

HALTC =
HDX
=
=
HELP
HICRC
HIWORD
HLT
=
HOE
=

1BE
=
IDU
=
1IECLR =
IE0C
IER
=
IESET =
INFACE
INFLAG
INISR
INRCY
INTER =

001000
002000

002376
002402
000002
100000
010000 G
000040 G
000020
000100
020000 G
000100
002262

002346
021772 G
002324
000015

INXMIT 002326
ISP12 = 000076
1SP7 = 000072

ISR
IXE

= 000100 G
= 004000 G

I$AU =
ISAUTO=
ISCLN =
I1SDU =
I$HRD =
ISINIT=
ISMOD =
ISMSG =
I$PROT=
1$PTAB=
ISPWR =
ISRPT =
I$SEG =

000041
000041
000041
000041
000041
000041
000041
000041

000040
000041
000041
000041
000041

1$SETU= 000041
000041
18SFT

22094
22094
22094
22054
22004
2209#

6880

113

30A(1052)
13-MAR-80 09:36 PAGE 3-6
CROSS REFERENCE TABLE == USER SYMBOLS

6881
6881
6881
6920

6882
6882

6920
6920

6881

6882

6920

6881
4745

6882
6039

6920
6067

2253
5045+
5021«

2279
5051
5046+

2700

SEQ 0164

22094
22094
22094

22094

22094
22094
22094
24014
2395#
21974
2604n
26064
2L2o6N
2343
2343
23434
23824
23894
2343
23794
25234
25794
4330
25654
24414
25664
24654
24644
2343
23434
2209#
22094
2209#
22094
68784
2209#
22094
2209#
41524

57794
22094
22094
22094

6091

6121

6148

5052+
5078

5053«
5086
4716

5077~

5078

5086

4675

4681

4696

4701

4578~

4684

4688

4586%

4704

4708

4503

4644

4630
4557

4636
4825

4016

4653
4382
4648

4670
4665
4724+

4052+
4661
4053«

4056
4670
4056

4379~
3963

4048+
4501
4049+
5375
5268

5422
5500

4696

4716

4721

4754

5534

44354

44614

48584
43994
69354

40584
41564

40704
41644

41354
54204

414634

41454

41494

5096
5593
6021

5225
5682
6099

5348
5731
6172

5349
5800
6301

5382
5801
6588

56534

56554

S777a

1
E%8:}:0p??R-11 FUNCTIONAL TESTS MACY11 30A(1052) 13-MAR-80 09:36 JPAéE
3-7
13~-MAR-80 09:34

[$SRV
1$SuB

000041

CROSS REFERENCE TABLE -- USER SYMBOLS

La77m

000041

47304

47354

48304
49904
53804

55954

I$TST

48354

SEQ 0165

48394

50944
S4174
56304

52564
55224
57734
60474
6779

000041

LSDUT
LSDVTY
LSEF
LSENVI
LSETP
LSEXP1
LSEXP4

LSEXPS
L $HARD

5547

[alalalalalalalalalalalalalalalalalalaYalaYalalaYq)

LSACP
LSAPT
LSAUT
LSAUTO
L$CCP
L$CLEA
L$CO
LSDEPO
LSDESC
LSDESP
LSDEVP
LSDISP
LSOLY
L$DTP
LSDTYP

()

JSIMP
LAST
LF
LOCATE
LOCRC
LOE
LOGDEV
=
LoT
LOWORD
=
LPLU

52244
5361
5487
5560
56824
5753
5869
5968
6102
6195
6608
6846

6133

44194
4459

26924

22774
2999
48534

26874

68784

3088

3180

3968

5550

6187

5599

6381

5687
6606

CZOMIAQ DMR-11

CZDMIA.P11

FUNCTIONAL TESTS MACY11
13-MAR-80 09:34

L$HIME
LSHPCP
LSHPTP
LSHW
LSICP
LSINIT
LSLADP
LSLAST
LS$LOAD
LSLUN
LSMREV
L SNAME
LSPRIO
LSPROT

3748

30A(1052)

13-MAR-80

CROSS REFERENCE

6318

09:36

K13

PAGE 3-8

TABLE -- USER SYMBOLS

SEQ 0166

6490

23004
L2464

69374

42234

LSPRT
LSREPP
LSREV
T
LSSOF
L$SPC

69184

L$SPCP
LSSPTP
LSSTA
LSSW
LSTEST

2325#
3535

LSTIML

LSUNIT
L 10000
L10001
L10002
L10003
L10004
L10005
L10006
L10007
- t10019
L10011
L10012
L10014
L10015
L10016
L10017
L10020
L10021
L10022
L10023
L10024

4283

23144
23294

026042
025712
026040
026262
027204

5190

52004

5261

5266

5251

5356

5359

5361

5372

5233

5352

5374

5385

5389

5392

5401

5403

54184

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA PN
13-MAR-80 09:34

L10037
L10040
L10041
L10042

L10043

L10044
L10045
L10046
L10047
L10050
L10051
L10052
L10053
L10054
L10055
L10056
L10057
L10060
L10061
L10062
L10063
L10064
L10065
L10066
L10067
L10070
L10071
L10072
L10073
L10074
L10075

027024
027202
027512
030472
030210
030300
030374
030470
031100
031000
031076
031144
031706
031500
031704
031744
032472
032124
032304
032470
032674
033054
033760
033204
033322
033440
033616
033756
034454
036044
036270

53804
54174
54438
5484
55044
55204
55384
55624
5598
56284
56474
56554
5686
57294
57734
57794
5804
58284
58614
58944
5915
5968
6033
60454
60734
60974
61274
61544
6186
6380
6602

036406
036456
036530
036566
037502
000400
000010
000004
040000
020000
002256
002302

6738
6791
6846
6878
6918
24024
26124
24154
23704
23714
25134
25354

000010
031102
000043
000001
002370

24134
5604
24554
26174
25964
3430
4269
4484
24144
3742
24064

036336

002300

020650
022526

023512 6

6687

2534n

30A(1052)

13-MAR-B0

09:36

L 13

PAGE 3-9

CROSS REFERENCE

TABLE =-- USER SYMBOLS

5487

5490

5499

5511

5525

5528

5531

5601

5611

5615

5623

5634

5637

S64L94

5689

5692

5701

5707

5725

5734

5807

5809

5833

5836

5839

5866

5925
5971
6061

5928
5974
6085

5931
5983
6102

5938
6000#
6105

5940

59524

6108

6115

6191
6385
6610

6195
6403
66254

6199
6409

62834
6412

65334

4537

5529
4525
424

3N
6732+

4006

3687
3688
3161

5278

5298

3022
3486+

307
3518

3094
3548

3233«
3583«

6304
5888

6347

6510

5759

48354

5854

5544

5556

5560

5737

5740

5749

5753

57744

5869

5872

5875

58964

6132

6135

6142

61564

4012

4590

4765

3272
3600+

3315+
3690+

3348«

335,
3939«

4021

55664

5690

6681+

4284

5533

4528
4529

3816«
6596+

3982

SEQ 0167

6785+

6840+

3697«

3404

3405«

3408«

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.PY
13-MAR-80 09:34

QUTFLG
QUTISR
OUTRCV
QUTXMT

002350
023054 G
002330
002332

0$3GNR=
O$8GNS=
~ U =
O$ERRT=
OSGNSW=
OS$POIN=
O$SETU=
PATCH

000000
000001
000001
000000
000001
000001
000000
037632

O0$APTS= 000000
O$AU
= 000000

PNT
= 001000 G
PRETIM= 000055
PRI
= 002000 G

PRIOO
PRIC1
PRIOZ2
PRIO3
PRIO4
PRIOS
PRIO6
PRIO7

=
=
=
=
=
=
=
=

P1
P2

P3
R

RBUF

000000
000040
000100
000140
000200
000240
000300
000340

010000
002352
002274
000207
025430

23434
23434
23434
23434
23434
23434
23434
23434

26504

RES
=
RESFLG
RESUME
RETURN=
REV1

RRAM

23434
24594
23434

002562

000044
000004
003630
000200
000200

RSEL4

22094
22094
22004
22094
22094
22004
22094
69294

6880
6881

RCOUNT=
RCV_
=
RCVBUF
RDI
=
RDO
=

RFLAG
RMODEM=
ROMADR
ROMI
=
ROMLOC
ROMO =
RQI
=

22094
22094

036566
036604
036625

= 000042

REVZ2

G
G
G
G
G
G
G
G

25824
4331
25674
25684

025432

002560
000017
002404
001000
025421
002000
000040
14

035170

6882

24548

3945+
47354
3942«
3943«

M3
30A(1052)
13-MAR-80
09:36 PAGE 3-10
CROSS REFERENCE TABLE == USER SYMBOLS

3965

4650

4756

4826+

4050%
4051+

4054+
4055+«

4057
4057

4810
4798+

4822
4820

4248

4421

4,887

2251
2251
2251
22284
22284
2251
22284
22284
2251

2251
2251
6937

5404

5423

3952
4330

433

3742

3752

2251
20251

68884

5276

26494
23854
26644
23784
23884

5844
4796
3799+
2994
2992

5873
6209
3832«
3083
3262

25844
25324
24704
4977+

4561%
4252«

4978+

26484
264428
20074
23754
5118
23744
23814
4696

5880

2440

6392«

5425

4020

6304

6322

6347

6510

68864
68874
5243

6043
23944

SEQ 0168

5873

6071
3250

4980

6183«
5491
3627
3628
S140#4
3644
3070
4701

5936

64014

5975

6095
4560

4690
4646

5294

6082

5975
6270
3833«
4482
3346

6125
5368

5296

6106

6139

6176

6193

6239

6252

6082
6419
3848

6106
6477
3876

6173

6193

6244

6250

3877

3948

3950

3979

3599
6152
5507

4737
6270
5814
4719«
4759

4828
6477

5710

5723

5726

5826

6594

6679%

6730+

6783+

6838«

6388+

6437

6442*

6478

6493

4999+

5018+

5024*

5099%

5126«

3403

3581

3955

4631

4653

6193

6197

4699«
4686

4710
4706

6238+
5613
4973«
3637

6271
5635
4986*
3643

3265

3314

5859

5892

4670

4675

4681

6400

6406

51424

51434

6233
5512
3636
3634
3232

4716

5975

6443

4721

5980

6500

5491

6082

5512

6106

5613

6112

5635

6139

5704

5750

5844

5846

5873

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:34
CZDMIA.P11
SAVE

SECN
SELO

002336

= 004000
= 002232

SEL2

002234

25734
23974
24984
3633«
4567

30A(1052)

3400*

3413

%
3434

2996
3634+

3070«
3637+
4630+
2992

3083
3641«
4631«
3012
4557«
5817
6095+

4570~

SELG

SFLAG
SFPTBL
SKIP
SPEED
STARES
STARST
START
STLU =
STREC =
STUP
=
SUBRPC

002236
002240

002342
002224
002344
002224
00227
020644
002272
010000
000200
000400
002366

09:36

N13
PAGE 3-11

CROSS REFERENCE TABLE =-- USER SYMBOLS

4298+

5754
6086
SELS

13-MAR-80

3415«

3158+
3643«
4636+
3336

3161+
3644>

3175

3628+

4482

4066

4737
5826+
6116

5713
6043+
6419

3479+

4604~
5514
3250
41461
4580«
5854

4610+

4579+
4799

4147
4588+
5888

3629+
4540
4904
6225

6486

6489+

6220
3321«

4968

4667

3641
3024+
3397«

3678«

SvCGBL= 000000

SEQ 0169

4103

=500
= NO— O
O OO NMANO
N~

SVCINS= 000001

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

B 14

30A(1052)
13-MAR-80 09:36 PAGE 3-12
CROSS. REFERENCE TABLE == USER SYMBOLS

5866
5940
6036

SEQ 0170

5869
5943
6041

SvisuB= 000001
SVCTAG= 000001

6751
SVCTST= 000001
SWOC
SWO01
sw02

Sw03
SWO4
SwW05
SWo6
SwO7
Sw08
W09
SW10
SW11
Swi2

swi13

5965

= 000001
= 000002
= 000004

=
=
=
=
=
=
=
=
=
=

000010
000020
000040
000100
000200
000400
001000
002000
004000
010000

= 020000

SW14
= 040000
SW15
= 100000
S$LSYM= 01000C

002334

TFLAG
002510
THRESH= 000013
THIL
= 000060

TH2L
TH3L

41544

5
61544

55044
5828#
65334

55204
5864
6625

5980
5980

6220

6251

6387

6482

6492

037502

T
000045
T8UF
002512
TCOUNT= 000044

TEMP

41494

= 000062
= 000064

TH4L
= 000066
TIMER = 000012

TOLONG= 000020

41584

51294
55384
58944
66994

41644

51314
55624
e
67514

CZDMIAO DMR=11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

C 14
30A(1052)
13-MAR-80 09:36 PAGE 3-13
CROSS REFERENCE TABLE =-- USER SYMBOLS

TSELG
035206
TSEL6
035210
T$ARGC= 000002

6395
6396+
22514

64074
64084
30114
40734
4141H
4980

6427
6432
30204
40754
L1628
507644

6503«
6504+
33334
40804
L1464
50864

T$CODE= 000032
TSERRN= 000023

68804
22094
63054

68814
30034
47604

6882¢
30144
47514

69204
30914
47628

6880#

68814

68824

69204

53894
55464
37014
58394
39764
61894
66874

53928
55564
57074
SB6GH
59834
61914
67384

54014
55604
57254
SBEH
60334
61954
67914

54034
55984
57348
58724
60614
6199
684L6H

68814

68824

69204

68824
2329

69204
4058

TSEXCP= 000000

T$FLAG- 000040

T$SGMAN= 000000
TSHILI= 000005
TSLAST= 000001
TSLOLI= 000001
T$LSYM= 010000

TSLTNO= 000023
TSNEST= 177777

T$NSO = (00000
TSNST1 = 000005

TENS2 = 000002

L0674
1404
4974
54254

22304
37154
39864
62164
64394
51814

22094
68804

22094
68804
22094

69374
22004

S4298

5254
5720
59924
6222
64454
51904

69374
68814
2314

22124

S433F

52720k
57564
60364
62278
64504
52294

23004

SL378

LOL3N

L0854
L1478
51184
S44TH
31834

477184

L04LH

LOBBA
L148BA
51844
5654
33384

33434

LOLOR

40974
41578
53004
6375
35464

40478

41054
L1638
S3054
65264

4112%
42928
S3094

4OSOF

L119M
43130
S313¢

L1264
48568
54214

LOGAN

4O66H

35924

35974

39734

39954

40104

49214

S50
SBS6H
61184
63748

55164
S8854
61234
6LTON

55364
SBO0F
61454
6423X

56204
59434
6150
6L2ON

S6424
59484
62064
6434N

53524

S3564

53594

S3614

S3724

53744

53854

5233

52614

S2664

54844
56014
S737H
58754
60854
63804

54874
S6114
S7404
59154
61024
63834

4068

4099

2329M

54154
5824w
60BBA
62614

S490F
S61SH
S7649M
59254
61054
63854

4042H

54954
S8514
60934
6264K

54994
56234
57534
59284
61084
64034

S0844

S1164

41334
49244
54224

4BI13X

S3784
S819F
606X
624OH

S0724

40578

4BO7H

53654
57704
6064H
62418
65254

23254

40934
41538
52964
5778

480K

5287M
57614
60414
62354
64734

23144

L04SH

SEQ 0171

51984

55114
56344
5804#
59314
61154
6409

55254
56374
S8074
59384
61324
64124

55284
S6864
SB094
S940#
61354
66024

55314
S6BW
58334
59684
6142
6608¢

S5533#
56924
58364
59714
61864
66104

4143

4149

4154

4158

4164

4399

4926

4990

5094

5129

5131

5200

5779
6283

5828
6533

5861
6625

5894
6699

5896
6751

5952
6808

4LOSBA

LO6BX

L0704

4099%

41024

1354
G24LON
48584

L1390
4399K
gggg:

L1434
LLIM
49134

L145K
LL39N
L916x

41498
LLSOR
4926K

L1528
LLOIR
L9668

L1548
4L4TTH
L9678

L1564
G730
49904

41584
47354
49934

41608
4B304
5094

4164K
4B354
SO964

4223
48394
51294

4853w
2131#

23824
35628

56178
55664

54184
55934

54204
55954

S4434
56284

SLBON
S6304

54BIN
S6L7A

55044
S6LOM

55064
56534

55204
56554

5538¢
5683%

55404
5720#

39124
61204

59524
61544

59654
61564

60004
61724

60204
62834

60214
63014

60454
65334

6047A
6588

60734
66254

60754
6677TH

55224
56824
58634
60974
66998

6099
67278

6127#
67514

22128
23004

6935
2314

40428

4058

40614

4068

40704

4099

4102#

4135

4134

4154
L4778
5131
55034
6000

41564
4730
51784
5649
60204

4158
47354
5200
56534
6156

41604
4830
52244
5655
6172%¢

4164
48354
5291

42234
4839
52934
5774
63014

4229
48534
5315
57778
6533

42664
4858
5348¢
5779
65884

4399
48854

58004
6625

5380
56304

53824
5647

4143
La19x
4913
54204
5896

66778

LO67H
5417

416458
4439
49164
5443
59124

6699

4 990

54814

23254

4149
L4598
4926
564804
5952

67278
49934
5504

2329

L1524
4461
49664
5566
59654

6751

5094
55064

67794

509¢#
5520

6808

5129
55224

68354

5225#
5538

6859

5256
55404

56824
6283
68784
52584
5562

6884

5289
55954

6918%

5349%
5628

6922

4229

5418

CZDMIAO DMR-11 FUNCTIONA_ TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

56834

T$PTNU= 000000
T$SAVL= 177777

T$SEGL= 177777
T$SUBN= 000000

T$TAGL= 177777

T$TAGN= C10104

TSTEMP= 000000

5773

58014

6075#

6097

6099

6127

2209
22094

4LBBSH

LO6GH

4967H

L9938

2205#
22054

564804
58304
66778

22094

L2468

1784
35404
59124
6779%

22774

43904
51814

37534
28694
59714

T$TSTM= 177777

57314

6073

33504
34B4k
5564
56494

TSTEST= 000023

5729

D 14
30A(1052)
13-MAR-80
09:36 PAGE 3-14
CROSS REFERENCE TABLE == USER SYMBOLS

61154
63804
67384

22094

54804
5830
66778

2209#

3546
4043
4075
4140
4164
4421
4813
4980

54814
58634
67278

23004

LLION

52264
55934
59654
6B354

2314M

LG3OF
51904

5361
568/N
55604
50554

57734
58724
59744

61274
63834
67514

4BBSH#

5481
5863
67278

2996

3592
4044
4080
4141
4248
4432
4855
4990

55064
59124
6779

23254

LGSO

55224
59654
68354

40428

L4778

S5404
60204
40014

L735K

5225
55954
60204
68784

5258k
S6304
60214
6918#

52934
56534
60474

L4OTH
52004

47304
52294

4B3ON
52334

23294

5372
5690
55624
S6B6H

5774
58754
59834

61324
63854
67914

4L966K

5506
59124
67794
3003

3597
40645
4085
4142
4262
4435
4856
4993

40584

53744
5699
55664
S689F

57794
58944
G000

61354
64034
68084

4068#

5380
55044
55984
56924

S804
SBIGH
60334

5828

SEQ 0172

61294

6154

58304

5861

SO964

S1784

5224k

55934
60214

S5954
60474

40704

41024

S6304
60754
L139

4B35H

4LBS3H

4BBSH

L0994

L1354

L1438

S3484
56824
60754

48394
52564

53854
S5114
S6014
57014

58074
59154
6045H

53494
56834
6099%
4BSBH
52614

53894
55204
S6114
57074

SBO9¥
59254
60614

53824
57314
61294

58634

52254

56824
60994
4145

52584

56834
61204
41528

41548

4L1SBH

L1648

4229

54034
55314
56284
5734

S4174
55534
5634#
57374

5418
55384
56374
57404

S828#
59284
60734

58334
S9314
608SH#

S4014
55284
562384
57294

49904
52914

5258

53484

5540
60204
6937

55934
6021

5595
6047

5630
6075

56824
6099

5683
6129

3742
4046
4088
4143
42&4
4436
4858
5072

3752
4047
4093
4146
4266
4439
4887
5074

3020

3817
4056
4097
4147
4268
4461
4907
5084

3085

3818
4057
4099
4148
4270
4505
4908
5086

3091

3952
4058
4105
4149
4285
4740
4911
5094

3177

3959
4064
4112
4153
4292
4751
4913
5096

50944
53154

58304
59404
61024

5522
59654
68354

5225

S4814
58014
6588¢

58364
59384
60974

61914
66104
6884H

3014

42234

L1498

54804
58004
63014

61894
66084
68824

3011

4160

55224
58634
6727

49264
52894

5224M

58014
65884

SS064
58304
6677R

54204
57774
61724

61864
66024
68814

51784

53824

58004
63014

49938

61564
65334
6BBON

5096

41564

53494

60474

49678

61544
64124
6859F

4993

S3484

57314
6172¢

6045

LOLEH

61424
640OF
68B4L6¥

4967

60214

4916

49138
52664

S3924
55254
S6154
S725#

5894

3183

3973
4066
4119
4154
4313
4762
4921
5116

S129#
53524

58614
5952¢
61054

SOOGN

S131#
5356w
54430
55444
S647N
57454

58664
59684
61084

61954
6625
69204

6199#
6687
69224

62834
66994
69354

5731
61724

58004
63014

5801
6588#4

3333

3995
4067
4126
4157
4330
471
4924
5118

5349

3338

4010
4068
4133
4158
4331
4802
4967
5129

5382

3343

4020
4073
4135
4163
4399
4807
4974
515

CZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA. P11
13-MAR-80 09:34

6150
6241
6383
6510
67N

6154
6246
6385
6520
6808

T$TSTS= 000001

22094

4BBSH

T$$AUT=
TS$S$CLE=
T$$0U =
T$8HAR=
T$$SHW =

L4198
L4598
48534
68784
23004

4439
L4610
4858
6884
2314

61724

010015
010016
010022
010102
010000

T$$INI= 010014
TSEMSG= 010056

TE$PRO=
T$$S0F=
T$ESRV=
T$$SUB=

010013
010103
010024
010072

T$8SW = 010001
T$$TES= 010101

63014

L2464
40424
6154
62234

4399
4L0S8

69184
L4778
49678

6922
4730
4990

23254
48854

41564

2329
4913

E 14

30A(1052)
13-MAR-80 09:36 PAGE 3-15
CROSS REFERENCE TABLE -- USER SYMBOLS

6156
6261
6403
6525
6846

6186
6264
6409
6526
6859

6189
6283
6412
6533

65884

66778

67278

6779

68354

40614

4068

40704

4099

41024

L966H

4158

47354
49934

49664

51784

L1604

4830
5094

5131

52244

4164

48354
5096#

51784

6191
6304
6416
6602
S3484

52934

4839
5129

5181

SEQ 0173

6195
6307
6423
6608

6199
6322
6429
6610

6206
6347
6434
6625

6216
6371
6439
6687

6222
6374
6445
6699

6227
6375
6450
6738

6235
6380
6473
6751

54804

55934

56824

58004

59124

5965#

60204

41454

4149

41524
5779

53494
5628
60214

5380
6304
6045

53824

5315

49164
52254

5190

5655

57774

5261
5401
5544
56824
5915
60204

6533
6791
T

110
111
112
112.1
112.2
112.3
1124
112.5
11377
114
115
116
117
118
119
T2
12.1
12.2

12.3
13
T4

023602 G

032474
032676
033056
033056
033206
033324
033442
033620
033762
034456
036166
036272
036340
036410
036460
024120
024120
024276

G
G
G

G
G
G
G
G
G
G
G

024720
025434 G

025566 G

2277

2277
2277
2277
60214
60474
60754
60994
61294
2277
2277
2277
2077
2277
2277
2077
2277
49674
49934

50964
2277

2277

48854

59124
59654

6020

61724
63014
65884
66774
67274
6779
6835#
49664

51784

52244

60474
5266
5403
5556
686
5804
5925
6033
6189
65884
6808

CZDMIAO DMR-11 FUNCTIONAL TL3TS MACY11
CZDMIA. P11
13-MAR-80 09:34
14.1
14.2
15
15.1

025566
025714
026644 G
026644

52254
52584
2277
53494

15.2
16

027026
030056 G

53824
2277

16.2
16.3
T6.4

030212
030302
030376

55064
55224
55404

76.1

17
17.1

030056

030636
030636
17.2
031002
78
031260
78.1
031260
78.2
031502
19
031762
19.1
031762
19.2
032126
19.3
032306
UAM
= 000200
UPDATE= 000011
WAIT1
002310
WAIT2
002312

WAIT3

002314

G
G

54814

2277
55954

56304
2277
56834
S7314
2277
58014
58304
58634
2343n
24334
25554
25574

25594

F 14
30A(1052)
13-MAR-80
09:36 PAGE 3-16
CROSS REFERENCE TABLE == USER SYMBOLS

53484
54804

55934

56824
58004

2987
3078

3954

4350~
3170

4355«

WAIT4
WMAINT
WMODEM=
WIYPE
X
=
XMTBUF
X$ALWA=
X$FALS=
X$OFFS=
X$TRUE=
$BACC

002316
002306
000005
002252
6
(03230
000000
000040
000400
000020
012274

25604
25464
2429#
25114
24584
26624
22094
22094
22094
22094
34684

$BASEI

011262

3228#

$BUFFS
$CCITT
$CLRQI
SCNTIN

013204
002410
010702
011516

3738%
26234
30684
gg%ld

6598
3779
3246
5488

6683
3858
3270
5509

$OMRIN
SERROR
$HALT

012064
012406
012560

$INOUT
$LOOP
$LSTIN=
$LSTTA=

014136
013062
000001
000001

33944
35174
35784
5808
3936#
36724
22154
22164
31434

3691
6281
4019
5950
6616
5557
5179

$MSCLR

SROMO

011064

012742

3954«
3675
3413
4287~
5251
3798+

5704

3971x
4394~
3692

6589
5608

5632

5934

3824«

3856

3887

3888

3949

3951

3980

5750

5873

5880

5936

5975

5980

6082

6106

6112

5264

5387
5969
6842

5485
6025

5507
6030

5526
6103

5552
6133

5599
6187

5687
6381

5735
6606

3484
5690

3586
5738

4637
5837

5497
5870

5622
5929

5644
5972

6058

6190

5357
6529
5234
5996
6689

5399
6856
5373
6609

5607

5632

5699

5747

5923

5926

5934

5402

5498

5518

5532

5645

5727

5764

5188

5350
6023

5383
6049

5482
6077

5523
6100

5542
6130

5684

5732

5284

6139

6193

6197

5805

5814

5834

5802
6685

36254

SEQ 0174

5231

5831
6736

4976

5864
6789
5015

6848

6378

(ZDMIAQ DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
SWAIT

01Cc%6

= 037744

29754

3234

G 14

30A(1052)
13-MAR-80 09:36 PAGE 3-17
CROSS REFERENCE TABLE == USER SYMBOLS
3266

26504

26578

26624

2664A

26694

5374
5528
56594
5804
5931
6115
6409

5385
5531
5686
5807
5938
6132
6412

5389
5533
5689
5809
5940
6135
6602

5392
5544
5692
5833
5968
6142
6608

5601
5556
5701
5836
5971
6186
6610

5403
5560
5707
5839
5974
6189
6687

54554
5598
5725
3866
5983
6191
6738

5190

5229

5882

3474

26424

5181

5848

3407

22034

51414

5816

3331

gzg?

4862

5752

3316

2583

5233

5939
5261

SEQ 0175
5614
6114

36054
5361
5511
5753
5925
6105

6385

5636

6141

CZOMIAO DMR-11 FUNCTIONAL TESTS MACY11
13-MAR-80 09:3¢4
CZDMIA.PT1
BACCIR
BACCIT
BASEIN

2892#
29184
2795#

BCOMPL

5867
154

BGNAU
BGNAUT
BGNCLN
BGNOU
BGNHRD

234
314
394
47N
SS#

BERROR

BGNHW

BGNINI
BGNMOD
BGNMSG
BGNPRO

BGNPTA
BGNRPT

BGNSEG

BGNSET
BGNSFT
BGNSRV
BGNSUB

BGNSW
BGNTST

154

778
854
o84
1064
1144
1444
152#
1614
1824
1934
2014
5683
2254
2364

6301

BNCOMP
BNERRO
BREAK
BRESET
CALL

2664
2704
2744
2784
273%#

CKLOOP
CLEAR

2824
2774
864
2864
2924
296#
28234
3014
3224
3174
34
3464
3604
2844n
3764
3804
3854
3894
4014
4134
4254
4414

CLOCK
CLOSE
CLRVEC
CNTRIN
(OMMEN
DELAY
DESCRI
DEVTYP
DISPAT
DISPLA
DMRIN
DOCLN
DODU
DORPT
ENDAU
ENDAUT
ENDCLN
ENDCOM
ENDDU

5844
5704
5231
5916
22054
22004
22094
2205#
2209#
22094
22094
22094
22094
22054
22094
22094
22094
22094
22094
22094
22054
22094
22094
5731
22094
22094
6588

22094
22094
22054
22094
3691
6689
2209#
5179
5913
2209#
22094
22094
5488
22094
22094
2209#
22094
22094
2209#
5357
22094
22094
22094
22094
22094
22094
22094
22094
2209#

5873
5750
5264
5969

4265

3247

H 14
30A(1052)
13-MAR-80
09:36 PAGE 4
CROSS REFERENCE TABLE -- MACRO NAMES

5975
5846
5354
6025
4267
3267

6139

6193
6112
5507
6187

6197
5526

SEQ 0176

6381

5599
6606

5687

5735

5805

5814

5834

6203

4419
4459
4853

6878
2300

4246
2212
40462
4223

4061

4070

4735
4993
5830

4835

4966

4139

4145

4152

4156

4160

5293

5420

5653

5777

6047

5258

5349
6075

5382
6099

5481
6129

5506

5522

5540

5595

5630

5178
6779

5348

5480

5593

5682

5800

5912

5965

6020

6172

3317

3332
3177

3475

4976

6740

5015
6748

5101
6793

5552
6801

5557
6842

6281
6848

6399
6856

6405

6529

6598

6616

5226
6023

5259
6049

5383
6100

5482
6130

5523
6184

5542
6378

5596
6600

5684
6685

5732
6736

5802
6789

6844

4262
5529

4432
5561

6307
5738

6371
5837

6520
5870

5929

5972

6058

6190

6384

3088

3180

5390

5399

5699

5747

5923

5926

5934

6727

4286

3085

4908
4507

4102

5096
5863

5632

5831

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P1
13~-MAR-80 09:34
ENDHW
ENDINI
ENDMOD

4654
4754
4874

ENDPRO
ENDPTA
ENDRPT
ENDSEG
ENDSET
ENDSFT
ENDSRV
ENDSUB

ENDMSG

ENDSW
ENDTST

EQUALS
ERRDF

ERRHRD
ERROR
ERRSF
ERRSOF
ERRTBL
ESCAPE

22094
22094
22094

2314
4399
6935

5124
5204
5254
614
5554
5684
S804
964
5729

22094
22094
22094
22094
22094
22094
22094
22094
5773

4229

6533

6625

5004

614w
624H

6428
7144
4751
5365
5824
6118
6423
78y
7228
7268
7304
734k
7640
5389
5560

5737
5925
6115

22094

22094
2209
22094
22094
5392
5598

5740
5928
6132
6608

8244
8344

22094
22094

8484
8594
8684
B74H

22094
22094
22094
22094

GMANID
CIANIL
GPHARD
GPRMA

GPRMD
GPRML
HEADER
INLOOP
I0SETU
IOSTAR
KT11
LASTAD
MANUAL
MEMORY
MSBYTE

8294
8394

9034
9348
9544
9624
668
9740
9824
11474
1162#¢
11664
20004

6143

6922
4730
4990
5828

4830
5094
5861

4839
5129
5894

4926
5256
6045

6073

6097

6127

6154

6699

6751

6808

6859

5291

5618

5566

3014
4802

3091
4807

3183
4813

3338
4921

3343
5072

2343
3003
4771
5415
5856
6145
6434

GETBYT
GETPR]

GE TWOR
GMANIA

4135

22094
22094
4762

6602
778
8104

4099

2329
4913

EXIT

FEQUAL

4068

22094

513

5380

4154

4158

4164

5315

5443

5655

5779

5504

5520

5538

5562

5628

5647

5649

5774

5896

5952

6000

6156

6283

3592
5084

3597
5116

3973
5198

3995
5239

4010
5254

4505
5272

4740
5287

5372
5533
5707

5374
5544
5725

5385
5556
5734

5617

5495
5885
6150
6439

5502
5890
6206
6445

5516
5943
6216
6450

5536
5948
6222
6473

5620
5986
6227
6525

5642
5992
6235

5715
6036
6241

5720
6041
6246

5756
6064
6261

5190
5403
5611

5229
5484
5615

5233
5487
5623
5807
5968
6189
6791

5261
5499
5634

5266
5499
5637

5352
5511
5686
5836
5983
6199

5356
5525
5689

5359
5528
3692

5361
5531
5701

5761
6069
6264

5770
6088
6374

5819
6093
6416

3546
5181
5401
3601

5749
5931
6135
6610

6687

4285
6880
6882

6881
6920

5753
5938
6142

22094

22094
22094

22094
22094
22094
22094
22094
22094
22094
2209
22094
22094
22094

5200

5289

4149

SEQ 0177

4058

22094
22094

5378
5851
6123
6429
22094
22094

114

30A(1052)
13-MAR-80
09:36 PAGE 4~1
CROSS REFERENCE TABLE == MACRO NAMES

2251

6937

3818
22514

5804
5940
6186
6738

5809
5971
6191

6846

5833
5974
6195

5839
6033
6380

5866
6061
6383

5869
6085
6385

5872
6102
6403

5875
6105
6409

5915
6108
6412

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-B0 09:34
MSCHEC
MECNTO
MECOUN

21184
21824
20664
40734
L1468

g%;é:

MSDATA
MSDECR

MSDEFA
MBENDE

18674
2029#

L439%

32914
37294
61560

gggg:

22094
22094

LLOIX

53154
57734
62834

68804
30114
4080
L1484

53004

22514
23144

47304

53804
S7764M
65334

26874
23204

4LB30N

56174
S779
66254

53094

26924
40584

4B39F

54184
SB28
6699F

69204
40434
40934
41638

53134

40684

4BSBN

54434
SBO1A
67514

40L4H
40974
42924

LOLSH
41054
43134

54228

40464
41124
LBSOH
S4254

4047H
4119
4924

4OSOR
4126
4O74M

4LOS7H
4133
4OBON

4LO64X
4140
50744

4LOGEX
4141
SOB6#

4O67H
41428
S118#

41354

41434

L1498

4154M

L1SBH

L1648

42294

4399

5504
SBY4H
68084

55204
SBOGH
68594

S5384
59524
6884N

55624
60004
69224

5S664
60454
69354

56284
60734

56474
6097H

S6LOK
61274

56554
61544

54214

40994

4913K

49264

49904

5429

S094H

S433

51294

S4374

51314

5441

S2004

5654k

52564

57784

52894

68804
23144
48304

68814
23294
4B394

68824
40584
48584

69204
40684
49134

40994
49264

41354
49904

41434
S094k

4149
S1294

4154
51314

41588
S2004

41644
52564

43998
52894

44394
52914

57734

57744

57794

5828#

S8614

58944

S8964

59524

6000

6045#

60734

60974

61274

61548

61564

1649%
47608
32874
58194

2209#4
L7518
53654
58244

30034
47628
53784
58514

30144
47714
S415#
58564

30914
4BO2A
54954
58854

31834
4BO7A
55024
SBOON

33384
4BI3H
S5164
59434

33434
49214
55364
59484

3564
50724

35024
S0B4H

35974
51164
57154
60364

39734
51984

39954
52304
57564
6064#

40104
S2S4m

45054
52724

5380

54174

55044

5520M

SS3BA

55624

61504

62064

62164

62228

51814

51904

52294

52334

S2614

52664

53524

22094

51814

51904

52294

52334

52614

52664

53524

22094
22094
22094
22094

68804

68814

68824

69204

MSESCA

20064

22094

MSESCS

20104

MSEXCP
MSEXIT
MSEXSE
MSEXTJ)

21014
20144
20224
2018¢

40008
43994
49168
22584
25044
26554
5894
61294
68354
19384
20354
4439%

54434

61454

61234

20384

56184

56204
59864
62274

61184

MSGENB
MSGETS

53054

68824
33334
40884
41578

22094
22094
47304

60934

MS$GEN

68814
30204
40854
L1534

SEQ 0178

21704
20744
44614

53154

MSERRI

22094
22094
22094
40754
L1478

J 14
30A(1052)
13-MAR-80
09:36
PAGE 4=2
CROSS REFERENCE TABLE =-~ MACRO NAMES

22094

41028
LL1ON
426K
52894
55064
56824
58964
61544
68594
22094
22094
L461H

22514

2277k

23004

23144

23254

2329

26874

5566

56424
59904
623584

56284

S64L7H

56494

56554

57004

641X

5720
60414
62468

S3564

53594

S3614

S3724

S374m

53854

53564

S3594

S3614

53724

S3744

S38SW

26924

4042#

4OS8H

62618

57614
60694
62648

57704
6OBSH
6374M

4061H

4LOGBY

4O7OW

L1354
LL3ON
LO6ON
52914
55204
56834
59124
61564
68784

L1394
LLSOF
49678
52934
55224
57294
59524
61724
6BBLH

L1438
LLOIX
49908
53154
5538
57314
59654
62834
69184

41454
L4T7TM
49934
53484
55404
S7734
60004
63014
69224

41498
4730M
50944
S34O#
S562#
S7744
60204
65334
6937

L1520
47354
SO96H
53804
55664
S7774
60214
6SB8H

4154m
4B30A
S1294
5382#
55934
S779
6045H
66254

L1568
4B3SH
S1314
54174
55954
58004
60474
66774

4L158F
48304
51784
54184
56284
58014
60734
669

4L160#
48534
S200F
54208
56308
58284
6075
67278

L1648
4BSBH
S224#
54434
56474
58304
6097#
6751

423X
48854
52254
54804
5649#
58614
60998
67794

42464
4O13#
S2564
54814
56534
58634
1274
68084

23144
G730

23294
4B30H

40584
48394

406BH
4BSBH

409N
49134

4135H
49264

4143
4990

Q140N
50944

41548
51294

4LISBA
S1314

L1648
S200#

42298
SO564

43994
5285

CZOMIAO DMR=-11 FUNCTIONAL TEST> MACY11 30A(1052) 13-MAR-80 09:36 KPL%E 4-3
13-MAR-80 09:34

CZDMIA.P11

52914

CROSS REFERENCE TABLE -~ MACRO NAMES

53804

54184
58284
66994
52294
54844

S774#

MSGETT

SEQ 0179

55384

56554
6154

MSGNGB

MSGNIN

S974m
60754

62274

69224

MSGNL
S
MEGNSU

49934

58304
23294

MSGNTA

48394

54184
58284
66994

MSGNTE

67274

MSHAPT
MEINCR

4044H
40804

23004
35924
40454
40854

65254
68784

55224
41584

52004
56474
60974

61544

59124

60204

30914
39734

31834
40104
40684
41334

41154

CZDMIAO DMR=11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34

L1394
L1584
4330
L7514

L1608
41604
L3314
L7620

4161
61634
43998
47718

——

0944
2334
3309w
33854
6414
35224
598
6554
376404
3809,
38754
59654
601X
61234
C199#
63474
O4L5H
?983:

50964
52304
53134
538
56434
55254
56014
56824
57494
58194
5885
5968%
6064H
61274
62064
63714
GLSOF
gggg:

MSLDRO

19420

22094

MEBMASK
MSMCHI
MEMCLO
MEMSK1

16714
oF
16244
16774

22094
22094
22094
22094

411N

M$POP

MSPRIN

MSPUSH

MSPUT

MSPUTT

MSRADI

L 14

30A(1052)
13-MAR-80 09:36 PAGE 4=4
CROSS REFERENCE TABLE -- MACRO NAMES

41428
G166
G419k
4BO24

41463K
L2238
4421A
LBO7A

L1465
L2464
44328
48134

L1468
L2UBE
GA3SH
4B3SH

51164
5254M
53154
53924
54B0K
55284
56114
56834
5753
58244
58904
59714
60694
61294
G216
637644
GL73H
67384

51184
52564
53484
54014
54814
55314
S6154
56864
57564
58284
58944
59744
60734
61324
62224
63754
65104
67514

51294
52584
53494
S4034
S48B4N
55334
56204
S6BOH
57614
58304
SBOGH
59834
60754
61354
6227
63804
65204
67794

51314
52614
53524
54154
S4B7H
55364
56234
56924
S7704
58334
59124
S9B6#
60854
61424
62354
63834
65254
67914

S5178#
52664
S3564
54174
5490
55384
S6284
57014
S7734
58364
SIS
5992¢
60884
6145K
6261
63854
65264
6808¥

37524

38174

39524

40204

L9164

49214

L9244

49664

4148H
L264LA
L4394
LBSSH

41498
L266K
44SON
4BSOH

S1814
52724
53594
SL184
54954
SSL0M
S6304
57074
S774M
S8394
S9254
60004
60934
61504
62664
64034
6533
6B3SH

S1844
S2B78
53614
54208
54994
55448
5634#
S7154
57774
58514
59284
60204
60974
61544
62614
64094
65884
68464

424BA

L2628

4967

L1678
L202M
LG36H
L8534

SEQ 0180

4974A

41528
42688
LGOI
4BSBN

4153
4270M
4G77A
4B8SH

41548
42BSH
4505
4LBB7N

41564
42924
47358
4907F

41578
4313
47404
49084

S1904
5289
S3654
54214
55024
55564
S637K
57204
5778
58564
59314
60214
60994
61564
62648
64128
66024
68594

S198#
52914
5372
54208
55044
55604
S64oM
57254
57794
58614
59384
60334
61024
61724
62834
6L16H
660BH
68784

52004
5293
5374
54254
55064
55624
5647
S7294
S8CO#
58634
5940
60364
61054
61864
63014
6L2IN
66108
69184

52244
52964
53784
54294
55114
55664
S649F
57314
58014
58664
59434
60414
61084
6189
63044
GL2IN
665K

52258
53004
53804
54334
SS164
5593
56534
5734w
58044
58694
590484
6045
61154
61914
63074
GL34N
66778

52204
53054
5382#
54374
55204
55954
5654a
57374
58074
58724
5050#
60474
6118#
61954
63224
6L3W
G687

4264LA

L266M

L2684

L2TON

42BSH

4432M

4435A

L9BOX

49904

49934

SO724

50744

SOB4H

50864

18814
L430N
22914
57004
HI156K
6364
40734
L1668
51844

22094
LLOTX
53154
57734
62834
22094
L0754
L1478
52964

23164
L7304
53804
S7764M
65334
30114
4080N
L1488
53004

23294
LB30N
54174
5779
6625H
30204
40854
4153K
53054

40584
4B3OK
S418F
5B2BN
66
33334
40BBK
L1574
S3094

40684
4BSBA
54434
58614
67514
40634
40934
41634
S313¢

40994
4913
5504
58944
6BOBH
4044H
40978
42924
54214

L135H
49264
55204
58964
68594
4L0LSH
41054
L3138
SL224

41438
49904
SS5384
59528
68BLH
4046K
41124
4BSOH
S425#

L1498
50944
55624
60004
69224
4047
L119K
4924
S429F

4154
51294
55664
6045
69354
4L0S6M
41268
4974
S4334

G158
S1314
S6284
60734

L164E
52004
S6L74
6097F

42208
52564
56498
61278

4399W
52894
56554
6154@

4LOSTA
4133M
4LOBON
SW37M

4LOGLE
L1408
SO744

5441M

40668
41418
SO864
5654w

40678
41428
S1184

16314
LO4ON

22094
LLTIN

22124
GLSM

23GON
G477

23254
L735H

4042¢
4B35H

40614
4BS3H

40704
4BBSH

41024
49168

41394
49668

41454
49674

415284
49934

41564
SOO6H

41608
S1784

4223%
52248

225K
56534
609
19720

40674

52584
56824
61294

22094

L0734

L1624
49764

L1460
L9BOF

19814
40674
L1420

52934
56834
61724

5348
57314
63014

4075

40BO#

30114

30204

53494
57774
6588

33334

40BS5H

S3BoA
S800#
66774

37428

40884

5420
58014
67278

L043F

40934

SLB8(W
58304
67794

54814
58634
68354

4046H

G04SH

40974

41054

L147H
5074M

L16BH
50864

LTS3
51184

41574
5184

41638
52964

42928
S3004

43134
S3054

4976k

22094
40734
L166K
L9B0W

30114
4075H
Q167K

30204
4080
41488

33334
40854
L1538

37424
40884
L157M

40434
4093F
L1630
52964

4044H
40974
42928
53004

4045#
41054
43138

20774

094

68804

50744

S0BGH

68814

51184

68824

5184k

69204

53054

55064
59124
6878¢

55024
50654
69184

55404
60204

57788

5593¢
60214

55954
60474

56304
6075#

4OSTAH

4OGLE

4O66N

G04ER

40474

LOSOH

4330
S3094

43314
S3134

4LLO1A
54214

4LBSGH
SL22K

4LBB7N
54254

494N
54208

4LO46H
41128
43304

4047H
41198
43314
5313w

40SO6H
41264
44O1H
54214

4057
41334
LBSEN
56228

4OGLN
41400
4LBBIN

4OG6N
414N
49244

41124

S3094

4119

41264

41334

41400

5425

41414

5409

M 14
CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
13-MAR-80 09:36 PAGE 4=5
CZDMIA.P11
13-MAR-80 09:34
CROSS REFERENCE TABLE -~ MACRO NAMES
MERBRO

MERNRO
MSSETS

MSSTAR
M$SVC

19524

22094
22094

32254
56534
609

52584
5682
61294

LOLON

17334
19334

3592

40468
GO974

L1498

3130
4802

49804
51904

METLAB

2209#

19624
20324

32914
5378
56334
35204
55984
6834
57534
58304
5896
5992
6093
6150
6261
64120
6608#
19294

35924

LLTW

2209#
22094

3597

4047
409
1534

43304
4807
49904
5198

38184
22124
LLS

4285+
23004
G477H

23254
L7358

4061
4BS3N

40704
4BBSH

41022
4916K

4139%
466X

52934
56834
61724

53484
5731
63014

53494
57774
65BBH

5382
58004
66774

S4204
S8014
67274

S4BON
SB304
6779

54814
58634
68354

SS064
59124
68784

29964

3003

30114

3014

30204

30854

3091

31774

4067
41354
L2LBA

40684
L1408
L262M

4073
4141

37420

4056
L1054
4154

43314
4813

49934
52004

37524

4057
L1128
L1578

L3998
4B55H
5072
52254
53054
53854
54438
55284

38174

LOSBA
4L119F
L15BA

LL2TN
LBSOH
50744
52204

52964
53804
54378
55224
S6014
5686
5756
5833¢
59154
6000#
60974
61564
6264
6416

53004
53824
S641M
55254
56114
5684
5761
58364
59254
60214
60994
61564
62834
6423

S6154
56924
5770
58394
59284
6033#
61024
61864
63044
6429

53094
5389
S4B1X
S5314
5620
57014
57734
5851
S9314
6036
61054
61894
63074
6434

22094

29964

3003#

30114

35974

4042#
LB3SAH

SEQ 0181

37420

37526

38174

38184

4064
412¢
L163F

L432N
4BSBH

5084
5233
S3134
53924
54B4N
55334

39524

40GOH
Q1334

L1GLN

4LG3SH
4BB7HN

50864
5239
S3154
54014
54874
5536

39594

4436
49074
50944
5254
53494
54034
54904
35384

3973

4439
49084
S0964
52564
53524
5415
5495
5540

3995

5116
52584
53564
S4174
54994
55444

51184
52614
53594
54184
5502
55564

4L61M
49114

S6304
5720
S779%
58634
5943
60474
6118
61994
63714
6450

S6344
57254
S8014
58664
5948
60614
6123
6206
6374
6473

56374
5729
58044
58694
59524
6064
61274
6216
63754
65104

30144

30204

30854

30914

31774

39504

3973

3183

4010

L264K

56284
5715
57784
38614
S9404
60454
61154
61954
6347H
6445
3952#

55224
59654
69184

40754
L1428
L266K

56234
57074
57744
5856
59384
6041
61084
61914
63224
6439
3818¢

41454
49674

39954

4505
4913¥

5642
5731a
58074
58724
59684
6069
61294
6222
63804
65204
31834

40104

41524
49934

55404
60204
33334

40204

4080
L1438
GL26BE

4740
4921

51294
52664
53614
54214
55044
55604

S647H
5734
58094
58754
59714
60734
6132
6227
63834
6525
33334

40204

41564
50064

55934
60214
3338

40434

41604
S1784

55954
6047H
3343

L044N

42234
5204#

56304
6075
3546

4LO4SA

40854
L1468
G270

40884
41478
4L28SKH

40934
4148
42924

51314
5272

51814
5287
S3724
54254
55114
55664

5184«
52854
5374
5429
5516
55954

4751
49248
5365
54228
55064
5562#
S64H
S737M
5819
5885
5974
60754
61354
6235
63854
65264
3338¢

4L043H

4762
49678

S654M
57408
5824
5890
5983¢
60854
61428
6241
64034
65334
3334

L044N

477
49744

56554
57454
58284
5894#
5986
6088
6145
6246
64094
66024
35464

4045H

40468
40074
41494
43130

4047H
409
4L153K
43300

LOSOH
L10SK
Q154K
4331

L0S7H
L1120
G157
4399F

LOSBA
L1ION
L1SBE
LL2IX

L0GAH
4126
L1638
L432K

LOGOH
41338
4164
G4L3SH

4067H
41354
L2LBE
LL36H

406BX
41408
L2628
443N

40734
4141
4264LN
44T

407SH
L1620
466K
4SOSH

40804
41438
L26BN
47608

40854
L1468
42708
4751

4088
41478
42854
L7628

4093#
41484
42924
477N

49804
21904

4
51984

49934
52004

5074
5229
53094

50844
52334
S313¢

50864
S230#
53154

5094
S254M
S3494

S09H
52564
5352#

51164
52584

S11B¥
52614
53594

51294
52664
53614

S1314
52728
53654

S1814
5287
53724

S5184a
5289w
5374m

SO37M

53824
56414

50724
52254
33054

52914
53784
4334

56834
37534
58304
8964
59924
60934
61504

62614

57564
58334
59154
60974
61544
62644

36894
57614
58364
59254
60214
6099
61564

62834

53854
544L3K

53894
S48IN

S3024
5484

5692
5770
SB39
5928¢
60334
61024
1

57014
5773
58514
59314
60364
61054
61894

57074
57744
58564
59384
60414
61084
61914

6304

63074

63224

SL01H
54B7H

54034
5490

S41SH
54954

57154
57784
58614
59404
60454
61154
61954

S720
57794
5B634#
59434
60474
61184
6199F

57254
58014
58664
5948¥
60614
61234
62064
63744

63474

63714

53564
S417
54994
5729
58044
58694
59524
6064¥
61274
62164
63754

SL1BN
5502
5731
58074
58724

606N
61298
62228
6380

5421
55044

54228

5734M
SBOSH
58754
59714
60734
61324
6227Th

S737M
58194
58854
59744
6075#
6135
62354
63854

63834

54254
55114

5516

S7408
58244

5749w
S828#

S983

S9B4W

61424
62614

61454
62464

6405

N 14

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11 30A(1052)
13-MAR-B0 09:36 PAGE 4=6
CZDMIA.P1N
13-MAR-80 09:34
CROSS REFERENCE TABLE == MACRO NAMES

45054
52724
57704
60884
6374k

16824
1714
11764

22094
22094
22094

4073

4075

12394

5300

1279%#
13194
13594
13994
14034
14084
14134
1418%¢

SHUTDN

28764

SLASH
STARS

14248
14384

Sv(C

WAIT

XFER
XFERF

22094

5305

22094
22094
22094
22094
22094
2209#
22094
22094

4019

22094
22094

22514

47514
53654
58264
61184
64234

2228
3011

3020

4043

30914

4802
54954
SBBSH
61504
6L39M

4044

31774

4067H
4135H
L24BH
4LL36K
49074
50944

LOGBA
L1408
4262
4L39F
4908F
50964

40734
41414
L2064
L46TH
49114
S116#4

5254
53494
S4034
SGO0M
SS3IBM
S6304
S7204
S779h
SBOIN
S943M
60474
61188
61998
63714
64SON
31834

48074
S5024
SB90#
6206#
6LLSH

4045

39734

52564
5352
S41SH
S495H
55404
56344
57254
58014
SBOGH
S94BH
6061H
61234
62064
6374
6L7IH
3338

4B134
55164
59434
62168
64504

4046

39954

40754
41428
L266M
4505
4913
S1184

33334

40204

4L080N
L143H
L26BN
4760
4921
51294

33384

4043¢

40854
146K
L270M
475
492N
51314

33434

L044H

4088¢
41478
428SH
47628
467K
S1814

52614
53504
54184
55024
55564
56428
57314
58074
58724
59684
6069F
61294
62228
6380
65204

5266
53614
54214
55044
55604
56474
5734
58094
58754
5971
60734
61728
62278
63834
6525

52724
53654
54224
5506¢
55624
S6LN
S737%
58194
58854
5974w
60754
41354
62354
63854
65264

52874
53724
54254
55114
55664
5654
57404
58244
589504
59834
60854
61424
62414
64034
65334

33434

35464

35924

35974

39734

49214
55364
5048
62228
64734

50724
56204
59864
62278
65254

6047

4056

4097

4105

4112

6119

5309

5313

5421

5422

5425

5429

5433

5437

4264

4266

4268

4270

3752
3742

3952
4330

4020
4331

4248
4421

4856

31834

40104

5258
53564
54174
5499
55444
S637H
5729
5804
SBEON
59524
6064H
61274
6216H
63754
65108

4093

50844
56424
59904
6235
68804

4057

35464

40454

40934
41484
42924
47714
4974N
S184w

52894
5374n
54294
5516w
55954
56554
5749¢
58264
58944
5986w
6088#
6145#
62464
6LOK
66024
39954

51164
57154
60364
62L1M
68814

51984
57208
60414
64N
68824

5230w
57564
6064H
62614
69204

4064

4066

4067

4126

4133

4140

4141

4142

5441

5654

5778

6375

6526

5645

5727

5764

5308

5950

3474
5816

3484
5848

3584
5882

3586
5939

3588
5982

4924

5234

5492
6032

5497
6060

5513
6084

22094
22094

30144

4771
54154
58564
61454
GL34H

30914

4088

2209

16124
16768

3333

52334
53134
53924
S4BAN
55334
56234
57074
S774M
SBSOH
5938¢
60414
61084
61914
6322
G430

LOGOH
L1334
L164K
4L435H
4BB7H
SOBGH
5230
S3ISH
54014
S4B7H
5S364
5628
S7154
57784
SBOIN
S940#
6045H
61154
61954
63474
64LSH

30854

39504

4085

22084
3234

30034

47628
53784
58514
61234
64298

4LOG4H
41268
L1638
L432N
LBSBA
50844

30204

39524

4080

14524

27504

22774

47408
5287M
58194
60934
GLIGH

S229M
S3094
538O4
S54BIN
55314
56204
57014
57734
58514
59314
60364
61054
61894
63074
6434N

38184

3246

5267

3266

5614
6114

5360

3270

5622
6141

5373

3316

5636
6202

6322
4887

5402

3327

5644
6411

6304
5498

634
551

3407

3428

~no

22094

52254
53054
S3B54
5463M
55284
S6154
56924
S770
58394
5928
60334
61024
61864
63044
6429

L0S8F
L119F
L1588
L42IN
LBSOH
50744

30144

19944

40104
32544
57614
606
62644

52004
53004
53824
S64L1M
55254
S6114
56894
57614
58364
59254
60214
60994
61564
62834
662X

LOS7A
41124
L1578
L399F
LBSSH
50724

30114

38174

PRINTF
PRINTS
PRINTX
READBU
READEF
RFLAGS
SETPRI
SETVEC

51984
52964
53804
56374
55224
56014
56864
57564
58334
59154
60004
60974
61544
62644
CLIOH

LOSOH
41054
Q156H
L3314
4BI3N
4993

30034

37524

(¥ )

PRINTB

1904
2914
53784
24334
35204
25084
683,
37534
38304
38964
39924
6093#
61504
62614
GL120

376424

MEXFER
OPEN
POINTE

L0478
L0994
L1534
L3304
4BO7H
49904

29964

~
~no
&H

MEWORD

35974

—

40468
40074
L1698
43130
48024
49804

22094

35924

19214

METSTL

SEW 0182

CZDMIAO DMR-11 FUNCTIONAL TESTS MACY11
CZDMIA.P11
13-MAR-80 09:34
XFERY

16204

22094

. ABS.

037744

000

ERRORS DETECTED:

CZDMIA.BIN,CZDMIA.SEQ/CRF
/NL : TOC=SVC34R.MLB, CZDMIA.P11

RUN-TIME: 118 144 13 SECONDS

RUN-TIME RATIO:

CORE USED:

17K

507/277=1.8

(33 PAGES)

B 15

30A(1052)
13-MAR-80
09:36 PAGE 4=-7
CROSS REFERENCE TABLE == MACRO NAMES

CEQ 0183