Digital PDFs

AH-F593B-MC

October 1981

200 pages

Original

9.2MB

view download

OCR Version

7.4MB

view download

Document:	CZCLKB0 DMR11,DMC11 DMR-C11 DCLT OCT 1981 bw
Order Number:	AH-F593B-MC
Revision:	000
Pages:	200
Original Filename:	CZCLKB0__DMR11,DMC11__DMR-C11_DCLT__AH-F593B-MC__OCT_1981_bw.pdf

OCR Text

DMR/C11 DCLT
SR

AH-F593B-MC
R oF 1

C2CLxBO DMR,DM(-11 DATA (OMM. LINK TEST
720LkB. PN
16-JUN-81 14:38
%?28;

8 1
16-JUN-81

MACYTT 30A(1052)
LTITLE

14:39

PAGE 2

C2CLKBO DMR,DMC-11 DATA (OMM. LINK TEST

.REM ¢

IDENTIFICATION

PRODUCT

CODE
:

AC~F5918-M(

PRODUCT NAME
:

CZCLKBO DMR,DM(-11

DATA (COMM.

LINK

PRODUCT DATE:

26-0CT-81

MAINTAINER:

MERRIMACK DIAGNOSTIC ENGINEERING

AUTHOR :

BRUCE LUMRS - BRUCE RIBOLINI

TEST

THE INFORMATION IN THIS DOCUMENT IS
SUBJECT
TO
CHANGE WITHOUT
NOTICE
AND
SHOULD
NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL

EQUIPMENT CORPORATION.

DIGITAL EQUIPMENT CORPORATION ASSUMES NO

RESPONSIBILITY FOR ANY ERRORS

THAT MAY APPEAR

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

COPYRILMT

THE

FOLLOWING ARE

DIGITAL
DEC

(C)

THE
USE
SUPPLIED
.

IN THIS DOCUMENT.

OR
BY

RELIABILITY
DIGITAL
OR

1980,1981 BY DIGITAL EQUIPMENT CORPORATION

TRADEMARKS OF

PDP

DECUS

DIGITAL

EQUIPMENT

'UNIBUS

DECTAPE

CORPORATION:

MASSBUS

OF
ITS

SEQ 0001

CZCLxBO DMR,DMC-11 DATA COMM. LINK TEST

CZ2CLkB.P1N

16-JUN-81 14:38

MACY11 30A(1052)

16-JUN=-81

14:39

PAGE 3

REVISION HISTORY:

REV

DATE

23-APR-8(C

BRUCE LUHRS
BRUCE RIBOLINI

ORIGINAL ISSUE, DCLT FOR THE
DMC OR DMR-11

15-JuL-81

ERNIE C(OOPER

ADD
ADD
ADD
ADD

‘'MODEM/NO MODEM'® COMMAND
‘‘SET EXPECT=TRANSMIT'‘ COMMAND
'EXIT'' COMMAND
'RPT >'* COMMAND

ADD PASSWORD AND ID ON DOWNL INE LOAD
ADD TX / EXPECT MESSAGE TOTAL CHECK

UPDATE DOCUMENTATION

SEQ 0002

C2CLKBO DMR,DM(~11 DATA COMM. LINK TEST

16-JUN-81 14:38

TABLE OF

GENERAL
—
NS NN

CONTENTS

INFORMATION

PROGRAM ABSTRACT
SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS

DIAGNOSTIC HIERARCHY PREREQUISITES
ASSUMPTIONS -~ RESTRICTIONS

NN) —

FLAGS
HARDWARE QUESTIONS

2.6

—

LINK TEST COMMANDS

MESSAGE COMMANDS

NN SN

DATA COMM.

(VAW
RV LV, LV, )V, |

.
o

COMMANDS
SWITCHES

RUN COMMANDS

STATISTICAL COMMANDS

DEFAULTS

PRINT COMMANDS
MISC COMMANDS

QUICK STARTUP PROCEDURE

WWN

ERROR INFORMATION

.1
2

TYPES OF ERROR MESSAGES
SPECIFIC ERROR MESSAGES

3.2.1
3.2.2
3.2.3

PRINTING EVENT LOG
OPERATOR STATUS MESSAGES

2
.3

PRINTING DMR,DMC-11 BASE TABLE

4 .3.1

.3.2
4 .3.3
4

5.0

COMMAND LINE INTERPRETER ERRORS
DCLT ERRORS
DEVICE ERRORS

PERFORMANCE AND PROGRESS REPORTS
1

PRINTING ERROR COUNTER LOCATIONS
PRINTING ENTIRE BASE TABLE
PRINTING SINGLE LOCATION

DEVICE

INFORMATION TABLES

16-JUN-81

OPERATING INSTRUCTIONS

1.0

CZCLKB.P11

MACY1T 30A(1052)

14:39

PAGE &

SEQ 0003

C2CLxBO DMR,DMC-11 DATA COMM. LINK TEST
CZCLkB.P11
16-JUN-81 14:38
6.0

MACY11 30A(1052)

1
E
16-JUN-81

14:39

MODE AND MESSAGE DESCRIPTIONS

6.1

MODE DESCRIPTIONS

6.1.1
6.1.2

6.1.3
6.1.4

6.1.5

6.1.6

6.1.7
6.1.8
6.2
7.0

TRANSMIT MODE
RECEIVE MODE
PASSIVE MODE
ACTIVE MODE

DOWN-L INE LOAD MODE
TALK MODE

LISTEN MODE

MAINTENANCE MODE

MESSAGE DESCRIPTIONS
OTHER INFORMATION

7.1
7.2
7.2.1
7.2.2
7.2.3
7.2.4
7.2.5

7.3
7.3.1
7.3.2
7.3.3
7.3.4
7.3.5
7.4

INTERFACING TO AN "'ITEP'' NODE

TROUBLESHOOTING HINTS

INTERNAL LOOP AT EACH NODE

TRANSMIT ON ONE NODE-RECEIVE

ON THE OTHER

ONE NODE ACTIVE-THE OTHER NODE PASSIVE
BOTH NODES ACTIVE

TALK AND LISTEN MODES FOR COMMUNICATIONS

EXAMPLES OF

COMMANDS

MESSAGES COMMANDS

STATISTICAL COMMANDS

RUN COMMANDS
PRINT COMMANDS

EXIT COMMAND
THINGS

TO WATCH OUT

FOR

PAGE §

SEQ 0004

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P11

16-JUN-81

MACY11 30A(1052)

14:38

1.0

GENERAL

1.1

PROGRAM ABSTRACT

16-JUN-B1

14:39

PAGE 6

INFORMATION

THIS DCLT (DATA COMMUNICATION LINK TEST) PROGRAM IS MEANT TO
PROVIDE FIELD SERVICE WITH A TOOL TO MAINTAIN DMR/DMC-11 TO
DMR/DMC~11 AND OTHER (POINT TO POINT) DDCMP SUPPORTED
COMMUNICATION LINKS. THIS DCLT PROGRAM WILL PROVIDE THE COVERAGE
NECESSARY TO DETECT FAILURES TO THE COMPUTER EGQUIPMENT, 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 (CHOUS?.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

MINIMUM HARDWARE

IS REQUIRED:

DCLT PROGRAM,

THE FOLLOWING

- A PDP-11 CPU
MINIMUM OF 24K WORDS OF MEMORY
A WORKING, LINE OR REAL-TIME (CLOCK
A CONSOLE TERMINAL
ANY <XDP+ SUPPORTED LOAD MEDIA
ONE OF THESE DMR-11 OR DMC-11 CONFIGURATIONS:

1.3

DMC11-AL
DMC11-AR
DMC11-DA
DMC11-FA
DMC11-MA
DMC11-MD

=
~
-

LOCAL M]CROPROCESSOR
REMOTE MI”TROPROCESSOR
E.I.A. LINE UNIT
CCITT V.35 LINE UNIT
1M BPS LINE UNIT
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)

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

RELATED DOCUMENTS AND STANDARDS

~ XXDP+ USER'S MANUAL

(CHQUS?.SEQ WHERE

IS THE REV.

LEVEL OF

SEQ 0005

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

16-JUN-81

14:38

MACY11 30A(1052)

16~JUN-81

14:39

PAGE 6-1

THE MANUAL - ''C'' IS THE CURRENT REV.).
1.4

THE

DIAGNOSTIC HIERARCY PREREQUISITES

GOAL OF

THE DATA COMM.

LINK TEST

PROGRAM IS TO TEST

COMMUNICATION LINK AND THEREFORE ASSUMES THAT THE CPU'S,

g%'ggx?és%{g DMR OR DM(-11'S AT EACH END OF

THE

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 (OMM. LINK TEST PROGRAM TO

TEST THE DMR OR DMC-11, BUT

WHICH THEY ARE

CONNECTED.

TO TEST THE

COMMUNICATION LINK TO

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

DMR:

OR DMR-11

CZDMIXX DMR-11 FCTNL DIAG
CZDMPXX MB207 STATIC DIAG #1

CZDMQXX M8207 STATIC DIAG #2
CZDMRXX MB203 STATIC DIAG #1

CZDMSXX MB8203 STATIC DIAG #2
DMC:

CZDMCXX BSC W/R MICRO-PROC TST
CZDMEXX DDCMP MDLN UNIT TST

CZDMGXX DMC-11
MD-11-DZDMHXX

CROM + JMUP TEST
DMC-11 FREE RUNNING TEST

XX = LATEST REVISION

1.5

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 YOt ARE SCOPING DATA.
===e== occeee

SEQ 0006

C2CLKBO DMR,DMC~11 DATA COMM. LINK TEST

czCLxkB.P1

16-JUN-81

14:38

2.0

MACY11 30A(1052)

16-JUN-81

14:39

PAGE 7

OPERATING INSTRUCTIONS

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

2.1

COMMANDS

THERE ARE ELEVEN LEGAL COMMANDS FOR THE 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

RESTART
CONT INUE

START

START THE "IAGNOSTIC FROM AN INITIAL STATE
START THE LIAGNOSTIC WITHOUT INITIALIZING
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER “()

EXIT
ADD

RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!)
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE

DROP

DEACTIVATE A UNIT

PROCEED

DISPLAY
FLAGS

ZFLAGS

CONTINUE

FROM AN ERROR HALT

CONSIDERED TO BE ACTIVE AT START TIME

PRINT STATISTICAL

INFORMATION

(IF

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

IMPLEMENTED

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

/PASS :DDDDD
/FLAGS:FLGS
/EOP:DDDDD

/UNITS:LIST

NUMBERS, FOR EXAMPLE - /TESTS:1:5:7-10.
THIS LIST WILL CAUSE TESTS 1,5.7,8,9.10 TO
BE RUN.
ALL OTHER TESTS WILL NOT BE RUN.
EXECUTE DDDDD PASSES
SET SPECIFIED FLAGS.

IN SECTION 2.3.

REPORT END OF

(DDDDD = 1 TO 64000)
FLAGS ARE DESCRIBED

PASS MESSAGE AFTER EVERY

DDDDD PASSES ONLY.
(DDDDD = 1 TO 64000)
TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED

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

SEQ 0007

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

(ZCLKB.P11

16-JUN-81

1
I
16-JUN-81

MACY11 30A(1052)

14:38

14:39

PAGE 7-1

EXAMPLE OF SWITCH USAGE:

START/TESTS:1-5/PASS:1000/7E0P:100
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5 WILL BE
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) THE END OF
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ON._Y.

SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS.
FOR EXAMPLE, TYPE ''/TES:1-5"" INSTEAD OF ''/TESTS:1-5"".

YOU MAY,

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

START

RESTART

CONT INUE

TESTS

PASS

FLAGS

EOP

PROCEED

DROP
ADD

X
X

PRINT
DISPLAY
FLAGS

UNITS

X
X
X

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 SWJITCH.
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
RUNTIME SERVICES COMMAND MODE
LOOP ON ERROR
INHIBIT ALL ERROR REPORTS
INHIBIT ALL ERROR REPORTS EXCEPT
FIRST LEVEL
(FIRST LEVEL CONTAINS

LOE
IER*
IBE*

IXE*

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

PRI
PNT

DIRECT MESSAGES TO LINE PRINTER
PRINT TEST NUMBER AS TEST EXECUTES

UAM
ISR

UNATTENDED MODE (NO MANUAL INTERVENTION)
INHIBIT STATISTICAL REPORTS (DOES NOT
APPLY TO DJAGNOSTICS WHICH DO NOT SUPPORT

80E

"BELL'' ON ERROR

SFQ 0008

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P1

16=-JUN-81

MACY11 30A(1052)

14:38

1
J
16-JUN-81

14:39

PAGE 7-2

STATISTICAL REPORTING)
INHIBIT PROGRAM DROPPING OF UNITS
EXECUTE AUTODROP CODE
LOOP ON TEST
EXECUTE EVALUATION (ON DIAGNOSTICS WHICH

IDR

ADR

LOT
EVL

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,

AND TYPE A 'BELL'' ON ERROR,

INHIBIT ERROR REPORTS

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 ''Y'' 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/DM(C-11 DATA (COMM. LINK TEST PROGRAM WILL NOT USE MORE THAN
OTE UgéT.
FOR THE DMC/DMR-11, THE HARDWARE INFORMATION REQUESTED

WiLL

# UNITS

UNIT O

(D)

1<CR>

FULL DUPLEX OPERATION

(L)

DMR,DMC-11 CSR ADDRESS : (0)
160170 ?
INTERRUPT VECTOR ADDRESS:
(0)
300
?
INTERRUPT PRIORITY : (0)
5
2
DEVICE OPTION TYPE : (0=DMC, 5=DMR-DMC MODE

,7=DMR)

(0)

0 ?

SEQ 0009

C2CLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.PI

16=-JUN-81

14:38

2.5

MACY11 30A(1052)

16-JUN-81

14:39

PAGE 8

DATA COMM. LINK TEST COMMANDS

THE "DCLT>'' COMMAND LEVEL FOLLOWS THE ANSWERING OF THE HARDWARE P-TABLE
?(SJEFS”TJU#ED
THESE COMMANDS CAN BE TYPED WHEN THE 'DCLT> (A) ?'' PROMPT
NTED.

MESSAGE

COMMANDS AVAILABLE:

YOU ONLY HAVE

THE

TO TYPE

COMMAND LINE

ENOUGH CHARACTERS

TO UNIQUELY SPECIFY A COMMAND.

INTERPRETED FROM LEFT

IF A QUALIFIER ON THE COMMAND LINE

TO RIGHT.

THEREFORE,

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

PARAMETERS WORD.)

INDICATED IN THE

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

SET

EXPE C TMSG=TYPE
/QUAL

DEFINE A MESSAGE TO BE PUT ON
THE EXPECTED LIST

WHERE:

‘‘TYPE'' IS:

=ALPHA

=''A=7,0-9,SPACES OR TABS IN QUOTES'
WHERE

THE

OPTIONAL

"QUAL’‘ 1IS:

SEQ 0010

MACYT1

CZCLKBO DMR,DMC~11 DATA COMM, LINK TEST
CZCLkB.P11
16-JUN-81 14:38

NOTE:

30A(1052)

16-JUN-81

14:39

PAGE 8-1

/STZE=NNN

MAKE THE MESSAGE 'NAN'' BYTES
LONG. (DEFAULT VALUE IS
SIZE OF MESSAGE SPEC'D BY

/COPY=NN

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

OPERATOR OR DEFAULTS.)

SET'S ADD MESSAGES TO THE LIST IN THE ORDER THEY'RE

DEFINED. 'NAN'' 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.

(ZEROS,ONES

...)

SET

EXPECTLIST=TRANSMITLIST

MAKES A COPY OF THE TRANSMIT
LIST IN THE EXPECT LIST.

SET

TRANSHI TMSG=TYPE/QUAL

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

EXPECT LIST
SHOW

IN THE

LISTS THE MESSAGE S1ZE AND TYPE

TRANSMITLIST

FOR THE MESSAGES
TRANSMIT LIST

IN THE

2.5.2 STATISTICAL COMMANDS
DESCRIPTION
TAKES THE OPERATOR TO THE
REPORT LEVEL. FROM HERE
YOU CAN EXAMINE THE EVENT

LOG OR BASE TABLE.

DUMP

SSSSSS-EEEEEE/B

PRINTS THE CONTENTS OF THE
MEMORY LOCATIONS BETWEEN

OCTAL ADDRESSES "‘'SSSSSS'* AND

WHERE */B'* IS OPTIONAL:
DEFAULT IS PRINT WORDS
"'/8"" CAUSES PRINT BYTES

"EEEEEE'’ WHERE ''SSSSSS'* 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 [N THE EVENT LOG.

SEQ 0011

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
CZiLkB.P1
16=JUN-81 14:38

MACY11

m
16-JUN-81

30A(1052)

14:39

PAGE 8-2

SEQ 0012

2.5.3 RUN COMMAND
COMMAND

DESCRIPTION

RUN MODE=MTYPE/QUAL

STARTS

IN THE

A MODE=MTYPE MUST BE

TYPED

MODE

NOTE: MODE=ACTIVE 1S NOT DEFAULT,
----EACH TIME A RUN IS TYPED
WHERE

DCLT EXECUTING

SPECIFIED

THE "“MTYPE'' IS ANY ONE OF THE FOLLOWING:
=ACTIVE
(FORCES /NOECHO ,NO LOOPING)
=PASSIVE
=RECEIVE

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

=TRANSMIT

(FORCES /NOECHO ,NO LOOPING, /NOCHECK)

=DOWNL INELOAD

(FORCES /NOECHO ,NO LOOPING,

=LISTEN
=TALK

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

,NO LOOPING,

/NOCHECK)

/NOCHECK,

(FORCING NO LOOPING MEANS IT MUST BE
SPECIFIED AS A QUALIFIER ANY TIME
DESIRED, THERE IS NO DEFAULT)

AND OPTIONAL 'QUAL'' IS ANY COMBINATION OF

/ CHE CK/NOCHE CK

ITS

THE FOLLOWING:

ENABLES/DISABLES CHECKING OF RECEIVED
DATA AGAINST THE EXPECTED DATA

NOTE: IF BOTH NODES IN ACTIVE AND °'‘/NOCHECK'' 1S USED,
----- END-OF =PASS IS 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

/STATUS/NOSTATUS
/ECHO/NOE CHO

SHOULD EXPECT

TO RECEIVE.

ENABLES/DISABLES PRINTING OF PROGRAM
STATUS MESSAGES TO THE OPERATOR

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

(IGNORED IN MODES OTHER THAN PASSIVE)

/MODEM/NOMODEM

ENABLES/DISABLES THE REPORTING OF MODEM STATUS

NOTE:

INTERRUPT CHANGES.
THIS SWITCH CAUSES NO ACTION IN THIS DCLT

PROGRAM BUT

INCLUDED BECAUSE

IN OTHER DCLT PROGRAMS.

/LOOP-LTYPE

SPECIFIES WHICH,

ANY,

IS USED

TYPE OF

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

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
CZCLkB.P1N
16-JUN-81 14:38

MACY11 30A(1052)

16-JUN-81

14:39

PAGE 8-3

"LTYPE'' IS:

=INTERNALTTL
=CABLE

=LOCALMODEM
. (DMR 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)
DIGITAL-LOOPBACK.
/PASS=NN

. ALSO CALLED

SPECIF1ES 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

NOTE:

-----

2.5.4

SEE SECTION ¢.1

IS TYPED.

FOR A DESCRIPTION

THE 'RUN MODES’' AND '1LOOP MODES''

DEFAULTS

IF NO "'SET'S'* THEN THE DEFAULT IS SAME AS IF TYPED:
SET TRANSMITMSG=ITEP/SI12E=58/C0PY=0
SET EXPECTMSG=ITEP/SIZE=58/C0PY=0
THE DEFAULT COPY AND SIZE

FOR EACH OF

ONES = /S12E=64/C0PY=0
ZERCES - /SI2E=64/C0PY=0

THE MESSAGE

TYPES:

OALT - /SI12E=64/COPY=0
1ALT - /SIZE=64/COPY=0

CCITT - /S1Z€=64/COPY=0

ALPHA - /SIZE=65/C0PY=0

ITEP -~ /S12E=58/COPY=0
OPER. SPEC'D - /SIZE=LENGTH-OF -TEXT~TYPFU-BETWEEN-QUOTES/COPY=0
FOR

THE RUN COMMAND THE

DEFAULTS ARE:

RUN MODE=ACTiVE/NOSTATUS/CHECK/NOECHO/PASS=1
NOTE: MODE=ACTIVE IS NOT DEFAULT,
----EACH TIME A RUN IS TYPED

A MODE=MTYPE MUST BE

THE DCLT PROGRAM IS RUN IN UNATTENDED MODE

THE DEFAULTS ARE AS

SET TRANS=ITEP

(UAM FLAG=1

THESE SETUP AND RUN COMMANDS WERE

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

TYPED

OR CHAINED),

TYPED:

SEQ 0013

MACY11

CZCLkBO DMR,DMC~11 DATA (OMM. LINK TEST
16=-JUN-81 14:38
czLkB.PIN

30A(1052)

16-JUN-81

14:39

PAGE 8-4

OTHER NOTES:

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

"RUBOUT"

DELETE LAST CHAR.

<(R>

2.5.5

IS SEEN AS A COMMAND TERMINATOR

TYPED IN COMMAND STRING

THE PRINT COMMAND TAKES YOU A LEVEL BELOW DCLT>
THE COMMANDS AVAILABLE IN RPT> ARE ...

CALLED REPORT.

DESCRIPTION
HELP OR

PRINT HELP

INFORMATION FOR RPT>

LOG

PRINTS

THE DCLT EVENT LOG.

BASE/FULL

PRINTS ENTIRE BASE

BASE/ERROR

PRINTS ONLY ERROR COUNTERS
BASE TABLE.

BASE /OF f SET=NNN

PRINTS SINGLE LOCATION IN BASE
TABLE AS SPECIFIED BY OFFSET.

EXIT

RETURNS YOU TO THE LEVEL THAT
YOU ENTERED FROM. (DCLT> OR DR>)

TABLE.
IN

2.5.6 AISC COMMANDS
DESCRIPTION
FROM THE
TO DR>.
HELP OR

DCLT> LEVEL RETURNS YOU

PRINTS HELP

INFORMATION.

SEQ 0014

CZCLxBO DMR,DMC~11 DATA COMM, LINK TEST
CZCLkB.P11
16~JUN-81 14:38

MACY11

2.6 QUICK START-UP PROCEDURE

30A(1052)

C 2
16-JUN-81

14:39

PAGE 9

(XXDP+)

TO START=UP THIS PROGRAM:
1.

B00T XXDP+

GIVE THE DATE AND ANSWER THE LSI AND 50HZ
IS A CLOCK) QUESTIONS

TYPE 'R NAME' , WHERE NAME

FILE

FOR THIS PROGRAM

IS THE NAME OF

(IF

THERE

THE BIN OR BIC

TYPE "'START"'

S. ANSWER THE ''CHANGE HW'' QUESTION WITH ‘¥''
.

ANSWER ALL THE HARDWARE QUESTIONS.
THE NUMBER OF
THAT CAN DCLT CAN USE IS ALWAYS '"1'°,

WHEN YOU FOLLOW THIS PROCEDURE

DEFAULTS FOR FLAGS.
7.

YOU WILL BE USING ONLY

UNITS

THE

THESE DEFAULTS ARE DESCRIBED IN SECTION 2.3.

AFTER THE "DCLT> (A) ?'' PROMPT,
"RUN MOD=ACTIVE<CR>"'

TYPE

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING THE DEFAULT TRANSMIT
AND EXPECTED MESSAGES. THE DEFAULT PASS COUNT AND ‘RUN'' QUALIFIERS
ARE ALSO BEING USED.
THESE DEFAULTS ARE DESCRIBED IN SECTION 2.5.3.

SEQ 0015

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKB.P1

16-JUN-B1

MACY11 30A(1052)

14:38

0 2
16-JUN-81

14:39

PAGE 10

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

NAME
TYPE
NUMBER
ERROR MESSAGE

THE FORM:

ON UNIT NUMBER

TST NUMBER PC:XXXXXX

LWHERE; 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 MECSAGES 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'', '‘IBE'' 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
3.2.1

COMMAND LINE

INTERPRETER ERRORS:

ERROR MESSAGE:

MEANING

?2ILL 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?

A REQUIRD PART OF A COMMAND WAS LEFT

?NUM TOO BIG?

THE VALUE OF A NUMERIC STRING IN THE

?BAD RADIX?

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

COMMAND LINE WAS LARGER THAN 65535
OR 177777 OCTAL. ¢ > 16 BITS).

SEQ 0016

CZCLKBO DMR,DM(C-11 DATA (OMM. LINK TEST

CZCLkB.P1

16-JUN-81

14:38

MACY11 30A(1052)

2'100P'' VALID ONLY IN ACTIVE?

E 2
16-JUN-81

14:39

PAGE 10-1

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

RUN COMMAND BUT THE MODE WAS NOT SET
TO ACTIVE.
MAINTENANCE LOOP [S ONLY

:g??égLE IF THE MODE OF OPERATION IS

2ECHO'" VALID ONLY IN PASSIVE?

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

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-7,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=2,0-9,SPACE OR TAB''. RETYPE THE
COMMAND WITH ONLY THESE CHARACTERS

BETWEEN QUOTES.

?°'SIZE=0"" NOT VALID?

A MESSAGE ZERO BYTES LONG CAN NOT BE
BUILT. RETYPE THE COMMAND WITH A

"/SIZE=NNN''.

IF NO '‘/SIZE="' IS TYPED

A DEFAULT SIZE WILL BE USED.

?TRANSMIT AND EXPECT LIST MUST BE

IDENTICAL FOR LOOP?

IF RUN COMMAND WITH '*/LOOP/CH'’ IS TYPED
TRANSMIT AND EXPECT LISTS MUST BE

EQUAL. IF THEY ARE NOT THIS ERROR WILL
BE DISPLAYED. USE ‘'SE E=T' COMMAND.
3.2.2 JCLT 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
p.%?czgr 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.

(HAR.

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

SEQ 0017

CZCLKBO DMR,DMC=-11 DATA COMM. LINK TEST

CZCLkB.P11

16~JUN-81

14:38

MACY11 30A(1052)
TRIED

16~JUN-81

14:39

TO ADD TO EITHER THE

PAGE 10-2
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
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.

3.2.3 DEVICE ERROR MESSAGES
DATA COMPARISON DATA ERROR
BYTE # IN MSG=XXX
EXPTD=YYY

RECVD=211
XXX= OFFSET OF THAT BYTE FROM THE START
OF THE COMPARE OR EXPECT MESSAGE.
YYY= THE

CONTENTS OF

THAT BYTE

IN THE

EXPECTED MESSAGE
122= 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

EXAMINE IT.

THE MESSAGE AND

DATA COMPARISON DATA ERROR
TOTAL MISMATCHES

IN MSG = NAN

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= 272
XXX= NUMBER OF BYTES
ME SSAGE

IN THE

COMPARE

27Z- NUMBER OF BYTES IN THE RECEIVED
ME SSAGE

SEQ 0018

CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST

(ZCLkB.P11

16~JUN-81

MACY11 30A(1052)

14:38

G 2
16-JUN-81

14:39

PAGE 10-3

THIS MEANS THAT THE MESSAGE RECEIVED
WAS A DIFFENT LENGTH THEN THE MESSAGE
THAT WAS EXPECTED.

LA A0

* NOTE «
TRRREEAR

= IN THE FOLLOWING ERROR DESCRIPTIONS XXXXX
REFERS TO THE OCTAL CONTENTS OF THE DEVICE REGISTERS
SOECIFIED.

TIME OUT WAITING FOR RD]

SELO

XXXXXX

SELZ2

TO CLEAR

XXXXXX

THIS MEANS THAT A SOFTWARE

B?ER8§VICE CLEARED RDI

TIMER EXPIRED BEFORE

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

SELO

XXXXXX

SEL2

TO SET

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

SEL?2

XXXXXX

THIS MEANS THAT A SOF TWARE 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

SELO

XXXXXX

SEL2

INTERRUPT

XXXXXX

THIS MEANS THAT A SOFTWARE TIMER EXPIRED BEFORE
THE DEVICE SET OUTPUT INTERRUPT IN RESPONSE TO
PROGRAM REQUESTING DEVICE TO TRANSMIT OR RECEIVE.
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

SEQ 0019

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKB.P11

16~JUN-81

MACY11 30A(1052)

14:38

16=JUN-81

14:39

PAGE 10-4

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
SEL?2
XXXXXX

XXXXXX

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

ILLEGAL OUTPUT INTERRUPT

SEL?2

XXXXXX

SEL6

XXXXXX

THIS HAPPENS WHEN THE DEVICE

WITHOUT SETTING 'RDO'‘.

ISSUES AN OUTPUT

INTERRUPT

THIS HAPPENS THE DEVICE IS BAD.

CONTROL OUT INSTEAD OF BA-CC OuT

SEL?2

XXXXXX

SEL6

XXXXXX

MMMMMMM

WHERE ‘MMMMM'' IS ONE OF

THE FOLLOWING MESSAGES

FTS:T &EJSULT FROM INTERPRETING THE REGISTER CONTENTS
YOU:

PROCEDURE ERROR/HALT
NON EXIST MEM

DDCMP START REC
DISCONNECT
LOST DATA
DDCMP MAINT REC
OVERRUN

TIME OUT
DATA CHECK
RUN SET JLLEAGLLY
CD GLITCHED
RX

IDLE

CTS FALILED

(DMR

IN DMR-MODE ONLY)

(DMR

IN DMR-MODE

(DMR IN DMR-MODE ONLY)
ONLY)

(DMR [N DMR-MODE ONLY)

THIS ERROR OCCURS WHEN THE DEVICE SETS CONTROL OUT
TO INDICATE ERROR CONTIDION. THE PROGRAM EXPECTS A
BACC OUT.
TX BUFF

COMPLETED AND SHOULD BE

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

SEL4

XXXXXX

SHOULD BE

SEL6

XXXXXX

SEQ 0020

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

C2CLKB.P11

16=JUN-81

MACY11 30A(1052)

14:38

2
I
16=JUN-81

14:39

PAGE 10-5

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

WHERE "XXXXX'' IS THE OCTAL CONTENTS OF
DEVICE REGISTER.

THAT

DOWN LINE LOAD ABORTED
THIS ERROR CAN ONLY OCCUR IN A NODE

THAT

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 RECEIVED A MESSAGE FROM SATELLITE
BUT MESSAGE WAS NOT 1ST WORD OF SEC BOOT REAQ.

SEC REQ WORDZ2

HOST RECEIVED A MESSAGE

FROM SATELLITE

BUT MESSAGE WAS NOT 2ND WORD OF SEC BOOT REQ.
CALLED FRCM PC.

XXXXXX
THIS MESSAGE OCCURS WITH OTHER ERROR MESAGES
TO INDICATE PC OF CALLING ROUTINE.

SEQ 0021

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

16=-JUN-81

MACY11 30A(1052)

14:38

J 2
16~JUN-81

14:39

PAGE 11

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 THC 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

SIGNIF ICANT EVENTS OR CHECK-POINTS WILL BE LOGGED IN A
"'CIRCULAR QUEUE'' STORAGE AREA CALLED THE EVENT LOG.
THE LAST
"N'' 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. THIS WILL TAKE YOU TO THE RPT> LEVEL. NOW
GIVE THE '10G'' COMMAND. THE EVENTS ARE PRINTED IN A 'LAST-IN
FIRST-0OUT'* ORDER.

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
START OR RESTART.
IT SHOULD BE NOTED THAT THE TIMES ARE

THE LAST

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 1T 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 OF 1ST BYTE OF MESSAGE,

TOTAL NO. OF BYTES, MODEM STATUS AT
TRANSMIT MESSAGE COMPLETED:

THAT TIME.

EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE,

TOTAL NO. OF BYTES, MODEM STATUS AT THAT TIME.
RECEIVE SPACE QUEUED:

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.

SEQ 0022

C2CLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P11

16-JUN-81

MACY11 30A(1052)

14:38

K 2
16-JUN-81

14:39

PAGE 11-1

COMPARISON FAILURES
DATA COMPARISON LENGTH ERROR:

EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG.,
TOTAL NO.

DEVICE

OF BYTES IN RCV. MSG.,

IN EXPECT MSG.

TOTAL NO. OF BYTES

INIT AND SETUP:

EVENT TIME, MODE OF OPERATION, TYPE OF MAINTEN-WNCE

LOOP, "DCLT'* PASS COUNT, 'RUN'' PARAMETERS

DEVICE ERROR:

EVENT TIME, DEVICE ERROR MESSAGE, CONTENTS OF TwWO

REGISTERS RELATING TO THE ERROR.
END OF PASS:

EVENT TIME, ‘DCLT’' PASS COUNT, ‘DCLT'' ERROR COUNT,
NO. OF "NOBUFF'S''(NO. OF CONTROL-OUTS WITH THE
NO-BUFFER SET SINCE THE LAST ‘DCLT RUN'' COMMAND.)

NOTE::

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''

QUALIFIERS 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.
MIGHT BE PRINTED AND THEIR MEANING:

BELOW ARE

THE MESSAGES

THAT

ME SSAGE

MEANING

TXQ
TXC
RXQ

DEVICE 1S ABOUT START TRANSMITING A MESSAGE
TRANSMISSION OF MESSAGE COMPLETED
DEVICE HAS QUEUED SPACE TO RECEIVE/ COMPLETED RECEIVE

ERR
iNI
MSC
P
ML

cMD
EOP

DEVICE ERROR HAS OCCURRED
DEVICE ABOUT TO BE INITIALIZED
ABNORMAL TMODEM STATUS CHANGE
ABOUT TC DO DATA CHECKING CF RECVD VS. EXPTD DATA
LENGTH ERROR OCCURRED DURING DATA COMPARISON

DATA ERROR OCCURPED DURING DATA COMPARISON
END OF PASS

4.3 PRINTING OF DMR/DMC-11 BASE TABLE
AT THE ‘DCLT>'' OR "DR>'' LEVEL, GIVE THE PRINT COMMAND. THIS WILL
TAKE YOU TO THE 'RPT>'' LEVEL. YOU NOW HAVE THE OPTION OF PRINTING
ONLY ERROR LOCATIONS, ENTIRE BASE TABLE OR A SINGLE LOCATION.
YOU ONLY HAVE

TO INPUT ENOUGH OF

THE COMMAND TO MAKE

IT UNIQUE.

THE ENTIRE BASE TABLE IN LOCAL PDP11 MEMORY IS UPDATED BY THE DMC
OR DMR, WHENEVER A FATAL ERROR OCCURS. THE ERROR COUNTER LOCATIONS
OF THE BASE TABLE ARE UPDATED EVERY SECOND BY THE DMC OR DMR IN
DMC MODE. IF THE DMR IS IN DMR MODE, THE ENTIRE BASE TABLE WILL BE

UPDATED AT "END OF DCLT PASS''.

SEQ 0023

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
CZCLKB.P11
16-JUN-81 14:38

MACY11 30A(1052)

L 2
16-JUN-81

14:39

PAGE-11-2

4.3.1 PRINTING ERROR LOCATIONS
TO PRINT ERROR COUNTER LOCATIONS, :NPUT ‘BASE/ERROR'’. FOR A DM(
LOCATIONS BASE+3..BASE+12 WILL BE DISPLAYED. IF A DMR, LOCATIONS
BASE+3. .BASE+41 WILL 3E DISPLAYED. THE BASE ADDRESS IN THIS PROGRAM
IS ALWAYS 17370.
EXAMPLE - DEVICE
RPT>

(A)

IS DMC
? B/E

LOCATION

CONTENTS
004

NAKS~MSG NO BUFFERS CUMUL

17402

007

REPS RECD CUMUL

17373

DESCRIPTION

4.3.2 PRINTING ENTIRE BASE TABLE
TO PRINT THE ENTIRE BASE TABLE, INPUT 'BASE/FULL''. IF A DMC
256 BYTES WILL BE DISPLAYED. IF A DMR, 128 BYTES WILL BE DISPLAYED.
IN ORDER TO SAVE PROGRAM SPACE IN MEMORY, NOT ALL LOCATIONS WILL
HAVE A DESCRIPTIVE MESSAGE. WHEN IN DOUBT SEE THE DMC OR DMR
TECHNICAL MANUALS FOR A FULL DESCRIPTION.
EXAMPLE - DEVICE IS DMR IN DMC MODE:
RPT>

(A)

? BASE/FULL

LOCATION

CONTENTS

17370
17371
17372
17373

000
000
000
000

17567

DESCRIPTION

BASE TABLE UPDATE
BASE TABLE UPDATE
BEGINNING OF BASE
NAKS RCVD..BUFFER

INDEX POINTER
LIMIT
TABLE DATA
TEMP UNAVAILABLE

SEE DMR MANUAL FOR DESCRIPTION

4.3.3 PRINTING SINGLE LOCATION

TO EXAMINE A SINGLE LOCATION, INPUT *BASE/OFFSET=NNN''. FOR A DM(C
NNN IS A OCTAL NUMBER BETWEEN 0-377. FOR A DMR, NNN IS A OCTAL

NUMBER BETWEEN 0-177.

IF THE OFFSET VALUE IS NOT WITHIN THIS

RANGE AN ERROR MESSAGE WILL BE PRINTED.

EXAMPLE - DEVICE

RPT>

(A)

LOCATION

IS DMR

? B/0=27

CONTENTS

17417

006

RPT>

(A)

DESCRIPTION

STREAMING TIME OUT COUNT

SEQ 0024

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

(ZCLkB.P1

16~-JUN-81

MACY11

14:38

5.0 DEVICE

INFORMATION TABLES

THIS

DEFAULT

THE

HARDWARE

30A(1052)

P-TABLE.

THE

n 2
16-JUN-81

14:39

PAGE 11-3

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]) INODICATES THE OFFSET OF THE
WORD INTO THE HARDWARE P-TABLE.
THE OFFSETS MUST MATCH THE P-TABLE
OFFSETS USED IN THE HARDWARE PARAMETER (ODING SECTION WHERE THE
"GET PARAMETER'' CALLS ARE USED TO FILL THE P-TABLE.

LWORD
.WORD
.WORD
JWORD
WORD
.WORD

1
160170
300
240

;0]
.[2]
;4]
s[6]

0O
0

FULL OR HALF DUPLEX FLAG (BIT0=1
CSR ADDRESS
INTERRUPT VECTOR
INTERRUPT PRIORITY (5)

IF FuULL)

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

6.0 MODE AND MESSAGE DESCRIPTIONS

6.1 MODE DESCRIPTIONS
BECAUS: THE DMC-11 AND DMR-11
FIRMWJARE,

THE PDP11

SUPPORT DDCMP OPERATION IN THE

DCLT PROGRAM IS UNABLE

TO CONTROL

OR KNOW

EXACTLY WHAT IS BEING TRANSMITTED OR RECEIVED AT ANY GIVEN TIME.
ALL DATA MESSAGES ARE ENCLOSED IN A DDCMP ENVELOPE AND THEREFORE
ggég?eléDFESSAGES (ACKS,NAKS...) ARE ALSO BEING TRANSMITTED AND

6.1.1

TRANSMIT MODE

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

6.1.2 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 RECEIVE'' MESSAGES
IF DATA-CHECKING IS ENABLED.

SEQ 0025

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
14:38

N 2
16-JUN-81

14:39

PAGE 11-4

6.1.3 PASSIVE MODE
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.
6.1.4 ACTIVE MODE
A LIST OF MESSAGES IS TRANSMITTED AND MESSAGES ARE RECEIVED.

AFTER RECEIVING AN "EXPECTED'' NUMBER OF MESSAGES, THE DATA RECEIVED
CAN BE COMPARED AGAINST A LIST OF "EXPECT TO RECEIVE'' MESSAGES
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!
6.1.5 DOWN-LINE~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 TRANSFER 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-L INE-LOAD WAS SUCESSFUL.
THE BOOTING PROCESS OVERWRITES PART OF THE 'VECTOR'® AREA SO THE DCLT

PROGRAM MUST BE RELOADED IN THE '‘SATELLITE'® SYSTEM.

THE SATELLITE WILL ENTER MOP MODE ONLY IF THE PASSWORD WORD
SUPPLIED BY THE USER MATCHES THAT SET [N ITS PASSWORD SWITCH PACK.

INCLUDED IN THE °'‘'SECONDARY BOOT MESSAGE'®, IS THE DEVICE TYPE CODE

THAT

15 DECIPHERED AND

INCLUDED

IN AN IDENTIFICATION MESSAGE.

EXAMPLE DOWNLINE LOAD:
DCLT>R M=D

SATTELITE PASSWORD
=

NNN
= OCTAL # BETUEEN 0-376

SECONDARY B0OOT REQ FRG‘! XXX DEVICE

(e}

XXX

j=4

Yy
NOOOASHNVOOOANESMNO

16-JUN-81

PNOND
— b = b =

CZCLkB.PIN

MACY11 30A(1052)

TYPE
=

SEQ 0026

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

C7¢LxB.PIN

16-JUN-81

MACYT1 30A(1052)

14:38

26
28
30
32
34

THE "‘TALK'' END OF

8 3
16-JUN-81

14:39

PAGE 11-5

D2
KDP
KDZ
KL
DMV

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.
TLK> EXIT ALL

THIS LINE

IS SENT

FOR EXAMPLE:

THEN MODE

SWTICHED

6.1.7 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''.

6.1.8

HAINTENANCE "LO0P"’ K)DES

REHEFBER THAT THE WHENEVER A 'RLN” COMMAND IS TYPED,

THE DEFAULT IS

NO LOOPBACK AND THAT A LOOP MODE MUST BE SPECIFIED BY A ''/LOOP=..
IF
A LOOP MODE IS DESIRED.
LOOP MODES ARE ONLY VALID IF

INTERNALTTL

THE MODE TO RUN IS ACTIVE

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

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

CABLE

NOT USED B8Y DMR OR DMC-11 CODE.

LOCALMODEM

FOR DMR-11 IN DMR MODE AMD 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 (MAINTZ2)
DIGITAL-LOOPBA(CK.

ALSO CALLED

SEQ 0027

C2CLkBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKB.P1

16-JUN-81

MACY11 30A(1052)

14:38

16~JUN-81

14:39

PAGE 116

THE FOLLOWING TABLE SUMMARIZES THE MODES THAT CAN BE RUN TOGETHER
\g:gNO;HE (E)Cldwl:f;OGRM IS RUNNING ON TWO PROCESSORS (ONE AT EACH
H

!STATION A

"HOST" NODE
!TALK
'LISTEN
' TRANSMIT
'RECEIVE
'PASSIVE

'ACTIVE
:
'DOWNLINELOAD

''/LOOP'' ALLOWED?

STATION B

°'REMOTE'' NODE

DUPLEX

NO
NO
NO
NO

LISTEN*, RECEIVE
TALK*, TRANSMIT
RECEIVEe, LISTEN
TRANSMI T+, TALK

HALF
HALF
HALF
HALF

YES

ACTIVE=
PASSIVE*
PASSIVE

FULL
!
HALF OR FULL!
HALF FORCED :

*= MOST LIKELY TO BE

ACTIVE®

OR
OR
OR
OR

FULL!
FULL!
FULL!
FULL!

HALF OR FULL!

IN THAT MODE

6.2 MESSAGE DESCRIPTIONS

NAME

DESCRIPTION

ZEROES
ONES

MESSAGE OF ALL 0'S <oooooooo.oooooooo.oooooooo....)
MESSAGE OF ALL 1°'S (11111111.11111111,11111111....)

OALT
CCITT

MESSAGE OF ALTERNATING 0'S (01010101.01010101.....)
“CCITTTM S12-BIT (VS. S11 BITS) TEST PATTERN

TALT

[TEP

MESSAGE OF ALTERNATING 1's ¢10101010,10101010,....)

“'INTERPROCESSOR TEST PROGRAM'S (ITEP)'' MESSAGE 1(DP1:)
(<177><177>/8A THE QUICK BROWN FOX JUMPED OVER THE

LAZY DOG.<15><12><001><177><177><177><177>)
ALPHA

ALPHA-NUMERICS (OR FUTURE COMM TURNAROUND MSG)
(#$.'" (AMPERSAND) ' () %+ ,-_.0123456789:;<=>?aABCDEFGHIJK
LMNOPQRSTUVWXYZ/[\]*_X)

"'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 0028

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

C2CLkB.P11

16=-JUN=-81

MACY11 30A(1052)

14:38

0D 3
16~JUN-81

14:39

PAGE 12

7.0 OTHER INFORMATION

7.1

INTERFACING TO AN °'ITEP'' NODE

WHEN DCLT ]S USED TO INTERFACE
THE TABLE BELOW APPLIES:

TO AN ITEP NODE.

ITEP NODE

DCLT NODE

ONE~WAY-0UT
ONE-WAY=iN

RECEIVE OR LISTEN
TRANSMIT OR TALK

INTE<NAL LOOP
EXT: RNAL LOOP

ACTIVE
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

WHEN DCLT

TO THE

SPEED DIFFERENCES

IN LISTEN MODE

IN THE

SOF TWARE.

THE RX BUFFER IS ONLY

82 BYTES LONG THEREFORE DO NOT SEND THE DCLT NODE
(I)ZESRMSG. 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

7.2 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-OF -PASS IS 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.

SEQ 0029

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLkB.P1T

16-JUN-81

MACY11 30A(1052)

14:38

7.2.1

E 3
16-JUN-81

14:39

PAGE 12-1

INTERNAL LOOP AT EACH NODE

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
OF EVENTS MIGHT BE INFORMATIVE.
A POSSIBLE COMMMAND SEQUENCE

IF ON, BUT SEEING THE SEQUENCE

IS:

CE
crT

SE T=ONES/S=20/C=2

R M=A/LO=1/NOCH/STAT
WHAT

THE ABOVE

COMMAND SEQUENCE MEANS:

THE ''C E'° AND THE '°C T'' INITIALIZES THE 'EXPECT''
LIST AND THE °‘TRANSMIT LIST''. THE ''SE T=ONES/S=20/(C=2"’
SETS THE TRANSMIT LIST TO CONTAIN 3 MESSAGES. THE MESSAGES
CONTAIN DATA OF ALL ONES AND EACH ONE IS 20 BYTES IN LENGTH.
THE 'R M=A/L0=]/NOCH/STAT'' SETS THE MODE TO RUN IN TO BE

ACTIVE AND LOOP TYPE

TO BE

INTERNAL

TTL.

THE PROGRAM WILL

NOT BE CHECKING DATA SO THERE WAS NO NEED TO SET UP AN
EXPECT LIST. THE PROGRAM WILL BE PRINTING STATUS MESSAGES.
WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND

THINGS ARE RUNNING CORRECTLY
INI RXQ TXQ RXQ TXC
TXQ RXQ TXC EOP

TXQ RXQ TXC

MODE=ACTIVE/LOOP=INTERNAL /PASS=00000

DCLT>

THIS GIVES

/STATUS/NOCHE
CK/NOE CHO/NOMODEM

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éTTC%DISPLAY” AND RUN THE PREREQUISITE DIAGNOSTICS FOR THE COMM.
VICE.

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

SE E=T
R M=A/L0=]1/CH/PAS=3
WHAT

THIS SEQUENCE MEANS:

THIS SEQUENCE IS SIMILAR TO THE ONE ABOVE . THE ''SE E=T"’
MAKES A COPY OF THE TRANSMIT LIST IN THE EXPECT LIST.
THE EXPECT LIST NOW CONTAINS 3 MESSAGES. THE MESSAGES WILL
HAVE ALL ONES FOR DATA AND BE 20 BYTES EACH IN LENGTH.

SEQ 0030

CZCLkBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKB.P11

16-JUN-81

MACY11 30A(1052)

14:38

16-JUN-81

14:39

THE RUN COMMAND IS THE SAME WITH THE ADDITION OF

SWITCHES *'/CH/PAS=3"',

PAGE 12-2

TWO

THE '"'CH'' SWITCH TELLS THE PROGRAM

TO CHECK THE RECEIVED DATA AGAINST THE "EXPECTED LIST'',
THE 'PAS=3"" SWITCH TELLS THE PROGRAM TO RUN 3 PASSES BEFORE
RETURNING TO THE DCLT> PROMPT.
WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND
IF THINGS ARE RUNNING CORRECTLY :
INI RXQ TXQ RXQ TXC TXQ RXQ TX(

TXQ TXC
RXQ TXC

CMP CMP (CMP EOP RXQ TXQ
TXQ RXQ TXC TXQ TXC CMP

RXQ TXC

TXQ TXC CMP CMP (MP EOP

CMP CMP EOP RXQ TXQ RXQ TXC TxQ

MODE=ACTIVE/LOOP=INTERNAL /PASS=00000

/STATUS/
CHE CK/NOE CHO/NOMODEM

IF A CABLE TURNAROUND CONNECTOR IS AVAILABLE, PUT IT ON THE END OF

THE CABLE JUST BEFORE THE MODEM AND RUN
POSSIBLE COMMAND SEQUENCE IS:

IN ACTIVE MODE WITH NO LOOP.

R M=A/(CH/PAS=3
WHAT

THIS SEQUENCE MEANS:

THIS SEQUENCE HAS THE ''/LO=]'' REMOVED. THIS INFORMS
’I‘SSEDEVICE TO ACT AS IF IT WAS RECEIVING FROM ANOTHER
WHAT

YOU SHOULD SEE

AFTER ENTERING

THINGS ARE RUNNING CORRECTLY

THE

RUN COMMAND

INI RXQ TXQ TXC RXQ TXQ TX(C RXQ

TXQ
TXC
CMP
TXC

TXC CMP CMP CMP EOP RXQ TXQ
RXQ TXQ TXC RXQ TXQ TXC CMP

CMP EOP RXQ TXQ TXC RXQ TXQ

RXQ

DCLT>

7.2.2

TXQ

TXC

CMP CMP (MP EOP

MODE=ACTIVE/PASS=00000
(A)

/STATUS/
CHE CK/NOE CHO/NOMODEM

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:

SE T=1ALT/S=250

R M=R/NOCH/PAS 3

SEQ 0031

CZCLKkBO DMR,DMC-11 DATA COMM. (INK TEST

C2CLKB.P11

16-JUN-81

MACY11 30A(1052)

14:38

G 3
16-JUN-81

14:39

PAGE 12-3

R M=TR/PAS=3
WHAT

THIS SEQUENCE MEANS:

THE “*C E "' AND '°C T'' INITIALIZE BOTH THE
TRANSMIT AND EXPECT LISTS. THE °''SE T=1ALT/S=250"
SETS THE TRANSMIT LIST ON NODE A TO BE 1 MESSAGE
WITH A LENGTH OF 250 BYTES AND DATA OF ALTERNATING
ONES AND ZEROS. THE 'R M=TR/PAS=3'' SETS THE RUN MODE OF
NODE A TO BE TRANSMIT AND THE PASS COUNT IS SET TO 3.
THE 'R M=R/NOCH/PAS=3'' SETS THE RUN MODE OF NODE B
TO BE RECEIVE, NO DATA CHECKING
THE PASS COUNT IS SET TO THREE.

IS TO BE DONE,AND

WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND

THINGS ARE RUNNING CORRECTLY

FOR NODE

INI

TXC

TXQ TXC EOP TXQ TXC EOP TXxQ

EOP

MODE =TRANSM] T/PASS=00000

DCLT>
FOR NODE B:
JNI

(A)

/STATUS/NOCHE
CK/NOE CHO/NOMODEM

RXQ EOP RXQ EOP RXQ EOP

MODE=RECE
]I VE/PASS=00000

DCLT>

(A)

/STATUS/NOCHE
CK/NOE CHO/NOMODEM

NOw TRY DOING DATA CHECKING ON THE MESSAGE (S)
TRANSMITTED.
POSSIBLE COMMAND SEQUENCES ARE:

R M=TR/PAS=3
WHAT

SE E=1ALT/S=250

R M=R/CH/PAS=3

THIS SEQUENCE MEANS:

THE ''SE E=1ALT/S=250"" LINE MUST BE ADDED HERE
TO SET UP THE "EXPECT LIST'' ON THE RECEIVE NODE
SO IT WILL KNOW WHAT TO COMPARE AGAINST.
THE CHANGE IN THE RUN COMMAND IS FROM 'NOCH'' TO
"'CH''. THE ''CH'’ ENABLES DATA CHECKING.

WHAT YOU SHOULD SEE AFTER ENTERING THE
ARE RUNNING CORRECTLY:

NODE

BEING

NODE B:

RUN COMMAND

THE

SAME AS ABOVE.

IN]

RXQ CMP EOP RXQ CMP EOP RXQ CMP EOP

MODE=RECE
] VE/PASS=00000

DCLT>

/STATUS/
CHE CK/NOE CHO/NOMODEM
(A)?

THINGS

SEQ 0032

C2CLKBO DMR,DMC-11 DATA COMM. LINK TEST

(2CLKB.P11

16-JUN-81

MACY11 30A(1052)

14:38

16=JUN=81

14:39

PAGE 12-4

NOW RUN THRU THE SEQUENCE AGAIN WITH NODE A RECEIVING
AND NODE B TRANMITTING TO CHECK OUT THE OPPOSITE
DIRECTION OF

7.2.3

DATA FLOW.

ONE NODE ACTIVE THE OTHER NODE PASSIVE

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 B8

CE
cT

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

SE T=1ALT/S5=20/(C=2
R M=P/NOCH/PAS=3

THIS SEQUENCE MEANS:
THE EXECUTION OF THIS SEQUENCE CAUSES THE FOLLOWING
THINGS TO HAPPEN ON NODE A. THE TRANSMIT AND EXPECT

LISTS ARE INITIALIZED THEN THE TRANSMIT LIST IS SET
TO 3 MESSAGES OF 10 BYTES EACH. THE DATA USED IN THE

TRANSMIT MESSAGES IS THE CCITT PATTERN. THEN NODE A
IS RUN IN ACTIVE MODE WITH DATA CHECKING DISABLED AND
THE PASS COUNT SET TO THREE. NOTE STATUS WOULD STILL BE
PRINTED IF THE PREVIOUS SEQUENCES HAD BEEN RUN.

IF YOU ARE RUNNING FROM LOAD TIME YOU WOULD HAVE
TO ADD A ''/STA TO THE RUN COMMAND LINE.

NODE B: THE TRANSMIT AND EXPECT LISTS ARE INTIALIZED
THEN THE TRANSMIT LIST IS SET TO 3 MESSAGES OF

20 BYTES EACH.
1'S AND 0°'S.

THE DATA FOR EACH MESSAGE IS ALTERNATING

THE NODE

IS THEN RUN IN PASSIVE MODE WITH

DATA CHECKING DISABLED AND THE PASS COUNT SET TO 3.
WHAT

YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND

THINGS ARE RUNNING CORRECTLY

FOR NODE A:

INI RXQ TXQ TXC TXQ RXQ TXC TXxQ

RXQ TXC EOP RXQ TXQ RXC TXC TxQ
RXQ TXC TXQ RXQ TXC EOP RXQ TXQ
RXQ TXC TXQ RXQ TXC TXQ RXxQ TXC

eEop

DCLT>

MODE=ACTIVE/PASS=00000
(A)

/STATUS/NOCHE
CK/NOE CHO/NOMODEM

FOR NODE B:

INI RXQ TXQ TXC RXQ TXQ TXC RXQ

TXQ TXC EOP RXQ TXQ TXC RXQ TXQ
TXC EOP RXQ TXQ TXC RXQ TXQ TXC

SEQ 0033

C2CLxBO DMR,DMC-11 DATA (COMM. LINK TEST

CZCLKB.P11

16~-JUN-81

MACY11 30A(1052)

14:38

I 3
16-JUN-81

14:39

RXQ TXQ TX(C EOP

MODE =PASSIVE/PASS=00000

DCLT> (A)

/STATUS/NOCHE
CK/NOE CHO/NOMODEM

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.

7.2.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
crT

CE
cT

SE T=0AL1/S=10
SE T=CCITT/S=20
SE T=ALPHA/S=30
SE E=ZERO/S=11
SE E=ONES/S5=21
SE E=ITEP/S=31
R M=A/CH/NOST/PAS=3
WHAT

SE E=0ALT/S=10
SE E=CCITT/S=20
SE E=ALPHA/S=30
SE T=ZERO/S=11
SE T=ONES/S=21
SE T=ITEP/S=31
R M=A/CH/NOST/PAS=3

THIS SEQUENCE MEANS:
NODE A SETS UP IS TRANSMI1

LIST TO BE

3 MESSAGES. MESSAGE 1 IS 10 BYTES LONG AND
CONTAINS DATA OF ALTENATING O°'S AND 1°'S
MESSAGE 2 IS 20 BYTES LONG AND CONTAINS
DATA OF

THE CCITT PATTERN. MESSAGE THREE

IS 30 BYTES LONG AND CONTAINS ALPHANUMERICS

FOR DATA.

THE EXPECT LIST ALSO CONTAINS

3 MESSAGES. MESSAGE 1 IS 11 BYTES LONG AND
CONTAINS 0'S FOR DATA. MESSAGE TWO IS 21
BYTES_LONG AND CONTAINS 1'S FOR DATA. MESSAGE
3 1S 31 BYTES LONG AND CONTAINS THE ITEP DATA.

NODE B HAS THE SAME MESSAGES EXCEPT THAT THE
TRANSMIT MESSAGE LIST IS THE EXPECT MESSAGE LIST
AND VICE VERSA.
BOTH NODES ARE RUN IN THE ACTIVE MODE WITH
DATA CHECKING AND PASS COUNT EQUAL TO THREE.

WHAT

YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND

IF THINGS ARE RUNNING CORRECTLY
ON BOTH NODES A AND B:

MODE=ACTIVE/PASS=00000

/NOSTATUS/
CHE CK/NOE CHO/NOMODEM

PAGE 12-5

SEQ 0034

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

CZCLkB.P11

16=JUN-81

MACYT1 30A(1052)

14:38

DCLT>

(A)

16-JUN-81

14:39

PAGE 12-6

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.
THERSENQEOF-pASS” POINT WILL BE OUT OF SYNC BUT THIS IS NOT
A

LEM.

7.2.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=L]S/NOST

R M=TA/NOST
TLK>

LIS>

THIS SECTION WILL SHOW A SAMPLING OF

EXACTLY WHAT TO EXPECT FROM THEM.
7.3.1

COMMANDS AND

EXAMPLES OF MESSAGES COMMANDS

THE CLEAR COMMANDS

CE
crT

THIS WILL INITJALIZE THE TRANSMIT AND EXPECT LIST
TO 1 MESSAGE OF 58 BYTES. THE DATA OF THE MESSAGE WILL
BE THE ITEP MESSAGE.

THESESCOQHANDS ARE FOLLOWED BY A SHOW COMMAND
H

SUCH AS THE SHOW EXPECT LIST. WHAT YOU WOULD SEE IS
MSG: TYPE=ITEP/SI1ZE=58
MODE=ACTIVE/PASS=00001
/NOSTATUS/
CHE CK/NOE CHO/NOMODEM
DCLT> (A) ?
NOW IF YOU DID A SET EXPE’TM LIST COMMAND SUCH AS:

SE E=A/S=35/(C=3

AND FOLLOWED IT WITH A SHOW EXPECT LIST COMMAND
SH E
WHAT

YOU WOULD SEE

MSG:
MSG:
MSG:
MSG:

DCLT>

TYPE=ALPHA/SIZE=35
TYPE=ALPHA/SI1ZE=35
TYPE=ALPHA/SIZE=35
TYPE=ALPHA/SIZE=35

MODE=ACTIVE/PASS=00001
(A)

/NOSTATUS/
CHE CK/NOE CHO/NOMODEM

SEQ 0035

CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

16-JUN~-81

MACY11 30A(1052)

14:38

16~JUN-81

14:39

PAGE 13

7.3.2 EXAMPLES STATISTICAL COMMANDS

IF YOU TYPE A HELP COMMMAND
HELP

WHAT YOU WILL SEE
DCLT CMDS:

CLEAR OR SHOW

EXPEZTLIST OR TRANSMITLIST

DUMP START-END/B

SET EXPECTMSG OR TRANSMITMSG=1YPE/SIZE=N OR /COPY=N
SET EXPECT=TRANSMIT
TYPE=ONES,ZEROES,
TALT ,OALT,ITEP,CCITT ,ALPHA

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

RUN MODE=MTYP/LOOP=LTYP/CHECK, STATUS,ECHO,MODEM, PASS=N
MTYP=TRAN,REC
,ACT ,PAS ,TAL ,LIS,DOWN

,REM/
LTYP=INT,CAB,LOC

DCLT>

THE SAME WILL HAPPEN IF

YOU USE THE

THE DUMP COMMAND WORKS LIKE

THIS

DUM 41260-41300
THIS WILL DUMP THE DATA FROM ADDRESSES 41260 TO

41300 IN THE FOLLOWING MANNER

41260

104423

000167 177772 021122 012112 006312 006312 006312

41300
006312
IF YOU HAD USED THE /B SWITCH

DUM 41260-41300/8

WHAT YOU WOULD SEE

41260
41270
41300

023 211 167 000 3 2 377
112 024 312 014
014
312

7.3.3 EXAMPLES RUN COMMMANDS
YOU CAN FIND SEVERAL EXAMPLES OF THE RUN COMMMAND IN THE
TROUBLE SHOOTING HINTS SECTION BUT HERE ARE SOME OTHERS.
IF

YOU WERE TO EXECUTE THE RUN COMMAND
R M=TR/NOST/CH/PAS=4
WHAT WOULD HAPPEN IS AFTER 4 PASSES THE PROGRAM WOULD RETURN
TO THE DCLT PROMPT AND PRINT

MODE=TRANSM] T/PASS=00000

/NOSTATUS/
CHE CK/NOE CHO/NOMODEM
DCLT> (A)
2
IF YOU UERE TO EXECUTE THE RUN COMMAND

R M=A/L0=1/ST/CH/PAS=3

WHAT YOU WOULD SEE

(IF USING DEFAULT TRANSMIT AND EXPECT

SEQ 0036

CZCLKBO DMR,DM C=11 DATA COMM, LINK TEST
CZCLKB.P11
1 6-JUN-81 14:38

MACY11 30A(1052)

L 3
16=JUN-81

14:39

MESSAGES) IS
INI RXQ TXQ TXC CMP EOP RXQ TXQ

TXC CMP EOP RXQ TXQ TXC CMP EOP

MODE=ACTIVE/LOOP=INTERNAL /PASS=0000
DCLT>

(A)

/STATUS/
CHE CK/NOE CHO/NOMODEM

IF YOU g)S(%TTHE EXIT COMMAND
WHAT YOU WOULD SEE

CZCLK _EOP

0 CUMLAT.IVE ERRORS

DR>

7.3.4 EXAMPLES PRINT COMMANDS
THE PRINT COMMMAND CAN BE USED FROM THE

SUPERVISOR

(DR>)

LEVEL OR THE DCLT (DCLT.) LEVEL. ONCE YOU ARE AT THAT
LEVEL YOU WILL KNOW IT BY THE PROMPT RPT>

AFTER TYPING PRI

FOR EITHER

TYPE 'H'' OR

RPT>
HERE ARE

SOME

(A)

THE

DLCT> OR DR PROMPTS

"' FOR HELP!

EXAMPLES OF

RPT> LEVEL

COMMANDS

THE HELP OR ? COMMAND
HELP
OR
5

PRODUCES THE FOLLOWING:
DCLT REPORT (MDS:
LOG =~ >RINT DCLT EVENT LOG
EXIT = EXIT REPORT LEVEL
HELP = PRINT THIS MESSAGE
BASE/ERROR = PRINT ONLY ERRORS
BASE/FULL = PRINT ENTIRE TABLE
BASE/OFFSET=NNN - PRINT SINGLE LOCATION

RPT> (A)

? LOG

THE LOG COMMAND PRODUCES THE FOLLOWING
>>> DCLT EVENT LOG ENTRY 3323333333333 3333333333333>5>>)

0:01:16
RECEIVE SPACE QUEUED
ADDR OF MSG=000455
BYTE COUNT= 512
MODEM STATUS:

CSS D?R 060 Rss R{

S?D T?

>>> DCLT EVENT LOG ENTRY D>333333333333333332D33353333>>)>

0:01:16
RECEIVE SPACE QUEUED
ADDR OF MSG=000455
BYTE COUNT= 512
MODEM STATUS:

cgs D?R DSD Rss R{ S?D T?

PAGE 13-1

SEQ 0037

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

CZCLKB.P11

16-JUN-81

14:38

MACY11 30A(1052)

16-JUN-81

14:39

PAGE 13-2

THIS GOES ON FOR 45 EVENTS IF THE MODE

PREVIOUSLY EXECUTED HAD THAT MANY
YOU EXIT FROM EVENT LOG PRINTING BY
TYPING A CONTROL C.

7.3.5

EXAMPLE EXIT COMMAND

THE EXIT COMMAND WORKS LIKE THIS.

YOU

ENTERED THE REPORT LEVEL FROM THE SUPERVISOR
(DR>) THEN TYPING

EXIT
WILL RETURN YOU TO THE SUPERVISOR.
DR>

IF YOU ENTERED REPORT FROM THE DCLT LEVEL

THEN TYPING

EXIT
WILL RETURN YOU TO THE DCLT LEVEL.

DCLT>

7.4 THINGS TO WATCH OUT FOR
IF_YOU ARE RUNNING DCLT ON SYSTEMS THAT HAVE CONSOLES

WITH DIFFERENT SPEEDS YOU WILL BE UNABLE TO USE THE
PRINT STATUS FEATURE IN CERTAIN MODES. THE RULE IS
IF IT DOESNT WORK WITH STATUS PRINTING RUN THE MODE
WITH NOSTATUS.

IF_YOU ARE USING PASSIVE MODE WITH THE ECHO SWITCH
THEN YOU WILL PROBABLY HAVE

TO RE-ENTER THE

LIST ON THE SIDE WITH THE ECHO SWITCH.

TRANSMIT

THE REASON IS

THAT THE TRANSMIT LIST GETS OVER WRITTEN WITH THE
RECEIVE LIST WHEN USING THE ECHO SWITCH.

’

SEQ 0038

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLkB PN

(6)
(6)
(5
(5
(4)
(5)
(4)
(S)
(&)
(5)
(4)
(5)
(4)
(5)

002000

14:39

SEQ 0039

PAGE 13-3

PROGRAM HEADER
BGNMOD

.+t

;
;

THE PROGRAM HEADER IS THE INTERFA(CE BETWEEN
THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.
POINTER BGNRPT ,BGNAU,BGNDU

—~=0OWO
WS WO W

HEADER

102

(Z(LK,B,0,1800.,0,4PRI07

L SNAME:

.ASCII
.ASCII
-ASCII
.ASCI1
.ASCI1
.BYTE
.BYTE
.BYTE

LSREV::

LSDEPO:

"LASCII

/0/

:
LSHPCP:
:
LSSPCP:

:
LSLADP:

LSSTA::
L$CO::

(4)

LSDTYP::

(5)
(4)
(S)

T
LSAP::

002124

:
LSDTP:

.WORD
.WORD

1800.

.WORD

LSHARD

.WORD

:.UORD

LSSPTP::

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

/¢/
/L/
/K/

/B/

LSTIML::

LSHPTP:

/¢/
7/

.ASCII

LSUNIT::

(&)
(S)
(&)

(4)
(5)
(4)

N 3
16-JUN-81

888

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

14:38

.SBTTL

—_ et
2

6217
$218
6248
4249
4250
4255
4259
4260
4280
4281
4282
4283
4284
4285
4286
4287
4304
4305
4306
(4)

16-JUN-81

MACY11 30A(1052)

LSHW

.WORD

LSLAST

.WORD

-WORD

.WORD

LSDISPATCH

CZCLKBO DMR,DMC-11 DATA (OMM,
16-JUN-81 14:38
(2CLxB P11
(S)

000340

(4Q)
(5)

(4)

000000

(4)

000000

(4)

003
003

(4)

000000
000000

(4)

000000

(4)

012410

(4)

033732

(4)

000000

(4)

000000

(4)
(5)
(4)

034702
034674

(w)

000000

(S)

(5)

(3)
(5)

(5)
5
(5)
(S)

(5)

(5)
(4)
(5)

012424

(4)

104035

(4)
(5)
%)
(5)
(4)
(5)
(4)
(S)
(4)

000000

(S)

033746

034650
034646
033740

(5)

000000

(4)

(5)
(4)

(5)
(4)
4307
4314

00212

000000
000000

LINK TEST

MACY11

PROGRAM HEADER

30A(1052)

16=-JUN-81

14:39

PAGE 13-¢

SEQ 0040

[

LSPRIO::

LSENVI::

LSEXP1::
LSMREV::

LSEF::
LSSPC::
LSDEVP::
:
LSREPP:
LSEXPG::

LSEXPS::
LSAUT::

LSDUT::
LSLUN::

LSDESP::
LSLOAD::

LSETP::
LSICP::
LSCCP::

LSACP::
LSPRT::
LSTEST::

LSDLY::
::
LSHIME

. WORD

#PR107

-WORD

.WORD

.BYTE
.BYTE

CSREVISION
CSEDIT

.WORD
.WORD

0
0

.WORD

LSDVTYP

. WORD

LSRPT

.WORD

LSAU

:UORD

LSDU

. WORD

.WORD

L$DESC

EMT

ESLOAD

.WORD

LSINIT

.WORD

LSCLEAN

.WORD

LSAUTO

. WORD

LSPROT

.WORD

C2CLxBO DMR,DMC-11 DATA COMP,
16=JUN-81 14:38
CZCLkB.PI
(326
4327
4328
(329
4330
4331
(332
4333
(4)

3
(6)

4334

LINK TEST

MACY11 30A(1052)

DISPATCH TABLE

.SBTTL

16-JUN-81

14:39

SEQ 0041

PAGE 13-5

DISPATCH TABLE

s *e

002122
002122
002124
002124

000001

034710

THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF

EA(CH TEST,

IT IS USED BY THE SUPERVISOR TO DISPAT(H TO EACH TEST.
DISPATCH 1

.WORD

LSDISPATCH:

WORD

c%%CL5881?HR.DMC~11 DATA COMM. LINK TEST
16-JUN-81

LKB.

6342
(343
6344
4345
6366
6347
(348
4349
4350
635
(3)

(3)
(3)
4352
6362
4363
4364

4365
4366
6367
4368
4369
4370
4383
4384
4385
4386
4387
4388
4389
4390
4391
4392
4393
4394
4395
4396
4397
4398
4399
4400

(3)

14:38

MACY11 30A(1052)

DEFAULT HARDWARE P-TABLE

.SBTTL

16-JUN-81

14:39

PAGE 13-6

SEQ 0042

DEFAULT HARDWARE P-TABLE

+4+

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.
002126
002126
002130
002130

BGNHW

000010

DFPTBL

L$HW::

LWORD

L10000-L$HW/2

DFPTBL::

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

000001

.WORD

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

IF FuULL)

;DEVICE DEPENDENT SECTION

:
002132
002134
002136

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

002140

160170
000300
000240
000000

.WORD
.WORD
WORD
.WORD

160170
300
240
0

:[2] CSR ADDRESS
;4] INTERRUPT VECTOR
;[6] INTERRUPT PRIORITY (5)
;[10] DEVICE PARAMETERS WORD

002142

000000

.WORD

[;28 MEE”CE OPTION TYPE(0=DMC, S=DMR-DMC MODE.

002144

000004

JWORD

[143 BAUD RATE (0=2.4K,

002146

000000

.WORD

[16] LINE INTERFACE (422, V.35, INT, EIA...)

002150
002150

ENDHW

(ENABLE

CRC,

STRIP SYNC,

4=56K, 5=250K, 6= soox

COMPATIBLE MODE...)

1=4.8K, 2=9.6K, 3= 19.2K,

7=1 MEGA-BAUD)

L10000:

CZCLKBO DMR,DMC-11 DATA (OMM.
CZCLKB.P11
16=JUN-81 14:38
6402
4403
4420
4463
44464

LINK TEST

MACY11

DEFAULT HARDWARE P-TABLE

.SBTTL

4445

30A(1052)

E 4
16-JUN-81

14:39

PAGE 13-7

GLOBAL EQUATES SECTION

4446
4456

4457
4458
4459
4460
4461
4462
4477
4478
(1)
1)
(1)
(1)
(1)
QP
)
(1)
1)

.+t

;

100000
040000
020000
010000
004000
002000

000100

QD)

000010

000400
000200

000040
000020

000004
000002

E};

000001

(1)
)
1)
1)
&P
(1)

001000
000400
000200
000100
000040
000020

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

000004
000002
000001

QD)

(};
(

THAN ONE

TEST.

. BIT DIFINITIONS

(@))

(1)
1)

IN MORE

EQUALS

001000

)
e

USED

002150

1
1

THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT

ARE

000010

BIT15== 100000
BIT14== 40000
BIT13== 20000

BIT12==
BIT11==
BIT10==
BI1T09==
BIT108==
BIT07==
BIT06==
BIT0S==
BIT04==
BIT03==
BIT02==
BITO01==
B81700==

10000
4000
2000
1000
400
200
100
40
20
10
&
2
1

BIT9==
BIT8==
BIT7==
BIT6==
BITS==
BIT4==
BIT3==
BIT2==
BIT1==
BITO==

BIT09
BITO8
BIT07
BIT06
BIT05
BIT04
BIT03
BIT02
BITOI
BIT00

; EVENT FLAG_DEFINITIONS

;
000040
000037
000036
000035
000034

EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION

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

32.
31.
30.
29.
28.

; START COMMAND WAS [SSUED
; RESTART COMMAND WAS [SSUED
. CONTINUE COMMAND WAS ISSUED
: A NEW PASS HAS BEEN STARTED
. A POWER=FAIL/POWER-UP OCCURRED

SEQ 0043

000340
000300

PRIO7== 340
PRIO6== 300
PRIQS== 240

PRIO4==
PRI03==
PRI0O2==
PRIO1==
PRI00==

200
140
100
40
0

—

EVL==

LOT==

:OPERATOR FLAG BITS

ADR==
IDU==
ISR==

80E==
PNT==
PR]==
IXE==

H
BN AN

F
4
16-JUN-8!

* PRIORITY LEVEL DEFINiTIONS

NSNS

NN NN PN NN SN

V—h—a—l—b—l—l—l.—l-—l—b—l—a.fl—a—a—b—l_.._h—l—a—‘—l_&—b.a—-l—b
Ovvvvvvvvvvvvvvvvvvvvvvvvvvvv

MACY11 30A(1052)
CZCLKBO DMR,DMC~-11 DATA COMM. LINK TEST
(2CLkB.P11
16-JUN-81 14:38
GLOBAL EQUATES SECTION

UAM==

100000

IBE==
1ER==
LOE==

HOE==

20
40
100

200

400
1000
2000
4000

10000
20000
40000

100000

14:39

PAGE 13-8

SEQ 0044

CZCLkBO OMR,DMC-11 DATA COMM. LINK TEST

(2CLKB.P11

16~JUN-81

ng}

GLOBAL EQUATES SECTION
;eeven

4483
(L8B4
4485
4686

14:38

MACY11 30A(1052)

16-JUN-B1

001000

BUFLIM=512.

000017

MSGL IM=15.

ngg
4

4495
4496
4497
4498

000003
000004
000005
000006

4499
4500
6501
4502

4503
4504
4505

4506
4507
4508
4509
4510

22}}

000002

ADD 6 WORDS TO THE POINTER TABLE

;

"POINTER'® WORDS PER BUFFER.

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

sACTIVE MODE
s DOWN-L INE-LOAD MODE
s TALK MODE
;LISTEN MODE

PAS=?

MODLOC= 3
MODREM= 4
MOP=
5

000100
000111

001600

TTL=
CABLE=

sPASSIVE MODE

;NO LOOP

1
¢

sINTERNAL TTL
:CABLE LOOP

sMODMEM LOCAL
;MODEM REMOTE
. MOP

;CLOCK ENABLE VALUES TO BE LOADED IN CLK'S CSR
LCLKEN= 100
sL=CLOCK CSR VALUE TO ENABLE THE CLOCK
PCLKEN= 111
;P-CLOCK CSR VALUE TO ENABLE THE CLOCK

PCLKCT= 1600

sP=CLOCK COUNT SET REGISTER FOR COUNTER

;PARAM WORD EQUATES
000001

4518
4519

000010
000020

000002
000004

000040

225%

STATB=

BITO

;OPERATOR AWAKE ASKED FOR

MOCHK=
CRCB=_

B]IT3
BIT4

;MODEM CHECK/NO CHECK
ADDED BY EC
;CRC CALCUALTE ASKED FOR

DATCKB= BIT1
ECHOB= BIT?

PROTOB= BITS

;DATA CHECK BIT
cECHO BIT

+PROTOCOL PROCESSING ASKED FOR

;OPTION TYPE EQUATES

4524

000000

DM(C=

sDMC

4526
4527
zggg

000005
000006
000007

DMR(C7=
DMR6=
DMR7=

5
6
7

;8207 DMR IN DMC MODE
;8206 DMR IN DMR MODE
;8207 DMR IN DMR MODE

4525

4530
4531

6532
4533
4534
4535
4536

SINCE THIS MEANS 2 MORE

cRECEIVE MODE
s TRANSMIT MODE

000003
000004
000005

000001
000002

(PTRTAB:)

OPERATION EQUATES
REC=0
TRA=1

JMAINT LOOP TYPE EQUATES
NONE=
O

4515

225?

:MODE OF

000000

22}2

4516
4517

;

000000
000001

SEQ 0045

;MAX BUFFER SIZE IN BYTES
;
APPLIES TO TX,RX AND CMP BUFFS
sMAX NO. OF MESSAGES PER BUFFER
:
(FOR EACH INCREMENT (+7) TO MSGLIM,

4488

4N
4492
4493

PAGE 13-9

INDEPENDENT EQUATES

4487

64694

14:39

000004

000000
000002
000004
000006
000010

DMRC6=

;8206 DMR IN DMC MODE

;EVENT LOG MESSAGE TYPES (USED TO LOCATE EVENT DESCRIPTION IN EVENT TABLE
;
AND DISPATCHING TO SEPERATE SECTIONS OF THE EVENT REPORTING SECTION)

TXQ=
TXC=
RXQ=
RX(C=
DER=

0
2
4
6
10

s TRANSMIT MESSAGE QUEUED
s TRANSMIT COMPLETE
sRECEIVE BUFFER QUEUED
JRECEIVE COMPLETE
;DEVICE INFORMATION

C2CLkBO DMR,DMC=-11 DATA COMM. LINK TEST

14:39

PAGE 13-10

16=-JUN=-81

4537

000012

Dvl=

;DEVICE ABOUT TO INIT

4540
4541

000020
000022

DLE=
DDE=

20
22

;DATA COMPARISON LENGH ERROR
;DATA COMPARISON DATA ERROR

222%

000014

4548
4549
4550
4551
4552
4553
4554
{555
2229

000001
000002

002000

4568

000010

2%;?
4572
4573
4574
4575
4576
4577
4578
4579
4580
4581
4582
4583

4584
4585
4586
4587
4588
4589
4590
4591
4592

;DATA COMPARISON RESULTS

ININT= 1
OTINT= 2
QRX=
4
QTX=
10
CTX=
20
CRX=
40
ERX=
100
ETX=
200
DLLGA400
DMRRUN= 1000
BTUP=
2000

000004
000010
000020
000040
000100
000200
000400
001000

000000
000001
000002
000003
000004
000005
000006

4569

EOP=

JEND OF PASS

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

4558
4559
4560
4561
4562
4563
4564
4565
4566
4567

D(CK=

0000264

z'gzg
4546
4547

GLOBAL EQUATES SECTION

16-JUN-81

C2CLKB.P11

22%8

14:38

MACY11 30A(1 052)

;
:

000007

JRX QUED /COMPL
:TX QUED/COMPL
:TX COMPL AND IN TXSEL4 AND TSEL6
JRX COMPL AND [N TSEL4 AND TSEL6
JEXPECT TO GET A RX COMPLED
SEXPECT TO GET A TX COMPLETED
;DOWN LINE LOAD GO AHEAD BIT
;DMR RUN MODE EXPECTED
;BASE TABLE UPDATE REQUESTED

SPECIAL CL]I CODES FOR ''CHAR'' ARGUMENT IN CLI
(COMMAND LINE INTERPRETER DEFINITIONS)
CLIERR= 0
CLIEXI= 1
CLIBR=
2
CLIBIF= 3
CLISPA= 4
CLINUM= 5
CLIALP= 6

CALLS

CLIALN= 7

CLIOCT= 8.

000011

CLIDEC= 9.

000012
000000
000001
000002
000003
000004
000005
000006
000007
000010
000011
000012
000013
000014
000015
000016
000017
000020
000021
000022
000023

JINPUT INT. REC.
;OUTPUT INT REC

CLISTR= 10.
:

DEFS FOR COMMAND LINE
NULL=0
CLEAR=1
SHOW=2
CHECK=3
RUN=4
HLP=5
CSHEXP=6
CSHTRN=7
SETEXP=10
SETTRN=11
SI1ZE=12

QCOPY=13
NUM=14
OPRMSG=15
STATUS=16
ENDQO=17
(MSG0=20
(MSG1=21
(MSG2=22
CMSG3=23

INTERPRETATION ACTION VALUES

SEQ 0046

MACY11 30A(1052)
C2CLkBO DMR,DMC-11 DATA COMM. LINK TEST
SECTION
EQUATES
GLOBAL
C2CLkB.P1
16-JUN-81 14:38

[

16=JUN=81

14:39

PAGE 13-11

CMSG4=24

4593
4594
4595
4596
4597
4598
4599
4600
4601
4602
4603
4604
4605
4606
4607

CMSGS5=25
CMSG6=26
ATVMOD=27
PASMOD=30
RECMOD=31

LISMOD=32
DLLMOD=33
TRAMOD=34
TALMOD=35
NO=36
ECHO=37
CRC=40
PROTO=41
PAS(C=42

MOP=43

4608
4609
4610
4611
4612

TTLLOP=44

CBLLOP=45

LMDLOP=46
RMDLOP=47
NOTNUF =50
BADCHR=51

4613
4614

DMPS=52
DMPE=53
DMPQ=54

PRNT=55
MOSC=56
EXIT=57

;MODEM/NOMODEM REV B BY EC
JEXIT COMMAND REV B BY EC

SETET=60

;S E=T COMMAND REV B BY EC
REV B BY E(

:FOLLOWING EQUATES USED IN REPORT (LI

JHELP COMMAND
JEXIT COMMAND

RPHLP=1
RPEXT=2
RPLOG=3

:PRINT EVENT LOG COMMAND

RPSWE=4

RPSWF =5

RPSWO=6

=7
RNOTNF

;BASE/ERROR COMMAND
JBASE/FULL COMMAND
;BASE/OFFSET
;MORE COMMAND NEEDED

DEVICE DEPENDENT EQUATES
MODEM SIGNAL BIT DEFINITONS

*hRRARN

IF SIGNAL AVAILABLE IN DEVICE, EQUATE NAME
ELSE EQUATE IT 10 = 0
CTS=
DSR=
DCD=

RTS=
RI=
SQD=
M=

000040
000200

BIT?
BIT3
BITO

BITS
BIT?7
BIT14
BITY

DEVICE SIGNALS
RQ]=
BITS
BIT?7
RDI=

TO BIT POSITION,

;CLEAR TO SEND (CIRCUIT (B)

;DATA SET READY (CIRCUIT CC)

;DATA CARRIER DETECT (CIRCUIT CF)
cREQUEST TO SEND (CIRCUIT CA)
JRING INDICATOR (CIRCUIT CE)
sSIGNAL QUALITY DETECT (CIRCUIT (CG)
JMODEM [N TEST MODE (RS 449 ONLY CIRCUIT TMM)

JREQUEST IN
;READY [N

SEQ 0047

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

CZCLKB.P11

16~JUN-81

6667
4668
4669
4670
4671
6672
4673
4674

00020C
000001
040000
004000
000400
002000
000004
000100

4675

14:38

MACY11

30A(1 052)

RDO=
BACC=
MCLR=
LULOOP=
MAINTB=
HALFDB=
RXBIT=
1€0=

BlT17
BITO
BIT14

GLOBAL EQUATES SECTION

BIT11
BIT8

BIT10
BIT?

8IT6

4
J
16-JUN-81

14:39

PAGE 13-12

JBUFFER ADDR. (HAR COUNT
JMASTER CLEAR
SJLINE UNIT LOOP(TTL)
sMAINT MODE BIT
JHALF DUPLEX BIT
sRX BI7
JENABLE OUTPUT INTERRUPT BIT

SEQ 0048

CZCLKBO DMR,DMC-11

CZCLkB. P11

DATA (OMM.

16=JUN~-81

14:38

LINK TEST

6677
4678

MACY11

GLOBAL DATA SECTION
.SBTTL
.SBTTL

4679
4680
4681
4682

30A(1052)

&
K
16=JUN-81

14:39

SEQ 0049

PAGE 13-13

GLOBAL DATA SECTION
DEFAULT MESSAGE DEFINITIONS AND TABLES

;

4,683

4684
4685
4686
4687
4688
4689
4690
4691
4692
4693
4696
4695
4696
4697
4698
4699
4700
4701
4702

THE

GLOBAL

DATA SECTION CONTAINS DATA

IN MORE THAN ONE TEST.

SMESSAGE BYTE

DMSGCT:
MSGOC:
MSG1C:
MSG2C:

.WORD
.WORD
.WORD

MSG4C:

.WORD

MSG3{:

MSG5C:

MSG6C:
OPCNT:
MSG8C:
DLLMIC:

DLLM2C:

THAT ARE USED

COUNT TABLE

EMSGO-MSGO
EMSG1-MSG1

COUNT
COUNT
COUNT
COUNT
COUNT
COUNT
COUNT

OF
OF
OF
OF
OF
OF
OF

MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE

#0
#1
#2
#3
#4
#5
#6

.WORD

EMSG2-MSG2
EMSG3-MSG3
EMSG4-MSG4
EMSG5-MSGS

SHSGb-MSGb

;BYTE
JBYTE
JBYTE
;BYTE
JBYTE
;BYTE
;BYTE

.WORD

EMSG8-MSG8
DLLMI1E-DLLMI
DLLM2E~DLLM?

JBYTE COUNT OF RECEIVE BUFFER FILL PATTERN
;DLL MS6 1 CONT
;DLL MSG 2 COUNT

.WORD

.WORD
.WORD
.WORD
.WORD

;BYTE

COUNT FOR OPERATOR SPEC'D MSG.

sMESSAGE ADDRESS TABLE
DMSGAD:

4703

4704
4705
4706
4707
4708
4709
4710
4711
4712
4713

MSGO
MSG1
MSG2

;ADDRESS OF MESSAGE #0

MSG4

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

;ADDRESS OF MESSAGE
:ADDRESS OF MESSAGE
;ADDRESS OF MESSAGE
;ADDRESS OF MESSAGE
sADDRESS OF MESSAGE

MSG3

MSGS
MSG6

OPBUF

MSG8

4714
4715
4716
4717
4718
4719
4720
4721
4722

MSGO:

BYTE

000

;MESSAGE OF ALL 0'S

MSG1:

BYTE

377

MESSAGE OF ALL 1°'S

.BYTE

252

sMESSAGE OF ALTERNATING 1°'S

.BYTE

125

sMESSAGE OF ALTERNATING 0°'S

. WORD

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

EMSGO:

EMSG1:
MSG2:
EMSG2:
MSG3:

EMSG3:

031011
105221

#1
#2

MSG4:

CCITT'' 512-BIT (VS. 511 BITS) TEST PATTERN

4723

052606

.WORD

060041,014116,052606,172334,105025,1237564,111337,111523

4724

137642
135075

.WORD

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

070071
031605

.WORD

052012,053627,070071,151172,165044,031605,166632.016741

4725

123754

052012
151172

166632

6726
4727
4728
4729

077577

0167461

L 4
16-JUN~-81

MACY11 30A(1052)

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
16=JUN-81 14:38
cZcLkB.P1

14:39

PAGE 13-14

DEFAULT MESSAGE DEFINITIONS AND TABLES

EMSG4:
MSGS:

:'3#TE?;§?C§SSOR TEST PROGRAM'S (ITEP)'' MESSAGE

040444
050440
041040
043040

052040

LASCII

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

077401

077577

LASCIZ

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

LASCIT

;ALPHA-NUMERICS (OR FUTURE COMM TURNAROUND MSG)
/48! ' () r¢ =, 0123456789:;<=>?8ABCDEF
GHI JKLMNOPQRSTUVWXYZ/

LASCIZ

?2/0N\1*_%?

046525
053117
042510
020131
4730

EMSGS:

4731
4732
4733

021041
025051
030460
033466
036474
041502
044510
047516
052524
32
056133
000
]

4734

022537

4735
4737
4738
4739
4740
4741
4742

4743

4744

4745
4746
4747
4748
4749
4750
4751
4752
4753
4754
4755
4756
4757
4758
4759
4760
4761

002520

023040
026053
031462
034470
037476
042504
045512
050520
053526

MSG6:

057135
EMSG6:
s

.EVEN

AARARAAANANRARRRARARARNARIA
A AARRRAANAAARRRAAAAARAASANRARNAARRAARARAI RO

;THESE THREE STORAGE AREAS MUST NOT BE SEPERATED !!!!
002520
002524

002646

002646
002647

047045
000122

033

OPBFPT:
8;?38:

.ASCII
.BLkB

/INXA/
82.

;BUFFER FOR OPERATOR SPEC'D MESSAGES

THE ABOVE

AAAARNRARAANRARARARAAARETA
AN RARAARRANARAAAANAARNRARARRAARARANAANAAARARRONS

MSG8:
EMSG8:

THREE LINES MUST BE KEPT TOGETHER

.BYTE

JRECEIVE BUFFER FILL PATTERN

; DOWN-LINE-LOAD MESSAGE DEF INITIONS
;.. ENTER MOP MODE MESSAGE FORMAT
soc..THE NODE WILL ENTER MAINTENANCE MODE ONLY IF THE PASSWORD MAT(CHES.

002647
002650
002651

OLLM1:
PASS1:
PASS2:
PASS3:
PASS4:
DLLMIE:

002652
002653
002654

002654

0460445

000

DLLMZ2:

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

6
0
0
O
O

;BINARY CODE FOR MAINTENANCE MODE
;PASSWORD BYTE M1
LEGAL VALUE 0 - 255
:;VALUE IN BYTE 1 IS DUPLICATED HERE
;2 :AND HERE
::::AND HERE.
JEND ENTER MOP MODE MESSAGE FORMAT

;.:;MEMORY LOAD WITH TRANSFER ADDRESS MESSAGE FORMAT
.BYTE
O
. CODE

SEQ 0050

4764

4765

4766

4767
4768

4769
4770
W77

4772
4773
4774
4775
4776
w777
4778
4779
4780
4781
4782

002655
002656
002657

002660
00266

00C
006
000
000
000

.BYTE
.BYTE

.BYTE

002662

005037
012706
012701
010700
062700
105761
100375

000006
001000

000034
000004

040522

479N

1$:

000024

051505

052117
040523
051501
044505
052523
043123
026440
043117
020524

027015
046105
051120
027115

027056
040517
043517
027056

046440
042507

012
051056
020104

CLR
MOV
MOV
MOV

177560

112061
001372
012737
005037
000777

041503
046125
047105
052040

4784
4785
4786
4787
4788
4789

;LOAD ADDRESS

; IMAGE DATA

051040
042526

4783

;LOAD NUMBER
:LOAD ADDRESS LSB

MSG:

DLLMZE:

ADD

7S18B
BPL
MOvVB
BNE

ard

#1000,SP

#177560
,.R1
PC,RO

#<MSG-.>,RO
4(R1)
1%

SSET UP TTY

sMAKE ADDR.PIC

;ADDRESS MSG.

;TTY READY?
cWAIT TIL YES

MOV
CLR

(RO)+,6(R1)
1%
#26, 426
ané

LASCII

<12><15>/8B00T MESSAGE WAS RECEIVED SUCCESSFULLY ~END OF TEST!!/

.ASCIZ

<12><15>/...

.BYTE

SOOO

4762
4763

lelelale
Yo

m 4
MACY11 30A(1052)
16=JUN-81
14:39 PAGE 13-15
DEFAULT MESSAGE DEFINITIONS AND TABLES

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
16-JUN-81 14:38
CZCLKB.P11

.BYTE
.BYTE
.EVEN

sTYPE A CHAR

:KEEP GOING
;SET UP POWER FAIL
sMAKE SURE T BIT CLAER
; JUMP ON YOURSELF

RELOAD PROGRAM..../

JNEXT FOUR BYTES CONTAINS TRANSFER ADDRESS
;OF PROGRAM JUST DOWNLINE LOADED.
;2. THIS PROGRAM STARTS AT ADDRESS 6.
;END MEMORY LOAD MESSAGE FORMAT

SEQ 0051

C2CLxBO DMR,DMC~11 DATA COMM. LINK TEST
CZCLKB.P11
16-JUN-81 14:38
277‘32
4795
4796

4797
4798

4799
4800
6801
4802
4803
4804
4805
4806
4807
4808

4809

4810

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

000122
000000

CMOBUF:
KEYWD1:

.BLKB
.WORD

82.
0

003204
003206
003210
003212
003214
003216
003220
003222

000000
000000
013232
013245
013362
013447
013474
013553

QUALFG:
QUALVL:
HLPTAB:

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

O
0
HLP1
HLP?2
HLP3
HLP3A
HLP4
HLP4A

003224
003226
003230

003230

013631
013721

014057

4811
4812
4813
4814
4815
4816
4817
4818
4819
4820
4821

003232
003234
003236
003240
003242
003244
003246

014102
014135
014166
014220
014257
014316
000000

003250
003252
003254

020342
020402
020432

4824
4825
4826
4827
4828
4829
4830
4831
4832
4833
4834
4835
4836
4837
4838
4839
4840
4841

003262
003264
003266
003270
003272
003274
003276
003300
003302
003304
003306
003310
003312
003314
003316
003320
003322
003324

020566
020620
020663
020717
020751
021003
021035
021065
021114
021146
021176
021226
021255
021307
021333
021365
021410
021463

4822
4823

4842
4843
4844
4845
4846
4847
4848

MACY11 30A(1052)
16-JUN-81
14:39 PAGE 13-16
DEFAULT MESSAGE DEFINITIONS AND TABLES

003256
003260

003326
003330
003332
003334
003336
003340

003342

020467
020532

021513
021544
021627
021664
021721
021756
022042

HLPEND :

.WORD
.WORD

;BUFFER FOR OPERATOR COMMANDS
sTHIS LOC WILL =1 IF CLEAR TYPED, 2 FOR SHOW,

: A4 IF RUN WAS TYPED, 5 IF HELP WAS TYPED
;THIS LOC HOLDS QUALIFIER VALUE (SIZE OR COPY)

HLPS
HLP6

;INDEX TABLE FOR REPORT ‘RPT>' HELP MESSAGES

RHLPTB:

.WORD

RHLPI

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

DMR003
DMROO4

.WORD

DMRO35

REV B BY EC

.WORD
RHLP?2
.WORD
RHLP3
.WORD
RHLP4
.WORD
RHLPS
.WORD
RHLP6
.WORD
RHLP?7
RHLPEN: .WORD
O
;END OF REPORT HELP TABLE
;INDEX TABLE FOR DMR BASE TABLE DATA DESCRIPTION MESSAGES REV B BY EC
DMRIND: .WORD
DMR0OOO
.WORD
DMROO1
.WORD
DMR0O?2

.WORD
.WORD
.WORD
.WORD
.WORD

DMROOS5
DMR0O06
DMR007
DMR0O10
DMRO11
DMRO12
DMRO13
DMRO14
DMRO15
DMRO16
DMRO17
DMR020
DMROZ21
DMR02Z2
DMR023
DMRQZ2¢4
DMRO2S
DMRQZ26

DMRQ27
DMR030
DMRO31
DMRO3?
DMRO33
DMRO34

SEQ 0052

MACYT1 30A(1052)

C2CLxBO DMR,DMC-~11 DATA (COMM. LINK TEST
16=-JUN-81 14:38
(ZCLkB PN
4849

4850
4851
485
485
4856

4855
6856
6857
4858
4859
4860
4861
4862

003344
003346
003350
003352
003354
003356
003360
003362
003364
003366

4863
4864

4865
4866
4867
4868
4869
4870
4871
4872

4873
4874
4875

4876
4877

4878
4879

4880
4881
4882
4883
4884
4885
4886
4887
4888
4889
4890
4891
4892

4893
4894
4895
4896
4897
4898
4899
4900

DMREND: .WORD

020322

DMCIND:

014464
014505
014525

WORD

WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WoRD

WORD

WORD
WORD
WORD

003513

125

043
003514

PAGE 13-17

DMRO37
DMRO4Q
DMRO4]
DMRO4Z
DMRO«3
DMRO44
DMRO4S
DMRO4S
DMRO4?7
DMROSO
DMROS]
DMRO5?
DMRO33
DMROS4
DMROSS
DMROSS
DMRO57
DMRO0
DMRO6]
DMR062

DMR063
DMROG%

DMRO6S
DMROG6
DMRO67

DMR177

sNO DMR MESSAGES MUST FOLLOW DMREND

TABLE FOR DMC BASE TABLE DATA DESCKIPTION MESSAGES REV 8 BY EC

DMCEND:

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

DM(C002
DMCO03
DMC004
DMCOOS
DMC006
DMCQ07
DM(C010
DMCO11
DM(CO1?2
DM(CO13
DM(C377

SHTYTB:

.WORD

SHTYPQ,SHTYP1,SHTYP2,SHTYP3,
SHTYP4 SHTYPS ,SHTYP6,SHTYP7

;

000

14:39

:INDEX

003504

DEFAULT MESSAGE DEFINITIONS AND TABLES

022107
022154
022212
022245
022303
022351
022405
022441
0226472
022540
022602
022630
022664
022711
0227644
022766
023041
023114
023136
023170
023222
023272
023342
023376
023432
023475
023540

024147
0264206

16=JUN-81

THE

.WORD
WORD

DMUNKN
DMUNKN

LIST OF BYTES BELOW ARE

;NO DMC MESSAGES MUST FOLLOW DMCEND

THE

FIRST BYTES OF

THE PREDFFINED MESSAGES

USED TO ''SHOW'' THE TRANSMIT AND COMPARE BUFFER CONTF'.

SHTAB:
SHTEND:

.BYTE

.EVEN

0,377,252,125.203,177,043

<FQ 0053

MACY11 30A(1052)

4901
4902

4903

014544

14556

16-JUN-81
14:39
PAGE 13-18
DEFAULT MESSAGE DEFINITIONS AND TABLES

C2CLKBO DMR,DMC~11 DATA COMM. LINK TEST
16-JUN-81 14:38
CZCLkB.P1
MODES:

;ADDRESSES OF MODE TYPES IN ASCII

LOOPS:

sADDRESSES OF

4904
4905
4906

4907

4916

49N7
(918
4919
4920
4921
4922
4923
4924
4925

LOOP TYPES

IN ASCII

014664
014677

. COMMAND
000000
000000
000000
000000
000000
000000
000
000

PSBUFA:
PSTREE:
PSACT:
PSCNT:
PSNUM:
PSRADX:
PSNNUF:
P$GDBD:

TRAVERSE LOCATIONS (USED BY ‘PSTRV'")
.

.
.

eololelolololols)

4908
4909
4910
4911
4912
4913
914
4915

:LOC. TO HOLD ADDR. OF CMD LINE BUFFER
;LOC. TO HOLD ADDR. OF PARSING TREE
;LOC. TO HOLD ADDR. OF ACTION ROUTINE
;LOC. TO BE A COUNTER LOCATION
;LOC. TO HOLD NUMERIC VALUE FROM PARSE
;LOC. TO HOLD RADIX USED(LO) AND +/=(HI BYTE)
JRETURN =0 IF ENOUGH OF COMMAND FOUND
;RETURN CODE O IF NO ERROR FOUND

SEQ 0054

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-81 14:38
CZCLKB.P11

CMPPTR:
CMPTOT:
CT0TCC:
CCURAD:

.WORD
.WORD
.WORD
.WORD

DVTXA:
DVTCC:
DVT(CT:
:
TXMTOT
TTOTCC:

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

DVRXA:
DVRCC:
DVR(CT:
:
RXMTOT

.WORD
.WORD

LNCNT:
:
NOBUF
PSCNT:

.WORD
.WORD

ENADD:
BYTBIT:

.WORD
.WORD

TCURAD:

.WORD
.WORD

ERRCNT: .WORD
STADD:
.WORD

;OTHER ME SSSAGE

MSGTYP:

.WORD

CURC(C:
CPTRR:
CPTR:
CURADD:
TOTCC:
OFSET:

.WORD
.WORD
-WORD
.WORD

TEMP]:
TEMP?:

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

TEMP:

TEMP3:

TEMPS:
TEMPS:

CONOTM:

000000

.WORD

CONTIN:
600D:
BAD:
.BYTE
INDEX:
.WORD
INDEXE: .WORD

BUFLIM
BUFLIM
BUFLIM

s TRANSMITTER BUFFERS
sRECEIVER BUFFERS

; COMPAR]SON BUFFERS

;TABLE FOR MESSAGE ADDRS.

; END OF MSG. PTR. TABLE
OO0O0O0O0O

.BLKB
.BLKB
.BLKB
.BLKW

& BYTE COUNTS

;RECEIVER MESSAGE POINTER

; TRANMITTER BUFFER POINTER

: COMPARISON BUFFER POINTER
:CMP MSG TOTAL
; COMPARE BUFFER CHAR. COUNT
; CURRENT ADDR OF CMP BUFF TO ADD AT

OO0O0O0O0O0

RXPTR:
TXPTR:

SEQ (055

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

OOO0O0

:
CMPBUF

PTRTAB:
PTREND:

000000

PAGE 13-19

:DEVICE RX ADDR

OOOO0OOO

:
TXBUF
:
RXBUF

000000
000000

14:39

ME SSAGE BUFFERS AND POINTER TABLES

.SBTTL

000000
000000

:NUMBER OF OPERATOR AWAKE MSGS
;NUMBER OF NO BUFFS

4961
4942
4943
4944
4945
4946
4947
4948
4949
4950
4951
4952
4953
4954
4955

16-JUN-81

MESSAGE BUFFERS AND POINTER TABLES

STORAGE LOCATIONS
:TYPE OF DATA 0=0'S,1=1'S,?2 =10'S,3=01"'S
;4=CCITT ,5=QUICK FO X,6=ALPHA/NUM, 7=0PER

QOOOOOOCOOCOOOOOOO

4927
4928
4929
4930
4931
4932
4933
4934
4935
4936
4937
4938
4939
4940

MACY11 30A(1052)

sDEVICE RX CHAR COUNT
;DEVICE RX MESSAGE COUNT
sRX MSG TOTAL

:PASS COUNTER
;ERROR COUNTER
:START ADDR.
;END ADDR. FOR DUMP
;BYTE BIT FOR DUMP ROUTINE

s TX/RX/CMP CHAR COUNT
s CURRENT RX POINTER
: CURRENT POINTER
s CURRENT TX/RX/CMP START ADDD
:TOTAL CHAR COUNT NOT MORE THEN °'BUFLIM''
sJOFFSET COUNT
; TEMPORARY LOCATIONS (USED A LOT)

;CONTROL OUT ERROR MSG. ADDRESS
;WORD FOR CONTORL

;BYTE
;BYTE
;WILL
sWILL

TO HOLD
TO HOLD
CONTAIN
CONTAIN

EXPECTED MESSAGE DATA BYTE FOR ERR REPORT
RECEIVED MESSAGE DATA BYTE FOR ERR REPORT
POINTER TO DMC OR DMR MESSAGES
POINTER TO L/ T OF DMC OR DMR MESSAGES

C2CLxBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P11

16=JUN-81

14:38

233{)

007454

00000C

BEND :

007456
007460
007462
007464
007466
007470

000000
000000
000000
000000
000000
000000

BDATA:
LOGUNT:
PCADD:
DCLFLG:
RESFLG:
MODTYP:

4985
4986

49587

4988
4989
4990
4991
4992
4993

4994

.WORD

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

;POINTER TO BASE TABLE
;LOC. TO HOLD LOGICAL UNIT NUMBER
;LOC. HOLD PC OF CALLIN ROUTINE
;CLEANUP AND EXIT FLAG. 1=DO CLEANUP ROUTINEREXIT
;LOC TO HOLD FLAG (=1) THAT A RESTART WAS GIVEN
;OCLT MODE OF OPERATION TYPE

i
3=ACTIVE-LOOPBK, 4=DOWN L.L., S=TALK, 6=LISTEN)
IMAINTENANCE LOOP TYPE (0=NONE, T=INTERNAL TTL,

MLTYP:

.WORD

4999
5000

007474
007476

000000
000002

FHDOPLX:
PARAM:

.WORD
_WORD

0
¢

5008
28?8

007500
007502

000000
000000

KPASS:
FLAG:

.WORD
.WORD

0
0

5012
5013
5014
5015
5016
5017
gg}g

007504
007506
007510
007512
007514
007516
007520

040572
040624
0460664
040720
042050
042670
043110

5020
5021
5022
5023
5024

007522
007524
007526

000000
000000
000000

5028
5029

007534
007536

5032

007542

5025
gggg

'%'8%(1)

5033
5034

007530
007532

007540

007544
007546

;LAST LOCATION IN BASE TABLE TO BE PRINTED

O
0
O
O
0
O

000000

5011

PAGE 13-20

:MORE INDEPENDENT CODE STORAGE LOCATIONS

007472

5001
5002
5003
5004
5005
5006
5007

14:39

MESSAGE BUFFERS AND POINTER TABLES

4995
4996

4997
4998

S
E
16-JUN-81

MACY11 30A(1052)

;MODE DISPATCH TABLE

(OQ=REC-ONLY, 1=TX-ONLY, 2= PASSIVE-LOOPBK

:
:

2=CABLE, 3=MODEM-ANALOG LOOPBK (LOCAL),
4=MODEM-DIGITAL LOOPBK (REMOTE), 5=MOP)

:
:
.
:
;
;
;

BITO=
BIT1=
BIT2=
BIT3=
BIT4=
BITS5=
BIT6=

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

STATUS MSGS TO OPR PRINTED (1=YES)
DATA CHECKING DONE ON RCVD MSGS (1=YES)
ECHO (TRANSMIT) RCV'D MSG.(PASSIVE) (1=YES)
SPARE
CRC CALC./CHECK DONE (1=YES)
PROTOCOL EMULATION (1=YES)
SPARE

;PASS NUMBER FROM RUN COMMAND
sL"VICE FLAG WORD

.WORD
.WORD
.WORD
JWORD
.WORD
.WORD
.WORD

RXONLY
TXONLY
PLCK
AL(CK
DLL
TALCK
LISCK

.SBTTL
CLKCSR:
CLKBR:
CLKVEC:

.WORD
.WORD
.WORD

CLOCK TABLES, EVENT LOG AND POINTERS
0
:CLOCK CSR ADDRESS
0
:CLOCK INTERRUPT LEVEL
O
;CLOCK INTERRUPT VECTOR

60.
O

;CLOCK'S HERTZ RATE
;CLOCK'S CSR VALUE TO INTRPT. ENABLE IT

000000
000000

TIMMIN:
TIMSEC:

.WORD
.WORD

O
O

;PLACE TO KEEP TIME-SINCE-START

sPLACE TO KEEP # OF

000000

TIMER1:

.WORD

;EVENT TIMER #1

000074
000000

000000

000000
000000

MODE :

;

CLKHZ:
CLKEN:

TIMTCK:

TIMERZ2:
TIMERS:

.WORD
.WORD

.WORD

.WORD
.WORD

0
O

;RX ONLY DISPAT(CH
;TX ONLY DISPATCH
sPASSIVE LOOP BACK DISP
sACTIVE LOOP BACK DISP
;DOWN LINE LOAD DISP
;TALK MODE DISPATCH
;LISTEN MODE DISPATCH

TICKS/SEC

(TICKS)

JEVENT TIMER #2 (TICKS)
;EVENT TIMER #3 (SECONDS)

SEQ 0056

C2CLkBO DMR,DMC-11 DATA COMM. LINK TEST
C2CLkB.P1
16~JUN-81 14:38
5037
5038
5039
282(1)

007550

007552
010454

007552

000341
000001

g&%

‘égzg

000000

282(7;

010460
010462
010464
010466
010470

000004
000010
000001
000040
000200

5054

010474

001000

2822

010472

010476

010476
010500
010502
010504
010506
010510
010512

017240
017244
017250
017254
017260
017264
017270

MOBITS:

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

MCDEM DATA SECTION

.WORD

;MODEM STATUS

OF MODEM SIGNAL BIT DEFINITIONS

.WORD
.WORD
.WORD
.WORD
.WORD

(TS
DSR
DCD
RTS
RIJ

;CLEAR TO SEND (CIRCUIT (B)
;DATA SET READY (CIRCUIT CC)
;DATA CARRIER DETECT (CIRCUIT CF)
JREQUEST TO SEND (CIRCUIT CA)
JRING INDICATOR (CIRCUIT CE)

.WORD

sMODEM IN TEST MODE

.WORD

MOBITE:

225.
1.

SQD

sSIGNAL QUALITY DETECT (CIRCUIT CG)

(RS 449 ONLY CIRCUIT TM)

MOMSGS:

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

EVMCTS
EVMDSR
EVMDCD
EVMRTS
EVMRI
EVMSQD
EVMTM

;CLEAR TO SEND (CIRCUIT (B)
;DATA SET READY (CIRCUIT CC)
;DATA CARRIER DETECT (CIRCUIT CF)
JREQUEST TO SEND (CIRCUIT CA)
JRING INDICATOR (CIRCUIT CE)
sSIGNAL QUALITY DETECT (CIRCUIT (CG)
;MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM)

; TABLE OF ADDRESSES OF EVENT DESCRIPTION MESSAGES
H
ORDER CORRESPONDS TO MESSAGE TYPE VALUES
010514
010516
010520
010522
010524
010526
010530
010532
010534
010536
010540

015625
015651
015700
015725
015753
016020
015770
014635
016046
016103
016136

5082

5083
5084
5085
5086
5087
5088
5089
5090
5091
5092

.BLKW
.BLKW

;TABLE OF ADDRESSES OF MODEM SIGNAL MESSAGE POSITIONS

5067
gggg
5070
5071
5072
5073
5074
5075
5076
5077
5078
5079
283(1)

MODS :

040000

%8%
5059
5060
5061
5062
5063
5064
gggg

EVILOG:
EVTEND:

;TABLE

5048
5049
5050
5051
5052

5053

;EVENT LOG TABLE AND ITS NEXT ENTRY POINTER
EVIPTR: .WORD
EVTLOG
;POINTER TO NEXT FREE SPACE IN EVENT LOG

.SBTTL

010456

MACY11 30A(1052)
16~JUN-81
14:39 PAGE 13-21
CLOCK TABLES, EVENT LOG AND POINTERS

EVTILST:

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

EDTXQ
EDTXC
EDRXQ
EDRXC
EDDER
EDDVI
EDDCK
LPO
EDDLE
EDDDE
EDEOP

;TRANSMIT MESSAGE QUEUED
;TRANSMIT OF MESSAGE COMPLETE
;RECEIVE MESSAGE SPACE QUEUED
;MESSAGE RECEIVED - RECEIVE COMPLETE
;DEVICE INFORMATION
;DEVICE INITIALIZE STARTED
;DATA COMPARISON DONE
sNULL STRING
;DATA COMPARE LENGTH ERROR
;DATA COMPARE DATA ERROR
;END OF PASS

;. ;FOLLOWING TABLE USED IN DOWNL INE LOAD ROUTINE.

010542
010544
010546
010550
010552
010554
010556
010560
010562

020217
020222
020225
020230
020233
020236
020242
020246
020251

;... CONTAINS POINTERS TO ASCIZ DEVICE DESCRIPTIONS
DLLIND: .WORD
DPM
.WORD
DUM
.WORD
DLM
.WORD
DQM
.WORD
DAM
.WORD
DUPM
.WORD
DM(M
.WORD
DNM
.WORD
DLVM

SEQ 0057

C2CLkBO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKkB. P11
16-JUN-81 14:38

'~<>Qfi§~v0nn:wxnwacatux~q0nntwunhacfizaru55nih»

h
kb

D e and d

QOO0

000000

SEQ 0058

KDZM
KLM
DMVM

: TEMPORARY LOCS TO KEEP EVENT

JREPORT

CODING DISPATCH TABLE

RPTDSP:

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

D e

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

PAGE 13-22

KDPM

EVTSEC:
EVTMIN:
EVTTCK:
EVTADD:
EVIB(CT:
EVITMP:

b cd e e

A i a

14:39

. WORD
. WORD

. WORD
.WORD
.WORD

031226

RPTTXQ
RPTTXQ
RPTTXQ
RPTTXQ
RPTDER
RPTDVI
RPTDCK
RPT
RPTDLE
RPTDDE
RPTEOP

:TEMP.

;

LOC.
‘e

TIME WHILE REPORTING

TO HOLD ADDRESS DURING EVENT REPORTING

BYTE COUNT
OTHER

DATA

;TRANSMIT QUEUED ENTRY DECODING
;TRANSMIT COMPLETE ENTRY DECODING
RECEIVER QUEUED ENTRY DECODING
;RECEIVER COMPLETE ENTRY DECODING
;DEVICE ERROR ENTRY DECODING
;DEVICE INIT ENTRY DECODING
;DATA COMPARISON ENTRY DECODING
;PLACE HOLDER
;DATA COMPARISON LENGH ERROR
;DATA COMPARISON DATA ERROR
;END OF PASS

000000
000000
000000
000000

DEV1:
DEVZ:

DEV3:
DEV4:

.WORD
.WORD
.WORD

QOO0

— e

d e e

DMPM
DTEM
DVM
DZM
UNKM

G S
16=JUN-81

;LOCATIONS USED DURING EVENT REPORTING

d =D d

AINININININININ)
=
b ad B2 = 0 2 2 2

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

MODEM DATA SECT ION

02025%
020261
020265
020270
020273
020303
020307
020313
020316

QOO0

o ana wi

5102

010564

30A(1052 )

QOOOOO

5093
5094
5095
5096
5097
5098
5099
5100
510

MACY11

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

NNW

WA= OVoo~N

1 ACTION

ONLY I 'MISS'' ARGUMENT DEF INED

' NEXT NODE DISPLMNT

ONLY IF "‘ASCII'* ARGUMENT DEF INED

ONLY IF "'ASCII'' ARGUMENT DEF INED

Vi
e N " BB

N10S:

D md

D
b

T TN

b d

NG4S:
N4SS:

b od —d ad

N AT T

(.EVEN)

;FIRST KEYWORD

BLRRRATLBIFINTNANIIGEIERRARZEEEIFA
RIS =00

CLITRE:

NGGS:

b d

N4OS:
N20$:

b d
d

N25$:

N30$:

cLI

CLISPA,0.N10$

:SKIP ANY LEADIN SPACES

CLISTR,NOT.wUF ,N40S, <'DUMP'>

“ELSE, IS FIRST WORD A 'DUMP'’

CLI
cLl
(LI
Ll
(LI
cLl
CLI
cLl
(LI
cLl

< 2>, HLP.N42S
CLIEXI.O
CLISTR.HLP,N43$,<'HELP'>
CLIEXI.O
CLISTR.PRNT NG4S, <'PRINT'>
CLIEXI.O
CLISTR.EXIT,NGSS,<'EXIT'>
CLIEXI.O
CLISTR.RUN,N46S,<'RUN'>
CLIBR,0,N80S

Ll
CLI
cLl
(LI

CLIBR,D,N508
CLISTR, CLEAR.N20S,<'CLEAR'>
CLIBR,NOTNUF .N100$
<'S>,NOTNUF ,N30$

CLI

CLIERR,O

(LI

cLl
cLl
CLI
cLl

CLISTR, SHOW.N25$, <" HOW' >
CLIBR,0,N1008
CLISTR,O,N308,<'ET*>
CLIBR.0,N110$

1S THE FIRST NON=SP CHAR A '*?*'
"TIF YES DO "HLP'AND EXIT
“ELSE, IS FIRST WORD A ‘MELP''
* T IFYES DO "HLPTM AND EXIT
“ELSE. IS FIRST WORD A 'PRINT''
Y
IFTYES DO TPRINT'' AND EXIT
TELSE,IS FIRST WORD AN 'EXIT'*:REV B BY
"
IF YES DO "EXIT'' AND EXIT
“ELSE. IS FIRST WORD A 'RUN''
Y
IFTYES DO "RUN' € GOTO N8OS
*
IFYES
“ELSE. IS
P
IFYES
"ELSE, IS

"
*
*
:

GOTO N8OS
FIRST WORD A 'CLEAR'’
DO 'CLRTM € GOTO N100S
FIRST CHAR. A °S''

IFYES IS REST OF WORD 'HOW''
" IF YES. DO ''SHOW''.BR N100S
ELSE. IS'REST OF WORD "ET'’
IF YES, DO ‘SET'', BR N110$

SOTHERWISE

“ILL CMD"* = EXIT

;SECOND KEYWORD (MODE=) FOR RUN COMMAND
~N
\fl‘\N—‘\JV\h\hWN—'g
o 'S
ONOO

b
b

NN
=
b et e ad =2 OO

b ek =D

d ek
b

b
b wd

b
b

e
b
b

—d

(olelelolelelolelelelelelole)

b ad

b
d d

(ALWAYS AT LEAST 1 WORD)

! CHAR CODE !

1 . ASCIZ MATCH STRING

A VTN VTNA T AN WA WA

o omd

b e
b
b
ok

SEQ 0059

PAGE 13-23

MISS DISPLACEMENT

‘1
*

14:39

COMMAND LINE ACTION TREE

;SAMPLE CL] TREE NODE

~ VNS

NN N NN NN ANV NN
AV VNN
b
b D
b b ed ed d b o e
d D e
D d b md by

eV S

.SBTTL

NG3S:

b od ok e

16-JUN-81

COMMAND LINE ACTION TREE

N42S:

MACY11 30A(1052)

C2CLkBO DMR,DMC~11 DATA COMM. LINK TEST
CZCLkB.P1N
16-JUN-81 14:38

N80S:

N81S:

N82S:
N83S:

NB4S:
N8SS:

N86S:

(LI

CLISPA,0,N30$

;SKIP LEADING SPS,

CLIBR,0,N115$

(LI
cLl
cLl

CLISTR.NOTNUF ,N30$, < 'MODE ' >
<'=>.0.N30$
CLISTR.ATVMOD .N8B2S.<'ACTIVE'>

(LI
cLl
(LI

CLISTR,PASMOD ,N83$.<'PASSIVE'>
CLIBR,0,N115$
CLISTR,RECMOD
N84S, <'RECEIVE'>

(L1

cLl
(LI
Ctl

(LI

cLl

(LI

IF NONE-ERR

*1S NEXT WORD ‘MODE='’
"TIF NO, IT'S WRONG ~ERR =EXIT
1S NEXT WORD “‘ACTIVE''

TIF_YES, DO “ACTIVE'',BR N115%

IS NEXT WORD ‘PASSIVE"
:
"IF_YES, DO 'PASSVE'',BR N1158
+IS NEXT WORD 'RECEIVE”

cLIBR,0,N115$
CLISTR,LISMOD.N85S,<'LISTEN'>
cLIBR,0,N11S$

*"TIF YES, DO ‘RECVE'',BR N115%
-1S NEXT WORD ‘LISTEN"
: "IF YES, DO 'LISTEN'',BR N115%

CLIBR,0.N115%

CLISTR,DLLMOD,N86S
, <’ DOWNL INELOAD ' >

<'1>,0,N308

;s NEXT WwORD

“DOw.
. ."*

IF YES, DO 'DWNLL''.BR Niis$

SIS NEXT CHAR A ‘T

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

MACY11

30A(1052)

5189
5190
5191
§192

cLl
CLI
(LI
Ll

CLISTR, TRAMOD,N87$,<'RANSMIT'>
CLIRR,0,N115$
CLISTR, TALMOD ,N308,< ALK ' >
CLIBR,0,N115$

CICLKB.P11 ~ 16-JUN-81

2}32’,’

011254
011272
011276
011310

14:38

16=JUN-81

COMMAND LINE ACTION TREE

N878:

14:39

PAGE 13-24

§195
5196
5197
5198
5199
5200
5201
5202
§203
5204
5205
5206
5207
5208
2593

011314
011320
011336
011340
011360

:SECOND KEYWORD (FOR CLEAR OR SHOW)
N100S:
CLI
CLISPA,0,N30$
N102S:
(LI
CLISTR.CSHEXP,N104S,<'EXPECT'>
Ll
CLIEXI.O
N104S:
CLI
CLISTR.CSHTRN,N30S,<'TRANSMIT'>
cLl
CLIEXI.O

011362
011366
011404
011410
011430

;SECOND KEYWORD (FOR SET)
N110S:
CLI
CLISPA,0,N30$
N1118:
CLI
CLISTR.SETEXP,N1128,<'EXPECT*>
Ll
CLIBR,0,N1208
N1128:
(LI
CLISTR, SETTRN,N30S,<' TRANSMIT'>
cLl
CLIBR,0,N1208

5211
5212
5213
5214
5215
5216
5217

011434
011440
011444
011450
011454
011460

:GET ADDRESSES FOR DUMP COMMAND
N50$:
CLI
CLIALP,0,N51$
N518:
CLI
CLISPA.0.N528
N528:
(LI
CLIOCT.DMPS,N30$
cLl
<*=>,NOTNUF .N125%
cLl
CLIOCT.DMPE .N30$
LI
<*/>,NOTNUF 'N125$

gggg

011470

5218

5221
5222
5223
5224
5225
5226
5227
5208
5234
5235

011464

011474
011500
011504
011516
011522
011536

gggg

cLl
cLl

:N1138:

CLI

CLISTR,CRC,N30$.<'RC16°>

CLIBR.O,N1158

N1178:

CLI

CLISTR,STATUS,.N1188,<*STATUS'>

5240

011564

N1188:

(LI

CLISTR,ECHO,N1308,<'ECHO">

5242
5255
5256
5257

011604
011620

N130$:

011624
011640

N1318:

CLI
Ll

CLISTR,0,N131$,<'PASS'>
CLIBR,0,N1508

5261

011644

N1328:

(LI

CLISTR,MOSC,N30$,<"MODEM*>

5258
5259

011600

:SKIP LEADING SPACES, NONE=ERR
-IS NEXT WORD 'EXPE..."
*"1F YES, DO CLR-EXP.EXIT
1S NEXT WORD '‘TRANS..''
2 IF YES, DO CLR-TRN.EXIT
“IF NO - ERROR - EXIT

CLIBR.0,N1258

011542

52641

; IF NO, ERROR - EXIT

;QUALIFIERS FOR THE RUN COMMAND
N1158:
CLI
CLIALP,O,N114$
N1148:
CLI
<'7>,NOTNUF ,N1258
Ll
CLISTR.NO.N1168.<'NO">
N1i6$:
CLI
<*'C>,0.N1178
Ll
CLISTR.CHECK,N1178,<'HECK'>
LI
CLIBR,0,N1158

011560

IS REST OF WORD ‘RANSMIT'’
1F YES, DO '‘TRANSM'*,BR N115$
IS REST OF WORD '‘ALK”
"IF YES, DO "'TALK''.BR N115%

<'B>.DMPQ,N30S

5238

5239

:
:
*
*

cLI

(LI
LI

CLIBR,O.N1158

CLIBR,0,N115S

CLISTR,0,N1328,<'LOOP'>
CLIBR,0.N140S
;MODEM A(TION

SEQ 0060

—
—

011660

g\h‘“‘.flf\)a?\‘
OO
SO

b
D
D
d
b e
e

NNNNNN VYO

011664
purQunrGaurGuerGuur
G Gour GuurGuurd

5262
5263
5264
5265
5266
5267
5268
5269
5270
5271
5272
5273
5274
5275
5276
5277
5278
5279
528C

012006

MACY11 30A(1052)
16-JUN-81
COMMAND LINE ACTION TREE

CZCLKBO DMR,DMC-11 DATA COMM. LINK T1EST
16-JUN~-81 14:38
(Z{LkB P11

[elolelololelelols)

cL!

14:39

PAGE 13-25

SEQ 0061

:;ADDED B8Y EC

CLIBR,0,N115%

sGET MESSAGE TYPE FOR SET MESSAGE COMMANDS
CL!
<'=>,0,N30%

N120$:

LOOK FOR DEFAULT MESSAGE NAME
:
CLISTR,CMSG1 N61S,<'ONCS'>
N60S ::
cLl
N51S:
NO2S:

N63$:
NG4S :
N65S:

N66S :
N67S:

CLI
CL!
cL!
CL!I
cL!

cLl

CLI
CLI
cL!
cL!
cL!

CLI

cL!
cL!
CLI

cLIBR,0,N121$

CLISTR,CMSGO N62%,<'ZEROES'>

CLIBR,0.N121$

CLISTR,CMSG2 N63S,<"1ALT'>

0, N121$
cLIBR,

0ALT'>
,N64S
CLISTR,CMSG3<
CLIBR,0,N1218
,N658 ,<'ITEP'>
CLISTR,CMSGS

CLIBR,0.N121$

< CCITT'>
,CMSG4
,N66S,
CLISTR
CLIBR,0,N121$
>
G6
,N67S , < ALPHA'
CLISTR,CMS
CLIBR,0,N121%
CLISTR,SETET ,N68S,<'TRANSMIT'>
CLIBR,0,N125%

JREV B BY EC
JREV B BY EC

LOOK FOR QUOTED MESSAGE

012076
012102
012106
012112
012116
012122
012126

:
N68S
N70S:

012130
012134
012140
012154
012160
012174

N1218%:
N1238:

N71$:

N72%:

N73S$:

CL!
cLl
cLI

CLI

cL!
cLl

cLl

<''*>,0PRMSG,N30$

<''S.ENDQO,N71$

CLIBR,0,N121$
CLISPA,Q.N728
CLIALN.O.N73$

JONLY A-Z,SP,TAB,

CLIERR,BADCHR

JPRINT ERROR

CLIBR,0,N70S

IF NONE LEGAL

;GET QUALIFIERS (SIZE OR COPY) FOR SET MESSAGE COMMANDS
CLI
CLIALP,0,N123S

N122%:

CLI
cLI
cL!
(LI
cLI

<'/>,NOTNUF ,N125%

CLISTR,SIZE ,N122%,<'SIZE'>
CLIBR,0,N126$
CLISTR,QCOPY ,N308,<'COPY'>
CLIBR,0,N126$

012200
012c04
012210

;NUMER FOR SI1ZE OR COPY
N126$:
CLI
<'=>,0,N308
cLl
CLIDEC.NUM,N30$
CL!
CLIBR,0,N1218

012214

N140%:

;GET MAINTENANCE LOOP TYPE FOR RUN 'L00P'' QUIALIFIER
(LI
<'=>,0,N308

N1418:
N142%:

N143%:
N144S:

CLI
cLI
(LI
CL!
CLI
CLl
CLI

CLISTR,TTLLOP ,N142%,<'INTERNALTTL'>
CLIBR,0,N115$
CLISTR,CBLLOP,N143$,<'CABLE'>

CLIBR,0.N115%

CLISTR,LMDLOP ,N144S$,<'LOCALMODEM'>

CLIBR,0.N115%

>
P
EM'
MDLO
,N30$, <'REMOTEMOD
CLISTR,R

OR 0-9 BETWEEN 'S
CHAR FOR '"'S

K
5
MACY11 30A(1052)
16=JUN-81
COMMAND LINE ACTION TREE

C2CLKBO DMR,DMC~11 DATA COMM. LINK TEST
16~JUN-81 14:38
CZCLkB.PI
5326
5327
5328
5329
5330
5331
5332
5333
5334
5335
5336
5337

CL!

012336

14:39

CLIBR,0,N115$

:GET LINE NUMBER FOR 'PASS’' RUN QUALIFIER

012342
012346
012352

N1508:

012356

N125%:

CLI
Ll

cLl
INE
=LOF
s END(LI

<'=>,0,N308
CLIDEC .PASC ,N30$

CLIBR.O,N115s

CLIEXI,O

PAGE 13-26

SEQ 0062

L 5
MACY11 30A(1052)
16=JUN-81
COMMAND LINE ACTION TREE

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
CZCLkB.P11
16~JUN-81 14:38
5349
5350
5351

5354
5355
5356
5357
5358
5359
5360
5361
5362
5363
5364
5365

012360
012360
012362
012364
012364
012366
012370
012370
012372

5368

012400

5372

5373
5374
5387
5397
5398

PAGE 13-27

;DEVICE DEPENDENT STORAGE LOCATIONS FOR

g%g%

5369
5370
5371

14:39

012374
012374
012376

012402
012404
012406

000000
000000
000000
000000
000000
000000
000000
000000
000000

000000
000000
000000

CURRENT DEVICE PARAMTERS

SELO:
BSELO:
BSEL1:
SELZ:
BSELZ2:
BSEL3:
SELG:
BSEL4:
BSELS:
SEL6:
BSEL6:
BSEL7:
INVEC:

OUTVEC:
INTPRI:
OPTYP:

.WORD
.WORD

O
O

.WORD
.WORD

O
O

.WORD
.WORD

0
O

.WORD
.WORD

0
O

.WORD

.WORD
WORD
.WORD

ERRTBL

0
O
O

;ADDRESSES OF REGISTERS SELO THRU BSEL7

s INPUT INTERRUPT VECTOR ADDRESS

sOUTPUT INTERRUPT VECTOR ADDRESS
s INTERRUPT PRIORITY
;DEVICE OPTION TYPE(0=DMC,5=DMR-DMC MODE
:7=DMR)
.

SEQ 0063

MACY11 30A(1052)
C2CLKBO OMR,DMC-11 DATA COMM. LINK TEST
16-JUN-81 14:38
CZCLkB.P1
GLOBAL TEXT SECTION
5400

5601
56402
54603
5404
S405
5406
5407
5408
5409
5410
56411
5412
(4)

(3)
(3
(2)
5413
5419
5428
5429
5430
5431
5432
(4)

(3)
(3
(3)
(3
(3
(3)
(3
(2)
5433
5434
5441
5442
5443

.SBTTL

m S
16-JUN-81

14:39

PAGE 13-28

SEQ 0064

GLOBAL TEXT SECTION

; THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,
; MESSAGES, AND ASCI] INFORMATION THAT ARE USED IN
; MORE THAN ONE TEST.
.SBTTL

DEVICE SUPPORTED

' NAMES OF DEVICES SUPPORTED BY PROGRAM
012410
012410
012410
012416

DEVIYP

046504
026503
012424

026122
030461

<DMR,DMC-11>

046504
000

LSDVTYP::

ASCIZ

/DMR,DMC=11/

.EVEN

.SBTTL

PROGRAM IDENTIF ICATION

:TEST DESCRIPTION

012424
012424
012424
012432
012440
012446
012454
012462
012470

DESCRIPT

055103

042524

012476

046103
046504
041515
040504
046517
047111
052123

".ASCIZ

041113

026122
030455

040524
027115
020113
000

_EVEN

.EVEN

/CZCLKBO DMR, DM

C2CLxBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

16~-JUN-81 14:38

.SBTTL

5474

013721

5475

5476

5477
5678
5479
5680
5481
5682
9483
5484
5485
5486
5487
5488
5489
5490
5491
5492
5493
5494
5495
5496
5497
5498
5499
5500
5501
5502
5503

012565
012607
012627
012671
012734
013001
013032
013122
013147
013225
013232
013245
013321
013331
013340
013362
073447
013474
013553
013631
013770

014020

014057
014102
014135
014166
014220
014257
014316
014370
014430
014464
014473
014500
014505
014512
014520
014525
014533
014544
014554
014565
014575
014604
014621
014626
014635
014636
014645

041504
050122
047045
047045

045
045
045
045
047045
045
047045
040523
045
045
061506
040
040
040
042040
051440
040
020040
040
040

052114
037124
040445
040445
022516
022516
022516
022516
040445
022516
0460445
052124
022516
022516
052114
046103
051120
054105
046525
052105
042523
052040
020040
052522

000076
000040
0644477
044477
037501
037501
037501
037501
044477
037501
052077
046105
052101
000124
0461440
040505
047111
052111
020120
042440
020126
050131
020040
020116

CLINBG:
.ASCIZ
CLIBRX:
.ASCIZ
CLIBDL: .ASCIZ
CLINPS: .ASCIZ
CLIBCR: .ASCIZ
CLISEO: .ASCIZ
CLIPW:
(ASCIZ
DLLQ1:
.ASCIZ
HLPO
ASCIZ
HLPF:
_ASCIZ
HLP1:
.ASCIZ
HLP2:
.ASCII
LASCI1
ASCII
ASCIZ
HLP3
LASCIZ
HLP3A:
_ASCIZ
HLP4:
.ASCIZ
HLP4A:
,ASCIZ
HLPS
.ASCIZ

020040

046040

054524

ASCIZ

040

047045

106
047514
105
042510
040502
102
040502
047045
047045
042532
117
040461
060
041503
052111
101
117
042522
051126
120
101
047504
126
044514
000
046057
111

020040 052115
040445

046103
020107
044530
050114
042523
051501
042523
060445
040445
047522
042516
052114
046101
052111
050105
050114
051120
042503
047101
051501
052103
047127
046101
052123
047517
052116

054504

020126
020055
020126
026440
042457
027505
047457
040502
051515
051505
000123
000
000124
000124
040510
051440
053111
046523
044523
053111
044514
000113
047105
036520
051105

CLISPM:
CLISRP:
CLIERM:
CLINUF:

_ASCIZ
.AC-.?
._ASCIZ
_ASCIZ

HLP6:

.ASCI

RHLPQ:

.ASCIZ

RHLP1:
RHLP2:
RHLP3:
RHLP4:
RHLPS5:
RHLP6:
RHLP7:
RPTIV:
SHMSG:
SHTYPO:
SHTYP1:
SHTYP2:
SHTYP3:
SHTYP4:
SHTYPS:
SHTYP6:
SHTYP7:
MOO:
MO1:
MO2:
mO3:
MO4
MOS:
MO6:
LPO:
LPOO:
LP1:

.ASCIZ
.ASCIZ
_ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
_ASCIZ
_ASCIZ
.ASCIZ
.ASCIZ
_ASCIZ
._ASCIZ
_ASCIZ
_ASCIZ
_ASCIZ
.ASCIZ
_ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
ASCIZ
.ASCIZ
ASCIZ
ASCIZ
ASCIZ
.ASCIZ
ASCIZ

s N NN NI NN NI NI NI NI NI N P Ot Y

012476
012504
012512
012542

14:39

PAGE 13-29

SEQ 0065

INFO

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

5450
56451
56452
5453

N S
16=JUN-81

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII

NN N N N N N N N N N N N N N NN N N N N N N N INE NI N N N 00 N N NI NI NI N 6

gzzg

5454
5455
56456
5457
56458
5459
5460
5661
5662
5463
56464
5465
56466
5467
56468
5669
56470
5671
5472
5473

MACY11 30A(1052)

/DCLT>/
/RPI> /
;REV B BY EC
/INXA?ILL CMD-BAD SYNTX?/
/INXA?INCMPLTE CMO?/
/INIA?NUM TOO BIG?/
/INXA?BAD RADIX?/
/INIA?'1LOOP'’ VALID ONLY IN ACTIVE?/
/INXAY'ECHO'' VALID ONLY IN PASSIVE?/
/INXA?ILL CHR= '‘A=7,0-9,SP,
TAE"' ONLY?/
/INXIA?''SIZE=0'' NOT VALID?/
/XINIA?TRANSMIT & EXPECT LIST MUST BE IDENTICAL FOR LOOP?/ ;REV B BY EC
/SATTELITE PASSWORD= /
;REV B BY EC
/INXATHIS I5 DCLT. TYPE 'H'' OR ‘7' FOR DETAILS/
/INXT/
/DCLT CMDS:/
/ CLEAR OR SHOW EXPECTLIST OR TRANSMITLIST/<15><12>
7/ PRINT/<15><12>
/7 EXIT/<15><12>
;REV B BY EC
? DUMP _START-END/B?
2 SET EXPECTMSG OR TRANSMITMSG=TYPE/SIZE=N OR /(COPY=N?
/ SET EXPECT=TRANSMIT/
REV B BY EC
?
TYPE=ONES,ZEROES,1ALT,OALT,
ITEP,CCITT ALPHA?
/
OR 'OPR SP(D=A-2,SP,TAB,0-9 IN QUOTES'/
? RUN MODE=MTYP/LOOP=LTYP/CHECK,6STATUS ECHO,MODEM,PASS=N?
/
/_

MIYP=TRAN_REC,ACT ,PAS,TAL,LIS,DOWN/<15><12>
LTYP=INT,CAB,LOC, REM/

/INIATYPE ‘WTM
OR "' FOR HELP !/

;REV B BY EC

/DCLT REPORT CMDS :/
SREV B BY EC
/LOG - PRINT DCLT EVENT LOG/
;REV B BY
/EXIT = EXIT REPORT LEVEL/
;REV B BY EC
/HELP - PRINT THIS MESSAGE/
;REV B BY EC
!BASE/ERROR = PRINT ONLY ERRORS!
;REV B BY
!BASE/FULL = PRINT ENTIRE TABLE!
;REV B BY
!BASE/OFFSET=NNN - PRINT SINGLE LOCATION'!<15><12>
/XINXABASE OFFSET=X03XA TOO BIG !/
;REV B BY
?2INYIAMSG: TYPE=XTXA/SIZE=%D3?
/ZEROES/
/ONES/
/1ALT/
/OALT/
/CCITT/
/ITEP/
/ALPHA/
/OPR SPEC/
/RECEIVE/
/TRANSMIT/
/PASSIVE/
/ACTIVE/
/DOWNL INELOAD/
/TALK/
/LISTEN/
//
?/L00P=?
?INTERNAL?

EC
EC
;REV B BY EC
EC

8 6
16-JUN-81
14:39 PAGE 13-30
MACY1? 30A(1052)
GLOBAL TOMMAT STATEMENTS, MESSAGES, AND ASCII INFO

CZCLxBO DMR,DMC-11 DATA COMM, LINK TEST
CZCLKE.P11
16-JUN-81 14:38

5504
5505
5506
£507
5508
5509
5510
5511
gg}%

014656
0146664
014677
014713
014715
014724
014726
0147346
014736

040503
047514
122
116
123
047516
044103
047516
0641505

04610%
0640503
046505
117
060524

000105
046514
052117

0641505

000113

047510

000

5524
5525
5526
5527
5528

014743
014745
014753
014764
014771

116
115
045
046126
126

117
042117
022516
037113
044510

046505
046101
000
020123

7529
5530
5531

015030

052524

5532
5533

LP2:
LP3:
LPé4:
PNST
PST:
PNCK
PCK:
PNEC
PEC:

.ASCIZ
.ASCIZ
LASCIZ
.ASCI1
.ASCIZ
LASCI!
LASCIZ

PNMS:
PMS:
LISP:
OPRMM:
L5060:

LASCII
.ASCIZ
.ASCIZ

LASCII
ASCIZ

LASCI2
LASCI2
.EVEN

2LABLE?
LOCALMODEM?

'REMOTEMODEM?
/NQ/
/STATUS/
/NO/
/CHECK/
/NO/
/ECHO/
/NO/
/MODEM/
/XNXALIS>/
/TLK>/
/THIS A 50.

;ADDED BY E C
;ADDED BY E C

OR 60.

HZ.

LSI-11:/

:
; FORMAT STATEMENTS USED IN PRINT CALLS
;

5534

5535
5536
5537
5538
5539
5540
5541
5542

015030
015102
015163
015223
015241
015272

047045
047045
115
102
045
047045

0640445
0640445
054101
063125
022516
0640445

047504
0640502
020056
0642506
022524
044103

DLLCM:
NOCLK:
TABEX:
BUFEX:
MSGTRN:
MSGTRU:

LASCIZ
LASCIZ
LASCIZ

/XNXADOWN LINE LOAD COMPLETED SUCCESSFULLY/
/XNXABAD CLOCK - PROGRAM WILL HANG ON '‘TIMEOUT''!!/

SHFO:

/XNXTXA MSG. NOT BUILT !!/
/XNXACHAR. COUNT EXCEEDS BUFF LIMIT - MSG TRUNCATED/

5544
5550
ggg}

LASCI2Z
LASCIZ
LASCIZ

015413

045

022516

(32523

SHF1:

LASCIZ

?ANXSS5XSSXSSXA/XTXA/XTXA/XTXA/RT?

5553
5554
gggg

015453
015516
015550

04S
047045
051445

032523
051445
022465

040445
022463
041501

EFM2:
PCPM:
EFMIT:

LASCIZ
LASCIZ
LASCIZ

/XSSXATOTAL MISMATCHES IN MSG = XDS/

5543

5557
5558
5559
5560
5561

5562
5563
5564
5565
5566
5567
5568
5569
gg;g
5572

5573

015355

045

022516

032523

LASCIZ

/MAX, CHAR. MSG COUNT EXCEEDED -/
/BUFFER FULL =/

?XNXSSXAMODE=XTXTXTXA/PASS=X15?

/XNYS3XACALLED FROM PC=X06/

/XSSTACOMPARE COUNT=XDSXS3XARECEIVE COUNT=XDS5/

cEVENT DESCRIPTION MESSAGES
015625

015651
015700
015725
015753
015770
016020
016046
016103
016136
016152

126

126
042522
122
106
0640504
042504
040504
104
047105
041101

0640522

0640522
042503
041505
053105
040524
044526
040524
052101
020104
047516

051516

051516
053111
044505
041511
0641440
042503
041440
020101
043117
046522

EDTXQ:

EDTXC:
EDRXQ:
EDRXC:
EDDER:
EDDCK:
EDDVI:
EDDLE:
EDDDE:
EDEOP:
EDMOS:
282223232

LASCIZ
LASCIZ
LASCIZ
LASCIZ
ASCIZ
ASCI2
LASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCIZ

/TRANSMIT MSG QUEUED/
/TRANSMIT MSG COMPLETED/
/RECEIVE SPACE QUEUED/
/RECEIVE MSG COMPLETED/
/DEVICE ERROR/
/DATA COMPARISON STARTED/
/DEVICE INIT AND SETUP/
/DATA COMPARISON LENGTH ERROR/
/DATA COMPARISON DATA ERROR/
/END OF PASS/
/ABNORMAL MODEM STATUS CHANGE/

sADDED B8Y EC

2 2222222222223
2222223332222 2323232211337332}1]}

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

SEQ 0066

CZCLKBO DMR,DM(C-11 DATA COMM. LINK TEST

CZCLKB.P11

16-JUN-81

14:38

MACY11 30A(1052)

16-JUN-81

14:39

PAGE 13-31

SEQ 0067

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

5575
22;9

016207

040

061040

051501

;EVENT REPORTING MESSAGES
BASMIA: ,ASCIZ / BASE TABLE/

5578
5579
5580

016224
016233
016242

051445
045
047045

022463
031523
0476445

031517
047445
000066

BASM3:
BASM2:
BASM1:

.ASCIZ
.ASCIZ
.ASCIZ

/XS3%03/
/XS3X06/
/XNX06/

5585
5586
5587
SS88
5589
5590
5591
5592
5593
5594
5595

016250
016310
016403
016432
016504
016516
016533
016555
016657
016755
017034

047045
064704S
045
047045
047045
051445
045
045
045
045
051445

0640445
064044S
022516
051445
051445
022463
031523
022516
022516
022516
022465

044126
037076
032504
022463
(22463
033117
047445
031523
031523
031523
041107

NULEVT:
EVTIFQ:
EVTIF1:
EVTIF2:
EVTF3:
EVIF3C:
EVTIF3ID:
EVTF4:
EVIFGA:
EVTF4B:
EVTIFSA:

.ASCIZ
.ASCIZ
_ASCIZ
.ASCIZ
_ASCIZ
.ASCIZ
.ASCIZ
_ASCIZ
_ASCIZ
.ASCIZ
_ASCIZ

?XNXATHE DCLT EVENT LOG IS EMPTY?
7?2INXA>D>>DCLT EVENT LOG ENTRY <<<CCCLCLLLLLLLLLLCLLLLLLLLLLLLL?
/INXDSXA:XZ2XA:X22%S3%X1/
/XINXSIXAADDR OF MSG=XO6XSTYXABYTE COUNT=XDS/
/INXS3XTXN/
/XS3X06XS3X06/
/XS3%06XS3%06XS3XT/
/INXS3IXAADDR OF MSG=X06XS3IXABYTE COUNT=XIDSXSIXANO. OF CMP ERRS=XDS/
/INXSIXAADDR OF MSG=XO6XSIXARX BYTES=XDSXSIXACOMPARE BYTES=XD5/
/INXS3XAPASS=XDSXS3IXAERRORS=XDSXS3IYANOBUFFS=XD5/
/XSSXABYTE # IN MSG.=XDSXSIXAEXPTD=X03XS3XARECYD=X03/

gggg

017120

047045

051445

022471

EVMOCG:

.ASCIZ

/XNXSOXACHANGED TO:/

5581
5582

2280

5596

5599
228?
5602
5603
5604
5605
5606
5607
5608
5609
5610
5611
5612
5613
5614

P
T
LT T T
Ty T
Ty Y Y Y Y T I
ey
;DO NOT SEPERATE THE NEXT LIST OF MESSAGES - MODEM SIGNAL HEADER AND REPORT
017143
017223
017240
017244
017250
017254
017260
017264
017270
017274

045
045
130
130
130
130
130
130
130
000
017276

022516
022516
040
040
040
040
040
040
040

034123
034523
040
040
040
040
040
040
040

EVMOHMD:
EVMOST:
EVMCTS:
EVMDSR:
EVMDCD:
EVMRTS:
EVMRI:
EVMSQD:
EVMTM:

.ASCIZ
.ASCII
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.EVEN

/XNXSBYAMODEM STATUS:
/XNXS9XS9XSSXA/
°'X,40,40,40
'X,40,40,40
°X,40,40,40
'X,40,40.40
'X,40,40,40
'X,40,40,40
6X.40.40.40

CTS DSR DCD RTS RI

SQD TTM/

MACY11 30A(1052)
CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
BASE TABLE ADDRESS
(ZCLkB.P11
16-JUN-81 14:38
.SBTTL

5617
5618

5619
5620
5621
5622
5623
5624
5625
5626
5627

16-JUN-81

14:39

PAGE 13-32

BASE TABLE ADDRESS

;THIS SECTION IS USED BY A M9301-YJ BOOT ROM FOR DOING DOWN~L INE-LOAD.
;MUST BE IN THE AREA OF '017370 + 256. BYTES'' + A FEW
sosasdttllt BEWARE !!!! DO NOT ALLOW THE ABOVE ASCIZ MESSAGES TO EXPAND INTO
bl THIS REGION.
oo ttirirririri

017370

017370
000400
020000

EVEN

BASE::

PLES

.=17370
.BLKB
256,
.=20000

BABNSs

wms

s
An

JBASE TABLE ADDRESS

SEQ 0068

6
E
16=JUN-81
14:39 PAGE 13-33
MACY11 30A(1052)
CZCLxBO DMR DM(C-11 DATA COMM. LINK TEST
16-JUN-81 14:38
ASCIZ MESSAGES CONTINUED AFTER BASE TABLE-REGION
CZCLkB.P1

.SBTTL

5629
5630
5631
5632
5633
5634
5635
5636
5637
5638
5639
5640
5641
5642

5643
5644
5645

5646
5647
5648
5649
5650
5651
5652

0201264

000
031523
022463
031523
022463
031523
022463
031523
022463
031523
022463

;EXECUTION STATU?z:ESSAGES TO BE PRINTED TO KEEP OPERATOR AWAKE

040445
052101
040445
042501
040445
044501
040445
041501
040445
046501

CR:

STXQ:
STXC:
SRXQ:
SDVE:
SCM:

SOVl:
SCML

SCMD:
SEOP:
SMSC:

LASCIZ

LASCIZ
LASCIZ
LASCIZ
ASCIZ
LASCI2

.ASCIZ

ASCI2Z

LASCIZ
LASCI2
.ASCI2

;REV B BY EC

020135
020217
020222

5653

5654
5655
5656
5657

5658
5659
5660
5661
5662
5663
5664
5665
5666
5667
5668

047045
045
051445
045
051445
045
051445
045
051445
045
051445

ASCIZ MESSAGES CONTINUED AFTER BASE TABLE REGION

022516
000120
000
000114
000
000101
000120
000103
000

053114
050115

020316

042526
000126
000
045516
050104
055104
000114
000126

051501

000
000
000
047516
000
000

/XS3IXATXQ/
/XS3XATXC/
/XS3XARXQ/
/XS3IXAERR/
/XS3XACMP/
/XS3XAINI/
/XS3XACML/
/XS3XACMD/
/XS3XAEQP/
/XS3XAMSC/

JJNEXT ASCIZ L INES ARE USED

SECRM:
DPM:
DUM:
DLM:
DQM:
DAM:
DUPM:
DMCM:
DNM:
DLVM:
DMPM:
DTEM:
DVM:
DZM:
UNKM :
KDPM:
KDZM:
KLM:
DMVM:

_ASCI2
LASCI2
LASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCI12
LASCIZ
LASCIZ
LASCIZ
LASCIZ
JASCIZ
LASCIZ
ASCIZ

sCR FOR LINES IN A ROW
:ABOUT TO TRANSMIT
:TX COMPLETED

sABOUT TO RECEIVE
+DEVICE ERROR
sABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD
;DEVICE ABOUT TO BE INITIALIZED
; COMPARE LENGTH ERROR
:COMPARE DATA ERROR
SEND OF PASS
ADDED BY EC
;MODEM STATUS CHANGE

IN SATELLITE ID MESSAGES
/XNXASE CONDARY BOOT REQ FROM XTXA DEVICE-TYPE= XD3/

/DP/
/DU/
/DL/
/DQ/
/DA/
/DUP/
/DMC/
/DN/
/DLV/
/DMP/
/DTE/
/DV/
/D2/
/UNKNOWN/
/KDP/
/KDZ2/
/KL/
/DMv/

SEQ 0069

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11
5670
567
5672
5673
5674
5675
5676
5677
5678
5679
5680
5681
5682
5683
5684
5685
5686
5687
5688
5689
5690
5691
3692
5693
5694
5695
5696
5697
5698
5699
5700
5701
5702
5703
5704
5705
5706
5707
5708
5709
5710
5711
5712
5713
5714
5715
5716
5717
5718
5719
5720
5721
5722
5723
5724
5725

16-JUN-81 14:38

MACY11 30A(1052)

021365
021410
021463
021513

021544
021627
021664
021721
021756
022042
022107
022154
022212
022245
022303
022351
022405
022441
022472
022540
022602
022630
022664
022711
022744
022766
023041
023114
023136
023170
023222
023272
023342

0647125
040502
060502
042502
116
040516
040516
0640516
116
116
122
122
116
116
040516
040516
040516
040516
116
130
103

101
040503
122
123
046530
30

046530
130
041522
041522
122
041522

047111
116
110
110
110
116

040514
052503
051126
051126
042522
122
040514
051120
111
041501
064124
044124
044126
044124
044124

042506
042523
042523
044507
045501
051513
051513
051513
045501
045501
050105
050105
045501
045501
051513
051513
051513
051513
045501
044515
046101

044506
052040
052040
047116
020123
051040
051040
051440
020123
020123
020123
020123
020123
020123
051040
051040
051440
051440
020123
020124
020114

054502
041115
054502
041115
054502
054502
041103
054502
047503
020117
043511
043511
043511
054105
052123
051122
047101
047101
042503
061505
062524
043517
052123
044524
042522
0462522
042522
062522
042522

0264124
052131
024124
052131
024124
024124
052131
024124
050115
042522
042510
042510
042510
020124
046440
047105
046523
046523
053111
044505
052123
040522
052122
062526
044123
044123
044123
064123
044123

052103
051122
041505
051124

020123
042511
0644505
040505

16-JUN-81

14:39

PAGE 13-34

ASCIZ MESSAGES CONTINUED AFTER BASE TABLE REGION
;REV B BY EC(

020322
020342
020402
020432
020467
020532
020566
020620
020663
020717
020751
021003
021035
021065
021114
021146
021176
021226
021255
021307
021333

.SBTTL
DMUNKN:
DMROOQ:
DMROQ1:
DMROO2:
DMROO3:
DMROO4:
DMROOS:
DMROO6:
DMR0O7:
DMRQO10:
DMRO11:
DMRO12:
DMRO13:
DMRO14:
DMRO15:
DMRO16:
DMRO17:
ODMRO20:
DMRQO21:
DMRQO22:
DMRO23:

DMR BASE TABLE DESCRIPTION MESSAGES
ASCIZ /UNDEF INED DATA /
sLOCATION UNDEF INED BY SPEC
.ASCIZ /BASE TABLE UPDATE INDEX POINTER/
.ASCIZ /BASE TABLE UPDATE LIMIT/
.ASCIZ /BEGINNING OF BASE TABLE DATA/
.ASCIZ /NAKS RCVD..BUFFER TEMTM UNAVAILABLE/
.ASCIZ /NAKS RCVD..HEADER BCC ERROR/
.ASCIZ /NAKS RCVD..DATA BCC ERROR/
.ASCIZ /NAKS SENT..BUFFER TEMP UNAVAILABLE/
.ASCIZ /NAKS SENT..HEADER BCC ERROR/
.ASCIZ
/NAKS SENT..DATA BCC ERROR/
._ASCIZ /REPS SENT..CUMUL REP SENT/
.ASCIZ /REPS RCVD..CUMUL REP RCVD/
_ASCIZ /NAKS RCVD..REP RESPONSE/
_ASCIZ /NAKS RCVD..RCV OVERRUN/
.ASCIZ
/NAKS RCVD..MSG HDR FORMAT/
.ASCIZ
/NAKS RCVD..MSG TOO LONG/
.ASCIZ /NAKS SENT..REP RESPONSE/
.ASCIZ /NAKS SENT..RCY OVERRUN/
.ASCIZ /NAKS SENT..MSG HDR FORMAT/
.ASCIZ /XMIT UNDERRUN COUNT/
._ASCIZ
/CALL SET UP FAILURE COUNT/
DMR0O24: .ASCIZ
/ACTS FAILURE COUNT/
DMR025: .ASCIZ /CARRIER DETECT LOST COUNT(WHILE RECEIVING)/
DMRO26:.ASCIZ
/RECEIVER INACTIVE COUNT/
DMRO27: .ASCIZ
/STREAMING TIME-QUT COUNT/
DMRO30: .ASCIZ /XMBYT(LSB) =~ TOTAL # BYTES XMITTFD, 32 BIT COUNTER/
DMRO31: .ASCIZ ?XMBYT(2/4) - # BYTES XMITTED?
DMRO32: .ASCIZ ?XMBYT(3/4) - # BYTES XMITTED?
DMRO33:
.ASCIZ °?XMBYT(MSB) -~ # BYTES XMITTED?
DMRO34:
.ASCIZ /RCBYT(LSB) - TOTAL # BYTES RECEIVED, 32 BIT COUNTER/
DMRO35: .ASCIZ ?RCBYT(2/4) - # BYTES RECEIVED (CONT)?
DMRO36: .ASCIZ ?RCBYT(3/4) - # BYTES RECEIVED (CONT)?
DMRO37: _ASCIZ /RCBYT(MSB) -~ # BYTES RECEIVED/
DMRO40O:
.ASCIZ
/INCOMPLETE SELECTION COUNT/
DMRO41:
_ASCIZ
/NO REPLY TO SELECTION COUNTER/
DMRO42:
.ASCIZ /HIGHEST MESSAGE SUCCESSFULLY RECEIVED/
DMRO43:
_ASCIZ
/HIGHEST MESSAGE TRANSMITTED/
DMRQ44:
.ASCIZ /HIGHEST MESSAGE ACKNOWLEGED/
DMRO45:
.ASCIZ
/NEXT MESSAGE TO TRANSMIT/
DMRO46: .ASCIZ /LAST MESSAGE TO COMPLETE TRANSMISSION/
DMRQO47:
.ASCIZ /CURRENT MESSAGE BEING TRANSMITTED/
DMROS50:
.ASCIZ /TRANSMIT END OF QUEUE/
DMROS51:
.ASCIZ /TRANSMIT BEGINNING OF QUEUE/
DMRO52:
.ASCIZ /RECEIVE END OF QUEUE/
DMROS53:
.ASCIZ /RECEIVE BEGINNING OF QUEUE/
DMROS54:
.ASCIZ /LATEST NAK REASON/
DMRO55:
.ASCIZ ?PROGRAMMABLE REP/SELECT-TIMER PRESET VALUE?
DMROS6: .ASCIZ ?ISTRT/ASTRT/REP/SELECT-TIMER COMPARE LEVEL?
OMROS57:
.ASCIZ /ACTIVE TIME COUNT/
DMR060: .ASCIZ /THRESHOLD LEVEL NAKS RCVD/
DMRO61:
.ASCIZ /THRESHOLD COUNT NAKS RCVD/
DMRO62:
.ASCIZ /THRESHOLD LEVEL NAKS SEND EXCEPT NQ BUF/
DMRO63: .ASCIZ /THRESHOLD COUNT NAKS SEND EXCEPT NO BUF/
DMRO64: .ASCIZ
/THRESHOLD LEVEL - REPS SENT/

SEQ 0070

C2CLkBO DMR,DM(C-11 DATA (OMM, LINK TEST

(ZCLkB.P11

16-JUN-81

14:38

5726
5727
5728
2;%8

044124
0664124
126
042523

042522
062522
051110
020105

5731
5732

023376
023432
023475
023540

044123
044123
051505
046504

MACY11 30A(1052)
DMR BASE

DMRO65:
DMRO66:
DMRO67:
DMR177:

.ASCIZ
.ASCIZ
.ASCIZ
,ASCIZ

G 6
16-JUN-B1

14:39

TABLE DESCRIPTION MESSAGES

PAGE 13-35

/THRESHOLD COUNT - REPS SENT/
/THRESHOLD LEVEL - NO BUF AVAILABLE/
/THRESHOLD COUNT - NO BUF AVAILABLE/
/SEE DMR TECH MANUAL FOR DESCRIPTION/

SEQ 0071

024013
024050
024103
024125
Q24147
0264206

047 }

044 1
052
040

;

;
1

042 5

L INK TEST

MACY11

30A(1052)

DMR BASE

16-JUN-81

14:39

TABLE DESCRIPTION MESSAGES

PAGE 13-36

020120
046126
051106
01
051514

020055
020122
026440
020122
026440

;REV B BY EC
.SBTTL
DM(C BASE TABLE DATA DESCRIPTION MESSAGES
DMCOOQ2: .ASCIZ
/ANP =~ CONSTANT 0/
DOMCOQ3: .ASCIZ
/NTLR - NAKS RCVD..NO BUFFERS/
DMC004: .ASCIZ
/NHDR - NAKS RCVD..MSG MEADER BAD/
DMCOOS: .ASCIZ
/DATR - NAKS RCVD..DATA BAD/
DOMCO06: .ASCIZ
/NTLS - NAKS SENT..NO BUFFERS/

051524
050105
050105
051501
020105

026440
051503
051103
020105
046504

DMCO10:
DMCO11:
DMCO12:
DMCQ13:
DMC377:

—

5741
57642
5743
57644
57645
5746

023604
023625
023662
023723
023756

14:38

5734
5735
5736
5737
5738
5739
57640

16~JUN-81

WSRO0~

C2CLkB.P11

DATA (OMM.

&
~N

CZCLKBO DMR,DM(C-11

020123

DMC007:

.ASCIZ

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/NHDS - NAKS SENT..BAD HEADER/

/DATS - NAKS SENT..BAD DATA/
/REPCS ~ REPS SENT/
/REPCR - REPS RE(CD/
/BASE - CORE TABLE BASE ADDRESS/
/SEE DMC TECH MANUAL FOR DESCRIPTION/

SEQ 0072

CZCLkBO DMR,DMC~11 DATA (COMM. LINK TEST

(ZCLkB.P11

16-JUN-81

14:38

$755

14:39

PAGE 13-37

061517
020116
046503
041523
051517
041506
046511
0405246
047125
020130
020104
0515264
020130
020130
041505
020103

042105
054105
020120
047117
0201264
050115
020105
041440
0516440
042111
046107
043040
047516
047516
051040
042522

FROEM:
NxvM:
DDCSRM:
DISCOM:
LOSDAM:
DDCMRM:
TIMOM:
DATCKM:
RUNSBM:
RXIDM:
CDGLM:
CTSFM:
TXNC:
RXNC:
RxM1:
RxXM2:

.ASC

e Ny

e
g
g

g bt N

g
g

N B

dag
g B

e N b
N

g (g
g

e N

.ASC
.ASC
.
.
.
.
.
.ASC
_ASC
_AS(
.ASC
.ASC
,ASC
.ASCIZ
.EVEN

051120
047516
042104
044504
114
106
126
040504
122
172
103
103
124
122
123
042523
025630

DLLAB:

025270
025310
025326
025346
025361
025373
025413
025424
025437
025461
025471
025505
025521
025541
025561
025604

OVEM9:

,ASC
.ASC
.ASC
.ASC
.ASC
.ASC

e DN

DVEMB:

043125
051440
052502
020040
020116
020040

bt bt b

061040
020040
020130
020012
053517
020012

054124
005015
122
015
042040
015

Gt b

025036
025100
025125
025167
025214
025243

g bt

DVEM7:

.ASC
.ASC
,ASC
.ASC

g B

DVEM6:

g B

040507
051440
051124
020040

.AS(C
.AS(
.ASC

e B

DVEM5:

DVEMG:

<15><12>/
SELO
scLe /
/TIME OUT WAITING FOR RUN TO SET/
<15><12>/
SELO
SEL2 /
/TIME OQUT WAITING FOR OUTPUT INTERRUPT/

DVEM3:

.ASC
.ASC
.ASC
(ASC

ASC

by b

020040
020124
020040

DVEMI:

/TIME QUT WAITING FOR RD] TO CLEAR/
<15><12>/
SELO
SEL2 /

g b

020040
0476440
020040
047440

.ASCI1
LASCIZ

042514
020040
047117
020012

047440

DVEMO:

ANIRNIPNIRNIANINNNNNRANIRN
NN

046111
005015
103
015

020012
052520
020012

0476440
020040

024674
024724
024751
025011

015
047111
015

0425 15
0200 12
0425 15
020012
042515
020012
042515

024555
024602
024647

044524
15
015
044526
015
044524
015
044526

5773
57764
5775
5776
5777
5778
5779
5780
5781
5782
5783
5784
5785
5786
5787
5788
5789
5790
5791
5792
5793
5794
5795
5796
5797
5808
-5809
5817
5818
5819

0264252
024313
024340
024377
024424
024463
024510

5768
5769
5770
2;;}

;DEVICE ERROR MESSAGES

YOYOYOH
O

5765
5766
5767

[

16-JUN-81

DMC BASE TABLE DATA DESCRIPTION MESSAGES

nnuwnnn

g;g?
5758
5759
5760
5761
5762
5763
5764

MACY11 30A(1052)

/TIME OQUT WAITING FOR RD]

TO SET/

<15><12>/
SELO
SEL2 /
/INPUT INTERRUPT WHEN EXPECTING OUTPUT/
<15><12>/
SELO
SELZ /
/ILLEGAL OUTPUT INTERRUPT/
<15><12>/
SEL?Z
SELS
/
/CONTROL OUT INSTEAD OF BA-CC 0OuT/
<15><12>/
SEL?
SELS6 /

/TX BUFF COMPLETED AND SHOULD BE RX/
<15><12>/
SEL4
SELS
/
/RX BUFF COMPLETED AND SHOULD BE TX/
<15><12>/
SEL4
SEL6
/
/ DOWN LINE LOAD ABORTED/
<15><12>/
RXBUF
TXBUF /
/PROCEDURE ERROR/
/NON EXIST MEM/
/DDCMP START REC/
/DISCONNECT/
/LOST DATA/
/DDCMP MAINT REC/
/TIME OUT/
/DATA CHECK/
/RUN SET ILLEGALLY/
/RX IDLE/

/CD GLITCHED/
/CTS FALILED/
/TX NOT COMPLETE/
/RX NOT COMPLETE/
/SEC REQ ERR WORD 1/
/SEC REQ ERR WORD 2/

SEQ 0073

CZCLKBO DMR,DMC~11 DATA COMM.
CZCLKB.P11
16-JUN-81 14:38
5822
5803
5824
5825
5826

(10)
(10)
(9)
(9)
(8)

(7)
(6)

(3)

025630
025630
025630

025630
025632
025636
025640
025644

005046
153716
005046
153716
013746

025654

012746

025650

025660

025662
025664
025670
025670

5853
(3)
5854

025672
025672
025672

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

025702
025706
025710
025712

(8)
(7)

5855

025670

025672
025676

025716

012746

010600

104414
062706

013746
012746
012746
010600
104414
062706

025716

5857
(3)
5858
(9)
(8)
(7)
(6)

025720
025720
025720
025720
025724
025726
025732

013746
010446
0127646
012746

(4)
(4)

025740
025742

104414
062706

(3)

5859
(3)
(3)

PAGE

13-38

SEQ 0074

GLOBAL ERROR REPORT SECTION

025716

025736

025746

025746
025746

(BASIC)

AND PRINTX

(EXTENDED)

CALLS ARE USED

BGAMSG

ERR1

PRINTB

WEVTFSA,OFSET,<B,GOOD>,<B.BAD>

TO CALL

104423

SERVICES.

007446
007624

(LR
BISB
CLR
BISB
MOV

-(SP)
BAD, (SP)
-(SP)
GOOD, (SP)
OF SET ,=(SP)

000004

MOV

#6,~(SP)

007447

017034

000012

MOV

MOV
ENDMSG

£ 10001:

007436
015453

BGNMSG

ERR2

PRINTB

#EFM2,TEMP4

;TOTAL

2EvVTFSA,
= (SP)

SP,RO

TRAP
ADD

($PNTB
02,SP

TRAP

(3MSG

ERR?::
DAYA COMPARE FAIJILS ERROR

MOV
MOV

000002

TEMPS
= (SP)
PEFM2
.~ (SP)

MOV
MOV
TRAP
ADD

#2,-(SP)
SP.RO
(SPNTB
#6,SP

TRAP

($MSG

015550
000003

MOV
MOV
MOV
MOV

TEMP3,~(SP)
R&,~(SP)
#EFMIT,=(SF)
#3,-(SP)

000010

TRAP
ADD

(SPNTB
#10,SP

TRAP

($MSG

000006

ENDMSG

L 10002:

104423

010600

ERRT::
:INDIVIDUAL DATA COMPARE ERROR

104423

(3)

ségé

14:39

s
i THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS
> USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION.
PRINTB

(&)
(4)
5851
(3)

Ségg

J
6
MACY11 30A(1052)
16~JUN-81
GLOBAL ERROR REPORT SECTION
.SBTTL

gggg

$829
5830
5831
5832
5848
5849
(3)
5850

LINK TEST

007434

BGNMSG

ERR10

PRINTR

WEFM11,R4, TEMP3

ERR10::

MOV
ENDMSG

L10003:

SP.RC

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P11

S870
(3)
5871

025750
025750
025750

16-JUN-81

14:38

(10) 025750
(9)
025754

013746
013746

007442
007436

(7)

012746

016533

(8)

025760

(6)
(3)
(&)
(4)
s872
(8)
(7)
(6)
(3)
(4)
(4)
5873
(3)
s§;2

025770
025774
025776
026000
026004
026004
026010
026014
026020
026022
026024
026030
026030
026030

5875
(3)
5876
(9)
(8)

026032
026032
026032
026032
026036

013746
013746

007436
007434

(6)

026046

012746

500003

(4)
(4)
5877
(8)

026056
026056
026062
026062

104414
062706

000010

013746

007462

(3)
(4)
(4)
5878
(3)

026076
026100
026102
026106
026106

5880
(3)
5881
(9)
(8)

026110
026110
026110
026110
026114

013746
013746

007436
007434

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

026126
026130
026132
026136

012746
010600
104414
062706

000003

026140
026140

104423

(7)

(3)

(7)
(6)

sé?&

(7)

5882
(3)
(3)

025764

013746

012746
010600
1046414
062706
013746
012746
012746
010600
104414
062706

007434

MACY11 30A(1052)

16=-JUN-81

GLOBAL ERROR REPORT SECTION

14:39

BGNMSG

ERRS

PRINTB

WEVTF3D,TEMP3,
TEMP4, CONOTM

PAGE 13-39

SEQ 0075

ERRS::

007662
015516
000002

000006

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

MOV

#EVTFSD,-(SP)

MOV
MOV
MOV
MOV
TRAP
ADD

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

TRAP

CSMSG

MOV
MOV

TEMPS4
- (SP)
TEMP3.-(SP)

MOV

000004

000012

MOV
MOV

PRINTB

MOV
MOV
TRAP
ADD

#PCPM,PCADD

ENDMSG

L 10006:

104423
BGNMSG

ERR9

PRINTB

WEVTF3C,TEMP3,
TEMP4

TEMP3 . ~(SP)

#4,-(SP)
SP.RO
CSPNTB
#2,SP

ERRY::

026042 012746 016516

MOV

#EVTF3C,=(SP)

026052

MOV

SP.RO

026066
026072

026106

026120

026140

010600

012746
012746

010600
104414
062706

MOV

PRINTB

#PCPM,PCADD

015516
000002

000006

L10005:

104423

012746

BGNMSG

ERR13

PRINTB

#EVTF3C,TEMP3,
TEMPS

CSPNTB
#10,SP

MOV

PCADD
, - (SP)

MOV
TRAP
ADD

SP.RO
CSPNTB
#6,SP

ENDMSG

#PCPM.~(SP)
#2.,-(SP)

TRAP

CSMSG

MOV
MOV

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

ERK13:
:

016516

000010

TRAP
ADD

MOV
MOV

ENDMSG

#3,-(SP)

MOV

#EVTFSC,-(SP)

TRAP

CIMSG

MOV
MOV
TRAP
ALD
L10006:

#3,~(SP)
SP.RO
TSPNTB
#10,SP

C2CLxBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P11

16-JUN-81

14:38

MACY11 30A(1052)

L 6
16=JUN=-81

GLOBAL ERROR REPORT SECTION

14:39

5883
S884

026142

BGNMSG

ERR14

S885

026142

PRINTB

#EVTF3D,TEMP3,
TEMP4, CONOTM

(3)

026142

(10) 026142
(9)
026146
(8)
026152

(7)

026156

013746
013746
013746

007442
007436
007434

012746
010600
104414
062706

000004

012746

(6)
(3)
(&)
(4)
5886
(3)

026162
026166
026170
026172
026176
026176

026176

104423

5888
(&)
sé§$

026200
026200
026202

000167

Ség;

5890

177772

PAGE 13-40

SEQ 0076

ERR14::
MOV
MOV
MOV

016533
000012

EXIT

MOV

#EVTFSD,
= (sP)

TRAP

C$MSG

LWORD

JSUMP

MOV
MOV
TRAP
ADD

ENDMSG

L10007:
MSG

CONOTM,
- (SP)
TEMP4
, = (SP)
TEMP3 - (SP)

"WORD

#4,-(SP)
SP.RO
CSPNTB
#12,SP

L10007-2-.

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
MACYT1 30A(1052)
16~JUN-81
CZCLKB.P11
16=JUN=-81 14:38
GLOBAL SUBROUTINES SECTION

14:39

ggg%

.SBTTL

5894

I++

5896

: THAT ARE USED IN MORE THAN ONE TEST.

5895

;

5897
5898
5975

PAGE 13-41

GLOBAL SUBROUTINES SECTION

THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES

;==

5976

.SBTTL

5979

s+t
; FUNCTIONAL DESCRIPTION:

5981
5982
5983

;
;
;

$977
5978

5980

5984

5985

;

gggg

5986

;

CLOCK SETUP SUBROUTINE

THIS SUBROUTINE SETS UP THE CLOCK INFORMATION TABLE FOLLOWING A ‘'‘CLOCK'’

CALL EXECUTED IN THE INITIALJZATION CODE. BUT SINCE THE '°‘CLOCK’'' CALL
SAYS NOTHING ABOUT AN LSI-11°'S CLOCK, THIS ROUTINE IS ONLY USED IF A
LINE OR P-CLOCK IS FOUND.
INPUTS:

R1= POINTS TO SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED
R2= POINTS TO ''CLK'' TABLE WHERE CLOCK INFO WILL BE KEPT

5989

;

5992
5993
5994
5995
5996
gggg

: OUTPUTS:
:
‘CLKCSR’' GETS LOADED WITH THE CLOCK'S CSR ADDRESS
:
"'CLKBR’' GETS LOADED WITH THE CLOCK'S INTERRUPT LEVEL
:
"CLKVEC’' GETS LOADED WITH THE CLOCK'S INTERRUPT VECTOR
;
"'CLKHZ’' GETS LOADED WITH THE LINE FREQ. (HERTZ RATE) WHICH DETERMINES
:
THE NUMBER OF TICKS IN A SECOND

5999
60006001

; CALLING SEQUENCE:
;
JSR
PC,CLKSET

233(1)

6002
6003

026204

6009
6010

026216
02620

6006
6005
6006
6007
6008

6011
6012
6013

0262064
026206
026210
026212
026214

012122
012112
006312
006312
006312

026222
026224

012122
012122

026226

006312
006322

000207

IMPLICIT INPUTS:

CLKSET:

THE SUPERVISOR

SPACE WHERE CLOCK INFO WAS RETURNED BY THE ‘‘CLOCK'' CALL

;CALL CLOCK SETUP WITH R1 & R2 SETUP

MOV
MOV
ASL
ASL
ASL

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

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

MOV
MOV

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

;LOAD CLOCK'S INT. VECTOR INTO °*‘CLKVEC'®
;LOAD CLOCK'S HERTZ RATE INTO ''CLKHZ'’

ASL
ASL

RTS

(R2)
(R2)+

SEQ 0077

CZCLKBO DMR,DMC~11 DATA COMM.
16~JUN-81 14:38
CZCLkB.P11

N 6
MACY11 30A(1052)
16-JUN=-81
CLOCK SETUP SUBROUTINE

LINK TEST

INTERRUPT SERVICE ROUTINE WHICH TAKES CARE OfF

KEEPING THE '‘TIME-SINCE-START'® AND COUNTING DOWN ANY OF THE

"EVENT'' TIMERS. THE TIMERS ARE USED TO TIME COMPLETION OF

DEVICE

REQUESTS. THE °‘TIME-SINCE~START'' IS USED TO BE LOGGED WITH EACH ENTRY
INTO THE EVENT LOG.
IMPLICIT INPUTS:
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''

U Ve

Uy Be

Ve NV

CLOCK INTERRUPT SERVICE ROUTINE

FUNCTIONAL DESCRIPTION:
THIS 1S THE CLOCK

IN MINUTES €& SECONDS
TIMER 1,2, & S: CURRENT VALUES OF THE 'EVENT TIMERS''

0e B
e
Ve
N,

SEQ 0078

IMPLICIT OUTPUTS:
NEW VALUE OF EVENT TIMER '"1'' DECREMENTED BY 1
NEW VALUE OF EVENT TIMER '°2'' DECREMENTED BY 1
NEW VALUE OF EVENT TIMER ''S’' DECREMENTED BY 1

TICK IF IT WAS NON-ZERO
TICK IF IT WAS NON-ZERO
SECOND IF IT WAS NON-ZERO

FUNCTIONAL SIDE EFFECTS:
THE CLOCK 1S 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.

Vo0,

PAGE 13-42

.SBTTL

14:39

026230
026230

026230
026234
026240
026242
026250
026254
0256262
026264
026270

161266

007540

007530
007536
000074

007536

007542

005337

1$:

2$:

007544
007546

3s:

007546

007540

CLR
DEC

8CLKCSR
TIMTCK

#60., TIMSEC

BNE
INC
CLR

007542
007544

007530

CLKINT

BNE
MOV
INC

007540

007534
007536

026274

BGNSRV

TST

18
CLKHZ, TIMTCK
TIMSEC

CLKINT::
;DISABLE THE CLOCK FORM INTERRUPTING
;DECREMENT THE # OF TICKS/SEC.

;GO CHECK TIMERS (182-TI(CKS, 3~-SECONDS)
SJRESET THE # OF TICKS/SEC.
sINC # OF SECS=SINCE-START
;SEE IF WE'VE COUNTED 60 SECS.

YET

13
TIMMIN
TIMSEC

;IF NOT, GO CHECK TIMERS
; ELSE INC MINUTES~SINCE-START
; AND RESTART SECOND COUNTER

TIMER1

JSEE IF TIMER #1, TIMING ANYTHING

TIMER]
TIMERZ2

; ELSE DECREMENT THE TIMER VALUE (BY 1 TI(CK)
;SEE IF TIMER #2, TIMING ANYTHING

BEQ

BEQ
DEC
TST
BEQ

3s
TIMER?
TIMERS
48

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

DEC

TIMFRS

;

DEC
TST

cMP
BNE

CLKHZ , TIMTCK
43

;

IF=0, NOTHING BEING TIMED CHECK NEXT TIMER

;SEE IF A SECOND HAS BEEN COUNTED OFF
; BR _IF NO
ELSE DECREMENT

THE

TIMER VALUE

(BY 1

SEC.)

CZCLkB.P11

6071

6072

(3)
(2)

026342
026350
026350
026350

16~JUN-81

14:38

013777

007532

000002

161152

MACY11 30A(1052)
16-JUN-81
14:39
CLOCK INTERRUPT SERVICE ROUTINE

C2CLKBO DMR,DMC~11 DATA COMM. LINK TEST
4$:

MOV
ENDSRY

CLKEN,@CLKCSR

;REENABLE

PAGE 13-43

SEQ 0079

THE CLOCK TO INTERRUPT

L10010:

RT]

C2CLKBO DMR,DMC~11 DATA CO"M. LINK TEST
CZCLKB.P11
16-JUN-81 14:38
6074
6075
6076
6077
6078
6079
6080
6081
6082

MACY11 30A(1052)
16-JUN-81
EVENT LOG SUBROUTINES
.SBTTL

14:39

PAGE 13-44

EVENT LOG SUBROUTINES

see
: FUNCTIONAL DESCRIPTION:
:
THIS SUBROUTINE HAS A DIFFERENT ENTRY POINT
:
FOR EACH EVENT TO BE LOGGED AND ALWAYS PRINTS
:
THE SHORT '‘OPERATOR AWAKETM MESSAGE TO CONSOLE THEN LOGS THE
:
;

6083

6085
6086
6087
6088
6089

:
:
:
:
;

6084

EVENT TYPE, TIME, AND THE OTHER 3 WORDS OF
SUBROUTINE AT CALLING TIME

INFO PASSED TO THE

INPUTS:

TIMMIN € TIMSEC:
CURRENT VALUE OF '‘TIME~SINCE-START''
TEMP2:
WORD #1 OF EVENT LOG INFORMATION (FOR MOST EVENT TYPES)
TEMP3:
WORD #2 OF EVENT LOG INFORMATION
TEMP4:
WORD #3 OF EVENT LOG INFORMATION
MODS:
CURRENT VALUE OF THE MODEM SIGNALS AVAILABLE FROM THE DEVICE

6091
6092
6093

OUTPUTS:
:
"OPERATOR AWAKE'' MESSAGE SENT TO THE CONSOLE
:
NEW EVENT LOGGED IN 'EVTLOG'' (EVENT LOG)

6096
6097
gggg

:
;
:

SUBORDINATE ROUTINES USED:
*DVMODS'' THE DEVICE SUBROUTINE THAT RETURNS MODEM STATUS
(FOR SOME EVENT TYPES)

6100
6101

:
:

FUNCTIONAL SIDE EFFECTS:
TEMP:
USED TO STORE ADDRESS OF ''OPERATOR AWAKE'' MESSAGE

6104
6105

.
:

CALLING SEQUENCE:
JSR
PC.LOGTXQ

6108
6109
6110

;
;-

gggg

;

g}gg

;

2189

6111
6112
6113
g}}g

026352
026352
026360
026366

012737
012737
000510

020003
000000

007430
007426

6116
6117
6118

026370
026370
026376

012737
012737

020014
000002

0067430
007426

6121
6122
6123

026406
026406
026414

012737
012737

020025
000004

007430
007426

6126
6127

026424
026424

012737

000006

007426

6129

026434

g};g

g}sg

6128

SEQ 0080

026404

026422
026432

000501

000472
000466

UPDATED 'EVTPTR'' (EVENT LOG ENTRY POINTER)

TEMP1:

LOGTXQ:

LOGTXC:

LOGRXQ:

LGDVE:

;CALL

THE LOG EVENT SUBROUTINE WITH TEMP,TEMP1,

JSR

PC.LOGCMP

MOV
MOV
BR

#STXQ, TEMP1
#TXQ, TEMP
LOGS]

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

MOV
MOV

#STXC, TEMPI
#TXC, TEMP

;SET UP MSG. TO PRINT
*SET UP EVENT TYPE

MOV
MOV

#SRXQ, TEMP1
#RXQ, TEMP

;SET UP MSG. TO PRINT
:SET UP EVENT TYPE

MOV

#RXC, TEMP

;SET UP EVENT TYPE

B8R
LOGRXC:

USED TO SETUP THE VALUE OF THE 'EVENT TYPE'' BYTE FOR LOGGING

B8R

IN 'MODS'

LOGS1

LOGS1
LOGS]

; TEMP2, TEMP3, AND TEMP4 SETUP

26O LOG EVENT AND TIME

16O LOG EVENT AND TIME
:GO LOG EVENT AND TIME

6130
6131
6132
6133

6141
6142
6143
6144
6145
6146
6147
6148
6149
6150
6151

020036
000010

007430
007426

MOV

#SDVE
, TEMP1

LOGSS

020060
000012
007470
007472
007500
007476

007430
007426
007432
007433
007434
007436

012737
012737
000442

020047
000014

007430
007426

012737
012737
000433

020071
000020

007430
007426

012737
012737
000424

020102
000022

007430
007426

012737
012737
000415

020113
000024

013746
004737
012604
020437
001402
000137

007400
044004

013737

010456

007436

022737

000006

007426

000001

007476

026434
026642
026450

6152
6153
6154
6155

6156
6157
6158
6159
6160
6161
6162

026516

026520
026520
026526
026534
026536
026536
026544
026552
026554
026554
026562
026570
026572
026572

026600
026606

026610
026614

6163
6164

6165

6166

6167
6168
6169
6170
6171
6172
6173
6174

6175
6176
6177
6178
6179
6180
(7)
6
(3)
(4)
4)

026712

MACY11 30A(1052)
16-JUN-81
EVENT LOG SUBROUTINES

6134

6135
6136
6137
6138
6139
6140

LINK TEST

CZCLkBO DMR,DMC~11 DATA COMM,
16~-JUN-81 14:38
CZCLKB.P1

MOV

LOGDVI:

MOV

#SDVI, TEMP1

MOVB
MOVB
MOV
MOV
BR

MODTYP, TEMP2
MLTYP, TEMP2+1
RPASS, TEMP3
PARAM, TEMPL
L 0GS3

MOV

#SCM, TEMP1

LOGSS

MOV

LOGCMP:

MOV

LOGCML:

#DV], TEMP

#DCK . TEMP

MOV

#SCML
, TEMP1

LOGSS

MOV

LOGCMD:

#DER, TEMP

#DLE,

TEMP

14 :39

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

;SET UP EVNT ENTRIES
:GO LOG EVENT AND TIME
;SET UP MSG. TO PRINT
;SET UP EVENT TYPE

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

MOV
MOV

#SCMD
, TEMP1
#DDE , TEMP

MOV
MOV

#SEOP, TEMP1
NEOP, TEMP

LOGSS

;GO LOG MSG TYPE AND TIME

007400

MOV
JSR
MOV
cMP

ERRCNT
, = (SP)
PC,DVMODS
(SP)+,R4
R4 ,ERRCNT

027044

JMP

LOGEX

MOV

MODS
, TEMP4

s SAVE CURRENT ERROR COUNT
: GO GET MODEM STATUS
;GET SAVED ERRCNT VALUE
;WHERE ANY ERRORS FOUND
: BR [IF NONE
s ELSE, LEAVE WITHOUT LOGGING ANYTHING
;
BUT THE DEVICE ERROR FROM 'DVMODS''
sAND PUT IT IN TEMPS

#RXC, TEMP

BIT

#STATB, PARAM

022737
001012
005037

000010

012746
012746

020000
000001

007372

000004

007430
007426

LOGEOP:

BR
BR

LOGS1:

BEQ

007372

1%:

LOGS3:

BEQ

L0GSS

;GO LOG MSG TYPE AND TIME

L0GSS

;IF RXC DONT PRINT

LOGSS

;IF NO STATUS SELECTED

cMP
BNE

#10,LNCNT
LOGS4
LNCNT

;HAVE WE DONE 10?
;1F NOT GO TO 4
JESLE CLEAR IT

PRINTF

#CR

;ELSE PRINT (R

BEQ

CLR

SEQ 0081

PAGE 13-45

;G0 TO0 S

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

SP.RO
CSPNTF

#6 ,SP

MACY11 30A(1052)

CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST
16~JUN-81 14:38
C2CLKB.P11
6181
6182

6183
(7)
(6)

(3)

(4)
(4)

6184
6185
6186
6187
6188
6189
6190
6191
6192
6193
6194
6195
6196
6197
6198
6199
6200
6201
6202
6203
6204

026716
026716
026722
026722
026726
026732

005237

007372

013746
012746

007430
000001

027020
027024
027026
027032
027036
027042
027044

013723
013723
020327

007550
007426
007530
007540
007426
007536
007534
007432
007434
007436
010454

012713
012703
010337

177777
007552
007550

103404

012603
000207

EVENT LOG SUBROUTINES

LOGSé4:

INC

PRINTF

000004

LIGSS:
007426
007426

TEMP1

PAGE 13-46

;SAVE R3 ON THE STACK

MovB
MOV

TEMP, (R3) +
CLKHZ, TEMP

;LOG EVENT

TEMP, (R3) +
TIMSEC, (R3)+
TIMMIN, (R3) +
TEMP2, (R3) +
TEMP3, (R3) +
TEMP4, (R3) +
R3,#EVTEND
LOGS?2

;LOG TIME SINCE START

cMP
BLO

MOV
MOV
MOV
MOV
RTS

EVIPTR,R3

TIMTCK, TEMP

#-1,(R3)
NMEVTLOG,R3

R3,EVTPIR
(SP)+,R3

SEQ 0082

JINC COUNTER OF # OF AWAKE MSGS
MoV
;PRINT OPERATOR AWAKE MSG.

R3,-(SP)

MOV
MOV

LOGEX:

LNCNT

14:39

MoV

mMovB
MovB
mMovB
MOV

LOGS?Z:

16-JUN-81

sTICKS,SECS AND MINS.
;LOG EVNT ENTRY 3
;LOG EVNT ENTRY &
;LOG EVNT ENTRY 5

;IF EVENT LOG FULL GO
sCONTINUE ;ELSE GO TO 2
;LOG A _TABLE END
;PUT R3 TO START OF TABLE
;RESTORE PQINTER
JRESTORE R3

MOV

TEMP1,-(SP)
#1,-(SP)

TRAP
ADD

#4,SP

SP,RO
CSPNTF

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKB.P1T

16=-JUN-81

14:38

6206
6207
6208
6209
6210
6211
6212
6213
6214

MACY11 30A(1052)

REPORT BASE TABLE OR EVENT LOG
.SBTTL

gg}g

6217
6218
gg;g
6221
6222

010246
010346
010446

REPORT: MOV
MOV
MOV

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

027054
027054
027060
027064
027066

012746
012746
010600
104417

014020
000001

062706

000004

6224
gssg

027074
027100

105037
105037

003561
003560

6§3%

6227
6228
(3)

(3)

(&)
(5)
(5)
(5)
(5)
(5)
(3)

6229
6230
6-31
6232
6233
6234
6235
5236
(7)
‘6)
(3)
(4)

027070

027104
027104
027106
027110
027112
027114
027116
027120
027122
027124
027'24

0271}2
027140
027146
027152
027156
027162
027164
027164
027170

gggg

027174
027176
027200
027204

6239
6240
6241

027210
027214
027216

(4)

(7)

027216

14:39

PAGE 13-47

SEQ 0083

REPORT BASE TABLE OR EVENT LOG
;REV B BY EC
:THE FOLLOWING COMMANDS ADDED TO REVISION B C2CLK
;;DMR/DMC DCLT PROGRAM
::RPT> LOG
5
BASE/ERROR
Je
BASE/FULL
i
BASE/OFF SET=NN
H
HELP

027046
027050
027052

16-JUN-81

EXIT

R2.-(SP)
R3,-(SP)
R4 ,-(SP)

JPRINT HELP MESSAGE
PRINTF
#RHLPO

;SAVE R2,R3,R4 ON THE STACK

;BASIC HELP MESSAGE

MOV
MOV
MOV
TRAP

ADD

GETRCL:

CLRB
CLRB

P$GDRD
PSNNUF

000406

003060
000142
012504
000000
000001
000110

003060
027266
027464
003204
032642
003561

012746
012746
010600
104417

012512
000001

062706

000004

105737
001412

003560

012746

012542

000137

TRAP

CSGMAN

.WORD
.WwORD
.WORD
.MWORD
.WORD
. WORD

CMDBUF
TSCODE
CLISRP
O
TSLOLIM
TSHILIM

012737
012737
012737
005037
004737
105737
001412

003544
003546
003550

027074

1%:

#6 ,SP

JINIT GOOD/BAD FLAG
=1=BAD INPUT
JINIT MORE COMMAND LINE INPUT NEEDED

:PRINT PROMPT ‘RPT>'
GMANID
CLISRP,(CMDBUF,A,0,1,72..NO

104443

#RHLPO,~(SP)
#1,-(SP)
SP,RO
CSPNTF

100008
:

MOV
MOV
MOV
CLR
JSR
TSTB
BEQ
PRINTF

#CMDBUF ,P$BUF A
#CLIRT ,PSTREE
#CLIRAC.PSACT
QUALFG
PC.PSTRV
P$GDRD
1%
#CLIERM

; INPUT BUFFER
JREPORT CLI TREE
JACTION ROUTINES

JMP

GETRCL

;TRY AGAIN

TST8B
BEQ
PRINTF

PSNNUF
108
#CLINUF

;MORE COMMAND NEEDED ?
;NO,BRANCH
;INCOMPLETE MESSAGE

;GO PARSE COMMAND L INE
;COMMAND OK ?
;YES ,BRANCH
JPRINT INVALID INPUT MESSAGE
MOV
MOV
MOV
TRAP
ADD

MOV

10000%

#CLIERM,-(SP)
#,-(SP)
SP,RO
CSPNTF
6 ,SP

#CLINUF ,-(SP)

CZCLxkBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKB.P11

16~JUN-81

14:38

(6)
(3)

01274¢
010600

000001

(4)
(4)

ggz%

027222
027226
027230
027232

104417
062706

027236

000137

6244
6245
6246
6247

027242
027250
027252
027256

023727
001402
000137
012604

6250

027264

000207

6248
6249

027260
027262

012603
012602

MACY11 30A(1052)

REPORT BASE TABLE OR EVENT LOG

027074

14:39

PAGE 13-48

SEQ 0084
MOV
MOV
TRAP

000004

003202

6 7
16-JUN-81

000002

10%:
20$:

JMP

GETRCL

:TRY AGAIN

CMP
BEQ
JMP
MoV

KEYWD1,#RPEXT
20%
GETRCL
(SP) + R4

JEXIT COMMAND ?
s YES ,BRANCH
;GET ANOTHER COMMAND
sRESTORE R4

RTS

JRETURN

MOV
MOV

(SP) +,R3
(SP)+,R?

JRESTORE R3
;RESTORE RZ2

ADD

#1,-(SP)
SP,RO
CSPNTF
w6, SP

C2CLKBO DMR,DMC~11 DATA COMM. LINK TEST

C2CLKB.P11
6252
6253
6254
6255

6256
6257
6258
6259
6260
6261
6262
6263
6264
6265

6266
6267
6268
6269
6270

6271

6272
6273
6274

027266
027272
027276
027300
027314
027316
027332
027334
027346
027350
027364
027370
027374
027410
027412

027426

027430
027446

16-JUN-81 14:38

MACY11 30A(1052)

COMMAND LINE PARSING TREE FOR REPORT
.SBTTL
CLIRT:
R10$:

R118:
R12$:
R13$:
R148:

R15$:
R168:
R178:

027452

027456
027460
027462

16-JUN-81

PAGE 13-49

COMMAND LINE PARSING TREE FOR REPORT
CLI CLISPA,0,R10$
;SKIP SPACES IN COMMAND LINE
(LI <'?>,RPHLP,R11S$
IF INPUT = ? THEN PRINT HELP MESSAGE
CLI CLIEXI,O
;AND EXIT PARSER

CLI
CLI
CLI
CLI
CLI
CLI
(LI
CLI
CLI
CLI

CLI
CLI
CLI
(LI
cLl

CLISTR,RPHLP,R128,<'HELP'> IF INPUT
= °"HELP' THEN PRINT HELP
CLIEXI,O
: MESSAGE AND EXIT PARSER
CLISTR,RPEXT,R138,<'EXIT'> ;IF INPUT = 'EXIT' THEN SET KEYWORD =
CLIEXI,O
s RPEXT AND EXIT PARSER
CLISTR,RPLOG,R14$,<'LOG'>
°IF INPUT = 'LOG' THEN GO PRINT EVENT
CLIEXI,O
:LOG AND EXIT PARSER
CLISTR,RNOTNF ,R30$,<'BASE’>; IF INPUT
= 'BASE' THEN MORE COMMAND
CLIBR,0,R158
;.LINE IS NEEDED
<'/>,ANOTNF ,R125$
JIF INPUT = /' THEN LOOK FOR MORE
CLISTR,RPSWE,R16S,<*ERROR'>:IF INPUT = 'ERROR' THEN GO PRINT
CLIEXI,O
:;ERROR INFORMAT]"W
CLISTR,RPSWF ,R17$,<'FULL'> IF INPUT = °‘FULL' THEN GO PRINT
CLIEXI.O
:;ENTIRE BASE TABLE
CLISTR.RNOTNF
R30S, <’ 0FFSET'>'IF INPUT = 'OFFSET' THEN LOOK FOR
<'=>,0,R308

CLI CLIOCT,RPSWO,R30%
R30%:
R125%:

14:39

CLI CLIEXI,O
(LI CLIERR,Q
CLI CLIEXI,O

B{; INPUT OCTAL VALUE THEN GO
:;PRINT SINGLE BASE TABLE ITEM

SEQ 0085

16-JUN-81
MACY11 30A(1052)
CZCLxBO DMR,DMC~11 DATA COMM, LINK TEST
16-JUN-81 14:38
2Lk P11
CL] ACTION DISPATCHER AND ROUTINES

6276
6277
6278
6279
6280
6281

027464
027466
027472
027476
027500
02750¢
027504
027506
027510
027512
027514
027516
027520

006302

027522
027530

112737
000207

177777

027532
027536
027536
027540
027544
027550
027552
027554
027560
027564
027566
027574

012702

003230

027576
027604

027502
027502

RTS

;RETURN

000020

003560

PC,(R2)

.WORD

ACTRNL-10%

.WORD
.WORD
.WORD

ACTREX-10%
ACTRLG-10%
ACTSWE-10%

.WORD

.WORD
.WORD

ACTRHL=-10%

ACTSWF-~10%

ACTSWO-10%
ACTRNF-10%

;MORE COMMAND NEEDED

ACTRNF: mOvB
ACTRNL: RTS

#-1,PSNNUF
PC

JPRINT HELP MESSAGE

ACTRHL: MOV
1%:
PRINTF

#RHLPTB,R?
WHLPF,(R2)+

sNULL

JHELP ROUTINE

JEXIT ROUTINE
JREPORT EVENT LOG ROUTINE
JREPORT ERRORS ROUTINE

;REPORT ENTIRE BASE TABLE

JREPORT SINGLE BASE ADDRESS
<MORE COMMAND NEEDED
;MORE
sNULL

COMMAND NEEDED

JINDEX FOR HELP MESSAGES
<PRINT IT
MOV
MOV
MOV
MOV
TRAP

000002

000006
003246

012737
000207

000002

003202

027606
027612
027620

004737
012737
000207

030574
000003

027622
027626
027630
027636
027644

005737
001026
012737
062737
012737
012737
062737
012737
062737
000425
012737
062737
012737

012406
003432
000006

003462
017370
000012
017370
000003

003250
000006
003430

SEQ 0086

.G0 DO ACTION

013225

003202

027660
027666
027674
027702
027704
027712
027720

#108 ,R2

.WORD

000001

027652

ADD

JSR

000262
000374

012746
012746
010600

PAGE 13-50

.SBTTL
(LI ACTISN DISPATCHER AND ROUTINES
CLIRAC: ASL
2
;SET UF INDEX
MOV
108 (R2) ,R2
H

108:

0122646

14:39

003202

ACTREX:

ACTRLG:

ACTSWE:

007450
007450
007452
007454
007454
007456
007456
007450
007450
007452

CMP

RZ.,#RHLPEN

+LAST MESSAGE ?

MOV
RTS

#RPHLP ,KEYWD1
PC

;SET KEYWORD
JRETURN

BNE

SEXIT REPORT LEVEL

MOV
RTS

#RPEXT ,KEYWD1
PC

+NO,BRANCH

JSET KEYWORD AND RETURN

JPRINT ERROR LOG
JSR
PC ,REPLOG

;G0 PRINT

RTS

sRETURN

MoV

#RPLOG,KEYWD1
PC

EVENT LOG

;SET KEYWORD

JPRINT ONLY ERROR LOCATIONS
TST
OPTYP
;D

BNE
MOV
ADD
MOV
MOV
ADD

108
#DMCIND, INDEX
A6, INDEX
#DMCEND, INDEXE
#BASE ,BEND
#12 ,BEND

;YES ,BRANCH
;SETUP DMC MESSAGES
;POINT TO CORRECT MESSAGE
LAST DMC ADDRESS
JSET UP LAST ADDRESS
::TO BE PRINTED

ggD

gg‘BDATA

JERROR START ADDRESS

MOV

108:

MOV
ADD
MOV

#BASE ,BDATA

#DMRIND, INDEX
#6, INDEX
NDMREND
, INDEXE

JBASE

TABLE

START ADDRESS

JSETUP FOR DMR MESSAGES
JPOINT TO FIRST ERROR MESSAGE
;LAST DMR MESSAGE

ADD

(R2)+,-(SP)

#HLPF ,-(SP)
#2,~(SP)
SP,RO

CSPNTF
#6,sP

CZCLKBO DMR, DHC
=11 DATA COMM.
CZCLKB.P11
16=-JUN-81 14:38

6326
6327
6328
6329
6330
6331
6332
6333
6334

027726

012737

027762

027764
027770

017370
000041
017370
000003
030336

LINK TEST

007454
007454
007456
007456

012406

003432

017370
003250
003430
017370
000177
017370
030336

105037
005737
001004
012737

000403
012737
023737
101416

013746
012746
012746

20%:

MOV
ADD
MOV
ADD
JSR

ACTSWF:

;PRINT FULL BASE
TST
OPTYP

007450
007452
007454

003560
012406

000377

007454

000177
003554

007454
007454

108:

007450

003250
007450

007450

#DMCIND
, INDEX
#DMCEND, INDEXE
#BASE ,BEND

MOV

#BASE ,BDATA

sFIRST ADDRESS TO PRINT

108

#377 ,BEND
208

20%:

#BASE ,BDATA
PC .RPBASE
PC

ACTSWO:

CLRB

5%:

BNE
MOV
BR
MOV

10%:

003432
007450
003462
017370
003554
017370
003554

MOV
MOV
MOV

ADD

012406

012737
060137
012737
012737
063737
012737
063737
000424
012737
060137

TABLE

:DMR ?
s YES ,BRANCH
sSETUP DMC MESSAGES
;LAST MESSAGE
;TABLE START ADDRESS

BNE

TST

cMP
BLOS
PRINTF

TABLE

PSNUM,BEND
108
ARPTIV,PSNUM

OPTYP

ADD
MOV
MOV
ADD
MOV
ADD

MoV
ADD

15%

#DMCIND
, INDEX

R1, INDEX
#DMCEND
, INDE XE
#BASE ,BEND
PSNUM,BEND
#BASE ,BDATA
PSNUM,BDATA

20%

;SETUP DMR MESSAGES
sLAST DMR MESSAGE
;TABLE START ADDRESS

sPRINT 128,

BYTES OF

DATA

LOCATION

5%
#377 ,BEND
7$
#177 ,BEND

TST

ASL

JPRINT 256. BYTES OF DATA

sFIRST ADDRESS TO PRINT
;GO PRINT DATA
;RETURN

OPTYP

#-1,P$GDBD
308
PSNUM,R1

MOV

15%:

PSNNUF

MOVB
BR
MoV
BNE

007452
007454
007454
007456
007456

#4177 ,BEND

SINGLE

SEQ 0087

PAGE 13-51

JRETURN

MOV
JSR
RTS

003561

003554

#3 ,BDATA
PC,RPBASE

#DMRIND
, INDE X
#DMREND
, INDEXE
#BASE ,BEND

7%:

14:39

;SETUP LAST ADDRESS
;.70 BE PRINTED
:START ADDRESS BASE TABLE
;START ADDRESS ERRORS
;GO PRINT DATA

#BASE ,BEND
#41 ,BEND
#BASE ,BDATA

MOV
MoV
MOV

003554
014370
000002
000006
177777

RTS

ADD

007654
007456

007450
007452
007454
007454
007456

MACY11 30A(1052)
16-JUN-81
CLI ACTION DISPATCHER AND ROUTINES

#DMRIND
, INDEX
R1,INDEX

;INIT NOT ENOUGH FLAG
:DMR?

:YES,BRANCH

;BASE TABLE FOR DMC = 256 BYTES
;BRANCH
;BASE TABLE FOR DMR = 128 BYTES
;DMC = 256 BYTES
DMR = 128 BYTES
s YES ,.BRANCH
JPRINT JLLEGAL VALUE

;SET BAD DATA
sRETURN
sOFFSET VALUE

JMULTIPLY BY 2
;DMR ?

*YES,BRANCH

sDMC MESSAGES
;GET RIGHT MESSAGE
sLAST DMC MESSAGE
s TABLE ADDRESS
sLAST ADDRESS
;BASE ADDRESS
sADD OFFSET
;GO PRINT DATA
;SETUP FOR DMR MESSAGES
sGET CORRECT MESSAGE

MOV
MOV
MOV
MOV
TRAP
ADD

PSNUM,
- (SP)

#RPTIV,-(SP)

#2,-(SP)

SP,RO
CSPNTF
#6,SP

CZCLKBO DMR,DMC- 11 DATA COMM.

LINK TEST

6376
6377
6378
6379
6380
6381

007452
007454

CZCLkB.P11

6382

030272
030300
030306
030314
030322
030330
030334

16~JUN-81 14:38
012737
012737
063737
012737
063737
004737
000207

003430
017370

003554
017370
003554
030336

007454
007456
007456

K 7
16-JUN-81

MACY11

30A(1052)

MOV
MOV
ADD
MOV
ADD
JSR

N#DMREND
, INDEXE
#BASE ,BEND

CLI ACTION DISPATCHER AND ROUTINES

20%:
308:

RTS

PSNUM,BEND

#BASE ,BDATA
PSNUM,BDATA
PC ,RPBASE
PC

14:39

PAGE 13-52

;LAST DMR MESSAGE
s TABLE ADDRESS

sLAST ADDRESS
s TABLE ADDRESS
;ADD OFFSET
;GO PRINT SINGLE LOCATION
sRETURN

SEQ 0088

MACY11 30A(1052)
16-JUN-81
CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
16~JUN-81 14:38
CZCLKB.P11
CLI ACTION DISPATCHER AND ROUTINES

SEQ 0089

PAGE 13-53

:.PRINT BASE TABLE SUBROUTINE

6384
6385
6386
6387
6388
6389
6390
6391
6392
6393
6394
6395
6396
6397
6398
6399

FUNCTIONAL DESCRIPTION = THIS ROUTINE IS USED TO PRINT DATA

STORED IN THE BASE TABLE AREA IN MEMORY.
TABLE

IS UPDATED BY THE DMR OR DMC.

THIS BASE

THE USER HAS THE

OPTION OF PRINTING THE FULL TABLE, PRINTING THE FIRST
FEW ERROR LOCATIONS OR A SINGLE LOCATION.

INDEX = CONTAINS POINTER TO DMR OR DM(C DATA
DESCRIPTION MESSAGES.
INDEXE = CONTAINS POINTER TO LAST DMR OR DMC
DESCRIPTION MESSAGES.
BEND - LAST LOCATION IN TABLE TO BE PRINTED.
BDATA - ADDRESS OF DATA TO BE PRINTED.

;DEFINITIONS

6400
6401

6402
6403
6404
6405
(7)

14:39

030336
030340

010146
010246
012746
012746

6)
(3)
(4)
4)

6406
6407
6408
6409
6410

112137

020237

002402
013702
01223%7

6411

6412
6413

64614
(10)
9
(9)

013746

: MOV
RPBASE
MOV
PRINTF

030476
000001

000004
007450
007456
007434
007430
007452

THE ABOVE VARIABLES MUST BE ASSIGNED THE CORRECT VALUES

BEFORE THIS SUBROUTINE IS CALLED.
R1,-(SP)
R2,=(SP)
#BTHEAD

INDEX ,R2
BDATA,R1
R1,TEMP3
(R1)+,TEMP1

:
108

R2, INDEXE

007452
007432

:
208

007432

208
INDEXE ,R2

PRINTF

;SAVE R1

;SAVE R2

;PRINT BRIEF HEADER MESSAGE

;POINTER TO MESSAGES
;ADDRESS OF

#4,SP

SP,RO
CSPNTF

s SAVE CURRENT ADDRESS OF DATA
cREAD DATA
SEND OF MESSAGES?
¢ NO ,BRANCH
s 'SEE MANUAL* MESSAGE

(R2)+,TEMP?
sREAD MESSAGE ADDRESS
N#DMFMT
:PRINT DATA AND
, TEMP3,<B, TEMP1>, TEMP?

TEMP2,~(SP)

SP,RO
CSPNTF

CMP
BLOS
CLRB
MOV
MOV
RTS

003560
030474

030574

ADD

#1,-(SP)

=(SP)
TEMP1, (SP)
TEMP3 ,-(SP)
NDMEMT ,-(SP)
#4,-(SP)

000012
007454

040445
022516

#BTHEAD,~-(SP)

DATA

007430
007434
030547
000004

030476
030547

MOV
MOV
MOV

042101
030523

BTHEAD:

DMFMT:
.EVEN

R1 ,BEND
108
PSNNUF

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

;LAST ADDRESS ?
+NO ,BRANCH

sCLEAR ENOUGH FLAG
;RESTORE R2

;RESTORE R1
JRETURN

LASCIZ /XINXAADDRESSXS2XACONTENTSZS6XADESCRIPTION/
LASCIZ /AINXST1206%S5X03XS5XT/

Mne,sp

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
MACY11 30A(1052)
CZCLkB.P11
16~-JUN-81 14:38
PRINT EVENT LOG
6426

6427

.SBTTL
PRINT EVENT LOG
JPRINT THE EVENT LOG

6428
6429

030574
030576

010246
010346

6631
6432
6433
6434
(7)
(6)
(3)

030602
030606
030614
030616
030616
030622
030626

013702
023727
001034

007550
007552

012746
012746
010600

016250
000001

6430

(4)
(4)

22%2

030600

030630
030632

030636

010446

104416
062706

REPLOG: MOV
MOV

000137

031432

030642

162702

000012

6640
6441
6442

030646
030652
030654

020227
001010
012702

007552

6444

030666

001007

6447

&22

030660

MOV
e
BNE
PRINTS

177777

010454

177776

RPT:

177777

o,
BNE
MOV

R2,AEVTLOG
RPT1
#EVTEND ,R2

;POINTING TO TOP OF EVNT LOG QUEUE?
: BR IF NO
:SET R2 TO POINT TO BOTTOM OfF LOG

BNE

RPTO

;IF END OF LOG IS NOT EMPTY

(MP

R2,EVTPTR

;ARE WE BACK TO POINTER?

JMP

ENDEVT

JIF SO EXIT....

007550

zlgg

030702

000137

031432

6451
6452

030706
030712

162702

000012

(4)
6453
6454
6455
6456
6457

030724

012746
012746
010600

016310
000001

(4)

030712
030716
030722

030726
030732
030734
030740
030744
030750

062706
112203
112237
112237
112237

000004

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

030770
030774
031000
031002

016346
013746
013746
013746

012746
012746
010600
104416

010514
010612
010606
010610

gzgg

031010

000173

062706

000014

010622

JMP

031014
031020
031024

012237
012237
012203

010614
010616

RPTTXQ: MOV
MOV
MOV

(11)
(10)
(9)
(8)

(4)

6460
6461
6462

030750
030754
030760
030764

031004

104416

010612
010606
010610

TRAP
ADD

;NOW POINT BACK TO TOP OF ENTRY U
:JUST PRINTED

020237

(7)
(6)
(3)

:MAKE R2 A POINTER TO EVENT TABLE
:SEE 17 EVENT TABLE IS EMPTY
;BR IF NO
:IF EMPTY TELL OPRERATOR.
MoV
MOV
MoV

#12.R2

JMP

RPTO:
RPTAA:

;SAVE R2
;SAVE R3
:SAVE R4

SuB

cTMMP

RPT1:

EVIPTR,R2
EVTLOG,#-1
RPTO
#NULEVT

SEQ 0090

;AND END

030674

001002

R4 ,=-(SP)

PAGE 13-54

ENDEVT

031432

030700

R2.,~(SP)
R3,~{(SP)

14:39

JMP

000137

6448

030670

026227

MOV

000004

6437
gz%g

6443

m 7
16-JUN-B81

BNE

SUB
PRINTS

=2(R2)
., #-1
ENDEVT

RPTO

#12,R2
#EVTFO

PRINTS

(R2)+,R3
(R2)+ ,EVTT(K

CS$PNTS
#4,SP

JCONTINUE...ELSE EXIT

:IF NOT CONTINUE

;POINT R2 TO START OF ENTRY
:PRINT EVENT ENTRY HEADER

MOV
MOV
MOV

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

ADD

#4 ,SP

TRAP

MOVB
MOVB
MOVB
MOVB

MNULEVT,~(SP)
#1,-(SP)
SP,R0O

:PUT EVENT TYPE INTO R3

CSPNTS

(R2)+ ,EVTSEC
;PUT EVENT TIME (TICKS,SECS.MINS IN TEMP LOC.S)
(R2)+ EVTMIN
#EVTF1,EVTMIN,EVTSEC,EVTTCK,EVILST(R3)
:PRINT EVENT TIME AND DESCRIPT.
MOV
MOV
MOV
MOV
MOV
MOV

016403
000005

MOV
TRAP
ADD

EVILST(R3) ,~(SP)
EVITCK,~(SP)
EVTSEC,~(SP)
EVTMIN,-(SP)

#EVTIF1,=(SP)
#5,-(SP)
SP,RO
CSPNTS
”4,SP

8RPTDSP(R3)

;DISPATCH TO DECODING SECTION FOR SPECIFIC TYPE

(R2)+,EVTADD
(R2)+,EVTBCT
(R2)+,R3

:STORE MESSAGE ADDRESS FOR PRINTING
;STORE BYTE COUNT FOR PRINTING
;STORE MODEM STATUS FOR PRINTING

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

CZCLkB.P1

6463
(9)
(8)
(7)

16~JUN-81

031026

(6)

14:38

MACY11 30A(1052)

PRINT EVENT LOG

PRINTS

013746
013746
012746
012746

6466
6467
6468
6469
6470
(8)
(7)
(6)
3)

(4)

;PRINT ADDR,BYTE CNT

EVTBCT,=(SP)
EVTADD,=(SP)

SP,RO

RPTDER:

013746
012746
012746
010600

013746
013746
012746
012746

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

(R2)+,EVTTMP
(R2)
+ .DEV1
(R2)+ . DEV2

;GET ADDRESS OF DEVICE INFO MESSAGE
;STORE DEVICE REG CONTENTS FOR PRINTING

PRINTS

#EVIFS. EVITMP

PRINTS

WEVTF3C,DEV1,DEVZ2

031156

RPT

031162
031166
031172
031176
031202
031206
031212
031214
031220
031222

010654
010656

032340

012237

031256
031262
031266
031270
031272

031276

DEVI
DEVZ2
(R2)+,DEV]
(R2)+,DEV?
(R2)+ ,DEV3
(R2)+ ,DEV4
R2,=(SP)

RPTDVI:

030642
010614
010616
010620

013746
013746
013746
012746
012746
010600

010620
010616
010614
016755
000004

062706

000012

000137

030642

104416

PC, SHWOP

(SP)+,R2

RPT

RPTEOP:

PRINTS

CSPNTS
#10,SP

PC,RPTMSB
RPT

JPRINT DEVICE REG CONTENTS.

104416

062706

6471

6488
6489
6490

SEQ 009

PAGE 13-55

WEVTF2,=(SP)

012237
012237
012237

(4)
(4)

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

W#EVTF2,EVTADD,EVTBCT

14:39

#3,-(SP)

6465

6472
6473
6474
6475
6476
6477
6478
6479
6480
6481
6482
6483
6484
6485
6486
6487
ao
(9)
(8)

0600

(3)

(4)
(4)
6464

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

16-JUN=-81

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

;GO BACK FOR NEXT EVENT ENTRY

MOV
MOV
MOV
MOV
TRAP
ADD

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

MOV
MOV
MOV
Mov
MOV
TRAP
ADD

DEVZ2,~(SP)
DEV1,=-(SP)

#10,5P

;SAVE R2 ON THE STACK
;GO PRINT MODE, MAINT-LOOP TYPE, PARAMTERS.
JRESTORE R?2
:GO BACK FOR NEXT EVENT ENTRY

W#EVTF4B,EVTADD
,EVTBCT EVITMP

RPT

SP,RO
CSPNTS

;CLEAR UPPER BYTES OF DEV1 & DEV2 BEFORE USE
;STORE SETUP OPERATION PARAMETERS FOR PRINTING

;PRINT ADDR,RXBYTES,CMPBYTES.
MOV
MOV
MOV
MO\
MOV
MOV

TRAP
ADD

JMP

WEVTF3C,-(SP)
#3,-(SP)

;THEN GO GET NEXT EVENT ENTRY

EVITMP,~(SP)
EVIBCT,~(SP)
EVTADD ,~(SP)
NEVTF4B,-(SP)
¥4 ,-(SP)

SP,RO
CSPNTS

Me,sp

CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST

(9)

6503
6504
6505
6506
6507
6508
6509
6510
6511
6512
6513
6514
6515

(7)
(6)
(3)
4)
(4)
6516

6517
6518

N —s—
ooy

14:39

PAGE 13-56

000012
030642

012237
012237
012237

0 10614
0 10616
0 10620

013746
013746
013746
012746
012746

0 10620
010616
010614
016657
000004

031420
031422

010600
104416
062706

031426

000137

031432
031434
031436
031440

012604
012603
012602
000207

RPTDLE:
RPTDCK:

(R2)+,EVIADD
;STORE MESSAGE ADDRESS FOR PRINTING
(R2)+.EVIBCT
:STORE BYTE COUNT FOR PRINTING
(RO)+,EVITMP
:STORE TOTAL # OF CMP ERRORS
#EVTF4,EVTADD,EVTBCT,EVITMP
;PRINT ADDR, BYTE CNT, # (MP ERRS

RPT

;THEN GO GET NEXT EVENT ENTRY

MOV
MOV

(R2)+,EVTADD
(R2)+,EVIBCT

;STORE MSG ADDR FOR PRINT
:STORE BYTE COUNT

PRINTS

#EVIF4A,EVTADD,EVTBCT,EVITMP

JMP

RPT

sTHEN GO GET NEXT EVENT ENTRY

(SP)+ R4
(SP)+,R3
(SP)+,R2

JRESTORE R4 ,R3,R2

MOV

(R2)+,EVITMP

ENDEVT: MOV
MOV
MOV
RTS

;REPORT MODEM STATUS SUBROUT INE
031442
031442
031446
031452
031454
031456

031472
031474
031476
031502
031504
031506
031510
031512

017143
000001

000004
010460
010476

RPTMSB:

6%:

000130

112735

000061

EVITMP,~(SP)
EVIBCT.-(SP)
EVTADD,-(SP)
WEVTF4,-(SP)
#4,-(SP)
SP,RO
CSPNTS
#12,SP

;PRINT ADDR,RXBYTES,CMPBYTES.

MOV
MoV
MOV
MOV
MOV
MOV
TRAP
ADD

EVITMP,=-(SP)
EVTB(CT,-(SP)
EVTADD,-(SP)
NEVTF4LA ,-(SP)
#4,-(SP)
SP,RO
CSPNTS
M2,SP

RETURN TO CALLING ROUTINE

PART OF

STATISICAL REPORTING

PRINTS

#EVMOHD

MOV

#MOBITS,R4

NEVMOHD,-(SP)
MOV
#1,-(SP)
MOV
MoV
SP,RO
TRAP
CSPNTS
ADD__
#4,SP
:MAKE R4 A POINTER TO MODEM SIG. BT DEF. TABLE

TST

(R4)

:SEE_IF BIT AVAIABLE FROM DEVICE

MOV
BNE

#MOMSGS.RS
78

(DUMPING EVENT LOG)
;PRINT MODEM STATUS HEADER

MAKE RS A POINTER TO MODEM MSG. POSITION TABLE
:BR_IF THAT MODEM SIG. AVAIABLE

MOVB

A'X,@(R5)+

GO SEE IF CHECKED ALL MODEM SIGNALS

BEQ

:BR IF BIT (SIGNAL) VALUE =0

TST

7$:

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

:STORE BYTE COUNT (OMP

000012
030642

SEQ 0092

MoV
MOV
MOV
PRINTS

00,004

6496 031352
6497
6498 031356
6499
6500
6501
6502
(10)

4)
(4)

RPTDDE
:

B 8
16-JUN-81

016555

(4)

(8)
(7)
6)
(3)

PRINT EVENT LOG

—_— )
Ss00

QOO

b
d

OO0O

6491
6492
6493
6494
6495
agm
(9)
(8)
(7)
(6)
(3)
(4)

14:38
jolele]

16~JUN-81

CZCLKB.P11

MACY11 30A(1052)

BIT

MOVB

(R4S +

(R4)+ K3

#'1,3(R5)+

ELSE PUT *X'' IN REPORT IF SIGNAL NOT AVAILABLE

:BMP R4 TO POINT TO NEXT BIT DEF INITION

:IF THERE,

SEE IF THAT BIT IN DEVICE'S ENTRY=1

:IF=1, PUT

"' IN REPORT MESSAGE

CZCLxBO DMR,DMC-1 1 DATA COMM.
CZCLKB.P11
16-JUN-B1 14:38

6526
6527
6528
6529
6530
(7)
(6)
(3)
(4)
(4)
9233);

031516
031520
031524
031530
031532
031532
031536
031542
031544
031546
031552

000402
112735
020427
002760
012746
012746
010600
104416
062706
000207

000060
010476
017223
000001
000004

LINK TEST

MACY11 30A(1052)
PRINT EVENT LOG

8s:
9%:

BR
Mmove
cMP
BLT

PRINTS

RTS

9s
#'0,8(R5)¢
R4 ,AMOBITE
63
#EVMOST

16-JUN-81

14:39

PAGE 13-57

SEQ 0093

;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
s THEN PRINT MODEM SIGNAL VALUE MESSAGE
MoV
#EVMOST
- (SP)

JRETURN TO EVENT DErCDING

MoV
MoV
TRAP
ADD

#1,-(SP)
SP,RO
CSPNTS
6 ,SP

C2CLxBO DMR,DMC-11 DATA COMM. LINK TEST

<ICLKB.P11

16-JUN-81

MACY11 30A(1052)

14:38

0D 8
16-JUN-81

DUMP BYTES OR WORDS

.SBTTL

14:39

PAGE 13-58

SEQ 0094

6535
6536
6537
6538
6539

J4e
* FUNCTIONAL DESCRIPTION:

;

DUMPSR -~ DUMP BYTES OR WORDS SUBROUTINE

6542

6546
6547
6548
6549
6550
6551

:
N
:
;
:
:

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 LINE WITH THE
ADDRESS OF THE FIRST BYTE AS THE FIRST 6 OCTAL CHARS. FOLLOWED

ggzg

6543
6544
6545

:
:
:

ggg%

;

DUMP BYTES OR WORDS

BY A SEMICOLON.

INPUTS:
STADD=
STARTING ADDRESS (FIRST LOC. TO PRINT)
ENADD=
"D ADDRESS (LAST LOCATION TO DUMP)
BYTBIT= 1 [F SUPPOSED TO PRINT 'BYTES''

0 IF SUPPOSED TO PRINT ‘WORDS''

6554

1 OUTPUTS:

6557

gggz

gggg

Sa6n

;

6562
6563
6564
(8)

031554
031560
031562
031562

(4)
6565
6566
6567

031600
031604
031610
031612

(8)
(8)
(7)

031616
031620
031626

(7)
(6)
(3)
(&)

6568
(6)
(3)

(4)

(4)
6569
6570
(8)
(7)
(6)
(3)
(4)
(4)

6571

031564
031570
031574
031576

031616

031630
031634
031636

031640
031644
031646
031646
031650
031654
031660
031662
031664

031670

013702
005003
010246
012746
012746
010600
104417
062706
005737
001416

112237

005046
153716
0127646

012746
010600

104417

062706
000411

012246
012746
012746
010600
104417
062706

020237

007402

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

CALLING SEQUENCE:

JSR PC.,DUMPSR

‘=

:CALL DUMP BYTES SUBROUTINE

DUMPSR: MOV
DUM4:
CLR
PRINTF

STADD,R2
R3
#BASM1,R2

;SET R2 UP TO STARTING ADDR.
:CLEAR R3
:PRINT ADDRESS

puM3:

BYTBIT
puMi
(R2)+,TEMP

;IS THIS BYTE OR WORD
:BR IF WORD
‘MOV BYTE TO TEMP

MOV
MOV
MOV
MOV
TRAP
ADD

R2,~(SP)
#BASM1,
= (SP)
#2,~(SP)
SP.RO
CSPNTF

007426
016224
000002

CLR
BISB
MOV
MOV
MOV

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

000006

ADD

#6,SP

MOV
MOV
MOV
MOV
TRAP
ADD

(R2) +,~(SP)
#BASM2 ,~(SP)
#2,-(SP)

016262
000002

000006
007406

007426

TST
BEQ
MOVB

PRINTF

#BASMS, <B,TEMP> :PRINT BYTE

TRAP

DUM1:

BR
PRINTF

puUM2
#BASM2,(R2)+

:PRINT WORD

016233
000007
000006

007404

DUM2:

(MP

RZ,ENADD

; COMPARE FOR LAST ADD

#6,SP

CSPNTF

SP.RO
CS$PNTF
#6,SP

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-81 14:38

16-JUN-81
MACY11 30A(1052)
DUMP BYTES OR WORDS

6572
6573
6574
6575
6576
6577
6578
6579

BGT
INC
(MP
BEQ

#8. ,R3
DUM4

RTS

CZCLKB.P11

031674
031676
031700
031704
031706

00300%
005203
022703
001725
000736

031710

000207

000010

X:
DUME

X
DUME

DuM3

14:39

PAGE 13-59

:IF DUNE EXIT

JELSE BUMP R3
JHAVE WE PRINTED 8 ACCROSS
¢1F SO GO BACK TO 4

;ELSE GO BACK AND PRINT ANOTHER

sBYTE OR WORD

JRETURN TO CALLER

SEQ 0095

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

CZCLKB.P11T

16~JUN-81 14:38

ggg}

6584
6585
6586
6587

1S PRINTED TELLING THE OPERATOR THE TRUNCATION OCCURED.

L OINPUTS:

gggg

6591

;

CURCC=
TOTCC=

C(HAR.

TOTAL

6594

. OUTPUTS:

6597

* FUNCTIONAL SIDE EFFECTS:

228?

;

gggg

6558
¢599

:
:

007412
001000

007422
007422

(7)
6)
(3)
(4)
(4)
6611

6612

6613

6614
6615
6616

031730
031734
0317640
031742
031744
031750

031756

031764

031772
032000
032006

012746
012746
010600
104617
062706
163737

015272
000001

163737

007422

012737
013737
063737
000207

000004

CHAR COUNT OF BUFFER ITS BEING ADDED TO

MESSAGE TO OPERATOR [F MESSAGE TRUNCATED TO FIT

ADDCC:

JSR

ADD
(MP
BHIS
:

031730

COUNT OF MESSAGE BEING ADDED

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

2283

6610

SEQ 0096

: 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

6590

063737
022737
103027

PAGE 13-60

UPDATE TOTAL CHAR. COUNT SUBROUTINE

071712
031720
031726

14:39

gggg

6504
6605
2289

16-JUN-81

UPDATE TOTAL CHAR. COUNT SUBROUTINE

.SBTTL

6583

MACYT1 30A(1052)

PC,ADCC

CURCC,TOTCC
MBUFLIM,TOTCC
ADDC1

:UPDATED TOTAL CHAR. COUNT

;ADD CURRENT TO TOTAL
: COMPARE TO 'BUFLIM'’
:IF NOT MORE THEN 'BUFLIM' EXIT

PRINT MESSAGE AND TRUNCATE

PRINTF

MMSGTRU

COUNT

MOV
MOV
MOV
TRAP
ADD

#MSGTRU,-(SP)
#,-(SP)
SP,RO
CSPNTF
#4 ,SP

007412
001000

007422
007426

SUR
Mov

CURCC,TOTCC
#BUFLIM, TEMP

:SUB CURRENT FROM TOTAL
:MOV ‘BUFLIM' TO TEMP

007426
007412

007412
007422

MOV
ADD
RTS

TEMP, CURCC
CURCC,TOTCC
PC

AND ESTABLISH NEW CURRENT
:ADD '‘ADJUSTED CURRENT'' TO TOTAL CHAR. CNT.
:RETURN TO CALLER

007426

SuB

ADDC1:

TOTCC,TEMP

;SUB TOTAL FROM ‘'BUFLIM"

CZCLkBO DMR,DMC~11 DATA COMM, LINK TEST

cZcLkBe.P1

16=-JUN-81

MACY11

6619
6620

LSBTTL

6622

;

2232

PAGE 13-61

BUILD MESSAGE BUFFERS SUBROUTINE

.44

661

G 8
16-JUN-B81

14:39
BUILD MESSAGE BUFFERS SUBROUTINE

14:38

30A(1052)

FUNCTIONAL

DESCRIPTION:

BLDBUF~-~ BUILD POINTER TABLE AND BUFFERS

6625

;

6628
6629
6630
6631
6632
6633
6634
6635
6636

: INPUTS:
;
CURCC=
C(HAR. COUNT OF MESSAGE TO BE ADDED
:
CURADD= ADDRESS OF MESSAGE TO BE ADDED
:
CPTR=
ADDRESS OF POINTER TABLE WORD WHERE MESSAGE POINTERS ARE
:
TO BE BUILT
:
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

6639

;

2259

gg%g

6642
6643
6644
6645
2229

032010
032010
032012
032014

010246
010346
013702

007416

6648

032020

013722

007420

6656
6657
6658
6659
6660

6661

6662
6663
6664
6665

6666

6667
6668

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

222?

6649
6650
6651
6652
6653
6654
6655

THIS SUBROUTINE ADDS A MESSAGE TO THE TRANSMIT OR EXPECT LIST

;

032024
032030
032034
032040
032042
032050
(032056

032062
032070
032074
032100
032102

032106

032110
032114
032116
032120

032126

032130
032132

013722
010237
013702
006302
013737
063737
013703

016237
016204
060437
112423
020337

001404

020437
001762
000770
063737

012603

012602
000207

APPROPR]IATE POINTERS

CALLING SEQUENCE:

JSR PC,BLDBUF

;JBUILD MESSAGE IN BUFFER AND ADD PTRS.

MOV
MOV
MOV

R2,-(SP)
R3,~(SP)
CPTR,R2

:SAVE R2 AND R3 ON THE STACK

BLDB1:

MOV

CURADD, (R2) +

;PUT CURRENT ADD ON POINTER TAB

BLDB2:

MOV
MOV
ADD
MOVR
(s

BLDBUF:

007412
007416
007410

007420
007412
007420
002150
002176
007432

007426
007426

007432

BLDB3:

007426

007432
007412

007420

IN PTRTAB POINTER TABLE

MOV
MOV
MOV
ASL
MOV
ADD
MOV

CURCC, (R2) +
R2,CPTR
MSGTYP,R2
RZ
CURADD, TEMP
CURCC,TEMP
CURADD ,R3

;PUT CURRENT CC ON POINTER TAB
;PUT UPDATED R2 BACK TO CURRENT POINT
:GET MESSAGE TYPE TO USE AS INDEX
;DOUBLE FOR WORD INDEX
;MOVE CURRENT ADD TO TEMP
;ADD CHAR COUNT TO IT TO GET END
;SET R3 TO CURRENT START ADD

BEQ

BLDBREX

JIF SO EXIT

BLDR3
CURCC, CURADD

:IF NOT GET ANOTHER BYTE
;BUMP CURADD

DMSGCT(R2) ,TEMP?
DMSGAD (R2) ,R4
;PUT
R4, TEMP2
JADD
(R4)+,(R3)+
:MOV
R3,TEMP
JALL

CMP
BEQ

R4, TEMP2
BLDR?

MOV

(SP) ¢+ ,R3

BR
BLDBEX: ADD

MOV
RTS

(SP)+ ,R?2
PC

;GET BYTE COUNT
STARTING FROM ADD IN R4
IT TO TEMP2 TO GET END OF FROM
BYTE FROM PATTERN TO BUFFER
DONE?

;1S PATTERN COUNT EXPIRED
:IF SO GO START AGAIN

RESTORE R3 AND R2
:RETURN TO CALLER

SEQ 0097

(REATE FACSIMILE OF

.SBTTL

16-JUN-81

14:39

PAGE 13-62

SEQ 0098

TX BUFFER AND MESSAGE LIST

C(REATE FACSIMILE OF

TX BUFFER AND MESSAGE LIST

R
2

03
04 B¢ % BB, B0 869, 9, %, 8,0, 890809, 0, 0, 9%000%%9%9 %0 %:0,80, 9, 0, 9, 9,

THIS ROUTINE ADDED FOR REV B BY EC
FUNCTIONAL DESCRIPTION:
FACSIMILE: THIS ROUTINE IS USED TO CREATE A FACSIMILE OF

e W

6676
6677
6678
6679

14:38

Ve Ve Vg Ou VP VPGP Te B

6671
6672
6673
6674
6675

16-JUN-81

C2CLkB.P1

MACY11 30A(1052)

Ve BB 0. B

CZCLKBN DMR,DMC-11 DATA COMM. LINK TEST

THE

OF THE TRANSMIT LIST AND TRANSMIT BUFFER IN THE
EXPECTED LIST AND EXPECTED BUFFER. THE ROUTINE IS
NORMALLY CALLED WHEN USER COMMAND '‘SET E [XPECT]=
T CRANSMIT] IS ENTERED.

CALLING SEQUENCE:
DEF INITIONS

JSR

PC,FACSIMILE

CMPBUF
EXPECTED DATA BUFFER
TXBUF
= TRANSMIT DATA BUFFER

HOLDS MAX 512 BYTES

TTOTCC = NUMBER OF BYTES IN TXBUF
PTRTAB = TOP OF MESSAGE LIST POINTER TABLE

CTOTCC = NUMBER OF BYTES IN EXPECT MESSAGE
CMPTOT = NUMBER OF EXPECTED MESSAGES
CMPPTR = EXPECTED MESSAGE LIST POINTER

TXPTR
TXMTOT
CCURAD
MSGLIN

=
=
=
=

TRANSMIT MESSAGE LIST POINTER
NUMBER OF TRANSMIT MESSAGES
STORAGE ADDRESS OF MESSAGE IN CMPBUF
MAXIMUM NUMBER OF MESSAGES THAT CAN BE

BEGIN FACSIMILE ROUTINE
(«COPY TXBUF ==> (MPBUF*)

..SAVE Rl
..INIT R1
. .REPEAT

IR1
.+ ..[CMPBUFIR1=LTXBUF
.+..R1=R1+1
..UNTIL R1 = BUFLIM

(*NOW CALCULATE EXPECT LIST MESSAGE POINTER*)

..CMPPTR = PTRTAB +

(2 * MSGLIM)

(*NOW PRIME THE WHILE - DO LOOP®)
..TXPTR = PTRTAB
..CCURAD = CMPBUF
.« TXPTR = TXPTR + 2

«.CTOTCC = [(TXPTR]
..CMPTOT = 0
.. WHILE TXMTOT <> CMPTOT DO
«oo.LCMPPTR] = CCURAD
eees CMPPTR = CMPPRT + 2
e« LCMPPTR] = CTOTCC
ceeas TXPTR = TXPTR + 4
.o+

CCURAD = CCURAD + CTOT(C

es«.CTOTCC = [TXPTR]
«es.(MPPTR = CMPPTR + 2
«...CMPTOT = CMPTOT + 1
..END WHILE DO

..CTCTCC = TTOTCC
END FACSIMILE ROUTINE

STORED

CZCLkBO DMR,DM(C-11

CZCLkB.PIN

6727
6728
6729
6730
6731
6732
6733
6734
6735
6736
6737
6738
6739
6740
6741
6762
6743
6764
6745
6746
6747
6768
6749
6750
6751
6752
6753
6754
6755
6756
6757
6758
6759
6760
6761
6762

6763

6764
6765
6766
6767
6768
6769

DATA (OMM,

16~JUN-81

010146
005001
116161

005201
020127
001371

14:38

LINK TEST

FACSIMILE:

003562

005562

006562
007336

007336

032202
032210
032216
032224
032232

012737
012737
062737
017737
005037

006562

007334
007344
007334
007342

032236
032244
032246
032254
032262
032270

023737
001430
013777
062737
013777

007354

007340

007344
000002
007342

155062
007336

032324

000744

013737

032334
032336

012601
000207

005562
000002
155104
007340

007340
007356

20$:

R1,~(SP)
R1

s SAVE R1
JINIT R1

INC

;BUMP INDEX

BNE

108

MovB

TXBUF (R1),CMPBUF (R1)

R1,#MBUFLIM

:NO .BRANCH

MMSGL IM,R1

sMESSAGE LIMIT

MOV

#PTRTAB,CMPPTR

;TOP OF POINTER TABLE

CLR

ASL
ASL

R1
R1

R1,CMPPTR

#PTRTAB,TXPTR
#CMPBUF , CCURAD
#2 ,TXPTR
aTXPTR,CTOTCC

JWHILE

TX MESSAGE

ADD
ADD
MoV
ADD

6, TXPTR
CT0TCC,CCURAD
aTXPTR,CTOTCC
#2,CMPPTR

cmp
BEQ
MOV
ADD
MoV

INC
BR

40%:

CMFTOT

RTS

:START OF

EXPECTED POINTER TABLE

sTX POINTER NOW AT TOP OF TABLE
s TRANSFER ADDRESS OF 1ST MESSAGE
;BUMP POINTER
;BYTE (OUNTER 1ST MESSAGE
JINIT EXPECTED MESSAGE
<> EXPECTED MESSAGE

TOTAL

COUNT

sALL MESSAGES COPIED ?
s YES ,BRANCH
; TRANSFER ADDRESS OF MESSAGE
;BUMP POINTER
;BYTE COUNT OF MESSAGE

;BUMP TX MESSAGE POINTER
sCALC. TRANSFER ADDRESS
;sBYTE COUNT NEXT MESSAGE
;BUMP POINTER

CMPTOT
308

; INCREMENT MESSAGE COUNT
;DO IT AGAIN

TT0TCC,CTOTCC

:COPY TOTAL CHARACTER COUNT

;END ROUTINE

MOV

TOTAL

TXMTOT, CMPTOT
403
CCURAD ,aCMPPTR
#2,CMPPTR
CTOTCC,aCMPPTR

JEND WHILE - DO

MoV

sMULTIPLY BY 2
;MULTIPLY BY 2

JINIT R1

MoV
MOV
ADD
MOV

(LR

155046

;COPY TX BUFFER TO EXPECTED BUFFER

;ALL DATA COPIED ?

;SET UP WHILE - DO LOOP

30s:

SEQ 0099

MOV

ADD

007334
007344
007342
007336

007342

MOV
CLR

cMP

000017

032326

10$:

001000

012701
006301
006301
012737
060137
005001

062737
063737
017737
062737
005237

MACY11 30A(1052)
16-JUN-81
14:39 PAGE 13-63
CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST

(SP)+,R1

;RESTORE R1
JRETURN

MACY11 30A(1052)

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
16=-JUN~81 14:38
fZCLKB.P11

6771
6772
6773
6774
6775
6776
6777
6778
6779
6780
6781
678¢
6783
6784

J 8
16-JUN-81

14:39

PAGE 13-64

SEQ 0100

SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS

LSBTTL

SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS

;

FUNCTIONAL DESCRIPTION:

SHWOP ~ SHOW MODE OF OPERATION, LOOP, QULAIFIERS

;

PRINTED ON THE OPERATOR'S CONSOLE.

INPUTS:

DEV1=

DEV?2=

DEVé=

DEV3=

;
.
.

MODE TYPE (MODTYP)

MAINT LOOP TYPE (MLTYP)

‘RUN PASS’'' COUNT (RPASS) = COUNT DOWN

PARAMTERS WORD (PARAM)

IMPLICIT INPUTS:
MODES= TABLE OF ADDRESSES OF MODE NAME STRINGS
LOOPS= TABLE OF ADDRESSES OF LOOP TYPE NAMES

22228 S283R8E

; CALLING SEQUENCE:
JSR P(C,SHWOP
:
SHWOP:

032340
032344
032346
032354
032360
032362
032370
032372
032374
032402
032410
032416
032416
032422
032426
032432
032436
032442
032446
032450
032452

013702
006302
016237
013702

104416
062706

000014

032456
032460
032466
032474
032476

005002
012737
032737

014715
000001

007426
010656

014713
014726
000002

007426
007430
010656

1%:

014724
014736
000004

007430
007432
010656

’%:

014734

007432

032546

016237
013737
013746
013746
013746
013746
012746
012746
010600

012737

010650
003514
010652

007426

014636

007434

014635
003532
010654

007434
007430
007432

MOV
ASL
MOV
:g{

DEV1,R2
R2
MODES(R?2) ,TEMP
gSVZ.RZ

MOV

#LPO0, TEMP3

BNE
MOV

108
#LPO,TEMP3

MOV

DEV3,TEMP?

TST

108 :

MOV

PRINTS

007432
007430
007434
007426
015355

;GET THE MODE TYPE IN R2
¢sMAKE IT A WORD TABLE OFFSET
;GET ADDRESS OF MODE-IN-ASCII
;GET MAINTENANCE LOOP TYPE
:LOAD TEMP3 TO POINT TO ‘‘/LOOP="'

JSEE

IF /7LOOP=XXXXX OR NONE

LOOPS(R2) ,TEMP1

GET ADDRESS OF

; BR IF /LOOP= OF SOME KIND
JIF NO LOOP THEN DON'T PRINT ‘‘/LOOP="'
LOOP-IN-ASCII

;GET NUMBER OF PASSES

WSHFO,TEMP,TEMP3,TEMP1,TEMP?

MOV
MOV
MOV
MOV
MOV
MOV
MOV

000005

TRAP
ADD

CLR
MOV
8IT

BNE

MOV
MOV

8IT

BNE
MOV
MOV
8IT
BNE
MOV

R2
#PST ,TEMP
#STATB,DEVS
18
APNST
, TEMP

cNOW SET UP FOR QUALIFIERS

#DAT(CKB,DEVSL

JSEE JF /CHECK OR /NOCHECK

#PCK, TEMPT

23
#PNCK
, TEMP1
#PEC,TEMP?
#ECHOB,DEV4
33
#PNEC, TEMP2

IN ASCII

;SEE IF /STATUS OR /NOSTATUS
:BR IF /STATUS

;BR IF /CHECK

:SEE IF /ECHO OR /NOECHO
;BR IF /ECHO

TEMP2 ,~(SP)
TEMP] ,-(SP)
TEMP3 ,-(SP)
TEMP,~(SP)
#SHFO,~-(SP)
#5,-(SP)
SP,RO

CSPNTS
”4,SP

K 8
16-JUN-81
14:39 PAGE 13-65
MACY11 30A(1052)
SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS

C2CLKBO DMR,DMC-11 DATA (OMM. LINK TEST

czcLkB.PIN

6818
6819
6820

032554
032562
032570
032572

16-JUN-81

14:38

012737
032737
001003
012737

014745
000010

007440
010656

014743

0074490

013746
013746
013746
013746
012746
012746
010600

007440
007432
007430
007426
015413
000005

062706
000207

000014

104416

3$:

5%:

MOV
BIT
BNE
MOV

WPM
, TEMPS
S
gHOCHK.DEVA

sASSUME /MODEM ;REV B8 EC

A#PNMS
, TEMPS

;' '/NOMODEM'' MESSAGE ;REV B EC

PRINTS

NSHF1,TEMP,TEMP1,TEMP2,
TEMPS

RTS

SEQ 0101

sMODEM CHECK ? ;REV B EC

sYES ,BRANCH ;REV B EC

;RETURN

;

TEMP3 TEMP4L ++;SEE NOTE ABOVE
MoV
MOV
MoV
MOV
MOV
MOV
MOV

TRAP
ADD

TEMPS ,-(SP)
TEMP?2 ,~(SP)
TEMP1,-(SP)

TEMP,-(SP)
ASHF1,-(SP)
#5,-(SP)

SP,RO
CSPNTS

#14,SP

L 8
MACY11 30A(1052)
16-JUN-81
14:39
TRAVERSE COMMAND L INE SUBROUTINES

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
CZ2CLkB.P11
16=JUN-81 14:38

TRAVERSE COMMAND LINE SUBROUTINES

LSBTTL

PAGE 13-66

6848

s+t

6851
6852
6853
232’50

;PARSE THE COMMAND LINE SUBROUTINE
;TAKE ACTIONS (VIA ACTION TREE) AS PARCING LINE
:PARSING DIRECTIONS FROM ‘‘CLI PARSING NODES''
REGS USED:
.

6856

6862
6863
6864
6865
6866
6867
6868
6869
6870

ggég

6857
6858
6859
6860
6861

6871
6872
6873
6874
6875
gg;g

6878
6879

032642
032642
032646
032652
032654

032656
032662
032664
032666
032670
032674
032700

032702

013704
013703
105714
001441
121327
003023

6882
6883
6884
6885

032712
032714
032716
032720

000162
000204
000270
000604

6887
6888
gggg

032722

032724
032726
032730

108 :

000152

000650

(R3) RS

RS
108(RS) ,RS
#108 RS
PC, (RS)

PS$TRS

;SEE IF ANY (HARS LEFT IN INPUT STRING
;BR IF NO
JSEE IF SPECIAL CLI CHAR CODE OR ASCII
;BR IF REGULAR ASCII CHAR.

:GET SPECIAL CHAR CODE INTO RS

;BUILD TRAVERSE ROUTINE ADDRESS
;JSR TO SPECIAL CLI TRAVERSE ROUTINE

;GO SEE JF MORE OF STRING LEFT

.WORD

TRVEXI-10%

JTAKE EXIT ACTION

.WORD
.WORD
.WORD
.WORD

TRVBIF-10%
TRVSPA-10%
TRVNUM-10%
TRVALP-10%

:TEST PSGDBD L TAKE BRANCH
;SKIP SPACES OR TABS IN CMD LINE
:TRAVERSE NUMERIC FIELD
;TRAVERSE ALPHABETICS

TRVOCT-10$
TRVDEC-10%
TRYSTR-10%

:SAME AS TRVNUM
JSAME AS CLINUM BUT DECIMAL
JFIND ASCIZ MATCH IN CMD LINE

.WORD

000270
000256
000736

PSBUFA,R4
P$TREE ,R3
(R4)
PSEXIT
(R3) ,#11.
208

PSNUM=NUMERIC CODE FROM DATA

;TRAVERSE TABLE FOR 'CLI FUNTIONS'
.WORD
TRVERR-10%
:TAKE ERROR ACTION
.WORD

.WORD
.WORD
. WORD

TRVBR-10%

TRVALN-10%

;TAKE BRANCH ACTION

;TRAVERSE ALPHANUMERICS

;NOT A SPECIAL CODE
032732
032734
032736

121314
00140
004737

033002

6897
6898

032744
032750

004737
062703

032762
000004

6900
6901

MOV
MOV
TSTB
BEQ
CMP8
BGT

MOVB
ASL
MOV
ADD
JSR
B8R

032704
032704

6893
6894
6895

6899

PS$TRS5:

000013

ggg}

6896

PSTRYV:

000763

6880

032710

003544
003546

111305

006305
016505
062705
004715

000114
000134

6886

R1,R5=SCRAT(CH

H
R2=ACTION CODE PARAMETER FROM TREE
M
R3=PARSE TREE POINTER
N
R4=INPUT STRING POINTER
; CALLING SEQUENCE:
:
JSR
PC,PSTRY

032704
032706

6881

P$TRV SUBROUI]TNE

032742

032754
032756

00074

005204
000735

208 :

22%:

CMP8
BEQ
JSR

(R3), (R4)
223
PC,TRVBRC

JSEE IF FIRST CHAR OF STRING IS A MATCH
:BR IF A MATCH
JIF NOT A MATCH, GO TAKE MISS BRANCH

JSR
ADD

PC,TRVACT
#6 ,R3

;IF A MATCH, GO DO ACTION DEF INED BY
; ACTION CODE IN CLI NODE, THEN

INC
BR

PS$TRS

R4
P$TRS

; THEN GO BACK PT'G TO MISS NODE
; ADJUST PTR TO NEXT CLI NODE

;ADJUST BUF PTR TO NEXT CHAR IF MATCH

SEQ 0102

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKkB.P11
6902

gggz

032760

16=-JUN-81 14:38
000207

6908

116302

;GOTO USER Acnon ROUT INE

TRVACT: MOVB

6910 032772 013705 003550

MOV

gg}_%

RTS

032766

042702

6911

032776

004715

6914
6915

033002

016305

gg}g

033010

000207

6916

6919

033000

033006

177400

000207

060503

033012
0323016

062703
000207

000004

6923
6924
6925
6926

033020
033024
033032

004737
112737
005726

032762
177777

6929
6930
6931

033040
033044
033050

004737
105037
005726

032762
003561

693%

033056

004737

033066

004737

gg% 033034

6937

6938
6939

033072
033076

105737
001402

PC. (R5)

2GO DO ACTION DEFINED BY CODE

;GET BRANCH DISPLACEMENT FROM TREE

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

PC,TRVACT
#-1,P$GDBD
(SP)+

:TAKE ERROR ACTION
*SET ERROR RETURN FLAG
:GET RID OF ''JSR PUSH TO TRVERR''

TRVEXI: JSR
CLRB
ST

PC,TRVACT
P$GDBD
(SP)+

;TAKE EXIT ACTION
SSET GOOD/BAD FLAG TO '‘SUCCESS (0)'"
:GET RID OF ‘'JSR PUSH TO TRVEXI''

032762

TRVBR:

JSR

PC,TRVACT

:GO TAKE BRANCH ACTION

032762

TRVBIF: JSR

PC.TRVACT

033002
003561

003561

JMP

JMP
P

TSTB
8EQ

6946
6947

033120
033122

005204
005205

6950

033126

121427

6952
6953

033134
033136

005204
005205

033142
033144
033146

005705
001404
004737

6955
6956
6957

SRETURN TO CALLING CODE

;TRVERR: JSR
MOVB
TST

TRYSPA: CLR
18:
(MP8

6954

RS,.R3

SGET ADDRESS OF CLI ACTION ROUTINE

;THINGS OK, UPDATE R3 TO POINT TO NEXT
* NODE AND RETURN TO PSTRV

005005
121427

000011

WP
P

BNE

INC
INC

000772

033132 001003

;NO BRANCH TAKEN

033110
033112

6951

PSACT RS

ADD

6943
694

g&g 033124

;GET ACTION CODE FROM CLI NODE

JSR

18:

033116 001003

c—emccenaae

SCLEAR ANY SIGN EXTENSION

6940 033100 000137 033002
ggt.‘} 033104 000137 033012
6945

c—e-

#4 ,R3
PC

000137 032760

033062 000137

1(R3) ,R2

—

TRVNOB: ADD
RTS

gggg 033052 000137 032760

2932

SEQ 0103

#177400,R2

RTS

6920
ggg;

PAGE 13-67

BIC

;TAKE BRANCH IN TREE
TRVBRC: MOV
2(R3).RS

000002

14:39

;RETURN FROM PARSER

000001

6909

032762

;==

6906

16-JUN-81

TRAVERSE COMMAND LINE SUBROUTINES

PSEXIT: RTS

6905

6907

MACY11 30A(1052)

BR
000040

033140 000764

28:

108 :
032762

CMPB

BNE

PSEXIT

PSEXIT
TRVBRC

P$GDBD
18

TRVBRC
TRVNOB

RS
(R4) 411

R4
RS

(R4) 440

108

*RETURN DIRECT TO EXIT OF PSTRV ROUTINE

;SEE IF PSGDBD SET OR CLEARED BY ACTION
“1F CLEAR FALL THRU TO NEXT NODE

‘ELSE TAKE THE 'MISS'® BRANCH
SJUST UPDATE TO NEXT NODE IF THINGS OK
;CLEAR *'SPACE OR TAB FOUND'' FLAG
SSEE IF cm IN CMD LINE= TAB

:BR IF NO, NOT A TAB

SINC INPUT STRING POINTER
SINDICATE A TAB FOUND

1GO CHECK NEXT CHAR
see IF CHAR.

IN CMD LINE= SPACE

BR IF NO, NON-SPACE OR NON~TAB CHAR.

INC
INC

R4
RS

LINC INPUT STRING POINTER
SINDICATE A SPACE FOUND

ST
BEQ
JSR

RS
158
PC,.TRVACT

:SEE IF ANY SPACES OR_TABS FOUND
BR IF NO, TAKE NO ACTION
GO TAKE ACTION IF ANY FOUND

1GO CHECK NEXT CHAR

MACY11 30A(1052)

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16=-JUN-81 14:38
CZCLkB.P1
6958
6959
6960
6961
6962

6963

033152
033156

000137
000137

033162
033170
033174
033174

033012
033002
003556

000010

003556

000053
033212
033214
033220
033222
033230

000055
177777

003557

000060

033232
033236
033240
033244
033246
033254
033256
033262
233264
033264

1%:

000012

033314
033320
033322
033324
033326

121427
003003
005204
005205
000741

033330
033332
033234
033336

005705
001464
010401
160501
005037
112102

003561

000071

MOVB

B8R
12%:

13%:

’%:

003554

3s:

000060
003554

003554
003554

003552

003554
003556

CMPB
BLT
CMPB
BLE
CMPB
BEQ
CMPB
8GT

PRINTF

012607
000001

033312

SEQ 0104

PAGE 13-68

TRVNOB
TRVBRC

;JUST GO UPDATE R3 TO NEXT NODE IF OK

#10. ,PSRADX

sUSE DECIMAL AS RADIX AND ASSUME +

(R&4) 460
2
(R4) 467
138
PSRADX,#10.
128
(R4) 471
2
#CLIBRX

#-1,P$GDBD

CMPB
BGT
INC
INC
BR

(R4) 471
2

ST
BEQ
MOV
SUB
CLR
MOVB

RS
53
R4 ,R1

SUB

ASL
8CS
MOV
ASL
BCS
ASL

000012

14:39

;TAKE BRANCH (MISS) IF NONE FOUND

TRVNMA
JoP
TRVOCT: ; (SAME AS TRVNUM SINCE DEFAULT RADIX IS OCTAL)
TRVNUM: MOV
#8.
. PSRADX
sUSE OCTAL AS RADIX AND ASSUME +
TRVNMA: CLR
RS
;CLEAR DIGIT COUNTER
(RG) 4+
(MPB
SEE JIF THERE'S A + SIGN THERE
108
BNE
: BR IF NO
118
; ELSE PSRADX ALREADY SAYS ¢, JUST BR
B8R
108:
(R&) @'~
SEE IF THERE'S A - SIGN THERE
CMPB
BNE
18
: BR IF NO
MOVB
#-1,PSRADX+1
SSET 'MINUS FLAG'' (HI BYTE OF PSRADX)
R4
11%:
INC
:BUMP R4 TO POINT TO FIRST CHAR

000071

000004
177777

JMP
WP

TRVDEC: MOV

000067
003556

TRAVERSE COMMAND L INE SUBROUTINES

15%:

000012
033202

16=JUN-81

BCS
CMPB
BNE

R
RS
13

RS .R1
PENUM
(R1)+,R2

#60,R2
s~un

Psnun.PsCNT
PSNUM
78
PSNUM

7%
PSRADX,#10.
43

SEE IF CHAR. LESS THAN A ‘0"’
BR IF YES (NOT NUMERIC)

SEE IF CHAR. GREATER THAN A ‘7"’

: BR IF YES
SEE IF IN DECIMAL MODE
BR IF YES (CAN USE HIGHER LIMIT)
SEE IF DIGIT WAS A 8 OR 9
:BR IF NON-NUMER]C

JELSE WAS A 8 OR 9 WHEN IN OCTAL RADIX

;SET ERROR RETURN FLAG
;

MOV
MOV
MOV
TRAP
ADD

#CLIBRX,-(SP)
#1,=-(SP)
SP,RO
CSPNTF
w4 ,SP

PRINT ERROR AND TAKE MISS

;SEE IF CHAR. GREATER THAN A '9’
;BR IF YES (NOT NUMERIC)
sUPDATE CMD LINE PTR TO NEXT CHAR.
;INDICATE A NUMERIC FOUND
:GO LOOK AT NEXT CHAR.
sSEE IF FOUND ANY NUMERICS

:BR IF NO, TAKE ‘MISS"* BRANCH

;GET POINTER TO START OF NUMERIC STRING

;CLEAR LOC. WHERE VALUE WILL BE STORED
JGET ASCII CHAR AND CONVERT IT TO A #

sSHIFT CURRENT VALUE TO MAKE ROOM
;ERROR IF NUMBER TOO BIG
;SAVE FOR LATER IN CASE DECIMAL RADIX
;ERROR [F NUMBER TOO BIG
;ERROR [F NUMBER TOO BIG

;SEE IF DECIMAL RADIX
;BR IF NOT EQUAL

CZCLKB.P11

CZ.LKBO DMR,DMC~11 DATA COMM. LINK TEST
16~JUN-81

14:38

MACY11 30A(1052)

7009
7010
7011
7012
7013
7014

033412
033420
033422
033426
033430
033432

063737
103416
060237
103413
005305

003552

ADD
BCS
ADD
BCS
DEC
BNE

PSCNT ,PSNUM
7$
R2,PSNUM
7$
RS

7016

033440

BEQ

158

7017

033442

001344
105737
001402
005437

;8;8

033452

000137

7015

7018

033434

033446

004737

7021

033456

(4)
7022

033472
033476

033504

000137

7025
7026

033510

005005

7028

033516

002406

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

;852

7027

7029
7030

7031
7032

7033
7034
7035
7036

7037
;8%3

033456
033462
033466
033470

033512

033520
033524
033526
033530

033532
033534

033536
033540

033544
033550

012746
012746
010600
104417

062706
112737

005005
121427
002417
121427
003003
005204
005205
000767

7049

033604

002406

033614

005204

7050
7051
7052

033606
033612

7053 033616
7054 033620
7055 033622
7056 033624
7057 033626
7058- 033632
7059 033636

000004
177777

033002

003561

000060

000072

000101

121427
003003

000132

SEQ 0105

;ERROR [F NUMBER T0O BIG
;ERROR [F NUMBER TOO BIG

TSTB

3s
PSRADX +1

;SEE IF NUM WAS PRECEDED BY A - SIGN

NEG

PSNUM

; ELSE NEGATE THE NUMBER BEFORE LEAVING

JMP

TRVNOSB

JSR

PC, TRVACT

: BR IF NO

;SINCE NUMERIC FOUND, GO TAKE ACTION

;GO POINT R3 TO NEXT NODE

;PRINT NUMBER TOO BIG ERROR

MOVB

#-1,P$GDBD

;SET ERROR RETURN FLAG

TRVALP: CLR

;CLEAR ALPHA FOUND FLAG

BLT

;BF._IF YES (NOT ALPHA)

8GT
INC
INC
BR
TST
BEQ
JSR
JMP

2%
R4
RS
1$
R5
3$
PC, TRVACT
TRVNOB

TRVBRC

s THEN UPDATE R3 TO NEXT NODE -NO BRANCH
sNONE FOUND, TAKE MISS BRANCH

TRVALN: CLR
108:
cMPB
8LT
MP8
BGT
INC
INC
BR

RS
(R6) ,#60
2%
(RG) 472
08
R4
RS
108

sCLEAR ALPHANUM FOUND FLAG
;SEE IF CHAR. LESS THAN A '0'’
sBR IF YES (NOT NUMERIC OR ALPHA)
;SEE IF CHAR. GREATER THAN A '9"’
:BR IF YES (NOT NUMERIC)
;UPDATE CMD LINE PTR TO NEXT CHAR.
s INDICATE A NUMERIC FOUND
;GO _LOOK AT NEXT CHAR.

BLT

;BR _IF YES (NOT ALPHA)

INC

5%:

1$:

JMP

CMPB
CMPB

3s:

1$:

JMP

CMPB

(MP8
8GT

2$:
032762
033012
033002

PAGE 13-69

#CLINBG

032762

033012
033002

14:39

PRINTF

2$:

121427

005205
000756
005705
001404
004737
000137
000137

78:

012565
000001

000132

000137

15%:

033012

121427

033554
033556
033562
033564
033570
033572
033574
033576

033600

032762

000101

7040
70641
7042
7043
7044
7045
7046
7047

7048

003557

121427

003003
005204
005205
000767
005705
001404
004737
000137

003554

16-JUN-81

TRAVERSE COMMAND LINE SUBROUTINES

003554

3s:

INC
BR
TST
BEQ
JSR
JMP
JMP

TRVBRC

(R4) #4101
(R4) , 4132

(R4) #4101

(R4) #4132
2%
R5
108
RS
38
PC, TRVACT
TRYNOB
TRVBR(

mMov
MOV
MOV
TRAP
ADD

#CL INBG,~(SP)
#1,-(SP)
SP,RO
CSPNTF
¥4 ,SP

;TAKE ‘MISS'' BRANCH

;SEE IF CHAR. LESS THAN A "'A"’
:SEE IF CHAR. GREATER THAN A '7'‘
;BR IF YES (NOT ALPHA)

JUPDATE CMD LINE PTR TO NEXT CHAR
;INDICATE AN ALPHA WAS FOUND

;GO LOOK AT NEX1 CHAR.
;SEE IF ANY ALPHA'S WERE FOUND
:BR IF NO
sIF ANY FOUND TAKE ACTION

;SEE IF CHAR. LESS THAN A 'A"’

;SEE IF CHAR. GREATER THAN A '77°'
sBR IF YES (NOT ALPHA)

sUPDATE CMD LINE PTR TO NEXT CHAR

s INDICATE AN ALPHA FOUND
;GO LOOK AT NEXT CHAR.
;SEE _IF ANY ALPHANUM'S WERE FOUND
:BR IF NO
sIF _ANY FOUND TAKE ACTION
;THEN UPDATE R3 TO NEXT NODE -NO BRANCH
;JNONE FOUND, TAKE MISS BRANCH

CZCLkBO DMR,DMC-11 DATA COMM.
16~JUN-81 14:38
C2CLkB.P11

MACY11

LINK TEST

TRAVERSE

#€,RS
PSCNT

2$:

(R5)
108
(R1)

108
(R1),(RS)

003552

7082
7083

14:39

PAGE 13-70

SEQ 0106

;POINT R1 TO CMD STRING

;POUNT RS TO MATCH STRING FROM CLI NODE

cCLEAR CHAR MATCH COUNT
JSEE JF END OF MATCH STRING YET
:BR IF YES
;SEE IF END OF CMD LINE YET
:BR [F YES
JSEE IF CHARACTERS MAT(CH
sBR IF NO

JMATCH -INCREMENT MATCH COUNT

JUPDATE STRING POINTERS

033702
033704
033710
033712
033714

16=JUN-81

COMMAND LINE SUBROUTINES

R4 ,R1
R3.R5

TRVSTR:

000006
003552

30A(1052)

;BR TO CONTINUE CHECKING CHARS.
003552

108:

PSCNT
S
R1.,R4

032762

033720
033724

000004

033725

033002

PC,TRVA(CT

RTS

4(R3) ,R3

TRVBR(

sWHEN DONE SEE IF ANY MATCHES FOUND
:BR IF NO, GO TAKE THE MISS BRANCH

;POINT CMD POINTER TO END OF STRING &
sIF A MATCH FOUND, GO DO MATCH ACTION
;UPDATE R3 TO NEXT NODE (NO BRANCH)
; (NO RETURN THRU TRVNOB SINCE DIFFERNT
DISPLACEMENT DUE TO MATCH STRING)
:
: GO TAKE BRANCH

;

(PARSED OK),

ILL

CMD.....

C2CLkBO DMR,DMC-11 DATA (COMM. | INK TEST

CZCLKB.P11
70N
7092
7093
7094
7095
7096
7097
7098
7099

(3)

7100
7112
7113
7114
7115
7122
7123
7130
7131
(3)
(3)

16-JUN-81

14:38

MACY11

30A(1052)

D 9
16~JUN-81

REPORT

CODING SECTION

.SBTTL

REPORT CODING SECTION

14:39

PAGE 13-71

SEQ 0107

;

033732
033732
033732

033736
033736
033736

THE

REPORT

CODING SECTION CONTAINS

"PRINTS'' CALLS

THE

THAT GENERATE STATISTICAL REPORTS.

BGNRPT

004737

027046

JSR

ENDRPT

104425

LSRPT::
PC,REPORT

;CALL

;

SUBROUTINE

AND BASE

TABLE

TO DUMP EVENT LOG

L10011:

TRAP

CSRPT

(ggftseglgnn.onc-11 DATA COMM.
16-JUN-81

7133
7134
7135

7136
7137
7138
7139
7140

(3)

7141
7142
7143
7144
7145
7146
7147

14:38

LINK TEST

MACY11

30A(1052)

PROTECTION TABLE

.SBTTL

16~JUN-81

14:39

PAGE 13-72

SEQ 0108

PROTECTION TABLE

XYY

:
;

033740
033740
033740
033742
033744
033746

THIS TABLE
TO PROTECT

[S USED BY THE RUNTIME
THE LOAD MEDIA,

BGNPROT
1727777
177777
177777

!
-1
-1

ENDPROT

SERVICES

::
LSPROT
;OFFSET
;OFFSET
sOFFSET

INTO P-TABLE FOR CSR ADDRESS
INTO P-TABLE FOR MASSBUS ADDRESS
INTO P-TABLE FOR DRIVE NUMBER

C2CLKBO OMR,DMC-11 DATA COMM.

CZCLkB.P11

7162
7163
7164
7165
7166
7167
7168
7169

(3)
7170

7194
7195
7196
7197
7198
7199

(3)
7200
7201
7202

(3)
(3)

7203
(2)
7204
(3)
(3)
7205
(2)
7206
(3)
(3)
7207
(2)
7208
7209
(3)

(3)

7210

(2)
7211
7212
7213
7214
7215
7216
7217

(3)
(3)
(3)

7218

(2)

7219
7220
7221
7222

16-JUN-81

14:38

LINK TEST

MACY11 30A(1052)
INITIALIZE SECTION
.SBTTL

16-JUN-81

14:39

PAGE 13-73

SEQ 0109

INITIALIZE SECTION

s +4

¢
;

THE INITIALIZE SECTION CONTAINS THE
AT THE BEGINNING OF EACH PASS.

033746
033746

033746

THAT

IS PERFORMED

BGNINIT

005737

001403
005037

007464

TST

BEQ
CLR

007464

012737

177777

012700
104447

000040

DOCLN

007466

INIT?:

104447

READEF

000037

WEF .START

000035

S1:

JMP

READEF

103523
000525

007466
007526

012702

007522

012700
104462
010001

000114

START:

ENDIT

007532

NEW

CLR
CLR

RESFLG
CLKVEC

MOV

#CLKCSR,RZ

L.R1

JSR

PC,CLKSET

RESTRT

MOV

;IF

HERE

CAUSE OF

#LCLKEN, CLKEN

CSDCLN

#EF .START
RO

CSREFG

START
BCS
RESTART, DO SOME INIT
WEF .RESTART
RO
MOV
TRAP

CSREFG

BCS

RESTRT

MOV
TRAP

NEF . CONTINU
RO
E

;SEE IF WE'RE HERE CAUSE OF A CONTINUE

CSREFG
:BR IF NOT HERE CAUSE OF CONITNUE
8CC
s1
;JMP IF HERE CAUSE OF A CONTINUE

JSEE IF THIS IS A 'NEW PASS'

GE TPRM

BNCOMPLETE

026204
000100

(LOCK

TRAP

RESTRT

WEF .NEW

BCOMPLETE

005037
005037

TRAP

;SET RESTART FLAG
;IF HERE CAUSE OF START,DO SOME INIT

START

#EF .RESTART

BNCOMPLETE

012700

:CLEAR FLAG
.60 CLEANUP

READEF AEF .CONTINUE

000036

034530

;CLEANUP & EXIT ?

2NO,BRANCH

#-1,RESFLG

BCOMPLETE

103002
000137
104447

READEF

INIT
DCLFLG

BCOMPLETE

103515

012700

MOV

DCLFLG

MOV

103417

012700
104447

LSINIT::

;;ADDED BY EC
: cREVISION CHANGE B

104444

033762
033770
033770
033774
033776

CODING

;IF

MOV

#EF .NEW,RO

8CS

NEW

CSREFG
YES, BR AROUND LOGUNIT # SETUP
TRAP

;CLEAR RESTART FLAG SINCE HERE ON START
sCLEAR 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

TRAP
MOV

#'L RO

CS$CLCK
RO,R1

IF NONE THERE GO LOOK g?? A P-CLOCK
S2

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

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLkB.P11
7223

034100

(3)
7224

034106
034110

7225
7226
7227
7228
7229
;gg?

034112
034116
034124
034132
034140
034146

7232
(3)
7233
(2)
7234
7235
7236
7237
(3)
(3)
(4)
(5)
(5)
(5)
(5)
(5)

034150
034150
034152
034152
034154
034162
034166
034174
034174
034176
034200
034202
034204
034206
034210
034212

(3)
(3)

(2)

(3)
;ggg

034100
034106

034110

034214
034214

16-JUN-B81

14:38

012700
104462

000120

Se:

103017

026204
000002
001600
000002
000111

S3:

14 :39

PAGE 13-74

SEQ@ 0110

;LOOK FOR A P=-CLOCK SINCE NO LINE CLOCK

PC,CLKSET
#2,CLKCSR
#PCLKCT,aCLKCSR
#2,CLKCSR
W#PCLKEN, CLKEN
RESTRT

;

MoV
TRAP

#'P,RO
C$CLCK

BC(C

MoV
RO,R1
IF NONE THERE GO SEE IF THIS IS _LSI

; ELSE GO SET UP CLOCK INFO & VECTOR
sPOINT CLKCSR TO P-CLK COUNT SET REG.
sLOAD CLK SET REG. WITH COUNT VALUE
JPOINT CLKCSR BAC TO P-CLK CSR
;SETUP THE ENABLE THE P-CLK DATA

104443
000406
007530
000052
014771
000377
000062
000074

JREAD BUS TYPE TO SEE IF ON AN LSI
TRAP
C$RDBU
BNCOMPLETE
S4
;BR IF NOT, NO CHANCE OF A CLOCK
8cC
S4
Mov
#100, CLKVEC
;LOAD 10C AS CLK VECTOR
CLR
CLKBR
sLOAD O AS CLK INT. LEVEL
MoV
#CLKEN, CLKCSR
;KLUDGE UP THE (SR & ENABLE DATA LOCS
SMANID
L5060,CLKHZ,D,377,50.,60..YES
TRAP
CSGMAN
BR
100008
.WORD
CLKHZ
.WORD
TSCODE
.WORD
L5060
.WORD
377
.WORD
TS$LOLIM
.WORD
TSHILIM

000412

RESTRT

PRINTF

#NOCLK

EXIT

INIT

CLR
CLR
MoV
MOV
Mov
MOV
CMP

TIMMIN
TIMSEC
CLKHZ,TIMTCK
NEVTLOG,R2
R2,EVIPTR
#-1,(R2)+
R2,MEVTEND

;CLEAR TIME SINCE START LOCATIONS

MoV

#-1,LOGUNT

JINITIALIZE LOGICAL UNIT #

INC
cMP
BGE

LOGUNT
LOGUNT ,LSUNIT
NEW

JPOINT TO NEXT LOGICAL UNIT
;SEE IF PAST MAX. LOG. UNIT #
sBR IF YES, AND START OVER

104407
103021
012737
005037
012737

000100
007524
007532

007526
007522

034240

104432
000404

7243
72644
7245
72646
7247
7248
7249

034242
034246
034252
034260
034264
034270
034274

005037
005037
013737
012702
010237
012722
020227

007534
007536
007530
007552
007550
177777
010454

;%g%

034302

012737

177777

007460

7254
7255
7256

034310
034314
034322

005237
023737
002367

007460
007460

002012

JSR
ADD
MOV
SuB
MOV
BR

007522
153370
007522
007532

034216
034216
034222
034226
034230
034232
034236
034236

;gg?

P,R1

BNCOMPLETE

7240
(7)
(6)
(3)
(4)
(4)
7241
(3)

7525

Lotk

16-JUN-81

INITIALIZE SECTION

010001

004737
062737
012777
162737
012737
000435

MACY11 30A(1052)

012746
012746
010600
104417
062706

001373

S4:

015102
000001
000004

RESTRT:

007540
18:

READBUS

BNE
NEW:
TPRM:

10000%:

s INFORM OPR.

NO CLOCK, & EXIT
MOV
MOV
MOV
TRAP
ADD

TRAP
.WORD

INIT
#NOCLK,
= (SP)
#1,-(SP)
SP,RO
CSPNTF
w6 ,SP

CSEXIT
L10013-.

sLOAD TICKS/SEC
JINIT EVENT TABLE TO ALL 1°'S AFTER EACH
; START OR RES AND INIT TABLE POINTER
JSEE IF REACHED END OF

;LOOP UNTIL DONE

TABLE

CZCLKBO DMR,DMC-11 DATA COMM.
16-JUN-81 14:38
C2CLKkB.P11
7257
7258

(3)

7259

(2)

7260
7261
7262
7273
7274
7275
7276
7277
7278
7279
7280
7281
7282
7283
7284
7285
7286
7287
7288
7289
7290
7291
7292
7293
7294

7295

7296
7297

7298
7299
(7)
(6)
(5)
(4)

(3)
(2)
7300
7301
7302
7311
(7)
(6)
(5)
(4)

(3)
(2)
7312
(7)

(6)

034324
034326
034330
034332
034334
034334
034336

013700
104442
010001

LINK TEST

GPHARD

007460

007474

MoV

16-JUN-81

14:39

LOGUNT ,R1

BNCOMPLETE

103365

011137

MACY11 30A(1052)
INITIALIZE SECTION

GE TPRM

(R1) ,FHDPLX

PAGE 13-75

SEQ 0111

;GET THE P~TABLE FOR THIS LOG. UNIT

sIF

NO P-TABLE AVAIL.,

MoV
LOGUNT RO
TRAP
($GPHRD
RO,R1
MOV
GO GET NEXT ONE
GE TPRM
8c(

JPUT FULL OR HALF DUPLEX ANSWER IN LOC.

;DEVICE DEPENDENT PART OF GETTING INFO FROM P-TABLE

034342
034350

016137
016137
005237
016137
062737
016137
062737
016137
062737

000002
000002
012362

016137
016137
062737
016137
016137

MoV
MOV

INC

MOV
ADD
MOV
ADD
MOV
ADD
MOV
ADD
MoV
ADD
MOV
ADD

012400

000340
026230
007526
000003

2(R1) ,BSEL1
BSEL1
2(R1) ,SEL2

;BUILD OUTPUT INTERRUPT VECTOR
;STORE AWAY INTERRUPT PRIORITY

ADD
MOV
MOV

SETVEC

;STORE AWAY (SR ADDRESSES

;STORE AWAY [NPUT INTERRUPT VECTOR

MOV
MOV

012402
012402
012404
012406
ENDIT:

012746
012746
013746
012746
104437
062706

2(R1) ,SELO

;STORE AWAY DEVICE OPTION TYPE

CLKVEC ,#CLKINT, 4340

:SETUP CLOCK VECTOR

MOV

#340,-(SP)

MOV

#3,-(SP)

MOV
MOV

TRAP
ADD

000010

#CLKINT ,-(SP)
CLKVEC,=-(SP)

CSSVEC
#10,SP

;DEVICE DEPENDENT VECTOR SETUP

013746
012746
013746
012746

012404
044620
012400
000003

062706

000010

013746
012746

012404
044630

104437

SETVEC

INVEC ,A#DVINS, INTPR{

sSETUP

INPUT

INTERRUPT

VECTOR
MOV
MOV
MOV

MOV

SETVEC

OUTVEC,#DVOUTS, INTPRI

TRAP
ADD

;SETUP OUTPUT INTERRUPT VECTOR
MOV
MOV

INTPR] ,~(SP)
#DVINS,~(SP)
INVEC ,~(SP)

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

INTPR] ,-(SP)
#DVOUTS
- (SP)

MACY11 30A(1052)
CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-81 14:38
CZCLkB.P11
INITIALIZE SECTION
(5)

(4)

(3)

(2)
7313
7314

(3)
(3)

7315
(3)

(3)

7316
7328
7329
7330
733
(3)
3

034614
034620
034624
034626

034632
034632
034636
034640
034640
034642

01374¢€
012746
104437
062706

012700
104441

104432
000002

16-JUN-81

14:39

SEQ 0112

PAGE 13-76

012402
000003

MOV
MOV

TRAP
ADD

000010
000000

SETPRI

#PRI00

EXIT

INIT

;SET THE 'RUN'’' PRIORITY TO O
MOV
TRAP

OUTVEC,=(SP)
#3,~(SP)
CSSVEC

#10,5P

#PRI100,RO

C$SPR]

CSEXIT

TRAP
.WORD

L10013-.

TRAP

CSINIT

.EVEN

034644
034644
034644

ENDINIT
104411

L10013:

C2CLKBO DMR,DMC-11 DATA COMM,
16=JUN-81 14:38
CZCLkB.PI
7333
7334
7335
7336
7337
7338
7339
7340
7341

7342

(3)
7343

7350
7351

(3)
(3

LINK TEST

MACY11

30A(1052)

AUTODROP SECTION

.SBTTL

9
J
16-JUN-81

14:39

SEQ 0113

PAGE 13-77

AUTODROP SECTION

;
;

THIS CODE ]S 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.
; DROPPED FROM TESTING.
034646
034646

BGNAUTO

034646
034646
034646

ENDAUTO
104461

THOSE THAT DON'T ARE IMMEDIATELY

:
LSAUTO:

L10014:

TRAP

C$AUTO

(%%CLngIQMR‘DHC-11 DATA COMM. LINK TEST
16-JUN-81

LKB.

14:38

7353
7354

(3)
7361

7370
7371
7372

(3)
(3)
7373

7374
(3)
(3)
7375
7387
7388
7389
7390
(3)
(3)

CLEANUP CODING SECTION

.SBTTL

7355
7356

7357
7358
7359
7360

MACY11 30A(1052)

16-JUN-81

14:39

SEQ 0114

PAGE 13-78

CLEANUP CODING SECTION

:
;

034650
034650

034650
034654
034660
034660
034664

034666
034666
034670

THE CLEANUP CODING SECTION CONTAINS THE CODING THAT
AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED.

BGNCLN

004737
005077

045714
152642

012700

000340

104441

104432
000002

[S PERFORMED

LSCLEAN::

JSR

PC.DVBTUP

;GO UPDATE BASE TABLE

SETPR]

#PRIO7

JSET PROCESSOR PRIORITY BACK TO ;0

CLF

aCLKCSR

;DISABLE

CLOCK

#PR107,RO

TRAP

.WORD

CSEXIT
L10015-.

TRAP

CSCLEAN

TRAP

ExXIT

CLN

($SPR]

.EVEN

034672

034672
034672

ENDCLN
104412

L10015:

cg%Etgeg1?nR.onc-11

DATA COMM.

16-JUN-81

7392
7393
7394
7395
739
7397
7398
7399

;

(3)

034674
034674
034676

16=JUN-81

14:39

PAGE 13-79

SEQ 0115

DROP UNIT SECTION

034674
034674

7611
7423
74624
7425
7426
(3)

MACY11 30A(1052)
DROP UNIT SECTION
.SBTTL

(3)

7400
7409
76410
(4)

14:38

LINK TEST

THE

DROP-UNIT

SECTION CONTAINS

TO NO LONGER BE TESTED.
8GNDU

000167
000000

EXIT

THE

CODING THAT

CAUSES A DEVICE

LSOU::
DU

. WORD
.WORD

JSJMP
L10016-2~.

TRAP

C$buU

.EVEN

034700
034700
034700

ENDDU

104453

L10016:

C(ZZ(Z:CLEB&?M.DHC-H DATA COMM. LINK TEST
16~JUN-81

LKB.

3
7637

7446
7447
(&)

(3)

7448
7460
7461
7462
7463

3
(3)

7464
7465

ADD UNIT SECTION

.SBTTL

16-JUN=-81

14:39

SEQ 0116

PAGE 13-80

ADD UNIT SECTION

s
4

®e®e

76428
7429
7630
76431
74632
7433
7434
7435
7436

14:38

MACY11 30A(1052)

034702
034702

034702
034702
034704

THE ADD-=UNIT SECTION CONTAINS ANY (CODE THE PROGRAMMER WISHES
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BA(K
TO THE TEST CYCLE.
BGNAU

000167
000000

EXIT

LSAU::
AU

.WORD
. WORD

JSJMP
- L10017-2~.

.EVEN

034706
034706
034706

ENDAU

104452

L10017:

TRAP

CSAU

N 9
MACY11 30A(1052)
16-JUN-81
14:39
CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
16-JUN-81 14:38
TEST 1:
SETUP AND MODES OF OPERATION
(ZCLkB.P11
7467
7468
7469
7470
76471

.SBTTL

TEST 1:

PAGE 13-81

SEQ 0117

SETUP AND MODES OF OPERATION

: TEST TO DETECT FAULTS IN THE DATA COMMUNICATION LINK.

7472
7473

;

THIS TEST WILL

THE PROVIDE COVERAGE NECESSARY TO ISOLATE FAILURES TO THE COMPUTER

; EQUIPMENT, THE COMMUNICATION LINK, OR THE MODEM.

7474

7475

7482
7488
7489

(3)
7490
7496
7497
7498
7499

7500
7501

BGNTST

034710
034710

PROGRAM SETUP SECTION

.SBTTL

034710
034716

013777
005001

007532

GTXRXB:

012737
005737
001412
005301
001373

000001

012746
012746
010600

015102

062706

000004

005737
001117

007466

104417

152604

007542

GTRAZ:
1%:

T1::

MoV

CLKEN,aCLKCSR

JENABLE THE CLOCK

CLR

R1
#1,TIMER]
TIMERT

JSET TIMER TO COUNT 1 TICK
JCHECK FOR IT TO BE COUNTED OFF

JKEEP CHECKING UNTIL RY DOES FULL COUNTDWN

MOV
TST

BEQ
DEC
BNE
PRINTF

S{RA3

ANOCLK

JBRANCH IF CLOCK EXISTS (COUNTED A TICK)
JPRINT BAD CLK MSG AND WARN OF

HANG IF
MOV

MOV
MOV

000001

TRAP
ADD

GTRA3:

TST

BNE

RESFLG

GTRAS

:SEE

TIMEOUT
MNOCLK ,=-(SP)

#,-(SP)
SP,RO

CSPNTF
#s,SP

HERE AFTER A RESTART.

;BR IF HERE CAUSE OF A RESTART

; CLEAR COUNTS AND SET UP DEFAWLLTS

005037
005037

GTRASL:

CLR

TOTCC
TTOTCC

;CLEAR TOTAL CHAR. COUNT TEMP. LOC.
; CLEAR TOTAL CHAR. COUNT FOR TX BUFF

#PTRTAB,R1

JINIT

CTO0TCC

R1,TXPTR

TRANSMIT MESSAGE

POINTER

RXPTR

;

R2.CMPPTIR

sINIT COMPARE MESSAGE POINTER

MSGLIM,R2
R2
R2
R1,CMPPIR

007336
007336

: CLEAR TOTAL CHAR. COUNT FOR CMP BUFF
IERO RX POINTER

012737
013737
012737
012737

000005
002162
003562
005562

007410
007412
007360
007344

#5,MSGTYP

;SET UP DEFAULT MSG TYPE

#TXBUF ,TCURAD
#CMPBUF ,CCURAD

;SET UP CURRENT ADD TO START OF
;SET UP CURRENT ADD TO START OF

TX BUFFER
(MP BUFFER

013737

007360

007420

TCURAD,CURADD

;SETUP CURRENT ADDR TO START OF

TXBUF

MSG5C, CURCC

(QUICK FOX = ITEP MSG)

JSET UP DEFAULT CHAR COUNT

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

MACY11 30A(1052)

7533

035074

013737

007334

007416

MOV

;ggg

035106

012737

000001

007354

013737

007336

007416

004737
012737
012737
005037

032010
000001
000003
007472

CICLKB.P11 ~ 16=JUN-81 14:38
753,

035102

7537

035114

7541
7542
7543
7544

035144
035150
035156
035164

7538
7539
7540

7545

7546

7547
7548

035122
035130
035136

035170

035176

004737

013737
012737
013737

012737

032010

007344
000005
002162

000001

000002

007420
007410
007412

007476

7555
(3)
7556
(2)
7557
7558
7559
(3)
(3)
7560
;gg}

035260
035260
035262
035262
035264
035270
035272
035272
035274
035276
035304

;ggz

035254

010600
104417
062706
013737
013737
013737
013737

004737

010650

007476

010656

007472
007500

032340

010652
010654

CMPPTR, CPTR

;SET UP START OF COMPARE POINTER TABLE

PC ,BLDBUF
#1.CMPTOT
#ACT ,MODTYP
MLTYP

:PUT DEFAULT MESSAGE INTO CMPBUF
‘BUMP THE COMP MESG COUNT
*SET DEFAULT MODE= ACTIVE
:SET DEFAULT MAINTENANCE LOOP MODE =NONE

#2 ,PARAM

:SET UP PROG. PARAMETERS = DATACHECKING ENABLED

GTRAS:

035310
035214
035320
035320
035322
035324
035326

007500

104432
010560
012737

0000017

(5)
(5)
(5)
(3)
7568
7569

035332
035334
035336
035340
035340
035346

105037
105037

#7 ,RPASS

MOV

PARAM
- DE V4

JSR

040334

007472

1%:

PC,SHWOP

003561
003560

GETCL:

104443
000406
003060
000142

GETCL

RPASS

MoV

#TTL MLTYP

JMP

“SET UP DEFAULT 'RUN PASSTM* COUNT TO 1

OPERATOR STATUS MSGS. PRINT OFF

MOV
TRAP
ADD

18
TST

TR9

JSEE IF MANUAL INTERVENTION ALLOUED
TRAP
CSMANI
:
BR IF YES (UAM=0 AND NOT CHAINED)
BCS
GETCL
:SEE IF THIS IS FIRST 'DCLT PASS'’
*"BR IF NOT COMPLETED 1 PASS
: IF DONE 1 PASS IN UNATTENDED MODE - EXIT
TRAP
CSEXIT
.WORD
L10020-.
JSET UP DEFAULT FOR UNATTENDED MODE
17
'R M=ACT/LO=1/PAS=1/NOST/CH'* AND RUN

COMMAND LINE FETCH & INTERPRETATION SECTION
CLRB
CLRB
GMANID

PSGDRD
:CLEAR CMD LINE PARSING ERROR FLAGS
PSNNUF
CLISPM,CMDBUF,A,0,1,72..NO
;GET A COMMAND LINE FROM OPR.

TRAP
BR
.WORD
"WORD

CSGMAN
100008
CMDBUF

"WORD
"WORD
'WORD

O
TSLOLIM
TSHILIM

"WORD

000000
000001
000110

003060
010660

003544
003546

7570 035354 012737 036302 003550

SP.RO
C$/NTF
#6,SP

;PRINT TO OPERATOR THE CURRENT FDDE ......

os§§3o 012476

012737
012737

#HLPO,
- (SP)
#1,-(5P)

MLTYP,DEVZ
RPASS
. DEV3

BNE
EXIT

;SET UP CURRENT ADDR. TO START OF (CMPBUF

MOV
MOV

MODTYP,DEV1

MOV
MOV

2760 BUILD POINTER TABLE AND BUFFER

#HLPO

MOV

.SBTTL

7565
7566
7567
(3)
(3)
(%)
(5)

CglfiAD.CURADD
#S.MSGTYP
M565C, CURCC

BCOMPLETE

;ggz

(5)

MOV

PC.BLDBUF

MANUAL

103412
005737

000137

‘BUMP TOTAL MESSAGE COUNT

MOV

104450

001002

#1.TXMTOT

PRINTF

000004
007470

SEQ 0118

MOV

JSR
MOV
MOV
CLR
MOV

007500

PAGE 13-82

;SETUP CURRENT POINTER TABLE POINTER FOR TXBUF

MOV
MOV
MOV

007340
007470

14:39

TXPTR,CPTIR

JSR

(7) 035204 012746 013147
(6) 035210 012746 000001
035214
035216
035220
035024
035232
035240
035246

16-JUN-81

PROGRAM SETUP SECTION

035204

(3)
(4)
(4)
7549
7550
7551
7552

8 10

MOV
MOV

MOV

#CMDBUF
, P$BUF A
#CL1TRE .PSTREE

#CLIACT .PSACT

100008:

T$CODE

CLISPM

¢ 10

16-JUN-81
MACY11 30A(1052)
16:39 PAGE 13-83
COMMAND LINE FETCH & INTERPRETATION SECTION

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16~JUN-81 14:38
czcLke. P11

PRINTF

#CLIERM

JMP
TST8
BEQ
PRINTF

GETCL
PSNNUF
1C$
#CLINUF

PC,PSTRV
P$GDBRD
18

sCLEAR QUALIFIER FLAG LOCATION
;GO FARSE COMMAND LINE
;SEE IF PARSED OK OR AN ERROR
MOV
MOV
MOV
TRAP
ADD

000004
035310
003560

1$:

012542

MOV
MOV

000001

MOV
TRAP
JMP

000055

003202

000004

040334
003202

000052

118:

031554
035310
023727
001005
012737
104432
010272
023727

003202

000057

000001

007464

003202

000001

003202

000002

003202

000010

48:

007422

5%:

007420 001000
012746
012746
012746

12%:

015223
015241
000002

13%:

KEYWD1 ,#HLP
GETCL
KEYWD1 ,#PRNT

JSR
JW

PC,DUMPSR
GETCL

cMP
BNE
JMP
P
BNE

GETCL

KEYWD? ,#RUN
118
GTR9
KEYWD1,#DMPS
12%

s YES ,BRANCH

;SEE ]F HELP WAS TYPED
;GO GET CMD AGAIN IF YES
:SEE IF PRINT WAS TYPED
: GO GET CMD AGAIN IF YES
;SEE IF RUN WAS TYPED
; BR IF NO
; START EXEC. IF YES
SEE
{;
DUMP WAS TYPED
ELSE DUHP PART OF MEMORY
; THEN RETURN TO GET ANOTHER CMD.

;o EXIT COMMAND IS A REVISION B CHANGE BY EC
KEYWD1 ,#EXIT
cMP
;EXIT COMMAND ?
138
BNE
:NO,BRANCH
MOV
#1,DCLFLG
:SET CLEANUP & EXIT FLAG
TST
EXIT
;GO BACK TO INIT ROUTINE
cMP

KEYWD1,#CLEAR

cMP

KEYWD1,#SHOW

BEQ

cMP
BEQ
MOV
P
BLY

PRINTF

GETCL

KEYWD1 ,#SETEXP
2%
TT0TCC,TOTCC
TOTCC,ABUFLIM

158

#MSGTRN,#BUFEX

w6 ,SP

;WAS ''SET EXPECT = TRANMIT'® ENTERED?

mTmammTmm

003202

cMP
BEQ
cMP
BEQ

GETCL

#CLINUF ,-(SP)
#1,-(SP)
SP,RO
CSPNTF

IF CLEAR WAS TYPED

TRAP

.WORD

CSEXIT

L10020-.

YES, BACK TO GET ANOTHER C(MD.

IF SHOW WAS TYPED

YES, BACK TO GET ANOTHER CMD.

IF SET EXPECTED
IF YES (A SETEXP WAS TYPED)

IF BUFFER ALREADY FULL
; BR IF NOT FULL (BUFLIM # OF CHARS.)
m

000005

KEYWD1 #SETET

BEQ

m gnn—-m-—.m

003202

;REV B BY EC

CMP

035466
035474
035476
035504
035506
035514
035516
035522
035530
035532
035536

1(Ce:

000060

»nu

003202

%o 9,

035456
035464

ADD

GETCL

000004
035310

#CLIERM,~(SP)
#1,-(SP)
SP,RO
CSPNTF
w6, SP

;SEE IF INCOMPLETE COMMAND TYPED

7603

QUALFG

»w

7599
7600
7601
(3)
(3)
7602

012512
000001

035452

035542
035550

CLR

JSR
1ST8
BEQ

7598

003204
032642
003561

(fl

7594
7595
7596
7597

005037

7590
7591
7592
7593

035362
035366
035372
035376
035400
035400
035404
035410
035412
035414
035420
035424
035430
035432
035432
035436
035442
035444
035446

[e]4.
7572
7573
7574
7575
(7)
(6)
(3)
(4)
(4)
7576
7577
7578
7579
(7)
(6)
(3)
(4)
(4)
7580
7581
7582
7583
7584
7585
7586
7587
7588
7589

SEQ 0119

s ELSE TELL OPR. AND DON'T BUILD MSG.
MOV
MOV

MOV

#BUFEX ,~(SP)
MMSGTRN,
= (SP)

#2,-(SP)

CZCLKBO DMR,OMC-11 DATA COMM.
16-JUN-81 14:38
cZCLkB P

(3)

(4)
(4)
7612
7613
7614
7615
7616
7617
7618
7619
7620
(8)
(7)
6)

035646
035650
035652

010600
104417

002414
012746
012746

(3)
(4)
(4)

000006

007354
006562
007354
000017

013737
023727
0026414

012746
012746

007334

SEQ 0120

TXMTOT

BLT

PRINTF

#PTFTAB, TXPTR
TXMTOT,R1
R1,AMSGLIM

17%

#MSGTRN, #TABEX

;

THEN GO

TRAP
ADD
GET A NEW COMMAND

007334
007334
007360
031712
032010
007416
007422
007420
007356
003206

007416
007420

JSR
MOV

007334

007356
007360

MOV
MOV

INC
DEC
BNE
JMP

035310
007342
007422

007422
001000

2%:

007340
000017

Mov
cMp
BLT

PRINTF

015223
015241
000002

007336
007336

JMP
ASL
ASL
ADD
MoV
MOV
JSR

;SEE IF MSG COUNT EXCEEDED.
; BR IF NO
; ELSE TELL OPR. AND DON'T BUILD MSG.
MOV
MOV

TRAP
ADD

7%:

#TABEX,~-(SP)
MMSGTRN,-(SP)

#2,-(SP)
SP,RO
CSPNTF
#6,SP

GETCL
R1
R1
R1,TXPTR
TXPTR,CPTR
TCURAD
, CURADD
PC,ADDCC
PC,BLDBUF

: THEN GO GET A NEW COMMAND.
:# OF MSGS *4 = NEXT FREE PTR BLOCK

T0TCC,TTOTCC
CURADD, TCURAD
TXMTOT

;UPDATE CHAR. COUNT, CURR ADDR, & PTR

CPTR,TXPTR

QUAL VL

;SETUP CHAR.

COUNT,

CURRENT ADDR, & PTR

;ADD IN CHAR. COUNT AND CHECK TOTAL
;GO BUILD MESSAGE IN BUFFER AND PTRS.

;DLC THE COPY COUNT

GETCL

crorcc,1orce

TOTCC,#BUFLIM

163

#MSGTRN
, #BUF EX

;SETUP CHAR. COUNT, CURR. ADDR. & PTR
;SEE IF BUFFER ALREADY FULL
c BR IF NOT FULL (BUFLIM ¥ OF CHARS.)
; ELSE TELL OPR. AND DON'T BUILD MSG.
MOV
MOV

MOV
MOV

16%:

CSPNTF
#6,SP

sGET POSITION OF END OF TX LIST

MOV
MOV

17%:

SP,RO

;1F FIRST ''SET'' THEN GET RID OF DEFAULT

000002

007340
006562
000017

020127

6$:

015163
015241

000006
035310
007342

036150

GETCL
TTOTCC

15%:

000006
035310

001270
000137

D 10

16-JUN-81
14:39 PAGE 13-84
COMMAND LINE FETCH & INTERPRETATION SECTION

MOV

035310
007356

035656

MACY11 30A(1052)

LINK TEST

GETCL
c¢rorcc
7$
CMPTOT

TRAP
ADD

#2,-(SP)
SP,RO
CSPNTF
#6,SP

; THEN GO GET A NEW COMMAND
;IF FIRST "'SET'' THEN GET RID OF DEFAULT

#PTRTAB,R1

;SSGLIM,RZ
R2
R1,CMPPTR
R2,CMPPTR

s INIT COMPARE MESSAGE POINTER

R1,#MSGL
IM

;SEE IF MSG COUNT EXCEEDED.

CMPTOT ,R1

#BUFEX ,~(SP)
#MSGTRN,-(SP)

E 10

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
CZCLKkB.P11
16-JUN-81 14:38
7653

7654
(8)
(7)

(6)
(3)
(4)
(4)
2655
7656

7657
7658
7659
7660
7661
7662
7663
7664
7665
7666
7667
7668
;ggg
7671
7672

7673
7674

036154

036156
036156
036162

036166
036172
0361764
036176
036202
036206

036210
036212
036216
036224
036232
036236
036242
036250
036254
036262
036270
036274
036276

MACY11 30A(1052) 16-JUN-B1
14:39 PAGE 13-85
COMMAND LINE FETCH & INTERPRETATION SECTION

002414
012746
012746
012746
010600
104417
062706
000137
006301
006301
060137
013737
013737
004737
004737
013737
005237
013737
013737
005337
001261
000137

BLT

PRINTF

015163
015261
000002

000006
035310
007336
007336
007344
031712
032010
007416
007340
007420
007422
003206

035310

18%:
007416
007420

007336
007344
007342

JMP
ASL
ASL
ADD
MoV
MoV
JSR
JSR
MOV
INC
MOV
MOV
DEC
BNE
JMP

18%

#MSGTRN,#TABEX

GETCL
R1
R1
R1,CMPPTR
CMPPTR,CPTR
CCURAD, CURADD
PC,ADDCC
PC,BLDBUF
CPTR,CMPPTR
CMPTOT
CURADD , CCURAD
TOTCC,CTOTCC
QUAL VL
2%
GETCL

SEQ 0121

: BR IF NO

; ELSE TELL OPR. AND DON'T BUILD MSG.
MOV
#TABEX,=(SP)
MoV
#MSGTRN,~-(SP)

MoV
#2,-(SP)
MoV
SP,RO
TRAP
CSPNTF
ADD
#6,SP
; THEN GO GET A NEW COMMAND.
;¥ OF MSGS *4 = NEXT FREE PTR BLOCK

JADD IN XHAR.

COUNT AND CHECK TOTAL

;UPDATE CHAR.

COUNT, CURR ADDRR. & PTR

;IF

COPY WAS GIVEN, PUT MSG IN BUFF

; AGAIN
;GO BACK UNTIL GET A 'RUN''

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11
7676

7677

7680

;
036302

7681
7682
7683
7686
;ggg

036302
036304
036310
036314
036316

006302
016202
062702
004712
000207

7687
7688
7689
7690
7691
7692
7693
7694
7695
7696
7697
7698
7699
7700
7701
7702
7703
7704
7705
7706
7707
7708
7709
7710
7711
7712
7713
7714
7715
7716
7717
7718
7719
7720
7721
7722
7723
7724
7725
7726
7727
7728
7729
7730
7731

036320
036322
036324
036326
036330
036332
036334
036336
036340
036342
036344
036346
036350
036352
036354
036356
036360
036362
036364
036366
036370
036372
036374
036376
036400
036402
036404
036406
036410
036412
036414
036416
036420
036422
036424
036426
036430
036432
036434
036436
036440
036442
036444
036446

000150
000152
000162
001604
000262
000172
000306
000434
000756
000766
001004
001014
001024
001116
001612
001136
001216
001224
001234
001244
001254
001264
001302
001370
001400
001420
001426
001436
001446
001456
001504
001514
001620
001634
001666
001676
001706
001716
001726
001736
000142
001174
000712
000742

CLIACT:

036320
036320

10%:

)

16-JUN-B1

14:39

PAGE 13-86

COMMAND LINE FETCH & INTERPRETATION SECTION

.SBTTL

7678

7679

MACY11 30A(1052)

16-JUN-81 14:38

ACTION TABLE AND ROUTINES

USER MUST CLEAR/SET PSGDBD IF USE ‘'CLIBIF'" IN CONNECTION WITH ACTION
R2 WILL HOLD ACTION CODE FROM PARSING (CLI) NODE

ASL
MOV
ADD
JSR
RTS

R2
108(R2) ,R2
#108,R?
PC,(R2)
PC

JMULTIPLY ACTION CODE BY 2
JOFFSET VALUE
;ADD BASE VALUE
;GO DO ACTION
JRETURN TO TRVACT:

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

ACTAUL-10$
ACTCLR-10%
ACTSHO-10$
ACTCHK-10$%
ACTRUN-10%
ACTHLP-10$
ACTCSE-10%
ACT(CST-10%
ACTSTE-10%
ACTSTT-10%
ACTSZE-10$
ACTCOP-10%
ACTANUM-10%
ACTOPM-10%
ACTSTS-10%
ACTEQO-10%
ACTMSO-10$
ACTMS1-10%
ACTMS2-10%
ACTMS3-10%
A(CTMS4-10$%
A(TMS5-10%
ACTMS6-10%
ACTATV-10$%
ACTPAS-10$%
ACTREC-10$
ACTLIS-10$
ACTDLL-10$
ACTTRA-10%
ACTTAL-10%
ACTNO-10%
ACTECH-10$
ACTCRC-10%
ACTPRO-10%
ACTRPS-10%
ACTMOP-10$%
ACTTLP-10$
ACTCLP-10%
ACTLLP-10%
ACTRLP-10%
ACTNUF-10$
ACTBCR-10%
A(CTDMS-10%
ACTDME-10$%

;BRIEF DESCRIPTION OF ACTIONS TAKEN
JNULL
;CLEAR
s SHOW
s CHECK
JRUN
JHELP
;CLEAR OR SHOW EXPECTED
;CLEAR OR SHOW TRANSMIT
sSET EXPECTED
JSET TRANSMIT
;SIZE
: COPY
JNUMERIC VALUE FOR SIZE OR COPY
;QUOTED MESSAGE FROM USER
; STATUS
;END OF QUOTED MESSAGE FROM USER
sONES
: JEROS
JIALT
sOALT
JITEP
JCCITT
sALPHA
sACTIVE MODE
;PASSIVE MODE
;RECEIVE MODE
;LISTEN MODE
;DOWNL INE LOAD
s TRANSMIT MODE
: TALK MODE
:NO
;ECHO
;SET CRC BIT
;SET PROTOCOL BIT
s STATUS
JREMOTE STATION IN MAINTENANCE LOOP MODE
s INTERNALTTL
s CABLE LOOP
;LOCAL MODEM LOOP
JREMOTE MODEM LOOP
JMORE COMMAND LINE NEEDED
;BAD CHARACTER IN OPERATOR MESSAGE
;DUMP MEMORY START ADDRESS
;DUMP MEMORY END ADDRESS

SEQ 0122

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-81 14:38
C2CLkB.P11
7732
7733
7734
7735
7736
7737

036450
036452
036454
036456
036460

000734
000246
001626
000236
001326

MACY11

30A(1052)

.WORD
. WORD
.WORD
.WORD
.WORD

ACTDMQ-10%
ACTPRT-10%
ACTMOS-10%
ACTEXT-10%
ACTSEX-10%

6 10

16-JUN-81

ACTION TABLE AND ROUTINES

14:39

;DUMP WORD
JPRINT

PAGE 13-87

;JMODEM ACTION REV B BY EC
JEXIT ACTION REV B BY EC
JSET E=T ACTION REV B BY EC NP]

SEQ 0123

—

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

(ZCLkB.P11

16~JUN-81

14:38

MACY11 30A(1052)

H 10

16-JUN-B1

ACTION TABLE AND ROUTINES

14:39

PAGE 13-88

SEQ 0124

7739
77640

036462

036470

000207

112737

177777

003560

ACTNUF: MOVB

#-1,PSNNUF

JSET FLAG TO SAY NEED MORE OF

77643

036472

012737

000001

003202

ACTCLR: MOV

#CLEAR,KEYWD1

;SET LOC TO SAY A CLEAR WAS TYPED

7746

036502

012737

000002

003202

ACTSHO: MOV

#SHOW,KEYWD1

JSET LOC.

7749
7750
(8)
(7)

036512
036516
036516
036520

012702

003210

7751
7752
7753
7754
7755
7756

036540
036544
036546
036554
036556
036564

020227
001364
012737
000207
012737
000207

7758

036574

004737

;;2}

;;2?
;;2;

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

7757

;;28

036500
036510

036526
036530
036532
036534

036566

036600

000207
000207

012246
012746
012746
010600
104417
062706

012737

000207

003230

000005

003202

000057

003202

CMP
BNE
MOV
RTS
ACTEXT: MOV

000055

003202

ACTPRT: MOV

027046

000004

7766
7767
7768
7769
7770
7771

036626
036632
036636
036640
036642
036646

012701
012702
006302
006302
010137
060237

006562
000017

7774
7775

036656
036662

013702
105037

007340
003560

;;;8

036704

005037

;;;%

7776
7777
7778

7781
7782
7783
7784
7785
7786
7787
7788

036652

036666
036674
036676

036710
036714
036720
036722
036724
036730
036734
036742

013701

023727
001500
012737

012701
012702
006302
006302
010137
060237
013737
012701

ACTHLP: MOV
#HLPTAB,R?
1$:
PRINTF WHLPF, (R2)+

000006

012737

112737
012737
000207

RTS

000002

036602

036610
036616
036624

RTS

013225

7761

7762
7763
;;gé

ACTNUL: RTS

177777
000001

003560
007500

007336
007336

007336

000002

000001

007340

007342

006562
000017

007336
007336
007336
005562

007416

TO SAY A SHOW WAS TYPED

;SETUP R2 AS A POINTER TO HELP MSG TABLE
JPRINT HELP INFORMATION MESSAGES
MOV
(R2)+,-(SP)
MOV
#HLPF ,=(SP)

MOV
MoV
TRAP
ADD

sJSEE IF ALL INFO PRINTED YET
;IF NO KEEP PRINTING
;SET LOC. TO SAY A HELP WAS TYPED

RTS

JSR

PC,REPORT

;CALL ROUTINE

N#PRNT ,KEYWD1
PC

#2,-(SP)
SP,RO
CSPNTF
#6,SP

JEXIT COMMAND

JSET LOC. TO SAY A HELP WAS TYPED

TO PRINT EVENT LOG AND BASE

ACTRUN: MOV

N#RUN KE YWD1

sSET RUN FLAG

ACTCSE: MOV
MOV
ASL
ASL
MOV
ADD

#PTRTAB,R1
AMSGL IM,R2
R2
R2
R1,CMPPTR
R2,CMPPTR

;INIT COMPARE MESSAGE POINTER

CMPTOT ,R2
PSNINUF

;FLAG THAT HAVE VALID COMMAND AT THIS PT.

crorcc

; AND RESET POINTER

MovB
MOV
RTS

MoV

003202

COMMAND

R2,#HLPEND
13
WHLP KEYWD1
PC
WEXIT KEYWD1
PC

RTS

003202

JRETURN TO PARSER

MOV
CLRB

#-1,PSNNUF
#1,RPASS
PC

CMPPTR,R1

cMp
BEQ
MOV

KEYWD1 , #SHOW
ACTSHW
#1,CMPTOT

MOV
MOV
ASL
ASL
MOV
ADD
MOV
MOV

#PTRTAB
,R1
MMSGL IM,R2
R2
R2
R1,CMPPTR
R2,CMPPTR
CMPPTR,(PTR
#CMPBUF ,R1

CLR

;SET FLAG TO SAY NEED MORE OF
JSET DEFAULT RUN ‘PASS'' TO 1

COMMAND

;SEE IF A CLEAR OR_SHOW WAS TYPED
;BR IF A SHOW WAS TYPED
;CLEAR COMPARE MESSAGE COUNT, CHAR.

s INIT COMPARE MESSAGE POINTER
JSET UP TO FILL IN DEFAULT MESSAGE

COUNT

TABLE

C2CLxBO DMR,DM(C-11 DATA COMM.
16-JUN-B1 14:38
CZCLKB.P11

MACY11

30A(1052)

7789

036746
036752

010137
000431

007344

MOV
BR

R1,CCURAD
ACTCLB

7792
7793
7794
7795

036754

012701
013702
105037
023727
001437
012737
005037
012737
013737
012701
010137

006562
007354
003560
003202

ACTCST: MoV

#PTRTAB,R1
TXMTOT ,R2

037036
037042
037046
037054
037062
037064
037066
037070
037074

012702
010137
012737
013737

001000
007420
000005
002162

037076
037102
037106
037110
037114
037116
037120
037124
037126
037134
037134
037140
037144
037150
037154
037156
037160
037164
037170
037172
037174
037202
037210
037216
037224
037230

012705

7790
7791

7796

7797
7798
7799

7800
7801
7802
7803
7804
7805
7806
7807
7808
7809
7810
7811
7812

7813

7814
7815
7816
7817
7818
7819
7820
7821
7822
7823
7824
(9)
(8)
(7)
(6)
(3)
(4)
(4)

7825
7826
7827
7828
7829
7830

037006
037012
037020
037026

037032

037232
037240
037244

105021

005302
001375
004737
000207

122571

001404
020527
001372

000001
007356
006562
0073534
003562
007360

BEQ
MOV
CLR
MOV
MOV

007354
007334
007416

ACTCLB:

1%:

ACTSHW:

5%:

003513

6%:

016137

000002

013746
016546
012746

007426
003464
014430
000003

007426

SEQ 0125

;FLAG THAT HAVE VALID COMMAND AT THIS PT.
-SEE I7 A CLEAR OR SHOW WAS TYPED
:BR IF A SHOW WAS TYPED
:CLEAR TRANSMIT MESSAGE COUNT,
: AND RESET POINTER

CHAR.

COUNT

MOV
MOV
MOV
MOV
CLRB

#SUFLIM,R2
R1. CURADD
#5,MSGTYP
MSGSC, CURCC
(R1)+

JSR

PC,BLDBUF

;"'CLEAR'’ REALLY MEANS TO PUT DEFAULT MSG IN

MOV
ggge

NSHTAB,RS
é§5)+.a(n1>

;LOOK AT FIRST BYTE OF MSG TO DECMPHER TYPE

gz?

gg,#SHTEND

;SEE

INC

:MUST BE OPR.

ASL
MOV
PRINTF

RS
2(R1),TEMP
#SHMSG,SHTYTB(RS)
,TEMP

su8

qg
PC

NSHTAB+1,RS

;SET UP TO PUT DEFAULT MSG IN LIST AFTER 033'S
;FILL EXPT OR TRAN BUFFER WITH 0°S

[F A CLEAR

:DO 'BUFLIM" NUMBER OF BYTE LOCATIONS
‘WHEN DONE,

RETURN TO PARSER

IF LOOKED AT ALL OF DEFAULTS YET
SPEC'D THEN

;PRINT MSG SIZE

& TYPE

MOV

ADD

DEC

BNE

007470
007472
007500
007476
032340

MOV
MOV
MOV
MOV
JSR
RTS

007402

003202

ACTDMS: MOV
CLR

MOV

#4,R1

;BUMP R1

TO NEXT

SET OF

POINTERS

TEMP,
- (SP)

SHTYTB(RS) ,~(SP)

#SHMSG,
- (SP)

MOV

#3,-(SP)

TRAR
ADD

CSPNTF
#10,SP

MOV

000010
000004

003554
007406
000052

ACTSHW
#1,TXMTOT
TTOTCC
#PTRTAB, TXPTR
TXPTR,CPTR

PAGE 13-89

#TXBUF ,R1
R1, TCURAD

RTS

003504
000000

PSNNUF
KEYWD1,#SHOW

14:39

MOV
MOV

gsg

032010

003505

013737
005037
012737

MOV
CLRB
CMP

000002

007410
007412

110

16-JUN-81
ACTION TABLE AND ROUTINES

LINK TEST

SP.RO

AC
T SHW

MODTYP,DEV1
MLTYP,DEV?
RPASS ,DEV3
PARAM
, DE V4
PC, SHWOP

;SHOW THE OPERATOR THE

PSNUM, STADD

;SETUP STARTING ADDRESS FOR DUMP

#DMPS , KE YWD 1

:FLAG THAT A DUMP WAS TYPED

BYTBIT

:SET DEFAULT OF

CURRENT MODE.....

WORD DUMP

ALSO

CZCLkBO DMR,DMC-11

cZCLkB.P11
7838
7839
7840
7841
7842
7843
7844

DATA (OMM.

16~JUN-81

037252

000402

037254

012737
013737

037262
037270
037274

105037
000207

14:38

LINK TEST

J 10

MACYT1 30A(1052)
16-JUN-81
ACTION TABLE AND ROUTINES
Bk

177777

003554
003560

007406

007404

ACTDMQ: MOV
: MOV
ACTDME
ACTDMX: g%gB

14:39

PAGE

13-90

ACTDME
#-1,BYTBIT
PSNUM, ENADD

S?NNUF

JSET DUMP FLAG TO 'DUMP-WORD''
;SETUP END ADDRESS FOR DUMP (=START

[F NO 'EEE"’
;CLEAR NOT-ENOUGH FLAG, 'DUMP N-N/B'' IS VALID

SEQ 0126

CZCLxBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11
7846
7847
7848

16-JUN-81

14:38

MACY11 30A(1052)

K 10

16=-JUN-81

ACTION TABLE AND ROUTINES

14:39

PAGE 14

SEQ 0127

;ggg

037276
037304

012737
000403

000010

003202

ACTSTE: MOV
BR

#SETEXP ,KEYWD1
ACTSTX

7851
7852
;ggz

037306
037314
037322

012737
012737
000207

000011
000001

003202
003206

ACTSTT: MOV
ACTSTX: MOV
RTS

#SETTRN,KEYWD1
#1,QUALVL
PC

7855

037324

012737

000012

003204

ACTSZE:

#S1Z2E ,QUALFG

7858

037334

012737

000013

003204

ACTCOP: MOV

#QCOPY,QUALFG

7861
7862
7863
7864
7865
(7)
(6)
(3)
(4)
(4)
7866
7867

037344
037352
037354
037360
037362
037362
037366
037372
037374
037376
037402
037410

023727
001023
005737
001014

0032064

000012

ACTNUM:

013001
000001

QUALFG,#SIZE
1%
PSNUM
3s
#CLISEO

;SEE IF A SIZE OR COPY TYPED
;BR IF IT WAS A COPY
;CHECK TO BE SURE DIDN'T TRY SIZE=0
; BR IF NO

012746
012746
010600
104417
062706
112737
000411

CMP
BNE
TST
BNE
PRINTF

MOVB
BR

#-1,P$GDBD
2%

;SEE ERROR=-IN-CMD FLAG

7869

037420

000405

;gg?
;ggg

7868

7870

7871
;g;g

037332
037342

037412
037422

037430
037434

000207
000207

003561

013737

003554

007412

3$:

013737

003554

003206

18:

7874

0376436

012737

;g;g

037454

000207

7875
7876

037444
037450

010437
005237

7879
7880
7881
7882
7883
7884
7885

037456
037460
037464
037470
037474
037500
037504

010402
163702
010237
010237
013701
012705
112125

7887
;ggg

037510
037512

001375
000473

7890
(7)
(6)
(3)
(4)
(4)
7891

037514
037514
037520
037524
037526
037530
037534

012746
012746
010600
104417
062706
000207

7886

037506

003554

003206

000007

007426
007426

007426
007412
002166
007426
002524

005302

2$:
0C7410

RTS
RTS

000004
177777

005237
000522

MOV

MoV
mMov
INC
BR

ACTOPM: MOV
MOV
INC

RTS

ACTEQO: MOV
suB
MOV
MOV
MOV
MOV
1$:
movB

DEC

BNE
BR
01273%
000001
000004

ACTBCR: PRINTF

RTS

;SET UP DEFAULT COPY TO 1

(/COPY=0)

MOV
MOV
MOV
TRAP
ADD

PSNJUM, CURCC

JIF A SIZE LOAD CURCC WITH BYTE COUNT

PSNUM, QUALVL

JIF A COPY, LOAD COPY COUNT

QUALVL
ACTMEX

#7,MSGTYP
R4, TEMP
TEMP

R4 R2
TEMP,R2
R2,CURCC
R2,0PCNT
TEMP,R1
#0PBUF ,RS
(R1)+,(R5)+

#CLISEQ,-(SP)
#1,-(SP)
SP,RO
CSPNTF
w6 ,SP

s INCREMENT SO FIRST DEC MAKES IT REAL #

;KEEP TRACK OF START OF QUOTED TEXT
; SO CAN CALC OPCNT AT END OF QUOTES

;CALC BYTE COUNT FOR QUOTED TEXT

;COPY QUOTED TEXT TO OPBUF

1%
ACTMEX
#CLIBCR

;BAD (CHAR.

IN OPR. QUOTED STRING
MOV
MOV
MOV
TRAP
ADD

#CLIBCR,-(SP)
#1,-(SP)
SP,RO
CSPNTF
46 ,SP

CZCLKBO DMR,DMC~11 DATA COMM.
16~JUN-81 14:38
CZCLKB.P11
7892
7893
7894
7895
7896
7897
7898

7923

037536
037542
037544
037552
037554
037562
037564
037572
037574
037602
037604
037612

005037

MACY11 30A(1052)

LINK TEST

007410

ACTION TABLE AND ROUTINES

ACTMSO:

000001

007410

000002

007410

000003

007410

000004

007410

000005
002162

007410
007412

BR
ACTMS1: MOV
BR
ACTMS?: MOV
BR

ACTMS3: MOV
B8R
ACTMSS: MOV
BR
ACTMSS: MOV
MOV

012737
013737

G00006
002164

007410
007412

BR
ACTMS6: MOV
MOV

037636
037644

012737
000416

000100

007412

ACTMET: MOV

037646
037654
037656
037664
037666
037672
037700

022737
001404

000010

003202

ACTSEX:

177777

003561

032134
000060

003202

037702

105037
000207

037706

003560

B8R

ACTMEX:

PAGE 14-1

MSGTYP

ACTMET
#1,MSGTYP
ACTME
N2 ,MSGTYP
ACTMET
#3,MSGTYP
ACTMET
#4 ,MSGTYP
ACTME
#5,MSGTYP
MSG5C, CURCC
ACTMEX
#6,MSGTYP
MSG6C, CURCC

#64.,CURCC
ACTMEX

.REV B BY EC

sALL ONES

;ONES & ZEROS

;ZEROS & ONES
JCCITT
;QUICK FOX

sSETUP DEFAULT SIZE FOR THIS TYPE

;ALPHA/NUM
;SETUP DEFAULT SIZE FOR THIS TYPE

:SETUP DEFAULT SIZE FOR MSGO-4
.GO TO EXIT

cMP
BEQ

#SETEXP,KEYWD1
108

BR
JSR
MOV
BR

ACTMEX
PC,FACSIMILE
#SETET ,KEYWD1
ACTMEX

:SET ERROR FLAG
;60 TO EXIT
;GO COPY TRANMIT BUFFER TO EXPECT BUFFER
sSET FLAG TO BE USED IN T1::
;GO TO EXIT

PSNINUF

;CLEAR NOT-ENOUGH FLAG

MovB
:
108

14:39

JSET THE MESSAGE TYPE AS PER COMMAND L INE

CLR

037620
037622
037630

112737

L 10

16=JUN=-81

CLRB

RTS

#-1,P$GDBD

;DID WE GET HERE FROM ‘'SET E ="' COMMAND>

:YES ,BRANCH

SEQ 0128

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

MACY11 30A(1052)

16=JUN-B1

CZCLkB.P11

16-JUN-81

14:38

7925

037710

012737

000003

007470

ACTATV: MOV

7928
7929
7930
;3;;

037720
037726
037732
037736

012737
105037
005037
000207

000002
003560
007472

007470

ACTPAS: MOV
CLRB
CLR
RTS

#PAS ,MODTYP
PSNNUF
MLTYP
PC

7933

037740

005037

007470

ACTREC:

MODTYP

7936

037746

012737

000006

007470

ACTLIS: MOV

#LIS MODTYP

7939

037756

012737

000004

007470

ACTDLL: MOV

#DOW,MODTYP

7942

037766

012737

000001

007470

ACTTRA: MOV

#TRA ,MODTYP

;322 037776 012737 000005 007470 ACTTAL: MOV

#TAL ,MODTYP

7947
7948
7949
7950

#ECHOB ,PARAM
PSNNUF
MLTYP
PC

?7359 037716 000432

ggg

037744

000617

%% 037754 000413
%9 037764 000407
%2

037774

040004
040012
040016
040022

000403

042737
105037
005037
000207

000004
003560
007472

007476

ACTION TABLE AND ROUTINES

CLR

B8R

B8R
8R

ACTM2X: BIC
CLRB
CLR
RTS

14:39

PAGE 14-2

#ACT MODTYP

ACTMOX

:CLEAR NOT-ENOUGH FLAG
‘CLEAR MAINT LOOP TYPE

AC TM2X

ACTMOX

ACTM2X
AC TM2X

:DISABLE /ECHO (ALL BUT PASSIVE MODE)
*CLEAR NOT-ENOUGH FLAG
:CLEAR MAINT LOOP TYPE

SEQ 0129

MACY11 30A(1052)

CZCLxBO DMR,DMC-11 DATA COMM. LINK TEST
16~JUN-81 16:38
czcLkB.P1
040024
040032

000036

003204

ACTNO:

MOV
RTS

#NO,QUALFG
PC

022737
001422
052737
022737
001416

000036

003204

ACTECH:

#NO,QUALFG

000004
000002

007476
007470

CMP
BEQ
8IS
cMP
BEQ

012746
012746

012671
000001

000501

003561
007476

1%:

2$:

14:39

PAGE 14-3

;BE SURE IN PASSIVE MODE IF

PRINTF

#CLINPS

MOVB
8IC
CLR

#-1,P$GDBD

;JF

TRYING TO SET /ECHO

MOV
MOV
MOV
TRAP
ADD

#ECHOB
, PARAM

;CLEAR 'NO'' OUT OF QUALIFIER FLAG
;SET DATA CHECK BIT

:
ACTCHK

#DATCKB,R1
ACTQFG

012701
000410

000001

ACTSTS:

#STATB,R1
ACTQFG

;SET THE STATUS BIT

012701
000405

000020

ACTCRC:

#CR(B,R1
ACTQFG

;SET THE CRC BIT

012701

000010

ACTMOS:

MMOCHK ,R1
ACTOFG

;MODEM BIT

012701

000040

ACTPRO:

#PROTO8B,R1

;SET THE PROTOCOL BIT

050137
022737
001002
040137
005037
000450

007476
000036
007476
003204

ACTQFG:

18:

R1,PARAM
R1,PARAM

QUALFG
ACTLXX

;CLEAR "NO'' OUT OF QUALIFIER FLAG

PSNUM,RPASS

;JGET NUMBER OF ‘RUN PASSES''

003554

007500

ACTRPS:

012737

000005

007472

ACTMOP:

000001

007472

ACTTLP:

000002

007472

ACTCLP:

000003

007472

ACTLLP:

000004

007472

ACTRLP:

#3 MLTYP
ACTLPX
W4 ,MLTYP

000003

007470

ACTLPX:

NACT ,MODTYP

177777

003561

000403
012737

0460264
040272
040274

022737
001415

112737

ADDED BY EC

:QO.QUALFG

013737
000444

040254

#CLINPS ,~(SP)
#1,-(SP)
SP,RO
CSPNTF
w6 ,SP

QUALFG
ACTLXX

000002

003204

SEQ 0130

#ECHOB, PARAM
#PAS ,MODTYP

012701
000413

000402

040256

ACTION TABLE AND ROUTINES

012737
000207

000004
177777
000004
003204

N 10
16=JUN=B1

ACTLXX

#5,MLTYP

ACTLPX
#1 MLTYP
ACTLPX
#2 MLTYP
ACTLPX

ACTLXX
#-1,P$GDBD

JBE

SURE

. BR IF

IN ACTIVE

TRYING TO SET LOOP

CZCLKBO DMR,DMC~11 DATA COMM.
16-JUN-81 14:38
(ZCLkB.P11

8004
8005
(7)
(6)
(3)
(4)
(4)

8006
8007
8008

005037

007472

012746
012746

012627
000001
000004
003560

LINK TEST

MACY11

30A(1052)

CLR

MLTYP

8 1

16=JUN-81

ACTION TABLE AND ROUTINES

PRINTF

ACTLXX:

g%gfl

#CLIBRDL

g?NNUF

14:39

PAGE 14-4

SEQ 0131

;CLEAR ANY LOOP TYPE THAT MAY HAVE GOT SET

;CLEAR NOT-ENOUGH fLAG

Mov
MOV
MoV
TRAP
ADD

#CLIBDL ,~(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,SP

C2CLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P11
8010
8011

16-JUN-81

14:38

007472

8012
8013
8014
8015
8016
8017
8018

040334
040340
040342
040350
040352
040360
040362

005737
001422
032737
001416
023737
001412

(3)
(4)

040372
040374

010600
104417

(7)
(6)
(4)

gg;g
8021

8022
8023

8024
8025
8026
8027
8028
8029
8030
8031

8032
8033
gg%g

040362
040366
040376

007476

007340

007354

013032
000001

040402

000137

062706

000004

040406
040412

012701
010137

006562
007334

040416
040422
040424
040426
040432
040436
040442
040446

040450
040452
040456

012702
006302
006302
010137
060237
013701
012702
006302

040462

013737

007340

8038
8039
8040
8041
8042
2822

040470
040474
040500
040504
040510

005037
005037
005037
005037
005037

007502
007374
007376
007400
007372

8045
3829

040514
040520

004737
004737

026452
043320

8048
8049
8050
8051
8052

040524
040532
040540
040546
040554

012737
012737
013737
012737
004737

001000
004562
007332
000010
032010

040560
040564
040566

013702
006302
000172

10%:

007470

007504

MLTYP
108
#DATCKB,PARAM
108
CMPTOT,TXMTOT
108
#CLIPW

ASL
MoV
ADD
007370

GTREX:

007412
007420
007416
007410

GIRX2:

GETCL

sRX ALLOCATE CODE

MOV
MOV

MOV
ASL
ASL
MOV
ADD
MOV
MoV
ASL

007336
007336
007336
000017

gg%g

8053
8054
8055

JMP

000017

007332
007332

;REV B BY EC

TST
BEQ
BIT
BEQ
cMP
BEQ
PRINTF

14:39

PAGE 14-5

:LOOP MODE ?
sNO ,BRANCH
;DATA CHECK ?
sNO,BRANCH
;TX € TX EQUAL
¢ YES ,BRANCH
;PRINT WARNING

SEQ 0132

MOV
MOV

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

ADD

w4, SP

MOV
TRAP

035310

006302
010137
060237

cTMn
16-JUN-81

ACTION TABLE AND ROUTINES

GTR9:

000002

012746
012746

MACY11 30A(1052)

W#PTRTAB,R1
Ri,TXPTR

#MSGLIM,
R2
R2
R2
R1,CMPPTR
R2,CMPPTR
CMPPTR,R1
AMSGLIM,R2
R2

;TRY AGAIN

SP,RO
CSPNTF

;INIT TRANSMIT MESSAGE POINTER

sINIT COMPARE MESSAGE POINTER

R2
R1,RXPTR
R2,RXPTR

s INIT RECEIVE MESSAGE POINTER

Mov

CMPTOT ,RXMTOT

;MAKE COMPARE AND RX MESSAGE COUNTS EQUAL

CLR
CLR
CLR
CLR
CLR

FLAG
NOBUF
PSCNT
ERRCNT

LNCNT

;CLEAR
;CLEAR
;CLEAR
;CLEAR
;CLEAR

JSR
JSR

PC,LOGDVI
PC,DVINIT

;LOG _ABOUT TO INIT DEVICE
sINIT DEVICE

MOV
MoV
MOV
MOV
JSR

#SUFLIM,CURCC
W#RXBUF ,CURADD
RXPTR,CPTR
#10,MSGTYP
PC,BLDBUF

;SET CHAR COUNT TO 'BUFLIM'’ NO. OF BYTES
;SET UP RX BUFFER AS CURRRENT ADD.

MOV
ASL
JMP

MODTYP,R2
R2
aMODE (R2)

FLAG
NO BUFFER COUNTER
PASS COUNT
ERROR COUNT

LINE COUNTER

;SET UP FOR 33 TO FILL RX BUFFERS
;CLEAR RX BUFFER
;MODE DISPATCH

MACY11 30A(1052)

C2CLxBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.PI

16-JUN-81

14:38

8058
8059
8060
8061

8074
8075
8076
8077
8078
8079
8080

RECEIVE MODE SECTION

0,
%0000,

FUNCTIONAL DESCRIPTION:
RECEIVE-ONLY (OR_ONE-WAY=IN)

ROUTINE

IN THIS MODE OF TESTING THE DEVICE'S RECEIVER IS ENABLED IN EXPECTATION
AFTER RECEIVING AN 'EXPECTED'' NUMBER OF
OF RECEIVING A MESSAGE.
MESSAGES, THE DATA RECEIVED CA/N BE COMPARED AGAINST A LIST OF 'EXPECT

00y
0y
B0

PAGE 14-6

TO RECEIVE'® MESSAGES IF DATA-CHECKING IS ENABLED.

SUBORDINATE ROUTINES, USED:
LLTR

CALLING SEQUENCE:
JMP
aMODE (R2)

;DISPATCH TO MODE BASED ON MODE TYPE IN RZ2

14:39

‘4

8066
8067
8068
8069
8070
8071

8072
8073

RECEIVE MODE SECTION

LSBTTL

8063
8064
8065

DN
16-JUN-81

040572
040572
040600
040606
040614
040620

013737
013737
052737
005037
000137

007332
007370
000104
007416
040762

007414
007366

007502

RXONLY:

RXONZ:

MOV
MOV
8IS
CLR
JMP

RXPTR,CPTRR
RXMTOT ,DVRCT
HQRX+A,ERX
FLAG
CPTR
ALLTR

JSET UP MESSAGE COUNT

;SET UP RX QUE
;CLEAR THE TX POINTER
. G0 RX.

SEQ 0133

CZCLxBO DMR,DMC-11 DATA COMM, LINK TEST

C2CLKB.P11

16-JUN~-81

E 1
16-JUN-81

MACY11 30A(1052)

14:38

TRANSMIT MODE SECTION

8082
8083
8084
8085

.SBTTL

4t
: FUNCTJONAL DESCRIPTION:

8087

8086

R0O88

298.58

TRANSMIT MODE SECTION

TRANSMIT-ONLY (OR ONE-WAY-0UT) ROUTINE

;

EXPECTING ANY DATA TO BE RECEIVED.

IN THIS MODE OF

TESTING A LIST OF MESSAGES IS TRANSMITTED WwITHOUT

: SUBORDINATE ROUTINES USED:
:
“ALLTR"'

8094

8097

8098
8099
8100
8101
8102
8103

;
040624
040632
040640
040646
040654
040660

042737
013737
013737
052737
005037
000137

000002
007334
0073546
000210
007414
040762

007476
007416
007352
007502

A REPETITION COUNT CAN BE

SPECIFIED TO REPETITIVELY TRANSMIT THE LIST.

8091
8092
8095

PAGE 14-7

;
:

8093

14:39

CALLING SEQUENCE:

JMP

’

TXONLY: BIC
TXON2:
MOV
MOV
BIS

CLR
JMP

@MODE (R2)

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

#DATCKB,PARAM
TXPTR,CPTR
TXMTOT,DVTCT
NQTX+NETX ,FLAG

;SET NOCHECK

CPTRR
ALLTR

;COPY COUNTER FOR THIS PASS
;SET THE QUE TX FLAG
:CLEAR RX POINTER
;GO TX.

SEQ 0134

CZCLKBO DMR,DMC-11 DATA (COMM. LINK TEST

{2C.kB.P1

16=-JUN-81

14:38

PAGE 14-8

SEQ 0135

PASSIVE MODE SECTION

PASSIVE MODE

= OV NV
NN 2O

SECTION

IN THIS MODE OF TESTING, THE DEVICE'S RECEIVER IS ENABLED IN
EXPECTATION OF RECEIVING A MESSAGE.
THEN EVERY TIME A MESSAGE IS
2EEE}¥Eg.D:TgESSAGE IS TRANSMITTED.
DATA CHECKING CAN BE DONE ON THE

TP
WL IR
P
IR
RN
I I P
LRI

D b
md

d s

d o
d

D
el
e

14:39

S 44
FUNCTIONAL DESCRIPTION:

D ed

b e
d
—d

F11

16=JUN-81

PASSIVE MODE SECTION

LSBTTL

NN =

0o 0o 00 0o O 0o 00 00 0o 0o 0o 00 00

8105
8106
8107
8108

8122
8123
8124
8125
8126
8127
8128

MACY11 30A(1052)

040664
Q40664
040672
040700
040706
040714

013737
013737
013737
G52737
000137

007354
007334
007332
000104
040762

007352
007416
007414
007502

SUBORD INATE ROUTINES USED:

CALL ING SEQUENCE:
JMP
aMODE (R2)

PL(K:
PLCK2:
PLCK3:

MOV
MoV
MOV
8IS
JMP

TXMTOT ,DVTCT
TXPTR,CPTR
RXPTR,CPTRR
#QRX+MERX,FLAG
ALLTR

;DISPATCH TO MODE BASED ON MODE

sSET
sSET
:SET
;SET
sAND

UP
UP
UP
UP
GO

THE TRANSMIT COUNT
CPTR TO TRANSMIT POINTER
CPTRR TO REC POINTER
Q AND EXPECT RX
RX FIRST MSG.

TYPE

IN R?

CZCLxkBO DMR,DMC-11 DATA COMM. LINK TEST

C2CLKB.P1T

16~JUN-81

14:38

813
8132

6-JUN-B1

ACTIVE MODE SECTICN

.SRTTL

8133

MACY11 30A(1052)

ACTIVE MODE SECTION

AGAINST "EXPECTED'' DATA IF DATA-CHECKING IS ENABLED.

£139

g}fi%

: SUBORDINATE ROUTINES USED:

8144
8145
8146

:
:
;

g}:g

8157
8158

NOTE:

g}fig

glgg

SEQ 0136

: 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

8138

8149

PAGE 14-9

8134
8135
8136
8137

8150
8151
8152
8153
8154

14:39

:
040720
040726
040734
040742
040750

040756

013737
013737
013737
013737
052737
000137

007354
007334
007370
007332
000314
040762

007352
007416
007366
007414
007502

IF BOTH ENDS OF

THE LINK ARE IN ACTIVE MODE,

LINK MUST BE A FULL DUPLEX LINK!

THEN THE

"ALLTR"
CALLING SEQUENCE:

ALCK:

JMP

aIMODE (R2)

:DISPATCH TO MODE BASED ON MODE TYPE IN R2

MOV
MOV
MOV
MOV
BIS
JMP

TXMTOT ,DVTCT
TXPTR,CPTR
:SET UP TX COUNTS
RXMTOT,DVRCT
:SET UP COUNTS
RXPTR,CPTRR
HQRX+HQTX+#E TX+#ERX ,FLAG
ALLTR

MACY11 30A(1052)

CZCLxBO DMR,DMC-11 DATA COMM, LINK TEST
16-JUN-81 14:38
(ZCLkB.PN
8160
8161
8162
8163

TRANSMIT - RECEIVE

16-JUN-B81
FOR ALL

14:39

TRANSMIT - RECEIVE FOR ALL

SBTTL

PAGE 14-10

SEQ 0137

STANDARD MODES

c 4

FUNCTIONAL

DESCRIPTION:

THIS CODE PERFORMS THE FOLLOWING FUNCTIONS
1.) IF RX BUFFERS ARE TO BE QUED,TELL DEVICE
CODE TO QUE THEM ,LOG RECE.VE QUED.

8164

8165
8166
8167
8168
8169
8170
8171
8172
8173
8174
8175
8176
8177
8178
8179
8180
8181
8182
8183
8184
8185
8186
8187

2.)

IF TX BUFFERS ARE TO BE QUED ,TELL DEVICE
CODE TO QUE THEM, LOG TRANSMIT QUED.
3.) WAIT FOR EITHER RECIVE BUFFER OR TRANSMIT BUFFER OR
BOTH TO COMPLETE

4&.)

5.)
6.)

;

IF RECEIVE COMPLETE LOG IT UPDATE Rx TABLE I[F
CHECKING.
IF TRANSMIT COMPLETE LOG IT.
WHEN BOTH TRANSMIT AND RECIEVE LISTS ARE DONE
GO TO THE COMPARE BUFFER CODE

DATA

SUBORDINATE ROUTINES USED:

"DVRXQ'' -QUE RECEIVE BUFFER SPACE TO DEVICE
"LOGRXQ''-LOG RECEIVE BUFFER SPACE TO EVENT LOG
"10OGTXQ''-LOG TRANSMIT BUFFER QUED TO EVENT LOG
"DVTXRX''~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:

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
QRX

8188

8189

8190
8191

8192
8193
8194
8195

ETX

WHEN TX BUFFER IS

COMPLETED.

g;EgC?EDDVTXRx TO DETERMINE

ERX - USED BY DVTXRX TO DETERMINE
EXPECTED.

8196

8197
8198
8199
8200
8201

CALLING SEQUENCE:
JMP
ALLTR

040762
040762
040770
040772
040776
041002
041006
041012
041016
041022
041026
041032

000004

007502

ALLTR:
ALCKS:

007414

6406
000010

BIT

ALCK1

MOV
MOV
MOV
MOV
MOV

(R2)
, TEMP2
(R2)+,DVRXA
(R2) ,TEMP3
(R2) ,DVRCC
R2,CPTRR

JSR

PC,LOGRX0Q

MOV

JSR

007502

ALCKT:

#QRX ,FLAG

BEQ

BIT

CPTRR,R2

PC.DVRXQ

#QTX,FLAG

TX BUFFER COMPLETED IS

IF RX BUFFER COMPLETED IS

;GO TO TRANSMIT-RE(cIVE FOR ALL STANDARD MODES

;IF NOT RX GO TO TX'S

.60 QUE DEVICE

;LOG REC QUED

—

MACY11 30A(1052)

CZCLxBO DMR,DMC-11 DATA COMM. LINK TEST
czcLx8 P11
16~-JUN-81 14:38

041076

044120

BEQ

MOV
Mov
MoV
MoV
MOV
MOV

ALCK?:

041102

032737

000004

007502

=
HsOoononesON
orRONNONONON
&8 NN—‘—‘—‘OVO’*%U‘U\J\J\J\WNN—'

007416
007432
007346
007434
007350
007416
026352

b b
b

041040
041042
041046
041052
041056
041062
041066
041072

013737
013737
004737
032737

007362
007364
026424

007432
007434

41250

013722
013712

b
d
b
b ed md
D
h
b
b
d
d
b
b
d

001514

000004

007476

007416
007432
007434
000002

007476

000001
007332
000003

007366
007414
007470

007366

—

POPOADNINI
N = b b — —d ad d ek —d
b

RRRRRRRRRRRRRRRRRRRR

021110

007414
007426
007434
007434
007434
007432

TRANSMIT ~ RECEIVE

005337
005737
001005
042737
005037
032737
001447
013737
013737
004737
005337

000104
000210

UPTEX:

007366
007366

007502

007346
007350
026370
007352

007432
007434

007502

;GO TO TX AND RX SUB ROUT.

BIT
BEQ

#ORX, FLAG

;CHECK FOR REC. MSG.

ALCKS

DVRXA, TEMP2
DVRCC. TEMP3

PC,LOGRXC
#E CHOB
, PARAM

UPTA4
CPTR,R2
TEMP?2, (R2) +
TEMP3. (R2)

#DATCKB
, PARAM

UPTAT

#01,DVRCT
RXPTR, CPTRR

JIF YES BUMP COUNT

, TEMP
(R2)
TEMP3, TEMP
TEMP3, (R2) +
TEMP3, TEMP2
TEMP2, (R2) +

;LOAD TEMP WITH PREV. COUNT
;LOAD TEMP WITH PREV.COUNT-CURRENT

CPIRR,R2

#2,R2
R2,CPTRR
MPAS ,MODTYP

ALCK1

DVRCT
DVRCT
ALCK3

#QRX ,FLAG

ALCK3:

JLOG REC COMPLETE
;1S THIS ECHO MODE (PASSIVE)
;IF NOT GO TO 4
SELSE SET R2 TO PRESENT TX TABL
;STORE OFF RX ADD
JAND CC
;IS DATA CHECKING ASKED FOR
;1F SO GO TO 1
;ELSE SET DVRCT TO A 1
JRESET POINTER
;1S THIS ACTIVE

DVRCT
UPTEX

#QRX+AERX ,FLAG
MQTX+HETX,FLAG

ALCKZ2A:

000004
007414
000010

PC.,DVTXRX

ALCKZ2A

007502
007502

;IF NO TX''S GO TO 2

JSR

UPTA3

007432

PAGE 14-11

(R2)+,DVTCC
RZ2,CPTR

#ACT ,MODTYP

007426

007470

ALCK2
CPTR,R2
(R2)
, TEMP2
(R2)+,DVTXA
(R2) ,TEMP3

14:39

STANDARD MODES

PC.LOGTXQ

JSR
: BIT
UPTABL
BEQ
MOV
MOV
MOV
:
UPTA4
BIT
BNE

162702

022737
001007
042737
052737
000646

FOR ALL

JSR

MOV
Mov

UPTA3:
UPTA1:

010237

I 1

16=JUN-81

CPTRR

#QTX,FLAG

ALCK4

DVTXA, TEMP2
DVTCC,TEMP3
PC,LOGTXC

DVTCT

;STORE OF NEW ADD
JAND NEW CC
;PUT POINTER BACK TO ADDR.
sAND RESTORE IT.

:IF NOT PASSIVE LOOP THEN GO TO 2A
cCLEAR BOTH EXPECTED AND COMPLETED FLAGS
:sSET THE TX FLAGS
sDEC REC COUNT
:1S IT ALL DONE
;NO. GO CHECK TX
;CLEAR THE RX FLAG
JYES. CLEAR POINTER
JIS IT TX
;IF NOT TX THEN GO BACK
;LOG TX COMPLETED
JDEC TX COUNT

SEQ 0138

—

CZCLkBO DMR,DMC-11 DATA (OMM.
16-JUN-81 14:38
CZCLKB. P11

8274

8275
8276
8277
8278
8279
8280
8281
8282
8283
8284
8285

8286
8287
8288
8289
8290
8291
8292
8293
8294
8295

061376
041404
1406
414
422

RRRRRRRRRRR

8272
8273

426
430
434

440
462
446

022737
001013
042737
052737
005737
001005
000137
005737

460

041466
041470

041474
041476

000002

007470

000210
000104
007352

007502
007502

041510
007352

001362
005737
001402
000137

ALCK3A:

P
BNE
BIC
BIS
TST
BNE
JMP
TST

007414
007416

ALCK4A:

041076

007502
007476

30A(1052)

J 1

16-JUN-81
14:39 PAGE 14-12
TRANSMIT -~ RECEIVE FOR ALL STANDARD MODES

BEQ
ALCK3(: JMP
ALCK3B: CLR
BIC
BIT
8EQ
TST
ALCKS:

040762
007416
000010
000002

452

MACY11

LINK TEST

ALCK4B:

BNE

TST
B8tQ
JMP

#PAS .MODTYP

ALCKS$A

#ATXHETX,FLAG
#ORX+E
. FLAG
RX

DVTCT
AL CK3C
CMPSR
DVTCT
ALCK38
AL (K5
CPTR

;IF _NOT PASSIVE MODE GO TO 3A
;CLEAR THE TX FLAGS
AND SET THE RX FLAGS

s1F MORE RX'S DO IT

. ELSE COMPARE
1S IT ALL DONE

;IF NOT GO BACK TO S

#QTX,FLAG
#DATCKB
, PARAM

:IF SO CLEAR POINTER
;CLEAR TX FLAG
;1S IT DAT (K
:1F NOT THEN END WO CKING RX.

ALCK3C

;IF SOME RX''S LEFT GO BACK

AL CK4A
CPTRR
(PTR
AL(CK4B
ALCKZ2

JBRANCH [F

ANY

TX'S LEFT

SEQ 0139

C2CLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P1

16=JUN-81

MACY11 30A(1052)

14:38

K 11
16=-JUN-81

DATA COMPARISON CODE

.SBTTL

14:39

PAGE 14-13

8297
8298
8299
8300

;40

8303
8304

:
:

EXPECTED AND FILLS THE EVENT LOG WITH 1 OF 3 MSGS.

gggg

NOTE:

8309
8310
8311
8312
8313
8314
8315

;
;
;
;
;
;
;

1.) A DATA COMPARISON ENTRY WHICH REPORTS THE NUMBER
OF COMPARISON ERRORS FOUND.
2.) A DATA COMPARISON ENTRY WHICH REPORTS DIFFERENCES
IN REC LENGTH TO COMPARE LENGTH.
3.) A DATA COMPARISON STARTED ENTRY WHICH REPORTS ADDRESS
OF RECEIVE BUFFER AND BYTE COUNT.
THIS CODE ALSO REPORTS SOFT ERRORS FOR DATA COMPAR]SON

8318

8321
8322

:
:

8325

;

ggg}

g%gg

gg}g

8328
8329
8330
8331
8332
g;%z

041510
041516
041520
041526
041534

032737
001522
013737
013737
013737

000002

007476

007332
007336
007370

007416
007414
007366

8335
8336

041542
041542

013702

007416

8338
8339

041552
041554

012201
012237

8342
8343
8344
8345
8346

041564
041570
041572
041574
041600

8349
8350
8351
8352

041610
041614
041616
041622

ggfig

IF NO DATA CHECKING SKIP THIS CODE

(THE FIRST S ONLY),LENGTH ERROR,AND TOTAL NUMBER OF ERRORS

‘LOGCMP'* - SEE ITEM 3 ABOVE
"LOGCML’' -~ SEE ITEM 2 ABOVE

ggsg

3332(1)

CMPSR - COMPARE CODE
THIS CODE COMPARES THE RECEIVED DATA AGAINST 1AE

: SUBORDINATE ROUTINES USED:

gggz

8337

FUNCTIONAL DESCRIPTION:

;

g%}g

DATA COMPARISON CODE

041546
041560

041604

011237
010237

007432
007434

"LOGCMD'* ~ SEE ITEM 1 ABOVE

CALLING SEQUENCE
:

C(MPSR:

CMPS3:

JMP

CMPSR

;JUMP TO DATA COMPARISON CODE

BIT
BEQ
MOV
MOV
MOV

#DATCKB,PARAM
CMPSEX
RXPTR,CPTR
CMPPTR,CPTRR
RXMTOT ,DVRCT

:1S DATA CHECKING TO BE DONE
:1F NOT THEN EXIT
:PUT START OF RX POINTERS TO CPTR
: AND START OF COMPARE POINTS TO CPTRR

MOV

CPIR,R2

:MOVE CURRET RX PT.TO R2

MOV
MOV

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

:SET R1 TO START ADD OF RX
:SET CHAR
COUNT TO EVENT LOG

MOV

(R2) ,TEMP?2

:MOVE RX ADD TO EVENT LOG

007416

MOV

R2.CPTR

013702
012203
012204
010237
010437

007414

026520

CPTRR,R2
(R2)+,R3
(R2)+,R4
R2,CPTRR
R4, TEMP4

:PUT R2 AT COMPARE TABLE
:SET R3 TO COMPARE ADD
:SET R4 TO COMP (C
;RESTORE POINTER

004737

MOV
MOV
MOV
MOV
MOV

PC.,LOGCMP

;LOG COMPARE START,

020437
001410
(05237

007434

MP
BEQ
INC
ERRSOFT

R4 ,TEMP3
CMPS7
ERRCNT
1,EDDLE.ERR10

;1S COMPARE COUNT = TO RX (OUNT
;IF SO GO T0 7

007414
007436

007400

JSR

JRESTORE RX POINT

;PRINT ERROR

SEQ 0140

CZCLKBO DMR,DMC-11 DATA COMM., LINK TEST
C2CLKB.P11
16=JUN-81 14:38
(4)
(5)
(5)
(5)

8353
8354
8355
8356
8357
8358
8359
8360
8361
8362
8363
8364
8365
8366
(4)
(5)
(5)
(5)

8367
8368
8369
8370
8371
8372
8373
8374
8375
(4)
(5)
(5)
(5)

8376
8377
8378
8379

041622
041624
041626
041630

104457
000001
016046
025720
004737

041636
041642
041650
041652

005037
012737

007436
000001

007424

041654
041660
061666
041670
041674
041700
041704

005237
023727

007436
007436

000005

116337
116137
005237

007446
007447
007400

041632

041704
041706
061710
041712

041714
041716
041720
041724
041726
041730
041734
041736
041742
041742
041744

041746
041750

041752
041756
041756
041762

122123
001422

101014

MACY11 30A(1052)

DATA COMPARISON CODE

026536
CMPS7:

005337
001267

;LOG LENGTH ERROR

TEMP4
#1,0FSET

;CLEAR BAD BYTE COUNTER

(MPS2:

TEMP4
TEMP4 45
CMPS6
-(R3),600D
-(R1) ,BAD
ERRCNT

s INC BAD COUNT

INC
T 2.EDDDE ,ERR1
ERRSOF

.WORD
.WORD
.WORD

007424
007436

007400

CMPS6:

INC
INC
INC
DEC
BNE
TST
8EQ
INC
ERRCNT
ERRSOFT 3.EDDDE ,ERR2

gSERSOFT

EDDLE
ERR10

sSET OFSET BYTE COUNT TO 1
;COMPARE RX WITH EXPETED
;IF EQUAL THEN GO TO 6

;1S IT MORE THEN S

;IF SO GO FOR MORE
;STORE GOOD BYTE FOR ERROR
;STORE BAD BYTE FOR ERROR
;REPORT

COMPARISCN FAILURE

TO OPR.
TRAP

.WORD
.WORD

104457
000003
016103

025672
004737

SEQ 0141

PAGE 14-14

PC,LOGCML

(R1)+,(R3)+
CMPS6

CMPS1:

025630

005237
005304
001350
005737
001410
005237

14:39

TRAP

104457
000002
016103
005201
005203

16-JUN-81

T
CSERSOF
2
EDDDE

ERR1

s INC OFFSET
;ELSE DEC CHAR COUNT AND SEE IF O
. 1F NOT GO BACK
;SEE IF ANY (CMP ERRS FOR THIS MSG
:BR IF NONE
;REPORT # OF MISMATCHES FOR MESSAGE

TRAP

§$ERSOFT
EDDDE

026554

007366

CMPSS:
JSR
{MPSSA:
DEC
BNE

PC,LOGCMD

DVRCT

CMPS3

;LOG DATA ERROR IN COMPARE

sIF NOT ALL DONE GO BACK

ERRZ2

MACY11 30A(1052)

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLkB.P11

16-JUN~-81

14:38

LR N

16-JUN-81

INTERNAL END OF PASS CODE

.SBTTL

14:39

PAGE 14-15

INTERNAL END OF PASS CODE

FUNCTIONAL DESCRIPTION:
THIS CODE INCREMENTS THE PASS COUNT FOR THE

EVENT LOG. LOGS THE END OF PASS EVENT

IF *RPASS'' IS A MINUS ONE RETURN TO MODE

DISPATCHER. IF NOT =1 THEN DECREMENT RPASS
AND [F 'RPASS'' IS THEN = TO 0 GO TO DCLT PROMT
SUBORDINATE ROUTINES USED:

B¢

IN NOT = TO O THEN GO BACK TO MODE DISPATCHER

"LOGEOP'* ~ LOG END OF PASS TO EVENT LOG

041764

005237

007376

041770
041776

013737
013737

007374
007376

042012
042016
042024
042026
042032
042034
042040
042044

007400
026572
177777

007500

040524
045714
035224

CMPSEX:

007436
007432
007434
007500

INC

PSCNT

MOV
Mov
MOV

NOBUF
, TEMP4
PSCNT,TEMP2

ERRCNT, TEMP3

;BUMP PASS COUNT

JSR
tmp

PC,LOGEOP
#-1,RPASS

;LOG END OF PASS
:SEE IF RPASS=-1

DEC

RPASS

:DEC PASS COUNT

JMP

GTRXZ2

BEQ
8EQ
JSR

JMP

PC,DVBTUP

GTRAS

sIF

IT IS DON'T DECRMNT, LOOP FOREVER

sIF DONE EXIT TEST

cELSE GO BACK AND DISPAT(CH
;GO UPDATE BASE

TABLE

;WHEN RPASS=0 GO BACK TO 'DCLT>"’

SEQ 0142

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

C2CLKB.P1

16-JUN-81

14:38

.SBTTL

8416

8418

;

8419
8420
8421
8422
8423
8424

14:39

PAGE 14-16

DOWN-L INE=LOAD SECTION

DOWN-L INE~LOAD SECTION

IN THIS MODE OF TESTING THE °‘MOST'' OR ORIGINATING STATION
REQUESTS THE ‘‘SATELLITE'' OR B800T 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

PROGRAM THAT WILL PRINT A MSG THAT DOWN=-L INE-LOAD WAS SUCESSFUL.

gzsg

: SUBORDINATE ROUTINES USED:

8429

"DLTXRX'* - SPECIAL TX RX ROUTINE FOR DLL

gzgg

;

"LOGRXC'' = LOG RX COMPLETED TO EVENT LOG

8430
8431
8432
8433
8434

;
;
;
:
;

8437

gz%g

8440
8441
(3)
(3)

042050
042050
042052

(S)
(5)

042060
042062

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

8442
8443
8444
8445
8446
8447
8448
8449
gzgg

0420546
042056

042064
0642066
042070

042070
042076
042106
0642112
042120
0462126
062134
0462142
042150

113737
113737
113737
113737
052737
042737
012737
013737
004737

‘DVRXQ''
‘LOGRXQ'*
*LOGTXQ"*
"DVTXRX'®
*LOGTXC'*

=
=
=

QUE
LOG
LOG
QUE
LOG

CALLING SEQUENCE:

DLL:

104443
000406
007434
000022
013122
000377
000000
000377

SEQ 0143

FUNCTIONAL DESCRIPTION:

;
:
:
;
;
:

gzgg

16~-JUN-81

DOWN-L INE-LOAD SECTION

gz}é
8417

MACY11 30A(1052)

RX
RX
TX
TX
TX

BUFFER SPACE TO DEVICE
SPACE QUED TO EVENT LOG
BUFFER QUED TO EVENT LOG
BUFFER AND WAIT FOR RX OR TX TO COMPLETE
COMPLETED TO EVENT LOG

JMP

aMODE (R2)

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

GMANID

DLLQ1,TEMP3,0,377,0,377.NO

:GET PASSWORD

TRAP
BR

CSGMAN
100018
TEMP3
TS$CODE
DLLQ?
377
TSLOLIM
TSHILIM

.WORD
.WORD

007434
007434
007434
007434
000100
000002
002647
002172
042242

002650
002651
002652
002653
007502
007476
007420
007412

MOVB
MOVR
MOVB
MOVB
BIS
BIC
MOV
MOV
JSR

gzg%

TEMP3,PASSI
TEMP3,PASS?
TEMP3,PASS3
TEMP3 ,PASS4
#ERX,FLAG
#DATCKB,PARAM
#DLLM1,CURADD
DLLMIC,CURCC PC.DL TXRX

10001%:

LWORD
.WORD
JWORD
.WORD

:PUT PASSWORD I[N MESSAGE
;PASSWORD IS DUPLICATE
: :HERE
’
;s ;AND HERE.
;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

JRETURN WHEN TX AND RX ARE COMPLETED

8454
8455
8456
gzgg

042154
042162
042170
0462176

8459
8460

062202

012737
013737
042737
004737

002654
002174
000400
042242

007420
007412
007502

MOV
MOV
BIC
JSR
DULLPRI:

#DLLM2,CURADD
DLLM2(, CURCC
#DLLGA,FLAG
PC.DLTXRX

;SET THE DOWN LINE LDAD MSG TO #2
JSET CC
:CLEAR THE GO AHEAD FLAG
;GO TO THE DOWN L INE TX RX ROUTINE

; RETURN WHEN TX AND RX ARE (OMPLETED

)

CZCLKBO DMR,DMC-11 DATA COMM.
czZcLxs P
16~JUN-81 14:38

8461
(7)

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

8462
8463
8464
8465
L)

(5)
(5)
(5)

8466

042202
042202
042206
062212
042214
042216
042222

8 12

MACY11 30A(1052)
16-JUN-81
DOWN~-L INE~LOAD SECTION

LINK TEST

PRINTF

015030
000001

000004
035224

042226
042226
042226
042230
042232
042234

026142

042236

000137

DLLEA:

035224

052737
012737
012737

007502
007362
007432
007364
007434

013737
013737

DLTXRX:

013737

007502
007502

013737
013737
004737
042737
052737
023737
032737

007442
007434
007436
007432

007432
007434

DLLE?Z:

SEQ 0144

Mov
MoV
MOV
TRAP
ADD

TRAP
.WORD
.WORD
.WORD

JMP

GTRAS

;PRINT ABORT AND EXIT

BIS
MOV
MOV
MoV

#QRX ,FLAG
#RXBUF ,DVRXA
NRXBUF
, TEMP2
#256. ,DVRCC

JSR
JSR

PC.DYRXQ
PC.LOGRXQ

;SET THE QJUE RX FLAG
JSET THE DEVICE RX BUFFER TO RXBUF
:SET UP FOR LOG
sSET UP FOR CC OF 256
<SET UP FOR LOG
; GO QUE RX
sAND LOG IT...

#256. ,TEMP3

MOV

CURADD ,DVTXA

MOV

CURCC,DVTCC

CURADD
, TEMP?2

CURCC,TEMP3

JSR
8IS
JSR
8IT

PC,LOGTXQ
NQTX+A#ETX ,FLAG
PC,DVTXRX
#DLLGA,FLAG

MOV

#TXNC, CONOTM

MOV
MoV

DLLE1
#QTX,FLAG
DLLE6

DLLEG:

MOV

DVTXA, TEMP2

DLLE1:

JSR
BIC
8IS
(MP
BEQ
BR
BIT

PC,LOGTXC
NQTX+AHETX,FLAG
#DLLGA,FLAG
DLLM2C,DVTCC
DLLES
DLLE?
#QRX,FLAG

MOV

JSE UP FOR TX COUNT
JAND LOG IT
;LOG THE TX QUEUED
JSET UP TO QUE AND EXPECTED
;GO TO DEVICE ROUTINE
JTEST FOR GO AHEAD BIT

JIF SET GO TO ONE
JELSE CHECK FOR TX DONE
;JF DONE THEN BRANCH
JELSE ERROR

TXBUF
, TEMP4

#DLLAB, TEMP?

JSR
JMP

JSET UP FOR TX

JAND LOG

RXBUF
, TEMP3

MOV

007502
007502
007350
007502

20,DLLAB,ERR14

BNE
BIT
BNE

042226

007346
007350

ERRHRD

MoV

007502

012737
013737
013737
012737
004737
000137

GTRAS

MOV

DLLEZ2:

PAGE 14-17

#DLLCM

JMP

MOV

007346
007432
007350
007434

14:39

PC,LGDVE
DLLEA

DVTCC,TEMP3

;LOG ERROR
;ABORT TEST

;LOG TX DONE
sCLEAR QUE AND EXPECTED
sSET THE GO AHEAD BIT
JEXIT IF SECOND MSG.
;AND GO BACK TO 2
;1S THE A RX COMPLETED

- (SP)
#DLLCM,
#1,-(SP)

SP,RO
CSPNTF

w6 ,SP

CSERHRD

DLLAB

ERR14

c1 2
MACY11 30A(1052)
16-JUN-81
DOWN~-LINE~LOAD SECTION

CZCLxBO DMR,DMC-11 DATA COMM. LINK TEST
16~JUN-81 14:38
czcLkB.P11
8508
8509
8510

001004

122737

001404
012737
000710

025541

007442

007362
007364
026424
000010

007432
007434

DLLES:

025561

007442

DLLES:

000001

004564

DLLE3:

012737
000700

025604

007442

012737

020273
004563
000042

007426

122737
001404

000001
016337

010346
013746

010542

007426

PAGE 14-18

BNE
MOV

DLLES

MOV
MOV

DVRXA, TEMP2
DVRCC. TEMP3

#10,RxBUF

BEQ
MOV

DLLE3
#RXM1,CONOTM

DLLE?

‘ABORT TEST

CMPB
BEQ

#1,RXBUF+2
DLLESA

;1S SECOND WORD 12
YES,BRANCH

DLLE?

;SET UP MESSAGE AND ABORT

B8R

JSR

004562

14:39

B8R

MOV

#RXNC,CONOTM

DLLE?

PC,LOGRXC

#RXM2, CONOTM

;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

;sPRINT ID OF DEVICE REQUESTING
DLLESA: MOV
NUNKM, TEMP
MOVB
RXBUF+1,R3
(MPB
R3,#34.
BHI
DLLESB
BITB
#1,R3
BNE
DLLESB

LOAD

DLLESB: PRINTF

;PRINT

MOV

REV B BY EC

SSET UP FOR UNKNOWN DEVICE

‘GET DEVTYPE FROM MESSAGE
:0UT OF LEGAL RANGE ?
YES.,BRANCH
200D ?
1YES,BRANCH

DLLIND(R3) ,TEMP -GET ASCIZ MESSAGE FROM TABLE

#SECRM,TEMP,R3

ID MESSAGE
MOV
MOV

007426
020135
000003
000010

SEQ 0145

MOV

DLLES:

RTS

:RETURN TO CALLER

MOV
MOV
TRAP
ADD

R3,-(SP)

TEMP ,~(SP)
#SECRM,-(SP)

#3,-(SP)

SP,RO
CSPNTF

#10,sP

C2CLkBO DMR,DMC-11 DATA (COMM. LINK TEST

CZCLKB.P11

16~JUN-81

MACY11 30A(1052)

14:38

8540

TALK MODE SECTION

.SBTTL

8541
8542

0D 12
16-JUN-81

14:39

PAGE 14-19

SEQ 0146

TALK MODE SECTION

8545
8546

P44
; FUNCTIONAL DESCRIPTION:
;
TALK MODE SECTION
;
IN THIS MODE, THE ‘‘TALK'' END OF THE LINK TRANSMITS OPERATOR
;
SPECIFIED MESSAGES UNTIL A "EXIT'' MCSSAGE IS TYPE.
AT THAT POINT,

gggg

; SUBORDINATE ROUTINES USED:

8551
8552

:
;

8555

8543
8544

ggzg

;

gggz

8566
8567
8568
8569
8570
gg;}

H
042670
042670
042676
042702
042706
042712
042714
042714
042716
042720
042722
042726
042726
042730
042732
042734

042737
012702
012722
022702
001373

000002
002524
177777
002646

007476

THE LINK GOES

INTO 'LISTEN'' MODE.

'1L0GTXQ' = LOG TX BUFFER QUED TO EVENT LOG
"DVTXRX'' = QUE TX BUFFER TO DEVICE AND WAIT FOR COMPLETE

gggg
8558
8559
8560
8561
8562
8563
8564
8565
(3)
(3)
(4)
(5)
(5)
(5)
(5)
(5)
(3)

THIS END OF

"LOGTXC'' = LOG TX COMPLETE TO EVENT LOG
CALLING SEQUENCE:

TALCK:
1%:

106443
000406

JMP

aMODE (R2)

BIC
MoV
MoV
CMP
BNE
GMANID

#DATCKB,PARAM
;SET NOCHECK
#OPBUF ,R2
#-1,(R2)+
;CLEAR OUT OPBUFFER FIRST
NOPEND ,R2
13
OPRMM,OPBUF ,A,0,1,72.,NO
;GET TALK MESSAGE
TRAP
BR

002524

;DISPATCH TO MODE BASED ON MODE TYPE IN RZ2

.WORD

000142

.WORD

014764
000000

.WORD
WORD

000001
000110

042734
042736
042744
042746
042750
042752

005002
122762
001402
005202
000772
010237

8573
8574
8575
8576
8577
8578
gggg

042756
042764
042772
043000
043006
043012
043020

012737
012737
013737
013737
004737
052737
005037

002524
002524
002166
002166
026352
000210
007414

ggg;

043024

004737

044120

8583
8584
8585
8586

043030
043036
043044
043050

013737
013737
004737
022737

007346
007350
026370
054105

000377

002524

002166

28$:

3s:

007346
007432
007434
007350
007502

007432
007434
002524

CLR
CMPB
BEQ
INC
BR
MoV

R2
#377,0PBUF
(R2)
33
R2
2%
R2,0PCNT

;NOW GET CHAR COUNT

MOV
Mov
MoV
MoV
JSR
BIS
CLR

#0PBUF ,DVTXA
#OPBUF
, TEMP?
OPCNT, TEMP3
OPCNT,DVTCC
PC,LOGTXQ
NMQTX+AHETX FLAG
CPTRR

;SET UP TX ADDR.

JSR

PC.DVTXRX

MOV
MoV
JSR
W

DVIXA,TEMP2
DVTCC,TEMP3
PC,LOGTXC
#' EX,0PBUF

JSET UP TX CC
;SET UP FLAGS
;CLEAR RX POINTER

;CHECK FOR EXIT

100028
:

.WORD
.WORD

CSGMAN
100028
OPBUF
TSCODE
OPRMM
0
TSLOLIM
TSHILIM

CZCLKBO DMR,DMC-11 DATA (OMM, LINK TEST

(Z(LKkB P11

8587
8588
8589
8590
85N
8592

16-JUN-81

001304

14:38

052111

002526

000210
000006
040524

007502
007470

MACY11 30A(1052)
TALK MODE

SECTION

E 12

16-JUN-81

14:39

PAGE 14-20

TALCK
#''1T,0PBUF
+2

TAL(CK
FQTX+AETX,FLAG
LIS ,MODTYP

GTRX?

;CLEAR THE TX BITS
s CHANGE TO LISTEN MODE

JAND GO BACK TO DISPATCH

SEQ 0147

CZCLkBO DMR,DMC~11

CZCLKB. P11

DATA COMM. LINK TEST

16~-JUN-BT

MACY11

F 12

16-JUN-81
LISTEN MODE SECTION

14:38

8594
8595
8596
8597
8598
8599
8600
8601
8602

30A(1052)

14:39

SEQ 0148

PAGE 14-21

LISTEN MODE SECTION

.SBTTL
s 44

* FUNCTIONAL DESCRIPTION:
:

LISTEN MODE SECTION

RECEIVED BY THE DEVICE ON THE OPERATOR'S CONSOLE.

;

IN THIS MODE,

THE 'LISTEN'' END OF

SUBORDINATE ROUTINES USED:

RECEIVED IS AN "EXIT'' MESSAGE,

THE LINK PRINTS ALL OF THE MESSAGES
IF THE MESSAGE
THEN THE NODE ENTERS ''TALK'' MODE.

QUE RECEIVE BUFFER SPACE TO DEVICE
LOG RECEIVE BUFFER QUED TO EVENT LOG
WAIT FOR RX TO COMPLETE
LOG RX COMPLETE TO EVENT LOG

BB,

‘DVRXQ'' "LOGRXQ"'
‘DVTXRX'' =
"LOGRXC'"
-

042737

000002

012746
012746
010600

014753
000001

062706
012737
012737
012737
012737
052737
005037

000004
002524
002524

104417

007416

007362
007432

007364
007434
007502

LISCK:

LISCKA:

BIC
PRINTF

MOV

MOV
MOV
MoV
BIS
CLR

N#DATCKB,PARAM
#LISP

;DISPATCH TO MODE BASED ON MODE TYPE IN R2
;CLEAR CHECK BIT
;PRINT PROMPT

FOR OPk.

#OPBUF ,DVRXA
#OPB
, TEMP?
UF

;SET DEVICE UP TO REC AT OPBUF

#82. ,DVRC(

;SET UP CHAR COUNT TO 82.

#QRX+MERX ,FLAG

;SET UP FLAG
;CLEAR THE TX.

CPTR

004737
004737

044040
026406

JSR
JSR

PC.DVRXQ
PC,LOGRXQ

;QUE RX

004737

044120

JSR

PC.DVTXRX

;GO TO DEVICE RX. SUBROUTINE

013737
013737
004737
063737

007362
007364
026424
007362

MOV
MOV
JSR
ADD
CLRB

DVRXA, TEMP?2
DVRCC, TEMP3

012746

002520
000001

105077

043314

000122
000122
000104

007476

:
CALLING SEQUENCE
JMP
@MODE (R2)

144116

007432
007434

007364

PRINTF

000004
054105

002524

052111

002526

000005
040524

007470

PC,LOGRXC

DVRXA,DVRC(
aDVR((

MOV
MOV
MOV
TRAP
ADD

#LISP,=-(SP)

MOV
MoV
MOV

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

#1,-(SP)

SP,RO
CSPNTF

N4 ,SP

:SET UP ADDR.AND CC.
;LOG COMPLETED

N#OPBFPT

TRAP
ADD

;COMPARE FOR EX OF "EXIT'
J1F NOT EXIT THEN GO BACK
;IF FIRST HALF OK CHECK NEXT PART
JIF NOT EXIT THE GO BAC(K
s CHANGE MODE TO TALK
JRETURN TO DISPATCHER

SP,RO
(SPNTF

4, SP

CZCLkBO DMR,DMC~11 DATA (OMM. LINK TEST
(ZCLkB.P11
16-JUN-81 14:38
8640
864°

G 12

MACYT1 30A(1052)
16-JuN-81
LISTEN MODE SECTION

164:39

PAGE

14=22

SEQ 0149

_—

CZCLKBO OMR,DMC-11 DATA COMM. LINK TEST

(2CLKB.PI11

I 8643
|

16-JUN-81 14:38

MACY11 30A(1052)

LSRTTL

8644

H 12

16-JUN-81

DEVICE FUNCTION SUBROUTINES

14:39

PAGE 14-23

SEQ 0150

DEVICE FUNCTION SUBROUTINES

865

8660
8661

8662

LSBTTL

8663
8681
8682

S+

8685
gggg

:
;

8683
8684

DEVICE INIT SUBROUTINE

; FUNCTIONAL DESCRIPTION:
;
DVINIT- DEVICE INIT ROUTINE

THIS ROUTINE IS DEVICE DEPENDENT CODE THAT IN]TS
THE DEVICE BEING TESTED. (l.E. FULL/HALF DUPLEX BAUD RATE, MAINT MODE.)

8688
gggg

: INPUTS:
N

ggg}

; SUBORDINATE ROUTINES USED:

8692
8694
8695

;
N
N

8696
8697

8698
8699

8700
8701

:
;

;
;

‘FHDPLX'' INDICATES [F MODE IS FULL OR HALF DUPLEX. (1=FULL)
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 RQ] AND WAIT FOR RDI TO GO AWAY
CALLING SEQUENCE:
JSR

8702

043320

8705

043320

012737

000100

007542

MoV

#100, TIMER1

;SET UP TIMER 1 FOR 100(OCTAL) TICKS

g;gg

043336

012777

040000

147014

MOV

#MCLR,ISELO

;D0 A MASTER CLEAR

8710
8711
8712
8713

043344
043352
043354
043362

022737
001003
112777
022737

000004

012406

000200
000006

147000
012406

cMP
BNE

MOVB
(MP

#DMRCK,0OPTYP
DVING
#200,aBSEL1T
#DMRG6,OPTYP

;1S THIS A 8206
;IF NOT GO TO 6
:SET RUN FOR 8206
;1S THIS AN 8206 DMR

000200

146762

TST
BM]

aSELO
DVINI

;1S RUN BIT SET
;IF YES GO TO 1 ELSE...

TST
BNE

TIMER1
DVIN?

MOV
MOV
MOV
JSR
INC
ERRSOFT

#DVEM3
, TEMP?
aSE.0, TEMP3
aStL2, TEMP4
pr LGDVE

;SEE IF TIME MHAS EXPIRED
:1F NOT GO BACK AND CHECK
JAGAIN ELSE...PRINT ERROR

g;gz
8706
8707

8714
g;}g

8717
8718
8719

(3)
8720
8721
8722
8723
8724
8725
8726
8727
8728

043326
043332

043370
0643372
043400
043404
043406

DVINIT:

PC,DVINIT

005077
005077

001003
112777

005777
100426

147042
147032

146754

;MASTER CLEAR DEVICE
CLR
CLR

DVING:

DVINZ:

BNE
MOVB

BREAK

063406
043410
043414

1044622
005737
001371

007542

043416
043424
043432
043440
043444
043450

012737
017737
017737
004737
005237

024424
146730
146726
026434
007400

007432
007434
007436

aSELS
aSELSG

DVINZ
#200,aBSEL1

<RRCNT

11,DVEM3,ERR13

;IF NOT GO 10 2
;SET RUN BIT FOR 8206

;LOAD UP ERRM. AND REG COUTPUTS
;LOG TIME OUT WAITING FOR RUN

TRAP

($8RK

CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-81 14:38
czcuLks PN
(4)

(5)

(5)
(5)

8729
8730
8731
8732
8733
8734
8735
8736
8737
8738
8739
8740
8741
8742
8743
8744
8745
8746
8747
8748
8749
8750
8751
8752
8753
8754
8755
8756
8757
8758
8759

043450
043452
043454
0434656

000013
0246424
026110

043460

000717

MACY11

[ 12

16=-JUN-81
14:39
30A(1052)
DEVICE INIT SUBROUTINE

PAGE 1424

SEQ 0151
TRAP

104457

LWORD
.WORD
.WORD

BR DVINIT

;GO BACK AND TRY MSTR CLR AGAIN IF ERROR

DVIN1:

043452

; DO BASE IN COMMAND
043462
043470
043476
043502

042737

043510
043516
043524

012777
023727
002403
012777
052777
042777
022737
001003
052777
004737

112777

004737
012777

000003
000143
044746
017370

007502

000000
012406

146656
000006

000522
000100
004000

146640
1646622
166610

146662

BIC
MOVB
JSR

#3,FLAG
#143,aBSELO
PC.TOORIO

:CLEAR INPUT AND OUTPUT INT FLAGS
*SET UP BASE IN INT EN
16O WAIT FOR INTERRUPT OR TIME OUT

MOV
CMP

#0,3SEL6
OPTYP,#6

;SET UP SEL 6
*1S THIS DMR MODE

MOV

146660

000001

007472

BLT
MOV
BIS
BIC
MP

004000
044640

146572

8IS

DVIN?Z:

BNE

DVIN3:

JSR

#RASE
, aSEL4

DVIN?
#522,aSEL6
#1E0,@SEL2
#LULOOP,RSELO
ATTL MLTYP

DVINS

#LULOOP.RSELO
PC . CLRAW

“1IF NOT GO TO 7
‘SET DMR MODE
‘SET IEO
:CLEAR LU LOOP
SIS TTL SELECTED

*"1F NOT GO TO 3

-ELSE SET LU LOOP

: DO WRITE MODEM IF DMR MODE
023727
002437
112777
004737
042777
022737
001003
052777
022737
001003
052777
004737

8760

012406

000006

000145
044746
000014
000004

146550
146552
00747?2

000004
000003

146534
007472

000010
044640

146516

cMP
BLT
MOVB
JSR

OPTYP, #6
DVINS
#145,aBSELO
PC,TOORIC

;IS THIS DMR MODE
*1F NOT GO TO 8
'SET UP WRITE MODEM
‘G0 TO WAIT FOR INT

cMP

#MODREM,MLTYP

:IS THIS REMOTE LOOP

B1C

BNE
BIS
CVIN9:
cMP
BNE
BIS
DVIN10: JSR

#RiT2+#BI13,aSEL6

DVIN9
#BIT2,aBSEL6
#MODLOC,MLTYP
DVINTO
#81T3,38SEL6
PC, CLRAW

;CLEAR BSEL6 AND 7

*IF NOT GO TO 9
:SET THE BIT
:IS IT MODEM LOCAL
“IF NOT EXIT
:SET MODEM LOCAL
‘CLEAR RDI AND WAIT

; ENABLE EXTENDED ERROR IF DMR MODE
112777

004737
004737

000146
044746
044640

MOVB

146470

JSR
JSR

#146,aBSELO
PC.,TOORIO
PC . CLRAW

;SET UP FOR ENABLE

;CLEAR RDI AND WAIT

; DO CONTROL IN COMMAND
043700
043716
043724

112777

004737
005077
022737
001004

000141
044746

146452

000004

007470

146456

DVINS:

MOVB

#141,3BSELO

CLR
CMP

aSEL6
#DOW ,MODTYP

JSR

BNE

PC,TOORIO

DVINS

;SET uP CONTROL IN

WAL TF OR INT OR TIME OUT
CLE AR HALF /DUP
S THI S gOUN LINE LOAD?

BR IF NOT

CSERSOFT

11
DVEM3
ERR13

CZCLKBO DMR, DMC
=11 DATA (COMM,
(ZCLkB.P11
16~-JUN-81 16:38
8781
8782
8783
8784
8785
8786
8787
8788
8789
8790
8791
8792
8793
8794
8795

8796

8797
8798
8799

043726
043734

052777

002400

043736
043742
043744

005737
001003
052777

007474

043752
043760

017737
004737

064640

043764
043772
0463774

023727

044002

000406

002403
052737
000207

CINK TEST
146440

DVINS:

002000

1404622

146416

007444

012406

000006

061000

007502

DVING:

DVINEX:

J 12

MACY11

30A(1052)

BIS
BR

MMAINTB+HALFDB,@SEL6

TST
BNE
BIS

DEVICE

16-JUN=-81

¢IF

PAGE 14-25
SO SET MAINT

DVIN4

s AND FORCE HALF DUPLEX

FHDPL X

:IS

W#HALFDB,a@SELS

;ELSE

DVINS

MOV
JSR

@SELG,CONTIN

CMP
BLT
BIS

OPTYP,#6

RTS

14:39

INIT SUBROUTINE

PC.CLRAW

DVINEX

#DMRRUN, FLAG
PC

SEQ 0152
MODE

THIS A HALF/DUP

:IF NOT GO TO 4

SET HALF/DUP

sSET UP CONTROL

IN FOR MODS

;GO CLEAR RQ] AND WA]IT
;FOR RDI TO GO AWAY,
;1S THIS DMR ?

JNOEXIT

sSET DMRRUN OUTPUT
JRETURN TO CALLER

EXPECTED BIT

BIT

CZCLKBO DMR,DMC~11 DATA COMM,
CZCLKB.P11
16=-JUN-81 14:38

LINK TEST

MACY11

K 12
30A(1052)
16-JUN-81
14:39 PAGE 14-26
DEVICE GET MODEM STATUS SUBROUTINE

8801
8802
8812
8813
8814
8815

LSRTTL

s
; FUNCTIONAL DESCRIPTION:

8818
8819

:
;

8822

: OUTPUTS:

gggg

: SUBORDINATE ROUTINES USED:

8827

8830
8831
8832
8833
8834
8835
8836
8837

:
; CALLING SEQUENCE:
;
JSR
PC.,DVMODS
;==
0644004
044012
044016

112777
004737
017737

000141
044746
146346

8839
ggz?

064032
044036

004737
000207

044640

gg}g

;

ggg?

ggsz

gggg

8838

DEVICE GET MODEM STATUS SUBROUTINE

‘DVMODS''

044024

013777

0076444

010456

GET MODEM STATUS

IMPLICIT INPUTS:
THE BIT POSITION AND AVAIABLITY OF

THE MODEM SIGNALS CTS.DSR,...RI..

IN THE DEPENDENT PORITION OF THE GLOBAL EQUATES SECTION.

CURRENT MODEM SIGNAL VALUES IN ‘MODS''

“TOORIO'' - TIME OUT OR INPUT INTERRUPT OR OUTPUT

146346

SEQ 0153

“CLRAW'' - CLEAR RQ] AND WAIT FOR RD] TO CLEAR

DVMODS: MOVA
JSR
MOV

MoV
JSR
RTS

#141,3BSELO
PC,TOORIO
@SEL4 ,MODS

;SET UP CONTORL IN
;GO TIME OUT CHECK
;SET UP MODEM STATUS

PC,CLRAW
PC

JRETURN TO CALLER

CONTIN,QISEL6

;SET UP OLD CONTORL IN

INTERRUPT

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKB.P11

16=JUN-81

14:38

gggg

L 12
16=JUN-81

MACr11 30A(1052)

14:39

PAGE 14-27

DEVICE QUEUE RECEIVE SPACE SUBROUTINE

LSBTTL

DEVICE QUEUE RECEIVE SPACE SUBROUTINE

8860

8861
8862
8863

; FUNCTIONAL DESCRIPTION:
;
DVRXQ = THIS SUB ROUTINE QUES THE REC BUFFER SPACE TO THE
;
DEVICE, THEN CLEARS THE QRX BIT OF THE FLAG WORD.

8865
8866
8867

;
;
:

8870
8871
8872
8873
gg;g

; OUTPUTS:
:
QRX FLAG BIT = CLEARED BY ROUTINE
;
;
: SUBORDINATE ROUTINES USED:

8876

8879
8880
8881

; CALLING SEQUENCE:
N
JSR
PC.DVRXQ
;-

gggg

gg;g

8882
8883
8884
8885
8886
8887
8888
8889
8890
8891
8892
8593
8894
8895

INPUTS:
DVRXA = ADDRESS OF RX BUFFER SPACE
DVRCC = BYTE CHAR COUNT OF RX BUFFER

QRX FLAG BIT = SET BY CALLING ROUTINE

"'TOORIO'' = TIME OUT OR OUTPUT INTERRUPT OR INTPUT INTERRUPT

;

044040
044040
0644046

032737
001423

000004

007502

044050
044056
044064
044070
044076
044104
044112
044116

042737
112777
004737
017737
013777
013777
004737
000207

000004
000144
044746
146274
007362
007364
064640

007502
146274

DVRXQ:

010456
146264
146262
DVREX:

"'CLRAW''

=~ CLEAR RQ] AND WAIT FOR RD] TO CLEAR

BIT
BEQ

#QRX ,FLAG
DVREX

BIC
MOVB
JSR
MOV
MOV
MOV
JSR
RTS

#QRX ,FLAG
#1644 ,aBSELOD
PC.TOORIO
aSEL4,MODS
DVRXA,aSEL4
DVRCC,aSEL6
PC,CLRAW
PC

;I1F NOT RX THEN EXIT
JELSE QUE RX
;CLEAR FLAG FOR RX
;GO CHECK FOR IN OR OuUT
:SET UP NEW MOD STATUS
;LOAD CC AND ADDR
:CLEAR AND WAIT
JRETURN TO CALLER

SEQ 0154

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLKB.P11

16=JUN-81

MACY11 30A(1052)

14:38

16=JUN-81

14:39

PAGE 14-28

DEVICE TRANSMIT AND RECEIVE SUBROUTINE

gggg

LSBTTL

8928
8929

s+t

8931
8932
8933
8934
8935

:
:
:
;
b

DVTXRX=-DEVICE TRANSMIT AND RECEIVE ROUTINE
THIS CODE QUES THE TRANSMIT BU FER 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

:
:
:

EXPECTING TX,AND WHEN TX INT. OCCURS WHEN EXPECTING
RECIEVE.

8930

DEVICE TRANSMIT AND RECEIVE SUBROUTINE

: FUNCTIONAL DESCRIPTION:

8936
8937
8938
8939

h
:
:
;

8940
8941
8942

8943

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

: INPUTS::

8944
8945
8946
8947

:
:
:
;

ggzg

8950

‘DVIXA’'' =
'DVTCC'' =
‘VTX'" BIT =
"ETX'' BIT
=

"ERX'* BIT

ADDRESS OF TRANSMIT MSG.
BYTE COUNT OF TRANSMIT MSG.
SET IF TRANSMIT REQUESTED
SET IF TRNASMIT EXPECTED

= SET IF RECIEVE EXPECTED

JOUTPUTS:

;
;
:
:

‘DVRCC'* = BYTE COUNT OF RX MSG.
‘QRX'’
SET IF RX COMPLETED

8961
8962
8963

:
:
:

oo
O

gggg

nunnwuwnn

8955
8956
8957
8958

‘DVTXA’'' = ADDRESS OF TX MSG. COMPLETED
'DVTCC'' = BYTE COUNT OF TX MSG. COMPLETED
5128
SET IF TX COMPLETED
J

:
:
;

[¥al

8951
8952
8953

ADDRESS OF RX MSG.

“TOORIO'* - TIME OUT OR OUTPUT INTERRUPT OR INTPUT INTERRUPT
"'CLRAW'' = CLEAR RQI AND WAIT FOR RDI TO CLEAR
‘LGDVE'* - LOG DEVICE ERROR TO EVENT LOG

8966

"OUTHDL'' - OUTPUT INTERRUPT HANDLER CODE

; CALLING SEQUENCE:

8967

JSR

PC,DVTXRX

DVTXRX: BIT

#ATX FLAG

8970

044120

032737

000010

007502

8972
8973

044130
044136

042737
112777

000010
000140

007502
146214

B8IC
MOVB

MQTX,FLAG
#140,aBSELO

017737

146214

010456

MOV

@SEL4 ,MODS

007350

146202

MOV

044126

001423

8974

044144

004737

8976

044156

013777

007346

004737

044640

012737
032737

000074
000060

8975

044150

8977

044164

8979
8980
8981

044176
044176
044204

8978

COMPLETED

: SUBORDINATE ROUTINES USED:

332‘5‘

8971

COMPLETED

044172

013777

044746

BEQ

JSR

146204

007546
007502

MOV
DVTR3:

JSR

MOV
TOINOT: BIT

JANY TX TO QUE

DVTRS

:IF NOT GO WAIT FOR OUPUT

PC,TOORIO

:GO CHECK FOR IN OR OUT

DVTXA,a@SEL4

DVTCC,aSELS

;CLEAR FLAG

JPUT IN NEW MOD STAT

PC.CLRAW

:CLEAR RQUI ANDWAIT

#60., TIMERS
W#CRX+#CTX,FLAG

;SET TIMER FOR 60 SECS
;IS IT TX OR RX COMP ALREADY?
-

SEQ 0155

16=JUN-81

gggg

044212

001071

BNE

DVTR4

;1S SO EXIT

8984
8985
8986
8987
8988
8989
8990
8991

044214
044220
044222
044230
044236
044244
044250
044254

005737
001022
012737
017737
017737
0064737
005237

ST
BNE
MOV
MOV
MOV
JSR
INC
ERRSOFT

TIMERS
TOINI
#DVEM4
, TEMP2
aSELO, TEMP3
aSEL2, TEMPS
PC.LGDVE
ERRCNT
12,DVEM&,ERR13

;1S TIMER EXPIRED

gggg

044264

DVTR3

;RETURN TO CHECK TIMER

0462564
044256
044260
044262

007546

024510
146126
146122
026434
007400

007432
007434
007436

104457
000014
024510
026110
000744

8994
8995

044266

8996
gggg

044270
044276

032737
001425

000001

007502

8999

044300

012737

024602

007432

9001

044314

017737

146046

007436

9003
9004
9005
(4)

044326
044334
044340
044340

042737
005237

000001
007400

007502

(3)

044266

104422

9000 044306 017737

TOINT:

146046 007434

9002 064322 004737 026434

(S)
(5)
(5)

000015
026602
026110

9008
9009
9010

044352
044360

032737
001711

000002

9011

9012
9013
9014

044362

004737

0465070

9015

044366
044374
044376

044404

001440

044416
044424
044432
044440
044444

012737
013737
013737
004737

9018
9019
9020
9021
9022
(4)
(5)
(5)
963§

9026

044406
044414

032737
001020

04bbbs
044446
064450
044452

104457
000016
025125

044454

000611

#ININT ,FLAG
TOIN2

MOV

#DVEMS
, TEMP?

MOV

aSEL2. TEMP4

JSR

;IS 1T INPUT INTERRUPT
*1F SO LOG ERROR

PC,LGDVE

000060

007502

000020

007502

000200

007502

025125
045702
045704
026434

007432
007434
007436

TOIN2:

OVIR.:

B8R

TOINOT

BIT
BEQ

#OTINT ,FLAG
TOINOT

JSR

PC.,OUTHDL

BIT
BEQ
BIT

#CTX+#CRX,FLAG
TOINOT
#CTX,FLAG

BIT
BNE

NETX,FLAG
DVTR4A

BEQ
MOV
MOV
MOV
JSK
ERRSOFT

TRAP

($BRK

TRAP

CSERSOFT

LWORD
"WORD
_WORD

13
DVEMS
ERR13

TRAP
LWORD
.WORD
.WORD

CSERSOFT
14
DVFM9
ERR13

:1F NOT OUTPUT GO BACK AND
*CHECK TIMER AGAIN

*ELSE HANDLE OUTPUT AND RETURN
IS IT TX OR RX
*IF NOT GO BACK AND TRY AGAIN
SIS IT 1X

oVIRS

*IF NOT TRY RX

#DVEMO,TEMP2
TSEL4, TEMP3
TSEL6, TEMP4
PC.LGDVE
14.DVEM9,ERR13

:ELSE LOG ERROR
;
:REPORT ERROR

DVTR4B

s THEN CLEAR (OMPL.FLAG

“IF SO SHOULD IT BE
“IF 1T SHOULD GO TO 4A

026110
BR

CSERSOFT
12
DVEM4
ERR13

;CLEAR BIT

007502

TRAP
.WORD
"WORD
_WORD

aSELO, TEMP3

BIC
#ININT ,FLAG
INC
ERRCNT
ERRSOFT 13,DVEMS,ERR13

3889 044350 000715

032737
001703
032737

8IT
BEQ

MOV

104457

064342
044344
064346

9016
9017

BREAK

SEQ 0156

PRI

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

14:38

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

PPPIIIPIIIPPPPPPPIPIPIPPIPPRPrPrP

CZCLKB.P11

N 12
MACY11 30A(1052)
16=JUN-81
14:39 PAGE 14-29
DEVICE TRANSMIT AND RECEIVE SUBROUTINE

9025

064456

013737

045702

9027
9028
9029
9030
9031

044472
044500
044506
044514
044516

052737
042737
032737
001440
032737

000010
000020
0000640

9033

044526

9026

9032

9034

046464

044524

044534

007502

BIS
DVTR4B: BIC
DVTRS:
BIT
BEQ
BIT

025036

007432

MOV

045710
026434

007436

012737

013737
004737

013737 045706

96§§

044562

104457
000017
025036
026110

044564
044566
044574
044602
044610
044616

000411
013737
013737
052737
042737
000207

9039
9040
9041
9042
9043
382?

007502
007502
007502

000100

001020

044542
044550
044554
044554
044556

044560

DVTR4A: MOV

007350

9035
9036
9037
(4)
(S)
(5)

007346

013737 045706

045706
045710
000004
000040

007434

007362
007364
007502
007502

14:39

PAGE 14-30

SEQ 0157

DEVICE TRANSMIT AND RECEIVE SUBROUTINE

MOV

BNE

MOV

TSEL4,DVTXA

TSEL6,DVTCC

#QTX,FLAG
#CTX,FLAG
#CRX, FLAG
DVTREX
#ERX,FLAG

DVTRSA

#DVEMS, TEMP?

RSEL4
, TEMP3

MOV
RSEL6, TEMP4
JSR
PC,LGDVE
ERRSOFI 15.DVEMS,ERR13

BR
DVTRSA: MOV
MOV
BIS
DVTRX1: BIC
DVIREX: RTS

DVTRX1
RSEL4,DVRXA
RSEL6,DVRCC
#QRX,
F LAG
#CRX . FLAG
PC

:AND SET TX COMPL FLAG
SELSE CLEAR FLAG
SIS IT RX T0OO?
*IF NOT THEN EXIT.
STEST .S THIS SUPPOSED TO BE RX

:IF YES PROCESS AS SUCH
;ELSE
:L0G ERROR

TRAP
.WORD
'WORD
"WORD
;AND EXIT

:CLEAR FLAG FOR RX DONE
SAND EXIT

CSERSOFT
15
DVEMS
ERR13

14:38

OO
PFPPIPPIPPPEPPe»

16-JUN-81

8 13
16~JUN-81

mOOOOD

CZCLKB.P11

MACY11 30A(1052)

mmmmmmmmommmmmm

CZCLKBO DMR,DMC~11 DATA COMM. LiINK TEST

NN TIMMMMMMMMMmMmMmMmMmMMmMmmmmmmmm
s mmmmmm

SEQ 0158

; DEVICE DEPENDENT SUBROUTINES
.SBTTL

044620
044620
044620
044626
044626
044626

044630
044630
044630
044636
044636
044636

052737

000001

007502

DEVICE

BGNSRY

DVINS

BIS

#ININT ,FLAG

ENDSRY

INTERRUPT SERVICE ROUTINES

DVINS::

L10021:

000002

052737

000002

007502

BGNSRV

DVOUTS

BIS
ENDSRV

#OTINT ,FLAG

RTI]

:
DVOUTS:

L10022:

000002

RTI

; FUNCTIONAL DESCRIPTION:

CLRAW = CLEAR RQI AND WAIT FOR RDI
THIS

CODE

CLEARS THE

TIMER UP TO TIME 50(OCTAL)

RDI

CLEARS BEFORE

TO GO AWAY

INPUT REQEST BIT(RQI)

SETS A

TICKS AND MAKES SURE

TIMER EXPIRES.

TIMER EXPIRERS

CODE REPORTS ERROR AND SETS UP TIMER AND WAITS AGAIN.

SUBORDINATE ROUTINES USED:

"LGDVE'' - LOG DEVICE ERROR (TIME OUT)

104422

032777
001370

000207
012737
017737
017737
004737
005237

007462
000040
000050
007542

145506
007542

000200

145462

024252

007432
007434
007436

165444
145442

026434
007400

CLRAW:

CLRA3:
CLRAT:

CLRAZ:

MOV
BIC

(SP) ,PCADD
#RQI ,aSELO
#50, TIMERT
TIMERT

:SAVE PC OF CALLING ROUTINE

CLRAZ2

;IF TIMER EXPIRED ERROR

8IT
BNE

#RD],3SELO

RTS

;1S RD] CLEAR
;1F NOT GO CHECK TIMER
s ELSE
JRETURN TO CALLER

MoV
TST

BEQ
BREAK

MOV
MOV
MOV
JSR
INC

CLRA1

#DVEMO, TEMP?2

aSELO,TEMP3
aSEL2, TEMP4

PC,LGDVE

ERRCNT

NN\ AN

011637
042777
012737
005737
001406

PC,CLRAW

;SET UP TIMER FOR 50(OCTAL) TICKS

;LOG DEVEICE EVENT 0

TRAP

—

V00 NON N

QY [V P

_a-a_ng;\_n_a 0

; CALLING SEQUENCE:
JSR

—~

C 13

30A(1052)
16=JUN-81
14:39 PAGE 14-31
DEVICE TRANSMIT AND RECEIVE SUBROUTINE

($8RK

P
.

MACY11

C2CLKBO DMR,DMC-11 DATA COMM. LINK TEST
16~JUN-81 14:38
C2CLKB L1

CLRA3

JWHILE WAITING FOR RDI

JRESET

TIMER AND CONTINUE

TRAP

. WORD
. WORD
. WORD

T
CSERSOF
16

DVEMO
ERR9

o o~~~
—

ERRSOFT 16,DVEMO,ERR9

SEQ 0159

—

DEVICE

D13

16=JUN=-81
14:39 PAGE 14-32
INTERRUPT SERVICE ROUTINES

—

0464744

104457
000020
024252
026032
000742

30A(1052)

— — — — —

0464734
0464734
044736
044740
044742

MACY11

- —

9124
(4)
(5)
5)
(5)
9725

LINK TEST

——

CZCLxBO DMR,DMC-11 DATA COMM.
16-JUN-81 14:38
CZCLKB.P11

c%%ftgflg1?flfl.bflc-11 DATA COMM.
16-JUN-81

14:38

LINK TEST

9127
9128
9129
9130
NN
9132
9133
9134
9135

14:39

INT.

PAGE 14-33

OR OUTPUT

SEQ 0160

INT.

OR OUTPUT INT,

TIME

RESTARTS TIMER.

INTERRUPT,

INTERRUPT,O0R OUTPUT

INPUT

INTERRUPT OCCURS RETURN TO CALLER

—

"OTINT'' = SET BY OQUTPUT INT ROUTINE
"ININT'' - SET BY INPUT INT. ROUTINE

FLAGS:

am—

USE OF

—

IF _OUTPUT INTERRPUT OCCURS LOG IT AND CONTINUE WAITING FOR
INPUT INTERRUPT.

CLEARED BY THIS ROUTINTE.

PO
I

INPUT

SUBORDINATE ROUTINES USED:

9146

OUT,OR

TIME OUT OCCURS IT REPORTS ERROR AND

Y
I
R
TR TP

THEN CHECKS FOR

9142
9143
9144
9145

INPUT

TIME OUT OR INPUT INT.

9141

(4)
(5)

OUT OR

FUN TIONAL DESCRIPTION:
TOORIO - TIME OUT CR INPUT INTERRUPT OR OQUTPUT INTERRULPT
THIS ROUTINE SETS UP A TIMER FOR 100 (OCTAL) TICKS

X
TR TR T

9138
9139
9140

9162
9163

TIME

16-JUN-81

‘e

9137

9160
9161

E 13

30A(1052)

.SBTTL

9136

:
CALLING SEQUENCE
JSR
PC,TOORIO

——

"OUTHDL'® - OUTPUT INTERRUPT HANDLER

007462
000100
007542

044766
044774
045002
045010
045014
045020
045020
045022
045024
045026
045030

012737
017737
017737
004737

024340
145364
145352
026434

045032

005237

104422
032737

045042

001402

045044
045050
045056

004737
032737
001740
042737
000207

045066

TOOR]O: MOV
MOV
TOOR3:
TST
B8NE

007432
007463¢
007434

MOV
MOV
MOV
JSR

007400

B8R
TOOR1:

000002

(SP) ,PCADD
#100, TIMER1
TIMER1
TOOR1

#DVEM1
, TEMP2
aSEL2, TEMP4
aSELO, TEMP3
PC,LGDVE

;SAVE ADDR. OF CALLING ROUTINE
;SET UP TIMER
;IS TIME EXPIRED
;IF NOT CONTINUE

;IF

YES ERROR

INC
ERRCNT
ERRSOFT 17,DVEM1,ERR9

104457
000021
024340
026032
000746

045032
045034

045060

007542

007502

045070
000001

007502

000001

007502

TOORZ2:

TOORIO

BREAK

BIT

#OTINT ,FLAG

BEQ

TOOR?2

JSR

PC,0UTHOL

RTS

B8IT
8EO
8I1C

#ININT FLAG
TOOR3
#ININT FLAG

————

011637
012737
005737
001022

—a—

044746
064752
044760
044764

9147
9148
9149
9150
9151
9152
9153
9154
9155
9156
9157
9158
9159

MACY11

:gg gTERE AN OUTPUT

<PEND

ING

;1F NOT GO TO 2
JELSE GO HANDL IT
;

;1S THERE AN INPUT PEND ING
:IF NOT GO BACK TO TIMER (K.
JELSE CLEAR THE INPUT PEND FLAG
JAND RETURN TO CALLER

TRAP
.WORD
.WORD
.WORD

T
CSERSOF
17
DVEM1
ERR9

TRAP

C$BRK

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.PIN

16-JUN-81

MACY11 30A(7052)

14:38

9178
9179
9180
9181
9182
9183

F 13

16-JUN-B81

LSBTTL

9184

H
H

;

9194

;

9193

9195
9196

OUTPUT INTERRUPT HANDLER

THE 'OTINT'' BIT IN THE 'FLAG'' WORD., IT CHECKS FOR

USE OF FLAGS:

"DMRRUN'' - SET BY DVINIT ROUTINE IF THIS IS DMR
CHECKED AND CLEARED BY THIS ROUTINE.

;
:

9199
9200

'OTINT'' - SET BY OUPUT ROUTINE

CLEARED BY THIS ROUTINE

;
;

9197
9198

eTxt!
"'CRX"’

:
:

- SET IF TRANSMIT COMLETED
- SET IF RECIEVE COMPLETED

358}

; SUBORDINATE ROUTINES USED:

3%82

;

9205

;

9206
9207

9221
9222

:
;
045070
045074
045102
045110
045112
045120
045126
045134
045140
045144
065144
045146
045150

045152

011637
042737
032777
001023
012737
017737
017737
004737
005237

9532

045156

000676

045160

032777

225

024674
145240
145242
026434
007400

0C7502
145254
007432
007434
007436

"LGDVE'' -LOG DEVICE ERRORS TO EVENT LOG
CALLING SEQUENCE

JSR

OUTHDL: MOV
BIC
BIT
BNE
MoV
MOV
MoV
JSR
INC
ERRSOFT

045154

045166
045170

ESCAPE

104410

0C 002
000137

PC.OUTHDL

(SP) ,PCADD
#OTINT ,FLAG
#RDO,aSEL2
OUTH1
#DVEM6, TEMP?
aSELZ, TEMP3
@SELG, TEMPS
PC,LGDVE
ERRCNT
18,DVEM6,ERR9

JEXIT TEST

045154

9226
9227

007462
000002
000200

104457
000022
024674
026032

9223
(3)

SEQ 0161

AN RDO SIGNAL IF NO RDO THEN REPORT ILLEGAL INTERRUPT.
THEN IT CHECKS FOR BACC OUT IF NOT BACC OUT REPORT THE
TYPE OF OUTPUT ERROR. [F BACC OUT FIND IF RX OR TX
IF RX SET CRX BIT AND MOVE ADDR AND BYTE COUNT TO RSEL4
AND RSEL6. IF TX SET CTX BIT AND MOVE ADDR AND BYTE COUNT
TO TSEL4 AND TSEL6. CLEAR OTINT FLAG AND RETURN TO CALLER.

:
;
:
;
:

9192

9536

PAGE 14-3¢4

s4e
; FUNCTJONAL DESCRIPTION:
H
OUTHDL = OUTPUT INTERRUPT HANDLER
:
THIS ROUTINE ]S CALLED WHEN AN OUTPUT INTERRUPT HAS SET

9185
9186
9187
9188
9189
g}g?

9210
9211
9212
9213
9214
9215
9216
9217
9218
9219
(4)
(5)
(5)

14:39

OUTPUT INTERRUPT HANDLER

;SAVE ADDR. OF

CALLING ROUTINE

;CLEAR PEND FLAG AND CHK FOR RDO
;IF RDO OK ...ELSE LOG ERROR

;GO LOG ERROR

TRAP
.WORD
.WORD
.WORD

IF ERROR

TST

TRAP

.WORD

000001
045614

145176

OUTH1:

BIT

BNE
JMP

(SERSOFT
18
DVEM6
ERR9

#BACC,aSEL2
1%
OUTH?

;1S THE OUTPUT BACC
; BR _IF NO
;IF SO GO 1O 2

CSESCAPE

L10020-.

001000
045672
025437
024751

007502

004737
012737
032737
001403
012737
032737
001403
012737
032737
001403
012737
032737
001403
012737
032737
001403
012737
032737
001403
012737
032737
001403
012737
032737
001403
012737
023727
002416
032737
001403
012737

026434
014635
000001

007442

025424

007442

007436

18:

025413
000010

007442
007436

2%:

025373
000020

007442
007436

A ¥

025361
000100

007442
007436

5%:

025346
000200

007442
007436

6%:

025326
000400

007442
007436

7%:

025310
001000

007442
007436

8%:

025270
012406

007442
000006

:
9%

002000

007436

025461

007442

145044

000002

— N
AN

007442
007432
007434

MOV
MOV
Mov

JSR

007436

MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV

BIT

BEQ
MOV
81T
BEQ

MOV

BIT
BEQ
MOV
BIT
BEQ
MOV

BIT
BEQ

MoV
cMP

BLT
BIT
BEQ

MOV

#DMRRUN
, F LAG

52%

#DMRRUN,FLAG

OUTHEX

#RUNSBM, CONOTM

:DMR ?

S IF NOT DMR MODE SKIP TO 51
sHERE BECAUSE OF BASE TABLE UPDATE REQ ? REV B B8Y EC(
:NO,BRANCH REV B BY EC
JEXIT
;1S 1T RUN STATE
s IF NOT BRANCH
;IS RUN EXPECTED
JIF NOT BRANCH
JIF SO THEN CLEAR EXPECTED
JAND EXIT

#DVEM7 ,TEMP2

aSELZ, TEMP3

PC,LGDVE

#LPO,CONOTM

:gITO.TEMPé

#DATCKM, CONOTM

521T1.TEMP4

#TIMOM, CONOTM

zg173.TEMP4

#DDCMRM, CONOTM

§g174.TEHP4

#LOSDAM, CONOTM

22176.TEHP4

#DISCOM, CONOTM

;?IT?.TEMPQ

#DDCSRM,CONOTM

ggIT8,TEHP4

ANXMM, CONOTM

ggIT9.YEMP4

;LOAD "NULL STRING'' TO INIT CONOTM
) THIS DATA (HECK
;IS THIS TIMEOUT

;1S THIS DDCMP MAINT RECVD
;1S THIS LOST DATA

;1S THIS DISCONNECT
;1S THIS DDCMP START RECVD

;1S THIS NON-EXSISTENT MEMORY
;1S THIS PROCEDURE ERROR

#PROEM, CONOTM

OPTYP 46
118

#1110, TEMPS
108

#RXIDM,CONOTM

007502

#B1T5,TEMPS
518

)

001000

OUTHEX

p—

032737
001405
042737
000137
012737
012737
017737

001414

50%:

007436

51%
#BTUP,FLAG
508

045672
000040

OPTYP ,#6

007502

cMP
BLT
BIT
BEQ
JMP
BIT
BEQ
8I7
BEQ
BIC
JMP

062000

QUTHG6:

THIS DMR MODE

NOT BRANCH

THIS A RX IDLE
NOT BRANCH

SO SET UP MESSAGE

000006

012406

NOBUF
OUTHEX

023727
002426
032737
001402
000137
032737

INC
JMP

JIF NO BUFF INC COUNT AND EXIT
JELSE GO TO 6

007374
045672

#BIT2,TEMPG
OL'TH6

005237
000137

BIT
BEQ

007436

SEQ 0162

JELSE LOG ERROR AND PRINT IT

ol a7, 17,

000004

PAGE 14-35

QSEL6, TEMPS
IF NO BUFFER QUTPUT JUST COUNT THEM

MOV

032737

001404

1%:

®e

007436

®e

145174

St bt bt by be

017737

9228
9229
9230
9231
9232
9233
9234
9235
9236
9237

OUTPUT

G 13

16-JUN~-81
14:39
INTERRUPT HANDLER

MACY11 30A(1052)

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-81 14:38
CZCLkB.P11

000000

045706
045710
045712

000000
000000
000000

000207

144504

000200

144464

OUTH4G:
OUTHEX:
TSELG:
TSELG:
RSEL4:

RSELG6:

Y
Fo
N
M
R
W
N
e N e
o N
X
K
R
N
o N
o N

OUTHEX

OUTH3:

o N o R o N
N
Ko
R

007502
045706
045710

@SEL4, TSELS
@SEL6, TSELG

000040
144506

#CTX,FLAG

052737
017737
017737
042777
000207

:1S THIS RX BACC OUT
;IF NOT THEN IT MUST BE TX.

OUTH3

#CRX,FLAG

@SEL4 ,RSELSG
@SEL6,RSELG

#RDO,aSELZ
PC

0
0
0
0

sSET RX (OMPL
s THEN MOVE

007502
045702
045704

N#RXBIT ,a@SELZ2

TEMP

JAND SEL6 TO TEMP
:CLEAR RDO
JRETURN TO CALLER

Ran Nan T

000020
144532
144530

OUTHZ:

. WORD

e Ran Ran L

144542

;CLEAR RDO AND RETURN TO CALLER

DVEM?7
ERRS8

en R

000004

OUTHEX

CSERSOFT

tan Lan ke

032777
001012
052737
017737
017737
000411

TRAP
.WORD
.WORD

kanken L

104457

INC
ERRCNT
T 19.DVEM7,ERR8
ERRSOF

12%:

#CDGLM, CONOTM

lan

007442

#MIT12,TEMPS
12%

#CTSFM,CONOTM

025471

BIT
BEQ
MOV

MOV

THIS CTS FAILED
NOT BRAN(CH
SO SET UP MESSAGE
THIS CD GLITCHED
IF NO
SO SET UP MESSAGE

lean

11%:

;IS
s IF
;1F
;1S
;BR
;IF

007442
007436

#BIT11,TEMPS
11$

lanlen lan ke

025505
010000

BIT
BEQ

10%:

SEQ 0163

14-36

007400

007436

PAGE

005237

004000

H 13
30A(1052)
16=-JUN-81
14:39
OUTPUT INTERRUPT HANDLER

032737
001403
012737
032737
001403
012737

MACY11

9284
9285
9286
9287
9288
9289
9290
9291
9292
(4)
(5)
(5)
(5)
9293
9294
9295
9296
9297
9298
9299
9300
9301
9302
9303
9304
9305
9306
9207
9308
9309
9310
9311
9312
9313
9314
9315

LINK TEST

CZCLKBO DMR,DMC~11 DATA COMM.
16~JUN-81 14:38
CZCLkB.PIN

——

CZCLKBO DMR,DM(C-11 DATA (COMM, LINK TEST

czcLkB.PIN

16-JUN-81

MACY11

14:38

9328

113

16~JUN-81
14:39
INTERRUPT HANDLER

30A(1052)
OUTPUT

SEQ 0164

PAGE 14-37

.EVEN

TRIEIETETETE
FE P
TN T
P
AL T I
I
PR
IP

SBTTL

REQUEST BASE TABLE UPDATE

THIS ROUTINE ADDED FOR REV B B/ EC

‘UNCTIONAL DESCRIPTION:
DVBTUP - THIS ROUTINE IS CALLED AT END OF PASS TO UPDATE THE DMR
BASE TABLE IN LOCAL MEMORY BY ISSUING AN UPDATE BASE TABLE
REQUEST

USE OF

TO THE DMR.

FLAGS:

FLAG ~ BITS IN THIS WORD ARE SET BY THE DEVICE INTERRUPT ROUTINE.
WHEN SET TO A 1, THE FOLLOWING BITS MEAN
DEVICE INPUT READY
ININT = BIT
DEVICE OUT READY
OTINT = B8IT

INPUTS: NONE REQUIRED.
SUBORDINATE ROUTINES USED:

ETEPETE

CLRAW - CLEAR RQ] AND WAIT FOR DEVICE TO CLEAR RDI.
OUTHDL - THE DEVICE OUTPUT SERVICE ROUTINE.
LGDVE - LOG A DEVICE ERROR TO EVENT LOG.

CALLING SEQUENCE :
PC.DVBTUP
JSR

045714
045714
045722
045724
045732
045740
045744
045750
045756
045756
045760
045766
045770
045774
045776

023727
002453
112777
052777
004737
004737
012737

012406

000006

000151
000100
044746
044640
000200

144426
144426

007542

032737

000002

007502

005737
001370
012737

007542

104422

001021

024424

144350
144346

026434
007400

046052

002000
045070
002000

DVBTUP:

10%:

;DEVICE BASE TABLE UPDATE ROUTINE
(MP
BLT
MOVB
8IS
JSR
JSR
MOV
BREAK
BIT
BNE
TST
BNE
MoV

007432
007434
007436

OPTYP 46

40%
#151,aBSELO
#1EQ,aSELZ2
PC,TOORIO
PC,CLRAW

007502

40%:

8IS

TABLE

UPDATE

JENABLE INTERRUPT ON OUTPUT READY
;WAIT FOR RDI

#200, TIMERY

N#OTINT ,FLAG

;OUTPUT READY ?

308
TIMER1
108

#DVEM3, TEMP?

@SELO, TEMP3
aSEL2, TEMPS

PC,LGDVE

30$:

JREQUEST BASE

;CLEAR RQI AND WAIT FOR RDI TO CLEAR
JWAIT FOR INTERRUPT

ERRCNT

007502

:DMR IN DMR MODE ?
:NO ,BRANCH

40%
#8TUP,FLAG
PC,OUTHDL
z?TUP,FLAG

< YES ,BRANCH

;TIME OUT ?
;NO ,BRANCH
;DEVICE ERROR
:SAVE REGISTER
;SAVE REGISTER

;GO LOG DEVICE ERROR
;BUMP ERROR COUNT

;RETURN

;SET BASE TABLE UPDATE BIT
JOUTPUT SERVICE ROUTINE
:CLEAR BASE TABLE UPDATE BIT

JRETURN

TRAP

C$8RK

e
P
T
PYR
AT

(SETST

TRAP

L10020:

N FOR

104407

TR FOR

ENDTST

FUR

046054
046054
046054

SEQ 0165

PAGE 14-38

9388
(3)
(3)
9389
9390
9IN

14:39

TR AN AU

J 13

MACY11 30A(1052)
16-JUN-81
CZCLKBO DMR,DM(-11 DATA (OMM, LINK TEST
REQUEST BASE TABLE UPDATE
C2CLKB.P11
16-JUN-81 14:38

CZCLKBO DMR,DMC-11 DATA (OMM,
16~JUN-81 14:38
CZCLKB.P11

(&)

9420
9421
9432
9433
9434
9435

%36
(%)
4)
4)
%)

9437
(%)
%)
%)
4)

9438
4)
4)
4)
%)
(4)

939

9440
9441
(4)
4)
(4)
&)
&)

9442
9443
94644

MACY11

30A(1052)

K13
16-JUN-81

HARDWARE PARAMETER CODING SECTION

.SBTTL

14:39

PAGE 14-39

SEQ 0166

HARDWARE PARAMETER CODING SECTION

+
+

9393
9394
9395
9396
9397
9398
9399
9400
9401
9402
9403
9404
9405
(3)
(3)
9406
9416
917
9418
919
(%)
4)

LINK TEST

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.

046056
046056
046060

BGNHRD

000025

:
LSHARD:
.SBTTL

046060

046062
046064

DEVICE

GPRML

000130
046132
000001

003032
046244
000340
000004
000007

046120
046120
046122
046124
046126
046130

005032
046272
000007
000000
000007

INDEPENDENT SECTION

DPLX,0,1,YES

.WORD
.WORD

. WORD

.SBTTL

046066
046066
046070
046072
046074
046076
046076
046100
046102
046104
046106
0466106
046110
046112
046114
046116

.WORD L10023-L$HARD/?2

160000
177776

GPRMA

002031
046211
000300
000776

(SRADR,2,0,160000,177776,YES

VECTOR,4,0,300,776,YES

.WORD

.WORD
.WORD
.WORD

.WORD
.WORD

GPRMD

PRIOR,6,0,340,4.,7,YES

.WORD
JWORD
.WORD
.WORD

WORD

CWORD
GPRMD

DEVPRM,10,0,17,0.15.,YES

GPRMD

OPTN,12,0,7,0,7,YES

.WORD

;

GPRMD

BAUD,14.0.7.0,7,YES

LININ,16.0.7.0.7.YES

TSCODE

CSRADR
TSLOLIM
TSHILIM

TS$CODE

VECTOR

TSLOLIM
TSHILIM
TSCODE

PRIOR

340

TSLOLIM

TSHILIM

TSCODE

.WORD

OQPTN

"WORD
CWORD

TSLOLIM
TSHILIM

WORD

;

DEVICE DEPENDENT SECTION

GPRMA

001031
046163

T$CODE

DPLX

L 13

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
16~JUN-81 14:38

MACY11 30A(1052)
16=JUN-81
DEVICE DEPENDENT SECTION

9445
()
(3)
9446
9447

ENDHRD

(ZCLkB.P11

046132

SEQ 0167

PAGE 14=40

L10023:

046132
NLIST

9448
9649

9450
9451
9452
9460
9461
9662
9463
9464
9465
9666
9667
9468
9469
9470
971
9478

14:39

.EVEN

BEX

:DEVICE INDEPENDENT QUESTIONS
046132

052506

046114

042040

DPLX:

.ASCIZ

/FULL DUPLEX OPERATION : /

sDEVICE DEPENDENT QUESTION
053105
052116
042526
044526

046163
046211
046244
046272

046356

041511
051105
051122
042503

CSRADR:
VECTOR:

.ASCIZ
.ASCIZ

/DEVICE CSR ADDRESS : /
/INTERRUPT VECTOR ADDRESS:

OPTN:

.ASCIZ

/DEVICE OPTION TYPE

PRIOR:

LIST

.ASCIZ

BEX
.EVEN

/INTERRUPT PRIORITY

(0-DM(C,5=DMR-DMC MODE

,7-DMR)/

MACY11 30A(1052)

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16=-JUN-81 14:38
CZCLKB.P1

DEVICE DEPENDENT SECTION

THE SOF TWARE 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

9485
9486
9487

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS

9488
9489

WITH THE OPERATOR.

9490

9491

(3)
9529
9530
9531

SEQ 0168

PAGE 15

s 44

9484

(4)
4)

14:39

;.SBTTL SOF TWARE PARAMETER CODING SECTION

9481
9482
9483

9492
73
9502
9503
9504
9505
9506
9513
9514
9515
9516
9517
9518
9519
9520
9527
9528
2)

M3
16=JUN-81

BGNSFT

ENDSFT

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

LN N

046356
046356

000030

$PATCH:

046436
046436
046440
046442
046442

BLkWw
LASTAD

000000
000000

000001

LSLAST::
.END

AN B

BN AN AN AN AR AN BN AN BN BN BN

BN BN AN BN AN

BN AN AX BN A

Q
N

.EVEN

.WORD
.WORD

ENDMOD

7543
79254

CROSS REFERENCE

TABLE == USER SYMBOLS

8241

ACTMET

7996
7989
7905
7898

7998
8002
7910
7900

80014
80064
7916
7902

7919
79094

ACTMSO
ACTMS1
ACTMS?2
ACTMS3
ACTMSS
ACTMSS
ACTMS6
ACTM2X

7937

7940

7943

79474

ACTQFG

7974

7977

79814

g—— gp—n
o
g
o
f—
gp—
—
g— g—
—
—
— g—
—

79214

e G

. P

p—

—

f— f—

p—

—

ACTNO
ACTNUF
ACTNUL
ACTNUM
ACTOPM
ACTPAS
ACTPRO
ACTPRT

(—

—

ACTMOP
ACTMOS

78414

—

79564
78794
77554
776494
79364
79974
7994

SEQ 0169

p— g—

7689
7699
7720

78904

79674
78044
79954
77434
7858#
7973
77664
77924
7939#
7838
78404
78354

PAGE 16

—

7790

7725

ACTCOP
ACTCRC
ACTCSE
ACTCST
ACTDLL
ACTDME
ACTDMQ
ACTDMS
ACTDMX
ACTECH
ACTEQO
ACTEXT
ACTHLP
ACTLIS
ACTLLP
ACTLPX
ACTLXX
ACTMEX

ACTREC
ACTREX
ACTRHL
ACTRLG
ACTRLP
AC TRNF
ACTRNL
ACTRPS
ACTRUN
ACTSEX
ACTSHO

L4954
7711
7729
7691

14:39

= g

8001

ACTATYV
ACTBCR
ACTCHK
ACTCLB
ACTCLP
ACTCLR

7925

N 13
16~JUN-81

- f— g— g—

= 000003
037710
037514

MACY11 30A(1052)

036502

ACT

LINK TEST

g—

C2CLKkBO DMR,DMC~11 DATA COMM.
16~JUN-81 14:38
CZCLkB.P

1
0461476
041510
040762
040762
000010
000027
000001
007447
000051
017370

BASM1
BASMIA

016242
016207

63134
63344
63514
78554
79454
79934
79424
7627
66164

81504
82154
82254
82614

8263
82794
82824
82814
82864
82894

8259
8291

82664

8288

8155

82044

6320

6326

6328

6338

6340

6344

6346

6369

6371

6377

6379

6321+
6319«
6378«

6328+
63267
6415
4668

6329+
6327«

6340*
6338+

6346*
6339+

6371+
6344+

6372+
6345+

6379+
6354+

6380+
6356+

6407
6357

6369+

8128

B
A
I
2
I
I
B
E
B

= 000200 G
= 000400 G
= 001000 G
= 000002 G
= 002000 G
= 004000 G

9255

4649

G
G
G
G
G
G
G
G

8364+

000CO1
000001
000002
000004
000010
000020
000040
000100

7661

BITO07
BITO8
BIT09
BIT1
BIT10
BIT11

78514
78524

016233
016224
007456
007454
=
=
=
=
=
=
=
=

7827

4516
4672
4670

9258
9281
9284

BITO
BIT00
BITO1
BIT0Z2
BIT03
BITO4
BITOS
BITO6

78154

BASM2
BASM3
BDATA
BEND

041470

7796
78484
79704

XIZIrrrcererrrrre

ALCK4A
ALCK4B
ALCKS
ALLTR
ASSEMB=
ATVMOD=
=
BACC
BAD
BADCHR=
BASE

ALCK4

7777

I XIXIXIXIZIX

037076
037276
(40132
037306
037314
027622
027764
030076
037324
037776
040226
037766
031712
032006
000020 G
040720
041032
041076
041316
041342
041434
041446
041442

TR RTTRRTTRRTE

ACTSHW
ACTSTE
ACTSTS
ACTSTT
ACTSTX
ACTSWE
ACTSWF
ACTSWO
ACTSZE
ACTTAL
ACTTLP
ACTTRA
ADDCC
ADDC1
ADR
=
ALCK
ALCKY1
ALCK2
ALCK2A
ALCK3
ALCK3A
ALCK3B
ALCK3C

SEa 0170

PAGE 16-1

8 14

16=-JUN-81
14:39
MACY11 30A(1052)
CZCLKBO DMR,DMC-11 DATA COMM, LINK TEST
16=JUN-81
14:38
(ROSS
REFERENCE
TABLE
=-USER
SYMBOLS
CZCLKB.P11

CLINBG
CLINPS
CLINUF

012565
012671
012542

64517
64518
4519
4520
4674
4651
4671
4653
66654
7534

4647
4648
9264
4650
9267

8761

9232

7662

7811

8052

8776+
8715+

8835+

8889«

8973«

9367+

4931

6605

6612

6733

7609

7638

6757+

7530+

7538

7660

7665

7789+

4673
8758

8758
8764

4665

9243

4667

9270

7541

7628

8737«

8756+

8770~
8712+

7281+

7282*

4666

9273

9261

9276

6663
6664

7278%

7286+

8764+
7290+

9383

7640
4930
7836+

6753

9385
7840«

7804

8048

5183
5262
05

5185
5269
5320

5271
5322

5187

5192
5275
5326

6255

6257

6259

6261

6266

7743

7277«

5179
5257
5298

4669

4652

012607
000011
012512
000000
000001

9287

CLIBRX
CLIDEC=
CLIERM
CLIERR=
CLIEXI=

GL784
44784
44784
4L4L78A
44784
G4L784
44784
L4784
44L784
44784
44784
L4784

5159

5198

5200

5336

BTV

010000 G
020000 G
040000 G
100000 G
BIT2
= 000004 G
BIT3 = 000010 G
BI1T4
= 000020 G
BITS = 000040 G
BIT6 = 000100 G
BIT? = 000200 G
BIT8
= 000400 G
BIT9 = 001000 G
BLDBEX 032120
BLDBUF
032010
BLDB1
032020
BLDBZ2
032062
8LDB3
032100
BOE
= 000400 G
BSELO
012360
BSEL1
012362
BSEL2
012364
BSEL3
012366
BSEL4
012370
BSELS
012372
012374
BSEL6
BSEL7
012376
BTHEAD 030476
BTUP = 002000
BUFEX
015223
BUFL IM= 001000
BYTBIT
007406
CABLE = 000002
CBLLOP= 000045
CCURAD 007344
COGLM
025471
CHECK = 000003
CLEAR = 000001
CLIACT 036302
CLIALN= 000007
CLIALP= 000006
CLIBCR 012734
cLiBbL
012627
CLIBIF= 000C0O3
CLIBR = 000002

NP
RS

=
=
=
=

(5419, 1V, ]

BIT12
BIT13
BIT14
BIT15

SEQ 0171

PAGE 16-2

PP PIIPIIPIIPIIPIIPIIPIIPIIIPIPIPPIPIPIPOIIPPIIIPOIPPPOPIIIFIFIPFIII

C 14

MACY11 30A(1052)
16-JUN-81
14:39
CZCLKBO DMR,DMC-11 DATA COMM, LINK TEST
16=JUN-81 14:38
CROSS REFERENCE TABLE =-- USER SYMBOLS
CZCLkB.P1

010660
0126476
012504
007524
007522
007532
007530
026230
026204

CLRAW
CLRA1
CLRAZ
CLRA3Z
CMDBUF
CMPBUF
(MPPTR

044640
044660
044702
044652
003060
005562
007335

(MPSEX
CMPSR
CMPS1
CMPS2
CMPS3
CMPS5
CMPSS5A
CMPS6
CMPS7
CMPTOT
CMSGO0 =
(MSG1 =
CMSG2 =

041764
041510
041650
041654
041542
041752
041756
041720
041636
007340
000020
000021
000022

CMSG4 =
CMSGS =
CMSG6 =
CONOTM

000024
000025
000026
007442

CONTIN
CPTR

007444
007416

CPTRR

007414

(R
CRC

020000
000040
000020

CLKVEC

5214
801

5216

SEQ 0172

6271

6253
5167
5208
5278
6265

7226+

7228+

5178
5238
5297

5169
5224
5280
6267

7371«

5180
5240
5299

7499+

7237

007526

8839

7568
7788

8978

91094

9370

6754

6755+
7785%

6759
7786+

7524+
7787

8027+

8028+

8029

8332

7772

7525+

7537

7649+

7650+

7658+

83694

6751

6760+

7542+

7644

7651

7664+

7774

7778+

8016

8036

5885
9275+
8838
6650+
8151«
8102+
8579+

8492+

8509+
9283«

8517+
9286+

9289

8522+

9249+

9254+

9257+

9260+

9263+

9266+

7537+

7625%
8234
8207

7629
8282+
8212+

7659«
8289
8240+

8331«
8245

7800~

8050+
8621+
8286

8078+

CMSG3 = 000C23

CR(CB

9278+

7533«

8217
8126+

8222+
8153~

7663

7787+

8336
8253+

8340+
8265+

8332+

PAGE 16-3

PP IPPIPIPIPIPIPIPPIPIPIPPPPPPPIPIIIIPIIPIIPIPIPIIPIPIIIIPIPIIIPIPIPPIPPIIIFI>

CLITRE
CLISPM
CLISRP
CLKBR
CLKCSR
CLKEN
CLkHZ
CLKINT
CLKSET

45654

D 14

16=JUN-81
14:39
CROSS REFERENCE TABLE == USER SYMBOLS

000005
000010
013032
027464
027266
013001
000004
(00012

14:38

MACY11 30A(1052)

CLINUM=
CLIOCT=
CLIPW
CLIRAC
CLIRT
CLISEO
CLISPA=
CLISTR=

16-JUN-81

LINK TEST

cZCLkB.PI

DATA COMM.

CZCLKBO DMR,DMC~11

CURCC

007412

CSAU
=
C$AUTO=
($BRK =
C$BSEG=
($8SUB=
CS$CEFG=
C$CLCK=
CSCLEA=
C$CLOS=
C$CLP1=
CSCVEC=
CSDCLN=
($DODU=
CSDRPT=
($OU =
C$EDIT=

000052
000061
000022

7637

7642

7666+

7779+

9012

5653
8480
6611

9028
6665+

9298
7532+

7538 v

7626+

7631

7660+

7665

7805+

8049+

7909+

9014
6655
8481
6614+
8048+

6615
8449+

6649
8455+

6654
8482

6665
8483

7528+

7540+

7807+

7868+

7881+

8995

9114

9166

9372

8366

8375

8728

8991

9005

9022

9037

9124

9163

9219

9292

7241

7315

7374

7559

7601

6228

7237

7567

8441

8565

7907+
7463
7351
8719

7223

7217
7390

—

IYIIPIYS

7517 *

6763

000006

7199

7426
4306

7258

VD
IR TR TR T
T

9388

8352
9223

ER VI

8465

($GETB=
CSGETw=
CSGMAN=
CSGPHR=

6758+

CSEXIT=

6757

CSESCA=
CS$ESEG=
C$ESUB=
CSETST=

6755

7331

=
(SERDF
CSERHR=
(SERRO=
(SERSF=
CSERSO=

7904«

9303

000020
007420

9043

025505

9029

000004

9012

8981
5197
5199
94634
6747
5048
9286
8981
6648
8454+
6604

000007
046163
007342

645514
45794
45804
9436
L9394
L647N
57914
45504
49684
8448+
L9654

000006

D YHD

000040

7555

-— e

=
(RX
CSHEXP=
CSHTRN=
CSRADR
C101CC
CTS
=
CTSFM
=
(rx
CURADD

SEQ 0173

PAGE 16-4

E 14

16-JUN-81
14:39
MACY11 30A(1052)
CZCLkBO DMR,DMC~-11 DATA COMM. LINK TEST
16=-JUN-81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS
CZCLKB.P11

5855

5878

5886

5854
6183

5872
6241
7548
8018
6470

5877
6359

5881
6405

6564

6568

8534
6487

8615
6495

7654

6570
7750

6515

6530

6803

7021
7890

6452

7579

7611

7640

-w
~»

7312

7967

8014

7198+

7600+

6471
6471
6802
6807

6474
6475
7551«
6811

7372
7311

7209

7206

7204

P
P
R
e
e
e

8237

8284

8329

6476*
6477

6792
6795

7549+
7550+

7828+
7829+

6815

6819

7552+

7831

W
W
@

7830~

L5614
45364
51274
5128#
51294
S130#4
4351#

57854
57824

8614

L991H

8560

LOLON

45384

8447

8098

5088
L5164
S787#

4228#

(228#
4228#
(228#
L2284

(228#
42284

—m

CSRPT =
CS$SEFG=
CSSPRI=
(3SVEC=
C($TPRI=

4228#
L228#
42284
4228~
4228

CIPNTX= 000015
(%Ql0 = 000377
CSRDBU= 000007
(SREFG= 000047
(SRESE= 000033
CSREV]= 000003
CSRFLA= 000021

SEQ 0174

PAGE 16-5

F 14
MACYT1 30A(1052)
16=JUN-81
14:39
CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN~-81 14:38
CROSS REFERENCE TABLE -- USER SYMBOLS
CZCLKB.P1

—

8495

85344
8518

8523

8487

8503

8448
8454

8504

042202
013122
020225

84604
54614
5086

OMCO03
DMC004
DMCO0S
DMC006
DMCO07
OMCO10
OMCON

DMCO12
OMCO13
DMC377
DMFMT
DMPE
DMPM
DMPQ
DMPS

024050

024103
026125
026147
024206
030547

DMRC6
DMR(C7
DMREND
DMRIND
DMRRUN=
DMROOO

84714

6317
6315

6337
6336

6368
6366

7593

7837

6343
6342

6376
6374

DMR026
DMR027

021756

G 14

16-JUN-81
14:39
TABLE == USER SYMBOLS

PAGE 16-6

SEQ 0175

PPN

8457
56584

57374
57384

S739#
S7404
5741a

57424
5743
S744m
57454
57464
64234
5216
5659

9245

DMROO1
DMR0OO2
DMROO3

DMRO33
DMR0O34

CROSS REFERENCE

30A(1052)

NP5

042242
020251
000000
003462
003432
020242
023604
023625
023662
023723
023756
024013

MACY11

PTNTNSNPN SN NN NN

DL TXRX
DLWM
OMC
=
DMCEND
DMC IND
DMCM
OMC002

LINK TEST

RSNV SN

CZCLkBO DMR,DMC-11 DATA (OMM,
16~JUN-81 14:38
CZCLkB.P1T

9247

CZCLkBO DMR,DM(C-11 DATA (OMM.
16~JUN-81 14:38
(2CLkB.P11

DMF035
DMRO36
DMRO37
DMR040
DMRO41
DMR042

DMRO43
DMRO44
DMRO4S
DMRO46

DMRO47
DMRO50
DMROS1

DMROS?2

DMRO53
DMRO54
DMROSS

DMR0O56

DMROS7
DMRO60
DMRO61
DMR062
DMRO63
DMROG4
DMROG6S

DMRO66

DMRO67
DMR177
DMR6
DMR7
DMSGAD
DMSGCT

DMUNKN
DMVM
DNM
DOW
DPLX
DPM
DM
DSR
DTEM
DUM
X
DUME

DUMPSR
DUM1

DUM2
DUM3
DUM4

DUPM
DVBTUP

DVEMO
DVEMI
DVEM3
DVEM4
DVEMS
DVEM6

022042
022107
022154
022212
022245
022303

022351
022405

022441
022472
022540
022602
022630
022664
022711
022744
022766
023041
023114
023136

023170
023222
023272
023342
023376
023432
023475
023540
000006
000007
002176
002150
020322

020316
020246
000004
046132
020217
020230
000010
020261
020222
031710
031554
031646

031670
031604
031560
020236
045714
024252
024340
024424
024510
024602
024674

4848
(849
6850
4851
4852
4853

4854

4855
4856

LINK TEST

H1 4
14:39
6-J UN-81
MACY11 30A(1052)
(ROSS REFERENCE TABLE -- U S ER SYMBOLS
1

5702#

5703
57044
57054
57064
S707#
57084
57094

4857
4858
4859
4860
4861
4862

4863

4864
4865
4866
4867

4868

4869
4870
4871
4872
4873
4874
4875
45274
45284
L7024
L6874
4878
5101

56724

8779

93644
9124
9163
8728
8991
9005
9219

9377

PAGE 16-7

SEQ 0176

EDDLE

EDDVI
EDEOP
EDMOS
EDRXC
EDRXQ
EDTXC
EDTXQ
EFM1T
EFM2
EF .CON=
EF .NEW=

016046

016020
016136
016152
015725
015700
015651
015625
015550
015453
000036 G
000035 G
EF .PWR- 000034 G

9017
9024
9015
9032
L9428
8225
5096
4L604H
45174
5076
5079
5074
5078
5075

5080
55704
5073
5072
5071
5070
55554
55534
LL78N

LL78N
4L78N

90144
90254

90284
90294
90404

e
Y
TR
T
TR
TR
TR
T
TR
T
TR
TR
T
T
TR
T
TR
TR
T
T

8629
8262

8631+
8333«

8632+
8378+

3893

8229
8623
8269
8124+

8473+
88844
8482+
8150

8511

8616+

8628

8631

8892

9040+

8500
8271+

8504
8276

8576+
8279

8584

8977

9026+

8268
8581

8480+
8626

8499
89704

8573«

8583

8976

9025+

7947

7958

7963

8232

8366

8375

9041+

8261+

8618+

TRV

8512
8243+

8992

8971
8982

8475¢
8239+

4943
TATAN|
9030
9039

8152+

8213

8230

4951
8886
44N

87624
56614
88354
90854
8211~
80756«
88954
8209+
8477
8221+
8100«
044N
90434
89794

L9504

87134
87454
87764

5095
6161
7312

87884

8743
8755
8760

87844

8721

VNI

044176
044376
044456
044500
044506
044566
007346
044120
020270
000037
000004
015770
016103
015753

8748
8782
8780
8711

87324
87654
872174
87504
8785

8730

DVIR3
DVTR4
DVTRLA
DVTR4B
DVTRS
DVTRSA
DVIXA
DVTXRX
DZM
ECHO =
ECHOB =
EDDCK
EDDDE
EDDER

8763
8714

90714

9292
9037
9022

8352

044616
044610

007352

8046
7311
8718

9250
9033
9018
6136
8794w
87024

SEQ 0177

PAGE 16-8

DVTREX
DVTRX1

DVTCT

5770#
5773
57754
45374
8792

CROSS REFERENCE

AIAIAIA

024751
025036
025125
000012
044002
043320
044620 G
043462
043656
043400
043566
043752
043736
043362
043534
043700
043640
020265
044004
044630 G
007364
007366
044116
007362
044040
007350

14
14:39
16=JUN-81
TABLE == USEY SYMBOLS

MACY11 30A(1052)

DVEM7
DVEM8
DVEM9
DvI
=
DVINEX
DVINIT
DVINS
DVINT
DVINIO
DVINZ
DVIN3
DVING
DVINS
DVING
DVIN7?
DVING
DVING
DVM
DVMODS
DVOUTS
DVRCC
DVRCT
ODVREX
DVRXA
DVRXQ
DVICC

LINK TEST

CZCLkBO DMR,DM(C-11 DATA COMM,
16=-JUN-81 14:38
CZCLkB.P1T

46784
CLT78H
4688
4689
4690
4691
4692
4693
4694
4696
49594

EF .RES=
EF.STA=

ERR1
ERR10

ERR13
ERR14
ERR?2
ERRS8
ERR9

ERX
ETX
EVL
EVMCTS

EVMOCD

EVMDSR
EVMOCG
EVMOHD
EVMOST
EVMR]
EVMRTS
EVMSQD
EVMTM
EVTADD
EVIBCT
EVIEND

EVTFO
EVIF1
EVTF2
EVIF3
EVTF3(

EVTF3D
EVTFé4

025630
025720
026110
026142
025672
025750
026032
000100
000200
000004
017240

017250
017244
017120
017143
017223
017260
017254
017264
017270
010614

6435
7208

[alalalalalalnl

ENADD
ENDEVT
ENDIT
ENDQO
eop
ERRCNT

002416
002517
002647
007404
031432
034530
000017
000024
007400

(7]

EMSGO
EMSG)
EMSG2
EMSG3
EMSG4
EMSGS
EMSG6
EMSG8

45884
45420
L9574
9218+

58494
58574
58804
58844

7204
7202
G740
G764
47184
47204
L7264
47314
47354
L7454

7841«

6449

65064

6163
9381+

8042+

8351«

8365+

8991

9005

9022

9037

9163
8127
8154

9219

8154
8258

8257
8274

6463
6463
6442

6484+
6485+
7249

5881
5885

6471

6199

8374

8403

8727+

8990+

8275

3446
8502

8620
8578

9031
8590

9016

6487
6487

6492*

6495
6495

6499*
6500+

6502
6502

6432

6440

7246

6431

6447

7247+

58534

8485

6493

EVTF4A
EVTF4B

EVTFSA

EVTLOG
EVTLST
EVTMIN
EVIPIR
EVTSEC
EVTTCK

6457
6200+
6457
6457

9004+

9123+

9162+

—

SEQ 0178

PAGE 16-9

PAIRIA I AIAIARIAIAIAIAIAIAIAIAIARIAIAIARIAIAIAIAIATIAININAICA
LA

J 14

16=-JUN=81
14:39
MACY11 30A(1052)
CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-81
14:38
CZCLkB.P1
CROSS REFERENCE TABLE == USER SYMBOLS

EVITMP
010620
=
EXIT

ESEND =
ESLOAD=

51104

L6204
4228#
42284

LINK TEST

6467
5158

6728#

FACSIM
FHOPL
X
FLAG

50094
8274+
8590

30A(1052)

6486+
7755

6487

CROSS REFERENCE

6470
7598

8784
8077«

L999#

MACY11

TABLE -~ USER SYMBOLS

8101+
8446%
8793+

9028+
9247+

9014
9211
42284
4228#
L2284
7169
9071
42284
4228#
42284
7315
9087

14:39

PAGE 16-10

6494

6495

6501+

6502

8154+
8472+
8888+

8205
8485+
8970
9042*
9373

8215
8487
8972+
9043+
9383+

8227

9031

9303+

5853
7342
9388

5870
7374
9529

5855
7374

7610

5873

9445

5875

5880

8489
8981
9072+
9385+

SEQ 0179

8257+
8502+
8996

8258+
8503+
9003+

8264+
8507

8266
8578«

9167

9172

9174+

9086+

7399

7610

5884
7436

5888
7447

6048

7489

7099
7559

7140
7601

7426

5878

5882
7447

7463

5886

5888
7489

6072
7559

7131
7601

7241

9073

7315

7374

7410

7447

7559

7601

5853

5855

5857

5859

5870

5873

5875

5878

5880

5882

9071

9073

9085

9087

7580
8019

7584

7587

7589

7596

7603

7605

7612

7621

7635

— 44

4228#

K 14
16-JUN-81

_a_a

CZCLKBO DMR,DMC-11 DATA COMM.
16-JUN-81 14:38
CZCLKB.P11

035310
034310
027074
007446

034716

€048

6072

7489
75654
7655
72540

9388
7576

6237
5850

7669
7259

6242
8363+

6246

75494

8411

8462

8409

8592
80124

8639

75104

7592

8467

IER
=
INDEX
INDEXE
ININT =
INIT1
INTPRI
INVEC
ISR
=
IXE
=
ISAU =
ISAUTO=
ISCLN =
ISDU =
I$HRD =
ISINIT=
ISMOD =
ISMSG =

020000 G
007450
007452
000001
033762
012404
012400
000100 G
004000 G
000041
000041
000041
000041
000041
000041
000041
000041

I$PROT= 000040

LL784
44784
L4784
46744
44784
49814
49824
45464

7197
53704
53684
44784
44784
42284
642284
42284
L2284
94054
42284
42288
42284
58844
42284

8441

8565

9438

9441

7237
9419
8441

9438

9441

7237

9437

9438

9441

5810

4315
7101
7476

4335
7116
7483

4353
7124
749

4404

8845

4630
8900

6324
6343=
9172

9438
9438

9441
9441

4433
7148
9317

4447
7171

9333

4463
7317
9407

7344
9472

7362
9494

7376
95C7

4655
9049

5339
9060

5388
9075

5420
9422

5748
9453

5861

7263

6336%
6368+
9174

6342
6376*

6366+
6410

6367+
6412

6374

6375+

6406

58574

58594

58704

58734

58754

5878+

58804

[
R

9437
9437

7753

5435

2209
8645
5152
7751
6297
7749
7548
S464M
564654
54694
54704
54714
54724
54734
54744

5414

7412

5375

D S

8781
4219

54634
48004
54624
4800
4801
4802
4803
4804
4805
4806
4807

9436
9436

000005
003230
013225
003210
013147
013232
013245
013362
013447
013474
013553
013631
013721
100000 G
010000 G
00C40 G
000100

7401
9521
22004
7303
45784
48084

9419
9419

—a

HLP
=
HLPEND
HLPF
HLPTAB
HLPO
HLP1
HLP2
HLP3
HLP3A
HLP4
HLP4A
HLPS
HLP6
HOE
=
IBE
=
IDU
=
IE0
=

5798

8565
8565

6228
6228
9436
6228
9419
6228

HELPDC= 000000

21954

8565
8441
8441

6228

—d —d—a

= 000000

42284

42288
642284
62284
62284
62284
42284
L2284
4£228%
64228%¢
42284
42284
£228%
L6724

B745

9368

6315+
6317+
8996
72014
7295+«
7292+

6316+
6325+
9003

6323
6337
9072

7311
7311

7312

74364
73424
73604
73994
94454
71694
42494
58494
58864
71404

74634
73514
7374
76264

7241
9529
58514

—d

HELP

000400
000376
000001
000002
000000
000140
0000CO
000040
000120
000020
000004
000010
002000

= 000000

SEQ 0180

—

GSNO

GSOF FS=
GS$OF S1=
GSPRMA=
GSPRMD=
GSPRML=
GSRADA=
GSRADB=
GSRADD=
GSRADL=
GSRADO=
GSXFER=
GSYES =
HALFDB=

PAGE 16-11

e
wal
s ok ol

L 14

MACY11 30A(1052)
16-JUN-81
14:39
CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
CZCLKB.P11
16-JUN-81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS

73904

7315

73314

58534

58554

58824

60724

90714

90734

90854

604BH
7489
7489

9087#

7559
7410

7601
7447

9223

93884

6300*
7746e

6304
7753x

6309+
7SSk

7583
7757+

7586
7761x

7588
7776

7590
7795

7593
7B37+

7598
7B48s

7602
7851+

56664
7220
8496
7936

8726
8591

8989

9002

9021

9036

9122

9161

9217

9253

9380

6178+

6182%

8043+

8513
8478
6126

8630
8624
6128

61604

6146

6150

6154

6158

6169

6184
8501
8484

8585
8577
7255

7258

55014

6800

9254

—

5888
5664
56654
6244
7743+

LOGUNT
LOOPS

LOSDAM
LOT
=
LPO
LPOO
LP1
LP2
LP3
LP&
LULOOP=
LSACP
LSAPT
[$AU
($AUT
LSAUTO

007460
003532

025361
000010 G
014635
014636
014645
014656
014664
014677
004000
002110 G
002036 G
034702 G
002070 G
034646 6

49898
49094

578K
44784
4909
55024
4910
4911
4912
4913
46704
43064
43064
4306
43064
4306

5184

8637

ol ol

86144
8635
8615

5323
6176
8376
8353
8347
B804S
8404
62024
8231
8214
€119
62004

6141
61814
6173
8270
8223
7252+«
6801

7254

9266

5077
6797
5503
5504#
55054
55064
8746
74364
73424

8749

5100
4509
6120
4498%
5018
86164
4599%
55264
46118
49544
4478
61514
61474
61434
61344
61554
6165
61264
61214
6114
6196
6132
6177
6171
61164
61114

KLM
020313
LCLKEN= 000100
LGDVE
026434
LIS
= 000006
LISCK
043110
LISCKA 043136
LISMOD= 000032
LISP
014753
LMDLOP= 000046
LNCNT
007372
LOE
= 040000 G
LOGCMD
026554
LOGCML
026536
LOGCMP 026520
LOGDVI
026452
LOGEOP 026572
LOGEX
027044
LOGRXC
026424
LOGRXQ 026406
LOGS1
026610
(0GS2
027036
LOGS3
026642
LOGS4
026716
LOGSS
026742
LOGTXC 026370
LOGTX@ 026352

7604
7913

020307
003202

71314

42284
5098
5099
L7964
7606

70994
7489

42284
42284
428K
42284
42084
42288
42288
42284

aadl ol Sl ol

KDZM
KEYWD1

000041
000041
000041
000041
000041
000041
000041
000041
000167
020303

SEQ 0181

ISPTAB=
I$SPWR =
ISRPT =
I$SEG =
I$SETU=
IS$SRV =
I$S5UB =
ISTST =
JSJMP =
KOPM

PAGE 16-12

L
CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
MACY11 30A(1052)
16-JUN-81
14:39
CZCLKB.P11 ~ 16-JUN-81 14:38
CROSS REFERENCE TABLE =- USER SYMBOLS

LSLAST
LSLOAD
LSLUN

LSMREV
L SNAME
LSPRIO
L$PROT
LSPRT
LSREPP
LSREV
LSRPT
LSSPC

L$SPCP
LSSPTP
LSSTA
LSTEST
LSTIML

002060

73604

56324
43334

73994
564124

94054

43514
71694

~—~

SEQ 0182

~eammmammmmmmmmmmenammmmmmmmmmm

LSINIT
LSLADP

002106
034650
002032
002011
012424
002076

PAGE 16-13

95284

71404

70994

7255
44004

5888

elnciaciaciaciaclocinelan
me Kae K
L
X an W
¥ o W
PN
QPN

L$CCP
LSCLEA
L$CO
LSOEPO
LSDESC
LSDESP
LSDEVP
LSDISP
LSOLY
LSDTP
LSDTYP
L$DU
LSOUT
LSOVTY
LSEF
LSENVI
LSETP
LSEXP1
LSEXP4
LSEXPS
LSHARD
LSHIME
LSHPCP
LSHPTP
LSHW
LS$ICP

(ATl alalalalalalalalalalalalalnlalnialalalalalnlnialalalalalalalalalalalalalalalaTATAT
A

N 14
MACY11 30A(1052)
16=-JUN-81
14:39
CZCLxBO DMR,DMC~17 DATA COMM. LINK TEST
16~JUN-81 14:38
CROSS REFERENCE TABLE -~ USER SYMBOLS
CZCLxkB.P11

8 15

CZCLxBO DMR,DMC~11 DATA COMM. LINK TEST
MACY11 30A(1052)
16=JUN-81
14:39
CZCLKB.P11
16~-JUN-81 14:38
CROSS REFERENCE TABLE -- USER SYMBOLS
L10013
L10014
L10015
L10016
L1007
L10020
L10021
L10022
L10023

034644
034646
034672
034700
034706
046054
044626
044636
046132

7241
73514
7374
7410
7447
7559
90734
90874
9405

94454

MLTYP

007472

MOBITE
MOBITS
MOCHK =
MODE
MODES

010476
010460
000010
007504
003514

49964
8004+

50554
5048¢
45184
50124
49014

6138
8012

MODREM= 000004
MODS
010456
MOOTYP (007470

45044
S044k
49934

LSC60
014771
MAINTB= 000400
MCLR
= 040000

55284
46714
46694

MODLOC= 000003

MOMSGS
MOP
=
MOSC
=
MO0
MO1
MO2

010476
000043
000056
014544
014554
014565

MO%
MO5
MO6
MSG
MSGL IM=
MSGTRN
MSGTRU
MSGTYP

014604
014621
014626
002734
000017
015241
015272
007410

mM03

01457°¢

45034

8001

7315

73314

73904
764264
746634
7601

9223

93884

7544%
8747

7550
8759

7560
8762

8837+
7543%

8891«
7549

8975+
7828

8272

8591

7521

7618

7527+«

7237
8781
8708

6528
6516
6819
8055
6794

7829

7930«

7925«

7928+«

8638+

8779

7646

7652

7539+«

7806*

7874+

MSGO

MSG1
MSGI1C
mSG2
mMSG2C
mSG3
mSG3C
MSG4
MSGAC
MSGS
mMSGSC
mSGo
mGo6C
mSG8

002220

002150

8759
6167
6137

8053

6517
46084
5261
54944
54954
54964

4905
4906
4907
4774
44854
955414
5542#¢
ggg?l

54984
54994
55004
47824
6736
7611
6610
6651

8241

00221
002152
002222
002154
002223
002156
002224
002160
002324
002162
002416
002164
002646

7991+

7993+

7995+«

7997+«

7999«

7807

7904

8255

7933«

7936«

7939

7942+

7945+

7959

7767

7782

8024

8030

7893+

7895+«

7897+«

7899+

7901+

7903+

7906+

S4974

7620

4688

4703

47134

4689
46894
4690
46904
4691
“6914
4692
469¢#
4693
46934
4694
4698
4696

4704

47154

4705

“7174

4706

47194

4707

“7214

4708
7528
4709
7907
471

47274
7540
47324

46884

7949+

7976

7640

7654

mMSGOC

SEQ 0183

8762

50594
45054
46194
4901
4902
4903

4904

PAGE 16-14

L7484

CZCLkBO DMR,DMC-17

(ZCLkB.P11

NEW

034302

DATA (OMM,

16=JUN~-81

14:38

7210

72528

69554
55384

8040+
7240

= 00U 36

46034

NODO
NOD 1

010660
010664

51514
51524

NOBUF
NOCLK

NOD10
NOD100
NOD101
NOD102
NOD103
NOD104
NOD105
NOD106
NOD107
NOD11
NOD110
NOD111
NOD112
NOD113
NOD114
NOD115
NOD116
NOD117
NOD12
NOD120
NOD121
NOD122
NOD123
NOD124
NOD125
NOD126
NOD127
NOD13
NOD130
NOD131
NOD132
NOD133
NOD134
NOD135
NOD136
NOD137
NOD14
NOD140
NOD141
NOD142
NOD143
NOD144
NOD145
NOD146
NOD147
NOD15
NOD150

NOD151
NOD152
NOD153

007374
015102

010742
011560
011564
011600
011604
011620
011624
011640
011644
010744
011660
011664
011670
011704
011710
011726
011732
011746
010756
011752
011766
011772
012006
012012
012026
012032
012046
010762
012052
012072
012076
012102
012106
012112
012116
012122
010776
012126
012130
012134
012140
012154
012160
012174
012200
011002
012204

012210
012214
012220

LINK TEST

51594
52394
52404
52414
52564
52574
52584
52594
52614
51604
52624
52654
52684
52694
52704
52714
52724
5273A
51614
5274
52754
52764
52774
52784
52794
52804
52814
51624
5282#
52834
52864
52874
52884
52894
52914
S163#4
52924
52954
52964
52974
52984
52994
53004
53034
51644
53044

53054
53084
53194

5224

MACY11

30A(1052)

7956

7982

CROSS REFERENCE

7256

7953

8401
7508

9235+

c1 5

6 J UN-81

TABLE -=- US E R SYMBOLS

14:39

PAGE 16-15

SEQ 0184

D15

MACY11 30A(1052)
16-JUN-81
14:39
CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
16-JUN-81 14:38
CROSS REFERENCE TABLE =-- USER SYMBOLS
(2CLWB.P1i

53204
53214

\g%\nw
3 44 g aoogmbmum

oo~ VI ATV

N =POW NN NN NN = (NN
WWNININNIONPON

012242
012246
012262
012266
011016
012310
012314
012336

SITEIIRAT

b
b
b
b
b
b wd wd
b
d wd

d
—d

8—.
\nmuw—nwg\n

b
b
b e
d ed ed md
—d md cd

e ) b md md d —d b d b
NN
bbb b 2
&He
=N~
S ORI ONOONSO

011064

WAMAAVAWVIWAWVAWVIVAWVIWVAWIVAW

62554

elelelelelelelolelelelele]

NOD154
NOD155
NOD156
NOD157
NOD16
NOD 160
NOD161
NOD 162
NOD163
NOD 164
NOD 165
NOD 166
NOD167
NOD17
NOD170
NOD171
NOD172
NOD173
NOD174
NOD175
NOD176
NOD177
NOD2
NOD20
NOD200
NOD201
NOD202
NOD203
NOD204
NOD205
NOD206
NOD207
NOD21
NOD210
NOD211
NOD212
NOD213
NOD214
NOD22
NOD23
NOD24
NOD25
NOD26
NOD27
NOD3
NOD 30
31
NOD
NOD 32
NOD 33
NOD 34
NOD 35
NOD 36
NOD37
NOD4
NOD40
1
NOD4

PAGE 16-16

SEQ 0185

CZCLKBO DMR,DMC~11 DATA (COMM. LINK TEST

CZCLKB.P11

16-JUN-81

14:38

ND4G2
NOD43

011250
011254

5188+
5189#

NOD4S
NOD46
NOD47

011276
011310
011314

51914
51924
51964

NODSO

011320

NOD44

NODS

NODS1

NODS2
NODS3

NOD54
NOD5S

NODS6
NODS7

NOD6

011272

51564

011336

51984

011362
011366

011404
011410

010724

NOD6O
NOD61T
NOD62
NOD63
NOD64

011430
011434
011440
011444
011450

NOD66
NODS67

011460
011464

NOD70
NOD71
NOD72
NOD73
NOD74

011470
011474
011500
011504
011516

NOD6S

NOD7

NOD7S

NOD76
NOD77
NONE
=
NOTNUF=
NULEVT
NULL
=
NUM
=

NXMM

N10S

N1008$

N1028
N1048
N110%
N111S
N1128%
N1148
N1158

N116%

N1178%
N118%
N120%
N1218
N122%8

N1238

011454

010726

011522

011536
011542
000000
000050
016250

011542
011564
011664
012130
012160

012134

PAGE 16-17

SEQ 0186

52074
52084

51S7#

52094
52124
52134
5214M
52154

52164

52174
5218+

51584

52194
52224
52234
52244
52254

52264

5151

011516

14:39

52054
52064

010664
011320
011340
011362
011366
011410
011500
011474

CROSS REFERENCE TABLE -- USER SYMBOLS

5199#
5200#

000014

011314

E 15
16-JUN-81

5197#

52274
52384
LS00
(6134
55854
4573
L5854

025310

30A(1052)

5190#

010710

011340
011360

MACY11

5162
6434

5166

5176

5215

5217

5223

5296

5185
5331

5187

5190

5192

52228

5227

5239

5275

5277

5279

5281

5288

52954

5305

5304

57814

9275

5165

5168

5197#
5197
5170
52064
5206
5222
5179
5322
5224
5225
5238
5207
5269
5297
5295

5165

51524

51964

5199#
52054
52084
52234

5181
5324
52254

5226
52404
5209
5271
52994

52964

5183
5326
52384

52654
5273

5241

5262

5320

N1418
N142$
N1438
N144S
N150%
N20$
N25%
N30$

012220
012246
012266
012314
012342
011022
011044
011062

N4OS
NG 2$
N4 3S
NG4S
N4SS
N46S
N50%
N51$
N52%
N6OS

011002
010672
010710
010726
010744
010762
011434
011440
011444
011670

N70$

012102

N140%

N61S
N62$
N63$
NG4S
NG5S
N66S
N67$
N68S

N71$
N72$
N73$
N8OS
NB1$
N82$
N83$
N84S
N85%
NB6S
N87$
OFSET
OPBFPT
OPBUF
OPCNT
OPEND
OPRMM
OPRMSG=
OPTN
OPTYP

012214

012356
012200
011604
011624
011644

F 15

16=JUN-81
MACY11 30A(1052)
14:39
CROSS REFERENCE TABLE =-- USER SYMBOLS

SEQ 0187

PAGE 16-18

5219
53034

5223

5283

5296

53364

5171#
5261

5175
5265

5176
5286

5177
5299

5188
5303

5191
5304

5196
5308

5199
5325

5205
5329

5208
5330

5214

8356+

8369+

7884

8561

8565

8567

8573

8574

8586

8588

8616

8617

8634

8571+

8575

8576

6334

6352

6364

7296+

8710

8713

8742

8754

8791

9238

9279

WROWOOO

N125%
N126%
N130$
N1318
N132%

LINK TEST

VINUN)
= = NN
SO =
NN=0VO
VR OOWN

CZCLKBO DMR,DMC-11 DATA (OMM.
16-JUN-81 14:38
CZCLkB.P11

011710
011732
011752
011772
012012
012032
012052
012076

012112
012116
012126
011064
011070
011132
011154
011176
01120
011250
011276
007424
002520
002524
002166
002646
014764
000015
046272
012406

G 15

16=-JUN-81
14:39
MACY11 30A(1052)
CZCLkBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-B1 14:38
CROSS REFERENCE TABLE -- USER SYMBOLS
CZCLkB.P1

OTINT =
OUTHDL
OUTHEX
OUTH1
OUTHZ
OUTH3
OUTH4
OUTH6
OUTVEC
O0$APTS=
O0$AU
=
0$8GNR=
0$8GNS=
osoU
=
OSERRT=
O$GNSW=
O$POIN=
O$SETU=
PARAM

007476

PAS
=
PASC
=
PASMOD=
PASS1
PASS2
PASS3

000002
000042
000030
002650
002651
002652

PASS4
PCADD
PCK
PCLKCT=
PCLKEN=
PCPM

PEC

PLCK

9008
9171
9242
92254
92954
93034

9086
9210#
9248

9167
9384
9293

7294+

7312

4306
9528

6172
8284

002653
007462

014726
001600
000111
015516

75646+

=
=
=
=
=
=
=
=

PRNT
= 000055
PROEM
025270
PROTO - 000041
PROTOB= 000040

5877

9109

9153«

9210+

94654
7314

7979

7831

7959

6809

L4784
5156
9278

7552

8560+

6818

=
=

93064

8447
8272

014734

014743
014713
001000
002C00
046244
000000
000040
000100
000140
000200
000240
000300
000340

9301

8329
8255

5877

014736
040700
014745
014724

PNE C

9373

4306

040664

PLCK3
PMS
PNCK

9211

4306
4306

040664

PLCK2

PNMS
PNST
PNT
PRI
PRIOR
PRIOO
PRIO1
PRI0O2
PRIO3
PRIO4
PRIOS
PRIO6
PRIO7

L5470
9011
9236
9213

000002
045070
045672
045160
045614
045650
045656
045222
012402
000000
000001
000001
000000
000001
000000
000000
000001
000000

SEQ 0188

PAGE 16-19

7372
7588

7757

7947%
8614~

7958+

7963+

7981+

7984«

8014

8098+

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P1T ~ 16-JUN-81

14:38

PSCNT

49564

B041+

5508#

6806

007376

PST

014715

PTREND
PTRTAB
PSACT
PSBUFA
PSCNT
PSEXIT
PSGDBD

007332
006562
003550
003544
003552
032760
003561

MACY11

CROSS REFERENCE
8399+

8402

6739
6231«
6229+
7002+
69034
620Ur

6766
6910
6865
7009
6927
§234

7518
7570w
7568+
7066*
6932
6360+

L9234
7921+
49214
7009+
49228
49184
6233

6225+
7929+
6357
7011
6962
6230*
6864

6239
7948+
6359
7017+
6965+
6866
7572

6292+
8006+
6362
7835
6972+
7569+

4586¥
48y

5299
8077

7858
B127

49330
49328
4919%
49178
4920#
6868
4920k

H 15
16=JUN-81
14:39
TABLE =- USER SYMBOLS

30A(1052)

7616

7645

7073+

7078

6925+

PAGE 16-20

SEQ 0189

7766

7781

7792

7799

8022

6930+

6938

69B4r

7022+

7565+

7573

7866+

7915t

6351+

6417+

7566+

7577

7740*

7762+

7775+

779+

7842+

6370
7841
6579

6372
7863
7007

6378
7868
7015

6380
7870

6997+
7988

7000*

7002

7003+

7005+

8154

8205

8227

8257

8264

8275

8472

8507

8620

888

8578

859

PSNNUF

003560

PSNUM

003554

PSRADX
PSTREE
PSTRV
PSTRS
QCOPY =
QRX
=

003556
003546
032642
032652
000013
000004

QTX

= 000010

68674

6876

6896

6901

dscor

8101

15t

8215

8258

8266

8274

8283

8485

B89

8502

003204
003206
000200
000200

4798%
47998
46664
4667%

6232+
7633+
9115
9212

7571«
7667+

7855+«
7852«

7858+
7870%

7861
7871«

7953~

7956

7964+

7982

7985+

RECMOD= 000031

45984

7758
7213+
7230

7510
7238

7243

7557

7763+

7830

7988+«

8405

8407+

6483

6489

6496

6504

QUALFG
QUALVL
RDI
=
RDO
=
REC

= 000000

REPLOG
REPORT
RESFLG
RESTRT
RHLPEN
RHLPTB
RHLPO
RHLP1
RHLP2

030574
027046
007466
0342642
003246
003230
014020
014057
014102

RHLPS
RHLP6
RHLP7
RI_
=
RMDLOP=

014220
014257
014316
000200
000047

RHLP3
RHLPG

014135
014166

RNOTNF= 000007
RPASS

RPBASE

RPEXT
RPHLP
RPLOG
RPSWE
RPSWF
RPSWO
RPT
RPTAA

007500

=
=
=
=
=
=

030336

000002
000001
000003
000004
000005
000006
030642
030712

446920

5182

6308
6217%
4992#
7205
48174
48108
54764
4810
4811

64284
7113
7201+
7221
€298
6296
6222
S477#
5478

4814
4815
4816
46514
4612#

5481
54824
54834
5052
5325

4812
4813

9306

5479
54804

462%

6262

6264

6269

6330

6347

6381

64034

6260
6265
6267

6309

SO08#

46244
46234

46254
46268
46278

46284
5121
64520

6139
6266
6254

6271
64374

7545+

7551

6258
6256

6304
6300

6465

6472

czcLkB8.P1N
RPID(K
RPTDDE
RPTDER
RPTDLE
RPTDSP
RPTDVI
RPTEOP
RPTIV
RPTMSB
RPTTXQ
RPTO
RPT1

031356
031302
031066
031356
010622
031162
031226
014370
031442
031014
030706
030674

RQ]

RTS

= 000040

RSELG
RSEL6

045706
045710

RUN
= 000004
RUNSBM 025437

RXBIT = 000004
RXBUF
004562
RXC
= 000006

RXIDM
RXMTOT
RXM1
RXM2
RXNC
RXONLY
RXON2
RXPTR
RXQ

R10%
R11%
R12$
R125%
R13$
R14$
R15%
R16$
R17%
R30%
SCM
SCMD
SCML

SDVE
SDVI
SECRM
SELO

025461
007370
025561
025604
025541
040572
040572
007332

027272
027300
027316
027462
027334
027350
027370
027412
027430
027460
020047
020102
020G71

020036
020060
020135
012360

SELZ2

012364

SEL4
SEL6

012370
012374

SEOP
020113
SETET = 000060
SETEXP= 000010

DATA COMM,

16-JUN-81

C2CLxBO DMR,DMC-11

LINK TEST

I 15

16=JUN-81
14:39
MACY11 30A(1052)
CROSS REFERENCE TABLE =-- USER SYMBOLS

64994
64924
64674
64984
6458
6474
64844
6359
65154
5115
6444
6447n
9110

PAGE 16-21

SEQ 0190

64604

93104
93114

9040
9041

5051
5160
9249
9296

7761

8474

8493

8152

8333

8033+

8036~

8050

6270

6271

62734

8708+

8717

7280«
9368+
7284+

9229

8725
9379
8707+
8706+
9300

7583
7606

7918
7848

7288+

8514

8520

8527

8075

8126

8153

8240

8331

8724

8746%

8749+

8987

9000

9110~

9115

9120

9160

8745+

8988

9001

9121

9159

9212

9215

9225

9251

8739+

8837
8744%

8891
8758+

8892+
8778+

8975
8781+

8976+
8786+

9299

9304
8838«

8893+

8741+
9305
7913

8788

J 15
CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
MACY11 30A(1052)
16=-JUN-81
14:39
C2CLKB.P1
16=JUN-81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS
SETTRN= 000011
SHFO
015355
SHF 1
015413
SHMSG

SHOW =
SHTAB
SHTEND
SHTYPO
SHTYPT
SHTYP2
SHTYP3
SHTYPL
SHTYPS
SHTYPE6
SHTYP?
SHTYTB
SHWOP
SIZE
=
SMSC
sap
=
SRXQ
STADD
START

STATB =
STATUS=
STXC
STXQ
SvCGBL=

014430

000002
003504
(003513
014464
014473
014500
014505
014512
014520
014525
014533
003464
032340
000012
020124
040000
020025
007402
034036

000001
000016
020014
020003
000000

SVCINS= 000001

4582
55434
55514
54854
45754
48974
(8984
4892

(892
4892
4892

4892
(892
4892
4892
L8924
6481
(5838
56434
4652
S6364
L9584
7203
45154
L5874
56354
56344
L2288
5884
42284
5871
6183
6470

6983
7218
7314
7555
7865

8615

sv(suB= 000001
SVCTAG= 000GO1

SVCTST= 000001
S$LSYM= 010000
S2
S3
S4
TABEX

TAL
=
TALCK
TALMOD=
TCURAD

034100
034150
034216
015163
000005
042670
000035
007360

5208
6803
6841

7851

5167
7815
7818
54864
S487#
54,884
54894
54904
54914
54924
5493
7824
67924
5297

7604
7821

7746

7553
7855

7832
7861

7824

5053
6122
6562
72134
6172
5238
6117
6112
L2374
6048
4234w
5872
6222
6471

7021
7223

7315
7556
7890

8633

9163
9445
42284
42284
7237
42284
62284
73314

9166
9528
42364
42384
7331
42354
44004
73514

7218
7224
7233
SS394

72234
72324
72408
7620

L4978
5017
46024
Lo47h

7945
85594
519N
7529+

7776

7795

PAGE 16-22

SEQ 0191

7835+
6807

7970

4306

4333

4351

5412

5432

4306
5873

4333
5876

4351
5877

5412
5878

5432
5881

7099

6228
6487
13
72264
7331
7559
7961
8719
9219
4400
7351
7489
58514
7390

7140

7169

7342

5849

5853

5850
5882

5851
5885

7360

7399

5857

5870

7436

9071

9085

5854
5886

5855
5888

5875

9405

5858
6072

5880

95284

5859
6180
6463
6841

6236
6495
7199
7232
7351
7567
8005
8728
9223

6241
6502
7202
7233
7372
7575
8018
8991
9292

6297
6515
7203
7237
7374
7579
8352
8995
9372

6359
6530
7204
7240
7390
7601
8366
9005
9388

6405
6564
7205
7241
7410
7611
8375
9022
9405

6414
6568
7206
7258
7426
7620
8441
9037
9419

6434
6570
7207
7259
7447
7640
8461
9073
9436

6452
6610
7209
7299
7463
7654
8465
9087
9437

6457
6803
7210
7311
7508
7750
8534
9114
9438

5851
7390

5855
7426

5859
7463

5873
7567

5878
8441

5882
8565

5886
9073

6072
9087

6228
9388

7131
9445

58554
74264

58594
74634

58734
7567

5878
B44IA

58824
BS5654

S8BoH
90734

60724
90874

62284
938BN

7131w
944SH

7237«

7631~

7802+

7654

8638
8587

8589

7532

7626

7217
7312

7548
7824
8565

9124
9441

K 15
CZCLKBO DMR,DMC=-11 DATA COMM. LINK TEST
MACY11 30A(1052)
16-JUN-81
14:39
16=-JUN-81 14:38
CZCLxkB.P1
CROSS REFERENCE TABLE -~ USER SYMBOLS
TEMP

007426

TEMPY

007430

TEMP?

007432

TEMP3

007434

W74

6187«
6806+
8532+
49724
6801+
9734
6841
8499+
9214w
L9744
8210~

8443

TEMPS

TIMERS

TIMER]
TIMER2
TIMMIN

TI1MOM
TIMSEC
TIMTCK
=
TM
TOINOT

TOIN]
TOIN2

TOORIO

TOOR1
TOOR?Z
TOOR3

007436
007440
007546
007542
007544

007534
025413
007536

007540
001000

044204
044266
044352
044746
045032

045050
044760
TOTCC
007422
= 000001
TRA
TRAMOD= 000034
TRVACT
032762
TRVALN
033554

TRVALP
TRVBIF
TRVBR
TRVBRC
TRVDEC
TRVERR
TRVEX]
TRVNMA
TRVNOB
TRVNUM
TRVOCT
TRVSPA
TRVSTR

033174
033110
033642
TSEL4
045702
TSEL6
045704
L
= 000001
TTLLOP= 000044
TT0TCC
007356

6113»
6188+
6800+

PAGE 16-23

6118+
6189
6841

6123
6567+
7823+

6131+
6612+

6136+
6613
7876+

6614
7880

6117«

6122+
6813«
6192
8229+
8583+

6135+

6144

6810+

6138+

8218+

8574+

9377«
5871
8230~

8445

9019+
5871
8494
9258
6821+«
6070+
6062+
6065+
6191

7875+

6414
8249+
8628+

5876
8236
8476+
9034+
5876
8725+
9261
6841
8980+
7503«

SEQ 0192

6653

6157+
6660
8247+

6170

7883

6153
6654+
8246+

679

8251

6186
6803
8526+

6148~

6152+

6156+

6183

6409+

6414

6658+
8268+
8586+

6662
8337+«

6802+
8402+
9018+

6803
8474+
9033+

6814+
8481+
9119

6817+
8495+

9158+

6193
8269+
8512+

6408+
8339+
8575+

6414
8349
8584+

6797+
8403+
8619+

6800+
8441
8629+

6803
8442
8724+

6145

6149+

8999+

9251+
6167+
9035
9273

9378+
6194
9121+
9276

9111»

9159+
9281

9216+
9284

8355+

8360+
9229+
9287

8361
9232
9379+

9112

9154»

9155

9371+

9375

7638

7666

8346+

7243+

6055
6053«

6058+
6068

9009

9013

8771

8777

6605

6611«

6924

7244
7245~

8890

8974

91534

9164

9369

6613

6615+

7515«

7608+

7609

7630

7637+

6929

6934

6937

6957

7018

7036

7057

7081

6935

6940

6959

7023

7038

7059

7085

6958

7019

7037

7058

9299+

93084
93094

7516+

7608

7613

7630+

9300+
8747

7798+

L 15

16-JUN-81
14:39
MACY11 30A(1052)
CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
16-JUN-81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS
CZCLKB.P11

003562
= 000002
TXMTOT
007354
TXNC
025521
TXBUF
IXC

TXONLY

TXONZ2

649294

(5334
L9654
57924
5013
80994

49364

TXPTR

TM@Q
=
T$ARGC=

6731

7529

7801

8494

7535+«

7615+

7617

7632

7793

7797«

8016

8100

8124

8150

6747
8125

6756%
8151

6758

7519«

7533

7616+

7624*

7625

7629+

7799+

58584
63594
65304

58714
64054
65644

58724

58764
6434M
65704

58774
64524
66104

64574
68034

58814

61804
64704
6983#

85344

86154
85654
84654

78654

61834
64714
70214
78904

62224
64874

77504

58854
64634
68414
7824M

94364
89914

94374
90054

94384
90224

94414
90374

91244

91634

92154

85654

94374
755

94384
76014

94414
92234

85654

94374

94384

94414

8441
5855
9073

94374
5878

94384
5882

94414
5886

6072

7131

7331

7351

44004
58844
73904
95294

58534
60724
76364

70994
74634

58554

58574
71314
74854

58734

90714

90734

90854

58754
73314

9087#

58704
7146
94054

71694
9445

5873

58754
7331

5878
73424

58804
7351

75794

84414
83754

T$CODE=
TSERRN=

84414
73744
75674
84414

TSEXCP=
T$FLAG=
TSGMAN=
TSHILI=
TSLAST=
TSLOL I=
TSLSYM=
TSL TNO= 000001
TENEST= 177777

TSNSO
TNST

000000
000004

TINS2 = 000010
TSPTNU= 000000
TSSAVL= 177777
T$SEGL= 177777
TSSUBN= 000000
TSTAGL= 177777
TSTAGN= 010024
TSTEMP= 000C00

tiTEST= 000001

T$TSTM= 177777

SEQ 0193

PAGE 16-24

76114

76404

74104
84414

9445

5855

5851
60484
7426
9087

70994
7463

74854

58574

58704
90714

5855
6180

5858
6183

6841
7240
7426
7654
8465
9124

6983
7241

58594
73314
90734

58734
73514
90874

7463
7750

58574
7131
74854

76544

5859

71404

9388

58594

71404

58704

71464

71694

72404
79614

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKkB.P11

16-JUN-81 14:38

1$7STS=
T$SAU =
T$$AUT=
T$SCLE=
T$$0U =
T$SHAR=
T$SHW =
T$$INI=
TSSMSG=

000001
010017
010014
010015
010016
010023
010000
010013
010007

42284
76360
7362%
73604
73994
94054
43514
71694
ggggfi

T$$PRO=
T$SRPT=
T$$SRV=
T$$TES=
T
UAM
=

010012
010011
010022
010020
034710 G
000200 G

716404
70994

UPTABL
UPTAT
UPTA3

041132
041220
041216

UNKM

UPTA4
UPTEX
VECTOR
X$

020273

041156
041270
046211

= 000215

60484
74894
4333
44784
5097

82324
8238
8242

000000
000040
000400
000020
046356
046442

7131
6072
7559
74894

90714
7601

9073
9223

90854
9388

9087

56634

8526

42284
42284
42284
42284
95184
Q224N
1544

52264
53234
62678

5873

58754

5878

58804

5882

58844

51574

S51584#

51594

51604

51614

51624

S261M
5278¢

5262
52794

5265
52804

52684
S2814

S2694
52824

51524

51534

51544

51554

51564

52404
52724

52414
5273

52564
5274

52574
52754

5258
52764

S259M
52774

51654
51814
51974
52164

5288
53054

51664
51824
51984
52174

51684
51844
52004
52198

53314
€264

53364
62654

62534
62668

62544
6267M

L736M
51584

L7428
51624

4774
51694

4781
51764

47954
S1784

52404
S4324
64244

52894
53084

51674
51834
51994
52184

52914
53204
6255
62684

52384
54124
62694

SEQ 0194

58704

51514

52874
53044

PAGE 16-25

7390
7426

5859

51644
51804
51964
52154

14:39

7463

58574

S1634
51794
51924
521644

52864
53034
53304
62634

CROSS REFERENCE TABLE -- USER SYMBOLS

7331
5855

8233
8244
9437

42524

M5
16=-JUN-81

7315
58534

82454
8244
82374
82544
94644

52394
52714

X$ALWA=
X$FALS=
X$OFFS=
X$TRUE=
$PATCH
=

74894
7447
7351
7374
7410
9445
4400
7241
ggg;

MACY11 30A(1052)

52564
5520M
7241

S1694
51854
52054
5222

51704
51864
52064
52234
52954
53224

52904
53194

52924
S3214
6256
62694

6257
62704

LBIAK
S184M

L9294
S186H

5258
5612#
7315

5268
5624#
7374

52704
56254
7410

52724
56264
7447

51714
51874
52074
5224M
S2964
53234

51754
51884
52084
52254

51764
51894
52094
52264

51774
51904
52124
52274

S178#
S191#
S213#
5238«

52704
5283«

6258
6271k

S297&
53244

6259
62724

52984
53254
62604
62734

52994
S3264

62614
62744

S300#
S32O#
62624

L9304
51974

L9314
S1994

49324
S2064

S0394
S2084

50404
52244

S2744
S796#
7559

S2764
5888
7601

52824
62568
9223

5297a
62584
94704

52994
62624
95194

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P11

BCOMPL

16-JUN-81 14:38

154

42284

7203

7210

7556

5849

5853

5857

5870

5875

5880

5884

5151
5166
5184
5206
5225

5152
5167
5185
5207
5226

5153
5168
5186
5208
5227

5154
5169
5187
5209
5238

5155
5170
5188
5212
5239

5156
5171
5189
5213
5240

5157
5175
5190
5214
5241

5158
5176
51N
5215
5256

L228%
L2284
L2284
42284
4228#
4228
42284
42284
42284
42284
42284
42284
4228
42284
4228¢
42284
L228¢
L228F
4228x
L228%¢

7217

7223

194
234
314
394
L7n
SSA
6or

42284
L2284
L2284
42284
L2284
4228%
L2284

7436
7342
7360
7399
9405
4351

BGNMSG

984

42284

642564
5165
5183
5205
5224

2864
2928
2964
3014
3228
3174
3610
3464
3604
3764
3804
3854
3894
40N
W13
W50
GaTh
4538
465K
4754

CLOCK
CLOSE
CLRVEC
COMMEN
DELAY
DESCRI
DEVTYP
DISPAT
DISPLA
DOCLN
DODU
DORPT
ENDAU
ENDAUT
ENDCLN
ENDCOM
ENDDU
ENDHRD
ENDHW
ENDINI

16-JUN-81

CROSS REFERENCE TABLE == MACRO NAMES

7205

BERROR
BGNAU
BGNAUT
BGNCLN
BGNOU
BGNHRD
BGNHW

CLI

MACY11 30A(1052)

N 15

5432
5412
4333
7199

7463
7351
7390
7426
9445
4400
7331

14:39

PAGE 17

5159
5177
5192
5216
5257

5160
5178
5196
5217
5258

SEQ 0195

5161
5179
5197
5218
5259

5162
5180
5198
5219
5261

5163
5181
5199
5222
5262

5164
5182
5200
5223
5265

CZCLxB() DMR,DMC~11 DATA COMM.
16=JUN-81 14:38
CZCLkB.P11

ENDSRY
ENDSUB
ENDSW
ENDTST
EQUALS
ERRDF

(B78
SO0#
S12#
520#
€28
S41»
5554
S684
5804
So6c#
614m
624M
642N
7144

ERROR
ERRSF
ERRSOF
ERRTBL
ESCAPE
EXIT

7224
7264
730#
7344
7448
7714

ENDMOD
ENDMSG

ENDPRO
ENDPTA
ENDRPY
ENDSEG
FNDSETY
ENDSFT

ERRMHRD

FEQUAL

GETBYT

718#

8104

8344

GMANID

8484

GMANIL
GPHARD
GPRMA
GPRMD
GPRML
HEADER
INLOOP
I0SETU
IOSTAR
KT11

LASTAD

MANUAL
MEMORY
MSBYTE
MSCHEC
MSCNTO
MSCOUN

MSDATA
MSDECR

MSDEFA
MSENDE

MSERR]
MSESCA
MSESCS

8 16
16-JUN-81
MACY11 30A(1052)
14:39
CROSS REFERENCE TABLE == MACRO NAMES

PAGE 17-1

5873

5878

5802

5886

8375

8728

8991

9005

9022

9037

7241

7315

7374

7410

746447

7559

7601

7237

7567

8441

8565

9437
72374

75674

8441H

85654

9438

9441

5855

5859

9073

9087

8352

8366

9223
5888

SEQ 0196

9388

4478

8465
9126

9163

94414
61804
64874
75484

9219

9292

62224
65024

8534

61834
64954
75754
8615#

8244

GETPR]

GE TWOR
GMANIA

LINK TEST

829#
8394
859#
868#
874N
9034
934La
9S4Ln
9624
9664
974n
9824

1147#

116c#
11664
2000#
2118#
2182#

62414
65304
76204

1867#
2029#
73904
21704
20744
74264
16494
20064
20104

73740
84414
58714
64344
68034
78654

7554
94364
58774
64634
70214

76014
94374
58814
64704
72404

80184

94384
58854
64714
75084
84614

58594

58824

58864

60724

71314

71464

73314

7351#

84414

94364
58824

94374
58364

94384
60724

9%4 14
71314

73314

73514

7390#

90054

90224

90374

91244

91634

92154

92924

58594

94454
84654

80054

86334

62364
65154
76118

C 16
16=JUN-81
14:39
MACY11 30A(1052)
C2CLkBO DMR,DMC-11 DATA COMM. LINK TEST
16=JUN-81 14:38
C2CLxkB.P11
CROSS REFERENCE TABLE == MACRO NAMES
MSEXCP
MSEXIT
MSEXSE
MSEXT)
MSGEN

MSGENB
MSGETS
MSGETT
MSGNGB
MSGNIN

MSGNLS
MSGNSI)
MSGNTA
MEGNTE

MSHAPT
MSHNAP
MSINCR

72374
72614
72414

21014
20144
20224
20184
2038+
58734
73314
90854
19384
20354
73904
18774
19024
60484
20494
5873«
62414
65304
72064
72994
75484
78904
87284
93724
19134
18984

75674
73154
73154
73154

L3514

58824

73904

945N

75674
58554
90874

17394
18244
20264
58724
62224

87284
93724

MSIOSE
MSLDRO
MSMASK
MSMCHI
MSMCLO
MSMSK1

17004
19424
16714
4
16244
16774

MSPRIN

73904
16364

M$PUT

1881#

62414
65304
76204
16314
73424
19724

746364

94374
75594
75594
75594
58494
60724
74634

58784

58824

60724

75594

92234
58574

94364
764470
76474
7464470

S4324
60484

95294
74470

18904
74264
18944

71694
73124
75084
78904

MSPUSH

73740
73740
44004
58844
73994
95284

85654
76104

54324
74364
58504
58864
64574
69834

64954

mM$POP

84414
73744

94054
72024

58514
90734
58544
64054
65704
77504
43514
74364
58544

SEQ 0197

PAGE 17-2

94384
76014

9441

62284
74894

70994
75674

58594
71694

90714

58704
7237#
9073#

73314

73514

58704

58714
6183#
64874

76014
76014
58514

58494
90714
58514
5888+
64634

58534

70214
72324
7374

72244
73724
76014
84414
90874
94414

84614
91144
94454

58784

58824

76114

58554
58844
64524
68414

58514
58804
64054
65704
72174
73604
75794
83754
90714

58544
58824
64340
68034
72324
73740
76114
84614
91144

84654
91244

72174

72584

73144

58734

58824

S8774
64634

6710
71314
72994
76634
78244
o
92234

87154
92924

T46n

73314

7351#

220
65024
75794
86334
71404

62364
65154

62224

62364

72374
73904
76204

58554
90874
58584
64 14N
66104
78244
58494

78904
58574

80054
58754

61834
954
S754
86154
70994

58584

58724

58774

61834

74894

70214

71400

73114
7489

7611\»#

7169

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

MSPUT

M$RAD]
M$RBRO
MSRNRO
M$SETS
MS$STAR
M$SvC

16~JUN-81

62974
65644
75794
86334

14:38

30A(1052)

6434M
68034

64524
68414
77504

64574
69834

64634

58764

58774
64634

CROSS REFERENCE TABLE == MACRO NAMES

63594
65684

64054
65704

64144
66104
76404

58504

58544
64054
65704
76204

58584
614N
66104
76404

58724
64524
68414
77504

72374

75674

72234
43514

72584
58494
7484

7611a

76204

746364

D 16
15-JUN-81

MACY11

58544

76544

78244

14:39

70214
78654

PAGE 17-3

64704
72404
78904

70214
78654

58814
64704
72404
78904

85654

94364

9374

58574
9085#

58754

SEQ 0198

64954

64714
72994

64874

79614

80054

73124
80184

5885#

129N
79614

61804
64874
73114
80054

61834
64954
73124
8018#

94384

941

64714

58584
62224
64954

73114

S877#4

V) VIV

] PNIOPNVA)
= —d wad

O NN
= O O
o~ QOO ~NON00O

O NN = O~

O NS =00 NN

6263
OPEN
POINTE
PRINTB

5885

62224
65024

62364
65154

84614

8534#

75084

75484

S8g81#»

87284

MSXFER

85344

58774
64054
65704

86154

NODCL

84614

71694

9292
58774
Gh14n
66104
72404
75084

MSTSTL

6515#

75084

70994

72374
76264
77504

M$TLAB

65024

68034
72414

E 16

16=-JUN-81
164:39
MACY11 30A(1052)
CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16-JUN-B81 14:38
CROSS REFERENCE TABLE == MACRO NAMES
czcLxk8.P1
PRINTF

PRINTS
PRINTX
READBU
READEF
RFLAGS

1279#

6983
7961
1319#
13594
13994
14034
14084

6241

6297

6359

6564
7750

7824

6570
7865

6452

8633
6470

6414
7654

6610

8615
6463

6405
7640

6568

8018
6434

7620

6471

6487

6495

6502

6515

6530

6803

6841

7232
7202

7204

7209

7314
7299

7372
7311

4228
58884

72614

74104

74478

7559#

76014

8005
42284

4228%
4228
42080
42284
4208%¢
4208%
42284

14134
14184
16244
16384
164524

16124
16164
16204

42078
40284
42284
42284

. ABS.

046442

000

ERRORS DETECTED:

6236

6180

SETPRI
SETVEC
SLASH
STARS
sv(C
XFER
XFERF
XFERT

6183

4228%
7021

42284

7240

7575

7508
8461

73154

73748

CZCLKB/1,CZCLKB. SEQ/CRF/DOC=SVC34R.MLB,CZCLKB.P11
RUN-TIME: 24 30 3 SECONDS
RUN-TIME RATIO: 68/59=1.1
(41 PAGES)
CORE USED:
2 1K

DOCUMENT PAGES:

199

SEQ 0199

PAGE 17-4

7579

7611

7890