Digital PDFs

AH-T801A-MC

July 1984

235 pages

Original

117MB

view download

OCR Version

161MB

view download

Document:	CZDHXA0 DHU11 DHU-11 FUNC TST PART4 JUL 1984 bw
Order Number:	AH-T801A-MC
Revision:	000
Pages:	235
Original Filename:	CZDHXA0__DHU11__DHU-11_FUNC_TST_PART4__AH-T801A-MC__JUL_1984_gray.pdf

OCR Text

T EINE TST PR TS
BHU=
CZOHXAQ

OHULL

DHU-11 FUNC
CZOHXAD

15T

; PRRTY

1984

EnEgEn

OMU 11 FINC TST PARTS
PROGRAM TOCUMENT

MACRO M1°00

15-MAR 84 09:48

PAGE

REM £

1
.

IDENTIFICATION

PRODUCT CODE:

AC-TS00A-MC

PRODUCT NAME:

CZDHXAO DMU-11 FUNC

PRODUCT DATE:

3 MARCH 1984

MAINTAINER :

ENE

AUTHOR ;

ANTHONY HART

TST PART4

- DIAGNOSTICS GROUP

MODIFIED By:

THE INFORMATION IN THIS DOCUMENT IS

SUBJECT

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,
NC RESPONSIBILITY IS ASSUMED
FOR
SOFTWARE ON.EQUIPMENT THAT IS NOT

AFFILIATED COMPANIES,

THE
USE
SUPPLIEL

OR
B

RELIABILITY
CICITaL
OR

OF
ITS

COPYRIGHT (C) 1984 By DIGITAL EQUIPMENT CORP
ORA:
TON
THE FOLLOWING ARE TRADEMARKS OF DIGITAL
EQUIPMENT CORPORATION:
DIGITAL

DEC

PDP

DECUS

UNIBUS

DECTAPE

MASSBUS

BHBGAAN MHE el PART4

MACRO M1200

15 MAR 84 09:48

esess

ORIGINAL RELEASE
:

PAGE 3

MODIFICATION

3-MAR-1984

HISTORY

ssses

ANTHONY HART

BHHC-&‘H‘,'BE{E"HPM“

MACRO M1200

15 MAR 84 09:48

PAGE 4

T TYIYYYS DBANHO BWN =D
- - - -

RELATED DOCUMENTS AND STANDARDS
DIAGNOSTIC HMIERARCY PREREQUISITES
OPERATING INSTRUCTIONS

COMMANDS
SWITCHES

EXTENDED COMMAND SYNTAX
START COMMAND
TESTS SWITCH (/TESTS:<TEST-LIST>)
PASS SWITCH (/PASS:<PASS-CNT>)
FLAGS SWITCH (/FLAGS:<FLAG-LIST>)

END OF PASS SWITCH (/EOP:<INCR>)
EFFECT OF START COMMAND
RESTART COMMAND

TESTS, PASS, AND FLAGS SWITCHES
UNITS SWITCH (/UNITS:<UNIT-LIST>)

EFFECT OF RESTART COMMAND
CONTINUE COMMAND
FLAG SWITCH (/FLAGS:<FLAG-LIST>)
EFFECT OF CONTINUE COMMAND
PROCEED COMMAND
FLAGS SWITCH (/FLAGS:<FLAG-LIST>)
EFFECT OF PROCEED COMMAND
ADD C OMMAND
EFFECT OF ADD COMMAND
DROP COMMAND
EFFECT OF DROP COMMAND

::;g::rcor PRINT COMMAND

bwn =~00-

VOBNOVNDBBLW

N ;\);- GIN -

VD wityee

uNN!UNv-v-v-—-r--

FLAGS

=
sg
g

A
e
N
o

OOONPOO#OM‘....O.&.....& et

LV VLT VT VY VY ST V)

FUBWWWRNND
R LA

GENERAL PROGRAM CONSIDERATIONS
PROGRAM ABSTRACT

V] V] VL VLT TSI
N:U!U!U!UNNNNNN
- - E - - - » . LI
- .- » - -

TABLE OF CONTENTS

DISPLAY COMMAND

FLAGS cOmAND,

ZFLAGS COMMAND

HARDQUE
UASRE
TONS

SOF TWARE QUESTIONS
EXTENDED P-TABLE DIALOGUE

QUICK START-UP PROCEDURE (XXDP.)

ERROR INFORMATION

TYPES OF ERROR MESSAGES

SPECIFIC ERROR MESSAGES
PERFORMANCE AND PROGRESS REPORTS

TEST SUMMARIES
EXAMPLE ERROR FREE PASS

€0

Ba‘bha’&"‘ ',':QE‘;‘";'!”PAR'C

MACRO M1200

15 MAR -84 09:48

1.0

GENERAL PROGRAM CONSICERATIONS

1.1

PROGRAM ABSTRACT

PAGE 5

CZDHXAO IS PART OF THE DHU-11 FUNCTIONAL VERIFICATI
ON TEST.

THIS PART OF THE TEST PERFORMS EXTENSIVE DATA
TRANSMISSION AND
RECEPTION TESTS.
THIS PART ALSO INCLUDES A KEYBOARD ECHO AND
MODEM LOOPBACK TEST,
THIS DIAGNOSTIC HAS BEEN WRITTEN FOR
USE WITH THE DIAGNOSTIC

RUNTIME SERVICES SOF TWARE (SUPERVISOR).

THESE SERVICES PROVI

DE
THE INTERFACE TO THE OPERATOR AND TO THE
SOF TWARE ENVIRONMENT
THIS PROGRAM CAN BE USED WITH XXDP+, ACT,
APT, SLIDE AND PAPER
TAPE.
FOR A COMPLETE DESCRIPTION OF THE RUNTI
ME SERVICES, REFER
TO THE XXDP+ USER’'S MANUAL.
THERE IS A BRIEF DESCRIPTION OF
THE RUNTIME SERVICES IN THE OPERATIN
G INSTRUCTIONS -COMMANDS

OF THIS DOCUMENT.

1.2

SYSTEM REQUIREMENTS
THE FOLLOWING HARDWARE IS REQUIRED TO
RUN THE DHU-11 FVT:

1.5

UNIBUS PROCESSOR WITHM AT LEAST 32K BYTES OF
MEMORY .

DHU BOARDS INSTALLED ON THE UNIBUS.

APPROPRIATE PROGRAM LOAD DEVICE SUPPORTING XXDP.
MEDIA OR A DOWN LINE LOADING SYSTEM.

RELATED DOCUMENTS AND STANDARDS
0

1.4

XXDP+ USER’'S MANUAL

- DESCRIBES THE RUNNING OF DIAGNOSTICS

UNDER THE XXDP. MONITOR,

DIAGNOSTIC HIERARCY PREREQUISITES

THE PROCESSOR,

THE UNIBUS,

THE SYSTEM MEMORY,

THE CONS

OLE TERMINAL
AND THE LOAD MEDIA ARE ASSUMED TO MAVE BEEN
TESTED AND FOUND WORKING
BEFORE THIS PROGRAM IS RUN,

R'R«O\;‘jfl‘ r’v&"e”'
;1

[}

IST

ART4

2.0

MACRO M1°00
3

15 MAR 84 09:48
'

PAGE 6

OPERATING INSTRUCTIONS
THIS SECTION CONTAINS A BRIEF DESCRIFTION
OF

THE RUNTIME SERVICES.

FOR DETAILED INFORMATION, REFER TO THE XXDP+
USER'S MANUAL (CHQUS).

2.1

COMMANDS

THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGN
OSTIC RUNTIME SERVICES
(SUPERVISOR).
THIS SECTION LISTS THE COMMANDS AND GIVES A VERY
BRIEF DESCRIPTION OF THEM.
THE XXDP+ USER’'S MANUAL HAS MORE DETAILS.

COMMAND

EFFECT

START
RESTARTY
CONTINUE
PROCEED

START THE DIAGNOSTIC FROM AN INITIAL STATE
START THE DIAGNOSTIC WITHOUT INITIALIZING
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER
tC)
CONTINUE FROM AN ERROR HALT

EXIT

ADD

DROP
PRINT

DISPLAY
FLAGS
ZFLAGS

RETURN TO XXDP+. MONITOR (XXDP+ OPERATION
ONLY!)

ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE

CONSIDERED TO BE ACTIVE AT START TIME

DEACTIVATE A UNIT
PRINT STATISTICAL INFORMATION (IF IMPLEMENTE
D

BY THE DIAGNOSTIC - SEE PERFOMANCE AND PROGR
ESS
REPORTS SECTION OF THIS DOCUMENT)

TYPE A LIST OF ALL DEVICE INFORMATION
TYPE THE STATE OF ALL FLAGS (SEE FLAGS SECTION)
CLEAR ALL FLAGS (SEE FLAGS SECTION)

A COMMAND CAN BE RECOGNIZED BY THE FIRST
THREE CHARACTERS.
YOU MAY, FOR EXAMPLE, TYPE "STA” INST
EAD OF “START ",

MORE INFORMATION CAN BE FOUND WITHIN THE SECTION
LABELLED
EXTENDED COMMAND SYNTAX

PRBGAN KOE oTM

2.2

MACRO M1200

15 MAR 84 09:48

PAGF

SWITCHES
THERE ARE SEVERAL SWITCHES WHICH ARE USED
TO MODIFY SUPERVISOR OPERATION,
THESE SWITCHES ARE APPENDED TO THE LEGAL
COMMANDS.
ALL OF THE LEGAL

SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTIO
N OF EACH,
IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER
IS DESIGNATED 8y "DDDDD".

SWITCH

EFFECY

/TESTS:LIST

EXECUTE ONLY

THOSE

TESTS

SPECIFIED

THE LIST.
LIST IS A STRING OF TEST
NUMBERS, FOR EXAMPLE - /TESTS:1:5:7-10.
THIS LIST WILL CAUSE

TESTS

1,5,7,.8,9,10

BE RUN.
ALL OTHER TESTS WILL NOT BE RUN.
EXECUTE DDDDD PASSES (DDDDD = 1 TO 6400
0)

/PASS : DDDDD

/FLAGS:FLGS

SET SPECIFIED FLAGS.SEE THE FLAGS SECTION

OF THIS DOCUMENT,

/EOP : DDDOD

REPORT END OF PASS MESSAGE AFTER EVERY
DDDDD PASSES ONLY.
(DDDDD = 1 TO 64000)

/UNITS:LIST

TEST/ADD/DROP ONLY THOSE UNITS SPECIFIE
D
IN THE LIST.
LIST EXAMPLE - /UNITS:0:5:10-12
USE UNITS 0,5,10,11,12 (UNIT NUMBERS = 0-63)

EXAMPLE OF SWITCH USAGE:
START/TESTS:1-5/PASS:1000/E0P: 100
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS
1 THROUGH S WILL BE
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES
AND 3) THE END OF
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSE
S ONLY.,
A
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS.
YOU MAY,

FOR EXAMPLE,

TYPE

“/TES:1-5"

INSTEAD OF

“/TESTS:1-5",

BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN
BE USED BY EACH
COMMAND,
TESTS

PASS

FLAGS

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

EOP

UNITS

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

{

i
FUNC
TST PARTS
gb‘;n}‘fl
{Otk“"'

TM ACRO " M1200

1S MAR

- 84

09 48

PAGE

8
;.

2.3

FLAGS
FLAGS ARE USED TO SET UP CERTAIN OPERA
TIONAL PARAMETERS SUCH AS

LOOPING ON ERROR.

ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN

CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH
.

FLAGS

ARE ALSO CLEARED AFTER A START COMMAND UNLES
S SET USING THE
FLAG SWITCH.
THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR

ALL FLAGS.
WITH THE EXCEPTION OF THE START AND ZFLAGS COMMA
NDS,
NO COMMANDS AFFECT THE STATE OF THE FLAGS;
THEY REMAIN SET OR
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH.

FLAG

EFFECT

HOE

HALT ON ERROR - CONTROL IS RETURNED TO

RUNTIME SERVICES COMMAND MODE

LOE

LOOP ON ERROR

IERs

INHIBIT ALL ERROR REPORTS

IBRe

INHIBIT ALL ERROR REPORTS EXCEPT

FIRST LEVEL

(FIRST LEVEL CONTAINS

ERROR TYPE, NUMBER, PC, TEST AND UNIT)
INHIBIT EXTENDED ERROR REPORTS ( THOSE
CALLED BY PRINTX MACRO'S)

IXRs

PRI
PNT

DIRECT MESSAGES TO LINE PRINTER
PRINT TEST NUMBER AS TEST EXECUTES

UAM

UNATTENDED MODE (NO MANUAL INTERVENTION)

B0OE

“BELL“ ON ERROR

ISR

INHIBIT STATISTICAL REPORTS (DOES NOT

APPLY

TO DIAGNOSTICS WHICH DO NOT SUPPORT

STATISTICAL REPORTING)

IDR
ADR

INHIBIT PROGRAM DROPPING OF UNITS
EXECUTE AUTODROP CODE

LOT
EVL

LOOP ON TEST
EXECUTE EVALUATION (ON DIAGNOSTICS WHICH

HAVE EVALUATION SUPPORT)
#SEE

THE ERROR INFORMATION SECTION OF

THIS DOCUMENT.

SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON
FLAGS.
YCU MAY
SPECIFY MORE THAN ONE FLAG WITH THE FLAG
SWITCH.
FOR
EXAMP
LE,
TO CAUSE THE PROGRAM TO LOOP ON ERROR,
INMIBIT ERROR REPORTS
AND TYPE A "BELL” ON ERROR, YOU MAY USE
THE FOLLOWING STRING:
/FLAGS:LOE : IER:BOE

£0

VIIV=AL

TUNL

107

PROGRAM COCUMENT

FRARIS

2.4

PALRD

M1200

15-MAR-84

09:48

PAGE

EXTENDED COMMAND SYNTAX

2.4.1

START COMMAND

$80000000000040000000400600806000402

008004000800800200808000004a

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

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

‘...‘..‘..‘0‘..‘......‘

2.4.1.1

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

<TEST-LIST>

IS A SEQUENCE OF DECIMAL NUMBERS

(1:2 ETC.) OR RANGE

S
OF
DECIMAL NUMBERS (1-5:8-10 ETC.), SEPERATED BY
COLONS, THAT SPECIFY
THE TESTS TO BE EXECUTED.TESTS WILL BE
EXECUTED
IN
NUMERICAL
ORDER
REGARDLESS
OF
THE ORDER OF SPECIFICATION.
THE DEFAULT IS5 TO EXECUTE
ALL TESTS.
ON THIS AND
ALL
SWITCHES,
THE
ANGLE
BRACKETS
<>
ARE
PUNCTUATION
USED
1IN
THE DEFINITION ONLY, AND ARE NOT TO BE TYPED BY
;EECT%RAT“.
SEE
EXAMPLE
AT
END
OF
“EFFECT
OF
START
COMMAND "

2.4.1.2

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

<PASS-CNT>

PASSES.

IS A DECIMAL NUMBER INDICATING THE DESIR
ED

PASS

NUMBER

DEFINED AS THE EXECUTION OF THE FULL DIAGNOSTIC

(ALL SELECTED TESTS).THE DEFAULT IS
NON-ENDING
EXECUTION.
IN
THIS
CASE,
EXIT
FROM
THE
PROGRAM
IS
ACCOMPLISHED
EITHER
BY TYPING A
CONTROL/C OR BY OCCURANCE OF AN ERROR WITH
THE
HMALT
ON ERROR
FLAG
BEING
SET.
THE EXIT IS A RETURN TO COMMAND MODE
.
SEE EXAMPLE AT END
OF "EFFECT OF START COMMAND” SECTION.

2.4.1.3

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

<FLAG-LIST> IS
A
SEQUENCE
OF
ELEMENTS
OF
THE
FORM
<FLAG>,
<FLAG=1>,
OR
<FLAG=0>,
SEPARATED BY COLONS, WHERE <FLAG> HAS ONE
OF
THE FOLLOWING VALUES:
HOE

LOE

IER
IBE
IXE

PRI
PNT

BOE

UAM
ISR

HALT ON ERROR, CAUSING COMMAND MODE TO

BE ENTERED WHEN AN ERROR IS ENCOUNTERED.
LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO
LOOP CONTINUOUSLY WITHIN THE SMALLEST
DEFINED BLOCK OF CODING (SEGMENT, SUBTEST,
OR TEST) CONTAINING THE ERROR.
INWIBIT ERROR REPORTING.
INMIBIT BASIC ERROR REPOKTS.
INMIBIT EXTENDED ERROR REPORTS.

DIRECT ALL MESSAGES TO A LINE PRIN
TER,
PRINT NUMBER OF TEST BEING EXECUTED
.

BELL ON ERROR (NOT RELATED TO BELL PROMPTING)
.
RUN IN UNATTENDED MODE, BYPASSING MANUAL
INTERVENTION (ILLEGAL FOR THIS DIAGNOSTIC).
INWIBIT STATISTICAL REPORTS.

-11 F
IST PART4
%M
I%&WNT

MACRO M1200

15-MAR-84 09:48

PAGE

IDV

INMIBIT DROPPING OF UNITS BY DIAGNOSTIC.
(HAS NO EFFECT IN THIS DIAGNOSTIC.)
LOT
LOOP ON TEST.
THE FLAGS NAMED OR EQUATED TO 1
ARE
SET,
THOSE
EQUATED
TO
O
ARE
CLEARED.
A FLAG NOT SPECIFIED IS CLEARED.
IF THE FLAGS SWITCH IS NOT
GIVEN ALL FLAGS ARE CLEARED.
SEE EXAMPLE AT END OF “EFFECT
OF
START
COMMAND- SECTION.

2.4.1.4

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

<INCR> IS A DECIMAL NUMBER INDICATING

PASSES)

DEFAULT IS AT THE END OF EVERY PASS.
START COMMAND” SECTION,

2.4.1.5

HOW

OFTEN

(IN

TERMS

DESIRED THAT THE END OF PASS MESSAGE BE
PRINTED.

THE

SEE EXAMPLE AT END OF “EFFECT OF
'

EFFECT OF START COMMAND -

THE EFFECT OF THE START
COMMAND
IS
PARAMETER
DIALOGUE ,
THE
SOFTWARE

7O
INITIATE
THE
HARDWARE
PARAMETER
DIALOGUE,
THE

INITIALIZATION QUESTIONS, AND THEN THE DIAGNOSTIC
COMMENCES TESTING.

THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH
THE
GQUESTION
“o
UNITS
(D)
?2”
TO
WHICH THE OPERATOR SHOULD REPLY WITH THE NUMBER
OF
UNITS TO BE TESTED.
FOLLOWING THIS
ARE
THE QUESTIONS
WHEREBY
THE
P-TABLES
THEMSELVES ARE BUILT.

EACH P-TABLE IS A CORE -RESIDENT

TABLE
CONTAINING ALL THE HARDWARE INFORMATION FOR ONE
COMPLETE UNIT, 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.

FOR

THE

ACTUAL

QUESTIONS SEE THE “MARDWARE PARAMETERS” SECTION.
FOLLOWING THE HARDWARE QUESTIONS ARE THE

MARDMARE

SOF TWARE

P-TABLE

QUEST

IONS
TO
BUILD
THE
SOFTWARE
TABLES, WHICH DEFINE OPERATING PARAMETERS OF THE
DIAGNOSTIC PROGRAM,
THESE QUESTIONS ARE DESCRIBED
IN
THE
"“SOF TWARE
PARAMETERS" SECTION.

EXAMPLE;
STA/TESTS:1:3-4:/PASS:3/FLAGS: IER:HOE
=1
THIS COMMAND WILL CAUSE THREE PASSES

T0O BE MADE

, WITH
EACH
PASS
CONSISTING OF TESTS 1,3, AND 4.
THERE IS NO DIFFERENCE BETWEEN SAYING
<FLAG> AND SAYING <FLAG=1>.
THE NOTATION <FLAG=0> IS MEANINGFUL
ONLY
ON A COMMAND OTHER THAN START TO CLEAR A FLAG
THAT WAS PREVIOUSLY SET,
NOTE THAT ON ALL COMMANDS ONLY THE FIRST
THREE LETTERS ARE SCANNED,

BMLFM'P‘RIC

2.4.2

MACRO M1200

15-MAR-22

09:48

PAGE

RESTART COMAND -

$86000000000000800000000500060080608

8658680008800000000080008

RESCTART )/ TESTS: <TEST -LIST>/PASS: <PASS -CNT > /FLAGS :
FLAG-LIST>/UNITS: «UNIT-LIST>
....O.‘.“““.““.“‘.0“0".0“.‘0.‘

.‘..‘....0.‘..‘.0...

2.4.2.1

TESTS, PASS, AND FLAGS SWITCHES -

<TEST-LIST>,

<PASS-CNT>, AND <FLAG-LIST>

ARE

THE

START

2.4.2.2 UNITS SWITCH (/UNITS:<UNIT-LIST>) - <UNITLIST> IS A SEQUENCE
OF DECIMAL MUMBERS (0.1 ETC.) OR RANGES OF DECIMAL NUMBER
S (0-5, 8-10
ETC.) THAT SPECIFY THE UNITS TO BE TESTED.
THE NUMBERS ARE
SEPARATED

By COLONS.
THE NUMBERS MAY RANGE FROM O THRU N-1 (N IS THE NUMBER OF
UNITS SPECIFIED IN THE PREVIOUS START COMMAND).
THE NUMBER
INDICATES
THE
POSIT

ION 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.
DEFALLT IS TO TEST ALL UNITS WHICH MAVE NOT BEEN
DROPPED BY A DROP COMMAND
.

2.4,.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 MAVE
BEEN
ONE
)
ARE USED,

INSTEAD OF NEW ONES BEING BUILT.
THE
UNITS
SWITCH
SHOULD
BE cg‘g‘g WITH THIS PROGRAM.
THE SOF TWARE DIALOGUE MAY OPTIONALL
Y

NOT

COMMAND
T

MODE

(OPERATOR WILL BE ASKED).
R OF

PASSES

ENCOUNTERED WITH
THE MALT
ENTERED BY THE OPERATOR.

2.4.3

THE COMMAND CAN BE USED AF TER

MAS BEEN REENTERED IN ANY OF THE THREE NORMAL WAYS:
STED NUMBE
MAVE

BEEN

MADE,

ERROR

WAS

ON ERROR FLAG SET, OR C) A CONTROL
/C WAS

CONTINUE COMMAND -

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

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

CONC TINUE )/PASS ; <PASS -CNT/FLAGS : <FLAG-LIST»
‘..0..‘...‘.0"....‘..‘.‘..‘000

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

2.4.3,1

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

¢FLAG-LIST> IS SAME AS IN

THE

FLAGS RETAIN THEIR CURRENT VALUE.

START

COMMAND,

BUT

UNSPECIFIED

Rg&;‘b“%

IEY'PQIC

MACRO M1200

2.4.3.2

15-MAR-84

09:48

PAGE

“E0Q

EFFECT OF CONTINUE COMMAND -

CONTINUE MJST FOLLOW A START OR RESTART, AND COMMAND MODE
MuUST
HAVE
BEEN ENTERED DUE TO A HALT ON ERROR OR A CONTROL/C.
THE EFFECT
OF THE COMMAND
IS 710 GO YO THE BEGINNOF
ING
THE TEST
THAT
WAS
BEING
EXECUTED WHEN THE HALT OR CONTROL/C TOOK PLACE. SOF TWARE
DIALOGUE MAY
OPTIONALLY BE REEXECUTED.
HARDWARE PARAMETERS MAY NOT BE CHANGED.

2.4.4

PROCEED COMMAND -

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

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

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

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

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

2.4.4.1

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

<FLAG-LIST> IS AS IN THE START
RETAIN THEIR CURRENT VALUE.

2.4.4,2

COMMAND,

BUT

UNSPECIFIED

FLAGS

EFFECT OF PROCEED COMMAND -

PROCEED MUST FOLLOW A START, RESTART, OR CONTI
NUE.

COMMAND

MODE
MUST MAVE BEEN ENTERED VIA A MALT ON ERROR.
THE EFFECT OF THE COMMAND
IS 70 BEGIN EXECUTION AT
THE LOCATION FOLLOWING
THE
ERROR
CALL.
NEITHER MARDWARE NOR SOF TWARE PARAMETERS MAY BE AL
TERED.

2.4.5

ADD COMMAND -

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

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

ADD/UNITS: «UNIT-LIST>

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

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

2.4.6
EFFECT OF ADD COMMAND THE
UNITS
SPECIFI
ARE ADDED TO THE TEST SEQUENCE.
EACH
UNIT MJST HAVE
A P-TABLE
IN MEMORY DUE
TO
AN EARLIER

HARDWARE

D!&Pfi.

THIS

COMMAND

MUST

FOLLOWED BY A

PREVIOUSLY DROPPED,

2.4.7

DROP COMMAND -

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

OROCP )ZUNITS: <UNIT-LIST>

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

..‘....C...O.“.‘..‘.‘......‘..

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

BS&A*H‘ %L’Yi’!"?flflhl

MACRO M1200

15-MAR-84

09:48

PAGE

2.4.8
EFFECT OF DROP COMMAND THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING.
THE UNITS
WILL BE RESELECTED OMLY BY THE EXECUTION OF AN ADD OR START

COMMAND.

THE UNITS SWITCH MUST BE

ENTERED.

THIS

MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND.

2.4.9

COMMAND

PRINT COMMAND -

““"“.““‘.‘.0..‘CO‘..“‘.‘..“C.C

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

PRI(NT)

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

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

2.4.9.1
THE

EFFECT OF PRINT COMMAND -

TOTAL

WNUMBER

ERRORS

FOR EACH UNIT SINCE THE LAST

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

2.4,10

THE

ISR

(INMIBIT

DISPLAY COMMAND -

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

‘..‘.‘..‘.“““‘.A

DISCPLAY)/UNITS: <UNIT-LIST>

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

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

2.4,10.1

EFFECT OF DISPLAY COMMAND

THE HARDWARE P-TABLE FOR THE
FORMAT IN WHWICH IT WAS ENTERED.

2.4.11

TEST

STATION

PRINTED

FLAGS COMMAND -

;0nunuuunuououuuuonua

ououuuuuuuuuu

LA(GS)

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

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

2.4,11.1

EFFECT OF FLAGS COMMAND -

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINT
ED.

THE

Bkl

MACRO M1200

2.4.12

1. MAR-84 09:48

INL
PAGE

IFLAGS COMANC -

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

O“OOOOOOOO“...“‘..‘

ZFL(AGS)

..“...“.“O“.‘OO‘O‘.“..‘““0.‘0.0“.“.

0.......0‘..‘.‘

2.4.13

ZFLAGS COMAND -

ALL FLAGS ARE CLEARED.

2.4.14

CONTROL CHARACTERS -

A CONTROL/C (C) ENTERED DURING

THE

EXECUTION

DIAGNOSTIC CAUSES A RETURN TO COMMAND MODE
.
A

CONTROL/Z

(Z)

ENTERED

DURING

ONE

THE

TWO

OPERATOR DIALOGUES-- HARDWARE P-TABLE DIALOGUE
OR
SOFTWARE P-TABLE DIALOGUE CAUSES THE DEFAULTS
TO BE
TAKEN FOR THE REMAINDER OF THAT DIALOGUE.
A CONTROL/0 (0) ENTERED DURING

THE

DIAGNOSTIC
CAUSES
ALL
TELETYPE
SURPRESSED FOR THE REMAINDER OF
THE
UNTIL ANOTHER CONTROL/0 IS
TYPED,

NORMAL TELETYPE OUTPUT,

EXECUTION

OUTPUT
T0 BE
DIAGNOSTIC OR
WMICH RESTORES

Bkl2 el
2.5

MACRO M1200

15 MAR-84 09:48

PAGE

HARDWARE QUESTIONS
WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME
SERVICES WILL PROMPT
THE USER FOR MARDWARE INFORMATION
BY TYPING “"CHANGE MW (L) 2*
YOU MUST ANSHER ~Y~ AFTER A START COMMA
ND UNLESS THE HARDWARE

INFORMATION HAS BEEN “PRELCADED” USING THE
SETL® UTILI

TY (SEE
CHAPTER 6 OF THE XXDP. USER'S MANUAL).
WHEN YOU ANSWER THIS
QUESTION WITH A “Y~, THE RUNTIME SERVICES WILL
ASK FOR THE NUMBER
OF UNITS (IN DECIMAL).
YOU WILL THEN BE ASKED THE FOLLOWING

QUESTIONS FOR EACH UNIT,
1.

CSR ADDRESS - THIS QUESTION REQUESTES THE CSR ADDRE
SS OF THE
SPECIFIED DHU-11.
THE DEFAULT ANSWER FOR THIS QUESTION IS
ADDRESS 160460 (OCTAL).
INTERRUPT VECTOR ADDRESS - THIS QUESTION REQUE
STS THE INTERRUPT
VECTOR ADDRESS OF THE SPECIFIED DHU-11.
THE DEFAULT ANSWER
FOR THIS QUESTION IS 310 (OCTAL).
ACTIVE LINES BIT MAP - THIS QUESTION REQUESTS AN
OCTAL BIT

MAP OF

THE SERIAL COMMUNICATION LINES ON THE
DHU11 WHICH ARE

BEING SELECTED FOR TESTING.
IF THE BIT IN THE BIT MAP 1S SEY
WHICH CORRESPONDS TO A PARTICULAR LINE (
I.E.
BIT S FOR LINE
3 ) THAT LINE WILL BE TESTED BY THE FVT.
THE DEFAULT ANSWER
FOR THIS QUESTION IS ALL LINES I.E. 17777
7.
TYPE OF LOOPBACK (1=INTERNAL, 2-H3029 OR H3277
,

3=H325

4+MODEM, S=KEYBOARD ECHO).
THIS QUESTION REQUESTS THE TYPE OF
LOOPBACK TO BE USED WHEN
TESTING THE DMU-11,
THE FOLLOWING TYPES ARE SUPPORTED:

INTERNAL
TESTING

- ONLY INTERNAL UART LOOPBACK IS TO BE USED
IN

THE DHU-11.

H3029 OR M3277

- STAGGERED LOOPBACK CONNECTORS ARE PROVI

DED
ON THE DMU11 DISTRIBUTION PANEL (H3029) IF
THIS
DISTR
IBUTI
ON
PANEL
IS NOT PRESENT

THEN M3277 STAGGERED BERG CONNECTO
R(S)

MUST BE INSTALLED ON THE BERG CONNECTOR
SOCKETS OF

THE DHUL1,

H325 - SINGLE LINE, 25 PIN LOOPBACK CONNE
CTORS (TYPE H325)
ARE INSTALLED ON THE LINES TO BE
TESTED.

MODEM -

THE OPERATOR IS ALLOWED TO SET UP A MODEM
L INK

AND THEN PERFORM A TRANSMISSION AND RECEP
TION TEST AT A

SINGLE BAUDRATE WITH THE MODEM CONTROL SIGNA
LS DTR AND RTS
ACTIVE. THIS IS A SPECIAL TEST AND ALL OT+cR
TESTS IN THIS
PART WILL
BE PERFORMED IN INTERNAL LOOP
BACK.

KEYBOARD ECHO - THE UARTS ON THME DUT ARE
PLACED IN REMOTE
LOOPBACK. TERMINALS (OR OTHER COMMUNICATIONS EQUIP
MENT)
?&h HAVE WHATEVER THEY

TRANSMIT

THE DHU LOOPED BACK

BHbCAR MHEAl
PR T4

2.6

MACRO M1200

15-MAR
84 09:48

e?
PAGE

€0

SOF TWARE QUESTIONS
AFTER YOU HAVE ANSWERED THE HARDWARE
QUESTIONS OR AFTER

OR CONTINUE COMMAND,

PARAMETERS.

THESE PARAMETERS WILL GOVERN SOME
DIAGNOSTIC

OPERATION MODES.
YOU WILL BE PROMPTED BY “CHANGE SW L)y
IF YOU WISH TO CHANGE ANY PARAMETERS, ANSWE
R BY TYPING
“yY“,

A RESTART

THE RUNTIME SERVICES WILL ASK FOR SOF TWARE

THE SOFTWARE QUESTIONS AND

REPORT UNIT NUMBER AS EACH UNIT

THE DEFAULT

IS TESTED

WHETHER THE PROGRAM SHOULD REPORT

SPECIFIC

VALUES ARE DESCRIBED

THIS QUESTION ASKS

THE NUMBER OF

IT IS TESTING AS IT BEGINS TO TEST THAT UNIT.

REPORT NUMBER OF BITS TESTED IN DMA ADDR TEST

THE UNIT WHICH

THIS

QUESTION
ASKS WHETHER THE OPERATOR WANTS A PRINTOUT
DESCRIBING WHICH

ms;gsfllfs HAVE BEEN TESTED WHEN THE DMA
ADDRESSING TEST

EXTENDED ERROR REPORTING - THIS QUESTION
ASKS WHE TMER EXTENDED
ERROR INFORMATION IS REQUIRED OTHER THAN
THE “TEST FAILED"
MESSAGE, ON EACH ERROR REPORTED.
THE DEFAULT IS "NO*" L.E. ONLY
:“'IE?SSGE REPORTING THE FACT TMAT THE TEST
FAILED WILL BE
NUMBER OF INDIVIDUAL DATA ERRORS TO REPOR
T ON A LINE - THIS
GQUESTION IS ASKED ONLY IF THE PREVIOUS QUEST
ION WAS ANSWERED
“YES”.
,

THE QUESTION ASKS FOR THE NUMBER OF DATA
ERRORS WHICH

SHOULD BE REPORTED INDIVIDUALLY BY THIS PROGR
AM FOR EACH LINE
FOR EACH TRAN
SMISSION TEST.

ERRORS WMICH ARE NOT REPORTED

INDIVIDUALLY ARE REPORTED IN SUMMARY ERROR REPOR
TS.

BEH Ak’ MHE Ao, PR T4
<.7

MACRO M1200

Uc
15-MAR-84 09:48

PAGE

EXTENDED P-TABLE DIALOGUE

WHEN YOU ANSWER THE HARDWARE QUESTIONS,

YOU ARE BUILDING ENTRIES

IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST.

WAY

THE SIMPLEST

TO BUILD THIS TABLE IS TO ANSWER ALL QUEST
IONS FOR EACH

UNIT 70 BE TESTED.

IF YOU MAVE A MULTIPLEXED DEVICE SUCH

AS
A MASS STORAGE CONTROLLER WITH SEVER
AL DRIVES OR A COMMUNICATION

DEVICE WITH SEVERAL LINES,

THIS BECOMES TEDIOUS SINCE MOST OF

THE ANSUERS ARE REPETITIOUS.

TO_ILLUSTRATE A MORE EFFICIENT METHOD,
SUPPOSE YOU ARE TESTING
A FICTIONAL DEVICE, THE XY11.
SUPPOSE THIS DEVICE CONSISTS OF
A CONTROL MODULE WITH EIGHT UNITS (SUBDEVICES) ATTACHED TO IT,
THESE UNITS ARE DESCRIBED BY THE OCTAL
NUMBERS 0 THROUGH 7.
THERE

IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG
UNITS CALLED THE
Q-FACTOR.
THIS Q-FACTOR MAY BE O OR 1.
BELOW IS A SIMPLE WAY
TC
BUILD A TABLE FOR ONE XY11 WITK EIGH
T UNITS.
@ UNITS (D)

8<CR>

UNIT 1
CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE @ (0) ?
O0<CR»
Q-FACTOR (0) 0 ?
1<CR>
UNIT 2

CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE @ (0) 2
1<CR>
Q-FACTOR (0) 1 ?
0<CR>
UNIT 3
CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE & (0) ?
2<CR>
Q-FACTOR (D) 0 ?
<CR»>
UNIT 4

CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE @ (0) ?
3<CR>
Q-FACTOR (0) 0 2
<CR»
UNIT 5

CSR ADDRESS (0) :
SUB-DEVICE ¢ (0) .

Q-FACTOR (0) 0 ?

160000<CR>
4<CR>

<CR>

UNIT 6
CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE @ (0) ?
S<CR>
Q-FACTOR (0) 0 ?
<CR>
UNIT 7
CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE @ (0) ?
&<CR>
Q-FACTOR (0) 0 2
1<CR»

PROGAAM £oCcrEnt” A"

MACRO M1200

15-MAR-84 09:48

UNIT 8

PAGE

£l
“£0

)

CSR ADDRESS (0)
160000<CR>
SUB-DEVICE @ (0) ?
7<CR»
Q-FACTOR (0) 1 2
<CR>

NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGE
S WHEN A
NON-DEFAULT RESPGNSE IS GIVEN.
BE CAREFUL WHEN SPECIFYING

MULTIPLE UNITS!

AS YOU CAN SEE FROM THE ABOVE EXAMP
LE,

TME HARDWARE PARAME TERS

DO NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT.
NOT VERY EFFICIENT.

THE PROCEDURE SHOWN IS

THE RUNTIME SERVICES CAN TAKE MULTIPLE
UNIT SPECIFICATIONS HOWEVER.
%E:‘"SngUILD THE SAME TABLE USING THE MULTI
PLE SPECIFICATION
@ UNITS (D)

8<CR>

UNIT 1

CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE @ (0) ?
0,1<CR>
Q-FACTOR (0) 0 2
1,0<CR>
UNIT 3
CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE @ (0) ?
2-5<CR>
Q-FACTOR (0) 0 ?
0<CR>
UNIT 7

CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE ¢ (0) ?
6,7<CR>
Q-FACTOR (0) 0 ?
1<CR>
AS YOU CAN SEE IN THE ABOVE DIALOGUE,

THE RUNTIME SERVICES WILL

BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION
GIVEN IN ANY
ONE PASS THROUGH THE QUESTIONS.
IN THE FIRST PASS, TWO ENTRIES

ARE BUILT SINCE TWO SUB-DEVICES AND Q-FAC
TORS WERE SPECIFIED.

THE
SERVICES ASSUME THAT THE CSR ADDRESS IS 160000
FOR BOTH SINCE IT
WAS SPECIFIED
ONLY ONCE.

IN THE SECOND PASS,

FOUR ENTRIES

WERE
BUILT.
THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECI
FIED.
THE
“-" CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREM
ENT THE DATA
FROM THE
FIRST NUMBER TO THE SECOND.

IN THIS CASE,

SUB-

DEVICES
2, 3, 4 AND S WERE SPECIFIED.
(IF THE SUB-DEVICE WERE SPECIF IED
BY ADDRESSES, THE INCREMENT WOULD BE BY 2 SINCE ADDRES
SES MUST
BE ON AN EVEN BOUNDARY.)
THE CSR ADDRESSES AND Q-FACTORS FOR
THE

FOUR ENTRIES ARE ASSUMED TO BE 160000 AND O
RESPECTIVELY
SINCE THEY WERE ONLY SPECIFIED ONCE.
THE LAST TWO UNITS ARE
SPECIFIED IN THE THIRD PASS,

THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISH
ED IN ONE PASS AS
SHOWN BELOW.
® UNITS

(D)

8<CR»

DHU-11 FUNC TST PART4
PROGRAM OCUMENT

MACRO M1200

15-MAR -84 09:48

PAGE 19

UNIT 1
CSR ADDRESS (0) ?
160000<CR>
SUB-DEVICE @ (0) 2?2
0-7<CR>

Q-FACTOR (0) 0 ?

0,1.0,...1,1<CR>

AS YOU CAN SEE FROM THIS EXAMPLE, NULL
REPLIES (COMMAS ENCLOSING
A NULL FIELD) TELL THE RUNTIME SERV
ICES TO REPEAT THE LAST REPLY,

2.8

QUICK START-UP PROCEDURE (XXDP+)

TO START-UP THIS PROGRAM:
1.

BOOT XxXDP.

GIVE THE DATE AND ANSWER THE LST/UNIBUS AND
SOMZ
(IF
THERE
IS A CLOCK) QUESTIONS.
NOTE, NOT ALL VERSIONS OF XXDP+ ASK
FOR
THE CLOCK FREQUENCY

TYPE “R NAME“”, WHERE NAME IS THE NAME OF THE
BIC FILE FOR THIS PROGRAM

TYPE

ANSWER THE “CHANGE HW” QUESTION WITH “y~

ANSWER ALL THE HARDWARE QUESTIONS

ANSWER

BIN

"START”

THE

“CHANGE SW” QUESTION WITH “N*

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE
USING ONLY

THE

DEFAULTS FOR FLAGS AND SOF TWARE PARAMETERS. FOR
DEFAULT INFORMATION
SEE THE SECTIONS WITHIN THIS DOCUMENT ON FLAGS
,AND HARDWARE QUESTIONS.

WL{%&"PMll

MACPT 11200

15-MAR-84 09:48

3.0

ERROP INFORMATION

3.1

TYPES OF ERROR MESSAGES

PAGE 20

L
-

THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY
BE ISSUED BY

A DIAGNOSTIC: GENERAL, BASIC AND EXTEN
DED.
GENERAL ERROR MESSAGES
ARE ALWAYS PRINTED UNLESS THE “IER”
FLAG IS SET (SEE THE FLAGS SECTION

OF THIS DOCUMENT).

THE GENERAL ERROR MESSAGE
NAME

TYPE

NUMBER

ERROR MESSAGE

IS OF

THE FORM:

ON UNIT NUMBER

TST NUMBER PC:XXXXXX

+JWHERE; NAME = DIAGNOSTIC NAME
TYPE

= ERROR TYPE (SYS FATAL,

DEV FATAL,

HARD OR SOFT)

NUMBER = ERROR NUMBER
UNIT NUMBER = O - N (N IS LAST UNIT IN PTABL
E)
TST NUMBER = TEST AND SUBTEST WHERE ERROR
OCCURRED

PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTA
IN SOME ADDITIONAL
INFORMATION ABOUT THE ERROR.
THESE ARE ALWAYS PRINTED UNLESS
THE
“IER” OR

DOCUMENT
),

“IBR” FLAGS ARE SET (SEE

THE FLAGS SECTION OF

THIS

THESE MESSAGES ARE PRINTED AFTER THE
ASSOCIATED GENERAL MESSAGE
.

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY
ERROR INFORMATION
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA.
THESE ARE ALWAYS
PRINTED UNLESS THE “IER”, “IBR” OR "IXR”
FLAGS ARE SET (SEE THE
FLAGS SECTI

ON OF THIS DOCUMENT).
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED
GENERAL ERROR
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES.

Bg&.fln‘k'o‘su'é"upm

3.2

MACRO

M1200

15-MAR-84

09:48

PAGE

SPECIFIC ERROR MESSAGES
THIS PROGRAM IS INTENDED YO PROVIDE
A GO/NOGO INDICATION

OF THE FUNCTIONALITY OF THE DHU-11 BOARDS.
TO EXECUTE THE
PROGRAM IN THIS MGDE THE OPERATOR NEED ONLY
ANSWER THE
“EXTENDED ERROR REPORTING” SOF TWARE QUEST
ION WITH "NO", THE
PROGRAM WILL THEN ONLY PRINT THE NAME OF THE
FAILING TEST
THE TEST AND ERROR NUMBERS.

FOR A LIST OF

THE

TEST NAMES

IN THIS PROGRAM SEE THE TEST SUMMARIES SECTION
OF THIS
DOCUMENT. AN EXAMPLE
OF SUCH A AN ERROR MESSAGE IS THE
FOLLOWING:

CZDHX DVC FTL ERR 4409 ON UNIT 00 TST 04 SUB 000 PC:
DMA ADDRESS TEST FAILED

XXXXXX

THIS ERROR INDICATES THAT A FATAL ERROR
WAS ENCOUNTERED

DURING THE TEST WHICH TESTS THE DMA_ABORT BIT.

IF THE OPERATOR HAD REQUESTED EXTENDED ERROR
REPORTING THE
SAME ERROR WOULD BE REPORTED AS FOLLOWS:

CZDHX DVC FTL ERR 4409 ON UNIT 00 TST 04 SUB 000 PC:
DMA ADDRESS TEST FAILED
BAD BITS BETWEEN BITS O AND 15.

4.0

XXXXXX

PERFORMANCE AND PROGRESS REPORTS

AT THE END OF EACH PASS, THE PASS COUNT
IS GIVEN ALONG WITH THE
TOTAL NUMBER OF ERRORS REPORTED SINCE
THE DIAGNOSTIC WAS STARTED.
THE "EOP" SWITCH CAN BE USED TO CONTROL HOW
OFTEN THE END

OF PASS MESSAGE IS PRINTED. FOR FUTHER INFOR
MATION SEE
SWITCHES SECTION OF THIS DOCUMENT .

THE

PR FOEAER
TM"
5.0

MACRO M1200

15-MAR-84 09:48

PAGE 22

TEST SUMMARIES

THE FOLLOWING ARE INCLUDED WITHIN CZDHXA:
tl

DEVICE REGISTER ACCESS TEST - VERIFIES THAT THE
UUT REGISTERS
WILL RESPOND WITH THE CORRECT UNIBUS HANDS
HAKING SIGNALS.
VERIFIES THAT THE UUT IS AT THE CORRE
CT ADDRESS.

KEYBOARD ECHO TEST - ALLOWS THE OPERATOR TO
TEST TERMINAL LINKS
(OR OTHER COMMUNICATIONS LINKS), WHICH ARE ATTACHED
T0 wTt
SERIAL PORTS, FROM REMOTE ENDS OF THE LINKS
.
MODEM LOOPBACK TEST - ALLOWS THE OPERATOR
TO TEST MODEM LINKS
WHICH ARE ATTACHED TO THE UUT SERIAL PORTS
.
DMA ADDR TEST

- VERIFIES THAT THE UUT CAN ACCESS THE
FULL

MEMORY WHICH IS ON THE MACHINE VIA DMA ACCESS.
FRAMING ERROR TEST

REPORTED CORRECTLY.
PARITY ERROR

TEST

REPORTED CORRECTLY.

DMA MODE TEST

- VERIFIES THAT FORCED FRAMING ERRORS
ARE
VERIFIES

THAT FORCED PARITY

ERRORS ARE

- VERIFIES THAT THE UUT WILL TX AND RX DATA

CORRECTLY USING DMA TRANSMISSION.

SPLIT SPEED TEST - VERIFIES THAT THE UUT WILL
FUNCTION
CORRECTLY USING DIFFERENT TX AND RX SPEEDS ON
EACH ACTIVE LINE.
REPORT BMP CODES TEST - THIS PSEUDO TEST REPOR
TS THE FIRST 32
CHARACTERS WHICH WERE DISCOVERED IN THE FIFO DURIN
G THE
EXECUTION OF THE OTHER TESTS.
THIS AVOIDS INTERRUPTION OF THE
OTHER TESTS BY THESE CODES IF THEY ARE NOT CRITI
CAL TO THE
PERFORMANCE OF THE TESTS.

DHU-11 FUNC

TST PART4

PROGRAM [/CCUMENT

6.0

MACRO M1200

15-MAR-84 09:48

PAGE 23

EXAMPLE ERROR FREE PASS

THE FOLLOWING IS AN EXAMPLE OF AN ERROR
FREE PASS DIALOGUE :

.R CZDHXAD

CZDHXAO .BIN
DRS
CZDHX-A-0
DHU-11 FUNC TST PART4

UNIT IS DHU-11

RESTRT ADDR:

147670

CHANGE HW (L)

2?2 Y

DR>STA/PAS:1

@ UNITS (D)

2?2 2

UNIT O

CSR ADDRESS:

(0)

160460

UNIT 1
CSR_ADDRESS:
(0)
160460
INTERRUPT VECTOR ADDRESS:

? tZ

? 160500
(0)
310

? 320

ACTIVE LINE BIT MAP:
(0)
177777 ? <CR>
TYPE OF LOOPBACK (1=INTERNAL, 2sH3029 OR
M3277, 3-H325
4=MODEM, S=KEYBOARD ECHO):
(0)
2
2

CHANGE SW

(L)

2?2 v

REPORT UNIT NUMBER AS EACH UNIT IS TESTED:

(L) Y

REPORT NUMBER OF BITS TESTED IN DMA ADDR TEST:
EXTENDED ERROR REPORTING:
TESTING UNIT

TESTING UNIT

CZDHX EOP
1
O TOTAL ERRS
DR»

(L) N

2 <CR>

(L) N

? <«CR>

%Aflf}&

YSY'PARYJ

MACRO M1200

\NC

15-MAR-84 09:48

PAGE 24

.LIST SEQ,LOC,BIN,MEB
-NLIST CND

-SBTTL

PROGRAM HEADER

.MCALL
svC

SvC
+

INITIALIZE SUPERVISOR MACROS

IF STRUCTURED MACROS ARE TO BE USED,
TO INITIALIZE THE STRUCTURED MACROS.

SVCINS=
SVCTST=
SVCSuB=
SVCGBL=
SVCTAG=

s
3
;
s
3

LIST
LIST
LIST
LIST
LIST

“.MCALL STRUCT"

AND

"“STRUCT"

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

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

H
H
H
3

002000

1
1
1
1
1

ADD

.ENABL

ABS

s .ENABL AMA

2000

BGNMOD
goe

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

POINTER BGNRPT,BGNSW,BGNSF T ,BGN
DU, ERRT

HEADER

103

132

CZDHX,A,0,200,0,PRIO7
L SNAME
; ;

110
130

101

LSREV::

060

LSDEPQ;
;

LSUNIT;;

LSTIML::

.ASCII /C/
LASCII 72/

.ASCII /D/
LASCII /M/
ASCII /x/
.BYTE
0
.BYTE
0
.BYTE
O
LASCITI

/A/

LASCII

/07

.WORD

BROGA HefolR’ PR
002014
002016
002016
002020

002020

002022
002022

002024
002024
002026
002026
002030
002030
002032
002032
002034
002034
002036
002036
002040
002040

002042
002042

002044

PAGE 24-1

036620

LS$HPCP:
:

037136

LS$SPCP::

002150

L$HPTP:
;

002162

LS$SPTP:
:

037526

LSLADP:
:

L$STA::

00C000

L$CO::
LS$DTYP:
:

L$APT::

002124

L$DTP;:

000340

LS$PRIO::

LSENVI::
LSEXP1::

002046

002056
002056
002060
002060

15-MAR-84 09:48

000200

002044
002046

002050
002050
002051
002052
002052
002054

MACRO M1200

003
003

L$SMREV:
:

LSEF:;

L$SPC::

005364

LS$DEVP::

027560

LSREPP;
:

000000

LSEXP4;;

000000

LSEXPS::

000000

LS$AUT:;

030430

L$DUT::

000000

LSLUN;;

005374

LSDESP;
:

104035

LSLOAD:
:

005314

LSETP:;

027574

LSICP::

.WORD

200

.WORD

L $HARD

.WORD

L$SOFT

.WORD

L$HW

.WORD

L$SW

.WORD

LSLAST

.WORD

. WORD

.WORD

LSDISPATCH

. WORD

PRIO?

.WORD

.BYTE
.BYTE

CSREVISION
CSEDIT

.WORD
.WORD

0
0

.WORD

LSOVTYP

WORD

LSRPT

. WORD

.WORD

LsDy

0
L$DESC

EMT

ESLOAD
LSERRTBL

. WORD

LSINIT

0ld” P41
002106
002106

030412

seais 030410
0021

1080

12
002112
002114
002114
002116
002116
002120
002120

15-MAR-84 09:48

PAGE 24-2

SEQ

LS$CCP:
:
LS$ACP:
:

027566

LS$PRT::

000000

LS$TEST::

000000

LSOLY::

000C00

LSHIME:
:

55555

B’

MACRO M1200

.WORD

LSCLEAN
L$AUTO
LSPROT
0
0
0

Bkil
l
" P
1092

MACRO M1200

15-MAR-84 09:48

-.SBTTL

PAGE 25

DISPATCH TABLE

A
d

; THE DISPATCH TABLE CONTAINS THE S ARTING ADDRE
SS OF EACH TEST.
s IT IS USED BY THE SUPERVISOR TO DISPATCH TO
EACH TEST,

‘4-

388838845 :

DISPATCH 9
LSDISPATCH:

1100

T
T3
T4
1)
16
17
18

—

Db B
¥R
baN-O LRIV N

PART4A

et e e e e e et e
T

lll!ll'llgNNN
o® -y

002146

LT LT

e e gt e e
s e s e pa
.
-

“!?l

MACRO M1200

15-MAR-84 09:48

.SBTTL

PAGE 20

“F

DEFAULT HARDWARE P-TABLE

s
s

THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAU
LT VALUES OF
THE TEST-DEVICE PARAMETERS.
THE STRUCTURE OF THIS TABLE
IS
IDENTICAL

TO THE STRUCTURE OF

THE HARDWARE P-TABLES,

s AND IS USED AS A “TEMPLATE" FOR BUILDING THE
P-TABLES.

002146
002150

000004

002150
002152
002154

160460
000310
177777

BGNHW

DFPTBL

002150

002156
002160
002160

LSMW: :

002

DFPTBL::
.WORD
.MORD
.WORD

.gv;s

LEV

160460
310
177777

;DEFAULT CSR ADDRESS
sDEFAULT VECTOR ADDRESS
;DEFAULT ACTIVE LINES BIT MAP

;DEFAULT LOOPBACK MODE

ENDHIW
L10000:

LWORD

L10000-L $Hu/2

MU 1L FUNC ST PART4
MACRO M1200
ALT HARDWARE P TABLE

15 -MA84
R 09:48

PAGE 27

C3
“EQ

1142

2%
€0 2

1143

1144

.SBTTL

1146

'00

1147

1148

1149

1150

1151
1152
1153 002160
002160
002162

SOFTWARE P-TABLE

THE SOFTWARE

TABLE CONTAINS VARIOUS DATA USED
BY

PROGRAM AS OPERATIONAL

SET UP AT ASSEMBLY

s AT RUN TIME.

PARAMETERS.

ARE

THE OPERATOR

3-000002

BGNSW

SFPTBL
L$SW::

000020
000000

. WORD

L10001 -L.sSMW/2

SFPTBL::

1158 002166
002166

THE

PARAME TERS

TIME AND MAY BE VARIED BY

sahs 002162
1155 002162
figg 002164

THESE

OPTION::
NDERPT: :

.WORD
.WORD

20
O

iBIT MAP OF PROGRAM CONTROL FLAGS
:DEFAULT NUMBER OF INDIVIDUAL DATA ERRORS 0 RPT,

ENDSW
LL10001:

1dAaf “MC AR/

PART4

MACRO M1200

15 MAR-84 09:48

1167

1168

.SBTTL

1169

PAGE 28

€0 29

GLOBAL EQUATES SECTION

1179

1180

1183

‘OO

1183

1184

1186
1187

1188
1189

1190

1191
1192
1193

1194
1195
1196

1197
1198

1199
1200
1202

1203

1204
1208

THE GLOBAL EQUATES SECTION CONTA

3 ARE USED IN MORE THAN ONE TEST. INS PROGRAM EQUATES THAT

000020

NUMLNS = =20

177777

000000
000002
000002

MAPLNS==177777

s44s0ss DEVICE REGISTER OFFSETS FROM THE CSR'S ADDRESS sesess
CSRO==0
RBUF Q=22
RXTIMO==2

000004
000006
000006

LPRO==4
FSLSO==6
FDATO=<6

000010
000012

LNCTRO==10
TXAD10==12

000014
000016
000020

000030
000100

TXAD20- =14
TXBFCO==16

1CSR REGISTER OFFSET FROM THE CSR ADDRESS
tRECEIVE REGISTER OFFSET FROM THE CSR ADDRE
sRECIEVE TIMER REGISTER OFFSET FROM THE CSRSSADDRESS

iLINE PARAMETER REGISTER OFFSET FROM
CSR ADDRESS
iFIFOSIZE/STATUS REGISTER OFFSET FROM THE
THE
CSR ADDRESS
1FIFODATA REGISTER OFFSET FROM THE CSR ADORE
SS

iLINE CONTROL REGISTER OFFSET FROM THE CSR ADDRESS
s TRANSMIT ADDRESS 1 REGISTER OFFSET FROM THE CSR ADORE
SS

s TRANSMIT ADDRESS 2 REGISTER OFFSET FROM THE CSR ADDRESS
s TRANSMIT COUNT REGISTER OFFSET FROM
THE C5R ADDRESS

s#ssses EQUATES USED WITH RESPECT TO THE RX BUFFE
R eassss

RXBETX=+16.

RXBDTX=+24 .
RXBFUL = =64 .

1207
1222 002166

EQUALS
:

3 BIT DIFINITIONS

100000
040000
020000
010000
004000
002000
001000
000400

BIT15== 100000
BIT14== 40000
BIT13=+ 20000
BIT12+= 10000
BITi1== 4000
BIT10== 2000
BIT09== 1000
BITO8=+ 400

000040
000020
000010
000004
000002
000001

BITOS=+ 40
BITO4=+ 20
BITO3+» 10
BIT02=+ 4
BITO1-= 2
BITOO== 1
]
BIT9=+ BITO9
BIT8=+ BITO8
BIT7++ BITO7
BIT6=+ BITO6

001000
000400
000200
000100

sNUMBER OF LINES ON DHV11 IS 8.

;3IT MAP OF LINES ON DHMV1l.

JLEVEL OF RX BUFFER AT WHICH

RE-ENABLE TRANSMISSION.
ILEVEL OF RX BUFFER AT WHICH TO
TO DISABLE TRANSMISSION.
1 TOTAL CHARACTER CAPACITY OF THE RX BUFFER.

MACRO M1200

15-MAR-84 09:48

BITS==
BIT4-=
BIT3-=
BIT2==
BITi==
BITO==

PAGE 28-1

BITOS
BITO4
BITO3
BiTO2
BITO1
BITOO

s EVENT FLAG DEFINITIONS
3+
EF32:EF17 RESFRVED FOR SUPERVISOR TO PROGR
AM COMMUNICATION
0

EF .START==
EF _RESTART ==

32.
31.

EF .NEW==
EF .PUR==

29.
28.

EF .CONTINVE-=
;

000340
000240
000200
000140
000100

30,

PRIORITY LEVEL DEFINITIONS

PRIO7== 340
PRIO6== 300

PRIOS== 240

PRIO4==
PRIO3==
PRIO2==
PRIO1==
PRIOO==

200
140
100
40
0

sOPERATOR FLAG BITS

]

EVL==
LOT==

ADR==
IDU==
ISR==

UAM=»

BOE ==

PNT==»
PRI==
IXE==
IBE==
IER==

LOE==

1223

HOE==

4
10

20
40
100

200

400

1000
2000

4000
10000

20000

40000

100000

START COMMAND WAS ISSUED
RESTART COMMAND WAS ISSUED

CONTINUE COMMAND WAS ISSUED

A NEW PASS MAS BEEN STARTED
A POWER-FAIL/POWER-UP OCCURRED

Bred! FNGLETEA9]4,

MACRO M1200

15-MAR-84 09:48

PAGE 29
J

.SBTTL

GLOBAL DATA SECTION

HE R4

s
;s

THE GLOBAL DATA SE
ngm CONTAINS DATA THAT ARE USED
IN MORE THAN ONE

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

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

“.....‘...‘..‘..000.

UNIT VARIBLE AREA

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

..000

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

000300

RXVECA::

.WORD

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

300
304
377
0

000377

iRX VECTOR ADDRESS.
:§TX VECTOR ADDRESS.

sACTIVE LINE BIT MAP,
:LOOPBACK MODE
s INTERRUPT BUS REQUEST LEVEL
sUNIT NUMBER.

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

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

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

DEVICE REGISTER ADDRESS TABLE

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

TXAD1A::
TXAD2A: :

TXBFCA::

160020
160022
160024
160026

,WORD

.WORD

5858

LNCTRA::

160030
160032
160034
160036

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

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

iDHU-11 CSR ADDRESS.
10MU-11 RECIEVE BUFFER/TIMER ADDRESS.
1DHU-11 LINE PARAMETER REGISTER ADORESS.
1DHU-11 FIFO SIZE/LINE STATUS REGISTER ADDRE
SS,
tAND FIFO DATA REGISTER ADDRESS.
1DMU-11 LINE CONTROL REGISTER ADDRESS.
1DHU-11 TRANSMIT BUFFER 1 REGISTER ADDRESS
1DHU-11 TRANSMIT BUFFER 2 REGISTER ADDRESS
sDHU-11 TRANSMIT BUFFER COUNT REGISTER ADDRE
SS

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

ASSORTED GLOBAL VARIABLES:

=
3

IBM:;:
IESTAT:

TPAFLG:
;:

‘.‘O.“.““‘...“..a.“.

‘..“

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

ooro0000000

CTRLCF
;:

338333333858 3333388

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

160030
160032
160034
160036

LPRA::

FDATA:
: FSLSA::

160020
160022
160024
160026

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

DRADRT:
:
CSRA::
.WORD
RXTMA:
: RBUFA:: .WORD

1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245 002166
1246 002170
1247 002172
1248 002174
1249 002175
1250 002176
1251
1252
1253
1254
1255
1256 002200
1257 002200
1258 002202
1259 002204
1260 002206
1261
1262 002210
1263 002212
1264 002214
1265 002216
1266
1267
1268
:
1269
1270 002220
1271 002222
1272 002224
1273 002226
1274 002230
1275 002232
1276 002234
1277 002236
1278 002240
1279 002242
1280 002244
1281 002246
1282 002250
1283 002252
1284 002254

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

s STORAGE FOR THE CONTROL
-C FLAG.
3STO'G FOR DMA TEST ADDRESS (IN PAR FORM),
:STORAGE FOR “AT LEAST ONE ERROR" INDICATOR.
1STO'G_FOR ADR OF FIRST FREE WORD AFTER TME DIAG' TIC
sWORD FOR GMANXX CALL RETURN PARAME TERS,
s INACTIVE TX/RX BITS MASK,
1STORAGE FOR STATES OF THE DUT INT ENABLE BITS.
sBIT MAP OF LINES IN LINE GROUP I.
sBIT MAP OF LINES IN LINE GROUP II.
1STO'G FOR PASS COUNT USED IN ROM VERSION® TST,
1FLAG INDICATING WHETHER TO PRINT MODEM STATUS.
s TIME-OUT VALUE FOR WAITING FOR LAST RX CMAR,

1ST0'G FOR PROCESSOR PRIORITY,
3STORAGE FOR TX,.ENABLE STATES,

(TXROFF,
(TXROFF,

TXRON).
TXRON).

sFLAGS SET WHEN AN EXPECTED 004 TRAP OCCURS,
sSTORAGE FOR THE NORMAL 004 TRAP VECTOR,
sSTORAGE FOR THE TEST NUMBER,

1STORAGE FOR TX.ENABLE STATES, (BUFFER MGM NT),
sSTORAGE FOR TRANSMIT INTERRUPT FLAGS,

mu Shfi ;Eé'll’&ll

{ggg 002266

MACRO M1200

15-MAR-84 09:48

000000

WORD1::

1291

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

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

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

177546
PRIO6
100
60.
O
O
120.
120.
17.
62

;CSR ADDRESS OF THE LTC.
s INTERRUPT PRIORITY LEVEL OF THE LTC.
: INTERRUPT VECTOR ADDRESS OF THE 3% ¢ o
s INTERRUPT FREQUENCY OF THE LTC.
+HARDWARE CLOCK COUNTER @1.
1HARDWARE CLOCK COUNTER 02.
+HARDWARE BREAK COUNTER LOCATION.
:BREAK COUNT VALUE IN CLOCK TICKS.
sNUMBER OF MILLI-SECONDS PER LTC TICK.
:LOOP COUNT (USED BY MSLOOP) TO DELAY 1 MS,

;oocooooooccooo.cca‘.oaoo..oooooo.oo

1307

1308 002314
1309 002316
1310 002320
%g%“l’ 002722

177572
172516
000000
000000

1313 002324
1314 002324
1315 002326
1316 002330
1317 002332
1318 002334
1319 002336
1320 002340
1321 002342

172340
172342
172344
172346
172350
172352
172354
172356

172300
172302

172304
172306
172310
172312
172314
172316

1335

oao.oou...uuuuauuuuuuuuu.ouo

MEMMORY MANAGEMENT VARIABLES AND FLAGS.

;.ooooo.oooooaooooo.o.oo“oooot.oc.oo

PARATB: :

PARATE: ;
PDRATB: :

PDRATE: ;

‘o‘ooooo.u.uo.oou.uouuuuuuu.uo

MMSRO:: .WORD
MMSR3:: .WORD
MMPRES:: .WORD
MMENAB:: .WORD

177572
172516
O
O

;ADDRESS
;ADDRESS
tMEM MGT
+MEM MGT

OF MEM MGT STATUS REGISTER 00,
OF MEM MGT STATUS REGISTER 03.
PRESENT FLAG (O IF MM NOT PRESENT).
ENABLED FLAG (O IF MM NOT ENABLED),

PAROA::
PAR1A::
PAR2A::
PAR3A::
PAR4A::
PARSA::
PAR6A::
PAR7A::

.WORD
.WORD
.WORD
,WORD
.WORD
.WORD
.WORD
,WORD

172340
172342
172344
172346
172350
172352
172354
172356

1BASE OF
;ADDRESS
;ADDRESS
;ADDRESS
;ADDRESS
;ADDRESS
;ADDRESS
;ADDRESS
;ADDRESS

MEM MGT PAR ADDRESS TABLE.
OF MEM MGT PAR 0.
OF MEM MGT PAR o1.
OF MEM MGT PAR @2.
OF MEM MGT PAR 3.
OF MEM MGT PAR 04.
OF MEM MGT PAR 0S.
OF MEM MGT PAR 06.
OF MEM MGT PAR #7.

.WORD
.WORD

172300
172302

PDROA::
PDR1A::

PDR2A::
PDR3A::
PDR4A::
PDRSA::
PDR6A::
PODR7A::

,WORD
.WORD
.WORD
,WORD
.WORD

.WORD

172304
172306
172310
172312
172314

172316

:END OF PAR ADDRESS TABLE.

1BASE OF MEM MGT PDR ADDRESS TABLE.
;ADDRESS OF MEM MGT PDR #0.
;ADDRESS OF MEM MGT PDR 1.
;ADDRESS OF MEM MGT PDR 02.
;ADDRESS OF MEM MGT PDR #3.
;ADDRESS OF MEM MGT PDR #4.
;ADDRESS OF MEM MGT PDR 05.
;ADDRESS OF MEM MGT PDR 6.
;ADDRESS OF MEM MGT PDR 07.

sEND OF MEM MGT PDR ADDRESS TABLE.

.oonooco‘.uooo‘o.oaooa‘ooo.‘aoo.oooo

1336

1337
1338 002364
1339 002366
1340 002370

000001
000002
000004

1343 002376

000040

1344 002400
1345 002402

LINE TIME CLOCK VARIABLES AND STORAGE.

CLKCSR::
CLKBRL::
CLXVEC::
CLKHRZ::
TIMER1::
TIMER2::
TIMER3::
BCOUNT::
MSTICK::
MSLCNT::

1306

{gg} 002364

sLOCATION FOR PASSING INDIRECT PARAME
TERS,

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

177546
000300
000100
000074
000000
000000
000170
000170
000021
000062

1308

1324 002344
1325 002344
1326 002346
1327 002350
1328 002352
1329 002354
1330 002356
1331 002360
1332 002362

o.....o0ooo.‘oo.o.co.o‘ooonoooo.oooooo

12”

{ggg 002344

.WORD

g.0..0.00“oo‘.o..oo.o..ooo‘.oooo.o‘...oo

1292

1294 002270
1295 002272
1296 002274
1297 002276
1298 002300
1299 002302
1300 002304
1301 002306
1302 002310
{gg: 002512

PAGE 29-1

000100
000200

oooaoout.ouuo‘ua

uoo‘ou‘uuuuuuo
TABLE OF WORDS WITH CORRESPONDING BIT SET FOR GENER
ATION OF BIT MAPS,

;aoooooaooo.coooau.‘oooo‘oooooa.ooooooo.
ouoooooaouuu‘ououuouuuuuu
BITTBL:: .WORD
1
;1BIT O SET,
.WORD
2
s8IT 1 SET,
.WORD
4
sBIT 2 SET,
2

.MORD

. WORD
.WORD

100
200

sBIT S5 SET,

sBIT 6 SET,
sBTT 7 SET,

&%Ll

Sm &él‘;&“

1346 002404
1347 002406
1348 002410
1349 002412
1350 002414
1351 002416
1352 002420
gssz 002422

MACRO M1200

15 MAR-84 09:48

000400
001000
002000
004000
010000
020000
040000
100000

.MORD
.WORD
.MORD
.WORD
.WORD
.MORD
.HORD
.WORD

1355

1358 002424

BRTBLB: :

1357

1360 002426
1361 002430
1362 002432
1363 002434
1364 002436
1365 002440
1366 002442
1367 002444
1368 002446
1369 002450
1370 002452
1371 002454
1372 002456
1373 002460
1374 002462
1375 002464

000062

000113
000156
000206
000226
000454
001130
002260
003410
003720
004540
011300
016040
022600
045400
113000

BRTBLE: :

1379 002464
1380 002464
1381 002466
1382 002470
1383 002472
1384 002474
13‘5
1386
13‘7
1388 002476
1389 002500

GPRSOB: :

1370

.MORD
.MORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.HORD
.WORD
.WORD
.MORD
.WORD
.HORD
.WORD

SO.

75.
110.
134,
150.
300.
600.
1200.
1800.
2000.
2400.
4800.
7200.
9600,
19200.
38400.

:BASE OF DUT BAUD RATE TABLE.

.0.‘....‘0000000

:BAUD RATE ENTRY FOR CODE O.

:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
:BAUD RATE ENTRY
iLABEL AFTER END

GPR SAVE AREAS ZERO AND ONE.

FOR CODE 1.
FOR CODE 2.
FOR CODE 3.
FOR CODE 4.
FOR CODE S.
FOR CODE 6.
FOR CODE 7.
FOR CODE 8.
FOR CODE 9.
FOR CODE 10.
FOR CODE 11.
FOR CODE 12.
FOR CODE 13.
FOR CODE 14.
FOR CODE 15.
OF DUT BAUDRATE TABLE.

o‘o‘A...oo"too.00‘00.0“0.00ooao‘oo.

000000
000000
000000
000000
000000

RXDONF::
TXDBLF::

000000

.WORD
.WORD

O
O

s TRANSMISSION DONE FLAGS.
sRECEPTION DONE FLAGS.
:“TX HAS BEEN DISABLED” FLAG.

.WORD O
;0““‘.‘.“.t.“t“.‘.‘“.‘0‘.“‘.0.“..‘.“

000000

1400

““.““.‘.““.‘0“0‘0.0“‘0‘0“.00.0“

sBASE OF GPR SAVE AREA NUMBER ZER(O.
.HORD
O
;WORD 1, STORAGE FOR R1,
L.HORD
O
sWORD 2, STORAGE FOR R2.
LHORD
O
sWORD 3, STORAGE FOR R3.
.WORD
O
tWORD 4, STORAGE FOR R4
.
.HORD
O
sWORD S, STORAGE FOR RS.
;.‘.O.‘.‘..‘.‘.‘.t“.‘0.0““.“‘00t‘..“
“t““0‘.““.‘0“““““0‘AQOO0.000
;e
TRANSMISSION AND RECEPTION VARIABLES,
POINTERS, AND FLAGS.
;0“‘.‘.‘.“.‘.““...‘.0“0“0‘0“0“".A“‘O
‘..l“...‘.“t‘.‘000“‘06‘0000‘00
CHRTOT:: .WORD O
s TOTAL RECEIVED CHARACTER COUNTER,
ERSMRF:: .WORD O
: "PRINT ERROR SUMMARY
" FLAGS.
TXDONF::

000000
000000
000000
000000
000000

1399

1‘01
1402 002712

.WORD

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

3..l“.0..".“0..‘0..‘.‘.".‘0.“.t“

1394

1397 002512
1398 002712

..‘.0‘0‘00“tl.o00000

;.‘0..0“.0.‘.000‘0.‘0“‘ooaot.‘.oo..at‘.a

1395
1396 002510

8 SET.
9 SET.
10 SET.
11 SET.
12 SET.
13 SET.
14 SET.
15 SET.

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

TABLE OF DUT BAUDRATES

1377

1392 002506
1393

;:BIT
:BIT
:BIT
:BIT
:BIT
;BIT
:BIT
:BIT

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

1376

1390 002502
1391 002504

400
1000
2000
4000
10000
20000
40000
100000

g.“.“00.0.‘..0‘..““.‘.‘0

1356

1359 002424

PAGE 29-2

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

STORAGE AREA FOR THE BMP CODE QUEUE,

RECEIVE BUFFER AND ASSOCIATED VARIABLES.

'.0....0.“‘.‘00.‘.0“‘0“‘0‘.0.0‘.0‘.“..0.‘0“‘
0“.““000.“000000‘0“0“0.0
BMPCQP: ;
.WORD
O
sPOINTER USED TO ACCESS THE NEXT CELL IN
QUE.
BMPCQB: ;
BLKW
64,
1STORAGE FOR 32 CELLS, TEST® PLUS BMP CODE.
BMPCQE: :
sLAST ADDRESS PLUS 2 OF THE BMP CODE QUEU
E
.
g‘0.“0‘..‘..“‘0".“0.0.“‘
0“.‘..‘00“““0.‘000‘000‘0“0“‘0“000000

0“000&

;0.“‘.“.““00‘0“0‘0000‘.‘000‘.00“000‘0‘00
““‘00“‘0‘000.‘0.0‘000‘00‘00‘00
RXBOPT:: .WORD
O
sRX BUFFER OUTPUT POINTER,

-11

IST

PART4

SECTION

1403 002714
1404 002716

1405 002720

000000
000000

1406 002720

1407 003120

1‘0‘

000000

1409

1412 003122
1413 003124
1414 003126
1415 003130
1416 003132
1417 003134
1418 003136
1419 003140
1‘20

40
15-MAR-84

09:48

RXBIPT::
RXBCNT::

RXBSTA: :
RXBEND::

000000
000000
000000
000000
000000
000000
000000
000000

CB8B: :

1433

;

1“1

1442
1‘.3
1444 004642
1445 004642
1446 004652
1447 004662
1448 004672
1449 004702
1450 004712
1451 004722
1452 004732
1453 004742
1454 004752
1455 004762
1456 004772
1457 005002
1458 005012
1459 005022

IN RX BUFFER.

iLABEL AT BEGINNING OF THE RX BUFFER.

RXBFUL

iLEAVE ENOUGH ROOM FOR A FULL

iLABEL AFTER END OF RX BUFFER.

BUFFER.

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

.WORD
.WORD
.WORD
_WORD
.WORD
_WORD
.WORD
.WORD

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

“C‘..“..000.0‘00

1BASE OF TX/RX CONTROL BLOCK.

O
O
O
O
O
O
O
O

:LINE PARAMETER REGISTER CONTENTS.
sLINE CONTROL REGISTER CONTENTS.
sSTART ADDRESS OF DATA PATTERN.
sLENGTH OF DATA PATTERN.
sNUMBER OF REPEAT TRANSMISSIONS OF THE DATA
PATTERN.
:BIT MAP OF LINES TO INITIALISE.
sLOOPBACK MODE (AS IN LOPBCK).
sAMOUNT OF OFFSET BETWEEN EACH TX START.

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

DPENDB::
DPLENB::
EXCNTB::
ERCNTB::
TXPTRB::
RXPTRB::
CHCNTB::
TXCNTB::
RXCNTB::

1435 003602
1436 003602
1437 004202
1438 004402
1439 004602
1440 004602

iRX BUFFER INPUT POINTER.
1COUNT OF NUMBER OF CHARS

TX/RX CONTROL BLOCK.

CBLPRA::
CBLNCA::
CBDPAA::
CBDPLA::
CBOPNA::
CBMAPA::
CBLPBA::
CBOFSA::

1423 003142
1424 003202
1425 003242
1426 003302
1427 003342
1428 003402
1429 003442
1430 003502
1431 003542

1‘3‘

.WORD

O
O

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

1‘32

.BLKW

29-3

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

1421

1‘22

.WORD
_WORD

PAGE

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

l‘to

1411 003122

MACRO M1200

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

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

TRANSMISSION AND RECEPTION TABLES OF POINT
ERS AND COUNTERS.
;‘.“.“““.‘..

.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW

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

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

16.
16.
16.
16.
16.
16.
16.
16.
16.

:TABLE OF END ADDRESSES OF DATA PATTERNS.
:TABLE OF LENGTH OF DATA PATTERNS FOR LINES
.
:EXTRA RECEIVED CHARACTER COUNTERS TABLE.
;CHARACTER RECEIVE ERROR COUNTERS TABLE
.
i TRANSMISSION DATA POINTERS TABLE.
tRECEPTION DATA POINTERS TABLE
.
iNUMBER OF CHARACTERS TO BE TXED AND
RXED.
3 TRANSMISSION CHARACTER COUNTERS TABLE.
sRECEPTION CHARACTER COUNTERS TABLE
.

'...“..““....“..‘....“‘.‘.“‘

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

GENERAL TABLE AND BUFFER AREA--513 WORDS
.

."..‘0‘

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

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

.“‘0‘0“‘.‘
BUFBAS: :
1BASE OF MEMORY BUFFER.
ERLTBL : :
.BLKW
128,
sFIRST HALF OF GENERAL TABLE OR BUFFER.
BUFMID: :
.BLKW
64,
1SECOND HALF OF GENERAL TABLE OR BUFF
ER.
BUF3QT: :
.BLKW
64.
iLAST QUARTER OF THE BUFFER AREA.
BUFEND: :
:END OF GENERAL PURPOSE MEMORY BUFFER.
ENDETB: ;
.BLKW
16.
sBUFFER OVERFLOW SPACE.
'“".“‘...“..‘.“"..““".‘....‘.“.‘
....“.‘.‘.“‘...‘.“.“00..““0‘.‘.
;
TABLE OF DATA PATTERN RESYNC QUEUES.
|..‘.“‘.0‘.‘“‘...“.0.“‘0‘.‘.0..“““.“
“..‘.‘..“‘..‘..‘....‘.‘.“‘.“‘0‘
DPRSGB: ;
sDATA PATTERN RESYNC QUEUES TABLE BASE,
BLKW
4
iDATA PATTERN RESYNC QUEUE FOR LINE O.
BLKW
4
:DATA PATTERN RESYNC QUEUE FOR LINE 1.
BLKW
4
1DATA PATTERN RESYNC QUEUE FOR LINE 2.
BLKW
4
1DATA PATTERN RESYNC QUEUE FOR LINE 3.
BLKW
4
iDATA PATTERN RESYNC QUEUE FOR LINE 4.

BLKW
BLKW
BLKW
BLKW
BLKW
BLKW
BLKW
BLKW
BLkW

BLKW

4
4
4
4
4
4
4
4
4

iDATA PATTERN RESYNC QUEUE FOR LINE
1DATA PATTERN RESYNC QUEUE FOR LINE
sDATA PATTERN RESYNC QUEUE FOR LINE
1DATA PATTERN RESYNC QUEUE FOR LINE
sDATA PATTERN RESYNC QUEUE FOR LINE
:DATA PATTERN RESYNC QUEUE FOR LINE
sDATA PATTERN RESYNC QUEUE FOR LINE
sDATA PATTERN RESYNC GUEUE FOR LINE
iDATA PATTERN RESYNC QUEUE FOR LINE

1DATA PATTERN RESYNC QUEUE FOR LINE

S.
6.
7.
8.
9.
10,
11.
12.
13.
14.

CrbeAl BXYS 180,758
11 F

PART4

1460 005032

MACRO M1200

15-MAR-84 09:48

1461 005042

DPRSQE : :

1463

1‘62

BuKH

€0 55

sDATA PATTERN RESYNC QUEUE FOR LINE

15.
iEND OF DATA PATTERN RESYNC QUEUES TABL
E.

'..“............‘.....‘.‘.“.

1‘6‘

1465 005042

1466
1467
1468
1469

PAGE 29-4

005042
005044
005046
005050

1470 005052
1471 008052

1472 005052
1473 005054
1474 005056

1475 005060
1476 005060

1477 005060
1478 005062

1479 005064

1480 005064
1481 005064
1482 005066
1483 005070

1484 005072

000000
000010
000020
000030

000000
073400
177400
000000
000200
000000
000040
000140

156470
167070
177470

1496

SCNSTE:: :
SCTPTB:

SCTPTE: ;

LMORD
MORD
WORD
ORD

LMORD
'MORD
MORD

0
73400
177400

LMORD
‘WORD

O
200

LMORD
WORD
'WORD

O
40
140

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

+5
16
:7
:8

BITS/CHAR
BITS/CHAR
BITS/CHAR
BITS/CHAR

LPR
LPR
LPR
LPR

FIELD.
FIELD.
FIELD.
FIELD.

sEND OF NUMBER OF BITS/CHAR FIELDS TABLE.
:BASE OF BAUDRATE FIELDS TABLE.
:50 BAUD LPR FIELDS.
11.2K BAUD LPR FIELDS.
133.4X BAUD LPR FIELDS.

sEND OF BAUDRATE FIELDS TABLE.
iBASE OF NUMBER OF STOP BITS FIELDS TABLE.
i1 STOP BIT LPR FIELD.
32 STOP BITS LPR FIELD.

:END OF BAUDRATE FIELDS TABLE.

sBASE OF TYPE OF PARITY FIELDS TABLE.
sNO PARITY LPR FIELD.
:0DD PARITY LPR FIELD.
:EVEN PARITY LPR FIELD.

:END OF TYPE OF PARITY FIELDS TABLE.

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

DMA MODE LPR FIELD TABLES.
SET UP WITH SPECIFIED BAUDRATES,

‘..‘.‘...“

1 STOP BIT,

OLPRTS: :
DLPRTE: :

.MORD
'MORD
'MORD

156470
167070
177470

00D PARITY,

8 BITS/CHAR.

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

iBASE OF DMA TEST LPR FIELDS TABLE
19.6K BAUD.
119.2K BAUD.
:38.4K BAUD.

sEND OF DMA TEST LPR FIELDS TABLE.

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

1‘97

1499 005100

SCBRTE : :
SCNSTB: :

...‘..‘...‘.....‘..‘..‘.....

iBASE OF NUMBER OF BITS PER CHAR FIELDS TABLE

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

1‘95

1498 005100

SCBCTE: :
SCBRTB: :

:
i

1‘89

1494 005100

SCBCTB: :

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

1487
1488

1491 005072
1492 005074
1493 005076

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

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

1“6

1490 005072

...‘..‘...‘.‘.‘.....‘.‘..‘..

SINGLE CHARACTER MODE LPR FIELD TABLES.

SPLIT SPEED LPR PARAMETER TABLE ..“.“‘...‘.‘....‘.‘..‘."...‘..“

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

170070

SPLPRB: :

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

LMORD

170070

iBASE OF SPLIT SPEED LPR TABLE
iTX:

38.4K, RX:

SO BAUD,

1 STOP 0DD PAR 8 BITS.

sTX:

2000, RX:2400 BAUD,

1 STOP OOD PAR 8 BITS.

1500 005102
1501 005104
1502 005106
1503 005110
1504 005112
1505 005114
1506 005116

007470
000001
000120
070470
013470
000001
000016

'WORD
WORD
'WORD
MORD
'MORD
TWORD
‘WORD

7470
1
80,
70470
13470
1
16

1508 005122
1509 005124
1510 005126

124470
000001
000002

sTX: 50, RX: 38.4K BAUD, 1 STOP 0DD PAR 8
BITo.
iNUMBER 'OF REPEAT TRANSMISSIONS AT 50
BAUD.
sNUMBER OF REPEAT TRANSMISSIONS AT 38.4K
BAUD.
sTX: 1200, RX: 75 BAUD, 1 STOP ODD PAR
8 BITS.
sTX: 75, RX: 1200 BAUD, 1 STOP ODD PAR 8 BITS.
INUMBER OF REPEAT TRANSMISSIONS AT 75
BAUD.
INUMBER OF REPEAT TRANSMISSIONS AT 1200 BAUD.

'MORD
MORD
TWORD

128470
1
2

1TX: 2400, RX:2000 BAUD. 1 STOP ODD PAR 8
BITS.
sNUMBER OF REPEAT TRANSMISSIONS AT 2400 BAUD.
sNUMBER OF REPEAT TRANSMISSIONS AT 2000 BAUD.

1507 005120

1511 005130

1512
1513
151.

1515 005130

1516 005131

115070

000

001

'MORD

SPLPRE : :

115070

1END OF SPLIT SPEED

LPR TABLE.
‘.“..“.....“.‘..“.‘..““..‘......‘.“‘....
.‘.“.“““‘.“‘.... bt bbe
SINGLE CMARACTER DATA PATTERN TABLE.
.““.“.‘.““‘.‘..‘.“.".‘.“.‘.““.“..““‘...‘
.‘...‘.“‘...‘..‘......“‘
SOPBAS::.BYTE
MYIE

0
1

sSTART OF SINGLE CHARACTER DATA PATTERN TABLE

BoeAL

BRYS SELiTon
F

131

PART4

MACRO M1200

15-MAR-8Z

KNS
09:48

PAGE

29-5

1517 005132
1518 005133
1519 005134
1520 005135
1521 005136
1522 005137
1523 005140
1524 005141
1525 005142
1526 005143
1527 005144
1528 005145

010
017
063
074
125
177
200
252
303
314
360
367

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

10
17
63
74
125
177
200
252
303
314
360
367

1530 005147
1531 005150
1532 005150
1533 005151
1534 005152

377

.BYTE

377

.BYTE
.BYTE
.BYTE

0
1
10

1529 005146

iggz 005153

376

000
001
010

SDPEND: :

017

1537

.BYTE

376

;END OF SINGLE CHARACTER DATA PATTERN TABLE
.
:START OF FIRST SHORT DATA PATTERN OVERFLOW
AREA,

;-.aacoooa.oao.ao..oaaoooat.

1538

oo.oo.oaoa..‘oaou.ooooo-sooo

;

1539

1540 005154
1541 005155
1542 005156
1543 005157
1544 005160
1545 005161
1546 005162
1547 005163
1548 005164
1549 005165
1550 005166
1551 005167
1552 005170
1553 005171
1554 005172
1555 005173
1556 005174
1557 005174
1558 005175
1559 005176
1560 005177
1561 005200
1562 005201
1563 005202
1564 005203
1565 005204
1566 005205
1567 005206
1568 005207
1569 005210
1570 005211
1571 005212
1572 005213
1573

.BYTE

125
252
124
253
122
255
112
265
052
325
152
225
132
245
126
251

SINGLE CHARACTER DATA PATTERN TABLE NUMBER
TWO.
goa.oaoooooo

SDP2B::

SDP2E: :

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

otccoaoooo‘oaooaoaoooooto.oo

125
252
124
253
122
255
112
265
S2
325
152
225
132
245
126
251

ouou-o.uuuuuuo

oo.coocouooa.u.ou.uoou.uuuuu

iSTART OF SECOND SHORT DATA PATTERN.

;END OF SECOND SHORT DATA PATTERN.
.BYTE
125
sSTART OF SECOND SHORT DATA PATTERN OVERF
LOW AREA,
.BYTE
252
.BYTE
124
.BYTE
253
.BYTE
122
.BYTE
255
.BYTE
112
.BYTE
265
.BYTE
S2
.BYTE
325
.BYTE
152
.BYTE
225
.BYTE
132
.BYTE
245
.BYTE
126
.BYTE
251
;00Atcoo‘otocooooootoco..ocou.co‘...o.aoooooo
ooooooooouao‘o‘ououuououuo

BrYeAl DAY LEL/TOR

1586 005226
1587 005227
1588 005230
1589 005231
1590 005232
1591 005233
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606

372

252
167
143

PAGE 29-6

SINGLE

CHARACTER

SEQ
SAFE

;00o‘c..o‘.‘000.00.00‘00

PROTBL::.BYTE

.BYTE
.BYTE

.BYTE

132
062
036
024
021
020

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.EYE'E‘

017
015
014
014
013
012

.EVI

250.

PROPORTIONAL

DELAY

TABLE.

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

:DELAY

170.
119.

99.

ooooo0

IN MILLI SECONDS AT SO BAUD

:DELAY IN MILLI SECONDS AT
sDELAY IN MILLI SECONDS AT

75 BAUD
110 BAUD

:DELAY
;DELAY
sDELAY
:DELAY
:DELAY
;DELAY
:DELAY
;DELAY
:DELAY
;DELAY
:DELAY
sDELAY

150 BAUD
300 BAUD
600 BAUD
1200 BAUD
1800 BAUD
2000 BAUD
2400 BAUD
4800 BAUD
7200 BAUD
9600 BAUD
19200 BAUD
38400 BAUD

;DELAY

90.
50.
30.
20.
17.
16.
1S.
13,
12.
12.
11.
10.

.0..0..o..o..‘ooooooaooo

IN MILLI

IN
IN
IN
IN
IN
IN
IN
IN
IN
IN
IN
IN

SECONDS AT

MILLI
MILLI
MILLI
MILLI
MILLI
MILLI
MILLI
MILLI
MILLI
MILLI
MILLI
MILLI

SECONDS
SECONDS
SECONDS
SECONDS
SECONDS
SECONDS
SECONDS
SECONDS
SECONDS
SECONDS
SECONDS
SECONDS

;““.“"0‘.0‘00.0‘.t‘.“‘..

AT
AT
AT
AT
AT
AT
AT
AT
AT
AT
AT
AT

134.5 BAUD

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

‘A.A.“‘t‘."0

‘00‘000
s# TABLE FOR STORAGE OF RX/TX LINE NUMBER ASSOCIATIONS
.
34 THE ASSOCIATIONS ARE STORED AS LINE NUMBE
R TIMES 2 FOR USE AS OFFSETS
i
WHEN ACCESS

ING A TABLE OF WORDS.
DO NOT WRITE A NON-ZERO VALUE INTO THE UPPE
R BYTE OF ANY ENTRY,
g‘.‘.““‘..‘..t‘.‘““.
‘“.“

NOTE:

TXRXLB:
:

1607
1608
1609
1610
1611
1612
1613
1614
1615
lé16
1617
1618
1619
1620
1621
1622
1623
1624

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

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

:BASE OF TX/RX LINE NUMBER ASSOCIATION
TABLE.

i TX/RX
s TX/RX
sTX/RX
s TX/RX
i TX/RX
s TX/RX

LINE
LINE
LINE
LINE
LINE
LINE

sTX/RX

OFFSET
OFFSET
OFFSET
OFFSET
OFFSET
OFFSET

LINE

FOR
FOR
FOR
FOR
FOR
FOR

OFFSET

RX/TX
RX/TX
RX/TX
RX/TX
RX/TX
RX/TX

LINE
LINE
LINE
LINE
LINE
LINE

FOR

O.
1
2
3
4.
S.

RX/TX

LINE

iTX/RX

LINE

OFFSET

FOR

RX/TX

LINE

s TX/RX LINE OFFSET FOR RX/TX LINE
7
sTX/RX LINE OFFSET FOR RX/TX LINE
8

sTX/RX'LINE OFFSET FOR RX/TX LINE
sTX/RX LINE OFFSET FOR RX/TX
LINE

10.
11.

i TX/RX

LINE

1 TX/RX

OFFSET

FOR

LINE

OFFSET

RX/TX

LINE

FOR

RX/TX

12.

LINE

13.

sTX/RX LINE OFFSET FOR RX/TX LINE
s TX/RX LINE OFFSET FOR RX/T
X LINE

14.
1S.

iEND OF TX/RX LINE NUMBER ASSOCIATION TABLE.
iGUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARY,
i

ONS ARE STORED AS LINE NUMBER TIMES 2 FOR
USE AS OFFSETS
WHEN ACCESSING A TABLE OF WORDS.

3¢ THIS IS A TABLE OF DATA FOR READING ONLY.
USE TO LOAD THE ABOVE TABLE,
ie
NOTE: MUST CONVERT FROM BYTES TO WORDS WHEN LOADI
NG ABOVE TABLE.
;‘...‘.“0...‘...

sR888

1625 005274
1626 005274
1627 005275
1628 005276
1629 005277
1630 005300

15-MAR-84 09:48

38aRaEEaEEaaaE:

1574
1575
1576 005214
1577 005215
1578 005216
1579 005217
1580 005220
1581 005221
1582 005222
15683 005223
1584 005224
1585 005225

MACRO M1200

STGTRB: :

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

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

4.
6.
0

12.

sBASE OF STAGGERED TX/RX LINE NUMBER TABLE.

sTX/RX
sTX/RX
s TX/RX
sTX/RX
i TX/RX

LINE
LINE
LINE
LINE
LINE

OFFSET
OFFSET
OFFSET
OFFSET
OFFSET

FOR
FOR
FOR
FOR
FOR

RX/TX
RX/TX
RX/TX
RX/TX
RX/TX

LINE
LINE
LINE
LINE
LINE

O.
1.
2.
3,
4.

.““

Bl'eAl bRYA L8l ,FART4
1631 005301
1632 005302
1633 005303
1634 005304
1635 005305
1636 005306
1637 005207
1638 005310
1639 005311
1640 005312

%::5 005313

MACRO M1200 15-MAR-84 09:48 PAGE 29-7

016
010
012
024
026
020
022
034
036
030

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

032

.2;{5
o

1655 005314

005314
005314
005316
005320

s 005322

1657

o By

14,
8.
10.
20.
22.
16.
18.
28.
30.
24,

sTX/7RX
sTX/RX
sTX/RX
sTX/RX
s TX/RX
sTX/RX
:TX/RX
:TX/RX
sTX/RX
s TX/RX

26.

000000

ERRTYP: :
ERRNBR: :
ERRMSG: :

.WORD
.WORD
.WORD

ERRBLK: :

_EVEN

.WORD

OFFSET
OFFSET
OFFSET
OFFSET
OFFSET
OFFSET
OFFSET
OFFSET
OFFSET
OFFSET

FOR
FOR
FOR
FOR
FOR
FOR
FOR
FOR
FOR
FOR

RX/TX
RX/TX
RX/TX
RX/TX
RX/TX
RX/TX
RX/TX
RX/TX
RX/TX
RX/TX

LINE
LINE
LINE
LINE
LINE
LINE
LINE
LINE
LINE
LINE

S,
6.
7.
8.
9.
10.
11.
12.
13.
14,

sg;s‘/‘::NliéEmTW?Sfl TO? RX/TX LINE 15,

ERRTBL

000000
000000
000000

LINE
LINE
LINE
LINE
LINE
LINE
LINE
LINE
LINE
LINE

O
O
O
O

ABLE

WORD

LSERRTBL; :

BOUNDARY
.

B Ao
LS ot
SRR 1305720 s e 30
1659

-SBTTL

1661

GPR HANDLING ROUTINES FOR SUBROUTINE CALLS.

1663

THERE ARE 4 ROUTINES AND MACRO DEFINITION
S USED
GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS FOR THE HANDLING OF
PROGRAM.
THE FOUR
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES
:

‘“o

;..‘.‘.‘.‘..m‘.mm..“...“

1662

1664
1665
1666
1667
1668
1669

1670
l:;l
1672

1673
%6;;
6
1676
1677

FE
3e
P
;s
;s
38

3
e
i

e
3s
T
3

1678
1679
1680
1681
1682
%::2

3
3
T
3
3s
i

1685

1686

1687
1688
1689
1690
1691
1692
1693
1694

1695

ie
;e
3e
1T
i*
3
;e
1)

‘.............“...0.0...

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

SAVE - MACRO DEFINITION USED AT THE BEGINNING OF
A SUBROUTINE TO
SAVE THE GPR CONTENTS FOR LATER RESTORATION.
PASS - MACRO DEFINITION USED AT THE
END OF A SUBROUTINE TO RESTORE
THE PREVIOUSLY SAVED GPR CONTENTS AND
TO LEAVE THE CONTENTS
OF THE SPECIFIED GPR(S) INTACT (NOT RESTORED).

PREGOS - SUBROUTINE WHICH IS CALLED FROM THE
SAVE AND PASS MACRO
EXPANSIONS WHICH ACTUALLY PERFORMS THE ACTIO
NS ON THE GPRS.

DURING A SUBROUTINE WHICH USES THESE GPR SAVE ROUTI
NES THE VALUES
OF THE GPRS ARE STORE
D ON THE STACK IN THE FOLLOWING STACK FRAME
:

SP
SP+2
SP+4
SP+6
SP+8
SP+10
SP+12
SP+14

-> RET PC INTO PREGOS ROUTINE.
-> GPR RO CONTENTS.
-> GPR R1 CONTENTS.
-> GPR R2 CONTENTS.
-> GPR R3 CONTENTS.
-> GPR R4 CONTENTS,
-> GPR RS CONTENTS.
-> RET PC INTO CALLER OF SUB' TNE WHICH CALLE
D PREGOS,

EACH LEVEL OF SUB’'TNE CALLING USES 8 WORDS
OF STACK OVERMEAD.
THE

SAVE AND PASS MACROS CAN ALSO BE USED IN "STRA
IGHT

LINE CODE"
TO SAVE AND RESTORE THE GPR VALUES.
IN ANY CASE, AFTER THE
ISSUING OF A PASS CALL THE GPRS WILL BE RESTO
RED TO THE VALUES
THEY HAD PRIOR TO THE LAST SAVE CALL (EXCE
PT FOR THE EXCEPTED,
OR PASSED INTACT, GPRS SPECIFIED AS PARAM
ETERS TO THE PASS CALL)
AND THE SP WILL ALSO BE RESTORED TO ITS CONDI
TION BEFORE THE LAST
SAVE CALL.
THE PROGRAMMER MUST BE SURE THAT THE SP
MAS THE SAME
VALUE WHEN THE PASS MACRO IS CALLED AS IT
HAD IMMEDIATELY AFTER
THE SAVE MACRO WAS CALLED.

;oooo.a.oaa.o.otoooooaoo.‘ooooooooootoac

.aooaoo‘ontoooo‘aaaooaoaaaoooooaoooaao&

IST PARTA
MACRO M1200
B HhaTMicCESS
EQUATES

1697
1698
1699
1700

1701

15 -MA84
R 09:48

PAGE

351
4

-SBTTL GPR FRAME ACCESS EQUATES
gres

sEQUATES THAT ALLOW ACCESS TO THE STACK FRAM
THESE ARE THE
E.
INTO "HE ST ACK FOR REGISTERS SAVED
DURING THE PREGOS
sROUT INE
sOFFSETS

$---

LPCSLT==
PCSLOT
==
R5SLOT==
RASLOT
=~

R3SLOT
==
R2SLOT ==
R1SLOT
==
ROSLOT
=~

36
16
14
12
10

6
4

1OFFSET FOR LAST RETURN
1OFFSET FOR RETURN PC,
iOFFSET FOR RS,

sOFFSET
sOFFSET
sOFFSET
tOFFSET
sOFFSET

FOR R4,
FOR R3,

FOR R2,
FOR R1.
FOR RO.

PC.

BrHeAl fvhfio'fll.mflgm MACRO M120g, AS-MAR 84 09:48 PAGE 32

{;{2
{;}?

1718

1719

1721
2

1722

{;sg
1726
1758

729
173’

;gllfioofiooooo.oooo b
I:

MACRO

ME BEGI

CONTENTS OF THE GPRS RO THRU R'S’.‘Im -

te INPUTS:

1e OUTPUTS:
:

1738

1736

TOP OF

STACK

3 : CALLING SEQUENCE:

s¢ COMMENTS:

WAS

S T Ve w

ENTERED

TO STACK SLOT FOR RS (EQUATED

SUBROUTINE

SUBROU

THE

STACK

LOADED WITM

LOADE

WITH

THE

14 OCTAL)
T

THE RETURN ADDRESS InTO PREGoS
0
O

SAVE

SINCE

OFFSET

GPR SAVE AREA

NO ARGUMENTS ARE ALLOWED.
THE

PASS

MACRO

SHOULD

CALLED

RESTORE

THE

GPR

VALUES,

ie SUBORDINATE ROUTINES CALLED: PREGOS.
.‘...‘..

1733

UNCHANGED

RSSLOT

’.‘..‘..

1732

> S

.‘..““‘.

.MACRO

TLIST

......‘.

..“.‘..‘

........

.‘......

..‘.‘...

SAVE

JENDM

...“;.“‘

JSR

SAVE

RS ,PREGOS

;CALL

SAVE

SUBRT,

‘.

&
=%

]

10M

MACRO M1200

15-MAR -84 09:48

PA;S -

.SBTTL

PAGE

“€G

GLOBAL MACRO DEFINITION

;O0‘....‘.0......0..

;e
e

3+
3e

THIS

MACRO

USED

.0......0..C~i.....“

CONJUNCTION

CALLED AT END OF A SUBROUTINE

WITH

.00..0..0.‘.0‘0000

THE

SAVE

TO PASS PARAMETERS

MACRO.

IN GPRS BACK

TO TME
CALLING ROUTINE BY ALTERING THE GPR
SAVE AREA ON THE STACK AND THEN
TO PREGOS TO

RETURNING

INPUTS:

RESTORE

THRU

RSSLOT

SLOT

OUTPUTS:

THE

GPR

3 CALLING SEQUENCE
:
;e

VALUES

ARE

PUT

"RO"

THRU "RS",

THEIR

EQUATED

CALLING

THEIR

SAVED

THEIR

VALUES,

RESPECTIVE

SLOTS

FOLLOWING

PASS

R4 ,RO,R2

ARE

THE

MACRO

MUST

STACK,

EXPANDS

;e
:e

3
;e

THEIR

WILL

THIS

INTO

ORIGINAL

VALUE

WHEN

PASS

THE

CALLED,

RO,R3
THE

FOLLOWING

ASSEMBLY

MOV

RO,ROSLOT(SP)

MOV

R3,R3SLOT(SP)

JSR

PC,.8(SP).

EXAMPLE

GPRS

VALUES

ITS

CALL

PASS

i e

THE

SAVE

LEGAL
:

THE GPRS LISTED AS ARGUMENTS WILL BE PASSE
D INTACT
CALLING ROUTINE, ALL OTHER GPRS WILL BE
RESTORED.

GPR

THIS MACRO.

ANY COMBINATION OF GPR ARGUMENTS MAY BE LISTE
D IN ANY ORDER.
EXAMPLE,
THE

;e
ie

GPRS

RO.R1,...

FOR

MUST

OFFSETS BEFORE

PASS

s+ COMMENTS:

THE

ONLY ALLOWED ARGUMENTS ARE

ROSLOT

ie
3+

- PASS

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

LEFT

R1,

CONTAINED

s¢ SUBORDINATE ROUTINES CALLED:
..‘..‘.‘..“".....‘..““..

THEIR

R2,

THE

VALUES

(PREGRT

R4,

CODE
:

AND

STACK

PRIOR

iPUT

STACK

SLOT,

tPUT

STACK

iRETURN

SLOT.

PREGOS

WILL

RESTORED

FRAME

THIS

AND

PASS

AND

SUBRT,
TO

CALL.

- LABEL WITHIN PREGOS, VALUE ON STACK,)

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

.MACRO

PASS

NB,
X

. IRP

LENDM

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

A.8,C,D,.E,F

X,<A,B8,C,0,E,F>

PASS

MOV

X,X'SLOT(SP)

sPUT X IN STACK SLOT,

JSR

PC,a(SP).

tRETURN TO PREGOS SUBRT,

SUBROUTINT

MACRO M1200

15-MAR-84 09:48

PREGOS

PAGE 34

.SBTTL GLOBAL SUBROUTINE

- PREGOS

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

PRESERVE

s+ INPUITS:

REGISTERS

OUTPUTS:

:®

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

THROUGH RS

FOR

MACROS

REGISTERS

s#CALLING SEQUENCE
:

USE

THROUGH RS

"JSR

ARE

SAVE

PASS

SAVED

iMACRO

ssCOMMENTS:

THIS ROUTINE IS RE-ENTRANT.

PARAMETERS
REGISTER

MAY

SAVE

;e
i*

USE THE RNSLOT
[EXAMPLE :

R5,PREGOS".)

THE

STACK,

MACRO EXPANSION CALLS PREGOS.

]

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

CALLS.

[ SUBROUT INE CODEi

SUBROUTINE

THE RETURN ADDRESS BACK INTO THE CALLI
NG ROUTINE MUST BE
R5.
(I.E.-

GPR

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

RETURN

MAKE

SURE

GPR

THE

PASSED

AREA

VALUES

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

RECALLS

SUBROUTINE

STACK.

USE

THE

PASS

PREGOS.

MODIFYING
GPRN

INTACT.

OFFSETS FROM THE SP TO PASS
MOV
VALUE ,ROSLOT(SP)

;#SUBORDINATE ROUTINES CALLED:

OUT

THE

EXPANSION

ITS

ORIGINAL

VALUE

OTHER PARAME TERS.
)
WHEN

YOU

TMIS.

NONE.

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

005324
005324
005326

005340

010446
010346
010246
010146
010046
010546
016605

005344

004736

005332
005334

PREGOS :

000014

THE

MACRO

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

.“‘.

MOV
MOV
MOV
MOV
MOV
MOV
MOV

iR5 HAS
R4, -(SP)
R3,-(SP)
R2,-(SP)
R1,-(SP)
RO, -(SP)
RS, -(SP)
RSSLOT(SP),RS

BEEN LOADED ON THE STACK BY THE SUBROUTI
NE CALL
$SAVE R4
$SAVE R3
$SAVE R2

JSR

PC,8(SP).

sCALL THE SUBROUTINE AT THE RETURN ADDRESS

i SAVE R1
:1SAVE RO
1PUSH RETURN PC ON TOP OF STACK
;RESTORE RS TO VALUE IT MAD BEFORE CALLS

1FROM THE PREGOS CALL,

PUTTING

THE PRESENT

iPC ON THE STACK AS A RETURN ADDRESS INTO
i THIS (PREGOS) ROUTINE.

*ee

:fl'i FOLLOWING CODE IS EXECUTED WHEN THE CALLING ROUTINE DOES A

1827
1828
1829
1831 005346
1832 005350
1833 005352
1834 005354
1835 005356
1836 005360
1887
1838 005362
1839

s "RETURN” [JSR
012605
012600
012601
012602
012603
012604
000205

PREGRT:: MOV

(SP)+ RS

PC,a(SP).) USING THE PC DEPOSITED ON THE STACK ABOVE,
iPUT RETURN PC IN RS,

MOV
MOV
MOV
MOV
MOV

(SP)+,RO
(SP)s,R1
(SP)s,R2
(SP)+,R3
(SP)s,R4 -

tRESTORE
tRESTORE
sRESTORE
sRESTORE
sRESTORE

RTS

tRETURN TO

RO,
R1,
R2.
R3,
R4,

THE

SUBROUTINE WHICH CALLED PREGOS.

sRESTORING R5 IN THE PROCESS.,

BlBeAl TEYY EL/TOR"

MACRO M1200

15-MAR-84 09:48

1841
1849
1850
1851
1852
1853
1854

.SBTTL

“£0 44

TEXT SECTION

s THE GLOBAL TEXT SECTION CONTAINS FORMA
T STATEMENTS,
s MESSAGES, AND ASCII INFORMATION THAT ARE USED
IN
;s MORE THAN ONE TEST.

1855

1856
1257
1858
1859
1860

s NAMES OF DEVICES SUPPORTED BY PROGRAM
H

104
055

110

DEVIYP

<DHU-11>

LSOVTYP:
ASCIZ

125

061

1861
1867
1868
1869
1870
T4/

GLOBAL

PAGE

/DMU-11/

.EVEN
;s
H

104

110

125

055

061

124

103
123

040

122

124

040
116

TEST DESCRIPTION

DESCRIPT

<DHU-11 FUNC TST PARTA&>
LS$DESC::

LASCIZ

124
101

PN
.EVEN

/DMU-11 FUNC TST PAR

DHU-11 FUNC TST PART4
GLOBAL TExT SECTION
1888

1889

MACRO M1200

1901 005725
1902 005746
1903 006061

1904 006157

1905 006254
1906 006336
1907 006410
1908 006437
1909 006467
1910 006520
1911 006544

1916 007101
1917 007141
1918 007206
1919 007225
1920 007306
1921 007311
1922 007357
1923 007435
1924 007535
1925 007566
1926 007626
1927 007722
1929

PAGE 36

.NLIST BIN

}g;g

1694
1895 005422
1896 005470
1897 005530
1898 005535
1899 005567
1900 005631

15-MAR-34 09:48

EDPFMT::

EFO0S03::
EF1601::
€F1603::
EF4401::

EF6201::
EF6202::

EF6203::

#4684404s FORMAT STATEMENTS USED IN PRINT CALLS
sescecsse

.ASCII
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCII

/#AMODEM LOOPBACK TEST STATUS REPORT:
/
/PATTERN ##DSs#A (D) COMPLETED.®N/
/#TeN/
/sA
sTsA, TEST ABORTED #N/
/#A
ACTUAL DATA:
#S06%A (0).%N/
/#NswA DMA ADDRESS TEST SUCCESSFUL, BITS O TO sD2sA
(D) TESTED/
.ASCIZ / (#D2sA BITS).®N/

.ASCIZ \sA FRAMING/PARITY ERROR DETECTION AND
REPORTING BAD ON LINES:®D2#A : sD2%N\
.ASCIZ /%A CHAR RECEIVED WITH FRAMING ERROR BIT
%TSA, SHOUWLD BE wT#N/

.ASCIZ /#A

EF9001:: .ASCIZ /#A
EF9002:: ,ASCIZ /#A
EF9003:: .ASCIZ /sA
EF9004:: ,ASCIZ /#A
EF9005:: .ASCIZ /s#A
EF9006:: .ASCIZ /#A
EF9007:: .ASCIZ /#A
:
:
:
:

CHAR RECEIVED WITH PARITY ERROR BIT #TsA,

SHOULD BE sTwN/

UNEXPECTED #T#A FOUND IN RECEIVE CHAR FIFO:%N/
CODE IS ASSOCIATED WITH LINE: wD2%N~/
CODE IS: w03sN/
STSA VALUE: s038N/
#T8A VALUE: NONESN/
w=T#A SD2#A(D )uN/
CHARACTER RECEIVED WITH ERROR FLAG(S) SET ON LINE
sD2sN/

JASCIZ /%A
CHARACTER READ AS: %03sN/
JASCIZ /%A
®T#A ERROR FLAG SET.#N/
.ASCIZ /#A
NUMBER OF ERRORS DETECTED ON LINE sD2%A IS «DSsN/
.ASCII /%A LINESD2#A ONLY %T#DS®A BYTES OF #DS%A BYTE/
.ASCIZ / DATA PAT'N TX'D FROM LINESD2#N/
.ASCIZ /sA
DATA PATTERN NOT COMPLETELY sTsN/
.ASCIZ /s#A w%T#A S06%N/
.ASCIZ /#A
TOO FEW TX.ACTIONS GENERATED ON LINE wD2%N/
.ASCIZ /#N/
.ASCIZ /A
ERROR CONDITION ON LINE w%D2uN/
.ASCIZ /sA #T#D2#A(D),
BMP CODE REPORTED :%03%A(0 8N/

EF9013::
EF9019::
EF9020::
EF9101::
EF9103::
EF9301::
EF9302:: .ASCIZ /#A OVERFLOW OCCURRED (MORE
THAN 31 BMP CODES FOUND IN QUEUE )N/
MFUNIT:: .ASCIZ /8NsA TESTING UNIT :#D4sN/
MSFMT1:: .ASCIZ /#AMODEM STATUS SIGNAL REP
ORT
: %N/
MSFMT2:: .ASCIZ /%A LINE owD2#A:
DSR=#B1sA, RI=sB1wA, DCD=wB1%A, CTS=#B1wN/
UBRFMT:; L,ASCIZ /#DS#A IS NOT A SUPPORTED
BAUDRATE, ENTER ANOTHER OR CTRL C.w%N/
.LIST BIN

BlBaAl Y SELTOR"
1938
1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950

MACRO M1200

15-MAR-84 09:48

PAGE 37

LNLIST BIN
3888484044

GLOBAL

ERROR

MESSAGES

éoansc: : .ASC1Z /MCDEM BAUDRATE IN BPS:/

EMO0103:
;

¢sesssssssss

Ig\'fICE REGISTER ACCESS ERRORS/

/SET/

/TIMEOUT OCCURRED WAITING FOR MASTER
RESET
/DMA ADDRESS TEST FAILED/
/N0 SUITABLE ADDR FOUND, TEST ABANDONED /

TO CLEAR/

/#sHOST FAILUREs+ ;WRITE FAILED TO AN
ADDR WHICH HAD BEEN READ/
/NO ACTIVE LINES,TEST ABANDONED/

1951

/DMA_START BIT FOUND SET BEFORE DMA INITIATED,TE
ST ABANDONED/

/TIME -OUT OCCCURED WAITING FOR DMA TO FINIS
H/
/700 FEW CHARACTERS FOUND IN THE RXFIF
O,DMA FAILED/
/700 MANY BMP CODES FOUND IN RXFIFO/

/BAD BITS BETWEEN BITS O AND /
/RXFIFO FAILED TO PURGE/

/4aH0ST FAILUREssWRITE

FAILED/

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ /RECEIVED CHAR MISCOMPARE AGAINST TX DATA ON LINE/

.ASCIZ /EXPECTED OR CORRECT/

EM9303:;
EM9304: ;
EM9401:;
EMLMSG: :
EXTMSG: ;
NDPMSG: :

ATTEMPT

/FRAMING ERROR TEST FAILED/
/CLEAR /
/PARITY ERROR TEST FAILED/
/MODEM LOOPBACK TEST /
/MODEM STATUS CODE/
/SELFTEST CODE/
/CHARACTER RECEIVED ON INACTIVE LINE, LINE:
/
/UNEXPECTED CHAR RECEIVED AFTER RX
COMPLETE ON LINE/

.ASCIZ /ACTUAL OR MEASURED /
.ASCIZ /0OVERRUN/
.ASCIZ /FRAMING/
.ASCIZ /PARITY/
.ASCIZ /SUMMARY REPORTS FOR LINES WITH EXCESSIVE
NUMBERS OF ERRORS:/
.ASCIZ /TRANSMITTED/
.ASCIZ /RECV'D/
.ASCII /
FIFO WILL NOT PURGE (DATA.VALID STUCK
SET),/
.ASCIZ / REMAINDER OF TEST SKIPPED./
.ASCIZ /7MORE THAN TWICE THE EXPECTED NUMBE
R OF CHARACTERS RECEIVED.
.ASCIZ /
LPR CONTENTS: /
.ASCIZ /EXTRA CHAR RECEIVED WITHIN DATA PATTERN ON
LINE/
.ASCIZ /SINGLE CHAR MISSING FROM RECEIVED DATA ON LINE/
.ASCIZ /%A
(NO TX COMPLETION INTERRUPTS RECEIVED)SN/
.ASCIZ /DMA TRANSMISSION MODE TEST FAILED/
.ASCIZ /DMA_START BIT SET AFTER RESET OR TX.ACTIO
N ON LINE(S):/
.ASCIZ 7/ UNEXPECTED DATA FOUND IN FIFO FROM LINE: /
.ASCI2Z /SPLIT SPEED TEST FAILED/
.ASCIZ /8MP CODES WERE REPORTED DURING THIS DIAGNOSTIC/
.ASCIZ /BMP CODE FOUND IN TEST /
.ASCIZ /THE LAST BMP CODE WAS FOUND IN TEST /
.ASCIZ /UNEXPECTED BMP CODES FOUND DURING THIS PASS/
.ASCIZ /KEYBOARD ECHO (DMU REMOTE LOOPBACK) TEST /
+ASCIZ /TYPE <CR> WHEN MODEM LINK ESTABL ISHE
D:/
.ASCIZ ZEXIT THE TEST (N = LOOP BACK TO SEND
MORE DATA):/
.ASCII /NUMBER OF 256 BYTE PATTERNS TO SEND CN EACH SELEC
TED LINE/

MACRO M1200

1996 013352
1997 013437
1998
1999

15-MAR-84 09:48

PAGE

37-1

-ASCIZ <15><12>/ (1-255, 0=SEND UNTIL *C) 4
-ASCIZ /PRINT MODEM STATUS SIGNAL REPORT AFTER EAC
H PATTERN:/
TERMSG: : LASCIZ /TYPE <CR> TO TERMINATE
THE TEST:/
.EVEN

PMSMSG

..
..
-

.LIST BIN

-11 FUNC TST PARTS
OBAL TEXT SECTION

2008
2009
2010
2011
2012
2013
2014
2015
2016

MACRO M1200

15-MAR-84 09:48

PAGE 38

Aas

-SBTTL

GLOBAL ERROR REPORT SECTION

300

s THE GLOBAL ERROR REPORT SECTION CONT AINS MESS
AGE PRINTING AREAS
s USED BY MORE THAN ONE TEST TO OUTPUT ADDITION
AL ERROR INFORMATION.
s (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO
CALL PRINT

SERVICES.

PRINTB

CUOBAL EKNGR'AEPO
RT
TNG ROUTINE
ORTIN
2018
2019
2020

2021
2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041 013500
013500
2042 013500
013500
2043
2044 013504
2045 013510
2046 013514
2047
2048
2049
2050
2051 013516
2052 013522
2053 013524
013524
013530
013534
013536
013540
2054 013544
2055 013550
2056 013552
013552
013556
013562
013564
013566
2057 013572
013572
013576
013602
013604
013606

M1200

N L}

15-MAR-84 09:48
- ERO101

-.SBTTL

PAGE 39

SE0

GLOBAL ERROR REPORTING ROUTINE

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

;®

THIS

INFORMATION

;s
;e

AN ERROR REPORTING
IF

ACCESS TEST).
THEN

BOTH)
THAT

- ERO101

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

THIS

ERROR

IF THE

SUBROUTINE

SUBROUTINE
DETECTED

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

‘..‘.“‘000

WHICH PRINTS

TEST

ADDITIONAL

(REGISTER

ERROR

ADDRESS

“EXTENDED ERROR INFO" OPTION HAS BEEN
SELECTED

WILL

REPORT

THE

TYPE

ACCESS

(READ

OR WRITE OR
WHICH CAUSED A BUS TIME-OUT
TRAP (004 TRAP).A MESSAGE
INDICATING
THE DHU MAY BE AT THE WRON
G UNIBUS ADDRESS IS ALSO
PRINTED.

s+ INPUTS:

RS - ERROR FLAG WORD.

BIT

SET,

READ

BIT

SET,

WRITE

;¢ OUTPUTS:

ERROR

OCCURED.

ERROR

OCCURED.

MESSAGES ARE PRINTED AT THE OPERATOR CONSO
LE.

;* CALLING SEQUENCE:
i s

INCLUDE

THE LABEL

PARAMETER

THE

"ERO101" AS THE MESSAGE POINTER

DRS

ERROR

REPORT

MACRO

CALL.

i+ COMMENTS:

;* SUBORDINATE ROUTINES USED: NONE.

g‘.‘..“‘.““..‘......

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

BGNMSG

004567

171620

012700
046700
001036

000100
166446

JSR

HEd

“0

ERO101

SAVE

MOV
BIC
BNE

““‘.““.....“...‘.0.0

#B8IT06,.RO
OPTION,RO
6%

ERO101::
sSAVE THE GPR CONTENTS.
RS ,PREGOS
;:CALL REGISTER SAVE SUBRT.

sSET-UP THE BIT MAP FOR 'REPORT EXT'D
ERROR INFOQ'
:TRY AND CLEAR THE FLAG.
:EXIT IF OPTION NOT SELECTED.

;s REPORT EXTENDED ERROR INFOMATION
§o

032705

001410
012746
012746
010600
104414
062706
032705
001410
012746
012746
010600

104414
062706
012746
012746
010600
104415
062706

000001

BIT
BEQ
PRINTB

013616

#B8ITO,RS
2s
#MSG1

s TEST FOR READ ERROR.
s SKIP READ ERROR MSG IF NO READ ERROR.
iPRINT READ ERROR MESSAGE
.
MOV
MOV
MOV
TRAP

000001

000004
000002

2%:

BIT

BEQ

PRINTB

013674
000001

s TEST FOR WRITE ERROR,

oMSG2

sPRINT WRITE ERROR MESSAGE
.

000004

4%;

PRINTX

aMSG3

04,5P

sSKIP WRITE ERROR MSG IF NO WRITE ERROR,

000004
013753
000001

ADD

#B8IT1,RS

#MSG1, -(SP)
@1, -(SP)
SP,RO
CSPNTB

sSUGGEST

THAT DHU MAY

MOV
MOV
MOV

MSG2, -(SP)
@1,-(SP)
SP,RO

MOV
TRAP
ADD

SP,RO
CSPNTX
4,5pP

TRAP
CSPNTB
ADD
04,5P
BE AT WRONG ADDRESS.
MOV
OMSGS, -(SP)

PART4
HA?RO M1200
8lB6Al EXNGR" TPORT
ING ROUTINE

2058 013612
013612
2059 013614
013614
013614
2060
2061 013616
013621
013624
013627
013632
013635
013640
013643
013646
013651
013654
013657
013662
013665
013670
013673
2062 013674
013677
013702
013705
013710
013713
013716
013721
013724
013727
013732
013735
013740
013743
013746
013751
2063 013753
013756
013761
013764
013767
013772
013775
014000
014003
014006
014011
014014
014017
014022
014025
014030
2064
2065

15-MAR-84 09:48

- ERO101

65:

004736

PAGE

39-1

“E2 90

PASS

JSR

ENDMSG

RESTORE THE GPR CONTENTS.
C.a(SP) .
iRETURN

L10002:

101
111

055
124
122

040
125

131
105

040
124

045

101
123
111
124
122

040

125
104
131
122
105
124
115

101
101
102
101
124
040
117
040
111
123
104
056
045

102
040
115
117

MSG1::

-ASCIZ

/#ABUS

102
040
115
117
040
101
103
123
040
040
111
040
124
120
045

MSG2:
:

.ASCIZ

/#ABUS TIME-OUT

TRAP CAUSED BY WRITE ATTEMPT . uN/

104
040
131

MSG3::

.ASCIZ

/#ADHU MAY BE AT

THE WRONG UNIBUS ADDRESS . $N%N/

TIME-OUT

TRAP CAUSED BY READ ATTEMPT .uN/

101
103
123
040
101
101
105
124
116

124
110

127

116
125
102

040

104
123
045
116

.EVEN

PREGOS

TRAP

SUBRT.

C$MSG

FUNC

TS]

PART4

M1200

2067
2069
2070

15-MAR-84

09:48

PAGE

€0

.SBTTL GLOBAL ERROR REPORTING ROUTINE
- EROSO3 -t
THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL
;e
MESSAGE WHOSE ADDRESS IS PASS
ED AS AN INPUT PARAMETER. PROVIOCD ERmOR
4

2“‘

:....‘..“‘..............

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

2071
2072

2073
2075

R1 - ADDRESS OF THE MESSAGE TO PRINT.
A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE.

]
i4 CALLING SEQUENCE:

2078

2079

INCLUDE

i¢ COMMENTS:
FE

2083

LOAD THE ADDRESS OF THE MESSAGE IN R1.
THE LABEL

"ER0S03" AS THE MESSAGE POINTER
PARAMETER IN THE DIAG
SUPER ERROR REPORT MACRO CALL.

2081

..‘

EXTENDED ERROR REPORTING HAS BEEN REQUESTED.

e INPUTS:
is OUTPUTS:

6
2077

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

THE MESSAGE

IS PRINTED AS BASIC ERROR

INFORMATION.

i# SUBORDINATE ROUTINES USED: NONE.

20“

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

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

2085
2086 014032

BGNMSG

2087 014032

2088 014032
2089 014036

012700
046700

2090 014042

001011

2092
2093 014044
014044

010146

014046

014052
014056
014060

2004 014062

012746

012746
010600
104414
062706

2095 014066

014066

ER0S03
ER0503:;

000100
166120

MOV
BIC

BNE

@BIT06.RO
OPTION.RO

:TRY TO CLEAR THE
:EXT'D ERROR REPORTING FLAG

PRINTB

9EF0503,R1

iPRINT THE MESSAGE.

{EXIT IF FLAG NOT SET.

MOV

005530

000002
000006

ENDMSG

L10003

R1,-(SP)

MOV

0EF 0503,

ADD

06, 5P

TRAP

CS$MSG

MOV
MOV
TRAP
2s:

104423

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

02,-(SP)
SP,RO
CSPNTB

- (SP)

BUSoAl EMRGa"RLo0RTING nOOTIRE"200 150418
g9:48 PAGE 41
2097
2098

wnn
CcCOVm®

2099
2100
2101
2102
2103
2104
2105
2106
2107
2108
2109
2110
2111
2112
2113
2114
2115
2116
2117
2118
2119 014070
014070
2120 014070
014070
2121
2122 014074
2123 014100
2124 014104
2125
2126
2127 014106
014106
014110
014114
014120
014122
014124

014130
014134
014134
014136
014142
014146
014150
014152

2131
2132 014156
014156
2133 014160
014160
014160

-SBTTL

GLOBAL ERROR REPORTING ROUTINE

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

is
;e
;e

- ER1603

.‘.‘.‘..‘.‘.‘.‘....‘

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

....“0‘.‘00

THIS ERROR REPORTING ROUTINE IS USED
TO PRINT OUT A BASIC ERROR
MESSAGE. ALONG WITH A MESSAGE INFO
RMING THE OPERATOR WHICH TEST IS
ABOUT TO BE ABORTED, PROVIDED EXTENDED
ERROR INFOMATION HAS BEEN
REQU
ESTED,

: &

:+ INPUTS:
34

OTHERWISE ONLY

THE

:# OUTPUTS:

“TEST FAILURE
" MESSAGE

WILL

PRINTED.

- CONTAINS THE ADDRESS OF THE MESSAGE
TO BE PRINTED.

ERRMSG

CONTAINS

TEST

THAT

THE

ADDRESS

BEING

THE

PERFORMED,

MESSAGE
DMA,

THAT

BREAK

INDICATES

ETC.

MESSAGES ARE PRINTED AT THE OPERATORS CONSO
LE.
“TESTNAME

TEST

]

;# CALLING SEQUENCE:
e

ABORTED"

INCLUDE THE LABLE

PARAMETER

THE

"ER1603" AS THE MESSAGE POINTER

DRS

ERROR

REPORT

MACRO

CALL.

s+ COMMENTS:

]
]

s* SUBORDINATE ROUTINES CALLED:
'““..‘.‘““.““.“““‘

BGNMSG

004567

171230

012700
046700
001024

000100
166056

010146
012746
012746
010600
104414
062706
016702

010246
012746
012746
010600
104414
062706
004736

JSR

9BIT06,RO
OPTION,RO
2

PRINTB #EF0503,R1

005530
000002

171164

MOV
ERRMSG,R2
PRINTB ©EF1601,R2

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

“‘

ER1603::
:SAVE THE CONTENTS OF THE GPRS.
RS,PREGOS
:CALL REGISTER SAVE SUBRT.

sTRY TO CLEAR THE
:EXT'D ERROR REPORTING FLAG
sEXIT IF FLAG NOT SEi.
sPRINT BASIC MESSAGE ON OPERATOR
S CONSOLE .
MOV
R1,-(SP)

sGET THE "TEST MESSAGE".
;PRINT “TEST ABORTED” MESSAGE.

005535
000002

MOV

9EF0503, -(SP)

MOV
TRAP
ADD

SP,RO
CSPNTB
06,5P

MOV

R2, -(SP)

MOV
TRAP
ADD

SP,RO
CSPNTB
6,5P

MOV

2%:

PASS

ENDMSG
104423

ER1603

SAVE
MOV
BIC
BNE

NONE.

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

;RESTORE THE CONTENTS OF
JSR
PC,a(SP)+

0EF 1601, -(SP)

THE GPRS.
sRETURN TO PREGOS SUBRT.

L10004;

TRAP

C8$MSG

DMU-11

GLOBAL

FUNC

TST

PARTS

MACRO M1200

ERROR REPORTING ROUTINE

15-MAR
84 09:48
- ER6201 -

-SBTTL

PAGE 42

£4

GLOBAL ERROR REPORTING ROUTINE

- ER6201

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

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

FRAMING

WHEN

."0‘

THIS IS AN ERROR REPORTING SUBROUTINE
WHICHM IS INTENDE), "0R USE
ERROR AND

3o
3

..........0..‘...0...0..

CHARACTER

PARITY

HAS

ERROR

BEEN

READ

TESTS.

FROM

THE

REPORTS

DUT

WITH

IN THE

ERRG

THE

INFO
" wi
TION
INCORREC

T
COMBINATION OF FRAMING AND PARITY ERRO
R BITS. THESE ERRORS ARE REPORTED
ONLY IF EXTENDED ERROR REPORTING MAS BEEN
REQUESTED.

ie INPUTS:
3o

R2
R3

- DATA BYTE READ FROM THE DUT,

LINE

MESSAGE

BITL

NUMBER

AND

FLAGS,

BITS

REPORTED,

BITO

AND

FRAMING

s OUTPUTS:

MULTIPLIED

BIT
AND

MESSAGES

INDICATE

FRAMING

WHICH

PARITY

ERRORS

REPORT.

MESSAGES

ARE

RESPECTIVELY.

"SET"/"CLEAR"

PARITY

INCLUDING ERROR FLAGS.

MESSAGE

FOR

BITS.

MESSAGES ARE PRINTED AT THE OPERATOR CONSO
LE.

3 CALLING SEQUENCE
:

INCLUDE

THE LABEL

PARAMETER

s COMMENTS:

WHICH

THE

"ER6201" AS THE MESSAGE POINTER

DIAG

SUPER

ERROR REPORT MACRO CALL.

THE MESSAGE IS PRINTED AS BASIC AND EXTEN
DED ERROR INFORMATION.
CONTENTS OF

THE

CSR

THE

MAY

INDIRECT

ADDRESS

ALTERED.

FIELD

THE

DUT

i¢ SUBORDINATE ROUTINES USED: PRTLPR.
'.“‘.....“‘..0‘..‘.0

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

PUVB WO

B®
-y ~d~
o2
]

P s P s i g Pt e
NN
NN NN~

2163 014162
014162
2164 014162
014162

014166
Clair7a

014176
014202
014204
014206
014206
014210
014212
014216
014222
014224
014226

0l4232
1 014236
82 014242

BGNMSG

032767

001507

016!0;

000100

012746
012746
010600
104414

062706

ER6201::

JSR

1SAVE THE CONTENTS OF THE GPR'S.

R5,PREGOS

$CALL REGISTER SAVE SUBRT,

: EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED

165766

BIT

BEQ

005234

MOV

ASR
ASR

006204

010446
010346

......““...

ER6201

SAVE

171136

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

PRINTB

OBITO6,0PTION

603

TXRXLB(R3),R4

R3
R4

0EF6201,R3,R4

005746
000003

;EXIT WITH TEST FAILURE MESSAGE

sNO EXTENDED ERROR REPORTING HAS BEEN REQUE
STED
iDURING THE SOF TWARE QUESTIONS,

;GET THE ASSOCIATED TX LINE NUMBER ,

tCALCULATE THE RX LINE NUMBER,
1CALCULATE THE ASSOCIATED LINE NUMBER,
sREPORT

THE ERROR

TYPE

AND LINE NUMBERS.

MOV

RS, -(SP)
0EF 6201, - (5P
03, (5P

TRAP

CIPNTB

MOV

000010

:'REPWT FRAMING ERROR PROBLEM,

R4, -(SP)

MOV
MOV
MOV

ADD

SP,RO

210,5P

012704
012701
032705

011106
010105

MOV

MOV
BIT

OEM6202,R4
#EMOS09,R!
eBIT1,.RS

1SELECT THE “ERROR BIT CLEAR” MESSAGE
,

$SELECT EXPECTED “ERROR BIT SET" MESSAGE,
sTEST IF FRAMING ERROR MESSAGE 10 BE REPORTED,

Btk FéM6n'AloBATIdG al0FMReTM200 15 B 24 go:en Pace a1
21853 014246
2184 014
2185 014254
2186 014256
2187 014260
2188 014264
014264
014266
014270
014274

014300
014302
014304
014310
014314
014316
014322

001427

032705
001403
010401
012704
010146
010446
012746
012746
010600
104415
062706
032705
001424
012704
012701

BEQ
BIT
BEQ
MOV
MOV
PRINTX

#BITO,.RS
23
R4 ,R1
®EMOS509,R4
#EF6202,.R4,R1

'argsr ev'tgoge:cgts:?ngé‘gmoa.

MESSAGE

006061
000003

MOV
MoV
MOV

000010
000010

BIT
BEQ
MOV
MOV

011106
010105
3

oBIT3,RS
10%

9EM6202,
R4
#ENOS02,R1

s REPORT PARIY ERROR PROBLEM.

FLAG.

1BRANCH TO REPORT ERROR BIT "CLEAR",
:SELECT EXPECTED "CLEAR" STATE MESSAGE
.
$SELECT THE “ERROR BIT SET" MESSAGE .
tREPORT THE SOUPCE OF THE PROBLEM,

ADD

0EF 6202, -(5P)
03, -(sSP)
SP,RO

CSPNTX

910, 5P

s TEST
sEXIT

IF PARITY ERROR MESSAGE TO
BE REPORTEC.
IF PARITY ERROR REPORT TO BE SKIP
PED,

s TEST

"SET"/"CLEAR” MESSAGE FLAG.

1SELECT THE "CLEAR" MESSAGE.
$SELECT THE EXPECTED "SET" STATE MESSAGE .

‘-

014326
014332
014334
014336
014342
014342
014344
014346
014352
014356
014360
014362

2202
2203 014366
014366
014370
014374
014400
014402
014404
2204
2205 014410
2206 0laals
014414
2207 014416
Ol4416
014416

032705

001403
010401
012704
01014¢
010446
012746
012746
010600
104415
062706
010246
012746

012746
010600

6%:

010105

8s:

BIT

BEQ
MOV
MOV
PRINTX

#IT2,RS
8s

R4 ,R1
#EMOS09,R4
OEF6203,R4,R1

1BRANCH
$SELECT
sSELECT
tREPORT

TO REPORT ERROR BIT CLEAR.
TME EXPECTED "CLEAR" STATE MESSAGE.
THE "ERROR BIT SET" MESSAGE.
THE SOURCE OF THE PROBLEM.

MOV

006157
000003

MOV

000010
10s8:

PRINTX

004736

608:

JSR

PASS

ENDMSG

104423

SP,RO

TRAP
ADD

CSPNTX
010,5P

MOV
MOV
MOV
MOV
TRAP
ADD

R2,-(SP)
#EF 1603, -(SP)
02,-(5P)
SP RO
CIPNTX
06,5P

sREPORT

PC.PRTLPR

sREPORT THE CONTENTS OF THE LPR FOR THIS LINE.
sRESTORE THE CONTENTS OF THE GPR'S,

ACTUAL

DATA RECEIVED.

005567
000002

006152

0EF 6203 -(SP)

9EF1603,R2

104415
062706
004767

R1,-(SP)

R4, .-(SP)

JSR

PC,8(SP).

tRETURN TO PREGOS SUBRT,

1.10005;

TRAP

CeMSG

DHU- L1 FUNC TST PARTA
MACRO M1200
GLOBAL ERROR REPORTING ROUTINE

15-MA7-84 09:48
-

ER9001

PAGE 43

2209
2210

221l
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229 014420
014420
2230
2231
2232
2233
2234 014420
2235 014426
2236
2237
2238 014430

014430
014432
014436
014442
014444
014446
2239 014452
014452
014454

014460

e INPUTS:

SINGLE

LINE

BYTE

CGUE

NUMBER

WHICH

MAS

ASSOCIATED

BEEN

WITH

THE

READ

FROM

THE

DUT.

CODE.

A MESSAGES IS PRINTED AT THE OPERATOR CONSO
LE .

s CALLING SEQUENCE
:

INCLUDE THE LABEL

PARAMETER

s+ COMMENTS:
s

THE

"ER9001" AS TME MESSAGE POINTER

DIAG

SUPER

ERROR

REPORT

MACRO

CALL.

THE MESSAGE IS PRINTED AS BASIC AND EXTENDED
ERROR INFORMATION.

:* SUBORDINATE ROUTINES USED: NONE.

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

.........‘..‘..0‘..‘

BGNMSG

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

0.‘.‘....0000

ER9001
ER9001::

3 EXIT

032767
001433

000100

165534

IF EXTENDED ERROR REPORTING MAS NOT BEEN
ENABLED

BIT
BEQ

5?!706.0PTION

sEXIT WITH TEST FAILURE MESSAGE IF
sNO EXTENDED ERROR REPORTING MAS BEEN

iDURING THE SOF TWARE QUESTIONS.

010146
012746
012746
010600
104414
062706
010446
012746
012746
010600
104415

062706

014512

010246
012746
012746
010600
104415
062706

2241
2242 014516
014516
014516

R1 - ADDRESS OF MESSAGE TO PRINT FIRST.

s OUTPUTS:

014464
014466
014470

2240 014474
014474

PRINTB

sREPORT

TYPE OF CODE

FOUND.

000002

MOV
MOV
MOV

R1,-(SP)
PEF 9001
- (SP)
,
02,-(SP)

TRAP

CSPNTB

MOV

PRINTX

0EF9002,R4

sREPORT

THE LINE NUMBER OF

006336
000002

ADD

THE CODE.

PRINTX

OEF9003,R2

tREPORT

THE CODE

06,5P

R4, -(SP)

TRAP

CSPNTX

ADD

WHICH WAS FOUND.

MOV
MOV

006410
000002

SP
. RO

MOV

MOV
MOV
MOV

MOV

TRAP

28;

104423

OEF9001,R1

REQUESTED

0EF 900
-2,
(SP)
02,-(5P)
SP RO

06,5P

R2,-(5P)
OEF 9003, -(5P)
P RO

CSPNTX

ADD

26, 5P

TRAP

CeMs(

ENDMSG

L 10006
;

c£o

BlBaA! EXHER'RECATING nOTIRE"200 15-M4g;88 99:48 PAGE a4
2244
2245
2246
2247
2248

TRANMSISSION AND RECEPTION TEST
S.

HAS OCCURRED WHEN INCORREC
T

2249

2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266 014520
014520
2267
2268
2269
2270
2271 014520
2272 014526
2273
2274
2275 014530
2276 014532
2277 014536
014536
014540
014542
014546
014552
014554
014556
2278 014562
014562
014564
014570
014574
014600
014602
014604
2279 014610
2280 014612
2281 014614
014614
014616
014622
014626

DATA

IS RECEIVED FROM

THE DUT,
ROUTINE ALSO REPORTS THE READ AND
EXPECTED DATA VALUES.

i+ INPUTS:

- ADDRESS OF MESSAGE TO PRINT FIRST.

DATA

BYTE

LINE

NUMBER

EXPECTED

i OUTPUTS:

READ

FROM

THE

MULTIPLIED

DATA

BYTE,

DUT.
By

BIT

SET

“NONE".

A MESSAGES IS PRINTED AT THE OPERATOR CONSO
LE.

3* CALLING SEQUENCE:

INCLUDE THE LABEL

PARAMETER

s+ COMMENTS:
.

THE

"ER9002" AS THE MESSAGE POINTER

DIAG

SUPER

ERROR

REPORT

MACRO

CALL.

THE MESSAGE IS PRINTED AS BASIC AND EXTEN
DED ERROR INFORMATION,

i® SUBORDINATE ROUTINES USED: PRTLPR.
3“‘...‘..“0‘.‘...‘.“

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

BGNMSG

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

“..O‘..O

ER9002
ER9002:
:

032767
001462

006203
042702
010346
010146
012746
012746
010600
104414
062706
010246
012746
012746
012746
010600
104415
062706
005704
100414
010446
012746
012746
012746

000100

165434

EXIT

IF EXTENDED ERROR REPORTING HAS NOT
BEEN ENABLED

BIT
BEQ

@BITO6,0PTION
62$

;EXIT WITH TEST FAILIRE MESSAGE IF
sNO_EXTENDED ERROR RLPORTING HAS BEEN

1DURING THE SOF TWARE QUESTIONS.

177400

006520
000003

000010
011476
006437
000003
000010

ASR

BIC
PRINTB

0177400,R2
OEF9006,R1,R3

s1CALCULATE

THE LINE NUMBER.

sMASK OUT ALL BUT DATA IN READ CMAR.
;PRINT THE FIRST LINE OF THE MESS
AGE.

MOV
R3, -(SP)
MOV
R1,-(SP)
MOV
OEF 900-6,
(5P )
MOV
o3, .(SP)
MOV
SP,RO
TRAP
CSPNTB
ADD
010,5P
PRINTX
&EF9004,0EM9010,RZ
:PRINT ACTUAL DATA,
MOV
R2, -(SP)
MOV
PEM9010, -(SP)
MOV
9EF 9004 , - (5P)
MOV
03, -(SP)
MOV
SP,RO
TRAP
COPNTX
ADD
010,5P
1ST
R4
sCHECK FOR “NONE” CODE SET IN
TED DATA
8MI
28
sBRANCH TO PRINT “NONE” MESSAGEEXPEC
IF
FLAG SET.
PRINTX #EF9004, 9EMI009, R4
sPRINT
EXPECTED DATA,

011452
006437
000003

REQUESTED

MOV

MOV
MOV
MOV

R4, -(SP)

0EM900
- (9,
5P )
9EF 9004, -( SP)
03, (5P}

m E%Yi!

014632
014634
014636
2282 014642
2283 014644
014644

014650
014654
014660
014662
014664
2284 014670
2285 014674
014674
014674

Pfi{.“; mmzoo

15-{0\2-% 09548

Fo
PAGE 44-1

SEQ %7

010600

104415
062706
000412
012746
012746
012746
010600
104415

062706
004767

MOV
TRAP

000010

011452
006467
000002
000006
005672

2%:

PRINTX

6us

9EF9005,9EM9009

ADD

:EXIT THIS ROUTINE.

;PRINT MESSAGE

JSR

ENDMSG

PC.PRTLPR

#10,5P

INDICATING NO EXPECTED DATA.

MOV
MOV
MOV
MOV

TRAP

60$:
6cs:

104423

SP,RO
CHPNTX

ACD
;PRINT CONTENTS OF THE LPR REGISTER.
L.10007:

TRAP

0EMI009, -(SP)
@EF 9005, -(SP)
02, -(SP)
SP,RO
CSPNTX

96,5P

CS$MSG

PARTA
HA?RO M1200
BBeA! EKNGa
"RPORT ING ROUTI
NE

15-MAR-84 09:48
- ER9003

PAGE 45

SEQ S8

-SBTTL

GLOBAL ERROR REPORTING ROUTINE

THIS

- ER9003

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

0...‘........‘.‘.0‘...‘0

IS AN ERROR REPORTING
TRANMSISSION AND RECEPTIO
N

;e
;e

SET (IE.

CHARACTER

s+ INPUTS:

HAS

BEEN

OVER-RUN,

LINE

THE

NUMBER

REPORTS

DUT

WITH

INTENDED

ERROR

OR PARITY FLAG).

MULTIPLIED

.‘.00

FOR

USE
INFORMATION

ERROR

FLAG

THE
WHEN

FLAGS

INCLUDING ERROR FLAGS.

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE
.

s CALLING SEQUENCE:

INCLUDE THE LABEL

PARAMETER

;i COMMENTS:

FROM

FRAMING,

i+ OUTPUTS:

TESTS.

WHICH

R2 - DATA BYTE READ FROM THE DUT,

READ

SUBROUTINE

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

THE

"ERSQ03" AS THE MESSAGE POINTER

DIAG

SUPER

ERROR

REPORT

MACRO

CALL.

THE MESSAGE IS PRINTED AS BASIC AND EXTENDED
ERROR INFORMATION.
CONTENTS

THE

CSR

MAY

]

THE

INDIRECT

ADDRESS

ALTERED.

i+ SUBORDINATE ROUTINES USED:

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

FIELD

THE

DUT

NONE.

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

014676
014676

BGNMSG

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

ER9003
ER9003::

014676
014704

032767

014706
014710
014710
014712
014716
014722
014724
014726
2320 014732
232l 014734

006203

2322 014740
014740
014742
014746
014752
014754
014756

001470

010346
012746
012746

010600
104414
062706

010201
042701

010146
012746
012746
010600
104415
062706

000100

s EXIT THE TEST IF EXTENDED ERROR REPORTING HAS
NOT BEEN ENABLED
165256

BIT
BEQ

@BIT06,0PTION
62

$EXIT WITH TEST FAILURE MESSAGE IF
sNO EXTENDED ERROR REPORTING HAS BEEN REQUE
STED

iDURING THE SOFTWARE QUESTIONS.

ASR

PRINTB

#EF9007,R3

iCALCULATE THE LINE NUMBER.

sREPORT

THE ERROR

TYPE AND L INE NUMBER,

MOV
MOV
MOV
MOV

006544
000002

MOV

177400

BIC
PRINTX

R2,R1

@177400,R1
@EF9008,R1

006640
000002

R3, -(SP)
9EF9007, -(SP)
02, -(SP)
SP,RO

TRAP

CSPNTB

MOV
MOV
MOV

9EF 9008, -(SP)
2, -(SP)
SP,RO

ADD
06 ,5P
$EXTRACT THE RECEIVED CHARACTER FROM THE
i
_PASSED IN CHAR VALUE WITH FLAGS.
sREPORT THE VALUE OF TME RECEIVED CHAR.

TRAP
ADD

CSPNTX
06,5P

: REPORT OVERRUN FLAG SET IF NECESSARY,

014762
014766
014772
014774

012701
032702
001402
004767

011522

040000

000036

MOV

BIT

BEQ
JSR

4EM9011,R1

oBIT14,R2

2%
PC,508

sSELECT THE OVERRUN ERROR MESSAGE
.,

sCHECK OVERRUN ERROR FLAG IN PASSED IN CHAR,
sSKIP ERROR IF OVERRUN ERROR FLAG WAS C! EAR.

sREPORT THE OVERRUN ERROR FLAG WAS SET,

BBaA! EkiDn'AloORT
F

IST

TnG ROCTIRETM200 15-MAB
84 09:48

PARTS

gggé
2333 015000
2334 015008
2335 015010
gggg 015012

011532
020000

2%:

000020

MOV
B8IY
BEQ
JSR

‘0

€0 59

[

#EM9012,.R1
oBIT13.R2
43
PC.5Cs

sSELECT THE FRAMING ERROR MESSAGE .
:CHECK FRAMING ERROR FLAG IN PASSED IN CHAR.
1SKIP ERROR IF FRAMING ERROR FLAG WAS CLEAR
,
;:REPORT THE FRAMING ERROR MESSAGE .

; REPORT PARITY FLAG SET IF NECESSARY .
'.

012701
032702
001415
004767
000412

011542
010000

000002

2346

2352 015062
2353 015066
015066
015066

PAGE 45-1

012701
032702
001402
004767

MOV
8IT
BEG
JSR
BR

S®EM9013,.R1
#B8IT12.R2
60%
PC,50s
603

:SELECT THE PARITY ERROR MESSACE .
:CHECK PARITY ERROR FLAG IN PASSED IN CHAR,
:EXIT ROUTINE IF PARITY ERRO FLAG WAS CLEAR
,
s:REPORT THE PARITY ERROR MESSAGE .
sEXIT THIS ROUTINE.

gg:;

2349 015036
015036
015040
015044
015050
015052
015054
gggg 015060

:48

;s REPORT FRAMING FLAG SET If NECESSARY .,

sggg

2340 015016
2341 01522
2342 015026
2343 015070
gg:; 015034

-MAR -

s LOCAL SUBROUTINE TO REPORT AN ERROR FLAG STATUS.

010146
012746
012746
010600
104415
062706
000207

004767
104423

508 :

PRINTX

@EF9009,R1
MOV
MOV
MOV
MOV
TRAP
ADD

006677
000002

000006

005500

60%:
62%:

RTS

JSR
ENDMSG

PC,PRTLPR

R1,-(5P)
QEF 9009, - (SP)
82, -(SP)
SP,RO
CSPNTX
06,5P

sREPORT THE LPR CONTENTS FOR iHIS LINE.
L10010:

TRAP

C$MSG

DHU-11 FUNC TST PARTS
MACRO 41200
GLOBAL ERROR REPORTING ROUTINE
2355
2356
2357
2358
2359
2360

2361
2362
2363
2364
2365
2366
2367
2368
2369
2370
2571
2872
2373
2374
2575
2376
2377 015070
015070
2378 015070
2379 015074
2380 015100
2381 015102
015102
015106
015112
015116
015120
015122
015126
015130
015134
015136
015140
015142
015144
015144
015150
015152
015156
015162
015164
015166
2389 015172
2390 015174
2391 015176
2392 015200
2393 015202
015202
015202

15-MAR-84 09:48
- ER9004 -

-SBTTL

PAGE 46

GLOBAL ERROR REPORTING ROUTINE

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

THIS

FOR

;e
;e
-

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

AN ERROR

LINES

REPORTING

WHICH HAVE

- ER9004

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

SUBROUTINE

EXCEEDED

THE

WHICH REPORTS
SPECIFIED MAXIMUM

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

ERROR
NUMBER

SUMMARIES

OF
INDIVIDUAL RECEPTION ERRORS, PROVIDED EXTEN
DED ERROR REPORTING HAS
BEEN REQUESTED BY THE OPERATOR.

:. INPUTS:

R1 - ADDRESS OF MESSAGE TO PRINT FIRST.

ERCNTB

LABEL

ERSMRF

“REPORT

:o OUTPUTS :
FL

PARAMETER

:o COMMENTS:

LINE

SUMMARY

ERROR

FOR

COUNTERS

LINE"

TABLE.

FLAGS.

INCLUDE THE LABEL "ER9004" AS THE MESSAGE POINT
ER

A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE.

s# CALLING SEQUENCE
:
o

BASE

ERROR

THE

DIAG

SUPER

ERROR

REPORT

MACRO

CALL.

THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION,

THE

CONTENTS

GPR'S

R2,

R3,

R4,

AND

ARE

DESTROYED.

i* SUBORDINATE ROUTINES USED: NONE.

F] .“‘....‘.“.‘......“““.‘“

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

BGNMSG

012700
046700
001040
012746
012746
012746
010600
104414
062706
005002
016703

000100
165062

MOV
BIC
BNE

PRINTB

011551
005530
000002

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

ER9004

#BIT06,RO
OPTION.RO
64

9EF0503,0EM9014

ER90

04:;
:TRY TO CLEAR THE
:EXT'D ERROR REPORTING FLAG

iEXIT

IF FLAG NOT

SET.

;REPORT THE SECONDARY ERROR MESSAGE.

000006

165344
2%:

CLR
MOV
CLR
cLC
PRINTX

003302

ERSMRF ,R3

R3
as

:CLEAR

THE LINE COUNTER.

sCLEAR

"LINE COUNTER

iGET THE ERROR SUMMARY FLAGS.

TIMES 2" OFFSET.

sSHIFT ANOTHER ERROR SUMMARY FLAG
INTO CARRY.
iSKIP PRINTING MESSAGE IF FLAG FOR
LINE CLEAR.

9EF9010,R2,ERCNTB(R4
)

000010
MOV

TST
6%:

ENDMSG

(R8).,RS
R2
R3
2%

9EM9014, -(SP)
0EF0503, - (SP)
02,-(SP)
SP.RO
($PNTB
06,5P

sCLEAR THE CARRY FOR THE FOLLOWING ROTATE.

006736
000003

MOV
MOV
MOV
MOV
TRAP
ADD

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

ERCNTB(RA
), -(SP)
R2, -(SP)
0EF 9010, - (5P)
03, -(5P)
SP.RO
CSPNTX
010, 5P

TRAP

CsMSG

s INCREMENT THE LINE OFFSET BY 2.
s INCREMT TME LINE COUNTER,
:CHECK THE ERROR SUMMARY FLAGS.
s IF MORE FLAGS SET, LOOP TO DO OTHER LINES.
L10011:;

DHU-11

F
PART4
MACRO M1200
CGLOBAL cgzfi
n REPORTING ROUTI
NE
TST

2395
2396
2397
2398
2399
2490
2401
2402
2403
2404
2405
2406
2407

15-MAR-84 09:48
- ER9005 -

-SBTTL

SEQ 61

GLOBAL ERROR REPORTING ROUTINE

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

THIS

TRANSMISSIONS

IS AN ERROR REPORTING

INPUTS:

EITHER

BIT MAP OF LINES WHMICH DID NOT

DPLENB

LABEL

EM9015

SYMBOLIC

;s OUTPUTS:

"TRANSMITTED”
OF

BASE

THE

"RECEIVED"

CORRECT

DATA

ADDRESS

INDICATE

COMPLETE

DATA

TX OR RX,

CHARACTER

PATTERN

THE

INCOMPLETE

LENGTH

“TRANSMITTED"

COUNTERS

RX,

TABLE.

TABLE.
MESSAGE
.

A MESSAGE IS PRINTED AT THE OPERATOR CONSO
LE.

;¢ CALLING SEQUENCE
:

INCLUDE THE LABEL

PARAMETER

s+ COMMENTS:

BASE

0..00...0“‘000

WHICH REPORTS

THE

"ER9005" AS THE MESSAGE POINTER

DIAG

SUPER

ERROR

REPORT

MACRO

CALL,

THE MESSAGE IS PRINTED AS BASIC AND EXTENDED
ERROR INFORMATION.
CONTENTS OF THE

THE

2415
2416
2417

SUBROUTINE

RECEPTIONS.

ADDRESS

..0000.‘.“.“.0000‘..

2411
2412
2413
2414

- ER9005

..‘.‘0...‘.0....‘.0.

3
FE

2408
2409
2410

INDIRECT

ADDRESS

ALTERED.

FIELD

THE

DUT

CSR

MAY

3* SUBORDINATE ROUTINES USED: PRTLPR.

'“...‘...“.‘.‘.‘.“‘.

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

2418 015204

015204
2419 015204
015204
004567
2420
2421 015210 012700
2422 015214
046700
2423 015220
001107
2424
2425 015222
015222
010146
015224
012746
015230
012746
015234
010600
015236
104414
015240 062706
2426 015244
005003
2427 015246
022701
2428 015252 001032
2429
2430
2431
2432
2433 015254
015254
012746
015260 012746
015264
010600
015266
104415
015270 062706
2434 015274
000241
2435 015276
006002
2436 015300
103013
2437 015302
015302
010346

PAGE 47

BGNMSG

JSR

000100
164742

MOV
BIC

B8NE

PRINTB

#B81IT06,R0
OPTION,RO

CLR
cMP

BNE

ER900S:
:
;SAVE THE CONTENTS OF THE GPR'S.
RS ,PREGOS
sCALL REGISTER SAVE SUBRT.

sTRY TO CLEAR THE
sEXT'D ERROR REPORTING FLAG

sEXIT IF FLAG NOT SET,.

@EF9013,R1

sREPORT

007141
000002

011645

..‘.‘O

ER9005

SAVE

170114

“.““““.‘....“‘.‘...A

R3
#EM9015,R1

THE

SECONDARY ERROR MESSAGE
.

MOV
MOV

R1,-(SP)
QEF9013, -(SP)

MOV
TRAP
ADD

SP,RO
CSIPNTB

06,5P
sCLEAR THE LINE COUNTER.
+CHECK IF ADDRESS CORRESPONDS TO TX MESSAGE .

:BRANCH IF RECEPTION MESSAGE

TO BE PRINTED,

: PERFORM Tx INCOMPLETE ERROR MESSAGE REPORTING.

012260
000001

PRINTX #EM9030

tPRINT “NO TX COMPLETION INTERRUPTS RECEIVED”
MOV

"ov

MOV
TRAP

2%:

CLC

ROR
8CC
PRINTX

ADD

R2
4
OEF9020,R3

OEMI030, -(5P)

.1.'(5”

SP,RO
CSPNTX

04 ,5pP

sCLEAR THE CARRY FOR THE FOLLOWING ROTATE
.

sSHIFT “TX NOT DONE” FLAG INTO CARRY
,
s SKIP PRINTING MESSAGE IF FLAG FOR LINE
CLEAR,
sPRINT “T00 FEW TX,ACTIONS GENER:;SD” nsgi
($9)

=
]

BlbeAL EXMGR"REr0RT
TG
015304
015310
015314
015316

012746
012746
010600
104415

M1200

15-MAR-84 09:48
- ER9005 -

PAGE 47-1

SEQ &2

007225
000002

015320 062706
2438 015324
004767 005236
2439 015330 005203
2440 015332
005702
2441 015334
001357
2442 015336
000440
2443
2444
2445
2446 015340 000241
2447 015342
2448 015344
103031
2449 015346
006303
2450 015350 016305
005234
2451 015354
010246
2452 015356 010502
2453 015360 016505
003442
2454 015364
006202
2455 015366
006203
2456 015370
015370 010246
015372
010546
015374
011446
015376
010146
015400 010346
015402
012746
007025
015406
012746
015412
010600
015414
104415
015416
000016
2457 015422
012602
2458 015424
004767
005136
2459 015430
005724
2460 015432
005203
2461 015434
005702
2462 015436
001340
2463 015440
015440 004736
2464 015442
015442
015442
104423

MOV
MOV
MOV
TRAP

43:

JSR
INC
TST

BNE
BR
HEd

PC.PRTLPR

R3
R2
2%

10s

#EF 9020, -(SP)
SP,.RO

C$PNTX
ADD
26,5P
sREPORT CONTENTS OF LPR REGISTER FOR
THIS LINE.
s INCREMENT LINE COUNTER.
sCHECK THE “TX NOT DONE FLAGS".
+IF MORE FLAGS SET, LOOP TO DO OTHER
LINES.
{EXI
T

THIS ROUTINE.

s PERFORM RX INCOMPLETE ERROR MESSAGE REPORTING.

‘

63:

cLC
ROR
B8CC
ASL

MOV
MOV
MOV
MOV

ASR
ASR
PRINTX

R3
TXRXLB(R3),RS
R2, -(SP)

RS5,R2
ggCNTB(RS).RS

iCLEAR THE CARRY FOR THE FOLLOWING ROTAT
E.
sSHIFT “RX NOT DONE” FLAG INTO CARRY.
1SKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR.
$SHIFT LINE @ TO GIVE CORRECT TABLE OFFSET.
sGET THE “ASSOCIATED" RECEIVE LINE OFFSET.
$SAVE THE “RX NOT DONE” FLAGS ON THE STACK
.
1COPY THE ASSOCIATED TX LINE OFFSET.
:GET THE TOTAL NUMBER OF EXPECTED CHARS.

sSHIFT THE TABLE OFFSET TO GIVE A LINE
NUMBER.

R3
sSHIFT TABLE OFFSET
#EF9012,R3,R1,(R4),R5,R2
{REPO

TO GIVE LINE NUMBER.

RT NUMBER OF CHARS ON LINE.

9EF9012, -(SP)
06, -(SP)
SP,RO

MOV

8s:

TS7T
INC
TST

108

PASS

ENDMSG

JSR

CSPNTX
ADD
916,5P
sRESTORE THE “RX NOT DONE" FLAGS.
sREPORT CONTENTS OF LPR REGISTER FOR THMIS LINE.
s INCREMENT THE CHARACTER COUNTER TABLE.
s INCREMENT THE LINE COUNTER,
sCHECK THE "RX NOT DONE FLAGS”.
sIF MORE FLAGS SET, LOOP TO DO OTHMER LINES.
sRESTORE THE CONTENTS OF THE GPRS.
PC.a(SP)»
sRETURN TO PREGOS SUBRT,
L10012:

TRAP

CSMSG

BBkl £H AloAT
i aBOFRRI200 15 MR BE 0008 Pace an
2466

-SBTTL

2467
2468
2469
2470
2471
2472

i
£

2491
2492 015456
015456
015460
015462
015466
013472
015474
015476
2493
2494 015502
015502
015502

THIS

WHICH

GENERAL

TAKES

:o OUTPUTS:
L

ERROR

SINGLE,

REPORTING

DIGIT

ADDRESS

DECIMAL

MESSAGE

INCLUDE THE LABEL

PARAMETER

s+ COMMENTS:

SUBROUTINE

00“....00000.000

WHICH

ARGUMENT

REPCRTS

AFTER

THE

END

DIGITS.

FIRST.

THE

"ER9101" AS THE MESSAGE POINTER

DIAG

SUPER

ERROR

REPORT

MACRO

CALL.

THE MESSAGE IS PRINTED AS BASIC ERROR INFOR
MATION.

i+ SUBORDINATE ROUTINES USED:
;“.‘..“"...‘...““...

NONE.

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

BGNMSG

MESSAGE

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE .

i* CALLING SEQUENCE:

‘0.0.‘0.0.‘..‘0‘00..

Rl - VALUE TO BE PRINTED AFTER MSG AS 2 DECIMAL

- ER9101

‘000.0..‘.00‘.0..0‘.

ASCII MESSAGE.

:o INPUTS:

2473

2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484
2485 015444
015444
2486
2487 015444
2488 015450
2489 015454
2490

GLOBAL ERROR REPORTING ROUTINE

3.000‘00‘00“0‘0“00‘0

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

0.“...

ER9101
ER9101::

012700
046700
001012

010146
010246
012746
012746
010600
104414
062706

000100
164506

4BIT06,RO
OPTION,RO
2%

;TRY TO CLEAR THE
:EXT'D ERROR REPORTING FLAG
:EXIT IF FLAG NOT SET.

PRINTB

@EF9006,R2,R1

:REPORT

THE

STRING FOLLOWED BY

006520
000003

THE NUMBER.

MOV
MOV
MOV

R1,-(SP)
R2, -(SP)
9EF9006, -(SP)

TRAP
ADD

CSPNTB
#10,5P

TRAP

C$MSG

MOV
MOV

000010

2%:

104423

MOV
BIC
BNE

@3, -(SP)
SP,RO

ENDMSG
L10013:

Bkl KRBT WEOFEREI20 158,80 ,90:00 Pace o5
2496

.SBTTL

0 «

GLOBAL ERROR REPORTING ROUTINE

;...0.0.0‘.‘0‘000‘.0....

ER9102

0‘..‘.0‘...‘...‘0.0‘...‘

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

‘..‘00

THIS IS AN ERROR REPORTING SUBROUTINE
WHICH PRINTS ADDITIONAL ERROR
AFTER THE

INFORMATION

REPORTING HAS BEEN REQUESTED.

;e
;e

ERROR

MESSAGE

HEADER,

PROVIDED

THIS ROUTINE IS PASSED A BIT
MAP WHICH SPECIFIES
THE ERROR CONDITION SHOU
LD BE REPORTED.

:+ INPUTS:

R1
R2

i+ OUTPUTS:

FOR

WHICH

LINES

FOR

WHICH

REPORT

ERRORS.

MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE .

s CALLING SEQUENCE
:

LOAD THE ADDRESS OF THE MESSAGE IN R1.

LOAD

THE BIT MAP OF LINES WITH ERRORS

INCLUDE

THE

(ERRBLK)

LINES

ERROR

- ADDRESS OF THE MESSAGE TO BE PRINTED BY
THIS ROUTINE.
BIT MAP

;¢ COMMENTS:

THE

EXTENDED

LABEL

“ER9102"

THE

DIAG

THE

IN R2.

MESSAGE

SUPER ERROR REPORT

POINTER

MACRO CALL.

THE OUTPUT FORMAT OF THIS MESSAGE IS:
“TEXT

MESSAGE

“ERROR

POINTED

R1"

CONDITION

LINE

NN"

MESSAGE

FOR

“"ERROR CONDITION ON LINE

THE

TOP

MESSAGE,

BASIC

ERROR

AND

THE

..."
EACH

INFORMATION.

LINE

ARE

PRINTED

i* SUBORDINATE ROUTINES USED: NONE.
3 “....“.““.....‘.‘0

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

BGNMSG

2526
2327
2528
2529 015510
2330 015516
2531
2532
2533 015520

015536
2534 015542
2535 015544
2536 015546
2537 015550
2538 015552
015552
015554
015560
015564
015566
015570

004567

JSR

032767
001441

000100

...‘.‘

ER9102

SAVE

167614

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

iSAVE

THE CONTENTS OF

R5,PREGOS

ER9102::
THE GPRS.

:CALL REGISTER SAVE SUBRT,

: EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED

164444

BIT

BEQ

#BIT06,0PTION

60$

;EXIT WITH TEST FAILURE MESSAGE IF

sNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED
iDURING THE SOF TWARE QUESTIONS.

010146
012746
012746
010600

‘PRINTB

104414

062706

sPRINT

THE FIRST LINE OF

THE MESSAGE.

005530
000002

005003
000241
006002
103011
010346
012746
012746
010600

0EFOS503,R1

2%:

CLR
CcLC

ROR

8CC

PRINTB

007311

Re2
4%

@EF9103,R3

MOV

#EF0503, -(5P)

MOV
TRAP
ADD

SP,RO
CSPNTB
06,5P

sCLEAR THE LINE NUMBER,
sPREPARE TO ROTATE NEXT BIT OUT OF MAP,

1GET THE NEXT BIT OF THE BIT MAP,

:SKIP PRINTING MESSAGE IF THE BIT IS CLEAR.

sREPORT

THIS LINE HAD THE ERROR,

MOV
MOV
MOV

MOV
TRAP
ADD

R3, -(SP)
0EF9103, -(SP)
02, -(SP)
SP,RO
CSPNTB
06, 5P

BlbeAl EXiiGn"RlroR
ING
T ROUTINE
2539 015574
2540 015576
2541 015600
2542 015602
015602
015606
015612
015614
015616
2543 015622
015622
2544 015624

005203
005702
001361
012746
012746
010600
104414
062706
004736

15-MAR-84 09:48

- ER9102

45:

INC
TST

BNE

PRINTB

007306
000001

104423

IND
PAGE 49-1

“EC

R3
R2

: INCREMENT THE LINE COUNTER.
s:CHECK THE BIT MAP,
:LOOP IF NOT ALL SET BITS REMOVED FROM BIT
MAP,
:PRINT A BLANK LINE.

#EF910!

MOV
MOV

TRAP

000004
60s$:

ADD

PASS

ENDMSG

015624

M1200

JSR

®EF9101, -(SP)
SP,RO

CSPNTB

04,5P

;RESTORE THE SAVED CONTENTS OF THE GPRS.
PC.a(SP).
iRETURN TO PREGOS SUBRT.
L10014:

TRAP

C$MSG

£
o

DMU-11

FUNC

1ST

PARTS

MACRO M1200

GLOBAL ERROR REPORTING ROUTINE

15 -MAR-84 09:48

- ER9301

2546

.SBTTL

25‘7

PAGE

“£0

GLOBAL ERROR REPORTING ROUTINE

ER9301

30..“‘..‘.0.00“.0.0‘..0.0‘.0

2548
2540
2850

e
b
;e

s
g.

2553

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

THIS IS AN ERROR REPORTING SUBROUTINE WMICH PRINTS ....0..00...0‘00000o
ANY BMP CODES
THAT ARE FOUND IN THE BMP CODE
E, TOGETMER WITH THE TWE NUMBER OF
THE TEST THAT WAS EXECUTING AT QUEU
THE TIME THE BMP CODE WAS LOGGED .
PROVIDED EXTENDED ERROR REPO

3¢ INPUTS:

gss;

2556

3¢ OUTPUTS:

zzgg;

l‘

2559

RTING HAS BEEN ENABLED

R1 - THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED.

R2 - THE ADDRESS OF THE NEXT EMPTY CELL
IN THE QUEUE.

THE TEST NUMBER FOLLOWED BY THE BMP CODE ARE PRINTED
AT THE

OPERATOR CONSOLE
.

s¢ CALLING SEQUENCE:

2355:?

3¢ COMMENTS:

‘0

2564

BGNMSG

015626

Bde 015626

004567

167472

2570 015632
2571 015636
gg;g 015642

012700
046700
001064

000100
164320

2574 015644
015644

010146

015646

012746

012746
010600
104414
062706
012703
012705
012301
012304
004767
020302
103772

SUPER

ERROR

REPORT

MACRO

SAVE

000006
002512
012651

00.00...0

ER9301::

JSR

;SAVE THE GPRS ON THE STACK.

RS,PREGOS

1CALL REGISTER SAVE SUBRT.

MOV
BIC
8NE

#81IT06,R0
OPTION,RO
608

:TRY TO CLEAR THE
:EXT'D ERROR REPORTING FLAG
$EXIT IF FLAG NOT SET,

PRINTB

@EFOS03,R1

tREPORT UNEXPECTED BMP CODES FOUND.
MOV

MOV

2s:

000056

MOV
MOV
MOV
MOV
JSR
crep
8LO

CALL
.

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

ER9301

005530

#B8MPCOB,R3
#EM9302 ,RS
(R3)+,R1
(R3)+,R4
PC,50s
R3,R2
2s

R1,-(SP)

9EF 0503, -(SP)

MOV
02,-(SP)
MOV
SP,RO
TRAP
CSPNTB
ADQ
6, 5P
tGET THE START ADDRESS OF THE BMP CODE
QUEUE
.
iGET THE MESSAGE TO BE REFORTED.
1GET THE NUMBER OF TME TEST THAT WAS EXECUTING.
1GET BMP CODE TMAT WAS REPORTED OFF THE
QUEUE.
:GO REPORT THE BMP CODE.
1CHECK IF ALL CODES MAVE BEEN REPORTED.
$IF IT IS NOT THE LAST BMP CODE TEN LOOP.

+ CHECK IF OVERFLOW MAS OCCURRED.

2584

2585
23:‘;

2593 015730
2594 015732

DIAG

THE MESSAGE IS PRINTED AS BASIC ERROR INFOR
MATION.

000002

2583

2588 015712
2589 015716
2590 015720
2591 015724
2592 015726

THE

00.000‘...“..‘.‘..‘0.0.0...‘0‘00

2566
2567 015626

015652
015656
015660
015662
2575 015666
2576 C15672
2577 015676
2578 015700
2579 015702
2580 015706
gss:é 015710

s SUBORDINATE ROUTINES USED: NONE.
‘.00

2“5

2568 015626

INCLUDE THE LABEL "ER9301" AS THE MESSAGE POINTER

PARAMETER

3
;
020227
001036
005762
001433
012301

011304
012705

THE CONDITIONS FOR OVERF

LOW ARE: THE POINTER CONTAINS THE ADDRESS OF TME
LAST CELL IN THE QUEUE, AND A BMP CODE MAS ALREADY BEEN
WRITTEN INTO THAT
CELL.

002706
000002

012701

cHe
BNE
ST
BEQ
MOV
MOV
MOV

R2,0BMPCQE -4
608
2(R2)
604
(R3).,R1
(R3),Ra
0EM9303 RS

sCHECK IF THE POINTER IS AT THE LAST LOCAT
ION.
sEXIT IF NOT AT THE LAST LOCATION.
sCHECK FOR A BMP CODE IN THE LAST CELL
sEXIT IF NO OVERFLOW MAS OCCURED, CELL EMPTY
,
sGET THE TEST NUMBER OFF THME QUEUE,

1GET THE BMP CODE OFF THE QUEUE.
$SELECT THE MESSAGE T0 BE REPORTED,

El%ed! FiMn'adeBARIA: ABFRRE"1200
2595 015736
015736
015742
015746
015750

220 S5

2597 015762
2598
2599 015764
015764
015766
015770
015772
015776
016002
016004
016006
2600 016012
2601 016014
016014
2602
2603 016016
016016
016016

012746
012746
010600

104415
062706
004767
000414
010446
010146
010546
012746
012746
01060¢C
104415
062706
000207
004736

007435
000001

000004
200002

15-M
849 09:4
AR
8

PRINTX

Cé
PAGE

50-1

@EF9302

sREPORT

CVERFLOW CONDITION.

o
\'}

MOV
MOV

JSR

PC,.50s%

0EF 9302, -(SP)

SP.RO
CSPNTX

1REPORT THE LAST BMP CODE PLACED ON THE
QUELE .

60$

PRINTX

@EF9301,RS5,R1.R4

sEXIT,

;PRINY

THE MESSAGE ,

MOV

MOV
MOV
MOV
MOV

007357

-(SP)

MOV
TRAP

000012
RTS
PASS

JSR

sRETURN,
3sRESTORE

PC.8(SP).

ADD

THE GPR CONTENTS.

tRETURN TO PPEGOS SUBRT.

ENDMSG

104423

L10015;

TRAP

CS$MSG

BrYeA! CHRolPINESR1fC
(HRCRO M1200 15 1AR
84 09:48 PAGE S1
S:?g

-SBTTL

GLOBAL SUBROUTINES SECTION

2614
2016

2617

2618

THE GLOBAL SUBROUTINES SECTION CONTAINS THE
SUBROUTINES

oTHAT ARE USED IN MORE THAN ONE TEST.

EBeAl SHERolTI"4
NE
f

2620

.SBTTL

262‘

2622

c623
2624

ie
;e
;e

2625

2626

525;

R1 - ADDRESS OF THE REGISTERS TO ALTER.
R2 - BIT FIELDS SET TO DESIRED STATES.

;e
;e
;e

R REGISTER.
R4 - MASK OF BITS TO ALTER (1 INDI
CATES CHANGE BIT),
CSRA - CONTAINS THE ADDRESS OF TME
DEVICE CSR,
IESTAT - SAVED STATES OF THE INTERRUPT ENABL
E BITS.

BIT

s COMMENTS:
ie

MAP

LINES

FOR

WHICH

ALTE

DEVICE REGISTERS - SPECIFIED REGISTER F IELDS
ALTERED.
CSR IND.ADR.REG FIELD - DESTROYED.

s CALLING SEQUENCE:

333

JSR

PC,ALTFLD

THIS ROUTINE READS THE SPECIFIED REGISTERS FOR ALL
WITH NUMBERS LOWER THAN THE MIGHES SPECIFIED LINE. LINES

THIS ROUTINE DOES NOT READ THE CSR.

s SUBROUTINES CALLED: NONE.

2“6

004567

167300

2650

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

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

ALTF.D:: SAVE

JSR

00‘0

i SAVE CONTENTS OF GPRS RO THRU RS,
RS ,PREGOS
1CALL REGISTER SAVE SUBRT,

2651
2652

+ SET UP TO LOOP FOR EACH LINE:
H
PREPARE THE WORD TO BE ORED INTO THE REGIS
TER CONTENTS,

s:gz

H
010400
005100
040002
016705

SET UP THE WORD TO WRITE INTO THE IND.ADR.RE
G FIELD OF THE CSR.
MOV
CoM
BIC
MOV

164176
R

2660
2661

000241

006003

103006
010577
011100
040400
050200
010011
005205

005703
001365

R4 ,RO
RO
RO,R2
IESTAT,RS

sCALCULATE THE NEW CONTENTS OF THE
3+
REGISTER FIELDS WWICH ARE TO BE
i
ALTERRED BY THIS ROUTINE.
+SET UP TO WRITE IND.ADR.REG FIELD TO
O.

3 LOOP ONCE FOR EACH LINE, ALTERING THE SPECI
FIED FIELD IN THE SPECIFIED
:
REGISTER IF THE LINE HMAS BEEN SELECTED
FOR ALTERING.
: EXIT THE LOOP IF NO MORE LINES TO ALTER, OR IF
WE MAVE ALTERED THE MAX
3
ALLOWABLE NUMBER OF LINES (AS SPECIFIED BY
NUMLNS ),

2662
2663

2674 016062
2675 016064

SET RX.BAUD.RATE FIELDS ON LINES 3 AN 6.

CLEAR TX.DMA BITS ON ALL LINES.

i®

2645

2667 016042
2668 016044
2669 016050
2670 016052
2671 016054
2672 016056
2673 016060

USE EXAMPLES:

2641
2642

2666 016040

THIS SUBROUTINE ALTERS THE SPECIFIED
FIELD OF THE SPECIFIED DEVICE
REGISTER FOR THE SPECIFIED LINES.
THIS ROUTINE CAN BE USED TO SET
OR CLEAR BITS WITHIN SELECTED FIEL
DS OF SELECTED REGISTERS.

’3’83

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

- ALTER DEVICE REGISTER FIELDS ROUTINE -

;¢ CUTPUTS:

g:gz

- ALTFLD -

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

: s

2636

€665 016036

GLOBAL SUBROUTINE

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

2632
2633
g:g;

€0 A9

;¢ INPUTS:
ie

2631

2655 016024
2656 016026
2657 016030
g:gg 016032

‘F0Q

2629
2630

2647
2648 016020
2649 016020

:
MACRO m120g i5.man 84 09:48
PAcE S2
-

2%:

164130

CLe

ROR

BCC
MOV
MOV
BIC
8IS
MOV
INC

TST
BNE

43
R5,8CSRA
(R1),RO
R4 ,RO
R2,R0O
RO,(R1)
RS
R3
28

sPREPARE FOR ROTATE,

“TST RS” DOES THIS BELOW.

1GET THE LINE SELECT BIT FOR THIS LINE.

1SKIP SETUP IF LINE IS NOT SELECTED,
3SET DUT CSR IND.ADR.REG FIELD Y0 THIS LINE.
iGET THE PRESENT CONTENTS OF TME REG TO ALTER
.
sCLEAR THE BIT FIELDS WE ARE TO ALTER,
iOR IN THE NEW STATES OF TME FIELDS,
IWRITE THE NEW REGISTER CONTENTS TO THE REG,
3SET LINE NUMBER TO THE NEXT LINE.

sCHECK FOR UNMANDLED LINES, CLEAR CARRY
FLAG.
sLOOP IF SELECTED LINECS) IS NOT MANDLED,

AL Sl

gty
T S-MAR-84 09:48

PAGE 52-1

2676

2677 016066
016066
2678 016070

004736
000207

60%:

PASS
RTS

°C

JSR

;RESTORE GPRS.

PC.8(SP).

iRETURN TO PREGOS SUBRT.
sRETURN TO CALLING ROUTNE

G6
2680

.SBTTL

2682
2683
2684
2685
2686
2687
2688

ie
;e
;e
;e
s
;e
;e

2689

CLOBAL SUBROUTINE

2693

2694

5232

;¢ INPUTS:
is

MSLCNT

MSTICK

- NUMBER OF MS PER LTC

CLKHRZ

]

;¢ OUTPUTS:
;e
;e

g;gé

3 CALLING SEQUENCE:

2705

004567

005067

000210

CLR

(S50

60).

ICE RTN.

PC,CALMSL

UNSDIV,OOPS.

628

JSR

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

.‘0‘

s SAVE CONTENTS OF GPRS RO THRU RS.
RS ,PREGOS
;CALL REGISTER SAVE SUBRT.

sCLEAR THE 2ND TIME FLAG.

i SYNCHRONIZE WITH THE LTC.

012705

005000
012767
005767
001410

000001

000001
164156

2s:

164162

43;

005200
001373
005305
003371

MOV

01,R5

CLR
MOV
TST
BEQ

RO
01, TIMERL
TIMER]
63

INC
BNE
DEC
BGT

$SET OUTER LOOP COUNTER TO 1 1.00P.
s INCREASE THE VALUE LOADED INTO THIS
COUNTER IF THE
sFOLLOWING LOOP FAILS ON FUTURE, FAST
ER PROCESSORS.

RO
43

RS
43

g;gg

005067
000241
000461

;CLEAR THE WAIT FOR CLOCK INT COUNTER.
sSET UP COUNT OF 1 TO SYNCH WITH LTC.
;CHECK FOR COUNTER HAVING GONE TO ZERO.
1JUMP OUT OF LOOP IF LTC HAS INTERRUPTED.
sCOUNT THIS ITERATION OF THE INNER L.OOP
.
iLOOP IF COUNTER HAS NOT TURNED OVER.
;DECREMENT THE INNER LOOP COUNTER.
:LOOP IF OUTER LOOP COUNT NOT UP,

IF WE GOT NO LTC INTERRUPT,

INDICATE THAT THERE IS NO LTC AVAILABLE,

164136

CLR
cLe
BR

CLKHRZ

60%

2732

sCLEAR LTC FREQUENCY WORD TO INDICATE NO
LTC.
s INDICATE FAILURE FOR RETURN.
1BYPASS THE FOLLOWING CALIBRATION PROCEDURES
.

i WE ARE NOW SYNCHRONIZED WITH THE LTC.

i SET UP FOR THE CALIBRATION LOOP.
5%

012704

<as
<es

3 LTC MUST BE FLAKEY, OR NOT REALLY AN LTC AT ALL.

g;gz
2735 016144

SAVE

2725

2728 016134
2729 016140
g;g{: 016142

SECOND

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

CALMSL::

167226

g;{é

2722 016130
g;gz 016132

JSR

s SUBORDINATE ROUTINES CALLED:

2707

2720 016124
2721 016126

CLICKS PER

2706

2716 016106
2717 016110
2718 016116
2719 016122

NUMBER OF LTC

;+ COMMENTS:

2704

2713 016102
2714
2715

CARRY - SET IF LTC IS AVAILABLE, AND NEW
CALIBRATION PERFORMED .
MSLCNT - NEW 1 MS DELAY LOOP COUNT VALUE
IF LTC AVATLABLE, OR
UNCHANGED IF NO LTC IS AVAILABLE.

2703

- DEFAULT 1 MS DELAY LOOP COUNT VALUE
,
VALUE FROM PREVIOUS CALIBRATION.

TICK.
TIMERL - TIMER COUNTER CHANGEDCLOCK
BY LTC INTERRUPT SERV

2697
2698
5_6}83

g;gg 016076

‘0‘.‘.‘00“.‘

g‘

2691
2692

2708 016072
016072

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

00‘.00.0000
- CALIBRATE MILLI
D LOOP COUNT SUBROUTINE THIS SUBROUTINE CALIBRATES SECON
THE TIMING LOOP WHICH IS USED IN THE MSLO
OP
ROUTINE. THIS SUBROUTINE CALCULATES A VALUE
WHICH IS THE NUMBER OF SOFTWARE LOOPS WHICH FOR THE MSLCNT VARIABLE
THE MSLOOP ROUTINE. THIS ROUTINE CAL IBRATES TAKES 1 MS T0 EXECUTE IN
THE COUNT BY USING THE
LINE TIME CLOCK (LTC), SO IF NO LTC 15 AVAILABL
E THE DEFAULT VALUE FOR
THE DELAY COUNT MUST BE USED.

2690

- CALMSL -

“0..“.‘0.00‘.0.0...‘.0..

002300

6%:

MOV

O@TIMER1,R4

sWILL

TEST TIMERL IN THE LOOP BELOW.

Bl%eAl StBRolPInE""
2736 016150
2787 016152
2738 016134
2739 016156
2740
2741 016162
2742 016166
2743 016170
2744 016174
2745 016176
2746
2747
2748
2749
2750

2751 016212
2752 016214
2753

2754
2755
2756
2757
2758
2759 016220
2760 016222
2761 016226
2762 016230
2763
2764
2765
2766
2767
2768
2769 016246
2770
2771
2772
2773 016250
2774 016254
2775 016256
2776 016260
2777 016264
2778 016266
2779 016272
2780 016276
2781 016302
2782 016304
2783
2784 016306
016306
2785 016310
2786
2787 016312
2788 016314

MACRO mgos&&m_w-u 09:48

005001

005002
005003
012714
016705
011400
010067
020200
020003
000261
001406
005305
001367
005301
N01363
004767

CLR
CLR
CLR

R1
R2
R3

MOV

MSLCNT RS

MOV
164124

000120

8s:

10%:

MOV
MOV
BIC

cHP
SEC
BEQ
DEC
BNE
DEC
BNE
JSR

003604

PAGE 53-1

iCLEAR THE OUTER LOOP COUNTER.
s INDICATE TO CHECK ALL BITS OF TIMER].
s INDICATE TO CHECK FOR TIMER1 CLEAR.

#1.(R4)

;LOAD TIMER1 WITH COUNT OF 3.

(R4),RO
RO,64%
R2.RO

:LOAD MS LOOP COUNT,

:GET THE TIMER1 VALUE.
sSAVE WORD (LIKE IN THE REAL LOOP).

sLEAVE ALL THE BITS.

RO.R3

i COMPARE AGAINST ZERO.
+SET CARRY IN CASE OF SUCCESS.
sEXIT LOOP IF TIMERL MAS CLEARED.
sCOUNT DOWN THE INSIDE MS LOOP COUNT.
;LOOP IF MS NOT UP,
:DECREMENT THE MS TIME COUNT.
sKEEP LOOPING.
:WE OVERFLOWED, SOMETHING IS WRONG, ABORT
.

128
RS
10$
R1
83
PC,00PS

VE NEGATIVE OF NUMBER OF QUTER :NOPS
IN R1, EACH IS MSLCNT

005401
016702
010203
160502
010204
005005
003301
100403
060304
005505
000773

164064

28:

14%:

NEG

MOV

MSLCNT ,R2

MOV
SUB
MOV
CLR

R2,R3
R5,R2
R2,R4
RS

BMI
ADD
ADC

164
R3,.R4
R5

MOV

MSTICK.R1

DEC

INNER LOOPS.

:GET NUMBER OF OUTER LOOPS.
iGET THE NUMBER OF INNER LOOPS PER OUTER LOOP.
:COPY NUMBER OF LOOPS FOR MULTIPLY,

:CALC & OF INNER LOOPS DONE IN LAST OUTER
LOOP
s
AND ADD TO ACCUMULATOR LSWORD.
:CLEAR ACCUMULATOR MSWORD.

+CHECK R1 FOR O CONDITION

3 SKIP MULTIPLICATION IF ZERO
sMULTIPLY NUMBER OF INNER
« LOOPS PER OUTER LOOP BY

BR
133
INUMBER OF OUTER LOOPS PERFORMED.
; DIVIDE ThE TOTAL NUMBER OF INNER LOOPS BY THE NUMBER OF MS PER LTC TICK
L

016701
010403

010502
004767
103402
004767
010167
005167
001277

164034

168:

010076

003532
164014
000010

000000
000000

iLSWORD OF LOOP COUNT IS LSWORD OF DIVI
DEND.
sMSWORD OF LOOP COUNT IS MSWORD OF DIVID
ENG.
iDIVIDE NUMBER OF LOOPS BY MS PER LTC TICK.

JSR

PC,OOPS

sCLOCK_ROUTINES ARE NOT LONG ENOUGH.,

MOV
coM
BNE

SEC

000261

004736
000207

R4.RS
RS.R2
PC.UNSDIV

BCS
188:

608:

628:

184

RI. MSLCNT
62}
23

PASS

RTS
648:

30 OF MS PER LTC TICK IS DIVISOR.

MOV
MOV
JSR

.MORD

.WORD

PC
O

JSR

iBYPASS 00PS IF WE'RE OK.

OR BUG.

sSET NEW VALUE FOR MS LOOP COUNT
sSET THE 2ND ITERATION FLAGS IF iST ITERATION.
sBRANCH TF ONLY ONE ITERATION DONE.

sSET TME SUCCESS FLAG FOR EXIT.
JRESTORE GPRS,
PC,B(SP)»

JRETURN TO

S SUBRT,
3 CARRY . SUCCESS FLAG. SET IF SUCCEPREGO
SS.

12ND CALIBRATION ITERATION FLAGS.

sDUMMY WORD FOR STORAGE OF

THE READ WORD.

GLOBAC SiBROUTINE
"

mcaomz_o&“&'
-MAR
nqn
: u
um.

2790

.SBTTL

279[

2792
2793

;e
;e

2794
2795
2796

GLOBAL SUBROUTINE

THAT AN EXTRA
CHARACTER HAS BEEN RECEIVED DURING THE RECEPTION OF A
DATA
IF THIS ROUTINE DETERMINES THAT IT IS LIKEL THAT AN EXTRA PATTERN.
CHARACTER
HAS BEEN RECEIVED IT INDICATES THIS IN THME YSTATU
S
INFOR
MATIO
N RE TURNED
TO THE CALLING ROUTINE.

;¢ OUTPUTS:
]

R3 - RX LINE NUMBER MULTIPLIED BY 2 (OFF
SET INTO WORD TABLES).
R4 - BASE ADDRESS OF RESYNC QUE CONT
AINING RX CHARS .
RS - MASK OF “INACTIVE" (NON-DATA) BITS OF RX AND Tx
CHONTB - BASE OF NUMBER OF CHARS TO TX ON EACH LINE CHARS .
TABLE .
RXCNTB - BASE OF THE RX CHAR
ACTER COUNTERS TABLE.
RXPTRB - BASE OF THE RX CHARACTER POINTERS
TABLE.
TXRXLB

ggz

;¢ CALLING SEQUENCE:

s COMMENTS:

2812

2813
2814

SS%%

TX/RX LINE

JSR
-

CHARACTER

BOTTOM

2827 016342
2828 016344
2829 016346
2830 016352
2831 016354
2832 016360
2833 016364
2834 016366
2835 016370
2836 016372
2837 016374
2838 016376

2839 016400

g::? 016402

2842

g::z

112201
040501
120100
001021
016300
005200
016301
020061
001407
011400
1
040500
111201
040501
020001
001002

005234
003442

QUE

(FIRST

CHARACTER EXPECTED

TO BE

SAVE

JSR
RXPTRB(R3),R2
(R4).
(R48)+ ,RO
528
RS,RO
(R2)+,R1
RS,R1
R1,.RO
528
RXCNTB(R3),RO
RO
TXRXLB(R3),R1
RO,CHCNTB(R1)
S0$
(R4),RO
508
RS,RO
(R2).R1
RS,R1
RO,R1
S2s

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

1 SAVE CONTENTS OF GPRS RO THRU RS,
RS, PREGOS
1CALL REGISTER SAVE SUBRT,
;GET THE RX DATA POINTER.
s INCREMENT R4 BY 2 TO POINT TO CHR1.
sGET CHR1 FROM THE QUE, DATA.VALID INTO
N FLAG.
sEXIT WITH “FAILURE” IF CHR1 NOT VALID.
sREMOVE INACTIVE BITS FROM CHR1 VALUE.
+GET EXPO FROM THE DATA PATTERN.
+REMOVE INACTIVE BITS FROM EXPO VALUE ,

s:COMPARE CHR1 AND EXPO.
(EXIT WITH “FAILURE"” IF CMR1 <> EXPO.
;COMPARE THE PRESENT RX CHMARACTER COUNT PLUS
1
i
WITH THE EXPECTED NUMBER OF CHARS TO RX ON
;
LINE (NUMBER TRANSMITTED AND LOOPED BACK)
T0
;
DETERMINE IF CHR1 IS LAST EXPECTED CHAR,
1EXIT WITH "SUCCESS” IF CMR1 IS LAST CMAR,
$GET CHR2 FROM THE QUE, DATA,VALID INTO N
FLAG.
sEXIT WITH "SUCCESS” IF CHR1 WAS LAST IN
QUE.
sREMOVE INACTIVE BITS FROM CiR2 VALUE.
:GET THE EXP1 VALUE,
sREMOVE INACTIVE BITS FROM EXP1 VALUE,

sCOMPARE CHR2 AND EXP1,

$EXIT WITH “FAILURE” IF CHR2 <> EXP1.

s IT IS LIKELY THAT WE RECEIVED AN EXTRA CHARACTER
WITHIN IME DATA PATTERN.
s
g

ETC.

t“.‘.“.““....0.‘0.0.“.‘.‘.0“0“..

MOV
TST
MOV
BPL
BIC
MOVB
BIC
CMB
BNE
MOV
INC
MOV
cMP
BEQ
MOV
BPL
BIC
MOVEB
BIC
cHP
BNE

003542

RESYNC

AFTER EXPO,

CHKEXT::

167002
003402

RECEIVED

EXP2

2819 016316
C16316
2820 016322
2821 016326
2822 016330
2823 016332
2824 016334
2825 016336
2826 016340

004567
016302
005724
012400
100026

TABLE.

RECEIVED).

s4 SUBORDINATE ROUTINES CALLED: NONE.
$--

ASSOCIATION

PC,CHKEXT

2817
2'1‘

NUMBER

CHR1, CHR2 - 2 CHARACTERS RECEIVED AFTER CHRO.
EXPO - CHARACTER EXPECTED TO BE RECEIVED NEXT.

EXP1,

BASE

THE FOLLOWING SYMBOLS ARE USED IN LINE COMME
NTS ;
CHRO

;e
i

CARRY - SET IF EXTRA CHARACTER CONDITION IS
VERIFIED.

2811

‘0..0‘.0.0.000 B

- CHECK FOR EXTRA CHARACTER ROUTINE THIS SUBROUTINE CHECKS FOR THE CONDITION WHICH
INDICATES

3¢ INPUTS:
;e
;s
;e
;e
;e

- CHKEXT -

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

2799
2800
2801
2802
2803
2804

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

;e
;e
;e

S;:;

[AGE

INDICATE “SUCCESS” AND EXIT,

DMU-11 FUNC TST PARTS
GLOBAL SUBROUTINE
000261
000401

MACRO #1200
-

1S-MAR-84 09:48

CHKEXT

50s%:

SEC
BR

PAGE S4-1

“€E0Q

sSET THE SUCCESS FLAG.
:EXIT THE ROUTINE.

60s%

2853 016410
2854
2855 016412
016412
2856 016414

000241

004736
000207

3 R

DIDN'T RECEIVE A SINGLE EXTRA CHARA
CTER AT
INDICATE “FAILURE” AND EXIT.
$:

CcLC

PASS
RTS

THIS POINT

IN THE DATA PATTERN,

;CLEAR THE SUCCESS FLAG.

JSR

;RESTORE GPRS.

PC,a(SP)«

;RETURN

TO PREGOS

:CARRY - SET IF SUCCESS (EXTRA CHAR RXED
).

SUBRT.

Bbek! SUelolTIng
T,

151

PART4

MACRO M

2858

2860
2861
2862
2863
2864

;e
;e
;e
;e
;e

gfi

2867
2868
2869

34 COMMENTS:
;e

2882
2883

5::;

2902

TXRXLB

THE

BASE

TX/RX

CARRY

SET

LOST

CHARACTER

LINE

NUMBER

CHARACTER

PC,CHKLOS

JSR

POINTERS

TABLE
.
ASSOCIATION TABLE .

CONDITION

VERIFIED.

THE FOLLOWING SYMBOLS ARE USED IN LINE COMMENTS :
-

CHARACTER

BOTTOM

RESYNC

QUE

(FIRST

CHR1, CHR2 - 2 CHARACTERS RECEIVED AFTER CHRO.
EXPO - CHARACTER EXPECTED TO BE RECEIVED NEXT.

RECEIVED).

EXP1, EXP2 - CHARACTER EXPECTED TO BE RECEIVED
AFTER EXPO, ETC,

2886

2903 016464
2904 016466
2905 016470
2906 016472
2907 016474
2908 016476
2909 016500
2910 016502
2911
2912 016504

BASE

CHRO

;e
;e

THE RX CHARACTER COUNTERS TABLE.

2881

2898 016454
2899 016456
2900 016460
2901 016462

- BASE OF

RXPTRB

s* CALLING SEQUENCE:

3:;3

2895 016444

OUTPUTS:

g‘

2880

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

RS - RX LINE NUMBER MULTIPLIED BY 2 (OFF
INTO WORD TABLES).
R4 - BASE ADDRESS OF RESYNC QUE CONTAINISET
NG
RX
RS - MASK OF “INACTIVE" (NON-DATA) BITS OF RX CHARS .
AND Tx CHARS WITH
ALL
RXCNTB

;¢

.‘.....‘.‘...0.0‘..‘.0.‘

SET BITS IN A SINGLE, LEFT JUSTIFIED GROUP.
CHCNTB - BASE OF NUMBER OF CHARS TO TX ON EACH
LINE TABLE .

gg;g

- CHKLOS -

‘

RETURNED TO THE CALLING ROUTINE.

g:;;

.00000
- CHECK FOR LOST CHARACTER ROUTINE THIS SUBROUTINE CHECKS FOR THE CONDITION WHICH INDICATES
THAT A CHAR
HAS BEEN “LOST" FROM THE LOOPED BACK DATA PATTERN
DURIN
G
A
TRANSMISSION
AND RECEPTION TEST. IF THIS ROUTINE DETERMIN
ES
THAT
1T
IS
LIKE
L7 THAT
A CHARACTER HAS BEEN LOST, IT INDICATES THIS
IN THE STATUS INFORMATION

2873

GLOBAL SUBROUTINE

;e
;e

2872

PAGE

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

;¢ INPUTS:
:e
:s

2870
2871

2896 016446
2897 016450

15-MAR -84 09:48

.SBTTL

2‘59

2‘67
2888 016416
016416
2889 016422
2890 016426
2891 016430
2892 016434
2893 016440
2894 016442

120
i 8 3TM

i* SUBORDINATE ROUTINES CALLED: NONE.

004567
016301
005201
016300
016002
020102
001423
005201

160201
016302
005202
112200
162400
040500

001012
005701
001406

011401
100004

111200

160001
040501
001002

166702
003542
005234
003442

003402

$~-- “0.‘.“.‘0‘.“‘C.“.‘.‘.“.t“.“‘00.0“.‘.
.‘..‘.‘.“‘..‘.“...‘O...O.‘C..
CHKLOS:: SAVE
1 SAVE CONTENTS OF GPRS RO THRU RS,
JSR
RS ,PREGOS
;CALL REGISTER SAVE SUBRT.
MOV
RXCNTB(R3),R1
;COMPARE THE PRESENT RX CHARACTER COUNT PLUS
1
INC
R1
i
WITH THE EXPECTED NUMBER OF CHARS TO RX
ON
MOV
TXRXLB(R3),RO
;
LINE (NUMBER TXED AND LOOPED BACK) TO
MOV
CHCNTB(RO),R2
;
DETERMINE IF TME POSSIBLE LOST CHAR
cHe
R1,R2
3
WOULD 8E THE LAST EXPECTED RX CHAR,
BEQ
S2s
sEXIT WITH “FAILURE” IF LOST CHR WOUL
D BE LAST,
INC
R1
sDETERMINE (AS ABOVE) IF CHRO WOULD BE THME LAST
SuUB
R2,.R1
i
RX CHAR AND SAVE RESULT FOR LATER.
MOV
RXPTRB(R3),R2
;GET THE RX DATA POINTER.
INC
R2
sCALCULATE POINTER TO EXP1 LOCATION.
MOVE
(R2)+,RO
iGET EXP1 VALUE FROM DATA PATTERN,
SuUB
(R4)+,RO
sCOMPARE CHRO AND EXP1 VALUES.
BIC
RS,RO
sREMOVE INACTIVE BITS FROM RESULT,
(NO ACTIVE
3
BITS ALLOWED TO LEFT OF ANY INACTIVE BITS.)
BNE
523
sEXIT WITH "FAILURE” IF CHMRO <> EXP1.,
1634
R1
sCHECK CHRO TEST RESULT SAVED ABOVE.
BEG
S0
sEXIT WITH “SUCCESS” IF CHRO IS LAST CHAR,

MOV

(R4),R1

sGET CHR1 FROM THE QUE, DATA.VALID INTO N FLAG,

BPL

508

+EXIT WITH “SUCCESS” IF CHRO WAS LAST QUE
CHAR,

5U8
8IC

RO,R1
R5,R1

sCOMPARE THE EXP2 AND THE CHR1 VALUES,
sREMOVE INACTIVE BITS FROM RESWLT OF COMPA
RE ,
i
(NO ACTIVE BITS LEFT OF INACTIVE BITS.)
fEXIT WITH “FAILURE” IF CHRL <> EXP2,

MOVB

BNE

(R2),RO

528

sGET THE EXP2 VALUE FROM THE OATA PATTERN,

€0

B! SHRBolFiAE
2914
2915
2916
2917
2918 016506

2919 016510
2920

PAGE 55-1

HEd

s
s
000261
000401

e9%21
2922

2923
2924
2925 016512
2926
2927 016514
016514
2928 016516

MACRO '"208'“'!35“84 09:48

IT IS LIKELY THAT WE LOST A CHARACTER
FROM THE DATA PATTERN,
INDICATE ~SUCCESS” AND EXIT.

50s:

SEC

:SET THE SUCCESS FLAG.

6Cs

sEXIT

THE ROUTINE.

‘O

s WE DIDN'T LOSE A SINGLE EXTRA CHARACTER AT
THIS POINT IN THE DATA PATTERN.
3 INDICATE “FAILURE” AND EXIT.
-

000241
004736
000207

52%:

cLC

608:

PASS

RTS

;:CLEAR THE SUCCESS FLAG.

JSR

;RESTORE GPRS.
PC,a(SP).
sCARRY

SET

: RETURN TO PREGOS SUBRT,
IF SUCCESS (LOST CHMAR LIKELY).

Bkl StEfoltine """

MACRO mzo&oxz—m-u 09:48

2930
2931
2932

-SBTTL

PAGE 56

“EQ

GLOBAL SUBROUTINE

0.....‘..‘.‘.‘..

TO DETERMINE IF IT IS CORRECT.

;e
;e

CHECKS

THE RECEPTION OF

INCORRECT,
FOR

s» INPUTS:

THE

CHARACTER

THE

ERROR

CORRECT

ESS

MASK

BITTBL

DPRSQ

EXCNTB

THE

BOTTOM

DONE

AND

ERROR.

TABLE
DATA

THE

RESYNC

INACTIVES

WORDS

PATTERN

RXDONF

BASE OF

RECEIVE

DONE

RXPTRB

BASE

THE

ERROR MESSAGE LABELS

WITH

THE

RESYNC

THE

CHARACTER

PARAMETERS

QUEUE

ARE

SET

CONTAINS

THE

ADDRESS

CONTAINS

THE

ACTUAL

CONTAINS

THE

CARRY

"SUCCESS"”

FOLLOWING

FLAG

VARIABLES

EXCNT

UPDATED

COUNT OF

RXPTR

ERRBLK

i* CALLING SEQUENCE:

COUNT

UPDATED
-

SET

THIS

FOR

WITH

USE

VALID

LINE.

CHAR

POINTERS

BYTE,

FORMING

MAPS,

BOTTOM,

TABLE.

TABLE .

THE

ERROR

RECEIVED

EXPECTED

MESSAGE

DATA.

TO BE

REPORTED.

DATA.

(SET

FOR

ERROR

LINE

FOUND).

WHICH

CHAR

WAS

RECEIVED:

THE NUMBER OF EXTRA CHARS RECEIVED ON
LINE,

THE
TO

CONTENTS

JSR

QUE

CHARACTER

RXCNT

BITS

FOR

EM9007,EM9008, EM9027, EM9028

FLAGS.

QUEUE

THE EXTRA CHARACTER COUTERS

BITS

RESYNC

R3 - LINE OFFSET FOR ACCESS OF WORD TABLE
S OF LINE VARIABLES.
- BASE ADDR

..00 b

POINTERS AND COUNTERS WHICH ARE RELA
TED

THE CHARACTER ARE UPDATED.

ANALYSIS

REPORTING

is OUTPUTS:

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

CHECK CHARACTER FOR ERRORS ROUTI
NE

THIS

SUBROUTINE

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

- CKCHR

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

2933

NUMBER

POINT

CHARACTERS

THE

RECEIVED

EXPECTED

DESTROYED.

CHAR

LINE.

PC,CKCHR

s COMMENTS:
o

2965 016520
016520

2969 016524
2970 016532
2971
2972
2973
2974
2975
2976
2977 016534
2978 016540
2979 016542
2980 016544
2981 016550
2982
2983
2984
2985 016552

:‘ SUBORDINATE ROUTINES CALLED: CHKEXT,CHKLOS,UPDCHR.
et

004567

036367
001407

166600

002364

CKCHR:: SAVE

163752

JSR

LY T

1 SAVE CONTENTS OF GPRS RO THRU RS,

RS ,PREGOS

+CALL REGISTER SAVE SUBRT,

:.C!'ECK FOR THE RX OF A CHAR AFTER RX SHOULD BE COMPLETE ON THIS LINE.
BIT

BEQ

BITTBL(R3),RXDONF

s TEST THE RX DONE FLAG FOR THIS LINE.

$SKIP ERROR REPORT IF RX NOT COMPLETE ON LINE.

i WE HAVE RECEIVED AN EXTRA CHARACTER ON THIS LINE.
3 SET UP FOR ERROR REPORT AND EXIT TO REPORT THE ERROR,

012701
011402
040502
052704
000452

016302

011306

100000

003402

s COUNT THE EXTRA CHARACTER.
:
i EXIT TO REPORT “UNEXPECTED CMAR RECEIVED AFTER RX
COMPLETE ON LINE NN
MOV
MOV
BIC
BIS

B8R

GEM9007.R1
(R4),R2
RS,R2
eBIT1S.Re

128

sSELECT "EXTRA CHAR ON LINE” ERROR MESSAGE
.
1GET THE ACTUAL DATA FOR ERROR REPORT.
sREMOVE THE INACTIVE BITS.
s INDICATE “NONE" EXPECTED DATA FOR ERROR RPT.

GO COUNT EXTRA CMAR AND EXIT WITH “FAILURE
"

: GET THE POINTER TO THE NEXT EXPECTED RECETIVE DATA CMARACTER.
3.
MOV
RXPTRB(R3),R2

BlBA! StERolTIne"""
2986
2987
2988
2989 016556
2990 016560
2991 016562
2992 016564
2993 016566
2994 016570
2995 016572
2996 016576

2997
2998
2999
3000
3001 016600
300.2 016604
3003

MACRO mgo&cg-r.ua-u 09:48

PAGE S6-1

N6
£EG

s COMPARE THE ACTUAL DATA WITH THE EXPECTED DATA.
011400
040500
111201

120001
001003
004767

MOV

BIC
MOVB
BIC
CMPB
BNE
JSR
BR

007720

(R4),RO

R5.RO
(R2).R1
R5,R1
RO,R1
4
PC,UPDCHR
50%

HEd

:GET THE ACTUAL DATA.

;REMOVE THE INACTIVE BITS.
iGET THE EXPECTED DATA.
+REMOVE THE INACTIVE BITS.
1COMPARE ACTUAL AND EXPECTED.
;CHECK FURTHER IF DATA MISCOMPARE
.
tUPDATE PTRS AND COUNTERS FOR THE
CHAR.
sEXIT WITH “SUCCESS”, NO ERROR FOUND
.

s ACTUAL AND EXPECTED DATA MISCOMPARE
.
; DETERMINE IF IT'S LIKELY WE RECEIVED AN
EXTRA CHAR WITHIN THE DATA PATTERN,
‘-

004767
103010

177512

3004
3005
3006
3007
3008 016606
012701
012121
3009 016612
111200
3010 016614
040500,
3011 016616
011402,
3012 016620 040502
3013 016622
010004
3014 016624
000424
3015
3016
3017
3018
3019
3020 016626
004767
177564
3021 016632
103012
3022
3023
3024
3025
3026
3027
3028 016634
012701
012201
3029 016640
111200
3030 016642
040500
3031 016644
011402
3032 016646
040502
3033 016650
010004
3034 016652
004767
007640
3035 016656
000404
3036
3037
3038
3039
3040 016660
010002
3041 016662
010104
3042 016664
012701
011371

4%:

JSR

8CcC

HEd

PC,CHKEXT

1CHECK FOR EXTRA CHAR RX'ED

IN PATTERN.

1GO CHECK FOR LOST CHAR IF NO EXTRA CHAR.

s IT IS LIKELY THAT WE RECEIVED AN EXTRA CHARACTER
WITHIN THE DATA PATTERN,
3 COUNT THE CHAR AS AN EXTRA CHAR, DON'T COUNT AS
A STANDARD CHAR.

REPORT

“EXTRA CHAR RECEIVED WITHIN DATA PATTE
RN ON LINE NN"

MOV
MOVB
BIC
MOV
BIC
MOV

B8R
HEd

#EM9027,R1
(R2),RO
R5,R0
(R4),R2
R5,R2

s SELECT “EXTRA CHAR ON LINE” ERROR MSG.
iGET THE EXPECTED RECEIVE DATA.
:REMOVE THE INACTIVE BITS FROM EXPECTED DATA.
iGET THE ACTUAL RECEIVE DATA.
:REMOVE THE INACTIVE BITS FROM ACTUAL
DATA.

12¢

:GO COUNT EXTRA CHAR AND EXIT WITH “FAILURE".

RO,R4

1PASS EXPECTED DATA

TO ERROR REPORT ROUTINE.

3 ACTUAL AND EXPECTED DATA MISCOMPARE.
3 NOT LIKELY THAT WE RECEIVED AN EXTRA CHARACTER
WITHIN THE DATA PATTERN.
3 DETERMINE IF IT'S LIKELY WE LOST A CHARACTER
FROM THE DATA PATTERN,
6%:
JSR
PC,CHKLOS
;CHECK FOR A LOST CHAR CONDITION.
8cC
8s
1GO REPORT BAD RX DATA IF NOT LOST CHAR.
HEd
‘-

# IT IS LIKELY THAT WE LOST A CHARACTER FROM THE
DATA PATTERN,
3 COUNT THE CHAR IN THE RX CHAR COUNT AS IF IT
MAD BEEN RECEIVED.
3 ALSO, COUNT CHRO AS A VALID CHAR, BECAUSE WE HAVE
VERIFIED IT ABOVE.
s REPORT “SINGLE CHAR MISSING FROM RECEIVED DATA ON
LINE NN"
MOV
MOVB
BIC
MOV
BIC
MOV
JSR
BR

0EM9028,R1
(R2),RO
R5,RO
(R4),R2
R5,R2
RO,R4
PC,UPDCHR
10%

$SELECT “LOST CHAR ON LINE” ERROR MSG, tttt+
iGET THE EXPECTED RECEIVE DATA.
sREMOVE THE INACTIVE BITS FROM EXPECTED DATA,
1GET THE ACTUAL RECEIVE DATA,
sREMOVE THE INACTIVE BITS FROM ACTUAL DATA.
+PASS EXPECTED DATA TO ERROR REPORT ROUTINE.
sUPDATE PTRS AND COUNTERS FOR THE CMAR.
$GO EXIT WITH “FAILURE”,

:’DID NOT LOSE OR GAIN A SINGLE CHARACTER FROM/TO THE DATA PATTERN.

: REPORT “RECEIVED CHAR MISCOMPARE AGAINST TX DATA ON
LINE NN”

é;:

MOV

MOV
MOV

RO,R2

‘R1,R4
9EM9008,R1

sPASS ACTUAL DATUM TO ERROR REPORT ROUTINE.

sPASS EXPECTED DATUM TO ERROR REPORT ROUTI
NE
.
sSELECT THE “DATA MISCOMPARE
" MESSAGE
.

MACRO M1200

15 -MAR-84 09:48

CxCHR

5043
3044
3045
3046 016670
3047 016674
3048
3049
3050
3051 016676
016702

3053 016704

UPDATE

Co07622

€0

10s:

THE CHARACTER COUNTER AND RX DATA
PATTERN POINTER FOR

JSR

PC,.UPDCHR

143

THIS LINE.

1UPDATE RX PTR AND COUNTER FOR THIS LINE.

31GO0 EXIT WITH

F B4

"FAILURE
",

s COUNT THE CHARACTER AS AN EXTRA CHARACTER.
g

005263

001002
005363

003242

12%:

003242

INC

BNE
DEC

3057 016710
3058 016712

S6-2

004767

PAGE

E} {

000241
000401

INDICATE
-

14%:

EXCNTB(RS)

143
EXCNTB(R3)

s INCREMENT THE EXTRA CHAR COUNT FOR THIS
LINE,
1EXIT WITH FAILURE IF NO OVERFLOM.
1DECREMENT BACK TO -1 (MAX VALUE) IF OVER
FLOW.

“FAILURE” AND EXIT,

CcLC

1CLEAR THE

60%

tEXIT

"SUCCESS" FLAG.

THE ROUTINE,

g ¥ -"

NO ERROR WAS FOUND.

SET “SUCCESS” FLAG AND EXIT,

3064 016714
3065
5066 016716
016716
016722
016726
016732
3067
3068
3069
5070 016734

000261

010166
010266
010466
004736

000207

SEC

PASS

1SET THE "SUCCESS" FLAG.

R1.R2.Re

000012

RTS

MOV
MOV
MOV
JSR

tRESTORE GPRS, EXCEPT
R1,R1SLOT(SP)
R2,R2SLOT(SP)
R4 ,RASLOT(SP)

PC,8(SP).
1R1
iR2

1R4

iPUT R1 IN STACK SLOT,
iPUT R2 IN STACX SLOT,
iPUT R4 IN STACK SLOT,

iRETURN TO PREGOS SUBRT,

- CONTAINS THE ADDRESS OF THE ERROR REPORT,
- CONTAINS THE ACTUAL DATA RECEIVED.
-

CONTAINS

THE

EXPECTED DATA,

Broeh! SHiRol?InE A"

MACRO M120Q, 15.MAR -84 09:48
.SBTTL
A

3074

o7
3078

CHECX

FRAMING

AND

ERROR BITS IN THE MSB.

HAS

BEEN

READ

INDICATION.

0‘.000000..0000.

PARITY

ERROR

00000000

REPORTING

INPUTS:

FROM

OUTPUTS:

OSTEND

OSTPTR

ADDRESS OF

ALLOWABLE NUMBER OF

ROUTINE

ERROR

EXITS

WITH

POINTER

= FRAMING ERR,

NUMBER

THE

RXCNTB

RECEIVE

CHARATER

RECEIVE

CHARACTER

JSR

THE END OF

RXPNTB

CMHARACTERS

COMPLETE

FIRST

THE

BYTE

COUNT

OUTPUT
TO

READ

UPDATED

PIONTER

CLEAR

ERROR

= PARITY ERR.
THIS

STORAGE
FROM

FOR

OSTORE,

EACH

UPDATED

ROUTINE.

FIFO BUFFER,

FOR

LINE,
EACH

LINE.

PC,.CKFRPR

THIS ROUTINE REPORTS ERRORS WITH NUMBERS INITIAL ERRNBR

THRU

ERANBR

THIS

BIT1S5 SET

SET

1# CALLING SEQUENCE:

s+ COMMENTS:

THAN THE

DUT

TESTS.

IF CMARACTERS STOP APPEARING IN THE FIFO
WITH

TEST FLAG,

ERRNBR

THE

EACH READ CHAR IS ANAL YSED AND ANY NECES
SARY ERRORS ARE

REPORTED.

INITIAL

ERRNBR

IS RESTORED BEFORE

THMIS ROUTINE

RETURNS,

i* SUBORDINATE ROUTINES CALLED: PRFRME ,PRPARE ,WAIBI
S.

$--

004567
016704
004767

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

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

CKFRPR:: SAVE

166362
16635C
006706

MOV
JSR
k3

~ou,m

800
BB s ~NOUVB
s et et PW
et Pt Pt 08 g: 8

DATA.VALID SET OR IF MORE

et g

CKFRPR

0..‘........‘.0.

00O

8 00 U O W

Pt Pt it s Pt Pt
s ot it e

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

THIS SUBROUTINE IS USED IN THE FRAM
ING ERROR AND PARITY ERROR
IT READS THE CHARACTERS FROM THE
DUT RECEIVER CHARACTER FIFO,
AND CHECKS FOR THE CORRECT COMBINAT
ION OF PARITY AND FRAMING

JSR
ERRNBR , R4
PC,TXIEL

000......0‘0.....0.0

0.0‘00...0.0

1SAVE CONTENTS OF GPRS RO THRU RS,
RS ,PREGOS
1CALL REGISTER SAVE SUBRT.
1PRESERVE THE INITIAL ERROR NUMBER,
tENABLE TX INTERRUPTS,

WAIT FOR A CHARACTER TC APPEAR IN THE
FIFO.

016701

026767

001402
062701
052701
016702
004767
103054

005367
001014
010467
012701
012767

- P

e s

s et o s pe Bt

OF 8 O L U O O O 00 L 0 O

SUBROUTINE

i
;e
ie

3079

163270

163520

IF NO CHARACTER APPEARS WITHIN TIME-OUT
PERIOD: EXIT ROUTINE, WE'RE DONE.

163206

000062
170000
163200
010004

28:
4%

166274
012001
014032

166266

$GET MINIMUM TIME QUT VALUE,
;CHECK FOR TRANSMISSION DONE ON ACTIVE
LINES,

BEQ
ADD

a8
€50, ,R1

MOV
JSR

RBUFA,R2
PC,.WAIBIS

1 INDICATE TO CHECK DUT RECEIVE BUFFER (FIFQ),
JWAIT FOR RECEIVED CMAR OR TIME-OUT,

CHRTOT
63
R4 ,ERANBR
#EMS025 ,R1
O®EROSO3,ERRBLK

sDECREMENT THE TOTAL CMAR COUNTER,
1SKIP ERROR IF NOT TOO MANY CHARS RECEIVED.
sSET ERROR NUMBER TO INITIAL ERRNSR,
sSELECT THE ERROR MESSAGE TO BE REPORTED,
;SELECT THE ERROR REPORT WOUITINE.

BIS

8CC

163462

RXTOUT ,R1
TXDONF ,ACTLNS

DEC
BNE
MOV
MOV
MOV

60%

1SKIP ADDING SO MS DELAY IF TX DONE ALL LINES
.
$ADD 50 MILLI SEC TO DELAY IF NOT LAST CMAR,

s INDICATE

TO TEST DATA,VALID BIT,

$EXIT ROUTINE IF TIME-OUT, WE'RE DONE,

REPORT ERROR AT INITIAL ERRNBR.
"MORE THAN TWICE THE EXPECTED NUMBER OF CHARA
CTERS RECEIVED"

GLOBAL

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

3075

3125
5126 017034
017034

PAGE S7

307c
3073

00
01 016736
016736
02 016742
03 016746
04

104460

ERROR

»>%5> ERROR «cccxe,
TRAP

CsERRUR

Brbedl EHlBolPI"4
nE
3127 017036
3128
3129 017044
3130
3131
3132
5133
3134
5135 017046
5136 017050
017052
017056

012767

MACRO M120Q

000001

1S.MAR B4 09:48

163160

MOV

000435

D7/
PAGE

57-1

21.FERROR

+INDICATE THAT AN ERROR HAS SEEN FOUND.

604

(EXIT THIS ROUTINE WE HAVE GIVEN UP,

3°

s EXTRACT

THE LINE NUMBER OF

010203
000303
042703
006303

6%:

177760

MOV
SWAB
BIC

ASL

R2,R3
R3
@177760,R3

010505

017064
017070
017074

004767
005767
001416

100012

004767
005767
001404
032767
001403

003242
163104

4 132
7 136

004767

7140
7
¥ 144

010467

o000

e pape

pape

017110
017114
017120
17122
17150

003162
163130
000100

IN THE LSB.

TO FORM OFFSET

INTO

TABLES.

017060
017062

032767
001012
000414

U U 00 00 U v O L 00 L0 G0 0 8 e

THE LINE NUMBER

iCLEAR THE UNMWANTED BITS.

: PROCESS THE READ CHARACTERS AS DICTATED BY
THE TEST FLAG.

5149 017076
017104
017106

00O
AR \lx\lrugn
NP AR A A
R —=OOV®

:COPY THE READ CHARACTER.

$GET

$SHIFT LEFT

THE NEW CHARACTER.

s CALCULATE OFFSET FOR ACCESSING TABLES OF LINE VARI
ABLES.

000707

004736
000207

000100

007360
166152

163056

MOV
BPL

R5,RS
8s

:DETERMIN WHICH TEST CALLED TMIS ROUTINE
.

JSR
TST
BEQ

PC , PRFRME
FERROR
10%

1PROCESS FRAMING ERRORS RECEIVED.
1HAS AN ERROR BEEN DETECTED ?

BIT

8s:
163032

60%:

#8IT06,0PTION

iHAS EXTENDED ERROR REPORTIN
G BEEN ENABLED

108
60%

iBRANCH IF IT MAS,
1OTHERWISE EXIT,

JSR
TST
BEQ

PC,PRPARE
FERROR
10s

+PROCESS PARITY ERRORS RECEIVED,
iHAS AN ERROR BEEN DETECTED ?

#8IT06,0PTION

TEST,

;"gérfliN SKIP PROCESSING CHARACTE
RS FOR PARITY

BNE
BR

BIT

108:

1BRANCH TO PROCESS CHARACTER IN PARIT
Y

iNO,

THEN BRANCH TO UPDATE POINTERS.

BEQ

60%

tHAS EXTENDED ERROR REPORTING NEEN ENAB
LED ?
sEXIT

JSR
BR

PC,UPDCHR
2%

sLOOP TO READ NEXT CHAR FROM FIFQ.

MOV

R4 ,ERRNBR

PASS

RTS

JSR

IT MASN'T,

sUPDATE POINTERS AND COUNTERS FOR THIS LINE,

sRESTORE THE ERROR NUMBER TO ITS INITIAL
VALLE,
;RESTORE GPRS,

PC.a(SP).

tRETURN TC PREGOS SUBRT,

Bl SiBRolT1aT4
g
3166

MACRO mi20g, u3-naR-84 09:48 PAGE S
.SBTTL

3167

3168

3169
3170

3171

3178

;%gg

ERROR

FLAGS

AND

LINE

NUMB

- BASE OF
-

BASE

"RX

INACTIVE

LINE”

ERROR

THE EXTRA CHARACTER COUTERS
TX/RX LINE

NUMBER

MESSGE .

TABLE .

ASSOCIATION

TABLE.

- IF ERROR FOUND, EXPECTED DATA INDICATI
ON FOR

ERROR FOUND,

ADDRESS

ERROR

MESSAGE
.

JSR

PC,CKINAC

s* COMMENTS:

i* SUBORDINATE ROUTINES CALLED: NONE.

004567

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

CKINAC::

166150

SAVE
JSR

010203
000303
042703

006303

“....Q

3SAVE CONTENTS OF GPRS RO THRU RS,

RS,PREGOS

+CALL REGISTER SAVE SUBRT,

MOV
SWAB
BIC

177760

ASL

R2,.R3
R3
#177760,R3

iEXTRACT THE LINE NUMBER
i+
FROM THE CHARACTER WE
i
__ARE COMPARING.

sFORM OFFSET INTO WORD TABLE FROM LINE NUMBE
R.

: IF THE CHARACTER IN QUESTION IS NOT A VALID CHARA
CTER,

005702
100021

TST
BPL
3

3210

gghl’

‘-

005234
002364

S0
86
9%
S0
e

R2
S50¢

EXIT WITH "SUCCESS".

sCHECK DATA,VALID BIT,
sEXIT WITH SUCCESS IF CMAR IS NOT VALID.

IF THE TX LINE WHICH IS ASSOCIATED WITH
THIS RX LINE IS AN ACTIVE LINE,
EXIT THE ROUTINE WITH

“SUCCESS”,

MOV
BIT
BNE

162766
-

016301
036167
001013

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

s EXTRACT THE LINE NUMBER FROM THE PASS
ED IN CHARACTER AND USE THE LINE
3
NUMBER TO FORM AN OFFSET FOR ACCESSIN
G TABLES OF LINE VARIABLES,

ggg:

x®

INCLUCING

CARRY - "SUCCESS” FLAG (SET IF NO ERROR FOUND),

3197
gig

CHARACTER

ERROR RPT,
EXCNT - EXTRA CHARACTER COUNT FOR LINE (UPDATED
IF ERROR),

gtg‘s

]

FOR

EW,
- BIT MAP OF ACTIVE DUT LINES.
- TABLE OF WORDS WITH BITS SET FOR FORM
ING BIT MAPS,
- LABEL AT

i# CALLING SEQUENCE
:

3192

-—

THE CHARACTER

PREPARES AN ERROR MESSAGE

R3 - LINE NUMBER OFFSET OF PASSED IN CHARACTER.

g{:g

5213 017172
3214 017176
gg}g 017204

TARXLB

gh‘g

3207 017166
gggg 017170

EM9006

g{:g

THE

EXCNTB

5185

:o OUTPUTS:

3184

ACTLNS
BITIBL

3183

gggz 017164

INPUTS:

;s
i*
;e

35182

THE CALLING ROUTINE, AND RETURNS A “FAI
LURE
" STATUS.

3179

3200 017154
3201 017156
3202 017160

LINE THIS ROUTINE RECORDS THE FACT THAT

WAS RECEIVED ON AN INACTIVE LINE
,

.0.“.00.“0...000.0000

UTINE CHECKS A CHARACTER TO DETERMINE
IF THE CHARACIER
WAS RECEIVED ON AN ACTIVE LINE.
IF TME CHARACTER WAS RECEIVED ON
AN INACTIVE

3176
3177

- CKINAC -

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

- CHECK FOR NEW CHARACTER ON INACTIVE LINE ROUTI
NE
THIS SUBRO

317%

319 017150

GLOBAL SUBRO'JTINE

g%;z

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

;e
;e

3172

5195 017150

TXRXLB(R3),R1
;GET THE TX LINE & OFFSET FOR THMIS RX LINE,
BITTBL(R1),ACTLNS
;DETERMINE IF TX LINE IS AN ACTIVE LINE,
508
sEXIT ROUTINE WITH SUCCESS IF LINE IS ACTIV
E.

THE CHARACTER IN QUESTION WAS RECEIVED
ON AN INACTIVE LINE,

COUNT THIS CHARACTER AS AN EXTRA CHAR,

SET UP ERROR INFORMATION,
EXIT ROUTINE WITH “FAILURE“ INDICATION.

Bltok! S¥QITHE"s
12

3222
3223

;

017206
017212

3224 017214
3225 017220
3226 017224
3227 017230
gggg 017232

PARTS

005263
001002

003242

005363
012701
012708
000241
000401

:4
AR mi2og,
3 man - sa 09:a0

003242
011233
100000

3230
3231

INC
BNE

2s:

DEC
MOV
MOV
cLC
B8R

F7
ace sa.1

EXCNTB(R3)
2%

EXCNTB(R3)
S9EM9006 ,R1
#BIT15.Ra

60s

: INCREMENT THE EXTRA CHAR COUNT FOR THIS
LINE.
:SKIP SETTING TO MAX VALUE IF NO OVER
FLOW,

:DECREMENT BACK TO -1 (MAX VALUE) IF OVERF
LOW.
iSET UP RX ON INACTIVE LINE MESSAGE .
sSET UP "NONE” EXPECTED DATA INDICATION
.
iCLEAR THE "SUCCESS" FLAG.
;GO REPORT RX CHAR ON TNACTIVE LINE.

i
s WE HAVE NOT FOUND A “CHAR ON INACTIVE LINE"
” ERROR SITUATION.
;s SET

gs;g

ggg; 017234

3236 017236

017236
017242
017246
017252

3237 017254

‘-

000261
010166
010366
C10466

004736

000207

000004
000010
000012

THE “SUCCESS” FLAG AND EXIT THE ROUTINE.

S0s:

SEC

60%:

PASS

RTS

sSET THE "SUCCESS" FLAG.

R1,R3.Ra

MOV
MOV
MOV

JSR

sRESTORE GPRS, EXCEPT QUTPUT GPRS .

R1,R1SLOT(SP)
R3,R3SLOT(SP)
R4 ,RASLOT(SP)
PC.8(SP).

:CARRY

tPUT R1 IN STACK SLOT.
tPUT R3 IN STACK SLOT.
1PUT R4 IN STACK SLOT.

;RETURN TO PREGOS SUBRT.

SUCCESS FLAG (SET IF NO ERROR).

sAx

DMU-11 FUNC TST PARTS
GLOBAL SUBROUTINE

MACRO M1200

15-MAR-84 09:48

- CKTRAP

3239
3240
3241
3242

-SBTTL

PAGE S9

GLOBAL SUBROUTINE

- CKTRAP

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

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

CHECK TRAP ROUTINE

THIS

SUBROUTINE

USED

CHECK

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

FOR

BUS

TIME-OUT

TRAP

WHICH IS CAUSED BY AN ACCESS TO A
NON-EXISTENT MEMORY OR
IF THE TRAP

DOES

i+ INPUTS:

(RO)

(R1)

OUTPUTS:

WRITTEN
FLAG

TPAFLG

s¢ CALLING SEQUENCE:

]

s+ COMMENTS:

THIS

ADDRESS

SOURCE FOR

OCCUR,

DESTINATION

CARRY

NOT

FOR

THE MOVE.

THE

RETURNS

TRAP)

I/0 LOCATION.

SUCCESS

INDICATION.

RETURN

NONZERO

TRAP

JSR

MOVE
.

CONTENTS

SET

OF
NO

(RO).
004

OCCURRED,

TRAP

CLEARED

DETECTED.
OTHERWISE.

PC.CKTRAP

IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADDRE
SS WHICH

IS LABELED ADRPTR WILL BE

ROUTINE

(004

RO - SOURCE ADDRESS FOR MOVE.

.‘..................

THE

TRAP PC ADDRESS ON

THE

STACK,

3¢ SUBCRDINATE ROUTINES CALLED: NONE.

'.‘.‘.‘...“‘....‘.......

“‘...‘..‘l““....‘..‘.‘.“

3262 017256
017256
3263 017262
3264 017266
3265 017270
5266 017274
3267 017276
3266 017300
3269 017302
017302

3270 017304

004567
005067
011011
005767
000261
001401
000241
004736
000207

166042
162766

162760

CKTRAP::

SAVE
CLR

ADRPTR::

60%:

MOV

TST

SEC

TPAFLG

(RO),(R1)
TPAFLG

BEQ
CLC

60%

ais

PASS

JSR

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

i SAVE CONTENTS OF GPRS RO THRU RS,
R5,PREGOS
;CALL REGISTER SAVE SUBRT,
:CLEAR THE 004 TRAP FLAGS,

sPERFORM THE MOVE IN QUESTION.
:CHECK FOR OCCURENCE OF

s INDICATE SUCCESS.

sEXIT WITH SUCCESS IF
s INDICATE FAILURE,

JSR

TRAP,

TRAP DID NOT OCCUR.

;RESTORE GPRS,

PC.a(SP).

tRETURN TO PREGOS SUBRT,

DHU-11 FUNC

TST PART4

GOBAL SUBROUT INE

MACRO M1200

15-MAR-84 09:48

- CKTRPB -

3272

.SBTTL

3275

PAGE 69

GOBAL SUBROUTINE

- CKTRPB

- CHECK FOR TRAP

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

3274

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

3275
3276
gg;z

;s
;s
ie
L

3279

3280

ggg;

THIS SUBROUTINE IS USED TO CHECK FOR
A BUS TIME-QUT TRAP (004 TRAP)
WHICH IS CAUSED BY AN ACCESS TO
A NON-EXISTENT MEMORY OR I/0O LOCA
TION
IF A TRAP DOES NOT OCCUR, THIS ROUT
INE RETURNS A SUCCESS INDICATION.

INPUTS:

RO - SOURCE ADDRESS FOR MOVE

R1 - DESTINATION ADDRESS FOR MOVE

(RO)

3283

3284

gggz

OUTPUTS:

(R1) - WRITEN TO THE CONTENTS OF (RO)

i*
L

3289

gg::

3290
3291
3292

;e
;e

TP4FLG

CALLING SEQUENCE:

COMMENTS ;

ggg

NONZERO

JSR

TRAP

OCCURED,

CLEARED OTHERWISE
.

PC.CKTRPB

IF THIS SUBROUTINE CAUSES A TRAP, EITHE

THE STACK BY AN UNEXPECTED TRAP.

THIS ROUTINE PERFORMS A BYTE MOV .

SUBORDINATE ROUTINES CALLED:

;0000.0‘00000oo.o‘0.0000.0‘oaoooo‘o

NONE .

ooo.‘ooaA.‘.co.o.ooooo.ooooo‘-ooooo

3298 017306
3299 017306

004567

166012

3500 017312
5301 017316
3302 017320
73524

005067
111011
005767
000261

162736

7326
7330
7332
7832
7354

R THE AUDRESS
WHICH IS LABELED TRPAD2 WILL BE THE
TRAP PC ADDRESS ON
THE STACK OR SOME OTHER ADDRESS WHIC
H WAS PLACED ON

3295

- SOURCE FOR THE MOVE

CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETEC
TED

gg:;

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

162730

CKTRPB: :
CLR
MOVB
TRPAD2:: TST

001401
000241

004736
000207

SAVE

608 :

SEC
BEQ
cLC
PASS
RTS

JSR

TPAFLG
(RO),.(R1)
TPAFLG
60$

JSR

R5,PREGOS

‘.oooooo.

+CALL REGISTER SAVE SUBRT,

sCLEAR THE 004 TRAP FLAGS
iPERFORM THE BYTE MOVE
sCHECK FOR OCCURENCE OF TRAP

s INDICATE SUCCESS
sEXIT WITH SUCCESS IF
s INDICATE FAILURE
:
PC,a(SP).
sRETURN

TRAP DID NOT OCCUR

;RETURN TO PREGOS SUBRT,

MACRO fllmdgi'_mffl 09:48

3309

.SBTTL

3310
3311
5212
3313
5314
5315

-l

fomt

B%ek! SHRoLTINE
"

PAGE 61

“EQ B4

GLOBAL SUBRGUTINE

- CLNRST

3‘0‘.0.0‘..‘.‘.0.0..

5316

3517
3318
5519
3320
5321

;¢

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

CLEAN

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

RESET

THE

DEVICE

THIS SUBROUTINE IS USED TG RESET

é&gflé?cw-l!st

THE DUT

SKIPPED.AND

..‘.0.‘...0..0.000

UNDER

THE

TEST

TO A KNOWN STATE.

FIFO

PURGED

ANY

ERROR

IF THE RESEY DOES NOT SUCCESFULLY COMPLETE, THEN THE
CARRY BIT IS
PASSED BACK TO THE
CALLING ROUTINE

INPUTS:

i
;e

CSRA

CONTAINS

:0 OUTPUTS:

CSR

CONTAINS

ERRNBR

ERROR NUMBER FOR PCSSISLE ERROR REPO
RT
.

ADDRESS

ERRTYP ,ERNBR,AND

DUT

ERRMSG

DMA

SET

BUFFER

COUNT

CORRECTLY,

THE DUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE.

CARRY

ERRBLK

;e
;e

CLEAR

VALUE

IESTAT

AND

3 CALLING SEQUENCE
:

INDICATES
MAY

AND

INTERRUPT

JSR

s+ COMMENTS:

THE

THE ADDRESS OF

TXBFCA
ERRTBL
-

(CLEAR).

THE

TEST

DESTROYED.

INTERRUPT
ENABLE

FLAGS

BITS

ABORTED.

ARE

CLEARED.

THE

DUT'S

CSR

ARE

CLEARED.

PC,CLNRST

THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS
ERRNBR.
ROUT

THIS

INE

DOES

NOT

DESTROY

THE

VALUE

ERRNBR.

i¢ SUBORDINATE ROUTINES CALLED: DELAY ,MSLGET,PU
FIFO,RESETT,

] .‘......‘...“‘...“..

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

004567

165762

CLNRST:: SAVE

JSR

004767
103002

5347 017350

004767

3349 017354
3350 017354
017354
3351
3352 017356

004736

004510

003274

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

s SAVE CONTENTS OF GPRS RO THRU RS,

RS,PREGOS

;CALL REGISTER SAVE SUBRT,

s RESET THE DUT,
3
THIS ROUTINE REPORTS ERRORS WITH NUMBERS FROM
ERRNER THRU ERRNBR.2,

JSR

BCC

PC.RESETT

sRESET THE DUT TO A KNOWN STATE.

$EXIT ROUTINE WITH ABORT TEST INDICATOR,

| PURGE THE FIFO OF ERROR CODES, SAVE ANY BMP CODES FOUND.
re
JSR
PC.PUFIFO
iPURGE THE FIFO.
608
{EXIT THE TEST USING RESETT OR PUFIFO STATUS.
PASS
JSR
RTS

sRESTORE GPRS,

PASS

PC.BISP).
sCARRY BIT:IF CLEAR,

THE FOLLOWING

INTACT:

JRETURN TO PREGOS SUBRT.
THEN ABORT THE TEST,

SlbeAL 5iBholTing"""*

MACRO ”l%“{afl_fli 84 09:48

3354
3355
3356
3357
3358
3359
3360

3361
3362
3363
3364
3365
3366
3367
3368
3369
53570

3371
3372
3373
3374
3375
3376

.SBTTL
AR

PAGE s2

GL(BAL SUBROUTINE

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

CLR16W

‘0‘0.‘..0.......0..‘

THIS

FEd

SUBROUTINE

CLEAR

CLEARS

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

SIXTEEN

WORDS

....0.0‘...000

ROUTINE

STARTING

WITH

THE

i+ INPUTS:

RO - ADDRESS OF THE FIRST WORD T0O CLEAR,

s+ OUTPUTS:

(RO) TO (RO+15)

;¢ CALLING SEQUENCE
:

JSR

SPECIFIED WORD

16 WORDS OF MEMORY ARE CLEAREU TO O,

PC.CLR16MW

s COMMENTS:

:* SUBORDINATE ROUTINES CALLED: NONE.
$~-

004567
012701
005020
005301
001375

004736
000207

165740
000020

.‘.‘......‘.........

CLR16MW::
2s:

60$:

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

SAVE

MOV

CLR

216. ,R1

JSR

(RO)«

DEC
BNE
PASS

R1
2s

ave

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

i SAVE CONTENTS OF GPRS RO THRU RS,
RS ,PREGOS
;CALL REGISTER SAVE SUBRT,
:SET THE LOOP COUNTER TO 16.
;CLEAR A WORD OF

JSR

...0.00000000

MEMORY,

:COUNT THIS LOOP.
;LOOP IF NOT 16 WORD CLEARED.
sRESTORE GPRS,

PC,a(SP).

tRETURN

PREGOS

SUBRT,

B! IBRolTine"*

MACRO ”1208&!”-84 09:48

3378
3379
3380
3381
3382
35383
3384
3385
5386
3387
3388
3389

3390
3391
3392
3393
3394
3395
3396
3397
3398 017402
017402
3399 017406
3400 017412
3401 017414
3402 017420
3403 017422
3404 017424
3405 017426
3406 017430
3407 017432
3408 017436
3409 017440
3410 017442
5411 017444
5412 017446
017446
017452
34153
5414 017454

.SBTTL
see

;e
3o

;e
;e
FE

PAGE 63

§G Am

GLOBAL SUBROUTINE

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

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

THIS

- CONVERT LINE BIT
IS USED TO CONVERT

SUBROUITNE

ANOTHER LINE BIT MAP

NUMBER/OFFSET

s+ INPUTS:

s+ OUTPUTS:

BASE

...000000

BIT

IS BASED UPON

MAP

THE

PASSED

ASSOCIATED

INTO

Tx/Rx

LINE

ADDRESS

ASSOCIATED

TX/RX

LINE

NUMBER

TABLE.

R5 - CONTAINS AN ASSOSCIATED LINE BIT MAP,

s CALLING SEQUENCE
:

‘.0.0‘0.000‘.000

MAP.

RS - CONTAINS THE LINE BIT MAP TO BE TRANSFORME
D .

JSR

s+ COMMENMTS:

THAT

TABLE.

TXRXLB

]

CONMAP

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

PC,CONMAP

THE TX/RX ASSOCIATION TABLE MUST BE INITIALISE
D BEFORE

ROUTINE

CALLED.

THIS

s+ SUBORDINATE ROUTINES CALLED: NONE.
-~

004567
012702
010503
012704

165716
005234

004767
050005
005722

MOV

2%:

000207

MOV
MOV
CLR
ASR

B8CC

MOV

ASR

001250
4%:

001366
010566
004736

oooooat.o‘oootoooooa

CONMAP : : SAVE

000020

006203
103005
011201

o.to..o.oao.too.o.o.

000014

608:

woR

#TXRXLB,R2

.oooooo.oooo‘.oooooo

aoooootooooo.oo

iSAVE CONTENTS OF GPRS RO THRU RS,

RS ,PREGOS

;CALL REGISTER SAVE SUBRT.

;GET THE BASE ADDRESS OF THE LINE ASSOC
TABLE

RS5.R3
ONUMLNS , R4
RS

;:COPY THE BIT MAP TO BE TRANSFORMED.
sSET MAX LINE COUNTER.
;CLEAR ASSOCIATED LINE BIT MAP.

$SKIP SETTING ASSOCIATED LINE NUMBER BIT MAP,

sSHIFT ACTLNS BIT MAP INT BOOLEAN REGI
STER,

(R2),R1

sGET ASSOCIATED LINE NUMBER OFFSET FROM
TABLE

$SHIFT RIGHT TO GET LINE NUMB FROM
OFFSET,

JSR
BIS

PC.LINBIT
RO,RS

1GENERATE AN SINGLE BIT MARP FOR THIS LINE,
$SET BIT FOR THIS LINE IN ASSOCIATED
BIT MAP ,

DEC
BNE

R4
23

sDECREMENT LINE COUNT.
:LOOP IF NOT DONE.

TST

PASS

ars

(R2)+

s INCREMENT ADDRESS FOR

MOV
JSR
e

sRESTORE GPRS,

RS ,RSSLOT(SP)
PC,a(SP).
iRS

CONTAINS

THE NEXT LINE NUMBER,

EXCEPT

THE

iPUT RS IN STACK SLOT,
iRETURN TO PREGOS SUBRT,

ASSOCIATED

LINE

BIT

MAP
,

SbeA! SHefolTine"

P
€0

3416

-.SBTTL

3417
3418
3419

GLOBAL SUBROUTINE

.0.‘.‘.‘....0.......

3420

THIS

:0 INPUTS:

3421
3422

FHLd
L

;s OUTPUTS:

SUBROUTINE

s* COMMENTS:

S38% sxex
¢ W-

SUBROUTINE

DELAY

00..0.0.‘0.00..00

VARIABLE

NUMBER

MILLI-SECONDS.

NONE.
JSR

PC.DELAY

IF NO HARDWARE CLOCK INTERRUPTS ARE OCCUR
ING, CONTROL -C5 WILL
BE HONORED FOR

NOT

USED

DELAY

MSLCONT.

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

R4 - CONTAINS THE NUMBER OF MS TO DELAY.

3¢ CALLING SEQUENCE
:

017456
017456
017462
017464
017470
017472
017476
017502
017504
017510
017510
3445 017512
3444
5445 017514

- DELAY

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

THE

DURATION

THE

DELAY,

3¢ SUBORDINATE ROUTINES CALLED: NONE.
,.‘.“......‘...‘.....“‘.

‘.0‘.‘..‘...‘.‘...0..‘..

004567
010401
012702
005003
012704
004767
103002
004767
004736
000207
177777

165642

DELAY::

MOV

177777

MOV

017514
001506

002314

SAVE

608

624

R4 ,R1

JSR

#-1,R2

CLR
MOV
JSR
B8CC
JSR
PASS

R3
9623 ,R4
PC,MSLOOP
608
PC.00PS

RTS

.WORD

-1

JSR

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

i SAVE CONTENTS OF GPRS RO THRU RS,

RS,PREGOS

;CALL REGISTER SAVE 3UBRT,

1PASS NUMBER OF MS DELAY AS TIME-OUT VALUE.
s TELL MSLOOP ROUTINE TO CHMECK ALL BITS.

s TELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR
.
s TELL MSLOOP TO CHECK DUMMY NON-ZERO WORD.
;DELAY THE REQUESTED @ OF MS,
{EXIT ROUTINE IF WE TIMED-OUT,
]
+IF NO TIME-OUT, BAD PROGRAM OR MOST MACHINE
.
;RESTORE GPRS.
PC,a(SP).
iRETURN TO PREGOS SUBRT,
sDUMMY. NON-ZERO WORD,

BYaA! SBRolilETe

magag m200 15.man-se 0948 PacE 65

3447

.SBTTL

GLOBAL SUBROUTINE

2449
3450
,S:gé

;e
ie
ie

3':;:

000
- CONVERT Y0 A 16-BIT PHYSICAL ADDRESS THIS ROUTINE CONVERTS FROM PAR FORM TO A 16-BI
T PHYSICAL ADDRESS,
OF ALTERNATE 1°'S AND 0°S.

INPUTS:

CMTSTA: - CONTAINS THE ADDRESS IN PAR FORM

OUTPUTS:

RO - CONTAINS THE 16 BIT PMYSICAL ADDRE
SS

CALLING SEQUENCE:

COMMENTS:

ss::g

“‘s

ave

,3:’52

“

zgz

3459

3461

3 -~

5464 017516
017516
3465 017522
3466 017526
3467 017532
3468 017534
uunm 017536

004567
016700
012702
006300
005302
001375

165602
162474
000006

3471 017540
3472 017544
3475 017550

012701
032700
001402

000052
000100

35:;; 017552

012701

s!:;g 017556

060100

3478 017560
017560
017564

010066
004736

33:;3 017566

000207

...‘.....O...‘.‘..‘...‘..‘..

JSR

.‘ 08000000

PC,.DM16B

USED IN THE DMA ADDRESS TEST

SUBROUTINES CALLED:

NONE .

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

.0“0“.0‘.0‘000.0‘000000‘0.00.0.0

.‘c0

DM16B:: SAVE

2%:

000025

MOV
MOV
ASL
DEC
BNE

JSR
DMTSTA,RO
o6,R2
RO
R2
2%

RS5,PREGOS
1CALL REGISTER SAVE SUBRT,
sSHIFT THE DMA TEST ADDRESS
:SIX PLACES LEFT , TO
sCONVERT IT INTO A ,
:16-BIT PHYSICAL ADDRESS
:

MOV
BIT
BEQ

#52,R1
#100,R0
4%

iSET UP THE 6 LSB'S
+IF BIT 06 OF THE PHYSICAL
sADDRESS IS CLEAR THEN BRANCH

MOV

4%;
000002

- DM168B -

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

ADD
PASS

RTS

#25,R1

1OTHERWISE CORRECT THE LSB'S

R1,RO

sMREGE THE LSB'S WITH THE PHY ADDR

MOV
JSR

;RETURN WITH THE PHY ADDR,
RO,ROSLOT(SP)
tPUT RO IN STACK SLOT,
PC,a(SP»
tRETURN TO PREGOS SUBRT,

Bkl Haolihe

m%éuzoo

15-MAR-84 09:48

PAGE 66

P,
LA)

3482

3483
3484
3485

.SBTTL
HER

GLOBAL SUBROUTINE

;s
;®

ALTERNATE

DMTSTA.

1°S

AND 0'S

;s INPUTS:

BITS

0°'S.

THIS

TO 6 OF

ROUTINE

;s
;e

THE

ADDR

ARE

AN ADDR OF

CONTAINED

WHICH

READ

NUMBER

CLEAR

SET

SPECIFIES A WRITE

DATA

BYTES

SPECIFIES

CONTAINS

ADDRESS
-

TPAFLG

s+ OUTPUTS:

AREA

PAR6A

THE

SAVED,IF

BIT

MEM

MGT

SET,

READ

BITS

004

TRAP

DMA

ADDRESS

TEST.

DATA

FROM

(DMTSTA),

SPECIFIED.

READ/WRITTEN

FROM

(DMTSTA)

TO (DMTSTA).
6

THE

ADDR.

STATUS

REG

INDICATES

MEM

ADDRESS OF MEM MGT PAR

THE

DATA TO BE WRITTEN TO (DMTSTA),

MMPRES

FROM

SPECIFIED.

MMSRO

CALLED

DMTSTA

WRITE

ADDRESS
IS

MGT

PRESENT

FLAGS

DATA AT (DMTSTA) SAVED OR WRITTEN

i s

PAR

i e

3529 017612
3530 017620
3531
3532
3533 017624
3534 017632
3535 017634
3536 017640
3537 017646

RO - ADDRESS OF THE

CONTENTS

SET

TPAFLG

CLEAR

READ/WRITE

SET

3¢ CALLING SEQUENCE:

s+ COMENTS:

JSR

CONTENTS

DMTSTA

SUCCESSFUL

FAIL.

PC.DMRW

IF MEM MGT IS PRESENT THE SUBROUTINE USES (DMTS
TA)

i e

3514
3515
3516
3517
3518
3519
3520

.00..00‘

THE ROUTINE APPENDS THE 6 LSB'S TO PRODU
CE AN ADDR OF
1°SAND

ALTERNATE

3527
3528 017610

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

- READ/WRITE DATA FROM/TO (DMTSTA) THIS ROUTINE READS DATA BYTES
FROM OR WRITES DATA BYTES

3509
3510
3511
3512
3513

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

;»

3521 017570
017570
3522
3523 017574
3524 017576
3525 017602
3526 017604

- DMRW

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

i e

THE

i e

PAGE

VIRTUAL

SIX
IT

THE

ADDRESS

ADDR

THE

PLACING
RANGE

PAR

NOT

PRESENT
16

BIT

THE

(DMTSTA)

PHYSICAL

PAR
06

LSB’S.

EQUIVALENT

#6,

WHICH

AND

CREATES

CONTAINS

CONVERTED

INTO

ADDRESS.

34 SUBORDINATE ROUTINES CALLED: CKTRAP,DM168B.

004567

010004
005767

001003
004767
000416
016777
012700
032767
001402
012700
012777
005705

DMRW::

165530

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

MOV
TST

BNE

177706

JSR

162520

6%:

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

0000

SAVE
JSR

162516

162404
140052

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

BR
MOV
MOV

RO,R4
MMPRES

PC,DM168

108
DMTSTA,8PAR6GA
#140052,R0

R5,PREGOS

sCALL REGISTER SAVE

i SAVE THE SOURCE ADDR
+IF MEM MGT IS PRESENT

SUBRT,

THEN

iJUMP AND SET UP THE PAR ¢3

1OTHERWISE CONVERT DMTSTA INTO A

sPHYSICAL ADDRESS, IN RO.

$JUMP TO PERFORM THE MOVE
:SET PAR 96,
sSET THE SIX LSB'S AND CONVERT

16-BIT

ssrvg=;UAL ADDRESS WITHIN THE INFLUENCE
000001

162370

140025
000001

162446

BIT
BEQ
8$:

108:

MOV
MOV

TST

#1 ,DMTSTA
8s

06,

:IF BIT 00 OF DMTSTA IS CLEAR THEN
sAVOID CHANGING TME LSB‘S

sCHANGE THE LSB’S
sENABLE MEM MGT,

s IF A READ IS SPECIFIED THEN

ekt SRSl
3538 017650

3539 017652
3540 017654
3541 017656
3542 017662
3543 017664
3544
017666
3545 017670
3546 017672
3547 017674
5548 017700
3549 017702
3550 017706
017706
3551 017710
3552

001402
010001
010400
004767
10300:

177428

15-MAR -84 09:48

12%:

005767
001402
005077
004736
000207

.AVOID

PC.CKTRPB

lflESY(fiE THE NIGINAL SOURCE FOR THE MOVE
.,
1PERFORM THE BYTE MOVE

R4 RO

162420

143

128
16$

162406

12¢
RO,.R1

143
R1

005200
005303

001371

PAGE 66-1

168:
PC

SWAPING

THE

SOURCE

AND DESTINATION.

1EXIT IF A TRAP OCCURED.

1 INCREMENT THE DESTINATION ADDRESS
;XMY THE SOURCE ADDR.
sDECREMENT THE DATA

sREPEAT UNTIL ALL DATA READ/WRITTEN
xIF MEM MGT IS PRESENT THEN

lDISflBLE §
PC.8(5P).

iRETURN TO PREGOS SUBRT,

DMU-11 FUNC 151 PARTS
GLOBAL <1BROUT INE

MACRO M1200

3554
3555
35%¢

lS-')fll-M 09:48
.SBTTL
P

GLOBAL SUBROUTINE
-

INITIATE

START

CHARACTER

CSRA

IESTAT

STORAGE

TXADIA

CONTAINS

ADDRESS

DMA

CONTAINS

BUFFER

ADDRESS

REG

DMA

o1.

CONTAINS

BUFFER

ADDRESS

DMA

REG

CHARACTER

02,

TXBFCA

CARRY

ADDRESS

DUT

TBUFFAD2

ODUT

TBUFFCT

s¢ CALLING SEQUENCE
:

s» COMMENTS:

DMA

JSR

012700
10444
056701
010177
105777

100411

010377
010277
110477

THE

TBUFFAD2

THE

162274
162234
162224

VIRTUAL).

THE

DUT

CSR.

THE

INTERRUPT

ENABLE

COUNT

BITS.

BUFFER

DMA

BIT

BUFFER

ADDRESS

SET.

CHARACTER

COUNT

(INITIALIZED).

(INITIALIZED),

CINITIALIZED).

REG.

THE DMA ADDRESS,

I.E.

BITS O AND

NONE.

.000..‘..00.0..0‘..0.0.0

MOV
WRITE

9200,R4

JSR

THE DMA PARAMETERS OUT

0‘.00.0.0‘.‘00.0“.0.0.“0

sSAVE CONTENTS OF GPRS RO THRU RS,

RS,PREGOS
sCALL REGISTER SAVE SUBRT,
1 PREPARE TO CLEAR UPPER 6 BITS OF DMA BUFF
ADR.
TO

THE DUT

DMA REGISTERS,

DISABLE INTERRUPTS,
SET UP DUT CSR IND.ADR.REG FIELD.
WRITE THE DMA TRANSMIT CHARACTER COUNT
,
WRITE THE LEAST SIGNIFICANT 16 BITS
OF THE DMA BUFFER START ADDRESS,
WRITE TME MOST SIGNIFICANT 6 BITS
OF THE ADDRESS,
SETTING THE OMA_START BIT, AND INITIATING
THE DMA TRANSMISSION,
GETPRI

SETPRI

BIS

MOV

TSTB

CLC

162236
162226
162224

BITS

TWO MSB OF

‘0.‘..00000..00...‘0..0.

DODMA:: SAVE

s L R R
—

000340

BIT

THIS ROUTINE ASSUMES MEMORY MANAGEMENT IS DISAB
LED AND

3* SUBORDINATE ROUTINES CALLED:

(16

BUFFER,

PC,DODMA

CLEARS

BUFFER

DMA

STATES

DMA_START

DMA

THE

- SUCCESS FLAG (SET IF DMA_START FOUND CLEAR
),

TBUFFAD1

104440
010005

FOR

DUT

THE

ADDRESS

5590
3591

COUNT

CONTAINS

TXAD2A

3¢ OUTPUTS:

5587
3588
3589

R1 - LINE NUMBER ON WHICH TO INITIATE THE DMA,

165406
000200

ROUTINE

004567
012704

0..“....0.000

TRAMSMISSION

3582

DMA

3580
3581

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

THIS ROUTINE WRITES THE DMA PARAME
TER TO THE SPECIFIED DEVICE AND
INITIATES THE DMA TRANSMISSION.

3569
3570
3571
3572
5573
3574
575
3576
3577
3578
5579

- DODMA

.‘.......0Q‘....‘..0

:0 INPUTS:

3592
3593
3594
3595
5596 017722
017722
017724
3597 017726
017726
017732
3598 017734
3599 017740
3600 017744
5601 017750
3602 017752
3603 017754
3604 017760
%605 017764

“EQ 97

00.....‘0....‘..6...

3o
ie

3583
3584 017712
017712
3585 017716
3586

PAGE 67

emMl
MOV
MOV

MOVB

oPRIO?

IESTAT,R1

R1,8CSRA
BTXAD2A

60%
R3,STXBFCA
R2,8TXAD1A
R4 ,8TXAD2A

iGET

THE

PRESENT PROCESSOR PRIORITY,

TRAP
MOV

CSGPRI
RO,RS

MOV

OPRIO7 RO

tCISABLE MLL MARDWARE INTERRUPTS,

TRAP

CSSPRI

iPREPARE FOR SETUP OF LINE NUMBER IN DUT CSR,

sSET UP THE DUT CSR IND.ADR,.REG FIELD,
1 TEST

THE DUT DMA_START BIT,

s INDICATE FAILURE

IN CASE DMA.HMO BIT

IS SET,

sEXIT WITH FAILURE IF DMA.MO BIT IS SET,
sWRITE THE DMA CHARACTER COUNT,
IWRITE THE LS 16 BITS OF BUFFER ADDRESS,
sWRITE MS 6 BITS OF

ADR AND START DMA

Tx,

DU 11 FUNC TST PARTS
GLOBAL SIBROUT INE

3606 017770
017770

017772
3607 017774

010500
104441
000261

3609 017776
017776
3610 020000

004736
000207

3008

MACRC M1200
15-MPR
84 09:48
- DODHA -

SETPRI

PAGE 67-1

D8
“€EQ

sRESTORE

SEC

608

: INDICATE SUCCESS.

PASS

RTS

THE PROCESSOR PRIORIT(.

JSR

MOV
TRAP

RS,RO
CS$SPRI

;RESTORE GPRS,
i+

CARRY

RETURN TO PREGOS SUBRT.
SUCCESS FLAG (SET IF SUCCESS)
.

MACRO M1200
-

15-MAR-84 09:48

FINACT

-SBTTL
PR

PAGE 68

SEQ 95

GLOBAL SUBROUTINE

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

‘...........‘...

FINACT

FIND

FIRST

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

ACTIVE

LINE

THIS SUBROUTINE CALCULATES THE NUMBER OF

......‘...0‘....

““..‘..

THE FIRST ACTIVE LINE

IS FOUND IN THE ACTIVE LINE BIT MAP ACTLN
S.

:0 INPUTS:
FE

s+ OUTPUTS:

THAT

ACTLNS - CONTAINS THE ACTIVE LINE BIT MAP,

- CONTAINS THE NUMBER OF THE FIRST ACTIV
E LINE.
CONT

CARRY

AINS

SET

;¢ CALLING SEQUENCE:

THE

BIT

INDICATES

JSR

MAP

REPRESENTATION

SUCCESS.

THE

ACTIVE

LINE.

PC,FINACT

s+ COMMENTS:

34 SUBORDINATE ROUTINES CALLED: NONE.
-~

3631 020002
020002

004567

165316

...‘........‘.‘...‘.

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

FINACT::

SAVE
JSR

.‘..‘.‘..0.

3 SAVE CONTENTS OF GPRS RO THRU RS,
RS,PREGOS
sCALL REGISTER SAVE SUBRT.

s FINC AN ACTIVE LINE ON WHICH TO PERFORM THE TEST.

‘

3635 020006
3636 020010
3637 020014
3638 020020
3639 020024
3640 020026
3641 020030
3642 020032
3643 020034
3644 020036
3645 020040
3646 020042
3647 020044

002772
000241
000401
000261

3649 020046
020046
020052
020056

010166
010506
004736

e
3653 020060

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

005001
012703
016700
012705
30500
001006
006305

000020

162152
000001

2%:

CLR
MOV
MOV
MOV
BIT
BNE
ASL

020103

4s;

60%:

R1
ONUMLNS ,R3

ACTLNS,RO
21.RS5

R5,R0O

INC
cMP
BLT
cLC
BR

60s

PASS

R1,R5

SEC

R1
R1,.R3

sCLEAR CARRY BIT, NO ACYTVE LINE FOUND.

sEXIT WITH FAILURE.
+SET CARRY, SUCCESS.

MOV
MOV
JSR

000014

iCLEAR THE LINE NUMBER COUNTER.
:GET MAX LINE NUMBER.
iGET THE ACTIVE LINE BIT MAP,
tSET UP A LINE BIT MASK,
1LOOK FOR AN ACTIVE LINE,
+BRANCH TO BEGIN TEST IF A LINE MAS BEEN FOUND
.
sSHIFT THE BIT MASK FOR THE NEXT LINE.
s INCREMENT THE LINE NUMBER COUNTER.
sCHECK IF ALL LINES HAVE BEEN TRIED.
iLOOP TO TRY THE NEXT LINE.

sRESTORE GPRS, EXCEPT
R1,R1SLOT(SP)
R5,RSSLOT(SP)

sPUT R1 IN STACK SLOT,
sPUT RS IN STACK SLOT,
PC,8(SP).
;RETURN TO PREGOS SUBRT,
1R1 - CONTAINS THE NUMBER OF FIRST ACTIVE LINE.
iRS

000207

RTS

sCARRY

CONTAINS THE BIT MAP OF

THE ACTIVE LINE.

- SET INDICATES SUCCESS.

BreAl S\BRolTIng
.

PARTS

MACRO M

12
p0
b TM

S-MAR-84 09:48

3055

.SETTL

““
3’:;;

;¢ OUTPUTS:

3675

3676

3677

R4 - LOCAL LINE GROUP BIT MAP.

THE CONTENTS OF THE TXRCB ARE DESTROYED.

THE INDIRECT ADDRESS FIELD OF THE
DUT CSR MAY BE DESTROYED.

TXDONF,TXPTR, TXRXL .

i¢ CALLING SEQUENCE:

:* COMMENTS:
')
i
Ty
;e
;e
3
;e

g:gg

3692

JSR

§ e

004567
010067

010167

165236
000230

THIS ROUTINE SHOULD BE CALLED TWICE DURING THE
TESTING OF
THE FRAMING AND PARITY ERROR DETECTION AND REPOR
TING TEST.
SO THAT BOTH LINE GROUPS ARE TESTED ON TRANSMISSI
ON AND
RECEPTION.
JSR
PC,FRPSUP
; DO SET-UP,
EXECUTE TEST FOR THE ABOVE SET-UP,
COMPLEMENT THE LINE GROUP BIT MAP,
JSR
PC.FRPSUP
;D0 SET UP AGAIN.
EXECUTE TEST AGAIN.

MOV

MOV
it

3699
g;gg

s
3
010067
012700
012720
010220
010320
012720

016710

005104
040420

‘-

163020
003124
000004
000001

162044

aooo.aooooooo.ouooooooooooooo-oo

FRPSUP:: SAVE

000226

TXCNT,

PC.FRPSUP

7¢ SUBORDINATE ROUTINES CALLED: TXRINI.

Ssg::

5709 020126
$710 020130

- LPR CONTENTS FOR LINES IN THE BIT MAP IN GPRA4,
- LPR CONTENTS FOR LINES NOT IN THE BIT MAP
IN GPR4.
- START ADDRESS OF DATA PATTERN TO TRANSMIT.
- LENGTH OF THE DATA PATTERN TO TX.

CHCNT ,CHRTOT ,DPEND +DPLEN,EXCNT ,RXCNT , RXDONF +RXPTR,

3682
3683
3684
3685
3686
5687
3688
3689

3708 020122

RO
R1
R2
R3

THE FOLLOWING POINTERS AND COUNTERS
ARE INITIALISED;

53::?

.".‘...‘..6
SET-uP -

THE DUT’'S LPR'S AND LNC'S MAY BE MODIFIED.

a;g

TRANSMISSION/RECEPTION

ACTLNS - CONTAINS A BIT MAP OF ALL
CURRENTLY ACTIVE LINES.
LOPBCK - CONTAINS THE TYPE OF LOOP
BACK MODE SELECTED.
CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK.

3674

ERROR

TEST.

3
;e
i

3673

3702 020076
5705 020102
5704 020106
3705 020112
3706 020114
S707 020116

FRAMING AND PARITY

THIS ROUTINE IS USED TO INITIALI
SE BOTM THE DUT AND THE
TRANSMISSION/RECEPTION CONTROL PARA
METERS TO THE CORRECT
STATE, PRIOR 70 A FRAMING OR PARITY
ERROR DETECTION AND
REPORTING

3¢ INPUTS:
;s
;e
T

3669
3670
g;s

- FRPSUP -

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

3668

g::; 020072

GLOBAL SUBROUTINE

3664
5665
3666
3667

0 %
¢

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

3
;e
;e

g::g

020062
3696 020066

PAGE 69

3659
2600
3661

3695 020062

RO, 708

JSR

R1,728

‘.oououooocoouu.uoauoouuouuuuo

1 SAVE THE CONTENTS OF THE GPR'S.

RS,PREGOS
sCALL REGISTER SAVE SUBRT.
$SAVE LPR PARAMETER FOR LINE K,

$SAVE LPR PARAMETER FOR LINE RX.

SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK
TO
ACTIVE LINES IN THE BIT MAP PASSED INTO THIS ROUTI INITIALISE THE
NE,
MOV
MOV
MOV
MOV
MOV
MOV

R0C,.CB8
#CBB.2,R0

04,(RO).
R2,(R0O).
R3,(RO).
€1,(RO)»

sLNCTRL PARAMETER, ENABLE RECEIVERS,
sSTART ADDRESS OF DATA PATTERN.
$SET DATA PATTERN LENGTH.
sNUMBER OF DATA PATTERNS TO TRANSMIT,

comM
8IC

R4
R4,(RO).

sGENERATE A BIT MAP OF ACTIVE LINES IN
GRP1,
sCLEAR THE UNWANTED LINES,

MOV

ACTLNS,(RO)

sSET CONTENTS OF LPR PARAMS IN TX/RX C.BLK
,
sGET ADDRESS OF THE NEXT WORD IN THE CNTR
L BLIK.

sBIT MAP OF LINES TO INITIALISE,

BEHGA! Siiolffug
e
-

35711 020132
3712 020136
g;:: 020140

116720
005200
012710

macRo mizog,
j e se 09:8
M1

3 -MAR

162036

MOVB
INC
MOV

000001

3715

004767

005538

012700
010120
062700
016710
005104
040410

003122

JSR
MOV
MOV
ADD
MOV

000010
162004

comM
BIC

:SET LOOPBACK MODE ,STAGGARED.
s INCREMENT ADDRESS TO GET NEXT WORD IN TABLE
.
sSET AMMOUNT OF OFFSET FOR EACH Tx START.

PC, TXRINI

ERS, TO THE STATE

s INITIALISE DUT.

oCBB RO
R1,(RO)+
#10,R0
ACTLNS,(RO)

R4
R4,(RO)

sGET START ADDRESS OF CONTROL BLOCK.
:SET_LPR PARAMETER FOR RX LINES.
:SELECT THE ADDRESS OF THE LINE BIT MAP
IN C.B.
:BIT MAP OF LINES TO INITIALISE.
1GENERATE A BIT MAP OF LINES IN GRP 2.
;CLEAR THE UNWANTED LINES.

: INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND COUNT
ERS, TO THE STATE
3 DICTATED BY THE
004767

005506

3736
3737

CONTENTS OF THE TX/RX CONTROL BLOCK.

JSR

PC, TXRINI

s INITIALISE DUT.

3 SET-UP THE REQUIRED LPR PARAMETERS NEEDE
D FOR THE CORRECT RECEPTION OF DATA
s ON ASSOCIATED IN-ACTIVE LINES.

3738
3739

£
PR

020176
020202
020206
020210

3746 020212

5747 020214

3748 020216
3749 020222
3750 020226
g;gg 020234

3 INITIALISE LPR PARAMETERS FOR INACTIVE LINES IN GROUP 2.

‘-

012701
016702
005101
005102

177777
161764

040102

040402

010267
005067
016767
004767

3755 020240

5756 020244

5757 020246
3758 020250
3759 020252
3760 020254
3761 020260
g;gg 020266

MOV
MOV
comM
comM

OMAPLNS ,R1
ACTLNS ,R2
R1
R2

$SET UP BIT MAP
tGET THE ACTIVE
1GENERATE A BIT
iGENERATE A BIT

BIC

R4,R2

BIC

162712
162704
000072
005444

MOV
CLR
MOV
JSR

162666
L

3;32

3764
3765
3766
3767

o ¥

§ SET UP CONTROL BLOCK FOR LINES IN GROP 2.

3730

g;:f

LOPBCK,{RC).
RO
#1.(RO)

’-

g;gé

5742
5743
5744
3745

s DICTATED BY THE CONTENTS OF THE TX/RX CONTR
OL BLOCK.

;;53

;;g} 020172

pace 69-1
9 -

: INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND
COUNT

g;{;

3723 020150
5724 020154
3725 020156
3726 020162
3727 020166
;;gg 020170

3716

;;53 020144

016702

005102

040102
005104
040402
010267
016767
004767

R1,R2

R2,CBMAPA
CBOPNA
723 ,CBLPRA
PC, TXRINI

CORRESPONDING TO ALL LINES.
(TX) LINE BIT MAP.
MAP OF NONE EXISTANT LINES.
MAP OF INACTIVE LINES.

1CLEAR ANY “NONE EXISTANT" INACTIVE LINES
.

$SET UP BIT MAP IN CONTROL BLOCK.
sCLEAR REPEAT TXx COUNT IN CONTROL BLOCK
.
$SET-UP COMPLEMENTARY LPR PARM,
s INITIALISE INACTIVE LINES.

3 INITIALISE LPR PARAMETERS FOR INAACTIVE LINES IN
GROUP 1.
'-

161726

MOV

coM

162654
000036
005412

BIC
coM
BIC
MOV
MOV
JSR

162634
'.

ACTLNS,R2

R1,R2
R4
R4,R2
R2,CBMAPA
708 ,CBLPRA
PC. TXRINI

iGET THE ACTIVE (TX) LINE BIT MAP,

iGENERATE A BIT MAP OF INACTIVE LINES
.

sCLEAR ANY NONE EXISTANT INACTIVE LINES.
:
sONLY PASS LGRP2 ASSOCIATED LINE BIT MAP,
sSET-UP BIT MAP IN CONTROL BLOCK.
sSET-UP COMPLAMENTARY LPR PARAM FOR LGRP1.
sINITIALISE INACTIVE LINES IN LGRP1,

i DISABLE RECEIVERS ON ALL LINES TO ENSURE
THAT ONLY THE RECEIVERS OF THE
3 ASSOCIATED ACTIVE (TXx) LINES ARE ENABLED.(S
TAGGARED LOOPBACK
)
i
RE-ENABLE RECEPTION ON THE CORRECT ASSOC
IATED L INES.
&

BYoA! SfRolfIE T
3768 020272

33‘7’3 020276

012705

004767

macRo mi2g5
op men-0e
177777

3773 020302
5774 020306

MOV

008002
PR

g;g

00:a8
JSR

pace 69-2

;

OMAPLNS RS

PC.RXDSBL

sSET-UP BIT MAP FOR ALL LINES.

:DISABLE RX ON ALL LINES.

; ENABLE RECEIVERS ON ASSOCIATED (RX) LINES
.
;-

016705
O0047€7

;;;2 020312

004767

3777 020316
020316
5778 020320
3779 020322
gzgg 020324

004736
000207

000000
000000

161664
177070

MOV
JSR
JSR

004062

60%:
708 :
72%:

ACTLNS,.RS
PC.CONMAP
PC.RXENBL

PASS

RTS
.WORD
.HORD

PC
O
O

JSR

3GET ACTIVE (TX) LINE BIT MAP.
sGENERATE AN ASSOCIATED (RX) LINE BIT MAP,

+ENABLE RECEIVERS ON ASSOCIATED LINES,

s:RESTORE GRP'S,
PC.a(SP).

‘RETURN TO PREGOS SUBRT,

+LOCAL STORAGE OF LPR PARAME TER TM.

;LOCAL STORAGE OF LPR PARAME TER RX,

Bkl SH8alfhe
e

mcnomgogu&ng
.
-4
nuooa

3783
3784

-SBTTL
ive

3785
3786
3787
3788

5807
3808 020336
3809 020344

020344
020346
020350
020352
020354
020356
020360
020362
020364
3810 020364
3811

3812
5813
3814 020870
3815 020374
3816
5817 020400
5818 020402
020404
3820 020406
3821

020410
3823 020412
3824
3825
3826
3827
3828

‘$0Q

GLOBAL SUBROUTINE

- GETBDR

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

0..‘.......‘........

GET

BAUDRATE

IS LOOKED UP

O..‘0....‘..‘0.0.0..

BAUDRATE

SUBROUTINE

THIS ROUTINE REQUESTS A BAUDRATE

3¢

3789
3790

3791
3792
3793
3794
379%
5796
5797
3798
3799
3800
5801
2802
5803 020326
020326
3804 020332
3805
3806

7
AGE 70

IN A

TABLE

‘.‘00..00‘00.0

INPUT FROM THE OPERATOR.

TO GIVE

THE

VALUE WHICH IS ASSOCIATED WITH THAT SAUDR
ATE ,

:O INPUTS:
i

3¢ QUTPUTS:

FIELD

BDRMSG - LABEL AT THE BAUDRATE PROMPT MESSAGE .

BRTBLE

LABEL

UBRFMT

AFTER

LABEL

TMIS

LPR BAUDRATE

END

THE

BAUDRATE

UNSUPPORTED

TABLE
.

BAUDRATE

MESSAGE
,

- BAUDRATE CODE IN LS 4 BITS.

34 CALLING SEQUENCE
:

JSR

PC.GETBDR

;s COMMENTS:
FE

3¢ SUBORDINATE ROUTINES CALLED: NONE.
$--

004567
016705

.‘......‘.‘.‘.0‘.‘..

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

GETBDR::

164772
161672

SAVE
MOV

]

;s
3

012767

002260

161664

PROMPT

THE OPERATOR:

104443
000406
002230
000052
010020

MOV
GMANID

“.‘.000..O..‘

i SAVE CONTENTS OF GPRS RO THRU RS.
RS ,PREGOS
sCALL REGISTER SAVE SUBRT,
:SAVE THE GMAINIX VALUE.

JSR
GMANWD , RS

2%:

‘.......0‘0..0...‘..

“MODEM BAUDRATE

IN BPS:

(D)

1200

10 1200 BAWD.

TRAP
BR
.WORD
LWORD
.WORD

177777

000000
113000

016702

161640

MOV
PR

ATTEMPT

012701
012703

020243
001416
005301
001574

000017
002464
4%:

TO LOOK

THE

VALUE

THE BAUDRATE

GMANWD
TS$CODE
BDRMSG
177777
TsLOLIM
TSHILIM

TABLE.

MOV
MOV

215, ,R1
OBRTBLE ,R3

s INITIALIZE BAUDRATE CODE TO MIGHEST BAUDR
ATE ,
s INITIALIZE BAUDRATE POINTER,

cHp

R2, -(R3)

iCOMPARE BAUDRATE WITH A

BEQ

DEC
BNE

020243
001412

10000$;

GMANWD ,R2

MWORD
WORD
. WORD

CSGMAN
10000

cMe

BEQ

608

R1
44

R2, -(R3)

603

sBAUDRATES COMPARE?

TABLE

ENTRY.

YES, EXIT WITM CODE.

iNO, SET BAUDRATE CODE
;DONE?
NO, LOOP,

TO NEXT LOWER BAUDRATE ,

iCHECK IF LAST BAUDRATE MATCMES,

sBAUDRATES MATCH?

YES,

EXIT WITH CODE.

:.QEPO‘" “NNNNN IS NOT A SUPPORTED BAUDRATE, ENTER ANOTHER OR CTRL C,-

010246

PRINTF QUBRFMT ,R2

MOV

RS, (5P

OMU-11 FUNC TST PARTS
GLOBAL SIBROUTINE

020416
020422
020426
020430
020432
3829 020436
3830
383! 020440

3832 020444

020444
020450

5833 020452

012746
012746
010600
104417
062706
000737
010567

010166

004736
000207

MACRO M1200
1S5-MAR-84 09:48
- GETBDR -

PAGE

70-1

“£0

007722
000002

MOV
MOV
MOV
TRAP

000006
BR

161564
0C¢0004

60%:

MOV

PASS

RTS

OUBRFMT, -(5P)
02, -(SP)
SP,RO

CSPNTF
#6,5P

:LOOP TO GET ANOTHER BAUDRATE.

RS, GMANWD

sRESTORE THE GMANIX PARAMETER VALUE.
;RESTORE GPRS, EXCEPT THE FOLLOWING:
R1,R1SLOT(SP)
iPUT R1 IN STACK SLOT.
PC,a(SP)

MOV
JSR

BAUDRATE

CODE.

iRETURN TO PREGOS SUBRT.

106

&%kl SV ool Ting
.

1ST

PARTS

MACRO M1200

e rtra

3835

S-MAR -84 09:48

.SSTTL

3837

”“

3838

38473

THIS SUBROUTINE GETS A CHARACTE
R FROM THE RX BUFFER WHICH IS
IN THE
SYSTEM MEMORY.
IF THE BUFFER IS EMPTY
UPON ENTRY OF THIS ROUT
INE
THIS ROUTINE RETURNS A NULL CHARACTER
WITH DATA.VALID CLEAR AND A
BUFFE
R EMPTY INDICATION.

;e INPUTS:

“’

i+ OUTPUTS:

3850

3851

RXBCNT - RX BUFFER CHARACTER COUNT.

RXBEND
RXBETX
RXBOPT

ggg;

;¢ CALLING SEQUENCE
:

3874 020520

3877 020526
020526
020532
3878
3879
5880 020534

BUFFER

CHARACTER

COUNT

(UPDATED).

"SUCCESS" FLAG (SET IF BUFFER IS NOT EMPTY
ON ENTRY).
JSR

PC,GETCHR

;o COMMENTS:
;e

3858

gg;z 020524

CARRY

i* SUBORDINATE ROUTINES CALLED: NONE.

5‘39

3871 020510
g:;g 020514

IN MEMORY,

- UPDATED TO POINT TO NEXT INPUT SLOT
OF RX BUFFER.

RXBCNT

:®

LABEL AT START OF RX BUFFER AREA

R2 - CHARACTER WHICH IS READ FROM THE BUFFER.

3860
3861 020454
020454
3862 020460
3863 020462
3864 020464
3865 020470
3866 020472
3867 020476
3868 020500
3869 020502
5870 020506

RXBOPT

;:gg

3856
3857

- LABEL AFTER END OF THE RX BUFF
ER AREA IN MEMORY,
- EQUATED TO RX BUFFER LEVEL AT
WHICH TO ENABLE TX.
- POINTER TO NEXT AVAILABLE INPU
T SLOT OF RX BUFFER.

RXBSTA

3849

HOST

;e
;e
;e

3347

- GETCHR

..‘.“.....‘.“..‘.....‘.‘
- GET A CHARACTER FROM THE RX BUFFER ROUT
INE .

i*
L

3844
3845
3846

01001
.‘...‘.....‘....‘....‘.‘

gzl
2

GLOBAL SUBROUTINE

1840

PAGE

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

2836

3--

004567
005000
005002
005767
001416
016704
011402
005024
020427
103402

164644

162214

003120

002720
162172

005367

162172

000261

010266
004736
000207

GETCHR::

162226

012704
010467

000.........‘t.“..“.t“..‘..‘“0..

2%:

SAVE

CLR
CLR
TST
BEQ
MOV
MOV
CLR
cMP
8LO
MOV
MOV
DEC

SEC
000006

60%:

PASS

JSR

RO
R2
RXBCNT
603
RXBOPT ,R4
(R4),R2
(R4).
R4, ORXBEND
28
ORXBSTA,R4
R4 ,RXBOPT
RXBCNT

; SAVE CONTENTS OF GPRS RO THRU RS,
RS ,PREGOS
;CALL REGISTER SAVE SUBRT,
:CLEAR THE “"RE-ENABLE” TX FLAG (SUBRTN QUTPU
T),
iGET NULL CHAR IN CASE BUFFER IS EMPTY.
+CHECK FOR RX BUFFER EMPTY, CLEAR CARRY,
+EXIT THE ROUTINE IF BUFFER IS EMPTY.
:GET THE BUFFER OUTPUT POINTER.
sGET A CHARACTER FROM THE BUFFER.
:DELETE THE READ CHARACTER FROM THE BUFF
ER.
iCHECK IF POINTER SHOULD WRAP AROUND.
: SKIP WRAPAROUND IF POINTER IS NOT AT END.

sWRAP INPUT POINTER AROUND.
;UPDATE THE OUTPUT POINTER STORAGE.

sREMOVE THIS CHAR FROM THE BUFFER COUNT.

‘

+SET SUCCESS FLAG, BUFFER WAS NOT EMPTY.
MOV
JSR

RTS

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

;RESTORE GPRS, EXCEPT
R2,R2SLOT(SP)
tPUT R2 IN STACK SLOT,
PC,8(SP).
tRETURN TO PREGOS SUBRT,
iR2 - CONTAINS THE CHARACTER READ FROM
BUFFER.
+CAR
- "SUCC
RY
ESS” FLAG, SET IF BUFFER NOT EMPTY.

;
i
i

MACRO M1200

1S-MAR-84 09:48

GETTIM

PAGE

.SBTTL
R

L8
72

SEG

GLOBAL SUBROUTINE

- GETTIM

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

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

...‘..‘.0.‘.‘...

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

- GET TIME-OUT VALUE BASED ON MINI
MUM BAUDRATE ROUTINE
THIS SUBROUTINE GETS THE NECE
SSAR

CHARS

PATTERN.

HAVE

PASSED

BEEN

RECEIVED

~THIS USES

DUT

LPR

THE

SLOWEST

CONTENTS

e INPUTS:

R1 - DUT LPR CONTENTS.

RXTOUT

OUTPUTS:

3¢ CALLING SEQUENCE:

TIME-OUT

JSR

TIME-OUT

COMPLETION

BAUDRATE

CALCULATE

VALUE

FOR

VALUE

THE

WHICH
THIS

THAT

SPECIFIED

TIME-OUT

WAITING FOR

VERIFY

TX/RX

LAST

ALL

DATA

Tae

VALUS.

CHAR.

PC.GETTIM

3¢ COMMENTS:

3¢ SUBORDINATE ROUTINES CALLED: NONE.
$--

3901 020536
020536
5902 020542
3903 020544
3904 020550
3905 020552
5906 020556
3909 020564
3910 020566
3911 020570
5912 020572
5913 020574
5914 020600
3915 020604
3916
5917 020610
020610
3918 020612

004567
000301
042701
010102
042701
006202
006202
006202

020102
101401
010201
116102
042702
010267

004736
000207

164562

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

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

GETTIM::

SAVE
SWAB

177400

BIC
MOV
BIC

000360

ASR
ASR
ASR
ASR

005214
177400
161436

2s:

60%:

CHP
BLOS
MOV
MOVB
BIC
MOV

JSR

R1
€177400,R1
R1,R2
#360,R1
R2
R2
R2
R2
R1,R2

28
R2,R1

PROTBL(R1),R2
9177400,R2
R2 ,RXTOUT

PASS
RTS

JSR

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

i SAVE CONTENTS OF GPRS RO THRU RS,
R5,PREGOS
sCALL REGISTER SAVE SUBRT.
sPUT

THE BAUD RATE FIELDS

IN THE LOW BYTE.

:CLEAR STOP,PARITY,AND CHAR FIELDS.

:COPY BAUD RATE FIELDS.
:SELECT RX BAUD RATE FIELD ONLY.

iSHIFT

TX BAUD RATE FIELD

TO OCCUPY THE LOW FOUR BYTES.

sCHECK IF SAME BAUD RATE IN EACH FIELD.

sBRANCH IF RX BAUD RATE IS LOWER OR SAME.
sTX BAUD RATE IS THE SLOWER OF THE
TWO.
:GET PROPORTIONAL DELAY FROM TABL
E,

sCLEAR UPPER BYTE BECAUSE OF SIGN EXTENSION.
+LOAD THE RX TIME-OUT VARIABLE.

sRESTORE GPRS.

PC.a(SP).

iRETURN TO PREGOS SUBRT,

102

Bek! Sholiing
F

PARTS

-MAR -84 09:

3920

.SBTTL

3921

3922
3923
3924

;e
;e
;s

M8
73

SEQ

GLOBAL SUBROUTINE

- INIDMA -

ooooocc.oooooooo..ooooo‘oooo.ooo

‘o‘ooo‘o.o.coooooo.o-.o.oooaoooo

oo.oooooaoo

- INITIATE DMA TRANSMISSIONS ROUTINE THIS ROUTINE IS USED TO INITIATE DMA MODE TRANS
IT SENDS
THE INITIAL DMA BUFFER ON EACH ACTIVE LINE TO MISSION.
CAUSE FUTURE TX

3925
ggg

L
i

3928

:‘ INPUTS:

INTERRUPTS WHICH WILL CONTINUE THE TRANSMISSION
IF MORE THAN ONE
BUFFER IS TO BE SENT.

ACTLNS - ACTIVE LINES BIT MAP.

3929
3930

i
;e

3932
3933
3934
3935
gzgg

L
;s
;e
;e
;e

B
IESTAT
NUMLNS
TXCNTB

:o OUTPUTS

CSR - DUT CSR IND.ADR.REG FIELD IS DESTROYED.

3931

DPENDB - BASE OF THE DAYA PATTERN
END TABLE (ENTRY PER LINE).
OPLEN

3938

2939

]

3940

TXPTRB - LABEL AT BASE OF THE TX DATA PATTERN
POINTERS TABLE.

€cccccccccccccccce

s+ CALLING SEQUENCE:

3945

BASE OF THE DATA PATTERN LENGTH TABLE .
PRESERVED STATES OF THE DUT INTERRUPT ENABLE
BITS.
EQUATED TO NUMBER OF LINES ON A DUT,
LABLE AT BASE OF THE TX CHARACTER COUNTER TABLE
.
ADD COMMENTS

FLAGS

;:2

€L

CCCCCC
TXCNTX - COUNTERS INCREMENTED FOR LINES ON WHICH
CHARS
SENT.
TXINTF - TX INT

;:4‘5

BITTBL - LABEL OF TABLE OF WORDS EACH WITH A BIT
SET.
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR.,

s COMMENTS:

JSR

(BIT

SET

DMA.HO FOUND

SET

ON LINE).

PC, INIDMA

THIS ROUTINE ASSUMES THAT AT LEAST ONE DATA PATTE

3946
35’2;

;e
;e

35949
3950
3951 020614

i* SUBORDINATE ROUTINES CALLED: DODMA.
3-- ooaoooooooooo.oo.o.oo.aooooooo.o‘ooo.oo.
..oc..oc.oooaoooooo.o.o.ooo‘o‘ooo‘o
INIDMA:: SAVE
i SAVE CONTENTS OF GPRS RO THRU RS,
JSR
RS,PREGOS
;CALL REGISTER SAVE SUBRT.
MOV
ACTLNS,RS
iGET THE ACTIVE LINES BIT MAP.
R4
s SET UP LOOP WHICH HANDLES ONE LINE PER ITERA
TION.

020614

g:gg 020620

004567

016705

164504

161346

g:g;
g:gg 020624

‘-

005001

CLR

010104
006304
016402
030205
001414

3 IF THE LINE IS INACTIVE SKIP TO SELECT THE NEXT LINE.
'-

2%:

3975

MOV
ASL
MOV
BIT
BEQ

002364

3967
3968
g:gg

3974

iCLEAR THE LINE NUMBER COUNTER.

3+ GET A BIT MAP OF THE SELECTED LINE.

g:zg

3971 020642
g:;g 020646

3958

3961 020626
3962 020630
5963 020632
3964 020636
g::z 020640

RN SHOULD BE
TRANSMITTED ON EACH ACTIVE LINE.
INTERRUPTS MUST BE DISABLED WHEN CALLING THIS ROUTI
NE.

R1.R4
R4
BITTBL(R4),R2
R2,RS
10¢

sCALCULATE AN OFFSET TO THE PROPER LINE
s
ENTRY IN A WORD TABLE (LINE ¢ TIMES 2).
tGET A BIT MAP FOR THIS LINE,
+TEST THE ACTIVE LINES BIT FOR THIS LINE.
sDON’T TX ON THIS LINE IF IT IS NOT ACTIVE.

i LINE IS ACTIVE,
i+ INITIATE DMA ON THIS LINE.
8
GET THE DATA PATTERN LENGTH FOR THIS LINE.
016403
016402

003202
003342

MOV
MOV
*

OPLENB(R4),R3
TXPTRB(R4 ), A2

sGET DATA PATTERN LENGTH FOR THIS LINE.
iPREPARE TO PASS DATA PATTERN ADR TO DODMA RIN,

: WRITE DMA PARAMETERS TO THE DUT.
5

B! SRRl
3976 020652
3977 020656
3978
3979
3980

004767
103403

050567
000402

MACRO M

S5-MAR-84 09:48

177034

JSR
B8CS

161400

060364

003502

6%:

3990 020672
3991 020674
3992 020700
3993
5994 020702
020702
3995 020704

s
-

005201
020127
002752

004736
000207

000020

N8
73-1

SEG

PC,DODMA
64

iSKIP ERROR IF DODMA WAS SUCCESSFUL
.

SET THE PROPER BT OF THE TX INTERRUP
T FLAGS TO INDICATE

BIS

RS,TXINTF

B8R

104

UPDATE THE

ADD

HE
4

3989

PAGE

s INDICATE THE ERROR.

THE LINE ERROR.

:SKIP UPDATING POINTERS AND COUNTERS.

TX CHARACTER COUNT FOR THIS LINE.

R3,TXCNTB(R4)

sADD THE DATA PATTERN LENGTH TO TX
CHAR COUNT,

INCREMENT LINE COUNTER,GOTO NEXT LINE IF NOT
DONE
.

10%:

INC
CcMP

BLT
60%:

R1
R1, #NUMLNS

s INCREMENT THE LINE COUNTER.
:COMPARE THE LINE COUNTER WITH NUMBER OF LINES
.
:LOOP

PC,a(SP).

PASS
s

JSR

TO SEND CHAR TO ANOTHER LINE IF NOT DONE
.

;RESTORE GPRS.
:RETURN

PREGOS

SUBRT.

104

DU 11 FUNC TST PARTS
GLOBAL S(BROU
INE
T

MACRO M1200

15-MAR-84 09:48

LINBIT

PAGE 74

SEQ

.SBTTL

GLOBAL SUBROUTINE

THIS SUBROUTINE IS USED TO GENE
RATE A BIT MAP (ONE BIT OF
BASED ON

16 SET)
A LINE NUMBER (RANGE: 1 TO 16).
ONLY THE LS & BIOF
TS
THE
WORD ARE USED,
THE OTHERS ARE MASKED OUT (SO UNMA
SKED

MSBYTES OF DUT CSRS CAN BE PASSED TO THIS
ROUTINE WITHOUT ERROR).

P
FEd

INPUTS:

3* OUTPUTS:

R1 - LINE NUMBER (ONLY LS 4 BITS
USED, OTHERS DISREGARDED).
BITTBL - BASE LABEL OF A 16 WORD BIT
TABLE.

- ."I:'". BIT CORRESPONDING TO
LINE NUMBER
LINE NUMBER IS 3, THEN BIT3 IS SET,

s* CALLING SEQUENCE
:

s COMENTS:

4016

JSR

IS SET:
ET1C.

PC.LINBIT

NO CHECKING IS PERFORMED TO VERIFY
THMAT THE LINE NUMBER IS
A LEGAL LINE NUMBER FOR THE DUT (IE
- LESS THAN NUMLNS),
NUMBER IS NOT DESTROYED OF ALTE
RED, SO TMIS

ROUTINE CAN BE USED EASILY IN LOOPS.

4017
4018
4019
4020

4 SUBORDINATE ROUTINES CALLED: NONE.

g~~~

4021 020706
020706
4022 020712
4023 020716

004567
042701

177760

4024 020720

016100

002364

020724
020730

010066
004736
000207

000002

4025 020724

4026 020732

164412

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

LINBIT::

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

SAVE
JSR
@177760,R1

BITTBL(Ri),RO
RO
MOV

JSR

.‘.....‘..00.....

1 SAVE CONTENTS OF GPRS RO THRU RS,
RS,PREGOS
iCALL REGISTER SAVE SUBRT,
sMASK OUT ALL BUT 4 LSBITS OF THE LINE o.
sMULTIPLY LINE @ BY 2 TO GET WORD TABLE OFFSE
T,
1GET THE SINGLE BIT BIT MAP,
iRESTORE GPRS, EXCEPT THE FOLLOWING,
RO,ROSLOT(SP)

PC,O(SP).
tRO

1PUT RO IN STACK SLOT,

{RETURN TO PREGOS SUBRT,

BIT MAP WITH LINE

@ BIT

SET,

105

Brad EHRolPhE"

MACRO 1208, 15mAR 84 09:48 PAGE 75

4008

.SBTTL

‘O:Q

:8;‘;’

4082

SUBROUTINE

3¢ INPUTS:
;e

4038

:g:o

CBB

4042

:. OUTPUTS :

4043
4044

;e
38

4045
4046
4047

;e
;e
e

:g:g

CHRTOT,

;¢ COMMENTS:

T
'.

4059 020740

4060 020744
4061 020750
:g:g 020754

$~-

004567

005067

005067
005067
005067

164364

010167

162136

003122

4070 020774

012721

011004

4073 021004

4074 021010

4075 021014
4076 021020

:g;; 021022

005201

A BIT

BASE

MAP

TX/RX

ALL

CURRENTLY

CONTROU

ACTIVE

BLOCK.

LINES,

DESTROYED.

RXDONF,

TXDONF

JSR

PC,MODSUP

AND

TXINTF

ARE

DUT IS SET UP WITH DSR AND DTR SET.

CLEARED.

ONE DATA PATTERN 1s

SENT AND RECEIVED FROM EACM LINE.

010221
010321

012721

016721

112721
005201

012711

000003

1CLEAR TOTAL RECEIVED CHAR COUN
TER.

sCLEAR FLAGS USED TO LOG DMA M.OVER ERRO
RS.
sCLEAR THE Tx DONE FLAGS.
sCLEAR THE RX DONE FLAGS.

1GET BASE ADDRESS OF CONTROL BLOC
K.
s INCREMENT ADDRESS FOR NEXT WORD

+INITIALISE THE FOLLOWING IN THE CNTRL.BL
K:

MOV
MOV

R2.(R1).
R3,(R1).

+ START ADDRESS OF DATA PATTERN,
s+ DATA PATTERN LENGTH,

MOV

ACTLNS,(R1).

s BIT MAP OF LINES TO INITIALISE,

MOVB
INC

000002

THE GPR'S RO THRU RS.

sCALL REGISTER SAVE SUBRT,

MOV

161156

TXINTF
TXDONF
RXDONF

$SAVE CONTENTS OF

RS ,PREGOS

INC

MOV

000001

CHRTOT

JSR

SET UP THE TRANSMISSION/RECEPTION CONT
ROL BLOCK TO THE DESIRED STATE,
MOV
R1,C88
$SET CONTENTS OF LPR PARAMS IN TX/RX C.BLK
.
MOV
oCBB,R1
INC

4079

MOV

011004,(R1).

21,(R1).

@3,.(R1).
R1

02,(R1)

LNCTRL:

NUMBER OF DATA PATTERNS

RTS,

DTR,

ENABLE RECEIVERS.

TO TRANSMIT,

1SET LOOPBACK MODE TO M32S,
s INCREMENT ADDRESS FOR THE NEXT WORD
.

$SET AMOUNT OF OFFSET EACH TXx STARTS AT

10 2,

: INITIALISE THE DUT AND THE ASSOCIATED POINTERS
AND COUNTERS, TO THE STATE
+ DICTATED By THE

:%g

4082 021026

0“.0...0“000......0..‘0....0.0.0‘000

CLR
CLR
CLR

3
012701
005201

4071 021000
4072 021002

TX/RX,

0‘.......0‘..00000‘.0.‘.0.00‘0.‘..“‘

CLR

161314
161526
161524

4067 020764
4068 020770

4069 020772

CONTAINS

MODSUP:: SAVE

161532

:gg;
4066 020760

PATTERN

3¢ SUBORDINATE ROUTINES CALLED: CONMAP,RXENBL,T.
" INI.

40;;?
40
4058 020734

020734

DATA

THE CONTENTS OF THE TX/RX CONTROL BLOCK (CCB) ARE
DESTROYED.

:. CALLING SEQUENCE:

405%

TEST

THE INDIRECT ADDRESS FIELD OF THE
DUT CSR MAY BE
THE DUT'S LPR'S AND LNC'S MAY BE MODI
FIED.

4052

LOOPBACK

TH OF DATA PATTERN.

LABEL

:ggz

THE FOLLOWING POINTERS AND COUNTERS
INITIALISED;
CHONT ,CHRTOT , DPEND , DPLEN, EXCNT ,RXCNT ARE
,RXP
TR, TXCNT .
TXPTR, TXRXL .

:gg?

...00000.000000.0.000000

SET-UP ROUTINE

R1 - TX, RX LPR CONTENTS.
R2 - START ADDRESS OF DATA PATTERN TO TRAN
SMIT.
R3 - LENG
ACTLNS

TX/RX

THIS ROUTINE IS USED TO INITIALI

4039

SE BOTH THE DUT AND THE
TRANSMISSION/RECEPTION CONTROL PARA
METERS TO THE CORRECT
STATE, PRIOR TO A MODE

4036
4037

MODSUP

.0.‘.0.00....‘.00‘000‘.“

- MODEM LOOPBACK

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

48;:

4083

GLOBAL

0 106

4038
‘

004767

004652

CONTENTS OF TME TX/RX CONTROL BLOCK.

’

JSR

PC,TXRINI

s INITIALISE DUT,

BreAl CHiMRol7InE A"

4085

4086 021082

4087 021036

4088 021042

4089 021044

s
g

012701
016702
005101

4094 021064

005102
040102
010267
005067
005067
004767

409 021070
021070

004736

4090 021046
4091 021050

4092 021054

4095 021060

4097 021072

MACRO mmm 84 09:48

000207

177777

D9
PAGE

75-1

INITIALISE PCINTERS AND COUNTERS
FOR INACTIVE LINES
MOV

SMAPLNS R

iGET

THE LINE BIT

TO ZERO.

MAP FOR ALL

161130

MOV
comM
comM

ACTLNS,R2
R1
R2

iGET THE ACTIVE LINE BIT MAP.
H
3

162060
162044
162046
004614

MOV
CLR
CLR
JSR

R2,CBMAPA
CBLNCA
CBDPNA
PC, TXRINI

:MOVE BIT MAP TO THE CONTROL BLOCK ,
sCLEAR THE LNCTRL SET uP PARAME TERS .
:CLEAR THE REPEAT TX COUNT IN CNTRL BLCK,
:SET UP PARAMETERS FOR INACTIVE LINES,

PC,a(SP).

BIC

608 :;

R1,.R2

PASS
s

JSR

LINES,

1GENERATE AN IN-ACTIVE LINE BIT MAP

;RESTORE GPR'S,
iRETURN

TO PREGOS

SUBRT.

197

i, T
11

T 9 e
!

_MAR

4099

4103

4104
4105
4106
4107

VERIFY

THAT

GENERAL

CERTAIN

PURPOSE

ACTION

TEST

OCCURS

LOOP

BEFORE

SUBROUTINE.

TIME-OUT

.000‘0

USED

THE
CALLING ROUTINE PASSES IN WHICH BITS SHOULD
BE SET AND CLEARED FOR THE
DESIRED CONDITION AND THE TIME-OUT
THIS ROUTINE CHECKS FOR THE DESIRED VALUE IN MILLI-SECONDS.
CONDITION UPON ENTRANCE INTO THE
ROUTINE AND THEN ONCE
PERIOD.

EACH MILLI-SECOND THERE AFTER

R2 - BIT MAP OF BITS TO TEST (1 INDICATES
TO TEST THE BIT).
-

4117

:gg

DESIRED STATES OF THE INDICATED FIEL
DS IN R2.
ADDRESS OF

MSLONT

THE LAST WORD WHICH WAS READ

s CALLING SEQUENCE:

s COMMENTS:

4124

4125
4126
4127
4128
4129
4130

THE CONDITION.

JSR

PC.,MSLGET

THIS ROUTINE WORKS WITH OR WITHOUT A
MARDWARE CLOCK, BUT THE

CALIBRATION IS ONLY GUARENTEED
WHEN A L INE CLOCK

4133

TIME,

IS AVAILABLE
ON THE SYSTEM.
THIS ROUTINE CAN BE USED AS A DELAY
ROUTINE, BY SPECIFYING THE
DESIRED DELAY AS THE TIME-OUT AND SPECI
FYING A CONDITION TO
LOOK FOR WHICH WILL NOT BE MET DURING
THE DELAY,
IF A TIME-OUT VALUE OF O IS SPECIFIE
D, THIS ROUTINE CMECKS FOR
THE DESIRED COND

ie
ie
;e
T
3o

:%gé

TO CHECK FOR

- REMAINING NUMBER OF MS IN TIME-OUT

4123

THE WORD TO TEST.

- MILLI SECOND SOF TWARE LOOP COUNT.

CARRY - SUCCESS FLAG (SET IF CONDITION IS
MET BEFORE TIME-OQUT).

:{gé

;e
;e

i OUTPUTS:

4118

ITION BEFORE RETURNING.

THE CONDITION

IS MET,

FAILURE

IT INDICATES SUCCESS

OTHERWISE ,

4134

i* SUBORDINATE ROUTINES CALLED: NONE.

:lgg

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

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

004567

164224

MSLGET::

SAVE
JSR

4139

:{-:g

coM
BIC
'0

‘v

005701

IST

001011

BNE

011400

001420

1CALL REGISTER SAVE

SUBRT,

SET UP MASK FOR REMOVING UNUSED BITS
IN THE TEST WORD,

s HANDLE THE

040200
020002
000261

i SAVE CONTENTS OF GPRS RO THRU RS.

RS ,PREGOS

‘.

005102
040203

010067

.....‘.“

AND CLEAR UNUSED
+ BITS IN THE DESIRED STATE WORD TO ALLOW DIRECT
COMPARISON.

:{:2

4154 021124

:112
11

4151 021116
4152 021120
4153 021122

4114

4150 021112

THIS

,
;e
UPON RETURN, THE LAST WORD WHICH WAS
READ TO CHECK FOR THE CONDITION
;e
IS RETURNED BY THIS SUBROUTINE.
;e
;e INPUTS:
Rl - TIME-OUT VALUE IN MILLI-SECONDS
(UP TO 64K MS),

4113

4149 021110

...‘.....‘.‘...‘..‘.‘...

- MILLI SECONDS LOOP WHICH RETURNS
READ WORD AND REMAINING TIME
SUBROUTINE IS

4112

4148 021106

- MSLGET

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

;e
;e
;e

4108
4103
411
4111

4147 021104

£G 108

GLOSAL SUBROUTINE

4102

4142 021100
:%:2 021102

3......O.‘....‘....‘.‘..

4101

138 021074

.SBTTL

‘xw

1
4137 021074

MACRO M1200_ AP;MAR-84 09:48 PAGE 76
M12

000070

MOV

BIC
cMP
SEC
BEQ

R2
R2,R3
TEST AND EXIT
R1

(R4),RO

RO,628

R2,R0O
RO,R3
63

sGET MASK OF UNUSED BITS.
1MASK OUT UNUSED BITS IN DESIRED STAT
E WORD ,
IF WE MAVE A O TIME -OUT VALUE,
sTEST

THE

TIME-OUT

VALUE FOR ZERO.

s IF NON-ZERO TIME-OUT, GO LOOP AND TEST,

sGET

THE

WORD

TEST BEFORE EXITING.

sSAVE VALUE SO WE CAN RETURN IT.

sMASK OUT UNTESTED BITS OF WORD.
sCOMPARE AGAINST DESIRED STATE WORD,
s INDICATE SUCCESS IN CASE WORDS ARE EQUAL
sEXIT WITH SUCCESS

IF WORDS ARE EQUAL
,

%u ;Lamlfibzflfll‘
4155 021126

:{gg 021130

MACRO mgoom&im_\n-u 09:48

000241

CLC

000416

BR
HEd

:{g

s INDICATE FAILURE (TIME-QUT).

$EXIT WITH FAILURE,

+ NON-ZERO TIME-OUT VA_UE.

4160 021132
4161 021136
4162 021140
4163 021144
4164 021146
4165 021150
4166 021152

4167 021154

4168 021156

4169 021160

4170 021162

:{;“1’ 021164

016705
011400
010067
040200

161154

2%:
43:

MSLCNT RS
(R4).RO
RO,623
R2,RO
RO,R3

001405
005305
001367

MOV
MOV
MOV
B8iC
cpP
SEC
BEQ
BNE

001363

BNE

000042

020003
000261

DEC

005301

DEC

000241

cLC

LOOP,

68
RS

4173

4176 021166
4177 021172

021172
021176
021202

:{gg 021204

INSIDE MS LOOP COUNT.

:LOOP IF MS NOT UP,

;DECREMENT THE MS TIME COUNT.

+IF

TIME NOT UP,

:CLEAR CARRY,

MAVE EITHER FOUND CONDITION,

OR TIMED-OUT

LOOP

000014

010066
010166
004736

000002
000004

68:
608 :

000207

MOV
PASS

RTS
i

62% ,RO
RO,R1

+ LOCAL STORAGE.

4183

MO
MC
JSR

TO COUNT

WE TIMED-OUT,

(POSSIBLY FROM O

4182

4184 021206

iLOAD MS LOOP COUNT.
iGET THE WORD TO TEST.
:SAVE WORD IN CASE THIS IS THE LAST.
sMASK QUT UNTESTED BITS OF WOKD.
:COMPARE AGAINST DESIRED STATE WORD.
+SET CARRY IN CASE OF SUCCESS.
sEXIT WITH SUCCESS IF WORDS ARE EQUA
L
.

s RESTORE THE LAST CONTENTS READ FROM THE
TEST WORD.

016700

WORCS AREN'T EQUAL
.

WAITING FOR CONDITION OR TIME-QUT,

sCOUNT DOWN THE

HEd

:i;;

4178
4179

PAGE 7s6-1

ANOTHER MS.

TIME-OUT VALUE).

EXIT ROUTINE,

sPASS OUT THE LAST READ WORD.
sRESTORE GPRS, EXCEPT THE FOLLOWIN
G:

RO,ROSLOT(SP)
R1,R1SLOT(SP)
PC,8(SP).
3RO
iR1

iPUT RO IN STACK SLOT,
iPUT R1 IN STACK SLOT.
iRETURN TO PREGOS SUBRT,

- LAST READ WORD CHECKED FOR COND
ITION.
- REMAINING TIME (O IF TIME-OUT
OCCURED).

sCARRY

- SET IF SUCCESS,

CLEAR IF TIME-OUT.

000000

628:

.WORD

iSTORAGE FOR THE LAST READ WORD.

Sl¥eAl SteRolTineTM
11

MACRO

4186

*Ohs 8geTM 4 84 09:48 Pace

M1200

-MAR -

-SBTTL

‘1‘7

€0

ROUTINE AND THEN ONCE EACH MILLI-SECOND
THEREAF TER,

s+ INPUTS:
;e

4198
4199

;e
;e

:Sgg

;s OUTPUTS:

:gg‘s

Rl - TIME-OUT VALUE IN MILLI-SECONDS (UP
TO 64K MS),
- BIT MAP OF BITS TO TEST (1 INDI
CATES TO TEST THE BIT).
R3 - DESIRED STATES OF THE INDICATE
D FIELDS IN R2,
R4 - ADDR
R2

MSLCNT

]

:sgg

CARRY

3¢ CALLING SEQUENCE:

4206

s* COMMENTS:

4207

4208

4210
4211

;e
;e

4209

SECOND

SOFTWARE

LOOP

COUNT.

- SUCCESS FLAG (SET IF CONDITION IS MET
BEFORE TIME-QUT).
JSR

PC,MSLOOP

THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE
CLOCK, BUT THE

CALIBRATION IS ONLY GUARENTEED WHEN
A LINE CLOCK
THIS ROUTINE CAN BE USED AS A DELA
Y ROUTINE,

IS AVAILABLE

SPEC

IF A TIME-OUT VALUE OF O IS SPECIFIE
D, THIS ROUTINE CHECKS FOR
THE DESIRED CONDITION BEFORE RETURNIN
G.
IT INDICATES SUCCESS
IF

THE

4216

MILLI

IFYING THE
DESIRED DELAY AS THE TIME-OUT AND SPECI
FYING A CONDITION TO
LOOK FOR WHICH WILL NOT BE MET DURING
THE DELAY,

;e
;e

:gi;

ESS OF THE WORD TO TEST.

ON THE SYSTEM,

4212
4213

..‘.‘.t.....

CALLING ROUTINE PASSES IN WHICH BITS
SHOULD BE SET AND CLEARED FOR THE
DESIRED CONDITION AND THE TIME-OUT
VALUE IN MILLI-SECONDS.
THIS ROUTINE CHECKS FOR THE DESI
RED CONDITION UPON ENTRANCE INTO
THE

4196

‘0‘0.‘....0“‘0.
- TEST LOOP SUBROUTINE THIS SUBROUTINE IS A GENERAL PURPJSE TEST
LOOP SUBROUTINE.
IV IS USED
TO VERIFY THAT A CERTAIN ACTION OCCURS
BEFORE A TIME-OUT PERIOD.
THE

4197

MSLOOP

;

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

se
;e
;s

:{:‘5

CONDITION

MET,

FAILURE

OTHERWISE

14 SUBORDINATE ROUTINES CALLED: MSLGET.

:g{z

'“.‘.“.0‘..0.‘.0...0.00...0.

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

004567

164110

4221
4222
:gg:

004767

4227 021220

021220
4228 021222

GLOBAL SUBROUTINE

;e
;e
;e

4191
4192
4193

:ggz 021214

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

4188
4189
4190

4219 021210
0 021210

:48

004736
000207

MSLOOP::

SAVE

JSR

‘0“.00“‘0

s SAVE CONTENTS OF GPRS RO THRU RS,
R5,PREGOS
sCALL REGISTER SAVE SUBRT,

i
s CALLING THE MSLGET ROUTINE FROM THE
MSLOOP ROUTINE ISOLATES THE CALLER OF
i MSLOOP FROM THE RETURNED TEST WORD
AND REMAINING TIME-OUT VALUES.

177654

JSR
604

PC,MSLGET

PASS

RTS

JSR

$CALL THE MULTI-PURPOSE MS LOOP AND SEARCH
RTN,
sRESTORE GPRS,

PC,8(SP).
iRETURN TO PREGOS SUBRT,
sCARRY - SET IF SUCCESS, CLEAR IF TIME.
OQUT,

11¢

BBl SHEholTIne
TM
¢

PARTS

RO m20g. i3,
M

4230
4231
4232
4233
4234
4235
4236
4237

-MAR -84 09:48

-SBTTL

HEEd

PAGE

GLOBAL SUBRGUTINE

IHIS

SIGNALS FOR ALL ACTIVE LINES.

SUBROUTINE

USED

TO REPORT

THE

STATES

THE

MODEM

EF9101

LABEL

FORMAT

IESTAT

CONTAINS

STATEMENT

STATES

THE

DUT

ADDRESS

INTERRUPT

THE

DUT

STAT

STATA

CONTAINS

NUMLNS

ie OUTPUTS:

STATUS

ACTLNS - BIT MAP OF ACTIVE LINES.

CSRA

ADDRESS

CONTAINS
-

EQUATED

THE

NUMBER

DUT

CSR.
FOR

BLANK

LINES

LINE.
ENABLE

3¢ CALLING SEQUENCE:

;‘

MESSAGES

JSR

ARE

PRINTED

THE

BITS.

THE

DUT CSR IND.ADR.REG FIELD - CONTENTS DESTROYED.

REPORT

4247
4248

4246

MSSRPT

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

4244
4245

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

ie INPUTS:

4243

“EQ

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

4238
4279
4240
4241
4242

OPERATOR'
S

DEVICE.

CONSOLE
.

PC.MSSRPT

;¢ COMMENTS:

4249

i+ SUBORDINATE ROUTINES CALLED: NONE .

4250

4251

$~-

4252

4253 021224

021224

4254
4255
4256
4257
4258 021230

004567

4261 021252
4262 021256
4263 021262

4266 021272

4268
4269 021276
4270 021300

4271 021302

4272 021304

427% 021310
021310
4274 021314

4275 021316
4276 021320

4277 021322

4278 021324
4279 021%26

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

SAVE
JSR

‘.““."..

iSAVE CONTENTS OF GPRS RO THMRU RS.

R5,PREGOS

;CALL. REGISTER SAVE SUBRT,

3 PRINT THE BASIC MODEM STATUS MESSAGE.

005001
012702
016703
016704

4267 021274

MSSRPT::

;

012746
012746
010600
104417
062706

:g:; 021266

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

‘.

021230
021234
021240
021242
021244

4259
4260 021250

164074

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

016705

CLR

000001
160716
160746
160700

MOV
MOV
MOV
MOV
28:

017700

160676

004567
005002

164010

00500%

MOV
MOV
MOV

TRAP

010400
050100

006300
006102

oMSFMT1

ADD

030205

005003
005004

PRINTF

007566
000001

001442

010013

“MODEM STATUS SIGNAL REPORT;
"

R1
#1,R2

sSTART WITH LINE O.

IESTAT
R4

iGET

CSRA,R3

sGET THE CSR ADDRESS.
THE STATES OF

THE

OMSFMTL, -(SP)
e, -(SP)
SP,RO

CSPNTF

04 ,5P

INTERRUPT ENABLE BITS,

ACTLNS,RS

sGET THE ACTIVE LINES BIT MAP,

BIT
BEQ

R2,.RS

s TEST LINE BIT IN ACTIVE L.INES BIT MAP,
sLINE ACTIVE? NO, SKIP REPORT FOR LINE,

MOV
BIS

R4 ,RO
R1,RC

$SET UP DUT CSR IND.ADR.REG FIELD
s
LEAVING THE INTERRUPT ENABLE
s
BITS IN THE SPECIFIED STATE,
sREAD THE DUT STATUS REG FOR THIS L INE,
s SAVE CONTENTS OF GPRS RO THRU RS,
R5,PREGOS
sCALL REGISTER SAVE SUBRT,
+CLEAR THE SIGNAL STATUS INDICATORS,

MOV

SAVE
CLR

CLR
CLR
CLR

ASL

RO,(R3)
@F SLSA,RO

JSR

sSHIFT DSR INTO CARRY,

THEN ROTATE

INTO

INDICATOR,

111

SRl

Jo g

MACRO TMM1200 Jg MAR B84 09:48

PAGE

ASL
ASL

RO
RO

42680 021330

4281 021332
4282 021354

ROL

4283 021336

021346
021550
021352
021354
021356
021360
021364
021370
0213872
021574
4292 021400
021400

4293

4294
4295
4296
4297
4298
4299

021402
021404
021406
021412

010546
010446
010346
010246
010146
012746
012746
010600
104417

062706

021426
021430

012746
012746
010600
104417
062706

021434
4302 021436

004736
000207

4300
4301 021434

INOICATOR.

THEN ROTATE

INTO

INDICATOR.

INTO

INDICATOR.

:SHIFT CTS

INTO CARRY,

THIS LINE.

DSR=N, RI=N,

INTO

INTO CARRY,

DCD=N,

THEN ROTATE

CTS=N"

aMSFMT2,R1,R2,R3,R
RS
4

MOV
MOV
007626

R3, -(SP)

MOV

R1,-(SP)

MOV
MOV
MOV

TRAP

000016
PASS

JSR
4%
;

ASL

000020

BLT
PRINTF

007306
000001

;RESTORE ALL

PC,a(SP).

THE GPRS.

ADD

OMSFMT2, (5P
%, -(5P)
SP,RO

CSPNTF

016,5pP

R1, O9NUMLNS

sSHIFT LINE BIT MAP TO NEXT LINE.
s INCREMENT THE LINE COUNTER.
;CMP LINE COUNTER WITH @ OF LINES ON DEVICE.
sALL LINES DONE?
NO, LOOP TO DO NEXT LINE.

9EF9101

sPRINT

PASS

RIS

Re, -(SP)

sRETURN TO PREGOS SUBRT.,

A BLANK

LINE.

MOV
MOV
MOV

TRAP
ADD

608

RS, -(SP)
R4, -(5P)

MOV

004736
006302
005201
020127
002727

STATUS FOR

oN:

PRINTF

021414

021414
021420
021424

THE

“LINE

THEN ROTATE

:SHIFT DCD

RO
R5

ROL

4289

4290
4291 021346

274

ASL

4288

ROL

4287

sSHIFT BLANK SLOT INTO CARRY,
i
SHMIFT RI INTO CARRY,

ASL

4284 021340
4285 021342
4286 021344

78-1

JSR

;RESTORE GPRS,
PC,a(SP).

sRETURN

0EF9101, (5P
01,-(SP)
SP,RO

CSPNTF
04,5pP

TO PREGOS

SIBRT,

DHU-1L FUNC TST PARTS
GLOBAL st BROUT INE

MACRO M1200
-

15 MAR-84 09:48

MULI6U
-

.SBTTL
s

PAGE

GLOBAL SUBROUT INE

ooooooooooo..ooooooo

MUL16VU

.oo..o.oooo.oo‘.o..o

ooooooo‘oo.ooooo.ooa

o..oooo.ooooooo

16 BIT UNSIGMNED MULTIPLY ROUT

INE THIS ROUTINE MUALTIPLIES 2 16 BIT
UNSIGNED NUMBERS AND RETURNS
A
UNSIGNED RESULT.
THE MULTIPLICATION IS PERFORME
D BY ITERATIVE

16 BIT

ADDITION OF ONE NUMBER TO A SUM WHILE
DECREMENTING THE OTHER NUMBER
TO ZERO.
IF OVERFLOW OCCURRS (177777 TO 0)
THE PRODUCT IS INVALTD.

:®

i
:®

;e INPUTS:
FE
e

s OUTPUTS:
;e
L

- MULTIPLIER (16 BIT UNSIGNED).

MULTIPLICAND (16 BIT UNSIGNED
).

PRODUCT

CARRY

s CALLING SEQUENCE
:

;o COMMENTS:
HE

NOTE:

(16 BIT UNSIGNED),

-1

SET IF SUCCESS (NO OVERFLOW),

JSR

OVERFLOW.

CLEAR OTHERWISE .

PC.MUL16V

FOR MINIMUM EXECUTION TIME R2 SHOULD
CONTAIN THE
SMALLER OF THE 2 ARGUMENTS.

;¢ SUBORDINATE ROUTINES CALLED: NONE.
‘.‘....“....‘..“....

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

021440
021440
021444
021446
021450
021452
021454
021456
021460
021462
021464
021466
021470
021472
4340 021474
4341
4342 021476
43453 021502

4344

4345 021504

021504
021510

4346
4347 021512

004567
005003
005702
001003
005001
000261
000412

163660

SAVE

CLR
TST

28:

603

ADD
BCS
DEC
BNE
MOV

R1.R3

28
R3,R1

608

SEC

012701
000241

177777

010166
004736

000004

R3
R2

BNE
CLR
SEC

060103
103405
005302
001574
010301
000261
000403

000207

MUL16U::

508

MOV
CLC
PASS

RTS

JSR

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

:SAVE CONTENTS OF GPRS RO THRU RS,

RS,PREGOS
iCALL REGISTER SAVE SUBRT,
;CLEAR THE PRODUCT,
;CHECK THE MULTIPLIER.
:GO_TO DO MULTIPLICATION IF NOT ZERO.
;RETURN A
T OF ZERO.

s INDICATE SUCCESS.
tEXIT THE ROUTINE.

sADD THE MULTIPLICAND TO THE PRODUCT.
$EXIT WITH OVERFLOW IF ONE OCCURRED.
sDECREMENT THE MULTIPLIER,
sLOOP IF MULTIPLIER NOT ZERO.
sPREPARE TO PASS OUT THE PRODUCT,
+ INDICATE SUCCESS.
sEXIT WITH SUCCESS.
tFORCE PRODUCT

TO MAX

s INDICATE FAILURE,
R1

““0‘

VALUE,

OVERLFOWED.,

sRESTORE GPRS, EXCEPT THE FOLLOWING:
R1,R1SLOT(SP)
sPUT R1 IN STACK SLOT,
3

CARRY

PRODUCT

(16 BIT

tRETURN TO PREGOS SUBRT,

UNSIGNED),

SET IF SUCCESS (NO OVERFLOW).

ST PARTS
B8l SVBRoT
Ing
-

NEWRS-MA
R R-84 09:48

MACRO M1200

4349

.SBTTL

‘350

435]
4352
4353

;e
;e
;e

4354

;e
;¢

4358
4359

;e
;e

4360
4361
4362
4363
4364
4365
4366
4367

4373
4374
4375
4376

:;;;

THE CHARACTER IS CHECKED FOR ERPORS AND

THE READ CHARACTER

INCLUDING ERROR FLAGS AND

LINE NUMBER ,
R3 - MASK OF THE INACTIVES BITS IN A TX
OR RX CHAR BYTE
.
ACTLNS
- BIT MAP OF ACTIVE DUT LINES.

i
e

ERRTYP.

- DATA PATTERN RESYNC QUE OF RECEIVED
CHARACTERS.

ERCNT - COUNT OF
ERSMRF - UPDATED
EXCNT - COUNT OF
RXCNT - COUNT OF

RXPTR

;& COMMENTS:
;e

ERMSG,

ERRBLK - CONTENTS DESTROYED.
FOLLOWING VARIABLES UPDATED FOR LINE
ON WHICH CHAR WAS RECEIVED:
DPRSQ

3¢ CALLING SEQUENCE
:

THE NUMBER OF CHARACTER ERRORS ON LINE.
"PRINT ERROR SUMMARY FOR LINE" FLAG
S.
THE NUMBER OF EXTRA CHARS RECEIVED
ON LINE,
THE NUMBER OF CHARACTERS RECEIVED ON
LINE.

UPDATED

TO POINT

JSR

PC,NEWCHR

THE NEXT EXPECTED CHAR ON LINE,

THIS ROUTINE CAN REPORT ERRORS WITH NUMBE
RS INITIAL ERRNBR
AND INITIAL ERRNBR + 1.
ERRNBR IS RESTORED TO ITS INITIAL

VALUE BEFORE THIS ROUTINE RETURNS.

3# SUBROUTIN.S CALLED:
CKCHR,CK
TXROF
IN
F,AC
TXRON
,
.
;4 INDIRECT SUBROUTINES:
CHKEXT,CHKLOS,ER9002,ER9003,UPDCHR.
$ -~ ‘..‘0.000.0.00.“0.‘0-“‘.““‘.
“‘.‘0“..‘..00‘.‘0“‘0““.““0.‘0“00
“‘

004567
010305

052705

005067

163604

NEWCHR::

SAVE
MOV
8IS

177400

000270

CLR

JSR

R3,.RS
9177400,RS

708

4394

s SAVE CONTENTS OF GPRS RO THRU RS,
RS,PREGOS
;CALL REGISTER SAVE SUBRT.
;GET THE BIT MAP OF INACTIVE DATA BYTE
BITS.

sALL UPPER BITS OF EXPECTED DATA ARE
INACTIVE.

sCLEAR THE “ERROR FOUND” FLAG.

s IF THE NEW CHARACTER IS VALID ON AN INACTIVE

:ggg

LINE, GO REPORT ERROR,
s ROUTINE USED ALSO EXTRACTS LINE NUMBER FROM THE
NEW CHARACTER,
53

004767

103052

175412

JSR

BCC
‘

::8?

4404 021544

INPUTS:

:gfi

4402 021540
4403 021542

ARE UPDATED.

4381
4382

:gg 021536

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

ANY ERRORS WHICH ARE FOUND ARE REPO
RTED.

:gzg

4397 021532

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

- NEW CHARACTER HANDLING ROUTINE THIS SUBROUTINE HANDLES A NEW CHARACTE
R WHICH MAS BEEN READ FROM
THE DUT.
THE COUNTERS AND POINTERS WHICH ARE
INVOLVED WITH THE
CHARACTER

:*
;4 OUTPUTS:
P
:s
;e
s
;e
e

4372

:ggg 021526

- NEMWCHR -

. 0 114

3o
OPRSGB - LABEL AT DATA PATTERN RESYNC QUEU
ES TABLE BASE.
;e
TXRXLB - BASE OF TX/RX LINE NUMBER ASSOCIAT
;e
BITIBL - TABLE OF WORDS WITH BITS SET FOR ION TABLE.
USE IN FORMING MAPS .
;e
- ERSMRF - “PRINT ERROR SUMMARY FOR LINE" FLAG
;e
ERRTBL - ERROR INFORMATION (ERRNBR, ERRMSG, S.
ERRTYP).
e
ERCNTB - BASE OF THE RX CHARACTER ERROR COUNTERS
E.
;e
NDERPT - CONTAINS NUMBER OF CHAR ERRORS TO REPORT TABL
ON
A
LINE.
i+ INPUTS TO SUBROUTINES:
CHCNTB, DPENDB, DPLEN, DPRSQE, EXCNTB, RXCNTB,
;e
RXPTRB, ERRNB

433:5
4369
4370
4371

4385
4386
:337
8
4389 021514
021514
4390 021520
4391 021522

GLOBAL SUBROUTINE

4
4357

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

4;;,2

PAGE

PC,CKINAC

sCHECK FOR CHAR ON INACTIVE LINE.

iG0 REPORT ERROR IF ON INACTIVE LINE.

3 PUSH THE NEW CHARACTER ON THE RESYNC QUE FOR THIS
LINE.

010304
006304

006304

MOV
ASL
ASL

R3,R4
R4
R4

sCALCULATE BASE ADDRESS OF THE
;s
DATA PATTERN RESYNCH QUEUE
3+

C(QUEUE

IS 4 WORDS LONG) FOR

BlbeAl StolTine
"
4405 021546

4406 021552
4407 021554
4408 021560
4409 021564
4410
4411
4412
4413
4414 021566
4415 021570
4416
4417
4418
4419 021572
4420 021576
4421
4422
4423
4424

4425
4426
4427
4428
4429
4430
4431

021600
021604
021610
021616
021620
021626
021632

021632

4432 021634
4433 021642
4434 021650
4435
4436 021652
4437
4438
4439
4440 021656

4441 021662
4442

4443
4444
4445 021664
4446 021670
4447 021674

4448 021702

4449
4450
4451
4452

021704
021712

021716
oe1722
021722
4453 021724
4454 021732

4455 021740
4456
4457 021742
4458 021746
4459

062704
010401
016121
016121
010211

M1200

15-MAR-84 09:48

004642

ADD
MOV
MOV
MOV
MOV

000002
000002

PAGE 80-1

L9
SEQ

ODPRSQB
R4

R4 .R1
2(R1),(R1).

2(R1),.(R1).

R2,(R1)

iPUT NEW CHAR INTO CHR2 SLOT.

s CHECK THE DATA.VALID FOR THE CHARACTER
AT THE BOTTON OF THE QUEUE.
;s IF DATA.VALID IS CLEAR, EXIT THE ROUT
- -NOTH
INING
E TO ANALYZE.

011402
100112

MOV
BPL
HEd

s
032702
001427

THIS LINE.

:GET THE BASE OF THE QUEUE.
:MOVE FROM CHR1 SLOT TO CHRO SLOT.
:MOVE FROM CHR2 SLOT TO CHR1 SLOT,

(R4).R2
60%

iGET CHRO VALUE,

{EXIT ROUTINE

SET FLAGS.

IF DATA.VALID

IS CLEAR.

TEST FOR ANY OF THE ERROR BITS SET IN CHRO.

070000

BIT

BEQ
HEd

#70000,R2

s TEST FOR ANY CHRO ERROR BITS SET.
$SKIP THIS ERROR IF NO ERROR BITS SET.

s WE HAVE AT LEAST ONE ERROR FLAG SET ON THE
RECEIVED CHAR.
+ REPORT DATA ERROR FLAG ERROR IF NOT IN SUMMA
RY MODE
.
005367
016300
036067
001017
012767
004767

000216
005234
002364

014676
004326

DEC

MOV

160662

BIT
BNE

163474

MOV
JSR

ERROR

104460
012767
032767
001462

000001
000100

004767

004342

160362
160312

MOV

BIT

70%

1SET THE "ERROR FOUND" FLAG.
sGET THE TX LINE OFFSET FOR THIS RX LINE.

TXRXLB(R3),R0O

g{TTBL(RO).ERSMF

#ER9003 ,ERRBLK
PC, TXROFF

sCHECK

:TURN OFF
3

#1,FERROR

THE ERROR SUMMARY FLAG FOR

TX LINE.

: IF ERROR SUMMARY FLAG SET, SKIP NEXT REPORT,
:SELECT THE ER9003 ERROR REPORT ROUTINE ,
TX AND RX DURING ERROR REPORTING.
»>>>>

ERROR

c¢cccc,

TRAP

: INDICATE AN ERROR HAS BEEN FOUND.

CSERROR

BEQ

60$

oBIT06,0PTION

+HAS EXTENDED ERROR REPORTING BEEN
REQUESTED ?

JSR

PC, TXRON

sTURN TX AND RX BACK ON.

3¢

sEXIT IF IT HASN'T,

s CHECK THE CHARACTER AT THE BOTTOM OF THE RESYN
C QUE FOR DATA ERRORS.

004767
103433

174636

2%:
L

104460
012767
032767
001426
004767

005367

000132
0052
002364
014520
163400
004236
000001

000100

PC,CKCHR

iCHECK THE CHRO CHAR FOR ERRORS.
$SKIP ERROR REPORT IF CHRO IS CORRECT.

:IEHAVESGESNTWDRTAERROR SO REPORT IT (UNLESS IN SUMMARY REPORT

005367
016300
036067
001023
012767
005267
004767

JSR

B8CS

160576

DEC

MOV

BIT
BNE

163410

MOV
INC

JSR
ERROR

MOV

160272
160222

004252
163344
HE

MODE).

708

:SET THE “ERROR FOUND” FLAG.
$GET THE TX LINE OFFSET FOR THIS RX LINE.
BITTBL(RO),ERSMRF
;CHECK THE ERROR SUMMARY FLAG FOR THIS LINE.
6$
+ SKIP ERROR REPORT IF ERROR SUMMARY FLAG SET.
#ER9002 ,ERRBLK
$SELECT THE ER9002 ERROR REPORT ROUTINE.
ERRNBR
sSELECT INITIAL ERRNBR + 1.

TXRXLB(R3),R0O

PC, TXROFF

sTURN OFF
:

#1,FERROR

BIT
BEQ

OBITO06,0PTION
60$

JSR
DEC

PC, TXRON
ERRNBR

TX AND RX DURING ERROR REPORTING.
»»>>>

ERROR

<«ccec,

TRAP
CSERROR
s INDICATE AN ERROR HAS BEEN FOUND.
1HAS EXTENDED ERROR REPORTING BEEN REQUESTED ?

sEXIT IF IT MASN'T,

:TURN TX AND RX BACK ON,
+RESTORE INITIAL ERRNBR.

115

DMU-11 FUNC TST PART4
GLOBAL SUBROUTINE

MACRO M1200
15-MAR-84 09:48
- NEWCHR -

4460
4461
8462
4463 021752
4464 021756
4465 021760

4466 021764
4467 021766
4468 021772
4469 021776
4470 022000

005767
001417
005263

000044

63:

003302

160156

::;g 022010

056367

002364

160462

4474 022016
022016
::;z 022020

004736
000207

4477 022022

000000

103403

SEG 116

#+ COUNT A CHARACTER ERROR IF ONE OCCURRED
.
i UPDATE THE “REPORT ERROR SUMMARY" FLAG
FOR LINE BASED ON ERROR COUNT,
;-

001002
005363
005767
001407
026367

4471 022006

PAGE 80-2

003302
160166

8s:

TST
BEQ
INC

BNE
DEC
TST
BEQ
cHP
8LO

BIS

60%:

70%:

70%
60$
ERCNTB(R3)

;CHECK THE "ERROR FOUND" FLAG.
3SKIP COUNTING AN ERROR IF FLAG IS
CLEAR.

60%

iSKIP SETTING OF

s INCREMENT THE ERROR COUNTER FOR THIS
LINE.
8$
s SKIP SETTING COUNTER TO MAX IF NO OVERF
LOW.
ERCNTB(R3)
;RESET THE ERROR COUNTER TO -1 (MAX
VALUE
).
NDERPT
1DISABLE ERROR SUMMARY FUNCTION IF
60%
i NUMBER OF DATA ERRORS TO REPORT IS
0.
ERCNTB(R3),NDERPT
;COMPARE ERROR COUNT WITH @ OF ERR'
S TO RPT,

BITTBL(R3),ERSMRF

PASS
RTS

.WORD

JSR

SUMMARY FLAG

IF NOT

TOO MANY .

;SET “PRINT ERROR SUMMARY
" FLAG FOR LINE.

;RESTORE GPRS.
PC.8(SP)+

iRETURN TO PREGOS SUBRT.

:LOCAL STORAGE FOR ERROR OCCURRED FLAG.

MACRO M1200
15-MAR-84 09:48
- 00PS TM 4479
4480
4481

.SBTTL
R

4487
4484
4485
4486
4487
4488
4489
4490
4491
4492
4493
4494
4495
4496
4497
4498 022024

GLOBAL SUBROUTINE

i+ OUTPUTS:

022073
022076
022101
022104
022107
022112
022115
022120

022123

022126
022131
022134
022137
022142
022145

PROGRAM

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

ABORT

SUBROUTINE

0.0“.‘00

ERROR

CODE

GIVING REASON FOR

ABORT .

AN ERROR MESSAGE IS PRINTED.

LIST

s+ CALLING SEQUENCE:

RETURN

JSR

VALUES

FOR

ALL

SUBROUTINE

CALLS

PRINTED.

PC,00PS

;+ COMMENTS:

i# SUBORDINATE ROUTINES CALLED: NONE.

HEE

104454
000145
022070
000000

4507
4508 022070

INPUTS:

022030
022032
022034
022036

022050
022052
022054
4503 022060
022060
4504 022062
4505 022064
022064
4506 022066

THIS SUBROUTINE IS USED TO ABORT THE
PROGRAM WHEN A FATAL ERROR IS
DETECTED IN THE PROGRAM OR THE HOST
SYSTEM HARDWARE.
AN ERROR MESSAGE
IS PRINTED GIVING SOME INFORMATION ABOUT
THE NATURE OF THE ABORT.

004567

4501
4502 022040
022040
022044

022024

4499
4500 022030

- 00PS

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

;e
;e
;e

SEQ

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

4482

PAGE 81

.“A““O‘“0‘.“0&““““

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

O0PS::

SAVE

TRAP
.WORD

022154
000001

REPORT “PROGRAM HUNG,
PRINTF
#EMO102

2s:

104422
000776

60$:

004736
000207
110
124
117
125
122
101
127
105
122
117
127
105
125
105
117
124

0‘

i SAVE _CONTENTS OF GPRS RO THRU RS,
JSR
RS,PREGOS
:CALL REGISTER SAVE SUBRT.
s REPORT “HOST COMPUTER HARDWARE OR SOF TWARE
BUG ENCOUNTERED.
" ERROR.
ERRSF
101,EMO101

163274

012746
012746
010600
104417
062706

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

BREAK
BR

PASS
RTS

117
115
124
040
122
101

040

040
106
101
107

116
125
105

123
10

EMO101::

WAITING FOR A CONTRO
-C.L

.WORD
.WORD

EMO101
©

MOV

9EMO102, -(SP)

MOV
TRAP
ADD

SP,RO
CSPNTF
04,5P

TRAP

C$BRK

:LOOK FOR OPERATOR CONTROL-C INPUT.
28
PC

s INFINITE LOOP,

JSR

CSERSF
101

sDON’'T NEED THIS, BUT SOMEBODY MAY CHANG
E THIS
PC,8(SP)+
tRETURN TO PREGOS SUBRT,
: ROUTINE IN THE FUTURE, SO BE CONSISTANT
.

.ASCIZ /HOST COMPUTER HARDWARE OR SOF TWARE BUG ENCOU
NTERED,
7

117

aq;.“

OBAL

1ST

TINE

022150
022153

4509 022154
022157
022162
022165
022170
022173
022176

022201
022204

022207
022212
022215

022220

022228

022226

022231
022234
022237
022242
022245

4510

PART4

022250

MACRC M1200

105
000

O0PS

104

056

116
120
107
115
125
054
101

045

122
122
040
116
040
111

117
101
117

122
040
116

040
103
124

055

103

056

045
101
117
101
110
107
127

124
107

122

040

052
052
052
052
045

116

111
040

117

074

052
052
052
052
116

000

MAR

03:48

EMO102::

PAGE

81-1

510

.ASCIZ /#NSAPROGRAM HUNG, WAITING FOR A
CONTRO
-C.
L <ecesscecscessmhuN/

116
106

114

052
2
052
045

.EVEN

“€0

)

C10
4512

.SBTTL

4513

4514
4515

3
3

4516

:0 INPUTS -

;e
3s
.

4523

:‘ OUTPUTS:

4524

:ggz

ERRNBR
ERSMRF

- ERROR NUMBER OF ERRORS IN THIS ROUTINE
.
- "REPORT ERROR SUMMARY FOR LINE
" FLAGS

ERRBLK - THE CONTENTS OF THIS WORD ARE DESTROYED,

ERCNTB

;e
s¢ CALLING SEQUENCE:

4530

THE ERROR COUNT FOR THIS LINE

JSR

:0 COMMENTS:

4531

IS UPDATED.

PC ,PRFRME

THIS ROUTINE REPORTS ERRORS WITH INITIAL NUMBER

ERRNBR IS RESTORED TO ITS INITIAL VALU
E BEFORE THIS SUBROUTINE

4534

:0 SUBORDINATE ROUTINES CALLED: ER6201.

Agiz
4

gva

4537 022252
022252
4538 022256
:gzg 022262

004567
016704

005005

oo.oo..ooooo.oooa.o.o.oo.‘.a

oooooooooo...ooo‘c.o.ooo.‘ao

PRFRME : : SAVE

163046
163034

MOV

CLR

454)

JSR
ERRNBR, R4

ooo.ocoonoooooooooo

1 SAVE CONTENTS OF GPRS RO THRU RS,
.PREGOS
;CALL REGISTER SAVE SUBRT.
$SAVE THE CONTENTS OF THE INITIAL ERRO
R NUMBER ,
1CLEAR ERROR/MESSAGE FLAGS.

4542

s TEST FRAMING AND PARITY ERROR BITS IN
TURN.

:55:2

4545 022264
4546 022272

4547 022276
:55:3 022300
4550 022304

4551 022310
4552 022312

4553
4554
4555
:ggg

R2 - CONTAINS THE CHARACTER READ FROM THE FIFO
.

MESSAGES MAY BE PRINTED AT THE OPERATORS
CONSOLE .

4527
:ggg

ooooooooocoocoooooo

ERROR BIT CLEAR.

4520
:ggé

TO VERIFY THAT
ALL RECEIVED CHARACTERS HAVE THEIR FRAMI
NG ERROR BIT SET AND PARITY

4519

- PRFRME

oooooo.‘..oo.oocoooooooooooo

- PROCESS FRAMING ERRORS THIS SUBROUTINE IS USED IN THE FRAMING
ERROR BIT TEST,

:gt;

GLOBAL SUBROUTINE

oo.oooooooooooooooooo‘.oooo.

022316
022320
022322
022330

012767
032702

014162
020000

001002
052705

000002

032702

010000

001402
052705

005705
001412
036367
001004

REPO
FRAMING ERROR BIT CLEAR, OR PARITY ERROR BIT SET.RT ANY ERRORS FOUND, IE.

163030

MOV
BIT

BNE
BIS
68;

000014

8s:;
002364

160150

4558

4559 022332

:gé 022334

012767

000001

005263

003302

4565 022352
022352

010467

004736

#IT12.R2

8s
014,85

;SET UP THE ADDRESS OF THE ERROR
ROUTINE,
1CHECK ON STATE OF THE FRAMING ERRO
R BIT,

1BRANCH IF FRAMING ERROR BIT SET,
1SET REPORT FRAMING ERROR FLAG.
1CHECK ON THME STATE OF

TME PARITY ERROR BIT,

$BRANCH IF PARITY ERROR BIT CLEA
R.
1SET REPORT "PARITY ERROR SET" FLAG

S.
RS
sCHECK IF ANY ERROR FLAGS SET.
608
1EXIT IF ALL FLAGS CLEAR,
BITYBL(R3),ERSMRF
;CHECK THE ERROR SUMMARY FLAG FOR THIS
L INE,
103
+SKIP ERROR REPORT IF ERROR SUMMARY FLAG
SET,

;REPORT ERROR “CHARACTER RECEIVED WITM
PARITY/FRAMING ERROR BIT SET~,

104460

4564 022346

757
BEQ
BIT
BNE

63
#BIT1,RS

ERROR

4340 022332

4563 022342

8IT

BEQ
BIS

®ER6201,ERRBLK
BIT13,R2

162744

»53>> ERROR «<cccc,

TRAP

157662

MOV
108:

60%:

INC

MOV

PASS

01 ,.FERROR
ERCNTB(R3)

R4 ,ERRNBR

JSR

CSERROR

s INDICATE AN ERROR MAS BEEN DETECTED.
s INCREMENT ERROR COUNT FOR THIS LINE.

sRESTORE ERROR NUMBER.

sRESTORE GPRS.
PC,8(SP).

tRETURN TO PREGOS SUBRT,

DWU

GLOBAL

FINC

1ST

PARTS

SIBROUT INE

4566 022354

000207

MACRO M1200
15-MAR-84 09:48
- PRFRME RTS

PAGE 82-1

D10

ODMuU-11

GLOBAL

1ST

PARTS

SiBROUT INE

MACRO M1200

S5-MAR-84

ORPARE

4568

.SBTTL

‘“’

45790

4571

4572
:gzz

3o
it

4581

- CONTAINS THE CHARACTER READ FROM
THE FIFO.
CONT

AINS

LINE

NUMBER

THE

READ

CHAR.

ERRNBR

- ERROR NUMBER OF ERRORS IN THIS ROUT
INE.

FERROR

“AT LEAST ONE ERROR FOUND" FLAG.

ERRBLK

THE CONTENTS OF

THIS WORD ARE DESTROYED.

ERCNTB - THE ERROR COUNT FOR THIS LINE IS
UPDATED.

MESSAGES MAY BE PRINTED AT

4585
4gg$
/4
4588

THE OPERATORS CONSOLE.

g
s* CALLING SEQUENCE:
JSR
PC,PRPARE
L
s+ COMMENTS:
THIS ROUTINE REPORTS ERRORS WITH INIT
IAL ERRNBR THRU ERRNBR+1 .,
;e
ERRNBR IS RESTORED TO ITS INITIAL VALUE
BEFNRE THIS SUBROUT INE
;e
RETURNS .,

4589

4590

:g:é

THE CONTENTS OF THE ERRBLK ARE DESTROYED.

i+ SUBORDINATE ROUTINES CALLED: ER90
02,ER6201.
$=- “‘...““‘......“...‘0“‘.‘.“‘.‘.‘.
‘t..‘l..“..‘.‘.‘.“..‘0“.‘0‘.‘0‘0‘0
004567
016746

005005

PRPARE : : SAVE

162742
162730

MOV

CLR

4600
4601
::8§

4622

IS USED

ERSMRF - “REPORT ERROR SUMMARY FOR LINE" FLAGS
.

3¢ OUTPUTS:

:ggz

R2
R3

4582

4618 022440
4619 022446
:gg? 022454

..0‘0.‘....000‘0

IN THE PARITY ERROR TEST, TO VERI
FY THAT
ALL RECEIVED CHARACTERS HAVE THEIR PARI
TY ERROR BIT SET AND FRAMMING
ERROR BIT CLEAR.

4615
4616 022436
as1? 022436

- PROCESS PARITY ERRORS -

THIS SUBROUTINE

4;;3

4612 022424
4613 022426
4614 022434

- PRPARE

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

4578

4611 022422

GLOBAL SUBROUTINE

4577

4604 022370
4605 022376
4606 022402
4607 022404
4608 022410
4609 022414
4610 022416

E10

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

3+ INPUTS:

4576

:g:g 022366

PAGE

4575

4593
‘5“
4595
4596 022356
022356
4597 022362

09:48

012767
032702
001002
052705
032702
001402
052705

005705

001414
036367
001035

3 SAVE CONTENTS OF GPRS RO THRU RS,
RS ,PREGOS
sCALL REGISTER SAVE SUBRT.
1SAVE THE CONTENTS OF THE INITIAL ERRO
R NUMBER,

sCLEAR ERROR/MESSAGE FLAGS.

i’
3 TEST FRAMMING AND PARITY ERROR
BITS IN TURN.
REPORT ANY ERRORS FOUND,
;
PARITY ERROR BIT CLEAR, OR FRAMMING
ERROR BIT SET.

IE.

014162
010000

162724

000010
020000

6%:

000003
8s:

002364

000001
000100

MOV
81T
BNE
BIS
BIT
BEQ
8IS
TST

BEQ
BIT
BNE

160044

®ER6201,ERRBLK
#BIT12,R2
63
OBIT3,.RS5
BIT13,.R2
83
@3.RS
RS

;SET UP THE ADDRESS OF THE ERROR
ROUTINE .
1CHECK ON STATE OF THE PARITY ERRO
R BIT,
:BRANCH IF PARITY ERROR BIT SET.
$SET REPORT PARITY ERROR FLAG.
sCHECK ON THE STATE OF THE FRAMMING
ERROR BIT,
1BRANCH IF FRAMMING ERROR BIT CLEA
R.
3SET REPORT “FRAMMING ERROR SET”
FLAGS.

sCHECK

IF ANY ERROR FLAGS SET,

123
1BRANCH TO MAKE DATA CHECK IF ALL FLAG
S CLEAR.
BITIBL(R3),ERSMRF
;CHECK THE ERROR SUMMARY FLAG FOR TMIS
LINE,
143
$SKIP ALL ERROR REP IF IN ERROR
SUMMARY MODE
.,

sREPORT ERROR "CHAR RECEIVED WITH PARITY/FRA
MMING ERROR BIT SET/CLEAR",
ERROR
3
»>»3>> ERROR «<cccc,
TRAP
CSERROR

104460
012767
032767
001440

JSR
ERRNBR, -(SP)

157556
157506

MOV
8IT

BEQ
i

&1 ,FERROR
oBIT06,0PTION

18¢

: INDICATE AN ERROR HAS BEEN FOUND,
iHAS EXTENDED ERROR REPORTING BEEN
REQUESTED

sEXIT IF IT MASN'T,

121

€0 121

Yokl SRRl e
-

PARTS

A0 mizogjz un 8 09:48
M

-MAR -

::gz
4625 022456
4626 022462
4627 022466
46258 022470
4629 022474
4630 022476
4631 022500
4632 022504
4633 022512

4634 022514

4635 022522

4636 022524

4637 022530

4638 022534
4639
4640 022542
022542
:85 022544
4643
4644 022552
:::2 022556
4647 022562

022562

4648 022564

:48

F10

Pace 03.1

s COMPARE ACTUAL DATA WITH EXPECTED DATA
TO CHECK FOR MULTIPLE ERRORS.
12%:
INC
ERRNBR
: INCREMENT ERROR NUMBER.
MOV
RXPTRB(R3),R4
:GET THE POINTER TO THE EXPECTED DATA.
MOVB
(R4).R4
1GET THE EXPECTED DATA.
BIC
@177400.R4
iCLEAR THE UPPER BYTE.
CMPB
R2,R4
:COMPARE ACTUAL AND EXPECTED DATA.
BEQ
18
s SKIP ERROR REPORT IF DATA CORRECT.
B8IC
#BIT15,.R4
1CLEAR “NONE" EXPECTED MESSAGE FLAG.
BIT
BITTBL(R3),ERSMRF
;CHECK THE ERROR SUMMARY FLAG FOR THIS
LINE.
BNE
163
1 SKIP ERROR REPORT IF ERROR SUMMARY FLAG
SET.
BIT
BITTBL(R3).RXDONF
; CHECK FOR RECEPTION COMPLETE ON THIS
LINE.
BEQ
143
s SKIP SETTING NONE EXPECTED FLAG.
8IS
#BIT15,R4
1SET “NONE" EXPECTED MESSAGE FLAG.
:

005267
016304
111404
042704
120204
001427
042704
036367
001017
036367

001402

052704

012701

012767

162634
003402
177400

100000
002364

157766

002364

157762

100000

011371

014520

162560

104460
012767

000001

157452

005263
012667

003302
162534

004736

000207

14%:

MOV

#EM9008,R1

s SELECT ERROR MESSAGE

MOV

@1,FERROR

TRAP
s INDICATE AN ERROR HAS BEEN FOUND.

16%:
18%:

INC
MOV

ERCNTB(R3)
(SP)+ ,ERRNBR

s INCREMENT ERROR COUNT FOR THIS LINE.
;RESTORE ERROR NUMBER.

608 :

PASS

TO BE REPORTED.

MOV
9ER9002,ERRBLK ; SELECT ERROR REPORTING
ROUTINE
;REPORT ERROR"RECEIVE CHARACTER MISCOMPARE "
ERROR

RTS

JSR

CSERROR

;RESTORE GPRS.

PC,a(SP).

iRETURN TO PREGOS SUBRT,

BleAl SHMROLTINE"

MACRO "120&"&%“-84 09:48

4650
4651
4652

-SBTTL
R

G10

PAGE 84

GLOBAL SUBROUTINE
-PRINT

THIS

CONTENTS OF

;e INPUTS:

ROUTINE

USED

;e
LPRA

CONTAINS

AN EXTENDED

CONSOLE.

;¢ CALLING SEQUENCE:

3¢ COMMENTS:
ie

JSR

OUT

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

THE

LPR.

EXTENDED

INFORMATION

THE

ADDRESS

THE

BITS
THE

CURRENT
IN

THE

ADDRESS

THE

DUT'S

STATUS

DUT'S
OF

THE

INFORMATION MESSAGE

CSR.

THE

AND

INTERRUPT

CSR.
DUT'S

LPR

PRINTED

THE

OPERATORS

PC.PRTLPR

THIS ROUTINE CHANGES THE INDIRECT ADDRESS
FIELD OF THME DEVICE
TEST'S

UNDER

CONTENTS

CONTAINS
ENABLE

OUTPUTS:

THE

R3 - CONTAINS THE NUMBER OF THE LINE
YOU WISH TO EXAMINE.
CSRA
- CONT
IESTAT

.‘..‘..‘..‘..‘.‘...0

THE LINE PARAMETER REGISTER (LPR).
AINS

;¢

PRTLPR

..........‘...‘. ....

4653

.‘..‘.‘.....‘..‘.‘.‘

CSR.

3¢ SUBORDINATE ROUTINES CALLED: NONE.
3--

022566
022566
022572
022576
022602
022612
022614
022616
8226 16

022624
022630
022634
022636
022640
4682 022644
022644

4683 022646

004567
016701
016702
042703
056703
010311
011204
010446
012746
012746
012746
010600

104415
062706
004736
000207

162532
157402
157402

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

PRTLPR: : SAVE

MOV
MOV

177760

BIC
8IS

157422

CSRA,R1
LPRA,R2

JSR

.“..‘...‘...0.00...‘

0.‘.0..00

s SAVE CONTENTS OF GPRS RO

THRU RS,

R5,PREGOS
3CALL REGISTER SAVE SUBRT.
:GET THE CSR ADDRESS.
sGET THE LPR ADDRESS.

sCLEAR ANY UNWANTED BITS.
3SET STATE OF TX AND RX INTERRUPT ENAB
LE BITS.

MOV
R3,(R1)
sSELECT LINE,
MOV
(R2),R4
;GET CONTENTS OF THE LPR,
sPRINT MESSAGE "CONTENTS OF THE LPR:NNNNNN
"

PRINTX 0EF9019,9EM9026,R4;PRINT OUT
MESSAGE ON OPERATOR'S’OCONSOLE.
v
R4, -(SP)

€12075
007206
000003
000010

.‘...0.0‘.“‘..‘....‘

60%:

PASS
RTS

JSR

;RESTORE GPRS,

MOV
MOV
MOV
MOV
TRAP
ADD

PEM9026, - ( SP)
9EF 9019, -( SP)
03, -(SP)
SP,RO
CSPNTX
210,5P

sRETURN TO PREGOS SUBRT,

FUNC

GLOBAL

T1ST

PARTS

StBROUT
INE

MACRO M1200
-

15-MAR-84 09:48

PUFIFO

4685
4686
4687
4688
4689
4690
4691
4692

-SBTTL

H10

PAGE 85

SEQ

GLOBAL SUBROUTINE

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

THIS

ANY

PURGE

:o INPUTS:

4693

:o OUTPUTS:

4695

TRIES

REMOVE

THAT

ALL

ARE

THE

FOUND

ARE

SAVED

BMPCQ

THE

4697

;¢ CALLING SEQUENCE:

4098

CONTENTS

JSR

4699
4700
4701

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

CHARACTERS
ON

THE

FROM

BMP

THE

CODE

FIFO.

QUEUE
.

CARRY BIT - INDICATES THE STATE OF THE FIFO, SET:

4696

FIFQ

CODES

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

RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER.

4694

THE

ROUTINE

BMP

PUFIFO

.....‘...Q..".‘.‘...

THE

BMP

CODE

QUEUE

MAY

= PURGED.

UPDATED.

PC,PUFIFO

s» COMMENTS:

3* SUBORDINATE ROUTINES CALLED:

4702

4703
4704 022650

022650
4705 022654
4706 022660

4707
4708 022664
4709 022666
4710
4711
4712
4713
4714 022670
4715 022674
4716 022676
4717
4718
4719
4720 022700
4721 022704
4722 022706

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

004567
012701
016704

162450
001000
157316

011402
100016

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

PUFIFO: : SAVE

MOV
MOV
2s:

@512. ,R1
RBUFA,R4

MOV

JSR

(R4),R2

BPL

0‘..“.“‘.

s SAVE CONTENTS OF GPRS RO THRU RS,

RS,PREGOS
iCALL REGISTER SAVE SUBRT.
+SET MAXIMUM TRY COUNT OF 512.
:GET ADDRESS OF THE RECEIVER BUFFER REGISTER
,
:GET THE CONTENTS OF THE RECEIVER BUFF
ER REG.

sEXIT IF THE FIFO IS EMPTY, DATA_VALID CLR.

: CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE.

s
012700
040200

IF IT IS,

070000

012700
040200
001002

004767

022714
022716
022720
02722
022724

005301
001362
000241
000401
000261

022726

004736

022730

000207

000301

THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPOR
TED LATER,

MOV
BIC
BNE

001006

022710

022726

SAVBMP.

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

70000,RO
R2.RO
4%

JGENERATE A BIT MAP OF CHAR ERROR BITS
i WHICH ARE NOT SET FOR CHAR.
sTHROW CHAR AWAY IF NOT BMP OR SELF
TEST CODE.

; CHECK IF THE READ DATA IS MODEM STATUS . BMP OR SELFTEST?,
.
MOV
#301.RO
; CHECK IF BMP.
BIC
BNE
JSR

001644
as:

68:
60$:

R2.RO
4%
PC,SAVBMP

DEC

BNE
cLe
8R

sDECREMENT

28
603

SEC

RTS

TRY

COUNT

sSET CARRY, TO INDICATE FIFO PURGED.
JSR

THE

.
iLOOP TO TRY AGAIN.
sCLEAR CARRY,TO
ATE FIFO NOT PURGED.
{EXIT WITH CARRY INDIC
CLEAR.

PASS

sTRY TO CLEAR BMP FLAGS IN THE READ DATA.
sIF IT IS MODEM OR SELFTEST CODE TRROW
17 AWAY.
iSAVE BMP CODE ON THE QUELE
.

sRESTORE GPRS,

PC.B(SP).

SRETURN TO PREGOS SUBRT.

:CARRY BIT, SET INDICATES FIFO PURGED,

124

fo‘nif

»:‘«é;"',g';wva

MACRO m.«‘og.j }?,m 84 09:48

.SBTTL

4 '“

4718

4744

4741

ra;
474

4749

4751

ANv

BMP CODES

THIS

THE

ROUTINE

NON-STATUS

AFTER 512 ATTEMPTS,

RECEIVES

TEST.

INFORAMTION)

FAILURE

THAT

THEN

FLAG

THE

THAT

TMAT

ARE

FOUND,

CURRENT

SHOWLD

TEST
USED

EPRTBL - ERRTYPE, ERRMSG, ERRNBR ARE SET UP CORR
ECTLY.

ERRBLK - VALUE WILL BE DASTROYED.

CONTAINS

THE

ADDRESS OF

THE RECEIVER.

CARRY BIT - ABORT TEST FLAG, CLR = ABORT TEST, SET
= Q.

BMPCOP -

THE BMP CODE QUEUE POINTER MAY BE UPDATED.

THE CONTENTS OF

JSR

THE BMP CODE QUEUE MAY BE UDATED.

PC.PUFIFR

THIS ROUTINE REPORTS ERRORS WITH NUMBERS INITIAL ERRNBR

THRU TO ERRNBR.2.
THE ERRNBR IS RESTORED

ITS

INITIAL

VALUE

;..0......0....0.0.00.0...‘.

BEFORE

RE TURNING .

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

4762

4763 022732

004567
016746
012705

PUF IFR: : SAVE

152366
162354
001000

MOV
MOV
‘0

4767

:;gg

017702
100063

157230

012700

040200

JSR
ERRNBR, - (SP)
0512, ,RS

READ DATA FROM THE FIFO UNTIL

sSAVE CONTENTS OF GPRS RO

MOV

BPL

SRBUF A, R2
8s

DATA VALID

IS CLEAR OF

001012

MOV
8IC

BNE

4779

270000, RO

R2,RO

THRU RS.

READ COUNTER

IS ZERO,

iGET THE CONTENTS OF THE RECEIVER BLFFER REG.

sEXIT IF DATA VALID CLEAR,

:°Co£0< IF READ DATA IS STATUS OR UNEXPECTED CHAR
ACTER.

070000

.“‘00.00““0.0‘0.‘.

RS, PREGOS
;CALL REGISTER SAVE SUBRT,
1SAVE THE CONTENTS OF THE ERROR NUMBER.
$SET MAXIMUM READ COUNTER TO 24FIFQ SIZE.

REPORT ANY BMP OR UNEXPECTED DATA AS ERRORS.

55:

:;;2

IE, FIFO PURGED.

sGENERATE A BIT MAP OF CMAR ERROR BITE

WHICH ARE NOT SET FOR CHAR.

sSKIP BMP CHECK IF IT IS UNEXPECTED DATA,

:.c&cn( iF THE READ DATA IS MODEM STATUS , BMP OR SELFTEST?,

:;:?

4789

THE FIFO.

3¢ SUBORDINATE ROUTINES CALLED: ER1603,ER9001,ER9002,SAVE
MP.

‘76‘

479

0...‘.0

RBUFA-

;e
g
')

4760

.....0........‘.‘.‘0.0..

;e
o

:. COMMENTS ;

4757
4;3;
47%9

:;3; 023006

CALLED

T0 ABORT

4756

PUFIFR

ERRORS FOUND.

(IE ANY
AN ERROR.

:. CALLING SEQUENCE:

ANY

THE FIFO WILL NOT PURGE

c;g;

4784 022776
4785 023000
4786 023002

THAT

4782 022764

47”

4783 022772

:. OUTPUTS ;

4750

FIFO REPORT

REPORTED

:. INPUTS ;

4747
4748

:;;; 022762

PURGE

ARE

;e
*

4746

4775 022754

...0.......‘.‘....0.....

THIS ROUTINE REMOVES ALL DATA FROM

res

4776 022760

SUBROUTINE

ARE
FOUND ARE SAVE ON THE QUEUE TO BE REPO
RTED LATER IN THE BMP REPORT TEST.
ANY UNXEPECTED DATA

4°40

4770 022746

:;;g 022752

GLOBAL

€0

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

4°8°

022732
4764 022736
:;:: 022742

I10

PAGE 8e

012767

012700

040200
001003
004767

000430

014420

000300

162330

IF IT IS A BMP CODE THEN SAVE IT ON THE QUEUE.
MOV

MOV

BIC
BNE
JSR

001552

PERI00L ,ERRBLK

#300,R0

R2,R0
as
PC,SAVBMP
63

;SET UP THE CORRECT ERROR REPORTING ROUTINE
.

CHECK

IF BMP OR SELFTEST?,

sTRY TO CLEAR BMP FLAGS IN THE READ DATA,
sSKIP BMP ERROR REPORT IF MODEM OR SELFTEST?,
sSAVE THE BMP CODE ON THE QUEUE
.,

sBRANCH TO CHECK READ COUNT,

:°Cr£cx IF THE READ DATA IS MODEM, SELFTEST OR UNEXPECTED DATA,

12°

Sbed! SBRolTIng
i-11

151

4791 023010

4792 023014

4793 023016

4794 023022

4795 023028
4796 023026

4797 023032

4798 023034

4799 023040

4800 023044

4801

PARTS

032702

001425

012701

010203

MACRO M1

2% 1TM

000001

-MAR-84

4s:

BIT

BEQ

012866

MOV

000303
042703

177760

SWAB
BIC

052704

100000

BIS

006303

CO05267

012767

ASL

162252

014520

INC

162250

MOV

::gg

032767
001415

4812 023070

005305

000100

157100

#EM9104 .R1

R2.R3

R3
8177760,R3

oBIT1S5.R4
ERRNBR

QER9002,ERRBLK

s TEST THE MODEM STATUS INDICATION BIT.

;D0 NOT REPORT ANY ERROR

;PASS

IF MODEM STATUS,

THE CORRECT ERROR MESSAGE

sEXTRACT THE LINE NUMBER FROM

:
:

6%:

001325

THE READ DATA.

:FORM LINE NUMBER TIMES 2 FOR ER90
02 ROUTINE
.

:SET THE “NONE” EXPECTED MAESSAGE FLAG.

:SET ERROR NUMBER

;SELECT

DEC

BNE
3

TO REPORT.

INTIAL

ERRBR+].

THE CORRECT ERROR REPORTING ROUTINE
.
>»>>>

ERROR

c¢cccc,

TRAP

DEC

::%?

CSERROR

IF EXTENDED ERROR REPORTING HAS
NOT BEEN ENABLED

OBITO6,0PTION
7

ERRNBR

sEXIT WITH TEST FAILURE MESSAGE IF
:NO EXTENDED ERROR REPORTING HMAS BEEN
REQUESTED

:DURING THE SOF TWARE QUESTIONS.

;RESTORE ERROR NUMBER TO INTIAL ERRNBR.

;DECREMENT READ COUNTER.

;LOOP TO READ NEXT CHAR FROM FIFO IF COUNT

THE FIFO WILL NOT CLEAR, REPORT THE ERROR
AND INDICATE

3 BE ABORTED.

> 0,

THAT THE TEST IS TO

‘0

062767

012767
012701

000002

014070
011670

162214

ADD

162212

4821
4822
4823 023114
025114
4824 023116
::g: 023120

104460
000241

000401

78:

::g; 023122

000261

8s:

4829 023124

012667

4830 023130
023130
4831
4832
4833 023132

EXIT WITH FAILURE

BIT
BEQ

162226

4815

4818 023074

#8IT0,R2

‘0

005367

4819 023102
4820 023110

86-1

sREPORT ERROR “UNEXPECTED DATA FOUND IN FIFO"
.

104460

::{2 023064

::{2 023072

PAGE

ERROR

:gg;

4806 023054
4807 023062

J10
Sl

4802 023052

4803 023052

09:48

004736
000207

162166

10s:

608 :

02 ,ERRNBR

MOV
MOV

OER1603,ERRBLK
SEM9017,R1

MOV

(SP)+ ,ERRNBR

sSET ERROR NUMBER

TO INTIAL ERRNBR .2,

;SELECT THE CORRECT ERROR REPORTING
ROUTINE.
iPASS THE MESSAGE TO BE REPORTED.

sREPORT THE ERROR “FIFO WILL NOT PURGE,
(DATA VALID STUCK SET)*
3
"22222? TEST ABORTED".
ERROR
:
>>>>> ERROR <<cccc,
TRAP
CSERROR
cLC
s INDICATE THE TEST IS TO BE ABORTED,
BR
10%
sEXIT THIS ROUTINE AND ABORT THE CURRENT
TEST,.
SEC
:SET THE CARRY, DO NOT ABORT THE TEST.
PASS

RTS

JSR
PC

sRESTORE INITIAL ERROR NUMBER.

;RESTORE GPRS,
PC.8(SP)»
sRETURN TO PREGOS SUBRT,
sCARRY BIT, SET INDICATES FIFO PURGED, DO
NOT
i ABORT THE TEST,

€0 1

T4
BlbeAl SHHRolT1aE

AR -84 09:48 PAGE 87
)5 0g
MACRO mi2

4835

.SBTTL

‘6“

200

4837

4838

:g:?

PATTERNS

COUNTERS

s+ INPUTS:

4844

i+ OUTPUTS:

4845

4846

:g:;

4249

PURGE

OUT

AND POINTERS

THE RX BUFFER

THE

RXBIPT

INPUT

4856 023134
P 023134

004567

162164

4858 023140
4859 023144
4860 023150
4861 023154
4862 023156

012701
012721
012721
005021
020127

002712
002720
002720

101774

004736
000207

003120

RXBOPT

OUTPUT

JSR

SAVE
JSR
MOV
MOV
MOV
CLR
cMP

BLOS
60$:

AND

THAT

INITIALIZE

BUFFER.

POINTER

BUFFER

THE

VARIOUS

CINITIALIZED),

CINITIALIZED).

PC,PURRXB

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

PURRXB::

2%:

POINTER

s+ COMMENTS:
L
s+ SUBORDINATE ROUTINES CALLED: NONE.
3 -~

BUFFER

RXBCNT - COUNT OF & OF CHARS IN RX BUFFER
(CLEARED

s# CALLING SEQUENCE
:

4854
4855

28520000000 00000000 LR
T Y

IN MEMORY ROUTINE

RXBSTA - LABEL AT THE BEGINNING OF THE
RX BUFFER,

4851
4852
4853

THE CONTENTS OF THE RX BUFFER ARE CLEARED.

4850

- PURRXB

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

THIS SUBROUTINE IS USED BEFORE THE BEGIN
NING OF A TX/RX OF DATA
TO CLEA

:s
FE

:g:g

4865 023164
023164
4866 023166

GLOBAL SUBROUTINE

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

4839

:322 023162

K10

ORXBOPT,R1
ORXBSTA,(R1)+
ORXBSTA,(R1).
(R1).
R1, 4RXBEND

PASS
RTS

JSR

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

‘.‘.‘

: SAVE CONTENTS OF GPRS RO THRU RS,
RS,PREGOS
:CALL REGISTER SAVE SUBRT.
:GET THE ADDRESS OF THE RX OUTPUT POINT
ER,
sINITIALIZE THE RX BUFFER OUTPUT POINTER,
s INITIALIZE THE RX BUFFER INPUT POINTER,
:CLEAR CHAR COUNT AND THE BUFFER AREA,
sCHECK IF LAST LOCATION HAS BEEN CLEAR
ED.

sLOOP IF NOT DONE.
sRESTORE GPRS.
PC,a(SP).

:RETURN TO PREGOS SUBRT.,

Bl%eAl SUMRolTINERT4
4868

.SBTTL

4849

4870
4871
4872
4873
4874

;e
:e
i®
;e
;s

:g;s

IBM

is
;e

4882

RXTOUT

4886

4887

OUTPUTS:

4888

)

s+ COMMENTS:

;e
ie

:gg;

TIME-OUT

VALUE

MAY

FIRST

BITS

SAVTEN

STORAGE

FOR

STORAGE

FOR

PRINTED

LAST

THE

JSR

PROCESSOR
TX.ENABLE

023170

4902 023174

023200
023204
023210
023214

004567

016704

016703
005067
004767
004767

162116

MOV
CLR
JSR
JSR

4908
:3?8

ROUTINE.

BYTE.

CHAR,

OPERATOR'S

CONSOLE.

(DESTROYED).
(DESTROYED).

STATES

THIS ROUTINE REPORTS ERRORS WITH NUMBE
RS INITIAL ERRNBR

‘C‘:(I:ra?élEUCM.REPCOD.RXIEO.RX

SAVE

MOV

157026
157276
001320
002440

THIS

CHAR

PC,RDCHRS

RDCHRS::

162130

PRIORI.Y

IEI.TXEML.TXIEO.TXIEI.

:-- A..t“‘“0‘.“‘0“‘0.0.‘.‘0““...0.‘.
.“‘0000‘

THRU INITIAL ERRNBR + 4.
ERRNBR IS RESTORED BEFORE THIS ROUTINE RETURNS,

‘

4901 023170

ERROR

TX.ENABLE STATE MASK (DESTRGYED).

;* SUBROUTINES CALLED:

Qggg

NUMBER

INACTIVE

SAVPRI

i+ CALLING SEQUENCE
:

4893

ERROR

THE

- POINTER INTO THE RX CHAR BUFFER IN
MEMORY,

4894
:g:g

TXDBLF - TX/RX DISABLED FLAG (CLEARED
).

:gzé

SET

ERROR MESSAGES

TXENBM

::gg

MASK

4885

OSTEND - ADDRESS OF THE END OF THE OUTPUT
STORAGE FIFO BUFFER.
OSTPTR - POINTER TO THE NEXT BYTE
TO READ FROM OSTORE
.
RXBOP

:ggz

ACTLNS - BIT MAP OF THE ACTIVE DUT LINES.

ERRNBR

4880
4881

.0.00‘.0.0.. st

EACH READ CHAR IS ANALYZED AND ANY
NECESSARY ERRORS ARE REPORTED.

4879

- RDCHRS -

‘0‘0.“‘.0000‘00..00‘..00000.

- READ AND COMPARE INPUT CHARACTE
RS ROUTINE THIS SUBROUTINE READS THE CHAR
ACTERS FROM THE RX BUFFER IN MEMO
RY.
IF CHARACTERS STOP APPEARING IN
THE BUFFER WITH DATA.VALID SET
OR IF MORE THAN THE ALLOWABLE NUMB
ER OF CHARACTERS HAS BEEN READ
FROM
THE BUFFER THIS ROUTINE EXITS
WITH AN RX COMPLETE INDICATION.

:a INPUTS:

4878

4911
4912
4913
4914

GLOBAL SUBROUTINE

4877

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

[

4905
4904
4905
:ggg

MACRO M120
13 MARg
84 09:48 PAGE 88

JSR

ERRNBR,R4

IBM,R3
TXDBLF
PC.RXIE1L
PC,TXIEL

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

i SAVE CONTENTS OF GPRS RO

RS,PREGOS
+PRESERVE

THE

THRU RS,

iCALL REGISTER SAVE SUBRT.,

INITIAL ERROR NUMBER.

:GET THE INACTIVE BIT MASK.
sCLEAR THE TX DISABLED FLAG.
sTURN ON DUT RECEPTION INTERRUPTS.
sTURN ON DUT TRANSMISSION INTERRUPTS.

i
3 CLEAR ALL RESYNC QUEUES FOR ALL LINES.

023220
023224
023230
023232

::}2 023234

012701
012702
005021
020102

‘-

004642
005042

2s:

103775

BLO

4917
:g{g

4920 023236

4921 023242
4922 023250
4923 023252

MOV
MOV
CLR
cMP

ODPRSQ@B,R1
#DPRSQE ,R2
(R1)s
R1.R2

016701

026767
001402
062701

157004
157234

000062

156722

$GET BASE ADDRESS OF RESYNC QUEUES
TABLE.
:GET END ADDRESS OF RESYNC QUEUES TABLE
.
sCLEAR A WORD OF THE TABLE.
sCHECK IF POINTER AT END OF TABLE.

sLOOP UNTIL TABLE IS CLEAR,

: WAIT FOR A CHARACTER TO APPEAR IN THE FIFOD
,
i IF NO CHARACTER APPEARS WITHIN TIME-OUT PERIOD: EXIT
ROUTINE, WE'RE DONE.
3::
MOV
RXTOUT,R1
3GET TIME-OUT FOR SLOWEST BAUD RATE IN USE.
cMP
TXDON
BEQ
ADD

F ,ACTLNS
6%
50, ,R1

;CHECK FOR TRANSMISSION DONE ON ACTIV
E LINES,
sSKIP ADDING 50 MS DELAY IF TX DONE
ALL L INES.
sADD 50 MILLI SEC TO DELAY IF NOT LAST
CHAR,

Bkl SHRolfhe"e
4924
4925
4926
4927
4928

023256
023262
023266
023272

4929 023274
4930
4931
4932

4933
4934
4935
4936
4937
4938
4939
4940
4941
4942
4943

4944

4945
4946
4947

052701

MACRO m%m-u 09:48

170000

6%:

BIS

016702
004767
103117

003520

JSR
8CC

004767

175154

JSR

005767
100027
026727
101023
004767
016705
026727
101013

157424

TST

BPL

cMP

000020

BHI
JSR
MOV

001212

156734
157364

000020

cMP

BHI

GETPRI

104440
010001
012700
104441
004767
005067

M10O
SEQ

€170000,R1

: INDICATE TO TEST DATA.VALID BIT.

RXBOPT ,R2

: INDICATE TO CHECK MEMORY RECEIVE BUFFE
R.

PC,.WAIBIS
18$

sWAIT FOR RECEIVED CHAR OR TIME-OUT.
;EXIT ROUTINE IF TIME-OUT, WE'RE DONE.

PC.GETCHR

iREAD A CHARACTER FROM THE MEMORY BUFFER,

CHECK IF THE TX ISR IS DISABLED.
RE-ENABLE RX ISR IF THE SPACE FOR
NEW CHARS IS LOW ENOUGH.
IF
THE BUFFER CAN ACCOMODATE MORE CHAR
S THEN RE-ENABLE TRANSMISSION.

157202
157404

MOV

PAGE 88-1

SETPRI

000340

002054

JSR
CLR

157126

SETPRI

010100
104441

TXDBLF

sCHECK IF

TX IS DISABLED.

10%

:SKIP RX/TX CHECK IF TX NOT DISABLED
.

10¢
PC.RXIE1
TXENBM,RS

:SKIP ENABLE RX IF BUFFER TOO FULL.
:ENABLE RECEPTION INTERRUPTS.
:GET THE PRESERVED TX.ENABLE STATES.

RXBCNT,0RXBETX

;COMPARE BUFFER COUNT WITH LEVEL TO ENABLE RX.

RXBCNT,0RXBETX

;COMPARE BUFFER COUNT WITH LEVEL TO ENABLE TX.
:SKIP

10$

iSAVE

oPRIO7

ENABLING TX IF BUFFER TOO FULL .

THE CURRENT PROCESSOR PRIORITY.
TRAP

;DISABLE INTERRUPTS,

PC, TXENBL
TXDBLF

;ENABLE TRANSMISSION.
:CLEAR THE TX DISABLE FLAG.

;RE-ENABLE INTERUPTS,

157106
161720
012001
014032

MOV

TRAP

MOV

TRAP

10%:

005367
001014
010467
012701
012767

MOV

DEC
BNE
MOV
MOV
MOV

161712

CHRTOT
128
R4 ,ERRNBR
#EM9025,R1

#EROS03,ERRBLK

CSGPRI

RO,R1

OPRIO7,RO

C$SPRI

R1,RO

C$SPRI

:DECREMENT THE TOTAL CHAR COUNTER.
sSKIP ERROR IF NOT TOO MANY RECEIVED.
:SET ERROR NUMBER TO INITIAL ERRNBR.
i SELECT THE PROPER ERROR MESSAGE.
;SELECT THE PROPER ERROR REPORT ROUTINE.

:.mT ERROR AT INITIAL ERRNBR.
s

104460
012767

“MORE THAN TWICE THE EXPECTED NUMBER OF CHARA
CTERS RECEIVED,
"

ERROR
000001

156604

MOV

000477

070000

1 ,FERROR

»>>>> ERROR «¢<ccc,
TRAP
CSERROR
s INDICATE THAT AN ERROR MAS BEEN FOUND.

+EXIT THE ROUTINE, WE'RE GIVING UP,

: DETERMINE IF THE CHARACTER IS DATA OR A STATUS CODE.
;.20:
MOV
€70000,R0
sGENERATE A BIT MAP OF CHARACTER ERROR BITS
*

012700
040200
001016

BIC

BNE

R2,RO

143

WHICH ARE NOT SET FOR THE CMARACTER.

1SKIP REPORTING OF ERROR CODE IF WE MAVE CHAR,

: THE DATA IS EITHER A BMP CODE OR A MODEM STATUS CODE.

i REPORT THAT THE CODE WAS FOUND.

+ ERRORS REPORTED WITH ERROR NUMBERS

>>>>> ERRNBR:1 AND ERRNBR+2 ccccc,

129

i A T
.11

FUNC

TST

4974 023432
4975 023436

4976 023442
4978 023446

4979 023452

4980 023454

PART4

010867
005267

005767

156552

001423

032767

4983 023464

000416

15-MAR-84

161660
161654

000222

001456

4990
4991
4992
4993
4994
4995

“"RDCHRS -

004767

4981 023462

4985
4986
4987
4988

MACRO M1200

000100

09:48

PAGE

MOV
INC

TST

8EQ

sGET THE ERROR NUMBER PASSED INTO
THIS ROUTINE
.
sSET ERROR NUMBER TO INITTAL ERRNG
R .1

PC,REPCOD

sREPORT THE BMP OR MODEM STATUS CHAN
GE CODE
.

FERROR

sHAS AN ERROR BEEN DETECTED

165

BIT

- In

R4,ERRNBR
ERRNBR

JSR

156500

N1O

88.2

#BITO6.OPTION

iNO, THEN BRANCH.

;HAS EXTENDED ERROR REPORTING BEEN
REQUESTED.

BEQ

608

iYES,

B8R

163

;BRANCH TO GET THE NEXT CHARACTER.

R4,ERRNBR
o3 ERRNBR
PC.NEWCHR
FERROR
16$
#BITO6,0PTION

iCALCULATE THE STARTING ERROR NUMB
ER FOR THE
i
NEXT ROUTINE CALL (INITIAL ERRNBR.3
)
sHANDLE THE NEW DATA CHARACTER
iHAS AN ERROR BEEN DETECTED 3
iNO, THEN BRANCH.
;HAS EXTENDED ERROR REPORTING BEEN
REQUESTED.

THEN EXIT WITH TEST FAIL MESSAGE.

: THE DATA IS A VALID CHARACTER:
i
COMPARE THE READ DATA WITH THE EXPECTED DATA.
s
UPDATE EXPECTED DATA POINTER
.
i
ERRORS REPORTED WITH ERROR NUMBERS >>>>> ERRNBR+3 AND ERRNBR+4 <<<<«
;e

023466
023472
023500
023504
023510
023512

499 023520

4998
4999
5000
3001

5003 023522
5004 023526

5005 023530

3007
5009 023532

010467
062767
004767
005767
001404
032767

001437

161624
000003
176010
156514
000100

004767

60%

JSR
BCS

PC.GETCHR
8%

sYES,

THEN EXIT WITH TEST FAIL MESSAGE

156446

001414

062702

005201
120127

002761

186:

175742

000100

000400

208:

156374

005701

5026 023610
5027 023612
5028 023616

005002
012701
000753

100000

5030 023620

010467

161472

sLOOP TO WAIT CHAR'OR TIME-OUT IF BUFFER EMPTY.

JUSR

228:

sCHECK
sCLEAR
:CLEAR
sFORCE

1ST
BEQ
BIT

FERROR
223
4BITO6,0PTION

sHAS AN ERROR BEEN DETECTED ?
iNO, THEN BRANCH.
;HAS EXTENDED ERROR REPORTING BEEN REQU
ESTED.

ADD

IN
CMPB
ST

BMI

605

i TURN OFF DUT RX INTERRUPTS.

PC.TXDONE
R2
Rl
PC,NEWCHR

BLT

100404

PC,RXIEO

JSR
CLR
CLR
JSR

BEG

000020

5024 023604

'READ A CHARACTER FROM THE RX BUFFER.
+IF DATA.VALID SET, GO TO CHECK THE RX
CHAR.

; USE DUMMY CHARACTERS TO FORCE ANALYSIS OF CHARACTERS IN RESYNC QUEUES.

000736

005767
001404
032767

5025 023606

165:

000642

5015 023552
5016 023556
5017 023560

5023 023602

BEQ

; DONE PROCESSING THIS
CTER.
: READ ANOTHER CHAR FROMCHARA
THE
FIFO.
i IF DATA.VALID IS SET, LOOP DUT
TO CHECK THE RECEIVED CHARACTER.
s IF DATA.VALID IS CLEAR LOOP TO WAIT FOR IT SET OR TTME OUT

174726

001462

5021 023574
5022 023576

156442

MOV
ADD
JSR
TST
3EQ
BIT

‘-

004767
103664

004767
005002
005001
004767

5020 023570

ias:

5010 023536
5011 023542
5012 023544
3018 025546

S01¢ 023566

161616

60%

Rl
R1,ONUMLNS

204
R1

603

IF TX DONE, TURN OFF DUT TX INTERRUPTS.
THE DUMMY CHARACTER.
THE LOOP COUNTER.
ONE RESYNC QUE CHAR TO BE ANALYZED.

sYES, THEN EXIT WITH TEST FAIL MESSAGE.

s INCREMENT THE LINE NUMBER IN THE DUMMY CHAR.

s INCREMENT THE LOOP COUNTER.
sTEST FOR LOOP COUNTER EQUAL TO @ OF DUT LINES
.

sLOOP IF LOOP COUNT IS NOT ALL LINES DONE
.

sCHECK FOR SECOND TIME AROUND OUTER LOOP.

sEXIT IF OUTER LOOP DONE TWICE.

CLR
MOV
BR

R2
©100000,R1
208

iCLEAR THE DUMMY CHAR FOR 2ND TIME AROUND
LOOP.
sCLEAR LOOP COUNT, SET OUTER LOOP FLAG.
sLOOP THE SECOND TIME AROUND OUTER LOOP.

MOV

Ra4.ERRNBR

sRESTORE THE ERROR NUMBER TO ITS INITIAL
VALUE.

MACRO M1200

15 MAR 84 09:48

RDCHRS

50351 023624
023624
5032 023626

004736

000207

PAGE 88-3

B11
“€0

PASS

RTS

JSR

sRESTORE GPRS.

PC,a(SP).

tRETURN

TO PREGOS

SUBRT,

1721

MACRO M1200

15 MAR -84 09:48

RDMAST

.SBTTL
R

Cll

PAGE 89

GLOBAL SUBROUTINE

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

- RDMAST

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

‘..‘...0‘0‘..‘..

REPORT

DMA_START

....‘..‘0...‘..0

BIT

ERRORS

ROUTINE

THIS

DURING THE JUST COMPLETED DMA TRAN
SMISSION.

THEY

INPUTS:

;e
ie

SUBROUTINE
ARE

CHECKS

ERRMSG

ADDRESS

ERRNBR

ERROR

TXINTF

CONTAINS

ERRBLK

3* CALLING SEQUENCE
:

3s COMMENTS:

WHICH

HAVE

PRIMARY

NUMBER
BIT

ERROR

MAP

OMA_START

MESSAGE

REPORTED

LINES

BIT

ERRURS

ANY ARE FOUND,

WITH

FOR

THIS

ROUTINE,

ROUTINE
.,

DMA_START

BIT

ERRORS.

- ADDRESS OF THE ERROR REPORTING ROUTINE
(DESTROYED),
MAY

MESSAGES

LINES

REPORTED.

3¢ OUTPUTS:

FOR

‘.00000

JSR

PRINTED

THE

OPERATOR

CONSOLE.

PC.RDMAST

IF NG LINES HAVE DMA_START BIT ERRORS,

NO MESSAGES ARE PRINTED.

;¢ SUBORDINATE ROUTINES CALLED: ER910zZ.

$~-

004567
016702
001411

‘..‘...‘.‘....0.‘.‘.

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

RDMAST::

161470
156424

SAVE

MOV

BEQ
R4

s
‘.

012767
012701

015504
012377

JSR
TXINTF ,R2

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

1SAVE CONTENTS OF GPRS RO THRU RS,

R5,PREGOS
sCALL REGISTER SAVE SUBRT,
sGET COPY OF THE DMA_START ERRORS BIT MAP.

sEXIT IF NO DMA_START ERROR BITS ARE SET.

WE HAVE SOME DMA_START BIT ERRORS

161452

MOV

MOV
P

OER9102,ERRBLK

#EM9102,R1

.““‘0.‘00

TO REPORT,

;SELECT THE ERROR REPORTING ROUTINE
.

sINDICATE THAT WE MAVE DMA _START BIT ERRO
W.

s+ REPORT “DMA_START BIT SET AFTER RESET OR
TX.ACTION ... ON LINES(S):"

104460
012767

004736
000207

o
000001

156340

ERROR
MOV

608 ;

TRAP

21 .FERROR

s INDICATE AN ERROR HAS BEEN DETE
CTED.

PC,8(SP).

PASS

nrs

>»3>>> ERROR ccccc,

JSR

CSERROR

sRESTORE GPRS,
iRETURN

PREGOS

SUBRT,

a&”

gwlfi"uu

MACRO nwo&%flm 84 09:48

5072

.SBTTL

507’

074

5078

5076
S0°7
5078

IMMEDIATELY,

CHECKED TO DETERMINE WHETHER IT IS
A SELFTEST CODE
AN MODEM STATUS CHANGE CODE OR A BMP
CODE.
THIS ROUTINE ASSUMES THAT
THE CODE INDICATES AN ERROR.
IF A BMP CODE IS FOUND IT IS NOT REPO
RTED
BUT

IS SAVED ON THE BMP CODE QUEUVE

TO BE REPORTED LATER,

R2 - CONTAINS THE ERROR CODE COMPLETE WITH
FLAGS AND LINE o,
- ERPTYP,ER

ERRTBL

RNBAND
R, ERRMSG

SET

CORRECTLY.

ERRBLK - VALUE MAY BE DESTROYED.
BMPCQGP - MAYBE UPDATED IF A BMP CODE IS ADDED
TO THE QUEUVE ,
s
s* CALLING SEQUENCE
:
JSR
PC.REPCOD

;» COMMENTS:

ssg:?

ERRNBR IS RESTORED TO ITS ENTERING VALUE BY THIS
ROUTINE .
THIS ROUT
INE REPORTS ERRORS WITH NUMB
ERS ERRNBR

5092

3 SUBORDINATE ROUTINES CALLED: ER9001,SAVBMP.
“0..

THRU ERRNBR .1,

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

004567
012767
016703

161430
014420
161410

042704

177760

010204
000304

0.....‘.0‘.‘0.“..0.00.‘0..0‘0000

REPCOD:: SAVE
161420

MOV
MOV
MOV
SWAB

BIC
]O

g{gé

5116 023770
g{{; 023772

s OUTPUTS:
3

5089

51035 023716
5104 023722
5105 023726
5106 025730
5107 023734
5108 023740
5109 023744
5110 023746
S111 023750
5112 023754
5118 023756
5114 023762
5115 023764

oot.oooo.oooo.o‘oooooooo

THIS ROUTINE REPORTS AN ERROR CODE WHICH HAS
BEEN READ FROM THE DUT
THE CODE IS

Ssgg;

gggg 023712

- REPCOD -

.oooo‘.0...‘.0.000.0.ooo

- ROUTINE TO REPORT ERROR CODE FROM DUT

S5n84
558:2

5094 023670
023670
5095 023674
5096 023702
5097 023706
5098 023710

GLOBAL SUBROUTINE

3¢ INPUTS:

ssg:,;

£0

‘0.0.“....o..o.‘o..oo.‘o

FIFO.

5081

PAGE 90

'
3®
i

558;0

D11

JSR
#ER9001 ,ERRBLK
ERRNBR,R3
R2,R4
R4

9177760,R4

3 SAVE CONTENTS OF GPRS RO THRU RS,
RS,PREGOS
3CALL REGISTER SAVE SUBRT.
;SELECT THE ERROR REPORTING ROUTINE,
sPRESERVE TME ERROR NUMBER.
sEXTRACT THE LINE NUMBER FIELD
+
FROM THE ERROR CODE WMICH WAS

.00

PASSED INTO THIS ROUTINE.

s DETERMINE THE TYPE OF CODE WHMICH IS TO BE REPOR
TED.
'-

012701
032702
001422
005267
012701
012700
040200
001003
004767
000423
122702
001416
122702

001413
000400

011173
000001

161362

011215

000300
000604
000201

2%:

000203

MOV
BIT
BEQ
INC
MOV
MOV
BIC
BNE
JSR
B8R
CMPB
BEQ
CMPB

BEQ
B

g}g

S#EM9003,R1
#BITO,R2
43
ERRNBR
#EM9004 ,R1
#300,R0
R2,R0O
28
PC,SAVBMP
603
€201 ,.R2
63
0203,R2

63
43

1SELECT MODEM STATUS CODE MESSAGE.
+TEST THE MODEM STATUS INDICATION BIT.
1GOTO REPORT ERROR IF MODEM STATUS
COOE.
sSELECT THE SELFTEST CODE ERROR NUMBER.
sSELECT SELFTEST CODE MESSAGE
.
1CHECK IF SELF-TEST OR BiP CODE.
sTRY TO CLEAR BMP BITS,
1GO CHECK FOR SELFTEST CODE IF NOT BMP,
iSAVE THE BMP CODE ON THE QUEUE.
sEXIT THIS ROUTINE,
sCHECK FOR SELF TEST NULL CODE.
sEXIT ROUTINE IF NULL CODE FOUND,
sCHECK FOR SKIP SELF TEST CODE.

sEXIT ROUTINE IF SKIP SELF TEST CODE FOUND.
1GO REPORT SELF TEST ERROR,

s REPORT “UNEXPECTED xXXXX CODE FOUND IN RECEIVE
CHAR FIFD,”
‘-

S121 023774
5122 024000
5128 024004
024004
g%gg 024006

042702
004767

177400
002154

104460
012767

000001

S126 024014

0Ca767

002200

4a3;

156210

BIC
JSR
ERROR

#177400,R2
PC, TXROFF

MOV

#1,FERROR

JSR

PC, TXRON

sREMOVE UPPER BYTE OF CODE TO BE REPORTED.
sTURN OFF TX AND RX DURING ERROR REPORTIN
G.
;
>»>>»> ERROR «¢cccc,
TRAP
CSERROR
s INDICATE THAT AN ERROR MAS BEEN FOUND,
sTURN TX AND RX BACK ON,

127

Oek! r MRl, TIERTs
'

macro 1209

5127

- ¥R - 84 09:48
J38M
S

El1l

PAGE 90-1

.£0

?:g

;s RESTORE TeE INITIAL ETMOR NUMBER.

~ha

g{;? 024020

010367

5132 024024
0240,24
5133 024026

004736
000207

161272

63:

MOV

60%:

PASS
RTS

R3 _,ERRNBR

JSR

;RESTORE GPRS.

PC.a(SP).

tRETURN TO PREGOS SUBRT,

124

&'.&h'

f;wfl';mu

MACRO mgo&

5135

g :MAR -84 09:48

.SBTTL

5]“

5137

5143

GLOBAL SUBROUTINE

;s INPUTS:

;¢ OUTPUTS:

3{;3

ADDRESS

ERSMRF

“REPORT ERROR SUMMARY FOR LINE" FLAGS
.

;¢ COMMENTS:

JSR

g{gg

5158

s* SUBORDINATE ROUTINES CALLED:

$~~

5161 024030
024030

5162 024034
g}g: 024090

004567

005767
001404

gigg 024042

1ST
BEQ
'O

012767

PC.REPSMR

ERSMRF
608

JSR

.“‘0.‘..‘O‘.“““.“‘.‘.00‘0000

000.0‘000

i SAVE CONTENTS OF GPRS RO THRU RS,

RS ,PREGOS

sCALL REGISTER SAVE SUBRT.

sCHECK THE “PRINT LINE ERROR SUMMARY"
FLAGS.
sEXIT WITHOUT ACTION IF NO SUMMARY FLAGS SET.

161252

MOV
Ll

9ER9004 ,ERRBLK

: REPORT

104460

;SELECT ERROR REPORTING ROUTINE.

"ERROR SUMMARY REPORT FOR LINES WITH EXCE
SSIVE NUMBERS OF ERRORS;
-

ErmOR

TRAP

5174 024052
024052
5175 024054

CONSOLE .

015070

g%;g

5172 024050

OPERATOR

3 WE HAVE SOME ERROR SUMMARIES TO REPORT.

5169

si v 024050

THE

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

156440

3{22

BE PRINTED AT

RIES IN THIS ROUTINE ARE REPORTED AS ERROR
S,

REPSMR:: SAVE

161270

MESSAGE
.

THE CONTENTS OF ERRBLK ARE DESTROYED.

3%23

ERROR

IF NO LINES HAVE EXCEEDED THE MAXIMUM NUMBE
R
INDIVIDUAL
ERRORS TO REPORT, NO MESSAGES ARE PRINTED BY OF
THIS
ROUT INE .
ERROR SUMMA

5154
5155

PRIMARY

ERRBLK - ADDRESS OF ERROR REPORTING ROUT
INE (DESTROYED).
SUMMARY MESS

3¢ CALLING SEQUENCE:

5153

AGES MAY

g%gé

ERCNTS - LABEL AT BASE OF LINE ERROR COUNTERS TABLE .

ERRMSG

ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROUTI
NE.

5148

‘.0000.....0.0.000o

CAN BE SPECIFIED By THE OPERATOR IF
HE/SHE ANSWERS THE SOF TWARE PARAMETER Q'EST
IONS.

3{2‘7'

THIS SUBROUTINE REPORTS AN ERROR SUMMARY
THOSE LINES WHICH HAVE
EXCEEDED THE NUMBER OF INDIVIDUAL ERRORS FOR
TO
REPO
RT FOR A SINGLE LINE
IN A SINGLE TEST.
THIS PARAMETER

5145

- REPSMR

- REPORT ERROR SUMMARY ROUTINE

;e
i

5144

£EQ

.0...0.0..0.0.00...0.000.0.0

;e
;e

5140
gi:;

PAGE 91

0000000.000.0.00.‘000.0.00.0

5138
5139

F11

004736
000207

608

PASS

RTS

JSR

;RESTORE GPRS,
PC,8(SP).

CSERROR

sRETURN TO PREGOS SUBRT,

17"

ErBeA! SRSl
-

Ting
1S1

PARTA

— TM
M

S-MAR 84 09:48

5177

.SBTTL

Sj 70

GLOBAL

PAGE

Gl1

SUBROUTINE

;0.00.“.0.‘.0.0.0“‘..0..0...

5179

5180

- RESET DEVICE UNDER TEST

5181

g{.:g

5184

THIS SUBROUTINE IS USED TO RESET THE DUT TO
A KNOWN STATE.
RESET DOES NOT SUCC

AN ABORT TEST ERROR MESSAGE IS REPORTED.

g::g

INDICATES

IESTAT

]

024056

ggg} 024062

004567

012702

161242

MOV

INTERRUPT

ENABLE

FLAGS

BITS

ABORTED.

ARE

CLEARED.

THE

DUT'S

CSR

ARE

CLEARED.

PC,RESETT

THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITI
AL ERRNBR

THIS ROUTINE

DOES NOT DESTROY

THE

VALUE

ERRNBR.

010277

156106

004767

000504

2%:

005003

MOV

JSR

R2,8CSRA

PC,SKPSTS

+GET THE ADDRESS OF THE DUT'S CSR.
sCHECK STATE OF MASTER RESET BIT,
tDCN'T DELAY IF MR IS ALREADY CLEAR.
sSET UP DESIRED STATE OF MASTER RESET
BIT,
+PASS TIME-OUT VALUE OF S SECONDS.
sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR
,
:GO REPORT ERROR IF TIMEOUT OCCURRED.

$SET MASTER RESET BI7, DISABLE TX AND RX
INTS,

sTRY TO SKIP THE SELFTEST,

SET SELF-TEST TIME-OUT OF 5 SECONDS, AND WALT
FOR M.R TO CLEAR,
IF TIME-OUT OCCURS, THEN REPORT THE FATAL ERROR
AND PASS-0UT THE ABORT
TEST INDICATO
R.

‘-

011610
174740

INDICATOR,

:
:

012701
004767
103410

CSRA,R4
R2,(R4)
28
R3
#5000. ,R1
PC,MSLGET
4%

TEST

S
3 SET MASTER RESET BIT IN CSR.
CLEAR TX AND RX ENABLE BITS, ETC.
3
SKIP THE SELFTEST.
i+
TIML-OUT OF S SECS, JUST IN CASE THE SELF
-TEST EXECUTES.

F R

ggg;

$SET BIT MASK OF MASTER RESET BIT,

IF TIME-OUT OCCURS, REPORT THE ERRO
R AND PASS-OUT ABORT

MOV
BIT
BEQ
CLR
MOV
JSR
BCC

011610
174764

156062

#B8IT05,R2

s SAVE CONTENTS OF GPRS RO THRU RS,
RS ,PREGOS
:CALL REGISTER SAVE SUBRT.

IF MR IS SET THEN WAIT FOR SELF -TEST TO COMP
LETE.

016704
030214
001406
005003
012701
004767
103012

JSR

t..‘.“‘0‘0000

TEST THE STATE OF THE MASTER RESET 8IT IN
THE CSR.

5225
5226
5229 024122

JSR

SAVE

5217
5218
5219
ssggg

5230 024124
5231 024130
5232 024134

RESETT::

000040

ggg;

gggz 024116

AND

INTERRUFT

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

5206

5222 024112

AND RX

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

5205

5209 024066
5210 024072
5211 024074
5212 024076
5213 024100
5214 024104
ggig 024110

upP CORRECTLY.

i+ SUBORDINATE ROUTINES CALLED: DELAY ,MSLGET.

5200

5201
5202 024056

SET

TEST

:®

;» COMMENTS:

5199

THE

ERRBLK - VALUE MAY BE DESTRGYED.

5196

THEN

THE DUT PERFORMS ITS RESET FUNCTION INTO
A KNOWN STATE.
- CLEAR

CARRY

3+ CALLING SEQUENCE:

g%:;

OCCURS,

TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFE
R COUNT REGISTER.

g}g‘s

TIME-OUT

ERRTBL- ERRTYP,ERNBR
AND
, ERRMSG

5191

IE.

5190

COMPLETE,

CSRA - CONTAINS THE ADDRESS OF THE CSR

;+ OUTPUTS:

5189

ESFULLY

;¢ INPUTS:

5188

0...0000.‘00‘00.000

i s

g}gg

5185

RESETT

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

CLR

MOV
JSR
BCS

#5000, ,R1
PC,MSLGET
63

sSET UP DESIRED STATE OF MASTER RESET BIT.

;PASS TIME-OUT VALUE OF S5 SECONDS.
sWAIT FOR SELF-TEST TO COMPLETE, MR CLEAR
.
s SKIP ERROR REPORT IF MR CLEARED IN TIME.

BrBaAl SBholTine
"

MACRO H%sé?iw-u 09:48

5239
5240
5241 024150
024150
5242 024152
5243 024154
5244
5245
5246

012701
012767

010111
014070

SET UP ERROR MESSAGE TO REPORT
“FATAL ERROR FOUND DURING RESE
T,TEST ABORTED".
INDICATE TEST IS TO BE ABORTED BY
CLEARING THE CARRY BIT.

104460
000241
000403

MOV

©EM1601,R1

ERROR

CLC

: INDICATE TEST IS TO BE ABORTED.

004736

000207

156052

»»>>>

ERROR

c¢cccc

TRAP

CSERROR

:EXIT THIS SUBROUTINE, ABORT TEST
INDICATOR,

C05067
000261

iPASS ERROR MESSAGE TO REPO

RT.
MOV
9ER1603,ERRBLK ;PASS ADDRESS OF ERROR
HANDL ING ROUTINE
.,
sREPORT ERROR “TIME-OUT OCCURRED WAITING FOR
MASTER RESET TO CLEAR"
; “TEST ABORTED*

5247

5248 024156
5249 024162
5250
5251 024164
024164
5252
5e53 024166
5254

“E0

161152

Ner
o0 w0 =

5237 024136

5238 024142

F TR

5233
5234
5235
5236

H11

PAGE 92-1

CLEAR TX AND RX INTERRUPT ENABLE STAT
US FLAGS IN IESTAT,
EXIT WITH CONTINUE TEST INDICATOR SET
(IE.CARRY SET),

608:

CLR

SEC

IESTAT

PASS
RTS

sCLEAR TX AND RX INTERRUPT STATUS FLAGS.

s INDICATE SUCCESS, CONTINUE TEST.

JSR
PC

tRESTORE GPRS,

PC.a(SP)+

PASS

THE FOLLOWING

INVACT:

:RETURN TO PREGOS SUBRT.

sCARRY BIT:IF CLEAR,INDICATES ABOR
T

TEST.

137

FINC

GLOBA.

75T

PARTE

S BROUTINE

MACRO

M1200

15 -MAR -84

RRXNDN

558

5,59

5564

5066

320’
208

;e
.

g?;g
5274

:0 COMMENTS:

;e
&

5277

024170
5281 024174

5282 024176
gggz 024202

$--

004567
010502

FOUND,

ERROR NUMBER OF

- LABEL AT BASE OF

THEY

ARE

046702
001413

ERROR REPORTED

JSR

MOV

BIC
BEQ

ROUTINE.

TABLE
.

IF NO LINES FAILED TO COMPLETE THEIR RECEPTION, NO MESSA
GES
PRINTED.

ARE

012767
012701
012704

R5,R2

JSR

RXDONF ,R2
60$

015204
011661
003542

161110

MOV
MOV
MOV

g
104460

012767
004736

000207

.‘.......‘.0.00

; SAVE CONTENTS OF GPRS RO THRU RS.
RS ,PREGOS
;CALL REGISTER SAVE SUBRT,
:GET COPY OF THE LOCAL ACTIVE LINES BIT
MAP,

sGET MAP OF ACTIVE LINES WITH RX DONE FLAG
CLR.
$EXIT IF NO ACTIVE LINES HAVE RX DONE FLAG
CLR,

: WE HAVE SOME "RX NOT COMPLETED” ERRORS
TO REPORT,

5294

5299 024234

THIS

PC .RRXNDN

OER9005,ERRBLK
SEMI9016,R1
ORXCNTB . R4

;SELECT THE ERROR REPORTING ROUTINE.
s INDICATE THAT WE ARE DEALING WITH RECE
PTION,
iPASS BASE OF RX CHAR COUNTERS TABLE TO
ER9005,

s REPORT “SINGLE CHARACTER MODE TEST ERROR
; ~
:
“DATA PATTERN NOT COMPLETELY RECEIVED ON

024232

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

‘0

5298 024232

COMPLETE

THE RX CHARACTER COUNTERS

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

156302

5291
gggg
5295 024222
024222
gg:g 024224

THE

REPORTED.

- RECEPTION DONE FLAGS.

RRXNDN:: SAVE

161130

gggz
5287 024204
5288 024212
gggg 024216

ARE

:o SUBORDINATE ROUTINES CALLED: ER900S.

527.

$e79
5280 024170

ANY

ERRBLK - ADDRESS OF THE ERROR REPORTING ROUTINE

gg;s

(DESTROYED).
MESSAGES MAY BE PRINTED AT THE OPERATOR
CONSOLE .

: ¢ CALLING SEQUENCE:

DPLENB - BASE OF TABLE OF DATA PATTE

RXDONF

:o OUTPUTS:

gz;o
el

..O.....O..00.000...0‘0.

COMPLETED ROUTINE

RS - LOCAL ACTIVE LINES BIT MAP.

RXCNTB

3
.

5269

RN LENGTHS,
ERRMSG - ADDRESS OF PRIMARY ERRO
R MESSAGE FOR THIS ROUTINE.
ERRNBR -

5065

REPORT RECEPTION NOT

PATTERN.

:0 INPUTS:

5638

- RRXNDN

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

THIS SUBROUTINE CHECKS FOR LINES WHICH
OID NOT RECEIVE
DATA

See2

GLOBAL SUBROUTINE
-

;®

5291

11
93

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

5000

PAGE

“€E0

.SBTTL

_“‘\.‘

09:48

000001

155772

ERROR

MOV
608 ;

ALL LINES:"

¢1,FERROR

PASS

RTS

JSR

TRAP

s INDICATE AN ERROR HAS BEEN FOUND,
sRESTORE GPRS,

PC,B(SP).

CSERROR

sRETURN TO PREGOS SUBRT,

1328

BrYk! Lol
e

MACRO M120Q

1% MAR
-84 09:48
-SBTTL
R

J11

PAGE 94

“€0

GLOBAL SUBROUTINE

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

- RTXNDN

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

THIS

DATA

REPORT

SUBROUTINE
PATTERN.

:‘ INPUTS:

TRANSMISSION

CHECKS FOR
IF

ANY

ARE

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

NOT

LINES

FOUND,

COMPLETED

WHICH DID
THEY

ARE

RS - LOCAL ACTIVE LINES BITV MAP.

DPLENB

LABEL

ERRMSG

ADDRESS

ERRNBR

ERROR

TXCNTB

NUMBER

LABEL

TXDONF

TRANSMISSION

;e
3e

:0 OUTPUTS:

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

BASE

DATA

PRIMARY

BASE

ERROR

DONE

THE

NOT

TRANSMIT

LENGTH

MESSAGE

REPORTED
TX

THE

COMPLETE

REPORTED.

PATTERN

ERROR

.“.0.0

ROUTINE

CHARACTER

FOR

TABLE

THIS

ROUTINE.

THIS

ROUTINE.

COUNTERS

FLAGS.

TABLE.

ERRBLK - ADDRESS OF THE ERROR REPORTING ROUTINE (DESTROYED).

MESSAGES

MAY

PRINTED

THE

OPERATOR

CONSOLE .

:0 CALLING SEQUENCE:
JSR
PC,RTXNDN
:‘ COMMENTS :
IF NO LINES FAILED TO COMPLETE THEIR TRANSMISSION, NO MESSA
«

5321
5322
5323
5324
5325 024236
024236
5326 024242
5327 024244
%328 024250
5329
5330
5331
5332 024252
5333 024260
5334 024264
5335
5336
5337
5338
5339
5340
5341 024270
024270
5342 024272
5343
5344 024300
024300

5345 024302

GES

ARE PRINTED.

:‘ SUBORDINATE ROUTINES CALLED: ER9005.
3--

004567
010502
046702
001413

012767
012701
012704

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

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

RTXNDN::

161062

MOV

156232

015204
011645

SAVE

BIC

BEQ

R5,R2

JSR

TXDONF ,R2

60%

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

.0.00.0‘

i SAVE CONTENTS OF GPRS RO

THRU RS,

RS,PREGOS
:CALL REGISTER SAVE SUBRT,
:GET COPY OF THE LOCAL ACTIVE LINES BIT MAP,

sGET MAP OF ACTIVE LINES WITH TX DONE
FLAG CLR,

sEXIT IF NO ACTIVE LINES MAVE TX DONE FLAG CLR,

:.li HAVE SOME “TX NOT COMPLETED” ERRORS TO REPORT.
161042

MOV
MOV
MOV

003502

OER900S,ERRBLK
0EM9015.R1
OTXCNTB.
R4

;SELECT THE ERROR REPORTING ROUTINE.
s INDICATE WE_ARE DEALING WITH TRAN
SMISSION.
sPASS BASE OF TX CMAR COUNTERS TO TABLE
EROBO

; REPORT “SINGLE CMARACTER MODE TEST ERROR:"

“DATA PATTERN NOT COMPLETELY
S8 @

TRANSMITIED ON ALL LINES:"

‘-

104460
012767
004736
000207

ERROR
000001

155724

MOV
608:

PASS
RTS

»»>>> ERROR <cccc,

’

TRAP

o1.FERROR

s INDICATE THAT AN ERROR MAS BEEN FOUND
.

PC.B(SP)s

JSR

RESTORE GPRS,

CSERROR

SRETURN TO PREGOS SUBRT.

139

DHU-11 FUNC TST PARTS
GLOBAL St{BROUTINE

MACRO M1200
15-MAR-84 09:48
- RXDSBL -

5347

-.SBTTL

5348

300

5349

5350
gggé

5355

5356

INPUTS:

RS2

CORRESPOND

LINES

WHIC

CONTAINS

THE

STATE

CONTAINS

THE

ADDRESS OF

TXIE

AND

CLEAR

RX_ENABLE.

RXIE

THE LNCTRL

RS - BIT'S SET INDICATE INITIAL

STATES OF ALL RX_ENBLE BITS.
LNCTRA - THE STATE OF THE RX_ENBLE
BIT MAY BE AL TERED.

THE

CONTENTS OF

s» CALLING SEQUENCE:

5365

SET

BITS IN THE CSR.
NUMLNS - EQUATED TO BE THE MAXIMUM
NUMBER OF LINES AVAILABLE
.
LNCTRA

;+ OUTPUTS:

33322

BIT'S

H
CSRA - CONTAINS THE ADDRESS OF THE
DUT CSR.
IEST

gfié

JSR

THE

IND_ADD_REG FIELD

THE

CSR

ARE

DESTROYED,

PC,RXDSBL

;# COMMENTS:

5366

5367

s+ SUBORDINATE ROUTINES CALLED: NONE.

5368

3-~

004567
010500
012701
016702
012703
016704

005005

161014

At.a.tototac-toototta“.ootooatto

RXDSBL::

SAVE
MOV
MOV
MOV
MOV
MOV
CLR

000001
155666
000020
155702
HE4

gg;g
5380 024334
5381 024340
5382 024344
gggz 024346

THIS SUBROUTINE IS USED TO DISABLE
RECEPTION ON SELECTED LINES By,
CLEARING THE ASSOCIATED RX_ENABLE BIT ON THE
DuUT.

8360

oooooooooooo.oooaso

- DISABLE RECEIVERS -

5359

- RXDSBL -

ooo.oo..ooo.o.ooc..ooooooo.o

ggg;

5369
5370 024304
024304
5371 024310
5372 024312
5373 024316
5374 024322
5375 024326
gg;g 024332

GLUBAL SUBROUTINE

5354

<“€EQ

..oo.oo.oo.oto.o.oooocotoooo

;e
i

5353

K11

PAGE 95

010477
032712
001401
050105

28:

MOV
BIT
BEQ

BIS

gg:g

5396 024370
024370
024374
5397
5398 024376

010566
004736
000207

:SAVE CONTENTS OF GPRS RO THRU RS,
RS,PREGOS
sCALL REGISTER SAVE SUBRT.
:COPY BIT MAP OF LINES TO DISABLE RECE
PTION.
s INITIALIZE THE SELECTED LINE BIT MASK,
sGET THE ADDRESS OF THE LNCTRL REGISTER
.
+GET MAXIMUM LINE NUMBER PLUS ONE.
:GET THE STATES OF THE INT ENABLE BITS.

1LOG POSSIBLE RX DISABLED ON ALL LINES.

‘-

155640
000004

5385
030100
001402
042712
005204
006301
005303
001362

R5,R0O
#8IT0,R1
LNCTRA,R2
ONUMLNS ,R3
IESTAT.R4
RS

‘oococooa

s SELECT EVERY LINE IN TURN, AND LOG THE STATE
OF EACH RX_ENABLE BIT.

3 *

5388 024350
5389 024352
5390 024354
5391 024360
5392 024362
5393 024364
gg:; 024366

JSR

atoo.o.to..ooo.oootta“a.oooo.o..

4%:
000004

000014

R4 ,8CSRA
#BIT2,(R2)
4%

R1,R5
‘

sWRITE TO DUT CSR TO SELECT LINE REGISTER
S,
:CHECK STATE OF RX_ENABLE BIT ON SELE
CYED LINE,
i SKIP NEXT INSTRUCTION IF RX_ENABLE
CLEAR,
;LOG RX ENABLE BIT SET FOR SELECTED LINE.

CLEAR RX_ENBLE ON LINES THAT HAVE A CORRESPOND
ING BIT SET IN THE RX DISARLE
LINE BIT MAP,

6%:

BIT
BEQ
BIC
INC
ASL
DEC
BNE

R1,RO
63
#BIT72,(R2)
R4
R1
R3
2%

iCHECK STATE OF DISABLE LINE BIT MAP.
iBRANCH IF THIS LINE TO REMAIN UNAL TERED
,
sCLEAR RX_ENABLE BIT ON SELECTED LINE.
;PREPARE TO SELECT REGISTERS FOR NEXT
LINE.
sSHIFT BIT MAP FOR NEXT LINE,
sDECREMENT LINE NUMBER,
;LOOP TO CHECK NEXT LINE,

60%:

PASS

sRESTORE GPRS,EXCEPT
R5,RSSLOT(SP)
sPUT RS IN STACK SLOT,
PC,8(SP)»
sRETURN TO PREGOS SUBRT,
sRS - PREVIOUS STATES OF ALL RX_ENABLE
BITS,

RTS

MOV
JSR

140

Sbeh! S\RouTing
11 F

TST _PART4

MACRO M1200

“"RXENBL -

5400

.SBTTL

s‘o‘

FE ]

5402
5403

;e
;e

55:845

5406
5407
5408
5409

.“....0..0..

BIT ON THE DUT.

RS - BIT'S SET CORRESPOND TO LINES ON WHICH
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. TO SET RX . ENABLE .
IESTAT - CONTAINS THE STATE OF TXIE AND RXIE
BITS IN THE CSR.
NUMLNS - EQUATED TO BE THE MAXIMUM NUMBE
R
OF
LINES AVAILABLE.
LNCTRA - CONTAINS THE ADDR
ESS
THE

LNCTRL

RS - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES.
LNCTRA - THE STATE OF THE RX.E
NABLE BIT MAY BE AL TERED.
THE CONTENTS OF

s# CALLING SEQUENCE:
i *

5418
5419

- RXENBL -

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

;¢ OUTPUTS:
;e

55:29

o14P1

.‘.0.“0.0
- ENABLE RECEIVER THIS SUBROUTINE IS USED TO ENABLE RECEPTION
ON SELECTED LINES BY
SETTING THE ASSOCIATED RX.ENABLE

Ss:%g

THE IND.ADD.REG FIELD IN THE CSR ARE
DESTROYED.

JSR

PC .RXENBL

;* COMMENTS:
i

5420

i+ SUBORDINATE ROUTINES CALLED: NONE.
-~

5‘21

5422
5423 024400
024400
5424 024404
5425 024406
5426 024412
5427 024416
5428 024422

g:gg 024426

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

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

004567
010500
012701
016702
012703
016704

005005

160720

RXENBL:: SAVE
MOV
MOV
MOV
MOV
MOV
CLR

000001
155572
000020
155606
HE
4

g‘dg,‘l’
024430
024434
024440
024442

010477
032712
001001
050105

155544
000004

55:23

;

5449 024464
024464
024470

010566
004736

5452 024472

2s:

‘0

030100
001402
052712
005204
006301
005303
001362

000207

RS,RO
#8ITO.R1
LNCTRA,R2
ONUMLNS ,R3
IESTAT,R4
RS

:SAVE CONTENTS OF GPRS RO THRU RS.
RS, PREGOS
:CALL REGISTER SAVE SUBRT.
:COPY BIT MAP OF LINES TO ENABLE.
s INITIALIZE THE SELECTED LINE BIT MASK.
;GET THE ADDRESS OF THE LNCTRL REGISTER.
1GET MAXIMUM LINE NUMBER.
iGET THE STATES OF THE INT ENABLE BITS.

iCLEAR RX.ENABLE BIT LOG OF DISABLED LINES
.

i SELECT EVERY LINE IN TURN,AND LOG ANY RX.ENBLE BIT
THAT IS CLEAR,

5441 024444
5442 024446
5443 024450
5444 024454
5445 024456
5446 024460
ss::; 024462

JSR

.“.“‘00.0‘

5438

5450
545)

GLOBAL SUBROUTINE

5412
5413

L11

PAGE 96

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

;¢ INPUTS:
;e
36
;e

321‘1’

5433
5434
5435
55:39,

15-MAR-84 07:48

MOV
BIT
BNE
8IS

R4 ,8CSRA
#B1IT2,(R2)
4s
R1,.RS

sWRITE TO DUT CSR TO SELECT LINE REGISTER
S.
sCHECK STATE OF RX.ENABLE BIT ON SELE
CTED LINE.
s SKIP NEXT INSTRUCTION IF RX.ENABLE
SET.
:LOG RX ENABLE BIT CLEAR FOR SELECTED LINE.

SET RX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT

LINE BIT MAP,

SET IN THE RX ENABLE

4s:
000004

000014

68:

BIT
BEQ
BIS
INC
ASL
DEC
BNE

R1,RO
6
9BIT2,(R2)
R4
R1
R3
28

1CHECK STATE OF RX.ENABLE LINE BIT MAP.
iBRANCH IF THIS LINE TO REMAIN UNALTERE
D.
sENABLE RECEPTIONON SELECTED LINE.
sPREPARE TO SELECT REGISTERS FOR NEXT
LINE.
;SHIFT BIT MAP FOR NEXT LINE.
;DECREMENT LINE NUMBER.
;LOOP TO CHECK NEXT LINE.

608 ;

PASS

sRESTORE GPRS,EXCEPT
RS,RSSLOT(SP)
PC,8(SP).

RTS

MOV
JSR

sPUT RS IN STACK SLOT.
sRETURN TO PREGOS SUBRT.

tRS - LINE BIT MAP CORRESPONDING TO THE
3 PREVIOUS LINES THAT WERE DISABLED.

ekl SUBRolTInER
F

1S]

PARTS

5454

poaan

.SBTTL

5‘55

5456

Ss:g;

:48

;s
;e

3 COMMENTS:

5470

JSR

PC.RXIEO

THE CONTENTS OF THE INDIRECT ADDRESS
REGISTER FIELD IN

THE DUT CSR ARE DESTROYED.

;+# SUBORDINATE ROUTINES CALLED: NONE .

s"l

010046

012700
104441
042767
016777
012600
104441
012600
000207

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

RXIEO::

104440
010046

137777
155512

MOV
RO, -(SP)
GETPRI -(SP)
SETPRI #PRIO7

000340
155516
155454

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

THE RX.INT.ENBL BIT IS CLEARED IN THE DUT
CSR.
IESTST -CONTAINS THE UPDATED STAT
US OF THE TX AND RX INTERRUPT
ENABLE BITS.

g:gg

- RXIEO -

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

NONE .

s+ CALLING SEQUENCE:

S467

“EQ

THIS ROUTINE IS USED TO DISABLE RECE
IVER INTERRUPTS IN THE DHULL.

g::z

e 97

- RECEIVER INTERRUPT DISABLE -

:+ INPUTS:
;e
;+ OUTPUTS:

5463
5464

M11

GLOBAL SUBROUTINE

5462

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

5459
5460
5461

5472 024474
5473 024476
024476
02450C
5474 024502
024502
024506
5475 024510
5476 024516
5477 024524
024524
024526
5478 024530
5479 024532

-MAR

BIC
#137777,IESTAT
MOV
IESTAT,8CSRA
SETPRI (SP)+

MOV
RTS

(SP)+,RO
PC

.....‘0‘

v.‘.‘..“‘..“.“...‘..“...‘.

:SAVE CONTENTS OF RO ON THE STACK .,
i SAVE PROCESSOR PRIORITY ON STACK.
TRAP
CS$GPRI
MOV
RO, -(SP)
; IGNORE ANY INTERRUPT THAT MAY BE GENE
RATED.
MOV
OPRIO7,RO
TRAP
C$SPRI
;CLEAR RX.INT.ENBL BIT IN IESTAT.
:DISABLE RX INTERRUPTS.
;ENABLE INTERRUPTS TO THE PROCESSOR AGAIN
.
MOV
(SP)+,RO
TRAP
CS$SPRI
;RESTORE RO.

€0 14
14

MACRO M1200
-

15-MAR-84 09:48

RXIE1

5481
5482
5483

.SBTTL
see

FE
FE

GLOBAL SUBROUTINE

INPUTS:

OUTPUTS:

: &

L
L

$~-

5500 024534
5501 024542
5502 024550
5503 024556

052767

042767
016777

000207

000100
137677
155460

155472
155464
155422

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

COMMENTS:

THE RX.INT.ENBL BIT IS SET IN THE DUT
CSR.

IESTST -CONTAINS THE UPDATED STAT
US OF THE TX AND RX INTERRUPT
ENABLE BITS.

JSR

PC,RXIE1

THE CONTENTS OF THE INDIRECT ADDRESS REGISTER
F IELD IN

THE DUT CSR ARE DESTROYED.

SUBORDINATE ROUTINES CALLED:
“‘.‘.‘.“.“‘.."..“..‘

RXIE1::

NONE.

.‘.‘.‘...".... SRR

BIS

BIC

Rl“gv

IN THE DHU11.

NONE.

CALLING SEQUENCE
:

.
L

.‘Q‘...‘...‘.“.O

- RXIEl

- RECEIVER INTERRUPT ENABLE THTIS ROUTINE IS USED TO ENABLE
RECEIVER INTERRUP

SEQ

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

PAGE 98

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

5484
5485
5486
5487
5488
5489
5490
5491
5492

N11

#BIT06,IESTAT

EESTAY.ESRA

L4200 0000 0000000000400

sSET RX.INT.ENBL BIT IN IESTAT.

;CLEAR ALL OTHER BITS,

:ENABLE RX

INTERRUPTS,

EXCEPT TX AND RX I.E,

1473

DU 11

GLOBAL

FUNC

TST

PART4

SIBROUTINE

MACRO M1200

5505

15 MAR

SAVBMP

84 09:48

.SBTTL

5507
5508

;e
;e

gg?:

gg}.’»

5514

BMPCQE

LABEL

BMPCQP

gggg

3¢ CALLING SEQUENCE
:

s» COMMENTS:

JSR

3¢ SUBORDINATE ROUTINES CALLED: NONE.

010467

5539 024622
024622
5540 024624

004736
000207

2s:
608 :

PASS

002712
000004

155666

SAVE
MOV
MOvB
INC
BIC
MOV
cMe
8LO
SuUB
MOV

RTS

TEST,

THE

BMP QUEUE .

OVERWRITTEN BY ANY SUBSEQUENT ATTEMPTS TO UPDAT
E THE QUEUE.,

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

SAVBMP::

177400

END

THE OVERFLOW OCCURS THEN THE LAST LOCATION
WILL BE

5525

160540
155720
155464

THE

PC,SAVBMP

004567
016704
116724
005204
042702
010224
020427
103402
162704

AFTER

INCREMENTED By 4.

ggsz

TEST.

THE CONTENTS OF THE BMP CODE QUEUF ARE UPDAT
ED,

$--

LOCATION

TSTNUM - CONTAINS THE NUMBER OF THE CURRE
NT

1* WIPUTS:

5527
5528 024560
024560
5529 024564
5550 024570
5531 024574
5532 024576
5533 024602
5534 024604
5535 024610
5536 024612
ggg; 024616

EXECUTING

R2 - CONTAINS THE BMP CODE THAT IS TO BE PLACED ON

5526

CURRENTLY

THE QUEUE.
BMPCQP - CONTAINS ADDRESS OF NEXT LOCA
TION
BMPCOB - LABEL AT BASE OF THE BMP CODE QUEUIN THE BMP QUEUE.
E
.

gg{g

8522

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

THE

5517

- SAVE BMP CODES ROUTINE THIS ROUTINE SAVES THE PARAME
TER PASSED IN, ONTO THE BMP CODE
QUEVE
TOGETHER WITH THE NUMBER OF

- SAVBMP

0..0.‘.‘..‘.00.0.0‘.0.0.

:0 INPUTS:

;e
3o

560

GLOBAL SUBROUT INE

5512
5513

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

5511

PAGE

JSR
BMPCQP , R4
TSTNUM,(R4).
R4
2177400,R2
R2,.(R4).
R4, #BMPCQE
28
@4 R4

R4 ,BMPCOP

JSR

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

.“‘000.0.

i SAVE CONTENTS OF GPRS RO THRU RS,
R5,PREGOS
sCALL REGISTER SAVE SUUBRT.
iGET THE POINTER TO THE NEXT LOCATTON
IN QUEULE,
1SAVE THE CURRENT TEST NUMBER 0N [(ME QUELE
,
+ INCREMENT THE POINTER TO GIVE AN EVEN
ADDRESS,
1CLEAR THE UNWANTED BITS FROM THE BMP CODE
.
1SAVE THE BMP CODE ON THE QUEUE
.
1CHECK IF OVERFLOW WILL OCCUR THE NEXT
TIME,
1GO SAVE THE POINTER IF WE WILL NOT
OVERFLOW,
tRESET THE POINTER TO THE LAST LOCA
TION IN QuE,
1SAVE

THE POINTER,

1RESTORE GPRS,
PC,a(SP).

sRETURN TO PREGOS SUBRT,

144

DMU 11 FUNC ST PARTS
GLOBAL S'BROU
INE
T

MACRO M1200 -

5542
5543
5544
5545
5546
5547
5548

.SBTTL
3¢

PAGE

GLOBAL SUBROUTINE
THIS

SUBROUTINE

INITIATED.

RESET ROUTINE

se INPUTS:

SKIP

SELFTEST

IS USED
MUST

CONSIDERATIONS).

SKPSTS

oo.ooooooooooooo

AFTER

SKIP

ENTERED

THE

oooo.o.ooooooooo

ROUTINE

THE

ooooooooooo

SELFTEST

IMMEDIATELY

EXECUTION OF

AFTER

AF TER

DUT

SETTING

A BUS RESET

RESET
THE

(BECAUSE

HAS BFEN

DUT

MASTER

TIMING

CSRA - CONTAINS ADDRESS OF THE DUT CSR.

TXBFCA

CONTAINS

oooooooooooooooo

5550

“EQ

.oooooooo.oooooo

5551
5552
5553
5554
5555
5556
5557
5558
5559

Cie

100

5549

OUTPUTS:

SKIF

FEd

SELFTEST

3* CALLING SEQUENCE:

JSR

ADDRESS

CODES

ARE

DUT

WRITTEN

DMA

BUFFER

THE

DUT

COUNT

REGISTERS,

PC,SKPSTS

s* COMMENTS:

3¢ SUBORDINATE ROUTINES CALLED: DELAY.

5560

$--

5561
5562 024626
024626
5563 024632
5564 024636
5565
5566
5567
3568 024642
5569
5570
5571 024646
5572 024652
5573 024654
5574 024660
5575 024662
5576 024664
5877 024670
5578 024672
5579 024676

032701
001365

5581 024700
024700
5582 024702

004736
000207

5580

84 09:48

004567
012704
004767

160472
000012
172614

..‘.‘.“.0.0“...“.‘.‘

..I..O..‘..........“

SKPSTS::

SAVE

MOV
JSR
HEd

3
‘-

012701

000060

012703

052525

005301

016704
010124
010224
020467

103774

155320

155326

010. ,R4
PC,DELAY

JSR

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

‘O00‘..O

1 SAVE CONTENTS OF GPRS RO THRU RS,

RS, PREGOS
sCALL REGISTER SAVE SUBRT,
sPASS DELAY VALUE OF 10 MILLI-SECONDS.
iDELAY FOR 10 MILLI-SECONDS.

WRITE SKIP SELF-TEST CODE (52525)

TO ALL

THE

INDEXED DUT REGISTERS,

MCV
ONUMLNS!1BITOS.R1 ;FORM IND.ADR.REG FIEL
D (PLUS M.R. BIT) WORD,
sTHE ABOVE INCLUSION OF THE M.R., BIT IS NECESSARY
BECAUSE OF THE
3mbfi
CK OF A M.R.

4s:
6%:

000017

DEC

MOV
MOV

MOV

cHpP
BLO

BIT WRITE LOCK-OUT ON THE DMU-11.

CSRA, R4
R1,(R4).

+INITIALISE THE SKIP SELF -TEST CODE.

sSELECT THE NEXT SET OF DEVICE REGI
STERS.

1GET THE ADDRESS OF THE CSR OF THE DUT.
1SELECT A BANK OF DUT REGISTERS.

R3,(R4).

(WRITE

THE CODE

TO A DUT REGISTER.

R4, TXBFCA
6%

BNE

1COMPARE POINTER WITH LAST REGISTER ADDRESS
.
:LOOP IF NOT ALL REGS DONE IN THIS BANK
,

1LOOP UNTIL ALL REGISTERS CONTAIN THE CODE.

PASS
TS

BIT

608 ;

#52525,R3

o17,R1

sTEST FOR IND.ADR.REG FIELD DECREMEN
TED

JSR

sRESTORE GPRS,
PC,a(SP).

iRETURN

TO O.

TO PREGOS

SUBRT,

14%

BrbeAl EHROP
I R4

MACRO mzogfl&nqn-u 09:48

5584
55485
5586

.SBTTL

FAGE 101

GLOBAL SUBROUTINE
-

SPLIT

THIS

SPEED

ROUTINE

STATE,

INPUTS:

e
5e

SPLIT

SPEED

BOTH

THE

PARAME TERS

DUT

AND

THE

COPRECT

"MNSHISSIWIRECE

PHON.

TX,RX LPR CONTENTS FOR LINES

IN GROUP

IT.

LPR

START

ADDRESS

NUMBER

TIME

DATA

PATTERN

NUMBER

TIME

DATA

PATTERN

LINES

LINGRP].

LINES

L INCRP>

CONTENTS
OF

CONTAINS

THE

FOR

DATA

BIT

LINES
PATTERN

MAP

GROUP

ALL

TRANSMIT.

CURRENTLY

LGRP1M

LOPBCK - CONTAINS THE TYPE OF LOOPB
ACK MODE
CBB - LABEL AT BASE OF TX/RX CONTROL
BLOCK
.

BIT

MAP

LINE

GROUP

ACTIVE

LINES

L INES.

SELECTED.

THE CONTENTS OF THE CONTROL BLOCK ARE DESTR
OYED.

THE

INDIRECT

THE

DUT'S

THE

FOLLOWING

ADDRESS

LPR'S

AND

FIELD

LNC'S

POINTERS

MAY

AND

THE

DUT

CSR

MAY

DESTROYED.

MODIFIED.

COUNTERS

ARE

INITIALISED

CHCNT, CHRTOT ,DPEND,, DPLEN, EXCNT ,RXCNT
,RXDONF , RXPTR, TXCN) |

TX,
DO
TXPTR .NF
TXRXL .

3o CALLING SEQUENCE:

3o COMMENTS:

CO®IO
VD WN

INITIALISE

;e
3o

FESESEEEEg

;e OUTPUTS:

JSR

THE

RECEPTION.

THAT

EG,

;e
;e

BOTH

THE

TESTED

LINES

REPEAT

LINE

GROUP'1

LINES

UINE

TIMES.

GROUP

TIMES.

PC,SPLSUP

TEST FOR

;

THE ABOVE

SET-UP,

SET.UP.

SWAP

AND

THE

R2.

CONTENTS

AND

R4
.

JSR

AND

TRANSMISSION

LPR CONTENTS FOR LINES IN LGRPIM.TX=Z.RXsY
BALD.

CONTENTS

REPEAT

THME

DUT.

SWAP

LPR

CONTENTS

FOR

LPR

LINES

CONTENTS

FOR

LINES

LGRP2M,TX+Z,RX=)

LGRPIM,TXsY.RX+Z

BAUD.

BAUD
.

REPEAT

LINES

LINE

REPEAT

GROUP'1

LINES

TIMES.

LINE

GROUP

TIMES.

PC,SPLSUP

EXECUTE TEST AGAIN.

EXECUTE

ARE

JSR

GROUPS

R1 - LPR CONTENTS FOR LINES IN LGRP2M,TXsY,RX+Z BAUD.

=5
P

CAPABILITIES

LINE

56
94

PC.,SPLSUP

THIS ROUTINE SHOULD BE CALLED TWICE DURING THE
TESTING OF
SPLIT SPEE

5630

USED

ON CONTROL

PRIOR

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

SET-up

TX,RX

ACTLNS

3‘

5610

TRANSMISSION/RECEPTION
IS

‘.

SPLSUP

.......‘......0‘.6.0

TRANSMISSION/RECEPTI

5608
5609

SELGE GRE

..............‘....‘

5607

FETFEE $¥F

‘€0 145

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

5587
5588
5589
5590
5591
5592
5593
$594
5595
5596
5597
5598
5599
5600
5601
5602
5603
5604
5605
5606

D12

;D0 SET UP AGAIN.

3¢ SUBORDINATE ROUTINES CALLED: CONMAP ,RXDSBL
, RXENBL , TXRINI ,

024704
024704
024710
024714

004567
010067
010167

024724

005067

506

160414

0.‘.“‘0.0“60“.0‘0.‘..‘..

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

SPLSUP::

SAVE
MOV
MOV
CLR
CLR

155556
155554
¢

RO, 708

R1,72%

TXDONF

RXDONF

JSR

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

s SAVE CONTENTS OF THE GPR’'S RO THRU RS,
RS,PREGOS
sCALL REGISTER SAVE SUBRT,
$SAVE LPR PARAMETER FOR LINE GRP2,

;SAVE LPR PARAMETER FOR LINE GRP1,

sCLEAR THE TX DONE FLAGS FOR ALL LINES,

sCLEAR THE RX DONE FLAGS FOR ALL LINES.

SET UP THE TRANSMISSION/RECEPTION CONTROL BLOCK
10 INITIALISE

THE (L INES

0i2700
012720
010220
012720

010420
016720
046720

116720
005200
012710

156166

RO.C88

003124

@CBB+2.RO

000004

04, ,(RO)»

R2,.(RO)-

000020

016.,(RO).

155212
155252
155204
000002

004767

000702

JSR

#2,(RO)

:SET CONTENTS OF LPR PARAMS IN TX/R
X C.BLk,
+GET BASE ADDRESS OF CONTROL BLOCK.
sLNCTRL PARAMETER, ENABLE RECEIVERS.

1START ADDRESS OF DATA PATTERN.
1DATA PATTERN LENGTH SET TO
16.
iNUMBER OF DATA PATTNS TO TRAN
SMIT

PC, TXRINI

ON LINGRP2,

sBIT MAP OF LINES TO INITIALISE.
;CLEAR THE UNWANTED LINES FROM BIT MAP,
:SET LOOPBACK MODE
.
s INCREMENT ADDRESS TO ACCESS NEXT WORD.
1SET OFFSET FOR EACM TRANSMISSION STAR
T T0 2.
TO TME STATE

s INITIALISE DUT,

s SET UP CONTROL BLOCK FOR LINES IN GROUP I.

;

012700
010120
012720
010220
012720
010320
016710
046720
116720
005200
012710

003122

MOV
MOV
MOV
MOV

000004

000020

MOV
MOV
MOV

155142
155204
155134

8IC
MOVB

INC
MOV

000002
*

#CBB.RO
R1,(RO).
04,(RO).
R2,(RO).

#16.,.(R0O).
R3,(RO)+
ACTLNS,(RO)

LGRP2M,(RO)
.
LOPBCK,(RO).

RO
€2,(RO)

sGET START ADDRESS OF CONTROL BLOC
K.

sSET _LPR PARAMETER FOR LINES TO RECEIVE DATA.
iLNCTRL PARAMETER, ENABLE RECEIVERS.
:START ADDRESS OF DATA PATTERN,

:DATA PATTERN LENGTH SET

TO 16.

sNUMBER OF DATA PATTNS TO TRANSMIT ON LINGRP1.
sBIT MAP OF LINES TO INITIALISE.
sCLEAR THE UNWANTED LINES FROM BIT MAP,
sSET LOOPBACK MODE.
s INCREMENT ADDRESS TO ACCESS NEXT WORD.

$SET OFFSET FOR EACH TRANSMISSION
START

10 2.

: INITIALISE THE DUT AND THE ASSOCIATED POINTERS AND COUNTERS, TO THE STATE

CR®IIV P W= OVB~

LGRP1IM,(RO)+
kom.(m)o

“EQ

s INITIALISE THE DUT AND THE ASSOCIATED POINT
ERS AND COUNTERS,
s DICTATED BY THE CONTENTS OF THE TX/RX CONTROL
BLOCK,
i
d

w
o

ACTLNS,(RO)

HEd

5657 024776

g828x 243333

PAGE 101-1

353

010067

56435 024734
5644 024740
5645 024744
5646 024746
5647 024752
5648 024754
5649 024760
5650 024764
5651 024770
5652 024772
5653

5640
S641
642 024730

MACRO Nl%%fl_fl 84 09:48

2338343 g

BBaAl SHERolT e

025046

004767

s DICTATED By THE CONTENT S OF THE TX/RX CONTROL BLOC
K.
'.

000632

JSR

PC, TXRINI

s INITIALISE DUT,

SET-UP THE REQUIRED LPR PARAMETERS NEEDED FOR THE
CORRECT RECEPTION OF DATA
ON ASSOCIATED IN-ACTIVE LINES.
A

s
'.

012701
016702
005101
005102
040102
046702
010267
005067
016767

004767

177777
155110

155144
156034
156026
000072
000566

INITIALISE LPR PARAMETERS FOR LINE GROU
P 1.

MOV
MOV
coM
comM
BIC
8IC
MOy
CLR
MOV
JSR

156010
3

OMAPLNS ,R1
ACTLNS,R2

$SET UP BIT MAP CORRESPONDING TO ALL LINES,
sGET THE ACTIVE (TX) LINE BIT MAP,
tGENERATE A BIT MAP OF NONE EXISTANT LINES,

RL,R2
LGRP2M,R2
R2,CBMAPA
CBDPNA

sCLEAR ANY “NONE EXISTANT” INACTIVE LINES,
sONLY PASS LGRP1 ASSOCIATED LINE BIT MAP,

R1
R2

728 ,CBLPRA

PC, TXRINI

sGENERATE A BIT MAP OF

INACTIVE LINES,

$SET UP BIT MAP [N CONTROL BLOCK,

sCLEAR REPEAT TX COUNT IN CONTROL BLOCK,
1SET-UP COMPLEMENTARY LPR PARM FOR LGRP.,

s INITIALISE INACTIVE LINES IN LCRPZ,

INITIALISE LPR PARAMETERS FOR LINE GROUP 2.

147

DMU-11 FUNC T1ST PARTA
GLOBAL SUBROUT INE

5697

5698 025116
5699 025122
5700 025124
S701 025126
5702 025132

5703 025136
g;g; 025144

016702
005102
040102
046702
010267

016767
004767

MACRO M1200
15-MAR-84 09:48
- SPLSUP -

155104
155776
000036
000534

012705

004767

g;ig
S715 025160
5716 025164
g;{; 025170
5719 025174

025174
5720 025176

5721 025200
5722 025202

MOY
com
BIC
BIC
MOV

MOV
JSR

Fle

ACTLNS,.R2
R2
R1,R2
LGRP1M,R2
R2,CBMAPA

708 ,CBLPRA
PC, TXRINI

“EQ

:GET THE ACTIVE (TX) LINE BIT MAP,
:GENERATE A BIT MAP OF INACTIVE LINES,
sCLEAR ANY NONE EXISTANT INACTIVE LINES
.
sONLY PASS LGRP2 ASSOCIATED LINE BIT MAP,
:SET-UP BIY MAP IN CONTROL BLOCK ,

iSET-UP COMPLAMENTARY LPR FARAM FOR LGRP1.
sINITIALISE INACTIVE LINES IN LGRP1,

s DISABLE RECEIVERS ON ALL LINES TO ENSURE THAT
ONLY THE RECEIVERS OF THE
s ASSOCIATED ACTIVE (TX) LINES ARE

5707
g;g:

5710 025150

155756
HEd

5706

g;{% 025154

155050

PAGE 101-2

177777

ENABLED. (STAGGARED LOOPBACK
)
RE-ENABLE RECEPTION ON THE CORRECT ASSOCIATED
LINES.

MOV

177124

JSR
‘.

016705
004767
004767
004736
000207

000000
000000

OMAPLNS RS

PC,RXDSBL

sSET-UP BIT MAP FOR ALL LINES.
;DISABLE RX ON ALL LINES.

s ENABLE RECEIVERS ON ASSOCIATED (RX) LINES.
‘-

155006
172212
177204

MOV
JSR
JSR
60%:

708 :
72%:

ACTLNS,RS
PC , CONMAP
PC ,RXENBL

PASS

RTS

.WORD
.MORC

0
O

JSR

sGET ACTIVE (TX) LINE BIT MAP.
sGENERATE AN ASSOCIATED (RX) LINE BIT MAP,
:ENABLE RECEIVERS ON ASSOCIATED LINES.
sRESTORE GRP'S,

PC.a(SP).

tRETURN TO PREGOS SUBRT.,

;LOCAL STORAGE OF LLPR PARAMETER LGRP2,
+LOCAL STORAGE OF LPR PARAMETER LGRP].

147

2Bak! SYBRo0T
Ink
-

1S1

PARTS

APt

M1200

5724

;

5-MAR-84

-SBTTL

5725

5726

g;s;

PAGE

ie
L

;e
e

g;gz

THIS ROUTINE

INPUTS:

OUTPUTS:

PSW

COMMENTS:

5738

i®

g;zg

SETS

010146
012746
000002
004736
000207

160114

THE

PSW

THE

00‘0‘0.0‘0‘.‘.

CONTENTS

R1.

- CONTAINS THE NEW PSwW SETTINGS
-

SET

TO THE CONTENTS OF R1

JSR

PC,.STPSW

USED IN THE DMA ADDRESS TEST TO SET

THE PROCESSOR

PRIORITY WITHOUT MAKING A CALL TO THE DRS,

SUBROUTINES CALLED:

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

004567

STPSW -

..‘.......O...‘...‘.‘....‘.‘

- _SET PROCESSOR STATUS WORD

CALLING SEQUENCE:

g;gg

“E0Q

;e
g

5735

GLOBAL SUBROUTINE

;;g;

Gil2

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

g;zsg

5741 025204
025204
5742 025210
5743 025212
5744 025216
5745 025220
025220
5746 025222
5747
5748
5749
5750

09:48

NONE .

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

0..‘.....“‘

STPSW:: SAVE

025220
ADDR:

JSR

RS5,PREGOS

JSR

PC,a(SP).
;RETURN

MOV
MOV
RTI
PASS

R1,-(SP)
#ADDR, -(SP)

RTS

;CALL REGISTER SAVE SUBRT.

iPUSH THE NEW PSW CONTENTS ONTO THE STACHK
iPUSH THE NEW PC VALUE ONTO THE STACK
:LOAD THE NEW PC AND PSW
3

iRETURN TO PREGOS SUBRT.

149

Bi%aA! 8o
il
"

MACBR []1200

15-MAR 84 09:48

5752
5753

.SBTTL

5754

5755
5756
5757
5758
5759
5760

5761
5762
5763
5764
5765
5766
5767
5768
5769
5770
5771
5772
577% 025224
025224
5774
5775
5776
5777
5778
$779
5780 025230
5781 025234
5782 025240
5783 025242
5784 025244
5785

H1Z2
PAGE

103

€0

GLOBAL SUBROUTINE

."0000.00......‘....

TXDONE

............‘..00...

THIS

SUBROUTINE

TIME

FOR

00....0......0...6..

TRANSMISSION

DONE

.00.0.00.00000

IS USED IN THE TRANSMIS
SION/RECEPTION TESTS
TRANSMISSION TO COMP
LETE ON OUTSTANDING
LINES.

;e INPUTS:
;e

ACTULNS - CONTAINS BIT MAP OF ALL ACTIVE
LINES.
TXDO

CHCNT

DONE

TABLE

FLAGS,

SET

FOR

CONTANING

THE

NUMBER

INTERRUPTS

ARE

DISABLED.

LINES

THAT

CHARS

HAVE

SENT

TO BE

ALLOW

ALL

Tx'D.

CHARS.

OUTPUTS:

TRANSMISSION

s CALLING SEQUENCE
:

JSR

PC., TXDONE

;o COMMENTS:

3¢ SUBORDINATE ROUTINES CALLED: MSL,MUL
OOP
16U,
.‘..

$--

004567

160074

154736
155242

.‘....0‘0.0‘.0......

TXDONE:: SAVE

3
3
s
016703
016702
040203

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

JSR

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

‘0‘.00‘00

1 SAVE CONTENTS OF GPRS RO THRU RS,

RS5,PREGOS

iCALL REGISTER SAVE SUBRT.

IF ANY HMAVE NOT YET COMPLETED, DETERMINE THE TX CHAR
COUNT FOR A
LINE THAT HAS OQUTSTANDING CHARACTERS TO TRANS
MIT.
USING THIS VALUE,
CALCULATE THE TIME-OUT VALUE NEEDED AT THE
CURRENTLY SELECTED BAUD RATE,

MOV
MOV
BIC
IST

005703

001427

BEQ
R

FIND A LINE

ACTLNS,R3
TXDONF ,R2

R2,R3
R3

:GET THE ACTIVE LINE BIT MAP,
sGET THE BIT MAP OF LINES THAT MAVE COMP
LETED,

sGENERATE A BIT MAP OF LINES THAT ARE STILL
sCHECK IF ALL LINES HAVE COMPLETED TX,

:GO DISABLE TXx INTERRUPTS IF ALl ODONE.

THAT HAS NOT COMPLETED

TRANSMISSION.

+ OBTAIN THE EXPECTED CHARACTER COUNT FOR
THAT LINE (WHICH IS THE SAME FOR
# ALL OTHER LINES

WITH OUTSTANDING TX‘S),
3 CALCULATE TIME-OUT VALUE,

005004
012702

030203

2s:

001003

006102
00
000773
006304
016401
016702
004767

006301

CLR
MOV
BIT
BNE
ROL

003442
154746
174134

INC
BR

43;

ASL

MOV
MOV
JSR
ASL

R4
#1,R2

R2,R3
4%

R4
2%

CHCNTB(R4
,R1
)
RXTOUT ,R2
PC,MUL 16V
R1

sCLEAR LINE NUMBER COUNTER,
s SELECT BIT MAP FOR THE FIRST LINE.

sSEE IF THIS LINE HAS COMPLETED,
$BRANCH IF THIS LINE HAS NOT COMPLETED Tx,

sSHIFT THE LINE BIT MAP FOR THE NEXT LINE.

s INCREMENT THE LINE NUMBER COUNTER,
;LOOP TO CHECK THE NEXT LINE,

sLINE NUMBER X 2 TO OBTAIN OFFSET

INTO TABLE.

;GET THE EXPECTED NUMBER OF CHARS T0 BE TX'D,
1GET THE CURRENT TIME-OUT VALUE FOR ONE CHAR.
s(NUMBER OF CHARS TO TX) X (TIME-OUT OF | CHAR)
sMULTIPLY DELAY TIME BY 2 TO GIVE A SAFE VALUE
,

:.HAIY FOR ALL OUSTANDING TRANSMISSIONS TO COMPLETE OR TIME -0UT,
5807 025306

: DISABLE ALL TRANSMISSION INTERRUPTS,
3

016702

154660

MOV

ACTLNS,R2

sPASS A BIT MAP OF THE BITS TO TEST,

150

clBeA! SHRolTInE
5808 025312
5809 025314
5810 025320
5811 025324
5812
5813 025330
025330
5814 025332

010203
012704
004767
004767

004736
000207

MACRO Hlm‘&'_m—“ 09:48

173664
000270

6%:

JSR
JSR

60%:

PASS
RTS

PAGE 103-1

[1e

PC ,MSLOOP
PC.TxIEO

JSR

SEQ

iPASS THE EXPECTED STATE OF THE TXDONF.
:PASS THE ADDRESS OF THE WORD TO TEST.
sWAIT FOR TIME-OUT OF TXx COMPLETION.
:DISABLE ALL TXx INTERRUPTS.
;RESTORE GPRS.
PC.a(sSP).

tRETURN TO PREGOS SUBRT.

151

MACRO M1290

15-MAR-84 09:48

.SBTTL
R

PAGE

J12

104

€~

GLOBAL SUBROUTINE

TXDSBL

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

;e
;e

INPUTS:

BIT'S

CSRA

SET

CORRESPOND

CONTAINS

THE

IES

CONTAINS

NUMLIS

EQUATED

TXAD2A

CONTAINS

;¢ OUTPUTS:

DISABLE

THE

TO LINES

ADDRESS
STATE

THE

TXIE

MAXIMUM

ADDRESS

WHICH

DUT

CSR.

AND

RXIE

NUMBER

THE

SELECTED

CLEAR

BITS

LINES

TBUFFAD2

LINES

8y,

TX.ENABLE.
THE

CSR.

AVAILABLE.

RS - BIT'S SET INDICATE THE INITIAL STATE
S OF ALL TX.ENBLE BITS.
TBUFFAD2
THE STATE
OF

0.0.‘00‘

TO DISABLE TRANSMISSION
ON
TX.ENABLE BIT ON THE DUT,

..“0““..“000‘.‘..‘A‘

TRANSMITTER

THIS SUBROUTINE IS USED
CLEARING THE ASSOCIATED

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

THE

CONTENTS

s+ CALLING SEQUENCE
:

JSR

THE

TX.ENBLE

IND.ADD.REG

FIELD

BIT

MAY

THE

CSR

ALTERED.
ARE

DESTROYED.

PC, TXDSBL

s+ COMMENTS:
L

#% SUBORDINATE ROUTINES CALLED: NONE.

5840 025334
025334
5841 025340
5842 025342
5843 025346
5844 025352
5845 025354

5847 025364

004567
010500
012701
016702

012703
016704
005005

157764

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

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

TXDSBL::

SAVE

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

JSR

000001
154642

MOV
MOV
MOV

R5,RO
#8IT0,R1
TXAD2A,R2

000020
154650

MOV
MOV

ONUMLNS ,R3
IESTAT R4

INC

CLR

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

i SAVE CONTENTS OF GPRS RO THRU RS,

R5,PREGOS

:CALL REGISTER SAVE SUBRT.

:COPY BIT MAP OF LINES TO DISABLE TRANSMIS
SION,
s INITIALIZE THE SELECTED LINE BIT MASK.
+GET THE ADDRESS OF THE TBUFFAD2 REGISTER,

iGET THE ADDRESS OF THE MSBYTE OF TBUFFAD2
REG.

iGET MAXIMUM LINE NUMBER PLUS ONE.
sGET THE STATES OF THE INT ENABLE BITS,

1LOG POSSIBLE TX DISABLED ON ALL LINES.

s SELECT EVERY LINE IN TURN, AND LOG THE STATE
OF EACH TX.ENABLE BIT.
‘-

010477

105712

154606

2s:

100001
050105

MOV

7STB

BPL

BIS

R4 ,3CSRA

sWRITE TO DUT CSR TO SELECT LINE REGISTERS,

(R2)

sCHECK STATE OF TX,.ENABLE BIT ON SELE
CTED LINE,

R1,.RS

;LOG TX ENABLE BIT SET FOR SELECTED LINE.

s SKIP NEXT INSTRUCTION IF TX.ENABLE
CLEAR,

: CLEAR TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX DISABLE

i
3

LR
$

000200

000014

5868
5869 025426

LINE BIT MAP,
BIT

R1,RO

BEQ

6%;:

INC
ASL
DEC
BNE

R4
R1
R3
2s

60%:

PASS

BICB

RTS

sCHECK

#BI717,(R2)

MOV

JSR

STATE OF DISABLE LINE BIT MAP,

1BRANCH IF THIS LINE TO REMAIN UNAL TERED.

sCLEAR TX.ENABLE BIT ON SELECTED LINE,

+PREPARE TO SELECT REGISTERS FOR NEXT LINE,
sSHIFT BIT MAP FOR NEXT LINE.
sDECREMENT LINE NUMBER,
1LOOP TO CHECK NEXT LINE,
sRESTORE GPRS,EXCEPT
R5,RSSLOT(SP)

iPUT RS IN STACK SLOT,

PC,8(SP),
sR5

STATES

sRETURN TO PREGOS SUBRT,
ALL

TX,.ENABLE

BI'S,

BBeAL StBolTing
""*

MACRO ”I?O?XE&'“-“-“ 09:48

5871
5872
5873
5874
5875
5876

.SBTTL

HEE

PAGE

K12

105

SEQ 15%

GLOBAL SUBROUTINE
-

THIS

SETTING

SUBROUTINE
THE

INPUTS:

CSRA

;e
;s

TRANSMITTER

USED

ASSOCIATED

5878
5879

TXENBL

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

5877

‘.....‘.‘.‘.........

ENABLE

CONTAINS

THE

CONTAINS

EQUATED

TRANSMISSION

CONTAINS

TXAD2A

STATE

THE

SELECTED

THE

TXIE

MAXIMUM

ADDRESS

DUT

AND

RXIE

NUMBER

THE

SET

BITS

LINES

TBUFFAD2

THE

3¢ CALLING SEQUENCE
:

JSR

STATE

THE

TX.ENBLE

IND.ADD.REG

FIELD

THE

CSR.

AVAILABLE.

R5 - BIT'S SET INDICATE PREVIOUSLY DISAB
LED LINES.
TBUFFAD2
CONTENTS

TX.ENABLE.

CSR.

;+ OUTPUTS:

LINES

DuUT,

TO LINES ON WHICH

ADDRESS

THE
TO

‘..‘0‘0

BIT

BIT'S SET CORRESPOND

NUMLNS

ENABLE

TX.ENABLE

IESTAT

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

BIT

MAY

THE

CSR

ALTERED.
ARE

DESTROYED.

PC, TXENBL

s COMMENTS:

3# SUBORDINATE ROUTINES CALLED: NONE.

025430
025430
025434
025436
025442
025446
025450
025454
025460

004567
010500
012701
016702
00520
012703
016704
005005

157670

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

TXENBL::

000001
154546

SAVE

000020
154554

JSR

MOV
MOV
MOV

R5,R0
#BITO,R1
TXAD2A,R2

MOV
MOV

ONUMLNS ,R3
IESTAT,.R4

INC

HEd

025462
025466
025470
025472

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

CLR

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

.‘.

s SAVE CONTENTS OF GPRS RO THRU RS.

RS,PREGOS
;CALL REGISTER SAVE SUBRT,
:COPY BIT MAP OF LINES TO ENABLE.
s INITIALIZE THE SELECTED LINE BIT MASK.

iGET THE ADDRESS OF THE TBUFFAD2 REGISTER.

sGET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG.

1GET MAXIMUM LINE NUMBER,
tGET THE STATES OF THE INT ENABLE BITS.

:CLEAR TX.ENABLE BIT LOG OF DISABLED LINES.

3 SELECT EVERY LINE IN TURN,AND LOG ANY TX.ENBLE
BIT THAT IS CLEAR,
‘-

010477
105712
100401
050105

154512

2%:

MOV
TSTB

BMI

8IS

R4,8CSRA
(R2)

R1,RS

sMRITE TO DUT CSR TO SELECT LINE REGISTERS.
sCHECK STATE OF TX.ENABLE BIT ON SELE
CTED LINE.

$SKIP NEXT INSTRUCTION IF TX.ENABLE SET,

iLOG Tx ENABLE BIT CLEAR FOR SELECTED LINE.

: SET TX.ENBLE ON LINES THAT MAVE A CORRESPONDING BIT SET IN THE TX ENABLE
i

5915
5916
5917
5918 025510
9919 025512
5920
5921 025514
025514
025520
5922
5923
5924 025522

030100
001402

152712

4%:
$

000200

006301
005303
001363

010566
004736

000207

LINE BIT MAP,

[

000014

6%;

60%;

BIT

BEQ

BISB
INC

R1,RO

1CHECK

#BITV7,(R2)
R4

+ENABLE TRANSMISSION ON SELECTED LINE.
+PREPARE TO SELECT REGISTERS FOR NEXT LINE.

ASL
DEC
BNE

R1
R3
24

PASS

MOV

JSR

RTS

STATE OF

TX.ENABLE LINE BIT MAP,

$BRANCH IF THIS LINE TO REMAIN UNALTERED,

sSHIFT BIT MAP FOR NEXT LINE.
sDECREMENT LINE NUMBER,
;LOOP TO CHECK NEXT LINE,
;RESTORE GPRS,EXCEPT
RS,R5SLOT(SP)

PC,a8(SP).

sPUT RS IN STACK SLOT,

iRETURN TO PREGOS SUBRT,

sRS - LINE BIT MAP CORRESPONDING TO THE
i

PREVIOUS LINES

THAT WERE DISABLED,

QeAl SVBRolTInE
"4
11

MACRO

5926

1209, sAg"R -84 09:48
-

5928
5929
5930
5931

;e
;e
;e
;e

s”ogg

;¢ COMMENTS:
;e

5955

g~~~

004567
016705

005104
040405

157574
154436

TX INT FLAGS (BIT

JSR

SET

TABLE.

SENT,

DMA.HO FOUND SET ON LINE).,

PC, TXFRPR

THIS ROUTINE ASSUMES THAT AT LEAST ONE DATA PATTERN
SHOULD BE
TRANSMITTED ON EACH ACTIVE LINE.

INTERRUPTS MUST BE DISABLED WHEN CALLING THIS
ROUTINE.

JSR
ACTLNS,RS
R4
R4 ,RS

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

.“““‘

s SAVE CONTENTS OF GPRS RO THRU RS,
RS, PREGOS
:CALL REGISTER SAVE SUBRT.
sGET THE ACTIVE LINE BIT MAP.

sGET BIT MAP OF LINES THAT WILL RECEIVE
DATA,
1CLEAR LINES THAT WILL RX FROM TX LINE BIT
MAP.

’-

005001

CLR

5968 025542
5969 025544
gg;? 025546

sCLEAR THE LINE NUMBER COUNTER.

s IF THE LINE IS INACTIVE SKIP TO SELECT THE NEXT LINE.

000241
006005
103017

2s:

cLC
ROR
BCC

5972
5973

RS
6%

+ LINE IS ACTIVE.
s INITIATE DMA ON THIS LINE.

gg;g

010104
006304
016403
016402

DATA PATTERN POINTERS

3 SET UP LOOP WHICH HANDLES ONE LINE PER ITERATION.

gggg

59381

TXINTF

SAVE

MOV
coM
BIC

‘0

5976 025550
5977 025552
5978 025554
g:;g 025560

00.‘.“..“‘0.0“.“‘..‘.“..“‘..

TXFRPR::

gggg

THE

CSR - DUT CSR IND.ADR.REG FIELD IS DESTROYED.
TXCNTX - COUNTERS INCREMENTED FOR LINES ON WHICH CHARS

i* SUBORDINATE ROUTINES CALLED: DODMA.

5956

ggg 025540

R4 - CONTAINS THE LINES ON WHICH TX IS TO TAKE PLACE
.
ACTLNS - ACTIVE LINES BIT MAP.
BITTBL - LABEL OF TABLE OF WORDS EACH WITH A BIT
SET.
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR.
DPENDB - BASE OF THE DATA PATTERN
END TABLE (ENTRY PER LINE).
DPLENB - BASE OF THE DATA PATTERN LENGTH TABLE
IESTAT - PRESERVED STATES OF THE DUT INTERRUPT. ENAB
LE BITS.
NUMLNS - EQUATED TO NUMBER OF LINES ON A DUT.
TXCNTB - LABLE AT BASE OF THE TX CHARACTER
COUNTER TABLE .
TXPTRB - LABEL AT BASE

s» CALLING SEQUENCE:

gggi

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

ON IF MORE THAN ONE BUFFER IS TO BE SENT.

5951
5952

- TXFRPR -

;& OUTPUTS:
s

g:gg

5
€0 154

..‘AO..
- TRANSMIT FRAMMING ERROR
ROUTINE THIS ROUTINE IS USED TO INITIATE DMA MODE DATA
TRANSMISSION
IN THE FRAMMING ERROR TEST. IT SENDS A
SINGLE CHARACTER DMA BUFFER ON
EACH ACTIVE LINE IN THE BIT MAP, TO CAUSE FUTURE TX
INTERRUPTS WHICH
WILL CONTINUE THE TRANSMISSI

gg:;

PAGE 106

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

:. INPUTS ;
i
;s
;e
;e
;e
;e
3e
;e

5945
5946

L12

GLOBAL SUBROUTINE

gzz

.0‘.‘0....0........‘...‘

5934
5935
59134
5937
8938
5939
5940
5941
5942

5959 025534
gggg 025536

.SBTTL

”27

5957 025524
025524
5958 025530

:CLEAR BOOLEAN REGISTER.
sSHIFT BIT MAP OF LINES TO TX ON INTO BOOL
.REG.
sDON’T TX ON THIS LINE IF IT IS NOT ACTIV
E.

GET THE DATA PATTERN LENGTH FOR THIS LINE.
MOV
ASL
MOV
MOV

003202
003342
HE

R1,R4
R4
DPLENB(R4),R3
TXPTRB(R4),R2

;:COPY LINE NUMBER,
sCALCULATE WORD OFFSET FOR THIS LINE.
;GET DATA PATTERN LENGTH FOR THIS LINE.
;PREPARE TO PASS DATA PATTERN ADR TO DODMA
RTN.

i WRITE DMA PARAMETERS TO THE DUT,

004767
103404

5997 025606
5998 025610

5999 025612
6000
6001 025614
025614
6002 025616

172122

JSR

B8CS

PC.DODMA

:SKIP ERROR IF DODMA WAS SUCCESSFUL .

056467
000402

002364

154464

SET THE PROPER BIT OF

BIS

BR
HE

THE

BITTBL(R4), TXINTF

INTERRUPT FLAGS

TO INDICATE

THE

LINE ERROR,

; INDICATE THE ERROR.

i SKIP UPDATING POINTERS AND COUNTERS.

;s UPDATE THE TX CHARACTER COUNT FOR THIS LINE.

‘-

060364

003502

4%:
3

;
‘-

005201
005705
001353
004736
000207

ADD

R3,TXCNTB(R4)

;ADD THE DATA PATTERN LENGTH TO TX CHAR
COUNT,

INCREMENT LINE COUNTER,GOTO NEXT LINE IF NOT
DONE
.

6%:

INC
TST

BNE
60%:

: INCREMENT THE LINE COUNTER.

:LOOP TO SEND CHAR TO ANOTHER LINE IF NOT
DONE .

s TEST THE

PASS
ars

JSR

TX LINE BIT MAP.

;RESTORE GPRS.
PC.a(SP)«

i{RETURN

PREGOS

SUBRT.

SEQ

—

PAGE 106-1

M12

HE
4

Bl EH¥RolTInE
"4

MACRO HI?O?V&HQR-“ 09:48

ClBeA! SVafolTIne
-11 F

ST PARTS

MACRO M

120d3
0 TM"

S5-MAR-84 09:48

6004

.SBTTL

6005

see

6006

:gg;

- TXIEO -

tt.oooo.ot“ooootcooo.oto

TRANSMITTER

THE TX.INT.ENBL BIT IS CLEARED IN THE
DUT CSR.
IESTST -CONTAINS THE UPDATED STATUS OF
THE TX AND RX INTERRUPT
ENABLE BITS.

s+ COMMENTS:

JSR

PC,TXIEO

THE CONTENTS OF THE INDIRECT ADDRESS
REGISTER FIELD IN

6020

s# SUBORDINATE ROUTINES CALLED: NONE.

g-=

012700
104441
042767
016777

012600
104441
012600

000207

000340
177677
154366

154372
154330

THE DUT CSR ARE DESTROYED.

‘acocooco.ooco‘ooooaaao.oatooott

TXIEO::

104440
010046

IN THE DHUL1.

3+ OUTPUTS:
i
3
;s

010046

NONE .

6021

o.t.00“0ooo‘oaoooooooooc

DISABLE

3+ INPUTS:

:g%g

6022 025620
6023 025622
025622
025624
6024 025626
025626
025632
6025 025634
6026 025642
6027 025650
025650
025652
6028 025654
6029 025656

INTERRUPT

THIS ROUTINE IS USED TO DISABLE TRAN
SMITTER INTERRUPTS

s+ CALLING SEQUENCE:

6017

<,
SEQ 156

GLOBAL SUBROUTINE

i *

:giz

107

FHE

6011
6012
6013
6014

N12

0...;0.¢¢.0..0000t.00c.‘

:ggg

PAGE

MOV
GETPRI

RO, -(SP)
-(SP)

SETPRI

#PRIO7

BIC
2177677 ,IESTAT
MOV
IESTAT,8CSRA
SETPRI (SP)»
MOV
RTS

(SP)+,RO
PC

o.ooo.aoo“‘otcotaootoo.‘aao-oooa

o.....o‘.o

sSAVE CONTENTS OF RO ON THE STACK.
i SAVE CURRENT PROCESSOR PRIORITY ON THE STACK
,
TRAP
CSGPRI
MOV
RO, -(SP)
: IGNORE ANY INTERRUPTS THAT MAY BE GENER
ATED.
MOV
#PRIO7,RO
TRAP
C$SPRI
;CLEAR TX.INT.ENBL BIT IN IESTAT,
;:DISABLE TX INTERRUPTS.
;ENABLE INTERRUPTS TO THE PROCESSOR AGAIN
,
MOV
(SP)+,RO
TRAP
C$SPRI
;RESTORE RO.

DHU-11 FUNC TST PARTS
GLOBAL StBROUT INE
6031
6032
6033
6034
6035
6036
6037
6038
6039
6040
6041
6042
6043
6044
6045
6046
6047
6048
6049
6050 025660
6051 025666
6052 025674
6053 025702

MACRO "120(') xé5~m-84 09:48
-

IxIE1

.SBTTL
are

PAGE

108

GLOBAL SUBROUTINE

...00‘00.0.0".‘.

THIS

ROUTINE

INPUTS:

OUTPUTS:

TRANSMITTER

USED

THE

s CALLING SEQUENCE
:

TX.INT.ENBL

..0.00.00

ENABLE

TRANSMITTER

BIT

SET

-CONTAINS

JSR

INTERRUPTS

THE

AND

DHULL.

THE

UPDATED

THE

DUT

STATUS

CSR.

THE

INTERRUPT

PC,TXIEL

THE CONTENTS OF THE INDIRECT ADDRESS REGI
STER FIELD IN
DUT
CSR ARE

THE

0..‘0.00.00..000

INTERRUPT

ENABLE

ENABLE BITS.

s COMMENTS:

NONE.

IESTST

TXIEl

.....0‘....0.0..

“EG

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

B13

DESTROYED.

3¢ SUBORDINATE ROUTINES CALLED: NONE.

3--

052767
042767

016777

000207

040000

137677
154334

154346
154340
154276

.0.000‘0..0‘.000‘000

TXIEl::

0.000..00..0...‘0..0

BIS

8IC

“P"KSW

OBIT14,IESTAT

9137677, IESTAT

‘I’ESTAT.xSRR

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

$SET

TX,INT.ENBL BIT

0000‘.0.0.0000

IESTAT,

;CLEAR ALL BITS EXCEPT TX RX I.E BITS,

1ENABLE

INTERRUPTS,

€y

Et&“l zimmvjfl‘mu

MACRO ""’?xu}ir"‘“ B2 09:48

6055

.SBTTIL

6056

6057
6058
6059
6060
6061

6062

6063
6064
6065
6066
6067
6068
6069
6070

6071

6072

6073

6074

6075

6076

6077
6078
6079
6080
6081

6082
6083

:3:3

6086
6087
6088
6089

6090
6091

6092

6093

6094
6095
6096
6097

6098

:?33

:{85

6103

;e
e
e
it
g

6111

- TXRINI -

.00.‘...00...‘......

RXPTRB

TXCNTB

TXPTRB

CBB

0.0..0...0.‘

e
;e

e
e

OF "NEXT RX CHAR" POINTERS
TABLE .
ADDRESS OF Tx CHMARACTER COUN
TERS TABLE ,

AT BASE ADR OF

“NEXT

TX CHAR" POINTERS

TABLE .

DUT LPR CONTENTS.

- AMOUNT TO OFFSET EACH TX START

LABEL

BASE

TX/RX

LINE

IN THE DATA PAT,

ASSOCIATION

TABLE
.

CHCNT - TABLE OF NUMBER OF LINE TX
ACTERS CINITIALIZED).
CHRTOT - MAXIMUM NUMBER OF CHARS TO CHMAR
RECE
IVE (2 « PAT LENGTH),
DPEND - TABLE OF DATA PATTERN ENDS

DPLEN

( INITIALIZED).
TABLE OF DATA PATTERN LENGTHS ( INIT
IALIZED).

TXRXL

TX/RX LINE ASSOCIATION TABLE

DUT LNCTRL - LINE CONTROL REGISTER
INITIALIZED).
DUT LPR - LINE PARAMETER REGISTERSS ( (INIT
IALIZED).
EXCNT - TABLE OF EXTRA RX CHAR COUN
TS (CLRED, SELECTED LINES),
RXCNT - TABLE OF RX CMARACTER COUNTS (CLRED, SELE
CTED LINES),
RXDONF - “RECEPTION DONE" FLAGS (CLEARED FOR
SELE
CTED
LINES),
RXPTR - TABLE OF RECEIVE POINTERS ( INITIALIZED)
.
TXCNT - TABLE OF TX CHARACTER COUNTERS (CLRED,
SELECTED LINES),
TXDONF - ~TRANSMISSION DONE“ FLAGS
(CLRED FOR SELECTED LINES),
TXPTR - TABLE OF TRANSMIT POINTERS ( INITIALIZED)
.

e
S
;e

e
L

3* CALLING SEQUENCE:

3 COMMENTS:

ADR

- LABEL AT BASE OF TX/RX CONTROL BLOCK
.

TXRXLB

;& OUTPUTS:
;e

LABEL

AT BASE
AT BASE

CBLPBA - TYPE OF LOOPBACK TO BE USED FOR TEST.

LABEL

CBOFSA

CBLNCA - DUT LNCTRL CONTENTS.
CBDPAA - ADDRESS OF BEGINNING OF
DATA PATTERN.
CBOPLA - LENGTH IN BYTES OF DATA PATT
ERN.
CBOPNA - NUMBER OF DATA PATTERNS
7O TRANSMIT.
CBMAPA - BIT MAP OF LINES TO BE INIT
IALIZED.

LABLE

CBLPRA

;e
e
e
e
;e

LABEL AT BASE ADDRESS OF RX CMARACTE
R COUNTERS TABLE .

CB CONTENTS - TX/RX CONTROL BLOCK CONTAINS THE FOLLO
WING

6110

GLOBAL SUBROUTINE

6106

2%83

0000.00.0‘0..0‘..0..

6107

Cl3
109

.00.0.\.‘..0.00.0000
000
- TRANSMIT AND RECEIVE INITIALIZATICN ROUT
INE THIS SUBROUTINE PERFORMS THE INITIALIZATION
OF THE VARIOUS POIN
COUNTERS, AND FLAGS WHICH
USED DURING THE TRANSMISSION AND TERS,
RECEPTION PORTION OF A TESTARE
.
INITIALIZATION IS PERFORME
THE SPECIFIED LINES OMLY, OTHERTHIS
LINE VARIABLES REMAIN UNCHANGEDD .ON
i*
1o INPUTS:
CHCNTB - LABEL AT BASE OF
CHARACTER COUNT TABLE .
P
CHRTOT - MAX @ OF CHARS TOLINE
RX
ON
LINES ALREADY INITIALIZED.
e
DPENDB - LABEL AT BASE OF LINE DATA PATT
ERN ENC TABLE ,
3.
DPLENB - LABEL AT BASE OF LINE DATA PATTERN
;e
EXCNTB - LABEL AT BASE ADDRESS OF EXTRA CHAR LENGTH TABLE .
e
IESTAT - PRESENT STATE OF THE RX.IE AND TX.I COUNTERS TABLE .
E BITS.
;e
NUMLNS - EQUATED TO NUMBER OF LINES ON THE DUT.
;e
RXCNTB -

6104

610%

PAGE

JSR

( INITIALIZED).

PC., TXRINI

IF THE CALCULATION OF THE CHRTOT VALUE (2 TIMES

PATTERN LENGTH) RESULTS IN A NUMBER GREATER THAN THE DATA
64K THEN
CHRTOT IS INITIALIZED TO 64K - 1,
THIS ROUTINE WILL NOT FORCE INTERNAL LOOPBACK BASED ON THE

LOOPBACK

TYPE

IN CBLPBA,

TO GET INTERNAL LOOPBACK.

SUBORDINATE ROUTINES CALLED:

THE USER MUST SET UP CBLNCA CORRECT!
v

WTWLNC,WTWLP

R,
8800004088000 0000000000087 0...‘0.““..0..0
.0.‘.

0...0.00.“00.000.‘.0.“.0‘

Brbed! CHRoIPIME~T4
6il2 025704

6112
6114
6115

025704

7
0045¢

MACRO "-lx‘OQ‘RHl-flAR 84 09:43
TXRINI::

157414

PAGE 109 1

6116 025710
€117 025714
5118 025720
6119 025726
6120 025730
6121 025734
6122 025740

JSR

025744
025750

155220
155204
155212

032700

000200
001126
155156
001146

001002

004767
016700
004767
004767

MO
MOV

cHpP
BNE
BIS
JSR
MOV
JSR
JSR

2%:

177454

CBMAPA RS
CBLNCA,RO
CBLPBA, 01
23

bb.buuuguruuu
WO VROV D W

"”“.‘”p"ppppp.‘

etk
X X T N N N NN

025754
025756
6130 025762
025766
025770
025776

026000
026004
026010
026014
026020
6144 026024
6145 026026

6146 026032
6147 026034
6148 026042

6149
6150
6151
6152 026042
6153 026050
6154
6155
6156
6157 026054
6158 026060
6159
6160
6161
6162 026064
6163 026066
6164 026074
6165 026076
6166 026100
6167 026104

016705
016703

036467
001452

CLR

MOV
MOV

155136

ADD
BIT
BEQ

43%;
3

;

5
4

016701
016702
004767
010164

060167

103403
060167
103003
012767

MOV
MOV
JSR
MOV
ADD

B8CS

154444

ADD

154434

BLOC:.

iGET THE BIT MAP OF SELECTED LINE
S.
1GET THE NEW LNCTRL CONTENTS.
sCHECK IF INTERNAL LOOPBACK MAS BEEN
SELECTED.

3SKIP SETTING INT. LOPBCK
IN MAINTENANCE FIELD.
1SET INTERNAL LOOPBACK IN MAIN
TENANCE FIELD.

CBLPRA,RO

:GET

PC,WTWLNC
PC.WTUWLPR

PC, TXENBL

;SET UP THE LNCTRL REGS FOR SELECTED
LINES.
THE NEW LPR CONTENTS.

1SET UP THE LPR REGISTERS FOR SELECTED
LINES,
sENA
BLE

TXx FOR ALL

SELECTED LINES.

R4
CBDPAA,RS

sCLEAR THE LINE OFFSET,
s INITIALIZE THE TX START ADDRESS
VAL UE.

R5,R3

1CALCULATE END ADDRESS OF

CBOPLA,R3

1GET THE LENGTH OF

THE DATA PATTERN.

THE DATA PATT

ERN,
BITTBL(R4),CBMAPA
;CHECK IF THIS LINE IS SELECTED FOR
INIT,
12%
iSKIP SET UP IF LINE IS NOT SELECTED.

TABLE.
INCLUDE CHAR COUNT ON THIS LINE IN MAX
ALLOWABLE CHAR TOTAL FOR ALL LINES.

155122
173424
003442
154452

177777

TX/RX CONTROL

THIS LINE IS SELECTED FOR INIT
IALIZATION.
SET UP PROPER ENTRY IN NUMBER OF
CHARS TO TX AND RX

155124

SUBRT,

SET UP AND BEGIN LOOP WHICH HANDLES ONE LINE
PER ITERATION.

155144
155142
002364

THRU RS,

1CALL REGISTER SAVE

€200,R0

‘-

SAVE CONTENTS OF GPRS RO

A3 PRECOS

SET P THE LPR AND LNCTRL REGISTER
S AS SPECIFIED IN THE

01670%
016700
026727

“EQ

SAVF

‘0

D13

BCC

:l:

MOV

CBDPLA,R1
CBDPNA ,R2
PC,MUL16U
R1,CHCNTB(RA)
R1,CHRTOT

R1,CHRTOT

9-1,CHRTOT

$GET THE LENGTH OF THIS LINE'S DATA
PATTERN,
tGET THE NUMBER OF PATTERNS TO TX
AND RX,
1CALCULATE THE TOTAL NUMBER OF CHAR
S TO TX/Rx,
iSET UP THE NUMBER OF TX/RX CHAR
S FOR LINE.

sADD TWICE THE NUMBER OF CHARACTERS TO
TX/RX

ON THIS LINE TO THE TOTAL NUMBER OF CMARS

ALL LINES,

WHICH WE WILL

SET MAX CHAR

ALLOW

TOTAL

TO BE RECEIVED ON

-1

IF OVERFLOW,

155062
003142

003202

SET UP THE DATA PATTERN END AND LENG
TH FOR THIS LINE.

MOV
MOV

CBDPLA,DPLENB(R4)
;SET UP TX DATA PATTERN LENGTH FOR THIS
LINE,
R3,DPENDB(R4)
1SET UP TX DATA PAT END ADDRESS FOR THIS
LINE.

: SET UP THE TX COUNTER AND CHARACTER POINTER FOR THIS LINE,

003502

CLR

003342

MOV
'0

:
3~

010402
026727

001003
006202
116202
010264

155044

cMP

BNE

005274
005234

ASR

10%;

sCLEAR THE TX COUNTER FOR THIS LINE,

$SET UP THE

TX CHAR POINTER FOR THIS LINE,

SET UP THE TX/RX LINE ASSOCIATION OFFSET
TABLE ENTRY FOR THIS LINE,
MOV

000002

TXCNTB(R4 )

R5,TXPTRB(RS)

MOvVB

MOV

R4 ,R2

TBLPBA, 02
10¢

STGTRB(R2),R2

R2, TXRXLB(R4)

$SELECT LINE OFFSET FOR NON -STAGGERED
LPBK
,

sTEST FOR STAGGERED LOOPBACK,

sSKIP SETTING STAGGERED LPBX IF NOT,

sFORM BYTE

OFFSET

INTO

TABLE FROM

TX LINE

iGET THE RX LINE CORRESPONDING WITH Tx LINE,

sLOAD Tx

TABLE ENTRY

WITH RX i INE OFFSET,

159

8‘"&“ gmo&fl':mu

“ACRO "1‘,’°?xp}2;‘"9“‘“ 09:48

6168

005062
005062
010562

003542
003242
003402

CLR
CLR
MOV
‘0

066705
020503
103403
166705
000773

155010

RXCNTB(R2)
EXCNTB(R2)

RS.RXPTRB(R2>

iCLEAR THE RX COUNTER FOR THIS RX LINE,
1CLEAR THE EXTRA CHAR COUNTER FOR THIS
RX LINE.
;SET UP THE RX CHAR POINTER FOR THIS RX LINE.

s UPDATE THE TX START POINTER IN PREPARATIO
N FOR THE NEXT LINE.
'-

12%:
143

ADD
cHP
BLO
SuUB
er

154770
g

g%gg

CBOFSA,RS
RS,R3
16$
CBDPLA,R5
14

+ADD THE TX OFFSET TO THE TX START POINT
ER.
;COMPARE TX START WITH END OF DATA PATTE
RN.
i SKIP WRAPAROUND IF START IS REFORE PAT
END.
iSUBTRACT DATA PATTERN LENGTH FROM START
,
;LOOP UNTIL START IS WITHIN DATA PATT
ERN.

3 UPDATE THE TX LINE NUMBER OFFSET TO
THE NEXT LINE.
‘-

005204
005204

16%:

INC
INC

R4
R4

‘0

2{88
6191 026146

“€0

THIS TX LINE.

:{;g

6186 026142
:{gz 026144

E13

s SET UP THE RX COUNTERS AND CHARACTER POINTER
FOR THE RX LINE WHICH
;
IS ASSOCIATED WITH

:};f

6178 026124
6179 026130
6180 026132
6181 026134
:ggg 026140

109-2

6169

6172 026110
6173 026114
:{;g 026120

PAGE

s
020427

g%gi; 026152

002706

6194 026154
026154
6195 026156

004736

000207

000040

TEST FOR DONE HANDLING ALL POSSIBLE LINES
ON THE DEVICE.
cMP

BLT
608 :

R4, ONUMLNS»2

PASS
RTS

JSR

;COMPARE OFFSET WITH 2 TIMES MAX & OF
LINES,

;LOOP IF NOT ALL LINES DONE.
;RESTORE GPRS.
PC,a(SP).

iRETURN TO PREGOS SUBRT,

160

DMU-11
GLOBAL

FUNC TST PARTA
SIBROUT INE

MACRO M1200
15-MAR-84 09:48
- TXROFF -

6197

.SBTTL

6‘”

HEEd

6199
6200

3o
i

6201
6202

g
3

6203

6204

:zgz

e 0F
658;

6209

6218
6219 026160
026160
6220 026164
026164
026166
6221 026172
026172
026176
6222 026200
6223 026204
6224 026210
6225 026214
026214
€226 026216

MAPLNS

104440
010067
012700
104441
012705
004767
010567
004736
000207

BIT

MAP OF

JSR

STAT

TX.ENBL

BITS

(BIT

SETIF

TX.ENBL

WAS

SET).

PC, TXROFF

TXDSBL .

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

SAVPRI

JSR

154056
SETPRI

60%:

THE

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

GETPRI

177777
177124
154036

TX).

SAVPRI - SAVED PROCESSOR PRIORITY,

SAVTEN

TXROFF
: : SAVE

000300

CHARACTER

- BIT MAP OF ALL POSSIBLE LINES ON THE
DUT.

3+ COMMENTS:
L
i SUBORDINATE ROUTINES CALLED:

157140

SINGLE

RE -ENABLED.

004567

.‘.‘.."0‘00.‘0.‘.0.‘000

ES OF THE
TX.ENABLE BITS AND THE PROCESSOR PRIORITY
ARE
SAVE
D
FOR
RESTORATION
WHEN TX AND RX ARE

s* CALLING SEQUENCE:

$~-

AND RECEPTION.
THIS ROUTINE ACHIEVES THIS BY BOOSTING
PROCESSOR PRIORITY TO S TO
AVOID RX INTERRUPTS AND BY CLEA
RING ALL THE DUT TX.ENABLE BITS
T0Q
HALT TX (EITHER DMA

6217

TXROFF

- TURN TX AND RX OFF ROUTINE THIS SUBROUTINE IS USED TCO TURN OFF
DUT TRANSMISSION

3* OUTPUTS:

6214
6215
6216

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

:g%g

SEG

GLOBAL SUBROUTINE

23{?

110

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

;e
s+ INPUTS:

[

PAGE

F13

oPRIOG

s SAVE CONTENTS OF GPRS RO THRU RS,
RS ,PREGOS
sCALL REGISTER SAVE SUBRT,
;GET THE PRESENT PROCESSOR PRIORITY,
sDISABLE DUT INTERRUPTS.

MOV
JSR
MOV
PASS

OMAPLNS ,RS
PC, TXDSBL
RS, SAVTEN

RTS

JSR

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

TRAP
MOV

CSGPRI
RO, SAVPRI

MOV
OPRIO6,RO
TRAP
C$SPRI
;PREPARE TO DISABLE TX ON ALL. DUT LINE
S.
sCLEAR ALL DUT TX.ENABLE BITS,
:PRESERVE THE PREVIOUS TX.ENABLE BIT
STATES.
sRESTORE GPRS,
PC.a(SP)»
:RETURN TO PREGOS SUBRT,

161

B! SHBSlFE

MACRO M1200 b TAR-84 09:48
«

PAGE

-SBTT.
%

G13

111

€0

GLOBAL SUBROUTINE

B8858488545

THIS

THIS ROUTINE RESTORES

SUBROUTINE

THE

:‘ INPUTS:

:. OUTPUTS -

STATES

USED

SAYED

AND

THE

TURN

DUT

THE

TXRON

LT T .0...‘.0...‘
..‘...0.

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

ROUTINE

DUT

TX.ENABLE

TXROFF

TRANSMISSION

BITS

AND

THE

AND

RECEPTION.

PROCESSOR PRIORITY

ROUTINE.

SAVPRI - SAVED PROCESSOR PRIORITY.

SAVTEN

BIT

MAP

TX.ENBL

BITS

(BIT

SETIF

TX.ENBL

DUT TX.ENABLE BITS - SET TO SPECIFIED STATES.

PROCESSOR

TURN

6242
6243
6244
6245
6246
6247
6248 026220
026220
6249 026224
6250 026230
6251 026234
026234
026240
6252 026242
026242
6253 026244

2888584 ,0840488

s+ CALLING SEQUENCE
:

PRIORITY

JSR

SET

SPECIFIED

WAS

SET),

PRIORITY,

PC, TXRON

;» COMMENTS:

]

;4 SUBORDINATE ROUTINES CALLED:

004567
016705
004767
016700
104441
004736

000207

157100

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

TXRON:: SAVE

154022

MOV

177174

JSR

SETPRI

154010
60$;

TXENSL.

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

JSR

SAVTEN,RS

PC, TXENBL

SAVPRI

“‘.0‘.000‘

s SAVE CONTENTS OF GPRS RO

R5,PREGOS

THRU RS,

sCALL REGISTER SAVE SUBRT,

:GET THE SAVED STATES OF THE TX.ENABLE BITS,
+SET

THE SPECIFIED

TX.ENABLE BITS.

sRESTORE THE PROCESSOR PRIORITY.

PASS
ars
T

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

JSR

TRAP

;RESTORE GPRS,

PC,a(SP).

MOV

;RETURN

SAVPRI,RO

C$SPRI

TO PREGOS

SUBRT,

162

Bl'aA! SHfR0LPInNE """

MACRO Hl:’Ov‘“&?‘—,m 84 09:48

6255

.SBTTL

62“

6257

658

6259

THIS

3o INPUTS:

6265

;e
3e
;e
3

:g;o

1
6272
6273
:g;;

R
s+ DUTPUTS:
;e
;e
3

gg;g

SUBROUTINE
WITH

3e
;e

6266
6267
6268
6269

s COMMENTS:
;e
i
i

:ggg

WHICH

ARE

FOUND

INCOMPLETE

AND

WITH

DMA_START

BITS.

ACTLNS - BIT MAP OF ACTIVE DUT LINES.

TXINTF

CONTAINS

BIT

MAP

LINES

WITH

DMA_START

BIT

ERRORS .,

CARRY FLAG - RESTORED TO ITS ENTERING VALUE
.
ERRBLK - ADDRESS OF THE ERROR REPORTING
ROUTINE (DESTROYED).
MESSAGES MAY BE PRINTED AT THE OPERATOR
CONSOLE.

JSR

PC, TXRREP

THIS ROUTINE REPORTS ERRORS AT INITIAL
ERRNBR THRU
INITIAL ERRMBR+2.
IF NO LINES FAILED TO COMPLETE THEIR
RECEPTION OR FAILED T0
COMPLETE THEIR TRANSMISSION OR HAD DMA_
START BIT ERRORS

i* SUBORDINATE ROUTINES CALLED: CW.ER%OS
.EFWIOZ.RDHASY.RRXWN.RTXWN.

6335

6286
6287 026246
026246
6288 026252
6289 026254
6290 026260

ERRORS

THEN NO MESSAGES ARE PRINTED.

6284

REPORTS

0.‘.‘....‘.0

DPLENB - LABEL AT BASE OF THE DATA PATT
ERN LENGTHS TABLE.
ERRMSG - ADDRESS OF PRIMARY ERROR
MESSAGE FOR THIS ROUTINE.
ERRNBR - ERROR NUMBER OF ERROR REPORTED
IN THIS ROUTINE
RXCNTB - LABEL AT BASE OF THE RX
CHARACTER COUNTERS TABLE
RXDONF - RECEPTION DONE FLAGS.
TXCNTB - LABEL AT BASE OF THE TX CHARACTE
R COUNTERS TABLE .
TXDONF - TRANSMISSION DONE FLAGS.

;# CALLING SEQUENCE:

6278
6279
6280
6281

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

- REPORT FINAL TX/RX ERRORS
ROUTINE

AFTER
THE COMPLETION
OF THE TX, RX, AND VERIFICATION OF DATA PATT
ERNS.
IT REPORTS ERRORS
DEALING

6263
6264

- TXRREP -

.‘.....‘............

6262

SEQ

GLOBAL SUBROUTINE

PAGE 112

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

:ggo

H13

004567
006003
016704
016705

6293
6294
6295
:g:g

026270
026276
026300
026304

032767
001003
005767
001024

000100

6298 026306
gggg 026312

005267
004767

157004
175720

6301 026316
6302 026324
6303 026326
:38; 026332

032767
001003
005767
001011

000100

6306 026334
6307 026340
6308 026344
6309 026350

005267
004767
004767
010467

156756
171036
175620
156742

SAVE
ROR
MOV
MOV

157036
153706

004767

otoo‘ono‘oooo‘ooooctooooooo‘oooo

TXRREP::

157052

:2:3 026264

‘oooooo‘.ooootaoooooooo‘otooo‘oo

175340

153664

153720

2%:
153636

153672
4%

JSR

R3
ERRNBR, R4
ACTLNS,RS

3 SAVE CONTENTS OF GPRS RO THRU
RS ,PREGOS
;CALL REGISTER
sROTATE CARRY INTO GPR TO SAVE
$SAVE THE INITIAL ERROR NUMBER
sGET THE ACTIVE LINES BIT MAP,

oauoooouo

RS,
SAVE SUBRT,
CARRY STATE.
VALUE
.,

JSR

PC,RDMAST

BIT
BNE
TST
BNE

#BIT06,0PTION
2%
FERROR
60s

sHAS EXTENDED ERROR REPORTING BEEN
REQUESTED ?
;YES, THEN BRANCH.
sHAS AN ERROR BEEN DETECTED ?
:BRANCH AND EXIT IF IT MAS,

INC
JSR

ERRNBR
PC ,RTXNDN

sSELECT INTIAL ERROR NUMBER
sREPORT TX NOT COMPLETE IF NECESSARY,

BIT
BNE
ST
BNE

081706,0PTION
4%
FERROR
604

sHAS EXTENDED ERROR REPORTING BEEN REQU
ESTED ?
sYES, THEN BRANCH,
sHAS AN ERROR BEEN DETECTED ?
;BRANCH AND EXIT IF IT MAS,

INC
JSR
JSR
MOV

ERRNBR
PC .CONMAP
PC ,RRXNDN
R4 ,ERRANBR

sSELECT INITIAL ERROR NUMBER . 2,
sGENERATE AN ASSOCIATED LINE BIT MAP,
sREPORT RX NOT COMPLETE IF NECESSARY,
sRESTORE THE INITIAL ERROR NUMBER VALUE
,

sREPORT ANY DMA_START BIT ERRORS,

167

DHU-11 FUNC TST PART4
GLOBAL SUBROUT
INE
6311 026354

6312 0263%6

026336
6313 026360

MACRO M120C
15-MAR-84 09:48
“CIXPREP -

006103
004736
000207

608 -

ROL

PASS

RIS

PAGE 112-1

i§b
[

0 164
R3
PC

;ROTATE SAVED CARRY STATE BACK INTO
CAKRY,

JSP

;RESTORE GPRS,

THIS ROUTINE

PC.B(SP)e
;i
INITIAL CARRY STATE,

PRESERVES

THE

:RETURN TO PREGOS SUBRT.

DMU-11 FUNC TST PARTS
GLOBAL StBROUTINE

MACRO M1200

15-MAR-84 09:48

- UNSDIV -

6315
6316
6317
6318
6319
6320
6321
6322
6323
6324

-SBTTL

FE R

J13

PAGE 113

aEQ

GLOBAL SUBROUTINE

- UNSDIV

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

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

UNSIGNED DIVIDE ROUTINE

THIS SUBROUTINE iS USED TO DIVIDE A 32 BIT

..‘..A“..“‘..‘.‘...

UNSIGNED DIVIDEND BY A

16 BIT UNSIGNED DIVISOR GIVING A 16
BIT GUOTIENT.

CONSIDERED TO BE UNSIGNED.

THE

QUOTIENT

s INPUTS:

WAS

TO0 BIG

MOST

LEAST

;¢ OUTPUTS:

CARRY

s* CALLING SEQUENCE:
B

CONTAINED

SIGNIFICANT

WORD

SUCCESS

FLAG,

JSR

PC,UNSDIV

SET

BITS.

16 BITS.
OF

WORD

R1 - QUOTIENT, UNSIGNED,

:0 COMMENTS:

TO Bt

R1 - THE DIVISOR, UNSIGNED.

ALL NUMBERS ARE

A SUCCESS FLAG IS NOT SET ON RETURN IF

THE

OIVIDEND,

UNSIGNED,

DIVIDEND,

UNSIGNED,

BITS.

16 BITS (177777 IF OVERFLOW).
IF

COMPLETE

QUOTIENT

FITS

IF THE DIVISOR IS O THE QUOTIENT IS RETURNED AS ALL ONES

(177777)

AND

THE

CARRY

CLEAR

REGARDLESS

THE

DIVIDEND.

+¢ SUBORDINATE ROUTINES CALLED: NONE.

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

.““.“.“C“‘.....“““.‘

UNSDIV::

SAVE
JSR

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

L1 L]

sSAVE CONTENTS OF GPRS RO THRU RS.
RS.PREGOS
iCALL REGISTER SAVE SUBRT.

} CMECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION.
:
MOV
R2,Ra
sGET MSW OF DIVIDEND FOR SUBTRACT.
Ld

SUB
BCS
MOV

177777

B8R
B

RIi R4
28
8-1.R1

sSUBTRACT DIVISOR FROM MSW OF DIVIDEND.
+IF IT DION'T GO, WE HAVE QUOTIENT
¢ 16 BITS.
sSET_QUOTIENT TO'ALL ONES (177777),

608

sEXIT WITH CARRY CLEAR,

R4
016..R0

i 2(UNSIGNED)
sSET UP INITIAL SHIFT COUNT T0 16.

R2.-(SP)

sSAVE MSWORD OF DIVIDEND.

i SET UP COUNTERS AND VARIOUS WORKING GPRS.
3:
CR
Re
sCLEAR THE LSW OF TME DIVISOR.
cLe
sCLEA
R CARRY FOR THE SHIFT OF THE DIVISOR,
ROR
Ri1
: DIVISOR BY
ROR
MOV

000020

: THE SUBTRACT AND SHIFT LOGP.
*

010246

010346
160403

103402

MOV

MOV
SUB
S8C

BCS
SUB
8cC

160102

103003

RS..(3P)
R4 RS
R2

6%
R1.R2
8

sSAVE LSWORD OF DIVIDEND.
sLSWORD DIVIDEND - LSWORD OF DIVISOR.
sMSWORD DIVIDEND - BORROW .
1 IF BORROW FROM BORROW SUBTRACT, IT DION'
T GO.
sMSWORD DIVIDEND - MSWORD OF DIVISOR.
:IF NO BORROW, IT WENT, CARRY IS CLEAR.

: IT DION'T GO, SO WE SMIFT A 1 INTO THE QUOTIENT (COMPLEMENTED LATER).

i CARRY IS SET
012603
012602

63:

MOV

(SP)+.R3

(SP)s R2

SRESTORE LSWORD OF DIVIDEND.

sRESTORE MSWORD OF DIVIDEND

.
165

BrYek! SH8olfhe
"
6371 026440
6372
6373
6374
6375
6376 026442

MACRO M1200

J3,1AR-84 09:48

000401

B
i
d

IT WENT,

113-1

K13

10s

MOV
*

1 INTO THE QUOTIENT.

SO WE RESTORE THE STACK AND SHIFT A
0 INTO QUOTIENT (WILL BE

’o

8s:

SEQ

:GOTO SHIFT

s COMPLEMENTED LATER).

6377

CARRY IS CLEAR.

(SP)e,(SP)s

;POP THE SAVED DIVIDEND OFF OF THE
STACK.

R1
R4
RO
4%
R5

:
DEVISOR BY
i
2 (UNSIGNED).
sCOUNT THIS SHIFT AND SUBTRACT.
;LOOP FOR ANOTHER SHIFT & SUB IF NOT DONE.
:GET QUOTIENT FROM INVERTED QUOTTENT.

R3
12%
R4 ,R3

sMULTIPLY LSWORD OF DIVIDEND BY 2, MSWO
RD IS 0,
+ IF CARRY FROM SHIFT, ROUND UP.
i SUBTRACT DIVISOR FROM DIVIDEND.

: SHIFT THE RESULT OF THE SUBTRACT ATTEMPT INTO THE QUOTIENT SHIF
T REG.
lOS:‘ ROL
RS
sSHIFT NEXT BIT INTO THE INVERTED QUOTIENT.
CLC
;DIVIDE THE

6378
6379

ROR
ROR
DEC
BNE
comM

6386 026460

:.W WE EITHER ROUND UP OR LEAVE QUOTIENT ALONE.
[
CLC
;CLEAR THE CARRY FOR THE SHIFT OF THE DIVI

6390 026462
6391 026464
6392 026466
6393 026470
6394 026472

ROL
BCS
SUB

B8CS

DEND,

143

: IF BORROW, DON'T ROUND UP,

: ROUND UP, EXTRA SUBTRACT WENT.
120:
INC
RS
s INCREMENT THE QUOTIENT BY ONE.
L4

6398 026474
6399 026476

PAGE

005205

BNE
DEC

6400 026500

14
RS

+IF NO OVERFLOW, WE LEAVE THE ROUND UP.
sDON'T LET ROUNDING CAUSE OVERFLOW,

3 ALL DONE, PASS QUOTIENT AND EXIT.

6404 026502
6405 026504

010501
000261

6407 026506
026506
026512
6408
6409 026514

010166
004736
000207

000004

i“z

MOV

R5,R1

60%:

PASS

RTS

SEC

sPASS QUOTIENT BACK IN R1.

s INDICATE NO OVERFLOW,
MOV
JSR

;RESTORE GPRS, LEAVE THE FOLLOWING INTACT:
R1,R1SLOT(SP)
iPUT R1 IN STACK SLOT,
PC,8(SP)+
tRETURN TO PREGOS SUBRT,
sR1 - 16 BIT, UNSIGNED QUOTIENT,
sCARRY

SET

INDICATES NO OVERFLOW (SUCCESS).

146

EeAl SYafolTIng
F

PARTS

MACRO M1200

200pobiaTM

-MAR-84 09:48

6411

.SBTTL

“12

6413

6414

o:gg

]

;» CALLING SEQUENCE:

6449 026540
6450 026542
g:g% 026546

004567

016302

TABLE.

JSR

THE

EXPECTED

CHAR

ON LINE.

PC,UPDCHR

i* SUBORDINATE ROUTINES CALLED:

NONE.

UPDCHR::

s SAVE CONTENTS OF GPRS RO THRU RS.
RS,PREGOS
;CALL REGISTER SAVE SUBRT.

156602

005234

HE4

SAVE

MOV

JSR

TXRXLB(R3),R2

uuuu‘uuuuauuuuuuuu

$GET TX LINE NUMBER OFFSET FOR THIS RX LINE,

;3 UPDATE THE RX DATA POINTER WITH WRAPAROUND AT
THE END OF THE DATA PATTERN,
o

016301

005201
020162

103402
166201
010163

003402

MOV

INC
cMP

003142

003202
003402

2%:

BLO
SuB
MOV

016301
005201
001002
012701
010163

RXPTRB(R3),R1

R1
R1,DPENDB(R2)

2%
DPLENB(R2),R1
R1.RXPTRB(R3)

iGET THE RX DATA POINTER FROM THE RX PTR
TABLE,

s INCREMENT THE RX POINTER VALUE BY
&
iCMP RX PTR VALUE WITH ADR OF END OF
DATA PAT,

i SKIP WRAPPING RX PTR AROUND IF NOT AT
END.
1WRAP RX PTR AROUND TO START OF DATA PATT
ERN,
tUPDATE THE RX POINTER WITH THE NEW VALUE
,

3 UPDATE THE RX CHARACTER COUNT WITH OVERFLOW DETEC
TION.,

‘-

003542
177777
003542

4%;

MOV
INC
BNE
MOV
MOV

RXCNTB(R3),R1
R1
43
&-1,R1
R1,RXCNTB(R3)

sGET THE RX CHARACTER COUNT.
s INCREMENT THE RX CHAR COUNT VALUE BY
L A
sSKIP SETTING COUNT TO MAX IF NO OVER
FLOW,
$SET RX CHAR COUNT VALUE TO MAX VALUE,
tUPDATE THE RX CHAR COUNT WITH NEW VALUE
,

i CHECK FOR RX COMPLETION ON THIS LINE.

agg

6466 026600

ASSOCIATION

s ouuu.uuuou.ououuuuauu
uuu

6461

6464 026572
6465 026576

NUMBER

agz
6455 026552
6456 026556
6457 026560
6458 026562
szg 026566

LINE

3+ COMMENTS:

z:;
6447 026532
6448 026534

TX/RX

FOLLOWING VARIABLES UPDATED FOR LINE ON WHIC
H CHAR WAS RECEIVED:
RXCNT - COUNT OF THE NUMBER OF CHARACTERS RECEI
VED ON LINE.
RXDONF - RX DONE FLAGS WITH BITO FOR
LINE O ... (UPDATED).
RXPTR - UPDATED

6440

6446 026526

R3 - LINE NUMBER TIMES 2 OF LINE ON WHICH
CHAR WAS RECEIVED.
BITTBL - LABEL OF TABLE OF WORDS USED TO
FORM SINGLE BIT MAPS.
CHCNTB - BASE OF NUMBER OF CHARS TO TX ON EACH
LINE TABLE.
DPENDB - BASE OF DATA PATTERN END ADDRESSES TABLE
.
DPLENB - BASE OF DATA PATTERN LENGTHS TABLE
.
RXCNTB - BASE OF THE RX CHARACTER COUN
TERS TABLE .
RXPTRB - BASE OF THE RX CHARACTER POINTERS
TABLE.
TXRXLB - BASE

TO POINT

6439

g::g 026522

LINE.

;¢ OUTPUTS:
ie
;s

6438

6441 026516
026516

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

WITH
THE RECEPTION OF A CHARACTER ON
A SPECIFIED LINE.
THE RECEIVE CHAR
POINTER IS SET TO THE NEXT EXPECTED
CHARACTER, THE RECEIVE CHAR COUNT
IS INCREMENTED, AND THE COUNT IS CHECKED
TO DETERMINE IF THE RECEPTION
IS COMPLETE.
IF THE RECEPTION IS COMPLETE THE RECEPTIO
N DONE FLAG
IS SET FOR THE SPECIFIED

is
;¢ INPUTS:
e
38
3s
:e
:s
3

6437

- UPDCHR -

- UPDATE CHARACTER POINTERS

64
6421
6422
6423
6424
6425
6426
6427

::gz

€0 187

THIS SUBROUTINE UPDATES THE PCINTERS AND COUNTERS ROUTINE AND COUNTERS ASSOCIATED

g:gz

114

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

;e
;e
;e

6430
6431
6432

E 1

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

6416
6417
6418
6433

L13

GLOBAL SUBROUTINE

6415

016204
020104

103403

003442

IF RX IS COMPLETE ON THIS LINE,
MOV
cMP

BLO

CHCNTB(R2),.R4
R1,.R4

60%

SET THE CORRECT RX DONE FLAG,

sGET THE NUMBER OF TX CHARS IN COMPLETE
X,
sCOMPARE RX CHAR COUNT WITH NUMBER OF TX
CHARS,

sEXIT ROUTINE IF NOT ALL CHARS RECE
IVED,

BBaA! SHBRolTInE
T
6467 026602

056367

6469 026610
026610
6470 026612

004736

000207

MACRO fl%’@-fl 09:48
002364

153674

BIS

60s$:

PAGE 114-1

SEQ

BITTBL(R3),RXDONF

PASS
RTS

M13

JSR

iSET THE RX DONE FLAG FOR THIS LINE.

;RESTORE GPRS.

PC,a(SP)+

iRETURN TO PREGOS SUBRT,

168

Bkl SHRolfe
h

MACRO M1200

e TM

15-MAR-84 09:48

6472
6473
6474
6475
6476
6477
6478
6479
6480

.SBTTL
s

N13

115

SEQ

4 169

GLOBAL SUBROUTINE

- VANSUP

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

‘0‘A“.‘..‘.“t“‘.

3 s

3
;e

TRANSMISSION

STATE,

PRIOR

RECEPTION

;+ INPUTS:

6483
6484
6485
6486
6487
648¢
6489
6490
6491
6492
6493
6494
6495
6496
6497
6498
6499
6500
6501
6502

RECEPTION

.“0.A.‘..“C‘.“‘A

SET-UP

ROUTINE

SINGLE

CHARACTER

DMA

TRANSMIT,

TRANMISSION,

R1 - TX, RX LPR CONTENTS.

i s

START

i s

LENGTH

DATA

NUMBER

PATTERNS

ACTLNS

3s
g

LOPBCK - CONTAINS THE TYPE OF |_OOP
BACK MODE
CBB - LABEL AT BASE OF TX/RX CONTROL BLOCK
.,

s+ OUTPUTS:

ADDRESS

CONTAINS

DATA

PATTERN

PATTERN.
BIT

TRANSMIT.

MAP

ALL

CURRENTLY

ACTIVE

THE CONTENTS OF THE TX/RX CONTROL BLOCK
(CCB) ARE DESTROYED.
INDIRECT

THE

T
;s
;s

THE DUT’'S LPR'S AND LNC'S MAY BE MODIF
IED.
THE FOLLOWING POINTERS AND COUN
TERS ARE INITIALISED;
CNCNT.CHRTOT.DPEND.DPLEN.EXCNT.RxCN
T.RXPTR.TxCNT.

LINES.

SELECTED.

ADDRESS

FIELD

THE

DUT

CSR

TXINTF

ARE

CLEARED.

MAY

DESTROYED.

TXPTR, TXRXL .

CHRTOT,

i* CALLING SEQUENCE:

s* COMMENTS:

RXDONF,

TXDONF

JSR

PC, VANSUP

AND

MODEM LOOPBACK MODE IS INHIBITED IF IT HAS
BEEN SELECTED
HARD

1 e

VIA

IS FORCED

6503
6504
6505
6506
6507

TEST.

6481

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

THIS ROUTINE IS USED
TO INITIALISE BOTH THE
DUT AND THE
TRANSMISSION/RECEPTION CONT
ROL PARAMETERS TO THE CORR
ECT

6482

6508
6509
6510
6511
6512
6513
6514
6515
6516
6517
6518
6519
6520

PAGE

WARE

P-TABLE

QUESTIONS,

TAKE PLACE.

AND

INTERNAL

LOOPBACK

MODE

i+ SUBORDINATE ROUTINES CALLED: CO,NM
RXENBL ,AP
TXRINI,
$~““‘.‘.‘.‘
...‘.‘..“.‘.‘.".‘.

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

004567
005067

005067
005067
005067

VANSUP::

156504
153652
153434
153646
153644

SAVE

CLR
CLR
CLR

CLR
HEd

3
‘-

010167
012701
005201
005201
012721
010221
010321
010421
016721
032767
001404
012702
110221

154256
003122

MOV

INC
MOV

000001

153274

RXDONF

3 SAVE CONTENTS OF THE GPR'S RO THRU
RS,
RS,PREGOS
;CALL REGISTER SAVE SUBRT,

sCLEAR TOTAL RECEIVED CHAR COUNTER.
sCLEAR FLAGS USED TO LOG DMA M,OVER ERROR
S.
iCLEAR THE TX DONE FLAGS.

;CLEAR THE RX DONE FLAGS.

SET UP THE TRANSMISSION/RECEPTION CONTR
OL BLOCK TO THE DESIRED STATE,

INC

153300

CHRTOT
TXINTF
TXDONF

JSR

‘““"0“‘““‘

MOV
MOV
MOV
8IT
MOV
MOVB

R1,C88

+SET CONTENTS OF LPR PARAMS IN TX/R
X C.BLK.

s INCREMENT ADDRESS FOR NEXT WORD

oCBB,R1

R1
#4,(R1)»

R3,(R1)+
R4,(R1).
ACTLNS,(R1)+
OBIT2,L0PBCK
2%
#1,R2
R2,(R1).

sGET BASE ADDRESS OF CONTROL BLOCK.,

s INITIALISE THE FOLLOWING IN THE CNTRL.BLK:
LNCTRL PARAMETER, ENABLE RECEIVERS,

START ADDRESS OF DATA PATTERN,
DATA PATTERN LENGTH,
NUMBER OF DATA PATTERNS TO TRANSMIT,
BIT MAP OF LINES TO INITIALISE,

s TEST IF MODEM LOOPBACK MODE HAS BEEN
SELECTED.

sDONT SELECT INTERNL LOPBCK IF STAGRD OR LOCAL
.

sFORCE INTERNAL LOOPBACK MODE TO BE SELEC
TED.
s INITIALISE LOOPBACK MODE IN CONTROL BLOCK
.

I
|

Bkl 5ol
6528 026710 000402
6529 026712
116721
6530 026716 005201
6531 026720 012711
6532
6533
6534
6535
6536 026724
004767
65387
6538
6539
6540 026730 012701
6541 026734
016702
6542 026740 005101
6543 026742
005102
6544 026744
040102
6545 026746
010267
6546 026752
005067
6547 026756
004767
6548
6549
6550
6551
6552 026762
012705
6553 026766
004767
6554
6555
6526
6557 026772
016705
6558 026776
004767
6559 027002
004767
6560 027006
027006
004736
6561 027010
000207

MACRO M1200
-

153256
000002

15 MAR 84 09:48

VANSLP

28:

43
tR4

176754

MOVE

INC

MOV

PAGE

115-1

B14

LOPBCKX,(R1).

2,(R1)

sSKIP NEXT INSTRUCTION IF IN MODE
M LOOPBACK ,

1SET LOOPBACK MODE.

s INCREMENT ADDRESS FOR

THE NEXT WORD.

$SET AMOUNT OF OFFSET EACH TX STARTS AT
T0 2.

INITIALISE THE DUT AND THE ASSOCIAT
ED POINTERS AND

COUNTERS,
s DICTATED By THE CONTENTS OF THE TX/RX CONTR
OL BLOCK,

JSR
'0

s
5

177777
153232

PC, TXRINI

THE STATE

sINITIALISE DuUT.

INITIALISE POINTERS AND COUNTERS FOR INACTIVE
LINES TO ZERO.
MOV
MOV

OMAPLNS ,R1
ACTLNS,R2

iGET THE LINE BIT MAP FOR ALL LINES,
iGET THE ACTIVE LINE BIT MAP.

comM

MOV
CLR

R2,CBMAPA
CBDPNA

com

BIC

154162
154154
176722

JSR
‘0

R1,R2

PC, TXRINI

:GENERATE AN IN-ACTIVE LINE BIT MAP,

sMOVE BIT MAP TO THE CONTROL BLOCK,
:CLEAR THE REPEAT TX COUNT IN CNTRL BLCK
,
i1SET
UP PARAMETERS FOR

INACTIVE

LINES.

s+ DISABLE RECEIVERS ON ALL LINES TO ENSURE CORRE
CT INITIALISATION OF ONLY
s LINES THAT ARE SELECTED.

THE

‘-

1777717

MOV

175312

JSR
IO

OMAPLNS ,RS
PC . RXDSBL

;SET-UP BIT MAP FOR ALL LINES,

sDISABLE RX ON ALL LINES,

s+ ENABLE RECEIVERS ON ASSOCIATED (RX) LINES.

‘-

153174

MOV

170400

175372

JSR

608

JSR
PASS
ars

ACTLNS,RS

sGET THE ACTIVE LINE BIT MAP,

PC,RXENBL

1ENABLE RECEIVERS ON ASSOCIATED LINES.
iRESTORE GPR'S.

PC, CONMAP
pe

JSR

$GENERATE AN ASSOCIATED LINE BIT MAP,

PC,a(5P).

tRETURN

PREGOS

SUBRT,

gmo&fl'fmu

MACRO HIZ%!Rgflflll“ 09:48

6563

.SBTTL

6“‘

6565
6566
6567
6568
6569

;e
;e
;e

ie
i

R2
OUTPUTS:

6581
6582
6583

- TIME-OUT VALUE AND BIT NUMBER INDICATION
:
BITS 1S THRU 12 - NUMBER OF BIT TO
TEST (RANGE O THRU 15).
BITS 11 THRU O

TIME-OUT

VALUE

IN MILLI-SECONDS

R2 - THE LAST WORD WHICH WAS
READ TO CHECK
CARRY - SUCCESS FLAG (CAR
RY SET IF BIT SET

6586

- ADDRESS OF WORD CONTAINING THE BIT TO
TEST,
MSLCNT,

1 CALLING SEQUENCE
:
;e
3e

:g::

MOV

2130040,R1

MOV

QLABEL ,R2

JSR

PC,WAIBIS

tWAIT

FOR THE CONDITION.
BEFORE TIME-QUT).

FOR

BIT

s+ COMMENTS:

3o
1* SUBORDINATE ROUTINES CALLED: MSLGET.

6589

6590
6591 027012
027012

SET.

3-- .ooooooo.ooooooooouoooooooo
ouo.uo
004567

6592 027016
6593 027020
6594 027022
6595 027026
6596 027032
6597 027034
6598 027036
6599 027040
6600 027042
6601 027046
6602 027050

010204
010102
042701
042702
000302
006202
006202
006202
016202
010203
004767

6604 027054
6605 027056
027056
027062

010002
010266
004736

6607 027064

000207

6603

(4095 MAX).

sPASS BIT 11 (13 OCTAL) AND
i__32 (40 OCTAL) MS DELATY.
s TEST BIT IN WORD AT “LABEL".

6587
6588

6606

s
ie

;

3¢ INPUTS:
;e

6578
bg;g

.0..0.‘O‘Q......

USE OF THIS ROUTINE TO LOOK FOR DEST
RUCTIVE READ CONDITIONS.

6575
2336

- WAIBIS -

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

..‘...00.
- WAIT FOR BIT SET ROUTINE THIS SUBROUTINE WAITS FOR THE
SPECIFIED BIT TO BECOME SET.
If THE
SPECIFIED BIT GOES TO A SET STATE WITHIN
THE SPECIFIED TIME -QUT
PERIOD A SUCCESS INDICATION IS RETURNED BY
THIS ROUTINE.
THE LAST VALUE WHICH IS READ i OOK
ING FOR THE CONDITION IS RETURNED
T0
ALLOW THE

6574

£0G

GLOBAL SUBROUTINE

6572
6573

Cl4a
116

‘.‘..‘..0...‘.‘..‘......

:g;g

PAGE

156306

WAIBIS::

170000
007777

002364
172020

000006

603;

SAVE
JSR

MOV
MOV
BIC
8IC
SWAB
ASR
ASR
ASR
MOV
MOV
JSR

R2,R4
R1,R2
#170000,R1
07777,R2
R2
S
R2
R2
BITTBL(R2),R2
R2,.R3
PC,MSLGET

MOV
PASS

RO,R2
R2

RTS

MOV
JSR

oouou‘uuuouuouuuuuuuuou

1 SAVE CONTENTS OF GPRS RO THRU RS.

RS,PREGOS

1CALL REGISTER SAVE SUBRT,

1SET UP THE ADDRESS PARAMETER FOR MSLG
ET,

1 SEPERATE DELAY COUNT OUT OF PASSED PARA
ME TER,
1 SEPERATE LINE NUMBER FIELD OF PASS
ED PARAM,
1PUT LINE NUMBER FIELD IN LSBYTE.

1SHIFT THE LINE NUMBER FIELD INTO THE PROP
ER
s+
POSITION TO USE IT AS A WORD TABLE OFFS
ET
s
FOR THE TABLE LOOKUP OF THME LINE BIT
MAP,

1GET BIT MAP OF LINE TO TEST FROM TABLE
.,
s INDICATE THAT THE BIT SHOULD BE SET.
tWAIT FOR THE BIT TO BE SET WITMIN
TIME -OUT,

CARRY IS CORRECT UPON MSLGET RETURN,

R2 - LAST VALUE READ LOOKING FOR CONDITION,

1PASS LAST VALUE READ AS OUTPUT PARA
ME TER,
sRESTORE GPRS, EXCEPT THE FOLLOWING:
R2,R2SLOT(SP)
tPUT R2 IN STACK SLOT,
PC.B(SP).
sRETURN TO PREGOS SUBRT,
s

CARRY

SUCCESS FLAG (SET

IF BIT FOUND SET),

BleAl EHRoPIEART4

HMACRO leoaluéicflflfl 84 09:48

6609

.SBTTL

6610

6611

“€£Q 177

GLOBAL SUBROUTINE

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

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

6612

6613
6614
6615
6616
6617
6618
6619
6620
6621
6622
6623
6624
6625
6626
6627
6628
6629
6630
6631
6632 027066
027066
6633
6634
6635
6636 027072
6637 027076
6638 027100
6639 027102
6640
6641
6642
6643 027106
6644
6645 027112
027112
6646 027114

PAGE 117

THIS SUBROUTINE

WTWLNC

.“....‘..‘000..

LINE

CONTROL

IS USED TO SET

0‘.‘...0000....

SETUP

.00...0.000

ROUTINE

THE DEVICE UNDER

TEST

CONTROL REGISTERS (LNCTRL) TO THE SPEC
IFIED STATE.
FOR THE SPE

CIFIED

s+ INPUTS:

ie
3e
;e
;e

LINES

ARE

ALTERED.

]

THE LNCTRLS

AND RX

INTERRUPT

LNCTRA

LNCTRL

- SPECIFIED DUT LINE CONTROL REGISTERS
ARE ALTERED.

CONTAINS

3+ OUTPUTS:

(DUT) LINE

ONLY

RO - NEW LINE PARAMETERS.

R5 - BIT MAP OF LINES TO BE ALTERED.
CSRA - CONTAINS ADDRESS OF THE
DUT CSR.
IESTAT - CONTAINS THE CURRENT STATE
OF THE
ENABLE BITS IN THE CSR.

i CALLING SEQUENCE
:

JSR

ADDRESS

THE

DUT

LNCTRL

REGISTERS.

PC.WTWLNC

;* COMMENTS:

i* SUBORDINATE ROUTINES CALLED:

004567

156232

....‘..‘.......0..‘.

ALTFLD.

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

WTWLNC::

SAVE

JSR

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

005.0.000

s SAVE CONTENTS OF GPRS RO

RS,PREGOS

THRU RS.

:CALL REGISTER SAVE SUBRT,

3 SET UP THE PARAMETERS FOR THE CALL TO ALTFL
D.

‘-

016701
010002
010503
012704

153112

MOV
MOV

177777

MOV

LNCTRA,R1
RO,R2
R5,R3
@-1,R4

+SET UP
4SET UP
$SET UP
sSELECT

THE
THE
THE
ALL

PARAME TER,
CONTENTS.
TO ALTER,
BE ALTERED,

s CALL THE SUBROUTINE WHMICH ALTERS THE REGISTER
CONTENTS,

‘-

004767

004736
000207

166706

JSR

60%:

PC,ALTFLD

tALTER

PC,a(5P).

PASS
are

JSR

THE REGISTER CONTENTS,

sRESTORE GPRS,
sRETURN

PREGOS

SUBRT,

DHU-11 FUNC TST PARTS
GLOBAL StBROUTINE

MACRO M1200
15-MAR-84 09:48
- WTWLPR -

6043
6649

-S8TTL
R

6650

PAGE

GLOBAL SUBROUTINE

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

6653

THIS

PARAMETER

THE

6658
6659

SUBROUTINE

LINE

CSRA

BIT

IESTAT

LPRA

]

i+ OUTPUTS:
FE

ARE

MAP

LPR

CONTAINS
-

SET
TO

THE

DEVICE

.‘..“00

SETUP

ROUTINE

UNDER

TEST

SPECIFIED

ALTERED.

LINES

CONTAINS

ADDRESS OF

CONTAINS

ENABLE BITS

(LPR)

....‘.....0.....

STATE.

(DUI)

ONLY

LINE

THE

LPRS

FOR

RO - NEW LINE PARAMETERS.

PARAMETER

USED

REGISTERS

SPECIFIED LINES

s INPUTS:

...Q.0...0.‘0...

6654
6655
6656
6657

- WTWLPR

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

6651
6652

E14

118

THE

ALTERED.

THE DUT

CURRENT

CSR,

ADDRESS

CSR.

STATE

DUT

LPR.

THE

AND

INTERRUPT

- SPECIFIED DUT LINE PARAMTER REGISTER
S ARE ALTERED.

i# CALLING SEQUENCE
:

JSR

PC,WTWLPR

i+ COMMENTS:

i SUBORDINATE ROUTINES CALLED:

$--

6671 027116
027116
6672
6673
6674
6675 027122
6676 027126
6677 027130
6678 027132

6679
6680
6681
6682 027136
6683
6684 027142

027142
6685 027144

004567

156202

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

WTWLPR::

SAVE

JSR

s
‘-

016701

153056

012704

177777

010002
010503

ALTFLD.

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

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

s SAVE CONTENTS OF GPRS RO

R5,PREGOS

SET UP THE PARAMETERS FOR THE CALL

MOV
MOV
MOV
MOV
3

LPRA,R1
RO,R2
R5,R3
#-1,R4

.o‘o‘o‘oo

THRU RS.

:CALL REGISTER SAVE SUBRT.

TO ALTFLD.

$SET UP
$SET UP
$SET UP
sSELECT

THE
THE
THE
ALL

PARAME TER.
CONTENTS.
TO ALTER.
BE ALTERED.

s CALL THE SUBROUTINE WMICH ALTERS THE REGIS
TER CONTENTS,
'-

004767

004736
000207

166656

JSR
608

PC,ALTFLD

PASS
RTS

JSR

tALTER THE REGISTER CONTENTS.
sRESTORE GPRS,

PC,.8(SP).

iRETURN TO PREGOS SUBRT,

meuwwgemce ROUT INE
.

I1ST

PART4

MACRO M1

?ogu(inr -

6687

09:48

FE R

i®
3

2:2?

..0.‘.““0.0‘.....‘.000
THIS ROUTINE IS EXECUTED CLKHRZ
TIMES PER SECCND.
IT DECREMENTS THE
TWO TIMER COUNTERS DOWN TO ZERO.

3+ OUTPUTS:

66
6698

TIMER1 - TIMER COUNTER @1.

TIMER2 - TIMER COUNTER #2.
TIMER3 -

663?

6700

6;83
[
6703

;e
]
s+ COMMENTS:

6704

6;82

[}
6707

TIMER COUNTER FOR CALL OF BREAK MACRO
.

THE 2 TIMER COUNTERS ARE DECREMENTED
IF THEY ARE NOT ZERO.

i
3+ CALLING SEQUENCE:

6699

- CLKINT -

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

g:g;

SEQ 174

INTERRUPT SERVICE ROUTINE

3+ INPUTS:

6693

F14
119

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

6692

PAGE

‘

.SBTTL

m‘

6689

PUT #CLKINT IN THE CLOCK INTERRUPT VECT

OR SLOT.
PUT THE DESIRED TIME PERIOD ( SECO
NDS TIMES CLKMRZ) IN
EITHER

TIMER1 OR TIMER2 AND POLL THE RESPECTIVE TIMER

COUNTER TO DETECT ITS GOING TO O ON TIMEOUT.

THE 2 COUNTERS WILL NOT WRAPAROUND BUT
WILL

THIS
ALLOWS THE DETECTION OF A TIME-OUT ANY TIME STOP AT 0.
AFTER THE TIME -OUT

HAS OCCURRED UNTIL

THE TIMER COUNTER IS SET TO ANOTHER
VALUE ,

i
s+ SUBORDINATE ROUTINES CALLED: NONE .

6708

6709
6710 027146

6711 027152
6712 027154
6713 027160
6714 027164
6715 027166
6716 027172

6717
6718
6719
6720

S5-MAR-84

005767

001402
005367
005767
001402
005367
005367

027176
027200
027206
027210

001006
016767
010046

6721 027212
6722 027214

012600
000002

027210

153126

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

CLKINT::

153120
153116

28:

153110

153106

153102

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

4% ;

153076

104422

60%:

TST

BEQ
DEC
IST
BEQ
DEC
DEC

TIMER]

2%
TIMER1
TIMER2
43
TIMER2
TIMER3

BNE
MOV
MOV
BREAK

60$
BCOUNT , TIMER3
RO, -(SP)

MOV
RTI

(SP)+,RO

‘..‘..‘.A.

;CHECK FOR TIMER1 AT ZERO.

;BRANCH TO
;:DECREMENT
sCHECK FOR
;BRANCH TO
:DECREMENT
sDECREMENT

LEAVE IT AT Z2ERO IF IT IS ZERO.
TIME COUNT.
TIMER2 AT ZERO.
LEAVE IT ALONE IF IT'S ALREADY ZERQ
,
TIME COUNT.
THE BREAK COUNT.

sEXIT IF NOT TIME TO CALL BREAK.
sSET UP TIME TILL NEXT BREAK,
s SAVE CONTENTS OF RO FROM BREAK MACRO.
sCHECK FOR OPERATOR CONTROL/C.
TRAP
sRESTORE CONTENTS OF RO.

C$BRK

DU - 11

FIINC

1ST

MACRO M1200
15-MAR-84 09:48
INTERRUPT SERVICE ROUTINE
RXCHRS PARTS

6724
67

-SBTTL
P

6726

DMA

THIS

RX.DATA.AVAIL
THE

ROUTINE

DUT

BUFFER

DUT

HALTED

RECEIVE

EXECUTES

BIT

RECEIVE

(BY

BITS)

DATA_VALID

BIT

RBUFA

OUTPUTS:

A CHARACTER

CONTAINS ADDRESS OF

BUFFER

THE

FULL

ROUTINE

IS READ FROM

BUFFER

RECEPTION

EXITS

THE

RECEIVE

FIFQ WITH

THE

THE DUT RX CHARACTER FIFOQ,

4s:

6%:

COUNT.

BUFFER

LEVEL

POINTER

LABEL

RXBIPT

UPDATED

RXBCNT

RX BUFFER CHARACTER COUNT

MAP

START

AVAILABLE

TO POINT

"SUCCESS"

FLAG

DUT

WHICH

INPUT

BUFFER

TO NEXT

(SET

SLOT

AREA

INPUT

SLOT

DISABLE

TX.ENABLE

IF BUFFER

Tx,

BUFFER.

MEMORY.,

(INCREMENTED).

BUFFER.

STATES,

IS NOT

FULL).

PUT THE ADDRESS OF THE LABEL RXCHRS
IN THE VECTOR

IF THE RX BUFFER IS FULL UPON ENTRY,

PRMRM.

THIS ROUTINE ABORTS THE

RXIEO, TXDSBL .

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

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

RXCHRS: :

000100

i* SUBORDINATE ROUTINES CALLED:

2%:

LOCATION.

CHARACTER

RXBIPT

TXENBM

s COMMENTS:

177777
176006
152730

RECEIVE

RXBSTA

CARRY

153174

RECEIVE

LABEL AFTER END OF THE RX BUFF
ER AREA IN MEMORY
.
EQUATED TO THE CAPACITY OF THE
RX BUFFER.

000030

THE

FROM

RECEIVE

153420
153414

THE

RXBEND
RXBFUL

i* CALLING SEQUENCE
:

005267
026727
002745
005767
100413
010546
012705
004767
010567

DUT

;e
L

153422

CHARACTERS

INTO

THE

TRANSMISSION IS MALTED (BY CLEARING
ALL

INTERRUPTS).

THEM

CHARACTERS

EQUATED

002720

DEPOSITS

CAUSED

READS

153440
003120

ROUTINE

RXBDTX

172562
153446
000002
153434

INTERRUPT

i e

;¢

153464

THE

THIS

026727
103402
004767
010277
062767
026727
103403
012767

NUMBER OF

RXBCNT

152756

AND

‘.‘.‘00

ROUTINE

010246
017702
100054

. IFO

CLEAR.

INPUTS:

ACTIVE.

SERVICE

RESPONSE

THE

AND

DISABLING

BUFFER BECOMES FULL

6740

CHARACTER

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

INTERRUPT

BECOMING

IN MEMORY.

TX.ENABLE

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

EXCEEDS A SPECIFIED THRESHOLD,

- RXCHRS

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

6737

INTERRUPT SERVICE ROUTINE

6738
6739

Gid

120

..‘0.‘.‘.0.‘...‘

6727
6728
6729
6730
6731
6732
6733
6734
6735
6736

6741
6742
6743
6744
6745
6746
6747
6748
6749
6750
6751
6752
6753
6754
6755
6756
6757
6758
6759 027216
6760 027220
6761 027224
6762
6763 027226
6764 027234
6765 027236
6766 027242
6767 027246
6768 027254
6769 027262
6770 027264
6771
6772 027272
6773 027276
6774 027304
6775 027306
6776 027312
67?7 027314
6778 027316
6779 027322
6780 027326

PAGE

MOV

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

R2,-(SP)

““‘

1 SAVE CONTENTS OF GPR R2,

MOV
BPL

SRBUFA ,R2
60$

tREAD A CHARACTER FROM THE DUT RX
FIFO,
sEXIT THE ROUTINE IF THE DATA.VALID BIT

cHp
BLO

RXBCNT, 0RXBFUL
43

;COMPARE BUFFER COUNT WITH BUFFER CAPA
CITY,
;SKIP ABORT IF BUFFER IS NOT FULL.
+ABORT, MUST BE A PROGRAM BUG.

JSR

MOV

PC.00PS

R2,8RXBIPT

iPUT

IS CLR,

THE CHAR IN THE BUFFER,

ADD
cHe
BLO
MOV

92 ,RXBIPT
RXBIPT,0RXBEND
6%
ORXBSTA ,RXBIPT

tUPDATE POINTER TO THE NEXT BUFFER SLOT,
;CHECK IF POINTER SHOULD WRAP AROUND
,
i SKIP WRAPAROUND IF POINTER IS NOT AT END,
;WRAP INPUT POINTER AROUND.

INC
cMP
BLT

RXBCNT
RXBCNT,0RXBDTX
23

sCOUNT THIS CHARACTER AS BEING IN THE
BUFFER,
;CHECK FOR BUFFER AT DISABLE TX LEVEL.
s SKIP DISABLING TX IF BUFFER LEVEL NOT
CORRECT.

BMI
MOV
MOV
JSR
MOv

8s
RS, -(SP)
OMAPLNS ,RS
PC, TXDSBL
RS, TXENBM

sBRANCH IF TRANSMISSION ALREADY DISABLED.
1SAVE THE VALUE OF GPR RS,
sSPECIFY THAT ALL LINES SHOULD BE AFFECTED,
sCLEAR THE Tx ENABLES FOR ALL LINES.
sSAVE PREVIOUS TX ENABLE STATES IN STORA
GE.

TST

TXDBLF

sCHECK STATE OF

Tx DISABLE FLAG.

OMU-11 FUNC ST PARTS
MACRO M1200
15-MAR-84 09:48
INTERRUPT SERVICE RPOUTINE
- RXCHRS -

6781 027332
6782 027334
6783
6784 027342
6785 027350
6786
6787 027352
6788
6789 027356
6790 027360

012605
012767

100000

153144

026727

153350

000100

103723

004767
012602
000002

8s:

605 :

120-1

H14
SEQ

MoV
MOV

(SP)+.RS
OBIT1S, TXDBLF

cHP

;RESTORE GPR RS.
;PREVENT Tx FROM BEING NISABLED AGAIN.

RXBONT , 9RXBF UL
2%

JSR

;CHECK FOR BUFFER FULL CONDITION.
:LOOP TO READ ANOTHER CHAR IF BUFFER
NOT FULL.

PC.RXIED

:BUFFER IS FULL, DISABLE RX INTERRUPTS,

MOV
RTI

(SP). ,R2

sRESTORE R2 TO ITS SAVED VALUE.

8LO

175116

PAGE

174

Phke St TEe 'R0y
TN

- 1- !P‘gl -

M1200

6792
6793
6794
6795
679
6797
6798

‘MAR-84

09:48

114

PAGE

121

“EQ

-SBTTL

TRAP SERVICE ROUTINE

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

BUS

TIME-OUT

TRAP (004

TP4BRT

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

TRAP) SERVICE ROUTINE

THIS ROUTINE IS USEC DURI
NG THE DHMA ADDRESS
IT DETERMINES IF THE 004
TRAP WAS CAUSED BY

;
;e

6799

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

NOT

EXAMINING

UNEXPECTED,

004

TRAP

THIS

THE

RETURN

ROUTINE

JUMPS

HANDLING ROUTINE.

VALUE
TO

THE

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

.00‘0

YEST.
AN

"EXPECTED"

STACK.

NORMAL

DIAGNOSTIC

i+ INPUTS:

SP - POINTS TO THE PC WHERE THE TRAP OCCURED.
TRPA
D2

LABEL

TPAFLG

004

;¢ OUTPUTS:

OCCURENCE

ANY

004

TRPAD2

THIS

ADDRESS

WHERE

"EXPECTED"

ERROR

TRAP

SUPERVISOR

TRAPS

OCCUR.

"EXPECTED" TRAP OCCURED.

PUT ADDRESS POINTED TO BY TP4BRT IN 004
VECTOR.

COMMENTS:

THE

FLAGS.

TP4FLG - BIT 1S IS SET IF

3¢ CALLING SEQUENCE:
;¢

TRAP

THE

TRAP
WILL

004

TRAP

WHICH OCCURS

ROUTINE

HANDLED

USED

THE

VECTORS

ADDRESS

NORMAL

CONJUNCTION

THIS

OTHER

004

WITH

TRAP

ROUTINE.

THAN

THAT

SERVICE

CKTRPB

LABELED

ROUTINE,

SUBROUTINE

34 SUBORDINATE ROUTINES CALLED: NONE.

6816
6817 027362
6818 027366
6819 027370
6820 027374
6821 027402

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

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

021627
001402
000177
052767
000002

017320

152662
100000

TP4BRT::

152652

2%:

CMP

BEQ

JMP

BIS

RTI

g%P)..TRPlD?

aTP4VvVEC

9BIT1S,TPAFLG

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

‘0‘

:COMPARE EXPECTED ADDR WITH TRAP
RET PC.

+IF THEY MATCH, CONTINUE THIS ROUTINE.

s1IF NOT,

JUMP TO NORMAL 004 TRAP SERVICE RTN,

$SET THE 004 TRAP OCCURED FLAG.

sALL DONE,

CO BACK

TO THE

TEST.

EBek! YK L80T8 dour

'&00 Hl?O?p‘&?Nfl_fl?-“ 09:48

6823
6824
6825
6826
6827
6828
6829
6830

-SBTTL

J14

PAGE 122

SEQ 174

GLOBAL TRAP SERVICE ROUTINE

;oooooo..oo‘o‘...oo.

.ooo.o..oo.‘..oo.oo‘

TPARTN

oooooooonoo.-oo‘c.oo

oooh

oooooooooo.oooo
BUS TIME-OUT TRAP (004 TRAP) SERVICE
ROUTINE THIS ROUTINE DETERMINES IF THE 004
TRAP WAS CAUSED BY
AN “EXPECTED” ERROR OR NOT BY EXAM
INING THE RETURN PC VALUE ON THE
STACK. IF THE TRAP IS UNEXPECTED,
THIS ROUTINE JUMPS TO THE NORMAL
DIAGNOSTIC SUPERVISOR 004 TRAP
HANDL ING ROUTINE .

e
:®
L
L
FE

L
A

INPUTS:

]
FE
L
L

OUTPUTS:

SP - POINTS TD THE PC WHERE THE
TRAP OCCURED.
ADRPTR - LABEL AT THE ADDRESS
WHERE "EXPECTED"
TPAFLG - 004 TRAP FLAGS.
TP4FLG

- BIT

CALLING SEQUENCE
:

COMMENTS :

IS SET

"EXPECTED"

TRAP OCCURED.

PUT ADDRESS POINTED TO BY TP4RTN IN 004
VECTOR,

OCCURENCE OF 004 TRAP VECTORS TO
THIS ROUTINE.

TRAPS OCCUR.

ANY 004 TRAP WHICH OCCURS AT AN
ADDRESS OTHER THAN THAT LABELED
ADRPTR WILL BE HANDLED BY THE
NORMAL 004 TRAP SERVICE ROUTINE,

54 SUBORDINATE ROUTINES CALLED: NONE.

6846
6847 027404
6848 027410
6849 027412
6850 027416
6851 027424

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

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

021627

001402
000177
052767
000002

017270

152640

100000

TP4ARTN::

152630

28:

CMP

BEQ
JMP
BIS

RTI

(SP),®ADRPTR

23
STP4VEC
¥8IT15,TPAFLG

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

.‘“‘“‘

sCOMPARE EXPECTED ADR AGAINST TRAP RET
PC.

+IF THEY MATCH, CONTINUE THIS ROUT
INE.
s IF NOT,JUMP TO NORMAL 004 TRAP SERV
ICE RTN,
;SET THE 004 TRAP OCCURED FLAG.

sALL DONE, GO BACK TO THE TEST.

K14

IRV EAAE YN AT T B RSy im0 1200
oAR "AR-84 09:48 PAGE 123
6853

.SBTTL

“5.

6855
685¢
6857
6858

;e
;e
:e
;e

6:653

;¢ INPUTS:
ie
;e
;e
;e
T
;e

2823

3+ OUTPUTS:

6871

5:;3

TXCNTX

TXDONF

BITTBL - LABEL OF TABLE OF WORDS EACH WITH A BIT SET.
CNCNTB - BASE OF @ OF CHARS TO TX/RX TABLE.
CSRA - CONTAINS THE ADDRESS OF THE
DUT CSR.
DPENDB - BASE OF THE DATA PATTERN END
TABLE (ENTRY PER LINE).
DPLENB - BASE OF THE DATA PATTERN LENGTH TABLE
IESTAT - PRESERVED STATES OF THE DUT INTERRUPT. ENAB
LE BITS.
TXCNTB - LABLE AT BASE OF THE TX CHARACTER COUN
TER TABLE .
TXPTRB - LABEL AT BASE OF
THE

6870

‘.‘.

o.‘t.“.“...."t‘
- DMA TRANSMIT INTERRUPT SERVICE ROUTINE THIS ROUTINE EXECUTES IN RESPONSE TO AN INTERRUPT
CAUSED BY THE DUT
TX.ACTION BIT BECOMING ACTIVE. THIS ROUT
INITIATES THE TX OF A
NEW DMA BUFFER OF CHARACTERS OR SETS THE INE
TX DONE FLAG FOR THE CORRECT
LINE IF TX IS COMPLETE ON THAT LINE.

6861
6862
6863
6864
6865
6866
6867

TXINTF

INT

FLAGS

6879

3+ SUBORDINATE ROUTINES CALLED: DODMA.
R

004567
017701

(BIT

SET

DMA.HO

FOUND

SET

TABLE .

LINE),

PUT THE ADDRESS OF THE LABEL TXDMA IN THE
VECTOR
LOCATION.

010100
000402

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

TXDMA::

155672
152542

SAVE

MOV
MOV
BR
;0

6887
6888
6889

8CSRA,R1
R1,RO
43

JSR

‘t“‘tttt““““0.“.“‘.“““0“

L TTYYTIY}

i SAVE CONTENTS OF GPRS RO THMRU RS.
RS,PREGOS
:CALL REGISTER SAVE SUBRT.
sREAD THE CONTENTS OF THE DUT CSR.

sSAVE INITIAL CONTENTS OF IND.ADR.REG
FIELD.
sBRANCH TO SKIP DOUBL READING OF DUT
CSR.

3 READ THE CONTENTS OF THE DUT CSR.
THIS WILL CLEAR THE TX.ACTION CSR BIT.
s IF TX.ACTION IS NOT SET, EXIT THIS
ROUTINE.
s DETERMINE THE LINE FOR WHICH THE TX.A
CTION WAS SET.

6890

+ CALCULATE AN OFFSET FOR USE IN ACCESSING TABL
ES (2 TIMES THE LINE NUMBER),

::3%

s GET THE BIT MAP OF THMIS LINE.

017701
100033
000301
042701
010104
006304
016405

152532

2s:
4s:

177760
002364

6901
6902
6903
6904

MOV
BPL
SWAB
BIC
MOV
ASL
MOV

8CSRA,R1
60$
R1
#177760,R1
R1,R4
R4
BITTBL(R4),RS

;READ THE CONTENTS OF THE DUT CSR.
$EXIT ROUTINE IF TX.ACTION IS CLEAR.
sCALCULATE THE LINE NUMBER OF THE LINE
WHICH IS
s
ASSOCIATED WITH THE TX.ACTION.
sCALCULATE AN OFFSET FOR USE IN ACCESSIN
G
i
LINE COUNTER AND POINTER IN TABLES,
;GET THE BIT MAP OF THIS LINE.

i GET THE TX CHARACTER COUNTER FOR THIS LINE.
i IF ALL THE CHARACTERS MAVE BEEN SENT FOR THIS LINE:
:
SET THE TX DONE FLAG FOR THIS LINE.
:
DON'T SEND A CHAR TO THE LINE (NO MORE TX.ACTIONS
ON THIS LINE),
;
LOOP

g&}

6907 027466
6908 027474

PATTERN POINTERS

6..0

6893 027442
6894 027446
€895 027450
6896 027452
6897 027456
6898 027460
2% 027462

DATA

TX DONE FLAGS SET FOR LINES WHIC
H HAVE SENT ALL CHARS .

i* CALLING SEQUENCE:
s
3e
;& COMMENTS:

6881
6882 027426
027426
6883 027432
6884 027436
gggz 027440

- COUNTERS INCREMENTED FOR LINES ON
WHICH CHARS SENT.

6874
6875
6876
6877

6878

- TXDMA -

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

INTERRUPT SERVICE ROUTINE

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

026464
103403

‘—

003502

003442

TO CHECK THE TX.ACTION FOR ANOTHER LINE.

cHP
BLO

TXCNTB(R4),CHCNTBC(R4) ;COMPARE & CHAR
S SENT AND TX COUNT.
6%
iGO TO SEND A CHAR IF NOT ALL CMARS SENT.

PRYeAA P YMEe AT T B RS
11

6909 027476
2:{0 027502
i

050567
000757

ngACRO 1200,
AR "AR-84 09:48 PAGE 123-1
¢

6913

6922 027520

;

6927 027526

016403
016402

003202
003342

004767
103403

170172

BCS

;

050567

000402

THE DATA PATTERN.

DPLENB(R4Y.RS
TXPTRB(R4).R2

;PASS DATA PATTERN LENGTH FOR LINE
;PASS THE TX START ADR TO DOGMA.

TO DODMA.

152536

SET

sSKIP ERROR IF DODMA WAS SUCCESSFUL
.

THE PROPER BIT OF

BIS

THE

RS,TXINTF

104

INTERRUPT FLAGS

INDICATE

THE LINE ERROR,

: INDICATE THE ERROR.

sSKIP UPDATING POINTERS AND COUNTERS.

: UPDATE THE TX CHARACTER FOR THIS LINE.

060364

003502

8s:
"

; UPDATE THE TX BUFFER POINTER FOR THIS LINE.

ADD

R3,TXCNTBCR4)

;ADD THE DATA PAT LENGTH TO THE TX COUNT.

sLOOP BACK TO CHECK TX.ACTION BIT AGAIN
.

s LOOP TO CHECK THE TX.ACTION BIT FOR ANOTHER LINE.

‘-

000742

6938 027536

016701

027542
027546
027550
027554
027554
6943 027556

sSET THIS LINE'S TX DONE FLAG.
;:LOOP TO CHECK TX.ACTION AGAIN.

;s WRITE DMA PARAMETERS TO THE DuUT.
H
JSR
PC.DODMA
:.

693 027534
6939
6940
6941
6942

MOV
MOV
"

6930

6934

RS, TXDONF
28

THE START ADDRESS OF

és:

6929

6982 027530

SEQ 180

PATTERN LENGTH FOR THIS LINE.

GET

g:g;

6926 027522

BIS
BR

L14

; START THE DMA OF THE NEXT BUFFER (DATA
PATTERN) ON THIS LINE.
P
GET THE DATA

gz%;

6;53
6
6921 027514

153000

6912

6716 027504
6917 027510

042700
050001
010177
004736
000002

10s:

152472

60 :

177760
152424

MOV

BIC
BIS
MOV
PASS
RTI

IESTAT,R1

0177760.R0
RO.R1
R1.8CSRA
JSR

sGET THE PRESENT STATES OF TX.IE & RX.IE BITS.

sGET SAVED IND.ADR.REG FIELD BITS.
sCOMBINE IND.ADR.REG FIELD BITS WITH
IE BITS.
sRESTORE THE DUT CSR IND.ADR.REG FIEL
D.
sRESTORE GPRS.
PC,a(SP).
sRETURN TO PREGOS SUBRT.

mé“&mg{cg‘z&‘;u'em M1200 A3-MAR-84 09:48 PAGE 124
-.SBTTL

M14
r

REPORT CODING SECTION

340

THE REPORT CODING SECTION CONTAINS THE

“PRINTS” CALLS THAT GENERATE STAT
ISTICAL REPORTS.

‘--

6961 027560
027560
6962
6963 027560
027560
027562
6964
6965
6966
6967 027564
027564
027564

BGNRPT
LSRPT:

000167
000000

EXIT

RPT

.WORD
.WORD

JSUMP
L10016-2-.

TRAP

CSRPT

.EVEN

ENDRP1

104425

L10016:

%iéé!;%'&fipmt.

6969

;

6981

N14
125

PROTECTION TABLE

THIS TABLE IS USED BY THE RUNTIME
SERVICES

;s TO PROTECT THE LOAD MEDIA.

6982

6983
6984 027566

BGNPROT

o 027566

6990 027574
6991

PAGE

6980

6987 027870
gzgg 027572

15-MAR-84 09:48

.SBTTL

6977
6978
6979

6986 027566

MACRO M1200

177777

177777
177777

L$PROT:;
-1

-1
-1

ENDPROT

;OFFSET INTO P-TABLE FOR CSR ADDRESS

;OFFSET INTO P-TABLE FOR MASSBUS ADDRESS
;OFFSET INTO P-TABLE FOR DRIVE NUMBER

151 PARTS
TABLE

MACRO M1200

15 MAR 84 09:48

.SBTTL

B1S

PAGE

126

“EQ

INITIALIZE SECTION

:::ooooooooooo.o.ooooooo..ooooaooooooooooooooooooooo

THIS

SECTION

EACH

CONTAINS

PASS

THIS

AFTER

CODE

PERFORMS

MOVES

DATA

THE
AREA.

THE

CODE

CONTINUE

THE

WHICH

COMMAND

FOL! OWING

INFORMATION HELD

IN THE

o.oooooooooooooooooooooo-oo

PERFORMED

THE

BEGINNING

ACTIONS:

HARDWARE P-TABLE

INTO

THE GLOBAL

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

027574
027574
027574
027574

027600
027602
027602
027604
027604
027610
027612
027612
027614
027614
027620
7036 027622
027622

7087

7043
7044
7045
1046 027642

027642
027646

027650
7047 027652

7048
7049
7050 027666
7051 027672

7052 027700

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

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

BCGNINIT

sSEE
012700

LSINIT::

104447

MOV

BCOMPLETE

103416

NEWSTA

$SEE IF PROGRAM JUST RESTARTED, BR IF YES
012700
104447

READEF

000037

103556
31SEE

012700
104447

000035

103161
000167

B8CS

NEWSTA

MOV

QEF .RESTART
,RO

B8CS

NEWRES

TRAP

NEWRES

THIS IS A NEW PASS,
READEF 0EF .NEW

YES

BCOMPLETE

NEWPAS

:SEE IF PROGRAM WAS JUST CONTINUED
012700
104447

CSREFG

MOV

103555

OEF .START
RO

TRAP

OEF .RESTART

BCOMPLETE

7038 027624

027624
027630
7039 027632
027632
7040 027634
7041 027640
7042 027640
027640

.....‘0..‘...‘...0‘.

‘-—

CSREFG

OEF .NEW,RO

TRAP

CSREFG

BCS

NEWPAS

READEF #EF .CONTINUE

000036

BNCOMPLETE
000540
NEMWSTA:;

104433

JMP

MOV

GE TPRM

ENDIT

BRESET

OEF ,CONTINUE
,RQ

TRAP

CSREFG

BCC

GE TPRM

sRESET THE BUS TO PREVENT ILLEGAL INTERRUP
TS,
TRAP

CSRESET

s SET UP FOR LINE TIME CLOCK INTERRUPTS,
§

012700
104462
010001
012167
012167
012167
012167
026727
001004

CLOCK

000114

L,R1

3GET THE CLOCK PARAME TERS,

MOV

TRAP

152412

152410
152406
152404

152400

000062

MOV
MOV
MOV
MOV
cMP
BNE

(R1)+,CLKCSR
(R1)+,CLKBRL
(R1). ,CLKVEC
(R1)+,CLKHRZ
CLKHRZ, 050,
2

&' L,RO

CsCLCK

MOV
RO,R1
sSTORE CLOCK CSR ADDRESS.
sSTORE CLOCK BUS REQ INT LEVEL,
$sSTORE CLOCK INTERRUPT VECTOR,
1STORE CLOCK FREQUENCY,
sTEST FOR SOMZ LINE FREQUENCY.
1BRANCH IF CLOCK IS NOT SOMZ,

OMU-11 FUNC TST PARTS
INITIALIZE SECTION
7053 027702

7054 027710
7055 027712
7056 027720
027720
027724
027730
027734
027740
027742

027746
027752
027754
027760
027760
027764

012767
000403
012767
012746
012746
016746
012746

104437
062706
016700
006300
010067
012700
104441

MACRO M1200

15-MAR -84 09:48

000028

152400

000021

152370

Hov
23:

MOV

SETVEC

PAGE

126-1

Cl5
“£0Q

920.,M5TICK

+INDICATE 20MS PER CLOCK TICK.
+INDICATE 17 MS PER CLOCK TICK.

217, MSTICK

CLKVEC..CLKINY.OPRIOG

s INITIALIZE

CLOCK

INTERRUPT

152340

MOV

——

000010
152324

MOV

ASL
MOV

152326
000240

SETPRI

CLKHRZ RO

ADD

+INITIALIZE THE BREAK COUNT

RO
RO, BCOUNT

i TO CAUSE A BREAK
i EVERY 2 SECONDS.

oPRIOS

$ALLOW CLOCK

MOV

TRAP

3 ENABLE THE LINE TIME CLOCK (LTC) CHECKING
TO MAKE SURE
s IS ACCESSABLE.

027774

016767
012767

150012
027404

FIRST

152262
150002

SET

MOV
MOV
HE4

;
'-

005067

012767
012700
016701
004767
016767
10340;

000402

152246

000100

002266

152244
167226
152222

MOV

ANY

004

4, TPAVEC
OTPARTN,4

TP4FLG

TRAPS

WHICH

010,5p

OPRIOS . RO

CS$SPRI

THE CSR

OCCUR:

$SAVE THE EXISTING 004 TRAP VECTOR.
1SET 004 TRAP VECTOR TO OUR SERVICE
RTN ADR,

TRAP

IN CASE CSR IS NOT

THERE.

iCLEAR THE 004 TRAP FLAG.

$SET UP TO SET BIT6 OF

MOV
JSR

CLKCSR,R1
PC,CKTRAP

1SET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE
.
tMOVE AND CHECK FOR TRAP,

BCS

+IF NO TRAP, LTC IS THERE SO CONTINUE.

1BYPASS THE FOLLOWING CALIBRATION PROCEDUR
ES ,

MOV

152232

CATCH

THAT

CLR

OWORD1 ,RO
TP4VEC,4

CLKHRZ

THE LTC CSR.

1SET UP WORD1 AS THE CKTRAP MOvE SOURCE.

tRESTORE THE NORMAL 004 TRAP VECTOR.

sCLEAR LTC FREQUENCY WORD TO INDICATE
NO L1€C.

s CALIBRATE THE DELAY ROUTINE MILLI -SECOND
DELAY COUNT VALUE,
68:
JSR
PC,CALMSL
‘-

004767

166020

HRd

+
030052
030060
030066
030072
092 030076
030102
030106
030112
030116
030122
030130
030132
030140
030144

’o

016767
012767

005067
005067
012700

016701

005067
005067
004767

016767
103003
012767
005067
000167

147726
027404

152162
152170
002266
152206
152206
152204
167134
152130

000001

152076

000006

152176
147716

CHECK FOR MEMMORY MANAGEMENT PRES
ENT ON THIS MACHINE,

IF MEM MGT IS PRESENT, DISABLE IT,

8%:

147654
152160

MOV
MOV

+SAVE THE EXISTING 004 TRAP VECTOR.
1SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR.

CLR
CLR
MOV
MOv
CLR
CLR
JSR

TPAFLG
WORD1
#WORD1 ,RO
MMSRO,R1
MMPRES
MMENAB
PC,CKTRAP

1CLEAR THE 004 TRAP Fi.AG,
sPREPARE TO CLEAR THE MEM MGT SRO REGISTER,
sSELECT CLEARED WORD AS CKTRAP RTN SOURCE.
1SELECT MEM MGT SRO REGISTER AS DESTINATION.
s INDICATE NO MEM MGT PRESENT IN CASE [T ISN' T.
s INDICATE MEM MGT IS NOT ENABLED.
sCLEAR THE MEM MCT SRO REG AND CMECK FOR TRAP,

B8CC

108

@1 ,MMPRES

$SKIP INDICATING MEM MGT PRESENT IF IT ISN'T
,

PASCNT

NEWPAS

sCLR COUNTER USED IN REPORTING ROM VERSION o,
$SKIP AROUND THE BUS RESET,

MOV

108:

4,TP4VEC
¢TP4ARTN, 4

MOV

CLR

JMP

TP4VEC,4

sRESTORE THE NORMAL 004 TRAP VECTOR,
s INDICATE

«-(5P)

cat
$Sv we

#8176,WORD1

MOV

147746

ENABLE LTC CHECKING FOR 004

CLR

152252

LKIN

CLKVEC, “(SP)

INTERRUPTS DISABLE OTHERS.

027766

VECTOR,

THAT MEM MGT IS PRESENT,

IT'S BEEN DONE.

18”4

PRY'1A
r TCSE1BRR
ET
T4
7102
7103 030150

MACRO M1200

104433
005067

152064

7106 020156
7107 030156

012767

177777

7108

NEWPAS;

152012

7109

7111

7115

7116
7117 030176
7118 030176

7119 030202

7120 030210
/121
7122 030212

005267
001002
005367

SEQ

iRESET

005267
026767

002362

103401
000764

030226
030232
030234
030240
030244
030250
030254

012167
012102
010267
062702
010267
012167
111167

016700
104442
010001

ILLEGAL INTERRUPTS,
TRAP
CSRESET

MOV

@-1,UNITN

+RESET LOGICAL DEVICE

-1

INCREMENT THE PASS COUNTER, CORRECT FOR ANY
OVERFLOW.
THIS COUNTER IS USED IN THE ROM VERSION TEST.

INC

152044

DEC

PASCNT
GE TPRM

: INCREMENT THE PASS COUNTER.
sBRANCH IF WE HAVE NOT YET! OVER
FLOWED,

PASCNT

$SET PASS COUNT

151760

TO 177777 OCTAL,

THIS UNIT,

INC

UNITN

BGE

NEWPAS

iBR IF YES

GPHARD

UNITN.R1

:GET P-TABLE POINTER INTO R1

cHP

151602

s INCREMENT LOGICAL DEVICE NUMBER

UNITN,LSUNIT

+SEE_IF MAXIMUM UNIT NO. EXCEEDED

MOV

UNITN,RO

MOV
acs

RO,R1
.

TRAP

BCOMPLETE
BR

151746

30s:

151726
000004
151720

3
'
'

128:

001373

HARDWARE

(R1).,CSRA
(R1)+,R2
R2,RXVECA
04 ,R2

MOV
MOVB

(R1)+» ,ACTLNS
(R1),L0PBCK

$SKIP THIS DEVICE
PARAMETER

R2, TXVECA

MOVING

CODE

S00s000000s00000

sSTORE DMU-11 CSR ADDRESS IN DEV.REG.
ADDRESS TABLE
sGET THE RX INTERRUPT VECTOR ADDRESS,
iSTORE RX INT VECTOR ADDRESS.
3CALCULATE iX INTERRUPT VECTOR ADDRESS .

1STORE TX INT VECTOR ADDRESS.

$STORE DMU-11 ACTIVE LINE BIT MAP
sSTORE DHU-11 LOOPBACK MODE

MOV
INC
INC
MOV
MOV

CSRA,R1
Rl
R1
o7,R3
ORBUFA R2

INC
INC
DEC
BNE

R1
R1
R3
124

MOV

R1,(R2).

sCOPY CSR ADDRESS
;s INCREMENT CSR ADDRESS
: COPY BY 2,
3SET UP REGISTER COUNT
iGET LOCATION WHERE RBUF ADDRESS GOES IN TABLE

sSTORE REGISTER ADDRESS IN TABLE

s INCREMENT REGISTER ADDRESS
s BY 2,FOR THE NEXT DEVICE REGISTER,
sDECREMENT REGISTER COUNT
sLOOP IF NOT DONE

030312

012700

002512

CSGPHRD

CALCULTATE DEVICE REGISTER ADDRESSES,AND PUT
THEM IN THE
DEVICE REGISTER ADDRESS TABLE.

151714
000007
002202

:1BR IF DEVICE AVAILABLE

GETPRM

j44s4s0000sss

MOV

151716
151714

308

MOV
MOV
MOV
ADD

‘.

016701

TO PREVENT

iCLR COUNTER USED IN REPORTING ROM VERS
ION o,

152052

151774
151770

THE BUS

PASCNT

&%Tfi HARDWARE PARAMETERS
FOR

030212
030216
030220
7123 030222
030222
030224

NNNNNN~N
s s e gt g Pt e
8
e U
o
VbW

126-2

CLR

s
s

7110

7112 030164
7113 030170
7114 030172

D15
PAGE

NEWRES: BRESET

0301350
7104 030152

7105

15 MAR 84 09:48

INITIALISE THE BMP CODE QUEUE.

MOv

#BMPCQAB, RO

;GET THE STARY ADDRESS OF

THE QUEUE,

18RS

DHU-11 FUNC TST PARTS
INITIALIZE SECTION

7154 030316

7155 030322

7156 030326
7157 030330
7158 030332
7159
7160

012701
010067
005020
020001
103775

MACRO M1200

15-MAR-84 0°:48

002712
152162

143

7165

7166
7167

7168
7169
7170

032767
001416
026727
003412

000020

151620

151442

000001

016746
012746
012746
010600
104417
062706

151616
007535
000002

iGET THE END ADDRESS OF THE QUEE ,
iSET THE POINTER TO THE START OF THE QUEUV
E ,

(RO).
RO,.R1
14$

;CLEAR QUT THE CONTENTS OF THE
QUEVE ,
1CHECK IF END OF QUEUE HAS BEE
N REACHED,
;:LOOP TIF NOT ALL DONE.
TER THAN 1.

BIT
BEQ

cHP

BLE

PRINTF

OBIT4,0PTION
16$

;CHECK IF THE QUESTION WAS ANSWERED
YES.
1SKIP REPORTING UNIT NUMBER IF
IT IS DISABLED.

LSUNIT, 21

16$

;CHECK MAXIMUM NUMBER OF UNITS SELECTED
.

OMFUNIT,UNITN

:D0 NOT REPORT UNIT NUMBER IF MAX NUMB
ER <«
:REPORT UNIT
NUMBER.

MOV
MOV
MOV

MOV
TRAP

ADD

165

UNITN, -(SP)
OMFUNIT, -(SP)
2, -(SP)
SP,RO
CSPNTF

06 ,SP

ENDIT:
‘0

7172

7173
7174 030400
030404

s
..

012700
104441

7176 030406

7178

OBMPCQE ,R1
RO,BMPCQP

000006

7171

7177

CLR
P
8LO

E15

7164

7175

MOV
MOV

126-3

;s REPORT THE UNIT NUMBER IF THE SOF
TWARE P-TABLE QUESTION WAS ANSWERED
YES,
:
AND THE MAXIMUM UNIT NUMBER IS GREA

7161

7162
7163

PAGE

030406
030406

000340

SET THE PROCESSOR PRIORITY
SETPRI

oPRIO7

TO DISABLE ALL

INTERRUPTS,

$SET PROCESSOR PRIORITY

TO ¥s
MOV
TRAP

OPRIO7,RO
C$SPRI

TRAP

CSINIT

ENDINIT

104411

L10020:

TNUM == 0

s INITIALIZE

THE ASSEMBLER

TEST NUMBER VARIABLE .,

Pt A T

séet o

MACRO M1200

15 MAR
84 09:48

PAGE

127

€0

7181

7182
7183

FVID.ATD

7184
7185
7187

7188
7189

.SBTTL

7190
7191

7192

AUTODROP SECTION

7193

s THIS CODE IS EXECUTED IMMEDIATELY AFTER THE
INITIALIZE CODE IF
s THE “ADR" FLAG WAS SET.
THE UNIT(S) UNDER TEST ARE CHECKED TO
s SEE IF THEY WILL RESPOND.
THOSE THAT DON'T ARE IMMEDIATELY
s DROPPED FROM TESTING.

7194

7195
7196
7197

7198

7199 030410

7200

BGNAUTO

030410

L$AUTO::

7207
7208 030410

030410
030410

ENDAUTO

104461

L10021:
TRAP

CSAUTO

187

RU¥oBA
B ok
c b"4

MACRO M1200

7217
7218
7219

15-MAR -84 09:48

-SBTTL

7220

7221
7222
7223
7224

7225

7240
7241
7242

128

SE0

CLEANUP CODING SECTION

FHEA4

s
3

THE CLEANUP CODING SECTION CONTAINS
THE CODING
AFTER THE HARDWARE TESTS HAVE
BEEN PERFORMED
.

7226

7227
72345
7237
7238
7239

PAGE

THAT

IS PERFORMED

BGNCLN
LSCLEAN:

005767
001401

151602

TST

BEQ
BRESET

104433

CTRLCF

;DID WE GET HERE BY CTRL-C FROM TEST
?
:CTRL-C FROM TEST?
NO, SKIP BUS RESET,
i YES, CLR ANY DMAS OR OUTSTANDING INTER
TRAP

2%:

104432
000002

7254
7255

EXIT

RUPTS,

CSRESET

CLN
TRAP
.WORD

CSEXIT
L10022-,

TRAP

CSCLEAN

.EVEN

7256

7257

ENDCLN

104412

L10022;

15873

2
Effnflfi
w 4 yasx‘375g3913~

MACRO M1200

15-MAR
-84
%
09:48
=
:4

PPAGE

129

H15
£0 159

7266

7267

7268
7269
7270
7271
7272
7273
7274
7275 030430

7276
7277
7278
7279

.SBTTL

goe
3 THE DROP-UNIT SECTION CONTAINS
; TO NO LONGER BE TESTED.
$--

030432
030436
030442
030444
030446

L$DU::

;
s
010046

012746
012746
010600
104417
062706

000427

7286 030454
030457
030462
030465

045
125
124
066

030512
030515
030520
030523
030526

7287
7288 030532

7289
7290 030532
030532
030534
7291
7292
7293 030536
030536
030536

CAUSES A DEVICE

:“Wmmf
i'mntd
:
INSERT DROP CODE HERE.
THIS CODE WILL BE EXECUTED AFTER
:
A_“DROP” COMMAND OR A "DODU" MACR
O EXECUTION.
THE PURPOSE
:
OF THIS

;ggg 030452

030470
030473
030476
030501
030504
030507

THE CODING THAT

SGNDU

030430

7280
7281
7282
7283 030430
030430

DROP UNIT SECTICN

:REPORT UNIT THAT HAS BEEN DROFPED.
MOV

MOV
MOV

000006

BR
101
116
045
045

104
120
104
122
040
122

105
124
124
107
116

040
111
104
101

DROP:

EDROP

:BRANCH AROUND THE MESSAGE
.

LT
RO, -(SP)

MOV
TRAP
ADD

#DROP, -(SP)
02, -(SP)
SP,RO
CSPNTF
96 ,5P

.WORD
LWORD

J$UMP
L10023-2

TRAP

CsDu

.ASCIZ/#A UNIT®D6%A DROPPED FROM FURTHER
TESTING . %N/

122
105
111
056
000

.EVEN
EXIT

ENDDU
104453

]

122
120
040
117
106
124

EDROP;
000167
000000

PRINTF #DROP,RO

030454
000002

040
117
105
106
115
125

110
040
123
116
045

CODE IS TO DO ANY NECESSARY HOUSEKEEPING
AFTER A
UNIT HAS BEEN DROPPED.
THIS SECTION IS OPTIONAL.

L10023;

DHU-11 FUNC TST PART4
DROP UNIT SECTION

MACRO M1200

15-MAR-84 09:48

PAGE 130

I15
SEQ 190

’

7296

mmfiwmim

‘““'siii

7304

.SBTTL

7306

s
3

ADD UNIT SECTION

THE ADD-UNIT SECTION CONTAINS ANY
CODE THE PROGRAMMER WISHES
T0 BE EXECUTED IN CONJUNCTION WITH THE
ADDING OF A UNIT BAGK
-

7309

7312 030540
030540

TO THE TEST CYCLE.
BGNAY

L$AU::
: Wmmmmm

7315
7316

:
:

7317

7318

7319

7522

7307
7308

7320
7321 030540
030540
030542

dfifidmf

000167
000000

m,,“d

mmu
INSERT ADD CODE HERE.
THIS CODE WILL BE EXECUTED AFTER
AN “ADD” COMMAND.
THE PURPOSE OF THIS CODE IS TO DO ANY
HOUSEKEE

PING THAT MAY BE NECESSARY AFTE
R A UNIT HAS BEEN ADDED.

THIS SECTION IS OPTIONAL.

Wmmmw

EXIT

7323

7324

7327

JUsUMP
L10024-2-,

TRAP

CsAy

.EVEN

7325

7526 030544
030544
030544

.WORD
.WORD

ENDAU
104452

L10024;

DMU-11

FUNC

HARDWARE

TST PART4

TEST

MACRO M1200

ADRA

15-MAR-84 09:48

;gzsg

.SBTTL

733‘

7334

7336

- ADRA ..“.‘0“.....“‘00.‘“‘t

;ggg

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

“.o

THIS TEST VERIFIES THAT THE DEVICE REGISTERS WILL

UNIBUS HANDSHAKING SIGNALS WHEN
ACCESSED.

THE

IS REPORTED.

g‘

73‘0

- REGISTER ADDRESS TEST

7337

THIS

THE DHUL1 DOES NOT RESPOND
ROUTINE

THIS TEST IS PERFORMED ON LINE O ONLY.

030546

030546
030554
030562
030570

;m 030576

000001

012767
012767
012767
012767

012767

000001
177777
000145
010047

013500

TNUM == TNUM + 1

151504
151436
154526
154522

MOV
MOV
MOV
MOV

154516

;ggg

;.;ogz 030620
!

;g;g 030672

005005

147174
027404

151444
147164

7877 030700
7378 030706
7379 030712
7380 030716
7381 030722
7382 030724
7383 030730
7384 030732

MOV

STNUM, TSTNUM
#-1,CTRLCF
#101. ,ERRNBR
9EMO103,ERRMSG

9ERO101,.ERRBLK

Tl::
s INCREMENT THE ASSEMBLY TIME TEST COUNTER.

:SET UP THE TEST NUMBER.
(1)
s INDICATE THAT WE ARE IN A TEST.
sSET THE TEST ERROR NUMBER IN THE
TABLE.
;SET UP THE TEST FAILURE MESSAGE
IN THE TABLE,

;SET-UP THE ERROR ROUTINE IN THE ERRO
R TABLE .

016700
012701
004767
103402

052705
042767
010100
016701
004767
103403
052705

000444

MOV
MOV

CLR

100001
000017

000146

43%:

151320
166372

100002

MOV
MOV
JSR
BCS
BIS
BIC
MOV
MOV
JSR
8CS
BIS

;
012702

iSAVE THE EXISTING 004 TRAP VECTOR.
:SET 004 TRAP VECTOR TO OUR SERVICE
RTN ADR.

:CLEAR THE ERROR FLAGS.

151352
031020
166420

016767
016700
012701
004767
103402
052705
010100
016701

4, TPAVEC
OTPARTN, 4

i
s HERE BEGINS THE LOOP TO TEST THE
REGISTERS FOR A LINE,
:
FIRST TEST THE CSR AND SET THE IND.
ADR.REG (I.A.R) FIELD.

;g;;
7376 030674

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

‘-

016767
012767

;gzg

7365 030640
7366 050644
7367 0306352
7368 030654
7369 030660
7370 030664
7571 030666

ERROR

+ SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR:

7357
7358

030622
030626
030632
030636

BGNTST

7353 030604
7554 030612

AND

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

3--

7342
7343 030546

RESPOND TO THE PROPER

TO THE ACCESS ATTEMPTS (IF THE DMUL1 IS
AT THE WRONG ADDRESS, FOR EXAMPLE)
004 BUS TIME-OUT TRAP
IS DETECTED
IF

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

7341

7361
7362
7363
7364

“€Q

HARDWARE TEST

7335

7344

J15
131

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

;ggg

7345
7346
7347
7348

PAGE

‘-

000010

151274
000104
031020
166334

000110

68:

8s:

100001
000060

108:

CSRA,RO
0528 ,R1
PC,CKTRAP
43
#100001,RS
917,528
R1,RO
CSRA,R1
PC,CKTRAP
6$
#100002,RS

403

iSET UP CSR_AS THE CKTRAP MOVE SOUR
CE.
sSET _UP DESTINATION LOCATION FOR CKTR
AP MOVE.
sMOVE AND CHECK FOR TRAP.
+IF NO TRAP, BYPASS ERROR.

sSET FATAL READ ERROR FLAGS.
sCLEAR THE I.A.R FIELD OF THE CSR DATA
.
1USE OLD DESTINATION FOR SOURCE OF
CKTRAP MOVE.
sSET UP CSR AS THE CKTRAP MOVE DEST
INATTION.
:MOVE AND CHECK FOR TRAP.
+IF NO TRAP, BYPASS ERROR.
:SET FATAL WRITE ERROR FLAGS.

;EXIT AND REPORT FATAL ERROR.

NOW, WE TEST EACH REGISTER FOR THIS LINE.
MOV

MOV
MOV
MOV
JSR
BCS
BIS
MOV
MOV

08, ,R2

CSRA,S0$
S0$,RO
0528 ,R1
PC,CKTRAP
108
#100001 ,RS
R1,RO
50%,R1

s INIT REGISTER COUNTER TO 8.

s INITIALIZE THE REGISTER POINTER.
$SET UP REGISTER AS THE SOURCE FOR CKTR
AP MOVE.
$SET UP LOCAL STORAGE AS THE DES FOR
CKTRAP,
sPERFORM THE MOVE, CMECK FOR TRAP.
:IF NO TRAP, BYPASS THE SETTING OF ERRO
R FLAGS.
sSET FATAL READ ERROR FLAGS,
:USE OLD DEST AS SRC FOR CKTRAP MOVE
,
$SET UP REGISTER AS THE DEST FOR CKTR
AP MOVE.

191

PRkolkAnt ¥E s1°
-

7385 030736
7386 030742
7387 030744

7388 030750
7389 030754
7390 030760

;g:}' 030762

PART4

004767
103402
052705

005267
005267
005302

AT M

-MAR-84 09:48

166314

100002
000042
000036

12s:

001351

JSR
BCS
BIS

INC
INC
DEC

BNE

7393

K15

131-

PC,CKTRAP
12%
#100002,RS

50
S50s
R2

7394

£D 19

€0

;PERFORM THE MOVE, CHECK FOR TRAP
,
i IF NO TRAP, BYPASS THE SETT
ING OF ERROR FLAGS.
:SET FATAL WRITE ERROR FLAGS.

s INCREMENT THE REGISTER
: POINTER BY 2.
:COUNT THE REGISTER.

:LOOP TO TEST THE NEXT REGISTER ADDRESS
.

; DONE CHECKING DEVICE REGISTER ADDRESSE
S.

7395

7397

7398 030764
7399 030772

;:gg 030774

016767
005705

151266

147012

40s:

100012

REPORT ANY ERRORS AND EXIT.
MOV
TST

BPL
*

;:gg
7404 030776
030776
7407 031000

031000
031004

7408 031006

TP4VEC,4
RS

;RESTORE THE NORMAL 004
;CHECK THE ERROR FLAGS.

TRAP VECTOR,

:EXIT ROUTINE IF NO ERRORS.

: REPORT “DEVICE REGISTER ACCESS TEST FAILED”
;

104460

016700
104451

005067

7409 031012
031012
;:i? 031014

000402

7412
7413 031016

000000

TRAP
DODU

151172
151206

CLR

DCCLN

104444

7414 031020
;:{2

000000

7417 031022
7418 031026
031026
031026

005067

104401

ERROR

UNITN
CTRLCF

:DROP THIS UNIT FROM FUTHER

TESTING.

603

MOV
TRAP

UNITN,RO
CsDODV

TRAP

C$DCLN

s INDICATE NO CTRL-C ABORT FROM TEST
.

sABORT THIS SUB PASS.

CSERROR

josssssssssssssss LOCAL STORAGE, AL
EA2000000 0000000400 RA0RARARAARRARAAS
50$:
.WORD
O
s STORAGE FOR THE SOURCE OR DEST OF
THE CKTRAP MOVE
52%:
151172

.
.WORD
O
$STORAGE FOR THE SOURCE OR DEST
OF THE CKTRAP MOVE,
ittbsssnssrsssnsssas END BEBLABAL
ALI00000 0000 A0 AR RARRARRAAGAR
ARASS

60%:

CLR
ENDTST

CTRLCF

s INDICATE THAT WE ARE NOT WITHIN A
TEST.
L10025:

TRAP

CsETST

lobdef YS! #An1e

M@c%zoo

15-MAR-84 09:48

7420
7421
7422
7423
7424
7425

-SBTTL

7466

7467

SEQ

TEST

- KBECHO

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

THIS

LOOPBACK MODE.

WHICH

FOR:

THE

TEST

KEYBOARD

WHICH

THE

SPECIFIED

STOP BIT,
EXECUTES

THIS

TEST

TESTING

CHANNEL.

TEST

THE

USED

CRT

FOR
CAN

AND

TO ALLOW THE

RTS

AND

THE

UNTIL

SET

THIS

TEST

LINES

THE

TERMINAL
GENERAL

DUT

FROM

INTO

THE

OTHER

LINES

TESTING OF MODEM LINKS.

THE

LINES

OPERATOR.

KEYBOARD

LOOPBACK

SELECTED

REMOTE

WITH A BAUDRATE

SETS

TERMINATED

BACK

USED

SET

ACTIVE

ARE

8 BITS/CHARACTER.

LOOPING
BE

ARE

FOR

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

OPERATOR.

COMMUNICATIONS LINKS
DTR

0.‘0.‘0‘.‘....‘.‘0

TEST

LINE UARTS

INDEFINITELY

CAN BE

TERMINAL

UARTS

ACTIVE

NO PARITY

PUTS

ECHO

192

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

INPUT

ONTO

METHOD

FOR

END

THE

DURING

THIS

:-- .‘.‘..“‘t..“.““..0“‘.““0‘0“‘.“.‘t....‘t.““

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

BGNTST

012700
104441
000002
012767

SETPR1

000240
000002

HEd

VERIFY

151124

000005

2%:

INTERVENTION ALLOWED.

CMPB
BEQ

LOPBCK,#5
28

177777
000001
022271
013022
151354

TST

MUST HAVE

THE FOLLOWING:

s TEST THE LOOPBACK TYPE INDICATOR.
1KBD ECHO LPBCK SELECTED? YES, CONTINUE
TEST.

iNO,

MANUAL

EXIT

104432
000202
012767
012767
012767
012767
005067

k-1

BCOMPLETE

103402

MOV
#PRIOS,RO
TRAP
C$SPRI
s INCREMENT THE ASSEMBLY TIME TEST
COUNTER,
:SET UP THE TEST NUMBER.
(94)

MANUAL

EXIT

104432
000212

104450

sALLOW LTC INTERRUPTS.

THAT THE TEST SHOULD BE PERFORME
D.
KEYBOARD ECHO LOOPBACK SELECTED.

126727
001402

#PRIOS

TNUM == TNUM + 1
MOV
#TNUM, TSTNUM

151214
3
5
H

ABORT THE

TEST,

TRAP

CSEXIT

TRAP

CSEXIT

«WORD
L10026-.
sCHECK FOR MANUAL INTERVENTION ALLOWED.
TRAP
CSMANI
+MANUAL INTERVENTION ALLOWED? YEgésDO
TEgI.
iNO,

ABORT THE TEST,
.WORD

151122
154210
154204
154200

4%:

MOV

MOV
MOV

CLR

©-1,CTRLCF

@1 ,.ERRTYP

#9401. ,ERRNBR
OEMI401 ,ERRMSG

ERSMRF

s INDICATE

THAT

ARE

IN A

sSET ERROR TYPE AS FATAL

L10026-,

TEST,

IN ERROR

TABLE.

;SET THE FIRST ERROR NUMBER IN ERROR
TABLE.
;SET ERROR MESSAGE ADDRESS IN ERRTBL
.

sINITIALIZE THE "REPORT ERROR SUMMARY”
FLAGS.

:.RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO,
i

7460
7461

7462 031124
7463 031130
7464 031132
7465

HARDWARE

L15

132

7426
7427
7428
7429
7430
7431
7432
7433
7434
7435
7436 031030

031030
7437 031030
031030
031034
7438
7439 031036
7440
7441
7442
7443
7444
7445 031044
7446 031052
7447 031054
031054
031056
7448 031060
031060
7449 031062
031062
7450 031064
031064
031066
7451
7452 031070
7453 031076
7454 031104
7455 031112
7456 031120
7457
7458
7459

PAGE

CLEAR TXx AND RX INTERRUPT ENABLE BITS IN THE CSR,

THIS SUBROUTINE REPORTS ERROR

004767
103402
000167

166206

)

000120

JSR

BCS

. +6

JMP

THE

TEST NAME.

PC,CLNRST

>>>>> 9401

<¢c<<<,

sRESET THE DHU-11, REPORT ANY ERRORS FOUND
.

sSKIP EXIT OF TEST IF NO FATAL ERROR FOUND.
sRESET FAILURE,

ABORT THIS TEST,

S
Pllol. iketF fEs}®!T PART
PA414

MaggRY200 15-mA-04 03:48 PacE 1321
M

7468 0

ogfig 012746 013022
0311

7450

42
031146
031152
031154
031156

012746
012746
010600
104417
062706

PRINTF

7485 031202

:
:
:
:

7486 031204

;::z 031210
7489 031214

;::? 031220
7492 031224

;::2 031230

167140

052700
016705

ASL
ASL
ASL
ASL
BIS

000377
150752

175672

012700

011304

#30,R0

MOV

JSR
i

7496

9EF0S03, -(SP)
92, -(SP)
SP,RO
CSPNTF
06,5P

#377,R0

ACTLNS,RS

PC.WTWLPR

PC,WTWLNC
;

iGET DUPLICATE COPIES OF BAUDRATE
CODE
i
IN THE UPPER BYTE OF THE NEW

LPR CONTENTS.

:SET UP 1 STOP BIT, NO PARITY,

IN THE LPR CONTENTS.

8 BITS/CHAR

:GET THE ACTIVE LINES BIT MAP.

$SET UP THE DUT LPR REGISTERS FOR ACTIVE
LINES.
iSET UP DTR, RTS, REMOTE LPBK,

AND RX ENABLE
.

$SET UP THE DUT LNCTRL REGS FOR ACTIVE
LINES.

s WAIT FOR THE OPERATOR TO TERMINATE THE TEST.

;::;

7499 031234
7500 031242

031242
031244
031246
031250
031252
031254

7501

BIS
MOV

175632

R1
R1
R1
R1

R1,RO
RO

JSR

7495

Q@EM9401 , -(SP)

PC,GETBDR
R1,RO

SWAB

BIC

000030

004767
004767

MOV

CALCULATE PROPER DUT LPR CONTENTS.
SET UP THE DUT LPR REGISTERS.
GET THE PROPER DUT LNCTRL REGISTER CONTE
NTS.
SET UP THE DUT LNCTRL REGISTERS.
JSR
MOV

006301
006301
006301
006301

042700

SEF0503, 2EM9401

SET UP THE DUT UARTS WITH THE PROP
ER LINE PARAMETERS.
GET THE DESIRED BAUDRATE FROM THE OPER
ATOR.

050100
000300

>
€0 194

000006

;:;«7»

7480 031170
7481 031172
7482 031174
7483 031176
7484 031200

M15

MOV
MOV
MOV
TRAP
ADD

3
:

004767
010100

005530
000002

7471
7472
7473
7474
7475

7478 031162
7479 031166

031256

012767

'—

000001

150766

7506 031264
7507 031270
031270
031270

01, GMANWD
;SET UP DEFAULT ANSWER TO YES.
TERMSG,GMANWD,1,YES

100008 ;

;ssgi"

7505 031256
031256
031262

MOV
GMANIL

104443
000404
002230
000130
013437
000001

7503

PROMPT "TYPE <CR> TO TERMINATE THE TEST
:"

TRAP
BR
.WORD
.WORD
.WORD
LWORD

CS$GMAN
10000
GMANWD
T$CODE
TERMSG
1

i WE GOT A RESPONSE FROM THE OPERATOR, SO TERMINATE
THE TEST.

‘-

012700
10444}
005067
104401

608

000340
150730

SETPRI
CLR
ENDTST

#PRIO7
CTRLCF

;:DISABLE ALL INTERRUPTS.

MOV
OPRIO7,RO
TRAP
C$SPRI
s INDICATE THAT WE ARE NOT WITHIN A
TEST,
L10026;

TRAP

CSETST

DHU-11 FUNC TST PARTS

HARDWARE

TEST

MACRO M1200
- MODLPB

15-MAR-84 09:48

7509

.SBTTL

7510

7511

7512

7513

7514

7515
7516

;s
is
s
i

7517
7518

7519

7520

HARDWARE TEST
THIS

TEST

LOOPBACK

;gg;

7529

7530
;gg“i’

L
is

7533
7534
7535

it
;s

7536
;gg;

i*
i
g

7539
7540 031272

;g:: 031300

012700
104441

NUMBER

000003
012767

000003

DSR=N,

256

BYTE

UTILIZES

RI=N,

DATA

PRINT MODEM STATUS

PATTERNS

SIGNAL REPORT

EXIT

THE

TEST

LOOP BACK

7549 031306
7550 031314
7551 031316
031316
031320
7552 031322
031322

7553 031324

031324

7554 031326
031326
1888 031330
7556 031332

126727
001402

150662

000004

2s:

104450

SEND

(D)

AFTER EACH PATTERN:

DATA):

177777

150660

(L)

oPRIOS

sALLOW LTC INTERRUPTS.

#TNUM, TSTNUM

MOV
TRAP

#PRIOS,RO
C$SPRI

s INCREMENT THE ASSEMBLY TIME TEST COUNTER,

iSET UP THE TEST NUMBER.

(89)

MUST HAVE THE FOLLOWING:

MANUAL INTERVENTION ALLOWED.
LOPBCK,#4
2s
TST

MANUAL
4%

: TEST THE LOOPBACK TYPE INDICATOR.
sMODEM LOOPBACK SELECTED? YES, CONT
INUE
iNO, ABORT THE TEST.
TRAP
+WORD
sCHECK FOR MANUAL INTERVENTION ALLOWED.
TRAP

sMANUAL INTERVENTION ALLOWED? YES,

;iNO,

ABORT THE TEST.

BCS

MOV

#-1,CTRLCF

s INDICATE THAT WE ARE IN A TEST,

TEST.

CSEXIT
L10027-,
CSMANI

DO TEST.

TRAP

LWORD

43:

(L)

LINE

A REPO

000672

012767

SELECTED

“0““‘0“““‘.“““‘“t‘ttt‘.‘t““
““‘tt‘..t‘ttt“‘.“t““‘t“‘t““
BGNTST

EXIT

104432

EACH

CTS=N

BAUDRATE.
AN ERROR
SUMMARY IS REPORTED AT
THE END OF THE TEST IF ANY LINES HAVE
EXCEEDED THE NUMBER OF INDIVIDUAL
DATA ERRORS TO REPORT AS SELECTED IN THE
SOFTWARE P-TABLE DIALOGUE.

BCOMPLETE

103402

THIS TEST IS PERFORMED USING 8 BITS
PER CHARACTER, 1 STOP BIT, AND NO
PARITY.
TVHIS TEST DOES NOT SUPPORT SPLIT
SPEED.
ALL SELECTED LINES
ARE TESTED AT THE SELECTED

CMPB
BEQ
EXIT

104432
000702

TO SEND MORE

IF EXTENDED ERROR REPORTING IS ALLO
WED,

MOV

(L)

OPERATOR

RT IS PRINTED AT THE END
OF EACH DATA PATTERN WITH THE FOLLOWING
FORMAT :
MODEM LOOPBACK TEST STATUS REPORT:
PATTERN 4NNN (D) COMPLETED.

+ VERIFY THAT THE TEST SHOULD BE PERFORME
D.
3
MODEM LOOPBACK SELECTED.

;’3;

DCD=N,

FOLLOWING

AT THE COMPLETION OF SENDING T
SPECIFIED NUMBER OF DATA PATTERNS THE
TEST ISSUES THE FOLLOWING PROMPT:

]

7545
7546

TEST

REPEATED FOR EACH ACTIVE LINE

TNUM == TNUM + 1

150752

THIS

710

THIS TEST IS RUN ONLY IF MODEM

(1-255, 0=SEND UNTIL tC):

SETPRI

000240

SPECIFIED.

e s

]

7542

IS USED TO MOVE DATA THROUGH A
MODEM WHICH IS CONNECTED

LINE oN:

i
i

..“.‘..oaooo..-ooo

THE
DIALOGUE :
MODEM BAUDRATE IN BPS:
(D) 1200 ?
TYPE <CR> WHEN MODEM LINK ESTABLISHED:
MODEM STATUS SIGNAL REPORT:

7525
7526

031272
7541 031272
031272
031276

- MODEM LGOPBACK TEST

ONE OF THE DEVICE SERIAL PORTS.

;ggz

- MODLPB -

oo.o..o.oo.aa.oooAo..totto.o

7522

SEQ

to.o.....otoo.tt..totat.....

7821

N15

PAGE 133

COEXII

L10027-,

195

PAR14

7557 031340

755e 031346

7559 031354

756? 031562

012767
012767
012767
005067

MACRO M1200

" Fo0LPS

000001
021305

Ol1146

151112

15 MAR 84 09:48

PAGE

MOV
MOV
MOV
CLR

153746
153742

155736

Ble

153-1

“EQ

01 ,ERRTYP
#8901..ERRNBR
SEMB901 ERRMSG
ERSMRF

iSET ERROR TYPE AS FATAL IN ERROR TABL
E.
;SET THE FIRS! ERROR NUMBER IN ERROR TABL
E
;SET ERROR MESSAGE ADDRESS IN ERRTBL,
JINITIALIZE THE "REPORT ERROR SUMMAR
T " FLAGS,

s RESET THE DUT TO A KNOWN STATE,
REMOVE
s
CLEAR Tx AND Rx INTERRUPT ENABLE
BITS

031366
031372
031374

004767
103402
000167

THE STATUS CODES FROM
IN THE CSR.

THIS SUBROUTINE REPORTS ERROR >>>>> 8901

165744

JSR

PC,CLNRST

JMP

603

BCS

000610

THE F1FOQ,

cccce,

(RESET THE DMU-11, REPORT ANY ERRORS FOUN
D,
i SKIP EXIT OF TEST IF NO FATAL ERROR FOUND
.
tRESET FAILURE, ABORT THIS TEST,

.+6

3 SET UP FOR TRANSMIT AND RECEIVE

031400
031400
031404
031406
031406
031412
031416
031422
031426
031430
7576 031434
031434
031440
031444
031450
031454
031456
051462
031462
031466

012700

10444

012746
012746
016746
012746
104437
062706
012746
012746
016746
012746
104437
062706
012700
10444

SETPRI

000340

OPRIO7

SETVEC

00030¢C

INTERRUPTS,

sDISABLE ALL

TXVECA,O0TXDMA,oPRIO6

INTERRUPTS,

$SELECT DMA

027426

000003

012700
004767

SETVEC

000300
027216
150516
000003

RXVECA,ORXCHRS,®PRI06

;SELECT

RXx

INT

SERVICE

7589
7990

ADD

RTN,

MOV
MOV

TRAP

000010
SETPRI

000200

oPRIO4

ALLOW

INTERRUPTS,

ADD

MOV

TRAP

03, -(SP)

CSSVEC

@10,5P

OPRIOG, -(SP)
RXCHRS
- (SP)
,

RXVECA, -(5P)
3, -(SP)

CSSVEC

910,5P

OPRIOAG
, RO

C$SPR]

s CLEAR TME CUMULATIVE ERROR COUNTERS (ONE
FOR EACH LINE),

003302
165660

7588

OPRIOG, -(SP)
OTXDMA, -(SP)
TXVECA, -($P)

MOV
MOV

MOV
JSR
PRINT

THE

9ERCNTB,
RO
PC,CLR16W
THE

TEST

75487

MOV
MOV
MOV

TRAP

012746
012746
012746
010600
104417
062706

CS$SPRI

MOV

000010

OPRIO?,RO

TRAP

INT SERVICE RTN.

‘A

031470
031474

MOV

iCLEAR THE RX ERROR COUNTERS TABLE.

NAME
.

PRINTF 0FF 0503, 0EMB8901

011146
005530
000002

MOV

0EF 0508, - (5P)

MOV
TRAP

SP,RO
CIPNTF

MOV

000006

ADD

i
:

PREPARE

GET

TO CALL

THE

SET

UP ROUTINE,

THE DESIRED BAUDRATE FROM THE OPERATOR.

CALCULATE PROPER DUT LPR CONTENTS.
CALCULATE THE PROPER RX "IME -OUT VALUE FOR THIS
SPEED,

PEMBIOL, -(SP)

MOV

@2, -(SP)

06, 5P

mo’“nf"fi:sf’“ PARTA

MAGBE, P3<00

15 MAR 84 09:48

Zgg‘;

’

7594 031524
7595 031530
7596 031532
7597 031534
7598 031536
7599 031540
7600 031542
7601 031544
7602 031546
;2g2 031552

004767
010100
006301
006301
006301
006301
050001
000301
042701
052701

000377
000030

7605 031556
;:gg 031562

004767
012767

166754
177400

166576

150442
H

7610 031570
7611 031572
7612 031576

005003
012702

010204

031600
031602
031604
031606

105303
110324
105703
001374

7618 031610
7619 031612
7620 031616

010205
012700
012524

7617

7621 031620

7622 031622
7623
;gg; 031624

003602
65:

000020

8s:

005300

001375
012703

PC.GE TBDR
R1,RO
R1
R1
R1
R1
RO,R1
R1
2377,R1
230,R1

JSR
MOV

PC,GETTIM
0177400, IBM

7628 031630
7629 031634
;gg? 031640

012700
016705
004767

$SET UP 1 STOP BIT, NO PARITY, 8 BITS/CHA
R
i
IN THE LPR CONTENTS.
1GET TIME-OUT BASED ON MINIMUM BAUD
RATE IN USE.
+FORM BIT MAP OF UNUSED TX/RX BITS.

R3
OBUFBAS,R2

1PREPARE TO START DATA PATTERN AT 255,
1GET THE BASE OF THE DATA PATTERN BUFF
ER.

DECB
MOVB
TSTB
BNE

R3
R3,(R4).
R3
63

sGET THE NEXT BYTE OF THE DATA PATT
ERN.
iWRITE A BYTE OF THE DATA PATTERN,
:CHECK FOR DONE WRITING DATA PATTERN.
1DATA PATTERN DONE?
NO, LOOP TO DO NEXT BYTE.

MOV
MOV
MOV

R2,.RS
016, ,R0
(RS)+,(R4).

:PREPARE SOURCE POINTER.
:PREPARE LOOP COUNTER.,
iWRITE 2 BYTES OF THE OVERFLOW PATT
ERN.

MOV

R2,R4

DEC

0256, ,R3

1 YES,

:COUNT

WRITE

32 BYTE OVERFLOW REGION.

THESE 2 BYTES.

116 WORDS WRITTEN?
NO, LOOP TO WRITE ANOTHER.
1YES, COMPLETE DATA PATTERN IS DONE
.
$SET DATA PATTERN LENGTH TO 256,

011000
150332
175222

MOV
MOV
JSR

sSPECIFY TO SET RTS AND DTR.
sSPECIFY ACTIVE LINES.
$SET DUT RTS AND DTR ON ALL ACTIVE LINE
S,

i WAIT FOR THE OPERATOR TO ESTABLISH THE MODEM CONNE
CTION,

i
012767

PROMPT “TYPE

’-

000001

150356

MOV
GMANIL

104443
000404
002230
000130
013074
000001

<CR> WHEN MODEM LINK ESTABLISHED:
"

01, GMANWD
1SET UP DEFAULT ANSWER TO YES,
EMLMSG,GMANM
1, YES
D,

100004
;

‘O

7638
;ezg

7641 031666

sGET DUPLICATE COPIES OF BAUDRATE
CODE
+
IN THE UPPER BYTE OF THE NEW
i+
LPR CONTENTS.

i SET THE DUT RTS AND DTR BITS FOR THE ACTIVE LINES
.

;ggz

s 031666

CLR
MOV

MOV

7632

7635 031644
7636 031652
031652
031654
031656
031660
031662
031664

€0

SET UP A 256 BYTE DATA PATTERN.

;:2?

JSR
MOV
ASL
ASL
ASL
ASL
BIS
SWAB
BIC
BIS

BNE
000400

1532

SET UP THE BIT MAP OF UNUSED TX/RX BITS.

;603

7613
7614
7615
7616

PAGE

Cle

004767

167332

i REPORT THE STATE OF THE MODEM STAT
US SIGNALS,
i SET DEFAULT OF PRINTING MODEM STATUS
AFTER EVERY DATA PATTERN,

JSR

PC,MSSRPT

TRAP
BR
LWORD
.WORD
JHORD
LWORD

C3GMAN
10000
GMANWD

T3$CODE
EMLMSG

197

BRHodARE
‘W fST PARTS mMACRO MI200 15 MAR 84 09:48 PAGE 153 3
;Zfi 031672

7644
7645

012767

000001

150344

o1,PMSFLG

3 ASK OPERATOR FOR THE NUMBER OF DATA PATTERNS
3
PROMPT: “NUMBER OF 256 BYTE DATA PATTERNS TOTO SEND.
SEND ON EACH SELECTED LINE
;

z::g
'

7648 031700

7649 031706

031706
031710
031712
031714
031716
031720
031722

0317284
031726

7650 031726

7651 031732

;ggg 031734
7654

012767

000001

150322

10%:

016704

005005

005067

150276

150264

PROMPT:

104443
000404
002244
000130
013352
000001

;
'
:

;g;z 032000

.WORD

TSHILIM

1CLEAR THE "AT LEAST ONE ERROR" FLAG

AFTER

EACH DATA PATTERN,
“PRINT MODEM STATUS SIGNAL REPORT AFTE
R EACH PATTERN: (L)
v 2

USE LAST RESPONSE AS DEFAULT (DEFAULT
OF YES THE FIRST
GMANIL
PMSMSG,PMSFLG,1.YES

‘-

CSGMAN
10001
GMANWD
T$CODE
NDPMSG
377
TsLOLIM

:CLEAR THE DATA PATTERN COUNTER.

FERROR

3 ASK IF MODEM STATUS SIGNALS SHOULD BE REPORTED

7664

7673 031770
7674 031774

100018 ;

CLR

;gz

7670 031762

sSET DEFAULT NUMBER OF PATTERNS TO
1.

GMANWD
, R4

CLR

7661
7662
7663

;2;3 031766

1 2~

NDPMSG,GMANWD,D,377,0,25rES
5,

MOV

7660

;::g 031756

(D)

000255

7667 031754

21 ,GMANWD

*C):

TRAP
BR
.WORD
.WORD
.WORD
.WORD
.MORD

;ggg

031740
031742
031744
031746
031750
031752
031754

MOV

GMANID

104443
000406
002230
000052
013224
000377
000000

7658 031740

(1-255, 0=SEND UNTIL

7655

7659

MOV

‘O

Dib

TIME).

100025 ;

TRAP
BR
.WORD
.WORD
.WORD
.WORD

C $GMAN
100023
PMSFLG
TSCODE
PMSMSG
1

SET UP_THE DUT AND TX/RX VARIABLE
S.
Rl - TX, RX LPR CONTENTS.
R2 - START ADDRESS OF DATA PATTERN
TO TX/RX.

R3 - LENGTH OF DATA PATTERN.

;s SEND THE DATA,

005205

004767

166752

004767

170662

103110

004767
004767

012767

128:

INC

JSR
JSR

BCC
171140
166614

021306

JSR
JSR

153310

MOV

;g;;

iCOUNT THIS DATA PATTERN,

PC,MODSUP

PC.PUFIFD

608

PC ,PURRXB
PC, INIDMA

$SET UP THE DUT AND TX/RX VARIABLE
S.

#8902, ,ERRNBR

1PURGE

THE DUT RECEIVE CHARACTER FIFQ,

1ABORT THIS TEST IF FIFO WOULD NOT PURG
E,
sPURGE THE RX CHAR BUFFER IN MEMO
RY,
1SEND THE FIRST BATCH OF DATA PATT
ERNS

;SET ERROR NUMBER 10 8905,

i THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 8902
THRU 8907 ceece,

;g;g 032006

004767

171156

7681 032012
7682 032016

005767
001404

150206

JSR

PC,RDCHRS

sREAD AND VERIFY THE RX CHARACTERS.

ST
BEQ

FERROR
13s

sHAS AN ERROR BEEN DETECTED ?
sBRANCH IF [T MASN'T,

DHU-11 FUNC

HARDWARE

Elo

15T PARTS

TEST

MODLPB

76853 032020
7684 032026

032767
001430

000100

150134

7686 032030

012767

021314

153260

7685

7687

133:

3
004767

174204

7700
7701
7702
7703 032076
7704 032100
7705 032102

032104
7707 032106

7708
7709
7710
7711
7712 032110
7713 032116

032116
032120
032122

MOV

28908..ERRNBR

;MAS EXTENDED ERRO

163

RTING BEEN REQUESTED >
sBRANCH TO THE "EXIRT REPO
TEST 2" QUESTION IF NOT.
;SET ERROR NUMBER

THIS ROUTINE REPORTS ERRORS WITH NUMB
ERS

JSR

PC, TXRRFP

TO 8908,

>>>>> 8908 THRU 8911 «cecc.

;REPORT FTNA{ FRRORS FROM Rx/8x

i REPORT END OF DATA PATTERN IF ALLOWED.

epoHODEM LOOPBACK

TEST

STATUS REPOR’:
PATTERN ONNN (D) COMPLETED.
s REPORT THE MODEM STATUS SIGNAL STATES IF
REQUESTED

010546
012746
012746
010600
104415

062706
005767
001402

004767

005422
000002
000006
150154

PRINTX

IST
8EQ

167126
i

las:

005304
001403

100324
005204
000722

*»

OEDPFMT.RS

MOV
MOV
MOV

sREPORT THE MODEM STATUS.

THERE ARE MORE DATA PATTERNS

DEC
B8PL
INC
B8R

R4
168
128
Ra
128

TO SEND,

LOOP BACK

PROMPT:

“EXIT

THE

012767

000001

150112

16%:

104443

MOV

GMANIL

TO SEND AGAIN.

sCOUNT THIS DATA PATTERN.
PT FOR EXIT,
sNO, CONTINOUS SENDING?YES,NO,PROM
SEND
NEXT PAT
sYES, RESTORE PATTERN COUNTER.
sGO TO SEND NEXT DATA PATTERN.
sLAST DATA PAT SENT?

; PROMPT FOR EXIT OF THE TEST OR SENDING OF MORE DATA

TEST

81,GMANWD

LOOP BACK

SEND MORE

PATTERNS.
DATA):

(L)

7716
717
7718
7719

000001

CMP

BNE

GMANWD,
o1

10%

i ALL_ DONE.

i
i
i
i

7720

005000
012705
004767

177727

174712

1SET DEFAULT ANSWER TO YES.
TRAP

CSGMAN

JWORD
"WORD
MORD

GMANWD
TSCODE
EXTHSG

100038;

sCHECK OPERATOR RESPONSE.
EXIT ROUTINE
.

HAVE BEEN TOLD TO EXIT.

CLR

JSR

PC. WTWLNC

OMAPLNS.RS

100034

JEXIT RESPONSE? NO, LOOP TO SEND MORE DATA,

sNO,

CLEAR DEVICE DTR AND RTS SIGNALS.
DISABLE INTERRUPTS.
CLEAR THE INTERRUPT VECTORS.
REPORT ANY NECESSARY ERROR SUMMARIES.

MOV

EXTMSG,GMANW
1, YES
D,

B8R
150072

SP.RO
C$PNTX

ADD
26,5P
sCHECK THE "PRINT MODEM STATUS" FLAG
.
sPRINT MODEM STATUS? NO, SKIP PRINTING.

PC.MSSRPT

BEQ

RS, -(5P)
OEDPFMT . .(5P)
02, -(5P)

MOV
TRAP

PMSFLG
143

JSR

032130
032132
7714 032132
7715 032140

1721
7722
7723
7724 n32142
1725 032144
7726 032150

BIT06,O0PTION

‘.

7694
7695

7696 032042
032042
032044
032050
032054
032056
032060
7697 032064
7698 032070
7699 032072

BIT

‘.

7688

7689
7690 032036
7691
7692
7693

8€Q

sINDICATE TO CLEAR ALL LNCTRL BITS.

s INDICATE

TO CLEAR FOR ALL L INES.

sCLEAR ALL THE RTS AND DTR SIGNALS.

PARDuARE

YE]ST

PARTA

MACRD M1200

15 MAR 84 09:48

Fl6
PAGE

1335

“€Q 200

7727

7728 032154
032134
032160

7729 032162

032162

032166

7730 032170

032170

7784 032174
7782 032176

012700
104441

016700

104436

016700
104436

012767

7753 032204

004767

77585 032216

012700
104441
005067

7734 032210
032210
03,214

7736 032222

032222
032222

104401

000340

150002

171620

000340

147776

#PRIO7

CLRVEC

TXxVECA

:DISABLE ALL
sRETURN

INTERRUPTS,

INT

VECTOR

MOV
TRAP

10 UNUSED POOL .

MOV

CLRVEC

147772
021320

SETPRI

RXVECA

;RETURN RX

MOV

608 :

JSR

SETPRI

CLR

ENDTST

98912. ,ERRNBR

PC,REPSMR

CSCVEC

MOV

RXVECA,RO

INT VECTOR TO UNUSED POOL.

@aPRIO7

CTRLCF

s SELECT NUMBER 8912 FOR

TXVECA,RO

TRAP

153112

@PRIO7,RO
CS$SPRI

CsCveC

THE NEXT ERROR REPORT,

;REPORT ERROR SUMMARIES IF CALLED FOR,
;:DISABLE ALL

INTERRUPTS,

MOV
@PRIO7,RO
TRAP
CS$SPRI
: INDICATE THAT WE ARE NOT WITHIN A
TEST.

L10027:

TRAP

CSETST

PART
RAROUA
fE RE
]S PARTA S
.

MACRO M1200 43_MAR 84 09:48
RO

-MAR -

7738

.SBTTL

7739

7740
7741
7742
7743

;e
;e
;e
P

7744

7745

7746

;;:;

;e
g

77‘9

$--

7750 032224
2781 032224

s 032230

7754

012700
104441

000004

012767

7757 032246
7758 032254
7759 032262

012767
012767
012767

;;:g 032270

012767

000004

177777

;;;g 032322

000001
010461
010174

7784

7785 032344
7786 032352
;;g;

014032

TOP

THE

DIAGNOSTIC

INVOLVE REMOVING PART OF

THEN RESTORING.

THE

WILL BE PRINTED AT

NUMBER

THE

BITS

CONSOLE

PROGRAM

THE DIAGNOSTIC RUNTIME
THAT

THE

MAVE

END OF

BEEN

THE

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

MOV
MOV
MOV

153024

MOV
‘0

SERVICES AND

SUCCESSFULLY

TEST,

TESTED

REQUESTED.

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

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

005067

#PRIOS

;ALLOW LTC

INTERRUPTS

OTNUM, TSTNUM

©-1,CTRLCF

9ERCS03,ERRBLK

TRAP

@PRIOS,RO
C$SPRI

s INCREMENT THE ASSEMBLY TIME TEST COUNTER

:SET UP THE

s INDICATE

TEST NUMBER

THAT WE ARE

IN A

TEST

:SET ERROR TYPE AS FATAL IN ERROR
TABLE
;SET ERROR NUMBER TO 4401
;SET ERROR MESSAGE ADDRESS IN TABL
E

;SELECT THE CORRECT ERROR REPORTING
ROUTINE

3 CLEAR THE SUCCESS FLAG TO INDICATE TEST
FAILURE IN CASE IT DOES

001402

CLR

SUCSS

+ INDICATE FAILURE

IN CASE THE DUT FAILS

' RESET THE DUT TO A KNOWN STATE,REMOVE
THE STATUS CODES FROM THE FIFO.
3 CLEAR TX AND RX INTERUPT ENABLE

004767
103402

000167

BITS IN THE CSR

‘-

165030

JSR
BCS
JMP

001332
»

016767

012767

60$

sRESET THE DMU , REPORT ANY ERRO
RS
$SKIP EXIT OF TEST IF NO FATAL ERRO
R FOUND.

:EXIT THE TEST, FATAL ERROR WAS FOUN
D.

: SET UP THE 004 TRAP VECTOR TO POINT
TO OUR TRAP SERVICE ROUTINE,

027404

147734

MOV

145454

MOV
L

4,TP4VEC

#TPARTN, 4

iSAVE

THE EXISTING 004

TRAP VECTOR

;POINT THE VECTOR AT OUR SERVICE ROUT
INE.

s DETERMINE WHETHER MEMORY MANAGEMENT IS PRESENT

‘-

005767
001007

147764

012767

001252

012767
000442

000021

012767

PC,.CLNRST
.*6

‘-

145464

TST
BNE

MMPRE S
13

147656

MOV

21252,DMTSTA

001324

MOV
BR

@17, ,BI7STD
108

;;gg
7791 032354

THIS MAY

MOV

153080
153034
153030

;;;g
7780 032330
7781 032334
7782
7783 032336

0‘0‘0.0

- DMA ADDRESSING TEST THIS TEST VERIFIES , AS FAR AS
POSSIBLE , THAT THE DUT CAN PERF
ORM A
DMA FROM A FULL 18 BIT OR 16
BIT ADDRESS. THE TEST RELIES
ON FINDING A
COMPLEMENTARY PAIR OF ADDRESSE
S BETWEEN THE TOP OF PHYSICAL
MEMORY AND
THE START OF THE

MOV

147752

;;;2
7775 032314

‘...“‘0..00000‘0‘0000

TNUM == TNUM + 1

150020

;;g;

;;;5 032310

- DMAADR

..‘0..0.0..‘0.0.‘0‘..

MOV

7766

7769 032302
7770 032306

TEST

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

SETPRI

000240

;;gg
;;gg 032276

HARDWARE

2
€0 201

T4::

7735 032232

7756 032240

PAGE
1

Gle

BGNTST

7752 032224

032224

+IF MEM MGT IS PRESENT THEN
sAVOID SETTING THE DMA TEST ADDR
FOR
3A 16 BIT MACHINE
.
sSET UP THE FIRST DMA TEST ADDR FOR

3A 16 BIT MACHINE

sSET THE BITS TESTED 10 16 » 1
:SINCE MEM MGT ISN'T PRESENT
sTHERE'S NO NEED TO SET UP THE MEM
MGT REGS.

:'ser UP THE HIGHEST POSSIBLE TEST ADDRESS IN DMTSTA

005252

147640

1$:

MOV

#5252,DMTSTA

sSET UP THE FIRST DMA TEST ADDRESS FOR
THE

koblaf EsfS" P

7800 032376

7801 032400
7802 032404

001306

MOV
e

000023

005000
012701
010031

062700

022701
001372

Hlo

CLR

MOV

ADD
cMP
BNE
e

SET UP THE

012777

177600

032412

147722

MOV
3

032420
032424
032430
032432
032436

032440
032444
032450
032454

012700
0127901
010031
022701
001374

005067

012700
016701

004767

002364

cHP

BNE

OPARATB,R1

RO,8(R1).

€200,R0O
OPAR7A,R1

032466
032466
032470

‘-

10443)1
010067

032474

012701

032500
032502
032502
032506
7843 032510
7844 032512

005004

012700
10444
005204
005005

:SET

THE

SAME

THE PAGE BASE

iPOINT

TO 18 BITS

ADDRESS

THE START OF

TO ZERO

THE PAR ADDRESS

TABLE

;LOAD THE PAR

iCALCULATE THE NEXT PAGE ADD
RESS
;LOOP UNTIL PARS O THROUGH 6
;ARE LOADED.

INPUT/0UTPUT PAGE PAR

TO THE

#177600,8PAR7A

PAR

;SET

TOP 4KW OF PHYSICAL MEMORY
#7

TO POINT

THE

TOP

4axuw

NO ABORT/TRAP,UPWARD EXPANSICN
128
, BLOCKS PER PAGE

:BIT PATTERN FOR THE PDRS
;POINT AT START OF PDR ADDR TABL
E

RO,8(R1)+

;BEEN SET

OPDRATE ,R1

;LOOP UNTIL ALL PDRS HAVE
uP,

SET THE MEM MGT STATUS REG @3 FOR,
18 BIT ADDRESSSING,
NO UNIBUS MAPPING, NO D SPACE, IN CASE
THIS REG EXISTS.
NOT ALL UNIBUS MACHINES MAVE MEM MGT
STATUS REG @3, SO THE CKTRAP ROUT
INE
MUST BE USED TO CATCH AN 004 TRAPS THAT
OCCUR IF THE REG DOES NOT EXIS
T,
70$
CLR
sSET UP THE SOURCE OPERAND
#70% ,RO
MOV
:SET UP THE SOURCE ADDR FOR
THE MOVE.
MOV
MMSR3,R1
sSET UP THE DESTINATION ADDR FOR
THE MOVE ,
JSR
PC.CKTRAP
:PERFORM THE MOVE AND CATCH ANY
004 TRAPS,
;e

001226
033672
147642
164576

027362

: 18 BIT MACHINE
.
:SET THE BITS TESTED

#219.,BITSTD

THE PDRS FOR

MOV
MOV
MOV

012767

SET UP

077406
002344

;
3

032460

SEQ 202

SET UP THE PARS O THROUGH 6 TO REL
OCATE

002324
000200
002342

PAGE 133-1

032410

012767

7794
7795
7796
7797 032370
7798 032372
7799

7792
7793 032362

MACRO ”lZ_Mfl,fl—B‘ 09:48

145316

TRY AND FIND A COMPLEMENTARY PAIR OF ADDRESSE
S WITHIN THE MEMORY AND SAVE
THE CONTENTS OF THE TWO AREAS. THE TEST IS ABAN
PAIR HAS NOT BEEN FOUND BEFO
RE

DIAGNOSTIC IS ENCOUNTERED,

10s:

MOV

MEMORY

©TP4BRT,4

FFREM

THE

AREA

DONED IF A COMPLEMENTARY
OF MEMORY CONTAINING THE

iCHANGE THE 004 TRAP VECTOR TO POINT

s TPABRT SINCE THIS IS THE
ROUTINE
sWITH THE BYTE SUBROUTINE
CKTRPB.

sGET

THE ADDRESS OF

147532

THME FIRST FREE WORD
TRAP
CSMEM

;OF MEMORY ABOVE THE DIAGNOSTIC.

003602

MOV

#BUFBAS ,R1

CLR

SETPRI

000340

128:

INC
CLR

oPRIO7

R4
RS

ASSOCIATED

MOV

RO,FFREM

sPOINT AT THE BUFFER WHERE THE CONTENTS
OF
s THE MEMORY BEING READ ARE TO BE SAVED,

sCLEAR THE COMPLEMENTARY PAIR INDICATOR
(CPI)

sDISABLE CLOCK

INTERRUPTS

;s INCREMENT THE CPI
s INDICATE THAT A SAVE OF

MOV

TRAP

THE DATA AT

#PRIO7 ,RO
CS$SPRI

RRRobAST
RE
ST PARTS
7847
7848
7849
7850

032520
032524
032530
032534

7851
7852 032536

7853 032540
7854 032544
7855
7856 032550
7857 032552
7858 032560
7859 032562
7860
7861 032566
7862
7863
7864
7865 032572
7866

7867
7868
7869
7870

7871
7872
7873

032600
032602
032606
032612

7874
7875
7876 032614
7877 032622
7878
7879 032624
7880 032632
7881 032636
7882 032642
7883 032644
7884 032652
7885
7886 032654
7887 032660
7888
7889
7890 032664

7891
7892
7893
7894
7895
7896
7897 032670
7898
7899 032674
7900 032702
7901

012703
004767
012701

005767
001403
005004
012701
022704

001447
016767
000241

000020
165044
004202
147520

MOV
JSR
MOV
TST
BEQ

003602

000002
147444

14%:

CLR
MOV
cHpP
BEQ
MOV

00i122

CLC

PAGE 134-2

“EQ 203

s (DMTSTA) IS REQUIRED.

216. ,R3

sSET

THE NUMBER OF

BYTES

TC BE

READ

PC.DMRU
SBUFMID, . R1

iSAVE THE DATA CONTAINED AT ADGRESS
DMTSTA,
;POINT AT SECOND STORAGE AREA

143

s THE CPI AND RESEING THE SAVE
AREA ADDR

sCLEAR

TPAFLG

:IF WE HAVE

#BUFBAS,R1

ROR

DMTSTA

005367

001104

DEC

BITSTD

THEN AVOID CLEARING

THE CPI.

;IF

A PAIR OF

COMPLEMENTARY

ADDRESSSES HAVE

;GO ANC WRITE THE TEST DATA
:SAVE THE OLD DMTSTA

TO THMESE ADDRS .

:BEEN FOUND THEN

173
DMTSTA,ODTSTA

147434

VALID MEMORY

;RESET THE ADDR FOR THE SAVED
DATA STORE

@2.R4

006067

:CLEAR CARRY READY FOR THE ROTATION
;COMPLEMENT THE DMTSTA TO PRODUCE THE
NEXT
: DMA TEST ADDR.

:DECREMENT THE NUMBER OF BITS TEST
ED COUNT

: CHECK THAT THE NEW DMTSTA IS NOT INSIDE THE DIAGNOSTIC PROGRAM

‘-

032767

001343
004767
020067
103336

176000

147422

BIT

€176000,DMTSTA

128
PC,DM16B
RO,FFREM
123

164710
147414
3

;IgnggfisgflTSTfl
H

1252

THEN WE'RE

:BRANCH AND CONTINUE WITH THE SEAR
CH
;CONVERT THE DMISTA TO A PHYS
ICAL ADDR,
+ARE WE INSIDE THE DIAGNOSTIC
REGION ?
iNO , THEN BRANCH AND CONTINUE WITH
THE SEARCH

i SINCE WE ARE NOW INSIDE THE DIAGNOSTIC, WE INCR
EMENT BIT #14 OF THE DMTSTA
sPHYSICAL ADDRESSS AND IF WE'RE STILL INSIDE
THE DIAGNOSTIC WE ABANDON THE
s TEST. ONCE WE ARE IN THIS REGION WE ARE ONLY
ABLE

022767
001014

000252

147400

012767

000652
040000

147370

062700
020067
103404
012767
000716
005267
012701

238383 A3

7845
7846 032514

MACRO "120&“&'““ -84 09:48

147364

000016

001024

152436
010224

15¢:

INC

MOV

9252,DMTSTA
158

9652 ,DMTSTA

940000,R0

RO ,FFREM

15s
214, .BITSTD
123

ERRNBR

¢EMA402 ,R1

000754

16%:

JMP

343

THE LOWEST

14 BITS,

sIF THE BIT HAS ALREADY BEEN
SET THEN
sABANDON THE TEST,AFTER REPO
RTING THE ERROR

+ BECAUSE NO SUITABLE MEMORY MAS BEEN FOUN
D
:SET

sADD

INTO

THE PHMYSICAL

ADDR

THE DIAGNOSTIC

sREPORT ERROR AND ABANDON THE
TEST,
sO0THERWISE SET THE BITS TESTED
TO 14 BITS.
sCONTINUE WITH THE SEARCM.

THEN

+SET THE ERROR NUMBER TO 4402

sSELECT MESSAGE

TO BE REPORTED.,

“ NO SUITABLE ADDR FOUND.

DMA

TEST ABORTED

3JUMP TO THE ERROR,

i WRITE THE TEST DATA INTO THE TWO AREAS JUST
FOUND, IF A TRAP OCCURS WHILE
i WE ARE WRITING DATA INTO THESE AREAS THEN
THE HOST MACHINE IS AT FAULT,
012700
016767
016767

005130
147322
000774

178;

000776
147312

MOV

MOV
MOV

#SDPBAS RO

DMTSTA,DUMY
ODTSTA,DMTSTA

THE BIT

sIF WE'RE NOW STILL INSIDE

000167

TO TEST

3SET UP

THE SOURCE ADDR FOR THE MOVE AS OUR

sTEST DATA PA(TERN,

sSAVE THE LOMWER DMTSTA
;START WITH THE MIGMER OF THE
s COMPLEMENTARY ADDRESSES,

TWO

DHU-11 FINC

MARDWARE

TST PARTS

TEST

7902 032710

7903 032714

7905 032720

7906 032724

7908 032730

012703

012705
012701

008767
005267

MACRO M1200

" DMAADR

164624
147364

7919 032770
7920 032778

005767
001333

JSR

152362

004767
005767
001345

016767

MOV

172254

7913 032740
7914 032744
7915 032750

012700
004767

MOV

000340

010275

7916 032752

MOV

000001

012701

7917 032760
7918 032764

000722
005154
164600

INC

MOV

JSR
TST
BNE

147242

MOV

MOV
JSR

14760

TST
BNE
»

7922

PAGE 134-3

J16

#16. .R3

“€Q 204
:SET

THE NUMBER OF DATA BYTES

21.RS

:INDICATE TO WRITE TO DMTSTA

2340 .R1

sSET PRIORITY

PC,STPSW
ERRNBR

6EM4403.R1

PC,DMRM
TPaFLG
168

DUMY,DMTSTA

9SDP3B.RO
PC .DMRU

TPAFLG
168

;SET

7 TO DISABLE

THE ERROR NUMBER

TO BE WRITTEN

THE CiLOCK

TO 4403

SSELECT THE MESSAGE.
3 "HOST FAILURE. WRITE FAILED TO
AN ADDR WHICH

sHAD BEEN SUCCESSFULLY READ. TEST RBANDONEHLS

:PERFORM THE TRANSFER
SEXIT IF MOST FATLURE
:AND REPORT ERROR
sSELECT THE LOWER DMA TEST ADDR.
:SELECT THE NEXT DATA PATTERN
;PERFORM THE TRANSFER
{EXIT IF HOST FAILURE

i SET UP THE DU TO PERFORM THE DMA.

792%

3 -

7924

7925

7926
7907

;
;

SET INTERNAL LOOPBACK, ENABLE THE
RECIEVER FUNCTION ON THE LINE.
SET_THE LPR ON THE UINE TO 38.4K
BAUD, 8 BITS PER CHARACTER. 000
PARITY,
s 2 STOP BITS. ENABLE THE TRANSMIT

1928

7930 032776

000020

7909 032734
7910

7911

15-MAR-84 09:48

005267

TER ON THE L INE.

‘.

152314

INC

7931 033002

004767

164774

JSR

PC.FINACT

ERRNBR

sSET THE ERRNBR TO 4404

7933 033006
7934 033010
7935

010102
012701

010367

MOV
MOV

R1.R2
OEMA4404.R1

7937 033016

000167

JSAVE THE LINE NUMBER ON WHICH
THE DMA WILL 0CCUR
sSELECT THE MESSAGE.
i_"NO ACTIVE LINES . TEST ABANDONE
D"

7936 033014

7938 033022

1940

7942 033024

7943 033030
7944 033034
7945 033040

7946 033044

1948

7950 033050

103402

010201

J¥

MOV

012700

004767
012700
004767

004767

000204

174032
177676
174052

172360

MOV

JSR
MOV
JSR

PC,uTWLNC
0177670.R0
PC.,WTWLPR

PC.TXENBL

MOV

ODTSTA,RS

: INITIATE THE DMA
000626

012704
010167
012767

005130
000610
000002

7955 033072
7956 033076
7957 033100

012700
005003
012702

000052

006305

R2.R1

JSR

016705

308

i AN ACTIVE LINE HAS BEEN FOUND
*

7951 033054
7952 033060
7958 033064

7958 033104

8CS

000424

000006

;
000600
188

208+

iFIRSTFIND AN ACTIVE LINE ON WHICH TO
PERFORM

tEXIT IF A LINE COULD NOT BE FIUND ,AFT
ER FIRST

SRESTORING THE CONTENTS OF MEM
ORY.

sRESTORE THE ACTIVE LINE NUMBER

sPASS THE LNCTRL CONTENTS

s INITIALISE THE LNCTRL REGISTER
sPASS THE LPR CONTENTS
sINITIALISE THE LPR REGISTER

SENABLE TRANSMITTER ON THE L INE

sSTART FROM THE HIGHER OF TME PAIR OF ADDR
,

MOV
MOV
MOV

oSDPBAS.R4
R1,80%
02,708

sSET UP THE ADDR OF THE DATA PATTERN
sSAVE THE LINE NUMBER FOR THE DMA
s INITIALISE THE LOOP COUNT

MOV
CLR
MOV

52,R0
R3
06.R2

sSET UP THE LSB'S
:
sCLEAR THE REG THAT WILL MOLD THE
6 MSB: S
:CONVERT THE DMTSTA INTO

ASL

iA PHYSICAL ADDRESS WITH

PRkoaARe Vst PARTS
7959 033106

7960 033110
7961 033112
7962 033114
7963 033120
7964 033122
7965 033126
7966 033130
79¢7
7968 033134
7969
7970 033142
7971 033150

7972
7973
7974 033154
7975 033160
7976
7977 033162

033170
033174

006103
005302
001374
032705

001402

ROL
DEC

BNE
BIT
BEQ

000100

012700
060005
052703

000200

016777

000534

012767
012701

01043

105777
100532

147034

012777
010577
110377

000020
147016
147014

000025

PAGE

134-3

SEQ 209

R3
R2

:THE MSB'S IN REG o3,

203
#100,R5
223

:TEST BIT @6 OF THE DMTSTA
:ALTER THE LSB'S IF BIT 96 WAS SET.

MOV
ADD
BIS

925,.R0
RO,RS
€200,R3

147036

MOV

80%,3CSRA

152146

MOV
MOV

$SELECT THE LINE ON WHICH TO PERF
ORM THE DMA,

TSTB

@TXAD2A

MOV
MOV
MOVB

#16. ,8TXBFCA
RS,8TXAD1A
R3,8TXAD2A

:SET_ERROR NUMBER 4405
:SELECT THE MESSAGE,
i " DMA_START BIT FOUND SET BEFORE DMA
INIT,
:TEST ABANDONED"
s TEST THE DUT DMA-START BIT
sEXIT WITH ERROR IF SET ,AFTER FIRS
T RESTORING
: THE CONTENTS OF MEMORY.
:SET UP CHARACTER COUNT
:SET UP BITS O TO 15 OF THE PMYISCAL
ADDR.
$SET UP BITS 16 TO 21 , AND INITIATE
THE DMA,

22%:

BMI

147026

HEd

;ADD IN THE LSB'S
:SET BIT o7.

30%

WAIT FOR THE DMA TO COMPLETE
AND THE LAST CHARACTER

TO BE RECIEVED

033200
033204

012701
016702

170144
146770

MOV
MOV

#170144 ,R1
CSRA,R2

033210

005267

152102

INC

ERRNBR

033214

004767
012701

173572
010522

+SET ERROR NUMBER TO 4406

JSR
MOV

PC,WAIBIS
#EM4406,R1

sWAIT FOR BIT TO SET
+SELECT THE MESSAGE ,

033220

s TEST BIT 15,

;PASS

033224

103110

033226
033230
033234
033240

010402
012704
004767
010204

8CC
MOV
MOV

164216

JSR
MOV

308
R4 ,R2
5,R4

PC,DELAY
R2,R4

005003
012705

000200

033250
033256

012767
012701

010467
010576

146714

012700

170301

004767

TEST.

" TIME-OUT OCCURED WAITING FOR DMA T0

+DELAY TO ALLOW LAST CHARACTER TO BE RECI
EVED
;:RESTORE R4

CLR

9128, ,R5

sCLEAR THE READ DATA COUNTER
sSET THE MAX BMP CODE READ COUNT

MOV
MOV

£4407. ,ERRNBR
¥EMA407,R1

sSET THE ERRNBR TO 4407
$SELECT THE MESSAGE ,

MOV

152040

24s:

MOV

BPL

171254

MOV

BIC
BNE
JSR

BRBUFA,R2
308

#170301,R0

R2,R0O
283
PC,SAvBMP

$SAVE R4
3SET 5 MS DELAY

" RXFIFO EMPTY

s TEST ABANDONED”

017702
100067

001011

THE REG

sCOMPLETE. TEST ABANDONED"
sEXIT IF TIME-OUT OCCCURED, AFTER FIRS
T
sRESTORING THE CONTENTS OF MEMORY ,

040200

TIME-OUT OF 100 MS,

ADDR OF

:.READ THE CONTENTS OF THE RXFIFO AND COMPARE THEM WITH THE CORRECT

033242
033244

8009 033262
8010 033266
8011
8012 033270
8013 033274
8014 033276
8015 033300

THE

TOO SOON,

DATA

DMA FAILED

sREAD THE CHARACTER FROM TME FIFO
+BRANCH TO REPORT ERROR IF FIFO EMPTY T00 SOON,
sAFTER FIRST RESTORING THE CONTENTS OF MEMORY,
+SET UP BIT MASK OF A BMP CODE

sTRY

TO CLEAR THE BMP CODE MASK

sBRANCH IF NOT A BMP CODE
sSAVE THE BMP CODE ON THE QUEUE

RAkobARE YES TS
.

8016
8017 033304
8018 033310

8019

PARTS

005267
012701

T e TM
M

-MAR-84 09:48

152006
010660

INC
MOV

—

124-5

L16

ERRNBR
9EMA408,R1

:ggg

:SET THE ERRNBR TO 4408
sSELECT THE MESSAGE,

i~ OO MANY BMP CODES FOUND IN THE RXF
: TEST ABANDONED"

8022 033314
8023 033316

005305
001453

DEC
BEQ

RS
308

gggz 033320

000753

B8R

2as

8027 033322
8028 033330

012767
010201

8024

€Q 206

SEQ

010471

151766

28%:

IFO,

:DEC_THE MAX BMP CODE READ COUNT
iGO_REPORT ERROR IF TOO MANY BMP
CODES FOUND
sAFTER FIRST

RESTORING THE CONTENTS OF MEMORY..

iDON*T COUNT THE BMP CODE AS A VALI
D CMARACTER

MOV
MOV
MOV

151756
000332

MOV
MOV
CMPB
BNE
CLR
INC
cHP
BNE
DEC
BEQ
MOV
MOV

OER9101 ,ERRBLK
@-1,SUCSS
(R4).,R1
308
SUCSS
R3
#16. ,R3
243
708
298
#SDP28, R4
DMTSTA,RS

;SELECT THE ERROR ROUTINE.
s INDICATE 'BAD BITS' FAILURE
sCOMPARE CHAR FROM FIFO WITH THE CORR
ECT DATA.
sBRANCH IF INCORRECT AND RESTORE MEM
CONT'S.
s INDICATE NON TEST SPECIFIC FAILURE
E.G. TIME-OUTS
:COUNT THIS CHARACTER.
sHAVE WE RECIEVED ALL THE CHARACTERS
?
iLOOP UNTIL ALL CHARACTERS (NON-BMP) ARE
READ.
;:DECREMENT THE LOOP COUNT
:BRANCH IF BOTH DMA'S ARE COMPLETED
:SET UP THE SECOND DATA PATTERN
iSET UP THE OTHER DMA TEST ADDRESS
;SET ERRNBR TO 4410
sSELECT THE MESSAGE

;SET THE ERRNBR TO 4409
;SAVE THE CHARACTER FROM THE FTIFO
+SELECT THE MESSAGE ,

8029 033332

012702

010723

8031 033336
8032 033344
8033 033352
8034 033354
8035 033356
8036 033362
8037 033364
8038 033370
8039 033372
8040 033376
8041 033400
&g 033404

012767
012767
122401
001034
005067
005203
022703
001327
005367
001420
012704
016705

015444
177777

005154
146612

8044 033410
8045 033416

012767
012701

010472
010760

151700

MOV
MOV

#4410. ,ERRNBR
9EM4410,R1

gg; 033422

012767

014032

151672

MOV

8049 033430
8050 033434
8051

9EROS03,ERRBLK

004767
103004

167214

;SELECT THE ERROR ROUTINE

JSR
BCC

PC,PUFIFO
30

;PURGE THE RXFIFO
EXIT WITH ERROR IF FIFO WOULD NOT
sAFTER FIRST RESTORING THE CONTENTS PURGE |,
OF MEMORY.
;OTHERWISE REPEAT,

8030

8046

gggg 033436

000615

8054 033440

012767

gggg

000322
000020
000274

000001

000236

#1,5UCSS

3 _“ RXFIFO FAILED TO PURGE, TEST ABANDONED

s INDICATE THAT WE HAVE BEEN ABLE
TO TEST,

:SOME OF THE BITS.

s RESTORE THE ORIGINAL DATA IN THE MEMORY

146550
000222
003602
000001
000020
164066
146546

000224
146540

8063 033466
8064 033472
8065 033476
8066 033502
8067 033506
8068 033510

016767
016767
012700
012705
012703
004767
005767
001012
016767

000164

146504

8070 033516
8071 033522

012700
004767

004202
164042

8069

MOV

HE4

gggz
8059
8060 033446
8061 033454
8062 033462

293:

i " BAD BIT BETWEEN BITS O AND *

30%:

MOV
MOV
MOV
MOV
MOV
JSR
TST
BNE
MOV

DMTSTA, DUMY
ODTSTA,DMTSTA
#BUFBAS ,RO
21,R5
916, ,R3
PC,DMRW
TP4FLG
318
DUMY ,DMTSTA

MOV
JSR

98UFMID,RO
PC,OMRW

sSTART WITH THE HIGHER OF THE PAIR OF
DMTSTA

sPOINT AT THE START OF THE SAVED DATA
AREA

sSELECT WRITE TO (DMTSTA)
sPASS NUMBER OF BYTES TO BE WRITTEN
sRESTORE THE DATA
sGO REPORT ERROR IF A TRAP OCCURED
3
iNOW RESTORE THE DATA FROM THE LOWER

sOF THE PAIR OF TEST ADDRESSES,

sPOINT AT THE START OF THE SAVED DATA
AREA
;RESTORE THE DATA

204

gnu-u FUNC TST PARTS
ARDWARE

TEST

8073 033526
8074 033532
8075

8076 033534
8077 033542
8078

8079
8080
8081 033546
8082 033554
8083
8084

MACRO M1200
15-MAR-84 09:48
- DMAADR -

005767

146522

012767
012701

011007

001411

012767
000433

010473

014032

ST
BEG
151554

31%:

M16
SE

TPAFLG
323

MOV

;GO REPORT ANY ERRORS IF A NO TRAP
: OCCURED DURING THE RESTORE .

#4411 . ,ERRNBR

MOV

:SET THE ERROR NUMBER TO 4411

#EMA411 .R1

sSELECT THE MESSAGE .

i " HOST FAILURE. WRITE FAILURE
TO AN ADDR
::!%?;E:A?OPREVIOUSLY BEEN SUCCESSF
ULL
Y

151546

MOV

®EROSO03,ERRBLK

BR
3

HAS

THE

;SELECT THE ERROR ROUTINE

343

HE4

8085

8086
8087
8088
8089

PAGE 134-6

;REPORT THE ERROR

TEST BEEN SUCCESSFUL,

;s REPORT THE ERRORS OTHERWISE.

THE BITS

TESTED

HAS,

005767
001430
016701
005301
022767
001021

000122

32%:

000106
000001

000104

TST
BEQ
MOV
DEC

SUCSS
345
BITSTD,R1
R1

BNE

343

cMP

HEd

#1,SUCSS

:IF THE ERROR IS NON TEST SPECIFIC THEN
;BRANCH TO REPORT ERRORS
;LOAD THE NUMBER OF BITS TESTED
;:DEC TO GIVE THE BIT POSITION OF
THE MSB
:IF THE BITS TESTED ARE BAD THEN

TESTED,

:BRANCH AND REPORT ERRORS .,

i OTHERWISE DETERMINE IF PRINTING OF
THE SUCCESSFULLY TESTED BITS WAS REQU
ESTED.
‘-

8101

032767
001416
010102
005202

010246
010146
012746
012746
010600

104414
062706
000401

000040

146352

MOV
INC

PRINTB

104441
016767

005067

#BITOS,0PTION
60$

: PRINT THE BITS TESTED IF THE SOF
TWARE
;OPTION HAS REQUESTED IT

R1,R2

;:CALCULATE THE NUMBER OF BITS WHICH
MHAVE

®EF4401,R1,R2

BEEN TESTED SUCCESSFULLY.

sPRINT

THE NUMBER OF BITS

005631
000003

000010

104460
012700

BIT
BEQ

000240
146376

146332

34s;

ERROR

60$:

SETPRI

60$

;EXIT THE TEST
;3

#PRIOS

TESTED MESSSAGE.
MOV
R2,-(SP)
MOV
R1, -(%P)

MOV
MOV
MOV
TRAP
ADD

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

REPORT ERRORS

sENABLE

THE CLOCK

TRAP

CSERROR

MOV

144122

MOV

CLR

EXIT

104432
000016

TP4VEC,4

CSSPRI

sRESTORE THE NORMAL 004 TRAP VECTOR

CTRLCF

s INDICATE THAT WE ARE NOT WITHIN
A TEST

TST

TRAP
LWORD

#PRIOS,RO

TRAP

S%23244ss804ss404000000s

708 :
80%:

BITSTD:

DUMY :

ODTSTA:

LOCAL

VARIBLE

AREA

CSEXIT
L10030-,

SEAEABEL2000000000000080

00000404

. WORD
.WORD

[¢]
O

sCOUNTER FOR THE NUMBER OF DMA'S
COMPLETED
sSAVE AREA FOR THE ACTIVE LINE NUMB
ER

.WORD

;DUMMY VARIABLE

.WORD

sNUMBER OF BITS TESTED

sHIGHER OF THE PAIR OF COMPLEMENTAR
Y

ADDR,

!
'

DMU-11 FUNC TST PART4

HARDMARE

TEST

8118 033704

8119
:;.gg

000000

15-MAR-84 09:48

- DMAADR

SUCSS:

.WORD

8122

8123
8124 033706
033706
033706

MACRO M1200

PAGE 134-7
O

B1
SEQ 208
1SUCCESS INDICATOR,

i
'

-1

- ERROR DUE TO BAD BITS

1 - SUCCESSFU. TEST
0 - OTHER ERRORS

:oootoooooo.oo.oooooooouooooo END #00000000000000000000000000000000000808088

’104401

ENDTST
L10030:

TRAP

CSETST

MsdnE

57 PARTa

MACRREHA200

15-MAR-84 09:48

8126

.SBTTL

8128
8129

SEG 209

HARDWARE TEST

- FRMERR

FRAMING

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

0‘.0‘

ERROR

GENERATION

TEST

(Y;OI%‘TE&T” fib USED TO VERIFY THE FRAMING ERROR DETECTION CAPABILITIES

ie
1

WHEN IN STAGGARED LOOPBACK MODE, CHARACTERS ARE TRANSMITTED FROM
ONE GROUP OF LINES AT 8 BITS/CHAR,AND RECEIVED BY THE OTHER
GROUP
AT

T
;e
T
e

THIS TEST WILL ONLY EXECUTE IF THE STAGGARED LOOPBACK MODE IS SELECTED
.
THE SPECIAL STAGGARED LOOPBACK BERG CONNECTOR MUST BE FITTED.
THE ACTIVE LINES BIT MASK IS USED TO INDICATE WHMICH LINES HAVE BEEN
REMOVED FROM FURTHER TESTING.

8140
8141 033710
033710

8171

PAGE 135

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

8130
8131
8132
8133
8134
8135
8136
8137
8138
8139

8142
8143
8144
8145 033710
8146 033716
8147
8148 033720
8149 033724
033724
033730
8150 033732
8151
8152 033740
8153 033746
8154 033754
8155 033762
8156 033770
8157 033774
8158
8159
8160
8161
8162
8163 034000
8164 034004
8165
8166
8167
8168
8169 034006
034006
12
8170 034014

5 BITS/CHAR.THIS WILL GENERATE

A FRAMING ERROR FOR EACH CHARACTER.

3 - -.‘“‘.‘.“‘.......‘.“‘.“‘..“.‘.

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

BGNTST

.0‘

15::

+ EXECUTE THIS TEST IN
.-

126727
001402

146260

000167

000372

012700
104441
012767
000005
012767
012767
012767
012767

000240

005067

177777
000005
000001
014071
011054
146504
146224

CMPB

BEQ

SETPRI

MOV

146260

LOPBCK,#2

MOV

MOV
MOV
CLR
CLR

1CHECK MODE SELECTED.

+AVOID EXITING THE TEST IF STAGGERED LOOPBACK
1MODE IS SELECTED.
3 EXIT THE TEST.

608

#PRIOS

tALLOW LTC INTERRUPTS.

®-1,CTRLCF

TNUM == TNAUM +

146312
151340
151334
151330

STAGGARED LOOPBACK MODE ONLY.

MOV

s+INDICATE THAT WE ARE IN A TEST.

TRAP

#PRIOS,RO

C$SPRI

s INCREMENT THE ASSEMBLY TIME TEST COUNTER.

STNUM, TSTNUM

$1SET UP THE TEST NMUMBER.

06201. ,ERRNBR
OEM6201.CRRMSG
ERSMRF
FERROR

;SET THE FIRST ERROR NUMBER IN ERROR TABLE.
;SET ERROR MESSAGE ADDRESS IN ERROR TABLE.
tINITIALIZE THE “REPORT ERROR SUMMARY” FLAGS.
sCLEAR THE “AT LEAST ONE ERROR* INDICATOR.

Ol.tfltw

1SET ERROR TYPE IN ERROR TABLE.

(62)

s RESET THE DUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO.
+
CLEA
TX AND
R RX INTERRUP
ENABLE BITS.
T

004767
103144

THIS SUBROUTINE REPORTS ERROR >>>>> 6201 c<cccc,

163332

JSR
8CC
'0

PC,.CLNRST
60¢

sRESET THE DUT.
1ABORT THE TEST IF FATAL ERROR FOUND IN RESET.

s DISABLE ALL INTERRUPTS.
+ SET UP DMA TX AND RX INTERRUPT SERVICE ROUTINES.
012700
104441

000340

012746
012746
016746
012746
104437
062706

000300
027426
146140
000003

SETPRI

SETVEC

#PRIO?

1DISABLE ALL INTERRUPTS.

TXVECA,®TXDMA, #PRIOE

MOV

C$SPRI

MOV
MOV

#PRIOG, -(SP)
STXDMA, -(SP)

MOV
TRAP
ADD

93, -(SP)
CSSVEC
210,5P

1SELECT DMA TX INT SERVICE RTN.

MOV

000010
SETPRI

@PRIOM4

sALLOW INTERRUPTS.

#PRIO7,.RO

TRAP

TXVECA, -(SP)

Ribodkef WEsFST PARTS

83284z pasise

8172
8173
8174
8175 034050
8176 034054

8177 034060

8178
8179
8180
8181
8182
8183 034064
8184 034070
8185 034074
8186

nmmzqo

15-MAR-84 09:48

8196 034124
8197 034130

SEQ 210

e
CLEAR TX, RX,

146426
146424
146200
Ll

CLR
CLR
CLR

EERR1-FO

AND DMA_START ERROR FLAGS.

TXDONF
RXDONF
TXINTF

1CLEAR TX DONE FLAGS FOR ALL LINES.
1CLEAR RX DONE FLAGS FOR ALL LINES,
1CLEAR TX ERROR FLAGS FOR ALL LINES.

i] SET UP ERROR TABLE AND DATA PATTERN TABLE.

THE MUMERICAL VALUE OF THE CHARACTER INDICATES THE MUMBER
OF THE LINE

i
012700
004767
005067

THAT TRANSMITTED IT.

003302

MOV
JSR
CLR

163264
147502

SERCNTB, RO
PC,CLR16W

BUFBAS

1PASS THE ADDRESS OF THE TABLE TO BE CLEARED.
1ICLEAR THE RX ERROR COUNTERS TABLE.

1SET SINGLE CHMAR DATA TO BE A NULL.

: INITIALISE DMA PARAMETERS IN THE CONTROL BLOCK.
'-

034100
034104
034110
034114

135-1

s
s

8191
8192
8193
8194

PAGE

000200

005067
005067
005067

012700
012701
004767
012702
012703
016704
004767

156470
156440
164422
003602
000001
146106
163726

TRANSMISSION ON LINE GROUP 1 AT 8 BITS/CHAR,1 STOP BITS,000 PARITY.
RECEPTION ON LINE GROUP 2 AT S BITS/CHAR,1 STOP,0DD PARITY.
MOV
MOV

JSR

MOV
MOV

MOV

JSR

0156470.RO
0156440.R1

PC.GETTIM

#BUFBAS,R2
#1.R3

LGRPIM,R4

PC ,FRPSUP

1PASS LPR PARAMETER FOR 8 BITS/CHAR.
1PASS LPR PARAMETER FOR 5 BITS/CHAR.

1GET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE.
sPASS START ADDRESS OF DATA PATTERN.
1PASS LENGTH OF DATA PATTERN.

tPASS LINE GROUP OF LINES THAT ARE TO TX.

1SET UP DUT FOR TRANSMISSION AND RECEPTION.

PURGE THE FIFO OF ANY UN-WANTED CHARACTERS.

THIS ROUTINE REPORTS ERRORS

WITH WITH ERROR NUMBERS FROM >>>>> 6202 THRU 6204 <cccc.
ORM TRANSMISSION AND RECEPTION AT 9600 BAUD.
REPORT ANY ERRORS FOUND, IE. FRAMING ERROR BIT CLEAR OR PARITY
ERROR SET.

005267
004767
103064
012767
004767
012705

151156
166566
014075
171344
100000

INC

JSR
8CcC
MOV
JSR

151142

MOV

ERRNBR

PC,PUFIFR
60
06205..ERRNBR
PC, TXFRPR
0100000,RS

1SET THE ERROR REPORT NUMBER TO 6202.

+CLEAN OUT THE FIFO.
+ABORT THIS TEST IF FIFO WOULD NOT PURGE.
;SET THE ERROR NUMBER TO 6205.
17X DATA PATTERN ON SELECTED ACTIVE LINES.
1PASS FRAMING ERROR TEST FLAG.

: THIS SUBROUTINE REPORTS ERROR NUMBER >>>>> 6205 ccccc,
004767

162546

005767
001404
032767
001436

146030
000100

’

TST

BEQ

145756

.25'

[

005104
004767
005267

163646
151076

JSR

PC,CKFRPR

IREAD CHARACTERS., REPORT ANY ERRORS FOUND.

FERROR

tHAS AN ERROR BEEN DETECTED?

gfros.ovtxou

sHAS EXTENDED ERROR REPORTING BEEN ENSL'D?

1BRANCH IF NO ERROR

1BRANCH IF IT MASN'T AND EXIT THE TEST. THE
1 TEST FAILURE MESSAGE HAS BEEN PRINTED.

REVERSE TRANSMISSION/RECEPTION ROLES ON ALL ACTIVE LINES,

24:

CoM

JSR
INC

PC,FRPSUP
ERRNBR

AND REPEAT TEST.

JREVERSE ROLES FOR TRANSMISSION AND RECEPTION.
1SET UP DUT FOR TRANSMISSION AND RECEPTION.
1SET ERROR NUMBER TO 6206.

mu&
-11
F
T PART4
s;s

msao
R
“ngo

:48
15 -MAR - 84 09:48

8227

PAGE 135-2
.

>
SEQ 211

ggg

3
.-

8230 034220
8231 034224
8232 034226
8233 034234
gazg; 034240

004767
103034
012767
004767
012705

THIS ROUTNE REPORTS ERRCRS WITH NUMBERS

166506

014101
171264
100000

JSR
8CcC
MOV
JSR
MOV

151062
k2

:ggg

PC.PUFIFR
60
#6209. ,ERRNBR
PC, TXFI
#100000,RS

>>>>>

6206

THRU 6208

<cccc,

1CLEAN OUT THE FIFO.
1ABORT THIS TEST IF FIFO WOULD NOT PURGE.
1SET ERROR NUMBER TO 6209,
1TX DATA PATTERN ON SELECTED ACTIVE LINES.
1PASS FRAMING ERROR TEST FLAG.

: THIS SUBROUTINE REPORTS ERRORS >>>>> 6209 <cccc,

‘-

:2233 034244

004767

162466

JSR

PC,.CKFRPR

tREAD CHARACTERS, REPORT ANY ERRORS FOUND.

8240 034250
8241 034254
8242 034256

005767
001404
032767

145750

TST
BEQ
BIT

FERROR
4%
#8IT06,0PTION

tHAS AN ERROR BEEN DETECTED?
1BRANCH IF NO ERROR
tHAS EXTENDED ERROR REPORTING BEEN ENBL'D?

8243 034264

‘2‘62445

g:g 034266

001406

005267

000100

151024

145676

BEQ
4%:
3

8248
8249
8250

:
:
3

8253 034272
3::,‘_3, 034276
8256 034302

034302

004767
004767

171322
171744

012700

000340

034306
8257 034310
034310
034314

016700
104436

145654

8259 034316

005067

145676

104441

8261 034322

034322
034322

S48 :

INC

ERANBR

1BRANCH IF IT MASN'T AND EXIT THE TEST.

1 TEST FAILURE MESSAGE HAS BEEN PRINTED.

THE

1SET ERROR NUMBER TO 6210.

DISABLE INTERRUPTS.
CLEAR THE INTERRUPT VECTORS.
UPDATE THE ACTIVE LINES BIT MAP TO REFLECT LINES REMOVED FROM TESTING.
THIS SUBROUTINE REPORTS ERRORS >>>>> 6210 THRU 6212 ccccc,

JSR
JSR

PC.TXIEO
PC, TXRREP

1DISABLE ALL TX INTERRUPTS.
1REPORT FINAL ERRORS FROM TX/RX.

SETPRI

@PRIO?

:1DISABLE ALL INTERRUPTS.

CLRVEC

60%:

S4s

CLR

TXVECA

CTRLCF

MOV

TRAP
tRETURN TX INT VECTOR TO UNUSED POOL.
MOV
TRAP

#PRIO7,.RO

C$SPRI

TXVECA,RO
CsCVEC

1 INDICATE THAT WE ARE NOT WITHIN A TEST.

ENDTST

104401

L10031:

TRAP

CSETST

DHU-11 FUNC TST PART4

HARDWARE

TEST

MACRO M1200
- PARERR

15-MAR-84 09:48

8263

.SBTTL

m‘

PAGE 136

SEQ 212

HARDWARE TEST

- PARERR -

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

8265

- PARITY ERROR GENERATION TEST -

8267
8268
8269
8270
8271
8272

3
;e
i®
ie
1e
i

THIS TEST IS USED TO VERIFY THE PARITY ERROR DETECTION AND REPORT
CAPABILITIES OF THE DUT.
WHEN STAGGARED LOOPBACK MODE IS SELECTED, DATA IS TRANSMITTED
ON ALL ACTIVE LINES IN LINE GROUP 1 WITH ODD PARITY SELECTED,
AND RECEIVED ON LINES IN GROUP 2 WITH EVEN PARITY SELECTED.
THIS WILL GENERATE A PARITY ERROR FOR EACH CHARACTER RECEIVED.

THE SPECIAL STAGGARED LOOPBACK BERG CONNECTOR MUST BE FITTED.

‘266

8273
8274
8275

i
3e
i®

:22;?

‘27‘

THE PARITY SELECTION IS THEN REVERSED ON THE LINES IN EACH GROUP
AND THE TEST IS REPEATED.
THIS TEST WILL ONLY EXECUTE IF THE STAGGARED LOOPBACK MODE IS SELECTED.

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

8279 034324

8280

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

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

BGNTST

034324

T6::

gg:é

3 EXECUTE THIS TEST IN
‘-

STAGGARED LOOPBACK MODE ONLY.

8283 034324
82684 034332

126727
001402

145644

g:g 034334

000167

000434

012700
104441
012767

000240
177777

145644

MOV

€-1,CTRL

sINDICATE THAT WE ARE IN A TEST.

012767
012767
0127~
0127¢7
005067
005067

000006
000001
014235
011115
146070
145610

145676
150724
150720
150714

MOV
MOV
MOV
MOV
CLR
CLR

OTNUM, TSTNUM
#1,ERRTYP
#6301 . ,ERRNBR
GEME30
. ERRMSG
1
ERSMRF
FERROR

$1SET UP THE TEST NUMBER.
(63)
31SET ERROR TYPE IN ERROR TABLE.
1SET THE FIRST ERROR NUMBER IN ERROR TABLE.
;SET ERROR MESSAGE ADDRESS IN ERROR TABLE.
+INITIALIZE THE "REPORT ERROR SUMMARY” FLAGS.
1CLEAR THE "AT LEAST ONE ERROR” INDICATOR

8285

8288 034340
034340
034344

8289 034346

8290

8291 034354
8292 034362
8293 034370
8294 034376
8295 034404
32233 034410

000006

LOPBCK, @2
. *6

sCHECK MODE SELECTED.
sAVOID EXITING THE TEST IF STAGGERED LOOPBACK

JMP

60¢

1 EXIT THE TEST.

SETPRI

#PRIOS

TNUM == TNUM « 1

+MODE IS SELECTED.

tALLOK LTC INTERRUPTS.

MOV
TRAP

#PRIOS,RO
C$SPRI

t INCREMENT THE ASSEMBLY TIME TEST COUNTER.

s+ RESET THE DUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFO.

8299

3338(1)

CLEAR TX AND

RX INTERRUPT ENABLE BITS.

s+ THIS SUBROUTINE REPORTS ERROR >>>>> 6301 <cccc,
'-

004767
103165

162716

JSR
B8CC

PC,CLNRST
60%

8305

sRESET THE DUT.
tABORT THE TEST IF FATAL ERROR FOUND IN RESET.

3 DISABLE ALL INTERRUPTS.

8308 034422
034422
034426
8309 034430
034430
034434
034440
034444
034450

cPB
BEQ

8298

8302 034414
gfi 034420

000002

i+ SET UP

012700
104441

000340

012746
012746
016746
012746
104437

000300
027426
145524
000003

DMA TX AND RX INTERRUPT SERVICE ROUTINES.

SETPRI

SETVEC

#PRIO?

1DISABLE ALL INTERRUPTS.

TXVECA,@#TXDMA, 8PRIO6

MOV
TRAP
$SELECT DMA TX INT SERVICE RTN.
MOV
MOV
MOV
MOV
TRAP

®PRIO7,.RO
CSSPRI
#PRIOG, -(SF)
@TXDMA, -(SP)
TXVECA, -(SP)
e3,-(SP)
CS$SVEC

obhaE 415" P
034452
8310 034456
034456
034462
8311
8312
8313
8314 034464
8315 034470
8316 034474
8317
8318
8319
8320 034500
8321 034504
8322
8323
8324
8325
8326 034510
8327 034514
8328 034520
8329 034524
8330 034530
8331 034534
8332 034540
8333
8334
8335
8336
8337
8338
8339
8340
8341
8342
8343
8244
8345 034544
8346 034550
8347 034552
8348 034560
8349 034564
8350
8351
8352
8353 034566
8354
8355 034572
8356 034576
8357 034600
8358 034606
8359
8360
8361 034610
8362
8363

062706
012700
104441

%a&m

15-MAR-84 09:48

000010

SETPRI

000200

G
PAGE

136-1

SEQ 213

oPRIO4

sALLOW INTERRUPTS,

CLEAR TX/RX

ADD

@10,5P

MOV
TRAP

#PRIO04 ,RO
C$SPRI

FLAGS.

005067
005067
005067

146012
146010
145564

CLR
CLR
CLR

TXDONF
RXDONF
TXINTF

:CLEAR TX DONE FLAGS FOR ALL LINES.
:CLEAR RX DONE FLAGS FOR ALL LINES.
:CLEAR TX ERROR FLAGS FOR ALL LINES.

; SET UP ERROR COUNTER TABLE.
012700
004767

’

003302
162650

MOV

JSR

9ERCNTB,RO

iPASS THE ADDRESS OF THE TABLE TO BE CLEARED.

PC,CLR16W

iCLEAR THE RX ERROR COUNTERS TABLE
.

i
g

012700
012701
004767
012702
012703
016704
004767

INITIALISE DMA PARAMETERS IN THE CONTROL BLOCK.

156470
156570

MOV

MOV
JSR

164012
005154
000020
145476
163316

MOV

MOV
MOV
JSR

#156470,R0

1PASS LPR PARAMETER WITH ODD PARITY.

#156570,R1
PC,GETTIM

iPASS LPR PARAMETER WITH EVEN PARITY.
:GET TIME-OUT BASED ON MINIMUM BAUDRATE

#SDP28B,R2

iPASS START ADDRESS OF DATA PATTERN.

@16.,R3
LGRP1M,R4
PC.FRPSUP

IN USE.

iPASS LENGTH OF DATA PATTERN.
:PASS BIT MAP OF LINES TO BE SET WITH ODD PAR.
:SET UP DUT FOR TRANSMISSION AND RECEPTION.

PURGE THE FIFO OF ANY UN-WANTED CHARACTERS.
PERFORM TRANSMISSION AND RECEPTION OF THE 16 BYTE
DATA PATTERN AT

9600 BAUD.
TRANSMISSION ON LINE IN
GROUP 1, 8 BITS/CHAR, 1 STOP BITS, ODD PARITY,
RECEPTION ON LINES IN
GROUP 2 AT 8 BITS/CHAR, 1 STOP, EVEN PARITY.
REMOVE CHARACTERS FROM THE FIFO AND LOOK FOR THE PARITY
ERROR BIT BEING SET.
REPORT ANY ERRORS FOUND, IE. FRAMMING ERROR BIT SET
OR PARITY ERROR CLEAR,

004767
103111
012767
004767
005005

THIS ROUTINE REPORTS ERRORS

)

166162

014241
164030

JSR

B8CC

150536

MOV
JSR
CLR

PC,PUF IFR

>>>>>

6302

THRU 6304

<<<cc.,

;CLEAN OUT THE FIFO.

60s$

96305. ,ERRNBR
PC, INIDMA
RS

HE4

WITH NUMBERS

sABORT THIS TEST IF FIFO WOULD NOT PURGE.

:SET ERROR NUMBER TO 6305
:TX DATA PATTERN ON ALL ACTIVE LINES.
sPASS PARITY ERROR TEST FLAG.

THIS SUBROUTINE REPORTS ERROR NUMBER

>>>>> 6305

<cccc,

004767

162144

JSR

PC ,CKFRPR

;READ CHARACTERS,

005767
001404
032767
001457

145426

TST
BEQ
BIT
BEQ

FERROR
2%
@BIT06,0PTION
54

sHAS AN ERROR BEEN FOUND ?
;BRANCH TO CONTINUE IF IT HASN'T,
iHAS EXTENDED ERROR REPORTING BEEN REQUESTED ?
(EXIT THE TEST IF IT HASN'T, THE TEST FAILURE

000100

145354

REPORT

ANY

ERRORS FCUND.

;MESSAGE HAS ALREADY BEEN REPORTED.
005267

150502

2%:
i

INC
THIS

ERRNBR

SUBROUTINE

REPORTS

:SET ERROR NUMBER
ERPORS

WITH NUMBERS

TO 6306.

»>>>>

6306

THRU 6309

<ccus

PakouARe “YE ST
]

8364
8365
8366
8367
8368
8369

IS1

034614
034620
034624
034626
034634

8;70
8371
8372 034636

8373 034644

8374 034650
8375 034654
8376
8377
8378

8379 034660
8380 034662

8381
8382
8383

8384 034666

8385 034672
8386 034674
8387 034702

PARTS

MACRQ

004767
005767
001404
032767
001457

171426
145400

012767

005067

005067
005067

005104
004767

004767

103040
012767
004767

AR R

000100

014246

145632

M1200

1S5S MAR

09:48

JSR
TST
BEQ
BIT
BEQ

145326

150452

45:

MOV

CLR

145630
145404

;e
; REVERSE
;-

CLR
CLR

13%6 -2

PC. TXRREP
FERROR
as
@BITO6,0PTION
60$
#6310.,ERRNBR

TXDONF

RXDONF
TXINTF

R4
PC.FRPSUP

166040

JSR

BCC
MOV
JSR

150414

PC.PUFIFR

604
#6312.,ERRNBR
PC, INIOMA

THIS

8395 034726
83%
8398 034730

004767
005767
001404
032767
001407

012767

162024
145306

000100

014255

150360

8400

PC,CKFRPR
FERROR
6$
0BITO6,0PTION

JSR

000340

016700
104436

145210

sREVERSE ROLES FOR TRANSMISSION AND RECEPTION.
sSET UP DUT FOR TRANSMISSION AND RECEPTION.
>>>>> 6310

:CLEAN OUT THE FIFO.

>>>>> 6312

THRU 6316

<<<<«.

;READ CHARACTERS, REPORT ANY ERRORS FOUND.
;HAS AN ERROR BEEN FOUND 2
:BRANCH TO CONTINUE IF IT HASN‘T.
;HAS EXTENDED ERROR REPORTING BEEN REQUESTED

;SET ERROR NUMBER TO 6317.

INTERRUPT VECTORS.
PC.TXIEO

:DISABLE ALL

THIS SUBROUTINE REPORTS ERRORS

548:

TX INTERRUPTS.

>>>3> 6317 THRU 6320 <<<<<.

JSR

PC. TXRREP

{REPORT FINAL ERRORS FROM TX/RX.

SETPRI

4PRIO7

:DISABLE

CLRVEC

150326

<cccc.

06317.,ERRNBR

TXVECA

014261

THRU 6311

:ABORT THIS TEST IF FIFO WOULD NOT PURGE.
;SET ERROR NUMBER TO 6312,
i TX DATA PATTERN ON SELECTED ACTIVE LINES.

ALL

RETURN TX

INTERRUPTS.

INT VECTOR

i
: THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS

012767

TEST.

sEXIT THE TEST IF IT HASN'T. THE TEST FAILURE
{MESSAGE MAS ALREADY BEEN REPORTED.

012700
104441

AND REPEAT

Sas

“

171300

:CLEAR RX DONE FLAGS FOR ALL LINES.
;CLEAR TX DMA HANDOVER ERROR FLAGS
.

UPDATE THE ACTIVE LINES BIT MAP TO REFLECT LINES REMOVED FROM TESTING.

004767

;SET ERROR NUMBER TO 6310.

:CLEAR TX DONE FLAGS FOR ALL LINES.

DISABLE INTERRUPTS.

170656

B416 034762

MOV
CLEAR THE

8406

8410 034746
034746
034752
8411 034754
034754
034760
8412
3413
8412

6%:
i

8402

8408 034742

8EQ

004767

iMESSAGE HAS ALREADY BEEN REPORTED.

SUBROUTINE REPORTS ERRORS WITH NUMBERS

JSR
TST
BEQ
BIT

145234

8401

8404 034736

:REPORT FINAL ERRORS FROM TX/RX.
iHAS AN ERROR BEEN FOUND ?
:BRANCH TO CONTINUE IF IT HASN'T.
;HAS EXTENDED ERROR REPORTING BEEN REQUESTED 2
SEXIT THE TEST IF IT HASN'T. THE TEST FATLURE

3¢
i THIS ROUTINE REPORTS ERRORS WITH NUMBERS
s~

034706
034712
034716
034720

TRANSMISSION/RECEPTION ROLES ON ALL ACTIVE LINES.,

COM
JSR

163174

014250
163706

PAGE

8389

8391
8392
8393
8394

MOV

96321.,ERRNBR

MOV
TRAP
TO UNUSED POOL
.
MOV
TRAP

>>»>> 6321

;SET ERROR NUMBER

10 6321.

<c<cx.

2PRIO7,RO
C$SPRI
TXVECA,RO
CSCVEC

DHU

FUNC

HARDWARE.

8417

TST

TEST

034770

PARTA

HAS‘AI‘(‘)E'R‘I&“OO

8418
8419 034774
8420 035000

004767

167034

005067

145220

035000

104401

035000

15 MAR 84 09:48

JSR

60$:

Ll
PAGE

136-3

PC,REPSMR

CLR
CTRLCF
ENDTST

€0 215
:REPORT

ERROR

: INDICATE

SUMMARIES

THAT WE ARE NOT

CALLED FOR.

WITHIN A

L100352:

TEST.

TRAP

CSETST

DHU-11 FUNC TST
HARDWARE TEST

PART4

MACRO M1200
-

DMA

15- MAR-84 09:48

8422
8423
8424
8425
8426
8427
8428
8429
8430
8431
8432
8433

8434
8435 035002
035002
8436 035002
035002
035006
8437
8438 035010
8439 035016
8440 035024
8441 035032
8442 035040
8443 035046
8444 035052
8445
8446
8447
8448
8449
8450 035056
8451 035062
8452 035064
8453
8454
8455
8456 035070
035070
035074
8457 035076
035076
035102
035106
035112
035116
035120
8458 035124
035124

035130
035134
035140

035144
035146
8459 035152
035152
035156

.SBTTL

HER4

PAGE

HARDWARE

137

SEQ

TEST

DMA

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

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

i e

DMA

MODE

TEST

THIS

i e

TRANSMISSION

THE TEST IS PERFORMED AT ALL BAUDRATES
CHARACTER,
1 STOP BIT, AND WITH PARITY

;e
i e

TEST

HIGH

VERIFIES

SPEED

AND

TEST

THAT

THE

RECEPTION

ALSO

DEVICE

PERFORMED

BOTH 5 AND 8 BITS PER CHARACTER,

i s

THIS

TEST

THE

DUT

PERFORMED

HARDWARE

L
$--

WITH

P-TABLE

THE

ALL

TNUM
MOV
MOV
MOV
MOV
MOV

145242
145174
150262
150256
150252

4PRIOS
==

TNUM « 1
HTNUM, TSTNUM
#-1,CTRLCF
@1 ,ERRTYP
#9101. ,ERRNBR
@EMI101,ERRMSG

ERSMRF
FERROR

RESET

004767
103402
000167

THIS

JMP

:
3

000340

012746
012746
016746
012746
104437
062706

000300
027426
145056
000003

012746
012746
016746
012746
104437
062706
012700
104441

SUBROUTINE

JSR
BCS

000664

THE

AND MO PARITY CHECIKING.

LOOPBACK

ACTIVE

WHICH

WAS

LINES.

SPECIFIED

‘

:SET ERROR TYPE AS FATAL IN ERROR TABLE.
:SET THE FIRST ERROR NUMBER IN ERROR TABLE.
;SET ERROR MESSAGE ADDRESS IN ERRTBL.

+INITIALIZE THE "REPORT ERROR SUMMARY" FLAGS.
;CLEAR THE "AT LEAST ONE ERROR” INDICATOR.

A KNOWN STATE,

REPORTS ERROR

PC,CLNRST
2s

INTERRUPTS,

REMOVE

>>>>>

THE

STATUS

IN THE CSR.

9101

CODES FROM

THE

FIFO.

<«<cce,

sRESET THE DHU-11, REPORT ANY ERRORS FOUND.
s SKIP AROUND TEST EXIT IF NO FATAL ERROR FOUND.

sRESET FAILURE,

ABORT

THIS

TEST.

SET UP FOR TRANSMIT INTERRUPTS,
-

2%:

SETPRI

SETVEC

4&PRIO?

sDISABLE

TXVECA,#TXDMA, #PRIO6

ALL

INTERRUPTS,

sSELECT DMA TXx

MOV
TRAP

INT SERVICE RTN.
MOV
MOV
MOV
TRAP

SETVEC

RXVECA,#RXCHRS,4PRIO06

sSELECT RX

000010
000200

BAUD), 8 BITS PER
(BOTH ODD AND EVEN).
HIGHEST 3 BAUDRATES AT

000010

000300
027216
145026
000003

PERFORM

TRANSMISSION.

MOV
#PRIOS,RO
TRAP
C$SPRI
: INCREMENT THE ASSEMBLY TIME TEST COUNTER.
sSET UP THE TEST NUMBER.
(91)
; INDICATE THAT WE ARE IN A TEST.

162254

012700
104441

THE DUT

;ALLOW LTC

_CLEAR TX AND RX INTERRUPT ENABLE BITS

i
3

(EXCEPT

WILL

MODE

CHECKING

STOP BIT,
OF

DMA

CLR
CLR
i

(DUT)

THE

C"..“‘Al“.“‘..““‘.‘..“‘.“

SETPRI

TEST

USING

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

000240
000007
177777
000001
021615
012335
145426
145146

TYPE

BGNTST
012700
104441
000007
012767
012767
012767
012767
012767
005067
005067

UNDER

CORRECTLY

SETPRI

4PRIO4

$ALLOW

INTERRUPTS,

INT

ADD
SERVICE RTN.
MOV
MOV
MOV
MOV

#PRIO7 ,RO
CSSPRI

#PRIOG, -(SP)
#TXDMA, -(SP)
TXVECA, -(SP)
CsSVEC

#10,5P

TRAP
ADD

4PRIO6, -(SP)
SRXCHRS, -(SP)
RXVECA, -(SP)
o3, -(SP)
CsSVEC
£10,5P

MOV
TRAP

#PRIO
RO
4
CsSPR!

216

SfixdbAaEU?fs{s' PART4
8460
8461
8462
8463
8464
8465 035160
8466 035164
8467 035170
8468 035174
8469 035200
8470 035204
8471 035210
8472 035214

8473 035220
8474 035226
8475
8476
8477
8478 035234
8479 035240
8480 035242
8481
8482 035246
8483 035252
8484 035256
8485
8486
8487
8488 035264
8489 035270
8490 035274
8491 035276
8492 035304
8493 035306
8494
8495 035312

8496

8497
8498
8499 035320
8500 035324
8501 035330
8502 035332
8503 035340
8504
8505
8506
8507
8508 035342
8509 035344
8510 035350
8511 035352
8512 035356
8513 035260
8514 035364
8515
8516

HRS&R M1200

15 MAR

84 09:48

PAGE

1357-1

SEQ

: TRANSMIT AND RECEIVE SHORT DATA PATTERN AT ALL BAUDRATES,
:

WITH 8 BITS PER CHARACTER,

:
012700
004767
012701
004767
012702
012703
012704
004767
012767
012767

004767
103402
000167
004767
004767
012767

003302

162170
010470
163336
005154
000020
000001
171374

177400
021616

MOV

JSR
MOV
JSR
MOV
MOV
MOV
JSR

as:

145004
150062

MOV
MOV

STOP BIT,

AND BOTH

TYPES OF

PARTTY.

ERCNTB,RO

PC.CLR16W
210470,R1
PC.GETTIM
oSOP2B,R2
@SDP2E-SDP2B,R3
o1.R4
PC . VANSUP
2177400,
IBM
9102.,ERRNBR

;CLEAR THE RX ERROR COUNTERS TABLE.
:SET UP LPR CONTENTS FOR TX/RX AT 75 BAUD.
sGET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE.
:SET UP THE START ADR OF THE DATA PATTERN.
;SET UP THE DATA PATTERN LENGTH.
:SPECIFY TO SEND 1 DATA PATTERN TO EACH LINE.

:SET UP

"VANILLA FLAVORED" TX/RX.

:FORM BIT MAP OF UNUSED TX/RX BITS.
;SET THE ERROR REPORT NUMBER TO 9102

i THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9102 THRU 9104 <<<<c.

165472

JsR

PC.PUFIFR

:PURGE THE DUT RECEIVE CHARACTER FIFO.

000452

BCS
JMP

505

;ABORT

165662
163336
021621

JSR
JSR
MOV

PC,PURRXB
PC . INIDMA
09105..ERRNBR

;PURGE THE RX CHAR BUFFER IN MEMORY.
:SEND THE FIRST BATCH OF DATA PATTERNS.
;SET ERROR NUMBER TO 9105.

150032

000406

012767

021627

144730
000100

TST
BEQ
gBIT

144656

FERROR
Ss
9BIT06.OPTION
..

JMP

TEST

IF FIFO WOULD NOT PURGE.

147776

S$:

MOV

170722

144674

144622

sHAS AN ERROR BEEN DETECTED ?
iNO, THEN BRANCH.
;HAS EXTENDED ERROR REPORTING BEEN REQUESTED 2

508

iNO,

#9111..ERRNBR

;SET ERROR NUMBER TO 9111.

000100

THIS

i THIS ROUTINE REPORTS ERRORS WITH NUMBERS >3>>>> 9105 THRU 9110 <<<<c.
"
JSR
PC,ROCHRS
;READ AND VERIFY THE RX CHARACTERS.

165700

004767
005767
001406
032767
001002
000167

004767
005767
001404
032767
001567

BOTH LINE GROUPS (iGPRS) TX AND RX WITH THE SAME PARAMETERS

THEN EXIT

THE TEST.

THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>3>>> 9111 THRU 9114 <<<c«.

UsR

TST
BEQ
BIT
BEQ

PC. TXRREP

FERROR
63
oBITO6,0PTION
50

;REPORT FINAL ERRORS FROM RX/RX.

iHAS
iNO,
;HAS
iNO,

‘0

AN ERROR BEEN DETECTED 2
THEN BRANCH.
EXTENDED ERROR REPORTING BEEN REQUESTED 2
THEN EXIT THE TEST.

; TOGGLE THE PARITY TYPE BIT SPECIFIER IN THE TX/RX SETUP PARAMETERS.
; SELECT THE NEXT BAUDRATE AND PERFORM THE TEST AGAIN IF NOT DONE.
<

010100
042701

005100
042700
050001
062701
103302

000100

6%:

177677
010400

MOV
BIC
COM
BIC
8IS
ADD

BCC

R1,RO
#100,R1

Hid

PERFORM WIDE OPEN DMA

TEST,

;COMPLEMENT THE PARITY TYPE
:
BIT IN THE TX/RX LPR SETUP

;
:
:

PARAMETER LEAVING THE
OTHER LPR PARAMETER
BITS UNCHANGED.

iSELECT

THE NEXT BAUDRATE.

:LOOP TO TX/RX AGAIN IF NOT PAST LAST BAUDRATE.

217

DHU-11

HARDWARE

157
TEST

8517
8518
8519
8520
8521
8522
8523
8524 035366
8525 035370
8526 035374
8527 035376
8528 035400

8529 035402
8530 035404
8531 035406
8532 035410
8¢ 33 035412
8534 035414
8535 035416
8536 035422
8537
8538
8539
8540 035424
8541
8542
8543
8544
8545
8546
8547
8548
8549
8550 035430
8551 035432
8552 035436
8553 035442
8554 035446
8555 035452
8556 035456
035464

PART4

mgag M1200

1i5-MAR 84

;
;
;i

09:48

PAGE

137-2

TRANSMIT AND RECEIVE 512 BYTE DATA PATTE
RNS AT ALL COMBINATIONS
19.2K, AND 38.4K BUADRATES AND S AND 8 BITS PER CHARACT
ER.
USE
AND NO PARITY GENERATION OR DETECTION.

OF 9.6k,
1 STOP BIT

INITIALIZE

005001
012702
110122

003602

7%:

105201
001375
105301
110122
105701
001374

110122
005201
020127
001373

CLR
MOV

INCB
BNE
DECB
MOVB
TST8
BNE

R1
7$
R1

MOVB

8s:

10$:

THE 512 BYTE PATTERN AND

#BUFBAS ,R2
R1,(R2)+

R1,(R2)+

MOVB

000040

VARIOUS DATA PATTERN POINTERS.

;CLEAR THE DATA BYTE COUNTER.
:GET THE BASE OF THE DATA PATTERN BUFFER.
iWRITE A BYTE OF THE DATA PATTERN.
;GET THE NEXT BYTE FOR THE DATA PATTERN.
:LOOP UNTIL FIRST 1/2 OF PATTERN IS DONE.

:GET

THE NEXT BYTE FOR THE DATA PATTERN.

sWRITE A BYTE OF THE DATA PATTERN.
:CHECK FOR DONE WRITING DATA PATTERN.
;LOOP IF DATA PATTERN IS NOT DONE.

iWRITE

INC
cMP
BNE

THE

A BYTE

THE

32 BYTE

OVERFLOW REGION.

;COUNT THIS BYTE,
s TEST FOR 32 BYTES WRITTEN.
;LOOP UNTIL 32 BYTES ARE WRITTEN.

; PREPARE TO LOOP ON THE 3 DIFFERENT BAUDRATES (9.6K, 19.2K, AND 38.4K).

012705

005072

MOV

#DLPRTB,RS

3¢

;:GET

THE BASE ADR OF

THE DMA BAUDRATE

TABLE.

: SPECIFY THE PROPER BAUDRATE.

: SPECIFY 8 BITS PER CHARACTER.
; PERFORM DMA TRANSMISSION AND RECEPTION OF S12 BYTE DATA PATTERN.
HEZ

:
§

012501
004767
012702
012703
012704
004767
012767
012767

12$:

163100
003602
001000

021633

LPR CHANGE BIT ERROR FLAGS MAY BE SET BY

MOV
JSR
MOV
MOV
MOV
JSR
MOV
MOV

000001

171136
177400

THE FOLLOWING ROUTINE REPORTS THE ERROR WITH NUMBERS 914 THRU 921.

144546
147624

(R5)+,R1
PC.GETTIM
#BUFBAS ,R2
#512. ,R3
#1,R4
PC, VANSUP
2177400, IBM
#9115. ,ERRNBR

:SET UP LPR PARAM AT NEXT BAUD, 8 BITS/CHAR.
;GET TIME-OUT BASED ON MINIMUM BAUDRATE IN USE.

:SET UP THE START ADR OF

:SEY UP THE DATA
+SPECIFY TO SEND
;SET UP “VANILLA
:FORM BIT MAP OF

:SET ERROR NUMBER

i
g

035472
035476
035500

004767
103126
012767

021636

035506
035512

004767
004767

165422
163076

165234

JSR
MOV

JSR
JSR

PC,PUFIFR

035516

004767

165446

035522
035526

005767
001407

144476

TO 9115.

60%

#9118. ,ERRNBR

sPURGE THE DUT RECEIVE CHARACTER FIFOQ.
sABORT THIS TEST IF FIFO WOULD NOT PURGE.
:SET ERROR NUMBER TO 9118.

PC,PURRXB
PC,INIDMA

;PURGE THE RX CHAR BUFFER IN MEMORY,
:SEND THE FIRST BATCH OF DATA PATTERNS.

THE DATA PATTERN.

PATTERN LENGTH.
1 DATA PATTERN TO EACH LINE.
FLAVORED" TX/RX.
UNUSED BITS FOR 8 BITS/CHAR.

THIS RGUTINE REPORTS ERROS WITH NUMBERS >3>>> 9115 THRU 9117 <<<<c.

B8CC

147610

THIS SUBROUTINE.

THIS ROUTINE REPORTS THE ERROR WITH NUMBERS >>3>>> 9118 THRU 9123 <<x<x.
JSR

PC.RDCHRS

;READ AND VERIFY

TST
BEQ

FERROR
145

;HAS AN ERROR BEEN DETECTED
iNO, THEN BRANCH.

THE RX CHARACTERS.

RaRowARE YES T
8574 035530
8575 035536
8576
8577 035540
8578
8579
8580
8581 035546
8582 035552
8583 035556
8584 035560
8585 035566
8586
8587 035570

8588
8589
8590
8591
8592 035576
8593 035602
8594 035606
8595
8596
8597
8598 035614
8599 035620
8600 035622
8601
8602 035630
8603 035634
8604
8605
8606

8607
8608
8609
8610
8611
8612
8613
8614

PART4

nnszg M1200

032767
001470

000100

012767

021644

144424

PAGE

137-3

SEQ 219

BIT
BEQ

#8IT06,0PTION
50

:NC,

MOV

#9124
. ,ERRNBR

:SET ERROR NUMBER TO 9124,

147550

iHAS EXTENDED ERROR REPORTING BEEN REQUESTED
THEN EXIT

THE

TEST.

; THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9124 THRU 9127 cccec,
004767
005767
001404
032767
001454
012767

170474
144446

14%:

000100

144374

021650

147520

JSR
TST

PC, TXRREP
FERROR

BEQ
BIT
BEQ
16$:

MOV

;REPORT

;
;
042701
004767
012767

000030
171006
177740

;HAS EXTENDED ERROR REPORTING BEEN REQUESTED
;iNO, THEN EXIT THE TEST.

#9128. ,ERRNBR

:SET ERROR NUMBER TO 9128.

BIC

#30.R1

JSR
MOV

144416

:SET UP CHAR LENGTH PARAM TO S BITS/CHAR.
:SET UP "VANILLA FLAVORED" TX/RX.
:FORM BIT MAP OF UNUSED BITS FOR S BITS/CHAR.

PC. VANSUP
@177740,18M

i e

004767
004767

021654

THIS

JSR

165112
147466

162754

ROUTINE REPORTS

PC.PUFIFR

004767
005767
001404
032767
001417

035662

012767

165324
144354
000100
021662

147426

18%:

004767
005767
001404
032767

001403
020527
103644

170352
144324
000100
005100

208
:

THIS ROUTINE REPORTS

MOV

THE ERROR WITH NUMBERS

CMP

THRU 9137

<cccc,

+HAS EXTENDED ERROR REPORTING BEEN REQUESTED ?
iNO, THEN EXIT THE TEST.

#9138. ,ERRNBR

:SET ERROR NUMBER TO 9138.

RS, #DLPRTE

12%

sREAD AND VERIFY THE RX CHARACTERS.

THE ERROR WITH NUMBERS

>>>>>

iNO,

THRU 9141

<c<<c.

THEN BRANCH.

sHAS EXTENDED ERROR REPORTING BEEN REQUESTED ?
siNO, THEN EXIT THE TEST.

;COMPARE DMA BAUDRATE TABLE PTR WITH TABLE END.
;LOOP IF NOT ALL BAUDRATES DONE YET,

HAVE EITHER RUN OUT OF

ACTIVE

LINES,

OR COMPLETED

4PRIO7

9138

sREPORT FINAL ERRORS FROM RX/RX.
sHAS AN ERROR BEEN DETECTED ?

DISABLE INTERRUPTS,
CLEAR THE INTERRUPT VECTORS.
SETPRI

9132

+HAS AN ERROR BEEN DETECTED
iNO, THEN BRANCH.

PC, TXRREP
FERROR
20¢
@B1706,0PTION
50%

B8LO

>>>>>

<«<«.

PC,RDCHRS
FERROR
18$
@8IT06,0PTION

THIS ROUTINE REPORTS

ALL DONE.

S50s$:

THRU 9131

;PURGE THE RX CHAR BUFFER IN MEMORY.
:SEND THE FIRST BATCH OF DATA PATTERNS.

HE4

9128

PC.PURRXB
PC,INIDMA

JSR
TST
BEQ
BIT
BEQ

144252

>>>

JSR
JSR

09132.,ERRNBR

WITH NUMBERS

:PURGE THE DUT RECEIVE CHARACTER FIFO.
;ABORT THIS TEST IF FI+O WOULD NOT PURGE.
:SET THE ERROR REPORT NUMBER TO 9132.

JSR
TST
BEQ
BIT
BEQ

144302

ERROR

60¢

;¢

THE

BCC

MOV

165300

SPECIFY S BITS PER CHARACTER.
PERFORM DMA TRANSMISSION AND RECEPTION OF 512 BYTE DATA PATTERN.

004767
103055
012767

FINAL ERRORS FROM RX/RX.

:HAS AN ERROR BEEN DETECTED ?
;iNO, THEN BRANCH.

164
#BIT06,0PTION
50¢

035640
035644
035650
035652
035660

8615
8616
8617 035670
8618 035674
8619 035700
8620 035702
8621 035710
8622
8623 035712
8624 035716
8625
8626
8627
8628
8629
8630 035720

15-MAR-84 09:48

;DISABLE ALL

INTERRUPTS,

THE

TEST.

DHU-11 FUNC

HARDWARE

TST PART4

TEST

035720
035724
8631 035726
035726
035732
8632 035734
035734
035740
8633
8634 035742
8635 035750
8636 035754
035754
035760
8637 035762
8638 035766
035766
035766

012700
104441

nng:g M1200

144236

016700
104436

144226

012767

157-4

N1
MOV

CLRVEC

147346

004767

104401

FPAGE

000340

016700
104436

012700
104441
005067

15-MAR-84 09:48

000340

144232

60$:

MOV
JSR
SETPRI

CLR
ENDTST

TXVECA

RXVECA

CTRLCF

;RETURN

;RETURN RX

INT

VECTOR

TRAP
TO UNUSED POOL.
MOV
TRAP

TO UNUSED

PQOL
.

MOV
TRAP

#PRIO7,RO

C$SPRI

TXVECA,RC
CsCVEC
RXVECA,RO
CSCVEC

: SELECT NUMBER 9142 FOR THE NEXT ERROR REPORT.
:REPORT ERROR SUMMARIES IF CALLED FOR.
;DISABLE ALL INTERRUPTS,
; INDICATE

THAT

ARE

MOV
TRAP

oPR107,RO
C$SPRI

TREP

CSETSY

NCT WITHIN A
L10033:

TEST.

DHU

FUNC

HARDWARE

TST

PART4

TEST

MACRO

M1200

SPLSPD

MAR

09:48

PAGE

t} C i

138

£0

8640

.SBTTL

8@41

HARDWARE

TEST

SPLSPD

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

864,

8643
8644
8645
8640

- SPLIT SPEED TEST

;e
;e
;e
;e

324;

SPECIAL

8649
8650 035770
035770
8651 035770
8652 035776
8653 036000
8654 036004
036004
036010

8655

8656 036012
8657 036020
8658 036026
036034
036042
036050
036054

TR
126727
001402
000167

144200
000524

012700
104441

000240

012767
012767
012767

000010
177777
000001

000010

012767
012767

005067
005067

021761
012542

144424
144144

28:

b iadd DL L L L

CMPB
BEQ
JMP
SETPRI

LOPBCK,®2
28
60$
@PRIOS

TNUM == TNUM +

MOV
MOV
MOV

147254
147250

MOV
MOV
CLR
CLR

:
004767
103402
000167

OTNUM, TSTNUM
@-1,CTRLCF
01 ,ERRTYP

99201. ,ERRNBR
QEM9201 ,ERRMSG

ERSMRF
FERROR

THIS SUBROUTINE REPORTS ERROR

161252

JSR
8Cs
JMP

000436

PC,CLNRST
.6
60

8672

MUST

FITTED.

T8::
1CHECK MODE SELECTED.
100 NOT EXIT IF STAGGERD LOPBCK MODE SELECTED.
sEXIT THIS TEST,
tALLOW LTC INTERRUPTS,
MOV
OPRIOS,RO
TRAP
CSSPRI

s INCREMENT THE ASSEMBLY

TIME TEST COUNTER.

$1SET UP THE TEST NUMBER.
(92)
s INDICATE THAT WE ARE IN A TEST.
:SET ERROR TYPE IN ERROR TABLE.

+SET THE FIRST ERROR NUMBER IN ERROR TABLE.
;SET ERROR MESSAGE ADDRESS IN ERROR TABLE.
+INITIALIZE THE “REPORT ERROR SUMMARY"” FLAGS.
sCLEAR THE "AT LEAST ONE ERROR” FLAG.

>>>3>> 9201

<<ccc,

sRESET

THE DUT,

sABORT

THE

TEST

IF FATAL ERROR FOUND

IN RESET.

: DISABLE ALL INTERRUPTS,

g;}

036126
036132
036136
036142
036146
036150
8678 036154
036154

CONNECTOR

BGNTST

144240
144172
137260

8677 036126

BERG

s RESET THE DUT TO A KNOWN STATE, REMOVE STATUS CODES FROM THE FIFQ.
i
CLEAR TX AND RXx INTERRUPT ENABLE BITS.

gggg

8675 036072
036072
036076
8676 036100
036100
036104
035110
036114
036120
036122

STAGGARED LOOPBACK

‘0

8664
8665
8668 036060
8669 036064
gg;g 036066

S S

000002

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

THIS TEST IS USED TO VERIFY THE SPLIT SPEED CAPAB
ILITIES OF THE DHUL1,
AND THE CORRECT OPERATION OF THE A £ B BAUD RATE GROUP
SELECTION,
THE TEST USES THREE SETS OF BAUD RATES (38.4,50;
1200,75; 2000,2400),
THIS TEST WILL ONLY EXECUTE IF THE STAGGARED LOOPBACK
MODE IS SELECTED.
THE

8659
8660
8661
gggg

012700
104441

000340

012746
012746
016746
012746
104437
062706

00300
027426
144054
000003

SET UP

DMA TX AND RX INTERRUPT SERVICE ROUTINES.

SETPRI

oPRIO7

tDISABLE ALL

INTERRUPTS,

SETVEC

TXVECA,2TXDMA,&PRIO6

$SELECT DMA

SETVEC

RXVECA,oRXCHRS, OPRIO6

$SELECT RX

IN!

000010

012746
012746
016746
012746
104437
06270€

000300
027216
144024
000003

012700

000200

000010
SETPRI

oPRIOA4

JALLOW

INTERRUPTS,

MOV
®PRIOT RO
TRAP
CSSPRI
INT SERVICE RIN.
MOV
OPR10G, -(SP)
MOV
@TXDMA, -(5P)
MOV
TXVECA, -(5P)
MOV
o3, -(SP?
TRAP
CsSveC
ADD
e10,5P

SERVICE RIN.

MOV
MOV
MOV
MOV
TRAP
ADD

MOV

oPRIOE, (SP)
ARXCHRS, (SP)
RXVECA, -(SP)
&3, (s
CSSVEC
210,5°F

2PR104 RO

C‘v

BRndARE
‘YFS ST PARTA MAGBD MI200
e

036160

15-MAR B4 09:48

104441

TRAP

al ol

8680
8681
Re8: 036162
3283 036166
84
3685
8680

: ENABLE
3~

8687

8688 036172
gggg 036176

012705
004767

177717
167236

012700
004767

003302
161156

TRANSMITTERS ON ALL

MOV
JSR

CLEAR ERROR

§=

8693
8094
8695

; BAUD RATES.
: 38.4K, S0 ;
;-

8696

i
:

Sggg

8707
8708
8709
g;%?

PERFORM

TO PERFOMING

@ERCNTB,RO
PC.Cl R16W

SPLIT

SPEED DMA

1200,

;

TX/RX

LINES.

TESI.

iGET THE BASE ADDRESS OF THE ERROR COUNTER
;CLEAR THE RX ERROR COUNTERS TABLE
.
TX

AND RX

2000,

ON ALL

SELECTED LINES

THE

8L .

FOLLOWING

2400.

INITIALISE DMA TX/RX PARAMETERS
RATES MENTIONED ABOVE.

036202
036206
036210
036212
036216
036222

036224
036226
036234

036240

012705
012500
012501
004767
012702
(12503

012504
012767
004767

012767

005100

MOV
MOV
MOV
JSR
MOV
MOV

162320
005154

177400
166444
021762

MOV
MOV
JSR
MOV

143776

147050

OSPLPRB ,RS
(RS)+,RO
(RS).,R1
PC.GETTIM
oS0P2B . R2
(RS)+,R3

(RS).,R4
0177400, 18M
PC.SPLSUP

09202. ,ERRNBR

‘0

:
i

8714 036246
8715 036252
:;%g 036254

004767
103126
012767

021765

8718 036262
g;ég 036266

004767
004767

164646
162322

147034

036272
036276
036302
036304
036312

004767
005767
001404
032767
001473

g;gg 036314

012767

164672
143722
000100

143650

021773

146774

8732 036322
B734 036326

6%:
i

167720
14372

THE

BAUD

:GET
sGET
:GET
sGET
$SET
tGET

BASE ADDRESS OF LPR PARAMETER TABLE
.
LPR CONTENTS FOR LINGRP II.
LPR CONTENTS FOR LINGRP I.
TIME-OUT BASED ON MINIMUM BAUDRATE IN USE .
UP THE START ADR OF THE DATA PATTERN.
NUMBER OF REPEAT TRANSMISSION ON LINGRPII.

:GET NUMBER OF REPEAT TRANSMISSION ON LINGRPI.
$sSET THE UNUSED BIT MASK FOR 8 BITS/CHAR.
$SET UP CONTROL BLOCK ETC, FOR TX/RX.
$:SET THE ERROR NUMBER TO 9202.
>>>>>

9202

THRU 9204

c<cccc,

$PURGE THE DUT RECEIVE CHARACTER FIFOQ.
+ABORT TRIS TEST IF FIFO WOULD NOT PURGE
.
:SET ERROR NUMBER TO 9205.

JSR
JSR

PC.PURRXB
PC,INIDMA

sPURGE THE RX CHAR BUFFER IN MEMORY
.
:SEND THE FIRST BATCH OF DATA PATTERNS.

THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9205 THRU 9210 <ccc«,
JSR
ST
BEQ
BIT
BEQ

PC ,RDCHRS
FERROR
68
BIT06,0PTION
508

sREAD AND VERIFY THE RX CHARACTERS,
tHAS AN ERROR BEEN DETECTED ?
sNO, THEN BRANCH.
tHAS EXTENDED ERROR REPORTING BEEN REQUESTED
sNO, THEN EXIT THE TEST,

MOV

99211, ,ERRNBR

1SET

THE ERROR NUMBER TO 9211.

THIS ROUTINE REPORTS ERRORS WITH NUMBERS

004767
005767

BLOCK FR EACH OF

PC,PUFIFR
60$
09205. ,ERRNBR

3;;;

CONTROL

JSR
B8CC
MOV

THE

THIS ROUTINE REPORTS ERRORS WITH NUMBERS

164460

g;gé

8 BITS/CHAR,1 STOP BITS,0DD PARITY,

4s:;

g;%g

8723
8724
8725
8726
g;g;

1PASS ACTIVE LINE BIT MAP,
sENABLE TRANSMISSIONS ON ALL

8697
8698

8701
8702
8703
8704
8705
8706

TABLE PRIOR

Ces5PR]

LINES,

OMAPLNS ,RS
PC, TXENBL

MOV
JSR

8691

8692

PAGE 148 1

JSR
ST

PC, TXRREP
FERROR

»>>>> 9211

THRU 214

sREPORT F INAL ERRORS FROM RX’/RX,
iHAS AN ERROR BEEN DETECTED ?

cxcnne,

ARKodARE ‘Y157
8735
8736
8737
3738
8739

8740

PARTA

MACBPHA200

036332
036334
036342

001404
032767
001457

000100

036344

012767

021777

De
15 MAR 84

143620
146744

B8s:

8744 036354
8745 036356
8746 036360
8747 036362
8748 036364
8749 036366
8750 036370
8751 036372
8752
8753

010246
010002
010100
010201
010302
010403
010204
012602
004767

8756 036376
8757 036402
8758 036404
8759
8760 036412
8761 036416
8762
8763
8764
8765 036422
8766 036426
8767 036432
8768 036434
8769 036442
8770
8771 036444
8772
8773
8774
8775 036452
8776 036456
8777 036462
8778 036464
8779 036472
8780
8781 036474
8782 036500
8783

1HAS EXTENDED

MOV

09215, ,ERRNBR

1SET ERROR NUMBER

MOV

166306

164330
022002

004767
004767

164516
162172

R2,-(SP)

RO.R2

R1.RO
R2.R1
R3.R2
R4.R3

MOV

(SP)+,R2

R2.R4

PC.SPLSUP

JSR

PC,PUFIFR

MOV

B8CC

146704

JSR
JSR

012767

164542

143572

000100

022010

143520

10$:
s

020527

103642

000100
005130

128

012700
104441

000340

016700

143454

508 :

ADDRESS ONTO

iSWAP THE

THE

STACK.

TWO SETS OF

PARAMETERS OVER.

;

sRESTORE

THE START ADDRESS.

+SET UP CONTROL BLOCK ETC,

FOR

TX/RX.

»>>>>>

9215

THRU 9217

<ccec,

tPURGE

sABORT THIS TEST IF FIFO WOULD NOT PURGE
.
:SET ERROR NUMBER TO 9218.

PC . PURRXB
PC. INIDMA

sPURGE THE RX CHAR BUFFER IN MEMORY.
:SEND THE FIRST BATCH OF DATA PATTERNS.

THE DUT RECEIVE CHARACTER FIFO.

BEQ
8IT
BEQ

10
0BITO6.0PTION
S0s

tHAS EXTENDED ERROR REPORTING BEEN REQUE
STED

09224, ,ERRNBR

$SET ERROR NUMBER TO 9224,

MOV

FERROR

THIS ROUTINE

CMP

8LO

sREAD AND VERIFY THE RX CHARACTERS.
tHAS AN ERROR BEEN DETECTED ?

iNO,

THEN BRANCH.

sNO,

THEN EXIT THE TEST.

REPORTS ERRORS WITH NUMBERS

PC., TXRREP
FERROR
12
#BITG6,0PTION
508
RS, 0SPLPRE

' -

:
i

EXERCISED.

i
H

TO 9215,

TO BE

START

RFPORTING RFEN REQUESTED

TEST,

PC ,ROCHRS

JSR
TST
8EQ
BIT
BEQ

143470

THE

JSR

167570
143542

iPUSH

ERROR

60$

‘0

004767
005767
001404
032767
001403

THEN EXIT

THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 9218 THRU 9223 ccccc,
TST

146648

iNO,

THIS ROUTINE REPORTS ERRORS WITH NUMBERS

HEd

N04767
005767
001404
032767
001417

THEN BRANCH,

:
004767
103052
012767

+NO,

TO ALLOW FOR BOTH CHANNELS

MOV
MOV
MOV
MOV

JSR
‘

“E0 227

8s
oBITO6,0PTION
508

MOV

8784

8785
8786
8787 036502
036502
036506
8788 036510
036510

138-2

BEQ
BIT
BEQ

SWAP PARAMETERS

)

8754

8755

PAGE

HEd

8741
8ra2

874% 036352

09:48

>>>>>

9224

THRU 9227

ccecq,

sREPORT FINAL ERRORS FROM RX/RX,
iHAS AN ERROR BEEN DETECTED ?
iNO, THEN BRANCH.

tHAS EXTENDED ERROR REPORTING BEEN REQUESTED

iNO,

THEN EXIT THE TEST.

1CHECK IF ALL PARAMETERS MAVE BEEN DONE.

+IF NOT DONE LOOP TO SELECT THE NEXT PARAME TER.

DISABLE INTERRUPTS,
CLEAR THE INTERRUPT VECTORS.
SETPRI

CLRVEC

OPRIO7

TXVECA

;DISABLE ALL
sRETURN

INTERRUPTS,

INT

VECTOR

MOV
TRAP

&PRICT
RO
CsSPRI

MOv

TXVECA,RO

TO UNUSED POOL.

DHU

11 FUNC

HARDWARE

8789
8790
8791
8792
8793

TST

TEST

PART4

036514

104436

036516
036524
036530
036534
036534
036534

012767
004767
005067

MACRO M1200

SPLSPD

15 MAR

E2
09:48

138

“EQ 224

TRAP

022014
165300
143464

146572

60$:

MOV
JSR
CLR
ENDTST

104301

PAGE

99228, ,ERRNBR
PC,REP5MR
CTRLCF

CsCvecC

+SELECT NUMBER 9228 FOR THE NEXT ERROR REPORT.

iREPORT ERROR SUMMARIES

CALLED FOR.

+ INDICATE THAT WE ARE NOT WITHIN A
1.10034;

TEST,

TRAP

CSETST

DHU-11

FUNC

HARDWARE

TST

TEST

PART4

MACRO M:200
- REPBMP

15-MAR-84 09:48

8795

.SBTTL

8796
8797

HARDWARE

139

8798

SEQ

TEST

- REPBMP

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

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

i
i

8799

8800
8801
8802
8803
8804
8805 036536
036536
8806
8807 036536
8808 036544
8809 036552
8810 036556
8811 036562
8812 036564
8813
8814
8815
8816
8817
8818 036566
8819 036572
036572
036574
036576
036600
8820
8821 036602
8822
8823 036610
8824 036614
036614
036614

PAGE

REPORT

‘0‘&‘0‘..00

ANY

BMP

CODES

THE

QUEUE

THIS IS A PSEUDO-TEST USED TO REPORT ANY BMP CODES THAT WERE
F OUND
gceégE DUT'S FIFO DURING PREVIOUS TEST, AND LOGGED IN THE
BMP CODE

IT IS UNLIKELY

i a

ERROR

REPORTS.

THAT RUNNING THIS PSEUDO-TEST ALONE WILL PRODUCE ANY

HE
$--

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

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

BGNTST

000011
012767
012767
016702
012703
020203
001411

000011

117177
143732
002512

TNUM
MOV
MOV

143514
143446

MOV

CcMP

BEQ

TNUM + 1
@TNUM, TSTNUM
@-1,CTRLCF

B8MPCQP,R2

)
012701

012746

60$

;EXIT NO CODES IN THE QUEUE.

R2,R3

THE

START ADDRESS OF

THE QUEUE.

iSEE_IF THE POINTER HAS MOVED FROM THE BASE.
IN THE QUEUE.

REPORT

THE ERROR.

:REPORT ERROR BMP CODE FOUND IN TEST NN, BMP CO
: NNNNNN
DE"
#EM9304 ,R1
iFASS THE FIRST MESSAGE TO BE REORTED.
9301,EM9301,ER9301 ;
>>>>> ERROR #9301 ccccc,
TRAP

CSERDF

.WORD
.WORD
.WORD

012767

002512

005067

143404

104401

:GET THE CONTENTS OF THE POINTER.

:GET

IS AT LEAST ONE BMP CODE

MOV
ERRDF

104455
022125
012572
015626

s INCREMENT THE ASSEMBLY TIME TEST COUNTER.
iSET UP THE TEST NUMBER.
(93)
: INDICATE THAT WE ARE IN A TEST.

#8MPCAB,R3

THERE

“‘0‘000

143700

MOV
60$:

CLR
ENDTST

98MPCQB,.BMPCGP

;SET POINTER BACK

CTRLCF

;INDICATE

TO THE BEGINING OF

THAT WE ARE NOT WITHIN A

L10035:

9301
EM9301
ER9301

THE QUE.

TEST.

TRAP

CSETST

225

PARDUAR £ TEST
DMU

FUNC

TST

PART4

: Sepem“"

MACRO

M1200

8833
8834
8835
8836
8827
8838
8839
8840

15-MAR
84

09:48

.SBTTL

PAGE

140

HARDWARE PARAMETER CODING SECTION

pee
: THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS

8841

8842
8843

THAT

MACROS

;

WITH THE OPERATOR.

ARE USED BY

THE

SUPERVISOR

TO BUILD P-TABLES.

THE

i MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE

8844

8845

8846

8847
8848 036616
036616

036620

8849
8859
8860 036620
036620
036622
036624
036626

8861

8862 036630
036€30
036632
036634
036636

8863

8864 036640
036640
036642
036644
036646
036650
8865
8866 036652

036652
036654
036656
036660
036662

8867
8868
83869 036664

ALLOW

THE

SUPERVISOR

ESTABLISH

BGNHRD

000022

L$HARD: :

036667
036672
036675
036700

.WORD L10036-L$SHARD/2

;:DEVICE CSR ADDRESS QUESTION:
GPRMA
HWPTQ1,0,0,160000,177776,
YES

000031
036664
160000
177776

;DEVICE INTERRUPT VECTOR QUESTION:
GPRMA

(001031
036702
000040
000776

sACTIVE LINES BIT MAP QUESTION:
GPRMD

002032
036735
177777
000000
177777

TsCODE
HWPTQ1
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD

T$CODE
HWPTQ@2
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD
.WORD

TSCODE
HWPTQ3
MAPLNS
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD
. WORD

T$CORE
HWPTQR4
377
TSLOLIM
TSHILIM

HWPTQ3,4,0,MAPLNS,0,MAPLNS,
YES

;s TYPE OF LOOPBACK QUESTION:
GPRMD
HWPTQ4,6,0,377,1,5,YES

003032
036763
000377
000001
000005

.WORD
.WORD
.WORD
.WORD

HWPTQ2,2,0,40,776,YES

ENDHRD

036664

8870
8877
8878 036664

COMMUNICATIONS

L10036:
103

040
104
123
040

123

101
122
123
000

122

104
105
072

HWPTQLl:

.ASCIZ

/CSR ADDRESS:

.EVEN

RRRobARE “MirAAd 1EARLE0
HY-11

8879 036702
036705

111
105

INTASER AR 1
M

116
122

124
122

036710
036713
036716
036721

125
040
103
122

120
126
124
040

124
105
117
101

036727
036732
8880 036735
036740
036743

105
072
101
111
040

123
040
103
126
114

123
000
124
105
111

036751

102

111

036724

036746

036754
036757
036762
8881 036763
036766
036771
036774
036777
037002
037005
037010
037013
037016
037021
037024
037027
037032
037035

116

040
120
000
124
105
106
117
102
113
061
116
122
114

062
063
071
122
063

104

105

040

115
072

101
040

131
040
040
117
101
040
075
124
116
054
075
060
040
080
062

120
117
114
120
103
050
111
105
101
040
110
062
117
110
067

054
062

040
110
065

027056
037061
037064
037067

040
040
040
040

037072
037075
037100
037103
037106
037111
037114
037117
037122
037125
037130

015
040

040
040
075
104
054
075
131
101
040
110
072

012
040

040
040
115
105
040
113
102
122
105
117
040

09:48

PAGE

ool

140-

HWPT@2:

.ASCIZ

/INTERRUPT

HWPTQ3:

.ASCIZ

/ACTIVE LINE BIT MAP:

HWPTG4:

.ASCII

/TYPE OF LOOPBACK (1=INTERNAL,

.ASCIZ

VECTOR ADDRESS:

124

067
063
063

075

5.MAR-84

122

037040
037043
037046

037051
8882 037053

8883
8884

104

M
il

MACRQ

040

040
064
117
115
065
105
117
104
103
051
000

.EVEN

4-=MODEM,

2:H3029 OR H3277,

S-KEYBOARD ECHO):

3:H325/<1Ss<12»

lll

TST PART4
HASRg M1200
RaROLAR £ PARAMET
ER CODING
SECTI
FUNC

15-MAR-84

09:48

PAGE

141

8893
8894

037134
037136

8907
8916
8917 037136

037136
037140
037142

8918
8919 037144
037144
037146
037150
8920
8921 037152
037152
037154
037156
8922
8923
8924
8925 037160
037160
8926
8927
8928 037162
037162
037164
037166
037170
037172
8929
8930 037174

037174
8921
8932
8939 037174
037177
037202
037205
037210
037213

.SBTTL

8895
8896
8897
8898
8899
8900
8901
8902
8903
8904
8905
8906 037134

;

SOF TWARE PARAMETER CODING SECTION

THE SOF TWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABL
ES.
THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT
ARE

INTERPRETED BY

THE

SUPERVISOR AS DATA STRUCTURES.

MACROS ALLOW THE SUPERVISOR
WITH THE OPERATOR.

THE

TO ESTABLISH COMMUNICATIONS

§oae

BGNSFT

000017

L$SOFT::

.WORD L1C037-L.8SOFT/2

sUNIT NUMBER PRINTOUT QUESTION:
GPRML
SwPT@1,0,20,YES

000130
037174
000020

;REPORT NUMB OF BITS TESTED

GPRML

000130
037250

IN DMA ADDR

SWPTQ@2,0,40,YES

.WORD
.WORD
.WORD

TEST QUESTION:

;EXTENDED ERROR REPORTING QUESTION:

GPRML

000130
037330
000100

IF EXTENDED ERROR REPORTING IS NOT REQUIRED THEN SKIP
XFERF

006044

.WORD
.WORD
.WORD

SWPTQ3
100

T$CODE

SWPT@R2

SWPTQ3,0,100,YES

T$sCODE

SWPTG1
20

T$CODE

THE NEXT QUESTION.

.WORD

T$CODE

.WORD
.WORD
.WORD
.WORD
.WCRD

T$CODE
SWPTG4
rr7er?

iNUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE QUESTION:
GPRMD

001052
037363
177777
000000

SWPTQ4,2,0,177777,0,177777,YES

177777

2%:

ENDSFT
L10037;

122
117
040
111
116
102

105
122
125

124

125
105

120
124
116

040

115
122

SWPTQl:

.ASCIZ

/REPORT UNIT NUMBER AS EACH UNIT

.EVEN

TESTED:

TsLOLIM

TSHILIM

DHU-11 FUNC TST PART4
MACRO M1200
SOF TWARE PARAMETER CODING SECTION

037216
037221
037224
037227
037232
037235
037240
037245
037246
8940 037250
037253
037256
037261
037264
037267
037272
037275
037300
037303
037306
037311
037314
037317
037322
037325
8941 037330
037333
037336
037341
037344
037347
037352
037355
037360
8942 037363
037366
037371
037374
037377
037402
037405
037410
037413
037416
037421
037424
037427
037432
037435
037440
037443
037446
037451
8943
8944

040

040
103
125
124

123
105
105
040
122
127

040

115
122
106
111
040
123
104
116
115
101
122
105
072
105
105
105
105
117
122
117
111
072
116
102
040
040
104
111
101
104
101
122
122
124
122
117
040
040
114
105
000

101
105
110
116
040

040

123
104
000
105
122
116
102
040
040
124
124
124
040
040
101
104
040
123
040
130
116
104
122
122
105
122
116
040

125
105
117
111

111
104
114

101
040
122
123
117
105
122
117
101
111

072

15-MAR-84 09:48

PAGE

141-1

123
101
040
111
111
124
124
072
120
124
125

SWPTQ2:

.ASCIZ

/REPORT NUMBER OF BITS

SWPTQ3:

.ASCIZ

/EXTENDED ERROR REPORTING:

SWPTQ4:

.ASCIZ

/NUMBER OF

TESTED

IN DMA ADDR

TEST:

105
117
102
123
105
105
111
104

040

104
124
124
000
124
104
040
122
040
120
124
107
000
115
122
106
116
126
125
040
i24
105
117
040
040
120
124
116
040
116
040

.EVEN

INDIVIDUAL DATA ERRORS

TO REPORT ON A LINE:

gHU-l

4 UNS TST PART4
MACRO M1200
OF TWARE. PARAMETER CODING SECTION

8953
8954
8955 037452
8956 037452
8957
8964
8965
8966
8967
8968 037522

037522
037524
037526
8969 037526

$PATCH:
:

.BLKW

K2
PAGE

142

LASTAD

.EVEN
.WORD
.WORD

000000
000000
LSLAST::

8970

8971
8972
8973
8974
8975
8976
8977

i5-MAR-84 09:48

000001

ENDMOD

.END

OHU-11

SYméL TABLE

ACTLNS

ADDR
ADR

ADRPTR
ALTFLD

FUNC

TST

002172 G

025220
= 000020 G

ASSEMB=
BCOUNT
BDRMSG
BITSTD
BITTBL

017270 G
016020 G

000010
002306 G
010020 G
033676
002364 G

BITO
= 000001 G
BITO0 = 000001 G
BITO1 = 000002 G
BIT02 = 000004 G
BITO3 = 000010 G
BIT04 = 000020 G
BITOS = 000040 G
BITO6 = 000100 G
BITO7 = 000200 G
BITO8 = 000400 G
BITO9 = 001000 G
BIT1
= 000002 G
BIT10 = 002000 G
BIT11 = 004000 G
BIT12 = 010000 G
BIT13 = 020000 G
BIT14 = 040000 G
BIT15 = 100000 G
8IT2
= 000004 G
BIT3

= 000010 G

BIT4
=
BITS
=
BIT6
=
BIT7
=
BIT8
=
BIT9
=
BMPCAB
BMPCQE
BMPCQP

000020 G
000040 G
000100 G
000200 G
000400 G
001000 G
002512 G
002712 G
002510 G

BRLEVL

002175 G

BOE

BRTBLB

BRTBLE
BUFBAS
BUFEND
BUFMID
BUF3QT
CALMSL

ceB

CBDPAA
CBOPLA
CBDPNA
CBLNCA
CBLPBA
CBLPRA

CBMAPA

CBOFSA

= 000400 G
002424 G

002464
003602
004602
004202
004402
016072

G
G
G
G
G
G

003126
003130
003132
003124
003136
003122

G
G
G
G
G
G

003122 G

003134 G

003140 G

PART4

MACRO

M1200

CHCNTB

CHKEXT
CHKLOS

CHRTOT
CKCHR

CKFRPR
CKINAC
CKTRAP
CKTRPB
CLKBRL
CLKCSR
CLKHRZ
CLKINT
CLKVEC
CLNRST

15-MAR-34

003442 G

016316 G
016416 G

002476 G
016520 G

016736
017150
017256
017306
002272
002270
002276
027146
002274
017336

G
G
G
G
G
G
G
G
G
G

09:48

PAGE

CSOPEN=

142-1

000034

EF9013

C$PNTB= 000014
C$PNTF= 000017

C$PNTS=
C$PNTX=

C$QI0O =
C$RDBU=
CSREFG=
C$RESE=
CS$REVI=

SEQ

EF9019
EF902C

000016
000015

EF9101
EF9103

000377
000007
000047
000033
000003
000021
000025
000046
000041
000037

EF9301
EF9302
EMLMSG
EMO101
EMO102
EMO103
EMO509
EM1601
EM4401
EMA402

002150 G
000000
005072 G
005100 G
017570 G
002222 G
017516 G
017712 G
003142 G
003202 G
004642 G
005042 G

002200 G
000000 G
002220 G
000052
000061
000022
000004
000002
000045
000062
C$CLEA= 000012
C$CLOS= 000035

C$RFLA=
CSRPT =
C$SEFG=
C$SPRI=
C$SVEC=
C$TPRI=
DELAY
DFPTBL
DIAGMC=
DLPRTB
DLPRTE
DMRW
DMTSTA
DM16B
DODMA
DPENDB
DPLENB
DPRS@B
DPRSQE

C$CVEC= 000036
CSDCLN= 000044
C$D0DU= 000051
C$DRPT= 000024
CsDU_
= 000053
C$EDIT= 000003
CSERDF
= 000055
CSERHR= 000056
C$ERRO= 000060

DROP
DuMY
EDPFMT
EDROP
EF .CON=
EF .NEW=
EF .PWR=
EF .RES=
EF.STA=

030454
033700
005422
030532
000036
000035
000034
000037
000040

G
G
G
G
G

EM9006
EM9007
EM9008
EM9009
EM9010
EM9011
EM9012
EM9013
EM9014

C$ERSO= 000057

EF1601

005535 G

EM9016

CLR16W
CONMAP

CSRA
CSRO
=
CTRLCF
C$AU
=
C$AUTO=
C$BRK =
C$BSEG=
CsBSUB=
C$CEFG=
C$CLCK=

017360 G
017402 G

CsCLP1= 000006

CSERSF= 000054

C$ESCA= 000010

DRADRT

EFOS03

EF1603

000013
017456 G

002200 G

005530 G

005567 G

007141

007206 G
007225 G

007306 G
007311 G

007357
007435
013074
022070
022154

G
G
G
G
G

EM4405
EM4406
EM4407
EM4A408
EM4409
EMA410
EM4411
EM6201
EM6202
EM6301
EM8901
EM9003

010047
010105
010111
010174
010224
010272
010367
010426
010522
010576
010660
010723
010760
011007
011054
011106
011115
011146
011173

G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G

011233
011306
011371
011452
011476
011522
011532
011542
011551

G
G
G
G
G
G
G
G
G

EM4403
EM4404

EM9004

EM9015

EM9017

011215 G

011645 G

ENDIT

030400

ERRBLK
ERRMSG

005322 G
005320 G

ERCNTB
ERLTBL

ERRNBR
ERRTYP
ERSMRF
ERO101
EROSO3

ER1603
ER6201
ER9001
ER9002
ER9003
ER9004
ER9005
ER9101
ER9102
ER9301
EVL
=
EXCNTB
EXTMSG
ESEND =
ESLOAD=
FDATA
FDATO =
FERROR
FFREM

FINACT

FRPSUP
FSLSA
FSLSO =
FS$SAU
=
F$AUTO=
F$BGN =
FS$CLEA=
F$DU
=
FSEND =

005316
005314
002500
013500
014032

014070
014162
014420
014520
014676
015070
015204
015444
015504
015626
000004
003242
013143
002100
000035
002206
000006
002224
002226

G
G
G
G
G

G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G
G

020002 G

020062 G
002206 G
000006 G
000015
000020
000040
000007
000016
000041

F $HARD= 000004

011661 G

F$HW

011670 G

003302 G
003602 G

= 000013

FSINIT= 000006

CS$ESEG=
C$ESUB=
CSETST=
CS$EXIT=
C$GETB=
CSGETW=

000005
000003
000001
000032
000026
000027

EF4401
EF6201
EF6202
EF6203
EF9001
EF9002

005631
005746
006061
006157
006254
006336

G
G
G
G
G
G

EM9025
EM9026
EM9027
EM9028
EM9030
EM9101

012001
012075
012121
012201
012260
012335

G
G
G
G
G
G

FSJMP =
F$MOD =
F$MSG =
FSPROT=
FSPWR =
FSRPT =

000050
0000CO
000011
000021
000017
000012

C$GPHR=
C$GPLO=
C$GPRI=
CS$INIT=
C3INLP=
CS$MANI=

000042
000030
000040
000011
000020
000050

EF9004
EF9005
EF9006
EF9007
EF9008
EF9009

006437
006467
006520
006544
006640
006677

G
G
G
G
G
G

EM9104
EM9201
EM9301
EM9302
EM9303
EM9304

012466
012542
012572
012651
012701
012746

G
G
G
G
G
G

F$SOFT=
F$SRV =
F$SUB =
F$SW
=
FS$TEST=
GETBDR

000005
000010
000002
000014
000001
020326 G

= 000023

EF9012

007025 G

ENDETB

GETPRM

030176

C$GMAN= 000043

C$MEM = 000031

C$MSG

EF9003

EF9010

006410 G

006736 G

EM9102

EM9401

012377 G

01302: G

004602 G

F$SEG = 000003

GETCHR

020454 G

EQ 231
¢

002232

= 010000

IDU

= 000040

IER

= 020000

IESTAT
002234
INIDMA
020614
ISR
= 000100
IXE
= 004000
ISAU
= 000041
ISAUTO= 000041
ISCLN = 000041
IsSDU
= 000041
ISHRD = 000041
ISINIT= 000041
I$MOD = 000041
I$MSG = 000041
ISPRCT= 000040
ISPTAB= 000041
ISPWR = 000041
ISRPT = 000041
I$SEG = 000041
I$SETU= 000041
ISSFT = 000041
I$SRV = 000041
IsSUB = 000041
ISTST = 000041
J$JMP = C00167
LGRP1M
002236 G
LGRP2M
002240 G

014416
014516
014674

015066
015202
015442
015502
015624
016016
027564
030406
030410
030426
030536
030544
031026
031270
032222
033706
034322
035000
035766
036534

036614
036664
L10037
037174
MAPLNS
= 177777
MFUNIT
007535
MMENAB
002322
MMPRES
002320
MMSRO
002314
MMSR3
002316
MODSUP
020734
MSFMT1
007566
MSFMT2
007626
MSG1
013616
MSG2
013674
MSG3
013753
MSLCNT
002312
MSLGET
021074
MSLOOP
021210
MSSRPT
021224
MSTICK
002310
MUL 16V
021440
NDERPT
002164
NDPMSG
013224

021514
030156
030150
027640
000020 G
033702
022024
002162
000000
000000
000001
000001
000001
000001
000001
000001
000000
002324
002344
002324
002326
002330
002332
002334
002336
002340
002342

002242
000016
PDRATB
002344
PDRATE
002364
PDROA
002344
PDR1A
002346
PDR2A
002350
PDR3A
002352
PDR4A
002354
PDRSA
002356
PDR6A
002360
PDR7A
002362
PMSFLG
002244
PMSMSG
013352
PNT
E 001000
PREGRT
005346
PREGOS
005324
PRFRME
022252
PRI
002000
PRIOO
000000
PRIO1
000040
PRIO2
000100
PRIO3
000140
PRIOA4
000200
PRI0OS
000240
PRIO6
000300
PRIO?7
000340
PROTBL
005214
PRPARE
022356
PRTLPR
022566

(2]~

NEWCHR
NEWPAS
NEWRES
NEWSTA
NUMLNS
=
ODTSTA
00PS
OPTION
O$APTS=
O$AU
=
O$BGNR
=
0$BGNS=
osbU
=
OSERRT=
O$GNSW=
O$POIN=
0$SETU=
PARATB
PARATE
PAROA
PAR1A
PAR2A
PAR3A
PAR4A
PARSA
PAR6A
PAR7A
PASCNT
PCSLOT=

PUFIFO
PUFIFR
PURRXB
RBUF
A

022650
022732
023134

SCNSTB
SCNSTE
SCTPTB
SCTPTE
SDPBAS
SDPEND
SDP28
SDP2E
SFPTBL
SKPSTS
SPLPRB
SPLPRE

005060
005064
005064
005072
005130
005150
005154
005174
002162
024626
005100
005130

002202
RBUFQ = 000002
RDCHRS
023170
RDMAST
023630
REPCOD
023670
REPSMR
024030
RESETT
024056
RRXNDN
024170
RTXNDN
024236
RXBCNT
002716
RXBDTX= 000030
RXBEND
003120
RXBETX= 000020
RXBFUL
= 000100
RXBIPT
002714
RXBOPT
002712
RXBSTA
002720
RXCHRS
027216
RXCNTB
003542
RXDONF
002504
RXDSBL
024304
RXENBL
024400
RXIEO
024474
RXIE1l
024534
RXPTRB
003402
RXTIMO= 000002
RXTMA
002202
RXTOUT
002246
RXVECA
002166
ROSLOT= 000002
R1SLOT= 000004
R2SLOT= 000006
R3SLOT= 000010
R4SLOT= 000012
RSSLOT= 000014
SAVBMP
024560
SAVPRI
002250
SAVTEN
002252
SCBCTB
005042
SCBCTE
005052
SCBRTB
005052
SCBRTE
005060

ldialalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalalnlalnlalalalalnlalalalalalalalalalalalala
o)

IBM

IBE

002024

002030
002162
002114
002014
002012
002160
002166
013614
014066
014160

0000000000000
OOOD

100000 G
036664
036702
036735
036763

oo
n

HOE
=
HWPTQ1
HWPTQR2
HWPTQ3
HWPTQ4

L$SPTP
L$STA
L$SwW
LSTEST
LSTIML
LSUNIT
L10000
L10001
L10002
L10003
L10004
L10005
L10006
L10007
L10010
L10011
L10012
L10013
L10014
L10015
L10016
L10020
L10021
L10022
L10023
L10024
L10025
L10026
L10027
L10030
L10031
L10032
L10033
L10034
L10035
L10036

142-

ON00O0

GSCNTO= 000200
GSDELM= 000372
GSDISP= 000003
GSEXCP= 000400
GS$HILI= 000002
GSLOLI= 000001
GSNO
= 000000
GSOFFS= (00400
G$OFSI= 000376
G$PRMA= 000001
G$PRMD= 000002
GS$PRML= 000000
G$RADA= 000140
GSRADB= 000000
GS$RADD= 000040
G$RADL= 000120
G$RADO= 000020
GS$XFER= 000004
G$YES = 000010
HELP
= 000000

LINBIT
020706
LNCTRA
002210
LNCTRO= 000010
LOE
= 040000
LOPBCK
002174
LOT
- 000010
LPCSLT= 000036
LPRA
002204
LPRD
= 000004
LSACP
002110
LSAPT
002036
L$AU
030540
L$AUT
002070
L$AUTO
030410
LsCCP
002106
L$CLEA
030412
LsCO
002032
LSDEPO
002011
L$DESC
005374
L $DESP
002076
L $DEVP
002060
L$DISP
002124
LSDLY
002116
L$DTP
002040
L$DTYP
002034
LsDU
030430
LsOUT
002072
LSDVTY
005364
LSEF
002052
LSENVI
002044
LSERRT
005314
LSETP
002102
LSEXP1
002046
LS$EXP4
002064
LSEXPS
002066
L $HARD
036620
L$HIME
002120
L $HPCP
002016
LSHPTP
002022
L$HW
002150
LsICP
002104
LSINIT
027574
LSLADP
002026
LSLAST
037526
L$LOAD
002100
LSLUN
002074
L$MREV
002050
L $NAME
002000
L$PRIO
002042
L$PROT
027566
LS$PRT
002112
L $SREPP
002062
LSREV
002010
LSRPT
027560
L$SOFT
037136
L$SPC
002056
L$SPCP
002020

PAGE

OO0

020536 G
002230 G
002464 G

15-MAR-84 (09:48

M2
(2121212121
~)

GETTIM
GMANWD
GPRSOB

MACRO M1200

oo
nnn

?%5157 PART4

00OOOOOOOOOOQOOQOGOOQOOOOGOOOOC’C\OQOOOOOOOGC’OOOOQOOOOOC\ODG

g%&l

DHU-11 FUNC TST PART4
SYMBOL TABLE

MACRO M1200

SPLSUP
024704 G
STGTRB
005274 G
STPSW
025204 G
SUCSS
033704
SVCGBL= 000000
SVCINS= 000001
SVCSUB= 000001
SVCTAG= 000001
SVCTST= 000001
SWPTA1
037174
SWPTQ@2
037250
SWPTQ3
037330
SWPTQ4
037363
SSLSYM= 010000
TERMSG
013437 G

TRPAD2
TSTNUM
TXAD1A
TXAD10=
TXAD2A
TXAD20=
TXBFCA
TXBFCO=
TXCNTB
TXDBLF
TXDMA
TXDONE
TXDONF
TXDSBL
TXENBL

TIMERL
TIMER2
TIMER3

TNUM

TP4BRT

TPAFLG

TXRON
TXRREP
TXRXLB
TXRXLE
TXVECA
T$ARGC=
T$CODE=
TS$ERRN=
T$EXCP=
T$FLAG=
T$GMAN=
T$SHILI=
T$LAST=
TSLOLI=
T$LSYM=

026220
026246
005234
005274
002170
000003
001052
022125
000000
000040
000000
177777
000001
000000
010000

TXENBM
TXFRPR
TXIEO

002262 G
025524 G
025620 G

TSLTNO= 000011
TSNEST= 177777
T$NSO = 000000

027362 G

TXINTF

002264 G

T$PTNU=

= 000011 G

TXIEL

002254 G

027404

TPAVEC

002256

ABS,

017320 G
002260 G
002212 G
000012 G
002214 G
000014 G
002216 G
000016 G
003502 G
002506 G
027426 G
025224 G
002502 G
025334 G
025430 G

PAGE 142-3

002300 G
002302 G
002304 G

TPARTN

15-MAR-84 09:48

TXPTRB

TXRINI
TXROFF

037526

000000

ERRORS DETECTED:

025660 G

003342 G

025704 G
026160 G

T$NS1

T$SAVL=

T$SEGL=

000

= 000005

001

vIRTUAL MEMORY USED:
30240 WORDS
( 119 PAGES)
DYNAMIC MEMORY:
20060 WORDS
( 77 PAGES)
ELAPSED TIME:
00:05:13
:.’omnc.em.czwmo.;.sr/-sp-svcunfm.czonxao.pu

000000

177777

G
G
G
G
G

N2
SEQ 2727

T$SUBN=
T$TAGL=
T$TAGN=
T$TEMP=
TSTEST=
T$TSTM=
T$TSTS=
T$$AU =
T$$AUT=
T$$CLE=
T$$DU =
T$$HAR=
T$$HW =
T$$INI=
T$$MSG=

000000
177777
010040
000000
000011
177777
000001
010024
010021
010022
010023
010036
010000
010020
010015

13
T4
15
16
17
18
T9
UAM
=
UBRFMT
UNITN
UNSDIV
UPDCHR
VANSUP
WAIBIS
WORD1

T$$PRO= 010017
T$$RPT= 010016
T$$SOF= 010037

WTWLNC
WTWLPR
X$ALWA=

T$$SW = 010001
T$$TES=

£l

G
G
G
G
G
G
G
G
G
G
G
G
G
G
G

027066 G
027116 G
000000

X$FALS= 000040

010035

030546 G

031030

031272
032224
033710
034324
035002
035770
036536
000200
007722
002176
026362
026516
026614
027012
002266

X$0FFS=

000400

$SPATCH

037452

X$TRUE= 000020
G