Digital PDFs

AH-F593B-MC

October 1981

200 pages

Original

98MB

view download

OCR Version

143MB

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_gray.pdf

OCR Text

DMR/C11 DCLT
SR

AH-F593B-MC
R oF 1

COMM. LINK TEST

MACY11 30A(1052) 12*)00-.1 14:39 PAGE 2

2CLxBO DMR,DMC~11 DATA
16=JUN-81 14:38
CZ0LkB.P11

LTITLE

3208

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

.REM ¢

IDENTIFICATION

PRODUCT CODE:

AC=F5918-MC

PRODUCT NAME:

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

PRODUCT DATE:

26-0CT-81

MAINTAINER:

MERRIMACK DIAGNOSTIC ENGINEERING

AUTHOR :

BRUCE LUMRS = BRUCE RIBOLINI

THE

INFORMATION IN THIS DOCUMENT

SUBJECT

CHANGE WITHOUT

NOTICE
AND
SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.
NO RESPONSIBILITY IS ASSUMED
FOR
SOF TWARE ON EQUIPMENT THAT IS NOT
AFFILIATED COMPANIES.

THE
USE
SLPPLXED

OR
8Y

RELIABILITY OF
DIGITAL
OR ITS

THE FOLLOWING ARE

DIGITAL
DEC

TRADEMARKS OF

PDP

DECUS

DIGITAL EQUIPMENT CORPORATION:

UNIBUS

DECTAPE

MASSBUS

SEQ 0001

CZCL KBO DMR.DMC-11 DATA COMM. LINK TEST
C(Z2CLkB.P11
6=JUN-81 14:38

'
MACY11 30A(1052)

£ 9
16=JUN-81

14:39

PAGE 3

REVISION HISTORY:

REV

DATE

AUTHOR

REASON

23-APR-80

BRUCE LUHRS

ORIGINAL ISSUE, DCLT FOR THE

15-JuL-81

ERNIE COOPER

ADD
ADD
ADD
ADD

BRUCE RIBOLINI

DMC OR DMR-11

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

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

MACY11 30A(1052)

0 1
16=JUN-81

TABLE OF CONTENTS

GENERAL INFORMATION

PROGRAM ABSTRACT

SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS
DIAGNOSTIC HIERARCHY PREREQUISITES
ASSUMPTIONS = RESTRICTIONS

WVIi&
N =

OPERATING INSTRUCTIONS
COMMANDS

SWITCHES

FLAGS
HARDWARE QUESTIONS

DATA COMM. LINK TEST COMMANDS
1

MESSAGE COMMANDS

DEFAULTS

2
3
5
6

2.6

3.0

STATISTICAL COMMANDS
RUN COMMANDS

PRINT COMMANDS
MISC COMMANDS

QUICK STARTUP PROCEDURE

ERROR INFORMATION

.21
3. 2

TYPES OF ERROR MESSAGES
SPECIFIC ERROR MESSAGES

3.2 .1
3 2.2
3
.3

COMMAND LINE INTERPRETER ERRORS

DCLT ERRORS
DEVICE ERRORS

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

.3.1
.3.2
.3.3
5.0

PRINTING ERROR COUNTER LOCATIONS
PRINTING ENTIRE BASE TABLE
PRINTING SINGLE LOCATION

DEVICE INFORMATION TABLES

14:39

PAGE 4

1
CZCLKBO DMR,DMC-11
DATA COMM. LINK TEST
6~
CZCLKB.P11
J UN-B1 14:38

6.0

g
16=JUN-81

14:39

MODE AND MESSAGE DESCRIPTIONS

W) —
CONONWN

i
b
b
b
o

o Yo Yo o

MODE DESCRIPTIONS

Yo Yo Yo o

6.1

MACY11 30A(1052)

7 .0

TRANSMIT MODE
RECEIVE MODE

PASSIVE MODE
ACTIVE MODE
DOWN-LINE LOAD MODE
TALK MODE

LISTEN MODE

MAINTENANCE MODE

MESSAGE DESCRIPTIONS
OTHER INFORMATION

INTERFACING TO AN '"ITEP'* NODE

7.
7.

TROUBLESHOOTING HINTS

2
13.
5

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
1

MESSAGES COMMANDS

PRINT COMMANDS

2
.3
5

7.4

STATISTICAL COMMANDS
RUN COMMANDS
EXIT COMMAND

THINGS TO WATCH OUT FOR

PAGE 5

SEQ 0004

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

MACY11 30A(1052)

1.0

GENERAL INFORMATION

1.1

PROGRAM ABSTRACT

16=JUN-81

14:39

PAGE 6

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 EQUIPMENT, THE
COMMUNICATION LINK, OR THE MODEM.
THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC

RUNTIME SERVICES SOF TWARE (SUPERVISOR).
THESE SERVICES PROVIDE
THE INTERFACE TO THE OPERATOR AND TO THE SOF TWARE ENVIRONMENT.
THIS PROGRAM CAN BE USED WITH XXDP+, ACT, APT, SLIDE AND PAPER

TAPE.
FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER
TO THE XXDP+ USER'S MANUAL (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 DCLT PROGRAM, THE FOLLOWING

MINIMUM HARDWARE IS REQUIRED:

A PDP-11 CPU
MINIMUM OF 24K WORDS OF MEMORY
A WORKING, LINE OR REAL-TIME CLOCK
A CONSOLE TERMINAL
ANY <XDP+ SUPPORTED LOAD MEDIA

ONE OF THESE DMR-11 OR DMC-11 CONFIGURATIONS:
DMC11-AL = LOCAL MICROPROCESSOR
DMC11-AR = REMOTE MICROPROCESSOR
DMC11-DA - E.I.A. LINE UNIT
DMC11-FA = CCITT V.35 LINE UNIT
DMC11-MA - 1M BPS LINE UNIT
DMC11-MD = 56K BPS LINE UNIT

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

=
-

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

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

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
(ZCLkB.P11
16=-JUN-81 14:38

MACY11 30A(1052)

6 1
16=JUN-81

14:39

PAGE 6-1

SEQ 0006

THE MANUAL = ''C'" IS THE CURRENT REV.).
1.4

DIAGNOSTIC HIERARCY PREREQUISITES

THE GOAL OF THE DATA COMM. LINK TEST PROGRAM IS TO TEST THE

COMMUNICATION LINK AND THEREFORE ASSUMES THAT THE CPU'S,

&gfixéés% DMR OR DMC=11'S AT EACH END OF THE LINK HAVE ALREADY

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

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

TEST THE DMR OR DMC-11, BUT TO TEST THE COMMUNICATION LINK TO

WHICH THEY ARE CONNECTED.

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

DMR:

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

CZDMAXX M8207 STATIC DIAG #2

CZDMRXX M8203 STATIC DIAG #1
CZDMSXX M8203 STATIC DIAG #2

DMC:

CZDMCXX BSC W/R MICRO-PROC TST

CZDMEXX DDCMP MDLN UNIT TST
CZDMGXX DMC=11 CROM + JMUP TEST
MD=11-DZDMHXX 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.
iF YOU ARE SCOPING DATA.

BECAUSE OF THIS PLEASE BEWARE

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

CZCLkB.P11

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

START
RESTART
CONT INUE
PROCEED
EXIT
ADD

START THE "IAGNOSTIC FROM AN INITIAL STATE
START THE oIAGNOSTIC WITHOUT INITIALIZING
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER *C)
CONTINUE FROM AN ERROR HALT
RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!)
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE

DROP
PRINT
DISPLAY

DEACTIVATE A UNIT
PRINT STATISTICAL INFORMATION (IF IMPLEMENTED
BY THE DIAGNOSTIC - SECTION 4.0)
TYPE A LIST OF ALL DEVICE INFORMATION

ZFLAGS

CLEAR ALL FLAGS (SEE SECTION 2.3)

FLAGS

CONSIDERED TO BE ACTIVE AT START TIME

TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3)

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

2.2

SWITCHES

THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION.
THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS.
ALL OF THE LEGAL
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH.

IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY ‘DDDDD''.
SWITCH

EFFECT

/TESTS:LIST

EXECUTE ONLY THOSE TESTS SPECIFIED IN
THE LIST.
LIST IS A STRING OF TEST

/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 (DDDDD = 1 TO 64000)
SET SPECIFIED FLAGS.

FLAGS ARE DESCRIBED

IN SECTION 2.3.
REPORT END OF 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
CZCLKB.P11
16=-JUN-81 14:38

EN
16=JUN-81

MACY11 30A(1052)

14:39

PAGE 7-1

EXAMPLE OF SWITCH USAGE:

START/TESTS:1-5/PASS:1000/E0P:
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 ONLY.
A
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS.
YOU MAY,
FOR EXAMPLE, TYPE '/TES:1-5"" INSTEAD OF '‘/TESTS:1=5"".
BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH
COMMAND.

START

RESTART

CONT INUE

TESTS

PASS

FLAGS

EOP

UNITS

X
X

PROCEED

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

THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR

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

EFFECT

HOE

HALT ON ERROR = CONTROL IS RETURNED TO

LOE

LOOP ON ERROR

IER*

IBE*
IXE*

PRI
PNT
BOE
UAM
ISR

RUNTIME SERVICES COMMAND MODE
INHIBIT ALL ERROR REPORTS

INHIBIT ALL ERROR REPORTS EXCEPT

FIRST LEVEL

(FIRST LEVEL CONTAINS

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

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

APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT

SEQ 0008

C2CLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

MACY11 30A(1052)

16=JUN-81 14:38

J 1
16-JUN-81

14:39

PAGE 7-2

STATISTICAL REPORTING)
INHIBIT PROGRAM DROPPING OF UNITS

IDR
ADR
LoT
EVL

EXECUTE AUTODROP CODE

LOOP ON TEST
EXECUTE EVALUATION (ON DIAGNOSTICS WHICH
HAVE EVALUATION SUPPORT)

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

INHIBIT ERROR REPORTS

AND TYPE A "BELL'' ON ERROR, YOU MAY USE THE FOLLOWING STRING:
/FLAGS
:LOE : IER:BOE

2.4

HARDWARE QUESTIONS

WHEN A DIAGNOSTIC IS STARTED,

THE RUNTIME SERVICES WILL PROMPT

THE USER FOR HARDWARE INFORMATION BY TYPING '‘CHANGE HW (L) ?*'
YOU MUST ANSWER '*'' AFTER A START COMMAND UNLESS THE HARDWARE

INFORMATION HAS BEEN 'PRELOADED'' USING THE SETUP UTILITY (SEE

CHAPTER 6 OF THE XXDP+ USER'S MANUAL).
WHEN YOU ANSWER THIS
QUESTION WITH A "Y'', THE RUNTIME SERVICES WILL ASK FOR THE NUMBER
OF UNITS (IN DECIMAL).
THE DMR/DMC-11 DATA COMM. LINK TEST PROGRAM WILL NOT USE MORE THAN
%Ll{.dé‘f.
FOR THE DMC/DMR-11, THE HARDWARE INFORMATION REQUESTED
# UNITS

UNIT O

(D)

? 1<CR>

FULL DUPLEX OPERATION :

(L)

Y ?

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

(0)

0 ?

—

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
C2CLkB.P11
UN-81 14:38

2.5

MACY11 30A(1052)

K 1
16=JUN-81

14:39

PAGE 8

DATA COMM. LINK TEST COMMANDS

THE 'DCLT>'" COMMAND LEVEL FOLLOWS THE ANSWERING OF THE HARDWARE P-TABLE
?lsfg;ig#gé
THESE COMMANDS CAN BE TYPED WHEN THE 'DCLT> (A) ?'' PROMPT

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

THE COMMAND LINE IS INTERPRETED FROM LEFT TO RIGHT.
THEREFORE,
IF A QUALIFIER ON THE COMMAND LINE IS RELATED OR EFFECTS A QUALIFIER
TO THE LEFT ON THE COMMAND LINE, THE QUALIFIER FARTHEREST TO THE RIGHT
TAKES PRECEDENCE SINCE

IS INTERPRETED LAST.

(I.E.

/CHECK.....

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

PARAMETERS WORD.)

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

2.5.1 MESSAGE COMMANDS

COMMAND

DESCRIPTION

CLEAR

EXPECTLIST

CLEAR

TRANSMITLIST

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

ZEROES TRANSMITLIST (000°'S)
AND THEN PUTS DEFAULT ITEP MSG

IN SO NOT REALLY EMPTY

SET

EXPECTMSG=TYPE/QUAL
WHERE:

‘‘TYPE'' IS:
=ONES
=ZERQES

DEFINE A MESSAGE TO BE PUT ON
THE EXPECTED LIST

=1ALT
=0ALT

=I1TEP
=CCITT

=ALPHA

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

WHERE

THE OPTIONAL 'QUAL'* IS:

SEQ 0010

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

MACY11 30A(1052)

16=JUN-81 14:38

/SIZE=NNN

L 1
16=JUN-81

14:39

PAGE 8-1

MAKE THE MESSAGE 'NNN'' BYTES
LONG. (DEFAULT VALUE IS
SIZE OF MESSAGE SPEC'D BY
OPERATOR OR DEFAULTS.)
COPY THIS MESSAGE INTO THE
BUFFER 'NN'' TIMES (DEFAULT
IS 0 = PUT THE MESSAGE IN
ONLY ONCE)

/COPY=NN

NOTE: SET'S ADD MESSAGES TO THE LIST IN THE ORDER THEY'RE
DEFINED. ‘NNN'" IS A DECIMAL NUMBER.
THE FIRST SET
OVERWRITES THE DEFAULT ITEP MESSAGE PLACED THERE BY
INITIALIZATION OR A “'CLEAR'" COMMAND.
SEE SECTION 6.2 FOR A DESCRIPTION OF THE PRE-DEF INED
(ZEROS,ONES ...)

MESSAGES THAT ARE AVAILABLE.
SET

EXPECTLIST=TRANSMITLIST

MAKES A COPY OF THE TRANSMIT

SET

TRANSHMI TMSG=TYPE/QUAL

DEFINE A MESSAGE TO BE PUT ON

SHOW

EXPECTLIST

LISTS THE MESSAGE SIZE AND TYPE

LIST IN THE EXPECT LIST.

THE TRANSMIT LIST
(SEE DESCRIPT FOR SET EXP)

FOR THE MESSAGES IN THE

EXPECT LIST
SHOW

TRANSMITLIST

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

2.5.2 STATISTICAL COMMANDS
DESCRIPTION -

COMMAND

TAKES THE OPERATOR TO THE
REPORT LEVEL. FROM HERE
YOU CAN EXAMINE THE EVENT

LOG OR BASE TABLE.

SSSSSS~EEEEEE/B

WHERE ''/B'*' 1S OPTIONAL
:

DEFAULT IS PRINT WORDS
''/B'" CAUSES PRINT BYTES

PRINTS THE CONTENTS OF THE

MEMORY LOCATIONS BETWEEN

OCTAL ADDRESSES '‘'SSSSSS'‘' AND
‘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
CZCLkB.P11
16=JUN-81 14:38

MACY11 30A(1052)

L
16-JUN-81

14:39

PAGE 8-2

2.5.3 RUN COMMAND

COMMAND

DESCRIPTION

RUN MODE=MTYPE/QUAL

STARTS DCLT EXECUTING IN THE
MODE SPECIFIED

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

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

(FORCES /NOECHO ,NO LOOPING)

=PASSIVE
=RECEIVE

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

=TRANSMIT
=TALK

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

=LISTEN

=DOWNL INELOAD

(FORCES /NOECHO ,NO LOOPING, /NOCHECK)

(FORCES /NOECHO ,NO LOOPING, /NOCHECK,

(FORCING NO LOOPING MEANS IT MUST BE

SPECIFIED AS A QUALIFIER ANY TIME ITS
DESIRED, THERE IS NO DEFAULT)

AND OPTIONAL “QUAL'' IS ANY COMBINATION OF THE FOLLOWING:

/CHE CK/NOCHE CK

ENABLES/DISABLES CHECKING OF RECEIVED
DATA AGAINST THE EXPECTED DATA

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.

/STATUS/NOSTATUS

ENABLES/DISABLES PRINTING OF PROGRAM
STATUS MESSAGES TO THE OPERATOR

/ECHO/NOE CHO

ENABLES/DISABLES THE RETRANSMISSION OF

/MODEM/NOMODEM

ENABLES/DISABLES THE REPORTING OF MODEM STATUS

THE DATA RECEIVED IN PASSIVE MODE.
(IGNORED IN MODES OTHER THAN PASSIVE)

NOTE:

INTERRUPT CHANGES.
THIS SWITCH CAUSES NO ACTION IN THIS DCLT

PROGRAM BUT IT IS INCLUDED BECAUSE IT IS USED

IN OTHER DCLT PROGRAMS.

/LOOP=LTYPE
'

SPECIFIES WHICH, IF ANY, TYPE OF

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

SEQ 0012

e AT
T

C%E'wasg1t1>nn.w-11 DATA COMM. LINK TEST

MACY11 30A(1052)

16-JUN-81 14:38

N 1
16-JUN-81

14:39

SEQ 0013

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) . ALSO CALLED

DIGITAL~LOOPBACK.
/PASS=NN

SPECIFIES NUMBER OF ITERATIONS TO MAKE BEFORE
END-OF-PASS.
DEFAULT VALUE OF 1
WILL BE USED ON ANY RUN THAT A /PASS=N

IS NOT ADDED TO THE 'RUN ..."" COMMAND.
IF A '*<1"" IS TYPED, THEN THE PROGRAM

RUN UNTIL A “C IS TYPED.
NOTE:

amene

2.5.4

SEE SEC ION 6.1 ron A DESCRIPTION
OF
"RUN MOD
*LOOP MODES"*

DEFAU.TS

IF NO "'SET'S'" THEN THE DEFAULT IS SAME AS IF TYPED:
SET TRANSMITMSG=ITEP/S1Z2E=58/COPY=0
SET EXPECTMSG=ITEP/S1ZE=58/C0PY=0
THE DEFAULT COPY AND SIZE FOR EACH OF

ONES - /SIZE=64/COPY=0
ZERCES = /SI1Z2E=64/C0PY=0
OALT - /SIZE=64/C0PY=0
1ALT - /S1ZE=64/COPY=0
CCITT - /SI1ZE=64/COPY=0
ALPHA - /SIZE=65/C0PY=0

THE MESSAGE TYPES:

ITEP - /S1ZE=58/COPY=0

OPER. SPEC'D = /SIZE=LENGTH-OF-TEXT-TYPED-BE TWEEN-QUOTES/COPY=0
FOR THE RUN COMMAND THE DEFAULTS ARE:

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

IF _THE DCLT PROGRAM IS RUN IN UNATTENDED MODE (UAM FLAG=1 OR CHAINED),
THE DEFAULTS ARE AS IF

SET TRANS=ITEP

SET EXPECT=ITEP

THESE SETUP AND RUN COMMANDS WERE TYPED:

RUN KJDE=ACTIVE/LOOP-INTERML/NSTAT/CHECK/PASS 1

MACY11 30A(1052) 12-.)00-.1 14:39 PAGE 8-4

C2CL KBO DMR,DMC-11 DATA COMM. LINK TEST
16=JUN-81 14:38
C2CLxB.P1

OTHER NOTES:

*C
<CR>

"RUBOUT"’
2.5.5

ALWAYS RETURNS YOU TO ‘'DR>' (T'i SUPERVISOR)
IS SEEN AS A COMMAND TERMINATOR

DELETE LAST CHAR. TYPED IN COMMAND STRING

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

COMMAND

DESCRIPTION

HELP OR ?

" " PRINT HELP INFORMATION FOR RPT>

LOG

PRINTS THE DCLT EVENT LOG.

BASE/FULL

PRINTS ENTIRE BASE TABLE.

BASE/ERROR

PRINTS ONLY ERROR COUNTERS IN

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

2.5.6 AISC COMMANDS
COMMAND

CEXIT
HELP OR ?

DESCRIPTION
FROM THE DCLT> LEVEL RETURNS YOU
TO DR>.
PRINTS HELP INFORMATION.

SEQ 0014

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

MACY11 30A(1052)

2.6 QUICK START=UP PROCEDURE

¢ 2
16=JUN-81

14:39

PAGE 9

(XXDP+)

TO START=UP THIS PROGRAM:
1. BOOT XXDP+

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

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

4. TYPE "'START"'

5. ANSWER THE '‘CHANGE HW'' QUESTION WITH "Y'’
6. ANSWER ALL THE HARDWARE QUESTIONS.
THE NUMBER OF UNITS
THAT CAN DCLT CAN USE IS ALWAYS '1'°,
WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE

DEFAULTS FOR FLAGS.

THESE DEFAULTS ARE DESCRIBED IN SECTION 2.3.

7. AFTER THE 'DCLT> (A)

"RUN MOD=ACTIVE<CR>''

?'' PROMPT, 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.P11

16=JUN-81

4£:38

MACYT1 30A(1052)

0D 2
16=JUN-B1

14:39

PAGE 10

3.0 ERROR INFORMATION
3.1 TYPES OF ERROR MESSAGES
THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY * ISSLED 8y
A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED.
GENERAL
E %SSAGES

ARE ALWAYS PRINTED UNLESS THE ''IER'’ FLAG IS SET (SECTIM
THE GENERAL ERROR MESSAGE IS OF THE FORM:
NAME
TYPE NUMBER
ERROR MESSAGE

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 MESSAGES THAT CONTAIN SOME ADDITIONAL
INFORMATION ABOUT THE ERROR.
THESE ARE ALWAYS PRINTED UNLESS
THE 'IER"' OR "'IBE"' FLAGS ARE SET (SECTION 2.3).
THESE MESSAGES
ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE.
EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA.
THESE ARE ALWAYS
PRINTED UNLESS THE 'IER',, “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?

A05$OUIRD PART OF A COMMAND WAS LEFT

?NUM TOO BIG?

THE VALUE OF A NUMERIC STRING IN THE

?BAD RADIX?

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

COMMAND &Ifi WAS LARGER THAN 65535
OR 177777 OCTAL. ( > 16 BITS).

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

16=JUN-81 14:38

MACY11 30A(1052)

E 2
16=JUN-81

14:39

:
PAGE 10-1

?"L00P"" VALID ONLY IN ACTIVE?

T:{N"élwt.." SWITCH WAS TYPED IN A

?"ECHO"" VALID ONLY IN PASSIVE?

THE "'VECHO'' 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=Z,0-9,SP,TAB'' ONLY? A CHARACTER TYPED WITHIN QUOTES WHEN

TRYING TO DEFINE THE CONTENTS OF A
rmsnn OR EXPECT MESSAGE WAS NOT
A=2,0-9,SPACE OR TAB''. RETYPE THE

cm 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
D.{(I’C"(!JT INTERRUPT WHEN ASKED TO DO A
THE PROGRAM WILL STILL RUN, BUT ANY

OF HE PROGRAM THAT TIMES THE DEVICE
WILL HANG IF THE DEVICE TIMES OUT.

ALSO, THE EVENT LOG WILL CONTAIN A
ZERO EVENT TIME FOR ALL EVENTS LOGGED.
MAX.

CHAR. MSG COUNT EXCEEDED = MSG. NOT BUILT !!

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

BUFFER FULL = MSG. NOT BUILT !!

THIS MEANS THAT THE LAST MESSAGE YOU

A
SEQ 0017

C2CLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11

16=JUN-81 14:38

MACY11 30A(1052)

F 2
16=JUN=-81

14:39

PAGE 10-2

TRIED TO ADD TO EITHER THE TRANSMIT OR

EXPECT BUFFER CAUSED THE TOTAL NUMBER
OF MESSAGES TO BE EXCEEDED. NO MORE
MESSAGES CAN BE ADDED TO THAT BUFFER.
THE LIMIT IS DETERMINED BY THE SIZE OF
THE MESSAGE POINTER TABLE.

CHAR. COUNT EXCEEDS BUFF LIMIT = MSG TRUNCATED
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=222

XXX= OFFSET OF THAT BYTE FROM THE START
OF THE COMPARE OR EXPECT MESSAGE.
YYY= THE CONTENTS OF THAT BYTE IN THE

__EXPECTED MESSAGE
ZZZ= THE CONTENTS OF THAT BYTE IN THE
RECEIVED MESSAGE
UP TO FIVE OF THESE ERRORS WILL BE

PRINTED PER MESSAGE COMPARED. ONLY
THE FIRST FIVE MISMATCHES WILL BE

INDIVIDUALLY REPORTED, BUT TOTAL
NUMBER OF MISTMATCHES IS REPORTED
BY ANOTHER ERROR.

PRINTING THE EVENT LOG AND USING THE

DCLT ‘DUMP'' COMMAND WILL ALLOW YOU TO
FIND THE ADDRESS OF THE MESSAGE AND
EXAMINE IT.

DATA COMPARISON DATA ERROR

TOTAL MISMATCHES IN MSG = 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
RECEIVE COUNT= 222
COMPARE COUNT= XXX
XXX= MJG"EQSREEBYTES IN THE COMPARE

272= NUMBER OF BYTES IN THE RECEIVED
ME SSAGE

SEQ 0018

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

MACY11 30A(1052)

6 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 A2 222

* NOTE =
bbb

= IN THE FOLLOWING ERROR DESCRIPTIONS XXXXX
REFEg‘S’EZ?F}E‘S OCTAL CONTENTS OF THE DEVICE REGISTERS

TIME OUT WAITING FOR RDI TO CLEAR

SELO

XXXXXX

SEL2

XXXXXX

THIS MEANS THAT A SOFTWARE TIMER EXPIRED BEFORE

&HERgEVICE CLEARED RDI IN RESPONSE TO THE DROPPING
NOTE: PROGRAM RESETS TIMER AND WAITS AGAIN
SO AN EFFECTIVE LOOP ON ERROR IS SETUP.
TIME OUT WAITING FOR RDI

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

SEL2

XXXXXX

THIS MEANS THAT A SOFTWARE TIMER EXPIRED BEFORE
THE DEVICE SET THE RUN BIT IN RESPONSE TO THE
PROGRAM SETING MASTER CLEAR.

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

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

TIME OUT WAITING FOR OUTPUT INTERRUPT

SELO

XXXXXX

SEL2

XXXXXX

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

MACY11 30A(1052)

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

SEL2

XXXXXX

SEL6

XXXXXX

THIS HAPPENS WHEN THE DEVICE ISSUES AN OUTPUT INTERRUPT

WITHOUT SETTING 'RDO''. IF THIS HAPPENS THE DEVICE IS BAD.
CONTROL OUT INSTEAD OF BA-CC OUuT

SELZ2

XXXXXX

SEL6

XXXXXX

MMMV

WHERE ‘MMMMM'' IS ONE OF THE FOLLOWING MESSAGES

ImTYCRlEJSULT FROM INTERPRETING THE REGISTER CONTENTS

PROCEDURE ERROR/HALT

NON EXIST MEM
DDCMP START REC
DISCONNECT
LOST DATA
DDCMP MAINT REC
OVERRUN
TIME OUT

DATA CHECK
RUN SET ILLEAGLLY
CD GLITCHED
RX IDLE
CTS FALILED

(DMR
(DMR
(DMR
(DMR

IN
IN
IN
IN

DMR-MODE
DMR-MODE
DMR-MODE
DMR-MODE

ONLY)
ONLY)
ONLY)
ONLY)

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

BACC OurT.
TX BUFF

COMPLETED AND SHOULD BE RX

SEL4

XXXXXX

SEL6

XXXXXX

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

COMPLETED AND SHOULD BE

SEL4

XXXXXX

SEL6

XXXXXX

SEQ 0020

1
CZCLKBO DMR,DMC-11
DATA Cflgg. LINK TEST

C2CLkB.P11

MACY11 30A(1052)

6=JUN-81 14

I 2
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'' 1S THE OCTAL CONTENTS OF THAT
DEVICE REGISTER.
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 REQ.

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

16=JUN-81 14:38

MACY11 30A(1052)

g £
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 ERRORSTM IS REPORTED
WHEN ** X NUMBER OF DCLT PASSES'*

ARE COMPLETED.

4.1 PRINTING OF EVENT LOG

SIGNIFICANT EVENTS OR CHECK-POINTS WILL BE LOGGED IN A
‘'CIRCULAR QUEUE'' STORAGE AREA CALLED THE EVENT LOG.
THE LAST
"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=OUT'* 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 THE LAST

START OR RESTART.
IT SHOULD BE NOTED THAT THE TIMES ARE
RELATIVE SINCE WHILE THE PROCESSOR IS RUNNING AT PRIORITY 7
THE CLOCK CAN'T INTERRUPT TO KEEP TIME.

THIS IS THE CASE

WHILE THE PROGRAM IS FETCHING DCLT COMMANDS FROM THE OPERATOR.

IT SHOULD ALSO BE NOTED THAT THERE ARE ONLY 8 BITS AVALIABLE TO STORE
RELATIVE MINUTES SO °"‘TIME'' WILL WRAP TO 000:00:00 AFTER 256:59:59.
A START OR RESTART COMMAND AT THE 'DR>'' LEVEL INITIALIZES THE EVENT

LOG.
THEREFORE IT IS WISE TO DO A 'PRINT'' AT THE 'DR>'‘ LEVEL
BEFORE GIVING A *'START'' OR "RESTART''.
THE TYPES OF EVENTS KEPT IN THE EVENT LOG ARE:

TRANSMIT MESSAGE QUEUED:

EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE,

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

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

SEQ 0022

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

MACY11 30A(1052)

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. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES

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

TYPE OF MAINTENANCE

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

DEVICE ERROR:
EVENT TIME, DEVICE ERROR MESSAGE, CONTENTS OF TWO
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. BELOW ARE THE MESSAGES THAT
MIGHT BE PRINTED AND THEIR MEANING:

ME SSAGE

MEANING

TXQ
TXC
RXQ

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

INI

DEVICE ABOUT TO BE INITIALIZED

ERR

MSC
cMP
CML
CMD
EOP

DEVICE ERROR HAS OCCURRED

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

4.3 PRINTING OF DMR/DMC-11 BASE TABLE
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
CZCLxkB.P11
16=JUN-81 14:38

MACY11 30A(1052)

A X
16-JUN-81

14:39

PAGE-11-2

4.3.1 PRINTING ERROR LOCATIONS
TO PRINT ERROR COUNTER LOCATIONS, INPUT "BASE/ERROR''. FOR A DMC
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 IS DMC
RPT> (A)

? 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
17370
17371
17372
17373

CONTENTS
000
000
000
000

17567

DESCRIPTION
BASE TABLE UPDATE INDEX POINTER
BASE TABLE UPDATE LIMIT
BEGINNING OF BASE TABLE DATA
NAKS RCVD..BUFFER TEMP UNAVAILABLE
SEE DMR MANUAL FOR DESCRIPTION

4.3.3 PRINTING SINGLE LOCATION
TO EXAMINE A SINGLE LOCATION, INPUT "BASE/OFFSET=NNN''. FOR A DMC
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 IS DMR
RPT> (A) ? B/0=27

LOCATION
17417

CONTENTS
006
RPT> (A)

DESCRIPTION
STREAMING TIME OUT COUNT

SEQ 0024

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLkB.P1T

16~JUN-81 14:38

MACYT1 30A(1052)

n2
16-JUN-81

14:39

PAGE 11-3

5.0 DEVICE INFORMATION TABLES

THIS IS THE DEFAULT HARDWARE P-TABLE.

THE VALUES AND

SIZE ARE USED AS A '‘TEMPLATE'' FOR CREATING ACTUAL P-TABLE

ENTRIES AND THE DEFAULT VALUES PROVIDED FOR THE OPERATOR.

SEE SECTION 2.4 FOR AN EXAMPLE OF THE HARDWARE QUESTIONS.

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

GET PARAMETER'' CALLS ARE USED TO FILL THE P-TABLE.

.WORD

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

:[10]) SPARE

.WORD
.WORD
MORD

160170
300
240

WORD

;2] CSR ADDRESS
:L4] INTERRUPT VECTOR
:[6] INTERRUPT PRIORITY (5)

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

6.0 MODE AND MESSAGE DESCRIPTIONS

6.1 MODE DESCRIPTIONS
BECAUS: THE DMC-11 AND DMR-11 SUPPORT DDCMP OPERATION IN THE

FIRMWJARE, THE PDP11 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
&(?E%DESSAGES (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 1S 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 DAYA COMM. LINK TEST
16=-JUN-81 14:38

N2
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 RECEIVETM 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 "MOST'' 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 L0C. 0.
THIS IMAGE DATA WILL CONTAIN A
CODE THAT PRINTS A MESSAGE SAYING DOWN-LINE-LOAD WAS SUCESSFUL.
THE BOOTING PROCESS OVERWRITES PART OF THE ‘VECTOR'* AREA SO THE DCLT
PROGRAM MUST BE RELOADED IN THE "SATELLITE'*
SYSTEM.
THE SATELLITE WILL ENTER MOP MODE ONLY IF THE PASSWORD WORD
SUPPLIED BY THE USER MATCHES THAT SET IN 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 DOWNL INE LOAD;
DCLT>R M=D

SATTELITE PASSWORD =

= OCTAL # &THEEN 0-376

SECONDARY BOOT REQ FR(H XXX DEVICE TYPE
=
Yy

XXX

DP
DU

14
16

DN
DLV

DTE

DQ
DA
DUP
DMC
DMP
o
<

6
8
10
12

CZ2CLxB.P11

MACY11 30A(1052)

SEQ 0026

CZCLKBO DMR,DMC-11
D“A1£m38. LINK TEST
16=JUN-81

C7CLxB.P1

“

MACY11 30A(1052) ILJMI 14:39 PAGE 11-5
0Z

KDP

KDZ

DMV

6.1.6 TALK MODE
THE 'TALK'' END OF THE LINK_TRANSMITS OPERATOR-TYPED MESSAGES

UNTIL A “EXIT'' MESSAGE IS TYPED.

AT THAT POINT,

THE NODE GOES

INTO "LISTEN'' MODE. AN "EXIT MESSAGE'' IS A MESSAGE WHOSE FIRST

FOUR CHARACTERS ARE "EXITTM.
SINCE ONLY THE FIRST FOUR CHARACTERS
NEED TO BE "EXIT"', MORE CHARACTERS CAN BE ADDED SO THAT A MESSAGE
MAY BE SENT AND THE MODE SWITCHED ALL AT ONCE.
FOR EXAMPLE:
TLK> EXIT ALL OF

THIS LINE IS SENT THEN MODE SWTICHED

6.1.7 LISTEN MODE
S
g ?V THE DEVICE ON THE OPERATOR'S CONSOLE.

S AN "EXIT'' MESSAGE,

IF THE MESSAGE

THEN THE NODE ENTERS '‘TALK'' MODE.

T MESSAGETM IS A MESSAGE WHOSE FIRST FOUR CHARACTERS ARE 'EXIT'.

6.1.8

MAINTENANCE 'LOOP'* MODES

REMEMBER THAT THE WHENEVER A 'RUN'' 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 THE MODE TO RUN IS ACTIVE !

INTERNALTTL

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 BY DMR OR DMC-11 CODE.

LOCALMODEM

FOR DMR-11 IN DMR
AND RS449 MODEMS OnLY.
CAUSES A 'WRITE MODEM'' TO BE DONE TO SET UP
LOCAL=LOOPBACK (MAINT1) . ALSO CALLED

ANAL OG~-LOOPBACK.

REMOTEMODEM

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

REMOTE~LOOPBACK (MAINT2)
DIGITAL-LOOPBACK.

. ALSO CALLED

SEQ 0027

MACY11 30A(1052)

C2CLKBO DMR,DMC=11 DATA CW” LINK TEST
CZCLkB.P11
16=JUN-81

¢ 3
16=JUN-81

14:39

PAGE 11-6

THE FOLLOWING TABLE SUMMARIZES THE MODES THAT CAN BE RUN TOGETHER
%NJ'(T*DCH':?OGRM IS RUNNING ON TWO PROCESSORS (ONE AT EACH

ISTATION A

1"HOSTTM" NODE ''/LOOP'' ALLOWED?
i TALK
NO
ILISTEN
NO
i TRANSMI T
NO
3
IRECEIVE
NO
iPASS I VE
NO
TACTIVE
YES
i
IDOWNLINELOAD NO

STATION B

"REMOTE'* NODE
LISTEN*, RECEIVE
TALK*, TRANSMIT
RECEIVE*, LISTEN
TRANSMIT#, TALK
ACTIVE®*
ACTIVE*
PASSIVE*
PASSIVE

DUPLEX
:
MALF OR FULL!
MALF OR FULL!
HALF OR FULL!
MALF OR FULL!
MALF OR FULL!
FULL
i
HALF OR FULL!
HALF FORCED !

*= MOST LIKELY TO BE IN THAT MODE

6.2 MESSAGE DESCRIPTIONS
NAME

DESCRIPTION

ZEROES
ONES
1ALT

MESSAGE OF ALL 0'S (00000000,00000000,00000000....)
MESSAGE OF ALL 1'S_(11111111,11111111,11111111....)

OALT
CCITT
ITEP

ALPHA

MESSAGE OF ALTERNATING 1'S (10101010,10101010.....)
MESSAGE OF ALTERNATING 0'S (01010101,01010101.....

"CCITTTM $12-B1T (VS, 511 BITS) TEST PAITERN
INT

ESSOR TEST PROGRAM'S (ITEP)
. MESSAGE 1(DP1:)
u‘PsOVER THE
LAZY DO0G.<15><12><001><17
7><17 <1
(<177><177>/$A THE QUICK gi)tufl

ALPHA-NUMERICS (OR FUTURE COMM
MSG)
(#8'"" (AMPERSAND)* ()%+,~.0123456789: ; <=>?@ABCDEF GHIJK

LMNOPQRS TUVWXYZ/[\J*_%)
"'A-2,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.)

CZCLKBO DMR,DMC-1 1 DATA CW LINK TEST
CZCLxkB.P1
16=JUN=-81 1 14:38

MACY11 30A(1052)

0 3
16=JUN-81

14:39

PAGE 12

7.0 OTHER INFORMATION
7.1 INTERFACING TO AN "'ITEP'' NODE
WHEN DCLT IS USED TO INTERFACE TO AN ITEP NODE.
THE TABLE BELOW APPLIES:

ITEP NODE

DCLT NODE

ONE<WAY=QUT
ONE=WAY=IN

RECEIVE OR LISTEN
TRANSHIT OR TALK

INTERNAL LOOP
EXTZRNAL LOOP

TIVE
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
MAVE SELECTED, SO BE SURE TO SET THE TX BUFFER ON THE DCLT

NODE ACCORDINGLY.

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

WHEN DCLT IS IN LISTEN MODE THE RX BUFFER IS ONLY

82 BYTES LONG THEREFORE DO NOT SEND THE DCLT NODE

6{%&"56 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 lS ‘MT T0
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 BEMAVING.
NOTE: IF BOTH NODES IN
A
e==== END-OF-PASS IS DEF
AND COMPLETING THE TRANSHI
CHECKING, THERE
MANY MESSAGES IT

"/NOCHECK'" IS USED,
IVING 1 MESSAGE
ST.
WITH NO DATA
DCLT TO KNOW HOW
TO RECEIVE.

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

MACY11 30A(1052) 15-.".)0-81 14:39 PAGE 12-1

C2CLkBO
CZCLKB.P11T

7.2.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 IF ON, BUT SEEING THE SEQUENCE
OF EVENTS MIGHT BE INFORMATIVE.
A POSSIBLE COMMMAND SEQUENCE IS:
CE
T

SE T=ONES/S$=20/(=2

R M=A/L0=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/(=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
ACTIVE
NOT BE
EXPECT

M=A/LO=1/NOCH/STAT'' SETS THE MODE TO RUN IN TO BE
AND LOOP TYPE TO BE INTERNAL TTL. THE PROGRAM WILL
CHECKING DATA SO THERE WAS NO NEED TO SET UP AN
LIST. THE PROGRAM WILL BE PRINTING STATUS MESSAGES.

WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND

IF THINGS ARE RUNNING CORRECTLY :

INI RXQ TXQ RXQ TXC TXQ@ RxQ TXC

TXQ RXQ TXC EOP

BELT>

MODE=ACTIVE/LOOP=INTERNAL /PASS=00000
(A
2
/STATUS/NOCHE CK/NOE CHO/NOMODEM

THIS GIVES YOU A IDEA IF THE COMM. DEVICE CAN EVEN TRANSMIT AND
RECEIVE.
ANY ERRORS REPORTED WILL PROBABLY BE DUE TO INCORRECT

DEVICE ADDRESSES BEING USED OR A FAULTY DEVICE.
CHECK ADDRESSES
gé\TI?CE'DISPLAY AND RUN THE PREREQUISITE DIAGNOSTICS FOR THE COMM.

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

SE E=T
R M=A/LO=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

MACY11 30A(1052)

16=JUN=-81 14:38

16=JUN=81

14:39

PAGE 12-2

THE RUN COMMAND
1S THESAME WLTH THE ADDITION OF w0

SUITCHES YCHYPAS=3"

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

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

CMP CMP EOP RXQ TXQ RXQ TxC TxQ

RXQ TXC TXQ TXC CMP CMP CMP EOP

MODE=ACTIVE/LOOP=INTERNAL /PASS=00000

b, N

/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 IN ACTIVE MODE WITH NO LOOP.
POSSIBLE COMMAND SEQUENCE IS:

R M=A/CH/PAS=3
WHAT THIS SEQUENCE MEANS:

THIS SEQUENCE HAS THE '/LO=I'' REMOVED. THIS INFORMS
'T"S DEVICE TO ACT AS IF IT WAS RECEIVING FROM ANOTHER
WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND

IF THINGS ARE RUNNING CORRECTLY :

INI RXQ TXQ TXC RXQ TXQ TXC RxQ

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

CMP CMP EOP RXQ TXQ TXC RXxQ TXQ

TXC RXQ TXQ TXC CMP CMP CMP EOP

MODE=ACTIVE/PASS=00000

DCLT> (A)

7.2.2

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

NODE A

SE T=1ALT/S5=250

NODE
B

R M=R/NOCH/PAS=3

SEQ 0031

CZCLKBO DMR,DMC=11 DATA COMM. (INK TEST

CZCLkB.P11

MACY11 30A(1052)

16=JUN-81 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/$=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 IS TO BE DONE,AND

THE PASS COUNT IS SET 1O THREE.

WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND

IF THINGS ARE RUNNING CORRECTLY :

FOR NODE A:

INI TXQ TXC EOP TXQ TXC EOP TXxQ

TXC EOP

MODE
= TRANSM] T/PASS=00000

DCLT> (A)

/STATUS/NOCHE
CK/NOE CHO/NOMODEM

FOR NODE B:
INI RXQ EOP RXQ EOP RXQ EOP

MODE=RE CE I VE/PASS=00000

DCLT> (A)

/STATUS/NOCHE
CK/NOE CHO/NOMODEM

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

R M=TR/PAS=3

SE E=1ALT/S=250

R M=R/CH/PAS=3

WHAT THIS SEQUENCE MEANS:

THE ''SE E=1ALT/S=250'" LINE, MUST BE ADDED HERE
T0 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 RUN COMMAND IF
ARE RUNNING CORRECTLY:

NODE A:

NODE B:

IS THE SAME AS ABOVE.
INI RXQ CMP EOP RXQ CMP EOP RXQ CMP EOP

MODE=RECE
I VE/PASS=00000

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

THINGS

SEQ 0032

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

C2CLKB.P11

MACY11 30A(1052)

16=JUN=-81 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 DATA FLOW.

7.2.3

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 B

CE
cT

CE
crT

R M=ACT/NOCH/PAS=3

R M=P/NOCH/PAS=

SE T=CCITT/S=10/C=2

SE T=1ALT/S$=20/(C=2

WHAT 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. THE DATA FOR EACH MESSAGE IS ALTERNATING
1'S AND 0'S. 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

IF THINGS ARE RUNNING CORRECTLY :

FOR NODE A:

INI RXQ TXQ TXC TXQ RXQ TXC TXQ

RXQ TXC EOP RXQ TXQ RXC TXC TxQ
RXQ TXC TXQ RXQ TXC EOP RXQ TXQ
RXQ TXC TXQ RXQ TXC TXQ RxQ TXC

MODE=ACTIVE/PASS=00000
DCLT> (A)

/STATUS/NOCHE
CK/NOE CHO/NOMODEM

FOR NODE B:

INI RXQ TXQ TXC RXQ TXQ TXC RXxQ

TXQ TXC EOP RXQ TXQ TXC RXQ TXQ
TXC EOP RXQ TXQ TXC RxQ TXQ@ TXC

SEQ 0033

MACY11 30A(1052) 1£~JW-81 14:39 PAGE 12-5

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLkB.P11

16=JUN-81 14:38

RXQ TxQ TXC EOP

MODE =PASS 1VE/PASS=00000

DCLT> (A)

/STATUS/NOCHE CK/NOE CHO/NOMODEM

NOW USE DATA CHECKING WITH THE "EXPECT MESSAGE LISTS'' JET
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
cT

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

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

WHAT THIS SEQUENCE MEANS:
NODE A SETS UP IS TRANSMIT 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

YTES_LONG AND CONTAINS 1°'S FOR DATA. MESSAGE

IS 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

SEQ 0034

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

CZCLkB.P11

MACY11 30A(1052)

16=JUN-81 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.
THE 'END-OF =PASS’' POINT WILL BE OUT OF SYNC BUT THIS IS NOT
A PROBLEM.

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,

;eLQlKE%Egli;EN' AND SEND MESSAGES OVER THE LINK. POSSIBLE COMMAND
R M=LIS/NOST
LIS>

R M=TA/NOST
TLK>

7.3 EXAMPLES OF COMMANDS
THIS SECTION WILL SHOW A SAMPLING OF COMMANDS AND

EXACTLY WHAT TO EXPECT FROM THEM.

7.3.1 EXAMPLES OF MESSAGES COMMANDS
THE CLEAR COMMANDS

CE
cT
THIS WILL INITIALIZE THE TRANSMIT AND EXPECT LIST

TO 1 MESSAGE OF 58 BYTES.
BE THE ITEP MESSAGE.

THE DATA OF THE MESSAGE WILL

IF THESE COMMANDS ARE FOLLOWED BY A SHOW COMMAND

SH E
SUCH AS THE SHOW EXPECT LIST. WHAT YOU WOULD SEE IS

MSG: TYPE=ITEP/SIZE=58
MODE=ACTIVE/PASS=00001

/NOSTATUS/
CHE CK/NOE CHO/NOMODEM
DCLT> (A) ?
NOW IF YOU DID A SET EXPECT LIST COMMAND SUCH AS:

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

AND F&L(sluflg IT WITH A SHOW EXPECT LIST COMMAND
WHAT YOU WOULD SEE IS

MSG:
MSG:
MSG:
MSG:

TYPE=ALPHA/SIZE=35
TYPE=ALPHA/SIZE=35
TYPE=ALPHA/SIZE=35
TYPE=ALPHA/S1ZE=35
MODE=ACTIVE/PASS=00001
/NOSTATUS/
CHE CK/NOE CHO/NOMODEM
DCLT> (A) ?

SEQ 0035

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

C(ZCLkB.P11

MACY11 30A(1052)

16=JUN-81 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 IS
DCLT CMDS:

CLEAR OR SHOW

EXPECTLIST OR TRANSMITLIST

EXIT
DUMP START-END/B

SET EXPECTMSG OR TRANSMITMSG=T1YPE/SIZE=N OR /COPY=N
SET EXPECT=TRANSMIT
TYPE=ONES ,ZEROES, 1ALT,0ALT, ITEP,CCITT ,ALPHA
OR 'OPR SPCD=A-Z,SP,TAB,0-9 IN QUOTES''
RUN MODE=MTYP/LOOP=LTYP/CHECK,STATUS
,ECHO ,MODEM, PASS=N
MTYP=TRAN
,REC ,ACT ,PAS,TAL,LIS,DOWN
,REM/
LTYP=INT,CAB,LOC

DCLT> (A)

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 IS
41260
023 211

167
112 024 312 014
312

41270
41300

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=TRANSMI T/PASS=00000

DCLT> (A)

/NOSTATUS/
CHE CK/NOE CHO/NOMODEM

IF YOU EECRE TO EXECUTE THE RUN COMMAND
kY
R M=A/L0=1/ST/CH/PAS=3
WHAT YOU WOULD SEE (IF USING DEFAULT TRANSMIT AND EXPECT

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

MACY11 30A(1052)

L 3
16=JUN-81

SNSRI
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
/STATUS/
CHE CK/NOE CHO/NOMODEM
DCLT> (A)
?
IF YOU lEJSE THE EXIT COMMAND
WHAT YOU WOULD SEE IS
CZCLK _EOP

0 CUMLATIVE ERRORS

DR>

7.3.4 EXAMPLES PRINT ZOMMANDS
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 THE THE DLCT> OR DR PROMPTS

TYPE ‘W' OR

RPT> (A)

2" FOR HELP!

HERE ARE SOME EXAMPLES OF RPT> LEVEL COMMANDS
THE HELP OR ? COMMAND

HELP
?

PRODUCES THE FOLLOWING:

DCLT REPORT CMDS:

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 >>>>33333333>33333333>3>>3>>>>>>

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

MODEM STATUS: css D?R D(C)D R(T)S R% S?D Tl11

>>> DCLT EVENT LOG ENTRY D>22332333233332223333323>333>>>>

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

MODEM STATUS: CES D?R DgD R(T)S 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)

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

IF 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 TRANSMIT

LIST ON THE SIDE WITH THE ECHO SWITCH. THE REASON IS
THAT THE TRANSMIT LIST GETS OVER WRITTEN WITH THE

RECEIVE LIST WHEN USING THE ECHO SWITCH.

:
3

SEQ 0038

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZ2CLkB.P11

16=JUN-81 14:38

4218

.SBTTL
002000

16-JUN-81

SEQ 0039

PROGRAM HEADER

M
: THE PROGRAM HEADER 1S THE INTERFACE BETWEEN
: THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.

4306

002000

HEADER

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

LSNAME
::

LSREV::

:
LSDEPO:
LSUNIT::
LSTIML::

:
LSHPCP:

LSSPCP::

2020

(5)
(4)
(5)

002022
002022
002024

(5)

002026

(S)

002030

(5)

002032 " -,

L$CO::

(5)

002034

LSDTYP::

(5)

002036

LSAPT.::

(5)

002040

LSHPTP::

002130
- 1

é :

§ %

LSSPTP::

LSLADP::

LSSTA::

8
8

.ASCII1 /C/
LASCII 72/
/¢/
.ASCII /L/
LASCII /K/
o

- =2OWO
WEHWNW

b b

0C2000

LSDTP: :

—

POINTER BGNRPT ,BGNAU,BGNDU

(]

002000

—

4286

PAGE 13-3

BGNMOD

4281
4282
4283

(4)

14:39

.ASCI1

/B/

LASCII

70/

I
L

4249

MACY11 30A(1052)

0
LSDISPATCH

CHCRBP " T6-JUN-B1 16538

,DMC=11 DATA COMM. LINK TEST

NEADER ~On(1052) s

14:59 -?-5 e

SEQ 0040

LSPRIO: :
LSENVI::

LSEXP::

LSMREV::

BYTE
.BYTE

LSEF::

:
LSDEVP:

LSDVTYP

LSREPP::

LSRPT

:
LSEXP4:

LSEXPS::
034702

034674
000000

012624

104035
000000

033746
034650
034646

033740
000000

000000
000000

CSREVISION
CSEDIT

;

LSSPC::

LSAUT::

#PRI07

0
.WORD

+WORD

LSAU

~
LSDUT::
LSLUN::

LSDESP::

LSLOAD::

LSETP::
LSICP::

LSCCP::
LSACP::
LSPRT::

LSTEST::
LSDLY::

LSHIME::

LSOV

LSDESC
EMT

ESLOAD

.WORD

LSINIT

.WORD

LSCLEAN

.WORD

LSAUTO

.WORD

LSPROT

.WORD

T AR

CZCLkBO ?HR.DH(-11
DATA COMM. LINK TEST DISPATCHMACY11
30A(1052) 18~JUN-81 14:39 PAGE 13-5
CZCLkB.P1
16=JUN=-B81 14:38
TABLE
:

.SBTTL

‘

[

SEQ 0041

DISPATCH TABLE

s THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF ;ACH TEST.

s IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TES
o

@) %155 000001
(3)
}S: 034710

DISPATCH 1

LSDISPATCH::
.WORD

C2CLKBO DMR,DMC=11 DATA COMM. LINK TEST

MACY11 30A(1052)

DEFAULT MARDWARE P=TABLE

4‘.

.SBTTL

ICLKB.P11 ~ 16=JUN=81 14:38
§

16=JUN=81

14:39

PAGE 136

DEFAULT HARDWARE P=TABLE

6344

; AND IS USED AS A '‘TEMPLATETM FOR BUILDING THE P=TABLES.

4345
A
4

i THE DEFAULT HARDWARE P=TABLE CONTAINS DEFAULT VALUES OF
: THE TEST=DEVICE PARAMETERS.
THE STRUCTURE OF THIS TABLE
: xs IDENTICAL TO THE STRUCTURE
OF THE HARDWARE P-TABLES,

4;50

4351

3)
(3)

(3)

235

885126

126
0021

y
000010

o363

BGNMW

DFPTBL

’

0021

436
4364
4365
236%

SEQ 0042

LSHW::

JWORD

L10000~L$HW/2

DFPTBL::

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

000001

JWORD

o389

:C0] FULL OR MALF DUPLEX FLAG (BITO=1 IF FULL)

4384
4385

2“399

4388

THE HARDWARE PARAMTER CODING SECTION BY CHANGING '‘OFFSETS''

160170

JWORD

gg‘ 002142 000000

WORD

4389
4390
4391

002132

;DEVICE DEPENDENT SECTION
:
ADDING OR REMOVING WORDS FROM THIS TABLE EFFECTS THE 'GET'' CALLS IN
160170

:[2]

CSR ADDRESS

t;z mgevxcs oénou TYPE (0=DMC , 5=DMR-DMC MODE,

.WORD
.WORD
WORD

300
240
O

000004

WORD

:[14) BAUD RATE (0=2,4x. 1=4.8K,

zgg; 002146 000000

JWORD

:016] LINE mrsamcs (422, V.35, INT, EIA...)

4399
4400
(3)

ENDHW

439,

4395

4396

002134 000300
002136 000240
002140 000000

002144

002150
002150

:C4] INTERRUPT VECTOR
:[6] INTERRUPT PRIORITY (5)
[1 3 oevxce mwuerens WORD

STRIP SYNC, COMPATIBLE MODE...)
2=9.6K, 3= 19.2K.

4=56K, 5=250K, 6=500K. 7=1 MEGA=-BAUD)

L10000:

—_—

C2CLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11

= 16=JUN=81 14:38

MACY11 30A(1052) 15-Jw-a1 14:39 PAGE 13<7

DEFAULT MARDWARE P=TABLE

¢e0%
44

44
444

4444
4445
4446
4456
4457

.SBTTL

GLOBAL EQUATES SECTION

4458

4460

: ARE USED IN MORE THAN ONE TEST.

4459

THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT

447

ug!)s 002150

EQUALS

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

m
(1)
(1)

(1)
1
(1)
(1)
(1)
1)
(1)
m

: BIT DIFINITIONS

100000
040000
020000
010000
004000
002000
001000
000400
000200
000100
000040
000020
000010
000004
00000.
00000

001000
000400
000200
000100

000040
0000
00001
000004
000002
000001

(1)

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

8IT15== 100000
BIT14== 40000
BIT13== 20000
81T12== 10000
BIT11== 4000
BIT10== 2000
81T09== 1000
BIT08== 400
BIT07== 200
BITO6== 100
BITOS== 40
BIT04== 20
BIT03== 10
BIT02== 4
BIT01== 2

BIT00== 1
BIT9== BIT09
BiT8== BITO8

BIT7== BITO7
BIT6é== BIT06
BITS== BITOS
BITé== BITO04
BIT3== BITO3
BIT2== BIT02
BIT1== BITO1
sno== BIT00

: EVENT FLAG_DEF INITIONS

000049
oooo;o
0000
000035

000034

EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION

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

.PWR==

2.
®
30.
29.

28.

; START COMMAND WAS ISSUED
: RESTART COMMAND WAS ISSUED
: CONTINUE COMMAND WAS 1SSUED
: A NEW PASS HAS BEEN STARTED

: A POWER=FAIL/POWER-UP OCCURRED

SEQ 0043

————

=8
"3
NP Nt N
N
N
N
N
NP N
N
N

16=JUN=81 14:38

MACY11 30A(1052)

GLOBAL EQUATES SECTION

000340
000
00024
000
000140
000100
000040
000000

PRI07== il.o
mogzz 00
PRI0OS== 240
PRIO4== 200
PRI0O3== 140
PRI02== 100
PRIOT== 40
PRI00== 0
JOPERATOR FLAG BITS

000004
000010
000020
000040
000100
000200
000400
001000
002000
000
010000
020000
040000
100000

Evi==
LOT==
ADR==
1DU==
ISR==
UAM==
BOE==
PNT==
PR]==
IXE==
IBE==
IER==
LOE==
HOE==

4
10
20
40
100
200
400
1000
2000
4000
10000
20000
40000
100000

16=JUN-8!

: PRIORITY LEVEL DEFINiTIONS

N
N
N
N
N
N
N
N
N
N
N
N
N
N
N
N

D e

ENA A A AP

) e

D e

) e

)

NN PNPNPNPNPNPNPN PPN

) il

) i

el o

PP~

il el

)

—

TMy

(]
NO
oOoON

,DMC=11 DATA COMM. LINK TEST

14:39

PAGE 13-8

SEQ 0044

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

G &
16=JUN=81

14:39

PAGE 139

sewxax INDEPENDENT EQUATES

4481

001000

BUFLIM=512.

000017

MSGL IM=15.

;MAX BUFFER SIZE IN BYTES
APPLIES TO TX,RX AND CMP BUFFS
:MAX NO. OF MESSAGES PER BUFFER
(FOR EACH INCREMENT (+1) TO MSGLIM,
ADD 6 WORDS TO THE POINTER TABLE
(PTRTAB:) SINCE THIS MEANS 2 MORE

"POINTER'' WORDS PER BUFFER.

;MODE OF OPERATION EQUATES
REC=0
TRA=1

sRECEIVE MODE
s TRANSMIT MODE
:PASSIVE MODE

PAS=

:ACTIVE MODE

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

: DOWN=L INE=LOAD MODE
s TALK _MODE

;LISTEN MODE

sMAINT LOOP TYPE EQUATES
=

CABLE=

TTL=

MODLOC=

sNO_LOOP

sINTERNAL TTL
s CABLE LOOP
sMODMEM LOCAL

MODREM= 4

sMODEM REMOTE

MOP=

000100
000111
001600

;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
000010
000040

STATB= BITO
DATCkB= BIT1
ECHOB= BIT

MOCHK= BIT
BIT4
CRCB=
PROTOB= BITS

;OPERATOR AWAKE ASKED FOR
;DATA CHECK BIT
sECHO BIT
sMODEM CHECK/NO CHECK
ADDED BY EC
sCRC_CALCUALTE ASKED FOR
sPROTOCOL PROCESSING ASKED FOR

;OPTION TYPE EQUATES
DMC=
DMRC
DMRC7=

0
“
5

w7¢

82
:820

DMR IN DMC MODE
DM IN DHC MODE

8509
DMR IN DMR
noog

;EVENT LOG MESSAGE TYPES (USED TO

LOCATE EVENT DESCRIPTION IN EVENT TABLE

AND DISPATCHING TO SEPERATE SE$ IWSIOF THE EVENT RESMTING SECTION)
TXQ=
g
T MESSAGE QUEUE
TXC=
sTRANSMIT COMPLETE

000006
000010

RXQ=
RXC=

DER=

4
6

:RECEIVE BUFFER QUEUED
:RECEIVE COMPLETE
;DEVICE INFORMATION

SEQ 0045

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

MACY11 30A(1052)

EQUATES SECTION

H &
16=JUN-81

14:39

PAGE 13-10

12
14

Dvi=
DCK=

12
14

sDEVICE ABOUT TO INIT
sDATA COMPARISON RESULTS

0000%0
000022

DLE=
DDE=

0
2

;DATA COMPARISON LENGH ERROR
;DATA COMPARISON DATA ERROR

000024

EOP=

sEND OF PASS

:3s:EQUATES FOR FLAG WORD;;;::::

000001
000002
000004
000010

ININT= 1
OTINT= 2
QRX=
&
QTX=
10

s INPUT INT. REC.
sOUTPUT INT REC
sRX QUED /COMPL
:TX QUED/COMPL

00004
000100
000200
000400
001000
002000

CRX=
40
ERX=
100
ETX=
200
DLLGA= 400
DMRRUN= 1000
8TuUP=
2000

JRX COMPL AND IN TSEL4 AND TSEL6
JEXPECT TO GET A RX COMPLED
SEXPECT TO GET A TX COMPLETED
;sDOWN LINE LOAD GO AMEAD BIT
;DMR RUN MODE EXPECTED
;BASE TABLE UPDATE REQUESTED

000028

000000
000001
00000
00000
000004
000005
000006
000007
000010
000011
000012
000000
000001
00000
00000
000004
000005
000006

000007
000010
000011

CTX=

; SPECIAL CLI CODES FOR ''CHAR'' ARGUMENT IN CLI CALLS
(COMMAND LINE INTERPRETER DEFINITIONS)
;
CLIERR= 0
CLIEXI= 1
CLIBR= g
CLIBIF=
CLISPA= &
CLINUM= 5
CLIALP= 6
CLIALN= 7
CLIOCT= 8.
CLIDEC= 9,
CLISTR= 10.
; DEFS FOR COMMAND LINE INTERPRETATION ACTION VALUES
NULL=0

CLEAR=1
SHOW=2
CHECK=3
4
HLP=5
CSHE XP=

00001§
00001
000014
000015

CSHTRN=
SETEXP=10
SETTRN=11
S1Z2E=12
QCOPY=13
NUM=14
OPRMSG=15

00001
0000

ENDQO=17
(MSG0=20

0000 g
0000

(MSG2= §
CMSG3=

000019

000021

sTX COMPL AND IN TXSEL4 AND TSEL6

STATUS=16

(MSG1=21

SEQ 0046

CZCLKBO DMR,DMC=11 DATA CW” LINK YESTG
16=JUN-81

MACY11 30A(1052)
OBAL EQUATES SECTION

4595
(596

0000 9
0000,

CHSG4=§4
CMSG5=25
CMSG6=26
ATWD=§7

4598
4599
4600
4601
460
460
4604
4605
4606
4607
4608
4609
4610

000031
0000 i
00003
0000
000035
0000
00003
000040
000041
00004
00004
000044
000045

4612
4613

000047
000050

4615

00005

CZ2CLkB.P1

4597

4611

4614

4616

4617
4618

4619
4620
4621
462

462
4624
4625
4626
4627
4628
4629
4641
4642
4643

0000

000046
000051

00005

000054

000055

000056
000057
000060

000001
00000,
00000
000004
000005
000006
000007

4654

000004
000010
000001
000040
000200
040000
001000

4664

4665
4666

PAGE 13-11

PASMOD=30

MOP=43

TTLLOP=44

CBLLOP=45

LMDLOP=46
RMDLOP=47

NOTNUF =50
BADCHR=51
DMPS=5
DMPE =5
DMPQ=54
PRNT=55
MOSC=56
EXI1T=57
SETET=60

;MODEM/NOMODEM REV B BY E C
SEXIT COMMAND REV B BY EC
;S E=T COMMAND REV B BY EC
REV B BY EC
sHELP COMMAND

;FOLLOWING EQUATES USED IN REPM? CLI
RPHLP=1
RPEX Tzi

SEXIT_COMMAND

sPRINT EVENT LOG COMMAND

RPLOG=
RPSWE =4

RPSWF =5

:BASE/ERROR COMMAND
sBASE/FULL COMMAND

RNOTNF =7

:MORE COMMAND NEEDED

RPSWO=6

:BASE/OFFSET

IF SIGNAL AVAILABLE IN DEVICE, EQUATE NAME TO BIT POSITION,
ELSE EQUATE IT T0 = 0

4645

4646

14:39

;xwxwx DEVICE DEPENDENT EQUATES
MODEM SIGNAL BIT DEFINITONS

4644

4647
4648
4L649
4650
4651
465
465

I &
16=JUN=81

000040
000200

;CLEAR TO SEND (CIRCUIT (B)
:DATA SET READY (CIRCUIT CC)
:DATA CARRIER DETECT (CIRCUIT CF)

CTS=
DSR=
DCD=

RTS=
RI=
sQp=

TM=

DEVICE SIGNALS
RQI=
RD]=

:REQUEST TO SEND (CIRCUIT CA)
:RING INDICATOR (CIRCUIT CE)

BITY

:SIGNAL QUALITY DETECT (CIRCUIT
JMODEM IN TEST MODE (RS 449 ONLY CIRCUIY TM)

sREQUEST

sREADY IN

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
MACY11 30A(1 052)
CZCLKB.P11
16=JUN-81 14:38
GLOBAL EQUATES SECTION

4667
4668
4669
4670
4671
4672
4673
4674
4675

20C
1
040000
004000
000400
002000
000004
000100

)

RDO=
BI1?7
BACC=
BITO
MCLR=
BIT14
LULOOP= BIT11
MAINTB= BIT8
HALFDB= BIT10
RXBIT= BIT2
IEO=
BIT6

J &
16=JUN=81

14:39

PAGE 13-12

;BUFFER ADDR. CHAR COUNT
sMASTER CLEAR
sLINE UNIT LOOP(TTL)
JMAINT MODE BIT
JHALF DUPLEX BIT
:RX BI7
;ENABLE OUTPUT INTERRUPT BIT

SEQ 0048

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

16=JUN-81

14:39

PAGE 13-13

4677
22773

.SBTTL
LSBTTL

4680
4681

4
; THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED

468

4685

JMESSAGE BYTE COUNT TABLE

46B§

4684

4687

002150

4689
4690
4691
4692
4693
46946
4695
4696
4697
ggg

002152
002154
002156
002160
002162
002164
002166
002170
002172
002174

4688

002152

MSGOC:

000001
000001
000001
000100
000072
000101
000000
000001
000005
000204

MSG1C:
MSG2C:
MSG3C:
MSG4C:
MSG5C:
MSG6C:
OPCNT:
MSG8C:
DLLMIC:
DLLM2C:

2778?
002176

4710

002214

2;]'1

4713

4714
4715
4716
4717
4718
4719
4720

4;%1

.WORD

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

EMSGO-MSGO

EHSG1-HSG1
G;-nsog
-MSG
EHSG‘-HSG‘
EMSGS5-MSGS
EMSG6-MSG6E
O
EMSG8-MSG8
DLLMIE-DLLMI
DLLMZ2E-DLLMZ2

;sBYTE COUNT OF MESSAGE #0

;BYTE COUNT OF MESSAGE #1
sBYTE COUNT OF MESSAGE #
;sBYTE COUNT OF MESSAGE #
sBYTE COUNT OF MESSAGE #4
;BYTE COUNT OF MESSAGE #5
;sBYTE COUNT OF MESSAGE #6
sBYTE COUNT FOR OPERATOR
S
PEC'D MSG.
;BYTE COUNT OF RECEIVE BUFFER FILL PATTERN
sDLL MSG 1 COUNT
sDLL MSG 2 COUNT

;MESSAGE ADDRESS TABLE

4702

4703
4704
4705
4706
4707
4708
4709

IN MORE THAN ONE TEST.

DMSGCT

000001

GLOBAL DATA SECTION
DEFAULT MESSAGE DEFINITIONS AND TABLES

002176
002200
002202
002204
002206
002210
002212

002220
002221
00222
00222
002224
002324
002416

002216

002646

002220
002221
002221
002222
00222
00222
002
002224

DMSGAD
:

002524

000

MSGO:

377

252
125

002224

7321

;sADDRESS
;ADDRESS
sADDRESS
sADDRESS
;ADDRESS
;ADDRESS
;ADDRESS

MSG8

;ADDRESS OF RECEIVE BUFFER FILL PATTERN

OPBUF

4722 002226 177603 157427 031011
002232

MSGO
MSG1
Hsgg
MS
MSG4
MSG5
MSG6

EMSGO:
MSG1:
EMSG1:
MSG2:
EMSG2:
MSG3:
EMSG3:

MSG4 :

OF
OF
OF
OF
OF
OF
OF

MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE

#0
M
#
#
#4
#5
#6

;ADDRESS OF OPERATOR SPEC'D MSG.

BYTE

000

JMESSAGE OF ALL 0°'S

.BYTE

377

JMESSAGE OF ALL 1°'S

.BYTE

252

JMESSAGE OF ALTERNATING 1°'S

.BYTE

125

JMESSAGE OF ALTERNATING 0°'S

WORD

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

CITT'" 512-BIT (vS. 511 BITS) TEST PATTERN

163715

105221

014116

052

WORD

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

3764

.WORD

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

870071

.WORD

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

002240

143325

0022228

172

142304

4723

002244

4724

002
885266

111337
030030

111523
145064

4725

002304

066
05201

53627

105025

123754

SEQ 0049

CZCLkBO DMR,DMC-11 DAYA CW
16=JUN-81 4:38
CZCLkB.P11
4726
4727
47

028e

4729

166632

LINK TEST

016761

MACY11 30A(1052) 1k-.nn-a1 14:39 PAGE 13-14
DEFAULT MESSAGE DEFINITIONS AND TABLES

EMSGé4:

MSGS :

077577
04%51
04550
04712
045040

"1'1415Rmo(op1csssoa TEST PROGRAM'S (ITEP)'* MESSAGE

ASCII

<1775<1775/8A THE QUICK BROWN FOX JUMPED OVER THE LAZY DOG./

LASCIZ

<155<12><001><177><177><177><177>

020104
052040
4730

EMSGS:

4731
4732
4733

MSG6 :

ALPHA-NUMERICS (OR FUTURE COMM TURNAROUND MSG)

LASCII /a8 c'ofl.-.oizsasen«;: <=>7@ABCDEF
GHI JKLMNOPQRS TUVWXYZ /

050520
053526
057135

LASCIZ
EMSG6
s

2/[\]1*_%?

.EVEN

ARANANAAAAAAAA AN

AN AN A AN AAAAAAAAAAAAAAAAAAAAAFAAAAAAAAAAAAAAA
AR
OY

:THESE THREE STORAGE AREAS MUST NOT BE SEPERATED

040445

002520
002524
002646

OPBFPT:
OPBUF:
:
OPEND

.ASCII
.BLkB

/INZA/
82.

!!!!

;BUFFER FOR OPERATOR SPEC'D MESSAGES

; THE ABOVE THREE LINES MUST BE KEPT TOGETHER
s

MSG8:
EMSG8:

8888%

002646
002647

RAARAAAAAAAAAAAAAAAAAN
AR AAAAAAARAAAAAAAAAAAAAAAAAAAAAAARAAAAAAARAORS

.BYTE

:RECEIVE BUFFER FILL PATTERN

; DOWN-LINE-LOAD MESSAGE DEFINITIONS
....ENTER MOP MODE MESSAGE FORMAT
THE WE WILL ENTER MAINTENANCE MODE ONLY IF THE PASSWORD MATCHES.

DLLMI:

-BYTE

PASS2:

.BYTE

PASS1:

PASS3:
PASS4:

DLLMIE :
DLLM2:

.BYTE

.BYTE
.BYTE

0
0

;BINARY CODE FOR mmewwce MODE
*PASSWORD BYTE #1

LEGAL

VALUE
0 - 255

:;wu.us IN BYTE 1 IS oupuweo HERE
:3:AND HERE
:AND HERE
.

éMS ENTER MOP MODE MESSAGE FORMAT

nenonv LOAD WITH TRANSFER ADDRESS MESSAGE FORMAT

BYTE

: CODE

SEQ 0050

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

CZCLkBO DMR,DMC~-1 1 DATA COMM. LINK TEST
CZCLKB.P11
16=JUN-81 14:38

476%
4763
4764
4765
2;2?

002655
002656
002657
002660
002661

00C
006
000
000
000

BYTE
BYTE
BYTE
BYTE
BYTE

4
A
4776
4775

4776

4777
4778
4779

4780

4781
4782

002662
002666

002672
002676
002700
002704
002710

4784
4785
4786
4787

l‘:;gg
4790

005037
012706

012701
010700
062700
105761
100375

002712
002716
002720

112061
00137
012737

002732
002734
002742

000777
006412
046440
042507
051040
042526
041503
046125
047105
052040

002726

002756
002764
002772
003000
003006
003014

4783

;LOAD NUMBER
;LOAD ADDRESS LSB
;LOAD ADDRESS

: IMAGE DATA

ggg
4770
4771

0O
6
O
O
O

003022

003023
003030
003036
3044
003052

003054
003055
003056
003057

003060

005037

041

012
051056
020104
040522
000056
006
000
000
000

000006
001000

177560

000034
000004

1$:

000006

000026

000024

047502
051505
053440
041505
020104
051505
054514
020106
051505

052117
040523
051501
044505
052523
043123
026440
043117
020524

027015
046105
051120
027115

027056
040517
043517
027056

000026

CLR
MOV

o
#1000,SP

BPL

MOV
MOV
ADD
TSTB
MOVB
BNE
MOV

MSG:

DLLMZE :

CLR
BR
LASCII

#177560 R1
PC.RO
#<MSG~-.> RO
4&(R1)

JSET UP TTY
;MAKE ADDR.PIC
;ADDRESS MSG.
:TTY READY?

(RO)+,6(R1)
1%
#26,a426

;TYPE A CHAR
;KEEP GOING
;SET UP POWER FAIL

;WAIT TIL YES

MKE SURE T BIT CLAER

JUMP ON YOURSELF
<12><15>/B(X)T FESSAGE WAS RECEIVED SUCCESSFULLY =END OF TEST!!/

LASCIZ

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

.BYTE
.BYTE
.BYTE
BYTE

()
0
0
O

.EVEN

ffXT FOUR BYTES CONTAINS TRANSFER ADDRESS
;OF PROGRAM JUST DOWNL INE LOADED.
...THIS PROGRAM STARTS AT ADDRESS 6.

;END MEMORY LOAD MESSAGE FORMAT

cg(z:&gsg‘?m.mc-u DATA COMM. LINK TEST

MACY11 30A(1052)

16=JUN=81 14:38

16-JUN-81

14:39

PAGE 13-16

DEFAULT MESSAGE DEFINITIONS AND TABLES

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

000122
000000
000000
000000
013232
013245
013362
013447
013474
013553
013631
013721

CMDBUF: .BLKB
KEYWD1: .WORD
QUALFG: .WORD
QUALVL: .WORD
HLPTAB: .WORD
.WORD
.WORD
JWORD
JWORD
JWORD
.WORD
:
HLPEND

WORD

82.
O
O
O
HLP1
HLP2
HLP3
HLP3A
HLP%
HLP4A
HLPS
HLP6

:INDEX TABLE FOR REPORT "RPT>' HELP MESSAGES

014057

RHLPTB: .WORD

RHLP1

014166
014220

"WORD
.WORD

RHLP%
RHLPS

014102
014135

014257
014316

000000
020342
020402
020432
020467
020532
020566
0
0

020717
020751
021003
021035
021065
021114
021146
021176
021226
021255

021307
021333
021365
021410
021463
021513
021544
021627
021664
021721
021756
022042

;BUFFER FOR OPERATOR COMMANDS
*THIS LOC WILL =1 IF CLEAR TYPED, 2 FOR SHOW,
* A& IF RUN WAS TYPED, 5 IF HELP WAS TYPED
*THIS LOC HOLDS QUALIFIER VALUE (SIZE OR COPY)

"WORD
"WORD
"WORD
.WORD

REV B BY EC

RHLP2
RHLP3

RHLP6
RHLP7

RHLPEN: .WORD O
:END OF REPORT HELP TABLE
:INDEX TABLE FOR DMR BASE TABLE DATA DESCRIPTION MESSAGES REV B BY EC
DMRIND: .WORD DMROOO
.WORD DMROO1
"WORD DMR002
.WORD DMROO3
.WORD DMR00%
.WORD DMR0OS
.WORD
-WORD

DMR006
DMR007

.WORD
.WORD
-WORD

DMR017
DMR020
DMR021

.WORD
.WORD
"WORD
.WORD
.WORD
.WORD
.WORD
-WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
"WORD
.WORD
.WORD
.WORD

DMRO10
DMRO11
DMR012
DMRO13
DMRO1%
DMRO15
DMRO16

DMR022
DMR023
DMR024
DMR02S
DMR026
DMR027
DMRO30
DMRO31
DMRO3
DMRO3
DMRO34
DMRO3S

SEQ 0052

(1052)

DEF INITIONS

14:39

PAGE 13-17

AND TABLES

DMROS
DMROS

DMROS

DMROS
DMROS54
DMROSS
DMROS
DMROS

1
1
1

00
%0
%

DMRO61

DMRO65
DMR

8% t8hvcssitisre

:
DMREND

838 SI8IIIIIIIIII

§ §3333a5aaaaaER suss 3333333333333333333338 2

16=JUN-81 14:38

s INDEX
DMCIND:

G0 SSRGS SSReesREARRIRRRISSSRROOnSS

52
LKB.P1

-3
)

LOMC=11 DATA COMM. LINK TEST

01
053

1
1
147
206

14464
14505
14525

:
DMCEND

014473
1‘51;
01453

014500
014520

SHTYTB:

W197

;NO DMR MESSAGES MUST FOLLOW DMREND

FOR DMC BASE TABLE DATA DESCRIPTION MESSAGES REV B BY EC
DMUNKN

DMC

sNO DMC MESSAGES MUST FOLLOW DMCEND

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

¢ THE LIST OF BYTES BELOW ARE THE FIRST BYTES OF THE PREDEF INED MESSAGES
: USED TO ''SHOW'' THE TRANSMIT AND COMPARE BUFFER CONTENT®.

3504

B oW

S1§

377

SHTAB:

SHTEND

.BYTE

" LEVEN

0,377,252,125,203,177,043

SEQ 0053

4901

490
4904
4905

E
2&

b
)
5
5

4909
4910
4911

0035
0035
0035

zg} ¢

003542

4912

00354

016544

16554

14 g
14
14604
14621
1

14635
14645
14656

(10 )

.WORD

+WORD
- WORD
+WORD

noi

+WORD

+WORD
JWORD

LOOPS:

816664

1-J

14:39

PAGE 13-18

DEFINITIONS AND TABLES

;ADDRESSES OF MODE TYPES IN ASCII

MO4
MO6

.WORD
+WORD
+WORD

LP?
LP
LP

JWORD

LPé¢

JWORD

014677

lzgjl'S
4917
4918
4919
4920
4921
4922
4925
4924

MODES:

22
;1

,DMC=11 DATA COMM. LINK TEST

ZCLKBO
CSCLG.P!P
16=JUN-81 14:38

;ADDRESSES OF LOOP TYPES IN ASCII

;COMMAND LINE TRAVERSE LOCATIONS (USED BY 'PSTRV'")
003544
0035
003550
003552
0035
003556
003
003561

000000
000000

A: .WORD
PSTREE: .WORD

0
0

000000

PSNUM:

000000
000000
000000

000
000

PSACT:
PSCNT:

.WORD
.WORD

PSRADX:

.WORD

PSNNUF: .BYTE
P$GDBD: .BYTE

O
0

:LOC. TO HOLD ADDR. OF CMD LINE BUFFER
sLOC. 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)
:RETURN =0 IF ENOUGH OF COMMAND FOUND
:RETURN CODE O IF NO ERROR FOUND

SEQ 0054

16=JUN-81 14:38

D 5

16=JUN=81

14:39

MESSAGE BUFFERS AND POINTER TABLES

TXBUF:
RXBUF:

.BLKB
.BLKB

PTRTAB:
PTREND:

.BLKW

.BLKB

RXPTR:
.WORD
TXPTR:
.WORD
CMPPTR: .WORD
CMPTOT: .WORD
CTOTCC: .WORD
CCURAD: .WORD
DVTXA:
DVTCC:
DVTCT:
TXMTOT:
TTOTCC:

.WORD
.WORD
.WORD
.WORD
.WORD

DVRXA:
DVRCC:

.WORD
.WORD

RXMTOT:

.WORD

TCURAD:

DVRCT

LNCNT:

NOBUF:
PSCNT:

.WORD

+WORD

.WORD
.WORD
.WORD

ERRCNT: .WORD
STADD:
.WORD
ENADD:

BYTBIT:

.WORD

:OTHER MESSSAGE

MSGTYP: .WORD
CURCC:
CPTRR:
CPTR:
D:
TOTCC:

.WORD
.WORD
. WORD
.WORD
.WORD

TEMP2:
TEMPS:

.WORD
.WORD
.WORD

OFSET:
TEMP:
TEMP1:

TEMPS4:
TEMPS:
CONOTM:
CONTIN:

GOOD :
BAD:

INDEX:
INDEXE:

s TRANSMITTER BUFFERS
sRECEIVER BUFFERS

SEQ 0055

.WORD
.WORD
.WORD

BYTE
.BYTE

.WORD
.WORD

- «

; COMPARISON BUFFERS
: TABLE FOR MESSAGE ADDRS. € BYTE COUNTS
: END OF MSG. PTR., TABLE
BieleleleleleleiNeoleleleieleleleleleielelelelale]

CMPBUF :

PAGE 13-19

MESSAGE BUFFERS AND POINTER TABLES

SBTTL

sRECEIVER MESSAGE POINTER

s TRANMITTER BUFFER POINTER

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

;DEVICE TX ADDR
sDEVICE TX CHAR COUNT

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

sDEVICE RX ADDR

:DEVICE RX CHAR COUNT
;DEVICE RX MESSAGE COUNT
;RX MSG TOTAL

sNUMBER OF OPERATOR AWAKE MSGS

:NUMBER OF NO BUFFS
;PASS COUNTER

ERR@ COUNTER

OR DUMP
BYTE BIT roa DUMP ROUT INE

ELATED STORAGE LOCATIONS

CZCLkB. P1

MACY11 30A(1052)

,OMC=11 DATA CW LINK TEST

(elelelalelelelalelelelelelelelelale

;TYPE OF DATA 0=0'S,1=1'S,2=10'S,3=01"'S

:4=CCITT, s-oulcx FOX, 6-ALPHA/MH 7=0PER
;TX/RX/CMP CHAR
(
: CURRENT RX mmen

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

;CONTROL OUT ERROR MSG. ADDRESS
;WORD FOR CONTORL IN
;BYTE TO HOLD EXPECTED MESSAGE DATA BYTE FOR ERR REPORT
;BYTE TO HOLD RECEIVED MESSAGE DATA BYTE FOR ERR REPORT
;WILL CONTAIN POINTER TO DMC OR DMR MESSAGES
;WILL CONTAIN POINTER TO L/ T OF DMC OR DMR MESSAGES

WORD

00000C

;LAST LOCATION IN BASE TABLE TO BE PRINTED

; MORE X'DEPE'OGNT CODE STNAG; kogAnons

.WOR

PCADD:

.WORD

RESFLG:

.WORD

0 BASE TABLE

LOGUNT : .voao
DCLFLG:

MODTYP:

000000
000002

.WORD

FHDPLX:
PARAM:

.WORD
.WORD

FLAG:

(RS
el o oY

.WORD

MLTYP:

RPASS:

:LOC. TO HOLD LOGICAL UNIT NUMBER
:LOC, HOLD PC OF CALLIN ROUTINE
sCLEANUP AND EXIT FLAG. 1=DO CLEANUP ROUTINEREXIT
;LOC_TO HOLD FLAG (=1) THAT A RESTART WAS GIVEN

.WORD

:MODE DISPATCH TABLE

MODE:

.SBTTL

CLKCSR:
CLKBR:
CLKVEC:

CLKHMZ:
CLKEN:

.WORD

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

.WORD
.WORD
.WORD

.WORD
.WORD

TIMMIN:
TIMSEC:
TIMTCK:

.WORD
.WORD
.WORD

TIMER1:
TIMER2:

.WORD
.WORD

TIMERS:

.WORD

;
% INTERNAL
: "‘“,‘,’.,
EM-ANALOG LOOPBK (Lgc
: &=MODEM=DIGITAL LOOPBK (REMOTE) =mp$
[PULL OR HALF DUPLEX FLAG (1=FULL FROM P=TABLE)

:PROGRAM PARAME TERS
STATUS MSGS TO OPR PRINTED (1=YES)
;
: BIT1= DATA CHECKING DONE gu RCVD MSGS (1=YES)
: .m: EcumoE (TRANSMIT) RCV'D MSG. (PASSIVE) (1=YES)

RXONLY
TXONLY
PLCK
ALCK
DLL
TALCK
LISCK

—

BDATA:

007454

ME SSAGE BUFF ERS AND POINTER TABLES

4983

MACY11 30A(1052) ‘li-JW-O‘l 14:39 PAGE 13-20

.DMC=11 DATA COMM. LINK TEST
16=JUN=-81 14:38

: BITé= CRC CALC./CHECK DONE (1=YES)
: BITS= PROTOCOL EMULATION (1=YES)
: BITé= SPARE
:PASS NUMBER FROM RUN COMMAND
:D=VICE FLAG WORD
:RX ONLY DISPATCH
;TX ONLY DISPATCH
sPASSIVE LOOP BACK DISP
sACTIVE LOOP BACK DISP
;DOWN LINE LOAD DISP
;TALK MODE DISPATCH
;LISTEN MODE DISPATCH

%LOCK TMLE&.: EVENT LOG AND POINTERS
:C
SR _ADDRESS

OO0 OO0Oo OS

CZCLKBO
CZCLkB.P1

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

;CLOCK'S CSR VALUE TO INTRPT. ENABLE IT

;PLACE TO KEEP TIME=SINCE=-START

;PLACE TO KEEP # OF TICKS/SEC

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

e
SEQ 0056

ool

¢t 5
MACY11 30A(1052) 16=JUN=-B1
14:39 PAGE 13-21
CLOCK TABLES, EVENT LOG AND POINTERS

TA CW LINK TEST

4:38

;EVENT LOG TABLE AND ITS NEXT ENTRY POINTER

EVIPTR: .WORD
EVILOG: .BLKW

?VTLOG
225

.SBTTL

MODEM DATA SECTION

EVTEND:

MODS:

.BLKW

.WORD

;POINTER TO NEXT FREE SPACE IN EVENT LOG
;EVENT LOG BUFFER

:APPROXIMATE END OF EVENT TABLE (ALLOWS CIRCULAR QUE)

:MODEM STATUS

?????ggg

;TABLE OF MODEM SIGNAL BIT DEF INITIONS
MOBITS:

TE]:
MOB

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

(TS
DSR
DCD
RTS
RI
SQD
TM

;CLEAR TO SEND (CIRCUIT CB)
:DATA SET READY (CIRCUIT CC)
:DATA CARRIER DETECT (CIRCUIT CF)
*REQUEST TO SEND (CIRCUIT CA)
*RING INDICATOR (CIRCUIT CE)
:SIGNAL QUALITY DETECT (CIRCUIT CG)
:MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TTM)

;TABLE OF ADDRESSES OF MODEM SIGNAL MESSAGE POSITIONS
MOMSGS:

.WORD
.WORD
.WORD
.WORD

.WORD
.WORD
LWORD

EVMCTS
EVMDSR
EVMDCD
EVMRTS
EVMRI
EVMSQD
EVMTM

:CLEAR TO SEND (CIRCUIT (B)
:DATA SET READY (CIRCUIT CC)
:DATA CARRIER DETECT (CIRCUIT CF)
sREQUEST TO SEND (CIRCUIT CA)

*RING INDICATOR (CIRCUIT CE)
.
*SIGNAL QUALITY DETECT (CIRCUIT CG)
“MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TTM)

Prur Qe

S GS

[elelelelelelelels)

b e

d e

[elelelelelelelelele
o)

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

.WORD
LWORD
.WORD
.WORD
.WORD

EDTXQ
EDTXC
EDRXQ
EDRXC
EDDER

;TRANSMIT MESSAGE QUEUED
:TRANSMIT OF MESSAGE COMPLETE
:RECEIVE MESSAGE SPACE QUEUED
:MESSAGE necuveo - RECEIVE COMPLETE
:DEVICE INFORMATION

.WORD

EDDCK

:DATA COMPARISON DONE

.WORD

JWORD
.WORD
.WORD
.WORD

EDDVI

LPO
EDDLE
EDDDE
EDEOP

:DEVICE

INITIALIZE STARTED

:NULL STRING

:DATA COMPARE LENGTH ERROR
:DATA COMPARE DATA ERROR
:END OF PASS

:::FOLLOWING TABLE USED IN DOWNLINE LOAD ROUTINE.
:::CONTAINS POINTERS TO ASCIZ DEVICE DESCRIPTIONS

6LLIND: .WORD

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
LWORD

DPM

DUM
DLM
DGM
DAM
DUPM
DMCM
DNM
DLWM

SEQ 0057

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

MACY11 30A(1052)

3098
5094
3095
5006
3097
5008
5099
5100
5101

010564
0105
010570
010572
010574
010576
010600
010602
010604

020253
61
020263
020
020¢7

.WORD
.WORD
.WORD
.WORD
\WORD
\WORD
.WORD
.WORD
.WORD

DMPM
DTEM
DVM
DZM
UNKM
KDPM
KDZM
KLM
DMVM

5105
5106
§107
5108
5109
3110

010606
010610
010612
010614
010616
010620

000000
000000
000000
000000
000000
000000

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

0
0
0
0
0
0

CZCLKB.P11

5185

~ 16=JUN=B1 14:38

020307
020313
020316

$112

MODEM DATA SECTION

14:39

PAGE 13-22

;LOCATIONS USED DURING EVENT REPORTING
K

EVISEC:
EVIMIN:
EVITCK:
EVIADD:
EVIBCT:
EVITMP:

; TEMPORARY LOCS TO KEEP EVENT TIME WHILE REPORTING
;TEMP. LOC. TO MOLD ADDRESS DURING EVENT REPORTING
:
=
"""BYTE COUNT
'
,
:
.
** OTHER DATA
‘'
-

;REPORT CODING DISPATCH TABLE

5114
5115
3116
5117
5118
5119
5120
5121
5122
5123

010622
010624
010626
010630
010632
010634
010636
010640
Q10642
010644

031014
031014
031014
031014
031066
031162
031356
030642
03135
031302

RPTDSP: .WORD
.WORD
.WORD
.WORD
.WORD
'WORD
'WORD
WORD
.WORD
.WORD

RPTTXQ
RPTTXQ
RPTTXQ
RPTTXQ
RPTDER
RPTDVI
RPTDCK
RPT _
RPTDLE
RPTDDE

5126
5127
5128
5129
5130

010650
010652
010654
010656

000000
000000
000000
000000

DEVI:
DEV2:
DEV3:
DEV4:

0
0
0
0

3124

16-JUN-81

010646

031226

.WORD

.WORD
.WORD
.WORD
.WORD

RPTEOP

;TRANSMIT QUEUED ENTRY DECODING
:TRANSMIT COMPLETE ENTRY DECODING
:RECEIVER GUEUED 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

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

SEQ 0058

p—

i
D )

D
e
D e

SEQ 0059

MISS DISPLACEMENT

ONLY I7 "MISS'' ARGUMENT DEF INED

! NEXT NODE DISPLMNT

ONLY IF "ASCII'® ARGUMENT DEF INED

(ALWAYS AT LEAST 1 WORD)

; ASCIZ MATCH STRING

(.EVEN)

ONLY IF "ASCII'' ARGUMENT DEF INED

R OON

FRROS
W

- bi DDe

—

d e

[elelelelelele]

NG6S:

(LI

N40$:

(LI

N20$:

N25$:
N30$:

CLI

cLl
CLI
CLI
(LI
CLI

CLISPA,0.N10$
<'7>,HLP,N42S

CLIEXI,O
CLISTR,MLP,N43S,<'HELP'>
CLIEXI.O
CLISTR.PRNT,N44S$,<'PRINT'>
CLIEXI.O
CLISTR.EXIT,N458,<'EXIT'>
CLIEXI.O
CLISTR,RUN,N46S,<'RUN'>
CLIBR,0,

CLISTR,NOTUF ,N40S, <*DUMP* >
CLIBR,0,N508

CLISTR,CLEAR,N20S,<'CLEAR'>

CLIBR,NOTNUF .N100$
<'S>,NOTNUF ,N30$

CLISTR, SHOW,N25$,
<" HOW' >
cLIBR,0,N1008
CLISTR,0,N308.<'ET'>
CLIBR,0,N1108
CLIERR,D

:SKIP ANY LEADIN SPACES
i
:1S THE FIRST NON=SP CHAR A *%?

:
IF YES DO 'MLP'* AND EXIT
:ELSE, IS FIRST WORD A "MELP''
:
1F YES DO "MLPTM' AND EXIT
SELSE. IS FIRST WORD A ‘PRINT'
:
1F YES DO
"PRINT'* AND_EXI
SELSE.IS FIRST WORD AN "EXIT':REV B BY E
:
1F'YES DO "EXIT' AND EXIT
SELSE, IS FIRST WORD A ‘RUN''
:
1F YES DO “RUN' & GOTO N8OS

:ELSE, IS FIRST WORD A ‘DUMP''

1F YES GOTO N8OS

1F YES DO "CLRTM & GOTO N100S

:ELSE, IS FIRST WORD A ‘‘CLEAR"'
:ELSE, IS FIRST CHAR. A 'S’

: 1F YES 1S REST OF WORD ‘WOW''
: _ IF YES, DO _‘‘SHOW'',BR N100S
: ELSE, IS'REST OF WORD "ET'
:
_IF'YES, DO ‘SET’, BR N1108
OTHERWISE “ILL CMD'* < EXIT

N81$:

NN
R bbb b
LD

Y
e

N80$:

b
T
S

—

VSN

[

Pl -

;SECOND KEYWORD (MODE=) FOR RUN COMMAND
(elelelelelelelelelelelelele}

R R R R B YAV
B

PAGE 13-23

CHAR CODE

! ACTION

;FIRST KEYWORD
CLI
N10$S:
CLI
CLI
N62$:
CLI
CLI
N43$:
CLI
CLI
N44S:
CLI
CLI
N45$:
CLI
LI

AT T

14:39

CLITRE:

N AN IID SRR R 2B TS T

AT T AT —Te DT eT ) )T DT
i
i
i D D ) D e
D o

Y A S S

i
D e

LA TEATEATEAE
LA
R TR N T 2

) e

;SAMPLE CLI TREE NODE

D
D
D
D e
d
D
)
)
d
D e
—d
— e

COMMAND LINE ACTION TREE

AT T

D
D

D
D d d e
D d

VI
TN TN VT TA T

H 5
16=JUN=-81

MACY11 30A(1052)

16~JUN-81 14:38

;

,DMC=11 DATA COMM. LINK TEST

N828:
N83s:

N84s:
N8S$:
N86s:

(LI

CLISPA,0,N308

€Ll
(LI
€Ll
(LI
CLI
(LI
CLI
(LI
ctl
(LI

CLIBR,0,N1158
: "IF_YES, DO ‘ACTIVE'',BR N115%
CLISTR fimngo.nass.cmssxvsw ;1S NEXT WORD ‘PASSIVE”
CLIBR,0,N1158
: "IF_YES, DO 'PASSVETM',BR N1158
CLISTR, RE MOD.NB4S, <'RECEIVE'> IS NEXT WORD [RECEIVE
CLIBR,0,NT158
: _IF_YES, DO 'RECVE',BR N1158
CLISTR,(1SMOD,N85S,<'LISTEN'> :1S NEXT WORD ‘LISTEN"
CLIBR,0,N1158
i, IF YES, DO ‘LISTEN",BR N1158
CLISTR,DLLMOD,N86S
, <* DOWNL INELOAD*>
;IS NEXT WORD “Dow,,."*
CLIBR,0,NT158
: IF YES, DO 'DWNLLTM.BR Niis
<'1>,0,N308
1S NEXT CHAR A *°T

(LI
LI
CLI

CLISTR.NQTNUF,N308,<'MODE'>
<'=>,0.N
CLISTR,ATVMOD,N82S,<'ACTIVE'>

:SKIP_LEADING SPS, IF, NONE-ERR

:IS NEXT WORD ‘MODE="'
:
TIF NO, IT'S WRONG =ERR <EXIT
:IS NEXT WORD 'ACTIVE''

<11 DATA COMM. LINK TEST

MACY11 30A(1052) 1&-JW~81 14:39 PAGE 13-24

CZCLKBO DMR,DMC
ICLKB.P11 ~ 16=JUN=81 14:38

5189

811 54

5190 011272
§191 011276
3195

011310

§195
5196

o11§14

5198

0113

s}g‘

5197 011

§199

200

5201

§202
5203
5204
5205

011g28

011

011362

5206 011366
5207 011404
5208 011410

gg?g 011430
5211
5212
5213
5214
<5215
5216
5217

011434
011440
011444
011450
011454
011460

2519

011470

5218

20
5221
gzzi
223

5224
5225
5226
5227

3558

011464

011474
011500

011504
011516
011522
011536

5235

g;sg

gs
115642
39
011560

%0
‘1

011564

11600

gsg 11604
S

gss
58

izso

11230
011624
11640

SE? 011644

SEQ 0060

COMMAND LINE ACTION TREE

N878:

cLl

CLISTR,

CLIBR,0,NT15$

Ll
CLI

TRAMOD ,N878,<'RANSMIT'>

CLIBR,0,N1158
CLISTR, TALMOD,N30S,<'ALK'>

:SECOND KEYWORD (FOR CLEAR OR SHOW)
N100S:
CLI
CLISPA,0,N30$

N1028:
N104S:

CLI

CLISTR.CSHEXP,N104S,
< EXPECT'>

; IS REST OF WORD ‘RANSMIT'’

¢ IF YES, DO '‘TRANSM'',BR N115%
: IS REST OF WORD '‘ALK”
:

IF YES,

DO ''TALK'',BR N115%

: IF NO, ERROR = EXIT

;SKIP LEADING SPACES, NONE=ERR

:IS NEXT WORD 'EXPE...''

CLIEXI.O

: IF YES, DO CLR=EXP,EXIT

cLl

CLIEXI.O

: IF YES, DO CLR=TRN,EXIT

CLI

CLISTR,CSHTRN,N30S,<' TRANSMIT'> 1S NEXT WORD

SIF NO = ERROR = EXIT

;SECOND KEYWORD (FOR SET)
N110$:
CLI
CLISPA,0,N30$

N1118:
N1128:

CLI
Ll
CLI

cLl

CLISTR,SETEXP,N1128,<"EXPECT'>
CLIBR,0,N1208
CLISTR,SETTRN,N30S,<' TRANSMIT'>

cLIBR,0,N1208

:GET ADDRESSES FOR DUMP COMMAND
NSOS:
CLI
CLIALP,0,N51$
N518:
CLI
CLISPA,0,N528
N528:
CLI
CLIOCT .DMPS ,N30$
€Ll
<'=>,NOTNUF .N125%
Ll
CLIOCT,DMPE .N30$
Ll
<'/> ,NOTNUF .N125%

cLl

<'B>.pMPa ,N30$
CLIBR,0,N1258

;QUALIFIERS FOR THE RUN COMMAND
N1158:
CLI
CLIALP,0,N114$
N114$:
CLI
<'/> ,NOTNUF ,N1258

N1168:

cLI
CLI
cLl
Ll

CLISTR,NO, NT168.<'NO*>
<'C>,0.N1178
CLISTR, CHECK ,N1178,<'HECK*>
CLIBR,0,N1158

:N1138: CLI

CLISTR,CRC,N308,<'RC16'>

N1178: CLI
cLl

CLISTR,STATUS,N1188,<'STATUS'>
CLIBR,0,N1158

cLl

N118$:

CLI

cLl

N130$: CLI
N1318:

Ll
CLI
Ll

N1328: CLI

cL1BRr,0,N1158

CLISTR,ECHO,N1308,<'ECHO'>
CLIBR,0,N115$

CLISTR,0,N1318,<'PASS*>
CLIBR,0,N1508
CLISTR,0,N1328,<'LOOP">
CL1BR,0,N1408

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

'‘TRANS..''

:MODEM ACTION

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

(ZiLxkB.P11

MACY11
30A(1052) 1z°JLN-l1 14:39 PAGE 13-25
COMMAND LINE ACTION TREE

16=JUN-81 14:38

CLl

NENGKGoRS

e g

i
e

s Y

e I

)

[elelelelelelelelelelele]

purd

011660

CLIBR,0,N1158

SEQ 0061

: ;ADDED BY EC

;GET MESSAGE TYPE FOR SET MESSAGE COMMANDS
N120$: CLI
<'=>,0,N30%
NAME
__LOOK FOR DEFAULT MES
;
CLISTR6CHS ‘nsu.coms':»
CLI
N6OS:
cLIBR,0,N121
Ll

NS1S:

N628:

N63S:
N64S:
N6SS:

N66S:

CLI
Ll
CLI
Ll
CLI
Ll
CLI
Ll
Ll
CLI
Ll

CLISTR, CMSGO,N628,
<" ZEROES'>
cLIBR,0,N1218
<" 1ALT'>
CLISTR,CMSG2 ,N63S,
cLIBR, 0 N1
CLISTR,CMSG3,N64S,
< 0ALT'>
cLIBR,0,N1218
CLISTR, CMSGS ,N65S,<' ITEP*>
cLIBR,0,N1218
CLISTR,CMSG4 ,N66S,<'CCITT'>
CLIBR,0,N1218
CLISTR,CMSG6,N67S,
<" ALPHA'>
cLIBR,0,N121$

cLl

cLIBR,0,N1258

CLI

N678: CLI

CLISTR,SETET
NGBS, <'TRANSMIT'> ;REV B BY EC
*REV B BY EC

;
__LOOK FOR QUOTED MESSAGE
N68S:
(LI
<''>,0PRMSG,N308
N70S:
CLI
<'"'>,ENDQO,N71$
CLI
- CLIBR,0O,N121$

N71$:

CLI

CLISPA,O.N gs

N73$:

CLI
CLI

CLIBR,0,N708
CLIERR,BADCHR

VIS NN —

SRR

5307

_._n_n:-a-a

NZRERY

P
SR

_ -

[=lele]

[elelelelele]

e 4

N728:

(LI

CLIALN.O.N73$

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

.
:PRINT ERROR IF NONE LEGAL CHAR FOR '"S

;GET QUALIFIERS (SIZE OR COPY) FOR SET MESSAGE COMMANDS
N1218:
CLI
CLIALP,0,N1238
N1238:
CLI]
<'/> ,NOTNUF ,N125%
N1228:

cLI
cLl

CLISTR,SIZE.N1228,<'SIZE'>
CLIBR,0,N1268

cL18Rr,0,N1268

CLI

CLISTR,QCOPY,N308,<'COPY'>

:NUMER FOR SIZE OR COPY

N126S:

CLI

<'=>,0,N308

cLl

CLIBR,0,N1218

cLl

CLIDEC .NUM,N30$

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

N140$:

CLI

<'=>,0,N308

N141$:

CLI

CLISTR, TTLLOP,N1428,<' INTERNALTTL'>

N142$:
N143$:

N144S:

cLl
CLI
cLl
CLI
Ll
CLI

CLIBR,0,NT15$
CLISTR, CBL 2P.N1438.<'CABLE'>
cL1BR,0,N115$
CLISTR,(MDLOP,N144$,<'LOCALMODEM'>
cL1BR,0,N115$
CLISTR,RMDLOP,N30$, <*REMOTEMODEM"® >

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

TA COMM, LINK TEST
1 14:38

cLl

14:39

CLIBR,0,N1158

:GET LINE NUMBER FOR ‘PASS'' RUN QUALIFIER

N150%:

CLI

Ll
Ll

=L INE
s END=OF
125%:
CLI

<'=>,0,N

CLIDEC .PASC ,N30$
cL1BR,0,N1158

CLIEXI.O

PAGE 13-26

—

SEQ 0062

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

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
CZCLkB.P11
16=JUN-81 14:38
5349
S?SO
5351

PAGE 13-27

sDEVICE DEPENDENT STORAGE LOCATIONS FOR

g g

;

5356
SgSS
256
357
5358
5359
5360
5361
S36§
5363
5364
5365

0 ggg
01
012362
012§z
012
012
012370
012370
012372
012374
012374
012376

5368
5369
5370
5371
5372
5373
5374
5387
5397

012400
012402
012404
012406

5398

14:39

000000
000000
000000
000000

CURRENT DEVICE PARAMTERS

SELO:
BSELO:
65551:
SELZ:
BSEL2:
BSELS:

.WORD
WORD

O
0

.WORD
.WwORD

0
O

.WORD
.WORD

0
O

000000
000000

SELS:
BSEL4:
BSEL5:
SEL6:
BSEL6:
BSEL7:

.WORD
.WORD

0
O

000000
000000
000000
000000

INVEC:
.WORD
OUTVEC: .WORD
INTPRI: .WORD
OPTYP:
.WORD

0
0
0
0

000000
000000

ERRTBL

;ADDRESSES OF REGISTERS SELO THRU BSEL7

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

SEQ 0063

MACY11 30A(1052)
CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16~J UN-81 14:38
CZCLKB.P11
GLOBAL TEXT SECTION
5400
5401

.SBTTL

14:39

PAGE 13-28

SEQ 0064

GLOBAL TEXT SECTION

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

012410
012410
012410
012416

Se %e 8,

SBTTL

046504
026503
012424

026122
030461

8320

SBLSTRERb
I 2

308

m S5
16-JUN-81

DEVICE SUPPORTED

NAMES OF DEVICES SUPPORTED BY PROGRAM
DEVTYP

046504
000

;

012424
012424

012470

PROGRAM IDENTIFICATION
<CZCLKBO DMR, DMC~=11 DATA COMM. LINK TEST>
LSDESC::

".ASCIZ

052123

/DMR,DMC~11/

TEST DESCRIPTION

DESCRIPT
055103
020060
042040
020061
041440
046040
042524
012476

LSDVTYP::
LASCIZ
.EVEN

.SBTTL

5429

<DMR,DMC=-11>

.EVEN

/CZCLKBO DMR, DM

N 5
MACY11 30A(1052) 16=JUN-81 14:39 PAGE 13-29
GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

CLKBO DMR,DMC-11 DATA COMM. LINK TEST
LKB.P11 ~ 16=JUN-81 14:38

3445
.SBTTL
3430 0 %‘76 041504 052114 000076 CLISPM: .ASC1Z
3]
%

01250
O

050122
047045

03712
040445

5,
5455
3
5457
3458
5459

01
012607
0126er
01
012734
013001
013032
013122

045
045
043
045
047045
045
047045
040523

022516
022516
02o516
022516

5453

5461

3462 01314

0132

047045

0d5

022516
04
052126

044477

CLISRP: .A3i2
CLIERM: .ASCIZ

77 CLINUF: CASCIZ

037501
037501
037501
037501
77
037501
050077
046105

CLINBG:
CLIBRX:
CLIBDL:
CLINPS:
CLIBCR:
CLISEO:
CLIPW:
DLLQ1:

022516 052101

HLPO:

045 022516 000126 MLPF:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
LASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

.ASCIZ

041504
040
040
040
0462040
051440
040

052114
046103
051120
054105
046525
052105
042523

041440
040505
047111
052111
020120
042440
020126

HLP1:
MLP2:

HLP3:
HLP3A:

.ASCIZ
.ASCII
ASCIT
ASCIT
-ASCIZ
.ASCIZ
.ASCIZ

013631

040

052522

020116

HLPS:

.ASCIZ

013770

020040

3,77 014057
5478 014102
5479 014135
5480 014166
5481 014220
5482 014257

. 104
047514
105
042510
040502
102

046103
020107
044530
050114
23
051501

014370
014430
016464

047045
047045
042532

5
5
047522

567
5468

5470

5471

013476 020040
013553
040

7% 013721

5475

040 0200c0 052115

5476 014020 047045

5483 014316 040502
5485

5487
5488
5490
5491
5492
5493
549
5495

5497
5498
5499
5500
5501
5502
5503

014473
014500
014505
014512
014520
014525
014533
014544
0145564
014565
014575
01
014621
014626
014635
014636
014645

050131 HLP4:
020040 HLPG4A:

117
040461
060
041503
052111
101
117
042522
051126
120
101
047504
126
044514
000
046057
111

042523

042516
052114
046101
052111
050105
050114
051120
042503
047101
051501
052103
047127
046101
052123
047517
052116

05452

0545264

030196
§5
020124

042457
027505

WLPG:
RHLPO:

RMLP1:
RHLPZ:
RHLP3:
RHLPG4:
RHLPS:
RHLPG:

047457 RHLP7:
051515
051505
000123
000126
000124
040510
051440
053111
046523
044323
053111
044514
000113
047105
036520
051105

RPTIV:
SHMSG:
SHTYPO:

SHTYP1:
SHTYP2:
SHTYP3:
SHTYP4:
SHTYPS:
SHTYPS:
SHTYP7:
MOO:
MO1:
MO2:
M03:
MO4:
MOS:
MO6:
LPO:
LPO0:
LP1:

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO
/DCLT>/
/RED>
/
:REV
B BY EC
/INZA?ILL CMD-BAD SYNTX?/

/INIA?INCMPLTE CM52/

/INZA?NUM TOO BIG?/
/INIA?BAD RADIX?/
/INIAZ'LOOP! VALID ONLY IN ACTIVE?/
/INZA?'ECHO'* VALID ONLY IN PASSIVE?/
/INTAZILL CHR~ A-7.0-9.SP.TAB' ONLY?/
/INXA?'SIZE=0'' NOT VALID?/
/EINTATTRANSMIT © EXPECT LIST MUST BE IDENTICAL FOR LOOP?/ ;REV 8 BY EC
/SATTELITE PASSWORD=
;REV B BY EC

/INZATWIS 1S DCLT. TYPE *M* OR "4 FOR DETAILS/

.ASCIZ /INXT/

013232
013245
013321
013331
013340
013362
03344

5465

.ASCIZ
.ASCIZ

/DCLT CMDS:/
/ CLEAR OR SHOW EXPECTLIST OR TRANSMITLIST/<15><12>
7 PRINT/<155<12>
/7 EXIT/<155<12> :REV
B BY EC
7 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,0ALT, ITEP,CCITT ALPHA?
/
OR "OPR SPCD=A-Z,SP,TAS,0-9 IN QUOTES'”

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

ASCIT

/ = MIYP=TRAN.REC.ACT.PAS.TAL, LES.DOWN/<15><12>

.ASCIZ

/INZATYPE ‘W'
OR "»" FOR HELP !/

ASCIZ

LTYP=INT,CAB,(OC, REMW/

:REV
B BY EC

ASCIZ
-ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/DCLT REPORT CHDS
:
:REV B BY EC
/LOG
- PRINT DCLT EVENT LOG/
:REV B BY EC
/EXIT
- EXIT REPORT LEVEL/
. REV
B BY EC
/HELP
- PRINT THIS MESSAGE/
:REV
B BY EC
!BASE/ERROR
= PRINT ONLY ERRORS!
REV
8 BY EC
IBASE/FULL - PRINT ENTIRE TABLE!
:REV B BY EC

.ASCIZ
.ASCIZ
.ASCIZ

/INIABASE OFFSET=303%A T00 BIG !/
?INIAMSG: TYPE=XTIA/SIZE=%D3?
/ZEROES/

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
(ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

SEQ 0065

IBASE/OFFSET=NNN
- PRINT SINGLE LOCATION'<15><12> :REV
B BY EC

/ONES/.
/1ALT/
/0ALT/
/CCITT/
/ITEP/
/ALPHA/
/OPR SPEC/
/RECEIVE/
/TRANSMIT/
/PASSIVE/
/ACTIVE/
/DOWNLINELOAD/
/TALK/
/LISTEN/
/7
?/LOOP=?
?INTERNAL?

:REV B BY EC

5
g
5
g
3

1
1
L4,

1671
147,
147,
147
14

1474
1474
1475
1(;?‘
147N

4 ?

&
4
g

7; g
1505

04
046124
124
0150

p-3

por gy

—

§
-.—M;g\;

&
&

Et-)

SIRIFGR 8?

~
~NO
o

31
5}

OMM. LINK TEST

MACY1? 30A(1052)

14:38
1
g

1?5
35 ;
5211

1
040526

052524

041505

000113

047510

000

117

8‘ 117

g 31
& 11
4510

6505

6101
002
020123

GLOBAL “ORMAT

16=JUN=B1

14:39

PAGE 13-30

STATEMENTS, MESSAGES, AND ASCII INFO

LP2:
LP3:
LPé ;
PN?T:
PST:
PNCK:
PCK:
PNEC:
PEC:

JASCIZ
+AS(C
+ASC
+ASC|
+ASC
JASCII
+JASCIZ
.ASCII
JASCIZ

2CABLE?
?LOCALMODEM?
?REMOTEMODEM?
/'?/
/STATUS/
/NO/
/CHECK/
/NO/
/ECHO/

PNMS:
PMS:
LISP:
OPRMM:
L5060:

.ASCII
+ASCIZ
.ASCIZ
ASCIZ
.ASCIZ
.EVEN

/NO/
;ADDED BY EC
/MODEM/
;ADDED BY EC
/INXALIS>/
/TLK>/
/THIS A 50. OR 60. HZ. LSI=11:/

531

: FORMAT STATEMENTS USED IN PRINT CALLS

537
5538

015030
0151

047045
047045

040445
040445

047504
040502

DLLCM:
NOCLK:

5540
5561

01522
01524

10;
045

043125
022516

042506
022524

BUFEX:
.ASCIZ
MSGTRN: .ASCIZ

022516

032523

SHFO:

5539

554;

gssz‘

81516

O1S§7§
01535

gé? 015413
gSSi 015453
5

9554
EgSS

339

015516
015550

115

047045

045

054101

020056
044103

TABEX:

051445
022465

022463
041501

gggg

.ASCIZ

MSGTRU: .ASCIZ

045 022516 032523 SHF1:
045 032523 040445 EFM2:

047045
051445

.ASCIZ
.ASCIZ

PCPM:
EFM11:

.ASCIZ

/XNXADOWN LINE LOAD COMPLETED SUCCESSFULLY/
/INXABAD CLOCK = PROGRAM WILL HANG ON '‘TIMEOUT''!!/

/MAX. CHAR. MSG COUNT EXCEEDED =/
/BUFFER FULL =/
/INXTXA
MSG. NOT BUILT !!/

/INXACHAR. CG{‘T EX EEDS BUFF LIMIT = MSG TRUNCATED/
?XNXSS5XAMODE=XTXTXTXA/PASS=%25?

.ASCIZ ?XNXSS5XSSXSSXA/XTIA/XTIA/XTRA/XT?
ASCIZ /XSSXATOTAL MISMATCHES IN MSG = XD5/
_ASCIZ
_ASCIZ

/INXS3XACALLED FROM PC=X06/
/XSS5XACOMPARE COUNT=XD5XS3XARECEIVE COUNT=XD5/

;EVENT DESCRIPTION MESSAGES

5560
5561
ngi

015625
015651
15700

1
124
0425 S

060522
04058
%5

051516
5151?
53111

EDTXQ:
EDTXC:
EDRXQ:

.ASCIZ
JASCIZ
.ASCIZ

/TRANSMIT MSG QUEUED/
/TRANSMIT MSG COMPLETED/
/RECEIVE SPACE QUEUED/

gg;?

016152

041101

7516

6522

EDMOS:

.ASCIZ

/ABNORMAL MODEM STATUS CHANGE/

56
5564
5565
5566
5567
5568
5569
557

gg‘o

15725
015753
815770
016020
01
0161
0161

1
1
040504
042504
040504
106
047105

50
53105
05
8245
524
052101
1

‘5?5
1511
1440
%50
460
2?1?
117

EDRXC:
EDDER:
EDDCK:
EDDVI:
EDDLE:
EDDDE :
EDEOP:

.ASCIZ
.ASCIZ
.ASCIZ
.ASC{
.ASC
.ASC{
.ASC

/RECEIVE MSG COMPLETED/
/DEVICE ERROR/
/DATA COMPARISON STARTED/
/DEVICE INIT AND SETUP/
/DATA COMPARISON LENGTH ERROR/
/DATA COMPARISON
DATA ERROR/
/END OF ‘PASS/

;ADDED BY EC

SRRRRAAARARRAAAAANAAAANCCCRAARARAARARARAANONOAAOANAARENRRESR

sTHESE TWO STORAGE AREAS MUST NOT BE SEPERATED !!!!

SEQ 0066

kKBO DMR,.DMC=11
DATA 14:38
C(H! LINK TEST
16=JUN-81

mcm 30A(1
15- 14:39 AND
PAGE ASCI?
13-31 INFO
?52)SVATE&NSSAGGS.

ZCL
CZCLkB.P11

:EVENT REMT{K RSSM!?

016207

040 041040 051501 BASMIA: .ASCIZ

16224 051445
4
§12$§3
043
§§%’s
g
1624
0670‘_5
744

0404

704
05144
045

44
5144
2
0315

0165}2

0165

016555
016657
016755

: JASC
$3%03/
Yous ::’;é
g;
7333508/
BASM1:
.ASC
/

’

:ssg
+ASC

46
4

+ASC
LASC

+LASC]

04744

045
8225
6 Oglss
045
%2516 0315
045 0O 551

017034

051445

022465

017120

047045

051445

7/ BASE TABLE/

31517

8]!6
0164?g 8:778‘45
78: E04‘2
51 ?’é%
016432
016504

SEQ 0067

03155

041107
022471

/?
/
/

VENT LOG

Tv?

»bzgZI{
NT L & l¥l$”<«««««(«««««««««’
E‘

s
106!

43 lm

BM"! COUNT=XDS5/

.ASC}

JASC
LASC

/ S !

+ASC

LASC

/XSSXABYTE
# IN MSG.=

EVMOCG: .ASCIZ
4

JINTATHE

&ggl.
.2
g& OF CMP ERRS=XDS/
SARX
S=XDS5%S C?PM( BYTES=XD5/

7INX WAS s:s Wi:”’ SS

FS=%D

XAEXPTD=303XS3XARECVD=%03/

/INXS9XACHANGED TO:/

1223333332333 3323333312333 2222323333023 3333223233323333333232322333232332332323333233

;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

EVMOMD:
EVMOST:
EVMCTS:
EVMDSR:

EWMDCD:
EVMRTS:
EVMRI:
EVMSQD:
EVMTM:

.ASCIZ
.ASCI
.BYTE
.BYTE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
BYTE

.EVEN

/INXSBXAMODEM STATUS: CTS DSR DCD RTS RI
/!N!S9!S9!SSW
x.£8.b8.48
'X.40,40.4

'x.£0.40.48
°'X.40,40.4
'X,40,40,40
'X.40,40,40
'X,40,40,40
0O

Sap TMTM/

2CLKBO DMR, onc-n DATA COMM. LINK TEST

CZICLKB.P11

16=JUN=81 14:38

5625

5626
5627

BASE TABLE ADDRES
.SBTTL

5619
5621
soag
562
5624

MACY11 30A(1052)

16=JUN-81

14:39 PAGE 13-32

E TABLE ADDRESS

mx; ssmou 1S USED BY A %;81"5 BOOT ROM FOR DOING DOWN=L INE=LOAD.

017370

BE IN THE AREA OF 'O1
56. BYTES'' + A FEW
srrsatininy
£ !'!!! DO NOT ALLOW THE ABOVE ASCIZ MESSAGES TO EXPAND INTO
SRILINIRIRI
e TN T iiil CTMIS REGION.
.EVEN
.=17370
BASE:
.BLKB
256.
;BASE TABLE ADDRESS
.=20000

017370
000400
020000

san

e
o . dne

W eires BB

e os
s e B W s
wles

Pocenes - »

SEQ 0068

ZCLKBO

CZ2CLkB.P1

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

MACY11 30A(1052) 1§‘Jlfl-l1 14:39 PAGE 13-33
6

ASCIZ MESSAGES CONTINUED AFTER BASE TABLE-REGION
+SBTTL

5631

EXECUTIW STATUS MESSAGES TO BE FRINTED TO KEEP OPERATOR AWAKE

04704

0
&
020025

05144
0‘§

5640
5641

0200
020102

045
051445

0
0

5643

020126

051445

022463

031523

040445 STXO

0200
051445 0224
5638 02004
045 031523
5639 020%? 051445 Oig

042501 SDVE:
040445 SCM:
044501 SDVI:

5645

02011

045

8;%

052101
040445

STXC:
SRXQ:

04?“5
041501

SCML:
SCMD:

046501

SMSC:

040445

5645
5646

5647
5648

5649 020135

5651
32
5653
5655
56
5657
5658
5659
5660
5661
S66§
5663
5664
5665
5666
%

020217
020222
020225
0202

0202
0202
020242
020246
020251
020255
020261
020265

0202

020
020
020307
020313
020316

045

1064
052504

104
050504
1064
052504
046504
047104
104
104
104
104
055104
125
113
113
113
046504

ASCIZ MESSAGES CONTINUED AFTER BASE TABLE REGION

022516 051507

SEOP:

000

047516
000
000

.ASCIZ
.ASCIZ

/XS3XACML/
/XS3XACMD/

.ASC
+ASC
.ASC

,ASCIZ
.ASC

DLM:
DQM:

.ASCI%
ASCIZ

DAM:
DUPM:
DMCM:
DNM:
DLWM:

045516
050104
055104
000114
000126

/XS3XATXC/
/XS3XARXG/

JASCIZ

000101
000120
000103
000
053114

000
000
000

.ASCIZ
.ASCIZ

SéCM:

DPM:
DUM:

050115
042526
000126

/3N/

.ASC

;REV B BY EC
s sNEXT ASCIZ

000120
000

000114
000

+ASC

DMPM:
DTEM:
DVM:

DZM:

UNKM:
KDPM:
KDZM:
KLM:
DMVM:

+ASCIZ
ASCIZ

.ASCIZ
.ASCI%
ASCIZ
.ASCI%
ASCIZ

ASCIZ
ASCIZ
.ASCI%

ASCIZ

ASCIZ
ASCIZ
ASCIZ
ASCI%
e\s{g '1‘

/XS3XATXQ/

/XS3XAERR/
/XS3XACMP/
/XS3XAINL/
/XS3XAEOP/
/XS3XAMSC/

LINES

r Blfis
IN A ROW

RANSMIT

ETED
TO RECEIVE

:DEV g! ERROR
sABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD
:DEVICE ABOUT TO BE INITIALIZED
s COMPARE LENGTH ERROR
: COMPARE DATA ERROR

;END

OF PASS

;MODEM STATUS CHANGE

ARE USED IN SATELLITE ID

/XNXASECONDARY BOOT REQ FROM
/DP/
/DW/
/DL/
/DW/

/DA/
/DUP/
/DMC/
/DN/
/DLV/
/DMP/
/DTE/
/DVv/

/DZ/

/7UNKNOWN/
/KDP/
/KkDZ/
/KL/
/DMV/

MESSAGES

ADDED BY EC

XTXA DEVICE-TYPE= XD3/

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLkB.P11
5670
5671
56;5

020
020

5690

021%(5)5

5674
5675
5676
5677
5678
5679
5680
5681
S6B§
5683
5684
5685
5686
5687
5688

5691
5692
5693
56
5695

5697
5698
5699
5700
5701
570§
5703
5704
5705

5706
5707
5708
5709
5710
5711
571%
571
5714
5715
5716
5717
5718
5719
5720
5721
572§
5723
5724
5725

16=JUN-81 14:38

020402
0204
0204
0205
020566
0
0
02071
02075
021
0210
021065
021114
021146
021176
021226
021307
021333
021365
021410
02146
021513
021544
021627
021664
021721
021756
02204
02210
022156
022212
022%8
022303
022351
022405
022441
02247
0225
OS
0226
022
022711
022744
0227
02
023114
023136
023170
023222
023272
023342

047125
040502

O‘SS
0425

0445
05204

116

0‘55?

0201

040502
042502
116
040516
040516
040516
116
116
122
122
116
116
040516
040516
040516
040516
130
103
101
040503
12;
1%0
0465
130
046530
130
041522
0‘15%2
1
041522
047111
116
110
118
"
116
040513
05%50
051126
051124
0425 S
1
84?5 “
5 1%0
m
041501
0“13‘
0441264
0“156
0441264
044126

0425
0445
04550
051513
051513
051513
045501
045501
050105
050105
045501
04550
051513
051513
051513
05151
044515
04610}
052103
05112;
041505
051124
05&50;
041115
05450;
041115
054502
05450
041103
05450
047503
020117
043511
82 31
3511
054105
05%1
0511
0471
04710
04%’50
04 gO
04§ ?;
b
52153
4524
&255
23
04252
04252
042522

MACY11 30A(1052)

16=JUN=-81

14:39

PAGE 13-34

ASCIZ MESSAGES CONTINUED AFTER BASE TABLE REGION
;REV B BY EC
.SBTTL DMR BASE TABLE DESCRIPTION MESSAGES

¢ JASCIZ
DMOO?: +ASCIZ

82;04
116
0;012
051040
051040
05144
8201
581
0201
0201
0201
0%012
051040
051040
051440
051“8

DMROO1:
DMROO2:
DMROOS:
DMROO4:
DMROO5:
omoo;:
DMROO7:
DMRO10:
DMRO11:
DMRO12:
DMRO13:
DMRO14:
DMRO15:
DMRO16:
DMRO17:
DMOS?:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
+ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
+ASCIZ

020124
0201 g
020123
042511
044505
040505
024126
052131
024126
052131
024124
0%41 4
052131
0241%’4
050115
04 S%
& 3
510
042510
020126
6440
7105
652
35%’
531
4505
581
5
551
5
41
41
41
41
044123

mg- +ASCIZ
DMRO23: .ASCIZ
DMRO24: .ASCI;
DMROZ5: .ASCi
DMRO 9:.A$CI
DMROZ7: .ASCIZ
DMRO30: .ASCIZ
DMRO31: .ASCIZ
DMRO i JASCIZ
DMRO33: .ASCIZ
DMRO
LASCIZ
DMRO35: .ASCIZ
DMRO36: .ASCIZ
DMRO37: .ASCIZ
DMRO4O: .ASCI
DMRO41: .ASCIZ
DMRO42: .ASCIZ
DMRO43: .ASCIZ
DMRO44: .ASCIZ
DMRO45: .ASCIZ
DMRO46: .ASCI%
DMRO47: .ASCIZ
W05?: JASCIZ
DMRO51: .ASCIZ
DMRO52: .ASCIZ
DMRO53: .ASCIZ
054: .ASCIZ
055: .ASCIZ
WOS?: +ASCIZ
57: JASCIZ
¢ JASCIZ
DMRO61 : .ASCI%
DMOO;: +ASCIZ
DMRO65: .ASCIZ
DMRO64: .ASCIZ

DMRO21: .ASCIZ

/UNDEF INED DATA /
;LOCATION UNDEF INED BY SPEC
/BASE TABLE UPDATE INDEX POINTER/
/BASE TABLE UPDATE #IHIT/
/BEGINNING OF BASE TABLE DATA/
/NAKS RCVD..BUFFER TEM® UNAVAILABLE/
/NAKS RCVD..HEADER BCC ERROR/
/NAKS RCVD..DATA BCC ERROR/
/NAKS SENT..BUFFER TEMP UNAVAILABLE/
/NAKS SENT..HEADER BCC ERROR/
/NAKS SENT..DATA BCC ERROR/
/REPS SENT..CUMUL REP SENT/
/REPS RCVD..CUMUL REP RCVD/
/NAKS RCVD..REP RESPONSE/
/NAKS RCVD..RCY OVERRUN/
/NAKS RCVD..MSG HDR FORMAT/
/NAKS RCVD..MSG TOO LONG/
/NAKS SENT..REP RESPONSE/
/NAKS SENT..RCY OVERRUN/

/NAKS

SENT..MSG HDR FORMAT/

/XMIT UNDERRUN COUNT/
/CALL SET UP FAILURE COUNT/
/ACTS FAILURE COUNT/
/CARRIER DETECT LOST COUNT(WHILE RECEIVING)/
/RECEIVER INACTIVE COUNT/
/STREAMING TIME-OUT COUNT/
/XMBYT(LSB) = TOTAL # BYTES XMITTED, 32 BIT COUNTER/
?XMBYT(2/4) = # BYTES XMITTED?
7XMBYT(35/4) = # BYTES XMITTED?
°?XMBYT(MSB) = # BYTES XMITTED?
/RCBYT(LSB) = TOTAL
# BYTES RECEIVED, 32 BIT COUNTER/
?RCBYT(2/4) = # BYTES RECEIVED (CONT)?
?RCBYT(3/4) = # BYTES RECEIVED (CONT)?
/RCBYT(MSB) - # BYTES RECEIVED/
/1NCWLET$ SELECTION COUNT/
/NO REPLY TO SELECTION COUNTER/
/MIGHEST MESSAGE SUCCESSFULLY RECEIVED/
/MIGHEST MESSAGE TRANSMITTED/
/MIGHEST MESSAGE ACKNOWLEGED/
/NEXT MESSAGE TO TRANSMIT/
/LAST
MESSAGE TO COMPLETE TRANSMISSION/
/CURRENT MESSAGE BEING TRANSMITTED/
/TRANSMIT END OF QUEUE/
/TRANSMIT BEGINNING OF QUEUE/
/RECEIVE END OF QUEUE/
/RECEIVE BEGINNING OF QUEUE/
/LATEST NAK REASON/
?PROGRAMMABLE REP/SELECT-~TIMER PRESET VALUE?
?2ISTRT/ASTRT/REP/SELECT=TIMER COMPARE LEVEL?
/ACTIVE TIME COUNT/
/THRESHOLD LEVEL NAKS RCVD/
/THRESHOLD COUNT NAKS RCVD/
/THRESHOLD LEVEL NAKS SEND EXCEPT NO BUF/
/THRESHOLD COUNT NAKS SEND EXCEPT NO BUF/
/THRESHOLD LEVEL = REPS SENT/

SEQ 0070

CZ2CLKBO DMR, M(-H
DATA COMM. LINK TEST
CZCLkB.P11
16=JUN-81 14:38
g?g?
023376

5728

§7§

5731
57

02 540

MACY11
30A(1052) 12-.1\”-81 14:39 PAGE 13-35
DMR BASE TABLE DESCRIPTION MESSAGES

0“1
0‘2535

0“15;

DMRO6S5:

051110
020105

051505
046504

DMRO67: .ASCIZ
DMR177: .ASCIZ

0425

042523

0441

.ASCIZ

DMRO66: .ASCIZ

/THRESHOLD COUNT = REPS SENT/

/THRESHOLD LEVEL = NO BUF AVAILABLE/

/THRESHOLD COUNT = NO BUF AVAILABLE/
/SEE DMR TECH MANUAL FOR DESCRIPTION/

SEQ 0071

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

C(ZCLkB.P11
735
27

16=JUN-81

7640
7641

5742
57643
5766
5745

5746

14:38

16=JUN-81

14:39s PAGE 13-36

DMR BASE TABLE DESCRIPTION MESSAGE

;REV B BY EC

85;2(2)‘

047101

044116
104

0511
5%1 1

024050
024103
024125
024147

040504
122
122
10§

05 SS‘
050105
050105
051501

MACY11 30A(1052)

0237
02401

0264206

116

052116
116

042523

0201

61264

0122

6440
3012

051514
%110

026440
82012

020105

046504

26448
051503
051103
020105

+SBTTL DMC BASE TABLE DATA DESCRIPTION MESSAGES
DMCOO2: .ASCIZ
/ANP = CONSTANT 0/
DMCOO3:

.ASCIZ

/NTLR = NAKS RCVD..NO BUFFERS/

DMCOO6:
DMCOO7:

.ASCIZ
.ASCIZ

/NTLS = NAKS SENT..NO DBUFFERS/
/NHDS = NAKS SENT..BAD HEADER/

DMC377:

.ASCIZ

DMCOO4: .ASCIZ
DMCOOS: .ASCIZ
DMCO10:
DMCO11:
DMCO12:
DMCO13:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/NHDR = NAKS RCVD..MSG HEADER BAD/
/DATR = NAKS RCVD..DATA BAD/
/DATS = NAKS SENT,.BAD DATA/
/REPCS = REPS SENT/
/REPCR = REPS RECD/
/BASE = CORE TABLE BASE ADDRESS/

/SEE DMC TECH MANUAL FOR DESCRIPTION/

SEQ 0072

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLkB.P11

16=JUN-81 14:38

5;5

758
75

02425
431

760
761
S?bi
5765

5764

5765

5767

768

5769
5770
g;;1

&
4
6626
024

8 4510
02

MACY11 30A(1052) 1A-JW~81 14:39 PAGE 13-37

455

02464

024674

0247264
024751
025011

DMC BASE TABLE DATA DESCRIPTION MESSAGES

;DEVICE ERROR MESSAGES
06‘»5%4
g 5

044524
215
044524
15

51
1

1
1
1
1

02001

2004
7640
2904
0476440
0%80‘
020126
020049

020040
047117
020012

051440
051126
020040

064524

?15

15
1

047 1;

0525

046111

042516

015

005015
10;
015

76440
290‘
440

040507

DVEMO:

DVEM1:

DVEM3:

DVEM&:
DVEMS:
DVEM6:

DVEM?:

.ASCII
LASCIZ

.ASCI}
JASCIZ
.ASCI{
LASCIZ

LASCIZ

<155<12>/
SELO
S
/TIME
QUT WAITING FOR RUN TO SET/
<155<1 >/
SELO
SEL2 /
/TIME QUT WAITING FOR WTPUT INTERRUPT/
<15><12>/
SELO
SEL2
/INPUT INTERRUPT WHEN EXPECTING OuUTPUT/
<15><12>/
SELO
SEL2 /

LASCIZ
.ASCI1
LASCIZ

<155<12>/
SEL2
SEL6 /
/CONTROL OUT INSTEAD OF BA-CC OUT/
<15><12>/
SEL
SEL6 /

ASCII

LASCIZ

.ASCli
.ASCII

5773
57764
5775

025036
025100
025125

054124
005015
12;

041040
020040
020130

043125
051440
052502

DVEM8:

5
277778

025214
025243

042040
015

053517
020012

020116
020040

DLLAB:

5786

5270
025310
025326
025346
025361
0253
025641

051120
047516
042104
044504
114
104

041517
020116
06650%
041523
051517
041504

042105
054105
020120
047117
020124
050115

5788
5789
5790
5791
579§

025437
025461
025471
025505
025521

040504

0416440

0255641
025561

122
122
10
103
126

040526

020105

.ASCIZ
_ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

0556 4

PROEM:
NXMM:
DDCSRM:
DISCOM:
LOSDAM:
DDCMRM:
TIMOM:

12;
123
0425;(3)
0256

020130
041505
020103

051440
042111
04?107
043040
047516

847516
051040

RUNSBM:
RXIDM:
CDGLM:
CTSFM:
TXNC:

.ASCIZ
.ASCIZ
.ASCIZ
_ASCIZ
.ASCIZ

Sgg

5780
5781
5782
5783
5784
5785

5787

5793
5794

5795

5796

797
808
-5809

817
818
5819
5820

025167

126

02001;

046511

047125
0201
0§O104
051526
0201

020040

042522

DVEM9:

/ILLEGAL OUTPUT INTERRUPT/

.ASCII
LASCIZ
.ASCII

/TX BUFF COMPLETED AND SHOULD BE RX/
<15><12>/
SEL4
SEL6 /
/RX BUFF COMPLETED AND SHOULD BE TX/

.ASCII
ASCIZ

/ DOWN LINE LOAD ABORTED/
<15><12>/
RXBUF
TXBUF /

ASCIZ

.ASCIZ

DATCKM: .ASCIZ

RXNC:
RxM1:
RXM2:

/TIME
OUT WAITING FOR RD TO CLEAR/
<155<1 >I
SELO
SEL
/TIME OUT WAITING FOR RD$
TO SET/

.ASCIZ
,ASCIZ
.ASCIZ

.EVEN

<15><12>/

SEL4

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

SEL6

SEQ 0073

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11 ~ 16=JUN=81 14:38

MACY11 30A(1052)

GLOBAL ERROR REPORT SECTION

LSBTTL

J 6
16=JUN=81

14:39

PAGE 13-38

SEQ 0074

GLOBAL ERROR REPORT SECTION

14+

: THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS
: USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTB
: (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES.

Z
58
5831
ga
5849
(3)
5850

025630
025630
025630

BGNMSG

ERR1

PRINTB

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

ERR1
::
;INDIVIDUAL DATA COMPARE ERROR

(10)
025630
(10) 025632

005046
153716

007447

CLR
BIS8

(9)

15;716 007446

8IS8

(9)

025636

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

025644
025650
025654
025660

013746
01%766
81 746
010600

007424
0170
000004

MOV
MOV
MOV
MoV

OFSET ,~(SP)
#EviFSa, ~(sP)
#4,~(5P)
SP,RO

(4)

025664

062706

000012

ADD

”n2,sP

TRAP

(SMSG

(4)

025662

5851
(3)
sfi?’

025670
025670
025670

5853
(3)
5854

02567
02567
025672

(4)

025710

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

104414

013746
012746
012746
01

007436
015453
000002

025712

062706

000006

025716

5857
(3)
5858

025720
025758
0257

025716

025720

CLR

TRAP

ENDMSG

£ 10001
:

104423

025672
025676
025702
025706

5855
(3)
sgé

(9)

005046

«(SP)
BAD,(SP)

104414

BGNMSG

ERR2

PRINTB

#EFM2, TEMP4

L10002:

104423

013746

007434

BGNMSG

ERR10

PRINTR

WEFM11,R4, TEMP3

TEMPG
, = (SP)
FM2,=(SP)
#2,-(5P)
SP.RO

ADD

#6,5P

TRAP

CSMSG

MOV

TEMP3,~(SP)

(4)

025740

TRAP

5859
(3)

025746

(4)

(3)

025742

025746
025746

10608

062706
104423

000010

MOV
ENDMSG

CSPNTB

ERR10::

MOV

104414

MOV
MOV
MOV
MOV

f%
82;‘ }2746
015550
6) 025
12746 000003
(3) 025

GOOD, (SP)

ERR2:
:
;TOTAL DATA COMPARE FAILS ERROR

TRAP-

ENDMSG

-(SP)

L10003:

“i;n(?)(sp)

5.-(9’»)

SP,RO

CSPNTB

ADD

#10,5P

TRAP

(SMSG

5870

(3)
5871
(100
9
(8)
(7)
(6)
(3)
%)
(4)
5872
(8)
(7)
6)
(3)
(4)
«)

5873
(3)
(3)
5874
5875
(3)
5876
(9)
(8)
27;

6=JUN-81 14:38

035750

8 5750
S?gg
O g?
754
5760
S;%
025
57764
5776

0
026010
16
0
0260
0
6
0260
026030
026030

13746

013746
013746
12746
12746
0
104414
062706

013746
012746
012746
010600
104414
062

026042

(8)

(7)
(6)
(3)
(4)
(4)
5878
(3)
(3)
5879
5880
(3)
5881
(9)
(8)

(7)

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

026056

026066
026072
026076
026100
026102
026106
026106
026106

026110
026110
026110
026110
026114

0261

026124
0261
026132
026134
026140
026140
026140

ERRS

PRINTB

#EVTF3D,TEMP3, TEMP4 ,CONOTM

81;766
013746

8} ;g
104414
062706

013746

015746
0127
01
104414
062

000012

007462
015516

000006

PRINTB

81 746

012746
01
104414
062706

104423

:
ERRS8:

#PCPM,PCADD

ENDMSG

L10004:

007436
007434

BGNMSG

ERR9

PRINTB

WEVTF3C,TEMP3, TEMPS

000010

PRINTB

#PCPM,PCADD

15516

000006

ENDMSG

L10005:

007436
007434

BGNMSG

ERR13

PRINTB

WEVTF3C,TEMP3,TEMP4

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

TEMP3 =(SP)

#EVTFSD,=(5P)
#4,~(SP)

ERR9::

01651%

104423

81%746
013746

SEQ 0075

PAGE 13-39

0074
74
016533

0260

0260
0260
0260
026036

14:39

BGNMSG

104423

(3) 026053 0

(4)
(4)
5877

007442

%% 3333 33 3338

CZCLkB.P1

MACY11 30A(1052) 16=JUN-81
OBAL ERROR REPORT SECTION

s 532asd gpRased

SZCLKN DMR,DMC~1 1 DATA COMM. LINK YESTGL

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

rgvrrSc.-(sm
#3,-(SP)
SP.RO
CSPNTB

#10,SP

PCADD
, =(SP)

#PCPM. = (SP)

#2,-(5P)

SP.RO
CSPNTB
#6,SP

CSMSG

ERR13::
TEMP4
, = (SP)
TEMP3 = (SP)

0§v7r3c ~(SP)

81651

#3,-(5P)
SP.RO

000010

ENDMSG

L10006:

CZCLKBO DMR,DMC=11
DATA COMM. LINK TEST GLOBAL ERROR
MACY11REPORT
30A(1052)
1%»-.!00-81 14:39 PAGE 13-40
CZCLkB.P11
16=JUN-81 14:38
SECTION
5883

BGNMSG

S885

02614
02614
02614

(3)
(;

176
026176
026176

ENDMSG

104423

5888
(4)
(3)

026200
026200
026202

000167
177772

(3)

(10) 026142
013746 007442
(9)
ug 13746 0074
(8) 026152
013746 0074
(7 026123 12746 016533
6) 0261
12746
(3) 026166
010600
%)
1;g 104414
(4) 0261
706 000012

PRINTB

EXIT

ERR14
WEVTF3D,TEMP3,
TEMP4, CONOTM

SEQ 0076
ERR14::

L10007:
MSG

MoV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

CONOTM, =(SP)
TEMP4
, = (SP)
TEMP3 = (SP)
REVTFSD,=(SP)
#6,=(SP)
SP,RO
CSPNTB
#”2,5P

TRAP

CSMSG

WORD
.WORD

JSMP
L10007=2-.

CZCLxBO DMR,DMC-1 1 DATA COMM. LINK TEST

mé
MACY11 30A(1052) 16=JUN-81
GLOBAL SUBROUTINES SECTION

.SBTTL

5894
5895

i+
; THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES

CZCLkB.P11

16=JUN=-81 14:38

5893

589

14:39

PAGE 13-41

SEQ 0077

GLOBAL SUBROUTINES SECTION

; THAT ARE USED IN MORE THAN ONE TEST.

SBTTL

5978
5979
5980
5981

+
FUNCTIONAL DESCRIPTION:
THIS SUBROUTINE SETS UP THE CLOCK INFORMATION TABLE FOLLOWING A ‘‘CLOCK'’
CALL EXECUTED IN THE INITIALIZATION CODE. BUT SINCE THE ‘‘CLOCK'' CALL

PR PRTR TR T

597
gg;g

TR TRTR

S%%
gg‘

PR PR PRTR

5985
5986

6005
026204
6005 026204 012122
6006
6007
6008
6009
6010
6011
6012
8013

026206

026210
026212
026214
026216
026220
026222
02622
026226

012112

006312
006312
006312
006312
006322
01212
01212
000207

I TATATEATATEA

6000

6005

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

IMPLICIT INPUTS:
THE SUPERVISOR

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

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
"'CLKMZ"* GETS LOADED WITH THE LINE FREQ. (HERTZ RATE) WHICM DETERMINES

PR PR PRPR PR TR

SEREREREREY g

ggz

CLOCK SETUP SUBROUT INE

THE NUMBER OF TICKS IN A SECOND

CALLING SEQUENCE:

JSR

PC,CLKSET

;CALL CLOCK SETUP WITH R1 & R2 SETUP

MOV

(R1)+, (R2)+
(RD+I(R)

:LOAD CLOCK'S CSR ADDR. INTO *‘CLKCSR'
:LOAD CLOCK'S INT. LEVEL INTO “'CLKBR'’

CLKSET:
ASL
ASL
ASL
ASL
ASL
MOV
MOV
RTS

(R2)
(R
(RQ)
(RQ)
(RI)+
(R1)+,(R2)+
(R1)+.(R2)+
PC

:ADJUST THE INT. LEVEL FOR LOADING INTO
:
THE PSW WITH A "SETVEC' CALL

:LOAD CLOCK'S INT. VECTOR INTO '‘CLKVEC'®
:LOAD CLOCK'S HERTZ RATE INTO '‘CLKMZ'"

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11

MACY11 30A(1052)

16=JUN-81 14:38

gg}

.%TTL

: FUNCTIONAL DESCRIPTION:

28%’

6020
6021
602
602

CLOCK SETUP SUBROUTINE

601

16=JUN=81

:
;
;
;

14:39

PAGE 13-42

SEQ 0078

CLOCK INTERRUPT SERVICE ROUTINE

THIS IS THE CLOCK INTERRUPT SERVICE ROUTINE WHICH TAKES CARE OF
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.

6026
6027
6028
6029
6030
6031

: 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''
:
IN MINUTES € SECONDS
:

6034
6035
6036

: IMPLICIT OUTPUTS:
:
NEW VALUE OF EVENT TIMER ‘*1°* DECREMENTED BY 1 TICK IF IT WAS NON-ZERO
:
NEW VALUE OF EVENT TIMER ‘' DECREMENTED BY 1 TICK IF IT WAS NON-ZERO

6039

: FUNCTIONAL SIDE EFFECTS:

604
604
6044
6045

* 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 ‘‘SETVECTM CALL.

gfi

;

c&g

(;0:.7Ii

6048

TIMER 1,2, & S: CURRENT VALUES OF THE

NEW VALUE OF EVENT TIMER

026230

161266

6051

026236

005337

007540

6053

026242

013737

007530

6052

026240 001015

6054
6055
6056
6057
%3

026250
026254
026262
026264
026270

005237
022737
001004
005237
005037

6060
6061
“i
6063
6064
6065
6066
6067
6068
6069

026274
026300
026302
026
026312
026314
026320
026324
026326
026334

005737
00140.
005337
005737
00140,
005337
005737
001406
023737
00100

6070

026336

005337

007536
000074 007536
007534
007536
007542
007542

18:

007544

28:

007544
007546

38:

007530 007540
007546

BGNSRV

CLKINT

CLR

aCLKCSR

:DISABLE THE CLOCK FORM INTERRUPTING

BNE

:GO CHECK TIMERS (182-TICKS, 3~SECONDS)

DEC

007540

°''S’* DECREMENTED BY 1 SECOND IF IT WAS NON-ZERO

THE CLOCK IS DISABLED UPON ENTRY AND REENABLED WHEN LEAVING

a()z‘), 026230

6050 026230 005077

'EVENT TIMERS'®

MOV

CLKINT: :

TIMTCK

*DECREMENT THE # OF TICKS/SEC.

CLKHZ,TIMTCK

INC
TMP
BNE
INC
CLR

TIMSEC
#60. , TIMSEC
18
TIMMIN
TIMSEC

ST
BEQ
DEC
ST
BEQ
DEC
ST
BEQ
cMP
BNE

TIMER1
2
TIMER1
TIMER2
3$
TIMER2
TIMERS
48
CLKHZ,TIMTCK
4

DEC

TIMFRS

:RESET THE # OF TICKS/SEC.

ZINC # OF SECS=SINCE=-START
*SEE IF WE'VE COUNTED 60 SECS. YET
:IF NOT, GO CHECK TIMERS
: ELSE INC MINUTES-SINCE-START
: AND RESTART SECOND COUNTER
:SEE IF TIMER #1, TIMING ANYTHING
: IF=0, NOTHING BEING TIMED CHECK NEXT TIMER
: ELSE DECREMENT THE TIMER VALUE (BY 1 TICK)
*SEE IF TIMER #2, TIMING ANYTHING
: IF=0, NOTHING BEING TIMED CHECK NEXT TIMER
: ELSE DCCREMENT THE TIMER VALUE (BY 1 TICK)
*SEE IF TIMER #3, TIMING ANYTHING
: IF=0, NOTHING BEING TIMED, LEAVE
:SEE IF A SECOND HAS BEEN COUNTED OFF
:: BR_IF F NO
; ELSE DECREMENT THE TIMER VALUE (BY 1 SEC.)

;zum
CZCLkB.P1
6071
(3)

LOMC=11
DATA 14:38
CW LINK TEST
16=JUN=B1
013777
SO

007532

161152

MACY11
3%(105%) 12-.)00-.1 14:39 PAGE 1343
CLOCK INTERRUPT SERVICE ROUTINE
4$:

E%SRV

CLKEN,@CLKCSR

SEQ 0079

;REENABLE THE CLOCK TO INTERRUPT
L10010:

RTI

535533088580 800RRRR00088 ¢

ZCLKBO
CZCLkB.P1

16=JUN-81

14:38

6074

SUBROUTINE AT CALLING TIME

THE

TS:

TIMMIN & TIMSEC: CURRENT VALUE OF '‘TIME=SINCE=START''
TEMP2:
WORD #1 OF EVENT LOG INFORMATION (FOR MOST EVENT TYPES)

TEMP3:
TEMP4:
MODS:

WORD #2 OF EVENT LOG INFORMATION
WORD #3 OF EVENT LOG INFORMATION
CURRENT VALUE OF THE MODEM SIGNALS AVAILABLE FROM THE DEVICE

WTPUT§ :

RATOR AWAKE'' MESSAGE SENT TO THE CONSOLE
NEW EVENT LOGGED IN 'EVTLOG'' (EVENT LOG)
UPDATED 'EVTPTR'' (EVENT LOG ENTRY POINTER)

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

Y .O........."..........I...l.

FLNCTIN?L DESCRIPTION:
S_SUBROUTINE HAS A DIFFERENT ENTRY POINT
FOR EACH EVENT TO BE LOGGED AND ALWAYS PRINTS
THE SHOR U’ERATM AWAKE'* MESSAGE TO CONSOLE THEN LOGS T
EVENT TYPE TIME, AND THE OTHER 3 WORDS OF INFO PASSED TO

FUNCTIONAL SIDE EFFECTS:

TEMP:
TEMP1:

CALLING SEQUENCE:

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

TR P

JSR

PC,LOGTXQ

JSR

PC.LOGCMP

MOV
MOV

#STXQ, TEMP
#TXQ, TEMP

:SET UP MSG. TO PRINT
.-ssr UP EVENT TYPE

MOV
MOV
B8R

#STXC, TEMP
#TXC, TEMP
LOGS 1

;SET UP MS r?
PRINT
:SET UP EVE
160 LOG EVENT »o TIME

MOV
MOV
B8R

#SRXQ, TEMP1
#RXQ, TEMP
LoGs1

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

MOV
B8R

#RXC, TEMP
LOGST

:SET UP EVENT TYPE
:GO LOG EVENT AND TIME

;CALL THE LOG EVENT SUBROUTINE WITH TEMP,TEMP1,

: TEMP2, TEMP3, AND TEMP4 SETUP

WN—=O
VNN

EVENT LOG SUBROUTINES

38< aR o093

e
-

bt ad

SEQ 0080

EVENT LOG SUBROUTINES

+SBTTL

b e
e e
d e e e e

Xe Yo Lo Yo Yo Yo Lo Yo (o o0

b e b e
b e e e
— — —d b

oo (o 0o o

MACY11 30A(1052) 12-.!04-.1 14:39 PAGE 13-44

LDMC=11 DATA COMM. LINK TEST

020003
000000

007430
007426

020014
000002

007430
007426

020025
000004

007430
007426

007426

LOGTXQ:

BR
LOGTXC:

LOGRXQ:

LOGRXC:

LGDVE:

LOGS1

;GO LOG EVENT AND TIME

CZCLKBO
CZCLkB.P1
61
6]
g}

026434
026442
0264

012737
012737
“

020036
000010

0264

61
61
6139
6140
g} 21

0
026474
0265
026510
026516

6143

0265

6146
6147

0265
0265

6144
6145

6148
6149
6150
6151
6152
6153
6154
6155
6156
6157
g} gg
6160
6161
61
61
6164

g}gg

?1 737

LOGDVI :

0000178

13737
113737
013737
013737
000451

0074
007472
007500
007476

026520
0265

012737
012737

020047
000014

026536
026544
026552
026554
026554
026562
0265
026572
026572
026600
026606

012737
012737
33

020071

012737
012737
24

020102
000022

012737

020113

026610
026614
026620
026622
0266%8

013746
004737
012604
020437
001402

0266

012737
000415

LOGCMD:

007400

000137

027044

g} 2;

026634

013737

010456

007436

6169
6170
6171
61 ;i
61
6174

026642
026642
026650
026652
02

022737
001434
032737
001430

000006

007426

000001

007476

6175
6176
6177
g} 773

026662
026670
026672

022737
00101
005037

000010

007372

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

026676
026676
026702
026706
026710
026712

012746
012746
?1
104417
062706

020000
000001

007372

000004

PAGE 13-45

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

MOV
MOV
MOVEB
MOVB
MOV
MOV
BR

#SDVI, TEMPI
#DVI, TEMP
MODTYP, TEMP2
mrw.fsmin
RPASS
, TEMP
PARAM, TEMPS
L0GS3

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

#SCM, TEMP1
#DCK . TEMP
LOGSS
#SCML , TEMP1
#DLE, TEMP

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

MOV
MOV
BR
LOGEOP:
MOV
MOV
B8R
LOGS1: MOV
JSR
MOV
CMP
BEQ
JMP
1%:
MOV
LOGS3:

14:39

#SDVE , TEMP1
#DER, TEMP
L0GSS

MOV
MOV
BR
LOGCML :
MOV
MOV

007400
044004

MOV
MOV
B8R

LOGCMP:

000024

16=JUN=B1
EVENT LOG SUBROUT INES

007430
007426

6135 02643 012737 020060
6]

MACY11 30A(1052)

,DMC=11 DATA COMM, LINK TEST
16=JUN=81 14:38

LOGSS

#SCMD, TEMP1
#DDE , TEMP
LOGSS
#SEOP, TEMP1
#EOP, TEMP
LOGSS
ERRCNT ,=(SP)
PC,DVMODS
(SP)+,Ré4
R4, ERRCNT
1%
LOGEX
MODS
, TEMP4

cMP

#RXC, TEMP

BIT

#STATB, PARAM

BEQ

;SET UP EVNT ENTRIES
;GO LOG EVENT AND TIME

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

;GO LOG MSG TYPE AND TIME

;GO LOG MSG TYPE AND TIME
ENT _ERROR COUNT
;SAVE C
; GO GET MODEM STATUS
;GET SAVED ERRCNT VALUE
;WHERE ANY ERRORS FOUND
; BR IF NONE
; ELSE # EAVE WITHOUT LOGGING
sut
DEVICE ERROR FROM '
:

SAND PUT IT

IN TEMPG

LOGSS

:IF RXC DONT PRINT

LOGSS

:1F NO gTATUS SELECTED
;G0 TO

cMP
BNE

#10,LNCNT
LOGS4
LNCNT

;HAVE WE DONE 10?
:IF NOT GO TO &
JESLE CLEAR IT

PRINTF

#CR

;ELSE PRINT CR

BEQ

CLR

YTHING

VvMODS'*

#CR,~(SP)

#1,-(SP)
SP,RO
CSPNTF

¥4, SP

MACY11 30A(1052) 1§°JLN-O1 14:39 PAGE 13-46

ZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11

~ 16=JUN=-B1 14:38

6181
61
6183

0267
82671
0267

005237

6184

026742

01034

007372

(7) 026722
(6) 026726
(3) 026
(%) 026
(%) 026

013746 007430
012746 000001
?1
oa:4.51:9
062706 000004

6185
6186
6187
6188
6189
6190
6191
€192
6193
6194
6195

026744
026
026754
026762
026770
026774
027000
027004
027010
027014
027020

?1 703
1 75
013737
163737
113723
11372
113723
01372
013723
013723
020327

6198
6199
6200
6201

027026
027032
027036
027042

6196
6197

gggg

027024

027044

103404

007550
0074
007530
007426
007540 007426
0074
0075
007534
007432
007434
007436
010454

012713 177777
012703 007552
010337 007550
012603
000207

SEQ 0082

EVENT LOG SUBROUTINES

LOGS4:

LOGSS:

INC
PRINTF

LNCNT
TEMPI

MOV

R3,=(SP)

MOV
MOVB
MOV
SUB
MOVEB
MOVB
MOVB
MOV
MOV
MOV
CMP
BLO

MOV
MOV
LOGS2: MOV
MOV

LOGEX:

RTS

EVIPTR,R3
TEMP, (R3)+
CLKHZ
, TEMP
TIMTCK, TEMP
TEMP, (R3)+
TIMSEC, (R3)+
TIMMIN, (R3)+
TEMP2, (R3)+
TEMP3, (R3)+
TEMPS, (R3) +
R3,#EVTEND
LOGS2

#-1, (R3)
#EVTLOG,R3
R3,EVTPIR
(SP)+,R3
PC

;INC COUNTER OF # OF AWAKE MSGS
:PRINT OPERATOR AWAKE MSG.

;SAVE R3 ON THE STACK

;LOG EVENT
;LOG TIME SINCE START
:TICKS,SECS AND MINS.

:LOG EVNT ENTRY 3
:LOG EVNT ENTRY &
:LOG EVNT ENTRY 5

:1F EVENT LOG FULL GO
:CONTINUE ;ELSE GO TO 2

:L0G A TABLE END
:PUT R3 TO START OF TABLE
:RESTORE
PQINTER
*RESTORE R

MOV
MOV
MOV
TRAP
ADD

TEMP1,=(SP)
#1,=(5P)
SP,RO
CSPNTF
#4,SP

_—

CZ2CLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11 ~ 16=JUN=81 14:38

6206
6207
6208
6209
6210
6211
6215

MACY11 30A(1052)

REPORT BASE TABLE OR EVENT LOG

.SBTTL

621
6214

222}2
027046

6222

027054

010%26

(7)
(6)
(3)

012746
012746
010600

014020
000001

653

027070

062706

000004

6224
22252

027074
027100

105037
105037

003561
003560

6227

027066

6228
(3)

027104
027104

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

027110
027112
027114
027116
027120

(3)

F SET=NN
/OF SE
BA

027106

104417

EXIT

;SAVE R2,R3,R4 ON THE STACK

PRINTF

#RHLPO

;BASIC HELP MESSAGE

GETRCL: CLRB
CLRB

P$GDBD
PSNNUF

104443

CLISRP,CMDBUF ,A,0,1,72..NO

000406

003060
000142
012504

005037

CLR

OUAL

TST8

P GDBD

oznz3 012737 027464 003550

027152

004737

6235

027162

001412

027164
027170
0271764

012746
012746
010600

012512
000001

027200

062706

000004

027210
027214
027216

105737
001412

003560

012746

012542

(4)

027176

5% 027204
6239
6240
6241
(7)

027216

MOV

003204

6233

(4)

CSPNTF

03264

JSR

105737 00356

104417

TRAP

CSGMAN

.WORD
.WORD
.WORD
LWORD
.WORD

CMDBUF
TSCODE
CLISRP
O
TSLOLIM

JWORD

6232

027164

#4,SP

#CMDBUF, PSBUFA
#CLIRT ,PSTREE

027156

ADD

:PRINT PROMPT ‘RPT>'

GMANID

MOV
MOV

027146

#RHLPO,
= (SP)
#1,=(SP)
SP,RO

;INIT GOOD/BAD FLAG =1=BAD INPUT
:INIT MORE COMMAND LINE INPUT NEEDED

93715‘2. 000110

Jer

MOV
MOV
MOV

TRAP

012737 003060 003544
012737 027266 003546

(7)
'6)
(3)

SEQ 0083

ag.-(sp)

6220 027124
g‘? 027132

¢
PAGE 1347

HELP

MOV
R3,=(SP)
MOV
R&,=(SP)
;PRINT HELP MESSAGE

027054
027060
027064

(4)

REPORT: MOV

6218 027050 010346
222}3 027052 010446
6221

14:39

REPORT uss TABLE OR EVENT LOG
;REV B BY
S THE rououmc COMMANDS ADDED TO REVISION B CZCLK
: :DMR/DMC DCLT PROGRAM
: iRPT> LOG
8
BASE/ERROR
i
BASE/FULL
8

6217

F 7
16=JUN=81

BEQ

mmt PSACT
,PSTRV

PRINTF #CLIERM
JMP

1$:

GETRCL

TSTB
PSNNUF
BEQ
108
PRINTF #CL INUF

TSHILIM

; INPUT BUFFER
:REPORT CLI TREE

:ACTION ROUTINES
;GO PARSE COMMAND L INE

.comwo ox

mflr
mw\uo INPUT MESSAGE
MOV
MOV
MOV

ocusm ~(SP)
1.-(SP}
sp.RO

ADD

#4,SP

MOV

#CLINUF ,=(SP)

TRAP

000137 027074

10000%

:TRY AGAIN

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

CSPNTF

12-JUN-.1

MACY11 30A(1052)
CZCLKBO DMR,DMC<11 DATA CO?: LINK TEST
16=JUN-81
(ZCLKB P
REPORT BASE TABLE OR EVENY LOG

14:39

PAGE 13-48

SEQ 0084

012746
01

000001

#1,-(SP)

0627
000137

000004
027074

4 ,SP

023727
00140;
00013
012604
012603
012602

003202

e 10441

000207

027074

CSPNTF

000002

GETRCL

;TRY AGAIN

108:

KEYWD1,#RPEXT

SEXIT COMMAND ?

20%:

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

208
GETRCL

s YES ,BRANCH

;GET ANOTHER COMMAND
:RESTORE R4

:RESTORE R3

;RESTORE RZ

:RETURN

CZCLKBO DMR, MC*H DATA COMM. LINK TEST

CZCLKB.P11

625

~ 16=JUN=81 14:38

6253
54
6255

027
027272
027276

6257
6258

027314
027316

6259 027

6259 027332
027334
6261 027346
626§ 027350
626 ogr
6264 027370
6265 027374
027410
6267 027412
0274
6269 0274
6270

027446

6272
6273
6274

027456
027460
027462

6271 027452

MACY11 30A(1052)

16=JUN=-81

COMMAND LINE PARSING TREE FOR REPORT

14:39

PAGE 13-49

JSBTTL COMMAND uns m:sxnc TREE FOR REPORT

CLIRT:
R10$:

R11$:
R128:

CLI CLISPA,0,R108
CLI < .m R11$
€Ll CLIEXI,O

;SKIP SPACES IN COMMAND L INE
:1F INPUT = 2 THEN mm HELP MESSAGE
mo Ex T PARSER

CLI CLIEXI,O
CLI CLISTR,RPEXT,R13$,<'EXIT'>

FESSA

cLl <*=>,0,R308

‘ir lwr = OCTAL VALUE THEN GO

CLI CLISTR,RPHLP,R12$,<'HELP'> i

= 'MELP' THEN PRINT HELP

AND EX T PARSER
= 'EXIT* THEN SET
KEYWORD =

R168:
R178:

CLI CLIEXI.O
npexr AND EXIT PARSER
CLI1 CLISTR RPLOG.R14$,<'L0G'> :1F INPUT = 'LOG' THEN GO PRINT EVENT
cLl CLIEXI.O
:LOG AND EXIT PARSER
CLI CLISTR momr R30$,<'BASE'>;}F INPUT = 'BASE' THEN MORE COMMAND
CLI CLIBR, 0,R158
:LINE IS us;og
CLI <'/>,RNOTNF ,R125$
JHF INPUT =
THEN LOOK FOR MORE
CLI CLISTR,RPSWE,R168,<'ERROR'> :IF INPUT = 'Em THEN GO PRINT
cLl CLIEXI.O
:ERROR INFORMAT
ION
CLI CLISTR.RPSWF,R178,<'FULL'> 1F INPUT = 'FULL® THEN GO PRINT
CLI CLIEXI.O
;ENTIRE BASE TABLE
CLI CLISTR,"RNOTNF ,R308, < 0FFSET'> IF INPUT = *OFFSET' THEN LOOK FOR

R30$:
R1258:

CL1 CLIEXI.O
CLI CLIERR.O
CLI CLIEXI.O

R138:
R14$:
R158:

CLI CLIOCT.RPSWO,R30$

::PRINT SINGLE BASE TABLE ITEM

SEQ 0085

DATA COMM. LINK
16=JUN-81 14:38
(SCLKB.P11 ,LOMC=11

TEST

MACY11 30A(1052) 1£-JW-81 14:39 PAGE 13-50

LSBTTL CLI ACTION DISPATCHER AND nounnes
CLIRAC: ASL
n
:SET UP INDEX

02750
02750

108:

177777

003560

MOV
ADD
JSR

(R2) ,R2
nos R2’
PC, (R2)

;
:
:GO DO ACTION

LWORD

ACTRNL=10%

sNULL

RTS

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

ACTRHL=10%
ACTREX=10$
ACTRLG=10%
ACTSWE=10$
ACTSWF=10%
ACTSWO=10%
ACTRNF=10%

MORE cm NEEDED

ACTRNF: MOVB
ACTRNL: RTS

#-1 PSNNUF
PC

:PRINT HELP MESSAGE

ACTRHL: MOV

003230

1$:

#RHLPTB,R2

PRINTF #HLPF, (R2)+

*RETURN

sHELP ROUTINE
SEXIT ROUTINE
*REPORT EVENT LOG ROUTINE
:REPORT ERRORS ROUT INE
:REPORT ENTIRE BASE TABLE
*REPORT SINGLE BASE ADDRESS
*MORE COMMAND NEEDED

;MORE COMMAND NEEDED
SNULL

: INDEX FOR HELP MESSAGES

SPRINT 1T

013225
000002
000006
003246
000001

003202

P
BNE
MOV

000002

003202

ACTREX: MOV

030574
000003

012406

RTS

R2, #RHLPEN
1%
#RPHLP,KEYWD1
PC

:EXIT REPORT LEVEL

RTS

#RPEXT ,KEYWD1
PC

:PRINT ERROR LOG

003202

ACTRLG: JSR

MOV
RTS

;LAST MESSAGE ?
:NO,BRANCH
:SET KEYWORD
*RETURN

;SET KEYWORD AND RETURN

PC ,REPLOG

;GO PRINT EVENT LOG

*RETURN

#RPLOG,KEYWD1

:SET KEYWORD

:PRINT ONLY snnoa LOCAT IONS

ACTSWE: TST

003432

108:

OPTY

;DMR ?

BNE
MOV
ADD
MOV
MOV
ADD

103
#DMCIND, INDEX
#6, INDEX
#DMCEND , INDEXE
#BASE ,BEND
#12 ,BEND

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

ago

so‘aoAn

SERROR START ADDRESS

MOV

#DMRIND, INDEX

:SETUP FOR DMR MESSAGES

MOV

#DMREND, INDEXE

:LAST DMR MESSAGE

MOV

003250
000006
003430

SEQ 0086

CLI ACTION DISPATCHER AND ROUTINES

ADD

E.BDATA

#6, INDEX

éAse ABLE START ADDRESS
*POINT TO FIRST ERROR MESSAGE

MOV
MOV
MOV
MOV
TRAP
ADD

(R2)+,~(SP)

#HLPF ,=(SP)

#2,-(SP)
SP,RO
CSPNTF

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11 ~ 16=JUN=-81 14:38

683
¢
6328
6
63
2;1
63

63
6§ S
6
633
6338
6339
6341
6 ;
6
6345
3
6347
23323
6350
6351
6352
6353

64
027770
027772
8
030014
0 %
030030
030032
030040
030046
030054
030062
030070
030074

005737
0010
012737
81 737
12737
737
012737
000417
81 737
012737
012737
737
012737
004737
000207

012406
003432
80
017370
809 77
017370
003250
003430
017370
000177
017370
030336

030076

105037

003560

6357 030126

030134
0301

007450
007452
007454
007454
007456
007450
007452
007454
007454
007456

000177 007454 5$:

023737 003554 007454 7%:
101416

& B R oo
6360 0301 %m 177777 003561
0301
030172
ogg%s
0
030204
030
830 14
30
0302
0302
ososgs
030
030256
030
030266

oomg1
013701
oog;g}
00
001025
12737
137
12737
12737
737
15;37
7
4
12737
137

003554
012406

003432
00745
3468
017370
003554
17370
003554

007450
007452
007454
007454
007456
007456

003250

007450

#BASE ,BEND
#41,BEND
SE ,BDATA
#3,BDATA
PC . RPBASE
PC

woil

PAGE 13=51

SEQ 0087

;SETUP LAST ADDRESS
::T0 BE PRINTED
:START ADDRESS BASE TABLE
:START ADDRESS ERRORS
:GO PRINT DATA
*RETURN

ACTSWF: TST
OPTYP
;DMR ?
BNE
108
+YES,BRANCH
MOV
#DMCIND, INDEX :SETUP DMC MESSAGES
MOV
mcsno INDEXE :LAST MESSAGE
MOV
#BASE , BEND
:TABLE START ADDRESS
ADD
#377 ,BEND
:PRINT 256, BYTES OF DATA
MOV
#BASE ,BDATA
:FIRST ADDRESS TO PRINT
BR
208
108:
MOV
#DMRIND, INDEX ;SETUP DMR MESSAGES
MOV
WDMREND , INDEXE :LAST DMR MESSAGE
MOV
#BASE , BEND
:TABLE START ADDRESS
ADD
#177 ,BEND
*PRINT 128. BYTES OF DATA
MOV
#BASE ,BDATA
:FIRST ADDRESS TO PRINT
208:
JSR
PC ,RPBASE
:GO PRINT DATA
RTS
PC
*RE TURN
:PRINT SINGLE TABLE LOCATION
ACTSWO: CLRB
PSNNUF
;INIT NOT ENOUGH FLAG
ST
OPTYP
‘DMR?
BNE
13
*YES,BRANCH

(8) 030136
013746 003554
(7) 030142 012746 014370
6) 0301
81 746 000002
(3) 030152 10609

6361
6
636
6364
6365
6369
636
6
6369
6370
6371
6372
6373
6374
6375

MOV
ADD
MOV
ADD
JSR
RTS

14:39

:PRINT FULL BASE TABLE

030102 005737 012406
030106 001004

6356 030123 0:15:7

J 7
16=JUN=81

CL1 ACTION DISPATCHER AND ROUTINES

0277
12737 017370 007454
0
7
7454
027742
012737 01737
7456
8 775
737
007456
7723 004737 030
208:
027762
000207

gggg 8%“0 012737 000377 007454
6358
6359

MACY11 30AC1052)

108:

158:

Bngv

gn.aeuo

:BASECLABLE FOR DMC = 256 BYTES

CMP

PSNUM , BEND

:DMC = 256 BYTES

MOV

#177 ,BEND

BLOS
PRINTF

108
#RPTIV,PSNUM

MOVB

#-1,P$GDBD

B8R
MOV
ASL
ST
BNE
MOV
ADD
MOV
MOV
ADD
MOV
ADD
BR
MOV
ADD

308
PSNUM,R1
R1
OPTYP
158
#DMCIND, INDEX
R1, INDEX
#DMCEND, INDEXE
#BASE , BEND
PSNUM, BEND
%.eom
PSNUM,BDATA
208
#DMRIND
, INDEX
1, INDE %
R1,

*BASE TABLE FOR DMR = 128 BYTES

DMR = 128 BYTES

1YES,BRANCH
:PRINT ILLEGAL VALUE

;SET BAD DATA

*RETURN
‘OFFSET VALUE
:MULTIPLY BY 2
:DMR ?
$YES,BRANCH
:DMC MESSAGES
:GET RIGHT MESSAGE
:LAST DMC MESSAGE
:TABLE ADDRESS
*LAST ADDRESS
*BASE ADDRESS
*ADD OFFSET
:GO PRINT DATA
:SETUP FOR DMR MESSAGES
Fi GET CORRECT MESSAGE

MoV
MOV
MOV
MOV

PSNUM,
= (SP)
#RPTIV,=(SP)
#2,-(SP)
SP,RO

,DMC=11 DATA COMM. LINK
16=JUN=81 14:38

12737
1§ 7 1;‘;8
7
; ;'6
§ 7 01
7 oggss«
7

000207

030336

7452
7454
7454
7456
7456

TES

CY11 30A(1052)

16-#\!0-.1

CLI ACTION DISPATCHER AND ROUTINES

gOS

14:39

PAGE 1352

MOV
MOV
ADD
MOV
ADD

%f.oéno

ND, INDEXE
.BEND
w.mu
*

;LAST DMR MESSAGE
: Afl#! ADDRESS
LAS ADDRESS
:TABLE ADDRESS
SADD OFFSET

RTS

JRETURN

JSR

PC ,RPBASE

2GO PRINT SINGLE LOCATION

SEQ 0088

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11

16=JUN=81 14:38

6
6385
6386
6387
6388
2%38

MACY11 30A(1052) 1k-.m-u 14:39 PAGE 13-53

SEQ 0089

CLI ACTION DISPATCMER AND ROUTINES

; sPRINT uss mus SUBROUT INE
;FUNCTIONAL DESCRIPTIon « THIS ROUTINE 1S USED TO PRINT DATA
;
maso N THE
Aut AREA IN MEMORY. THIS BASE
;
uexmronvHE DMR OR DMC. THE USER MAS THE
;
OPTION OF PRINTING THE FULL TABLE, PRINTING THE FIRST
;
FEW ERROR LOCATIONS OR A SINGLE LOCATION.

6391
639
639

;DEF INITIONS
:
;

INDEX = CONTAINS POINTER TO DMR OR DMC DATA
DESCRIPTION MESSAGES.

6395
639

;
;

DESCRIPTION MESSAGES.
BEND
= LAST LOCATION IN TABLE TO BE PRINTED.

639%

;

2335

;

uom1

640
6403

030336

010146

RPBASE: MOV

6406 030340 010246
osog:s

Ii(9) 030
(6)
(3)
(4)

MOV

PRINTF

012746 030476

030354

6410 030402
6411
6415 030410
6413
030414
6414 0304%8
(10) 030420
030424

(9)

030426

(7)
(6)
(3)
(%)
(4)
6415

030436
030442

030432

03045
030456

6417 0

6423

R1,=(SP)

;SAVE R1

#BTHEAD

*PRINT BRIEF MEADER MESSAGE

R2,=(SP)

:SAVE R2

MoV

10441

TRAP

108:

020237 007452
00240,
013702 007452
012237

007432

208:

013746 007432
005046

MOV
MOV

MOV
MOVB

INDEX,R2
BDATA.R1

R1, TEMP3
(Ri)+,TEMP1

013746

cTMP

R1,BEND

LAST ADDRESS ?

CLRB

PSNNUF

CLEAR ENOUGH FLAG

BLOS

10§

NO,BRANCH

0304
12602
MOV
(SP)+,R2
*RESTORE R2
030472
012601
MOV
(SP)+.R1
*RESTORE R1
030474 000207
RTS
PC
*RETURN
030476 047045 040445 042101 BTHEAD: .ASCIZ /zuwwoasssxsgu
ONTENTSXS6XADESCRIPT ION/
03054

022516

030523

DMFMT:

#1,-(SP)
SP,RO
CSPNTF

#4,SP

cMP
R2, INDEXE
sno OF MESSAGES?
BLT
208
NO, BRANCH
MOV
INDEXE ,R2
*'SEE MANUAL' MESSAGE
MOV
(R2)+, TEMP2
*READ MESSAGE ADDRESS
PRINTF #DMFMT,TEMP3,<B,TEMP1>,TEMP2
:PRINT DATA AND MESSAGE
MOV
rsnrz.-(sn

007434

003560

#BTHEAD , = (SP)

*SAVE CURRENT ADDRESS OF DATA
*READ DATA

CLR

012746 030547
012746
01
10441
062709 000012
020137 007454
105037

ADD

;POINTER TO MESSAGES
*ADDRESS OF DATA

153716 007430

6416 030‘23 10174
6418
6419
z :
u.g

THE ABOVE VARIABLES MUST BE ASSIGNED THE CORRECT VALUES

BEFORE THIS SUBROUTINE IS CALLED.

MOV
MOV

6408 030372 010137 007434
6409 030376 112137 007430

(8)

BDATA = ADDRESS OF DATA TO BE PRINTED.

030346 012746 000001
030352 01

(4) 030356
706 000004
6406 030362 013702 007450
6407 030366 013701 007456

(9)

INDEXE = CONTAINS POINTER TO LAST DMR OR DMC

.ASCIZ /3INXS1%06%55%03%

BIS8

tsm (SP)

MOV
MOV
MOV
TRAP
ADD

SOMFMT = (SP)
-<sfi>
sr
CSPNTF
#2,5P

MOV

TEMP3. = (SP)

(al
NO

ZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CLKB.P11

64
64
6428
6429
64
6431
6432
6433
643,
(7
%)
(3

= 16=~JUN=-81 14:38

030574

030576
8

10%

010
1
1370 oorssg
0
75‘ 007552
030614
0010
030616
0 13 815746 016250
0
12746 000001
0
010600

@ 9

177777

RPT:

&439

osou.g
030652
030654
030660
030666
030670

ozogzr
001010
01270;
026227
001007
000137

007552
010454
177776 177777
031432

w.a? 030674 020237 007550
6448 030700 00100
g‘us.g 030702 000137

6451
6452

030706
03071

6453
6456
6455
a.s;

030
030
030740
030744

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

6457

030712
030716
030722
030726
030

030750

(11) 030750
(10) 030756
(9) 030760
(8) 030764
(7)
030770
(6) 030774
(3) 031000

(%)

031002

162702

000012

031014

RPTO:
RPTAA:

012746 016310
012746 000001
01
104416
062
000004
1152g
112237
112237
112237

016
013746
013746
013746
012746
012746
010600

RPT1:

031432

010612
010606
010610

010514
010612
010606
01061
01640
000005

012237

010614

6461 031020 012237 010616
6462 031026 012203

14:39

PAGE 13=54

SEQ 0090

:SAVE R

:SAVE R
:SAVE Ré&
SMAKE R2 A POINTER TO EVENT TABLE
“SEE 17 EVENT TABLE IS EMPTY
*BR IF NO
+IF EMPTY TELL OPRERATOR.
MoV
MOV
MOV

PRINTS

#NULEVT

JMP
SUB

ENDEVT
#12,R2

;AND END
:NOW POINT BACK TO TOP OF ENTRY U

cTMP
BNE
MOV
cTMP
BNE
JMP

R2 ,#EVTLOG
RPT1
SEVTEND ,R2
<2(R2) #=1
RPTO
ENDEVT

;POINTING TO TOP OF EVNT LOG QUEUE?
: BR IF NO
*SET R2 TO POINT TO BOTTOM OF LOG
;IF END OF LOG IS NOT EMPTY
*CONTINUE...ELSE EXIT

BNE
JMP

RPTO
ENDEVT

*IF NOT CONTINUE
:1F SO EXIT....

SUB
PRINTS

#12,R2
#EVTFO

:POINT R2 TO START OF ENTRY
JPRINT EVENT ENTRY HEADER

MOVB
MOVB
MOVB
MOVB

(R2)+,R3
(R2)+.EVTTCK
(R2)+.EVISEC
(R2)+.EVTMIN

:PUT EVENT TYPE INTO R3

(MP

PRINTS

R2,EVIPTIR

RPTTXQ: MOV

MOV
MOV

:ARE WE BACK TO POINTER?

MOV
MOV
MOV
TRAP
ADD

#EVTFO,=(SP)
#1,-(SP)
SP,RO
CSPNTS
#4,SP

:;PUT EVENT TIME (TICKS,SECS.MINS IN TEMP LOC.S)

:PRINT EVENT TIME AND DESCRIPT.

MOV
MOV
MOV
MOV
MOV
MOV
MOV

TRAP

JMP

NULEVT ,=(SP)
#1,=(SP)
SP.RO

*JUST PRINTED

WEVTF1,EVTMIN,EVTSEC,EVTTCK,EVTILST(R3)

104416

(4) 031004 oez7og 000014
figg 031010 000173 010622
6460

LSBTTL PRINT EVENT LOG
:PRINT THE EVENT LOG
REPLOG: MOV
R2,=(SP)
MOV
,=(SP)
MOV
R&,=(SP)
MOV
EviPTR,R2
TM
svrboe.m
BNE
RPT

003306,

zss 030636 0001 onsC 1:22'5
u.% 030642 162702 000012
6440
6461
6442
6463
644l
6445

MACY11 30A(1052)

PRINT EVENT LOG

n 7
16=JUN=81

EVILST(R3),~(SP)
EVTTCK,=(SP)
EVTSEC.=(SP)
EVTMIN.=(SP)
fi"" -(5P)
,~(SP)
SP.RO
CSPNTS

aRPTDSP(R3)

ADD
#4,SP
:DISPATCH TO DECODING SECTION FOR SPECIFIC TYPE

(R2)+,EVIADD

;STORE MESSAGE ADDRESS FOR PRINTING

(R2)+.EVIBCT
(R2)+.R3

:STORE BYTE COUNT FOR PRINTING
*STORE MODEM STATUS FOR PRINTING

MACY11 30A(1052)
OMM. LINK TEST
PRINT EVENT LOG
:38

NNNY

PRINTS

*35565

g8%3

Qo G

(elelelele]

—

TA
1

JSR
P
RPTDER: MOV
MOV
MOV

PRINTS

N 7
16=JUN=-81

WEVTF2,EVTADD,EVIBCT

PC ,RPTMSB
RPT
(R2)+,EVITMP
(R2)+.DEV1
(R2)+ . DEV2

W#EVTFS.EVITMP

14:39

:PRINT ADDR,BYTE CNT

:PRINT DEVICE REG CONTENTS.

JMP

RPT

CLR

DEV1

MOVB

(R2)+,DEV1

d d d

P S

WEVTF3C,DEV1,DEV2

—

— e

WWWWWW

EVTBCT,=(SP)
EVTADD,=(SP)
VTF2.=(5P)
#3,-(SP)
SP,RO
CSPNTS
#10,5P

MOV
MOV

EVITMP,=(SP)
#EVTF3.=(SP)

ADD

#6,5P
DEV2,=(SP)
DEV1 . =(SP)
:Svrfsc -(SP)
#3,~(SP)
SP.RO
CSPNTS
#10,5P

;GO PRINT MODEM STATUS
:GO BACK FOR NEXT EVENT ENTRY
:GET ADDRESS OF DEVICE INFO MESSAGE
*STORE DEVICE REG CONTENTS FOR PRINTING

PRINTS

RPTDVI:

CLR

MOV
MOV
MOV
JSR
MOV
JMP
RPTEOP: MOV
MOV
MOV

PRINTS

;GO BACK FOR NEXT EVENT ENTRY

DEV2

(R2)+.DEV.

(R2)+.DEV
(R2)+,DEV4
R2,=(5P)
PC . SHWOP
(SP)+,R2
RPT
(R2)+,EVTADD
(R2)+.EVTBCT
(R2)+.EVITMP

*STORE SETUP OPERATION PARAMETERS FOR PRINTING

:SAVE R2 ON THE STACK
*GO PRINT MODE, MAINT=LOOP TYPE, PARAMTERS.
*RESTORE R2
*GO BACK FOR NEXT EVENT ENTRY

WEVTF4B.EVTADD.EVTBCT.EVITMP

:PRINT ADDR,RXBYTES,CMPBYTES.

031272

JMP

RPT

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

:CLEAR UPPER BYTES OF DEV1 & DEV2 BEFORE USE

&
.

031276

MOV
MOV
MOV
MOV
MOV
TRAP
ADD

B
TRAP
CSPNTS

MOVB

(4)

SEQ 0091

PAGE 13-55

b D

R FRIENEIRNSZRERS o N8

e R

RIDIFTFER

CZCLKBO DMR,
CZCLkB.P1

:THEN GO GET NEXT EVENT ENTRY

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

EVITMP,=(SP)
EVIBCT.=(SP)
EVTADD . ~(SP)
FEVTF4LB,=(SP)
#4,~(SP)
SP.RO
CSPNTS
#12,5P

8 1
1

6496 031352
6497
6498 031356
6499 031356
6500 031
6501 031
03137
6
(10) 03137
(9) 031376
(8)
(7)
(6)
(3)
(6)

(4)
6503
6504
6505
6506
6507
6508
6509
6510
6311
631
651
6514

MOV

0001

RPTDLE:
RPTDCK:

81 237
12237
012237

031426

000137

031432
0314
0314
031440

012604
012603
01260;
20

lflg)hEVTADD
(R2)+,EVIBCT

(R2)+ ,EVITMP

14:39

PAGE 13-56

SEQ@ 0092

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

;PRINT ADDR, BYTE CNT, oflqv ERRS

MOV
MOV
MOV
MOV

TIMP,=(SP)
EVIBCT,=(SP)
EVTADD,=(SP)
FEVTF4,=(SP)

ADD

#2,5P

oy
TRAP

04416
062729

031422

8 8
16=JUN=81

PRINTS WEVTF&,EVTADD,EVIBCT,EVTTMP

81 746
13746
81 746
12746
127
1

81 746
013746
013746
01%766
012746
010600
104416
062706

031402
031406
031412
031416
031420

bkl

RPTDDE : %x

JMP

RPT

;THEN GO GET NEXT EVENT ENTRY

MOV
MOV
MOV

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

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

PRINTS

JMP
ENDEVT: MOV
MOV
MOV
RTS

WEVTF4A,EVTADD,EVIBCT,EVITMP

RPT
(SP)+,Ré4
(SP)+.R3
(SP)+.R2
PC

S
CSPNTS

:PRINT ADDR,RXBYTES,CMPBYTES.

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

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

;THEN GO GET NEXT EVENT ENTRY
;RESTORE R4 ,R3,R2
;RETURN TO CALLING ROUTINE

;REPORT MODEM STATUS SUBROUTINE

PART OF STATISICAL REPORTING (DUMPING EVENT LOG)

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

031442
031442
031446
031452
031456
031456

012746
012746
?10600
104416
062706

6519
6520
6521
6522
6523
6524
6525

031474
031476
031583
0315
031506
031510
031512

??1004
'§‘735
005724
090407
0 240;
00140
112735

s G g
6518 0312% oo§;?¢

017143
000001
000004
0460
0476

RPTMSB : PRINTS

6%:

000130

;PRINT MODEM STATUS HEADER

MOV

VMOHD , = (SP)
CSPNTS

MOV
MOV
ST
BNE

#MOBITS R
#MOMSGS , RS
(R&)
7$

#4,SP
ADD
:MAKE R4 A POINTER TO MODEM S1G. BIT DEF. TABLE
:MAKE RS A '2"“5&'0 MODEM MSG. POSITION TABLE
:SEE IF ax; VAI
FROM DEVICE
.-ang THA]
EM SIG. AVAIABLE

(R4S +

:BUMP R4 TO POINT TO NEXT

MOVB

7%:

000061

#EVMOHD

B
TRAP

(4)
(4)

031 13
031
81
1
03
0N

012237
12237
12237

PRINT EVEN

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

8 1302
)
131
131

M%YZ&GSOA(‘IOSZ)

14:38

-—

64N

6‘9;
649
6494
6495

16=JUN-8

£ % 2888

CZCLkB.P1

,DMC=11 DA A EM. LINK TEST
—

ZCLKBO

BR
BIT
BEQ

MOVB

#'X,3(RS5)+

98
(R4)+,R3
8%

#'1,3(RS)+

:ELS

:Yr

f" n?un

“ f GNAL NOT AVAILABLE

BIT

DEF INITION

}'? ffégé'f».‘.fg'f‘:fi:; vh;g_INDEVICE'S ENTRY=1

;
;
i8R

:1F=1,

MODEM SIGNALS

PUT

"1""IN REPORT

MESSAGE

2CLKBO ?m
onc
CZCLKB.P1

m\ LINK TESTPRINT EVENT
msm
30A(1052) 1§-Jun-|1 14:39 PAGE 13-57
4:38
LOG

151
esgz
§
11524 020427
7g§ 0?0090
65
010476

6529
6530

031
031

9231

031552

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

760

031
012746 017223
0 1§‘
12746 000001
031542
010600
031544
104416
031546 062706 000004
000207

32::

MOVB
CMP

9’0
a(RS)+
63,#M0B1 TE

BLT
PRINTS A#EVMOST

RTS

SEQ 0093

u ALL
B xm CHECKED
.u
o
)
*
?n nemn ME SSAGE
.sse
ts(hms)

%
ALI. SIGNALS (B1 s> cumeo
HEN m MODEM SIGNAL VALUE MESSAGE

;RETURN TO EVENT DECCDING

MOV
MOV
MOV
TRAP
ADD

og\msr -(SP)
#1,=(5P)
SP,RO
CSPNTS
#4,5P

——

ZCLKBO

cZCLKB.P1

.DMC=11 DATA COMM. LINK TEST
16=JUN=-81

MACY11 30A(1052)

14:38

D 8
16=JUN-81

14:39

DUMP BYTES OR WORDS

PAGE 13-58

gg 5

JSBTTL

6
6
gg:?

s4e
: FUNCTIONAL DESCRIPTION:
:
DUMPSR = DUMP BYTES OR WORDS SUBROUTINE

654
654
6544
6545

:
:
:
:

654

[

6548
6549

DUMP BYTES OR WORDS

THIS SUBROUTINE PRINTS THE CONTENTS OF me“Locnnonsagrueen
A STARTING AND END ADDRESS IN LOCS. ‘‘STADD'' AND
THE WORD OR BYTE CONTENTS ARE PRINTED 8 TO A Lms wnu THE
ADDRESS OF THE FIRST BYTE AS THE FIRST 6 OCTAL CHARS. FOLLOWED
BY A SEMICOLON.

: INPUTS:
:
STADD= STARTING ADDRESS (FIRST LOC. TO PRINT)

6550

6551

ggg

ENADD=

ND ADDRESS (LAST Locmou 70, DUMP)

BYTBIT= 1 IF SUPPOSED TO PRINT

: OUTPUTS:

6557

: CALLING SEQUENCE:

8361
6
031554 013702 007402

DUMPSR: MOV

gggg

6563
6564

031560
031562

005003

(4)

031576

104417

(4)

6565
6566

031562
031564
031570
031574

010246
012746 016242
012746 000002
?10600

031600 062

031604
031610

005737
001416

000006

007406

(8)
(8)

031616
031620

005046
153716

(4)

031636

10441

(7)
(6)
(3)

JSR PC,DUMPSR

CLR
PRINTF

STADD ,R2

R3
#BASM1,R2

;CALL DUMP BYTES SUBROUTINE

ssr.é'
R2
TO STARTING ADDR.
:CLE
mm ADDRESS

MOV
MOV
MOV
MOV

R2,=(SP)
#BASM1
, - (SP)
#2,-(SP)
SP,RO

ADD

#6,5P

CLR
BISB

=(SP)
TEMP, (SP)

TRAP

DUM3:

6567 031612 112237 007426
6568 031616

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

DUM4:

'BYTES'

0 IF SUPPOSED TO PRINT ‘WORDS

6554

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

SEQ 0094

TST
BEQ

avrsn

PRINTF

#BASMS,<B, TEMP> :PRINT BYTE

MOVB

mz» TEMP

;1S THIS BYTE OR WORD
:BR IF WORD

CSPNTF

:MOV BYTE TO TEMP

007426

0316;3 012746 016224
031630
012746 000002
031634 01

MOV
MOV
MOV

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

031640
031644
031646
0316;8
0316
031654
031660

ADD

#6,5P

MOV
MOV
MOV
MOV

(R2)+,~(SP)
#BASMZ - (SP)
#2,-(SP)
SP.RO

(4)
6571

031664 062
031670 020237

ADD

#6,SP

(4)

031662

0004
812;56
15 46 016233
012746 000002
?10609
10441

TRAP

000006

000006
007404

DUM1:

PRINTF

DuUM2

#BASM2,(R2)+

;PRINT WORD

TRAP

DUM2:

C(MP

R2,ENADD

;COMPARE FOR LAST ADD

#BASM3,
- (SP)
#2,-(SP)
SP,
CSPNTF

CSPNTF

—

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

MACY11 30A(1052)

6572
65

BGT
INC

CZCLkB.P11

6574

031674
031676

031700

16=JUN-81 14:38
003005
00 ;8;

022

6575 031704 0017;2

6576

6577
6578

031706

0007

031710

000207

15-.)['4-81 14:39 PAGE 13-59

DUMP BYTES OR WORDS

000010

CMP

BEQ

BR
DUMEX:

RTS

D&Kl

#8. ,R3

ow’.
PC

:IF DCNE EXIT
;ELSE BUMP
R3
;HAVE WE PRINTED 8 ACCROSS

:1F SO GO BACK TO &

:ELSE GO BACK AND PRINT ANOTHER
;BYTE OR WORD
;RETURN TO CALLER

SEQ 0095

F 8
16-JUN-B1

MACY11 30A(1052)

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

14:39

UPDATE TOTAL CHAR. COUNT SUBROUTINE

SEQ 0096

UPDATE TOTAL CHAR. COUNT SUBROUTINE

.SBTTL
I

FUNCTIONAL DESCRIPTION:

UPDATES TOTAL CHAR. COUNT TOTCC BASED ON CURCC.
LAST MESSAGE IS TRUNCATED TO FIT INTO THE

BUFFER IF TOTAL CHAR. COUNT EXCEEDS

N D D

PAGE 13-60

'BUFLIM''

A MESSAGE

INPUTS:

IS PRINTED TELLING THE OPERATOR THE TRUNCATION OCCURED.

TOTC C=

OUTPUTS:

CHAR. COUNT OF MESSAGE BEING ADDED

TOTAL CHAR COUNT OF BUFFER ITS BEING ADDED TO

MESSAGE TO OPERATOR IF MESSAGE TRUNCATED TO FIT

LA TR T TN T

L T

CURCC

ADDCC:

ADD

CMP
BHIS

PC,ADCC

CURCC, TOTCC
#BUFLIM,TOTCC
ADDC1

;UPDATED TOTAL CHAR. COUNT
;ADD CURRENT TO TOTAL
; COMPARE TO 'BUFLIM"
;IF NOT MORE THEN 'BUFLIM' EXIT

: PRINT MESSAGE AND TRUNCATE COUNT
#MSGTRU

CURCC,TOTCC

#BUFLIM,TEMP

T0TCC, TEMP
TEMP, CURCC

ADDC1:

’glcfiCC.TOTCC

:SUB CURRENT FROM TOTAL

MOV
MOV
MOV
TRAP
ADD

#MSGTRU,
= (SP)
#1,-(SP)

SP,RO
CSPNTF

#4.,SP

:MOV "BUFLIM' TO TEMP

:SUB TOTAL FROM ‘BUFLIM'
:AND ESTABLISH NEW CURRENT
;ADD

"'ADJUSTED CURRENT'' TO TOTAL CHAR. CNT.

;RETURN TO CALLER

[S—

PRINTF

007422
007422

LOCATION '‘TEMP'' USED FOR CALCULATIONS

:
CALLING SEQUENCE
JSR

031712

FUNCTIONAL SIDE EFFECTS:

MACY11 30A(1052)

CZCLKB.P11 ~ 16=JUN=81 14:38

.SBTTL

6625

;" FUNCTIONAL DESCRIPTION:

82224.
6625

6628
6629
6630

PAGE 13-61

BUILD MESSAGE BUFFERS SUBROUTINE

BLDBUF== BUILD POINTER TABLE AND BUFFERS

;

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

;

&229

14:39

BUILD MESSAGE BUFFERS SUBROUTINE

6619

G 8
16=JUN=81

THIS SUBROUTINE ADDS A MESSAGE TO THE TRANSMIT OR EXPECT LIST

: INPUTS:
;
CURCC= CHAR. COUNT OF MESSAGE TO BE ADDED
:
CURADD= ADDRESS OF MESSAGE TO BE ADDED

2‘631

;

6634
6635
6636

;
INDEX INTO DMSGCT() AND DMSGAD().
: QUTPUTS:
;
A MESSAGE ADDED TO EITHER TXBUF OR CMPBUF

eeg
ggg;

6639
664

032010

013702

007416

6648

;

APPROPRIATE POINTERS IN PTRTAB POINTER TABLE

013722

007420

6650 0

01350

007416

6652

oogso;

032020

BLDB1:

032034 013702 007410
032040

665
6654 032050
6655
56
6656 g
6657 0320

013737
063737
013703
016237
ouseg:.

245;

use!
!i 032114

17%

6664 03211
6665

032120

6668

032132

6666 o§1
6667 8 1

063737

012603
omo;
00020

MOV

CURADD, (R2)+

;PUT CURRENT ADD ON POINTER TAB

MOV

R2,CPTR

:PUT UPDATED R2 BACK TO CURRENT POINT

MOV

007420
007426
MOV
007412
007426
ADD
0074
MOV
002150 007432 BLDB2: MOV
002176
MOV

6660 032102 020337
007426
6661 832106 oouga
110 020437 007432
007412

CPTR,R2

CURCC, (R2)+

MSGTYP,R2
R2

NS-

:PUT CURRENT CC ON POINTER TAB

:GET MESSAGE TYPE TO USE AS INDEX
:DOUBLE FOR WORD INDEX

CURADD , TEMP
:MOVE CURRENT ADD TO TEMP
CURCC, TEMP
SADD CHAR COUNT TO IT TO GET END
CURADD ,R3
:SET R3 TO CURRENT START ADD
DMSGC
T (R2) , TEMP2'
:GET BYTE COUNT
DMSGAD(R2) .Ré ;PUT STARTING FROM ADD IN Ré4

ADD

RG , TEMP2

SADD IT TO TEMP2 TO GET END OF FROM

cTMP
BEQ
CMP

R3, TEMP
BLDBEX
R&, TEMP2

.ALL DONE?
:1F SO EXIT
:1S PATTERN COUNT EXPIRED

MOVB

BEQ

007420

AS-(3e)

ASL

BLDB3:

;BUILD MESSAGE IN BUFFER AND ADD PTRS.

hy
MOV

032074 ??o‘ 7 007432
032100

JSR PC.BLDBUF

MOV

6649 032024 omgg 007412

6659

MSGTYP= VALUE TO USE AS AN INDEX TO FIND SOURCE OF MESSAGE DATA

BLDBUF :

&«; 032014

6658

;

s 035013 01034c
6651

ADDRESS cT)r 5’2‘&5?[‘7"‘“ WORD WHERE MESSAGE POINTERS ARE

: CALLING SEQUENCE:

6643

CPTR=

BLDBEX: ADD

MOV
MOV
RTS

(Ré)+, (R3)+

awe

cuncccguoo

(SP)+.R
(SP)+.R2

:MOV BYTE FROM PATTERN TO BUFFER

:IF SO GO START AGAIN

S1F NOT GET ANOTHER BYTE
:BUMP CURADD

:RESTORE R3 AND R2
;RETURN TO CALLER

SEQ 0097

D——

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

H 8
MACY11 30A(1052) 16=JUN=B1 14:39 PAGE 13-62
CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
CZCLkB.P11
16=JUN-81 14:38
CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST

THIS ROUTINE ADDED FOR REV B BY EC

FWCTIM DESCRIPTION:

USED TO CREATE A FACSIMILE OF
T
OF THE TRANSMIT LIST AND TRANSMIT BUFFER IN THE
EXPECTED LIST AND EXPECTED BUFFER. THE ROUTINE SS
NORMALLY CALLED WHEN USER COMMAND ''SET E [XPECTI=
T CRANSMIT] IS ENTERED.

CALLING SEQUENCE: JSR

PC,FACSIMILE

T AT T

A N N T N

L R
O TR TR TR T

DL N

FACSIMILE: THIS ROUTINE IS

6675

667
667
6678
6679
6680
6681

CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST

;00

667
6674

.SBTTL

T ETEIE
TR
AT R T R T R T A T A T A T A TR T

6671
667

DEF INITIONS

CMBUF = 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

= TRANSMIT MESSAGE LIST POINTER

TXMTOT = NUMBER OF TRANSMIT MESSAGES
CCURAD = STORAGE ADDRESS OF MESSAGE IN CMPBUF
MSGLIN = MAXIMUM NUMBER OF MESSAGES THAT CAN BE STORED
BEGIN FACSIMILE ROUTINE
(*COPY TXBUF ==> CMPBUF
*)
..SAVE R1
LLINIT m
. \REPEAT

....tcm?mm=[ TXBUF JR1

IiiinuR1= 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]
LR cm «+WHILE TXHTOT <> CMPTOT DO
«++.LCMPPTR] = CCURAD
....EH’PTR = CMPPRT + 2
«++.LCMPPTR] = CTOTCC
«sss TXPTR = TXPTR + 4
++++CCURAD = ECURAD + CTOTCC
+++.CTOTCC = LTXPTR]
«++.LMPPTR = CMPPTR + %
+0+.CMPTOT = CMPTOT +
..END WHILE DO
END FACSIMILE ROUTINE

SEQ 0098

6731
&

03214
0321

ogzg 012701

67,
¢

1
1

6733
0321
g 4 0321
6737
v

146
001
1 161

FACSIMILE:
003562

005562

108:

830 ;r 001000
1371

MOV
CLR

MOVB
INC

cTMP
BNE

000017

208:

MOV
ADD

#PTRTAB, CMPPTR
m CMPPTR

:TOP OF POINTER TABLE
:START OF EXPECTED POINTER TABLE

005001

032
032210
032216
032224

012737 ooesgs 007334
012737 005562
007344
oe;nr 000002 007334
017737 1551064 007342
005037

007340

032236
032244

023737
0014.39

007354

007340

007344

155062

MOV

6755 0322% 013777 007342
6756 0322
737 000004

155046
007334

MOV
ADD

6759 032%

007336

6744
6745
67‘?
6747

g;:g

6750
6751
6752

6753

032232

032246

32254

013777

6761

032

737 000002

032324

000744

032326

013737

6766 032334

012601

6762

g;gz
6765

6767

032336

000207

007340
007356

007342

R1
R1

:SET UP WHILE = DO LOOP

MOV
MOV
ADD
MOV
CLR

308:

737 ooooog 007336

005237

ASL
ASL

CLR

6757 032%2
737 007342 007344
6758 032
88737 155024 007342
6760

.Au. DATA COPIED ?
:NO,BRANCH

#PTRTAB, TXPTR
#CMPBUF . CCURAD
#2,TXPTR
aTXPTR,CTOTCC
CMPTOT

:MULTIPLY BY
*MULTIPLY BY
SINIT R1

;TX POINTER NOW AT TOP OF TABLE
:TRANSFER ADDRESS OF 1ST MESSAGE
:BUMP POINTER
:BYTE COUNTER 1ST MESSAGE
SINIT EXPECTED MESSAGE COUNT

;WHILE TX MESSAGE TOTAL <> EXPECTED MESSAGE TOTAL DO

(MP
BEQ

TXMTOT, CMPTOT
408

;ALL MESSAGES COPIED ?
:YES ,BRANCH

ADD

#2,CMPPTR

:BUMP POINTER

ADD
MOV
ADD

CTOTCC, CCURAD
aTXPTR,CTOTCC
#2,CMPPTR

x~c

40$:

:COPY TX BUFFER TO EXPECTED BUFFER
:BUMP INDEX

;MESSAGE LIMIT

032200

674

R1,#BUFLIM
108

TXBUF (R1),CMPBUF(R1)
R1

MMSGL IM,R1

006301
006301

2;21

:SAVE R1
SINIT R1

MoV

032162
ogm

6739 032166 012737 006562 007336
6740 032176 060137 007336

R1,=(SP)
R1

CCURAD , aCMPPTR

CTOTCC,aCMPPTR
#4, TXPTR
CMPTOT

308

£~o WHILE = DO

MOV

TTercC,CTOTCC

;END ROUTINE

MOV
RTS

(SP)+,R1

:TRANSFER ADDRESS OF MESSAGE
:BYTE COUNT OF MESSAGE
:BUMP TX MESSAGE POINTER

SCALC. TRANSFER ADDRESS
:BYTE COUNT NEXT MESSAGE
:BUMP POINTER

: INCREMENT MESSAGE COUNT
:D0 IT AGAIN

;COPY TOTAL CHARACTER COUNT

;RESTORE R1
*RETURN

——emd

6727
6728

SEQ 0099

———

,DMC=11
DATA 14:38
COMM. LINK TEST CREATE FACSIMILE
MACY11 30A(1052)
i81
14:39LIST
PAGE 13-63
16=JUN=81
OF TX BUFFER
AND MESSAGE

2CLkBO

cSch.n

6771
677

MACY11 30A(1052) 16=JUN=81
14:39 PAGE 13-64
SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS

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

SEQ 0100

SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS

.SBTTL
++

FUNCTIONAL DESCRIPTION:
SHWOP = §HOW MODE OF OPERATION,

LOOP, QULAIFIERS

PRINTED ON THE OPERATOR'S CONSOLE.

INPUTS:
DEVi=
DEV2=
DEV3=
DEV4=

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

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

BEEIEREERRCREE

013702
006

010650

003514
010652

007426

014636

007434

14635

007434
007430
007432

MOV
ASL
MOV

DEV1,R2
;GET THE MODE TYPE IN R2
R2
SMAKE IT A WORD TABLE OFFSET
MODES
(R2) ,TEMP :GET ADDRESS OF MODE-IN-ASCII

MOV
ST
BNE
MOV
MOV
MOV

#LP00, TEMP3
:LOAD TEMP3 TO POINT TO ‘‘/LOOP='*
R2
SSEE IF /LOOP=XXXXX OR NONE
108
: BR IF /LOOP= OF SOME KIND
*
#LPO, TEMP3
:1F NO LOOP THEN DON'T PRINT ‘‘/LOOP=
LOOPS (R2) ,TEMP1 :GET ADDRESS OF LOOP=-IN=ASCII
DEV3, TEMP2
:GET NUMBER OF PASSES

zg!

108:

PRINTS

gsvz.nz

:GET MAINTENANCE LOOP TYPE

#SHF0,TEMP,
TEMP3, TEMP1, TEMP2

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

000014
CLR

014715
000001

012737

014713
014726
000002

1%:

014736
000004

2%:

014734

MOV
BIT
BNE
MOV
MOV
BIT
BNE
MOV
MOV
BIT
BNE
MOV

#PST, TEMP
#STATB,DEV4
18
APNST , TEMP
#PCK, TEMPI
#DATCKB,DEV4
2
#PNCK , TEMP1
#PEC, TEMP2
CHOB, DEV4
3
#PNEC, TEMP2

;NOW SET UP FOR QUALIFIERS IN ASCII

:SEE IF /STATUS OR /NOSTATUS

:BR IF /STATUS

:SEE IF /CHECK OR /NOCHECK

‘BR IF /CHECK

;SEE IF /ECHO OR /NOECHO
‘BR IF /ECHO

TEMP2,=(SP)
TEMP1 .=(SP)
TEMP3,
= (SP)
TEMP,=(SP)

#SHFQ, = (SP)
#5,-(5P)
SP.RO
CSPNTS

#14,5P

§819
gg’% $rr Sooolo Slocse '
12% 014743 007440
0

(1 0
(10> 0
(9) 032610
(8)
14
%é)
(6)
4
(3)

0326

(4)

032634

58:

K 8
16=JUN=81 16 39 PAGE 13-65
» LOOP TYPE AND QUALIFIERS

BNE

BIT
MOV

mdtoewe jDoem check 7 nEy B EC
v S BRANCH;
#PNMS , TEMPS
'/NOMODEM' ksme nevutc

PRINTS

WSHF1,TEMP,TEMP1,TEMP2,TEMPS

032640 00020

:,TEMP3,TEMP4 »+:SEE NOTE ABOVE

MOV
MOV
MOV
MOV
MOV
MOV

TEMPS,
= (SP)
TEMP2,=(SP)
TEMP1 ,=(SP)
TEMP,=(SP)
#sHEi ,=(sP)
-(fin

ADD

#14,5P

MOV

% 0
2&4

SEa 0101

3
5
i,

SHOW

MACY11 30A(1052)

CZCLKBO DMR,DMC=11 DATA 2%. LINK TEST
CZCLkB.P11
16=JUN-81
14:

TRAP

RTS

:RETURN

csims

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

MACY11
30A(1052) 1k-JW-O1 }‘:39 PAGE 13-66
TRAVERSE COMMAND L INE

CZCLKB.P11

w.g

.SBTTL

6“

ea??

685
685

gggg

"“9
685
6858
6859
6860
%
6864

03264

121327

6870
032623 003023
6871 032664 111305

‘PARSE THE COMMAND LINE SUBROUTINE

STAKE ACTIONS (VIA Acnon TREE) AS PARSING | INE
:PARSING DIRECTIONS FROM '‘CLI PARSING NODESTM

237

£5

6879
6880

032700

PSTRS:

000013

004715

032704
032706

000114
000134

eaom

689§ 032

032

BGT
MOVB

ASL
MOV
ADD

6895 832
wog 32742
6897
032744
6898 032750
6899
6900 032754
6901 032756

108:

88815
1
000204
000270
000624
8886 0
70
000256
000

121314
140

004737 033002
ooon;
004737
032762
062703 000004
005

000735

MOV
MOV
TSTB
BEQ

CMPB

032702 000763

6881 8571
eoai
71
688
714
6884
716
6885
eaag 327
6887
032724
6888
032726
6889

689

REGS USED:

PSTRY:

6872
032666 006305
6873
032670 016505 032704
6874 032676 062705 032704
6875

PSTRV SUBROUITNE

:
R1,R5=SCRATCH
E
R§=ACTIW CODE PARAMETER FROM TREE
:
R3=PARSE TREE POINTER
:
R4=INPUT STRING POINTER
: CALLING SEQUENCE:
:
JSR
PC.PSTRY

6865 o§2u. 013704 003544
eaeg 032
013703 003546
6867
032652
105714
6868 032654 001441
6869

TRAVERSE COMMAND LINE SUBROUTINES

PSBUFA,
R4
PS$TREE .R3
(R4)
PSEXIT
(R3),M11.

208
(R3),RS

.WORD
.WORD

TRVERR-10$
TRVEXI=-10%

TRVBR-10$
TRVBIF=10%
TRVSPA-10%
TRVNUM-10%
TRVALP-10%
TRVALN-10%
TRVOCT=10%
TRVDEC-10%
TRVSTR=-10%

;NOT A SPECIAL CODE

228:

;SEE IF ANY CHARS LEFT IN INPUT STRING

*BR IF NO

*SEE IF SPECIAL CLI cm CODE OR ASCII

*BR
IF REGULAR ASCIIC
:GET SPECIAL CMAR CODE mro RS

RS
10$(RS) ,RS
;BUILD TRAVERSE ROUTINE ADDRESS
#108,RS
JSR
PC, (RS)
:JSR TO SPECIAL CLI TRAVERSE ROUTINE
B8R
PSTRS
:GO SEE IF MORE OF STRING LEFT
;TRAVERSE TABLE FOR *CLI FUNTIONS'
.WORD
.WORD
.WORD
"WORD
"WORD
.WORD
.WORD
"WORD
"WORD

208:

PSNUM=NUMERIC CODE FROM DATA

C(MPB

:TAKE ERROR ACTION
STAKE EXIT ACTION

STAKE BRANCH ACTION
STEST PSGDBD & TAKE BRANCH
:SKIP SPACES OR TABS IN CMD LINE
*TRAVERSE NUMERIC FIELD
:TRAVERSE ALPHABETICS
*TRAVERSE ALPHANUMERICS
SAME AS TRVNUM
SSAME
AS CLINUM BUT DECIMAL
:FIND ASCIZ MATCH IN CMD LINE

JSR
B8R
JSR
ADD

(R3),(R&4)

PC, TRVBRC
PS$TRS
PC, TRVACT
#4.R3

; SEE xr FIRST CHAR OF STRING IS A MATCH

INC

ADJUST BUF PTR TO NEXT CHAR IF MATCH

BEQ

B8R

22%

P$TRS

:BR
IF A MATCH

:1F NOT A MATCH, GO TAKE MISS BRANCH
: "THEN GO BACK PT'G TO MISS NODE
:1F A MATCH, GO DO ACTION DEF INED BY
: ACTION CODE IN CLI NODE, THEN
: ADJUST PTR TO NEXT CLI NODE

SEQ 0102

"8
16=JUN-81
14:39
TRAVERSE COMMAND LINE SUBROUTI NES

MACY11 30A(1052)

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

B R R

690

032760

000207

PSEXIT: RTS

:GOTO USER ACTION

BIC
MOV
JSR
RTS

003550

ADD
RTS

A
3R ST B MR RA

017 60R2
T,RS
(RS)
PC,
PC

2(R3) ,RS

RS,.R3
PC

:NO BRANCH TAKEN

TRVNOB: ADD

000004

0327
17777

rms

: TAKE BRANCH IN TRE

TRVBRC: MOV

000002

RTS

003561

TRVERR: JSR

move

;GET ACTION CODE FROM CLI NODE
sCLEAR ANY SIGN EXTENSION

;GET ADDRESS OF CLI ACTION ROUTINE

;GO DO ACTION DEF INED BY CODE
sRETURN TO CALLING CODE

GE T BRANCH DISPLACEMENT FROM TREE
: AND POINT
TO THE "MISS'' NODE

: RETURN TO PSTRV

:THINGS OK, UPDATE R3 TO POINT TO NEXT
: NODE AND RETURN TO PSTRV

PC,TRVACT

:TAKE ERROR Acnon

(SP3+

:GET RID OF ''JSR PUSH TO TRVERR'

#-i,PsGoBD

:SET ERROR RETURN FLAG

032760

JMP

032762
003561

TRVEXI: JSR

PC,TRVACT

sTAKE EXIT ACTION

035003

0327

TRVBR:

JSR
P

PC, TRVACT
TRVBRC

;GO TAKE BRANCH ACTION

032762
003561

TRVBIF: JSR

PC.TRVACT

CLRB
ST
JMP

032760

03300
03301
000011

TSTB

18:

BEQ
JMP
P

PSGDBD
(SP)+
PSEXIT

*RETURN DIRECT TO EXIT OF PSTRV ROUTINE

*SET GOOD/BAD FLAG TO *‘SUCCESS (0)**
:GET RID OF '‘JSR PUSH TO TRVEXI''
*RETURN DIRECT TO EXIT OF PSTRV ROUTINE

P$GDBD

:SEE IF PSGDBD SET OR CLEARED 8Y ACTION

TRVNOB

:JUST UPDATE TO NEXT NODE IF THINGS OK

18
TRVBRC

:1F CLEAR FALL THRU TO NEXT NODE
SELSE TAKE THE ‘MISS'' BRANCH

;CLEAR *SPACE OR TAB FOUND'‘ FLAG

BNE

:BR IF

18:

(P8

2s:

108:

(R4) A1

INC

CMPB

BNE

INC

032762

PSEXIT

TRVSPA: CLR

INC

000040

SEQ 0103

;RETURN FROM PARSER

TRVACT: mOVB ~ 1¢(

127600

PAGE 13-67

B8R

TST
BEQ
JSR

(R4) 440

108

RS
158
PC, TRVACT

: SEE xr CHAR xn CMD LINE= TAB
T A TAB

+ INC xNPuf srnxns POINTER
*INDICATE A TAB FOUND
:GO CHECK NEXT CHAR

sss xr cnnn IN CMD LINE= SPACE

‘BRI

NON-SPACE OR NON-TAB CHAR.

xuc lnruf STRING Poxnren
NDICATE A SPACE FOUND

:GO CHECK NEXT CHAR

: SEE }r ANY SPACES OR TABS FOUND
*BR IF NO, TAKE NO ACTION
“GO TAKE
ACTION IF ANY FOUND

N 8
16=JUN-81
14:39
TRAVERSE COMMAND LINE SUBROUTINES

MACY11 30A(1052)

g 808137 833008

158:

PAGE 13-68

SEQ 0104

JMP
JMP

TRVNOB
TRVBRC

;JUST GO UPDATE R3 TO NEXT NODE IF OK

MOV

#10. ,PSRADX

sUSE DECIMAL AS RADIX AND ASSUME +

s TAKE BRANCH (MISS) IF NONE FOUND

JWP
TRVNMA
806137 838208
TRVOCT: ; (SAME AS TRYNUM SINCE DEFAULT RADIX IS OCTAL)
i
USE € OCTAL AS RADIX AND ASSUME +
033174 81 2737 000010 003556 TRVNUM: MOV
ndPSRADX
003556

TRVDEC:

1214
1001

-3

—

—3

R
e A S
N e
e B

ZCLKBO DMR,DMC-11 DATA CW LINK TEST
16=JUN-81 4:38
CZCLkB.P1

7
204

TRVNMA: CLR

000053

(MPB

000055

177777

108:

003557

118:

18:

000067

003556

000012

8GT
PRINTF

012607
000001

033304
033312

033314
033320

003561

000071

MOVE

B8R
128%:
138:

28:

003554

3s:

BEQ
MOV
SUB

CLR
MOVB

(R&) 460

2s
(R&) W67
138
PSRADX,#10.
12$
(R&) A7

#CLIBRX

#-1.P$GDBD

(R&) ,A71

2
R4
RS
13
RS

X3
R4 ,R1
RS.R1

sse IF THERE'S

: BR

A = SIGNTHERE

JUST BR

:SET }HIMJS FLAG'® (M1 BYTE OF PSRADX)
:BUMP R4 TO POINT TO FIRST CMAR

;SEE IF CHAR. LESS THAN A ‘D"
:BR IF YES (NOT NUMERIC)
;SEE IF CHAR. GREATER THAN A "7
YES
: BR IF
;SEE IF IN DECIMAL MODE
: BR IF YES (CAN USE HIGHER LIMIT)

sSEE IF DIGIT WAS A B8 OR 9
;BR IF NON-NUMERIC
sELSE WAS A 8 OR 9 WHEN IN OCTAL RADIX
MOV
#CLIBRX,~(SP)
#,=(SP}
MOV
MOV
SP,RO
TRAP
ADD

;SET ERROR RETURN FLAG
: PRINT ERROR AND TAKE MISS

CSPNTF
w4 ,SP

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

:SEE IF rouo ANY NUMERICS
*BR IF NO, TAKE ‘MISS" BRANCH

SGET POINTER TO START OF NUMERIC STRING

;SHIFT CURRENT VALlf TO MAKE ROOM

PSNUM, PSCNT
7%
PSNUM

000012

BCS
ASL
B(S
(MPB

BNE

: ELSEPSRADX ALREADY SAYS
+

PSNUM
78

MOV
ASL

ISEE IF THERE'S A+ SIGN THERE

;CLEAR LOC. WHERE VALUE WILL BE STORED
;GET ASCII CHAR AND CONVERT IT TO A #

003552

ASL
BCS

:CLEAR DIGIT COUN

PSNUM
(R1)+,R2

#60,R2

003554
003556

CMPB

B8GT
INC
INC
BR

108
118
(R&) ¥~
18
#=1,PSRADX+1
R4

SUB

000060
003554

003554
003554

(MPB

BLT
(MP8
BLE
(MPB
BEQ

(P8

000071

000004
177777

BNE
B8R
(P8
BNE
MOVEB
INC

(R&) W'+

PSNUM

PSRADX,#10

:ERROR IF NUMBER
T0O BIG
;SAVE FOR LATER IN CASE DECIMAL RADIX

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

b
—

i
§
of

NSEVIWNONN

VNV

WN—=O

MACY11 30A(1052)

ATA COMM. LINK TEST
14:38

288
s222 gsss
o

CEEEEEEEEEr 5%

(S CL
L

-n

003552

;;CNT.W
48:

003557

003554

038013

158:

7%:

012565
000001
000004
177777
033002

000101

003561

5%:
TRVALP:

1%:

ng.nuun
7
RS
38
PSRADX+1
158
PSNUM

PC,TRVYACT
TRVNOB
#CLINBG

#-1,P$GDBD
TRVBRC

R5
(24) 4101

(R4) ,#132

000132

2%:
032762
033012
033002

3s:

PC, TRYACT
TRVNOB
TRVBRC

000060

TRVALN:
108

R5
(R4) ,#60

000072

2%
(R4) 472
1%

000101

1%:

000132

108
(R4) ,m01

2%
(R4) ,m132
2%

7058 -. 033632
7059 033636

14: 39

TRAVERSE COMMAND LINE SUBROUTINE

003554

8 9
16=JUN=81

108

2$:

3s:

PC,TRVACT
TRVNOB
TRVBRC

032762

PAGE 13-69

SEQ 0105

;ERROR IF NUMBER TOO BIG
;ERROR IF NUMBER TOO BIG
SSIE! {F
NUM WAS PRECEDED BY A - SIGN

; ELSE fiGATE THE NUMBER BEFORE LEAVING
;SINCE NUMERIC FOUND, GO TAKE ACTION
;GO POINT R3 TO NEXT NODE
;PRINT NUMBER TOO BIG ERROR
MOV
MOV
MOV
TRAP
ADD

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

;SET ERROR RETURN FLAG

;TAKE ‘MISS'' BRANCH

:CLEAR ALPHA FOUND FLAG
:SEE IF CHAR. LESS THAN A
:BF_IF YES (NOT ALPHA)

‘A

SEE IF CHAR. GREATER THAN A ‘7"

BR IF YES (NOT ALPHA)
;UPDATE CMD LINE PTR TO NEXT CHAR
:INDICATE AN ALPHA WAS FOUND
:G0_LOOK AT NEXT CHAR
gge IF ANY ALPHA'S WERE FOUND
IF
:IF _ANY FOUND TAKE ACTION
:THEN UPDATE R3 TO NEXT NODE =NO BRANCH
:NONE FOUND, TAKE MISS BRANCH

;CLEAR ALPHANUM FOUND FLAG

.SEE IF CHAR. LESS THAN A ‘0"’

S _(NOT NUMERIC OR ALPHA)

BR IF YES (NOT MR{
U’DATE CMD LINE PTR 0 NEXT CHAR.

: INDICATE A

RICF

i8R 1F "YESYES (ROT (o

ALPHA )

PEYES (NOT

ALPHA)

160 LOOK AT NEXLESSCARs
.
THAN A *A*
: SEE
-see IF_CHAR.

GREATER THAN A ‘7'*

{UPDATE €MD LINE BTR TO NEXT CHAR
: INDICATE AN ALPHA FOUND
:60_LOOK AT NEXT CHAR,
SEE IF ANY ALPHANLNY' § WERE FOUND
i8R 1F N0

A
AKE ACTION
HEN
UPDATE
R3 TO NEXT NODE ~NO BRANCH
:NONE FOUND, TAKE MISS BRANCH

333 3333
P PR

o
85

033642

16=JUN-81

SeEReReReg & :
ro

o
NO

MACY11 30A(1052) 18-.!00-81 14:39 PAGE 13-70

,DMC=11 DATA C(a LIM TEST

;POINT R1 TO CMD STRING

TRVSTR:

000006
003552

SEQ 0106

TRAVERSE COMMAND LINE SUBROUTINES

;POUNT R5 TO MATCH STRING FROM CLI NODE
;CLEAR CHAR MATCH COUNT
.&EEIF Ew OF MATCH STRING YET
IF

2$:

: SEE ;F END OF CMD LINE YET
;BR_IF

YES

gi }F CHARACTERS MATCH
1
iBR

MATCH COUNT
;MATCH '-?NCRE'ENT
STRING POINTERS

003552

;UPDATE

;BR TO CONTINUE CHECKING CHARS.
003552

108:

032762
033724

033726

R‘lgRl.

PC.TRVACT

w‘m R

000004

033002

PSCNT

15%:

TRVBRC(

;WHEN m SEE IF ANY MATCHES FOUND
:BR IF NO, GO

TAKE THE MISS BRANCH

:POINT CMD POINTER TO END OF STRING &
:1F A MATCH FOUND,

GO DO MATCH Acnou

:UPDATE R3 TO NEXT NODE (NO BRANCH)

: (NO RETURN THRU TRVNOB SINCE DIFFERNT
: DISPLACEMENT DUE TO MATCH STRING)
: GO TAKE BRANCH
: (PARSED OK), =1 IF ILL CMD.....

MACY11 30A ;!flOSZ)
CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
REPORT CODING SECT
CZCLkB.P11
16=JUN-81 14:38

.SBTTL

7098

14:39

PAGE 13-71

SEQ 0107

REPORT CODING SECTION

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

§ §

WTM WS = BB NF
ot
N

prpn.
o a vs =1
aN
e & &Ns vy

D 9
16=JUN-81

033732
033732
033732

033736
033736
033736

BGNRPT

004737

027046

JSR

ENDRPT

104425

LSRPT::
PC,REPORT

;CALL SUBROUTINE TO DUMP EVENT LOG
; AND BASE TABLE

L10011:

TRAP

CSRPT

ZCLKBO

(ZCLkB.P1

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

MACY11 30A(1052)

PROTECTION TABLE

E 9
16=JUN-B1

14:39

g 3

.SBTTL

7135

144

: THIS mms %s USED BY THE RUNTIME SERVICES

;}

7139

033740

7142
7143

033740
033762

7146

033746

7&%

;}:‘S.

033740
033744

177777
177777

177777

SEQ 0108

PROTECTION TABLE

: TO PROTECT

7140

PAGE 13-72

THE LOAD MEDIA.

BGNPROT
-1
<1

=1
ENDPROT

L$PROT :
;OFFSET INTO P=TABLE FOR CSR ADDRESS
;OFFSET INTO P=TABLE FOR MASSBUS ADDRESS

JOFFSET INTO P=TABLE FOR DRIVE NUMBER

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLkB.P11

16=JUN-81 14:38

7
716

MACY11 30A(1052)

INITIALIZE SECTION
JSBTTL

16=JUN-81

144

7166

: AT THE BEGINNING OF EACH PASS.

7167
7168
7169

(3)
7170

§un
033746

BGNINIT

033746

:REVISION CHANGE B

7196 033746 005737 007464
033752

001403

7198

033754

005037

753(’)

033760

104444

7201

033762

012737

177777

(3)

033770

012700

000040

7202

(3)

033760

033770

033774

7203 033776
(2)
7204

033776
034000

(3)

034004

(3)

7205

034000

034006

(2)
7206

034006
034010

(3)

034014

(3)

034010

7207 034016
(2)

034016

7209

034024

(3)

034030

104447

007464

104447

103002

(2)

034032

034034

000525

7213
7214
7215

034036
034042

005037
005037

7217

034052

(3)
7218

034060
034

010001

7219

034064

004737

(3)

(2)

7220
7221

034056

034070
034076

012700

104462

103006

012737
000461

CLEAR FLAG

MOV

READEF

#<1,RESFLG

START

#EF .RESTART

$1:

JMP

RESTRT

007466
007526

START:

TRAP

;SET RESTART FLAG

:1F HERE CAUSE OF START,DO SOME INIT

MOV

007532

MOV

NEW

CLR
CLR

RESFLG
CLKVEC

MOV

#CLKCSR,R2

MOV
BR

#EF .RESTART
,RO

TRAP

CSREFG

8CS
RESTRT
;SEE IF WE'RE HERE CAUSE OF A CONTINUE

MOV

#EF. CONT INUE ,RO

TRAP

CSREFG

:BR IF NOT HERE CAUSE OF CONITNUE
BCC

MOV

GETPRM

JSR

CSREFG

8CS
START
:IF HERE CAUSE OF RESTART, DO SOME INIT

:SEE IF THIS IS A Nsu PASS'*

TRAP

#EF .NEW,RO
CSREFG

;1IF YES, BR AROUND LOGUNIT # SETUP
BCS

NEW

;CLEAR RESTART FLAG SINCE HERE ON START

L,R1

BNCOMPLETE

#EF .START,RO

TRAP

:CLEAR CLK VECTOR PTR. AS A FLAG IN
: NO CLOCK IS FOUND.

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

MOV

TRAP

CSDCLN

:JMP [F HERE CAUSE
OF A CONTINUE

READEF #EF .NEW

CLOCK

000114

ENDIT

BCOMPLETE

000100

;GO CLEANUP

#EF .START

BNCOMPLETE

026204

NO ,BRANCH

READEF #EF . CONTINUE

012702 007522

(3)

DCLFLG

READEF

103523

;5}5

7216

INIT1:

000036

000035

104447

CLR

BCOMPLETE

(3)

7210 034032

007466

000037

034530

012700

.cum g EXIT ?

INIT

BCOMPLETE

7208 034020 000137
034024

ocu%G

DOCLN

103515

012700

té7

BEQ

103417

012700

LSINIT::

: ADDED BY EC

7195

7199

SEQ 0109

THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED

7194

7197

PAGE 13-73

INITIALIZE SECTION

7164

7165

14:39

PC,CLKSET

#LCLKEN, CLKEN
RESTRT

#'L.RO
CS$CLCK

MOV
RO,R1
; IF NONE THERE GO LOOK FOR A P=CLOCK

BCC

; GO SET UP CLOCK INFO TABLE & CLK VEC.

:SETUP THE ENABLE LINE CLOCK DATA

CLOCK

026204

7
7
7

000002
000111

JSR
ADD

000002
001600

MOV
SuB
MOV
BR
S3:

034150
000100
007524
007532

14:39

PAGE 13<74

SEQ 0110

;LOOK FOR A P=CLOCK SINCE m L INE
gtgsx

P,R1

BNCOMPLETE

7
7

16=JUN-81

L)RAP

SERRFRNSoRRES

EELLELLLLLLE
—>

S2:

000120

00000000
o

MACY11 _30A(1052)
CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST
INITIALIZE SECTION
CZCLkB.P11
16=JUN-81 14:38

PC,CLKSET
#2,CLKCSR

mLch.aCLxcsn
#2,C
OPCLKEN cuceu
RESTRT

READBUS

007526

BNCOMPLETE
S4
MOV
#100, CLKVEC

007522

MOV

CLR

GMANID

CLKBR

#CLKEN, CLKCSR

; ELSE GO SET UP CLOCK INFO & VECTOR
sPOINT CLKCSR TO P=CLK COUNT SET REG.
;LOAD CLK SET REG. WITH COUNT VALUE
;POINT CLKCSR BAC TO P=CLK CSR
;SETUP THE ENABLE THE P=CLK DATA

;READ BUS TYPE TO SEE IF ON AN LSI
TRAP
C$RDBU
;BR IF NOT, NO CHANCE OF A CLOCK
BCC

TRAP
BR

CSGMAN
10000$
CLKHZ
TSCODE
5060
77
TSLOLIM
TSHILIM

;LOAD 100 AS CLK VECTOR
LOAD 0 AS CLK INT. LEVEL
KLUDGE UP THE CSR & ENABLE DATA LOCS

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

«WORD
<sWORD
-WORD

000062
000074
000412

034216
036258

012746
012746
010600
104417
062706

S4:

015102
000001

RESTRT:

007540

007550
177777

18:

RESTRT

PRINTF

#NOCLK

EXIT

INIT

CLR
CLR

TIMMIN
TIMSEC

177777

005237
023737
002367

007460
007460

007460

002012

NEW:

100008:

.WORD
WORD
WORD

1; INFORM OPR. NO CLOCK, & EXIT INIT
’
MOV
LK,=(SP)
#1,-(SP)
MoV
MOV
SP,RO
TRAP
CSPNTF
ADD
#4,SP
TRAP
JWORD

CSEXIT
L10013-.

;CLEAR TIME SINCE START LOCATIONS

MOV
MOV
MOV
MOV
CMP

CLKHZ, TIMTCK
#EVTLOG,R2
R2,EVTPTR
#-1,(R2)+
RZ HEVTEND

;LOAD TICKS/SEC
sINIT EVENT TABLE TO ALL 1°'S AFTER EACH
; START OR RES AND INIT TABLE POINTER

MOV

#=1,LOGUNT

:INITIALIZE LOGICAL UNIT #

INC

LOGUNT

;POINT TO NEXT LOGICAL UNIT
;SEE IF PAST MAX, LOG. UNIT #
;BR IF YES, AND START OVER

BNE

012737

C‘CLCK

RO,R1
; IF NONE THERE GO SEE IF THIS IS_LSI
8CC
s3

CMP

BGE

LOGUNT ,LSUNIT
NEW

;SEE _IF REACHED END OF TABLE
;:LOOP UNTIL DONE

H 9
16=JUN-81

MACY11 30A(1052)
CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
16=JUN-81 14:38
CZ2CLkB.P11
INITIALIZE SECTION

013700
104442
010001

GPHARD

007460

011137

007474

MoV

PAGE 13-75

SEQ 0111

GET THE P-TABLE FOR THIS LOG. UNIT

LOGUNT ,R1

GETPRM

BNCOMPLETE

103365

14:39

(R1) ,FHDPLX

TRAP
MOV

00
183
1

RO,R
;IF NO P=TABLE AVAIL., ch(cSET NEXT ONE

GETPRM

;PUT FULL OR HALF DUPLEX ANSWER IN LOC.

SETVEC

»
r
w
~
~

;STORE AWAY (SR ADDRESSES

Ms
s

O mMunie
NV

roOounr-@srnr

—

ENDIT:

—

B}
—ORsS

016137
016137
062737
016137
016137

NVEC

—

aNQNQNQNQ

nNO

NNVV&
nNNNOO

b -add
e el
b

LASTASTANT
ST NT ST ST S R ST,V

eleleleleleloleleNele)

;DEVICE DEPENDENT PART OF GETTING INFO FROM P-TABLE

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

CLKVEC ,#CLKINT 4340

;STORE AWAY INPUT INTERRUPT VECTOR
;BUILD OUTPUT INTERRUPT VECTOR
;STORE AWAY INTERRUPT PRIORITY
;STORE AWAY DEVICE OPTION TYPE
;SETUP CLOCK VECTOR

#340,-(SP)

#CLKINT ,=(SP)

C%KVEC.-(SP)

#5,-(SP)

CSSVEC

#10,SP

;DEVICE DEPENDENT VECTOR SETUP

013746
012746

SETVEC

INVEC,#DVINS, INTPR]

SETVEC

OUTVEC,#DVOUTS, INTPR]

INTPRI ,=(SP)
#DVINS ,~(SP)
INVEC ,=(SP)
#3,-(SP)

;SETUP OUTPUT INTERRUPT

INTPR] ,=(SP)
#DVOUTS ,=(SP)

(5)

013746
012749
10443
062706

012700
36 . 104441
104432
000002

14:39

PAGE 13-76

SEQ@ 0112

01240
00000

MoV
Mov

TVEC,=(SP)
#5,-(SP)

000010

ADD

#10,5P

000000

SETPRI

EXIT

“ENDINIT
104411

I 9
16=JUN=81

#PRIOO

;SET THE 'RUN'' PRIORITY TO 0
MoV

#PRI00,RO

TRAP
.WORD

CSEXIT
L10013-.

TRAP

CSINIT

TRAP

INIT

L10013:

CSSVEC

C$SPRI

SE——

MACY11 30A(1052)
CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
CZCLkB.P11
16=JUN=81 14:38
INITIALIZE SECTION

CZCLkBO DMR,DMC=11 DATA COMM. LINK TEST
MACY11 30A(1052)
CZCLkB.P1
16=JUN-81 14:38
AUTODROP SECTION

7333

.SBTTL

7334
7335

A
14:39

PAGE 13-77

s€a 0113

AUTODROP SECTION

7336
7337
7338
7339
7340

; THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF
;s THE "'ADR'’ FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO
; SEE IF THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY
: DROPPED FROM TESTING.
jon

7341
7362
(3)

034646
034646

BGNAUTO

7350
7351
(3)
(3)

034646
034646
034646

ENDAUTO

7343

J 9
16=JUN=81

104461

LSAUTO::

L10014:

CSAUTO

ZCLKBO DMR,DMC<11 DATA COMM. LINK TEST

CZCLkB.P1

16=JUN-81 14:38

MACY11 30A(1052)

CLEANUP CODING SECTION

SBTTL

59
034650
034650

83‘650

004737

045714

(3)
7§7§

034660
034664

012700
104441

000340

54
034660

7374

034666

(3)
7375
7387

034670

(3)

7388
7389
7390
(3)
(3)

14:39

PAGE 13-78

SEQ 0114

CLEANUP CODING SECTION

; AFTER THE MARDWARE TESTS MAVE BEEN PERFORMED.

%
71
72

; THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED

16=JUN=81

034666

034672
034672
034672

BGNCLN
005077

JSR

152642

CLF
SETPRI

EXIT

104432

LSCLEAN::
PC,DVBTUP
aCLKCSR
#PRIO7

;GO UPDATE BASE TABLE

;DISABLE CLOCK
:SET PROCESSOR PRIORITY BACK TO 7

MOV
TRAP

CLN

TRAP

000002

~
104412

#PR107,RO
C$SPRI

CSEXIT

.WORD

L10015~.

TRAP

CSCLEAN

.EVEN
ENDCLN

L10015:

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11

16=JUN-81 14:38

MACY11 30A(1052) 12-.!04-81 14:39 PAGE 13-79

SEQ 0115

DROP UNIT SECTION

9§

.SBTTL

94
95
2

14e
: THE DROP=UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE
: TO NO LONGER BE TESTED.

”

R gun
76409
76410
(4)

7‘('?%

7423
7424
7425
7426
(3)
(3)

034674
034674

034676

DROP UNIT SECTION

o
000167

EXIT

LWORD

000000

JSUMP

LWORD

L10016~2~.

TRAP

csov

.EVEN

034700
034700
034700

ENDDU
104453

L10016:

MACY11 30A(1052)
ZCLKBO DMR,DMC=11 DATA C OMM. LINK TEST
ADD UNIT SECTION
CLkB.P11
16=JUN-81 14: 38
.SBTTL

no9
16=JUN-81

14:39

PAGE 13-80

SEQ 0116

ADD UNIT SECTION

soe

; THE ADD=UNIT SECTION CONTAINS
ANY CODE THE PROGRAMMER WISHES
TO BE _EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK
TO THE TEST CYCLE.
BGNAU

EXIT

LSAU::
AU

.WORD
WORD

JSJUMP
. L10017<2=-.

.EVEN

(3)

706
034706

ENDAU

104452

L10017:

CSAU

CZCLKBO gm.onc-n DATA COMM. LINK TEST

CZCLkB.P1

16=JUN-81 14:38

7467

TEST 1:

.SBTTL

7468
7469

MACY11 30A(1052)

SETUP AND MODES OF OPERATION

TEST 1:

SETUP AND MODES OF OPERATION

THIS TEST WILL

THE PROVIDE COVERAGE NECESSARY TO ISOLATE FAILURES
TO THE COMPUTER

Eouxmm THE COMMUNICATION LINK, OR THE MODEM.

BGNTST

749
7498
7499

007532

MOV

152604

000001
007542

007542

GTRAZ:

1$:

CLR

MOV
ST

ggg

BNE
012746
012746
010600

PRINTF

015102
000001

T1::
PROGRAM SETUP SECTION

.SBTTL

GTXRXB:

CLKEN,@CLKCSR
R1

;ENABLE THE CLOCK

#1,TIMER
TIMER1

;SET TIMER TO COUNT 1 TICK
:CHECK FOR IT TO BE COUNTED OFF

;KEEP CHECKING UNTIL R1 DOES FULL COUNTDWN

g{w

#NOCLK

:BRANCH IF CLOCK EXISTS (COUNTED A TICK)
:PRINT BAD CLK MSG AND WARN OF HANG IF TIMEOUT

104417
062706

005737
001117

GTRA3:

BNE

RESFLG

e ch b and
b

GTRAG:

CLR
CLR
CLR

013737

ADD

#4,SP

GTRAS

TOTCC
TTOTCC
CTOTCC

CSPNTF

:BR IF HERE CAUSE OF A RESTART
i

;CLEAR TOTAL CHAR. COUNT TEMP. LOC.
: CLEAR TOTAL CHAR. COUNT FOR TX BUFF
* CLEAR TOTAL CHAR. COUNT FOR CMP BUFF

MOV
MOV
CLR
MOV

#PTRTAB,R1
R1,TXPTR
RXPTR
MSGL IM,R2

MOV
ADD
MoV
MOV
MOV
MOV
MOV

R1,CMPPTR
R2.CMPPTR
;INIT COMPARE MESSAGE POINTER
#5 ,MSGTYP
;SET UP DEFAULT MSG TYPE (QUICK FOX = ITEP MSG)
MSGSC, CURCC
:SET UP DEFAULT CHAR COUNT
#TXBUF ,TCURAD :SET UP CURRENT ADD TO START OF TX BUFFER
#CMPBUF ,CCURAD :SET UP CURRENT ADD TO START OF CMP BUFFER
TCURAD,CURADD
;SETUP CURRENT ADDR TO START OF TXBUF

ASL
ASL

012737
013737
012737
012737

NOCLK ,=(SP)
#1,-(SP)
SP,RO

:SEE IF HERE AFTER A RESTART.

; CLEAR COUNTS AND SET UP DEFAULTS

7519
752?

MOV
MOV
MOV

TRAP

[+ R NTe AV P QW N}

SEQ 0117

PAGE 13-81

: TEST TO DETECT FAULTS IN THE DATA COMMUNICATION LINK.

7is8
034710
i
i
034710
7%90

AAANNAN

14:39

;00

7%n
74
74
74674
7475

7509
7510
7511

9
16—Juo-l1

R2
R2

SINIT TRANSMIT MESSAGE POINTER

: ZERO RX POINTER

CZCLKBO
CZCLkB.P1

7533

035074

013737

;S 5

035106

012757

201?

035114
0 51§s

81; 7
13737

887;26
7344

75
75

75
7540
7541
754§
;224

035102

7545
;gzg

0351
0%5136
035144
035150
035156
035164
035170
035176

7548
(7)
(6)
(3)
(4)
(4)
7549

035204
035204
035210
035214
035216
035220
035226

7550
7551
7552
;224
7555

(3)
7556
(2)
7557
7558
7559
(3)
(3)
7560
7561

756i

7564
7565
7566
7567
(3)
(3)
(4)
(5)
(5)
(5)
(5)
(5)
(3)
7568
7569
7570

MACY11
30A(1052) 12-Ju-a1 14:39 PAGE 13-82
PROGRAM SETUP SECTION

,DMC=11 DATA ifl. LINK TEST
38
‘
16=JUN-81 1

0352
035240
035246
035254
035260

035260
035262
035262
035264
035270
035272
035272
035274
035276
035304

81§ 7
13737
004737
81 737
012737
037
012737
012737
012746
012746
?10600
104417
06%706
013737

013737
013737
013737
004737

7334

007416

007354

000005
0?%668
80003
1
000003
00747%
00000
000002
013147
000001

007470
007472
007500
007476
032340

GTRAS:

104450
103412
005737
001002

104432
010560
012737
000137

007500

000001
040334

007472

1%:

MOV
JSR
MOV
MoV
MOV
MOV
MOV
JSR
MOV
MOV
CLR
MOV
MOV

TXPIR, CPIR
#1.TXMTOT
CMPPTR, cm
cgum:
MsGTYP
MSGSC, CURCC
PC ,BLDBUF
#1.CMPTOT
#ACT,MODTYP
Tyf
amss
az.mwv

PRINTF

#HLPO

MOV

MODTYP,DEV1

035346
035354

105037
105037

003561
003560

104443
000406

GETCL:

;SETUP CURRENT POINTER TABLE POINTER FOR TXBUF
: GO BUILD POINTER TABLE AND BUFFER
:BUMP TOTAL MESSAGE COUNT
;SET UP START OF COMPARE POINTER TABLE
:SET UP CURRENT ADDR. TO START OF CMPBUF
:
:PUT DEFAULT MESSAGE INTO CMPBUF
:BUMP THE COMP MESG COUNT
:SET DEFAULT MODE= ACTIVE
:SET DEFAULT MAINTENANCE LOOP MODE =NONE
$SET UP DEFAULT 'RUN PASSTM COUNT TO 1
:SET UP PROG. PARAMETERS = DATACHECKING ENABLED
;

OPERATOR STATUS MSGS. PRINT OFF

MoV
MOV
MOV
TRAP
ADD

;PRINT TO OPERATOR THE CURRENT MODE......
SEE IF MANUAL INTERVENTION ALLOWED
TRAP
CSMANI
: BR IF YES (UAM=0 AND NOT cmmsg)
e

BNE

: BR IF NOT COMPLETED 1 PASS

RPASS

EXIT

TST

MoV
JMP

ATTL MLTYP
GTR9

;SEE IF THIS IS FIRST ‘DCLT msp'

: IF DONE 1 PASS IN UNATTENDED MODE = EXIT
TRAP
.WORD

:SET_UP DEFAULT FOR UNATTENDED MODE
:7 'R M=ACT/LO=1/PAS=1/NOST/CH'* AND RUN

CLR8
CLRB
GMANID

P$GDBD
;CLEAR CMD LINE PARSING ERROR FLAGS
PSNNUF
CLISPM,CMDBUF ,A,0,1,72. .,NO
;GET A COMMAND LINE FROM ggm
TRAP

B8R

.WORD

1
000110

:
003060
010660
036302

CSEXIT
L10020-.

COMMAND LINE FETCH & INTERPRETATION SECTION

142
12476

012737
012737
012737

#HLPO,
= (SP)
#1,-(5P)
SP.RO
CSINTF
#4,SP

MOV
MLTYP,DEV
MOV
RPASS
. DEV
MOV
PARAM
. DE V&
JSR
PC , SHWOP
MANUAL
BCOMPLETE
GETCL

.SBTTL

035310
035314
035320
035320
035322
03532
03
03
035
0353
035336
035340
035340

PC ,BLDOBUF

SEQ 0118

MOV
MOV
MOV

#CMDBUF ,
A
#CLITRE ,PS$TREE
#CLIACT.PSACT

100008:

.WORD
.WORD
WORD
JWORD
"WORD

10000$

CMDBUF
TSCODE
CLISPM
O
TSLOLIM
TSHILIM

eSS

SEESEE——

CZCLKBO
CZCLKB.P1
7571
75;;
7573
7574

DMR,DMC=11
DAIA 2om. LINK TEST
16=JUN=-81 14:38

7575

0
0
035372
035

035400

5037 ogszo«
? 805?3
105737
001412

(6)
(3)

035404
ossmg

012746 00000
10600

MACY11
30A(1052) 1§-JW~81 14:39 PAGE 13-83
COMMAND LINE FETCH & INTERPRETATION SECTION
CLR
JSR
1578
BEQ

PRINTF

(7 osglioo 15766 012513
(4)

035412

104417

(4) 035414 oezrg;
7576 035420 000137
7577
035424 105737
035430
001412
7579 035432
(7) 035432 012746
(6) 03
012746
(3) 035442 010600
(4) 035444 104417
(4) 035446 062
;gg? 035452 000137
7582
7583 035456 023727
;;gls. 035464 001711
7586 035466 023727
7587 035474 001705
7588 035476 023727
7589 035504 001701
7590
035506 023727
7591 035514 oo1oo§
7592 035516 000137
7593
035522 023727
759, 035530
001004
7595 035532 004737
7596
7597

035536

000137

1$:

000060

003202 000005
003202 000055
003202 000004
040334

000052

7601
(3)
(3)

035560
035560
035562

104432
010272

7603

035572

001646

000057

035564 023727 003202 000001

7604
7605
7606
7607
7608
7609
7610

035574
035602
035604
035612
035614
0356%5
035630

(8)
(7)
(6)

035632 012746 015223
035636 012746 015241
035642 012746 000002

7611

035632

023727
001642
0237;7
0015 ;
013737
023727
002414

003202
003202
007356
007422

s%
P
108

ADD

118:

12%:

JMP
(MP
BNE
an

000002
000010 4$:
007422 58%:
001000

GTR9
KEYWD1, #DMPS
128
PC,DUMPSR
GETCL

,=(5P)
sr.ng
CSPNTF
#6,SP

MoV
MOV
MOV
TRAP
ADD

#CLINUF ,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,5P

;WAS ‘‘'SET EXPECT = TRANMIT'* ENTERED?

: YES ,BRANCH
;SEE IF HELP WAS TYPED
:GO GET CMD AGAIN IF YES
:SEE IF PRINT WAS TYPED
: GO GET CMD AGAIN IF YES
ses IF RUN WAS TYPED
: BR IF NO
: START EXEC. IF YES
see IF ow WAS TYPED
: BR IF
: ELSE, m PART OF MEMORY

; THEN RETURN TO GET ANOTHER CMD.

exn COMMAND IS A REVISION B CHANGE BY EC

ch»

BNE

MOV

EXIT

138:

KEYWD1,#PRNT
GETCL
KEYWD1, #RUN
118

osum ~(SP)

;SEE IF INCOMPLETE COMMAND TYPED

#CLINUF

JMP
GETCL
;REV B BY EC
(MP
KEYWD1,#SETET
BEQ
GETCL
cMP
KEYWD1 ,#HLP
BEQ
GETCL
TM
BEQ
cMP
BNE

035310

7600 035552 012737 000001 007464
7602

10%:

031554

023727 003202

MoV

ficon

000004
035310

7599 035550 001005

JMP
IsT8&
BEQ

PRINTF

012542
000001

7598 035542

#CLIERM

TRAP

003560

003202

;CLEAR QUALIFIER FLAG LOCATION
;GO PARSECOMMAND L INE
:SEE IF PARSED OK on AN ERROR
MoV
MOV

ooogw035310

003202

QUALF G
PC,PSTRV
GDBD
1

SEQ 0119

xgvmMEXIT

138

#1,DCLFLG
T1sT

;EXIT COMMAND ?

NO ,BRANCH

.-sef CLEANUP & EXIT FLAG
;GO BACK TO INIT ROUTINE

TRAP
.WORD

CSEXIT
L10020-.

CMP

KEYWD1,#CLEAR

:SEE IF CLEAR WAS TYPED

cMP
BEQ
cMP
BEQ
MOV
cTMP
BLT

KEYWD1 , #SHOW
GETCL
KEYWD1 ,#SETEXP
TOTCC, TOTCC
2TCC,HBUFLIM
158

:SEE IF SHOW
TYPED
: IF YES, BACK ro eer ANOTHER CMD.
:SEE IF SET EXPECT
: BR IF YES (A serw WAS TYPED)
;SEE IF BUFFER ALREADY FULL
: BR IF NOT FULL (BUFLIM # OF CHARS.)

BEQ

PRINTF

GETCL

#MSGTRN,#BUFEX

:TIF YES

aacx ro GET ANOTHER CMD.

: ELSE TELL OPR. AND DON'T BUILD MSG.

MOV
MOV
MOV

#BUFEX,=(SP)
mscm =(SP)
2,~(SP)

(0
2)

¢ ZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
16=JUN-81 14:38
CZCLkB.PN

GETCL

TT07CC

007334

14:39 PAGE

13-84

ML FETCH t—l NTERPRETATION SECT 10N

6%:

XMTOT

" sEa 0120
MoV
TRAP
ADD

; THEN GO GET g\ne COMMAND
;1F FIRST "'SET'' THEN GET RID OF DEFAULT

#PTRTAB, TXPTR

;GET POSITION OF END OF TX LIST

R1,AMSGLIM

SEE IF HSG COUNT EXCEEDED.
: BR_IF

TXMTOT ,R1
17%

#MSGTRN
, #TABEX

; ELSE TELL OPR. AND DON'T BUILD MSG.
MOV
#TABEX ,=(SP)
MoV
#MSGTRN,=(SP)

MOV
MOV

TRAP

GETCL

$P,RO
csfirm

ADD

; THEN GO GET A NEW COMMAND.

#2,-(SP)
SP,RO

CSPNTF

#6,SP

:# OF MSGS *4
= NEXT FREE PTR BLOCK

007416
007420

R1
R1
R1,TXPTR
TXPTR,CPTR
TCURAD, CURADD

007334
007356
007360

CURADD, TCURAD

Torcc,TTOTCC

;UPDATE CHAR. COUNT, CURR ADDR, & PTR

TXMTOT

QUALVL

;SETUP CHAR. COUNT, CURRENT ADDR, & PTR
;ADD IN CHAR. COUNT AND CHECK TOTAL
;GO BUILD MESSAGE IN BUFFER AND PTRS.

;DCC THE COPY COUNT

035310

GETCL

007342
007422

CToTCC,T0TCC

;SETUP CHAR. COUNT, CURR. ADDR. & PTR

#MSGTRN
, #BUF EX

BR IF NOT FULL (BUFLIM # OF CHARS.)
: ELSE TELL OPR. AND DON'T BUILD MSG.

015223
015241
000002

{2}(( JABUFLIM

GETCL
crorcc

78
CMPTOT

SEE IF BUFFER ALREADY FULL

: THEN GO

MOV
MOV
MOV
MOV
TRAP
ADD
A NEW COMMAND
GET

;IF FIRST "'SET'A THEN GET RID OF DEFAULT

#PTRTAB,R1

:gSGUH.RZ
R1.CMPPTR
3
R2,CMPPTR

;INIT COMPARE MESSAGE POINTER

R1,AMSGL
IM

;SEE IF MSG COUNT EXCEEDED.

CMPTOT ,R1

#BUFEX ,~(SP)
#MSGTRN,
- (SP)
#2,-(SP)
SP.RO
CSPNTF
#6,SP

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

MACY11 30A(1052)

7653 omgg 002414
0361
(8) 036156 012746 015163
(7) 036162 012746 015241

BLT

CZCLKB.P11

~ 16=JUN-81 14:38

1E°JLN-81 14:39 PAGE 13-85

SEQ@ 0121

COMMAND LINE FETCH & INTERPRETATION SECTION

18$

; BR IF NO

JMP

GETCL

MOV
MOV
MOV
MOV
TRAP
ADD
; THEN GO GET A NEW COMMAND.

7659 036216 013737 007336 007416
7660 076224 013737 007344 007420
7661 036232
004737 031712

MOV
MOV
JSR

CMPPTR, CPTR
CCURAD
, CURADD
PC,ADDCC

;ADD IN XHAR. COUNT AND CHECK TOTAL

7663

036242 013737 007416 007336

MOV

CPTR, CMPPTR

7665 036254 013737 007420 007344
7666 036262 013737 007422 007342

MOV
MOV

7668 036274 001261
;g% 036276 000137 035310

BNE
JMP

7654

‘S’
(3)
(4)
(4)
7655

036166
036172
036174
036176
036202

7656
7657
7658

036206
036210
036212

7664

7667

7671
7672

7673

PRINTF

#MSGTRN,#TABEX

012746 000002

010609
10441

oezrgg 000006
000137
035310
006301
006301
137

007336

036236

004737

032010

036250

005237

007340

036270

005337

003206

18%:

ASL
ASL
ADD

JSR

INC

DEC

R1
R1
R1,CMPPTR

PC ,BLDBUF

CMPTOT

: ELSE TELL OPR. AND DON'T BUILD MSG.

FTABEX,=(SP)
MMSGTRN, = (SP)
#2,=(SP)
SP,RO
CSPNTF
#6,5P

;# OF MSGS *4 = NEXT FREE PTR BLOCK

CURADD , C CURAD
Torcc,cToTce

;UPDATE CHAR. COUNT, CURR ADDRR. & PTR

2
GETCL

: AGAIN
W
;GO BACK UNTIL GET A ‘RUN'

o;»m

;1F COPY WAS GIVEN, PUT MSG IN BUFF

7676

7677

7680

7681

7682

i
036302

036302

036304

;

CLIACT:

006302

7687

7688
7689
7690
7691
7692
7693
7694
7695
76%
7697
7698
7699

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
7728

7730
7731

SEQ 0122

IN CONNECTION WITH ACTION

iMULTIPLY ACTION CODE BY 2

ADD
JSR

#108,R2’
PC,(R2)

:ADD BASE VALUE
:60
DO ACTION

.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=
ACTCLR=1
ACTSHO=]
ACTCHK-10%
ACTRUN-10$
ACTHLP-]
ACTCSE-1
ACTCST=1
ACTSTE-]
ACTSTT=1
ACTSZE<1
ACTCOP-10%
ACTNUM-10$
ACTOPM-10%
ACTSTS-108
ACTEQO-10$
ACTMSO-10$
ACTMS1-108
ACTMS2-10$
ACTMS3-10%
ACTMS4-10%
ACTMS5-108
ACTMS6-108
ACTATYV-10$
ACTPAS-10$
ACTREC-10$
ACTLIS-108
ACTDLL-10$
ACTTRA-10$
ACTTAL-108
ACTNO-10
ACTECH-10%
ACTCRC-108
ACTPRO-10%
ACTRPS-108
ACTMOP-10$
ACTTLP-108
ACTCLP-10$
ACTLLP-10$

.WORD
.WORD
.WORD
.WORD

ACTNUF-10$
ACTBCR-10$
ACTDMS-10$
ACTDME-108

000207

RTS

036320
036322
036324
036326
036330
036332
036334
036336
036340
036342
036344
036346
036350
036352
036354
036356
036360
036362
036364
036366
036370
036372
036376
036376
036400
036402
036404
036406
036410
036412
036414
036416
036420
036422
036426
036426
036430
036432
036434

000150
000152
000162
001
0002
000172
000
0004
000756
000766
001004
001014
001024
001116
001612
001136
001216
001224
0012
001244
001254
001264
001302
001370
001400
001420
001426
001436
001446
001456
001504
001514
001620
0016
001666
001676
001706
001716
001726

036440
036442
036444
036446

000142
001174
000712
000742

108:

If USE ‘CLIBIF'*

ASL

036316

7727 036436 001736

PAGE 13-86

R2 WILL HOLD ACTION CODE FROM PARSING (CLI) NODE

MOV

;

14:39

ACTION, TABLE AND RouT
INE

USER MUST CLEAR/SET PSGDBD

016202 036320

7683 036310 Qe 036320
7684 036314 00471
7685

16=JUN=-B1

COMMAND LINE FETCH & INTERPRETATION SECTION

.SBTTL

7678

7679

MACY11 30A(1052)

~ 16=JUN-81 14:38

.WORD

1osm2) R2

ACTRLP-10$

;OFFSETVALUE

:RETURN TO TRVACT:

:BRIEF DESCRIPTION OF ACTIONS TAKEN

NULL
: CLEAR
: SHOW
: CHECK
:RUN
:HELP
:CLEAR OR SHOW EXPECTED
:CLEAR OR SHOW TRANSMIT
:SET EXPECTED
:SET_TRANSMIT
:SIZE
: COPY
:NUMERIC VALUE FOR SIZE OR COPY
:0UOTED MESSAGE FROM USER
:STATUS
:END OF QUOTED MESSAGE FROM USER
:ONES
: ZERDS
JIALT
:0ALT
:1TEP
SCCITT
:ALPHA
:ACTIVE MODE
:PASSIVE MODE
:RECEIVE_MODE
:LISTEN MODE
:DOWNL INE LOAD
:TRANSMIT MODE
:TALK MODE
:NO
:ECHO
:SET CRC BIT
:SET_PROTOCOL BIT
:STATUS
:REMOTE STATION IN MAINTENANCE LOOP MODE
: INTERNAL
TTL
:CABLE LOOP
:LOCAL MODEM LOOP

:REMOTE MODEM LOOP

:MORE COMMAND LINE NEEDED
:BAD CHARACTER IN OPERATOR MESSAGE
:DUMP MEMORY START ADDRESS
:DUMP MEMORY END ADDRESS

SRR

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P1T

F10

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

MACY11
30A(1052) 12-Jlfl-81 14:39 PAGE 13-87
ACTION TABLE AND ROUTINES

mii
7735
7734
7735
7736

.WORD
.WORD
.WORD
WORD
.WORD

CZCLkB.P11

7737

036450
036452
036454
036456
036460

000734
000246
001626
000236
001326

ACTDMQ-10%
ACTPRT=10%
ACTMOS=10%
ACTEXT=10%
ACTSEX=10%

;DUMP WORD
;PRINT
;MODEM ACTION REV B BY EC
sEXIT ACTION REV B BY EC
;SET E=T ACTION REV B BY EC NPI

SEQ 0123

MACY11 30A(1052)

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
16=JUN-81 14:38
C(ZCLkB.P11

H10
16=JUN-81

TION TABLE AND ROUTINES

14:39

SEQ 0124

PAGE 13-88

036462
036470

112737
000207

177777

003560

:
AC TNUF
:
ACTNUL

#=1,PSNNUF
PC

;SET FLAG TO SAY NEED MORE OF COMMAND
JRETURN TO PARSER

03647
0365

012737
000207

000001

003202

ACTCLR:

:ELEAR.KEYHD‘U

;SET LOC TO SAY A CLEAR WAS TYPED

012737

000002

003202

ACTSHO: MOV
RTS

:EHOH.KEYHN

;SET LOC.

012702

003210

ACTHLP: MOV
PRINTF
1%:

#HLPTAB,R2
#HLPF , (R2) +

;SETUP R2 AS A POINTER TO HELP MSG TABLE
;PRINT HELP INFORMATION MESSAGES
(R2) +,=(SP)
MoV
#HLPF ,=(SP)
MoV
#2,=(SP)
MoV
MoV
SP,RO
CSPNTF
TRAP
#6,SP
ADD

000207

012246
012746
012746
10600

013225

000002

000006
003230

R%.#HLPEND
1

TO SAY A SHOW WAS TYPED

;SEE IF ALL INFO PRINTED YET
:IF _NO KEEP PRINTING

000005

003202

000057

003202

ACTEXT:

gEXIT.KEYUN

;EXIT COMMAND

000055
027046

003202

ACTPRT:

#PRNT ,KE YWD1
EE.REPORT

;SET LOC. TO SAY A HELP WAS TYPED
;CALL ROUTINE TO PRINT EVENT LOG AND BASE TABLE

003202
003560
007500

ACTRUN:

#RUN, KE YWD1

;SET RUN FLAG

gz.RPASS

:SET DEFAULT RUN ‘PASS'* TO 1

zlgLP.KEYHN

ACTCSE:

#-1,PSNNUF

sSET LOC.

TO SAY A HELP WAS TYPED

;SET FLAG TO SAY NEED MORE OF COMMAND

#PTRTAB,R1
#MSGLIM,R2

R2
R2

R1.CMPPTR

R2,CMPPTR

;INIT COMPARE MESSAGE POINTER

CMPTOT ,R2
PSNNUF
KEYW1 #SHOW
ACTSHW

;FLAG THAT HAVE VALID COMMAND AT THIS PT.
;SEE IF A CLEAR OR_SHOW WAS TYPED
;BR_IF A SHOW WAS TYPED

crotce

: AND RESET POINTER

CMPPTR,R1

000002
007340

#1,CMPTOT

;CLEAR COMPARE MESSAGE COUNT, CHAR.

#PTRTAB,R1

:HSGLIH.RZ
R
R1,CMPPTR

007416

R2,CMPPTR
CMPPTR,CPTR
#CMPBUF ,R1

;INIT COMPARE MESSAGE POINTER
;SET UP TO FILL IN DEFAULT MESSAGE

COUNT

CZCLKBO
CZCLkB.P1

16=JUN=81 14:38

83678 2k
754
760

007344
362

7354
3560
3202

3 A CEEEEIEELERPRRE

7
mg
79
7794

MACY11 30A(1052) 1g-JlN-81 14:39 PAGE 13-89

.DMC=11 DATA COMM. LINK TEST

000002

007354

007334
007416

MOV
BR
ACTCST: MoV
MOV
CLRB
CMP
BEQ
MOV
CLR
MOV
MOV
MOV
MOV

R1,CCURAD
ACTCLB
#PTRTAB,R1
TXMTOT ,R2
PSNNUF
§E¥m MSHOW
¢
#1,TXMTOT
TTOTCC
#PTRTAB, TXPTR
TXPTR,CPTR
#TXBUF ,R1
R1, TCURAD

ACTCLB: MOV

MOV
MOV
MOV
CLRB

gE*C

#BUFLIM,
R2
R1,CURADD
#5 ,MSGTYP
HSG;C.CI.MCC
(R1 +
?i

JSR

PC.BLDBUF

1%:

WNN—-=O

007410
007412

013746

;FLAG THAT MAVE VALID COMMAND AT THIS PT.

:SEE I7 A CLEAR OR SHOW WAS TYPED
:BR IF A SHOW WAS TYPED
:CLEAR TRANSMIT MESSAGE COUNT, CHAR. COUNT
: AND RESET POINTER

;SET UP TO PUT DEFAULT MSG IN LIST AFTER 033°'S
sFILL EXPT OR TRAN BUFFER WITH 0°'S IF A CLEAR
;D0 "BUFLIM' NUMBER OF BYTE LOCATIONS
:"'CLEAR'' REALLY MEANS TO PUT DEFAULT MSG IN

;WHEN DONE, RETURN TO PARSER

003504
000000

ACTSHW: MOV

CMPB

#SHTAB RS
ég”*..(lfl)

;LOOK AT FIRST BYTE OF MSG TO DECIPHER TYPE

003513

CMP

gg.lSHTEW

;SEE IF LOOKED AT ALL OF DEFAULTS YET

;MUST BE OPR. SPEC'D THEN

5%:

VRNV

RTS

006305
016137

SEQ 0125

ACTION TABLE AND ROUTINES

6%:

003505
000002

007426
003464
014430
000003

007426

SuB
MOV

PRINTF

:gHTMH RS
2(R1) ,TEMP

#SHMSG,SHTYTB(RS)
,TEMP

;PRINT MSG SIZE & TYPE

MoV
MoV
MOV
MOV

TRAZ

sgg

:3.!!1

BNE

ACTSHW

ADD
;BUMP R1 TO NEXT SET OF POINTERS

TEMP,~(SP)
SHTYTB(RS) ,~(SP)
#SHMSG,~(SP)
#3,-(SP)

CSENTE

#10,SP

;SHOW THE OPERATOR THE CURRENT MODE..... ALSO

037244

013737
005037
012737

ACTDMS : MOV

PSNUM, STADD

MOv

#DMPS ,KEYWD1

;SETUP STARTING ADDRESS FOR DUMP
sSET DEFAULT OF WORD DUMP
;FLAG THAT A DUMP WAS TYPED

J 10
MACY11 30A(1052)
16=JUN=-81
ACTION TABLE AND ROUTINES

CZCLKBO DMR,DMC=11 DATA CW” LINK TEST
CZCLkB.P11
16=JUN-81
7838

037252

000403

Bk
177777

ACTDMQ: MOV

o 00%554 007404 ACTDME:: MOV
mi

784

7844

037

274

105037

000207

003560

007406

ACTDMX

S%sfi

14:39

PAGE 13-90

ACTDME
#<1,BYTBIT
PSNUM, ENADD

'P’W(_

;SET DUMP FLAG TO 'DUMP=WORD''
;SETUP END ADDRESS FOR DUMP (=START IF NO "EEE"’
;CLEAR NOT<ENOUGH FLAG, ‘DUMP N=N/B'‘' IS VALID

SEQ 0126

K 10

16=JUN-81
ROUTINES

¢ ZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
16=JUN-81 14:38
CZCLkB.P11

8;7 76

012737

005403

000010

12737

000011
000001

803206 ACTSTX:

012737
000207

000012

012737
000207

023727
0010 3

637332

207

ACTSTE:

#SE TEXP KEYWD1
ACTSTX

ACTSTT:

#SETTRN,KEYWD1
#1,QUALVL
PC

003204

ACTSZE:

#SIZE ,QUALFG
PC

000013

003204

ACTCOP:

#QCOPY ,QUALFG
PC

003204

000012

ACTNUM:

?lslALFG.lSIlE

003202

003554

PSNUM

#CLISEO

013001

14:39

;SET UP DEFAULT COPY TO 1 (/COPY=0)

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

003561

003554

007412

3s:

;IF A SIZE LOAD CURCC WITH BYTE COUNT

003554
003206

003206

1$:

;IF A COPY, LOAD COPY COUNT
s INCREMENT SO FIRST DEC MAKES IT REAL #

000007
007426
007426

007410

;SEE ERROR=IN-CMD FLAG

2$:
ACTOPM:

#7 ,MSGTYP
R4, TEMP
TEMP
PC

ACTEQO:

R4 ,R2
TEMP,R2

1$:

MOV
MOvB
DEC
BNE
BR

;CALC BYTE COUNT FOR QUOTED TEXT

TEMP R
#OPBUF
,RS
'(.R‘l)*.(RS)*

;COPY QUOTED TEXT TO OPBUF

ACTBCR: PRINTF

SP,RO
CSPNTF

ACTMEX
#CLIBCR

;BAD CHAR. IN OPR. QUOTED STRING

MOV
MOV
MOV

TRAP

RTS

#CLISEQ,~(SP)
#1,<(SP)

;KEEP TRACK OF START OF QUOTED TEXT
; SO CAN CALC OPCNT AT END OF QUOTES

Rs.CURCC

—
~

=000

037514
037514

R g—.—ld
AN
&=

03751

MOV
MOV
MoV
TRAP
ADD

000004
177777

R2,0PCNT

037

sea 0127

PAGE 14

000001

R0 I e

ADD

#CLIBCR,=(SP)

#1,-(SP)

SP.RO

CSPNTF

MACY11 30A(1052) 1%—.100-'1 14:39 PAGE 14~1

FARIIR CEEREREEERSERELECE
RRIRY
NoSSomN
S

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

7923

ACTMSO:

007410

B8R

007410

ACTMS1: angv

000002

007410

ACTMS2:

000003

007410

000004

007410

000005
002162

007410
007412

000100

007412

B8R
ACTMS3: MOV
B8R
: MOV
ACTMSS
B8R
ACTMSS: MOV
MOV
BR
ACTMS6: MOV
MOV
ACTME1: MOV

000010

003202

ACTSEX:

177777

003561

N
oy

W
N

:SET THE MESSAGE TYPE AS PER COMMAND L INE

000001

019730 000006 007410
002164 007412
!

gd
-— 2
SO oo

VIS WN=O

789§

ACTION TABLE AND ROUTINES

032134
000060
003560

003202

MOV

108:

MSGTYP

ACTME1

HS?"'

05 MSGTYP

ACTMET
#3 MSGTYP
ACTMET
¥4 MSGTYP
Agfm
#S MSGTYP
MSGSC, CURCC
AC TMEX
#6,MSGTYP
MSG6C, CURCC
CURCC

Acnéx

:REV B BY EC

tTMp

#SETEXP,KEYWD1

MOVB

#-1,P$GDBD

BEQ

B8R
JSR
MOV
B8R

ACTMEX: CLRB
RTS

;ALL ONES

;ONES & 2EROS

;2EROS & ONES
sCCITT
;QUICK FOX
;SETUP DEFAULT SIZE FOR THIS TYPE
: ALPHA/NUM
;SETUP DEFAULT SIZE FOR THIS TYPE
;SETUP DEFAULT SIZE FOR MSGO=4

:GO TO EXIT

:DID WE GET HMERE FROM ‘‘SET E ='' COMMAND?

108

*YES,BRANCH

ACTMEX
PC,FACSIMILE
#SETET,KEYWD1
ACTMEX

260 TO EXIT
:GO COPY TRANMIT BUFFER TO EXPECT BUFFER
:SET FLAG TO BE USED IN T1::
:GO TO EXIT

PSNNUF
PC

*SET ERROR FLAG

;CLEAR NOT=-ENOUGH FLAG

ZCLKBO DMR,DMC=11 wm ccm LINK TEST

MACY11 30A(1052)

B8R

CZCLKB.P11 ~ 16=JUN=-81

14:38

79
g
79
79
7731

g 88300
105037
5
005037 0074
000207

7933

037740

005037

007470

7939

37746

012737

000006

7939

037756

012737

7942

037766

7945

#PAS ,MODTYP
PSNNUF
MLTYP
PC

007470

ACTLIS: MOV

#LIS, MODTYP

000004

007470

ACTDLL: MOV

#DOW,MODTYP

012737

000001

007470

ACTTRA: MOV

037776

012737

000005

007470

ACTTAL: MOV

003560

37754 000413

037774 000403

B8R
BR

ACTM2X

#TRA ,MODTYP

ACTM2X

#TAL ,MODTYP

040012

105037

#ECHOB , PARAM

;gss?

040022

000207

CLR

RTS

“CLEAR MAINT LOOP TYPE

ACTM2X

7948

7949 040016 005037 007472

:CLEAR NOT=ENOUGH FLAG

AC TM2X

794;9 040004 042737 000004 007476 ACTM2X: BIC

CLRB

PAGE 14=2

#ACT ,MODTYP

MODTYP

77329 037764 000407
7943

007470 ACTPAS: MOV
CLRB
CLR
RTS

14:39

AC TM3X

ACTREC: CLR

77335 037744 000417
gga

ACTION TABLE AND ROUTINES

7 000003 007470 ACTATV: MOV

i 80532

M 10

16=JUN=81

PSNNUF

MLTYP

:DISABLE /ECHO (ALL BUT PASSIVE MODE)
*CLEAR NOT-ENOUGH FLAG

:CLEAR MAINT LOOP TYPE

SEQ 0129

LINK TEST

8&8;37

000036

003204

ACTNO:

MOV

#NO, QUALFG

000036

003204

#NO,QUALFG

000004
000002

007476
007470

ACTECH: cMP
BEQ
BIS
gE”d

EEESENES,3 & 3
re

g$3¢8zz

o
NOY
ON

N 10
16=JUN=81

M.M-‘H DATA C”
1
16=JUN=81 4:38

%1616

ACTION TABLE AND ROUTINES
RTS

PRINTF

14:39

PAGE 14-3

#ECHOB, PARAM
#PAS ,MODTYP

;BE SURE IN PASSIVE MODE
| IF

sIF TRYING TO SET /ECHO

#CLINPS

MOV
MOV

12746
12746
01
10441

012671
000001

04§ 7
005037
000501

000004
003204

012701
000413

000002

ACTCHK: MOV

#DATCKB,R1
ACTQFG

012701
000410

000001

ACTSTS: MOV

#STATB,R1
ACTQFG

;SET THE STATUS BIT

012701
000405

000020

ACTCRC: MOV

#CRCB,R1
ACTOFG

;SET THE CRC BIT

012701
000402

000010

ACTMOS : MOV

#MOCHK ,R1

;MODEM BIT

012701

000040

ACTPRO: MOV

#PROTO8,R1

;SET THE PROTOCOL BIT

050137
022737

007476
000036

ACTQFG: 8IS
P

R1,PARAM
#NO,QUALFG

04013
005037
000450

007476
003204

013737
000444

003554

007500

012737
000417
012737
000413
01 §73;

000005

007472

000001

007472

000002

007472

OOOIogS
012737

000004

007472

BR
ACTTLP: MOV
BR
ACTCLP: MOV
BR
ACTLLP: MOV
BR
ACTRLP: MoV

000003

007470

ACTLPX:

177777

003561

St 003561

007476

2$:

MOovB

#-1,P$GDBD

ACTLXX

BIC
CLR

BR
BR

003204

BNE

MoV
TRAP
ADD

#ECHOB ,PARAM
QUALFG

#CLINPS ,=(SP)
#1,-(SP)
SP,RO
CSPNTF
6 ,SP

;CLEAR "NO'' OUT OF QUALIFIER FLAG
;SET DATA CHECK BIT

ACTOFG

ADDED BY EC

8IC

R1,PARAM

ACTLXX

QUALFG

;CLEAR "WNO'' OUT OF QUALIFIER FLAG

ACTRPS: MOV

PSNUM,RPASS
ACTLXX

;GET NUMBER OF "RUN PASSES''

ACTMOP: MOV

#5,MLTYP
ACTLPX
#1,MLTYP
ACTLPX
N2 ,MLTYP
ACTLPX
#3,MLTYP
ACTLPX
#4 MLTYP

1$:

01 7?7 000003 007472

022737
001415
112737

1$:

SEQ 0130

CLR

P
BEQ

MOvB

#ACT ,MODTYP
ACTLXX

#-1,P$GDBD
.

BE SURE

BR IF

IN ACTIVE

TRYING TO SET LOOP

CZCLKBO ifl.fl-fi DATA

OMM. LINK TEST
16=JUN-81 1 :38

CZCLkB.P1

8004

0302

8005 &0306

005037

(7)

040

12746

(3)

04031

10609

(6)

(4)
(4)

8006
8007

04031

040320
040322

040326
040332

007472

MACY11 30A(1052) 12—.)00-81 14:39 PAGE 14~4
CLR

PRINTF

MLTYP

#CLIBDL

;CLEAR ANY LOOP TYPE THAT MAY HAVE GOT SET
pcuem. ~(SP)

1,-(SP)

12746

10441
062706

105037
000207

SEQ 0131

ACTION TABLE AND ROUTINES

sp‘RO
000004
003560

CSPNTF

ACTLXX: CLRB
RTS

PSNNUF

;CLEAR NOT-ENOUGH FLAG

#4,SP

MACY11 somosz)

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLKB.P11

PRI LAPty

BEBBRRE

8010
8011

16=-JUN-81 14:38

005737

007472

032755 000002 007476

001416

007340

16=JUN=-81

ACTION TABLE AND ROUTINES

GTR9:

:REV B BY ;c

BEQ

BIT

#DATCKB , PARAM

cMP
BEQ

TOT,TXMTOT

BEQ

007354

013032

108

PRINTF

#CLIPW

JMP

GETCL

14:39 PAGE 14=5

NO,BRANCH

~oAfA CHECK ?

:NO,BRANCH

;TX & CX EQUAL
: YES ,BRANCH

000001

000004
035310
006562
007334
000017

108:

;RX ALLOCATE CODE

MoV
MOV
MOV
ASL
ASL

007336
007336

GTREX:

GTRX2:

;TRY AGAIN

MOV
MOV
MOV
TRAP
ADD

ccuw ~(SP)
(SP)
sp,no
CSPNTF
#4,SP

;INIT TRANSMIT MESSAGE POINTER

R2
R2

MOV
ADD
MOV
MOV

R1,CMPPTR
R2, CMPPTR
CMPPTR,R1
#MSGL IM,R2

;INIT COMPARE MESSAGE POINTER

MOV
ADD
MOV

R1,RXPTR
R2.RXPTR
CMPTOT ,RXMTOT

;INIT RECEIVE MESSAGE POINTER
;MAKE COMPARE AND RX MESSAGE COUNTS EQUAL

ASL
ASL

007370

#PTRTAB,R1
R1,TXPTR
#MSGLIM,R2

SEQ 0132

.Loor MODE ?

SPRINT WARNING

R2
R2

CLR
CLR
CLR
CLR
CLR
JSR
JSR
MOV
MOV
MOV
MOV
JSR

FLAG
NOBUF
PSCNT
ERRCNT
LNCNT
PC,LOGDVI
PC.DVINIT
#BUFLIM,CURCC
#RXBUF ,CURADD
RXPTR, CPTR
#10,MSGTYP
PC ,BLDBUF

;CLEAR FLAG
:CLEAR NO BUFFER COUNTER
:CLEAR PASS COUNT
:CLEAR ERROR COUNT
;CLEAR LINE COUNTER
LOG ABOUT TO INIT DEVICE
INIT DEVICE
;SET CHAR COUNT TO ‘BUFLIM‘ NO. OF BYTES
:SET UP RX BUFFER AS CURRRENT ADD.

JMP

aMODE (R2)

;MODE DISPATCH

:g{

ngom:R2

e, Y

;SET UP FOR 33 TO FILL RX BUFFERS
:CLEAR RX BUFFER

MACYT1 30A(1052)

ZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

C%CLKB P

.S&TTL

E2FogERes

e %0 00 90 %0 909390 %% % %, 8,

8058
8059

8061

8067

8069

8070

8071
807,
807
8074
8075
8076
8077
8078
8079

RECEIVE MODE
S

16=JUN-81 14:38

040572
040572
040600
040606
040614
040620

013737
013737
052737
005037
000137

007332
007370
000104
007416

040762

007414
007366
007502

16-JW-.1

14:39

PAGE 14-6

RECEIVE MODE SECTION

FUNCTIONAL DESCRIPTION:
RECEIVE-ONLY (OR

<WAY=IN) ROUTINE

IN THIS MODE OF TESTING THE DEVICE'S RECEIVER 1S ENABLED IN EXPECTATION
OF RECEIVING
A MESSAGE. 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.

SUBORDINATE ROUTINES USED:
“AL TR’

CALLING SEQUENCE:

RXONLY:

RXONZ:

JMP

MOV

aMODE (R2)
RXPTR, CPTRR

RXMTOT ,DVRCT

BIS

#QRX+#ERX, FLAG

JMP

ALLTR

CLR

CPTR

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

;SET UP MESSAGE COUNT
;SET UP RX QUE
;CLEAR THE TX POINTER
;GO RX.

SEQ 0133

szzassassasensanzantes &o3

MACY11 30A(1052)

16=JUN=81 14:38

E N

16=JUN-B1

TRANSMIT MODE SECTION

+SBTTL

14:39

PAGE 14~7

TRANSMIT MODE SECTION

FUNCTIONAL DESCRIPTION:
TRANSMIT=ONLY (OR ONE-WAY=0UT) ROUTINE

IN THIS MODE OF TESTING A LIST OF MESSAGES IS TRANSMITTED WITHOUT
EXPECTING ANY DATA TO BE RECEIVED, A nf?gynm COUNT CAN BE
SPECIFIED TO REPETITIVELY TRANSMIT THE

SUBORDINATE ROUTINES USED:

“ALLTR"

O T

N T

re
,_

o
NOY

,DMC=11 DATA COMM. LINK TEST

:
CALLING SEQUENCE

JMP

@aMODE (R2)

;DISPATCH TO MODE BASED ON MODE TYPE IN R2
;SET NOCHECK

Oloflbglo
&82‘5

042737
013737

0000%42.
0073

007476
007416

TXONLY: BIC
TXON2: MOV

#DATCKB,PARAM
TXPTR,CPTR

040646

052737

000210

007502

BIS

HQTX+METX,FLAG

JMP

ALLTR

040654

013737 007354 007352
005037

007414

040660 000137 040762

MOV
CLR

TXMTOT,DVTCT

;COPY COUNTER FOR THIS PASS

CPTRR

JCLEAR RX POINTER

:SET THE QUE TX FLAG

16O TX.

SEQ 0134

22232?.53222‘_’.'22232222”_._.538

F1
16=JUN-81

PASSIVE MODE SECTION

.SBTTL

14:39

PAGE 14-8

PASSIVE MODE SECTION

FUNCTIONAL DESCRIPTION:
PASSIVE MODE SECTION

b b b

IN THIS MODE OF TES ING, THE D EVICE'S RECEIVER IS ENABLED IN
THEN EVERY TIME A ME SSAGE IS
EXPECTATION OF RECE VING A MESS
RECEIVED, A MESSAGE IS TRANSMI
DATA CHECKING CAN BE DONE
ON THE

e e

RECEIVED DATA.

b e

SUBORDINATE ROUTINES USED:

013737

007352
007416
007414
007502

PLCK:

PLCKZ2:

PLCK3:

TXMTOT,DVTCT
TXPTR,CPTR
RXPTR,CPTRR

H#QRX+#ERX ,FLAG

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

THE TRANSMIT COUNT
TR TO TRANSMIT POINTER

T7U

PONIANINININOAYN)

CALL ING SEQUENCE
:
aMODE (R2)

TRR TO REC POINTER

AND EXPECT RX

o
NOY

MACY11 30A(1052)

DMC=11 DATA COMM. LINK TEST
16=JUN-81 14:38

FIRST MSG.

SEQ 0135

MACY11
30A(1052) ‘.z-qu 14:39 PAGE 14=9
ACTIVE MODE SECTICN

ZCLKBO
DMR,DMC=11
DATA COMM. LINK TEST
CLKB.P11
16=JUN=81 14:38

8131

LSBTTL

ACTIVE MODE SECTION

813%
813

[ 504

8135

ACTIVE MODE SECTION

MESSAGES, ARE EXPECTED TO BE RECEIVED.

8134

; FUNCTIONAL DESCRIPTION:

8136

8137

8138

£139
gw‘)

:
3

g}%

815
8154
8155
8156
8157

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

:
“ALLTR"
3
; CALLING SEQUENCE:

8145
8146

815

RECEIVED DATA CAN BE COMPARED

AGAINST 'EXPECTED'* DATA IF DATA=CHECKING IS ENABLED.

; SUBORDINATE ROUTINES USED:

812
8144

8149
8150
8151

IN THIS MODE OF TESTINGA LIST OF MESSAGES IS TRANSMITTED AND

013737
013737

013737

013737
052737
000137

ALCK :

JMP

aMODE

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

TXMTOT ,DVTCT
TXPTR, CPTR

:SET UP TX COUNTS

RXMTOT ,DVRCT

:SET UP COUNTS

RXPTR, CPTRR
NRXMQTXMETXMERX.FLAG

SEQ 0136

MACY11 30A(1052)

CZCLkBO DMR,DMC=11 DATA COMM. LINK TEST

(2CLkB.P11

16=JUN-81 14:38

1N
16=JUN=-81

14:39

PAGE 14-10

TRANSMIT = RECEIVE FOR ALL STANDARD MODES

8160
8161
81
816
8164

L T T

CODE TO QUE THWEM ,LOG RECE;VE
IF TX BUFFERS ARE TO BE QUED D

L D

8165

FUNCTIONAL DESCRIPTION:
THIS CODE PERFORMS THE FOLLOWING FUNCTIONS
1.) IF RX BUFFERS ARE TO BE Me‘TELL DEVICE

CODE
WAIT

QUED.
,TELL DEVICE

TO QUE THEM, LOG TRANSMIT QUED.
FOR EITHER RECIVE BUFFER OR TRANSMIT BUFFER OR

BOTH TO COMPLETE
IF RECEIVE COMPLETE LOG IT UPDATE RX TABLE IF DATA
CHECKING.
IF TRANSMIT COMPLETE LOG IT.

WHEN BOTH TRANSMIT

AND RECIEVE LISTS ARE DONE

SUBORDINATE ROUTINES USED:

.DVRXQ'‘ <QUE RECEIVE BUFFER SPACE TO DEVICE
1OGRXQ'‘~LOG RECEIVE BUFFER SPACE TO EVENT LOG
"LOGTXQ''<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

L T D

GO TO THE COMPARE BUFFER CODE

O
L
L
A
L
R
N
N
N I
R M TR T
AR TETE

USE OF FLAG BITS:
QRX = SET ON INPUT TO ALLTR IF REC IS TO BE QUED TO
DEVICE. CLEARED BY DVRXQ AND THEN SET BY DVTXRX
WHEN RX BUFFER IS COMPLETED.
QTX = SET ON INPUT TO ALLTR IF TRANSMIT IS TO BE QUED TO
DEVICE. CLEARED ON ENTRY TO DVTXRX AND SET BY DVTXRX
WHEN TX BUFFER IS COMPLETED.
ETX = USED BY DVTXRX TO DETERMINE IF TX BUFFER COMPLETED IS
EXPECTED.
ERX = USED BY DVTXRX TO DETERMINE IF RX BUFFER COMPLETED IS
EXPECTED.

uuuuuuuuog
~N
NNNNNNNNN

NN NN
N S~

—

OOOOOOg
O === N—=N

IR IEA

:
CALLING SEQUENCE

W
o
N

VIS8 WN=O

RRRRRL SRS 5 5 e
BEYRAREC2SFEIRARRIR

8181

ALLTR

#ORX,FLAG

ALCK]

CPTRR,R2

;GO TO TRANSMIT-RELEIVE FOR ALL STANDARD MODES

;1F NOT RX GO TO TX'S

(R2)
, TEMP2

(R2)+,DVRXA

(R2)

026406
000010

007502

, TEMP3

(R2) .DVRCC
R2,CPTRR
PC .DVRXQ
PC .LOGRXO

#0TX,FLAG

;GO QUE DEVICE
:L0G REC QUED

SEQ 0137

——-

) D

) —d
)
)
)

D —d
) —d

D
D
d
)
D
) —d
)
D —d
D cd
d
—
)
e
e

wviun

S
S
S
N
N
B

|b e ad b
iy

SRERS

Lo
V.
P o

RRRRRRRRRRR RRRRRRRRRRRERRRRRRRRRERRRRRRRRRRRRR 2 2 RRRRRRR
W
oo
WW
g 8¥ ]g%
'S
~N
~ NN
[+ N
§O RRR
oMV ONOONON
n
O Sas
bg o
SIRSFBRFENRITZ 3
O g KY

NO
N

R
Y

Ia)

,DMC=11 DATA COMM.
6=JUN-81 14:38

80141
137?
011

MACY11 30A(1052) 1é°JW°81 14:39 PAGE 14=11

007346
007434
007350
007416

004737

044120

032737

000004

BEQ
MOV
MOV

ALCK2
CPTR,R2
(R2) , TEMP2

JSR

PC.LOGTXQ

MOV
MOV
MOV
MOV

026352

(R2)+ ovr§A
, TEMP
(R2)
(R2)+,DVTCC
R2,CPTR
PC,DVTXRX

;GO TO TX AND RX SUB ROUT.

007502

BIT

#ORX,FLAG

;CHECK FOR REC. MSG.

013737
013737
004737
032737
001406
013702
013722
013712
032737
001015
012737
013737
022737
001002
005237
000424
013702
011237
163737
013722
063737
013722
013712
162702
010237

007362 007432
007364 007434
026424

MOV
MOV
JSR
UPTABL: BIT
BEQ
MOV
MOV
MOV
UPTA4: BIT
BNE
MOV
MOV
CMP
BNE
INC
UPTA3: BR
UPTAT: MOV
MOV
SUB
MOV
ADD
MOV
MOV
suB
el MOV

022737

000002

007470

042737
052737

000104
000210

007502
007502

005337
005737

007366
007366

001007
000646

000004

007416
007432
007434
000002

ALCK2:

;1F NO TX''S GO TO 2

JSR

001514

007476

000001 007366
oomg 007414
000003 007470
007366
007414

ooniz
007434
007426
007434
007434 007432
007432
007426
000002
007414

001005
042737 880004 007502
005037
007414
032737 000010 007502
001447
013757 007346 007432
013737 007350 007434
004737

026370

005337 007352

TRANSMIT = RECEIVE FOR ALL STANDARD MODES

007416
007432

012 37
011237
012237
010537
004737

LINK TEST

BEQ

ALCKS

DVRXA, TEMP
DVRCC, TEMP
PC,LOGRXC
#ECHOB,PARAM
UPTA%
CPTR,R2
TEMP2, (R2)+
TEMP3, (R2)
#DATCKB,PARAM
UPTA1
#01,DVRCT
RXPTR, CPTRR
#ACT ,MODTYP
UPTAS
DVRCT
UPTEX
CPTRR,R2
(R2) , TEMP
TEMPS, TEMP
TEMP3, (R2) +
TEMP3, TEMP2
TEMP2, (R2) +
TEMP, (R2)
#2,R2
R2.CPTRR

#PAS ,MODTYP

BIC
BIS

HORX+#ERX,FLAG
NQTX+HETX,FLAG

BNE

AL CK2A

B8R

ALCK1

ALCK2A: DEC
ST

DVRCT
DVRCT

ALCK3:

BNE
BIC
CLR
BIT
BEQ
MOV
MOV

ALCK3
#ORX,FLAG
CPTRR
#QTX,FLAG
AL CKé
DVTXA, TEMP
DVTCC, TEMP

DEC

pvicT

JSR

PC,LOGTXC

:L0G REC COMPLETE
:IS THIS ECHO MODE (PASSIVE)
:IF NOT GO TO 4
SELSE SET R2 TO PRESENT TX TABL
:STORE OFF RX ADD
SAND CC
:1S DATA CHECKING ASKED FOR
:1F SO GO TO 1
:ELSE SET DVRCT TO A 1
*RESET POINTER
$1S THIS ACTIVE
:1F YES BUMP COUNT

:LOAD TEMP WITH PREV. COUNT
*LOAD TEMP WITH PREV.COUNT=CURRENT
;STORE OF NEW ADD
:AND NEW CC
:PUT POINTER BACK TO ADDR.
:AND RESTORE IT.
:1F NOT PASSIVE LOOP THEN GO TO 2A

:CLEAR BOTH EXPECTED AND COMPLETED FLAGS
;SET THE TX FLAGS
;DEC REC COUNT
:1S IT ALL DONE

:NO. GO CHECK TX
*CLEAR THE RX FLAG
:YES. CLEAR POINTER
SIS IT TX
SIF NOT TX THEN GO BACK
:LOG TX COMPLETED
:DEC TX COUNT

SEQ 0138

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

827
8274
8275
8279
827
8278
8279
8280
8281
82
8283
8284
8285
gggg
8288
8289
8290
8291
8292
8293
8294

1376

1404
041406
041414
1422
1426
0414
0414
041440
041442
omu.g
041452
041460
041466
041470
041474
041476
041502
041504
041510

0 ¥737

9 ;
052737
005737
01 ;
137
7
00140
000137
005037
042737
032737
00140;
005737
001362
005737
001402
000137

MACY11
TRANSMIT

000002

007470

000210

007502

BIC

88012‘ 007502

8IS
TsT
BNE
04151
JMP
00735
ALCK3A: TST
BEQ
040762
ALCK3C: JMP
007416
ALCK38: CLR
000010 007502
BIC
000002 007476
BIT
BEQ
007414
ALCK4: TST
BNE
007416
ALCK4A: TST
BEQ
041076
JMP
007352

AL CK4B:

J 1
30A(1052)
16=JUN=B1
14:39 PAGE 14=12
= RECEIVE FOR ALL STANDARD MODES
#PAS MODTYP

AL Ck $A
#OTX+ETX,FLAG
#ORX+ERX.FLAG
DVTCT
AL CK3C
CMPSR
DVTCT
ALCK38
AL CK5
CPTR
#QTX,FLAG
#DATCKB,PARAM
AL CK4A
CPTRR
AL CK3C
CPTR
AL CK4B
AL CK2

;1F NOT PASSIVE MODE GO TO 3A
:CLEAR THE TX FLAGS
:AND SET THE RX FLAGS
;1F MORE RX'S DO IT
: ELSE COMPARE
SIS IT ALL
*1F NOT GO BACK TO §
:1F SO CLEAR POINTER
‘CLEAR TX FLAG
:IS IT DAT (K
:1F NOT THEN END WO CKING RX.
;1F SOME RX''S LEFT GO BACK
;BRANCH IF ANY TX'S LEFT

SEQ 0139

|
|
;

—_——

K 11
MACY11 30A(1052) 16=JUN=81
DATA COMPARISON CODE

CZCLKBO DMR,DMC=11 DATA com LINK TEST

CICLKB.P11

16=JUN=-81

14:38

8297

LSBTTL

3?61

: FUNCTIONAL DESCRIPTION:

8298

14:39

PAGE 14=13

DATA COMPARISON CODE

gsog

CMPSR = COMPARE CODE

gsos

EXPECTED AND FILLS THE EVENT LOG WITH1 OF
3 MSGS.

33383

NOTE: IF NO DATA CHECKING SKIP TMIS CODE

8309

;

1.)A DATA COMPARISON snm WHICH REPORTS THE NUMBER

8314

8304

8310
8311
831
831

8315
gg}g

THIS CODE COMPARES THE RECEIVED DATA Aw
NST THE

:
;
:
:

OF COMPARISON ERRORS FOUND.
2.) A DATA COMPARISON ENTRY WHICH nemrs DIFFERENCES
IN REC LENGTH TO COMPARE LENGTH
3.)
A DATA COMPARISON STARTED ENTRY WHICM REPORTS ADDRESS

:
:

THIS CODE
ALSO REPORTS SOFT ERRORS FOR DATA COMPARISON
(THE FIRST 5 ONLY),LENGTH ERROR,AND TOTAL NUMBER OF ERRORS

OF RECEIVE BUFFER AND BYTE COUNT.

8318

8321

‘LOGCMP'* = SEE ITEM 3 ABOVE

ggg‘

;

*LOGCMD'* = SEE ITEM 1 ABOVE

gg}g

: SUBORDINATE ROUTINES USED:

832

8325

8328

;

8329

041510

8335

041542

032737

000002

007476

8330 041516 00152
8331
041520 01373
007332 007416
assg 041526 013737 007336 007414
gg‘ 041534 013737 007370 007366

8336
8337
8338
8339

041542
041546
041552
041554

013702 007416
011237 007432
012201
012237 007434

041564
041570
041572
041574
041600
041606
041610
041614

013702
01220
0122
010237
010437
004737
020437
00141

g}sz.? 041560 010237 007416

8342
83,3
834
8345
8346
g.;z;
8349
8350
8351
8352

‘LOGCML'* = SEE ITEM 2 ABOVE

: CALLING SEQUENCE:

3335‘7’

041616
041622

005237

007414
007414
807436
026520
007434
007400

CMPSR:

CMPS3:

JMP

CMPSR

;JUMP TO DATA COMPARISON CODE

BIT

#DATCKB,PARAM

;1S DATA CHECKING TO BE DONE

MoV
MOV
MOV
MOV
MOV

CPTR,R2
(R2) . TEMP2
(R2)+,R1
(R2)+. TEMP3

R2,CPTR

:MOVE CURRET RX PT.TO R2
*MOVE RX ADD TO EVENT LOG
‘SET R1 TO START ADD OF RX
SSET CHAR COUNT TO EVENT LOG

MoV
MOV
MOV
MOV
MOV
JSR
(MP
BEQ

CPTRR.R
(R2)+.R
(R2)+.Ré&
R2,CPTRR
R&. TEMP4
PC.LOGCMP
m..r;ms
CMPS

;PUT R2 AT COMPARE TABLE
*SET R3 TO COMPARE ADD
*SET R4 TO COMP CC
*RESTORE POINTER
:LOG COMPARE START.
;1S COMPARE COUNT = TO RX COUNT
*IF SO GO TO 7

BEQ
MOV
MOV
MOV

CMPSEX
‘1F NOT THEN EXIT
RXPTR,CPTR
PUT START OF RX POINTERS TO CPTR
CMPPTR,CPTRR : AND START OF COMPARE POINTS TO CPTRR
RXMTOT .DVRCT

INC
ERRCNT
ERRSOFT 1,EDDLE,ERR10

———

*RESTORE RX POINT

:;PRINT ERROR

SEQ 0140

CZCLKBO OMR,OMC=11 DATA COWN.
LINK TEST
14:38

MACYT1
30AC1052) 16-JUN-81 14:39 PAGE 14=14
DATA COMPARISON CODE

CZCLKB.P11 ~ 16=JUN=81
(4)

041622

(5)
8353

0416
0416

(5)
(5)

041
041

104457
1

026536
000001

éss 041636 005037 007436
Qilee2

012737

8358

041652

0014

8357

Q41650

122123

8360
8361

041654
041660

005237
023727

007436
007436

8363
834
8365
8366

041670
Qalerd
041
041704

114337
114137
005237

00744
00744
007400

836
(4)
(3)
(5)
(5)

837
838
8369
8370
8371
8372
8373
8376
8375
(4)
(5)
(5)
(5)
8376

Q41666 101014

041704
041706
041710
041712

041714
041716
041
Q172
041726
041730
041734
041
04174
041742
041744
041746
041750
041752

007424

000005

104457
000003
016103
02567
004737

8377 041756
8378 041756 005337
8379 041762 001267

007424

CWPS1:
CMPS2:

MOV

#1,0FSET

BEQ

C(MPS6

INC
CMP

TEMP4
TEMP4
A5

(MPB

(MPS6:

CMPSS:

CMPSSA:

INC
INC
INC
DEC
BNE
TST
BEQ
INC
ERRSOFT

:CLEAR BAD BYTE COUNTER

(Ri)+,(R3)+

:COMPARE RX WITH EXPETED

CMPS6

Rl
R3
OFSET
R4
CMPS1
TEMP4
CMPSSA
RRCNT
3,EDDDE,ERR2

JSR

PC,LOGCMD

DEC

DVRCT

BNE

:LOG LENGTH ERROR

TEMP4

MOVB
=(R3),GOOD
MOVB
=(R1).BAD
INC . ERRCN
ERRSOFT
2,EDDDE,ERR1

007400

007366

PC,LOGCML

BHI

007436

026554

JSR

CMPS7: CLR

104457

0161
0256
005
005
005237
003
001350
005737
00141
005237

TRAP

(SERSOFT

.WORD

EDDLE
ERR10

.WORD
.WORD

737

SEQ 0141

|
CMPS3

*SET OFSET BYTE COUNT TO 1

:IF EQUAL THEN GO TO 6

:INC BAD COUNT
IS IT MORE THEN §

:IF SO GO FOR MORE

STORE GOOD BYTE FOR ERROR
:STORE BAD BYTE FOR ERROR
;REPORT COMPARISON FAILURE TO OPR.
TRAP
LWORD
WORD
.WORD

CSERSOFT
2
EDDDE
ERR1

;INC OFFSET
:ELSE DEC CHAR COUNT AND SEE IF 0
*IF NOT GO BACK
*SEE IF ANY CMP ERRS FOR THIS MSG
:BR IF NONE
;REPORT # OF MISMATCHES FOR MESSAGE
TRAP
.WORD
.WORD
WORD
:LOG DATA ERROR IN COMPARE

|
:IF NOT ALL DONE GO BACK

CSERSOFT

EDDDE
ERR2

CZCLKBO DMR,DMC~1

CZCLkB.P11

16=JUN-8

LI
MACY11 30A(1052) 16=JUN-81
INTERNAL END OF PASS CODE

OMM. LINK TEST

8388

B 0809008, 9. 9% 0%, 8,880,

SBTTL

007376
007436
007432
007434

177

007500

035224

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

DISPATCHER. IF NOT =1 THEN DECREMENT RPASS
AND IF "RPASS'' IS THEN = TO 0 GO TO DCLT PROMT
IN NOT = TO O THEN GO BACK TO MODE DISPATCHER

SUBORDINATE ROUTINES USED:

CMPSEX:

007374
007376
0074

14:39

5%:

"LOGEOP'* = LOG END OF PASS TO EVENT LOG
INC

PSCNT

MOV
MOV
MOV
JSR
cMP
DEC
BEQ
JMP
JSR
JMP

NOBUF
, TEMP4
PSCNT . TEMP2
ERRCNT
, TEMP3
PC,LOGEOP
#-1,RPASS
18
RPASS
2
GTRX2
PC,DVBTUP
GTRAS

;BUMP PASS COUNT

;LOG END OF PASS
:SEE IF RPASS==1

“IF IT 1S DON'T DECRMNT, LOOP FOREVER

:DEC PASS COUNT
+1F DONE EXIT TEST
*ELSE GO BACK AND DISPATCH
:GO UPDATE BASE TABLE
*WHEN RPASS=0 GO BACK TO ‘DCLT>"*

SEQ 0142

N1
MACY11 30AC1052) 16=JUN=81
DOWN~L INE~LOAD SECTION

=11 DATA COMM. LINK TEST
1 14:38

SBTTL

14:39

SEQ 0143

PAGE 14=16

DOWN~-L INE=LOAD SECTION

;

:
:

TION
DOWN~L INE~L
IN THIS noos OF rtsr NG, THE ‘HOST'' OR ORIGINATING STATION

: FUNCTIONAL oescmmou

:
:
;
;

|
|

REQUESTS THE
THE BOOT

"SATELLITE''

OR 80OT STATION T0 ENTER MOP MODE.

STATION THEN SENDS A

“REQUEST

PROGRAM MESSAGE'',

THE “MOST'' THEN SENDS A 'MEMORY LOAD unn 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=LINE-LOAD WAS SUCESSFUL.

: SUBORDINATE ROUTINES USED:

:
:
:
:

"DLTXRX'* = SPECIAL TX RX ROUTINE FOR DLL
*DVRXQ'* = QUE RX BUFFER SPACE TO DEVICE
*LOGRXQ"* = LOG RX SPACE QUED TO EVENT LOG
*LOGTXQ'* = LOG TX BUFFER QUED TO EVENT LOG

:
:

*LOGTXC'* = LOG TX COMPLETED TO EVENT LOG
*LOGRXC'* = LOG RX COMPLETED TO EVENT LOG

*DVTXRX'* = QUE TX BUFFER AND WAIT FOR RX OR TX TO COMPLETE

SEQUENCE:
CALLING

DLL:

aMODE (R2)

GMANID

:DISPATCH TO MODE BASED ON MODE TYPE IN R2

DLLQ1,TEMP3,0,377,0,377.NO

:GET PASSWORD

TRAP

CSGMAN

.WORD
.WORD
.WORD
.WORD
.WORD
‘WORD

TEMP3
TSCODE
DLLO1
377
TSLOLIM
TSHILIM

MOVB
MOVB
MOVB
MOVB
BIS
BIC

TEMP3,PASS1
TEMP3.PASS
TEMP3.PASS
TEMP3.PASS4
#ERX, F LAG
#DATCKB,PARAM

10001$:
;PUT PASSWORD [N MESSAGE
:PASSWORD 1S DUPLICATE
: s HERE
y
;AND HERE.
:SET EXPECTED TO' AKX
:CLEAR NOCHECK

JSR

PC,DLTXRX

:GO TO THE DOWN LINE TX RX ROUTINE

MOV
MOV

g?????@?
SRIFARG

8452

#DLLM1,CURADD
DLLMIC.CURCC -

10001$

:SET THE DOWN LINE LOAD MSG TO #1
:SET THE CC

;RETURN WHEN TX AND RX ARE COMPLETED

MOV
MOV

#DLLM2,CURADD
DLLM2C.CURCC

;SET THE DOWN LINE LOAD MSG TO #2
:SET C€C

JSR

PC,DL TXRX

16O TO THE DOWN LINE TX RX ROUTINE

BIC

DLLPRI:

;

#DLLGA, FLAG

*CLEAR THE GO AHEAD FLAG

RETURN WHEN TX AND RX ARE COMPLETED

Y
:

#DLLCM

#OLLCM,=(SP)

M) =

b b

OSSN

g.;&sfi)
CSPNTF

DLLEA:

JMP

GTRAS

ERRHRD

20,DLLAB,ERR14

JMP

GTRAS

#4,SP

0422
042234

DLTXRX:

BIS
MOV

R
G e S P eSS E B R B

MOV
MOV
MOV
JSR
JSR

DLLE7:

#RXBUF, TEMP2
c256. LDVRCC
#256. . TEMP3
PC,DVRXQ
PC,LOGRXQ

MOV
MoV
MOV

CURADD ,DVTXA
CURADD
, TEMP2
CURCC,DVTC

JSR
BIS
JSR

PC,LOGTXQ
NQTX+NETX ,FLAG
PC,DVTXRX

BIT

#QTX,FLAG

MOV
DLLE2:

. MQRX,FLAG
#RXBUF ,DVRXA

CURCC,TEMP

BNE

DLLES

MOV

#TXNC , CONOTM

;PRINT ABORT AND EXIT

HE QUE
RX FLAG

HE DEVICE RX WFFER TO RXBUF
FOR LOG

FOR CC OF 256
FOR
LOG

;SET UP FOR TX
JAND LOG
JSE UP FOR TX COUNT
JAND LOG |
;LOG THE TX QUEUED
;SET UP TO QUE AND EXPECTED
-

035224

BRI
PR PE@PEe

SEQ 0144

DOWN=L INE<LOAD SECTION
PRINTF

RO~
N NN

S AN I L LN

=
XRRR RRRRRRR

333

MACY11 30A(1052) 12-.)00-81 14:39 PAGE 14=17

« LINK TEST

CZCLKBO DMR
CZCLkB.P11

;GO TO DEVICE ROUTINE

JTEST FOR GO AHEAD BIT

;IF SET GO TO ONE
ELSE CHECK FOR TX DONE
;IF DONE THEN BRANCH

:ELSE ERROR

;LOG _ERROR
;ABORT TEST
DLLE6:

MOV
MOV
JSR
BIC
BIS

PC,LOGTXC
HQTX+AETX
, FLAG
#DLLGA,FLAG

;:LOG TX DONE
;CLEAR QUE AND EXPECTED
;SET THE GO AHEAD BIT

BEQ
BR
BIT

DLLE

JEXIT IF SECOND MSG.
:AND GO BACK TO 2

CMP

DLLE1:

DVTXA, TEMP
DVTCC,TEMP

DLLMZC,DVTCC
DLLE2

#QRX,FLAG

;1S THE A RX COMPLETED

CZCLxBO

,LDMC=11
DATA E(H! LINK TEST
16=JUN=-81 14:38

CZCLKB.P1
8508

12 091

gg?v

}

025541

MACY11 30A(1052) IS-JW-N 14:39 PAGE 14-18

007442

a"gv

051?
82 sf
137
oorggg
007432 DLLES: nov/
as1§
5
]
807
007434
MOV/
851

8514

8515

82254

042544

737

264%4

P8
|

8517
gg}g

042554
042562

012737
000710

025561

007442

DLLEG:

8520

042564

122737

000001

004564

DLLE3:

ggg‘

042602

000700

8525
8526
8527
8528

042604
042612
042616

012737
113703
120327

020273
004563
000042

8530

042624

132703

000001

gg%

042632

016337

010542

8521
8522

042572 001404
042574 012737 025604 007442

8529 042622 101006

8531

042630

8534

042640

(%)

042660

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

gggg

042640
042642
042646
042652
042656

001003

010346
013746 007426
012746 020135
012746 000003
010600

BEQ
,
/

(MPB

BEQ
MOV
BR

g{c&;.ccmm

:ELSE SET UP ERROR AND ABORT.

PC,LOGRXC

;LOG RECEIVE COMPLETE

VRXA,
TEMP
DVRCC,TEMP

#10,RxBUF

:CHECK FOR FIRST WORD OF RX

:SEC BOOT MSG.

#RXM1,CONOTM
DLLE

;SET UP MESG AND ABORT
:ABORT TEST

#1,RXBUF+2

;1S SECOND WORD 12

DLLE?

;SET UP MESSAGE AND ABORT

DLLESA
#RXM2, CONOTM

:YES ,BRANCH

;3 sPRINT lD OF DEVICE REOUESYING
DLLESA:
#UNKM, TEMP
MVB
RWH .R3
CMPB
R3, 434,

BHI

DLLESB

BNE

DLLESB

BITB

007426

MoV

DLLESB: PRINTF

#1,R3

LOAD
REV B BY EC
;SET UP FOR UNKNOWN DEVICE
GET DEVTYPE FROM FESSAGE
:WT OF LEGAL RANGE
?

: YES ,BRANCH
;00D
?

YES,BRANCH

DLLIND(R3) ,TEMP ;GET ASCIZ FESSAGE FROM TABLE

A#SECRM,TEMP,.R3

;PRINT ID MESSAGE

104417

042662 062706 000010

042666

007426

‘

JSR/

122737 000010 004562

8516 042552 0014

000207

SEQ 0145

DOWN=L INE<LOAD SECTION
BNE
DLLES
;1F SO GO TO 8

MOV
MOV
MOV
MOV
MOV

R3,=(SP)
TEMP,=(SP)
tgecm,-(sm
#3,=(SP)
SP.RO

ADD

#10,5P

TRAP

DLLES:

RTS

JRETURN TO CALLER

8537

Fegs
s

CSPNTF

ZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLKB.P11 ~ 16=JUN-81 14:38

MACY11 30A(1052)

TALK MODE SECTION

8540

LSBTTL

854

14+

8544
gs«s
546

;

8541

854

D 12
16=JUN-81

TALK MODE SECTION

:
:
;

TALK MODE SECTION
2
IN THIS MODE, THE ‘‘TALK'‘ END_OF THE LINK TRANSMITS OPERATOR
SPECIFIED MESSAGES UNTIL A "EXIT'' MESSAGE IS TYPE. AT THAT POINT,
THIS END OF THE LINK GOES INTO

gggg

: SUBORDINATE ROUTINES USED:

8551
855
gg&

;
;
;

8555

: CALLING SEQUENCE
:

gggg
8561
8
8563
8564

8565
(3)

(3)

(4)
(5)
(5)
(5)
(5)
(5)
(3)
8566
8567
8568
8569

PAGE 14-19

: FUNCTIONAL DESCRIPTION:

355247;

8558
8559
8560

14:39

:
042670
042670

042676
042702
042706
042712
042714
042714

042737

000002

012702 002524
012722 177777
022702 002646
00137

007476

TALCK:

18:

‘LOGTXQ' = LOG TX BUFFER QUED TO EVENT LOG
*DVTXRX'* = QUE TX BUFFER TO DEVICE AND WAIT FOR COMPLETE
LOGTXC'* = LOG TX COMPLETE TO EVENT LOG

JMP

aMODE (R2)

:DISPATCH TO MODE BASED ON MODE TYPE IN R2

BIC

#DATCKB,PARAM

;SET NOCHECK

MOV
MOV
cMP
BNE

GMANID

104443

‘LISTEN'' MODE.

#OPBUF ,R2
#-1,(R2)+
#OPEND ,R2
1$

;CLEAR OUT OPBUFFER FIRST

OPRMM,OPBUF ,A,0,1,72.,NO

042716 000406

042720
042722
042724
oaz;gg
042
042732
042734
042734
042736
042744
042746

8574 042764
8575 042772

B8R

002524
000142
014764

000110
005002
122762
001402
005202

8570 042750 00077
ggg 042752 010237

3575 042756

;GET TALK MESSAGE
T

000377

002524

002166

012737 002524 007346
012737 002524 007432
013737
002166 007434

8576 o:.goos 13737

002166 007350

8577 043006 004737 02635
8578 o:.so;s 052737 000210
ggz

0430

005037

007414

ggm

0430264 004737 044120

asgi 043030 013737 887;46
8584 043036 013737

00735

8585 043044 004737 8637
043050 022737
105

007502

28%:

38:

CLR
C(MPB
BEQ
INC

ng
#377.0PBUF (R2)
33
Ri

;NOW GET CHAR COUNT

MOV

#OPBUF ,DVTXA

;SET UP TX ADDR.

MOV

OPCNT,DVTCC

;SET UP TX CC

CPTRR

JCLEAR RX POINTER

B8R
MOV

MOV
MOV

JSR
BIS

CLR

JSR

7432

MOV

002524

JSR
I

7434

MOV

2
R2,0PCNT

#OPBUF , TEMP?2
OPCNT, TEMP3

PC.LOGTXQ
#OTX+HMETX,FLAG

;SET UP FLAGS

PC,DVTXRX

DVTXA, TEMP

DVTCC, TEMP

;; LOGTXC
£X, OPBUF

;CHECK FOR EXIT

100028:

.WORD
.WORD
.WORD
WORD
JWORD
JWORD

CSGMAN

100028

OPBUF
T$CODE
OPRMM
O
TSLOLIM
TSHILIM

SEQ 0146

onc-n DATA com LINK TEST

8587
8588

8589

859?
859
8592 1

4:38

1
%

052111

002526

12 7
0001

000210
000006
040524

00750
00747

MACY11 30A( 105
TALK MODE SECT

BNE
(MP
BNE
BIC
MOV
JMP

‘li*.lw-fl 14:39 PAGE 14=20

A,ch
TALCK
BOTX+METX,FLAG ;CLEAR THE TX BITS
#LIS,MODTYP
:CHANGE TO LISTEN MODE
SAND GO BACK TO DISPATCH
GTRX2
—

CZ(LkB.P1

#'°1T,0PBUF +2

SEQ 0147

F 12
16=JUN-81
MACY11 30A(1052)
LISTEN MODE SECTION

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

SEQ 0148

PAGE 14=21

LISTEN MODE SECTION

.SBTTL
+

FUNCTIONAL DESCRIPTION:

LISTEN MODE SECTION
S
IN THIS MODE THE “LISTEN' END OF THE LI NK PRINTS ALL OF THE ME SSAGE
RECEIVED BY THE DEVICE ON THE OPERATOR'S CONSOLE. IF THE MESSAGE
RECEIVED IS AN "EXIT'' MESSAGE, THEN THE NODE ENTERS '‘TALK'’ MODE.

SUBORDINATE ROUTINES USED:

,'DVRXQ'' = QUE RECEIVE BUFFER SPACE TO DEVICE
LOGRXQ'' = LOG RECEIVE BUFFER QUED TO EVENT LOG
'DVTXRX'' = WAIT FOR RX TO COMPLETE
LOGRXC'* = LOG RX COMPLETE TO EVENT LOG
’,

CALLING SEQUENCE :

aMODE (R2)

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

#DATCKB, PARAM

;CLEAR CHECK BIT

042737

000002

012746

014753
000001

007476

007362
007432

LISCK:

007364

002520
000001

NN&N

- NN

WW—=
W

prd

000004
054105

002524

052111

002526

000005
040524

007470

PRINTF

#LISP

HOPBUF
, DVRXA

*PRINT PROMPT FOR OPK.

;SET DEVICE UP TO REC AT OPBUF

MOV
MOV
MOV
BI1S

#OPBUF
, TEMP?2
#82. ,DVRC
#82.
. TEMP
#QRX+HERX
, FLAG

JSR
JSR

PC,DVRXQ
PC.LOGRXQ

:QUE RX

JSR

PC,DVTXRX

;GO TO DEVICE RX. SUBROUTINE

MoV
MOV
JSR
ADD

DVRXA, TEMP
DVRCC, TEMP
PC, LOGRXC
DVRXA, DVRCC

;SET UP ADDR.AND CC.
:LOG COMPLETED

CLR

007432
007434
00
144116

BIC

LISCKA: MOV

007434
007502

§°S VR
R3S

=
d
iy

N-

o(o Yo Jo/

A TR

N T R T

A T D

A D

14:39

CLRB
PRINTF

CMP
BNE
MP
BNE
MOV
JMP

CPTR

MOV
MOV
MOV

TRAP
ADD

#LISP,=(SP)
#1,-(SP)

SP,RO
CSPNTF

6 ,SP

;SET UP CHAR COUNT TO 82.
;SET UP FLAG
‘CLEAR THE TX.

aDVRC(
#OPBFPT

#' EX, OPBUF
1SCKA
#°1T,0PBUF
+2
LISCKA
#TAL ,MODTYP
GTRX2

MOV

;COMPARE FOR EX OF “EXIT''

MOV
MOV
TRAP
ADD

*IF NOT EXIT THEN GO BACK
*IF FIRST HALF OK CHECK NEXT PART
*1F NOT EXIT THE GO BACK
:CHANGE MODE TO TALK
RETURN TO DISPATCHER

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

SP,RO
CSPNTF

4 ,SP

CZCLKBO DMR,DMC<11 DATA COMM. LINK TEST
(ZCLkB.P11
16=JUN=-81 14:38
8640
8641

Y1 30A(1052)
MACY11 TE
12~JW-I1 14:39 PAGE 14-22

LIS

N MODE SECTION

SEQ 0149

CZCLKBO DMR,DMC~11 DATA COMM. LINK TEST

MACY11 30A(1052)

CZCLKB.P11 ~ 16=JUN=-81 14:38

fiz
oa%

aoa!i

;
:

DVINIT= DEVICE INIT ROUTINE
THIS ROUTINE IS DEVICE DEPENDENT CODE THAT INITS

THE DEVICE BEING TESTED. (I.E. FULL/MALF DUPLEX BAUD RATE, MAINT MODE.)

;

8688

i INPUTS:

ggg}

! SUBORDINATE ROUTINES USED:

8693
8694

:
:

gggg

;

ggg

8698
8699
8700
043320

8705
8706
8707
37733
8710
8711

043320
043326
043332
043336
043344
043352

* CALLING SEQUENCE:
;
JSR
-

DVINIT:

;MASTER CLEAR DEVICE

#100, T IMER1
ASEL6
aSEL4
mcm.asew
#DMRCE,OPTYP
DVING

:SET UP TIMER 1 FOR 100(OCTAL) TICKS

8713
043362 ozgm 000006 012406 DVING: CMP
8714 043370 ?o oo;
BNE

poné.omp
DVI

:1S THIS AN 8206 DMR
SIF NOT GO TO 2

043354

000100 007542
147042
147032
040000 147014
000004 012406

PC,DVINIT

MOV
CLR
CLR
MOV
cMP
BNE

8712

012737
005077
005077
012777
022737
001003

“‘CLRAW'' = CLEAR RQI AND WAIT FOR RDI TO GO AWAY

8697

"EMDPLX'* INDICATES IF 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

8702

SEQ 0150

DEVICE INIT SUBROUTINE

gggg

37782

PAGE 14-23

* FUNCTIONAL DESCRIPTION:

‘

8684
8685

8701

14:39

DEVICE FUNCTION SUBROUTINES

.SBTTL

866
8681

16-JW°81

DEVICE FUNCTION SUBROUTINES

LSBTTL

8659
8660
8661

H12

112777

000200

147000

146762

g;}z

043372

112777

000200

8717

043400

005777

146754

8719

043406

8718 043404 100426
(3)

043406

10445;

8720 043410
005737
007542
8721 043414
001371
872
8723 043416 012737 024424 007432
8724 - omg 017737 146730
007434
8725 043432
017737 146726 007436
8726 043440 004737 0264
8727 043444 005237 007400
8728 043450

MOVEB

MOVB

DVIN2:

TST

BM]

BREAK

ST
BNE
MOV
MOV
MOV

#200,aBSEL1

- #200,aBSEL1

:DO A MASTER CLEAR
;1S THIS A 8206
*IF NOT GO TO 6
*SET RUN FOR 8206

*SET RUN BIT FOR 8206

aSEL

;1S RUN BIT SET

TIMER1
DVIN2
#DVEM3, TEMP2
ass'.g.fms
asrL Em

;SEE IF TIME HAS EXPIRED
:1F NOT GO BACK AND CHECK

DVIN

JSR
pr LG
INC
“RRCN
ERRSOFT 11 ovm ERR13

*IF YES GO TO 1 ELSE...

SAGAIN ELSE...PRINT ERROR

:LOAD UP ERRM. AND REG OUTPUTS
‘L0G TIME OUT WAITING FOR RUN

TRAP

($BRK

MACY11 30A(1052) ‘ILJWM 14:39 PAGE 14-24

CZCLkBO DMR,DMC<11 DATA COMM. LINK TEST

CZCLkB.P11

g?ERSG T

04%:50
043452
0434564
043456

104457
000013
024424
026110

87
8731
8732
873
8734
8735
8736
8737
8738
g;zg

043460

000717

043462
043470
043476
043502

042737
112777
737
012777

00000;
00014
044746
017370

007502
146662

8741
8742
8743

043510
043516
043524

012777
023727
2403

000000
012406

146656
000006

8745
8746
8747
8748
8749
8750
8751
8752
8753
8754
8755
8756
8757
8758
8759
8760
8761
8762
8763
8764
8765

0435
043542
043550
043556
043560
043566

052777
042777
022737
001003
052777
004737

000522

000100
004000
000001

146640
146622
146610

BR DVINIT

;GO BACK AND TRY MSTR CLR AGAIN IF ERROR

DVIN1:

043452

; DO BASE IN COMMAND

0’435%2

12777

004000
044640

#3,FLAG

JSR

PC,TOORIO

MOVB

146660

DVIN?7:

007472
146572

BIC

DVIN3:

MOV
MOV
CMP
BLT
MOV

#BASE
, 3SEL4
#0,SEL6
,
oPTYP#6
DVIN?
#522,SEL6

CMP
BNE

ATTL MLTYP
DVINS

BIS
BIC

BIS

JSR

AND OUTPUT INT FLAGS
BASE IN_INT EN

#143,3BSELO

#1E0,@SEL2
#LULOOP, 3SELO
#LULOOP,@SELO
PC, CLRAW

FOR

INTERRUPT OR TIME OUuT

: CLEAR LU LOOP

sIS TTL SELECTED
: IF NOT GO TO 3
;ELSE SET LU LOOP

; DO WRITE MODEM IF DMR MODE
043572
3600
043602
043610
043614
043622
043630
043632
043640
043646
043650
043656

023727
002437
112777
004737
042777
022737
00100
0527
022737
001003
052777
004737

012406

000006

000145
044746
000014
000004

146550

146552
007472

000004
000003

146534
007472

000010
044640

146516

CMP

BLT
MOVB
JSR
BIC
CMP
BNE
BIS
DVINS:
CMP
BNE
BIS
DVIN10: JSR

OPTYP,#6
;1S THIS DMR MODE
DVINS
*IF NOT GO TO 8
#145,aBSELO
SSET UP WRITE MODEM
PC,TOORIO
‘G0 TO WAIT FOR INT
MBI T2+#B1T3,aSER6
;CLEAR BSEL6 AND 7
#MODREM,MLTYP ;IS THIS REMOTE LOOP
DVIN9
*1F NOT GO TO
#BIT2,3BSEL6
:SET THE BIT
momioc.urvp :1S 1T MODEM LOCAL
DVINTO
SIF NOT EXIT
#BIT3,38SEL6
+SET MODEM LOCAL
PC, CLRAW
:CLEAR RD] AND WAIT

; ENABLE EXTENDED ERROR IF DMR MODE
043662
043670
043674

112777
004737
004737

000146
044746
044640

MOVB
JSR
JSR

146470

#146,3BSELO
PC,TOORIO
PC . CLRAW

;SET UP FOR ENABLE
;CLEAR RDI AND WAIT

; DO CONTROL IN COMMAND

043700
043706
043712
043716
043724

112777
004737
005077
022737
001004

000141
044746
146456
000004

146452

007470

DVINS:

MOVB

JSR
CLR

CMP
BNE

#141,3BSELO

PC,TOORIO
asEL6

#DOW,MODTYP
DVINS

UP CONTROL I N
INT OR TIME OUT
F/DUP

OWN LINE LOAD?
—————

8770
8771
8772
8773
8774
8775
8776
8777
8778
8779
8780

DVEM3
ERR13

8766
8767
8768
8769

DEVICE INIT SUBROUTINE

16=JUN-81 14:38

(4)
(5)
(5)
. ; 5)

8744

SEQ 0151

J 12
MACY11 30A(1052)
DEVICE INIT SUBROUTI

023727

043774
044002

002000

146422

146416
044640

007444

012406

000006

—

DVING:

O@—

il i

DVINS:

007474

00?737

146440

o i 002400

16-JW-81"16:39 PAGE 14<25

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

=4 82 GRS ¥

ZCLKBO
CZ2CLkB.P1

001000 007502
039737
07
DVINEX: RTS

0002

#MAINTB+HALFDB, DSELO
DVING
FHDPLX
DVINé

#HALFDB,aSEL6

@SEL6,CONTIN

1F SO SET MAINT MODE

FORCE HALF DUPLEX

;1S THIS A HALF/DUP
:IF NOT GO TO 4
:ELSE SET HALF/DUP

sSET UP CONTROL IN FOR MODS

PC,CLRAW

;GO CLEAR RQI AND WAIT

OPTYP,#6

xs THIS DMR
?
EXIT

DVINEX
P'DmcRUN,FLAG

;FOR RDI

TO 60 AWAY

ssf DMRRUN OUTPUT EXPECTED BIT
‘RETURN TO CALLER

SEQ 0152
BIT

K 12
MACY11 30A(1052)
16=JUN=81
14:39 PAGE 14=26
DEVICE GET MODEM STATUS SUBROUT INE

(ol
NOY

ZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
CLKB.P11 ~ 16=JUN=-81 14:38

LSBTTL

881
881

DEVICE GET MODEM STATUS SUBROUT INE

8814

300

g}g

P OIMPLICIT INPUTS:

&2?

;

8815

SEQ 0153

: FUNCTIONAL DESCRIPTION:

881

‘DVMODS'*

GET MODEM STATUS

THE BIT POSITION AND AVAIABLITY OF THE MODEM SIGNALS

CTS,DSR,...RI,.

IN THE DEPENDENT PORITION OF THE GLOBAL EQUATES SECTION.

aazi

: OUTPUTS:

glézzg
8827

: SUBORDINATE ROUTINES USED:
:
“TOORIO'* = TIME OUT OR INPUT INTERRUPT OR OUTPUT INTERRUPT

8830
8831
88

;
* CALLING SEQUENCE:
:
JSR
PC.,DVMODS

gg‘

33223

CURRENT MODEM SIGNAL VALUES IN ‘MODS'’

8835
883

044004
044012

112777
004737

000141
044746

8839
&?

044032
044036

004737
000207

044640

146346

8837 044016 017737 146346 010456
8838 044026 013777 007444 14 42

“CLRAW'' = CLEAR RQ] AND WAIT FOR RDI TO CLEAR

DVMODS: MOVB
JSR

MOV
MOV

JSR
RTS

#141,3BSELO
PC,TOORIO

;SET UP CONTORL IN
:GO TIME OUT CHECK

PC, CLRAW
PC

:RETURN TO CALLER

aSEL4 ,MODS
CONTIN,@SEL6

:SET UP MODEM STATUS
:SET UP OLD CONTORL IN

MAC711 30A(1052) 1%-.!04-81 14:39 PAGE 14-27

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

DEVICE QUEUE RECEIVE SPACE SUBROUTINE

.SBTTL

INPUTS:
DVRXA = ADDRESS OF RX BUFFER SPACE
DVRCC = BYTE CHAR COUNT OF RX BUFFER
QRX FLAG BIT = SET BY CALLING ROUTINE

OUTPUTS:
QRX FLAG BIT = CLEARED BY ROUTINE
SUBORDINATE ROUTINES USED:

A TA

A T

N T T T TN

N T

FUNCTIONAL DESCRIPTION:
DVRXQ = THIS SUB ROUTINE QUES THE REC BUFFER SPACE TO THE
DEVICE, THEN CLEARS THE QRX BIT OF THE FLAG WORD.

"‘TOORIO’* = TIME OUT OR OUTPUT INTERRUPT OR INTPUT INTERRUPT

LTATATIEATA

"CLRAW'®

032737
001423

007502

= CLEAR RQI AND WAIT FOR RDI TO CLEAR

CALLING SEQUENCE:
PC.DVRXQ
JSR

DVRXQ:

BIT
BEQ

#ORX ,FLAG
DVREX

146274

B8IC
MOVB

#ORX ,FLAG
0144 aBSELO

146262

MOV
MOV

DVRXA. 3SEL4
DVRCC ,aSEL6

007502

MOV
JSR

DVREX:

JSR
RTS

:IF NOT RX THEN EXIT
;ELSE QUE RX
;CLEAR FLAG FOR RX

aséu MODS

;GO CHECK FIR IN OR OUT
;SET UP NEW MOD STATUS

PC,CLRAW
PC

;LOAD CC AND ADDR
sCLEAR AND WAIT
sRETURN TO CALLER

TOORIO

SEQ 0154

—

2c LKBO DMR,DMC=11 DATA CW LINK TEST
CZCLKB.P11 = 16=JUN=-81 14:38

masoe

8950
8951
895
895
8954
8955
8956
8957
8958
8959
8961
a%i
89

DEVICE TRANSMIT AND RECEIVE SUBROUT INE

DVTXRX=DEVICE TRANSMIT AND RECEIVE ROUTINE

'ERX"BIT

;

8966

DUTHDL'*

= OUTPUT INTERRUPT HANDLER CODE

: CALLING SEQUENCE:

8967

JSR

8965
3
8970 044120 032737 000010 007502 DVTXRX: BIT
8971

044126 001423

8973

044136

8981

= SET IF RECIEVE EXPECTED

SOUTPUTS:
|
;
"“DVTXA!' = ADDRESS OF TX MSG. COMPLETED
:
*DVTCC'* = BYTE COUNT OF TX MSG. COMPLETED
:
'QTX"* = SET IF TX COMPLETED
:
*DVRXA'* = ADDRESS OF RX MSG. COMPLETED
:
*DVRCC'* = BYTE COUNT OF RX MSG. COMPLETED
B
"QRX"* = SET IF RX COMPLETED
:
;
: SUBORDINATE ROUTINES USED:
:
“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

8975
8976
8977
8978
8979
8980

PAGE 14-28

:
THIS CODE QUES THE TRANSMIT BUIFER ro THE DEVICE
:
IF NEEDED. THE CODE THEN WAITS FOR A TX COMPLE,
:
RX COMPLETE OR BOTH. THE CODE REPORTS A TIME OUT
;
ERROR IF NO BACC OUTPUT INTERRUPT IS RECIEVED BEFORE
:
60 SECONDS. AFTER REPORTING ERROR TIMER IS RE STARTED
:
AND DEVICE WILL CONTINUE TO WAIT FOR INTERRUPT. CODE
:
ALSO REPORTS ERROR IF INPUT INTERRUPT OCCURS WHEN
:
EXPECTING OUTPUT INTERRUPT;WHEN RX BACC OCCURS WHEN
;
EXPECTING TX,AND WHEN TX INT. OCCURS WHEN EXPECTING
:
RECIEVE.
:
:INPUTS:
i
:
DVTXA'* = ADDRESS OF TRANSMIT MSG.
;
*DVTCC'* = BYTE COUNT OF TRANSMIT MSG.
P
'uTX* BIT = SET IF TRANSMIT REQUESTED
:
'EIX''BIT = SET IF TRNASMIT EXPECTED

8974

14:39

o
: FUNCTIONAL DESCRIPTION:

89
893
8934
8935
8936
39%
89
8939
8940
8941
894
89
8944
8945
8946
8947

39;5

16-JLN-81

DEVICE TRANSMIT AND RECEIVE SUBROUT INE

.SBTTL

8928

89
gg

MACY11 30A(1052)

044130

042737

000010

0441446

004737

044746

044150
044156
044164
044172
044176
044176
044204

112777 000140

017737 146;14
013777 007346
013777 007350
004737 044640
012737 000074
032737

000060

146214

007502

;ANY TX TO QUE

BIC

#QTX,FLAG

*CLEAR FLAG

JSR

PC,TOORIO

MOVB

010456
146204
146202
007546

#QTX,FLAG

BEQ

007502

DVTR3:

PC,DVTXRX

MOV
MOV
MOV
JSR
MOV

TOINOT: BIT

DVTRS

#140.aBSELO

aSEL&,MODS
DVTXA.@SEL4
DVTCC.@SEL6
PC, CLRAW
#60. , TIMERS

#CRX+#CTX,FLAG

“IF NOT GO WAIT FOR OUPUT
;G0 CHECK FOR IN OR OUT

:PUT IN NEW MOD STAT

;CLEAR RQUI ANDWAIT
:SET TIMER FOR 60 SECS

:IS IT TX OR RX COMP ALREADY?

SEQ 0155

ASEL2 . TEMPL

Pc.w;vs

.WORD

CSERSOFT
12
DVEM4

TRAP

C$BRK

TRAP

JRETURN TO CHECK TIMER

007502

#ININT FLAG

IS IT INPUT INTERRUPT
:IF SO LOG ERROR

007432
007434
007436

#DVEMS
, TEMP2
@SELO, TEMP3
@SEL2, TEMP4

ERR13

INC
ERRCNT
ERRSOF T 13,DVEMS5 ,ERR13

000002

004737
032737
00170

045070
000060
000020

TOINZ:

#OTINT ,FLAG

DVTRG:

PC,OUTHDL
#CTX+#CRX, FLAG
TOINOT
#CTX,FLAG

TOINOT

DVTRS

000200

025125
JSR

#DVEM9, TEMP2
TSEL4, TEMP3
TSEL6, TEMP4

PC,LGDVE

ERRSOF T 14 ,DVEM9 ,ERR13

CSERSOFT
13
DVEMS

ERR13

NOT OUTPUT GO BACK AND
CK TIMER AGAIN
SE_HANDLE OUTPUT AND RETURN
IT
TX OR RX
gO BACK AND TRY AGAIN

0 SHOULD IT BE

T SHOULD GO TO 4A

LOG ERROR

*REPORT ERROR

000016
025125
026110
000411

CSERSOFT

14
DVEM9

ERR13
DVTR4B

;THEN CLEAR (COMPL.FLAG

B
D

;CLEAR BIT

TOINOT

032737
001711

PSP

PC,LGDVE
#ININT ,FLAG

007502

TOIN2

TOIN1:

DVTR3

ERRCN
12 ,DVEM& ,ERR13

0264
007400

T,
D
DD
PP D> P

aSELO, TEMP3

N
e
N

888
288 ONOWVESWN=O

;1S TIMER EXPIRED

#DVEM& , TEMP2

007432

1461;(2. 0074
146124

TIMERS
TOINI

024510

;IS SO EXIT

007546

DVTR4

00107

066212

SEQ 0156

PSSP PP IO

\h\.fl\flbg
§888888888888
o R RER w;; VIV, IV P 0 §323333 ® &

N
oN

N 12
MACY11 30A(1052) 16=JUN-81
14:39 PAGE 14-29
DEVICE TRANSMIT AND RECEIVE SUBROUTINE

gm.oncq 1 DATA COMM. LINK TEST
1
16=JUN=-81 14:38

90
9031

14
316

737

730

440
032737

; 5

¥% gis o
9034 OMS§2 15737
9035
9036

9037
(4)
(5)
(5)
(5)
9038
9039
9040
9041
9042
9043
%IS.

0“548
O“S?‘

0445
044554
044556
044560
044562

044564
044566
044574
044602
044610
044616

DVTR4A: MOV

750

DVTR4B: Bl
DVTRS:
BI

#ATX,FLAG
#CTX,FLAG
#CRX . FLAG

007502

#ERX ,FLAG

000207

:IF NOT THEN EXIT.

DVTRSA

:1F YES PROCESS AS SUCH

RSEL4, TEMP3

RSEL6, TEMP&

Pg,Leéxs

15.DVEMS,ERR13

104457
000017
025036
026110

;AND SET TX COMPL FLAG
:ELSE CLEAR FLAG
:IS IT RX T00?

DVTREX

#DVEMS, TEMP2

13737
004737

000411
013737
013737
052737
042737

TSEL4,DVTXA
TSEL6,DVTCC

SEQ 0157

AND RECEIVE SUBROUTINE

STEST :S THIS SUPPOSED TO BE RX

;ELSE

:LOG ERROR
TRAP

«WORD
«WORD
.WORD

045706
045710

007362
007364
007502
007502

DVTR5A: MOV
MOV
BIS

DVTRX1: BIC

DVTREX: RTS

DVTRX1

SAND EXIT

#Q,F
RX
LAG
#CRX ,FLAG
PC

;CLEAR FLAG FOR RX DONE
JAND EXIT

RSEL4 ,DVRXA
RSEL6,DVRCC

$§ERSG7
DVEMS

ERR13

TMM

DEVICE TRANSMI

OO0 >» e 2222222222222

9028

i
52737
013737

mhOohoh;m

064456

3
MACY11 30A(1052) 12‘.’%’*81
14:39 PAGE 14-30

mmmmmmmmmmmmmm

LiNK TEST

CZCLKBO DMR,DMC=<11 DA
CZCLkB.P1
16=JUN-8

16=JUN=81 14:38

9047

; DEVICE DEPENDENT SUBROUTINES

3323

.SBTTL

2057

9085
(3)
9086
9087
(3)
(2)
9088
9089

044620
044620
044620
044626
044626
044626
044630
044630
044630
044636
044636
044636

052737

000001

007502

DEVICE INTERRUPT SERVICE ROUTINES
BGNSRV

DVINS

BIS
ENDSRV

#ININT ,FLAG

DVINS::
L10021:

000002

052737

000002

007502

BGNSRV

DVOUTS

BIS
ENDSRV

#OTINT ,FLAG

000002

DVOUTS:::

L10022:

9090

: FUNCTIONAL DESCRIPTION:
:
CLRAW = CLEAR RQI AND WAIT FOR RDI TO GO AWAY
:
THIS CODE CLEARS THE INPUT REQEST BIT(RQI) SETS A
;
TIMER UP TO TIME SOCOCTAL) TICKS AND MAKES SURE
;
RDI CLEARS BEFORE TIMER EXPIRES. IF TIMER EXPIRERS

9098
3?38

¥
* SUBORDINATE ROUTINES USED:

3%812

;

9103

9105

;

JSR

CLRAW:

MOV

CLRA3:

MOV

gggg

;

9104

..-

9109

044640

9111

911;

m 012737

9113

9114
(3)

044664

044666
044666

104%

370

9118

044700

9125

ou.%

044644

011637

042777

9119 82270
9120
710
9121 044716
044

oonss

000040

145506

S0 007542

737 00“752,,2

001406

9115 mm 8(3’;

9123

CODE REPORTS ERROR AND SETS UP TIMER AND WAITS AGAIN.

‘LGDVE'' = LOG DEVICE ERROR (TIME OUT)

: CALLING SEQUENCE:

9110

RTI

I+

9091
9092
9093
9094
9095

9108

RTI

(SP) ,PCADD

;SAVE PC OF CALLING ROUTINE

#50, T IMER1

;SET UP TIMER FOR SO(OCTAL) TICKS

BEQ

CLRA2

;IF TIMER EXPIRED ERROR

BIT

#RD1 ,@SELO

;1S RDI CLEAR

RTS

*RETURN TO CALLER

BIC

#RQ1,ASELO

CLRAT: TST

BREAK

000200 145462

;gr

PC,CLRAW

BNE

TIMER]

CLRAT

; 7 024252 007432 CLRA2: MOV
01 7;;7 45444 007434
MOV
017737 145442 007436
MOV

#DVEMO, TEMP?
aSELO, TEMP3
@SEL2, TEMP

005237

ERRCNT

004737

026434

007400

JSR

INC

PC,LGDVE

:IELvS«En GO CHECK TIMER

;L0G DEVEICE EVENT 0

9070
9071
(3)
9072
9073
(3)
96%).

SEQ 0158

DEVICE TRANSMIT AND RECEIVE SUBROUTINE

S~ S~~~ L~~~ eerfAMMMMmMMMMmMmMmMmMAMMAmMAMMmMMmMMmMMmMMmMMmmmmmm
e

CZCLKB.P11

MACY11 30A(1052) 18-Ju-a1 14:39 PAGE 14=31

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

TRAP

($BRK

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
16=JUN-81 14:38
CZCLkB.P11
9124
(4)
(%)
(%)
(5)
9125

044734

D13

16=JUN=81
14:39 PAGE 14-32
MACY11 30A(1052)
DEVICE INTERRUPT SERVICE ROUTINES

ERRSOFT 16,DVEMO,ERR9

CLRA3

;WHILE WAITING FOR RD]

JRESET TIMER AND CONTINUE

SEQ 0159

CSERSOFT

16
DVEMO
ERR9

MACY11 30A(1052) ‘ls-JW-l‘l 14:39 PAGE 14-33

CZCLKBO DMR,DMC=11 DATA (Wu LINK TEST
16=JUN-81 14
CZCLKB.P11

SEQ 0160

TIME OUT OR INPUT INT. OR OUTPUT INT.

FUNCTIONAL DESCRIPTION:

TOORIO = TIME

INTERRUPT, IF TIME OUT OCCURS IT REPORTS ERROR AND

RESTARTS TIMER. IF INPUT INTERRUPT OCCURS RETURN TO CALLER
IF_OUTPUT INTERRPUT OCCURS LOG IT AND CONTINUE WAITING FOR
INPUT INTERRUPT.
USE OF FLAGS:

'"OTINT'® « SET BY OUTPUT INT ROUTINE
“ININT'* = SET BY INPUT INT. ROUTINE
CLEARED BY THIS ROUTINTE.

SUBORDINATE ROUTINES USED:

L TN TN TN

OUT OR INPUT INTERRUPT OR QUTPUT INTERRUPT

THIS ROUTINE SETS UP A TIMER FOR 100 (OCTAL) TICKS
THEN CHECKS FOR TIME
QUT,OR INPUT INTERRUPT,OR OUTPUT

N T TS TS DRI TSR TR TR TSR T

+
+*

SBTTL

CALUN?SSEMNCE

C.TOORIO

‘OUTHDL'' = OUTPUT INTERRUPT HANDLER

011637

(SP) ,PCADD

MOV
MOV
MoV

#DVEM1, TEMP2
@SEL2, TEMP4
@SELO, TEMP3

—

BNE

#100, TIMERT
TIMER1
TOOR1

—

MOV
w

LE)

TOORIO: MOV

JSR

;SAVE ADDR. OF CALLING ROUTINE

;SET _UP TIMER
;1S TIME EXPIRED
;IF NOT CONTINUE
;IF YES ERROR

PC,LGDVE

ERRCNT
ERRSOFT 17,DVEM1,ERR9

BR
10442

03273
045042

001402

045044
045050
045056

004737
032737
001740
042737
000207

045066

TOOR1:

000002

007502

045070
000001

007502

000001

007502

TOOR2:

TRAP

TOORIO

BREAK

BIT

#OTINT ,FLAG

BEQ

TOOR?2

BIT

JSR

PC,OUTHOL
#ININT ,FLAG

BIC

#ININT FLAG

BEQ
RTS

TOOR3

;1S THERE AN OUTPUT
s PEND ING
;1F NOT GO TO 2
sELSE GO HANDL IT
:

CSERSOF T

.WORD
«WORD
-WORD

17
DVEM1
ERR9

TRAP

C$BRK

;1S THERE AN INPUT PENDING

:IF NOT GO BACK TO TIMER CK.

sELSE CLEAR THE INPUT PEND FLAG
sAND RETURN TO CALLER

—

‘

CZCLKBO DMR, DHC-‘H DATA COMM. LINK TEST

CZCLKB.P11

F13
16=JUN=B1

MACY11 30A(1052)

16=JUN=81 14:38

g};g

LSBTTL

9180
9181

144
: FUNCTIONAL DESCRIPTION:

9183

;

9182

;

9184
9185
9186
9187
9188

:
:
:
:
:

9189
g}g?

:
:

THIS, ROUTINE IS CALLED WHEN AN OUTPUT INTERRUPT HAS SET

THE 'OTINT'' BIT x
FLAG'' WORD. IT CHECKS FOR
THEN IT CHECKS FOR BACC OUT IF NOT BACC OUT REPORT THE
TYPE OF OUTPUT ERROR. IF BACC OUT FIND IF RX OR TX
IF RX SET CRX BIT AND MOVE ADDR AND BYTE COUNT TO RSEL4

AN RDO SIGNAL IF NO aoo THEN REPORT ILLEGAL INTERRUPT.

AND RSEL6. IF TX SET CTX BIT AND MOVE ADDR AND BYTE COUNT
TO TSEL4 AND TSELS. CLEAR OTINT FLAG AND RETURN TO CALLER.

9194

9196

"OTINT'' = SET BY OUPUT ROUTINE

"DMRRUN'‘ = SET BY DVINIT ROUTINE IF THIS IS DMR

“CTX'*

CLEARED BY THIS ROUTINE

9197

9198

;

‘CRX'*

CHECKED AND CLEARED BY THIS ROUTINE.

= SET IF TRANSMIT COMLETED

= SET IF RECIEVE COMPLETED

9199
9200
3%85

3
3
: SUBORDINATE ROUTINES USED:

3582

9205
9206

: CALLING SEQUENCE
;
JSR

9207

9500

045070
045074

011637
042737

9213
9214
9215
9216

045110
045112
045120
045126

9212 045102

9217
9218
9219
(4)
(5)
(5)
9536

045134
045140
045144
045144
045146
045150
045152

PC,OUTHDL

007502

OUTHDL: MOV
BIC

(SP) ,PCADD
HOTINT,FLAG

;SAVE ADDR. OF CALLING ROUTINE

001023
012737 024674 007432
017737 145240 007434
017737 145242 007436

BNE
MOV
MOV
MOV

OUTH1
#DVEMG, TEMP2
aSEL2, TEMP3
@SEL6, TEMPS

:IF RDO OK ...ELSE LOG ERROR

032777

004737
005237

007462
000002

000200

145254

026434
007400

104457
000022
024674
026032

3551

9223
(3)
9531

‘L GDVE'* -LOG DEVICE ERRORS TO EVENT LOG

9210
9211

SEQ 0161

OUTHDL = OUTPUT INTERRUPT MANDLER

: USE OF FLAGS:

9195

PAGE 14=34

OUTPUT INTERRUPT HANDLER

9192

9193

14:39

OUTPUT INTERRUPT HANDLER

BIT

#RDO, BSEL2

JSR
PC,LGDVE
INC
ERRCNT
ERRSOFT 18,DVEM&,ERR9

;CLEAR PEND FLAG AND CHK FOR RDO

;GO LOG ERROR
TRAP
.WORD
.WORD
.WORD

CSERSOFT
18
DVEM6
ERR9

TRAP
.WORD

CSESCAPE
L10020-.

;EXIT TEST IF ERROR

045154
045154
045156

104410
000676

9225 045160 032777 000001
9226 045166 0000
9227 045170 000137 045614

145176 OUTH1:

ESCAPE

TST

BIT
BNE
JMP

#BACC,@SEL2
1%
OUTH2

:1S_THE OUTPUT BACC
S BR IF NO
2IF SO GO 10 2

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

MACY11 30A(1052)

CZCLKB.P11 ~ 16=JUN=81 14:38
9228

9229

G 13
16=JUN=81

MOV

ASEL6, TEMP

92%5
045202 032737 000004 007436
9233 045210 001404

BIT
BEQ

#BIT2,
TEMPS
OUTH6

9235

INC

3% ‘

9234

045174 017737 145174 007436 18:

045212

005237

1::39

OUTPUT INTERRUPT HANDLER

007374

PAGE 14=35

;ELSE LOG ERROR AND PRINT IT

IF NO BUFFER QUTPUT JUST COUNT THEM

NOBUF

;1F NO BUFF INC COUNT AND EXIT
*ELSE GO TO 6

gggg 045216 000137 045672
JMP
9238 045222 023727 012406 000006 OUTH6: CMP
9239 045230 002426
BLT

OUTHEX
OPTYP,#6
518

:DMR ?
:1F NOT DMR MODE SKIP TO 51

9241

508

‘NO,BRANCH

9240 045232 032737 002000 007502

BIT

9242
9243

JMP
BIT

OUTHEX
#BITS, TEMPS

JMP

OUTHEX

MOV

aSEL2, TEMP3

045240

001402

045254
045256
045264
045266

001414
032737
001405
042737

9249
9250

045300
045306

9253
9254

045322
045326

9244
9245
9246
9247

045242 000137 045672
045246 032737 000040 007436 S08:

3321

518
#DMRRUN,FLAG
52%
#DMRRUN,FLAG

‘HERE BECAUSE OF BASE TABLE UPDATE REQ ? REV B BY EC
REV B BY EC

SEXIT
SIS IT RUN STATE
*IF
:1S
:1F
:IF

NOT BRANCH
RUN EXPECTED
NOT BRANCH
SO THEN CLEAR EXPECTED

001000

007502

012737
012737

025437
024751

007442
007432

004737
012737

026434
014635

007442

JSR
[ 0)")

025424
000002
025413
000010
025373
000020
025361

007442
007436 18:
007442
007436 2%:
007442
007436 4$:
007442

MOV
BIT
BEQ
MOV
BIT
BEQ
MOV
BIT
BEQ
MOV

#DATCKM, CONOTM
#BIT1, TEMPS
;1S THIS TIMEOUT
2$
#TIMOM, CONOTM
#BI1T3, TEMP4
;1S THIS DDCMP MAINT RECVD
48
#DDCMRM, CONOTM
#BIT4, TEMPS
;1S THIS LOST DATA
5%
#LOSDAM, CONOTM

BEQ

045314 017737 145044 007434

045342

BEQ
BIT
BEQ
BIC

#BTUP,FLAG

007502

9255 045334 032737 000001
9256

BEQ

001000

9248 0452764 000137 045672

001403

52%:
518:

007436

9257
9258
9259
9260
9261
9
9263
9264
9265
9266

045344
045352
045360
045362
045370
045376
045400
045406
045414
045416

012737
032737
001403
012737
032737
001403
012737
032737
001403
012737

9268

045432

001403

9273

045460 032737 000400 007436

9275
9276
9277
9278
9279

045470
045476
045504
045506
045514

9267 0454.;3 032737 000100 007436

MOV
MOV

BIT

58:

BEQ

BIT

#RUNSBM, CONOTM
#DVEM7 , TEMP2
PC,LGDVE
#LPO,CONOTM

#8170, TEMPS
1%

#BIT6, TEMPS

SAND EXIT

;LOAD

‘WULL STRING''

*IS THIS DATA CHECK

TO INIT CONOTM

;1S THIS DISCONNECT

9269 045434 012737 025346 007442
9270 045442 032737 000200 007436 68:
9271 045450 oouo;
9272 045452 012737 025326 007442

MOV
BIT
BEQ
MOV

#D1SCOM, CONOTM
#BIT7, TEMPS
;1S THIS DDCMP START RECVD
78
#DDCSRM, CONOTM

9274

BEQ

045466

001403

025310
001000
025270
012406

007442
007436 8$:
007442
000006 9%:

002000

007436

9283 045534 012737 025461

007442

9280
9281
9282

045522
045524
045532

012737
032737
001403
012737
023727

7%:

002416
032737
001403

SEQ 0162

BIT

#B1T8, TEMP4

MOV
BIT
BEQ
MOV
CMP

#NXMM, CONOTM
#BITY, TEMP4
9
#PROEM, CONOTM
OPTYP, #6

MOV

#RXIDM,CONOTM

BLT
BIT
BEQ

118
#BIT10,TEMP4
108

;1S THIS NON-EXSISTENT MEMORY

;1S THIS PROCEDURE ERROR
.

;1S THIS DMR MODE

*1F NOT BRANCH
:1S THIS A RX IDLE
*IF NOT BRANCH

:IF SO SET UP MESSAGE

M 13
MACY11 30A(1052)
16=JUN=-81
1::39
OUTPUT INTERRUPT HANDLER

045614
045614

032777

000004

144542

9298
9299
9300
83381

045624
045632
045640
045646

052737
017737
017737
000411

000020
144532
144530

007502
045702
045704

9303
9304
9305
9306

045650
045656
045664
045672

052737
017737
017737
042777

000040
144506
144504
000200

007502
045706
045710
144464

045622

001012

OUTHZ:

OUTHEX

;CLEAR RDO AND RETURN TO CALLER

BIT

#RXBIT,aSEL2

;1S THIS RX BACC Out

BIS
MOV
MOV
BR

#CTX,FLAG
@SEL4, TSEL4
@SEL6, TSEL6
OUTHEX

TRAP
WORD
WORD
.

CSERSOF T
19
DVEM7
ERRS

BNE

OUTH3

;IF NOT THEN IT MUST BE TX.

PC
O
0
0
O

JRETURN TO CALLER

P
P
P
P

RTS
.WORD
.WORD
.WORD
.WORD

TSEL4:
TSEL6:
RSEL4:
RSEL6:

sSET RX COMPL
:THEN MOVE TO TEMP
;AND SEL6 TO TEMP
;CLEAR RDO

000207
000000
000000
000000
000000

#CRX,FLAG
@SEL4 ,RSEL4
@SEL6,RSELG
#RDO,@SEL2

045700
045702
045704
045706
045710

BIS
MOV
MOV
OUTHEX: BIC

(S P
(S P
e
P
(e
e
P
=
—
—
— P
—

—

RTS

—

000207

f— G—

045712

9313
9314

9307
9308
9309
9310
gg‘1|1

OUTH3:
OUTH4:

9297

024751
025750

9295
9296

104457
0000%3

INC
ERRCNT
ERRSOFT 19,DVEcM7,ERRS
-

000427

12%:

007400

005237

045576
045602
045602
045604
045606
045610
045612

SO SET UP MESSAGE
THIS CD GLITCHED
IF NO
SO SET UP MESSAGE

9291
9292
(4)
(5)
(5)
(5)
82232

;IF
;1S
:BR
;IF

007442

#CTSFM,CONOTM
lB‘T‘IZ.TEHPlo
12
#CDGLM,CONOTM

025471

MOV
BIT
BEQ
MOV

007442
007436

025505
010000

0127
032737
00143;
0127

;1S THIS CTS FAILED
:IF NOT BRANCH

045552
0’»2
045566
045570

JB;T".TEN%
11

118:

9286
9287
9288
g%gg

BIT
BEQ

10%:

007436

004000

832737
14 ;

045545
04555

SEQ 0163

9284
9285

PAGE 14-36

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

13
MACY11 30A(1052)
OUTPUT INTERRUPT HANDLER

1g-Jw-a1 14:39 PAGE 14=37

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

SEQ 0164

+EVEN

SBTTL

REQUEST BASE TABLE UPDATE
THIS ROUTINE ADDED FOR REV B BV EC

;FUNCTIONAL 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 TO THE DMR.

USE OF FLAGS:

FLAG = BITS IN TH IS WORD ARE SET BY THE DEVICE INTERRUPT ROUTINE.
0A 1, THE FOLLOWING BITS MEAN
ININT = g{} 1 = DEVICE INPUT READY
2 = DEVICE OUT READY

INPUTS: NONE REQUIRED.

SUBORDINATE ROUTINES USED:

CLRAW = CLEAR RQI AND WAIT FOR DEVICE TO CLEAR RDI.
OUTHDL = THE DEVICE OUTPUT SERVICE ROUTINE.
LGDVE = LOG A DEVICE ERROR TO EVENT LOG.

;CALLING SEQUENC E:
:

023727

012406

000006

000151
000100
044746
044640
000200

144426
144424

007542

000002

007502

DVBTUP:

108:

PC.DVBTUP

;DEVICE BASE TABLE UPDATE ROUTINE
cMP
BLT
MovB
8IS
JSR
JSR
MOV
BREAK

OPTYP,
#6
408
#151,aBSELO
#1E0,QSEL2
PC, TOORIO
PC , CLRAW

#200,
T IMER
#OTINT ,FLAG

308
TIMER1
108
#DVEM3, TEMP2

007542

024424
144350

JSR

007432
007434
007436

as&g.fews
ASEL2.

TEMP4

PC,LGDVE

ERRCNT

007502

:
308
40%:

408
#BTUP, FLAG

PC,OUTHDL

:?TLP.FLAG

;DMR IN DMR MODE ?
sNO ,BRANCH
;REQUEST BASE TABLE UPDATE
;ENABLE INTERRUPT ON OUTPUT READY
:WAIT FOR RDI

;CLEAR RQI AND WAIT FOR RDI TO CLEAR
JWAIT FOR INTERRUPT

:OUTPUT READY ?
*YES,BRANCH

STIME OUT ?

*NO,BRANCH
*DEVICE ERROR
:SAVE REGISTER
:SAVE REGISTER
:GO LOG DEVICE ERROR
*BUMP ERROR COUNT
*RE TURN

*SET BASE TABLE UPDATE BIT
*OUTPUT SERVICE ROUTINE
*CLEAR BASE TABLE UPDATE BIT
*RE TURN

TRAP

C$BRK

cz2cuo on DMC=11 DATA CW” LINK TEST

czCL Kl

3 88
(

)
)

390
9291

16=JUN-81

MACYT1 SOA(1052)

REQUEST BASE TABLE UPD
ENDTST

104401

J 13

16=JUN-81

14:39

SEQ 0165

PAGE 14-38

L10020:

TRAP

CSETST

K13
MACY11 30A(1052) 16°JLN-01
E PARAMETER CODING SECTION

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
16=JUN=-81 14:38
CZ2CLkB.P11
9393
9394
9395

PAGE 14-39

SEQ 0166

HARDWARE PARAMETER CODING SECTION

+
-~

T T T

.SBTTL

14:39

HE _HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
S ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS

WITH THE OPERATOR.

046056
046056
046060

.WORD L10023~L$HARD/2

DEVICE INDEPENDENT SECTION
DPLX.0,1,YES

T$CODE
?PLX

DEVICE DEPENDENT SECTION

CSRADR,2,0,160000,177776,YES

SXRNIS

sgsses EERESS

FRROSR

VECTOR,4,0,300,776,YES

PRIOR,6,0,340,4,7,YES

TSCODE
CSRADR
TSLOLIM
TSHILIM
T$CODE
VECTOR
TSLOLIM
TSHILIM
T$CODE
PRIOR

340

DEVPRM,10,D0,17,0,15.,YES
OPTN,12,0,7.0,7,YES

TSLOLIM
TSHILIM

T$CODE

?TN

BAWD,1
LININ,

1% 5% 5" 5es

TSLOLIM
TSHILIM

-—

13
MACY11 30A(1052)
DEVICE DEPENDENT § ECTION

1%-JUN-81 14:39 PAGE 14=40

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

(3)

046132

9467

9469
9470
9471
9478

ENDHRD

L10023:
NLIST

.EVEN

BEX

;DEVICE INDEPENDENT QUESTIONS

046132

052506

046114

042040

046356

DPLX:

.ASCIZ

/FULL DUPLEX OPERATION : /

;DEVICE DEPENDENT QUESTION
-

053105

P g—

047
042504
-

ph-

338388

9448
9449
9450
9451
9452

R
R

$as

9?4?

SEQ 0167

04151
051105
051122
042503

CSRADR: .ASCIZ
.ASCIZ

/DEVICE CSR ADDRESS : /
/INTERRUPT VECTOR ADDRESS: /

OPTN:

/DEVICE OPTION TYPE :

VECTOR:

PRIOR:

.ASCIZ

LIST

BEX
.EVEN

.ASCIZ

/INTERRUPT PRIORITY : /

(0=DMC,5=DMR-DMC MODE ,7=DMR)/

M3
MACY11 30A(1052)
16=JUN-81
DEVICE DEPENDENT SECTION

1
CZCLKBO DMR,DMC=11
DA TA COMM. LINK TEST
16=JUN-81 14:38
CZCLKkB.P11

14:39

SEQ 0168

PAGE 15

;.SBTTL SOF TWARE PARAMETER CODING SECTION
R

o 4

; 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
s INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.

THE

s MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS

9527

BGNSFT

ENDSFT

ooooooooooooooooooooooooooooooooooooooooooooooooo

I EEREERER LR

(

EEER R

RN R

ERER RN

R E R

" TEMPORARY PATCH AREA = FOR DEBUG PURPOSES

ooooooooooooooooooooooooooooooooooooooooooooooooo

PO PP

046356
046356

000030

OPIIPIIPIIOI TN

$PATCH:

046436

.BLKW
LASTAD

046436

LSLAST: :E

046442
046442
000001

.END

INOI NP NPIINIIIINIIIIIIIIIOIIPIIPIIIIIIPNPEN

.EVEN

P R

QA28R
egochOWAb-

; WITH THE OPERATOR.

N 13
=11 DATA COMM. LINK TEST
MACY11 30A(1052)
16-JUN-81
14:39
CZCLKBO DMR,DMC~1
CZCLkB.P11
6~JUN-81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS

7998

7919
79054

79474

—

— g—__ g—_ —_ g— g—_ g—

8241

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

7974

7977

79814

—

7943

—

7940

—

7937

79214

—

7910
7900

—

7713
6284
6283
6285
7727
6289
6282
7722
7692
7736
7690

7898

80014
80064
7916
7902

7996
7989

—

78420
7719
7703
7735
7693
7714
7726
7992
7965
7872
7894
7723
7734
7704
7705
7706
7707
7708
7709
7710
7926
7718
7728
7688
7700
7701
7712
7721
7733

78414

—

7732
7730

—

7715

7731

—

7694
7695

—

037270
0400
037456
036556
036512
037746
040246
0264
040326
037702
037636
040216
040146
037536
037544
037554
037564
037574
037604
037622
040004
040024
036462
036470
037344
037436
037720
040154
036566
040160
037740
027576
027532
027606
0256
027522
027530
040206
0
2
037646
036502

8001

—

ACTOMX
ACTECH
ACTEQD
ACTEXT
ACTHLP
ACTLIS
ACTLLP
ACTLPX
ACTLXX
ACTMEX
ACTME1
ACTMOP
ACTMOS
ACTMSO
ACTMS1
ACT
ACTMSS
ACTMSSG
ACTMSS
ACTMS6
ACTM2X
ACTNO
ACTNUF
ACTNUL
ACTNUM
ACTOPM
ACTPAS
ACTPRO
ACTPRT
ACTQFG
ACTREC
ACTREX
ACTRHL
ACTRLG
ACTRLP
ACTRNF
ACTRNL
ACTRPS
ACTRUN
ACTSEX
ACTSHO

7925

ACTDMQ
ACTOMS

037756
037262
037254
037232

7353

ACTDLL

ACTDME

O
036754

71
7729
7691
7
77
7689
7699
7720

ACTCSE
ACTCST

44954

SEQ 0169

ACT
=
ACTATY 03771
ACTBCR 037514
ACTCHK 040124
ACTCLB 0370
ACTCLP 0402
ACTCLR 036472
ACTCOP 037334
ACTCRC 040140

PAGE 16

i,
7

037076

SEQ 0170

78154

7827

63510
7855:
79934

7661

8259
8291
82664

8288

8155

82044

6320

6326

6328

6338

6340

6344

6346

6369

6371

6377

6379

6321+
6319+
6378+
4649

6328+
6326*

6329*
6327+

6340+
6338+

6346+
6339+

6371*
6344

6372+
6345+

6379+
6354+

6380+
6356+

6407
6357

6369

4668

9255

8128

= 000C01

(Alalalalalalalalalalala
Al

8364+

BITO

9258
9281
9284

MACY11 30A(1052) 12-JUN-81 14:39 PAGE 161

CROSS REFERENCE TABLE == USER SYMBOLS

OBRBRrrrororrrorrrrrT

ACTSHW

ACTSTE
ACTSTS

16=JUN-81

VETETETETTTETTETTTTERTTET

CZCLK!.P11

ETETEEEEEE
S EERERET

CZCLKBO DMR,DMC-11 DATA cm\ LINK TEST

4517
4518
4519
4520
4674
4651
4671
4653
666N
7534

4647
4648
9264
4650
9267
4666
9273
9276

4673
8758

8758
8764

4665

9243

4667

9270

7541

7628

8737+
7277+

8756+
7278+

8770%
8712+

7281%

7282+

7285+
8761
7289+
64220
9240
7611
4929
6565

7286+
8764+
7290+

9232

7662

7811

8052

8776*
8715+

8835%

8889+

8973+

9367+

bbb

8761
9261

4669

6663
6664

9385
4931
7840+

6605

6612

6733

7609

7638

6753

6757+

7530+

7538

7660

7665+

7789+

7602

7743

5222

5295

5163

sles

S170

s179-

si81

6273
5157

5159

5198

5200

5336

9383
7640
4930
7836*

8048

5183

o697l
530
532

siEr

Gers
534

6255

6257

6259

6261

5161

3207
377

5209
52r9

453w
45690
S4So
45604
4561#
6268
54544
54574
54534

6985
5304
8236
5171
5153
&7z
702
796 1
6241

0
L
L
&
&
L
L
L
L

3219
5281

5gor
5283

3233
5288

o4l
5291

3o
5298

5e39
5300

3262
5305

5192

320
53

5321
B745%
9289
5226
5164
76804
5290
5212
7890
8005

7804

4ser

4652

CLINBG
CLINPS
CLINUF

012565
012671
012542

7579

L
T

5330
7575
5292
5155
6274

6266

CLIBRX 012607
€LIDEC= 000011
CLIERM 012512
.| CLIERR= 000000
CLIEXI= 000007
|

CLIBR = 000002

9287

5§

4,784
44784
LU7BN
44784
GL7BF
4478%
44788
L47BF
W7BN
L478N
4478%
4478%
6661
66434
66484
66568
66594
44784
53554
53564
53584
53504
53614
53624
5364#
53654
6405
45564
S5408
4483
49604
45024
46104
4O4ON
57904
45764
457640
7570
45678
45660
54584
54564
45634

SEQ 0171

CROSS REFERENCE TABLE == USER SYMBOLS

8112 = 010000
&
BITIS =
G
BIT14 = 040000
G
BITIS = 1
G
BIT2" = 000004 &
BIT3
=
000010 6
BIT4 = 000020
G
BITS = 000040 G
BITé = 000100 G
BIT? = 000200 G
BIT8 = 000400 G
BIT9 = 001000 G
BLDBEX 032120
BLDBUF 032010
BLDBT
032020
BLDBZ
032062
BLDB3
032100
BOE
= 000400 G
BSELO
012360
BSEL]
012362
BSEL2
012364
BSEL3
012366
BSEL:
012370
BSELS
012372
BSEL&
012374
BSEL7
012376
BTHEAD (030476
BTUP = 002000
BUFEX
015223
BUFLIM= 001000
BYTBIT 007406
CABLE = 000002
CBLLOP= 00004
CCURAD 007344
CDGLM
025471
CHECK = 000003
CLEAR = 000001
CLIACT 036302
CLIALN= 000007
CLIALP= 000006
CLIBCR 012734
CLIBOL 012627
CLIBIF= 000CO3

MACY11 30A(1052) 18-JW~81 14:39 PAGE 162

1 DATA COMM. LINK TEST

CZCLKBO DMR,DMC~1
CZCLKB.P1T ~ 16=JUN=81 14:38

3764

7658+

bbb

9370

6753

6754*

6755+

6759*
7786

7787

7524+

7525+
8027+

7537
8028+

7649+

8029

7650
8332

6760+

7542+

7644

7651

7664*

7774

7778+

8016

8036

8509+
9283+

8517+
9286+

8522+
9289+

9254

9257+

9260+

9263+

9266+

7537+

7625+

7629

7663

7787+

7800+

8050+
8621+
8286

8078+

7771

7772

7785+

=
=

8345’
563
4605#
45194

3
3
3
B
B
5
5
L
&
5
B
5

LO66#

CPTRR

£099+

8755

8207

8282+
8212+

CONTIN
CPTR

835
8350
49384
45894
45904
4591
45924
459
45944
45954
4774
9269+
LO78#
49674

8373

8331+
8245

8253+

8340+
8265+

CMPS6
CMPS7
CMPTOT
(MSGO =
C(MSG1 =
(MSG2 =
(MSG3 =
CMSG4 =
(MSGS =
(MSG6 =
CONOTM

7568
7788

7567

bbb

91094

CMPSS5A

CR
CRC
CRCB

8978

CMPSS

8839

7499+

83
8§
g 578

7299
8789

7371+

CMPSEX
CMPSR
CMPS1

7237

7236+

7659

6187

7228+

49314
49374

;226'

CMPBUF
CMPPTR

7216
7229*

45
Si»
053'
0224
0264
025#
60484
34
ngl
8750
91124
911
9111#
479

5182
5256
5319

8332+

CLITRE
CLISPM
CLISRP
CLKBR
CLKCSR
CLKEN
CLKMZ
CLKINT
CLKSET
CLKVEC
CLRAW
CLRA1
CL
CL
CMDBUF

5272
6258

5180
5240
5299

gt
14

5178
5238
5297

45704
184

45640

- B

CLISTR= (00012

CLISPA= 000004

SEQ 0172

6271

W
W
==
PP A4, 3

42650

45684
54
1

[ Q¥ IV, LIV, V. ]

CL INUM=

CLIOCT=
CLlFU
CLI
5
CLlRT
0272
CLISEO 01300

PAGE 16-3

bbbl

D 14
14:39
MACY11 30A(1052) 16=JUN-81
CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
CZCLkB.P11
UN-81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS

—

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

CZCLkB.P11

CRx_

16=-JUN-81 14:38

= 000040

45514

CTOTCC

007342

L9398

CURADD

007420

CURCC

007412

CSHEXP= 000006
CSHTRN= 000007
CSRADR 046163
C1S
= 000004
CTISFM
025505
CTx
= 000020

C$AU_ = 000052
C$AUTO= 000061
C$BRK = 000022
C$8SEG= 000004
C$8suB= 000002
CSCEFG=
5
CSCLCK=
CSCLEA= 00001
C$CLOS= 00003
C$CLP1= 000006
CSCVEC= 000036
CSDCLN= 000044
$DODU= 000051
CSDORPT= 000024
CSOU = 000053
CSEDIT= 000003
CSERDF= 000055
CSERHR= 000056
CSERRO= 000060
CSERSF= 000054
CSERSO= 000057
C$ESCA= 000010
CSESEG= 000005
CSESUB= 000003
CSETST= 000001
CSEXIT= 000032
C$GETB= 000026
C$GE Tw= 000027
CSGMAN= 000043
C$GPHR= 000042
CSGPLO= 000030
CSGPRI= 000040
C$INIT= 000011
CSINLP= 000020
CSMANI= 000050
CSMEM = 000031
C$MSG = 000023
CSOPEN= 000034
C$PNTB= 000014
CSPNTF= 000017

C$PNTS= 000016

6610

428K

PAGE 16=4

SEQ 0173

9043

9303

6747+

6755

6757

6758+

6763+

7517«

7637

7642

7666%

7779+

901
665
8480
6611
7909%

9014
6655
8481
6614+
B04B*

9028
6665+

9298
7532«

7538+

7626

7631

7660*

7665

7805+«

8049+

6615
B449+

6649
B4LS5+

6654
8482

6665
8483

7528+

7540+

7807«
!

7868+

7881+

8995

9114

9166

9372

9005

9022

9037

9124

9163

9219

9292

5048
9286
8981

42284
42288
4228#4
42284
42284
42284
42284
4228%4
4228#
42284
42284
42284
4228%
42284
42284
4228#
4228%
42284
42284
42284
42284
4228%
42284
42284
42284
4228#
4228#

14:39

9029

46478
57914
45504

42284

16=JUN-81

9012

5197
5199
94634

8448+
49654
7904+
422884
4228#
4228#
42284
42284
42284
42284
42284
42284
42284
(2284
42284

MACY11 30A(1052)

CROSS REFERENCE TABLE == USER SYMBOLS

8981

45794
45804
9436

L9684

E 14

6648

B454+
6604
7907+
7463
7351
8719

7217
7390

’

7223

7199

7426
4306
B46S

8352

8366

8375

8728

8991

9388
7241

7315

7374

7559

7601

7237

7567

8441

8565

5851

5855

5859

5873

5878

5882

5886

5850
6180

5854
6183

5858
6222

5871
6236

587
624

7548

5879

9%?5

Sg??
59

9579

5881
6405

5885
6414

gggg

6564

7640

6568

7654

6570

6434

6452

6457

6463

6470

6471

6487

6495

6502

6515

6530

6803

9223

6228
7258
7331
7555

6983

7021

72490

7%08

7611

7750

F 14

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

CSPNTX=

L2284
42284

CSRESE= 000033

L228#

CSREVI= 000003
CSRFLA= 000021
CSRPT = 000025
C$SEFG= 000046
C$SPRI= 000041
($SVEC= 000037
|CS$TPRI= 00001

DAM

02023

DATCkB= 000002

DATCKM 025424
DCD
= 000001
DCk
= 000014
DCLFLG 007464
DDCMRM 025373
DDCSRM 025326
DDE
= 000022
DER
= 000010

DEV1
DEV
DEV

010650
010652
010654

42288

L2288
L2284
625“
L228#
42288
L2288
42284

L5164

S7878
4L649%
45384
L9914
57854
57828
45414
45368

51278
51288
5129

DEV&
010656
DFPTBL 002130 G
DIAGMC=
DISCOM 025346

51304
4351»
4228
57834

DLLAB
pLLCM
DLLEA

S7778
55374

DLE
DLL

DLLE1

DLLE2

DLLE3

20
042050
025214
015030
042226

8488

2564

8516

DLLEG
DLLES
DLLESA

042554
04
042604

DLLE7

042404

DLLESB
DLLEG
DLLE8

8517#
8505
8521

042640
042436

8529
8490

042524

8508

DLLGA = 000400
DLLIND 01054
DLLMOD= 00003
DLLM1
002647
DLLMIC 002172
DLLMIE 002654
DLLMZ
002654
DLLM2C 002174
DLLMZ2E 003060

DLLPRI
pLLOT

AS408
5016

042504

042352

202
013122

SEQ 0174

4 %8'

($Q10 = 000377
CSRDBU= 000007

CSREFG= 000047

PAGE 16=5

84934
45544
50844
46004
4697
LO978
4697
4698
L6984
4698

84
54614

7%32

7202

7204

7206

737
731

7312

7967

8014

7198+

7600+

6471
6471
6802

6474
6475«
7551«

7209

1306
73N
7314
7299

56544

6811

9257
5050
6145
7196
9263
927
615
6131

6468+
6469+
6478+
6479+

6807

6811

9269

6149
84414
B46S
8461
8497

8495

85074
8506

85204
85354
85264

8531
84994

85344

8510

8518

8523

B4S6
8532
5186
47548
B4L4LY9
L7594
47614
B4SS
47884

8487

8503

85114

8441

B4L4LS
B4S4
8504

8098

8237

8284

8329

6476*
6477«
7830*

6792
6795

7549*
7550+«

7828+
7829+

6819

7552+

7831+

6815

8447

8560

8614

DMROO

DMROOS

DMROO7
DMRO10
DMRO11
DMROTZ
DMRO13
DMRO14
DMRO1S
DMRO16
DMRO17

DMROZ0
DMRO21
DMRO22
DMRO23
DMRO24
DMRO25

DMRO27

DMRO31
DMRO32
DMRO33
DMRO34

67
020532
020566
020620

020663
020717
020751
021505
021035
021065
021114
021146
021176

021226
021
021307
021333
021365
021410

8450
5092
45240
48504
4878¢
5090
4
4881
4882
4883
4
4885
4886
4887
4888
4889
4890

8457
56584

84714

6317
6315
56564
57364
57374
57384
57394
40n
57414
57424
57434
5744
57454
57464

6337
6336

6414
46168
5093
46174
46154
45254
45264
48754
48194
45554
4819
4820
4821

6423M
5216
5659#
5218
5214
8710

4826
4827
4828
4829
4830
4831
483

56804
56814
56824
568
5684w
56854

4822
4823
482,
4825

4833
4834

4835
4836
4837
4838
4839
4840

6325
6323
8793
56734
5674
56754

5676M
5677#
56784
5679

56874

56894
56914
5690
569
5694M

021463

4841

56954

021544
021627
021664
021721
021756

4
4844
4845
4846
«847

6974
56984
56994
57004
57014

021513

i8ag

3630N

6368
6366

NN NN NN NN AN NNNONNNNNNN
NN

0422642

SEQ 0175

SN SN AN

DLTXRX

DLVM
020251
DMC_
= 000000
DMCEND 0034
DMCIND 003432
DMCM _ 020242
DMC002
02
DMCO03
023625
DMCO04
023662
DMCO05 023723
DMCO06
023756
DMCO07 024013
DMCO10 024050
DMCO11
024103
DMCO12
024125
024147
DMCO13
DMC377 024206
DMFMT
030547
DMPE
= 000053
DMPM
020253
DMPQ = 000054
DMPS = 000052
DMRC6 = 000004
DMRC7 = 000005
DMREND 003430
DMRIND 003250
DMRRUN= 001000
DMROO0 020342
DMROO1
020402
DMROO2
020432

PAGE 16-6

G 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

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLkB.P11

16=JUN-81 14:38

H 14

MACY11 30A(1052) 16=JUN=-81 14:39
CROSS REFERENCE TABLE == USER SYMBOLS

PAGE 16=7

SEQ 0176

DMRO35
DM(B?
DMRO3
DMR0O40
DMRO41

-b

LYISATITNIR L

—

NNNNNNNNNNNNNN
PNONONIN)
= b D b b b b b

;

DMRO50
DMROS51
WOS;
DMROS

09
57104

(WL LV LV LV LW LV LV LV LV AV LV LV LV IV IV, ]

DRSS

DMRO4
DMRO44
DMRO4
S
ommg

56724

8779

C—

9377

o 14
MACY11 30A(1052)
16=JUN-81
14:39
CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
16=JUN-81 14:38
CZCLkB.P11
CROSS REFERENCE TABLE == USER SYMBOLS

ECHOB = 000004

EDDCK
EDDDE
EDDER
EDDLE
EDDVI
EDEOP
EDMOS
EDRXC
EDRXQ
EDTXC
EDTXQ

015770
016103
015753
016046
016020
0161
016152
015725
015700
015651
015625

_E
_ L _E _E_EL _E _L_E_E _E _ L _EL_E_L _E_E_E_E_J§L

8721
87884

8631+
8333«

8632+
8378+

8473+
88844
8482+
8150

851

8616

8628

8631

8892

8500
8271~

8504
8276

8576+
8279

8584

8977

8268
8581

8480+
8626

8499
89704

8573+

8583

8976

9025+

7947

7958

7963

8232

8366

8375

3893

9041+

8629
8262

_ B _E _ B _ B _E

8618+
8261+

9026+

8512
8243+

8475+«
8239+

DVTXRX 044120
DZM
020270
ECHO = 000037

8730

044456
044500
044506
044566
007346

929;
903
9022

DVTR4
DVTR4A
DVTR4B
DVTRS
DVTR5A
DVTXA

577
577
S7754
45374
8792
8046
7311

SEQ 0177

DVEM?
024751
DVEM8
025036
DVEM9
025125
ovl
= 000012
DVINEX 04400
DVINIT 04332
DVINS
044620
DVIN1
043462
DVINIO 043656
DVI
043400
DVI
043566
DVING
043752
DVINS
043736
DVING
043362
DVIN7?
043534
DVINE
043700
DVING
043640
DVM
020265
DVMODS 044004
DVOUTS
4630
DVRCC
7364
DVRCT
007366
DVREX
044116
DVRXA
007362
DVRXQ
044040
DVTCC
007350
DVICT
007352
DVTREX 044616
DVTRX1
044610
DVTR3

PAGE 16-8

8352

015550
EFM11
015453
EFM2
EF .CON= 000036 G
EF .NEW= 000035 G
EF .PWR= 000034 G

—

’

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

00%%2

EMSG
EMSG4
EMSGS
EMSG6
EMSGE
ENADD

002224
002324
00241 ?
00251
002647
007404

ENDEVT
ENDIT

4,688
4689
4690
4691
469
469

4694
4696

4959

7204
7202

47144
47164
47184
47204

47264
47314
47354
L7454
6571

03143
0345

6435
7208

ERR1
ERR10

025630 G
025720 G

45420
49574
9218+
58494
58574

5287
6157
6160
9291+
8366
8352

ERR14
ERR2
ERRS

026142 G
025672 G
025750 G

58844
58534
58704

B46S5
8375
9292

ENDQO =

17
EOP
= 000024
ERRCNT 007400

ERR13

ERR9
ERX

ETX

026110 G

026032 G

= 000100

= 000200

EVL
= 000004 G
EVWMCTS 017240

EVMDCD

017250

45884

58804

S8754

45524

45534
44784
5059

5061

6445
72984

65064

6163

8042+

8351+

8365+

8728

8991

9005

9022

9037

9124

9163

9219

8101

8154

8258

8257

6463
6463
6442

6484
6485+
7249

5881
5885

6471

6199

8077

55974
56024
56034

6515
6530

EVTIADD
EVIBCT
EVIEND
EVIFO
EVIF1

010614
010616
010454
016310
016403

51084
51094
50404
55864
55874

6460+
6461+
6195
6452
6457

55894
55904
55914
55924
559
55944
55954
5038
50704
S106#
50384
51054
51074

6470
5876
5871
6495
650
648
5850
5039¢
6457
6456
6185
6455«
6454+

EVTF

EVTF
EVTF3C
EVIF3D
EVIF4
EVTF4A
EVIF4B
EVIF5A
EVTLOG
EVILST
EVIMIN
EVIPTR
EVTSEC
EVITCK

016432

016504
01651
01653
016555
016657
016755
017034
007552
010514
010610
007550
010606
010612

5063
5062
5064
5065

55884

8127

8374~

8403

8727+

8275

8446

8620

9031

6487
6487

6492%
6493*

6495
6495

6499+
6500

6502
6502

6432

6440

7246

6431

6447

7247

8274

8485

8502

8578

8590

8990+

9004+

9123+

9162+

9016

56064

017244
017120
017143
017223

017260
017254
017264
017270

9381+

56044

EVMDSR
EVMOCG
EVMOHD
EVMOST

EVRI
EVMRTS
EVWMSQD
EVMTM

7841+

6449

BRI

EHSG%

788
4478»

SEQ 0178

LRMEB

EF .RES= 000037 G
EF .STA= 000040 G
EMSGO
0022%1
EMSG]
0022 §

PAGE 16-9

BIBIBLIBIR IR IR IARLAIARIAIAIAIANIAIANIANIAIAIAIAIAIAIA
LA

J 14

56054

56084
56074
56094
56104

6463

6457
6200*
6457
6457

—_———

4249
7241
9085

5849
7315
9223

7315
9087

7331
9223

7351
9388

4228%
42284
42288

7360
7399
4249

7390
7426
5851

42284
42284
6228%
42284
42288
4%%20

9405
4351
7169
5888
4249
gggg

9445
4400
7331
7241
9529
5851

FSPROT= 000021
FSPWR = 000017
FSRPT = 00001
FSSEG = 00000
F$SOF T= 000005

4228¢
42284
42284
42284
42284

7140

7146

7099

7130

FSSUB = 000002
FS$SW = 000014
FSTEST=
1

42284
42284
& ggl

€048

6072

7489

9388

FSSRV = 000010

GETCL

035310

GETPRM
GETRCL

034310
027074

GT:fi

GOOD
GT

42284

7
7641
7211
28

7446

49794

750

GTRAG
034766
GTRAS
0352264
GTREX
0404
GTRX2
040524
GTR9
0403
GTXRXB 034716
GSCNTO= 000
GSDELM= 00037,
G$DISP= 00000
GSEXCP= 000400
GSHILI= 000002
GSLOL
I= 000001

750;’

75154
7511
80394
804
7561
75014
42284
42284
42284
42284
42284
42284

75654
7655
72544
6237

8205
B4B5+
8970
9042«

8215
8487
8972«
9043+

8227
8489

5853
7342
9388

5857
7360
9405

5870
7374
9529

5875
7399

5855

9247+

937

8264+
8507
9008
9172

8266
8578+
9012
9174+

5880
7410

5884
7436

5888
7447

6048
7489

7099
7559

7140
7601

5888

6072

7559

7601

9073

9383+

9385+

5859

7390
9529

5873

5878

5882

5886

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

6246

7549%

841

8462

8592

8639

8363+

9303+

8258+
8503+
9003+
9167

7374
9445

7576
7669
7259
624

5850

9298+

8981
9072+«

8257+
8502+
8996
9086%

7410

7426

7447

7463

7489

7131

7241

L2288
7169
9071

8154+
B472+
8888+
9031

746
7351

924

8127+
B4S6*
8885
9029

7436
7342

924

8101~
B44b*
8793~
9028+

FSHARD= 000004
FSHW = 000013
FSINIT= %806
FSIMP =
50
FSMOD = 000000
FSMSG = 000011

42284
42288

6502

el iiall

FSCLEA= 000007
F$DU = 000016
FSEND = 000041

8 39'
9027«

9211+

77«
83%

6501+

FSBGN = 000040

784

8039+
75%
0
901

6495

FSAU_ = 000015
F$AUTO= 000020

7261+

50094
8274+
8590+
9014

6494+

007502

6487

007474

6486
775

FLAG

?470
598

FHDPLX

e
Hel o S

g‘g *
158

51104
46204

SEQ 0179

75104

7592

80124

8467

il
il
il

EVITMP 01
EXIT = 00005

PAGE 16-10

16=JUN-81 14:38

SESP
SRS
=

CZCLkB.P11

K 14
MACY11 30A(1052)
16=JUN-81
14:39
CROSS REFERENCE TABLE == USER SYMBOLS

CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST

Ta
CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST
CZCLkB.PN
16=JUN-81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS

MACY11 30A(1052) 1%~JUN-81 14:39 PAGE 16-11
8565
8565

9419
9419

9436
9436

7567

8441

8565

9438

9441

GSRADA= 000140

8565

b ol i

8565
8441
8441

9472

5420
9422

5375

5435
7376
9507

5748
9453

5861

7263

—r

SRR I

5414
7362
9494

4463
7317
9407

—

41
567
7567

GSOFF S=
GSOFS1= 000376
GSPRMA= 000001
GSPRMD= 00000

SEQ 0180

—

6323+
6337+
9072

6336+
6368+
9174

6342+
6376%

6366+
6410

6367+
6412

6374

6375+

6406

58574

58594

58704

58734

58754

58784

58804

(219}

7312

INVEC ~ 012400
ISR
= 000100
IXE
= 004000
ISAU_ = 000041
ISAUTO= 000041
ISCLN = 000041
ISOU = 000041
ISHRD = 000041
ISINIT= 000041
I1$MOD = 000041
ISMSG = 000041

6324+
6343«
9172

73904

7315

73314

58534

58554

58824

LR
MACY11 30A(1052)
16-JUN-81
14:39
CZCLKBO DMR,DMC=1 1 DATA COMM. LINK TEST
CZCLKB.P11 ~ 16=JUN=81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS

PAGE 16-12

SEQ 0181

42284
428N
4oo8K
4oo8%
42084
4oo8N
4oo88
42084
4oo8#
5098

7
7489

71314

604BF
7489
74898
S888
5664#

6072¢

90714

90734

9085#

7559
7410

7447

7601

9223

93884

KEYWD1

L7968

6244

6300

6304+

6309+

7583

7586

7588

7590

7593

7598

7602

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

61694

6184k
8501
8484

8585
8577
7255

7258

55014

6800

9254

7606

56654
7743w

776e

7753«

7755«

7757«

U
PR

7761x

7776

7795

7837+

784gs

7851+

LOGUNT

007460

LOOPS
003532
LOSDAM 025361
LOT
= 000010 G
LPO
014635
LPO0
014636

LP1

014645

014656

5018
86164
4599%
55264
4611#
4956H
4478#
61514
6147#
61434
61364
61554
6165
6126¢
6121#
6114
6196
6132
6177
6171
61164
61114
4989F

5
7220
8496
7936
86144
8635
5184
861
5323
6176
8376
8353
8347
8045
62024
8231
8214
€119
62004

6141
6181
6173
8270
8223
7052+

4909#4
5784#
44784
4909
55008

6801
9266

4911

55044

4910

S077
6797

491
491
46708
43064

55054
55064
B746

LSAU
LSAUT

4306
43064

7436

002036 G

LSAUTO

034646 G

034702 G
002070 G

4306#
4306

7254x

5503

LP3
014664
LPG
014677
LULOOP= 004000
LSACP
002110 G

LSAPT

8637
LU

5100

4509
61294
498%

73420

8749

KM
020313
LCLKEN= 000100
LGOVE
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
LOGRXa 026406
LOGS1
02661
LOGS2
027036
LOGS3
026642
LOGSs
026716
LOGSS
026742
LOGTXC 026370
LOGTXQ 026352

7913

7604

5099

003202

020307

90874

AN
e o .

KDZM

U -

ISPTAB= 000041
ISPWR = 000041
ISRPT = 000041
I$SEG = 000041
I$SETU= 000041
ISSRV = 000041
I$SUB = 000041
ISTST = 000041
JSJMP = 000167
KDPM
020303

N 14

002032 G
002011 G
0124;‘. G
002076 G
002060 G

43064
43064
4306
43064
43064

002124 G

4306

43334

4306

73994

002116 G
00
G
002034 G

43064
43064
43064

LSOUT

002072 G

43064

034674 G

54324

4306

LSOLY
LSDTP
LSDTYP

LSOV

73604

012410 G
002052 G

4306
43064

564124

LSHARD

046060 G

4306

94054

4306

4351#

4306

71654

4306

95284

4306

71404

43064
4306

70994

LSLAST

033746 G

002026 G

046442 G

LSLOAD
LSLUN
LSMREV
LSNAME
LSPRIO

002100 G
002074 G
002050 G
002000 G
002042 G

LSPRT
LSREPP

002112 G
00
G

LSPROT

LSREV
LSRPT

LSSPC
LSSPCP
LSSPTP
LSSTA
LSTEST
LSTIML
LSUNIT
L10000
L10001
L10002

033740 G

002010 G
033732 G

002056
G
002020 G
002024 G
002C30
G
002114 G
002014 G
002012 G
002150
025670
025716

022546

0007

026176

43064
43064
43064
43064
43064
43064

43064
43064

43064
43064
43064
43064
43064
43064
43064
4351
58514
58554

7255
44004

g So#

5888

58864

L10003

43064

LSLADP.

002104 G

LSINIT

002130 G

LSICP_

43064
43064
43064

LSHW

002120 G
002016 G
002022 G

43064
43064
43064
43064
43064

LSHIME
LSHPCP
LSHPTP

002044 G
002102 G
002046 G
002064 G
002066 G

LSENVI
LSETP
LSEXP1
LSEXP4
LSEXPS

LSOVTY
LSEF

LSDISP

43064

e L

L$CO
LSOEPO
LSDESC
LSDESP
LSDEVP

002106 G

034650 G

SEQ 0182

LSCCP

LSCLEA

PAGE 16~13

MmMemmmMmMMMMMMMMMmMmmmmmmmmmmmm

1
CZCLkBO DMR,DMC-11
DATA COMM. LINK TEST
MACY11 30A(1052) 16-JUN-81 14:39
CZCLxB.P11
16=JUN-81 14:38
CROSS REFERENCE TABLE == USER SYMBOLS

815

MACY11 30A(1052)
16=JUN-81
14:39
CZCLkBO M.MC-" DATA COMM. LINK TEST
CZCLxkB.P11
16=JUN-81 14:38
CROSS REFERENCE TABLE == USER YMBOLS
L10013
L10014
L10015

7315

L1001
L1001

03467
Og:
706

L10021
L100
L100
L

0446
0461
014771

046036
044626

RCLR= 20000

MLTYP

00747

MOBITE 010476
MOBITS 01
MOCHK = 000010
MODE
007504
MODES
003514

MODLOC=
MODREM=

MODS
MODTYP

MO%

014604

8}""2‘652‘
0027

mSGc

0o2

MSG1
MSG1C

mSG3C
MSGé

MSG4C

HSGzc
MSG

MSG6
MSG6C

fli-:t

93884

7544+
8747

7550
8759

7560+

8762

7829

7949+

7991+

7993+

7997+«

8891+«
7549

8975+

7618
7640

7925+
8591+

7928+

8638+

7933«
8779

7936+

7939+

7646
7654

7652

7767

7782

8024

8030

7539«

7806*

7874

7893+

7895+

7897+«

7899+

7807

7904

8255

7942+

7945+

7959

7901+

7903+

7906+

014575

MSGL IM= 0000
MSGTRN
5241
MSGTRU
15 73
MSGTYP 00741
MSGO

9223

014544

014554
014565

Mo¢
MSG

7331#

8837+
7543+
8241

010456
007470

MO1
nni

SEQ 0183

7976

MOMSGS 010476
MOP
= 000043
MOSC = 000056

MO0

PAGE 16=14

cel
1
1

223

1
224
160
324
162
16
164

790
&N

¢ 15

MACY11 30A(1052)
16=JUN=81
14:39
CZ2CLkBO DMR LHOMC-11 DMA Cm LINK TEST
16=JUN-81
C(ZCLkB.P11
14:38
CROSS REFERENCE TABLE == USER SYMBOLS

i
NOD1

uumog

g
010600

10664
10;:8
n
11564
11600

D
1152

011640

NOD107
NOD11
NOD110
NOD111

011644
010744
011660
011664

NOD113
NOD114
NOD115S
NOD116
NOD117
NOD12
NOD120
NOD121
NOD122
NOD123
NOD124
NOD125

011704
011710
011726
011732
011746
010756
011752
011766
011772
012006
012012
012026

Mmfli

NOD126
NOD127

NOD13

071670

012032
012046

010762

NOD130
NOD131
NOD132
NOD133

012052
012072
012076
012102

NOD135

012112

NOD137
NOD14
NOD140
NOD141

012122
010776
01 1;8
0121

NOD 134

NOD136

NOD14
NOD14
NOD 144
NOD145
NOD1
NOD14
NOD15
NOD150
NOD151
NOD152
NOD153

015106

015116

81 134
12140
81 154
012160
81517‘
12200
011002
012204
015510
012214
012220

e
RILERSR 4

NOD1
NOD1
NOD1
NOD1
NOD1

3‘!32

o
N,

NINININ
= NINININININININY =
oo
Wi
®»
L 3

NEW

73520

7352

8401

§235s

7982

PAGE 16-15

SEQ 0184

D15
14:39
MACY11 30A(1052)
16=JUN-81
CZCLXBO DMR,DMC-11 DATA COMM. LINK TEST
CROSS REFERENCE TABLE == USER SYMBOLS
CZCLKB.P11
16=JUN-81 14:38
012242
O1 %g%
012262
012266
011016
01 5310
012314
012336
012342
01 %346
012352
0 ;356

NOD170
NOD171
NOD1

027272
027276

NOD174
NOD175
NOD176
NOD177
NOD2

027316
027332
027334

NOD167

NOD1

NOD
NOD

NOD201
NOD
NOD203
NOD20%

027266

027
027314

010670
0110

0273

02
027370
027374

NOD205
206
NOD207
NOD21

7410
76412
7426
7430
11040

NOD21

7456

NOD210
NOD211

7443
745

20#
51 #
i:
4
654
24N
SH
o

LRLLLRRUp Anmans
g

NOD154
NOD155
NOD156
NOD157
NOD16
NOD160
NOD161
NOD1
NOD163
NOD164
NOD165
'@169

304
3

St
54
S6#

S7H

62584
So%

62614
S153#

5167#
62624

62654

66N
62674

62694
51684
44

724

NOD213
NOD214

027460
027462

627
740

NOD24
NOD25
NOD26
NOD27

011062
011064
011C70
011104

5171#
51754
51764
§1 78

NOD2
NOD2

NOD
NOD30

NOD31
NOD
NOD33
NOD34
NOD35
NOD36
NOD37
NOD4
NOD4O
NOD4T1

011044
011056

010672
011110

1694
51704

OM 1%6
011132
011150
011154
011172
011176
011214

1544
5178#
1794
1804
1814
1824
18
1844
1854

011220
011244

51864
51874

010706

51554

PAGE 16-16

SEQ 0185

—

CZCLkBO DMR,DMC=11 DATA COMM. LINK TEST

CZCLkB.P11

16=JUN-81 14:38

NOD4
NOD4

011250
011254

51884
518954

NOD45S
mg

011276
011310

51914
51924

NOD44

011272

NOD4
NOD5
NOD 50
NOD51
NOD52

NOD5

011314
010710
0113;2
=~

NOD54
NOD55
NOD56
NOD57

NOD6

0113
011340

011360
011362
011366
011404
011410

010724

NOD60
NOD61
NOD62
NOD63
NOD64
NOD65
NOD66
NOD&7

011430
011434
011440
011444
011450
011454
011460
011464

NOD70
NOD71
NOD72
NOD73
NOD74
NOD75
NOD76
NOD77

011470
011474
011500
011504
011516
011522
011536
011542

NOD7

NONE =
NOTNUF =

010726

51964
51564
51974
51984
51994

52004
52054
52064
52074
52084

51574

52094
52124
52134
52144
52154
52190
52174
5218#

5158#

52154
52224
52234
52244
52254
52264
52274
52384

45004
46134

NXMM
N10$
N100$

025310
010664
011314

57814
5151
5165

9275
51524
5168

N104$
N110$

011340
011362

5197
5170

51994
52054

5206

52084
52234
5181
5324
52254

5209
5271
52994
52964

N1028
N1118

011320

55854
45734
45854

51974

N1128
N114$
N1158

011366
011410
011500
011474

N1 1%

011516

5179
5322
5224

N1208
N121$
N1228
N1238

011664
012130
012160
012134

5207
5269
5297
5295

N1
N1188

011542
011564

SEQ 0186

CROSS REFERENCE TABLE =< USER SYMBOLS

51904

NULEVT 016250
NULL
=
NUM
= 000014

MACY11 30A(1052) 1E-Jlfl-81 14:39 PAGE 16=17

52064

5222

5225
5238

5162

6434

5165

5166

5176

5215

5217

5223

5296

5185
5331

5187

5190

5192

52228

5227

5239

5275

5277

5279

5281

5288

52954

5305

5304

5226
52404

51964

5183
5326
52384

52654
5273

5241

5262

5320

OPCNT
OPEND
OPRMM
OPRMSG=
OPTN
OPTYP

002166
002646
014764
000015
046272
012406

Soe%

$=5283Tes
LIXRITLS

5223

5283

5296

53364

51714
5261

5175
5265

5176
5286

5177
5299

5188
5303

5191
5304

5196
5308

51 99
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

h=3

R DBER

b b d ek ) = = =

—

PONINY = =

ol
S2BRRBIFE

35030

NN NN

NW-‘O*‘OOOO wi

—s

3
e ca Y = — =3 A NN NN N
VIR
=
i
wvinwnunon =
0NON
PNINIA) = =

AV AV LV AV AV LV, IV, )

5217

SEQ 0187

PAGE 16-18

b b a2 )

002520
002524

-l

OPBFPT
OPBUF

011002
010672
010710
010726
010744
010762
011434
011440
011444
011670
011710
011732
011752
011772
012012
012032
012052
012076
012102
012112
012116
012126
011064
011070
011132
011154
011176
011220
011250
011276
007424

NO == b

N4OS
N42$
N43$
N44S
N4SS
N46S
N50%
N51$
N52%
N60S
N61$
N62$
N63$
N64S
N65$
N66S
N67$
N68$
N70$
N71$
N72%
N73$
N8OS
N81$
N82$
N83$
N84S
N85$
N86S
N87%
OFSET

012356
012200
011604
011624
011644
012214
012220
012246
012266
012314
012342
011022
011044
011062

Pl A

N125%
N1268
N130$
N131S
N1328
N1408
N1418
N142%8
N1438
N144S
N1508
N2O$
N25$
N30$

Vit
i
i
i
i

F 15
16=JUN-81
14:39
MACY11 30A(1052)
CZCLkBO DMR,DMC=11 DATA COMM. LINK TEST
16=JUN-81 14:38
CZCLkB.P11
CROSS REFERENCE TABLE == USER SYMBOLS

G 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

9008
9171
924;
92254
P
93034

OTINT = 000002
OUTHDL 04
OUTHEX 04
OUTH1
04
045614
ouT
0456
04
04

9086
92104
9248

000002
000042
000030
002650
002651
00265
00265
007462
014726
001600
000111
015516

PMS
PNCK

014745
014724

PNE C
PNMS
PNST
PNT
=
PRI
=
PRIOR
PRIOO =

5877

014734
014743
014713
001000
002C00
046244
000000

PRIO3 = 000140

PRIO4
= 000
PRIOS = 000240

= 000

PRIO7 = 000340

PRNT = 000055
PROEM
025270
PROTO = 000041

9373

9301

93064

8329
8255

8447
8272

7552

7831
8560

9109+

9153«

9210+

5877

014736
040664
0460664
040700

PRIO1 = 000040
PRIOZ2 = 000100

106

7546%

(alalalalalalal~ BNAT~

PEC
PLCK
PLCK2
PLCK3

9211

7312

OSGNSW=
O$POIN= 000001
O$SETU= 000000
PARAM
007476
PAS
=
PASC
=
PASMOD=
PASS1
PASS2
PASS3
PASS4
PCADD
PCK
PCLKCT=
PCLKEN=
PCPM

9167
9384
9293

SEQ 0188

PAGE 16-19

44784
5156
9278
7979

7372
7588

7757

7947
8614+

7958+

7963+

7981+

7984+

8014

8098+

H 15
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
PSCNT
PST

007376
014715

49564
55084

8041+
6806

8399+

8402

PIRTAB

006362

4932

6739

6744

7518

7616

7645

PSBUF A
PSCNT oosssz

417k
49204

6o29e
7002+

6863
7009

7368
7066+

7073+

7078

PSGDBD

4oour

62zl

PTREND 007332

493

PRACT

410

003550

PSEXIT

032760

003561

PSNNUF

003560

PSNUM

003554

PSRADX

003556

PSTREE
PSTRV
PSTRS

003546
032642
032652

QCOPY = 000013
QRX
= 000004
aTX

= 000010

QUALFG
QUALVL
RDI
=
RDO
=
REC
=
RECMOD=

003204
003206
000200
000200

RESTRT

000031
030574
027046
007466
034242

RHLPTB
RHLPO
RHLP1
RHLP2
RHLP3
RHLPG
RHLPS
RHLP6
RHLP7
RI_
=
RMDLOP=
RNOTNF=
RPASS
RPBASE
RPEXT =
RPHLP =
RPLOG =
RPSWE =
RPSWF =
RPSWO =
RPT
RPTAA

003230
014020
014057
014102
014135
014166
014220
014257
014316
000200
000047
000007
007500
030336
000002
000001
000003
000004
000005
000006
030642
030712

REPLOG
REPORT
RESFLG

RHLPEN

003246

6868

7%2'

6g31e

6%03¢

6910

7792

7799

8022

6925+

6930

6938

6984r

7022+

7565+

7573

7866+

7915+

6292+
8006+

6351+

6417+

7566+

7577

7740%

7762%

7775+

779%+

7842+

7835
6972+

6370

7841
6979

6372

6378

6380

6997*

7000%+

7002

7003+

7005+

B1S4

8205

8227

8257

264

8275

872

8507

8620

8885

8578

85%0

7009+
49228

7011+
6962%

7017+
6965+

458K
4su8y

5299
BO77

6230*
6864w
6876

7781

6360

6239
7948+

49184
6233
68674

7766

6932

6225+
7929+
6357

SEQ 0189

697

4923
7921%
49218

7570w

PAGE 16-20

6359

6362

6866
7572
689

7569+

7858
8127

7863
7007

7868
7015

7870

7988

6901

dscow

8101

8150

8215

8258

8266

8274

8283

8485

8489

8502

4798#
47998
4666¢
466784
44928
45984

6232+
7633%
9115
9212

7571%
7667

7855+
7852+

7858+
7870%

7861
7871%

7953

7956

7964s

7982

7985+
:

6308

6217#
4992#

7205

4B17#

48104
54764
4810
4811
4812
4813
4814
4815
4816
4651#
4612#
46298
S008#
6330
462N
46238
46254
4626#
46278
46284
5121
64524

5182
6428
7113
7201*
7221
€298

6296
6222
54774
54784
5479
54800
54814
54824
54834
505
532
6262
6139
6347
6244
6254
6260
6265
6267
6271
64378

9306

7758
7213+

7230

7510
7238

72434

6264
7545+

6269
7551

7557

7763

7830

7988+

6258
6256

6304
6300

6465

6472

6483

6489

6496

6504

6381

6309

64034

8405

8407+

RPTO
RPT1
RQI
RSELG
RSEL6
RTS
RUN

030706
030674
000040
045706
045710
0

RPTTXQ

RUNSBM

031014

025437

RXBIT =
RXBUF
004562
RXC

RXIDM
RXMTOT
RXM1
RXM2
RXNC
RXONLY
RXON2
RXPTR

025461
007370
025561
025
025541
040572
040572
007332

R10$
R11S
R12$
R1258

027272
027
027316
027462
027334
027350

RXQ

R138
R14$
R158
R16%
R17¢
R30$
SCM
SCMD
SCML

PAGE 16-21

SEQ 0190

64994

5116
6448

64604

9304*
9305+
7590

8473
6170

8493

8076

8333

8033+

8050

6270

62734

8708+

8724

8520

8527

8126

8153

8331

8749+

8987

9110+

9115

9120

9160

9121

9212

9215

9225

9251

8892+
8778+

8976+
8786+

9299
8788

9304
8838+

8893+

027370

027412
027430
027460

SDVE
Sbvi
SECRM
SELO

020047
020102
020671
020036
20060
020135
12360

SEL2

012364

7280+

8745+

SEL4
SEL6

012370
012374

7284+
7288+

9229

8739+
8741+
9305

7583
7606

7913

020113
SEOP
SETET = 000060
SETEXP= 000010

———————————)

115

16=JUN-81
MACY11 30A(1052)
14:39
CROSS REFERENCE TABLE == USER SYMBOLS

N = =2 NY = NOND

1
01062
gl1
1;
014
031442

N—

RPTDLE
RPTDSP
RPTDVI
RPTEOP
RPTIV
RPTMSB

UN-81 14:38
ViAW
S
R
Y

T g
RPTDER 8 1222

1 DATA COMM. LINK TEST

2R P o eT O

—_—

CZCLkBO DMR, DMC
CZCLkB.P11

8891
8758+

—

7604
7821

7746

7553

7832
7861

7776

7795

£
R

3&»

8 SRR

7851

7855

SvCsuB= 000001
SVCTAG= 000C01

SVCTST= 000001
SSLSYM= 010000
S1
Si

S
Sé

TABEX

TAL

034024
034100
01516

= 000005

TALAOD= 000055

TCURAD

58594
74634

007360

58784
84414

7654

8587

8589

7532

7626

7631+

7802+

58824
85654

SEQ 019

PAGE 16-22

J 15

MACY11 30A(1052)
16=JUN-81
14:39
CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
16=JUN-81 14:38
CZCLKB.P1T
CROSS REFERENCE TABLE == USER SYMBOLS

K15

CZCLKBO DMR, M(
=11 DATA C% LINK TEST
MACY11 30A(1052) 16~JUN-81
14:39
CZCLkB.P11
6=JUN-81
CROSS REFERENCE TABLE == USER SYMBOLS
TEMP

007426

6123+
567+
823+

49714
6187+

gSSg'
®

TEMP1

007430

TEMP2

007432

TEMP3

TEMP4

61?1:

49724

PAGE 16-23

6145+

TRVOCT 033174
TRVSPA 033110
TRVSTR (033642
TSEL4
045702
TSEL6
045704
TIL
= 000001
TTLLOP= 000044
TTOTCC 007356

8777

8836

6605

6611+

6613

6924

6929

6935

6958

6157+

6170

8251

6186
6803
8526+

77se

serst 840

6135+

6144

6152+

6156+

6183

6409+

6414

6414
8249+
8628+

6656+

83?5'
8999+

6802+
8402+
9018+

6803
8474+
9033+

6814+
8481+
9119+

6817+
8495+
9158+

6408+
8339+
8575+

6414

6797+
8403+
8619+

6800+
8441
8629+

6803
8442
8724+

6148+

8723+

007436

TEMPS
007440
TIMERS 007546
TIMER]1
007542
TIMER2 007544
TIMMIN 007534
TIMOM
025413
TIMSEC 007536
TIMTCK 007540
TM
= 001000
TOINOT 044204
TOIN1
044266
TOIN2
044352

6153+
6654+
8246+

6149+
53
883

5885

007434

SEQ 0192

8584+

9378+
6194
9121~
9276

8346+
9159+

9281

8355+
9216+
9284

9287

8361
9232
9379+

9112

9154+

9155

9371+

9375

7638

7666

8974

91534

9164

9369

6615+

7515+

7608+

7609

7630

7637+

6934

6937

6957

7018

7036

7057

7081

6940

6959

7023

7038

7059

7085

7019

7037

7058

7613

7630

93084
93094
7608

7798+

L 15

16=JUN-81
14:39
MACY11 30A(1052)
CZCLKBO DMR,DMC-11 DA TA COMM. LINK TEST
1 14:38
CROSS REFERENCE TABLE == USER SYMBOLS
CZCLkB.P11
TXBUF
003
TM@C_
= 00000

TXMTOT

007354

TXPTR

007334

DOWY 406ss
TN
04063
TMXQ
= 000000
TS$ARGC= 000001

TSCODE= 005032
TSERRN= 000023
TSEXCP= 000000
TSFLAG= 000040
T $SGMAN= 000000
TSHILI= 000007
TSLAST= 000001
TSLOL
I= 000000
T$LSYM= 010000

TSLTNO= 000001
TSNEST= 177777

000000
T$SAVL= 177777
T$SEGL= 177777

T$SUBN= 000000
TSTAGL= 177777
TSTAGN= 010024

TSTEMP= 000C00

‘$TEST= 000001

T$TSTM= 177777

45334
49454
57924
501

6731
6118
6751
8492
80984

7529

7801

8494

7535«

7615+

7617

7632+

6744
g?gg'

6746%
8099

6747
8125

6756+
8151

6758

58504
62414
65024

58544
62978
65154

58584
63594
65304

75488
1
72378

7575
84614
7567K

7579
85344
844N

72378
72614
2288
72374
95284
72378
4400
7426

75678
7315
7237
75678

B441A
73744
75674
B441A

75678
5851
7463

B441A
5855
9073

L2498
58
73514
94054
9529
4400
58844
7390
9073

43514
58824
73604
9445

44004
58844
3904
95294

58514
60484
746264

58494
5886
7399%
90854

5851
60484
7426
9087

5855

83524

SEQ 0193

PAGE 16-24

7793

83754

8100

8124

8150

7624+

7625

7629+

7799+

58854

61804

68414
78244

69834
78654

61834
64714
70214
78904

62224
64874
72404
79614

9414
90374

91244

91634

92194

6072

7131

7331

7351

58734

90734

71694

9085#

58754
73314
90874

58754

5878
73424

58804
7351

58594

71404

90714

5873

71694
9445

7463

58704

71464

7331

74894

43514
3604
44004
72378
76014
95294
74894
5850
5882
6434

58494
73994
58514
726414
8441w

58534
74364
58554
73154
B565#4

9528
5851
5885
6455

5854
5889
645

7611
8375
9022

7620
8441
9037

7640
8461
9114

6570
7223
7372

961
32
7374

6803
7237
7390

58804
94054
58824
73904

7165#

71314
75594
94414

g__-

TA COMM. LINK TEST
CZCLKBO ?m D?C 1 DA

6=JUN-81

CZCLkB.P1

T$TSTS= 00000 1

4:38

42284

Mm15

MACY11 30A(1052)
16=JUN-81
14:39
CROSS REFERENCE TABLE == USER SYMBOLS

PAGE 16-25

7463
7390
7426

58574

5859

90714
7601

9073
9223

90854
9388

9087

58704

5873

58754

5878

58804

5882

5884#

8526

51604
51764
5
52264
32
52814
529
53254

52134
52384
52704
22830

232
S48

pry

7331
5855

—

020273
041132
041220
041216
041156
041270
046211

58534

]

UNKM
UPTABL
UPTAT
UPTA3
UPTAL
UPTEX
xECTOR

010012
010011
010022
010020
034710
000200

TSSPRO=
T$$RPT=
T$$SRv=
TSSTES=
T
UAM
=

7315

T$$MSG= 010007

62624

X$ALWA= 000000
X$FALS= 000040
X$OFF
S= 000400
X$TRUE= 000020

SPATCH 046356
.
= 0466442

4894

51844
52704
56254

7410

49304
51974
52744
5
7559

49314

52764
5888

7601

50404
22240
9519#

SEREN YIEIVES

7205

7210

7556

5853

5857

5870

5875

5880

5884

7203

SEQ 0195

PAGE 17
:

RuR

VU’O—'OBO‘

000000
N0 =

wvivawnunawn

9071

PPN
= —d -2

b
d
b

b
e
—

NB
W=

B8COMPL
BERROR
BGNAU
BGNAUT
BGNCLN
BGNDU
BGNHRD
BGNHW
BGNINI
BGNMOD
BGNMSG
BGNPRO
BGNPTA
BGNRPT
BGNSEG
BGNSET
BGNSFT
BGNSRV
BGNSUB
BGNSW
BGNTST
BNCOMP
BNERRO
BREAK
BRESET
CKLOOP
CLI

N15
MACY11
30A(1052)
16=JUN-81
14:39
CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
CROSS
REFERENCE
TABLE
==
MACRO
NAMES
P11
16=JUN-81
14:38
CZCLkB.

5329
6264
CLOCK
CLOSE
CLRVEC
COMMEN
DELAY
DESCRI
DEVTYP
DISPAT
DISPLA
DOCLN

DORPT
ENDAU
ENDAUT
ENDCLN
ENDCOM
ENDHRD

ENDINI

8 16
MACY11 30A(1052) 16=JUN-81 : 14:39
C2CLkBO DMR,DMC=11 DATA COMM. LINK TEST
6=JUN-81 14:38
CZCLkB.P1 1
CROSS REFERENCE TABLE == MACRO NAME

4874
124

;?Ez

5855

5859

5873

5878

5882

PAGE 17-1

SEQ 0196

5886

/130

6072

9073

“n

R
e TRt e

8465
8352

8366

8375

8728

9223
5888

7241

7315

7374

7410

7237

7567

8441

8565

9437
72374

75674

84414

85654

73744
L4
8714
64340

Pacon

58594
93884
418
8594
94454
84654
MS$ESCS

9022

9037

7447

7559

7601

9438

9441

7554
94364
58774
64634
70214
80054

9124

9163

9219

9292

35730

0
&315
76114

58824

71464

73514

94364
58824

73314

90054

91634

61834
86154

92924

CZCLKBO DMR,DMC-11 DATA COMM. LINK TEST

CZCLkB.P11
MSEXCP

MSEXIT
MSE XSE
MSEXTJ
MSGEN

MSGENB
MSGETS

MSGETT
MSGNGB
MSGNIN

MSGNLS
MSGNSU
MSGNTA
MSGNTE
MSHAPT
MSHNAP

MSINCR

16=JUN-81 14:38

21014

1
228
1

MSMCHI

MSMCLO
MSMSK1

M$POP

MSPRIN

MSPUSH

MSPUT

4
L228N
4
4

314
90854
19384
354
3904
18774
19024

;0
90874
42284
42288
74264
42284
4228¥¢

b3
93884
62284
44
74
S
4249W

2049#

4228«

75488
8904
87284
93724
19134
18984
18904
764268
1894#
17394
18244
20264

7555
79614
89914
93884
42284
42284
42284
74634
42284
42284
42284
4228F

62224

284

60484

58734
62414
65304
72064
72994

58724

S8764
62974
65644
72074
73114

S8734

L2284

18814
73908
16364
62414

65304
7
16314
73420
19728

42284
42284

42284
74268
42284
w

6404
42288
7

4228¢

90734

73514

5872#
62

92924

S875#4

89954
94054

16244
16774

58704

72374

44004
90734
748
43064
43064
42494

89914
93884
42284
42284
4228#

58534

70994
75674

75564
BOOS#
89954
94054
6228«

87284
93724
17004
19424
16714

944N

S8774
635
65684
72094
12#

65154

71
73144
75484
79614

374

72614
72614

SEQ 0197

PAGE 17-2

71404

65024

76w
73124
75084
78904

MSIOSE
MSLDRO
MSMASK

€16
14:39
MACY11 30A(1052) 16=JUN-81
S
CROSS REFERENCE TABLE == MACRO NAME

72024
73154
75554
80054

72024

44004
74634
58504
63594

9568’
544
4240
73994
58504

73314

7351#

220

62364
S15#

65024
75794
86334
716404
62224

611#

7165

62364

MSPUTT

62590

zgSOO

‘2;93:

6114

65304
Z‘S’{Ssz

9
8233'

19814

62414
65304
;2%5:

9
6114

6LOSH

922%
58544

6L14N

104
6404

58584

G4L34N

?G(Bl
654
58714

G4SN

414
7504

SB?SA‘

645TH

69834
7824m
58764

94330

0214
78654

58774

9‘70’

S‘Ol
78904
58910

9471#

64874

58854

61804

2994
#

73114
80054

SOF
95680

GLOSH
65704

GLI1LN
104

GL3LN
68034

6452K
41N

64STH
69834

94630
0214

94 ¥
5400

64714
%290
1#

80054

76204

6408

76544

7504

7824w

78654

78904

874
3114

75678

BLLIN

BS65H

941X

94364

937K

943BK

944N

MSRNRO
MSSETS

19624
20328

42284
4228

174
42494
O

75;3’
43514
74368

75280
5B4OM
76489%

58534
90714

58574
90854

58704
94054

58754

58804

58844

60484

42284
5 pL4
64LSTH
69834
7

58504
58864
3463'
70214
73114

28510
58884
704
1314
73124

58554
61 83#
?‘87’
#
1
75758

58714
364
154
75090
728

58724
3L
9
751 7h
Lit

S8734
58764
w6359
64N
72238
72324
904
74104

4228+

58504

58864
704
71314
73124

58514

58584
62224
9‘
7‘3’2‘0
14
75794
8375
9144

SB594
28#
9 024

755
8018+
9005

58544
61 y
1
1994
7314m
75678
8355
90&'

61804
78
1994
73144

61834
874
7;0;‘
1

62224

284
9 024

36#
154

”»

90224

90374

91144

1244

1634

91664

58854

58864
64704
71314

284
9 0x
75260

MSSTAR

M$SvC

MSTLAB

75484
79614
8991

58824
64578
69834

58854
GLO3N
70214
73114

19294

90054
19214

58824
64574
69834
7
75594
80184

M$WORD
MSXFER

NODCL

OPEN
POINTE
PRINTB

4228#

7508#
7
8728

7559%
80184
MSTSTL

17334

19334
58824
64528
68414
72584

7237

&»H

6228@

42284

20774
s

MSRAD]I

90054
83524

Q619F
16824

42614
5165
5183
5205
5224
68
5283

6253
6268
11714
11764
1239%

75674
83524

42284

70214

73118
75678
83524

90224

75554
80054
89954

757

58504

73124
75754

90374

75794
83754
58514

91144

9124M

1634

73144
75794
83754

94364
42284

937K

42284
4228¢

58554

62224

43334

5151
5166
5184
5206
5225
5269
5286
5305
6254
6269
42284

58544

76118
36610

61834
87#
rid

43064
B3754

76014
41n

58554

61804
E471N
71994

42288

83664

B44LIN

154
76014
84414

&
76114
614

58584

76208
84654
58584

73514
76014
3“10
1
5859

728

76408
85

7611m
84614
92163
58714

“1¥

SO%
65684
7232
74264

64054
65704
72374

9 ;i:

63594
65684
72324

58 ;l

”

234

775
154

58714

58724

92234

6‘;’36'
9 154

414
304
72174

oH
76408
35340

2
7654m
5654

72378

72618

7315h

194

76544
85654
92234

7654
85654

1L
7625
356

1664

76404
8534m
9219

751 B

92194

58594

7622'

5230

§Z3I

08
77504
86154
92924

7374M

58734

74268
7824M
86334

93724

74108

58764

87194
58764

64054
9570’
2374
74634
78654
87194

7447H

B46SH

%41

BS5654

B7284

89914

90054

90224

90374

91244

515
516
5185
5207
5226
5270
5287
530
6255
6270

5153
5168
5186
5208
5227
5271
5288
5319
6256
6271

5154
5169
5187
5209
5238
5272
5289
SS%O
gs 7
72

5155
5170
51
521
523
g 73

5 g‘l
62
627

156
171
5189
5213
g 40
74
5291
5 gg
6%
6274

157
175
190
14
g 41
75
5 §
532
60

2158
176
5191
551 5
5256
5276
5295
5324
6261

5159
5177
5192
S§1 6
5257
5277
5
5325
6262

5160
5178
5199
521
5258
5278
5297
5326
6263

5161
3179
5197
5218
5259
5279
S§98
5329
6264

4286
5850

5854

5858

5871

5872

5876

5877

5881

5885

e———

6%410

PAGE 17-3

D 16
CZCLKBO DMR,DMC=11 DATA COMM. LINK TEST
MACY11 30A(1052)
15=JUN-81
14:39
CZCLkB.PN
16=JUN-81 14:38
CROSS REFERENCE TABLE == MACRO NAMES

’

CZCLKBO DMR,DMC-11
DATA COHH LINK TEST CROSS REFERENCE
MACY11 30A(1052)
15-JUN-81 14:39 PAGE 17-4
16=JUN-81 14:38
TABLE == MACRO NAMES

SEQ 0199

CZCLkB.P11

PRINTF

1279

PRINTS

1319#

READBU
READEF

PRINTX

RFLAGS

SETPRI
SETVEC
SLASH
STARS
SvC
XFER
XFERF
XFERT

g%8

180
24
801

6183
7508
8461
6452

ng
754
8534
6457

gSg
757
8615
6463

7204

7206

7209

8’

6434

13994
14034

42284
42284

;%gg

14134
14184
16240
16388
164528
16120
16164

4228¢
42284
42284
42284
4227k
42284
42284

7314
7299

7372
7311

7312

4228
SB8BBN

7241

7315

1359#

1408¢

16204

42284

7374

42284

L4
. ABS.

046442

ERRORS DETECTED:

000
O

CZCLKB/1,CZCLKB.SEQ/CRF/DOC=SVC34R.MLB,CZCLKB.P11
RUN-TIME: 24 30 3 SECONDS
RUN-TIME RATIO: 68/59=1.1
CORE USED:

21K

DOCUMENT PAGES:

(41 PAGES)

199

§41
7579
8633
6470

6297
7611

359
620

05
640

14
654

6564
7750

6568
7824

6570
7865

6610
7890

6471

6487

6495

6502

6515

6530

6803

6841

74108

7447H

75598

76014