Digital PDFs

MAINDEC-08-DIKLA-C-D

December 1973

70 pages

Original

3.7MB

Document:	KL8-JA & KL8-KA KB KC KD LOOP BACK TEST
Order Number:	MAINDEC-08-DIKLA-C-D
Revision:
Pages:	70
Original Filename:	https://svn.so-much-stuff.com/svn/trunk/pdp8/src/dec/maindec-08-dikla/maindec-08-dikla-c-d.pdf

OCR Text

IDENTIFICATION

PRODUCT

CODE:

MAINDEC-OB-DIKLA-C-D.

PRODUCT

NAME!

KLB-JA & KLBoKA/KB/KC/KD
LOOP BACK TEST

'PRODUCT

DATE:

APRIL

1977

MAINTAINER:

DIAGNOSTIC

AUTHORS:

BRUCE

GROUP

HANSEN,

MOORE,

DON

RICE

INFORMATION IN THIS DOCUMENT 15 SUBJECT TO CHANGE WITHOUT NOTICE
SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
DIGITAL EQUIPMENT ASSUMES NO RESPONSIBILITY
CORPORATION.
FOP ANY ERRORS THAT MAY APPEAR IN THIS MANUAL.
THE
AND

THE SOFTWARE DESCRIBED IN THIS DOcUMENT IS FURNISHED TO THE PURCHASER
UNDER A LICENsE FOR USE ON A sINGLE COMPUTER SYSTEM AND CAN BE COPIED
(WITH INCLUSION OF DIGITAL‘S COPYRIGHT NOTICE) ONLY FOR USE IN
SUCH SYSTEM, EXCEPT As MAY OTHERWISE BE PROVIDED IN WRITING BY
'

DIGITAL.
DIGITAL EQUIPMENT CORPORATION ASSUMES'NO RESPONSIBILITY FOR THE USE
OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT NOT SUPPLIED BY

DIGITAL,

/’"\\

1973

1977,

DIGITAL

EQUIPMENT

COPP.,

MAYNARD,

MASS.

TABLE

CONTENTS

K“\
u n0

ABSTRACT
REQUIREMENTS
HARDWARE

town» .‘.C tutor-o

STORAGE
PREREQUISITE

LOADING
METHOD

new '0' - o

bhufi‘h-th.0.’.’.". @UNRJHFO
K‘\

PROCEDURE
.

STANDARD TEST PROCEDURE
CONNECTIONS FOR TESTING
EIA LOOP BACK CONNECTIONS
ZOMA LOOP BACK CONNECTIONS
RUN CONTROL/DATA TEST
TELETYPE INTERROGATION
RESTARTING THE PROGRAM
BAUD RATE TIMING TEST

’. up
.

SOFTWARE

OPERATING PROCEDURES

@0101 [OI-.0

STARTING ADDRESSES
SWITCH REGISTER CONTROL
PROGRAM

$0 on no

NORMAL

AND/OR OPERATOR

ERRORS

”NI-ht-DO
f“\

[OD-“O
O

CONTROL/DATA
O

ACTION

HALTS

ERRORS
TEST ERROR RECOVERY
RATE TIMING TEST ERRORS
RATE TIMING TEST ERROR RECOVERY
TEST

CONTROL/DATA
BAUD
BAUD

PROGRAM DESCRIPTION
CONTROL/DATA TEST
BAUD RATE TIMING TEST

APT-8

INTERFACE DEFINITION.

DESCRIPTION
SETUP
APT-8 INTERFACES
TIMING
ERRORS
LOADING PRECAUTIONS
MULTIPLE OPTIONS CONTROLLER

K‘\.
CONSOLE TERMINAL
ABSTRACT
INITIALIZATION
CONTROL
CONTROL
CONTROL

G
S
0

CONTROL C

aw:

ERROR REPORTING
END OF PASS

LISTING

f“\

PACKAGE

ABSTRACT
CID-O-”-

& KLS-KA/KB/KC/KD LOOP BACK TEST IS A PROGRAM TO CHECK OUT
THE BOARD
TERMINAL CONTROL/DATA INTERFACE OPTION (M8655).
IS TESTED IN LOOP BACK MODE BY CONNECTING EITHER EIA OUTPUT
TO EIA INPUT OR CONNECTING 20 MA CURRENT OUTPUT TO 20 MA
CURRENT INPUT.

KLB-JA

THE

REQUIREMENTS
...'--~....-

HARDWARE

A DWSE-P on DNeE-N BUS CONVERTER
PDP-SEaF OR M
KLB-JA TERMINAL CONTROL/DATA INTERFACE (“8655 9 BAUDS
KLB-KA (SAME As THE KLS-JA) on A
XLeuKB TERMINAL CONTROL/DATA INTERFACE (M8655-YA 1050
KLS-KC TERMINAL CONTROL/DATA INTERFACE (M8655-YB 66.7
KLa-KD TERMINAL CONTROL/DATA INTERFACE tMBéSS-YC 56.8

Pup-9,81,9L NITH

RATES)
BAUD)
BAUD)
BAUD)

up
on

A
A

STORAGE

THE

PROGRAM

PREREOUISITE

OCCUPIES MEMORY LOCATIONS

0000

5400

SOFTWARE

-I'.-..-.-.-.-u-....

THE

SYSTEM MUST BE CAPABLE OF RUNNING ALL BASIC PROCESSOR DIAGNOSTICS,

LOADING PROCEDURE
.'--...--.‘.---'.

METHOD
ivy-o.

IS LOADED USING
PROGRAM MUST RESIDE

THE

PROGRAM

THE

AND

THE

STANDARD
FIELD 0.

BINARY

LOADER

TECHNIQUE,

rir'“
u.

fiflfi

4.0

TEST

STANDARD

PROCEDURE

w-u-u-chwonoovuu-suuci

/"\
4,1

CONNECTIONS

TESTING

FOR

U...OU-O-UWODOBQV‘-U'-'

4,1,1

EIA

LOOP BACK CONNECTIONS

Bquuva-quuu-wuucnuuuu-

CONNECT

4,1,2

ZOMA

PIN F TO PIN

LOOP

AND pIN

THE

BERG CONNECTOR

AND

CONNECTIONS

BACK

CU"WC.--.B.---U'w--§.----.

CONNECT PIN E TO
BERG CONNECTOR

KK,

TO PIN

THE

////////x//////////////////////////////////////////////////////////
/
/ WARNING: 20MA LOOP CONNECTEQNS CAN ONLY BE CONNECTED
00 NOT ATTEMPT
/
/ THIS WAY FOR TESTING IN LOOP BACK MODE.

*1:

TO CONNECT

Mgsss's TOGETRER

TIME

ANY

WITH

zoMA

LOOPS

///////////////////////////////////////////////////////////////////

/"\

4,2

RUN

CONTROL/DATA

THE PROGRAM WHEN FIRST LOADED IS INITIALIZED FOR 110 BAUD. 2 STOP
BITS, 8 DATA BITS. PECIEVE_IOT OF 03 AND A TRANSMIT 101 OF 049
IF THIS IS THE CONFIGURATION DESIRED GO TO PARAGRAPH 4.3 (RESTARTING
THE PROGRAM) OTHERWISE GO TO STEP C

THE

STEP

4,1,1

4,1,2

FOR

EIA

20MA

L009

PROGRAM CAN BE INITIALIzED EITHER OF TWO WAYS:
WAY OF THE SWITCH REGISTER OR
WAY OF AN OPTIONAL TELETYPE WITH DEVICE CODE
04. THESE DEVICE CODES CANNOT BE CHANGED.

BY
By

SET

SWITcH REGISTER

f‘\

EITHER

TEST

0200,KND

PRESS

"LOAD

BACK

CONNECTIONS

AND

ADDRESS".

sET SR11=0 FOR INITIALIZING THE pROGRAM WITH THE SR OR SET SR11=1
FOR INITIALIZING THE PROGRAM WITH THE TELETYPE AND PRESS
"CLEAR"
1F

«5.

“4 312751
”’

/’“\

AND

SR11=O GO

THEN
TO

"CONTINuE",
G.‘

SR11=1

4,2,1 FOR TELETYpE INTERROGATIONo

PROGRAM

THE

SET 5R 0:5 TO THE RECEIVE TOT AND SR
TRANSMIT IOT AND PRESS "CONTINUE"°

THE

PROGRAM

SETUP

THE

NOTE:

WILL

SWITCH
1

HALT

4110

HALT

LOCATION

PARITY JUMPER

SR1= 1

STATUS

ENABLE JUMPER

SR2= 1

FILLER

CHARACTER JUMPER

INSTALLED
15

SR6

SR7

SR8

V110

000

1
1
1
1

1
1
o

150
300

o
1‘

1200
2400
4800

9600

0
1
o
1

19.2K BAUD B131
RAUL 01:0
5618
66.7. BAUD 01:0
BAUD 01:1
1050

0100 RATE

THE

AC:

THE

0212 IN THE AC0

WITH

FOLLOWING

CONDITION

FOLLOWING A JUMPER 0R SWITCH MEANS
SWITCH IS IN THE 0N POSITION9

-SRO= 1

SR5

THE

FOR

6w11

4110

0207

WITH

THAT

AND

THE

PRESS

JUMPER

”CUNTINUE"°

INSERTED

NP=1

INSTALLED

sw0=1

TNSTALLED FIL=1

ROCKER

SWITCHES

JUMPERS

VARIATION

.3“

HMHOOOO

BAUD 01:0
BAUD 01:0
0000 01:0
0100 31:0
BAUD 01:1
BAUD 31:1
BAUD 01:1
0100 R1:1

02:0
02:0
02:1

02:1
32:0

02:0
02:1
02:1
82:1

02:0
32:0
02:0

*19.2 KILD BAUD IS ONLY UBTAINABLE

WITH

03:0

w2:1

ws:0

Khawan

33:1.
03:0
03:1
53:0
03:1
03:0
03:1
83:1
53:0
33:0
03:0

w2:1
wz:1

ws:o
ws=0

KL8~JA
KLemdA

w2:1

ws:0 KLBRJA 0 RA
05:0 KLaeaR 0 KA
ws=o KLBwJA & KA
ws:0 KL0:JA 0 RA
ws:0 KLewJA 0 KA
ws=1 KLanA & KA
N5:o KLBEKD (HeésisC)
ws:0 KLBwKC (M8655nYB)
ws:o «Leaks (M3655u101

W2=1
N2:1
w2:1
N2:1
02:0
W221

w2:1
.w2:1

SPECIAL UAPT,

SR9= 1

SR10

SR11

DATA

BITS/CHARACTER

JUMPERS

0
1

5
6

DATA
DATA

BITS/CHAPACTER

NBI=1
N8130

NB2$1
N8221

7
8

NBL=1

NBZEO
N82=0

TWO

STOP

BITSBJUMPEF

NUT

INSTALLED

BITS/CHARACTER
DATA BITS/CHARACTER
DATA BITS/CHARACTER

PROGRAM WILL HALT AT LOCATION

SET

SWITCH

0000

SB=0

N51=0

THE

4110

WITH

PROCESSOR

0247
ONE

PDP°8E FAMIL! OTHERWIsE SET IT TO 0002 AND pREss

IN
OF

THE

AC:

THE

"CONTINUE"o

SETTING THE SWITCH REGISTER TO 0200 WHILE RUNNING WILL HALT
THE PROCESSOR AT THE COMPLETION OF A PROGRAM PASS AT LOCATION
THE
THE

PROGRAM
PROGRAM

NOW RUN UNTIL AN ERROR TS ENCOUNTERED
STOPPED BY THE UPERATDP OP‘SP4310

WILL
IS

2327

4.2.1

TELETYPE

INTERROGATION

/’—‘\
NOTE:

THIS SECTION OF PROGRAM WAS ENTERED FROM STEPS
D,E AND F OF PARAGRAPH 4.2.

THE PROGRAM WILL TYPE RECEIVE IOT?
THE OPERATOR TYPES IN THE DEVICE CODE

THE

RECEIVER(2

IOT?
DEVICE CODE

THE

TRANSMITTER(2 NUMBERS)

THE

PROGRAM

WILL

TYPE
IN

THE OPERATOR TYPES
Co

NUMBERS)

TRANSMIT
THE

PROGRAM WILL TYPE PARITYCY OR N)?
NP JUMPER IS INSTALLED TYPE Y IF IT ISN'T TYPE N.
THE PROGRAM WILL THEN TYPE NP=1? IF ANSWER WAS YES, AND NP=0?
IF ANSWER WAS NO.
NPzTHE PARITY JUMPER 1=INSTALLED 0=NOT INSTALLED.
THE PROGRAM WILL THEN TYPE EVEN PARITY EVN=0? ODD PARITY EVN=1?
EVN: ODD OR EVEN PARITY JUMPER; 1= JUMPER INSTALLED 0: NOT INSTALLED.
THE

/\
E.

PROGRAM WILL THEN TYPE STATUS ENABLEDIY OR N)?
IF SWD JUMPER IS INSTALLED TYPE Y IF NOT TYPE N
THE PROGRAM WILL THEN TYPE SWD=1? IF ANSWER WAS YES, AND
ANSWER WAS NO.
SWD=STATUS WORD ENABLE JUMPER: 1=JUMPER
INSTALLED, O=JUMPER NOT INSTALLED,
THE

THEN TYPE FILLER CHARACTERSCY OR N)?
INSTALLED TYPE Y IF NOT TYPE N.
THEN TYPE FIL=1? IF ANSWER WAS YES, AND
ANSWER WAS N0,
FIL=FILLER CHARACTER JUMPER,
INSTALLED AND 0: JUMPER NOT INSTALLED.

THE PROGRAM WILL
IF FIL JUMPER IS
THE PROGRAM WILL

FIL=07 IF
1: JUMPER
F.

SWD=0?

WILL NOW TYPE OUT THE FOLLOWING MESSAGE
RATE(OO-13)? 00:110 013150 02:300 03=600 04:1200 05:2400
06=4800 0739600 10:19:200 11:56.8 12=66g7 13=105O
THE OPERATOR WILL NOW TYPE IN TWO NUMBERS AND THE PROGRAM
WILL RESPOND WITH THE FOLLOWING MESSAGE!
THE

PROGRAM

BAUD

XXXX

BAUD

51=y? 32=y? 83=Y W2=z W5=z

(xxxx Is THE BAUD RATE FROM 56,9 TO 19,200 BAUD
y=o on 1 0=SWITCH IN arr POSITION 1= SWITCH IN on POSITION
z=o on 1 0=JUMPER NOT INSTALLED 1=JUMPER INSTALLED).
c.

THE PROGRAM WILL NOW TYPE TWO STOP BITS(Y OR N 3?
IF SB JUMPER IS NOT INSTALLED TYPE Y IF IT IS TYPE N.
THE PROGRAM WILL THEN TYPE 88:0? IF ANSWER WAS YES,
AND SB=1 IF ANSWER WAS NO.
SB=STOP BIT JUMPER,
1=JUMPER INSTALLED 0=JUMPER NOT INSTALLED

THE

f‘\

("\

0:5 126
PROGRAM WILL THEN TYPE DATA BITS/CHARACTER?
THE OPERATOR WILL NOW TYPE_IN ONE NUMBER AND THE PROGRAM
WILL RESPOND WITH THE FOLLOWING MESSAGE:
X DATA BITSANBI=YY N32=Y?
X=THE NUMBER OF DATA BITS SELECTED 5,6,7 OR 8
Y=0 OR 1 0=JUMPER NOT INSTALLED i=JUMPER INSTALLED

2=7

3:8

WILL

PROGRAM

THE

HALT

LOCATION

SET SWITCH REGISTER TO 0000
PUP-8E FAMILY OTHERWISE SET

WITH

4110

PROCESSOR

0002

0247

IS ONE OF THE
AND PRESS "CONTINUE".

SETTING THE SWITCH REGISTER TO 0200 WHILE RUNNING
THE PROCESSOR AT THE COMPLETION OF A PROGRAM PASS
4110 WITH 2147 IN THE AC.

THE

RESTARTING THE

AND

SET

SET SR TO ALL ZEBDES
.FAMILY OTHERWISE SET
AND

THEN

HALT

PROGRAM

0201

NOW RUN UNTIL AN ERROR IS ENCOUNTERED
STOPPED BY OPERATOR OR SR4=1,

WILL
AT

WILL

PROGRAM
PROGRAM

THE

THE AC.

LOAD ADDRESS

PRESS
IF
SR

Is ONE OF THE PDP-BE
AND PRESS "CLEAR"

PROCESSOP
TO

0002

"CONTINUE"

SETTING SR4 TO A
COMPLETE PROGRAM

ONE

WILL

PASS

THE PROGRAM WILL NOW RUN
OR THE PROGRAM IS HALTED

RUN

BAUD

TIMING

RATE

PROGRAM

THE

HALT

LOCATION

AFTER

ONE

2327

UNTIL AN ERROR IS ENCOUNTERED
BY THE OPERATOR OR SR4=1.

TEST

.-uaou'uunuc-Cu-Iu-UIOUC.

THIS

SET

TEST
SR

CHECK

0202

STOP

PARAGRAPH

RATE

NOTEI
FOR

WAS

SECOND

STOP

AND

PRESS

"LOAD

WATCH

AND

PRESS

IN
4110 WITH 2330
SETUP CORRECTLY.

LOCATION

4;2

PROGRAM SHOULD HALT

THE

STEP A-K

NOT

WATCH

ALREADY DONE
TIMING

ADDRESS"

THEN

BITS,

STOP

BITS,

"CLEAR".

"CONTINUE".
APPROXIMATELY 30 SECONDS
IN

THE

(SEE NOTE FOR

THE PROGRAM WILL HALT IN APPROXIMATELY
THE FOLLOWING CONDITIONS:

DATA

TEST

AND

PARITY

EXCEPTION)

SECONDS

THE

BAUD

5.0

OPERATING

5.1

STARTING

PROCEDURES

f‘\
ADDRESSES

--.."U°Omu-n-E¢W°

200
200

WITH SR11=0
WITH SR11=1

201

202

5.2

INITIALIZE THE PROGRAM BY THE SWITCH REGISTER
INITIALIZE THE PROGRAM BY THE TELETYPE
RESTART ADDRESSwNO INITIALIZATTUN NEEDED
BAUD RATE TIMING TEST

SWITCH REGISTER CONTROL
‘..--u-nu---.U.-fi-..-'.

STATE

1
1
1
1

1
2
4

/\
6,0

PROGRAM

ACTION

NOT

HALT

ON_ERROR

LOOP ON ERROA OR ON A CONSTANT DATA PATTERN
LOOP ON TEST SEQUENCE
HALT PROGRAM AFTER A COMPLETE PROGRAM PASS
pROCESSOR NOT OF THE POP-8E FAMILY
INITIALIEE THE PROGRAM WITH SR (STARTING ADDRESS zoo ONLY)
INITIALIZE THE PROGRAM WITH TELETYPE (STARTING ADDRESS 200

AND/OR

OPERATOR

ACTION

U...unau-nu..----u¢".¢'wuouua

6,1

NORMAL

ALL
0207

‘Q

/"\

0212

HALTS

NORMAL HALTS ARE

4110

WITH THE ADDRESSES

INITIALIZATION OF PROGRAM HALT

INITIALIZATIDN OF PROGRAM HALT

SET

INDICATED

DEVICE CODES

BELOW
IN

THE

SR.

SETUP THE FOLLOWING CDNDXTIONS
JUMPERS AND SWITCHES IN THE SWITCH REGISTER-AARITT
STATUS ENABLE, FILLER CHARACTERS, BAUD RATE, NUMBER OF
STOP BITs, AND NUMBER OF DATA BITS/CHARACTER

0247

SETUP THE SR OPTIONS FOR RUNNING THE PROGRAM

2147

END

CONTROL/DATA

2330

END

BAUD

RATE

TEST

TIMING

SR4=1

TEST

HALT

Acc

ONLY)

ERRORS

CONTROL/DATA

TEST

ERRORS

.D-C-I'Ip-Oucu-UUUD-D—IC

ALL

ERRORS DETECTED BY THE PROGRAM WILL RESULT IN AN ERROR HALT.
TO THE PROGRAM LISTING'FOR THE CAUSE OF THE ERROR.

REFER

CONTROL/DATA

TEST

ERROR

RECOVERY

.u-n-Inuu.Quantum-Uau-lD-wfloware

SWITCH REGISTER
THERE MAY BE 1 DR 2
THE PROGRAM
ERROR.
SET

BAUD

RATE

TIMING

0,1 AND 2 TO A 1 AND PRESS "CONTINUE".
MORE ERROR HALTS: IF THE ERROR WAS A DATA
IS NOW IN A SCOPE LOOP.

TEST ERRORS

nouuuuuou-Cuuuw-n-Uvucucvuau

THE OPERATOR MUST DETECT ANY ERRORS IN THE BAUD RATE TIMING TEST.
ONCE STARTED THE PROGRAM SHOULD HALT IN APPROXIMATELY 30-SECONDS EXCEPT
WHEN THE MODULE IS SET UP FOR 5 DATA BITS, 2 STOP BITS AND
THE PROGRAM WILL THE” HALT IN APPROXIMATELY 28 SECONDS.
NO PARITY.
ANY DEVIATIONS OF MORE THAN A 1/2 SECOND IS AN ERROR.

BAUD

RATE

TIMING

TEST

ERROR

RECOVERY

“GHUUDCUOUUUCOBB-UCOUUCoflun’U-B-FUUC

AFTER CHECKING THE MODULE
THE TEST BY SETTING SR2=1
IF ERROR STILL EXISTS
EVERY STEP AGAIN,
IF

ERROR

STILL

TO BE SET UP CORRECTLY, RESTAPT
AND PRESSING "CONTINUE".
TO

PARAGRAPH 4.4 AND DO EACH AND

EXISTS CHECK THE BAUD RATE WITH

SCOPE.

8 g0

PROGRAM

DESCRIPTION

8.1

CONTROL/DATA

TN
TEST

FIRST TEST (CLRBRD) ISSUES A CAF INSTRUCTION TO GENERATE AN
THE PROGRAM THEN CHECKS THAT THE TRANSNIT AND
INITIALIZE PULSE,
RECEIVE FLAGS ARE NOT STUCK ON AND THAT KSE,TSF, AND SPI DON'T
THE PROGRAM ALSO CHECKS THAT INTERRUPT REQUEST LINE IS
SKIP.
ALL ERRORS WILL RESULT IN AN ERROR HALT AT
NOT PULLED LOW,
LOCATION 2210.
THE CONTENTS OF THE AC WILL CONTAIN THE
ADDRESS WHERE THE ERROR WAS DETECTED.
THE

THE

TEST

(SCXMIT)

AND CLEARED

SET

ALSO CHECKED TO BE

NOT

SKIP.

CHECKS

THAT

THE

TRANSMIT

FLAG

CAN

THE RECEIVE FLAG
TFL,TSF AND TCF.
0.
KCF,TFL,TCF,KSF ARE CHECKED

ALL
IS CHECKED TO SKIP AND NOT TO SKIP.
IN AN ERROR HALT AT LOCATION 2210 WITH THE
pc WHERE THE ERROR WAS DETECTED,

TSF

ERRORS WILL RESULT
AC

THE

THE NEXT TEST (CAFXMT) CHECKS THAT THE
CLEARED BY CAF AND THAT THE RECEIVE
ERRORS WILL RESULT IN AN ERROR HALT AT
AC EQUAL TO THE PC WHERE THE ERROR WAS

EQUAL

TRANSMIT FLAG CAN
ALL
FLAG IS STILL 0,
LOCATION 2210 WITH THE

DETECTED.

NEXT TEST (INTXMT) USES THE TRANSMIT FLAG TO CHECK THAT
INTERRUPT ENABLE CAN BE SET AND CLEARED AND THAT THE PROGRAM
CAN INTERRUPT.
INTERRUPT ENABLE IS SET AND CLEARED BY
DATA BIT 11 AND THE KIE COMMAND.
SPI IS CHECKED TO sKIp_
AND NOT TO SKIP AND THE PROGRAM ALSO CHECKS THE MODULE TO
AT THE END OF THE TEST THE
INTERRUPT AND NOT TO INTERRUPT.
ALL ERRORS WILL RESULT
RECEIVE FLAG IS CHECKED TO BE A 00
THE

IN
AC

./‘\

AN ERROR HALT AT LOCATION 2210 WITH THE CONTENTS OF
EQUAL TO THE PC WHERE THE ERROR WAS DETECTEDo

THE

THE NEXT TEST (CAFINT) CHECKS THAT CAF WILL SET INTERRUPT
ENABLE BY USING THE TRANSMIT FLAG TO SKIP AND INTERRUPT ON;
ALL ERRORS WILL RESULT IN AN-ERROR HALT AT LOCATION 2210 WITH
THE AC EQUAL TO THE PC WHERE THE ERROR WAS DETECTED,

THE
AC

NEXT TEST (ACNSKP) CHECKS THE
AND ALSO CHECKS THAT THE IOT'S
AN

EFFECT
DO

THE

NOT SKIP.
AT LOCATION

IOT
TPC

THE

AND

2231
ERROR HALT
SKIPPED THAT SHOULDN‘T; THE AC
THE ERROR WAS DETECTED.
AN ERROR
HALT AT LOCATION 2246 INDICATES THAT THE IOT AFFECTED THE
THE CONTENTS OF THE AC EQUALS THE PC
CONTENTS OF THE AC.
WHERE THE ERROR WAS DETECTED.
PRESSING CONTINUE WILL RESULT
IN AN ERROR HALT AT LOCATION 4110 WITH THE AC EQUAL
TO THE BITS THAT WERE EFFECTED BY THE IOT.
TLS

ARE

NOT

TESTED.

INDICATES THAT AN IOT
CONTAINS THE PC WHERE

NEXT TEST (STFLGS) CHECKS THAT THE TRANSMIT FLAG CAN BE
TPC AND THAT SOMETIME AFTER THE TRANSMIT FLAG IS
THE
THE RECEIVE FLAG WILL GET SET BY DATA AVAILABLE.
PROGRAM CHECKS THAT FLAGS CAN CAUSE AN INTERRUPT AND
NOT TO INTERRUPT BY SETTING AND CLEARING INTERRUPT ENABLE,
THE PROGRAM CHECKS THAT TCF AND KCC WILL CLEAR THE PLACE.
ALL ERRORS WILL RESULT IN AN ERROR HALT AT LOCATION 2211
WITH THE AC EQUAL TO THE PC WHERE THE ERROR WAS
WHEN LOOPING ON THE ERROR. THE PROGRAM WILL
DETECTED,
DELAY APPROXIMATLEY ZOOMS AT THE BEGINNING OF EACH LOOP
TO ALLOW TIME FOR THE FLAGS TO SETTLE.
THE

SET
SET

NEXT TEST (XMTREC) CHECKS THAT A TPC COMMAND WILL SET
THE TRANSMIT FLAG AND THAT A TLS COMMAND WILL CLEAR THE
FLAG AND THEN RESET IT.
THE TEST AL50_CHECKS THAT THE
RECEIVE FLAG WILL GET SET FROM THE RESULT OF A TPC AND
TLS COMMAND AND THAT THE RECEIVE FLAG CAN BE CLFARED BY A
ALL ERRORS wILL RESULT IN
KRB AND ch OR KCF COMMANDa
AN ERROR HALT AT LOCATION 2211 WITH THE Ac EQUAL TO THE
1? SCOPE LOOPING, THERE
PC WHERE THE ERROR WAS DETECTED,
WILL BE A zooMs DELAY AT THE BEGINNING OF EACH LOOP
TO ALLOW THE FLAGS TD SETTLE.
THE

THE NEXT 7 TESTS (SDTSTI TO 7) ARE SIMPLE DATA TESTS.
THE PROGRAM TRANSMITS ONE WORD AND THEN WATTS IN A
WHEN
LOOP FOR THE TRANSMIT FLAG OR RECEIVE FLAG TO SET.
THE TRANSMIT FLAG IS SET THE PROGRAM CLEARS IT AND
WHEN THE RECEIVE
THEN WAITS FOR THE RECEIVE FLAGa
FLAG GETS SET, THE PROGRAM COMPARES THE WORD TRANSMITTED
WITH THE WORD RECEIVED AND IF THEY DON'T COMPARE THE
PROGRAM

HALTS AT LOCATION 1366 WITH THE WORD TRANSMITTED
IN THE AC0
PRESSING "CONTINUE" WILL RESULT WITH AN ERROR
HALT AT LOCATION 1371 WITH THE AC EQUAL TO THE WORD READ.
ALL OTHER ERRORS WILL RESULT WITH A HALT AT LOCATION 2211
WITH THE AC CONTAINING THE PC WHERE THE ERROR WAS DETECTED

6‘

TEST (FDATAT) Is A FASTER DATA TEST USING RANDOM
THE RROGRAM TRANSMITS THE FIRST WORD AND THEN
WAITS IN A LDOp FOR THE TRANSMIT OR RECEIVE FLAG TO SET.
WHEN THE TRANSMIT FLAG GETS SET A NEW WORD IS THEN
THE PROGRAM THEN WAITS IN
GENERATED AND TRANSMITTEDo
THE LOOP AGAIN FOR THE RECEIVE ELAG TO SET AND THEN
DATA IS COMPARED WITH THE FIRST WORD TRANSMITTEDn
THE DIFFERENCE BETWEEN THIS TEST AND SOTST IS THAT
THE RROGRAM Is TRANSMITING 1 WORD AHEAD OF WHAT IT IS
IF AN ERROR OCCURS THE RROGRAM WILL HALT AT
READING.
LOCATION 1451 WITH THE AC EQUAL TO THE WORD EXPECTEDc

THE

/’_‘\

DATA.

PRESS "CONTINUE" AND THE PROGRAM WILL HALT AT LOCATION
PRESS
1454 WITH THE WORD RECEIVED IN THE AC.
"CONTINUE” AGAIN AND THE RROGRAM WILL HALT AT LOCATION 1457
WITH THE AC EQUAL TO THE NEW WORD TRANSMITTEDo
THIS
WORD MAY BE THE 5AME AS THE WORD EXPECTED DERENDING
WHEN SCOPE LOORING ON
WHERE THE ERROR WAS DETECTED.
THIS ERROR, THE FIRST AND THIRD ERROR HALT WORDS WILL BE
THE WORDS USED TO TRANSMIT.
WHEN AN ERROR IS ENCOUNTERED
DURING THIS SCOPE LOOR. THE RROGRAM DELAYS 200MS TO ALLOW

THERE ARE NO ERROR
FLAGS T0 SETTLE BEFORE TRANSMITTING AGAIN.
ALL OTHER ERRORS WILL RESULT WITH AN
HALTS IN THE SCORE LOOP.
ERROR HALT

/"\

WHERE

THE

AT LOCATION 2211 WITH THE AC CONTAINING THE PC
ERROR WAS DETECTED.

THE NEXT TEST (CHARLG) CHECKS THAT THE OPERATOR HAS SELECTED THE
THE RROGRAM TRANSMITS A 377
CORRECT NUMBER OF DATA BITS”
AND THEN TAKES THE 1's COMPLEMENT OF THE NUMBER OF DATA
BITS THE OPERATOR HAD SET UP THE RROGRAM HITH AND COMPARES IT TO THE WORD
IF THE AC EQUALED ZERO AFTER THE COMPARISON, THE
OF DATA BITS WERE SELECTED CORRECTLY, OTHERWISE, THE
RROGRAM WILL HALT AT LOCATION 1632 WITH THE AC
CONTAINING THE BITS THAT WEREN‘T SUPPOSED TO BE SELECTED.
PRESS "CONTINUE" AND THE RROGRAM WILL HALT AT LOCATION 1635
WITH THE AC EQUAL TO THE BITS THE OPERATOR HAD INITIALIZED
ALL OTHER ERRORS WILL RESULT WITH AN
THE pROGRAM WITH,
ERROR HALT AT LOCATION 2211 WITH THE AC CONTAINING THE
PC wHERE THE ERROR WAS DETECTED,

READ,

NUMBER

NEXT TEST (FILERT) IS A FILLER CHARACTER TEST AND WILL ONLY BE DONE
THE OPERATOR HAS INITIALIZED THE PROGRAM FOR FILLER CHARACTERS.
THE PROGRAM TRANSMITS A LINE FEED AND CHECKS THAT 4 RECEIVE
FLAGS GET SET BEFORE THE TRANSMIT FLAG AND THAT THE 5TH RECEIVE
THE DATA RECEIVED
FLAG GETS SET AFTER THE TRANSMIT FLAG.
SHOULD BE 1 WORD OF LINE FEED AND 4 WORDS OF FILLER CHARACTERS.
IF THE WORD EXPECTED DOESN'T EQUAL THE WORD RECEIVED THE
PROGRAM WILL HALT AT LOCATION 1726 WITH THE AC CONTAINING
THE WORD EXPECTED.
PRESS "CONTINUE" AND THE PROGRAM WILL
HALI AT LOCATION 1731 WITH THE AC CONTAINING THE WORD RECEIVED.
SCOPE LOOPING ON THIS ERROR WILL RESULT IN A QOOMS DELAY
AT THE BEGINNING OF EACH ERROR TO ALLOW TIME FOR THE
ALL OTHER ERRORS WILL RESULT IN AN ERROR
FLAGS TO SETTLE.
HALT AT LOCATION 2211 WITH THE AC EQUAL TO THE PC WHERE
'ERROR WAS DETECTED.

THE

IS A STATUS ENABLE TEST AND WILL ONLY
THE OPERATOR HAD SET THE STATUS ENABLE BIT
THIS TEST WILL
TO A ONE WHEN HE INITIALIZED THE PROGRAM.
CHECK THAT THE ERROR BIT AND THE OVERRUN BIT CAN BE SET AND
THE TEST WILL CHECK THAT
CLEARED IN THE STATUS REGISTER.
THE RECEIVE
STATUS ENABLE F/F CAN BE SET AND CLEARED.
BUFFER WILL BE CHECKED TO CONTAIN THE CORRECT WORD.
THREE WORDS (1,2+3) WILL BE TRANSMITTED AND THEN THE RECEIVE
IF THERE WAS AN ERROR DURING
BUFFER WILL BE CHECKEDo
COMPARISON OF DATA THE PROGRAM WILL HALT AT LOCATION 2117
WITH THE AC EQUAL TO THE PC WHERE THE ERROR WAS
AND THE PROGRAM WILL HALT AT
PRESS "CONTINUE"
DETECTEDa
PRESS
LOCATION 2122 WITH THE WORD EXPECTED IN THE AC.
"CONTINUE" AGAIN AND THE PROGRAM WILL HALT AT LOCATION 2125
ALL OTHER ERRORS
WITH THE WORD RECEIVED IN THE AC.
WILL RESULT IN AN ERROR HALT AT LOCATION 2211 WITH THE
PC WHERE THE ERROR WAS DETECTED IN THE AC.
SCOPE
LOOPING ON THIS ERROR CAUSES THE PROGRAM TO DELAY ZOONS
BEFORE STARTING TEST OVER TO ALLOW FLAGS TIME TO SETTLE.

THE

LAST

TEST

EXECUTED

(STENABJ

OF TEST-START TEST OVER AT CLRBRD IF SR4=O
OTHERWISE HALT AT LOCATION 4110 WITH 2147 IN THE

END

BAUD

RATE TIMING

AC.

TEST

U”C.Dfl-.n.°...gw.w--

ONCE THIS TEST
STOP WATCH TIMING TEST.
THE PROGRAM TURNS THE INTERRUPT
ON AND TRANSMITS A CALCULATED NUMBER OF CHARACTERS
(DETERMINED FROM THE BAUD RATE, PARITY, NUMBER OF DATA
THE PROGRAM
BITS/CHARACTER AND NUMBER 0? STOP BITS).
SHOULD HALT AT LOCATION 4110 WITH 2330 IN THE AC IN 30 SECONDS.
EXCEPTIONS
TO THIS ARE:
ANY BAUD RATE, ND PARITY: 5 DATA BITS/CHARACTER
THE PROGRAM IN THIS CASE SHOULD HALT IN 28 SECONDSa
AND 2 STOP BITS,

BAUD

RATE

TIMING TEST

IS A

(BAUDTM) HAS BEEN STARTED,

INTERFACES

9.0

APT-8

9.1

DESCRIPTION

/"\

INTERFACES HAVE BEEN PROVIDED WHICH
UNDER THE STANDARD AFT-9 SYSTEMI

TWO
TO

RUN

TIMING

WILL

THESE

ALLOW

THIS

INTERFACES

DIAGNOSTIC
ARE:

INTERFACE

2. ERROR INTERFACE
WILL

EACH
‘

9.2

BE EXPLAINED

MORE DETAIL.

SETUP

IN ORDER To RUN uNDER APT-8, ADDREssEs 20 AND 22 MUST BE ESTABLISHED
PRIOR To RUNNING THE PROGRAM uNDER APT-e CONTROL. THE EDLLDNINC
INFORMATION MUST BE INDICATED:
'

/’_‘\

THE

SYSTEM

RUNNING

2. DEVICE CDDEs TO

UNDER

TEST

APT-8

SYSTEM.

USED.

PARITY

JUMPER

STATUS

ENABLE

JUMPER

INSTALLED.
INSTALLED.

s, FILLER CHARACTER JUMPER INSTALLED

BAUD

TWO

STOP BITS JUMPER

DATA

BITS/CHARACTER.

ADDRESS

RATE.

NDT

INSTALLED.

(PsEUDO-SWITCH REGISTER)

TNI;-ADD;ESS WILL CONTAIN THE DEVICE coDEs T0 USE FOR TFANSMIT
AND

RECEIVE

FOLLOWING

THE

0304

INDICATES

ADDRESS

EDRMAT:

IDT

TRANSMIT

AND

RECEIVE

IDT

04.

(HARDWARE CONFIGURATION WORD 1)

..--'9----

/"\

THE

FOLLOWING

WORD

NOTE!

BIT1=1

/"\

THE

BIT

DEFINITION

A 1 FOLLOWING A JUMPER OR
JUMPER IS INSERTED OR THE

BIT7-BIT11
I)

FDR

HARDWARE

CONFIGURATION

PARITY JUMPER

SWITCH

INSTALLED

AMOUNT OF MEMORY
f

INDICATES
IS IN THE

THAT THE
ON POSITION

NP=1

AVAILABLE

SYSTEM

SEGMENTS

THE

(HARDWARE CONFIGURATION

ADDPESS

FOLLOWING

BIT

THE

BITO=1

DIAGNOSTIC

BIT1=1

MULTIPLE

CONTROLLER

JUMPER

STATUS

ENABLE

BIT3=1

FILLER

CHARACTER

BITé

BITS

BIT7
0

1
O

”F-“0000 OOHfi-‘flHOO nap-omuoHp-o

BAUD

1200

1
1

2400
4800
9600

19.2K

56.8
66.7
1050

0
1

SWD=1

JUMPER

INSTALLED

FIL=1

RATE

BAUD
BAUD
BAUD
BAUD
BAUD
BAUD
BAUD

ROCKER

81:1
51:1
81:1

31:1
31:0
31:0

01:1

”19.2 KILO BAUD IS ONLY OBTAINABLE
BIT9=1

BITiO

BIT11

TWO

STOP
#

BITS-JUMPER

DATA

ENABLED.

INSTALLED

81:0
31:0
31:0
BAUD 51:0
BAUD 81:1

22.

BAUD
BAUD
BAUD

110
150
300
600

ADDRESS

APT-8

OPTION

RITZ=1

BITS

FUR

DEFINITION

RUNNING

WORD

NOT

82:0‘
32:0

83:0

B2=1
52:1

53:0

82:0
52:0
82:1

83:0

82:1
B2=1
82=0
82=0
B2=0

53:1
33:1

WITH

BB=1

83:1
53:1
83:0

w2=1
W2=1
W2=1
W2=1
W2=1

KLewJA &
KLB-JA &
w5=o KL8~JA &
ws=o KLawdA & KA
w5=0 KLB-JA & KA
w5=o KLs-JA & KA
W5=1 KLe-JA & KA
W5=0 KLevKD (M8655wYC)
W5=o KLSwKC (M8655-YB)
W5=o KLg-KB (M8655-YA)

SPECIAL

UAPT.

SB=O

JUMPEPS

W..-

0
1

1
0

(DflO‘MI

DATA

DATA
DATA
DATA

BITS/CHARACTER
BITS/CHARACTER
BITS/CHARACTER
BITS/CHARACTER

N81=1

NBl=O
NB1=1
NB1=0

‘

W5=0
W5=0

BB=0

83:0
83=O

VARIATION

w2=1
w2=1

W2=1
w2=o
W2=1
W2=1
W2=1

INSTALLED

BITS/CHARACT ER

JUMPERS

SWITCHES

NBZ=1
NBZ:1
NBZ=0

NB2=O

w5=0
ws=o

KLa-JA

KL8~JA

KA
KA
KA
KA

9.3

APT-8

INTERFACES.

.U'..--.-..-.'-.'

/"\
9,3,1

TIMING

IS NOTIFIED OF PROGRAM RUN BETWEEN .2 SECONDS AND
2.0 SECONDS. THIS WILL ALLOW THE DIAGNOSTIC TO RUN
UNDER THE MUCH BLOWER MOS MEMORY WITHOUT CAUSING APT-8 TO GIVE
A TIMEOUT ERROR.
APT-8

9.3.2

ERRORS

IS REPORTED T0 APT-8. THE TYPE OF ERROR
FROM THE CORRESPONDING ADDRESS IN THE PROGRAM
LISTING, THERE Is A POSSIBILITY THAT A TIMEOUT ERROR MAY OCCUR.
THIS Is CAUsED BY THE ERROR HHuNG DEVICE". THE PROGRAM
WILL HAVE TO BE RERUN IN DUMP MODE IF THIS SHOULD HAPPEN,

ONLY THE ERROR PC
CAN BE DETERMINED

O
9.4

/’\\

PRECAUTIONS

THIS PROGRAM SHOULD BE LOADED IN
TO APT-8 THAT CORE SUMCHECKS ARE

9.5

MULTIPLE

OPTION

SCRIPT MODE
TO

INDICATING

IGNORED.

CONTROLLER

THE DIAGNOSTIC HAS BEEN PROVIDED wITH THE MEANS T0 FUNCTION
THE MULTIPLE OPTION CONTROLLER. TO ENABLE THIS FEATURE
HARDWARE CONFIGURATION WORD 2 BIT I MUST BE SET TO A ONE.
WITH THE MULTIPLE OPTION CONTROLLER ENABLED THE FOLLOWING
PSEUDO-SWITCH REGISTER BITS ARE DEFINED:
ON

F‘\

SRO=O

THE FAIL LAMP

LIGHT

CORRESPONDING WITH FAILING

DEVICE.

NOTEI

sR0=1

SR6=0

TEST

SR6=1

TEST

SHOULD
DEVICE

/"\

//“\

APT

PROM

ERROR

OPTIONS
OPTIONS

BE NOTED THAT ALL OPTIONS MUST BE SET
03 04. ALL OTHERS CAUSE ERRORS.

CODES

10,0

CONSOLE TERMINAL

10.1

ABSTRACT

PACKAGE

A CONSOLE TERMINAL PACKAGE HAS BEEN PROVIDED TO ALLOW THIS
DIAGNOSTIC TO RUN ON THE CL/B SYSSTEM. THIS ALLOWS THE
USER TO CONVERSE TO THE DIAGNOSTIC THROUGH A SOFTWARE CONTROLED
SWITCH REGISTER.

10.2

INITIALIZATION
much-nunu-oaou

CONSOLE TERMINAL PACKAGE IS INITIALIZED BY MEANS OF
ADDRESS 22¢ TO INDICATE THAT THE CONSOLE TERMINAL PACKAGE IS
TO BE USED, BIT 3 MUST BE SET TO A ONE. AT THIS TIME ALL ERROR
HALTS AND SWITCH REGISTER FUNCTIONS ARE PASSED TO THE
CONSOLE PACKAGE.
THE

10,3

CONTROL G

THE CONTROL CHARACTER TO OPEN THE PSEUDO SWITCH
WHEN CONTROL G IS TYPED THE PROGRAM IS
INTERRUPTED AND SR=XXXX IS TYPED. XXXX IS THE PRESENT
CONTENTS OF THE PSEUDO SWITCH REGISTER. THE OPERATOR CAN
NOW CHANGE THE SETTING BY ENTERING A NEW SET OF NUMBERS,
OR NOT CHANGE IT BY TYPING IN A TERMINATING CHARACTER.‘
WHEN THE PROGRAM RECOGNIZES A CONTROL G IT WILL TYPE AN UP
ARROW THEN A G TO SIGNAL THE OPERATOR IT IS RESPONDING TO A
CONTROL G.
THIS

EXAMPLE:
TYPE CONTROL
‘G
SR:XXXX

10,3

/PRESENT CONTENTS OF
IPSEUDO SWITCH REGISTER.

ARE CARRIAGE RETURN
RETURN TO THE PROGRAM AT

TERMINATING CHARACTERS

EACH WILL CAUSE
AT WHICH IS HAS

THE

CONTROL

LINE FEED.
POINT

INTERPUPTFD,

SOCUOCU-O

THIS

SPECIAL CHARACTER

STOPS_SENDING

OUTPUT

THE

TERMINAL

DEVICE. IT WILL WAIT FOR A CONTROL O FOR RESUMPTION OF
THE DIAGNOSTIC. THIS CONTROL CHARACTER IS NOT ECHOED.
10.4

CONTROL

THIS

USED

10.5

CHARACTER CAUSES RESUMPTION OF
IN CONJUNCTION WITH CONTROL S.

CONTROL

DDH'BW-Ou

TERMINAL OUTPUT.
THE CHARACTER IS

IT IS
NOT ECHOED.
_

THIS CHARACTER IS USED TO RETURN BACK TO AN
OPERATING SYSTEM KEYBOARD MONITOR. THE OPERATING SYSTEM
FOR THE PUP-8 Is THE 08/8 SYSTEM WITH ITS
SELECTED
BOOTSTRAP IN LOCATION 07600, THE CONTROL CHARACTER IS
ECHOED WHEN RECOGNIZED AND IS REPRESENTED BY AN UPARROW

AND

10.6

ERROR

REPORTING.

ERRORS ARE REPORTED TO THE TERMINAL, THE PC OF THE ERROR
IS REPORTED AND THE SWITCH REGISTER CONTENTS INDICATED.
TO CONTINUE FROM THIS POINT TYPE A C.RET. OR CHANGE
THE SWITCH REGISTER ACCORDINGLY.

ALL

10.7

END

PASS

END

PASS

DIKLAC
XXXX

/\
11.0

LISTING
uuuno-u

f‘\

END

THE

WILL
OF

PASS

OCTAL

INDICATED BY THE FOLLOWING:

XXXX.
NUMBER FOR THE PASS JUST COMPLETED,

/KL8-JA & KLS-KA/KB/KC/KD
1

ICOPYRIGHT (C)
/
IPROGRAMMERI

11
12
13
14
15
16
17
18
19

6371
6372
6373
6374

21
22
23
24
25

0019

1976;

1977

SEQ

0020

DIGITAL EQUIPMENT CoRPoRATIONoMAvnARD,NASS.,01754

BRUCE HANSEN
ORIGINAL
B KLe-K MODIFICATIONS y R. MOORE
/
.
c
APT-8
DON RICE
REV
INTERFACES
/
/
/THE IOT'S ARE USED ON THE APTBA TEST SYSTEM
IHHEN MULTIPLE DEVICES ARE TO BE TESTED.
/
APTI00=6370
/LOAD THE SELECT COUNTER FROM Ac BITS
/8-11 AND CLEAR THE AC. THIS IS USED
/TO INITIALIZE TO DEVICE ZERO
APTIO1=6371
IINCREMENT THE SELECT COUNTER
APT102UG372
ISET THE FAIL FLAG DESCRIBED BY THE
ISELECT COUNTER
/CLEAR SELECT COUNTERS AND ALL FLAGS
AFT103=6373
APTIO4=6374
ISKIP IF FAILURE FLAG DESCRIBED
/BY THE SELECT COUNTER IS SET.
~/READ SELECT COUNTERS INTO AC BITS 8-11
APTIO5=6375
/

6375

REV
REV

RELEASE

lRECEIVE
6007

CAF=6007

29
30
31
32
33

6030

KCF=603O
KSF=6031

6031
6032
6034
6035

34
35

KCC=6032
KR5=6034
KIE=6035

6035

KSE=KIE

6036

KRB=6036

6040
6041
6042

TFL=6040
TSF=6041
TCF=6042

6044

6045

Tpc=6044
SPI=6045

6046
7402

TLS=6046
HALT=7402

IOTS FOR KLB'JAIKAIKBIKC

lTRANSMIT

1
42
43
44
45
46
47
48
49
50
51
52
53
54
55

IOTS

FOR

KLe-KA/KB/KC/KD LOOP HACK TEST.

PAL10

V142A

/SR2=1
/SR10=1

57
‘

ISR11=0
/

/SR11=1
/
7002

BSW=7002

ISKIP ON TRANSMIT FLAG
ICLFAR THE TRANSMIT FLAG
/LOAD TRANSNIT BUFFER AND TRANSNIT
/SKIP IF TRANSMIT OR RECEIVE FLAG IS SET AND
IINTERRUPT ENABLE FLIP/FLOP IS SET
ILOAD TRANSMIT BUFFER,TRANSMIT AND CLEAR TRANSMIT

/SRO=1
ISF1=1

KLa-JA.KA.KB.KC

ISET THE TRANsNIT FLAG

lszTCH REGISTER

ICLEAR ALL FLAGS
ICLEAR RECEIVE FLAG.DON'T SET READER RUN F/F
ISKIP 0N RECEIVE FLAG
ICLEAR Ac AND RECEIVE FLAG AND SET READER RUN
IREAD RECEIVE BUFFER AND STATUS
/AC 11:1 SET INTERRURT ENABLE
/AC 11 = 0 CLEAR INTERRUPT ENABLE F/F
IAC10=1 SET STATUS NORp ENABLE
/AC10=0 CLEAR STATUS NORO ENABLE
/CLEAR AC AND RECIEVE FLAG,SET READER RUN AND
/READ RECEIVE BUFFER AND STATUS

36
37
38
39

SEO

64
65
66
67
68

1973,

58
59
60
61
62

PAGE

6370

/KL8-JA

9134

16~SEPI77

8
9
10

K‘\

V142A'

6
7

PAL10

TEST.

(Q.

LOOP BACK

IKLB-JA G KLS-KA/KB/KC/KD LOOP BACK TEST.
IMAINDEC-OBwDIKLA-Cub

FLAG

SETTINGS

DON'T HALT

LOOP ON ERROR

16-SEP-77

9:34

ERROR
0? DATA

PAGE

PATTERN

1-1

LOOP ON TEST SEOUENCE
PROCESSOR NOT A PDP-BE
STARTING ADDRESS 200 ONLY-SETUP pRoGRAM LIMITS
BY WAY OF THE SWITCH REGISTER
STARTING ADDRESS 200 ONLY-SETUP PROGRAM LIMITS
BY WAY OF THE TELETYPEtDEVICE CODES OF 03604)

/KL8-JA

KLB'KA/KB/KC/KD LOOP BACK TEST-

PAL10

V142A

16-SEP-77

9I34

PAGE

2
SEQ

0000
0001

0002
0003

0011

0000
0303
'5001

0002
0003
0011
0000
0020

0021

303
J"?
2
3

IREVISION C

Ironusa

*11

A11!
,

0N APT-8

«20

[THE FOLLOWING 4 LOCATIONS ARE RESERVED FOR USE BY THE APT 8 TEST SYSTEM.
/

0020
0021
0022
0023

0000
0000
0000
0000

A20:
A21,
A22;
A23,

0024

/
£24

0
0
0
0

0024
0025
0026
0027
0030
0031
0032
0033
0034
0035
0036
0037
0040
0041
0042
0043
0044
0045
0046
0047

0000

0002
0115
0117
0033
0037
0077
0177
0377
0304
0007
0004

0377
0000
0000

0000
0000
0000

0000

0050

0000
0000

0051
0052
0053
0054
0055
0056
0057

0000
0000
0000
7000
0252
0125
0212

SAVPNT; 0
2
K2:
115
K1157
117
K117;
33
K33;
37
K37,
77
C77,
177
C177:
K377:
377
DEVCOD; 0304
SAVBTSI 0007

BITND;

0004

DATBIT:
BAUDNUI
XMTDAT;
XMTDTII

0377

1::

0000'
O

0
0

ERRFLGI
RECDATI

0
0

LUOFPCI
NDELAYI
CNT1I
CNTZ;
TSTCNT,

0
0
0

0
'1000
0252
0125
212

SAVZ,
M1000:
K0252:
K0125]
K212:

ISUBROUTINE‘CALLS

0060
0061

IKL8-JA

4460
2163
4461
2620

LOAD=JM5

I .
XLOAD

I
DELAY=JMS
XDELAY

KLB-KA/KB/KC/KD

LOOP

BACK

TEST.

PADIO

V1424'

16-SEP-77

9234

PAGE

2’!
SEQ

124
125

126
127
128
129
130
131
132
133
134
135
136
137
138
139
140

141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160

161

0062

0063

4463
4042
4464

0064

2200

0065
0066

0067
0070

0071
0072
0073
0074

0075

0076

0077
0100

0101
0102
0103

4455
4050
4455
2571
4457
2707
4470
3314
4471
3400
4472
3201
4473
3211
4474
3464
4475
3513
4475
3224
4477
3500
4500
3306
4501
3235
4502

STLPPC=JMS I
XPCRET
LnandMS I
xsnz
EHLTLP=JMS I
HLTLOP
sw1oNE=JMs I .
NOTBE
TSFSKP=JMS I .
WATTS?
KSFSKP=JMS I
WATKSF
LISN=JMS I .
XLISN
.

MESAGE=JMS

0105

165

0106

Mssncx
DNEOCT=JMS I .
ONEUCK
TWODCT=JMS 1 .
TWOUCK
Foaocr=ans I .
FORDCK
PRNT1=JMS I .

PFNT4=JMS I
XPRNT4
SPACE2=JMS I .
.

SPACX2

TYPE=JMS I .
TYPE
CRLFdeS I .
XCRLF
MIOT=JMS I .
XMIUT
xoazaus

0104

162
163
164

XORS

YESRNO=JMS I
YESRNX
RANDDM=JMS I
.

166

167

4452
4032

x RAND
SAVGENaJMS I .

0107

168

169
170
171
172
173
174
175
176
177
178

0110
0111

0112
0113
0114

BswAp=aMs I .
X5 5 w
AERROR=JMS I .
XAERRD
APT8=JHS I XAPTE
TICKEJMS I .
XTICK
CHEK22=JMS I

IAPT ERROR

ITEST FDR

REPORTER.

APT.

0022

[KLBHJA G KLBHKA/KB/KC/KD
179
180

0115

181
182
183
184
185
186

0116

187

0121
0122

0117
0120

188
189
,190

0123
0124

LOO? BACK

4113
4516
3737
4517
4063
4520
4072

XCHK22
NERRORSJNS I .
XNERRO
LASBJNS I .
XLAS
HLTIJMS I a
XHALT

0000

CLKCNT;
COUNT:

K4000:

4000

TEMP,

0000
4000
0000

PAL10

TEST.

V142A

16-sEp-77

9134

PAGE

2»:
SEO

0023

SEQ

0024

’

[TEMP

STORAGE FDR APT-8

[Kba-JA

KLS-KA/KB/KC/KD

191

PALlO

192
193

0200

4513

aGNINT'

APTB

194
195
196
197

0201
0202
0203

5250
5777'
4517
7012
7710
5776'
4520

NOINTR'

JMP START
JR?
BAUDTM
LAS
RTR
CLA
SPA
ON?
TYINTR
BLT

198
199
200

0204

201
202

0207
0210
0211
0212
0213
0214
0215
0216
0217
0220
0221

203

204
205
206

207
208
209
210
211
212
213
214
215
216

0205
0206

4517
3035
4517
3036

0227
0230
0231
0232
0233
0234
0235
0236
0237
0240

0241

1041

228
229

0242
0243

230
231
232

0244
0245
0246
0247
0250
0251
0252
0253
0254
0255
0256
0257

1371
7740
5212
4515

218
219
220
221
222
223
224
225

226
221

233
234
235
236
237
238
239
240
241
242

243
244
245

0222

0223
0224
0225
0226

0260
0261
0262
0263

4520

1036
0375
3037
1374
1037
3223
4520
3040
1036
0373
7640
2037
1036
7710
2037
1036
7012
7010
0372
3041

217

BACK TEST.

LOOP

SETUP.

5
'

5352
1367
3001

LAS
DCA
HLT
LAS
DCA
TAD
AND
DCA
TAD
TAD
DCA
HLT/TAD
DCA
TAD
AND
SZA CLA
Isz
TAD
SPA CLA
152
TAD
RTR
RAR
AND
DCA
TAD
TAD

16-SEP-77

9:34

PAGE

[TEST FOR APT OR
[BEGIN INTERROGATION FOR SETUP
[GO TO START OF TEST NO INTERROGATION REQUIRED
[BAUD RATE TIMING TEST(THE PROGRAM SHOULD HALT IN 30 SECONDS
[LOOK AT SR11 FOR DESIRED TYPE OF INTERROGATION
IPUT BIT 11 INTO ACO
[IF AC11=1 USE TELETYPE FOR INPUT ,OTHERWISE USE THE SR
[GO TO TELETYPE FOR INTERROGATION
[SET HITS 0-5 TO THE RECEIVE IOT AND BITS 6-11 TO TRANSHIT IOT
[GET DEVICE CODE FROM SWITCH REGISTER
'[SAVE IT FOR IOT MODIFICATION
[SET PARITY-STATUS-FILLER-BAUD RATE-STOP BITS-AND 8 OF DATA BITS
[GET THE SR AND CALCULATE THE RESULTS
[SAVE THE”
[SETUP THE NUMBER OF DATA BITS

DEVCOD

SAVBTS
SAVBTS
(3
BITNO

(TAD K37
BITNO

.+1
K37+(X)
DATBIT
SAVBTS
(4

[THIS NUMBER=37I77II77I377 FOR 5,6,7 OR 8 DATA BITS
[SET UP LENGTH OF CHARACTER FROM 3 OF STOP BITS
[IE BIT 9:1 2 STOP BITSJIF 0 ONLY 1 STOP BIT

BITNO
SAVBTS

[ADD 1 MORE TO CHARACTER
[DOES IT HAVE PARITY

LENGTH

BITNO
SAVETS

[YES BUMP THE CHARACTER
[SET UP FOR BAUD RATE

LENGTH BY

(17
BAUDNO

[SAVE THE BAUD NUMBER POINTER
[IS THE BAUD NUMBER WITHIN LIMITS

BAUDNO
(-13

SMA SZA CL A
GM?

[N0,BAUD

SETUP-3

CHEK22

4770'
4520
1035
7012
7010
4503
5241
1035
7006
7004
4503

V142A

£200

0200

START:

MS
HLT

XCBPSW

TAD

DEVCOD

[SET SR

[PUT THE

SETUP

TO DESIRED SWITCH SETTINGS

RECEIVE DEVICE CODE IN BITS

3-8

[

RECPNT
DEVCOD

[GO MODIFY,THE IOTS
[RECEIVE IOT TABLE POINTER
[GET THE DEVICE CODES
[PUT THE TRANSNIT DEVICE CODE IN BITS
/
[GO MODIFY_THEN
[POINTER TO TRANSMIT IOT TABLE
[SET UP INTERRUPT RETURN LOCATIONS
‘

‘

MIOT
XMTIOT
TAD
DCA

STATUS

[GET THE DEVICE CODE

RTR
RAR
HIOT
TAD
RTL
RAL

NUMBER OUT OF BOUNDS GO BACK TO
[TEST FOR ACTIVE CONSOLE.
[ASK SWITCH REGISTER QUESTION.

(ON?
1

3'8

lKLS-JA

KLS-KA/KB/KC/KD LOOP BACK TEST.

PALlO

V142A

16-SEP-77

PAGE

9134

3-1

0025

SEO

246
247
248
249
250
251
252
253
254
255
256

0264
0265
0266

1366
3002
5271

TAD
DCA
GM?

0267
0270

7240
5400

INTRETI CLA

(INTRET

2
CLRBRD

/GO

START

TEST

CMA

OH?

/INIALIZE THE MODULE WITH A CAF INSTRUCTION AND CHECK THAT THE
IRECEIVE AND TRANSMIT FLAGS ARE NOT STUCK ON AND THAT KSF,TSF
IAND SPI DONT SKIP AND
/IS NOT PULLED LON.

257
258
259

0271

260

0272

261
262
263

0273
0274
0275
0276
0277
0300
0301
0302
0303

264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280

0304
0305
0306

0307
0310
0311
0312
0313
0314
0315
0316

4460
4462
4465
0545
6007
6031
7410
4464
6041
7410
4464
6045
7410
4464
6001
7000
6002
7710
4464

CLRBRD'

LOAD

ILDAD TIMING VALUE FOR APT IF REQUIRED/SET LOOPING PC FDR TEST AND ERROR LOOPING
/CHECK SR10 TO SEE IF PROCESSOR A PDP-SE
/PROCESSOR NOT A POP-8E
/CLFAR THE BOARD-CHECK THE SKIP IOT'S NOT TO
/SKIP ON RECEIVE FLAG

STLPPC
SN10NE
ACNSKP
KSFOI

TSFO,

SPIOI

4516
0273
4463

THAT THE INTERRUPT REQUEST

CAF
KSF
SKP
EHLTLP
TSF
SKP
EHLTLP
SPI
SKP
EHLTLP
ION
NOP
IOF
SPA
EHLTLP
NERROR

LINE

SKIP

/ERROR,RECEIVE FLAG SET 0R KSF SKIPPED
ISKIP ON TRANSMIT FLAG

/ERROR,TRANSMIT FLAG SET OR TSF SKIPPED
ISKIP IF XMIT/RECEIVE FLAG SET WITH INT ENB.
,

/SPI SKIPPED OR
ICHECK THAT INT

KNIT/RECEIVE FLAG
REG

IS NOT

SET

PULLED

WITH

INT

ENB

INT. ENB.

IAND TRANSMIT/RECEIVE FLAG BEING SET
CLA
IINT

REG

LINE

/LOOP

SR2=1

PULLED

LOW

TRANSMIT/RECEIVE FLAG

SET

CLRBRD+2
LOOP

281
282

ICHECK

283
284
285
286
287
288
289
290

291
292
293
294
295
296
297
298
299
300

lKLS-JA

0317

4462

0320
0321

6030
7410

’SKP

0322
0323
0324
0325
0326
0327

4464

EHLTLP
TFL
SKP

0330
0331
0332
0333
0334
0335
0336
0337

SCXNITI
KCFO,

6040
7410
4464

TFLO:

6041

TSF1:

4464
6042
7410
4464
6041
7410
4464
6031
7610

STLPPC
KCF

EHLTLP
TCF
SKP

TSFZI

KSF1:

KLB-KA/KB/KC/KD

LOOP

PACK

TRANSMIT FLAG CAN

SET AND CLEARED BY TFLITSF

AND

TCF

TSF

EHLTLP
TSF
SKP
EHLTLP
KSF
SKP

THE

[SET LOOPING PC FOR TEST AND ERROR LOOPING
/CLEAR RECEIVE FLAG FOR SCOPE LODPING
ISAFETY SKIP IN CASE KCF SKIPPED
/KCF SKIPPED
ISET THE TRANSNIT FLAG
/SAFETY SKIP TO CHECK TFL NOT TO SKIP
/ERROR.TFL SKIPPED
/SKIP IF TRANSMIT FLAG=1
ITRANSMIT FLAG NOT SET OR TFL FAILED
ICLEAR THE TRANSMIT FLAG
ISAFETY SKIP TO CHECK TCF NOT TO SKIP
IERPOR: TCF SKIPPED
ISKIP ON TRANSMIT FLAG

EHLTLP

TCFO,

THAT

IERROP'TCF FAILED TO CLEAR TRANSNIT FLAG
/CHECK TO SEE IF RECEIVE FLAG GOT SET
CLA

TEST.

PAL10

V142A

l6-SEP-77

9:34

PAGE

3-2
SEQ

301
302
303
304

0340
0341
0342
0343

4464
4516
0320

EHLTLP
NERROR
SCXMIT+1
LOOP

4463

IRECEIVE FLAG SET BY SETTING TRANSMIT FLAG

/LOOP

305
306

307
308
309

310
311
312
313
314
315
316
317

318
319
320
321
322
323
324
325

ICHECK
0344

CAFXMTI
TFL1'
TSF3I

0345
0346
0347
0350
0351
0352
0353
0354
0355
0356
0357
0360
0361
0362

TSF4;

KSle

STLPPC

SR2=1

THAT

TRANSMIT

FLAG CAN

CLEARED

CAF

ISET LOOPING PC FOR TEST AND ERROR LDOPING
/SET THE TRANSMIT FLAG
ISKIP ON TRANSMIT FLAG
IERRORITRANSMIT FLAG FAILED TO SET
ICLEAR ALL FLAGS
/SKIP ON TRANSMIT FLAG
/OK FLAG NOT SET
/ERROR,CAF FAILED TO CLEAR TRANSMIT FLAG
ICHECK TO SEE IF RECEIVE FLAG GOT SET

TFL

TSF
EHLTLP
CAF
TSF
SKP
EHLTLP
KSF
SKP

CLA

EHLTLP
NERROR

/N0, IT DIDN'T
IERRUR RECEIVE FLAG GOT SET

CAFXMT+1
LOOP
JMP

ILOOP

SR2=1

INTXMT

0365
0366
0367
0370
0371
0372
0373

0374
0375
0376
0377
PAGE

/USING THE TRANSMIT FLAG'CHECK THAT INTERRUPT ENABLE CAN BE SET'
IAND CLEARED AND THAT THE PROGRAM CAN INTERRUPT. INTERRUPT
IENABLE IS SET AND CLEARED BY DATA BIT 11 AND KIE COMMAND.
0400
0401
0402
0403
0404
0405

0406
0407
0410
0411
0412
0413
0414
0415

4462
6030
7300
6035
7410
4464
6040
6041
4464
6045
7410
4464
6001
7000

INTXMT,
KCFl,

KIEO:

TFL2I
TSF5I

SPII:

ISET LOOPING PC FOR TEST AND ERROR LOOPING
ICLEAR RECEIVE FLAG FOR SCOPE LOOPING

STLPPC
KCF
CLA

CLL

/CLEAR INTERRUPT ENABLE
ISAFETY SKIP TO CHECK KIE NOT
IERROR, KIE SKIPPED
/SET THE TRANSHIT FLAG
ISKIP ON TRANSNIT FLAG
/TRANSMIT FLAG FAILED TO SET
/SKIP IF INTERRUPT ENABLE AND

SKIP

XMIT

FLAG

SETI

/OK,INTERRUPT ENABLE NOT SET
IERROR.INT ENE. SET,FAILED TO BE CLEARED BY KIE
/CHECK THAT INTERRUPT REQUEST
IINTERRUPT HERE IF SET

IS NOT PULLED

0026

IKLendA 6 KLBFKA/KB/KC/KD LOOP BACK TEST.
355
356
357

0416
0417
0420
0421
0422
0423
0424
0425
0426
0427
0430
0431
0432

358

359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376

0433‘
0434
0435
0436
0437
0440
0441
0442
0443
0444
0445
0446

377
378
379
380

0447
0450

381
382
383
384
385
386
387

0451
0452
0453
0454
04550456
0457
0460
0461
0462
0463
0464
0465
0466
0467
0470
0471
0472
0473
0474
0475
0476
0477

388
389
390

391
392

393
394
395
396
397
398

399
400
401
402
403
404
405
406
407
408
409

IKLB'JA
410‘
411
412
413
414
415
416
417

418
419
420
421
422
423
424
425
426
427
420
429
430
431
432
433
434
435
436
437
438
439

440
441
442
443
444
445
446
447
443
449
450

K151,

TSFE.
SPI2.

4464
6001
7000
6002
7700
4464
6042
6041
7410
4464
6045
7410
4464
6001
7000
6002
7710
4464
6040
6041
4464
6045
4464
6035
6045
7410
4464
6001
7000

TCF1.
TSF7,

CLA

SR?

CLA

PAGE 3-3

9134

16mSEP~77
INTERRUPT

IPROGRAM INTERRUPTEDuCHECK

INT.

AND

SP!
EHLTLP
190

ISHDULD‘INTERRUPT HERE
ITURN IT DFF
/DID IT INTERRUPT?
/FAILED To INTERRUPT-CHECK XMIT
ICLEAR THE THANEMIT FLAG
ICHECK T0 SEE IF IT CLEARED

CLA

AND

INT

0502
0503
0504
0505
0506

TFL3,
TSFB,
5914,

KIE2:
sPIs,

EHLTLP
SPI

/IT FAILED To CLEAR
ISKIP 0N INT END AND

SR?
EHLTLF
ION

/THAN5MIT FLAG Is GDNE IT SHUULDN'T SKIP‘

N0?
10?
SPA
EHLTLF
TFL
TSP
EHLTLP
$91
EHLTLP
K18
691

/CHECK
I
/

TRANSMIT FLAG

IT DOESN'T INTERRUPT

THAT

CLA

INTERHUPTED NITHDUT TRANSMIT FLAG
[SET THE FLAG AGAIN
ISKIP ON THE THANsHIT FLAG
IFLAG FAILED TO SET
ISKIP 0N XMIT AND INT. ENE,
IFAILED To SKIP 0N INT ENE AND XMIT FLAG
/CLEAR INTERRUPT ENABLE NITH KIE AND DATA BIT
ISKIP IF INT ENB=1 NITH XMIT FLAG
IFFDGAAH

SK?

EHLTLP
,

/KIE FAILED
/CHECK THAT

ION
NOP

In?

TCF2,

SPA
EHLTLP
TCF

KSFB,

KS?

4463
5300

INTERRUPT ENABLE
THE PROGRAM DOESN'T INTERRUPT
To CLEAR

CLA
/PROGRAM INTERHUFTED wITHDUT
ICLBAR TRANSNIT FLAG
/CHECK To SEE IF RECEIVE FAG

SH?
CLA
EHLTLF
NERROR
INTXNT+1
LOOP
GM?
'CAFINT

4516
0401

0507
0510
0511
0512
0513
0514
0515
0516
0517

0520
0521
0522
0523
0524
0525
0526
0527
0530
0531
0532
0533
0534
0535
0536
0537
0540
0541
0542
0543
0544

6040

6041
4464
6045

CAFINTI

KCFZ.
K153,
TFL4,
T5F9,
SPIG,

7410

4464
6007
6041
7410
4464

TSF10.

6045

IRECEIVE FLAG SET BY

ILOOP

sPI7.

PAL10

TEST

INT

ENB

GOT SET

AHDVE CDDE

sa2=1

TFLS,
TSFllp

SPIB,

KIE
TFL
TS?
EHLTLP
SPI
SKP
EHLTLP

/CLEAR INTERRUPT ENABLE
ISET THE TRANSMIT_FLAG
FAILED TO SET
0N TRANSMTT FLAG

ICAF

[SKIP

TSF
EHLTLP
5P1
EHLTLP

TS?
SKP
EHLTLP

AND

INT

END.

FAILED TO CLEAR XMIT FLAG
ON TRANSMIT FLAG AND INT

END.

ENB.

IPRUGRAM FAILED T0 INTERRUPT WITH
/CLEAR THE TRANSHIT FLAG
ISKIP IF TRANSMIT FLAG IS SET
CLA

KIE
KsF
SK?

ERROR LOOPING.

CLA

EHLTLP

TSF12'

3-4

SKIPPED WITHOUT TRANSHIT FLAG
ISET THE TRANSMIT FLAG
ISKIP IF XMIT FLAG IS SET
ITRANSMIT FLAG FAILED TO SET
[SKIP 0N INTERRUPT ENABLE AND TRANSMIT FLAG
/CAF FAILED TO SET INTERRUPT ENABLE
/CHECK THAT THE PROGRAM HILL INTERRUPT
IGU AND INTERRUPT
ITURN THE INTERRUPT OFF IF IT DIDN'T

TFL

TCF

TRANSMIT

ISPI

ION

KSF4,

SP1
SKP
EHLTLP

THE

TRANSMIT FLAG

/SKIP

IFLAG
ISKIP

EHLTLP

TCF3,

AND

ISPI SKTPPED DR INT ENE IS SET
/CLEAR TRANSMIT FLAG AND SET INT
/SKIP IF TRANSHIT FLAG = 1

TSF
SR?

IUF
'SNA

THE

PAGE

9:34

16-SEP—77

/SET THE LDDPING PC FOR TEST
ICLEAR RECEIVE FLAG

NOP

.KIE4,

v142A

STLPPC
KCF

CAF

7410

4464
6040
6041
4464
6045
4464
6001
7000
6002
7700
4464
6042
6041
7610
4464
6035
6031
7610
4464
4516
0501
4463

IIS
‘

FLAG

XMIT AND

INT

ENE

SET

IFLAG FAILED TO CLEAR
/CLEAR INTERRUPT ENABLE
ICHECK TO SEE IF RECEIVE FLAG

SET

CLA

EHLTLP

IRECEIVE FLAG GOT

SET

DURING

TEST

NERROR_
CAFINT+1
LOOP

ILOUP

TEST

SR2=1

/THE FOLLOWING TEST CHECKS THE EFFECT OF THE IOT ON THE AC
/AND ALSO CHECKS THAT THE IOTS DON'T SKIP. TPC AND TLS ARE NOT

451
452

0545

4462

453
454
455
456
457
458
459
460
461
462
463
464

0546

4465
0577
7240

0547
0550
0551
0552
0553
0554
0555
0556
0557
0560

6030

0023

ENE

SKP

SPI3.

7710

4462
6030
6035

SEQ

KIE

KIE SKIPPED
ISKIP 0N TRANSMIT FLAG/EHH0H,TNAN5NIT FLAG GOT CLEARED
/5KIF 0N INT END AND TRANSNIT FLAG
ISPI FAILED To SKIP 0R INT ENB NUT SET
ICHECK THAT INTERRUPT REQUEST Is PULLED

IEHHDR.

KLa-KA/KB/KC/KD L009 BACK TEST.

0500
0501

0027

ENE.

INT. ENE. HITH DATA BIT 11

ISET

/CHECK THAT CAF NILL SET INTERRUPT ENABLE USING
/FLAG T0 SKIP AND INTERRUPT 0N.

5E0

0FF

EHLTLP
Ts?
EHLTLP

N09
10F
SNA
EHLTLP
TC?
TS?

v142A

ITURN THE

SPA
EHLTLP
IAC
K16

6002

4464
6042
6031
7610
4464

PAL10

IOF

6002
7710
4464
7001
6035
7610
4464
6041
4464
6045

AcNSKP:

STLPPc
SH10NE

K5F5-1
CLA

KCFJ,

CMA

KC?

ISET THE_LO0PING PC FOR TEST AND ERROR LODPING
ICHECK To SEE IF PROCESSOR A PDPQE
/NDT A PDP-BE GO T0 NEXT SUBTEST
lsET Ac To ALL ONE'S
ICLEAR THE RECEIVE FLAG

7410.

SKP

4777'
7040
7440
4776'
7240

JMS
CMA
SZA
JNs
CLA
GM?

5775'
/

HLTLP1

IERROR,KCF SKIPPED
ISET

HLTLP2
CMA
KsFS

THE

/ERH0H.KCF

BACK

ZEROES

CHANGED THE AC
IsET THE Ac BACK TD 1's

TESTEDI

IKLSIJA & KLS—KA/KE/KC/KD LOOP BACK TEST.

PAL10

V142A

16-SEP-77

9334

PAGE

3-5
SEQ 0029

465
466
467
468

0575
0576
0577

0600
2217
0600

PAGE

470

0600

6031

KSFS,

471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490

0601
0602

7410

2241

469

0603
0604
0605
0606
0607
0610
0611
0612
0613
0614
0615
0616
0617
0620
0621
0622
0623
0624
0625
0626
0627
0630
0631
0632
0633
0634
0635
0636
0637
0640
0641
0642
0643
0644
0645
0646
0647
0650

491
492
493

ISKIP ON RECEIVE FLAG

4777'
7040
7440
4776'
7240

HLTLPi

IERRUR.RECEIVE FLAG sHbULD now as saw
/sz THE AC BACK TO zsaozs

HLTLP2
CMA

/ERRORIKSF CHANGED THE AC
ISET THE AC TO ALL 1'S
ICLEAR AC AND RECEIVE FLAG AND SET READER RUN

HLTLPI

IEPRPR:

HLTLP2

IERRDR;KCC FAILED TO CLEAR AC
ISET AC TO ALL 1'5 EXCEPT BITS 10 AND 1!

KCCO:

(-4

/CLEAR

INTERRUPT

HLTLPi
t3

IERROR,

KIE SKIPPED
TO AC AND THEN COMPLEMENT

HLTLPZ
CMA

IERROR,

HLTLP1

IERROR,

SKIPPED

/SET

BACK TO ZEROES

HLTLPZ

/ERROP,KRS CHANGED THE AC
ISET AC BITS 0'3
ICLEAR AC AND RECEIVE FLAG AND READ RECEIVE BUF

KIES;

/ADD

KIE CHANGED THE AC
THE AC = TO ALL 1’5
IPEAD RECEIVE BUFFER STATIC

'[7400

KRBO;

KRS
THE AC

AND

STATUS

IERRORa

HLTLP2

IKRB FAILED TO CLEAR THE AC
ICHECK TO SEE IF PDP-BE
IPROCESSOR NOT A PDP-BE GD DOINEXT
ISET AC EQUAL TO ALL ONES
[SET THE TRANSMIT FLAG

CMA

HLTLP1

IERROR,
ISET

THE

0651

IKLB-JA

HLTLPI
[7400

TFLé:

KRB

SKIPPED

TFL

SKIPPED
BACK TO

CMA

ITFL CHANGED THE AC
/SET THF AC TD 1's
ICLEAR THE TRANSMIT

HLTLP1

/EPROP,TCF SKIPPED

HLTLPZ

TCF4;

0655
0656
0657
0660

AND STATUS ENABLE

ISET

KRSOI

0652
0653
0654

SKIPPED

ISET

KLB-KA/KB/KC/KD LOOP BACK TEST

PAL10

THE

V142A

BACK

SUBTEST

FLAG

16-SEP-77

9:34

PAGE

3-6
SEQ

519
520
521
522
523
524
525

0661
0662
0663
0664
0665
0666

4776'
7240

JNs
CLA

TSF13,

0667

HLTLPZ
CMA

TSF
SKP
JMs
CMA
SZA
JMS
CLA
SPI
SKP

526

0670

527
520
529
530

0671
0672
0673
0674

JMS

531
532
533
534
535
536
537

0675
0676
0677

CMA
SZA
.ms

0700
0701
0702

ACNSKP+1

SPIgy

0030

/TCF CHANGED THE AC
ISET THE AC TO ALL 1's
ISKIP 0N TRANSIMIT FLAG

HLTLP1

ITRANSMIT FLAG IS SET
ISET THE AC BACK TO 0

HLTLPZ

’ERROR'TSF CHANGED THE AC

CMA

ISET THE
ISKIP IF

HLTLPl

/ERROR,SPI
[SET

HLTLP2
.

AC TO ALL
XMT/REC +

THE

SKIPPED

BACK

1'5
INT

ENB

XMT/REC
ZERO

AND

INT

ENB

IERRDR,SPI CHANGED THE AC

NERROR
LOOP

ILOOP ON TEST

SR2=1

tfl

[KLB-JA

KLEBKA/KB/KC/KD LOOP BACK TEST.

PAL10

V142A

9134

16-SEP977

PAGE

SEQ

538
539
540
541
542
543
544
545
546

4462

STFLGS:

STLPPC
TAD
DCA
DELAY

547
548
549
550

KIE6,

x12»
st
EHLTLP

551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569

[STORE LOOPING PC FOR TEST AND SCOPE LOOPING
[SET UP A DELAY OF 200MS TO ALLOW FLAGS TO SETTLE

(-3720
NDELAY

[WAIT FOR 200NS
[CLEAR INTERRUPT ENABLE
[SAFETY SKIP TO CHECK KIE NOT TO SKIP
[ERROR'KIE SKIPPED
[CLEAR AC AND RECEIVE FLAG AND SET READER RUN
[SAFETY SKIP TO CHECK KCC NOT TO SKIP
[ERROR0KCC SKIPPED
[CLEAR TRANSMIT FLAG
[SAFETY SKIP TO CHECK TCF NOT TO SKIP
[ERRORlTCF SKIPPED
[CHECK THE RECEIVE FLAG TO BE ZERO

CLA

KCC1;

SKP

CLA

EHLTLP

TCFSI

TCF
SKP

CLA

EHLTLP

KsF

KSF6;

SKP

6044
7610

570

0031

[START OF LOOP BACK TEST
[CHECK THAT THE TRANSMIT FLAG CAN BE SET BY TPC AND THAT DATA
CHECK THAT THE FLAGS CAN
[AVAILIBLE WILL SET THE RECEIVE FLAG.
CHECK THAT THE FLAGS CAN CAUSE AN
[BE CLEARED BY TCF AND KCC.
[INTERRUPT BY MANIPULATING INTERRUPT ENABLE.

571
572
573
574
575
576
577
578
579
580
591
592
583'
584
585
586
587
588
589
590
591
592

EHLTLP

[ERRORIRECEIVE FLAG :1

TSF14;

TSF
SKP
EHLTLP

[SKIP IF TRANSMIT FLAG =1

TPCO:

TPC
SKP

6031
7610

KSF7I

6045
7610
4464
6001
7000
6002
7710
4464
7301
6035
6045
4464
6001
7000
6002
7700
4464
6035
6045
7610
4464

SPI1OI

KIE7I
SP111I

EHLTLP
TSFSKP
EHLTLP
KSF
SKP
EHLTLP
591
SKP
EHLTLP
ION
NOR
10F
SPA
EHLTLP
CLA CLL
KIE
SPI

CLA
OR

KSF

SKIPPED

CLA

[ERROR'TRANSMIT FLAG=1 OR TSF SKIPPED
[LOAD TRANSNIT BUFFER AND TRANSMIT
CLA

[SAFETY SKIP TO CHECK TPC NOT TO SKIP
[ERROR,TPC SKIPPED
[WAIT FOR A SECOND FOR TRANSMIT FLAG TO SET
[ERRORyTPC FAILED TO SET XMIT FLAG OR TSF FAILED
[CHECK THE RECEIVE FLAG TO STILL BE A 0
[RECEIVE
[SKIP IF

GOT SET TO SOON
XHIT/RECEIVE FLAG=1 AND
FLAG

INT ENE SET

[ERRORISPI SKIPPED 0R INTERRUPT ENABLE
[CHECK THE PROGRAM NOT TO INTERRUPT

SET

[ERRORIINT ENB SET OR INT REG PULLED LOW
IAC

[SET

INTERRUPT ENABLE TO A 1
[AC11=1 AND KIE SET INTERRUPT ENABLE
[SKIP IF KNIT/RECEIVE FLAG=1 WITH INT ENABLE
[INTERRUPT ENABLE FAILED TO SET OR KIE FAILED
‘_

[CHECK THE PROGRAM TO INTERRUPT
[IT SHOULD INTERRUPT HERE
[TURN IT OFF

CLA

‘

[ERROR PROGRAM FAILED TO INTERRUPT WITH XMIT
[SET INT ENB=0 WITH AC11=0 AND KIE COMMAND
[CHECK THAT INT ENB CLEARED BY KIE

KIEB,
SP112I

AND

INT ENABLE

CLA

EHLTLP

[ERROR,INT ENB FAILED

CLEAR OR

SKIPPED

SPI

[KLB-JA

KLB-KA/KB/KC/KD LOOP BACK TEST.

PAL10

V142A

16°5EP'77

9:34

PAGE

4-1
SEQ

593
594
595
596
597
598
599
600
601
602
603
604

0763
0764
0765
0766
0767
0770
0773
0774
0775
0776
0777

6001

ION

7000

NOP

6002
7710
4464
5773‘

IOF
SPA

[CHECK THE PROGRAN NOT TO

CLA

[ERROR PROGRAM

EHLTLP
JMP

INTERRUPT

INTERRUPTED WITHOUT INT ENABLE

TSF16

1000
0003

7774
2241
2217
1000

PAGE
[

1000
1001
1002

1003
1004
1005
1006
1007
1010

1011
e

1012
1013
1014
1015
1016
1017
1020
1021
1022
1023
1024

6041
4464
6042
6041
7610
4464
4467
4464
6034
7610
4464
6031
4464
6045
7610
4464

TSFIOI

TSF17I

1030
1031
1032
1033
1034
41035
1036

KRSII

KSFE:

SKP
EHLTLP
KSF

SPI13!

EHLTLP
SP1

1044
1045
1046
1047
1050

XMIT
[ERROR;TCF FAILED TO
[WAIT FOR ABOUT A SECOND FOR RECEIVE FLAG TO SET
[ERRORIRECEIVE FLAG=0 OR DATA AVAILABLE FAILED TO SET RECEIVE FLAG
[CHECK THAT KRS DOESN'T CLEAR RECEIVE FLAG
[SAFETY SKIP TO CHECK KRS NOT TO SKIP
[ERROR,KRS SKIPPED
[SKIP ON RECEIVE FLAG
[KRS CLEARED RECEIVE FLAG
[SKIP IF XMIT/RECEIVE FLAG AND INT ENABLE=1
CLEAR

CLA

SKP
EHLTLP
ION
NOP
IOF
SPA
CLA
EHLTLP
CLA CLL IAC

K1391
SPI14I

4464
6032

4464
6045
7610
4464
6001
7000
6002
7710

FLAG

[ERROR SPI SKIPPED OR INT ENABLE=1
[CHECK THE PROGRAM NOT TO INTERRUPT

[PROGRAM INTERRUPT WITHOUT
[SET INT ENB F/Fz1

INTERRUPT

[SKIP IF RECEIVE

ENABLE

AND INT ENB=1
/ERROR,SPI FAILED OR RECEIVE/INT ENE NOT: TO A 1

[CHECK THE PROGRAM TO

1037
1040
1041
1042
1043

TCF
TSF
SKP
EHLTLP

KSFSKP
EHLTLP
KRS

1025

1026
1027

[CHECK THE TRANSMIT FLAG To STILL = 1
[SOMETHING CLEARED THE TRANSMIT FLAG
[CLEAR THE TRANSMIT FLAG
1‘
[SKIP IF TRANSMIT FLAG =1

TSF

EHLTLP

TCFG’

INTERRUPT

/ERROR,FAILED TO INTERRUPT WITH INT ENB AND RECEIVE FLAG
[CLEAR AC AND RECEIVE FLAG AND SET READER RUN
[SKIP IF RECEIVE FLAG =1

KCCZI
KSFIOI

/ERROR,KCC FAILED TO CLEAR RECEIVE FLAG
[SKIP IF INT ENB AND RECEIVE FLAG =1

SPIISI

[ERRORISPI SKIPPED WITHOUT RECEIVE FLAG
[CHECK THE PROGRAM NOT TO INTERRUPT

SPA

CLA

0032

lKL8-JA
647
648
649
650
651
652
653
654

KLB-KA/KB/KC/KD LOOP BACK TEST1051
1052
1053

1054
1055

1056

4464
6035
7300
4516
0707
4463

KIE10.

PAL10

660
661
662
663
664
665

666
667
668

669
670
671
672
673
674
675
676
677

678
679
680

681
682
683
684
685
686
687
688
699

690
691
692
693
694
695
696
697
698
699
700
701

ICLEAR

725
726
727
728
729

0033

SEQ

0034

CLL

ILOOP ON

TEST

SR2=1

/THE FOLLOWING TEST CHECKS THAT A TPC COMMAND WILL SET THE
ITRANSMIT FLAG AND THAT A TLS WILL CLEAR THE FLAG AND THEN RESET
IIT. CHECK THAT THE RECEIVE FLAG WILL GET SET FROM A TPC AND TLS
ICOMMAND AND THAT IT CAN BE CLEARED BY A KRB AND KCC OR KCF COMMAND

1057
1060

4462'
1176

1061

3047
4461
6032
6042
6031
7610
4464
6041
7610
4464
6044
7200
4466
4464
6031
7610
4464
6046
7200
7610
4464
6041
7610
4464
4467
4464
6036
7610
4464
6031
7610
4464
4466
4464
6042
6041
7610
4464
4467
4464
4517

1062
1063

1064
1065
1066
1067
1070
1071
1072
1073
1074
1075
1076
1077
1100
1101
1102
1103
1104
1105
1106
1107
1110
1111
1112
1113
1114
1115

1116
1117
1120
1121
1122
1123
1124
1125
1126
1127
1130
1131

1132
1133
1134
1136

XMTREC,

KCC3I
TCF7.
KSF11p

TSF18.

TPC1;

KSF12;

STLPPC
TAD
DCA
DELAY
KCC
TCF
KSF
SKP
EHLTLP
TSF
SKP
EHLTLP
TPC
CLA
TSFSKP
EHLTLP
KSF

TLSOI

7700
5343
6032

6030
6031
7610
4464
4516
1063
4463

/STORE LOOPING PC FOR TEST AND ERROR LOOPING
IDELAY 200MB FOR SCOPE LOOPING TO LET

[-3720
NDELAY

IFLAGS SETTLE
IGO DELAY 200MS

/RECEIVE

/WAIT FOR THE FLAG TO SET
IERROR XMIT FLAG FAILED TO
/CHECK THE RECEIVE FLAG TO
IRECEIVE FLAG SET TO SOON
ILOAD TRANSHIT BUFFER AND

SET

TSF

730
731

1161

732

1162
1163

1164
1165

1166

ICLEAR AC AND RECEIVE
ISAFETY SKIP TO CHECK

CLA

4462
7240
0040
3042
4333

1204
1205
1206
1207

FLAG AND READ RECEIVE
KRB NOT TO SKIP

/SKIP

IERRORkaB FAILED TO CLEAR RECEIVE FLAG
/WAIT FOR TRANSMIT FLAG TO SET FROM 2ND XMIT
/TRANSMIT FLAG FAILED TO SET FROM TLS COMMAND
ICLEAR THE TRANSMIT FLAG
/SKIP IF TRANSMIT FLAG SET
TCF FAILED TO CLEAR FLAG
FOR RECEIVE FLAG TO SET FROM TLS
TO SET FROM
/CHECK TO SEE IF PDP~8E

/ERROP,
/WAIT

/FRRDR,RECEIVE FLAG FAILED

PAL10

V142A

16-SEP-77

CLA
.+6

SMA
JMP

KCC4:
KSFIG:

4'3

ISKIP

SKP
EHLTLP
JMP

KCF41
KSF17:

IPDPRF

/CLEAR THE AC AND RECEIVE FLAG

KCC
KSF

RECEIVE FLAG

CLA

lERROR,

FAILED

KCC

RECEIVE FLAG

CLEAR

.45

KCF
KSF

/CLEAP THE RECEIVE FLAG
ISKIP IF RECEIVE FLAG SET

SKP
EHLTLP

CLA

IERROR.

NERROR
XMTREC+4
LOOP

spTSTl.

ILOOP

FAILED

KCF

FLAG

CLEAR

SR2=1

DCA
LOAD
CLL CML
TAD
RAL
DCA
JHS

WORD

ANR‘THEN

WAIT

FOR

THE

TRANSMIT A ROTATING BIT AND CHECK THAT IT CAME BACK

/STORE LODPING PC FOR TEST LOOPING

STLPPC
XMTDAT

ILOAD TIMING
ISET LINK

FDR

APT

REQUIRED.

XMTDAT
XMTDAT
SLWDAT

IAND SHIFT LEFT ONE
ISET TRANSMIT WORD
/GD TRANSMIT AND RECEIVE

WORD

NERROR
I's
LOOP
J”?

ILDOP

IDATA

TEST

SR2=1

.+1

SDTST2

PAGE
/

SDTSTZI

LOOP

CMA

DATBIT
XMTDAT
SLWDAT

TRANSMIT ALL ones AND CHECK THAT

ISAVE THE woan run TRANSMITTING
IGD TRANSMIT AND RECEIVE ONE WORD

ILODP 0N TEST

STLPPC

DCAI

/MAsk our FOR THE NUMBER OF DATA BITS

IDATA TEST

SDTST3,

isron: LUUPING PC FOR TEST LOOPING

STLPPC

1204

3042

TRANSMIT

RTR

4463

1211

PAGE

9134

COMMAND
2ND

RAR

4516

4462

BUFF

KRR SKIPPED
ON RECEIVE FLAG

CLA

CLA
AND
DCA
JMS
NERROR
n-2

1210

FLAG

IERROR,

EHLTIP
KSFSKP
EHLTLP
LAS

7004

1200
1201
1202
1203

CLEAR

/ERROR.TLS FAILED TO CLEAR TRANSMIT FLAG
/WAIT FOR RECEIVE FLAG TO SET FROM FIRST XMIT
IERRORIREC FLAG FAILED TO SET FROM FIRST XNIT

EHLTLP
TSFSKP
EHLTLP
TCF
TSF
SKP

3042
4777‘
4516
1156
4463
5766
1200

1333
1200

AND

SKIP

CLA

SKP

1042

1177

CLA

KSFSKP
EHLTLP
KRB
SKP
EHLTLP
KSF

IDATA TEST 1
4462
3042
4460
7120

TPC
0

TRANSMIT

/START OF DATA TEST- TRANSMIT
/RECEIVE FLAG TO SET

1152

STILL BE

/SAFETY SKIP TO CHECK TLS NOT
IERPOR: TLS SKIPPED
/SKIP IF TRANSMIT FLAG = 1

EHLTIP

TCFB,
TSFZZ:

KCC COMMAND

ITRANSMIT FLAG STILL A 1 AFTER A TCF COMMAND
ILOAD TRANSMIT BUFFER AND TRANSMIT

EHLTLP

KSF14;

[SKIP

FLAG STILL = 1 AFTER
TRANSNIT FLAG = 1

CLA

SKP

KRBI:

CLA

EHLTIP
TLS
CLA
SFP

TSFZOI

AC AND RECEIVE FLAG
THE TRANSMIT FLAG
THE RECEIVE FLAG TO BE

ICLEAR
/CLEAR
/CHECK

CLA

SKP

7010
7012

6031
7610
4464
5347

1153
1154
1155
1156
1157
1160

733
734
735
736
737
738
739

SEQ

INTERRUPT ENABLE

NERROR_
STFLGS+4
LOOP

721
722
723
724

4'2

KIE
CLA

lKLB-JA & KLB-KA/KB/KC/KD LOOP RACK TEST.
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720

PAGE

9134

16-SEP-77

IINTERRUPTED WITHOUT RECEIVE FLAG SET

655
656
657

658
659

V142A

EHLTLP

XHTDAT

532:1

TRANSMIT

ISTORE LOOPING PC FOR
ISAVE WORD

ONES

TEST

AND

ZEROES

LOOPING

1's coma BACK

lKLB'JA

756
757
758
759

761

762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794

LOOP

BACK

7120
1042

CLL CML

1214

7004
3042
4333
1042
7040
0040
3042
4333
1042
7040
0040
3042
4516
1213
4463

RAL
DCA
JMS
TAD
CMA
AND
DCA
JNS

1220
1221
1222
1223
1224
1225
1226
1227
1230
1231
1232

PAL10

TEST-

1212
1213
1215
1216
1217

760

KLB-KA/KB/KC/KD

V142A

4462

IAND SHIFT LEFT
/SET TRANSMIT NDRD
/co TRANSHIT AND RECEIVE
ICOMPLEMENT DATA HDRD

’XMTDAT
SLWDAT
XMTDAT
DATBIT
XMTDAT
SLWDAT
XMTDAT

ISET TRANSMIT NDRD
/co TRANSMIT AND CHECK

DATBIT
XMTDAT
DCA
NERROR
SDTSTS+3
LOOP

SDTST4,

[LOOP ON

CMA
DCA
DCA
JMS

ISZ
TAD

JMS I
08?
NERROR
I'6
LOOP

vSDTSTS.

DATBIT

/SET

TSTCNT
XMTDAT
SLWDAT
XMTDAT
XMTDAT
[FILCHK

ISAVE

1257
1260
1261
1262
1263
1264
1265

1266
1267
1270
1271
1272

809
810

666

0036

2:1

TRANSMIT AND RECEIVE A BINARY COUNT PATTERN

WORD

TEST

FDR

COUNTER

FROM

LOOPING
THE

DATA BITS

IT
ICLEAR THE TRANSMIT WORD
xco TRANSMIT AND RECEIVE DNE NDRD
IINCREMENT THE TRANSMIT HDRD

xco CHECK FILLER CHAR EoR LF IE SELECTED
IFIL Is SELECTED AND ITS A DE GO GET NEH NDRD

,.3

/NO GO 00 NEXT WORD
ILOOP DN TEST IF 582=1
TEST

TRANSMIT

COMPLEMENTING BINARY COUNT PATTERN

[STORE LOOPING PC FOR TEST LOOPING
ITIMING VALUE FOR APT.
/SET up wc FROM NUMBER OF DATA BITS

STLPPC
LOAD
TAD
CMA
DCA
DCA
JMS
TAD
CMA
AND
DCA
TAD
JMS I
SKP
JMS
TAD
CIA
AND

1254
1255
1256

808

ONE HDRD

LOAD

IDATA

800
801
802
803
804
805
806
807

TEST

LOOPING

ISTORE

STLPPC
TAD

1251
1252
1253

799

0035

AND

1236

797
798

SEQ

XMTDAT

TAD
CMA

1237
1240
1241
1242
1243
1244
1245
1246
1247
1250

795
796

PAGE 4'4

ISET LINK

TAD

IDATA TEST
1233
1234
1235

9134

16-SEP-77

DATBIT
TSTCNT
XMTDAT
SLWDAT

ISAVE IT
ICLEAR THE TRANSMIT HDRD
/GO TRANSMIT AND RECEIVE ONE wORD
ISET THE TRANSMIT HDRD TO ITS COMPLEMENT

XMTDAT
DATBIT
XNTDAT
XMTDAT
[FILCHK

stVE THE

SLWDAT
XMTDAT

NDRD

NEN

ONE WORD
ADD DNE

IGO TRANSMIT AND RECEIVE
/RESET THE HDRD BACK AND

DATBIT

/"\

lKLB-JA
811
812
813
814
815

816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
935
‘836
837
838
839

940
841
842
843
844
845
846

KLB-KA/KB/KC/KD
1273
1274
1275
1276

1277
1300
1301

1302

4462

1303
1304
1305
1306
1307
1310
1311
1312
1313

1055
0040
3042
4333
1056
0040
3042
4333
4516
1303
4463

1314
1315

LOOP

3042
1042
4575
5257
4516
1256
4463

BACK

DCA
TAD
JMS
JMP

SDTST6I

I
.

STLPPC
TAD
AND

K0125
DATBIT
XMTDAT
SLWDAT

NERROR
SDTST6+1
LOOP

SDTST7' STLPPC

1326
1327

LOAD
TAD
DCA
RANDOM
TAD
085 I
JMP
_

1330

847

1331

L00?

848
849
850

1332

JMP

955
856
957
858
859
660

861
862

863
864
865

ILOOP

IDATA

TEST

0000

1334
1335
1336
1337
1340
1341
1342

7326
6035
7200
1042
6046
6031
7410
5350
6041
5341
6042
5341

1343

1344
1345
1346
1347

SLHDAT:

0
CLA

KSEO,

KsE
CLA
TAD
TLS
Ks?
SKP
JMP
TSF
JMP

SLHTLSD
K5F241

TSF32I

TCF14I

CLL

4-5

6R2=1

TRANSMIT

CDMPLEMENTING ONE'S

LOOPING PC FOR TEST

LOOPING

AGAIN
ILOOP ON TEST

[DO

TEST

IF
-

SR2=1

RANDOM

ISTORE LOOPING PC FOR
ITIMING 80R APT

DATA

TEST

TEST LOOPING

81000
TSTCNT
XNTDAT
[FILCHK

ICHECK FOR FILLER CHARACTERS

.-5
SLWDAT

[GO TRANSMIT THE RANDOM NUMBER

SR2=1

[FDATAT

CML

RTL

[SET

TEST ROUTINE

STATUS WORD ENABLE

XMTDAT

IGET WORD TO BE TRANSMITTED
/LOAD AND TRANSMIT AND CLEAR
ISKIP IF THE RECEIVE FLAG=1

SLHREC

IGO GET THE RECEIVE WORD
[SKIP IE TRANSMIT FLAG SET

.-4

TCF
JHP

PAGE

ISAVE IT
IGO TRANSHIT AND CHECK THE NERD
/GET THE COMPLEMENTING WORD
IMASK our FOR NUHEER DE BITS
/sAVE IT
IGO TRANSHIT AND CHECK IT

ISLOW DATA
1333

TEST

ILooP on TEST
I

9:34

IMAsK OUT FOR NUMBER or BITS

IDATA

1316
1317
1320
1321
1322
1323
1324
1325

16-SEP-77

ISTORE THE
K0252
DATBIT
XMTDAT
SLWDAT

DCA
JMS
TAD
AND
DCA
JMS

V142A

XMTDAT
XMTDAT
IFILCHK
SDTST5+6

NERROR
SDTSTS+5
LOOP

JMS
NERROR
0-6

851
852
853
854

PAL10

TEST-

SLWTLS+1

/CLEAR THE_TRANSMIT FLAG
IGO WAIT FOR THE RECEIVE FLAG

AND CHECK

AND

zERDEs

PATTERN

IKLG-JA 6 KLB'KA/KB/KC/KD LOOP BACK TEST.
866
867
868
869
870
871

1350
1351
1352
1353
1354
1355
1356
1357
1360
1361
1362
1363
1364
1365
1366
1367
1370
1371
1372
1373
1374
1375
1376

872
873
874
875
876
877
978

879
880
881
882
883
884
885
886
887

888
889
890

891
892
893
1400
1401
1402
1403
1404

897
898
899

900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918

1405
1406

1407

141d
1411
1412
1413

1414
1415
1416
1417
1420
1421
1422
1423
1424
1425
1426
1427
1430
1431

919
920

921

922
923
924
925
926

927
929
929
930

931
932
933
934
935
936
937
938
939

940
941
942
943
944

945
946
947
948
949
950
951
952
953

954

955
956
957
959
959
960
961
962
963
964
965
966
967
968
969
970

971
972
973
974
975

SLWREC,
KRB111

.1042
7650

5372
4512
5372
4517
7700

5372
1042
7402

TAD

V142A

PAL10

CHA

1045
7402
4517
7004
7710
5337
5733

SLOLAS,

1400

PAGE

TAD
HALT
LAS
RAL
SPA
JMP
JMP

4462
4460
1176
3047
1054
3052
3044
4461
6036
7200
6042
4506
1042
4575
5211
1042
6046
6041
5221
5230
6046
6031

FDATATI

KRBZ,

TCF9;

RECDAT
RECDAT

TLSlOv
KSFIR,

5225

5236
4771

XMTDAT
CLA
SLOLAS

1432
1433

1434
1435
1436
1437
1440
1441
1442
1443
1444
1445
1446
1447
1450
1451
1452
1453
1454
1455

1456
1457
1460
1461
1462
1463
1464
1465
1466
1467
1470
1471
1472
1473

4575
5226
1043
S224

WORD

CLA
SLWTLS-i
SLWDAT

M1000

DCA
DCA
DELAY
KRB

TSTCNT
ERRFLG

(FILCHK
0'5

ERROR

ILOOP?
/YES.GO TRANSMIT AND RECEIVE
/FETURN FOR THE NEXT WORD

TEST

SAME WORD

TRANSMIT-TRANSMITURECEIVE-TRANSHITvRECEIVEuETC

ISTORE LOOPING PC
ITIMING FOR APT-8

FOR TEST LOOPING

/SETUP

200 MS

ISETUP
ICLEAR
lOELAY
IISSUE

DELAY OF

TEST LOOP
THE PROGRAM

LOOPING

FLAG

ERROR

200MS
KRB TO CLEAR

SCOPE

FOR

1000 WORDS

ANY

RECEIVE FLAG SET
SET

/CHECK TO SEE IF FILL CHAR OPTION SELECTED
/GO GET NEW WOPDIIT WAS A LF AND FILL WAS SELECTED
/GET THE WORD TO TRANSMIT
ITRANSMIT THE WORD
/WAIT FOR THE FLAG

3'1
.+5

IGO

TRANSNIT

IWAIT

ANOTHER CHARACTER.

READER FLAG

0.1
RECEVE
IGO

GENERATE

ANOTHER

WORD

(XNTDT1)

XNTDT1

TEST.
I

CFILCHK
I's
XMTDTi
TLS10
CMA

3045

KRB
DCA

RECDAT

1045

TAD

RECDAT

7041
1042

CIA

7650
5265
4512
5263
4517
7700

SNA

TAD
JMP

UPDATE-2
XMTDAT

RECDAT

HALT
CLA
TAD

9134

16-SEP-77

ICHECK TO SEE IF FILL=1
IYES IT WAS,GO GENERATE
/GET THE WORD AND PRINT

PAGE

4-7

AND THAT IT WAS A
A NEW WORD
IT

THE BUFFER AND CLEAR THE FLAGS
THE WORD
/GET THE WORD AND COMPARE IT TO THE WORD
ITRANSMITTED
/READ
ISAVE

IARE

THEY

EQUAL?

lYES,GU CHECK LOOP SWITCH
IACTIVE

TO APT?
CONSOLE

/HALT ON ERROR’CONDITION
INO, CHECK FOR LOOP ON ERROR
/GET THE FIRST WORD TRANSMITTED
/AC=THE 1$T WORD TRANSMITTED
/

IAC=WORD

RECEIVED

XMTDT1

HALT
CLA
DCA
LAS

V142A

/REPORT

UPDATE-2

HALT
CLA
TAD

PAL10

XMTDAT
CLA
UPDATE

AERROR
JMP
LAS
SMA CLA
JNP
TAD

UPDATE,

RECEIVED

ICLEAR THE TRANSMIT FLAG IF
IGENERATE A RANDOM NUMBER

XMTDAT

TAD
0MP

KRB3:

TRANSMITTED

XMTDAT

TAD
TLS
TSF
JMP
JMP
TLS
KSF
J“?
JR?

6036

AC-WORD

[H3720

CLA
TCF
RANDOM

RECEVE; CLA

IAC=BAD DATA WORD-WORD
ICHECK SR1 FOR LOOP 0N
IPUT BIT 1 IN ACO

NDELAY

7240

IAC=2ND WORD TRANSMITTED IF PROGRAM GOT THAT FAR
CMA
ERRFLG

ISET ERROR
/IS SR1=1

FLAG FUR

SCOPE LOOPING

RAL

SPA
JMP
TAD

DCA
NERROR
0+2

0“?

END,
KRB4:

TCFIOI

ERRLOP:
KRBS:
TCF11,

TLSI:
TSF24I

TAD
SZA
JMP
JMP
KSFSKP
EHLTLP
KRB
TCF
LOOP
JMP I

CLA
XMTDT!
XMTDAT

ILOOP ON DATA PATTERN
[PUT SECOND WORD IN FIRST WORD FOR COMPARISON
/OF NEXT READ

END
ERRFLG

/END OF TEST
/CHECK THE ERRROR FLAG FOR RETURN

ERRLOP

POINTER

CLA

FDATAT+6
XHIT+1

IERROR GO START TEST OVER
IGO

TRANSMIT

CHARACTER

AND

WAIT

ILAST FLAG FAILED TO SET
[CLEAR THE FLAG
ICLEAR THE TRANSMIT FLAG
ILOOP ON TEST IF SR1=1
'

[CHARLG

DELAY

IDELA! 200MS TO ALLOW FLAGS TO SETTLE

KRB

/CLEAR RECEIVE FLAG IF SET
/CLEAR TRANSMIT FLAG IF SET

TCF
CLA
TAD
TLS

TSF

0038

/NO,

[GOOD DATA

TAD

JMS
JMP

SEQ

IHALT ON ERROR SWITCH SET?
CD TEST FOR LOOP CONDITION

SLOLAS
XMTDAT

LOAD
TAD
DCA

BACK

0037

RECDAT

TAD

KLB-KA/KB/KC/KD LOOP

SEQ

IGO GET THE NEXT WORD
ITEST FOP APT ERROR CONDITION
IACTIVE CONSOLE

SLOLAS

RANDM1

1043

4-6

/SAVE THE WORD RECEIVED
ICOMPARE THE WORD WITH THE WORD TRANSMITTED

STLPPC

TAD
JMS
JNP

XMIT,
T5F23I

PAGE

'IREAD RECEIVE BUFFER AND CLEAR RECEIVE FLAG

HALT
~CLA

7200

9134

16-SEP-77

/FASTER DATA

894
R95
896

IKLB-JA

7240
6036
3045
1045
7041

CLA
KRB
DCA
TAD
CIA
TAD
SNA
JMP
AERROR
JMP
LAS
SMA CLA
UMP

XMTDAT

/GET THE FIRST WORD TO TRANSMIT
ILOAD AND TRANSMIT IT

FOR

RECEIVE

IKLE-JA & KLG-KA/KB/KC/KD LOOP BACK TEST976
977

1517
1520
1521
1522
1523
1524
1525

978
979
980

981
982
983
984

1526

1527
1530
1531
1532
1533
1534

985
986
987
988
989

990
991
992
993
994
995
996
997
998

1535
1536
1537
1540

999
1000

1001
1002
1003

1004
1005
1006
1007
1008
1009
1010
1011
1012

1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025

5316

0MP

7200
1043
6046
6031
5323
7240
6036
3045
1045
7041
1042
7640
5364
6041

CLA
TL52I
FDTLOP,

TAD
Tbs
0MP

KRB
DCA
V

TSF25;

TAD
CIA
TAD
52A
0MP
TSF
UMP
TAD
TLS
KSF
0MP
CLA
KRB
OCR
TAD
CIA
TAD
SZA
UMP
T5?
0”?
TAD
TLS
LAS
RAL
SPA
JMP
UMP

.1541

5335
1042
6046
6031

1542
1543
1544
1545
1546
1547
1550
1551
1552
1553
1554
1555
1556
1557
1560
1561
1562
1563

S341
7240
6036
3045
1045
7041
1043
7640
5364
6041
5353
1043
6046
4517
7004
7710
5323
5206

1564
1565
1566

XSR1LPI

1570

4517
7004
7710
5310
5271

1571

4771
4123

RANDM1=JMS I
XRAND1

1600

PAGE

1567

TLS3I
KSF19p

KRB7,

TSFZGI

TLS4,

LAS
RAL
SPA
0MP
JMP

V142A

9134

16-SEP'77

PAGE

4-8
520

0039

SEQ

0040

INAIT FOR THE FIRST TRANSHIT FLAG

XMTDTi

/GET THE SECOND WORD TO
ILOAD AND TRANSMIT IT

TRANSMIT

/WAIT FOR THE FIRST RECEIVE FLAG

KSF
CLA

K386:

PAL10

1'1

I'1
CMA

/READ THE FIRST WORD
/SAVE THE FIRST WORD RECEIVED
ICOMPARE IT TO THE FIRST WORD TRANSMITTED

RECDAT
RECDAT

XMTDAT
CLA
XSR1LP

‘IERROR

CHECK

SR1

/WAIT FOR 2ND TRANSMIT FLAG
IGET THE FIRST WORD AGAIN
ILOAD AND TRANSMIT IT

0'1
XMTDAT

/WAIT FOR

0'1
CMA

SECOND RECEIVE FLAG

IREAD THE SECOND WORD
/IS IT EQUAL TO SECOND TRANSMIT

RECDAT
RECDAT

XMTDT1
CLA
XSR1LP

/Eaaoa,co CHECK.SR1=1
/WAIT FOR THE TRANSMIT FLAG
IGET 2ND WORD AND TRANSMIT IT
ILOAD AND TRANSMIT
ICHECK SR1=1 TO LOOP ON TRANSMIT RECEIVE

1'1

XMTDT1

CLA

FDTLOP
FDATAT+6

CLA

ERRLOP
UPDATE+4

/
/

1026

ITHE FOLLOWING TEST CHECKS THAT THE NUMBER OF DATA BITS WERE
/SETUP CORRECTLY.
TRANSMIT 377 AND TAKE THE 1's COMPLEMENT
/OF THE DATA BIT MASK WORD AND CHECK THAT THE AC CAME BACK
/AS ZEROES.

1927
1028
1029
1030

IKLH'JA
1031
1032
1033
1034
1035
1036

1037
1038

1039

1040
1041
1042
1043
1044
1045
1046
1047'
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061

KL8~KAIKBIKC/KD LOOP BACK TEST.
1600

4462

1601
1602
1603
1604
1605
1606
1607

4460
1040
7040
3042
1034
6046
4466
4464
6042
4467
4464
7240
6036
3045
1045
0042
7450
5242
3043

1610
1611
1612

1613
1614
1615
1616
1617
1620
1621
1622
1623
1624

1625
1626
1627
1630
1631
1632
1633
1634
1635
1535

CHARLG,

TLss.

TCF12:

1040
7402
4517

DATBIT
XMTDAT

KRBB,

SNA
JMP
DCA

HALT

PAGE 4'9
LOOPING

CNA

/READ

THE

WORD

ITEST

FOR LOOP
THE BITS

AND

SAVE

RECDAT
RECDAT
XMTDAT

FILERT-3
XMTDT1

RALT
CLA

CHRLAS, LAS

9:34

16-SEP-77

/STORE THE LOOPING PC FOR ERPUR AND TEST
ITIMING FOR APT.
ISETUP 1’5 COMPLEMENT OF SELECTED DATA
IBIT CHARACTER LENGTH
/SAVE IT FOR COMPARISON

ITRANSMIT 8 BITS OF ONES
/WAIT FOR THE TRANSMIT FLAG TO SET
ITRANSMIT FLAG FAILED TO SET
ICLEAR THE FLAG
IWAIT FOR THE RECEIVE FLAG TO SET
IERRORIRECEIVE FLAG FAILED TO SET

AERROR‘
JMP
CHRLAS
LAs
SHA CLA
JMP
CHRLAS
TAD
XMTDT1

TAD

V142A

K377

KstKP
EHLTLP
CLA
KRB
DCA
TAD
AND

4512
5236

4517
7700
5236
1043
7402
7200

serpc
LOAD
TAD
CMA
DCA
TAD
TLS
TSFSKP
EHLTLP
TCF

PAL10

/SAVE

ON TEST
THAT WEREN'T

SUPPOSED

IHALT

SELECTED

ERROR

IND, TEST FOR LOOP ON

TEST

CONDITON

/AC=BITS THAT WEREN'T SUPPOSED
DATBIT

ICONSOLE ACTIVE

/
/AC=DATA BITS THAT OPERATOR
ITHAT WERE SELECTED

HAD

SELECTED

TOLD THE PROGRAM

PAL10

IKLB-JA G KLS-KA/KB/KC/KD LOOP BACK TEST.

V142A

9134

16-SEP-77

PAGE 5

SEQ

0041

SEQ

0042

1062
1063
1064
1065
1066

1067

1637
1640
1641
1642
1643
1644

7004

RAL

7710
5204
4516
1604
A463

CLA
SPA
JMP
CHARLG+4
NERROR
CHARLG+4
LOOP

1068
1069
1070
1071
1072
1073
1074

ILOOP

ERROR
TEST IF SR2=1

IFILLER CHARACTER TEST-DO THIS TEST IF OPERATOR HAS SELECTED
ITHE FILLER CHARACTER OPTION.
THE PROGRAM TRANSMITS A LINE
THE DATA RECEIVED
[FEED AND CHECKS THAT 5 RECEIVE FLAGS COME BACK.
/SHOULD BE 1 NORD OF LINE FEED AND 4 WORDS OF FILLER CHARACTERS.
/THE PROGRAM ALSO CHECKS THAT THE TRANSHIT FLAG DOES NOT GET SET
IUNTIL ALL THE RECEIVE FLAGS ARE 1”.

1075
1076
1077
1078

1079
1080
1081
1082

1083.
1084
1085
1086
1087
1088
1089
1090

1091
1092

1093
1094
1095
1096
1097
1098
1099
1100

1101
1102
1103
1104
1105

1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116

IKLS-JA &
1117
1118
1119
1120

1121
1122
1123

1124
1125
1126

1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138

1139
1140
1141
1142
1143
1144
1145

1146
1147
1148

1149
1150

1151
1152

1153
1154
1155
1156

1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1169

1645

1036

1646
1647
1650
1651
1652
1653
1654
1655
1656
1657
1660
1661
1662
1663
1664
1665
1666
1667
1670
1671
1672
1673
1674
16751676
1677
1700
1701
1702
1703
1704
1705
1706
1707
1710

7006

1711
1712
1713
1714
1715

7700
5777'
4462
3047
4461
6036
7200
6042
1376
3043
1057
0040
3042
1042
6046

7200
1172
3051
3050
6041
7610
4464
6031
7610

TAD

KRB9'

RTL
SMA
JMP
STLPPC
DCA
DELAY
KRB

SAVBTS

/CHECK

CLA

/WAS

STENAB

/NO,GO

1747
1750
1751
1752
1753
1754

1755
1756
1757
1760
1761

1762
1763
1764
1765
1766
1767
1770
1771
1772

/STORE
ISETUP
/DELAY
ICLEAR

NDELAY

TLS6,

‘FILLOP:
TSF28,

KSF211

/CLEAP

TCF
TAD
DCA
TAD
AND
DCA
TAD
TLS
CLA
TAD
DCA
DCA

(-4
XMTDTl
K212
DATBIT
XNTDAT
XMTDAT

ISETUP
ISAVE

TSF
SKP
EHLTLP
KSF
SKP
JMP

152
JMP
182
LIMP

TAD
TAD

KRBIOI

SZA
DCA
KPH
DCA

WAIT

[SKIP

TRANSMIT

ISKIP

AND

CHECK XMIT

FLAG=1

RECEIVE

FLAG

GET

RECEIVE

FLAGS

FIRST

SET

lERPDRIRECEIVE FLAG NOT SET UP
ISETUP TO COMPARE FOR EITHER A
/WAS IT THE FIRST CHARACTER

CLA
XMTDAT

/NO,THEN CLEAR COMPARE WORD FOR FILLER CHAR

CIA
TAD

XMTDAT

WORD AND CLEAR

THE
IT

/READ

TAD

RECDAT
RECDAT

ISAVE

THE

MISSING
L.F. 0R

SOME
FILLER

FLAG

ICOMPARE THE WORD RECEIVED WITH WORD EXPECTED

PAL10

V142A

JMP
TAD
HALT

7200
1045

CLA
TAD

7402

HALT

4517

LAS
RAL
SPA
0MP
JMP

CLA
FILERT+4
FILEXT

/EXIT

ISZ

XMTDTI

lBUMP

JMP
TAD
DCA
DCA

FILLOP
[-100
CNT2
CNTl

/GO

PAGE

9134

16-SEP-77

5-1

CLA
CNTREC

leRD CUMPARESIGO BUMP RECEIVE COUNTER

CNTREC+5

IACTIVE CONSOLE

CNTREC-S
XMTDAT

INO, CHECK FOR LOOP ON ERROR
_/PRESS ”CONTINUE" FOR EXPECTED CHARACTER

LAS
SMA

CNTREC,

KSF22I

lHALT

CLA

2050
5344
2051
5344

KCCS,

KSF23a

CLA
.06

152
JMP
ISZ

CNTI
.-7
CNTZ

JHP
EHLTLP

.‘11

5362
2051
5362
4464

152
JMP
EHLTLP
JMP

5773'

ILOOP

KCC

212

000

THE ERROR
THE TEST
THE RECEIVE COUNTER
GET THE NEXT RECEIVE FLAG

THAT THE RECEIVE FLAG DOESN’T GET SET BEFORE XMIT

SET

AFTER 5

[-100
CNTZ
CLA
.+6

CNT1
[-4
CNT2
.‘6

/LAST RECEIVE FLAG FAILED TO
KCC6

PAGE
/

KCCG:

0000=FIL CHAR-

ITRANSMIT FLAG FAILED
ICLEAR THE FLAG

KCC

SKP
JMP
152
JMP

2050

X42=LF 0R

WORD

ILAST RECEIVE FLAG SHOULDN'T GET SET UNTIL SOME
ITIME AFTER THE TRANSMIT FLAG
/WAIT FOR THE TRANSMIT FLAG TO GET SET

SKP
OH?

DCA
KSF

EXPECTED

RECEIVED
/GET
/AC=WORD RECEIVED SHOULD HE
ICHECK SR1 TO LOOP ON ERROR

ICHECK

TSF

TAD

THE

ERROR?

CLA

EHLTLP

TSF29I

IAC=WORD
RECDAT

KSF
SKP

5357

6032

RECEIVE FLAG

XMTDT1
(4

5332
1042
7402

2000

THE

.+6
CNT1
.-7
CNT2
0'11.

AERROR
JMP

2000
2003
0004
7774
2005
2000

FOR

WORD

CLA

4512
5344
4517
7700

1773
1774
1775
1776
1777

FLAG IF SET
RECEIVE FOUR FLAGS

IERROR,TRANSMIT FLAG SET-SHOULD

SNA
JMP

4464
6032
1172
3051
6031
7610
5372

FILLER CHARACTERS SELECTED

THE TRANSMIT
A COUNTER TO
IT

ILOOP

7650
5337

6041
7610

CLA

EHLTLP

7041
1042

7004
7710
5251
5774'
2043
5267
1172
3051
3050
6031
7610
4464

SEE

SELECTED BY THE OPERATOR
CHECK FOR STATUS ENABLE
THE LOOPING PC
PROGRAM DELAY 0F 409MS.
TO ALLOW FLAGS TO_SETTLE
THE RECEIVE FLAG IF SET

IGET LINE FEED
INASK OUT TO WORD LENGTH
/SAVE IT FOR COMPARISON OF FIRST
/GET~THE LINE FEED CHARACTER
ILOAD AND TRANSNIT IT

['100
CNT2
CNT!

KLB-KA/KB/KC/KD LOOP BACK TEST.
1716
1717
1720
1721
1722
1723
1724
1725
1726
1727
1730
1731
1732
1733
1734
1735
1736
1737
1740
1741
1742
1743
1744
1745
1746

CLA

TCF13I

5305

2050
5272
2051
5272
4464
1043
1375
7640
3042
6036
3045
1045

1169

1170

FILERTI

/CLEAR

THE

RECEIVE FLAG

SET

RECEIVE FLAGS

IKLB-JA

1171
1172
1173

2001
2002
2003
2004

1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194

'W‘\.

'4516
1657
4463
5205

FILEXT,

PAL10

NERRDR
FILLOP-IO.
LOOP
JMP

9134

16-SEP-77

V142A

PAGE

5-2
SEQ

0043

/GO TRANSHIT ANOTHER FILLER CHARACTER
ILOOP ON TEST IF SR2=1

STENAB

/THE FOLLOWING TEST WILL BE EXECUTED ONLY IF THE OPERATER HAS SET
/THE STATUS ENABLE BIT TO A ONE WHEN HE INITIALIZED THE PROGRAM.
/THIS TEST HILL CHECK THAT THE ERROR BIT AND THE OVERRUN BIT CAN
/BE SET AND CLEARED IN THE STATUS REGISTER.THE TEST WILL ALSO
[CHECK THAT STATUS ENABLE F/F CAN BE SET AND CLEARED. THE RECEIVE
[BUFFER WILL ALSO BE CHECKED TO CONTAIN THE CORRECT WORD. THREE
[WORDS WILL BE TRANSMITTED AND THEN THE STATUS AND THE RECEIVE BUFFER
IWILL BE CHECKED.
2005

2006
2007
2010
2011

2012
2013
2014
2015

1195
1196
1197
1198
1199

KLB-KA/KB/KC/KD LOOP BACK TEST.

2016
2017
2020
2021

2022
2023
2024
2025
2026
2027

1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216

2030

2031
2032
2033
2034
2035

2036
2037
2040
2041
2042

2°43

1217

2044
2045
2046
2047
2050
2051
2052
2053
2054

1218

1219
1220
1221
1222
1223
1224
1225

1036
7004
7700
5333
4462

STENAB'

6042
7346
3043
7001
3042
7326
6035
7200
1042
6046
7200
4466
4464
2042
2043

SMA

JMP
STLPPC
DCA
DELAY

KRBlZI
TCF15I

TLS9I

TLS
CLA
TSFSKP
EHLTLP
Isz
Isz
JMP
TCF
Ks?
EHLTLP
KRS
DCA
TAD
DCA
JMS
KSE
KRS
DCA
CLA CLL
DCA
ans
CLA CLL
KsE

TAD

TCF161
KSF251

6034
3045

KRS2.

1377
3042
4301
KSEZI
KRS3I

4301
7326
6035

SELECTED BY THE OPERATOR
/NO,GO CHECK END OF PROGRAM HALT
/STORE THE LOOPING PC FOR TEST AND SCOPE LOOPING
[SETUP A DELAY OF 409MS
IDELAY TO ALLOW FLAGS TO SETTLE FOR SCOPE LOOPING
ICLEAR THE RECEIVE FLAG IF SET
[CLEAR THE TRANSMIT FLAG IF SET
ISETUP A COUNT OF 3 TO TRANSMIT 3 TIMES
ISAVE IT

KSE3:

/WAS

NDELAY

TCF
CLA CLL CMA RTL
DCA
XMTDT1
IAC
DCA
XMTDAT
CLA CLL CML RTL

KsE
CLA

5225

6035

/CHECK

KRB

KSE1,

6042
6031
4464

6034
3045
7326
3042

TO SEE

SAVBTS
CLA
SR4HLT

STATUS ENABLE WAS SELECTED

RAL

3047
4461
6036

TAD

THE FIRST WORD TO BE TRANSMITTED=1
/SET AC BIT 10 TO A 1
/AND TRY TO SET STATUS ENABLE TO A 1

/SET

XMTDAT

/GET THE WORD

(112

ITRANSMIT IT
/WAIT FOR

THE

TRANSMIT

FLAG

IERRORITRANSMIT FLAG FAILED TO SET
XMTDAT

[BUMP THE WORD TO A 2 THEN 3
[TRANSMITTED 3 WORDS YET
/NO,GO TRANSMIT NEXT WORD
ICLEAR THE TRANSMIT FLAG
ISKIP ON THE RECEIVE FLAG
’ERRORIPECEIVE FLAG FAILED TO SET AFTER 3 XMITS.
/DO A STATIC READ OF STATUS AND RECEIVE BUFFER
/AND SAVE IT
IGET EXPECTED WORDtERROR-OVERRUNHDATA OF 2)
/AND SAVE IT FOR COMPARISON
/GO CHECK THE WORDS FOR ERRORS
/CLEAR STATUS ENABLE AND CHECK BUFFER FOR A 2
/DO A STATIC READ OF THE RECEIVE BUFFER
/SAVE THE WORD
ISETUP FOR WORD EXPECTED
ISAVE IT FOR COMPARISON
/GO CHECK FOR ERRORS
/SET AC BIT 10 TO A 1
IRESET STATUS ENABLE

XMTDT1

.-7

RECDAT

(4402
XMTDAT

STERR

RECDAT
CML RTL
XMTDAT
STERR
CML RTL

IKLBIJA

KLB-KA/KB/KC/KD LOOP BACK TEST.

PAL10

V142A

16-SEP-77

9134

PAGE

5'3
SEQ

1226
1227
1228
1229

2055
2056
2057

1230
1231
1232
1233
1234
1235
1235

2061
2062
2063
2064
2065
2066

1237
1238
1239
1240
1241
1242
1243

2070

6036

2071
2072
2073
2074
2075
2076
2077
2100

3045
1376
3042
4301
4516

1244

1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256

1257
1258
1259
1260

1261
1262
1263
1264
1265
1266
1267
1268
1269
1270

1271
1272
1273

2060

2057

2101
2102
2103
2104
2105
2106
2107

2110
2111
2112
2113
2114
2115
2116
2117
2120
2121
2122

2123
2124
2125
2126
2127
2130
2131
2132

1274
1275
1276
1277
1278

2133
2134

1279
1280

2135
2136

7200
1377
3042
6036

3045
4301
6031

K9313:

RECDAT
STERR

Ks?
SKP

4467
4464

KRB14I

STERR!

1045

TAD

CIA
TAD

IGO

RECDAT

XMTDAT
CLA
JMP
I
STERR
CLL CLA CMA
TAD
STERR
AERROR
JHP
STLAS
LAS
SMA CLA
JMP
STLAS
TAD
10
HALT
CLA
TAD
XMTDAT
HALT
CLA
TAD
RECDAT
SNA

4512
5326
4517
7700
5326
1010

HALT
STLAS,

LAS
RAL
SPA
0MP

JMP

FLAG SHOULD NOT BE SET YET
WAIT FOR THE LAST TRANSMITTEO CHARACTER
/THE THIRD TRANSMIT DID NOT SET RECEIVE FLAG
/READ THE CHARACTER
ISAVE IT FOR COMPARISON

[ERRORyRECEIVE

7041
1042
7650
5701
7340
1301

IRESET EXPECTED DATA T0(ERR0R-OVERRUN-DATA OF 2)
/DO A DYNAMIC READ 0F STATUS AND RECEIVE BUFFER
/SAVE THE WORD READ FOR COMPARISON
IGO CHECK FOR ERROR CONDITIONS
ICHECK THAT RECEIVE FLAG = 0

CLA

EHLTLP
KSFSKP
EHLTLP
KRB
DCA

TAD
(3
DCA
XMTDAT
ans
STERR
NERROR
STENAB+5
LOOP
JHP
SR4RLT

2012
4463
5333

7402
7200
1042
7402
7200
1045
7402
4517
7004
7710
5211
5701

(4402
XMTDAT

JMS

KSFZGJ

7610
4464

0000

CLA
TAD
DCA
KRB
DCA

CLA
STENAB+4
STERR

ISETUP FOR WORD EXPECTED
[GO CHECK FOR ERRORS
INO GO DO TEST AGAIN
ILOOP ON TEST IF SR2=1
IGO CHECK END OF PROFRAM

HALT

ICHECK TO SEE IF ERROR EXIST IN STATUS REGISTER AND RECEIVE BUFFER
[GET THE WORD RECEIVED AND COMPARE IT WITH
/THE WORD
EXPECTED
/
/ARE THEY EQUAL?
lYES.CONTINUE TESTING

/AC='1
/ESATBLISH ERROR PC
IACTIVE CONSOLE SELECTED
IHALT

ERROR

/NO, GO TEST FOR LOOP ON ERROR
/GET BACK ERROR PC
/AC:PC WERE ERROR WAS

DETECTED

/GET THE WORD EXPECTED
/AC=WORD EXPECTED
/GET THE WORD RECEIVED
/AC=WORD RECEIVED
/LOOP 0N ERROR?

IYES GO LOOP
/NO,GO GET NEXT ERROR

IHALT AT END OF PROGRAM IF SWITCH REGISTER 4 EQUALS A ONE
1022

7710
5351
4515

SR4HLT,

TAD
22
SPA CLA
0MP
BAUDST

CHEK22

IRUNNING 0N APT?
/YES

0044

IKLB-JA & KLB-KA/KB/KC/KD LOOP BACK TEST.
1281
1282
1283
1294
1285
1286

1287
1288
1289

1290
1291
1292
1293
1294
1295
1296
1297

1298

2137
4775'
7000
2140
2141
4517
2142
10374
2143
7650
2144' 5351
2145
4515
4773'
2146
2147
4520
2150
5772'
2151
2152
2153
2154
2155

2156
2157
2160
2161
2162

1022
7004
7710
4771'
1524
3121
7240
1124
3011
5772’

PAL10

71421

1a~sspa77

XCBPAS

IPRINT

(200
CLA
BAUDST

ISET

END

BUAD

9:34

PASS

PAGE

5-4
SEQ

0045

SEQ

0046

ON CONSOLE

TABLE.

CHEK 22

BAUDST,

OMS
HLT
0MP

CLRBRD

TAD

XCSPSW
/END OF THE PROGRAM SR4=1
[PRESS CONTINUE TO GO ON

RAL
SPA CLA
JMS

TAD
DCA
STA
TAD
DCA
JMP

ISPECIAL TESTING BEING DONE
/YES UPDATE DEVICE NUMBER

NEWDEV
TEMP
CLKCNT

IGET FIRST CLOCK COUNT.

TEMP
A11
CLRBRD

xsew

AUTO

FOR

INDEx;

Iaxrr AND CONTINUE PROGRAM

/
IROUTINE TO LOAD VALUE FOR

APT

TIMING.

2163
2164
2165
2166
2167
2170

0000
1411
7450
5763
3122
S763

2171
2172
2173
2174

4000
0271
6703
0200
7241
0003
4402
2200

2175
2176
2177

XLOAD:

TAD
SNA
JNP
DCA
JMP

/GET TIMING VALUE.
ITEST FOR A ZERO.
USE SAME VALUE,
[SETUP NEW VALUE.

A11
XLOAD
COUNT
XLOAD

ITHERE IS ONE,
IEXIT.

PAGE

/INHIBIT ERROR HALT IF SRO=1

1334

2200
2201
2202
2203
2204
2205
2206
2207
2210
2211
2212
2213
2214

0000
7240
1200

HLTLOPI

4512
7410
4517
7700

5212
1010

7402
4517
7004
7710

CMA
HLTLOP

SMA
JHP
TAD
HALT
LAS
RAL
SPA

CLA

2215
2216

5446
5600

1342

2217
2220
2221
2222
2223

1343
1344
1345
1346

2224
2225
2226
2227

0000
3240
7240
1217
4512
5232

1347
134a

2230
2231
2232
2233
2234
2235
2236
2237

1349
1350
1351
1352

1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366

JMP
JMP

HLTLP1;

I
I

/GET BACK ERROR PC
/AC=FAILING PC WHERE ERROR
ILOOP ON THE ERROR?

PAL10

V142A

THE

ERROR

WAS

WAS DETECTED

DETECTED

ACNSKP TEST
NON LOOPING

SAVE AC
PURPOSES

FOR FALSE

/SAVE

TAD

HLTLP1

/GET THE FAILING PC WHERE ERROR WAS DETECTED
IREPORT ERROR TO APT-8 SYSTEM
/ACTIVE CONSOLE
/HALT ON ERROR?

SMA
JMP
TAD
HALT
LAS
RAL
SPA
0MP
TAD
0MP

n+6

THE

FOR

.+3
10

/GET BACK ERROR PC
/AC=EAILING PC WHERE
/LOOP ON THE ERROR?

ERROR WAS DETECTED

CLA
DOOPPC
SAVAC

/YES.LO0P

HLTLPi

IRETURN

SAVAC

ITHIS ROUTINE USED ONLY WHEN IOT EFFECTS CONTENTS 0? AC
ISAVE THE AC EUR ERROR INDICATION
/GET THE FAILING PC WHERE ERROR WAS DETECTED

THE

ERROR

/NO,RESET THE AC AND CONTINUE
AND CHECK

THE

EFFECT OF THE

101

0
0

HLTLP2
n+6
CLA
n+3
10

/
/REPORT ERROR TO
IACTIVE CONSOLE
IHALT ON ERROR?

APT.

/GET BACK ERROR PC
/AC=FAILING PC WHERE ERROR WAS DETECTED
[PRESS "CONT" TO GET CONTENTS OF AC AFTER EXECUTION
IAND COMPARISON OF THE IOT AND AC

SAVAC

IAC=BITS THAT WERE EFFECTED AFTER EXECUTION OF
[LOOP ON

5641

SKIPPING

CLA

DCA
CLA
TAD
AERR OR
JHP
LAS
SMA

1376

SR1=1

PAGE 5-5

9134

16°SEP-77

IROUTINE USED

1367
1368
1369
1370
1371
1372
1373,
1374
1375
1377
137a

WHERE

SAVAC
CRA

LAS

HLTLPZ,

LOOPPC
HLTLOP

7700
5232
1010
7402
4517
7004
7710

2242

ERROR

DCA
CLA

4517

2241

CLA

AERR OR

SAVAC:

LOOP

.+3

JMP

2240

/GET THE FAILING PC
IAPT ERROR HANDLER.
IACTIVE CONSOLE
IHALT ON ERROR?

IKLS-JA & KL8°KAIKBIKCIKD LOOP RACK TEST1335
1336
1337
1338
1339
1340
1341

AND

CLA
TAD
AERR OR
SKP
LAS

CLA
LOOPPC
HLTLP2

THE

ERROR?

/!ES,GO LOOP ON THE ERROR
IRETURN

AND

CONTINUE

THE

TEST

IOT

leSudA & KLB-KA/KE/KC/KD LOOP BACK TEST.

PALIO

V142A

PAGE

9'34

l6uSEPfl77

SEO 0047

1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396

IBAUD RATE TIMING TEST-LOAD AND START 202 AND WATCH
YOUR HATCH
IFOR 30 SECONDS. THE PROCESSOR SHOULD HALT IN 30 SECONDSIIF IT
[DOESN'T CHECK THE EAUD RATE WITH A SCOPE 0R CHECK THE BAUD RATE
ISNITCHES

2264
2265
2266
2267
2270
2271
2272
2273
2274
2275
2276
2277

1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433

2300
2301

2302
2303
2304
2305
2306
2307
2310
2311
2312
2313
2314
2315
2316
2317
2320
2321
2322
2323

2324
2325
2326
2327
2330
2331
2332
2333

1377
3001
1376
3002
1041
1375
3333
1037
7104
1733
3333
4462
1333
3052
1452
3050
2052
1452
3051
6046
6041
5310
5315
6036
7610
6046
6001
6031
7610
5313
6041
5317
2050
5315
2051
5315
4520
4463
5330

8AUD18.

TAD
002
TAD
00A
TAD
TAD
DCA
TAD
CLL
I
TAD
DCA
570220
TAD
00A
TAD

DCA
152
TAD

7067,

'TSF301

1089 I

BDPNTR
TSTCNT
TSTCNT
CNT1
TSTCNT

0000

802872.

2400
2414
2430

BAUDTB.

IGET THE FIRST CONSTANT
1

IBUMB THE ADDRESS BY

FOR NEXT CONSTANT

TSTCNT

ILOAD AND TRANSMIT FIRST CHARACTERIFLAG
ICOHES UP ALMOST INNEADIATELY
.-1

ICLEAR THE RECEIVE FLAG
NEXT CHARACTER AND CLEAR FLAG
/LOAD AND TRANSMIT
ITURN THE INTERRUPT ON
ISKIP IF RECEIVE FLAG SET
[FLAG NOT SET,CHECK TRANSMIT FLAG
IRECEIVE FLAG SETIGO CLEAR IT
ISKIP IF TRANSMIT FLAG SET
INOT SET YET GO WAIT FOR A FLAG
IBUMP THE FIRST COUNTER

RETINT, 852

75831,

IT BY

/ADD IN BAUD RATE ADDRESS
/ADDRESS OF BAUD RATE CONSTANTS ARE READY TO BE SETUP
/STORE THE LOOPING PC FOR TEST LOOPING
IGET POINTER ADDRESS TO THE CONSTANTS
/SAVE IT IN TEST COUNT

BDPNTR

.+3

TLSE.

IMULTIPLY

BDPNTR

JMP
522 CLA
TLS
ION

/GET THE BAUD RATE
IGET THE ADDRESS OF THE BAUD RATE TABLE
/SAVE THE POINTER TO THE BAUD RATE TABLE
IGET THE CHARACTER LENGTH

(BAUDTB
BDPNTR
BITNO
RAL

0822

KRB

ISETUP RETURN POINTER FOR THE INTERRUPT

(RETINT
2
BAUDNO

DCA
705
TS?
088

INTON,

582
082
TSF
082
152
082

CLA

15z

CNT2

JMP
HLT
2002
082
0

INTON+2

INTDN

1NTON+4

0871
INTON+2

IGO TRANSMIT ANOTHER CHARACTER
IFIRST COUNTER OVERFLOWED
IGO DO ANOTHER 4095 INTERRUPTS
ITRANSNITTED FOR 30 SECONDS????
ILOOP ON TEST IF SR2=1
/END OF THE TEST

.-2

IPOINTERS T0 BAUD RATE TABLE
2334
2335

2336
2337
2340
2341
2342

2444

2460
2474
2510

82110
82150
82300
82600
BP1200

922400
824800

f‘\

lKLe-JA

KLB-KA/KB/KC/KD 2002 BACK TEST.

PAL10

V142A

9:34

16wSEP-77

PAGE

6-1
SEQ

1434
1435
1436
1437
1430
1439
1440
1441
1442
1443
1444

1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455

1456
1457
1458
1459
1460
1461

1462
1463

2343
2344
2345
2346

2347

2524
2540
2554
2570
2604

829600
819200
82568
39667
821050
IPOINTERS

2350
2351
2352
2353
2354
2355
2356
2357
2360
2361
2362
2363

4473

MESTAB,

4520
4545
4572

4617
4645

1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487

BAUD

825562

4721
4747
4776
5024
5052

[POINTERS TO DATA

2364
2365
2366
2367

5145

2375
2376
2377

2334
2317
5402

RATE TYPEOUTS

MESSGF
825565
825568
MESSGI
825560
MESSGK
MESSGL

4673

825781.

5164

BIT

825100
825100

5203
5222

2400

PAGE

7051

32110,

IEAUD RATE CONSTANTS
2400
2401
2402
2403
2404
2405
2406
2407
2410

2411
2412
2413

7777

7143
7777
7221
7777
7266
7777
7324
7777
7355
7777

-727
-1
-635
-1
-557

2415
2416
2417
2420
2421

6575
7777

6715
7777
7014
7777

FOR

110

BAUD

BITS 17

15.71 CHAR/SEC=471 CHAR/3O 520

BITS

13.75 CHAR/SEC=413 CHAR/30 sec

BITS AT

12.22 CHAR/520:367

CHAR/30 58c

CHAR/SECBS30 CHAR/30 520

-512

/10

0175 AT

-1
-454

/11

BITS

10 CHAR/SECIBOO CHAR/3O

/12 BITS

9.17 CHAR/SEC=275 CHAR/3o 520

520

-423
-1

IEAUD RATE CONSTANTS
2414

TYPEOUTS

82510A

3825108

1464
1465
1466

1467

82556A
825568
MESSéC
MESSGD

82150,

-1203
-1
-1063
21
-764
-1

BITS

FOR 150 BAUD

21.43 CHAR/SEC=643 CHAR/30 SEC

BITS AT 18.75

BITS AT

CHAR/SEC=563 CHAR/30 SEC

16.67 CHAR/SEC=500 CHAR/3O SEC

0048

IKL8'JA

1488
1489
1490
1491
1492
1493
1494

KLB-KA/KB/KCIKD LOOP BACK TEST2422
2423
2424
2425
2426
2427

7076

PAL10

'702

7777
7147
7777
7211
7777

1495

2430
2431
2432
2433
2434
2435
2436
2437
2440
2441
2442
2443

1506
1507
1508
1509
1510

5372
7777
5633
7777
6030
7777
6174
7777
6316
7777'
6422
7777

BR300I

2765
7777
3466

BR600:

2447
7777
4060
2450
7777
2451
2452
4370
2453'
2454
2455
2456
2457

1524
1525
1526
1527

2460

2444
2445

2446

1532
1533

1534

1535
1536
1537
1538
1539
1540

1561
1563
1564

1565
1566
1567
1568
1569
1570

1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1532
1583
1584

2474

3720

BR2400:

BITS

12.50 CHARISEC=375 CHAR/30

FOR

KLR-KA/KBIXC/KD

LOOP

2501
2502
2503
2504
2505
2506
2507

7775
6326
7775
0277
7776
1737
7776
3156
7776
4217
7776

2510

7640

2511
2512
2513
2514
2515
2516
2517
2520
2521
2522
2523

7772
4654
7773

7775

2524
2525
2526
2527
2530
2531
2532
2533
2534
2535
2536
2537

7477
7765
1530
7767
1371
7770
7571
7770
4664
7771
1073
7772

BR96001

2540
2541
2542

7176
7753
3257
7756
2761
7760
7362
7761
1550
7763
2165

B19200:

2475
2476
2477
2500

42.86 CHAR/SEC=1286 CHAR/30 SEC

BITS

37.50 CHARISEC=1125 CHAFI3O SEC

BITS

33.33 CHARISEC=1000 CHAR/30 SEC

I10

BITS

30.00 CHAR/SEC=900 CHAR/30

I11

BITS

27.27 CHAP/SEC=818

CHAR/30

SEC

I12

BITS

25.00 CHARISEC=750 CHAR/30

SEC

FOR

2546

2545

2547
2550
2551
2552

BAUD

BITS AT 85.71

BITS

75.00 CHARISEC=2250 CHAPI30 SEC

BITS

66.67 CHARISEC=2000 CHAR/30 SEC

CHAR/30 SEC

CHARISEC=2571

I11

BITS

54.55 CHARISEC=1637

I12

BITS

50.00 CHARISEC=1500 CHAR/30 SEC

BACK

TEST.

PAL10

0575
7774
3675
7774

BAUD

BITS

AT 171.43 CHARISEC=5143 CHAR/30 SEC

BITS

150 CHARISEC=4500 CHAR/30

BITS

133.33 CHAR/SEC=4000 CHAR/30

SE C

SEC

I10

BITS

120

I11

BITS

109.09 CHARISEC=3273 CHAR/30 SEC

I12

BITS

100

CHAR/SEC=3600 CHAR/30

CHAR/SEC=3000 CHAR/30

FATE CONSTANTS FOR

2400

V142A

16-SEP-77

BITS

5 EC

S EC

BAUD

BITS AT 342.86 CHARISEC=10.286

9134

CHAR/30 SEC

PAGE

6- 3

300 CHARISEC=9000 CHAR/30

SE C

266.67 CHARISEC=8000 CHAR/30
CHARISEC=7200 CHAR/30

SEC

BITS

240

I11

BITS

218.18 CHAR/SEC=6545 CHAR/3O SEC

I12

BITS

200

I10

BR4800:

1200

CHAR/30 SEC

CHAR/SEC=6000 CHAR/30

4800

S EC

BAUD

CHAR/30 SEC

BITS

585.71

BITS

600

BITS

533.33 CHAR/SEC=16.000 CHAR/30 SEC

CHAR/SEC=20.571

CHARISEC=18,000 CHAR/30 SEC

I10 BITS AT 480 CHAR/SEC=14I400 CHAR/30 SEC
I11

BITS

436.36 CHAR/SEC=13IO91 CHAR/30 SEC

I12

BITS

400 CHAR/SEC=12000 CHAR/30 SEC

'301

'13
'6250
'11
'6407

RATE CONSTANTS FOR

9600

BAUD

BITS AT

1371.43 CHAR/SEC=41:143 CHAR/30 SEC

BITS

1200

BITS

1066.67 CHARISEC=32000 CHAR/30 SEC

CHAR/SEC=36.000 CHAR/30 SEC

'10
'207

I10 BITS

960 CHAR/SEC=28;800 CHAR/30

'10
'3114

/11

BITS

872.73 CHARISEC=261132 CHAR/30

I12

BITS

800 CHARISEC=241000

SEC
SEC

'6705

CHAR/30 SEC

IBAUD

1593
1594
1595
1596
1597

0050

SEC

IBAUD

2543
2544

600

SEQ

BAUD

RATE CONSTANTS

0049

SEC

BITS

IBAUD RATE CDNSTANTS FOR

1590
1591
1592

300

SEQ
SEC

’4060

1585

1586
1587
1588
1589

BITS AT 13.64 CHAPISEC=409 CHAR/30 SEC

IBAUD

1541
1542

1562

2465
2466
2467
2470
2471
2472
2473

2461

1531

1551
1552
1553
1554
1555
1556
1557
1558
1559
1560

BR1200:

2463
2464

6-2

I12

CHAR/SEC=450

/10 BITS AT 60.00 CHAR/SEC=1800 CHAR/30 SEC

5750
7776
7153
7776
0140
7777
0760
7777
1467
7777
2110
7777

2462

PAGE

CEARI30

I11

IBAUD BATE CONSTANTS FOR

1528
1529
1530

1550

9834

BITS

IBAUD

1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523

1543
1544
1545
1546
1547
1548
1549

16-SEP-77

I10

IBAUD RATE CDNSTANTS

1496
1497
1498
1499
1500
1501
1502
1503
1504
1505

IKLS-JA

V142A

RATE CONSTANTS

FER 19.2

KILO BAUD

2742.86 CHARISEC=82.286 CHAR/30 SEC

'602

BITS

'4521

BITS

'22
-5017

BITS

'416

I10

BITS

I11

BITS

1745.45 CHARISEC=52p364 CHAR/3O SEC

I12

BITS

1600

.5613

2400

CHAR/SEC=72,000 CHAR/30

2133.33

SEC

CHARISEC=641000 CHAR/30

SEC

1920 CHARISEC=57.600 CHAR/30 SEC

CHARISEC=48.000 CHAR/30 SEC

IKLB'JA 6 KLB'KA/KB/KC/KD LOOP BACK TEST.
1598
1599

2553

7764

2554
2555
2556
2557
2560
2561
2562
2563
2564
2565
2566
2567

'7415
7777

2570

BR667,

2577
2600
2601
2602
2503

7342
7777
7406
7777
7442
7777
7470
7777
7512
7777
7531
7777

1633

2604

7154

891050:

1634
1635

2605
2606
2607
2610
2611
2612
2613
2614
2615
2616
2617

7776
0236
7777
1124
7777
1662

PAL10

1600
1601
1602

1603
1604
1605
1606
1607

1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
162?
1623

1624
1625
1626
1627

1628
1629

V142A

16-SEP-77

PAGE

9834

6-4
SEQ

0051

SEO

0052

.14

IBAUD RATE CONSTANTS EUR 56.8 BAUD
'363
'1
I325

BRSSBI

7453

7777
7503
7777
7526
7777

BITS

9.11 CHAR/SEC =243 CHAR/30 SEC

BITS

7.10 CHAR/SEC

BITS

6.31 CHAR/SEC =189 CHAR/30 SEC

2571

2573
2574
2575

2576

SEC

I10

BITS AT 5.68 CHAR/SEC

7545

/11

BITS

5.16 CHAR/SEC =155 CHAR/30 SEC

7777
7562

/12

BITS

4;73

=170 CHAR/30

CHAR/SEC

SEC

=142 CHAR/30 SEC

7777
IBAUD

2572

=213 CHAR/30

RATE CONSTANTS

5125 AT 9.53 CHAR/SEC

=286/30

sec

510s

9.35 CHAR/SEC

=2so/3o

sec

5175

7.41 CHAR/SEC =222/3o sec

BITS

6.67 CHAR/SEC

/11 5175

6.06 CHAR/SEC

x10

/12 BITS AT 5.56

1630
1631

FOR 66.7 BAUD

=2oo/30 55c
=182/30 55C

CHAR/SEC

=167/30 SEC

1050

IBAUD RATE CONSTANTS FOR

BAND

1632

1636
1637
1638
1639
1640
1641
1642
1643
1644
1645

~624

BITS AT

150

'7542

BITS

131.25 CHAR/SEC =3938/30 SEC

'1
c6654

BITS

116.66 CHAR/SEC =3500/30 SEC

=4500/30 SEC

CHAR/SEC

'1
'6116
'1

7777
2320

'5460
'1
'5101

7777
2677
7777

I10

BTTS

105

I11

BITS

95.45

=3150/30

l12

BITS

87.5 CHAR/SEC

CHAR/SEC

SEC

=2864/30
=2625/30

SEC

/'\\

/KL8-JA & KLB-KA/KB/KC/KD LOOP

1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671

2620
2621
2622

2623
2624
2625
2626
2627
2630
2631

2632
2633
2634
2635

2636
2637
2640
2641
2642
2643
2644
2645

0000
7300

1047
3243
1244
3245
2245
5226
7200
7200
7200
7200
2243
7610
5620
0620
0620
0220
5224
0000
7754
0000

XDELAYI

DELLOP,

BACK

TEST.

CLA
TAD
DCA

CLL
NDELAY
DELAYN

TAD

DCA

CONIOO
USIOO

152
J“?

1684
1685
1686
1687
1688
1689

1690
1691
1692
1693
1694
1695
1696

1607
1698
1699
1700

V142A

9134

16-SEP-77

USIOO
0'1

CLA
ISZ
SKP

ON?
AND
AND
AND

I
I
1

GM?

DELAYNI
CON100;
U5100:

IFILLER CHARACTERS
2646

2647

0000
3270
1036
7006
7700

WILL

IS SELECTED'DO
CHECKED LATER.

NUT

TRANSMIT A L.F.

FILCHKI

5263
1270
1377
7450
5265

CA
TAD
RTL

CHKFIL

SMA
0MP
TAD

CLA
n+10
CHKEIL

TAD
SNA
0MP
TAD
SNA

('12

2660

1376

2661
2662
2663
2664
2665
2666
2667

7650
5265

2246

JMP
ISZ

5646

JMP

2052
5646
5646

ISZ

2670

0000

CHKFILI

2671

0000

HATTSFI

2672
2673
2674
2675
2676

1172
3051

3050
6041
7610

DELAYN
CLA
XDELAY
XDELAY
XDELAY
XDELAY
DELLOP

II? FILLER CHARACTER OPTION

2650
2651
2652
2653
2654
2655
2656
2657

PAGE

CLA
CLA
CLA

1672

1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683

PALIO

[WAS
IBY

FILLER CHARACTER OPTION SELECTED
THE

OPERATOR
AND

/N0,EXIT

/CHECK TO SEE
ILINE FEED
/WAS IT A 12

TRANSMIT THE CHARACTER
IF THE WORD TO BE TRANSMITTED

n+6

('200

/NAS

212

CLA
/YES IT WAS A LINE FEED
INORD IS DK'GO TRANSMIT

.+3
FILCHK
FILCHK
TSTCNT~
EILCHK
FILCHK

IBUMP TEST COUNTER TO GET RID OF WORD
IGO GET ANOTHER WORD
IGO DO TEST OVER IF LAST WORD IS A LINE FEED

DCA

[-100
CNT2

IROUTINE TO WAIT FOR TRANSMIT FLAG/IF IT DOESN'T SET IN A SECOND DR SO
ITIMEOUT AND

DCA

CNT1

‘TSF
SKP

CLA

JMP
OH?

TSF15:

SAVBTS

HALT

IKLauJA

1701
1702
1703
1704
1705
1706

KLB'KA/KB/KC/KD LDDP BACK TEST.
2677
2700
2701

2702
2703
2704
2705

1707
1706
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727

5305
2050
5275
2051

2706

5275
5671
2271
5671

2707
2710

0000
1172

2711
2712
2713
2714
2715
2716

3051

2717
-2720
2721
2722
2723
2724

3050
6031
7610
5323
2050
5313
2051
5313
5707
2307
5707

2776
2777

7600
7766

x556.

.-6
wATTSF

1749
1750
1751
1752
1753
1754

1761
1762
1763
1764
1765
1766
1767
1766
1769
1770
1771
1772
1773
1774
1775

1776
1777
1776
1779

1780
1781
1782
1783

1704
1785
1766
1787
1766

1769
1790
1791
1792
1793
1794

1795
1796
1797
1798
1799
1800
1801
1502

1803
1604
1605

1606
1807
1606
1609

PAGE

7'1
SEQ

0053

SEQ

0054

SKIP

0
TAD

IOKITSF SKIPPED RETURN
/ROUT1NE TD 0117 FOR THE RECEIVE FLAG
[IF IT DOESN'T SET IN A 550000 02 50
/TIM500T AND HALT.

1.100
CNTZ
CMT1

DCA
DCA
K52
SR?
JMP
152
0MP
152
JMP
0MP
152
JMP

CLA

.+6
CNT1
,.4
CNT2
.-6
I
1

HATKSF
WATKSF
WATKSF

/ERROR,KSF FAILED

SKIP

/OK,RECEIVE FLAG SKIPPED

/
/

1730
1731
1732
1733
1734
1735
1736
1737
1736
1739
1740
1741
1742
1743
1744
1745
1746
1747
1746

1755
1756
1757
1750
1759
1760

9134

-16-SEP°77

/TSF FAILED

WATTSF

3000

PAGE

4471
4203
4473
5200
4511
3035
4471

TYINTR: MESAGE
MESS1
TWOUCT

1726
1729

IKL8-JA

V142A

WATTS?

JMP

WATKSFi

PAD10

.+6
CNT1
.-4
CN72

JMP
152
0M2
Isz
JMP
JMP
Isz

3000
3001
3002
3003
3004
3005
3006
3007
3010
3011
3012
3013

4213
4473
5206
1035
3035

3014
3015

4471
4224

3016
3017
3020
3021
3022
3023
3024
3025
3026
3027
3030

4505
5214
7610
7330
3036
4471
4236
1036
7710
7001
4475

JMP
aswAp
00A
MESAGE

3060
3061
3062
3063
3064
3055

3066
3067
3070
3071
3072
3073
3074
3075
3076
3077
3100
3101
3102

3103
3104
3105
3106

stcon

/GET TRANSMIT IOT
IINPUT ERROR
/ADD TRANSMIT IDT TO RECEIVE
/SAVE THE IOTS
ITYPE PARITY(Y 0R N)?

.-3
DEVCOD

DEVCOD

MESAGE
YESRND
JMP
,.3
SAP
CLA
CLA 000 CML RAR
CA
SAVBTS
MESAGE

IWAIT FOR A YES OR NO
/NOT A Y OR N
/SET NO PARITY BIT
ISET THE PARITY BIT TO A 1
/SAVE THE PARITY BIT IN STATUS

TAD
SPA

SAVBTS
CLA

IAC

PRNTI

BACK

TEST.

PAL10

V142A

16vSEP-77

9234

0MP
.-3
SKP
CLA
CLA CLL CML RTR
TAD
5AV5T5
DCA
SAVBTS

1036

TAD

SAVBTS

RAL
SPA
IAc

CLA

7001

/WAIT FOR A YES OR NO
INOT A YES OR NO
[NO STATUS REGISTER SELECTED
/STATUS REGISTER IS SELECTED
/ADD STATUS REGISTER BIT TO WORD
/AND SAVE IT
'

4475
4471
4306

22071
MESAGE
MESSS

ITYPE

4505

155300
JR?

FOR A YES OR NO
lNOT A YES OR NO
[NO FILLER CHARACTERS
/YES:FILLER CHARACTERS
/ADD THE FILLER CHARACTER
/

5250
7610

SKP

1377
1036
5
.

TAD
TAD
DCA
MESAGE
MESSSA

,.3
CLA

(1000
SAVBTS
SAVBTS

1036

TAD

SAVBTS

RTL
SPA
IAC

CLA

4471
4440

4473
5267
3364
1364
1376
7740
5267
1364
7106
7004
1036
3036

1036
7012

7010
0375

1374
3320
1720
3320
4471

FILLER

CHARACTERS(Y OF N)?

/WAIT

7006
7710

4400

7-2

'MESAGE
MESS4A

7710

7001

PAGE

ITYPE STATUS REGISTER(Y 0R N)

MESAGE
MESS4
YESRNO

4302

4475
4471

WORD

MESS3A

7004

3036
4471
4326

IOT

M5553

4471

3107

3116
3117

THE TELETYPE

IGET RECEIVE DEVICE CUDE
[INPUT ERROR
ISHAP IT AROUND TO BITS 0-5
/SAVE THE RECEIVE DEVICE CODE
ITYPE TRANSMIT IOT

.-3

THUOCT
JMP
TAD
DCA

4471
4241
4505
5231
7610
7332
1036
3036

3110
3111

3112
3113
3114
3115

FOR

M5552

KLa-KA/KB/KC/KD‘LOUP
3031
3032
3033
3034
3035
3036
3037
3040
3041
3042
3043
3044
3045
3046
3047
3050
3051
3052
3053
3054
3055
3056
3057

/INTERAGATION SETUP
/TYPE RECEIVE IOT?

BIT

STATUS WORD

PRNT1
MESAGE
MESSG
MESAGE
0M6556
THOOCT
JMP
DCA
TAD
TAD
5MA
JMP
TAD

,.5
SAVIT
SAVIT

RATE(00~13J?

IINPUT A NUMBER FROM 00-13
/INPUT ERROR
THE NUMBER TYPED BY OPERATOR
[WAS THE NUMBER WITHIN BAUD RATE LIMITS
/SAVE

(-13
SZA CLA

.-12
SAVIT

CLL
RAL
TAD
DCA
TAD
RTR
RAR
AND
TAD
DCA
TAD
DCA

[TYPE BAUD

~INOT WITHIN LIMITS GO TYPE MESSAGE OVER
IGET THE NUMBER AND PUT IN

SAVBTS

RTL
SAVBTS
SAVBTS

SAVBTS

(17
(MESTAB
I

MESAGE

CHGHES
cncMzs
CBGMES

/PUT
/ADD
/AND

NUMBER IN
IT TO THE
SAVE IT

BITS 5 6 7 AND
STATUS WORD

IKLB-JA

1810

1811

b\,

1812
1813
1814
1815
1815
1817
1818
1819
1820
1821
1822
1823
1824
1825

3120
3121

4473
4471

3122
3123

5100
4505

3124

5321
7510

‘3125
3125

3127
3130
3131
3132
3133

3134
3135
3135
3137
3140
3141

1825
1827
1828
1829

3142
3143
3144

1830
1831
1832
1833
1834
1835

1835
1837
1838

1839
1840
1841
1942
1843
1844
1845
1845
1847
1848

1849
1850
1851
1852
1853
1854
1855

BACK

KLB-KA/KB/KC/KD LOOP

1373

5120
4472
5340
3320

3145
3147
3150
3151
3152
3153

1320
7740
5340
1320
1035
3035

3154
3155
3155
3157
3150
3151
3152
3153

1371
1320
3352
3352
4471
5145
5770'

3154

0000

3170
3171
3172
3173

0215
2354
7775

3174

2350
0017
7755
1000

3177

SEQ

0055

SEO

0056

/wA1T FOR A y 02 N
/INPUT 88808
/ONLY 1 STOP BIT
/2 STOP 51Ts
/ADD THE NUMBER or 5209 BITS
/To THE sTATus 0020

(4
SAVBTS
SAVBTS

SAVBTS

(4
CLA

IAC
PRNT1
MESAGE
M55510
DNEDCT
JHP
DCA
TAD

/TYPE

.-3
ensues
(-3
enemas
SZA CLA
.-10
cncnas
SAVBTS
SAVBTS

TAD
SMA
GM?
TAD
TAD

DCA
TAD
TAD

DCA
TAD
I
DCA
MESAGE

1762

PAGE 7-3

ITYPE Two STOP BITS?

.-3

5NA

4471

1372

1856
1857
1858
1859
1860
1861
1862
1863

9134

16-SEP-77

V1428

CLA

DCA
MESAGE
MESS7A
TAD
AND

4471
5115
1035
0373
7550
7001
4475

PALiO

TEST.

MESSGA
MESAGE
MESS7
YESRNO
JMP
588
TAD
TAD

1035
3035

3145

3175
3175

CHGNES:

or DATA

BITS

/wA1T FOR A NUMBER
/N0T A NUMBER
[SAVE THE NUMBER
/15 IT GREATER THAN

‘

(0,172.3)

/YES,TRY AGAIN
/
/ADD
/AND

IT TO 5TATus
SAVE IT

IGD

AND CALCULATE

WORD
<

(MESTBl
enemas
.+4
.43
.+2

855101
JMP

sAvrT,

SETUP

0004

3200

PAGE

3200

PAGE

IKLG-JA

1864
1865
1866
1867
1868
1869
1870
1871
1872
1873
1874

1875
1876
1877

KbB-KA/KB/KCIKD 0002 BACK TEST.
3200

0000

3201
3202
3203
3204
3205
3206
3207
3210

0000
4470

1882
1883
1884
1885
1886
1887
1888
1889
1890

1891
1892
1893
1894
1895
1896
1897

1898
1899
1900
1901
1902
1903

F‘\

ONEOCK;

PALIO

3207
0000
3210
2201
5601

0000
4201
5511
7104
7006

3221
3222
3223

GM?

TWOOCK.

UNEUCK
ONEOCK

DCA
0MP
TAD
0MP

3227
3230
3231
3232
3233
3234

XPRNT2,

THPU

"TNOOCT"

ONEOCK
TWOOCK

DNEUCK
TWODCK

‘

XPRNT?
I

TWOOCK
TWDOCK

THE TWO OCTAL NUHBERS
0

THE

/CALL BY

DCA
TAD

THRU

"PRNTZ"

TWODCK
TWOOCK

RTR
EAR

PRNT1

1211

TAD

4475
5624

UN?

1904
1905

XPRNTZ
I

152

5611

/CALL BY
I
RAL

JMS

2211

OMS
OH?
CLL
RTL

3224
4201
5611
1224

0000
3211
1211
7012
7010
4475

TUOOCK

PRNT1
I

XPRNT2

[TYPE THE ASCII CHARACTER

THE AC

1906

1907
1908

1909
1910
1911
1912
1913
1914
1915
1916
1917
1918

3235
3235
3237
3240
3241
3242
3243

0000
5045
7200

5041
5240

5042
5535

FILLERS

.+2
152

IPRINT
3224
3225
3226

THPU

NuMBER

TWO OCTAL NUMBERS
IGOUD RETURN IS JMS+2

3213
3214
3215
3216
3217
3220

ICALD BY "ONEUCT"

IINPUT

3212

9134

16—SEP-77

/SET

LISN
1
0+3

0001

3211

v142A

IINPUT ONE UCTAL NUMBER
IGOOD RETURN IS JMS+2

1878
1879
1880
1881

FILLER;

xTypE,

0
TLS
CLA
TSP
amp
TC?
GM?

/CALL BY

.-1
1

XTYPE

ITYPE A CR AND L? WITH NUMBER OF FILUERS
[AS DETERMINED BY'LOCATION "FILLER"

"TYPE"

PAGE 7-4

REQUIRED

IKLB-dA

KLB-KA/KB/KC/KD

LOOP BACK

TEST.

PAL10

V142!

ICALL BY

PAGE

9134

16-SBP-77

7-5
SEQ

0057

SEO

0058

1919

1920

3244

1921

3245
3246

1922
1923
1924

1925

3247
3250
3251

1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936

3252
3253
3254

1937
1938

3261
3262
3263

1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950

1951

1952
1953
1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973

3255
3256
3257
3260

0000
7200
1260
4501
1200

XCRLF,

K215

TYPE
TAD

FILLER

CMA
DCA

7040
3261
1057
4501
2261
5254
5644
0215

CLA
TAD

XORs

TAD
TYPE

K212

Isz

XORs

JR?
JMP

K215,

.-2
XCRLF

021s

IPERFORM THE xDR OF THE
/RETURN T0 CALL+2

3264
3265
3266
3267

0000
3273
1273
0661
7041
7104
1273

3270
3271
3272

1661
2261
5661

3273
3274
3275
3276
3277
3300
3301
3302
3303
3304
3305

0000
4470
7447
3303
7462
3304

AND

3311
3312
3313

4471
3312
5706
4040
0010

YESRNX
YESRNX
x0Rs

TAD
TAD

YESRNX
x0Rs
x0Rs
XORS

"7" 0R

"N"

152
JMP
FOR

1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987
1989
1989
1990
1991
1992
1993
1994
1995
1996

1997
1998
1999
2000
2001
2002
2003
2004
2005
2006
2007

.+5

3314
3315
3316
3317
3320
3321
3322
3323
3324
3325
3326
3327
3330
3331
3332
3333
3334
3335
3336
3337
3340
3341
3342
3343

3344
3345

3346
3347
3350

3351
3352
3353

3354
3355
3356

2018

2019
2020
2021
2022
2023
2024
2025
2026
2027
2028

/RETURN

To CALL+2

"N”

/RETURN

CALL+1

NEITHER

"Y"

o~N

.+4
0

.+3
Isz
152
JMP

sPAsz.

YESRNX
YESRNX
YESRNX

SPACES
0

ICALL

"SPACEZ"

/USED

LISN

MEEAGE
.+2
JMP I SPACXZ

4040

K10,

0010

IUSE LAST

2008

2017

Ac=o

/RETURN TO CALL+3

ICOMPARE INPUT To LIST RULLUNINC CALL
IINPUT DNE CHARACTER IF Ac=0

2009
2010
2011
2012
2013
2014
2015
2016

"XOR"

/CALL BY "YESRNO"
IINPUT ONE CHARACTER

LISN
-"Y

/KL8-JA & KLg-KA/Ka/KC/KD Lonp BACK TEST.
1974
1975
1976

CALL+1

INPUT

yESRNx.

THE

/IN BRIEF, TAD THE Two
INUMBERS THEN SUETRACT
/THE CARRIEs To pRDDUCE
/A HALF ADD (XOR)

CIA
CLL RAL

0000
3305
2273
2273
5673

0000

AND

/CALL BY

DCA
TAD

/RRINT

3306
3307
3310

x0Rs.

ILOOK

"CRLF"

3357
3360
3361
3362
3363
3364
3365
3366
3367

3370
3371
3372
3373
3374
3375

0000
7640
5340

XLISN,

LISN1

V142A

16-SEP-77

PAGE

9:34

zERo

ICALL

/UsE

LAST

"LISN"
INPUT SINCE

NnT

ZERD

.-1

AND
TAD

DCA
TAD

K177
K200
LISNT1
LISNTl
M212

I
I

TAD
SNA
JMP

TAD
52A CLA
JMP
CRLF
JMP

LISN1,

LISN3,

TAD I
TYPE
TAD I
152
SNA
.JHR
SMA

.+4
M3
.+3

/Is
/N0

LP?

IT A

CR?

LISN1
LISNTi
.

XLIsN
XLISN

IPRINT THE CHARACTER
IGET COMPARE VALUE
lEXIT?
IYES

JHP

LISNUM

[LOOK

TAD I
52A CLA
GM?
DCA I
TAD I
DCA
TAD 1
JMP I

LISNT1

[COMPARE
IEOUAL?
/No

CLA

LISNUH.

1367

Isz
JMP
CLA
TAD
TAD

7500
5356

JMP

L15N2
[XPRNT1
XLISN
XLIsN

FOR

DCTAL

NUMBER

(XPRNT1
XLISN

/Ac

ZERO UNLEss

OCTAL

NUMBER

XLISN

LISN1
/L00K
I

TAD

IIS

LISNg

JMP
JMP

0177

0200
7566
7775

0170

LIENT1=tspACX2

3400

PAGE

0200

7566
7775

OCTAL NUMBER

INO,

LEss THAN s?
NOT AN OCTAL

NUMBER

K10

SPA

K177.
K200.
M212.
M3,

FDR

LISNT1
M270

SMA

M270.

IIS IT
IYES

LISN3

LISNZ:

5351
0177

N0N

K55

4501

1313
7510
5356

RAL1o
AC

CLA

JMP
KRE

4502
5340
1706

7450
5351
7500
5361
1706
7640
5356
3571
1714
3314
1571
5714
7200
2314
5340
7200
1706

SZA
GM?

6031
5317
6036
0372
1373
3706
1706
1374
7450
5334
1375
7640
5336

1714
2314

INPUT

IT GREATER THAN ZERO?
IND, so NOT A NUMBER

11s

LISNz
LISN3

7-6

IKLB-JA

2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059

KLB-KA/KB/KC/KD LOOP BACK TEST.

IPRINT PACKED

PAL10

V142A

16-SEP-77

9l34

PAGE 7-7
SEQ

0059

SEQ

0050

ASCII TEXT TERMINATED BY

ISIX-BIT>00
3400

0000
7200
1600
3264
2200
1664

MESAGXI

/CALL BY

TAD

7012
4216

MESAGF.

DCA
Isz
TAD
RTR
RTR
RTR
JMS
TAD
ans
Isz
GM?
0

MESAGX
FOROCK
HESAGX
Fonocx

ISET UP

K77
I

ITERMINATOR
/YES

MESAGX
M43

/YES

SPA
TAD
TAD
TYPE
JMP
I
CRLF
amp I

K77:
M43,

K3:

K100:
K240,

2069

(00)?

ICRLP?

.+7

TAD

2060
2061

RETURN

MESAGF
FORDCK
MESAGF
FDROCK
.-10

AND

SNA
JMP
TAD
SNA
JMP

2052
2063
2064
2065
2066
2067
2068

'MESAGE"

CLA

/200
I300
/200

K100
K240

300

MESAGF
HESAGF

0077
7735
0003
0100

0240

IMODIFY DEVICE CODE FOR A LIST OF IOT ADDRESSES
/CALL BY "MIOT"
XMIOT,
AND
K770
DCA
MESAGX
TAD I
XHIOT
ISZ
XMIOT
DCA
FDROCK
TAD I
FOROCK
IGET NEXT ADDRESS
SNA
/END 0? LIST? (ZERO)
JMP I
XMIOT
IYES
DCA
XPRNT4
TAD I
IGET IOT
XPRNT4
AND
K7007
IREMOVE OLD DEVCIE CODE
TAD
MESAGX
IADD NEH DEVICE CODE
DCA I
IPUT BACK IOT
XPRNT4

2070
2071
2072
2073
2074

2075
2076
2077
2078
2079
2080
2081
2082
2083

/'\

IKLS-JA

F‘\

2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097
2098
2099
7100
2101
2102
2103
2104

2105

2106
2107

KLB-KA/KB/KC/KD LOOP BACK TEST.

3461

2264
5250

3462
3463

0770
7007

3460

ISZ
JMP

K770.
K7007:

PALjo

V1424

16-SEP-77

FOROCK

.-11

0770
7007

4 OCTAL NUMBERS TO AC
IGOOD RETURN IS CALL+2

/INPUT

3464
3465
3466
3467
3470
3471
3472
3473
3474
3475
3476
3477

0000

4473
5664
7106
7006
7006
3300
4473

FOROCK'

ICALL BY

THOOCT
JMP I
CLL RTL
RTL

RTL
DCA

FOROCK

XPRNT4

TWOOCT

5664

JMP

1300
2264
5664

TAD
ISZ
OH?

FOROCK
XPRNT4
FORDCK
FOROCK

“FOROCT”

9134

PAGE

7-8

IKLB-JA & KLB-KA/KB/KC/KD LOOP BACK TEST.

PAL10

V142A

16-SEP'77

9134

PAGE

3
SEQ

IPRINT FOUR OCTAL NUMBERS IN AC 11 THRU 0 FOLLOWED

2108
2109
2110
2111

IBY
3500
3501

2112
2113

3502
3503
3504

2114
2115
2116
2117
2118
2119
2120
2121
2122
2123
2124
2125
2126
2127
2128
2129
2130
2131
2132
2133
2134
2135
2136
2137
2138
2139
2140

3505
3506

3507
3510
3511
3512

0000
3264
1264

TWO

0061

SPACES
0
D

XPRNT4:

ICALL BY ”PRNT4"
FOROCK
FOROCK

7012
7012
7012
4476
1264
4476

FOROCK

4500
XPRNT4

5700
/

IPRTNT THE OCTAL NUMBER
3513
3514
3515
3516
3517
3520
3521

XPRNT1:

0000
0320
1321

0
AND

K7:
K260:

THRU 11
ICALL BY

"PRNT1"

K260

TAD
TYPE
JMP I
0007
0260

4501
5713
0007
0260

XPRNTl

ISWAP BITES
3522

3523
3524
3525
3526
3527
3530
3531
3532
3533
3534
3535
3536

2141
2142
2143
2144
2145
2146
2147

0000

7012
1337
0336
1337

AC,

PRESERVE

THE

LINK

ICALL

DCA
RTR
RTR

3337

7012
7012

THE

X85”,

"BSWAP"

XRAND

RTR

XRAND

TAD
AND
TAD
RTL
RTL
RTL
JMP

7006
7006
7006
5722
7700

K7700;

K7700
XRAND

XBSW

7700

2148

2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161
2162

lKLB-JA

IGENERATE RANDOM NUMBER
IEXIT WITH NUMBER IN AC
3537
3540
3541
3542
3543
3544
3545
3546
3547
3550
3551

0000
7301
1373
1374
7106
3373
1374
7012
1373
3374
1374

XPANDI

CLA
TAD
TAD
CLL
DCA
TAD

/CALh BY
CLL

"RANDOM"

IAC

RAN1
RAN2
RTL

RANl
RAN2

RTR

TAD
DCA
TAD

RAN1
RAN2
RANZ

KLa-KA/KB/KC/KD LOOP BACK TEST.

PAL10

V142A

16-SEPv77

9134

PAGE

8—1
SEQ

2163
2164
2165
2166
2167
2168
2169
2170
2171

2172
2173
2174
2175
2176
2177
2178
2179
2180
2181

2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204

3552
3553
3554

0040
3042
5737

AND
DCA
ON?

DATBIT
XMTDAT
XRAND

IMASK CHAR FOR

I/O

ISTORE

ISAVE RANDOM
[GENERATOR PRIMES
3555
3556

3557
3560
3561
3562
3563

0000
7200
1373
3375
1374
3053
5755

XSAVGN:

0
CLA
TAD
DCA

ICALL BY

TAD

DCA
JMP

"SAVGEN"

RAN1
SAV1
RAN2
SAV2
XSAVGN

IRESTORE RANDOM
[GENERATOR PRIMES

3564
3565

0000
7200

3566
3567

1375
3373

3570
3571
3572
3573
3574
3575

3374
S764
1234
5670

XRESGN:

1053

0000

RAN1:
RAN21
SAV1,

CLA
TAD
DCA
TAD
DCA
OH? I
1234
5670

ICALL BY "RESGEN"

SAV1
RAN1
SAV2
RAN2
XRESGN

3600

PAGE
I

IRDUTINE TO DETERMINE IF 0N APT-8 TEST SYSTEM.
IIF ON APT'B NO HALTS WILL BE RECOGNIZED AND ALL PERTINENT
/HILL BE CONTAINED IN ADDRESSES 20 AND 22.
/
3600
3601
3602
3603

3604
3605

2205
2206

3606
3607

2207
2208
2209
2210

3610
3611

2211

3513

2212
2213
2214
2215
2216
2217

3614

3612

3615
3616

3617

0000
1022
7104
7520
5210
7710
5216
5213

XAPTB:

CHEK22

4515

JMP
JMP

5777f
5776'
1020
7440
3035

0
TAD
22
CLL RAL
SMA SNL
0MP
ONAPT-3
SPA CLA
JMP
ONAPT+3
ONAPT
JMP

ONAPT'

TAD

SETUP-7
BGNINT+3
20

SZA

1022

OCA
TAD

7104

CLL RAL

/ON

IND,

APT8 OR MULTIPLE OPTION
G0 CHECK FOR CONSOLE.
IF NOT ON TESTER

TESTER

ISKJP

/THE PROGRAM IS RUNNING
[APT CONFIGURATION
ITEST FUR CONSOLE
IYES

UNDER

NORMAL

IND.
IGET DEVICE CODE TD USE.
-

ITEST TO
DEVCOD
22

INFORMATION

[GET THE

SEE

DEVICE CODE

IS THERE

REST OF THE INFORMATION.
/BADRATE: STATUS ENABLE,
/AND DATA BITS PER WORD.

0062

IKLHuJA

K“\

‘1

2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270
2271
2272

KLSuKAIKB/KC/KD LOOP BACK TEST.

3620
3621
3622
3623
3624
3625

0375
3010
1021
0374
7104
1010

3626

3010

3627
3630
3631

1022
0033
1010
3036
1022

3632
3633
3634
3635
[3636
3637
3640
3641
3642
3643

3644
3645
3646

3647
3650
3651
3652
3653
3654
3655

3656
3657
3660
3661
3662
3663

7012
0372
3024
1024
1371
3124
1524
3264
1264
3124
7240
1264
3011

10
10

TAD

AND

C177

TAD
DCA

10
SAVBTS
22
(6000
22
SAVRTS

1664
3121
1022
7004
7710
6370

JMP

PAGE

8—2

SEO

0063

SEQ

0064

IISOLATE BAUD RATE AND DATA BITS.
IGET BACK OTHER.
ISTDRE ITsFOR THE PROGRAM USE.
ISET ADDRESS 22 TO INDICATE APT.
IISOLATE APT FEATURE SECTION OF NORD

IISOLATE OAUD RATE
IGET BAUD RATE

POINTER.

ITEMP STORAGE FOR TIMING
IGET POINTER.
ISTORE FOR FUTURE USE.
IGET POINTER
IAND STORE FOR USE BY PROGRAM.
ISET Ac TO -1 FOR AUTO INDEX.
IGET BACK POINTER
ISTORE VALUE
IGET VALUE
/STORE FOR APT.

/SPECIAL FEATURES ENABLED?
lYES. INITIALIZE TO DEVICE
/NON RUN PROGRAM SKIPPING
IINITIAL INTEROGATION,

APTIOo

5770'

9134

16uSEP-77

ISTORE PARITY,STATUS,AND
IFILLER CHARACTER INFORMATION,

DCA
TAD
RAR
RTR
AND
(17
DCA
SAVPNT
TAD
SAVPNT
TAD
(TADLEi
DCA
TEMP
TAD I
TEMP
DCA
XAERRO
TAD
XAERRO
DCA
TEMP
STA
TAD
XAERRO
DCA
A11
TAD I
XAERRO
DCA
CLKCNT
TAD
22
RAL
SPA CLA

V142A

/SAVE THIS SECTION
IGET PARITY BIT
IISOLATE PARITY BIT

(2000

CLL HAL
TAD
DCA

TAD
AND

0373
3022
1036
7010

.PAL10

(3000
10

AND
DCA
TAD
AND

SETUP

‘

ZERO

IROUTINE TO REPORT ERROR TO APT-8 1F REQUIRED.
/0NLY THE ERROR PC HILL BE ESTABLISHED.
/

3664
3665
3666
3667
3670
3671
3672
3673
3674
3675
3676

3677

0000

XAERRO;

7440
5271
7240
1264
3010
1022
7004
7520

5317
6002
7700

o
62A
JMP
.+3
STA
TAD
XAERRO
DCA
10
TAD
22
RAL
SMA SNL
JMP
EXIT
IOF

INAS

ERROR

IAC=-1
IESTABLISH
ISAVE IT
IGET ch2

THE

Ac.

SKP

IF 0N APT OR MULTIPLE
NEITHER EXIT ROUTINE.
IDISABLE INTERRUPT
IMULTIPLE OPTION SELECTED?

lsKP
IHAS

SMA CLA

/KLB-JA
2273
2274
2275

is",
n

KLs-KA/KB/KC/KD LOOP

3710

5311
6372
7420
5307
4517
7710
5313
4767'
5766'

3711
3712

7420
5317

3700

3701
3702
3703
3704
3705
3706
3707

2276
2277
2278
2279
2280
2281
2282

3713
3714
3715
3716

JMP

APTCHK

APT102
SNL
JMP

PAL1o

V142A

16-SEP-77

ISET

Now 60 TEST
FAIL FLAG

ISKP

IND.

9134
FOR

APT

.+4

LAS
SPA CLA
GM?
GOTOUV
JMS
NEWDEV
JMP
CLRBRD

IGET SWITCHES
ISKIP IF NOT GOING TO
/GO TO PROM
IGET THE NEXT DEVICE
IAND START OVER

SNL

/SKP IF
INOT 0N

PROM

APTCHK,

JMP

EXIT

ON APT
APT

6272

TAD
CIF

5736

JMP

5316

JMP

1010

GOTOUV,

I
EXIT,

10
70
I

RACK ERROR PC
FIELD TO UV PROM
PROM
ISOMETHING WENT NROMG
/GET
ISET

/GO

(71

CLL CLA

3717
3720
3721
3722
3723
3724
3725
3726

7410
5334
4517
7710
5334
4471

SR?
JMP
LAS
SPA CLA
JHP

3727
3730

4200
1010

MPC
TAD

3731

4477

3732
3733
3734
3735

PRNT4
0M6

5664
2264
5664

3736

6520

7300
4515

K6520

ITEST FOR ACTIVE CONSOLE
ICONSOLE ACTIVE.

CHEK22
.+12

IHALT ON

.+7

ERROR SELECTED?

INO, TAKE EXIT.-

MESAGE

4765'

K6520:
/

JMP I
ISz
JMP I
6520

XCBPSH
XAERRO
XAERRO
XAERRO

IPRINT PC:
IGET BACK ERROR PC
IPRINT IT
IASK SR GUESTION

lRoUTINE TO LOOP 0N NO ERROR FOR THE DESIRED NUMBER OF TIMES.
ITHIS ALSO CONTAINS THE APT TIMING SEECTIOM.
/

3737
3740
3741
3742
3743

0000
1737
3356
2337
4514

2316

3744

2317
2316
2319
2320
2321
2322
2323

3745
3746
3747
3750
3751
3752
3753
3754
3755

4515
7410
5353
6031

2052
5756
5737

3756

0000

2313
2314
2315

2324

2327

TEST.

2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310

232:
2

RACK

2283
2284
2285
2286

2311
2312

XNERRO.

TAD I
DCA
Isz
TICK

XNERRO
RETURN
XNERRO

CHEK22
SR?
JMP
KSF
GM?

5353
6036

JMS
152
JMP I
JMP I
l

RETURN.

FLAG.

.+5
.+3

KRB

4764'

IGET TEST TO LOOP ON
ISTORE FOR RETURN.
IUPDATE RETURN.
IAPT TIMING
ICONSULE ACTIVE
IYES. CHECK FOR KEYBOARD

XCPCNT

/KEYBOARD FLAG SET?
INO
lYES. READ THE CHARACTER
ICHECK FOR CONTROL CHARACTER

TSTCNT

RETURN
XNERRO

ICONTINUE TESTING.

PAGE

8-3

IKLB-JA 5 KLe-KA/KE/KC/KD LOOP BACK
2328
2329
2330
2331

3764
3765
3766

2332
2333
2334
2335
2336
2337
2338
.2339
2340
2341

2000
3000
0203
0206
4000

PAGE

2397
239a
2399
2400
2401
2402
2403
2404
2405
2406
2407
2403
2409
2410

NEWDEV:

0000
6007

4011
4012

IS BEING

0
CAF
TAD

1020
7002
7710
6371
6371
6374
7410
5201
5600

RUN

FUR MULTIPLE

APT101
APTI01
ApTIO4
SKP
JMP
JMP

/MOVE BIT
IIEST ALL
INO. ONLY

6 INTO BIT 0
16 DEVICES?
EVERY OTHER ONE

x15 ERROR

INDICATOR

SET ON

0066

THIS ONE

/N0. 005T EXIT ROUTINE
NENDEv+1
NENDEV

/Ex1T

/ROUTINE T0 NOTIFIY APT THAT THE PROGRAM

RUNNING.

4013
4014
4015

0000

xTICK,

TAD
AND
SNA
ON?

1022
0123
7650
5613
2121
5613
1122
3121

4016
4017
4020
4021
4022
4023
4024
4025
4026
4027
4030
4031

6500

22
K4000
CLA

ION

4631

IOF
CUP
C1?
JMS

5613

ON?

K6500
XTICK

LOOP

COUNTER

6002
6201
6272

APTTT
/NO. EXIT.
IREADY.
/NO. EXIT.

XTICK
CLKCNT
XTICK
COUNT
CLKCNT

Isz
JMP
TAD
DCA

/INIT COUNTER

6500

K6500.

‘

/SETS
/
4032

0000
7240

4033

4040

1232
3046
1241
3052
5632

4041

7770

4037

0002

TEST

DOINTER.

CNA

BACK

TEST.

24010

v142A

9134

16-SEP-77

PAGE 8-5

XPCRET
LUGPPC
M10

TAD
DCA
TAD

DCA
OH?

N10.

AND LOOP

CLA

KLa-KA/KB/KC/KD
4034
4035
4036

XPCRET,

TSTCNT
I

XPCRET

-10
2

’LUUP

4042
4043
4044
4045
4046

4517
7006
7710
5446

4047

5642

0000

xSR2,

TEST

53231

LAS
RTL
SPA
UN?
JNP

CLA
LOOPPC

I
I

XSR2

4050
4051
4052
4053
4054
4055
4056

4057
4060
4061
4062

0000
4517

NOTES.

/IF

LAS
RTR
RAR
SPA
0ND
Isz
OH?
TAD
DCA
J”?

7012
7010
7710
5260
2250
5650
1650
3250
5650

2413
2414

I
I

CLA
.+3
NOTsE
NOTBE
NOTBE

NDTBE
NOTSE

IROUTINE TO PERFORM A LAs

SR10=1

PROCESSOR NOT

PDP-BE FAMILY

‘

4063
4054
4065
4066
4067

0000

xLAS,

7300
1021
7710

CLL CLA
TAD
SPA CLA

7614

2421

4070

7614
1020

2422
2423
2424
2425
2426
2427
2423
2429
2430
2431
2432
2433
2434
2435
2436

4071

5663

2420

SEQ

TESTING.

/
/

2419

0065

Bsw
SPA CLA

2411
2412

2415
2416
2417
2418

SEQ

2339
2390
239‘
2392

2396

6-4

6000

4000
4001
4002
4003
4004
4005
4006
4007
4010

2373

2394
2395

PAGE

0215
5500
0017

/THE PROGRAM
/

2363
2369
2370
2371
2372.-

2393

9:34

/THIS ROUTINE HILL UPDATE THE DEVICE NUMBER TO TEST IF

2366
2367

2332
2383
2394
2385
2386
2397
2388

16-SEP-77

0271
4000

/KLa-0A 5

v142A

6600
6703

3767
3770
3771
3772
3773
3774
3775
3776
3777

2342
2343
2344
2345
2346
2347
2343
2349
2350
2351
2352
2353
2354
2355
2356
2357
2353
2359
2360
2361
2362
2363
2364
2365

2374
2375
2376
2377
237s
2379
2380
2381

PALIO

TEST.

/
/

TAD
JMP

/GET HCNI
/USE HARDWARE SWITCHES?
ILAS
IGET

20
XLAS

AND A
PSR

/
/
/

SK?

/PRoGRAHED HALT INSTRUCTION.

APT

THIS

RbUTINE

NOP.

4072

4076
4077

0000
3263
1022
0123
7650
5301

4100

5672

4101

4515

4073
4074
4075

XHALT:

0
DCA
TAD
AND
SNA CLA
JMP
JMP I

XLAS

/STORE

THE

ANY.

22
K4000
.
_

XHLT
XHALT

,_\

IPERFORM HALT EUNCIOTN‘x
.

xHLT,

CHEK22

/TEST

EOR ACTIVE CONSOLE

\\‘\\\I

IKLB-JA & KL8-KA/KB/KC/KD-hOOP BACK TEST.
2437
2438
2439
2440

2441

W‘\

2442
2443
2444
2445
2446
2447
2448
2449
2450
2451
2452
2453
24541
2455
2456
2457
2458
2459
2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2470

2471
2472

2473
2474
2475
2476
2477
247s
2479

4102
4103
4104
4105
4106
4107
4110
4111
4112

5672
1263
7440

2462

PALio

V142A

PAGE

9834

16-SEP-77

8-6
580

0067

SEQ

0068

IIGNDRE HALT INSTRUCTION.

XHALT
XLAS

5310
7340

1272
7402

.+3
/SET 40 T0 -1
IGET ERROR pc

CMA
XHALT

7402

7300
5672

CLL cLA
002 1

/CLEAR OUT ANYTHING

AC.

XHALT

/
/
/THIS

ROUTINE TESTS FOR ACTIVE CONSOLE pAcKAGE. IF CONSOLE
INSTRUCTION FOLLOWING CALL IS PERFORMED.

/ACT1VE
/

4113
4114
4115
4116
4117
4120
4121

0000
7300
1022
0322
7650
2313
5713

XCHK22.

4122

0400

K400.

CLL CLA
TAD
AND
SNA CLA
162
JMP I

22
K400

/C0NSOLE ACTIVE?
IND, UPDATE RETURN

XCHKZZ
XCHK22

400
.

IRANDM1- GETS A RANDOM NUMBER (PUT IN XMTDATJ AND PUTS
IPRDPER LOCATION WHILE SAVING THE CONTENTS OF xMTDAT
/

5723,

4135

0000

TEMSAV,

4200

pAcE

0000
7300
1042
3335
4506

ITS

4123
4124
4125
4126
4127
4130
4131
4132
4133
4134

anND1,

CLA CLL
TAD
DCA
RANDOM
TAD
DCA
TAD
DCA
JMP I

1042
3043
1335
3042

/GET FIRST DATA 0020

XMTDAT
TEMSAV

/AND SAVE IT
/GET THE SECOND DATA 0020
lTRANSFER IT TO ITS PROPER LOCATION

XMTDAT

XMTDT1
TENSAV

XMTDAT

/GET THE FIRST DATA WORD OUT OF ITS
/TEMP STORAGE AND RESTOE IT TO ITS PROPER LOCATION

XRAND1

IEXIT

l
0

2480

2461

0MP I
TAD
52A
JMP
CLL CLA
TAD

4200
4201’
4202
4203

4204
4205
4206
4207
4210
4211
4212

4320
0375
4000
4322
0503
0511
2605
4011
1724
7740
4000

/MESSAGES
TEXT
NFC.

"120:

MESSI:

"akacEIve

TEXT

IOT?

‘

IKLB-JA G KLa-KA/KB/KC/KD LOOP BACK TEST.
2403

4213

4324

4214
4215
4216

2201
1623
1511
2440
1117
2477
4040
0000
4320
0122
1124
3150
3140
1722
4016

4217
4220
4221

4222
2434

2465

2486

4223
4224
4225
4226
4227
4230
4231
4232
4233
4234
4235
4236
4237
4240
4241
4242
4243
4244
4245
4246
4247
4250
4251
4252
4253
4254
4255
4256
4257
4260
4261
4262

4263
4264
4265

4266
4267
4270
4271
4272
4273
4274
4275
4276
4277
4300
4301

PAL10

V142A

TEXT

"1TRANSMIT

IOT?

05553,

TEXT

"aPARTTytv

HESS3A'

TEXT

MESS4'

TEXT

"?‘EVEN PARITY EVN=0?

N)?

16-SEP-77

9134

PAGE

8-7

MESS2,

5177
4040
0000
4040
1620
7500
7743
0526
0516
4020
0122

1124
3140
0526
1675
6077
4040
1704
0440
2001
2211
2431
4005
2616
7561
7743
2324

0124
2523
4005
1601
0214
0504
5031
4017
2240
1651
7740
4000

NP="

ODD

PARITY EVN=1?ISTATUS ENABLED(Y

N)?

IKLS-JA

KLS-KA/KB/KC/KD

LOOP BACK TEST.

PAL10

V142A

16-SEP-77

9l34

PAGE 8-8
SEQ 0069

2487

4302
4303

4040

4304
4305
4306
-4307

2488

MESS4A,

TEXT

M3555,

TEXT

”74FILLER CHARACTERStY UR NJ?

MESSSA,

TEXT

”?CBAUD RATE(00'13J? 00=110 01:150 02=300 03=600 04:1200 05=2400"

SHD=“

4310
4311
4312

4313
4314
4315
4316
4317
4320
4321
4322
4323
4324
4325
4326
4327
4330
4331

2489

2490
2491
2492

FIL="

PAGE

4400

MESS6:

4401
4402
4403
4404
4405
4406

4407
4410
4411
4412
4413
4414
4415
4416
4417
4420
4421
4422
4423
4424
4425
4426
4427
4430
4431
4432
4433
4434

IKLB-JA

2493

KLB-KA/KB/KC/KD
4435
4436
4437

7562
6460

4440

4360
6675
6470

4441
4442
4443
4444
4445
4446
4447
4450
4451
4452

LOOP BACK TEST.

PALIO'

V1424

16-SEP-77

9834

SEQ

6000

CMESS6:

TEXT

"406:4800

Mass“,

sz'r

"#110 81100

51:0? 32:0? 33:0? w2=17 "5:0?"

MESSBB:

TEXT

”4150

Bi=07 BZ=0? B3=17

07:9600

10:19:200

11:56.8

12:66.7

6060
4060

6775
7166
6060
4061

4453
4454

4455
4456
4457
4460
4461
4462
4463
4464
4465
4466
4467
4470
4471

4472
2494
2495

4473

4474
4475
4476
4477
4500
4501
4502
4503
4504
4505
4506

4507

2496

4510
4511
4512
4513
4514
4515
4516
4517
4520
4521
4522

PAGE 8-9

4361
6560
4002

BAUD

“2:1?

W5=0?"

13=1050

“

0070

LOOP

IKLS'JA & KLB'KA/KB/KC/KD

4523
4524
4525
4526
4527
4530
4531
4532

/"‘\

2497

115'

2498

4533
4534
4535
4536
4537
4540
4541
4542
4543
4544
4545
4546
4547
4550
4551
4552
4553
4554
4555
4556
4557
4550
4561
4562
4563
4564
4565
4566
4567
4570
4571
4572
4573
4574
4575

4576
4577
4600
4601
4602
4603
4504
4505
4606
4607
4610
4611

BACK TEST.

0125
0440
5540
0261
7560
7740

PALIO

té-SEP-77

V142A

9134

PAGE 8-10
SEQ

0071

550

0072

4
.

0262
7560
7740
0263

7561
7740
2762
7561
7740
2765
7560
7700
4363

‘

MESSGC:

TEXT

4:300 BAUD

51:0? 22:1? 23:0?

TEXT

"“600

B1=07

02:1? w5:0?"

6060
4002

0125
0440
5540
0261
7560
7740
0262
7551
7740
0263
7560

7740
2762
7561
7740
2765
7560
7700
4366

MESSGDI

BAUD

3231? B351? W2=17

W5=0?"

6060
4002
0125
0440
5540
0261
7560
7740

0262
7561
7740
0263
7561
7740
2762

f“\.

IKLB-JA & KLB-KA/KB/KC/KD LOOP BACK 1551.

PALiO

V142A

16-552-77.

9134

4612
4613
4614
4615
4616
2499

K‘\

2500

2501

7561
7740
2765
7560
7700

4517
4361
4620
6260
604o
4621
4622
0201
4623
2504
4055
4624
4002
4625
6175
4626
4627
6177
4630
4002
6275
4631
4632
6077
4633
4002
6375
4634
6077
4635
4027
4636
6275
4637
4640
6177
4027
4641
4642
6575
6077
4643
4644
0000
4645
4362
6460
4646
6040
4647
4650
0201
4651 .2504
4055
4652
4653
4002
6175
4654
4655
6177
4656
4002
6275
4657
6077
4660
4661
4002
6375
4662
4663
6177
4027
4664
6275
4665
4666
6177
4667
4027
6575
4670
6077
4671
4672
0000
4573
4364

4674
4675
4676
4677
4700

7060
6040
0201
2504
4055

TEX?

"11200 5400

61:1? 52:0? 53:0? 02:1? 05:0?"

MESS6Fa

Tax:

"12400 BAUD

61:1? 02:0? 53:1? 02:1? 05:0?"

626560;

15x?

"14600 BAUD

51:1? 52:1? 53:0? 02:1?

MESSéE:

05:0?"

PAGE

6-11

lKLS-JA

KLB-KA/KB/KC/KD LOOP BACK TEST.

PAL10

V142A

16-SEP-77

9:34

PAGE 8-12

sac 0073
4701
4702
4703
4704
4705
4706
4707
4710
4711
4712
4713
4714
4715
4716
4717
4720
4721
4722
4723
4724
4725
4726
4727
4730
4731
4732
4733
4734
4735
4736

2502

4002
6175
6177
4002

MESS6HI

TEXT

”#9600 BAUD

B1=1? BZ=1?

83:1? w2=1? “5:07"

4737

4740
4741
4742
4743
4744
4745
4746
2503
2504

4747

4750
4751
4752
4753
4754
4755
4756
-4757
4760
4761
4762
4763
4764
4765
4766

lKLB-JA

MESS6II

TEXT

"419,200 BAUD

81:1?

82=12 83:1?

V142A

16-SEP'77

”2:0? w5=1?"

6275
6177
4002
6375
6177

KbS-KA/KB/KC/KD LOOP BACK

TEST.

PALiO

9134

PAGE

8-13
SEQ

4767

4770
4771
4772

4773
4774
4775
2505

4776
4777
5000
5001

5002
5003
5004
5005
5006
5007
5010
5011
5012

5013
5014
5015

0000
4365

MESSGJI

TEXT

"456.8

BAUD

51:0?

BZ=0?

6656
7040

83:0?

"2:1? w5=0?"
.t

0201
2504
4055
4002
6175
6077
4002
6275
6077
4002
6375
6077
4027

5021

6275
6177
4027
6575

5022
5023
5024

6077
0000
4366

5025
5026
5027
5030

6656
6740

5016
5017
5020

2506

4027
6275
6077
4027
6575
6177

MESSEK:

TEXT

"#66.7

MESSSLI

TEXT

"#1050 BAUD

BAUD

31:0?

82=07

B3=0? W2=1? w5=0?"

81:1?

B2=0?

B320? W2=1?

5031
5032
5033
5034
5035
5036

5037
5040

2507

5041
5042
5043
5044
5045
5046
5047
5050
5051
5052
5053
5054
5055

W5=0?"

0074

IKLB'JA

5056
5057
5060

5061
5062
5063
5064
5065
5066
5067
5070
5071
5072
5073
5074
5075
5076
5077
5100
5101
5102
5103
5104
5105
5106
5107
5110
5111
5112
5113
5114
5115
5116
5117
5120
5121
5122
5123
5124
5125
5126
5127
5130
5131
5132
5133
5134
5135
5136
5137
5140
5141
5142
5143
5144

/'\

'2508

PAL10

KLB'KA/KB/KC/KD LOOP BACK TEST.

9l34

16-SEP-77

V142A

PAGE

8-14
SEQ

0075

SEQ

0076

2504
4055
4002
6175

6177
4002
6275
6077
4002
6375
6077
4027
6275
6177
4027
6575
6077
0000
4324
2717
4023
2417
2040
0211
2423
5031
4017
2240
1651
7740
4000
4040
2302
7500
7743
0401
2401
4002
1124
2357
0310
0122
0103
2405
2277
4060
7565
4061
7566
4062
7567
4063
7570
4040
0000

‘

M5557.

15x1

"urwo srop 517s1y 05 N)?

HESS7A.

raxr

055510,

12x1

"240ATA BITS/CHARACTER? 0:5

55:"

1:6

2:7

3:5

/KL8‘JA
2511
2512

5145
5146
5147
5150
5151
5152
5153
5154
5155

/'\

2513

2514

5156
5157
5160
5161
5162
5163
5164
5165
5166
5167
5170
5171
5172
5173
5174
5175
5176
5177
5200
5201
5202
5203
5204
5205
5206
5207
5210
5211
5212

5213

f\
2515

PA010

KLB-KA/KB/KC/KD LOOP BACK TEST.

5214
5215
5216
5217
5220
5221
5222

5223
5224
5225
5226
5227
5230
5231
5232

4365
4004

0124
0140
0211
2423
4055
4016
0261
7561
7740
1602
6275
6177
4300
4366
4004
0124

v142A

M55101.

TEXT

"15

DATA

0115

M55105.

TEXT

"16

DATA 511s

16-552-77

N81=!?

052:121"

N81=0?

"02:17:"

9134

0140

0211
2423
4055
4016
0261
7560
7740
1602
6275
6177
4300
4367
4004
0124
0140
0211
2423

4055
4016
0261
7561
7740
1602
6275
6077
4300
4370
4004
0124
0140
0211
2423
4055
4016
0261

M55100.

TEXT

":7

DATA

5175

ua1=12 052:0?1"

TEXT

"18

DATA BITS

NB1=0? N52:o71“

055100.

PAGE

0-15

IKLB-JA G KLB-KA/KB/KC/KD LOOP

2516
2517
2510
2519
2520

2521
2522
2523
2524
2525
2526
2527
252a
2529
2530
2531
2532

5233
5234
5235
5236
5237
52401
5241

5242
5243
5244
5245
5246
5247
5250
5251
5252
5253

5254

2533
2534
2535

2545

2556
2557
2559
2559
2560
2561
2562
2563
2564

IKLBBJA G
2565
2566
2567
2568
2569
2570
2571
2572
2573
2574
2575
2576
2577
2578
2579
2580
2581
2582
2583
2584

2585
2586

2587
2588
2589
2590
2591
2592
2593
2594
2595
2596
2597
2598
2599

2600
2601

2602
2603
2604
2605
2606
2607
2608

2609
2610
2511
2612
2613
2614
2615
2616
2617
2618
2619

1143

5315
5316
5317
5320
5321

5326
5327
5330
5331
5332
5333
5334
5335
5336
5337
5340
5341
5342
5343
5344
5345

K184
KIES
KIE6
K157
K138
K159
KIEIO

1026
1052
0534
1113

KRBO

KR51
KRBZ
KRB3
KRB4
KRBS
KRBG
KRB7
KRBS
KRB9
KRBjo
INTON

1410
1437
1504
1511
1526
1544
1615
1554
1711
2313
1351

0323
0345
0406
0452
0503
0520

KRB11
KRBIZ
KRB13
KR814

2070

5354
5355
5356
5357
5360
5361
5362
5363
5364

0645

0301
0326
0333

0346
0351
0407

0425
0437
0453
0504
0512

0000

XMTIOT'

TFLO
TFL1
TFL2
TFL3
TFL4
TFLS
TFL6
TSFO
TSF1
T552
T653
TSF4
TSFS
TSF6
TSF7
TSFB
TSF9
TSF10

1000

T5F11
TSF12
TSF13
TSF14
TSF15
TSF16

1003
1070
1106

T$F17
T5518
T5520

0521
0533
0663
0723

2675

SEQ

0078

KIE3

0615
0707
0747
0757

5352
5353

0077

KSE1
KSE2
K553
KIEO
K151
KIE2

0536

0000

SEQ

KCC4

2046
1335

5351

PAGE 8-16

KCCS
KCC6
KRSO
KRSI
KRS2
KRS3
KSEO

2023
2045
2054
0403
0422
0457
0502

2014
2060

9:34

KSF10
KSF11
KSF12
KSF14
KSF16
KSF17
KSFifi
FDTLOP
KSF19
KSF21
KSF22
KSF23
KSF24
KSF25
KSF26
KCCO
KCC1
KCC2
KCC3

2000
0625
1010
2040

5346
5347
5350

16-SEP-77

KCFO
KCF1
KCFZ
KCF3
KCF4

KLB-KA/KB/KC/KD LOOP BACK TEST.
5322
5323
5324
5325

V142A

KSFG
KSF7
KSFB
KSF9

1036

5310
5311
5312
5313
5314

PALlO

KSF1
K552
KSF3
KSF4
KSFS

1063
1136
1757
5305
5306
5307

BACK TEST-

KSFO

0276
0336
0354
0471
0537
0600
0720
0733
2713
1013
1037
1065
1116
1137
1144
1425
1523
1541
1675
1744
1762
1341
2036
2063
0607
0712

2541
2542
2543
2544

‘2555

RECPNT:

1077

2536
2537
2538
2539
2540

2546
2547
254a
2549
2550
2551
2552
2553
2554

7560
7740
1602
6275
6077
4300
0320
0401
0501
0551

PAL10

V142A

16-SEP-77

9134

PAGE

8-17

/KL8'JA & KLS-KA/KB/KC/KD LOOP BACK TEST.

2620
2621
2622
2623
2624
2625

5405
5406

1124
1421

5407
5410

1516

5411
5412
5413

2626
2627
2628
2629

5414
5415
5416
5417
5420

2630
2631
2632
2633
2634
2635
2636
2637
2638
2639
2640
2641
2642
2643
2644
2645
2646
2647
2648
2649
2650
2651

5421
5422
5423
5424
5425
5426

5427
5430
5431
5432
5433
5434
5435
5436
5437
5440
5441
5442
5443
5444
5445
5446
5447
5450
5451
5452
5453
5454
5455
5455
5457
5460
5461
5462
5463
5464
5465
5466

2652
2653
2654
2655
2656
2657
2658
2659

2660
2661

2662

2663
2664
2665
2666
2667
2668
2669
2670
2671
2672
2673
2674

5467
5470
5471
5472
5473

PAL10

V142A

T5F22
TSF23
TSF24
T8525
TSF26
TSF28
TSF29
TSF30
TSF31
TSF32
TCFO
TCF1
TCF2
TCFS

1535
1553
1672
1747
2310
2322
1344
0330
0436
0470
0532
0654
0715
1002
1064
1123
1412
1505
1512
1611
1656
1346
2015
2035
0726
1073
0304
0411
0427
0442
0455
0460

16-SEP-77

9:34

PAGE

8-18
sac

0079

SEQ

0080

TCF4
TCFS
TCFG
TCF7
TCF8
TCF9
TCF10
TCF11

TCF12
TCF13
TCF14
TCF15
TCF16
TPCO
TPC1
SPIO
5PI1
SPI2
SPI3
SPI4
SPIS
SPIé
SPI7
SPIB
SPIQ
SPI10

0506
0515
0523

0672
0736
0750
0760
1015
1027

59111
SPI12
SP113
SPI14
SPIlS
TLSO
XMIT
TLSl
TLSZ
TLSB
T664
TLSS
TL56
TLS7
TL58

1042
1102

1420
1515
1522

1540
1556
1606
1665
2307
2315

/KLF-JA

2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685

KLE-KA/KB/KC/KD LOOP BACK TEST.

V1424

16-SEP-77

5476

5477

0000

0000
IBAUD RATE TABLES FOR USE ONLY UNDER APT-8

5500
5501
5502
5503

5514
5523
5532

TABLEI;

5541

8600

2687.2" 5504
2688
5505

5550

81200
B2400
84800
69600
B19K2
856P8
866P7
61050

2689
2690

2691
2692
2693
2694
2695
2696
2697
2698
2699
2700

5474

PAhio

2026
1424
1340

2686

5475

TLSQ
TLSlO
SLHTLS
I

5506
5507
5510
5511
5512
5513

6110
B150
B300

5557
5566
5575
5604
5613
5622
5631
/

IACTUAL VALUES TO USE FOR THE APT TIMING SECTION.
/

2701
2702
2703
2704
2705
2706

5517
5520
5521
5522

7677
7750
7765
7771
7765
7765
7770

2707
2708

5523
5524
5525
5526
5527
5530
5531

7677
7750
7760
7765
7761
7761
7770

B150:

5532
5533

7677

B300:

5534

7740
7752

2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2727
2728
2729

TEST SYSTEM.

5514
5515
5516

5110:

;

'101
'30
'13
'7
'13
'13
'10

I150 BAUD
/

5535
5536
5537
5540

7750

I300 BAUD
/
'101
'30
'40

'26
'34

7744

7744
7770

'34
'10
/
I600

5541
5542

7647
0000

5543
5544
5545

7700
7724
7700

'101
'30
'20
'13
'17
'17
'10

6600,

BAUD

'131
0

I'100
'54
'100

9:34

PAGE

8-19

lKLB-JA 5
2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
2740

KLB-KA/KB/KC/KD LOOP BACK TEST.
5545
5547

7700
0000

5550
5551
5552
5553
5554
5555
5556

7547

2764
2765
2766
2767
2768
2769

2770
2771
2772
2773
2774
2775
2776
2777

2778
2779
2780
2781
2782
2783
2784

IKLB-JA &
2785

5557
5550
5551
5552
5553
5554
5555

7247
0000
0000

2789
2790
2791
2792
2793
2794
2795
2796
2797
2798
2799
2800
2901
2802
2803
2804
2805
2806
2807
2808
2809
2810

0082

o
0
-400
-400
0

5555
5557
5570
5571
5572
5573
5574

7247
0000
0000
0000
7400
7400

5575
5575
5577
5500
5501
5502
5503

5247
0000
0000

l4800 BAUD
~531‘
54800,
0
o
o

-400
-400
o

0000
/

/9500

BAUD

59500.

-1531
0
o
0

0000
0000
0000
0000

0
o

5504
5505
5505
5507
5510
5511
5512

5247
0000
0000
0000
0000
0000
0000

5513
5514
5515
5515
5517

7740
7753
7772
7775
7772
7772

/19.2 KILo BAUD.
-1531
E19K2.
0
0

0
0

0
0
/

5520

/55.a BAUD.
~40
55525,
-15
-5
-3
-5
-5

KLa-KA/KB/KC/KD LOOP
5521

7773

BACK 1557.

PAL10

V142A

9134

16-SEP-77

PAGE

5-21

.5
/

5522
5523
5524
5525
5525
5527
5530

7740
7753
7772
7775
7772
7772
7773

/55.7 5100
-40
55527.
-15
-5

-3
-5
-5
-5

5531
5532
5533
5534
5535
5535
5537

7547
0000
7500
7550
7500
7500
0000

/1050 BUAD
-131
51050.
0

-200

-130
-200
-200
o

ISTANDARD CONSOLE PACKAGEITHE FOLLowING PARAMETERS MUST

DEFINED

PRIOR TO

IASSEMBLY.
ITHSFLD
/

THIS DEFINES THE FIELD THE ROUTINE
WILL PESIDE IN
751s DEFINES CALLING FIELD.
STARTING ADDRESS OF ROUTINES
RESTART 7557 FOR LINE FEED DETECTION,

741'

ICALFLD
IORIGIN
ISTRTST DEFINES

0000

2317

5500

THSFLD=O
CALFLD=00
ORIGIN=6600

2818
2819
2820

0000
0000

CONFLD=THSFLD‘1O
PRGFLD=CALFLD‘10

0271

STRTST=CLRBRD

2327

SEQ

-531

52400.

2813
2814
2815
2816

2828
2829
2830

0081

7400
0000

2811
2812

2921
2822
2823
2824
2825
2826

SEQ

-200
-130
-2oo
.200

0000
7400

2786
2787
2788

8-20

0000
7500
7550
7500
7500
0000
/

2762
2763

PAGE

/2400 BAUD

2761

9834

16-SEP-77

/1200 BAUD
-131
51200.

2742

2753
2754
2755
2756
2757
2758
2759
2760

V142A

2741
2743
2744
2745
2746
2747
2748
2749
2750
2751
2752

PAL10'

-100

I
0000

0170
0171
0172
0173
0174
0175
0175
0177

3305
3513
7700
1500
1400

2545
4050
7400
0000

FIELD

THSFLD

IFIELD

/CALLING FIELD
/START AT ADDRESS 5500

IKL8~JA

KLB-KA/KB/KC/KD LOOP BACK TEST.

0000
0100

01000000
11111111

11111111
11111000

11f11111
00000000

PAL10

11111111
00000000

V142A

11111111
00000000

16~SEPI77

9134

11111111
00000000

11111111
11111111

’11111111
10000000

11111111
00000111

11111111
11111111

11111111
10011111

PAGE 8-22
SEQ

0083

SEQ

0084

0200
0300

0400
0500

111111

0600
0700

11111111
11111111

11111111

1000
1100

11111111
11111111

1200
1300

no.. 3. . 111111

11111111

11111111
11111111

11111111
00000001

11111111
11111111

11111111
11111110

1400
1500
1600
1700

11111111
11111111

11111111
11111111
n

11111111
11111111

1111111
1111111

11111111
00000111

11111111
11111111

11111111
00000000

11111111
00000011

11111111
11111111

11111111
11111100

2000
2100
2200

2300

2400
2500

2600

11111111

2700

00000000

11111111
00000000

3000

3100
3200
3300

11111111
11111111

3400
3500

11111111
11111111

LOOP BACK

TEST-

11111111
11111100

3600
3700

IKLB-JA

KLB-KA/KB/KC/KD

4000
4100

PAL10

11111111
00000000

V142A

11111111
00000000

16-SEP-77

9134

11111111
00000000

4200
4300

11111111
11111111

11111111
11000000

11111111

00000000

11111111
00000000

4400
4500

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

00000000
00000000

4600

4700

11111111
11111111
11111111

11111111
11111111

11111111

5000
5100
5200
5300

11111111
11111111

5400
5500

5600
5700

6000
6100
6200
6300
6400
6500

6600
6700

7000

7100
7200
7300

7400
7500
7600
7700

11111111
00000000

00000000
00000000

PAGE

8°23

IKLBUJA & KLBGKA/KB/KC/KD LOOP BACK TEST.

V142A

PAL10

16~SEP~77

PAGE

9:34

8-24
SEO

0085

‘

2831
2832
2833
2834
2836
2836

6600
6601

6600

«ORIGIN
ICONTROL CHARACTER DECDDE ROUTINE.
/ENTER HITH CHARACTER IN THE Ac.

0000
3360

xcecNT.

2837
2838
2839
2840
2841
2842
2843
2844
2845
2846
2847
2848
2849
2850
2851
2852

6604
6605
6606

6607
6610
6611
6612
6613
5614
6615
6616
6617
6620
6621
6622
6623
6624
6625
6626
6627
6630
6631

2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2865
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877

6632
6633

6634
6635
6636
6637
6640

3241
3252
1254
3253
6201
1653
7450
5222

1360
7650
5243
2252

2253
5211
1360

DDNEA,

1777'
7700
5234
1360
4776'
5236
1775'
4774'
1256
1360
4774'
1260

47747
4773'

6641
6642

6203
5600

FLDRTN,

6643
6644
6645
6646
6647
6660

1255
1252
3251

CoITA,

CSCHAR

DCA
DCA
TAD

FLDRTN
INDEXA
XTAELA
CETDAT
CONFLD
GETDAT

ISTORE CHARACTER.
IGET CALLING DATA FIELD.
/SET UP RETURN FIELD.
/STORE IT

KCDFIF

/SET DISPLACEMENT TO

DCA
C08
TAD I
SNA
JMP
DONEA
TAD
COCHAR
SNA CLA
JMP
COITA
182
INDEXA
162
CETDAT
JMP
REDOA
TAD
CBCHAP
TAD
CQH260
SMA CLA
JMP
.47
TAD
COCHAR
JMS
TSTCRL
JMP
FLDRTN-a
TAD
ARROH
JMS
XCBTYP
TAD
880100
TAD
CRCHAR
0M6
XCBTYP
TAD
C8K277
UMS
xcsTvP
UMS
xcaCRL
CIF CDF RRCFLD
JMF I
XC8CNT

REDOA,

DCA
RDF
TAD

/SET

‘6

DDINTER TABLE.

/OET CONTROL CHARACTER
/END OF TABLE.

/YES.
/GET A MATCH?
/YES.
/No, UPDATE DISPLACEMENT
/UPDATE POINTER.
/GET NEXT COMPARE.
/GET 8Acx CHARACTER.

IND, THEN JUST PRINT IT.
xco TEST FOR CRLF.
/CRLF FOUND.
C

/RRINT
/SET up CHARACTER
-

IPRINT

IT.

/RRINT ?
/AND <CRLF>
/RETURN FIELD.
/EXIT BACK TO CALL.
-

.
.

TAD

TAD
DCA
TAD

1651
3251
5651

DCA
JMP

I
I

XTARLE
INDEXA
CDTOA
GOTOA
GOTOA
GOTDA

/GET CONTRDL CHARACTER
[ADD IN OFFSET
/ST0RE THIS
/GET ACTUAL DOINTER.

RDUTINES.-

/FERFORM FUNCTION.

/CONSTANTS

287A
2879
2880
2881
2882

USED

THIS

ROUTINE.

6651
6652
6653
6654
6655

2883

0000
0000
0000
7254

GOTOA,
INDEXA.
GETDAT;

0
0

xTAELA,

~7261

XTABLB,

TADLA
TABLE

2884
2885

xxLauJA

6602, 6214
1257
6603

/
/

KLaoKA/KB/KC/KD

LOOP BACK

PAL10

TEST.

v142A

IEoSEPv77

9134

PAGE

8~25
SEQ

2886
2887
2888

6656
6657
6660

0100
6203
0277

2889
2890

2891
2892
2893
2894

2895
2896
2897
2898
2899
2900
2901

2902
2903
2904

/ADORT PRINT OUT ROUTINE.
/ALL TERMINAL OUTPUT Is STOPPED UNTIL A "‘0" Is
/ALL OTHER CONTROL FUNCTIONS CAN BE PERFORMED.
6661
6662
6663
6664
6665
6666
6667
6670
6671
6672

1302
7640
5272
1200
3301

CNTRLS.

7240
3302
4772'
4200
5270

2905

2906

/CLEARS

2911
2912
2913
2914
2915
2916
2917
2918

6673
6674
6675
6676
6677
6700

1302
7650
5241
3302
6203
5701

6701
6702

0000
0000

6703
6704

0000
7300

6705

6214
1257

2919

2920
2921
2922

2923
2924
2925
2926
2927
2928
2929
2930
2931
2932
2933
2934
2935
2936
2937
2938
2939
2940

INPUT

/
ICONTFUL

2907
2908
2909
2910

0086

100
CDF CIF
277

C80100,
KCDFIF,
088277.

INMODE

TAD
SZA CLA
JMP
TAD
DCA

CRRTRN

/STDRE RETURN

STA
DCA
JMS

INHDDE
XCBTTY

JMS
JMP

XCRCNT
..2

FOR A REENTRY.
[GO BACK AND WAIT FOR NEXT CHARACTER.
IDECODE FOR CONTROL FUNCTION.
/NO CONTROL FUNTION. GO BACK AND wAIT.

/HAS ROUTINE BEEN ENTERED BEFORE.

.+7
XCBCNT

/SE'I‘

ADDRESS.

0 FUNCTION.
INMODE POINTER.

AND

SETS

RRORER

RETURN

/TO CALLING FIELD.
/
TAD
IMMODE
SNA CLA
/HAS CONTOL s BEEN TYPED.?
JMP
FLDRTN
.
INMODE
DCA
/CLEAR REENTRY POINTER
ACTFLD. CIF CDF PRGFLD
/AND TAKE A RETURN
JMP I
CSRTRN
/
/GETS SETUP TO RETURN ADDRESS.
ceRTRN. 0000
INMODE, 0000
/
/LOADS RSEUDO.SUITCH REGISTER NITH "EN VALUE.

CNTRLC.

6706
6707
6710
6711
6712
6713
6714
6715
6716
6717
6720
6721

6722
6723
6724
6725

6726

3347
6201
7200
3357

4773'
4771'
7265
6201
1770
6201

3767'

1767:
4766'
1356
3765‘
1764'

xcspsw.

0
CLA CLL
RDF
TAD
DCA
CDT
CLA
DCA
UMS
JMS
MESA
CDT
TAD I
GDP
DCA
TAD
JMS

TAD
DCA
TAD

/GET CLINO DATA FIELD
KCDFIF
PSWRTN
CONFLD

/SET UP RETURNING FIELD
/SET DATA FIELD T0 FIELD OF CONSOLE.
.

CHRTMP
XCOCRL
XCSPNT

DRCFLD
(20
CONFLD
casTOR

’
.

/<CRLF>

IPRINT "SR3"
ISET UP FIELD OF 888.
[GET PSEUDO SNITCH REGISTER.
/RESTORE FELDS.

cesTOR
XCBOCT
C8M4
TMPCNT
C8K240

[PRINT

THE

ISET UP

CURRENT VALUE.
INPUT FOUR CHARACTERS.

[KLSBJA

'4
16

2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951
2952
2953
2954
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965
2966
2967
2968
2969
2970
2971
2972
2973
2974
2975
2976
2977
2978
2979
2980
2981
2982
2983
2984
2985
2986
2987
2988
2989
2990
2991
2992
2993
2994

KLB-KA/KB/KC/KD LOOP BACK TEST6727
6730

4774'
4772'

6731
6732
6733
6734
6735
6736
6737
6740
6741
6742
6743
6744
6745
6746
6747
6750
6751
6752

4763’
5304
3360
1357

6753

JMS
OMS
JMS

0MP
DCA
TAD
CLL RTL
RAL
TAD
DCA
ISZ
JMP
JMS
CDE
TAD
DCA I
0000
ISZ
JNP I
CIF CDF
JMP I

7106
7004

1360
3357
2765'
5330
4773'
6201
1357
3770
0000
2354
5703
6203
5755

TSTRTN,

PSWRTN,

PAL10

XCSTYP
XCBTTY
TSTCHA
.XC8P5W+1
CBCHAR
CHRTMP

V142A

SEQ

0087

[AND STORE
[DONE YET.

.-12

INO,

XCBCRL
PRGFLD
CHRTMP

GET

SEQ

0088

IT.

NEXT VALUE.

[GET NEW SWITCH VALUE
[AND STORE IT IN PROGRAM FIELD

(20
-

LFFLAG
XCBPSW
PRGFLD

[WAS A

RSTART

[GO RESTART TESTING.

LINE FEED

FOUND.

[RETURN TO PROGRAM FIELD.
\

0271

LFFLAG'
RSTART,

7774
0000
0000

C8M4:
CHRTMP.
C8CHAR,

0000

8-26

[MOVE OVER THREE BITS
CBCHAR
CHRTMP
TMPCNT

[

6754
6755
6756
6757
6760

PAGE

9134

16'SEP-77

[PRINT A SPACE[GET A CHARACTER.
[CHECK FOR A VALID CHARACTER.
[ERROR RETURN.

[STARTING TEST OF DIAGNOSTIC.

STRTST
-4
o
o

[

6763
6764
6765
6766
6767
6770
6771
6772
6773
6774
6775
6776
6777

7022'.
7065

7072
7000

PAGE
/

/CunTRnL

FUNCTION.

[ROUTINE CAUSES RETURN TO MONITOR IF ON AN
[OPERATING SYSTEM OR TO THE LOADER IF NOT,
[
7000

7001
7002
7003
7004
7005
7006

1211
4326

CNTRLC,

TAD
JMS

ARROW

TAD

1210
4326
4346
6203
5607

0N6

JMS
C1? C0?
JMP I

XCSTYP
C

[PRINT

XCBTYP
XCBCRL

/AND

"C"

ARROW

INC“ A <CRLF>
ILDADER MUST BE

FIELD

K7600

f‘\

[KLB-JA & KLS-KA/KB/KC/KD
2995
2996
2997
2998

2999

7007
7010
7011
7012

7600

K7600!

0303
0336
0307

CI
ARROW,
GI

3000
3001

3002
3003
3004
3005
3006
3007

3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018

3019
3020

3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031

3032
3033
3034
3035
3036
3037
3038

3039
3040
3041
3042
3043
3044
3045
3046
3047

3048
3049

LOOP

BACK

TEST.

PAL10

V142A

16-SEP-77

9134

PAGE

7600
n
H.

[CONTROL G FUNCTION
[PRINT "SR=XXXX" WERE XXXX IS THE CURRENT VALUE OF
/THE PSEUDO-SWITCH REGISTER, IT THE WAITS FOR A NEH

SETTING.

[

7013
7014
7015
7016
7017
7020
7021

TAD

ARROW

4326

JMS

XCGTYP

1212
4326
4346

TAD
JMS
JMS
JMS
JMP

1211

4777'
5776'

CNTRLG,

XCNTLG,

XCBTYP
XCGCRL
XCBPSN
FLDRTN

[PRINT

"‘

[AND A "c
IAND FINALLY A canr
xco GET new SWITCH VALUE.
/EXIT ROUTINE.

[THIS ROUTINE WILL VERIFY CHARACTER IS A VALID OCTAL DIGIT
[OR A LINE FEED OR CARRIAGE RETURN.
/

7022
7023
7024
7025

7026
7027
7030
7031
7032

7033
~7034
7035
7036
7037
7040
7041
7042

7043
7044
7045
7046
7047

7050
7051
7052
7053
7054
7055
7056
7057
7060

7061
7062
7063

0000
3274
1274
1375
7650
5200
1274
4774'
5251

TSTCHA,

1274
4326

1274
1272
7710
5261
1274
1273
7700
5261
1274
0271
2222
5622
4346
7307
1266
7640

TAD
SPA
JMP

TSTEXT;

5773'
1275

37727
5773'
1771'
4326
4346

DCA
CSTEHP
TAD
CBTEHP
TAD
(-203
SNA CLA
0H?
CNTRLC
TAD
CBTEMP
ams
TSTCRL
JMD
TSTEXT
TAD
CBTEMP
ans
XCBTYP
TAD
C8TEMP

ERREXT,

[TEST FDR CONTROL C
[WAS IT?

[YES.
[TEST FDR <CRLF>
[FOUND ONE

canzso
CLA

ERREXT
TAD
CSTEMP
TAD
cam27o
SMA CLA
JMP
ERREXT
TAD
CBTEMP
AND
caK7
ISZ
TSTCHA
JMP I
TSTCHA
aus
xcécab
CLL CLA IAc RTL
TAD
TMPCNT
szA CLA
JMP
TSTRTN
TAD
ceswoR
CHRTMP
DCA
JMP
TSTRTN
TAD
caK277
0M5
XCBTYP
JMS
xcecan

[WAS

/N0,

GREATER THAN 0
TAKE ERROR EXIT.

‘\

[WAS 7 OR LESS
/NO TAKE ERROR EXIT.

[UPDATE

RETURN FOR VALID CHARACTER.

[+4 TO AC
[CHANGE SWITCH

[GET BACK TO CALL.

[AND A <CRLF>

8-27

IKLB-JA & KLB-KA/KB/KC/KD LOOP BACK
3050

7064
5622
7065
0240
7066
0000
7067
7566
7070
7775
7071 ,0007
7520
7072
7073
7510
7074
0000
0000
7075

3051
3052
3053
3054

3055
3056
3057
3058
3059
3060
3061
3062

16-SEP-77

IPRINT

"7'

AND

9134

PAGE 8-28
SEQ

0089

SEQ

0090

EXIT.

C8M2701
CBTEMPI
CSSTOR,

MESSAGE

PRINT IS

+1
0

CDL CLA
TAD I
DCA
ISZ
TAD I
RTR
RTR

C8001,

RTR
JMS
TAD
JMS

ISZ
JMP

XCBPNT
C8STOR
XCBPNT
CSSTOR

IGET

POINTER TO

MESSAGE.

IUPDATE RETURN.
/GET A SET OF CHARACTERS.

CBDCDD
CBSTOR
CBDCDD
CBSTOR
C8001

/
/
I

7114
7115

0000
0356

7116
7117
7120
7121
7122
7123
7124
7125

7450
5676
1357
7510
1360
1265
4326
5714

CSDCUDI

0
AND
SNA
JMP
TAD

SPA
TAD
TAD
JMS
JMP

C8K77
/END
I

XCSPNT

TEXT.

IYES.

C8M40
C8K100
C8K240
I

XCBTYP
C8DCOD

IESTABLISHES CHARACTER
INOW PRINT IT.

PRINT,

/
ITYPE
I

7126
7127
7130
7131
7132
7133
7134

3102

0000

ROUTINE.

XC8TYP'

0
TLS
TSF
JMP
TCF
CLA
0MP

6046
6041
5330
6042
7200
5726

3103
3104

.-1

XCBTYP

INPUTS A CHARACTER AND EXITS WITH

IROUTINE

KLe-KA/KB/KC/KD LOOP

3105

BACK

TEST-

IN THE

9134

16-SEP-77

V1424

/
7135

0000

7136

7143

6031
5336
6036
0344
1345
5735

7144
7145

0177
0200

7137
7140
7141
7142

XCBTTY:

0
KSF
0MP
KRB
AND

TAD
JMP

I'1

C8K177
C8K200
XC8TTY

C8K177I
C8K200:

3116

3117
3118
3119
3120
3121
3122
3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138

3153
3154
3155
3156
3157
3158

TSTCHA

XCBPNT:

7076
7077
7100
7101
7102
7103
7104
7105
7106
7107
7110
7111
7112
7113

3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
3090
3091
3092
3093
3094
3095
3096
3097
3098
3099
3100
3101

3152

3076
3077
3078

3139
3140
3141
3142

V142A

TEST-

[MESSAGE TYPE ROUTINE.

3075

3106
3107
3108
3109
3110
3111
3112
3113
3114
3115

C8K240!
TMPCNT;
C3M212I
C8M3'
C9K7,
C8M2600

ICALL
/.

3063
3064
3065
3066
3067
3068
3069
3070
3071
3072
3073
3074

IKLS-JA

GM?

7146
7147
7150
7151
7152
7153

0000
1355
4326
1354
4326
5746

177
200

XC8CRL:
TAD
OMS
TAD
JMS
JMP

C8K215
XCBTYP
CBK212
XCBTYP
I

XCSCRL

7154
7155

0212

0215,

C8K215:

7156
7157
7160

0077
7740
0100

C8K77I
C8M4OI
C8K100I

7171
7172
7173
7174
7175
7176
7177

6660
6757
6744
7200
7575

7200
7201
7202
7203
7204
7205
7206
7207
7210
7211
7212
7213
7214

0000

C8K212r

212
215

77
'40
100

6641
6703
7200

PAGE
/
TSTCRL:

1777'

TAD
SZA
JMP

7440

5207

STA
DCA
0MP I
TAD
SZA CLA
ISZ
DCA
JMP I
JMP I

7240
3776’
5600

1775'
7640
2200
3776'
S600
5600

C8M212
IT

LINE FEED?

.+4

[15
IND

LFFLAG
TSTCRL

IEXIT T0 PROPER POINT

C8N3
IIS

TSTCRL
LFFLAG
TSTCRL
TSTCRL

CARRIAGE

RETURN?

INO. UPDATE RETURN
ICLEAR LINEPEED FLAG
IEXIT
/HUST BE A CONTROL CHARACTERI
.

IOCTAD TYPE ROUTINE:
/

7215

0000

7216

3237

XCBOCT:

0
DCA

CBOCT

ISTORE CHARACTER

PRINTED.

PAGE

8-29

IKLB-JA G KLB-KA/KB/KC/KD
3159
3160
3161
3162
3163
3164
3165
3166
3167
3168
3169
3170

3171
3172

5%;

7241
7242
7243

7244

TAD
DCA
TAD
RAL
RAL
RTL
DCA
TAD
AND
TAD
JMS
TAD
182
JMP
CLL CLA

PADiO

V142A

C8M4
TMPCNT

9134

16-SEP-77

PAGE

8-30
SEQ

0091

SEQ

0092

[SET UP FOR NUMBER OF SHIFTS.
[GET VALUE

CSUCT
'

JMP

IMOVE INTO BITS 9-11
[DON'T CLEAR LINK.

CBOCT
CBOCT
C8K7
C8K260
XCBTYP
CSDCT
TMPCNT

.-11

INDW TYP DIGIT.
/GET BACK CHARACTER
IDONE ALL FOUR YET.
INO. GDBACK AND DO NEXT.

XCBOCT

0000

IEXIT

CSDCT,
C8K260p
XCBPAS'

ROUTINE,

0260
0000
6201
2253
4770'
7267

7245
7246
7247
7250
7251
7252

6203
5641

7253

0000

PASSES,

7254
7255
7256
7257
7260

7575
7571
7557

TABLA,

1253
4215

4767'

260
0
CDF
CONFLD
I52
PASSES
JMS
XCBPNT
MESS
TAD
PASSES
JMS
XCBOCT
JMS
XCBCRL
CIF CDF CALFLD
JMP I
XCBPAS

/PRINT END OF PASS MESSAGE
[PRINT NUMBER OF PASSES

IEXIT

/
0

3191
3192
3193
3194
3195

0000
:

3197

7261

3198
3199

7262
7263

3200
3201
3202

7264
7265
7266
7267

3203

7270
7271

7272
7273
7274
7275

7000

TABLE,

7013

3204

/END OF

TABLE

V142A

15-SEP-77

6673
6661
2322
7500
0516
0440
1706
4020
0123
2340
0000

100-uC
100-"6
100-"0
too-"s
0000

7555

3196

DOOP BACK TEST.

3186

1237
7004
7004
7006
3237
1237
0772‘
1240
4771'
1237
2773'
5223
7300
5615

7237
7240

3187
3188
3189
3190
re

7221
7222
7223
7224
7225
7226
7227
7230
7231
7232
7233

7236

3183
3184
3185

1774'
3773'

7234
7235

3173
3174
3175
3176
3177
3178
3179
3180
3181
3182

7217
7220

CNTPLC
CNTRLG
CNTRLO
CNTRLS

MESA:

TEXT

“58:"

M558:

TEXT

"END

PASS

3205
3206

7367

7370

7146
7076

W‘\

/KL8-JA
3207
3208
3209

3210
3211
3212
3213

KL8-KA/KB/KC/KD LOOP BACK TEST.
7371

7372
7373
7374

7375
7376
7377

7126
7071
7066

6756
7070
6754
7067

PAL10

9334

PAGE 8-31

IKLBUJA &

KLB-Kh/KB/KC/KD LOOP BACK TEST.

PRL10

V142A

9134

16-SEP-77

PAGE

8-32
SEO

0093

0000
0100

0200

/"‘"'1\\'
V

0300

0400
0500
0600
0700

1000
1100
1200
1300
1400
1500
1600
1700

a???
2000
2100

2200
2300
2400
2500
zaoo
27oo

/""N)

3000

3100
3200

3300
3400
3500

3600
3700

IKLS'JA

KLB-KA/KB/KC/KD LOOP BACK TEST.

PAL10

V142A

1éiSEP-77

9134

PAGE

8-33
SEQ

0094

4000
4100
4200
4300

4400
4500

4500
4700

)

5000
5100

5200
5300

0
,

5400
5500
5600

5700

6000
6100

6200
6300
6400
6500

6600
6700

111111
111111

7000
7100

11
11

7200

11111111
00000000

7300
7400
7500
7600
7700

11111111
00000000

11111111

00000000

11111111
00000000

1
1

11111111
10000000

1
0

11111111

11111111
00000001

11111111

00000000

111

/KL8-JA

KLB-KA/KB/KC/KD LOOP BACK TEST-

A11
A20
A21
322
323
ACNSKP
457300
333303
3313
APTCHK
437100
332101
332102
331103
331104
337105
43303
31050
3110
31200
3150
319200
B19K2
32400

3300.
34800
35633
3600
B66P7
39600
310030
330057
33u073
BAUDTM
303373
BGHINT
31430

331050
33110
331200
33150
332400
33300
334300

/'\

33563
33600
33667
339600
353
35343
5

C177

0011
0020
0021
0022
0023
0545

6677
4512
4513
3711
6370
6371
6372
6373
6374
6375
7011
5631
5514
5550
5523
2540
56045557

5532
5566

5613
5541

5622
5575
0041

2151
2334
2264
2333
0200
0037
2604
2400
2460
2414
2474
2430
2510
2554
2444
2570
2524
7002
4511
7010
0033

C77

080100
CGCHAR

ceDcon'
C8DD1
CBK1OO
CBK177
Caxzoo
08K212
C8K215
08K24O
C8K260
C8K277
C8K7
C8K77

C80212
CBH260
C3M270
C9M3
CaM4
C3M40
CBOCT
CERTRN
CSSTOR
CBTEMP
CAP
CAFINT
CAFXMT
CALFLD
CHARLG

CHEKzz
CHGMES
CHKFIL
CHRLAs
CHRTMP
CLKCNT
CLRBRD
CMESS6

CNT1
CNT2
CNTREC
CNTRLC
CNTRLG
CNTRLG
CNTRLS

CON100
CONFLD
COUNT
CRLF
DATBIT
DFLAY
DELAYN

PALiO

0032
6656
6760
7114
7103
7160
7144
7145
7154
7155
7065
7240

V142A

16°SEP-77

9:34

PAGE

DELLOP
DEVCOD
DUNEA

2624
0035
6622
4464
1502
7061
0044
1510
3717
1400
1523
2646
1645
2003

K4000
K6500
K6520

0123
4031
3736
3520
3463
7007
3435
3462
3536

EHLTLP
END
ERREXT
ERRFLG
ERRLOP
EXIT
FDATAT
FDTLOP
FILCHK
FILERT
FILEXT
FILLER
FILLOP
FLDRTN
FOROCK
FOROCT

6660

7071
7156
7067
7072
7073
7070

6756
7157
7237
6701
7075
7074

GETDAT
GOITA
GOTOA

GOTOUV
HALT
HLT
HbTLOP
HLTLP!
HLTLP2
INDEXA
INMODE
INTON
INTRET
INTXMT

6007

0500
0344
0000

1600
4515
3120
2670
1636
6757
0121
0271
4440
0050
0051
1737

K0125
K0252

K10
K100
K115
K117
K177

7000
7013

K2
K200
K212
K215
K240
K260

6673

6661
2644
0000
0122

K3
K33
K37
K377
K400

4502
0040

4461
2643

3200

1667
6641
3464
4474
7012
6653
6643
6651
3713
7402
4520
2200

2217
2241
6652

6702
2313
0267
0400
0056
0055
3313
3440
0026
0027

3372»
0025

3373
0057
3260
3441
3521
3437
0030
0031
0034
4122

K7007
K7600
K770

'K7700
KCC
KCCO

KCC1
KCCZ
KCC3
KCC4
KCC5
KCC6
KCDFIF
KCF
KCFO
KCF1
KCF2

8-34

SEQ

0095

SEQ

0096

6032
0607
0712
1036
1063

1136
1757
2000
6657
6030
0320
0401
0501

KCF3
KCF4
KIE

KIEO
KIE1
K1510
KIE2
K153
K134
K155
KIE6

0615
0707

KIE7
KIEB
K109
KRB

KRBO
KRB1
KR810

KRB11
KRBi2
KR813
K8814

0634
1113

2014
2060

KRBQ

2070
1410
1437
1504
1511
1526
1544
1615
1654

KRB2
KRB3
KRB4
KRBS
KRBG
KRB7
KRBB

IKLQ-JA

KLSOKA/KB/KC/KD LOOP BACK TEST.

K35

K350
K351
K352
K353
K53
K530

K531
K532

K533
KSF
KSFO
3531
KSFlO
KSFli

KSF12
KSF14

KSF16

KSF17
K5313
KSF19
KSF2
KSF21
KSF22
KSF23
KSF24
KSF25

6035

1335
2023
2045
2054
6031
0276
0336
1037

1065
1077
1116
1137
1144

1425
1541
0354

1675
1744
1762
1341
2036

LISN2
LISN3
DISNT1

2063
0471
0537
0600
0720
0733
2713
1013
4467
4517
6754
4470
3340
3356
3351
0170

LISNUM

3361

LOAD

4460
4463

K5F26
KSF3

KSF4
KSFS
KSFG
KSF7
K533
KSF9
KSFSKP

LAS
LFFLAG
LISN
LISNI

F\.

6034
0625
1010
2040
2046

LOOP
LOOPPC

M10
M1000
M212
M270
M3

0046
4041
0054
3374
3367
3375

M43

3436

M35103
M35103
M3510c
M35100

5145
5164
5203
5222
7265
4471

MESA
M35363
M35363
MESAGX
MESB

M3551
M35510
M3552
M3553
M35533

M3554
M35543
MESSS

M35553
M3656
MESSGA
M35563
MESS6C
MESSSD
MESSGE
M5556F
M35566
MESS6H
M3556I
MESSéJ
M3556K
MBSSGL
M3557

M35573
M35733
MESTBi
MIOT
MPC
NDELAY

NERROR
NEHDEV
NOINTR
NOTBE

DNAPT
ONEOCK
ONEOCT
ORIGIN
335535

PRGFLD

PRNTl
PRNTZ
PRNT4

3416
3400

7267
4203
5120
4213
4224
4236
4241
4302
4306
4326
4400
4473
4520
4545
4572
4617
4645
4673
4721
4747
4776
5024
5052
5100
5115
2350
2364
4503
4200
0047

4516
4000
0201

4050
3613
3201
4472
6600
7253
0000
4475
4476
4477

PAL10

V142A

16-SEP-77

9134

PAGE

PSNRTN
RANl
PANZ
RANDMi
RANDOM
RECDAT
RECEVE
RECPNT
REDOA
RESGEN
RETIMT
RETURN
RSTART

6747
3573
3574
4771
4506
0045
1436
5241
6611
4510

SPI9

0672

SR4HLT
START
STENAB
STERR

SAV1
SAVZ

3575
0053
2240
0036
4507
3164
0024

2133
0250
2005
2101
0703
2125
4462
0271
4465
7254
7261
5500
6042
0330
0436
1505
1512
1611
1656

SAVAC
SAVBTS
SAVGEN
SAVIT
SAVPNT
SCXMIT
SDTST1
SDTST2
SDTST3
SDTST4
SDTSTS

2317
3756
6755

0317
1152
1200
1210
1233

SDTST6
SDTST7

STLAS
STLPPC
STRTST

SW10NE
TABLA
TABLE

TABLE1
TCFO
TCF1

TCF10
TCFII
TCF12
TCF13
TCF14
TCF15
TCF16
TCF2
TCF3
TCF4
TCFS
TCF6
TCF7
TCFB
TCF9
TEMP
TEMSAV

SETUP
SLOLAS
SLOLST
SLWDAT
SLWREC
SLWTLS

1346
2015
2035
0470
0532
0654
0715
1002
1064

1123
1412
0124
4135

6040

SPACEZ
SPACXZ
SPI
SPIO

SPIl
SPIIO

TFLO

0323

TFL1
TFLZ
TFL3
TFL4
TFLS

0345

TFLG
THSFLD
TICK
TDS
TLSO
TLS1
T0810
TLS2
T683
TLS4
T685

SPI11
SPI12
SPI13

SP114
SPI15
SPIZ
5PI3
SPI4
SPIS
SPI6
SPI7
SPIB

STFLGS

0523

TLSé

0406
0452
0503

0520
0645
0000

4514

8-35

[KLB-JA

KLE-KA/KB/KC/KD LOOP BACK TEST.

PAL10

V142A

16-SEP-77

9834

PAGE

8-36
SEQ

TLS7
TLSS
TLS9
TMPCNT
TPC
TPCO
TPC1

TSF

TSFO
TSFl
TSFiO
TSF11
TSF12

1073
6041
0301
0326
0512

0521

0533‘

TSF13

0653

TSF14
TSF15
TSF16
TSF17
TSFiB
TSF2
TSF20
TSF22
TSF23
TSF24
TSF25
TSF26
TSF28

0723

TSF29
TSF3

TSF30
TSF31
TSF32
TSF4
TSFS

TSF6
TSF7
TSFB
TSF9
TSFSKP
TSTCHA
TSTCNT
TSTCRL
TSTEXT
TSTRTN
TWDOCK
TWOOCT
TYINTR
TYPE
UPDATE
US100
WATKSF
WATTSF

IKLS-JA

2307
2315
2026
7066
6044
0726

2675
1000

1003

1070
0333
1106
1124
1421
1516
1535
1553
1672

1747
0346
2310
2322
1344
0351
0407
0425
0437
0453
0504
4466
7022
0052
7200
7051
6744
3211
4473

XAERPD
XAPTB
XBsw
xcecnw
xcsan
xceocr
XCBPRS
xcepNT
xcepsw
XCSTTY
XCGTYP
XCHKZZ
XCNTLG
XCRLF
XDELAY
XHALT
XHLT
XLAs
XLISN
XLOAD
XMIOT
XMIT
XMTDAT

xurngt
XMTIOT
XMTPEC
XNERRU
XOR
XORS
XPCRET
XPRNI!

7241
7076
6703

7135
7126
4113
7020
3244
2620
4072
4101
4063
3314
2163
3442
1420
0042
0043
5352
1057
3737
4504

£5

3261
4032
3513

XPRNTZx 3224
XPRNT4
XRAND

3500
3537

XRAND!

4123

XRESGN
XSAVGN

3564
3555

XSRILP
XSRZ

1564
4042
6654
6655
4013
3235
4505
3273

XTABLA
XTABLE
XTICK
XTYPE
YESRNU
YESFNX

“I

3000
4501

1465
2645
2707

2671

KLB-KA/KB/KC/KD LOOP BACK

0097

3664
3600
3522
6600
7146
7215

TEST.

PALIO

V142A

16-SEP-77

9x34

PAGE

8-37

SEQ 0098

ERRORS DETECTED:

DINKS

GENERATEDI

RUN-TIME:
3K

CORE

USED

SECONDS

A11
020
A21
022

F\_

A23
ACNSKP
ACTFLD
AERROR

APTB
APTCHK
APTIDO
APT101
APTIOZ

APTI03
APTI04
APTIOS
ARROW
81050

8110
81200
8150
819200

1“

819K2
82400
8300
84800
856P8
B600
866P7
89600

BAUDND
BAUDST
BAUDTB
BAUDTM
BDPNTR
BGNINT
BITNO
581050
88110
881200
88150
882400
88300
884800
88568
88600
88667

889600
85W

BSWAP
C

C177
C77

791
83*
841

1300

1307

2247

SEQ

0099

853
864

262
29131
172#
1743
2273
134
163
17%
19»
20!
22%
2859
2694
2683
2687

2684
1435
2691
2688
2685
2689
2692
2686
2693
2690

103K
1279
1390
196

452'

535

874

933

193
2283i
2253
2350
2274

1325

1342

2949

29678

2351

29988

3005

227
1292!

1389

1395

1397

14243

211

218

221

1392

2952

2856

2862

2945

30824

3091

3166

3170

31764

3059!

3025
420

3063
3027
2346

3031

3075
3035

3077
3058!

1066
1287
1810”

2208
1830

2292
1832

2316
1835

2436
1839

2955
2366
1290

29668

3045

2369
1301

2281

1103
1105
1123
3197

1138
1137
1134!

1146
1148

2925
2368
2061
745

2934

3179

763

768

779

795

662
16669

902

969

1082

1192

2698!
2734i
2707“
15873
2770”
27431
27163
2752*
27794
27254
2788!

2761:,
226
1286
1427!
13851

1394
2210
209
1633!
14671
15270
14824
15428
1497!
15578
16034
15128
16189
1572”
2348
1734
2997B
2227

631
170*
2989
97!
96v

1255

.2797»

1938
101!
1438
1427
1431
1432
1429
1433
1436
1430
1437
1434

1119

2352
2987

1391

1428

1051

C80100
CBCHAR
CBDCOD
08001
C8K100
C8K177
C8K200
C8K212
CBK215
C8K240
C8K260
C8K777
C8K7
CBK77
C8M212
C8M260
C8M270
C883
C884
C8M40
C80CT
CBRTRN
CBSTOR

CBTEMP
CAF
CAFINT
1')

CAFXMT

2861
2835
3074
3070*
3088
3110
3111
3121
3119
2940
3168
2864
3036
3083
3053i
2853
3032
30540
2938
3086
3158
2898

2935
3017
289
404
308!

CALFLD
CHARLG

28169

CHEK22
cHGMEs

178!
1806
1675
1052

CHKFIL
CHRLAS
CHRTMP
CLKCNT
CLRBRD
CMEsss

CNT1
CNTz
CNTREC
CNTRLC
CNTRLG
CNTRLG
CNTRLS
CON100
CONFLD
COUNT
CRLF
DATBIT

DELAY
DELAY”
DELLOP

1113
1118
2987i
3005!
29098
2894“
1650

28181
188%
1561
102%
2163
1224
1649
16504

28864

2846
3076
3078
31301
31148
31154
3125!
3126K

3051!
3177”
28888
30558
31288
3141
3028
3057!
3147
2965!
31294

3161
2914
2936
3018
263
4113
320
2819
10314
231
1807
1680
1055
2946
1297
2594
24931

1096
1095
1120

3021
3198
3199

3089
3047
3167

30564

3159
3165
29163
3044
3022

3070

446

3186
1064
1280
1808
16934
10613
2950
2249
279

2820

1157

1400

1153

1159

3200

1667»
2842
1310
1992
214
548
1658
1664

1417
1403

SEQ 0100

DEVCDD

DONEA
EHLTDP

374
436
588
647
714

298
377
440
592
667
962

295

3011
2046

FDROCK
FDROCT
G
GETDAT
GOITA
GOTOA
GOTOUV
HALT

SEQ

0101

SEQ

0102

311
385
551
607
674
1042

921

16743

1687

1688

1690

1691

2075

2076

2084

20958

2097

2103

2105

2106

2112

1060

1125

1128

1261

1264

1267

1331

516
519

523
526

530
533

1338“
13583

1341
1361

1354
1377

28791
942

945

1057

HLT
HLTLOP

233

1289

1421

HDTLP1
HDTLPZ

493
496

500
503

509

INDEXA
INMUDE
INTON
INTRET
INTXMT
K0125
K0252
K10
K100
K115
K117
K177

512

2917»

1429

K2
K200
K212

2583

1927

K215
K240

2058

K260
K3

2126
2055
94!

2130#
2065b

95#

210
1036
24594
2363
23761
23063
2129#
20904
2996#
20638
2089!

K33
K37
K377
K400
K4000
K6500
K6520
K7007
K7600
K77
K770
K7700
KCCO
KCCI
KCC2
KCC3

KCC4
KCCS
KCC6
KCDFIF
KCF
KCFO

KCF1
KCF2
KCF3
KCF4
KIE
KIEO
KIE1
KIE10
K152
K133
K154
KIES
KIEé
KIE7

KIE8
KIE9
KRB

988
2454
1894
2373
2288
2125
2081
2993
2049
2071
2140
31“
477!
5523
6364
6633
7068
11518
1162
2837
29%

KRB1
K8810

K8511
K8812
K8813
K8814
K852
K883

21463
2546
2547
2548
2549
2550
2551
11708
28874
285

285#

2516

342!
412i
456%
711!
33k
344%
3598
6488
3888
4134
4418
4833
5493
581K
589$
628$
37*

2517
2518

1229
K880

498*
6874

11124
867%

11933
12298
12371
9038
9268

2431

552

636

663

706

2552
2924
342

412

456

711

344

359

388

687
1408

867
1981

903
2321

1151

1170

413

441

483

549

581

589

.628

648

926
3109

963

970

983

997

1044

1083

1112

2519
2520

2561
2562
2571
2563
2564
2565
2566
2567
2568

2569
2570
498
1237
2572
2573
2582
2584
2585
2586
2587
2574

2575

1193

K884
K885

K886
KRB7
K888
K889
KRS

SEQ 0103

614

1213

1219

1200

1218

1225

299
858

316
916

398
980

4704

2526

685
202

2958
136!
1978
2004

1268
3145

699
205
1283
3150

1951
1996*
2017

2012
2020

1999

2021

LISNT1

1984

1994

LISNUM

2001

726

K880

K851
K832
K883
KSB
KSEO

KSE1
K882
K523
KSF

K580
K581
KSF10
K8811
K5812
K5814
KSF16
K5817
K5818
K5819
K582
K5821
KSP22
K5823
K6824
KSF25

K8826

K‘\

963K
9700

9834
9974
10444
1083!

K583
KSF4
KSPS
KSFG
KSF7
KSF8
KSF9
KSFSKP
LAS

324
491*

614#
12134
12194
358
8548
12008
12188
1225“

707
2319
2641
2998
6378
6651
675d
6908
707a
712x
916!
994K
3163
1100!
1139B
1154»
858!
12113
1232”
3981
442!
454
558%
569!

17141
6171
134#
1828

1129
LFFLAG
LISN
LISN1
LIsnz
LISN3

259
280

LOAD
LOOP
LDOPPC
M10
M1000
M212
M270
M3
M43
MES1OA
M85108

MESlOC
MESlOD
MESA
MESAGE
MESAGF
MESAGX
MESB

MESSl
MESS10
MESSZ
MESS3
MESS3A
MESS4
MESS4A
MESSS
MESSSA
MESS6
MESSSA
MESS6B
MESS6C
HESSGD
M85568
MESS6F
MESSGG
MESSGH
MESSGI
MESS6J
MESSGK
MESSGL
M8557

MESS7A
MESTAB

MESTB!
MIOT
MPC

NDELAY
NERROR
NEWDEV
NOINTR

847
1335

304
1352

442
994

470
1100

~558

569

637
1232

675

690

1154

617
1211

665

1139

1412

1714

1979

1235
884
1344

935

948

1008

1364

1373

1014
2277

1053

1349

2295

1061
2394

1121
2401

896
536

1032
652

717

734

750

772

789

817

1770

1778

1785

1787

1809

1311

1819

650

715

732

748

770

787

815

961

1041

1327

876
1332

2002

2014

2026*

777
321
1067
1376

794
403
1173
2383

837
447
1244
2397

1742
2298
2060
2038

1749

1755

1763

2062
2051

2072

2082

898
319
1065
2354

1081
401
1171
2355

1191
445
1242

1648
534

1422

23881

2015
1989
2052
1455
1456
1457
1458
2931

838

899

20248
20198
2025!
20644
1844
2513!
25143
25154
32028

2512i

1730
1843
2043
3182

2045
20348
32034
2482!
25103
24838
24844
24851
24864
24878
24883

2489!
24923
1810
24968
24978
24988

1736
1965
20484
2036

24958

24998
25004
25011
25024

25048
25055
25064
25078
25088
25094
1805

1838
237
24813
547

278
845
2280

242
661
302
954

23458

SEQ 0104

NDTBE
ONAPT
ONEOCK
ONEOCT
ORIGIN
PASSES
PRGFLD

24004
2205
18694

2407
22114
1876

2408

2409

1882

1887

2932
1784

2954
1825

2960
1900

1902

2161

2172
2162

2184
2174

21888
2186

21893

906

2468
927

2406
2206
1875

2410
SEQ

0105

1828

PRNTI
PRNTZ

2831
3183
2867
1754

2117

PRNT4
PSWRTN

2301
2957*
2157
2158
10208
840
868
1127
9254
2516i
2851

RAN1
RAN2
RANDMI
RANDOM
RECDAT
RECEVE
RECPNT
REDOA
RESGEN
RETINT
RETURN
RSTART
SAV1
SAV2
SAVAC
SAVBTS

1412i
2324
2964i
2183
2175
1353
205
1777

SAVGEN
SAVIT
SAVPNT
SCXMIT
SDTSTi
SDTST2
'SDTSTS
SDTST4
SDTSTS
SDTSTé

1792“
2237'

3189i
2913

1769
2119

2160

359

1214

1230

928
1238

941
1248

984
1266

985

1220

1359

1371
219
1800

222
1801

1076

1186
1818

1676
1821

2327i
2190*
2185

1356#
207
1780
1796
2238

215
1799

1817

18471

303

743;

771
814
831

816

230
875

1845
878

747

SDTST7
SETUP
SLOLAS
SLDLST
SLWDAT

SLWREC
SLHTLS
SPACE2
SPACXZ
SPI

SPIO
SPI1
SPI10

2071

2209
8844

2254

760

765

782

799

807

825

829

887

2677

1967

2026

350
640

364

375

386

389

417

424

8884
860
857i
152i

153
468
619
2702
350*
5722

8663
864
2120
19641
270
629
2649
2650
2659

SPIll
SP112
SP113
SPI14
SPI15
SPIZ
SPI3
SPI4
SPIS
SPI6
SPI7

SEQ

SPIB

SPIQ
SR4HLT
START

1277”

STENAB
STERR

11863
1231

STFLGS
STLAS

1243
1241

1271
1247!

308
1031

341

895

1080

453

504

371
1194

397
1210

437

514
3100

555

608

1912

2240

2241

2244

347

383

414

427

507

12683
284

STLPPC

1252

1254

1272

411

452

545

1190

1396

659

STRTST

SH10NE
TABLA
TABLE

TABLE!
TCF

‘

TCFO
TCF1
TCF10
TCFl1

TCF12
TCF13
TC814
TCF15
TC816
TCF2
TCF3
TCF4
TCF5
TCFG
TCF7
TCFB
TCF9
TEMP

TEHSAV
TFL
TFLO
TFL1
TFLZ
TFL3
TFL4

2634
5554

2467
2881

4144

1299
24751
309

664

0106

2598
2599

TLSiO

2818
2315

2830

678

857

3097
2665
2667
924

2676

2668
2669
2670
2671
2672
2673
2674
2675
2951
564
2647
2648

TLS3
T054
TLSS
TLS6
TLS7
TLS8
TLS9
THPCNT
TPCO
TPCi
TSP

561
1415

TSFO
TSF!
TSF10
TSF11
TSF12
TSF13
T5814
TSF15
T5816
TSF17
T5818
T582
TSFZO
T5F22
TSF23

TSF24

TSF25
TSF26
T5828
T5829
TSF3
T5830
T5831
TSF32
TSF4
TSFS
TSF6
TSF7
TSF8

3041
671

30524

915

‘974

3160

3171

313
682

979

993

1607

1037

1092

1203

1404

1410

348
696

362
861

372
912

384
975

415
990

421

1004

428
1097

1143

1689

2323

2385

3090

3096“

291

296

310
668

1699

1910

3098

693

1038
3050
900
3149

1398
3151

1399
3152

1401

1402

1896

1897

1901

2261!

2265

2303

2304

2305

3049

3118'

3123

3185

3025

3048

SEQ

0107

SEQ

0108

438

2600

2601

4213
428#
4384
5218
561K
1699!
598
6094
668!
2963
6828
6961
912a
9754
9904

10044
1097”
1143i
3104
1405“
14153
8618
3134
3484
3624
3728
3843

2610
2611
2612
2613

2614
2615
606!
2617
2618
2602
2619
2620
2621
2622
2623
2624
2625
2626
2603
2627
2628
2629
2604
2605

2616

2606
2607
2608

/'\

TSFQ

TSFSKP
TSTCHA
TSTCNT

TSTCRL
TSTEXT
TSTRTN
TWDOCK

TWOOCT
TYIHTR
TYPE

415*
1324
2943

1128
2857
3024
2954”
143
1424
200

1548

UPDATE

USloo

30164
780
3023
30398

673
3037
797

31404

1205

18814

1883

1888

1738

1789

1890
2096

1891
2102

1928

1995
948%

2059
1018

2127

16684

HATKSF

1721

1722

1723

WATTSF
XAERRO
XAPTs
XBSW
XC8CNT

1706
2243

1707
2246

2248

2897

2902

2991

3009

3039

3085
2944

3181
2959

3010

2988

2990

3006

3008

1662
2442

1663
2445

2009

2011

2145
2868
2953
3174
3187
3067
2302
31064

XCBTT!
XCBTYP
XCHK22
XCNTLG
XC RLF
XDELAY

XHALT
XHLT
XLAS
XLISN
XLOAD
XMIOT
XMIT
XMTDAT

3069

2865
2456

2457

1931
1660
2434

1661

2422

1996
1309

2073

1708

3184

29213
3112
2941

2437

2429
1997

1311
2074

728

923

730
803
938
1207
944

2312

2314

1929
2382

1937¢

1202

XMTDTi

3120

769
856

781
871

1091
2466
1108

1111
2469
1134

793
879
1116
2472

2438

2005

2007

2078
746

755

757

759

804

808
973

911
987

1222
978

1228
1001

812
992
1240
1006

1940

1944

1945

1946

2128
1903
2101

2104

21113

2121

953

1216
952

XMTIOT

XMTREC
XNERRO
XOR
XORS

XPCRET
XPRNT1
XPRNT2
XPRNT4

3102

2666

800
930

3038
839
3146

3046

937

1651

XCBCRL
XCBOCT
XCaPAs
XCBPNT
XCBPSN

2609
567

2008

1889
151

2080

2325

2386

21248
18954
2083

761
824
1035
1250
1050

1196

xRAND
XRANDt
XRESGN
XSAVGN
XSR1LP
xsnz
XTABLA
XTABLa
XTICK

165

21528

2165

2139
2473
2187
2176
10148
2398

2141

2365
1913
1757
1939

2367

2374

1772
1943

1813
19508

1958

1696

1711

2824*

842
28284

908

921

28274

496

503
500

512

519
516

$30

0109

SEQ

0110

2840
s

XTYPE

YESRNO
YESRNX

.00170
.b0171
nL0172
.Lo173
.L0174
.Loi75
.Lo176

28231
1152

813

1959

1960

2829“

.Lo177
.L0365
.Loaas

.L0367
.L0370
.L0371
.L0372
nL0373
.L0374
.L0375
.L0376
.L0377
.L0575
.Los76
.L0577
.Lo773
.Lo774
.L0775
.Lo776
.L0717
nb1177
.b1773
.L1774
.L1775
.L1776
.L1771
.L2171
.L2172
.L2173

489
485

13138
1301

13151
1316K
1317!
1318!
1227
14618

.L2175

uL2176
.L2177
.L2375

.L6775
.L6776
IL6777
IL7171

509

526

523

533
530

603”

604#

11643
11658
11663
11673
11688

.L2174

nL2376
,L2377
.L2776
«L2777
.L3170
IL3171
.L3172
.L3173
IL3174
.L3175
IL3176
.L3177
.L3754
[L3765
.L3766
.L3767
.L3770
.L3771
3L3772
IL3773
nb3774
3L3775
uL3775
IL3777
.L6763
IL6764
IL6765
.L6766
.L6767
IL6770
.L6771
.L6772
0L6773
IL6774

493

1387
1385

1462!
1463i

1684

1726”
1727i

1681
1845
1838
1831
1916
1805
1804
1793
1775
2322
2302
2281
2280
2254
2239
2236
2231
2221
2218
2210
2209
2943
2940
2939
2937
2935
2933
2930
2901

2866
2860
2859
2857
2853
3047
3045
3043
3023

3019
3011
3010
3185

3181

3169
3167
3160
3159

3147
3145
3141

1314!

1319i

1848!

1849#
18504
1822
1852*
18534
18543

1855“
2330!
23314
23323
2333!
23349
2335“
23364
23370
2338!
23392
23400
2341#
2969#
29703
2951
2972!
2936
2956
29753
2942
2929
2863
29793
29808

1851”

29714

29734
29748
29765

2953
2865

29813
3132*
31338
3046
31358
31368
3137!
3138!
32054
32064
3207!
32088

3171

3134?

32093

32108

32118
3150
32134

32124

2977i

2941

2978“

.voooa
.Vooo4
.V0017

.voozo

.vozoo
.v0203
.vozos
.v021s
,v0267
.v0271
.vo4oo
.voeoo
.v1ooo
.v1031
.V1333
.v1400
,v1eoo
.vzooo
.vzoos
.vzoos
.v2217
.v2241
.V2264
,v2317
,v2334
.v2350
.V2364
.vzsqs
.vsooo
.V3306
.V3513
.V4000
.v4oao
.V4402
.VS402
.vssoo
.veooo
.vesoo
.vss41
,veaao
.vavoa
.ve744
,va754
.V6756
.V6757
.v7011
.v7o2?
.v7oss
.vvoee
.V7067
.vvovo
.vvo71
.V7072

208
216
225
2933
1284
2210
2209
1845
246
1290
322
463
598
210
731.
848
966
1162
1133
1079
458
461
196
1387
1390
1805
1838
785
200
2026
2005
1295
546
1215
244
2239
2231

486

1109

1804

601»
11668
1853!

1239

18510

1816
2236

SEQ

0111

SEQ

0112

2974!

2254

2334i

1314“

2281

1775

1855!

2221

2338"

472
475

479
481

485
489

493
496

500
503

813
2216

842
23391

908

921

28278

3010

28231
2280

2333“

2332“

897

2828!

1319!
1385

14631

232

1288

1315!

2302

23313

3043
3145
3159
3045
2859
2943
2940
2939
3141
3147
3167
2853

31343
3212!

3160

3171

3209!

3206!
2941

29783

3169

29771
3135!

3185

3205#

1152
1793

1696
1854i

1711

2824!

1086

1167!

509
512

516
519

523
526

530
533

604i
603!

2322
3011
3047

29713

31382

.v7075
.V7076
.V7126
.v7135
.v7145
.v7200
.v7215
.v7241
.v74oo
.V7575
.V7600
,v77oo
,v7765
.V7766
.V7774

2935
2930
2860
2901
2866
2857
2937
1281
497
3019
1684
1094
1681
482

29730
3181
2865
2976"
2953
3023

2829!

3207!

‘

/‘\f

$143.,