Digital PDFs

AH-F593A-MC

June 1980

183 pages

Original

83MB

view download

OCR Version

104MB

view download

Document:	CZCLKA0 DMR11,DMC11 DMR-C11 DCLT JUN 1980 bw
Order Number:	AH-F593A-MC
Revision:	000
Pages:	183
Original Filename:	CZCLKA0__DMR11,DMC11__DMR-C11_DCLT__AH-F593A-MC__JUN_1980_gray.pdf

OCR Text

AH-F593A-MC
FICHE JE0r

MADEIN-USA

98(

1
MACY11 30A(1052) ‘lg-APR-BO
09:24 PAGE 2

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

.TITLE

CZCLKAO DMR,DMC-11 DATA COMM. LINK TEST

.REM §

IDENTIFICATION

PRODUCT CODE
:

AC-F591A-MC

PRODUCT NAME:

CZCLKAO DMR/C11 DCLT

PRODUCT DATE:

17-APRIL-80

MAINTAINER:

MERRIMACK DIAGNOSTIC ENGINEERING

AUTHOR:

BRUCE LUHRS = BRUCE RIBOLINI

”

%I&FMTIW IN THIS DOCUMENT IS
SUBJECT
TO
CHANGE WITHOUT
AND
SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL

EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.
NO RESPONSIBILITY IS ASSUMED
FOR
SOFTWARE ON EQUIPMENT THAT IS NOT
AFFILIATED COMPANIES.

THE
USE
SUPPLIED

OR
BY

RELIABILITY
OF
DIGITAL
OR ITS

1980 BY DIGITAL EQUIPMENT CORPORATION

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:

DIGITAL
DEC

PDP

DECUS

UNIBUS

DECTAPE

MASSBUS

SEQ 0001

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:2¢4

MACY11 30A(1052) 18—APR-80 09:24 PAGE 3

SEQ 0002 |
l

REVISION HISTORY:

REV

DATE

AUTHOR

REASON

)

23-APR-80

BRUCE LUHRS
BRUCE RIBOLINI

ORIGINAL ISSUE, DCLT FOR THE
OMC OR DMR-11

CZCLFAO DMR,DMC~11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

MACY11 30A(1052)

TABLE OF CONTENTS

2
3

OPERATING INSTRUCTIONS
COMMANDS

HARDWARE QUESTIONS

N —

DATA COMM. LINK TEST COMMANDS
2.5.1
MESSAGE COMMANDS
2.5.2 RN C OMMAND
2.5.3 DEFAULTS
QUICK STARTUP PROCEDURE
ERROR INFORMATION

TYPES OF ERROR MESSAGES

SPECIFIC ERROR MESSAGES

PERFORMANCE AND PROGRESS REPORTS
PRINTING EVENT LOG
OPERATOR STATUS MESSAGES
PRINTING DMR,DMC-11 BASE TABLE

DEVICE INFORMATION TABLES

MODE AND MESSAGE DESCRIPTIONS
MODE DESCRIPTIONS
MESSAGE DESCRIPTIONS
INTERFACING TO AN '‘ITEP'* NODE
TROUBLESHOOTING HINTS

P NN

)

SWITCHES
FLAGS

Wh)
-

WWO

DIAGNOSTIC HIERARCHY PREREQUISITES

ASSUMPTIONS - RESTRICTIONS

2
.3

GENERAL INFORMATION
PROGRAM ABSTRACT

SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS

18-APR-80

09:24

PAGE 4

'
SEQ 0003 |

1
MACY11 30A(1052) 1S-APR-80
09:24 PAGE 5

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

1.0

GENERAL INFORMATION

1.1

PROGRAM ABSTRACT

THIS DCLT (DATA COMMUNICATION LINK TEST) PROGRAM IS MEANT TO

PROVIDE FIELD SERVICE WITH A TOOL TO MAINTAIN DMR/DMC-11

DMR/DMC-11 COMMUNICATION LINKS.

THIS DCLT PROGRAM WILL PROVIDE

THE COVERAGE NECESSARY TO DETECT FAILURES TO THE COMPUTER
EQUIPMENT, THE COMMUNICATION LINK, OR THE MODEM.

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC

RUNTIME SERVICES SOF TWARE (SUPERVISOR).

THESE SERVICES PROVIDE

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 RUNTIME SERVICES, REFER
TO THE XXDP+ USER'S MANUAL (CHQUS?.SEQ WHERE ? IS REV. LEVEL OF

THE MANUAL).

THERE IS A BRIEF DESCRIPTION OF

THE RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT.

1.2

SYSTEM REQUIREMENTS

IN ORDER TO RUN THE DMR/DMC-11 DCLT PROGRAM, THE FOLLOWING

MINIMUM HARDWARE IS REQUIRED:

A PDP-11 CPU
MINIMUM OF 24K WORDS OF MEMORY

A WORKING, LINE OR REAL-TIME CLOCK
A CONSOLE TERMINAL
ANY XXDP+ SUPPORTED LOAD MEDIA
ONE OF THESE DMR-11 OR DMC-11 CONFIGURATIONS:

DMC11-AL = LOCAL MICROPROCESSOR

DMC11-AL - REMTE MICROPROCESSOR

DMC11-DA - E.I.A. LINE UNIT
DMC11-FA = CCITT v. 35 LINE UNIT
DMC11-MA - 1M BPS LINE UNIT
DMC11-MD - 56K BPS LINE UNIT

DMR11-AA DMR11-AB DMR11-AC DMR11-AE -

E.I.A. (RS 232/423)
CCITT v.35
LOCAL
E.I.A. (RS 422)

IF DOWN-LINE-LOADING A DMC-11 SATELLITE, THE SATELLITE END REQUIRES:
M9301-YJ/M9312
- BOOTSTRAP MODULE

RELATED DOCUMENTS AND STANDARDS

(

1.3

= XXDP+ USER'S MANUAL (CHQUS?.SEQ WHERE ? IS THE REV. LEVEL OF
THE MANUAL
= '‘C"* IS THE CURRENT REV.).

SEQ 0004 |

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

1.4

MACY11 30A(1052)

F
1
18-APR-80

09:24

PAGE 6

DIAGNOSTIC HIERARCY PREREQUISITES

THE GOAL OF THE DATA COMM. LINK TEST PROGRAM IS TO TEST THE
COMMUNICATION LINK AND THEREFORE ASSUMES THAT THE CPU'S,
gIE.(E.')'C‘K!'T»és?PEOB DMR OR DMC-11'S AT EACH END OF THE LINK HAVE ALREADY

IF NO LINE OR REAL-TIME CLOCK IS FOUND, THE PROGRAM WILL CONTINUE
BUT ANY OF THE PROGRAM THAT TIMES THE DEVICE WILL HANG IF THE
DEVICE TIMES OUT.
ALSO, THE EVENT LOG WILL CONTAIN A ZERO EVENT
TIME FOR ALL EVENTS LOGGED.

IT IS NOT THE INTENTION OF A DATA COMM. LINK TEST PROGRAM TO

TEST THE DMR OR DMC-11, BUT TO TEST THE COMMUNICATION LINK TO
WHICH THEY ARE CONNECTED.

SOME OF THE DIAGNOSTICS THAT COULD BE RUN IF THE DMC-11 OR DMR-11
LOOKS BAD:

DMR:

DMC:

1.5

CZDMIAO DMR-11 FCTNL DIAG

CZDMPA1 M8207
CZDMQA2 M8207
CZDMRCO M8203
CZDMSCO M8203

STATIC
STATIC
STATIC
STATIC

DIAG #1
DIAG #2
DIAG #1
DIAG #2

CZDMCCO BSC W/R MICRO-PROC TST

CZDMECO DDCMP MDLN UNIT TST
CZDMGDO DMC-11 CROM + JMUP TEST
MD-11-DZDMHB1
DMC-11 FREE RUNNING TEST
ASSUMPTIONS - RESTRICTIONS

IT IS ASSUMED THAT THE COMMUNICATIONS DEVICE (DMC OR DMR-11) HAS
BEEN TESTED USING THE PREREQUISTE DIAGNOSTICS.
THE OPERATOR
SHOULD HAVE READ THE USER DOCUMENTATION PORTION OF THE LISTING

TO FAMILIARIZE HIMSELF WITH THE COMMANDS AND CAPABILITIES AVAILABLE

UNDER THE DIAGNOSTIC SUPERVISOR AND DCLT.

BECAUSE THE DMC-11 AND DMR-11 SUPPORT DDCMP OPERATION IN THE FIRMWARE,
THE PDP=11 D.C.L.T. PROGRAM IS UNABLE TO CONTROL OR KNOW EXACTLY WHAT

IS BEING TRANSMITTED AT ANY GIVEN TIME.
ALL DATA MESSAGES ARE ENCLOSED
IN A DDCMP ENVELOPE AND THERE MAY ALSO BE CONTROL MESSAGES
(AKS, NAKS,....) BEING TRANSMITTED.
BECAUSE OF THIS PLEASE BEWARE IF
IF YOU ARE SCOPING DATA.

CZCLFAQ DMR,DMC-11 DATAogOZOI: LINK TEST

CZCLKA.P11

18-APR-80

2.0

1
MACY11 30A(1052) 1g-APR-80
09:24 PAGE 7

OPERATING INSTRUCTIONS

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES.
FOR DETAILEP INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS).

2.1

COMMANDS

THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC 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
RESTART
CONT INUE
PROCEED

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

EXIT

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

ADD

ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE

DROP
PRINT

DEACTIVATE A UNIT
PRINT STATISTICAL INFORMATION (IF IMPLEMENTED

DISPLAY
FLAGS
ZFLAGS

CONSIDERED TO BE ACTIVE AT START TIME

BY THE DIAGNOSTIC - SECTION 4.0)

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

A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS.
YOU MAY, FOR EXAMPLE, TYPE "'STA'' INSTEAD OF ‘‘START'.

2.2

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 DESCRIPTION OF EACH.
IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY ‘DDDDD''.

SWITCH

EFFECT

/TESTS:LIST

EXECUTE ONLY THOSE TESTS SPECIFIED IN
THE LIST.
LIST IS A STRING OF TEST
NUMBERS,
FOR EXAMPLE - /TESTS:1:58791 0.

THIS LIST WILL CAUSE TESTS 1.5.7.8,9.10

/PASS : DDDDD
/FLAGS :FLGS

BE RUN.

/EOP:DDDDD

REPORT END OF PASS MESSAGE AFTER EVERY

JUNITS:LIST

TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED

EXAMPLE OF SWITCH USAGE:

ALL OTHER TESTS WILL NOT BE RUN

EXECUTE DDDDD PASSES (DDDDD = 1 TO
64000
.Be‘rsgre&f&xsoFLAGS. FLAGS ARE DESCRIBED
DDDDD PASSES ONLY.

(DDDDD = 1 TO 64000)

IN THE LIST.
LIST EXAMPLE - /UNITS:0:5:10-12
USE UNITS 0.5, 10 11,12 (UNIT NUMBERS
= 0~63)

SEQ 0006 |

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

MACY11 30A(1052)

18-APR-80

09:24

PAGE 8

SEQ 0007 |

START/TESTS:1-5/PASS:1000/E0P: 100
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH S5 WILL BE

EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF

START

RESTART

CONT INUE
PROCEED
DROP
ADD

PASS

FLAGS

X
X

EOP

UNITS

X
x

DISPLAY

FLAGS

ZFLAGS
EXIT

2.3

FLAGS

FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL 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 UNLESS SET USING THE
FLAG SWITCH.
THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR
ALL FLAGS.
WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS,
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

LOE
IER*
IBE*

LOOP ON ERROR
INHIBIT ALL ERROR REPORTS
INHIBIT ALL ERROR REPORTS EXCEPT

IXE

PRI
PNT
BOE
UAM
ISR

RUNTIME SERVICES COMMAND MODE

FIRST LEVEL

ERROR TYPE,

(FIRST LEVEL CONTAINS

NUMBER,

PC, TEST AND UNIT)

INHIBIT EXTENDED ERROR REPORTS (THOSE

CALLED BY PRINTX MACRO'S)

DIRECT MESSAGES TO LINE PRINTER
PRINT TEST NUMBER AS TEST EXECUTES
BELL'' ON ERROR
UNATTENDED MODE (NO MANUAL INTERVENTION)
INHIBIT STATISTICAL REPORTS (DOES NOT

APPLY TO DJAGNOSTICS WHICH DO NOT SUPPORT

STATISTICAL REPORTING)

—————————————————.

TESTS

%ELW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH

=
————————————————————————————

PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY.
A
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS.
YOU MAY,
FOR EXAMPLE, TYPE '/TES:1-5"'
INSTEAD OF ‘‘/TESTS:1-5"",

CZCL¥AQ DMR,DMC-11 DATAogUZQ‘l. LINK TEST

CZCLKA.P11

MACY11 30A(1052) ‘lLAPR-BO 09:24 PAGE 9

18-APR-80

IDR

INHIBIT PROGRAM DROPPING OF UNITS

ADR
LoT

EXECUTE AUTODROP CODE
LOOP ON TEST

EVL

EXECUTE EVALUATION (ON DIAGNOSTICS WHICH
HAVE EVALUATION SUPPORT)

*ERROR MESSAGES ARE DESCRIBED IN SECTION 3.1
SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS.
YOU MAY
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH.
FOR EXAMPLE,

TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS
AND TYPE A "BELL'' ON ERROR, YOU MAY USE THE FOLLOWING STRING:

/FLAGS:LOE
: IER :BOE

2.4

HARDWARE QUESTIONS

WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT
THE USER FOR HARDWARE INFORMATION BY TYPING ‘‘CHANGE HW (L) ?*'

YOU MUST ANSWER ‘'’ AFTER A START COMMAND UNLESS THE HARDWARE
INFORMATION HAS BEEN 'PRELOADED'® USING THE SETUP UTILITY (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).
THE DMR/DMC-11 DATA COMM. LINK TEST PROGRAM WILL NOT USE MORE THAN

%L%T.

FOR THE DMC/DMR-11,

# UNITS (D)

THE HARDWARE INFORMATION REQUESTED

? 1<CR>

UNIT 0

FULL DUPLEX OPERATION :
(L) Y ?
DMR.DMC-11 CSR ADDRESS : (0)
160170 ?
INTERRUPT VECTOR ADDRESS:
(0)
300
?
INTERRUPT PRIORITY : ()
5
?
DEVICE OPTION TYPE : (0=DMC, 5=DMR-DMC MODE ,7=DMR)

(0)

0 ?

SEQ 0008

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

2.5

MACY11 30A(1052) 1‘-APR-80 09:26 PAGE 10

DATA COMM. LINK TEST COMMANDS

THE "DCLT>'* COMMAND LEVEL FOLLOWS THE ANSWERING OF THE HARDWARE P-TABLE

%‘g}%fi

THESE COMMANDS CAN BE TYPED WHEN THE ‘DCLT> (A)

?'' PROMPT

MESSAGE COMMANDS AVAILABLE:
YOU ONLY HAVE TO TYPE ENOUGH CHARACTERS TO UNIQUELY SPECIFY A COMMAND.

THE COMMAND LINE IS INTERPRETED FROM LEFT TO RIGHT.

THEREFORE,

IF A QUALIFIER ON THE COMMAND LINE IS RELATED OR EFFECTS A QUALIFIER

TO THE LEFT ON THE COMMAND LINE, THE QUALIFIER FARTHEREST TO THE RIGHT
TAKES PRECEDENCE SINCE IT IS INTERPRETED LAST. (I.E. IF /CHECK.....

.. ./NOCHECK APPEAR ON THE SAME LINE, NOCHECK WILL BE INDICATED IN THE

PARAMETERS WORD.)

REFER TO SECTION 6.0 FOR A DESCRIPTION OF THE DIFFERENT MODES OF
OPERATION AND THE TYPES OF MESSAGES AVAILABLE.

2.5.1 MESSAGE COMMANDS

COMMAND

DESCRIPTION

CLEAR

EXPECTLIST

ZEROES THE EXPECTLIST (000°S)
AND THEN PUTS DEFAULT ITEP MSG
IN SO NOT REALLY EMPTY

CLEAR

TRANSMITLIST

ZEROES TRANSMITLIST (000°'S)

AND THEN PUTS DEFAULT ITEP MSG

IN SO NOT REALLY EMPTY

Q,OELP

SET

TYPES HELP INFO FOR OPERATOR

EXPECTMSG=TYPE/QUAL
WHERE:

‘‘TYPE'® IS:
=0ONES

DEFINE A MESSAGE TO BE PUT ON
THE EXPECTED LIST

=ZEROQES
=1ALT
=0ALT
=ITEP
=CCITT
=ALPHA

="'A-Z,0~9,SPACES OR TABS IN QUOTES''

—_——

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

MACY11 30A(1052)

K 1
18-APR-80

09:24

PAGE 11

.
'
SEQ 0010 |

WHERE THE OPTIONAL 'QUAL'' IS:

/SIZE=NNN

MAKE THE MESSAGE 'NNN'' BYTES

/COPY=NN

COPY THIS MESSAGE INTO THE

LONG. (DEFAULT VALUE IS
SIZE OF MESSAGE SPEC'D BY
OPERATOR OR DEFAULTS.)

BUFFER 'NN'' TIMES (DEFAULT
IS 0 = PUT THE MESSAGE IN
ONLY ONCE)

NOTE: SET'S ADD MESSAGES TO THE LIST IN THE ORDER THEY'RE
DEFINED. NNN'' IS A DECIMAL NUMBER.
THE FIRST SET
OVERWRITES THE DEFAULT ITEP MESSAGE PLACED THERE BY
INITIALIZATION OR
A “‘CLEAR'' COMMAND.

SEE SECTION 6.2 FOR A DESCRIPTION OF THE PRE-DEF INED

MESSAGES THAT ARE AVAILABLE.

SET

TRANSMI TMSG=TYPE/QUAL

(ZEROS,ONES ...)

DEFINE A MESSAGE TO BE PUT ON
THE TRANSMIT LIST

(SEE DESCRIPT FOR SET EXP)

SHOW

EXPECTLIST

LISTS THE MESSAGE SIZE AND TYPE
FOR THE MESSAGES IN THE

EXPECT LIST

SHOW

TRANSMITLIST

LISTS THE MESSAGE SIZE AND TYPE
FOR THE MESSAGES IN THE
TRANSMIT LIST

PRINTS THE EVENT LOG AFTER

ASKING THE OPERATOR IF HE

WANTS THE DMR/DMC-11 BASE

TABLE PRINTED

DUMP

SSSSSS-EEEEEE/B

WHERE

e
*”/8"*

PRINTS THE CONTENTS OF THE

MEMORY LOCATIONS BETWEEN

OCTAL ADDRESSES, *'SSSSSS'* AND

IS OPTIONAL
:

DEFAULT IS PRINT WORDS

'/8'" CAUSES PRINT BYTES

EEEEEE'' WHERE ''SSSSSSTM IS
THE _START ADDRESS AND
"“EEEEE’’ IS THE END ADDRESS.

;
IF "*~EEEEEE'’ IS NOT SPECIFIED

THEN THE CONTENTS OF °'‘SSSSSS*’
IS PRINTED IN WORD FORMAT.
NOTE: THE DUMP COMMAND IS USEFUL FOR EXAMINING
MESSAGE DATA.
STARTING ADDRESSES CAN
BE FOUND BY LOOKING IN THE EVENT LOG.

2.5.2 RUN COMMAND

COMMAND

DESCRIPTION

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1T

MACY11 30A(1052) 15-APR-80 09:24 PAGE 12

18-APR-80 09:24

RUN MODE=MTYPE/QUAL

...

STARTS DCLT EXECUTING IN THE
» MODE SPECIFIED

NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED
===== EACH TIME A RUN IS TYPED

WHERE THE 'MTYPE'' IS ANY ONE OF TIE FOLLOWING:
=ACTIVE

(FORCES /NOECHO ,NO LOOPING)

=LISTEN

(FORCES /NOECHO ,NO LOOPING, /NOCHECK)

=DOWNLINELOAD

(FORCES /NOECHO ,NO LOOPING, /NOCHECK,

=PASSIVE
=RECEIVE
=TRANSMIT
=TALK

(FORCES NO LOOPING)
(FORCES /NOECHO ,NO LOOPING)

(FORCES /NOECHO ,NO LOOPING, /NOCHECK)
(FORCES /NOECHO ,NO LOOPING, /NOCHECK)

(FORCING NO LOOPING MEANS IT MUST BE
SPECIFIED AS A QUALIFIER ANY TIME ITS
DESIRED, THERE IS NO DEFAULT)
AND OPTIONAL 'QUAL'' IS ANY COMBINATION OF THE FOLLOWING:

/ CHECK/NOCHECK

ENABLES/DISABLES CHECKING OF RECEIVED ‘
DATA AGAINST THE EXPECTED DATA

NOTE: IF BOTH NODES IN ACTIVE AND °‘/NOCHECK'' IS USED,
«==== END-OF-PASS 1S DEFINED AS RECEIVING 1 MESSAGE
AND COMPLETING THE TRANSMIT LIST.
WITH NO DATA

CHECKING, THERE IS NO WAY FOR DCLT TO KNOW HOW
MANY MESSAGES IT SHOULD EXPECT TO RECEIVE.

/STATUS/NOSTATUS

EW.ES/DIS&ES PRINTING OF PROGRAM
STATUS MESSAGES TO THE OPERATOR

/ECHO/NOECHO

ENABLES/DISABLES THE RETRANSMISSION OF
THE DATA RECEIVED IN PASSIVE MODE.

/LOOP=LTYPE

SPECIFIES WHICH, IF ANY, TYPE OF

(IGNORED IN MODES OTHER THAN PASSIVE)

MAINTENANCE LOOPBACK IS BEING USED.
(IGNORED IN MODES OTHER THAN ACTIVE)
MUST BE SPECIFIED EACH TIME ELSE NO
LOOP IS USED.

‘LTYPE'" IS:

=INTERNALTTL
=CABLE

=LOCALMODEM (W’ IN DMR MODE AND RS449 MODEMS ONLY.
CAUSES A 'WRITE MODEM'' TO BE DONE TO SET UP
LOCAL-LOOPBACK (MAINT1)
. ALSO CALLED
ANALOG~LOOPBACK
.

=REMOTEMODEM (DMR IN DMR MODE AND RS449 MODEMS ONLY.

CAUSES A 'WRITE MODEM' TO BE DONE TO SET UP

REMOTE-LOOPBACK (MAINT2)
. ALSO CALLED
DIGITAL-LOOPBACK.

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
18-APR-80 09:24
CZCLKA.P1

MACY11 30A(1052)

/PASS=NN

L
18-APR-80

09:24

PAGE 13

SPECIFIES NUMBER OF ITERATIONS TO MAKE BEFORE

END-OF-PASS.
DEFAULT VALUE OF 1
WILL BE USED ON ANY RUN THAT A /PASS=N
IS NOT ADDED TO THE ‘RUN ...'* COMMAND.

IF
A *“1""IS

TYPED, THEN THE PROGRAM

RUN UNTIL A ~C IS fYPep.

NOTE:

SEE SECTI 6.1

2.5.3

FOR A DESCRIPTION

HE "RUN MODES’' AND ‘1LOOP MODES''

DEFAULTS

IF NO "SET'S'’ THEN THE DEFAULT IS SAME AS IF TYPED:
SET TRANSMITMSG=ITEP/SIZE=58/COPY=0
SET EXPECTMSG=ITEP/S1ZE=58/COPY=0

THE DEFAULT COPY AND SIZE FOR EACH OF THE MESSAGE TYPES:

ONES - /SI1ZE=64/COPY=0
ZERQES = /SI1ZE=64/C0PY=0

OALT - /SIZE=64/COPY=0

1ALT = /S1ZE=64/COPY=0
CCITT - /SI1ZE=64/COPY=0
ALPHA - /S1ZE=65/COPY=0
ITEP - /SI1ZE=58/COPY=0
OPER. SPEC'D = /SIZE=LENGTH-OF -TEXT~-TYPED-BE TWEEN-QUOTES/COPY=0
FOR THE RUN COMMAND THE DEFAULTS ARE:

RUN MODE=ACTIVE/NOSTATUS/CHECK/NOECHO/PASS=1
NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED
=====
EACH TIME A RUN IS TYPED
IF THE DCLT PROGRAM IS RUN IN UNATTENDED MODE (UAM FLAG=1 OR CHAINED),
THE DEFAULTS ARE AS IF THESE SETUP AND RUN COMMANDS WERE TYPED:

SET TRANS=ITEP

SET EXPECT=ITEP
RUN MODE=ACTIVE/LOOP=INTERNAL /NOSTAT/CHECK/PASS=1

OTHER NOTES:

ALWAYS RETURNS YOU TO 'DR>'* (THE SUPERVISOR)

*RUBOUT"*

DELETE LAST CHAR. TYPED IN cmwo STRING

<CR>

IS SEEN AS A COMMAND TERMINATOR

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PI
18-APR-80 09:24

MACY11 30A(1052)

2.6 QUICK START=UP PROCEDURE

N 1
18-APR-80

09:24

PAGE 14

(XXDP+)

TO START=UP THIS PROGRAM:

1. BOOT XXDP+

2. GIVE THE DATE AND ANSWER THE LSI AND SOMZ (IF THERE
IS A CLOCK) QUESTIONS

3. TYPE 'R NAME'', WHERE NAME IS THE NAME OF THE BIN OR BIC
FILE FOR THIS PROGRAM

4. TYPE "START"'

5. ANSWER THE 'CHANGE HW'' QUESTION WITH 'Y**

6. ANSWER ALL THE HARDWARE QUESTIONS.

THE NUMBER
OF UNITS

THAT CAN DCLT CAN USE IS ALWAYS *51*".

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL K USING ONLY THE
DEFAULTS FOR FLAGS.
THESE DEFAULTS ARE DESCRIBED IN SECTION 2.3.

7. AFTER THE ‘DCLT> (A) 7' PROMPT, TYPE

‘RUN MOD=ACTIVE<CR>"’

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USI'& THE DEFAULT TRANSMIT
AND EXPECTED MESSAGES. THE DEFAULT PASS COUNT
"RUN"" QUALIF IERS
ARE ALSO BEING USED.
THESE DEFAULTS ARE DESCRI*D IN SECTION 2.5.3.

SEQ 0013

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052) 1S-APR-80 09:24 PAGE 15

18-APR-80 09:24

3.0 ERROR INFORMATION
3.1 TYPES OF ERROR MESSAGES
THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY
A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED.
GENERAL ERROR
MESSAGES
ARE ALWAYS PRINTED UNLESS THE
'‘IER''
FLAG IS SET (SECTION 2.3).
THE GENERAL ERROR MESSAGE IS OF THE FORM:

NAME

TYPE

NUMBER

ERROR MESSAGE

ON UNIT NUMBER

TST NUMBER PC:XXXXXX

+WHERE; NAME = DIAGNOSTIC NAME

TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT)

NUMBER = ERROR NUMBER
UNIT NUMBER = 0 = N (N IS LAST UNIT IN PTABLE)
TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED

PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL
INFORMATION ABOUT THE ERROR.
THESE ARE ALWAYS PRINTED UNLESS
THE "‘IER'’' OR ''IBE’* FLAGS ARE SET (SECTION 2.3).
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'’, “IBETM
OR "'IXE'* FLAGS ARE SET (SECTION 2.3).
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES.

3.2 SPECIFIC ERROR MESSAGES
COMMAND LINE INTERPRETER ERRORS:

ERROR MESSAGE:

MEANING

?ILL CMD-BAD SYNTX?

A COMMAND WITH AN ILLEGAL CHAR WAS
TYPED - RETYPE THE COMMAND. THE
VALID COMMANDS AND THEIR SYNTAX ARE
SHOWN IN SECTION 2.5.

?INCMPLTE CMD?

Aul.ifiOUIRO PART OF A COMMAND WAS LEFT

?NUM TOO BIG?

THE VALUE OF A NUMERIC STRING IN THE
COMMAND
LINE WAS LARGER THAN 65535

OR 17

?BAD RADIX?

OCTAL.

( > 16 BITS).

A ‘%' OR ‘9" WAS TYPED WHEN AN OCTAL
STRING WAS EXPECTED, PROBABLY OCCURRED
WHEN TYPING A 'DUMP'' COMMAND WHERE
OCTAL ADDRESSES ARE EXPECTED.

SEQ 0014

?'L00P"* VALID ONLY IN ACTIVE?

THE '/LOOP=..'' SWITCH WAS TYPED IN A

?"ECHC'' VALID ONLY IN PASSIVE?

THE '‘/ECHO'' SWITCH WAS TYPED IN A

RUN COMMAND BUT THE MODE WAS NOT SET
TO ACTIVE.
MAINTENANCE LOOP IS ONLY
:g%IELE IF THE MODE OF OPERATION IS

RUN COMMAND BUT THE MODE WAS NOT SET
TO PASSIVE. ECHOING OF RECEIVED DATA
IS ONLY POSSIBLE IF THE MODE OF
OPERATION IS PASSIVE.

2ILL CHR- "‘A=Z,0~9,SP,TAB'' ONLY? A CHARACTER TYPED WITHIN QUOTES WHEN
TRYING TO DEFINE THE CONTENTS OF A
TRANSMIT OR EXPECT MESSAGE WAS NOT

A ‘A=7,0~9,SPACE OR T

RETYPE THE

cm WITH ONLY THESE CHARACTERS

BETWEEN QUOTES.
?"'SIZE=0"' NOT VALID?

A MESSAGE ZERO BYTES LONG CAN M)T BE
BUILT. RETYPE THE COMMAND WITH
"/SIZE=NNN'',
IF NO '/SIZE="" IS TYPED
A DEFAULT SIZE WILL BE USED.

DCLT OR DEVICE ERROR MESSAGES:
BAD CLOCK - PROGRAM WILL HANG ON ‘‘TIMEOUT''!!
THIS MEANS THAT EITHER NO CLOCK WAS

ON THE SYSTEM OR_THE ONE THAT WAS FOUND
D.{II)C;OT INTERRUPT WHEN ASKED TO DO A
THE_PROGRAM WILL STILL RUN, BUT ANY

OF THE PROGRAM THAT TIMES THE DEVICE
WILL HANG IF THE DEVICE TIMES OUT.
ALSO, THE EVENT LOG WILL CONTAIN A
ZERO EVENT TIME FOR ALL EVENTS LOGGED.
MAX. CHAR. MSG COUNT EXCEEDED - MSG. NOT BUILT !!

THIS MEANS THAT THE TRANSMIT OR EXPECT
BUFFER IS FULL. NO MORE MESSAGES CAN BE
ADDED TO THAT BUFFER.
BUFFER FULL - MSG. NOT BUILT

THIS MEANS THAT THE LAST MESSAGE YOU
TRIED TO ADD TO EITHER THE TRANSMIT OR
EXPECT BUFFER CAUSED THE TOTAL NUMBER
OF MESSAGES TO BE EXCEEDED. NO MORE
MESSAGES CAN BE ADDED TO THAT BUFFER.
THE LIMIT IS DETERMINED BY THE SIZE OF
THE MESSAGE POINTER TABLE.

CHAR. COUNT EXCEEDS BUFF LIMIT - MSG TRUNCATED

SS—

SEQ 0015

18-APR-80

CZCLKA.P11

MACY11 30A(1052) 1S-APR-80 09:24 PAGE 16

CZCLFAO DMR,DMC-11 DATAOgGZ'Z LINK TEST

CZCLFAQO DMR,DMC-11 DATAOSGZ“‘. LINK TEST

CZCLKA.P11

18-APR-80

MACY11 30A(1052)

18-APR-80

09:24

PAGE 17
SEQ 0016 |

THIS MEANS THAT THE LAST MESSAGE
YOU
TRIED TO ADD TO THE TRANSMIT OR EXPECT
BUFFER CAUSED THE TOTAL CHAR. COUNT
FOR THAT BUFFER TO EXCEED THE LIMIT,
THE MESSAGE WAS TRUNCATED TO COMPLETELY
FILL THE BUFFER. NO MORE MESSAGES CAN
BE ADDED TO THAT BUFFER.

DATA COMPARISON DATA ERROR
BYTE # IN MSG=XXX
EXPTD=YYY

RECVD=222
XXX= OFFSET OF THAT BYTE FROM THE START

OF THE COMPARE OR EXPECT MESSAGE.

YYY= THE CONTENTS OF THAT BYTE IN THE

EXPECTED MESSAGE
Z2Z= _THE CONTENTS OF THAT BYTE IN THE
RECEIVED MESSAGE
UP TO FIVE OF THESE ERRORS WILL BE
PRINTED PER MESSAGE COMPARED. ONLY
THE FIRST FIVE MISMATCHES WILL BE
INDIVIDUALLY REPORTED, BUT TOTAL
NUMBER OF MISTMATCHES IS REPORTED
BY ANOTHER ERROR.
PRINTING THE EVENT LOG AND USING THE

DCLT “DUMP'‘ COMMAND WILL ALLOW YOU TO

FIND THE ADDRESS OF THE MESSAGE AND
EXAMINE IT.
DATA COMPARISON DATA ERROR
TOTAL MISMATCHES IN MSG =

THIS MEANS THAT WHEN THE MESSAGE
RECEIVED WAS COMPARED AGAINST THE
MESSAGE THAT WAS EXPECTED, SOME OF
THE CHARS. WERE NOT THE SAME.

DATA COMPARISON LENGTH ERROR
COMPARE COUNT= XXX
RECEIVE COUNT= 227

XXX

WEQS%EBYTES IN THE COMPARE

Z7Z= NUMBER OF BYTES IN THE RECEIVED
ME SSAGE
THIS MEANS THAT THE MESSAGE RECEIVE.

WAS A DIFFENT LENGTH THEN THE MESSAGE
THAT WAS EXPECTED.
L4422

* NOTE *

RERRRAAR

= IN THE FOLLOWING ERROR DESCRIPTIONS XXXXX
REFERS TO THE OCTAL CONTENTS OF

SPECIFIED.

THE DEVICE REGISTERS

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZTLKA.P11

MACY11 30A(1052) 1S-APR°80 09:24 PAGE 18

18-APR-80 09:24

TIME OUT WAITING FOR RDI TO CLEAR

SELO

SEL2

XXXXXX

THIS MEANS THAT A SOFTWARE TIMER EXPIRED BEFORE
(T)FHERgEVICE CLEARED RDI IN RESPONSE TO THE DROPPING

NOTE: PROGRAM RESETS TIMER AND WAITS AGAIN

SO AN EFFECTIVE LOOP ON ERROR IS SETUP.

TIME OUT WAITING FOR RDI TO SET

SELO

XXXXXX

SEL2

XXXXXX

THIS MEANS THAT A SOFTWARE TIMER EXPIRED BEFORE
THE DEVICE CAUSED AN INTERRUPT IN RESPONSE TO THE
PROGRAM SETING RQI.
NOTE: PROGRAM RESETS TIMER AND WAITS AGAIN
SO AN EFFECTIVE LOOP ON ERROR IS SETUP.
TIME OUT WAITING FOR RUN TO SET

SELO

XXXXXX

SEL2

XXXXXX

THIS MEANS THAT A SOFTWARE TIMER EXPIRED BEFORE
THE DEVICE SET THE RUN BIT IN RESPONSE TO THE

PROGRAM SETING MASTER CLEAR.

NOTE: PROGRAM RESETS TIMER AND ISSUES ANOTHER
MASTER CLEAR AND WAITS AGAIN SO AN EFFECITVE
LOOP ON ERROR IS SETUP,
THIS ERROR COULD INDICATE WRONG ADDRESS FOR

DMR/DMC-11 WAS GIVEN IN HARDWARE P TABLE.

TIME OUT WAITING FOR OUTPUT INTERRUPT

SELO

XXXXXX

SEL2

XXXXXX

THIS MEANS THAT A SOFTWARE TIMER EXPIRED BEFORE
THE DEVICE SET OUTPUT INTERRUPT IN RESPONSE TO
PROGRAM REQUESTING DEVICE TO TRANSMIT OR RECIEVE.
NOTE: PROGRAM RESETS TIMER AND WAITS AGAIN SO AN
EFFECTIVE LOOP ON ERROR IS SET UP.
THIS ERROR WILL OCCUR WHEN ONE NODE IS STARTED

IN RX OR TX MODE AND THE OTHER IS STILL BEING
SET UP, IGNORE THIS ERROR IF PROGRAM CONTINUES

WITHOUT FURTHER ERRORS.

INPUT INTERRUPT WHEN EXPECTING OUTPUT

SELO

XXXXXX

SEL2

XXXXXX

THIS WILL HAPPEN IF THE DEVIC E lg BAD. IT MEANS
THAT AFTER THE PROGRAM HAS ISSUED
ALL INPUT REQUESTS
TO THE DEVICE, THE DEVICE ISSUES AN INPUT INTERRUPT

SEQ 0017

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052)

18-APR-80 09:24

F 2
18-APR-80

09:24

PAGE 19

ILLEGAL OUTPUT_INTERRUPT

SEL2

XXXXXX

SEL6

XXXXXX

THIS HAPPENS WHEN THE DEVICE ISSUES AN OUTPUT INTERRUPT
WITHOUT SETTING "RDO''. IF THIS HAPPENS THE DEVICE IS BAD.

CONTROL OUT INSTEAD OF BA-CC OUT

SEL2

XXXXXX

SEL6

XXXXXX

MMMV

WHERE "MMMMM'' IS ONE OF THE FOLLOWING MESSAGES

;&QT"R’ESLLT FROM INTERPRETING THE REGISTER CONTENTS

PROCEDURE ERROR/HALT
NON EXIST MEM
DDCMP START REC
DISCONNECT

LOST DATA
DDCMP MAINT REC
OVERRUN
TIME OUT
DATA CHECK
RUN SET ILLEAGLLY
CD GLITCHED
RX IDLE
CTS FALILED

'
(DMR IN DMR-MODE ONLY)
(DMR IN DMR-MODE ONLY)
(DMR IN DMR-MODE ONLY)

(DMR IN DMR-MODE ONLY)

THIS ERROR OCCURS WHEN THE DEVICE SETS CONTROL OUT
ggcéwaflgATE ERROR CONTIDION. THE PROGRAM EXPECTS A
TX BUFF COMPLETED AND SHOULD BE RX

SEL4

XXXXXX

SEL6

XXXXXX

THIS ERROR OCCURS WHEN THE THE DEVICE HAS
A BACC OUT WITH TX COMPLETED AND THE PROGRAM
WAS EXPECTING A RX COMPLETED.
RX BUFF COMPLETED AND SHOULD BE TX

SEL4

XXXXXX

SEL6

XXXXXX

THIS ERROR OCCURS WHEN THE THE DEVICE HAS
A BACC OUT WITH RX COMPLETED AND THE PROGRAM
WAS EXPECTING A TX COMPLETED.

WHERE "XXXXX'' 1S THE OCTAL CONTENTS OF THAT

DEVICE REGISTER.
DOWN LINE LOAD ABORTED

THIS ERROR CAN ONLY OCCUR IN A NODE THAT

SEQ 0018

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052)

18-APR-80 09:24

18-APR-80

09:24

PAGE 20

IS A DLL "HOST'' WHEN IT HAPPENS IT ALSO

PRINTS ONE OF THE FOLLWING QUALIFERS:

TX NOT COMPLETE

HOST DEVICE DID NOT GIVE BACC OUT TX

THIS SHOULD NOT HAPPEN BECAUSE DEVICE

DOES NOT NEED AN ACK FOR MAINT MESGS.

RX NOT COMPLETE
HOST DEVICE DID NOT GIVE BACC OUT RX
THIS CAN HAPPEN IF SATELLITE DOES NOT

SEND THE SEC BOOT REQUEST MESSAGE.

SEC REQ WORD1
HOST RECIEVED A MESSAGE FROM SATELLITE
BUT MESSAGE WAS NOT 1ST WORD OF SEC BOOT REQ.

SEC REQ WORDZ2

HOST RECIEVED A MESSAGE FROM SATELLITE

BUT MESSAGE WAS NOT 2ND WORD OF SEC BOOT REQ.
CALLED FROM PC. XXXXXX
THIS MESSAGE OCCURS WITH OTHER ERROR MESAGES
TO INDICATE PC OF CALLING ROUTINE.

,
SEQ 0019 |

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052)

18-APR-80 09:24

H 2
18-APR-80

09:24

PAGE 21

4.0 PERFORMANCE AND PROGRESS REPORTS
DCLT USES IT'S OWN METHOD FOR DETERMINING AN 'END OF PASS''

WHICH IS CALLED A "DCLT END OF PASS''.
THE NUMBER OF 'DCLT PASSES''
TO BE RUN IS SPECIFIED BY THE '‘/PASS=XXX''
SWITCH ON THE DCLT
RUN COMMAND.
THE TOTAL NUMBER
OF 'DCLT ERRORS'' IS REPORTED

WHEN “* X NUMBER OF DCLT PASSES'' ARE COMPLETED.

4.1 PRINTING OF EVENT LOG

SIGNIFICANT EVENTS OR CHECK-POINTS WILL BE LOGGED IN A

"CIRCULAR QUEUE'' STORAGE AREA CALLED THE EVENT LOG.
THE LAST
"W'' EVENTS ARE KEPT LOGGED AND CAN BE LISTED ON THE OPERATORS
CONSOLE BY GIVING A

"PRINT'' COMMAND AT THE 'DR>'‘(DIAGNOSTIC SUPERVISOR)

OR 'DCLT>'' (DCLT) LEVEL.
FIRST=OUT'* ORDER.

THE EVENTS ARE PRINTED IN A ‘LAST-IN

EVENT TIME IS TYPED OUT AS MMM:SS:TT (LIKE 254:36:07) WHERE MMM,SS,TT
REPRESENT THE NUMBER OF MINUTES, SECONDS, CLOCK TICKS SINCE THE LAST
START OR RESTART.
IT SHOULD BE NOTED THAT THE TIMES ARE
RELATIVE SINCE WHILE THE PROCESSOR IS RUNNING AT PRIORITY 7
THE CLOCK CAN'T INTERRUPT TO KEEP TIME.
THIS IS THE CASE
WHILE THE PROGRAM IS FETCHING DCLT COMMANDS FROM THE OPERATOR.
IT SHOULD ALSO BE NOTED THAT THERE ARE ONLY 8 BITS AVALIABLE TO STORE
RELATIVE MINUTES SO °“‘TIME'' WILL WRAP TO 000:00:00 AFTER 256:59:59.
A START OR RESTART COMMAND AT THE 'DR>'‘ LEVEL INITIALIZES THE EVENT
LOG.
THEREFORE IT IS WISE TO DO A 'PRINT'' AT THE 'DR>'' LEVEL

BEFORE GIVING A "'START'' OR ‘RESTART''.

THE TYPES OF EVENTS KEPT IN THE EVENT LOG ARE:
TRANSMIT MESSAGE QUEUED:
EVENT TIME, ADDRESS
TOTAL NO. OF BYTES,
TRANSMIT MESSAGE COMPLETED:
EVENT TIME, ADDRESS
TOTAL NO. OF BYTES,
RECEIVE SPACE QUEUED:

OF 1ST BYTE OF MESSAGE,
MODEM STATUS AT THAT TIME.
OF 1ST BYTE OF MESSAGE,
MODEM STATUS AT THAT TIME.

EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE,

TOTAL NO. OF BYTES, MODEM STATUS AT THAT TIME.
RECEIVE MESSAGE COMPLETED:
EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE,
TOTAL NO. OF BYTES, MODEM STATUS AT THAT TIME.
DATA COMPARISON STARTED:
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG.,
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES

IN EXPECT MSG.

DATA COMPARISON DATA ERROR:
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG.,
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF
COMPARISON FAILURES

SEQ 0020

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

MACY11 30A(1052)

18-APR-80

09:24

PAGE 22

DATA COMPARISON LENGTH ERROR:
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG.

TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES

IN EXPECT MSG.
DEVICE INIT AND SETUP:
evsm TIME, MODE OF OPERATION,
DEVICE Em

TYPE OF MAINTENANCE

"DCLT'* PASS COUNT, 'RUN"PARAMETERS

EVENT TIME, DEVICE ERROR MESSAGE, CONTENTS OF Tw0
REGISTERS RELATING TO THE ERROR.
END OF PASS:
h
E
EVENT TIME. DCLT'" PASS COUNT, “DCLT'' ERROR COUNT.

NO. OF *NOBUFF'S’'(NO. OF CONTROL-OUTS WITH THE
NO-BUFFER SET SINCE THE LAST

NOTE:

'DCLT RUN'' COMMAND.)

IF THE NODES ON THE LINK ARE SIMILAR WITH
RESPECT TO CONSOLE SPEED AND SETUP,
THE

NUMBER OF 'NOBUFFS'' SHOULD BE NEAR ZERO.

4.2 OPERATOR STATUS MESSAGES
THE '"/STATUS, /NOSTATUS''

QULAIFIERS FOR THE DCLT ‘RUN'’ COMMAND

ENABLES/DISABLES THE PRINTING OF PROGRAM STATUS MESSAGES TO THE
OPERATOR.
THESE MESSAGES ARE INTENDED TO TELL THE OPERATOR WHAT
THE DCLT PROGRAM IS CURRENTLY DOING. BELOW ARE THE MESSAGES THAT
MIGHT BE PRINTED AND THEIR MEANING:

ME SSAGE

MEANING

TTMXQ

DEVICE IS ABOUT START TRANSMITING A MESSAGE

TXC
RXQ

TRANSMISSION OF MESSAGE COMPLETED
DEVICE HAS QUEUED SPACE TO RECEIVE/ COMPLETED RECEIVE

ERR

DEVICE ERROR HAS OCCURRED

INI

DEVICE ABOUT TO BE INITIALIZED

MSC
cMP
CML
CMD
EOP

ABNORMAL MODEM STATUS CHANGE
ABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD DATA
LENGTH ERROR OCCURRED DURING DATA COMPARISON
DATA ERROR OCCURRED DURING DATA COMPARISON
END OF PASS

4.3 PRINTING OF DMR/DMC-11 BASE TABLE
WHEN THE ‘PRINT'' COMMAND IS GIVEN, BEFORE THE EVENT LOG IS

PRINTED, THE DCLT DMR/DMC-11 DCLT PROGRAM ASKS IF YOU WISH
TO HAVE THE CONTENTS OF THE DEVICE'S BASE TABLE PRINTED:

BASE TABLE (L) N ?

IF A 'Y'" IS TYPED AS AN ANSWER, THE 256. BYTES OF BASE TABLE

017370:
0176400:

000
010

001
011

002
01

003
013

004
014

005
015

006
016

007
017

D miiae i

WILL BE PRINTED IN THE FOLLOWING FORMAT:

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052) 1‘-APR-80 09:24 PAGE 23

18-APR-80 09:24

017760:

$70

371

372

373

375

376

377

SEQ 0022

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

MACY11 30A(1052)

18-APR-80

09:24

PAGE 24

5.0 DEVICE INFORMATION TABLES

THIS IS THE DEFAULT HARDWAREP-TABLE.

THE VALUES AND

SIZE ARE USED AS
A 'TEMPLATE'' FOR CREATING ACTUAL P-TABLE
ENTRIES AND THE DEFAULT VALUES PROVIDED FOR THE OPERATOR.
SEE SECTION 2.4 FOR AN EXAMPLE OF THE HARDWARE QUESTIONS.

THE NUMBERS IN BRACKETS ( I.E. [10]) INDICATES THE OFFSET OF THE
WORD INTO THE HARDWARE P-TABLE. THE OFFSETS MUST MATCH THE P-TABLE
FSETS USED IN THE HARDWARE MTER CODING _SECTION WHERE THE

"GET PARAMETER'® CALLS ARE USED TO FILL THE P-TABLE.
LWORD
.WORD

.WORD
WORD
WORD

WORD

160170

300

240
O

03
FULL on HALF DUPLEX FLAG (BITO=1 IF FULL)

:[4] INTERRlPT vecroa

:[6]_INTERRUPT PRIORITY (5)
:[10] SPARE

:[12] OPTION TYPE (0=DMC,5=DMR-DMC MODE,7=DMR)

6.0 MODE AND MESSAGE DESCRIPTIONS

6.1 MODE DESCRIPTIONS
TRANSMIT MODE

A LIST OF MESSAGES IS TRANSMITTED WITHOUT EXPECTING ANY DATA
TO BE RECEIVED.

RECEIVE MODE
SPACE IS QUEUED FOR THE DEVICE TO RECEIVE MESSAGES.
AFTER RECEIVING AN "EXPECTED'' NUMBER OF MESSAGES
THE DATA RECEIVED

CAN BE COMPARED AGAINST A LIST OF "EXPECT TO RECEIVETM MESSAGES
IF DATA-CHECKING IS ENABLED.

PASSIVE MODE
THEN EVERY TIME A MESSAGE IS RECEIVED, A MESSAGE IS TRANSMITTED.

DATA CHECKING CAN BE DONE ON THE RECEIVED DATA.THE ‘‘/ECHO, /NOECHO'*
ENABLES/DISABLES THE RETRANSMISSION OF THE DATA RECEIVED.

CZCLFAQ-DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1T

18-APR-80 09:24

2
MACY11 30A(1052) 1h-APR-80
09:26 PAGE 25

ACTIVE MODE
A LIST OF MESSAGES IS TRANSMITTED AND MESSAGES ARE RECEIVED.

AFTER RECEIVING AN “EXPECTED'' NUMBER OF MESSAGES,

CAN BE COMPARED AGAINST A LIST OF
IF DATA-CHECKING IS ENABLED.

NOTE:

THE DATA RECEIVED

"EXPECT TO RECEIVE'* MESSAGES

IF BOTH ENDS OF THE LINK ARE IN ACTIVE MODE, THEN THE
LINK MUST BE A FULL DUPLEX LINK!

DOWN-L INE-LOAD

THE "HOST'® OR_ORIGINATING STATION REQUESTS THE ‘‘SATELLITE'’ OR

BOOT STATION TO ENTER MOP MODE. THE SATELLITE THEN SENDS A
' SECONDARY BOOT REQUEST MESSAGE''. THE 'HOST'® THEN CHECKS THE
RECEIVED MESSAGE TO SEE THAT IT IS A °'‘SECONDARY BOOT REQUEST'’.
THEN THE HOST SENDS A ‘MEMORY LOAD WITH TRAWNSFER ADDRESS
THAT CONTAINS IMAGE DATA TO BE LOADED BY THE SATELLITE'S
M9301-YJ/M9312 STARTING AT LOC. 0.
THIS IMAGE DATA WILL CONTAIN A
CODE THAT PRINTS A MESSAGE SAYING DOWN-LINE-LOAD WAS SUCESSFUL.

THE BOOTING PROCESS OVERWRITES PART OF THE 'VECTOR'' AREA SO THE DCLT
PROGRAM MUST BE RELOADED IN THE °'‘SATELLITE'® SYSTEM.

TALK MODE

THE °*TALK'' END OF THE LINK TRANSMITS OPERATOR-TYPED MESSAGES
UNTIL A "EXIT'® MESSAGE IS TYPED. AT THAT POINT, THE NODE GOES
INTO *LISTEN'® MODE. AN "EXIT MESSAGE'’ IS A MESSAGE WHOSE FIRST

FOUR CHARACTERS ARE "EXIT''.
SINCE ONLY THE FIRST FOUR CHARACTERS
NEED TO BE "EXIT'’, MORE CHARACTERS CAN BE ADDED SO THAT A MESSAGE

MAY BE SENT AND THE MODE SWITCHED ALL AT ONCE.

FOR EXAMPLE:

TLK> EXIT ALL OF THIS LINE IS SENT THEN MODE SWTICHED

LISTEN MODE

THE "LISTEN'® END OF THE LINK PRINTS ALL OF THE MESSAGES

RECEIVED BY THE DEVICE ON THE OPERATOR'S CONSOLE.
IF THE MESSAGE
RECEIVED IS AN "EXIT'' MESSAGE,
THEN THE NODE ENTERS ‘‘TALK'®' MODE.

AN "EXIT MESSAGE'* IS A MESSAGE WHOSE FIRST FOUR CHARACTERS ARE ‘EXIT'.

MAINTENANCE °“100P'' MODES

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1T

18-APR-80 09:24

MACY11 30A(1052) 16-AI2’R-00 09:264 PAGE 26
M

SEQ 0025

REMEMBER THAT THE WHENEVER A 'RUN'' COMMAND IS TYPED, THE DEFAULT IS
NO LMCK AND THAT A LOOP MODE MUST BE SPECIFIED BY A ''/LOOP=..'"
IF
A LOOP MODE IS DESIRED.
LOOP MODES ARE ONLY VALI D IF THE MODE TO RUN IS ACTIVE !

THE 'LU LOOP'' BIT IS SET SO THAT THE UNIT'S

INTERNALTTL

SERIAL LINE OUT IS LOOPED BACK TO THE SERIAL
LINE IN AT THE TTL LEVEL BEFORE LEVEL
CONVERSION.

CABLE

NOT USED BY DMR OR DMC-11 CODE.

LOCALMODEM

FOR DMR-11 IN DMR MODE AND RS449 MODEMS ONLY.

CAUSES A ‘WRITE MODEM'’' TO BE DONE TO SET UP

LOCAL-LOOPBACK (MAINT1)
. ALSO CALLED
ANALOG-LOOPBACK.
REMOTEMODEM

FOR DMR=11 IN DMR MODE AND RS449 MODEMS ONLY.
CAUSES A ‘WRITE MODEM'’' TO BE DONE TO SET UP

REMOTE-LOOPBACK (MAINT2)
. ALSO CALLED
DIGITAL-LOOPBACK.

JHE FOLLOWING TABLE SUMMARIZES THE MODES THAT CAN BE RUN TOGETHER
»icN THE DCLT PROGRAM IS RUNNING ON TWO PROCESSORS (ONE AT EACH

END OF THE LINK):
'STA‘! 10N A
1"HOS”"' NODE

! TALK
!LISTEN

! TRANSMIT
!RECEIVE
!PASSIVE
'ACTIVE

!DMI'ELOAD

°'/LOOP'* ALLOWED?
NO
NO

NO
NO
NO

STATION B
‘REMOTE'' NODE

DUPLEX

LISTEN*, RECEIVE
TALK*, TRANSMIT

HALF OR FULL!
HALF OR FULL!

RECEIVE*, LISTEN
TRANSMIT*, TALK
ACTIVE*

HALF OR FULL!
HALF OR FULL!
HALF OR FllL'

PASSIVE*

HALF OR FULL!

YES

ACTIVE*

PASSIVE

FULL

HALF FORCED !

*= MOST LIKELY TO BE IN THAT MODE

6.2 MESSAGE DESCRIPTIONS

NAME

DESCRIPTION

ZEROES
ONES

MESSAGE OF ALL 0°'S (OOOWOOO.NOOOOOO 00000000, ...)
MESSAGE OF ALL 1°'S (11111111, 11111111, 11111111,....)

1ALT
OALT
ccIrr

ESSAGE OF ALTERNATIM 1°'S (i0101010.{0101010.....)
? TERNATING 0°S (01010101,01010101,....)
"CCNT

.
:

12-8IT (VS. 511 BITS) TEST

PATTERN

N
MACY11 30A(1052) - 18—NZ’R-OO
09:26 PAGE 27

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PT
18-APR-80 09:24
ITEP

ALPHA

*INT R?N%ESSG TEST PROGRAM'S (ITEP)'' MESSAGE 1(DP1:}
/$A THE QUICK gg?fl FOX
(<177><1
D OVER THE

LAZY DO0G.<15><12><001><1

1W1%)

ALPHA-NUMERICS (OR FUTURE COMM TURNAROUND MSG)

(#S!"" (AMPERSAND) * () %+ =_0123456789:
; <=>?@ABCDEF GHIJK

LMNOPQRSTUWWXYZ/[\J*_%5
"A=7,0~9,SPACES,TABS""

THESE ARE THAT THE CHARACTERS THAT CAN

BE TYPED BETWEEN QUOTATION MARKS (*'..'")
TO SPECIFIY A UNIQUE MESSAGE.

(CALLED AN OPERATOR SPECIFIED MESSAGE.)

SEQ 0026

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1T

18-APR-80 09:24

3
MACY11 30A(1052) 1g-APR-80
09:26 PAGE 28

6.3 INTERFACING TO AN "'ITEP'' NODE
WHEN DCLT IS USED TO INTERFACE TO AN ITEP NODE.
THE TABLE BFLOW APPLIES:

ITEP NODE

DCLT NODE

ONE-WAY-0UT
ONE-WAY=-IN

RECEIVE OR LISTEN
TRANSMIT OR TALK

INTERNAL LOOP
EXTERNAL LOOP

ACTIV
ACTIVE

OR PASSIVE

NOTE: WHEN INTERFACING TO ITEP IF THE RX BUFFER ON THE
ITEP SIDE IS ONLY 10 BYTES LARGER THAN THE TX BUFFER YOU

HAVE SELECTED, SO BE SURE TO SET THE TX BUFFER ON THE DCLT
NODE ACCORDINGLY.

WHEN ITEP IS IN A MODE THAT IT IS EXPECTING TO BE TRANSMITTED
TO, A SOFT ERROR 'BASE TABLE ERR COUNTS NON-ZERO'' WILL OCCUR.
THIS IS DUE TO THE SPEED DIFFERENCES IN THE SOF TWARE.
WHEN DCLT IS IN LISTEN MODE THE RX BUFFER IS ONLY

82 BYTES LONG THEREFORE DO NOT SEND THE DCLT NODE
(IJZE&"SG. 3 FROM THE ITEP NODE OR A ‘LOST DATA'' ERROR WILL

BE SURE ITEP NODE HAS INCORPERATED PATCH FROM DEPO# MD-11-DZDMO-A1
ITEP NODE SHOULD ALWAYS BE RUN WITH SW 4 = TO 0

6.4 TROUBLESHOOTING HINTS
LISTED BELOW ARE SOME SETUPS THAT COULD BE USED FOR ISOLATING FAULTS.

THESE ARE BY NO MEANS THE ONLY WAYS DCLT CAN BE USED '!!!!!!
DCLT IS MEANT TO BE A VERY FLEXIBLE TOOL! THIS SECTION IS MEANT TO

GIVE SOMEONE NOT TOO FAMILIAR WITH DCLT A PLACE TO START.

REMEMBER THAT THE PRINTING OF STATUS MESSAGES AND PRINTING OF THE
EVENT LOG CAN PROVIDE A LOT OF INFORMATION ABOUT THE SEQUENCE OF
EVENTS AND HOW THE DEVICE AND LINK ARE BEHAVING.

NOTE: IF BOTH NODES IN ACTIVE AND '‘/NOCHECK'' IS USED,
===== END-QF -PASS 1S DEFINED AS RECEIVING 1 MESSAGE
AND COMPLETING THE TRANSMIT LIST.
WITH NO DATA
CHECKING, THERE IS NO WAY FOR DCLT TO KNOW HOW
MANY MESSAGES IT SHOULD EXPECT TO RECEIVE.

1.)

INTERNAL LOOP AT EACH NODE

SEQ 0027

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST
18-APR-80 09:24

RUN EACH END OF THE LINK IN ACTIVE MODE WITH LOOP=INTERNAL.
TRANSMIT TWO OR THREE MESSAGES WITH NO DATA CHECKING.
STATUS PRINTING COULD BE TURNED OFF IF ON, BUT SEEING THE SEQUENCE
OF EVENTS MIGHT BE INFORMATIVE.
A POSSIBLE COMMMAND SEQUENCE IS:

CE
cT

SE_T=ONES/S$=20/C=2

R M=A/LO=I/NOCH/STAT
THIS GIVES YOU A IDEA IF THE COMM. DEVICE CAN EVEN TRANSMIT AND
RECEIVE.
ANY ERRORS REPORTED WILL PROBABLY BE DUE TO INCORRECT
DEVICE ADDRESSES BEING USED OR A FAULTY DEVICE.
CHECK ADDRESSES
gé'\l’(?c'EDISPLAY" AND RUN THE PREREQUISTE DIAGNOSTICS FOR THE COMM.

NOW TRY RUNNING EACH NODE THE SAME WAY WITH DATA CHECKING ENABLED.
A POSSIBLE COMMMAND SEQUENCE IS:

R M=A/L0=1/CH/PAS=3
IF A CABLE TURNAROUND CONNECTOR IS AVAILABLE, PUT IT ON THE END OF
THE CABLE JUST BEFORE THE MODEM AND RUN IN ACTIVE MODE WITH NO LOOP.
POSSIBLE COMMAND SEQUENCE IS:

R M=A/CH/PAS=3

2.)

TRANSMIT ON ONE NODE RECEIVE ON THE OTHER

NOW TRY TRANSMIITING FROM ONE END AND RECEIVING ON THE

OTHER. MAYBE WITH NO DATA CHECKING AT FIRST TO ESTABLISH
IF THE LINK IS WORKING.
POSSIBLE COMMAND SEQUENCES ARE:

NODE A

NODE B

CE
A Y

CE
cT

R M=TR/PAS=3

R M=R/NOCH/PAS=3

SE T=1ALT/S=250

SE E=1ALT/S=250

NOW TRY DOING DATA CHECKING ON THE MESSAGE(S) BEING
TRANSMITTED.

POSSIBLE COMMAND SEQUENCES ARE:

R M=TR/PAS=3

R M=R/CH/PAS=3

NOW RUN THRU THE SEQUENCE AGAIN WITH NODE A RECEIVING
AND NODE B RECEIVING.

3.)

ONE NODE ACTIVE THE OTHER NODE PASSIVE

¥y

CZCLKA.P11

3
MACY11 30A(1052) ‘IS-APR-OO
09:24 PAGE 29

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

18~APR-80 09:24

3
MACY11 30A(1052) 13-APR-80
09:264 PAGE 30

NOW TRY RUNNING ONE NODE IN ACTIVE MODE WHILE THE OTHER
END RUNS IN PASSIVE. DATA CHECKING SHOULD BE TURNED OFF
IF THE MESSAGE LISTS ARE NOT THE SAME.
POSSIBLE COMMAND SEQUENCES ARE:
NODE A

NODE B

CE
cT
SE T=CCITT/S=10/C=2
R M=ACT/NOCH/PAS=3

CE
cT
SE T=1ALT/S=20/(C=2
R M=+/NOCH/PAS=3

NOW USE DATA CHECKING WITH THE ‘EXPECT MESSAGE LISTS'' SET
UP APPROPRIATELY.
ANOTHER VARIATION IS TO HAVE LARGE SIZE
MESSAGES ON ONE SIDE WITH SMALL MESSAGES ON THE OTHER.
THEN REVERSE THE SETUP SO THAT THE NODE RUNNING IN ACTIVE

IS RUNNING IN PASSIVE AND VICE VERSA.

4.) BOTH NODES ACTIVE
NOW BOTH NODES CAN BE RUN IN ACTIVE WITH DATA CHECKING ON.
STATUS PRINTING COULD BE TURNED OFF IF YOU'RE NOT INTERESTED
IN THEM.
NODE A

NODE B

CE
cT

CE
crT

SE T=0ALT/S=10
SE T=CCITT/S=20
SE T=ALPHA/S=30

SE E=ITEP/S=31

R M=A/CH/NOST/PAS=3

SE E=0ALT/S=10

SE E=CCITT/S=20
SE E=ALPHA/S=30

SE T=ITEP/S=

R M=A/CH/NOST/PAS=3

A VARIATION THAT CAN BE USED IS FOR ONE END TO SEND A LOT OF
SMALL MESSAGES AND THE OTHER TO SEND A FEW LARGE MESSAGES.

THE 'END-OF -PASS'‘ POINT WILL BE OUT OF SYNC BUT THIS IS NOT

A PROBLEM.

5.) TALK AND LISTEN MODES FOR COMMUNICATING
TALK AND LISTEN MODES ARE USEFUL IF THE OPERATORS WISH TO COMMUNICATE
WITH EACH OTHER.
JUST SETUP A TIME THAT EACH WILL GO TO THEIR MODE,
TALK OR LISTEN, AND SEND MESSAGES OVER THE LINK. POSSIBLE COMMAND
SEQUENCES ARE.
R M=LIS/NOST

R M=TA/NOST

LIS>

SEQ 0030

TLK>

—

18-APR-80 09:2¢4

CZCLKA.P11

3
MACY11 30A(1052) 1S-APR-80
09:24 PAGE 31

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

MACY11 30A(1052)

.SBTTL

002000

F 3
18-APR-80

09:24

PAGE 32

SEQ 0031 |
i

PROGRAM HEADER
BGNMOD

3% ONOWVESWNN—=O 3
D

S*e

: THE PROGRAM HEADER IS THE INTERFACE BETWEEN
; THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.

d
D

POINTER BGNRPT ,BGNAU,BGNDU

d e

WEHWNOW

S35wo

HEADER

§§§§§§

— o

—

PR X o8 O F JF

D e

S S O

1408

(Z(CLK,A,0,1800.,0

::
LSNAME

LSREV::
LSDEPO::

LSUNIT::
LSTIML::

LSHPCP::
LSSPCP::
LSHPTP::

LSSPTP::
:
LSLADP:

LSSTA::

L$CO::
LSDTYP::

LSAPT::

002124

LSDTP::

LASCII
ASCII
.ASCII
ASCII
ASCII1
.BYTE

/C/
/2/
/C/
/L/
/K/
0

LASCII

/A/

LASCII

70/

WORD

.WORD

1800.

.WORD

LSHARD

WORD

.WORD

LSHW

WORD

.WORD

LSLAST

WORD

.WORD

LSDISPATCH

.BYTE
.BYTE

0
0

E——

1467
1468
1469

1470
1471
1472
1473
1476
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1496
1495
1496
1497
1498
1499
1500
1501
1502

1503

1504
1505
1506

002052
002054
002056

002056
002060
002060
002062
002062
002064
002064
002066
002066
002070
002070
002072
002072
002074
002074
002076
002076
002100
002100
002102
002102
002104
002104
002106
002106
002110
002110
002112
002112
002114
002114
002116
002116

002120

003
003

000000
000000
000000

012026
024364
000000

000000
025316
025310

000000
012042
104035

000000
024400

025266
025264

024372

000000
000000

000000

588

LSEXP1::
LSMREV::

.BYTE

LSEF::

LSSPC::
LSDEVP::

LSREPP::
:
LSEXP4:

LSEXPS::
LSAUT::
LSDUT::

LSLUN::
:
LSDESP:
LSLOAD::

LSETP::
LSICP::

LSCCP::
LSACP::

LSPRT::
LSTEST::

LSDLY::
LSHIME::

000000

LSENVI::

000000

LSPRIO::

002044
002046
002046
002050
002050
002051
00205%

PAGE 33

558885858 T§EEEEEEEE
&

1460
1461
122%
]
16464
1465
1466

000000

09:24

002042
002042

HEADER

18-APR-80

1457
}223

MACY11 30A(1052)

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLRA.P
18-APR-80 09:24

0
0

CSREVISION
CSEDIT
0
0

LSDVTYP
LSRPT

0
0

LSAU
LSDU

0
LSDESC
ESLOAD

0
LSINIT
LSCLEAN

LSAUTO
LSPROT

0
0
0

CZCLFAQ DMR,DMC~-11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

MACY11 30A(1052)

DISPATCH TABLE

1507

.SBTTL

1509

1508

1510
}gp

151%

1514
1515
1516

}g}g

18-APR-80

09:24

PAGE 34

SEQ 0033

DISPATCH TABLE

: THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST.
s IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST.

002122
002122
002124

002124

000001

025324

DISPATCH 1
.WORD
LSDISPATCH: :

WORD

|
}
:

CZCLFAO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

MACY11 30A(1052) ‘IL-APR-GO 09:26 PAGE 35

DEFAULT HARDWARE
P-

SEQ 0034

};33

.SBTTL

1521
152
152
1524
}ggg

++
: THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF
: THE TEST-DEVICE PARAMETERS.
THE STRUCTURE OF THIS TABLE
: IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES,
: AND IS USED AS A “TEMPLATE' FOR BUILDING THE P-TABLES.

}g% 002126
1sg
1530
1531
1532
1533

002126
002130
002130

115523

002130

000010

DEFAULT HARDWARE P-TABLE

SGNHW DFPTBL
LSHW::
DFPTBL::

1534
1535
1536

L10000-LSHW/2

; INDEPENDENT SECTION
:
THE NUMBERS IN BRACKETS ARE THE OFFSET VALUES USED IN THE PARAMETER
:
CODING SECTION.
000001

1541
1542

1543

LWORD

;:[0] FULL OR HALF DUPLEX FLAG (BITO=1 IF FULL)

:DEVICE DEPENDENT SECTION

ADDING OR REMOVING WORDS FROM THIS TABLE EFFECTS Tlf ‘GET'* CALLS IN
THE HARDWARE PARAMTER CODING SECTION BY CHANGING ‘OFFSETS'’

1547
1548
1549
1550
1551
}gg

002132
002134
002136
002140

160170
000300
000240
000000

LWORD
.WORD
JWORD
WORD

160170
300
240
0

002142

000000

WMORD

1556

002144

000004

}ggg 002146 000000

LWORD

.WORD

1558
1559
1560

ENDHW

002150
002150

:[2] CSR ADDRESS
:[4] INTERRUPT VECTOR
:[6] INTERRUPT PRIORITY (5)
[103 DEVICE PARAMETERS WORD
:
(ENABLE CRC, STRIP SYNC, COMPATIBLE MODE...)
.nzg’gsvus OPTION TYPE (0=DMC,5=DMR-DMC MODE.

ZmJ BAUD RATE (0=2.4K, 1.4..&: 2=9.6K, 3= 19.2K,
: 4=56K, 5=250K, 6=500K.

7=1 MEGA-BAUD)

:016] Llff 1NTERFACE (loéZ v.35, INT, EIA...)
L10000:

BB Rl SN rkY,

s
;

1544
}%

1555

LWORD

MACY11 30A(1052) 1‘-APR-80 09:24 PAGE 36

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24
DEFAULT HARDWARE P-TABLE

;|S61

1368

1564

1565

.SBTTL

1570

s4e
: THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT

1573

1566
1567
1568
1569

1571
1572

1574
1575
1576

1577
12778

1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590

GLOBAL EQUATES SECTION

ARE USED IN MORE THAN ONE TEST.

002150

EQUALS

3
: BIT DIFINITIONS

100000
040000
020000
010000
004000
002000
001000
000400
000200
000100
000040

BIT15== 100000
BIT14== 40000
B81T13== 20000
8I1T12== 10000
BIT11== 4000
BIT10== 2000
8I1T09== 1000
BIT08== 400
BIT07== 200
B8IT06== 100
BIT05== 40

1591
1592
1593

000020
000010
000004

000002
000001

8IT01==
B8IT00== 1

1597

001000

BIT9==

1594
}gg
1598
1599
1600
1601
1602
1603
1604
1605

000100
000020
000010
000002

000001

1608
1609
1610

1611
1612
1613
1614
}2}2

BIT04== 20
81703== 10
BIT02==

BIT8==
BIT7==
BITé6==
BITS==
BIT4==
BIT3==
BIT2==
BIT1==
BIT0==

BIT09

BITO08
BIT07
BIT06
BITO0S
BIT04
BIT03
BIT02
BITO1
BITO00

s EVENT FLAG DEFINITIONS
:
EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION
000040
000037
000036
000035
000034

EF .START==
EF .RESTART==
EF . CONT INUE==
EF .NEW==
EF
.PWR==

32.
1.
"
A
28.

; START COMMAND WAS ISSUED

: RESTART COMMAND WAS ISSUED

; CONTINUE COMMAND WAS ISSUED
: A NEW PASS HAS BEEN STARTED

; A POWER-FAIL/POWER-UP OCCURRED

CZCLFAO DMR,DMC-11
DATA COMM. LINK TESTGL
MACY11 30A(1052)
CZCLKA.P11
18-APR-80 09:24
OBAL EQUATES SECTION

: PRIORITY LEVEL DEFINITIONS
PRIO7?== 340

3333 RERRREREREERRRR

1625

PRIO6== 300
PRI0S== 240
PRIO4== 200
PRI0O3== 140
PRI0O2== 100
PRIOT== 40
PRI00== 0

*OPERATOR FLAG BITS
EVL==

LOT==

IDU==
ISR==

UAM==
==
PNT==
PR]==

IXE==

IBE==
1ER==

LOE==
==

100

200
400
1000

2000

4000

10000

20000

40000

100000

18-APR-80

09:24

PAGE 37

MACY11 30A(1052) 1h-APR-80 09:24 PAGE 38

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24
GLOBAL EQUATES SECTION
1646

1647

swwwxx INDEPENDENT EQUATES

1648

001000

BUFLIM=512.

1650

000017

MSGLIM=15.

1649

1651
165
165
1654
1655
1656

1657

1658

1659

000000

000001

000002

000003
000004
000005
000006

1665
1666
1667
1668
1669
1670

000000
000001
000002
000003
000004
000005

1671
1672
1673
1674

1675

1676
1677
1678
1679

1680
1681
1682
1683
1684

1685
1686
1687

000100

000111

001600

:
:

(FOR EACH INCREMENT (+1) TO MSGLIM,
ADD 6 WORDS TO THE POINTER TABLE

'POINTER’' WORDS PER BUFFER.

sMODE OF OPERATION EQUATES
REC=0
TRA=1

(PTRTAB:) SINCE THIS MEANS 2 MORE

sRECEIVE MODE

; TRANSMIT MODE

PAS=2
ACT=3
DOW=4
TAL=5
LIS=6

.LISTEN MODE

TTL=

:NO _LOOP
s INTERNAL TTL

sMAINT LOOP TYPE EQUATES

s CLOCK EN%BLE
VA%olfoS TO BE LOADED IN CLK'S CSR
sL=CLOCK CSR VALUE TO ENABLE THE CLOCK
PCLKEN= 111
:P-CLOCK CSR VALUE TO ENABLE THE CLOCK
PCLKCT= 1600
:P~CLOCK COUNT SET REGISTER FOR COUNTER

;PARAM WORD EQUATES

000001
000002
000004
000020
000040

STATB= BITO
DATCKB= BIT1

;OPERATOR AWAKE ASKED FOR
:DATA CHECK BIT

CRCB=
BIT4
PROTOB= BITS

:PROTOCOL PROCESSING ASKED FOR

ECHOB=

BIT?

;ECHO BIT
sCRC CALCUALTE ASKED FOR

;OPTION TYPE EQUATES

1688
1689
1690
1691
1692
1693

000000
000004
000005
000006
000007

1696
1657
1698
1699
1700
1701

000000
000002
000004
000006
000010
000012

1694
1695

sMAX
:

1660
1661
1662
1663

1664

;MAX BUFFER SIZE IN BYTES
:
APPLIES TO TX.RX AND CMP BUFFS

oMc=
DMRC=

DMRC7=

0
4

Rz
7
DMR7=
;EVENT LOG MESSAGE TYPES (USED TO LOCATE EVENT DESCRIPTION IN EVENT TABLE
: AND D%Sl;:TCHING TO SEPERATE SECTIONS OF THE EVE&%;WTIN SECTION)
s TRANSMIT MESSAGE
0
TXC=

RXQ=
RXC=

DER=
DVI=

TRMSHI T _COMPLETE

10
12

:DEVICE ABOUT TO INIT

SEQ 0037

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
CZCLKA.PT
18-APR-80 09:24
GLOBAL EQUATES SECTION

18-APR-80

09:24

PAGE 39

}7785

000014

DCK=

;DATA COMPARISON RESULTS

1704
1705

000020
000022

DLE=
DDE=

20
22

;DATA COMPARISON LENGH ERROR
:DATA COMPARISON DATA ERROR

1.;:)“?

000024

]l;/g
000001
000002
000004
000010
000020
000040
000100

1718
}7753

000400
001000

000200

1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
};33‘3

000007
000010
000011
000012

1735
1736
1737
1738
1739
1740

000000
000001
0(!)00%
00000
000004

000000
000001
000002
000003
000004
000005

1741
1742
1743

000005
000006
000007

1745

000011

1744

1746
1747
1748
1749
1750
1751
175%
175
1754
1755
1756
1757

;END OF PASS

2 :;EQUATES FOR FLAG WORD;;;;;:

1710
1y4)
1712
1713
1714
1715
1716
177

EOP=

000010

00001
00001
000014
000015
000016
000017
000020
000021
00002
00002
000024
000025

ININT= 1
OTINT= 2
QRX=
4
QTX=
0
CTX=
20
CRX=
40
ERX=
100

s INPUT INT. REC.
sOUTPUT INT REC
sRX QUED /COMPL
s TX QUED/COMPL
sTX COMPL AND IN TXSEL4 AND TSEL6
:RX_COMPL AND IN TSEL4 AND TSEL6
cEXPECT TO GET A RX COMPLED

DLLGA= 400
DMRRUN= 1000

:DOWN LINE LOAD GO AHEAD BIT
;DMR RUN MODE EXPECTED

ETX=

200

:EXPECT TO GET
A TX COMPLETED

; SPECIAL CLI CODES FOR '‘CHAR'' ARGUMENT IN CLI CALLS
:
(COMMAND LINE INTERPRETER DEFINITIONS)
CLIERR= 0
CLIEXI= 1
CLIBR= 2
CLIBIF= 3
CLISPA= &
CLINUM= 5
CLIALP= 6
CLIALN= 7
CLIOCT= 8.
CLIDEC= 9.
CLISTR= 10.

: DEFS FOR COMMAND LINE INTERPRETATION ACTION VALUES
NULL=0
CLEAR=1
SHOW=2
CHECK=3
HLP=5
CSHEXP=6
CSHTRN=7

SETEXP=10
SETTRN=11

SIZE=12
QCOPY=13
NUM=14
OPRMSG=15
STAT(B=16
ENDQO=17
CMSG0=20
CMSG 351
CMSG2= g
CMSG3=
CMSG4=24
CMSG5=25

SEQ 0038

3
18-APR-80

09:26

PAGE 40

;dflddddd

;ewxwx DEVICE DEPENDENT EQUATES
MODEM SIGNAL BIT DEFINITONS
IF SIGNAL AVAILABLE 6" DEVICE, EQUATE NAME TO BIT POSITION,
ELSE EQUATE IT 10
=

g
2

000004
000010
000001
000040
040000
1000

SERIRARGR
FRFR

o
(v}

V\l—.

R R PR e RN NRRRRNARRREFERERERErS
a2
233

CZCLFAO DMR,
=11 DATA COMM. LINK TEST
MACY11 30A(1052)
1
CZCLRA.PT
09:24
GLOBAL EQUATES SECTION

CTS=

BIT

DSR=
DCD=
RTS=

8IT
BITO
BITS

RI=

sap=
TM

BIT7

BIT14

BIT9

DEVICE SIGNALS

RQI=
RDI=

BITS
BIT7

RDO=
BIT?7
BACC=
BITO
MCLR=
BIT14
LULOOP= BIT11
MAINTB= BIT8

HALFDB= BIT10
RXBIT= BIT2

IEO=

BITé

sCLEAR TO SEND (CIRCUIT (B)
sDATA SET READY (CIRCUIT CC)
sDATA CARRIER DETECT (CIRCUIT CF)
cREQUEST TO SEND (CIRCUIT CA)
sRING INDICATOR (CIRCUIT CE)
cSIGNAL QUALITY DETECT (CIRCUIT CG)
sMODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM)

sREQUEST IN
:READY IN

sBUFFER ADDR. CHAR COUNT

sMASTER CLEAR
sLINE UNIT LOOP(TTL)

:MAINT MODE BIT
HALF DUPLEX BIT

Rx BIT

:EW.E OUTPUT INTERRUPT BIT

SEQ 0039

putr

.sngTL
TTL

PAGE 41

GLOBAL DATA SECTION
DEFAULT MESSAGE DEFINITIONS AND TABLES

RRRSRRINAIZ

NIIEXRBRRNSES

sMESSAGE BYTE COUNT TABLE
DMSGCT:

MSGOC:

:SSG1E=

.WORD

MSG4C:
.WORD
MSG5C:
.WORD
MSG6C:
.WORD
OPCNT:
.WORD
MSG8C:
.WORD
DLLMIC: .WORD
DLLM2C: .WORD

EMSGO-MSGO

%6115561

EMSG4-MSG4
EMSGS5-MSGS
EMSG6-MSG6
O
EMSG8-MSGS8
DLLMIE-DLLMI
DLLM2E-DLLM2

COUNT OF MESSAGE #0

COUNT FOR OPERATOR SPEC'D
MSG.
COUNT OF RECEIVE BUFFER FILL PATTERN

DLL MSG 1 COUNT
:DLL MSG 2 COUNT

JMESSAGE ADDRESS TABLE
DMSGAD:

MSGO
MSG1

;ADDRESS OF MESSAGE #0

MSGS
MSG6
OPBUF
MSG8

MESSAGE #4
MESSAGE #5
MESSAGE #6
OPERATOR SPEC'D MSG.
ADDRESS OF RECEIVE BUFFER FILL PATTERN

MESSAGE #1
MESSAGE #2

MSG.
MS
MSG4

e B B
e
e
DB

MSGO:

)

D e

09:24

: THE GLOBAL DATA SE(EITIM CONTAINS DATA THAT ARE USED
ONE TEST.
: IN MORE THAN

D
) D d =D e
D D )
D D )
b b
—

4
APR-80

144

s T YU YIS W W

FERBREE G
V!UlVlS 3 33 3 detaeRn
s

DR P IR R S GRS (O

'y-

RRBRBRBR ("]

O 0O NV
NN =

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
CZCLKA.P1T
18
80 09:24
GLOBAL DATA SECTION

MESSAGE #3

.BYTE

000

MSGl: .BYTE

377

sMESSAGE OF ALL 1°S

MSG2:

252

sMESSAGE OF ALTERNATING 1°'S

.BYTE

G3: .BYIE

125

sMESSAGE OF ALL 0'S

sMESSAGE OF ALTERNATING 0°S

''CCITT'' 512-BIT (VS. 511 BITS) TEST_PATTERN

031011
105221

.WORD

177603,157427, 031011 047321,163715,105221,143325,142304

052606
123754

WORD

040041,014116,052606,172334,105025,123754,111337,111523

137642
135075

.WORD

030030,145064,137642,143531,063617,135075,066730,026575

070071
031605

.WORD

052012,053627,070071,151172,165044,031605,166632,016741

—

COMM. LINK TEST

MACY11_30A(1052) 18—%-80 09:24 PAGE 42

CZCLFAO DMR,DMC-11 DATA
CZCLKA.PT
18-APR-80 09:24

005350

166632

016741

DEFAULT MESSAGE DEFINITIONS AND TABLES

:
EMSG4

MSGS :

002324

002324
0023
00

De
) —t

.o
dg
NEQOQNOmfiaadO§§§§§§§§§§§§§§§§§§§§§§§§§§§§

1867
1868
1869
1870
1871
18
18
1874
1875
187!
18
1878
1879

:“wm(zgg?c;sson TEST PROGRAM'S (ITEP)'* MESSAGE
ASCII

<1775><177>/%A THE QUICK BROWN FOX JUMPED OVER THE LAZY DOG./

LASCIZ

<15><12><001><177><177><177><177>

ASCIT

/748! &' O n+,=.0123456789:
; <=>?@ABCDEF GHIJKLMNOPQRS TUVWXYZ/

LASCIZ

2/[\1*_%?

EMSGS:

sALPHA-NUMERICS (OR FUTURE COMM TURNAROUND MSG)

D e

) e

MSG6:

D e

053526

)

057135

EMSG6:

D e e

002520

e
D e
D
)

047045

D D

.EVEN

At ittt
ittt
I I2222222223

:THESE THREE STORAGE AREAS MUST NOT BE SEPERATED !!!!
002520
002524
002646

040445

OPBFPT:
m:

.ASCII
.BLKB

/INXA/
82.

;BUFFER FOR OPERATOR SPEC'D MESSAGES

: THE ABOVE THREE LINES MUST BE KEPT TOGETHER
AR

A AN

AR AR AN AR

AN AR RN R RN AR

RN RN RANRANRAAANTRNSE

)

MSGS8:

)

EMSGS8:

.BYTE

;RECEIVE BUFFER FILL PATTERN

; DOWN-LINE-LOAD MESSAGE DEF INITIONS

§38 88888

ooN28eee

) d D
)
b d
b d d
d
—

—————y

DLLM1:

.BYTE
BYTE
BYTE
BYTE
BYTE

DLLMIE:
DLLM2:
.BYTE
BYTE
BYTE

6
0
0
0O
0

O
0

; CODE
;LOAD NUMBER
;LOAD ADDRESS LSB

SEQ 0041 r

CZCLFAO DMR,DMC=11 DATA ( OMM. LINK TEST

CZCLKA.P1T * 18-APR=80 09:24

1923
1925

002657
002660

1925 002661

000
006

.BYTE
BYTE

000

BYTE

}g%;
002662
002666
002670

005037
000005
012706

1933
1934
1935
1936
1937
1938
1939

002700
002702
002706
002712
002714
002720
002722

010700
062700
105761
100375
112061
00137
012737

191

002734

000777

1940

002674

002730

012701

000006

CLR
RESET

001000

MOV

177560

MOV

000034
000004

18:

000006

005037

000026
000026

000024

192
1943
194
1945
1966
1947

002736
002744
002752
002760
002766
002774

006412
046440
042507
051040
042526
041503

047502
051505
053440
041505
020104
051505

052117
040523
051501
044505
052523
043123

1949
1950
1951
1952

003010
003016
003026
003025

020104
051505

043117
020524

1956
1955
1956
1957
1958
1959

003040
003046
003054
003056
003057
003060

047105
052040
041
012
051056
020104
040522
000056
006
000
000

027015
046105
051120
027115

027056
040517
043517
027056

1961
1962

003062

1948

1953

003032

1960 003061

1963
1964

0
6

;LOAD ADDRESS

:IMAGE DATA

1929
1930
1931

1932

MACY11 30A(1052)
18-APR-80 09:24 PAGE 43
DEFAULT MESSAGE DEFINITIONS AND TABLES

MOV
ADD
TSTB
BPL
MOVB
BNE
MOV
(LR

MSG:

DLLM2E:

w6
#1000,SP

#177560,R1

PC,RO
#<MSG-.>,R0
4 (R1)
18
(RO)+,6(R1)
18
#26,a424
a#26

;SET UP TTY

:MAKE ADDR.PI(
:ADDRESS MSG.
:TTY READY?
WAIT TIL YES
:TYPE
A CHAR
:KEEP GOING
:SET_UP POWER FAIL

IMAKE SURE T BIT CLAER

JUMP ON YOURSELF

.ASCII

<12><15>/BOOT MESSAGE WAS RECEIVED SUCCESSFULLY ~END OF TEST!'/

LASCIZ

<12><15>/....RELOAD PROGRAM..../

BYTE
BYTE
BYTE

6
0
0

BYTE

.EVEN

|
|

|
'

046125 054514 026440

000

SEQ 0042 |

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052) 1S-APR-80 09:24 PAGE 44

= 18-APR-80 09:2%

}ggg

DEFAULT MESSAGE DEFINITIONS AND TABLES

;COMMAND LINE BUFFER, DATA LOCATIONS AND MESSAGES FOR ACTION ROUTINES

1967
1968

003062
003204

000122
000000

CMDBUF: .BLKB
KEYWD1: .WORD

82.
0

;BUFFER FOR OPERATOR COMMANDS
:THIS LOC WILL =1 IF CLEAR TYPED,

1970
1971
19;;
1973

003206
003210
003212
003214

000000
000000
012525
012540

QUALFG: .WORD
QUALVL: .WORD
HLPTAB: .WORD
JWORD

0
O
HLP1
HLP2

mxs LOC HOLDS QUALIFIER VALUE (SIZE OR COPY)

1969

1974
1975
1976
1977
1978
1979
1980
1981
}%

003216
003220
003222
003226
003226
003230
003230
003236
003244

012646
012733
013012
013070
013152
013305
013326
013346

JWORD
.WORD
JWORD
.WORD
.WORD

013314
013333
013354

013321
013341

1984,

HLPEND:
SHTYTB: .WORD

HLP3
HLP%
HLP4A
HLPS
HLP6
SHTYPO,SHTYP1,SHTYP2,SHTYP3,SHTYP4,SHTYPS
,SHTYP6, SHTYP?

: THE LIST OF BYTES BELOW ARE_THE FIRST BYTES OF THE PREDEF INED MESSAGES

}ggg

1987 003250
1988 003253

000
125

377
203

252
177

USED TO "'SHOW'' THE TRANSMIT AND COMPARE BUFFER CONTENTS.

SHTAB:

.BYTE

0,377.252.125,203,177.043

1989
1990

003256
003257

1993
1996
1995
1996
1997
1998
%

003260
003262
003264
003266
003270
003272
003274

013365
013375
013406
013416
013425
013442
013447

MODES:

.WORD
JWORD
JWORD
JWORD
JWORD
.WORD
JWORD

MO0
MO1
MO2
MO3
MO4
MOS
MO6

;ADDRESSES OF MODE TYPES IN ASCII

2001
2002
2003
2004
2005

003276
003300
003302
003
003306

013456
013466
013477
013505
013520

LOOPS:

.WORD
.WORD
JWORD
.WORD
.WORD

LPO
LP1
LP2
LP3
LP%

;ADDRESSES OF LOOP TYPES IN ASCII

}g’?}

043

003260

223&7,
2009
2010
2011
2015

2 FOR SHOW,

A 4 IF RUN WAS TYPED, 5 IF HELP WAS TYPED

SHTEND:

.EVEN

;COMMAND LINE TRAVERSE LOCATIONS (USED BY 'PSTRV'")
003310
003312
003314
003316

000000
000000
000000
000000

201
3
000000
2014
003322
000000
2015 003324
000
%9 003325
000

PSBUFA:
PSTREE:
PSACT:
PSCNT:

.WORD
.WORD
.WORD
.WORD

PSNUM: .WORD
PSRADX: .WORD
PSNNUF: .BYTE
PSGDBD: .BYTE

0
O
0
0

O
0
0
0

;LOC.
:LOC.
:LOC.
:LOC.

TO HOLD ADDR. OF CMD LINE BUFFER
TO HOLD ADDR. OF PARSING TREE
TO HOLD ADDR. OF ACTION ROUTINE
TO BE A COUNTER LOCATION

.LOC. TO HOLD NUMERIC VALUE FROM PARSE
LOC. TO HOLD RADIX USED(LO) AND +/-(HI BYTE)
*RETURN =0 IF ENOUGH OF COMMAND FOUND
*RETURN CODE O IF NO ERROR FOUND

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24

MACY11 30A(1052)

PAGE 45

ME SSAGE BUFFERS AND POINTER TABLES

§§§§

BUFLIM
BUFLIM
BUFLIM

: TRANSMITTER BUFFERS
sRECEIVER BUFFERS
; COMPARISON BUFFERS
:TABLE FOR MESSAGE ADDRS. & BYTE COUNTS
: END OF MSG. PTR. TABLE

<
m

3333333333858 B

MSGTYP:

OO0O0OO0O
OO0O0O0O0O
OO00O0

sDEVICE RX ADDR
sDEVICE RX CHAR COUNT
sDEVICE RX MESSAGE COUNT
sRX MSG TOTAL
sNUMBER OF OPERATOR AWAKE MSGS
sNUMBER OF NO BUFFS
sPASS COUNTER
sERROR COUNTER

s START ADDR.
:END ADDR. FOR DUMP

:BYTE BIT FOR DUMP ROUTINE
=4

o
—

;OTHER MESSSAGE

sDEVICE TX ADDR
sDEVICE TX CHAR COUNT
sDEVICE TX MESSAGE COUNT
;TX MSG TOTAL
:TX BUFFER CHAR. COUNT
sCURRENT ADDR. OF TX BUFF TO ADD AT

8YT8I T :

sRECEIVER MESSAGE POINTER
sTRANMITTER BUFFER POINTER
: COMPARISON BUFFER POINTER
:CMP_MSG TOTAL
s COMPARE BUFFER CHAR. COUNT
:CURRENT ADDR OF CMP BUFF TO ADD AT

OCOO0O0O00O0

180.

Bl | L

09:26

MESSAGE BUFFERS AND POINTER TABLES

.SBTTL

SRR RS

B-APR-BO

STORAGE LOCATIONS
;TYPE OF DATA 0=0°'S,1=1'S,2=1)'S.3=01"'S

=CCITT,5=QUICK FOX, &upwun 7=0PER

:TX/RX/CHMP CHARCOUNT

:CURRENT RX POINTER
: CURRENT POINTER
:CURRENT TX/RX/CMP START ADDD
:TOTAL CHAR COUNT NOT MORE THEN ‘BUFLIM*
:OFFSET COUNT
: TEMPORARY LOCATIONS (USED A LOT)

:CONTROL OUT ERROR MSG. ADDRESS
;WORD FOR CONTORL IN
:BYTE TO HOLD EXPECTED MESSAGE DATA BYTE FOR ERR REPORT
:BYTE TO HOLD RECEIVED MESSAGE DATA BYTE FOR ERR REPORT

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052) 1g-APR-80 09:24 PAGE 46

~ 18-APR-80 09:24

228;2

MESSAGE BUFFERS AND POINTER TABLES

;MORE INDEPENDENT CODE STORAGE LOCATIONS

2075
2076
2077
2078

007212
007214
007216
007220

000000
000000
000000
000000

LOGUNT:
PCADD:
RESFLG:
MODTYP:

.WORD
.WORD
.WORD
.WORD

0
0
0
O

;LOC. TO HOLD LOGICAL UNIT NUMBER
:LOC. HOLD PC OF CALLIN ROUTINE
:LOC TO HOLD FLAG (=1) THAT A RESTART WAS GIVEN
:DCLT MODE OF OPERATION TYPE

2081

007222

000000

MLTYP:

.WORD

:MAINTENANCE LOOP TYPE (O=NONE, I=INTERNAL TTL,

2079
2080
228?;%

2084
2085

2086
2087
2088
2089
2090
2091
2092
2093

2095.20‘:»4.

2096
2097
2098
2099
2100
2101
2102
g}gz

007224
007226

007230

000000
000002

FHDPLX: .WORD
PARAM:
.WORD

0
2

007232

000000

RPASS:
FLAG:

007234
007236
007240
007242
007244
007246
7250

031014
031046
031106
031142
0322
032750
033170

MODE:

007252

000000

2105

2106
2107
2108

.WORD

;MODE DISPATCH TABLE
.WORD
JWORD
.WORD
.WORD
JWORD
LWORD
LWORD

RYONLY
TXONLY
PLCK
ALCK
DLL
TALCK
LISCK

CLKCSR:

.WORD

CLKEN:

.WORD

.SBTTL

:
:
:

(O=REC-ONLY, 1=TX=ONLY, 2=PASSIVE-LOOPSK,
3=ACTIVE-LOOPBK, 4=DOWN L.L., 5=TALK, 6=LISTEN)

2=CABLE, 3=MODEM-ANALOG LOOPBK (LOCAL)

4=MODEM-DIGITAL LOOPBK (REMOTE), 5=MOP)

;FULL OR MALF DUPLEX FLAG (1=FULL FROM P-TABLE)
*PROGRAM PARAME TERS

: BITO= STATUS MSGS TO OPR PRINTED (1=YES)
; BIT1= DATA CHECKING DONE ON RCVD MSGS (1=YES)
: BIT2= ECHO (TRANSMIT) RCV'D MSG.(PASSIVE) (1=YES)
: BIT3= SPARE
: BITé= CRC CALC./CHECK DONE (1=YES)
: BITS= PROTOCOL EMULATION (1=YES)
: BIT6= SPARE
:PASS NUMBER FROM RUN COMMAND

:DEVICE FLAG WORD

:RX ONLY DISPATCH
:TX ONLY DISPATCH
:PASSIVE LOOP BACK DISP
:ACTIVE LOOP BACK DISP
:DOWN LINE LOAD DISP
:TALK MODE DISPATCH
:LISTEN MODE DISPATCH

CLOCK TABLES, EVENT LOG AND POINTERS
:CLOCK CSR ADDRESS

000000
000000
000074

CLKBR: .WORD
CLKVEC: .WORD
CLKMZ:
.WORD

O
O
£3.
O

*CLOCK'S CSR VALUE TO INTRPT. ENABLE IT

;PLACE TO KEEP TIME-SINCE-START

:CLOCK INTERRUPT LEVEL
:CLOCK INTERRUPT VECTOR
:CLOCK'S HERTZ RATE

2109

007256

007262

2113
2114
gng

007264
007266
007270

000000
000000
000000

TIMMIN: .WORD
TIMSEC: .WORD
TIMTCK: .WORD

O
O
O

:PLACE TO KEEP # OF TICKS/SEC

2117
2118
g}g

007272
007274
007276

000000
000000
000000

TIMER1: .WORD
TIMER2: .WORD
TIMERS: .WORD

O
0
O

:EVENT TIMER #1 (TICKS)
:EVENT TIMER #2 (TICKS)
*EVENT TIMER #3 (SECONDS)

2110

000000

H &
MACY11 30A(1052)
18-APR-80 09:24 PAGE 47
CLOCK TABLES, EVENT LOG AND POINTERS

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24

5 o

007300

010204

; EVENT I.OG TABLE AND ITS NEXT ENTRY POINTER

EVIPTR: .WORD

EVILOG:
EVTEND:

.BLKW
.BLKW

LSBTTL
MODS:

Svnoc
1.

;POINTER TO NEXT FREE SPACE IN EVENT LOG

:EVENT LOG BUFFER
:APPROXIMATE END OF EVENT TABLE (ALLOWS CIRCULAR QUE)

MODEM DATA SECTION
.WORD

sMODEM STATUS

HNO

b
) b

;TABLE OF MODEM SIGNAL BIT DEFINITIONS

NNo
sy
WN-‘O% BLHERRUKZEIRY 3]

126

007302
000341
000001

MOBiTS:

——

.WORD
.WORD
WORD
WORD
.WORD
.WORD
LMWORD

(TS
DSR
DCD
RTS
RI
SQD
TM

;CLEAR TO SEND (CIRCUIT (B)
sDATA SET READY (CIRCUIT CC)
sDATA CARRIER DETECT (CIRCUIT CF)
sREQUEST TO SEND (CIRCUIT CA)
sRING INDICATOR (CIRCUIT CE)
sSIGNAL QUALITY DETECT (CIRCUIT CG)
sMODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM)

;TABLE OF ADDRESSES OF MODEM SIGNAL MESSAGE POSITIONS
MOMSGS:

.WORD
.WORD

.WORD
.WORD
WORD
.WORD
.WORD

EVMCTS
EVMDSR

sCLEAR TO SEND (CIRCUIT (B)
sDATA SET READY (CIRCUIT CC)

EVMDCD
EVMRTS
EVMRI
EVMSQD
EVMTM

:DATA CARRIER DETECT (CIRCUIT CF)
sREQUEST TO SEND (CIRCUIT CA)
sRING INDICATOR (CIRCUIT CE)
sSIGNAL QUALITY DETECT (CIRCUIT CG)
sMODEM IN TEST MODE (RS 449 ONLY CIRCUIT TMM)

FANANIITEAERRAR
LB L IRRR

Ne LDl L = =D
—_
D e hY
D ) md D e b d =D

:TABLE OF ADDRESSES OF EVENT DESCRIPTION MESSAGES
:
ORDER CORRESPONDS TO MESSAGE TYPE VALUES
EVILST:

.WORD
.WORD
.WORD
.WORD
.WORD

.WORD
.WORD

EDTXQ
EDTXC
EDRXQ
EDRXC
EDDER
EDDVI
EDDCK

;TRANSMIT MESSAGE QUEUED
;TRANSMIT OF MESSAGE COMPLETE
;RECEIVE MESSAGE SPACE QUEUED
;MESSAGE RECEIVED - RECEIVE COMPLETE
;DEVICE INFORMATION
:DEVICE INITIALIZE STARTED
;DATA COMPARISON DONE

.WORD

LPO

sNULL STRING

.WORD

EDEOP

;END OF PASS

.WORD
.WORD

EDDLE
EDDDE

:DATA COMPARE LENGTH ERROR
;DATA COMPARE DATA ERROR

;LOCATIONS USED DURING EVENT REPORTING
EVISEC: .WORD
EVTMIN: .WORD
EVITCK: .WORD
EVTIADD: .WORD
EVIBCT: .WORD
EVITMP:

.WORD

0
O
O
O
0

: TEMPORARY LOCS TO KEEP EVENT TIME WHILE REPORTING
;TEMP. LOC. TO HOLD ADDRESS DURING EVENT REPORTING
3
e
' BYTE COUNT
**
»
3
‘" OTHER DATA
**
-~
-

;REPORT CODING DISPATCH TABLE

SEQ 0046

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1

2177
2178

010306
010310

18-APR-80 09:24

02170
02170

179
180
181
518
1

010312
010314
010316
010
010322

02170
02170
021754
022050
0 Zg“

%185

0103%8

022244

2189
2190
2191
2192
g}gz

010334
010336
010340
010342

000000
000000
000000
000000

2184

186
g}g

010326

0103
010332

MACY11 30A(1052) ‘ILAPR-BO 09:24 PAGE 48
MODEM DATA SECTION

RPTDSP: .WORD
.WORD

021

RPTTXQ
RPTTXQ
RPTDER
RPTDVI
RPTDCK

;RECEIVER QUEUED ENTRY DECODING
:RECEIVER COMPLETE ENTRY DECODING
:DEVICE ERROR ENTRY DECODING
DEVICE INIT ENTRY DECODING
:DATA COMPARISON ENTRY DECODING

.WORD

RPTDLE

:DATA COMPARISON LENGH ERROR

.WORD
.WORD
.WORD
.WORD

0
O
0
O

.WORD
.WORD
DEVIi:
DEV2:
DEV3:
DEV4:

;TRANSMIT QUEUED ENTRY DECODING
;TRANSMIT COMPLETE ENTRY DECODING

.WORD
.WORD
.WORD
.WORD
.WORD

.WORD

022170
022114

RPTTXQ
RPTTXQ

RPT

RPTDDE
RPTEOP

:PLACE HOLDER

:DATA COMPARISON DATA ERROR
:END OF PASS

;TEMP LOCS TO HOLD DATA FOR EVENT REPORTING
;
AND SHOW MODE,... SUBROUTINE

SEQ 0047

MACY11 30A(1052) 1%-APR-80 09:24 PAGE 49

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PTT
18-APR-80 09:24

2195
2

COMMAND LINE ACTION TREE

.SBTTL

COMMAND LINE ACTION TREE

SWLE CLI TREE NODE
! ACTION
!

(ALWAYS AT LEAST 1 WORD)

! CHAR CODE !

MISS DISPLACEMENT

ONLY IF "MISS'* ARGUMENT DEF INED

! NEXT NODE DISPLMNT

ONLY IF "ASCII'* ARGUMENT DEF INED

; ASCIZ MATCH STRING
(.EVEN)

ONLY IF "'ASCII'* ARGUMENT DEF INED

CLITRE:
;FIRST KEYWORD

CLI

N10$:

CLI

N42S :

CcLl

CLI

N63S:

CLI

N4SS:

CLI
CLI
CLI

N46S:

N4OS :
N20S:

N25$:
N30S$:

CLI

CLl

CLI

CLI
CLI

CLI

CLISPA,0.N10$
<*2>,HLP.N42$

;SKIP ANY LEADIN SPACES
:1S THE FIRST NON-SP CHAR A *7"*

CLIEXI,O
CLISTR.HLP,N43S,<"HELP'>
CLIEXI.O
CLISTR.PRNT ,N45S,<*PRINT'>
CLIEXI.O
cusm RUN,N46S, <"RUN'>

:ELSE, IS FIRST WORD A ‘PRINT'’
:
1F YES DO "PRINT'* AND EXIT
:ELSE, IS FIRST WORD A 'RUN'

cLIBR,0.N508°
CLISTR,CLEAR,N20S,<*CLEAR">

: IF YES GOTO N8OS
:ELSE, IS FIRST WORD A ‘TLEARTM’

8R,0,N808

cusréNOTNUF ,N40S, <*DUMP*>

CLIBR,NOTNUF .N100$
<'S>,NOTNUF ,N30$
CLISTR, SHOW N25$, <"HOW'>
cLIBR,0,N1008

CLISTA BNN3OS, <'ET">
CLIERR, 6

CLIBR, 0, N1

:
IF YES DO ‘HLP'® AND EXIT
:ELSE, IS FIRST WORD A “MELP'*
:
IF YES DO ‘HLP AND EXIT

: IF YES DO ‘RUN"' & GOTO N8OS
:ELSE,
IS FIRST WORD A ‘'DUMW'"

IF YES DO ‘TLR'' & GOTO N100S
*ELSE, IS FIRST CHAR. A 'S’
: IF YES IS REST OF WORD ‘MHOW'"
s
IF YES, DO '‘SHOW'.
N100S
BR

: ELSE. IS'REST OF WORD “ET
__IF YES,
DO
BR N110$
:OTHERWISE “ILL ‘SET'’,
CMD'* = EXIT
:

;SECOND KEYWORD (MODE=) FOR RUN COMMAND
N80S:
N81S:

N82S:

N83S:
N84S:

N85S$:
N86S:

010740

CLI
CLI
CLI

CLI
CLI

CLI

CLI
CLl

CLI

CLl
CLI

CLISPA,0,N308

:SKIP LEADING SPS. IF NONE-ERR

cusm NOTNUF ,N308, <"MODE *>

*1IS NEXT WORD ‘MODE='

CLIBR, 0.1
CLISTR RE
cnuo (N84S, <"RECEIVE'>
CLIBR,0,N1
CLISTR usnuo
[
NBSS,<'LISTEN'>
cLIBR, 6,M1

: _IF_YES, DO ‘PASSVE',BR N115%
:IS NEXT WORD ‘RECEIVE”
: _IF_YES, DO *RECVE'',BR N1158
1S NEXT uuao ‘LISTEN
IF YES usrew',mN1158

0.N30$

. unonsmcs-em-em
cusfn AT nazs <C'ACTIVE'> :IS
NEXT m “ACTIVE'’
CLIBR 0,81
: _IF YES, DO ‘ACTIVE'',BR N115%
STR fim NB3S,<'PASSIVE'> 1S NEXT GORD *PASSIVE"

CLISTR &u?oN86S, <'oow.ufl.oab'>
:is
NE
3 YES,CHAR
oo Augfi.L*BR'mis

CLIBR6

:1 'cxr
cusfn
rm
NB7S,<"RANSMIT'>
RANSMIT**
cL18Rr,0.N1158"
IF YES, DO "TW .BR N115%
IS REST OF WORD

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1
18-APR-80 09: 2%

010744
010756

MACY11 30A(1052)

18-APR-80

COMMAND LINE ACTION TREE

N878:

(LI

cLl

09:2

PAGE 50

CLISTR, TALMOD ,N308 ,<"ALK'>

sSECOND KEYWORD (FOR CLEAR_OR SHOW)

N100S:

N102$:
N104S:

CLI
CLI

CLI

CLI
CLI

: IS _REST OF m "ALK'*
.- IF YES,
‘TALK'',BR N115%
: IF NO, sm EXIT

CLIBR,0.N1158°

CLISPA,0,N308

‘SKIP LEADING SPACES, NONE=ERR

CLISTR. CSHEXP,N104$, <" EXPECTBUFF

;1S NEXT WORD ‘EXPE..."*

CLISTR,CSHTRN ,N30S, <* TRANSMI TBUFF *>
CLIEXI.O

IS NEXT WORD °‘‘TRANS..
IF YESEDO CLR.ER'I‘
EXIT

CLIEXI.O

s SECOND KEYWORD (FOR SET)

1108:
N111S:

N1128:

N‘IMS.

CLI

<'/>

N1168:

CLI
cLl

NESTRR

CLIALP,0.N51$

CLISPA.0.NS28
cLIocT, DMPS ,N308

<*=> NOTNUF ,N125$
CLIOCT,DMPE .N30$
<*/> ,NOTNUF .N125$
<'8>.pMPa, N30
cuaa 0.N1258

d e
—

—h
e b

CLI

CLI
(LI

CLI
CLI
CLI
cLl
cLl

N51S:
NS52S:

cLI

,NOTNUF ,N125$

)

22222222

b cmd emd w—d

CLISTR semn N30$, <* TRANSMI TMSG' >
CLIBR,0,N1

CLIBR,0.N1158

:N1138: CLI

cLl

CLISTR,CRC ,N30$,<"RC16">

011224
011242
011246
011262

N1178:

CLI

CLISTR,STATUS,N1188,<'STATUS'>

(=l=l=]

—

CLI
cLl

CLISPA,0,N308
CLISTROSSTEXP.NHR~<"EXPECTMSG'>
CLIBR

;GET ADDRESSES FOR DUMP COMMAND

NSOS:

)

e29222

CLI
CLI
cLl

CLIBR,0,N11

cLI

CLIBR,0.N1158

N130S:

CLI

CLISTR,0,.N1318,<"PASS*>

N131$:

CLI

011326

N120S:

KEE

cLI

2253

CLIBR,0.N1158

N118S: CLI

CLISTR écuo N130$,<"ECHO">

cLl

CLIBR,0,N1508

cLl

CLIBR,0.N

CLISTR.0, usos <'LOOP*>

;GET IESSAGE TYPE FOR SET MESSAGE COMMANDS

CLI

<'=>,0,N308

: IF YES DO CLR-EXP,EXIT

CZCLKA.P11
2307
2308

011332

2309 011346
2310 011352
2311 011370
2312
011374
2313
011410
2314 011414
2315 011430
2316 011434
2317 011450
2318 011454
2319 011470
2320 011474
%% 011510

2323
2326
2325

011514
011520

2326
2327

011524
011530

2329

011540

2328

011534

%33? 011544
2332
2333
233%
2335

N6OS:

N61S:
N628:

N63S:
N64S:
N6SS:
N66S:

N718:

N728:

N1228:

011612

2342

011622

2349

011636

N1418:

533?75 011754
358
2359

2360

011760

011764

53325 011770

CLIALN,O.N73$

CLIBR,0,N121$
CLISPA.O.N728

;ONLY A=Z,SP,TAB, OR 0-9 BETWEEN

CLI

CLIBR,0,N708

CLI
(LI
cLl

CLIALP,0,N123$
<*/> NOTNUF ,N1258
CLISTR,SIZE.N1228.<"SIZE*>

cLl

CLIBR,0,N126$

cLl

CLIBR,0,N1268

(LI

CLISTR,GCOPY ,N30$,
<’ COPY*>

CLIDEC .NUM_N30S

CLIBR,0.N121S

;GET MAINTENANCE LOOP TYPE FOR RUN ‘LO0OP'* QUIALIFIER

N140S:

011660
011664
011700
011704
011726
011732

(LI

cLl
CLI

011632

2350
2351
2352
2353
2354
2355

<'*>,0PRMSG,N30$
<'">.ENDQO N71$

cLl

2346

CLI
(LI

;NUMER FOR SIZE OR COPY

%332‘ 011626

2345

CLISTR,CMSGT ,N61S,<"ONES*>

cLIBR,0.N1216
CLISTR,CMSGO N62S,
<" ZEROES'>
cLIBR,0.N121
CLISTR,CMSG2 ,N638,<"1ALT*>
cLIBR,0.N1216
CLISTR, CMSG3 NG4S,
<" 0ALT'>
cLier,0,N1216
CLISTR,CMSGS ,N658,<' ITEP'>
cLIBR,0,.N121$
CLISTR,CMSG4 ,N66S,<*CCITT'>
cL18Rr,0,N121$
CLISTR,CMSG6 ,N67S,<'ALPHA'>
cLIBr,0.n121$

°"S

.
N73$:
(LI
CLIERR,BADCHR
:PRINT ERROR IF NONE LEGAL CHAR FOR '"S
;GET QUALIFIERS (SIZE OR COPY) FOR SET MESSAGE COMMANDS

011576

2338

CLI

Ll
CLI
Ll
CLI
Ll
CLI
Ll
CLI
Ll
CLI
cLl
CLI
Ll

SEQ 0050

__LOOK FOR QUOTED MESSAGE

N67$:
N70S:

N1218:
N1238:

011572

22340

COMMAND LINE ACTION TREE
LOOK FOR DEFAULT MESSAGE NAME

18-APR-80 09:24

011546
011552
011556

2336

2337

MACY11 30A(1052) 1%-APR-OO 09:24 PAGE 51

N1428:
N1438:
N144S:

CLI

<*=>,0,N308

CLISTR, TTLLOP.N142$,<* INTERNALTTL*>

cLl
CLI
cLl
(LI
cLl
CLI

CLIBR,0.N1158
CLISTR,CBLLOP,N143$,<'
CABLE ">
CLIBR,0,N1158
CLISTR,LMDLOP,N144$,
<* LOCALMODEM® >
cLIBr,0.N115$
CLISTR,RMDLOP
,N30$ ., <*REMOTEMODEM®>

CLI

<'=>,0,

cLIBR,0.N1158

cLl
CLIBR.0,.N115$
;GET LINE NUMBER FOR 'PASS’* RUN QUALIFIER

N1508:

CLI

CLIDEC .PASC ,N30$

S——

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.PTT
2363
2364
2365
%%?

011774

18-APR-80 09:24

MACY11 30A(1052)

L
18-APR-80

COMMAND LINE ACTION TREE

s END=OF
=L INE
N125%: CLI

CLIEXI.O

09:24

PAGE 52

SEQ 0051

COMMAND LINE ACTION TREE

sADDRESSES OF REGISTERS SELO THRU BSEL7

OO0

©Oo

sDEVICE DEPENDENT STORAGE LOCATIONS FOR
:
CURRENT DEVICE PARAMTERS

(elelela]

P 18-APR-80 08:24

MACY11 30A(1052) lg-APR-” 09:24 PAGE 53

5555 5§ 5§ 58 &8

2368
2369

COMM. LINK TEST

CZCLKA.P1

,DMC=11 DATA

CZCLrA0

s INPUT INTERRUPT VECTOR ADDRESS
sOUTPUT INTERRUPT VECTOR ADDRESS
: INTERRUPT PRIORITY
:DEVICE OPTION TYPE(0=DMC,5=DMR-DMC MODE

SEQ 0052

MACY11 30A(1052) 18-APR-80 09:264 PAGE 54

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24
GLOBAL TEXT SECTION

397

.SBTTL

2399

SEQ 0053

GLOBAL TEXT SECTION

s 44

: THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,
HE SAGES, AND ASCII INFORMATION THAT ARE USED IN
MORE THAN ONE TEST.

.SBTTL

DEVICE SUPPORTED

: NAMES OF DEVICES SUPPORTED BY PROGRAM
DEVTYP

046504
026503
012042

026122
030461

<DMR,DMC-11>

046504
000

.SBTTL

LSDVTYP::
.ASCIZ

/DMR,DMC-11/

PROGRAM IDENTIFICATION

; TEST DESCRIPTION
DESCRIPT

055103
020060
042040
020061
041440
046040
042524
012114

<CZCLKAO DMR, DMC-11 DATA COMM. LINK TEST>
LSDESC::
.ASCIZ

052123
.EVEN

.EVEN

/CZCLKAO DMR, DM

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST
CZCLKRA.P1T
18-APR-80 09:24

SRR

d
d

GL OBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

.SBTTL

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

CLISPM: LASCIZ
CLIERM: LASCIZ

/DCLT>/

CLINUF: LASCIZ

/ANXA? INCMPLTE CMD?/

022516
020115
044502

CLINBG:

.ASCIZ

/ANXA?NUM TOO BIG?/

022516
020104
037530

CLIBRX:

LASCIZ

/INXA?BAD RADIX?/

CLIBDL:

.ASCIZ

/ANZA?°LOOP'* VALID ONLY IN ACTIVE?/

CLINPS:

LASCIZ

/ANXA?"ECHO'* VALID ONLY IN PASSIVE?/

CLIBCR:

LASCIZ

/ANZA?ILL CHR=- ‘'A=Z,0-9,SP,TAB'* ONLY?/

CLISEO:

.ASCIZ

/AINXA?''SIZE=0"" NOT VALID?/

HLPO:

LASCIZ

/ANXATHIS IS DCLT.

HLPF :
HLP1:

.ASCIZ
LASCIZ

/INXT/

HLP2:

LASCII

/ CLEAR OR SHOW

052114
04

/AINZA?ILL CMD-BAD SYNTX?/

30A(1052) 1S-APR-80 09:24 PAGE 55

2437

(elelelelelelelelelele]

2435

MACY11

021102
037531

022516
055111
047040
046101

037501
05

TYPE W' OR **2'' FOR DETAILS/

/DCLT CMDS:/

EXPECTLIST OR TRANSMITLIST/<15><12>

CZCLFAO DMR ,DMC=11 DATA COMM, LINK TEST
CZCLKA.PI
18-APR=-80 09:24

MACY11 30A(1$S§)
GLOBAL FORMA

.ASCII

D 5
18-APR-80

09:24

PAGE 56

TATEMENTS, MESSAGES, AND ASCII INFO

/ PRINT/<15><12>
? DUMP START-END/B?

LASCIZ

HLPG:

.ASCIZ

HLP4A:

.ASCIZ

HLPS:

.ASCI12Z

HLP6:

LASCII

MTYP=TRAN,REC ,ACT ,PAS, TAL ,LIS,DOWN/<15><12>

LASCIZ

LTYP=INT,CAB,LOC
,REM/

HLP3:

SET EXPECTMSG OR TRANSMITMSG=TYPE/SIZE=N OR /COPY=N?

TYPE=ONES, ZEROES, 1ALT,0ALT,ITEP,CCITT ,ALPHA?

OR "OPR SPCD=A-Z,SP,TAB,0-9 IN QUOTES'"”

RUN MODE=MTYP/LOOP=LTYP/CHECK,STATUS ,ECKO,PASS=N?

b e
d o e
B

)

NN WNNWNN
NN W

&g N SRREIRR

046054
053517

051054

052114
052116
04 6054
046505

5
MACY11 30A(1052) 15—APR-80
09:26 PAGE 57

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1T

322;

013250

2349
2350
2551
2352
2553
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566
2567
2568

013251
013256
01
013272
013
013
013312
013314
013321
013
0133
01
013341
013
013354
01
013365
01
013375
013402

8-APR-80 09:24

000

2592
2593
2596
2595
2596
2597

013414
013416
013424
013425
0134
013440
013442
013447
013454
01
013457
01
01
013474
013477
013504
013505
013512
013520
013526
013534
013536
013544
013545
013547
013554
013555
013557

3 022516
043523
020072
042520 022475
027501 0445
022475 0315
13§ 051105
00012
047117 051505
061 046101
060460 052114
103 044503
000
111 042524
046101 044120
050117 020122
041505
000
122 041505
042526
000
126 040522
044515 000124
040520 051523
000105
041501 044524
000 .
106 053517
047111 046105
000104
040524 045514
116 051511
000116
000
057 047514
000075
047111 042524
046101
000
103 041101
000
1164 041517
047515 042504
042522 047515
047515 042504
047516
052123 052101
000
116
117
103 042510
000
116
117
105 044103

2600
2601
2602

013564
013572
013575

047045
037123
126

2569

2570
2571
2572
73
2576
2575
2576
2577
2578
2579
2580
2581
2582
2583
2584
2585
2587
2583
589
2590

5399

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

040445
000
045514

046501
054524
022524
042532
000
042517

SHMSG:

SHTYPO:

/ZEROES/

000
000124
000
052124

SHTYP1:
SHTYP2:
SHTYP3: LASCIZ
SHTYP4: LASCIZ

/ONES/
/1ALT/

/0ALT/
/CCITT/

000120
000101
050123

SHTYPS:
SHTYP6:
SHTYP?7:

/I1TEP/
/ALPHA/
/OPR SPEC/

044505

MOO:

051516

TMO1:

/TRANSMIT/

053111

TMo2:

/PASSIVE/

042526

MO3:

/ACTIVE/

046116
040517

MO4:

.ASCIZ

/DOWNL INELOAD/

000 MO5:
042524, MO6:

ASCIZ
LASCIZ

/TALK/
/LISTEN/

050117

LPO:
LPOO:

.ASCIZ
.ASCIZ

047122

LP1:

.ASCIZ

2INTERNAL?

042514

LP2:

.ASCIZ

2CABLE?

046101
000115
042524
000115

LP3:

.ASCIZ ?LOCALMODEM?

LP4:

.ASCIZ

?REMOTEMODEM?

051525

PNST:
PST:

LASCII
.ASCIZ

/NO/
/STATUS/

045503

PNCK:
PCK:

LASCI1
.ASCIZ

/NO/
/CHECK/

000117

PNEC:
PEC:

LASCII
.ASCIZ

/NO/
/ECHO/

044514

LISP:

LASCIZ

/INXALIS>/

000076

OPRMM:

LASCIZ

/TLK>/

LASCIZ

.ASCIZ

7?XINXAMSG: TYPE=XTXA/SIZE=%D3?

/RECEIVE/

2/L00P=?

F 5
MACY11 30A(1052) 18-APR-80 09:24 PAGE 58
GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

CZCLFAO W.Mg:‘l‘l DATAOSW. LINK TEST
CZCLKA.P1
18-APR-80
09:2¢

8%:0

013632

044126

032440
12

026511

051511

040440

027060
0

047440
0 20056

000072

047504

/THIS
A 50. OR 60. HZ. LSI=11:/

.EVEN

047045

040445

040502

3
3

115

054101

8%52

014033

105

4046

026440

014056

8‘207625

/%INXADOWN LINE LOAD COMPLETED SUCCESSFULLY/

NOCLK:

.ASCIZ

/INXABAD CLOCK = PROGRAM WILL HANG ON ‘‘TIMEOUT''!!/

TABEX:

.ASCIZ

/MAX. CHAR. MSG COUNT EXCEEDED =/

042506

BUFEX:

.ASCIZ

/BUFFER FULL =/

022516

022524

MSGTRN: .ASCIZ

/INXTXA MSG. NOT BUILT !!/

MSGTRU: .ASCIZ

/INXACHAR. COUNT EXCEEDS BUFF LIMIT - MSG TRUNCATED/

SHFO:

?INXSSXAMODE=XTXTXTXA/PASS=%75?

000

\V,]

047045

04288452

044103

014140

046511

043106
052111

046040
026440

052522

041516

052101

032523

045

000

wor

—

014200

060445
022475
022524

042105

014162

—b

046440

\l§

014154

0141

\V.1

027107

051515

(=]

—

000

063125

000131

045

.ASCIZ

013

DLLCM:

84‘%3

013704

81%;12(2’

047045

]

013640

VOV

.ASCIZ

: FORMAT STATEMENTS USED IN PRINT CALLS

014051

B &
228 (¥,]

L5060:

0§0056 051514

WN=O

ERRXXXXXXRg
2RRREERARRRRRRRE XX

2607

013608

013610
013616
o

26064
2605

2603

047515
022524
027501

052040

042504
022524
040520

.ASCIZ

SEQ 0057

&
MACY11 30A(1052) 1S-APR-80
09:26 PAGE 59

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1T

2659

18-APR-80 09:24

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

014214

051523
000

022475

032532

2663
2664
2665
2666
2667

014223
01
014236
0142644
014252

045

053512

SHF1:

.ASCIZ

?XNXSSXSSXSSXA/XTIA/XTIA/XT?

040445
027501
022457

022457

032523
03252
022524
060445

2669

014256

051445

022465
046101

052101
046440

EFM2:

.ASCIZ

/XSSYATOTAL MISMATCHES IN MSG = %05/

2675

0143351

065

04
022516

000
031523

PCPM:

_ASCIZ

/XNXS3XACALLED FROM PC=%06/

014222

8]'4353
2684
2685
2686
2687
2688
2689
222310

014410
014416
014424

000124

03223? 040445 EFM11: _ASCIZ /%S5XACOMPARE COUNT=XD5XS3XARECEIVE COUNT=XDS5/
042503
7503
0462045

053111
047125
5

020105
036524

;EVENT DESCRIPTION MESSAGES

2692
2693

014430
014436

051126
85211(1)

047101
066440

046523
043523

EDTXQ:

.ASCIZ

/TRANSMIT MSG QUEUED/

2696
2697

0144564
014462

000104
051126
815.,'?211.‘1,

047101
046440

046523
84‘2553

EDTXC:

.ASCIZ

/TRANSMIT MSG COMPLETED/

2699
2700

014476
014503

052105
122

042105
041505

EDRXQ:

.ASCIZ

/RECEIVE SPACE QUEUED/

014516

503

8058410-2

000
044505
040520
042525

014530

042522

042503

053111

EDRXC:

.ASCIZ

/RECEIVE MSG COMPLETED/

2708
2709

014556
014564

042504
042&»9

04
044526
051122

042503
051117

EDDER:

.ASCIZ

/DEVICE ERROR/

0145
014600

106
047503

052101
0501 1 5

020101
051101

EDDCK:

.ASCIZ

/DATA COMPARISON STARTED/

014606

014614

051511

040526

0471

0521 22

051440

042105

SEQ 0058

CZCLrAQ W.%%Aosm. LINK TEST
CZCLKA.PI
2715
?19
717

0
01

2718
2719

01
01

721
2722

014656
014664

%720

272

2728
2729
2730
2731
5;33%

014651

4672

014736
014741
014746
014754

000

106
020105

040440
052105
106
047
051511

051117
105
020106
000

053105
047111

041511
052111

84211?
0501 S
052101
8201 1;
7117

051440
000
020101
051101
046040

000122

052107

2739

014755

014762

040

.ASCIZ

/DATA COMPARISON LENGTH ERROR/

821440

EDDDE:

.ASCIZ

/DATA COMPARISON DATA ERROR/

000
042116
040520

047440
051523

EDEOP:

.ASCIZ

/END OF PASS/

s il ittt ittt

;EVENT REPORTING MESSAGES

051501

BASMIA: .ASCIZ

BASE TABLE/

040524

046102

022463

031517

BASM3:

.ASCIZ

/%53%03/

031523

047445

BASM2:

.ASCIZ

/%S3%06/

047445

000066

BASM1:

_ASCIZ

/INX06/

040445
053105
047514
042440

044126
047105
020107
050115

NULEVT: .ASCIZ

/INXATHE EVENT LOG IS EMPTY/

022516
042440
046040
052116
036074
036074
036074
036076
036074
036074
200
022516
022472
022472

037101
042526
043517
054522
036074
036074
036074
036074
036074
036074

EVTFO:

.ASCIZ

/INXA>>> EVENT LOG ENTRY <<<<<<CCCCCCLLLLLLLLLLLLLLLLLLLLLLLLL)

032504
031132
031132

EVTF1:

.ASCIZ

/INXDSZA:%Z2%A:%22%S3%T1/

2742
2743
2744
2745
%;2?

014772
015000
015001
015006
015010

051445
000
045
000066
047045

015016
015026
015032
015040
015046
015051
015056
01
0150
015100
015106
015114
0151 5(2)
0151
015136
015144
015147
015154
015162

047045
020105
020126
051511
054524
5
037076
052116

015170

041040

2222222

020105

000105

770

EDDLE:

;THESE TWO STORAGE AREAS MUST NOT BE SEPERATED '!'!!

014770

2751
27S§
2753
2754
2755
2756
2757
2758
2759
2760
2761
272%
27
2764
2765
2766
2767
2768
2769

/DEVICE INIT AND SETUP/

bt i i i it

5;2(1)

2748
%749
750

.ASCIZ

5%8

g%
2738

EDDVI:

020110

273‘

2737

'GQLACY‘H 30A(1052) 18-APR-80 09:24 PAGE 60
OBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

036074
036074
036074
036074
036074
036074
045
040445
040445

051445

02246

124

SEQ 0059

30A(1052) 1L~APR-80 09:24 PAGE 61

CZCLFAO DMR, 3 =11 DATA COMM. LINK TEST
CZCLKA.P1T
09:24

015176
015204

04704

051445
042104

822?63

043
033117
041101

MACY11
GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

EVTF2:

.ASCIZ

/INXS3XAADDR OF MSG=X06XS3XABYTE COUNT=%D5/

EVTF3:

.ASCIZ

/ANXS3XTAN/

SEQ 0060

033117
033117

EVTF3C: .ASCIZ

/%53%06%S3%06/

031523
031523
031523

047445
047445
052045

EVTF3D: .ASCIZ

/%S3%06%S3%06XS3XT/

022516
042101

031523
051104

EVTF4:

_ASCIZ

/INXS3XZAADDR OF MSG=3062S3XABYTE COUNT=XDSXS3XANO. OF CMP ERRS=%D5/

0201
022475

051105
032504

022516

031523

EVTF4A:

.ASCIZ

/ANXS3XAADDR OF MSG=206XS3XARX BYTES=ZD5XS3XACOMPARE BYTES=2D5/

EVTF4B:

.ASCIZ

/INXS3XAPASS=2D5XS3XAERRORS=XD5XS3XANOBUFF S=2D5/

1040

022475

031523

EVTF5A: .ASCIZ

/XSSXABYTE # IN MSG.=%D5XS3XAEXPTD=X03XS3XARECVD=%03/

SRRiR
LL L

04750

CZCLFAO DMR,DMC-11 DATA
CZCLRA.PT
18-APR-80

2827
2828
%gg
2831

283%
2835

%%9

015664
015672
015700
015706

015707
015716

01 S%
015
015736
015744
015752
015760
015766
015767
015774
016002
016004
016007
016010
016013
016014
016017
016020
016023
016024
016027

2859

016033

016030

2860
2861
2862
2863
2864
2865

016034
016037
01

2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877
2878
2879
2880
2881
2882

016045
016052
016056
016064
016067
016074

2866

051445
040510
052040

OBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

EVMOCG: «ASCIZ

/INXS9XACHANGED TO:/

AR A AN

ARAAA AR AN AR AN

AN A A AR AAAAAAAAAAAAAAANRRANANAAARAIAAAAARA
AN

:DO NOT SEPERATE THE NEXT LIST OF MESSAGES - MODEM SIGNAL HEADER AND REPORT

2838
2839
2840
2841
2842
2843
2844
2845
2846
2847
2848
2849
2850
2851
2852
2853
2854
2855
2856
2857

2858

7045
041501
042105

lGlLACYfl 30A(1052) 1‘-%00 09:24 PAGE 62

COMM. LINK TEST
09:24

016042

016100
016106
016111
016116
0161
0161
0161
016140
016144
016152

045
040445
020115
051525
020123
041504
020123
050523
000
045
051445
0460445
130
040

022516
047515

EVMOHD:

LASCIZ

/INXSBXAMODEM STATUS: CTS DSR DCD RTS RI

022516

EVMOST:

.ASCII

/INTSIXSIXSSIA/

040

EVMCTS:

.BYTE

'X,40,40,40

130

040

EVMDSR:

.BYTE

'X,40,40,40

130

040

EVMDCD:

.BYTE

'X,40,40,40

130
040
130
040

040

EVMRTS:

.BYTE

'X,40,40,40

040

EVMRI:

.BYTE

'X,40,40,40

130

040

EVMSQD:

.BYTE

'X,40,40,40

130

040

EVMTM:

_BYTE

'X,40,40,40

.BYTE
.EVEN

040

040
000

0521 g
0200
051504
020104
044522
020104
022471

016042
047045

oog

045
054124
051445
041 532
045
0541 2;

03152
000121
022463
goo
031523
000121

042115

%
03152
0001
022
gog
03152
000114
022463
000

05144
051 12;
043
046503
051445
0“512
043
046503
051445

Sap TTMM/

040445

;EXECUTION STATUS MESSAGES TO BE PRINTED TO KEEP OPERATOR AWAKE
ASCIZ /3IN/
sCR FOR LINES IN A ROW
STXQ:
/XS3ATXQ/
.ASCIZ
;ABOUT TO TRANSMIT

052101

STXC:

.ASCIZ

/%S3ZATXC/

:TX COMPLETED

040445

SRXQ:

.ASCIZ

/XS3XARXQ/

;ABOUT TO RECEIVE

042501

SDVE:

.ASCIZ

/XS3ZAERR/

;DEVICE ERROR

040445

SCM:

.ASCIZ

/XS3XACMP/

;ABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD

044501

sbvl:

.ASCIZ

/%S3XAIN1/

sDEVICE ABOUT TO BE INITIALIZED

0460445

SCML:

.ASCIZ

/XS3XACML/

:COMPARE LENGTH ERROR

041501

SCMD:

_ASCIZ

/%S3ZACMD/

:COMPARE DATA ERROR

CR:

SEQ 0061|

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24

2883
%gg;o

016155
016162

045
047505

031523
000120

040445

MACY11 30A(1052)
18-APR-80 09:24 PAGE 63
GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

SEOP:

.ASCIZ
Even

/%S3XAEOP/

;END

OF PASS

l
SEQ 0062 |

CZCLKA.P1T

:24

ADARAEERERAEREREEEEEEEREEL
EEE R EREE L

2887

2927

2928

29.

—

MACY11 30A(1052) 1h-APR-80 09:26 PAGE 64

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

;DEVICE ERROR MESSAGES

505
1

513

047440

020040

000040

047440

015

020012

020040

020062
044526

000040
042515

047440

015

020012

020040

01%

020062
044524

06%515

047440

016462

052520
042526

020124
051122

050125

015

020012

020040

051440

046105

71 }

2520

020126

042440
044524
052125

0501
043516
5

DVEM1:

.ASCII

/TIME OUT WAITING FOR RDI TC CLEAR/

LASCIZ

<155<12>/

_ASCII

/TIME OUT WAITING FOR RDI TO SET/

LASCIZ

<15><12>/

.ASCII

/TIME OUT WAITING FOR RUN TO SET/

LASCIZ

<15><12>/

.ASCII

/TIME OUT WAITING FOR OUTPUT INTERRUPT/

LASCIZ

<15><12>/

.ASCII

/INPUT INTERRUPT WHEN EXPECTING OUTPUT/

SELO

SEL2

g"z

042515

DVEMO:

016340

016377

016471

042523

04252323

29%

6512

012516

8%“52

2935

016
016554

047105
041505
047440

030114

DVEM3:

DVEM4:

020040
DVEMS:

29%
8}228
5%”5' 020012 020040
gfl 016570 042523 030114
016576
016604
016610

0
046111

051440
000040
042514

020040

SELO

ASCIZ <15><12>/ SELO
<15><12>

SEL2

DVEM6:

.ASCII

SEL2 /
L

046105

040507

/ILLEGAL OUTPUT INTERRUPT/

SEQ 0063

CZCLFAO DMR,DMC-11 DATAOSW. LINK TEST

2943
294

016616
016624

016646

24 fed

£ fies
01%;

02011
8221
1

10
2951 016672 04611

295%

2953
2956
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965
2966
2967
2968

2969
2970
2971
2972
2973
2976
2975
2976
2977
2978
2979
2980
2981
%

2984

016700

2987

051516

042101
04050;
05251
015
042523

7
041455
12
02001
031114
51

016752
016760
016766
016774
017002
017010
017014
017022
017030
0O
017041
017046
017054
017062
017070
017076
017103
017110
017116
017124
017130
017136
017146
0171 ;;

054124
020106
042514
047101
052517
020105
005015
046105
020040
020040
122
043106
046120

1
047503
042524
0201
042114
054122

017172

047510
502
015
042523
042040
044514
040517
051117

020040

042523

020130
041440
052105
042116
046125
052040
020012
032114
051440
000040
053517
042516
020104
042524

052040

29892”8

017200

043125

000040

2990

017204

05115(5)

041517

2N
%
29%

2995

0172}5
017220
01 %
0

0 ;%‘0
0 45
01
017256

.ASCIZ

<15><12>/

LASCII

/CON«ROL OUT INSTEAD OF BA-CC OUT/

.ASCIZ

<15><12>/

-ASCII

/TX BUFF COMPLETED AND SHOULD BE RX/

.ASCIZ

<15><12>/

-ASCII

/RX BUFF COMPLETED AND SHOULD BE TX/

-ASCIZ

<15><12>/

.ASCII

/ DOWN LINE LOAD ABORTED/

-ASCIZ

<15><12>/

042105

.ASCIZ

/PROCEDURE ERROR/

/NON EXIST MEM/

%
7117
05112
440 052125

016706
016714
016722
016
016
016740
016746

L ]
MACY11 30A(1052)
18-APR-80 09:24 PAGE 65
GL OBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

SEL6

042524

0201
020103
020040
046105
125
050115
104
044123
041040

DVEMS:

051440
02004
033114

052502
04651
042105
051
020104
1
020040
0
046105

DVEM9:

020116

DLLAB:

041101
1

SEL2

SEL4

RXBUF

041130

0511
047522
047516
051511

020105
000122
020116
020126

051105
054105
042515

ASCIZ

2106
052123
042522

046503
051101
000103

020120
020124

DDCSRM: .ASCIZ

wl 15

SEL2

/DDCMP START REC/

SEL6

TXBUF /

SEQ 0064

——

CZCLFAO DMR,DMC-11 MTAOSW. LINK TEST
C ZCLKA PN
1
:26

CZCLFAO DMR,DMC-11 DATAOSW. LINK TEST

0471065

DISCOM: .ASCIZ

/DISCONNECT/

517

020126

LOSDAM: .ASCIZ

/LOST DATA/

501
511

052116
000
020105

TIMOM:

/TIME OUT/

040526

041440

DATCKM: .ASCIZ

09:24

PAGE 66

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

SEQ 0065

104 041504 050%2 DDCMRM: .ASCIZ /DDCMP MAINT REC/
040504

017354

0455

000

.ASCIZ

/DATA CHECK/

.EVEN

SEogedpstEse

532

22
50§

-0

09:26

01730
017340

18-APR-80

CZCLKA.P11

MACY11 30A(1052)

6
MACY11 30A(1052) 13-APR-80
09:26 PAGE 67

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.PI

18-APR-80 09:24

3013

3014

;THIS SECTION IS USED BY A M9301-YJ BOOT ROM FOR DOING DOWN=LINE=LOAD 2?27?27

gg;g

?617
30}3

3020

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

;MUST BE IN THE AREA OF ‘017370 + 256. BYTES'' + A FEW

017370

017370
000400

020000

BASE:

.=17370

.BLKB

.=20000

256.

;BASE TABLE ADDRESS

ste

6
MACY11 30A(1052) 1S-APR-80
09:26 PAGE 68

CZCLFAO DMR, 1 -1 DAIAOS%. LINK TEST

CZCLKA.P1Y

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

525 z

116

g 3

RUNSBM: .ASCIZ

/RUN SET ILLEAGLLY/

1
}g

114

13
1

RXIDM:

.ASCIZ

/RX IDLE/

4
51
}%“

4514

CDGLM:

.ASCIZ

/CD GLITCHED/

CTSFM:

_ASCIZ

/CTS FALILED/

052117
046120

TXNC:

.ASCIZ

/TX NOT COMPLETE/

052117

RXNC:

.ASCIZ

/RX NOT COMPLETE/

042522
020122
0304

RXM1:

_ASCIZ

/SEC REQ ERR WORD 1/

051040

RxM2:

.ASCIZ

/SEC REQ ERR WORD 2/

524
5 }"3.

54124
1440

052105
054122

041

317
000105
047040
046517

052105
042523
020121
047(5)5(7)

000105
020103
051105
042122

123

041505

1
0?

046120

.EVEN

CZCLFAQO DMR,DMC-11 DATA

Faeae

CZCLKA.P1T

Gfi LINK TEST

3057

MACY11 30A(1052)

6
18-APR-80

GLOBAL ERROR REPORT SECTION
.SBTTL

09:24

PAGE 69

SEQ 0068

GLOBAL ERROR REPORT SECTION

: THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS

: USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION.

PRINTB

: (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES.

305“9!

3060
3061
3062
3063
3064
3065

020170
020170

3067
3068
3069
3070

020170
020172
020176
020200

3066 020170

BGNMSG
005
153716
005046
153716

ERR1

PRINTB #EVTFSA,OF SET,<B,GOOD>,<B,BAD> moxvxouAL DATA cavme ERROR
CLR
BISB
CLR
BISB

007211
007210

-(SP)
BAD, (SP)
-(SP)
GOOD, (SP)

3071
so%
3073
3074

020204
020210
020214
020220

013746
012746
012746
010600

007170
015600
000004

MOV
MOV
MOV
MOV

3076

020226

062706

000012

ADD

#2,5P

020230
020230

104423

TRAP

(CSMSG

3078
3079

020222

020230

303’1 020232
3082
3083

3084
3085
3086
3087

3088

3089

020232
020232

104414

013746
012746
012746
010600

007202
014256
000002

020252

062706

000006

104414

3090
3091
3383.%

020256
020256
020256

3096
3095
3096

020260
020260
020260

gwo

020272

012746

020300
020302

104414
062706

3097
3098
3099
101

3102
3103

3106
3105
g}gg

020260
020264
020266

020276

020306
020306
020306

ENDMSG

L10001:

BGNMSG ERR2

020232
020236
020242
020246

020250

TRAP

PRINTB

#EFM2, TEMPS

010600

104423

007200

MOV
MOV
MOV
MOV

TEMP4 ,~(SP)
FEFM2.~(SP)
#2,-(SP)
SP.RO

ADD

#6,SP

TRAP

CSMSG

MOV
MOV
MOV

TEMP3, - (SP)
R&,~(SP)
:gnm
,=(SP)

BGNMSG

ERR10

PRINTB

#EFM11,R4,TEMP3

ERR10::

014353

000003

MOV
MOV

000010

ENDMSG

CSPNTB

L10002:

104423

013746
010446
012746

CSPNTB

ERR2::
;TOTAL DATA COMPARE FAILS ERROR

TRAP

ENDMSG

OFSET,~(SP)
#EVTFSA, = (SP)
#4,~(SP)
SPRO

L10003:

TRAP
ADD

csmts
#10,SP

TRAP

CSMSG

OBAL ERROR REPORT SECTION

ENDMSG

007202
007200
015262
000003
000010

007214
014321
000002

L10004:

BGNMSG

ERR9

PRINTB

#EVTF3C,TEMP3,TEMP4

PRINTB

#PCPM,PCADD

ENDMSG

L10005:

BGNMSG

ERR13

PRINTB

#EVTF3C,TEMP3,TEMPS

ENDMSG

CONOTM, =(SP)
TEMP4
, = (SP)

§ 833332 8333383

#PCPM,PCADD

: 53233 g3aded

#EVTF3D,TEMP3, TEMP4, CONOTM

TEMP3 = (SP)

#EVTFSD, = (SP)

#6,-(SP)
SP.RO
CSPNTB
n2,sp

PCADD ,=(SP)
#PCPM,~(SP)
#2,-(SP)

TEMP4 ,~(SP)
TEMP3 .- (SP)

#EVTFSC.~(SP)

#3,-(SP)
’

CSPNTB
#10,SP
PCADD ,~(SP)

#PCPM,~(SP)

#2,-(SP)

SP,RO
CSPNTB
#6,SP

CSMSG

ERR13::

L10006:

TEMP4 ,~(SP)

g 533332

PRINTB

#0,SP

ERRS

&»H

BGNMSG

SEQ 0069

—————

6
MACY11 30A(1052) 15-APR-80
09:264 PAGE 70

PRINTB

e D O D

8-..0-....-.-.-._.—.—:8
VONOWVSWN—=O
8

CZCLFAO DMR,DMC-11 DATA COMM. LINK TESTGL

CSMSG

TEMP3 -(SP)

VTFSC,~(SP)

:%.-(spi
CSPNTB

SenR——

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11 ~ 18-APR-80 09:24
164

165
3166

3167

020
020
020

3176

020530

3168
3169
3170
3171
31;;
3173

020
020506
020512
020516
020522
020526

013746
013746
013746
012746
012746
01

007
007202
007200
015277

020536

3177
g};g

020536
020536

104423

3180

020540
020540
020542

000167
177772

3181
g}g%
3184

18-APR-80

GLOBAL ERROR REPORT SECTION

09:24

BGNMSG

ERR14

PRINTB

W#EVTF3D,TEMP3,
TEMP4, CONOTM

PAGE 71

SEQ 0070
ERR14::

104414

175 020532 062706 000012
176

MACY11 30A(1052)

MoV
MOV
MOV
MOV
MOV
MOV

CONOTM, = (SP)
TEMP4 ,~(SP)
TEMP3. - (SP)
FEVTFSD,=(SP)
#4,-(SP)
SP.RO

ADD

#12,5P

TRAP

(CSMSG

LWORD
"WORD

JSUWP
L10007-2-.

TRAP

ENDMSG

EXIT

L10007:
MSG

CSPNTB

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.PTT

18-APR-80 09:24

MACY11 30A(1052) 1g~APR-80 09:24 PAGE 72

GLOBAL SUBROUTINES SECTION

g}gg

.SBTTL

%188
3}33

; THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES

187

SEQ 0071

GLOBAL SUBROUTINES SECTION

; THAT ARE USED IN MORE THAN ONE TEST.

3191
319;

g}g‘

.SBTTL

3195

3®

3197

3196

CLOCK SETUP SUBROUT INE

; FUNCTIONAL DESCRIPTION:

THIS SUBROUTINE SETS UP THE CLOCK INFORMATION TASBLE FOLLOWING A

*‘CLOCK

3198
3199

:
:

3202
3203

: INPUTS:
:
R1= POINTS TO SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED

3206
33228;

3209
3210
3211
3212
3213

: OUTPUTS:
:
"'CLKCSR'* GETS LOADED WITH THE CLOCK'S CSR ADDRESS
:
"'CLKBR'® GETS LOADED WITH THE CLOCK'S INTERRUPT LEVEL
3
‘CLKVEC'* GETS LOADED WITH THE CLOCK'S INTERRUPT VECTOR
:
*'CLKHZ"* GETS LOADED WITH THE LINE FREQ. (HERTZ RATE) WHICH DETERMINES

3216

; CALLING SEQUENCE:

32032001

32032045

3219

020544

3221
3222
3223
3224
3225
3226
3227

020544
020546
020550
020552
020554
020556
020560

3229
3351359

020
020566

3228

LINE OR P-CLOCK IS FOUND.

R2= POINTS TO

THE SUPERVISOR

333};

3220

VALL EXECUTED IN THE INITIALIZATION CODE. BUT SINCE THE '‘CLOCK'* CALL
SAYS NOTHING ABOUT AN LSI=11'S CLOCK, THIS ROUTINE IS ONLY USED IF A

: IMPLICIT INPUTS:

335}'5

012122
012112
006312
006312
006312
006312
32

012122

012122
7

CLKSET:

‘‘CLK'' TABLE WHERE CLOCK INFO WILL BE KEPT

SPACE WHERE CLOCK INFO WAS RETURNED BY THE

'‘CLOCK'® CALL

THE NUMBER OF TICKS IN A SECOND

JSR

PC,CLKSET

sCALL CLOCK SETUP WITH R1 & R2 SETUP

'
MOV
MOV
ASL
ASL
ASL
ASL
ASL

MOV

MOV
RTS

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

(R1)+,(R2)+

(R1)+,(R2)+
PC

;LOAD CLOCK'S CSR ADDR. INTO ‘‘CLKCSR'’
;LOAD CLOCK'S INT. LEVEL INTO ‘‘CLKBR''
;ADJUST THE INT. LEVEL FOR LOADING INTO
:
THE PSW WITH A "SETVEC'* CALL

:LOAD CLOCK'S INT. VECTOR INTO '‘CLKVEC''
;LOAD CLOCK'S HERTZ RATE INTO

‘‘CLKHZ""

H 6
MACY11 30A(1052)
18-APR-80
CLOCK SETUP SUBROUTINE

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

3232
3233
3234
3235
3236
3237
3238
3239
3240
3241
324
324
2264

3245
3246
3247
3248
3249
3250
3251
3252
3253
3254
3255
3256
3257
3258
3259
3260
3261
3262
3263

.SBTTL

THIS 1S THE CLOCK INTERRUPT SERVICE ROUTINE WHICH TAKES CARE OF
KEEPING THE '‘TIME-SINCE-START'' AND COUNTING DOWN ANY OF THE

"EVENT''

TIMTCK: THE CURRENT NO. OF TICKS LEFT TO BE COUNTED UNTIL A SECOND
HAS BEEN COUNTED OFF

CLKHZ:
THE NO. OF TICKS IN A SECOND, DETERMINED BY THE SYS. LINE FREQ.
TIMMIN € TIMSEC: CURRENT VALUE OF 'TIME-SINCE-START'’
IN MINUTES € SECONDS
v
TIMER 1,2, € S: CURRENT VALUES OF THE 'EVENT TIMERS
IMPLICIT OUTPUTS:
NEW VALUE OF EVENT TIMER '*1'* DECREMENTED BY 1 TICK IF IT WAS NON-ZERO
NEW VALUE OF EVENT TIMER '2'' DECREMENTED BY 1 TICK IF IT WAS NON-ZERO
NEW VALUE OF EVENT TIMER 'S’ DECREMENTED BY 1 SECOND IF IT WAS NON-ZERO
FUNCTIONAL SIDE EFFECTS:
THE CLOCK IS DISABLED UPON ENTRY AND REENABLED WHEN LEAVING

CALLING SEQUENCE :
THIS ROUTINE IS CALLED WHEN THE CLOCK INTERRUPTS THRU ‘‘CLKVEC''.
THE ADDRESS OF THIS ROUTINE WAS LOADED INTO THE CLOCK'S INTERRUPT
VECTOR WITH A SUPERVISOR ‘‘SETVEC'' CALL.

005077
005337
001015

166456
007270

3271
3272
3273

020610

005237

007266

020614
020622

g;g

3285
3286
3287

DEVICE

IMPLICIT INPUTS:

020570
020574
0

3283
3284

TIMERS. THE TIMERS ARE USED TO TIME COMPLETION OF

REQUESTS. THE ‘‘TIME~SINCE-START'® IS USED TO BE LOGGED WITH EACH ENTRY
INTO THE EVENT LOG.

3267
3268
3269

3277
3278
3279
3280
3281
3282

SEQ 0072

* FUNCTIONAL DESCRIPTION:

020570
020570

3274

PAGE 73

CLOCK INTERRUPT SERVICE ROUTINE

(44

3265

3270

09:24

BGNSRV

CLKINT::

013737

022737
001004

020666
020674
020676

007260

007270

000074

007266

007264

005737
00140
005337
005737
00140
005337

007272

18:

007272
007274

2$:

005737
1406

023737
1002
005337

007266

007274

007276
007260
007276

CLR

@CLKCSR

BNE
MOV
INC
TMP
BNE
INC
CLR

1$
CLKHZ,TIMTCK
TIMSEC

DEC

005237
5037

020634
020640
020642
020646
020652
020654

CLKINT

3s:
007270

BEQ
DEC
ST

BEQ
DEC
ST
BEQ

cMP

BNE
DEC

:DISABLE THE CLOCK FORM INTERRUPTING

TIMTCK

*DECREMENT THE # OF TICKS/SEC.

#60. , TIMSEC

:SEE IF WE'VE COUNTED 60 SECS. YET

18
TIMMIN
TIMSEC

TIMER1

2
TIMER1
TIMER2
3s
TIMER2

:G0 CHECK TIMERS (182-TICKS, 3-SECONDS)
:RESET THE # OF TICKS/SEC.
:INC # OF SECS-SINCE-START
:IF NOT, GO CHECK TIMERS
: ELSE INC MINUTES-SINCE-START
: AND RESTART SECOND COUNTER
;SEE IF TIMER #1,

TIMING ANYTHING

: IF=0, NOTHING BEING TIMED CHECK NEXT TIMER
; ELSE DECREMENT THE TIMER VALUE (BY 1 TICK)
:SEE IF TIMER #2, TIMING ANYTHING
: IF=0, NOTHING BEING TIMED CHECK NEXT TIMER
: ELSE DECREMENT THE TIMER VALUE (BY 1 TICK)
:SEE IF TIMER #3, TIMING ANYTHING
F=0, NOTHING BEING TIMED, LEAVE
: IF=

43
TIMERS

: BR IF NO
; ELSE DECREMENT THE TIMER VALUE (BY 1 SEC.)

TIMERS

CLKHZ,TIMTCK

:SEE IF A SECOND HAS BEEN COUNTED OFF

i
|

6
MACY11 30A(1052)
18-APR-80 09:24
CLOCK INTERRUPT SERVICE ROUTINE

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PI
18-APR-80 09:24

3288
3289
3290
3291

020702
020710
020710
020710

013777
000002

007262

166342

4S$:

MOV
ENDSRV

CLKEN,@CLKCSR

PAGE 74

SEQ 0073

;REENABLE THE CLOCK TO INTERRUPT
L10010:

RTI

?ogvfl 30A(1052) 1‘-APR-80 09:24 PAGE 75

CZCLFAO DMR .Mg:fl DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24

T LOG SUBROUTINE

.SBTTL

EVENT LOG SUBROUTINES

+
+

329

FLNCT]M DESCRIPTION:
THIS SUBROUT INE HAS A DIFFERENT ENTRY POINT

FOR EACH EVENT TO BE LOGGED AND ALWAYS PRINTS
THE SHORT ‘OPERATOR AWAKE'® MES
TO CONSOLE THEN LOGS THE

EVENT TYPE, TIME, AND THE OTHER 3 WORDS OF INFO PASSED TO THE
SUBROUTINE AT CALLING TIME
NPUTS:

TIMIN € TIMSEC:
CURRENT VALUE OF ‘‘TIME-SINCE-START''
TEMP2: m 01 OF EVENT LOG INFORMATION (FOR MOST EVENT TYPES)

TEMPS:
TEMPS:
MODS :

OUTPUTS:

3310
3311
3312
3313

‘DPERATOR AWAKE'® MESSAGE SENT TO THE CONSOLE

Lele
RNTo
NV, P

NEW EVENT LOGGED IN "EVTLOG'* (EVENT LOG)
UPDATED "EVTPTR'® (EVENT LOG ENTRY POINTER)
SUBORDINATE ROUTINES USED:

"DVMODS’* THE DEVICE SUBROUTINE THAT RETURNS MODEM STATUS IN ‘MODS'’
(FOR SOME EVENT TYPES)

FUNCTIONAL SIDE EFFECTS:

TEMP:

TEMPI:

3320
3321

SRR s £

USED TO STORE ADDRESS OF '‘OPERATOR AWAKE'' MESSAGE
USED TO SETUP THE VALUE OF THE ‘EVENT TYPE'' BYTE FOR LOGGING

CALLING SEQUENCE:

3323
3324

3327

3330
3331

OF EVENT LOG INFORMATION
m l OF EVENT LOG INFORMATION
CURRENT VALUE OF THE MODEM SIGNALS AVAILABLE FROM THE DEVICE

012737
012737
000510

016045
000000

007174
007172

016056
000002

007174
007172

016067
000004

007174
007172

J07172

LOGTXQ:

LOGTXC:

LOGRXQ:

LOGRXC:
LGDVE:

JSR

PC.LOGTXQ

JSR

PC.LOGCMP

MoV
MOV
BR

#STXQ, TEMP1
¥X0, TEMP
L26sT

;SET UP MSG. TO PRINT
:SET UP EVENT TYPE
;G0 LOG EVENT AND TIME

MoV
MOV
BR

#STXC, TEMPY
#TXC, TEMP
LOGST

;SET UP MSG. TO PRINT
sSET UP EVENT TYPE
;GO LOG EVENT AND TIME

MoV
MOV
B8R

#SRXQ, TEMP1
#RXQ, TEMP
LOGST

;SET UP MSG. TO PRINT
sSET UP EVENT TYPE
;GO LOG EVENT AND TIME

MOV
BR

#RXC, TEMP
L0GS1

sSET UP EVENT TYPE
;GO LOG EVENT AND TIME

sCALL THE LOG EVENT SUBROUTINE WITH TEMP,.TEMP1,
: TEMP2, TEMP3, AND TEMP4 SETUP

SEQ 0074

)
MACY11 30A(1052) 1 5-APR= 80
EVE NT LOG SUBROUTINES

016100 0071
g
g
000010 007172
50
74

3387

3393

EZ F3R3

e R

LOGDVI :

01612
00001
00

0072
007226

016111
000014
o

=000

P SERBRE SEKNKBNRRRRNNN
P &»

3385

d o

3381

= e

3376

299988 SSRSSRCSSSSR888S
8888
— cawd oed B
o e b

3374

—_ e ed D d b

3367

—

et
te
&SEETEEENE SEECE g gee 8954 3 SRISEEEREER
g gggm&mm

007174
007172

016133
000020

007174
007172

016144
000022

007174
007172

016155
000024

007174
007172

007144
034064

LOGCMP:

LOGCML :

LOGCMD :

LOGEOP:

LOGS1:

007144
021404
010206

007202

000006

007172

000001

007226

000010

007136

016042
000001

1%:

LOGS3:

09:24

PAGE 76

MoV
MOV
BR

#SDVE , TEMP1
#DER, TEMP
LOGSS

sSET UP MSG. TO PRINT
sSET UP EVENT TYPE
;G0 LOG EVENT AND TIME

MoV
MOV
MOVE
MOVB
MOV
MOV
B8R

#SDVI, TEMP1
#VI, TEMP
MODTYP, TEMP2
n.rvr.femin
RPASS
. TEMP
PARAM
. TEMP4
LOGS3

sSET UP EVNT ENTRIES
;GO LOG EVENT AND TIME

;SET UP MSG. TO PRINT
sSET UP EVENT TYPE

MoV
MOV
B8R

#SCML, TEMP1
#DLE, TEMP
LOGSS

sSET UP MSG. AND TYPE
;GO LOG EVENT AND TIME

nov

MOE
LR |

MOV
MOV
BR
MoV
JSR
MOV
cMP
BEQ
JMP
MOV

#SEOP, TEMP1
#EOP, TEMP
LOGSS
ERRCNT
, - (SP)
PC,DVMODS
(SP)+,Ré4
R4, ERRCNT
18
LOGEX
MODS
, TEMP4

#RXC , TEMP

BIT

#STATB, PARAM

#10,LNCNT

BEQ

L0GSS

LOGSS

;GO LOG MSG TYPE AND TIME

sSAVE CURRENT ERROR COUNT
;2 GO GET MODEM STATUS
sGET SAVED ERRCNT VALUE
\{.E!R? ANY ERRORS FOUND
F NONE
:
: ELSE, LEAVE WITHOUT _OGGING ANYTHING
;
_BUT THE DEVICE ERROR FROM °‘DVMODS'’

SAND PUT IT IN TEMP4
:IF RXC DONT PRINT

:IF NO STATUS SELECTED
;60 TO 5

CLR

LOGS4

LNCNT

sHAVE WE DONE 10?
:IF NOT GO TO 4
sESLE CLEAR IT

PRINTF

#CR

;ELSE PRINT (R

BNE

SEQ 0075

ELE

=11 DATAé%. LINK TEST
CZCLFAO DMR
S
CZCLRA.PTT

#CR,-(SP)

#1,-(SP)

SP.RO
CSPNTF

¥4 ,SP

6
EACYH 30A(1052) 1%—%00
09:24 PAGE 77

CZCLFAO DMR, 3 -1 DATAOs%. LINK TEST

CZCLKA.P11
%06

,;.32
7
10

021256

005237 007136

12%
1

13746
12746
10609

007174
000001

10441

021276

062706

000004

13
1%
%15
316
%17

021
8%1310
021314
021322
021330

13
n
01
1
11372;

007300
007172
007260 00717
007270 00717
007172

3619

021340

113723

007264

1§

318

021336

113723

VENT LOG SUBROUTINES

LOGS4:

021350

013723

LOGSS:

007266

3425

021376

010337

3430

021404

000207

3429 021402 012603

007300

TEMP1

LOGS2:
LOGEX:

R3,-(SP)

;INC COUNTER OF # OF AWAKE MSGS
JPRINT OPERATOR AWAKE MSG.

:LOG TIME SINCE START

TIMMIN.(R3)+

:TICKS,SECS
AND MINS.

TIMSEC, (R3)+

MOV

TEMP2, (R3)+

MOV
TMP
BLO

TEMPS . (R3) +
R3,#EVTEND
LOGS2

MoV
MOV

#-1,(R3)
#EVTLOG,R3

MOV

(SP)+.R3

MOV
RTS

;SAVE R3 ON THE STACK

EVIPTR,R3
TEMP, (R3)+
CLKHZ
, TEMP
TIMTCK, TEMP
TEMP, (R3)+

MOVB

MOV

322 021356 013723
007202
323 021360 020327 010204
326 021364 103404
3428

MoV

MOV
MOVB
MOV
SUB
MOVB
MOVB

7200

326 021366 012713 177777
3427 021372 012703 007302

LNCNT

MoV
MOV
MOV

TEMP1,=(SP)
”,-(5P)
SP.RO

ADD

#6,SP

TRAP

320 021344 013723 007176

3421

INC

PRINTF

TEMPS, (R3)+

R3,EVTPIR
PC

:LOG EVENT

*LOG EVNT ENTRY 3
;LOG EVNT ENTRY 4

*LOG EVNT ENTRY 5
:IF EVENT LOG FULL GO

*CONTINUE ;ELSE GO TO 2

:L0OG
A TABLE END
*PUT R3 TO START OF TABLE
JRESTORE POINTER

*RESTORE R3

CSPNTF

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
= 18-APR-80 09:24

3!.332
35

MACY11 30A(1052)
18-APR-80
DUMP EVENT LOG AND BASE
T

.SBTTL

:;9

021406

010

3439

021416

005037

3461

021420

104443

021410 010
33 831412 010446

3440 8%14.20

PAGE 78

SEQ 0077 |

DUMP EVENT LOG AND BASE TABLE

REPORT: MOV

MOV
MOV

007172

09 24

CLR

gg.-(sm

:SAVE R2,R3,R4 ON THE STACK

-(SP)
R&.=-(SP)

021432
021434
021434

005737

007172

351
3452
3453
3454
3455
356
%57

021442
021450
021456
021464
021470
021476
021502

012737
012737
012%
004
01370;
023727
001034

017370
017767
000001
022442
007300
007302

3459
360
%61

021
021510
021514

012746
012746
010600

015016
000001

021520

062706

000004

021530

162702

000012

3458

262

363

021504

021516

014755

104416

007146
007150
007152
177777

BASN1:

3466

3469 021536 020227 007302
%70 021540 001010
%71 021542 01270; 010204
y.;g’

'gmo

026227

177776

3473
021554 001007
fi%’ 021556 000137 022320
3476

021562

020237

%77 021566 001

007300

sszg 021570 000137

022320

021576

162702

000012

021600 012746
021604 012746
021610. 010600

015051
000001

021600
021612

104416

021622

112237

010276

7 8512.’23 ??52783

100008:

TEMP

BEQ

BASN1

MOV
MOV
MOV
JSR
MOV
P
BNE

#BASE
, STADD
MBASE+255.
, ENADD
#1,8YTBIT

PRINTS

CSGMAN

-WORD

ABASMIA

EVIPTR,R2
EVTLOG.#=1
0

#NULEVT

JWORD

RPT:

177777

:IF EMPTY TELL OPRERATOR.

MOV
MOV
MOV

MNULEVT
= (SP)
#,-(SP)
SP.RO

ADD

#6,SP

ENDEVT

:AND END

SUB

72.R2

*JUST PRINTED

(Ve
BNE
MOV

R2,#EVTLOG
RPT1
aevma nz

BNE
JMP

swevr

Poumns TO TOP OF EVNT LOG QUEUE?
: BRIF NO
*SET R2 TO POINT TO BOTTOM OF LOG
:1F END OF LOG IS NOT EMPTY
sCONTINUE.
. .ELSE EXIT

RPT1:

R2,EVIPTR

:ARE WE BACK TO POINTER?

(MP

BNE

SUB

”M2.R2

JMP

RPTO:

RPTAA:

-2(R2

ENDEVT

PRINTS #EVTFO

MOVB
MOVB

(R2)+.R3

(R2)+.EVTTCK

;GO DUMP BASE TABLE
*MAKE R2 A POINTER TO EVENT TABLE
*SEE IF EVENT TABLE IS EMPTY
*BR IF NO

JMP

100008
TEMP
TSCODE

:IF NO BASE PRINT GO TO 1

TRAP

3‘6366‘5 021526 000137 022320

3467

TRAP

B8R
.WORD
.WORD

S
346
347
3448

332453 021440 001413

TEMP

GMANIL #BASMIA,TEMP,1,YES

w 8%}422 00040%
424 oon;s
;4:24 0214% 0001
021430

CSPNTS

:NOW POINT BACK TO TOP OF ENTRY U

*IF NOT CONTINUE
<IF SO EXIT....

:POINT R2 TO START OF ENTRY

:PRINT EVENT ENTRY HEADER

PUT EVENT TYPE INTO R3

MOV
MOV
MOV

#EVTFO,~(SP)
1 .-(SP)
SP.RO

TRAP

CSPNTS

3498
499
3500
3501
3502
3503
3506
3505
3506
3507
3508
3509
3510
3511
3512
3513
3516
3515
3516
3517
3518
3519
3520
3521
3522
3523

021666
021670
021672
021676

010272
010274

MOVB
MOVB
PRINTS

(R2)+,EVTSEC
(R2)+
EVTMIN

SEQ 0078

sPUT EVENT TIME (TICKS,SECS.MINS IN TEMP LOC.S)

#EVTFT,EVIMIN,EVTSEC,EVTTCK,EVTLST(R3)

;PRINT EVENT TIME AND DESCRIPT.

£97 021%
g

RPTDER:

3525
3526
3527
3528

021754
021760
021764
021770
021770
021774
022000
022004
022006
022010
022014
022014

0220

535

338 §J

@RPTDSP(R3)

:DISPATCH TO DECODING SECTION FOR SPECIFIC TYPE

(R2) +,EVTADD
(RZ)*.EVTBCT
(R2)+,R3

sSTORE MESSAGE ADDRESS FOR PRINTING
SHRE BYTE COUNT FOR PRINTING
TORE MODEM STATUS FOR PRINTING
sPRINT ADDR,BYTE CNT

PC.RPTMSB
RPT

;GO PRINT MODEM STATUS
:GO BACK FOR NEXT EVENT ENTRY

(R2)+.EVITMP

;GET ADDRESS OF DEVICE INFO MESSAGE

#EVTF2,EVTADD, ev’rac

gggz.&eg

*STORE DEVICE REG CONTENTS FOR PRINTING

PRINTS

#EVIFS.EVITMP

:PRINT DEVICE REG CONTENTS.

PRINTS

#EVTF3C,DEV1,DEV2

022034
022036
022040
022044

RPTDVI:

{
s

JSR

£
S

5333332t §

2332 3

RPTTXQ:

K, =(SP)

TRAP

021702
021706
021712
021714
021714
021720
021726
021730
021734
021736
021740
021744
021750

3526

EVILST(R3) ,~(SP)

RPT

:GO BACK FOR NEXT EVENT ENTRY

DEV1

DEV2
g

;:.gee\n

(R2)+.DEV
(R2)
+ .DEV&

R2,=(5P)
PC . SHWOP

MoV
MOV
MOV
MOV
TRAP
ADD

EVITMP,~(SP)
#EVTF3.-(SP)
#2,-(SP)
SP.RO
CSPNTS
#6,SP

MoV
MOV

DEV2.~(SP)
DEV1 .~(SP)

MOV
MOV
MOV
TRAP
ADD

VTF3C,=(SP)
.~(SP)
SP.RO
CSANTS
#0,SP

:CLEAR UPPER BYTES OF DEV1 & DEV2 BEFORE USE

*STORE SETUP OPERATION PARAMETERS FOR PRINTING

;SAVE R2 ON THE STACK

:GO PRINT MODE, MAINT-LOOP TYPE, PARAMTERS.
e

g
i
g

DUMP EVENT LOG AND BASE
T

CELLED

2
3
8

MACY11 30A(1052) 1=-APR-N 09 24 PAGE 79

§33333338

CLFAD DMR ,DMC=11 DATAosan. LINK TEST
18-APR-80
09:24

C CLKA.P11

8 .z
MACY11 30A(1052)
_18-APR-80 09:24
DUMP EVENT LOG AND BASE TABLE

CZCLFAQ W.WS:‘H DATAosazfl‘. LINK TEST
d

§?§§§§ s
1

21530

12237

010304

MOV
JMP
RPTEOP: MOV
MOV
MOV

PRINTS

(SP)+,R2
RPT
(R2)+,EVTADD
(R2)+,EVIBCT
(R2)+,EVITMP

PAGE 80

WEVTF4B,EVTADD,EVTBCT.EVITMP

:PRINT ADDR.RXBYTES.CMPBYTES.

b cd o
—

SEQ 0079

;RESTORE R2
;GO BACK FOR NEXT EVENT ENTRY

b e

D e

d d

S3%
SRS PNS

VIU!U!U!U!U'&U!U!U!

g 3 & FURUR2E58 &

WNWWW NN NN NN N NN
W W WWWWW

545

88RO
3 FREREREERIRSR

CZCLKA.P1T

MOV
MoV
MOV
MOV
MOV
MOV

EVITMP,=(SP)
EVTBCT.=(SP)
EVTADD . =(SP)
FEVTF4B,~(SP)
#4,-(SP}
SP,RO

ADD

”2,SP

TRAP

RPTDDE :

RPT

;THEN GO GET NEXT EVENT ENTRY

MOV
MOV
MOV

(R2)+,EVTIADD
(R2)+,EVIBCT
(R2)+,EVITMP

;STORE MESSAGE ADDRESS FOR PRINTING
:STORE BYTE COUNT FOR PRINTING
:STORE TOTAL # OF CMP ERRORS

PRINTS

#EVTF4,EVTADD,EVTBCT,EVITMP

:PRINT ADDR, BYTE CNT, # CMP ERRS

MoV
MOV
MOV
MoV
MoV
MOV

EVITMP,=(SP)
EVTIBCT.=(SP)
EVTADD ,=(SP)
FEVTF4.~(SP)
#4,~(SP)
SP,RO

ADD

#12,5P

TRAP

RPTDLE :
RPTDCK :

JMP

RPT

:THEN GO GET NEXT EVENT ENTRY

MOV
MOV
MOV

(R2)+,EVTIADD
(R2)+,EVIBCT
(R2)+.EVITMP

;STORE MSG ADDR FOR PRINT
:STORE BYTE COUNT
:STORE BYTE COUNT COMP

PRINTS

WEVTF4A,EVTADD,EVTBCT,EVITMP

MOV
MOV
MoV
MOV
MOV
MOV

TRAP

022310

022320
022322
022324
022326

ENDEVT:

ADD

JMP

RPT

:THEN GO GET NEXT EVENT ENTRY

MoV
MOV
MOV

(SP)+,Ré
(SP)+.R3
(SP)+.R2

;RESTORE R4,R3,R2

RTS

CSPNTS

:PRINT ADDR,RXBYTES,CMPBYTES.

022

022314

CSPNTS

EVITMP,~(SP)
EVTBCT.-(SP)
EVTADD ,~(SP)
FEVTF4A,~(SP)
#4 ,~(SP)
SP,RO
CSPNTS
#2,5P

sRETURN TO CALLING ROUTINE

;REPORT MODEM STATUS SUBROUT INE

PART OF STATISICAL REPORTING (DUMPING EVENT LOG)

—————

———

CZCLrAQ DMR,%11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052) 18-APR-80 09 24 PAGE 81

APR=-80 09:24

DUMP EVENT LOG AND BASE TABL

SEQ 0080 ‘

‘

]

022330

012746
012746
01

015707
000001

062706

000004

104416

2350 81570" 010210
2356 012705 010226
10 8%%360 005714

362

001004

022370

005724

3616

022376

001403

3618
3619
3620
3621

022404 00040
022406 112735
000060
022412 020427 010226
022416 002760

3623
3624
3625

022420
0226424
022430

012746
012746
010600

015767
000001

3627

022434

062706

000004

361§

022364

3614
3615

022372
022374 032403

3613

3617

022400

362% 022420

&8%

3626

022432

022440

112735

104416

000207

RPTMSB: PRINTS #EVMOHD

:PRINT MODEM STATUS HEADER

MOV
MOV
MOV

#EVMOHD , = (SP)
#1,-(SP)
SP.RO

ADD

#4,SP

TRAP

000130

MoV
MOV
ST

MMOBITS R4
#MOMSGS RS
(R&)

:MAKE R4 A POINTER TO MODEM SIG. BIT DEF. TABLE
:MAKE RS A POINTER TO MODEM MSG. POSITION TABLE
:SEE IF sn AVAIABLE FROM DEVICE

MOVB

#'X,3(RS)+

:ELSE PUT "x" IN REPORT IF SIGNAL NOT AVAILABLE

BR
BIT

9
(R4)+,R3

:GO SEE IF CHECKED ALL MODEM SIGNALS
:IF THERE, SEE IF THAT BIT IN DEVICE'S ENTRY=1

#'1,3(RS)+

:IF=1, PUT '1°*

BNE

TST

78:
000061

BEQ

MOVB

2%
9

CSPNTS

BR
MOVB
cTMP
BLT

(R4S+

9s
#°0,a(RS)+
R4 ,AMOBITE
X

PRINTS #EVMOST

:BR IFTHAT MODEM SIG. AVAIABLE

:BUMP R4 TO POINT TO NEXT BIT DEFINITION

:BR IF
BIT (SIGNAL) VALUE =0

IN REPORT MESSAGE

:GO SEE IF ALL MODEM SIGNALS CHECKED
:IF BIT(SIGNAL)=0, PUT ‘D'' IN REPORT MESSAGE
:SEE IF ALL BITS(SIGNALS) CHECKED
:LOOP UNTIL ALL SIGNALS(BITS) CHECKED

:THEN PRINT MODEM SIGNAL VALUE MESSAGE
MOV
MOV
MOV

#EVMOST
- (SP)
#1,-(SP)
SP.RO

ADD

#4,SP

TRAP

RTS

;RETURN TO EVENT DECODING

CSPNTS

,
'

7
MACY11 30A(1052)
18-APR-80
DUMP BYTES OR WORDS

CZCLFAQ DMR,DMC~11 DATA COMM. LINK TEST
CZCLKA.PT
18-APR-80 09:24

SMR
S S S
s

.SBTTL

3670

3671
sbg

3673
3674

3676

3677

DUMPSR = DUMP BYTES OR WORDS SUBROUTINE

THIS SUBROUTINE PRINTS THE CONTENTS OF THE LOCATIONS BETWEEN
A STARTING AND END ADDRESS IN LOCS. °‘‘STADD'‘
AND °‘ENADD'’,
THE WORD OR BYTE CONTENTS ARE PRINTED 8 TO A Ll'f WITH THE
aebzfggn%dg FIRST BYTE AS THE FIRST 6 OCTAL CHARS. FOLLOWED

1
’

INPUTS:
STADD= STARTING ADDRESS (FIRST LOC. TO PRINT)
ENADD= END ADDRESS (LAST LOCATION TO DUMP)
BYTBIT= 1 IF SUPPOSED TO PRINT ‘BYTES''

0 IF SUPPOSED TO PRINT 'WORDS''

OUTPUTS:
CONTENTS OF A RANGE OF LOC.S PRINTED ON THE OPERATORS CONSOLE.

CALLING SEQUENCE:
JSR PC,DUMPSR

;CALL DUMP BYTES SUBROUTINE

022442 013702
022446 005003

007146

022450
022452
022456
022462

010246
012746
012746
010600

015010
000002

MOV
MOV
MOV
MOV

R2,-(SP)
,=(SP)
#2,~(SP)
SP.RO

022466

062706

000006

ADD

#6,SP

CLR
BISB

-(SP)
TEMP,(SP)

022450

022464

022472

104417

005737

022504

022504
022506

005046
153716

022512
022516
2522

012746
012746
010600

022526

062706

022524

104417

022536

022534

012246

022542
2546

012746
010600

2550
022552

022556

DUMPSR: MOV
DUMé4:
CLR

STADD,R2
R3

PRINTF #BASM1,R2

007152

022476 001416
022500 112237 007172

022534

3686

DUMP BYTES OR WORDS

s FUNCTIONAL DESCRIPTION:

3679

|
:
SEQ 0081 |

PAGE 82

s4e

3678 022532 000411

3680

09:24

:SET R2 UP TO STARTING ADDR.
*CLEAR R3

*PRINT ADDRESS

TRAP

DUM3:

TST

BEQ
MOVB

PRINTF

evrsn

(RZ)* TEMP

;1S THIS BYTE OR WORD

*BR IF WORD
MOV BYTE TO TEMP

#BASMS,<B,TEMP> :PRINT BYTE

007172

014772
000002

MOV
MOV
MOV

#BASM3,
-(
#2.,-(SP)
SP.RO

ADD

#6,SP

MOV

(R2)+,~(SP)

TRAP

000006
DUM1:

B8R

PRINTF

DUM2

#BASM2,(R2)+

CSPNTF

:PRINT WORD

CSPNTF

012746

015001

MOV

#BASM2
- (SP)

104417
062706

000006

TRAP
ADD

CSPNTF
#6.SP

020237

000002

007150

MOV
MOV

DUM2:

(MP

R2,ENADD

:COMPARE FOR LAST ADD

#2,-(SP)
SP.RO

7
MACY11 30A(1052)
18-APR-80
DUMP BYTES OR WORDS

92
3693
369

022562
022564
022566
022572
022574

023703 000010

022576

000207

003005

DUMEX
R3

001725
000736

DUMé
DUMEX:

PAGE 83

SEQ 0082 |

:IF DONE EXIT
;ELSE BUMP R3

#8. ,R3

sHAVE WE PRINTED 8 ACCROSS

puM3

sELSE GO BACK AND PRINT ANOTHER

JRETURN TO CALLER

:IF SO GO BACK TO 4
;BYTE OR_WORD

——————————————

3687
3688
3689
3690
%91

09:24

CZCLFAO DMR,DMC=11 DATA COMM. LINK TEST
CZCLKA.PTT
18-APR-80 09:24

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11 ~ 18-APR-80 09:24

33232

09:24

UPDATE TOTAL CHAR. COUNT SUBROUTINE

LSBTTL

7
18-APR-80

MACY11 30A(1052)

PAGE 84

SEQ 0083

UPDATE TOTAL CHAR. COUNT SUBROUTINE

I+

98
99
700
701

: FUNCTIONAL DESCRIPTION:
:
UPDATES TOTAL CHAR. COUNT TOTCC BASED ON CURCC.
:
LAST MESSAGE IS TRUNCATED TO FIT INTO THE
:
BUFFER IF TOTAL CHAR. COUNT EXCEEDS 'BUFLIM' A MESSAGE

3704

: INPUTS:

%‘7/89

3708

: OUTPUTS:

3711

: FUNCTIONAL SIDE EFFECTS:

g;}g

37785

3705

;

%;103

3719
%

022600

022606
022614

063737

022737
103027

TOTAL CHAR COUNT OF BUFFER ITS BEING ADDED TO

MESSAGE TO OPERATOR IF MESSAGE TRUNCATED TO FIT

007156

001000

007166

ADDCC:

JSR

ADD

P
BHIS

PC,ADCC

CURCC,TOTCC

#BUFLIM,TOTCC
ADDC1

;UPDATED TOTAL CHAR. COUNT

:ADD CURRENT TO TOTAL

: COMPARE TO 'BUFLIM
:IF NOT MORE THEN 'BUFLIM' EXIT

: PRINT MESSAGE AND TRUNCATE COUNT

3724

022616

3728
3729

022630
022632

104417
062

022674

000207

022616
022622
022626

3730 022636
3731 022644
3732 022652
3733
022660
373
022666
g;s}g

CHAR. COUNT OF MESSAGE BEING ADDED

:
LOCATION ‘‘TEMP'* USED FOR CALCULATIONS
* CALLING SEQUENCE:

Ssgg

3725
3726
3727

CURCC=
TOTCC=

3712
3713

3718

IS PRINTED TELLING THE OPERATOR THE TRUNCATION OCCURED.

012746
012746
010600

PRINTF

014102
000001

1
007156 007166
012737 001000 007172
1
007166 007172
013737 007172 007156
007156 007166

ADDC1:

sus
MOV
SuB
MOV
ADD
RTS

#MSGTRU

CURCC, TOTCC
#BUFLIM,TEMP
TOTCC, TEMP
TEMP, CURCC
CURCC, TOTCC
PC

MoV
MoV
MOV

TRAP
ADD

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

CSPNTF
#4,SP

:SUB CURRENT FROM TOTAL
:MOV 'BUFLIM' TO TEMP
:SUB TOTAL FROM ‘BUFLIM
:AND ESTABLISH NEW CURRENT
:ADD "ADJUSTED CURRENT'' TO TOTAL CHAR. CNT.
*RETURN TO CALLER

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24
7

7
18-APR-80

MACY11 30A(1052)

09:24

BUILD MESSAGE BUFFERS SUBROUTINE

.SBTTL

PAGE 85

SEQ 0084

BUILD MESSAGE BUFFERS SUBROUTINE

s *e

s FUNCTIONAL DESCRIPTION:
BLDBUF==

BUILD POINTER TABLE AND BUFFERS

THIS SUBROUTINE ADDS A MESSAGE TO THE TRANSMIT OR EXPECT LIST

USING THE POINTER, BYTE COUNT, AND ADDRESS PASSED TO IT.

INPUTS:
CURCC= CHAR. COUNT OF MESSAGE TO BE ADDED
CURADD= ADDRESS OF MESSAGE TO BE ADDED
CPTR=
ADDRESS OF POI&'S?L!TTBLE WORD WHERE MESSAGE POINTERS ARE
TO BE

MSGTYP= VALUE TO USE AS AN INDEX TO FIND SOURCE OF MESSAGE DATA
INDEX INTO DMSGCT() AND DMSGAD().
OUTPUTS:
A MESSAGE ADDED TO EITHER TXBUF OR CMPBUF
APPROPRIATE POINTERS IN PTRTAB POINTER TABLE

CALLING SEQUENCE :
JSR PC,BLDBUF

010246

BLDB1:

007172
007172

007176

BLDB2:

BLDB3:

007164

MOV
MOV
MOV
MOV
MOV
MOV
MOV
ASL
MOV
ADD
MOV
MOV
MOV
ADD

MOVB
TM

BEQ
P
BEQ
B8R
BLDBEX: ADD
MOV
MOV
RTS

R2,=(SP)
R3,=(SP)
CPTR,R2

;BUILD MESSAGE IN BUFFER

TM ADD PTRS.

;SAVE R2 AND R3 ON THE STACK

CURADD, (R2)+
:;PUT CURRENT ADD ON POINTER TA8
CURCC, (R2) +
:PUT CURRENT CC ON POINTER TAB
R2,CPTR
:PUT UPDATED R2 BACK TO CURRENT POINT
MSGTYP,R2
:GET MESSAGE TYPE TO USE AS INDEX
R2
:DOUBLE FOR WORD INDEX
CURADD , TEMP
*MOVE CURRENT ADD TO TEMP
CURCC, TEMP
*ADD CHAR COUNT TO IT TO GET END
CURADD ,R3
*SET R3 TO CURRENT START ADD
DMSGCT (R2) , TEMP2
:GET BYTE COUNT
DMSGAD(R2)
R4 ;PUT STARTING FROM ADD IN Ré
R4, TEMP2
:ADD IT TO TEMP2 TO GET END OF FROM

(Ré)+, (R3)+
R3, TEMP

BLDBEX
R&, TEMP2
BL
BL
CURCC,CURADD
(SP)+.R3
(SP)+.R2
PC

:MOV BYTE FROM PATTERN TO BUFFER
:ALL DONE?

<IF SO EXIT
:1S PATTERN COUNT EXPIRED
*IF SO GO START AGAIN
*IF NOT GET ANOTHER BYTE
:BUMP CURADD
:RESTORE R3 AND R2
:RETURN TO CALLER

CZCLFAO DMR,DMC=11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

789

MACY11 30A(1052)

H 7
18-APR-80

09:24

PAGE 86

SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS

.SBTTL

SEQ 0085

SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS

: FWCTIM DESCRIPTION:

SHWOP
- SHOW MODE OF OPERATION, LOOP, QULAIFIERS
PRINTED ON THE OPERATOR'S CONSOLE.

; INPUTS:
:
DEVI=
:
DEV2=
;
DEV3=
:
DEV4=

MODE TYPE (MODTYP)
MAINT LOOP TYPE (MLTYP)
‘RUN PASS'* COUNT (RPASS) - COUNT DOWN
PARAMTERS WORD (PARAM)

s BELEE Seieigeese

: IMPLICIT INPUTS:
:
MODES= TABLE OF ADDRESSES OF MODE NAME STRINGS
:
LOOPS= TABLE OF ADDRESSES OF LOOP TYPE NAMES
* CALLING SEQUENCE:
JSR PC, SHWOP
:
M~V

DEV1,R2

:GET_THE MODE TYPE IN R2

gs
V2.R2

*GET MAINTENANCE LOOP TYPE

007172

ASL
MOV

R2
MAKE IT A WORD TABLE OFFSET
MODES(R2) TEMP -GET ADDRESS OF MODE=IN-ASCII

007200

MOV

#LP00, TEMP3

007200
007174
007176

BNE
MOV
MoV
MOV

: BR IF /LOOP= OF SOME KIND
#LPO,TEMP3
:IF NO LOOP THEN DON'T PRINT */LOOP=""
LOOPS (R2) ,TEMP1 :GET ADDRESS OF LOOP-IN-ASCII
DEV3, TEMP2
*GET NUMBER OF PASSES

221\.(
ST

108:

PRINTS

:LOAD TEMP3 TO POINT TO ‘‘/LOOP=""

:SEE IF /LOOP=XXXXX OR NONE

#SHF0,TEMP, TEMP3. TEMP1, TEMP2

8¢EERGEGESRt

000014
CLR

013536
000001

013534
013547
000002

18:

013545
013557
000004

013555

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

VO~NOW

SHWOP:

MOV
BIT
BNE
MOV

#PST, TEMP

BIT

#DATCKB,DEV4

MOV

BNE
MOV
MOV
BIT
BNE
MOV

#STATB,DEV4

13
#PNST
, TEMP

#PCK, TEMPI

#PNCK
, TEMP1
#PEC, TEMP2
#ECHOB, DEV4
#PNE
, TEMP2
C

;NOW SET UP FOR QUALIFIERS IN ASCII
:SEE IF /STATUS OR /NOSTATUS

*BR IF /STATUS

:;SEE IF /CHECK OR /NOCHECK

‘BR IF /CHECK

;SEE IF /ECHO OR /NOECHO

‘BR IF /ECHO

TEMP2,-(SP)
TEMPT .- (SP)

TEMP3.-(SP)
TEMP,~(SP)

#SHFQ, - (SP)
#5,-(5P)

MACY11 30A(1052) 1‘-%-80 09:24 PAGE 87
58:

PRINTS

RTS

WSHF1,TEMP,TEMP1,
TEMP2

;RETURN

: TEMP3,TEMP4 #+:SEE NOTE ABOVE
TEMP2,=(SP)
TEMPT.= (SP)
TEMP,~(SP)

#SHF1,-(SP)
#%,-(SP)

SP.RO

CSPNTS
#12,5P

———————

023236

SEQ 0086

CELLLELP

3845
3846
3847
3848

SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS

CZCLVYAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PT
18-APR-80 09:24

CZCLFAQ DMR,Mg:fl DATAOSC',Z'I:. LINK TEST

MACY11 30A(1052) 1‘-“-80 09: 24 PAGE 88

CZCLKA.PI

TRAVERSE COMMAND LINE SUBROUTINE

3859

.SBTTL

3861
&i

A
:

3864
3865
3866
3867
3868
3869
3870

*PARSE THE COMMAND LINE SUBROUTINE
:TAKE ACTIONS (VIA ACTION, TREE) AS PARSING LINE
mgégss aggemms FROM *'CLI PARSING NODESTM
:
:
:
R1,RS=SCRATCH
PSNUM=NUMERIC CODE FROM DATA
:
CTION CODE PARAMETER FROM TREE

3871
38;;

38
3874

023274

3880

023304

105714

023310

121327

023316

111305

3878 023274 013704
3879 023300 013703

3884

3885
3886
3887
3888
3889
3891
%
3896
3895
3896
3897
3898
3899
3000
3901

023306 001441
023316

003023

023320
5
023322 016505
023326
705
023332 004715
023334 000763
023336
023340
023342
023344
023346
023350
023352
023356
023356
023360

003310
003312

000114
000134
000152
000162
000204
000270
000604
000650
000270
000256

108:

000736

PSBUFA
R4
PSTREE .R3

BEQ

PSEXIT

*BR IF NO

BGT

208

:BR IF REGULAR ASCil CHAR.

ASL
MOV
ADD
JSR
B8R

RS
1os<as> RS
#108,RS’
PC. (RS)
PSTRS

:JSR TO SPECIAL CLI TRAVERSE ROUTINE
:GO SEE IF MORE OF STRING LEFT

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

TRVERR-10$
TRVEXI-10$
TRVBR-10%
TRVBIF-10%
TRVSPA-108
TRVNUM-10%
TRVALP-10$
TRVALN-10$
TRVOCT-10$
TRVDEC-10$

;TRAVERSE TABLE FOR ‘‘'CLI FUNTIONS''
1
:§
:
%
:5
6
7
8
9

TSTB

.WORD

(R4)

(R3).M1.
(R3).RS

TRVSTR-10$

;SEE IF ANY CHARS LEFT IN INPUT STRING

:SEE IF SPECIAL CLI CHAR CODE OR ASCII

:GET SPECIAL CHAR CODE INTO RS

:BUILD TRAVERSE ROUTINE ADDRESS

210

;NOT A SPECIAL CODE

023364

121314

208:

3911

062703 000004

391;

MOV
MOV

(W8

023336
023336

001403
004737
000743

3913
3914

Rg=PARSE TREE POINTER

R4=INPUT STRING POINTER

MOVB

3907 023366
3908 023370
3909 023374
3910

PSTRS:

000013

3006

PSTRV:

023376

004737

023406 005204
023410 000735

023434
023414

228:

‘

PSTRV SUBROUITNE

: CALLING SEQUENCE:
:
JSR
PC.PSTRV

3876
3877

3881

TRAVERSE COMMAND LINE
SUBROUTINES

SEQ 0087 |

(M8

(R3).(R4)

sSEE IF FIRST CHAR OF STRING IS A MATCH

BEQ
JSR
BR

228
PC, TRVBRC
PS$TRS

ADD

#4.R3

: ACTION CODE IN CLI NODE, THEN

INC
BR

R
P$TRS

:ADJUST BUF PTR TO NEXT CHAR IF MATCH

JSR

PC. TRVACT

*BR IF A MATCH
.xr NOT A MATCH, GO TAKE MISS BRANCH
: THEN GO BACK PT'G TO MISS NODE

:IF A MATCH, GO DO ACTION DEF INED BY

: ADJUST PTR TO NEXT CLI NODE

=11 DATA COMM. LINK TEST
CZCLFAO DMR,
CZCLRA.PTT
1 APR-80 09:24

$8¢e

3915

023412

000207

MACY11 30A(1052)

18-APR-80

09:24

TRAVERSE COMMAND LINE SUBROUTINES

PSEXIT: RTS

PAGE 89

SRETURN FROM PARSER

3918

4
5%

GOTO USER ACTION ROUTINE

000001
177400
003314

VACT: MOVB

3927
3928
3929

3930
3931
3932
3933
3935
3937
3938
3939
3941
3942
3943
394

3945

397

3949

016305

3959

3961

3963
3964
3965

TRVBRC: MOV

ADD

TRVNOB: ADD
RTS

004737
112737
005726
000137

023414
177777

004737

023414
003325

726
000137
004737
000137

005005
121427
1003
204
005205
000772
121427

2(R3) ,RS

R5.R3
PC

:NO BRANCH TAKEN

062703
000207

105037

PSACT RS
PC, (RS)

: TAKE BRANCH IN TREE

000002

023412

003325

: AND POINT R3 TO THE ‘MISS’'‘ NODE
: RETURN TO PSTRV

PC,TRVACT

:TAKE ERROR ACTION

(SP)+
PSEXIT
PC.,TRVACT

*GET RID OF ‘'JSR PUSH TO TRVERR'®
:RETURN DIRECT TO EXIT OF PSTRV ROUTINE

:TAKE EXIT ACTION

ST
JWP

(SP)+
PSEXIT

*GET RID OF ‘‘JSR PUSH TO TRVEXI'®
*RETURN DIRECT TO EXIT OF PSTRV ROUTINE

JSR
P

PC.TRVACT
TRVBRC

:GO TAKE BRANCH ACTION

ST
JWP
TRVEXI: JSR

CLRB

023414
023434

TRVBR:

023414
003325

TRVBIF: JSR

#-1,P$GDBD

P$GDBD

PC.,TRVACT

;THINGS OK, UPDATE R3 TO POINT TO NEXT

*SET ERROR RETURN FLAG

:SET GOOD/BAD FLAG TO ‘‘SUCCESS (0)**

TST8

P$GDBD

TRVNOB

:JUST UPDATE TO NEXT NODE IF THINGS OK

RS
(R4).#1

:CLEAR *'SPACE OR TAB FOUND'’ FLAG
*SEE IF cm m CMD LINE= TAB

BEQ
JP

023434
023444

18:

000011

TRVSPA: CLR
1$:
(P8

000040

023414

sGET BRANCH DISPLACEMENT FROM TREE

: NODE AND RETURN TO PSTRV

MOVB

108:

sGET ACTION CODE FROM CLI NODE
sCLEAR ANY SIGN EXTENSION
;GET ADDRESS OF CLI ACTION ROUTINE
:G0 DO ACTION DEF INED BY CODE
sRETURN TO CALLING CODE

#4 ,R3
PC

TRVERR: JSR

023412

3967
3969
3970

RTS

3951
395
395
3955

#177400 ,R2

MOV
JSR

3925

1(R3) .R2

BIC

13
TRVBRC

BNE
2
INC
R4
INC
RS
B8R
13
CMP8 (R4) 440
BNE
INC
R4
INC
RS
BR
13
TST
RS
158
BEQ
JSR

PC,TRVACT

;SEE IF PSGDBD SET OR CLEARED BY ACTION

*IF CLEAR FALL THRU TO NEXT NODE
:ELSE TAKE THE ‘MISS’‘ BRANCH

*BR IF NO
A TAB
S INC INeUT smms POINTER
:INDICATE A TAB FOUND
:GO CHECK NEXT CHAR

:SEE IF CHAR. IN CMD LINE= SPACE
:BR IF ND, NON-SPACE OR NON-TAB CHAR.
*INC INPUT STRING POINTER
*INDICATE A smce FOUND
*GO CHECK NEXT CHAR
:SEE IF ANY SPACES OR TABS FOUND
:BR IF NO, TAKE NO ACTION
;GO TAKE ACTION IF ANY FOUND

SEQ 0088

35S|

CZCLFAO DMR,
CZCLRA.PTT

397

3974
39
3976
3977
3978

023610
023614
023622
023626

=11 DATA

000137
000137

023444

012737

000012
023634

003322

000010

003322

000

05363,

023636
023642
023644

0%3434

000055
003323

118:
1}:

000012

000071

112737
000474
121427
003003
005204
005205

no ,PSRADX

003325

000071

(R4) .4+

:CLEAR DIGIT COUNTER
sss IF nfne S A + SIGN THERE

{gl.).r-

sss {'
THERE'S A - SIGN THERE

MOVB

#-1.PSRADX+1

*SET 'mws FLAG'' (HI BYTE OF PSRADX)

(R&),#60

:SEE IF CHAR. LESS THAN A ‘D"

BNE
BR
INC

(MP8

BLT
CMPB
BLE
CMPB
BEQ
(W8
8GT

MOVB

B8R
128%:

138:

000741

(P8

SRR

003320
003320

003320
003322

000012

2s
(R&) W67
13$
PSRADX.#10.
12%
(R4) AN
2s
#CLIBRX

: BR IF
: ELSE mX ALREADY SAYS +, JUST BR

:BUMP R4 TO POINT TO FIRST CHAR

*BR IF YES (NOT NUMERIC)
:SEE IF CHAR. GREATER THAN A ‘7"
: BR IF YES
sse IF IN DECIMAL MODE
: BR IF YES (CAN USE HIGHER LIMIT)
“SEE IF DIGIT WAS A 8 OR 9

*BR IF NON-NUMERIC

“ELSE WAS A 8 OR 9 WHEN IN OCTAL RADIX

MOV
MOV
MOV
TRAP
ADD
:SET ERROR RETURN FLAG
: PRINT ERROR AND TAKE MISS

(R4) A7

:SEE IF CHAR. GREATER THAN A ‘9"’

#-1,PSGDBD

CLR

003316

108
118

2s
R4
RS
13

000060
003320

BGT
INC
INC
B8R

BEQ
003320

:JUST GO UPDATE R3 TO NEXT NODE IF OK
*TAKE BRANCH (MISS) IF NONE FOUND

(M8

PRINTF

012217
000001
000004
177777

TRVNOS
TRVBRC

TRVNMA: CLR

000067

003322

JMP
WP

;USE DECIMAL AS RADIX AND ASSUME +
TRVOCT: : (SAME AS TRVNUM SINCE DEFAULT RADIX IS OCTAL)
TRVNUM: MoV
#8. ,PSRADX
sUSE OCTAL AS RADIX AND ASSUME +
TRVDEC:

108:

000060

R
R S

158:

000053

177777

MACY11 30A(1052) 1%-APR-80 09 24 PAGE 90
TRAVERSE COMMAND LINE SUBROUTINE

COMM. LINK TEST

08:24

gg.z}

#CLIBRX,~(SP)
#1,-(SP)
SP.RO
CSPNTF

#6,SP

*BR IF YES (NOT NUMERIC)
*UPDATE CMD LINE PTR TO NEXT CHAR.
*INDICATE A NUMERIC FOUND
:GD LOOK AT NEXT CHAR.
:SEE IF rouo ANY NUMERICS

*BR IF

TAKE

‘MISS'* BRANCH

<GET Pomfsu TO START OF NUMERIC STRING
;CLEAR LOC. WHERE VALUE WILL BE STORED

mvam

mn;énz

ASL
BCS
v&v

PSNUM
PSNUM, PSCNT

sSHIFT CURRENT VALUE TO MAKE ROOM
*ERROR IF NUMBER TOO BIG
:SAVE FOR LATER IN CASE DECIMAL RADIX

BCS
ASL
BCS
CMPB
BNE

78
PSNLM
78

;ERROR IF NUMBER TOO BIG
:ERROR IF NUMBER TOO BIG
:SEE IF DECIMAL RADIX
:BR IF NOT EQUAL

PSRADX.#10.

sGET ASCII CHAR AND CONVERT IT TO A #

CZCLFAO DMR,.DMC-11 DATA COMM. LINK TEST
CZCLKA.PI
18-APR-80 09:24

4027
4028
4029
4030
4031
4032
4033
4035
4036
4037
4038
4039
4040
4041
4042

4043
4044
4045
4066
4047
4048
4049
4050
4051
4052
4053
4054

4055

4056

4057
4058

4059
4060
4061
4062

4063
4064
4065

4066

024044
024052
024054
024064
024066
024072
024074
024100
0264104
024110

063

10341
0602

003316

024124
024130
026136

000004
177777
023434

000101

158:

003325

S$:
TRVALP:
18:

000132

TRVALN:

0s:

000101
000132

024250

024256
024260

023414

4082

024270

023434

264

SEQ 0090

sERROR IF NUMBER TOO BIG
;ERROR IF NUMBER TOO BIG
Sg {F w WAS PRECEDED BY A - SIGN

: ELSE NEGATE THE NUMBER BEFORE LEAVING
sSINCE NUMERIC FOUND, GO TAKE ACTION

:GO POINT R3 TO NEXT NODE

sPRINT NUMBER TOO BIG ERROR
MOV
MOV
MoV
TRAP

#-1,P$GDBD

:SET_ERROR RETURN FLAG

#CLINBG,~(SP)
#1,-(SP)
SP.RO
CSPNTF

#6,SP

TRVBRC

sTAKE ‘MISS’* BRANCH

sCLEAR ALPHA FOUND FLAG
:SEE IF CHAR. LESS THAN A 'A"
:BR_IF YES (NOT ALPHA)
sSEE IF CHAR. GREATER THAN A °7'°
sBR IF YES (NOT ALPHA)
sUPDATE CMD LINE PTR TO NEXT CHAR

(R6) ,m01

sIF_ANY FOUND TAKE ACTION
:THEN UPDATE R3 TO NEXT NODE ~NO BRANCH
INONE FOUND, TAKE MISS BRANCH

4076
40
4078
4079
4080

4081

PAGE 91

#CLINBG

(R4) ,m32

024216

gg 024240
4074
do7s 03¢5¢e

09:24

;INDICATE AN ALPHA WAS FOUND
:G0 LOUK AT NEXT CHAR.
giilf'gfl ALPHA'S WERE FOUND

024206
024210
026214

024230
024232

PSRADX+1
15%
PSNUM
PC,TRVACT
TRVNOB

4‘% 0242264
4070
4071

R2.PSNUM
7$
R5

003323

012175
000001

026142
024144
024150
024152
024156
024160
024162
024164
026166
024170
026172
024176
024202

Prgcm.m
4S:

003320
023414
023444

L4
18-APR-80

TRAVERSE COMMAND LINE SUBROUTINES

003320

024110
024114
024120

024122

MACY11 30A(1052)

1$:

sCLEAR ALPHANUM FOUND FLAG
sSEE IF CHAR. LESS THAN A ‘D"
:BR IF_YES (NOT NUMERIC OR ALPHA)
sSEE _IF CHAR. GREATER
THAN A 'Y’
:BR IF_YES (NOT NUMERIC)
sUPDATE CMD LINE PTR TO NEXT CHAR.
s INDICATE A NUMERIC FOUND
'60 LOOK AT NEXT CHAR.
.
F CHAR. LESS THAN A ‘A"’
S (NOT ALPHA)

NOT
:UPDATE CMD LINE PTR TO NEXT CHAR
sINDICATE AN ALPHA FOUND

;60 L(IK AT NEXT CHAR.

cSEE _IF ANY ALPHANUM'S WERE FOUND
:BR IF ND
sIF_ANY FOUND TAKE ACTION
:THEN UPDATE RS TO NEXT NODE ~NO BRANCH
INONE FOUND, TAKE MISS BRANCH

IRBIRIRAR2S
—

b =

_a—n-!-l_._.-.-b-l-o-la-a
N=O

e
2 L
L e

SRR
S

CZCLrAO DMR, ‘ - 1" MTA‘)&%. LINK TEST
CZCLRA.PTT

MACY11 30A(1052)

002216
05715
003316
003316

108:

023414

MOV
ADD
CLR
TST8
BEQ
TST8
BEQ
cMP8
BNE
INC
INC
INC
BR

R4 ,R1
R3.R5
#6 RS
PSCNT
(RS)
108
(R1)
108
(R1),(RS)
108
PSCNT
R1
R5
2s

TST

BEQ
MOV
JSR

158
R1.R4
PC,TRVACT

RTS

JMWP

TRVBRC

ADD

000004

023434

09: 210

TRAVERSE COMMAND LINE SUBROUTINE

TRVSTR: MoV

001411
0571
001407
121115
001005
005237
005201
005205
000765

7
IO-APR-BO

i58:

4(R3) ,R3

PAGE 92

sPOINT R1 TO CMD STRING
sPOUNT R5 TO MATCH STRING FROM CLI NODE
;CLEAR CHAR MATCH COUNT
SEEIIFYE'SO OF MATCH STRING YET
[

;BR
;SEE IF END OF CMD LINE YET
sBR_IF YES
sSEE _IF CHARACTERS MATCH
:BR_IF NO
:MATCH ~INCREMENT MATCH COUNT
;UPDATE STRING POINTERS

sBR TO CONTINUE CHECKING CHARS.

sWHEN DONE SEE IF ANY MATCHES FOUND
sBR IF NO, GO TAKE THE MISS BRANCH
:POINT CMD POINTER TO END OF STRING &
GO DO MATCH ACTION
IF A MAT

ro'cxi NODE (ND BRANCH)

[

;

RETURN THRU TRVNOB SINCE DIFFERNT
DISPLACEMENT DUE TO MATCH STRING)
GO TAKE BRANCH

(PARSED 0K), =1 IF ILL (TM.....

SEQ 009N

CZCLFAQ DMR,DMC-11 DATA
CZCLKA.PTT

GH LINK TEST

MACY11 30A(1052)

REPORT CODING SECTION

.SBTTL

8
18-APR-80

09:24

PAGE 93

SEQ 0092

REPORT CODING SECTION

: THE REPORT CODING SECTION CONTAINS THE
; "PRINTS'' CALLS THAT GENERATE STATISTICAL REPORTS.
4121
6122

024364
024364

4125

024364

4131

024370
024370
024370

4133

BGNRPT

004737

021406

JSR

ENDRPT

104425

LSRPT::
PC,REPORT

sCALL SUBROUTINE TO DUMP EVENT LOG
: AND BASE TABLE

L10011:

CSRPT

CZCLVFAO DMR,DMC~11 DATA COMM. LINK TEST

MACY11 gOAUOSZ) 1S-APR-80 09:26 PAGE 94
PROTECTION

6134

.SBTTL

6137

: THIS TABLE IS USED BY THE RUNTIME SERVICES

CZCLKA.P11

18-APR-80 09:24

4138
4139
024372

6144
6145
2}2?

024372
024374
024376

4148

024400

4149

SEQ 0093

PROTECTION TABLE

: TO PROTECT THE LOAD MEDIA.
Jo-

6140
6141

2}2%

TABL

BGNPROT

024372

177777
177777
177777

-1
-1
-1
ENDPROT

LSPROT: :
;OFFSET INTO P-TABLE FOR CSR ADDRESS
sOFFSET INTO P-TABLE FOR MASSBUS ADDRESS
sOFFSET INTO P-TABLE FOR DRIVE NUMBER

8
MACY11 _30A(1052) IS-APR-SO
09:26 PAGE 95

CZCLFAO DMR,DMC~11 DATA COMM. LINK TEST
CZCLKA.PN
18-APR-80 09:24
INITIALIZE SECTION
4150
4151
415
415
4154
4155
4156
4157
4158
4159
4160
4161
41

41
4164
6165
6166
6167
4168
6169
4170
4171
41

4176
4175
4176
4177

4178

«SBTTL

:' Tlf INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED

024400
024400
024400
024406
024406
024412

024414
024414
024416
024416
0264422
024424
024426
024426

0244

0244
024434
024434
024436

024442

BGNINIT

012737

177777

012700
104447

000040

012700
104447

READEF

012700

1046447

103002
000137

READEF

000036

025146

005037

007216

4188
4189
4190
4191
4192
4193
4196
4195
4196
4197
4198
4199
4200

024464
024470
024470
024474
024476
024500
024500
024502
024506

012702

007252

012700
104462
010001

000114

S1:

000035

024514

024516
024516

012700

000120

ENDIT

#EF .NEW

CLR
CLR

RESFLG
CLKVEC

MOV

#CLKCSR,R2
L.R1

;SET RESTART FLAG
;IF HERE CAUSE OF START.DO SOME INIT
MOV
#EF .START
RO
TRAP
CSREFG
8Cs
START
;IF HERE CAUSE OF RESTART, DO SOME INIT
MOV
#EF .RESTART
RO
TRAP
CSREFG

BCS

RESTRT

MOV
TRAP

#EF.CONTINUE .RO
CSREFG

MOV
TRAP

#EF .NEW,RO
CSREFG

8Cs

NEW

;SEE IF WE'RE HERE CAUSE OF A CONTINUE
;BR IF NOT HERE CAUSE OF C(NITME
8cC
:JMP IF HERE CAUSE
OF A C(NTIME
:SEE IF THIS IS A 'NEW PASS'*

:IF YES, BR AROUND LOGUNIT # SETUP

sCLEAR RESTART FLAG_SINCE HERE ON START
CLEAR CLK VECTOR PTR. AS A FLAG IN
: NO CLOCK IS FOUND.

:SETUP R2 AS A PTR. TO CLOCK INFO BLOCK
:LOOK FOR A LINE CLOCK

MOV
#°'L.RO
TRAP
CSCLCK
MOV
RO,R1
; IF NONE THERE GO LOOK &Mé A P-g%OCK

JSR

PC,CLKSET

: GO SET UP CLOCK INFO TABLE & CLK VEC.
;SETUP THE ENABLE LINE CLOCK DATA

CLock

P.R1

;LOOK FOR A P-CLOCK SINCE NO Ll'f CLOCK

#LCLKEN,CLKEN
RESTRT

BNCOMPLETE
020544

NEW

GETPRM

MOV
BR
Se:

CLOCK

007262

RESTRT

#EF . CONT INUE

BNCOMPLETE

020544
000100

103017
004737

START:

007256

103006
004737
012737
000461

104462
010001

JMP

READEF

START

#EF .RESTART

BCOMPLETE

103523

005037

#EF .START

BNCOMPLETE

024454

012700
104447

#-1,RESFLG

BCOMPLETE

103515

4185

024522
4524
024526
024526
024530

READEF

000037

000525

4201
4
4203
4204
4205

MOV

LSINIT::

BCOMPLETE

024452

024460

007216

103417

024442
024446
024450
024450

2} gg

INITIALIZE SECTION

AT THE BEGINNING OF EACH PASS.

4179
4180
4181
4182

2;' 3‘3

SEQ 0094

JSR

PC,CLKSET

MOV
P.RO
TRAP
CSCLCK
MOV
RO.R1
: IF NONE THERE GO SEE IF THIS IS LSI
B8CC
S3
: ELSE GO SET UP CLOCK INFO R VECTOR

CZCLFAO DMR,DMC-11 DATA
18-APR-80
CZCLKA.PT

OMM. LINK TEST

: 24

00000
001
000002
000111

MACY11_30A(1052) 1S-APR-80 09:24 PAGE 96

INITIALIZE SECTION

00725
16250
00725
0072

ADD

#2,CLKCSR

suB
MOV
BR

#2,CLKC
IPCLKEN CLKEN
RESTR

MOV

S3:

#PCLKCT,
S:CLKCSR

READBUS

007256

0100 CLKVEC

007252

MOV

ICLKEN CLKCSR

GMANID

;JPOINT CLKCSR TO P=CLK COUNT SET REG.
sLOAD CLK SET REG. WITH COUNT VALUE
sPOINT CLKCSR BAC TO P-CLK CSR
;SETUP THE ENABLE THE P=CLK DATA
;READ BUS TYPE TO SEE "TI?A‘PM Lgl

BNCOMPLETE
000100
007254
007262

SEQ 0095

;BR IF NOT, NO CHANCE OF A CLOCK
B8CC
S4

;LOAD 100 AS CLK VEC"N
LOAD 0 AS CLK INT. LEVE
;JKLUDGE UP THE CSR & EME DATA LOCS

L5060, CLKHZ,D,377,50. ,60.,
YES

TRAP

CSGMAN

WORD

CLKMZ

.WORD

5060

|51t

WORD

-WORD

012746
012746
0600
104417
062706

S4:

013712
000001

104432
000404
RESTRT:

007270
1$:

RESTRT

PRINTF

#NOCLK

EXIT

INIT

CLR
CLR

TIMMIN
TIMSEC

MOV
MOV
MOV
MoV
P

BNE

007212

NEW:

007212
007212

002012

GETPRM : INC
P

007212

024752

MOV

177777

100008:

WORD
WORD

100008

TSCODE

TSLOLIM
TSHILIM

s INFORM OPR. NO CLOCK, & EXIT INIT
MOV
#NOCLK ,~(SP)
MoV
#,-(SP)
MOV
SP,RO
TRAP
CSPNTF
ADD
#6 ,SP
TRAP
WORD

CSEXIT
L10013-.

;CLEAR TIME SINCE START LOCATIONS

CLKHZ, TIMTCK
#EVTLOG,R2
R2,EVTPIR
#-1,(R2)+

;LOAD TICKS/SEC

sINIT EVENT TABLE TO ALL 1°'S AFTER EACH
: START OR RES AND INIT TABLE POINTER

R2 HEVTEND

;SEE _IF REACHED END OF TABLE
;LOOP UNTIL DONE

#-1,LOGUNT

sINITIALIZE LOGICAL UNIT #

LOGUNT

sPOINT TO NEXT LOGICAL UNIT

BGE

LOGUNT ,LSUNIT

NEW

:SEE IF PAST MAX. LOG. UNIT #

GPHARD

LOGUNT ,R1

;GET THE P-TABLE FOR THIS LOG. UNIT
MOV
LOGUNT RO

BNCOMPLETE

GETPRM

:BR IF YES, AND START OVER

:IF NO P-TABLE AVAIL., GO GET NEXT ONE

8CC

GE TPRM

CZCLFAO DMR,DMC-11 DATA
CZCLKA.P11 ~ 18-APR-80

222&

0247564

011137

COMM. LINK TEST
MACY11 30A(1052)
09:24
INITIALIZE SECTION

007224

MOV

4265

?.222‘7’

011776
012000

MOV
MOV

025000 016137 ooooos

12002

MOV

4270 024776 005237 o12005

4272
42

025006 062
ggsou. 0161

000002
ooooog

012002
013%

4275
4276
4277
4278

0250
016;%7 000002
025036 062737 000004
025044 016137
000002
025052
000005

012006
012006
012010
012010

4279

sogs 062

025060

016137

000003

000002

012016
012020
012020
012022
012024

4290
4291

025146
025146

4293
429%
4295
4296
2292‘;

025152
025156
025162
025166
025170

025146

016137
016137
062737
016137
016137

000004
000004
000004
000006
000012

ADD

MOV
ADD
MOV
ADD

ENDIT:

012746

012746
013746
012746
104437
062706

000340

#2,SEL2
2(R1) ,BSEL3

ADD

025110
025116
025126
025132
025140

000007

ADD
MOV

012014

4284
4285
4286
4287
2223'6

2225 025102

2(R1) ,SELO
2(R1) .BSEL1

BSEL1

MOV

012012
012014

PAGE 97
SEQ 0096

:PUT FULL OR HALF DUPLEX ANSWER IN LOC.

:STORE AWAY CSR ADDRESSES

2(R1),SEL2

#3,8SEL3

2(R1),SEL4
#4,SEL4
2(R1) ,BSELS
#5,BSELS
2(R1) ,SEL6

ADD
MOV

#6, SEL
2(R1) ,BSEL7

MOV
MOV
ADD
MOV
MOV

4(R1), INVEC
4(R1) .OUTVEC
#4,0UTVEC
6(R1) , INTPRI
12(R1) ,0PTYP

;BUILD OUTPUT INTERRUPT VECTOR
:STORE AWAY INTERRUPT PRIORITY
:STORE AWAY DEVICE OPTION TYPE

SETVEC

CLKVEC,#CLKINT,#340

;SETUP CLOCK VECTOR

#7 ,BSEL7

020570
007256

:STORE AWAY INPUT INTERRUPT VECTOR

MOV

MOV
MOV
MOV
TRAP
ADD

000010

22%
4301
4302
4303

(R1) ,FHDPLX

INC

012012

4280
025066
7
4281 025076 016137 000002

4292

09:24

;DEVICE DEPENDENT PART OF GETTING INFO FROM P-TABLE

4268 0264760 016137 000002
4269 024766 016137 000002

427%

F 8
18-APR-80

#340,~(SP)

#CLKINT,-(SP)
CLKVEC,~(SP)
#3,-(SP)
CSSVEC
#10,SP

;DEVICE DEPENDENT VECTOR SETUP
025174
025174
025200

013746
012746
013746
012746
104437
062706

012022
034700
012016

4306
4305
4306
4307
4308
4309
4310
4311
4312
4313
g}g

025244

062706

000010

4316
4317

025250
025250

012700

000000

025206
025210
025214
025216
025222
025222
025
025232
025236
025242

013746
012746
013746
012746
104437

000010
012022
034710
012020
000003

SETVEC

INVEC.#DVINS, INTPRI

OUTVEC,#DVOUTS,INTPRI

:SETUP INPUT INTERRUPT VECTOR
MOV
MOV

MOV
MOV
TRAP
ADD
;SETUP OUTPUT INTERRUPT VECTOR
MOV
MOV
MOV
MOV
TRAP

ADD

SETPRI

#PRI0O

;SET THE *RUN'’ PRIORITY TO 0
MOV

INTPRI ,~(SP)
#DVINS
.- (SP)
INVEC,~(SP)
#3,-(SP)
CSSVEC
#10.5P
INTPR] ,~(SP)
#DVOUT
- (SP)
S
ogmc.-(sm
#3,-(SP)
CSSVEC

#10,5P

#PRI00,RO

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

4318
4319
4320
4321

025254
025256
025256
025260

18-APR-80 09:24

104441

104432
000002

4324
4326
4327
4328

MACY11 30A(1052) ‘lg-APR-BO 09:24 PAGE 98

INITIALIZE SECTION

EXIT

SEQ 0097

INIT

TRAP

C$SPRI

TRAP
.WORD

CSEXIT
L10013-.

TRAP

CSINIT

.EVEN
025262
025262
025262

ENDINIT
104411

L10013:

CZCLYAO DMR,

CZCLKA.PTT

=11 DATA COMM. LINK TEST

18-APR-80 09:24

MACY11 30A(1052)
AUTODROP SECTION

09:24

PAGE 99

SEQ 0098

AUTODROP SECTION

+
+

.SBTTL

H 8
18-APR-80

THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF

THE '‘ADR'' FLAG WAS SET.
THE UNIT(S) UNDER TEST ARE CHECKED TO
SEE IF THEY WILL RESPOND.
THOSE THAT DON'T ARE IMMEDIATELY
DROPPED FROM TESTING.

104461

L10014:

TRAP

CSAUTO

ENDAUTO

025264
025264
025264

LSAUTO: :

BGNAUTO

025264
025264

8
MACY11 30A(1052) ILAPR-BO
09:24 PAGE 100

CZCLVFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24
CLEANUP CODING SECTION

4345

.SBTTL

SEQ 0099

CLEANUP CODING SECTION

;
T"E CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED
AFTER
THE HARDWARE TESTS HAVE BEEN PERFORMED.

BGNCLN

005077

161760

012700

000340

104441

104433
104432
000002

CLR

SETPRI

aCLKCSR

#PRIO7

BRESET
EXIT

ENDCLN

104412

LSCLEAN::

;DISABLE CLOCK
;SET PROCESSOR PRIORITY BACK TO 7

sCLEAR ALL BEFORE END
CLN

L10015:

MOV
TRAP

#PR107,RO

TRAP

CSRESET

TRAP
.WORD

CSEXIT
L10015~-.

TRAP

CSCLEAN

C$SPRI

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLRA.PI

18-APR-80 09:24

8
MACY11 30A(1052) 1‘-APR-80
09:24 PAGE 101

DROP UNIT SECTION

43;;

.SBTTL

4374

i4e

2376

: TO NO LONGER BE TESTED.

4375

; THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE

025310

4385 025310
438,
4385

BGNDU

025310

095310
025312

000167
000000

4388

WORD
"WORD

JSUMP
L10016-2-.

é,
|

.EVEN

4390 025314
4392

EXIT

LSDU: :

025314

ENDDU
104453

L10016:

|
TRAP

Ccsbu

RERRRNwrw—=
T

4380

DROP UNIT SECTION

TR TARNET

4379

SEQ@ 0100

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
CZCLKA.PI
18-APR-80 09:24
ADD UNIT SECTION
.SBTTL

K 8
18-APR-80

09:24

PAGE 102

SEQ 0101 |

ADD UNIT SECTION

THE ADD=UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
;g ?EWE¥E§¥TE$CI{? CONJUNCTION WITH THE ADDING OF A UNIT BACK

4401

025316

4405
4406
4407

025316
025316
025320

4412

025322

4414

025322

BGNAU

025316

025322

000167
000000

EXIT

ENDAU

104452

LSAU: :
AU

L10017:

JSJMP

.WORD
.WORD

L10017-2-.

TRAP

CSAU

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
18-APR-80 09:24
TEST 1:

CZCLKA.PT

LSBTTL

MACY11 30A(1052) 1%-APR-80 09:24 PAGE 103

SEQ 0102 |

SETUP AND MODES OF OPERATION

TEST 1:

SETUP AND MODES OF OPERATION

.44

TEST TO DETECT FAULTS IN THE DATA COMMUNICATION LINK.

THIS TEST WILL

; THE PROVIDE COVERAGE NECESSARY TO ISMTE FAILURES TO THE COMPUTER
H EOUIP*NT THE COMMUNICATION LINK, OR THE MODEM.

025324
025324

BGNTST

.SBTTL
007262

161720
GTXRXB:

000001
007272

007272

GTRA2:
18:

PROGRAM SETUP SECTION
MOV

CLKEN,@CLKCSR

;ENABLE THE CLOCK

CLR
MOV
TST

R1
#1,TIMERT
TIMER1

sSET TIMER TO COUNT 1 TICK
sCHECK FOR IT TO BE COUNTED OFF

gEEg

BNE
013712
000001

GTRA3:

T::

g{W

PRINTF

#NOCLK

TST

RESFLG

BNE

GTRAS

sBRANCH IF CLOCK EXISTS (COUNTED A TICK)

;KEEP CHECKING UNTIL R1 DOES FULL COUNTDWN

sPRINT BAD CLK MSG AND WARN OF HANG IF TIMEOUT

MOV
MoV
MOV
TRAP
ADD

#NOCLK ,~(SP)
7 ,-(SP)
SP.RO
CSPNTF
#6,SP

sSEE IF HERE AFTER A RESTART.

sBR IF HERE CAUSE OF A RESTART

s CLEAR COUNTS AND SET UP DEFAULTS
GTRA4:

CLR

CLR
MOV
MOV
CLR
MOV
ASL
ASL
MOV

ADD

MOV

TOTCC

'CLEM TOTAL CHAR. COUNT TEMP. LOC.

CTOoTCC
#PTRTAB ,R1
R1,TXPTR
RXPTR
MMSGLIM,
R2
R2
174
R1,.CMPPTR

: CLEAR TOTAL CHAR. COUNT FOR CMP BUFF
1IT TRANSMIT MESSAGE POINTER

TTOTCC

s CLEAR TOTAL CHAR. COUNT FOR TX BUFF

;s ZERO RX POINTER

RZ CMPPTR

sINIT COMPARE MESSAGE POINTER

#5 ,MSGTYP

sSET UP DEFAULT MSG TYPE (QUICK FOX = ITEP MSG)

MOV
MoV
MOV

HSGSC CURCC
lTXEf TCURAD
W CCURAD

sSET UP DEFAULT CHAR COUNT
SET UP CURRENT ADD TO START OF TX BUFFER
.'SET UP CURRENT ADD TO START OF CMP BUFFER

MOV

TCURAD ,CURADD

;SETUP CURRENT ADDR TO START OF TXBUF

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLRA.PT
18-APR-80 09:24

025510

&%233 012

007100
022676
000001

007162
007120

0071

GTRAS :

M8
18-APR-80

MACY11 30A(1052)

PROGRAM SETUP SECTION

MoV
JSR
MOV
MOV
MOV
MOV
MOV
JSR
MOV
MOV
CLR
MOV
MOV

TXPTR, CPTR
PC ,BLDBUF
#1.TXMTOT
CMPPTR, CPTR
CCURAD . CURADD
#S _MsGTYP
nsesc CURCC
PC .BLDBUF
#1.CMPTOT
#ACT ,MODTYP
MLTYP
#1.RPASS
#2.PARAM

PRINTF

#HLPO

MOV
MOV
MOV
MOV
JSR

MODTYP,DEV1
MLTYP,DEVe
RPASS.DEVY
PARAM
. DE V4
PC., SHWOP

MANUAL

000001
030634

RPASS

EXIT

TST

BNE
007222

1%:

MOV
JWP

.SBTTL

003325
003324

GETCL:

PAGE 104

SEQ 0103 |

sSETUP CURRENT POINTER TABLE POINTER FOR TXBUF
: GO BUILD POINTER TABLE AND BUFFER
;BUMP TOTAL MESSAGE COUNT
sSET UP START OF COMPARE POINTER TABLE
sSET UP CURRENT ADDR. TO START OF CMPBUF
sPUT DEFAULT MESSAGE INTO CMPBUF
;BUMP THE COMP MESG COUNT
sSET DEFAULT MODE= ACTIVE
sSET DEFAULT MAINTENANCE LOOP MODE =NONE
SET UP DEFAULT ‘RUN PASS"* COUNT TO 1
ET UP PROG. PARAMETERS = DATACHECKING ENABLED
OPERATOR STATUS MSGS. PRINT OFF

MOV
MOV
MoV
TRAP
ADD

GETCL

#TTL MLTYP
GTR9

BR IF YES (UAM=0 AND NOT CHAI'ED)

B8Cs
SEE IF THIS IS FIRST ‘DCLT PASS"*
: BR IF NOT COMPLETED 1 PASS

770

pon—
GETCL

: IF DONE 1 PASS IN UNATTENDED MODE - EXIT

TRAP

WORD
;SET _UP DEFAULT FOR UNATTENDED MODE

CSEXIT

L10020-.

'R M=ACT/LO=1/PAS=1/NOST/CH'* AND RUN

COMMAND LINE FETCH & INTERPRETATION SECTION

CLRB
CLR8
GMANID

PSGDBD

;CLEAR CMD LINE PARSING ERROR FLAGS

CLISPM, CMDBUF ,A,0,1,72.
,NO

sGET A COMMAND LINE FROM OPR.
T RAP

CSGMAN

.WORD

CMDBUF

B8R

003062
010344
026664

#HLPO
- (SP)
#1,-(SP)
SP.RO
CSPNTF
#6,SP

;PRINT TO OPERATOR THE CURRENT MODE......

;SEE IF MANUAL INTERVENTION N.LGED

BCOMPLETE
007230

09:24

MOV
MOV
MOV

#CMDBUF ,PSBUF A
#CLITRE .PSTREE
#CLIACT .PSACT

100008:

.WORD
WORD
MORD
LWORD
LWORD

100008

TSCODE
CLISPM
O
TSLOLIM
TSHILIM

000004
025724
003324

18:

012152
000001
000004
025724

000005

108:

000055

118:

000001

128:

000010

4S:

007166
001000

5$:

JMP
S8
BEQ
PRINT F

GETCL
PSNNUF
108
#CLINUF

gyl

000052

PC_PSTRV
P$GDBD
1$
#CLIERM

LI VETILATRINE §

012122
000001

CLR
JSR
TSTB
BEQ
PRINT F

p—y

003206
023274
003325

QUALFG

GETCL
KZEMI MNSETEXP
TTOTCC,TOTCC
{(s);CC LMBUFLIM
#MSGTRN, #BUFEX

SEQ 0104

sCLEAR QUALIFIER FLAG LOCATION
:GO PARSE COMMAND L INE
:SEE IF PARSED OK OR AN ERROR

MoV
MOV
MoV
TRAP
ADD

;SEE IF INCOMPLETE COMMAND TYPED

MOV
MoV
MoV
TRAP
ADD

—

333cA 23
-

007100

158:

TT0TCC

TXMTOT

n;‘nséun

#CLINUF ,~(SP)
1 ,-(SP)
SP,RO
CSPNTF
#%,SP

:SEE IF HELP WAS TYPED
:GO GET CMD AGAIN IF YES
*SEE IF PRINT WAS TYPED
: GO GET CMD AGAIN IF YES
*SEE IF RUN WAS T
: BR IF NO
: START EXEC. IF YES
:SEE IF DUMP WAS TYPED
: BR IF NO
: ELSE, DUMP PART OF
Y
: THEN RETURN TO GET ANOTHER CMD.
:SEE IF CLEAR WAS TYPED
: IF YES, BACK TO GET ANOTHER CMD.
*SEE IF SHOW WAS TYPED
: IF YES, BACK TO GET ANOTHER
CMD.
*SEE IF SET EXPECTED
: BR IF YES (A SETEXP WAS TYPED)
:SEE IF BUFFER ALREADY FULL

: BR IF NOT FULL (BUFLIM # OF CHARS.)
: ELSE TELL OPR. AND DON'T BUILD MSG.

MoV
MOV

o
TRAP

GETCL

#CLIERM, ~(SP)
# ,-(sP}
SP.RO
CSPNTF
#4,5P

ADD

THEN GO GET A NEW COMMAND

#BUFEX,~(SP)
MMSGTRN, - (SP)

S
c:hm

IF FIRST "SEY" THEN GET RID OF DEFALLT

;GET POSITION OF END OF TX LIST
sSEE IF MSG COUNT EXCEEDED.
B8R IF NO

BRI~

N 8
MACY11 30A(1052) 18-APR-80 09:24 PAGE 105
COMMAND LINE FETCH & INTERPRETATION SECTION

CZCLYAO DMR,DMC~ 1" MTAOS%. LINK TEST
CZCLRA.P
1

8.2

18-APR-80
09:24 PAGE 106
COMMAND LINE FETCH & INTERPRETATION SECTION

SNNN

PRINTF

2%JIBEES

MACY11 30A(1052)

W#MSGTRN, #TABEX

SEQ 0105 |

; ELSE TELL OPR. AND DON'T BUILD MSG.

MOV
MOV
MOV

—

4585

elelele)

CZCLFAQ DMR,M‘IE-A;RATAOSW LINK TEST
CZCLKA.P11

MOV

W
NNN==Y

TRAP

GETCL
R1
R1
R1,TXPTR
TXPTR,CPTR

17%:

007162
007164
007100
007122
007124

CPTR, TXPTR

ToTCC, TTOTCC
CURADD, TCURAD
TXMTOT
QUALVL

025724

GETCL

007106
007166

CTOTCC,TOTCC
TOTCC,#BUFLIM
16$

#MSGTR
, #BUFEX
N

014033
014051
000002

168:

ADD

THEN GO GET A NEW COMMAND.

#TABEX ,~(SP)
MMSGTRN, = (SP)
'2’;65P5
SP

CSPNTF

#6,SP

:# OF MSGS =4 = NEXT FREE PTR BLOCK

;SETUP CHAR. COUNT, CURRENT ADDR, £ PTR
;ADD IN CHAR. COUNT AND CHECK TOTAL
;GO BUILD MESSAGE IN BUFFER AND PTRS.
;UPDATE CHAR. COUNT, CURR ADDR, & PTR
;DEC THE COPY COUNT

;SETUP CHAR. COUNT, CURR.
. &£ PIR
:SEE IF BUFFER ALREADY FULL
: BR_IF NOT FULL (BUFLIM # OF CHARS.)
; ELSE TELL OPR. AND DON'T BUILD MSG.
MOV
#BUFEX B (SP)
MOV
MSGTRIS.
~(SP)
MOV
#2,-(
MOV
SP,RO
TRAP
CSPNTF
ADD
#6,SP
: THEN GO GET A NEW COMMAND
;IF FIRST "SET'' THEN GET RID OF DEFAULT

7$:

sINIT COMPARE MESSAGE POINTER
]

#MSGTRN, #TABEX

SEE IF MSG COUNT EXCEEDED.
: BR_IF NO
; ELSE TELL OPR. AND D(N"‘TWWILD MSG.

MOV
MOV
MOV

000006
025724

TRAP

18%:

JMP
ASL
ASL

GETCL
R1
R1

: THEN GO GET A NEW COMMAND.

#TABEX - (SP)

mscrm -(SP)
2,~(SP)
SP‘RO
CSPNTF

#6,5P

:# OF MSGS *4 = NEXT FREE PTR BLOCK

CZCLYAQ DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11 ~ 18-APR-80 09:24

4641

MOV

R1,CMPPTR

464G

JSR

PC.ADDCC

;ADD IN XHAR. COUNT AND CHECK TOTAL

INC
MOV

CMPTOT
CURADD , C CURAD

;UPDATE CHAR. COUNT, CURR ADDRR. & PTR

4645

4646

4647
4648
4649
4650
4651
gg

4654
4655
4656

026614

026620

137

00710,

13737 007110

004737 052

004

007164

0 ;676

4% 853 7 007162 007102

026644
026652
026656
026660

5
007104
013737 007164 007110

013737 007166 007106
005337 003210
001261
000137 025724

ADD

SEQ 0106

464 m §?§7§; oo71o§ 007162

464

026574

1 30A(1052) 18~APR-80 09:24 PAGE 107

cm INE FETCH & INTERPRETATION SECTION

MOV
JSR

MOV

MOV
DEC
BNE
JMP

CMPPTR, CPTR

CCURAD, CURADD

BLDBUF
cpfn.cmm

TOTCC,CTOTCC
QUALVL
2s
GETCL

:1F_COPY WAS GIVEN, PUT MSG IN BUFF
AGAIN
260 BACK UNTIL GET A “RUN'*

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLRA.P

18-APR-80 09:24

4658

4659
4660
4661
222;

4664
4665

026664

6278§
026702

4666

852676 00471
700

00020

4669
4670
4671
46
46

702
704
706
026710
026712

000142
000144
000154
001530
000244

4667

4676
4675

026714
026716

4678

026724
026
026
026732
026734

4676
46
4679
4680
4681
4682

026
026722

4683
4684
4685
4686
4687

026736
026740
026742
026744
026746

4689

026752

4692

026760

4688
4690
4691

000164
000270

000416
000740

000750
000766
000776
001006
001100

001246
001264

026762
026764
026766
026
026
0267764
026776
027000

001314
001324
001344
001352
001362
001372
001402
001430
001440

470§
470

027004
27006

1552
%1604

4704
4705
4706
4707

027010
027012
027014
027016

.WORD
.WORD
.WORD
.WORD
.WORD

ACTNUL-10$
ACTCLR-10$
ACTSHO-10$
ACTCHK-10%
ACTRUN-10$

.WORD
.WORD

ACTHLP-10%
ACTCSE-10%

.WORD

ACTSTT-108

.WORD
.WORD

.WORD
.WORD
WORD
.WORD

ACTCST-108%
ACTSTE-10$
ACTSZE-10%
ACTCOP-10$
ACTNUM-10%
ACTOPM-10%
ACTSTS-108
ACTEQO-10$
ACTMSO-10$
ACTMS1-108
ACTMS2-10%

WORD

ACTMS3-10%

.WORD
WORD

ACTMS5-10%
ACTMS6~-10%

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

ACTMS4-10%

ACTATV-10$
ACTPAS-10%
ACTREC-10%
ACTLIS-10$
ACTDLL-10$
ACTTRA-10%
ACTTAL-10%
ACTNO-10%
ACTECH-10$

1614
N‘lgil‘o
001
001644

.WORD
WORD
.WORD
.WORD

ACTMOP-10%
ACTTLP-108
ACTCLP-10$
ACTLLP-10$

471
4712

057058
0270

000674
000724

027032

108:

PC (RZ)

ACTCRC-108%

001654
000134

4713

JSR

.WORD

02
0277852
027024

RTS

%15‘4

4708
4709

4710

18$(R2) R2

WORD

026
026

027002

MOV
ADD

001236

001226

001156
000716

09:24

PAGE 108

.SBTTL
ACTION TABLE AND ROUTINES
i
H
USER MUST CLEAR/SET PSGDBD IF USE "‘CLIBIF'' IN CONNECTION WITH ACTION
:
R2 WILL HOLD ACTION CODE FROM PARSING (CLI) NODE
CLIACT: ASL

.WORD
.WORD
.WORD
.WORD
.WORD

026

D 9
18-APR-80

cuww INE FETCH & INTERPRETATION SECTION

001536
001120
001200
001206
001216

4693
4696
4695
4696
4697
4698
4699
4700
4701

1 30A(1052)

.WORD
.WORD

.WORD
WORD

.WORD

.WORD
.WORD
.WORD

ACTPRO-10$
ACTRPS-10%

ACTRLP-10%
ACTNUF-10$

ACTBCR-10%

ACTDMS-10$
ACTDME-10$
ACTDMQ-10%

;FORM ADDRESS OF ACTION ROUTINE

SEQ 0107 |

CZCLVFAOQ DMR,DMC~11 DATA COMM. LINK TEST

CZCLKA.PT

7}45.

4716

027034

18-APR-80 09:24

000230

9
MACY11 30A(1052) 1S-APR-80
(9:24 PAGE 109
ACTION TABLE AND ROUTINES

.WORD

ACTPRT=10%

SEQ 0108

MACY11 30A(1052)

CZCL¥AOQ DMR,DMC- 11 DATA COMM, LINK TEST
18-APR-80 09:24
CZCLKA.P1T

G
18-AP'£R-80

ACTION TABLE AND ROUTI

09:24

PAGE 110

SEQ 0109

027036
027044

112737
000207

177777

003324

ACTNUF : MOvB
ACTNUL: RTS

#-1 ,PSNNUF

;SET FLAG TO SAY NEED MORE OF COMMAND
;RETURN TO PARSER

027046
7054

012737
000207

000001

003204

ACTCLR: MOV
RTS

#CLEAR KEYWD1
PC

;SET LOC TO SAY A CLEAR WAS TYPED

012737
000207

000002

003204

ACTSHO: MOV
RTS

#SHOW,KEYWD1

sSET LOC. TO SAY A SHOW WAS TYPED

012702

003212

ACTHLP: MOV
PRINTF
1$:

#HLPTAB,R2
#HLPF , (R2)+

;SETUP R2 AS A POINTER TO HELP MSG TABLE
;PRINT HELP INFORMATION MESSAGES
(R2)+,-(SP)
MOV
#HLPF ,=(SP)
MOV
#2,-(SP)
MOV

012520
000002

MOV
TRAP

000006
003230

'1‘% +AHLPEND
#HLP KEYWD1

sSEE IF ALL INFO PRINTED YET
:IF _NO KEEP PRINTING
sSET LOC. TO SAY A HELP WAS TYPED

000005

003204

000055
021406

003204

ACTPRT:

#PRNT ,KE YWD

;SET LOC. TO SAY A HELP WAS TYPED
sCALL ROUTINE TO PRINT EVENT LOG AND BASE TABLE

003204
003324
007230

ACTRUN:

#RUN,KE YWD1
#-1,PSNNUF
#1 ,RPASS

:SET RUN FLAG

;E ~REPORT

ACTCSE:

007104

:SET DEFAULT RUN ‘PASS' TO 1

:gSGLIH.RZ

CMPTOT ,R2

000002

;SET FLAG TO SAY NEED MORE OF COMMAND

#PTRTAB,R1

R2
R1,CMPPTR
R2,CMPPTR
CMPPTR,R1
PSNNUF
KEYWD1,#SHOW
ACTSHW
#1,CMPTOT
CcToT1CC

sINIT COMPARE MESSAGE POINTER

;FLAG THAT HAVE VALID COMMAND AT THIS PT.
:SEE IF A CLEAR OR SHOW WAS TYPED
:BR IF A SHOW WAS TYPED

CLEAR COMPARE MESSAGE COUNT, CHAR. COUNT
: AND RESET POINTER

#PTRTAB
R

;gSGLIH,RZ
R2
R1,.CMPPTR

0
027312

007162

010137

SP.RO
CSPNTF
#6,SP

R2,CMPPTR

CMPPTR, CPTR

,R1
#CMPBUF
R1,CCURAD

sINIT COMPARE MESSAGE POINTER
sSET UP TO FILL IN DEFAULT MESSAGE

|
|
.

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

MACY11 30A(1052) 18~APR-80 09:26 PAGE 111

277;2 027316 000431

CZCLKA.P11

4775
4776

~ 18-APR-80 09:24

015701 006326
01 70; 007120

4777

4781

4
4
4784
zg

027352

005037

4787

012702

4778 02
4779 027342
4780 02

105037

023727
0014
012737

003324

000002

000001

007120

027356 012737
027364 013737
027372 012701
027376 010137

006326
007100
003326
007124

007100
007162

027402

001000

4788 027406
4789 027412
4790 027420

010137
012737
013737

007164
000005
002162

4793 027432
479% 027434
ZQ

027440

00137
004737

4797
4798
4799

027442
027446

012705
122571

4791
4792

4800
4801
4802

027426
027430

027452
027454
027460

105021
00530

000207

001404
020527
001372

4803

027462

4807
4808
4809
4810
4811
4812
4813
4814

027500
027500
027504
027510
027514
027520
027522
027524

013746
016546
012746
012746
010600
104417
062706

027534

005302

4804 027464
4805 027470
4806 027472

4815

4816

027530

005205

162705
006305
016137

062701

4817

027536

001341

4819

027546
027554
027562

013737
013737
013737

027574

000207

4,818

ACTCST: MOV
MOV

003204

007122

ACTION TABLE AND ROUTINES

CLRB

#PTRTAB, TXPTR
TXPTR, CPTR
#TXBUF ,R1
R1, TCURAD

ACTCLB: MOV

022676

BNE
JSR

18
PC ,BLDBUF

003250
000000

ACTSHW: MOV
5$:
CMPB

18:

CLRB
DEC

RTS

BEQ
P
BNE

003257

003251
000002

INC

68:

SuB
ASL
MOV

007172

PRINTF

007172
003230
013251
000003
000010

000004

ADD
DEC

007220 010334

007222
007230
007226

010336
010340
010342

#SHTAB
RS
(R5)+,a(R1)

6$
RS, #SHTEND
1

#SHTAB+1,RS
RS
2(R1)
, TEMP

#4,R1

MLTYP,DEV2
RPASS
. DEV3
PARAM
. DE V4

RTS

ACTDMS: MOV

4827
4828

027610
027616

012737
000403

000052

003204

MOV
BR

JSR
CLR

:FLAG THAT HAVE VALID caww AT THIS PT.

:SEE IF A CLEAR OR SHOW WAS TYPED
*BR IF A SHOW WAS TYPED
;CLEAR TRANSMIT MESSAGE COUNT, CHAR. COUNT
: AND RESET POINTER

;SET UP TO PUT DEFAULT MSG IN LIST AFTER 033°S
:FILL_EXPT OR TRAN BUFFER WITH 0'S IF A CLEAR
:DO "BUFLIM NUMBER OF BYTE LOCATIONS

:"'CLEAR’* REALLY MEANS TO PUT DEFAULT MSG IN
*WHEN DONE., RETURN TO PARSER

;:LOOK AT FIRST BYTE OF MSG TO DECIPHER TYPE

;SEE IF LOOKED AT ALL OF DEFAULTS YET
:MUST BE OPR. SPEC'D THEN

#SHMSG,SHTYTB(RS)
,TEMP

MOV
MOV
MOV

007146

007152

ACTSHW

MOV

003320

023022

(R1)+
R2

BNE

013737

005037

#BUFLIM,R2

R1. CURADD
lS "MSGTYP
nsssc CURCC

007154
007156

027576

027604

TTOTCC

MOV
MOV
MOV

4825

4826

PSNNUF

MOV
MOV
MOV
MOV

027570

004737

#PTRTAB,R1
TXMTOT ,R2

KEYWD1,#SHOW
ACTSHW
#1,TXMTOT

4821
4822

,,”33,,

ACTCLB

CMP
BEQ
MOV
CLR

SEQ 0110

:PRINT MSG SIZE & TYPE

MoV
MOV
MOV
MOV
MOV
TRAP
ADD

;BUMP R1 TO NEXT SET OF POINTERS

TEMP,~(SP)
SHTYTB(RS) ,~(SP)
#SHMSG, ~(SP)
#3,-(SP)
SP.RO
CSPNTF
#10,SP

MODTYP,DEV1

PC , SHWOP

;SHOW THE OPERATOR THE CURRENT MODE..... ALSO

PSNUM, STADD

;SETUP STARTING ADDRESS FOR DUMP

#DMPS KE YWD1
ACTDME

;FLAG THAT A DUMP WAS TYPED

BYTBIT

:SET DEFAULT OF WORD DUMP

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

4829
4830
4831
gfig

027620
027626

8%;228

012737
013737

683%7

177777
003320

003324

007152
007150

MACY11 30A(1 052)
18-APR-80
ACTION TABLE AND ROUTINES

ACTDMQ: MOV
ACTDME: MOV

ACTDMX : %gs

#-1,BYTBIT
PSNUM, ENADD
:?Nf

09:24

PAGE 112

;SET DUMP FLAG TO ‘'DUMP-WORD'’
;SETUP END ADDRESS FOR DUMP (=START IF NO ‘EEE'’
:CLEAR NOT-ENOUGH FLAG, ‘DUMP N-N/B’'‘ IS VALID

SEQ 0111

MACY11 30A(1052) 18-%-80 09:26 PAGE 113

CZCLFAO DMR.DMC-11 DATA COMM. LINK TEST
18-APR-80 09:24
CZCLKA.P1T

SEQ 0112

ACTION TABLE AND ROUTINES

4835

8%7650 000403

7642

012737

000010

003204

ACTSTE: MOV
BR

027652
027660
027666

012737
012737
000207

000011
000001

003204
003210

ACTSTT: MOV
ACTSTX: MOV

012737
000207

000012

003206

ACTSZE: MOV
RTS

000013

003206

ACTCOP:

#QCOPY,QUALFG
PC

003206

000012

ACTNUM:

QUALFG.#SIZE
1$

;SEE IF A SIZE OR COPY TYPED
;BR IF IT WAS A COPY

; BR IF NO

RTS

003320

#SETTRN KEYWD1
#1,QUALVL
PC

003320

007156
1%:

007154

ACTOPM:

ACTEQO:

1$:

ACTBCR:

3 8373333343

-2

D =

003210

33 8338383

003325

wne

000004
177777

RTS

sSET UP DEFAULT COPY TO 1 (/COPY=0)

#S1ZE ,QUALFG

#CLISEO

012411
000001

§85ERERE: ;

#SETEXP ,KEYWD1

ACTSTX

sCHECK TO BE SURE DIDN'T TRY SIZE=0
MOV

MOV
MOV
TRAP
ADD

g‘l .P$GDBD

:SEE ERROR=-IN-CMD FLAG

gnm.cmcc

;IF A SIZE LOAD CURCC WITH BYTE COUNT

PSNUM, QUAL VL
QUALVL
ACTMEX

:IF A COPY, LOAD COPY COUNT
: INCREMENT SO FIRST DEC MAKES IT REAL #

#7 ,MSGTYP
R4, TEMP

#CLISEOQ,-(SP)

#1,-(SP)
SP.RO
CSPNTF
»s ,SP

;KEEP TRACK OF START OF QUOTED TEXT
; SO CAN CALC OPCNT AT END OF QUOTES

sCALC BYTE COUNT FOR QUOTED TEXT
#OPBUF RS
(R1)+,(R5)+

R2
1$
ACTMEX

#CLIBCR

:COPY QUOTED TEXT TO OPBUF

;BAD CHAR. IN OPR. QUOTED STRING
MOV
MOV
MOV
TRAP
ADD

#CLIBCR,~(SP)
#1,-(SP)
SP.RO
CSPNTF
#5,SP

CZCLrAO
ifl

CZCLKRA.P1

MACY11 30A(1052) 1‘-APR-00 09:26 PAGE 114

=11 DATA COMM. LINK TEST
09:24

007154

CLR
B8R
ACTMS1: MOV
BR
ACTMS2: MOV
B8R
ACTMS3: MOV
BR
ACTMSS: MOV
BR
ACTMSS: MOV
ggv
ACTMS6: MOV
MOV
ACTMET: MoV
ACTMSO:

000001

007154

000002

007154

000003

007154

000004

007154

o0 007154
007156
s 007156
007154

000100
003324

ACTION TABLE AND ROUTINES

007156

: %usa
ACTMEX

MSGTYP
ACTME1
#1,MSGTYP
Asfm
#2 ,MSGTYP
AS 1
#3,MSGTYP
ACTMET
n.nssm
ACTME
#5 nscm
ngcsc,CURCC
#6 ,MSGTYP
MSG6C, CURCC
#64. ,CURCC
;?wr

sSETUP DEFAULT SIZE FOR THIS TYPE

:SETUP DEFAULT SIZE FOR THIS TYPE
:SETUP DEFAULT SIZE FOR MSGO-4

*CLEAR NOT-ENOUGH FLAG

SEQ 0113

CZCLFAD DMR, 3 =11 DATA0302?. LINK TEST
CZCLKA.PIT

0302
0302
0

012737
000432

000003

007220

ACTATYV:

000002
003324
007222

007220

ACTPAS:

007220

K 9
18-APR-80

ACTION TABLE AND ROUTINE

007220

ACTLIS:

000004

007220

ACTDLL:

000001

007220

ACTTRA:

000005

007220

ACTTAL:

000004
003324
007222

007226

ACTM2X :

PAGE 115

#ACT ,MODTYP

#PAS ,MODTYP

PSNNUF
MLTYP
PC

ACTREC:

000006

09:24

ACTM3X

s CLEAR NOT-ENOUGH FLAG
;CLEAR MAINT LOOP TYPE

MODTYP

ACTM2X

322 3 93 93 33

030216
030224

MACY11 30A(1052)

#LIS, MODTYP

ACTM2X

#DOW,MODTYP

ACTM2X

#TRA ,MODTYP

ACTM2X

#TAL ,MODTYP

#ECHOB
, PARAM
PSNNUF
MLTYP
PC

:DISABLE /ECHO (ALL BUT PASSIVE MODE)
;CLEAR NOT-ENOUGH FLAG
;CLEAR MAINT LOOP 1YPE

SEQ 0114

MACY11 30A(1052) 13-“-80 09:26 PAGE 116

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLRA.PT
18-APR-80 09:24
4939
232(1)

030332
030340

012737
000207

000036

003206

ACTION TABLE AND ROUTINES

ACTNO:

MoV
RTS

i g g 000036 003206 ACTECH:

4944
4945

022737

030
“%

0%366

737
001416

000002

498
4949
4950

030370
030376
030400

012746
012746
010600

012301
1

4953

030404
030410

062706
112737

000004
177777

4946
4947

007226
007220

#ECHOB, PARAM

gAS.MTYP
#CLINPS

003325
007226

030416
030426
030430

042737
005037
000476

000004
003206

4958

030432

012701

000002

ACTCHK:

4961

030440

012701

000001

ACTSTS:

4964
2322

030446
030452

012701
000402

000020

ACTCRC:

232;

030454

012701

000040

ACTPRO:

4969
4970
4971
4972
4

030460
030464
030472
030476
030500

050137
022737
001002
040137
005037

007226
000036

ACTQFG:

007226
003206

4976

030506

013737

003320

007230

ACTRPS:

23773

030504

030514

000450

003206

1$:

4979
4980
4981

030516
0305264
030526

012737
17
012737

000005

007222

ACTMOP:

000001

007222

ACTTLP:

&
4984
4985
4986
2%

030536
030544
030546
030554
030556

012

000002

007222

ACTCLP:

000003

007222

ACTLLP:

000004

007222

ACTRLP:

4989
4990
4991
4
4993
4996

030564
030572
030576
030602
030606
030606

022737
001415
112737
005037

000003

007220

ACTLPX:

177777
007222

003325

012746

012237

‘%

030534

7};

7
012737
000403
012737

o353 393338383 B3 BCTXF

28;;

030444

(7]

030436

—

2323

1$:
28:

TM b

4956
4955
Z’g?

104417

#NO,QUALFG
PC

?:).MFG

4951

SEQ 0115

PRINTF

;BE SURE IN PASSIVE MODE IF

:IF TRYING TO SET /ECHO

MOV
MOV
MOV
TRAP
ADD

#-1,P$GDBD

#CLINPS ,-(SP)
#1,-(SP)
SP.RO
CSPNTF
w6 ,SP

#ECHOB, PARAM
QUALFG
ACTLXX

;CLEAR "NO'* OUT OF QUALIFIER FLAG

#DATCKB,R1
ACTQFG

:SET DATA CHECK BIT

#STATB,R1
ACTQFG

;SET THE STATUS BIT

#CR(CB_R1
ACTOFG

;SET THE CRC BIT

#PROTOB.R1

:SET THE PROTOCOL BIT

R1,PARAM

fsn.MFG
R1,PARAM
QUALFG
ACTLXX

sCLEAR "NO'' OUT OF QUALIFIER FLAG

PSNUM_RPASS

;GET NUMBER OF "'RUN PASSES'’

ACTLXX

#ACT ,MODTYP
ACTLXX
#-1,P$GDBD

MLTYP

#CL1IBDL

'BE SURE IN ACTIVE IF TRYING TO SET LOOP
: BR IF IN ACTIVE

sCLEAR ANY LOOP TYPE THAT MAY HAVE GOT SET
MOV

#CLIBDL ,~(SP)

CZCLFAQ DMR, 1 =11 MTAOS?. LINK TEST

CZCLKA.P11
4995
499%
4997
4998
4999
5000

030612
030616
030620
030622
030626
030632

012746
010600
104417
062706
105037
000207

MACY11 30A(1052)

n9
18-“;80

ACTION TABLE AND ROUTINE

09:24

PAGE 117

SEQ 0116

000001
000004
003324

ACTLXX: CLRB
RTS

PSNINUF
PC

+CLEAR NOT-ENOUGH FLAG

MOV
MOV
TRAP
ADD

#1,=(SP)
SP.RO
CSPNTF
#4,SP

|
|
|
|
¢
|

MACY11 30A(1052) 13-?’:;80 09:24 PAGE 118
ACTION TABLE AND ROUT

GTR9:

00001

0101

0071 Og

013701
012702
006302
MS(});
0101
060237

0071 0;

013737

007104

00710

00001

007076
007076

007140
007142
007144

021012
033400

007134
GTREX:

; RX ALLOCATE CODE

§ 83033830233 )

R
R
R

CZCLFAO DMR, 1 =11 DATA08%. LINK TEST
CZCLRA.PT

CMPPTR.R1

sINIT COMPARE MESSAGE POINTER

RMSG.IH.RZ
R

R1.RXPTR
R2.RXPTR

sINIT RECEIVE MESSAGE POINTER

CMPTOT ,RXMTOT

sMAKE COMPARE AND RX MESSAGE COUNTS EQUAL

FLAG
NOBUF
PSCNT
ERRCNT

;CLEAR FLAG
sCLEAR NO BUFFER COUNTER
sCLEAR PASS COUNT

PC.LOGDVI
PC.DVINIT

:LOG ABOUT TO INIT DEVICE

#BUFLIM,CURCC

sSET CHAR COUNT TO ‘BUFLIM' NO. OF BYTES
sSET UP RX BUFFER AS CURRRENT ADD.

#RXBUF , CURADD
RXPTR,CPTR

031
031010

sINIT TRANSMIT MESSAGE POINTER

#10 MSGTYP
PC .BLDBUF
MODTYP ,R2
R2
@MODE (R2)

sINIT DEVICE

sSET UP FOR 33 TO FILL RX BUFFERS

;CLEAR RX BUFFER

sMODE DISPATCH

SEQ 0117

RECEIVE MODE SECTION

.SBTTL

IN THIS MODE OF TESTING THE DEVICE'S RECEIVER IS ENABLED IN EXPECTATIOJ
OF RECEIVING A MESSAGE.
AFTER RECEIVING AN “EXPECTED'' NUMBER
MESSAGES, THE DATA RECEIVED CAN BE COMPARED AGAINST A LIST OF 'EXPECT
TO RECEIVE'*

5047

ESFERERR
3

MESSAGES IF DATA=CHECKING IS ENABLED.

SUBORDINATE ROUTINES USED:

“ALLTR"

5049

5057
58
5059
5060

PAGE 119

FUNCTIONAL DESCRIPTION:
RECEIVE-ONLY (OR_ONE-WAY=IN) ROUT INE

5045

09:24

RECEIVE MODE SECTION

3048

5051
5052
5053

10
18-APR-80

CALLING SEQUENCE:

031014

RXONLY:

RXONZ2:

JMP

aMODE (R2)

MOV

RXPTR, CPTRR

BIS

mwénx FLAG

:SET UP RX QUE

JMP

ALLTR

*GO RX.

MOV
CLR

RXMTOT ,DVRCT
CPTR

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

;SET UP MESSAGE COUNT
:CLEAR THE TX POINTER

SEQ 0118

B S

MACY11 30A(1052)

5038
5039
5040
5041

GH LINK TEST

L SR

CZCLFAQ DMR,Ms_fl
DATA
CZCLKA.P11

MACY11 30A(1052) 1S-APR-80 09:24 PAGE 120
TRANSMIT

52
£%8 FERE

CZCLFAQO DMR,
=11 DATA COMM. LINK TEST
18-APR-80 09:24
CZCLKA.PTT

.SBTTL

T=ONL
Y (OR_ONE-WAY-0UT) ROUT INE
IN THIS MODE OF TESTING A LIST OF MESSAGES IS TRANSMITTED WITHOUT
EXPECTING ANY DATA TO BE RECEIVED. A REPETITION COUNT CAN BE
SPECIFIED TO REPETITIVELY TRANSMIT THE LIST.

5069
5070

SUBORDINATE ROUTINES, USED:

%71

LA TR T

3078

5081

TRANSMIT MODE SECTION

S
FUNCTIONAL
DESCRIPTION:
:
TRANSM]

5065

CALLING SEQUENCE :

aMODE (R2)

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

TXONLY: BIC

#DATCKB ,PARAM

sSET NOCHECK

BIS
CLR

HQTX+AETX,FLAG
CPTRR

;COPY COUNTER FOR THIS PASS
;SET THE QUE TX FLAG
;CLEAR RX POINTER

’,

5074
5075
5076
5077
5078
5079

MODE SECTION

031046
031054
031062
031070
031076
031102

TXON2:

JMWP

MOV
MOV

JMP

TXPTR,CPTR
TXMTOT ,DVTCT

ALLTR

SEQ 0119

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1T

MACY11 30A(1052) ‘lg-APR-BO 09:264 PAGE 121

18-APR-80 09:24

PASSIVE MODE SECTION

SO83

SBTTL

5085
5086
S087
5088
5089
S090

s+e
s FUNCTIONAL DESCRIPTION:
3
PASSIVE MODE SECTION
3
IN THIS MODE OF TESTING, THE DEVICE'S RECEIVER IS ENABLED IN
3
EXPECTATION OF RECEIVING A MESSAGE. THEN EVERY TIME A MESSAGE IS
3
RECEIVED, A MESSAGE IS TRANSMITTED. DATA CHECKING CAN BE DONE ON THE

SO9§

; SUBORDINATE ROUTINES USED:

5095
5096
S097
5098

3
"“ALLTR"’
:
; CALLING SEQUENCE:
|
JMP
aMODE (R2)

S084

558’?1

5100
5101
5102
5103
5106
5105
g}gg

031106
031106
031114
031122
031130
031136

013737
013737
013737
052737
000137

007120
007100
007076
000104
031200

007116
007162
007160
007232

PLCK:
PLCK2:
PLCK3:

PASSIVE MODE SECTION

RECEIVED DATA.

MOV
MOV
MOV
BIS
JMP

TXMTOT ,DVTCT
TXPTR,CPTR
RXPTR,CPTRR
#QRX+#ERX,FLAG
ALLTR

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

sSET
sSET
;SET
;SET
;AND

UP THE TRANSMIT COUNT
UP CPTR TO TRANSMIT POINTER
UP CPTRR TO REC POINTER
UP Q AND EXPECT RX
GO RX FIRST MSG.

10
MACY11 30A(1052) IS-APR-BO
09:26 PAGE 122

CZCLFAO DMR,DMC~11 DATA COMM. LINK TEST
18-APR-80 09:24

CZCLRA.P1T

ACTIVE MODE SECTION

.SBTTL

5109
5110
5111
S"§
511
5114
5115
5116

ACTIVE MODE SECTION

g”g

1+e
: FUNCTIONAL DESCRIPTION:
:
ACTIVE MODE SECTION
:
IN THIS MODE OF TESTING A LIST OF MESSAGES IS TRANSMITTED AND
:
MESSAGES
ARE EXPECTED TO BE RECEIVED.
RECEIVED DATA CAN BE COMPARED
:
AGAINST *EXPECTED'' DATA IF DATA-CHECKING IS ENABLED.
:
NOTE: IF BOTH ENDS OF THE LINK ARE IN ACTIVE MODE, THEN THE
:
LINK MUST BE A FULL DUPLEX LINK'

g}}g

: SUBORDINATE ROUTINES USED:

5121
5122
5123

:
“ALLTR"’
3
; CALLING SEQUENCE:

g}%‘;

§126

5127

031142

013737

007120

007116

g}%}

031172

052737

000314

007232

5128
5129
5130

(%}

5133
5134
51

031150
031156
031164

013737
013737
013737

007100
007134
007076

007162
007132
007160

{

ALCK:

JMP

aMODE (R2)

MOV

TXMTOT ,DVTCT

MOV
MOV
MOV
BIS

TXPTR,CPTR
RXMTOT ,DVRCT
RXPTR,CPTRR

;DISPATCH TO MODE BASED ON MODE TYPE IN R2
:SET UP TX COUNTS
:SET UP COUNTS
:

HORX+A#QTX+#ETX+AERX ,FLAG

SEQ 0121

10
MACY11 30A(1052)
18-APR-80 09:24 PAGE 123
TRANSMIT -« RECEIVE FOR ALL STANDARD MODES

D DD -

AW ALY,

CZCLFAO DMR,DMC~11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24

1.) IF RX BUFFERS ARE TO BE QUED,TELL DEVICE

CODE TO QUE THEM ,LOG RECEIVE QUED.

2.) IF TX BUFFERS ARE TO BE QUED

A A

DD D DD

T A VTA VAN

FUNCTIONAL DESCRIPTION:
THIS CODE PERFORMS THE FOLLOWING FUNCTIONS

S
A

5.) IF TRANSMIT COMPLETE LOG IT.
6.) WHEN BOTH TRANSMIT AND RECIEVE LISTS ARE DONE

W
D

o I T

D e

R T T T R T I T T I T T
TR TR TR T
TR LRDR TR

A
VIV

1
1

5182
5183
5186
5185
5186
5187
5188
5189
5190
5191

"DVRXQ'’ -QUE RECEIVE BUFFER SPACE TO DEVICE
*LOGRXQ'*~LOG RECEIVE BUFFER SPACE TO EVENT LOG
'10GTXQ''-LOG TRANSMIT BUFFER QUED TO EVENT LOG
*DVIXRX''-QUE_TRANSMIT BUFFER AND WAIT FOR RX
, OR TX TO COMPLETE

*LOGRXC''-LOG RECEIVE BUFFER COMPLETED TO EVENT LOG
*LOGTXC'*-LOG TRANSMIT BUFFER COMPLETED TO EVENT LOG
USE OF FLAG BITS:
QRX = SET ON INPUT TO ALLTR IF REC IS TO BE QUED TO
DEVICE. CLEARED BY DVRXQ AND THEN SET BY DVTXRX
WHEN RX BUFFER IS COMPLETED.
QTX - SET ON INPUT TO ALLTR IF TRANSMIT IS TO BE QUED TO
DEVICE. CLEARED ON ENTRY TO DVTXRX AND SET BY DVTXRX
WHEN TX BUFFER IS COMPLETED.

ETX - g)S(EPlE)C?EDWTm TO DETERMINE IF TX BUFFER COMPLETED IS

ERX - USED BY DVTXRX TO DETERMINE IF RX BUFFER COMPLETED IS

EXPECTED.

CALLING SEQUENCE
:

JMP

ALLTR

};g

5178
5179
5180
5181

SUBORDINATE ROUTINES USED:

d e
D e

}

BOTH TO COMPLETE
1:‘ ge%ve COMPLETE LOG IT UPDATE RX TABLE IF DATA
C
GO TO THE COMPARE BUFFER CODE

D D

TN AT T T A N
A
T

}

,TELL DEVICE

CODE TO QUE THEM, LOG TRANSMIT QUED.
3.) WAIT FOR EITHER RECIVE BUFFER OR TRANSMIT BUFFER OR
4.)

—d

AT AN T

1
1
1
1
1
1
1

TRANSMIT = RECEIVE FOR ALL STANDARD MODES

+
+

ANANIITE AR TRAR LB LB IENRUR 2B EISGRERLESEY

.SBTTL

031200
031200

031206
031210
031214
031220
031226
031230
031234
031240
031244
031250

032737

001420
013702
011237
012237
011237
011237
010237
737
737
032737

000004

007232

ALLTR:
ALCKS:

007160
007176
007126

007130
007160
0341
020746
000010

007232

ALCK1:

BIT

BEQ
MOV
MOV
MOV
MOV
MOV
MOV
JSR
JSR
BIT

#ORX,FLAG

ALCKT
CPTRR,R2
(R2), TEMP2
(R2)+ ,DVRXA
(R2) , TEMP3
(R2) .DVRCC
R2,CPTRR
PC DVRXQ
PC .LOGRXQ
#QTX,FLAG

;GO TO TRANSMIT-RECEIVE FOR ALL STANDARD MODES

:IF NOT RX GO TO TX'S

;GO QUE DEVICE
:L0G REC QUED

SEQ 0122

0071 14
0071
02071
ALCK2:

034200
000004

007232

0071
0071
020764
000004

007176
007200

007226

007162
007176
007200
000002

UPTABL :

UPTAS:

000001
007076
000003

0004,

013702
11

007132

UPTA3:

007160

UPTA1:

8871 72

00
007176
007172
000002
007160
000002

007220

000104
000210

007232
007232

007132
007132
005037
32737

031604
031610

000004
007160
000010
007112
007114
020730
007116

UPTEX:

TRANSMIT - RECEIVE FOR ALL STANDARD MODES

~3 3p3383533%23333R23338%4333% ¢ 5333338

%)1416

28 $RSEIR

031256

08:24

MACY11 30A(1052) ‘lg-APR-BO 09:26 PAGE 124

22
wne

519

COMM. LINK TEST

ALCK2A:

AL(K2
CPTR R2
(R2)
. TEMP2

(R2)+ ,DVTXA

R2,CPTR

PC LOGTXQ
PC.,DVTXRX

;GO TO TX AND RX SUB ROUT.

#QRX ,FLAG

;CHECK FOR REC. MSG.

ALCKS

DVRXA, TEMP
DVRCC, TEMP

PC,LOGRXC

#ECHOB, PARAM
UPTAG

CPTR,R2

TEMP2, (R2)
+
TEMP3, (R2)
#DATCKB
, PARAM
UPTA1
#01,DVRCT

RXPTR, CPTRR
#ACT ,MODTYP

UPTAS

DVRCT
UPTEX
CPTRR,R2
(R2) , TEMP

TEMPS, TEMP
TEMP3. (R2)+

TEMP3. TEMP2

TEMP2. (R2)+

R2.CPTRR
#PAS ,MODTYP

ALCK2A

NORX+N#ERX
, FLAG
FATX+N.ETX
FLAG

ALCK1

007176
007200

;LOG REC COMPLETE

;1S THIS ECHO MODE (PASSIVE)
:IF NOT GO TO 4
ELSE SET R2 T0 PRESENT TX TABL
;STORE OFF

SAND CC

:1S DATA CHECKING ASKED FOR
:1F F SO GO T0 1
:ELSE_SET DVRCT TO A 1
:RESET POINTER

:1S THIS ACTIVE
:IF YES BUMP COUNT
;LOAD TEMP WITH PREV. COUNT
;LOAD TEMP WITH PREV.COUNT-CURRENT

;STORE OF NEW ADD
sAND NEW CC
:PUT POINTER BACK TO ADDR.
;AND RESTORE IT.
:IF NOT PASSIVE LOOP THEN GO TO 2A
;CLEAR BOTH EXPECTED AND COMPLETED FLAGS
;SET THE TX FLAGS
sDEC REC COUNT
IS IT ALL DONE
GO _CHECK TX
CLEAR THE RX FLAG
:YES. CLEAR POINTER

007232
007232

sIF NO TX''S GO TO 2

(R2), TEMP3
(R2)+,DVTCC

—-e

CZCLKA.P1T

=11 DATA

wvm

CZCLFAO DMR,

ALCK3:

:Is IT X
sIF NOT TX THEN GO BACK

DVTXA, TEMP.
DVTCC,TEMP

:LOG TX COMPLETED

DVTCT

:DEC TX COUNT

PC,LOGTXC

SEQ@ 0123

CZCLFAO DMR,
CZCLKA.PT

=11 DATA

COMM. LINK TEST

08:24

i 031622 022737 000002 007220
3 S
000210 007232
0§1 614

Og‘l
0

000104
007116

007232

000%; 031726

005737

007116

007232
007226

005737

007162

000137

031314

MACY11 30A(1052)

09:24

PAGE 125

TRANSMIT = RECEIVE FOR ALL STANDARD MODES

WP
BNE
BIC
BIS
TST
BNE
JMP
ALCK3A: TST
BEQ
ALCK3C: JMP
ALCK38: CLR
BIC
BIT
BEQ
ALCKé:
TST
BNE
ALCK4A: TST
BEQ

ALCK4B:

H 10
18-APR-80

JMP

#PAS_ MODTYP

ALCKSA

#OTX+ETX,FLAG
#ORX+ERX. FLAG

sIF NOT PASSIVE MODE GO TO 3A
:CLEAR THE TX FLAGS
:AND SET THE RX FLAGS

ALCK3C
CMPSR
DVTCT
K38

:IF MORE RX'S DO IT
; ELSE COMPARE
:1S IT ALL DONE
:IF NOT GO BACK TO 5

DVTCT

:IF _SO CLEAR POINTER
:CLEAR TX FLAG
;IS IT DAT (K
:IF NOT THEN END WO CKING RX.

;IF SOME RX'S LEFT GO BACK
;BRANCH IF ANY TX'S LEFT

SEQ 0124

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
18-APR-80 09:24

10
18-APR-80

DATA COMPARISON CODE

09:26

PAGE 126

+
+

DATA COMPARISON CODE

FUNCTIONAL DESCRIPTION:

CMPSR - COMPARE CODE
THIS CODE COMPARES THE RECEIVED DATA AGAINST THE
EXPECTED AND FILLS THE EVENT LOG WITH 1 OF 3 MSGS.

T E T ETR

)

.SBTTL

T P

NOTE:

IF NO DATA CHECKING SKIP THIS CODE

PRT

1.) A DATA COMPARISON ENTRY WHICH REPORTS THE NUMBER
OF COMPARISON ERRORS FOUND.

2.) A DATA COMPARISON ENTRY lHlCH REP(RTS DIFFERENCES

IN REC LENGTH TO COMPARE LENG

PR P

3.) A DATA COMPARISON STARTED ENTRY WHICH REPORTS ADDRESS
OF RECEIVE BUFFER AND BYTE COUNT.

THIS CODE A%SO REPORTS SOFT ERRORS FOR DATA COMPARISON

SUBORDINATE ROUTINES USED:

‘LOGCMP'* - SEE ITEM 3 ABOVE
‘LOGCML'* - SEE ITEM 2 ABOVE
‘LOGCMD’* - SEE ITEM 1 ABOVE

TR TR

(THE FIRST 5 ONLY) ,LENGTH ERROR,AND TOTAL NUMBER OF ERRORS

CALLING SEQUENCE:

JMP

CMPSR

;JUMP TO DATA COMPARISON CODE

#DATCKB,PARAM

IS DATA CHECKING TO BE DONE

CZCLKA.P11

MACY11 30A(1052)

CMPSR:

BIT

BEQ

CMPSEX

RXPTR,CPTR
CH’PTR CPTRR
RXMTOT ,DVRCT

sPUT START OF RX POINTERS TO CPTR
; AND START OF COMPARE POINTS TO CPTRR

MOV

CPTR.R2

JMOVE CURRET RX PT.TO R2

MOV

MOV
MOV

(R?)* R1

(R2)+,TEMP3
R2. CPTR

;SET R1 TO START ADD OF RX

MOV
MOV
MOV
MOV
MOV

CPTRR.R
(R2)+.R
(R2)+ R4
R2.CPTRR
R4, TEMPS

;PUT R2 AT COMPARE TABLE
;SET
TO COMPARE ADD
SET R4 TO COMP CC
;RESTORE POINTER

PC.LOGCH’

;LOG COMPARE START.

(W,
BEQ

R4,T;H’S
CMPS

;1S COMPARE COUNT = TO RX COUNT
;IF SO GO TO 7

MOV
MOV
MOV
CMPS3:

MOV

JER

(R2) ,TEMP2

INC
ERRCNT
ERRSOFT 1,EDDLE .ERR10

:IF NOT THEN EXIT

*MOVE RX ADD TO EVENT LOG

.'SET CHAR COUNT TO EVENT LOG
sRESTORE RX POINT

;PRINT ERROR

SEQ 0125

CZCLrAO DMR, » -1 DATAos%. LINK TEST

MACY11 30A(1052) 1‘-APR-80 09:264 PAGE 127

CZCLKA.PT
5328
S&
p)

0
0
0

104457
000001
014651

5331
g

O
0

5334
5335

032054
032060

005037
012737

ggg

032070

001422

005237
023727
101014
114337
114137
005237

5349

032072
032076
0321064
032106
032112
032116
03212
032122
032124
032126
032130

5351
5352
5353
5354
5355
5356
5357
5358
5359
5360
5361
5362
5363
5364
5365
5366

032134
032136
132142
032144
032146
032152
032154
032160
032160
032162
032164
032166
032170
032174
032174
032200

5336

5339
5340
5341
S
5343
5344
5345
5346
5347

5350

DATA COMPARISON CODE

%2%9

032066

122123

021076
007202
000001

N7582
007202

007170

000005

CMPS7:

CMPS1:
CMPS2:

007210
007211
007144

104457

014706
020170

005201

005203
005237
005304
001350
005737
001410
005237

104457
000003
014706
020232
004737
005337
001267

007202

007144

021114
007132

CMPS6:

CSERSOF T
1
EDDLE

;REPORT COMPARISON FAILURE TO OPR.
TRAP
WORD
.WORD
.WORD

CSERSOF T
2
EDDDE

PC.LOGCML

;LOG LENGTH ERROR

(LR
MOV

TEMPS
#1,0FSET

;CLEAR BAD BYTE COUNTER
sSET OFSET BYTE COUNT TO 1

BEQ

CMPS6

(R1)+, (R3)+

INC
TEMPS
WP
TEMPS #5
BHI
CMPS6
MOvVB
=(R3) ,GOOD
MOVB
=(R1) ,BAD
INC
ERRCNT
ERRSOFT 2,EDDDE ,ERR1

INC

007170

TRAP
LWORD
.WORD
JSR

(MPB

INC
R3
INC
OF SET
DEC
R4
BNE
CMPS1
TST
TEMPS
BEQ
CMPS5A
INC
ERRCNT
ERRSOFT 3,EDDDE ,ERR2

CMPS5: JSR
CMPS5A:
DEC
BNE

SEQ 0126

.WORD

ERR10

sCOMPARE RX WITH EXPETED
:IF EQUAL THEN GO TO 6

s INC BAD COUNT
;1S IT MORE THEN 5
:IF SO GO FOR_MORE
sSTORE GOOD BYTE FOR ERROR
;STORE BAD BYTE "OR ERROR

ERR1

|
!

s INC OFFSET
sELSE DEC CHAR COUNT AND SEE IF 0
:IF _NOT GO BACK
;SEE IF ANY CMP ERRS FOR THIS MSG
;BR IF NONE

PC.LOGCMD

SREPORT # OF MISMATCHES FOR MESSAGE
TRAP
WORD
.WORD
.WORD
:LOG DATA ERROR IN COMPARE

DVRCT
CMPS3

;1F NOT ALL DONE GO BACK

CSERSOF T
3
EDDDE
ERRZ2

INTERNAL END OF PASS CODE

09:24

PAGE 128

g}}gg

.SBTTL

§370
5371
53;%
53
5374

T FUNCTIONAL DESCRIPTION:
:
THIS CODE INCREMENTS THE PASS COUNT FOR THE
:
EVENT LOG. LOGS THE END OF PASS EVENT

:
;
:

3380

: SUBORDINATE ROUTINES USED:

ggzs

;

5384

g}sg 032202 005237 007142 5387

032206

013737

007140

5392 03223

5393
5396
5395
5396
5397

032242
032244
032250
032252
032256

022737

IN NOT = TO O THEN GO BACK TO MODE DISPATCHER

*LOGEOP'* = LOG END OF PASS TO EVENT LOG

007202

MOV

MOV
MOV
JSR

177777 007230

001403
005337 007230
001402
000137 030746
000137 025640

IF "RPASSTM* IS A MINUS ONE RETURN TO MODE
AND IF "RPASS'* IS THEN = TO 0 GO TO DCLT PROMY
DISPATCHER. IF NOT -1 THEN DECREMENT RPASS

CMPSEX: INC

5388 032214 013737 007142 007176
5389 032222 013737 007144 007200
g;}&o 032230 004737 021132

CMP

18:
2s8:

SEQ@ 0127

INTERNAL END OF PASS CODE

5375
5376
5377
23%

BEQ
DEC
BEQ
JMP
IMP

PSCNT

;BUMP PASS COUNT

NOBUF,TEMP4

|
|

|
;

PSCNT . TEMP2
ERRCNT
, TEMP3
PC.,LOGEOP

:LOG END OF PASS

|
!

#-1.RPASS

:SEE IF RPASS=-1

1
RPASS
2s
GTRX2
GTRAS

*IF IT IS DON'T DECRMNT, LOOP FOREVER
*DEC PASS COUNT
*IF DONE EXIT TEST
*ELSE GO BACK AND DISPATCH
*WHEN RPASS=0 GO BACK TO 'DCLT>"

|
,
|
5|
|

—

18-APR-80 09:24

K 10

18-APR-80

. S

CZCLKA.P11

MACY11 30A(1052)

e e ———————————

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052) 1%—%&0 09:24 PAGE 129
DOWN~-LINE-LCAD

18-APR-80 09:24

5399
5400
5401
5402
5403
5604
5405
54606
5407
5408
5409

.SBTTL

PRELARELERR
NS WO

PROGRAM THAT WILL PRINT A MSG THAT DOWN-LINE-LOAD WAS SUCESSFUL.

'DLTXRX'*= SPECIAL TX RX ROUTINE FOR DLL
;DVRXQ"., - QUE RX BUFFER SPACE TO DEVICE
'LOGRXQ'’ = LOG RX SPACE QUED TO EVENT LOG
106TXa"" - LOG T BUFFER GUED 10 EVENT L0G
*DVIXRX' = QUE TX BUFFER AND WAIT FOR RX OR TX TO COMPLETE

*LOGTXC’*= LOG TX COMPLETED TO EVENT LOG

*LOGRXC'* = LOG RX COMPLETED TO EVENT LOG

422

CALLING SEQUENCE:

aMODE (R2)

BIS

#ERX ,FLAG

5428 032276 012737 002647 007164
5429 032304 013737 002172 007156
ssg? 032312 004737 032404

MOV
MOV
JSR

#DLLM1,CURADD
DLLMIC.CURCC
PC.DLTXRX

24‘33%

;RETURN WHEN TX AND RX ARE COMPLETED

032262

032270

052737
042737

000100

000002

5434 032316 012737 002654
5435 032326 013737 002174
5436
ssg.?

5439

SUBORDINATE ROUTINES USED:

55252
26

:
,
i
,
;
|
;

;e
: FUNCTIONAL DESCRIPTION:
DOWN-L INE-LOAD SECTION
54
IN THIS MODE OF TESTING THE HOST'' OR ORIGINATING STATION
REQUESTS THE "SATELLITE'' OR BOOT STATION TO ENTER MOP MODE.
THE BOOT STATION THEN SENDS A
“REQUEST PROGRAM MESSAGE''.
THE "HOST'' THEN SENDS A ‘MEMORY LOAD WITH TRANSFER ADDRESS
THAT _CONTAINS IMAGE DATA TO BE LOADED BY THE BOOT STATION'S
M9312 STARTING AT LOC. 0. THIS IMAGE DATA WILL CONTAIN A

5419

5427

SEQ 0128 |

DOWN-L INE~LOAD SECTION

54.5?

5425

SECTION

032332
032340

5640
5641
su.i
5443
5644
5645
5646
5647

032344
032344
032344
032350
032354
032356
032360
032364

5449
5450
5451

032370
032370
032370

5454

032376

042737
004737

000400
032404

007232

007226

DLL:

007164
007156

MOV
MOV

007232

BIC
JSR

DLLPRI:

012746
012746
010600
104417
062706
000137

013640
000001

000004
025640
DLLEA:

104456

22? 3335% om%

BIC

#DATCKB,PARAM

#DLLM2,CURADD
DLLM2C.CURCC

#DLLGA . FLAG
PC.DLTXRX

;DISPATCH TO MODE BASED ON MODE TYPE IN R2
:SET EXPECTED TO RX

:CLEAR NOCHECK

:SET THE DOWN LINE LOAD MSG TO #1
:SET THE CC
:GO TO THE DOWN LINE TX RX ROUTINE
;SET THE DOWN LINE LOAD MSG TO #2
:SET CC

:CLEAR THE GO AHEAD FLAG
:GO TO THE DOWN LINE TX RX ROUTINE

: RETURN WHEN TX AND RX ARE COMPLETED
PRINTF

#DLLCM

GTRAS

ERRHRD

20,DLLAB,ERR14

MOV
MOV
MOV
TRAP
ADD

#DLLCM,-(SP)
.=(SP)
SP.RO
CSPNTF
#6,SP

TRAP

CSERHRD

-WORD
%’t’m
.WORD
ERR14

CZCLVYAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11 ~ 18-APR-80 09:24

5455

552?7’ 032400 000137 025640

10
MACY11 30A(1052)
18-APR-80
DOWN-L INE=LOAD SECTION

09:24

PAGE 130

GTRAS

;PRINT ABORT AND EXIT

BIS

#ORX ,FLAG

:SET THE QUE RX FLAG

MOV
JSR
JSR

#256. . TEMWP
PC,DVRRXQ

PC.LOGRXQ

SAND LOG IT...

5470 032460 013737 007164 007176
5471 032466 013737 007156 007114
5472
032676 01
007156

MOV
MOV
MOV

CURADD.TEMP2
CURCC,DVTCC
CURCC . TEWP3

:AND LOG
*SE UP FOR TX COUNT
SAND LOG IT

5476

5458
5459
5460

5461

032404

0326406

052737 000004

;273 032412 012
004
0
012
004
5464
012737

5465 032634
012737
5466 032442 004% 034120
5467 032646 004
020746

5669!” 032452
5473

007232

DLTXRX:

007126
007176
007130

MOV
MOV
MOV

013737 007164 007112

032502 ool.:% 020712

MOV

JSR

032506

052737

000210

007232

BIS

5478 032530
5479 032536

032737
001020

000010

007232

BIT
BNE

007204

MOV

5475 032514 004
034200
DLLE2: JSR
5476 032520 032737
007232
BIT
5477 032526 001047
BNE

5480
5481

5482

032540 012737

032546

013737

004326

007200

5483 032556 013737 003326 007202
5484 032562 012737 017130 007176

5485

DLLE7:

004737 020774

MOV

032600

013737

007112

007176

5491

032620

042737

000210

007232

5493

032636

023737

002176

007114

000004

007232

020102

007204

007126

007176 DLLES: MOV

006010

004326

5489 032606 013737 007114 007200
5490 032616 004737 020730
5492

549
5495
5496
5497
5498
5499

5500

032626

032642
032644
032646
032654
032656
032664

052737

001441
000
032
001004
012737
000730

000400

DLLE6:

gsm 032%3 &Qm 8%;64 —
5503

032706

022737

032714

001404

gsor 032724

000710

032716

012737

007204

DLLE4:

022737 000001
5510 osz”gf 001404

004330

DLLE3:

:SET UP TO QUE AND EXPECTED

*G0 TO DEVICE
*TEST FOR GO AHEAD BIT
:IF SET GO TO ONE

*ELSE CHECK FOR TX DONE
*IF
DONE THEN BRANCH

*ELSE ERROR

#TXNC
, CONOTM

RXBUF
, TEMP3

PC.LGDVE

:LOG ERROR

*ABORT TEST

DVTXA, TEMP2

DVTCC. TEMP3
PC,LOGTXC

:LOG TX DONE

BIS

#DLLGA, FLAG

:SET THE GO AHEAD BIT

BEQ
BR
BIT
BNE
MOV
B8R

DLLES
DLLE2
#ORX,FLAG
DLLES
#RXNC,CONOTM
DLLE7

5'2;

020122

MOV

DLLE1:

#QTX,FLAG
LEé

:LOG THE TX QUEUE

MOV
JSR
BIC

007232

PC.DVT
#DLLGA,FLAG
DLLET

DLLEA

5488

:SET
UP FOR TX

MOTX+#ETX,FLAG

JSR

*SET UP FOR LOG
: GO QUE
RX

PC,LOGTXQ

TXBUF
. TEMP
#DLLAS, TEMP2

032574

:SET THE DEVICE RX BUFFER TO RXBUF
:SET UP FOR LOG
*SET UP FOR CC OF 256

CURADD,DVTXA

MOV
MOV

s:.arm

000137

#RXBUF ,DVRXA
#ROBUF TEMP2
czss..fivacg

MOTX+#ETX FLAG

DLLM2C .DVTCC

DVRXA, TEMP

Bc""ESa’aE’c"

#6010, RXBUF

BEQ

DLLE3

MOV

#RXM1,CONOTM

(MP

DLLES

BEQ

DLLE?

#1 ,RXBUF +2

:CLEAR QUE AND EXPECTED

:EXIT IF SECOND MSG.
*AND GO BACK TO 2
*1S THE
A RX COMPLETED
<IF SO GO TO 8
:ELSE SET UP ERROR AND ABORT.

LOG RECEIVE COMPLETE

:CHECK FOR FIRST WORD OF RX

*SEC BOOT MSG.

;SET UP MESG AND ABORT

*ABORT TEST

;1S SECOND WORD 1

*IF OK RETURN

MACY11 30A(1052) 13-%” 09:26 PAGE 131

5311
gg‘lg

032736
032744

012737
000700

MOV
BR

nxn;. CONOTM
DLLE

;SET UP MESSAGE AND ABORT

gg]"sv

032746

000207

RTS

sRETURN TO CALLER

5516

18-APR-80 09:24

020145

007204
DLLES:

DOWN=L INE<LOAD SECTION

e ——ad

CZCLFAO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKA.P11

SEQ 0130|

MACY11 30A(1052) 1g-APR-80 09:246 PAGE 132

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

18-APR-80 09:24

TALK MODE SECTION

.SBTTL

SEQ 0131

FUNCTIONAL DESCRIPTION:
TALK MODE SECTION

IN THIS MODE

+
+

TALK MODE SECTION

T
e T T R

THE "TALK'® END OF THE LINK TRANSMITS OPERATOR

SPECIFIED MESSAGES UNTIL A 'EXIT'' MESSAGE IS TYPE.
THIS END OF THE LINK GOES INTO "LISTEN'' MODE.

AT THAT POINT,

SUBORDINATE ROUTINES USED:

‘LOGTXQ' = LOG TX BUFFER QUED TO EVENT LOG
"DVTXRX'* = QUE TX BUFFER TO DEVICE AND WAIT FOR COMPLETE
*LOGTXC'* = LOG TX COMPLETE TO EVENT LOG
L

00000
002524
177777
002646

007226

CALLING SEQUE NCE:
JWP
aMODE (R2)

TALCK:

1%:

BIC
MOV
MOV
cMP
BNE
GMANID

;:DISPATCH TO MODE BASED ON MODE TYPE IN R2

#DATCKB,PARAM

;SET NOCHECK

#-1,(R2)+

;CLEAR OUT OPBUFFER FIRST

#OPBUF R

fimo,nz

OPRMM,OPBUF ,A,0,1.72. .NO

;GET TALK MESSAGE

TRAP

CSGMAN

.WORD
.WORD

OPBUF
TSCODE
OPRMM
0
TSLOLIM
TSHILIM

.WORD

002524

2$:

#377.,0PBUF
(R2)

;NOW GET CHAR COUNT

2s
R2,0PCNT

3s:
007112
007176
007200
007114

#OPBUF ,DVTXA

:;SET UP TX ADDR.

OPCNT .DVTCC

:SET UP TX CC

#OPBUF
, TEMP2
OPCNT, TEMP3

PC.LOGTXQ
NQTX+HETX ,FLAG

007232

CPTRR

;SET UP FLAGS

*CLEAR RX POINTER

PC,DVTXRX

004737
022737

30
054105

007176
007200

002524

CZCLKA.P1T

DVTXA, TEMP
DVTCC, TEMP

PC,LOGTXC

# EX, OPBUF

;CHECK FOR EXIT

10001$%:

JWORD
JWORD
JWORD

100018

CZCLFAG DMR,DMC-11 DATA COMM. LINK TEST

MACY11
30A(1052) 1S~APR-80 09:26 PAGE 133
TALK MODE SECTION

5576

BNE

CZCLKA.PT

-80 09:24

033136 001 ;gt.

§575

033140

022737

052111

002526

577

033150

042737

000210

007232

§576 033146 001300

5578 033156 012737 000006 007720
5579 033164 000137 030746

TAL
CK

#'IT,0PBUF
+2

BIC

NQTX+HETX,FLAG

BNE

MOV
JMP

TALCK

#LIS MODTYP
CTRX2

;CLEAR THE TX BITS

:CHANGE TO LISTEN MODE
*AND GO BACK TO DISPATCH

PN
MACY11 30A(1052)
18-APR-80
LISTEN MODE SECTION

CZCLVAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PTT
18-APR-80 09:24
.SBTTL
)

SEQ 0133

LISTEN MODE SECTION

FUNCTIONAL DESCRIPTION:

LISTEN MODE SECTION
IN THIS MODE
THE "LISTEN'' END OF THE LINK PRINTS ALL OF THE MESSAGES
RECEIVED BY THE DEVICE ON THE OPERATOR'S CONSOLE, IF THE ME SSAGE
RECEIVED IS AN "EXIT'' MESSAGE, THEN THE NODE ENTERS ‘‘TALK'' MODE.

T A

TR TRIR

PAGE 134

+
+

5581

09:24

SUBORDINATE ROUTINES USED:

LISCK:

aMODE (R2)

BIC

#DATCKB, PARAM

PRINTF

LISCKA: MOV

#OPBU
. TEMP2
F
#82. ,DVRCC
#82..TEMP3

JSR
JSR
JSR
MOV
MOV
JSR
ADD

PC.DVRXQ
PC.LOGRXQ
PC,DVTXRX
DVRXA, TEMP,
DVRCC, TEMP
PC,LOGRXC
DVRXA, DVRCC

CLRB
PRINTF

366
033374

002524

052111

002526

000005
030746

007220

#OPBUF
, DVRXA

MOV
MOV
MOV
BIS
CLR

000004
054105

#LISP

cMP
BNE
CMP
BNE
MOV
JMP

#ORX+#ERX, FLAG
CPTIR

;DISPATCH TO MODE BASED ON MODE TYPE IN R2
;CLEAR CHECK BIT
;PRINT PROMPT FOR OPR.

sSET DEVICE UP TO REC AT OPBUF

#LISP,~(SP)

#1,-(SP)

SP.RO
CSPNTF

#4,SP

;SET UP CHAR COUNT TO 82.
;SET UP FLAG
;CLEAR THE TX.

;QUE RX
;GO TO DEVICE RX. SUBROUTINE

:SET UP ADDR.AND CC.
;LOG COMPLETED

@DVRC(
#OPBFPT

# EX,OPBUF
LISCKA
#°IT,0PBUF
+2
LISCKA
#TAL ,MODTYP
GTRX2

OF "EXIT"’

N GO BACK

53333

007226

JMP

53223

CALLING SEQUENCE:

AR TR

TR TRT

‘DVRXQ'* = QUE RECEIVE BUFFER SPACE_TO DEVICE
‘L OGRXQ'* = LOG RECEIVE BUFFER QUED TO EVENT LOG
*DVIXRX:' = WAIT FOR RX TO COMPLETE
LOGRXC'* = LOG RX COMPLETE TO EVENT LOG

HECK NEXT PART
BACK

ISPATCHER

#OPBFPT ,~(SP)

CZCLFAO DMR,DMC=11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24
5636

5637

MACY11 30A(1052) ‘Is-APR-BO 09:26 PAGE 135
LISTEN MODE SECTION

SEQ 0134

F1N
MACY11 30A(1052)
18-APR-80
DEVICE FUNCTION SUBROUTINE

CZCLrAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1
18-APR-80 09:24

5583

.SBTTL

5640
5641
564

564

.SBTTL

5651
5652
55232

3
: INPUTS:
:

§§2

; SUBORDINATE ROUTINES USED:

5657
5658
5659

3
3
3

5661
5662
5663
5664

:
; CALLING SEQUENCE:
3
JSR
F

; FUNCTIONAL DESCRIPTION:
DVINIT= DEVICE INIT ROUTINE
THIS ROUTINE IS DEVICE DEPENDENT CODE THAT INITS
THE DEVICE BEING TESTED.

5665
5666

033400

5669
5670
5671
55277%

033400
033406
033412
033416

012737
005077
005077
012777

000100
156400
156370
040000

007272

5676
5675
5676
5677
5678
Ssgg

033424
033432
033434
033442
033450
033452

022737
001003
112777
022737
001003
112777

000004

012024

000200
000006

156336
012024

000200

156320

5681
5682
5683

033460
033464
033466

005777
100426

DVINIT:

033466
033470
033476

005737
001371

007272

5688

033476

012737

016340

004737
005237

020774
007144

5689
5690
5691
%
5693

033506
033512
033520
0335%
0335

104422

017737
017737

156352

156312

5684
5685
5686

5687

SEQ 0135

DEVICE INIT SUBROUTINE

5667

PAGE 136

DEVICE FUNCTION SUBROUTINES

5644
5645
56‘6

5647
5648
5649

09:26

156266
156264

DVING:

DVIN2:

007176

007200
007202

(I.E. FULL/HALF DUPLEX BAUD RATE, MAINT MODE.)

‘FHDPLX'* INDICATES IF MODE IS FULL OR HALF DUPLEX. (1-ru.l.)
ADDRESS POINTERS (SELO,...) ALREADY POINT TO DEVICE'S REG.S

'lGDVE': = LOG DEVICE ERROR TO EVENT LOG
*TOORIO’* = TIME OUT OR INPUT INTERRUPT OR OUTPUT INTERRUPT
"'CLRAW'® = CLEAR RQI AND WAIT FOR RDI TO GO AWAY

PC.DVINIT

JMASTER CLEAR DEVICE
MOV
CLR
CLR
MOV

#100, TIMERT
aSEL6
aSELS
#MCLR,3SELO

;DO A MASTER CLEAR

(0, 4
BNE
MOVB
C(MP
BNE
MOVB

#DMRC6,0PTYP
DVING
#200,aBSEL1
#DMR6,0PTYP
DVIN2
#200,aBSEL1

;IS THIS A 8206
;IF NOT GO TO 6
;SET RUN FOR 8206
Is THIS AN 8206 DMR
IF NOT GO TO 2
SET RUN BIT FOR 8206

TST
8M]
BREAK

@SELO
DVINI

;IS RUN BIT SET
sIF YES GO TO 1 ELSE...

TST
BNE

TIMER1
DVINZ

;SEE IF TIME HAS EXPIRED
;IF NOT GO BACK AND CHECK

MOV

#DVEM3, TEMP2

MOV
MOV
JSR

aSELO, TEMP3
asaz TEMP4

PC.LGDVE
INC
ERRCNT
ERRSOFT 11,DVEM3,ERR13

sSET UP TIMER 1 FOR 100(OCTAL) TICKS

sAGAIN ELSE...PRINT ERROR

;LOAD UP ERRM. AND REG OQUTPUTS
;LOG TIME OUT WAITING FOR RUN

TRAP

C$8RK

1"
1 -APR-80 09 24
DEVICE INIT SUBROUTI

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24

MACY11 30A(1052)

PAGE 137

03330 000013
b

104457

0335
033536

016340
020450

033540

000717

SEQ 0136
TRAP

LWORD
.WORD

.WORD
BR DVINIT

033542

;GO BACK AND TRY MSTR CLR AGAIN IF ERROR

DVIN1:

; DO BASE IN COMMAND

BIC

:SET UP BASE IN INT EN

MOV
P
BLT
MOV
BIS

#0,3SEL6
oPTYP,#6
DVIN?
#522,3SEL6

:SET UP SEL 6
:1S THIS DMR MODE
*IF NOT GO TO 7
*SET DMR MODE
*SET IEO

PC,TOORIO
#BASE
, 3SEL4

#1E0.QSEL

BIC
P

#LULOOP,@SELO
#TTL MLTYP

BIS

#LULOOP,3SELO

BNE
DVIN3:

;CLEAR INPUT AND OUTPUT INT FLAGS

#143,aBSELO

JSR
MOV

DVIN7:

#3,FLAG

MOVB

JSR

DVINS

PC.CLRAW

:GO WAIT FOR INTERRUPT OR TIME OUT

:CLEAR LU LOOP
:IS TTL SELECTED

* IF NOT GO TO 3

-ELSE SET LU LOOP

: DO WRITE MODEM IF DMR MODE
012024
000145
035026
000014

156106

156072
007222

000010
034720

156054

OPTYP.#6
DVINS
#145,aBSELO
PC,TOORIO

;1S THIS DMR MODE
*IF NOT GO TO 8
*SET UP WRITE MODEM
GO TO WAIT FOR INT

#MODREM, MLTYP

;IS THIS REMOTE
LOOP

BIS

#MBIT2,8BSEL6

BIC

156110

007222

000004
000003

e
BLT
MOVB
JSR
BNE
DVINS:
DVIN10:

#BIT2+#BIT3, ASELS

:CLEAR BSEL6 AND 7

DVINS

:IF NOT GO TO 9

#MODLOC MLTYP

:IS IT MODEM LOCAL

BIS

#BIT3,aBSEL6

:SET MODEM LOCAL

BNE

JSR

DVINIO

PC, CLRAW

:SET THE BIT

:IF NOT EXIT

“CLEAR RDI AND WAIT

; ENABLE EXTENDED ERRUR IF DMR MODE
000146
035026
034720

156026

MOVB
JSR

JSR

#146,aBSELO
PC,TOORIO

PC.CLRAW

: DO CONTROL IN COMMAND

000141
035026

156010

000004

007220

156014

DVINS:

MOVB

JSR

CLR
P

BNE

#141,3BSELO

PC,TOORIO

aSEL6
#DOW_ MODTYP

DVINS

:SET UP FOR ENABLE
;CLEAR RDI AND WAIT

CSERSOFT

11
DVEM3
ERR13

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PT
18-APR-80 09:24

034006
034014

052777
000406

002400

MACY11 30A(1052)

DVINS:

002000

155760

155754
034720

007206

012024

000006

001000

007232

(09:24

DEVICE INIT SUBROUTINE

155776

007224

H1
18-APR-80

DVING:

PAGE 138

BIS
BR

#MAINTB+HALFDB, GSEl.é

DVIN4

; AND FORCE HALF DUPLEX

TST
BNE
BIS

FHDPLX
DVING

;1S THIS A HALF/DUP
:IF NOT GO TO 4

;IF SO SET MAINT MODE

#HALFDB,@SEL6

:ELSE SET HALF/DUP

MOV
JSR

@SEL6,CONTIN

;SET UP CONTROL IN FOR MODS

P
BLT
BIS

OPTYP #6
DVINEX

#DMRRUN, FLAG

;1S THIS DMR
:IF NOT EXIT
:SET RUN OUTPUT EXPECTED BIT

JRETURN TO CALLER

DVINEX: RTS

PC.,CLRAW

;GO CLEAR RQI AND WAIT

;FOR RDI TO GO AwWAY.

SEQ 0137
BIT

MAZYT1 30A(1052) 1LAPR-80 09:24 PAGE 139

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST
18-APR-80 09:24

DEVICE GET MODEM STATUS SUBROUT INE

.SBTTL

DEVICE GET MODEM STATUS SUBROUT INE

TR TR TR DRT TN

T TN

N T T TN TR T

: FLNCTIO.%L DES CRIPTION:
VMODS
GET MODEM STATUS

AR L

CZCLKA.P11

112777
00473
017737
013777

000207

000141
035026
155704
007206
034720

155704

010206
155700

IMPLICIT INPUTS:
THE BIT POSITION AND AVAIABLITY OF THE MODEM SIGNALS CTS.DSR....RI,.
IN THE DEPENDENT PORITION OF THE GLOBAL EQUATES SECTION.

OUTPUTS::
CURRENT MODEM SIGNAL VALUES IN ‘MODS''
SUBORDINATE ROUTINES USED:

"TOORIO'* = TIME OUT OR INPUT INTERRUPT OR OUTPUT INTERRUPT
"CLRAW'® = CLEAR RQI AND WAIT FOR RDI TO CLEAR
CALLING SEQUE NCE:
PC.DVMODS
JSR
#141,3BSELO
PC,TOORIO

@SEL4 ,MODS
CONTIN,@SEL6
;E,CLRAU

;SET _UP CONTORL IN
;GO TIME OUT CHECK
:SET UP MODEM STATUS
sSET UP OLD CONTORL IN
sRETURN TO CALLER

SEQ 0138

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

5803

J N
18-APR-80

MACY11 30A(1052)

09:24

PAGE 140

DEVICE QUEUE RECEIVE SPACE SUBROUTINE

.SBTTL
L

DEVICE QUEUE RECEIVE SPACE SUBROUTINE

s FUNCTIONAL DESCRIPTION:

DVRXQ = THIS SUB ROUTINE QUES THE REC BUFFER SPACE TO THE
DEVICE, THEN CLEARS THE QRX BIT OF THE FLAG WORD.

INPUTS:

DVRXA = ADDRESS OF RX BUFFER SPACE
DVRCC = BYTE CHAR COUNT OF RX BUFFER
QRX FLAG BIT = SET BY CALLING ROUTINE

OUTPUTS:

QRX FLAG BIT = CLEARED BY ROUTINE

SUBORDINATE ROUTINES USED:

"TOORIO* = TIME OUT OR OUTPUT INTERRUPT OR INTPUT INTERRUPT
"CLRAW'® = CLEAR RQI AND WAIT FOR RDI TO CLEAR
CALLING SEQUENCE
:

007232

DVRXQ:

JSR

PC.DVRXQ

BIT

#ARX ,FLAG

BIC

#QRX ,FLAG

BEQ

007232
155632
010206
155622
155620
DVREX:

MOVB
JSR
MOV
MOV
MOV
JSR
RTS

DVREX

#1464 ,3BSELO
PC,TOORIO
@SEL4 ,MODS
DVRXA,aSEL4
DVRCC,aSEL6
PC.CLRAW

;IF NOT RX THEN EXIT
sELSE QUE RX

;CLEAR FLAG FOR RX

;G0 CHECK FOR IN OR OUT
;SET UP NEW MOD STATUS
;LOAD CC AND ADDR
;CLEAR AND WAIT
JRETURN TO CALLER

SEQ C139

CZCLYAQ DMR,DMC-11 DATA COMM. LINK TEST
18-APR-80
CZCLKA.PT

K11
18-APR-80

MACY11 30A(1052)

09:24

PAGE 141

DEVICE TRANSMIT AND RECEIVE SUBROUTINE

mmMTmmmE IImITmTmTmmT
I ETITEIETTTETTTETT T
+
+

.SBTTL

DEVICE TRANSMIT AND RECEIVE SUBROUTINE

DVTXRX-DEVICE TRANSMIT AND RECEIVE ROUTINE
THIS CODE QUES THE TRANSMIT BUFFER TO THE DEVICE

IF NEEDED. THE CODE THEN WAITS FOR A TX COMPLE,

RX COMPLETE OR BOTH. THE CODE REPORTS A TIME OUT
ERROR IF NO BACC OUTPUT INTERRUPT IS RECIEVED BEFORE

60 SECONDS. AFTER REPORTING ERROR TIMER IS RE STARTED

AND DEVICE WILL CONTINUE TO WAIT FOR INTERRUPT. CODE
ALSO REPORTS ERROR IF INPUT INTERRUPT OCCURS WHEN
EXPECTING OUTPUT INTERRUPT;WHEN RX BACC OCCURS WHEN
S)E(figcém TX,AND WHEN TX INT. OCCURS WHEN EXPECTING

A IE I mmIT I

FUNCTIONAL DESCRIPTION:

R R A

BYTE COUNT OF TRANSMIT MSG.
SET IF TRANSMIT REQUESTED
SET IF TRNASMIT EXPECTED
SET IF RECIEVE EXPECTED

"DVTXA'* = ADDRESS OF TX MSG. COMPLETED

:g\{;.C.C" = BYTE COUNT OF TX MSG. COMPLETED

= SET IF TX COMPLETED
"DVRXA’* = ADDRESS OF RX MSG. COMPLETED
‘DVRCC** = BYTE COUNT OF RX MSG. COMPLETED
*QRX
= SET IF RX COMPLETED
SUBORDINATE ROUTINES USED:

"TOORIOTM* = TIME OUT OR OUTPUT INTERRUPT OR INTPUT INTERRUPT
“CLRAW' =~ CLEAR RQI AND WAIT FOR RDI TO CLEAR

A R L

R L

*LGDVE"* = LOG DEVICE ERROR TO EVENT LOG
*OUTHDL'' = OUTPUT INTERRUPT HANDLER CODE

000010

007232

000010
000140
50
1555 g
00711
007114
034720

007232
155552

000074
000060

CALLING SEQUENCE:
PC.DVTXRX
JSR

DVIXRX: BIT
BEQ
BIC
MOVB
JSR
MOV
MOV
MOV
JSR

DVTR3:

MOV
TOINOT: BIT

#QTX_ FLAG

:ANY TX TO QUE

DVTRS
#QTX,FLAG

<IF NOT GO WAIT FOR OUPUT
:CLEAR FLAG

aSEL4,MODS

*PUT IN NEW MOD STAT

PC.,CLRAW

;CLEAR RQUI ANDWAIT

#60. , TIMERS

:SET TIMER FOR 60 SECS

#140,3BSELO
PC,TOORIO

DVTXA.@SEL4
DVTCC.aSEL6

#CRX+#CTX,FLAG

:GO CHECK FOR IN OR OUT

:IS IT TX OR RX COMP ALREADY?

SEQ 0140

CZCLFAO DMR, W-‘l‘l DATA COMM. LINK TEST

MACY11 30A(1052) 15-%80 09:24 PAGE 142

S898 034272 001071

BNE

sooi
5903
5904
5905
5006
5907

BNE
TOIN1
MOV
#DVEMS, TEMP2
MOV
@SELO, TEMP3
MOV
aSEL2, TEMPS
JSR
PC.LGDVE
INC
RRCNT
ERRSOF T 12.ovm.m13

CZCLKA.P11 ~ 18-APR-80 09:24

DEVICE TRANSMIT AND RECEIVE SUBROUT INE

s!9oo!
034%3 001
005737 007276
5901 034

5908

5910
5911

3311

034302
034310
034316
034326
034330
034334

01
016426 007176
017737 155462 007200
017737 155460 007202
004737 020774
005237 007144

0343346

104457

034340
034342

016424
020450

034336

5914
5915
5916

034346
034346

104422

5917 034350 032737
ggg 034356 001425

000001

007232

5920
5921
5922
5923
5924
5925

034360
034366
034376
034402
034406
034414

012737
017737
017737
004737
042737
005237

016516
155404
155402
020774
000001
007144

007176
007200
007202

5927
5928
5929
5930

034420
034422
034426
034426

104457
000015
016516
020450

034432

032737

5933

5934

BR
TOIN1:

001711

000002

g;z 034442 004737 035150
5937

034446

5939

034456

5941

034466

5938 0344564

5940 034466

5963
5964
5945
5966

597
5968

007232

034476
034476
034506
034512
034520
0345264
034526

007232

032737

000060

007232

032737

000020

007232

032737

000200

007232

001703

001440

001
01
01
013737
004737
104457

DVTR3

:RETURN TO CHECK TIMER

BIT
BEQ

#ININT ,FLAG
TOIN2

;1S IT INPUT INTERRUPT
*IF SO LOG ERROR

MOV
MOV
MOV
JSR
BIC
INC

#DVEMS
, TEMP2
aSELO, TEMP3
@SEL2, TEMPS
PC,LGDVE
#ININT . FLAG
ERRCNT

BREAK

017041 007176
035746 007200
035750 007202
020774

TOIN2:

TOINOT

BIT

#OTINT ,FLAG

BEQ

JSR

DVTR4:

TOINOT

595
5953

034532

020450

034534

000411

CSERSOFT

.WORD
.WORD

DVEM&
ERR13

TRAP

(S$BRK

TRAP
WORD
.WORD
.WORD

CSERSOF T
13
DVEMS
ERR13

PC,OUTHDL

BIT

HCTX+#CRX,FLAG

BIT

#CTX FLAG

BIT

ETX,FLAG

BEQ

BEQ
BNE
MOV
MOV
MOV
JSR

TOINOT

DVTRS

DVTR4A
#DVEMS,TEMP2
TSEL4, TEWP3
TSEL6. TEMPS
PC.LGDVE

ERRSOFT 14.DVEMS,ERR13

TRAP

CSERSOFT

.WORD

ERR13

:IF NOT OQUTPUT GO BACK AND

gfsgxm"me' &Gfimr AND RETURN
:IS IT TX OR RX

:IF NOT GO BACK AND TRY AGAIN
2IS IT X

*IF NOT TRY RX

<IF SO SHOULD IT BE

<IF IT SHOULD GO TO 4A
:ELSE LOG E

:REPORT ERROR

2950 034%3 oc1[ 7o:.c
“?
5951

TRAP

:CLEAR BIT

ERRSOFT 13,DVEMS.ERR13

034430 000715

034440

;1S TIMER EXPIRED

WORD

000744

ggg

TIMERS

;1S SO EXIT

034344

034420

DVTRé

SEQ 0141 |

'm"“ 339‘9

DVTR4B

;THEN CLEAR COMPL.FLAG

L
MACY11 30A(1052) 1a-ma-oo 09:24 PAGE 143
DEVICE TRANSMIT AND RECEIVE SUBROUTINE

CZCLrAO DMR,
=11 _DATA COMM. LINK TEST
CZCLKA.P1
1
09:26
5954
5955

034536

013

035746
035750

5957
9959

0071 1 2

007g
0072

007232
007176
007200
007202

DVTRéA: MOV

MOV
BIS
DVTR4B: BIC
DVTRS: BIT
BEQ
BIT
BNE
MOV
MOV
MOV
JSR

TSEL4,DVTXA
TSEL6,DVTCC
#QTX,FLAG
#CTX.FLAG
#CRX ,FLAG
DVTREX
#ERX ,FLAG
DVTRSA
#DVEMS, TEMP2
RSEL4, TEMP3
asen.s TEMPS,
PC.LGDVE

sAND SET
TX COMPL FLAG

*ELSE cn.e FLAG
:IF NOT THEN EXIT.

:IS IT RX T00?

:TEST IS THIS SUPPOSED TO BE RX

:IF YES PROCESS AS SUCH

sELSE
:LOG ERROR

a5t

ERRSOFT 15.DVEMS,ERR13

SEQ 0142

035752
035754
000004
000040

007126
007130
007232
007232

BR
MOV

DVTRSA: MOV
BIS

BIC
DVTREX: RTS
DVTRX1:

DVTRX1
RSEL4
., DVRXA
RSEL6.DVRCC

SAND EXIT

#CRX.FLAG
PC

;CLEAR FLAG FOR RX DONE
SAND EXIT

#ORX
, FLAG

CSERSOFT

ERR13

N
MACY11 30A(1052) 18-APR-80 09:24 PAGE 144
DEVICE TRANSMIT AND RECEIVE SUBROUTINE

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PT
18-APR-80 09:24

; DEVICE DEPENDENT SUBROUTINES

5981
g%

.SBTTL

5984
5985

034700

5986
5987
5988
5989
5990

034700
034700
034706
034706
034706

S99§

034710

034710
034710
034716
034716
034716

000007

007232

DVINS

BIS
ENDSRV

#ININT FLAG

DVINS::
L10021:

000002

052737

000002

007232

BGNSRV

DVOUTS

8IS
ENDSRV

#OTINT ,FLAG

RTI

DVOUTS: :
L10022:

000002

RTI

SR
R R

+
+

5993
5996
5995
5996
5997
5998
5999

052737

SEQ 0143 |

DEVICE INTERRUPT SERVICE ROUTINES
BGNSRV

FUNCTIONAL DESCRIPTION:

CLRAW = CLEAR RQI AND WAIT FOR RDI TO GO AWAY
THIS CODE CLEARS THE INPUT REQEST BIT(RQI) SETS A
TIMER UP TO TIME 50(OCTAL) TICKS AND MAKES SURE
RDI CLEARS BEFORE TIMER EXPIRES. IF TIMER EXPIRERS
CODE REPORTS ERROR AND SETS UP TIMER AND WAITS AGAIN.

SUBORDINATE ROUTINES USED:

"LGDVE'* - LOG DEVICE ERROR (TIME OUT)
CALLING SEQUENCE
:

JSR

034720 011637 007214
034726

042777

034746 104%
750

032

756 001370

760

g
o

155044

000200

155020

CLRAW:

MOV

BIC

034
012737 000050 007272 CLRA3: MOV
034740 005737 007272
CLRA1:
TST
8&;“2 001406
BEQ

82% 01
6031
01
776 %‘
60
2

000040

BIT

BNE

RIS

016166
007176 CLRA2: MOV
15
00
MOV
15
00
MOV
07 ‘2
JSR
INC

PC.CLRAW

(SP) ,PCADD

:SAVE PC OF CALLING ROUTINE

#RQ] .ASELO

#50, TIMER1
TIMERT
CLRA2

:SET UP TIMER FOR SOCOCTAL) TICKS
:1F TIMER EXPIRED ERROR

#RD] ,3SELO

:1S RDI CLEAR

CLRAT

SDVEMO, TENP2
asag.fms
SSEL2. TEMPS
PC,LGDVE
ERRCNT

p—————

<IF NOT GO CHECK TIMER

SRETURN TO CALLER

:LOG DEVEICE EVENT 0

TRAP

CSBRK

104457
000020

DEVICE INTERRUPT SERVICE ROUTINES

ERRSOFT 16,DVEMO,ERR9

;WHILE WAITING FOR RDI

sRESET TIMER AND CONTINUE

CLRA3

SEQ 0144
CSERSOFT
16
DVEMO
ERR9

D —————

6035
36

MACY11 30A(1052) 1S-APR-80 09:26 PAGE 145

358

CZCLFAO DMR,DMC=11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

MACY11 30A(1052) 18-APR°80 09:24 PAGE 146

18-APR-80 09:24

TIME OUT OR INPUT INT. OR OUTPUT INT.

.SBTTL

604

SEQ 0145

TIME OUT OR INPUT INT. OR OUTPUT INT.

6044
6045
6046
6047
6048
6049
6050
6051
6052
6053

s+
s FUNCTIONAL DESCRIPTION:
3
TOORIO = TIME OUT OR INPUT INTERRUPT OR OUTPUT INTERRUPT
3
THIS ROUTINE SETS UP A TIMER FOR 100 (OCTAL) TICKS
3
THEN CHECKS FOR TIME OUT,OR INPUT INTERRUPT,OR OUTPUT
3
INTERRUPT, IF TIME OUT OCCURS IT REPORTS ERROR AND
:
RESTARTS TIMER. IF INPUT INTERRUPT OCCURS RETURN TO CALLER
:
IF OUTPUT INTERRPUT OCCURS LOG IT AND CONTINUE WAITING FOR
3
INPUT INTERRUPT.
S

6055
6056
%gg

3
3
:

: USE OF FLAGS:

"OTINT'' = SET BY OUTPUT INT ROUTINE
ININT** = SET BY INPUT INT. ROUTINE
CLEARED BY THIS ROUTINTE.

6059

; SUBORDINATE ROUTINES USED:

ggg]"

6063
6064

; CALLING SEQUENCE:
S
JSR
PC,TOORIO

668
6067 035026 011637 007214
6068

6069
6070
6071
6072
6073
6074
6075
6076

035032

012737

000100

007272

035046
035054
035062
035070
035074

012737
017737
017737
004737
005237

016254
154722
154710
020774
007144

007176
007202
007200

6078

035100

104457

6077

6079
6080
6081
6082

6084

6085
6086
6087

035040
035044

035100

035102
035106
035106
035110

035112

005737
001022

TOORIO: MOV
TOOR3:

104422
032737

6088

035122

001402

6093
6094

035124
035130
035136
035140
035146

004737
032737
001740
042737
000207

;SAVE ADDR. OF CALLING ROUTINE

TIMER1
TOOR1

;1S TIME EXPIRED
s IF NOT CONTINUE
;IF YES ERROR

#100,TIMERT

MOV
MOV
MOV
JSR
INC

#DVEM1, TEMP2
aSEL2, TEMP
@SELO,TEMP3
PC, LGDVE
ERRCNT

TST
BNE

BR
TOOR1:

000002

(SP) ,PCADD

MOV .

;SET UP TIMER

ERRSOFT 17 ,DVEM1,ERR9

000021
016254
020372
000746

035112
035114

6089
6090
6091
6092

007272

"OUTHDL'® = OUTPUT INTERRUPT HANDLER

007232

035150
000001

007232

000001

007232

TOOR2:

TRAP

TOORIO

BREAK

BIT

#OTINT ,FLAG

BEQ

TOOR2

JSR
BIT
BEQ
BIC
RTS

PC,OUTHDL
#ININT FLAG
TOOR3
#ININT FLAG
PC

;1S THERE AN OUTPUT
;PEND ING
:IF NOT GO TO 2
;ELSE GO HANDL IT
:
;1S THERE AN INPUT PENDING
:IF NOT GO BACK TO TIMER (K.

sELSE CLEAR THE INPUT PEND FLAG
sAND RETURN TO CALLER

CSERSOFT

MWORD
.WORD
.WORD

17
DVEMI
ERR9

TRAP

CSBRK

MACY11 30A(1052) ‘lg-APR-OO 09:26 PAGE 147

CZCLFAO DMR,DMC~11 DATA COMM. LINK TEST
18-APR-80 09:24
CZCLKA.P

OUTPUT INTERRUPT HANDLER

FUNCTIONAL DESCRIPTION:

OUTHDL - WTPUT INTERRUPT HANDLER
THIS ROUTINE IS CALLED WHEN AN OUTPUT INTERRUPT HAS SET
THE ‘OTINT'® BIT IN THE ‘FLAG'® WORD. IT CHECKS FOR
AN RDO SIGNAL IF NO RDO THEN REPORT ILLEGAL INTERRUPT.
THEN IT CHECKS FOR BACC OUT IF NOT BACC OUT REPORT THE

A TR TR E T T

.SBTTL

6097

A TA

TYPE OF OUTPUT ERROR. IF BACC OUT FIND IF RX OR TX

IF RX SET CRX BIT AND MOVE ADDR AND BYTE COUNT TO RSEL4

A TR TA

AND RSEL6. IF TX SET CTX BIT AND MOVE ADDR AND BYTE COUNT
TO TSEL4 AND TSEL6. CLEAR OTINT FLAG AND RETURN TO CALLER.
USE OF FLAGS:

T R

T A T A

ggoccacesas

SoBIrNrWN—=O

6109

‘OTINT'® = SET BY OUPUT ROUTINE
CLEARED BY THIS ROUTINE
"DMRRUN’® = SET BY DVINIT ROUTINE IF THIS IS DMR
CHECKED AND CLEARED BY THIS ROUTINE.
L
= SET IF TRANSMIT COMLETED

"CRX"*

T A T R

= SET IF RECIEVE COMPLETED

SUBORDINATE ROUTINES USED:

T R

SEQ 0146 |

OUTPUT INTERRUPT HANDLER

"LGDVE'* -LOG DEVICE ERRORS TO EVENT LOG
CALLING SEQUENCE
JSR

PC.,OUTHDL

A A R

6121

007214
000002
000200
016610
154576
154600
020774

007232
154612

OUTHDL :

MOV
BIC

BIT

BNE
MOV
MOV
MOV
JSR

007176
007200
007202

INC

007144

(SP) ,PCADD

:SAVE ADDR. OF CALLING ROUTINE

#RDO, 3SEL2

:CLEAR PEND FLAG AND CHK FOR RDO

#OTINT ,FLAG

OUTH1
#DVEMG, TEMP2
aSEL2, TEMP3
SSEL6. TEMPS
PC,LGDVE
ERRCNT

:IF RDO OK ...ELSE LOG ERROR
:GO LOG ERROR

ERRSOFT 18,DVEM6,ERR9

TRAP

CSERSOFT

LWORD
.WORD
.WORD

18
DVEM6
ERR9

TRAP

CSESCAPE
L10020-.

;EXIT TEST IF ERROR
TST

.WORD

035240
035246
035250

000001
035660

154534

OUTH1:

BIT
BNE

JMP

#BACC,@SEL2
18
OUTHZ

:1S_THE OUTPUT BACC
:

BR _IF NO

:IF SO GO TO 2

em———

61
6151

ESCAPE

12
MACY11 30A(1052)
1 APR-80 09:24
OUTPUT INTERRUPT HANDLER

007140
035736
012024

OUTH6:

000040

007202

001000

007232

001000
035736
020000
016665
154416

007232
007204
007176
007200

020774
013456
000001

007204
007202

017340
000002

007204
007202

017327
000010

007204
007202

017307
000020

007204
007202

017275
000100

007204
007202

017262
000200

007204
007202

017242
000400

007204
007202

017224
001000

007204
007202

017204
012024

007204
000006

002000

007202

020022
004000

007204

020046

007204

007202

OPTYP 46

18:

BLT
BIT
BEQ
BIT
BEQ
BIC
JMP
MoV
MOV
MOV
JSR
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
[
BLT
BIT
BEQ
MOV
BIT
BEQ
MOV

OUTH6
NOBUF
OUTHEX

:IF NO BUFF INC COUNT AND EXIT
;ELSE GO T0 6

51
DMR MODE SKIP TO 51
RUN STATE
51$
BRANCH
#DMRRUN., FLAG
RUN EXPECTED
52%
BRANCH
#DMRRUN
, F LAG
SO THEN CLEAR EXPECTED
OUTHEX
AND EXIT
#RUNSBM
, CONOTM
#DVEM7
, TEMP2
aSEL2, TEMP3
PC,LGDVE
#LPO, CONOTM
:LOAD “NULL STRING'' TO INIT CONOTM
#8170, TEMPS
IS THIS DATA CHECK
18
#DATCKM, CONOTM
#BIT1, TEMPS
;1S THIS TIMEOUT
2s
#TIMOM, CONOTM
#BIT3, TEMPS
;1S THIS DDCMP MAINT RECVD
4
#DDCMRM, CONOTM
#BIT4, TEMPL
;1S THIS LOST DATA
58
#LOSDAM, CONOTM
#BIT6, TEMP,
;IS THIS DISCONNECT
6$
#D1SCOM, CONOTM
#BIT7, TEMPL
;1S THIS DDCMP START RECWD
7s
#DDCSRM, CONOTM
#MBIT8, TEMPS
;IS THIS NON-EXSISTENT MEMORY
g%
AN)CMM, CONOTM
#BIT9, TEMPS
;1S THIS PROCEDURE ERROR
9s
#PROEM, CONOTM
OPTYP,#6
THIS DMR MODE
118
NOT BRANCH
#BIT10, TEMPS
THIS A RX IDLE
108
NOT BRANCH
#RXIDM, CONOTM
SO SET _UP MESSAGE
#MBIT11.TEMPS
THIS CTS FAILED
118
NOT BRANCH
#CTSFM, CONOTM
SO SET UP MESSAGE
1

005237
000137

#8112, TEMPS

MBITS, TEMPS

17 R 17,

035272
035276

BIT

BEQ
INC
JMP

7 R B

007202

000004

;ELSE LOG ERROR AND PRINT IT

N T

032737
001404

PAGE 148

MOV
ASEL6, TEMPS
; IF NO BUFFER OUTPUT JUST COUNT THEM

e B

035262
035270

18:

007202

154532

g B

017737

PRTR

035254

ey oy Bnng

61 Sg
615
6154
6155
6156
6157
6158
6159
6160

AR TR TR

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PT
18-APR-80 09:24

SEQ 0147

F 12
MACY11 30A(1052)
18-APR-80 09:24
OUTPUT INTERRUPT HANDLER

007202

020032

007204

621§
6213
6216
6215
6216
6217
6218
6219
6220
6221
6222
6223
6226
6225
25%9

035642
035646
035646
035650
035652
035654
035656

005237

007144

104457
000023
016665
020310
000427

035660
035660
035666
035670
035676
035
035712

032777
00101
052737
017737
017737
000411

000004

6228
6229
6230
6231
6232
6233
6234
6235
23%9

035714
035722
035
035736
035744
035746
035750
035752
035754

052737
017737
017737
042777
000207
000000
000000
000000
000000

000040
154060
154056
000

6238
6239

035756

000207

118:

MOV

128:

156114

BIT
BEQ

OUTHZ:

000020
154104
154102
OUTH3:
OUTHG :

OUTHEX :
TSELS:
TSELG:
RSEL4:
RSEL6:

qggT12.TEHP4
#CDGLM, CONOTM

OUTHEX

;CLEAR RDO AND RETURN TO CALLER

#RXBIT,SEL2

;IS THIS RX BACC OuUT
:IF NOT THEN IT MUST BE TX.

OUTH§

#CTX, FLAG

@SEL4
, TSELS
@SEL6, TSEL6
OUTHEX
#CRX,FLAG

@SEL4 ,RSELS
@SEL6,RSEL6
g?D0.0SELZ

0
0
0
0
PC

SEQ 0148

;IS THIS CD GLITCHED
;BR IF NO
;IF SO SET UP MESSAGE

INC
ERRCNT
ERRSOFT 19,DVEM7 ,ERR8

5558 ==332 333ge

010000

—

32737
001403
012737

(7]

0356%3
035632
035634

6208
6209
g%}?

PAGE 149

558

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLRA.PTT
18-APR-80 09:24

:SET RX COMPL
:THEN MOVE TO TEMP
;AND SEL6 TO TEMP
:CLEAR RDO
JRETURN TO CALLER

T
CSERSOF
19

DVEM7
ERR8

CZCLFAQO DMR,DMC-11 DATA COMM. LINK TEST

MACYTT 30A(1052) 1S-APR-80 09:24 PAGE 150

6264

.EVEN

CZCLKA.PT

6244
6245
62‘9

035760
035760
035760

18-APR-80 09:24

OUTPUT INTERRUPT HANDLER

ENDTST

104401

SEQ 0149

L10020:
TRAP

CSETST

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PTT
18-APR-80 09:24

6248
6249

H 12

MACY11 30A(1052)
18-APR-80 09:24
OUTPUT INTERRUPT HANDLER

PAGE 151

SEQ 0150

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

18-APR-80 09:24

625

035762
035762
035764

HARDWARE PARAMETER CODING SECTION

LSHARD::

.SBTTL
035764
035764
035766
035770

.SBTTL

6279
6280
6281
6282
6283
6284
6285
6286
6287
6288
6289
6290
6291
6292
6293
629%

035772
035772
035774
035776
036000
036002
036002
036004
036006
036010
036012
036012
036014
036016
036020
036022

003032
036150
000340
000004
000007

6297
6298
6299
6300
6301
6302

036024
036024
036026
036030
036032
036034

005032
036176
000007
000000
000007

001031
036067
160000
177776

002031
036115
000300
000776

.WORD L10023~LS$HARD/2

DEVICE INDEPENDENT SECTION
GPRML

000130
036036
000001

6276

6304

SEQ 0151

BGNHRD

000025

222;78

6303

PAGE 152

; THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
; THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE
: MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE
; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
: WITH THE OPERATOR.
S

6267

6295

09:26

6254
6255
6256
6257
6258
6259
6260

6269
6270
6271
6272
6273
6274
6275

12
18-APR-80

HARDWARE PARAMETER CODING SECTION
.SBTTL

6251
625

6261
6262
6263
6264
6265
6266

MACY11 30A(1052)

DPLX.0.1,YES

.WORD
.WORD
WORD

TSCODE
DPLX
1

.WORD
.WORD
WORD
WORD

TSCODE
CSRADR
TSLOLIM
TSHILIM

.WORD
.WORD
WORD
WORD

TSCODE
VECTOR
TSLOLIM
TSHILIM

.WORD
.WORD
WORD
.WORD
.WORD

TSCODE
PRIOR
340
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
WORD
.WORD

TSCODE
OPTN
7
TSLOLIM
TSHILIM

DEVICE DEPENDENT SECTION
GPRMA

(SRADR,2.,0,160000,177776,YES

GPRMA

VECTOR.4,0,300,776,YES

GPRMD

PRIOR,6.,0,340,4.7,YES

GPRMD

DEVPRM,10.D.17.0.15..YES

GPRMD

OPTN,12.0,7.0.7.YES

GPRMD

BAUD,14,0.7.0.7,YES

GPRMD

LININ.16.0.7.0.7.YES

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST

MACY11 30A(1052) 1‘-APR-80 09:24 PAGE 153
DEVICE DEPENDENT

6306

036036

ENDHRD

6308
6309
6310

036036

CZCLKA.P11

6307

18-APR-80 09:24

SECTION

SEQ 0152
L10023:

.NLIST

.EVEN

BEX

sDEVICE INDEPENDENT QUESTIONS
036036

052506

046114

042040

DPLX:

.ASCIZ

/FULL DUPLEX OPERATION : /

sDEVICE DEPENDENT QUESTION

036067
036115

036150
036176

106
111

047111
042506

053105
052116
042526
044526

041511
051105

051122
042503

CSRADR: .ASCIZ
VECTOR: .ASCIZ

PRIOR:
OPTN:

.ASCIZ
.ASCIZ

/INTERRUPT PRIORITY :
/DEVICE OPTION TYPE :

;BAUD:

.ASCII

/BAUD RATE TO USE (*0°' FOR 2.4K,

LASCIZ

<15><12>/

:DEVPRM:
'

LASCII

sLININ: .ASCIZ

6311

036262

/DEVICE CSR ADDRESS
:
/INTERRUPT VECTOR ADDRESS /

.LIST

BEX

-EVEN

.ASCIZ

(O=DHC 5=DMR-DMC MODE ,7=DMR)/

/DEVICE PARMETER WORD (ENABLE CRC,STRIP SYNC...) : /

<15><12>/

*2° roa 9.6K,

'1°'FOR 4.8K;/

*3% FOR 19.2K,

*4* FOR S6K;/

*5'FOR 250K, '6' roa 500k, *'7* FOR 1 MEG : /

/LINE INTERFACE (0‘423 1=...V/

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.PT
18-APR-80 09:24

MACY11 30A(1052)

K 12
18-APR-80

09:26

DEVICE DEPENDENT SECTION

PAGE 154

SEQ 0153

;.SBTTL SOFTWARE PARAMETER CODING SECTION
s*é

: THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS

THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.

THE

c MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE
: MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS

; WITH THE OPERATOR.

BGNSFT

ENDSFT

oooooooooooooooooooooooooooooooooooo

SRR SRS R

ooooooooooooo

SO OPPPIPIOIIIOGIOIOPIIOIOIOIOOIPOIOEPOPPOPDS

: TEMPORARY PATCH AREA- FOR DEBUG PURPOSES

000030

SPATCH:

036342
036342
036344
036346

.BlL.KW

LASTAD

LSLAST::
-END

.EVEN
.WORD
.WORD
ENDMOD

036262
036262

MACY11 30A(1052) 15-APR-80 09:26 PAGE 156

CZCLVYAO DMR.DMC~11 DATA COMM. LINK TEST
CZCLKA.PT
18-APR-80 09:24
CROSS REFERENCE TABLE == USER SYMBOLS
ACY

= 000003
030216
30060

16604
469
471

4483
49124
48844
49584
47R7N
49834
47214
48474

4912

4989

5217

48314

4984
4977
4904
4897

498
49994

4924

4927

4965

496

47984

4817

4901

49084

4930

4934n

" 12
CZCLFAO DMR,DMC=11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 09:24
CZCLKA.P11 ~ 18-APR-80 09:26
CROSS REFERENCE TABLE == USER SYMBOLS

ACTTRA
ADDCC
ADDCT

ALCK
ALCK1
ALC
ALC
AL

ALCK3A
ALCK3B
ALCK3C

ALCK%

030274
022600
022674 4

4697
gm
1

4929
4598
37354

ogmz
031
031314
031534
ogww

100
1
519
52
5006

S127#
51914
52014
52374
5239

031652
031664
031660

1706

ALCKGA 031714
ALCK4B 031726
ALCKS
031200
ALLTR
031200
ASSEMB= 000010

:
:
:

TVMOD=

BAS

BAS
BAS
BAS|

BITO

000001
007211
000051

014755

015001
014772
021470

= 000001 G
BIT00 = 000001 G
3IT01 = 000002 G
ngg = 000004 G
31703

= 000010 G

BIT04 = 000020 G
BITOS = 000040 G
BIT06 = 000100 G
BIT07 = 000200 G
3ITO8 = 000400 G
BIT09 = 001000 G
BIT1 = 000002 G
3IT10 = 002000 G
BIT11 = 004000 G
BIT12 = 010000 G
3IT13 = 020000 G
BIT1% = 040000 G
BIT1S = 100000 G
ng = 000004 G
BIT3
= 000010 G

5249
5256
5053

5043

5261
266
51818
5059
1403

1759
1803#
20714
1777#

39}3

52554
50584
5057

52628

5265#
52
5257
5082

2239
6149
3068
2331
51

27384 3443
“sz

7468
gfiu
9
1606#
15954
159#
1593¢
1592¢

15914
1590¢
1589¢
1588¢
1587#
1586#
16054
1585#
1584#
1583¢
1582#
15814
15804
1604#
16034

3681
3673
3455#
1680

1606
1605
1604

179

1682
1790

‘

5267
S5242#

5264

!
|
|

5106

51804

5343»
3452

5708

1791

1803

6176

6179
6202
6205
1804

1789

1808

5727

= 000020 G

1602¢

1683

119 = 000100 G

16004

6164

1598#

6188
1801
619

1800

BIT8 = 000400 G

1939
1793
1%

1802

6191

4481

4599

4645

BITS

= 000040 G

BIT7

= 000200 G

BIT9 = 001000 G
BLDBEX 023006
DBUF
022676

1601#
1599¢

1597
gn
618

1686

1
3783
4476

SEQ 0155

|
|
;
'l

5235

S727
6185

BITé

4644

1603

1602
1601
1600
1599
1598
1597
1681
1807
1805
6208

PAGE 157

1792

S733

6182

S730

6156

4796

5033

6197

CZCLr.'AO DMR,DMC-11 DATA COMM. LINK TEST

CZCLRAPIT |
DBl
BLDB2
BLoaS

022706
022750
022766

BSELO 011578
=

BSEL1
BSELZ
BSELS
BSEL4
BSELS
BSEL6
BSEL?

012000
013002
015004
013006
012010
012012
012014

Iaurex 014033
BUFLIM= 001000
BYTBIT 007152
CABLE = 000002
CBLLOP= 000045
CCURAD 007110
CDGLM
020032
CHECK = 000003
CLEAR = 000001
CLIACT 026664
CLIALN= 000007

000006

18-APR=80 09:24

N 12
MACY11 30A(1052)
18-APR-80
CROSS REFERENCE TABLE
-- USER

PAGE 158

SEQ 0156|

w3781
3782

S7r7e

23748 S706s

5
53770
2

S38IN
Z38p

56388
16488
2051
6678
1775
20318
S026¢
17508
17370
4528
.

17200

S725%

4269

4270%

W73

427%s

4277
s
4Bl

4278+
55330
422

4571
2020
3¢

2352
G470%
6210
2987
5525
4geon
2329

5739%

2248
5514
537

2251
5516
S35

223
5518

2243
30
9354

2245
2302
5356

4561

4721

%30

2229
2095

3837

2231
2297

5339

5344

2220

2259

2261

2367

2257
2921

2266
3523

2276
3325

2328
5298

26
5531

2230
s
3

2237
2239
2241
w209
2338
3350
9350

4355%

17248
26578

3218

Sceor
Sea3#
7280
1318

3916
5040

215

221

17270
17330

2214
2217

223
2219

4216e
S741

200

2246
%12
535

4772%

2361

209
719

5351

226k
3310
5353

4648+

%3
453

2242
2305

4643

Sisie
1730
263%

1100

2240
2301

4478

CLIBRX 012217
CLIDEC= 000011
CLIERM 012122

5029

2226
2088

2100
“388
1080
078

4787

3719

2226
2080

4609

4830w

2222
2270

2232

4568

2022

23%

1723

5889e

4836*

2283

2322
5997

S834s

461
2021
$667

5273

2320

5795+«

5679w

2466
24548
17268
17250
2268

4885
4994

5745+

3676%

CLIBCR 012344
cLIBDL 012237
CLIBIF= 000003
CLIBR = 000002

000000

09 24

2%27

2331

4948
45¢3

230
511
§327
4591
4217»
7¢
4

4195

4186e
5734

oz
5515

3288«

8
5515

4188

B
5517

4206%

ner
5519

3415

418

4322

4207*

4243

4208+

4218+

4
S758

5799

5839

589

6019

4434e

13
CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 09:24
CZCLKA.PI
18-APR=-80 09:24
CROSS REFERENCE TABLE == USER SYMBOLS

034
s oy.é

6021# 6040

CMPBUF

2008

CMDBUF

005326

CMPPTR

007102

OPSEX
CMPSR

032202
031726

PS1

cMPs3

PS5
CMPSSA

032066

6023

6030#

1967#

4519

BN
4765
3305
3%,
5334

4hhhr
4770
538w
3
5354

4470

032072

53300

032170
032174

531

5366

5356

53648

5325
20008
1752¢

5334w
44B2*
2311

031760

032136

CMPS?
032054
CMPTOT 007104
CMSGO = 000020

CMSG1 =
CMSG2 = 000022
CMSGS = 000023

CMSG4 = 000004

CMSGS = 000025

5337

17534
1754#
17554
17564

17578

5341

007206
007162

CPTRR

007160

20694
20594
5078+
20584

5757+
3764
5103+
5055+

016042
= 000040

>
17684

3399

6193*

5320¢

CRCB = 000020
CRX
= 000040
CSHEXP= 000006
CSHTRN= 000007
CSRADR 036067
CTOTCC 007106
CTS
= 000004
CTSFM
020046
CTX
= 000020
CURADD 007164

16834
17154
17420
17438
6281
20300
178
30284
1714#
20608

4964
5897
2258
2260
63104
4457%
2132
6207
5897
3766

CURCC

2057#
4903
14034
14034
14034
14034

007156

CSAU = 000052
CSAUTO= 000061
CSBRK = 000022
C$SBSEG= 000004

000002

$CEFG= 000045

$CLCK=

SCLEA= 00001
$CLOS= 00003
= 000006

14034
14034
14034

4477
S5010*

4626
5011

46T+
5307

46hTe

4642

4bhb%

4753%

4754v

4755

4768+

|
|
|

;
;

[

53524
4621%

4628

4647

4757

4761%

|
|
|

5018

5317

CONTIN
CPTR

5428+

4771

L4B5T
5009+

2321
3111

§317

4526

2319

1758¢
20684

R
CRC

SEQ 0157 ;

3313
3315

CMSG6 = 000026
CONOTM 007204

6190

PAGE 159

3168

6196+
5798
3768+
5128+
5081+

5566+

6199+

6204+

6207%

6210+

S511+

6170%

6175+

6178+

6181«

6184+

6187+

|
|

4473%
5193
5104+

4477+
5198+
5130%

4596%
5210
5183

4600
5258*
5188+

4642%
5265
5216+

4646
5306¢
5221

4770%
5311
5229+«

4783+
5315+
5241%

5031+
3612«
5265

5058+

[
|

S5481*

5498+

5506*

5307+

5937

5958

5976

6228

|
|
|

4608

4619

4649%

4762+

5937
3771

5939
3773

5957
3783«

6223
44l2+

4478+

4597+

4602

4643+

4648

4788+

5030+

3718
4906*
4414
4344
5684

3730
4908+

3733=
5029+

3734
5429+

3767
5435+

3772
5471

3783
5472

4468+

44B0*

4790%

4862+

4875e

5916

6025

6085

4191

4201

5434

4371

5469

5470

CZCLFAO DMR,DMC-11
DATA COMM.
LINK TEST CROSS REFERENCE
MACY11 30A(1052)
‘IS-APR-BO 09:24 PAGE 160
18-APR-80
09:24
TABLE == USER SYMBOLS

CZCLRA.PTT

CSDCLN= 000044
CSDODU= 000051
CSORPT= 000024
CSOU = 00005
CSEDIT= 00000
CSERDF= 00005
CSERHR= 000056
CSERRO= 000060
CSERSF= 000054

14034
14034
140
140
14034
14034
14034
14034
14034

CSESCA= 000010
CSESEG= 000005
CSESUB= 000003
CSETST= 000001

164034
14034
14034
164034

CSERSO= 000057

CSEXIT= 000032

CSGETB= 000026

CSGETw= 000027

CSGMAN= 000043

CSGPHR= 000042
CSGPLO= 000030
CSGPRI= 000040
C$INIT= 000011
CSINLP= 000020
CSMANI= 000050
CSMEM = 000031

CSMSG = 000023

14034

164034

16034

14034

164034

164034
14034
14034
14034
14034
14034
14034

SEQ 0158

439
146
5451

5328

5346

5359

5694

4238

4320

4363

4507

3441

4220

4517

5544

3106

3128

6146
6246

4258

5908

5927

5948

3149

3163

3178

5967

6036

6078

6138

6214

4328
4501

14034

3079

3092

CSPNTB= 000014

164034

3075

3088

3410
4590

3665
4616

3676
4636

3684
4733

3124

3138

3728
4813

4000
4858

4043
4888

4235
4951

4447
4997

4492
5445

4537
5605

CSPNTS= 000016

1315(5)2’

3462

3485

3499

3512

3525

3533

3557

3573

3588

3606

3626

3829

CSPNTX= 000015
C$QI0 = 000377
CSRDBU= 000007

14034
14034
14034
164034
164034
14034
14034
14034
16034
14034
14034

4169

4174

4180

5538

CSOPEN= 000034

CaPNTF= 000017

16034

16403¢
4546

14034
16814

3008
17914
1702¢
30034
29964
17054
17004
21904
21914
2192#

3402
4575

4213
4164
4360
1464

3102

3117

3145

3159

3174

4133
4318

4358

4306

4313

3838

4958

5077

5213

5260

5304

5427

3529
3528
3820

3537«
3538«
4496*

3539«
3540+
4820+

3813
381

4494
4495

4818+
4819+

4296
6178.
2134
3363
6184
6193
3371
3349
3518+
3519+
3541+

5600

D13

CZCLFAO DMR,
=11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 s09:24
CZCLKA.PTT
1
APR-80 09:24
CROSS REFERENCE TABLE == USER SYMBOL
DEV4
DFPTBL

010342
002130 G

3542+

DIAGMC= 000000
DISCOM 017262

190
367
54264

DLE
= 000020
DLL
032262
DLLAB
017130

3834

3838

5484

5514m

5507

5512

5476

5492

2
r

giEiet TRLI
RRE

56428
5434
5493

54604

4557

4827

6166

6168

5748

4559

3842

4497+

4821+

PAGE 161

SEQ 0159

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.PN

18-APR-80 09:24

OVl
= 000012
DVINEX 034062
DVINIT 033400
OVINS
034700 G
DVIN1
033542
DVINIO 033736
DVl
033460
DVI
033646
DVING
034032
DVINS
034016
DVING
2
DVIN?
14
DVINE
033760
DVINS

DVMODS
DVOUTS 034710 G
DVRCC
007130
DVRCT
007132
DVREX
034176
DVRXA
007126
DVRXQ
034120
DVTICC
007114
OVICT
007116
DVTREX 034676
DVTRX1
034670
DVIR3
034256
DVTRG
034456
DVTRGA 034536
DVTR4B 034560
DVIRS
034566
DVTRSA
DVTXA
007112
DVTXRX 034200
ECHO = 000037
ECHOB =
EDDCK
014573
EDDDE
014706
EDDER
014556
EDDLE
014651
EDDVI
14623
DEOP
014741
DRXC
014530
DRXQ
014503
DTXC
014454
DTXQ
014430
FM11
014353
F

014256

F.CON= 000036 G
F .NEW= 000035 G
F.PWR= 000034 G
F .RES= 000037 G
F.STA= 000040 G
MSGO
002221
MSG1
00222

MSG2
MSG3

00222
002224

17014
5761
5027
4303
5
5732
5678
5717
5751
5749
5675
5712
5724
5729

379
4310
20414

5831
5189
20344
20354
5959
5972
5887
5898
5942
5953
5940
5961
20334
5201
17678
1
1
2163
2158
2162
2159
2164
2157
2156
2155
2154
26804

26694

16134
16144
16154
16124
16114
1822
1823

1824
1825

3354
57644
6664
9
57014

56814
571
5754
S7534
56774
S714#
57454
57314

MACY11 30A(1052)

18-APR-80 s09:24
CROSS REFERENCE TABLE == USER SYMBOL

PAGE 162

SEQ 0160

5699

5686

5757%

57954
59934
5187+
5056+

5464
5215+

5501
5219+

5609+
5237+

5620
5238

5622+
5308+

5623+
5365+

5838

5185+

5462+

5500

5607+

5619

5622

5837

5973«

5197+

5471
5127%

5489
5247+

5493
5252

5563+
5255

5571

5893

5955+«

5244
5568

5469+
5617

5488
58864

5560+

5570

5892

5954+

4934

4944

4954

5208

5348

5361

59774
59764
5
59394
59544
59574
59584
59734
5195+
5475
27114

27084
7
27164
27004
26964
26924
>

4173
4179
4168
4163

18484
18504
18524
18544

5330

5974+

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

09:24

PAGE

163

SEQ 0161

1868#

3686
3478

4831+
35934

3381

5024+

5326+

5344+

5930

5951

5970

5131
5234

5233
5250

3547=
3548+

5357+

5389

5692+

5906

5251
5474

5426
56491

5611
5565

5960
5577

5941

3553

3552

3563+
3564+

3569
3568

3578~
3579«

3584
3583

3456

3469

4244

6141

4247

&8 g
EMSG8 885667

1826
1827
1828
1820

F13
18-APR=80

CROSS REFERENCE TABLE == USER SYMBOLS

ggtaa§:~z§§§w§§

002324

18-APR-80 09:24

NRRRNNNG
S
U
=R
e 4 *
NS
Y

CZCLKA.P1T

MACY11 30A(1052)

5925«

6034+

6076+

5234
5492«

5240+
5496

5242
5565+

3530

3427

3495
3428«
3494
3493
3521

3455

3476

4245*

3549+

3551

3565+

3567

3580+

3582

5753
5057+
5259+

5080+
5426+

5105+
5436+

5131+
5461+

5181
5474+

519N
5476

5203
5478

5233+
5491+

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

FSAU_

= 000015

FSAUTO= 000020
FSBGN = 000040
FSCLEA= 000007
FSOU = 000016

FSEND = 000041

18-APR-80 09:24

5577«
5939
6129

5611
5941
6166

MACY11 30A(1052) 1S~APR-80 09 24 PAGE 164

CROSS REFERENCE TABLE == USER SYMBOL

5705+
5956
61 ?g'

5762+
5957+
6223*

5830
5958
6228+

4343
3065

3082

3095

6263

6347

5833+
5960

5882
5975«

5888+
5976+

164034

4402

4158

4238

14034
16403¢

435
4380

4320

4329

1405

3080

4345

4363
6309

4372
6347

4384

4393

4406

14034
164034

3181
1405

2%28
7

4320

4363

4384

4406

4507

3082

3091

3095

3105

16034
1403

5993

14034

4339
1405

614%

4320

4370
4391

}11»22#

%?‘7’;

164034
14034
14034
164034
14034

4142

4149

4122

4132

164034

3078

4339

3093

4353

3107

3109

3130

4363

4380

3129

3150

14034
16034
164034
45(3)3

3265

3290

5986

5989

5993

5996

4430
45144

6245
4539

4548

4551

4553

4560

4183

42528

4261

5456

2070#

44L374

4652
3070

44504

4451

449

5397

5447

5396
4556

5579
5004#

5635

50214
S029%
45:1;2'

14034

14034
14034
14034
14034
14034

3444

6280
4223
3444
4520

3164

3166

| 4402

3179

5917
599+

3183

4408

318

4223

6285
4520
6270
5547

4520

5547

6270

5547

6270

5547

6290

6298

6280

5933
6091

5937
6093+

3265

4429

6122

4507

4142

5986

4429

4507

3292

4134

4238

3109

3127

3148

3152

3162

4562

4564

4577

4592

4606

4618

6285

6290

4520

5924+
6086

4415

5342+

4440

44554

3152

4386

5897
5987«

SEQ 0162

6285

6290

6298

5991

5998

H13
CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 09:24
CZCLKA.PIT
18-APR-80 09:24
CROSS REFERENCE TABLE == USER SYMBOLS
GSRADL= 000120
GSRADO= 000020
GSXFER= 000004
GSYES = 000010
HALFDB= 002000

HELP

= 000000

HELPDC= 000000

HLP_
= 000005
HLPEND 003230

14034
14034
14034
164034

3444
6280

6270
6285

6290

6298

3444

4223

6270

6280

3048
4387

3063
404

3192
4409

4124
4426

4128
4427

4130
4431

4150
6241

4160
6248

4323
6266

4341
6313

4355
6327

4301

5640

5645

5772

5804

5844

5981

5984

5992

6275

6310

6093

31094

3129

31314

1#
1L

17614
1979#

1403
3

2215
4735

1506

5987
4309

6091

44028
43398
43534
43804
63094
41584
164054
g?gg;

44154
43454
4363
43934

25274
25364

IER
= 020000 G
ININT = 000001
INTPRI 012022
INVEC
012016
ISR
= 000100 G
IXE
= 004000 G
ISAU = 000041
ISAUTO= 000041
ISCLN = 000041
ISDU = 000041
ISHRD = 000041
ISINIT= 000041
ISMOD = 000041
ISMSG = 000041

ISPROT= 000040
ISPTAB= 000041
ISPWR = 000041
ISRPT = 000041
ISSEG = 000041

14034
14034
14034
16034
164034

41228
4429

4134n

ISSRV = 000041
ISSUB = 000041
ISTST = 000041
JSJMP = 000167

164034
16034
14034
14034

32654
4429
4429%
3181

YWD1

003204

CLKEN= 000100
GDVE
020774
LIS
= 000006

1783

1564

1797

1568

2368

1575

2395

2394

2416

2415

2432

3046

4366
6332

4382
6340

31504

3152¢

31644

4740

4744+

2887

3108

4265

5714

4238
63478
30804

L3724

4320

43294

30824

30934

30954

31074

3292¢

59864

59914

59934

59984

6146
4406
4554

62458

62474

LB37+

4840+

4557

4561

4563

4565

G721%

4726x

4737%

5905

5923

5946

5965

6033

6075

6135

6174

41420

19684

4550

4507
4384
4552

167644
33478
16634

4196
5485
4923

5691
5578

4759

1533

25194

16444
16414
16344
1809
16424
17104
23894
2387k
16354
16404
16034
16034
16034
14034
62634
164034
164034
%?28

14034

1563

5924
4302
4304

1977
1978

000041

1542

1519

5917
4287+
4284*

013070
013152

ISSE

1507

4737

HLPS
HLP6

= 100000 G
= 010000 G
= 000040 G
= 000100

1417

4550

4
4727
4489
24874
2484
25024
25114

1976

5755

2217

24864
19728
26788
1972
1973
1974
1975

HOE
IBE
IDU
IEO

6298

5750

012520
12
012442
012525
012540
012646
012733
013012

6290

SEQ 0163

18074

HLPTAB
HLPO
HLP1
HLP2
HLP3
HLP4
HLP6A

6285

PAGE 165

4778

4827+

CZCLFAO DMR.DMC-11 DATA COMM. LINK TEST

CZCLRA.PTT

18-APR-80 09:24

LISCK
033170
LISCKA 033216
LISMOD= 000032
LISP
013564

2103
56074
17628
26004

56004
5631
2245
5602

LNCNT
007136
LOE
= 040000 G

20454
16434

394

LMDLOP= 000046

LOGCMD
LOGCML
LOGCMP
LOGDVI
LOGEOP
LOGEX
LOGRXC
LOGRXQ
LOGS1
LOGS2

LOGS3
LOGS4
LOGSS

LOGTXC
LOGTXQ
LOGUNT
LOOPS
LOSDAM
LOT
=

021114
021076
021060
021012
021132
021404
020764
020746
021150
021376

021202
021256
021302

020730
020712
007212
003276
017275
000010 G

17764

3369
33654
33614
3352¢
33734
3383
33440
3339
3332
3424

3350
3395
389

354

MACY11 30A(1052) 1£-APR-80 09:24 PAGE 166

CROSS REFERENCE TABLE == USER SYMBOLS

5633

3396+

3405+

5502
5467
3342

5621
5615
3346

3378#

3364

3368

3372

5363
5332
5322
5026
5207
5190
3337
3428#

3359
346040
3391

34124

33344
3329
20758
20014
30014
16324

5246
5199
4250%
3819
6187

56490
5473
4252+

5572
5564
4253

4257

25794

3818

6175

013466
013477
013505

2002
2003
2004

2161
3815

25824
25844
25864

LULOOP= 004000

18054

LPO
LPOO

LP1
LP2
LP3

LP4

013456
013457

013520

2001
25804

2005

25884

14954
14534
1480

46024

LSACP
LSAPT
SAU

002110 6
002036 G
025316 G

SAUTO
$CCP
SCLEA

025264 G
002106 G
025266 G

1496
14934
1494

$DEPO
SDESC
SDESP

002011 G
012042 G

002076 G

14314
1486
14854

$DISP
SOLY
SOTP
SOTYP

002124 G
002116 G
002040
002034

1456
15014
14554
14514

$OUT
SOVTY

002072 G
012026 G

14814
1472

LSAUT

$CO

SDEVP

$0U

SEF

SENVI
SETP
SEXP1

70 G

32 G

025310 G

002052 6
002044
002102 G
002046 G

14794

14494

14714

1482

14664
14594
14895
14614

5715

4339
43534
26214
15164

43804
24104

5718

3376

3387#

SEQ 0164

J 13

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 09:24
CZCLKA.PT
18-APR-80 09:24
CROSS REFERENCE TABLE == USER SYMBOLS
LSEXPS
LSEXPS
LSHARD
LSHIME
LSHPCP

002064 G
00;066 G
035764 G
002120 G
002016 G

14754
14774
1438
15034
16374

LS
LSICP_
LSINIT
LSLADP
LSLAST
LSLOAD
LSLUN

002130
6
002104 G
024400 G
002026 G
036346 G
002100 G
002074 G

1442
164914
1492
14454
1446
14874
14834

LSNAME
LSPRIO
LSPROT

002000 G
002042 G
024372 G

146204
14574
1498

LSHPTP

LSMREV

LSPRT
LSREPP
LSREV
LSRPT
LSSPC
LSSPCP
LSSPTP
LSSTA_
LSTEST
LSTIML

002050 G

002112 6
002062 G
002010 G
024364 G
002056 G
002020 G
002024 G
002030 G
002114 6
002014 G

LSUNIT 002012 G
L10000 002150
L10001
020230
L10002 020256
L10003 020306
L10004 020370
L10005 020446
L10006 020500
10007 020536
L10010 020710
10011
024370
10013 025262
10014 025264
10015 025306
10016 025314
10017 025322
10020 035760
10021
034706
10022 034716
10023 036036
5060
013602
NTB= 000400
LR =
YP
007222

ITE
ITS
S

010226
010210
7234

003260

146414

6263

62644

1529

15304

PAGE 167
SEQ 0165

L1584

63454

14634

14974
14734
14294
1474
1669#
143
14434
16474
14994
14354

14334
1529
30784

L1424

41224

4253

15604

30914

31054
3127#
31484
31624
774
41324
4239
43434
4364
4385
4407
4508
598954
59964
6263
26034
18064
18044
20814
4992+

21354
21324
20974

43274

62454

4484

5728

4495

5731

4509+

4819

6917«

4936%

4979+

4981+

4983+

4985+

4987+

19934

——————————————————————————

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.PT

MODLOC= 000003
MODREM= 000004

MODS
MODTYP

1668#
16694

5731
5728

1284
784

§385
355

MOMSGS 010226
MOP
= 000043

21434
16704

3609
17714

MSGL IM= 000017
MSGTRN 014051
MSGTRU 014102
MSGTYP 007154

16504
26614
26464
%8:5530

MO0
MO1
MO2
MO3
MO4
MO5
MD6

010206
007220

18-APR-80 09:24

013365
013375
013406
013416
013425
013442
013447
002736

1993
1994
1995
1996
1997
1998
1999
1934

5034

25654
25674
25694
25714
25734
25764
2577h
19424

MACY11 30A(1052)

CROSS REFERENCE TABLE == USER SYMBOLS

5797+
4483

5836+
4494

5891+
4818

5217

5231

5248

5006

5012

4467

4479%

4789

4B6B*

4B92+

4B94r

4896+

1837

18474

1823

1838

18494

1839

18514

4790

4903

4942

4970

1840

1853#

1841

18554

SG5
S
S
SGE
SGE
SGE

002324
162
002416
002164
002646
002170
024720

1827
18274
1828
18284
1830

18694
4480
18834

1830#
4182

1842
4468
1843
4906
1845

42500

4254

007140

20464

5022+

5387

'
0DC
DD1
0D10
0D100
D101
0D 10;
00103
D106
0D105
00 1%
00107
0011
00110
00111
00112
00113

013712
010344

010350
010424
011262
011266
011302
011306
011322
011326
011332
011346
010430
011352
011370
011374

011410

4923«

5748

4765

1824
18244
1825
1825#
1826

= 000036

4920%

5634

4750

002222
0021
002223
0021
002224

4915+

5578+

4629
4633

S
S
S
S
S

002160

4912«

4623
4613

002220
002150
002221

SG4C

PAGE 168

4583
4587

MSGO
SGO
SG1

002152

09:24

4461
4572
3725
3769

SGIC

K13

18-APR-80

1822
18224
18234

18264

17664

26234
22144

22154
22224
2;9)70
2
23014
23024
23034
23064
23094
231%
222
23114
531
31

23144

2285

4232

19094
4939
Gabd

6159+

SEQ 0166

4926%

4929+

4932+

4945

4898+

4900

4902+

4905+

e T

e e

b e

SO TR

Vlg ViAWV
S
INFRELE RS8R

5338 SEFPRREE RERERREZES

R
3

MACY11 30A(1052) 1h-APR-80

PAGE 169

—

ReER
KARRARAR
NEERERNR

2232282388228 2222222229222222222222222222222222222222222
— e o
b
d e e D e
D e e d e i
e

13
CZCLFAOQ DMR, 4 =11 DATA COMM. LINK TEST
s09:2‘4
CZCLKA.PT
09:26
CRNSS REFERENCE TABLE == USER SYMBOL

SEQ 0167

M13
CZCLFAO DMR,DMC~11 DATA COMM. LINK TEST
MACY11 30A(1052) 18-APR-80 09:24
CZCLKA.P11
18-APR-80 09:24
CROSS REFERENCE TABLE == USE R SYMBOLS
NOD33
NOD34
NOD3S

010640
010644
010662
01

PAGE 170

SEa 0168

2640
2454
22450
22470

01071
010
010716
01072
0107
010744
010756
010762
010766
011010
010374
011012
011036
011040
011044
011064
011070
011112
011116
010410
011122
011126
011132
011136
011142
011146
011152
011156
010412
011162
011166
011200
011204
011220
011224
011242
011246
000000
000050
015016
000000
000014
017224
010350
010762
010766
011012
011040
011044
011070

2484
22490
22500
22514
25
25
2574
2584
2250
2219#
22614
22664
22670
22684
2260
22708
22730
2208
2274
20754
20760
22770
22784
2279
22800
22834
22214
2284
22854
22850
22878
22884
22944
22954
2294
16654
17764 2223
27518 3459
17364
17480 2343
2993
619
22140
2226
2229
22570
2258
225
231
20654
2664
267
22684

011156

260

|
|
|

22184

2242

2226

2227

2237

2276

2278

2284

2335

2246

2248

2251

2253

22824

2288

22564

@ 2244

2295

2297

2351

2353

CZCLYAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P1T

N116S

NI178

~ 18-APR-80 09:2%

011200

01122

T e

NI121S 011546

N1228
N123$
N1258
N126S

011576
011552
011774
011616

N140S

011632

NI3IS 011506
N141S

N1S2S
N143S
N144S

N1508
N20S
N2SS

011636

011684

011704
011732

2357

2362

2287

229

%f?s

336
g33u
276
2337

5500

2303

23490

2350

2352
2354

301
2225
2208

04
010356
010374
010412
010430
011116
011122
011126
011332
011352
011374
011414
011434
011454
011474
011514
011520
011530
011534
011544
010532
010536
010600
010622
010644
010666

2277

2223
2215
2217
2219
2221
2206
22
2274
23084
309
311
2313
315
2317
2319
231
2358
2306
23280
329
2202
22360
2239
241
243
45

SET_ 007170
PT

Soeor

010530

010744

2227

] 9028

N 13

18-APR-80

CROSS REFERENCE TABLE -- USER SYMBOLS

2355

22854

011760
010470
010512

MACY11 30A(1052)

|
|

PAGE 171

SEQ 0169 |

.
2§1;
B4 2316
23370

2318

2320

2278
2339

30w

09:26

2322

2327

233w 2344

2280
23%41a

2284

2335

236w

223w

2236

2237

2238

2249

2252

2257

2260

2356

2360

2266

2269

2275

5554

5560

5561

5573

5575

5607

5608

5630

23460

23514

235
23554

235w
22064
2209

2230

2279

222
2216a
22184
22204
2200

2302

2306

2325

2338

2342

2343

2347

2361

23104

31k
314w
3160
23180
23200
2304
2330
23270
23304
22354
2240
224N
2244
204N

535
S071°

Bad

5625
1903#

904

4876
5541

5335+

5352

4878

5539

5546

5558+

5562

5563

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.PT

18-APR-80 09:24

OPRMM
013575
OPRMSG= 000015

OPTN

2602%
1745%

036176

6%99

OTINT = 000002

1711

OPTYP

012024

OUTHDL

OUTHEX
OUTH1

ouT
ouT

OUTH4
OUTH6
OUTVEC

035150

035736
035240

03
035714

035722
035302
012020

6090
6169

16034
16034
164034

= 000000
= 000001

14034
16034

000000
000000

14034
16034

OSPOIN= 000001
O0$SETU= 000000
PARAM
007226

14034
14034
20854

000002
000042

PASMOD= 000030

PCLKEN= 000111
014321
013557

031106

1439
14164

1489
1443

14164
1433
3358

2241

4209
3121

4286

4311

25904

3836

16224

6200

4934%

4944*

4954%

1505
6343
3390

4486*

4497

4821

6019+

6067+«

6128+

5427+«
5231

3142

3844

63104
4317

16234

017204

4357
2219

4552

4740

007142

20474

5023+

5385«

5388

25914

6162

1481

16214
16204
17814

013536

5760

1479
1473

51014

013534

105 = 000240 G

T08=

1447
14164
14164

3840

000300 G
000340 6
= 000055

62314

3141

16384
1639#
6291
16274
16264
16254
16244

CNT

61624
4285+

25934

6226

61284

5723

62284

013545

000

6218

3120
3837
4207

001000 G
002000 6
036150
000000 G
000040 G
000100 G
000140 6

5711

6129

20764
25944
16764

25964

5677

6086

5304
4945

51024
51044

013555

IOR

6144

5674

5994

5260
4915
2361

16754
26754
25974

031106
031122

593

5213
1659%
17704

17604

007214
013547
001600

PLCK2
PLCK3

5936

62
6157
23884

O$APTS= 000000
0SAU = 000001
O0SBGNR= 000001

63104

4288+

6151
6222

SEQ@ 0170 |

554
232

23904

6160
6131

MACY11 30A(1052) 13-APR-80 09:26 PAGE 172

CROSS REFERENCE TABLE == USER SYMBOLS

6199

3833

5538+
5248

5600+

4969+

4972«

5077+

5208

14
CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 09:24
CZCLKA.P11
18-APR-80 09:24
CROSS REFERENCE TABLE == USER SYMBOLS
PTREND

007076

PSACT

003314

PTRTAB
PSBUFA

PSEXIT

PSGDBD
PSNNUF

PSNUM

24N

1326

003310

20094

02341

3881

003316
00332
003324

4458
3923

4SB1

4622

4749

4764

4027

4089*

4096+

4101

3943«
4540

3951
4718%

4002+
4745%

4528+

4526+

9164

3940

2012#

4020*

20164
20154

3938+
4515+

945

PAGE 173

SEQ 0171

4775

4782

5004

4045%
4758%

4514%
4777*

4531
4832%

4860%
4909*

4953%
4916%

4991+
4935+«

4999+

4029+

4035+

4825

4831

4852

4862

003320

438},;'."

'4'8;2'

4018+

4020

4021+

4023*

4027+

PSRADX 003322
PSTREE 003312
PSTRV
023274
PSTRS
023304
QCOPY = 000013
QRX
= 000004

20144
108
778
38804
176478
}g

3975+
3879
4530
3889
2338
gg;;

3978+
4527+

3985«

3992

4025

4033

3909
4847
5105

3914
5131

5181

S203

5233

5240

5251

5461

5496

5611

5830

QTX

= 000010

;;gc

gggg

ggz

5191

5234

5242

5250

5259

5474

S478

5491

5565

5577

QUALFG 003206
QUALVL 003210
RDI
= 000200
RDO
= 000200
REC
= 000000
RECMOD= 000031
REPORT 021406
RESFLG 007216
RESTRT 024660
RI
= 000200
RMDLOP= 000047

19708
19714
18014
1802¢
1657#
17614
34368
2077%
Q171
17934
17754

4529%
4604*
6026
6130

4844*
4650%

4847+
4841%

4850
4864*

4939
4865+

4942

4955%

4970

4973

6231

2243
4125
4161*
4197

4741
4185%
4210

4450
4229

4241

3357
34664

4485
3515

4496
3535

4506
3546

4746%
3560

4820
3575

4976%
3591

5392

5394

2179
3477

2180
3480#

3503#

6229+

62354

5503

5509

2136
2356

007230
021530
021600
022244
022170
021754
022244
010306
022050
022114
022330
021702
021574
021562
000040

20934
2184
34814
2183
2186
2181
2185
21778
2182
2187
3514
2177
3457
3670
1800#

35784
35634
3517#
35774
3501
3537
3547#
v
178
73
34764
6020

035754
000040
000004
020000

5966
1792¢
17408
30214

5976
2135
2221
6170

004326

20214

035752

020022
007134

020122

5963

5973

6230

62364

4554

4744

1808¢

6221

1699

33,5

3388

5462

5463

5482

5018+

5056

5129

5308

5030

302644

6204

3036#

5506

2043#

D 14
CZCLFAO DMR,DMC~11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 s09:24
CZCLKA.P11 ~ 18-APR-80 09:24
CROSS REFERENCE TABLE == USER §
RM2
020145
RXNC
020102
RXOM.Y
031014
RX
031014
RXPTR
007076
RXQ
= 000004
SCM
016111
SCM
016144
Scm.
016133
SOVE
016100
SOVI
016122

3040¢
30330
7
5055#
20268
1698¢
2875¢
2881
28
28
2877%

44K0*
3341

S015+

5016+

5031

S055

5104

5130

5216

5306

3362
3370
3366
3348
3353
4268+
4orle

5672+
Loror

5681
5690

5689
5714

5715+
5904

5718
5922

5903
6032

5921
4073

6020¢
6130

6026
6133

6031
6149

6074
6172

4276+
4280+

5671
5670

5708+
5710

5797
5713«

5836
5727%

5837+
5747%

5891
5750%

5892+
5755«

6224
5757

6229
5798s

5838s

4759

4778

1433

1435

1439

1441

1443

1445

1447

1449

011776
012002

SEL4
SEL6

012006
012012

23798
23828

4275%
4279%

SEOP
016155
SETEXP= 000010
SETTRN= 000011
SHFO
014165
SHF1
014223
SHMSG
013251
SHOW = 000002
SHTAB
003250
SHTEND 003257
SHTYPO 013305
SHTYP1
013314
SHTYP? 013321

28830
176460
17458
26554
2663#
2549
17380
19874
1990#
1980
1980
1980

3374
2267
2069
3826
3851
4810
2228
4798
4801
25544
25564
25574

SHTYP4

1980

2559

SHTYP3

SHTYPS
SHTYP6
SHTYP7

013

013333

013341
01
013354

SHTYTB 003230
SHWOP
023022
SIZE = 000012
saD
= 040000
SRXQ
016067
STADD
007146

START
024454
STATB = 000001
STATUS= 000016

STXC
STX@

016056
016045

SVCGBL= 000000
SVCINS= 000001

5893+

1980

1980
1980
1980

6134

1980#
3544
17460
1794

2049%
6166
1680¢
17508
2869
28674

3451+
41854
3390
2
3335
33

1451
1479
1516
4122
14030
1438
1466
1488

1453
1481
1530
4142
1421
1440
1465
1490

1403

2413

%75

6153

6225

4565
4840

4837

4563
4804

4726

4498
4844

4822
4850

3658

4825+

383

4961

1429

1431

6230

2558#

25614
25624
25634
4809
38108
2336
2137

28714

SEQ 0172

5511
5498
5054w

SELO
SEL2

23734
3068

PAGE 174

7420

2422

$08%

1455
1483
1531
4158
1422
1442
1467
1492

2429

1457
1485
2410
4339
1423
144k
1468
149%

3067

3086

1459
1487
2421
4353
1426
1446
1470
1496

3087

1461
1489
3065
4380
1425
1448
1472
1498

3069

3088

1437

1463
1491
3082
4402
1426
1450
1476
1500

3070

3089

1466
1493
3095
5986
1427
1452
1476
1502

1469
1495
3109
5993
1428
1454
1478
1504

3072

3097

1471
1497
3131
6264
1430
1456
1480
1515

3073

3098

1473
1499
3152
6345#
1432
1458
1482
1517

3076

309

1475
1501
3166
6346
1434
1460
148
1529

3075

3100

1477
1503
3265
1436

1462
148
2411

3076

3101

HSHW

WNNWNW

ER SRN
Y

S~1‘
CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 09:26
CZCLKA.P11
18-APR-80 09:24
CROSS REFERENCE TABLE -- USER SYMBOLS
112

§128
1

113
133
149

3172

3497
gszg
55
3574
3607
3672
3726
3848

4040
6174
6213
4235
4297
6317
4385
4492
4524
45
4615
4733
4859

SvCsuB= 000001
SVCTAG= 000001
SVCTST= 000001

SSLSYM= 010000
S1
S2

024442
024516

024566

S4
024634
TABEX
013773
TAL
= 000005
TALCK
032750
TALMOD= 000035
TCURAD 007124
TEMP
007172

SEQ 0173

3114
%134
154

2
3141
3160

3173

3486
3510

§498
5;4
3554
358%
362
3673
3727
3849

4041
4176
4215
4%36
4302
4318
4392
4493
4534
4574
4616
4734
4885

o
5546

&
522;

997
6140
6280

6025
6141
6281

3127
4525

3148
5552

5627
5927

PAGE 175

5628
5928

6344

14034
1403#
14034

14034
4176
4194

3128%

43440
63094

31494

43714

3177

3290
6245

UTArY

31784

32914
4518

3367+
3731+
4869+

3371+«
3732+
4870+

45264

4204

4215
26324
16624
2102
17654
384
20634

4785+

3349«
3448

3850

3354+
3669+

4806+

3363+
4808

3388
3771+

4877

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P11
18-APR-80 09:24
007174

TEMP2

007176

TEMP3

007200

5223+
20644

350

18-APR-80

CROSS REFERENCE TABLE == USER SYMBOLS
3335+
3849
3356+

09:24

PAGE

SEQ 0174

3340«

3348+

3353«

3362+

3370+

3374+

3407

3819+

3823

3420
5225+
5619+

3774
2226

* 3776+

3780
5312+
5920+

382%
54663+
5962+
3815+
5389+
5944+

3841+
5470*

3844+
5484
6072«
3824
5472%
6031

3848
5488+
6132+
5186+
5482+
6074+

5184+
5500+
6171+
5196+
5489+
6133+

5339«
6153«
6208

5340

4609

4649

3357+
5314+
5903«

3818+
5465+
5963+

3358+
5945+
6191

6202

5334
6134+
6205

5685

6068+

6069

5321+

—

b b

§NNNN

TEMPT

MACY11 30A(1052)

4242+
4243+

5835

TTLLOP=

TTOTCC 007122
DBUF
003326
TTMXC_
= 000002
;XHTOT 007120
XNC
020062
TXONLY 031046

16974

5890

60674

6082

4455%

4567+

4568

4601

4608

4080

4104

3719

3732

3937

3947

3950

3970

4036

4059

3972

4046

4061

4082

4108

4780*

5079

5102

3948

3953

3971

4037

62264+
6225+
5716

62334
62344

4567

4578

4601~

4781+

4580+

4582

4603+

4776

4784

5483

4081

5127

MACY11 30A(1052) 13-APR-80 09:26 PAGE 177

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKA.P1T
18-APR-80 09:24
CROSS REFERENCE TABLE == USER SYMBOLS
TXON2
031054
TXPTR
007100
TM@a
= 000000
TSARGC= 000001

4473

4581%

SEQ 0175

4783

5128

1420
3133
363
S674
3685

3M»
3403
35284
3666

40404
4576
48854

TSCODE= 005032
TSERRN= 000023

4617
4996
55474
53600

TSEXCP= 000000

4525

TSFLAG= 000040

TSHILI= 000007

43200
45178
4524

43
55444
62804

TSLAST= 000001
T$LOLI= 000000

4523

62804

62854

6287

3092
5990

3149
6309

3178

3291

15604

3082#
32904
46024

30954
41324
44304

41424
59864

TSNS
= 000000
O
TSN
= 000004
S1

TSSUBN= 000000
TSTAGL= 177777
TSTAGN= 010024

TSTEMP= 000000

TSTEST= 000001
T$TSTM= 177777

43704
63474

3078
32654
439
5996

30824

46024

30954

4132
44304

SAppcREd §5u3§~

TSLTNO= 000001

|\TSNEST= 177777

WSS

TSLSYM= 010000

TSGMAN= 000000

T$TSTS= 000001

4328

IRIRT

Lhbich

31274
41584
59934

31314
43274
5996+

3148
433

4343

45074

6288

30914
41224
446134

3105

41424

6245

31094

4149

62634

31054

3127
41584

6307

3265#
31774
43434
55474
3128
3499

31094

416494

598954

3131»

4327

3152#

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
18-APR-80 09:24
CZCLKA.PT
18-APR-80 09:24
CROSS REFERENCE TABLE == USER SYMBOLS

TSSPRO= 010012
TSSRPT= 010011
T$$SRV= 010022
TSSTES= 010020
T
025324 G
UMM
= 000200 G
UPTABL 031350
UPTAT1
031436

UPTA3
UPTAL
UPTEX
VECTOR

031434
031374
031506
036115

= 000161

XSALWA= 000000
XS$FALS= 000040
XSOFF S= 000400
X$TRUE= 000020

SPATCH

036262

= 036346

41584
%‘1)9;'

41424
41228
32654
46304
1517
16364
52084
5214

5218
5209
5220
6286

16064

2226W
2242W
22380
2277Th
22974
23164
23314
23524

16034
14034
14034
16034

63374

14034

22178
23004
30114

4370
639N

4238
%(1)%?

6320
3082¢

6327
3091

4132
3290
4507
4429

59864
6146

22154
22284
2244N
2260
2279
23014
23184
23354

6308
1560

52214
52204
52134
52304
63104

22144
2227
Q243N
2259W
22788
23004
23174
2334w
2353

18974

22238
23024
30174

SEQ 0176

4413

2354w

19034

2230
23094
3018¢

30954

3105

5989
6245

5993

5996

22164
2229M
224SN
2201
22804
23024
23194
2336w

22178
2230
2246M
2266
22834
23034
23204
23374

22188
2231w
2247
2267M
22844
23064
gg%g

23554

23564

1934

1941

2237
23114
30204

23N
3138
2
iy

TSSINI= 010013
TSSMSG= 010007

62
1529

44
434
4363
4384

©o

TSSHAR= 010023
TSSHW = 010000

L6024
L339
43538
432%

TSSAU = 010017
T$SSAUT= 010014
TSSCLE= 010015
T$SOU = 010016

PAGE 178

2357

19674

2245M
23154
4239

31094

3127

22198
2232
2248
2268M
22854
23094
23224
233

22208
2236m
2249M
2269M
22864
23104
ggzgz

2360

19914

2247M
23174
4321

31314

3148

2221

2222
2238w
2251
22738
22888
2312
2327
2344m

223
2252
2074m

2240
2053m
2075

23134
23284
23478

2022¢

20234

2361w

2237n
2250
2270
25874
23114
23264
23438
2362

20204

20214

22588
23364
4364

2260
2338
4385

23674

22854
2354
4407

3152

2223

2294W

22878
24138
4508

3162

3166#

2224m

2314w
2329
2350

22254
2241M
22S7M
22764
22964
23154
2330w
2351

51230

2124#

22954

24298
6147

2
J863M
6311

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKA.P11

BCOMPL
BERROR
BGNAU
BGNAUT

BGNCLN
BGNDU

18-APR-80 09:24

1#
1#
¥
¥

¥
7

14034
14034
14034
14034

BGNHRD
BGNHW
BGNINI
BGNMOD
BGNMSG
BGNPRO
BGNPTA
BGNRPT
BGNSEG
BGNSET

14034
16034
1w
164034
¥
14034
¥
1403¢
¥
14034
#1603
1w
14034
#
14034
1w
164034
1#
14034
¥
14034

BGNSRV
BGNSUB
BGNSW
BGNTST
BNCOMP
BNERRO
BREAK
BRESET
CKLOOP

¥
1#
1#
1#
1w
1w
¥
¥
¥

BGNSF T

CLI

1407

2227

14034

14034
1603#4
14034
14034
16034
14034
14034
16034
14034

2213

2228

2268

2352

17
¥
1

4165

4170

4502

3081

3094

3108

3130

3264

5985

5992

4428
4175

4193

4203

4214

4260

3
4359

5915

6024

6084

2214

2215

2216

2217

1528
4157
1404
3064
4141

2229

2293

2353

2354

2333

4189

14034

1%
¥

164034
14034

14034

14034
14034

4390

14034

3077

14
1%

3151

3165

2219

2220

4121

SEQ 0177

4401
4338
4352
4379

2287

16034
14034
14034

MACY11 30A(1052) 1L-APR-80 09:26 PAGE 180

CROSS REFERENCE TABLE == MACRO NAME

2230

229
2334

2231

2295
2335

2235

2218

2236

2237

229

2299

2300
2338

2355

2356

2359

2336

%Z%

3090

3104

3126

3147

4199

2238

2277

2221

2222

2239

2240

2223

2224

2225

2241

2262

2243

2226

5%&

2301

2302

2279
2305

2308

2309

g;;g

gg%g

2341

2342

2343

2346

2349

2350

2351

2361

2366

3161

3176

1403#

164034

2284

MACY11 30A(1052) 1‘9APR-80 09:24 PAGE 181

CZCLFAQ DMR,DMC-11 DATA COMM. LINK TEST
18-APR-80 09:24
CROSS REFERENCE TASLE == MACRO NAMES

CZCLKA.P11

1w
1w
¥
1w

16034
16034
14034
164034

1%
1w
1w
¥
1w
1w
1w
1w
¥
1w
1w
1%
1#
W
1w
1w
1w
1w
¥
1w
14
1w
1w
#
1w
1w
1w
1w
14
1w
1w
14
¥
1#

14034
14034
16034
14034

34924
3997#

46BN
1w
1453
1485
1#
L3708
14
14
L3914
1#
14
1w

14034
16034

14034

14034
164034
164034
16034
164034
14034
14034
164034
14034
16034

4148

axn

3289

5988

5995

5327

5345

5358

5693

5907

5926

5947

6145
3180

4237

4319

4362

4383

4405

4506

4516

5543

4520

55444

5547

6289

6244
1576
5450

14034
14034
14034

14034

6284

14034

14034
14034

4223

3444

16034

14034
164034
16034
164034
16034
14034
164034
16034
14034
14034
164034

35074
4040

499N
164034
1455
1487
14034
43914
14034
164034
44130
164034
14034
14034

23R

#
%

RRI
MSESCA
SCS

14034
14034

)NV

1w
¥

SEQ 0178

45174

6269

5966

6035

6077

6137

6213

62984
31684
36714
46324

33994
36804

34074

48854

&72%

4808+

34594
38224
48554

1445

26214
41324

1447
1479

1449
1481

1451
1483

41454

43274

43438

62984
32904

41324

4327»

43434

43704

59674

60364

60784

61384

62144

1443
1475

54100

CZCLFAO DMR.DMC-11 DATA COMM. LINK TEST

CZCLKA.P
MSEXCP

MSEXIT

MSEXSE
MSEXTJ
MSGEN

MSGENB
MSGETS
MSGETT
MSGNGB

MSGNIN

18-APR-80 09:24

»
1#
¥
16530
164854
24214
32658
L0228
¥
¥
3708
17
14
16514
14838

164038

42234

14034
14034
16034
14558
14874
30654
32908
GL13N
16038
16034
43914
164034
146038

1814
1814
16204
16578
16489
30784
3447
4429M
34414
15604
44134
31814
14054

164034

14538
14854

1814

14558
14874

4520

S547M

42384
3182
1429
1459
14914
3082¢
L1228
45258
3442
30784
598N
42384
16200

& g&'
42
14314
14618
14934
30914
L1328
5552
62208
30914
S996#
43204
16298

1531
43534

26100
4380

26214
44020

30654
S98BG

16338

1434

14354

1448

16638

1478

164938
2Li0r

3076
3103
3125

3145
3744
36100
35104
35334

3572
3607
36744
38224
38544

16034

16449%

1464

1479%

16208

3855

G068
4384
146378
1469
1499
31094
4228
S993¢
4518
31484
63474
LL06KF
14358

45074
4385
14390
16714
15014
31274
43278
59964
3544k
31628

5545
31774

4507
14378

6146
14398

30954

31094

31314
63428

3152#
6345

1664

1440

16268

16614

‘3‘3’%
14
14638
14954

30954
4142M
59864

14618
14938

14638
14954

14668
14978

1450

16514

1452

14534

1454

145584

1480

14814

1482

14834

1484

14854

1465

31114
31334

3675

4221
31054
6%2;”
4
14318

&
43634
16354
14668
14974
31054
L1588
59898
45174
31274
63074
4384
14338

14624

31554
k]
34614

3512
35514

3574
36244
36764
38268
39974

164664

1496
6218

¥4

3112¢
31344

16378

1467

31134
31354

31144
31364

31154
3137

351
35524

35214
35534

77
38254

39984

1469%
1499
30674

3157#
N
gzlo

14684

16439

1498
%59

31564
3181y
344

349,

14974
2422

30864

38264
3999

PAGE 182

6%2%

3106
3128#

35738

3082¢
59934

09:24

854

14622

1695
2613

1544
3175
3411
S#
3511
3534

16598
14918

804

2;2% %fll 4
&

1421

1494
2411

30794

1 18-APR-80

CROSS REFERENCE TABLE == MACRO NAMES

42384 4239

16578
148

K1 'A

MACY11 30A(1052)

3158
32904
34440
34964
35224
35544

35844
7
14
TM"

3159

3445
34
35554

35854
10

4001

1425

6;22'

45074
146458

31314
4339@
45N

3148¢
43438
62648

3152¢
435
63084

31624
43708
63454

31664
43804

31774
4391

32908

41328

4149

4327H

4343M

14418

14438

14458

32654

41228

41428

41584

433#

14278

14288

1429

1430

16318

1432

1456

14574

1458

164594

14614

1486

14874

1488

14698
1499

1500
3068

15014
o

3116
3138

31174
3139

14738
15034

146718
15014

1472

1502

3097#»
3118
31414

25860

3459
34974
35254
3557

g587

1684
3401
3260’
98
3526
3558

ggg'

ggj'(‘)'

40408

404614

34968

3524
3556

4508

4407
146438

16714

3160
3399
3446

43844 4406H 45078
L4068
14418

1470

3089

SEQ 0179

884

14758
15164

14738
15034

16438

14738

14778
15304

14758
15154

1444

1474

1489

1503#
30714

1504
30724

1
31420

31214
31434

31694
02x
1

5284
674

3589
SN
o

40434

31704
3

3500

14478

1479
15314

14778
1516

144654

147584

1490

15154
30734

31004

3122¢
3144

31714
34074

S07#

43024

43214

44446
L5188
4
L6138
C7338

5329

43034

G344m

4445H
451
4547
4L614M
4734

45
45714
4615

53314

4887

5446

54514

39104
598%¢

59114
5990

43054

43578

Qo478
4521
45
L6164

6307

4448
45
45
461
48104

8o#
6523
4574

43588

43608

48114

L3108

4524
45758

44N
5
4576

43634

43}5

4889

49488

545

54544

554;0

55454

59164
5

59274
997

59284
602

59,
60.

59
60374

36%

534784

53484

534

43114

431

4693

48138

449
453
458G
4635
4814

48554

23590

53614

59494
603954

49514

59484
6038#

L3714

4955

55474

45878

14818
15604

1447

14798
1529#

1476

16914

1517
3074

3101

14518

14834
24104

14498

14814
1530

16474

14774

1492

1529#
30754

31024

3123
31454

31244
3146
3173

3172¢

35294
35684

35304
3564

35314

3532
35714

3672

36734

38504

36714
7
38514

41334

0 (2008 0o idSe 4l 4ge e b i onp Gy dhi 3
%
4%(3“6' 4%(3)8’ 4235 6§37l ‘ggg, G259 42614
%:
z

4234

14498

385

3853

41644

% (o

6313

6314

3178

L3188

45014
45378
4S8BF
4637

45034
4538
4589
2:%9‘
7

45078
45438
45908
Q7308

4508%
45448
459
L7318
485

4517#
4545
49%%‘
4
48854

43854

48564

49958

4996

. X

5950

53628

49978

#4140

4998

53284

5549

544

gzg;'

26021

56034

59514
60

S967@

59684
60814

5969¢

59704
61384

54454

CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
18-APR-80 09:24

MSGNL S
MSGNSU
MSGNTA

1w
1w
1#
398

140
16034
140
4

MSHNAP
MSINCR

1w
1#
12460

164034
14034
128#

MS$ 10SE
MSLDRO
MSMASK
1
0
1

MSPRIN

43534
L5178
3468
5986

1w
17
14
1w

MSPUT

164034
14034
14034

1#
34928

16034
35074

L3708

49N

L339

43538

”
34928

4BOBN

1#
3112
3155

3529
584

MSRAD |

TS
vC

L3918

46BN

39974
MSPUT1

16034
16038
14034
14034

1w
14
1#

39974
|MSPUSH

4358
46526
S35
59934

43N
4588
4856
}:

1
35074

4BSSH

14034
113
156

34920
530
585
37258

40604
431
461
48BN

}%33:

435

14034

NAME'S

SEQ 0180

ot o g S S8 B S oY B

e Sior
15600
598

30784
5996

1405¢
1314

1459
1 ng
fl’

4517

4525

55444

5552

30914
62454

31054
63074

31274
6308

31484

31628

31778

32908

41328

43278

43438

43704

30654
2450
be
4LO0OF
42358
3718
4575
5544

30754
1494
51%
404
42388
4
L590F
5553

3079
§1S§‘
>
Q1220
4258F
3928
LO16F
56054

1594

1634

30924
g‘l

30954
1744
5884
4L164W
43188
L4L3OR
4BS58H
S908F

3102¢
1784

31064
32654

43284
44928
49518
S927M

31094
3222‘
#
4L180F
4339
4501
497N
59%BF

3117#
34104
36768
4194
4
45078

L1779

60784

L1638

L1688

L1738

15604

30784

30914

3067#
35214

35284

30974
35514

544N

598

16054

1529#

306"
35;}:

goau
2284

4380w

4LBBSH

3067#
114
157

531
3726

4041
Laba 0
4613
4886

346440

42928

LO4BEN

3069
gns
168¢

9%
5514

4616
4N

L2258

43804

3120# i%“é‘

3075

R B8

4228

S#
3854
b§29
3
4546M
5451
60364

46134

“a

Q220

38294
208
4
45378
5445
60254

}: }%}p ?18“50 ?}9

4339%

MACY11 30A(1052) 15-%80 09:24 PAGE 183

CROSS REFERENCE TABLE
--

CZCLKA.PT

56254

61384

3334
L1338
L2968
LLO2W
LO36F
56288
61464

35574
L1428
43068
L414N
47338
56848
62144

35
L1S5BF
43138
L42OW
4BI3N
56944
62464

L1908

L2008

L2578

4317R

4357M

31054

31628

31778

32908

41328

L149®

43278

4343w

31114
3567

31414
36234

31544
36614

31684
3671

33994
36804

34078
37254

3459
38224

3482#
38484

608SH

62454

46294

7w
35514

43028

499N

71
1204
3169

95
3552
3604
”g

&2
44894
46320
4949

4520

311»
3567

544N

1
1

499w

5547

3065' 202350
44308

59864

784

;?33’

3127» g?ZO

36264
4174

59674

Q586N

LO12N

46328

47298

4LBOBH

4B8SSH

488S#H

31314

31528

31664

32654

41228

41420

41584

flg‘ll
34

31544
36614

31684
36714

34078
37254

34594
3822

34824
38484

3?
314
3‘6?

62634

Q534m

4543

457\

45868

46120

3086
135
00

30974
3136
o7#

3098
2161'
08

§099
142
b d

4
L5438
6739
544

4
4544
4731
5602¢

553

L16OF
43204
L4L4L7R
4BBBH
S9N

]
S67#

62854

509

510
569
718

45718
4808¢
5603

5214
5

3850
6306
4572

4809
56254

3522
3571
3674
3851
4305
4573

4810
5626

gSZ
5824
36300

3852
4309
4586
4811

4729
31w
31544
3482

3528
2583
Bl
4310
4587
48554

31318 3152 31664 32654 41228 41428 4158
1

g?zs

g?zgl m9

3102

31054

31544 3159

3106

31114

162¢ 3163

L
L
CZCLFAO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052) 18-APR-80
CZCLKA.PT
18-APR-80 09: 24
CROSS REFERENCE TABLE == MACRO
1680

3176

35074

w000 4e01
40%0r

MSTLAB

43170
4392
45718
4888
5628
62650
i#
3630

4318
4LOGF
4575
4%4B¥
S684#
6246
14030
Sizer

56848
#

31778

3512

3178

35214

09:26

1814

S
573
on
6174

¥ 4eo0n
5w

13
44138
4586
4951
5694

43274
4414
4590
499N
5908

30754
31780

3079
34008

47338
S604L¥
1403¢

4BIZN
S90BNF
30754

485N
596N
3079

L1918
43608
46368
S684F
¥
43638
53504
5908¢
5970

42018
43638
47338
56944
14038
4384N
5360
5909
6036#

42138
43718
4LBIZN

5910
6037

42208
4392
4BSBH
59164
1468
45074
5362
5911
6038

1w
%098

14030
2216

2215

2216

L1918 4501w 4513 4300w
Q350w 438 4Srie csoow
46368
MSTSTL

MSXFER
{NODCL

3163¢
36068

6216

2228
2266
2268
2287
2313
2330
2353

31744
36268

6217

2229
2247
2269
2288
2314
2331
2354

1403

31780
36658

14598

5361

62708

2230
2248
2270
229%
2315
3%
2355

34008
36764

62804

2231
2249
2273
2295
2316
2335
2356

14034

1415

#1403
4570
4585
#1403
#
1403#
#1603
W
14038
1#
14030
1w
14038
1w
1403#
1#
14030
1#
14034
1#
14030
1#
14034

3398
4611
3458

3406
4631
3481

4212
4162

4167

4172

4316
4291

4356
4301

4308

31814

42384

43204

”

14030

PAGE 184

3083

3132

3527

43634

43844

44064

4507#

CZCLFAO DMR, s -1 MTA&?. LINK TEST

CZCLKA.PT
XFERF

14034

. ABS.

036346

000

N 1
18-APR-80s 09:24

CROSS REFERENCE TABLE == MACRO NAME

14034

XFERT

ERRORS DETECTED:

MACY11 30A(1052)

CZCLKA/1,CZCLKA.SEQ/CRF /SOL=SVC34R.MLB,CZCLKA.P11
RUN-TIME: 21 27 3 SECONDS
RUN-TIME RATIO: 68/52=1.3
CORE USED:
19k
(37 PAGES)

PAGE 185

SEQ 0182