Digital PDFs

AH-T017A-MC

July 1982

207 pages

Original

9.7MB

view download

OCR Version

8.6MB

view download

Document:	CZKMUA0 KMS-BL KMS11-BL PDP11 DCLT JUL 1982 bw
Order Number:	AH-T017A-MC
Revision:	000
Pages:	207
Original Filename:	CZKMUA0__KMS-BL__KMS11-BL_PDP11_DCLT__AH-T017A-MC__JUL_1982_bw.pdf

OCR Text

KMS11-BL

A H -TO17A-MC
Bl CHE 1 OF 1

PDPL1

CZKMURO-

fan- ¥

JUL 1982

COPYRIGH TS

#aoe v usa

1982

JEREAIE

CZKMUAO KMS11-8BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)
.TITLE

%%8;

09:15

30-MAR-82

PAGE 2

CZKMUAO KMS11-BL PDP=-11 DCLT

-REM ¢

IDENTIFICATION
PRODUCT CODE:

AC-TO15A-MC

PRODUCT NAME:

CZKMUAO KMs11-BL PDP-11 DCLT

PRODUCT DATE:

MARCH~1982

MAINTAINER:

MERRIMACK DIAGNOSTIC ENGINEERING

AUTHOR:

GLORIA MEREDITH

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUTY
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
SOFTWARE ON EQUIPMENT THAT IS NOT
AFFILIATED COMPANIES.

THE USE
SUPPLIED

OR
B8Y

RELIABILITY OF
DIGITAL OR ITS

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:

DIGITAL
DEC

PDP
DECUS

UNIBUS
DECTAPE

MASSBUS

SEQ 1

CZKMUAQ KMS11-BL POP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 3

REVISION HISTORY:

REV

DATE

AUTHOR

REASON

24-MAR-82

G. MEREDITH

ORIGINAL ISSUE Or
KMS11-8L PDP=11 DCLT

SEQ 2

MACY11 30A(1052)

CZKMUAQ KMS11-BL PDP-11 DCLYT

CZKMUA.Pi1

30-MAR-82 09:13

30-MAR-82

09:15

PAGE 4

TABLE OF CONTENTS

GENERAL INFORMATION

0
1 1
1 2
1 3
1

4
5

PROGRAM ABSTRACT

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

OPERATING INSTRUCTIONS

2.0

COMMANDS
SWITCHES
FLAGS
HARDWARE QUESTIONS

2 .1
2 .2
2 .3
2 4
2 5

DATA COMM. LINK TEST COMMAMDS
1
2
.3
.4
5
6

STATISTICAL COMMANDS
RUN COMMANDS
DEFAULTS
PRINT COMMANDS
MISC COMMANDS

QUICK STARTUP PROCEDURE

2.6

ERROR INFORMATION

3.0

TYPES OF ERROR MESSAGES
SPECIFIC ERROR MESSAGES

3.1
3.2

COMMAND LINE INTERPRETER ERRORS

3.2.1

DCLT ERRORS
DEVICE EPRORS

3.2.2
3.2.3

4.0

PERFORMANCE AND PROGRESS REPORTS

4. 1
2. 2

PRINTING EVENT LOG

OPERATOR STATUS MESSAGES
PRINTING KMS11 BASE TABLE

4 .3.1
4 .3.2
4 .3.3

5.0

MESSAGE COMMANDS

PRINTING ERROR COUNTER LOCATIONS
PRINTING ENTIRE BASE TABLE
PRINTING SINGLE LOCATION

DEVICE INFORMATION TABLES

SEQ 3

MACY11 30A(1052)

CZKMUAO KMS11-BL PCP=-11 DCLT

30-MAR-82 09:13

09:15

PAGE 5

MODE AND MESSAGE CESCRIPTIONS

6.0

MODE DESCRIPTIONS
GO NN
NN —

o
&
&

b e

b wnd cmd

6.1

CZKMUA.P11

30-MAR-82

TRANSMIT MODE
RECEIVE MODE
PASSIVE MODE
ACTIVE MODE
DOWN-LINE LOAD MODE
TALK MODE

LISTEN MODE
MAINTENANCE MODE

MESSAGE DESCRIPTIONS
7.

OTHER INFORMATION

INTERFACING TO AN '‘ITEP'' NODE

TROUBLESHOOTING HINTS

2
7
7
4
7
7

2
3
&

7.3
7.3.1
7.3.2
7.3.3
7.3.4
7.3.5
4

INTERNAL LOOP AT EACH NODE

TRANSMIT ON ONE NODE-RECEIVE ON THE OTHER
ONE NODE ACTIVE-THE OTHER NODE PASSIVE

BOTH. NODES ACTIVE

TALK AND LISTEN MODES FOR COMMUNICATIONS

EXAMPLES
.OF COMMANDS
MESSAGES COMMANDS
STATISTICAL COMMANDS
RUN COMMANDS
PRINT COMMANDS
EXIT COMMAND

THINGS TO WATCH OUT FOR

SEQ 4

CZKMUAO KMS11-BL PDP-11 DCLT

30-MAR-82 09:13

CZKMUA.P11

MACY11 30A(1052)

1.0

GENERAL INFORMATION

1.1

PROGRAM ABSTRACT

30-MAR-82

09:15

SEQ@ 5

PAGE 6

THIS DCLT (DATA COMMUNICATION LINK TEST) PROGRAM IS MEANT T0
PROVIDE FIELD SERVICE WITH A TOOL TO MAINTAIN POINT TO POINT
COMMUNICATION LINKS BETWEEN KMS11-8L OR KMS11-8M AND OTHER
DDCMP SUPPORTED STATIONS. THIS DCLT PROGRAM WILL PROVIDE THE
COVERAGE NECESSARY TO DETECT FAILURES OF THE COMPUTER EQUIPMENT,
THE COMMUNICATION LINK, OR THE MODEM.

)

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH TRE DIAGNOSTIC
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE

THE INTERFACE TO THE OPERATOR AND TO THE SOF TWARE ENVIRONMENT.
THIS PROGRAM CAN BE USED WITH XXDP+, ACT, APT, SLIDE AND PAPER
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER
TO THE XXDP+ USER'S MANUAL (CHQUS?.SEQ WHERE ? IS REV. LEVEL OF
THERE IS A BRIEF DESCRIPTION OF
THE MANUAL).
THE RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT.
1.2

SYSTEM REQUIREMENTS

IN ORDER TO RUN THE KMS11-BL DCLT PROGRAM, THE FOLLOWING

MINIMUM HARDWARE IS REQUIRED:

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

A WORKING, LINE OR REAL-TIME CLOCK
A CONSOLE TERMINAL

ANY XXDP+ SUPPORTED LOAD MEDIA

A KMS11-BL OR KMS11~BM REMOTE SINGLE LINE DDCMP

1.3

RELATED DOCUMENTS AND STANDARDS

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

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P11

30-MAR-82 09:13
1.4

MACY11 30A(1052)

30-MAR-82

09:15

SEQ 6

PAGE 7

DIAGNOSTIC HIERARCY PREREQUISITES

THE GOAL OF THE DATA COMM. LINK 1EST PROGRAM IS TO TESi THE
COMMUNICATION LINK AND THEREFORE ASSUMES THAT THE CPU'S,
g%gfik§és?gg DDCMP DEVICES 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 DDCVP DEVICES BUT TO TEST THE COMMUNICATION LINK TO

WHICH THEY ARE CONNECTED.

1.5

ASSUMPTIONS = RESTRICTIONS

IT IS ASSUMED THAT THE KMS11 COMMUNICATIONS DEVICE 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 KMS11 SUPPORTS DDCMP OPERATION IN THE FIRMWARE,
THE PDP=-11 DCLT 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
BECAUSE OF THIS PLEASE BEWARE IF
(AKS, NAKS,....) BEING TRANSMITTED.
IF YOU ARE SCOPING DATA.

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P11

30-MAR-E2 09:13
2.0

MACY11 30A(1052)

30-MAR-82

09:15

SEQ 7

PAGE 8

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
CONTINUE
PROCEED

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

EXIT

ADD

DROP

PRINT
DISPLAY

FLAGS
ZFLAGS

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

ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE
CONSIDERED TO BE ACTIVE AT START TIME
DEACTIVATE A UNIT

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

TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3)
CLEAR ALL FLAGS (SEE SECTION 2.3)

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

SWITCHES

THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION.
THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL
o
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 TESY
NUMBERS, FOR EXAMPLE = /TESTS:1:5:7-10,

THIS LIST WILL CAUSE TESTS 1,5.7,8,9.10 TO

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

JUNITS:LIST

BE RUN.

ALL OTHER TESTS WILL NOT BE RUN.

EXECUTE DDDDD PASSES (DDDDD = 1 TO 64000)
fsrsggggézxsosancs. FLAGS ARE DESCRIBED
REPORT END OF PASS MESSAGE AFTER EVERY

DDDDD PASSES ONLY. (DDDOD = 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)

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

PAGE 8-1

09:15

EXAMPLE OF SWITCH USAGE:

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

DROP
ADD

DISPLAY
FLAGS

ZFLAGS
EXIT

TESTS

PASS

FLAGS

EOP

UNITS

X
X

X
X
X

X
X

X
X
X

SEQ 8

CZKMUAC KMS11-BL PDP=-11 DCLT

CZKMUA.P11

30-MAR-82 09:13
2.3

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 9

FLAGS

FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS
ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE
FLAG SWITCH. THE 2FLAGS 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

HOE
LOE
IER*

IBE*
IXE*

PRI
PNT
BOE

UAM
ISR

IDR

ADR
LOT

EVL

EFFECT

HALT ON ERROR = CONTROL IS RETURNED TO

RUNTIME SERVICES COMMAND MODE
LOOP ON ERROR

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 DJAGNOSTICS WHICH DO NOT SUPPORT
STATISTICAL REPORTING)
INHIBIT PROGRAM DROPPING OF UNITS
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 EXAMPIE,
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: JER:BOE

SEQ 9

CZKMUAO KMS11=BL PDP=11 DCLT

CZKMUA.P

30-MAR-82 09:13
2.4

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 10

HARDWARE QUESTIONS

WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT

THE USER FOR HARDWARE INFORMATION BY TYPING °'CHANGE HW () ?*

YOU MUST ANSWER ''Y'' AFTER A START COMMAND UNLESS THE HARDWARE
INFORMATION HAS BEEN ‘PRELOADED'' USING THE SETUP UTILITY (SEE
CHAPTER 6 OF THE XXDP+ USER'S MANUAL). WHEN YOU ANSWER THIS
QUESTION WITH A “'Y'', THE RUNTIME SERVICES WILL ASK FOR THE NUMBER

OF UNITS (IN DECIMAL).

THE KMS11-BL DCLT PROGRAM WILL NOT USE MORE THAN ONE UNIT.
THE HARDWARE INFORMATION REQUESTEN WILL BE:
# UNITS (D) ? 1<CR>

UNIT O

FULL DUPLEX OPERATION :

(L) v ?

KMS11 CSR ADDRESS : (0) 164100 ?
INTERRUPT VECTOR ADDRESS: (0) 400
5 ?
INTERRUPT PRIORITY : (0)

°?

SEQ@ 10

CZKMUAO KMS11=BL PDP-"1 DCLT

CZKMUA.P11

30-MAR-82 09:13

2.5

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 11

DATA COMM. LINK TEST COMMANDS

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

?gEé;{S#EB

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 EF-ECTS A _QUALIFIER
TO THE LEFT ON THE COMMAND LINE, THE QUALIFIER FARTHEREST TO THE RIGHT
TAKES PRECEDENCE SINCE IT IS INTERPRETED LAST. (I.E. IF /CHE(K.....
.../NOCHECK APPEAR ON THE SAME LINE, NOCHECK WJ.L 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.

SEQ 11

CZKMUAO kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKHUA P11

30-MAR-82

MACY11 30A(1052)

09:15

PAGE 12

2.5.1 MESSAGE COMMANDS
DESCRIPTION
CLEAR

EXPECTLIST

ZEROES THE EXPECTLIST (000°'S)

CLEAR

TRANSMITLIST

ZEROES TRANSMITLIST (000'S)

SET

EXPECTMSG=TYPE/QUAL

DEFINE A MESSAGE TO BE PUT ON
THE EXPECTED LIST

WHERE:

AND THEN PUTS DEFAULT ITEP MSG
IN SO NOT REALLY EMPTY
AND THEN PUTS DEFAULT ITEP MSG
IN SO NOT REALLY EMPTY

°‘‘TYPE' IS:

=ONES

=2EROQES

=1ALT

=0ALT
=]TEP
=CCITT

=ALPHA

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

WHERE THE OPTIONAL ‘'QUAL'’ .S:

/SIZE=NNN
/COPY=NN

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)

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

EXPECTLIST=TRANSMITLIST

MAKES A COPY OF THE TRANSMIT

SET

TRANSMITMSG=TYPE/QUAL

DEFINE A MESSAGE TO BE PUT ON

LIST IN THE EXPECT LIST.
THE TRANSMIT LIST

(SEE DESCRIPT FOR SET EXP)

SHOW

EXPECTLIST

LISTS THE MESSAGE SIZE AND TYPE

SHOW

TRANSMITLIST

LISTS THE MESSAGE SIZE AND TYPE

FOR THE MESSAGES IN THE
EXPECT LIST

SEQ@ 12

CZKMUAO kMS11-BL PDP=11 DCLT

CZKMUA.P11

30~-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 12-1
FOR THE MESSAGES IN THE
TRANSMIT LIST

SEQ@ 13

CZKMUAO KMS71-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

30-MAR-82 09:15

MACY11 30A(1052)

PAGE 13

2.5.2 STATISTICAL COMMANDS

COMMAND

DESCRIPTION

TAKES THE OPERATOR TO THE

DUMP

REPORT LEVEL. FROM HERE
YOU CAN EXAMINE THE EVENT
LOG OR BASE TABLE.

PRINTS THE CONTENTS OF THE

SSSSSS~EEEEEE/B

MEMORY LOCATIONS BETWEEN

WHERE ‘'/B'* IS OPTIONAL:

DEFAULT IS PRINT WORDS

*//8'' CAUSES PRINT BYTES

OCTAL ADDRESSES °''SSSSSS'' AND
"EEEEEE'' WHERE ”SSSSSS" IS
AN
THE START ADDRESS

“'~EEEEE'' IS THE END ADDRESS.

IfF ""-EEEEEE'' IS NOT SPECIFIE
THEN THE CONTENTS OF '‘SSSSSS'
IS PRINTED IN WORD FORMAT,

NOTE: THE DUMP COMMAND IS USEFUL FOR EXAMINING
MESSAGE DATA. STARTING ADDRESSES CAN
BE FOUND BY LOOKING IN THE EVENT LOG.

SEQ 14

CZKMUAQ KMS11-BL PDP=11 DCLT

CZKMUA.P1

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

SEQ@ 15

PAGE 14

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 MEA."}\YIEE” IS ANY ONE OF THE FOLLOWING:
(FORCES /NOECHO ,NO LOOPING)
(FORCES NO LOOPING)
=PASSIVE
(FORCES /NOECHO ,NO LOOPING)
=RECEIVE

=LISTEN
=TRANSMIT
=TALK
=DOWNLINELOAD

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

/NOCHECK)
/NOCHECK)
/NOCHE(CK)
/NOCHECK,

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

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

/CHECK/NOCHECK

ENABLES/DISABLES CHECKING OF RECEIVED
DATA AGAINST THE EXPECTED DATA

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

ENABLES/DISABLES PRINTING OF PROGRAM
STATUS MESSAGES TO THE OPERATOR

/ECHO/NOECHO

ENABLES/DISABLES THE _RETRANSMISSION OF
THE DATA RECEIVED IN PASSIVE MODE.
(IGNORED IN MODES OTHER THAN PASSIVE)

/MODEM/NOMODEM

ENABLES/DISABLES THE REPORTING OF MODEM STATUS

/LOOP=LTYPE

INTERRUPT CHANGES.
NOTE: THIS SWITCH CAUSES NO ACTION IN THIS DCLT
PROGRAM BUT IT IS INCLUDED BECAUSE IT IS USED
IN OTHER DCLT PROGRAMS.

gggzéféggWHETHER

MAINTENANCE LOOPBACK IS

(IGNORED IN MODES OTHER THAN ACT'VE)
MUST BE SPECIFILD EACH TIME ELSE NO
LOOP IS USED.

CZKMUAO KMS11-8BL PDP=-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 14-1

"LTYPE'' IS:
=INTERNALTTL

SPECIFIES NUMBER OF ITERATIONS TO MAKE BEFORE

/PASS=NN

END-OF-PASS. DEFAULT VALUE OF 1
WILL BE USED ON ANY RUN THAT A /PASS=N
1S NOT ADDED TO THE 'RUN ...'* COMMAND.
IF A =1 IS TYPED, THEN THE PROGRAM

RUN UNTIL A “C IS fYPED.

NOTE:

-----

2.5.4

SEE SECTION 6.1 FOR A DESCRIPTION

OF THE 'RUN MODES'' AND °‘1OOP MODES''

DEFAULTS

1F NO °*'SET'S'’ THEN THE DEFAULT IS SAME AS IF TYPED:
SET TRANSM]TMSG=ITEP/S12E=58/COPY=0
SET EXPECTMSG=ITEP/SI2E=58/COPY=0
THE DEFAULT COPY AN SIZE FOR EACH OF THE MESSAGE TYPES:
ONES - /SI12E=64/COPY=0
ZERQES - /SI12E=64/COPY=0
OALY = /SI1ZE=64/COPY=0
1ALT - /SI2E=64/C0PY=0

CCITT - /S12E=64/COPY=0
ALPHA - /S12E=65/COPY=0
ITEP - /S1ZE=58/COPY=0

OPER. SPEC'D = /SIZ2E=LENGTH~OF-TEXT-TYPED-BE TWEEN-QUOTES/COPY=0

FOR THE RUN COMMAND THE DEFAULTS ARE:

RUN MODE=ACTIVE/NOSTATUS/CHECK/NOECHO/PASS=1

NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED
-----

EACH TIME A RUN IS TYPED

IF THE DCLT PROGRAM IS RUN IN UNATTENDED MODE (UAM FLAG=1 OR CHAINED),
THE DEFAULTS ARE AS IF THESE SETUP AND RUN COMMANDS WERE TYPED:
SET TRANS=ITEP
SET EXPECT=]TEP

RUN MODE=ACTIVE/LOOP=INTERNAL/NOSTAT/CHECK/PASS=1
OTHER NOTES:

“C

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

*RuBOUT"’

DELETE LAST CHAR. TYPED IN COMMAND STRING

<CR>

1S SEEN AS A COMMAND TERMINATOR

SEQ 16

CZKMUAO kMS11-BL PDP=11 DCLY

CZKMUA.P11

30-MAR-82 09:13
2.5.5

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 14-2

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

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/OFFSET=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 MISC COMMANDS

DESCRIPTION
FROM THE DCLT> LEVEL RETURNS YOU
TO DR>.

HELP OR ?

PRINTS HELP INFORMATION.

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

2.5 QUICK START=UP PROCEDURE

09:15

PAGE 15

(XXDP+)

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

2. GIVE THE DATE AND ANSWER THE LSI AND 50HZ (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.

THAT CAN DCLT CAN USE IS ALWAYS 1",

THE NUMBER OF UNITS

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BZ USING ONLY THE

DEFAULTS FOR FLAGS.

THESE DEFAULTS ARE LESCRIBED IN SECTION 2.3.

7. AFTER THE ‘DCLT> (A) ?'° PROMPT, TYPE
"RUN MOD=ACTIVE<CR>''

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 18

CZKMUAO KMS11-8L PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 16

3.0 ERROR INFORMATION

3.1 TYPES OF ERROR MESSAGES

THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY
A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES

ARE ALWAYS PRINTED UNLESS THE

°'‘IER’'’

FLAG IS SET (SECTION 2.2).

THE GENERAL ERROR MESSAGE IS OF [HE FORM:
NAME

TYPE

NUMBER

ERROR MESSAGE

ON UNIT NUMBER

TST NUMBER P(C: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 (SerTInm 3 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:

HEANING

?ILL CMD-BAD SYNTX?

A COMMAND WITH AN ILLEGAL CHAR WAS

?2INCMPLTE CMD?

AOREOUIRD PART OF A COMMAND WAS LEFT

?NUM TOO BIG?

THE VALUE OF A NUMERIC STRING IN THE
COMMAND LINE WAS LARGER THAN 65535
OR 177777 OCTAL. ( > 16 BITS).

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

TYPED = RETYPE THE COMMAND. THE
VALID COMMANDS AND THEIR SYNTAX ARE
SHOWN IN SECTION 2.5.

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

2'L00P'* VALID ONLY IN ACTIVE?

09:15

SEQ 20

PAGE 16-1

THE °''/LOOP=..'' SWITCH WAS TYPED

RUN COMMAND BUT THE MODE WAS NO
TO ACTIVE.
MAINTENANCE LOOP IS

:g;?égLE IF THE MODE OF OPERATI

?'ECHO"* VALID ONLY IN PASSIVE?

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

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

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

A ''A=1,0-9,SPACE OR TAB''. RETYPE THE
COHHAND WITH ONLY THESE CHARACTERS
BETWEEN QUOTES.

?7''SIZE=0"* NOT VALID?

A MESSAGE ZERQ BYTES LONG CAN NOT BE

gplLt RETYPE THE COMMAND WITH
TSITENN- IF NO - /SIZES" 1S TYPED
A DEFAULT SiE WILL BE USED.

2TRANSMIT 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 DCLT 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
Q%?CNOT INTERRUPT WHEN ASKED TO DC A
THE PROGRAM WILL STILL RUN,

BUT ANY

OF THE PROGRAM THAT TIMES fHE 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 - M,>G. NOT BUILT !!
THIS MEANS THAT THE TRANSMIT OR EXPECT
BUFER IS FULL. NO MORE MESSAGES CAN BE
ADDED TO THAT BUFFER.

BUFFER FULL = MSG. NOT BUILT !!

THIS MEANS THAT THE LAST MESSAGE YOU

CZKMUAO KMS11-BL PDP=-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

SEQ 21

PAGE 16-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.

~HAR. 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=111
XXX= OFFSET OF THAT BYTE FROM THE START
OF THE COMPARE OR EXPECT MESSAGE.
YYY= THE CONTENTS OF THAT BYTE IN THE
EXPECTED MESSAGE

222= THE CONTENTS OF THAT BYTE IN THE
RECEIVED MESSAGE

UP TO FIVE OF THESE ERRORS WILL BE

PRINTED PER MESSAGE COMPARED. OMLY
THE FIRST FIVE MISMATCHES WILL BE
INDIVIDUALLY REPORTED, BUT TOTAL
NUMBER OF MISTMATCHES 1S REPORTED
BY ANOTHER ERROR.

PRINTING THE EVENT LOG AND USING THE
DCLT "DUMP'’ COMMAND WILL ALLOW YOU TO
FIND THE ADDRESS OF THE MESSAGE AND
EXAMINE IT.
DATA COMPARISON DATA ERROR
TOTAL MISMATCHES IN MSG =

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

DATA COMPARISON LENGTH ERROR

COMPARE COUNT= XXX

RECEIVE COUNT= 212
XXX= NUH%EgSREEBYYES IN THE COMPARE

211= NUMBER OF BYTES IN THE RECEIVED
MESSAGE

e
‘

CZKMUAO KMS11-BL POP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 16-3

THIS MEANS THAT THE MESSAGE RECEIVED
WAS A D'FFENT LENGTH THEN THE MESSAGE
THAT WAS EXPECTED.

1222242

« NOTE *
TERARARS

=~ IN THE FOLLOWING ERROR DESCRIPTIONS XXXXX
REFEggEE?F}gs OCTAL CONTENTS OF Tii€ DEVICE REGISTERS

TIME OUT WAITING FOR RDI TO CLEAR
SEL?2
SELO
XXXXXX

XXXXXX

THIS MEANS THAT A SOFTWARE TIMER EXPIRED BEFORE
5?ER8EVICE 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 RD] TO SET
SEL2
SELO
XXXXXX

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 1S SETUP.
TIME OUT WAITING FOR RUN TO SET
SEL2
SELO
XXXXXX

XXXXXX

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

PROGRAM SETING MASTER CLEAR.

NOTE: PRUOGRAM RESETS TIMER AND ISSUES ANOTHER
MASTER CLEAR AND WAITS AGLIN SO AN EFFECITVE
LOOP ON ERROR IS SETUP,
THIS ERROR COULD INDICATE WRONG ADDRESS FOR
KMS11 WAS GIVEN IN HATOWARE P TABLE.

TIME OUT WAITING FOR OUTPUT INTERRUPT
SELO
SEL?2
XXXXXX

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 1S SET UP,
THIS ERROR WILL OCCUR WHEN ONE NODE IS STARTED

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA. P11

30~-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 16-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

XXXXXX

SELZ

XXXXXX

THIS WILL HAPPEN IF THE DEVICE IS BAD. IT MEANS
THAT AFTER THE PROGRAM HAS 1SSUED ALL INPUT REQUESTS
TO THE DEVICE, THE DEVICE ISSUES AN INPUT INTERRUPT
ILLEGAL JUTPUT _INTERRUPT
SEL6
SEL2
XXXXXX

XXXXXX

THIS HAPPENS WHEN THE DEVICE ISSUES AN OQUTPUT INTERRUPT
WITHOUT SETTING 'RDO’'. IF THIS HAPPENS THE DEVICE IS BAD.
CONTROL OUT INSTEAD OF BA-CC OuT
SEL2
XXXXXX

SEL6
XXXXXX — MMMMMMM

WHERE "MMMMM'’ IS ONE OF THE FOLLOWING MESSAGES
;gaTYGSSULT 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

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

BACC OUT.

TX BUFF COMPLETED AND SHOULD BE RX
SEL6
SEL4
XXXXXX

XXXXXX

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

XXXXXX

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

SEQ 23

CZKMUAQ KMS11-BL PDP=11 DCLT

CZKMUA.F11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 16-5

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 WORD?
HOST RECEIVED A MESSAGE FROM SATELLITE

BUT MESSAGE WAS NOT 1ST WORD OF SEC BOOT REQ.

SEC REQ WORD?2
HOST RECEIVED A MESSAGE FROM SATELLITE
BUT MESSAGE WAS NOT 2ND WORD OF SEC BOOT REQ.
CALLED FROM PC. XXXXXX

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

SEQ 24

CZKMUAO kMS11=BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

(9:15

PAGE 17

4.0 PERFORMANCE AND PROGRESS REPORTS

DCLTM USES IT'S OWN METHOD FOR DETERMINING AN °'‘END OF PASS'’

WHICH IS CALLED A 'DCLT END OF PASS'’. THE NUMBER OF ‘DCLT PASSES
TO BE RUN IS SPECIFIED BY THE '‘/PASS=XXX'' SWITCH ON THE DCLT
OF 'DCLT ERRORS'' IS REPORTED
RUN COMMAND. THE TOTAL NUMBER
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 3E 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 CAZ_
WHILE THE PROGRAM IS FETCHING DCLT COMMANDS FROM THE OPERATOR,

IT SHOULD ALSO BE NOTED THAT THERE ARE ONLY 8 BITS AVALIABLE TO STORE
RELATIVE MINUTES SO “‘TIME'' WILL WRAP TO 000:00:00 AFTER 256:59:59.
A START OR RESTART COMMAND AT THE ‘DR>'’ LEVEL INITIALIZES THE EVENT
LOG. THEREFORE 1T IS WISE T) 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 MESSAGF,
TOTAL NO. OF BYTES, MODEM STATUS AT THAT 1IME.

TRANSMIT MESSAGE COMPLETED:

EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE,
TUTAL 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 BYFES

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

CZKMUAO KMS11-BL PDP=-11 DCLT

CZKMUA.P1

30-MAR-82 09

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 17-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 BYFES

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:
“C ABORT:

EVENT TIME, ‘DCLT'* PASS COUNT, ‘DCLT'' ERROR COUNT,

NO. OF ‘NOBUFF'S’''(NO. OF CONTROL-QUTS WITH THE
NO=-BUFFER SET SINCE THE LAST ‘DCLT RUN'® COMMAND.)
NCTE:

IF THE NODES ON THE LINK ARE SIMILAR WITH
RESPECT TO CONSOLE SPEED AND SETU”, 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:

MESSAGE

MEANING

DEVICE IS ABOUT SiART TRANSMITING A MESSAGE

RXQ

DEVICE HAS QUEUED SPACE TO RECEIVE/ COMPLETED RECEIVE

INI
MSC
CMP
CML
CMD
EOP

DEVICE ABOUT TO BE INITIALIZCD
ABNORMAL MODEM STATUS CHANGE
ABOUT TO DO DATA CHECKING OF RECYD VS. EXPTD DATA
LENGTH ERROR OCCURRED DURING DATA COMPARISON
JATA ERROR OCCURRED DURING DATA COMPARISON
END OF PASS

TXC

ERR

TRANSMISSION OF MESSAGE COMPLETED

DEVICE ERROR HAS OCCURRED

4.3 PRINTING OF KMS11 BASE TABLE

AT THE "DCLT>'* OR 'DR>'‘ LEVEL, GIVE THE PRINT COMMAND. THIS Wil L
TAKE YOU TO THE 'RPT>'' LEVEL. YOU NOW HAVE THE OPTION OF PRINTI NG
ONLY ERROR LOCATIONS, ENTIRE BASE TABLE O A SINGLE LOCATION.
YOU ONLY HAVE TO INPUT ENOUGH OF TH? COMMAND TO MAKE IT UNIQUE.
THE ENTIRE BASE TABLE IN LOCAL PDP-11 MEMORY IS UPDATED BY THE KMS11
WHENEVER A FATAL ERROR OCCURS. THE ERROR COUNTER LOCATIONS
OF THE BASE TABLE ARE UPDATED EVERY SECOND BY THE KMS11.
4.3.1 PRINTING ERROR LOCATIONS

CZKMUAQ kMS11-BL PDP-11 DC%T

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 17-2

TO PRINT ERROR COUNTER LOCATIONS, INPUT 'BASE/ERROR''.

LOCATIONS BASE+3..BASE+12 WILL BE DISPLAYED,

THE BASE ADDRESS IN THIS PROGRAM IS ALWAYS 17370.

EXAMPLE :

RPT> (A) ? B/E

LOCATION
17373

CONTENTS
004

DESCRIPTION
NAKS=-MSG NO BUFFERS CUMUL

17402

007

REPS RECD CUMUL

4.3.2 PRINTING ENTIRE BASE TABLE

TO PRINT THE ENTIRE BASE TABLE, INPUT 'BASE/FULL'.

200 BYTES WILL BE DISPLAYED.

4.3.3 PRINTING SINGLE LOCATION

TO EXAMINE A SINGLE LOCATION, INPUT °'BASE/OFFSET=NNN'',
NNN IS A OCTAL NUMBER BETWEEN 0-377. IF THE OFFSET VALUE IS
NOT WITHIN THIS RANGE AN ERROR MESSAGE WILL BE PRINTED.
EXAMPLE :

RPT> (A) ? B/0=3

CONTENTS

Loc ATION

17373

006

RPT> (A)

DESCRIPTION
NTLR = NAKS..RCVD NO BUFFERS

CIKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 18

S.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
OFFSETS USED IN THE HARDWARE PARAMETER CODING SECTION WHERE THE
"'"GET PARAMETER'' CALLS ARE USED TO FILL THE P-TABLE.

WORD

WORD
.WORD

.WORD

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

240

;[6) INTERRUPT PRIORITY (5)

164100
400

:(2) CSR ADDRESS
;C4) INTERRUPT VECTOR

6.0 MODE AND MESSAGE DESCRIPTIONS
6.1 MODE DESCRIPTIONS

BECAUSE THE KMS11 SUPPORTS DDCMP OPERATION IN THE
FIRMWMRE, THE PDP11 DCLT PROGRAM IS UNABLE TO CONTROL OR KNOW
EXACTLY WHAT IS BEING TRANSMITTED OR RECEIVED AT ANY GIVEN TIME.E
ALL DATA MESSAGES ARE ENCLOSED IN A DDCMP ENVELOPE AND THEREFOR
gg?g?SEDHESSAGES (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 RECEIVETM MESSAGES
IF DATA-CHECKING IS ENABLED.

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'

SEQ 28

CZKMUAO KM311-BL PDP=11 DCLT

30~-MAR-82 09:13

09:15

PAGE 18-1

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: TF BOTH ENDS OF THE LINK ARE IN ACTIVE MODE, THEN THE
LINK MUST BE A FULL DUPLEX LINK!

6.1.5 DOWN-LINE-LOAD

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

BOOT STATION TO ENTER MOP MODE. THE SATELLITE THEN SENDS A
“'SECONDARY BOOT REQUEST MESSAGE'', THE, "WOST'' THEN CHECKS THE
RECEIVED MESSAGE TO SEE_THAT IT IS A “'SECONDARY B0OT REQUEST"".
THEN THE HOST SENDS A ‘MEMORY LOAD WITH TRANSFER ADDRESS
THAT CONTAINS_IMAGE DATA TO BE LOADED BY THE SATELLITE'S
M9301=YJ/M9312 STARTING AT LOC. 0. THIS IMAGE DATA WILL CONTAIN A
CODE THAT PRINTS A MESSAGE SAYING DOWN-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 IS DECIPHERED AND INCLUDED IN AN IDENTIFICATION MESSAGE.

NOTE: KMS11 DEVICES CANNOT BE DOWN-LINE-LOADED.
EXAMPLE DOWNLINE LOAD;
DCLT>R M=D

: NNN = OCTAL # BETWEEN 0-376
SATTELITE PASSWORD = NNN
CE TYPE = YY
DEVI
XXX
FROM
REQ
BOOT
SECONDARY

XXX

\AJ
CWHNIOBONSNIOCO N o

CZKMUA.P11

30-MAR-82

MACY11 30A(1052)

SEQ 29

E
CZKMUAOQ KMS11-BL PDP=11 DCLY
30-MAR-82 09:13
CZKMUA.P11

30-MAR-82

MACY11 30A(1052)
32
34

DMV

09:15

PAGE 18-2

SEQ 30

CZKMUAO KMS11-BL PDP=-11 DCLT

CZKMUA.PT1

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 19

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

THE *LISTEN'' END OF THE LINK PRINTS ALL OF THE MESSAGES
RECEIV-" BY THE DEVICE ON THE OPERATOR'S CONSOLE. IF THE MESSAGE

RECEIVED IS AN "EXIT'* MESSAGE,

THEN THE NODE ENTERS

‘‘TALK'' MODE.

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

6.1.8

MAINTENANCE °‘LOOP'' MODE

REMEMBER THAT THE WHENEVER A 'RUN'' COMMAND IS TYPED, THE DEFAULT IS
NO LOOPBACK AND THAT
*'/LOOP=INT'' IF

LOOP MODE MUST BE SPECIFIED BY A

LOOP MODE IS DESIRED.

LOOP MODE IS VALID ONLY IF THE MODE TO RUN IS ACTIVE !

INTERNALTTL

THE 'LV 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.

6
CZKMUAO kMS11-BL PDP-11 DCLY

CIKMUA.PI

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 20

THE FOLLOWING TABLE SUMMARIZES THE MODES THAT CAN BE RUN TOGE THER
WHEN THE DCLT PROGRAM IS RUNNING ON TWO PROCESSORS (ONE AT EACH
END OF THE LINK):
'STATION A

1"HOST" NODE

*'/LOOP"* ALLOWED?

| TALK
ILISTEN
| TRANSMI T
iRECEIVE
i PASSIVE
IACTIVE

NO
NO
NO
NO
NO
YES

iDOWNLINELOAD

STATION B
REMOTE"* NODE

DUPLEX

LISTEN®, RECEIVE

HALE OR FULL!

TALK*, TRANSMIT
RECEIVE+, LISTEN
TRANSMIT#, TALK
ACTIVE®
ACTIVE®
PASSIVE®
PASSIVE

HALF
MALF
HALF
HALF
FULL
HALF
MALF

!
i

OR
OR
OR
OR

FULL!
FULL
FULL
FULL!
i
OR FULL!
FORCED !

*= MOST LIKELY TO BE IN THAT MODE

6.2 MESSAGE DESCRIPTIONS
NAME

DESCRIPTION

ZEROES
ONES

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

1ALT

OALT

cCITT
ITEP

MESSAGE OF ALTERNATING 1°S (§0101010,10101010,....)
MESSAGE OF ALTERNATING C°'S (01010101,01010101,....
CCITT 512-BIT (VS. 511 BITS) TEST PATTERN
'INTERPROCESSOR TEST PROGRAM'S (ITEP)'*

MESSAGE 1(DP1:)

(<177><177>/8A THE QUICK 9nouu FOX ;unp D OVER THE

LAZY D0G.<15><12><001>N77><177><177><177>)
ALPHA

ALPHA-NUMERICS (OR FUTURE COMM TURNAR
usG)
(#3'°" (AMPERSAND)
' ()#¢ ~.0123456789:;<=>?@ABCDEFGHIJK
LMNOPQRSTUVWXYZ/[\]*_%

"'A-2,0-9,SPACES,
TABS"’

THESE ARE THAT THE CHARACTERS THAT CAN

BE TYF:D BETWEEN QUOTATION MARKS ('‘.."")
TO SPECIFIY A UNIQUE MESSAGE.

(CALLED AN OPERATOR SPECIFIED MESSAGE.)

CIKMUAO KMS11-BL PDP=-11 DC.T

CZKMUA.P11

30~-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 21

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=-0UT
ONE-WAY~IN
INTERNAL LOOP
EXTERNAL LOOP

RECEIVE OR LISTEN
TRANSMIT OR TALK
ACTIVE
ACTIVE OR PASSIVE

NOTE: WHEN INTERFACING TO ITEP .7 THE RX BUFFER ON THE
ITEP SIDE IS ONLY 10 BYTES LARGER THAN THE TX BUFFER YOU
HAVE SELECTED, SO BE SURE TO SET THE TX BUFFER ON THE DCLT
NODE ACCORDINGLY.

WHEN ITEP IS IN A MODE THAT IT IS EXPECTING TO BE TRANSMITTED
TO, A SO’T ERROR ‘BASE TABLE ERR COUNTS NON-ZERQ'' WILL OCCUR.
THIS IS DUZ 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

5EEGRHSG. 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 TRCUBLESHOOTING HINTS

LISTED BELOW ARE SOME SETUPS TMAT COULD BE USED FOR ISOLATING FAULTS.
THESE ARE BY NO MEANS THE ONLY WAYS DCLT CAM BE USED !:!11!!

DCLT IS MEANT TO BE 2 VERY FLEXIBLE TOOL! YRS SECTION IS MEANT TO
GIVE SOMEONE NOT TO) FAMILIAR WITH DCLT A PLACE TO START.
REMEMBER THAT THE PRINTINA OF STATUS MESSAGES AND PRINTING OF THE
EVENT LOG CAN PROVIDE A LOT OF INFORMATION ABOUT THE SEQUENCE OF
EVENTS AND HOW THE DEVICE AND LINK ARE BEHAVING.
NOTE: IF BOTH NODES IN ACTIVE AND °'/NOCHECK'® IS USED,
°°°°° END-OF ~PASS 1S DEFINED AS RECEIVING 1 MESSAGE

AND COMPLETING THE TRANSMIT LIST. WITH NO DATA
CHECKING, THERE IS NO WAY FOR DCLT TO KNOW HOW
MANY MESSAGES 1T SHOULD EXPECT TO RECEIVE.

SEQ@ 33

CZKMUAD KMS11-8L PDP=11 DCLT

CZKMUA.PTY

30-MAR-82 09:13
7.2.1

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 21-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
cT

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

R M=A/LO=]/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 MESSAGLS
CONTAIN DATA OF ALL ONES AND EACH ONE IS 20 BYTES IN LENGTH.
THE 'R M=A/LO=I1/NOCH/STAT'' SETS THE MODE TO RUN IN TO BE
ACTIVE AND LOOP TYPE TO BE INTERNAL TTL. THE PROGRAM WILL
NOT BE CHECKING DATA SO THERE WAS NO NEED TO SET UP AN

EXPECT LIST. THE PROGRAM WILL BE PRINTING STATUS MESSAGES.

WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND
IF THINGS ARE RUNNING CORRECTLY :
INI RXQ TXQ RXQ@ TXC TXQ RXQ TXC

TXQ RXQ TXC EOP

MODE=ACTIVE/LOOP=INTERNAL/PASS=00000
CHE
CK/NOE CHO/NOMODEM
/STATUS/NO

DCLT> (A)

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é&?CEDISPLAY 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/L0=1/CH/PAS=3
WHAT THIS SEQUENCE MEANS:

THIS SEQUENCE IS SIMILAR TO THE ONE ABOVE . THE °'SE E=T*’

MAKES A COPY OF THE TRANSMIT LIST IN THE EXPECT LIST.
THE EXPECT LIST NOW CONTAINS 35 MESSAGES. THE MESSAGES WILL
HAVE ALL ONES FOR DATA AND BE 20 BYTES EACH IN LENGTH.

CZKMUAO KMS11-BL PDOP=-11 DCLT

CZKMUA.P1

30-MAR-82 0 9:13

30-MAR-82

MACY11 30A(1052)

09:15

PAGE 21-2

THE RUN COMMAND IS THE SAME WITH THE ADDITION OF TWO

SWITCHES '"/CH/PAS=3", THE "'CH'' SWITCH TELLS THE PROGRAM
TO CHECK THE RECEIVEL DATA AGAINST THE "-XPECTED 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
TXQ TXC CMP CMP
RXQ TXC TXQ RXQ
CMP CMP EOP RXQ
RXQ TXC TXQ TXC

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

TX(
TxQ
CMP
TxQ
EOP

MODE=ACTIVE/LOOP=INTERNAL/PASS=00000

/STATUS/CHE CK/NOECHO/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 1IS:

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

THIS SEQUENCE HAS THE °'/LO=1'' REMOVED. THIS INFORMS
LgEEDEVICE TO ACT AS IF 1T WAS RECEIVING FROM ANOTHER
WHAT YOU SHOULD SEE AFTEP ENTERING THE RUN COMMAND
IF THINGS ARE RUNNING CORRECTLY :
IN] 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 RXQ TXQ
TXC RXQ TXQ TXC CMP CMP CMP EOP
MODE=ACTIVE/PASS=00000
/STATUS/CHECK/NOECHO/NOMODEM
DCLT> (A)
?

SEQ 35

CZKMUAQ KMS11-BL PDP-11 DCLT

CZKMUA.P11

30~-MAR-82 09:13

7.2.2

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 22

TRANSMIT ON ONE NODE RECEIVE ON THE OTHER

NOW TRY TRANSMIITING FROM ONE END AND RECEIVING ON THE
OTHER. MAYBE WITH NO DATA CHECKING AT FIRST TO ESTABLISH
IF THE LINK IS WORKING. POSSIBLE COMMAND SEQUENCES ARE:
NODE A

NODE B

CE
cT

CE
c?7

R M=R/NOCH/PAS=3

SE T=1ALT/S8=250

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 1S SET TO 3.
THE ‘R M=R/NOCH/PAS=3'' SETS THE RUN MODE OF NODE B8
TO BE RECEIVE, NO DATA CHECKING IS TO BE DONE,AND
THE PASS COUNT IS SET TO 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 TX@

TXC EOP

MODE=TRANSM] T/PASS=00000

DCLT> (A)

E
CHO/NOMODEM
S/NOCH
/STATUCK/NOE

FOR NODE B:

INI RXQ EOP RXQ EOP RXQ EOP

MODE=RECEIVE/PASS=00000
/STATUS/NOCHECK/NOE CHO/NOMODEM
?
(A)
DCLT>

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

R M=TR/PAS=3
WHAT THIS SEQUENCE MEANS:

SE E=1ALT/S=250

R M=R/CH/PAS=3

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

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P1Y

30~-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 22-1

WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND IF THINGS
ARE RUNNING CORRECTLY:

NODE A: 1S THE SAME AS ABOVE.
NODE B:

INI RXQ CMP EOP RXQ CMP EOP RXQ CMP EOP
MODE=RECEIVE/PASS=00000

/STATUS/CHECK/NOECHO/NOMODEM
DCLT> (A)?

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 8

CE
cT

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

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

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 COMMMND LINE.

NODE B: THE TRANSMIT AND EXPECT LISTS ARE INTIALIZED
THEN THE TRANSMIT LIST IS SEY 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 Txa

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P1

30-MAR-82 09:13

MACYi1 30A(1052)

30-MAR-82

09:15

PAGE 22-2

RXQ TXC TXQ RXQ TXC EOP RXQ TXQ
Rxg TXC TXQ RX@ TXC TXQ@ RXQ TX(

MODE=ACTIVE/PASS=00000
/STATUS/NOCHECK/NOE CHO/NOMODEM
?
DCLT> (A)
FOR NODE B:

INI
TXQ
TXC
RXQ

RXQ TXQ TXC RXQ TXQ TXC RXQ
TXC EOP RXQ TXQ TXC RXQ TXQ
EO® RXQ TXQ TXC RXQ TXQ TXC
TX2 TXC EOP

MIDE=PASSIVE/PASS=00000
/STATUS/NOCHECK/NOE CHO/NOMODEM
?
DCLT> (A)

NOW USE DATA C{ECKING WITH THE “EXPECT MESSAGE LISTS'' SET
UP APPROPRIATE.Y. ANOTHER VARIATION IS TO HAVE LARGE SiZE

MESSAGES ON ON: SIDE WITH SMALL MESSAGES ON THE OTHER.

THEN REVERSE T.4E SETUP SO THAT THE NODE RUNNING IN ACTIVE
IS RUNNING IN FASSIVE 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 8

CE
7T

CE
T

SE T=0A_T7/S=10
SE T=CCITT/5=20
SE T=ALPHA/S=30
SE E=ZERD/S=11
SE E=ON:5/5=21
SE E=IT'P/S=31
R M=A/CH/NOST/PAS=3

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

WHAT THJS SEQUENCE MEANS:

NODE A SETS UP IS TRANSMIT LIST TO BE

3 MESSACES, MESSAGE 1 IS 10 BYTES LONG AND
CONTAIN> DATA OF ALTENATING 0'S AND 1°S

MESSAGE 2 IS 20 BYTES LONG AND CONTAINS

DATA OF "HE 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 LCNG AND CONTAINS 1°'S FOR DATA. MESSAGE

IS 31 GYTES LONG AND CONTAINS THE ITEP DATA.

SEQ 38

CZKMUAO KMS11-BL PDP=11 DCLT

CIKMUA.P11

30-MAR-E2 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 22-3

NODE B HAS THE SAME MESSAGES EXCEPT THAT THE
TRANSMIT MESAGE LIST IS THE EXPECT MESSAGE LIST
AND VICE VERSA.

BOTH NO €S ARE RUN IN THE ACTIVE MODE WITH
DATA CHFCKING AND PASS COUNT EQUAL TO THRCE.
WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND
IF THINGS ARE RUNNING CORRECTLY :

ON BOTH NODES A AND B:

MCDE=ACTIVE/PASS=C0000

DCLT> (A)

CHO/NOMODEM
ATUS/
CHE CK/NOE
/NOST

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.
IHER;EEgEOF-PASSH POINT WILL BE OUT OF SYNC BUT THIS IS NOT

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,
gegssggegliggh. AND SEND MESSAGES CVER THE LINK. POSSIBLE COMMAND
R M=L!S/NOST
LIS

R M=TA/NOST
TLK>

7.3 EXAMPLES OF COMMANDS

THIS SECTION WILL SHOW A SAMPLING OF COMMAND3S AND
EXACTLY WHAT 70 EXPECT FROM THEM.
7.3.1 EXAMPLFS OF MESSAGES COMMANDS
THE CLEAR CCMMANDS .
CE

THIS WILL INITIALIZE THE TRANSMIT AND EXPECT LIST
TO 1 MESSAGTM OF S8 BYTES. THE DATA OF THE MESSAGE WILL

BE THE ITEF MESSAGE.

IF YHESESSOQHANDS ARE FOLLOWED BY A SHOW COMMAND
SUCH AS THE SHOW EXPECT LIST,

WHAT YOU WOULD SEE IS

MSG: TYPE=]TEP/SIZE=58
MODE=ACTIVE/PASS=00001
/NOSTATUS/ CHF CK/NOE CHO/NOMODEM
DCLT> (A
LI>
(A) ?
NOW IF YOU DID A gET EXPECT LIST COMMAND SUCH AS:
SE E=A/8=35/(C=3

SEQ 39

CZKMUAQ KMS11-BL PDP=11 DCLY

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 22-4

AND FOLLO:ED IT WITH A SHOW EXPECT LIST COMMAND
SH
E
WHAT YOU WOULD SEE IS
MSG: TYPE=ALPHA/SIZE 35
MSG: TVPE=ALPHA/SI§E 35

MSG: TYPE=ALPHA/SIZ2E=35
MSG: TYPE=ALPHA/SIZE=35
MODE=ACTIVE/PASS=00001
DCLT> (A) ?

/NOSTATUS/CHECK/NOE CHO/NOMODEM

SEQ 40

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 23

7.3.2 EXAMPLES STATISTICAL COMMANDS
IF YOU TYEEPA HELP COMMMAND
HEL

WHAT YOU WILL SEE IS
DCLT CMDS:

CLEAR OR SHOW
PRINT
EXIT

EXPECTLIST OR TRANSMITLIST

DUMP START-END/B

SET EXPECTMSG OR TRANSMITMSG=TYPE/SIZE=N OR /COPY=N
SET EXPECT=TRANSMIT

A
S,
TT,ALPH
ROE
TEP,CCI
,ZE
1ALT ,OALT,I
TYPE=ONES

OR ''OPR SP(D=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
LTYP=INT,CAB,LOC,REM/

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

41300

104423 000167 177772 021122 012112 006312 006312 006312

006312

IF YOU HAD USED THE /B8 SWITCH
DUM 41260-41300/8

WHAT YOU WCULD SEE IS
41260
023 211 167 000 372 377 122 024

112 024 312 014 312 014 312 014

41270
41300

312

7.3.3 EXAMPLES RUN COMMMANDS

YOU CAN FIND SEVERAL EXAMPLES OF THE RUN COMMMAND IN THE
TROUBLE SHOOTING HINTS SECTION BUT HERE ARE SOME OTHERS.
IF YOU WERE TO EXECUTE THE RUN COMMAND
R M=TR/NOST/CH/PAS=64

WHAT WOULD HAPPEN IS AFTER & PASSES THE PROGRAM WOULD RETURN
TO THE DCLT PROMPT AND PRINT

MODE=TRANSM] T/PASS=00000
E
/CHDEM
CHO/NOMO
TUS
/NOSTACK/NOE

DILT> (A)

IF YOU HERE TO EXECUTE THE RUN COMMAND
c7

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

WHAT YOU WOULD SEE (IF USING DEFAULT TRANSMIT AND EXPECT

CZKMUAO KMS11-BL PDP=-11 DCLT

CZKMUA.P1

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 23-1

MESSAGES) IS

INI RXQ TXQ TXC CMP EOP RXQ TXQ
TXC CMP _EOP RXQ TXQ TXC CMP EOP

MODE=ACTIVE/LOOP=INTERNAL/PASS=0000
DCLT> (A)

EM
S/
CK/NOE CHO/NOMOD
CHEATU
/ST

IF YOU giEYTHE EXIT COMMAND
WHAT YOU WOULD SEE IS
C2CLK EOP
0 CUMLATIVE ERRORS
DR>

7.3.4 EXAMPLES PRINT COMMANDS

THE PRINT COMMMAND CAN BE USED FROM THE SUPERVISOR (DR>)
LEVEL OR THE DCLT (DCLT.) LEVEL. ONCE YOU ARE AT THAT
LEVEL YOU WILL KNOW IT BY THE PROMPT RPT>
AFTER TYPING PRI FOR EITHER THE THE DLCT> OR DR PROMP'S
TYPE ‘MW'' OR

RPT> (A)

'*?'' FOR HELP!

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

S FOLLOWING:
THE
PRODUCE
DCLT REPORT CMDS:
LOG = PRINT DCLT EVENT LOCG
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 THF FOLLOWING

>> DCLT EVENT LOG ENTRY D>3332333333333333333333>3333>>>
RECEIVE SPACE QUEUED
0:01:16
ADPR OF MSG=00045
BYTE COUNT= 512
MODEM STATUS: C;S Dia ng R;S R§ Sgo tg
3> DCLT EVENT LOG ENTRY D32233332333333333333333333>>>>>

0:01:16

RECEIVE

SPACE QUEUED

ADDR OF MSG=00045
BYTE COUNT= 512
MODEM STATUS: C;S DiR ogo R;S Ri sgo T:

SEQ 42

CZKMUAO KMS11-BL PDP=11 DCLY

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 23-2

THIS GOES ON FOR 45 EVENTS IF THE MODE
PREVIOUSLY EXECUTED HAD THAT MANY
YOU EXIT FROM SVENT 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 SWIT(CH
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.

SEQ 43

CZXxMUAQ xMS11-BL PDP-11 DCLY
30-MAR-82 09:13
CZKMUA.P11
4138
6139
4169
4170
an
4176
4180

MACY11 30A(1052)
.SBTTL

30-MAR-82

09:15

SEQ 44

PAGE 23-3

PROGRAM HEADER
BGNMOD

002000

4181

420
4202
4203
4204
4205
4206
4207
4208
4225
4226
4227
(4)

(4)
(4)
(4)
(4)
(4)
(6,
(6)
(5)
(5)
(4)
(5)
(4)
(5)
(4)
(5)
(4)
(5)
(4)
(5)
(4)
(5)
(4)
(5)
(&)
(5)

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

4 4

: THE PROGRAM HEADER IS THE INTERFACE BETWEEN

: THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.

002000

POINTER BGNRPT ,BGNAU,BGNDU

002000
002000
002000
002001

HEADER

002002
002003
002
002005
002
002007
002010
002010
002011

002011
002012
002012
002016
002014
002016
002016
002020
002020
002022
002022
002024
002024
002026
002026
002030
2030
00203
002032
002034
002034
002036
002036
002040
002040

103
132
113
115
125
000
000
000
101

060
000000
003410
046266
000000
002130
000000

046552
000000
000000
000000
000000

0021264

(CZKMU,A,0,1800.,0,#PRI07

LSNAME::

/¢/
/2/
/K/
/n/
v/

0
0
0

LSREV::

LSDEPO::

70/

LSUNIT::

LSTIML::

1800.

LSHPCP::

LSHARD

LSSPCP::

LSHPTP::

LSSPTP::

0
.WORD

LSLADP::
LSSTA::

L$CO::

LSDTYP::

LSAPT::
LSDTP:: :

LSHW

0
LSLAST
0
0
0
0
LSDISPATCH

CZxKMUAO kMS11-BL PDP-11 DCLY

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

PROGRAM HEADER

09:15

SEQ 45

PAGE 23-4

(5)

002042

LSPRIO::

(5)

002050

LSMREV::

(5)

002052

(&) 002042 000340
(5) 002044
(4) 0020446 000000
(5) 002046
(4) 002046 000000
(4)
(3)

002050
002051

003
003

002052 000000
002054 000000
002056
002056 000000

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

002060
002062
002062
002064
002064
002066
002066
002070
002070

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

002072 035554
002074
002074 000000
002076
002076 012252
002100
002100 104035
002102
002102 000000
002104
002104 030256

(&)
(5)
(S)

(5)

(4)

(5)

002060

002072

012230
030242

000000
00c700
035562

LSREPP::

LIEXPS4:.

LSEXPS::
LSAUT::
L$DUT::

LSLUN::

LSDESP::
LSLOAD::
LSETP::
LSICP::

0C21i0

002115

LSPRT::

002112
00114
002114

(228
4235

LSDEVP::

LSACP::

002106 035470

(4)
(5)
%)
(5)

L$SPC::

002106

002110 035466

(&)
(5)
(4)

LSEF::

LSCCP::

(4)

(5)

.WORD
WORD
LSEXP1::
WORD
LSENVI::

002116

030250

000000

002116 000000
002120
002120 000000

LSTEST::
LSDLY::

LSHIME::

#PR10O7
O
O

.BYTE
BYTE

CSREVISION
CSEDIT

LMWORD
MORD

0
O

MWORD
.WORD

O
LSDVTYP

.WORD

LSRPT

.WORD

LSAU

.WORD

LSDU

MNORD

.WORD

LSDESC

EMT

ESLOAD

WORD

LSINIT

.WORD

LSCLEAN

.WORD

LSAUTO

.WORD

LSPROT

MORD

JORD

CZKMUAO kMS11-BL PDP-11 DCLY

CZKMUA. P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

DISPATCH TABLE

.SBTTL

09:15

SEQ 46

PAGE 23-5

DISPATCH TABLE

244

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

000001

035570

DISPATCH 1

.WORD
LSDISPATCH::
-WORD

1
n

CZKMUAO kMS11-BL PDP-11 DCLY
30-MAR-82 09.13
CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

09:15

DEFAULT HARDWARE P-TABLE

.SBTTL

SEQ 47 1

PAGE 23-6

DEFAULT HARDWARE P-TABLE

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

002126
002126
002130
002130

BGNHW

000010

DFPTBL
:
LSHY:
:
IBL:
DFPT

.WORD

L10000-L$HW/2

s INDEPENDENT SECTION

002130

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

WORD

000001

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

:DEVICE DEPENDENT SECTION

.
:

ADDING OR REMOVING WORDS FROM THIS TABLE EFFECTS THE °''GET'® CALLS IN
THE HARDWARE PARAMTER CODING SECTION BY CHANGING 'OFFSETS'’
WORD
.WORD

164100
400

WORD
WORD
WORD
WRD

0
O
0
O

JWORD

ENDHW

240

:[2) CSR_ADDRESS
:[4% INTERRUPT VECTOR
:[6]) INTERRUPT PRIORITY (5)
:(10] SPARE
:[12) SPARE
:[14] SPARE
:(16] SPARE
L1000v:

CIKMUAD KMS11-8BL POP-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

DEFAULT HARDWARE P-TABLE

SEQ 48

PAGE 23-7

4320

4321
4338
4361

GLOBAL EQUATES SECTION

4362

LSBTTL

4377

* THE GLOBAI EQUATES SECTION CCNTAINS PROGRAM EQUATES THAT

(363
4364
4374
4375
6376

* ARE USED IN MORE THAN ONE TEST.

4378

4380
4395

4%??

EQUALS

002150

P BIT DIFINITIONS

5};
(1)
1
1)
1)
(1)
1)
(1)
(1)
1)
1)
(1)

100000
040000
020000
010000
004000
002000
001000
000400
000200
090100
000040

81T15== 100000
8IT14== 40000
8IT13== 20000
81T12== 10000
BIT11== 4000
BIT10== 000
B8IT09== 1000
BIT08== 400
8IT07== 200
BIT06== 100
BIT0S== 40

(1)
(1
(1)
g};

000010
000004
000002
000001

BIT03== 10
B8IT02== 4
8IT01== 2
8IT700== 1

(1)

001000

8119== BIT09

(1)

000200

81T7== BIT0

(1)

000010

155

(1)
(1)
(1)

1)
(1)
g};

000020

0004

BI78==

axro;

000100
000040
000020

BIT6==
8ITS==
BITé=z

BIT06
B]T0S
BIT0L

00
00002
000001

8IT2==
8IT1==
8IT0==

BIT0
BITO1
BIT00

g}g
(1)

1)
(1)
(1)
5};

8IT04== 20

81T13<= exrog

: EVENT FLAG DEFINITIONS

000040

000037
000036
000035
000034

* " EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION
START COMMAND WAS ISSUED
32,
EF.START==
EF .RESTART==
EF.CONTINUE==
EF .NEW==
EF .PWR==

§1.
30.
29.
28.

RESTART COMMAND WAS ISSUED
CONTINUE COMMAND WAS ISSUED
* A NEW PASS HAS SEEN STARTED
A POWER-FAIL/POWER-UP OCCURRED

CZKMUAO KMS11-BL PDP=11 DCLT

CIKMUA.P11

30-MAR-82 09:13

000340

000300
000240
000200
000140
000100
000040
000000

(1)
1)
1)
(1)
1)
(1)
1)
(1)
1)
(1)
1)
1)
4;;;

PRI0O7== 340

PRI06== 300
PRI0S== 240
PRI04== 200
PRI03== 140
PRI02== 100
PRIOT== 40
PRI00== 0
‘OPERATOR FLAG BITS

5};

(1)

09:15

* PRIORITY LEVEL DEFINITIONS

g};

N
(1)
(1)
1)
(1)
1)
E};

30-MAR-82

GLOBAL EQUATES SECTION
;

(1)

MACY11 30A(1052)

000004

000010
000020
000040
000100
000200
000400
001000
002000
004000
010000
020600
040000
100000

Evi==

LOT==
ADK==
IDU==
ISR==
UAM==
BOE==
PNT==
PR]==
IXE==
IBE==
1ER==
LOE==
HOE==

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

PAGE 23-8

SEQ 49

L
CZKMUAO kMS11-BL PDP=-11 DCLT
30-MAR-82 09.13
CZKMUA.P1
4399
4400
460
4402
4403
4404

MACY11 30A(1052)

30-MAR-82

09:15

GLOBAL EQUATES SECTION

001000
000nM7

BUFLIM=512.

sMAX BUFFER SIZE IN BYTES

MSGLIM=15.

sMAX NO. OF MESSAGES PER BUFFER
(FOR EACH INCREMENT (+1) TO MSGLIM,
ADD 6 UORDS TO THE POINTER TABLE
(PTRTAB:) SINCE THIS MEANS 2 MORE
:
'POINTER'® WORDS PER BUFFER.

4406
4407

4610

4611
6612
4613
4414
4615
4616

417

4L18
419
4420
44621
4422

4423
4424

44625
44626

6427

4428
64629
4430
4631
44632

4433
44634
4435
4436
44637
4438

4439
4440
4441
44642

4443
4h4é

4445

000000
000001
000002
000003
000004
000005
000006
000000
000001

000002
000003
000004
000005

000100
000111
001600

sMODE OFRggERATION EQUATES
=0

TRA=1
PAS=2

APPLIES TO TX,RX AND CMP BUFFS

sRECEIVE MODE

:TRANSMIT MODE
;PASSIVE MODE
;ACTIVE MODE

ACT=3

:DOWN~-L INE=LOAD MODE

DOW=4

TAL=5
LIS=6

;MAINT LOOP TYPE EQUATES
O
NONE=
TTL=
1
CABLE= 2
MODLOC= 3
MODREM= &

MOP=

s TALK MODE
;LISTEN MODE

¢NO _LOOP
sINTERNAL TTL
sCABLE LOOP
:MODMEM L OCAL
:MODEM REMOTE

: MOP

sCLOCK ENABLE VALUES TO BE LOADED IN CLK'S CSR
sL=CLOCK CSR VALUE TO ENABLE THE CLOCK
LCLKEN= 100
:P=CLOCK CSR VALUE TO ENABLE THE CLOCK
PCLKEN= 111
:P-CLOCK COUNT SET REGISTER FOR COUNTER
PCLKCT= 1600
;PARAM WORD EQUATES

000001
000002
000004
000010
000020
000040

STATB= BITO
DATCKB= BIT]

ECHOB= BIT
MOCHK= B8IT
BIT4
CRCB=_
PROTOB= BITS

;OPERATOR AWAKE ASKED FOR
sDATA CHECK BIT

:ECHO BIT
:MODEM CHECK/NO CHECK
sCRC CALCUALTE ASKED FOR
;PROTOCOL PROCESSING ASKED FOR

:EVENT LOG MESSAGE TYPES (USED TO LOCATE EVENT DESCRIPTION IN EVENT TABLE
000000
000002

4446

4447
4448

SEQ@ 50

PAGE 23-9

seweee INDEPENDENT EQUATES

4405

4408
4409

000014

000020
000022
000024
000026

AND DISPATCHING TO SEPERATE SECTIONS OF THE EVENT REPORTING SECTION)
TXQ=

s TRANSMIT MESSAGE QUEUED

DCK=

:DATA COMPARISON RESULTS

TXC=
RXQ=
RXC=
DER=
Dvi=

DLE=
DDE=
EOP=
ABO=

2
4
6
10
12
20
22
24
26

s TRANSMIT COMPLETE
:RECEIVE BUFFER QUEUED
;RECEIVE COMPLETE
;DEVICE INFORMATION
:DEVICE AROUT TO INIT

;DATA COMPARISON LENGH ERROR
:DATA COMPARISON DATA ERROR
:END OF PASS
¢“C ABORT

CZKMUAO kMS11-BL PDP-11 8(%;
30-MAR-82
CIKMUA.P11

MACY11 30A(1052)

30-MAR-82

09:15

GLOBAL EQUATES SECTION

;OUTPUT INT REC

OTINT= 2
QRX=
QTX=

:RX QUED /COMPL
:TX QUED/COMPL

100

:EXPECT TO GET A RX COMPLED

400
2000

;DOWN LINE LOAD GO AHEAD BIT
:BASE TABLE UPDATE REQUESTED

20
40

ETX=

200

DLLGA=
BTUP=

002000

CTX=
CRX=

ERX=

PAGE 23-10

¢ INPUT INT. REC.

ININT= 1

000001

;TX COMPL AND IN TXSEL4 AND TSEL6
:RX COMPL AND IN TSEL4 AND TSEL6

SEXPECT TO GET A TX COMPLETED

: SPECIAL CL] CODES FOR ‘'CHAR'' ARGUMENT IN CLI CALLS
[

000000
000001
000002
000003
000004
000005
000006
000007
000010
000011
000012

000000

000032

(COMMAND LINE INTERPRETER DEFINITIONS)
CLIERR= 0
CLIEXI= 1
CLIBR= g
CLIBIF=

CLISPA= 4
CLINUM= §
CLIALP= 6
CLIALN= 7
cLIOCT= 8.
CLIDEC= ?

CLISTR= 10.

: DEFS FOR COMMAND LINE INTERPRETATION ACTION VALUES
NULL=0

CLEAR=1
SHOW=2
CHECK=3
RUN=4
HLP=S
CSHEXP=6
CSHTRN=?
SETEXP=10
SETTRN=11
SIZ2E=12
QCOoPY=13
NUM=14
OPRMSG=1S5
STATUS=16
ENDQO=17
CMSG0=20
(MsG1=21
CMSG2=2
CMSG =%
CMSGé4=
CMSGS=25
CMSG6=26
ATVMOD :27
PASMOD=30
RECMOD=31

LISMOD=32

SEQ 51

CZKMUAO kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11
000033

000060

000001
000002
000003
000004
000005
000006
000007

MACY11 30A(:052) 30-MAR-82 09:15
GLOBAL EQUATES SECTION

PAGE 23-11

DLLMOD=33

TRAMOD=34
TALMOD=35
NO=36
ECHO=37
CRC=40
PROTO=41
PASC=42
MOP=643
TTLLOP=44
(BLLOP=45
LMDLOP=46
RMDLOP=47
NOTNUF=50
BADCHR=51
DMPS=5
DMPE=5
DMPQ=54
PRNT=55
MOSC=56
EX]T=57
SETET=60

;MODEM/NOMNDEM
EXIT COMMAND
EsT COMMAND

ch COMMAND
aepon?
IN
USED
S
EQUATE
:FOLLOWING
:HELP
RPHLP=1

SEXIT_COMMAND
:PRINT EVENT LOG COMMAND
;BASE/ERROR COMMAND
:BASE/FULL COMMAND
:BASE/OFFSET

RPEXY=§
RPLOG=

RPSWE=4
RPSWF =5
RPSWO=6

;MONE COMMAND NEEDED

RNOTNF=7

;ewswe DEVICE DEPENDENT EQUATES
: MODEM SIGNAL BIT DEFINITONS

IF SIGNAL AVAILABLE IN DEVICE, EQUATE NAME TO BIT POSITION,

25883883

O =2 NWAOWIND

Sy Sy S

) e ol =l =g
o o

RTS=
Rl=
sQp=
M=

g S

CTS=
DSR=
DCD=

WoOmDOODD

000004
000010

g by

ELSE EQUATE IT T0 =0

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

sREQUEST TO SEND (CIRCUIT CA)

:RING INDICATOR (CIRCUIT CE)

*SIGNAL QUALITY DETECT (CIRCUIT CG)

sMODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM)

sRUN BIT

SMASTER CLEAR

sLINE UNIT LOOP(TTL)

sLOAD/VERIFY CRAM (KMS11)

sHALF DUPLEX BIT
$MAINT MODE BT
;READY IN

B
CZKMUAOQ KMS11-BL PDP=11 DCLY

CZKMUA.P11

30-MAR-82 09:13
000200
000040
000004
000100
000001

MACY11 30A(1052) 30-MAR-82 09:15
GLOBAL EQUATES SETTION
RDO=
RQ]=
RXBIT=
1EQ=
BACC=

BIT?
BITS
BIT2
BIT6
BITO

PAGE 23-12

REOUEST IN
:RX 8 BIT

:ENABLE OUTPUT INTERRUPT BIT
;BUFFEP ADDR. CHAR COUNT

SEQ 53

CZKMUAO KMS11-BL PDP=11 CCLT

CZKMUA. P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

GLOBAL DATA SECTION

09:15

PAGE 23-13

GLOBAL DATA SECTION

4592

.SBTTL

4595

4596

: THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED

4598
4599

Has

.SBTTL

2232

144

s IN MORE THAN ONE TEST.

4597

sMESSAGE BYTE COUNT TABLE

228?
4602

002150

4612
22}2

002172
002174

4603
4604
4605
4606
4607
4608
4609
4610
4611

002150
002152
002154
002156
002160
002162
002164
002166
002170

DMSGCT:

MSGOC:
MSGIC:
MSG2C:
MSG3C:
MSG4C:
MSG5C:
MSG6C:
OPCNT:
MSGBC:

000001
000001
000001
000001
000100
000072
000101
000000
000001

.WORD
.WORD
.WORD
.WORD
.WORL
.WORD
.WORD
.WORD
.WORD

OLLMIC: .WORD
DLLM2C: .WORD

000005
000204

EMSGO-MSGO
EMSG1-MSG1
EMSG2-MSG
EMSG3-MSG
EMSG4~MSG4
EMSG5-MSG5
EMSG6-MSG6
O
EMSG8-MSG8

DLLMIE-DLLM]
DLLM2E-DLLM2

;BYTE COUNT OF MESSAGE #0
;BYTE COUNT OF MESSAGE #1
;BYTE COUNT OF MESSAGE #2
:BYTE COUNT OF MESSAGE #3
sBYTE COUNT OF MESSAGE #4
;BYTE COUNT OF MESSAGE #5
sBYTE COUNT OF MESSAGE #6
;BYTE COUNT FOR OPERATOR SPEC'D MSG.
:BYTE COUNT OF RECEIVE BUFFER FILL PATTERN
sDLL MSG 1 COUNT
:DLL MSG 2 COUNT

;MESSAGE ADDRESS TABLE

22}2
4617

DEFAULT MESSAGE DEFINITIONS AND TABLES

002176

DMSGAD:

MSGO
MSG]

sADDRESS OF MESSAGE #0
;ADDRESS OF MESSAGE #1

002223
002224
002324

MSG3
MSG4
MSG5

sADDRESS OF MESSAGE #3
sADDRESS OF MESSAGE #4
sADDRESS OF MESSAGE #5

2259 002216 002646

MSG8

;ADDRESS OF RECEIVE BUFFER FILL PATTERN

4618 002176
4619 002200

002220
002221

4621 002204
4622 002206
4623 002210
4624
4625

4628

002212
002274

;ADDRESS OF MESSAGE #2

MSG2

4620 002202 002222

sADDRESS OF MESSAGE #6
;ADDRESS OF OPERATOR SPEC'D MSG.

MSG6
OPBUF

002416
002524

4629

002220

000

MsG0:

.BYTE

000

:MESSAGE OF ALL 0°'S

4631

002221

377

MSGl:

.BYTE

377

sMESSAGE OF ALL 1°'S

«633

002222

252

MSG2:

.BYTE

252

sMESSAGE OF ALTERNATING 1°S

4635

002223

125

MSG3:

.BYTE

125

sMESSAGE OF ALTERNATING 0°S

4637

002224

.WORD

177603,157427, 03‘011 047321,163715,105221,143325,142304

4630
4632

4634

4636

002221

002222

002223

002224

EMSGO:

EMSG1:

EMSG2:

EMSG3:

4638 002224 177603 157427 031011
002232
002260

047321
143325

4639 002244

040041

4640 002264

030030

002304

052012

002252
002260

4641

002272
002300

172334
111337

143531
066730

163715
142304

105221

MSGé4:

"CCITT' 512-B]T (VS. 511 BITS) EST PATTERN

014116

052606

.WORD

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

145064

137642

.WORD

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

053627 070071

.WORD

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

105025
111523

063617
026575

123754
135075

SEQ 54

SEQ 55

CZKMUAO KMS11=BL PDP=11 DCLT ~ MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-14
DEFAULT MESSAGE DEFINITIONS AND TABLES
30-MAR-82 09:13
CZKMUA.P11
4642

002312
002320
002324

151172
166632

165044
016741

031605

MSGS:

4643 002324

4645 002324 077577 040444 052040
002332
002340
002346
002354
002362
002370
002376

042510
045503
047127
045040
020104
052040
055101

050440
041040
043040
048525
053117
042510
020131

044525
047502
054117
042520
051105
046040
047504

4646

002406

005015

077401

077577

4647

002416

002404

002414

027107

000177

4648 002416

4649 002416 022043 021041 023040

4650
4651
2225

046514
051522
054530

047516
052524
132

002514
002517

022537

000

002507

057

056133

002520

002524

1‘.’223 002646

047045

000122

4664

2222

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

1551 2><001><177>177><177><177>

:ALPHA=NUMERICS (OR FUTURE COMM TURNAROUND MSG)

ASCIT /#8!% &' v+ ,=.0123456789:; <=>7QABCDEF GHIJKLMNOPQRS TUVWXYZ/

050520
053526

LASCIZ

057135
EMSGH:

270\~ _%X?

.EVEN

06460445

OPBFPT: .ASCII

OPBUF:

OPEND:

.BLKB

/INXIA/

82.

;BUFFER FOR OPERATOR SPEC'D MESSAGES

: THE ABOVE THREE LINES MUST BE KEPT TOGETHER

4661

4662
4663

: ttttttttttttttttttttt'tttttttttttttl.tttttttQt.itt'tt.ttt"ttt't't"'

002646

002647

033

MsG8:

EMSGS:

.BYTE

;RECEIVE BUFFER FILL PATTERN

: DOWN~LINE=-LOAD MESSAGE DEFINITIONS

4667

;53 ;ENTER MOP MODE MESSAGE FORMAT

4,668

4669

- THE NODE WILL ENTER MAINTENANCE MODE ONLY IF THE PASSWORD MATCHES.

BYFE
.BYTE
.BYTE

sBINARY CODE FOR MAINTENANCE MODE
‘PASSWORD BYTE #1 LEGAL VALUE 0 - 255
..VALUE IN BYTE 1 IS DUPLICATED HERE

4670 002647
4671 002650
4672 002651

006
000
000

oLLMI:
PASS1:
PASS2:

002653

000

HERE.
0
PASS4: .BYTE
MOP MODE MESSAGE FORMAT
enren
6
E
DLLMIE:
:2:;MEMORY LOAD WITH TRANSFER ADDRESS MESSAGE FORMAT

4674

MESSAGE

“THESE THREE STORAGE AREAS MUST NOT BE SEPERATED !!!!

22;2

4,658

MSG6:

. tttttttttttttttttttfi'lttt'tttt.ttttttt..tt'tttQ.t.!t.Qtt.ttt...t.t"'

‘éS‘O

4657

:“INTERPROCESSOR TEST “ROGRAM'S (1TEP)"*

ASCIZ
EMSGS:

002470
002476
002504

EMSG4 :

002654
4675
4676

o
0

CZKMUAO kMS11-BL PDP=-11 DCLT
30-MAR-82 09:13
CZKMUA. P11

MACY11 30A(1052)
DLLM2:

002654

30-MAR-82 09:15 PAGE 23-15
DEFAULT MESSAGE DEFINITIONS AND TABLES
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

; CODE
{LOAD NUMBER

0
0

*LOAD ADDRESS LSB

:LOAD ADDRESS

IMAGE DATA
CLR

000006
001000
177560
000034
000004

1$:

000006

047502

MSG:

#1000,

MOV

226,024

BNE

000026
000026

0177560 R1

MOV
MOV
MOV
ADD
1ST8
BPL
Move

CLR
BR
LASCI!

PC.RO
#<MSG~.>,R0
4(n1>

18
(RO)+,6(R1)
18

an2b

:SET UP TTY

*MAKE ADDR.PIC
*ADDRESS MSG.
STTY READY?
SWAIT TIL YES
STYPE A CHAR
*KEEP GOING
‘SET UP POWER FAIL

naxe SURE T exr CLAER
JUMP ON
YOURSELF

<12><15>/800T HESSAGE WAS RECEIVED SUCCESSFULLY -END OF TEST!!/

051505

027115

003060

+ASCI2

027056
040517
043517
027056

DLLMZE:

.BYTE
.BYTE
.BYTE
.BYTE
.EVEN

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

OOOO

027015

4699

NEXT FOUR BYTES CONTAINS TRANSFER ADDRESS
;OF PROGRAM JUST DOWNLINE LOADED.

,..THIS PROGRAM STARTS AT ADDRESS 6.

sEND MEMORY LOAD MESSAGE FORMAT

SEQ 56

CZKMUAQ kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P1

MACY1! 30A(1052)

30-MAR-82

09:15

PAGE 23-16

DEFAULT MESSAGE DEFINITIONS AND TABLES

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

CMDBUF: .BLKB

KEYWD1: .WORD

QUALFG: .WORD

QUALVL: .WORD
HLPTAB: .WORD
.WORD
.WORD
.WORD
.WORD
LWORD
.WORD
.WORD
HLPEND:

82.

0
HLP1
HLP2
HLP3
HLP3A
HLP4
HLP4A
HLPS
HLP6

;BUFFER FOR OPERATOR COMMANDS

THIS LOC WILL =1 IF CLEAR TYPED, 2 FOR SHOW,
A & IF RUN WAS TYPED, S5 IF HELP WAS TYPED

THIS LOC HOLDS QUALIFIER VALUE (SIZE OR COPY)

:INDEX TABLE FOR REPORT °'RPT>' HELP MESSAGES

RHLPTB: .WORD
-WORD
.WORD
-WORD
.WORD
WORD
.WORD

RHLPEN: .WORD

:INDEX

DMCIND:

RHLP1
RHLPZ
RHLP3
PHLP%
RHLP5
RHLPé
RHLP?7

;END OF REPORT HELP TABLE

TABLE FOR KMS11 BASE TABLE DATA DESCRIPTION MESSAGES
.WORD
.WORD

DMUNKN
DMUNKN

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

DMC004
DMCO05
DMC006
DMC007
DMCO010
DMCO11
DM(CO012
DMCO13

.WORD
.WORD

DMCEND: .WORD

SHTYTB: .WORD

DMC002
DMCO003

DMC377

sNO KMS11 MESSAGES MUST FOLLOW DMCEND

YP?
SHTYP4
SHTYPS, SHTYP6,SHT
SHTYPO,SHTYP1,SHTYP2,SHTYP3,

; THE LIST OF BYTES BELOW ARE THE FIRST BYTES OF THE PREDEF INED MESSAGES
; USED TO °‘SHOW'' THE TRANSMIT AND COMPARE BUFFER CONTENTS.
SHTAB:

003332
014356
014366

.BYTE

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

.WORD
.WORD

HOO
MO1

SHTEND:

MODES:

;ADDRESSES OF MODE TYPES IN ASCII

SEQ 57

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 23-17
DEFAULT MESSAGE DEFINITIONS AND TABLES
-WORD
.WORD
. WORD
.WORD
.WORD

LOOPS:

;ADDRESSES OF LOOP TYPES IN ASCII

.WORD
.WORD
.WORD
-WORD
.WORD

; COMMAND LINE TRAVERSE LOCATIONS (USED BY ‘PSTRV'")
PSBUFA: .WORD
PSTREE: .WORD
.WORD
PSACT:
.WORD
PSCNT:
PSNUM:
,WORD
PSRADX: .WORD
PSNNUF: .BYTE
P$GDBD: .BYTE

[=lelelelalslel)

CZKMUAO KMS11-BL PDP=11 DCLTY
30-MAR-82 09:13
CZKMUA.P11

:LOC.
sLOC.
sLOC.
sLOC.
:LOC.
LOC.

TO HOLD ADDR. OF CMD LINE BUFFER
TO HOLD ADDR. OF PARSING TREE
TO HOLD ADDR. OF ACTION ROUTINE
TO BE A COUNTER LOCATION
TO HOLD NUMERIC VALUE FROM PARSE
TO HOLD RADIX USED(LO) AND +/=(HI BYTE)

RETURN =0 IF ENOUGH OF COMMAND FOUND
:RETURN CODE O IF NO ERROR FOUND

SEQ 58

CZrMUAQ KMS11-BL PDP-11 DCLTY
30-MAR-82 09:13
CZIKMUA.PY

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 23-18
MESSAGE BUFFERS AND POINTER TABLES
MESSAGE BUFFERS AND POINTER TABLES

.SBTTL

4785

TXBUF:

003400

.BLKB
.BLKB
.BLK8

: .BLKW

s TRANSMITTER BUFFERS

:RECEIVER BUFFERS
SON BUFFERS
: COMPAR]
TABLE FOR MESSAGE ADDRS. €& BYTE COUNTS

O0000O

sRECEIVER MESSAGE POINTER

;DEVICE TX ADDR

000000
000000
000000

.WORD
DVTXA:
CC:
«WORD
DVT
LT:
DVT
TXMTOT:
TTOTCC:
TCURAD:

OO0O0O0O0O0

: END OF MSG. PTR. TABLE

000000
000000
000000
000000

DVRXA:
DVRCC:
DVRCT:
RXMTOT:

OO0

PTFEND:

BUFLIM
BUFLIM
BUFLIM
180.

000000
000000
00900
00
000000
000000

LNCNT:

OCOOO00OD

.WORD
RX?TR:
-WORD
TXPTR:
CMPPTR: .WORD
"MPTOT: -WORD
¢r07CC: .WORD
CCURAD: -WORD

STADD:
ENADD:

BY18IT:

sOTHER MESSSAGE

MSGTYP:

. WORD

CURCC:
CPTRR:
CPIR:
CURADD:

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

TOTCC:

OFSET:
TEMP:

TEMP1:
TEMP?:

TEMPS:

TEMPS:
CONQTM:
CONTIN:

GOOD:
BAD:

INDEX:
INDEXE:

:CURRENT ADDR OF (MP BUFF TO ADD AT
:DEVICE TX CHAR COUNT

:DEVICE TX MESSAGE COUNT
;TX MSG TOTAL
:TX BUFFER CHAR. COUNT

:CURRENT ADDR. OF TX BUFF TO ADD AT
:DEVICE RX ADDR

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

sNUMBER OF OPERATOR AWAKE MSGS

:NUMBER OF NO BUFFS
:PASS COUNTER
:ERROR COUNTER
;START ADDR.

:END ADDR. FOR DUMP

:BYTE BIT FOR DUMP ROUTINE

ELATED STORAGE LOCATIONS

ERRCNT:

OO0 OOOOOOOOOO0O0O0O

NOBUF:
PSCNT:

:TRANMITTER BUFFER POINTER
:COMPARISON BUFFER POINTER
:CMP_MSG TOTAL
: COMPARE BUFFER CHAR. COUNT

:TYPE OF DATA 0=0°S,1=1 s 2=10°S,3=01"'S
&=CCITT,5=QUICK FOX,6=ALPHA/NUM,7=0PER

tx/nx/chp CHAR COUNT
*CURRENT RX POINTER
*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 CNTORL IN

SBYTE TO HOLD EXPECTED MESSAGE DATA BYTE FOR ERR REPORT
SBYTE TO HOLD RECEIVED MESSAGE DATA BYTE FOR ERR REPORT
sWILL CONTAIN POINTER TO KMS11 MESSAGES

:WILL CONTAIN POINTER TO LAST OF KMS1i MESSAGES

SEQ 59

15§
CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CIKMUA.PT
007272

00C000

MACY11 30A(1052)

BEND:

30-MAR-82

09:15

SEQ 60

PAGE 23-19

MESSAGE BUFFERS AND POINTER TABLES

.WORD

;LAST LOCATION IN BASE TABLE TO BE PRINTED

:MORE INDEPENDENT CODE SlORAGE LOCATIONS
POINTER TO BASE TABLE
0
8DATA: .WORD

$LOC. TO HOLD LOGICAL UNIT NUMBER
1LOC. HOLD PC OF CALLIN ROUTINE

LOGUNT: .WORD
PCADD: .WORD

0
0

RESFLG: .WORD
MODTYP: .WORD

O
0

SCLEANUP AND EXIT FLAG. 1=DO CLEANUP ROUTINESEXIT

.WORD

FHDPLX: .WORD

*MAINTENANCE LOOP TYPE (O=NONE, J=INTERNAL TTL,
1 2=CABLE, 3=MODEM-ANALOG LOOPBK (LOCAL)
: &=MODEM-DIGITAL LOOPBK (REMOTE), S=MOPS

OCLFLG: .WORD

007310

000000

MLTYP:

007312
007314

000000
000002

PARAM:

.WORD

TLOC TO HOLD FLAG (=1) THAT A RESTART WAS GIVEN
:DCLT MODE OF OPERATION TYPE
(0=REC-ONLY, 1=TX=ONLY, 2=PASSIVE-LO0PBK
t
"3=ACTIVE-LOOPBK, 4=DOWN L.L., S=TALK, 6=LISTEN)
*
SFULL OR MALF DUPLEX FLAG (1=FULL
*PROGRAM PARAMETERS

O=HAL, DUPLEX)

P BITO= STATUS MSGS TO OPR PRINTED (1=YES)

: 8111- DATA CHECKING DONE ON RCVD MSGS (1=YES)
: g{ggHOE(IRANSHIT) RCV'D MSG. (PASSIVE) (1=YES)

: BIT4= CRC CALC./CHECK DONE (1=YES)
: BITS= PROTOCOL EMULATION (1=YES)
007316
007320

000000
000000

RPASS:
FLAG:

.WORD
.WORD

O
O

;MODE DISPATCH TABLE

MODE:

.WORD

RXONLY

.WORD
.WORD

PLCK
ALCK

.WORD

LISCK

.WORD

.WORD
.WORD

.SBTTL
CLKCSR:
CLKBR:
CLKVEC:
CLKHZ:

.WORD
.WORD
.WORD
.WORD

000000
000000

;RX ONLY DISPATCH

TXONLY

;TX ONLY DISPATCH

DLL
TALCK

:DOWN LINE LOAD DISP
:TALK MODE DISPATCH

:PASSIVE LOOP BACK DISP
:ACTIVE LOOP BACK DISP
:LISTEN MODE DISPATCH

CLOCK TABLES, EVENT LOG AND POINTERS
;CLOCK CSR ADDRESS
0
INTERRUPT LEVEL
:CLOCK
0
:CLOCK INTERRUPT VECTOR
0
;CLOCK'S HERTZ RATE
60.

:CLOCK'S CSR VALUE TO INTRPT. ENA'LE IT

TIMMIN: .WORD

sPLACE TO KEEP TIME~SINCE~-START

TIMT(K: .WORD

sPLACE TO KEEP # OF TICKS/SEC

TIMER]1: .WORD

;EVENT TIMER #1 (TICKS)

.WORD

TIMSEC: .WORD

007362
007364

:DEVICE FLAG WORD

CLKEN:

000

: BIT6= SPARE
*PASS NUMBER FROM RUN COMMAND

TIMER2: .WORD
TIMERS: .WORD

0
O

:EVENT TIMER l (TICKS)
#3 (SECONDS)
:EVENT TIMER

J
CZKMUAQ kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11
4895
4896
4897
4898
4899

007366
007370
010272

4901
4902
4903

010274

4906
4907
4908
4909
4910
4911
4912
4913

010276
010300
010302
010304
010306
010310
010312
010314

007370
000341
000001

4900

4961
4942

4943
4964
4945
4966
4947
4948
4949
4950

EVIPTR: .WORD

PAGE 23-20

VILOG

;POINTER TO NEXT FREE SPACE IN EVENT LOG

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

EVTLOG: .BLKW
EVTEND: .BLKW

25.
1.

.SBTTL

MODEM DATA SECTION

MODS:

.WORD

sMODEM STATUS

MOBITS: .WORD
.WORD
.WORD

(TS
DSR
DCD

sCLEAR TO SEND (CIRCUIT (B)
:DATA SET READY (CIRCUIT €C)
:DATA CARRIER DETECT (CIRCUIT CF)

.WORD
.WORD

RI
SQD

:RING INDICATOR (CIRCUIT CE)
:SIGNAL QUALITY DETECT (CIRCUIT CG)

MOBITE:

WORD

RTS
TM

;REQUEST TO SEND (CIRCUIT CA)

:MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM)

;TABLE OF ADDRESSES OF MODEM SIGNAL MESSAGE POSITIONS
010314
010316
010320
010322
010324
010326
010330

MOMSGS: .WORD
.WORD
.WORD

EVM(CTS
EVMDSR
EVMDCD

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

+WORD
WORD

EVMRI
EVMSQD

;RING INDICATOR (CIRCUIT CE)
C
sSIGNAL QUALITY DETECT (CIRCUIT

JWORD

LWORD

EVMRTS
EVMTM

:REQUEST TO SEND (CIRCUIT CA)

;MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM)

010362
010364
010366
010370
010372
010374
010376
010400

SO0 nAWNES

= OO NNINWVINNIWSN

d
b
b
e
b e

010332
010334
010336
010340
010342
010344
010346
010350
010352
010354
010356
010360

S OWONN—SON
NN =
O\J\lg

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

4920
4921
4922
4923
4924
4925
4926
4927
4928
4929
4930
4931
4932
4933
4934
4935
49356
4937
4938
4939
4940

09:15

EVENT LOG TABLE AND ITS NEXT ENTRY POINTER

.WORD

[+ 324 1%. 1% SN

4914

4915
4916
4917
4918
4919

30-MAR-82

CLOCK TABLES, EVENT LOG AND POINTERS

;TABLE OF MODEM SIGNAL BIT DEFINITIONS

[elelalelelelelolelalele]

4904
4905

000000

MACY11 30A(1052)

EVTLST: .WORD

EDTXQ

;TRANSMIT MESSAGE QUEUED

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

EDDVI
EDDCK
LPO
EDDLE
EDDDE
EDEOP
EDABO

:DEVICE INITIALIZE STARTED
:DATA COMPARISON DONE
:NULL STRING
:DATA COMPARE LENGTH ERRGR
:DATA COMTM*RE DATA ERROR
END OF PA>S
C ABORT
;*

JWORD
.WORD
-WORD
.WORD

EDTXC
EDRXQ
EDRXC
EDDER

:TRANSMIT OF MESSAGE COMPLETE
:RECEIVE MESSAGE SPACE QUEUED
:MESSAGE RECEIVED - RECEIVE COMPLETE
:DEVICE INFORMATION

:::FOLLOWING TABLE USED IN DOWNLINE LOAD ROUTINE.
sise CONIAINS POINTERS TO AS(CIZ DEVICE DESCRIPTIONS

020246

DLLIND: .WORD ~ DPM
DUM
WORD
DLM
LWORD
DQM
.WORD
DAM
.WORD
DUPM
.WORD
DMCM
WORD
DNM
.WORD

CZKMUAO KMS11-BL PDP=11 DCLY
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

.WORD

PIPDA)
b b
ek

®
S NOONSNO &

.WORD
.WORD
.WORD
+WORD
.WORD
.WORD
LWORD
.WORD

F 9

b el cad

il wnd

[elelelelelelele

.WORD

-—bd

09:15

MODEM DATA SECTION

PAGE 23-21

DLVM
DMPM
DTEM
DVM
DZM
UNKM
KDPM
KDZM
KLM
DMVM

;LOCATIONS USED DURING EVENT REPORTING

000000

EVTSEC:
EVTMIN:
EVTTCK:
EVTADD:
EVIBCT:
EVTITMP:

WORD
WORD
MWORD
JWORD
WORD
WORD

¥
0
0
0
0
O

s TEMPORARY LOCS TO KEEP EVENT TIME WHILE REPORTING
TEHP LOC. TO HOLD ADDRESS DURING EVENT, REPORTING
*

BYTE COUNT

OTHER DATA

*“'

:REPORT CODING DISPATCH TABLE
025324

RPTDSP:

025536
000000
000000
000000
000000

DEV1:
DEV2:
DEV3:
DEV4:

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

RPTTXQ
RPTTXQ
RPTTXQ
RPTTXQ
RPTDER
RPTDVI
RPTDCK
RPT
RPTDLE
RPTDDE
RPTEOP
RPTABO

WORD
WORD
.WORD
LWORD

0
0
0
O

s TRANSMIT QUEUED ENTRY DECODING

:TRANSMIT COMPLETE ENTRY DECODING

;RECEIVER QUEUED ENTRY DECODING
:RECEIVER COMPLETE ENTRY DECODING

:DEVICE ERROR ENTRY DECODING

:DEVICE INIT ENTRY DECODING
:DATA COMPARISON ENTRY DECODING
:PLACE HOLDER
:DATA COMPARISON LENGH ERROR
;DATA COMPARISON DATA ERROR
END OF PASS
:4C ABORT

sTEMP LOCS TO HOLD DATA FOR EVENT REPORTING

AND SHOW MODE,... SUBROUTINE

L
CZKMUAQ kMS11-BL PDP=-11 DCLY
30-MAR-82 09:13
LZKMUA.PTY

COMMAND LINE ACTION TREE

SAHPLE CLI TREE NODE

5011

010502

MISS DISPLACEMENT

]

ONLY IF 'MISS'' ARGUMENT DEF INED

! NEXT NODE DISPLMNT

ONLY IF “ASCII'® ARGUMENT DEF INED

! ASCIZ MATCH STRING
(.EVEN)
!

ONLY IF ‘ASCII’* ARGUMENT DEF INED

CLITRE:

sFIRST KEYWORD

N10S:

N4L2S:

PA,0,N108
CLISPA,

sSKIP ANY LEADIN SPACES

CLIEXI.O
CLISTR.HLP,N43S,<'HELP'>
CLIEXI.O

*"7IF YES DO "HLP'* AND EXIT
‘ELSE, IS FIRST WORD A "HELP''
S IF'YES DO ‘HLP' AND EXIT

CLIEXI.O
CLISTR.RUN,N46S,<'RUN'>

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

<*2>,HLP.NG2S

CLISTR.PRNT ,N44$,<'PRINT'>
CLIEXI.O
CLISTR.EXIT,NGSS, < EXIT*>

N43S:
N&4S:
N45SS:

cLI8R,H,N80S
CLISTR nomur N4OS,<'DUMP'>
cLIBR,0,N50

N46S:

CLISTR, CLEAR N20$,<"CLEAR'>
CLIBR, NOTNUF.N100$

N4OS:

<'S>,NOTNUF ,N30$

N20S$:

CLISTR suou uzss <'HOW'>

CLIBR,O

ELISTR Onsos <ET'>

N25$:

cLIBR, 0 N11
CLIERR,0

N30S$:

LIS THE FIRST NON=SP CHAR A '*?''

ELSE. IS FIRST WORD A ‘PRINT'’
1FYES DO ‘PRINT*' AND_EXIT
ELSE IS FIRST WORD AN "EXIT"
IF"YES DO ‘RUN'' & GOTO N8OS
ELSE. IS FIRST WORD A ‘DUMP'’
.
IF"vES GOTO N8OS
‘ELSE. IS FIRST WORD A "‘CLEAR'’
. IF ES DO ''CLR & GOTQ N100$
:ELSE, IS FIRST CHAR. A 'S’

IF YES IS REST OF WORD °‘HOW''

_ IF YES, DO “'SHOW''.BR N100S
: ELSE, IS'REST OF WORDBR "¥T'’
N110$
_IF'YES, DO ‘'SET’‘,
:
*OTHERWISE “ILL CMD'* = EXIT
:

N83S$:

N84S:
N85$:
N86S:

g Sug Sup Sug Gg Smeg

N82S:

g $uug Sumg

N80S:
N81S:

EICIICICIIIIICHICICY [ala)
—r——r
e ee -~

010706
010712
010726
010732
010750
010754
010772
010776
011014
011020
011036
011042
011066
011072

g Gomg g b

;SECOND KEYWORD (MODE=) FOR RUN COMMAND

Smag

5032
5033
034
5035
5036
5037
5038
5039
5040
5041
5042
5043
5044
5045
5046
5047
5048

(ALWAYS AT LEAST 1 WORD)

! CHAR CODE !

' ACTION

010502

SEQ 63

MACY1 30A(1052)c 30-MAR-82 09:15 PAGE 23-22
OMMAND LINE ACTION TREE
.SBTTL

5008

CLISPA,0,N308

:SKIP_LEADING SPS. IF, NONE<ERR

CLIBR,0,N115S

IF YZS, DO ‘LISTEN'',BR N115$

cusm NOTNUF ,N308., <'MODE*>
<'=>,0.N30$
CLISTR] mvnoo N82S,<'ACTIVE'>
CLIBR,0.N11
CLISTR PASHOD N83$.<'PASSIVE'>
CLIBR,0.N11
CLISTR aecnoo N84S, <'RECEIVE'>
cLIBR,0.N
CLISTR usnoo NB5$,<'LISTEN'>

:IS NEXT WORD “MODE='
“""IF_NO, IT'S WRONG =ERR ~EXIT
;IS NEXT WORD '‘ACTIVE'’
: "IF_YES, DO "'ACTIVE'',BR N115$
IS NEXT WORD 'PASSIVE"
IF_YES, DO ‘PASSVETMBR N115$
-IS NEXT GORD *RECEIVE”
: "IF_YES, DO ‘RECVETM,BR N115$
IS NEXT WORD ‘LISTEN"

EL1STR BLLMOD.NBES., < rowummb > IF_YES,
";is DONExT'DWNLL".BR
worp ‘Dow..."
Niis
cL18R,0,NT158

<'1>,0,N308

LIS NEXT CHAR A *T"

mnS

— b d O
VI
=~
nNO SO
b amd b

OO
NNONON

) =

b ad

b
e
e

b cd
d
b
b

b
—b

W NN
o o NN oo o NN
N
O~ N onN[+ 1381

OoOr OO

b e
o
ol

b
b
b
b
b

nguuw
OSSN
=

— ad

(elelolela)

b b
i cd

-t
b b

b b

(=lelolelelalele)

30-MAR-82 09:15 PAGE 23-23
C OMMAND LINE ACTION TREE

cLI

N878:

LI
(LI
cLl
CLI

CLISTR.CSHEXP,N104$,<"EXPECT*>

N104S:

CLI

< TRANSMIT'>
CLISTR.CSHTRN,N30S,

cLl

CLIEXI.O

cLl
CLI
cLI

IS REST OF WORD '‘RANSMIT®'
IF_YES, DO °'‘TRANSM'',BR N115%
IS REST OF WORD '
IF YES, DO ‘‘TALK'',BR N115%
IF NO, ERROR - EXIT

;SKIP LEADING SPACES, NONE=ERR
IS NEXT WORD 'EXPE...
; IF YES, DO CLR-EXP,EXIT
1S NEXT WORD “TRANS..''

: IF YES, DO CLR=TRN,EXIT

:IF NO = ERROR ~ ExIf

cLIBR.0.N12
CLISTR sevrau N30$,<' TRANSMIT'>
CLIBR,0,N1208

sGET ADDRESSES FOR DUHP COMMAND

NSOS:

CLl

N528:

CLI

N51$:

CLI

cLl
cLl
CLI
cLl

cLl

CLIALP,0,N518

CLISPA.0.N528
CLIOCT .DMPS,N30$
<'=>,NOTNUF.N125$
chocr DMPE_N30$
<'/>, NOTNUF 'N125$
<'8>.pMPa,N30$

CLIBR.O, nizss

QUALIFIERS FOR THE RUN COMMAND

N1158:
N114$:

CLI
CLI

CLIALP,0.N114$
<'/>.NOTNUF ,N125$

N1168:

CLI
cLl

<*C>,0.N1178
CLISTR.CHECK N1178,<"HECK'>

cLl

CLISTR NO,N116S,<'NO*>

cLIBR,H.N1158

cLl

‘\bsw
39S

N1178:
N1188:

CLI
Ll
CLI

CLISTR,STATUS ,N1188,<'STATUS'>
CLIBR,0,N1158
CLISTR ECHO N130$.<'ECHO'>

N130S:

CLI

CLISTR,O, n131s <C'PASS'>

cLIBRr,0.n

N132$:

N
N

Y.
N
OO

CLISTR,CRC,N30S,<'RC16'>

cLIBR,0.N1158

o
O

=
b e
b

Jror-GurGuur-gurd

QOO0

NN-A—.—.-A-Aoog
= OO0
NN
=

CLISPA,0,N30$

CLI

cLl

cLIBr,0.N1158

b
b
—

b
b
b
b

QOO0

purd

b and cond o

ViAW

wmd

cL1BR,0,N1158°
CLISTR TALHOD N30$,<'ALK'>
cLIBR,0,N

N102S:

:N1138: CL]

WAL

CLISTR,TRAMOD ,N87$,<"RANSMIT®>

;SECOND KEYWORD (FOR CLEAR_OR SHOW)

N100S:

N1128:

b
b

OO0O0O00O

MACY11 30A(1052)

:SECOND KEYWORD (FOR SET)
CLISPA,0,N30$
N110S: CLI
CLISTR ssrsxp N1128,<"EXPECT'>
N111$: CLI

b e

(elelolele)

(elelel)

CZKMUAQ KMS11-BL PDP=11 DCL;
30-MAR-82 09:1
CZKMUA.PN

SEQ 64

cLl

N131$: CLI

CLIBR,0.N
6u132: <'LOOP'>
CLxsré
CLISTR.HOSC.N30$.<'HODEH'>

:MODEM ACTION

BT e Yo Yo Yo Yo No Yo Yo NV IV IV IV IV 1V 1V,

30-MAR-82

PAGE 23-24

09:15

COMMAN D LINE ACTION TREE

CL!I

CLIBR,0,N115$

;GET MESSAGE TYPE FOR SET MESSAGE COMMANDS

N120$:

CLI

<'=>,0,N308

LOOK FOR DEFAULT MESSAGE NAME
:
CLISTR,CMSGT,N61S,<'ONES'>
CLI
N6OS:

N61S:
N62S:
N63S:
N64S:

N65S:
N66S:

N67$:

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

cLieRr,f.n1218
*>
$,
<" ZEROES
CLISTR,CMSGO ,N62
CLIBR,0.N121
S,
< 1ALT">
CLISTR,CMSG2 ,N63
cLIBR,0,.N121$
CLISTR,CMSG3 ,N64S,< OALT*>
cLIBR,0.N121$
CLISTR,CMSGS N65S.<" ITEP*>
cLIBR,0,N121
CLISTR,CMSG4 N66S,<*CCITT'>
cLIBR,0,N121
CLISTR,CMSG6 N67S.<'ALPHA'>
cLIBr,0.nN1218
CLISTR,SETET,N68S,<' TRANSMIT®>
CLIBR.0,N125$

LOOK FOR QUOTED MESSAGE
:
<''S>,0PRMSG,N30S
CLI
N68S:
ENDQO,N71S
<S>
(LI
N70$:

N718:

N728:

N738:

cLl
CLI

CLIBR,0,N121$
CLISPA.O,N728

cLl

CLIBR,0.N708

CLI

CLIALN.O .N73$

;ONLY A-2,SP,TAB, OR 0-9 BETWEEN ‘**'S

CLIERR ,BADCHR

;PRINT ERROR IF NONE LEGAL CHAR FOR °'"S

:GET QUALIFIERS (SIZE OR COPY) FOR SET MESSAGE COMMANDS

N121$:
N1238:

LI
(LI

N1228:

CLI

cLl
cLl

cLl

CLIALP,0,N123$
<*/>,NOTNUF ,N1258

CLISTR,SIZE .N1228.<'SIZE*>
CLIBR,0,N1268
CLISTR,QCOPY ,N30S,<'COPY*>
cLIBR,0,N1268

;NUMER FOR SIZE OR COPY
<'=>,0,N308
N126$: CLI
CLIDEC NUM,N30S
Ll

cLl

cLIBR,0,N1218

;GET MAINTENANCE LOOP TYPE FOR RUN °LOOP'’ QUIALIFIER

b
b ad cud cub ad
b

WIS
N = O

d\l\l\nmgw—'-‘\l\lv’mwmd
F
¥ NeoY
JoP NoF JoF doPJalpVlo
1,8

b b cd i b cad
b and anb cwd cnd a=d
—d b ad
- o and

b b e cud
b and b cmd

b and d
b e ed

[eleoleolelalelelelalalelelelelele]

ah omd
b e

b e

[elelelelelele]

WD) = OO 00 N O\ 8 NN =2 © N0 00 O VS AN = © 0 00 NN N BN = OO 00 NOMN S WY

011506

b e
- e

e e wd ad D b

€0 0o 00 0000 00 N NO»

MACY11 30A(1052)

011502

0@03\10\11

D b wd D

) b cad b

D b D o =D d —d e

b o

b amd e

e e o

b b i

b ed e o e

b o

e nd D b

CZKMUAO KM>11-BL PDP=-11 8C
CZKMUA.P11
30~-MAR-82

N140S:

CLI

<' =>,0,N

N1418:

CLI

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

N1428:
N143S:
N144S:

Ll
CLI
Ll
CLI
cLl

CLI

cLIBR,0.N1 158
CLISTR,CBLLOP,N143$,<"CABLE*>
CLIBR,H,NT15S
CLISTR,LMDLOP.N144$,<'LOCALMODEM®>
cLIBR,0,N1158
CLISTR,RMDLOP,N30$, <'REMOTEMODEM'>

CZKMUAO kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.PT1

MACY11 30A(1052)

30-MAR-82

OO0

D
d
d
b
b
b e

0000000
NONN
NN —

PAGE 23-25

COMMAND LINE ACTION TREE

CLI

(O (U RO IV, [V [V, [V, IV, ]

09:15

CLIBR,0,N115%

T LINE NUMBER FOR "PASS'' RUN QUALIFIER
<'=>,0,N $
08: CLI

1
1

D-

58:

CLI

CLIDEC PASC N30$
CLIBR.O,.N115S

CLIEXI,O

SEQ 66

30-MAR-82

09:15

PAGE 23-26

COMMAN D LINE ACTION TREE

.WORD

000000
000000

.WORD
-WORD

000000
000000

-WORD
.WORD

000000
000000

.WORD
.WORD

INVEC:
OUTVEC:
INTPR]:

WORD
.WORD
.WORD

ERRTBL

000000
000000
000000

.WORD

;ADDRESSES OF REGISTERS SELO THRU BSEL7

000000
000000

b wh
nd
b ad e
i
il
D
—d e

LS ST ST ST ST NI, ST, 1, ST, S 1 5]
NININLININININLINININONOND)
At
b B b OO OO
OO
NINO0O OO

(elelelelelalelalelalola)

;DEVICE DEPENDENT STORAGE LOCATIONS FOR
s CURRENT DEVICE PARAMTERS

=200V
OV

MACY11 30A(1052)

A NN

[
1a%

VIV

VWAV VIV N

n N NNNNNNNNNNNNNNNNNNMNNNNNS
SS WNNANND PININININININININ)
&H
b =D cd d ed b ccd ccd D e

S NN = OO
NN WN—=0O VOO NONWN

CZkM AQ KMS11= BL PDP-11 DCLTY
P
30-MAR-82 09
CZKMUA.PT

s INPUT INTERRUPT VECTOR ADDRESS
sOUTPUT INTERRUPT VECTOR ADDRESS
s INTERRUPT PRIORITY

SEQ 67

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

GLOBAL TEXT SECTION

09:15

PAGE 23-27

GLOBAL TEXT SECTION

5258

.SBTTL

5261
5262

; THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,
: MESSAGES, AND ASCII INFORMATION THAT ARE USED IN

5264

5259
5260

ctt

: MORE THAN ONE TEST.

5263

5265

DEVICE SUPPORTED

g%gg

.SBTTL

gggg

: NAMES OF DEVICES SUPPORTED BY PROGRAM
DEVTIYP <KMS11-BL,KMS11-8M>

5270

(4)

(3)

(3)
(3)

(2)

012230

012236
012244

046102
030461

045454
041055

051515
000115

5290
(L)

012252
012252

r3)
(X))
(3)
(3)

012260
012266
012274
01c%¥2

5291

§292

5299
5300
5301
5302
5303

/KMS11-BL ,KMS11~

.EVEN
PROGRAM [DENTIFJICATION
.SBTTL
ION
: TEST DESCRIPT

5287
gggg

(2)

LSDVTYP::

LASCIZ

012230 046513 030523 026461

5271
5277
5286

(3)

SEQ 68

DESCRIPT

012252 055103 046513 040525
020060
026461
050104
041504

012310

046513
0646102
030455
052114

030523
050040
020061
000
EVEN

LSDESC::

LASCIZ

.EVEN

/CIKMUAO KMS11-B

E
CIXMUAQ KmS11-BL POP-11 DCLTY

(ZKMUA. P11

/DCLT>/
JRPT> /

JINIA2ILL CMD-BAD SYNTX?/
JINIA?INCMPLTE CMD?/
/INIAINUM TOO BIG?/
/INTA?BAD RADIX?/

/INIA?'LOOP'" VALID ONLY IN ACTIVE?/
JINIA?'ECHO'* VALID ONLY IN PASSIVE?/
/INIAZILL CHR= *A=Z,0-9,SP,TAB' ONLY?/

7INIA?*SIZE=0"' NOT VALID?/

JINIAITRANSMIT € EXPECT LIST MUST BE IDENTICAL FOR LOOP?/
/SATTELITE PASSWORD= /

/INIATRIS 1S DCLT. TYPE 'M'* OR **?'* FOR DETAILS/

10 A

/INIT/
/DCLT CMDS:/

CLEAR OR SHOW

PRINT/<15><12>

EXPECTLIST OR TRANSMITLIST/<155><12>

EXIT/<15><12>
DUMP START-END/B?
SET EXPECTMSG OR TRANSMITMSG=TYPE/SIZE=N OR /COPY=N?
SET EXPECT=TRANSMIT/
TYPE=ONES , 2EROES, 1ALT ,0ALT ,ITEP,CCITT ,ALPHA?

OR ''OPR SPCD=A-1,SP,TAB,0-9 IN QUOTES'Y/

TUL

RUN MODE=MTYP/LOOP=LTYP/CHECK,STATUS,ECHO,MODEM,PASS=N?
MTYP=TRAN,REC,ACT,PAS,TAL,LIS,DOWN/<15><12>
LTYP=INT,CAB,LOC,REM/
JINIATYPE "M OR “TM'FOR HELP !/

i Y
g g g B Bame g g g g ) P Pl P N P N P N
g P

s Ny 0

0
0
8
8
0
6
6
0
0
@
¢
¢
®
0
6
&6
6
e

o
o
s

WMWS=WW=000O
N HOWNWNN
VIO

N N N N I NG NG N N N N N N N N N N N N N N N N N N N N N N

EEBEEBBBBBBB>

047517
052116

000076
000040
064477
044477

G
S S S S S S S S SS Y 23333
I SE R RERT
S VLUV
X X
eX eX X
LnmLILnLmmInumummunmnmonumnnnn [7.X7.Y7 X X

052114
037124
0460445
040445
022516
022516
022516
022516
040445
022516
0460445
052124
022516
022516
052114
046103
051120
054105
046525
052109
042523
052040
020040
052522
020040
046040
040445
046103
020107
044530
050114
042523
051501
042523
040445
040445
047522
042516
052114
046101
052111
050105
050114
051120
V42503
047101
051501
052103
047127
046101
052123

041504
050122
047045
047045
045
065
045
045
067045
045
047045
040523
045
045
041504
040
040
040
042040
051440
040
020040
040
040
040
020040
047045
104
047514
105
042510
040502
102
060502
047045
047045
042532
117
040461
060
041503
052111
101
117
042522
051124
120
101
047504
124
064514
000
046057
111

NN =B =ONON)

012310
012316
012326
012354
012377
012621
012441
012503
012542
0126
012644
012734
012761
013037
013044
013057
013133
013143
013152
013174
013261
013306
013365
013443
013533
013602
013632
013671
013714
013747
014000
014032
014071
014130
014202
014242
014276
014305
014312
014317
014324
014332
014337
014345
014356
014366
014377
014407
014416
014433
014440
014447
014450
014457

X
e X X X X Y X 7 N T XY NV N7 R a0
wunuvmununmnnn
OV
CICIICICIOICICICIOICICICICIONAIOICION
IOV EIIIIICIOINOIIOIOIO EFICICICIIIOVNOIOICIIOIOIOIOIOHIOI
S
S
Bumg
Sy
S
Bmg
g
g
Brug
Brung
S
g
St
g
g
S
By
g
Bun
G
Smg e P Guig $ncg Sy Sng Sring Sumg By S
g g Sy Boumg Sumeg Srumg g Guing S Srumg Brng g Smng Brug Bumg Sunng g Sy Sy g S By S

GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

O==

9310
$311
531§
9313
5314
5315
5316
5317
5318
€319
5320
5321
5322
5323
5324
5325
5326
5327
5328
5329
5330
5331
5332
5333
5334
5335
5336
5337
5338
5339
5340
5341
5342
5343
5344
5345
5346
5347
5348
5349
5350
5351
5352
5353
5354
5355
5356
5357
5358
5359
5360
5361
5362
5363

MACYT 30A(1052)G 30-MAR-82 09:15 PAGE 23-28
LOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

ON)

5305
5309

X0-MAR-82 09:13

/DCLT REPORT CMDS :/

/L0G - PRINT DCLT EVENT LOG/
JEXIT = EXIT REPORT LEVEL/
/HELP - PRINT THIS MESSAGE/
IBASE/ERROR = PRINT ONLY ERRORS!
IBASE/FULL = PRINT ENTIRE TABLE!

IBASE/OFFSET=NNN - PRINT SINGLE LOCATION!<15><12>

7INIABASE OF FSET=Y03%A T00 gxc 1/
2INYAMSG: TYPE=ITIA/SI2E=XD3?

/1EROES/
/ONES/
/1ALT/
/0ALT/

/CCITT/
/1TEP/
JALPHA/
/OPR SPEC/
/RECEIVE/
/TRANSMIT/
/PASSIVE/
/ACTIVE/
/DOWNL INELOAD/
/TALK/
JLISTEN/
7
?/L00P=?
?INTERNAL?

SEQ 69

CZKMUAO KMS11-BL POP-11 DCLT
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-29
GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

000

LP2:
LP3:
LP&:
PNST:
PST:
PNCK:
PCK:
PNEC:
PEC:

LASCIZ
JASCIZ
-ASCIZ
.ASCII
CASCIZ
.ASCII
LASCIZ
.ASCII
.ASCIZ

72CABLE?
2LOCALMODEM?
7REMOTEMODEM?
/NO/
/STATUS/
/NO/
/CHECK/
/NO/
/ECHO/

046505
046101
000

PNMS:
PMS:
LISP:
OPRMM:

.ASCII
LASCIZ
.ASCIZ
.ASCIZ

/NO/
/MODEM/
/INXALIS>/
/TLK>/

5364
5365
5366
5367
5368
5369
5370
5371
gg;g

014470
014476
014511
014525
014552
014536
014540
014546
014550

040503
047514
122
116
123
047516
044103
047516
041505

046102
040503
046505
117
040524

000105
046514
052117

041505

000113

047510

5384
5385
5386
5387

014555
014557
014565
014576

116
115
045
046124

117
042117
022516
037113

5388

5389

014603

$390
5391
5392
5393

126

014642

044510

052524

020123

LS5060:

.ASCIZ
.EVEN

/THIS A SO. OR 60. HZ. LSI~11:/

* FORMAT STATEMENTS USED IN PRINT CALLS

gggg

’
5396
014642 0467045 0406445 047504 DLLCM:
$398 014714 067045 0460645 040502 NOCLK:

5397

.ASCIZ

/INXADOWN LINE LOAD COMPLETED SUCCESSFULLY/

/INTABAD CLOCK - PROGRAM WILL HANG ON ‘‘TIMEOUT''!!/

5399
5400
5401

014775
015035
015053

115
102
045

054101
043125
022516

020056
042506
022524

TABEX: .ASCIZ
BUFEX: .ASCIZ
MSGTRN: .ASCIZ

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

5611

015225

045

022516

032523

SHF1:

.ASCIZ

?XNXS5XSSXSSXA/XITIA/XTIA/XTIA/XT?

5613
5414
5415

015265
015330
015362

045
047045
051445

032523
051445
022465

040445
022463
041501

EFM2:
PCPM:
EFM11:

,ASCIZ
.ASCIZ
.ASCIZ

/XSSTATOTAL MISMATCHES IN MSG= XD5/
/XINXS3XACALLED FROM P(=206/
/XSSZACOMPARE COUNT=XD5XS3YARECEIVE COUNT=XD5/

5402 015104 047045
045
5403 015167

040445
022516

044103
032523

5417

5433

5434

/INXACHAR. COUNT EXCEEDS BUFF LIMIT - MSG TRUNCATED/
2INISSTAMODE=XTXTITIA/PASS=325?

:EVENT DESCRIPTION MESSAGES

gz}g
54620 015437
5421 015463
5422 015512
5423 015537
5424 015565
5425 015602
5426 015632
5427 015660
5428 015715
5429 015750
5430 015764
gzg; 016021

MSGTRU: .ASE{%
.AS
SHFO:

124
126
042522
122
106
040504
042504
040504
1064
047105
041101
136

040522
04052§
2503
041505
053105
040524
044526
040524
052101
020104
047516
020103

051516
051516
053111
044505
041511
041440
042503
041440
020101
043117
046522
041101

EDTXQ:
EDTXC:
EDRXQ:
EDRXC:
EDDER:
EDDCK:
EDDVI:
EDDLE:
EDDDE:
EDEOP:
EDMOS:
EDABO:

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

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

L LT R L L L
e
T

:THESE TWO STORAGE AREAS MUST NOT BE SEPERATED !!!!

SEQ 70

CZKMUAO KMS11-BL PDP=11 DCLT
30~MAR-82 09:13
CZKMUA.PT

5446
5447
5448
5449
5450
5451
5452
5453
5454
5455
5456
5457
5458
5459
5460

5461
5462
5463
5464
5465
5466

5467
5468
5469
5470
5471
5472
5473
5474
5478

:EVENT REPORTING MESSAAES

020040

040502

042523

BASMIA:

.ASCI 4

016047
016056
016065

045
051445
045

031523

047445
033117
033117

BASM3:
BASM?2:
BASM1:

+ASCI 4
.ASC} 4

/353%03/
/%53%06/
/INX06/

052101

NULEVT:
EVTFO:
EVIF1:

016073
016133
016226
016255
016327
016341
016356
016400
016502
016600
016657

016743

.ASCIZ

040445

EVIF2:
EVTF3:
EVTF3C:
EVTF3D:
<AS
EVTFé4:
EVTF4A: .
EVTFé4B:
EVTIF5A:

034523

EVMOCG:
:

NIPNIPNINNNNNNNN

5444
5445

SEQ@ M

MACY1 30A(1052)G 30-MAR-82 09:15 PAGE 23-30
LOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO

016032

~
(=
(=
&~ He
[V IV IV 1V [V, [V, LV IV 1V, IV, ] wn

5437
5438
5439
5440
5441
5442
5443

+ASCIZ

BASE TABLE/

7INXATHE DCLT EVENT LOG IS EMPTY?

FINIA>>ODCLT EVENT LOG ENTRY <<<<C<CLLLLLLLLLLLLLLLLLLLLLCLLL?
/INIDSZA:X22%XA:X22%S3%XT/
/INYS3TAADDR OF MSG=X06XS3XABYTE COUNT=ID5/
/INXSIXTIN/
/XS3%06X53X06/

7¥S3%06XS3X06XS3XT1/

/INYSIXAADDR OF MSG=Y06XS3XABYTE COUNT=XDSXS3IXANO. OF CMP ERRS=%D5/
/JINISSZAADDR OF MSG=Y06YS3IXARX BYTES=XDSXSIXACOMPARE BYTES=XD5/
F
F S=XD5/
/INISIXAPASS=2DSYSIXAERRORS=XDSXSIXANOBU
/YSSXABYTE # IN MSG.=XDSXS3XAEXPTD=X03XS3IXARECVD=X03/
/ANISOTACHANGED TO:/

2332322222222 2222232228

AR AR

R ddditdiialiiatdiidd)

;DO NOT SEPERATE THE NEXT LIST OF MESSAGES ~ MODEM SIGNAL HEADER AND REPORT

016766
017046
017063
017067

017073
017077
017103
017107
017113
017117

QO = b e b auh
O WIN NN
NN
OOO0O00O00O0

5435
5436

130

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

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

/INXSBXAMODEM STATUS: CTS DSR DCD RTS RI
/INTS9XSIXSSTA/
*X,40,40,40
*X,40,49,40
*X,40,40,40

*X,40,40,40

SQD TM/

CZKMUAOQ KMS11-BL PDP-11 DCLY

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

BASE TABLE ADDRESS

.SBTTL

09:15

PAGE 23-31

BASE TABLE ADDRESS

:THIS SECTION IS USED BY A M9301-YJ BOOT ROM FOR DOING DOWN-LINE-LOAD.
;MUST BE IN THE AREA OF ‘017370 + 256. BYTES'' + A FEW

222230010000 BEWARE !!!! DO NOT ALLOW THE ABOVE ASCIZ MESSAGES TO EXPAND INTO
iisiiiiiiavirornrinii

017370

017370
000400
020000

"EVEN
BASE:

.=17370

.BLKB

.=20000

256.

TTHIS REGION.

;BASE TABLE ADDRESS

SEQ 72

D
3
3
3
3
3
>

TU;szSSAGES TO BE PRINTED TO KEEP OPERATOR AWAKE
sCR FOR LINES IN A ROW
/3S3XATXQ/
sABOUT TO TRANSMIT
cTX COMPLETED
/XS3XATXC/
/XS3TARXQ/
sABOUT TO RECEIVE
/XS3XAERR/
sDEVICE ERROR
/XS3TACMP/
sABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD
/XS3TAINL/
:DEVICE ABOUT TO BE INITIALIZED
/XS3XACML/
s COMPARE LENGTH ERROR
/XS3XACMD/
: COMPARE DATA ERROR
/XS3TAEOP/
sEND OF PASS
/XS3XAMSC/
;MODEM STATUS CHANGE

MNP
NIN NN N NN D

EIIIOICIOIOICIOIOYOYN
Sung Sung Sng Sy Sy Smg G
e Goregy Sommep g v}

b 3

o
NN

g g g e
e
e
RN NN NN N NN RN NN NN

INES ARE USED IN SATELLITE ID MESSAGES

e
PRI
-

33332
»

o
e
L[ ]
o
e
L
L]

047516
000
000

KRR

i
e
b

b nd

O=d
= NNOO
PV [V VIV
o)

Y b e

046

000
000
000

s :NEXT ASC

SECRM:
DPM:
DUM:

NWLNWVWLVIWNWVINUN
UV
<LOOnOuunnumn
MACIEICIIIICICICICIOIOICICIMIOICIIOIN

~N
(Y,

O
-—b

020316

SCM:
SDvl:
SCML:
SCMD:
SEOP:
SMSC:

046501

S VNSNSV
N0
ONNIONNIONNIONNO
NN NN NN NNO

-—b

(=]

o
N
(=4

055

CR:
STXQ:
STXC:
SRXQ:

SDVE:

051501

020135

VO NOWNSWN=O 382
FEkad VOO ~NOWN SUENNN=O
~NOMN

020124

047045
045
051445
045
051445
045
051445
045
051445
045
051445

;EXECUTI

ASCIZ MESSAGES CONTINUED AFTER BASE TABLE REGION

wmumumnunminumnnnnm

.SBTTL

5493
5494
5498
5499

AWVAWMAN VAV NIV
VAWV VAWAWIAWA
AW
AN NV
WNWWINNYN
Vi VI
AININIAIPINIPNOINIAINY
b b b b b - e ad aud b
WINN

MACY11 30A(1052) 30-MAR-82 09:15 PAGE ¢3-32
ASCIZ MESSAGES CONTINUED AFTER BASE TABLE REGION

m >»>»

CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11

/INXASECONDARY BOOT REQ FROM XTXA DEVICE-TYPE= XD3/
/DP/
/DU/
/DL/
/DQ/

SEQ 73

CZKMUAO KMS11-BL PDP=-11 DCLT
30-MAR-82 09:13
CZKMUA.P1
5539
5540
5541
5542
5543
5544
5545
5546
§547
5548

020322

020342
020363
020420
020461
020514
020551
020606
020641
5549 020663
5550 020705
5551 020744

047125

047101
116
044116
106
052116
116
040504
122
122
102
042523

042504

0201.0
046124
051104
052101
051514
042110
051526
050105
050105
051501
020105

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-33
KMS11 BASE TABLE DATA DESCRIPTION MESSAGES
044506

020055
020122
026440
020122
026440
020123
026440
051503
051103
020105
046504

.SBTTL KXMS11 BASE TABLE DATA DESCRIPTION MESSAGES
sLOCATION UNDEF INED BY SPEC
DMUNKN: .ASCIZ /UNDEFINED DATA
0/
CONSTANT
=
/ANP
.ASCIZ
OMC002:
DMCOO3: .ASCIZ /NTLR = NAKS RCVD..NO BUFFERS/
DMCO04: .ASCIZ /NHDR = NAKS RCVD..MSG HEADER BAD/
DMC005: .ASCIZ /DATR = NAKS RCVD..DATA BAD/
DMC006: .ASCIZ /NTLS = NAKS SENT..NO BUFFERS/
DMCO07: .ASCIZ /NHDS = NAKS SENT..BAD HEADER/
DMCO10: .ASCIZ /DATS = NAKS SENT..BAD DATA/
©OMCO11: .ASCIZ /REPCS = REPS SENT/
.ASCIZ
0DMCO12:
DMCO13: .ASCIZ
DMC377: .ASCI2

/REPCR = REPS RECD/
/BASE = CORE TABLE BASE ADDRESS/
/SEE DMC TECH MANUAL FOR DESCRIPTION/

SEQ 74

CZKMUAO kMS11-BL PDP=-11 DCLT
30~-MAR-82 09:13

CZKMUA. P11

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 23-34
KMS11 BASE TABLE DATA DESCRIPTION MESSAGES

:DEVICE ERROR MESSAGES
047440
020040
047440
020040
047440

064524
015
044524
015
044524
015
044524
-

O=0
O
=
OOO0—=0O—=
=B =N
ViowNIWnES

054
005

022026

022001

DVEM3:

DVEM6:

020040

043125

DVEM?7:

DVEMS:
DVEM9:

&
N

021574

DVEM1:

DVEMS:

047111
015
0461
005

021547

DVEMO:

DVEM&:

(=]

021010
021051

020012

020040

041517

042105

020103

DLLAB:

JASCI1
JASCIZ
JASTII
JASCIZ
JASCII
JASCIZ
LASCII
JASCIZ
JASCII
JASCIZ
LASCI]
JASCIZ
JASCII
ASCIZ

/TIME OUT WAITING FOR RDI TO CLEAR/
SEL2 /
SELO
<15><12>/
/TIME OUT WAITING FOR RD] TO SET/
SEL2 /
SELO
<15><12>/
/TIME OUT WAITING FOR RUN TO SET/
SEL2 /
SELOD
<15>¢<12>/
/TIME OUT WAITING FOR OUTPUT INTERRUPT/
/
SELe
SELO
<15><12>/
/INPUT INTERRUPY WHEN EXPECTING OUTPUT/
SEL2 /
SELO
<15><12>/
/ILLEGAL OUTPUT INTERRUPT/
SEL6
SEL2
<15><12>/
/CONTROL OUT INSTEAD OF BA-CC OUT/
SEL6 /
SELZ2
<15><12>/

LASCII
ASCIZ
LASCII
ASCIZ
.ASCI]
JASCIZ

/TX BUFF COMPLETED AND SHOULD BE RX/
SEL6 /
SELG
<15><12>/
/RX BUFF COMPLETED AND SHOULD BE TX/
SEL6 /
SELG
<155<12>/
/ DOWN LINE LOAD ABORTED/
TXBUF /
RXBUF
<15><12>/

.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
LOSDAM: LASCIZ
DDCMRM: .ASCIZ
ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCIZ
LASCIZ

PROEM:
NXMM:
DDCSRM:
DISCOM:

LASCIZ

/PROCEDURE ERROR/
/NON EXIST MEM/
/DDCMP START REC/
/DISCONNECT/
/LOST DATA/
/DDCMP MAINT REC/
/TIME OUT/
/DATA CHECK/
/RUN SET ILLEGALLY/
/RX IDLE/
/CD GLITCHED/
/CTS FALILED/
/TX NOT COMPLETE/
/RX NOT COMPLETE/
/SEC REQ ERR WORD 1/

/SEC REQ ERR WORD 2/

SEQ 75

CZKMUAO kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11

SEQ 76

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-35
GLOBAL ERROR REPORT SECTION
.SBTTL

GLOBAL ERROR REPORT SECTION

s 4t

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

005046
153716
005046
153716
013746
012746
012746
010600
104414
062706

BGNMSG

ERR1

PRINTB

#EVTFSA,OFSET,<B,G00OD>,<B8,BAD>

cRR1

;INDIVIDUAL DATACEgHPARE ggggk

007265
007264

022426
022426 104423

022430
007254
015265
000002
000006

ENDMSG

L10001:

BGNMSG

ERR2

PRINTB

#EFM2,TEMP4

007252

#4,-(SP)

ENDMSG

MOV
TRAP
ADD

SP,RO
CSPNTB
#12,SP

TRAP

CSMSG

;TOTAL DATA COMPARE FAILS ERROR
MOV

L10002:

BGNMSG

ERR10

PRINTB

#EFM11,R4,TEMP3

, = (SP)
TEMP4

MOV

NEFM2.-(SP)

TRAP
ADD

CSPNTB
#6,SP

TRAP

CSMSG

#2,-(5P)
SP.RO

ERR10::
MOV

MOV

ENDMSG

#EVTFSA,=(SP)

cRR2

015362
000003

000010

MOV

MOV
MOV

022454

022456

BAD,(SP)
-(SP)
GOOD, (SP)
OFSET,~(SP)

MOV

000004

000012

BISB
CLR
BIS8
MOV

L10003:

TEMP3,~(SP)

R4 ,~(SP)

MOV
MOV
MOV
TRAP
ADD

SEFMIT,=(SP)
#3,~(SP)
SP.RO
CSPNTB
#10,SP

TRAP

CSMSG

né

CZKMUAOQ kMS11-BL PDP=11 DCLY

CZKMUA.PN
5679
(3)
5680

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

(3)
(4)
(4)
5681
(8)
(7)
(6)
(3)
(4)
(4)
5682
(3)
(3)
5683
5684
(3)
5685

30-MAR-82 09:13

022506
022506
022506

022506
022512
022516
022522
022526

022532
022534
022536
022542
22542
022546
022552
022556
022560
022562
022566
022566
022566

022570
022570
022570

013746
013746
013746
012746
012746

010600
104414
062706

013746
012746
012746
010600
104414
062706

007260
007254
007252
016356
000004
000012
007300
015330
000002
000006

013746
013746
012746
012746
010600

007254
007252
01634]
000003

(4)
5686
(8)

022614
022620
022620

062706

000010

(3)
(4)
(4)
5687
(3)
(3)
5688
5689
(3)
5690
(9)
(8)
(7)
(6)
(3)
(4)

022634
022636
022640
022644
022644
022644

013746
012746
012746
010600
104414
062706

007300
015330
000002

(4)

(7)
(6)

(4)
5691
(3)
(3)

022612

022624
022630

022646
022646
022646
022646
022652
022656
022662
022666
022670

022672
022676

022676

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-36
GLOBAL ERROR REPORT SECTION
BGNMSG

ERR8

PRINTB

#EVTF3D,TEMP3,TEMP4 ,CONOTM

PRINTB

ERRS8::
MoV
MOV
MoV
MOV
Mov
MOV

TRAP
ADD

#PCPM,PCADD

MoV
MoV
MOV
TRAP
ADD

ENDMSG

L10004:

104423

022570
022574
022600
022604
022610

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

SEQ 77

104414

000006

BGNMSG

ERRY9

PRINTB

NEVIF3C,TEMP3,TEMPS

104423

007254
007252
016341
000003

000010

NEVTFSD = (SP)
#4,-(SPS
SP,RO
C$PNTB
#12,SP

PCADD,=(SP)

#PCPM,=(SP)

TRAP

ERR9::
, = (SP)
TEMP4

TEMP3 . =(SP)

2EVTFSC,-(SP)
#3,-(SP}
PRINTB

#PCPM,PCADD

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

SP,.RO
CSPNTB
#6,SP

ENDMSG

L10005:

104423

013746
013746
012746
012746
010600
104414
062706

= (SP)
CONOTM,
(SP)
, =P4
TEM
TEMP3 . =(SP)

BGNMSG

ERR13

PRINTB

#EVTF3C,TEMP3,
TEMP4

C$MSG

ERR13::
TEMP4 ,~(SP)
TEMP3 - (SP)

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

ENDMSG

L10006:

CSMSG

(3)

022734

5697

022736

(4)
(3)

022736
022740

mbomguuw
I

O=-2000000

OO =d wod b b acdh =B

CZKMUAQ kMS11-BL PDOP=11 DCLT
30-MAR-82 09:13
CZKMUA.P

007260

SEQ 78

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-37
GLOBAL ERROR REPORT SECTION
BGNMSG

ERR14

PRINTB

#EVTF3D,TEMP3,TEMP4,CONOTM

ERR14::
MoV

MoV
MOV
MoV

000094

000012

MoV
TRAP
ADD

ENDMSG

EXIT

L10007:
MSG

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

SEVTFSD,=(SP)
86 ,-(SPS
SP.RO
CSPNTB
#2,SP

TRAP

C$MSG

-WORD
-WORD

JSJMP

L10007-2-.

CZKMUAO KMS11-BL PDP=11 DCLT

30-MAR-82 09:13

CZKMUA.P11

30-MAR-82

MACY11 30A(1052)

09:15

GLOBAL SUBROUTINES SECTION

PAGE 23-38

GLOBAL SUBROUTINES SECTION

2;8}

.SBTTL

5703

s+4

5705

: THAT ARE USED !N MORE THAN ONE TEST.

; THE GLOBAL SUBROUTINES SECTION (ONTAINS THE SUBROUTINES

5704

5706
5707
5784

CLOCK SETUP SUBROUTINE

.SBTTL

5785

5786
5787

I+

5789
5790
5791

:
:
:

5792

5793

THIS SUBROUTINE SETS UP THE CLOCK INFORMATION TABLE FOLLOWING A °'CLOCK
CALL EXECUTED IN THE INJTIALIZATION CODE. BUT SINCE THE ''CLOCKTM" CALL
SAYS WOTHING ABOUT AN LSI-11'S CLOCK, THIS ROUTINE IS ONLY USED IF A

s INPUTS:

5798

2;29

: IMPLICIT INPUTS:

5801

: OUTPUTS:

5808

; CALLING SEQUENCE:

CLKSET:

gggg

:
:
:
:
:

5802
5803
5804
5805
gggg

gg?g
,

022742

5813 022742 012122
5814 022744 012112

5815 022746 006312
5816 022750 006312

5817
5818
5819

022752
022754
022756

006312
006312
006322

56¢2

022764

000207

5820 022760 012122
581 022762 012122

LINE OR P=CLOCK IS FOUND.

5794

5795

5811

: FUNCTIONAL DESLRIPTION:

5788

5812

SEQ 79

R1= POINTS TO SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED

R2= POINTS TO ‘'CLK'* TABLE WHERE CLOCK INFO WILL BE KEPT

THE SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED BY THE °*‘CLOCK'® CALL

?CLKCSQ" 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
*'CLKH2'* GETS LOADED WITH THE LINE FREQ. (HERTZ RATE) WHICH DETERMINES
THE NUMBER OF TICKS IN A SECOND

JSR

PC,CLKSET

sCALL CLOCK SETUP WITH R1 © R2 SETUP

MOV
MOV

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

;LOAD CLOCK'S CSR ADDR. INTO °*°CLKCSR’’
sLOAD CLOCK'S INT. LEVEL INTO '°CLKBR

ASL
ASL
ASL

(R2)
(R2)
(R2) +

RTS

ASL
ASL

MOV
MOV

(R2)
{(R2)

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

sADJUST THE INT. LEVEL FOR LOADING INTO
THE PSW WITH A "‘SETVEC'® CALL
:
.

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

CZKMUAO kMS11-BL PDP=11 DCLY
30-MAR-82 09:13
CZKMUA.P11

MACY 30A(1052)c 30~MAR=82

CLOCK INTERRUPT SERVICE ROUTINE

e Ve Ve Vs 20000000V 0T VeV

VeV Ve Ve TV V0V VeV Ve Vg Ny 0.

FUNCTIONAL DESCRIPTION:

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.

IMPLICIT INPUTS:

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

CLKHZ:

007352
007354

023032

007360

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

007346

FUNCTIONAL SIDE EFFECTS:

THE CLOCK IS DISABLED UPON ENTRY AND REENABLED WHEN LEAVING

CALLING SEQUENCE:

023074

007364

THIS ROUTINE IS CALLED WHEN THE CLOCK INTERRUPTS THRU °'CLKVEC''.

THE ADDRESS OF THIS ROUTINE WAS LOADED INTO THE CLOCK'S INTERRUPT
VECTOR WITH A SUPERVISOR ‘‘SETVEC'® CALL.
BGNSRV

CLKINT

CLR
DEC

BNE

8CLKCSR
TIMTCK
1}

CMP
BNE
INC
CLR

#60. , TIMSEC
1$
TIMMIN
TIMSEC

sRESET THE # OF TICKS/SEC.
TINC # OF SECS-SINCE-START
‘SEE IF WE'VE COUNTED 60 SECS. YET
*1F NOT, GO CHECK TIMERS
:"ELSE INC MINUTES=SINCE=-START
* AND RESTART SECOND COUNTER

TIMER1

:SEE IF TIMER #1,

TIMER]

* ELSE DECREMENT THE TIMER VALUE (BY 1 TICK)

BEQ

*"IF=0, NOTHING BEING TIMED CHECK NEXT TIMER

BEQ
CMP

48
CLKHZ.TIMTCK

*"1F=0, NOTHING BEING TIMED, LEAVE
:SEE IF A SECOND HAS BEEN COUNTED OFF

MOV
INC

1$:

2$:
3s:

007356

NEW VALUE OF EVENT TIMER ‘*1’'* DECREMENTED BY 1 TICK IF IT WAS NON-ZERO
NEW VALUE OF EVENT TIMER '72'' DECREMENTED BY 1 TICK IF IT WAS NON-ZERO
NEW VALUE OF EVENT TIMER ‘'S'* DECREMENTED BY 1 SECOND IF IT WAS NON-ZERO

007354

007362
007364

"EVENT TIMERS

IMPLICIT OUTPUTS:

007356

007360
007362

THE NO. OF TICKS IN A SECOND, DETERMINED BY THE SYS. LINE FREQ.
IN MINUTES & SECONDS

164346
007356

023026

HAS BEEN COUNTED OFF

TIMMIN & TIMSEC: CURRENT VALUE OF '‘TIME-SINCE-START

022766
022766

007346
007354
000074

PAGE 23-39

LOCK SETUP SUBROUTINE

.SBTTL

022766

09:15

SEQ 80

BEQ
DEC

DEC
ST

BNE

DEC

CLKHZ,TIMTCK
TIMSEC

TIMER2

TIMER?
TIMERS

TIMERS

CLKINT::

:DISABLE THE CLOCK FORM INTERRUPTING
:DECREMENT THE # OF TICKS/SEC.
;G0 CHECK TIMERS (182-TICKS, 3-SECONDS)

TIMING ANYTHING

2"1F=0, NOTHING BEING TIMED CHECK NEXT TIMER
‘SEE IF TIMER #2,

TIMING ANYTHING

: ELSE DECREMENT THE TIMER VALUE (BY 1 TICK)
*SEE 6r TIMER #3, TIMING ANYTHING
:"BR IF NO

: ELSE DECREMENT THE TIMER VALUE (BY 1 SEC.)

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-40
ZKHUAO KMS11-BL PDP=11 DCLT
CLOCK INTERRUPT SERVICE ROUTINE
30-MAR-82 09:13
CIKMUA.P11
;REENABLE THE CLOCK TO INTERRUPT
CLKEN,@CLKCSR
Mov
5880 023100 013777 007350 164232 4$:
ENDSRY
5881 023106
L10010:
(3) 023106
RTI
(2) 023106 000002

SEa 81

CZKMUAO kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 23-41
EVENT LOG SUBROUTINES
EVENT LOG SUBROUTINES

.SBTTL
+
+

5883

FUNCTIONAL DESCRIPTION:

THIS SUBROUTINE HAS A DIFFERENT ENTRY POINT
FOR EACH EVENT TO BE LOGGED AND ALWAYS PRINTS
THE SHORT ‘‘OPERATOR AWAKE'' MESSAGE TO CONSOLE THEN LOGS THE

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

INPUTS:

TIMMIN & TIMSEC:

TEMP2:
TEMP3:
TEMP4:
MODS:

CURRENT VALUE OF ‘‘TIME-SINCE-START'’

WORD #1 OF EVENT LOG INFORMATION (FOR MOST EVENT TYPES)
WORD #2 OF EVENT LOG INFORMATION
WORD #3 OF EVENT LOG INFORMATION
CURRENT VALUE OF THE MODEM SIGNALS AVAILABLE FROM THE DEVICE

OUTPUTS

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

FUNCTI??AL SIDE EFFECTS:

TEMP1:

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

CALLING SEOUENCE

PC.LOGTXQ

023152
023160

023162
023162
023170
023172

020003
000000

007276
007244

020014
000002

007246
007244

012737
012737
000472

020025
000004

0076

012737
000466

000006

007244

LOGTXQ:

PC.LOGCMP

MOV
MOV

#STXQ, TEMPY
ATXQ, TEMP

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

MOV
MOV

#STXC, TEMPY
ATXC, TEMP

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

MOV
MOV
B8R

#SRXQ, TEMP1
#RXQ, fEmP
LoGs1

:SET UP MSG. TO PRINT
*SET UP EVENT TYPE
16O LOG EVENT AND TIME

MOV

#RXC, TEMP

:SET UP EVENT TYPE

LOGRXQ:

007344

LOGRXC:
LGDVE:

: TEMP2, TEMP3, AND TEMP4 SETUP

JSR

LOGTXC:

sCALL THE LOG_EVENT SUBROUTINE WITH TEMP,TEMP1,

Lo6s{

Loes{

*GO LOG EVENT AND TIME
*G0 LOG EVENT AND TIME

GO LOG EVENT AND TIME

SEQ 82

CZKMUAO KMS11-BL PDP=11 DCLT

CZIKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

012737

020036

007246

5944 023210
5945 023216
5946 0232264
§947 023232

012737
012737
113737
113737

020060
000012
007306
007310

007246
007244
007250
007251

5949

023246

013737

007314

007254

5952

023256

5939

023172

§943

023210

5948

023240

gggg 023254 000451

5953
5954

023256
023264

012737
012737

§955 023272 000442

5956

5957
5958

023274

023274
023302

012737
012737

5959 023310 000433
5960

§961

5962

023312

023320

012737

5963 023326 000424
5964

5965
5966

023330

023330
023336

012737
012737

gggg 023344 000415
§969 023346
5970 023352
5971 023356
5972
5973
5974

5975

023360
023364
023366

007316

020047
000016
020071
000020
020102

000022

020113
000024

007246
007244
007246
007244
007246

007254

5978
5979

023400
023400

022737

000006

007244

023410

032737

000001

007314

5985 023420
5986 023426
gggg 023430

022737
00101
005037

000010

007210

ggg{
5989

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

023434

001430

LOGEOP:

007210

023434 012746 020000
023440 015746 000001
023444 0" .600
023446 104417
023450 062706 000004

#SDVI, TEMPI
#0v1, femP
MODTYP,TEMP2
MLTYP,TEMP2+1

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

18$:
LOGS3:

#DER, TEMP
L06S$

, TEMP
RPASS

*SET UP EVENT TYPE
G0 LOG EVENT AND TIME

;SET UP EVNT ENTRIES

B8R

LOGS3

PARAM , TEMP4

160 LOG EVENT AND TIME

MOV
MOV

#SCM, TEMP1
#DCK . TEMP

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

MOV
MOV

, TEMPI
#SCML
#DLE, TEMP

;SET UP MSG. AND TYPE

MOV

#SCMD, TEMP1

B8R

L06S$

B8R

L06SS$

L0GS$

#DDE , TEMP

16O LOG EVENT AND TIME

:GO LOG MSG TYPE AND TIME

MOV
MOV

#SEOP, TEMP?
#EOP, TEMP

L0GSS

;GO LOG MSG TYPE AND TIME

MOV
JSR
MOV

ERRCNT.=(SP)
PC,DVMODS
(SP)+,Ré

:SAVE CURRENT ERROR COUNT
2760 GETM MODEM STATUS
*GET SAVED ERRCNT VALUE

MOV

MODS, TEMP4

SAND PUT IT IN TEMP4

#RXC , TEMP

BIT

#STATB,PARAM

CMP
BNE
CLR

#10,LNCNT
LOGS4
LNCNT

:HAVE WE DONE 10?
*1F NOT GO TO &
‘ESLE CLEAR IT

PRINTF

#CR

;ELSE PRINT CR

023602
010274

023416

MOV
MOV
MOVE
MOVB

CMP
BEQ
JNP

013737

5981

:SET UP MSG. TO PRINT

MOV

007216

023372

5082

LOGCMD:

LOGST:

gg;g

5980 023406 001434

LOGCML:

007244

007246
007244

#SDVE ,TEMP1

MOV

LOGCMP:

PAGE 23-42

MOV

007252

013746 007216
004737 044474
012604
020437
001402
000137

LOGDVI:

09:15

SEQ 83

EVENT LOG SUBROUTINES

MOV
BR

5940 023200 012737 000010 007244
2325 023206 000474

013737

30-MAR-82

BEQ

R4, ERRCNT
1$
LOGEX

‘WHERE ANY ERRORS FOUND
: BR IF NONE
: ELSE, LEAVE WITHOUT LOGGING ANYTHING

BUf THE DEVICE ERROR FROM 'DVMODS''

L0655

:IF RXC DONT PRINT

LOGSS

:IF
70 S
:60

NO STATUS SELECTED

MOV
MOV
MoV
TRAP
ADD

#CR,~(SP)
#1,-(SP)
SP.RO
CSPNTF
#4,SP

CZKM.A0 KMS11-BL PDP=11 DCLT

CZKMUA. P11

30~-MAR-82 09:13

MACY11 30A(1052)
LOGS&:

023454

5991 023454 005237 007210
5992 023460
(7) 023460 013746 007246
(6) 023464 012746 000001

(3)
(&)
(4)

5993

023470 010600
023472 104417
023474 062706 000004
023500

5994
§995

023502
023506

5997

023520

010346
013703
113723

007366
007244

163737

007356

LOGSS:

5996 003512 013737 007346 007244

5998

023526

113723

007244

30-MAR-82

INC
PRINTF

LNCNT
TEMP1

MOV

R3,~(SP)

MOV

CLkHE, TEMP

MOV
MOVB

MOVB

EVIPTR.R3
TEMP, (R3)+

TIMTCK, TEMP

:;TICKS,SECS AND MINS.
*LOG EVNT ENTRY 3
110G EVNT ENTRY &
*L0G EVNT ENTRY 5

010272

CMP
BLO

R3,#EVTEND
L0GS2

MOV
MOV
MOV
MOV

#-1,(R3)
#EVTLOG.R3
R3,EVIPIR
(SP)+.R3

6004
6005

6006

6007
6008

6010
6011

023556
023562

023564
023570
023574
023600
023602

020327
103404

012713
012703
010337
012603

000207

MOVB
MOV
MOV
MOV

007352
007250
007252
007254

1772777
007370
007366

LOGS2:
LOGEX:

RTS

:LOG EVENT

TIMMIN.(R3)+
TEMP2, (R3) ¢
TEMP3. (R3)+
TEMPG . (R3)+

5999 023532 113723 0073564
113723
013723
013723
013723

;SAVE R3 ON THE STACK

:LOG TIME SINCE START

TIMSEC,(R3)+

023536
023542
023546
023552

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

TEMP, (R3)+

MOVB

6000
6001
6002
6003

PAGE 23-43

EVENT LOG SUBROUTINES

SUB

007244

09:15

SEQ 84

:1IF EVENT LOG FULL GO

*CONTINUE;ELSE GO TO 2

*L0G A TABLE END
*PUT R3 TO START OF TABLE
*RESTORE POINTER
*RESTORE R3

MOV

MOV
MOV
TRAP
ADD

TEMP1,=(SP)

#1,-(5P)
SP,RO
CSPNTF
#4,5P

CZKMUAO kMS11-BL PDP-11 DCLT
30-MAR-82 09:13
CZKMUA.P11
N = O 00O ~NO~

g2 s 2222088 &

REPORT BASE TABLE OR EVENT LOG
::RPT> LOG

HH
HH
M

BASE/ERROR
BASE/FULL
BASE/OFFSET=NN

ExIT

REPORT:

MOV

MOV
MOV

HELP

R2,-(SP)

R3,-(SP)
R4 ,~-(SP)

v
;Maéganr
NN
A
o awNoOoO O

D d b b
— b 2—'O°°
OO
VA NJ‘?NN
N
SONYN

;PRINT HELP MESSAGE

(3)

SEQ 85

MACY11 30A(1052) 30-MAR=82 09:15 PAGE 23-44
REPORT BASE TABLE OR EVENT LOG
.SBTTL

~~ o~

013632
000001

:SAVE R2.R3,R4¢ ON THE STACK

PRINTF

A#RHLPO

;BASIC HELP MESSAGE

CLRB
CLRB

PSGDBD
PSNNUF

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

MoV
MOV
MoV
TRAP
ADD

000004
003377
003376

GETRCL:

IRHLPO.;(SP)

CLISRP,CMDBUF ,A,~-1,1,72..NO

TRAP
BR
.WORD
.WORD
.WORD
.WORD
.WORD

~
P )

GMANID

O—

o
o

VNN

NINNNNNN

b
dd b

060

003362
003364
003366

#CMDBUF ,PSBUFA
#CLIRT PSTREE
#CLIRAC,PSACT

: INPUT BUFFER
JREPORT CLI TREE
:ACTION ROUTINES

JSR

PC ,PSTRY

:G0 PARSE COMMAND LINE

TST8
B8EQ

&
&3 N

NN
~
P
N

MoV
MOV
MoV
CLR

PRINTF

012324
000001

:
100008

QUALFG

P$GDBD
1$

#CLIERM

;COMMAND OK ?
JYES ,BRANCH
:PRINT INVALID INPUT HESSS&E
MoV
MoV
TRAP

=000

~2\N

W
N

023746

=N
NN

003376

—=SOHE
NOONO:

000004
023632

023742

012354
000001

S ONN

o
=000 8-‘
-\

SAAAAAAA

[(WIIVIIV
[V [V [V IV P ]

-—b

:PRINT PROMPT °RPT>’

18:

JMP

GETRCL

;TRY AGAIN

TST8
BEQ
PRINTF

PSNNUF
108
#CLINUF

:MORE COMMAND NEEDED ?
JNO,BRANCH
:INCOMPLETE MESSAGE

ADD

oV
MOV
MoV
TRAP

CSGMAN
10000$
CMDBUF
T$CODE

C%ISRP

TSLOLIM

TSHILIM

#CLIERM -(SP)

#1,-(sp§
SP,RO
CSPNTF

#,SP

#CLINUF -(SP)

#,-(SPS

(ZKMUAQ KMS11-BL PDP=11 DCL;
30-MAR-82 09:1

CZKMUA.P1

023770
023774

062706
000137

000004
023632

024000
024006
024010
024014
024016
024020
024022

023727

003202
023632

000207

SEQ 86

PAGE 23-45

MACY11 30A(1052) 30-MAR-82 09:15
REPORT BASE TABLE OR EVENT LOG

000002

10$:
20$:

GETRCL

s TRY AGAIN

KEYWD1,#RPEXT
20$
GETRCL

sEXIT COMMAND ?
:YES ,BRANCH
:GET ANOTHER COMMAND

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

;RESTORE R3
RESTORE R2

(SP)+,R4

:RESTORE R4
;RETURN

ADD

#4,SP

J
CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA. P11
024024

SEQ 87

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-46
COMMAND LINE PARSING TREE FOR REPORT
SBTTL
CLIRT:
R10S:
R11S:

R12$:

R13S:
R14S:

R15S$:
R16$:
R178:

024220

R30S:
R125$:

COMMAND LINE PARSING TREE FOR REPORT

CLI CLISPA,0,R108

cLI <*2>,RPHLP.R11S
cL] CLIEXI.O

CLI CLISTR.RPHLP,R12$,<"HELP'>
cLI CLIEXI.O
CL1 CLISTR.RPEXT,R138,<'EXIT*>
CLI CLIEXI.O

<SKIP SPACES IN COMMAND LINE

1 INPUT = 2 THEN PRINT HELP MESSAGE

S:AND EXIT PARSER

= 'HELP' THEN PRINT HELP
xr INPUT
:MESSAGE AND EXIT PARSER
=
x INPUT = 'EXIT' THEN SET KEYWORD
:RPEXT AND EXIT PARSER

CL1 CLISTR.RPLOG,R14$,<'LOG"> *iF INPUT = °LOG' THEN GO PRINT EVENT
*:L0G AND EXIT PARSER
CL1 CLIEXI.O
INPUT= "BASE' THEN MORE COMMAND
'>;IFf
CLI CLISTR.RNOTNF ,R308,<'BASE
IS NEEDED
::LINE
Ll chea.b.n1ss
T1F INPUT = */° THEN LOOK FOR MORE

NPUT = *ERROR® THEN GO PRINT
cLl cLIstR, apsué.n1es.<'eanoa'>;IF_I
*:ERROR INFORMATION

CL1 <*/>,RNOTNF ,R1258
€L CLIEXI.O

CLI CLISTR.RPSWF,R178,<'FULL®>

1 INPUT = 'FULL' THEN GO PRINT

CLI CLIOCT.RPSWO.R30S

GO
‘ir xnpur OCTAL VALUE THEN
ITEM

cLl CLIEXI.O

;ENTIRE BASE TABLE

CL1 CLISTR.RNOTNF,R30S,< orrssr°> IF INPUT = YOFFSET® THEN LOOK FOR
CLI <*=>,0.R308
cLl CLIEXI.O

CLI CLITRR.0
CLI oo IeX1,0

:PRINT SINGLE BASE TABLE

CZKMUAO KMS11-8BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11
6082
6083

024222

006302

024260
024266

.SBTTL CL!I ACTIO? DISPATCHER AND ROUTINES
sSET UP INDEX
CLIRAC: ASL

MoV

024240
024240

024270

000020
177777

012702

003230

012246
012746
012746
010600
104417

000006
003246

ACTRHL-10%
ACTREX-10%
ACTRLG-10%
ACTSWE-10$

:HELP ROUTINE
;EXIT ROUTINE

PC
ACTRNL-10$

ACTSWF-10$
ACTSWO-10%
ACTRNF=10$

#=1,PSNNUF
PC

sPRINT HELP MESSAGE

MoV

PRINTF

CMP

000001

003202

012737
000207

000002

024344
024350
024356

004737
012737
000207

025104
000003

003202

012737

003250

007266

b oh

.WORD
.WORD
.WORD
.WORD

RTS
.WORD

#RHLPTB,R2

#HLPF, (R2)+

¢RETURN
sNULL

:REPORT EVENT LOG ROUTINE
:REPORT ERRORS ROUTINE
:REPORT ENTIRE BASE TABLE

:REPORT SINGLE BASE ADDRESS
:MORE COMMAND NEEDED

sMORE COMMAND NEEDED
cNULL

sINDEX FOR HELP MESSAGES
sPRINT IT

013037
000002

024334
024342

BNE

MOV
RTS

sEXIT REPORT LEVEL

ACTR_G:

JSR

PC,REPLOG

;GO _PRINT EVENT LOG

RTS

sRETURN

ACTSWE:

RTS

sPRINT ERROR LOG

MoV

#RPLOG,KE YWD1

sSET KEYWORD AND RETURN

:SET KEYWORD

;PRINT ONLY ERROR LOCATIONS
SETUP KMS11 MESSAGES
#DMCIND, INDEX
*POINT
TO CORRECT MESSAGE
ADD
#6, INDEX
‘LAST KMS11 ADDRESS
MOV
#DMCEND, INDEXE
‘SET UP LAST ADDRESS
#BASE ,BEND
MOV
70 BE PRINTED
#12,BEND
ADD
éAss TABLE START ADDRESS
MOV
#B8ASE ,BDATA
#3,8DATA
‘ERROR START ADDRESS
ADD
PRINT DATA
GO
JSR
PC,RPBASE

MoV

RTS

ACTSWF:

#RPEXT ,KEYWD1

sLAST MESSAGE ?
+NO _BRANCH
sSET KEYWORD
¢RETURN

MOV

024436
007266
007270

R2,#RHLPEN
18
#RPHLP KEYWD1

ACTREX:

007274

024440
024446

;
260 DO ACTION

sMORE COMMAND NEEDED

ACTRHL:
18:

#10s,p2°
PC, (R2)

ACTRNF: MOV8
ACTRNL: RTS

b o

md —b and cd

o o Yo Yo Yo Yo Yo Yo To o Lo

PON) = = e b ek b = b o b
NS WO
—O0 WA

024332

003376

108(R2) ,R2

20D
JSR

.WORD
.WORD
.WORD

00200
000244

112737
000207

SEQ 88

MACY11 30A(1052) 30-MAR=-82 09:15 PAGE 23-47
CLI ACTION DISPATCHER AND ROUTINES

108:

026256

;PRINT FULL BASE TABLE

MOV

MoV

#DMCIND, INDEX

#DMCEND, INDEXE

:RETURN

sSETUP KMS11 MESSAGES
sLAST MESSAGE

MOV
MoV
MoV
MoV
TRAP
ADD

(R2)+,-(SP)

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

SP,RO
CSPNTF
#6,SP

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

024454

012737

017370

6139 024504
6140 024510

105037
012737

003376
000377

6132

MACY11 30A(1052)
007272

MoV

007272

ACTSWO: CLRB
MoV

6144
6145
6146

0264526
024532
024536
024542
024544
024546
024552
024560
024562

013746
012746
012746
010600
104417
062706

112737
000431
013701

177777

ADD
MoV
JSR
RTS

#BASE ,BEND

#377 ,BEND
#BASE ,BDATA
PC,RPBASE
PC

PSNUM, BEND
CMP
108
PRINTF #RPTIV,PSNUM

003377

003372

6147 024566 006301
6148 024570 012737 003250 007266
6149
6150

024576
024602

060137
012737

007266
003300

007270

6154
6155
6156

024632
024640
024644

063737
004737
000207

003372
024646

007274

PSNN
#377 BEND

BLOS

003372
014202
000002

000006

PAGE 23-48
sTABLE START ADDRESS

;PRINT 256. BYTES OF DATA
:FIRST ADDRESS TO PRINT
;GO PRINT DATA
;RETURN

: PRINT SINGLE TABLE LOCATION

6141 026516 023737 003372 007272
6142 024524 101416
6143 024526
(8)
(7)
(6)
(3)
(4)
(4)

09:15

CLI ACTION DISPATCHER AND ROUTINES

6133 026462 062737 000377 007272
6134 024470 012737 017370 007274
208:
6135 024476 004737 024646
g}%? 024502 000207

6138

30-MAR-82

SEQ 89

10$:

208:
30s:

KMS11 = 256 BYTES
:PRINT ILLEGAL VALUE

YES BRAN

Mov8
BR
MOV

#-1,P$GDBD
308
PSNUM,R1

sSET BAD DATA
:RETURN
;OFFSET VALUE

ADD
MoV

R1, INDEX
NDMCEND, INDEXE

;GET RIGHT MESSAGE
;LAST KMS11 MESSAGE

ASL
MOV

MOV
ADD
MoV

6151 024610 012737 017370 007272
6152 024616 063737 003372 007272
6153 024624 012737 017370 007274

sINIT NOT ENOUGH FLAG
BASE TABLE FOR KMS11 256 BYTES

ADD
JSR
RTS

R1
ADMCIND, INDEX
#BASE ,BEND
PSNUM,BEND
#BASE ,BDATA

PSNUM,BDATA
PC,RPBASE
PC

;MULTIPLY BY 2
:KMS11 MESSAGES
;TABLE ADDRESS
;LAST ADDRESS
:BASE ADDRESS

;ADD OFFSET
;G0 PRINT SINGLE LOCATION
:RETURN

MoV
MoV
Mov
MoV
TRAP
ADD

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

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

30-MAR-82

MACY11 30A(1052)

:sPRINT BASE TABLE SUBROUTINE

sFUNCTIONAL DESCRIPTION = THIS ROUTINE IS USED TO PRINT DATA
STORED IN THE BASE TABLE AREA IN MEMORY. THIS BASE
:
TABLE IS UPDATED BY THE KMST1. THE USER HMAS THE
:
OPTION OF PRINTING THE FULL TABLE, PRINTING THE FIRST
:
FEW ERROR LOCATIONS OR A SINGLE LOCATION.
:

6159
6160
6161
6162
g}gz

:DEFINITIONS

6165

6166
6167
6168
6169
6170
g};;

:
;
;
;
:
;

6173
2};§

:
;

6176

6177 024646
6178 024650
6179 024652

010146
010246

024672
024676
024702

013702
013701
010137

007266
007274
007252

013702
012237

007270
007250

013746
005046
153716
013746
012746
012746
010600
104417
062706

007250

6180
6181
6182

024652
024656
024662
024664
024666

012746 025006
012746 000001
010600
104417
062706 000004

108:

024720
024724
024730

(10) 024730
(9) 024734
(9) 024736
(8) 024742
(7) 024746
(6) 024752
(3) 024756
(4) 024760
(4) 024762

6189

024766

020137

6190 024772 101743

208:

6192
6193

g}gg

025
025002
025004

6196

025006

047045

025014
025022
025030

000012

007272

:SAVE R1
*SAVE R2
:PRINT BRIEF HEADER MESSAGE

MOV
MOV
MOV

INDEX,R2
BDATA.R1
R1, TEMP3

:POINTER TO MESSAGES
*ADDRESS OF DATA
*SAVE CURRENT ADDRESS OF DATA

MOV
MOV
PRINTF

S YSEE MANUAL® MESSAGE
INDEXE ,R2
*READ MESSAGE ADDRESS
(R2)+, TEMP2
:PRINT DATA AND MESSAGE
B,TEMP1>,TEMP2
#DMFMT,TEMP3,<

CMP

R1,BEND

:LAST ADDRESS ?

CLRB

PSNNUF

*CLEAR ENOUGH FLAG

RTS

Move
CMP
BLT

8L0S
MOV
MOV

000207
051104
031123
052116

THE ABOVE VARIALLES MUST BRE ASSIGNED THME CORRECT VALUES
BEFORE THIS SUBROUTINE IS CALLED.

(R1)+,TEMP1
R2, INDEXE
208

040445

051505
040445
047105

042101

022523
047503
051524

10§

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

MOV
MOV
MOV
TRAP
ADD

D
, = (SP)
#BTHEA
#i,-(SP)
SP.RO
CSPNTF
#,SP

*READ DATA
SEND OF MESSAGES?
*NO,BRANCH

007246
007252
025057
000004

6191 024774 105037 003376
012602
012601

INDEX - CONTAINS POINTER TO KMS11 DATA
DESCRIPTION MESSAGES.
INDEXE - CONTAINS POINTER TO LAST KMS11
DESCRIPTION MESSAGES.
BEND = LAST LOCATION IN TABLE TO BE PRINTED.
BDATA - ADDRESS OF DATA TO BE PRINTED.

R1.-(SP)
R2,~(SP)
A#BTHEAD

RPBASE: MOV
MOV
PRINTF

6183 024706 112137 007246
6184 024712 020237 007270
6185 024716 002402
6186
6187
6188

SEQ 90

PAGE 23-49

CLI ACTION DISPATCHER AND ROUTINES

6158

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

09:15

*NO,BRANCH

*RESTORE R2
*RESTORE R1
*RETURN

BTHEAD: .ASCIZ /XNYAADDRESSXS2XACONTENTSXS6XADESCRIPTION/

MOV
CLR
BISB
MOV
MOV
MOV
MOV
TRAP
ADD

TEMP2,-(SP)
-(SP)
TEMP1,(SP)
TEMP3.~(SP)
NOMFMT,~(SP)
#4,~(SP)
SP.RO
CSPNTF
#12,SP

OONON—=2=0O0
O WO O NWO

051
051

[elelelelale
NN SN

025036

PPN
N =N
O
\Nd b S

CZKMUAQ kMS11-BL PDP=11 C
30-MAR-82 09:
CZKMUA.P11

(W=

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-50
CLI ACTICN DISPATCHER AND ROUTINES

DMFMT:

.EVEN

<ASCIZ /XNXS1%06XS5%03XS5XT/

SEQ 9

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

REPLOG: MOV

6202 025104 010246
025106

MOV

010346

6204 025110 010446
6205 025112 013702 007366
001034

6207
6208

025124
025126

(%)
(4)

025140 104416
025142 062706 000004

025126 012746 016073

(6) 025132 012746 000007
(3) 025136 010600

2%?3

025146

000137

025742

6211 025152 162702 000012
gg}g

6214

6215

025156

025162

020227

001010

010272

025164

012702

6218

025176

001007

6221

025204

020237

007366

gggz

025212

000137

025742

6225

025216

162702

000012

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

025222 012746 016133
025226 012746 000001
025232 010600
104416
025234

025170

026227

177776

6226

025222

(4) 025236
6227 025242

6228

025244

062706
112203

112237

000004

010432

6229 025250 112237 010426
6230 025254 112237 010430
6231 025260
(11) 025260 016346 010332

013746 010432
(10) 025264
(9) 025270 013746 010426
(8) 025274 013746 010430
(7)
(6)
(3)
(4)
(4)

025300
025304
025310
025312
025314

012746 016226
012746 000005
010600
104416
062706 000014

6234

025324

012237

EVTLOG., #=1

‘SEE IF EVENT TABLE IS EMPTY

R4 ‘= (SP)
EviPTR,R2

BNE
PRINTS

RPTO
#NULEVT

‘SAVE R

‘SAVE R&
‘MAKE R2 A POINTER TO EVENT TABLE
:BR IF NO
“IF EMPTY TELL OPRERATOR.

;AND END

MOV

anuaevr -(SP)

TRAP
ADD

CSPNTS
#4,SP

MOV
MOV

ENDEVT

RPT: SUB

#12,R2

:NOW POINT BACK TO TOP OF ENTRY U

CMP

R2,#EVTLOG

;POINTING TO TOP OF EVNT LOG QUEUE?

MOV

#EVTEND R

*SET R2 TO POINT TO BOTTOM OF LOG

BNE

RPTO

:1IF END OF LOG IS NOT EMPTY

CMP

R2,EVIPTR

;ARE WE BACK TO POINTER?

JMP

s~oevr

‘IF SO EXIT....

SUB

#12,R2

BNE

CMP

177777

JMP

gg;g 025200 000137 025742
6222 025210 001002

:SAVE R

-=(SP)

JMP

007370

6216

6217

PAGE 23-51

n ,=(SP)

MOV
MOV

CMP

6206 025116 023727 007370 177777
(7)

09:15

.SBTTL PRINT EVENT LOG
*PRINT THE EVENT LOG

6200
6201

6203

30-MAR-82

PRINT EVENT LOG

SEQ 92

RPT1:

RPTO:

RPTAA:

BNE

PRINTS

MOVB
MOVB

RPT1

, #-1
<2(R2)

ENDEVT
RPTO

1JUST PRINTED
* BR IF NO

*CONTINUE...ELSE EXIT
*IF NOT CONTINUE

:POINT R2 TO START OF ENTRY

#EVTFO

*PRINT EVENT ENTRY HEADER

(R2)+.R3

:PUT EVENT TYPE INTO R3

(R2)+.EVITCK

1,-(sP)
sp.no

MOV
MOV
MOV
TRAP
ADD

#EVTFO,~(SP)
#1,-(SP)
SP.RO
CSPNTS
¥4,SP

:;PUT EVENT TIME (TICKS,SECS.MINS IN TEMP LOC.S)
(R2)+.EVISEC
MOVB
(R2)+.EVIMIN
MOVB
PRINTS #EVTFi,EVTMIN,EVTSEC,EVITCK,EVTLST(R3) ;PRINT EVENT TIME AND LESCRIPT.

nov
MOV
MOV

MOV
MOV
MOV
TRAP
ADD

EVILST(R3),=(SP)

EVITCK,=(SP)
EVISEC.-(SP)
EVIMIN.=(SP)
#EVTF1.-(SP)
#5,-(SP)
SP,RO
CSPNTS
4,SP

gg;g 025320 000173 010442

JMP

SRPTDSP (R3)

:DISPATCH TO DECODING SECTION FOR SPECIFIC fYPE

010434

RPTTX2: MOV

(R2)+.EVIADD

:STORE MESSAGE ADDRESS FOR PRINTING

(R2)+.R3

*STORE MODEM STATUS FOR PRINTING

6235 025330 012237 010436

6236

025334

012203

MOV

(R2)+.EVIBCT

:STORE BYTE COUNT FOR PRINTING

MACY11 30A(1052)

CZKMUAQ KMS11-B L PDP=-11 DCLY
30
82

sGET ADDRESS OF DEVICE INFO MESSAGE

PRINTS

#EVTFS,EVITMP

;PRINT ODEVICE REG CONTENTS.

PRINTS

NEVTF3C.DEV1,DEV2

gzg;:.ggx;

Mov
MoV
MOV
MoV
TRAP
ADD

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

MOV

DEV2,=(SP)

MOV

REVTF3C,~(SP)

MOV

—ed bbb

RPTDVI:

RPT

CLR
CLR
MOv8
Move
Mov

DEV1

MOV
MoV

:GO BACK FOR NEXT EVENT ENTRY

ADD

DEV1,=(SP)

#3,-(SP}
SP.RO

CSPNTS

#10,SP

DEV2
(R2) +,DEV1

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

R2,=($P)

:SAVE R2 ON THE STACK

(R2) +.DEV2
(R2) +.DEV3
(R2)+.DEV4&

OO0

16O PRINT MODE, MAINT-LOOP TYPE, PARAMTERS.
JSR
*RESTORE R2
Mov
160 BACK FOR NEXT EVENT ENTRY
JMP
: ;REPORT END OF PASS OR “C ABORT

OO0

WO W & Wil
N
NN NONNNNY

NNV

Nbg\l NNNNY

O—=O BB

OO OOOCOOON

b
md d

=l=l=lelalal
o
Q =b Q) =b b b b b
ONSHONNNN

TRAP

JMP

EVIBCT,=-(SP)
EVTADD,~(SP)
#EVTF2,=(SP)
#3,-(SP)
SP,RO
CSPNTS
#10,SP

sSTORE DEVICE REG CONTENTS FOR PRINTING

010474

Mov
Mov
MoV
MOV
TRAP
ADD

(R2)+,EVTITMP

MOV
MOV

(= OO
—_
Q
Q
(=]
o

sPRINT ADDR,BYTE CNT

#EVTF2 ,EVTADD,EVTBCT

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

RPTDER: MOV

OO0

Goor G

o prar Qouur G

=000

09:15

SEQ 93

PAGE 23-52

PC,RPTMSB
RPT

JSR
JMP

Guur Ghurs

PONO

OO0

OO0 —=00000
QCOOO
bbb

(olelele]

PRINTS

000006

el
ek

(9)

g—‘OOOOOO
O—
(=lel=)
PRGN
NS

6237

30-MAR-82

PRINT EVENT LOG

P11
CZKMUA.P1

000012

RPTABO:

RPTEOP: MOV

Mov
MoV

PRINTS

PC . SHWOP
(SP)+,R2
RPT

(R2)+,EVTADD
(R2)+.EVIBCT
(R2)+.EVITHP

SEVTFLB,
EVTADD, EVTIBCT,EVITMP

;PRINT ADDR,RXBYTES,CMPBYTES.
MOV
MOV
MOV
MCV

EVITMP,=(SP)
EVIBCT.~(SP)
D
. ~(SP)
EVTAD
SEVTF4B,~(SP)

MOV
TRAP
ADD

SP,RO
CSPNTS
#12,SP

MoV

#6,-(SPJ

D
CIKMUA 0 kMS11- aL PDP-11 DCLY

30-MAX-82 09:13

:
RPTDDE

NNW

30 -MAR-82

PRINT EVENT LOG

025152

MACY11 30A(1052)

09:15

SEQ 94

PAGE 23-53

JMP

RPT

sTHEN GO GET NEXT EVENT ENTRY

MoV
MoV
MOV

(R2)+,EVTADD
(R2)+ ,EVIB(CT
(R2) .EVITMP

:STORE MESSAGE ADDRESS FOR PRINTING
:STORE BYTE COUNT FOR PRINTING
:STORE TOTAL # OF (MP_ERROAS

PRINTS

ONINI NN
o NNNNYN
S
oP
o o OONONON

b od

b o

=2000000

025612

000137
PONON)

025600

OO0

(ZKMUA. P11

#EVTF«,SVTADD,EVIBCT,EVTITMP

:PRINT Aok, BYTE CNT, # CMP ERRS
MOV
MOV
MoV
MOV

EVITMP,=(SP)
EVTBCT.=(SP)
EVTADD,=(SP)
SEVIF4.=(SP)

MOV

SP.RO

MOV
TRAP

JMP
:
RPTDLE
RPTDCK: MOV

MOV
MOV

PRINTS

RPT

:THEN GO GET NEXT EVENT ENTRY

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

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

WEVTFLA,EVTADD,EVTBCT,EVITMP

ADD

MOV
MOV
MOV
MOV

MOV
TRAP
ADD

000012

025736

000137

025742
025744
025746
025750

012604
012603
012602
000207

025152
ENDEVT:

JMP

RPT

:THEN GO GET NEXT EvENT ENTRY

MOV

(SP)+,Ré4

;RESTORE R4,R3.R2

RTS

;RETURN TO CALLING ROUTINE

MOV
MOV

(SP)+.R3
(SP)+.R2

CSPNTS
#12,5P

:PRINT ADDR,RXBYTES,CMPBYTES.

MOV

025732

#6,~(SP)

EVITMP,~(SP)
EVTBCT.=(SP)
EVTADD,=(SP)
SEVTF4A - (SP)

#4,-(SP$

SP,RO
CSPNTS
#12,SP

sREPORT MODEM STATUS SUBROUTINE

026016

Ogdcbb
N

WO
—=O
SN HO00NO0NO

NNONNNNSONNN

S OMNON)

O—= OO0
O= 0=
VIR = AR

025752

—000
PO~d=d
-

PART OF STATISICAL REPORTING (DUMPING EVENT LOG)

000407
032403

016766
000001

000004
010276
010314

RPTMS8:

PRINTS

#EVMOHD

:PRINT MODEM STATUS HEADER

MOV

SEVMOHD , - (SP)

MOV
TRAP
ADD

SP,RO
CSPNTS
#,SP

MOV

6$:

000130

MOV

#MOBITS R4

sMAKE R4 A POINTER TO MODEM SIG. BIT DEF. TABLE

ST
BNE
MOVB

(R4)
78
#'X,3(RS)+

*SEE IF BIT AVAIABLE FROM DEVICE
:BR_IF THAT MODEM SIG. AVAIABLE
*ELSE PUT ''* IN REPORT IF SIGNAL NOT AVAILABLE

MOV
ST

7$:

M ,-(SPS

BIT

AMOMSGS RS
(R4S +

(R4)+,R3

‘MAKE RS A POINTER TO MODEM MSG. POSITION TABLE
‘BUMP R4 TO POINT TO NEXT BIT DEFINITION
1GO SEE IF CHECKED ALL MODEM SIGNALS

*IF THERE, SEE IF THAT BIT IN DEVICE'S ENTRY=1

E
CZKMUAQ kMS11-BL PDP=11 DCLTY
30-MAR-82 09:13
CZKMUA.P1
026020
026022

001403
112735

017046
000001

000004

30-MAR-82

PRINT EVENT LOG

000061

000060
010314

026062

MACY11 30A(1052)

8s:
9$:

BEQ
Move
BR
MovB
CMP
BLT
PRINTS

09:15

#'1,3(R5)+
93
#'0,8(R5)¢
R:.IHOBITE
6
NEVMOST

SEQ@ 95

PAGE 23-54

:BR IF BIT (SIGNAL) VALUE =0
$1F=1, PUT *“1°" IN REPORT MESSAGE

:60 SEE IF ALL MODEM SIGNALS CHECKED
*IF BIT(SIGNAL)=0, PUT '0'' IN REPCRT MESSAGE
‘SEE IF ALL BITS(SIGNALS) CHECKED
*LOOP UNTIL ALL SIGNALS(BITS) CHECKED
*THEN PRINT MODEM SIGNAL VALUE MESSAGE
MOV

SEVMOST,-(SP)

MOV
TRAP
ADD

SP.RO
CSPNTS
#4,SP

MOV
RTS

;RETURN TO EVENT DECODING

#1,-(SP}

CZKMUAOQ kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11

SEQ 96

MACY11 30A(1052)D 30-MAR-82 09:15 PAGE 23-55
UMP BYTES OR WORDS
DUMP BYTES OR WORDS

FS
+

.SBTTL

FUNCTIONAL DESCRIPTION:

DUMPSR = DUMP BYTES OR WORDS SUBROUTINE
THIS SUBROUTINE PRINTS THE CONTENTS OF THE LOCATIONS BETWEEN

A STARTING AND END ADDRESS IN LOCS. ''STADD'' AND '‘ENADD'’.

THE WORD OR BYTE CONTENTS ARE PRINTED 8 T) A LINE WITH THE
ADDRESS OF THE FIRST BYTE AS THE FIRST 6 OCTAL CHARS. FOLLOWED

BY A SEMICOLON.

INPUTS:

STADD=

ENADD=

STARTING ADDRESS (FIRST LOC. TO PRINT)
END ADDRESS (LAST LOCATION TO DUMP)

BYTBIT= 1 IF SUPPOSED TO PRINT 'BYTES''
0 IF SUPPOSED TO PRINT 'WORDS''
OUTPUTS

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

CALLING SEQUENCE:

JSR PC.DUMPSR

013702
005003

007220

DUMPSR: MOV
CLR
DUM4:

PRINTF

STADD ,R2
R3

#BASM1,R2

;CALL DUMP BYTES SUBROUTINE

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

016065
000002
000006
007224

puM3:

007244

TST

8YTBIT

:1S THIS BYTE OR WORD

MOVB

(R2)+,TEMP

‘MOV BYTE TO TEMP

BEQ

puM1

MOV
MOV
MOV
MOV
TRAP
ADD

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

‘BR IF WORD

PRINTF

#BASMS,<B,TEMP> :PRINT BYTE

DUM?2
#BASM2, (R2)+

‘LR

sP)

007244
016047
000002

880-&-&—.-.

-=O0000

000006
DUM1:

PRINTF

:PRINT WORD

016056
000002
000006
007222

DUM2:

CMP

R2,ENADD

:COMPARE FOR LAST ADD

MoV

(R2)+,-(SP)

MOV

#BASMS ,~(SP)

MOV
TRAP
ADD

CSPNTF
#6,5P

SP.RO

G
CZKMUAO kMS11-BL PDP=-11 DCLT

CZKMUA. P11

30-MAR-82 09:13

6350

026204
026206
026210

003005
3
02270%

6352

026216

000736

6354

026220

000207

6348

MACY11 30A(1052)

30-MAR-82

8GT
INC
cMp
BEQ

000010

DUMEA:

09:15

UMP BYTES OR WORDS
ogasx

#8. .R3

pumé

puM3

RTS

PAGE 23-56
:JF DONE EXIT

:ELSE BUMP R3
:HAVE WE PRINTED 8 ACCROSS
sIF SO GO °ACK 7O 4

ZELSE GO BACK AND PRINT ANOTHER

;BYTE OR_WORD
:RETURN TO CALLER

SEQ 97

CZKMUAQ kMS11-8L POP=11 DCLT
30-MAR-8 2 09:13
CZKMUA.P11

SEQ 98

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-57
UPDATE TOTAL CHAR. COUNT SUBROUTINE

UPDATE TOTAL CHAR. COUNT SUBROUTINE

FUNCTIONAL DESCRIPTION:

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

BUFFER IF TOTAL CHAR. COUNT EXCEEDS 'BUFLIM'' A MESSAGE
IS PRINTED TELLING THE OPERATOR THE TRUNCATION OCCURED.
INPUTS:

OUTPUTS:

CURCC=
CC=

CHAR. COUNT OF MESSAGE BEING ADDED
TOTAL CHAR COUNT OF BUFFER ITS BEING ADDED TO

MESSAGE TO OPERATOR IF MESSAGE TRUMCATED TO FIT

FUNCTIONAL SIDE EFFECTS:

LOCATION °‘‘TEMP'' USED FOR CALCULATIONS

CALLING SEQUENCE:
JSR

PC,ADCC

;UPDATED TOTAL CHAR. COUNT

PR YRIEAI A EIEIE

A TE PN

PR PR EB PR X XN

)
L d
*

.SBTTL

026222
026230
026236

063737

007230
001000

007240
007240

ADDCC:

ADD
CMP

BHIS

CURCC,TOTCC
#BUFLIM,TOTCC
ADDC1

sADD CURRENT TO TOTAL
; COMPARE TO ‘BUFLIM"

sIF NOT MORE THEN 'BUFLIM' EXIT

026316

uuuo-g

W NN SH O
~ NNNNNSO NN
"
WN
oo~
~ ~ NNNOVV

026240

—=000
© b b =D

: PRINT MESSAGE AND TRUNCATE COUNT
PRINTF

015104
000001
000004

007230

MMSGTRU

MOV

TEMP, CURCC

2SUB CURRENT FROM TOTAL
;MOV 'BUFLIM’ TO TEMP
:SUB TOTAL FROM 'BUFLIM’
SAND ESTABLISH NEW CURRENT

SJRETURN TO CALLER

CURCC,TOTCC
A3UFLIN,TEMP

007240
007244

TOTCC,TEAP

ADDC1:

CURCC,TOTCC

MOV
TRAP
ADD

MSGTRU, - (SP)

#1,-(SP)
SP,.RO

CSPNTF
#6,SP

:ADD “ADJUSTED CURRENT'' TO TOTAL CHAR. CNT.

CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CIKMUA.P11

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 23-58
BUILD MESSAGE BUFFERS SUBROUTINE
BUILD MESSAGE BUFFERS SUBROUTINE

.SBTTL
+e

FUNCTIONAL DESCRIPTION:

BLDBUF=-=

BUILD POINTER TABLE AND BUFFERS

THIS SUBROUTINE ADDS A MESSAGE TC THE TRANSMIT OR EXPECT LiST
USING THE POINTER, BYTE COUNT, AND ADDRESS PASSED TO IT.

RRPRERERRIRRIRRLLILEALIALEAIEALLS

INPUTS

MSGTYP= VALUE TO USE AS AN INDEX TO FIND SOURCE OF MESSAGE DATA
INDEX INTO DMSGCT() AND DMSGAD().

OUTPUTS:

A MESSAGE ADDED TO EITHER TXB F OR (MPBUF
APPROPRIATE POINTERS IN PTRTAB POINTER TABLE

OSSN

CALLING SEQUENCE:

JSR P(,BLDBUF

026330

OO0

026324

O0O000

026320

Prruur G- Queur S G

V& NNV = O 000

CHAR. COUNT OF MESSAGE TO BE ADDED

CURAL D= ADDRESS OF MESSAGE TO BE ADDED
ADDRESS ?8 ;glgLEfTTABLE WORD WHERE MESSAGE POINTERS ARE
CPTR=

6411

A = © V00 N

CURCC-

BLDBUF:

B8LDB1:

007236
007226

007236

007244
007244

007250
007250

007250

000207

8LDB2:

8LDB3:

007244

007230

MoV

R2,=(SP)

;SAVE R2 AND R3 ON THE STACK

MoV
MoV

CURADD, (R2) +
CURCC,(R2)+

;PUT CURRENT ADD ON POINTER TAB
sPUT CURRENT CC ON POINTER TAB

MoV
Mov

007234

007236

;BUILD MESSAGE IN BUFFER AND ADD PTRS.

MOV
MOV
ASL
MOV
ADD
MOV
MOV
MoV
ADD

movB

cMP
BEQ
CMP

R3,-(SP)
CPTR,R2

‘PUT UPDATED R2 BACK TO CURRENT POINT
R2,CPIR
‘GET MESSAGE TYPE TO USE AS INDEX
MSGTYP,R2
‘DOUBLE FOR WORD INDEX
R2
‘MOVE CURRENT ADD TO TEMP
CURADD , TEMP
‘ADD CHAR COUNT TO IT TO GET END
CURCC, TEMP
*SET R3 TO CURRENT START ADD
CURADD k3
GET BYTE COUNT
DMSGCT(R2) , TEMP2
FROM ADD IN Ré
STARTING
DMSGAD (R2) R4 ;PUT
Ré, TEMP

(R&)+, (R3)+

SADD IT TO TEMP2 TO GET END OF FROM

MOV BYTE FROM PATTERN TO BUFFER

*ALL DONE?
*1S PATTERN COUNT EXPIRED

R3, TEMP
BLDBEX
R&, TEMP2

SIF SO EXIT

CURCC,CURADD

:BUMP CURADD

BEQ
BR

aweg
8LDB

*IF SO GO START AGAIN
“IF NOT GET ANOTHER BYTE

MOV

(SP)+.R3

*RESTORE R3 AND R2

BLDBEX: ADD

MoV

RTS

(SP)+.R2

sRETURN TO CALLER

SEQ 99

CZKMUAO KMS11-BL PDP-11 DCLT
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-59
CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST
CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST

2225

.SBTTL

6450

6449

FUNCTIONAL DESCRIPTION:
:
:
:
:
H

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

gzgg

CALLING SEQUENCE: JSR

6451
6452
6453
6454
2222

6459

s--

6460
6461

H
:

22;?

6462
6463
6464
6465
6466
6467
6468
6469

DEFINITIONS

PC,FACSIMILE

CMPBUF = EXPECTED DATA BUFFER HOLDS MAX 512 BYTES
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 IM EXPECT MESSAGE
CMPTOT = NUMBER OF EXPECTED MESSAGES
CMPPTR = EXPECTED MESSAGE LIST POINTER
TXPTR = TRANSMIT MESSAGE LIST POINTER
TXMTOT = NUMBER OF TRANSMIT MESSAGES
CCURAD = STORACE ADDRESS OF MESSAGE INCMPBUF

:
:
H
H
:
:
:
:

MSGLIN = MAXIMUM NUMBER OF MESSAGES THAT CAN BE STORED

6472
6473
6474
6475

:
:
H
H

BEGIN FACSIMILE ROUTINE
(*COPY TXBUF ==> CMPBUF*)
.. SAVE R1
« - INIT R1

6477

....[CHPBUFJR1 CTXBUFIR1

2258

..UNTIL R1 BUFLIM

6481

(*NOW CALCULATE EXPECT LIST MESSAGE POINTER®)

6484

6487
6488

H
H

6476

gzg%
6485
6486

6489

6490
6491

6493
6494
6495
6496
6497
6498

6499
6500
6501

’

. -REPEAT

«.CMPPTR = PTRTAB ¢ (2 * MSGLIM)

(*NOW PRIME THE WHILE - DO LOOP*)

:
H

.. TXPTR = PTRTAB
«.CCURAD = CMPBUF

..CMPTOT =

H
H

H
:
H
H
H
:

:
H
:

««TXPTR = TXPTR ¢+ 2
«.CTOTCC = [TXPTR]
«.WHILE TXHTOT <> CMPTOT DO
....[CHPPTRJ CCURAD

= CTOTCC
«eo.LCMPPTR]
eess JXPTR = TXPTR + 4
eeeo CCURAD = CCURAD ¢ CTOTCC
eeeCTOTCC = [TXPIR]
cos.CMPPTR = CMPPTR ¢ 2
ee..CMPTOT = CMPTOT ¢ 1

«.END WHILE DO
..CTOTCC = TT0TCC
END FACSIMILE ROUTINE

SEQ 100

CZKMUAO kmMS11-BL PDP=11 DCLY
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 23-60
CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST
FACSIMILE:

026444

CLR

R1,-(SP)
R1

INC
cMP

R1
R1,#BUFLIM

MOV
ASL
ASL
MOV
ADD
CLR

MMSGLIM,R1
R1
R1
#PTRTAB,CMPPTR
R1,CMPPTR
R1

MOV

003400

005400

10s:

001000

026510

208:
007154

026546

000744

026636

013737

026644
026646

012601
000207

F
(R1)
TXBUF (R1) ,CMPBU

10$

:SET UP WHILE - DO LOOP
#PTRTAB,TXPTR
#CMPBUF ,CCURAD
#2,TXPTR
aTXPTR,CTOTCC
CMPTOY

:SAVE R1
JINIT RY
;COPY TX BUFFER TO EXPECTED BUFFER
;BUMP INDEX
;ALL DATA COPIED ?
:NO,BRANCH

sMESSAGE LIMIT

sMULTIPLY BY 2
:MULTIPLY BY 2

:TOP OF POINTER TABLE
?L??TR?F EXPECTED POINTER TABLE

sTX POINTER NOW AT TOP OF TABLE
:TRANSFER ADDRESS OF 1ST MESSAGE
;BUMP POINTER

007156

MoV
MoV
ADD
MOV
CLR

007172

007156

C:gILE TX MESSAGE TOTAL <> EXPECTED MESSAGE TOTAL DO
c%% gESSGGES COPIED ?
TXMTO7,CMPTOT

007162
000002

160370
007154
160354
007152
007162
007160
007154

006400
005400

026512
026520
026526
06534
026542

Mova

BNE

000017
006400
007154

007156
007174

007160

308:

40$:

408
CCURAD ,3CMPPTR
MOV
#2,CMPPIR
ADD
CTOTCC,aCMPPTR
MOV
#6,TXPTR
ADD
CTOTCC,CCURAD
ADD
MOY
8TXPTR,CTOTCC
#2,CMPPTR
ADD
CMPTOT
INC
308
8R
- DO
sEND WHILE
BEQ

MoV

TToTCC,CTOTCC

;END ROUTINE

MOV
RTS

(SP) +,R1

:BYTE COUNTER 1ST MESSAGE

sINIT EXPECTED MESSAGE COUNT

: TRANSFER ADDRESS OF MESSAGE
:BUMP POINTER
: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

SEQ 101

L
CZKMUAQ kMS11-BL PDP=-11 DCLY
30-MAR-82 09:13
CZKMUA. P11

SHOW MODE OF OPERATION, LOOP TVPE AND QUALIFIERS

FUNCTIONAL DESCRIPTION:

SHWOP - SHOW MODE OF OPERATION, LOOP, QULAIFIERS

N R X1

INPUTS:

(X YR

IR IR R

AT ATA

A PR

PRYR

PRPR

PRINTFD ON THE OPERATOR'S CONSOLE.

027056

PN NN NN

OOt —b=d b and and b
RN NN
N
NNNNN
~

O—=0000000

003332
010474

007244

014450

007252

014447
003350
010476

007252
007246
007250

CALLING SEQUENCE:
JSR PC,SHWOP
MOV
ASL
MOV
MOV
ASL
MoV

TST
BNE

108:

MoV
MoV

MOV

PRINTS

007250

DEV1.R2
R2
(R2) , TEMP
MODES
DEV2.R2
R2
#LPO0,TEMP3
R2
10$
#LPO, TEMP3
LOOPS (R2) TEMP1

:GET THE MODE TYPE IN R2
sMAKE IT A WORD TABLE OFFSET

sGET ADDRESS OF MODE=IN-ASCII
sGET MAINTENANCE LOOP TYPE

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

sSEE IF /LOOP=XXXXX OR NONE
: BR IF /LOOP= OF SOME KIND
;1F NO LOOP THEN DON'T PRINT °'/LOOP="’

:GET ADDRESS OF LOOP=IN-ASCII
;GET NUMBER OF PASSES
DEV3, TEMP2
#SHFO,TEMP,
TEMF3. TEMPT, TEMP2

TEMP2,~(SP)
.= (SP)
TEMPY
TEMPS.-(SP)
TEMP,=(SP)

#SHFQ
= (SP)

015167

#5,-($P)

SP.RO
CSPNTS

OO0

OOOOOOOOOS

026766

IMPLICIT 1 NPUTS:
TABLE OF ADDRESSES OF MODE NAME STRINGS
MODE S
TABLE OF ADDRESSES OF LOOP TYPE NAMES
S=
LOOP

SHWOP:

010472

MODE _TYPE (MODTYP)
MAINT LOOP TYPE (MLTYP)
‘RUN PASS’'' COUNT (RPASS) = COUNT DOWN
PARAMTERS WORD (PARAM)

WO
-—d O N = =d O N =d =D
N =2
= RN
= TNINLA
NONNNONNNONNG
WO O NNINOWND
NN NNNWSNNYNY N NN

026762

013702

s€a@ 102

MACY11 30A(1052)s 30-MAR-82 09:15 PAGE 23-6!
HOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS
.SBTTL

026650

0N7244
007246
0105C0

18:

007246
007250
010500

2$:

007250

sNOW SET UP FOR QUALIFIERS IN ASCII

qgrAfa.osva

sSEE IF /STATUS OR /NOSTATUS
sBR IF /STATUS

#PST, TEMP

007244
010500

014546

APNST , TEMP

#PcK , FEMP
chréxa.oeva
2
APNCK , TEMPY

#PEC, FEMP2

gscuoa.oeva

$
#PNEC, TEMP2

sSEE IF /CHECK OR /NOCHECK
sBR IF /CHECK
:SEE _IF /ECHO OR /NOECHO
¢BR IF /ECHO

CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CcKMUA.P11
6593
6594
6595

027064
027072
027100

012737
032737
001003

014557
000010

MACY11 30A(1052)
007256
010500

3$:

gggg 027102 012737 014555 007256
6515

6616 027110
(1) 027110 013746 007256
(10) 027114 013746 007250
(9) 027120 013746 007246
(8) 027124 013746 007244

5$:

30-MAR-82 09:15 PAGE 23-62
SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS
;ASSUME /MODEM ;REV B EC
#PMS , TEMPS
MOV
*MODEM CHECK? -REV B EC
#MOCHK , DEV4
BIT
:YES,BRANCH ;REV B EC
5¢
BNE

**//NOMODEM MESSAGE sREV B EC

MOV

#PNMS , TEMPS

PRINTS

W#SHF1,TEMP,TEMP1,TEMP2,TEMPS

027134 012746 000005
027140 010600
027142 104416
027144 042704 000014
027150

000207

:,TEMP3,TEMP4 vsee NOTE ABOVE
TEMPS, = (SP)

nov
MOV
MOV

MOV

(7) 027130 012746 015225

(6)
(3)
(%)
(45

SEQ 103

RTS

:RETURN

MOV
MOV
TRAP
ADD

.= (SP)
TEMP2
TEMPT.~ (SP)
TEMP,=(SP)

#sHEd - (sP)

#5,-($P)
SP.RO
CSPNTS
#14,5P

CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CIKMUA.P11

MACY11 30A(1052)

SEQ 104

30-MAR-82 09:15 PAGE 23-63
TRAVERSE COMMAND LINE SUBROUTINES
TRAVERSE COMMAND LINE SUBROUTINES
PSTRV SUBROUITNE

PARSE THE COMMAND LINE SUBROUTINE

sTAKE ACTIONS (VIA ACTION TREE) AS PARSING LINE

PARgégg 8§ESCTIONS FROM *‘CLI PARSING NODES'’
R1.R5=SCRATCH

R2=ACTION CODE PARAMETER FROM TREE

PSNUM=NUMERIC CODE FROM DATA

R3=PARSE TREE PGINTER
R4=INPUT STRING POINTER

CALLING SEOUENCE
PC,PSTRY

027152

003362
003364
000013

MoV
1S7T8
BEQ

NP8
13
22{8

R4
PSBUFA

PSTREE ,R3
(R4)
PSEXIT

(R3),M1.
208
;gs).ns

'}8},’

}'%;nsg,RS

JSR

PC, (RS)

;SEE IF ANY CHARS LEFT IN INPUT STRING
‘BR IF NO

‘SEE IF SPECIAL CLI CHAR CODE OR ASCII
‘BR IF REGULAR ASCII CHAR

*GET SPECIAL CHAR CODE INTO RS

:BUILD TRAVERSE ROUTINE ADPRESS

:JSR TO SPECIAL CLI TRAVERSE ROUTINE

027210
027212

B8R

027214

;TRAVERSE TABLE FOR 'CLI FUNTIONS'
“TAKE ERROR ACTION
TRVERR=10$%
"WORD

"WORD
"WORD
"WORD
"WORD
"WORD
"WORD
WORD
"WORD
"WORD
"WORD

027240

P$TRS

TRVEXI=10$
TRVBR-10%
TRVBIF-10$
TRVSPA-10$
TRVNUM-10$
TRVALP-10$
TRVALN-10$
TRVOCT-10%
TRVDEC-10$
TRVSTR-10$

‘G0 SEE IF MORE OF STRING LEFT

STAKE EXIT ACTION
STEST PSGDBD €& TAKE BRANCH
SSKIP SPACES OR TABS IN CMD LINE
STRAVERSE NUMERIC FIELD
STRAVERSE ALPHABETICS
'TRAVERSE ALPHANUMERICS
SSAME AS TR vnm
SSAME AS CLINUM BUT DECIMAL
SFIND ASCIZ MATCH IN CMD LINE
STAKE BRANCH ACTION

NNNN SN

OWSNO
=
NN~ &~

w
NN

gS 2332

N
- b

027242

sNOT A SPECIAL CODE

(R3).(R4)

sSEE IF FIRST CHAR OF STRING IS A MATCH

B8R
JSR
ADD

PC, TRVBRC

PS$iRS
JTRVACT
92

:1F NOT A MATCH,

INC

Ré

* ADJUST PTR TO NEXT CLI NODE
TADJUST BUF PTR TO NEXT CHAR If MATCH

(MP8

027312

BEQ

JSR

22%

PSTRS

‘BR IF A MATCM

GO TAKE MISS BRANCH

60 BACK PT°G TO MISS NODE
S THEN
S1F A MATCH, 60 DO Acrlon DEF INED BY
S"ACTION CODE IN CLI NODE, THEN

CZKHUAO KHS11-BL PDP-11 DCLY
2 09:13

CZKMUA.P
7

6673

027270

6683

027272

6684

6687
6688

027310

6690
6691
6692

027312
027316
027320

MACY11 30A(1052)

30-MAR-82

016305
060503
000207

000002

BIC
MOV

177460 R2

RTS

JSR

6695
96

027322
027326

062703
000207

6699

027330

004737
112737
005726
000137

027272
177777

1(R3

PSACT RS
PC, (RS)

sTHINGS OK, UPDATE R3 TO POINT TO NEXT

TRVERR: JSR

move
3T
JMP

PC,TRVACT

#-1 P$GDBD
(SP§+

PSEXIT

PC,TRVACT

6704
6705
6706
6707

027350
027354
027360
027362

004737
105037
005726
000137

027272
003377

TRVEXI: JSR

027270

JMP

PSEXIT

6709
6710

027366
027372

004737
000137

027272
027312

TRVBR:

JSR
JMP

PC,TRVACT
TRVBRC

6712
6713
6714
6715
6716

027376
027402
027406
027410
027414

004737
105737

027272
003377

TRVBIF: JSR
IST8
BEQ

PC,TRVACT
P$GDBD
18

18:

TRVNOS

6718

027420

000011

000040

CLRB
ST

027456

027272

JMP
NP

TRVSPA: CLR
1$:
MP8
BNE
INC
INC
BR

28:

108:

6732

;GET ACTION CODE FROM CLI NODE
:CLEAR ANY SIGN EXTENSION
;GET ADDRESS OF CLI ACTION ROUTINE
;G0 DO ACTION DEFINED BY CODE
;RETURN TO CALLING CODE

:NO BRANCH TAKEN
#4,R3
TRVNOB: ADD

027270

027312
027322

sRETURN FROM PARSER

GET BRANCH DISPLACEMENT FROM TREE
; AND POINT R3 TO THE 'MISS'’ NODE

RTS

003377

PAGE 23-64

:TAKE BRANCH IN TREE
R
2(R3)
TRVBRC: MOV
RS,R3
ADD
RTS

000004

:GOTO USER ACTION ROUTIgE

TRVACT: MOVB

000001
177400
003366

SEQ@ 105

TRAVERSE COMMAND LINE SUBROUTINES

PSEXIT: R1S

000207

09:15

CMPB
BNE
INC
INC
BR
TST
BEQ
JSR

P$GDBD
(SP)+

TRVBRC

RS
(R4).MN
2s
R4
RS
13

(R4),#40
108
R&
RS
1%
RS
158
PC, TRVACT

; RETURN TO F$TRV

. NODE AND RETURN TO PSTRV
sTAKE ERROR ACTION
;SET ERROR RETURN FLAG

:GET RID OF ‘JSR PUSH_TO TRVERR''

:RETURN DIRECT TO EXIT OF PSTRV ROUTINE
sTAKE EXIT ACTION

:SET GOOD/BAD FLAG TO 'SUCCEESI(O)"

:GET RID OF ‘'JSR PUSH TO TR
:RETURN DIRECT TO EXIT OF PSTRV ROUTINE

;GO TAKE BRANCH ACTION

sSEE IF PSGDBD SET OR CLEARED BY ACTION
:IF CLEAR FALL THRU TO NEXT NODE
;ELSE TAKE THE 'MISS'' BRANCH

:JUST UPDATE TO NEXT NODE IF THINGS OK
sCLEAR *'SPACE OR TAB FOUND'’ FLAG
SEE IF CHAR. IN CMD LINE= TAB
A TAB
BR IF NO, NOT

INC. INPUF srnxus POINTER
*INDICATE A TAB FOUND
160 CHECK NEXT CHAR

;SEE IF CHAR IN CMD LINE= SPACE

NON-SPACE OR NON-TAB CHAR.

POINTER
SINC lNPUf STRING
SPACE FOUND

‘BR IF

SINDICATE A

€
160 CHECK NEXT

;SEE_IF ANY SPACES OR_TABS FOUND
:GO TAKE ACTION IF ANY FOUND

:BR IF NO, TAKE NO ACTION

CZKHUAO KHS11~BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P

MACY11 30A(1052)

6733 027462 000137 027322
g;gg 0276466 000177 027312
6736

6737 027472
6738

027500

15¢:

012737 000012 003374
000137

027512

6739 027504
6740 027504 012777 000010
6741 027512 005005
6742 027514 11427 000053

003374

027520

001001

6745

027524

121427

000055

112737

177777 003375

67t 027522 000406
6746

027530

001004

027540

005204

6747 027532
g;zg

6750 027542

027546

002434

6753
6754

027554
027556

003426
123727

6757

027572

003022

(3)
(&)
(4)
6759

027606 010600
027606 104417
027610 062706 000004
027614 112737 177777

118:

1$:
000012

6762 027624

003003

6764 027632 005204
6765 027634 005205
g;gg 027636 00074
6768 027640
6769 027642

005705
001464

027646

160501

6771

6774 027656 162702

BNE

MOVB
INC

6783

027720

103426

003372

000060

6782 027712 123727 003374 000012
001004

13s
PSRADX,#10.
128
(R&) AT
28

B8R
128:

#-1,P$GDBD

CMPB (R4), AN

138:

86T

INC
INC
B8R

2%:

ST
BEQ

RS
58

SUB

RS.R1

SUB

#60,R2

38:

MOV

CLR
MOVB

ASL

027710

#=1,PSRADX+1

CMPB (R4) 467

003372

6781

BLE
CMPB

BLT

MOVvE

003377

6777 027670 013737 003372 003370
6778 027676 006337 003372
6779 027702 103431
006337

(R4) @'~

(R4) 460

ASL
ecs

027704

118

(MPB

003372
6775 027662 006337
027666 103437
6776
6780

108

PRINTF #CLIBRX

6770 027644 010401

6772 027650 005037
6773 027654 112102

CMPB

BGT

121427 000071

027630

6763

B8R

BEQ
(MPB

6758 027574
(7) 027574 012746 012421
(6) 027600 012746 000001
g;g? 027622 000474

TRVNOB
TRVBRC

;JUST GO UPDATE R3 TO NEXT NODE IF OK
STAKE BRANCH (MISS) IF NONE FOUND

;USE DECIMAL AS RADIX AND ASSUME +
010..PSRADX
RVNMA
JMP
TRVOCT: : (SAME As TRVNUM SINCE DEFAULT RADIX IS OCTAL)
SUSE OCTAL AS RADIX AND ASSUME +
#8. ,PSRADX
TRVNUM: MOV
:CLEAR DIGIT COUNTER
RS
TRVNMA: CLR
see IF THERE'S A + SIGN THERE
CMPB (R&4) @'+

6752 027550 121427 000067
003374
6755 027564 001417
6756 027566 121427 000071

JMP
JMP

TRVDEC: MOV

108:

121427 000060

6751

30-MAR-82 09:15 PAGE 23-65
TRAVERSE COMMAND LINE SUBROUTINES

BNE

6743

SEQ 106

1OV
ASL
B8CS
BCS

CMPB

BNE

R4
RS
1%

R4 ,R1

:"BR IF NO

* ELSE PSRADX ALREADY SAYS +, JUST BR
see IF THERE'S A ~ SIGN THERE
: BR IF NO

SSET "MINUS FLAG''

)

(HI BYTE OF PSRADX)

‘BUMP R4 TO POINT TO FIRST CHAR

:SEE IF CHAR. LESS THAN A ‘0"’

‘BR IF YES (NOT NUMERIC)

‘SEE IF CHAR. GREATER THAN A ‘7
*"BR IFYES
*SEE IF IN DECIMAL MODE

*"BR IF YES (CAN USE HIGHMER LIMIT)
“SEE IF DIGIT WAS A 8 OR 9
*BR IF NON=-NUMERIC

“ELSEWAS A 8 OR 9 WHEN IN OCTAL RADIX
canax -(SP)
MOV
sP§
MOV
:SET ERROR RETURN FLAG

MOV
TRAP
ADD

sp.ao
CSPNTF
#4,SP

*"PRINT ERROR AND TAKE MISS
:SEE IF CHAR. GREATER THAN A ‘9"
‘BR IF YES (NOT NUMERIC)

SUPDATE CMD LINE PTR TO NEXT CHAR.
SINDICATE A NUMERIC FOUND
160 LOOK AT NEXT CHAR.
:SEE IF rouuoAuy NUMERICS
‘BR IF NO, TAKE ‘MISS’* BRANCH

SGET Poxufea TO START OF NUMERIC STRING

PSNUM
(R1)+,R2

:CLEAR LOC. WHERE VALUE WILL BE STORED
*GET ASCII CHAR AND CONVERT IT TO A #

PSNUM
78

:SHIFT CURRENT VALUE TO MAKE ROOM
*ERROR IF NUMBER T00 BIG

PSNUM,PSCNT
PSNUM
78
PSNUM

PSRADX,#10.
43

*SAVE FOR LATER IN CASE DECIMAL RADIX
:ERROR IF NUMBZR TO0O BIG
:ERROR IF NUMBER TOO BIG

“SEE IF DECIMAL RADIX
*BR IF NOT EQUAL

CZKMUAD kMS11-BL PDP=11 DCLY
30-MAR-82 09:13

CZKMUA.P11

6784
6785
6786
6787
6788
6789
6790
6791
679
679
6794
6795
6796

027722

003370

MACY11 30A(1052)

15$:

R2.,PSNUM
7%
R5
3$
PSRADX+1
158
PSNUM
PC,TRVACT

7$:

#CLINBG

4£S:

003375
003372
027272
027322
012377
000001

(7)

000004
127777
027312

000101

09:15

SEQ 107

PAGE 23-66

TRAVERSE COMMAND LINE SUBROUTINES
;gCNT.P$NUH

003372

30-MAR-82

TRVYNOB

;ERROR IF NUMBER TOO BIG

;ERROR IF NUMBER TOO BIG
Sss {F Ngfl WAS PRECEDED BY A - SIGN
; ELSE NEGATE THE NUMBER BEFORE LEAVING

:SINCE NUMERIC FOUND, GO TAKE ACTION
:GO POINT R3 TO NEXT NODE

sPRINT NUMBER TOO 8IG ERROR

MOV

MoV
MOV
TRAP

003377

5%:
TRVALP:

1$:

#-1,P$GDBD
TRVBRC

(R6)
, 101

(R4) ,M132
2

000132

sSET ERROR RETURN FLAG

#CLINBG,~(SP)

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

sTAKE "MISS’' BRANCH

sCLEAR ALPHA FOUND FLAG

:SEE IF CHAR. LESS THAN A ‘A"’
:BR IF YL, (NOT ALPHA)
:SEE IF CHAR. GREATER THAN A *7"
:BR_IF YES (NOT ALPHA)

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

;60 LOOK AT NEXT CHAR
:SEE IF ANY ALPHA'S WERE FOUND

EzgRse e

VAN =O VO NOWVB WO

2s:

027272
027322
027312

38:

000060

108

TRVALN:

000972

000101

18:

000132

2%:

030146

3s:

PC,TRVACT
TRVNOB
TRVBRC

RS
(R4) ,#60
23
(R4) A72
18
Ré&
RS
108
(R6) 7101
2%
(R4) ,M132
2%
R4
RS
108
RS
33
PC, TRVACT
TRVNO8B
TRVBRC

:BR IF NO
sIF _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"’

en IF_YES (NOT NUMERIC OR ALPHA)
SEE_IF CHAR. GREATER THAN A '9'’
:BR IF YES (NOT NUMERIC)

:UPDATE_CMD LINE PTR TO NEXT CHAR.
:INDICATE A NUMERIC FOUND
$G0 LOOK AT NEXT CHAR.
SSEE_IF CHAR. LESS THAN A *A"
.
:BR IF_YES (NOT ALPHA)
:SEE_IF CHAR. GREATER THAN A ‘7'
:BR_IF_YES (NOT ALPHA)

SUPDATE CMD LINE PTR TO NEXT CHAR
INDICATE AN ALPHA FOUND
:60_LOOK AT NEXT CHAR.
153551"943"' ALPHANUM'S WERE FOUND
sIF _ANY FOUND TAKE ACTION
:THEN UPDATE R3 TO NEXT NODE ~NO BRANCH

:NONE FOUND, TAKE MISS BRANCH

NN
N =b b N NN =

NS NONWES

& 8—‘0-‘—‘—'0)000

QOO0

8o-o-ao
ONOOOOOO
SV
= b ad A =2 NN 0O

CZKMUAQ KMS11-BL PDP=11 DCL;
30-MAR-82 09:1
CZKMUA P11

MACY11 30A(1052)

000006
003370

2$:

003370

066303
000207
030236

000137

108:

MOV
ADD
CLR
1ST8
BEQ
TST8
BEQ
CMPB
BNE
INC
INC
INC
BR

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

TST

PSCNT

MOV

R1.R4

ADD

4(R3) ,R3

027312

BEQ

JSR

027272
000004

RTS

15$:

09:15

SEQ 108

PAGE 23-67

TRAVERSE COMMAND LINE SUBROUTINES

TRVSTR: Mov

030212
030214

30-MAR-82

JMP

;POINT R1 TO CMD STRINS

sPOUNT R5 TO MATCH STRING FROM CLI NODE
sCLEAR CHAR MATCH COUNT

gEE]IF ggb OF MATCH STRING YET
gEEIlF Egb OF CMD LINE YET
gEEIIFNSHARACTERS MATCH
:MATCH -INCREMENT MATCH COUNT

;UPDATE STRING POINTERS

:BR TO CONTINUE CHECKING CHARS.
s WHEN DONE SEE IF ANY MATCHES FOUND

15%

;YR IF NO, GO TAKE THE MISS BRANCH

PC,TRVACT

sIF A MATCH FOUND, GO DO MATCH ACTION

TRVBRC

;POINT (MD POINTER TO END OF STRING &

UPDATE R3 TO NEXT NODE (NO BRANCH)

(NO RETURN THRU TRVNOB SINCE DIFFERNT
DISPLACEMENT DUE TO MATCH STRING)
GO TAKE BRANCH
(PARSED O0K), =1 IF ILL CMD.....

CZKMUAO kMS11-BL POP-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)
.SBTTL

6866

30-MAR-82

REPORT CODING SECTION

09:15

SEa 109

PAGE 23-68

REPORT CODING SECTION

: THF REPORT CODING SECT! ON CONTAINS THE
: "PRINTS'' CALLS TH4AT GEN ERATE STATISTICAL RFPORTS.

6870
gg;%
6874

(3)

030242

6888 030242
6889

6906

(3)
(3)

BGNRPT

030242

004737 0236064

ENDRPT

030246

030246
030246

JSR

104425

LSRPT::

PC,REPORT

;CALL SUBROUTINE TO DUMP EVENT LOG
; AND BASE TABLE

L10011:

TRAP

CSRPT

6 9
CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

PROTECTION TABLE

.SBTTL

6908

6909
6910

23}
6914

’

030250

6917 030250
6918 030252
2353 030254
6922

PAGE 23-69

PROTECTION TABLE

* TO PROTECT THE LOAD MEDIA.

6$§z 030250

6921

09:15

* THIS TABLE IS USED BY THE RUNTIME SERVICES

6911

6915

30-MAR-82

MACY11 30A(1052)

sEQ 110

030256

177777
177777
177777

BGNPROT

-1
-1
-1
ENDPROT

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

CZKMUAO KMS11-BL PDP=-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

INITIALIZE SECTION

LSBTTL

6937

09:15

PAGE 23-70

INITIALIZE SECTION

6938
6939

R2.

6941

P AT THE BEGINNING OF EACH PASS.

P THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED

6940

6943

6944

BGNINIT

030256

632; 030256

6969 030256
6970 030262
6971

030266

005037
005737
001403

003202
007302

6973

030274

63;1 030274

104444

6975

030276

012737

6976 030304
(3) 030304 012700
(3) 030310 104447
030312

(2)

(3)

030320

104447

(2) 030322
6980 030324

103513

030314

CO07304

INIT1:

000040

(3)

(3)
6981
(2)
6982
6983
(3)
(3)
6984
(2)

2332

030322

030324

030330
030332
030332
030334
030340
030340
030344
030346
030346

030350

6987 030352
6988 030356
6989

READEF

031314

012700

000035

s1:

000523

START:

007340

000114

START

NEW

TRAP

CSDCLN

;SET RESTART FLAG

*1F HERE CAUSE OF START.DO SOME INIT
#EF .START RO
MOV
CSREFG
TRAP
8CS

START

:IF HERE CAUSE OF RESTART, DO SOME INIT
#EF .RESTART RO
MOV
CSREFG
TRAP
RESTRT
8CS
CONTINUE
A
OF
CAUSE
:SEE IF WE'RE HERE
#EF.CONTINUE ,RO
MOV
CSREFG
TRAP
;BR IF NOT HERE CAUSE OF CONITNUE
BCC
$1
:JWP IF HERE CAUSE OF A CONTINUE
‘SEE IF THIS IS A 'NEW PASS'
MOV
#EF .NEW,RO
TRAP
CSREFG
;IF YES, BR AROUND LOGUNIT # SETUP
BCS

NEW

GETPRM

CLR
CLR

RESFLG
CLXVEC

;CLEAR RESTART FLAG SINCE HERE ON START
CLEAR CLK VECTOR PTR. AS A FLAG IN

MOV
CLOCK

#CLKCSR,R2
L.R?

* NO CLOCK IS FOUND.

JSR
MOV

PC,CLKSET
#LELKEN, CLKEN

“SETUP R2 AS A PTR. TO CLOCK INFO BLOCK
*LOOK FOR A LINE CLOCK
#°L.RO
MOV
CSCLCK
TRAP
RO,R1
MOV
: IF NONE THERE GO LOOK FOR A P-CLOCK
BCC
2
- GO SET UP CLOCK INFO TABLE & CLK VEC.
*SETUP THE ENABLE LINE CLOCK DATA

CLOCK

P.R1

:LOOK FOR A P-CLOCK SINCE NO LINE CLOCK

B8R
$2:

RESTRT

ENDIT
JMP
READEF #EF .NEW

BNCOMPLETE

gggg 030412 000457
030414

160 CLEANUP

#EF.CONTINUE

BCOMPLETE

103521

005037 007304
005037 007344

*CLEAR FLAG

#EF.START

BNCOMPLETE

103002
000137

6993 030400 004737 022742
6994 030404 012737 000100 007350

6997

#-1,RESFLG

READEF

BCOMPLETE

104447

6990 030362 012702
6991 030366
(3) 030366 012700
(3) 030372 104462
(3) 030374 010001
6992 030376
(2) 030376 103006

MOV

*NO,BRANCH

INITT

READEF #EF .RESTART

012700 000036

104447

CLR

DCLFLG

BCOMPLETE

(3) 030314 012700 000037

6979

;INIT USER COHHAND VARIABLE
SCLEANUP & EXIT

KEYWD1
DCLFLG

DOCLN

103417

030312

6978

177777

LSINIT::

CLR
TST

BEQ

6972 030270 005037 007302

6977

SEQ 111

RESTRT

19
CZKMUAO KMS11-BL PDP=11 DCLT

30-MAR-82 09:13

CZKMUA. P11

14
030420
030422
030424
030424

012700
104462
010001

103017

012737
000433

INITIALI lE SECTION

09:15

PAGE 23-71
MOV
TRAP
MoV

000120

BNCOMPLETE
022742

000111

007340

S3:

000100
007342
007350

PC, CLKSEY
”n,C
lPCLKCT GCLKCSR
#2,CLKCS

RESTRT

lPCLKEN.CLKEN

;POINT CLKCSR TO P-CLK COUNT SET REG.

:LOAD CLK SET REG. WITH COUNT VALUE

:POINT CLKCSR BAC T0 P=CLK CSR

‘SETUP THE ENABLE THE P=CLK DATA

:READ BUS TYPE TO SEE xrropru LSI

BNCOMPLETE

:BR IF NOT, NO CHANCE oraechocxs‘

#100, CLKVEC
CLKBR

CSRDBU

:LOAD 100 AS CLK VECTOR
*LOAD O AS CLK INT. LEVEL

*KLUDGE UP THE CSR & ENABLE “ATA LOCS
#CLKEN, CLKCSR
MOV
GMANID L5060,CLKNZ,D,377.50..60.,YES

007340

&H WNIN) W

(=4

(=]

o W

o o W

NN~
QOO A~~~
L
P Y
(VI IV [V, [V IV F .

.WORD

030530
S4:

014714
000001

030546

000004

030552

007352

RESTRT:

007356

177777

002367
013700
104442

007276
007276

007276

B8R

RESTRT

PRINTF

#NOCLK

100008:

~WORD
-WORD
-WORD
~WORD
-WORD

18:

002012

NEW:

3
TSLOLIM
TSHILIM

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

SP ;RO
CSPNTF

#6,5P

CLR

TIMAIN

;CLEAR TIME SINCE START LOCATIONS

MOV

CLKMZ, TIMTCK

:LOAD TICKS/SEC

CLR

TIMSFC

MOV
:83

SEVILOG,R2
Rzisygsgg

az FEVTEND

MoV

#-1,LOGUNT

BNE
007276

CSGMAN
100008
CLKHZ

:INFORM OPR. NO CLOCK, z exxr INIT
nov
MOV
TRAP
ADD

010272

RO,R1

: IF NONE THERE GO SEE IF THIS 1S_LSI
s3
8CC
VECTOR
&
INFO
CLOCK
UP
; ELSE GO SET

TRAP
BR

030532
030532

#'P,RO
C$CLCK

READBUS
MoV
CLR

007344

JSR
ADD
MOV
SuB

MOV

007350

104407

103021

30-MAR-82

MACY11 30A(1052)

SEQ 112

GE TPRM : INC

LOGUNT

1~1r EVENT TABLE TO ALL 1°S AFTER EACH
‘"START OR RES AND INIT TABLE POINTER
:SEE IF REACHED END OF TABLE

*LOOP UNTIL DONE

;INITIALIZE LOGICAL UNIT #
:POINT TO NEXT LOGICAL UNIT

(NP
BGE

LOGUNT ,LSUNIT
NEW

sss IF PAST MAX. LOG. UNIT #
BR IF YES, AND START OVER

GPHARD

LOGUNT ,R1

;GET THE P-TABLE FOR THIEOLOG UNIT
TRAP

LOGUNT ,RO
C$GPHRE

CIKMUAQ kMS11-BL PDP-11 DCLY
30-MAR-82 09:13
CZKMUA.P11
(3)
2
2)

030642
030646
030646

010001

030646

011137

MACY11 30A(1052) 30-MAR-82
INITIALIZE SECTION

09:15

BNCOMPLETE

103365

MoV

007312

SEQ@ 113

PAGE 23-72

GETPRM

(R1) ,FHOPLX

MoV

RO,R1

BCC

GETPRM

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

;PUT FULL OR HALF DUPLEX ANSWER IN LOC.

&N
NINOOOON

NN
OO

b —d b 0

2(R1),SELO
2(R1) .BSEL1
BSEL1
2(R1) ,SEL2
#2,SEL2
2(R1) ,BSEL3

MOV
ADD

2(R1), SEL4
#6,SELG

b b b
=

MOV
ADD
MOV
ADD
MOV
ADD

OB EBN)

RONINDNONIN) ORIV

d
b
b
i od
b o od ead

O00O0

000004
000004
000004
000006

MOV
MOV
INC
MOV
ADD
MOV

ADD

MOV
MOV
ADD
MOV

POV

NN
NN

d nd
D

D wd

OO0O00O0O0OO00O0O0O0

W
NN
NNNY
]
~

b Y
Y

—SRededt

031002
031010
031016
031024

030766
030774

OO0

000002

OO
= O N ON =2 O = =

NNV
NONON

:DEVICE DEPENDENT PART OF GETTING INFO FROM P-TABLE

;STORE AWAY CSR ADDRESSES

#3,8SEL3

2(R1) ,BSELS
#5,8SELS
2(R1) ,SEL6
#6,SEL6
2(R1) ,BSEL?
#7.8SEL7
4(R1)
, INVEC
4(R1) JOUTVEC
#4,0UTVEC
6(R1), INTPRI

;STORE AWAY INPUT INTERRUPT VECTOR
sBUILD OUTPUT INTERRUPT VECTOR
;STORE AWAY INTERRUPT PRIORITY

LDFIRM: CLR
~
~

161134

OO0
—ddd

=000
O—ded
NSO N
O—=000

OO
O
OO

d e
b
o

—b b e

N
o
Co

AV,

nd b b b e

OOOOOOOOOS
NN NN NN NN

b e

b b b ek O

byl

031032

(e=lelelelel]
[ X Pur fuurPur PrwPuurd
-0

:INITIALIZATION CODE - LOAD FIRMWARE INTO KMC-118

28:

AMCBEGL ,R&
#RAMO , 3SEL

MOV
MOV

(R&) ,aSEL6
ASEL6,R2

MOV
e
BEQ

007254

035326
000001

000004

035366
000001
000004

007252

MOV
MOV

MoV
MOV
MOV

PRINTF

RS, asELé

(R4) +.R2
108

RS, TEMP2
<2(R4)
, TEMP3
R2, TEMP4
#FIRMLD

sSPECIFY INITIAL CRAM ADDRESS

sPOINT TO KMS11 FIRMWARE IMAGE

sSPECIFY LOAD CRAM
sWRITE CRAM ADDRESS
SWRITE IMAGE WORD TO CRAM
sREADBACK WORD JUST WRITTEN
;IF WORD READ BACK IS WORD WRITTEN
; THEN CONTINUE LOADING

;FAILURE LOADING FIRMWARE

:SAVE CRAM ADDRESS
:SAVE WORD LOADED
*SAVE WORD READ BACK

*PRINT FAILURE MESSAGE

MOV

#FIRMLD ,~(SP)

MOV

SP.RO

MOV

PRINTF

#DATAHD

:PRINT HEADER

M ,-(SpS

TRAP
ADD

CSPNTF
#,SP

MoV

FOATAID - {5P)

MOV

SP,RO
CSPNTF
84 ,SP

MOV
ADD

M ,-(sFS

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

7086

30-MAR-82 09:13

MACY11 30A(1052)

PRINTF

031144

(10) 031144 013746 007254

(9) 031150 013746 007252
(8) 031154 013746 007250
(7) 031160 012746 035437
(6) 031164 012746 000004
(3)
(%)
(&)

7087

031170 010600
031172 104417
031176 062706 000012

763% 031200 104444
031202
7091 031206
;83§ 031210

005205
022704
001316

035326

09:15

108:

INC
CMP
BNE

TEMP4
#DATALD,TEMP2,TEMP3,

(7)
(6)
(5)
(&)
(3)
755;

RS
AMCENDL R4
2

031212

031212
031216
031222
031226
031232
031234

012746
012746
013746
012746
1046437
062706

031240

(3)
(2)
7109
(7)
(6)
(5)
(4)
(3)

031260 104437
031262 062706
031266
031266 013746
031272 012746
031276 013746
031302 012746
031306 104437

SETVEC

000340
022766
007344
000003

031240
031244
031250
031254

013746
0127646
013746
012746

7112 031314
(3) 031314
7{3; 031320
031322

031322
031324

7117 031326

012700
104441
104432
004140

SETVEC

012226
045310
012222
000003
000010

SETVEC

012226
045320
012224
000003

7111 031314

MoV
MOV
MoV
MOV

TEMP3. = (SP)
TEMP2,=(SP)
#DATALD,=(SP)
#6,-(SP}

TRAP

CSDCLN

MOV
TRAP
ADD

SP,RO
CSPNTF
#12,5P

:CONTINUE LOADING FIRMWARE
sUPDATE THE CRAM ADDRESS

STEST FOR DONE LOADING KMS11 FIRMWARE
SLOOP TIL FIRMWARE LOADED

CLKVEC,#CLKINT,#340

:SETUP CLOCK VECTOR

000010

7§$5 031310 062706 000010

(3)
(3)

TEMP4, = (SP)

MOV
MOV
MOV
MOV
TRAP
ADD

#340,-(SP)
#CLKINT,=(SP)
CLKVEC,=(SP)
#3,-(SP)
CSSVEC
#10,SP

:DEVICE DEPENDENT VECTOR SETUP

7108

7114

MOV

:FIRMWARE LOADED

;833

(7)
(6)
(5)
(4)

;PRINT DATA

:CLEAN UP AND EXIT

;83§
7096

SEQ 114

PAGE 23-73

DOCLN

031200

7089
7090

30-MAR-82

INITIALIZE SECTION

000000

INVEC.#DVINS,INTPRI

OUTVEC,#DVOUTS,INTPRI

;SETUP INPUT INTERRUPT VECTOR

MOV
MOV
MOV
MOV

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

ADD

ENDIT:

SETPRI

EXITIT: EXIT

#PRIOO
INIT

INTPRI ,=(SP)
#DVINS.=(SP)
INVEC,=(SP)
#3,-(SP)
CSSVEC
#10,5P
INTPRI ,=(SP)
= (SP)
#DVOUTS,
OUTVEC,=(SP)
#3,-(SP)
CSSVEC

#10,SP

:SET THE "RUN'' PRIORITY T0 0
MOV
TRAP

#PR100,RO
CS$SPRI

TRAP
MORD

CSEXIT
L10013-.

T OF KMS11 F]RMWARE
7118 031326 063220 063223 063237 MCBEGL : .WORD *0063220, ‘0063223 ‘0063237
40063232,40061 oo ~ooe1zoz 20003370, 0063130

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

INITIALIZE SECTION

031305 003370 Q630 orce

09:15

SEQ 115

PAFT 23-74

7119 031346 076423 063060 101414

.WORD

0000626
“0076423,40063060,40101414,40100407,40003401,40063231,40010162,

7120 031366 062234 016403 016602

.WORD

“0016455
*0062234,40016403,40016402,40016406,40016407,40016401,40010210,

010067 016471

.MORD

“0002424
40010022,
0016424,
“0016461,40010067,40016471,40002471,40043236,

7122 031426 043235 010240 016642

LMORD

,
“0020620
“0043235,40010240,40016642,“0002642,0000600,40061221,0110642

173202 020640 167203

.MORD

“0173202,4C020640,40167203,40010210,40140620,40123620,0113246,40010211

103214

.MORD

“0060520
0001620,
0117044 ,“0023660,
*0140620,0060601,40103214,40123400,4

031506 103105 060610 001620

.MORD

“0103105,40060610,40061620,40103047,40060521,40102447,40103447,40123420

7126 031526 060400 103047 000500

.WORD

“0123400
,40000677
0100646,
“0060400,40103047,40000500,40063301,40114657

114444 060520

LMORD

0123400
“0103512,40114444,~0060520,40103606,40120400,40001620,0103066,

7121

031354
031362

100407
010162

003401
000626

063231

031374
0316402

016406
010210

016407
016455

016401

031416
031422

002471
016426

043236
002424

010022

031434
031442

002642
110642

000600
020620

061221

031456
031462

010210
113246

140620
010211

123620

123400

001620

117044

031406 016461

7123 031446

7126 031466 140620 060601
031476

7125

031514

031536

103047

063301

7127 031546 103512
031554
031562

103606
103066

031574

7128 031566

060521

114657

102447

000677

120400
123400

001620
1 02 527

)

102532 002655
(€J1620

002723

102127

.WORD

“0060601
001620,
40102527 , “0002702,
2127,40
40002723,
“0102532,0002655.4010

7129

031606
031614

102i.3
002461

100447
000500

1 gg%zg
©

.MORD

*0102133,40100447,40102143,40002461,40000500,0061260,40010177,40016402

7130

031626
031634

002400
060721

042233
102133

002461

1 14511

.NORD

“0002400,40042233,40114511,40060721,40102133,40002461,40010017,40136500

7131

031646

136520

122560

123000

.WORD

“0136520,40122560,0123000,~0000500,“0061260,40002133,40040620,40103167

016406 002700

.WORD

3004
41,0003374
,“0110743,“000
“0010151,40016406,0002700,0063161,400006

7133 031706 063070 010017 000745

.WORD

*0063070,40010017,0000745,40110463,.40010154,40057310,40057231,0057235

7136

031726 043237 043232 063170
031734

063161

000606

114434

WORD

,“0000415
,0114434
,~0002514
“0043237,40043232,*0063170,40063161,40000606

7135

031746

123220

883260

8?8328

.WORD

“0123220,0063260,0000600,40104457,40002650,0010240,0050220,
0123040

7136

031766

055302

ggsg

074520

.WORD

“0055302,40050220,40074520,
0055224 ,0055225,40055227 ,“0055226 ,~0103752

032002

055226

031654

000500

7132 031666 010151
031674

031714

063161

110463

061260
000641

010154

650
3040

3752

002133
003374

057310

n55227

CZKMUAO KMS11-BL PDP-11 DCLT
30-MAR-82 09:

CZKMUA. P11

MACY11 30A(1052)

30-MAR-82

INITIALIZE SECTION

09:15

PAGE 23-75

SEQ 116

.WORD

“0062400
101640,
0000402,
*0010240,40043220,“0002642,0000776,40060360,0

7138 032026 043220 ?

.MORD

0100447
40000757,
40063261,
*0043220,40010241,40040360,40101645,40100447,

.MORD

*0123440,40103466,40000500,40061262,40100667,40123560,40001620,40102677

7140 032066 002113 080688

.WORD

,
11,“0002461
0123000
“0061260,400102
16351,4
40000500,
*0002113,40060600,401

032106 100447

.WORD

,
734, “0000500
0063260
,40061011,40114
00515,4
0000404
*0100447,40123220,400

.WORD

“0136520
,40014543,
40136500,
*0063310,40100661,40010070,~0053220,40016401

0070

.WORD

0062400
40060360,
40101720, “0000406,
*0136560,40136540,40010070,40002471,

7144 032166 000407 063310 100663

.WORD

“0136520
0136500, 63,
401006
40053220, 0016401,
63310,
40010023,
“0000402,400

7145 032206 136560 136540 010023

.WORD

“0000405
63, 23,
400100
0000462, “0060360,01016
36540,
0002424,
“0136560,401

7146 032226 062400 100663 000757
001620

107015

.WORD

“0063233
001620,
0107015, “0000400,
“0062400,0100663,0000757,40063670,40

7147 032246 000427 104425

000700

.MORD

047
40100630,
“0120600,40102
“0000427,40104425,40000700,40123220,0061311,

114657

.WORD

4504
40110554
, 0000727 ,“0063270,4010
“0114725,40000404,40114657,40000720,

7137 032006 010240

7139 032046 123440

7141

0
1
1
1
10

7142 032%
7143 032146 136560 136540

032216

032234

002424

063670

000462

060360

100630

032254

123220

061311

7148 032266

114725

000404

110554

000727

7149

000000

.WORD “0000000, 0000000, 40000000, “0000000, 0000000, “0000000, “0000000,, “0000000

7150 032326 023200 060601

106012

.WORD

*0023200,40060601,40106012,40107412,40000601,40060360,0101742,“0000405

032274

032306

032314

000720
000000

000000

032334

107412

000601

060360

7151

032346

060360

105424

000620

.WORD

“0060360,0105424,40000620.40060360,40115760,
0002212, 0000400, “0063223

7152

032366

000757 063270 060070

.WORD

*0000757.40063270,~0060070,0110665,0000703,
0063223, 40100447, “0023204

032354
032362

060360
000400

115760
063223

110665

000703

063223

7153

032406 070215

054620

107440

106042

000710

.WORD

,
0104560
*0070215,0054620,40106042,40060601,40107440,0000710,“0010012

7154

032426 000402 063301

000462

.WORD

“0000402,0063301,*0000462,40063223,40056226
, 0056227, 40123220, “0000501

7155

032446 063260 003305

040665

.WORD

*0063260,0003305,40040665,40001620,0001620,0001620,“0001620,“0061311

032374
032414

032434

032454

060601

063223

001620

056226

001620

002212

056227

001620

CZKMUAD kMS11-BL PDP=-11 DCLT

30-MAR-82 09:13

CZKMUA.P11

032462

001620

061311

032474

010167

076604

MACY11 30A(1052)

30-MAR-82

INITIALIZE SECTION

09:15

PAGE 23-76

SEQ 117

7156 032466 100447 100453 104756

.MORD

6604
0000470, “0104425
167,4007
, 0076605,
*0100447,40100453,40104756,40010

7157 032506 000522 063223 023600

.WORD

0,
10, “0001620
02360
107514,00606
23,40
40060757 ,40060641,40
“0000522,400632

103047 106110 010153

.WORD

“0100447
2600,
003374,
53,006
0010003 ,40002401,“0
*0103047,40106110,400101

103447

.WORD

,
06, “0060530
0104502
“0060372,“01055
03447,4
“0060600,
“0060600,40060772.401

100447 060601

.MORD

0063173
*0113705,40100447,40060601,40107716,~0020600,“0060371,40105531,
*0104532,40063071,40000534,0104425,40063164,40105137,40063165,“0000542

076605

03252..

060610

001620

032534
032542

062600
003374

010003
100447

002401

032556
032562

104502
105506

060600
060530

060372

032574
032602

107716
135531

020600
063173

060371

032614
032622

1064425
063165

063164
000542

0320634
032642

104340
116:57

023200
060001

117303
000701

010153
010013

062617

062620
061620

010001

115456
060610

000400

010162
054373

054373
1156426

115402

054373

115611

7158 03252¢

7159 032546 060600 060772

7160 032566

113705

7161

032606 104532 063071

000534

LMORD

7162

032626 020200

104425

000544

.WORD “0020200,40104425, 0000544 ,40104540,0023200,40020640,40116157,“0060601
.WORD

0010013
0010153,
40062617, “0000701,
~0107746,40060610,0001620,40117303,4

032666 043220 062460 010151

.WORD

“0061620
,40010001,
“0040620,
*0043220,40062460,40010151,40016402,40062620

114700

.WORD

0060610
0115456,
0000400, “0063223,
“0062620,40116252,40114700,“0060573,

107210

.WORD

,
4373,40115426
0010162
,40115402,4005
07210,4
40054373
“0117024,40001620,401

115516

.WORD

0100447
*0010164,40054373,~0115516,0054373,40115411,40054373,40105773,

023640 060400 103451

.WORD

0000672
0123600,
0102047, “0022203,
“0023640,0060400,40103451,40110402,4

0008%} agggzz

.MORD

0022203
,40000646
, 0063223,
*0063223,40000621,40104641,40123600,40102047

100447

.WORD

,
40102047
*0000421,40061310,~0100447,40123600,“0000720,0104630,0120600

063164

.MORD

,
0023140
65,0105724
“0023140,0062066,40063164,40105256,006310022202,

107

MWORD

*0062066,40023160,40062107,40115016,40063164,40105270,“0063165,40105643

gOO

.WORD

0062202
*0000633,40104425,40123200,40000577,40061270,40104652,0023200,

104664

NORD

0000711
“0060601,40117571,40104664,0023213,40000706,0104425,40104756

032706 062620

7174

~PINY

0O
OO

N
<
o
~

SRgs NN
F53308

000720

062066

102047

104630

o
N

20
OO0
—bed
ony

033106

PO =
[+ S V¥ 5

7173

(=]
W
(V]
[«
~
P

0004

IO~

033026
03

123600

054373

OON)

7170

033006

QO
=d b

7169

7168 032766

W
NR
=
pry
~

032754

010164 054373

7167 032746

116252

117024 001620

K=o
(VIIV
1 N1 S V]

032734
032742

060573
063223

032714
032722

7166 032726

772

016402
040620

032674
032702

L= (=]
e
=000 O~ N
NN
=2 SN W
WVINOND
&~
O~
NO N
o~
=IO

032654
032662

7165

020640

1077646 060610 001620

7163 032646
7164

105137

B 10

CZKMUAQ KMS11-BL PDP-11 DCLT

CZKMUA.P11

30~-MAR-82 09:13

033134
033142

023213

104756

000706
000711

MACY11 30A(1052)

30-MAR-82

INITIALIZE SECTION

104425

09:15

PAGE 23-77

SEQ 118

7175 033146 104425 000403 060353

.WORD

“0104425,40000403,40060353,40000716,40105140,40104471,40000534,40104540

7176 033166 123600 102047 000576

.WORD

“0116051
“0120620, 0726,
270,4000
0104540,
*0123600,~0102047,40000576,40061

7177 033206 023200 0206-49 116206

.WORD

“0023200,0020640,0116206,0060601,40107746,0000702,0010014,40104560

7178 033226 000410 010177 114507

.WORD

0107351
0105754,
40060521,
*0000410,0010177,40114507,40020600,“0060373,4

7179 033246 104415 000565 063261

.WORD

“0104415,40000565,40063261,40104415,40063164,40100447,40023605,40107763

7180 033266 060525 107766 164463

.WORD

“0060525,40107766,0164463,40000600,40063310,40104760,0000420,0063310

114657

.MORD

“0000000
,40107422,
0100447,
“0164463,40000402,40114657,40060530,40103365

107620 060610

.WORD

“0060530,0107620,40060610,40113405,40100451,40112032,40112410,40100451

112432

.WORD

,
“0000620
0000450
0060521, 0113021,
12432,4
0063222,
“0001620,°0103051,401

7184 033366 111024 060610 112026

.WORD

0063222
40062230,
0100451, 0000601,
~0111024,40060610,40112026,40000601,

110424 020660

.WORD

“0000443
103051,
40000773, “0063270,
~0000405,40110424,0020660,0001620,40

7186 033426 063222 000410 063226

.WORD

0110424
40002011,
0000626
“0063222,40000410,40063226,0063166,40111413,

7187 033446 063472 062020 070216

MORD “0063472,40062220, 0070216, 0016403, *0076612, 0000543, “0060376, 0111504

7188 (033466 000406 063016 000506

.MORD

7189 033506 000620 063260 003306

.MORD *0000620,*0063260, “0003306, “0054666, “0042230, 0001620, 0001620, “0001620

7190 (033526 001620 061310 043626

.MORD *0001620, 0061310, 0043626, “0100447, 0000726, 0110461, 40000477 , *0063667

110554

.MORD ~0062230, 40000513, 0110554 ,“0000522, “0063166, 0111117, 40063167, *0010171

7192 033366
042230 110364 123600
033576 102051 022010 000527

WORD 40042230,40110554, 0123600, *0102051, 0022010, “0000527 , *0110574, 40000533

7181

033154
033162

000716
000534

033174
033202

061270
120620

000726
114051

104540

033214
033222

060601
010014

107,46
104560

000702

033234
033242

020600
060521

060373
107351

105754

033254
033262

104415
023605

063164
107763

100647

033274
033302

000600
000420

063310
063310

104760

033314
033322

060530
100447

103365
000000

107422

033334
033342

113405
112410

100451
100451

033306 164463 000402

7182 033326 060530

7183 033346 001620 103051

7185 033406 000405
033414

7191

104471

105140
104540

001620

103051

112032

000773
002011

033434
033442

063166
000626

111413
110424

033454
033462

016403
060376

076612
111504

000543

033474
033502

063222
043227

03620
123200

056225

033514
033522

054666
001620

042230
001620

001620

033534
033542

100447
000477

000726
063667

110461

033556

000522

063166

033502

110574

000533

033546 062230 000513

111117

0000406, 0063016, “0000506, 0063222, *0056224 , 0056225 , “0043227 , 0123200

c10

O
NN

0
0

.WORD

, “0063166
40022010,
40023100, “0062064
*0000542,40110554,40123600,40102051,

.WORD

“0102051
*0111153,40063167,40101763,0000556,“0063222,40100451,40123600,

.WORD “0022030,40023100,“0062064 ,“0023120,“0062105,40111376,0063166,0111172

O =

“0112153
00402,
0020500,
24,400
40062231, 0062230,
~0063222,40000401,401104

[«
—b

- O

0
6

.WORD

“0061070
0063260, 00,
401236
“0063222, “0000556,
01763,
40000542,
*0063167,401

.WORD

0110520
40010152,
0000610,
“0104506,40010151,40043226,~0000605,0110520,

]

.WORD

0063222
40110517,
0000627,
“0000403,40060346,0000616,40063222,4011:223,

.WORD

“0000631
0060612,
0110424,
40000403,40060366,0111625,40000400,40110424,4

.WORD

“0113644
“0000404
, *0063710, 0060530,
*0110530,40000402,40062231,40062230,

.WORD

,
0000577, “0061271
110641, 00400
0,400
,40000576,*0
06327
“0000776,040110554

0634
100457

“0063460
~0010236,40043220,40063460,40076620,40111256,40100457,40043220,

034006 110530 000402

.WORD

063074

060601

100457

.WORD

,
047 ,40103447
0002650
,40060601,40102
00457,4
0063074
“0062620,40111263,401

034106 060610 061620

103164

.WORD

0000605
“0060610,40061620,40103164,40111277,40116306,40117706,“0110737,

7206 034126 063310 003374

060612

.WORD

“0062460
,40010015,
0043220,
*0063310,40003374,40060612,40060377,40111737

7207 034146 010003 040620

061620

.WORD

“0010003,40040620,0061620,40062620,40106371,40010151,0016403,0110741

56 82828;

3
16
42

.WORD

*0120620,°0116051,40000402,0062231,40062230,“0060601,“0113764,“0070216

000775

.WORD

0010151
112242,
0000400, 0063222,
*0040620,0112242,40000775,40063670,0

034046
034054

010236
076620

7204 034066 062620
034074

7205

034116

034134

7208

002650

111277

060377

034154

062620

034166

120620

7209 034206 040620
9

043220
111256

111263

116306
111737

106371

QO
== OO —
Ot
=
ON=
OOMNINIOMNION

7203

7202 034026 000776 063270 000

7201

O—=

060366

033766

SO
—

O —a

7200

7199 033746 000403 060346

7198 033726 104506 010151

000627
000403
000400

.WORD

OO0

o
0o

7197 033706 88316; 101

PAGE 23-78

=0
—=O

09:15

O=—
=

033666

30-MAR-82

INITIALIZE SECTION

OO~

7196

MACY11 30A(1052)

7195 033646

OOOO==00O

7194 03%2%2 000

:13

o OO ONNI=
= OO

06322

2\1!&

033606

OO N—==0OOoW
WO WwVW
QOOW

7193

CLT

CZKMUAO KMS11-BL PDP-11
30-MAR-82
CZKMUA. P11

SEa 119

117706

010C15

010151

000400

7210

034226
034234

100447

016700

.WORD

*0016401,40000405,40016700,40063310,40100447,40120600,40102047,
“0070604

7211

034246

744

036490

036420

.WORD

“0103574,°0036400,0036420,0000402,
0063004, “0023100,“0062004 , 0023120

063006

120600

023100

D10
O

30-MAR-82

INITIALIZ2E SECTION

09:15

PAGE 23-79

74,
“0010067
,400007
“0063270, 0063233,
*0062105,40123200,40115166,40110575

LWORD

,
“0000404
63310
14531, 0123200,
4,*00
40000400, “0063222,401
“0043220,000040

.MORD

“0016703
0016402,10151,
*0061010,40110566,0010016,0043220,“0062460,00

.WORD

“0000515
40110737,
40123220,
40114700,40117013,40100447,40000727,40063270,

.WORD

1,
011,40043220
06101
104601,40010
04,40
0104664 ,40002212,40
~0063260,400004

.MORD

0003374
“0053236,
0063310,
“0042460,40060617,~0063232,40000406,0010067,

.MORD

0002507
0000600,
0123000, 0061300,
40113727,0040620,40102051.40110732,4

.MORD

“0060601
“0100447,40010177,40016401,40002400,40043230,40114511,40070075,

7220 0346466 116472 014477 063265

MORD

40116472,40014477,40063265,40077220,0054660,40060365,40115476,40115100

000676

MORD

, 0114467
0000624
0040364
0104425,4
~0020540,40116074,40000676,,40104425,

016402 002711

.MORD

0016400
0036560,
“0000420,
*0010151,0016402,40002711,40010175,40036540,

7216 034366 06

=0
=o
NN
==

OONONAO

-0

7215 034346

andd ad

w
b

72146 034326

S
oON
5N

7213 034306

QOO

7212 %34266

.WORD

MACY11 30A(1052)

O—=ONN
RISRLSK
OW

SRETISR

CZKMUAQ KMS11-BL POP-11
30-MAR-82 0
CZKMUA. P11

SEQ 120

ONN)

7217 034406 042

7219

034446

?;32

000600

100447

010177

115476

115100

7222 034506 020540

116074

7221

034502

034514

104425

7223 034526 010151
034534

7224

010175

000

000624
036540

7218 034426 %%

104425

036560

034546 062620 002212 000404
034554

063222

003001

114662

.WORD *0062620,0002212,0000404 ,~0063222,0003001, 40114662, 0060610, 0001620

7225 034566 117123 000600 104741

MORD

,
“0040757
40117123,0000600,0104741,40010151,40016407,40000411,40110742

7226 034606 107573 070200 002400
002471

000543

.MORD

42
0002471,
0000543, “0060360,“01155
“0107573,0070200,~0002400,40010067,4

7227 034626 000406 062400

010241

.WORD

“0000406,0062400,40010241,40053223,0016600,
0062460, 0010241, 0002642

7228 034646 000776 060563

115555

.WORD

53
00402,
0000420, “0063301,400101
0062403,555,400
“0000776,0060363,0115

7229 034606 043237 010067 053620

.WORD

, 0063000
0104573,
“0000404
“0043237,40010067,0053620,0054620,40116527,4

7230 034706

.MORD

“0110575,0023333,0115576,40000406,0060360,40115603,0060601,40106746

034574

034614

034634

034654

010151

010067
053227

000402

016407

(9600
062403

034674
034702

054620
000404

116527
06300

034714
034722

000406
060601

060360
106746

110575

023333

000411

062460
000620

104573

115576

115603

E 10

MACY11 30A(1052)

CZKHUAO KHS11-BL POP=11 DCLT

7233 034766 816220 017300
(¥,]

(=]
W
~

e
W

.MORD

“0002401
“0060521,40107340,40104664,40063164,40000743,40104425,0010001,

.WORD

“0072615
0016604, 53223,
*0010167,40057224,40057225,40062571,40010241,400

.WORD *0000776,40060363, 0115646, 0000462, “0060375,0115650, 0000405, “0063015

.MORD

0010177
3620,
0000401,
52,004
40010103361,
*0000742,40114637,“0060400,401

01
002574

.MORD

40002642
0002574,
0010241,
“0016400,0062620,40010241,40053220,40016601,4

7238 035106 000776 060360 115675

.WORD

16311
02,
“0063701,401
,00004
0000420,
115675
0062400,
*0000776,0060360,0

7237

035066
0350764

0004

016400
053220

062620
016601

OO
=)

O
O=
O

7236 035046 000742 114637

=
N0

33
0107015,
0104425, “0002642,“01146
60610,4
40000400,
*0000420,40063301,400

7235 035026 000420 063301

O
OO

.WORD

H
-

(=]
o

-l

(=]
W

(=]

7234 035006 000773 060363

PAGE 23-80

.WORD “0016400,40017300, 0014402, 0042660, 40056705 ,40076604, 0010241, “0062403

H
D o

057224

OO
&SN

010167

NS
OO0

034746

7232

—

000743

[o]=]
WN
&
S AS I e
NN
NN

063164

034734

034726 060521

OO0
~N -

107340

7231

CZKMUA.P1

30-MAR-82 09:15

INITIALIZE SECTION

30~MAR-82 09:13

SEQ 121

000402

062400

000420

7239 035126 010171

043231

063071

WORD

*0010171,40043231,0063071,40000401,40063310,40104415,40023640,“0060400

103447 010154

000442

.WORD

0000461
*0103447,40010154,~0000442,40076670,40076611,°0076615,40076617,

035166 010210 002756 003004

.WORD

, “0023140
0104443,
“0000402, “0063004
“0010210,40002756,0003004,~0010017,4

7242 035206 062006 023160 062107

.MORD

, 0117346
~0062006,40023160,40062107,40101271,40060601,40116340,“0070604

7243 035226 070604
035234

056223

117746 056222

.WORD

10, “0002455
0123200,
“0104640,“00102
“0070604,0117746,~0056222,40056223,4

7244 035246

114644

000600 063301

.MORD “0114644,*0000600, 0063301, 0000604, 0063230, “0000400, “0063222,“0100663

103746

000610

.MORD

000000 000000

000000

.WORD “0000000, 0000000, ~0000000, “0000000, “0000000, “0000000, “0000000, “0000000

035114

035134

7240 035146

035154

7241

035174

0352164

7245
7246
7247

7248

000401

076670

010017
101271

035254
035262

000604
063222

035274
035302

035314
035322

035326

076611

104443

060601

123200

076615

000402
116340
104640

?6323%
10066

000400

063301
000000

100746
000000

000000

000000
000000

035266 060601
035306

063310

104415

004000

000000

MCENDL:

*0060601,40103746,40000610,40063301,40100746,“0000000,
0000000, “0000000

MCSIZL==.-MCBEGL

;END OF KMS11 FIRMWARE IMAGE

:SIZE OF KMS11 FIRMWARE IMAGE

F 10

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

INITIALIZE SECTION

09:15

SEQ 122

PAGE 26

7250

7583
7264

035326

7265

035366

035402
035410
035416

7266
7267

035334
035342
035350
035356
035364

035374

035424
035432

035437

035444
035452

035460

051445

022463

FIRMLD: .ASCIZ

/XNXS3XAFAILURE LOADING FIRMWARE/

047045

022462

031523

DATAHD: .ASCIZ

/XN2XS3XAADDRESS¥S3¥ALOADEDXS3ZAREAD BACK/

051505
060445
042105

022523
047514
051445

031523
042101
022463

022516

031523

DATALD: .ASCIZ

/XINXS3X06%S4X06%S3%06/

047045

043101
042522
044504
051111
000105

040445

051101
040502

047445
047445
047445

7270

(33
(3)

042101

040505
045503

022466
022466
000066

052514
040517
043040
051101
051104

020104
000

032123
031523

.EVEN

7268

7269

044501
046040
043516
053515

ENDINIT

035464

035464
035464

10441

L10013:

TRAP

CSINIT

6 10
CZKMUAOQ KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

AUTODROP SECTION

(XA TR TR YA ¥

.SBTTL

SEQ@ 123

PAGE 24-1

AUTODROP SECTION

THIS CODF IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF
THE “'ADRTM FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO
SEE IF THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY
DRGPPED FROM TESTING.

035466
0356466

BGNAUTO

035466
035466
035466

ENDAUTO

104461

09:15

LSAUTO::

L10014:

TRAP

CSAUTO

H 10

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:135

MACY11 30A(1052)
.SBTTL

7292

035470

7309

035470

BGNCLN

7§85 035470

(3)

035474

005077

CLR

151644

SETPRI

035474 012700 000340
035500

104441

7311
7312
7313
7314
7315
7316
7317
7318
7319

035502
035510

022737
001416

000057

003202

035512
035520
035526
035534
035542

012737
013737
013737
013737
004737

000026
007212
007214
007216
023500

007244
007254
007250
007252

(3)
(3)

035546
035550

1046432
000002

7320

7321
7333
7334

035546

7335

7336

7337

(3)
(3)

CLEANUP CODING SECTION

; AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED.

7299

(3)

PAGE 24-2

: THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED

;%g?

7310

09:15

;00

7295

7298

30-MAR=-82

CLEANUP CODING SECTION

SEQ 124

CMP
8EQ

LSCLEAN::
8CLKCSR

#PR107

#EXIT ,KEYWD1
EXITCLN

::*C WAS ENTERED-- LOG IT
#ABO, TEMP
MOV

MOV
MOV
MOV
CALL

EXITCLN:EXIT

NOBUF, TEMP4
PSCNT,TEMP?2
ERRCNT TEMP3
LOGSS
CLN

:DISABLE CLOCK

SET PROCESSOR PRIORITY BACK TO 7

MOV

#PR107,RO

TRAP
WORD

CSEXIT
L10015-.

TRAP

CSCLEAN

TRAP

JEXIT COMMAND ?
:YES ,BRANCH
JPRINT REPORT

C$SPRI

:EVENT TYPE
..BUFFER NOT AVAILABLE
s :PASSES
: :ERRORS
G0 LOG IT

.EVEN

ENDCLN

035552

035552
035552

104412

L10015:

110

CZKMUAQ KMS11-BL PDP=11 DCLT

30-MAR-82 09:13

CZKMUA.P1

MACY11 30A(1052)

30-MAR-82

DROP UNIT SECTION

09:15

SEQ 125

PAGE 24-3

DROP UNIT SECTION

7339

.SBTTL

734
;%2‘

: THE DROP=UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE
; TO NO LONGER BE TESTED.

BGNDU

7357

(4)

'3)

03,5564

035554

000167

(3)
(3)

WORD

JSJMP

TRAP

csov

LWORD

035556 000000

737

7373

EXIT

LS$DU::

L10016-2-.

.EVEN

035560

035560
035560

ENDDU

104453

L10016:

J 10

CZKMUAQ
?HS11-BL PDP=-11 DCL;

CZKMUA.P

30-MAR-82 09:1

MACY11 30A(1052)

30-MAR-82

ADD UNIT SECTION

.SBTTL

09:15

SEQ 126

PAGE 24-4

ADD UNIT SECTION

: THE ADD=UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
: }8 ?EEE¥Eg¥TE$C{? CONJUNCTION WITH THE ADDING OF A UNIT BACK
8GNAU

000167
000000

EXIT

LSAU::
AU

.WORD
LWORD

JSJMP
L10017-2-.

TRAP

CSAU

.EVEN

035566
035566
035566

ENDAV

104452

L10017:

K 10

CZKMUAO KMS11-BL PDP=11 DCLY
30~-MAR-82 09:13
CZKMUA. P11

TEST 1:

30-MAR-82 09:15 PAGE 24-5
SETUP AND MODES OF OPERATION

.SBTTL

TEST 1:

MACY11 30A(1052)

7414
76415

SEQ 127

SETUP AND MODES OF OPERATION

: TEST TO DETECT FAULTS IN THE DATA COMMUNICATION LINK.

THIS TEST WILL

: THE PROVIDE COVERAGE NECESSARY TO ISOLATE FAILURES TO THE COMPUTER
; EQUIPMENT, THE COMMUNICATION LINK, OR THE MODEM.

BGNTST

035570
035570

PROGRAM SETUP SECTION

.SBTTL

035570

013777

007350

151542
GTXRXB:

035576
035576

000001
007360

007360

GTRAZ2:
18:

014714
000001
062706

000004

005737
001117

00730¢

T1::

MoV

CLKEN,SCLKCSR

CLR

MOV

TST
BEQ
DEC
BNE
PRINTF

sENABLE THE CLOCK

GTRA3

;SET TIMER TO COUNT 1 TICK
sCHECK FOR IT TO BE COUNTED OFF
sBRANCH IF CLOCK EXISTS (COUNTED A TICK)

#NOCLK

sKEEP CHECKING UNTIL R1 DOES FULL COUNTDWN
sPRINT BAD CLK MSG AND WARN OF Hags IF TIMEOUT

#1,TIMERT
TIMER1
R1
18

MOV
MOV
TRAP
ADD

GTRA3:

RESFLG

GTRAS

#NOCLK ,~(SP)

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

sSEE IF HERE AFTER A RESTART.
:BR IF HERE CAUSE OF A RESTART

COUNTS AND SET UP DEFAULTS
005037

GTRAG:

007240

T0T7CC
1707CC

sCLEAR TOTAL CHAR. COUNT TEMP. LOC.
: CLEAR TOTAL CHAR. COUNT FOR TX BUFF
: CLEAR TOTAL CHAR. COUNT FOR CMP BUIF
sINIT TRANSMIT MESSAGE POINTER

RXPTR

: IERO RX POINTER

crorcc
#PTRTAB,R1
R1,TXPTR

#MSGLIM,R2
R2
R2
R1,CMPPTR
R2.CMPPTR

000017

035712

007154
007154

035716

000005

035740

035746

013737

sINIT COMPARE MESSAGE POINTER

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

#5,MSGTYP

005400

007226
007230
007176
007162

#TXBUF , TCURAD

#CMPBUF , CCURAD

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

007176

007236

TCURAD, CURADD

;SETUP CURRENT ADDR TO START OF TXBUF

MSGSC,CURCC

L 10

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

SEQ 128

PAGE 24-6

PROGRAM SETUP SECTION

7680 035754 013737 007152 N07234
7481 035762 004737 026320
;2%% 035766 012737 000001 007172
7486 035774 013737 007154 007234
7485 036002 013737 007162 007236

MOV
JSR
Mov

TXPTR,CPIR
PC.BLDBUF
#1,TXMTOT

SETUP CURRENT POINTER TABLE POINTER FOR TXBUF
: GO BUILD POINTER TABLE AND BUFFER
;BUMP TOTAL MESSAGE COUNT

MoV
MoV

CMPPTR,CPTR
CCURAD,CURADD

sSET UP START OF COMPARE POINTER TABLE
;SET UP CURRENT ADDR. TO START OF CMPBUF

002162 007230
026320
000001 007156
000003 007306
007310

MoV
JSR
Mov
Mov
CLR

MSG5C, CURCC
PC,BLDBUF
#1,CMPTOT
#ACT ,MODTYP
MLTYP

PRINTF

#HLPO

MOV

MODTYP,DEVY

MOV
MOV

RPASS,DEV3
PARAM,DEV4

7486

7487
7488
7489
7490
7491

036010

036016
036024
036030
036036
036044

012737

013737
004737
012737
012737
005037

76492 036050 012737
7493 036056 012737
7494
7495

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

7496

036064

036064
036070
036074
036076
C36100
036106

000005

000001
000002

012746 012761
012746 000001
010600
104417
062706 000004

036120
036126

013737

007306

010472

013737
013737

007316
007314

010476
010500

;gg? 036134 004737 026650
7502 036140
(3) 036140
7503 036142
(2) 036142
7506 036144
7505 036150
7506 036152

(3)
(3)

7507

;ggg 036164

103412
005737
001002
012737

JSR

036170

7514
(3)
(3)
(4)
(5)
(5)
(5)
(5)
(5)
{3)

036200
036200
036202
036204
036206
036210
036212
036214
036216
036220

036174

007316

000001

<J)7310

18:

036220

105037

003377

GETCL:

003376

104443
000406

PC, SHWOP

003060

003362

MOV
MOV
MoV
TRAP
ADD

= (SP)
#HLPO,
#1,-(SP)
SP.RO
CSPNTF
#4,SP

sPRINT TO OPERATOR THE CURRENT MODE......

RPASS
1$
ST

MoV

#TTL MLTYP

;SET_UP DEFAULT FOR UNATTENDED MODE

JMP

GTR9

TRAP
.WORD

CSEXIT
L10020-.

'R M=ACT/LO=1/PAS=1/NOST/CH'* AND RUN

COMMAND LINE FETCH & INTERPRETATION SECTION
CLRB

P$GDBD

GMANID

CLISPM,CMDBUF ,A,-1,1,72.,NO

CLRB

PSNNUF

000142
012310
177777
000001
000110
012737

;SET UP DEFAULT 'RUN PASSTM COUNT TO 1
:SET UP PROG. PARAMETERS = DATACHECKING ENABLED
OPERATOR STATUS MSGS. PRINT OFF
H

TST
BNE
EXIT

GETCL

003060

7516 036226 012737 010502 003364
7517 036234 012737 037162 003366

;BUMP THE COMP MESG COUNT
sSET DEFAULT MODE= ACTIVE
;SET DEFAULT MAINTENANCE LOOP MODE =NONE

MLTYP,DEV2

BCOMPLETE

000137 041214
105037

#1,RPASS
#2.PARAM

;PUT DEFAULT MESSAGE INTO CMPBUF

sSEE IF MANUAL INTERVENTION ALLOWED
CSMANI
TRAP
. BR IF YES (UAM=0 AND NOT CHAINED)
GETCL
8CS
,
SEE IF THIS 1S FIRST ‘DCLT PASS
: BR IF NOT COMPLETED 1 PASS
: IF DONE 1 PASS IN UNATTENDED HODE - EXIT

.SBTTL

7512

7515

MoV

#5,MSGTYP

MANUAL

;g}?
7513

GTRAS:

104450

036152 104432
036154 010106

036156

MoV
MoV

007316
007314

7497 036112 013737 007310 010474

7498
76499

Mov

007226

MoV

MoV
MoV

#CMDBUF ,P$BUF
A

#CLITRE,PSTREE
#CLIACT,PSACT

sCLEAR CMD LINE PARSING ERROR FLAGS

;GET A COMMAND LINE FROM OPR.
CSGMAN
TRAP
100008
BR
CMDBUF
.WORD
TSCODE
.WORD
CLISPM
WORD
=1
JWORD
TSLOLIM
JWORD
TSHILIM
.WORD
100008:

m10

CZKMUAO KMS11-BL PDP=-11 DCLT
30-MAR-82 09: 13
CZKMUA.P11
036242

005037
001412

MACY11 30A(1052)

TST8
BEQ
PRINTF

012746
012746
010600

104417
062706
000137
105737
001412

QUALFG
PC,PSTRV
P$GDBD
1$

sCLEAR QUALIFIER FLAG LOCATION
;GO _PARSE COMMAND L INE

:SEE IF PARSED OK OR AN ERROR

#CLIERM

MOV

MOV
000004
036170
003376

1$:

JMP
1ST8
BEQ

PRINTF

012746
012746
010600
104417
062706
000137

012354
000001

023727
001711

003202

000060

023727
001705
023727
001701
023727

003202

000005

003202

000055

003202

000004

GETCL
PSNNUF
108

MOV
TRAP
ADD

#CLINUF

MOV

MOV
TRAP
ADD

GETCL

000052

026064
036170
003202

000057

000001

007302

108:

;SEE IF HELP WAS TYPED
16O GET CMD AGAIN IF YES
sse IF PRINT WAS TYPED
"GO GET CMD AGAIN IF YES
see IF RUN WAS TYPED

000001

003202

000002

003202

000010

4$:

007240
001000

5$:
8
PRINTF

*YES,BRANCH

*"BR IF NO

* START EXEC. IF YES

ses IF DUMP WAS TYPED

: BR IF NO

* ELSE, DUMP PART OF MEMORY

;_THEN'RETURN TO GET ANOTHER CMD.

SEXIT COHHAND

KEYWD1,#EXIT
138

*NO,BRANCH

:GO BACK TO INIT ROUTINE

KEYWD1,#CLEAR
GETCL
KEYWD1, #SHOW
GETCL
55vuo1.ossrsxp
$

138:

003202

SP,RO
CSPNTF
#4,SP

KEYWDT ,#HLP
GETCL
KEYWD1,#PRNT
GETCL
KEYWD1,#RUN
118

#1,DCLFLG

104432

#CLINUF ,=(SP)

#1,-(SP)

;WAS "'SET EXPECT = TRANMIT'’ ENTERED?

128
PC,OUMPSR
GETCL

128:

SP,RO
CSPNTF
#4,SP

KEYWD1 ,#SETET
GETCL

GTR9
KEYWD1,#DMPS

11$:

#CLIERM,-(SP)

#1,~(SPS

;SEE IF INCOMPLETE COMMAND TYPED

MOV

000004
036170

041214
003202

012737

30-MAR-82 09:15 PAGE 24=7
COMMAND LINE FETCH & INTERPRETATION SECTION
CLR
JSR

0
5
7

SEQ 129

TT0TCC,TOTCC
Tg;CC.lBUFLlH
1
#MSGTRN, #BUFEX

“SET CLEANUP & EXIT FLAG
TRAP

MWORD

CSEXIT

L10C20-.

sSEE IF CLEAR WAS TYPED
*"IF YES, BACK TO GET ANOTHER CMD.
*SEE IF SHOW WAS TYPED
*"IF YES, BACK TO GET ANOTHER CMD.
*SEE IF SET EXPECTED
S"BR IF YES (A SETEXP WAS TYPED)

:SEE IF BUFFER ALREADY FULL
*"BR IF NOT FULL (BUFLIM # OF CHARS.)
* ELSE TELL OPR. AND DON'T BUILD MSG.
MoV
MOV

= (SP)
#BUFEX,
#MSGTRN,~(SP)

MOV
TRAP

SP,RO
CSPNTF

10V

#2,-(SPS

N 10

CZKMUAQ KMS11-BL PDP=11 DCLY
30-MAR-82 09:13
CZKMUA.P1
036532
0

062706

MACY11 30A(1052)

000006

036170
007174

007172

15%:
007152

68:

000017
012746
012746

JMP
1ST
BNE
CLR
MoV
MOV

013737
023727
002414

007160
007240

012746

015035
015053
000002
000006
036170
007160
007156
006400
000017

007234
007236

¢PTR, TXPTR
Torcé,TTOTCC

CURADD, TCURAD
TXMTOT

000017

Sgs {F HSG COUNT EXCEEDED.

s ELSE TELL OPR. AND DON'T BUILD MSG.
MOV
MOV

007240
001000

28:

MOV

8
PRINTF

TRAP
ADD
: THEN GO GET A NEW C OMMAN D.

SP.RO

CSPNTF
#6,SP

sSETUP CHAR. COUNT, CURRENT ADDR, & PTR
SADD IN CHAR. COUNT AND CHECK TOTAL
:GO BUILD MESSAGE IN BUFFER AND PTRS.

sUPDATE CHAR. COUNT, CURR ADDR, & PTR
sDEC THE COPY COUNT

croTCC,107CC
TOTCC,#BUFLIM
168
#MSGTRN,#BUFEX

sSETUP CHAR. COUNT, CURR. ADDR. & PTR

GETCL
¢rorce
78
CMPTOT
#PTRTAB,R]

7$:

#2,-(SPS

:# OF MSGS *4 = NEXT FREE PTR BLOCK

SEE IF BUFFER ALREADY FULL
: BR IF NOT FULL (BUFLIM # OF CHARS.)

; ELSE TELL OPR. AND DON'T BUILD MSG.
MOV
MOV

MOV
MOV

16$:

#TABEX,=(SP)
AMSGTRN, = (SP)

QUALVL

5$
GETCL

: THEN GO

TRAP
ADD
A E COMMAND
GET

#BUFEX,~(SP)
MMSGTRN,~(SP)

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

sIF FIRST "'SET'® THEN GET RID OF DEFAULT

ggSGLIH.R2
R2
R1,CMPPTR

007154

002414

W#MSGTRN,#TABEX

GETCL
R1
R1
R1.TXPTR
TXPTR, CPTR
. CURADD
TCURAD
PC,ADDCC
PC .BLDBUF

178:

003206

036170

#6,SP

;GET POSITION OF END OF TX LIST

MOV

007152
007174
007176

000137

GETCL
TT0TCC
63
TXMTOT
#PTRTAB,TXPTR
TXMTOT ,R1
R;‘#HSGLIH

ADD

A NEW COMMAND
; THEN GO GET
THEN GET RID OF DEFAULT
;IF FIRST “'SET''

MOV

000006
036170
007152

30-MAR-82 09:15 PAGE 2 8
COMMAND LINE FETCH & INTERPRETATION SECTION

CMP
BLT
PRINTF

014775
015053
000002

SEQ 130

R2,CMPPTR

sINIT COMPARE MESSAGE POINTER

R;‘#HSGLXH
1
#MSGTRN,#TABEX

Sgs {F HgG COUNT EXCEEDED.

CMPTOT R

B
PRINTF

: ELSE TELL OPR. AND DON'T BUILD MSG.

8 N

CZKMUAO KMS11-BL PDP=-11 DCLT
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 24-9
COMMAND LINE FETCH & INTERPRETATION SECTION

037036 012746 014775
037042 012746 015053
(6) 037046 012746 000002
(3) 037052 010600
(4) 037056 104417
(4) 037056 062706 000006

(8)
(7)

7600
7601

7602
7603
7604
7605

037062
037066

037070
037072
037076
037106

7606 037112
7607
7608
7609

037116
037122
037130

7611

037142

7610 037134
7612

7613

037150
037154

000137
006301

006301
060137
013737
013737

004737

004737
013737
005237

026222

013737

005337
001261

007234
007236

007154

007240

007160

003206

;g}g 037156 000137 036170
7616
7617
7618

188:

026320
007234
007156

013737 007236

MOV
MOV

ATABEY,=(SP)
cnscrnn -(SP)

MOV
TRAP
ADD

sp RO
CSPNTF
#6,SP

MOV

036170

007154
007154
007162

SE@ 131

007162

JMP
ASL

GETCL
R1

: THEN GO GET A NEW COMMAND.
‘4 OF MSGS *4 = NEXT FREE PTR BLOCK

PC,ADDCC

:ADD IN XHAR. COUNT AND CHECK TOTAL

CURADD , CCURAD

ASL
ADD
MOV
MOV

R1
R1,CMPPTR
CMPPTR, CPTR
. CURADD
CCURAD

JSR
MOV
INC

PC .BLDBUF
CPTR,CMPPTR
CMPTOT

JSR

,=(SP}

DEC

QUALVL

;UPDATE CHAR. (OUNT, CURR ADDRR. £ PTR
;1F_COPY WAS GIVEN, PUT MSG IN BUFF

JMP

GETCL

*GO BACK UNTIL GET A "RUN'

MOV
MOV

BNE

ToTCC, CTOTCC

: AGAIN

cNn

CZKMUAO KMS11=BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11
7621

.SBTIL

7622

7623
7604
7625

7626

7627
7628
7629
7630

7632

037162

037164
037170
037174
037176

;
:

006302

016202
062702
004712
000207

7633
7634
7635
7636

037200
037202
037204
037206

000150
000152
000162
001604

7639
7640
7641
7642

037216
037216
037220
037222

000306
000434
000756
000766

72637
7638

7643
7644

037210
037212

037226
037226

000262
000172

001004
001014

7645 037230 001024
7646 037232 001116
7647

YACY11 30A(1052)

037234

001612

CLIACT:

037200
037200

108:

30-MAR-82 09:15 PAGE 24-10
COMMAND LINE FETCH & INTERPRETATION SECTION
ACTION TABLE AND ROUTINES

USER MUST CLEAR/SET PSGDBD IF USE '‘CLIBIF'’ IN CONNECTION WITH ACTION
£.2 WILL HOLD ACTION CODE FROM PARSING (CLI) NODE
ASL

MOV
ADD
JSR
RTS

10$(R2),R2
#108,R2
PC,(R2)

.WORD
.WORD
.WORD
.WORD

ACTNUL-10$
ACTCLR-10%
ACTSHO-108
ACTCHK-108

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

ACTCSE-10$
ACTCST-108
ACTSTE-108
ACTSTT-108

-WORD
-WORD

_WORD
.WORD

.WORD

ACTRUN-10$
ACTHLP-10$

ACTSZE-10$
ACTCOP-10$

ACTNUM-10$
ACTOPM-10$
ACTSTS-108

sMULTIPLY ACTION CODE BY 2
:OFFSET VALUE
:ADD BASE_VALUE
:60 DO ACTION
:RETURN TO TRVACT:

:BRIEF DESCRIPTION OF ACTIONS TAKEN
sNULL
:CLEAR
: SHOW
: CHECK
:RUN
SHELP
:CLEAR OR SHOW EXPECTED
CLEAR OR SHOW TRANSMIT
:SET EXPECTED
SET_TRANSMIT
sxze
: COPY

:NUMERIC VALUE FOR SIZE OR COPY
:QUOTED MESSAGE FROM USER
:STATUS

7648

037236

001136

.WORD

ACTEQ0-10$

:END OF QUOTED MESSAGE FROM USER

7650
7651
7652
7653
7654
7655

037242
037246
037246
037250
037252
037254

001224
001234
001244
001254
001264
001302

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

ACTMS1-108
ACTMS2-108
ACTMS3-10$
ACTMS&-108
ACTMSS-10$
ACTMS6-108

:ZEROS
S1ALT
S0ALT
SITEP
SCCITT
:ALPHA

7662
7663
7664
7665
7666
7667

037272
037274
037276
037300
037302
037304

001456
001504
001514
001620
001634
001666

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

7649 037240 001216

7656
7657
7658
7659
7660
7661

7668
7669
72670
72671
7672
7673
7674
7675

037256
037260
037262
037264
037266
037270

037306
037310
037312
037314
037316
037320
037322
037324

001370
001400
001420
001426
001436
001446

001676
001706
001716
001726
001736
000142

001174
000712

7676 037326 000742

.WORD

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

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

.WORD
.WORD

.WORD

ACTMS0-108

ACTATV-108
ACTPAS-10$
ACTREC-10%
ACTLIS-108
ACTDLL-10$
ACTTRA-10%

ACTTAL-10$
ACTNO-10$
ACTECH-10%
ACTCRC-10$
ACTPRO-10$
ACTRPS-10$

ACTMOP-10$
ACTTLP-103
ACTCLP-10%
ACTLLP-108
ACTRLP-108
ACTNUF-103

ACTBCR-10$
ACTDMS-10$

ACTDME-10$

$ONES

sACTIVE MODE
:PASSIVE MODE
:RECEIVE MODE
:LISTEN MODE
:DOWNLINE LOAD
: TRANSMIT MODE

:TALK MODE
:NO
:ECHO
:SET CRC BIT
:SET_PROTOCOL BIT
:STATUS

:REMOTE STATION IN MAINTENANCE LOOP MODE
3 INTERNAI 7L
: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

SEQ 132

0D 11

CZKHUAO KMS11-BL PDP=-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 24-11

ACTION TABLE AND ROUTINES

7677
7678
7679

037330
037332
937334

000734
000246
001626

.WORD
.WORD
.WORD

ACTDMQ-10%
ACTPRT-10$
ACTMOS-10%

:DUMP WORD
:PRINT
:MODEM ACTION

7681

037340

001326

.WORD

ACTSEX=10%

;SET E=T ACTION

7680 037336 000236

.WORD

ACTEXT-10%

EXIT ACTION

SEQ 133

EMN

CZKMUAO kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.PT

#=1,PSNNUF

sSET FLAG TO SAY NEED MORE OF COMMAND

ACTCLR: Mov
RTS

#CLEAR ,KEYWD1

sSET LOC TO SAY A CLEAR WAS TYPED

ACTSHO: MOV

#§HOU.KEYUDI

sSET LOC. TO SAY A SHOW WAS TYPED

#HLPTAB,R2

sSETUP R2 AS A POINTER TO HELP MSG TABLE

112737
000207

177777

003376

: Movs
ACTNUF
RTS
UL:
ACTN

037352
037360

012737
000207

000001

003202

037362
037370

012737
000207

000002

003202

037372

012702

003210

012246

RTS

: MOV

PRINTF

#HLPF, (R2)¢

#HLP KEYWD1

003202

000057

003202

ACTEXT:

000055
023604

003202

ACTPRT:

037462
037470
037476
037504

000004
177777
000001

003202
003376
007316

037506
037512

006400
000017

007156
003376
003202

b b
N

000001
007160

006400
000017

007154
007154
007154
005400

:EXIT.KEYUDl
:gRNT.KEYUD1

;RETURN TO PARSER

:PRINT HELP INFORMATION MESSAGES

MoV
MOV
Mov
MoV
TRAP
ADD

sSEE IF ALL INFO PRINTED YET
:1F _NO KEEP PRINTING
:SET LOC. TO SAY A HELP WAS TYPED

(R2) +,=(SP)
#HLPF ,-(SP)
#2,-(SP)
s?,RO
CSPNTF
#6,SP

sEXIT COMMAND

;E.REPORT

sSET LOC. TO SAY A HELP WAS TYPED
sCALL ROUTINE TO PRINT EVENT LOG AND BASE TABLE

ACTRUN:

#RUN KEYWD1
#=1,PSNNUF
JI.RPASS

sSET RUN FLAG
;SET FLAG TO SAY NEED MORE OF COMMAND
:SET DEFAULT RUN 'PASS'' TO 1

ACTCSE:

#PTRTAB,R1

ggSGLIH.R2
R2

R1,CMPPTR
R2,CMPPTR

007154
007154
007154

20N
NN =N

?;.#HLPEND

000005

037570
037574
037600
037602
037604
037610
037614
057622

013037
000002
000006
003230

037460

SEQ 134

30-HAR-82 09:15 PAGE 24-12
CTION TABLE AND ROUTINES

037342
037350

b = QN =2
WO O

7684
7685

MACY11 30A(1052)

CMPPTR,R1

CMPTOT,R2

000002
007156

PSNNUF

KEYWD1,#SHOW
CToTCC

sINIT COMPARE MESSAGE POINTER
sFLAG 6 THAT HAVE VALID COMMAND AT THIS PT.
:SEE IF A CLEAR OR_SHOW WAS TYPED
:BR | IF A SHOW WAS TYPED
CLEAR COMPARE MESSAGE COUNT, CHAR. COUNT
AND RESET POINTER

#PTRTAB,R1

:HSGLIH.RZ
R

R1,CMPPTR

007234

R2.CMPPTR

CMPPTR, CPTR

#CMPBUF R

sINIT COMPARE MESSAGE POINTFR
:SET UP TO FILL IN DEFAULT MESSAGE

CIKMUAO KMS11-BL PDP=11 DCLT

CIKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

037626
037632

010137
000431

007162

MOV
BR

R1,CCURAD
ACTCLB

7737
7738

037634
037640

012701
01370;

006400
007172

ACTCST: MOV
MOV

#PTRTAB,R1
R2
TXMTOT,

037644

105037

003376

CLRB

MNP

7740 037650 023727 003202 000002
7741

037656

001437

BEQ

005037

CLR

7742 037660 012737 000001 007172
7743

7766
7745

037666

037672
037700

012737
013737

007174

006400
007152

7746 037706 012701 003400

;;zg

037712

010137

007176

7749

037716

012702

001000

7751
7752

037726
037734

012737
013737

000005
002162

7755

037746

7750 037722 010137 007236
7753
7754

037742
037744

7756 037750
;;gg 037754
7759

7760

7761

7762

037756

037762

037766

105021
005302
001375

004737
000207

026320

012705

003322

122571

001404

7763

037770

020527

7765

037776

005205

7769

040014

7764

7766
7767
7768

037774

040000
040004
040006

001372

162705
006305
016137

007226
007230

‘BR IF A SHOW WAS TYPED

MOV
MOV

#PTRTAB, TXPTR
TXPTR,CPIR

MOV

R1, TCURAD

Trorce

:SEE IF A CLEAR OR SHOW WAS TYPED

*CLEAR TRANSMIT MESSAGE COUNT, CHAR. COUNT

P AND RESET POINTER

#TXBUF ,R1

#BUFLIM,R2

MOV
MOV

#5 MSGTYP
MSGSC,CURCC

R1, CURADD

sSET UP TO PUT DEFAULT MSG IN LIST AFTER 033'S

(R1)+¢
R2

;FILL_EXPT OR TRAN BUFFER WITH 0'S IF A CLEAR
D0 'BUFLIM’* NUMBER OF BYTE LOCATIONS

JSR
RTS

PC.BLDBUF
PC

s'CLEAR" REALLY MEANS TO PUT DEFAULT MSG IN
‘WHEN DONE, RETURN TO PARSER

ACTSHW: MOV

#SHTAB RS

MOV

1$:

CLR8
DEC

68:

(RS5)+,a(R1)

:LOOK AT FIRST BYTE OF MSG TO DECIPHER TYPE

CMP

RS, #SHTEND

;SEE IF LOOKED AT ALL OF DEFAULTS YET

INC

:MUST BE OPR. SPEC'D TMEN

CMPB

BEQ

8NE
007244

ACTSHY

ACTCLB: MOV

003331

000002

sFLAG THAT HAVE VALID COMMAND AT THIS PT.

#1.,TXMTOT

MOV

58:

003323

PSNNUF

KEYWD1,#SHOW

MOV

BNE

000000

(9) 040014 013746 007244
(8)
(7)
(6)

007152
007234

PAGE 24-13

ACTION TABLE AND ROUTINES

7734
;;;g

7739

SEQ 135

SUB
ASL
MOV

PRINTF

#SHTAB+1,RS
RS
2(R1) ,TEMP

,TEMP
#SHMSG.SHTYTB(RS)

;PRINT MSG SIZE & TYPE

040020 016546 003302
040026 012746 014242
040030 012746 000003
040036
040040
040044

104417
062706
062701

7771
7772
7773
7774
7775
7776

040050
040052
060054
060062
040070
040076

005302
001341
013737
013737
013737
013737

;;;3

040110

000207

7777

040106

004737

000010

ADD

000004

007306
007310
007316
007314

026650

010472
010474
010476
010500

CSPNTF
#10,SP

:SHOW THE OPERATOR THE CURRENT MODE..... ALSO

PSNUM, STADD

;SETUP STARTING ADDRESS FOR DUMP

#DMPS.KEYWD1

:FLAG THAT A DUMP WAS TYPED

013737

003372

007220

ACTDMS: MOV

7782

040124

012737

000052

003202

MOV

CLR

SP.RO

PC, SHWOP

RTS

040112

040120 005037 007224

TRAP
ADD

:BUMP R1 TO NEXT SET OF POINTERS

R2
ACTSHY
MODTYP,DEV1
MLTYP,DEV
RPASS
. DEV
. DEV4
PARAM

7780

7781

SHTYTB(RS) ,-(SP)
-~ (SP)
#SHMSG,
#3,-(SP)

#4.R1

DEC
BNE
MOV
MoV
MOV
MOV

JSR

TEMP ,~(SP)

MOV
MOV
MOV

MOV

(3) 040034 010600

(4)
(4)
7770

MoV

gyralf

*SET DEFAULT OF WORD DUMP

6 11

CZKMUAO KMS11-BL PDP=11 DCLT
30~-MAR-82 09:13
CIKMUA. P11
7783
7784

MACY11 30A(1052)

09:15

ON TABLE AND ROUTINES
ACTDME

040132
177777
003372
040154

SO-HAR-BZ

PAGE 24-14

007224
007222

ACTDMQ:
ACTDME:

#-1,8Y1BIT
PSNUM,ENADD

PSMNUF

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

H 1

CZKMUAOQ KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P1

SO-HAR-BZ

09:15

PAGE 25

ON TABLE AND ROUTINES

012737
000403

000010

003202

ACTSTE: MOV
BR

#SETEXP ,KEYWD1
ACTSTX

012737

000011
000001

003202
003206

ACTSTT: MoV
ACTSTX: MOV
RTS

#SETTRN,KEYWD1
#1,QUALVL

000012

003204

ACTSZE: MoV

#SI2E,QUALFG
PC

000013

003204

ACTCOP: MOV
RTS

#QCOPY ,QUALFG
PC

003204

000012

ACTNUM: 4

?gALFG.lSIZE

RTS

BNE

IST

003372

BNE
PRINTF

003377

003372

007230

003372
003206

003206

000007
007244
007244

007226

(=
[o¥]

000004
177777

002524

LSRYP
OO =
~NON

—

012546
000001
000004

PSNUM

#CLISEO

;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

MOV
MOV
MOV
TRAP
ADD

5;1.PSGDBD

;SEE ERROR=IN=CMD FLAG

3s:

PSNUM, CURCC

sIF A SIZE LOAD CURCC WITH BYTE COUNT

1$:

PSNUM, QUALVL

QUALVL

2s8:

ACTMEX

ACTOPM:

#7 ,MSGTYP
R4, TEMP
TEMP

ACTEQO:

28822 '2232

012613
000001

=000

060156
040164

[~}

M
7792
7793

MACY11 30A(1052)

SEQ 137

18:

ACTB(CR: PRINTF

.=(SP}

SP,RO

CSPNTF

#6,SP

:IF A COPY, LOAD COPY COUNT

#
s INCREMENT SO FIRST DEC MAKES IT REAL
KEEP TRACK OF START OF QUOTED TEXT
; SO CAN CALC OPCNT AT END OF QUOTES

R4 ,R2
TEMP,R2
R2, CURCC
R2,0PCNT

sCALC BYTE COUNT FOR QUOTED TEXT

(R1)+,(R5)+

:COPY QUOTED TEXT TO OPBUF

#CLIBCR

;BAD CHAR. IN OPR. QUOTED STRING

R2
18
ACTMEX

#CLISEQ, - (SP)

#CLIBCR,~(SP)

#1,-(SP}
RTS

ADD

SP,RO
CSPNTF

#,SP

040472
040500
040502
040510
040516
040524
040526

040534
040536

040544
040546

040552
040560

040562
040566

[\ %

09:15

PAGE 25-1

;SET THE MESSAGE TYPE AS PER COMMAND LINE

AZTMSO: CLR

MSGTYP

AN N NN
NN
N NN —NNV NN
NNONNWIN
= NN =
N

040464

040422
040424
040432
040434
040442
040444
040452
040454
040462

30-MAR-82

ACTION TABLE AND ROUTINES

007226

000001

007226

000002

007226

000003

007226

000004

007226

000005
002162

007226
007230

ACTMSS: MOV

000006
002164

007226
007230

ACTMS6: MOV

#6,MSGTYP

000100

007230

ACTMET:

MOV

#64 . ,CURCC

;SETUP DEFAULT SIZE FOR MSGO~4

000010

003202

ACTSEX:

#SETEXP,KEYWD1

:DID WE GET HERE FROM ''SET E ='' COMMAND?

177777

003377

B8R

ACTMEX

*G0 TO0 EXIT

MOV

#SETET,KEYWD1

*SET FLAG TO BE USED IN T1::

N
OSNRYNKRIRIR
~
N
ONNESENNES
NN

040416

7837
7838
7839
7840
7841
7842
7843
7844
7845
7846
7847
7848
7849
7850
7851
7852
7853
7854
7855
7856
7857
7858
7859
7860
7861
7862
7863
7864
7865
7866
7867

MACY11 30A(1052)

W
N

CZKMUAD KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P1Y

SEQ 138

026444

000060
003376

003202

B8R
ACTMS1: MOV
BR

ACTMS2: MOV

BR
ACTMS3: MOV
BR
ACTMSS: MOV

B8R

MOV

B8R

MOV

10$:

B8R

BEQ
MOVE

JSR

B8R
ACTMEX:

CLRB

RTS

ACTME?
#1,MSGTYP
ACTMET

#2 ,MSGTYP

ACTME1
#3 MSGTYP
AL TMET
24 MSGTYP

ACTME1

#S MSGTYP

MSGSC, CURCC

ACTMEX

MSG6C, CURCC

ACTMEX

108
#-1,P$GDBD

PC,FACSIMILE

ACTMEX
PSNNUF

;ALL ONES

;ONES & ZEROS
:ZEROS © ONES
;CCITT
:QUICK FOX

:SETUP DEFAULT SIZE FOR THIS TYPE

;ALPHA/NUM

SSETUP DEFAULT SIZE FOR THIS TYPE

260 TO EXIT

SYES,BRANCH
*SET ERROR FLAG

GO COPY TRANMIT BUFFER TO EXPECT BUFFER

160 TO EXIT

:CLEAR NOT-ENOUGH FLAG

J "
CZKHUAO KHS11°BL POP=11 DCLT
30-MAR-82 09:13
CZKMUA.P1

#ACT ,MODTYP

007306

ACTATV: MoV
BR

ACTM3X

007306

ACTPAS: MOV
CLRB
CLR
RTS

#PAS ,MODTYP
PSNNUF
MLTYP
PC

ACTREC:

MODTYP

040570
040576

012737
000432

040600
040603
04061
040616

012737
105037
005037
000207

040620
0406264

005037
000417

040626
040634

012737
000413

000006

007306

ACTLIS: Mov
BR

#LIS,MODTYP

040636
040644

012737
000407

000004

007306

ACTDLL: MOV
BR

#DOW,MODTYP

040646
040654

012727
000403

000001

007306

ACTTRA: MOV
BR

#TRA,MODTYP

040656

012737

000005

007306

ACTTAL: MoV

#TAL ,MODTYP

062737

000004
003376
007310

007314

ACTM2X: 8IC
CLR8
CLR

#ECHOB ,PARAM

040676
040702

000207

000003

SEQ 139

MACYT1 30A(1052) 30-MAR-82 09:15 PAGE 25-2
ACTION TABLE AND ROUTINES

CLR

RTS

sCLEAR NOT-ENOUGH FLAG
:CLEAR MAINT LOOP TYPE

ACTM2X

ACTMAX

ACTMEX
ACTMEX

PSNNUF

MLTYP
PC

;DISABLE /ECHO (ALL BUT PASSIVE MODE)

sCLEAR NOT-ENOUGH FLAG
;CLEAR MAINT LOOP TYPE

K 1

CZKMUAQ KMS11-BL PDP=11 DCLY
30-MAR-82 09:13
CZKMUA.P11
040704
040712

012737
000207

040714

09:15

003204

ACTNO:

MOV
RTS

#NO,QUALFG
PC

000036

003204

ACTECH: CMP

#NO,QUALFG

000004
000002

007314
007306

000004
177777
000004
003204

041012
041016

30-MAR-82

003377
007314

BEQ
8IS
CMP
BEQ
PRINTF

18:
2$:

Movs

18
#ECHOB ,PARAM
#;AS,HODTYP
#CLINPS

#-1,P$GDBD
#ECHOB ,PARAM
QUALFG
ACTLXX

ACTSTS:

#STATB,R1
ACTOFG

sSET THE STATUS BIT

#CR(B,R1
ACTQFG

;SET THE CRC BIT

#MOCHK ,R1

:MODEM BIT

;SET THE PROTOCOL BIT

041026
041032

012701
000402

000010

ACTMOS:

041034

012701

000040

ACTPRO:

#PROTOB,R1

041040

050137

007314
000036

ACTQFG:

R1,PARAN
qgo.OUALFG

003204

KRR FRERNZRERS

R1,PARAM
QUALFG
ACTLXX

003372

007316

ACTRPS:

PSNUM,RPASS
ACTLXX

012737

000005

007310

ACTMOP:

000001

007310

ACTTLP:

000002

007310

ACTCLP:

000003

007310

ACTLLP:

#5,MLTYP
ACTLPX
#1,MLTYP
ACTLPX
#2,MLTYP
ACTLPX

b e
b cnd

e e b

18:

013737
000444

b i omd e

007314
003204

ACTQFG

012737

000004

007310

ACTRLP:

022737
001415
112737

000003

007306

ACTLPX:

177777

003377

,=(SP}
sp‘RO

CSPNTF
#4,SP

sSET DATA CHECK BIT

000001

ACTCRC:

lCLINPS -(SP)

sCLEAR 'NO'* OUT OF QUALIFIER FLAG

#DATCKB,R1
ACTQFG

000020

[

MOV
MOV
MoV
TRAP
ADD

ACTCHK:

012701
000405

- md o

;BE SURE IN PASSIVE MODE IF
sIF TRYING TO SET /ECHO

000002

041020
041024

000

PAGE 25-3

ACTION TABLE AND ROUTINES

000036

012503
000001

RRR RRRRRRR\RR

7897
7898

MACY11 30A(1052)

SEQ 140

sCLEAR 'NO'* OUT OF QUALIFIER FLAG

;GET NUMBER OF ‘'RUN PASSES''

#3,MLTYP
ACTLPX
#6 MLTYP

#ACT ,MODTYP
ACTLXX
#-1,P$GDBD

BE SURE IN ACTIVE IF TRYING TO SET LOOP
: BR IF IN ACTIVE

CZKMUAO kMS11-BL PDP=11 DCLY
30~-MAR-82 09:13
CZKMUA.P
005037

007310

012746
012746
010600
104417
062706
105037
000207

012441
00CoM
000004
003376

SEQ 141

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 25-4
ACTION TABLE AND ROUTINES
PRINTF

ACTLXX: CLRB
RTS

#CLIBDL

sCLEAR ANY LOOP TYPE THAT MAY HAVE GOT SET

:CLEAR NOT-ENOUGH FLAG

MoV

#CLIBOL ~(5P}

Mov
TRAP

SP,RO
CSPNTF

ADD

#4,SP

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P1T
7954

7955
7956
7957
7958
7959
7960
7961

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

30-MAR-82 09:13

061214
041220
041222
041230
041232
041240
041242

005737
001422
032737
001416
023737
001412

000002

007314

007156

007172

041242 012746 012644
041246 012746 000001
041252 010600
041254 104417
041256 062706 000004
000137

036170

7965

041266

012701

006400

7971

061312

060237

041336

060237

7964

7966
7967
7968
7969
7970
7972
7973
79764
7975
7976

;3;;

041272
061276
041302
041304
0641306
041316
061322
041326
041330
041332

;ggg 041342
7981

GTR9:

007310

0641262

;82%

MACY11 30A(1052)

010137
012702
006302
006302
010137

013701
012702
006302
006302
010137

108:

007154

007150

007206
GTREX:

7982
7983
7984
7985
;839

041350
0641354
041360
041364
041370

005037
005037
005037
005037
005037

(97320
007212
007214
007216
007210

7988

041374

004737

023210

7991

0616404

012737

001000

007230

7993

041620

013737

007150

007234

0414364
041440
041444
041446

004737
013702
006302
000172

7989 041400 004737 044174
7992

7994

7995
7996
7997

041412

061426

012737

004400

000010

026320
007306
007322

007236

007226

GTRX2:

PAGE 25-5

MLTYP
108
#DATCKB,PARAM
108
CMPTOT, TXMTOT
108
#CLIPW

GETCL

sRX ALLOCATE CODE

;LOOP MODE ?
sNO,BRANCH
:DATA CHECK ?
NO BRANCH
X & EX EQUAL
YES BRANCH
:PRINT WARNING

s TRY AGAIN

MoV
MoV
MoV

TRAP
ADD

#CLIPW,=(SP)
#.,-(SP)
SP,RO
CSPNTF
#4,SP

MoV

#PTRTAB,R1

sINIT TRANSMIT MESSAGE POINTER

ADD

R2,CMPPTR

;INIT COMPARE MESSAGE POINTER

R2,RXPTR

sINIT RECEIVE MESSAGE POINTER

MoV

CMPTOT ,RXMTOT

;MAKE COMPARE AND RX MESSAGE COUNTS EQUAL

CLR
CLR
CLR
CLR
CLR

FLAG
NOBUF
PSCNT
ERRCNT
LNCNT

sCLEAR FLAG
:CLEAR NO BUFFER COUNTER
;CLEAR PAS5 COUNT
:CLEAR ERROR COUNT
:CLEAR | INE COUNTER

JSR

PC.LOGDVI

PC,DVINIT

:LOG_ABOUT TO INIT DEVICE

MOV

#BUFLIM,CURCC

;SET CHAR COUNT TO 'BUFLIM'' NO. OF BYTES

KoV

RXPTR,CPTR

JSR
MoV
ASL
JMP

PC,BLDBUF
MODTYP,R2
R2
SMODE (R2)

Mov
MoV
ASL
ASL
MoV

ADD

007150

007156

TST
BEQ
8IT
8EQ
CMP
BEQ
PRINTF

MoV
MoV
ASL
ASL
MOV

007154
000017

09:15

ACTION TABLE AND ROUTINES

JMP

007152
000017

013737

30-MAR-82

SEQ 142

MoV

MOV

R1,TXPTR
#MSGLIM,R2
R2
R2
R1,CMPPTR
CMPPTR,R1
#MSGLIM,R2
R2
R2
R1,.RXPTR

NRXBUF ,CURADD

#10,MSGTYP

;INIT DEVICE

:SET UP RX BUFFER AS CURRRENT ADD.

sSET UP_FOR 33 TO FILL RX BUFFERS

sCLEAR RX BUFFER
:MODE DISPATCH

N 11

CZKMUAO kMS11-BL PDP=11 DCLT
30-MAR-82 09: 13
CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

PAGE 25-6

RECEIVE MODE SECTION

SBTTL

8001

09:15

RECEIVE MODE SECTION

FUNCTIONAL DESCRIPTION:
RECEIVE-ONLY (OR _ONE-WAY=IN) ROUTINE

IN THIS MODE OF TESTING THE DEVICE'S RECEIVER IS 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:
“ALLTR"
SEQUENCE :
CALLINg

aMODE (R2)

0641452

041500

013737

007150

000137

041642

007232
007204
007320

RXONLY:

RXONZ2:

Mov

RXPTR,CPTRR

JMP

ALLTR

MOV
BIS
CLR

RXMTOT,DVRCT
NQRX+#ERX,FLAG
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@ 143

B 12

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

TRANSMIT MODE SECTION

8025

.SBTTL

8028

* FUNCTIONAL DESCRIPTION:

8030
8031
gggg

;
;
;

8026
8027

s4t

8029

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 REPETITION COUNT CAN BE
SPECIFIED TO REPETITIVELY TRANSMIT THE LIST.

8034
8035

* SUBORDINATE ROUTINES USED:
“ALLTR"
;

8037

+ CALLING SEQUENCE:

8036

8041

041504

042737

000002

007314

8043
8044
8045

041520
041526
041534

013737
052737
005037

007172
000210
007232

007170
007320

8042

£346

aMODE (R2)

:DISPATCH TO MODE BASED ON MODE TYPE IN R2

TXONLY: BIC

#DATCKB,PARAM

:SET NOCHECK

MOV
BIS
CLR

TXMTOT,DVTCT
#QTX+METX FLAG
CPTRR

;COPY COUNTER FOR THIS PASS
:SET THE QUE TX FLAG
*CLEAR RX POINTER

gggg
8040

PAGE 25-7

TRANSMIT MODE SECTION

041512

041540

013737

000137

007152

0641642

007234

’

TXON2:

JMP

MOV
JMP

. CPTR
TXPTR

ALLTR

:GO TX.

SEQ 144

¢ 1

CZKMUAO kMS11-BL PDP=11 DCL;
30-MAR-82
CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

09:15

PASSIVE MODE SECTION

PAGE 25-8

PASSIVE MODE SECTION

.SBTTL
++

FUNCTIgNAL DESCRIPTION:
ASSIVE MODE SECTI ON
IN THIS MODE OF TEE} ING, THE DEVICc'S RECEIVER IS ENABLED IN
THEN EVERY TIME A MESSAGE IS
EXPECTATION OF REC VING A MESSAGE.
DATA CHECKING CAN BE DONE ON THE
RECEIVED, A MESSAGE IS TRANSMITTED.
RECEIVED DATA.

SUBORDINATE ROUTINES USED:

CALLING SEQUEN CE:
@MODE (R2)
JMP

007170

007320

PLCK:

PLCK2:

MOV

PLCK3:

MOV
BIS
JMP

MOV

TXMTOT,OVTCT
TXPTR,CPTR
RXPTR,CPTRR

N#QRX+H#ERX,FLAG
ALLTR

:DISPATCH TO MODE BASED ON MODE TYPE IN R2
JSET UP THE TRANSMIT COUNT
sSET UP CPTR TO TRANSMIT POINTER
;SET UP CPTRR TO REC POINTER
;SET UP Q AND EXPECT RX
JAND GO RX FIRST MSG.

SEQ 145

D 12

CZKMUAO KMS11-BL PDP=11 DCL;
30-MAR-82 09:1
CZKMUA. P11

MACY1? 30A(1052)

30-MAR-82

09:15

ACTIVE MODE SECTION

PAGE 25-9

FUNCTIONAL DESCRIPTION:
ACTIVE MODE SECTION

IN THIS MODE OF TESTING A LIST OF MESSAGES IS TRANSMITTED AND
MESSAGES
ARE EXPECTED TO BE RECEIVED. RECE IVED DATA CAN BE COMPARED
AGAINST "‘EXPECTED'' DATA IF DATA=CHECKING IS ENABLE
NOTE: IF BOTH ENDS OF THE LINK ARE {ICTIVE MODE, THEN THE
LINK MUST BE A FULL DUPLEX

SUBORDINATE ROUTINES USED:

NNNNNNY

041600
041606
041614
0641622
041630
041636

(=l=lelelale]

[ TE TR

TR YA YN PR Y] ...I.......

ACTIVE MODE SECTION

007170

007320

SEQUENCE
CALLIN?
ODE (R2)
Mov
MoV
MoV
MOV

8IS
JMP

TXMTOT,DVTCT
TXPTR,CPTR

RXMTOT.DVRCT
RXPTR,CPTRR

;DISPATCH TO MODE BASED ON MODE TYPE IN R2
sSET UP TX COUNTS

:SET UP COUNTS

onax+borx+cerx*csax FLAG

ALLTR

SEQ 146

E 12
CZKMUAO kMS11-BL PDP=11 DCLTY
82 09:13
3
CZKMUA.P11

MACY11 30A(1052)T 30-MAR-82

09:15

PAGE 25-10

RANSMIT - RECEIVE FOR ALL STANDARD MODES

TRANSMIT - RECEIVE FOR ALL STANDARD MODES

+SBTTL
¢4

VeV V000V080Ds00000s 000909080000,

OO0
~NO NN

d
D ced
b
b
b
d

b e cd oed e == ad e

ONN

§&3$&22

000004

007320

THIS CODE PERFORMS THE FOLLOWING FUNCTIONS
1.) IF RX BUFFERS ARE TO BE QUED,TELL DEVICE

CODE TO QUE THEM ,LOG RECEIVE QUED.
2.) IF TX BUFFERS ARE TO BE QUED ,TELL DEVICE
CODE TO QUE THEM, LOG TRANSMIT QUED.

3.) WAIT FOR EITHER RECIVE BUFFER OR TRANSMIT BUFFER OR

BOTH TO COMPLETE
4.) ézegigséve COMPLETE LOG IT UPDATE RX TABLE IF DATA

S.) IF TRANSMIT COMPLETE LOG IT.
4.) WHEN BOTH TRANSMIT AND RECIEVE LISTS ARE DONE
GO TO THE COMPARE BUFFER CODE

SUBORDINATE ROUTINES USED:
"DVAXQ"' -QUE RECEIVE BUFFER SPACE TO DEVICE
*LOGRXQ'-L0G RECEIVE BUFFER SPACE TO EVENT LOG
L0GTXQ''-LOG TRANSMIT BUFFER QUED TO EVENT LOG
*DVIXRX''-GUE_TRANSMIT BUFFER AND WAIT FOR RX
. OR TX_TO COMPLETE
*LOGRXC''-LOG RECEIVE BUFFER COMPLETED TO EVENT LOG
LOGTXC''-LOG TRANSMIT BUFFER COMPLETED TO EVENT LOG
USE OF FLAG BITS:

QRX = SET ON INPUT TO ALLTR IF REC IS TO BE QUED TO
DEVICE. CLEARED BY DVRXQ AND THEN SET BY DVTXRX
WHEN RX BUFFER IS COMPLETED.

QTX = SET ON INPUT TO ALLTR IF TRANSMIT IS TO BE QUED TO
DEVICE. CLEARED ON ENTRY TO DVTXRX AND SET BY DVTXRX
WHEN TX BUFFER IS COMPLETED.

ETX - gisgcgEDDVTXRx TO DETERMINE IF TX BUFFER COMPLETED IS

ERX = USED BY DVTXRX TO DETERMINE IF RX BUFFER COMPLETED IS
EXPECTED.

CALLING SEQUENCE:
ALLTR
JMP

ALLTR:

ALCKS:

d e

=OONN
POONNIONN

d
d =

b e

NNNORO

—

BIT

BEQ

MOV
MOV
MOV
MOV
MOV

RRRRRRRRRRRR

NOWN
0O NO NS NN = OV

Vi WAWMWAWAWMNS S

Pt Gt Pt Gt G- Pt Guir G- - Puir Gt P

00 00 00 00 00 0o 00 00 0o 0o 00 00

PPty

e 0000000000000 00000080 8000000000000 00 Ve

0D 00 00 O 00 00 00 0o 00

FUNCTIONAL DESCRIPTION:

023144
000010

007320

ALCK1:

JSR
JSR

BIT

#ORX, FLAG

ALCK]

CPTRR,R2
(R2)
, TEMP2
(R2)+,DVRXA
(R2)
, TEMP3
(R2) ,DVRCC
R2,CPTRR
PC.DVRXQ
PC.LOGRXQ

#0fX,FLAG

;GO TO TRANSMIT-RECEIVE FOR ALL STANDARD MODES

:IF NOT RX GO TO TX'S

:60 QUE DEVICE
*L0G REC QUED

SEQ 147

CIKMUAO kMS11-BL PDP-11 DC%T
30-MAR-82 09:12
CZKMUA.PN

MACY11 30A(1052)

ALCK2
CPTR,R2
(R2)
. TEMP2
(R2)+,DVTXA
(R2)
, TEMP3
(R2)+,DVTCC

JSR

PC.LOGTXQ

JSR

PC,DVTXRX

2GO TO TX AND RX SUB ROUT.

007320

#ORX,FLAG

sCHECK FOR REC. MSG.

007250
007252

DVRXA, TEMP2
DVRCC, TEMP3

041720
041722
041726
041732
041736
041742
041746

001416
013702
011237
012237
011237
012237
010237

004737

007234
007250
007164
007252
007166
007234
023110

g}gg

041756

004737

044610

8170
8171
8172
8173
8174
8175
8176
8177
8178
8179
8180
8181
8182
8183
8184
8185
8186
8187
8188
8189
8190
8191
8192
8193
8194
8195
8196

041762
041770
041772
2000
2006
042012
042020
042022
042026
2032
042036
042044
2046
042054
2062
042070
042072
042076
042100
042104
042110
042116
042122
042130
042134
042140
042144

032737
001514
013737
013737
004737
032737
001406
013702
013722
013712
032737
1015
012737
013737
022737
001002
005237
000424
013702
011237
163737
013722
063737
013722
013712
162702
010237

000004

007200
007202
023162

8198
8199
8200
8201
gggg

042150
042156
042160
042166
042174

022737
001007
042737
052737
6
0

000002

007306

000104
000210

007320
007320

8204
8205
8206
8207
8208
8209
8210
8211
8212
8213
8214

042176
042202
042206
042210
062216
042222
042230
042232
042240
042246
042252

005337
005737
001005
042737
005037
032737
001447
013737
013737
004737
005337

007204
007204

8197

0641752

042150

000004

Mov
MOV
MOV
MOV
MoV
MoV

ALCK2:

007314

007236
007250
007252
000002

007314

000001
007150
000003

007204
007232
007306

R2,CPIR

ALCKS

:
UPTABL

PC,LOGRXC
#ECHOB ,PARAM

UPTA%
CPTR,R2

TEMPS, (R2)+

007204

007232
007244
007252
007252
007252
007250
007244
000002
007232

;IF NO TX''S GO TO 2

BEQ

8159
8160
8161
8162
8163
8164
8165

g}g?

30-MAR-82 09:15 PAGE 25-11
TRANSMIT = RECEIVE FOR ALL STANDARD MODES

UPTAL:

#ACT ,MODTYP

UPTAS

UPTEX:

007250
007252

R2.CPTRR
#PAS ,MODTYP

ALCK2A

#QRX+AERX ,FLAG
#QTX+#ETX ,FLAG

ALCK1

ALCK2A:

007164
007166
023126
007170

CPTRR,R2
(R2) , TEMP

TEMP3, (R2) +
TEMP3
. TEMP2
TEMP2, (R2) +
TEMP, (R2)

007250

007320

DVRCT
UPTEX

TEMPS. TEMP

007244

007320

UPTA1
#01,DVRCT

RXPTR,CPTRR

UPTA3:
UPTAT:

000004
007232
000010

TLAP3. (R2)

#DATCKB, PARAM

DVRCT
DVRCT
ALCK3

#ORX, FLAG

ALCK3:

CPTRR

#QTX FLAG

AL Cké

DVTXA, TEMP2
DVTCC,TEMPS
PC,LOGTXC

ovicT

:LOG REC COMPLETE

:1S THIS ECHO MODE (PASSIVE)
;IF NOT GO TO 4

;ELSE SET R2 TO PRESENT TX TABL
:STgRE OFF RX ADD
JAND

:DATA CHECK?
JYES ,BRANCH

JELSE SET DVRCT TO A 1
JRESET POINTER
:1S THIS ACTIVE

sIF YES BUMP COUNT

:LOAD TEMP WITH PREV. COUNT
:LOAD TEMP WITH PREV.COUNT~CURRENT
:STORE OF NEW ADD

sAND NEW CC
sPUT POINTER BACK TO ADDR.

sAND RESTORE IT.

sIF NOT PASSIVE LOOP THEN GG TO 2A

sCLEAR BOTH EXPECTED AND COMPLETED FLAGS

sSET THE TX FLAGS

sDEC REC COUNT
¢1S IT ALL DONE
sNO. GO CHECK TX
sCLEAR THE RX FLAG
;YES. CLEAR POINTER
JIS IT TX
sIF NOT TX THEN GO BACK
;LOG TX COMPLETED
sDEC TX COUNT

SEQ 148

G 12
CZXMUAQ KMS11-BL P)P=11 DCLT
30-MAR-82 09:13
CZKMUA.P11
8215
8216
8217
8218
8219
8220
8221
8222
8223
8224
225
8226
8227
8228
8229
8230
8231
8272
8233
8234
8235
8236
8237

042256
040264
042266
042274
04230
042376
042710
042314
042320
042322
040326
042332
042340
042346
042350

072737

062354
042356
042362
042364
042370

001362

000137

30-MAR-82 09:15 PAGE 25-12
TRANSMIT - RECEIVE FOR ALL STANDARD MODES

000002

007306

#PAS MODTYP

000210
000104
007170

007320
007320

#ORX+ERX.FLAG

042370
007170

ALCK3A:

041642

ALCK3C:
ALCK3B:

000002
005737

MACY11 30A(1052)

007232
007234
041756

007320
007314

ALCKéG:
ALCK4A:

ALCK4B:

ALCKSA
NOTX+ETX,FLAG

:IF NOT PASSIVE MODE GO TO 3A
:CLEAR THE TX FLAGS

ALCK3C
CMPSR
DVTCT
:tg:g&

IF MORE RX'S DO IT
s ELSE COMPARE
;1S IT ALL DONE
:1F NOT GO BACK TO §

CPTR

:1F SO CLEAR POINTER

ALCK4A

:IF NOT THEN END WO CKING RX.

#QTX,FLAG
#DATCKB,PARAM

CPTRR

:AND SET THE RX FLAGS

sCLEAR T
G
;1S IT D

e%gz3€

;IF SOME RX''S LEFT GO BACK

ALCK4B

;BRANCH IF ANY TX'S LEFT

ALCK2

SEQ 149

H 12

CZKMUAO kMS11-BL PDP=11 DCLY

30~-MAR-82 09:13

CZKMUA.PT

MACY11 30A(1052)

30-MAR-82

PAGE 25-13

DATA COMPARISON CODE

.SBTTL
V0V Ve VeV,
+
+

09:15

DATA COMPARISON CODE

SEQ 150

B0 00 0000009090000V 000000Te B0 VeV

FUNCTIONAL DESCRIPTION:

032737

000002

007314

200
06
416

013737
013737
013737

007150
007154
007206

007234
007232
007204

A DATA COMPARISON ENTRY WHICH REPORTS THE NUMBER
1.)

2.)

OF COMPARISON ERRORS FOUND.

A DATA COMPARISON ENTRY WHICH REPORTS DIFFERENCES

IN REC LENGTH TO COMPARE LENGTH
3.) A DATA COMPARISON STARTED ENTRY WHICH REPORTS ADDRESS
OF RECEIVE BUFFER AND BYTE COUNT.
THIS CODE ALSO REPORTS SOFT ERRORS FOR DATA COMPARISON
(THE FIRST S ONLY),LENGTH ERROR,AND TOTAL NUMBER OF ERRORS

SUBORDINATE ROUTINES USED:

*LOGCMP'’ - SEE ITEM 3 ABOVE
*LOGCML'’ - SEE ITEM 2 ABOVE
*LOGCMD'* - SEE ITEM 1 ABOVE
CALLING SEQUENCE:
CMPSR
JMP

CMPSR:

8IT
BEQ
MOV
MOV

;1S DATA CHECKING TO BE DONE
#DATCKB,PARAM
*IF NOT THEN EXIT
CMPSEX
PUT START OF RX POINTERS TO CPTR
RXPTR,CPTR
CMPPTR.CPTRR : AND START OF COMPARE POINTS TO CPTRR

MOV
MOV

CPTR,R2
(R2). TEMP2

MOV

RXMTOT .DVRCT

:MOVE CURRET RX PT.TO R2
*MOVE RX ADD TO EVENT LOG

b el amd b b
ONN—=N

CMPS3:

;JUMP TO DATA COMPARISON CODE

7
7

007252
007234

MOV

R2.CPIR

*RESTORE RX POINT

) oud and and b
QOOMNNIN

3
N
A
A~
3
N
>
'S
N
H
~
&H

042502

NOTE: IF NO DATA CHECKING SKIP THIS CODE

%OOOOO OOO0O00

8295

007234
007250

EXPECTED AND FILLS THE EVENT LOG WITH1 OF 3 MSGS.

2
3

007232

MOV
MOV

CPTRR,R2
(R2) +.R3

:PUT R2 AT COMPARE TABLE
*SET R3 TO COMPARE ADD

7
7
7

007232
007254
023256

MOV

R2,CPTRR

*RESTORE POINTER

JSR

PC.LOGCMP

:LOG COMPARE START.

00
OoOnN

8294

SERRRE
3
v

§70

CMPSR - COMPARE CODE
THIS CODE COMPARES THE RECEIVED DATA AGAINST THE

007252

cMP

R4, TEMP3

007216

INC

ERRCNT

{

MOV

(R2)+.R1

(R2)+, TEMP3

(R2)+.R%

R4 . TEMP4

:SET R1 T0 START ADD OF RX
SET CHAR

COUNT TO EVENT LOG

‘SET R4 TO COMP CC

;1S COMPARE COUNT = TO RX COUNT

CMPS7

“IF SO GO TO 7

ERRSOFT 1,EDDLE,ERR10

;PRINT ERROR

BEQ

I 12

RREE RERR ZREER
GEER KEl3 S388R

CZKHUAO KHS11-BL POP=11 DCLTY
30~-MAR~-82 09:13

CZKMUA.P

30-MAR-82

09:15

DATA COMPARISON CODE

SEQ 151

PAGE 25-14
gSERSOFT

1046457

0L4737

023274

005037

007254
000001

007254
007254

JSR

007242

000005

CMPS7:
CMPS1:

CMPS2:

007264
007265
007216

~ o NN
VIS
= cod b wd e b b e \

ONOWVIS
NN = O w

042556

PC.LOGCML

;LOG LENGTH ERROR

TEMP4

MOV
CMPB

#1,0FSET

8tQ

CMPS6

(R1)+, (R3)+

sCLEAR BAD BYTE COUNTER
:SET OFSET BYTE COUNT TO 1
;COMPARE RX WITH EXPETED
;IF EQUAL THEN GO TO 6

INC
CMP
BHI
Mov8e
MOvVB
INC
ERRSOFT

TEMP4

sINC BAD COUNT

CLR

TEMP4 45
CMPS6
-(R3) ,G00D
-(R1) ,BAD
ERR(NT

2 EDDDE ,ERR1

007242

R3
OF SET
Ré
CMPS1
TEMP4
CMPSSA
ERRCNT

CMPS6:

007254

sREPORT COMPARISON FAILURE TO OPR.

TRAP
-WORD
-WORD
.WORD

ERRSOFT 3,EDDDE ,ERRZ

005337
001267

007204

DEC
BNE

PC.LOGCMD

DVRCT

CMPS3

EDDDE

ERR1

;ELSE DEC CHAR COUNT AND SEE IF 0
:1F _NOT GO BACK

:SEE _IF ANY CMP ERRS FOR THIS MSG
:BR IF NONE

;REPORT # OF MISMATCHES FOR MESSAGE

023312

CMPSS: JSR
CMPS5A:

CSERSOFT
2

sINC OFFSET

007216

EDDLE
ERR10

;1S IT MORE THEN S5
:1F SO GO FOR MORE
:STORE GOOD BYTE FOR ERRCR
:STORE BAD BYTE FOR ERROR

00 00 00 00 0o 0000O

MACY11 30A(1052)

;L0OG DATA ERROR IN COMPARE
sIF NOT ALL DONE GO BACK

TRAP
.WORD
.WORD
-WORD

T
CSERSOF
3

EDDDE

ERR2

J 12

CZKMUAO kMS11-BL PDP=11 DCLY
30-MAR-82 09:13

CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 25-15

INTERNAL END OF PASS CODE

.SBTTL

FUNCTIONAL DESCRIPTION:

THIS CODE INCREMENTS THE PASS COUNT FOR THE
EVENT LOG, LOGS THE END OF PASS EVENT
IF "RPASS'' IS A MINUS ONE RETURN TO MODE
DISPATCHER. IF NOT =1 THEN DECREMENT RPASS

?zDN6;

RPASS'* IS THEN
= TO 0 GO TO DCLT PROMT
TO O THEN GO BACK TO MODE DISPATCHER

SUBORDINATE ROUTINES USED:

‘LOGEOP'' = LOG END OF PASS TO EVENT LOG
8347

042644

005237

007214

8344

062650

013737

007212

177777

CMPSEX: INC

007254
007250
007252

007316

5$:

007316
8352
8353

042714
042720

000137
000137

041404
036104

18:

2s:

PSCNT

MOV
Moy
MOV

NOBUF, TEMP4
PSCNT ,TEMP2

CMP

?-i RPASS

ERRCNT, TEMP3

JSR

PC,LOGEOP

BEQ
DEC

RPASS

B8EQ
JMP
JMP

2$
GTRX2
GTRAS

:BUMP PASS COUNT

;LOG END OF PASS
:SEE IF RPASS=~1
sIF 1T 1S DON'T DECRMNT, LOOP FOREVER
:DEC PASS COUNT
:1F DONE EXIT TEST
:ELSE GO BACK AND DISPATCH
:WHEN RPASS=0 GO BACK TO ‘DCLT>"

SEQ 152

K 12

CZKMUAO KMS11-BL POP=-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 25-16

DOWN=-LINE=LOAD SECTION

DOWN=-LINE-LOAD SECTION

8356

.SBTTL

8359
8360

* FUNCTIONAL DESCRIPTION:
DOWN-L INE-LOAD SECTION
:

8364

8357
8358

1 3

8361
8362
8363

8365
8366
ggg;

:
:
:

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.

THE "HOST’*

THEN SENDS A 'MEMORY LOAD WITH TRANSFER ADDRESS

8371
8372
8373
8374
8375
8376

:
:
:
:
:
:

8379

* CALLING SEQUENCE:

8383
(3)

'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
'ovrxax:' - QUE TX BUFFER AND WAIT FOR RX OR TX TO COMPLETE
*LOGTXC'' = LOG TX COMPLETED TO EVENT LOG

'LOGRXC'*

042724
0462726

:
’

DLL:

106443

THE 'HOST'' OR ORIGINATING STATION
IN THIS MODE OF TESTING,
REQUESTS THE ‘‘SATELLITE'* OR BOOT STATION TO ENTER MOP MODE.
THE BOOT STATION THEN SENDS A ‘REQUEST PROGRAM MESSAGE".

{ SUBORDINATE ROUTINES USED:

gg;g

:
:
:

gggg

g§gg
8382

SEQ 153

= LOG RX COMPLETED TO EVENT LOG

:DISPATCH TO MODE BASED ON MODE TYPE IN R2

JMP

aMODE (R2)

GMANID

DLLQ1,TEMP3,0,377,0,377.NO

:GET PASSWORD

(3) 042726 000406
(4)
(5)

(5)
(5)
(5)
(5)
(3)
8384
8385

8386
8387
8388
8389

8390
8391

gggg

042730 007252
042732 000022

042734 012734
042736 000377
042740 000000
042742 000377
042744
042744 113737 007252
042752 113737 007252
042760
042766
062774
043002

113737
113737
052737
042737

007252
007252
000100
000002

043016

013737

002172

043010
043024

012737
004737

002647
043116

MOV

#DLLM1,CURADD

:SET THE DOWN LINE LOAD MSG TO #1

JSR

PC,DLTXRX

:GO TO THE DOWN LINE TX RX ROUTINE

BIC

007314

MOV

007230

TEMP3,PASS1
TEMP3.PASS2

10001$:
;PUT PASSWORD IN MESSAGE
*PASSWORD 1S DUPLICATE

007236

TEMP3.PASS3
TEMP3.PASS4
#ERX,FLAG
#DATCKB,PARAM
DLLMIC.CURCC

+ sHERE
3 :AND MERE.
RX
TO
:SET EXPECTED
NOCHECK
:CLEAR

:SET THE CC

:RETURN WHEN TX AND RX ARE COMPLETED
000400
043116

007320

8402

TEMP3
T$CODE
DLLAQ1
377
TSLOLIM
TSHILIM

MOVB
MOVB
MOVB
MOVB
BIS

007236

8401

.WORD
-WORD

002650
002651
002652
002653
007320

839 043030 012737 002654
*=>7

CSGMAN

"WORD
"WORD
LWORD
"WORD

gggg
0598
gzgg

TRAP

B8R

043036

043044
043052
043056

013737

042737
004737

002174

007230

MOV

#DLLM2,CURADD

;SET THE DOWN LINE LOAD MSG TO #2

BIC
JSR

#DLLGA.FLAG
PC,DLTXRX

‘CLEAR THE GO AHEAD FLAG
$GO TO THE DOWN LINE TX RX ROUTINE

MOV

DLLPRI:

DLLM2C.CURCC

:SET CC

: RETURN WHEN TX AND RX ARE COMPLETED

10001$

L1
MACY11 30A(1052)

CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P 1"
014642
000001
000004
036104

DLLEA:

30~MAR-82

09:15

SEQ 154

PAGE 25-17

DOWN=LINE=-LOAD SECTION
PRINTF

#DLLCM

JMP

GTRAS

ERRHRD

20,DLLAB,ERR14

MoV
MoV
MOV
TRAP
ADD

#DLLCM,=(SP)
SP)

TRAP

CSERHRD
20

-WORD
-WORD
-WORD

022700

000137

JMP

036104

GTRAS

sPRINT ABORT AND EXIT

#QRX,FLAG
#RXBUF ,DVRXA
#RXBUF , TEMP2
#256. ,DVRCC
#256.,TEMP3
PC.DVRXQ
PC.LOGRXQ

sSET THE QUE RX FLAG
sSET THE DEVICE RX BUFFER TO RXBUF
¢SET UP FOR LOG
sSET UP FOR CC OF 256
sSET UP FOR LOG
1760 QUE RX
SAND LOG IT...

:SET UP FOR TX
-AND LOG
*SE UP FOR TX COUNT
SAND LOG IT
*L0G THE TX QUEUED
:SET UP TO QUE AND EXPECTED
16O TO DEVICE ROUTINE
STEST FOR GO AHEAD BIT
*1F SET GO TO ONE
TELSE CHECX FOR TX DONE

FreRess REERRREER

N
NOAWNS
NN - OV~

8411

DLTXRX:

000004

0
023144

000400

007320

000010

007320

CURADD.DVTXA
CURADD.TEMP2
CURCC,DVTCC
CURCC . TEMP3
PC.LOGTXQ
#OTX+#ETX,FLAG
PC.DVTXRX
#DLLGA,FLAG
DLLE1
#OTX, FLAG

022257
004400
003400
021752
023172
043102

007260

#TXNC, CONOTM

007164

007250
007252

007236
007236
007230
007238
0

032737

007252

007164
007250
007166
007252

007320

DLLEZ2:

DLLES

DLLE?7:

007250

002174

007320
007320
007166

000004

007320

DLLEG:

DLLET:

RXBUF
, TEMP3
; TEMP4
TXBUF
#DLLAB, TEMP2
PC.LGDVE
DLLEA

DVTXA, TEMP2
DVTCC.TEMP3

*IF DONE THEN BRANCH
*ELSE ERROR

:LOG ERROR

*ABORT TEST

PC,LOGTXC
#QTX+AETX FLAG
#DLLGA,FLAG
DLLM2C,DVTCC
DLLES

:LOG TX DONE
;CLEAR QUE AND EXPECTED
:SET THE GO AHEAD BIT

#QRX,FLAG

:1S THE A RX COMPLETED

DLLEZ

sEXIT IF SECOND MSG.
sAND GO BACK T0 2

DLLAB

ERR14

O
CZKMUAQ KMS11-BL PDP-}lOcLY
13
30-MAR
CZKMUA.PT
001004

022277

007260

007200

007250
007252

BNE

MoV

DLLES:

004400

122737

000010

001404
012737
000710

022317

007260

DLLE&:

122737

000001

004402

DLLE3:

022342

007260

020273
004401
000042

007244

010362

DVRXA, TEMP2
DVRCC. TEMP3
PC,LOGRXC

;JF SO GO TO 8

;ELSE SET UP ERROR AND ABORT.
:LOG RECEIVE COMPLETE
;CHECK FOR FIRST WORD OF RX
:SEC BOOT MSG.

#10.RXBUF

MoV

DLLE3
#RXM1,CONOTM
DLLE?

CMPB
BEQ
MoV
BR

#1 ,RXBUF
+2
DLLESA
#RXM2,CONOTM
DLLE?7

21S SECOND WORD 1?
s YES ,BRANCH

#UNKM, TEMP

sSET UP FOR UNKNOWN DEVICE
;GET DEVTYPE FROM HESSAGE
;0UT OF LEGAL RANGE
?

DLLESA: MOV

MOVB

CMPB

BHI

8lT8
BNE

MOV

007244

DLLES

xnxgg.CONOTM
DLL

cMPB

DLLESB: PRINTF

043514

043536
043542

MOV
MOV

JSR

000001
043506

SEQ 155

MACY11 30A(1052) 30-MAR-82 09:15_ PAGE 25-18
DOWN=LINE=-LOAD SECTION

RXBUF +1,R3
R3,434.

DLLESB

sSET UP MESG AND ABORT

cABORT TEST

sSET UP MESSAGE AND ABORT

YES.BRANC

?
#1,R3
;00D
DLLESB
s YES ,BRANCH
DLLIND(R3) ,TEMP sGET ASCIZ MESSAGE FROM TABLE

#SECRM,TEMP,R3

sPRINT ID MESSAGE

007244
020135
000003

MOV
MOV
MoV
MoV

R3,-(SP)
TEMP,=(SP)
#SECRM,;(SP)

000010

TRAP
ADD

CSPNTF
#10,SP

DLLES:

RTS

sRETURN TO CALLER

N 12

CZKFNJAQ kKMS11-BL PDP=11 DCLT
30~-MAR-82 09:13

CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

SEQ 156

PAGE 25-19

09:15

TALK MODE SECTION

TALK MODE SECTION
+4+

FUNCTIONAL DESCRIPTION:
TALK MODE SECTION ,_

IN_THIS MODE, THE

''TALK'*

END_OF THE LINK TRANSMITS OPERATOR

SPECIFIED MESSAGES UNTIL A “EXIT'' MESSAGE IS TYPE.
THIS END OF THE LINK GOES INTO "LISTEN'' MODE.

AT THAT POINT,

SUBORDINATE ROUTINES USED:

*LOGTXQ'* - LOG TX BUFFER QUED TO EVENT LOG
*DVTXRX'* = QUE TX BUFFER TO DEVICE AND WAIT FOR COMPLETE
*LOGTXC'* - LOG TX COMPLETE TO EVENT LOG
CALLING SEQUENCE:
aMODE (R2)
JMP

043544

042737

001373

vavvvvv

NOWVMESWNN=OVRNOWVS
NN —=C

et
layala
)
Y

007314

#DATCKB,PARAM
NOPBUF ,R2

#=1,(R3) ¢
#OPEND ,R2
18

;SET NOCHECK

:CLFAR OUT OPBUFFER FIRST

OPRMM,OPBUF ,A,=1,1,72. ,NO

104443
000406
002524
000142
014576
177777
000001
000110

[PV
IV IV AV IV ¥ 3

00 G0 0o 00 00 0o 00 00 0o OB 0o OO 0o 0o OB 00 00

vivauiuvauaivivauinuaiavaiuviug (S LV [V IV 0, [V, 1V 1V, ]P

000002
002524
177777
002646

;DISPATCH TO MODE BASED ON MOCE TYPE IN R2

;GET TALK MESSAGE

000377

002524

R2
gg??.OPBUF(RZ)

sNOW GET CHAR COINT

2%
R2,0PCNT

002166
002524

043674

007232

043700

044610

043704
043712
043720
043724

007164

022737

TRAP

CSGMAN

.WORD

OPBUF

007164

NOPBUF ,OVIXA
#OPBUF , TEMP2

007166

OPCNT, FEMP3
OPCNT ,,DVTCC

007320

NQFX+HETX,FLAG

PC,LOGTXQ

CPTRR

;SET UP TX ADDR.

:SET UP TX CC
;SET UP FLAGS

*CLEAR RX POINTER

PC,DVTXRX

007250
007252

002524

DVIXA,TEMP
DVTCC,TEMP
PC,LOGTXC

# X, OPBUF

:CHECK FOR EXIT

10002$:

.WORD
.WORD
LWORD
LWORD
LWORD

10002%

TSCODE
OPRMM
-1
TSLOLIM
TSHILIM

B 13
CZKHUA01KM411-8L PDP=11 DCLY
30-MAR-82 09:13

CZKMUA.P

043732

043760

001304

000137

MACY11 30A(1052)

052111

002526

000210
000006
041404

007320
007306

30-MAR-82

09:15

TALK MODE SECTION
BNE
CMP
BNE
8IC

TALCK
#''17,0PBUF+2

JMP

GTRX®

MoV

PAGE 25-20

TAL CK
SOTX+#ETX,FLAG
#LIS MODTYP

sCLEAR THE TX BITS

:CHANGE TO LISTEN MODE

;AND GO BACK TO DISPATCH

SEQ 157

c 13
CZKMUAQ kMS11-BL PDP=11 DCLT

CZKMUA. P11

30-MAR-82 09:13

MACYT 30A(1052)L 30-MAR-82

042737

000002

012746
012746
010600
104417
062706
012737
012737

016565
000001

8561
8562

044034
044042
044050

012737
052737
005037

000122
000104
007234

8564
8565

044054
044060

004737
004737

8567

044064

8569
8571
8572
8573
8574
(7)

R559

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

8575
8576

8577
8578
8579
8580

000004
002524
002524

007314

+
<+

800 Ve Ve Ve Ve Ve Ve Be Ve VpPBeGe T o %0 v

043764
043772
043772
043776
044002
044004
044006
044012
044020

PAGE 25-21

LISTEN MODE SECTION

.SBTTL

8555
8556
(7)
(6)
(3)
(4)
(4)
8557
8558

09:15

ISTEN MODE SECTION

SEQ 158

FUNCTIONAL DESCRIPTION:
LISTEN MODE SECTiON

IN THIS MODE, THE 'LISTEN'' END OF THE LINK PRINTS ALL OF THE MESSAGES
RECEIVED BY THE DEVICE ON THE OPERATOR'S CONSOLE. IF_THE 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
*DVIXRX'' = WAIT FOR RX TO COMPLETE
LOGRXC'* = LDG RX COMPLETE TO EVENT LOG
CALLING SEQUENCE:

LISCk:

JMP

SMODE (R2)

;DISPATCH TO MODE BASED ON MODE TYPE IN R2

BIC

#DATCKB,PARAM

;CLEAR CHECK BIT

FRINTF

#LISP

:PRINT PROMPT FOR OPR.

#OPBUF ,DVRXA

;SET DEVICE UP TO REC AT OPBUF
:SET UP CHAR COUNT TO 82.

8IS
CLR

#82. ,DVRCC
#82.,TEMP3

N#QRX+#ERX ,FLAG
CPTR

;SET UP FLAG
sCLEAR THE TX.

0644530
023144

JSR
JSR

PC.DVRXQ
PC.LOGRXQ

:QUE RX

004737

044610

JSR

PC.DVTXRX

:GO TO DEVICE RX. SUBROUTINE

044070

013737

007200

044104
044110
044116
(0446122
064122

004737
063737
105077

023162
007200
143060

MoV
MOV
JSR

DVRXA, TEMP2
DVRCC, TEMP3
PC,LOGRXC

:SET UP ADDR.AND CC.
:L0G COMPLETED

012746
012746
010600
104417
062706
022737
001320

002520
000001

CLRB
PRINTF

@DVRCC
#OPBFPT

044026

044126
044132
044134
044136

044142
044150
(044152
044160
044162
044170

012737

022737
001314
012737
000137

000122

007200
007250
007202
007252
007320

007250
007252
007202

LISCKA: MOV
MoV

#OPBUF
, TEMP2

MOV
MOV

ADD

DVAXA,DVRCC

Mov

#LISP,=(SP)

MoV
TRAP
ADD

SP,RO
CSPNTF
#4,SP

MOV

000004
056105

002524

052111

002526

000005
041404

007306

cMP

BNE
CMP
BNE
MOV

JMP

, OPBUF
#'EX

LISCKA
#°1T,0PBUF+2
LISCKA
#TAL .MODTYP

GTRXS

:COMPARE FOR EX OF "EXIT

MOV
TRAP

ADD

*IF NOT EXIT THEN GO BACK
:IF FIRST HALF OK CHECK NEXT PART
*IF NOT EXIT THE GO BACK
*CHANGE MODE TO TALK

*RETURN TO DISPATCHER

#OPBFPT,-(SP)

#,-(SPS
SP.RO

CSPNTF

#4,SP

D 13

CZKRUAO KMS11-BL POP=11 DCLT

CZKMUA.P1T
8581
8582

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

LISTEN MODE SECTION

PAGE 25-22

SEQ 159

E 13

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

8600
8601
8602

DEVICE FUNCTION SUBROUTINES

DEVICE INIT SUBROUTINE

.SBTTL

8603

8604
8620
8621

s4e

8624
gg%g

:
:

* FUNCTIONAL DESCRIPTION:
OVINIT= DEVICE INIT ROUTINE
;

8522
8623

THIS ROUTINE IS DEVICE DEPENDENT CODE THAT INITS
THE DEVICE BEING TESTED. (I.E. FULL/HALF DUPLEX BAUD RATE, MAINT MODE.)

“EHDPLX'* INDICATES IF MODE IS FULL OR HALF DUPLEX. (1=FULL)

8627

: INPUTS:

gggg

' SUBORDINATE ROUTINES USED:

8632

gggg

8636

ADDRESS POINTERS (SELO....) ALREADY POINT TO DEVICE'S REG.S
'LGDVE'* - LOG DEVICE ERROR TO EVENT LOG

*TOORIO"* - TIME OUT OR INPUT INTERRUPT OR OUTPUT INTERRUPT
"'CLRAW'® = CLEAR RQI AND WAIT FOR RDI TO GO AWAY

:
;

8633
gggg

8637

* CALLING SEQUENCE:

8639

DVINIT:

8641

044174

8644

044174

012737

000100

8646

044206

005077

146000

ggzg

8645 044202 005077 146010
005077

007360

8647

8649

044226

112777

8651

044236

100426

(3) 044240
8653 044242
8654 044246

007360

8655
8656
8657
8658
8659

104422
005737
001371

044250
044256
044264
044272

012737
017737
017737
004737

021162
145720
145716
023172

8661
(4)
(5)

044302
064302
044304

044306
044310

104457
000013
021162
022646

8663

044312

000730

8648 044216 012777 040000 145756
000200

8650 044232 005777 145744
8652

8660

(5)
8&5)5

044240

044276

005237

145752

:MASTER CLEAR DEVICE

MOV

#100, TIMER1

CLR

aSEL4

CLR

145764

044212

DVIN2:

007216

aSEL6

:TURN OFF THE RUN BIT

#200,38SEL1

*SET RUN BIT

MMCLR,ISELO

TST

aseLd

MOV8

8M]

TIMER1
DVIN2

MOV
MOV
MOV
JSR

#DVEM3, TEMP2
@SELO, TEMP3
@SEL2, TEMPL
PC.LGDVE
ERRCNT

ERRSOFT 11,DVEM3,ERR13

BR DVINIT

‘DO A MASTER CLEAR
*IS RUN BIT SET

*IF YES GO TO 1 ELSE...

DVINT

TST
BNE

INC

;SET UP TIMER 1 FOR 100(OCTAL) TICKS

aSELO

MOV

BREAK

007250
007252
007254

PC.DVINIT

JSR

8638

8640

PAGE 25-23

DEVICE FUNCTION SUBROUTINES

LSBTTL

gggg

09:15

SEQ 160

:SEE IF TIME HAS EXPIRED
*IF NOT GO BACK AND CHECK
*AGAIN ELSE...PRINT ERROR

TRAP

C$BRK

TRAP
MORD
"WORD
"WORD

CSERSOFT
11
DVEM3
ERR13

;LOAD UP ERRM. AND REG OUTPUTS
100G TIME OUT WAITING FOR RUN

;GO BACK AND TRY MSTR CLR AGAIN IF ERROR

F 13
CZKMUAO kMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

09:15_

SEQ 161

PAGE 25-264

DEVICE INIT SUBROUTINE

DVIN1:

044314

: DO BASE IN COMMAND
000003
000143
045436

044314

BIC

#3 FLAG

sCLEAR _INPUT AND OUTPUT INT FLAGS

JSR
MOV

PC,TOORIO
#BASE ,@SEL4

;GO WAIT FOR INTERRUPT OR TIME OUT

MOVEB

DVIN?Z:

MOV
BIS

004000
045330

DVIN3:

#0,aSEL
#1€0,aSEL2

;SET UP BASE IN_INT EN

;SET UP SEL 6

:SET 1EO

BIC

#LULOOP, SELO

;CLEAR LU _LOOP

BNE

DVINS

s IF NOT GO TO 3

CMP

000001

#143,38SELO

BIS

JSR

ATTL MLTYP

#LULOOP,aSELO

PC,CLRAW

;IS TTL SELECTED

;ELSE SET LU LOOP

: DO CONTROL IN COMMAND
000141
045436
145572
000004

007306

002400

145554

145566

007312
002000

145536

017737
004737

145532
045330

007262

MOVB
JSR

CLR

CMP

BNE

BIS

BR
DVINS:

005737
001003
052777

000207

DVINS:

DVING:

#141,3BSELO
PC,TOORIO

;WAIT FOR INT OR TIME OUT
s CLEAR HALF/DUP
IS THIS DOWN LINE LOAD?
#DOW,MODTYP
BR IF NOT
OVIN
:IF SO SET MAINT MODE
MMAINTB+HALFDB, assL6
AND FORCE HALF DUPLEX
DVING

asELé

FHDPLX

:1S THIS A HALF/DUP
:IF NOT GO TO 4
;ELSE SET HALF/DUP

@SEL6, CONTIN

sSET UP CONTROL IN FOR MODS
:G0 CLEAR RQ] AND WAIT

BNE
BIS

DVING
AHALFDB,aSEL6

MOV
JSR

PC, CLRAW

DVINEX: RTS

;SET _UP CONTROL IN

:FOR RDI TO GO AWAY.
:RETURN TO CALLER

BIT

G 13

CZKMUAOQ kMS11-BL PDP-11 DCLT
30-MAR-82 09:13
CZKMUA. P11

30-MAR-82 09:15 PAGE 25-25
DEVICE GET MODEM STATUS SUBROUTINE

MACY11 30A(1052)

[ TETETEATE

A FE PR YR Y

YR K .....l..‘......

DEVICE GET MODEM STATUS SUBROUTINE

8739
87640
8741
8742
8743
8744

044474
044502
044506
044514
044522
044526

112777
004737
017737
013777
004737
000207

000141
045436
145500
007262
045330

FUNCTIONAL DESCRIPTION:
'D

GET MODEM STATUS

IMPLICIT INPUTS:

THE BIT POSITION AND AVAIABLITY OF THE MODEM SIGNALS CTS,DSR,...RI,.
ION
IN THE DEPENDENT PORITION OF THE GLOBAL EQUATES SECTION.

PUTS

CURRENT MODEM SIGNAL VALUES IN ‘MODS'’

SUBORDINATE ROUTINES USED:

*"QO0RI0'* - TIME OUT OR INPUT INTERRUPT OR CUTPUT INTERRUPY
"CLRAW'' = CLEAR RQI AND WAIT FOR RDI TO CLEAR

CALLINGSSEOUENCE

#141,3BSELO
PC,TOORIO

@SEL4 ,MODS

CONTIN,QSEL6

PE.CLRAU

sSET _UP CONTORL IN
;GO TIME OUT CHECK
:SET UP MODEM STATUS
:SET UP OLD CONTORL IN

sRETURN TO CALLER

SEQ 162

W13

CZKMUAOQ KMS11-BL PDP=11 DCLTY
30-MAR-82 09:13
CZKMUA.PT

30-MAR-82 09:15 PAGE 25-26
DEVICE QUEUE RECEIVE SPACE SUBROUTINE

MACY11 30A(1052)

DEV ICE QUEUE RECEIVE SPACE SUBROUTINE

.SBTTL
+
*

8748
8763

FUNCTIONAL DESCRIPTIN%:-

DVRXQ = THIS >ubs ROUTINE QUES THE REC BUFFER SPACE TO THE
DEVICE, THE N CLEARS THE QRX BIT OF THE FLAG WORD.

INPUTS:
DVRXA = ADDRESS OF RX BUFFER SPACE
DVRCC = BYTE CHAR C OUNT OF RX BUFFER
= SET BY CALLING ROUTINE
QRX FLAG BIT
OUTPUTS

QRX FLAG BIT = CLEA RED BY ROUTINE

SUBORDINATE ROUTINES USED:
*’TOORIO"* = TIME OUT OR OUTPUT INTERRUPT OR INTPUT INTERRUPT
"'CLRAW"’ = CLEAR RQ] AND WAIT FOR RDI TO CLEAR
CALLING SEOUENCE

PC.DVRXQ

DVRXQ:

#QRX,FLAG

032737
001423

000004

007320

062737
112777

000004

007320

#ORX, FLAG

;IF NOT RX THEN EXIT
;ELSE QUE RX
sCLEAR FLAG FOR RX

010274
145416
145414

aséLé,moDS

26O _CHECK FOR IN OR OUT
;SET UP NEW MOD STATUS

045330

DVREX

#1464 .3BSELO
PC,TOORIO

145426

DVRXA- @SEL4

DVRCC.@SEL6

DVREX:

:E.CLRAH

sLOAD CC AND ADDR
;CLEAR AND WAIT
:RETURN TO CALLER

SEQ 163

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 25-27
DEVICE TRANSMIT AND RECEIVE SUBROUTINE
DEVICE TRANSMIT AND RECEIVE SUBROUTINE

"ETX' BIT
‘ERX'* BIT
OUTPUTS:
"DVIXA*’

‘pvrCcC’
'uTx.l

"DVRXA'’
*DVRCC"’
"QRX"*

ADDRESS OF TX MSG. COMPLETED
BYTE COUNT OF TX MSG. COMPLETED
SET IF TX COMPLETED
ADDRESS OF RX MSG. COMPLETED
BYTE COUNT OF RX MSG. COMPLETED
SET IF RX COMPLETED

SUBORDINATE ROUTINES USED:

“*TOORIO'' = TIME OUT OR OUTPUT INTERRUPT OR INTPUT INTXZRRUPT
“'CLRAW'' = CLEAR RQ] AND WAIT FOR RDI TO CLEAR
‘LGDVE'* ~ LOG DEVICE ERROR TO EVENT LOG
*OUTHDL’® = OUTPUT INTERRUPT HANDLER CODE
CALLING SEQUENCE:
PC.DVTXRX
JSR

032737

012737
032737

000010

007320

DVTXRX: BIT

#ATX FLAG

SANY TX TO QUE

000010
000140
045436
145346
007164
007166
045330

007320
145346

BIC

#QTX,FLAG

sCLEAR FLAG

JSR

PC,TOORIO

000074
000060

007364
007320

BEQ
MOV8

OVTRS

DVIRS

#140,9BSELO

sIF NOT GO WAIT FOR OUPUT
;GO CHECK FOR IN OR OUT

MOV

asEL&,mODS

*PUT IN NEW MOD STAT

JSR

PC,CLRAW

:CLEAR RQUI ANDWAIT

#60., TIMERS
NCRX+#CTX.FLAG

;SET TIMER FOR 60 SECS
IS IT TX OR RX COMP ALREADY?

MOV
MOV

MOV
TOINOT: BIT

DVIXA.@SEL4
DVTCC.@SEL6

Y 2 S

BYTE COUNT OF TRANSMIT MSG.
SET IF TRANSMIT REQUESTED
SET IF TRNASMIT EXPECTED
SET IF RECIEVE EXPECTED

T T T S

‘QrX"’ BI7

ADDRESS OF TRANSMIT MSG.

S S S

‘DVIXA'

INPUTS:

EXPECTING OUTPUT INTERRUPT;WHEN RX BACC OCCURS WHEN
EXPECTING TX,AND WHEN TX INT. OCCURS WHEN EXPECTING
RECIEVE.

60 SECONDS. AFTER REPORTING ERROR TIMER 1S RE STARTED
AND DEVICE WILL CONTINUE TO WAIT FOR INTERRUPT. CODE
ALSO REPORTS ERROR IF INPUT INTERRUPT OCCURS WHEN

DVTXRX-DEVICE TRANSMIT AND RECEIVE ROUTINE
THIS CODE QUES THE TRANSMIT BUFFER TO THE DEVICE
IF NEEDED. THE CODE THEN WAITS FOR A TX COMPLE,
RX COMPLETE OR BOTH. THE CODE REPORTS A TIME OUT
ERROR IF NO BACC OUTPUT INTERRUPT IS RECIEVED BEFORE

FUNCTIONAL DESCRIPTION:

+
+

.SBTTL

CZKMUAOQ KMS11-BL PDP=11 DCLY
30-MAR-82 09
CZKMUA.P1Y

SEQ 164

113

J 13

001071

DVTRé

;1S SO EXIT

005737

TIMERS
TOIN1
#DVEM& , TEMP2

:1S TIMER EXPIRED

e e T S W W

044702

ERRSOFT

e T

asSELO, fEmP3
9SEL2. TEMPL
PC LGDVE

12.oven4,ERR13

TRAP

.WORD

000001

007320

BIT
8EQ

021340
145200
145176
023172
000001
007216

007250
007252
007254

MOV
MOV
MOV
JSR

007320

#ININT FLAG
TOIN2

;1S IT INPUT INTERRUPT
*IF SO LOG ERROR

BREAK

8IC
INC

(=d=]
O
&SN
&H
o~

007320

000020

007320

#ININT,FLAG
ERRCNT

TOINOT

PC.,OUTHDL

#CTX+#CRX
. FLAG

DVTRS4:

;CLEAR BIT
.WORD
-WORD
-WORD

*ELSE HANDLE ourpur AND RETURN

TOINOT

:IS IT TX OR
R
SIF NOT co BACK AND TRY AGAIN

DVTRS

:IF uor rnv RX

DVTREA

SIF IT SHOULD GO TO &4A

#CTX FLAG

NETX,FLAG
ooven9 TEMP2

TSEL4, FEMP3
thLbotEnpa

JSR
T 14.DVEM9,ERR13
ERRSOF

SIS IT

*IF SO SHOULD IT BE
:ELSE LOG ERROR

:REPCRT ERROR

TRAP

.WORD
-WORD
-WORD

DVTR4B

ERR13

;IF NOT OUTPUT GO BACK AND
SCHECK TIMER AGAIN

02317

007250
007252
007254

CSERSOFT
13
DVEMS

aSEL2. TEMPS

PC,LGDVE

#OTINT,FLAG

007320

SRHENERRS »
NO
»H

RRRRRRRRRRRRRR

[VIRV IV [V IV IV AV AV AV AN 1% ViAW
b
b b b b b b b b b b l=1=]
~
S

045560
020060

TOIN2:

TRAP

#DVEMS, TEMP2

ERRSOFT 13,DVEMS ERR13

007320

C$BRK

aSELO, TEMP3

TOINOT

000002

TRAP

e e G S

TOINT:

DVTR3

ERR13

-— e e e e

B8R

:RETURN TO CHECK TIMER

-WORD
-WORD

CSERSOFT
12
DVEM4

:THEN CLEAR COMPL.FLAG

e e T T

CZKMUA.P11

30-MAR-82 09:15 PAGE 25-28
DEVICE TRANSMIT AND RECEIVE SUBROUTINE

MACY11 30A(1052)

e T T

30-MAR-82 09:13

e T T T T

CZKMUAO kMS11-BL PDP=11 DCLY

SEQ 165

CSERSOFT
14
DVEM9

ERR13

K 13

007320

021574
023172

007254

8IS
DVTR4B: BIC
DVTRS: BIT

BEQ
8IT
BNE

MOV
MOV
MOV

JSR

TSEL4,DVTXA
TSEL6.DVTCC

#QTX,FLAG
#CTX.FLAG
#CRX. FLAG

;AND SET TX COMPL FLAG
SELSE CLEAR FLAG
YIS IT RX T00?

RERX , FLAG

STEST 1S THIS SUPPOSED TO BE RX

DVTREX

DVTRSA

#DVEMB, TEMP2

RSEL4, TEMP3
RSEL6 TEHP4

C.LGDV

ERRSOFT 15.DVEH8.ERR13

~
mmm

MOV

DVTR4A: MoV

‘IF NOT THEN EXIT

“IF YES PROCESS AS SUCH
sELSE

:LOG ERROR
TRAP

-WORD

.WORD
-WORD

022646
000411

045306

000207

0466254
066256
000004
000040

007200
007202
007320
007320

DVTR5A: MOV
MOV

81S
DVTIRX1: BIC
ODVTREX: RTS

DVTRX1
RSEL& ,DVRXA
RSEL6,DVRCC

sAND EXIT

#CRX,FLAG
PC

:CLEAR FLAG FOR RX DONE
SAND EXIT

#QRX ,FLAG

CSERSOFT
15
DVEM8

ERR13

SR FUR SUR PR SR PR FRA MMM MMM MM MMM

007164
007166
007320
007320
007320

30-MAR-82 09:15 PAGE 25-29
DEVICE TRANSMIT AND RECEIVE SUBROUTINE

. — — SRR S

[=l=lolelelelelole)
-t S ONO
NS

065232

000100

MACY11 30A(1052)

—— ——

CZKHUAO KHS11-8L PDP- 11 DCLY
30-MAR-82 09:1

CZKMUA.P

SEC 166

L 13

CZKMUAO kMS11-BL PDP=11 DCLTY
30-MAR-82 09:13
CZKMUA.P11

MACY11 30A(1052)

30-MAR-82

09:15

SEQ 167

PAGE 25-30

DEVICE TRANSMIT AND RECEIVE SUBROUTINE

; DEVICE DEPENDENT SUBROUTINES
DEVICE INTERRUPT SERVICE ROUTINES

WWWWNWWN

NNVONNININ)

OO0

b b b b

ONONOOOO

RRRRRR
RRRRRR
vV
pauviiunaiualia

LSBTTL

052737

BGNSRV

DVINS

8IS

#ININT ,FLAG

ENDSRV

DVINS::

L10021:

000002

052737

000002

007320

BGNSRV

DVOUTS

8IS
ENDSRV

#OTINT,FLAG

RTI

DVOUTS::

L10022:

000002

RTI

: FUNCTIONAL DESCRIPTION:

H
H
H
:
H

CLRAW = CLEAR RQI AND WAIT FOR RDI TO GO AWAY
THIS CODE CLEARS THE INPUT REQEST BIT(RQI) SETS A
TIMER UP TO TIME SO(OCTAL) TICKS AND MAKES SURE
RDI CLEARS BEFORE TIMER EXPIRES. IF TIMER EXPIRERS
CODE REPORTS ERROR AND SETS UP TIMER AND WAITS AGAIN.

: SUBORDINATE ROUTINES USED:

‘U GDVE'* - LOG DEVICE ERROR (TIME OUT)

S8 BN
) =t

NNNN

CLRAW:

CLRA3Z:

CLRAY1:

MOV

B8IC
MoV

TST
8EQ

BREAK

VWA
VAVWVVAWIAA

NNNNNYNY

AW
(=]
oo
0ON zu
33 wuwwgww
(=% EERR

: CALLING SEQUENCE:
PC.CLRAVW
JSR
.

RRRERR RRRRRRRRR
v

N
N

2222288828
SSSS8 8 S 28
OO~ W NOWVEWN—=OO

BIT

BNE
CLRA2:

(SP) ,PCADD

#RQI,OSELO
#50, TIHER1

:1F TIMER EXPIRED ERROR

#RD] ,@SELOD

;1S RDI CLEAR

CLRA‘

lDVEHO TEMP2

MoV

8SEL2, TEMP4

INC

ERRCNT

JSR

;SET UP TIMER FOR SO(OCTAL) TICKS

TIHERl
CLRAZ2

RTS
MOV

MoV

:SAVE PC OF CALLING ROUTINE

IEngT GO CHECK TIMER
:RETURN TO CALLER

aSELO, TEMP3

PC,LGDVE

:L0G DEVEICE EVENT 0

TRAP

9029

045434

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

045424 104457
045426 000020
045430 021010
0456432 022570
000742

ERRSOFT 16,DVEMO,ERR9

CLRA3

;WHILE WAITING FOR RDI

sRESET TIMER AND CONTINUE

~~n

TRAP
.WORD
.WORD
.WORD

CSERSOFT
16
DVEMO
ERR9

e Y leatelenlialels)

045424

—

9028

30-MAR-82 09:15 PAGE 25-31
DEVICE INTERRUPT SERVICE ROUTINES

MACY11 30A(1052)

A
AN A
AN AL SR ST
SN SEN S, G
g
P
SN sy

CZKMUAO KMS11-BL PDP-11 DCLT
30-MAR-82 09:13
CZKMUA.PI

SEQ 168

N 13

.SBTTL

ggg%
9033
9034

9035

s FUNCTIONAL DESCRIPTION:

9039

TOORIO = TIME OUT OR INPUT INTERRUPT OR OUTPUT INTERRUPT
THIS ROUTINE SETS UP A TIMER FOR 100 (OCTAL) TICKS
THEN CHECKS FOR TIME OUT,OR INPUT INTERRUPT,OR OUTPUT

:
:

RESTARTS TIMER. IF INPUT INTERRUPT OCCURS RETURN TO CALLER
IF OUTPUT INTERRPUT OCCURS LOG IT AND CONTINUE WAITING FOR

9042
9043
9044

INPUT INTERRUPT.
:
:
,
: USE OF FLAGS:

gggg

: SUBORDINATE ROUTINES USED:

?’8212

9053
9054

: CALLING SEOQUENCE:
:
JSR
PC,TOORIO

9057 045436
9058 045442

011637
012737

007300
000100

007340

045456
045464
0645472
045500

012737
017737
017737
004737

021076
144516
144504

007250
007254
007252

9059
9060
9061
9062
9063
9064
9065

045450
045454

9067

045510

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

3823

045504

045510
045512
045514
045516
045520

005737
001022

005237

38;5

045524

032737

045532

001402

045534

004737

9073

9074
9075
9076
9077
9078
9079

045540
045546
045550
045556

023172
007216

TST
BNE

(SP) ,PCADD
#100, TIMER1
TIMER1
TOOR1

MoV
MoV
MOV
JSR

#DVEM1,TEMP2
@SEL2,TEMPS
@SELO,TEMP3
PC,LGDVE

TOOR3:

INC

104422

032737
001740
042737
000207

BR
TOOR1:

000002
045560

sSAVE ADDR. OF CALLING ROUTINE
:SET UP TIMER
;1S TIME EXPIRED
:1F NOT CONTINUE
sIF YES ERROR

ERRCNT

ERRSOFT 17,DVEM1,ERR9

000746

045522

007360

*OUTHDL'* = OUTPUT INTERRUPT HANDLER

TOOR.0: MOV
MoV

104457
000021
021076
022570

9070

(3)

"OTINT.' - SET BY OUTPUT INT ROUTINE
“ININT'' = SET BY INPUT INT. ROUTINE
CLEARED BY THIS ROUTINTE.

:
:
:

9045
9046
%g

007320

000001

007320

000001

007320

TOOR2:

CICD

INTERRUPT. IF TIME OUT OCCURS IT REPJURTS ERROR AND

) F P e P

9040
9041

:
:
:

. S ovm. S, PV P PR P P

9036
9037
9038

9066

30-MAR-82 09:15 PAGE 25-32
TIME OUT OR INPUT INT. OR OQUTPUT INT.
TIME OUT OR INPUT INT. OR OUTPUT INT.

A ANAAOANPAY NN YTM

MACY11 30A(1052)

TOORIO

BREAK

BIT

#OTINT,FLAG

:;gngTszf AN OUTPUT

BEQ

TOORZ2

sIF NOT GO TO 2

JSR

PC,OUTHDL

BIT
BEQ
8IC
RTS

#ININT ,FLAG
TOOR3
#ININT,FLAG
PC

;ELSE GO HANDL IT
:
21S THERE AN INPUT PENDING
+1IF NOT GO BACK TO TIMER (K.
<ELSE CLEAR THE INPUT PEND FLAG
cAND RETURN TO CALLER

TRAP
MORD
.WORD
.WORD

CSERSOFT
17
DVEMI
ERR9

TRAP

CSBRK

— e . S —— — —— —— — — f— . . ST SR S

CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11

SEQ 169

8 14

MACY11 30A(1052)

30-MAR-82

09:15

OUTPUT INTERRUPT HAMDLER

SBTTL

ggg%

14+

9084

: FUNCTIONAL DESCRIPTION:

9096

: USE OF FLAGS:

TO TSELS AND TSELO6. CLEAR OTINT FLAG AND RETURN TO CALLER.

:
H
:
:

9097
9098
9099
8}8?

'OTINT''
cTX
*'CRX"’

= SET BY OUPUT ROUTINE
CLEARED BY THIS ROUTINE
= SET IF TRANSMIT COMLETED
- SET IF RECIEVE COMPLETED

g}gz

; SUBORDINATE ROUTINES USED:

g}gg

9107

: CALLING SEQUENCE

9109

9108

9112

045560

011637

007300

9114
9115
9116
9117

045572
045600
045602
045610

032777
001023
012737
017737

000200

9118
9119
9120
9121

045564

045616
045624
045630
045634

(4) 045634
(5) 045636
(5) 045640
9{35 0645642

042737

017737
004737
(05237

000002

007320

021432
144372
144374
023172

007250
007252
007254

JSR

OUTHDL: MOV

(SP) ,PCADD

:SAVE ADDR. OF CALLING ROUTINE

#RDO,QSEL2
OUTH
, TEMP2
#DVEM6
@SEL2,TEMP3

;CLEAR PEND FLAG AND CHK FOR RDO
:IF RDO OK ...ELSE LOG ERK...

8IC

BIT
BNE
MOV
MOV

144406

#OTINT FLAG

9SELG6,TEMPS
MOV
PC,LGDVE
JSR
ERRCNT
INC
ERRSOFT 18,DVEM6,ERRY

007216

104457
000022
021432
022570

;60 LOG ERROR

TRAP
.WORD
.WORD
.WORD

CSERSOFT
18
DVEM6
ERR9

TRAP
.WORD

CSESCAPE
L10020-.

;EXIT TEST IF ERROR

9125

045644

045644
045646

104470
000614

9127
9128

045650
045656

032777
00100

0000017

000137

046154

9131

045664

017737

144326

9129
9130

PC,OUTHDL

3}%2

(3)
9{3&

*LGDVE'* -LOG DEVICE ERRORS TO EVENT LOG

—— —— . ——

9102

R Y

IF RX SET CRX BIT AND MOVE ADDR AND BYTE COUNT TO RSEL4
AND RSEL6. IF TX SET CTX BIT AND MOVE ADDR AND BYTE COUNT

e G U9 P

gggg

9092
9093

OQUTHDL = OQUTPUT INTERRUPT HANDLER
THIS ROUTINE IS CALLED WHEN AN OUTPUT INTERRUPT HAS SET
THE “*OTINT'' BIT IN THE ‘FLAG'' WORD. IT CHECKS FOR
AN RDO SIGNAL IF NO RDO THEN REPORT ILLEGAL INTERRUPT,
THEN IT CHECKS FOR BACC OUT IF NOT BACC OQUT REPORT THE
TYPE OF OUTPUT ERPOR. IF BACC OUT FIND IF RX OR TX

:
:
:
:
:
:
:
:

9086
9087
9088
9089
9090
9091

S S S SR SRR SR R (L P G g

9085

9113

PAGE 25-33

QUTPUT INTERRUPT HANDLER

CZKMUA.P11

30-MAR-82 09:13

CICEICICICTI TM

CZKMUAO KMS11-BL PDP=11 DCLT

SEQ 170

045660

144330

OUTH1:

ESCAPE

TST

BIT
GNE

#BACC,aSEL?
18

MOV

9SELG6, TEMPS

JMP

007254

1$:

OUTH?

;1S THE OUTPUI BACC
: BR IF NO

:1F SO GO 10 2
:ELSE LOG ERROR AND PRINT IT

C ié

MACY11 30A(1052)

CZKMUAQ kMS11-BL PDP=11 DCLT
30-MAR-82 09:13

CZKMUA.PT

SEQ 171

30-MAR-82 09:15 PAGE 25-34
OUTPUT INTERRUPT HANDLER

INC
JMP

NOBUF

#DVEM7, TEMP2

OUTH6

;IF NO BUFF INC COUNT AND EXIT
;ELSE GO T0 6

#RIT2,TEMPS

)

007212
046240

BIT
BEQ

005237
000137

0072564

Y £

000004

OUTHEX

022151
000010

007260
007256

2$:

022131
000020

007260
007254

4(S:

022117
000100

007260
007254

022104
000200

007260
007254

022064
000400

007260
007254

022046
001000

007260
007254

012737

022026

007260

032737
001403
012737

010000

007254

022227

007260

005237

007216

000004

144024

000020
144014

007320
066250

5%:

7%:

8s:

*IS THIS DATA CHECK

qurb.renpa

8I7
BEQ
MoV
8IT
BEQ
MOV
8Iv
BEQ

gg171.TEHP4

8IT
BEQ

agxrc.rénpa

;1S THIS DISCONNECT

8IT
BEQ

;BIT?.TEHPk

21S THIS DDCMP START RECVD

8lr
BEQ

chra.rénpa

;1S THIS NON~EXSISTENT MEMORY

8IT
BEQ

#BIT9,TEMPSL

MOV

MoV

#DATCKM,CONOTM
#TIMOM,CONOTM

;1S THIS TIMEOUT

#8173, TEMPS

:1S THIS DDCMP MAINT RECVD

ggxrA.rénpa

;1S THIS LOST DATA

4
#DDCMRM, CONOTM
#LOSDAM, CONOTM

MOV

é
#DISCOM,CONOTM

MOV

$
#DDCSRM, CONOTM

MoV

;LOAD ‘NULL STRING'' TO INIT CONOTM

BIT
BEQ

#NXMM, CONOTM

Mov

#PROEM, CONOTM

118:

BIT
BEQ
MOV

#BIT12,TEMPG
12$%
#CDGLM,CONOTM

128:

ERRCNT
INC
ERRSOFT 19.DVEM? ,ERRS

OUTHZ:

1$8:

007260
007254

PC.LGDVE

#LP0, CONOTM

:IS THIS PROCEDURE ERROR

:IS THIS CD GLITCHED
:BR IF NO
:IF SO SET UP MESSAGE

TRAP

OUTHEX

:CLEAR RDO AND RETURN TO CALLER

317

lRXB&T.iSELZ
OUTH

;1S THIS RX BACC OUT
*IF NOT THEN IT MUST BE TX.

8IS

MoV

#CTX,FLAG

aSELY, TSEL4

022162
000002

JSR

—

MoV

007260
007254

023172
014447
000001

ASEL2, TEMP3

MOV
MOV

— S

007250
007252

e S

1446262

—

021507

)

032737
001404

RRRRRR KRR KR R
NN O VAWVIAA
NSNN
NN
WO
\h\c\l’u‘\-fl
Ay
NN
~

W) =2
80
O~
OO
N
OnN

; IF NO BUFFER OUTPUT JUST COUNT THEM

.WORD
-WORD
-WORD

T
CSERSOF
19
DVEM?
ERRS

D 14

CZKHUA01§HS11-BL PDP-11 DCLT
30-MAR-82 09:13
CZKMUA.P
9184
9185

046200
0466206

017737
000414

9187

046210

052737

144012

30-MAR-82 09:15 PAGE 25-35
OUTPUT INTERRUPT HANDLER

MACY11 30A(1052)

MOV

@SEL6, TSELG

8IS

#CRX,FLAG

MoV

BIC

OUTHEX

aSELl RSELA

:SET RX COMPL

*THEN MOVE ro rsnp

:31115'91714 RSEL6 CLEAR Q svnc & SELECT BITS

9SEL6

RSELS

#RDO, ISEL2
Sc

9196

046256

000000

0
0
0

9198

046260

000207

SAND
SEL6 TO

; CLEAR

RETURN ro CALLER

SEQ 172

E 14

CZKMUAQ KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

30-MAR-82

SEQ 173

PAGE 25-36

OUTPUT INTERRUPT HANDLER

.EVEN

9214

9224

MACY11 30A(1052)

09:15

ENDTST

046262

046262
(3% 046262

104401

L10020:

TRAP

CSETST

F 14

CZKMUAQ KMS11-BL PDP=11 DCLY
30-MAR-82 09:13
CZKMUA.P1

MACY11 30A(1052)

30-MAR-82

09:15

SEQ 174

PAGE 25-37

HARDWARE PARAMETER CODING SECTION
.SBTTL

HARDWARE PARAMETER CODING SECTION

THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR TO BUILD P=-TABLES. THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT_ARE
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.

000020

LSHARD::

GPRML

000130
046326
000001

OPLX,0,1,YES

GPRMA

GPRMD

DPLX

LWORD

TELOLIM

WORD

VECTOR,4,0,300,770,YES

.WORD
.WORD
LWORD
LWORD

PRIOR,6,0,340,4,7,YES

.WORD

WORD

.WORD
LWORD
ENDHRD

L10023:

046326

;DEVICE INDEPENDENT QUESTIONS

046326

052506

046114

042040

(SRADR,2,0,160000,177776,YES

.WORD

046326

TSCODE

.WORD
.WORD
WORD

DEVICE DEPENDENT SECTION

.SBTTL

001031
046357
160000
177776

.WORD L100235-LSHARD/2

DEVICE INDEPENDENT SECTION

.SBTTL

066274
046276
046300

]

BGNHRD

NLIST

BEX

DPLX:

.ASCIZ

/FULL DUPLEX OPERATION : /

TSHILIM

TSCODE

VECTOR

TSLOLIM
TSHILIM

TSCODE

PRIOR

340
TSLOLIM
TSHILIM

G 14

CZKMUAO KMS11-BL PDP=-11 DCLT

CZKMUA.P11

30~MAR-82 09:13

MACY11 30A(1052)

9299
9300

9301
9302

PAGE 25-38

SEQ 175

DEVICE DEPENDENT SECTION

104
111
047111

053105
0521i6
0462526

041511
051105
051122

CSRADR: .ASCIZ
VECTOR: .ASCIZ
PRIOR: .ASCIZ
LIST

BEX
.EVEN

/DEVICE CSR ADDRESS : /
/INTERRUPT VECTOR ADDRESS: /
/INTERRUPT PRIORITY : /

046357
046405
046440

;DEVICE DEPENDENT QUESTION

g%gz
9295
9296
gggg

09:15

9284
9292

30-MAR-82

H 14

CZKMUAQ KMS11-BL PDP=11 DCLY

CZKMUA.P11

30~-MAR-82 09:13

MACY11 30A(1052)

30-MAR-82

09:15

SEQ 176

PAGE 26

DEVICE DEPENDENT SECTION

:.SBTTL SOFTWARE PARAMETER CODING SECTION

H 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

: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. _THE
: MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
UITH THE OPERATOR.

BGNSFT

ENDSFT

...l‘...'.és.....

t* TEMPORARY PATCH AREA” =" FOR’ DEBUG PURPOS

R RAR REERAERY]
[ N

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

9350

046466

000030

SPATCH:

.BLKW
LASTAD

(4)
(4)

9362

046546

046550

000000
000000

000001

LSLAST::
.END

ENDMOD

.EVEN
.WORD
.WORD

I 14

CZKMUAO KMS11-BL PDP=11 DCLTY
1
-82 09:13
CZKMUA.PT1

= 000026
ABO
= 000003
ACT
ACTATV 040570
ACTBCR 040374
1
ACTCHK
ACTCLB 037716
ACICLP 041116
ACTCLR 037352
ACTCOP 040214
1020
ACTCRC
ACTCSE 037506
ACTCST 037634
ACTDLL 0406
ACTOME 040142
ACTOMQ 0401
ACTDMS 040112
ACTOMX 040150
ACTECH 040714
0336
ACTEQO
ACTEXT 037436
ACTHLP 037372
ACTLIS 040626
ACTLLP 041126
ACTLPX 061144
1206
ACTLXX
ACTMEX 040562
ACTMET 040516
ACTMOP 041076
ACTMOS 041026
ACTMSO 040416
ACTMST 040424
ACTMS2 040434
ACTMSS 040444
ACTMSG 040454
ACTMS5
ACTMS6
ACTM2X
ACTNO
ACTNUF
ACTNUL
ACTNUM
ACTOPM
ACTPAS
ACTPRO
ACTPRT
ACTQFG
ACTREC
ACTREX
ACTRHL
ACTRLG
ACTRLP

0464
040502
0664
040704
037342
037350
040224
040316

ACTRNL
ACTRPS
ACTRUN
ACTSEX

024266
041
037462
040526

ACTRNF

041034
037446
0641040
0620
4334
024270
024344
041136

024260

L4454
44134
7656
7674
7636
7735
7670
7634
7644
7665
7639
7640
7660
7676
7677
7675
77874
7664
7648
7680
7638
7659
7671
7936
7909
7817
7839
7668
7679
7649
7650
7651
7652
7653
7654
7655
7870
7663
7673
7633
7645
7646
7657
7666
7678
7912
7658
6090
6089
6091
7672
6095
6088
7667
7637
7681

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27
CROSS REFERENCE TABLE == USER SYMBOLS
73
7490
78694

7869

7945

8184

77864

79454
79504
7860
7847

7863
78544

78914

7881

7884

7887

7918

7921

79254

78654

SEQ 177

J 14

CZKMUAD KMS11-BL PDP-11 DCLT

CZKMUA.P11
ACTSHO

ACTSHW
ACTSTE

30-MAR-82 09:13

037362

037756
040156

7635

7722
7641

ACTSTS 041012
ACTSTT 040166
ACTSTX 040174
ACTSWE 024360
ACTSWE 024440
ACTSWO 024504
ACTSZE 040204
ACTTAL 040656
ACTTLP 041106
ACTTRA 040646
026222
ADDCC
026316
ADDCT
ADR
= 000020 G
041600
ALCK
041712
ALCKY
041756
ALCK2
ALCK2A 042176
042222
ALCKS
ALCK3A 042314
ALCK38 042326
ALCK3C 042322
042350
ALCKG
ALCK4A 042356
ALCK4B 042370
041642
ALCKS

7647
7662
7096
6092
6093
6096
7643
7662
7669
7661
63808
6382
43964
(873
8149
8159
8199
8171
8216
8223
8220
8210
8228
8233
81484

ASSEMB= 000010
ATVMOD= 000027
BACC = 000001

4149
4507#
45898

ALLTR

041642

007265
BAD
BADCHR= 000051

BASE

BASM1
BASMIA
BASM2
BASMZ

BDATA

BEND

BITO

017370

016065
016032
016056
016047

007274

007272

= 000001 G

BIT00 = 000001 G
BITO1 = 000002 G
BITO2 = 000004 G
BITO3 = 000010 G
BITO4 = 000020 G
BITOS = 000040 G
BIT0S = 000100 G
BITO07 = 000200 G
BITO8 = 000400 G
BITO9 = 001000 G
BIT1 = 000002 G
BIT10 = 002000 G
BIT11 = 004000 G

BIT12 = 010000 G

8022

48384
45258

5,894

56614
54370
54400
54394

4846

48414

43968

43964
43964
43964
43964
43964
43964
43964
43964
43964
43964
43968
43968
43964

«3964

MACY11 30A(1052)

30-MAR-82

09:15

SEQ 178

PAGE 27-1

CROSS REFERENCE TABLE =- USER SYMBOLS

76914

7741
77930
79140
77964
1797H
61194
61304
61394
78004
78894
79374
78864
7572
6394

8093
81584
81484
82044
8206
82224

B2254
B8224L#
82294
82324
82354
8224

T760M

7606

8202
8234
82094
8231

8098

81474

6126

6132

6134

6151

6153

6125%

6134*

6153+

6154*

6181

4561

4589

9146

8046

8071

5038
9127
5659
5152

8307+

6122

6340

6346
6344

61264+

6122%
4433

4436
4581
4580
9171

7772

6123+

9149
4582

6132+

6133«

6140+

6141

8672

6151«

6152«

6189

K 14

CZKMUAO KMS11-BL PDP-11 DCLT

CZKMUA.P

30~-MAR-82 09:13

MACY11 30A(1052)

L3964

8IT15 = 100000 G

L3964

4578

L3964
L3964
43964
43964
43964
43964

4437
4438
4588
4563
4583
4565

BIT2
BIT3

BIT4
BITS
BIT6
8117
BIT8
BIT9

BLDBEX

4 G
=
= 000010 G

= 000020 G
= 000040 G
= 000100 G
= 000200 G
= 000400 G
= 001000 G

BLDBUF

026430

026320

026330
BLDB1
026372
BLDB2
026410
BLDB3
= 000400 G
BOE

BSELO
BSEL1

BSELZ

BSEL3

BSEL4
BSELS
BSEL6

BSEL7

012202
012204

43968

43964
L3964

6437

64194

9190

4435
4436

4559
4560

4587
9152

52214
52224
52244

52194

52254

7607

7756

8670+

8683+

8739+

8793+«

8877+

7054+

7055«

7058+

7059+

7062

7063«

4788

4789

6381

6388

6508

7554

7583

6528

6532«

7477+«

7485

7605

2610

7734+

7547

7688

5082

5155

5028

5030
5101
5151

5117
5158

5039

5041

5119
5160

5122
5165

5129
5180

5131
5182

5133
5184

5135
5186

5019

5058

5060

5196

6061

6063

6065

6067

6072

61964

BUFLIM= 001000

4787

CABLE = 00000
CBLLOP= 000045

44204
45214

022227
COGLM
CHECK = 000003

55954
44874

BYTBIT

007224

CCURAD

007162

CLEAR = 000001
CLIACT 037162
CLIALN= 000007
CLIALP= 000006
CLIBCR 012546
CLIBOL 012441

CLIBIF= 000003

CLIBR = 000002

CLIBRX 012421
CLIDEC= 000011
CLIERM 012324
CLIERR= 000000

CLIEXI= 000001

CLINBG 012377
CLINPS 012503
CLINUF 012354
CLINUM= 000005

54004

4586

7573

7481

6179
LL67H

015035

9155
4562
9158
4584
9164
9167

7556

48184

6341

47984

6520%

5181

7051«

7585

7781

8649+

7785+

44854
7517
44784
44778
53184
53164

9173
5086
5024
76254
5150
5072
7835
7949

44738
5067
g}g;

5021

5069
gagg

5023

5025

53154
44804
53124
44714

6758
5164
6042
5031

5190
7522
5152

6079

6074

6078

6080

44744

44724

53144
53174
53134
L4764

9134

7488

64414

BTHEAD 025006
BTUP = 002000

BUFEX

9190

9161

7050

012212
012214
012216

PAGE 27-2

4585

52164

52184

012220

4579

6439
6440

012206

012210

4564

64240
66324
64354
43964

52154

09:15

CROSS REFERENCE TABLE == USER SYMBOLS

8IT13 = 020000 G

BIT14 = 040000 G

30-MAR-82

SEQ 179

5013

6796
7905
6047

5079
5141

5015

7526

5087
5143

5017

5099
5148

7995

5043

7749

7991

5045

5047

5050

5052

L 14

48804

5049
5128

5051
5130

5057
5132

5059
5134

5066
5136

5068
5138

5880
5862

5859+

58574
58124
48824

7096
6993
6988+

045350
045372
045342

90164
9017
90154

9020
90234
9029

CMPPTR 007154

47954

6514r

CLKINT
CLKSET
CLKVEC

022766 G
022742
007344

CLRAY
CLRA2
CLRA3

CLRAW

CMDBUF
CMPBUF

045330

003060
005400

8679

42114
47894

7604

8696

6034
6506%

7608«

042644
042370
042530
042534
042422
042632
042636

8273
8221
83004
83034
82784
83194
8316

83424
82724
8314

CMPTOT 007156

47968

6523+

CMPSEX
CMPSR
CMPS1
CMPS2
CMPS3
CMPSS
CMPS5A

CMPS6
CMPS7

042600
042516

(M0 = NI
(MSGT = G e
CMSG2 = 000022
CMSG3 = 000023
CMSG4 = 000024
CMSG5 = 000025
CMSG6 = 000026

CONOTM 007260
CONTIN

007262

83204
8305
82984

45004
45014
45024
45034
45044
45054
45064

5130
5128
5132
5134
5138
5136
5140

9163

48364

CPTR

007234

48254

CPTRR

007232

48244

CR
CRC_
CRCB

020000
= 000040
= 000020

55004
45164
44374

CRX

= 000040

8042+

W
W
W

5185

6062

6064

6066

6068

6071

6073

6075

5880+

6990

7000«

7001+

7002«

7010r

7309«

7446+

90134

5098
5157

5040

5042

5100
5159

5116
5179

7595«

7603+

5680

9166*

8695+

6422

8068

8018+

8285

8288+

44634

8885

5989

7917

5038

5086
5142

5036

5084
5140

5029

699+
5877
6999
7008+

7003«
5996

7010
701

7446
7018

7096

8743

8798

8882

6035
6520

7514
7477

7515
7733

6515+

7715«

6528+

7716«

759%+

6529+

6530%

6534v
7731«

7732

7970«

7472«

7484

7971«

7972

8275

7717

7730

7471%

8322

8301
8293

48354

5027

5183

7516
7514
6034
7009+

5046
5121

5014

YED

48844
48834

007340

6059

5024

THD THD

CLKEN
CLKHZ

007350
007346

CLKCSR

5149

5022

THD

010502
012310
012316
007342

5072

5020

SR YRD

CLITRE
cLISPM
CLISRP
CLKBR

5065

5018

SED

5181

5008¢
53104
S3t114
48814

5056

5016

GED

5044
5118

5035

44814

50N

7961
60834
60594
7810

CLISTR= 000012

754

6077

CLISPA= 000004

53204
6037
6036
53194

5076

012644
024222
024024
012613

5074

. G

CLIPW
CLIRAC
CLIRT
CLISEQ

LL79%

—

cLIOCT= 000010

83124

6526

6535+

7489«

7589+

7596

7609«

7719

7723«

7959

7979

5694

B434x

B4S1+

8459+

B464r

9145+

9148+

9151+

9154+

9157+«

9160+

8045+

7480%
8160
B069+

8165«

7484+
8096+

7570+
8150

7574
8155«

7604
8232
8183+

8274«

7608
8188

7732«
8279
8196+«

7745+
8283+
8208+

7993+
8562+
8229

8021«
8275+

8916

8933

8947

9187

9169+

8742

6626%

8094+
8520+

9173«

8177

8225+

———

CZKMUAO KMS11-BL PDP-11 DCLT
30-MAR-82 09:13
CZKMUA.PT

SEQ 180

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-3
CROSS REFERENCE TABLE -= USER SYMBOLS

M 14

4490
44914
9272

5057
5059
92954

€IS
= 000004
CISFM
022243

45594
55964

4906

CSEXIT= 000032

CSGETB= 000026
CSGETW= 000027

CSGMAN= 000043

CSGPHR= 000042
C$GPLO= 000030
CSGPRI= 000040
CSINIT= 000011
CSINLP= 000020
CSMANI= 00005
CSMEM = 000031

CSMS5 = 000023

41494
41490
41498
41498
41498
41498
41490

6036

7011

7514

8383

8506

5668

5682

5687

P
P
TP
W
N

7031

D TED THD
ER
CER
SRR
G

7270
7502

6758
7599

6796
7695

41494

~~
-

7546

7506

6386
7585

CSPNTX= 000015

5695

7320

9224

5663

5691

7114

9125

5659

CSPNTS= 000016

9176

8661

4149

4149%

9121

8318

8295

S664

CSPNTF= 000017

CSPNTB= 000014

9067

8425

8407

5660

41490

9028

8426

7373
4227

4149%

CSOPEN= 000034

8941

8309

7087

4149%

8926

9070

6973

4149#
41490

64h1e
6391

9018

41494

8909

8397+

6997

41494
41494
41494
41494

8895

8391+

6991
7337

4149%

7992
7326+

7991+

4149
4149
4149

CSESCA= 000010
CSESEG= 000005
CSESUB= 000003
CSETST= 000001

CSERSO= 000057

7750%
7813+

7854+

7410
7290

8899

4149
41494
4149%
4149
4149#
4149%
41494
41494

7610
7752«

7850«

6426
8396+
6380
8652

€$D0DU= 000051
CSDRPT= 000024
C$DU = 000053
C$EDIT= 000003
CSERDF= 000055
CSERMR= 000056
CSERRO= 000060
CSERSF= 000054

7605+
7487%

9182

6431
8423
6390%

. G

CSDCLN= 000044

7576
7475%

8932

4149%

41494
4149K

7571%
6441

8918

6429
8422
€387

—

CSCLP1= 000006
CSCVEC= 000036

7485«
6430

8916

——

CSCLCK= 000062
CSCLEA= 000012
C$CLOS= 000035

7479+
6425

8885

THD

4149#
4149
41490

7849%

772+

6538«

C$BSEG= 000004
C$8SUB= 000002
CSCEFG= 000045

C$BRK = 000022

48268
8390+
L8234

7611+

6533+

GEn

CSAU_ = 000052
CSAUTO= 000061

41494
4149

CURADD 007236
CURCC 007230

7587

6532

GED

Li6ow

7582

6530

= 000020

CTX

7464t

6522+

—

47974

IIIIIY

CSHEXP= 000006
CSHTRN= 000007
CSRADR 046357

CTOTCC 007160

30-MAR=82

CROSS REFERENCE TABLE == USER SYMBOLS

MACY11 30A(1052)

—

30-MAR-82 09:13

SEQ 181

PAGE 27-4

—

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

09:15

5989

6208

5667

5680

5681

5685

5686

5690

569

5992

6008

6042

6047

6103

8143

8179

6188

6340

6344

6346

6226

6231

6237

624

645

6263

6er1

6278

6291

6306

6578

7014
7769

7084
7810

7085
7835

7086
7905

7455
7949

7495
7961

7522
8403

7526
8475

7556
8556

7565
8574

N 14

41494
41494

CSRESE= 000033
CSREVI= 000003
CSRFLA= 000021
CSRPT = 000025
C$SEFG= 000046
CSSPRI= 000041
CSSVEC= 000037

L1494
L1498
L1494
41494
L1494

DAM
DATAHD
DATALD

020233
035366
035437

DATCKB= 000002

DATCKM 022162
= 000001
pco
= 000014
DCK_

DCLFLG

007302

DEV1
DEV2

010472
010474

DDCMRM 022131
DDCSRM 022064
= 000022
ODE
= 000010
DER

DEV3

DEV4

010476

010500

ODFPTBL 002130 G
DIAGMC= 000000
DISCOM 022104
= 000020
DLE
042724
OLL

021752
DLLAB
014642
DLLCM
043102
DLLEA
043360
DLLE1
043226
DLLE2
043440
DLLE3S
3430
DLLE4
43542
DLLES
DLLESA 043460
DLLESB 043514
043312
DLLE6
043260
DLLE?
043400
DLLES
DLLGA = 000400
DLLIND 010362
DLLMOD= 000033
002647
DLLM1
DLLMIC 002172
DLLMIE 002654
002654
DLLM2
DLLM2C 002174
DLLM2E 003060
DLLPRI 043056
012734
pLLal

6980

7310
7108

7109

4947
7085
7086

55204
72654
72664

8041

8180

8227

6272

6248+
6249

6250
6251+

6567
6570

7696
7497«

7773«
7774¢

6586

6590

6594

7499+

7776+

44340

6586

7911

7957

48494

6970

6972%

7545«

6242%
6243%

6245
6245

6253

6582

55904
55874
44528
G478

49878
49888

49894

49904

42724
4149
55884
44514
4874

55824
53974
84064
8430
84284
8458
845
8447
8463
8470
8432
84354
8450
44664
49434
45114
4612
46124
4612
4613
46134
4613
84024
53214

6906

7112
7096

55924
45614
44498

6983

4227

4169
41494

41694

6978

9148
4908
5954

9154
9163
5962
5940

6252%

9160
5958
83834
8407
8403
8439
84494
8448
84624
84764
84674
8472
84414
8452
84534
8398
B473
5046
46704
8391
46754
L6774
8397
47040

8383

6577

7498«

7775%

8389

8501

8555

A YL UL UL

CSTPRI= 000013

7006

6976

8437

TER SR

CSREFG= 000047

41694

PAGE 27-5

TVAOAAANAOAOOAMADONN

C$Q10 = 000377
CSRDBU= 000007

09:15

L TR TR TR TR TA M M TITVTIIVININT

30-MAR-82 09:13

30-MAR-82

CROSS REFERENCE TABLE == USER SYMBOLS

. —In. GIn. SEL. A S

CZKMUA.P11

MACY11 30A(1052)

84754

8460

8465

8429

8445

8390

8396
8446

e — . —— —— —— — —

CZKMUAO KMS11-BL PDP-11 DCLT

SEQ 182

815

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13

MACY11 30A(1052)

30-MAR=82

DLM
DLTXRX

020225
043116

4945
8392

55184
8399

84134

DMCEND
DMCIND

003300
003250

47480
47368

6121
6119

6131
6130

6150
6148

DMPS

= 000.52

45268

5074

7539

7782

020251

DLVM

020242
DMCM
DMC002 02042
DMC003 020363
DMC004 020420
DMC00S 020461
DMC00S 020514
DMC007 020551
DMCO10 020606
DMCO11 020641
DMC012 020663
DMC013 020705
DMC377 020744
025057
DMFMT
DMPE = 000053
020255
DMPM
DMPQ = 000054
DMSGAD 002176
DMSGCT 002150
DMUNKN 020322
020316
DMVM
020246
DNM
= 000004
DOW
046326
DPLX
020217
DPM
020230
DM
000010
=
DSR_
020261
DTEM
020222
DUM
026220
DUMEX
DUMPSR 02606,
026155
DUMI
076200
DUM2
026114
DUM3
026070
DUM&
020236
DUPM
021010
DVEMO
021076
DVEM]
021162
DVEM3
021246
DVEMA
021340
DVEMS
021432
DVEMS
021507
DVEM?
021574
DVEM8
021663
DVEMO
VI _ = 000012
DVINEX 044472

DVINIT
DVINS
DVINI
DVINZ

044174
045310 G
044314
044232

4957

4949
4738
4739
4740
4741
4742
4743
4744
4745
4748
4747
4748
6188
45274
4952
45284

46174
46024
4736
4960
4950
44144
9255
4943
4946
45604
4953
4944
6348
63384
6342
6345
63414
63394
4948
55634
55654
55674
55694
55714
55734
55754
55784
5580
44488
86984

7989
7108
8651
86504

09:15

PAGE 27-6

CROSS REFERENCE TABLE -- USER SYMBOLS

5524n

55224
55414
53420
55434
55448
55458
534K
53474
55484
55490
53504
53514
81974
5076
55254
5078
6433
6432
4737
55334
55234
7883
92834
SS164
55194
4907
55264
55174
63544
7541
63460
63470
6352
635
55214
9003
9062
8656
8890
8903
9116
9141
8937
8922
594

86414
89754
BLASN
8654

SS540N

8686

9028
9067
8661
8895
8909
9121
9176
8941
8926

8663

SE 183

c15

CZKMUAQ KMS11-BL PDP=-11 DCLT

CZKMUA.P11
DVIN3
DVING

DVINS
DVIN?
DVINE
DVM
DVMODS
DVOUTS

DVRCC

DVRCT

DVREX

30-MAR-82 09:13

044402
044460
044444
044350
044406
020265
044474
045320 G

007202

007204

8677
8689
8687
86744
86834
4954
5970
7109

48084

4809#

MACY11 30A(1052)
86794
8692

86914

55274
87394
89894

86954

8173

8617+«

8454

8559+

8570

8572«

8573«

8797

8152«

8172

8415«

8453

8557«

8569

8572

8796

8944+

B164r

8212

8424

B442

8446

8517«

8525

8881

8930«

8211

8422+

8441

8514

8524

8880

8929+

7907

8175

8154+

8019+

8790

87994

044530

8156

8419

8095+«

8182+

DVRXA

007200

DVICC

007166

OVTIREX
DVTRX1
DVTR3
DVIRG
DVTR4A
DVTR4B
DVIRS
DVIRSA

045306
045300
044666
045066
045146
045170
045176
045256

8934
8943
8875
8886
8921
8928
8919
8936

89484
89474
88834
89184
89294
89324
89334
8944H

044610

8168

8428

8522

6590

7891

7902

8309

8318

DVRXQ

OVICT

DVIXA

DVIXRX

007170

007164

DIM
ECHO

020270
= 000037

EDABO
EDDCK
EDDDE
EDDER
EDDLE

016021
015602
0157
015565
015660

EDRXC
EDRXQ

015537
015512

ECHOB = 000004

EDDVI
EDEOP
EDMOS

015632
015750
015764

015463
EDTXC
015437
EDTXQ
015362
EFM11
015265
EFM2
EF.CON= 000036 G
EF .NEW= 000035 G
EF .PWR= 000034 G
EF .RES= 000037 G
EF.STA= 000040 G
002221
EMSGO
002222
EMSG1
002223
EMSG2
002224
EMSG3
002324
EMSG4
002416
EMSGS
002517
EMSG6
002647
EMSG8

ENADD

007222

48014

48024

48004
4955
45154

44354
4939
4934
4937
4932
4936

4933
4938
54304

4931
4930

4929
4928
54154
564134
43964
43964
43964
43964
43964
4603
4604
4605
4606
4607
4608
4609
4611

8174

SEQ 184

PAGE 27-7

CROSS REFERENCE TABLE == USER SYMBOLS

044606

48074

30-MAR-82

09:15

8043+

8162+«

55284
5100

54314
54254
56284
54244
54274

54264
546294

8564

8067+

8295

54214
54204
5667
5663
6980
6983

6347

8093«

8214+

8204+

8219

8205

8222

8276

8321«

8896

54234
54224

6978
6976
46304
46324
46340
46364
46424
464L7H
46514
46654

87884

8186+

7786+

8567

88744

8945+

D 15

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-8
CROSS REFERENCE TABLE == USER SYMBOLS
6223

ENDEVT 025742
031314
ENDIT
=
000017
ENDQO
= 000024
EOP
ERRCNT 007216

62824

8294+

7318

8308+

8317+

8346

8660+

8935
8531

8920

8894+

8908+

9027+

8201«
8445+

8207«
8449

CZKMUAO KMS11-BL PDP=11 DCLTY
30~-MAR-82 09:13
CZKMUA.P11

SEQ 185

ERR1

o
~

b
b
b

S £ gWNN
8R8

6268+
6269+

6271
6271

6275+
6276%

6278
6278

7019

6205

7020+

6262+
7543

6270+

627 1

6277%

6278

8691
8020«
8226+

8044~
8388+

8070+
8398+

8097+
8414+

8200+
8444

8674

6206

b anb

ONONO
oo

SNBSS
N~
O OOV =t =2
N

FHDPLX
FIRMLD
FLAG

6263
6263

6245

g?&d&&

EVTLOG
EVILST
EVTMIN
EVIPIR
EVTSEC
EVTTCK
EVITMP
EXIT =
EXITCL
EXITIT
ESEND =
ESLOAD=
FACSIM

b cnd b wd and cud

EVTFO
EVTF1
EVTF2
EVTF3
EVIF3C
EVIF3D
EVTF4
EVTF4A
EVTF4B
EVIFSA

6260*
6261«
7022

EVMOHD
EVMOST
EVMRI
EVMRTS
EVMSQD
EVMTM
EVTADD
EVIBCT
EVTEND

b and

EVMCTS
EVMDCD
EVMOSR
EVMOCG

838 8
844 4

=
=
=

(=lelalelolelelelolelelalela
ol
purd

ERX
ETX
EVL

8941

22282288

ERR10
ERR13
ERR14
ERR2
ERR8
ERR9

E 15

MACY11 30A(1052)

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

8531+
8920

8561%
8331x

8669+
9o

41498
41494

7383
7281

7410
7290

FSAU = 000015
FSAUTO= 000020

FSBGN = 000040
FSCLEA= 000007
FSOU_ = 000016

FSEND = 000041

FSHARD= 000004
= 000013
FSW
FSINIT= 000006

FSJW = 000050
FSMOD = 000000

FSMSG = 000011

FSPROT= 000021

{1498
€944

8989
41498
4149%

7116

9125
7299
7346

4170

9125
L1498

9226
9261

7270

4170

4149%

7290

5658
7281

5679

5684

5689

5693

5697

585

7299

9276
9276

7320

9360

7116

5660

8580

4149%

6034

7514

8383

9272

9273

9255
603

GSOFFS= 000400
GSOF SI= 000376

4149
4149

GSPRMA= 000001

GSPRMD= 00002

GSPRML= 000000
GSRADA= 000140
GSRADB= 0

41498

4149%

41498
41498
41498

7550

7557

7566

7580

9272
9272

9273
9273

9274
9274

6052

8533
79554

= 000000

7548

7032
6048
8306+

8352
7538

GSNO_

7542

7533

79914
7508

74480
41498
41494
41494
41494
41490
41490

7535

7530

8404

GTXRXB 035576
GSCNTO= 000200
GSDELM= 000372
GSDISP= 000003
GSEXCP= 000400
GSHILI= 000002
GSLOLI= 000001

5691

7527

8353

041404
041214

5689

7503

74964

GTRX2
GTR9

5687

8991

7458

79820

5684

8989

036104

041350

5682

8977

GTRAS

GTREX

5679

8975

70274
043
5659

7614

7962

5695

5697

74574

603¢
6036

6036

8409

8506

7514
7514

8383
8383

8506
8506

9255
9255

7011

7514

8383

8506

9274

7514

8506

7011
7011

7114

8991

5668

6985
6030
48378
76490
7452

8975

8977

5666

030620
023632
007264
035576
035640

6915

7546

6906

5664

GETPRM
GETRCL
GOOD
GIRA2
GTRAS

6874

5881

s662

9224

7506

7546

7436

8918
9112

7506

5691

7506

036170

739

]

8916
9078+

7436

5687

7394

GETCL

74628

7383

7357

5881

7600

5682

7357

7320

5857

7586

7320

7346

7410

6906

75128

5662

5666

739

5874

7503

8912
9076

7303

6921

41498
41498
41498

8907+
9071

7357

6915

41494

8900
8990«

5668

L1498

5658

8885
8976+

7337

9360

4149

8876+
8947+

5664

4170

5697

8874
8946+

5660

4149%

8792«
8935

9241

4318
7270

FSSUB = 000002
FSSW = 000014
FSTEST= 000001

035646

PAGE 27-9

8789
8933

9226
7337
7373

4272
6944

6190
41498
41498
41490

GTRAL

09:15

9360

41498
41498

FSPWR = 000017
FSRPT = 000012
3
FSSEG =
FSSOFT= 000005

FSSRV = 000010

30-MAR-82

CROSS REFERENCE TABLE == USER SYMBOLS

30-MAR-82 09:13

F 15

30-MAR-82

41494

7011
9255
8383

9272

9273

9274

4149%

7011

9255

9272

9273

9274

21954
5607
738

41640
5619
7359

4166
S642
7385

4209
5708
739%

4236
6876
623

4256
6891
7430

4274
6899
7438

22000

2209

4229

4292

4322

4541

4568

47248
5323
L7160
53224
4716
4717
4718
4719
4720
4721
4722
4723
43964
43964
43964
45884
43964

7696
6103

7695

69754
7068+
7065+

6130%
6150+
8976

6148+
6184
9076

6149+
6186
9078

6180

6971
52304
52284
43964
43964
41494
41494

6120
6131+
8907
7108
7108

7109

74104
72904
7320
73734

73374

7114
93604

T270X

56628

S6648

S6668

56684

89914

GSRADD= 000040
GSRADL= 000120
GSRADO= 000020
GSXFER= 000004

4149%
41498

HALFDB= 002090

45824

HELP

000000

HELPDC= 000000
HLP

= 000005

HLPEND 003230
HLPF
013037
HLPTAB 003210
HLPO
012761
HLP1
013044
HLP2
013057
HLP3
013174
013261
HLP3A
HLP4
013306
HLP4A
013365
013443
HLPS
013533
HLP&
HOE
= 100000 6
= 010000 G
IBE
= 000040 6
IDU
= 000100
IE0
= 020000 6
IER

INDEX
007266
INDEXE 007270
ININT = 000001
INIT1
INTPRI
INVEC

030276
012226
012222

= 000100 G
ISR
IXE
= 004000 G
ISAU_ = 000041
ISAUTO= 000041

41494

7100
4489#

48394
48408
4458#

CROSS REFERENCE TABLE -- USER SYMBOLS

8688

8586
5012
7694

8693

8605
S014

8707
7532

8749
7698

8804

6119+
£121+
3900

73834
72818

ISPROT= 000040
ISPTAB= 000041
ISPWR = C00041
ISRPT = 000041
ISSEG = 000041

L1490
41494
41494
41498
41498

69154

68748
7436

69064

ISSRV = 000C41

4149#

58574

SBB1#

89754

89774

89894

41498

74364

7506

7546

9125

92244

ISSETU= 000041

I1SSUB = 000041

ISTST = 000041

?},’6%

41494

41498

5199

4365
6946
9218
5246

4381
7252
9243
5278

5233
7283
9303

5272
7301
9325

5293
7322
9338

8964

8979

9258

9285

5553

5670

7036

S67TON

56828

56844

56874

56894

56914

8674

72998
73468
92764
6944R
41708

1$MSG = 000041

8953

4351
6923
9202

7495
5324n
53254
53204
53304
53314
5334
5333
5334k

41498
41498
92414
L1498
41498

ISCLN = 000041
10U = 000041
ISHRD = 000041
ISINIT= 000041
ISMOD = 000041

SEQ 187

PAGE 27-10

MACY11 30A(1052)

CZKMUAD KMST1=BL PDP=11 DCLT

CZKMUA.P11 ~ 30-MAR-82 09:13

GSYES = 000010

09:15

ggggz

7436

56608

G 15
CZKMUAO kMS11-BL PDP=11
30-MAR-82 0
CZKMUA.P11

7394

7688+

115+

691+

6969+
7698+

7311
7700«

7529
7702«

7532
7706+

7534
7721

7536
7740

8893

8906

8925

8940

9026

9065

9119

9144

5991«

7986+

5967

5978#

6110+

59694

5963

7031

9145

AOOOHOOHOOOHOO

KLM
020313
KRUN_ = 100000
LCLKEN= 000100
LDOFIRM 031032
LGDVE
023172
= 000006
LIS
043764
LISCK
LISCKA 044012
LISMOD= 000032
014565
LISP
LMOLOP= 000046
007210
LNCNT
= 040000
LOE
LOGCMD 023312
LOGCML 023274
LOGCMP 023256
LOGOVI 023210
LOGEOP 023330
023602
LOGEX
LOGRXC 023162
LOGRXQ@ 023144
023346
LOGS1
023574
LOGS2
023400
LOGS3
023454
LOGS4
023500
LOGSS
LOGTXC 023126
LoGTXQ 023110
LOGUNT 007276
003350
LOOPS
LOSDAM 022117
10
=
Lor
014447
LPO
014450
LPOO
014457
LP1
014470
LP2
014476
LP3
014511
LP4
LULOOP= 004
002110
LSACP
002036
LSAPT
035562
LSAU
002070
LSAUT
LSAUTO 035466
002106
LSCCP
LSCLEA 035470
002032
L$CO
LSDEPO 002011
LSDESC 012252
LSDESP 002076

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-11
CROSS REFERENCE TABLE == USER SYMBOLS
7357

J* IMP = 000167
020303
KDPM
KDZM
020307
KEYWD1 003202

SEQ 188

8678

7539
7782+

7543
7793 *

H 15

CZKMUAQ KMS11-BL PDP=11 DCLT
30~-MAR-82 09:13
CZKMUA.PI

LSDEVP
LSDISP
LSOLY
LSDTP
LSDTYP
LSDU
LSDUT
LSOVTY
LSEF
LSENVI
LSETP
LSEXP1
LSEXP4
LSEXPS
LSHARD
LSHIME
LSHPCP
LSHPTP
LS
LSICP
LSINIT
LSLADP
LSLAST
LSLOAD
LSLUN
LSMREV
LSNAME
LSPRIO
LSPROT
LSPRT
LSREPP
LSREV
LSRPT

002060 G
002124 6
002116 G
002040 G
002034 G
035554 G
002072 G
012230 G
002052 G
002044 G
002102 G
002046 G
002064 G
002066 G
046266 G
002120 G
002016 G
002022 G
002130 G
002104 G
030256 G
002026 G
046552 G
002100 G
002074 G
002050 G
002000 G
002042 G
030250 G
002112 6
002062 G
002010 G
030242 G
G
G
6
G
6

L10003
L10004
L10005
L10006
L10007
L10010
L10011
L10013
L10014

022504
022566
022644
022676
0227
023106
030246
035464
0354

L10017
L10020

035566
046262

L10015
L10016

035552
035560

L2274

4227
42274
42274
42%70
4227
42274
4227
42274
42278
42274
42274
42274
42278

4227
42274

42274
42274
4227
42274
6227
42274
4227

42274
42274
L2278
42274
42274
4257
42274
42274
42274
4227
42274
42274
42274
42274
42274
42274
42274
4272
56604
56644
56684
56824
56874
56914
56954
58814
69064
7114
72904
732
735
7394

506

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-12
CROSS REFERENCE TABLE == USER SYMBOLS
L2544

73460

52704

92614

Le7N
694N
9359

69154

68744

7028
3184

5697
72704
73374
73734
76104

7546

9125

92244

SEQ 189

115

MACY11 30A(1052)

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11

L10021 045316
L10022 045326
L10023 046326
014603
LS060
MAINTB= 000400
MCBEGL 031326
MCENDL 035326
MCLR = 040000

89774
89914
9241
53884
45834
7073
7091
45790

92764
7011
8688
71174
72474
8648

7248

007310

48548

5947

7491%

MOBITE 010314
MOBITS 010276
MOCHK = 000010
007322
MODE
003332
MODES
MODLOC= 000003
MODREM= 000004

49134
49068
46368
48708
47598
446210
442N

6304
6292
6594
7998
6569

MODTYP 007306

48514

5946

MLTYP

MODS

010274

72484

7948+

49028
7945

MOMSGS 010314
= 000043
MOP
MOSC = 000056
14356
014366
MO1
014377
Mo2
014407
Mo3
014416
MOL
014433
MO5S
014440
MO6
002734
MSG

49178
46230
45308
4759
4760
4761
4762
4763
4764
4765
4690

MSGTRN

54014

MSGLIM= 000017
015053

L403#

5976

8676

SEQ 190

PAGE 27-13

8741%

7490t

8795+

B8B79+

7774

7874«

7893%

7935«

7937+

7939%

7941«

7943

7496

7773

7869+

7886+

7889+

7903

7846*

7848+

7851+

8579%

8686

7877+

7880+

7883%

7872%

7996

8186

8198

8215

6511

7468

7563

7591

7597

rM2

7727

7967

7973

T4B6r

77510

7819«

7838+

7840%

7842+

7B44x

7752

7849

7900
8344

7926
9137+

6293
4519
5121
53544
53554
53564
53574
53584
53594
53604
46984

7556

6386

7565

48218

6427

7474

MSGO
MSGOC
msGl
MSGIC
MSG2
NSGC
MSG3
MS63C
MSG4
MSG4C
MSGS
MSG5C
MSG&
MSG6C
MSG8
mSG8C
NEW
NO

002220
002150
002221
002152
002222
002154
002223
002156
002224
002160
002324
002162
002416
002164
2646
002170
030612
= 000036

4603
46030
4606
46048
4605
46054
4606
46064
4607
46078
4608
460BF
4609
46098
4611
46114
6986
4514#

4618

46294

4619

463N

4620

4633H

4621

46354

4622

46374

4623
7475
4624
7852
4626

4643
7487
4648H

70254
5084

7029
7897

48134

7507«

8532«

MSGTYP 007226

7497

7920

015104

007212

54020

7955

MSGTRU

NOBUF

09:15

CROSS REFERENCE TABLE =- USER SYMBOLS

30-MAR-82 09:13

MCSIZL= 004000 G

30-MAR-82

7316

7585

7599

4664H

7983+

CZKMUAO kMS11-BL PDP=11 D ¢
30-MAR-82 09:
CZKMUA.P11

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-14
CROSS REFERENCE TABLE == USER SYMBOLS
7455

O - e e e v Oe
g O O O O 00O000C
g g T G O e000000O
e g g g g eO000000
e g P PR g e00O0000
(R P (R G g (R g0000O00
P
O OO PO
0
O

ssssssssssssssssssssssssssssssssssssssssssssssssssssssss

7014

SEQ 191

J 15

K15

CZKMUAO KMS11-BL PDP=11 DCLT

CZKMUA.P11
NOD1S7
NOD16
NOD160
NOD161
NOD162
NODI63
NOG164
NOD165
NOD166
NOD167
NOD17
NOD170

NOD171
NOD172
NOD173
NOD174
NOD175
NOD176
NOD177

NOD20
NOD200
NOD201
NOD202
NOD203
NOD204
NOD20S
NOD206
NOD207
NOD21
NOD210
NOD211
NOD212
NOD213
NOD214
NOD22
NOD23
NOD24
NOD25
NOD26
NOD27
NOD3
NOD30
NOD31
NOD32
NOD33
NOD34
NOD35
NOD36
NOD37
NOD4
NOD4O
NOD41
NOD4Z
NOD4S
NOD44

30-MAR-82 09:13

012110
010640
012132
012136
012160
012164
012170
012174
012200
024024
010644
024030

024034
024036
024052
024054
024070
024072
024104
010512
010650
024106
024122
024126
024132
024146
024150
024164
024166
010662
024204
024210
024214
024216
024220
010666
010700
010704
010706
010712
010726
010574
010732
010750
010754
010772

010776
011014
011020
011036
010530
011042
011066
011072
011076
011114

51834
50254
51844
51854
51864
51894
51904
51914
51964
60594
50264
60604
60614
60624
60644
60654
60664
60674
501
50274
606
60694
60704
60714
60724
60734
60744
60754
50284
60764
60774
60784
60794
60804
50294
50304
50314
50354
50364
50374
50144
50384
50394
50404
50414

30408
504
50444
50454
50154
50464
50474
50484
50494
50504

MACY11 30A(1052)

30-MAR-82

09:15

PAGE 27-15

CROSS REFERENCE TABLE -- USER SYMBOLS

SEQ 192

) b wd

b emd

=NW=O
PO N0

b b b b

b e

b b b o

aed

VAWMV
b ed )
ek b O =3 OO =2 o
co s>
&=

b e e ok d e e ared

b md e e

D e

b O

b v

b b b

W NN NN AA N NN N N NI N N AN NINI NI N b b b W) b b b
&~ NN = = NO O NNV SN N
= O O OO 8~ LN

b e

e aod e

b i

D e

b b b e () b b e b b b e b ) e e e

ON =d
OQ‘OOOOOOOOOOOOOO
.
=
(N SR
e e oe I A
an
B%

O S NINONINONNO
OHOMNONNOONN OOV

—b b

b b d

(elelelelelelelelelalolololalalelelalelelelelelalalalalele]

CZKMUAQ KMS11-BL PDP=11
CZKMUA.P11
-82

VAWAVAWVAWAWIVAWVIWVAVAL WNVAVAWAIWWIWAWL

OANOONNON NSO

VIOOONSH

PN
=B () b b b b d

kb b

(elelalelolalolelol- B elelalelelelela)

L 15

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-16
CROSS REFERENCE TABLE == USER SYMBOLS

011364
5025

5043
5186

51254
5133

5079
51634
5026

50564

50984
5036

5075
5077

5047

5050
5052

5137

5139
5141

5143

5156
51964

SEQ 193

LR H

002524

002166
OPCNT
002646
OPEND
014576
OPRMM
OPRMSG= 000015
OTINT = 000002

OUTH3

046210

ONNI—
000

RN
R

\I\INN;—G—DN\JN

5065
5189

5068
5190

5074

8529

8557

8558

8575

8299+

8312«

4625

7829

8502

8506

46104
L4654
53874
44974
4459

8512«

8516

8517

9071

9113

8577

5059
5185

000
b
b \O
00 =0
wwhooO

OPBUF

5076
5022
5012
5014
5016
5018
5020
5023
5072
5073
51284
5128
5130
5132
5134
5136
5138
5140
5142
51474
5147
5149
5150
5021
50364
5038
5040
5042
5044
5046
5049
48284
46574

WAV
bbb

010624
010514
010532
010550
010566
010604
011256
011262
011266
011512
011532
011554
011574
011614
011634
011654
011674
011720
011724
011734
011740
011750
010706
010712
0107564
010776
011020
011042
011072
011120
007242
002520

AIMICD0DCO0D
£~000 VO OWNiN-=

N4OS
N42$
N43S
N44S
N45S$
N4ES
N50$
N51$
N52$
N6OS
N61S
N62$
N63S
NG4S
NG5S
N66S
N67$
N6BS
N70$
N71$
N72$
N73$
N8OS
N81S
N82$
N83$
N84S
N85S
N86S
N87$
OFSET
OPBFPT

5116
5118
5119
51794
5179
5181
5183
5117
5024
5027
5026

011446
011466
012036
012042
012070
012110
012136
012164
010644
010666
010704

TV
OOOOOOOOCOOOOO
S —ddcd

N1318
N1328
N140$
N141$
N1428
N1438
N1448
N1508
N20$
N25$
N30$

W VS NS S WNWWWW

30-MAR-82 09:13

VIV
=1 e b ed b b b ed b e b ed

CZKMUAO kMS11-BL PDP=-11 DCLT

CZKMUA.P1

SEQ 194

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-17
CROSS REFERENCE TABLE == USER SYMBOLS

91914

8508

8514

8515

8527

TGS o OO wod b b b ad oved e

NNY

7067«

5686

7109

7493%
8272
8198

7499
8389+
8215

7776

9013«

9057«

9112+

8501+

7891+

7902+

7907«

7925+

7928+

7726

7737

7744

7965

8555«

5686

AOOOHOHOONHS

PAS
= 000002
PASC = 000042
PASMOD= 000030
002650
PASS1
PASS2
002651
PASS3
002652
002653
PASS4
007300
PCADD
014540
PCK
PCLKCT= 00%(.)
PCLKEN= 000111
PCPM
015330
PEC
014550
041544
PLCK
041544
PLCK2
041560
PLCK3
014557
PMS
014536
PNCK
014546
PNEC
014555
PNMS
PNST
014525
PNT
= 001000
PRI
= 002000
PRIOR
046440
PRI0O = 000000
PRIO1 = 000040
PRIO2 = 000100
PRIC3 = 000140
PR104 = 000200
PRIOS = 000240
PRI0O6 = 0003
PRI0O7 = 000340
PRNT = 000055
PROEM
022026
PROTO = 000041
PROT08=
040
007214
PSCNT
014527
PST
PTREND 007150
PTRTAB 006400
003366
PSACT
PSBUFA 003362

=2 Q0 = O NN NINININNINVINIO
—
O NOOHNIONINNONIOONON
S
ONOONNNNNN NNNOO
>
=
B
B

007314

SEQ 195

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-18
CROSS REFERENCE TABLE == USER SYMBOLS

ANCOWNISS BB

PARAM

b ) b b

046216
045712
(0122264

OUTH4
OUTH6
OUTVEC

B WO
N0V

C
CZKMUAO kMS11-BL PDP=11
:
09
30-MAR-8
1
2
CZKMUA.P1

I A—A @ N NN NP vt~ Syt
RO OoL2VLVR

N 15

7702

8342+

8345

7465
7517+
7515+«

7561

7590

7957

8041+

B 16

TI
CZKMUAO KMS11-BL PDP=11 D.
30-MAR-82 09:
CZKMUA.P11

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-19
CROSS REFERENCE TABLE == USER SYMBOLS

PSCNT_
PSEXIT
PSGDBD

003370
027270
003377

6777
66784
6030+

PSNNUF

003376

PSNUM

003372

PSRADX 003374
PSTREE 003364
027152
PSTRV
027162
PSTRS
QCOPY = 000013
= 000004
QRX
QTX

= 000010

QUALFG 003204
QUALVL 003206
RAMO = 002000
= 000200
RDI
= 000200
RDO
= 000000
REC
RECMOD= 000031
REPLOG 025104
REPORT 023604
RESFLG 007304
RESTRT 030552
RHLPEN 003246
RHLPTB 003230

013632
RHLPO
RHLP1
013671
013714
RHLP2
RHLP3
013747
014000
RHLP4
RHLPS
014032
014071
RHLPS
RHLP?
014130
= 000200
RI
RMDLOP= 000047
RNOTNF= 000007
007316
RPASS
RPBASE (24646
= 000002
RPEXT
RPHLP = 000001
RPLOG = 000003
RPSWE = 000004
RPSWF = 000005
RPSWO = 000006
RPT
025152
025222
RPTAA
RPTABO
RPTDCK
RPTDDE
RPTDER
RPTDLE

025536
025666
025612
025376
025666

47784
6643
47824
7906+
47814
7865
L7794
679+
47804
47764
6039
66424
44954
L4604
8792
44614
8874
L7140
47154
45814
45844
45854
44104
45094
6114
60234
48504
6979
47334
47264

53364
4726
4727
4728
4729
4730
4731
4732
45634
45234
45404
48664
6126
45354
4534
L5364
45374
45384
45394
4980
62264
4984
4979
4982
4977
4981

7947+

6848+

6853

6144

6700+

6705«

6713

6759

6797+

7512«

7520

7811«

7859+

6098+

6139+

6191+

7513»

7524

7685+

7707«

7720%

7739«

7787+«

7815
6782

7932
6790

6775«

6777

6778«

6780+

67842

6786+

8148

8170

8200

8207

8218

8414

8449

8561

8789

8201

8209

8217

8226

8427

8431

8444

8519

8531

7803«
7815+

7806
7816w

7897+

7900

7908+

7926

7929+

7504

7708«

7775

7932+

8348

8350«

6257

6265

6272

6280

7950+

7703
6987+«
7004

SEQ 196

7457
7012

6246

70164

C 16

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-20
CROSS REFERENCE TABLE == USER SYMBOLS

CZKMUAQ KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11

4976
62254

9188+
9189+

91954
9190+

7536

7706

8415

8416

8435

8019

8095

8276

7976«

7977+«

7993

6076

6077

60794

164

7074%

8647+

7053«

204

7057«

5979

022217
RXIDM
RXMTOT 007206
022317
RXM1
RXM2
022342
022277
RXNC
RXONLY 041452
RXON2
041452
RXPTR
007150
RXQ
=
000004
R10$
024030
R11%
024036
024054
R12$

R125%
R13$
R14S
R15$
R16$

024220
246072
024106
024126
024150

SCM
SCMD
SCML
SDVE
SovI
SECRM
SELO

020047
020102
020071
020036
20060
020135
012202

SEL4
SEL6

012212
012216

020113
SEOP
SETET = 000060
SETEXP= 000010
SETTRN= 000011
015167
SHFO
015225
SHF1
014242
SHMSG

91964

8456

8462

8468

8018

8069

8096

8183

8274

B64LB*

8650

8657

8675+

8678+

8891

8904

9014+

9019

8658

8674+

8892

8905

9025

9063

9114

9117

9127

9142

;075*

8646+

8672«
8645+

8741
8673+

8795
8685«

8796«
8688«

8879
8693«

8880«
8695

9183
8742+

9188
8797«

881+«
S04

012206

SELZ2

WO VO WYWWAoAl
NN =NONIW wn

024166
024216

WIS 8

R17$
R30$

62344

4975
6222

0D~
~N

RPTDSF 010442
RPTDVI 025472
RPTECF 025536
RPTIV
014202
RPTMSB 025752
RPTTXQ 0253264
RPTO
025216
RPT1
025204
RQl
= 000040
046254
RSEL4L
RSEL6
046256
RTS
= 000040
RUN
= 000004
RUNSBM 022175
RXBIT = 000004
RXBUF
004400
RXC

SEQ@ 197

D 16

=0
OHNO0O0O0O0O0

NN
NN
ON =2

d cd wd wud
e
d o

00O
NN

W
WO O =
O = =2
OWVININION) =N o
WSO =NOWVONMNO N

(=4
o

w
purt

SHTYPO
SHTYP1
SHTYP2
SHTYP3
SHTYP4
SHTYPS
SHTYP6
SHTYP?
SHTYTB

SHTAB
SHTEND

= 000002

OSOOO
oS
WONSHNION
W BN N

SHOW

VBB OB SBBE DD
S
VAW
N NN NN NS NI NI NI NI N S

CZKMUAQ kMS11-BL PDP=11 DCLT
30-MAR-82 09
CZKMUA.PT

SEQ 198

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-21
CROSS REFERENCE TABLE == USER SYMBOLS
7549
7766

7691

7721

7740

777

7806

SVCGBL= 000000
SVCINS= 000001

svcsus= 000001
SVCTAG= 000001
SVCTST= 000001
SSLSYM= 010000

TCURAD
TEMP

007176
007244

56644
73724

7747«
5940«
6388+
7769

5945+
6389+
7820+

5979
6569«
8190+

E 16

TEMP3

007252

8937+«
48324

007256
TEMPS
007364
TIMERS
TIMERT 007360
TIMER2 007362
TIMMIN 007352
(022151
TIMOM
TIMSEC 007354
TIMTCK 007356
= 001000
TM
TOINOT (044674
044756
TOINY
045042
TOIN2
TOORIO 045436
TOOR1
045522
045540
TOOR2
045450
TOOR3
007240
TOTCC
= 000001
TRA
TRAMOD= 000034
TRVACT 027272
TRVALN 030064
TRVALP 030020
TRVBIF 027376
TRVBR
027366
TRVBRC 027312
TRVDEC 027472
TRVERR 027330
TRVEXI 027350
TRVNMA 027512
TRVYNOB 027322
TRVNUM 027504
TRVOCT 027504
TRVSPA 027420
TRVSTR 030152
046250
TSELG
046252
TSEL6
= 000001
TTL
TTLLOP= Q00044
TT0TCC 007174
003400
TXBUF
= 000002
IXC
TXMTOT 007172
022257
TXNC

8346
8560
48334
8298«
9118«
48344
48924
48904
48914
48864

55914
48874
48884
45654
88854
8889
8901
8671
9060
9073
90594
48274
44114
L5124
6672
6661
6660
6657
6656
6670
6663
6654
6655
6738
66954
6659
6662
6658
6664
8923
8924
446194
45204
4804A
47874
44440
48034
55974

7450«

5944

5953«

6183+«

6188

6188
8161
8515«

6432+
8172«
85264+

6589+
8280+
8903+

6592+
8345+
8922+

5694
8173«
8387
8923«
5694
8436
9152

5948+«
8179
8418+
8938«
5949+«
8658«
9155

6575«
8282«
8516+

6578
8292
8525+

7316
9025+

8289+

8644+

8653

7583

761

9171

5997

7017+«
7018+«

8878

90574

9068

6389

6391%

7462+

7553«

7554

7575

7582«

6709

6712

6732

6793

6811

6832

6856

6813

6834

6860

7742¢

7959

8043

8067

N4
N4
0

007254

7082+

TEMP4L

616
8416

6576%
48314

»
» 8
-2 Q0 ’O‘“OJ:OWO—‘W

007250

—=UWOAOVWLO
=2
b
HH0VOVONO SN0

TEMP2

5926+
6585+
5947+
7086

O 00\N000000W 000000

007246

£H00
wvico

48304

TEMP1

~NOO

30-MAR-82 09:13

OOMM—;\AN\AO«-A

CZKMUA.P11

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-22
CROSS REFERENCE TABLE == USER SYMBOLS

oD OO G0 AN 00 00 CO\N OO0
[+ On =2 (NONCO
(N =2 O =2 &
Q0 b L =b 0D O 00 \NOD — &>
~
»
» 2
»

CZKMUAO kMS11-BL PDP=-11 DCLT

6710

6715

6734

6798

6733

6794

6812

6833

9183«
9184+
8676

91934
91944

7463+
7476

7553
7746

7558
8436

7575«

7743+

7482+

7560+

7562

7577«

7738

8093

9063+

F 16

CZKMUAO KMS11-BL PDP=-11 DCLY
30-MAR-82 09:13
CZKMUA.P11
TXONLY
TXON2

041504
041512

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-23
CROSS REFERENCE TABLE -- USER SYMBOLS
80414

007152

6519«

TXa
= 000000
TSARGC= 000001

5922
56594

TXPTR

$CODE= 003032

TSERRN' 000023
TSEXCP= 000000
TSFLAG= 000040
TSGMAN= 000000
TSHIL1= 000007
TSLAST= 000001
TSLOLI= 000004
TSLSYM= 010000
TSLTNO= 000001
TSNEST= 177777

TSNSO = 000000
TSNS1 = 000004

TSNS2 = 000010
TSPTNU= 000000
T$SAVL= 177777
T$SEGL= 177777
T$SUBN= 000000
TSTAGL= 177777
TSTAGN= 010024

TSTEMP= 000000
TSTEST= 000001
TSTSTM= 177777

T$1STS= 000001

T$SAU = 01
T$SAUT= 01
T$SCLE= 01

SEQ 200

7966*

6521«
8042

6531
8094

6533

7466+

7569+

757642

5680#
61794
63404
74954
79614

56814
61884
63448
75224
84034
92554
86614

56854
6208#
63464
75264
B4754
92724
88954

56944
62374
66164
75854

59924
62454
964
76954

89414

90674

92724
75064
85064
92724

92734
75464

92724
5682
9224

92734
5687
9276

56604

56624

5664
68748
7610

56664
6906
74364

S6794
89754
56824
73204
91254

5684A
89894
56874
73374
92244

5667
5992
6244
6758
7031
7320
7565
8383
8941

5668
6028
6245
6795
7084
7337
7585
8403
9018

92734

G 16

CZKMUAO KMS11-BL PDP=11 DCLT
30-MAR-82 09:13
CZKMUA.P11
880U = 010016

73664

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 27-24
CROSS REFERENCE TABLE =- USER SYMBOLS
7357

T$SHAR= 010023
TSSHW = 010000
TSSINI= 010013

92414
4720
6944k

9276
4318
7114

T$SPRO= 010012
T$SRPT= 010011

69154
68748

6906

T$SMSG= 010007
T$SSRV= 010022
TSSTES= 010020

T
UAM

UNKM

UPTABL
UPTA1
UPTAS
UPTAL
UPTEX
VECTOR

58574
7,364

56668

5668

5881
7506

89754
7546

8977
9125

89894
9224

8991

55294

8467

50134

50144

501S#

74364

042012
042100
042076
042036
042150
046405

81754
8181
8185
8176
8187
9273

81884
81874
81804
81974
92964

50234
5030
5052¢
50748
50004
51314
51468
5163
51904
80698

50244
50404
50564
50754
5100
51324
5147#
S5164#
51914
60704

= 000215

= 046552

4956

L1738

41498
41498
41490
41498
93494

7270

5664

4254
43964

020273

7373

Seeos

3660

035570 6
= 000200 G

XSALWA= 000000
XSFALS= 000040
XSOFFS= 000400
XSTRUE= 000020
SPATCH 046466

3580

SEQ 201

50114

S012¢

50254
50414
5057%
50764
5101#
51334
5148%
51654
51964
60714

50264
50428
50584
5077%
5116¢
5134#
5149%
51684
60594
60724

5027
5043%
5059
50784
5117#
51354
51504
51794
60604
60738

50284
5044
50604
50794
51184
51368
51514
51804
60614
6O74R

)

S67T9F

5682

56844

5687

56894

5691

56934

50164

50174

S0184

50194

50204

50214

60794

50374
50504
5072#
50874
51294
51428
5154
5186
60678
60

50224

47908

48974

48984

50294
50454
50654
50824
5119
5137#4
51524
51814
60624
6O7SH

50304
50464
50664
50834
51214
51384
51554
5182¢
60634
60764

50314
50474
50674
50844
5122¢
51394
51564
5183%
606LH
60774

30354
5048#
30684
50854
51254
51408
5157%
51844
606SH
6078#

L1458

4OSH

46SBN

4690

4697

471N

&7STN

4787

47884

47898

51834
5198

7114

7248

7320

7357

739%

7506

7546

9125

93504

5014#

S018#
50984
S5200#

S022¢
51004
5389F

5029%
51164
54884

50364
5118%
548N

S038#
5128#
54504

S5044H
51304
56018

50464
51324
5697

S0574
51344
60624

SO59
51364
6064M

50364
50494
50694
50864
5128¢
51414
5158#
5185#

50664
51428
60684

50684
51578
60734

50
50514
50734
50984
51304
51434
51604
51804
60684

50844
51594
60754

H 16

CZKMUAO kMS11-BL PDP=11 DCLT

30~-MAR-82 09:13

CZKMUA.P11

194
3

L1494

41494

6977

BGNCLN

398

L1494

7299

BGNHRD

554

L1498

9241

BGNINI
BGNMOD

778
854

L1498
41494

6944
4170

BGNPRO

1064

41494

6915

8COMPL

BERROR
BGNAU
BGNAUT
BGNDU

BGNHW

BGNMSG

158

984

41494

BGNPTA
BGNRPT
B NSEG
BGNSET
BGNSFT

1148
1648
1528
1614
1824

414694
L1694
L1494
41494
41494

BGNSUB
BGNSW
BGNTST

2014
2254
2364

41494
L1494
L1498

BNERRO

2708

BRESET
CKLOOP

27848
2824

BGNSRV

BNCOMP
BREAK

CLI

1934

2664

2748

a77e
5025
043
5065
5084
5128
5143
5164
6059

cLocK
CLOSE
CLRVEC

6074
2864
2928
2964

DESCRI
DEVTYP
DISPAT
DISPLA
DOCLN
DODU
DORPT
ENDAU
ENDAUT
ENDCLN
ENDCOM
ENDDU
ENDHRD
ENDHW
ENDINI

31748
3414
36468
3604
I768
3804
3854
3894
4014
4134
45K
4418
45380
4658
4754

COMMEN
DELAY

3014
3228

5658

MACY11 30A(1052)

30-MAR-82

6979

6984

7503

5662

5666

5679

5684

8975

8989

7032

L1494

6981

6992

6998

7007

41494

8652

8899

9018

9070

5011
5026

5012
5027

5013
5028

5014
5029

5015
5030

6075
41494
41494
41494

6076
6991

6077
6997

6078

41694
41494
L149K
41494
L1494
41494
41494
416494
41494
41494
414
41494
L1494
41494
41394

5290
5270
4254

5044
5066
5085
5129
5146
5165
6060

41494
41494

5689

5693

5017
5035

5018
5036

6874

5857

416494
41494

SEQ 202

PAGE 28

CROSS REFERENCE TABLE ~= MACRO NAMES

41494

L1494

09:15

7436

5045
5067
5086
5130
5147
5168
6061

6973

7410
7290
7337
7373
9276
4318
7270

5046
5068
5087
5131
5148
5179
6062

7087

5047
5069
5098
5132
5149
5180
6063

5048
5072
5099
5133
5150
5181
6064

6079

5016
5031

5049
5073
5100
5134
5151
5182
6065
6080

5050
507
5101
5135
5152
5183
6066

5051
5075
5116
5136
5155
5184
8067

5019
5037

5052
5076
5117
5137
5156
5185
6068

5020
5038

5056
5077
5118
5138
5157
5186
6069

5021
5039

5057
5078
5119
5139
5158
5189
6070

5022
5040

5058
5079
5121
5140
5159
5190
6071

5023
5041
5059
5082
5122
5141
5160
51N
6072

5024
5042
5060
5083
5125
5142
5163
5196
6073

116

CZKMUAO KMS11-BL PDP=11 DCLT

30-MAR-82 09:13

CZKMUA.P11
ENDMOD

4874

L1494

9360

4164984

6921

5660

S00#

41494

5204
5294
5414
5554
S684

4149
L1494
41494
41498
41494

ENDSUB
ENDSW

968
6148

ERRDF
ERRHRD
ERROR
ERRSF

7148
7184
7228

L1494
L1468
L1498
L1498
L1692
41494
L1494

9224
4396

7304

416494

41494

8295

ENDMSG

ENDPRO

ENDPTA
ENDRPT
ENDSEG
ENDSEY
ENDSFT

ENDSRV
ENDTST
EQUALS

ERRSOF

5124

S804

6248
6424

7268

41494

MACY11 30A(1052)

30-MAR-82 09:15 PAGE 28-1

CROSS REFERENCE TABLE == MACRO NAMES

5682

5687

5691

5695

8218

8661

8895

8909

8926

7506

7546

5664

5668

8977

8991

8309

6906

5881

B4O7

EXIT

7718

L1649

L1698

9125

5697

7114

7320

7357

7394

GMANID

8484

41494

6034

7011

7514

8383

8506

GPRMA

8744

L1498

9272

9273

70114

7514

83834

85064

9274

I0SETU
JIOSTAR
KT11

9748
9824

41694
414694
4144

41494

S697A

7114

73204

73574

73944

75064

ESCAPE

GPRMD

LASTAD
MANUAL

MEMORY
MSBYTE

MSCHEC

7648

9034

11474
11624
11664
20004

41494

60344

41494
41494
41494
41494

9359
7502
42274

5694#
6245K
7084k
79054

59894
62634
70854
7949

59924
62714
70B6N
79614

60;8'
62784
74554
84034

60424
92910
74958
84754

5664#

56684

56824

56874

56914

56954

58814

69064

69214

72708

72904

83184

84074

86614

8B95#

89094

89264

89414

90284

90670

9214

9N76#

S667#4
61884
63864
75854

MSDATA

18674

41494

4227h

52704

52904

MSERRI

16408

9176

56908
6244k
7014
7835H

S6638
61794
63468
75658

56604

9121

56864
62378
67964
78104

S659%
61438
63448
7556M

4318F

9067

S6BSH
62314
67584
77694

41498
61034
63408
75268

4149#

9028

56814
82268
66168
76954

2066#
60478
63068
75008

20294

75464

8941

56808
62084
65784
7599

MSCOUN

MSDECR

SEQ 203

mw nw
mw
ww
B
WE
OB
U
G
ont
Bht
G
i
G
mey g
93604
92764
9224
89918
89774
74108
737380
MSESCA

20064

416498

41494

82954

91254

83094

J 16

19384
20354

41494
41494

60344
4318#

MSGETT
MSGNGB

18774
19024

41494
41494

56974
41704

MSGNIN

20494

41498

42274

MSGNLS
MSGNSU
MSGNTA

19134
18984
18904

41494
41494
41494

60344

MSGNTE

18944

41494

74364

MSINCR

20264

41494

41704

MSIOSE
MSLDRO
MSMASK
MSMCHI
MSMCLO
MSMSK1

17004
19424
16714
o
16244
167784

41494
41498
41494
L1408
41498
41494

733784
16364
60474
63064
75228
85564
16314

73734
41494
61034
63404
75264
85744
41494

Ogfl
EgS g
RR
N
g\‘

56794

70114

89774

MSGENB
MSGETS

WOBNI VWA

91254
60344
56974
56974
56974
42274

5
» S5eTe N

41494
41494
L1494
41494
41494
41494

20104
21014
20144
20224
20184
20388

MSESCS
MSEXCP
MSEXIT
MSEXSE
MSEXTJ
MSGEN

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 28-2
CROSS REFERENCE TABLE == MACRO NAM
NN
N NND

CZKMUA.P11

30-MAR-82 09:13

ONONOMAVINVASNO
W
ooy
OO
N ONOD

CZKMUAO kMS11-BL PDP=11 DCLT

SEQ 204

MSHNAP

MSPOP

MSPRIN

MSPUSH

18814

41494

43184

69764

43184

69064

69214

74104
56594
61434
63444
75564

5989#

0
9085
9494

59924
62714
70864
79614

41704

58574

68744

K 16

CIKMUAO KMS11-BL PDP=11 DCLT

30-MAR-82 09:13

CZKMUA.P

R$PUT

MSPUT1

72814

19728

60478
63
71094
79614
19814
60474
63064
71098

79614

73464

73834

74364

61034
63404
74554
B4O34
4149#
61038
63404

61434
6344
7495H
B4754
S659#
61438
6344

61794
63464
75220
855
S663F
61794
634

61884
63B6H
7526@
85744
S6674
61888
63864

B4L754

B5564

B3744

74554

B4O3H

S6594

TL9SH

6034#

MSSETS

1962#

20324

41494

69914

MSSTAR

17334

41494

MSTLAB

19204

20774

MSRNRO

MSRBRO

MSSVC

MSTSTL

MSWORD
MSXFER

NODCL

19524

41494

30-MAR-82

09:15

PAGE 28-3

CROSS REFERENCE TASLE == MACRO NAMES

72994

L1494

41494

MSRADI

MACY11 30A(1052)

SEQ 205

56634

7522

70114

56674

7526

75144

9894

92414

62084
6578F
7556
56804
62088
6578%

62264
6616K
75654

62314
67588
7585

6237h
67964
7S99

6244N
70144
76954

2454
0844
77694

2634
0854
78104

2714
08
78354

62784
70964
79054

62914
1
79494

7556

56814
62268
66164
75654

S6854
62314
6758
75854

S6864
6237h
67964
75994

S6904
6244N
70144
76954

56944
62454
70844
77694

59894
62634
70854

59924
62714
70864

78354

60284
62784
79054

60424
62914
71084
79494

83834

B8506#

92554

92724

92734

9274k

9754

6804

6814

56854

56864

78104

4170#

42724

69974

70314

56588

S6624

S666H

56794

5684N

S6BIX

56934

58574

68744

69154

6944N

4L149%

S659

S6604

S6634

S664M

S6674

S668F

S6BON

56814

56824

56854

56864

56874

2333‘

&149F

5659#

56604

S663F

56644

S6674

S6684

S6804

S6814

5682¢

56854

56864

56874

56904

19214

41494

5659

56604

S663#

S664H

56674

S6684

S6804

S6B1N

56824

56854

56864

56874

56904

%gggl

41494

422;‘

42540

56974

6034

70114

7114H

7320

73574

7394k

7506

7514

75464

82954

16828

41494

5128
5143
5164
6059

5011
5026
5044
5066
5085

5129
5146
51
6060

5012
5027
5045
5067
5086

5013
5028
5046
5068
5087

5014
5029
5047
5069
5098

5015
5030
5048
5072
5099

5016
5031
5049
5073
5100

5017
5035
5050
5074
5101

5018
5036
5051
5075
5116

5019
5037
5052
5076
5117

5020
5038
5056
5077
5118

5021
5039
5057
5078
5119

5022
5040
5058
5079
5121

5023
5041
5059
5082
5122

5024
5042
5060
5083
5125

607

6076

6077

6078

6079

6080

19334

866

41824
5025
5043
5065
84

6074

41494

5130
5147
5168
6061 -

513
5148
5179
6062

5132
5149
5180
6063

5133
5150
5181
6064

5134
5151
5182
6065

5135
5152
5183
6066

5136
5155
5184
6067

5137
5156
5185
6068

5138
5157
5186
6069

5139
5158
5189
6070

5140
5159
5190
6071

5141
5160
5191
6072

5142
5163
5196
6073

L 16

CZKMUAQ kMS11-BL PDP=11 DCLT

CZKMUA.P11

30-MAR-82 09:13
41694
41494

PRINTS

1710
11764
12394
12794
6758
7769
13194

READBU
READEF
RFLAGS
SETPRI
SETVEC
SLASH
STARS
sv(C

13994
14034
14084
16134
14184
16240
16384
16520

41494
41494
41494
41494
41494
41694
414694
L1488

XFERF
XFERT

16164
16204

41494
414524

OPEN
POINTE
PRINTB
PRINTF

PRINTX

XFER

. ABS.

13594

16128

046552

ERRORS DETECTED:

41494
41494
6796
7810
41494

41494

4207
5659
5989
7014
7835
6208

5663
5992
7084
7905
6226

5667
6028
7085
7949
6231

7006
6976

6978

6980

7112
7096

7310
7108

7109

71148

73204

4149

56974

000
O

CZKMUA.BIN,CZKMUA.LST/CRF=SVC34R.MLB, CZKMUA.P11

RUN-TIME: o7 34 & SECONDS

RUN-TIME RATIO: 75/65=1.1
CORE USED: 20K (39 PAGES)

SEO 206

MACY11 30A(1052) 30-MAR-82 09:15 PAGE 28-4
CROSS REFERENCE TABLE == MACRO NAMES

73574

73944

75068

75464

5694
6188
7556

6340

6344

6346

6386

6278

6291

6306

6578

6616

7565

7585

7599

7695