Digital PDFs

AH-S889A-MC

April 1982

100 pages

Original

5.1MB

view download

OCR Version

4.1MB

view download

Document:	CZKMFA0 MKS11-BD,KMC11-B,DMS11-D,DM11-BA KMS11-BD INTERACTION APR 1982 bw
Order Number:	AH-S889A-MC
Revision:	000
Pages:	100
Original Filename:	CZKMFA0__MKS11-BD,KMC11-B,DMS11-D,DM11-BA__KMS11-BD_INTERACTION__AH-S889A-MC__APR_1982_bw.pdf

OCR Text

KMS11-BD.KMC11-B
PMSll-D,DMIIfBH

Khsliasn
CZKMEAO

INTERACT ION

AH-5889A - MC
FICHE 1 OF 1

AERpLE 1982
waoe
v usa
COPYRIGHTE

CZKMFAO KMS11-8BD INTERACTION_TEST

CZKMFA.P11

.NLIST

.REM X

20-0C7-81 17:07

MACY11 30A(1052)

21-0CT-81

05:47

PAGE 1

SEQ,BIN,LOC

IDENTIFICATION

PRODUCT CODE:

AC-S887A-MC

PRODUCT NAME:

(CZKMFAO KMS11-BD INTERACTION

PROGRAM DATE:

SEPTEMBER 1981

MAINTAINER:

CSS/NPG DIAGNOSTICS

DIGITAL EQUIPMENT CORPORATION,
MAYNARD, MASSACHUSETTS.
ALL RIGHTS RESERVED.
THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY

BE USED AND COPIED ONLY IN ACCORDANCE WITH THE

TERMS OF SUCH LICENSE AND WITH THE INCLUSION
OF THE ABOVE COPYRIGHT NOTICE.
THIS SOFTWARE OR ANY OTHER
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE
MADE AVAILABLE TO ANY OTHER PERSON.
NO TITLE TO
AND OWNERSHIP OF THE SOFTWARE 1S HEREBY TRANSFERRED.

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

DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF
ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED 8Y DIGITAL.

SEQ 0001

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.P11

20-0CT-81 17:07

1.0

MACY11 30A(1052)

21-0CT-81

05:47

PAGE 2

ABSTRACT

THIS PROGRAM IS A TEST FOR INTERACTION BETWEEN THE DM11-BA MODEM
CONTROL MULTIPLEXER AND THE KMS11-8D COMMUNICATIOUNS CONTROLLER
THE PROGRAM IS DIVIDED INTO FUNCTIONAL TEST GROUPS AS FOLLOWS:
GROUP O:
GROUP 1:

ALL LINE_SCANNER AND LINE MULTIPLEXER FUNCTIONS ARE TESTED
USING H3256 TEST CONNECTORS WITH THE _H317-M DISTRIBUTION PANEL
A SINGLE LINE IS TESTED USING THE H317-M PANEL WITH H3256
TEST CONNECTORS IN

2.0

REQUIREMENTS

2.1

EQUIPMENT

PLACE OF THE MODEM CABLES .

PDP-11 COMPUTER WITH AT LEAST 12K OF MEMORY
ASR-33 TELETYPE OR EQUIVALENT

DM11-BA
KMS11-8D

2 _CABLES CONNECTED TO DISTRIBUTION PANEL
H3256 TEST CONNECTOR

2.2

MEMORY

THE PROGRAM RUNS IS 12K MEMORY

2.3

PRELIMINARY PROGRAMS

CZKMBAQ
CZKMCAQ
CZKMDAQ
CZKMEAQ
CZKMGAO

KMC11-B STATIC PART1

2.4

M8640 HARDWARE JUMPERS

KMC11-B STATIC PART?
DMS11-DA STATIC
DMS11-DA DYNAMIC
DM11-BA MODEM CONTRL

HARDWARE JUMPERS W10-17 ON THE MB8640 MODULE ENABLE OR

DISABLE TRANSITTION DETECTION OF THE MODEM SIGNALS .
THE FOLLOWING RESTRICTIONS EXIST DO TO THESE JUMPERS .

TEST GROUP O - ASSUMES THAT ALL TRANSITTION DETECTIONS WILL NOT BE

DISABLED ( AT LEAST 1 MUST BE ENABLED )

TEST GROUP 1 = IS NOT EFFECTED BY THESE JUMPERS .

SE@ 0002

CZKMFAO KMS11-BD INTERACTION TEST

CZKMFA.P11

3.0

20-0CT-81 17:07

MACY11 30A(1052)

21-0CT-81

05:47

PAGE 3

THIS PROGRAM HAS BEEN MODIFIED TO RUN ON A PROCESSOR WITH OR WITHOUT
A HARDWARE SWITCH REGISTER. WHEN FIRST EXECUTED THE PROGRAM TESTS
THE EXISTENCE OF A HARDWARE SWITCH REGISTER. IF _NOT FOUND A

SOF TWARE SWITCH REGISTER LOCATION (SWREG=LOC. 176 ) IS DEFAULTED TO.
IF THIS 1S THE CASE, UPON EXECUTION THE CONTENTS OF THE SWREG ARE

DUMPED IN OCTAL ON THE CONSOLE TTY AND ANY CHANGES ARE REQUESTED
(1E)

SWR=XXXXXX

NEW=

POSSIBLE RESPONSES ARE:

1.
2.

<CR>
6 DIGITS 0-7

IF NO CHANGES ARE TO BE MADE
TO REPRESENT IN OCTAL THE NEW SWITCH REGISTER

VALUE ,;LAST DIGIT FOLLOWED BY <CR>.
TO ALLOW REENTERING VALUE IF ERROR IS COMMITTED
KEYING IN SWREG VALUE.

BUILT INTO THF PROGRAM IS THE ABILITY TO DYNAMICALLY CHANGE THE
CONTENTS OF SWREG DURING PROGRAM EXECUTION. BY STRIKING “G
(CNTL G) ON CONSOLE TTY THE OPERATOR SETS A REQUEST FLAG TO CHANGE

THE CONTENTS OF SWREG, WHICH IS PROCESSED IN KEY AREAS OF THE PROGRAM
CODE (IE) ERROR ROUTINES, AFTER HALTS END OF PASS, AND OTHER

APPLICABLE AREAS.

SEQ 0003

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.P1

4.0

20-0CT7-81 17:07

MACY11 30A(1052)

21-0CT-81

05:47

PAGE 4

LOADING AND STARTING PROCEDURE
THE STANDARD PROCEDURE FOR LOADING BINARY TAPES IS TO BE USED.

IF THE DIAGNOSTIC IS ON MAGNETIC MEDIA, FOLLOW THE INSTRUCTIONS

FOR THE MONITOR BEING USED.
6.1

THE PROGRAM AUTOSTARTS ON LOADING.

STARTING ADDRESS

THE STARTING ADDRESS FOR ALL TESTS 1S 000200.
RESTART ADDRESS FOR ALL TESTS IS 000200

4.2

OPERATOR AND/OR PROGRAM ACTION

4.2.1

INITIAL PROGRAM START

4.2.1A

\WITH HARDWARE SWITCH REGISTER
LOAD ADDRESS 000200

IF DEFAULT ADDRESSES ARE NOT PRESENT SET SW00 = 0
(DEFAULT CSR = 764200 , VECTOR = 540 FOR DM11)
(
CSR = 774100 , VECTOR = 300 FOR KMS11)

PRESS START

4.2.18

WITHOUT HARDWARE SWITCH REGISTER

LOAD ADDRESS 200

PRESS START

4.2.1 .2 PROGRAM WILL TYPE

*'CZKMFAQO KMS11-BD INTERACTION TEST'' (ONCE ONLY)

4.2.1 .3 PROGRAM WILL TYPE

(WITH SW00 = 1)
DM11 VECTOR ADDRESS='' AND WILL WAIT FOR AN INPUT
FROM THE TELETYPE KEYBOARD.

6.2.1 .4 TYPE A THREE DIGIT NUMBER (OCTAL) WHICH IS THE
ADDRESS THAT THE DM11-BA WILL INTERRUPT TO, FOLLOWED BY
<RETURN>.

IF AN INCORRECT ADDRESS IS TYPED,

TYPE *''?'* AND THEN REPEAT 4.2.1.3.

NOTE:

THE PROGRAM WILL

IF _THE ADDRESS ENTERED IS ACCEPTIBLE TO THE PROGRAM,

BUT IS NOT THE INTERRUPT VECTOR ADDRESS OF THE DM11-BA
UNDER TEST, A HALT WILL OCCUR AT THAT ADDRESS+2, WHEN
THE DM11-BA INTERRUPTS,
TO RECOVER, PERFORM 4.2.2.1.

4.2.1 .5 THE PROGRAM WILL TYPE 'DM11 (SR ADDRESS-'' AND WAIT FOR
AN INPUT FROM THE TELETYPE KEYBOARD.

4.2.1 .6 TYPE A 6 DIGIT (OCTAL NUMBER) WHICH IS THE ADDRESS OF THE
DM11-BA CONTROL REGISTER FOLLOWED BY <RETURN>.
IF AN INCORRECT ADDRESS IS TYPED, THE PROGRAM WILL

TYPE '*?'' AND THEN REPEAT 4.2.1.6.

NOTE:

IF THE ADDRESS ENTERED IS ACCEPTIBLE TO THE PROGRAM
BUT IS A NON-EXISTANT REGISTER, A BUS ERROR TRAP WILL
OCCUR WHEN THE PROGRAM ADDRESSES THE REGISTER, AND THE
PROGRAM WILL HALT AT LOCATION 6.
TO RECOVER, PERFORM 4.2.2.1.

SEQ 0004

CZKMFAO KMS11-BD INTERACTION_TEST

CIKMFA.P11

20-0CT-81 17:07

MACY11 30A(1052)

21-0CT-81

05:47

PAGE 5

4.2.1.7 THE PROGRAN WILL TYPE

KMS11 VECTOR ADDRESS='' AND WILL WAIT FOR AN INPUT
FROM THE TELETYPE KEYBOARD.

4.2.1.8 TYPE A THREE DIGIT NUMBER (OCTAL) WHICH IS THE

ADDRESS THAT THE KMS11-8BD WILL INTERRUPT TO, FOLLOWED BY
<RETURN>.

IF AN INCORRECT ADDRESS IS TYPED,

TYPE '*?'' AND THEN REPEAT 4.2.1.7.

NOTE:

THE PROGRAM WILL

IF _THE ADDRESS ENTERED IS ACCEPTIBLE TO THE PROGRAM

BUT IS NOT THE INTERRUPT VECTOR ADDRESS OF THE KMS1i-8D
UNDER TEST, A HALT WILL OCCUR AT THAT ADDRESS+2, WHEN
THE KMS11-BD INTERRUPTS.
TO RECOVER, PERFORM 4.2.2.1.

4.2.1.9 THE PROGRAM WILL TYPE 'XMS11 (SR ADDRESS-'' AND WAIT FOR
AN INPUT FROM THE TELETYPE KEYBOARD.

4.2.1.10 TYPE A 6 DIGIT (OCTAL NUMBER) WHICH IS THE ADDRESS OF THE
KMS11-8D CONTROL REGISTER FOLLOWED BY <RETURN>.
IF AN INCORRECT ADDRESS IS TYPED,
THE PROGRAM WILL

TYPE "'2'* AND THEN REPEAT 4.2.1.10.

NOTE:

IF _THE ADDRESS ENTERED IS ACCEPTIBLE TO THE PROGRAM
BUT IS A NON-EXISTANT REGISTER, A BUS ERROR TRAP WILL
OCCUR WHEN THE PROGRAM ADDRESSES THE REGISTER, AND THE
PROGRAM WILL HALT AT LOCATION 6.
TO RECOVER, PERFORM 4.2.2.1.

4.2.1.11
THE PROGRAM WILL TYPE
TEST-"" AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD.

4.2.1.12 TYPE AN OCTAL NUMBER CORRESPONDING TO THE
NUMBER OF THE TEST TO BE RUN FOLLOWED BY <RETURN>.
IF AN INCORRECT TEST NUMBER IS TYPED THE PROGRAM WILL
TYPE **?'' AND THEN REPEAT 4.2.1.11
THE AVAILABLE TESTS TOGETHER WITH THE NUMBER TO BE TYPED
ARE GIVEN BELOW.

TEST GROUP 0:

OFF LINE TESTS USING H3256 TEST CONNECTOR AND H317-M DISTRIBUTION PANEL.
FIRST TEST=0

TEST GROUP 1

OFF LINE TESTS USING H3256 TEST CONNECTOR AND H317-M DISTRIBUTION PANEL.
TEST=100

4.2.1.13 THE PROGRAM WILL ENTER THE SELECTED TEST GROUP.

SEQ 0005

CZKMFAO KMS11-8BD INTERACTION_TEST

CZKMFA.P11

4.2.2

20-0CT-81 17:07

MACY11 30A(1052)

21-0CT-81

05:47

PROGRAM RESTART WITH HARDWARE SWITCH REGISTER

4.2.2.1 WITH SW00=0
LOAD ADDRESS 200
SET SW00=0 BEFORE PRESSING START.
PRESS START

PROGRAM WILL PERFORM AS DESCKIBED IN 4.2.1.3 70 4.2.1.13.
4.2.2.2 WITH SWOC=1

LOAD ADDRESS 200
SET SW00=1 BEFORE PRESSING START
PRESS START

PROGRAM WILL PERFORM AS DESCRIBED IN 4.2.1.7 70 4.2.1.13
6.2.3

PROGRAM RESTART WITHOUT HARDWARE SWITCH REGISTER

LOAD ADDRESS 200

PRESS START

PAGE 6

SEQ 0006

CZKMFAQ KMS11-BD INTERACTION_TEST
20-0CT-81 17:07

CZKMFA.P11

5.0

OPERATING PROCEDURE

5.1

TEST GROUP O

5.1.

TEST INITIALIZATION

MACY11 30A(1052)

21-0CT-81

05:47

PAGE 7

8 LINE SCANNER TEST

NONE REQUIRED, PROGRAM TYPES ‘'8 LINE SCANNER TEST''
AND BEGINS TEST EXECUTION.

OPERATIONAL SWITCH SETTINGS
SW15=1,
SW14=1,

SW13=1,
SW11=1,
SU10=}.

HALT ON ERROR
LOOP ON CURRENT TEST

SUPPRESS ERROR TYPEOUT
SUPPRESS ITERATIONS
ESCAPE TO NEXT TEST ON ERROR
FREEZE DATA

PROGRAM AND/OR OPERATOR ACTION
WITH ALL SWITCHES DOWN,

THE FROGRAM WILL RUN

ALL TESTS IN THE SELECTED GROUP, SEQUENTIALLY.
EACH TEST IS REPEATED
A FIXED NUMBER OF TIMES (SEE LISTING FOR DETAILS),
EXCEPT FOR TO WHICH IS EXECUTED ONCE ONLY AFTER START OF TEST.
WHEN ALL
TESTS HAVE BEEN COMPLETED,

THE PROGRAM WILL TYPE

‘END PASS'' AND RESTART AT THE FIRST TEST OF THE SELECTED GROUP.
IF AN ERROR OCCURS, THE PROGRAM WILL TYPE AN APPROPRIATE
ERROR MESSAGE AND CONTINUE TESTING.

3.2 WITH SW15=1, PROGRAM ACTION WILL BE AS IN 5.1.3.1 EXCEPT THAT
A HALT WILL OCCUR AFTER ERROR TYPEOUT.

.3.3 WITH SW13=1, PROGRAM ACTION WILL BE AS IN 5.1.3.1 EXCEPT THAT
NO ERROR TYPEOUT WILL CCCUR.
THE PC OF THE TEST THAI FAILED
WILL BE DISPLAYED IN THE COMPUTER DATA LIGHTS.

3.4 WITH SW10=1, PROGRAM ACTION WILL BE AS IN 5.1.3.1 EXCEPT THAT
AFTER AN ERROR HAS OCCURED, THE PROGRAM WILL
START THE NEXT TEST IN SEQUENCE.

IMMEDIATELY

SEQ@ 0007

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.P11

20-0CT-81 17:07

5.2

TEST GROUP 1

5.2.1

TEST INITIALIZATION

MACY11 30A(1052)

21-0CT-81

(05:47

SINGLE LINE DM11-BA CABLE AND H317-M PANEL TEST

THE PROGRAM WILL TYPE '‘SINGLE LINE CABLE TEST
LINE NUMBER-'' AND WILL WAIT FOR AN INPUT FROM
THE TELETYPE KEYBOARD.

TYPE A 1 DIGIT OCTAL NUMBER BETWEEN O AND 7, CORRESPONDING
TO THE NUMBER OF THE DM11 LINE TO BE TESTED, FOLLOWED BY
<RETURN>.
THE PROGRAM WILL THEN BEGIN TEST EXECUTION.

IF THE TELETYPE INPUT IS INCORRECT, THE PROGRAM
WILL TYPE *'?°° AND REPEAT THE MESSAGE.
5.2.2

OPERATIONAL SWITCH SETTINGS

SAME AS 5.1.2
5.2.3

PROGRAM AND/OR OPERATOR ACTION

SAME AS 5.1.3
5.3

TEST RESELECTION

TO ESCAPE FROM THE TEST IN PROGRESS, AND SELECT
A NEW TEST, TYPE <CONTOL C>.

THE PROGRAM WILL STOP EXECUTION OF THE TEST IN PROGRESS
AND THEN TYPE ''TEST='' AND WAIT FOR AN INFUT FROM
THE

PAGE 8

TELETYPE KEYBOARD.

PROCEED AS DESCRIBED IN 4.2.1.12

SE@ 0008

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.P11

5.4

MACY11 30A(1052)

20-0C7-81 17:07

21-0CT-81

05:47

ADDRESS CHANGE

TO CHANGE THE VECTOR AND REGISTER ADDRESS OF THE DM11-BA
UNDER TEST, TYPE <CONTROL V>.
THE PROGRAM WILL
STOP EXECUTION OF THE TEST IN PROGRESS AND PROCEED AS
DESCRIBED IN SECTION 4.2.1, EXCEPT THAT THE TITLE
WILL NOT BE TYPED.

5.5

LINE NUMBER CHANGE

5.5

DM11-BA

TO CHANGE THE DM11 LINE NUMBER(S) UNDER TEST, TYPE
<CONTROL L>.

THE PROGRAM WILL SUSPEND THE

TEST IN PROGRESS AND RETURN TO THE INITIALIZATION
STAGE OF THE SELECTED TEST.

WHEN THE LINE NUMBER(S) HAS BEEN CHANGED, THE
PROGRAM WILL RESTART THE SELECTED TEST USING THE NEW
LINE NUMBER(S).

5.5.2

KMC11-8/DMS11-D
TO CHANGE THE KMC11/DMS11 LINE NUMBER(S) UNDER TEST, DO THE

FOLLOWING:
A= STOP THE PROGRAM

B~ EXAMINE ADDRESS 'LINEB'' (13426)
c- DEPOS%BOTHE DESIRED VALUE INTO THE ADDRESS, WHERE:
= LINE O
100 =
40 =

1
2

10 =
4 =

4
5

20 =

2 =
1=

6
7

D- RESTART THE PROGRAM

5.6

ERROR IN ENTERING DATA
TO ALLOW RE-ENTERING DATA TYPE “U <CNTL U> BEFORE
DEPRESSING <CR> WHEN ENTERING DATA. THIS WILL
RESULT

5.7

IN THE QUESTION BEING RE-ASKED.

POWER FAILURE

IF A POWER FAIL TRAP OCCURS DURING TEST EXECUTION
THE PROGRAM WILL SAVE THE GENERAL REGISTERS OF THE

PROCESSOR AND HALT.

WHEN POWER UP OCCURS,

THE PROGRAM WILL

TYPE

‘POWER FAILURE-CURRENT TEST WILL BE RESTARTED''.
THE PROGRAM WILL

THEN RESUME

TEST EXECUTION.

PAGE 9

SEQ 0009

CZKMFAO KMS11-BD INTERACTION_VEST

CZKMFA.P11

NOTE:

20-0C7-81 17:07

MACY11 30A(1052)

21-0CT-81

05:47

IF A TEST IS NOT IN PROGRESS, I.E., IF THE PROGRAM
IS WAITING FOR AN INPUT FROM THE TELETYPE KEYBOARD,
THE ERROR MESSAGE WILL BE 'POWER FAILURE''.
THE PROGRAM WILL THEN REQUEST THE OPERATOR TO SELECT A TEST.

PAGE 10

SEQ 0010

CZKMFAO KMS11-BD INTERACTION TEST

CZKMFA.P11

MACY11 30A(1052)

20-0C7-81 17:07

6.0

ERRORS

6.1

NORMAL OPERATION

21-0CT-81

05:47

IF AN ERROR OCCURS WITH ALL SWITCHES DOWN, THE PROGRAM

WILL TYPE AN APPROPRIATE ERROR MESSAGE AND THEN
RESUME

TESTING.

THERE ARE SEVERAL ERROR MESSAGE FORMATS, AND
THE PARTiCULAR MESSAGE TYPED DEPENDS UPON THE
TEST

6.1.1

JA PROGRESS.

cRROR MESSAGES

6.1.1.1 UNIQUE ERROR

ONLY PC OF FAILING TEST IS OUTPUT TO TELEPRINTER
AN EXAMPLE OF

THIS TYPE OF ERROR IS:

1. AN INTERRUPT OCCURED AT THE WRONG PRIORITY
2. A REGISTER BIT WAS NOT CLEARED BY RESET
6.1.1.2 KMS11 DATA ERROR
THIS ERROR WILL OCCUR

ONE OF

IF A DATA COMPARISON FAILS FOR

THE KMS11-8D LINE BUFFERS.

FORMAT FOR ERROR TYPEOUT

XXXXXX KMS11

EXP

REC

DATA ERROR

KMS11 LINE
cC

WHERE XXXXXX=PC+2 OF CALL TO ERROR ROUTINE
AA=EXPECTED DATA BYTE

BB=RECEIVED DATA BYTE
CC=KMS11-8D LINE ON WHICH ERROR OCCURED

PAGE 11

SeEQ 0011

CZKMFAO KMS11-BD INTERACTION TEST

CZKMFA.P11

MACY11 30A(1052)

20-0CT-81 17:07

21-0CT-81

05:47

PAGE 12

6.1.1.3 KMS11 STATUS ERROR
THIS ERROR WILL OCCUR WHEN EITHER A KMS11 INPUT FUNCTION
;gé%?vgg EXECUTE, OR A KMS11 CONTROL OUT MESSAGE IS
FORMAT FOR KMS11

XXXX KMS11

SELO

AAA

SEL2

STATUS ERROR

888

KMS11 LINE
cC

WHERE XXXXXX=P(C+2 OF CALL TO ERROR ROUTINE
AAA=STATUS OF KMS11 SELO AT ERROR

BBB=STATUS OF KMS11 SELZ2 AT ERROR
CC=KMS11 LINE ON WHICH ERROR OCCURED

6.1.1.4 CONTROL STATUS ERROR
THIS ERROR WILL OCCUR IN A TEST

THAT PRIMARILY

FORMAT FOR CONTROL

INVOLVES THE LINE SCANNER

STATUS ERROR

XXXXXX STATUS ERROR
EXP
REC

AAAAAA BBBBEB8

WHERE XXXXXX=PC+2 OF CALL TO ERROR ROUTINE
AAAAAA=EXPECTED CONTROL STATUS AT TIME OF ERROR

BB88BB=RECEIVED (ACTUAL)

C(ONTROL STATUS AT TIME OF ERROR

SEQ@ 0012

CZKMFAO kMS11-BD INTERACTION TEST

CZKMFA.P1T

MACY11 30A(1052)

26-0CT-81 17:07

21-0CT-81

05:47

6.1.1.5 LINE STATUS ERROR
THIS ERROR WILL OCCUR IN THOSE

TESTS THAT

SET ONE LINE TO A PARTICULAR STATE, AND THEN CHECK

ALL OTHER LINES

FORMAT FOR LINE STATUS ERROR IS
XXXX LINE ERROR

EXP

AAA

REC

DDD

LINE
CC

SEL

WHERE XXXXXX=P(+2 OF CALL TO ERROR ROUTINE
AAA=EXPECTED LINE STATUS AT TIME OF ERROR
B8BB=RECEIVED LINE STATUS AT TIME OF ERROR
CC=LINE ON WHICH ERROR OCCURED
DD=THE LINE ON WHICH THE PROGRAM WAS OPERATING

6.1.2

REPEATED ERRORS

IF THE SAME ERROR OCCURS REPEATEDLY IN A GIVEN TEST

ONLY THE DATA RELATING TO THAT ERROR WILL BE TYPED
IF THE ERROR OCCURS IN THE SAME TEST ON THE SAME PASS
6.2

SCOPE LOOPS

6.2.1

AFTER ERROR HALT

TO LOOP ON A GIVEN TEST AFTER AN ERROR HALT,

SET SW15=0 TO RUN WITHOUT STOPPING
SET SW14=1 TO LOOP ON CURRENT TEST

SET SW13=1 TO SUPPRESS ERROR TYPEOUT
SET SW10=0 (IF IT IS 1)
SET SW09=1

TO LOOP ON SAME DATA (IF REQUIRED)

PRESS CONTINUE
THE PROGRAM WILL LOOP ON THE

6.2.2

SAME

TEST.

FROM PROGRAM START

6.2.2.1 PROCEED AS DESCRIBED IN 4.2.1.1

TG 4.2.1.4

6.2.2.2 WHEN THE PROGRAM TYPES '‘TEST-'', SET SW14=1
ON THE TEST THAT WILL 8t SELECTED.

TO LOOP

6.2.2.3 TYPE IN THE NUMBER OF THE TEST THAT IS TO BE LOO®tD
ON (SEE LISTING FOR TEST NUMBER REFERENCE DESIGNATIONS)
6.2.2.4 ESE4ESOGRAH WILL

6.2.3

AFTER <CONTROL=C>

LOOP ON THE

SAME AS 6.2.2.2 10 6.2.2.4

SELECTED TEST UNTIL

PAGE 13

SEQ 0013

CZKMFAO KMS11-BD
INTERACTION TEST
CZKMFA.P11
20-0CT-81 17:07
7.0

RESTRICTIONS

7.1

STARTING

MACY11 30A(1052) 21-0CT-81 O§:47 PAGE 14
B8

FOR 8 LINE SCANNER TEST OR SINGLE LINE TEST

WHEN CONNECTTED TO THE H317-M DISTRIBUTION
PANEL H3256 TEST CONNECTORS SHOULD BE INSTALLED
IN PLACE OF THE MODEM CABLES.

7.2

OPERATING
NONE.

7.3

WHEN ON ACT-11 OR ''XOR''
PROGRATM WILL DEFAULT TO 8 LINE SCANNER TEST
H317-M WITH H3256 TEST CONNECTORS MUST BE INSTALLED.

7.4

DEFAULT PARAMETERS (INCLUDING ACT-11 & 'XOR'")
VECTORS

DMBVEC:

540

DMBLVL: 542

(AUTOMATICALLY GENERATED

KMCVEC: 300
KMCLVL: 302

BY PROGRAM WHEN UNDER ACT-11 OR ''XOR'")

ADDRESSES

KMCCSR: 174100
DMBCSR: 164200
DMBLSR: 164202
NOTE:

SWOO(RESELECT ADDRESSES AND VECTORS BECOMES

INOPERATIVE UNDER ACT-11 OR ''XOR''.

SEQ 0014

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.P11

20-0CT-81 17:07

8.0

EXECUTION TIME

8.1

8 LINE SCANNER TEST

MACY11 30A(1052)

21-0CT-81

05:47 PAGE 15

THE TIME FOR 2 PASSES OF THE 8 LINE SCANNER TEST (S
APPROXIMATELY 1.0 MINUTES.
8.2

SINGLE LINE CABLE TEST

THE TIME FOR 12 PASSES OF THE SINGLE LINE CABLE TEST
IS APPROXIMATELY 1 MINUTE.

9.0

PROGRAM DESCRIPTION

THIS PROGRAM CONSISTS OF A SERIES OF TEST GROUPS
hézfggRBY A SET OF COMMON SERVICE ROUTINES AND A KEYBOARD

WHEN INITIALLY LOADED AND STARTED ...SWO0 MUST BE SET =0, THE PROGRAM WILL
BEGIN A DIALOG WITH THE OPERATOR TO INPUT THE PARAMETERS
REQUIRED BY THE PROGRAM.

WHEN ALL INFORMATION HAS BEEN INPUTTEN, THE PROGRAM WILL
REQUEST THE OPERATOR TO SELECT A TEST BY TYPING
THE NUMBER OF THE TEST TO BE RUN. WHEN A CORRECT TEST NUMBER
gnggggévgggrlHE PROGRAM WILL BEGIN EXECUTION OF THE
THE KMS11-8D IS STARTED BEFORE ANY DM11 TESTS ARE RUN.
THE KMS11 IS INITIALIZED, THE BOP FIRMWARE 1S LOADED,
STARTED, AND A UNIQUE TEST PATTERN IS TRANSMITTED ON
EACH KMS11~BD LINE. DATA IS RECEIVED AND CHECKED AS EACH
BUFFER IS TERMINATED AND THE LINE IS THEN RESTARTED.
AT ANY TIME DURING TEST ENECUTION, THE OPERATOR MAY
CHANGE A TEST PARAMETER BY ENTERING THE APPROPRIATE
COMMAND VIA THE TELETYPE KEYBOARD.

THE PROGRAM WILL TYPE "END PASS'' AFTER EVERY TEST PASS.
;0.0 LISTING

585

.LIST

SEQ,BIN,LOC

SEQ 0015

CZKMFAO KMS11-BD INTERACTION TEST
CZKMFA.P11
20-0CT-81 17:07

MACY11 30A(1052) 21-0CT-81 0§.47 PAGE 16
)

.TITLE

CZKMFAO KMS11-BD INTERACTION TEST

.ENABLE ABS,AMA

;THIS PROGRAM CONTAINS TEST OF THE DM11-BA/KMS11-8D IN
:THE OFF LINE MODE OF OPERATION ONLY

sSWITCH REGISTER OPTIONS

HALT ON ERROR
LOOP ON CURRENT TEST
SUPPRESS ERROR TYPEOUT
SUPPRESS ITERATIONS
ESCAPE TO NEXT TEST ON ERROR

;SW15=1,
:SW14=1,
:SW13=1,
:SW11=1,
:SW10=1,

:SW09=1, FREEZE DATA

:SW01=1, START DISCONNECT SEQUENCE
:SW00=0, RESELECT VECTOR AND CONTROL REGISTER ADDRESS
;AFTER PROGRAM RESTART

;STARTING ADDRESS FOR ALL TESTS IS 000200
;RESTART ADDRESS=000200
sTESTS AVAILABLE

issgrL?zgu$Eg;S USING HB61 TEST CONNECTOR-FIRST TEST=0
éBEETL?zgufifg;S USING DC11 TEST CONNECTOR AND MODEM CABLE-rIRST TEST=100
;SYMBOL DEFINITIONS
100000

000400
000100

SW15=100000
SW14=40000
SH13=20008

SW06=100
«NLIST
LIST

MC,MD,CND
ME

sREGISTER DEFINITIONS
000000

000007

RO=20
R1=X1
R2=%2
R3=13
R4=%4
R5=25
SP=26
PC=%7

sGENERAL REGISTER
sGENERAL REGISTER
¢GENERAL REGISTER
sGENERAL REGISTER
:GENERAL REGISTER
sGENERAL REGISTER
sPROCESSOR STACK POINTER
:PROGRAM COUNTER

SEQ@ 0016

CZKMFAO KMS11-BD
INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07
642

177776
012120
012114
012116

000020
000040
000100
000200
000400
001000
002000
004000
010000
020000
0400C0
100000

000001
000002
000004
00010
000020
000040
000100
000200

680
gg}

000004

000002
000001

ggz

685
686
687
688
689
gg?

:LINE SCANNER RUNNING
:LINE SCANNER ENABLE
s INTERRUPT ENABLE
:SCANNER DONE
:CAUSES LINE COUNTER TO BE INCREMENTED BY 1 COUNT
:FORCES 1S TO INPUT OF SCRATCH PAD MEMORY
sCLEAR MULTIPLEXER FUNCTION FLIPFLOPS
:CLEARS SCANNER SCRATCHPAD MEMORY
:SECONDARY RECEJVE TRANSITION WAS DETECTED BY SCANNER
:CLEAR TO SEND TRANSITION WAS DETECTED BY SCANNER
:CARRIER TRANSITION WAS DETECTED BY SCANNER
;RING SIGNAL WAS DETECTED BY SCANNER

L INENA=1
TRMRDY=2
RS=4
SECTX=10
SECRX=20
€S=40
€0=100
RING=200

:=1.
:=1,
:=1,
:=1,
:=1,
:=1,
:=1,
:=1,

RECOGNIZE TRANSITIONS ON THIS LINE
SEND TERMINAL READY TO MODEM
SEND REQUEST TO SEND TO MODEM
SEND SECONDARY TRANSMIT TO MODEM
SECONDARY RECEIVE TURNED ON BY MODEM
CLEAR TO SEND TURNED ON BY MODEM
CARRIER TURNED ON BY MODEM
RING TURNED ON BY MODEM

XC0=4

:CARRIER TRANSITION WAS DETECTED

XCS=2
XSCRX=1

:CLEAR TO SEND TRANSITION WAS DETECTED
:SECONDARY RECEIVE TRANSITION WAS DETECTED

;INSTRUCTION DEFINITIONS

005746
005726
010046
012600
024646
022626

gg%
694
695
696
697

BUSY=20
SCNENA=40
INTENA=100
DONE=200
STEP=400
MAINT=1000
CLRMUX=2000
CLRSCN=4000
SECRXF=10000
CSF=20000
COF=40000
RINGF=100000

:SOF TWARE TRANSITION FLAGS

g;g
679

;CONVERSION FACTOR FOR DECIMAL OUTPUT
;WORD TO BE CONVERTED TO OCTAL ASCII
;ASCII OCTAL DIGIT

:LINE REGISTER BIT FUNCTIONS

ggg
668
669
670
671
672
673
674
g;g

PS=177776
.EQUIV PS,PSW
RADIX=DIVIS
BINWRD=DIVIDL
DIGIT=DIVIDH

;CONTROL STATUS REGISTER BIT FUNCTIONS

gg}
653
654
655
656
657
658
659
660
661
662
663
ggg

:LOCATION EQUIVALENCIES

222

645
646
647
648
ggg

MACY11 30A(1052) 21-0CT-81 Og:47 PAGE 17

PUSH1SP=5746
POP1SP=5726
PUSHR0=10046
POPR0=12600
PUSH2SP=24646
POP25P=22626

:DECREMENT PROCESSOR STACK 1 WORD
:INCREMENT PROCESSOR STACK 1 WORD
:SAVE RO ON STACK
:RESTORE RO FROM STACK
:DECREMENT STACK TWICE
:INCREMENT STACK TWICE

;EMT DEFINITION TABLE
104000
104001
104002
104003

ERRORC=EMT +X
ERRORL=EMT+X
SCOPE=EMT +X
SCOPEF=EMT +X

;CONTROL STATUS ERROR SERVICE
JLINE STATUS ERROR SERVICE
:SCOPE LOOP AND ITERATION SERVICE
:DATA FREEZE SERVICE

SEQ 0017

CZKMFAO KMS11-8BD INTERACTION_TEST

CZKMFA.P11

20-0CT-81 17:07

106004
104005

MACY11 30A(1052)

21-0CT-81

PAGE 18

sTELETYPE QUTPUT
:SAVE RO-R5, PC+2 OF CALL

RESOS=EMT +X

;RESTORE RO=R5

OCTASC=EMT+X

104010

CONVERT=EMT +X

104011
104012
104013
106014
104015
1064016
104017
104020

05:47

TYPE=EMT +X
SAVOSP=EMT +X

104006

104007

EXTRACT=EMT +X
ERROR=EMT +X
INSTRG=EMT +X
ERRORD=EMT +X
ERRORS=EMT +X
CNTLUU=EMT +X
CKINTT=EMT +X
KBDIN=EMT +X

¢CONVERT DATA TO ASCII AND TYPE

sASCI] CONVERSION ROUTINE

sDIGIT EXTRACTION ROUTINE
sTYPE PC OF FAILING TESTS ONLY
s INPUT OCTAL DATA STRING
;KMS11 DATA ERROR
;KMS11 STATUS ERROR
s CHANGE SWREG ROUTINE
sCHECK FOR INTERRUPTS-FLAG STYLE
;FAKE INTERRUPT ENTRY POINT

s [RAPCATCAER FOR ILLEGAL INTERRUPTS

SEQ 0018

CZKMFAO KMS11-8D INTERACTION_TEST
20-0CT-81 17.07
CZKMFA.P11

MACY11 30A(1052)

21-0CT-81

05:47

PAGE 19

: STANDARD INTERRUPT VECTORS

000024
000026
000030
000032

000024

000060
002070
000340

000174
000176

000174
000000
000000

000200

000200
000137

;POWER FAIL HANDLER

KBDINT

;KEYBOARD MONITOR

340
EMTSRY
340

000340

000060
000062

PFAIL

;SERVICE AT LEVEL 7
sEMT DISPAT(H SERVICE
sSERYICE AT LEVEL 7

340

=174

001100

.=200

JSERVICE AT LEVEL 7

DISPREG:Q
SWREG:
0
JMP

START

;GO TO START OF PROGRAM

SEQ 0019

OO0
OO
OOV
ES S W=
2O
NSO OONONNONNON

prurQror Qe Gur S
b
b b

Gur Grur Guur Guur Puur Guur
g
b d d D
b D

OO
©O
0O

28388883 OO0O0O0

CZKMFAO kMS11-8D INTERACTION_TEST
20-0CT-81 17:07
CZKMFA.P11

.23 g OSSOSO

WW&W NN
= = =

NSO

Qhur G

o883 28883888

21-0CT-81

05:47

PAGE 20

.=1100

001100
012737

012606

005037
005077
012706
013746
013746
012737

002066
014144
001100
000006
000004
001152
177777

000176
000174
000004
000006
001242
000004
001246
177060
000004
001242
014772
001254

000024

000001
001242

START:

18:
28:

38
000004

MOV

24
#PFAIL,

CLR
CLR
MOV

TIPFLG
aTKCSR
SP
#STACK,

015412

CMP
MOV

(SP)+, (SP)+
#SWREG, SWR

sADJUST STACK

MOV

(SP)+,aWd

sRESTORE VECTORS

B8R

MOV

MOV
CLR
MOV
MOV
ST
MOV
coM
JSR

014772
015272

;SET UP FOR TIMEOUT

sREFERENCE HARDV \RE SWITCH REGISTER

;POINT TO SOF TWARE SWITCH REG
;POINT TO SOFT DISPLAY REG

#DISPREG,DISPLAY

(SP)+.an6
;XOR = NO
XFLAG
4,-(SP) :SAVE 4
.&
#XORSVC
sSET UP SVC ROUTINE
177060 ;GOT AN XOR TESTER OUT THERE ?
(SP)+,4 :YES

XFLAG

PC.XOR

STARTO

+XOR = YES
;AUTO VECTOR
JRESTORE TRAPCATCHER
:XOR FLAG

(SP)+.,4 ;RESTORE &

TST
BNE

TIFLG
13

:;EEED TITLE?

MOV

#1,TIFLG

;SET_TITLE TYPED FLAG

BMI

VECSTR

TYPE
MTITLE

1$:

;SET UP _STACK POINTER

:SAVE VECTORS

JMP

STARTO:

;SET UP POWER FAIL
s INTERRUPT SERVICE VECTOR
sCLEAR TEST IN PROGRESS FLAG

a¥6,-(SP)
s, -(SP)
s, ank
#-1,3SWR
28

MOV
MOV
MOV
cMP
BEQ

XFLAG:
0
FST:
0
XORSVC: POP2SP
MOV

000042

000176

STACK:

SUSWR:

000004
015412

001300

MACY11 30A(1052)

ST
BEQ
JSR
BR
START1: CMP
BNE

CNTLUU

8IT

000001

18:

001100
000300
000302

VECSTR: MOV
MOV
MOV

BNE

*TYPE 'DM11-BA DIAGNOSTIC''
X OR ?

XFLAG

40
START1
PC.XOR
VECSTR
#SWREG, SWR
18

SACT
*NO
YES

11_,.'RESTORE TRAPCATCHER
AUTO VECTOR

sGET VECTOR AND REGISTER ADDRESS

#1,3SWR

STARTN

#STACK,SP
#300.DATA1
#302.DATA2

;SET UP PROCESSOR STACK PCINTER
sADDRESS OF FIRST FLOATING VECTOR
;ADDRESS OF STATUS WORD

SEQ 0020

CZKMFAO KMS{i1-BD INTERACTION TEST

CIKMFA.P11
788

20-0CT-81 17:07

MACY11 30A(1052)

21-0CT-81

001360

013777

013510

012120

VECSTA: MOV

CLR

aDATA?

791

001372

062737

000004

013506

ADD

#4,DATAY

793
794
795
796
797
798
799

001406
001414
001416
001422
001426
001430
001432

023727
001361
005737
100573
005737
001170
104013

013506

001000

CMP
BNE
TST
8M]
TST
BNE
INSTRG

DATA1, #1000
VECSTA
XFLAG
1STGO
42
TSTGO

801
802
803
804
805
806
807
808

001436
001440
001442
001444
001452
001454
001460
001464

000100
000774
015252
032737
001404
012716
000137
013737

789 001366 005077 012116

790

792 001400 062737 000004 013510

800

809
810

811

812
813
814
815
816
817
818
819
820

001434

001472

001500

001502

001504
001506
001510
001512
001520
001522
001526
001532
001540

001242

000042

016233

062737
104013

DATA2,aDATA1

#4 . DATA2

MVECTOR

000003

015252

001444
012436
015252

015254

000002

015254

016312

160000
176000
015256
032737
001404
012716
000137
013737
062737

ADD

100
774
DMBVEC
1%:
BIT
BEQ
MOV
JMP
VECST1: MOV

ADD

INSTRG

000007

015256

001512
012436
015256
000002

015260
015260

PAGE 21

:MOVE ADDRESS OF STATUS WORD TO VECTOR

:CLEAR STATUS WORD

S(FOR HALT ON ILLEGAL INTERRUPT)
*NEXT VECTOR

*NEXT STATUS WORD
‘1S TABLE CLEARED
*IF NOT. CONTINUE

:XOR ?
SYES
SACT 11
2
SYES
;GET VECTOR ADDRESS

‘MESSAGE ''VECTOR ADDRESS=-'

#3,DMBVEC
VECSTI
#18, (SP)

INSTER
DMBVE C , DMBL VL

#2.,DM8LVL

MRE GAD

160000
176000
DMBCSR
1%:
BIT
BEQ
MOV
JMP
REGST1: MOV
ADD

2
05:47

‘LOWER LIMIT FOR ADDRESS
‘UPPER LIMIT FOR ADDRESS
*STORAGE FOR ADDRESS
STEST 2 LSB OF ADDRESS
“IF 0, CONTINUE

: INCORRECT ADDRESS. TRY AGAIN
*GENERATE ADDRESS OF

JINTERRUPT STATUS WORD

*GET ADDRESS OF CONTROL REGISTER

*MESSAGE 'REGISTER ADDRESS-''

#7 .DMBCSR
REGST1
#18,(SP)
INSTER
DMBCSR,DMBL SR
#2.DMBL
SR

‘LOWER LIMIT FOR ADDRESS
‘UPPER LIMIT FOR ADDRESS
*STORAGE FOR ADDRESS
“1F 3 LSB ARE NOT 0

: INCORRECT ADDRESS, TRY AGAIN
*SET UP ADDRESS OF LINE STATUS REGISTER

SEQ 0021

000303

000007

001636
012436
015300
000007
177776

001674
001676

015316

001550
0124 36
015320
000003
177776
000002

001574

001373

MACY11 30A(1052)
KMCPAR:

104013

NOO

ViAWV
~NOON NN
S

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07

2$:
38:

015276

5%:

6$:

21-0CT-81

INSTRG
KVECTOR
100
774
KMCVEC
#g.KHCVEC
BIT
BEQ
l
#18,(SP)
MoV
JMP
INSTER
#KMCLVL
RO
MOV
#3.R1
Mov
MoV
ADD

DEC
BNE
INSTRG
KREGAD
160000
176000
KMCCSR
BIT
BEQ
MoV
JMP
MoV
MOV
MOV

INC
DEC
BNE

=2(R0O),

(RO)

#2.(ROS+
R1

OI.KMCCSR
5
#4$, (SP)
INSTER
#8SEL1,RO
#7,R1

=2(R0), (RO)

(RO)+
R1
6%

2
05:47

PAGE 22

SE@ 0022

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.P11

001700

20-0CT7-81 17:07
01270%

001100

K
MACY11 30A(1052) 21-0CT-81 0%:47 PAGE 23

STARTN: MOV
INSTRG
MTEST
0
177

#STACK,SP

X1A:

TSTNO,RS

TSTNO

MoV
BIC
ASR
ASR
ASR
ASR
ASR

015370
015366

MOV
MOV

X1B:

TST
BNE
MOV
JMP

042737

177700

015334

STRTOA: BIC

023737
003401
000764
012746
005746
000005
004737

015334

015370

CMP
BLE

012737
005037
005037
005037
104004

016430
012737
000137
000000

000340
012730

TSTGO:

002304
015372
015330
015332

002306

000001
011046

002066

18:
TIPFLG:

B8R
MOV

PUSHISP

RESET
JSR
[, [0)']
CLR
CLR
CLR
TYPE
MCRLF

MOV

J MP

sSET UP PROCESSOR STACK
;GET TEST NUMBER
JMESSAGE ''TEST-''

cLOWER LIMIT FOR TEST NUMBER
JUPPER LIMIT FOR TEST NUMBER

:1770?7,ns

GRO(RS5)
, TSTMAX

TSTLST(RS) ,TSTPNT
TSTPNT

STRTOA

#X1A, (SP)
INSTER

#177700,TSTNO
TSTNO, TSTMAX
T1STGO
X18

:STORAGE FOR TEST NUMBER
;GET TEST NUMBER
SJEXTRACT TEST GROUP NUMBER

;GET HIGHEST TEST IN GROUP
JGET POINTER TO TEST TABLE
;IF 0, INVALID TEST GROUP
:TRY AGAIN
sGET NUMBER OF FIRST TEST
:70 BE EXECUTED IN SELECTED GROUP
¢ 1S NUMBER TOO LARGE

#340,-(SP)

;SET UP PRIORITY LEVEL

PC KMCSUP
#DMYRTI ,KRET

;. SETUP KMC11
;SET UP DUMMY KEYBOARD RETURN
;CLEAR LINE SELECTED FLAG
sCLEAR TRACE TRAP FLAG

LINFLG

TRACON
PASCNT

sCLEAR PASS COUNT

#1,TIPFLG
TSTENT

;SET TEST IN PROGRESS FLAG
;START TESTING

SEQ 0023

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07

MACY11 30A(1052) 21-0CT-81 0%:47 PAGE 24
L

:TELETYPE KEYBOARD INTERRUPT SERVICE ROUTINE
005037

KBDINT:

002066

011744

on
—

TIPFLG

TMP1
SINTFL
8TKDBR, TMP1
#200, THP1
#3,TMP1
KBDIN1

aDMB(CSR
8TKCSR
STARTN
#26,TMP1

KBD IN2

;CLEAR TEST IN PROGRESS FLAG

;CLEAR SOFTWARE INTERRUPT FLAG
sIF <CONTROL C> WAS TYPED

JSELECT NEW TEST

;IF <CONTROL V> WAS TYPED
JTYPE '"“V'' AND GET NEW

JVECTOR AND REGISTER ADDRESS

;IF _<CONTROL L> WAS TYPED

002306

#DMYRTI ,KRET

sLINE NUMBERS, UNLESS
JTEST GROUP 0 WAS IN PROGRESS
;IF <CONTROL L> VWAS TYPED IN TEST

013020
013020
000040
000176

015272

dDMB(CSR
aTKCSR
eSKRET
1§UREG.SUR

000007

011744

000001
000001

002310
002066

002304

KBDINT:

CLR

aDMBCSR
8TKCSR
VECSTR
#14,THPY

000014

QOO —O—

002070
002074
002100
002104

011744

KBDINZ:

KBDIN3

DMYRT]

KBDIN3:

1$:

:
DMYRT]
.EVEN
KRET:
SINTFL:

sTYPE '*“L'° AND GET NEW

:GROUP 0, IGNORE

sSET SOFTWARE INTERRUPT FLAG
SSET TEST IN PROGRESS FLAG

SEQ 0024

CIKMFAO KMS11-8D
INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07

MACY11 30A(1052) 21-0CT-81 0%:47 PAGE 25
"

932
933

:INITIALIZATION CHECK = PERFORMED ONLY AT PROGRAM START
:VERIFY THAT CONTROL STATUS REGISTER AND LINE STATUS

936
937
938
939
940
961
92

944
345

:REGISTER WERE CLEARED BY INITIALIZE

002312
002312
000314
002316
002322

002324
002326
002332

002336
002336

10:

104004

015630
005777
001401

104012
005777
001401

012734

INITT:

012726

359

002340
002340
002346
002354
002356
002360
002366
002376
002376

002400

012777
032777

000100
000100

012710
012702

042777
032777

000160
000100

012670
012662

001001
104012

001401
104012

11:
CSTR1:

3DMBLSR
.+4

;TEST CONTROL STATUS REGISTER
:CONTROL STATUS NOT CLEARED, ERROR
:TEST LINE STATUS REGISTER

;LINE STATUS NOT CLEARED, ERROR
:CHECK FOR LOOP

WINTENA,3DMBCSR
#INTENA,3DMBCSR

:REFERENCE DESIGNATION
SET INTERRUPT ENABLE
:WAS INTERRUPT ENABLE SET

BIC
BIT

#INTENA,3DMBCSR
#INTENA,3DMBCSR

:NO, ERROR
:CLEAR INTERRUPT ENABLE
:WAS INTERRUPT ENABLE CLEARED

BEQ
ERROR

SCOPE

:NO, ERROR

:CHECK FOR ITERATIONS, LOOP

:VERIFY THAT ‘DONE'' CAN BE SET AND CLEARED
012777
032777

967
968
969

002420
002422
000430

104012
042777
032777

972

002442

002416

092436
002440

001001

001401
104012

000200
000200

012646
012640

12:
CSTR2:

MOV
BIT

#DONE,3DMBCSR
#DONE.3DMBCSR

:REFERENCE DESIGNATION
:SET DONE
:WAS DONE SET

ERROR
BIC
BIT

WDONE,JDMBCSR
WDONE.JDMBCSR

:NO, ERROR
:CLEAR DONE
:WAS DONE CLEARED

BNE

012626
012620

BEQ
ERROR

104002

.+4

SCOPE

443

:NO, ERROR

:CHECK FOR ITERATIONS, LOOP

;VERIFY ‘MAINTENANCE MODE'' CAN BE SET AND CLEARED

976
977
978
979
980

002444
002444
002452
002460
002462

982
983
984
985

002472
002500
002502
002504

987

QDMBCSR
.+4

MOV
BIT

BNE
ERROR

104002

002402
0026402
002410

981

TST

BEQ
ERROR
TST

;VERIFY THAT “'INTERRUPT ENABLE'' CAN BE
SET AND CLEARED.

963
964
965

970
971

ERROR
SCOPE

;REFERENCE DESIGNATION
TYPE "8 LINE SCANNER TEST

TYPE

BEQ

104012
104002

97
%8
950
951
952
953
954
955
956
957
958

SEQ 0025

002464

012777
032777

001000
001000

012604
12576

042777

001000

012564

001001
104012

032777
001401
104012
104002

001000

012556

13:
CSTR3:

MOV~
BIT

WMAINT,2DMBCSR
WMAINT,3DMBCSR

BIC

WMAINT,aDMBCSR

BNE
ERROR

BIT
BEQ
ERROR
SCOPE

.+4

WMAINT.3DMBCSR
.+

:REFERENCE DESIGNATION
:SET MAINTENANCE MODE
:WAS MAINTENANCE MODE SET
:NO,

ERROR

:CLEAR MAINTENANCE MODE

:WAS MAINTENANCE MODE CLEARED

:NO, ERROR
:CHECK FOR ITERATIONS, LOOP

sVERIFY THAT °‘SCAN ENABLE'' CAN BE SET AND CLEARED.

MACY1T 30A(1052)

CZKMFAO kMS11-BD INTERACYION TEST
20-0CT-81 17:07
CZKMFA. P11
988
989

002506

gg%

997

WN = OV~
N—= OV~ OB

002542

042777
032777
0014601

000040
000040

012542
012534

CSTR&:

012522
012514

002550

002550
002556

002564
002566
002570

002576
002606
002610

012777
032777
001001
104012

042777
032777
001401

000040
000020
000040
000020

012500
0124

TS:

CSTRS:

8IT
B8NE

gég

ERROR
SCOPE

104012
104002

002632

002640
002646

052737
005077
012777
013777
052777
042737

000340
012432
002660
177776
000200
000340

177776

T6:

INT1:

012420
012414
O
1

INTI18:

:NO, ERROR

;CLEAR SCAN ENABLE
;WAS SCAN ENABLE CLEARED

;NO, ERROR
;CHECK FOR ITERATIONS, LOOP

#SCNENA ,aDMB(SR

#8USY ,aDMBCSR
. te

#SCNENA ,aDMB( SR

oegsv.aonacsn
. ¢

sREFERENCE DESIGNATION

sSET SCAN ENABLE
;1S BUSY BIT SET

;BUSY NOT SET, ERROR
;CLEAR SCAN ENABLE

:1S BUSY BIT CLEARED

:BUSY NOT CLEARED, ERROR
;CHECK FOR LOOP, ITERATIONS

8IS

#340,PS

BIS
8l(C
NOP
BR

#DONE ,aDMBC(SR
#340,PS

CLR
MOV
MOV

POP2SP
ERROR

SDMB(SR
#INT1A,3DMBVE(C
PS,aDMBL
VL

INT18

;REFEREMCE DESIGNATION
JLOCK OUT INTERRUPTS
sCLEAR CONTROL REGISTER
JSET UP INTERRUPT SERVICE ADDRESS
;SET UP INTERRUPT PRIORITY
;SET DONE

JALLOW INTERRUPTS
;DELAY FOR INTERRUPT
:NO INTERRUPT, CONTINUE

;RESTORE STACK, INTERRUPT
;OCCURED, ERROR

JCHECK FOR LOOP, ITERATIONS

SCOPE

;VERIFY THAT NO INTERRUPT OCCURS WITH ''INTERRUPT ENABLE''

rUR
N AN

WL = OV VO

;REFERENCE DESIGNATION
sSET SCAN ENABLE
;WAS SCAN ENABLE SET

;INTERRUPT IF ‘'INTERRUPT ENABLE'' IS CLFARED.

—

D e

—d

D el

)

olnlolelelelole]

il el wd e
el

MOV

8I(C

012
012

1031

—d i

8IC
BIT
BEQ

#SCNENA ,3DMB(SR
#SCNENA,3DMB(SR
. th

ERROR

INT1A:

MOV
817
BNE

#SCNENA ,8DMBCSR
#SCNENA ,8DMB(CSR
+4

PAGE 26

SVERIFY THAT SETTING ‘DONE'' DOES NOT CCAUSE AN

002620

1026
1025

05:47

;VERIFY THAT 'BUSY' | S SET WHEN °‘‘SCAN ENABLE'' IS SET
;VERIFY THAT ‘BUSY'' IS C LEARED WHEN ‘'SCAN ENABLE'® IS CLEARED

002612

023

ERROR
<S{OPE

~o RO

d e D e e

002526
002534

000040
000040

2 b —b o

D ad cnd D d e

=D 2 = =

[eolelelelolalalolelelalela)

8388 8323228

998

104012

o
(=)

996

002524

995

002522

012777
032777
001001

994

002506
002514

(=4
o

990
991

T4:

21-0CT-81

;SET AND "DONE’" CLEARED.

002706
002714
002722
052730
002732

37
77
77

77
777
042737
000240
000402

000340
012356
092736

177776
000100
000340

1
0

8
1

17:

INT2:

BIS
CLR
Mov

MOV
BIS
8iI(

NOP

B8R

#340,PS
SDMB(SR
#INT2A,30MBVE(

PS.aDRBL VL
#INTENA ,QDMB( SR
#340,PS

INT28

JREFERENCE DESIGNATION

;LOCK OUT INTERRUPTS

JCLEAR CONTROL REGISTER

JSET UP INTERRUPT SERVICE ADDRESS

JSET UP INTERRUPT SERVICE LEVEL
JSET INTERRUPT ENABLE
JALLOW INTERRUPTS
:DELAY FOR INTERRUPTS

:NO INTERRUPT, (ONTINUE

SEQ 0026

1044
1045

20~0CT=81 17:07

002736
002736

INT2A:

022626
104012

INT28:

1046 002740 104002

1048
1049
1051
1052
1053
1054

0027642
002762
002750
002754
1055 002762
1056 002770

052737 000340
005077 012302
012777 003026

012777
013777
1057 002776 042737
1058 003004 052777

1059

1060
1061

1062

1063

003012

003014
003016

003022

003026

000240

000240
005077

104012

000401

1064 003026 022626
1065 003030 104002

177776

110:
INT3:

012270
000100 012266
177776 012256
000340 177776
000200 012244

05:47 PAGE 27

;RESTORE STACK
:INTERRUPT OCCURED, ERROR
:CHECK FOR ITERATIONS, LOOP
SCOPE
;VERIFY THAT SETTING 'DONE'' CAUSES AN INTERRUPT
:WITH "INTERRUPT ENABLE' SET
;REFERENCE DESIGNATION
:LOCK OUT INTERRUPTS
#340,PS
BIS
:CLEAR CONTROL REGISTER
aDMB(SR
CLR
:SET UP INTERRUPT SERVICE ADDRESS
#INT3A,aDMBVEC
MOV
:SET "INTERRUPT ENABLE''
#INTENA,3DMBCSR
MOV
:SET *‘INTERRUPT LEVEL"
PS,apMBVL
MOV

BIS

NOP

#340,PS

#DONE,aDMBCSR

NOP
CLR

@DMBCSR

INT38

ERROR

INT3A:
INT38:

POP2SP
ERROR

BIC

012234

21-0CT-81

POP2SP
SCOPE

:ALLOW_INTERRUPTS
:SET 'DONE"

:DELAY FOR INTERRUPT

; INTERRUPT OCCURED, ERROR
: CONT INUE

: INTERRUPT OCCURED, RESTOR STACK
:CHECK FOR ITERATION, LOOP

SEQ 0027

CZKMFAO KMS11-BD INTERACTION_TEST

CIKMFA.P11

MACY11 30A(1052)

20~0CT-81 17:07

1067

1069
1070 003032

1071 003032 005077 012220
1072 003036 042737 000340
1073 003044 052737 000340
1074 003052 012777 003114
1075 003060 013777 177776
1076 003066 012777 000100
1077 003074 052777 000200
1078 003102 000240
1079

003104

003106

000240

005077

1081 003112 000402
116 022626
1082
1083 003116 104012
}882 003120 104002

177776
177776

T11:
INT4:

012166
012162
012154

INT4A:

INT4B:

003122
003122
003126
003134

005077
042737
052737

003174

000240

1100

003176

005077

1102
1103
}}8;

003204
003206
003210

022626
104012
104002

012130
000340
000300

177776
177776

T12:
INT5:

BR
POP2SP
ERROR
SCOPE

#DONE ,8DMBCSR
aDMBLSR

INT4B

:SET UP INTERRUPT SERVICE ADDRESS
;SET UP INTERRUPT SERVICE LEVEL
sSET INTERRUPT ENABLE
:GENERATE INTERRUPT
;DELAY FOR INTERRUPT
:NO INTERRUPT, CONTINUE
sRESTORE STALK

s INTERRUPT OCCURED, ERROR
sCHECK FOR ITERATION, LOOP

003202

000402

;'INTERRUPT ENABLE'' SET AND "DONE'' SET AT PRIORITY 6.
sREFERENCE DESIGNATION
sCLEAR CONTROL REGISTER
8DMBCSR
CLR
;SET PROCESSOR PRIORITY
#340,PS
8IC
;7O _LEVEL 6.
#300,PS
BIS

MoV

#INT5A, 30MBVEC

8IS
NOP

#DONE ,aDMBCSR

NOP

CLR

012054

INT5A:

INT58:

POP2SP
ERROR
SCOPE

PS,3DMBLVL
#INTENA ,aDMBCSR
aDMBCSR

INT58

sSET UP INTERRUPT SERVICE ADDRESS
sSET UP INTERRUPT SERVICE LEVEL
sSET _INTERRUPT ENABLE
- GENERATE INTERRUPT
;DELAY FOR INTERRUPT
sNO INTERRUPT, CONTINUE
sRESTORE STACK
s INTERRUPT OCCURED, ERROR
:CHECK FOR ITERATION, LOOP

;VERIFY THAT NO INTERRUPT OCCURS WITH

1108

003212
003212
003216

1113 003226

005077
042737
052737

012040
000340
000240

177776
177776

T13:
INT6:

1114 003232 012777 003274 012012
003264
003266

1121 003272
1122 003274

000240
005077

000402
022626

;'INTERRUPT ENABLE'' SET AND 'DONE’' SET AT PRIORITY 5.
sREFERENCE DESIGNATION
sCLEAR CONTROL REGISTER
aDMB(SR
CLR
;SET PROCESSOR PRIORITY
#340,PS
8IC
:TO _LEVEL S,
#240,PS
8IS

MoV

#INTGA, 3DMBVE C

NOP
CLR

8DMBCSR

MoV
MoV
BIS
NOP

1115 003240 013777 177776 012006
1116 003246 012777 000100 012002
1117 003254 052777 000200 011774
1118 003262 000240

1119
1120

PS,3DMBLVL
#INTENA ,aDMBCSR

MoV
MoV

1106
1107

1110
1111
1112

Mov
MoV
BIS
NOP

#INT4A,@DMBVEC

sCLEAR CONTROL REGISTER
sSET PROCESSOR PRIORITY
;TO LEVEL 7.

;VERIFY THAT NO INTERRUPT OCCURS WITH

1095 003150 013777 177776 012076
1096 003156 012777 000100 012072
1097 003164 052777 000200 012064
1098 003172 000240

1109

SDMBCSR
#340,PS
#340,PS

CLR

1096 003142 012777 003204 012102

1101

CLR
8IC
BIS

NOP

012144

1088

1099

05:47 DAGE 28

s INTERRUPT ENASLE'' SET AND 'DONE’' SET AT PRIORITY 7.
sREFERENCE DESIGNATION

MoV

012172

1086
1087

1089
1090
1091
1092
1093

;VERIFY THAT NO INTERRUPT OCCURS WITH

1068

1080

21-0CT-81

011764

INT6A:

BR
POP2SP

PS,3DMBLVL
#INTENA ,3DMBCSR
#DONE ,3DMBCSR
INT6B

;SET UP INTERRUPT SERVICE ADDRESS
sSET UP INTERRUPT SERVICE LEVEL
:SET INTERRUPT ENABLE
:GENERATE INTERRUPT
;DELAY FOR INTERRUPT
:NO INTERRUPT, CONTINUE
:RESTORE STACK

SEQ 0028

~Sr~

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.P11

MACY11 30A(1052)

CZKMFAO KMS11-BD INTERACTION TEST

CIKMFA.P11
1123
}}%g

003276
003300

20-0CT-81 17:07
104012
104002

MACY11 30A(1052)
INT6B:

1126
1127

1128

1129

003302
003302
003306
003314

1136
1137
1138

003336
003344
003352
003354
003356
003362
003364
003366
003370

005077
042737
052737

011750
000340
000200

177776
177776

012777
052777
000240

000100
000200

011712
011704

T14:
INT7:

1134 003322 012777 003364 011722
1135 003330 013777 177776 011716

1141
1142
1143
}12?
1146
1147

05:47

ERROR
SCOPE

PAGE 29
s INTERRUPT OCCURED, ERROR
;CHECK FOR ITERATION, LOOP

sVERIFY THAT NO INTERRUPT OCCURS WITH

1130
1131
1132
1133

1139
1140

21-0CT-81

000240
005077

000402
022626
104012
104002

;"'INTERRUPT ENABLE'' SET AND 'DONE'‘ SET AT PRIORITY 4.

CLR
BIC
BIS

aDMBCSR
#340,PS
#200,.PS

MOV
BIS
NOP

#INTENA,3DMBCSR
#DONE ,3DMBCSR

MOV
MoV

NOP
CLR

011674

INT7A:
INT78:

BR
POP2SP
ERROR
SCOPE

#INTPA, SDMBVE
PS, SDMBLVL

aDMBCSR

INT78

¢REFERENCE DESIGNATION
sCLEAR CONTROL REGISTER
sSET PROCESSOR PRIORITY
:TO LEVEL 4.

:SET UP INTERRUPT SERVICE ADDRESS
:SET UP_INTERRUPT SERVICE LEVEL
sSET _INTERRUPT ENABLE
sGENERATE INTERRUPT
sDELAY FOR INTERRUPT

sNO INTERRUPT, CONTINUE
+RESTORE STACK
s INTERRUPT OCCURED, ERROR
;CHECK FOR ITERATION, LOOP

SEQ 0029

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.P11"

20-0CT-81 17:07

MACY11 30A(1052)

1148

1149
1150
1151
1152
1153

003372
003372
003376

005077
042737

011660
000340

1155

003412

005077

011636

012777
052777
000240

000100
000200

1154

1156

1157
1158
1159

1160
1161
1162
1163
1164
1163

003404

003416
003424
003432
003440

003442
003444
003450
003452
003454
003456

177776

012777 003456

011640

052737

177776

000240

005077
104012
000401
022626
104002

000000

115:
INTIO:

1168
1169
1170
1171
1172

003460
003460
003464

005077
042737

011572
000340

1174
1175
1176
1177
1178

003500
003504
003512
003520
003526

005077
052737
012777
052777
000240

011550
000040
000100
000200

1173

1179

1180
1181
1182

1183
1184

003472

003530

003532
003536
003540

003542
003544

012777

000240

005077
104012
000401

003542

177776

011552

011530

011504
000340

1193

003566

005077

011462

1192
1194

1195

1196
1197
1198
1199

1200
1201
1202

1203

003560

003572

003600

003606
003614
003616
003620

003624
003626
003630

003632

012777

052737

012777

052777
000240
000240
005077

104012
000401
022626

104002

177776

003830

011464

000100

177776

000100

000200

011432

:SET PROCESSOR PRIORITY TO LEVEL 0.

011450
011442

117:
INTI2:

aDMBLVL

#INTENA,JDMBCSR
#DONE,3DMBCSR
aDMBCSR

INT108

:SET UP INTERRUPT SERVICE PRIORITY
:SET INTERRUPT ENABLE
:GENERATE INTERRUPT
:WAIT FOR INTERRUPT

:NO INTERRUPT, ERROR
: CONT INUE
: INTERRUPT OCCURED, RESTORE STACK
:CHECK FOR INTERATIONS, LOOP.

:VERJFY THAT AN INTERRUPT OCCURS WITH ‘‘INTERRUPT
SENABLE'* SET AND 'DONETM SET AT PRIORITY 1.
CLR
BIC

QDMBCSR
#340,PS

CLR
BIS
MOV
BIS
NOP

aDMBLVL
#40,PS
#INTENA,aDMBCSR
#DONE,adMBCSR

CLR
ERROR
BR
INT11A: POP2SP
INT118: SCOPE

1186

005077
042737

#0,PS

NOP

022626
104002

0035646
003546
003552

BIS

Moy

177776
011536

011520

1187
1188
1189
1190
1191

:SET UP INTERRUPT SERVICE ADDRESS

CLR
ERROR
BR
INT10A: POP2SP
INT108: SCOPE

116:
INTI1:

PAGE 30

#INTOA,aDMBVEC

MOV
BIS
NOP

1167

05:47

mov

NOP

011606

;VERIFY THAT AN INTERRUPT OCCURS WITH_‘''INTERRUPT
SENABLE'* SET AND 'DONETM SET AT PRIORITY 0.
sREFERENCE DESIGNATION
CLR
QDMBCSR
:CLEAR CONTROL REGISTER
BIC
#340,PS
:ALLOW INTERRUPTS
CLR

011624
011616

21-0CT-81

#INT1A,apmBVEC

@DMBCSR

INT118

:REFERENCE DESIGNATION
:CLEAR CONTROL REGISTER
:ALLOW INTERRUPTS

:SET UP INTERRUPT SERVICE ADDRESS

:SET UP_INTERRUPT SERVICE PRIORITY
:SET PROCESSOR PRIORITY TO LEVEL 1.
:SET_INTERRUPT ENABLE
:GENERATE INTERRUPT
:WAIT FOR INTERRUPT

:NO INTERRUPT, ERROR
: CONT INUE
: INTERRUPT OCCURED, RESTORE STACK
:CHECK FOR INTERATIONS, LOOP.

;VERIFY THAT AN INTERRUPT OCCURS WITH ‘INTERRUPT
SENABLE'* SET AND 'DONETM* SET AT PRIORITY 2.
:REFERENCE DESIGNATION
CLR
DMBCSR
:CLEAR CUNTROL REGISTER
BIC
#340.PS
:ALLOW_INTERRUPTS

MoV

#INTS2A,aDmBVEC

:SET UP INTERRUPT SERVICE ADDRESS

BIS

#100,PS

:SET PROCESSOR PRIORITY TO LEVEL 2.

CLR

MOV
BIS
NOP
NOP
CLR

ERROR
BR
INT12A: POP2SP

INT128: SCOPE

aDMBLVL

WINTENA,DMBCSR
#DONE,3DMBCSR

@DMBCSR
INT128

:SET UP INTERRUPT SERVICE PRIORITY

:SET_INTERRUPT ENABLE
:GENERATE INTERRUPT
:WAIT FOR INTERRUPT

:NO INTERRUPT, ERROR
: CONT INUE
: INTERRUPT OCCURED, RESTORE STACK

:CHECK FOR INTERATIONS, LOOP.

SEQ 0030

MACY11 30A(1052)

CZKMFAO KMS11-BD INTERACTION_TEST

20-0CT-81 17:07

CZKMFA.P11

05:47

PAGE 31

:VERIFY THAT AN INTERRUPT OCCURS WITH ''INTERRUPT
003634
003634

005077

120:

INT13:

01%

;ENABLE'' SET AND 'DONE'’' SET AT PRIORITY 3,

CLR
BIC

8DMBCSR
#340,PS

CLR
8IS
MoV

aDMBLVL
#140,PS
#INTENA ,9DMB(CSR
#DONE ,3DMBCSR

MOV
8IS
NOP

003720

005077

NOP

011344

CLR
ERROR
BR

purd

o
(=4
(=
&~
o

o
o

W
~

003706

INT13A: POP2SP
INT138: SCOPE

104002

#INTI3A,a0MBVEC

aDMB(CSR

INT138

JREFERENCE DESIGNATION

sCLEAR CONTROL REGISTER
cALLOW INTERRUPTS

JSET UP INTERRUPT SERVICE ADDRESS

sSET UP INTERRUPT SERVICE PRIORITY
;SET PROCESSOR PRIORITY TO LEVEL 3.
sSET _INTERRUPT ENABLE
s GENERATE INTERRUPT
sWAIT FOR INTERRUPT
;NO INTERRUPT, ERROR
s CONT INUE

s INTERRUPT OCCURED, RESTORE STACK
sCHECK FOR INTERATIONS, LOOP.

sVERIFY THAT ALL LINE NUMBERS CAN BE WRITTEN INTO AND
READ BACK FROM LINE COUNTER

(v
NN
N
O

003722
003722
003726
003734
003736
003742

o~
o

N
~

003754
003756
003760
003762
003764

003770
003772

005077
042737
005005
012700
010577
017704
020504
001401
104000
104003
003742
005205
005300
001364
104002

011330
000340

T21:

177776

000010
011310
011304

LINT1:

CLR
8IC
CLR
Mov
LINT1A: MOV
MoV
CMP
BEQ
ERRORC
LINT18: SCOPEF
LINT1A
INC
DEC
BNE
SCOPE

aDMBCSR
#340,PS
R5
#8.,RO
R5,8DMBCSR
8DMB(SR, R4
R5.R4
LINT1B

RS
RO
LINTIA

sREFERENCE DESIGNATION

cCLEAR CONTROL S7TATUS REGISTER
sENABLE INTERRUPTS
;CLEAR EXPECTED LINE NUMBER
sSET UP TO TEST 8 LINE NUMBERS
:SET LINE NUMBER
sREAD BACK LINE NUMBER
cARE EXPECTED AND RECEIVED
sLINE NUBMERS THE SAME
cLINE NUMBERS DIFFERENT, ERROR
sCHECK FOR DATA FREEZE
;RETURN FOR DATA FREEZE
sUPDATE LINE COUNT
cUPDATE LINE NUMBER
s CONTINUE
sCHECK FOR ITERATION, LOOP

SUSING ''STEP'® MODE, VERIFY THAT THE
JLINE COUNTER CAN BE STEPPED THRU ALL STATES.

o &

(A
S1aS)

—

—b

000010
000007
000400
011222

177776

—

104003

000340
011250

—

004042

004022
004030

0462737
005077
005005
012700
012777
052777
017704

003774
003774
004002
004006
004010
o

—-—00

WN 20OV~

— —
bbbbbbbbwwwx v S WA = OV NONINININIAINININ)
NOVEWN = O 0DV
WA= O YOO~
N =2 O O 00 NOWVNES

OO0 NONMN S

VWAV
E. &

b b o

b d o

e e

PORLALAL AN RNV

b o

b e e

b e

b b e o

b e

e red e e

D e e e

D e

e e

D e

D d b

b —d e

D D D

NINL NVNLNLAJNLNLNINLAININININIAINIRLNININ
NIAINLNININL PV NN NN NI NN NN NN NINI NN

1204
1205
1206

21-0CT-81

T22:

LINT2:

BIC
CLR
CLR
MoV
MOV
LINT2A: BIS

#340,PS
SDMBCSR
R5
#8..RO
#7 ,8DMBCSR
#STEP ,3DMBCSR

cMP
8EQ
ERRORC
LINT28: SCOPEF

R5,R4
LINT2B

MOV

#DMBCSR,Ré

sREFERENCE DESIGNATION

sENABLE INTERRUPTS
sCLEAR CONTROL STATUS REGISTER
sCLEAR EXPECTED LINE COUNT
JSET UP TO TEST 8 VALUES
sFIRST VALUE =0
sSTEP LINE COUNTER
sREAD LINE COUNTER

s COMPARE EXPECTED AND
sRECEIVED LINE NUMBERS
sLINE COUNTER ERROR
sCHECK FOR DATA FREEZE

SEQ 0031

CZKMFAO KMS11-8BD INTERACTION_TEST

CZKMFA.P11
1260
1261
1262
1263
}%gg

20-0CT-81 17:07

004044
004046
004050
004052
004054

MACY11 30A(1052)

003774
005205
005300
001363
104002

LINT2
INC
DEC
BNE
SCoPE

21-0CT-81

05:47

R5
RO
LINT2A

PAGE 32
;UPDATE EXPECTED LINE NUMBER

sCHECK FOR ITERATIONS, LOOP

1266

SWRITE 1°'S INTO ALL SCANNER MEMORY LOCATIONS.

1269

;VERIFY THAT °‘'CLEAR SCAN'' CLEARS ALL SCANNER

}%2;

}g;?

:¥SR%§; THAT ALL LOCATIONS HAVE BEEN WRITTEN

sMEMORY LOCATIONS.

1272
1273
1274
1275
1276
1277
1278
1279
1280

004056
004056
004064
004072
004076
004104
004112
004114
004116

012777
042737
012700
052777
052777
005300
001373
012700

002000
000340
000010
001017
0006400

1282
1283

004126
004134

012777
052777

000007
000400

1281

1284

1285
1286
1287
1288
1289
1290
1291
1292
1293
1296
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1206
1307
1308
}g?g

004122

004142
004146
004150
004152
004154
004156
004160
004162
004164
004166
004174
004202
004204
004210
004212
004220
004226
004232
004234
004236
004240
004242
004244
004246
004250
004252

012705

017704

020504
001403
104000
104003
004056
005205
005300
001363
012777
032777
001374
012700
005005
012777
052777
017704
020504
001403
104000
104003
004166
005205
005300
001363
104002

011172
177776
011152
011144

000010

070000

011110

011122
011114

T23:
MEMT1:

MOV
8IC
MOV
81§
MEMTIA: BIS
DEC
BNE
MoV

#CLRMUX ,3DMBCSR
#340,PS
#8. RO
#MAINT+17 ,8DMBCSR
#STEP,3DMBCSR
RO
MEMT 1A
#8. RO

JREFERENCE DESIGNATION
;CLEAR CONTROL STATUS REGISTER
sENABLE INTERRUPTS
;SET UP TC TEST 8 LOCATIONS
:SET MAINTEANCE MODE
cSET LINE COUNTER THRU ALL
;STATES, WRITING 1°'S INTO
sALL MEMORY WORDS
;SET UP TO TEST 8 WORDS

Mov
MEMT1B: BIS

#7 ,3DMBCSR
#STEP,3DMBCSR

sSTART WITH LINE 0
sACCESS SCANNER MEMORY

MOV
MOV

MEMT1C:

004000
000020

011062
011054

MEMTID:

000010

000007

000400
011024

011036

011030

MEMTIE:

MEMTIF:

13N

aDMBCSR, R4

R5,Ré
MEMT1C

cSET UP EXPECTED STATUS REGISTER
;READ DATA
;COMPARE EXPECTED AND RECEIVED
;DATA
sCONTROL STATUS OR MEMORY ERROR
sCHECK FOR DATA FREEZE

RS
RO
MEMT18
#CLRSCN,3DMBCSR
#8USY,30MBCSR
.=6
#8. RO
RS
#7 ,3DMBCSR
#STEP ,3DMBCSR
@DMBCSR,Ré
R5 R4
MEMTIF

sUPDATE EEXPECTED STATUS
sUPDATE LINE COUNT
s CONT INUE
sSET ''CLEAR SCAN''
sWAIT FOR “‘CLEAR CYCLES''

RS
RO
MEMTIE

sUPDATE EXPECTED DATA
sUPDATE LINE COUNT
sCONTTINUE
JCHECK FOR ITERATIONS, LOOP

sSET UP TO TEST 8 MEMORY
sLOCATIONS
sFIRST TO BE TESTED=0
sACCESS SEANNER MEMORY
sREAD DATA
; COMPARE EXPECTED AND RECEIVED
sDATA
sCONTROL
STATUS OF MEMORY ERROR
sCHECK FOR DATA FREEZE

SWRITE 1°S INTO SELECTED SCANNER MEMORY LOCATION.

}g}%

1314
1315

CMP
8EQ
ERRORC
SCOPEF
MEMT?
INC
DEC
BNE
MOV
BIT
BNE
MoV
CLR
MoV
BIS
MoV
CMP
BEQ
ERRORC
SCOPEFF
MEMT1D
INC
DEC
BNE
SCOPE

#70000,RS

SVERIFY THAT ONLY SELECTED LOCATION WAS WRITTEN INTO.
004254
004254

005077

010776

T24:
MEMT2:

(LR

SDMB(SR

sREFERENCE DESIGNATION
sCLEAR CONTROL STATUS REGISTER

SE@ 0032

CIZKMFAO KMS11-BD INTERACTION TEST

CZKMFA.P11

20~0CT=81 17:07

1316
1317
1318
1319
1320

004260
004266
004272
0046276
004304

042737
012700
012702
012777
032777

000340
000010
000007
004000
000020

1322
1323

004314
004322

012777
050277

001000
010730

1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337

004342
004
004354
004356

012703
012777
005202
005001

000010
000007

1321

004312

001374

177776
010752
010744

MACY11 30A(1052)

0044606

1338
1339
1340
1341
1342
1343
1344

004410
004412
004414
004416
004420
004422
004426

}gzg

004430

052777
117704
010105
120402
001002
052705
020405

000400
010664

001403

#MAINT ,3DMBCSR
R2,3DMBCSR

;SET "MAINTENANCE MODE'’
‘SET LINE COUNTER YO TEST ADDRESS=-1

MOV
MOV
INC
CLR

#8. ,R3
#7.3DMBCSR
R2
R1

*SET UP TO TEST ALL 8
*SCANNER MEMORY LOCATIONS

8IS
BIC

MEMT28: BIS
MOVB
MOV
CMP8
BNE
8IS
MEMT2C: CMP
ERRORC
SCOPEF
MEMT2A
MEMT2D: INC
DEC
BNE
DEC

1345 004426 001323

BNE

104002

SCOPE

1348
1349

1356
1357
1358
1359
1360
1361
1362
1363

1364

1365
1366
1367
1368
1369
1370
1371

. -6

#STEP,aDMBCSR
MAINT, SDMBCSR

#STEP,aDMBCSR
@DMBCSR,R&
R1.RS
R&4.R2
MEMT2C
#70000,RS
R4 RS

MEMTZ2D

R1
R3
MEMT2B
RO

MEMT2A

SWRITE 1°S INTO TEST ADDRESS
SCLEAR ‘MAINTENANCE MODE'’

;ACCESS SCANNER MEMORY
*READ CONPENTS OF MEMORY
SSET UP EXPECTED CONTENTS
S0OF SCANNER MEMORY

;COMPARE EXPECTED AND RECEIVED

:VALUES

*SCANNER MEMORY ERROR
“CHECK FOR DATA FREEZE
sTEST NEXT SCANNEB LOCATION
;UPDATE LINE COUNT
:CHECK FOR ITERATION, LOOP

;WITH ALL ACANNER MEMORY LOCATIONS SET TO 1°'S,
SWRITE 0'S INTO SELECTED LOCATION

}gg?
1352
1353
1354
1355

SEQ 0033

MOV
BIS

BNE

8EQ

104000
104003
004276
005201
005303
001356
005300

PAGE 33
;ENABLE INTERRUPTS
SSET UP TO TEST 8 ADDRESSES
*FIRST ADDRESS TO BE TESTED=0
:CLEAR ACANNER MEMORY
*WAIT FOR CLEAR CYCLE

010702

070000

05:47

#340,PS
#8. RO
#7.R2
#CLRSCN,aDMBCSR
#8USY ,aDMBCSR

010736

010670

BIC
MOV
MOV
MEMT2A: MOV
BIT

1324 004326 052777 000400 010722
1325 004334 042777 001000 010714

004360
004366
004372
004374
004376
004400
004404

21-0CT-81

:VERIFY THAT ONLY SELECTED LOCATION WAS CLEARED.

004432
004432
004436
004444

004450
004454
004460
004466
004474
004476
004500
004504

005077
042737
012700
012702
012703
012777
052777
005303
001373
010277
052777

010620
000340
000010
000007
000010
001007
000400

010570
010562

010552
000400

010544

004516
004524
004526
004530
004536
004542
004544

012777
005202
005001
052777
117704
010105
120402

000007

010532

000400
010514

010520

004512

012703

000010

177776

125:
MEMT3:

CLR
BIC
MOV
MOV
MEMT3A: MOV
MOV
MEMT38: BIS
DEC
BNE
MOV
BIS

aDMB(CSR
#340.PS
#8. .RO
#7.R2
#8. R3
#MAINT+7 , aDMBCSR
#STEP,aDMBCSR
R3
MEMT38
R2,aDMBCSR
#STEP,aDMBCSR

MOV
INC
CLR
MEMT3C: BIS
MOVB
MOV
CMP8

#7.3DMBCSR
R2
R1
#STEP,aDMBCSR
@DMBCSR.R&
R1.RS
R4.R2

MOV

#8..R$

;REFERENCE DESIGNATION
:CLEAR CONTROL STATUS REGISTER
SENABLE INTERRUPTS
*SET UP TO TEST 8 ADDRESSES

*FIRST ADDRESS TO BE TESTED=0
SWRITE 1'S INTO ALL SCANNER
*MEMORY LOCATIONS

:SET LINE COUNTER TO TEST ADDRESS-1
‘WRITE 0'S INTO TEST ADDRESS

*SET UP TO TEST ALL 8

*SCANNER MEMORY LOCATIONS
;ACESS SCANNER MEMORY
*READ CONTENTS OF MEMORY
SSET UP EXPECTED CONTENTS
10F SCANNER MEJORY

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385

004546
004550
004554
004556
004560
004562
004564
004566
004570
004572
004576
004576
004600

001002
052705
020405
001403
104000
104003
004454
005201
005303
001356
005300
001326
104002

MACY11 30A(1052)
BNE
BIS
MEMT3D: CMP
BEQ
ERRORC
SCOPEF
MEMT3A
MEMT3E: INC
DEC
BNE
DEC
BNE
SCOPE

070000

004602
004602
004606
004614
004620
004622
004630
004634
004640

1398

004652

005005

16403

004672

001002

1404

1405
1406
1407
16408
1409
1410
1411
1412
1413
1414
1415

16416
1417
1418
1419

1420

1421

1422
1423
1426
1425
1626
1427

05:47

MEMT3D
#70000,R5
R4 RS
MEMT3E

R}
R3
MEMT3(C
RO
MEMT3A

PAGE 34

s COMPARE EXPECTED AND
sRECEIVED VALUES
:SCANNER MEMORY ERROR
:CHECK FOR DATA FREEZE
JTEST NEXT SCANNER LOCATION
;UPDATE ADDRESS COUNT

;CHECK FOR ITERATION, LOOP

;BE SET AND CLEARED FOR SELECTED LINE

1388
1389
1390
1391
1392
1393
1394
1395
1396

1399
1400
1401
1402

;VERIFY THAT LINE ENABLE FUNCTION FLIP-FLOP CAN

}gg?

1397

21-0CT-81

004646

004654
004660
004664
004670
004674

004700
004702
004704

004706
004710
004712
004720
004722
004724
004726

004732
004734
004740
004744

004746

004752

004754
004756
004760
004762
004764
004766

005077
042737
012700
005001

010450
000340
000010

012777

000001

012777
012702
010177

002000
000010
010416

005077

010404

017704
117703
042703
020103

010400
010372
177760

012705

000001

177776
010426

010103
005077
105227
001375

017704

005704

001401
104001
104003
004622
005201
005300

MUX1A:

010412
mMUx18:

MUX1C:

000400

010324

CLR
8IC
MOV
CLR

SDMB(CSR
#340,PS
#8..RO
R1

sREFERENCE DESIGNATION
;CLEAR CONTROL STATUS REGISTER
sENABLE INTERRUPTS
)
JSET UP TO TEST 8 FUNCTION FLIP-FLOP
sSTART AT LINE O

MOV

#LINENA,3DMBLSR

JSELECT LINE TO BE TESTED
sSET LINE ENABLE FUNCTION FLIP-FLOP

MOV
MOV
MoV
CLR

(LR

mMov
MOov8
BIC
CMP

010336

Mux1D:

MUX1E:

aDMBCSR

SDMBL SR, R4
8DMBCSR,R3
#177760,R3
R1,R3

MUX1C

CMP
BEQ
ERRORL

RS R4
MUX1D

SCOPEF
MUX1D
BIS
DEC
BNE
CLR
MOV

010320
000000

mMov
CLR
INCB

010306

#LINENA
RS

#STEP,3DMBCSR
R
MuUx18
RS
R1,9DMBCSR

SREAD LINE STATUS REGISTER
sREAD CONTROL STATUS REGISTER
sCLEAR UNWANTED BITS
sIF LINE NUMBER=SELECTED LINE NUMBER,

cEXCEPT LINE ENABLE FUNCTION FLIP FLOP
;70 BE SET
s COMPARE EXPECTED AND RECEIVED
sRESULTS
sLINE STATUS ERROR
;EXAMINE NEXT LINE

R1.R3
aDMBL SR
#0

JSET LINE COUNTER TO SELECTED LINE
cCLEAR LINE ENABLE FLIP FLOP
;DELAY FOR CABLE

MoV

aDMBL SR, Ré

JREAD LINE STATUS REGISTER

8EQ
ERRORL
SCOPEF
MUXTA
INC
DEC

MUX1F

BNE

TST

MUX1F:

#CLRMUX ,3DMBCSR
#8.,R2
R1,9DMBCSR

BNE

mMov

020504
001403
104001

104003
004712
052777
005302
001353
0050C5
010177

T26:
Mux1:

.~4

Ré4

R1
RO

:DITTO

;WAS LINE ENABLE FUNCTION FLIP FLOP
+ CLEARED
sNO, LINE STATUS ERROR
sCHECK FOR LOOP ON SAME DATA
SSELECT NEXT LINE
sDECREMENT LINE COUNT

SEQ 1034

1428
1429

004770
004772

20-0CT-81 17:07
001314
104002

BNE
SCOPE

21-0CT-81
MUX1A

05:47

PAGE 35
sCONTINU IF NOT DONE
sCHECK FOR ITERATIONS, LOOP

MACY11 30A(1052)

SEQ (035

CZKMFAQ KMS11-~BD INTERACTION_TEST

CZKMFA.P1

MACY11 30A(1052)

1430

1442
1443
1444
1445
1446
1447

1448

004774
004774
005000
005006
005012
005014
005022
005026
005032

005040
005044
005046
005052
005056
005062

005064

005077
042737
012700
005001
012777
012702
010177
012777

005077
005005
017704
117703
042703
020103

001002

005066

012705

005072

020504

1453
1454
1455
1456
1457

005076
005100
005102
005104
005112

104001
104003
005104
052777
005302

1459
16460
1461
1462
1463
1464
16465
1466
1467
16468
16469
1470
1471
1472
1473
1474

005116
005120
0051264
005126
005132
005136
005140
005144
005146
005150
005152
005154
005156
005160
005162
005164

005005
010177
010103
005077
105227
001375
0177064
005704
001401
104001
104003
005014
005201
005300
001314
104002

1458

PAGE 30

;BE SET AMND CLEARED FOR SELECTED LINE

1449
1450
1451

1452

05:47

:VERIFY THAT TERMINAL READY FUNCTION FLIP-FLOP CAN

}2%;

1433
14346
1435
1436
1437
1438
1439
1440
14641

21-0CT-81

005074

005114

010256
000340
000010
002000
000010
010224
000002
010212

177776
010234

127:
Mux2:

MUX2A:

010220
Mux28:

010206
010200
177760

sDMB(SR
#340,PS
#8. RO
R1
#CLRMUX ,3DMBCSR
#8.,R2
R1,eDMBCSR
#TRMRDY,3DMBL SR

CLR
MOV
MOvB
8I(
CMP

RS
SDMBL SR, R4
8DMBCSR,R3
#177760,R3
R1,R3

Mov

#TRMRDY ,R5

CLR

BNE

000002

MUX2C:

001403

000400

CLR
8IC
Mov
CLR
MOV
MOV
MoV
MOV

0101446

Mux2D:

001353

CMP

BEQ

ERRORL
SCOPEF
Mux2D
BIS
DEC

BNE
010132

MUX2E:

010126
000000
010114

MUX2F:

CLR
MOV
Mov
CLR
INCB
BNE
MoV
TST
BEQ
ERRORL
SCOPEF
MUX2A
INC
DEC
BNE
SCOPE

8DMBCSR

MUX2(C

RS R4

MuUX2D

#STEP,3DMBCSR
R2

sREFERENCE DESIGNATION
sCLEAR CONTROL STArUS REGISTER
sENABLE INTERRUPTS
sSET UP TO TEST 8 FUNCTION FLIP-FLOP
:START AT LINE O
sSELECT LINE TO BE TESTED
sSET TERMINAL READY FUNCTION FLIP-FLOP
JREAD LINE STATUS REGISTER
sREAD CONTROL STATUS REGISTER
;CLEAR UNWANTED BITS
sIF LINE NUMBER=SELECTED LINE NUMBER,

SEXCEPT TERMINAL READY FUNCTION FLIP FLOP
;70 BE SET
s COMPARE EXPECTED AND RECEIVED

sRESULTS

JLINE STATUS ERROR
SEXAMINE NEXT LINE

MUX28

RS
R1,3DMBCSR
R1,R3
SDMBL SR
#0
.=4
@DMBL SR ,R4
Ré
MUX2F

R1
RO
MUX2A

JSET LINE COUNTER TO SELECTED LINE
sCLEAR TERMINAL READY FLIP FLOP
:DELAY FOR CABLE
:DITTO
sREAD LINE STATUS REGISTER
;WAS TERMINAL READY FUNCTION FLIP FLOP
s CLEARED
sNO, LINE STATUS ERROR
sCHECK FOR LOOP ON SAME DATA
SSELECT NEXT LINE
sDECREMENT LINE COUNT
;CONTINU IF NOT DONE
sCHECK FOR ITERATIONS, LOOP

SEQ 0036

Vo
Y o )

CZKMFAO KMS11-BD INTERACTION TEST
CZKMFA.PT
20-0CT-81 17:07

MACY11 30A(1052)

1475

1487
1488
1489

1490
1491
1492

1493

1494
1495
1496
1497
1498

1499
1500
1501
1502

1503
1504
1505
1506

1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519

05:47

PAGE 37

;VERIFY THAT REQUEST TO SEND FUNCTION FLIP-FLOP CAN

}2;9

1478
1479
1480
1481
1482
1483
1484
1485
16486

21-0CT-81

sBE SET AND CLEARED FOR SELECTED LINE
005166
005166
005172
005200
005204
005206
005214
005220
005226
005232
005236
005240

0052446

005077
042737
012700
005001
012777
012702
010177
012777

005077

005005
017704

117703

005250
005254

042703
020103

005260

012705

005256

005264
005266
005270

005272
005274
005276
005304

005306
005310
005312
005316

005320
005324
005330
0053
005336
005340
005342
005344
005346
005350
005352
005354
005356

001002

010064
000340
000010

177776

002000

010042

000010
010032
000004

010020

001353
005005
010177
010103

005077
105227
001375
017704
005704
001401
104001
104003
005206
005201
005300
001314
104002

MUX3A:

010026
Mux38:

010014

010006

177760

MUX3C:

007740

CLR

007752

Mux3D:

MUX3E:

007734
000000

007722

MUX3F:

aDMB(SR
#340,PS
#8..RO
R1
#CLRMUX ,3DMBCSR
#8.,R2
R1,8DMBCSR
#RS ,3DMBL SR

(LR
MOV

SDMB(SR
RS
8DMBL SR, R4

8IC
CMP

#177760,R3
R1,R3

Mov

#RS ,R5

BNE

000004

000400

CLR
8IC
MOV
CLR
MOV
MoV
MOV
MOV

MOovB

020504
001403
104001

104003
005276
052777
005302

730:
MUx3:

(MP
BEQ
ERRORL
SCOPEF
MUX3D
BIS
DEC

BNE
CLR
MOV
MoV

CLR
INCB
BNE
MoV
TST
BEQ
ERRORL
SCOPEF
MUX3A
INC
DEC
BNE
SCOPE

8DMB(CSR,R3

MUX3(C

RS R4
MUX3D

#STEP ,3DMBCSR
R

MUX38
RS
R1,8DMBCSR
R1,R3

sREFERENCE VESIGNATION
;CLEAR CONTROL STATUS REGISTER
sENABLE INTERRUPTS
SSET UP TO TEST 8 FUNCTION FLIP-FLOP
JSTART AT LINE O
;SELECT LINE TO BE TESTED
JSET REQUEST TO SEND FUNCTION FLIP-FLOP
JREAD LINE STATUS REGISTER

sREAD CONTROL STATUS REGISTER

¢CLEAR UNWANTED BITS
;IF LINE NUMBER=SELECTED LINE NUMBER,

JEXCEPT REQUEST TO SEND FUNCTION FLIP FLOP
;70 BE SET

: COMPARE EXPECTED AND RECEIVED
JRESULTS
sLINE STATUS ERROR
sEXAMINE NEXT LINE

sSET LINE COUNTER TO SELECTED LINE

aDMBL SR
#0
.4
@DMBL SR R4
Ré
MUX3F

;CLEAR REQUEST TO SEND FLIP FLOP
;DELAY FOR CABLE
:DITTO
READ LINE STATUS REGISTER
;WAS REQUEST TO SEND FUNCTION FLIP FLOP
s CLEARED
sNO, LINE STATUS ERROR
sCHECK FOR LOOP ON SAME DATA

R1
RO
MUX3A

sSELECT NEXT LINE
<DECREMENT LINE COUNT
<cCONTINU IF NOT DONE
cCHECK FOR [TERATIONS, LOOP

SEQ 0037

TM)~

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.PT
20-0CT-81 17:07

MACY11 30A(1052)

1520
005360
005360
005364
005372
005376
005400
005406
005412
005416

012777
012702
010177
012777

1533
1534

005430
005432

005005
017704

007622

1536

005442

042703

177760

1537
1538
1539
1540
15641

1542
1543
15644
1545
15646
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564

05:47

PAGE 38

SEQ 0038

:BE SET AND CLEARED FOR SELECTED LINE

1523
1526
1525
1526
1527
1528
1529
1530
1531

1535

SVERIFY THAT SECONDARY TRANSMIT FUNCTION FLIP-FLOP CAN

}gg;

1532

21-0CT-81

005424

005436
005446
005450
005452
005456

005460
005462
0054646
005466
005470
005476

005500
005502
005504
005510
005512

005516
005522

005524

005530
005532
005534
005536
005540
005542
005544
005546
005550

005077
0462737
012700
005001

005077

117703

020103
001002
012705

007672
000340
000010

177774

002000

007650

000010
007640
000010

007625

MUX4B:

007614

007546

017704

097530

005704
001401
104001
104003
005400
005201
005300
001314
104002

MOV

007560

Mux4D:

MUX4E:

007542
000000

MUX&GF@

SDMB(SR
#340,PS
#8. RO
R1

sREFERENCE DESIGNATION
sCLEAR CONTROL STATUS REGISTER
;ENABLE INTERRUPTS
JSET UP TO TEST 8 FUNCTION FLIP-FLOP
;START AT LINE O

MOV
MOV
MOV

#CLRMUX ,@DMBCSR
#8.,R2
R1,8DMBCSR
#SECTX,3DMBLSR

(LR
MoV

RS
aDMBL SR, R4

SJREAD LINE STATUS REGISTER

#177760,R3

sCLEAR UNWANTED BITS

CLR

BIC

MUX4C:

000400

CLR
8IC
MoV
CLR

MOvV8

000010

001353
005005
010177
010103
005077
105227
001375

MUX&A:

B}
007634

020504

001403
104001
104003
005470
052777
005302

T31:
MUxé:

aDMBCSR

8DMBCSR,R3

CMP
BNE
MOV

R1,R3
MUX&(C
#SECTX,RS

(MP

R5,R4

BEQ
ERPORL
SCOPLF
MUX4D
BIS
DEC

BNE
CLR
MOV
MoV
CLR

INCB
BNE
MOV
TST
BEQ
ERRORL
SCOPEF
MUX4A
INC
DEC
BNE
SCOPE

MUX&D

#STEP ,3DMBCSR
R2
MUX4B
RS
R1,3DMBCSR
R1.R3
8DMBL SR
#0
.~
aDMBL SR, R4
R&
MUX&F

R1
RO
MUX4A

sSELECT LINE TO BE TESTED
sSET SECONDARY TRANSMIT FUNCTION FLIP-FLOP

JREAD CONTROL STATUS REGISTER
sIF LINE NUMBER=SELECTED LINE NUMBER,
JEXCEPT SECONDARY TRANSMIT FUNCTION FLIP FLOP
;70 BE SET
:COMPARE EXPECTED AND RECEIVED
;RESULTS
cLINE STATUS ERROR
JEXAMINE NEXT LINE

sSET LINE COUNTER TO SELECTED LINE
JCLEAR SECONDARY TRANSMIT FLIP FLOP
:DELAY FOR CABLE
:DITTO
JREAD LINE STATUS REGISTER
cWAS SECONDARY TRANSMIT FUNCTION FLIP FLOP
s CLEARED
¢NO, LINE STATUS ERROR
sCHECK FOR LOOP ON SAME DATA
;SELECT NEXT LINE
;DECREMENT LINE COUNT
sCONTINU IF NOT DONE
sCHECK FOR ITERATIONS, LOOP

CIKMFAQ KMS11-BD INTERACTION TEST
CZKMFA.P11
20-0CT-81 17:07

CIKMFAO KMS11-BD INTERACTION_TEST
20-0CT-81 17:07
CZKMFA. P11

MACY11 30A(1052)

1565

1566
1567
1568

1571

005556

005642
005644

020405
001403

o
(=

[V ,]
N

005632
005634
005636

005602
o

~NON
= OO0
(V.
P
WA

005077

04273~

012700
005001
012702
010177
012777
005077
005005
017704
117703
042703
020103
001002
012705

005570
005572
005576
(=4
(=}

W [a¥]

o0 0o COODO0QO
N NNNNNVY ~J

—

d e
e

NVANA NN NN

e e
e

AN NN

b e
d

005552

005614

005616
005622
005626

007500

000340

000010

000010
007454
000003
007442

177776

T32:
Mux5:
MUXSA:

007450

MUx58:

007436
007430
177760

MUXSC:

0000061

177
777

007356
000002

000400

007343

%27

000000

007374

MUXSD:

007352

MUXSF
007320

CLR
(LR

aDMBCSR
RS

sCLEAR CONTROL REGISTER
sCLEAR EXPECTED RESULT

#177760,R3
R1,R3
MUX5C

;CLEAR UNWANTED BITS
s1F RECEIVED LINE=SELECTED LINE
JEXPECT LINE ENABLE AND

MOV
MOV

MOV
MOvV8

;8 LINES
JSELECT A LINE
R1,8DMBCSR
#LINENA+TRMRDY ,@DMBLSR ;SET LINE ENABLE +TRMRDY
SDMBL SR, R4
#DMBCSR,R3

#LINENA+TRMRDY+C0+CS,R5

JREAD LINE STATUS
JREAD LINE NUMBER

(MP
8EQ
ERRORL

R4 RS
MUX5D

;CLEAR TO SEND AND CARRIER ARE SET
s COMPARE EXPECTED AND
JRECEIVED RESULTS
JLINE STATUS ERROR

BIS
DEC

#STEP ,3DMBCSR
R2

;UPDATE LINE COUNTER
sCONTINUE IF ALL CHECKS

MOV

#LINENA,RS

SCOPEF
MUX5D

BNE
MUXSE:

sJREFERENCE DESIGNATION
sCLEAR CONTROL REGISTER
sENABLE INTERRUPTS
JSET UP TO TEST 8 LINES
JSTART AT LINE O

CLR
BIC
MoV
CLR
MOV

MOV

000143

012?05

&~ —-o:;l-ovwvoo
o

o
orn

N —b b

005666

052777

-0—-0008-‘000
QON=OOH =

005654

2288333
VAW
N

—

-—h

-—

28823R

1594

PAGE 39

aDMB(SR
#340,PS
#8. RO
Ri
#8.,R2

8IC
CMP
BNE

b e

1591

05:47

JAND TERMINAL ARE SET FOR SELECTED LINE.
005552

586
587

;VERIFY THAT CLEAR TO SEND AND CARRIER ARE SET IF '‘LINE ENABLE"

1569

1570

21-0CT-81

MOV

MoV
8I(
INCB
BNE

Mux58
R1,R3

R1,9DMB(SR
#TRMRDY ,8DMBL SR
#0
.=é

MoV
P
8EQ
ERRORL
gsggif

SDMBL SR ,Ré
RS ,Ré
MUXSF

INC
(LR
DEC
BNE
SCoPE

R1
SDMBL SR
Y
MUXSA

JARE NOT DONE FOR THIS LINE
JEXPECT LINE ENABLE

;ON SELECTED LINE

JSELECT LINE
sCLEAR TERMINAL
;DELAY FOR CABLE
;DITTO
JREAD LINE STATUS REGISTER
;ONLY LINE ENABLE SHOULD BE
JSET ON THIS LINE
JLINE STATUS ERROR

;CHECK FOR LOOP ON SAME DATA
JUPDATE LINE NUMBER
;CLEAR LINE STATUS REGISTER
JCONTINUE [F ALL LINES NOT
JTESTED
JCHECK FOR [TERATIONS, LOOP

SEQ 0039

21-0CT-81

05:47

~
~

005746

o 000000
S 3=y 3=
o JurQururd
VYAl OO
o

;VERIFY THAT RING IS SE T IF
sAND REQUEST TO SEND ARE SET
007304
000340
000010
000010
007246
007242
007234
177760

133:
MUX6:

020405
001403

000400
000001

007162
000004
000000

SEREXNNSara&

006102

sREFERENCE DESIGNATION
sCLEAR CONTROL REGISTER
;ENABLE INTERRUPTS
;SET UP TO TEST B8 LINES

MUX6C:

CMP
BEQ

R4 RS
MUX6D

MUX6D:

BIS

:gTEP.ODHBCSR

MUXG6E:

MOv
MOV

MUX6A:

MUX68:

MUXG6F:

104002

NE ENABLE'’
R SELECTED LINE.

aDMBCSR
#340,PS
#8..RO
sSTART AT LINE O
R1
#8. ,R2
:8 LINES
sSELECT A LINE
R1,8DMBCSR
#LINENA+RS ,8DMBLSR
;SET LINE ENABLE +RS
sCLEAR CONTROL REGISTER
aDMBCSR
sCLEAR EXPECTED RESULT
RS
R4
SR,
S8DMBL
sREAD LINE STATUS
sREAD LINE NUMBER
@DMBCSR,R3
sCLEAR UNWANTED BITS
3
#177760,R
sIF RECEIVED LINE=SELECTED LINE
R1,R3
MUX6C
sEXPECT LINE ENABLE AND
#LINENA+RS+RING,R5

007144

007124

PAGE 40

CLR
8IC
MOV
CLR
MOV
MoV
Mov
CLR
(LR
MOV
Movse
8IC
CMP
BNE
Mov

000205

3SR onases

VWAV

OB WWNI=OWVO~N[« V. P JV [ N2 J =] O 00 NN

b e e

D cah b

OO
O O

b o

b —d

RN RNINPOPONINININ)
= b b b b b b b
PIIITIIISNS quuug WNN
NN = O O 00 NON N NN = OO 00 O N SN

o b b d b d e b e e D b D D b D e e d e e D e D d i D—
oo e Yo Ne e Yo dode Yoo Yoo Yo Yo Yo Yo Yo To Yo Jo Lo Yo Yoo o
-

CZKMFAO KMS11-BD INTERACTION TEST
20-0CT-81 17:07
CZKMFA.P11

MACY11 30A(1052)

MoV
8IC
INCB
BNE
MoV
cCMP
BEQ
ERRORL
SCOPEF
MUX6A

INC
CLR
DEC
BNE
SCOPE

MUX68

RS
#LINENA,
R1,R3

R1,3DMBCSR
#RS,3DMBLSR
#0
.~4
SDMBLSR,Ré
R5.R4
MUX6F

R1
aDMBL SR
RO
MUX6A

sRING IS SET

; COMPARE EXPECTED AND
SRECEIVED RESULTS
sLINE STATUS ERROR

;UPDATE LINE COUNTER
sCONTINUE IF ALL CHECKS

sARE NOT DONE FOR THIS LINE
cEXPECT LINE ENABLE
sON SELECTED LINE

sSELECT LINE
;CLEAR REQUEST TO SEND
;DELAY FOR CABLE
;01770
sREAD LINE STATUS REGISTER
JONLY LINE ENABLE SHOULD BE
sSET ON THIS LINE
sLINE STATUS ERROR
sCHECK FOR LOOP ON SAME DATA

;UPDATE LINE NUMBER
sCLEAR LINE STATUS REGISTER
sCONTINUE IF ALL LINES NOT
sTESTED
sCHECK FOR ITERATIONS, LOOP

SEQ 0040

CZKMFAO KMS11-BD INTERACTION_TEST
20~-0CT-81 17:07
P
CZKMFA.PI11

MACY11 30A(1052)

1657
1658
o

b
b e

05:47

PAGE 41

;VERIFY THAT SECONDARY RECEIVE IS SET IF ‘LINE ENABLE"

177776

o Yo Yo o Xo
NNSNNW ~
VESS NN — O Voo~

;AND SECONDARY TRANSMIT ARE SET FOR SELECTED LINE.
005077

21-0CT-81

000011
007052

MUX7A:
007060
MUX78:

007046
007040
177760

012705

T34:
MUX7:

MUX7C:

020405
001403
104001
000400

007004

000001

006766
000010
000000

MUX?7D:

MUX?7E:

006762

MUX7F:

006730
104002

8DMBCSR
#340,PS
g?..RO

MOV
MOV

;8 LINES
#8. ,R2
sSELECT A LINE
R1,3DMBCSR
;SET LINE ENABLE +SECTX
#LINENA+SECTX,9DMBLSR

MoV
CLR
CLR
MoV
mMovBe
8IC
CMP
BNE

aDMBCSR
RS
aDMBL SR, R4

sCLEAR CONTROL REGISTER
sCLEAR EXPECTED RESULT
sREAD LINE STATUS

#177760,R3
R1,R3
MUX7¢C

sCLEAR UNWANTED BITS
sIF RECEIVED LINE=SELECTED LINE
sEXPECT LINE ENABLE AND

CMpP
BEQ
ERRORL

R4 RS
MUX7D

sSECONDARY RECEIVE IS SET
s COMPARE EXPECTED AND
SRECEIVED RESULTS
sLINE STATUS ERROR

BIS
DEC
BNE
MoV
Mov

#STEP ,3DMBCSR
R2
MUX78
#LINENA,RS
R1,R3

;UPDATE LINE COUNTER
sCONTINUE IF ALL CHECKS
sARE NOT DONE FOR THIS LINE
sEXPECT LINE ENABLE
sON SELECTED LINE

8IC
INCB

#SECTX,8DMBLSR
#0

;CLEAR SECONDARY TRANSMIT
;DELAY FOR CABLE

MoV
CMP
BEQ
ERRORL
:SQ;EF

8DMBL SR, Ré
RS ,Ré&
MUX7F

sREAD LINE STATUS REGISTER
sONLY LINE ENABLE SHOULD BE
SSET ON THIS LINE
sLINE STATUS ERROR
;CHECK FOR LOOP ON SAME DATA

INC
CLR
DEC
BNE
SCOPE

R1
aDMBL SR
RO
MUX7A

SCOPEF
MUX7D

MOV
BNE

006750

sCLEAR CONTROL REGISTER
sENABLE INTERRUPTS
sSET UP TO TEST B8 LINES
sSTART AT LINE 0

CLR
BIC
MoV

Mov

000031

sREFERENCE DESIGNATION

@DMBCSR,R3

#LINENA+SECTX+SECRX,R5

R1,8DMBCSR
.=4

sREAD LINE NUMBER

sSELECT LINE
:DITTO

;UPDATE LINE NUMBER
sCLEAR LINE STATUS REGISTER
sCONTINUE IF ALL LINET NOT
sTESTED
sCHECK FOR ITERATIONS, LOOP

CZKMFAO KMS11-8D INTERACTION_TEST

CZKMFA.P11

20-0CT-81 17:07

MACY11 30A(1052)

1703

1704
1205

1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738

21-0CT-81

05:47

PAGE 42

;VERIFY THAT ''CLEAR MULTIPLXER'' CLEARS ALL MULTIPLEXER
:FUNCTION FLIP=FLOPS
006336
006336
006342
006350
006354
006362
006370
006372
006374
006376
006402
006410
006414
006420
006422
006626
006426
0064630
006632
006434
006436
006444
005450
006452
00645¢
006456
006460
006462
006464
006470
0064672
006474

005077
042737
012700
012777
052777
005300
001370
005003
012700
012777
010377
017704
005005
005704
001403
104001
104003
006402
005205
052777
017704
020504
001403
104001
104003
006402
005203
005077
005300
001346
104002

006714
000340
000010
000017
000400

000010
002000
006642
006640

000001
006610

177776
006676
006666

006646

006614

135:
MUX8:

MUX8A:

MUX8B:
MUXSC:

MUX8D:

MUXBE:

006570

CLR
BIC
MOV
MOV
BIS
DEC
BNE
CLR
MOV
MOV
MOV
MOV
CLR
TST
BEQ
ERRORL
SCOPEF
MUX88
INC
BIS
MOV
CMP
BEQ
ERRORL
SCOPEF
MUX88
INC
CLR
DEC
BNE
SCOPE

@DMBCSR
#340,PS
#8..R0
#17,3DMBLSR
#STEP,aDMBCSR
RO
MUXBA
R3
#B.,RO
WCLRMUX,SDMBCSR
R3,3DMBCSR
@DMBLSR.R4
RS
Ré
MUX8D

;REFERENCE DESIGNATION
:CLEAR CONTROL REGISTER
:ENABLE INTERRUPTS
:SET UP TO TEST 8 LINES
:WRITE 1S INTO ALL MULTIPLEXER
:FUNCTION FLIPFLOPS

;SET UP FOR 8 LINES
;CLEAR_MULTIPLEXER
:SELECT LINE
:READ LINE STATUS REGISTER
:EXPECT 08
:WAS LINE STATUS REGISTER CLEARED
;LINE STATUS ERROR
:CHECK FOR LOOP ON SAME DATA

RS
WLINENA,@DMBLSR
@DMBLSR,R4
RS,Ré
MUXSE

sEXPECT LINE ENABLE
:SET LINE ENABLE ON SELECTED LINE
:READ LINE STATUS REGISTER
1S ANYTHING BUT LINE ENABLE SET

R3
@DMBLSR
RO
MUXBC

;UPDATE LINE NUMBER
:CLEAR CURRENT LINE
CONTINUE IF ALL LINES NOT
:TESTED
:CHECK FOR ITERATIONS, LOOP

;LINE STATUS ERROR
:CHECK FOR LOOP ON SAME DATA

1740
1741

;WRITE 1'S INTO ALL SCANNER MEMORY LOCATIONS

1243

:VERIFY THAT AN INTERRUPP OCCURS FOR EACH LINE

1742

1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
1758

:SET

006476
006476
006504
006510
006516
006522
006530
006536
006544
006346
006550
006554
006562
006570

012777
005077
042737
012700
012777
052777
012777
005300
001370

012705
012777
013777
012700

002000
006546
000340
000010
001007
000400
000001

070340
006654
177776
000010

006552
177776
006526
006520
006514

006470

006464

136:
SCNT1:

MOV
CLR
8IC
MOV
MOV
SCNT1A: BIS
MOV
DEC
BNE

MOV
MOV
MOV
MOV

"LINE ENABLE FOR ALL LINES

#CLRMUX,aDMBCSR
aDMBCSR
#340,PS
#8..R0
#MAINT+7,.30MBCSR
WSTEP,aDMBCSR
#LINENA,3DMBLSR
RO
SCNTIA

#70340,RS
#SCNT1C,aCMBVEC
PS,apMB(VL
#8..RO

;REFERENCE DESIGNATION
:CLEAR ALL MULTIPLEXER FLIPFLOPS
:CLEAR CONTROL REGISTER
:ENABLE INTERRUPTS
:SET UP TO WRITE 1S INTO
:ALL_SCANNER MEMORY LOCATION
SWRITE A LOCATION
SLET "LINE ENABLE"
o
e
SEXPECT 'DONE**+''SCNENA''+*'COF**+*'CSF**+*
SECRXF*
:SET UP_LOCAL INTERRUPT SERVICE
:SERVICE AT LEVEL 7

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.PT
20-0CT-81 17:07

000107
000340
000040
000340
006426

1759
1760

MACY11 30A(1052)

21-0CT-81

05:47

#iNTENA*?.iDHBCSR
#340,PS

SCNT18B:

#SCNENA
, 3DMBCSR

#340,PS
aozscsa

#340,PS
R4
aDMBCSR,

000340
006412

PAGE 43

SEQ 0043

sSET INTERRUPT ENABLE
sLOCK OUT INTERRUPTS
s START SCANNER
¢ENABLE INTERRUPTS
cWAJT FOR DONE

;PROGRAM WILL HANG HERE
;JF _DONE NEVER SETS
s INTERRUPT DID NOT OCCUR
: ERROR

*CONTROL STATUS ERROR

*CHECK FOR LOOP ON SAME DATA
SCNT1C:

006374

000240

006354

SCNT1D
,
8DMBCSRR4
R5 R4
SCNT1D

SCNT1D:

:gCNENA*DONE.QDHBCSR

RC
SCNT18

001335
106002

s INTERRUPT OCCURED, REPOSITION STACK
cREAD CONTROL STATUS
;ARE EXPECTED AND RECEIVED
sREGISTERS THE SAME
¢NO, LINE STATUS ERROR
sCHECK FOR LOOP WITH CURRENT DATA
;CLEAR SCAN ENABLE AND DONE
cUPDATE EXPECTED RESULT
;CONTINUE IF NOT DONE

cCHECK FOR ITERATIONS, LOOP

sWRITE 1°S INTO ALL MULTIPLEXER FUNCTION FLIP-FLOPS

s CLEAR SCANNER MEMORY

;VERIFY THAT AN INTERRUPT OCZURS FOR EACH LINE

012700
012777
005077

333
83%

004000
000020

WA
—

000010
170340
007100

S WA =2O 000NN

d e

D mdd =

—d od

00 00 0o GO 00 0B O GO 00 OV OB 00 00 OO

d md

1795

000010
002000
006326
000340
000017
000400

000107
000340
000040
000340
006202

177776

375

000340
006166

006332
177776

006314
006304

006272
006264

006240

137:
SCNT2:

MoV
MoV
CLR
BIC
SCNT2A: MOV

8IS
DEC
BNE

#CLRMUX
, 3DMBCSR
aDMBC SR

#340,PS
#17,aDMBL
SR

:3rép.aonacsn
SCNTZ2A

sREFERENCE DESIGNATION
JWRITE

1S INTO ALL

cCLEAR MULTIPLEXER
sMULTIPLEXER FUNCTION
JENABLE TELETYPE INTERRUPTS
sFLIPFLOPS

#CLRSCN,3DMBCSR
lBgSY.aDHBCSR

sCLEAR SCANNER MEMORY
sWAIT FOR CLEAR CYCLE TO COMPLETE

MOV
MoV
MOV
MoV
MOV

#8. RO

sSET UP TO TEST 8 LINES

8IS
gl(

#SCNENA, 9DMBC SR

MOV

8IT

BNE

SCNTZ28: BIS

1ST8

BPL

127776

#8..RO

8IS

MOV

ERRORC

#170340,RS

#SCNT2C
. QDMBVEC
PS,aDM8LVL

liNIENA*?.ODHBCSR
#340,PS
#340,PS
aDMBC SR

#340,PS
R4
8DMBCSR

sFIRST EXPECTED RESULT
sSET UP LOCAL INTERRUPT RETURN

sSET INTERRUPT ENABLE
sLOCK _OUT INTERRUPTS
:START SCANNER
sENABLE INTERRUPTS

;WAIT FOR DONE

¢PROGRAM WILL HANG HERE
sIF DGNE NEVER SETS
sLOCK OUT INTERRUPTS
sREAD CONTROL STATUS
s INTERRUPT DID NOT OCCUR

CZKMFAO KMS11-BD INTERACTION_TEST
w

—

o -]

CZKMFA.P11
1816
1817
1818
1819
1820
1821
1822
1823
1824

1825
1826
1827
1828
1829

1830
1831
1832
1833
1834
1835
1836
1837

20-0CT-81 17:07

007072

007074
007076
007100
007102
007106
007110
007112
007114
007116

007120
007126
007130
007132
007134

042777
005205
005300
001335
104002

05:47

B8R
SCNT2C: POP2SP

006150

sCHECK FOR LOOP ON CURRENT DATA

SCNT2D

MOV

@DMBCSR, R4

BEQ
ERRORC

SCNT2D

CMP

R5,.R4

ggg?SF

000240

006130

SCNT2D: BIC
INC
DEC

BNE

SCOPE

PAGE 44

s CONTINUE
s INYERRUPT OCCURED, RESTORE STACK
sREAD CONTROL STATUS REGISTER

;COMPARE TO EXPECTED RESULT
;CONTROL STATUS ERROR

sCHECK FOR LOOP ON CURRENT DATA

#SCNENA+DONE ,aDMBCSR
RS
RO

SCNTZ2B

sCLEAR SCAN ENABLE AND DONE
sUPDATE EXPECTED RESULT
cCONTINUE IF ALL

cLINES NOT TESTED

cCHECK FOR ITERATIONS, LOOP

;FOR USE WITH THE H317-M DISTRIBUTION PANEL

;H3256 TEST CONNECTORS REPLACE MODEM CABLES

012737
042737

1842
1843
1844
1845
1846
1847
1848
1849

007154
007156
007160
007162
007164
007166
007170
007172

016433
104013
016466
000000
000007
015374
104004
016430

1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866
1867
1868
;ggg

sSINGLE LINE CABLE TEST

007136
007136
007144

1850
1851
1852
1853
1854

21-0CT-81

ggg?gf

104003

006712
900410
022626
017704
020504
001403
104000
104003
006712

1838
1839
1840
1841

MACY11 30A(1052)

0C7i52

104004

007156
000340

002306
177776

1100:

STRLIN: MOV
BIC

TYPE

WSTRLNA,KRET
#340.PS

STRLNA: INSTRG

sREFERENCE DESIGNATION

:SET_UP FOR NEW LINE SELECTION
:ENABLE INTERRUPTS
N

:TYPE "'SINGLE LINE CABLE TEST
:GET LINE NUMBER

MLINE]
0
7
LINE
TYPE
MCRLF

VERIFY THAT LINE ENABLE FUNCTION FLIP-FLOP CAN
:BE SET AND CLEARED FOR SELECTED LINE
007174

007174
007200
007206
007212
007220
007224
007230
007236
007242
007244
007250
007254
007260
007262
007264

005077
042737
013701
012777
012702
010177
012777
005077
005005
017704
117703
(042703
020103
001002
012705

006056
000340
015374
002000
000010
006026
000001
006014
006010
005002
177760

000001

1101:

177776

006036
006022

MUX11:

(LR
BIC

MoV

@DMBCSR
#340.PS
LINE R1

MUX11A: MOV
MoV
MoV

#CLRMUX ,3DMBCSR
#8.,R2
R1,8DMBCSR

MUX118:

R
@DMBL SR, R4

MOV
CLR

CLR
Mov

Movs
8IC
CMP
BNE
Mov

#LINENA ,QDMBL SR
igHBCSR

a8DMB(SR,R3
#177760,R3

R1,R3
MUX11¢
#LINENA
RS

:REFERENCE DESIGNATION

:CLEAR CONTROL STATUS REGISTER
ENABLE INTERRUPTS

sSELE C } LINE TO BE TESTED
JSET LINE ENABLE FUNCTION FLIP-FLOP
JREAD LINE STATUS REGISTER

sREAD CONTROL STATUS REGISTER
JCLEAR UNWANTED BITS

¢1F LINE NUMBER=SELECTED LINE NUMBER,
SEXCEPT LINE ENABLE FUNCTION FLIP FLOP

;TO BE SET

SEQ 0044

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA. P11

007270

20-0CT-81 17:07

MUX11C: CMP

020504

000400

O 00 ~JONN IS NN

22E2e22e

d e ad
d e
b
—d

007346
007350

005746

MUX11D:

21-0CT-81
RS R4
MUx11D

ggTEP.aDHBCSR

005730
000000

MUX118
RS
R1.,8DMBCSR
R1,R3
aDMBL SR
#0

005716

GDHBLSR Ré

005734

1881

MACY11 30A(1052)

MUX11E:

-4

HUX11F
MUXT11F:

05:47

PAGE 45
gggPARE EXPECTED AND RECEIVED

:LINE STATUS ERROR

sEXAMINE NEXT LINE

JSET LINE COUNTER TO SELECTED LINE
sCLEAR LINE ENABLE FLIP FLOP
gE%Ag FOR CABLE

:READ LINE STATUS REGISTER
JWAS LINE ENABLE FUNCTION FLIP FLOP
: CLEARED

¢NO, LINE STATUS ERROR
;CHECK FOR ITERATIONS, LOOP

SEQ 0045

CZKMFAO KMS11-BD INTERACTION_TEST
P11
CZKMFA.
20-0CT-81 17:07

21-0CT-81

MACY11 30A(1052)

05:47

PAGE 46

;VERIFY THAT TERMINAL READY FUNCTION FLIP-FLOP CAN
cBE SET AND CLEARED FOR SELECTED LINE
007352

002008

777

0
000002
005636

005660

CLR
BIC
MoV

MUX12A: MOV

MOV

)

012705
007446
007450
007452
007454
007456
007460
007466
007470
007472
007474
007500
007502
007506
007512

005644
MUX12B:

052777
005302
001353
005005
010177
010103
005077
105227

001375
017704
005704
001401

104001
104002

000400

aDMBCSR
RS

aDMBL SR, R4
SDMBCSR.R3

R1,R3

MUX12C

#TRMRDY ,RS

000002

005579

sREFERENCE DESIGNATION
;CLEAR CONTROL STATUS REGISTER
sENABLE [NTERRUPTS

#CLRMUX ,@DMBCSR

#8.,R2
R1,3DMBCSR

#177760.R3

020504
001403

104001
104003
007460

aDMBCSR

#340,PS
LINE R

#TRMRDY
, 3DMBL SR

177760

d D

NN
NN =

177776

005632
005624

D o
D e
D d d
) i
i
e
e e
o
D e e
md

NN N—l—l-‘—b—l—b—‘-‘—l—l

O O 0 0 0 0 O O VOOV VOOV VOO0

e o

005700
000340
015374

077

) b e o

comwombwwao§§§§§§§§§

1900

77
37
01

T102:
MUX12:

sSELECT LINE TO BE TESTED
;SET TERMINAL READY FUNCTION FLIP-FLOP
JREAD LINE STATUS REGISTER
READ CONTROL STATUS REGISTER
:CLEAR UNWANTED BITS
sIF LINE NUMBER=SELECTED LINE NUMBER,
sEXCEPT TERMINAL READY FUNCTION FLIP FLOP

MUX12C:

R5.R4
MUX12D

:70 BE SET
;COMPARE EXPECTED AND RECEIVED
cRESULTS
LINE STATUS ERROR

MUX12D:

:STEP.ODHBCSR

EXAMINE NEXT LINE

MUX128

005556

MUX12E:

005552

000000

005540
BEQ
ERRORL
MUX12F: SCOPE

RS
R1,9DMBCSR
R1,R3
SR
aDMBL
#0
=4
R4
4DMBLSR
R

MUX12F

sSET LINE COUNTER TO SELECTED LINE
;CLEAR TERMINAL READY FLIP FLOP
;DELAY FOR CABLE
DuTT0
JREAD LINE STATUS REGISTER

sWAS TERMINAL READY FUNCTION FLIP FLOP

s CLEARED
sNO, LINE STATUS ERROR
sCHECK FOR ITERATIONS, LOOP

SEQ 0046

CZKMFAQ %?511-80 INTERACTION_TEST
20-0CT-81 17:07

CZKMFA.P

21-0CT-81

MACY11 30A(1052)

[

05:47

PAGE 47

sVERIFY THAT REQUEST TO SEND FUNCTION FLIP-FLOP CAN

;BE SET AND CLEARED FOR SELECTED LINE
007530
007530
007534
007542
007546
007554

177776

005502

005460
117703

b D e

b i e e

D e e o

D D e

)

00 V0V OO0V OO0

VWA VAL

) e el

D i

D D de

D D ol d el e ==

el o NelVelNelol
e}
W
RRLRRLRRLL NeR
gwwugww
NOAWNE
NN

1931

177760

001401
104001
106002

CLR
CLR

Mov
Movs

MOV

MUX13C: CMP

BEQ
ERRORL
SCOPEF

104001
104003

001375
017704
005704

MoV
MOV
MOV

8IC
cMP
BNE

020504
001403

105227

Mov

MUX138:

005454
005446

CLR
8IC

MUX13A: MOV

005466

000004

007636
052777
005302
001353
005005
010177
010103
005077

T103:
MUX13:

000400

005400
005374

000000

005362

005412

MUX13D
MUX13D: BIS
DEC
BNE
CLR
MUX13E: MoV
MoV

CLR
INCB
BNE
MOV
TST

BEQ
ERRORL
MUX13F: SCOPE

aDMBCSR
#340,PS

LINE ,R1

sREFERENCE DESIGNATION
;CLEAR CONTROL STATUS REGISTER
sENABLE INTERRUPTS

#CLRMUX ,aDMBCSR

#8..R2
R1,9DMBCSR

#RS ,3DMBLSR
aDMBCSR

RS
R4
BL
SR,
a8DM
aDMBCSR,R3

#177760,R3

R1,R3
MUX13C

#RS RS

R5,Ré4
MUX13D

#STEP ,3DMBCSR

sSELECT LINE TO BE TESTED

sSET REQUEST TO SEND FUNCTION FLIP-FLGP

sREAD LINE STATUS REGISTER
READ CONTROL STATUS REGISTER
¢CLEAR UNWANTED BITS
sJF LINE NUMBER=SELECTED LINE NUMBER,

JEXCEPT REQUEST TO SEND FUNCTION FLIP FLOP

.70 BE SET

:COMPARE EXPECTED AND RECEIVED
RESULTS

:LINE STATUS ERROR
JEXAMINE NEXT LINE

MUX138
RS

R1,8DMBCSR

R1,R3
SR
aDMBL

.-‘
@DMBL SR, R&
Ré

MUX13F

JSET LINE COUNTER TO SELECTED LINE
sCLEAR REQUEST TO SEND FLIP FLOP
sDELAY FOR CABLE
:DITTO
sREAD LINE STATUS REGISTER
:WAS REQUEST TO SEND FUNCTION FLIP FLOP
s CLEARED
sNO, LINE STATUS ERROR
sCHECK FOR ITERATIONS, LOOP

SEQ 0047

MACY11 30A(1052)

21-0CT-81

4
05:47

PAGE 48

SEQ 0048

;VERIFY THAT SECONDARY TRANSMIT FUNCTION FLIP-FLOP CAN
;BE SET AND CLEARED FOR SELECTED LINE
007706
007706
007712
007720
007724
007732

005344
000340
015374

002000
000010
005314

000010
005302

177776

005324

005310

22825252

O
]
O

d
b d
b
b d
b
b
b
b

000010

020504
001403

1988

10012

MUX14C:

104001
106002

010014
052777
005302
001353
005005
010177
010103
005077
105227
001375
0177064
005704
001401
104001

104002

000400

005222
005216
000000

005204

005234

CLR
8IC
MOV

MUX14A: MOV
MOV
MoV
MOV
CLR
MUX148B:

005276
005270
177760

012705

T104:
MUX14:

aDMBCSR
#340,PS
LINE ,R1

#CLRMUX ,3DMBCSR

#8.,R2
R1,8DMBCSR
#SECTX,aDMBLSR
aDMBCSR

Movs
81C
CMP
BNE
MoV

RS
8DMBL SR, R4
8DMBCSR,R3
#177760,R3
R1,R3
MUX14C
#SECTX
RS

CMP

R5,Ré4

CLR

MoV

BEQ
ERRORL
SCOPEF
MUX14D
MUX14D: BIS
DEC
BNE

MUX14D

MUX14E: MoV

R1,8DMBCSR
R1,R3

CLR

MoV
CLR
INCB
BNE

MOV
TST
BEQ

ERRORL
MUXT14F: SCOPE

cREFERENCE DESIGNATION
;CLEAR CONTROL STATUS REGISTER
JENABLE INTERRUPTS

#STEP ,3DMBCSR
R2
MUX148

sSELECT LINE 70 BE TESTED
;SET SECONDARY TRANSMIT FUNCTION FLIP-FLOP
READ LINE STATUS REGISTER

sREAD CONTROL STATUS REGISTER
sCLEAR UNWANTED BITS
sIF LINE NUMBER=SELECTED LINE NUMBER,
JEXCEPT SECONDARY TRANSMIT FUNCTION FLIP FLOP
;70 BE SET

+ COMPARE EXPECTED AND RECEIVED
sRESULTS
JLINE STATUS ERROR

JEXAMINE NEXT LINE

aDMBL SR
#0
.=

@8DMBL SR, Ré

R4
MUX14F

JSET LINE COUNTER TO SELECTED LINE
;CLEAR SECONDARY TRANSMIT FLIP FLOP
;DELAY FOR CABLE
:DITTO

sREAD LINE STATUS REGISTER

;WAS SECONDARY TRANSMIT FUNCTION FLIP FLOP
s CLEARED
sNO, LINE STATUS ERROR
sCHECK FOR ITERATIONS, LOOP

e
Y om

CIKMFAO KMS11-BD INTERACTION_TEST
CZKMFA, P11
20-0CT-81 17:07

CZKMFA.P1

20~-0CT-81 17:07

MACY11 30A(1052)

21-0CT-61

4
05:47

PAGE 49

—b

—l

sVERIFY THAT CLEAR TO SEND AND CARRIER ARE SET IF '‘LINE ENABLE''
JAND TERMINAL ARE SET FOR SELECTED LINE.
005077

005166

2013
2014
2015
2016
2017
2018

010070
010076
010102
010106
010112
010120

042737
013701
012702
010177
012777
005077

000340
015374
000010
005144
000003
005132

2020
2021
2022
2023
2024
%8%2

010126
010132
010136
010142
010144
010146

017704
117703
04¢703
020103
001002
012705

005126
005120
177760

2019

2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045

010124

010152
010154
010156
010160
010162
010164
010172
010174
010176
010202
010204
010210
010216
010222
010224
010230
010232
010234
010236

005005

020405
001403
104001
104003
010164
052777
005302
001353
012705
010103
010177
042777
105227
001375
017704
020504
001401
104001
104002

177776

7105:
MuUx15:

CLR

8IC

#340,PS

MUX15A: MOV

#8.,R2

MOV
MoV
MOV

005140
MUX158:

000143
MUX15C:

CLR
CLR

MOV
MOv8
8IC
cMP
BNE
MoV
CMP
8EQ
ERRORL

LINE ,R1

000400

005064

BNE
MoV
MUX15E: MOV

000001
005046
000002
000000

005030

005042

MOV

BIC
INCB
BNE
MOV
cMP
BEQ
ERRORL

MUX15F: SCOPE

sENABLE INTERRUPTS

;8 LINES

R1,8DMBCSR
#LINENA+TRMRDY ,@8DMBLSR

cSELECT A LINE
;SET LINE ENABLE +TRMRDY

a8DMBL SR, R4

SREAD LINE STATUS
+READ LINE NUMBER
sCLEAR 'NWANTED BITS
sIF RECEIVED LINE=SELECTED LINE
cEXPECT LINE ENABLE AND

aDMB(SR
RS

8DMBCSR,R3

#177760,R3
R1,R3
Mux15¢
#LINENA+TRMRDY+CO+CS,RS
R4 .R5
MUX15D

SCOPEF

MUX15D
MUX15D: BIS
DEC

JREFERENCE DESIGNATION
:CLEAR _CONTROL REGISTER

SDMBCSR

sCLEAR CONTROL REGISTER
sCLEAR EXPECTED RESULT

;CLEAR TO SEND AND CARRIER ARE SET
: COMPARE EXPECTED AND
RECEIVED RESULTS
LINE STATUS ERROR

#STEP ,3DMBCSR
R2

sUPDATE LINE COUNTER
sCONTINUE IF ALL CHECKS

R1,8DMBCSR

cSELECT LINE

MUX158
#LINENA,RS
R1.R3

#TRMRDY ,3DMBL SR
#0
.=é
@DMBL SR R4
R5,Ré
MUX15F

sARE NOT DONE FOR THIS LINE
JEXPECT LINE ENABLE
cON SELECTED LINE
sCLEAR TERMINAL
:DELAY FOR CABLE
;DITTO
JREAD LINE STATUS REGISTER
sONLY LINE ENABLE SHOULD BE
SET ON THIS LINE
sLINE STATUS ERROR

¢sCHECK FOR ITERATIONS, LOOP

SEQ 0049

Fan Yo )

CZKMFAO KMS11-BD INTERACTION_TEST

CZKHFAO KMS11-8D INTERACTION_TEST

20-0CT-81 17:07

CZKMF A.P11

MACY11 30A(1052)

21-0C7-81

05:47

PAGE 50

[elelolelelalelelolalatalellalelolale BN-lelelelelelolalalolalelalele)

sVERIFY THAT RING ISSET IF 'LIN ENABLE'’
JAND REQUEST TO SEND ARE SET F OR SELECTED LINE.

—

)

b e

)

) i

005077
042737
013701
012702
010177
012777
005077
005005
017704
117703
042703
020103
001002
012705

177776

004764

000205

020405
001403

MUX16C:

b wed
b

d
b
b
b

CMP
BEQ

MUX16D: BIS

004666

8lC

DEC
BNE
MOV
MUX16E: MOV
MOV

R1,8DMBCSR

;8 LINES

aDMB(SR

SDMBL SR, R4

8DMBCSR,R3
#177760,R3
R1,R3
MUX16C
#LINENA+RS+RING,R5
R4 RS
MUX16D

#STEP,3DMBCSR
R2
MUX168
#LINENA
RS
R1.R3
R1,8DMBCSR
#RS,aDMBL SR

INCB
BNE

#0
-4

CMP
8EQ

RS R4
MUX16F

MoV

MUX 16F :

LINE,R1

#8. ,R2

MOV

004710

004654

#340,PS

CLR

SCOPEF
MUX16D

004672
000004
000000

;CLEAR CONTROL REGISTER
sENABLE INTERRUPTS

SDMBCSR

#LINENA+RS ,8DMBL SR

ERRORL

000001

JREFERENCE DESIGNATION

MOV

Move
BI(C
cMP
BNE
MoV

177760

000400

BIC

MUX16A: MOV
MOV
MUX168:

004752
004744

CLR

MOV

b —D

10330
10332

005012
000340
015374
000010
004770
000005
004756

T106:
MUX16:

ERRORL
SCOPE

SDMBL SR, R4

JSELECT A LINE
sSET LINE ENABLE +RS
;CLEAR CONTROL REGISTER
sCLEAR EXPECTED RESULT
sREAD LINE STATUS
sREAD LINE NUMBER

:CLEAR UNWANTED BITS
;IF RECEIVED LINE=SELECTED LINE
JEXPECT LINE ENABLE AND

sRING IS SET
s COMPARE EXPECTED AND
cRECEIVED RESULTS
LINE STATUS ERROR

sUPDATE LINE COUNTER
sCONTINUE 1F ALL CHECKS
sARE NOT DONE FOR THIS LINE
JEXPECT LINE ENABLE
sON SELECTED LINE
sSELECT LINE
sCLEAR REQUEST TO SEND
sDELAY FOR CABLE
;DITTO
JREAD LINE STATUS REGISTER

sONLY LINC ENABLE SHOULD BE
sSET ON THIS LINE
JLINE STATUS ERROR
;CHECK FOR ITERATIONS, LOOP

SEQ 0050

CZKMFAQO KMS11-8D INTERACTION TEST
20-0CT-81 17:07
CZKMFA. P

’OV~
uwuwugww
NNWNINININIRNINININCAYN)
bt b mdNO
= Vb
b -—-‘ooogooo
W=
O VBN N
W= OV
VSb WA
—-O VN

—A—Q—‘—.—A—-‘—A—.—l—‘—.—‘—‘-—ldd—.—‘—.—‘—l—.—‘-‘—.—l—l—‘—.-‘—‘—‘_fi—.—l—l—‘—l—.

MURLALALNIALAYALNLALNLNLNINL
PRV AL NI ALNIRLNIALNDAL AL ALAL NV NNV NN
PN PN N

2090
2091
2092
2093
2094
2095
2096
2097
2098
2099
2100
2101
02
2
5

21-0CT-81

05:47

PAGE 51

SEQ 0051

;VERIFY THAT SECONDARY RECEIVE IS SET IF ‘LINE ENABLE'
JAND SECONDARY TRANSMIT ARE SET FOR SELECTED LINE.
010414
010414

SDMB(SR
#340,PS
LINE R1

MOV
MOV

R1,4DMBCSR
NLINENA+SECTX ,38DMBLSR

JSELECT A LINE
;SET LINE ENABLE +SECTX

(LR

sCLEAR EXPECTED RESULT

BNE

MUX17¢C

010502

020405

MUX17C:

010512

010514

MUX17D
MUX17D: BIS

010504
010565
010510

010514
010522
010524
010526
010532
010534
010540
010546

010552
8}0554

177776

MUX17A: MOV
004610
MUX178:

004576
004570
177760

001403
104001
104003

052777
005302
001353
012705
010103
010177
042777
105227

001375
017704

#8. .R2

CLR

;8 LINES

SDMB(CSR

MOV
MOV8
8I(
cMpP

s8DMBL SR, R4
8DMBCSR,R3
#177760,R3
R1,R3

MOV

000031

sREFERENCE DESIGNATION
sCLEAR CONTROL REGISTER
;ENABLE INTERRUPTS

(LR
8I¢{
MOV

010456
010462
010466
010472
010474
010476

010454

004636
000340
015374
000010
004614
000011
004602

1107:
MUX17:

005077
042737
013701
01270C
010177
012777
005077
005005
017704
117703
042703
020103
001002
012705

010420
010426
010432
010436
010442
010450

000400

004534

000001

004516
000010

#LINENA+SECTX+SECRX
RS

000000

s SECONDARY RECEIVE IS SET
< COMPARE EXPECTED AND
JRECEIVED RESULTS
sLINE STATUS ERROR

#STEP ,S0MBCSR

sUPDATE LIKNE COUNTER

BNE
MoV

MUX178
#LINENA RS

SARE NOT DONE FOR THIS LINE
SEXPECT LINE ENABLE

MoV

R1,3DMBCSR

MUX17E: MOV

sCONTINUE IF ALL CHECKS

R1.R3

8I(
INCB
BNE
MOV

004500

JON SELECTED LINE
JSELECT LINE

#SECTX,8DMBLSR
#0
.~
SDMBL SR R4

4, 4

:CLEAR SECONDARY TRANSMIT
;DELAY FOR CABLE
:DITTO
JREAD LINE STATUS REGISTER

RS ,R4

SONLY LINE ENABLE

8EQ
MUX17F
ERRORL
MUX17F: SCOPE
JEND OF PASS
JUPDATE PASS COUNT

:TYPE END OF

4
000001

EOP:

015334

MOV

B8EQ
LOGICAL:

0624

0626

003240

000137

011046

INC
MoV

TYPE

RESET

NOP
NOP
NOP

JMP

SHOULD BE

JSET ON THIS LINE
sLINE STATUS ERROR
;CHECK FOR ITERATIONS, LOOP

PASS MESSAGE

MEPASS

000042

SEXPECT LINE ENABLE AND

R4 RS
MUX17D

CMP
8tQ
ERRORL

DEC

004512

sCLEAR CONTROL REGISTER
JREAD LINE STATUS
sREAD LINE NUMBER
JCLEAR UNWANTED BITS
sIF RECEIVED LINE=SELECTED LINE

SCOPEF

01
01

lelololalalelelelelelelele]

2085
2086
2087
2088
2089

MACY11 30A(1052)

PASCNT
#1,TSTINO

JUPDATE PASS COUNT
JSTART AT FIRST TEST OF GROUP

42 ,R1

JARE YOU ON ACT11?

;

TSTENT

JSR

TSTENT

;NO

RING BELL

PC,(R1)

;GET ADCRESS OF FIRST TEST

170
171
172
173
174
175

176
177
178
179
180
181
182

MACY11 30A(1052)

183
184
185
2186

2187

2188
2189
2190
2191

010632

000002
000000

0664

105777

004372

0674

000002

PAGE 52

(SP) ,=-(SP)
#2,(SP)
8(SP),(SP)

JGET PC OF RETURN
:=PC OF EMT
JGET EMT

81C
ADD
mov
JMP

#177001, (SP)
#EMTTAB, (SP)
a(SP),(SP)
8(SP)+

;CLEAR UNWANTED BITS
:POINTER TO SUBROUTINE ADDRESS
:SUBROUTINE ADDRESS
;GO TO SUBROUTINE

TSTB

8TKCSR
18

EMTSRV: MOV
suB
MoV

EMTOK:

177001
017050
000000

CKINT:
1$:

ASL

8PL

KBDIN

(SP)

:MULTIPLY EMT ARG BY 2

RTI

:UPDATE ITERATION COUNT AND EXIT TO NEXT TEST IF 0
;TEST XOR FLAG (XFLAG) FOR EXISTANCE OF XOR TESTER.

010676
010702
010704
010710
010716
010722

010726
010759
010732
010736
010740
010744
010750

005737
100022
013746
012737
005737
012637

000404
022626
012637
000402
000137
000137

010750
010756¢
010762
010766

005037
012777
005737
001404

010776
011000
011006

001021
032777
001041

010770

2196

011024

S196

05:47

;END OF SUBTEST SERVICE
;CHECK FOR LOOP ON CURRENT TEST
;CHECK FOR ESCAPE TO NEXT TEST ON _ERROR

011010
011016

2195

011646

162716
017616
006316
042716
062716
017616

010634
010640
010644
010646
010652
010656

2192

2193

JEMT DISPATCH SERVICE
sARGUMENT OF EMT IS EXTRACTED
sAND USED AS OFFSET TO OBTAIN POINTER
;TO SELECTED SUBROUTINE

W
WA 2O 0NN

00
Q000 00 G0
AN
— Q0
O ~OUB NVNNNNN\IOOO‘&
O WS WA = O 000N
N

1
1
1

W= O 000NNV

o Yo Xo Yo Yo Yo VIV IV IV IV IV IV IV IV IV V2P ok 2F 2F 3 F of

AUALALALAL LA AL A AU AL AR AU AL AL AL N AL NIAIAI
NI NI AL AL RN NN AL NI NI NI A NI NI NN NI PONOA)
_.._A—D—l—‘-‘—.—.—‘—‘_‘_‘_‘—l—.—.—._‘—‘—._‘.—l-‘

CIKMFAQO kKMS11-8D INTERACTION_TEST
20-0(T-81 17:07
CZXKMFA.P1T

21-0CT-81

011020
011026

011032

032777

032777
001011

000004
010730
177060
000004

28:
2::

177776
000100
015326

004300

002000

004274

040000

"o<cb4

004000

004254

013716

015336

042777

1$:

000100

004222

LOOPS:

XFLAG

;IS THERE AN XOR TESTER OUT THERE ?

4,-(SP)

:SAVE &

(%3

MOV
ST

#§8.4
177060

B8R

MOV

011042
011046

015340

TST

B8PL

MOV

000004

(05337

001406

LOOP:

001242

POP2SP
MOV

B8R

:NO

:SET UP SVC ROUTINE
:GOT SOMETHING LIKE SLAVE SYNC

(SP)+.4 :YOU BETCHUM

:RESTORE STACK
(SP)+.4 :RESTORE &

:GO TC NEXT TEST

JMP

LOOPX

(LR
ChY

PSW
SINTENA,BTKCS

BE2

LOOPS

TCHECK FOR ESCAPE 1O NEXT TEST

LOOPX

SINnIBIT TfERATIONS

TSTENT

:GO

ERRFLG

8IT
BNE
BIT
BNE
8IT

#5w10,d5wWR
L 00PX
514, dSWR
LOQPL
2511, aSwR

DEC
BEQ

[ COUNT
L 0OPX

8IC

SINTENA,QTKCSR

BNE

LOOPER: MOV

RE TURN, (SP)

:1F ERROR OCCURED FLAG=1,

JJF SW10=1,
“ESCAPE TO NEXT TEST
YIF swiézt,
SLOOP ON CURRENT TEST
LIF swli=1

"UPDATE ITERATION COUNT
S1F 1COUNT=0, GO TO NEXT TEST

“SET UP FOR RETURN TO CURRENT TEST

SEQ@ 0052

CZKMFAO KMS11-BD INTERACTI ON_TEST

CIKMFA.P11

20-0CT-81 17:07

2197
2198
2199
2200
2201
2202

011040
011042
011046
011052
011054
011056

00000
005237
013705
006305
006305
063705

2204
2205
2206

011066
011070
011072

001640
012516
011537

2208
2209
2210
%5}}

011102
011110
011112
011120

042777
000002
012737
000742

015340

EOP
(R5)+,(SP)
(RS5), COUNT

8IC
RTI
MOV
BR

#INTENA,RTKCSR

000100

004152

000001

015340

LOOPL:

TSTNO
TSTNO,RS
RS
RS
TSTPNT,RS

(RS) RETURN

ERRF(G

#1,ICOUNT
LOOPER

PAGE 53
sRETURN TO CURRENT TEST
JUPDATE TEST NUMBER
:GET TEST NUMBER
:MULTIPLY TEST NUMBER BY 4
sGET POINTER FOR TEST ENTRY

;GET STARTING ADDRESS OF NEXT TEST
:IF_ADDRESS=0, GO TO END OF PASS
:PUT STARTING ADDRSS ON STACK
sGET ITERATION COUNT FOR TEST

sCLEAR ERROR OCCURED FLAG

;GO _TO TEST
SSET UP TO EXIT TEST AFTER LOOP
:GO TO LOOP SERVICE

s CHECK FOR LOOPING WITH SAME DATA

%g}g

2222
2223
2224
2225

CLR

05:47

BEQ
Mov
Moy

MOV

2213

2221

015366

2207 011076 005037 015326

2217
2218
2219
2220

21-0CT-81

RTI
LOOPX: INC
TSTENT: MOV
ASL
ASL
ADD

015334
01533¢

2203 011062 011537 015336

2216

MACY11 30A(1052)

:CHECK FOR ESCAPE TO NEXT TEST ON ERROR
011122

011126
011130
011136
011140

005737

001413
032777
001341
032777

011146 001403
011150
011154
011156
011162

017616
000002
062716
000002

015326

FREEZE: TST

002000

004134

001000

004124

000000

000002

ERRFLG

;IF ERROi: FLAG=0,

FREEZX

:FREEZE CURRENT DATA

BEQ
BIT
BNE
BIT

FREEZX
#SU1O aSWR
LOO
#SUO9 aSWR

MOV
RTI
FREEZX: ADD
RTI

8(SP), (SP)

BEQ

#2,(SP)

;DO NOT TEST FOR ESCAPE
;IF SW10=1,
:ESCAPE TO NEXT TEST
;IF _SW09=1,
:GET _LOOPING ADDRESS
:LOOP
sCONTINUE IN CURRENT TEST

SEQ@ 0053

CIZKMFA.P11

20-0CT-81 17:07

05:47

PAGE 54

%g%g

ERR:

005037 015326
005037 011362
005037 011374
000440

ONLY PC OF FAILING TEST IS OUTPUT TO TELEPRINTER
;ALWAYS TYPE P(C+?2
ERRFLG
CLR
;OF TEST THAT FAILED
:NO MESSAGE
ERRMSG
CLR
TABLE OF DATA
*NO
ERTAB
CLR
ERROR MESSAGE
“OUTPUT
ERRGEN
BR

%ng

:KMS11 DATA ERROR SERVICE

%g%g

:FORMAT FOR ERROR TYPEOUT IS

2239
2240

JXXXXXX KMS11 DATA ERROR
KMS11 LINE
REC
EXP

2243

sWHERE XXXXXX=PC+2 OF CALL TO ERROR ROUTINE

TAA

5525

2244
2245
2246

2247 011202

005037

015326

2248 011206 012737 015563 011362
2249

011214

012737

%gg? 011222 000427

011450

ERRD:

:
:
:

CLR

MOV

011374

AM=EXPECTED DATA BYTE
BB=RECEIVED DATA BYTE
CC=KMS11 LINE ON WHICH ERROR OCCURED

ERRFLG

;ALWAYS OQUTPUT

#ERTAB1,ERTAB

TABLE OF DATA

MMTRANE ,ERRMSG

ERRGEN

OUTPUT ERROR MESSAGE

:KMS11 STATUS ERROR SERVICE

%ggg

:FORMAT FOR KMS11 STATUS ERROR IS

2256

JXXXX KMS11 STATUS ERROR

gg
gg
2260
%ggz
011224

005037

015326

2269 011236

012737

011466

%ggg 011230 012737 015504 011362
SS;? 011244 000416

2272

cC LINE
88SEL?8 KMS11

CC=kMS11 LINE ON WHICH ERROR OCCURED

:WHERE XXXXXX=PC+2 OF CALL TO ERROR ROUTINE
AA=KMS11-BD SELQ STATUS AT ERROR
H
BBB=KMS11-BD SELZ2 STATUS AT ERROR
.

2261
2262

2265

S AAA

SELO

2257

011374

ERRS:

CLR

MOV
MOV

ERRFLG

E;;ERE§HE}LESTATUS ERROR'’

#ERTAB? ,ERTAB

;TABLE OF DATA

ERRGEN

2276

JXXXXXX STATUS ERROR

sg;g

.AAAAAA 888888

2280
2281

OUTPUT ERROR MESSAGE

FORHAI FOR CONTROL STATUS ERROR IS

:*°CONTROL STATUS'' ERROR SERVICE

227?

;ALWAYS OUTPUT ALL DATA

#MLINE1 ,ERRMSG

2273

5552

ALL DATA

:TYPE ‘XMS11 DATA ERROR'’

%gg%

2266

SEQ 0054

:GENERAL ERROR SERVICE

2226

2229 011164
2230
2231 011170
2232 011174
%sgz 011200

21-0CT-81

MACY11 30A(1052)

EXP

REC

WHERE XXXXXX=PC+2 OF CALL TO ERROR ROUTINE
AAAAAA=EXPECTED CONTROL STATUS AT TIME OF ERROR
:

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07

MACY11 30A(1052)

%gg%
2284

%%gg

011246

2287 011254
%ggg

011262

012737

015416

011362

ERRCS:

012737 011516 011374
000407

21-0CT-81

05:47

PAGE 55

BBBBBB=RECEIVED (ACTUAL) CONTROL STATUS AT TIME OF ERROR

MOV

#MSTATE ,ERRMSG

:I¥§§ ;EEATUS ERROR

MOV

#ERTABS ,ERTAB

STABLE OF DATA

ERRCEN

JLINE STATUS ERROR SERVICE

%%3?

;OUTPUT DATA

%%3%

:FORMAT FOR LINE STATUS ERROR IS

2294
2295

:XXXX LINE ERROR
JEXP
REC
LINE

2298
2299

JWHERE XXXXXX=PC+2 OF CALL TO ERROR ROUTINE
:
AAA=EXPECTED LINE STATUS AT TIME OF ERRCR

%%8%

JAAA DDD

3589
2300
2301

2304

2305
2306
g%gg

011264
011272

011300

012737
012737
000400

015447
011530

011362
011374

2309
2310
2311
%g%%

2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
5§§§
2336
2337

ERRLS:

(CC

SEL
0D

.
.

BBB=RECEIVED LINE STATUS AT TIME OF ERROR
CC=LINE ON WHICH ERROR OCCURED

MOV
MOV

#MLINER ,ERRMSG
#ERTABS ,ERTAB

DD=THE LINE ON WHICH THE PROGRAM WAS OPERATING

ERRGEN

;GENERAL ERROR HANDLER
;TYPE PC+2 OF TEST THAT FAILED
;TYPE ERROR MESSAGE (IF ANY)
:TYPE DATA RELATING TO FAILURE (IF ANY)

011302
011306
011314
011322
011324
011330
011332
011336
011340
011344
011346
011350
011352
011356
011360
011362
011364
011370
011372
011374
011376

005037
012777
032777
001026
021637
001402
005037
104005
005737
001007
104006
01144
005737
001407
104004
000000
005737
001402
104006
000000
104007

177776
000100

020000

015360

015326
015326

011362

011374

003746

003750

ERRGEN: CLR
MOV
BIT ~
BNE
CMP
BEQ
CLR
SAVOSP
TST
BNE
OCTASC
ERTAB0
TST
8EQ
TYPE
ERRMSG: 0
.1:
TST
BEQ
OCTASC
ERTAB:
0
.20
RESOS

PSW
#INTENA,3TKCSR
#SW13,.3SWR
.3
(SP) ,SAVP(
.+6
ERRFLG
ERRFLG
.
ERRMSG
.2

ERTAB
.2

JERROR HALT SERVICE

:IF SW13=1, DO NOT
:TYPE ERROR MESSAGE
JSAME ERROR AGAIN

:IF ERROR OCCURED FLAG=1,

JTYPE DATA ONLY

;TYPE PC+2 OF CALL TO ERROR ROUTINE

;TYPE ERROR MESSAGE

;TYPE DATA

;RESTORE RG-RS

SEQ 0055

J\WNNN-J-‘gO
OB NONNOONO

b
)

o
N
T
Y
Y
P

D el

) cmd

o
i

— e

il
e

cmd

—d e

) wdd

(elelelelolalalels

032777
001406

100000

MACY11 30A(1052)

.3:

000176

000002

000001
000100

BIT

BEQ

HALT
CMP
BNE
CNTLUU
MOV
BIC
RT]

21-0CT-81

5
05:47

#SW15,aSWR

#SWREG, SWR
4

#1,ERRFLG
#INTENA,@TKCSR

PAGE 56

;IF SW15=0,

SEQ 0056

DO NOT

*HALT ON ERROR

‘HALT AND DISPLAY ADDRESS OF FAILING TEST

;SET ERROR OCCURED FLAG
;RETURN TO TEST

;TABLE S OF DATA FOR ERROR TYPEOUT

wvw

O
W

=2 OVONO NSO

Y I Y sy
W
&H

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07

ERTABO: g
SAVPC

o Yo Yo JV IV IV 1V, 2

itk ak ai-

000001

L 2B

ERTAB1: g

¥
¥
W

;CONTAINS EXPECTED DATA BYTE

; CONTAINS RECEIVED DATA BYTE

;CONTAINS NUMBER OF LINE WHERE ERROR UCCURED

2SELO

:CONTAINS KMS11 SELO

gsst

;CONTAINS KMS11 SEL2

L INEL
ERTAB3: g

;CONTAINS NUMBER OF LINE WHERE ERROR OCCURED

§AVR4

WINNINI
NN = —b b =
NS
VIVAWA

gooo

L INEL
ERTAB2: Z

W
[V AV AV IRV VAV IPAV IVAV AV VAV IVAV IV AV AV IV I IV IVIV IV P ¥

— il
— el

(elelolil

—d emd b i b e e d b D e wd D ) ) ed e D ) D ) b ad D
) D wd D wd b ) d D el b
—A-.—A-.—‘_‘—l—A-.-l-.—l—.—h—l—‘—l—l_.-.d—.—l—.—l-‘—b—ld-‘—l—l—.-‘-‘—.

~tolelelolalelalalelolelelalelelaleloelelalalelolelalelelelelalalelelele)

;TABLE FOR TRANSITION STATUS ERROR

SAVR3
ERTAB : g
gAVRS

;CONTAINS EXPECTED CONTROL STATUS

SAVR4
ERTABS : g

:CONTAINS RECEIVED CONTROL STATUS

015344
000001
000006
000176

SWRTB:

§AVRS

:CONTAINS EXPECTED LINE STATUS

gAvna

:CONTAINS RECEIVED LINE STATUS

SAVRS

:CONTAINS NUMBER OF LINE WHERE ERROR OCCURED

SAVR1

:CONTAINS NUMBER OF LINE UNDER TEST

1
6
SWREG

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07
2194
2395
2396
2397

011560
011564

017605
062716

000000
000002

2399
2600
26401
2602
2403
2604
26405
2606

011576
011602
011606
011612
011616
011620
011624
011626

012704
012537
012537
013537
104010
005337
001370
112714

016715
015362
015364
012114

2398 011570 012737 000010 012120

2607
2408
26409
2610
%2}5
2413

011632
011636
011640
011642
011644

005737
001002
104004
016713
000002

2614
2415
2616
2417
2418

011646
011652
011660
011662
011664

005037
012737
104004
016671
052737

2622
2423
2626
2425
2426
2627
2428
26429
26430
2431
2632
2433
2434
2435
52%9

011700
011702
011704
011706
011710
011712
011714
011722
011724
011732
011736
011742
011744
011746
011750

016715
104013
016701
000000
177777
011744
123727
001403
013777
005037
005037
000002
000000
000000
000000

26419
2420
2421

011672
011674
011676

104006
011552
104004

015362

000100

011750

011744
000001

011746

000001

011750

012564
011744
011746
011750

003340

05:47

PAGE 57

MOV

#10
. RADIX

TST
BNE
TYPE
MBCD
RTI

SMLN
i

CLR
MOV
TYPE
$SWREQ
BIS

TTMP1
#1,TMP2

MOV
#MB(D+2 R4
MoV
(R5)+,WRDCNT
OCTAS1: MOV
(RS) +, CHRCNT
MOV
a(R5) + ,BINWRD
CONVERT
DEC
WRDCNT
BNE
0CTAS1
MOVB #100, (R&4)

;SET UP POINTER FOR CONVERTED DATA
“GET NUMBER OF WORDS TO BE CONVERTED
SGET NUMBER OF DIGITS IN WORD
<GET DATA TO BE CONVERTED
*CONVERT TO ASCII
SIF ALL DATA IS NOT CONVERTED
: CONTINUE
SPUT TERMINATOR AT END OF MESSAGE

1$:

;OUTPUT CCNVERTED DATA
270 TELETYPE
*RETURN TO CALLING ROUTINE

CNTLU:

OCTASC
SWRTB
TYPE

18:
TMP1:
TMP2:
SMLN:

MBCD+2
INSTRG
SNEWIS
0
177777
TMP1
CMPB
BEQ
MOV
CLR
CLR
RT]
0
0
O

#1,SMLN

INBUF.#15
18
TMP1,aSWR
TMP?
SMLN

:INTEGER BINARY TO ASCII CONVERSION COMMON ROUTINE

2440
2641
2442
2443
2444
2045
2446

011752
011756
011762
011764
011772
011776
012000

013700
012701
104011
062737
113721
005300
(01370

015364
017034

2448

012006

005337

015364

2449

21-0CT-81

;CONVERT OCTAL TO ASCII AND OUTPUT ON TTY
OCTASN: MOV
a(SP) ,RS
:GET POINTER TO TABLE OF DATA
ADD
#2.(SP)

,
0000i>

%2§g

2447

MACY11 30A(1052)

012002

012010

114124

001374

000060
012116

012116

BINASC: MOV
CHRCNT RO
MOV
#TEMTAB,R1
BINASA: EXTRACT
ADD
#60,01G1T
MOV8B
DIGIT.(R1)+
DEC
RO
BNE
BINASA
BINASB: MOVB

DEC

BNE

=(R1),(R4)+

CHRCNT

BINASB

:SET UP COUNT FOR DIGITS TO BE CONVERTED
*SET UP POINTER FOR TEMPORARY STORAGE
SEXTRACT ONE DIGIT
*CONVERT FROM BCD TO ASCII
>STORE DIGIT
SIF ALL DIGITS NOT DONE,
- CONTINUE
*REVERSE ORDER OF DIGITS

<IF ALL CHARACTERS ARE NOT
<IN ORDER, CONTINUE

SEQ 0057

CIKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-8 117:07

MOVB

000040

RTI

012020
012024
012032
012034
012042
012044
012052
012054
012062
012066
012072
012074
012076
012100
012104
012110
012112
012114
012116
012120

§
05:47

#460,(R4)+

PAGE 58

:INSERT SPACE AFTER LAST DIGIT
JRETURN TO CALLING ROUTINE

012120

DIVIDH
DIVIDH,DIVIS
plvis

B8R

pIviIC

MOV

012074

012120
012116

CLR
cMP
BHIS
cMp
8LO

sSuB

DIVIC:

DIVCNT:

#7.,DIVCNT

DIVIDH,DIVIS
DIVIC

DIVIS,DIVIDH

ROL

DIVIDL

BNE

DIVIA

coM
RT1

DIVIDL

ROL
8EC
ROR

DIVIDH
(PC)+
DIVIDH

HALT

: 0

000000

:SAVE PC OF TEST THAT FAILED AND RO-RS
012122

016637

000004

015360

MOV

4(SP) ,SAVPC

:SAVE RO-RS
b —d
b
b
-

012162
012166
012172
012176
012202
012206
012212

MOV
Mov
MoV
MOV
MOV

012144

2692
2493
2494
26495
2696
2497
2498
2499

L, [11")

[elelelelela]

012130
012134
012140
012150
012154
012160

RTI

RS, SAVRS

R4 ,SAVRS
R3,SAVR3
R2,SAVR?2
R1,SAVR1
RO, SAVRO

Prurd

:RESTORE RO-RS

RSOS:

MoV
MOV
MOV
MoV
MOV
MOV
RT1I

SAVRO,RO
SAVR1,R1
SAVRZ,R2
SAVR3,R3
SAVRG R4
SAVRS RS

JTELETYPE OUTPUT ROUTINE

2500

2501
2502
2503
2504
2505

21-0CT-81

:SINGLE PRECISION UNSIGNED DIVIDE LOOP

2486
2487
2488
2489

2490
2491

112724
000002

2485

012012

012016

[elelelelele]

2450

2451
2452
2453
2454
2455
2456
2457
2658
26459
2660
2461
2662
26463
2464
2465
2666
26467
2668
26469
2470
26471
26472
2473
24764
2475
2476
2477
2478
2479
2480
2481
2682
2483
2484

MACY11 30A(1052)

012214
012220
012224
012230

100375

000000
000002
003036

TYPER:
TYPERA:

MOV
ADD

TST8
8PL

8(SP) RS
#2,(SP)
8TP(SR
TYPERA

JGET POINTER TO MESSAGE (ON STACK)
JCORRECT STACK FOR RETURN
JWAIT FOR TELEPRINTER READY

SEQ 0058

CIZKMFAO KMS11-BD INTERACTION TEST

CZKMFA.P11

20-0CT=81 17:07

2506

012232

122715

000100

2508
2509

012240
012242

000002
122715

2511

012250

122715

2507 012236 001001

2510

2512
2513
2514

2515
2516

52};

0122646

001406

012254
012256
012262

001403
112577
000760

012274

000770

012264
012270

142715
152715

MACY11 30A(1052)

2527
2528

2529
2530
2531
2532
2533
2534
2535
2536
2537
2538
2539
2540
2541
25642
2543
2564
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554
2555

2556
2557
gggg

522?

05:47

PAGE 59

CMPB

#100, (RS)

:IF CHARACTER IS NOT TERMINATOR, TYPE IT

000042

RT]
TYPER1: CMPB

#42,(RS)

:CHARACTER IS TERMINATOR, EXIT
*1F CHARACTER=42,

000045

CMPB

#45, (RS)

TYPECL: BICB
BISB

#40, (RS)
#10.(RS5)

BNE

BEQ

8EQ
TYPER2: MOVB
BR

003006

000040
000010

2519
2520
2521
2522
2523
gg%g
2526

21-0CT-81

TYPER1

TYPECL

TYPECL
(RS)+,aTPDBR
TYPERA
TYPER?

STYPE LINE FEED

“IF CHARACTER=4S,

;TYPE CARRIAGE RETURN
*GET CHARACTER
STYPE IT

*CONVERT CODE OF 42 OR 45
“T0 12 OR 15
STYPE IT

; INPUT OCTAL CHARACTER STRING
:TERMINATOR IS CARRIAGE RETURN
:1F MORE THAN SEVEN (7) CHARACTERS INCLUDING
:CARRIAGE RETURN ARE TYPED, THE IN PUT WILL
:BE RE-REQUESTED
012276

012276
012300

012304
012310
012314
012320
012322
012324
012326
012332
012336
012342
012344
012350
012356
012364
012370
012374
012376
012402
012404
012410
012412
012416
012420
012424
012430
012432
012434

012436
012440
012442

011605
012537

012537
012537
012537
010516
104004
000000
012704
012703
105777
100375
005037
117737
142737
113714
121427
001420
121427
001420
121427
001003
005037
000741
112477
105777
100375
005303
001340

104004
016424
000727

INSTR:

012324
012556
012560
012562
INSTR1:
MSG:

012564
000007
002720
002310
002710
000200
011744
000007

INSTRB:
011744
011744

INSTBB:

000015

000025
011744
002644
002636

1%:
INSTRC:

MOV
MOV

MOV
MOV
MoV
MoV
TYPE
O
MoV
MOV
TST8B
8PL
CLR
MOVB
BICB
MOVB
CMPB
BEQ
C(MPB
BEQ
CMPB
BNE
CLR
BR
mOovB
TSTB
BPL
DEC
BNE

INSTER: TYPE
MM
BR

(SP) ,RS
(RS)+,MSG

(RS)+,LOLIM
(RS)+.RILIM
(R5)+,STORE
RS, (SP)
# INBUF ,R&
#7.R3
aTK(CSR
INSTRB
SINTFL
aTKDBR,TMP1
#200, TMP1
TMP1.(R&)
(RG) .47
INSTER
(R&),M1S
INSTR?
(R&),#25
18
TMP1
INSTR1
(R4)+,aTPDBR
8TPCSR
INSTRC
R3
INSTRB

INSTR1

JCONVERT ASCI] STRING TO OCTAL

:GET POINTER TO ARGUMENTS
*GET MESAGE TO BE TYPED
SGET LOWER LIMIT
SGET UPPER LIMIT
;GET DATA STORAGE LOCATION
JRESTORE STACK
STYPE MESSAGE
;SET UP CHARACTER INPUT BUFFER
*SET UP INPUT COUNT
JWAIT FOR CHARACTER

;1S CHARACTER TERMINATOR
JIF IT IS, CONVERT INPUT STRING

JTYPE CHARACTER IF NOT TERMINATOR
JWAIT TO FINISH TYPING

;UPDATE RECEIVED COUNT
SAND CONT INUE

STYPE *"2°* AND RE-REQUEST INPUT

SEQ 0059

CIKMFA.P11

20-0CT-81 17:07

2562
2563
2564
2565
2566
2567
2568
2569

012444
012446
012450
012454
012456

104004
016430
012704
005003
122714

012462

001431

2572

012476

003357

2570
2571

012464
012470
012472

2573

012500

2575
2576
2577
2578
2579

012506
012512
012514
012516
012520

2574 012504

ggg?

012522

000015
000060

2589
2590

012524
012530
012532
012536
012540
012544
012546

012552
012554
012556
012560
012562
012564

2601
2602
2603
2664
2605
2606
2607
2608
2609
2610

012606
012610
012612
012614
012616
012620
012622
012626
012632
012640

BEQ

CHCK

;GET POINTER TO ASCII STRING
;1S TERMINATOR FIRST
*CHARACTER IN STRING

000067

142714

000060

BICB

#60, (R4)

;STRIP ASCII

121427
001404
006303
006303
006303

000015

CMPB
BEQ
ASL
ASL
ASL

(R4),M15
INSTR3
R3
R3
R3

“IF END OF STRING, CHECK LIMITS

152403

BGT

BISB

000760

INSTER

(R4J+,R3

INSTRD

;1S CHARACTER OCTAL DIGIT
*IF 67>=CHAR>=60
SCHARACTER IS QCTAL DIGIT

*GENERATE OCTAL NUMBER

;MULTIPLY DIGIT BY 10 (OCTAL
:GET NEXT DIGIT

020337
101342
020337
103737
010377

000002
005737

001731
000002
000000
000000
000000
000000
012606

010046
010146
010246
010346
010446
010546
013746
010637
012737
0C0000

012560

000016

INSTR3: CMP
BH]
CMP
BLO
MOV

R3,HILIM
INSTER
R3,LOLIM
INSTER
R3,aSTORE

011746

CHCK:

TTMP2
INSTER

012556

LOLIM:
HILIM:
STORE:
INBUF:
.=.+20

PFAIL:

000024
015356
012644

000024

RT]
TST

BEQ
RTI
O
0
0
0

CEXIT

JENTER HERE ON POWER FAILURE

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
HALT

B8R

sg}z

STEST HI LIMIT
SIF R3>HILIM, ERROR
STEST LOW LIMIT
*IF R3<LOLIM, ERROR
*STORE NUMBER

RO, =(SP)
R1.=-(SP)
R2.~(SP)
R3.=(SP)
R&.,=(SP)
RS.=(SP)
24.=(SP)
SP.SAVSP
#RESTART, 24

:SAVE RO-RS ON PROCESSOR STACK

;SAVE STACK POINTER
*SET UP FOR POWER UP 1RAP
*HALT ON POWER DOWN NORMAL

:PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED

012644
012650
012652

013706
012605
012604

015356

RESTAR: MOV
MOV
MOV

SAVSP, SP
(SP) +.RS
(SP)+.Ré4

;RESTORE STACK POINTER
*RESTORE RO=RS

PAGE 60

(R&) ,#60
INSTER
(R&4) 467

52}; 012642 000776
2615
2616
2617

05:47

:TEST NUMBER TO SEE IF IT IS WITHIN LIMITS

2591
2592
2593
2594
2595
2596
2597
2598

2200

INSTRD: CMPB
BLT
CMPB

%gg%
2584
2585
2586
2587
2588

21-0CT-81

INSTR2: TYPE
MCRLF
MOV
# INBUF , R4
CLR
R3
CMPB #15, (R4)

012564

121427
002762
121427

MACY11 30A(1052)

SEQ 0060

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07
2618
2619
2620
2621
2622
2623

2624
2625
2626
2627
2628
26¢9
2630
2631
2632
2633

0126546
012656
012660
012662
012664
012672

012674
012676
012700
012704
012706
012712
012714
012716
012722
012724

012603
012602
012601
012600
012737
005726
104004
016603
005737
001002
000137
104004
016623
012716
005746
000137

012606

002066

00125¢
000340
011046

000024

MACY11 30A(1052)
Mov
MOV
MoV
MoV
Mov

21-0CT-81
(SP)+,R3
(SP) +,R2
(SP)+,R1
(SP)+,R0
#PFAIL, 24

POP1SP
TYPE
MPFAIL
TST
TIPFLG
BNE
RESTA1
JMP
STARTO
RESTA1: TYPE
MPF1
Mov
#340, (SP)
PUSH1SP
JMP
TSTENT

05:47

PAGE 61

;SET UP FOR POWER FAILURE

SEQ 0061

CZKMFAO KMS11-BD INTERACTION_TEST

20-0CT-81 17:07

CZKMFA.P11

MACY11 30A(1052)
KMS11 ROUTINES

.SBTTL

;KMS11

PC,CLRBFS

MOV

#BUER RO

MOVB
INCB
CMP

BLO
013740

000207

017737
017737
104015

WWNIN ==
OO
O

Gur G- Pourhurd

NN
d ok =
OO
OO
b
b
b
b
b
—

v Qe
Guur Gur S

N
o
~

WWNINNNNN

eleleleleleBlelelelele]

000770

002240

013470
013472

18:

558:

$TMPO

$TMPO.(RO)+
$TMPO
RO, #BUFR+2020

12§

ENUMBR
PC,LDMODE
55$
PC, INTKMC

sINIT ERROR NUMBER
sLOAD F IRMWARE

JSR

PC, INTALL

SINIT ALL LINES

MOV
MOV
JSR
JSR

#OPI,3KMCV1
#2460, 3KMCL1
PC . RECALL
PC . SNDALL

RTS

002304
0023C0

PAGE 62

CLR
JSR
8R
JSR

B8R

014230

05:47

KMS11 ROUTINES

KMCSUP: JSR

128:

(KMC11) SETUP ROUTINES
CLR

013226
000240
013064
013110
000100

21-0CT-81

gIs8
MOV
MOV
ERRORS
BR

004737
013700
004737
004737
000771
000207

RECALL: JSR
18:
MOV
JSR
JSR

004737
013700
004737
004737
000771
000207

SNDALL: JSR
1$:
MOV
JSR
JSR
BR

RTS

55$
55$

#100,aSEL2

@SELO,OSELO
aSEL2.0SEL2
558
PC.SETLIN
CURLIN,RO
PC.,RBUF
PC,GETLN

PC,SETLIN
CURLIN,RO
PC,XBUF
PC,GETLN
19
PC

*ERROR RETURN
SINIT THE FIRMWARE

*ERROR RETURN
SERROR RETURN
*SETUP VECTOR

;SETUP ALL RECVS
SENABLE ALL XMITS
SEXIT

;axexansx; KMC11 ERROR - RUN KMS11 TESTS
SFIX IT
;INIT LINE COUNT

SEQ 0062

(elolelelalalelelelalalalalalelelelalelalalalelalalelelelelelelelelalalelolole BNelalelelelelelelalelalolelolsle)
—b b e b d b med wmd wmd el cd Sd D d b ) b ) D b d b d b b b b wd cd e e D o Wb
o e e b
— v i i nd b d i i d e ) D e e d

N N N

316

322

U U A U A U U

N A

RW
(VY1
NN
N NN
OISO RSN SEEARLRUASGL

324

NN
N NN
Y
Y
¥
¥ Y
WINANN)
= —b -

2677
2678
2679

WAN N AN N AN N N N NN N NN N W
NN PIORININ)
= b ad b b b cd b b b
non -~ = O ONNOOOWVNESSSW
&HrN CNONO NSO
ONNNO S

004737

014046
002136
023600
002126
002122

MACY11 30A(1052)
KMS11 ROUTINES
XBUF:

002132

MOV
ADD
ADD

RBUF:

014056
002104

013446
013466
014502

002076
002074

BUFGO:

000207
010046
017737
017737
017737
017737
113737
042737
013700
042700
006300
000170
013416
013326
013336
013336
013342

OPI:

002042
002040
002036

146037

MOV

MOV
JSR
ERRORS

5
05:47

PAGE 63

PC,REQNT
#BUFR,@SEL4
RO.9SEL4
RO,@SEL4

;OFFSET BY LINE #
;TIMES 2

PBUFR(R0) ,8SEL4
PBFCNT ,@SEL6
PC.,INPDUN

RTS

MOV

RO, =(SP)
9SELO,OSELO

ossL2+1 LINEL

#-10, L INEL

0SEL2,RO

#-10,R0
RO

177770

013312

104015
000776
104015
000776
104015

004737
005737
001403
004737

BR
JSR
BR
MOv8
ASL

@SEL2.0SEL2
@SEL&,0SEL4
@SEL6.0SEL6

013332

000776
013700

JSR
BR
MovB

21-0CT-81

osus:

XxDO

XXCO:

ggRORS

RCO:

ERRORS
B8R

ILLF:

013512

RDO:

1$:

ERRORS

MOV

JSR

805UB(R0)

XxC0
RCO

ILLF

LINEL.RO
LBITS(RO) ,RFLGS

PC.CHKDTA
RFLGS
1$
PC,CKDEAD
XXD0
PC.CLRBFS

aSEL?

PC,RECALL
PC. SNDALL
XXD0

LINEL RO

LBITS(RO) XFLGS

#100,8SEL2
(sp). RO

;CHECK DATA

sSKIP IF ALL DONE
sCHECK FOR DEAD LINE

;CLEAR LAST OUTPUT REQUEST

SEQ@ 0063

P~ g~

CZKMFAO KMS11-BD INTERACTION_TEST
20-0CT-81 17:07
CZKMFA.P11

2733

013440

000002

KMS11 ROUTINES
RTI

21-0(CT-81

5
05:47

PAGE 64

MACY11 30A(1052)

SEQ 0064

CZKMFAO KMS11-BD INTERACTION TEST
CZKMFA.PT
20-0CT-81 17:07

MACY11 30A(1052)

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA.PTN

KMS11 ROUTINES

20-0CT-81 17:07

LINEB:

2736 013442 000377
2735
013444
013446
013450
013452
013454
013456
013460
013462
013464
013466
013470
013472
013474
013476

013443
000000
025622
027632
031642
033652
035662
037672
061702
043712
010000
000000
000000
000000
000000

2758 013514

200

2736
2737
2738
2739
27640
27641
2742
2763
27644
2745
2746
2747
2748
2749
2750

2751
2752
2753
2754
2755
2756
2757

013500
013502
013504
013506
013510
013512

000000
000000
000000
000000
000000
177777
013513
020
002

2759
2760

013517
013522

2763

013524

005000

2766
2767
2768

013534
013536
013542

005720
020027
103771

2761
2762

2764
2765

2769
2770
2771

2772
2773
2774

2775
2776
2777
2778
2779
2780

013526
013532

013544
013546
013550

013552
013556
013562

013570
013572
013574
013576
013679
013602

005770
001405

000207
104004
016363

010037
006237
062737

104004
013602
104004
016401
000755
040060

21-0CT-81

(05:47

PAGE 65

;87=0 = LINE 0-7. CHANGE THIS BYTE
;TO CONTROL THE KMS11-8D LINES SELECTED

377

CLINE=.-1
LINEL: O
PBUFR: BF0
BF1
BF2
BF3
BF4
BF5
BF6
BF7
PBFCNT: 10000
OSELO: 0
OSEL2: 0
OSEL4: 0
OSEL6: 0

100

010
001

ENUMBR: 0
0
Goob:
0
BAD:
DATA1: 0
DATA2: 0
RFLGS: =1
XFLGS=.=1

040 LBITS:
004

(KDEAD: CLR

013446

18:
i

TST
BEQ

38:

RTS
TYPE
DEDMES

es:

000020

013602
013602
040060

.BYTE

TST
cMP
BLO

MOV
ASR
ADD

013602

TYPE
‘3
TYPE
DEDMSI
B8R
40060

200,100,40,20,10,4,2.1

8PBUFR(RO)
3s
(RO)+
RO.#20
18
PC

RO,4$
43
#40060,4%

;200=LINEO,....... .1=LINE7

JCHECK FOR LINE ACTIVITY
:0=DEAD LINE

SEQ 0065

CZKMFAO KMS11-8BD INTERACTION_TEST
CZKMFA.P11
20-0C7-81 17:07

2781
2782
2783

2784
2785
2786
2787
2788

2789
2790
2791
2792
2793
2794
2795
5;39

013604
013612
013620
013626
013634
013640
013644
013644
013652
013656
013664
013666
013670

013737
012737
012777
013737
005037

000004
013720
002000
013736
013734

013736
000004
001450
000004

013777
012577
052777
000240

013734
001434
020000

001434

020000

001400

013734

012705

000240
042777

017400

005237
022737
001355
062716
000207

013734
002000

2805
2806

013724
013732

062706
012737
000207

000004
000001

013734
013736

000000
000000

2818
2819
2820
2821
2822
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832
2833
2834
2835
2836

SEQ@ 0066

KM511 ROUTINES

sTHIS ROUTINE WILL LOAD THE DESIRED FIRMWARE

013676
013702
013710
013712
013716

2808
2809
2810
2811
2812
2813
2814
2815
2816
2817

)

(PARAMETER

;BLOCK SPECIFIED) TO THE CURRENTLY ACTIVE KMC-11

2798
2799
2800
2801
2802
2803
2804

MALYY1 30A(1052) 21-0CT-81 02:47 PAGE 66

013720
013720

LDMODE: MOV

4 gs

; SAVE

58
#BOPFRM,RS

- INITIALIZE THE ADDRESS COUNTER
*POINTER TO BOP FIRMWARE

MOV
BIS

(R§)+ ,aSEL6
#20000,3SELO

SLOAD THE DATA WORD

8I(C
:U@DATE
IN
CMP
BNE
ADD

#20000,8SELO
THE ADDRESS AND TEST FOR DONE
S
;+1 TO ADDRESS COUNTER
#2000,5%
2%
#2,(SP)
:GOOD RETURN

MOV
MOV
MOV

28:

001412

CLR
MOV

43:

013500

RTS

¢RETURN WHEN DONE

cERROR RETURN

: INDICATE KMC-11 NOT FOUND
ADD
#4,SP
sRESTORE STACK
MOV
#1,ENUMBR
::E1=KMC11 NOT FOUND
RTS

5%:
6$:

*TIME OUT TRAP ROUTINE

:LOAD THE DATA WORD INTO KMC11
58, 3SEL
;LOAD ADDRESS

MOV

NOP

000002

aiS an
#2000, aSELO
63, and

0
0

sADDRESS COUNTER
sTEMP. STORE

sTHE FOLLOWING RCUTINE WILL INITIALIZE THE CURRENT KMC-11

sFIRMWARE BY ISSUEING A MASTER CLEAR AND SETTING THE RUN
;BIT. A WATCH-LOOP IS EXECUTED TO ASSURE THAT THE FIRMWARE
IF THE FIRMWARE
:1S RESPONDING TO THE USER COMMANDS.
sSOULD BE HUNG OR FAILS TO RESPOND A RETURN TO PC IS

SEXECUTED, OTHERWISE PC+2
013740
013746
013754
013760
013766
013774
014000
014004
014006
014012
014014
014020
014022
014030
014032
014036
014040
014042
014044

012737
112777
005077
02777
012777
005037
105237
001375
105777
001407
005337
001367
012737
000207
062716
000207
000000
000000
000000

000015
000377
001316
040000
100000
014042
014042

014040
001326

INTKMC: MOV

001310
001302

MOV
MOV

MOVB
CLR

18:

001270

014040
000002

000002

CLR
INCB
BNE
TSTB
BEQ
DEC
BNE

#1538

#377 @SEL2
aSEL

#40000,@SE.0
#100000,3SELO
$TMPO
$TMPO
13
@SEL2
2$
3s
18

g?g

gg.suunea

28:

ADD

#2,(SP)

3s:
$TMPO:
$TMP1:

0
O
0

013500

RTS

;%: CLEAR RUN, IF UP

:SET MASTER CLEAR
:RUN
;WAIT LOOP
:
*DONE?
:B=Y

;KMC11 DID NOT INITIALIZE

CZKMFAO KMS11-BD
INTERACTION TEST
20-0CT-81 17:07

CIKMFA.P11

MACY11
30A(1052) 21-0CT-81 02:47 PAGE 67
KMS11 ROUTINES
¢

2837

:THIS ROUTINE TEST THAT
A 'REQUEST IN'' CAN BE DONE BY

%gzg

*1F THE REQUEST IN CAN BE DONE THE RETURN IS TO PC+2 OTHERWISE TO PC

2838
2839

*CHECKING THAT NO OUTPUT REQUESTS ARE POSTED (SEL2) AND THAT
“THE FIRMWARE RESPONDS TO A REQUEST IN BY POSTING THE READY~IN.

2842

014046

2844

014056

28646

0164066

2848

014076

2850

014106

2853
2854
2855
2856
2857

014126
014130
014134
014140
014162
014146
014150
014156
014160
014164

112777

000040

001222

REQNT:

112777

000044

001212

REQGNR:

112777

000045

001202

REQNC:

112777

000041

001172

REQNX:

112777

000043

001162

REQNI:

2843 014054 000417
2845
2847

2849

014064

000413

014076

000407

014104

000403

2851 014114
2852 014122

2858
2659
2860

2861
2862

Chea

012737 000003 013500 REQGO:
105777 001154

100413
005037
105777
100407
005237
001372
012737
000207

062716
000207

014042
001136

18:

014042
000004

013500

000002

2865
%ggg

2868
2869

014166
014174
014214
014220

113777
012777

014274
000400

005077 001100
012737 000005
014502

014222
014226

004737
000207
062716
000207

2877
2878
2879
2880
2881
2882
2883

014230
014234
014240
016262
014246
014250

004737
004737
000413
004737
000410
004737

014674
014106

2885
2886
2887
2888
2889
2890

014256
014262
014264
014270
014272
014274

004737
000764
062716
000207
000000
000000

014724

2874
53;2

#40,3SELO

;TRANSMIT BUFFER IN REQ.

MOVB

c44 @SELO

;REC. BUFFER IN REQUEST

MOVB

045 ASELO

;CONTROL IN RECEIVE REQUEST

MOVB

#41,@SELO

;CONTROL IN TRANSMIT REQUEST

MOVB

#43,QSELO

BM]
CLR
TSTB
BM]
INC
BNE
MOV
RTS
ADD
RTS

2$
$TMPO
@SELO
33
$TMPO
18
#4 ,ENUMBR
PC
#2,(SP)
PC

BR
BR

MOV
TSTB

REQGO
REQGO
REQGO
REQGO

#3, ENUMBR
@SEL?

-INITIALIZE IN REQUEST

:E3= OUTPUT REQUEST PENDING
*OUTPUT REQUESTED
:B=y

;1S REQUEST GRANTED?
:B=Y
SALLOW TIME FOR RESPONSE
STRY AGAIN
*E4= RDYIN DID NOT SET
*RETURN PC

:THIS ROUTINE WILL LOAD THE LINE INITIALIZE COMMAND
fg §27§”E DEVICE REGISTERS, CURLIN=LINE # (AT THIS POINE RDY=IN

2870 014202
2871 014206
2872
2873

28:
38

MOVB

B8R

2884 014254 000405

000002

014166
014320

000002

001110
001110

013500

INTLIN: MOVB
MOV

CLR
MOV
JSR
RTS
ADD
RTS

CURLIN,@SEL3
#400,3SEL6

aSELS
#5. ENUMBR

PC INPDUN

02.\sp)

ENABLE LINE

USED
ES- LINE INIT FAILED
:RDY=-IN FAILED TO DROP
: COMMAND COMPLETED

:THIS ROUTINE WILL INITIALIZE ALL THE LINES STARTING AT LINE 1
INTALL: JSR
PC,SETLIN
18:
JSR
PC.REQNI
BR
3$
;A REQUEST IN FAILED
JSR
PC,INTLIN
BR
3s
;LINE INITIALIZATE COMMAND FAILED TO COMPLETE
JSR
PC.STCLK

B8R

JSR
BR
28:
ADD
38:
RTS
HOLDB: 0
CURLIN: 0

PC,GETLN
18
#2,(SP}
PC

:ERROR

SEQ 0067

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07

2891
2892
2893
2894
2895
2896
2897
2898
2899
2900
2901
2902
2903
2904
2905
2906
2907
2908
2909
2910
2911
2912
2913
2914
2915
2916

2917
2918
2919
2920
2921
2922
2923
2924
2925
2926
2927
2928
2929
2930

MACY11 30A(1052) 21-0CT-81 02:47 PAGE 68
D

KMS11 ROUTINES

;THIS ROUTINE WILL ISSUE A LINE INITIALIiZE TO THE LINE

;SPECIFIED IN "‘CURLINTM
014276
014302
014304
014310
014312
014316

004737
000405
004737
000402
062716
000207

INTLNE: JSR
BR
JSR

014106
014166

000002

18:

B8R
ADD

RTS

PC.REQNI
18
PC,INTLIN

1%
#2,(SP)
PC

sSET GOOD RETURN

sTHIS ROUTINE WILL SET THE MAINTENANCE LOOP AND START THE

sCLOCK,
IF COMMAND FAILS TO EXECUTE A RETURN IS MADE TO
:PC, OTHERWISE TO PC+2.

014320
014324
014326
014334
014342
014350
014354
014362
014366
014370
014374

004737
000420
113777
112777
112777
005077
012737

000207

STCLK:

014066

014274
000100
000000
000732
000006
014502

000750
000752
000742
013500

28:
3s:

000002

JSR
BR
Mov8
mMovs
mMovs
CLR
Mov

PC,REQNC
2%
CURLIN,@SEL3

RTS
agg

PC
g?.(SP)

JSR

#100,8SEL7
#0,@SELE
aSEL4
#6 ,ENUMBR
PC, INPDUN

: CANNOT ISSUE COMMAND
;SELECT LINE #
:INDICATE LOADING A MAINT. COMMAND
:SET EXTERNAL CLOCK
s UNUSED
sE6= CNT=IN MAINT FAILED TO CPMPLETE
; COMMAND NOT COMPLETED

sTHIS ROUTINE WILL ISSUE A LINE RESET COMMAND TO THE

:LINE SPECIFIED BY ‘‘CURLIN''.
014376
014402
014404
014412
014420
014424
014430
014436
014442
014444
014450

004737
000417
113777
112777

005077

000207

014066
014274
000020
000662
000662
000007
014502
000002

LRSET:
000672
000674

JSR
BR

MOov8
Movs
CLR
CLR8

PC.REQNC
28
CURLIN,@SEL3
#20,8SEL7
SSEL4
8SEL6

JSR
RTS

PC,INPDUN
PC

MoV

013500
28:

ADD
RTS

#7 ,ENUMBR

#2,(SP)
PC

:OUT REQ. OR HUNG

:LD LINE #
sLINE RESET COMMAND
UNUSED
USED

E7- LINE RESET FAILED TO COMPLETE

SEQ 0068

CZKMFAD KMST1-BD INTERAC Tl ON_TEST
20-0CT-81 17:07
CZKMFA. P11
2931
2932
2933
2934
2935
2936
2937
2938

2940
2941

2943
2944
2945
2946
2947
2948
2949
2950
2951
2952
2953
2954
2955
2956
2957
2958
2959
2960
2961

MACY11 30A(1052) 21-0CT-81 0?:47 PAGE 69
E

SEQ 0069

KMS11 ROUTINES

:THIS ROUTINE WILL MONITOR THE REQUEST OUT OF SELZ
;FOR SETTING WITHIN DURATION OF 1 LOOP

014452
014456
014462
014464
014470
014474
014500

005037
105777
100404
005237
001372
062716
000207

?EQOUT: CLR
TST8
BMI
INC
BNE

014042
000620
014042

2%:

000002

RTS

ADD
RTS

$TMPQ
aSELZ
2%
$TMPO
1$
PC

#c.(SP)
PC

;OUTPUT REQUESTED?
:B=YES
:TRY AGAIN

;NO OUTPUT REQUESTED

:OUTPUT IS REQUESTED

;THIS ROUTINE WILL TEST THAT THE INPUT STATUS COMMAND
sWILL COMPLE"E (RDY IN DROPS)

014502
014510
014514
014520
014522
014526
014530
014532
014536

062777
005037
105777
100004
005237
001372
000207
062716
000207

014540
014546
014554
014560
014562
014566
014570

113737
113737
012700
005020
020027
103774
000207

000040

014042

000556
014042

000566

INPDUN: BIC
CLR
18:
1STB
BPL
INC

BNE

28
$TMPO

¢ INSRUCT COMMAND READY
: INPUT DONE?
:B=YES

;COMMAND NOT ACCEPTED

RTS

: COMMAND DONC

28:

013442
013442
025622

CLRBFS: MOVB

045722

$TMPO
QSELO

RTS

000002

ADD

Movs

18:

#40,3SELO

MOV
CLR
CMP
BLO
RTS

#2, (SP)
LINEB,RFLGS

LINEB,
X LGS

#8F0,RO
(RO)+
RO, #BFND
18
PC

MACY11 30A(1052)

CIKMFAO KMS11-8BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07

CHKDTA: MOV

OONOO

ASL
MOV

1$:

OO0

CMPB

05:47

PAGE 70

LINEL RO

PBUFR(RO) ,EDP
#BUFR, STMPO
RO,$TMPO

#2600, $TMP1
agrnpb.aeop
2
a8$TMPO, GOOD

8EDP,BAD

28:

O—=

)

ol cond cncd

=0O000O0

013444

—bd

21-0C7-81

KMS11 ROUTINES

INC

EDP

$TMPO
$TMP1
18

014672

000000

014720
014724
014730
014734
014736
014740
014744
014746
014754
014762
014766

106337
005237
105737
001404
100370
106337
000207
113737
012737
062716
000207

014770

000000

purQuurd

014674
014702
014710
014714
014716

014724

013443
014274
013443

3443

4274

SETLIN: MOVB

GETLNO: ASLB
GETLN:

INC

CLTNE
CURLIN
CLINE
18

GETLNO
CLINE

013443
013442
177777
000002

LINEB,CLINE

#-1,CURLIN
PC,GETLN
PC

18:

mMovs
RTS

EDP:

LINEB,CLINE

#-1,CURLIN

#2,(SP)

;NO LINES ENABLED!

SEQ 0070

CZKMFAO KMS11~BD INTERACTION TEST

CIKMFA.P11
2998

2999
3000

3001

20-0CT-81 17:07

014772
014776

013746
013746

21-0CT-81

MACY11 30A(1052)

KMS11 ROUTINES

XOR:

015002 012737 015174 000020

3002 015010 012737 000340 000022

MOV
MOV

20,=(SP)
22.=(SP)

:SAVE 20
*SAVE 22

#3460, 22

Y10T INTR LVL

MOV

#2820

MOV

3003
3004

015016
015024

012737
012737

000300
000302

013506
013510

MOV
MOV

#300.DATA1
#302°DATA?

3006
3007

015040
015046

012777
062737

000004
000004

176442
013506

MOV
ADD

#10T,aDATA2
#6,DATA1

3010
3011
3012
3013
3014
3015
3016
3017
3018
3019

015070
015072
015100
015106
015114
015120
015126
015134
015142
015144

001360
012737
012737
052737
005077
012777
042737
052777
000240
012637

000000
017134
000340

015334
015366
177776

1$
#0,TSTN
prsrrao TSTPNT
#340,P

000100
000340
000200

000130
177776
000114

BNE
MOV
MOV
BIS
CLR
MOV
BIC
BIS
NOP
MoV

3021
3022

015154
015160

005077
052737

3005 015032 013777 013510 176446 1$:
3008 015054 062737 000004 013510
3009 015062 023727 013506 001000

3020

3023

015150
015166

012637
104012

3024
3025
3026
3027
3028
3029
3030

015170
015172
015174
015200
015206
015214
015222

000000
000426
011637
162737
013737
162737
012737

303,
3035

015240
015244

012637
012637

3031
3032
3033

3036
3037
3038

015230
015234
015236
015250

005077
022626
022626

000207

000022
000020
000076
000340
015252
000002

015252
000002
000340
000022

000022
000020

PAGE 71

:THE FOLLOVING AUTO VECTORS USING_THE FIRST BASE ADDRESS

000020
000022

000136

05:47

MOV
ADD
cMP

DATAS.GDATAT

‘10T INTR VECTOR
;10T TRAP

#4.DATA2
DATA1,#1000

aonscsn

:SET UP DEFAULT
©
;PREVENT INTERRUPTS

#INTENA ,8DMBCSR SET INTERRUPT ENABLE
#340,PS ;ALLOW INTERRUPTS
#DONE,3DMBCSR
:SET DONE..AND INTERRUPT

177776

CLR
BIS

(SP)+,22
(SP)+.20
abMBC SR
#340,PS

015252
015254
015252
177776

HALT
BR
MOV
SUB
MOV
SUB
MOV

38
(SP) ,DMBVEC
#2,DMBVEC
OMBVEC,DMBLVL
#2 .DMBVEC
#340,PS
aDMBC SR

:SAVE
‘CREATE AND SAVE VEC
‘PREVENT INTERRUPTS
;

MOV
MOV

($2)+,22
(SP)+.20

;RESTORE 22
*RESTORE 20

MOV

ERROR

28:

CLR
POP2SP
PGH2SP

3s:

%828

RTS

:YOU DIDN'T INTERRUPT ?
*RESTORE 20 ¥ 22
SSTOP ALL INTERRUPT
:
;YOU SHOULD HAVE INTERRUPTED

;EXTRACT VECTOR +4
CREATE LVL

JINDIRECT POINTERS

3041
3042
3043
3044
3045
3046
3047
3048
3049
gggg

015252
015254
015256
015260
015262
015264
015266
015270
015272
015274

3052
3053

015276
015276

000540
000542
164200
164202
177560
177562
177564
177566
177570
177570

DMBVEC: 540
DMBLVL: 542
DMBCSR: 164200
DMBLSR: 164202
TKCSR: 177560
TKDBR: 177562
TPCSR:
177564
rPoeR
177566
SWR
177570
DISPLAY:177570
KMCCSR:
SELO:

:DM11-8A INTERRUPT VECTOR
‘DM11-BA ONTERRUPT PRIORITY
‘DM11-BA CONTROL STATUS REGISTER
‘DM11-BA CONTROL STATUS REGISTER

SEQ 0071

CIKMFAO KMS11-8D
INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07
3054

015276

3055
3056
3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
gggg

015300
015300
015302
015302
015304
015304
015306
015306
015310
015310
015312
015312
015314
015314

3070
3071
3072
3073

015316
015320
015322
015324

174100

MACY11
30A(1052) 21-0CT-81 02:47 PAGE 72
KMS11 ROUTINES
H

BSELO:

174107

SELY:
BSEL1:
SELZ:
BSEL2:
SEL3:
BSEL3:
SEL&:
BSEL4:
SELS:
BSELS5:
SELG:
BSEL6:
SEL7:
BSEL7:

000300
000302
000304
000306

KMCVEC:
KMCLVL:
KMCV1:
KMCL1:

174101
174102
174103
174104
174105
174106

174100
174101
174102
174103
174104
174105
174106
174107
300
302
304
306

Std

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA. P11

20-0CT-81 17:07

MACY11 30A(1052)

KMS11 ROUTINES

%8;?

21-0CT-81

05:47

PAGE 73

REC3;

SE@ 0073

;PROGRAM VARIABLES

3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
3090
3091
3092
3093
3094
3095
3096
3097
3098

015326
015330
015332
015334
015336
015340
015342
015344
015346
015350
015352
015354
015356
015360
015362
015364
015366
015370
015372
015374
015376
015400
015402

000000
000020
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
017134
000000
000000
200000
002000
0000200
00000G

3105
3106

015416
015424

052123
042440

052101
051122

MSTATE: .ASCII

;STATUS ERRORX'‘EXP

054105
051040

051525
051117
020120
041505

3110

015447

114

047111

020105

MLINER: .ASCII

;LINE ERRORX'EXP REC LINE SELA;

046513

030523

020061

MLINE1: .ASCII

;KMS11 STATUS ERRORX''SELO

MTRANE: .ASCII

;KMS11 DATA ERRORX'EXP REC KMS11 LINEQ;

3099
3100
3101
3102
g}gz

3107
3108
3109

3111
3112
3113
3114

3115

3116
3117
3118
3119
3120
3121
3122
3123
3124
3125
3126
3127
3128
3129

015404
015406
015410
015412
015414

015432
015440
015446

000000
000000
000000
000000
000000

021045
020040
100

015454
015462
015470
015476

051105
042442
041505
020105

015512
015520
015526
015534
015542
015550
015556
015563
015570
015576
015606
015612
015620
015626

052123
042440
021045
020040
031114
046513
044514
113
042040
051105
042442
041505
030461
040105

015504

ERRFLG:
TRACON:
PASCNT:
TSTNO:
RETURN:
ICOUNT:
SAVRO:
SAVR1:
SAVRZ2:
SAVR3:
SAVR4:
SAVR5:
SAVSP:
SAVPC:
WRDCNT:
CHRCNT:
TSTPNT:
TSTMAX:
LINFLG:
LINE:
LINORG:
LINANS:
ANSFLG:

ORGFLG:
TIME1:
TIME2:
TIFLG:
RNGRET:

047522
050130
046040
042523

052101
G51122
042523
020040
020040
030523
042516
051515
052101
047522
050130
045440
046040

022522
051040
047111
040114

051525
051117
030114
042523
020040
020061
100
030461
020101
022522
051040
051515
047111

0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
TSTTBO
0
0
0
0
0
0
0
O
0
0
0

SEL2

KMS11 LINES;

d e

016072

D o

=)=
PNION
P —

Nboowg

OWONNN
= SO0

80\1

051595

03
02
;TEST GROUP 1:X'°;

LASCII

;OFF LINE YESTS USEING H3256 TEST CONNECTORS AND H317-M PANEL.ZY'‘;

.ASCI1

;FIRST TEST= 1002''9;

04
MU
NS W

.ASCI1

OWnN—

020124
020120

OOMNWVIOO
=
NN
NN

LASCII

052123
020124
022460

NNLOONINVO

—t ek \ YD) b =i\,

030060

046

b PN b ad =k \ N\

042523
0

OWNO ===
NWNASRNINSO

D o

b o

b ok e

D —p —

WVISHON—OW

wvisswnrnornow
=S SNV OWVY
VN
PO~
ON—=O0NOCO

ODOO0O0O0

OH
(o V.

O—=

NNNNNNNNOOONONO
ooooNon
O NN o O
NN
SHO0O ~N OoNSONO

wvivauvauviwavawua
Vi A L
ANWAHWLDA N

b o

(elolelelelaelelelalolelelalelalelels) o

&HNOOo

Rowvean
N=—=O
N80
OSSN

O00O0

O
EERV_T.
Yo XV ]

=M=

021045

(=]

WVINLND SN

d e

oo (o e
oYo Yo Yo Yo Yo Yo Xe Yo Yo Yo
NN
= - puiFuiy b b b o b b ok o
4 A LS UAS LA S
(=
on P oo
oW

urQurd —

AN
O

313

»lelelelelelelelelelelelelelolelelalelelelelolele]

N NN N N A N AN NN N U O N N N AN U N U G N NN

d d e

‘AN
AN NN N NN N NN N
NN NN N AN W AN N N NN N N
ad et b d b e b e D ed o
b o) i b ch e nd d e e
b e i
b e
b rd b
D e d d D
md e D D o b D b b
00 00 00000000
~N NN~ NN
NNOO OO \NNVNVNVAWNUVNWNVWNWNE
S SNBSS
WWWW
F
W) = O 000 O NENRI =2 OO0 00 NN B NN = OO0 YO N
WOV
NOI NN
VS WA=
O D000~ (V.
o

AU U

CZKMFAO KMS11-BD INTERAC
CZKMFA.P11
20-0CT-81
TEST
v)
:0?7

MACY11 30A(1052)
KMS11 ROUTINES
21-0CT-81
J
6
05:47

PAGE 74

M16:

.ASCI!

;X''%"'8 LINE SCANNER TESTX'Q;

MTITLE:

.ASCII

;X"'%"'CZKMFAQ KMS11-BD INTERACTION TESTX'';

.ASCII
LASC!I

‘TEST GROUP 0:%'';

.ASCII

;OFF LINE TESTS USEING H3256 TEST CONNECTORS AND H317-M PANEL.ZX'';

;FIRST TEST = 000%'';

MVECTO:

LASCII

;X'DM11 VECTOR ADDRESS-3;

KVECTO:
LASCI]

;X'’XKMS11 VECTOR ADDRESS-d;

SEQ 0074

1
BP9

:X'DM11 CSR ADDRESS-d:

KREGAD:

.ASCII

;X'XMS11 CSR ADDRESS-a;

DEDMES:

LASCI1

;X 'KMS11 LINE 8;

DEDMS1:

LASCII

; 1S DEADX''®;

MTEST:

LASCII

;X''TEST-3;

MQM:
:
MCRLF
MLINE:

LASCII
.ASCII
.ASCl1

MLINEI:

LASCII

;X"'LINE NUMBER-3;

:
MFATAL

.ASCII

;FATAL ERRORX''CSTAT

:
MTRNDE

.ASCI1]

:X"'TRANSITION DETECTEDX''CSTAT

MPFAIL:

;T''POWER FAILUREQ;

H
Y

;4"'SINGLE LINE CABLE TESTX'‘a;

LSTATa;

052123
050042
043040

;=CURRENT TEST WILL RESTARTZ''9;

MPF1:

051127
u47040
100

017015
017016

SEQ 0075

MREGAD: .ASCI1I

OO0
WOW
=200
W=
ONN
VINDWN

OOOO
W
=000
WnNHS-0
NSO
(NO =\

PAGE 75

OO0
S
N=
=N
==
=W

042522
021045
041440

05:47

OO0
WSS
NNON)
SO
NS
WO

016304
016312
016320
016326
016334
016336
016344
016352
016360
016363
016370
016376
016401
016406
016414
016422
016424
016430
016433
016440
016446
016454
016462
016466
016474
016502
016505
016512
016520
016526
016534
016537
016544
016552
016560
016566
016574
016602
(016603
016610
016616
016623
016630
016636
016644
016652
016660
016663
016666
016671
016676
016701
016706
016713

KMS11 ROUTINES

Lo tandas Kon Nan Non Kan N o

CZKMFAO KMS11-BD INTERAC
CIKMFA.P11
20-0CT-81

3186
3187
3188
3189
3190
3191
3192
3193
3194
3195
3196
3197
3198
3199
3200
3201
3202
3203
3204
3205
3206
3207
3208
3209
3210
3211
3212
3213
3214
3215
3216
3217
3218
3219
3220
3221
3222
3223
3224
3225
3226
3227
3228
3229
3230
3231
3232
3233
3234
3235
3236
3237
3238
3239
3240
3241

21-0CT-81

MACY11 30A(1052)

MCONTC:
MCONTV:
MCONTL:
$SWREQ:

.
.
.

SNEWIS:

LSTATa;

MACY11 30A(1052)

CZKMFAO KMS11-BD INTERAC T 1 0 N TEST

CZKMFA.P11

20-0CT-81

3242
3243
3244
3245
3246
3247
3248
3249
3250
3251
3252
3253
3254
3255
3256
3257
3258
3259
3260
3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277
3278
3279
3280
3281
3282
3283
3284

017016
017024
017032
017034

021045
040520
040040
000000
017046

017046

000000

3285
3286
3287
3288
3289
3290
3291
3292
3293
3294
3295
3296
3297

KMS11 ROUTINES

7: 07

04 0 5
05115 2 3
471

201 0 4
200 4 0

21-0CT-81

MEPASS: .ASCII ;X'°END PASS

05:47

PAGE 76

TEMTAB: O
.=.+10

017152
017154
017156
017160
017162
017164
017166
017170
017172
017174
017176
017200
017202

b
b wdd cnd and cad wnd cd

QY GY NPy NP V] VY, gy
~N IR =2 O
= N=A)=GN
~N O NORIVONONNI
=N N0 &~
~ NSONRNION
SO
O

b ad
—ed ed cnd

OO0

017050
017052
017054
017056
017060
017062
017064
017066
017070
017072
017074
017076
017100
017102
017104
017106
017110
017112
017114
017116
017120
017122
017124
017126
017130
017132
017134
017136
017140
017142
017144
017146
017150

OOCOOOOO0

;EMT DISPATCH TABLE
EMTTAB: ERRCS
ERRLS
LOOP

FREEZE
TYPER

svospP

INSTR

ERRD
ERRS

CNTLU
CKINT
KBDINT
EMTLIM: 0
TSTLST: TSTTB0
TSTT81

004000

GRO:

NO-1

TSTT80:

;CALLED BY EMT CNTLW
;CALLED BY EMT CKINTT
sCALLED BY EMT KBDIN

SEQ 0076

CZKMFAO KMS11-BD INTERACTION_TEST

CIKMFA. P11

20-0CT-81 17:07

MACY11 30A(1052)

KMS11 ROUTINES

3298
3299
3300
3301
3302
3303
3304
3305
3306
3307
3308
3309
3310
3311
3312
3313
3314
3315
3316
3317
3318
3319
3320
3321

017204
017206
017210
017212
017214
017216
017220
017222
017224
017226
017230
017232
017234
017236
017240
017242
017244
017246
017250
017252
017256
017256
017260
017262

003122
004000
003212
004000
003302
004000
003372
004000
0036460
004000
003546
004000
003634
004000
003722
(04000
003774
000400
004056
000400
004254
000400
004432
000200

112
TIMES
T13
TIMES
T14
TIMES
115
TIMES
116
TIMES
117
TIMES
120
TIMES
121
TIMES
122
TIMES
123
TIMES
T24
TIMES
125
TIMES

3326
3327
3328
3329
3330
3331
3332
3333
3334

017274
017276
017300
017302
017304
017306
017310
017312
017314

005166
000200
005360
000200
005552
000200
005746
000200
006142

130
TIMES
131
TIMES
132
TIMES
133
TIMES
T34

3322
3323
3324
3325

3335

3336
3337
3338
3339
3340
3341
3342
3343
3344
3345
3346
3347
3348
3349
3350
3351
3352
3353

017264
017266
017270
017272

017316

017320
017322
017324
017326
017330
017332
017334
017336
017340
017342
017344
017346
017350
017352
017354
017356
017360
017362

004602
000200
004774
000200

000200

006336
004000
006476
004000
006712
004000
000000
007136
000001
007174
004000
007352
004C00
007530
004000
007706
004000
010064

T
TIMES
T
TIMES

TIMES

135
TIMES
136
TIMES
T
TIMES
0
TSTTB1: T100
1
TN
TIMES
1102
TIMES
1103
TIMES
7104
TIMES

1105

21-0CT-81

05:47

PAGE 77

SE@ 0077

3357

017372

010414

3356
3358
3359

017370

017374
017376

004000

004000
000000

TIMES
1106
TIMES
1107
TIMES
0

004000
010240

SEQ@ 0078
—

017364
017366

PAGE 78

3354
3355

KMS11 ROUTINES

(5:47

p—p— g

20-0C7-81 17:07

e g

CZKMFA P11

21-0CT-81

—

CZKMFAO KMS11-BD INTERACTION_TEST

MACY11 30A(1052)

CIKMFAO KMS11-BD INTERACTION TEST

20-0C7-81 17:07

400

016777
103405

123200

VIO
=
WO

N
o

D b
wad cmd e
D e
b
b
D
D amd emd b
—b

100437

020200

KMS11 ROUTINES

BOPFRM:

21-0CT-81

7
05:47

PAGE 79

016777,1232C0,060520,103405,100400,000401,063230,000401

063226
010001

.WORD

063227,000402,063226,000777,063231,010001,004002,016403

061220
000560

-WORD

002403,000400,061220,061222,114400,000560,063236,004400

047634
102054

-WORD

073237,062231,047634,102451,020660,102054,102606,004420

020660
004420

-WORD

073016,047634,020660,107663,107003,004420,073417,103424

063016

.WORD

100431,004420,063016,100446,020660,102606,002012,057635

000403
101070

.WORD

103715,140620,000403,070017,056406,101070,070077,100477

100466

-WORD

056407,101073,100466,043220,000404,076400,100466,016505

070217
016462

.WORD

036600,000420,070217,062735,100437,016462,056222,022203

057220
061311

.WORD

056226,056227,057220,123221,054661,061311,055230,056411

101631
062735

-WORD

101123,056411,101631,000420,070217,062735,120600,102126

100437
036600

.WORD

120620,102374,100437,003000,016462,036600,004600,070217

063221
010000

-WORD

042727,064214,043221,062701,004002,010000,056407,
043224

070204
076614

.WORD

000410,062404,070204,016604,076617,076614,076600,016400

100437
000403

.WORD

000401,062620,100437,016601,022600,000403,070017,056406

056407
043220

-WORD

101172,100501,056407,101175,100571,043220,000404,076400

100536
100501

.WORD

100571,023200,100536,016601,036600,100501,002052,057635

060525
061620

.WORD

103621,023605,060525,103302,060605,061620,102623,102244

100715

.WORD

100437,020200,100715,000771,063224,000420,070217,076715

076400

17720

020026
020034
020040

060520
000401

102606

d D b

) D

D d D D d D e

S OO

AT 3

) D D d D

D d b

(elolelelelelelalelelalelelalelelelalelelelelalalelalelelalelalelelalalolalelalalelels)

CIKMFA. P11

MACY1? 30A(1052)

SEa 0079

3471

OO0

~
~

—

=4
(=4
o

20
02
03
00
02
03
03
04

?
05:47

PAGE 80

.WORD

002533,100501,002563,100501,002012,074615,023204,103251

+WORD

062604 ,003200,07v217,042700,004000,056727,004002,010000

076605
002402

023700
100437

-WORD

076604 ,076605,023700,102676,002402,100437,002774,000773

020200
020206

062274
000770

100437
062274

023300
000776

.WORD

062274 ,100437,023300,000770,062274,000776,063224,000420

020220
858%%2

070217
062274

076715
100750

000771
023300

.WORD

070217,076715,000771,062274,100750,023300,000770,062274

020240
020246

000771
061620

062274
103037

060615
070217

.WORD

000771,002274,060615,061620,103037,070217,000440,062715

020260
020266

000404
004002

063225
010000

000410
056407

.WORD

000404 ,063225,000410,004002,010000,056407,043224,062404

020300

070204

016405

076617
016400

.WORD

070204 ,016405,076617,016400,016400,016400,076605,100437

020320
020326

004600
064214

070217
043221

042727
076701

.WORD

004600,070217,042727,064214,043221,076701,000410,004002

020340
020346

010000
062400

056407
070200

043220
016404

.WORD

010000,056407,043220,062400,070200,016404,076617,076614

020360
020366

016400
100437

016400
063204

062604
000500

-WORD

016400,016400,062604,100437,063204,000500,060664,061231

020400

000773

063224

147232

100750

.WORD

000773,063224,100750,057635,103445,147232,016132,056230

020420
020426

000420
100445

070216
062233

062735
016447

.WORD

000420,070216,062735,100445,062233,016447,016172,014401

020440
020446

062230
105037

042224
056225

056406
055230

.WORD

062230,042224,056406,105037,056225,055230,000402,070016

120620
036420

.WORD

120600,106030,120620,106651,036400,036420,100445,042225

104425

.WORD

056407,105043,104425,041230,003004,056404,104426,016464

—t

104426

(=
W

o
W

wn
~

§ v

S
2
&
o
N

020514

076604
102676

—h

000410,056407,043220,062400,070200,016604,076617,076614

.WORD

=4
o
(=

063220
016604

100750,120600,102231,120620,102374,057625,070077,103242

-WORD

&H
r
W

COO0OO0OOO

N
v
N

(=]
&»H

O‘\.hbbzl\)f\)—'
(=]
&OJ\OO
ooagc

21-0CT-81

10
56
7
76

WNISSEIESEEREE
3322352 WA = OV NN

MA(C Y11 30A(1052)
KMS 11 ROUTINES

2 OV

NO VS W= O O~ o

S¥
RRRRRERRRRIRER R R PIIIIIIIISIIIIIIIIIINS
Ry
oo
[e QYL IV, 1Y, IV TV AV, IV

—

CZKMFAO KMS11-BD INTERACTION_TEST
7:
CZKMFA.P11
20-0CT-81

016464

056404

SEQ 0080

CZKMFAO KMS11-BD INTERACTION_TEST
CIKMFA.P11
20-0CT-81

3472
3473
3474
3475

020520
020526
020534
020540

002132
060220
100445
104450

3477
3478
3479
3480
3481
3482

020554
020560
020566

056230
056406
055230
042411
070216
134600

3476

020546

020574
020600
0¢

NS NI

20000 NS WIN —

NN
AN AN U N AN N N AN N NN N
IV AV IV IV VA IV VAV IV WAV TV TV Y]
PNONIAIRLNINOADN)
= e b b cd b —d ) =
W

023700
002401
000775
100445
0606
063224
000404
002172
000401
043635
070216

7
05:47

PAGE 81

.WORD

104450,062233,016457,104416,016132,054220,056230,042224

-WORD

056406,105123,056225,055230,056411,105100,042411,105512

-WORD

070216,000420,076735,134600,106114,120620,106651,036400

-WORD

036420,100445,070076,016533,120600,106114,120620,106651

-WORD

036400,036420,100445,042225,056407,105127,104473,041230

.WORD

003004,056404,104474,016573,043221,000411,070016,043622

.WORD

107167,002372,063122,063122,063122,063522,062602,060522

+WORD

062230,060601,002132,062230,000402,002172,062230,070216

107165
002602

.WORD

054620,061620,107165,002614,100445,002602,100445,002132

100445

.WORD

060601,062230,100445,054220,054220,057221,000411,070016

016607
062230

.WORD

043222,104541,016607,002172,000401,062230,100445,002614

062230
070216

.WCRD

002172,000401,062230,100445,007200,070216,042727,064214

070016
010000

.WORD

056700,000411,070016,043225,004002,010000,056407,
043224

070204
076614

.WORD

000410,062404,070204,016400,076617,076614,054220,076605

106645
002774

+WORD

023700,061620,106645,002401,100445,002774,000775,062274

000500
000773

-WORD

100445,063224,000500,060664,061231,000773,063224,002172

104672

.WORD

000404 ,062230,104672,002172,000777,063224,000401,062230

007200
064214

.WORD

043635,103445,007200,070216,042727,064214,056700,004002

063224
042727

002132,056230,000400,060220,002172,062230,100445,016573

057221

021100
021106
021114
021120
021126
021134
021140
021146
021154
021160
021166

KMS11 ROUTINES

21-0CT-81

.WORD

104416

3510

MACY11 30A(1052)

SEQ 0081

CZKMFAQ %?511-80 INTERACTION_TEST
CZKMFA.P
20-0CT-81117:07

056700

004002

(V]

[« JV, F AV 1,8 By

N AN NN NN

VIV AWV

(9]

N NN

tvitvrvvvivitv
QAR

021174

060535

113526

21-0CT-81

7
05:47

PAGE 82

-WORD

010000,056407,043220,000410,062400,070200,016400,076617

.WORD

076614 ,054220,016400,062604,100445,043620,106720,114673

002701
002700

-WORD

002740,004001,002701,004600,070017,002700,004001,002701

000407
000400

-WORD

000673,062232,000407,062230,060220,000400,002372,062230

114673
061620

-WORD

000431,062234,114673,123561,107320,061620,106377,106753

114673
056407

.WORD

060521,113471,114673,004002,010000,056407,043220,000410

016405
016400

-WORD

062400,070200,016405,076617,016400,016400,023260,000410

061620
002410

-WORD

060660,061620,061620,061620,076620,002410,114673,120400

070216
117673

.WORD

061620,112435,070216,047234,043635,117673,002172,000404

063224
064214

-WORD

062230,000772,063224,007200,042727,064214,056700,004002

043220

.WORD

010000,056407,043220,000410,062400,070200,016400,076617

016400
047234

.WORD

076614,016400,016400,016772,114673,047234,043635,117673

063661
062234

.WORD

000776,023301,063661,062234,060461,062234,004600,042727

076701
010000

.WORD

064214,043221,076701,014410,004002,010000,056407,043220

016404
016400

.WORD

062400,070200,016404,076617,076614,016400,016400,016772

000437
063261

-WORD

114673 123141,000437,063222,000740,063261,020700,060662

114673
112604

.WORD

060701,062234,114673,120400,061620,112604,070216,047634

113520
043635

-WORD

116673,043635,113520,000401,064334,043635,113523,114673

110513

-WORD

060535,113526,110513,060535,113526,114673,054220,016414

070200

021640

MACY11 30A(1052)
KMS11 ROUT

SEQ 0082

%ggg
3597
3598
3599
3600
3601
3602

021740

=200
—0O0O0—
NI NOO
NI = —

NSO
QOO

114673

688;00

MACYT1 30A(1052)
KMS11 ROUTINES

21-0CT-81

05:47

PAGE 83

.WORD

054220,054220,136500,136520,123160,000740,063260,063120

.WORD

063140,063140,063120,063120,076460,123141,063161,123160

.WORD

000401,063260,111155,063160,063260,063161,111165,063160

111165

070076

002461

.WORD

111165,070076,002461,000407,070016,076601,000401,076660

021766

000440

123160

000436

076660

.WORD

123160,000436,076660,000440,063260,000420,063300,000403

022000

060675

070216

076700

.WORD

060675,070216,076700,114673,047634,116673,043635,113615

022020

000401

064334

043635

.WORD

000401,064334,043635,113620,114673,060535,113623,110610

022040
022046

060535
054220

1
1 3623
0 16477

054220

114673

.WORD

060535,113623,114673,054220,016477,054220,136500,136520

3610
3u11
3612
3613
3614
3615
3616
3617
3618
3619
3620

022060
022066
022074
022100
022106
022116
022120
022126
022134
022140
022146

123160
063120
063120
016500
000402
111256

(63260
063140

.WORD

123160,000740,063260,063120,063140,063140,063120,076520

123140
111670

.WORD

016500,016421,123140,000402,076740,111670,111256,123160

076660
123160
076660
000403

000740
063140
076520
016421
076740
123160
063260
123160
000401
000436
060675

063160

.WORD

000401,0632€0,063160,076660,123160,110661,123160,000401

076660
070217

.WORD

.
076660,000436,076660,000403,060675,070217,076675,114673

3623

022160
022166

123160
063160

000401
111677

063260
076660

.WORD

123160,000401,063260,063160,111677,076660,110661,070077

3625
3626

022200
022206

123560
110705

113304
002603

002533
000412

.WORD

123560,113304,002533,110705,002603,000412,070017,110661

3628
3629

022220
022226

060220
060220

.WORD

060220,060220,060220,060220,060220,060220,060220,060220

3631
3632

022240
022246

060220
060220

.WORD

060220,060220,060220,060220,060220,06022C,060220,060220

3634
3635

022260
022266

060220
060220

.WORD

060220,060220,060220,060220,060220,060220,060220,060220

3637
3638
3639

022300
022306
022314

060220
060220
060220

060220
060220

.WORD

060220,060220,060220,060220,060220,060220,060220,060220

000401

063260

047634

N
o

114673

W
O

=4
o

113620

022026

114673

W
O

022006

o
N
n
o

3603
36
3605
36 06
3607
3608

021760

060535

=4
o
v

~
o~

646

NINVININIAININOIAINIPIA)

3584
3585
3586
3587
3588
3589
3590
3591
3592

[ela]lelelolololelelole]

CZKMFAD KMS11-BD INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07

000420

116673

060535

110661

SEQ 0083

CZKMFAO KMS11-BD INTERACTION TEST
CZKMFA.P11
20-0CT-81 17:07

ONONVIPNOAAS
NN = O & 2O
NN =IO
=NINSO
OON=OCMNLION=2NO

o~o-u~wm-o~o--8
—t ek PANONN
Y = OO

OO = OOO=OO
=IO

022766

7
05:47

PAGE 84

060220,060220,060220,060220,060220,060220,060220,060220

-WORD

060220,060220,060220,060220,060220,060220,060220,060220

.WORD

060220,060220,060220,060220,060220,060220,060220,060220

010000
076560

-WORD

174610,004002,010000,043620,115606,076560,014410,043225

057625
061620

+WORD

062405,070205,057625,116167,057637,061620,061620,061620

057234
057222

-WORD

061620,061223,057234,057220,00056C,057222,060662,061620

061620
064214

-WORD

061620,061620,061620,063223,055226,064214,060605,061620

020017
076701

.WORD

116500,000600,070017,043221,000500,076701,014420,074661

055224
063120

-WORD

061620,077303,055224,055225,057220,063120,063120,063120

060660
003360

.WORD

063120,000700,060660,060703,061227,003360,120440,060660

060705
117602

.WORD

063305,000600,060705,061222,060525,117602,000700,
114705

000500
06066

-WORD

070217,043221,000500,062701,000420,060661,061620,063303

000402
062203

-WORD

060605,117552,000402,070017,056222,062203,056226,056227

054661
000403

.WORD

057220,123221,054661,061311,055230,000603,070017,054406

061105
043220

-WORD

061224,057220,061105,115135,114540,043220,000404,062400

120620

.WORD

120600,116140,120620,116145,114454,000400,061231,000773

-WORD

061226,114454,060601,117112,000403,070017,056406,043220

-WORD

076500,115163,114512,043221,000404,076401,116512,054620

-WORD

061620,061620,061620,061620,061223,055224,055225,055226

000400

061223

21-0CT-81

.WORD

060220

3640
3641
3642
3643
3644
3645
3646
3647
3648
3649
3650
36351
3652

MACY11 30A(1052)
KMS11 ROUTINES

SEQ 0084

MACY11 30A(1052)

CZKMFAO KMS11-BD INTERAC
CIKMFA P11
20-0CT-81

022774
023000
023006
023014
023020

KMS11 ROUTINES

055225

7
05:47

PAGE 85

.WORD

055227,114465,123620,000700,061311,114476,123400,061620

.WORD

117212,100425,123400,000600,061300,060520,117621,000625

.WORD

114705,000600,061231,000664,114705,123400,061620,117251

.WORD

123077,000407,063277,063137,063137,063137,073537,062231

.WORD

004600,060417,063236,120400,116247,116673,110503,106715

.WORD

104743,060600,117655,114606,000001,060520,117660,100425

000664
061620

-WORD

000600,061231,000664,114705,123400,061620,117270,114630

114606
061260

.WORD

060600,103425,114606,123000,000500,061260,000401,114705

000500
063230

.WORD

123440,103425,000500,061262,000401,063230,100425,000000

600000

.WORD

000000,000000,000000,000000,000000,0060000,000000,000000

000000
000000

.WORD

000000,000000,000000,000000,000000,000000,000000,000000

000000
000000

.WORD

000000,000000,000C00,000000,000000,000000,000000,
000000

000000
000000

-WORD

000000,000000,000000,000000,000000,000000,000000,00G000

-WORD

000000,000000,000000,000000,000000,000000,000000,000000

.WORD

001007,114761,001027,114763,001047,114765,001067,114767

-WORD

001107,114771,001127,114773,001147,114775,001167,114777

000000

BOPEND:
ENDA:
PAT(CH:

BUFR:

001004

21-0CT-81

B8F0:
BF1:
BF2:

.8LKW

.BLKW

SEQ 0085

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA. P11
20-0CT-81117:07

033652
0

001004

MACY11 30A(1052)
KMS11 ROUTINES

21-0CT-81

?
05:47

PAGE 86

.BLKW
.BLKW
.BLKW
.BLKW
.BLKW

000000

000001

-END

;THAT'S ALL FOLKS!

SEQ 0086

CZKMFAO KMS11-BD INTERACTION_TEST

CZKMFA. P11
ANSFLG
BAD
BFND
BFO
BF1
BF2
BF3
BF &
BF5
BF¢
BF7

BINASA
BINASB
BINASC
BINWRD=
BOPEND
BOPFRM
BSELO
BSEL1
BSELZ2
BSEL3
BSEL4
BSELS
BSEL6
BSEL?
BUFGO

MACY11 30A(1052)

011762
012002
011752
012114
023400
017400
015276
015300
015302
015304
015306
015310
015312
015314
013210
BUFR
023600
BUSY = 000020
012546
CHCK
CHKDTA 014572
CHRCNT 015364
CKDEAD 013524
010664
CKINT
CKINTT= 104017
CLINE = 013443
CLRBFS 014540

3098#
2361
2959
2738
2739
2740
2741
2742
2743
2744
2745

2753
37574
2957
37504
37514
37524
37534
37544
37554
37564

26420
26447H
264404
6482
37454
2789
30544
845
3058#
30604
30624
30644
30664
30684
2683
2640
6534
2568
2719
2401+
2722
21574
7094
27364
2638

2446
2449
3260
2402+

CLRSCN= 004000
CNTLU
011646
CNTLWU= 104016
co
= 000100
= 040000
COF
CONVER= 104010
cS
= 000040
CSF__
= 020000
002340
CSTR1
002402
CSTR2
002444
CSTR3
002506
CSTR4
CSTRS
002550

6604
241644
708#
6744
6634
7024
6734
6624
9514
9644
9774
9904
10064

1293
3266
782
1584

DEDMS1 016401
DIGIT = 012116

2778
649N

CLRMUX= 002000

CURLIN
DATA1
DATA2
DEDMES

014274
013506
013510
016363

6594

2665
786+
787+
2771

05:47

PAGE 88

SEQ 0087

CROSS REFERENCE TABLE == USER SYMBOLS

20-0CT-81 17:07

015402
013504
045722
025622
027632
031642
033652
035662
037672
041702
043712

21-0CT-81

2971«

37494

33604
30564

26894
2643
1007
25904
29624
2440
27634
3267

2979+
2724
1273

2403
1584

2672
788+
788
31954
3198#
2443

2680
1011

2965
1294

2648+

30914

2985+
29554
1393
925
2025

2343

1319

37484
1320

1799

2987

2990+

2992+

1438

1483

1528

1717

1746

1791

2907
27544
27554

2922
3003+
3004+

2980+
3005+
3005

2986+
3007+
3006«

2993«
3009
3008+

1798

2025

2868
791«
789+
2444

28904
793
792«

1858

1897

1936

1975

CZKMFAO KMS11-BD INTERACTION_TEST
CZKMFA.PT
20-0CT-81 17:07
DISPLA
DISPRE
DIVCNT
DIVI
DIVIA
DIVIB
DIVIC

01527¢4
000174
012074
012020
012044
012112
012062

754+
7284
2458%
24554
26604
2457
2459

DIVIU

012026

24564

DIVIDH
DIVIDL
DIVIS

012116
012114
012120

DMBCSR

015256

DMBLSR

015260

DMBLVL

015254

DMBVEC

015252

DMYRTI
002304
DONE = 000200

EOP
EMTLIM
EMTOK
EMTSRV
EMTTAB
ENDA
ENUMBR
EoP
ERR
ERRCS
ERRD
ERRFLG
ERRGEN
ERRLS

014770
017112
010644
010632
017050
023400
013500
010570
011164
011246
011202
015326
011302
011264

649
648
647

814

968+
1011
1091«
1157«
1215«
1283+
1325«
1393«
1479
1550«
1662
1751«
1807+«
1897«
1972«
2051+
3015«
819«
1507«
1663
1752«
1963
2095+
808+
1757«

803

MACY11 30A(1052) 21-0CT-81 05:47 PAGE 89
CROSS REFERENCE TABLE =-- USER SYMBOLS
30504
754
24664
3261
2467
24714
2461

2655+
2663%
2456

24634
2456
2469
2460

2460
24724
2462

26462%

815

819

900«

908+«

969
1021«
1096+«
1158«
1218+
1284
1327+«
1395+«
1483+
1570«
1667+
1759«
1809
1899+
1975«
2055+
3017+«
820+
1510
1646
179+
1978+
2098
809+

1804~

3028+

30424

918+

939

951+

24744
981+
1040+
1111«
1176«
1234
1298+
1353«
1411«
1490
1580
1683+
1767
1825+
1915+
1982
2071+
30434
1399
1552«
1671
1882«
2002
30444
1056+

952

955+«

956

964 *

965

982
1053«
1116+
1177+«
1250
1299+
1358+
1415+
1501+
1591«
1688+
1773
1855+«
1919+«
1993«
2076*

990«
1055+
1117«
1180+
1253«
1300
1359«
1434%
1505+
1596+
1708+
1779«
1858+
1933+
1997«
2090+

991
1058«
1120«
1790+
1254~
1315«
1362+
1438+
1524«
1616+
1712«
1791«
1860+
1936+
2012«
2094

995+
1061+
1131«
1195«
1255
1319«
1363+
1440%
1528+
1621+
1717«
1792+
1862+
1938+
2016+
2096+

996
1071+«
1136+
1196
1273«
1320
1365+
14642
1530+
1623«
1718+
1795«
1865
1940+
2018+
2099

1006+
1076+
1137+«
1199+
1276%
1322«
1368+
1445
1532+«
1626
1746*
1798«
1876+
1943
2021
2110+

1007
1077+
1140+
1209+«
1277+
1323«
1369
1456
1535
1637«
1747+
1799
1880
1954+
2032+
2115«

1010+
1080+
1152+
1214+
1282+
1324+
1389+
1460+
1546+
1642+
1750+
1805+
1894+
1958«
2037«
3014+

1417«
1555
1689
1885
2017«

14620
1576
1692
1900+
2020

1441%
1579
1699«
1903
2038+

1444
1597«
1711«
1921
2041

1462
1600
1719
1924
2056*

1465
1607«
1727«
1939«
2059

1486
1622+«
1728
1942
2077«

1489
1625
1735+
1960+
2780

1075«

1095+

1115«

1135+«

1155«

1174+

1193+

1212«

1803+
916

3026+
9284

3027+«

1038+

1054+
3028

3029«

30414

1094r

1114r

1134«

1154

1173+

1192+

1196
2964
32694
21504
719
2152

1215
2968

1779
2971

1825
2973«

3017
29974

969

1024

1058

1077

1097

117

137

1158

2805+

2830+

2851«

2859+

2871+

2911x

2926+

2216
2270

2229+
2288

2247+
2307

2266+
2314n

2320+

2322

2344

37464
2645+«
2128%
22294
22854
22474
2185
2233
23054

965

1022+«

24734

1756«
915

964

808

978
1037«
1100+
1171+«
1233«
1296
1331
1400
1487+
1577«
1672
1763
1819
1904
1979+
2060
3031+
1396«
1534
1668+
1864
1999«
2119
1039+

2468%

1211«
879

6564

804

977+
1024+
1097«
1161
1229+
1293«
1330
1397«
1485+
1575«
1669
1761«
1813
1901+
1977«
2057+
3021+
942
1531«
1653+
1861+«
1981
2116
1023

2464

SEQ 0088

968

1074*

21474
32524

27514
2204
3262
3252
3264
2207+
2250
3253

30764

MACY11 30A(1052)

CZKMFAO KMS11-BD INTERACTION TEST
20-0CT-81 17:07
CZKMFA.P11

2648
28684
28944
10204
1022
1027
11524
1154
1163
11714
1173

2818#
2881

INTKMC
INTLIN
INTLNE
INT1
INTIA
INTIB
INTI0
INT10A
INT108
INT11
INT11A

013740
014166
014276
002612
002660
002664
003372
003454
003456
003460
003542

PAGE 90

SEQ 0089

2305+«
958
1103
1303

2326
967
1123
1338

1468
1873

1498
1888

2122
2713

2715

2287+

2306+

2330

2981

29864

232?#

984
1181
1776

994
1200
1814

999
1219
1822

1009
3023

1013

1558
1951

1588
1966

1603
1990

1634
2005

1649

2572

2585

2587

259

1136

1157

2029

29454

818
3263
2538
2553
2580
799
2550
25624
2584n
28784
951

869

2544

25564

2570

821

836

852

1843

2423

955
1805

956
2184

1040
2196

1214

10284
10304
11644
11654

11834

2872

—

2674
2989
27524
32764
2584

O —

23764
23814
2442
3255
2221

1195

7
05:47

(¥,
1. 8

2206+
2708
2535

28894

2193«
2707
2428
9394
2690
2539
807
25264
25374
25520
25694
7054
25334
2546
2576
2650
6554

014272

5
3
0

—_y—lN

ICOUNT 015340
ILLF
013336
INBUF
012564
002316
INITT
INPDUN 014502
INSTBB 012344
INSTER 012436
INSTR
012276
INSTRB 012336
INSTRC 012424
INSTRD 012464
INSTRG= 104013
INSTR1 012322
INSTR2 012444
INSTR3 012524
INTALL 014230
INTENA= 000100

HOLDB

2661
3265
2249+
2354
23574
23644

7074
22664
2232%
2325
2249
2269
23714
2287
2306
7034
22164
2217
7664
2667
29854
2359
864
2530+

2285«
954
8
8
N=~y&

ERRORS= 104015
011224
ERRS
011374
ERTAB
ERTABO 011442
ERTAB1 011450
ERTABZ2 011466
ERTAB3 011504
ERTAB4 011516
ERTAB5 011530
EXTRAC= 104011
FREEZE 011122
FREEZX 011156
001244
FST
014724
GETLN
GETLNO 014720
013502
GOOD
017130
GRO
HILIM
012560

1695
2068

2267+«

PON)
—d b

ERRORC= 104000
ERRORD= 104014
ERRORL= 104001

2248+
941
1045
1237
2972
1408

1680
2044

CROSS REFERENCE TABLE =-- USER SYMBOLS

2231r
7044
1029
694k
7064
6954

ERRMSG 011362
ERROR = 104012

21-0CT-81

1176

CZKMFAO KMS11-8D INTERAC{ 10N
ON_TEST
CZKMFA.P11
20-0CT-81 17:07

MACY11 30A(1052) 21-0CT-81 05:47 PAGE 91
CROSS REFERENCE TABLE -~ USER SYMBOLS

KBDINT
KBDIN1
KBDIN2
KBDIN3
KMCCSR
KMCLVL
KMCL1

002070
002152
002204
002246
015276
015320
015324

KMCSUP

012730

878

26384

015322

2652+

30724

002306
016262
013514
013604
015400
015374
013442

879+
822
2718
2646
30974
1847
27340

915
31834
2730
27844

KMCPAR

KMCVEC

KMCV1

KREGAD

KRET
KVECTO
LBITS
LOMODE
LINANS
LINE
LINEB

001546

015316
016336

LINEL
013444
LINENA= 000001
LINFLG

LINORG
LINTT

LINTIA
LINTIB
LINT2
LINT2A
LINT2B

015372

015376
003722

003742
003760
003774
004022
004042

8214

825

837

12024
12034
12214
12224
10444
10464
10644
10654
10824
10844
11024
11044

11224
11244
11424
1144
2159
8904
9034
G114
9214
841
30714
30734
826

31914

3268

30524

30704

920

880

1896
2956
2699«
1404
1869

12334
1236
12494
12544
1257

1239
12384
1260
1263
12594

1242

1752

30964
12294

9304

1839«

1935
2979
2700«
1576
2017

1974
2992
2717
1584
2025

27584

1857
2955
2370
1396
1861
30944

2363
6684

SEQ 0090

11844

1182
11904
1192
1201
12094
1211
1220
10364
1038
1043
10524
1054
1063
10714
1074
1081
10914
1094
1101
11114
1114
1121
11314
1134
1141
7104
723
896
904
912
840
830
2653+

INT118 003544
003546
INT12
INT12A 002630
INT128 003632
003634
INT13
INT13A 003716
INT138 003720
INT?2
002666
002734
INT2A
INT2B
002740
002742
INT3
003026
INT3A
003030
INT38
003032
INT4
INT4A
003114
INT4B
003120
003122
INTS
INTS5A
003204
INTSB
003210
003212
INT6
INT6A
003274
003300
INTSB
INT?
003302
INT7A
003364
INT7B
003370
KBDIN = 104020

2014

2053

2092

2729
1594

27378
1622

2962
1630

2035

2056

2064

30954
1640

2074

1668

2095

1676

2103

1686

2113

1727

N 7
MACY11 30A(1052)
21-0CT-81
05:47 PAGE 92
CROSS REFERENCE TABLE == USER SYMBOLS

CZKMFAO KMS11-BD INTERACTION TEST
CZKMFA.P11
20-0C7-81 17:07
LOGICA
LOLIM
LOOP
LOOPER
|.OOPL
LOOPS
LOOPX
LRSET
LVL

25934

MAINT
M8(D
MCONTC
MCONTL
MCONTV
MCRLF
MEMT1
MEMTIA
MEMT1B

2192

2194

21984

2219

1087
12230
97

11054

1107

11254

1127

11454

11484

11664

2422

981
32394

982

1276

1322

1325

1358

1750

2563

32034

834

MEMTIC

93N
9

MEMT1D

MEMTIE
MEMT1F
MEMT?

1345

MEMT2A
MEMT28
MEMT2(
MEMT2D
MEMT3
MEMT 3A
MEMT 38
MEMT 3C
MEMT 3D

1383

3794

MEMT 3E
MEPASS

VA S

b
)
N NN N

OO N \NOD \NON
= OO OO0
=& NYWVNOON)
— NN
WO NOONIWNWNED
—
O
N
Bun

—b
e
el
)
) e
b

004726

— ——h —d
& & B

mux1
MUX1A
MUX18
mUx1(
MUX1D
mUXTE

[o 2¥,]
VN
EAR M JVIIVIR
o
— PPN
O
NANCL
SO
N SN[V]

MTRANE
MTRNDE

) wnd

MSG
MSTATE
MTEST
MTITLE

MPF1
MQM
MREGAD

)

MPFAIL

(o JV 1V, To RV, 1.8T0 Yo

ML INER

ML INED

[elelelelelelelelolelel
el

MFATAL
ML INE

ML INE ]

SEQ 0091

1428
14114

1167

11854

1186

CZKMFAO KMS11-BC INTERACTION TEST

CZKMFA.P11

004760
007174
007212
007242
007270
007302
007316
007350
007352
007370
007420
007446
007460

1422
18554
18584
18634
1868
1872
18804
1887
18944
18974
19024
1907
1911

MUX12F
mxi3
MUX13A
MUX138
MUXT3C
MUX13D
MUX13E
MUX13F
mUx14

007526
007530
007546
007576
007624
007636
007652
007704
007706

1926
19334
19364
19414
1946
1950
19584
1965
19720

MUX14A
MUX14B

MUX14C
MUX14D
MUX14E
MUX14F
MUX1S
MUX15A
MUX158
MUX15C
MUX15D
MUX15E
MUX15F
MUX16
MUX16A
MUX168
MUX16C
MUX16D
MUX16E
MUX16F
MX17
MUX17A
MUX17B
MUX17C
MUX170
MUX17E
MUX17F
MUX2
MUXZA
MUX2B
MUX2C
MUX2D
MUX2E

007474

007724
007754

20~0CT-81 17:07

WUXTF
mx11
MUX11A
MUX118
mUX11¢
MUX110
MUXT1E
MUX11F
MUX12
MUX12A
MUX128
MUX12C
MUX12D
MUX12E

MACY11 30A(1052) 21-0CT-81 02:47 PAGE 93

010002
010014
010030
010062
010064
010102
010124
010152
010164
010202
010236
010240
010256
010300
010326
010340
010356
010412
010414
010432
010454
010502
010514
010532
010566
004774
005014
005044
005072
005104
005120

19194

19754
19804

1985
1989
19974
2004
20120
20154
20194
2024
2028
20364
2043
20514
20544
2058¢
2063
2067
20754
2082
20904
20934
20974
2102
2106
21140
2121
14340
14384
14434
1448
1452
14600

CROSS REFERENCE TABLE -- USER SYMBOLS

14244
1878
18714
1875

1876H

18894
1917
19104
1914

19154

19284
1956
1949%
1953

19544

19674
1995
19884
1992

19934

20064
2034
20274
2031

20324

20454
2073
20664
2070

20714

20844
2112
21054
2109

21104

21234
1470
1458
14514
1455

1473
14564

SEQ 0092

CIKMFAO KMS11-BD
INTERACTION_TEST
CZKMFA.P11
20-0CT-81 17:07
MUX2F
MUX3
MUX3A
mux38
MUX3C
MUX3D
MUX3E
MUX3F
MUX4
MUX4A
MUX4B

005152
005166
005206
005236
005264
005276
005312
005344
005360
005400
005430

MUX4D
MUX4E
MUX4F
MUX5
MUX5A
MUX58
MUX5C
MUXSD

005470
005504
005536
005552
005572
005614
005642
005654

MUX4C

MUXSE
MUXSF

MUX6

MUX6A
mUx68
MUX6C
MUX6D
MUXG6E
MUX6F
muXx?7
MUX7A
MUX7B
MUX7C
MUX7D
MUX7E
MUX7F

MUX8

MUXBA
MUX8B
MUX8C
MUX8D
MUXBE
MVECTO

005672
005726

005766
006010
006036
006050
006066
006122
006142
006162
006204
006232
006244
006262
006316

16204
16244
1629
1633
16414
1648
16624
16664
16704
1675
1679
16874
1694

1651
1639
16324
1636

17114
17174
17184
1722
1730
800

1714
1725
1737
17264
17344
31794

33064
33324
33454
938
9364

33084
3334m
33474
31304
18384

005456

005746

006336

006354
006402
006410
006434
006462
016233

= 000040

M
M16
N

= 000110
015630
= 000100

= 000040

16164

17084

32804

9364

10204
1151

= 000110

SEQ 0093

14654

1515
1503
14964
1500

1518
15014

15144

1560
1548

1563

1545

15464

156414

15594
1605
1593
15864
1590

1609

15914

16044

1655
16374

16504
1697
1685
16784
1682

1701
16834

16964

32824

9374

1733

32B4N

33104
33364
33494

950

32864

33124
3338
33514

9514

32884

33144
33404
33534

963

32904

33164
33424
33554

9644

32924

33184
3345
33574

976

3294

3320
3347
33594

9778

32964
33224
3349

989

32984

33004

33024

33044

990#

1005

10064

1019

1478
17464

14794
1789

1523
17904

15244
3276

3324
3351

1035
1152#

1051
11714

1052#
1189

1070
11904

10714
1208

1090
12094

10914
1228

11
12294

}333

1314
15704

10364
1170

18384

18394

1854

18554

1893

18944

1932

1633

1971

1972¢

12734

1467
14794
14834
1488
1493
1497
1505#
1512
15244
15284
15334
1538
1542
15504
1557
15704
15744
1578#
1583
1587
1595#
1602

MACY11
30A(1052) 21-0CT-81 02:47 FAGE 94
CROSS REFERENCE TABLE -- USER SYMBOLS

13154
1615

1352
16164

1353#
1661

1388
16624

13894
1707

1433
17084

14364
1745

33264
3353

11114
1248

20N

33284
3355

1130
12494

2012#

33304
3357

11314
1272

2050

CZKMFAO KMS11-BD
INTERACTION TEST
CZKMFA.P11
20-0CT7-81 17:07
OCTASC= 104006
OCTASN 011560
OCTAST
011606
013226
0PI
ORGFLG 015404
OSELO
013470
OSEL2
013472
OSEL4
013474
OSEL6
013476
osuB
013312
PASCNT

015332

PBFCNT
PBUFR
PFAIL
POPRO =
POP1SP=
POP25P=

013466
013446
012606
012600
005726
022626

PATCH

023400

= 177776

20514
7008

23964
2,014
2652
30994
2366

2368
2697%
2698+
706
882«

37474

PUSH1S= 005746
PUSH2S= 024646
RADIX = 012120
RBUF
013166
RCO
013332
RDO
013342
RECALL 013064
REGST1
007532
REQGO
014114
REGNC
014066
REQGNI
014106
REQGNR
014056
REGNT
014046
REQGNX
014076
REQOUT 014452
RESTAR 012644
RESTAT
012712
RESOS = 104007
RETURN 015336
RFLGS
013512
RING = 000200
RINGF = 100000
RNGRET 015414
RS
= 000004
RSOS
012162
SAVPC
015360
SAVRO
015342
SAVRT
015344

)

2089
232
3258
240
2694n

20904
2332

3277
2419

2659%
2660*
274
27504

2695+
2696+

27474
2699

27054
2129«

2701

2748

1028
2177
1036+
1113+
1230
1748+
1934

1044
3032
1039
1115
1249+
1757
1973«

1064
3033
1041+
1132+
1274+
1760+
2013»

1082

1102

1122

1142

1164

1052«
1133+
1316%
1762+
2052+

1056
1135
1354+
1766+
2091*

1057+«
1153+
1390+
1793+
3013+«

1072+«
1156¢
1435«
1804
3016+

1073«
1172+
1480+
1806+
3022+

1643

1939

1947

2056

2064

2077

3078#

27464
738K
741

2764

2964

690
1183
645#
1075
1175«
1625«
1808:

2623
767
1202
646
1092«
1191+
1571%
1812«

899
1221
1020
1093+
1194+
1617+
1840+

907
1772
1023
1095
1210%
1663*
1856+

917
1818
1025+«
1112+
1213+
1709+
1895+

2183+

2314w

876

2632

2849

28514

717
6884
6364

646N
6874

6854
6894
6474
2666
2710
2709
2654
816
2843
28460
28504
2686
2677
28480
29344
2609
2627
7014
2195
2718*
6754
6648
31030
6704
26920
2318
2487+
2389

2398+
26B4N
27134
2717A
2664
8194
2845
2905
2879
2844
284N
26154
26294
2334
2203«
2720
1630

1486
3259
2356
2492
2486%

SEQ 0094

3345

2689
2688

= 177776
PSW
PUSHRO= 010046

MACY11
30A(1052) 21-0CT-81 02:47 PAGE 95
CROSS REFERENCE TABLE -- USER SYMBOLS

26018

2622

2685
2714

2726
2847
2920
2894

30804
2756
2064

2955+

1496

1622

2478+
3084
2493

30894
3083

1630

CZKMFAO KMS11-BD
INTERACTION_TEST
20-0CT-81 17:07

MACY11
30A(1052) 21-0CT-81 02:47 PAGE 96
CROSS REFERENCE TABLE == USER SYMBOLS
E

CZKMFA.P11

015346

SAVRZ2

SAVR3
SAVR4
SAVRS

015350
015352
015354

2485+

2495
26483%
2497

30854
2496
3087#

30864

991

995

996

1006

1010

1761

1779

1807

1825

1610

959
1184
1656

972
1203
1702

985
1222
1738

1000
1243

1014
1264

1030
1309

1046
1346

1928

1065
1384
1967

1084
1429

2006

2045

2084

6974

1238

1259

1288

1304

1339

1377

1409

1424

1454

1469

1499

1514

SECRX = 000020

1823
6724

1874
1676

1913
2103

1952

1991

2030

2069

2108

SECTX = 000010
SELO
015276

6714
2659

1531
2695

1539
2786+

1668
2793+

1676
2796+

1689
2820+

1978
2821«

1986
2822%

2095
2842+

2103
2B44r

2116
2846+

2848+

2850+

2660

2696

2725+

2731+

2819+

2826

2852

2935

30574

2870

2910+

2924+

30614

SCNENA= 000040
SCNT1
SCNT1A

006476
006530

SCNT1B
SCNTIC
SCNTID
SCNT2
SCNT2A
SCNT28
SCNT2C

2608+
699

6544

17464
17514

2387
2380
2383

30844

2484
2385
2482+

SAVSP
015356
SAVO5P= 104005

2375
2373
2378

2494

SEQ 0095

2615
2321

990

1770
1754

006602
006654
006674
006712
006736
007026
007100

17604
1756
1771
17904
17944
18064
1803

1782
17724
1775
1816
1797
1828
1818#

SCOPE = 104002

6964
1144

945
1165

007120

SCNT2D

1817

g?gg

SCOPEF= 104003
SECRXF= 010000

SEL1

015300

1544

6614

2855
30554

SEL2

015302

2656+

SELS

015310

30634

SEL3
SELS

015304
015306

SEL6

015312

SEL7
SETLIN

START
STARTN
STARTO
STARTT
STCLK

2945«

2686+
2681+

2698

STEP

= 000400

STORE
STRLIN
STRLNA

012562
007136
007156

76400

2947

2868+
2682+

2792+

2907+
2688+

2869+

12234

10854
745

1433

11054

785

851

902
2628

}??8

1591

1637

1254

1277

2588+

25954

18434

1478

1087

76414
8514
7694
7804
29054

2531«
18394
1839

30534

1205

1388

732
784
764
777
2883

6574

1604

2539+
24364

12044

001100
001700
001254
001316
014320

1589

2089
9314
2432«
2727

002310
011750
013110

001100

18254

2050
926+
2618%
26714

2011
892+
2407
2655

10674

17794
1824

29794

2923«
2671

6314

1778

30674
2878

2908
2664

= 000200

STACK

2689+

1559

015314
014674

SINGLE= 000001
SINTFL
SMLN
SNDALL

2679+
2680+

1821

3088#

1283

1633

1635

2922«
2697

1783
1650

30594
2791«

1829
1681

1889
1696

1724

1732

1769

1104
1474
1777

1124
1519
1815

2909«

2925«

30654

1523

1569

1615

1661

18314

1854

1893

1932

1971

1107

11254

1127

11454

11484

11664

1167

11854

1186

1299

1324

1330

1359

1363

1368

1611

1712

1751

1795

1876

1915

1954

1993

1456

2032

1501

2071

F
02:47 PAGE 97
21-0CT-81
30A(1052)
MACY11

INTERACTION TEST
CIKMFAO KMS11-BD
20-0CT-81 17: 07

CROSS REFERENCE TABLE == USER SYMBOLS

CZKMFA.P11

001772
001122
012130
012122

STRTOA
SUSWR
SV05
SVOSP

SWR

015272

SWREG

000176

867
76464
24824
26788

22%8

7294

SWRTB
011552
Swoé = 000100
Sw08 = 000400
sw09 = 001000
SWw10 = 002000
SW11 = 004000
swi2 = 010000
swi3 = 020000
SWwi4 = 040000
SWw15 = 100000

23914
6244
6234
6224
6214
6204
6194
6184
6174
o164

TEMTAB
TIFLG

017034
015412

12044
2441
769

TIMET
TIME2

015406
015410

31004
3101#

TKCSR

015262

= 000014

TIMES = 004000

TIPFLG
TKDBR

002066

015264

10674

8704

3257

3823;

780

783

921

2187

753

780

921

2341

2393

2220
2187
2191

2218

11054

1107
3284
3297
3310
3323
33364
3352

2420

2316
2189
2338

10854

1087

12234

1205
32454
773«

31024

32824
3295
33084
3321
33344
3350

3283
32960
3309
33224
3335
33514

743

885+

8874

890+

893

2540

30464

32804
3293
33064
3319
33324
3348
744

SEQ 0096

3281
32944
3307
33204
3333
33494
901«

927+

2191

2218

2220

2316

2338

2341

11254

1127

11454

11482

11664

1167

11854

1186

3285
32984
331
33244
3337
33534

32860
3299
33124
3325
33384
3354

3287
33004
3313
33264
3339
33554

32884
3301
33144
3327
33400
3356

3289
3302¢
3315
33284
3341
33574

32904
3303
33164
3329
33454
3358

32N
33044
3317
33304
3346

32924
3305
33184
3331
33474

2626

)

919«

2157

2184

2196

2208+

2315+

2345+

2537

30454

894+

895

903

911

923

2614

2427

2430

26348

2540+

2541«

24354
30474
30484

2590

1449
2140
873

1576
2181
8754

1584
21994

1597
2633

1900

1908

2017

2025

2038

2131

2328

2409

2416

TMP1

011744

2%25*

TMP2
TPCSR
TPDBR
TRACON

011746
015266
015270
015330

2415+
2504
2513«
881+

2431+
2552
2551+
30774

T1STG0_
TSTLST
TSTMAX

002012
017114
015370

796
865
864+

32704
872

TSTPNT
TSTTBO
TSTTB1

866
3092
33434

3012+
32784

0924

130

2198+

2199

3011«

30794

= 104004

865
3012
327

2202
3270

TYPE

015366
017134
017336

TYPECL
TYPER
TYPERA
TYPER1
TYPERZ2
70
T

012264
012214
(012224
012242
012256
002312
002340

2510
25024
25044
2507
25134
9364
9504

2512
3256
2505
25094
2517
3278
3280

883
2556

25154

897
2562

905
2624

913
2629

937
2770

1841
2775

1848
2777

TRMRDY= 000002
TSTENT 011046
TSTNO

015334

66
886
856

6984
2421

2%23*

909+

2189

1441
2134
79

857

44
2533

30934

870«

2514

872

MACY11 30A(1052)

CZKMFAO KMS11-8D INTERAC
20-0CT-81
CZKMFA.P11

8
05:47

PAGE 98

SEQ 0097

W
NOCONININ)
—b =2 —d —

onm-awbmgooowmu

NN N N
N N NN N NN
NI [a®] NN U N N N AN NN
S0
OO NN
[«
-To NN N = O~
NS

OO
OO

334
764
784

614

002506

VECSTR 001340
001464
VECST1
WRDCNT 015362
X
= 000000
XBUF
XCO
XCS
XDO
XFLAG
XFLGS
XM
XN

— e el

002550
002612
002666
001360

AN WNNINONININD
=2 = b b —2

15
16
17
VECSTA

Té4

20504

o b emd and wnd b b b

002742
007136
007174
007352
007530
007706
010064
010240
010414
003032
003122
003212
003302
003372
003460
003546
002402
003634
003722
003774
004056
004254
004432
004602
004774
002444
005166
005360
005552
005746
006142
006336
006476
006712

CROSS REFERENCE TABLE == USER SYMBOLS

b wd wnd md b b

110
1100
1101
1102
1103
1104
1105
1106
1107
18}
112
113
114
115
116
117
12
120
121
122
123
124
125
126
127
13
130
31
132
133
134
135
136
137

21-0CT-81

013134
= 000004
= 000002
013416
001242
= 013513
= 000101
= 000100

XOR
XORSVC
XSCRX =
XxCo

014772
001246
000001
013326

910

6974
7104

6984
IakY

69
73574

774

795

2170

7004

7014

7028

7038

7048

TOS4

7064

MACY11 30A(1052) 21-0CT-81 02:47 PAGE 99

INTERACTION_TEST
CZKMFAO KMS11-BD
CZKMFA. P11
20-0CT7-81 17:07
XXDO
X1A
X1B
SNEWIS
$SWREQ

$TMPO
STMPT1

o
o
¢
e

SN
=

SEQ@ 0098

2728
868

27314

2639+

2641

2642«

2823

2824+

28354

2854x

2857«

2934«

2937+

2946%

2949+

2965+

7134
983
1691
2611

7164
992
1764
2736

7224
997
1800
2757

7274
1008
1810
326400

7314
1012
1884
32414

7394
1295
1923
3246h

940
1321
1962
3747H

943
16419
2001
3748Bx

953
1464
2040
37498

957
1509
2079
37504

966
1554
2118
37514

970
1599
2319
37524

979
1645
25974
37534

8684
2424
2417

014044

2966+
28364

= 045724

CROSS REFERENCE TABLE =-- USER SYMBOLS

2723
8574

013430
001716
001762
016701
016671

014042

874
32374
32354

2968
2967+

2970
2975+

2974

MACY11 30A(1052)

CZKMFAO KMS11-BD INTERACTION TEST

CZKMFA.P11
COMMEN

EMTDEF
INTS

20-0CT-81 17:07

6304

7374

1890
2085

1929

1968

3286
3316

3288
3318

3292
3322

976
1248
1854

3351

3290
3320

989
1272
1893

1005
1314

1186

1067

1087

1107

1520
2007
1127

3340

3345

3347

3349

3280
3310

7364
1170
1;?;#

936
1189
1745

. ABS.

1851
2046

1205

1167

7384
3308

Iss

33454

1148

TM
TS

32804

9324

9324
9324

9324

3338

045724

ERRORS DETECTED:

1385
1565

7374

1430
1611

3282
3312

950
1208
1789

697

1475
1657

3284
3314

963
1228
1838

000
O

L/NL
: TOC=CZKMFA
CZKMFA,CZKMFA/CRF/SO
7 SECONDS
RUN-TIME RATIO: 227/88=2.5
CORE USED:
11K
(21 PAGES)
RUN-TIME: 29 51

PAGE 101

18384

1148¢

696

710

05:47

18314

10674

695

709

CROSS REFERENCE TABLE == MACRO NAMES

694

MUXS1
MUXS2
NOINT

9364

21-0CT-81

698

699

700

701

702

703

704

705

706

707

708

3294
3324

3296
3326

3298
3328

3300
3330

3302
3332

3304
3334

3306
3336

1035
1388

1051
1433

1070
1478

1090
1523

1110
1569

1130
1615

1151
1661

3353

3355

3357

1932

1971

201

1019
1352

SEQ 0099

2050

2089