Digital PDFs

AH-8537D-MC

August 1978

86 pages

Original

44MB

view download

OCR Version

59MB

view download

Document:	CZDMAD0 DM11A LOGIC TEST AUG 1978 bw
Order Number:	AH-8537D-MC
Revision:	000
Pages:	86
Original Filename:	CZDMAD0__DM11A__LOGIC_TEST__AH-8537D-MC__AUG_1978_gray.pdf

OCR Text

LOGICTEST

CZDMADO

AH8537D:MC

AUG1978

MAD

CZDMADO DM11A LGC TST_
MACY11 30R(1052)
CZDMRD . P11
28-APR-78 13: 4y

28-APR-78

8
PRGE 1

13: 48

SEQ 0001

. REM %

IDENTIF ICATION
PRODUCT CODE:

AC-8536D-MC

PRODUCT NAME:

C2DMADO DM11R LGC TST

DATE RELERSED:

APRIL

MAINTRINER:

DIAGNOSTIC GROUP

1978

THE INFORMATION IN THIS DOCUMENT IS SUBJECT
TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED RS A COMMI
TMENT BY DIGITAL
EQUIPHENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION RSSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR
IN THIS DOCUMENT.
NO RESPONSIBILITY IS ASSUMED FOR
SOFTHARE ON EQUIPHENT THAT IS NOT
RFFILIATED COMPANIES.

THE USE
SUPPLIED

OR
BY

RELIRBILITY OF
DIGITAL
OR ITS

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPOR
AT ION:

DIG!TAL
DEC

POP
DECUS

UNIBUS
DECTAPE

MASSBUS

CZDMRDO DM11R LGC TST
MACY11
CZDMRD. P11
28-RAPR-78 13: 44

30A(1052)

28-APR-78

13:48

PRAG2
E

RBSTRACT
THO SEPARATE DIAGNOSTIC PROGRAMS ARE PROVIDED FOR
TESTING THE
DM11A (RSYNCHRONOUS DATR MULTIPLEXER). CZDMA (DM11
A
LOGIC TESTS). AND C2DNM8 (DM11R MULTIPLE LINE DATA
TESTS).
THE LOGIC TESTS INDIVIDUALLY TEST ERCH OF THE
16 DM11 LINES AND ALL COMMON LOGIC.
THE MULTIPLE LINE DATA

TESTS RUN SEVERAL LINES CONCURRENTLY AND ARE USED TO TEST
L INE

INTERRCTION AND DATA TRANSMISS |ON/RECEPTION RELIRB
ILITY.
THIS DOCUMENT DESCRIBES THE LOGIC TESTS.
THE AVAILABLE TESTS ARE:
PRGO - LOGIC TEST
PRG1 - TRANSMITTER SCOPE LOOP
PRGZ - TRANSMIT/RECEIVE SCOPE LOOP

REQUIREMENTS

EQUIPMENT

PDP 11 FAMILY PROCESSER

g ?I'l"itls CONNECTING 16 TRANSMITTERS TO THEIR RESPECTIVE
RECEIVERS.

2.2

STORAGE
THIS PROGRAM USES ALL OF CORE (8K) EXCEPT THAT
AREA RESERVED
FOR THE LORDERS.

LORDING PROCEEDURE

THE RBSOLUTE LORDER IS USED TO LOAD THE PROGRAM.

CZDMADO DM11A LGC TST_
MACY11
CZDMAD. P11
28-RPR-78 13: 4y

30A(1052)

USE PROCEDURE

4.1

STARTING PROCEDURE

28-APR-78

13: 48

PRGE 3

SEQ 0003

BEFORE STARTING MAKE SURE THAT THE TTY IS IN REMOT
E MODE. AND THE
JUMPERS ARE INSTALLED.
THREE STARTING RDORESSES ARE PROVIDED.
0200 - THIS STARTING ADDRESS REQUESTS DMi1 PARAMETERS.,
AND MUST
BE USED TO INITIALLY START THE PROGRAM. AND VMENEVER
ANY OF THE

PARAMETERS LISTED BELOM IS CHANGED.

VECTOR RDDRESS ?
RESPONSE:
TYPE IN THE VECTOR RODRESS OF THE DM11 RECE IVER
UNDER TEST.
CRRRIRGE RETURN SELECTS 0300

UNIT M(®)?

RESPONSE:
THE DM11 UNIT NUMBER CORRESPONDS TO THE
RDDRESS TO WHICH THE CONTROL STATUS REGISTER (CSR)
RESPONDS.

gSl RDDRESS
75000
175010
175020
175030
175080
175050

175060
175070

g"l UNIT &

1
2
3
Y
5
6
7

CSR RDDRESS
175100
175110
175120
175130
175180
175150

175160
175170

CARRIAGE RETURN SELECTS UNIT 8 Q

%Il UNIT &

11
12
13
14
15
16
17

ié +40
RESPONSE: = CHARACTER LENGTH REFERS TO THE NUMBER OF
BITS PER CHARACTER (5-8).
CARRIAGE RETURN DEFAULTS A CHARLENGTH OF "8". IF A CHARACTER LENGTH 5-7 IS DESIRED.
TYPE
'T;Ea'flrigti-?) OF THE DESIRED LENGTH RT THE KE

PRG #
RESPONSE:
TYPE PROGRAM NUMBER OF PROGRAM YOU WISH TO
RUN. CARRIRGE RETURN SELECTS PROGRAN § O.

WHAT IS THE CHARACTER LENGTH?

0204 - THIS STARTING

RS AND

«d

NOTES:
CARRIAGE RETURN TERMINATES ALL gms
ANY UNRCCEPTRBLE RESPONSE MIL
T INAR ? TYPEOUT AND
THE PARAMETER WILL RGAIN BE
REQUESTED.

gsu PREVIOUSLY DEF INED DM11

PROGRAM YOU WISH TO RUN.

THE PROGRAM NUMBER OF THE

ING RDDRESS STARTS THE PREVIOUSLY SELECTED
PROGRAM USING PREVIOUSLY SELECTED PARAMETERS.

CZDMRDO DM11A LGC TST
flig(zll'l 30A(1052)
CZDMRD. P11
28-RPR-78

4.2

28-APR-78

13:48

13
PAGE
Y4

SHITCH SETTINGS

THE FOLLOWING SWITCH SETTINGS APPLY TO PROGRAM
#0.

SR
SR
SR
SR
SR
SR
SR

0-6
8
9
11
13
14
15

ROUTINE TO BE RUN (IF ENRBLED BY SR-9)
RING BELL ON ERROR
LOOP SELECTED ROUT INE
INHIBIT ITERATION (DO EACH ROUTINE ONCE)
INHIBIT PRINTOUT
SCOPE (LOOP ROUTINE)
HALT ON ERROR
:

THIS PROGRAN HAS BEEN MODIFIED TO RUN ON A PROCESSOR
MITH OR MITHOUT
A HARDMARE SWITCH REGISTER. WHEN FIRST EXECUTED
THE PROGRAM TESTS

THE EXISTENCE OF R HARDWARE SWITCH REGISTER. IF NOT
FOUND R
SOFTHARE SHITCH REGISTER LOCATION (SWREG=LOC. 176
) IS DEFAULTED TO
IF THIS IS THE CRSE. UPON EXECUTION THE CONTENTS
OF THE SWREG
DUMPED IN OCTAL ON THE CONSOLE TTY AND ANY CHANGES
ARE REQUESTED
(1E)

SHR=XXXXXX

NEW=

POSSIBLE RESPONSES ARE:
1.

’

6 DIGITS 0-7

IF NO CHANGES RRE TO BE MADE

TO REPRESENT IN OCTAL THE NEM SWITCH REGISTER

%‘E&&L m""‘“l.&‘&"u"“.f':é&‘% IS COMMITTED

KEYING IN SHREG VALUE.

CZDMRDO DM11A LGC TST
l‘“;(ml 30R(1052)
CZDMAD. P11
28-RPR-78

28-APR-78

PROGRAM DESCRIPTION

5.1

PRGO - LOGIC TESTS

13:48

PRAGE
5

PRGO CONSISTS OF 152(8) INDEPENDENT ROUTINES WHICH
TEST
VARIOUS FUNCTIONS OF THE DM11 HARDMARE.
ANY OF THESE ROUTINES
g;figfi;MIWMLY SELECTED AND RUN (SEE SEC. 4.2 FOR
SWITCH

ROUTINE DESCRIPTION

ROUTINE

TESTS

RTO
TESTS THE RBILITY
REFERENCE THE FOUR DM11 REGISTERS
CONTROL STATUS REGISTER (
)
R ACT
REGISTER (BAR;,
BRERK STRTUS REGISTER (BKCSR)
IF AN ILLEGAL REFERENC
PROGRAM WILL IOIC&E

RT1-RT10 BIT "BANGS' THE C

EACH BIT IN THE (IS’I CAN BE INDIVIDUALLY SET AND CLERRE
D.
TMO E:lfl
TYPES ARE DETECTED
IN THE
BIT FRILED TO CLEAR.
THE ERROR PRINTOUT SHOMS THE ROUTINE THAT
FRILED AND THE PC WMERE THE ERROR MRS DETECTED.

g
&

RT11- TESTS THAT RESET
THE CSR :
ERROR TYPES ARE DETECTED IN THIS ROUTINE SHOMING
THE CONTENTS OF THE

§1.1

THE

LOOPS IF AN ERROR OCCURS.
SHOMN BELOM IS THE ERROR TYPEOUT.
RT11
PC=XXXXXX
ERR S/8: 000000 WRS: XXXXXX

CZDMRDO DM11A LGC TST
lg(‘ml 30A(1052)
CZDMAD. P11
28-RPR-78

28-APR-78

13:48

PRGE
6

ORDS R BINARY COUNT PATTERN INTO THE BKCSR AND RERDS
S. IF THE DATR READ BACK IS INCORRECT AN ERROR |S

SHITCH WILL CAUSE THE PROGRAM TO RELORD THE
T
TE ST.
THE ERROR TYPEOUT SHOMS CORR

THE_SECOND PORTION OF THE TEST CLERRS THE PREVIOUSLY LORDED NUMBE
R

IF_THE SCOPE SWITCH IS SET THE PROGRAM LOOPS BACK
AND REPEATS
THE CLEAR INSTRUCTION.

RT13
THIS ROUTINE LORDS RANDOM NUMBERS INTO THE BKCSR.
IF A
RANDOM NUMBER 1S LORDED INCORRECTLY AN ERROR IS INDICATED
SHOMING
THE CORRECT AND RCTUAL RES TS.
RT1Y
THIS ROUTINE TESTS THAT RESET MILL CLEAR ALL BREAK
STATUS REGISTER (BKCSR) BITS. | F ALL BITS DC_NOT CLEAR WHEN
THE RESET IS GIVEN
AN ERROR IS INDICRTED.
THE ER ROR TYPEOUT SHOWS THE CORRECT RESULT
(ALL 0°S) AND THE RCTUAL RESULT.
RT15-RT16 THESE ROUTINE
THE BRSE REGISTER IS TE
RT1?

THIS ROUTINE TE
8 ITS CAN BE _INDIVIDUALLY
SET AND CLERRED.
THE ROUTINE SMIFTS A i ' THROUGH THE BAR THEREBY
SETTING EACH BAR BIT
8 T IS CLEARED.
THE ERROR
TYPEOUTS SHOM CORRECT AND ACTUAL RESUL TS

RT20 _ THIS ROUTINE TESTS THAT RESET AND CLERR
CLEAR ALL BAR BITS
THE ERROR TYPEOUT SMOMS CORRECT AND ACTURL
RESULTS.

PROPERLY TO BYTE COMMANDS.

ROUTINES w‘a&? INSTRUCTIONS.

RT24

CSR. BAR. AND BKCSR RE

BOTH BYTES ARE REFERENCED IN THESE

THE ERROR TYPEOUT SHOMS CORRECT

THIS ROUTINE TESTS THAT THE DM1t sm INTERRUPT THE PROCESSOR

VIR THE OVER RUN BIT (CSR BIT 13).
THE E
TYPEOUT SHOMS THE
ROUTINE NUMBER AND THE PC WMERE THME ERROR MRS DETEC
TED.

RT25
THIS ROUTINE TESTS THAT THE DM11 INTERRUPTS THE
PROCESSER
AT THE PROPER LEVEL.

RT26-RT4S

THESE ROUTINES TEST THE BRSIC TRANSMITTER FUNCTIONS

RT46-RT65

THESE ROUTINES TEST THE BARSIC RECEIVER FUNCTIONS ON

ON EACH LINE

EACH LINE

RT66

THIS ROUTINE TESTS THAT THE DM11 WILL SET THE NEX BIT

(CSR BIT 14).
WHEN THE DM11 TRIES TO TRANSMIT FROM NON-EX!STANT
MEMORY.
ALL LINES ARE I'OWI%%Y TRANSHITTED ON.
THE ERROR TYPEOQUT
SHOMS THE FAILING LINE. ALSO
D IS THAT THE NEX BIT WHEN SET
CRUSES AN INTERRUPT.

SEQ 0006

CZDMRDO DM11RA LGC

MACY11

28-RAPR-78 13: 4y

30RA(1052)

28-APR-78

13:48

PRAGE 7

SEQ 0007

RT6?
THIS R
TINE TESTS THAT THE NEX BIT
|
(CSR BIT 14) SETS
WHEN THE DM11 T RIES TO REFERENCE THE TUMBLE E
TRBLE THAT IS IN NONEXISTANT ME
A

THE TYPEOUT SHOMN BELON SHOMS THAT DATA WAS RE(E:
VEO ON LINE O
RT70
PC=XXXXXX
ERRS/8: 000001 WAS:

mw-85m3Hm_,imw_-umemi|m|Tmmmms5mt

CZDMRD. P11

TST

,b“al mum o8

RT?1
PROPERLY
INTO IN

m
m

nfl
Ull

T AND RECEIVE CORRECT

IF THE CORE LOCATION IS

CZDMADO DM11R LGC TST
MACY11
CZDMRD. P11
28-RAPR-78 13: 44

30A(1052)

28-RAPR-78

13:48

PAGE
8

SEQ 0008

RT73
THIS ROUTINE TESTS THAT THE TRANSMITTER CAN TRANS
MIT
100 CHARACTERS ON EACH LINE.
THE ROUTINE TESTS THAT EXACTLY
100 CHARACTERS HAVE BEEN TRANSMITTED BEFORE RERDY
(CSR BIT15)

SETS AND THE BAR BIT CLEARS.
THE ERROR TYPEOUT GIVES THE NUMBER
OF CHARACTERS RECEIVED AT THE TIME OF AN ERROR. AND
THE FAIL ING L INE

RT?74

THIS ROUTINE TESTS THAT THE DM11 MILL STORE DATA SEQUENTIAL
LY

IN THE TUMBLE TRBLE
SO _THAT THE POINTER RETURNS TO THE TOP
OF THE TRBLE MHEN 6% CHARARCTERS MAVE BEEN RECE
IVED.

RT7S-114

THESE ROUTINES CHECK THAT R BRERAK CAN BE

TRANSMITTED AND RECEIVED ON ALL AL INES.

R115-R13y%

THESE ROUTINES INDIVIDUALLY TRANSMIT, RECEIVE

AND CHECK DATR PLUS PARITY ON ERCH OF THE 16 DM11 LINES.
DATR AND PARITY ERRORS ARE REPORTED.

ONLY

RT131 _ THIS ROUTINE SIMULTANEOUSLY TRANSMITS AND
RECE IVES A
CHARACTER (ALL 1°S) ON THE 16 DM11 LINES THE FOLLOWING
TESTS
ARE PERFORMED:
R:
THERE ARE 16 DATR ENTRIES (1 PER LINE)
B:
THERE ISN'T R 17TH ENTRY
C:
DATA IS CORRECY
D:
ONE ENTRY FOR ERCH LINE
RT136
THIS ROUTINE TRANSMITS R BREAK ON EACH LINE.
ARE THE SAME AS IN RT135

TESTS PERFORMED

RT137-RT144 THESE ROUTINES TRANSMIT 6%
HITH A DELAY BEFORE BEGINNING TRANSMISSION ON
THE NEXT SUCCESSIVE
LINE.
THE DELAY BEFORE
ITTING ON
NE

TE* ST
TESTED S
ARE THAT OVER AU (Co8 81

B
:

RTINS
THIS ROUTINE TESTS PROPER OPERATI
BIT (CSR BITY)

ARE NOT SET DURING TRANSMNISSION/RECEP

IRT¢ ' HEHELS TSR INLTE Bs, Ol e
DEF

INED RS CSR. BAR. AND BKCS CLEAR IMMEDIATLY AFTER THE RESET
INSTRUCTION AND STAY CLERRED.

PRG1TRANSMITTER SCOPE LOOP
PROGRAM 1 ALLOWS
USER TO
SCOPE THE

HITH THE DM11 Cfl;.l‘mv RUNNING UNDER USER SUPPL
53

PRGZTRANSHITTER/RECEIVER SC OPE
PROGRAM Z ALLOMS THE USER TO SCOE THE
THE DM11 CONTINUOULY RUNNING UNDER USER SUPP

CE IVER FUNCTIONS MITH
ED PRRAMETERS.

CZDMADO DM11A LGC TST_
MACY11
CZDMAD. P11
28-RPR-78 13: 4y

6.0

30R(1052)

28-APR-78

13 48

PRAGE 9

PROGRAM 1 AND PROGRAM 2 PARAME TERS
HHEN PROGRAM 1 OR PROGRAM 2 ARE SELECTED ADDITIONAL

BE REQUESTED BY ERCH PROGRAM AS SHOMN BELOM.

SEQ 0009

PRARAMETERS WILL

A: TY{ESLIKS TO BE TESTED
EXAMPLE
}’YPE
50 SELECT LINE(S)

3
10
17

1.0
3
3.2.1.0

5.3

17770
1772777

14,13.12,11,10.7,6.5.4.
3
AL L

3101

NOTE.

10.7.6.0

LINE NUMBERS RRE GIVEN IN OCTAL.

B: HOW MANY CHARACTERS
TYPE THE NUMBER OF CHARACTERS YOU WISH TO TRANSMIT. NOTE.
R!‘K'.T.L‘. OF CHARRCTERS MUST BE LESS THAN 200. AND IS TAKEN
C: PUT CHARACTER IN SR (0-7);DELAY IN SR (8-15)
SELF-EXPLANATORY. NOTE. THE DELAY REFERS TO A DELAY
AFTER
ALL THE CHARACTERS MAVE BEEN TRANSMITTED AND BEFORE
R NEW
TRANSHISSION PERIOD BEGINS.

7.0

PROGRAN umm:

PROGRAN NOTES

IF THE POMER FAILS THE PROGRAM TYPES AN ERROR MESSAGE INDICA
TING THE
ROUTINE THAT WAS RUNNING (PROG 80 ONLY) AND RESTRRTS THE
PROGRANM
SESESTTXLLLTTLLLLLL INPORTANT NOTE ZTTTTILRTRILILLL

o raamurgrw THE POMER FRIL LOGIC SHOULD BE PERFORMED ON ERCH UNIT

SELECT & RUN ROUTINE 144 (L.A = 210 SR =51% ®RESS START)
. TURN
THE POMER OFF THEN ON. TME PROGRAM WILL TYPE OUT THE
POMER FRIL
ERROR
R14% PC
AND CONTINUE
RUNNING
INE 1%%. LOMER SR 9 AND WRIT FOR END OF

r'a‘or’} "ar"m"" r&'&' [

8"5# %mn SET INSTRUCTION THE
PROGRAM WILL MALT. r‘m CONTI
NUE AND umg THE TEST

IF THE PROGRAN HANGS THE BUS EXAMINE THE CONTENTS OF RTNNO.
THE
&W&lfl;flifiu‘{w IS THE ROUTINE NUMBER THAT WAS RUNNI
NG AT THE TINE

CZDMADO DM11A LGC TST
MACY11
CZDMRD . P11
28-RPR-78 13: 4y

.TITLE

413

30R(1052)

28-APR-78

13:48

PAGE 10

CZDMADO DM11R LGC TST
.LIST

ME,.BIN, SEQ
. ENRBLE RBS.AMA

- CZDMADO DM11A LGC TST
;PRGO- INPUT-OUTPUT LOGIC TESTS
;PRG1- TRANSMITTER SCOPE LOOP
;PRG2- TRANSMIT/RECEIVE SCOPE LOOP
;STRNDARD SR SWITCH OPTIONS (SHITCH SET TO R 1
:SR15- MALT ON ERROR
:SR14- SCOPE.
:SR13-

)

:SR9- LOOP ROUTINE.
:SR8RING BELL ON AN ERROR
:SR6 THROUGH SRO - NUMBER OF ROUTINE TO BE LOOPED.
;EQUATE grmmS

;RDDRESS OF ERROR TRAP VECTOR
MANURL=BIT15

g%.?

S5EEEEEEEE
eRIREET Feve AL233
85388
R8sy

LB 1T15=20000
LBIT14=10000
LB IT13=4000

85888

g e =
o nf e

Besl el okt Dol s pmds

=
§
08

88828%:

FEEREETRAFRINASE

bttt G

oc 8-

000

CZDMRDO DM11A LGC TST
HACY11
CZDMRD. P11
28-RPR-78 13: 4y

510
511
512
513
514
515
516
517

518

‘E

519

13:48

PRAGE 11

000010

POPSP2=022626
PRTY?=340
PRTY6=300
PRTYS=240
PRTY4=200
PRTY3=140
PRTY2=100
PRTY1=40
PRTY0=0

et gt e

SERBRINBT
F~o

ARAR
weew
NERREVRS

bttt
R pe—

sLINE NUMBERS
Lttt
et et et ettt at ad

CHEEL &

486
487
488
489
4950
491
492
493
494
495
496
497
498
499

28-APR-78

466
467
468
469
470
471
422
473
474
475
476
47?7
478
479
480
481
482
483
484
485

30A(1052)

;POP THE STACK. SAME AS TST (6)+
;POP STRCK THICE. SAME RS CMP (6)+, (6)+
;PRIORITY LEVEL DEF INITIONS

CZDMRDO DM11A LGC TST_
MACY11 30R(1052)
CZDMAD. P11
28-RPR-78 13: 4y
%

1727227

524

000000

527

000000

000002
000000
monm

532
533
S3%
S35
536
537
538
539
S40
S41
SA2

000010
000012
00001%
000016
000020
000022
00002%
000026
000030
000032
0000

000012
000000
000016
000000
000022
000000
000026
000000
003100
000340
006000

Sv%
fi

000036

0OOONO
000082

000340

OOO0N2
000000

PRGE 12

SEQ 0012

Y=0

n=6'

000000
000002
mm

13: 48

RTLAST=-1

122777

528
529
gg

S43

28-RAPR-78

. =0

MACHER:

42
HALT
D:\ET

;UNRSS IGNED TRAP

42
HALT
.42
HALT
42
HALT
.42
HALT
EMTINT
PRTY?
DLY

;RESERVED INSTRUCTION TRAP

;TRAP TRAP.

R
w&r

; TRAPPED TO PREVIOUS RDDRESS.

PRTY?

;SP OVERFLOW.,

BUS ERROR TRAP

; TRACE TRAP

;TRAP TO CALL 10X
;POMER FRIL TRAP

;ENT TRAP
SIMILAR TO EMT

g: -s|
:
mm”

iu’uit

“m

ifir

; TRAPPED TO PREVIOUS RDORESS.

000086

000000

iu’uir

; TRAPPED TO PREVIOUS RDORESS.

4 mflflfl 00000

56 000C Soeors

000072

(000000

2’& 000076
5‘8 000102

2..3 gb
00
g =g ug
g ng

g m'
”’
g; ==g
g.z uu"g
575 uu“x
576
577

000140
000142

00
%
00
000142
000000

if'z"

i%'

; TRAPPED TO PREVIOUS RDODRESS.

THIPPED 0 Pmens oms

‘THIPPEN 19 fiiviews e se

il’lz.f

;TRAPPED TO PREVIOUS RDORESS.

i?.zr

; TRAPPED TO PREVIOUS RDORESS.

i%t

;TRAPPED TO PREVIOUS RDDRESS.

i?z.t

: TRAPPED TO PREVIOUS RDDRESS.

il’lz.f
i?it
il’llz.l’
i%r
i%r
HALT

.42
HALT

; TRAPPED TO PREVIOUS RDDRESS.
; TRAPPED TO PREVIOUS RDDRESS.

; TRAPPED TO PREVIOUS RDDRESS.
; TRAPPED TO PREVIOUS RDDRESS.
; TRAPPED TO PREVIOUS RDORESS.
: TRRPPED TO PREVIOUS RDORESS.
; TRAPPED TO PREVIOUS RDDRESS.

CZDMADO DM11A LGC TST_
MACY11 30R(1052)
C ZDMRD. P11
Z8-APR-78 13: 4y

578
579

Satssensesss

LT
i‘

AL LT

000176

FESEBTBREY

EBSGEEGSEESEssasazaazs5555ESEE§§§!§§§$§§§§§Efiififfifi§§

000146

28-APR-78

. 42
HALY
. 42
HALT
. 42
HALT
. 42
HALT
. +2
HALT
. 42
HALT
. 42
HALT
. 42

HALT

13:48

PAGE 13

SEQ 0013

: TRAPPED TO PREVIOUS RDODRESS.

: TRAPPED TO PREVIOUS RDORESS.

: TRAPPED TO PREVIOUS ADDRESS.
: TRAPPED TO PREVIOUS RDDRESS.

: TRAPPED TO PREVIOUS RDDRESS.
: TRAPPED TO PREVIOUS RDORESS.

: TRAPPED TO PREVIOUS RDDRESS.
: TRAPPED TO PREVIOUS RDORESS.
; TRAPPED TO PREVIOUS RDORESS.
; TRAPPED TO PREVIOUS RDDRESS.
: TRAPPED TO PREVIOUS RDORESS.
; TRAPPED TO PREVIOUS RDDRESS.

: TRAPPED TO PREVIOUS RDDRESS.
; TRAPPED TO PREVIOUS RDDRESS.

: TRAPPED TO PREVICUS RDODRESS.

: TRAPPED TO PREVIOUS RDORESS.
:TRAPPED TO PREVIOUS RDDRESS

; TRAPPED TO PREVIOUS RDORESS.
: TRRPPED TO PREVIOUS RDODRESS.

: TRAPPED TO PREVIOUS RDORESS.
: TRAPPED TO PREVIOUS RDODRESS.
: TRAPPED TO PREVIOUS RDODRESS.
: TRAPPED TO PREVIOUS ADDRESS.

: TRAPPED TO PREVIOUS RDODRESS.
: TRAPPED TO PREVIOUS RDDRESS.
: TRAPPED TO PREVIOUS RDDRESS.
: TRRPPED TO PREVIOUS RDDRESS.
: TRAPPED TO PREVIOUS RDORESS.

FROEREEIISIzEzL
s e

CZDMRDO DM11A LGC TST
MACY11 30A(1052)
C ZDMRD. P11
28-APR-78 13: 4y

28-RAPR-78

13: 48

B
2
PAGE 1Y

SEQ 0014

. 42

HALT
. 42
HALT
. 42
HALT
. 42

HALT
. 42
HALT
. 42
HALT

: TRAPPED TO PREVIOUS ADDRESS.

: TRAPPED TO PREVIOUS ADORESS.
: TRAPPED TO PREVIOUS ADDRESS.

: TRAPPED TO PREVIOUS RDDRESS.
: TRAPPED TO PREVIOUS ADDRESS.

; TRAPPED TO PREVIOUS RDORESS.
: TRAPPED TO PREVIOUS ADDRESS.
: TRRPPED TO PREVIOUS RDDRESS.

; TRAPPED TO PREVIOUS RDORESS.
: TRAPPED TO PREVIOUS RDDRESS.

: TRAPPED TO PREVIOUS RDORESS.

CZDIMADO0 DM11R LGC TST
MACY11
CZDMRD. P11
28-APR-78 13: 4y
657

658
659

000046

661
662
663

000052

665
gg

000174
Q00176

&60

S64

HHE
669
670

000200
000208

672
:773

30A(1052)

28-RPR-78

000086

000052

60000

000174

. =174

000000
000000

DISPREG: 0
SHREG:
O

. =200

000210

000137

002514

676
677
678

001200
001202
001208

000000
177570
175570

SPBOT:
O
SHR:
177570
DISPLAY: 175570

680

001%00

000000

CAT:

§79%

001200

001%00

681
001440
682 001%0 000000
683
001500
68% 001500 000000
685
001540
686
687

688
689
650

691

001540
001542

0015%
00154

001550

001562

000000
175000

017z

0OOZN0
000000
00020

¢ 001N OO0

701 001600

712

002022

711

MCT:
BAT
VRC:
CSR:

_=CAT+32
=MCT+32
GPEN
. =BAT+32
OPEN

OPEN
175000

175002
175004

BASREG:

175006

CLKLVL:
XATINT:
XNTLVL:
TTOAT:
LINGIT:

PRTYS
OPEN
PRTYS
OPEN
OPEM

;RESTART PREVIOUS PROGRAM USING
;PREVIOUS DM11 PARAMETERS

;44D

;STRARTING RDDRESS OF

: CURRENT RDORESS TRBLE
:HORD COUNT TRBLE
;STRARTING RDDRESS OF
81T ASSENRLY TRBLE

; ;44D

:STRRTING RODRES OF

;32
WORDS
ADORESS OF CLOCK STATUS REGISTER

:
;

oF
oF

;

ACTIVE REGISTER
STATUS REGISTER

OF BRSE REGISTER

onty

RDORESS (RECE IVER)

IPRIORITY LEVEL
:DM11 VECTOR RDORESS (TRANSMITTER)
TRANSMITTER PRIORITY LEVEL
:TUNBLE TRBLE DATA
SLINE BIT (FOR BAR)

TORT. SPEN

CRRMSK: OPEN
. B

CURTST: OPEN
RTNNO: OPEN

016574

;USING PREVIOUS DM11 PARAMETERS

. =1%00

OPEN

KSTART: OPEN

016514

;G0 TO START OF DIAGNOSTIC.
;G0 GET PROGRAM 8 & RESTART PROGRAM

. =1200

TUNTRS:

002000

2
"
6

SBRSTAT2

CLKINT: OPEN

000000

706
%67
78
509
710

JMP

000000

001S6%
001566
001560
001562
00164

o
g

S8START
SERSTATY

8AR:
BKCSR:

692
693
én
695
¢%

703

JMP
JMP

175002
17500%

175006

SEQ 0015

. =52

060000

002360
002426

SENDRD

000137
000137

671

PRGE 15

. =46

003036

000200

13: 48

NXTST: OP
ICTR: OPEN
SCOPTR:
PRGLIM: OPEN
PRGTRS: PRGO
PRGI

PRG2

; STRRTING ROORESS oF

‘

CURRENT

: CONTA
: CONTRI

l'.t

START RODRESS.

OF CURRENT TEST.
TEST &

: CONTA|
OF NEXT TEST.
: CONTR)
ITERATION COUNT
: CONTA
SCOPE POINTER.
;PRGO START RDORESS
:PRGI START RDDRESS

:PRG2 START RODRESS

CZDMADO DM11A LGC TST
MACY11
CZOMRD. P11
28-APR-78 13: 4y

007120
016524
016604

b
L T

CEFLPRPPPRREPDNRRRI
RS

003322
002146

30A(1052)

28-RPR-78

RSTART:

EMTTAR:

TKCSR:
TKDBR:
TPCSR:
TPDBR:
COUNT:
PCRDD:
APCADD:
PRVCNT:
.CSR:

. BAR:

13:48

PRGOR
PRGIR

PRG2R
TYP
ERR
DTCHK
0
0
SRSETT
ESCOPE
SAVRG
RSTRG
ERR1
INIT

SUSKHRR
KBDINTT
CNTLWY

177560
177562
177564
177566
OPEN
OPEN
OPEN
OPEN
175001

175003

. BKCSR: 175005
. BASREG: 175007
ASS:
OPEN

D
PAGE 16

SEQ 0016
;PRGO RESTART ADDRESS

iPR62

;POINTER
;POINTER
;POINTER
;POINTER
;POINTER
;POINTER

TO RESET ROUT INE
TO SCOPE ROUT INE
TO SAVE REGISTERS ROUTINE
TO RESTORE REGISTERS ROUT INE
TO ERROR1 ROUT INE
TO INITIALIZE ROUTINE

:POINTER TO TYPEOUT ROUTINE
;POINTER TO ERROR ROUT INE
;POINTER TO DATA COMPARISON ROUT INE

CZDMADD DM11A LGC TST_
MACY11
CZDMRD. P11
28-RAPR-78 13: 4y

30A(1052)

28-APR-78

13:48

E_
2
PRAGE 17

SEQ 0017

743

244
45

246
747
7

750

721
752
753
754
755

757
758
759

260
761
262
763
764
765
766
267
768
769

770
771

772
773

002120
002122
002124

104000
020017
000207

002126
002134
002136
002142
0021%

123737
001403
004737
104011
000002

0221%
002154
002162
00216
002172
002200
002208
002206
002218
002216

002222
00222v

002226
002230

012737
013737
00ON10
012737
013737
OON?37
108014
032777
001017
OONS3?

002102
(02022%

000006
OONS37

774
775

002238
00223

002004
020216

777
778

00292
002%

108000
020213

779

0022%

000000

782
783

002258
002262

032777
001411

78
786

002264

002272

787 002300
789
790

002306
00231%

791
79

002316
002322

002326

7%
797

798

;ROUTINE_TO TYPE OUT

INCRTN:

001566

001570

002246
002102

ERR:

000240
002100
002332

00224
002102

ERR1:

020000

176766

RTHNO
AT

ERRB:
176720

012777

000007

17757%

023737
001403

000042

OOOOMG

10801%

000002

RCVDAT,XMTDAT
1§
7. CNVDAT

;TYPE INCORRECT ROUTINE SELECTED.
EXIT,

; COMPARE RECEIVED & TRANSMITTED DATA
;CHARS. BRANCH IF SAME.
; CONVERT RCVDAT & XMTDAT TO ASCI1

; EXIT,

MOV
8402 ERRS
MOV
PCROD.APCADD
BR
ERRA
MOV
§240. ERRS
MOV
PCROD.APCADD
JSR
7, CNVDAT
KBDIN
BIT
WBITIZ.3SMR
BNE
ERRC
JSR
5, 0RCNV

6
JSR

006154

176660

CMPB
8EQ
JSR
ERROR1
RT

AP CAOD
APC

177602

005777
100001

ERRA:

006154

177566

;ERROR ROUTINE WHENEVER THE PROGAM DETECTS AN ERROR THE ERROR
;AND ERROR1 EMT INSTRUCTIONS ENTER MERE. ERROR AT ERR: , AND
;ERROR1 AT ERR1:

000MO2
002100

108777

INCORRECT ROUTINE SELECTED

;DATA COMPAR ISON ROU
IT
NE.

DTCHK:

002332

0OONOD

TYPE
M
RTS

ERRC:

TYPE
ENO

BIT
8EQ

MOV

e
ERREX:

;MOVE NOP TO ERRB
:GET PC MMERE ERROR OCCURRED
;CONVERT RCVDAT & XMIT DAT TO ASCI|
;60 CHECK FOR 6
ERROR PRINTOUT DESIRED
;BRANCH IF NO PRINTOUT
; CONVERT

:DATA
;10

RSCH
;FOR

; PRINTOUT
;TYPE ERROR
: NESSABE

OPEN

IsT

ERRD:

5, 0RCNV

;MOV BR . +6 TO ERRS
:GET PC WMMERE ERROR OCCURRED

;NOP IF ERROR1, BR .46 IF ERROR
#8178, 3SR
ERRD

;RING BELL ON ERROR?
;BRANCH IF NO BELL ON ERROR

aTPCse

; TELEPRINTER

IsTe

aTPCSR

§BELL.ATPDBR

.RIN
THE BELL
G

CMP
BEQ

30M2.
ERRML

;ACT11?

ST
fi'
KBODIN

RTI

asi
RREX

;MAIT FOR THE BELL TO RING

;HAL
ON ERROR
T
;60 TO EXIT IF NO MALT ON ERROR
;CHECK FOR

; RETURN

;SUBROUTINE TO CONVERT RCVDRT AND XMTDAT TO RSCI! AND PLACE

CZDMADO DM11A LGC TST_
MACY11 30R(1052)
CZDMAD. P11
28-APR-78 13: w4

799

80C
801
802
803

b=y

804
805
806
807
g

002332
002336
002M0
0022

0023M%
002350
002352
002354

002356

004537
001570
017766
000006

004537
001566
020002
000006

000207

006154

28-APR-78

; IN MESSAGE.

CNVDAT:

13 48

JSR
XMTDAT
AASB
6
JSR
RCVDAT
RHRS
6
RTS

PRGE 18

SEQ 0018

5. ORCNV

JEXIT

CZDMADO DM11A LGC TST
MACY11
CZDMAD. P11
28-RPR-78 13: 44

30A(i052)

28-APR-78

13:48

PAGE 19

2
SEQ 0019

811
812
813

:THE FIRST PART OF THE START ROUTINE CONTRINS R
SHORT
;ROUTINE TO CHECK FOR MEMORY MANAGEMENT. ALTHOUGH
THIS
;DIRGNOSTIC DOES NOT USE MEMORY MANRGEMENT, ITS
PRESENCE

815
:}g

;CRSE_TESTS RT66 AND RT6? MAY FAIL. IF MEM R
;PRESENT THESE TESTS ARE SKIPPED BY THE PROGRAM.

814

: INDICATES THAT OVER 28K OF MEMORY MAY BE PRESE
NT

818
819
820
821
822

002360
002364
002366
002374
002900

012706
104013
012737
005737
012737

824
g

002406
002410

000402
012706

001200

002418

012737

000006

002422
002426
002432
002v3%
002%2
002948
002%6
OO2NS0

008737
012706
104012
023737
001405
104000
020011
OONS37

0O034eM
001200

823

001200

002410
172300
012716

START:

00000Y
012320
18:
0O0000%

MOV
SUSKR
NOV
TST
MoV

$1S,. 8ERRVEC
8172300
RT70, MRTE5+42

BR
MOV

. *6
#SPBOT. %6

MOV

SERRVEC+2, 9RERRVEC

#SPBOT. %6

1N bri. CH

;SEE IF SHITCH-LESS PROCESSOR
;SET UP FOR ERROR TRAP
:TEST FOR KT11
. KT11 PRESENT, SET U 710

;SKIP RT66 AND RTH?

;;ggrocsgl'p(:to. NO K711 PRESENT.
sRESET ERROR TRAP

829

830

831
832
833
834
835
836
837
838

000082

000000
ON3737
006337
012737
012737
013700
000170
012737
012737

853

013708 002vsH

002014
002454
004576
0OONO
OOZWSH
002016
OONS76
000G

B8 COZI 012706 001200

3
-

55
56
57

000046

0OWN16

839 0O26%
SN0 002966
41 002%A
2 002N70
3 002%76
SW 002508
S5 002510
6 002518
N7 002522

RSTATI:

0O2YSH
00002%
000026

00002%
000026

O
BIC
ASL
MOV
MOV
NV
P
RSTAT2: MOV
NV

PRGLIM.PRGNUM
PRGMUN
SPFRIL.
2%
SPRTY?.
25
PRGN
XD
aPRGTABID)
SPFAIL.
2
GPRTYZ.
2%

S5PeOT %

8£Q
P

MOV

PRGN,

002024

000176 001202 SRSET: (NP
%10

IRSTART(D)

“05

000042

N2, 30%

000046

PRGMUN:

JSR
7. 3RDNPAR
MOV
8SPBOT.
%
INITIAL 12E
CHP
2842 aR%6
BEQ
PRGNUM+2
TYPE
Mo
JSR
.RECD

8€Q
TYPE
3

SSWREG.
S®
TROY

013757 002000 002006 Hreov: v’ asTmmT WTST
012737 000006 000004 GTROVK:

¢ 0ONY 00304

865 002622 032777 001000

866 002630 001003

176352

nov

86MERRVEC

817

179, 3SR

GTROYR: JSR
SNE

X7.FORMO

GTROYC

;OUT INTERRUPTS (SET PRIORITY LEVEL 7)
;GET DM11 PARAMETERS

;ACT11?

:GET PRGNUN AND PUT 1T
: MERE
- MASK OFF UNUSED B1TS
SHIFT PROGRAM 8

;GET PROGRAN 8
60 START PROGRAM

;GET PROGRAN &

GO RESTART PROGRAM

;ACTI1?

; TYPE MESSRGE TO REQUEST SWITCH
REGISTER SETTINGS

MAIT FOR OPERATOR TO SET SWITCHES

RooRe T

;RESET ERROR TRAP VECTOR

ROLL FORMARD TO *MEXT" ROUTINE.

:CHECK SELECT ROUTINE SWITCH

BRANCH IF SELECT ROUTINE SMITCM 1S SET

E| 3@855!8’!!3‘58 §aNIEGE 95 e
»

GTRDYR
%7, INCRTN
GETROY

8-1,NXTST

agi:

BNE
JSR
3R

CMP

GTRDYD

INE NOT FOUND YET.

K
LAST ROUTINE.
F _NOT LAST ROUTINE.
INCORRECT ROUTINE SELECTED.
o

SCURTST

JHP

D BITS

-y

RTNNO, X0

GTRDYD:

002120

CHPB

BNE
002006

SSKR. %0
#177600, %0

MOV
8IC

RUN CURRENT ROUT INE.
?0. MANUAL RTN BYPASSED.

=3822 ‘\s o

177120
1227227

GTROYC:

SCOPED

126336
177600
002004

B8R

SCURTST

AT TR

Jnp

PAGE 20

17714y

13:48

T T

28-APR-78

30A(1052)

[7]

§§3§523!5.’.!!ll!“!!!!l!!!!!!!!!!!l!ll!!!!!3355333553325

CZDIWD0 DM11R LGC TST
MACY11
CZDMRD. P11
28-APR-78 13: w4

: SCOPE SERVICE ROUTINE
ESCOPE: NOP

KBDIN
CLR
CLR
CLR

28AR
oCSR
oBKCSR

INITIALIZE

MOV

176246

176232

SCOPER:
SCOPEB:

000046

18:
176176

SCOPED:

002006

BIT
BEQ

JnP
BIT

o(SP)
881711, aSuR

al:

gnz.ans

TST
BEQ

SUPRSS
SCOPED

BNE

SCOPER

BNE

DEC
BIT

BNE

INC

TYPE

SENDRD:

SCOPTR. (SP)

8BI1T1N, SSUR
SCOPEDR

SCOPED

ICTR

88179, ISR

GETRDY

S8PRSS

nov
8EQ

o8%2. X0
GETRDY

JSR
NOP

7. (0

RESEY

s CHECK FOR 6
;CLEAR ALL DM11 REGISTERS
+AND SET BRSE REGISTER
;AT THE STARTING ADDRESS

;CHECK FOR SCOPE OPTIOM.
sBRANCH IF SCOPE SM NOT SET.
sRETURN TO ROUTINE
;TEST INMIBIT ITERATION SHITCH

BRANCH IF INMIBIT ITERATION SW SET.

sACT11?
:BR IF NO
; 1ST PASS?

:&.m”
Nt ITERATION COUNT

sBRANCH IF COUNT NOT 0.
;CHECK SELECT ROUTINE SHITCH
sBRANCH IF SELECT RTN Su SET
H &AST TEST??
sBRANCH IF NOT LAST TEST.
;TYPE
; "PRGEND*
s CHECK XXDP/RCT11 MOMITOR MOOK

sRETURN TO XXDP/RCT11 MONITOR

NOP

FORMD:

FORMDA:

NOP

MOV

NXTST.
X6

MOV

(5)+. ICTR

MOV
RTS

X5, CURTST
x?

nov
nov

nov

;EMT TRAP

(5)+,. RTNNO
(5)+, NXTST

(5)+, SCOPTR

INTERPRETER

EMTINT: Mov

(6).-(6)

:GET PC OF NEXT INSTRUCTION

162716
011637
017616
105066
006316

062716

013607
012637
012637

010446
0103vé

30R(1052)

28-APR-78

000002
002100
000000
000001

003166
003170

13:48

82, (6)

)
CLRB

a(6). (b)
1(6)

RSL
RDD
MoV

PRAGE 21

SuB

MOV

002032

003170
003166

nov

SVRPC:
SVRPSH:

RTI
OPEN
OPEN

SEQ 0021
:FORM PC OF ENT INSTRUCTION
;GET PC OF EMT INSTRUCTION
;GET ENT INSTRUCT ION
;CLERR MSH OF EMT INSTRUCTION
:SHIFT ENT IDENTIF IER

(6).PCROD

(6)
SENTTRAB. ()
(6)+%7
,

:SRVE REGS O TO 4 SUBROUT INE
VRG:
no|
(6)+, SVRPC

MoV
nov
MoV
nov
MOV
Mov

(6)+, SYRPSH
M. -(6)
%3.-(6)
%2.-(6)
X1.-(6)
%0.-(6)

SVRPSU. -(6)

SVRPC. -(6)

;G0 TO PROPER ENT

;SAVE PC AND PSW.
;SRAVE REGS O - v
; IN STRCK.

;RESTORE PC AND PSK.

JEXIT.

;RESTORE REGS O TO 4 SUBROUTINE.
RSTRG:
MOV
(6)+.RSTPC
;SAVE PC AND PSW

RSTPC:
RSTPSH:

nov
nov
nov
nov
MoV
nov

(6)+. RSTPSU
(6)+.%0
(b)+, X1
(6)+, X2
(6)+.%3
(6)+.
XN

nov
nov

RSTPSM. -(6)
RSTPC. -(6)

RTI
OPEN
OPEN

;RESTORE PC AND PSW
SEXIT

;ROUTINE TO ISSUE RESET.
SRSETT: MoV
$52525.
0

con
nov

RESEY

%0
X0. SRSETT+2

RTI

nov

RP1.2%0

ROO

31.&

RDD
ROL
ROL
MoV

;RANDOM NUMBER GENERATOR

nov

003320

sRESTORE REGS O - &
;FROM STACK.

LR
TR PR Y

003102
003106
003112
003116

i M 061

33335855’““!!&!!““{!!!!!!!!!!!!!!!55536?55%5353335

CZDIMADO DN11R LGC TST
MACY11
CZDMAD. P11
28-RAPR-78 13: Wy

X0.RP1

RP2.%0
X0
g
+RP2

;DRTR TO RO.

COMPLEMENT (RO).
(RO) TO

TT+2

ISSUE RESET. (RD) IS
DISPLAYED. EXIT.

ROUTINE EXITS MITH NUMBER IN REGISTER O

CZDMADO DR11A LGC TST
MACY11 30A(1052)
CZOMAD. P11
28-RAPR-78 13: Y&

979
980
981
982

003310
00331%
003316
003320

013700
000207
001233
007622

98%
985

003322
003328

011600
062716

987
988
989
990
991
992
&3

003332
003336
003WTMN
J03IN6
003350
003356
mmm

112037
122737
001001
000002
§22737
001412
m

003366

113777

003432

983

003316

RP1:
RP2:

995

003366

00337%

}um

998
999
1000
1001
1002
1003
}&

00N02
00MOS
003M2
0O3N6
003N2y
0O3N30
003432

000207
112737
004737
112737
008737
000740
000000

TYP:

000002

003432
000100

003432

000045

003432

TYPC:

176500

TYPD:

176472

000015
003366
000012
003366

TYPR:

003432

TYPF:

003432

TYPG:

TYPOAT:

1006
:g

1009
1010
1011
1012
:gg

13:48

PRGE 22

MOV
RTS
1233
7622

RP1.%0
%7

oV
ROD

#%6. %0
82, a6

2
SEQ 0022

JEXIT.

NUMBER

IN RO

.SWROUT"C TO OUTPUT RSCII MESSAGE ON TELETYPE PRINTER.

986 003330 011000

28-APR-78

HovV

MOVR
CHPe
BNE
RTI
CWPB
BEQ
‘:!

MOVE

X0, X0

(0)+, TYPDAT
#100. TYPDAT
TYPC
#MS, TYPOAT
TYPF
’r‘a’ri;"o

;GEY mzss THAT CONTAINS MESSAGE RDORESS.
SET UP
E

ma“
MESSAGE TO RO,

;6ET C
; CHECK ffl"i"fl“fl(f(l
;BRANCH IF NOT"3".
: TERMINATOR CHAR. DOME.
s CHECK FOR“XTM.
;BRANCH IF %"
;TYPE CHAR IN TYPDAT

EXIT.

TYPDAT, 3TPDBR ; OUTPUT cmm TO PRINTER

;gzl

QT:(SI

;HAIT FOR DONE FLAG.

RTS
MOVE
JSR
MOVE
JSR

X7
815, TYPDAT
X7, TYPD
#12, TYPORT
X7, TYPD
TYPA

SEXIT
s MOVE (Mlfi RETURN CODE TO TYPDAT
;60 TYPE
C
+MOVE LF coo: TO TYPDAT.
;60 TYPE
C

OPEN

&noumc TO INITIALIZE STRCK POINTER AND SET PROCE
SSOR PRIORITY
0O3%3%
003We2
0ONSO
003wWSs
003%60

012777
012737
011637
012706
000176

001400
00O3N0
001200
001200
000000

176106
177776

INIT:

MOV
nov
nov
nov
Jp

SCAT, IBASREG
PRTY?, PSH
(SP), SPBOT
4SPBOT. P
#(SP)

INITIALIZE THE BASE REGISTER
;SET PRIORITY LEVEL 7
sGET RETURN RDDRESS
;SET BOTTOM OF THE STRCK
;RETURN

1015

1016
1017

1018
1019

003%6%
003872

023737
001060

000042

1021
1022

0O0M7y
003500

012700
010060

000302
177776

1020

000046

;SUBROUTINE TO GET DM11 PARAMETERS
;VECTOR ADDRESS

6‘7!

4s:

OV
oV

RO
-2(R0)

C"!{
00001%

000016

g:%

%fi 176764
%;

N2, A6
6%

sACT11?
IF NO

;SIZE FOR INTERRUPT VECTOR IN RUTO MODE

000776
10

cne
BNE

176754

002076

§776.R0

MOV

3%:

nov
3:

:SET UP FLORTING VECT ARER

CIL

-I.

.P“

+SET BPT VECT

;& PSW

SET TO xmT 1 CHAR

'Cfg

ml
20."0.0(& 0 +SET IE

MoV

.I.I"O

MoV

-1(0!3"

JXMIT

JHAIT

CZDIW00 DM11A LGC TST _ MACY11 30R(1052)
CZOMAD. P11
28-RPR-78 13: Wy
1035

003576

005337

1038
1039
100
108
1042
143
108
1086

003606
003610
003618
003620
003626
003632
003638
003640

000752
162716
011637
012737
0ON?37
0OON1S
008737
104000

}&g gm %fi

10%

1047
1088
1049
1050
1051
1052
1053
105+
1055

1086

1057
1058
1059
1060
1061
1062
1063

1065

1066
1067
1068
1069

00362

0O36AN
003650
003662
003666
003660
003666
00367
003676
003700

003702

017626

OONS3?
(000000
005737
001003
012737
023727
103003
10MO0C
020017

000670

003708
003712
003718
003722
00372%
003732
00370

023727
101371
032737
001365
013737
062737
013737

003746
003754
003756
003760

023737
001405
104000
017725

1070

003762

OODVE37

1073

003776

101%03

002076

00000
003650
000016
00372

28:

58
000014

004372

6S:

1079
1080

1081
1082
1083

:'g"'

003650
000300

003650

000770

VECOKB:

000007

003650

003650
000008
003650

001552
003650
001566

0000NZ

0000MG

0OWM1G

1090

00062

CMP
BHI
BIT
BNE
MOV
RDD
MOV

SUNIT NUMBER

DMPARB:

way.

PAGE 23

COUNT

38
@Y, (SP)
(SP),Q8VECTOR
#16, 981y
7, OVRLAY
VECOK
7. OVRLAY

5.RECD
VECTOR
VECOK
#300,VECTOR
VECTOR.#300
VECOKB

DHPAR

VECTOR.#770
VECOKA
87, VECTOR
VECOKA
VECTOR, CLKINT
#%.VECTOR
VECTOR. MMTINT

SEQ 0023

NO INT OCCURRED

:REPEAT IT
:CALC INT VECT
:STORE IT
;RESTORE BPT VECT
i. 42, HALT IN VECT ARER
;PUT HALT..
42 IN VECTOR ARER
;RSK USER FOR RECEIVER INT. VECTOR

OF UNIT UNDER TEST

:GET VECTOR AND PUT T
: HERE
;SET VECTOR = TO 0300
- 1S VECTOR MIGHER O
:EQUAL TO 0300
STYPE *7°

;RSK FOR ANOTHER VECTOR

- 1S VECTOR = 10 OR
;LESS THAN 770
:LSB OF VECTOR MUST BE ALL 0°S

2892, 284
UNIT+2

;ACT11?
i8R IF YES

S-RECO

;GET UNIT A0 PUT 1T

BLOS

UNTOKA

;BETME
O &EN
17

TYPE
WHICH

Tvee

INTOKR: RSL

542
1 000370
| 003766

oV
UNTOKB: BIC
R0

012702 000004

MOV

012311

13:48

CHP
BEQ

003766

001372

1087

BR
SUB
MOV
MoV
JSR
BR
JSR
TYPE

000300
003650

003650

003766

OONG1(
OONG:

g“SOR

JSR
VECTOR: 0
TST
BNE
MOV
VECOK:
CMP
BMIS
VECOKR: TYPE
n

1078

DEC

WHERE

0OWM16

1072 Q03790 Q2T 003766 000017

107%

28-APR-78

ASL

RSL
"oV

BNE

UNTOKC: MOV

UNIT. 817

JUNIT SELECTED MUST BE

OIT

UNIT

UNIT
W, x2

ecskx)
8370, (1)
WNIT. (1)

UNTOK®

;FORM RDORESSES
OF
;REGISTERS OF UNIT SELECTED

aw, %2

(3)4, (1)

;FORM 0DD BYTE RDDRESSES

CZDIMRDO DM11A LGC TST
MACY11 30A(i052)
CZ2UMAD. P11
28-APR-78 13: 4y

1091
1092
1093

109%

00%06%
00%066
00N070

005221
005302
00137%

1095 GONO?2 023737
109 O00%100 001408
1097 00%102 10%000
1098 008108 0177%0
1099 008106 O00%537
1100 00%112 Q00000
1101
GON18 005737
1102 00N120 001003
1103 00822 012737
1108y 0ON30 023727
1105 008136 103003
1106 0ONIS0 10%000
1107 0ONINZ 020017

1108 0OWING 000752

1109
1110

1111
1112
1113
1118
1115
;}};
1118
1119
1120

OONING
0OWISY

00N1S6
0ONV6N
008?70
00878
00%N202
004208

023727
101371

162737
006337
013701
016137
000240
000207

INC
DEC
BNE

000082

000046

004wu416
00%112
00001C
004112

004112
000005

00M112

000010

000005
0ON112
O0M112
004206

OO0%112

1126
1127

008216
00w222

005037
012737

00%366
177777

00140

CmMP
BEQ
TYPE
LEVEL
JSR
LENGTH: O
TST
BNE
MoV
LENOKR: CMP
BHIS
LENOKB: TYPE
"
LENOKC:

CNP
BHI

Sus
ASL
MoV
nov
NOP
RTYS

1129

OONZ36

012777

00N336

175306

TIMER:

000001

176226

00%366

1138 OON3I8 012737 0000 177776
1139

11%0
1191
1142
1143

JACT11?
;BR IF YES

5. RECD

;GET LENGTH AND PUT IT
sHERE

LENGTH
LENOKA
88. . LENGTH
LENGTH. 85
LENOKC

;CHARACTER LENGTH SELECTED MUST
;BE BETMEEN 5-8
;CARRIAGE RETURN SELECTS 8

DHPARC

LENGTH.
88,
LENOKD

#5.LENGTH
LEMGTH
LENGTH. %1
LENOKD(1). 38CARNSK
7

;SET CHARACTER LENGTH MASK

JEXIT PARRMETERS ROUTINE

MOV

STIMEC.CLKINT

:LORD RECEIVER INTERRUPT

g}.mll

: INCREMENT MACH.

HOV

012777
176264
012777 000106 175250
1
000DV 002076 TIMER:

i e

N2, atve
LENGTH+2

TIMEY
8-1.MCT

176302

::g

(1)+
x2
UNTOKC

CLR
MOV

nov

1131
1132
1133
1134

SEQ 002y

s CALCULATE MACHINE TINE TO TRANSNIT ONE CHARACTER

1128 OON230 012737 017102 001400

1130 OONDNS 012777

L
2
PRAGE 24

; THE BELOW TRBLE REPRESENTS THE CHARACTER LENGT
H MASK FOR 5.6.7. ANC 8
:BITS PER CMARACTER RESPECTIVELY.
LENOKD: 1777%0
172700
177600
177800

1777%0
177700
177600
177%00

1125

1348

. CHARRCTER LENGTH

DMPRRC:

001572

008206
008210
008212
008218

1121
1122
::2

28-APR-78

10%001

002076

CAT

;SET UP TO TRANSMIT

SPRTY?.CLKLVL :AND PRIORI

ON LINE 1

oy
nov
LR
MOV

TY
meiT0.
START TRANSMITTING
IT+BIT2481T0, 3CSR :SET IE BIT
aePSM
;SET PROCESSER PRIORITY LEVEL = O
SW%, COUNT

CLR

ERROR

TINER
COUNT
Tines

nOV

BR
TINEB: DEC

e CAME Ore 00Nz oovz7o |TEC: e
1146 00%350 006037 00Y370
RoF

Y7, PSH

Timeld

rmess

TINME TO TRANSMIT

;SET PROCESSER PRIORITY LEVEL = ?
: TRANSMITTER FRILED TO INTERRUPT

CZDMADO DM11A LGC TST_
MACY11 30A(1052)
CZDIMRD. P11
28-APR-78 13: w4

1147
1188
1149

}}g?
1152
}}3.3

1188

1156
1157
1158
1159
1160
1161
1162

11ea

004354
004356
004362

000241
006037
022626

008368

28-APR-78

CLC
ROR
POPSP2

004370

000207

004366
004370

000000
090000

004372
008376
00WN02
00%WO8
00%0&
00%WWi12
00814

012702
010262
005022
005722
022702
100371
000207

RTS
TIME1:
TIMEIN:

n
2
PAGE 25

13: 48

TIME1Y

OPEN
OPEN

SEQ 0025

;RESTORE STACK POINTER
JEXIT TIME CA.CULATION ROUT INE

sCONTRINS MACHINE TIME TO XMIT 1 CHAR
;CONTRIN TIME TO XMIT 1/% CHAR

: SUBROUTINE TO PUT MALT.. +2 IN VECTOR ARER (0300-1000
)

000302
177776

OVRLAY: MOV
18:
MOV
CLR
TSTY
(4,
BPL
RTS

000776

1165
1166
1167

#302.R2
R2.-2(R2)
(R2)+
(R2)+
87276.R2
18

;SUBROUTINE TO RECEIVE DATA
;THIS SUBROUTINE RECEIVES DATA
:DIGITS AND PLACES THEM INTO

}}23

;CALL (JSR 5.RECD).

NO REGIS

K;m (UP TO SiIX OCTAL
fll;:l‘ THE SUBROUT INE

1170

:g;

1173

1174

1175

1176

1177
1178
1179
1180

SUBROUTINE TO INPUT DATR FROM TTY

00%%16

00820

0100%

00S015

0DWs22

012737

OOWI3N
00WS36
00WN2
00WNG

100375
117700
182700
110077

0OWS3D

106777

RECD:

000007

175432

00%S?Y

13:

nov

RO.-(SP)

MoV

87.CNT

CLR

TSTE

175426
000200
175422

BPL
HOVE
8iICB
HOVe

:g 00%460 nwg 000015

e S g 0

1185

oowee a"" 000060
1186 %
m 000110
1189
1190
1191
1192
1193
1194

3
422

—

1197

2 175340

}fl

1202

004574

Mh T

100375

37:mo'm

(5)

JTKCSR
23

RO
RO
STPOBR

gs.uo

8IT8

8iC8

860.R0
#110.R

RSL
ASL
8IS
DEC
8EQ
gk

(5)
()
RO, (5)
CNT
78
g'

MOV

#12.

n'u."

%gl

BPL

6% -

3TPOBR

TPCSR

sHRIT FOR CHAR

;STRIP OFF PRRITY
sECHO CHARACTER
;ISITRA U
;BRANCH IF YES
;1S IT R <«
:BRANCN IF YESS

s CHECK FOR O-7 (8)
sBRANCH IF NOT
sSHIFT DATA
; INSET NEM CHRR
;ONLY 6 CHRR'S PLERSE

¢NEXT CHARRCTER

HRIT FOR RERDY
JTYPE AP
HAIT FOR RERDY
sLORD CHAR

)

CZDMADO DM11A LGC TST
MACY11
CZOMAD. P11
28-APR-78 13: 44

1204

00NS54

0ONS56

005725

0ONS60
00NG62
OONS6%
0ONS66
0ONS?0
008572
00vE7s

104000
020017
104000
017666
000712

1213
1214

0ONS?6

012737

1218
1219

1220

1221

TST

—

NOV

7s.

5§
CNT:
004606

012706

001200

00M16

000137

002514

108001

1223

000024

;RADJUST RS

*RESTORE RO

;START OVER

RESET
MOV

8SPBOT.
%

JERSTAT2

;GIVE TELEPRINTER TINE TO START

;TYPE POMER FAIL ERROR

60 RESTART PROGRAM

e 8 no""fu'cs u"}é&"n‘é'

rzi.l.wn'uo'cmg:}n ARt PeRFOBEDS T
JMAITS UNTIL CHARACTER SHOULD MAVE
BEEN TRANSNITTED, THEN TESTS
;THA
BAR BIT
T CLEARED
;D0 MEXT TEST IF ERROR
REROY SEY
;DO
NEXT TEST IF ERROR
;MORD CGUNT MENT TO O
;D0 NEXT TEST IF ERROR

123%
1235

00622
00626

012537
0O0N737

1238
1239
120

OONGNZ
OONGAS
00%60

177777
012703
005002

1292
123

OOWGS%
OONGE6

001376
005303

s oone3e sy

00137%

=7m

016730
O0070W

XNTTST: MOV
ISR

000010

-1
WV
R

00e2ee

1250
1251

109001
3701 016730

1254

10%01 1

008736
0ON7%8

azm
6137

001401

174642
001440

001566

017102
001400

001570
001566

001566

001570

DEC

N
DEC

BNE

174656 001566

1297

;RERDY 81T CAN BE CLEARED

12%1 OONGEZ 99830

1257
1258

(R5)+

(SP)+., RO

;LINE_TEST SUBROUTINE: THIS LINE TEST PROVIDES SEVERAL TESTS ON A D11 LINE.

1
i

SEQ 0026

ERROR

12%%

PRAGE 26

:POMER FRIL ROUTINE
PFAIL:
MOV
SPHRUP.
2y

PURUP:

1226
1228
1229
1230

1233

RTS
TYPE
M
TYPE
$CTLY
BR
0O

13:.48

;POMER UP SUBROUTINE

0ONG06
004610

0ONG1%

28-APR-78

012600

1205
1206
1207
1208
1209
1210
1211

1217

30A(1052)

nov

gtm

ZEND OF TEST

(S)%.Q0LINE
72,8701

:GET LINE MUNBER
;60 FORM LINE BIT (FOR BAR)

#10.x3
x2

:TRANSMIT ONE CHRRACTER
SMAIT IN
;THIS

-2
i3

SUNTIL THE
; TRANSNITTER

nr.RCvAT

igAe

5. 20XMITD
x2

;60 TO TRANSMIT SUBROUT
INE

:L00P

: 1S FINISHED

"o'n'm'csn CLERR

.:mw 81T FRILED TO CLERR

Ist

vs:

ERROR
MOV

.3:\‘

8L INE.
X1

;ERROR! RERDY NOT SET
;GET LINE NUMBER

5$:

.ngg

ERKOR1
nvV
MOV

CHP
BEQ

HCT(1).RCVORT

ROY BIT SHOWD € SET

;WORD COUNT SNOLD BE 0

;ERROR! LORD COUNT NOT EQUAL TO O

8
XNTORT ;
CAT(1).RCVORT
; CURRENT RDORESS SHOULD NOT MAVE |NCREMENTED

RCVOAT, X7
oS

;

CZOMADO DA11A LGC TST_
MACY11 30R(1052)
CZOMRD. P11
28-APR-78 13: w4

1259
1260
1261
1262
1263
1268

1265

1266

1267
1268
1269
1270
1271
1272
1273

1274

00- 746
00w
OON7S6
CON?6M
008770
0ON?72

005000

104011
012777
052777
00S037
000240
012737
10%001

005002
00500
005012
005020
00502
005026
005030

022626
012737
082777
005777
100001
10%001
005726

005032

10%006

005002
010000
177776

174600
174556

000340

177776

28-APR-78

6$:

13:48

ERROR1
MoV
BIS
CLR
NOP
Hov
ERROR

B
3
PRGE 27

878, AXMTINT
#BIT12, &SR
#PSH

#PRTY7, 3MPSH

SEQ 0027

;ERROR! CURRENT RDDR. DID NOT INCREMENT
;LORD TRANSMITTER INTERRUPT VECTOR
;ENABLE TRANSMITTER INTERRUPT
;SET PROCESSOR PRIORITY =0

;LOCK OUT INTERRUPTS
; TRANSHITTER FAILED TO INTERRUPT OR

: INTERRUPTED TO WRONG LOCATION AND MALTED WITH RDDRESS

0003%0
110000
174516

177776
174522

7%:

8s:

CHP
MOV
BIC
TST
BPL
ERROR
TST
SCOPE

+2 DISPLAYED.

(6)+, (6)+
;RESET STACK PTR
SPRTY?, 4PSW
;LOCK OUT INTERRUPTS
8BI1T12+BIT15, 3CSR
;CLEAR XMIT IE & READY BITS
JCSR
; TEST THAT READY CLEARED
8s
;60 TO EXIT
;ERROR! RERDY FRILED TO CLEAR
(6)+
;RESET STACK PTR
; SCOPE

CZDMADO DM11R LGC TST
mcm
CZDMRD. P11
28-APR-78 13:
4

30R(1052)

1275
1276
1277

28-APR-78

13:48

PRGE 28

3
SEQ 0028

1278
1279
1280
1281

;THE RECEIVER LINE STEST SUBROUTINE IS ENTERED WITH
;A JSR B, RCVTST INSTRUCTION FOLLOMED BY THE
CLINE BIT AND LINE
OF THE LINE TO BE
:TESTED. THE
o:#'.'nc'mmrm THE FOLLO
WING

}g;

;TEST SEQUENCE AND RDORESS TRG

;RECEIVER LINE TEST

152
1288

1289
1290
1291
1292
1294
1295

;

THE INCORRECT VECTOR+2 IN THE RDDRESS L IGHTS.

RCVIST:

MOV

§-1,OUTBUF

MOV

SPRTY?. sapsu

00SO3%

012737

177777

1239 00SNZ 00037 901200

017102

1301 Oostes 012737 0000 177776

1302
1303
1307
1305
1306
1307
1308
1309

00S080
00S06%
00SO70
005072
00S100
00B10%
005106
00B11%

012537
OONS37?
177777
082777
006777
100375
082777
OOSONG

1311

005122

100%0%

1310 00S116 108777

016730
006246

000001
174436

1744s2

100000

17%426

174420

18:

o "
"ts' o
D1 3rs

1316 O00BIN 006726
1317 005136 012777
O0BINS

082777

1319 006162 008037

005172

000100

177776

174406

174370

1321 =m'" =m7“- 000340 177776

1322

1326
1327

1379

§ 10w001

72 =zn7'” 000340 177776 3S:
000300 174332
106777 174326

Ooene 1wz

1330 005220 000515

MOV
JSR
-1
8IS
IST
BPL
BIC
R

TSTB

1314 005130 10%001
1315 005132 000850

13:8

v;I.t

;
TUMBLE
TRBLE
ENTRY IS CORRE
;
NO ENTRY IN NEXT TRABLE "ADOCT
S5
;
HARDHARE TABLE POINTER INCRERE
MENTE
D
;
NEXT ENTRY WRS CORRECT
;NOTES: IF THE MARDMARE PROVIDES AN INCORRECT VECTOR
:
RDDRESS THE PROGRAM MILL MALT AND DISPLAY

1298

1
3—
’% CLEARED

;

nnm‘z

(5)+,LINE
5, 28XNITD

#BITO, (SR
acse
. -§
®BITIS.SR
~(SP)

aCSR
28

ERROR
BR

nov

§38, 3CLKINT

IST

8IS

MOV

(SP)+

#8176, CSR

PSH

RTSTC

RTSTD
RTSTE
RTSTF
RTSTG

;LORD ALL 1°'S INTO OUTPUT BUFFER

;CLEAR THE F IRST

; LOCK an“"ammmts' am

)

:GET LINE NUBER
;TRANSMIT 1 CHARRCTER (0°S)
;0N LINE SPECIFIED BY JSR
SS60
ET
BIT
;MAIT FOR TRANSMITTER
;TO TRANSMIT 1 CHAR.
;CLEAR TRANSMRERDY
ITTFLAG
ER
;SET MATCH DOG TIMER

;TEST CWR. DONE FLRG

SBRANCH IF SET

HNO.T.Te AN

SERROR! CHAR. DONE FLRG FAILED TO SET
EXIT

umsm

RECE IVER m
| nm VEC. RORS.

T RECEIVER IE BIT

IENABLEINTERRUPTS

SPRTY?.PSH

og OUT INTERRUPTS

Bic
IST8

”Iw.‘grsu

e Aoout' nmmts

8 n'mm.am;
aCSR
ri
”%uFLAG CLERRED

.so
T0 X

ERROR

erkon

“

EIVER FRILED T0' INTERRUPT

Bé.'nDONEFRILE
To cLEns
D

CZDMRDO DM11A LGC TST_
MACY11
CZDMRD. P11
28-RAPR-78 13: Wy

1331
1332
1333
1334
1335
1336
1337

005222
005230
005236
0052%&
005282
005260
005266

1380 CO0S27%
1381 005276
1342 005300
1383 005302
1384 005306
1346 005318
1386 005316
1387 005322
188 00532
149 005326
1350 008332
1351 0053
1352 00SMNO
}g mmm

013737
(82737
012737
043737
153737
052737
023737

1368

O0O058S0
005452
005454

001566
001566
001570
001570
001571
001570
001570

28-APR-78

Y4$:

001402
104011

005037
013737
001%0%
005037
108011
00ONS3
008537
177777
008777
100375
;mfifl7

13556 005350 OM2777
1356 00536 013737
1357 005368 001%0%
1358 005366 00S037
1359 005372 108011
1360 00537y 000827
1361 005376 013737
1362 OOSAON OM2737
1363 00SM2 012737
1368 005420 ON3737
1365 005826 153737
1366 00SA38 052737
1367 00SW2 023737

1369
1370
:g‘z

001600
020000
000377
001572
016730
100000
001566

30A(1052)

001600
001602

001566

5%:

001570

006246

68:

174202
174174

000200
001600

174164
001566

001570
001602
020000
000377
001572
016730
100000
001566

001566
001566
001570
001570
001571
001570
001570

001401
104011
104006

7$:

13: 48

PRGE 29

SEQ 0029

MoV
BIC
MoV
BiIC
81S8
BIS
CHP

TUMTAB.RCVDAT
,GET TUMBLE TRBLE ENTRY
#8I1T13,.RCVDAT
CLEAR PARITY INDICATOR
i
8377, XNTDAT
;LOAD XMTDAT WITH TRANSMITTED DATA
CARMSK, XMTDAT ; CLEAR NON TRANSMITTED BITS
LINE, XNTDAT+1
. LOAD XMTDAT WITH PROPER L INE §
#BIT15, MMTOAT
;SET VALID DATA ENTRY BIT IN XMTDAT
RCVOAT. XMTDAT
. COMPARE TUMBLE TRABLE ENTRY (RCVDAT) &

BEQ
ERROR1
B8R
CLR
MOV
BEQ
CLR
ERROR1
BR
JSR
|
TST
8PL
;!"»Il

; CORRECT RESULT (XMTDAT)

"enROR! INCORRECT TUMBLE TRBLE
;NTRY; 6O TO EXIT

8%
TUNTR8
TUNTRB+2 RCVDAT . ET NEXT ENTRY
63
;BANCH IF ALL 0'S
XMTDAT
;ERROR! FALSE ENTRY IN NEXT
8s
;TUMBLE TRBLE RDDRESS

5. 38XNITD

oCSR
.
3(3!

:TRANSHIT 1 CHARACTER (ALL 1°S)
;ON LINE SPECIFIED BY JSR
;HAIT FOR TRANSMITTER
;RERDY FLAG
;TEST FOR THE DONE FLAG

BIC
MoV
BEQ
CLR
ERROR1
BR
oV
SIC
nov
BIC
8158
8IS
e

88177, 3CSR
;CLEAR CHAR. DONE FLAG
TUNTRB. RCVDAT ; TEST THAT MARDMARE TUMBLE
7%
:TRBLE POINTER INCREMENTED (+2)
XNTOAT
;ERROR! TUMBLE TRBLE POINTER DID
8s
;NOT INCREMENT. 60 TO EXIT
TUNTRB+2 RCVDAT ;GET TUMBLE TRABLE ENTRY
S8IT13.RCVDAT ; CLEAR PARITY INDICATOR
’
;LORD XMTDAT W!TH TRANSMITTED DATA
CARNSK. MITORT ; CLEAR NON-TRANSNITTED BITS
LINE.XNTDAT+1
.LORD LINE & INTO XNTDAT
SBIT16, MTOAT
. SET VALID DATA ENTRY BIT INTO XMTDAT
RCVOAT. MITDAT
. COMPARE TUMBLE TRBLE ENTRY (RCVDRT) &

BEQ
ERROR1
SCOPE

; CORRECT RESULT (XMTDAT)

sERROR! 2ND TUMBLE TRBLE ENTRY
;HRS INCORRECT. SCOPE

1373

137%
1375
1376
1377
1378
1379

1380
1381

1382
1383
138%
1385
1386

00S4S6
00SN64

00570
006578
005476
00550%
005510

012777
011577

106777
100375
042777
105777
100375

000001
174056

174056

1740M6

000200
174032

174036

;SUBROUTINE TO TEST BREAX OPERATION
;THE TRANSMITTER MILL TRANSMIT THE BRERK FOR TWO CHARACTER
;TIMES AND THEN THE FOLLOMING TESTS WILL BE PERFORMED
;
A VALID DATA ENTRY WRS MADE
BKTST8
;
"W&T SEY
BKTSTC
;
DRTA
ALL 0'S
TS

BRKTST: MOV
nov

TST8
BPL
BiC
TST8
BPL

#1, &SR
(5), 3BKCSR

oCSR
. 8

#8177, aCSR
oCSR
. =y

:SET THE GO BIT
;SET_THE BRERK BIT

;HAIT FOR THE RECEIVER TO
;RECEIVE BRERK
; CLEAR FLRG
;MAIT FOR THE RECEIVER TO
:T0 RECEIVE BRERK

174022

001600

18§:

2%:

4s
$BIT14, TUNTR8

001566

002076
001570
006224

xR
v DHZ
~

001564

;CLEAR FLAG
;CLEAR BREAK BIT
;TEST FOR VALID DATA ENTRY
;ERROR! NO VAL ID DATA ENTRY
;60 TO EXIT

; TEST THAT BREAK BIT IS SET

; IN TUMBLE TRBLE

;ERROR! BREAK BIT FRILED TO SET
;60 TO EXIT
; TEST THAT DATA IS ALL 0'S

;GET RECEIVED DATA
;ERROR! DATA WAS NOT ALL 0'S
; SCOPE

;SET THE GO BIT
;TRANSNIT 64. CHAR.
;ON R LINE
;GET CHARACTER DELRY COUNT

sFORM NEXT LINE NUMBER

sSHIFT LINE BIT
sBRANCH IF ALL LINES NOT DONE

>
-~
-~

-4 08

016730

DEC

.20

-g.—

173676

173606

s28Rs
§§§§a

CLR
ERROR1
SCOPE

4s
TUNTRB
4s
RCVDAT
TUMTRB. RCVDAT
XMTDART

SEQ 0030

:SUBROUTINE TO TRANSMIT & RECE lfi ON ALL LINES THE
DELAY BETWEEN
:TRANSMITTING ON A LINE | S_Supp E D BY THE CALLIN
G JSR INSTRUCTION.
;NOTE NO DATR CHECKING iS PERFORMED BY THIS TEST
DLYXNT: MOV
(5)+, 3RCOUNT
;GET CHARACTER DELRY COUNT
XMTDAT
5. BMOVE
;LOAD OUTPUT BUFFER MWITH DATA
:TO BE TRANSMITTED

000100
004 366

Re E

L} §

000001
016730

#8177, aCSR
SBKCSK
TUNTRB
29

38:

104006

PRAGE 30

|ol

001566
001600
001570

113737
005037
104011

13:48

.cai aE

000200
174022
001600

28-APR-78

0N2777
005077
005737
100402
104001
000421
032737
001002
104001
000413
105737
001410

30A(1052)

~&
N

CZDMADO DNM11A LGC TST
MACY11
CZDMAD. P11
28-APR-78 13: 4y

;GET & TEST BAR DATR
+EXIT IF DONE
;ERROR! BAR SHOULD'VE BEEN CLERR

100201

173566

100201
173552

001570
001566

78:

: TEST THAT ONLY DONE.GO.d RERDY BITS RRE SET
+GET CSR CONTENTS

CZDMADO DM11A LGC TST
MACY11
CZDMRD. P11
28-RPR-78 13: 4y
1843
1844
1845
1446

005772
005774
005776

30R(1052)

104011
005726
104006

8s:

}::; 006000 011637

1449
1850
1851

00600M
006010
006016

006062
006ONS

062716
017737
001413

006050

006052
006050

006052

000000

::&3

006054

012737

1465
1866
1467
1868

006066
006070
006072
006078

006076
006077
900C05
000207

1871
1472
1473
187%
1875

F
3
PRGE 31

ERROR1

SEQ 0031

; INCORRECT CSR COMTENTS

POPSP

;RESET THE STACK

SCOPE

18:

MOV
ADD
MOV

BEQ
MoV

SuB

BEQ

DEC

001375
000765

::g: 006050 000000

140
1461
1462

13: 48

; SCOPE

: SUBROUTINE TO DELAY A SPECIFIED NUMBER OF MILL
ISECONDS

DLY:

i B
i B S

1456
1457

28-APR-78

28.
38:
4s:
1772777
006224

006076

BNE
BR
RTI

(6).3%
82, (6)
938, 39

29
#50. 49

;GET DELAY COUNT RDODRESS.
;SET UP
EXIT ADDRESS
;GET_DELAY COUNT
;EXIT IF NO DELRY

#1.3%

. =4
18

OPEN
OPEN

JEXIT
;CONTRINS DELAY COUNT
;CONTRINS DELRY ROUTINE CONSTANT

: SUBROUTINE TO lNlTI&II BINARY COUNT PATTERNS
INBIN:
MOV
#-1.R
;SET ALL vmmus
JSR
%5, lflOVE
;:TO MINUS
1
RIND
RIND+1

RTS
OPEN
OPEN
OPEN

b¥4

SEXIT

006102

000000

R IND:
PTO:
PT1:

006108
006112

013737
005:37

;SPECIAL BINARY COUNT PATTERN SUBROUTINE. EXITS WITH BIN
CHAR IN Ri
ETlIN:
MoV
PT0.PTH
;PREVIOUS BIN CHAR TO PT1

con

PTH

i i S

con
BNE

= &2 =

nov

PT1.PT0

sSAVE BIN CHAR IN PTD

RTS

JEXIT,

1878
1879

1882
1483
1484
1485

1486
1887

006124
006130

006150
006152

000240
000207

006154
006156

10%007
013504

1488 gfl

un
1491

1892

1493
199%

0403

006212

INC
BiC

11031

PTH
8177%00.PT1

PT1. %1

sHASK TO 8 BITS

.IIN CHAR TO R1.

;OCTAL TO ASCI! CONVERT ROUTINE
ORCNV:
SAVREG
;SRAVE REGISTERS ON THE STACK

gfll

SE G5

1495
1498

005237
082737

RIND
. *6

nov
nov

MBI, 2y
(5)+. %1

ROD

u. X1

MOV

OACNVA:

MOV

BiIC
ADD

nove
BIC

ROR
ROR
ROR

(5)+,.%2

x4, %3

nnno.x:
l
x3

c=(1)

n.m

1]
%4
%\

+GEY OCTAL VALUE.
.Gfl DESTINATION RDODR.

gf CONVERT COUNT.

VELOP RDDR TO STORE 1ST CMAR.

+ ISOLATE LERST SIGNIFICANT DIGIT.
+CONVERT DIGIT TO RSCII.

:STORE RSCI!CHARRCTER.

CZDMADO DM11R LGC TST
MACY11
CZDMRD. P11
28-RAPR-78 13: w4
1499

1502
1503
1504

00621%

006222

30A(1052)

005302

1511
1512
1513
1514
1515

006238
006240
006242
0062%%

000205

006260

1533

006310

112122

18:

001375
104010
000205

0063

006330

008737

1536
1537

O006MNZ
006N

001372
012701

016730

007044
001400

017102

016730
0001%%
017102
006104

110122

017246

;

;BRANCH IF NOT DONE.
;RESTORE THE REGISTERS
;DONE. EXIT.

MOV
MOV
HOV

(5)+, %1
(5)+,%2
(5)+, %3

(1)4,(2)+

DEC
BNE

%3
18

160000

002076

BCAT.3BRSREG : INITIALIZE BASE REGISTER
SOUTBUF.CAT(0)
;LOAD FIRST CHAR RDDRESS IN CAT

8IS

JMLINBIT.38AR

RTS

nOV

7. S0GTL INS

:GET LINE
;FORM LINE BIT (FOR BAR)

(5)+, UCT(0)

;GET HORD COUNT

(SP)+, X0

15:

USR

rooeevemc

MOVE

CEXIT

até

:LORD OUTPUT BUFFER WITH DATA

gmmmn.n

;LORD TUMBLE TRBLE POINTER

i fonece

; TRBLE

s
100, CHARACTERS
gmmmwnig.
g&:saIF RERDY OR ANY ERROR

TST®

8hL
3s:

;60T ALL DATA?

.‘3
8IS

173142

.Sk} ADORESS OF QUTPUT BUFFER

X1,(2)+

funmeg MOV

173106

:LORD LINE POSITION INTO BAR

:RESTORE RO

;ROUTINE TO TEST A LINE.
;THE LINE TO BE TESTED IS PROVIDED BY THE JSR CALL TO
THE ROUTINE.
;100. CNARRCTERS ARE TRANSNITTED, RECEIVED AND CMECKED BY THIS
ROUT INE.
DATTST: MOV
()%, JMLINE
;GET LINE NUMBER
DATIAA: MOV
§100 . COUNT
:GET CMARACTER COUNT

173120

060000

SUBROUT
INE CALLED BY

MOV
MOV

TUNTAB+1

173126

; DECREMENT COUNT
sBRANCH IF NOT DONE.

0L INE, 20

MoV

173236

;MOVE BYTE

NOV

JSR

173262
001400

; GET"FROM"RDDRE
SS
;GET"TO"ADDRESS
;GET COUNT

;RESTORE REGS.
;DONE EXIT

:SUBROUTINE TO TRANSMIT DATA.
;JSR 5, XMITD
XMITD:
MOV
%0, -(SP)

000205

012537

;DONE ALL DIGITS?

ORCNVA

RSTREG
RTS

012777

006312

SEQ 0032

: SUBROUTINE TO MOVE A VARIABLE NUMBER OF BYTES.
BMOVE:
SRVREG
;; SAVE REGS
RE .

001440
00156%
1525
1526
1527
1528
1529
1530

G
3
PRAGE 32

BNE
RSTREG
RTS

}g:; 006246 010046
1520

13:48

DEC

i mm o
}g%

28-RAPR-78

BIT

gsgfl

88170,

aCSR

3CSR

’:gn'??swm BUFFER POINTER

:SET THE 60 BIT

IMAIT FOR THE RECE IVER

:TO RECEIVE A CHARRCTER

#BITIN4BIT13
3CS;
, TEST FOR ERROR FLAGS

;BRANCH NO ERROR

CZDMADO DM11A LGC TST_
MACY11 30A(1052)
CZDMRD. P11
28-APR-78 13: 4y

28-APR-78

1555
1556
}g‘

Q06WNO
006M%S
mm

000137
082777
}m

006760
100000
17306M

173070

uS:

1559
1560
1561

006NG0
006NG6
00670

ON2777
005711
100M01

030200

173054

1562

:s““J

1565

1566
1567

1568
1569
1520
1871

006N?2

104001

006N7%Y

111122

006476
006502

012705
000261

157%
1575
187

006520
006524
008532

011137
ON2737
125737

001562
160777
016730

001562
001563

1578
1579

Q06542
Q08550

013737
013737

016730
001562

001570
001566

10W011

020000

1582 008560 0OON77

6s:

006666
00670

001002
012701

001576

1588

006600

013700

016730

1589 0D660N “ 001440

:g' -uz" 012600
1993 oo
u'u
R e ggw e
v
1596
2708
"
1697
FevetM
=
g
1600 g
AZ7 017246
b4
112137 001570
b % fl:m: 33&2 ——
:g 006674 10400
2

1609 usm'
063 m’:
1610

00670%

106037

BIC
TSt
BN

WBIT?, 3CSR
(1)
"4

;CLEAR CHAR DONE BT

MOovB

(1).(2)+

&
001566

BIT
BNE
CLC
JSR

;TEST FOR VALID ENTRY

:REPORT INVALID ENTRY
;MOVE CHAR FROM TUM.

TRB.

®8IT13.
(1)
6

TO INPUT BUFFER

;GET ROTATE COUNT
;SET THE CRRRY B1T

G.RORPARBUF

:TEST RECEIVED PARITY BIT
;BRANCH IF RECEIVED PRARITY WAS 00D
:CLEAR CARRY 81T
.ROTATE RECEIVED PARITY INTO PARITY BUFFER

MOV
BIC
CIPB

(1), 8TTDAT
#160777,TTDAT
LINE.TTORT+1

GET TABLE ENTRY
:CLEAR ALL BUT LINE NUMBER
COMPARE LINE MUBERS

MOV
MOV

LINE.XMTDAT
TTDAT.RCVORT

;GET CORRECT LINE 8 (X2)
:GET LINE 8 (X2) TMAT FALSE DATA CAME

158

JEXIT TEST

8%
#TumTRe-2.
xi

:OF THE TRBLE
&
5

ERROR1

155
1S65

;60 EXIT
;CLEAR TRANSMITTER READY FLAG
:TEST FOR CHARACTER RERDY

;ROUTINE TO TEST THAT ENTRY IS FOR THE CORRECT LINE.

1583 006562 020127 001776

1587 m"" m“m'

15$
#BIT15, (SR
KEI

nOV
SEC

006764

1S80 006566

SEQ 0033

;ROUTINE T0 STORE (RECEIVED PARITY BIT IN PARITY 81T BUFFER

000001

032711
001001
000241
OONSI?

1681

PRGE 33

JNP
BIC
;;E.

ERROR

006508
006510
006512
006514

1673

13:48

CHP

BNE
OV

Ist

;ERROR! DATA CAME IN ON R LINE THAT

; PROGRAN WAS NOT TRANSMITTING ON

X1, 8TUNTRB4176 ;1S POINTER AT THE END

X0.-(6)

LINE

MCT(D)

Em“m‘nm 7680
;FETCH LINE NUMBER

:HAS THE LAST ogggnBEEN TRASMITTED

oV
'gu.m
I;!.sva
II.SF:;' gtt'.:1STER 2ERO e
nOV
(6)+,
IRESTORE REGISTER ZLRO TM
@
MOV
812 . XS
;ROTATE PARITY BUFFER
TR
& RoRPReSUF
:12. PLACES RIGHT
&
e
&u;
fi.‘mmm ;MAVE ALL CHARS. BEEN COMPRRED
MOVE (1)+, XNTDAT
; GET TRANSNITTED CHARACTER
0'155. «:z: a'cig;mISk RECE | VED crn'am".
DATCHK
3
;CONPARE TRANS. & RCVD. CHARS.

;ROUTINETO com‘nét AND CHECK mm‘:or
RECE'c
IVED 0ATR
126:

CLR

RORS

IN ON

RCVOAT

:CLE

o PARITY INDICATOR

;LOOK AT :c
EIVED BIT

CZDMADO DM11A LGC TST_
MACY11
CZDMRD. P11
28-APR-78 13: 4y
1611
1612

006710
006712
00671%
006716
006720

103001
005100
005303
001372
000240

006722
1618 006726
1619 006732
1620 006736
1621
0067%C
1622 006792
1623 00679
1624 006796
1625 006750
1626 006752
1627 006754
1628 006756
1629 006760
}g 006762

112237
012705
00N537
10300
005700
001336
104001
000734

1613
161%
1615
1616
1617

001566
000001
006764

148§:

158:

BE mow moy g
00701%
007020
007022
007024

006037
005316
001360
000205

16%%
1645
16%
1647
1648
1649

007026
007030
007032
007038
007036
007080

000000
000000
000000
000000
000000
000000

1643

:gg

1652
1653
1664

1665
1656

007000
007008
007010

006037
006037
006037

007042

000000

00704
00708

010046
005037

007062
007066

1657
1658

1661

007074

i e

013700
rl

137
i%

000207

28-RAPR-78

138:

005700
001732
104001
000730
005726
10%006

1636
1637
1638
1639
1640
1641
1642

30R(1052)

007034
007036
007040
007042

13: 48

1
3
PAGE 3y

SEQ 0034

BCC
Con

138
%0
%3
129

;BRANCH IF A D
; COMPLEMENT RO

TST
BEQ
ERROR
BR
POPSP
SCOPE

%0
10$

; TEST FOR EVEN COMPUTED PARITY
;BRANCH IF COMPUTED PARITY WAS EVEN
;ERROR! COMPUTED =00D, RECE IVED = EVEN
+CONTINUE TEST
;REPOSITION STACK POINTER
: SCOPE

IF A 1
DEC
;DECREMENT BIT COUNTER
BNE
;LOOK AT NEXT BIT IF NOT DONE
NOP
;
IF_COMPUTED PARITY WAS ODD RO WILL
:CONTRIN ALL 1'S, IF EVEN RO = O
Hnove
(2)+, RCVDAT
;GET RECEIVED CHARACTER
MoV
#1,2%5
;ROTATE PARITY BUFFER 1 PLACE
JSR
5. RORPARBUF
;RIGHT LERVING RECEIVED PARITY BIT IN CARRY
BCC
149
;BRANCH IF RECEIVED PARITY WAS EVEN
TST
%0
: TEST FOR COMPUTED ODD PARITY
BNE
10%
;BRANCH IF COMPUTED & RECE IVED WAS 0DD
ERROR
;ERROR! COMPUTED =EVEN.RECEIVED = 0DD
BR
10%
;CONTINUE TEST

108

SO e
-

ROR
ROR
ROR

ROR
DEC
BNE
RTS

;PRARITY BUFFER
PAR1:
PAR2:
PAR3:
PARY:
PARS:
PARG:

PAR3
PARY
PARS

PARG
(SP)
RORPARBUF
5

: DECREMENT ROTATE COUNT

OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN

;SUBROUTINE TO FORM LINE BIT POSITION MITH THE LINE & IN LINE

001564

GTLING.

016730

001564
000002

18:

MOV
CLR

MOV
SEC

%0.-(SP)
SRLINBIT

SBLINE. X0

ROL
Sue

LINBIT
#2.%0

RTS

;SRVE RO ON THE STRC
sCLEAR LINE BIT

sGET LINE
;SET _CRARRY

sSHIFT LINE BIT
;SUBTRACT 2 FROM L INE NUMBER

RIS
¢EXIT SUBROUTINE

CZDMADO DM11A LGC TST_
MACY11
CZDMAD. P11
28-RPR-78 13: w4

1663
1664
1665
1666
1667
1668
1669
1670
1671

007076
007100
007102
007110
007118
007120
007126
007132

10%000
020103
012737
005037
000137
012737
005037
000137

1673
1674
1675
1676

007136
0071840
007142
0071%%

000000
007200
000144
007146

1672

1677

1680

1681
1682
1683
168%
1685

1686

00714
007158
007160
007166
007170

012737
005777
012737
104006
162716

007174
007176

104001
000002

1690
1691
1692
1693

007200
007202
007208
007206

000001
007252
0001%4
007210

169%

1697

1652
1699

1700
1701
1702
1703
1708
1705

1708

1709
1710
1711
:;}g

28-RPR-78

PRGO:
007136
002004
002546
007136
002004
002600

002000
002000

PRGOR:

RSt t
007170
172362
000006

00000
00000

000004

18:

007224
007226
007230
007232
CO72%0
0072%%

007246
007252
00725%
007256
007260

001402
104001
000407
082777
008777
001401

SRTO, KSTART
RTNNO
SRSET
SRTO, KSTART
RTNNO
GE TRDY

;GET RDDRESS OF FIRST TEST
;CLEAR ROUTINE #
;GET RDORESS OF FIRST TEST
;CLEAR ROUTINE NUMBER
;GO AND START PROGRAM

0
RT1
100.
RTOR

;ROUTINE 8 O
;ADOR OF NEXT ROUTINE.
; ITERATION COUNT
:SCOPE ENTRY POINT.

X=X+1

i SR SRRttt d it ittt

z
3
3
3

e rtttrtrcrsoerrrri

MOV
TST
MoV
SCOPE
sue

818, JBERRVEC
;SET UP ERROR TRAP.
JCSR
; REFERENCE CSR
SERRVEC+2, JRERRVEC
;RESET TINE OUT TRAP

#. (6)

sRESTORE PC TO WMERE THE ILLEGAL

;REFERENCE OCCURED

ERROR
RTI

;ERROR! ILLEGAL REFERENCE OCCURED
;LOOP ILLEGAL REFERENCE INSTRUCTION

1
RT2
100.
RTIA

ROUTINE & 1
;RADDR OF NEXT ROUTINE
; ITERATION COUNT
;SCOPE ENTRY POINT.

;nuxtuzmtt:uxuunnmlmunm

RT1:

000001

012777
022777

TYPE
PRGOM
MoV
CLR
JHP
MOV
CLR
JNP

J
3
PRAGE 35

sTEST RBILITY TO REFERENCE CSR WITHOUT TRAPPING

RTOR:

SRR

007210
007216

13:48

RS
bR t
Rty
t
et YTt g
t

RTO:

000000

1687
1688

1689

30R(1052)

000001
000001

000001
172276

RTIR:

172302

1§:

000002
007324
00014%%
007262

RT2:

171

AR R

SRR

SRR SRR AR RN RN RRESRLR SRR ILRLRLLSTLLLLLLLLLL

MOV
cne

8EQ
ERROR
B8R
BiIC
TST
BEQ

&l&“

#8170, 3CSR
#8170, 3CSR
1%

#8170, 3CSR
SCSR
2%

sSET BITO.
s TEST THAT BITO IS SET
sBRANCH IF SET
;CSR BITO ll
LED TO SEY
;OR AN RDDITIONAL BIT ALSO SET

+CLERR BITO
:TEST THAT BITO 1S CLERR

sCSR BITO FRILED TO CLERR

;umtmmtmmumtmmtmmmm
2
RT3
100.
gffll“

olflfl' INE & 2
?‘ NEXT ROUTINE.
10N COUNT
ENTRY POINT.

wmm
X
*
X
X

;nuumm:mnnmnutmtmtmummuuuuuutmu

unu

};}9 007262 012777 000002 172252 i'ggzt tfivm ";}wa - ! cumo

1718 007270 022777 000002 172244

3
z
=
2

; TEST THAT CSR BITO
CAN BE SET AND CLERRED

17232%
172316

1;1;

X=X+1

mmmm

CHP

#8171, aCSR

?SY
TMT 8IT1 IS SET

CZDMADO DM11A LGC TST
MACY11
CZDMRD . P11
28-APR-78 13: 4y

001402
104001
000407
0N2777
005777
001401
104001
104006

000002
17222y

30A(1052)

172230

28-APR-78

13:48

BEQ

BIC
;g;

#8171, aCSR
ggsa

1§:
2%

ERROR
B8R

PAGE 36

;BRANCH IF SET

-CSR BIT1 FAILED TO SET
;OR AN RDDITIONAL BIT ALSO SET

;CLEAR BITY
;TEST THAT BIT1

ggs'fl‘

IS CLEAR

;CSR BIT1 FAILED TO CLEAR

; 8!!!!38!88!88!!ll!l!!ll!!ltltl!’ttuttmtmtultt

000003

RT3:

007376

000144
007334

ttt”t!38!lltt!!ltttt

3
RTY

;ROUTINE # 3
;RDDR OF NEXT ROUT INE.

100.
RT3A

; ITERATION COUNT
;SCOPE ENTRY POINT.

X=X+1
;!tttt!tttt!tttttlltlltllt8388383!!tttttt!tttttlt:

£
7

3
E

lttlttttltttttttttttttx

: TEST THAT CSR BIT2 CAN BE SET AND CLERRED
RT3R:
MOV
#8172, aCSR
;SET BIT2
cHe
#8172, 2CSR
;TEST THAT BIT2 1S SET

172200

172172

172152

172156

1§:

;BRANCH IF SET
;CSR BITZ FRILED TO SET
sOR AN RDDITIONAL BIT ALSO SET

88172, 3CSR
zszI

;CLEAR BIT2
;TEST THAT BIT2 IS CLEAR

ERROR
SCOPE

;CSR BITZ FRILED TO CLERR

100.

JUUUZL

172126
172120
172108

SRR

BIC
:‘SE

H :tmmmmtmttmwlmmt
mmxm
RTY:
)
JROUTINE 8 &
b4
RTS
sRDDR OF NEXT ROUTINE.
2

e B

25:

BEQ
ERROR
BR

; ITERRTION COUNT

:I:e‘

:SCOPE ENTRY POINT

MOV
#B1TN, aCSR
CHP 8BITH, 3CSR
80
1%
ERROR
B8R
2%
8IC
#B1ITV. ICSR
Ist
gc’n
ERROR

;%nm.
;
THAT BITS IS SET
SBRANCH IF SET
;CSR 81T FRAILED TO SET
;OR AN RDDITIONAL BIT RLSO SET
:CLEAR BITY
;TEST THAT BITN IS CLERAR
;CSR BITY FRILED TO CLERR

R
fl&
RTSA

XsX+1

——
R

T
¥ ¥ PASSRAGRESRRReeaey
l gou COUNT g
:SCOPE ENTRY POINT.
AR

MOV

#8175, 3CSR

E N SRR LR AR R R R AR LTI ATATLLTRALLLLL

;TEST THAT CSR BITS CAN BE SET AND CLERRED

172054 RTSAR:

:SET li.l‘s.

CZDMADO DM11R LGC TST
MACY11 30A(1052)
CZDMRD. P11
28-RPR-78 13: 4y

022777
001402

i o g

1779

007502

0N2777

1780
1781
1782
}77;3

007510
007518
007516
007520

008777
001401
104001
104006

1785
i786
1787
1788

007522
007524
007526
007530

000006
00757%
000144
007532

1789

1790
1791

007550

108001

:z 007558 ON2777
i En

1801

g
180%

007570

007578

000040
172026

1720846

172032

1808

1809
1810
i811
1812

007602

007608

171760

104001
000M07
ONZ2777
005777

:giz

00764%

10%006

1823

007646

000010

1828
1829

007654

MoV
cHP
BEQ
ERROR

18:

2%:

007656

000010

;CSR BITS FAILED TO SET
;OR AN RDDITIONAL BIT ALSO SET
;CLEAR BITS
;TEST THAT BITS IS CLEAR
;CSR BITS FAILED TO CLEAR

; ITERATION COUNT

B8R

BIC
&s;

#8176, 9CSR
#8176. aCSR
19

#8176. aCSR
g”

ERROR
SCOPE

;SET BIT6.
; TEST mn 8176 IS SET
;BRANCHIF SET
.(fl llT‘ FRILED TO SET

;OR AN RDDITIONAL BIT ALSO SET

o(l.l. 81T
;TEST THAT BIT6 IS CLEAR

;CSR BITé FRILED TO CLERR

.ummmnmmtmmm
wtnm
RT?:
?
;ROUTINE 8 7
3

RT10

;ADDR OF NEXT ROUTINE.

100.
RT?R

000007

012777

oCSR

;TEST THAT BITS IS SET
;BRANCH IF SET

i;a‘l THAT CSR BIT6 CAN BE SET AND CLEARED

007604

007622
007628
007626
007638

1826

gz&fl‘

2%
#8175, 3CSR

SEQ 0037

m:u

000007

1815
1816
1817
1818

1827

25,

:g;

#8175, CSR
19

100.

10%001

i S S

i e

18:

ERROR
B8R
BIC

L
3
PRAGE 37

IT“I
:SCOPE ENTRY POINT.
X=X+1
;t:uuuumtmmnuuunmuuuuuumtutu
uuuuuu

:g 007600 0001%%

1807

CHP
BEQ

13:48

;xxuuuuu::utxu:xutxutzuummnunun
aaunuuunnzxu
RT6:
6
;ROUTINE
8 6
3
RT?
;RDDR OF NEXT ROUT INE.
z

000006

. J——
12 007S% 001%02

1796

000040

s et

007966
007424

35 88

1775
1776

28-APR-78

R=X+1
; SERERRXLRRLZLLRRRRRLRRRLRLLSL

171730
171722

171706

; ITERATION COUNT
+;SCOPE ENTRY POINT

z
z

; TEST THAT CSR BIT12 CAN BE SET AND CLERRED
RT7ZR:
MOV
Mtz
sSET BIT12

18:

25,

e
8EQ
ERROR
B8R
8iC

Y“ST.
g&

M]iITi2,
15

881112,

gfl

s TEST THRT BIT12 1S SET
sBRANCH IF SET
sCSR BIT12 FRILED TO SET
sOR AN
ITIONAL BIT ALSO SET

;CLERR B! l‘

;TEST THAT

+CSR BITI2 FRAILED TO CLEAR

xmuutmtmmnmmum
l"fl:
10

ga’!

Iflfl

BIT12 IS CLERR

%10

) m
Mmt!

SCOPE nmPv
OINT.

SETATTRRRRRRLL
4

X+1
5::uummuunutmzmuuumzuumxuuuuutt
ununmm

;TEST THAT CSR BIT13 CAN BE SET AND CLERRED

CZDIRDO DM11A LGC TST
MACY11 30A(1052)
CZDMAD. P11
28-RPR-78 13: w4

1831
1832
1833
1838
1835
1836
1837
1838
1839
1880

007656
00766%
007672
00767%
007676
007700
007706
007712
007714
007716

012777
022777
001402
10001
000N0?
OM2777
005777
001401
10%001
104006

1842
1843
1848
18NS

007720
007722
007724
007726

000011
010010
000144
007730

1881

1846

{::

G20000
020000

171656
171650

RT10R:

020000
171630

171634

1§:

28:

MOV
CHP
BEQ
ERROR
8n
BIC
TST
BEQ
ERROR
SCOPE

no3

PRGE 38

1866

010010

000012

881713, SR
881713, SR
1%

.SET BIT13
TEST THAT BIT13 IS SET
.ll“flIF SET
;CSR BIT13 FAILED TO SET
;OR AN RDDITIONAL BIT ALSO SET
;CLEAR BIT13
;TEST THAT BIT13 IS CLEAR

2%
881713, &SR
oCSR
23

;CSR BIT13 FAILED TO CLEAR

11
RT12
100.
RT11A

uxnxxxu

;ROUTINE # 1
;RDOR OF m ROUT INE.
; ITERATION COUNT
:SCOPE ENTRY POINT.

X=X+1

t
3
k4

; tunmumuumnuummtmtuuwnumm

1869

010016

010020

030167
001570

171604

171572

001566

C30167
171550
171544

17iS5v

;TEST THAT RESET & CLEAR INSTRUCTION CLEAR ALL R/M BITS IN
THE CONTROL
STATUS REG. (CSR)

RT11R:

1§:

001566

i al oo

2:.

SCOPE

RT122

830167, &SR
XNTOAT

SCSR, RCVORT
13

RT11R
830167, SR
(SR
SCSR. RCVDAT
23
15

1E80
1881

ERROR®
I.I‘T

:glfll.“

171450

& 12

; TEST THAT R SiNARY
CAN BE LORDED INTO R CLEAR BKCSR AND THAT
i?l.fi'nz sm CAN BE CLEARED.

010072

INE

;SCOPE ENTRY POINT.

nCl’°

0N0000

; ISSUE RESEY
;GET CSR CONTENTS
;BRANCH IF RESET CLEARED ALL BITS
;ERROR! RESET DID NOT CLEAR ALL BITS
;LOOP ON ERROR
;SET ALL R7M BITS IN CSR
;CLERR THE (SR
;GET & TEST (Se
;80 TO EXIT IF RESWLY = 0
:mw INST. DID NOT CLERR ALL BITS
JLO0P
+ SCOPE

XzX+i

anam

108011
m

;SET ALL R/M BITS IN THE CSR

RT12R

000012

MOV
CLR
SRESET
mov
BEQ
ERROR1
B8R
nov
CLR
nov
BEQ
ERROR1

1878 010080 m 001570 001566

1885

SEQ 0038

ummumzn

1851 007730 012777
1852 007736 005037
1853 007742 10%005
1858 00779 017737
1855 007752 001%02
1856 007758 108011
1857 007756 00076%
1858 007760 012777
1859 007766 005077
1860 007772 017737
1861 010000 001%02
1862 010002 108011
1863 010008 000765
=z 010006 10%006

1873
187+

13:48

; uuz:uuutuuttuuntuztuzm:mumzmtuuuxxuu

RT11:

000011

1849
1850

1870

28-APR-78

171122

1886 010076 017737 171444 001566

3s:

CLR

MoV

RCVORT .C .’lfln?u & gmu RERD BRCK

:fica. RCVDAT

;
;

DOD NIT COMPARE
' ;COE L

s CLEAR BRCSR AND TEST

. BKCSR CAN BE CLERRED

:
2

CZOMADO DM11A LGC TST
MACY11 30A(1052)
CZDMARD.
P11
28-APR-78 13: 4y

1887

1888

1889

1890
1891
1892
1893

189%

1895

010104

010106

010110

001570
001570

01013%v

005237

001570

010180

010142

1898
1899

0101%
0101%

1900

040000

001365
010137
023727

189

1897

032777

010116
010120
010124

010132

010150

13:48

BEQ

BIT

981714, 3SR

001405

104011

001403

000731

ERROR1

171064

177777

BNE
nOV
CHP

vs:

BEQ
8R

10%006

SCOPE

000013
010256

RT13:

13
RT1Y

0001%%

1906
1907

012702
017737

010000
171362

1910
1911
1912
1913

1917

1218

MOV
MOV
CWP
BEQ

01022%
010232

032777
001%06

ON0000

170750

BIT
BEQ

013777

002104

1922

01025%

10%006

1925
1926

010260
010262

010316
000012

171306

01026%

i¥u

010266

;60 70 EXIT

:REPEAT TEST

; SCOPE

x
P

$10000,
X2
@BKCSR.PRVCNT

;GET RAMDOM BCOUNTER
;GET
PREVIOUS CONTENTS

r.ugn

;

X0, XNTOAT

;

XNTDAT,aBKCSR
BKCSR.RCVDAT
XNTOAT.RCVDAT
3%

88ITIN. 3SHR
S

BKCSR

PRVCNT.3BKCSR

28
%2
18

- wmmc INTO BKCSR
:GET BKCSR DATA
:COMPARE DATA
SBRANCH IF SAME

;ERROR! DATA NOT THE SAIE

;SCOPE LOOP?
;BRANCH IF NO LOOP ON ERROR

;LOAD PREVIOUS CONTENTS

;REPERT TEST

;BRANCH IF NOT
; SCOPE

ROUTINE& 1%

RT18
1

NUMBER

'inmunu

pa—_—

;mmmm
)
10N COUNT

RT14A

;SCOPE ENTRY

%
:

POINT
t
X=X+1
B
y———
;TEST THAT RESET CLEARS ALL BREAK STATUS REGISTER BITS

012777
005037
10%005

1938
1939
a:g

010312
01031%
e

104011
104006
s

19%2

010320

8R
DEC
BNE

000014

010266
01027
010300

1936
1937

CLR

MOV

1933
193%
1935

; INCREMENT BINARY COUNT

; ITERATION COUNT

ERRORY

171300

} 010256 000014

1927

XMTDAT

:SCOPE ENTRY POINT.

JSR

008077

;BRANCH IF SCOPE LOOP
SGET BINARY
C
;ALL NUMBERS BEEN LORDED

;ROUTINE @ 13
;ADOR OF MEXT ROUT INE.

MOV

1713%2
001566
001566

01023%

3
X1, XMTORT
XNTDAT, §-1
18

MOV
MOV

001570
171336
001570

1919 01024 000753
1920 010250 005302
1921 010252 001382

1928
1929

RTI3R:
1$:

013777
017737
023737
001401

010280

DID NOT CLEAR

iettt

010176
010208
010212
010220

108011

: SCOPE LOOP?

.mxnm:mmxmzzmmummmmmxm:mumm:mm
; TEST THAT mon NUMBERS CAN BE LORDED INTO THE BKCSR

1908 010166 008737 003250

010222

;BRANCH
IF BKCSR CLERARED

;ERROR! BKCSR

1909 010172 010037 001570

191%

SEQ 0039

100,

002104

1915
1916

RT138

01015%
010160

PAGE 39

5§

INC

101 010152 o10164

1903
1905

28-APR-78

010302 017737
010310 001401

00001

010452

177777
001570

171252

171240

001566

RTINA:

MOV
CLR
SRESET

HOV
BEQ

8-1.3BKCSR
XNTOAT

azxcsu.ncvmr
1

ERROR1
18;
SCOPE
: ggzmgmzmnmmumm:gtz&u:xgxmummum
:mm

RT16

;

;ADDR OF NEXT ROUTINE.

m:
3

CZDMADO DM11A LGC TST
MACY11 30A(1052)
CZDMRD. P11
28-RAPR-78 13: 4y
010322
01032y

B
PAGE 40

10.
;Ti?‘i

; ITERATION COUNT
;SCOPE ENTRY POINT.

3
k]

lttltttl!t‘!ttttl“lttt

& #82

010604

1987
1988
1989
1990

010616
01

&
19%
i3 e
010660

2 o

1998

13:48

; 8!!!3!”!lullttllttttulttttlttl338!8”8!1383tll

1950 010326
1951
010332
1952 010M0
1953 010%6
1954 010354
1955 010356
1956 010360
1957 010366
1958 010370
1959 0103
1960 010800
1961 01080%
1962 010812
1963 010814
1964 010816
1965 010824
1966 010826
1967 010832
1968 01080
1969 010W2
1970 010%6
1571 010850
1972
1973 010852
197% 010854
1975 010856
1976 010%0
1977
1978
1979
1980
1981 010862
1982 010%:6

1995

000012
010326
000015

010666

;TEST THAT R BINARY COUNT CAN BE LORDED INTO A
CLC"Q BASREG RND THAT
;A BINARY COUNT CAN BE CLERRED.
RT15R:
CLR
XNTDAT

001570
001570
171208
001570
0%0000

001570
001570
171144
1711%0
0%0000

001570
001570

18:

170614

28:
001566

38:

BIT

#BIT14, aSHR

HOV
CLR

XMTDAT, %1
XNTDAT

;SAVE BINARY COUNT

;BRANCH IF BKCSR CLEARED

8B1TIN, 3SUR

- SCOPE LOOP?

BNE

CLR
MOV
BIT

58:

. LOAD BINPRY COUNT INTO BASREG
GET BRSREG DATA
. COMPARE DATA

BEQ

4s:

XNTDAT, BBASREG
SBASREG.RCVDAT
XMTOAT. RCVDOAT

BEQ

ERROR1

170556
177000

MOV
MoV
cHe

ERROR1

001571

SBASREG
SBASREG. RCVDAT

BNE

’sgl

gfflffl

nov
CHp

SCOPE

;BRANCH IF DATA COMPARES

;ERROR! DATA DID NOT COMPARE
; SCOPE LOOP?

;BRANCH IF SCOPE LOOP

;ERROR! BKCSR DID NOT CLEARR

;BRANCH IF SCOPE LOOP

X1. XNTDAT
XNTDAT. #177000

;GET BINARY COUNT
ALL MSSERS BEEN LORDED

;REPERT TEST

;?omm
EX'I 1I"l'Y COUNT

: SCOPE

; uunmxm:uzmxmummmwa
mtmmxmm
RTi6:
16
;ROUTINE 8 16
3

RT1?7

;RDDR OF NEXT ROUTINE.
; ITERATION COUNT
:SCOPE ENTRY POINT.

100.
RT16A

: TEST THAT RANDOM MUMBERS CAN BE LOADED IN
TME
TO
BASE REGISTER

010000
171056

£RA T, L

1943
19%4%
1945
1%6
1947
1948
1949

28-APR-78

170776
002104

; GET RANDOM

eTtama

ER
JBRSREG.PRVCNT ;GET PREVIOUSSCOUNT
CONTENTS
W
;60 GET A RANDOM NUMBER

18:

MOV
JSR

171032

MOV
MOV
cn

SiTS
n
XMTORT, SBASREG :LOAD RANDOM NUMBER
INTO BASREG
SBASREG.RCVDAT ; BRSR
GET
EG DATA
XITOAT. RCVORT ;
COreARE. OATA

170436

3s.

BIT

@BITIN.3SMR

ROV

ERROR{

CLR

170770

¥$:
5%:

MoV
B8R
DEC
BNE
SCOPE

ys
SBASREG

PRVCNT. @BASREG
23
%2
19

Emu“s mmui noEr THE SAMNE
:SCOPE LOOP?

;BRANCH IF NO LOOP ON ERROR

;L
PREVIOUS CONTENTS
:REPEAT TEST
:l% NUMBERS BEEN TESTED
;BRANCH IF NOT
+ SCOPE

¥
X
T

CZDMADO DM11R LGC TST_
MACY11
CZDMAD. P11
28-APR-78 13: 4y

1999

2000
200t
2002
2003

2004

010570
010572
010574
01057¢

2007

2027
2028

010662
0G1066%
010666
010670

000020
010750
OOC0012
010672

2035

2036

010672

QIGTR
010742
0107

2084

SEQ 0041

“3‘3‘33333"33“‘!

1?7
RT20
100.
RT17R

JROUTINE 8 17
;RDDR OF NEXT ROUTINE.
; ITERATION COUNT
+ SCOPE EMTRY POINT.

X=X+1

b§
b4
4
b4

005037

i‘m

;TEST THAT ALL BAR BITS CAN BE INDIVIDURLLY SET AND
CLERRED

00154%
001%00
000001

170736

RT17R:

001570
001566

2%
38:
(1%

001570

017737
001401
10%011

010754
01078

20
RT21
10.
RTZ20R

A=)+l
s SXESRSERRRRRLRRRRLRRERLLS

;GET BAR ADORESS
;INITIRLIZE BASE REGISTER
;GET BIT TESTER
;SET BAR BIT
;TEST THAT ONLY THE PROPER BRR BIT SET
;BRANCH IF ERROR
;CLEAR BAR BIT
:TEST THAT BAR B1T CLEARED
sBRANCH IF BAR BIT FRILED TO CLEAR
;SHIFT BIT TESTER

; SCOPE
;GET WMAT DATA WAS SUPPOSED TO BE
;GET WMAT DATA WRS
;ERROR! INPROPER BIT OPERATION
180 TO SCOPE
:GET WMAT DATA MRS SUPPOSED TO BE

177777

170610
17068

;ROUTINE ¢ 20
;RDDR OF MEXT ROUTINE.
; ITERATION COUNT
;SCOPE ENTRY POINT

mm
b4
b4
b4
b§

;TEST THAT RESET CLEARS ALL BAR 81TS

001570

170680

RTZOR:

00156s

7 P

011056

000144
010740

MOV
BAR. %1
MOV
SCAT, 9BASRES
MOV
#1.%0
BIS
%0. (1)
CHP
%0, (1)
BNE
38
BIC
x0. (1)
ST
BNE
£g
ASL
%0
BCC
18
SCOPE
MoV
X0, XNTDAT
MoV
(1).RCVORT
ERRORY
o
ge
CLR
XATOAT
214
3

.!mmmmmmmm

RT20:

789 010750 000021

2050 010752

2051
2%z

C
&
PAGE 41

F- ‘!"'333'333"33"33'3“3"‘3“‘33”""““33“'3“‘

203 orome ="m7'm"' 170632 001566
go’": A 108011
Ih: 0i07E2 GeBys 177777 1706w 15
23 010730 008077

2
200
e

13: 48

3“3!”3!‘333‘3!3!3

013701
012777
012700
050011
020011
001006
0ON0011
008711
001011
006300
103370
10%006
010037
011137
108011
000771
005037
000771

2030

RT17:

000017

010600
010607
010612
010616
010620
010622
010628
010826
010630
010632
01063%
010636
010680
O106M%
010680
010682
01068%
010660

2031
2032

28-APR-78

H 3"‘3‘33“"3!'3“3"!"3t!t‘l""""“"““u""t

000017
010662
00014y
010600

2008
2009
2010
2011
2012
2013
201%
2015
2016
2017
2018
2019
2020
2021
2022
2023
202%
2025

2026

30R(1052)

ggst

toAT

$-1.30RR

POV
mecwar
o
Dhs
§-1, 2808
LR

omR
MOV
BAR.RCWAT
a2
EotOm

k22

1
Ar2in
=

5&"?& BAR BITS

el amoam
::'ng"""z'(RESET DID MOT CLEAR ALL BAR BITS
ST IRL BIT 10 e oo
SCLEAR
ALL

BITS IN THE BAR
:GET & TEST RESILT OF CLEAR OPERATION
SEXIT IF AL BITS CLERRED
SERRORY ALL 01T DID NOT CLERR

;AD0R

S
:SCOPE

OF NEXT RouT e,

P——

ITERATION COUNT
ENTRY POINT.

; ““”nu“"“‘l"‘3“..""""‘“"!‘”‘t'u"lfl‘l“!‘tlt‘lin!‘

:
:

ltn

CZDIMRDO DM11A LGC TST
MACY11 30A(1052)
CZDMRD. P11
28-R¥R-78 13: Wy

2057

13:48

D 4
PRGE 42

: TEST THAT (SR RESPONDS PROPERLY TO BYTE
COMMANDS
RT21R:
MOV
#10100, CSR
/LOAD TEST NUMBER IN (SR

010100
170550
010000

170542

CLRB
5?3

(SR
uoono, (SR

;CLEAR EVEN BYTE
; TEST THAT ONLY EVEN BYTE CLERRCD

010100
170526

001570
001566

MOV
MOV

#10100, MTOAT
oCSR, RCVDAT

;LOAD CORRECT RESULT
;GET ACTUAL RESULT

;60 TO SCOPE

170554

010100
171052

170512

000100
170872

001570
001566

ERROR1

1§:

2%:

;RS

MoV

%’CSR

#10100. (SR

;LORD TEST NUMBER IN CSR

nov
HOV
ERROR1
SCOPE

#00100. MTOAT
#CSR. RCVOAT

;LOAD CORRECT RESULT
;LOAD ACTUAL RESULT
;ERROR! ODD BYTE INSTRUCTION FRILED
; SCOPE

LR R

LR SRR SRRSSS SRS RRRRLLTLLSSLRLSLSSLTLSILLLS

;ROUTINE 8 22
;RODR OF NEXT ROUT INE

RT23

; ITERATION COUNT
;SCOPE ENTRY POINT

CLRE
ce

a8AR
$10000.8Ak

;CLEAR EVEN BYTE
:TEST THAT OMLY EVEN BYTE CLEARED

010100
170822

001570
001566

MOV
MOV

§10100.)TDAT
3BAR.RCVOAT

ERvor: 4
MOV
#10100.38AR
cLRe
3 s

;LOAD CORRECT RESULT
:GET ACTURL RESLT

;ERROR ’Ea BYTE INSTRUCTION FRILED
:LOAD TEST NUMBER IN BAR
;TEST THAT ONLY ODD BYTE CLERRED

MOV
MOV

$00100.MTORT
3CSR.RCVORT

;LORD CORRECT RESULT
:LORD ACTURAL RESILT

010100
170746

170406

3
32

3
|

; TEST THAT BAR RESPONDS PROPERLY TO BYTE CONW
NDS
RT228:
MOV
#10100.38AR
;LOAD TEST MUMBER IN BAR

1708436

170850

000100
170364

18:

ERROR1
SCOPE

RT23:

;ROUTINE # 23

g’z‘#

Emr:n EnTRY TPOINT.

;ERROR! ODD BYTE INSTRUCTION FRILED
; SCOPE
B

: TEST THAT OMLY ODD BYTE CLEARED

010100
1704%44
010000

B s 1’ §

-n
[ ]

;ERROR! EVEN BYTE INSTRUCTIOM FRILED

&.zl

100.
RT22R

SENRRTANCIRRRNRERT RSy

2059

28-APR-78

e
t
———

ggn

: ROOR ofXt RouTie.

g Ty
—

010100
170340
010000

170344

;TEST THAT BKCSR RE
RT23R:
MOV
9101

170332

che

CLRE

38K

010100
170316

001570
001566

MOV
MOV

§10100,)MTOAT
BKCSR.RCVDAT

$10000,

PROPERLY TO BYTE convos
CSR
.LOAD
TEST NUMBER IN BKCSR

KCSR

:CLEAR EVEN BYTE

TEST THAT ONLY EVEN BYTE CLEARED
;LOAD CORRECT RESULT
:GET ACTURL RESULT

CZDIMRDO DM11R LGC TST
MACY11
CZDMRD. P11
28-APR-78 13: 44

011232
01123
011236
0112984
011250
011252
011260
011266
011270

104011
000415

012777
105077

170302

001407
012737
017737
104011
104006

28-APR-78

1$:

001570
001566

28:

13:48

ERROR1
B8R

E
4
PAGE 43

SEQ 00y3

;ERROR! EVEN BYTE INSTRUCTION FRILED
;G0 TO_SCOPE

MOV
Elia.

§10100.38KCSR
gilK(Sl

;LOAD TEST NUMBER IN BKCSR
;TEST THAT ONLY ODD BYTE CLERRED

MoV
MOV
ERROR1

800100, XMTOAT
SCSR, RCVOAT

. LOAD CORRECT RESULT
;LORD ACTUAL RESULT
;ERROR! ODD BYTE INSTRUCTION FRILED

SCOPE

; SCOPE

RT25
100.
RT24A

‘ADDR OF NEXT ROUT INE.
; ITERATION COUNT
:SCOPE ENTRY POINT.

‘ tut:xuuutxu:uuxu:xxxuuummnmuuz
uuunuzxnxunxu
RT2%:
2%
;ROUTINE # 2%
32

000024
011336
000144
011302
000024

X=X+1
; xxnuut:uuu::utwnuummmmmm

3
3
4

uunuuuxmz:u

012777
012777

; TEST TD%'MI RUN BIT ('(‘Sl BiIT13) CAUSES AN
INTERRUPT WMEN SET

RT24A:

170246
170224
170216

MOV

815, SXNTINT
881712, XSk

8PSH

BIS

881713, SR

ERROR

;LORD TRANSMITTER INTERRUPT VECTOR
;SET TRANSHITTER I1E BIT

;SET OVER RN BIT

;ENRBLE INTERRUPTS

;ERROR 'OVERRUN FRILED TO CRUSE AN

; INTERRUPT.OR INTERRUPTED TO INCOR;RECT RDDRESS

18
; SCOPE
; nuumzmmnunuummmm

RT2S5:

;ROUTINE 8 25
;RDDR OF NEXT ROUTINE
; ITERATION COUNT

RT26
100

’I‘I,z‘?'\

§=§§

-.°8
Sna

3
3

-‘3-

Seaoaans
#3%8 Jake

2111
2112
2113
2114
2115
2116
2117
2118
2119
2120
2121
2122
2123
212v
2125
2126
2122
2128
2129
2130
213
2132
2133
2134
2135
2136

30A(1052)

177776
170134

:mmM:n

: SCOPE ENTRY POINT.

z
z
z

Wmmmwmmmm

mmmm

; TEST THAT THE DM11

RT25R:

18:

170106

2%:
»

INTERRUPTS AT THE CORRECT LEVEL

MoV
nov

nov

SPRTYS. @8PSH

ERROR
B8R

CLR
w

(SR
#30000. aCSR

B8R
ERROR

cHp
nov
MOV

ScoPt

. PSU
815, XNTINT

(6)+. ()
XNTLVL.30PSH

825, IXNTINT

;LORD TRANSNITTER INTERRUPT VECTOR

sSET OVER RUN & IE BITS

;ALLOM INTERRUPTS ON LEVEL 5 & RBOVE

;ERROR!DN11 FRILED TO INTERRUPY
;60 TO EXIT
sRESET STACK POINTER
.LORD DM11 INTERRUPT LEVEL
;LORD TRANSMITTER INTERRUPT VECTOR

;60 TO EXIT
<ERROR! DNM11 INTERRUPTEDL ON MIGHER
;PRIORITY LEVEL THRN SET FOR

; t'uuxuunxxnuxutmtutxuummxuutuuuuuzuunuxnun

RT26:

26
RT27

iR
;ROUTINE &
# 26
: ADDRESS OF NEXT TEST.

X
1

CZDMADO DM11A LGC TST
MACY11
C ZDMRD. P11
28-APR-78 13: 4y

2167
2168
2169
2170
2171

2172
2173
21174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
219

011450
011452

011454
011460
011462
011464
011466
011470

011472
011476

011500
011502
011504
011506

2192

RERCINERCHRNEURNRRRRES

2193
21%
2195
219
2197
2198
2199

011510
011514

011516
011520
011522
011524

)

30A(1052)

28-APR-78

000144
011454
000026
004537
000000
000001

0o%622

004537

; ITERATION COUNT
;SCOPE ENTRY POINT

B
i

:!!lll!t!t!ttl!tlttt!!833!!!8!!!t!!ttl!lll!!!
!ltt!l!tlllt!!t!!tt!t!t!lxlt
: TRANSMITTER LINE TEST LINE O
LTSTO: JSE"‘O
5. XMTTST
;GO TEST TRANSMITTER LINE O

Y=Y+1

RT27:

ll!ttl!!ltllt!!!t!!lxtt!!

27
RT30
100.

;ROUTINE 8 27
;RDDRESS OF NEXT TEST.
; ITERATION COUNT

LTSTH

004622

+;SCOPE ENTRY POINT

b4
4
4

X=X+1
; txunuunuununnxzutzntuumnnnnuuu
ux:uuunxxnxa
;TRANSMITTER LINE TEST LINE 1
LTST1: JS:"‘.
5. XNTTST
;60 TEST TRANSMITTER LINE 1

Y=Y+1
; xuuzuntutuuunuuutxuummmx:mn
u:mzuuuunx:u
RT30:
30
;ROUTINE & 30

RT31

;RDDRESS OF NEXT TEST.

LTST2

;SCOPE ENTRY POINT

100.

004622

; ITERATION COUNT

; xxuzwmmmxmtmmmmm
mmmmmmm
; TRANSMITTER LINE TEST LINE 2

LTST2: JS:Mz

5. XNTTST

;60 TEST TRANSMITTER LINE 2

Y=Y41
; tmtmmtmuntm:nxmm

RT31:

RT32
100.

+RDDRESS OF NEXT TEST.
+ ITERATION COUNT

LTST3

004622

mmmmmwm

;ROUTINE 8 31

+:SCOPE ENTRY POINT

X=X+1

LTST3: J‘LIKJ

RT32

S, XNTTST

b{
b
b

+G0 TEST TRANSMITTER LINE 3

RT33
100.

;ADDRESS OF NEXT TEST.
; ITERATION COUNT

+SCOPE ENTRY POINT

SRR
R R SRR R
;TRANSMITTER LINE TEST LINE &

LTSTy: JT""

uxummxmm

sROUTINE 8 32

004622

S 3R
R R
R R L
IR X AR AR E R RS SRR SRR
LLRS
R NIRRT
IRLTTLTLLLLLLLL
;TRANSHITTER LINE TEST LINE 3

Y=Y+
; tmummxmuuxmmnmmuumtmm

011552
000144
011544
000032

004537
000010

SEQ 004y

: tll!!l!tll!l!!til!!tll!ltlt!l8!8!383!!“1l”ll!

000031
011534
000144
011526
000031

000006
000004

000030
011516
00014y
011510
000030
004537
0C000%
000003

PRAGE 44

100.
kTiI?

000027
C11500
000144
011472
000027

008537
000002
000002

13:48

5. XNTTSY

R R R AR IR

X
b{

RRRRT SR TRTIATLRTXLLLRLL

;GO TEST TRANSMITTER LINE &

Y=Y41

000033
011570
00014y

; nutm;uznutunmxxuutuuumuunuxtuuununuuuxxn

RT3:

RT34
100.

+ROUTINE & 33

+ ADDRESS OF NEXT TEST.
; ITERRTION COUNT

%
X

CZDMADO DM11R LGC TST
MCYH 30A(1052)
CZDMAD. P11
28-RPR-78 13:
4

011560

L PP PR PR

011562
011566
011570
011572
011574
011576

011600
011604

011606
011610
011612
011614

011616
0it1622

011624

011626
011630
011632

011562
000033

004537
000012
000006

004622

;SCOPE ENTRY POINT

,TRMSHQTEI LINE TEST LINE &
LTSTS:
5. XNTTST

;GO TEST TRANSMITTER LINE 5

; ADDRESS OF MEXT TEST.

’L‘T’S‘I?

;SCOPE ENTRY POINT

; ITERATION COUNT

004622

;!l!llt”ttutltittut!utl!l!!!l!l“!l“t!”!t“tt“t
lutltltttttt!!t!!t
; TRANSMITTER LINE TEST LINE 6
LTSTé: JSI"‘
5, XNTTST
;GO TEST TRANSMITTER LINE 6
YzY41

; :xuuuuuntxtux:tuttununmmmum

RT3S5:

:muxnnumunux

35
RT36
100.

sROUTINE 8 35
-RDDRESS OF NEXT TEST.
; ITERATION COUNT

,L‘T,S‘T:

004622

4
4
4

+;SCOPE ENTRY POINT

=X+

;nmxmxmzmmuu:mummmm:m
mmmmzm
; TRANSMITTER LINE TEST LINE ?
LTST?: JSR
5. XNTTST
;60 TEST TRANSMITTER LINE 7

Y=Y41

; ummummumwmxmmm

000036
011682
000144

RT36:

;ROUTINE & 36

RT3?
100.
LTST10

LTST10: Jfl"m 5. XNTTST
Y=Y+1

e
100.

’L‘mga

004622

mmxmmmm

I ADORESS OF EXT TEST.
; ITERATION COUNT
:SCOPE ENTRY POINT

3
3
¥

T
———

STRANSMITTER LINE TES
LIne
T 10

FEEE 13

!88!!!!3!!1!!!!!8!!

RT35

100.

s BERR8

b¢

.
XaX+1
B

292

SEQ 0045

; tl!t!!lt!!ttll!l!lt!l!fl!!t!!!33!3883!33!3”!!
”3!8!8883!3!1!!!3!l!t!!lt
RT3%:
3
ROUTINE & 3v
¥

004622

BERREEEE L L L

G
&
PAGE 45

LTSTS

000035
011624
000144
011616
000035
008537
000016
000010

13:48

X=X+1
;!lt!!t!fl!t!fl!!!lll!!!tfl!!l!lltttl!t!8!!!t!
!t8!!!3!!!

000034
011606
000144
011600
000034
004537
000014
000007

28-APR-78

;60 TEST TRANSMITTER LINE 10

T
T
——

;SCOPE ENTRY POINT

S ITERATION COUNT

get
e yvr—
:TRANSMITTER L INE
g;r
LINE 11

LTST11: ‘flma
g
RTVO:

YaY+1

40
ms

100.

LTST12

;60 TEST TRANSMITTER LINE 11

e Tttt
;ROUTINE
8 40
;ADDRESS OF NEXT TEST.

: ITERATION COUNT

i SCOPE ENTRY POINT

—
'
X

SEHEGGRRCRURRBRSat
EsERE
R
Naa
s
§
ssse s

CZDMADO DM11RA LGC TST
M(YH 30A(1052)
C
. P11
28-APR-78 13:
4

011670
011674

011676
011700
011702
011704

011706
011712

011714
011716
011720
011722

004537
000024
000013

004622

SEQ 0046

LTST12: JSR

5, XNTTST

;60 TEST TRANSMITTER L INE 12

fgmmmummmzmmmm

©ORTN2
100

'm:ssOF NEXT TEST.
; ITERATION COUNT

kr’s‘ns

000041

004622

:
1

:SCOPE ENTRY POINT

;!88388”38388838!ltttlfl!lttt338833!8!”8l"i!“t
l”t!utttttttttlt!tl”
; TRANSMITTER LINE TEST LINE 13
LTST13: JSR
5. XNTTST
;60 TEST TRANSMITTER LINE 13

L
=

; :utuuzxu:zntuuuzxxuummzm:mzmnu
nuuuuuznx:xxx
RTH2:
w2
;ROUTINE 8§ 42
z

000042
011732
000144
011724
000042

RT43

;RDDRESS OF MNEXT TEST.

§T§I=Q

:SCOPE ENTRY POINT

100.

; ITERATION COUNT

;tuxnmzuumxmmuutmummx:muutmt
mxmnnmnu
; TRANSMITTER LINE TEST LINE 1%

LTST1N: Jfl"“

8, XNTTST

;G0 TEST TRANSMITTER LINE 1%

Y=Y+41

; IXRREXRXRRARLRRRTILRLRRLLLLRERLS

011732
011734
011736
011740

H
4
PAGE 46

X=X+1
.!33!!38!33!3!!!8!!333!!!!llt!!llll!!tl!fl!tl
!t!lt!!!l!ltl!!!l!!!t!l!t!lt!
;TRANSMITTER L INE TEST LINE 12

000041
011714
000144
011706

004537
000026
000014

13:48

‘m:xxx::xmm:uumnmmg&:

011724
011730

SRR

28-APR-78

RTY3:

43
RTWY

100.
LTST1S

004622

XaX+1
SR
R R RR
R
IR R
;TRANSMITTER LINE TEST LINE 15

LTSTiS: J!l‘“
X

RTNN:

Y=Y41

5. XNTTST

b§
2

; ITERATION COUNT
+:SCOPE ENTRY POINT

R LRSS RR SRR RRRRRRTITILLILLTILLLTLTLLLL

+GO TEST TRANSMITTER LINE 15
mm

sROUTINE & W

R4S

;RDDRESS OF NEXT TEST

;SCOPE ENTRY POINT

SRR
R
R LR
R
R

LTST16: Jfl"“

;GO TEST TRANSMITTER LINE 16

; TRANSHITTER L"‘ TEST LINE 16

5, XNTTST

RSB R

; ITERATION COUNT

’L‘Igut

mtmtmzmmmmmmwm

100.

004622

Z2E5322222L2ESRLRLLLELL

sROUTINE 8 43
;RDDRESS OF NEXT TEST.

RRRA SRR RATTLLALILLRLLLLLNL

YzY+1

; ntumumuuxutmuuxnunmmummunuunun

RTYS:

.IM"( L1

100.

s ITERATION COUNT

RT46
}‘7’3‘7}7
=X+

. RDDRESS OF NEXT TEST.

+SCOPE ENTRY POINT

uuuxm

CZDMADO DM11A LGC TST
MACY11
CZDMRD . P11
28-APR-78 13: 4y

011776
012002

004537
000026

004622

008537

13:48

LTST17: JSR
LINE1?
Y=Y+1

PAGE 47

SEQ 0047

5. XNTTST

;GO TEST TRANSMITTER LINE 17

A=
; l8!!!
=

000046
012022
000144
012014
000046

012014
012020

28-APR-78

; t!8!!!8!8!1‘!383!ll!!!fltl!!l!!tl!ltlllll!tll
l!tt!t!ltll!!!tlttltt!!t!t!
: TRANSMITTER LINE TEST LINE 17

000020
000000
000000

012004
012006
012010
012012

LR
R R eP P

RT46:

‘88!‘!1!!"!t!!!tlll!u!!8!88”8!'1!!88!!!8!t!!t

!!tllt!!!fltttt!t!t

;ROUTINE § 46

RTY?

; RDDRESS OF NEXT TEST

100.
RCVO

; ITERATION COUNT
:SCOPE ENTRY POINT

X=X+1
; ttuuunuztuuu:tu:tuunuu:tusmzmz
:uuunnxtunznnx
;RECEIVER LINE TEST LINE O

005034

RCVO:

JSR

Ya¥eq

5. RCVTST

;60 TEST RECEIVER LINE O

RSt t
RT4?:

012022

012026
012030

bt E iR Rt ettt
w2

RTS0

100.

;(:1‘

Rttty eyt
e
;ROUTINE 8 47

e eetrttrertrerrii
3z

;RDDRESS OF NEXT TEST
; ITERATION COUNT
; SCOPE ENTRY POINT

IR R R R R IR LR E RSN ARSI SRS SRR LSLSI
RS
LLLILLSLLLLILILLLL
;RECEIVER LINE TEST LINE 1

RCVY:

sead
88§ NP

2828

ERER B

3%»5

2228

012032
012036

2335
2336
2337
2338
2339
2380
231
232
2343
2344
ZM5
2346
2n:7

30A(1052)

012112

012104

JSE S RvTST

;60 TEST RECEIVER LINE 1

Y=Y#1
H xmmmmmmmw
mmm
RTSO:
S0
;ROUTINE 8 SO
M

RTS1

: RDDRESS OF NEXT TEST

100,
Revz

: ITERATION COUNT
:SCOPE ENTRY POINT

g
;RECEIVER LINE TEST LINE 2

RCVZ:

x
1
s

;60 TEST RECEIVER LINE 2

YsYe1

B8
———

IROORESS OFMEXT TEST

100,

ITERATION COUNT

Bv3
;8
;RECEIVER LINE

RCV3:
g

RTS2:

:SCOPE ENTRY POINT
e
TEST LINE 3

SRaTST

Tttt

;60 TEST RECEIVER LINE 3

——

Y=Y41

62
RTS3

100,

RCVY

Tyt

;ROUTINE # 52
;
SS OF NEXT TEST

:a'%a“n‘mu COUNT

:SCOPE ENTRY POINT

yTv———

<
¥

CZDMADO DM11A LGC TST
MACY11
CZDMRD. P11
28-RPR-78 13: 4y

2391
2392

2393
23%

2395
239%
23957
2398
2399

000052

012104
012110
012112
012114
012116
012120

2400
2401
2402
2403
2404
2405 012122
2406 012126
2407
2408
2409 012130
2410 012132
2411
012134
2412 012136
2413
2414
2415
2416 012140
TM17 012144

2418
2419
2420
821
z22
2423
2N2%
2425
2426
Nz
2428
%29
2430
231
32
2433

adal
235
2436
37
2438
239
2440
2441
%42
%43
2444
2945
2446

004537
000010
000005

005034

000054
012146
000144
0121%0
000054

28-APR-78

13:48

N
J
PAGE 48

SEQ 0048

X=X+1
; !8!!!888!8!8!!88!8818!fl!lllll!tl!!tll“lllll!
tlll!!llil!!t!t!!!l!t!!lt!
;RECEIVER LINE TEST LINE 4

RCVY:

JSR

5, RCVTST

;GO TEST RECEIVER LINE 4

; 3!8!338!!!!8!!!!3l!l!!ll!!l!ll!llt“ll!’!‘”l!l!l!!t
lttt!ttl!t!!!ttl!l!t
RT83:
53
;ROUTINE # 53
S
RTS4
;RDDRESS OF NEXT TEST
3

000053
012130
000144
012122
000053

004537
000012
000006

30R(1052)

100.

s ITERATION COUNT

§(§§‘
=

005034

:SCOPE ENTRY POINT

; 8!8!!88!3!3883!‘8883!l!!!3388t8!838388“83”833
8!8”1!”!!3!8l”llttt!tt
‘:&EWEI LINE TEST LINE 5

JSR

5. RCVTST

;G0 TEST RECEIVER LINE S

; ttuuunuuutun:unuumxmzmtm

RTSh:

5§

;ROUTINE & 54

RTS5
100.

msmxuumummnu

;RDORESS OF NEXT TEST
; ITERATION COUNT

RCVS

;SCOPE ENTRY POINT

X=X+1
; ztmmummmxmnmtmtm
wmmmmm
;RECEIVER LINE TEST LINE 6

RCVE:

JSE-

S.RavTST

;60 TEST RECEIVER LINE 6

Y=Y41

0121%6
012150
012152
012154

H xmzmwwmtmzmmtm

RTSS:

§5

;ROUTINE @ 55

RTS6
100,
rev?

mmmmmm

; ADDRESS OF NEXT TEST
; ITERATION COUNT
:SCOPE ENTRY POINT

]
t
3

;tmmmmmmmmmm
mmnu
SRECEIVER LINE TEST LINE 7

RCVZ;

SSEs.RovisT

YsYéi
; BERREREEE RN
RTS6:
56

;60 TEST RECCIVER LINE ?

AR
AsR
AR
LRR
SRRRIL
RRRs LR
IIALLLTITITILLL
;ROUTINE 8 56
¥

RCV10

XzX+1

R
AR R IR R LR
;RECEIVER LINE TEST LINE
10

RCVIO: JSR

L INEY

i«ltflg

i
:SCOPE

ENTRY POINT

R R RN SRR R R

TR
RRRR
RS RSN
LRRLLITTLLLLLLL

:GO TEST RECEIVER LINE 10

YaY4éi
; :mmgmmunum:mmpm?m:xg’ummxmtwm:

RT60
100.

RCV11
XzX+1

1% OF NEXT TEST

;

ITERATION COUNT

:SCOPE ENTRY POINT

mu:

CZDMADO DM11R LGC TST
MACY11
C ZDMRD. P11
28-RPR-78 13: 4y

2447
2448
2949

012212
012216

004537
000022
000012

30A(10682)

13:48

K
4
PAGE 49

SEQ 0049

; ll!ll!ll‘!!ll!l!tlll!8!!8ll!!t83!lllllul!lltl
ttttlltlltltttll!t!!t!tttt
;RECEIVER LINE TEST LINE 11
RCVIL:
JSR
5. RCVTST
;60 TEST RECEIVER LINE 11

005034

; l8!88!88!!3!!88!!!83ltl!tl!tl!l!t!“‘l”tl“‘!”l

000060
012236
000144
012230
000060

RT60:

l!lttlt!!ll!!!l!lt!!!!t

60
RT61

;ROUTINE & 60
; RDDRESS OF MEXT TEST

’I‘(:lf

:SCOPE ENTRY POINT

100.

; ITERATION COUNT

; xxuuununuxtu:tnxtuuu::unusmum:
uz:uxunuxunnn
;RECEIVER LINE TEST LINE 12
RCV12:
JSR
5. RCVTST
;60 TEST RECEIVER LINE 12

008537
000024

; t:u:xuuuuuntutuuuummmtmuum:

RT61:

61
RT62

;ROUTINE 8§ 61
s RDDRESS OF NEXT TEST

fi:}g

:SCOPE ENTRY POINT

100.

uumzmnnxux

X
3

; ITERATION COUNT

; xzutmmmwwmmmwm
mmmmm
;RECEIVER LINE TEST LINE 13
RCVI3:
JSR
&, RCVTST
;60 TEST RECEIVER LINE 13
=

H xmzmm:mwmm
wmwm
RT62
62
;ROUTINE 8 62
t

RT63
100,
RCVIY

;RDORESS OF NEXT TEST
: ITERATION COUNT
:SCOPE ENTRY POINT

¥
1
3

XeXe1
:zmmmmm
m

;RECEIVER LINE TEST LINE 1%
RCVIN:
S
S.RovTsT

;60 TEST RECEIVER LINE 1%

Y=Y

RS g
cEN

a228

Bt ot go

are

; SERRRERRRRRR
NIRRRL
SRR RRS
L

SRRy

28-RPR-78

RT63:

t00,
fi.‘:l?

I TYERATTomcomt TE>"

:SCOPE ENTRY POINT

RCVIS: m‘“ '%.acmt
B
RTEN:

YsY4i

MR v

RCV16
SRR

:SCOPE
R

AR R R

;60 TEST RECEIVER LINE 15

gt
;ROUTINE & 6%

X=X+1

SROUTINE 8 63

R R AR

ENTRY POINT

:
i

LR R LR RRERRARRARTTRRTRARRARY

012320
012324

30A(1052)

28-APR-78

005034

13:48

PRGE 50

4
SEQ 0050

IVER LINE TEST LINE 16
JSR
5. RCVTST
NE16
Y=Y+1

;GO TEST RECEIVER LINE

; !!!l!!l!ttltltll!!!lttn!l!ttlll!!ltt!tl‘lttll

012326
012330
012332
01233y

;ROUTINE # 65

RT66
100.

;(\x'l;

012336
012m2

ll!!!t!tt!!!!ttt!t!!ltttt!

;RDDRESS OF NEXT TEST
; ITERATION COUNT
;SCOPE ENTRY POINT

005034

; unttuuu:nututxtnttnuxtxmmum
uxnuuunuxmxmuu
RT66:
66
;ROUTINE & 66
b4

0123%6
012350
012352
012354

RT67
10.

;ADDR OF NEXT ROUT INE.
; ITERATION COUNT

;Tm

:SCOPE ENTRY POINT.

SRR

012356
012360

SRS R LR R RN

NOP
NOP

004216

001400

Rd 3

0047

000060
167110
004370

;AND THAT AN INTERRUPT OCCURS.
RT66R:
JSR
7. TIMER

nov

e
16713y
167112

2s:

012444

167072

001570

BNE

8CAT. X1

8IS

8IS
WOV

DELAY
BEQ
CLR

ERRORY

167054

040000

MOV
MV

1670842

§160000.%2
816 .23

1o
15

BRA.

960.3CSR

X1,28A%
TINEIN,3S

wecer

XMTDAT

n“'

#imexse

ERROR
167026
167020

BIC

ALL LINES ARE USED FOR THE TEST
;60CALQLATE MACINE TIME TO TRANSMIT

GET m"'m”s

;GET A NON-EXISTANT ADDRESS
:6ET COUNTER

TTRILE BIT e
s

SSES

ENEN

e
iSET EXTENDED RDORESS BITS
;STRRT TRANSMITTER
LORD OELAY TIME To

;DELAY FOR 1/ATH OF R CHARACTER

RRREDE
:THAT IT IS CLEAR

;ERRORIBAR BIT DID NOT CLERR

;60

TO SCOPE

i Test THAT b 01T 15 seT
Z;msso(u 81T FRILED TO SET

#BITIS. SR

BIS #8ITIZ &SR

:CLEAR

z
4

RRS LRSS
RSRTLLILLLLLLSIILLLLLTLLL

;TEST THAT NEX BIT (CSR BIT 18) SETS MHEN THE
TRANSMITTER REFERENCES
sNON-EXISTANT MEMORY. THE CORRESPONDING
IT CLEARS

|
|

; 38!38!"!!”88“83!3!llllllll8!88!“38“!!”38!8383
33tutttttt!t!ttttttt
;RECEIVER LINE TEST LINE 17
RCV17:
JSR
5. RCVTST
;60 TEST RECEIVER LINE 17
LINE1?

0123w

;

)
N
RRNBRRBRBRS L
EERRRERURYR] Y RRRRRRMNL
by

CZDMADO DM11A LGC TST
MACY11
CZOMRD. P11
28-RPR-78 13: 44

ITTER RERDY FLRG
.St} TRANSHITTER
IE BIT

ERECORERRSERERYRNDUSRN
SRR R
ey

CZDIMADO DM11R LGC TST
MACY11
CZOMRD. P11
28-RAPR-78 13: Wy

012522
012526
012530
012836

005037
000240
012737
010137

012546

108011

012542

012550
012852

000+10
005077

OifSer Gioest

012566

006301

012872
012600
012602
012608

013737
104400
000000
10%006

012606
012610
012612
01261%

000067
012716
000012
012616
000067

012670

10331%

012616 012777
012628 012737
012632 005737
012636 013737
012688 062777
012662 10%00
012664 000000
012666 006077
012662 022777
012670 001%01
012672 10%001

012678
012702
012708
012706
01271%

013737
10400
000000
012737
108006

012726

28-APR-78

177776

000340
001570

177776

001566

166764

177776

/ALLOW INTERRUPTS

MOV
MOV

SPRTY?7. 38PSU
X1. XMTDAT

;LOCK OUT INTERRUPTS
;LORD LINE THAT FRILED

;TYPEOUT SHOMS LINE 8 THAT FAILED
.Bo TO SCOPE

MOV

APRTY?7, 3RPSU

;LOCK OUT IMEIMTS

ASL
B8CC

X1
23

.smn LINE lIT
;D0 NEXT LINE

CLR

78:

SEQ 0051

o#PSH

69S:

Ny
PRGE 51

CLR

MoV

DELRY
OPEN

8s:

RCVDAT

,EIIOI' NEX FRILED TO CAUSE INTERRUPT

(SR

(6)+, ()¢

;RDJUST STRCK
P

TIMNEL, 88

.Ifllt FOR MHTEI 70 RUN

0 COMPLETION
BEFORE
:a&gg. TESTY

H :uxuutmxtu:mnuzmnmmmm

RT6?:

160000
012706
160000
008370
000001

012654
166672

166662
040060

166652

004366
000006

RT67R:

MOV

NOV
ST

;ROUTINE 8 67
;RDDR OF NEXT ROUT INE
s ITERATION C
;SCOPE ENTRY POINT

160000, 3BASREG ; SET

IS EMVEC

a8t

MV
8IS

TIMEIN,1S
OLBITO.EBAR

cu'

BAR

DELAY

;CHECK TMAT RDORESS TIMES OUT

;GET TINE TO TRANSMIT 1/% CHAR
:STRART TO TRANSMIT ON LINE O

;DELAY 1/ATH OF A CHARACTER

ISTOP TRANSNITTER

ERROR
MOV

;TEST THAT OMLY NEX 1S SET

TIMEL.3S

us:

eERRvECez. antmit

3s:

m"'

:?u

"#m

XsX41

; SEERBLR8L
;

;ERROR! EITMER NEX FALED TO SET
BITS SET
;
1 CHARACTER TINE TO ALLOW

'cm%'dgionnbied

lmeu TINE OUT TRAP

;

%‘
NEXT
?
ROUTINE.
)

iSCOPE ENTRY POINT.
POV

Tt
..

THRT WMEN THE GO T
B
l(

s HAVE'ficfifi&;@"‘g" %
(fl &nml
IFar?g SET

JA
RTY

3
3
b4
z

SSET TIME OUT TRAP VECTOR

gmmn.am

016730

zmr.mmummm

?
RT?20
10.
RT67R

; TEST MMO‘T SETS IF THE DMt

166724
000004

RT70:

000144
012726
000070

005037

13:48

ERROR1

004366

01728 Ov30%s
012722
012728

30A(1052)

N NOT l((tl(

CZDMADO DM11A LGC TST
MACY11 30A(1052)
CZDMAD. P11
28-RAPR-78 13: 4y

012732
0127236
012790
0127w
012796
012788
012760
012762
012770

SERLRRRERVRRRRRSRRRRS
R bbb R R e b b mbm e ke
i

2615
2616
2617
2618
2619

004537
1?7766
005777
100375
0OM2777
105777
100010
013737
013737

012776
013000
013002
013010
01301%
013016
013024
013026
013030

108011
0OOM13
062737
006337
103346
013737
104400
000000
1C%006

013032
01303
013036
013080

000071
013226
00002v
013082

013042

006246

18:

166576
100000
166562

166566

001564
001564

001566
001570

000002
001564

016730

004366

013026

JSR
-10.
TST
BPL
BIC
TST8
BPL
MoV
MoV

PRAGE 52

SEQ 0052

5, 38XMITD
oCSR
K |
$100000. 3CSR
oCSR
29
LINBIT.RCVDAT
LINSIT.MTDAT

‘s
82, LINE
LINBIT
1%
TINEL,
38

:10. CHARRCTERS
;ON EACH L INE
;HAIT FOR 10. CHARACTERS
:TO BE TRANSNITTED

: TEST RECEIVER DONE FLAG
;GET LINE
BIT OF ACTIVE LINE
; THAT ERROR OCCURED ON
;ERROR! DATA WAS RECEIVED ON LINE INDICATED
;60 TO SCOPE
;SET UP NEXT LINE NUMBER
;GET RERDY TO TRANSMIT ON NEXT LINE
;G0 TRANSHIT ON NEXT LINE
;DELAY 1 CHARACTER
;TIME BEFORE ENTERING MEXT TEST
; SCOPE

SRR R SRR 2RR2E2222288 2282 2SESSSS LIRS SLLLLLLLLL
S

;
INE 8 71
;
OF NEXT ROUTINE
; ITERATION COUNT
; SCOPE ENTRY POINT.

RT72
20.
RT71R

X=X+1

PR ettt biiitiiiiisiti
ity

: TEST THAT CURRENT RDORESS INCREMENTS PROPERLY MMEN
R CHAR;ACTER IS TRANSMITTED. LINE O IS USED Fom
TEST.
RT7IR:
CLR
X0

005000

s m"zm” 013212 00000%
00ONO
001%00

18:

000006
166456

MOV

MOV
MOV

013078 v IO
013108 Oiirrr Goboe Joiwo
013118

Th
oV
nov

o1
u'zm"" 000200 166404
0i3aE Ioosre oeN00
013198

023701

001400

BiC
wx

013150
013162

001413
010137

001570

13:48

ERROR1
BR
RDD
ASL
8CC
MOV
DELAY

RT?1

000071

012737
012777

2§:

3%
s

0130v 010001

013056
013068

28-APR-78

012777 000001 166422
108777 166414

Isn

835 20EMVEC

SPRTYZ,
8CAT.

&
e
mfio

; 0scum

ERRVEC+2
6
SET

.an

:
:

'gm.xn
%

(AT
X1

;
§

013166 013737 001400 001566

80
MOV

nov ,

28
X1, XNTORT

)
;

i
o3,
s
013176
s o
01320

8IT
BNE
8R

281714, 3SUR

000261

SEC

CAT.RCvoRr

18
38

;

;160

N IF _SCOPE SMITCH IS SET

TO EXIT

¥
B
B
£

CZDIMRDO DM11A LGC TST
MACY11 30A(1052)
CZDMRD. P11
28-RPR-78 13: 4y

2671

013206

006100

g;g

3}3212

012737

013224

104006

2672

2677
2678
2679
2680

2681

2682
2683
2684
2685
2686
2687
2688
2689
2690

013210

013226
013230
013232
01323v

SCOPE

SEQ 0053

SERRVEC+2, 38ERRVEC
SRERRVE(C+2

; SCOPE

;RESTORE TIME OUT TRRP

RT?72:

RT?3

38”!!3!!ln!tttlttttttt!!tt

;ROUTINE 8 72

; ITERATION COUNT
;SCOPE ENTRY POINT.

b
4

;RDOR OF NEXT ROUT INE.

20.
RT72R

X=X+1
;l!8!8!83!!88‘!!81338383!88888l!!ltl!tll!!lt‘

lll‘l!l‘lltittltt8!!3!!3!1!!

26%

008777
100375
105777

2658
2699
2700
2701
2702
2703
2704

013312
013316
013328
013332
O013M0
013TM6
013350

008037
113737
117037
ON3737
123737
001402
10%011

2706
2707
2708
2709

013352
013358
013360
013362

000464
020027
001402
005720

013364

013366
013366

100375

013376

: TEST THAT DATA CAN BE TRANSMITTED FROM ALL AVAIL
ABLE CORE.
:LINE O IS USED FOR THE TEST AND ONLY ONE WORD
IS TRANSMITTED
AT A TIME.

013526
000C05
172777
1662%4

001400
166264

RT72R:

Slc.gtt

;CLEAR INDEX REGISTER

18:

MOV
nov
MoV
MoV

AREA(OD).CAT
45, oCSR
-1, W4T
SLBITO. aBAR

;LORD CURRENT RDDRESS
;SET MAINT & 6O BITS
;SET UP CHAR COUNT TO TRANSMIT 1 CHAR.
;TRANSHIT CHAR ON LINE O

001440
166252

166236
166230

001566
001600
001572
001566

012737

2722
2723

0122
013330

012737
012777

2726

013w%%

105777

oCSR
e|
3(3!

;HAIT FOR THE TRANSMITTER
;TO TRANSMIT THE CHARACTER
:TEST FOR DONE

CLR
CLR

oCSR
RCVDAT

;CLEAR ALL FLRGS

noVe
rove

001570

CHPe
8EQ
ERROR1

RCVOAT. MITOAT
23

BR
cne
BEQ

6%
X0, 86
39

;60 TO EXIT
;HAS FIRST WK BEEN TESTED
;BRANCH IF IT HARS

;60 REPERT TEST

nov

#58. SRERRVEC

;BEGIN TESTING RBOVE 4K
;SET TIME OUT TRAP TO EXIT

CLR
INC
TST

%1
X1
(0)+

8IC

;(CAT)-1

28:

013514

4s:

001400
166120

001440
166106

TUNTRS. RCVDAT ; GET RECEIVED CHRRACTER

SAREA(D). XNTDAT ; GET TRANSMITTED CHARACTER

CARMSK. MITDAT ; CLEAR NON-TRANSNITTED BITS

. COMPARE CHARACTERS
sBRANCH IF VAL ID COMPARISON
; ERROR !DATA COMPAR ISON ERROR

1S THE MEMORY LOCATION WMERE THE DATA WAS TRANSMITTE
D FROM

TST

005201

£ 638 o
P2 GE% g

TST
BPL
;fl’l

001566
001570

000726

£2 sn e

2717

%0
19

B
5
PRAGE 53

; 83!2!8!!!833388!3l!!l!ul!8838381!”33”88”

000072

013272
013276
013300

2712
2713
Z71%

ROL
8ni
MoV
CLR

38:

000072
013572
000024
013236

005000
000005
016037
012777

2710
2711

13: 48

100715

013236
013240
013242
013250

2693
26%
2695

28-APR-78

MOVS

(0)+

X1, 3AREA(D)

; INCREMENT INDEX

; TEST IF MEMORY TIMES OUT
;SET UP DATR IDENTIFIER
; INCREMENT DATR IDENTIFIER
; INCREMENT INDEX

;LORD lgl.fllfltl INTO MEMORY

MOV
MoV
MOV
MoV
TST

ARER(D).CAT
85, (SR
-1, HCT
SLBITO. 38AR
oCSR

:LOAD CURRENT RDORESS
;SET MAINT & GO BITS
:SET UP CHAR COUNT TO TRANSMIT 1 CHAR
;TRANSHIT ON LINE O
;MAIT FOR THE TRANSMITTER TO

TST8

(SR

: TEST FOR CHARACTER DONE

BPL

:TRANSHIT THE CHARACTER

CZDMADO DM11A LGC TST_
MACY11 30A(1052)
CZDMAD. P11
28-APR-78 13: 4y
2727
2728
2729
2730
2731
2732
2?33
273
273
2736
2737
2738

013450
013852
0inS6
O013%6N
013872
013500
013506
013510
013812
013814
013516
013524

10037
0CS5077
113737
117037
0M3737
123737
001733
104011
0OONO
022626
012737
104006

2740
2741

013526
013530

000000
006257

273
27%%

01383
013536

0177727
020000

013588
013586
013580
013882

037477
ON0000
O087%77
060000

2739

2742 013832

166064
001600
013526
001572
00156c

001566
001570
001570
O1es0

000006

000004

077477
100000
117477
120000
137477
140000
173000

2760

000073

2759

013572

§5:

LY 1

PAGE 54

. =Y
oCSR
TUMTAB. RCYDAT
SAREA(D). XNTDAT
CARNMSK. XMTDAT
RCVDAT.XITOAT
(11

SEQ 0054

MOVB
MOVB
BIC
CMPB
BEQ
ERROR1
T
POPSP2
MOV
#6. SBERRVEC
SCOPE

;GET THE RECEIVED CHARRCTER
;GET THE TRANSMITTED CHARARCTER
. CLEAR NON-TRANSMI
TTED BITS
. CORPARE CHPBACTERS
;BRANCH IF VAL ID COMPAR ISON
;ERROR !DATA COMPAR ISON ERROR NUMBER
;TN S/B_GIVES MEMORY LOCAT oM <Lt TRBLE
‘RESET THE STACK
;RESTORE TIME OUT TRAP
JEXIT TEST

0
8252

;FOR DRTR IN FIRST
:4K SEE THE LISTING

17727
20000

;1S THE DATA TRANSMITTED
;CONTENTS =1 (IF AVAILRABLE)

;MEMORY LOCATIONS TRANSMITTED FROM TRBLE

012525

2752 01388%
2783 013586
2784 013860
2755 013862
275 01386%
2757 013566
2758 013870

13: 48

BPL
CLR

ARER:

12625

ABK:

2746 013540 026314
e 013z 031ve3
Z7N8
2749
2750
2751

28-APR-78

AIZK:

A16K:
AZ0K:
A2
A28K:

: CONTENTS OF THESE LOCATIONS (BYTE)

26314
w63

JLONIENIS
AR

.
"

37477
40000
S7477
60000

’
il
g
Pow
8
A
AR

"
.
-

7477
100000
117477
120000
137477
140000
173000

A
i
A
P
3,
L)

ROUTINE 8 73

w0
11
2
13
i
s
%

"
"
-

. ‘mmmmm‘“‘lmmmmwmmm

2761 01387% 014006
2762 01357 000012
2763 013600
013602

2765

- 8mmmmwwmmmmm

tmwm

RT73

Z76h

Fes
768

2769
2770
2771
2772

000073

013602
013606
01361%
013620

2773 013626

005037
012777
008037
013737

2778 013632 17763

2775
277%

01363
013640

2779

013684

2782

013670

106777
100375

T Oimes Soaryy

78 Nne

RDOR OF NEXT ROUTINE.
I TERATION COUNT
:SCOPE ENTRY POINT.

XXt

016730
000001
001566
016730

006246

165726

RTZIR.
1%, =

001570
28.

o200 16se72
001566

000144

CLR .
MoV
CLR
WOV

LINE
o1 ocse
RCVDAT
SSLINE.JITORT

ISR

5 SaxmITD

ISTB
oL

acsR
2§

*100.

movarT

;S
THEET
60 BIT
GET LINE NUMBER (X2)

:TRANSMIT 100, CHARRCTERS

ON LINE RS SPECIFIED BY L INE

MAIT FOR THE RECE IVER
70 RECEIVE ONE CHARACTER

TRCRENENT IRESSCounT

CHP

RCVOAT.#100.

:NAVE 100.

3§

:60 TEST BAR

:
:
3

mmm

;TEST THAT THE TRANSMITTER CAN TRANSNIT 100. CHARACTERS BEFORE SETTING
:THE RERDY BIT (CSR 15).AND CLERRING THE BIRR o 1

165702

S esesz

100002

RT7A
10,
RT73R

CHARS.

: TEST READY FLAG

BLEN Reus

CZDMACO DM11A LGC TST

28-APR-78 13: 44

2783

013672

104011

%77=

01367%

000443

2787
2788
2789
2790
2

013626
0137208
013706
01371%

023777
001753
uU17737
104011

13:48

D §
PRGE 55

=
SEQ 0055

ERROR1

; ERROR !READY BIT SET TOO

SOON
: TYPEOUT SHOMS HOM MANY CHARS WERE RECEIVED WHEN
RERDY SET AND THE LINE 8 (X2)
BR
8s
;60 TO EXIT

001564

165640

165632

001570

3§:

CHP
ELINBIT.38AR
. TEST THAT BAR BIT IS SET
BEQ
29
;BRANCH IF SET
MoV
®BAR, XNTDAT
;GET BAR CONTENTS
ERROR1
;ERROR! BAR BIT CLEARED TO SOON
; TYPEOUT SHOWS THE BAR CONTENTS AND HOM MANY CHARS
MERE RECEIVED

;LOCRTIO'CRL".”.D:IS THE CORRECT gflr(%'f
l&

013737

004370

013730

104400

165604

100402
104001
000420
008777

165574

0177
005037
104011

165566

001407

MOV

5$:

OPEN

001566

001570

062737

uS:

6S:

DELAY

TST
ani
ERROR
B8R
TST
BEQ
OV

CLR

glfll

000002
001564

7%:

RDD
ASL

TIME1IY, 58

;DELRY 174 CHARACTER TIME

oCSR

; TESY Ififlif.fl.fi (SHOULD BE SET)
;60 TEST
;ERROR! READY FLAG FRILED TO SET
;60 TO EXIT
; TEST THAT BAR w IS CLEAR
;60 TO 78 IF CL

WHEN BAR FAILED

:TO ALLOM TRANSMITTER TO FINISH

SBRR

#BAR, RCVDAT

XMTDAT

;ERROR! BAR BIT FAILED TO CLEAR

$2.30L 1N
SBLINBIT

016730

s CLEAR

; TUNBLE TRBLE

#8172, 3CSR

sSET MAINT BIT & CLERR G0 BIT

394

AONT
L INE 0
IT FOR CHAR.

] L

TR Y

oCSR

T UP TO TRANSNIT 65.

T TMy

165426

L, X1

000200

16544y

#6r. . %2

000001

001440

177677

RT7%A:

§=33*38?R§

165474

;TEST THAT THE TUMBLE TRABLE POINTER INCREMENTS
PROPERLY AND
;RETURNS TO THE BEGINNING AFTER 64. CHARACTERS MAVE
BEEN RECE |VED
;LINE O IS USED FOR
THE TEST.
¢
e

-|§— Q=
EER
3

001600

fis
RERRiE
£

5643 §35isansyL5

B 353553

278%

28-APR-78

3%2333730033R082

CZOMRD. P11

MACY11 30A(1052)

CHARRCTERS

DONE FLPG

CHAR.

DONE FLAG

NCREMENT CHARRCTERS
ECEIVED COUNT

CZDMADO DM11A LGC TST
MACY11 30R(1052)
C ZDMRD. P11
28-APR-78 13: Wy

014124
014126
014130
014132
O1%13%
014136
014148
0141%6
018152
014154
014160
014162
014166
0141720
014172

13:48

TST
8|

(1)
39

B8R

CLR
Eag

(1)+
gf’WMT. fey.

;60 _TO SCOPE

TST
BPL
;"SID

oCSR
s|
3(3!

;MRIT FOR THE LAST CHARACTER
;70 BE_TRANSMITTED
;TEST FOR DONE

TST
Bni

TUNTRB
L1

; TEST FIRST TT ENTRY
;FOR VALID DATA

005711
100402
104011

ERROR1

001570

38:

000100

E
5
PRAGE 56

28-APR-78

165370
165362

001600

4s:

ERROR

SEQ 0056
;TEST TT ENTRY FOR VALiD
;DATRA ENTRY

;ERROR! NO VAL ID DATA ENTRY
: TYPEOUT SHOMS & OF CHARS.

RCVD WHEN ERROR OCCURED

;CLEAR TT ENTRY
/HAVE 64. CHARACTERS BEEN RECE IVED

;ERROR! POINTER DID NOT RETURN

SCOPE

; SCOPE

¥:
=

; nxuuznuttnunttu:nxtxmtmm

014178
014176
014200
014202

RT?76:

ummnmxmtununnuu

75
RT76

;ROUTINE & 75
; RDDRESS OF NEXT TEST

100.
BRKO

; ITERATION COUNT
;SCOPE ENTRY POINT

z
4

3
4

; :xmzmmumm:mummzmxw

014208
014210

005456

mx:mmmxmm

;BREAK TEST ON LINE 0.
BRKO:
JSR
5. BRKTST
lv.l ;I?

;60 DO BRERK TEST
;ONLINE O

R
RT76:

014212
014214
014216
014220

NS SRR

RY?7?

RS R RN RS R SRR LR RN LS SL LR LLLLITLLLLRLLLT
;ROUTINE 8 76
4

;ADDRESS OF NEXT TEST
; ITERATION COUNT

100.

zél‘

:SCOPE ENTRY POINT

X
z
¥

;:Wmmammmm
mmmm
;BREAK TEST ON LINE 1.
BRK1:
JSR
5. BRKTST
:60 DO BRERK TEST
I'.I42
sON LINE 1

014222
014226

014230
014232
01423%

RT?72:.

014236

005456

SRR AR AR R SRS SR R RRIR
LR TRRLILTLLLLLLLLLLL

;ROUTINE & 7?7

RT100
100.
BRK2

X=X+1
SRR
R
R
;BREAK TEST ON LINE 2
BRK2:
JSR
5. BRKTST

;RDDRESS OF NEXT TEST
; ITERATION COUNT
:SCOPE ENTRY POINT
R LR

100.

BRK3

TR I LR LT AT TALLRLL

;ON LINE 2

]

LR
100
RT101

AR RS SRR R LR

x
¥
X

;60 DO BRERK TEST

'Y.. ug

s
RT100:

R RSB RER AR RRRRRRRL LT LRILRTRTRTTRLRR
;ROUTINE & 100
%

:%!SS OF NEXT TEST

ITERATION COUNT

:SCOPE ENTRY POINT

PR PP PR LCLT R

EZMIDO DM11A LGC TST
MACY11
P11
28-RAPR-78 13: 4y

014256
014262

014264
014266
014270
014272

014274
014300

014302
014308
014306
014310

014312
014316

014320
014322
014324
01432

014336
C143%0
018342

014344

000100

004537
000010
000004

005456

30R(1052)

28-APR-78

13:48

F_
5
PRAGE 57

" SEQ 0057

X=X+1
H !!!!t!tl!!lt!!llll!tl!fl!ll!l!ltlt!‘llltt!tll
t!lltl!!!8!!!!!3!ttltt!l!!l
;BRERK TEST ON LINE 3

BRKJ:

JSR

#l;l?

5. BRKTST

;G0 DO BREAK TEST

;ON LINE 3

; !838!!18!!83!!!8!!"!8!8!tl!t!ttllt‘ltfl!!”!!l
tt!ltl!tt!l!tltt!!!t!!ttt
RT101:
101
;ROUTINE # 101

000101
014302
000144
0142724
000101

RT102
100.

;RDDRESS OF NEXT TEST
; ITERATION COUNT

,l‘lg:‘

32
4

;SCOPE ENTRY POINT

; xxxutuuuuutnuxutzxnuu:mtuuuuuu

004537
000020
000005

005456

;:BRERK TEST ON LINE 4
BRKY:
JSR
5. BRKTST
I;l 4:‘:
=

uuuun:unxnxxxx

;60 CO BREAK TEST
;ON LINE &

; unnuuuuuntutuuuum:mmtmnmmnu

000102
014320
000144
014312
000102

RT102:

102

uuuu:xxxtx:x

;ROUTINE 8 102

RT103
100.

;RDDRESS OF NEXT TEST
; ITERATION COUNT

§.§§1

t
k4

;SCOPE ENTRY POINT

; txunmmnunu:munumtmmum

008537
000040
000006
000103
014336
000144
014330
000103

005456

;BREAK TEST ON LINE 5.
BRKS:
JSR
5, BRKTST

L8ITS
=

mnmmxmmzmxm

;60 DO BREAK TEST

SON LINE §

: x:mmzmzmzmmm
mmmm
RT103:
103
;ROUTINE & 103
5

RT10M
100,
8RKE

;ADDRESS OF NEXT TEST
: ITERATION COUNT
:SCOPE ENTRY POINT

;BREAK TEST ON LINE 6.
BRKG:
JSR
5, BRKTST
%:gg

3
N
3

——

;60 DO BRERK TEST

;ONLINE 6

R
y—————

RTION:

014346
000104
BRK7:

108

;ROUTINE & 108

s
zx‘
JSR

#lu:

M
S e
: SCOPE
Y POINT
5. BRKTST

000105
014372
0001
014364
000105

RS
a2t ittt ittt ittt
RT105:
105

RT106
100.

’I‘I’K‘l?
s

;60 DO BREAK TEST

JON LINE 7

ittty ety e sty erettetrerestttrttiiiiiii
+ROUTINE & 108
v

: ADDRESS OF NEXT TEST
; ITERATION COUNT

:SCOPE ENTRY POINT

*
2

CZDMADO DM11R LGC TST
MACY11
CZDMRD. P11
28-APR-78 13: Wy

014364
014370

2951
2952

014372
014374
014376
014400

014402
014406

014410
014412
014414
014416

014420
01942y

014426
014430
014432
01443y

014436

PRSEREERININIR

014442

004537
000400
000011

30R(1052)

005456

BRK10:

000111
014462
000144
014454
000111

JSR
%I;HO

5. BRKTST

;GO DO BRERK TEST
;ON LINE 10

RT106:

tununznz:nnnx:uxuz

106
RT107

;ROUTINE & 106
; ADDRESS OF NEXT TEST

100.

¥
x

; ITERATION COUNT

;I:l}

:SCOPE ENTRY POINT

; 8t!ll8“88”8!3888“!lut83!8!”3‘”38‘3!8‘8"”!3“l!
”ttfltl!‘!ttttltt
;BRERK TEST ON LINE 11,
BRK11:
JSR
5. BRKTST
;60 DO BREAK TEST

005456

IV.I¢I:!

;ON LINE 11

; uuuunnuuzuxnn:uu:muumumm

RT107:

aunuuuunnunu

107
RT110

100.
=

R
R R R
S
NI
;BRERK TEST ON LINE 12

005456

BRK12:

JSR
#I;I;Z

5. BRKTST

R SRR L RRS LSRR ERLRRLLSLLLILLLLLLILLLLLS

sROUTINE # 110
;RDORESS OF MNEXT TEST

100.

B
i

s ITERATION COUNT

;SCOPE ENTRY POINT

Rt istteiteiiseti

;BRERK TEST ON LINE 13.
BRK13:
JSR
5. BRKTST

;60 DO BRERK TEST

JON LINE 13

I
RT112

EERRRRRRRLARLLRTIRRLILRTLLLTLILLIILTLILLLILLLLL

%.423

RT111:

;SCOPE ENTRY POINT

RSN R RS R RS R EN LRSS RR LSRR L LR LLLTSLLLLLLLILL
LTLLLLLE

110
RTIN

z::g

005456

3
3

;60 DO BRERK TEST
;ON LINE 12

RT110:

;ROUTINE & 107
;RDDRESS OF NEXT TEST

; ITERATION COUNT

gfl:lf

000110
014444
000144
014436
000110
004537
004000
00001%

SEQ 0058

; xtuuu:u:uunnxunxxunxnu:uzuu

000107
014426
000144
014420
000107
004537
002000
000013

G
5
PRGE 58

13: 48

; l8!88!!!88!!!t!l!ll!!lu!l!!!!!ll!!!tlll!t!l!8
!!!!!1!!“!!!!3!!!l!tttttt
;:BRERK TEST ON LINE 10

000106
014410
000144
014402
000106

004537
001000
000012

28-RAPR-78

100.

R AR RS RS R LR SRR NIRRT ITLRTLITLTLTLLLILLLS

sROUTINE & 111
:
s RDDRESS OF NEXT TEST

k4
k

:SCOPE ENTRY POINT

; ITERATION COUNT

m::

; ¥338%0323888304844SERRREERERRRRLLRRRLRRRAALLTLLTLITLLI

RLTRLTLLTLLITILLLL

;BREAK TEST ON LINE 1V.
BRK1N:
JSR
5. BRKTST

:6
DO BRERK
0 TEST

'y";n“

:ON LINE 1%

000112
014500
000144
014472
000112

SRR

RT112:

112
RT113

100.
BRK15

AR AR R R LR R AR RRRARARTARTTRTALILXLRRRLRLL

;ROUTINE & 112
;ADDRESS OF NEXT TEST

; ITERATION COUNT
:SCOPE ENTRY POINT

X
3

XzX+1
; xu:tunuuuu:uumxunuuutxunxunnuununu:x

X
1
nanuu

CZDMADO DM11R LGC TST
M(Yll 30R(1052)
CZDMRD . P11
28-RAPR-78 13:
4

0144722
014476
014500
014502
014504
014506

014510
014514
014516
014520
014522
014524

004537
020000
000016

008537

PRGE 59

SEQ 0059

;G0 DO BREAK TEST
;ON LINE 15

:tl!t!!tllt!‘t!tt!8!8!ll!tl828tlttl!‘ll’t!t!‘t

RT113:

lft!t!tttultt!ltt!t!ttlttl

113
RT11Y

100.

.RWT"‘ § 113
;ADDRESS OF NEXT TEST

b4
b4

;SCOPE ENTRY POINT

; ITERATION COUNT

:l’K‘l?
t

H8!!8!8”8!8!‘!38!!338ll!tllll3!3!!”33“3!”88!!1
38!3lttttttttttttltt!tt
;BRERK TEST ON LINE 16.

005456

BRK16:

JSR
#I%}

8. BRKTST

;G0 DO BRERK TEST
;ON LINE 16

H l88!38”8!833!8!888!3lulltl!8”!3“38”83“3388838
3!ttxtlttttul!t!ttn
RTI1IN:
11%
JROUTINE 8 1

000114
014534
000144
014526
000114

014526
014532

13:48

;BRERK TEST ON LINE 15.
BRK15:
JSR
5. BRKTST
#lu‘

005456

000113
014516
000144
014510
000113

040000
000017

28-APR-78

RT115

‘ADORESS OF MEXT TEST

100.

; ITERRTION COUNT

BRK17

:SCOPE ENTRY POINT

’uunmtutmzuutuuunmzmmummu
mxunznmxmnu
:BREAK TEST ON LINE
1
BRK1Z:
JSR T
e BRATST
;60 DO BREAK TEST

005456

LBITI?

SON LINE 17

Y=Y+l

=2
=

-ttutmmm:ntxmmtmm
mmmmmmmw
RT115:
118
;ROUTINE 8115
b4
RT116

100.
DATO

014544
000115

:ADDRESS OF NEXT TEST

ITERATION C
;SCOPE ENTRY POINT

B
M

22522222SXXLLRRLRRLRRTLLLLLLLLRLLLS2222SEXXERLTRLLRLRLLLSE

;3222223222222 8222222

:DATA TEST 100 onxms LINED

DATO:

JSR

L INeO

DATTST

;60 RUN DATA TEST

:ON LINED

;:mmmmmmmm
mmwmm
RT116:
116
;ROUTINE 8116
3

000116
014570
000144
014562
000116

to0.

006312

TTeRATIONcoomt "=

z’u‘

:SCOPE ENTRY POINT

{DATA TEST 100 CHARA
CHARAC
CTERS L INE1
DATI:
JSR
&, DATTST
;60 RUN DATR TEST
L "y‘.}
SON LINEY

100.

2“;3;
=

; ITERATION COUNT

:SCOPE ENTRY POINT

eseevens

CZOMADD DM11A LGC TST

CZOMRD. P11
3063
3064
3065
3066

3067
3068
3069
3070
3071
3072
3073

3074
3075
3076
3077

3078
3079
3080
3081
3082
3083
3084

014600
014604
014606
01%610
01%612
014614

014616
014622

01%62%
014626
014630
01%632

3085
3086
3087
3088

3089
3090

3091
3092
3093
309
3095
309
3097
3098
3099
3100

014634
01%640

MACY11

28-APR-78 13: 44
004537
000004%

006312

000003

006312

014652
014656

004537
000012
000006

DAT2:

'
SEQ 0060

JSR
LINE2

5. DATTST

;GO RUN DATA TEST
;ON LINEZ

120
RT121
100.
DAT3
XzX41

xnxxxxxuunxz

;ROUTINE #120
;RDORESS OF NEXT TEST
; ITERATION COUNT
:SCOPE ENTRY POINT

z
x
B
1

; xxu::txnu:tuuuunx:ununnuu::uuuuun
nnunnxxuxxnx:tnxxx
:ORTR TEST 100 CHARACTERS LINE3

DAT3:

RT121:

JSR
LINE3

5. DATTSY

;60 RUN DATA TEST
;ON LINE3

121
RT122
100.
DATY
X=X+1

;ROUTINE 8121
;RDDRESS OF NEXT TEST
; ITERATION COUNT
;SCOPE ENTRY POINT

uuuxxm:xzxxu

3
z
z
z

; uunm:mm:wmmmmmmmmm

006312

000005
000122
014660
000144
01%652
000122

PRGE 60

Y=Y+1
; uuuuuuuu:uu:uuuummtmmummttnnun

000121
014682
000144
014%63v
000121

01%6M2
01%64%
019646
01%50

13:48

; 8!8!!l!lt!t!!!u!8!!8!!8!!!!!'”8!“!!“!33!!!8!!3"!3”
!!“!13"tlttttt!tt!tttt
:DATA TEST 100 CHARACTERS L INE2

RT120:

000004

004537
000010

28-APR-78

Y=Y+1
; xuxtuxuutuunuxuxnuuntuuunnzxntttutnuunxx

000120
014624
000144
014616
000120

004537
000006

30A(1052)

:ORTA TEST 100 CHARACTERS L INEY
DATY:
JSR
5. DATTST
;60 RUN DATA TEST
L INEN
;ON LINEN

mmxm:u

Y=Y41
; ttutmmmmmzmm

mmmm

RT122.

006312

122
;ROUTINE 8122
3
RT123
;RDDRESS OF NEXT TEST
T
100.
s ITERATION COUNT
B
DATS
+SCOPE ENTRY POINT
z
XaX+1
:l8!338388!8!!!!333!‘3!!8!838tlt!88t8ll8lt8l88tltttl!tttlltt
ttt!ttttttt!ttttttxxt
;ORATR TEST 100 CHARACTERS L INES
DATS:
JSk
5. DATTST
;60 RUN DRTR TEST
LINES
;ON LINES
YsYei

mnm

O'OOOOr'0000000000

3103
3108
3105
3106
g;gz

014662
O1%66%
01%666

014676
0001%%
01%670
000123

RT12v
s RODRESS OF NEXT TEST
100.
; ITERATION COUNT
DATH
s SCOPE ENTRY POINY
X=X+
:8llltg:}%‘,zaltlttttltlllt1=gzttt
REEREIRLRTRTLLTIIITTTLTTTLTTTA

3109
3110
3111
3112
3113
311%
3115
3116

014670
01%67%

004537
00001%
000007

014676
014700
014702
01%70%

00012%
014714
000144
014706

3118

0:0000000000000000

b4
kS
|
LLTLLLIRRLLLL

006312

DATe:

JSR
5. DATTST
;G0 RUN DATR TEST
LINE6
;ON LINE®
Y=Y+41
:8!8813388388!8833!3888!!!!3!38!88!8!!!88!8!!!388!tllt!llttttlttlt
ttltttlt!txtttt
RTIZ2%:
1§
sROUTINE 812v
3
RT126
o%? OF NEXT TEST
%
100.
:
1ON_COUNT
H
DAT?
+SCOPE ENTRY POINT
X
Xz X+1
; xunwmu:uuuumtauutuuutuuuuuaxunun
uunuuuunuuu

CZDMADO DM11A LGC TST_
MACY11
CZDMRD. P11
28-RPR-78 13: 4y

3119
3120
3121

3122

3123
3124
3125
3126
3127

3128
3129
3130

3131
3132

3133

3N
3135
3136
3137
3138

3139
3140

3141
3182
3183
3144

3185

3146
3187
3148
3149
g}g{l

3152

3153
3158

3155
3156
3157

014706
014712
014714
014716
014720
014722

014724
014730

014732
014734
014736
01WN0

004537
000016

014766

006312

DAT10:

:DATA TEST 100 CHARRCTERS LINE11
DAT11:
JSR
5. DATTST
;60 RUN DATA TEST
LINELL
;ON LINE
YaY41

006312

000013
000130

3166
3167

004537
000026

000014

3168

015008

000131

g:;;

015012

w;:

3173

3174

127
RT130
100.
DAT12
X=X+1

sROUTINE 8127
;RDDRESS OF MEXT TEST
s ITERATION COUNT
;SCOPE ENTRY POINT

RT130:

JSR
LINEL2

5. DATTSY

B
z
®
T

Y=Yl

;60 RUN DATAR TEST
sON LINE12

SRR RRELRRR

130

R R RRRLRTR LR LT RLLLTTTLLILLRLLLLL

;ROUTINE 8130

&fl

:SCOPE ENTRY POINT

Xz X41

006312

mmmm

;ORATA TEST 100 CHARACTERS LINE12

DAT12:

000130

014776
015002

mmmmxmm

; ::mwmmmmammmmm

RT127:

3160 018774 014776

316%
3165

;60 RUN DATA TEST
;ON LINE1D

X=X+1
; :xuzmmmwmmmmmmw:mz

e i oo

3161
3162
3163

5. DATTST

Y=Y41

000126

004537
000024

JSR
LINE1D

; uutuuun:uuu:tnt:uumuummumnn
tuuuuuunnnunxxu
RT126:
126
;ROUTINE 8126
7
RT127
;RDDRESS OF MNEXT TEST
3
100
; ITERATION COUNT
B
DAT11
;SCOPE ENTRY POINT
2

000126
014750
000144
014742

000127
014766
000144
014760
000127

SEQ 0061

X=X+1
; uuuuuuuunuztuuuuunuzmxuzuuttuu
nununxunnummxxx
: OATR TEST 100 CHARACTERS L INE10

000011

014750
018752
014758
014756

J
5
PAGE 61

Y=Y+41

000125

004537
000022
000012

13: 48

; lt!t!l!!!l!!!lllt!llttu!lt!lll!ll“!!”ll!lt!lt
ltllt!!‘tttttttttt!!!tnlt!!!t!t
RT125:
125
;ROUTINE 8125
3
RT126
;RDORESS OF NEXT TEST
o
100.
; ITERATION COUNT
¥
DAT10
:SCOPE ENTRY POINT
i

000125
014732
000144
01472v

004537
000020

28-APR-78

:DATA TEST 100 CHARRCTERS L INE?
DAT?:
JSR
5. DATTST
;60 RUN DATA TEST
LINE?
;ON LINE?

006312

000010

014742
014746

014760
014768

30R(1052)

:
£

;3883
2R IRRRRTRRRRLILLARTTRLLTTLLLILTLLLILRLLLTLTILLLL
;DRTA TEST 100 CHARACTERS LINE13

DAT13:

RT131:

JSR
LINELIZ

§. DATT

YaY+1
R R
131

;G0 RUN DATR TEST
;ON LINELS

R RN RN

R AR

*NR"O
SRR

RS R T LR R SRR R R AT IRTLRTLITARLLALLLL
8131

: SCOPE ENTRY POINT

+ROUTINE

AR R

;DATA TEST 100 CHARACTERS L INE1Y

R R R R R LR R IR R R AR

)
AR RRTALRRTRTTARARRNAL

CZDIMRDO DM11R LGC TST
MACY11
C ZDMRD. P11
28-APR-78 13: 4y

3175
3176
3177
7e
3179
3180
3181
3182
3183
3184
3185
3186

015014
015020

015022
015024
015026
015030

015032
015036

3187
3188
3189

015040
015082
015044
015086

015050
015054

004537
000030
000015

30A(1052)

006312

DAT14:

RT132:

01507%

000135
015474
000144
015104
000135

;GO RUN DATA TEST
;ON LINETY

ettt

132
RT133

;ROUTINE 8132
;RDDRESS OF NEXT TEST

iu;l?

:SCOPE ENTRY POINT

006312

lY' nvt’}s

;ON LINELS

; xuuuuuzuu:uuuu:ut:mmzmzmzmm

RT133:

133

uuuunmzuuuzxxum

;ROUTINE #1133

RT13M

RDDRESS OF NEXT TEST

*‘J&lt

;SCOPE ENTRY POINT

100.

z
b4

; ITERATION COUNT

s IXRRTRRLLLRLLLLLLLLTRL2L22LS
3322322232232 25222522222S2S2SSSS2LSTLLL
;DRATA TEST 100 CHARACTERS LINE16
DAT16:
JSR
5. DATTST
;60 RUN DATA TEST
% nf’:t
sON LINE1S

006312

.zmmmwmmmx

RTI3N:

006312

;DATA
DAT17:

RT135:

1IN

;ROUTINE 81
3%

RT135
100.
DRT1?
X=X+1

b
2
b§

TEST 100 CHARACTERS LINE1?
JSR
5.
+60 RUN DRTR TEST

LINEY?

;0N LINEY?

1385

JROUTINE 8 135

Y=Y41

':'a“

: l!lllf’lfll COUNT -

RT135A

;33X8%

mmmmmmm

;RDDRESS OF NEXT TEST
: ITERRTION COUNT
+;SCOPE ENTRY POINT

+:SCOPE ENTRY POINT

XsX+1

ZEXTLLRTXRLRRRRRRLS

;TEST THRY DATA {
.:fll Fa.iflllNG
TE Y

1'S) CAN BE TRANSMITTED ON LINES SIMULTANEOUSLY.
SP

;

10%
110
114
116
120

0008008¢8800:

; ITERATION COUNT

’

1
SEQ 0062

; xxuuuuuunuutuutuuunuuuuuztu
uunuuuunxnxnuzxx:xxu
;:DATA TEST 100 CMR;E? LINE1IS
DAT15:
JSR
5. DATTS
;60 RUN DATA TEST

38822

015076
015100
015102

5. DATTST

100.

00013y
015074
000144
015066
000134
004537
000036
000020

JSR
#"Y‘O}“

K
§
PRGE 62

000133
015056
000144
015050
000133
008537
000034
000017

13:48

;RRERRRRRATIIRLRXXRXLLLLRLLLLSS it ittt

000132
015080
000144
015032
000132
004537
000032
000016

28-APR-78

RT135A:

ONE

i, T
Y PER LINE

CLR
TUM
JSR
5. BMOVE
TUNTRE
TUNTRB
+1
17?

;CLEAR THE
: TUNBLE

.:THLE

: (200

:ENTRIES)

3234
3235
3236
3237
3238
3239
3290
32%1
3242
3243
3298
3245
32%¢
3297
3298
3249
3250
3251
3252
3253
3254
mns

3287

3258
3259
3260
3261
3262
3263
3268
3265
3266

015212
015216
015220
01522
015230
015232
015270
01Sv2
O152%%
015250

008077
000520
032777
001%0%
10%001
008077
000510

015252
015256
015262
015266
015270
015272
01528
015276
015300

005077
012702
012701
005302
100%0%
005721
10077%
108001
000874

008037
108011
0QO0S077

3267

g'nsaz

3269
3270

015306
015310

104001
000470

015312
015316
015322
016328
015326
0163%
0152

012701
012702
005302
100M21
013737
083737
113737

3272
3273
327%
3275
3276
3277
3278
3279

3280

3282 gm

|”1;

328%
3285

005721
000755

015368
015366

1§:

001564
004366

015200

164336

001566

28:

001570
164320
164312
020000

164302

3s:

164272

4$:

58:

68:

XNTDAT

SBAR
oCSR
16%
881713, &SR
‘s
oCSR
16%

CLR
NOV
nov
DEC
sni
ST
[ ]
ERROR
BR

m
0

;ERROR! BAR NOT CLEAR AFTER ALL
;LINES FINISHED

;60 TO EXIT
; TEST THAT OVER RUN DID NOT SET
;ERROR! OVER RUN BIT SET
;60 TO EXIT

(SR
#16. . %2
STUNTAB. X1
%2
[3)
(1)+
58

&Sz

g)#

168

;CLEAR THE (SR
;GET TT SCAN COUNT
sGET FIRST TT RDDRESS
sDECREMENT SCAN COUNTER
;BRANCH IF 16. ENTRIES SCANNED
; TEST FOR VALID DATR ENTRY
s BRANCH IF FOUND
;ERROR! MISING DATA ENTRY
;60 TO EXIT

ERROR
B8R

168

;ERROR! EXTRA DATR ENTRY
;60 TO EXI7

; TEST THAT THE DRTA IS

001600
000020

001570

8RR, RCVDAT
39

: TEST THAT THERE ARE 16. VALID DATR ENTRIES

16426M
000020
001600

017102
001572
001600

CLR
ERROR1
CLR
CLR
B8R
BIT
BEQ
ERROR
CLR
BR

(0)+
LINBIT
19
TIMEL, 28

L
|
;SET RO = LINE O
GET LINE BIT
;SET THE GO BIT
;GET LINE NUMBER
;TRANSHIT 1 CHAR,
;ON ERCH LINE
; INCREMENT LINE NUMBER (+42)
;SHIFT LINE BIT TO NEXT LINE
;BRANCH IF ALL LINES NOT DONE
;PUT TIME TO TRANSHIT 1 CHAR
;DELAY 1
; CHARACTER TINE
;GET & TEST BAR CONTENTS
;BRANCH |
@

001564
164374

#-1, OUTBUF
%0
SLBITO,LINBIT
#8170, aCSR
%0, L INE
5. XMITD

000001
000001
016230
006246

nov
CLR
MoV
MOV
MOV
JSR
s |
TST
RSL
BCC
MOV
DELRY
OPEN
MOV
BEQ

017102

177777

SEQ 0063

012737
005000
012737
015180 012777
0151% 010037
015152 004537
015156 1772777
015160 005720
015162 006337
015166 103367
015170 013737
015176 108400
015200 000000
015202 017737
015210 001%0

L_5
PRGE 63
-

015122
015130
015132

13: 48

(=]

3231
3232
3233

28-APR-78

(ZDMRDO DM11A LGC TST_
MACY11 30A(1052)
CZDMRD. P11
28-RPR-78 13: Wy

78:

8s:
001570
001570
001566

001566

CORRECT IN ALL 16 ENTRIES

nov
Hov
DEC
B
nov
8ic
HOVe

¥
. X1
#16..x2
x2
108
Wom
.
.ltm

;6EY ag TT RDDRESS
; GET
COUNT
;
SCAN COUNT
:
IF l%nmlts SCRNNED
s GEY
ITTED DATA
:(I.f. NON-TRANSI
TTED
I BITS
1.3 l((!wg DATR

glfll

.glou &fimt(t DATR

TST
B8R

(1)+
8s

s INC
s TEST

SI,'O.

; TEST l?:}. SIYIY (SHOULD BE = TO O)

: CONPRRE

TT_RDORESS
NEXT ENTRY

CZDMRD0 oomn LGC TST
MACY11 30A(1052)
CZDIMRD.
P
28-APR-78 13: w4
012701
012702
005302
100403
0N2721
000773

13:48

L
PRGE 64

;:CLEAR ALL BUT LINE NUMBER
108:
MoV
STUNTRB,
%1

001600
000020

118:

160777

MOV

#16.. %2

DEC
an|
BIC

SEQ 0064
IN TUMBLE TRBLE ENTRY
;GET FIRST TT RDDRESS
;GET SCAN COUNT

%2
129
#160777.(1)+

B8R

s DECREMENT SCAN COUNT
;BRANCH IF ALL LINES TESTED
;CLEAR ALL BUT LINE NUMBER IN TT
;DO NEXT TT RDDRESS

11§

: TEST THAT THERE IS AN ENTRY FOR EACH OF THE 16.
128:
CLR
XNTDAT

001570
000020
000020
001600
001570

MOV

(L)

#16. . %2

148:

404
BEQ

¥NTODAT., (0)+
158

MOV

S§TUNTRB%0
,

DEC
BNE

001570

; TEST FG LINE ENTRY

sBRANCH IF FOUND

X2
148

CLR
ERROR1

15§:

LINES

#16. . X1

13%:

001566

;DECREMENT SCAN COUNT
:LOOK AT NEXT ENTRY

RCVOAT

BR
DEC

TST

;ERROR
| NO ENTRY FOUND FOR THIS LINE

169
X1

i DECREMENTL INES FOUND COUNT

168

;BRANCH IF ALL LINE TESTED
;W LINE NUMBER

BEQ

IT R BREAK ON ALL LINES SIMULTRNEQUSLY

gg
o= ¥L
L

LR BE?E??§§§§§EEHFEFEEE§§fi§5§¥§§§§§§

3287

28-RPR-78

000001
163772

CLR

GET TIME TO TRANSNIT ONE CHRRACTER

TUNTRS

foneg > BOVE
TUNTAB+1

164004
164002

177
MOV
MOV
TST8

163770

CLR
LAY

881T0. 3CSR
8-1.38KCSR
aCSk

38KCSR

- e
Sa
25
163744 001566
moV
ase.

000201

163752

000201

001570

MOV
ERROR!
R

#201,

Revar
XNTORT

138

;TEST THAT THERE IS 16.

;CLEAR
ALL BRERK BITS
l'l'I'I‘T ONE CHARRACTER

Innmmvmmmmm
.gr
CSR

i
;

ENTRY

T
| INCORRESUL
RECT CSR DATR

VALID DATA ENTRIES

012701

001600
000020

poadsSSaRdatd

ISUNTHNN

28-APR-78
28:

38:

100402

us:

13:48

PRGE 65

MOV
MOV

TUMTRS,
%
816,22

BMI

BR
DEC
BNE

138
X2
3§

ST
ERROR

SEQ 0065
;GET TUMBLE TRBLE BASE RDDRESS
GET SCAN COUNT

(1)+

:TEST FOR VALID DATA ENTRY
:BRANCH IF VAL ID DATA
FOUND
ZERROR! MISSING VAL ID ENTRY
DATA ENTRY

CEXIT
: DECREMENT SCAN COUNT
:BRANCH IF 16. ENTRIES NOT SCANMED

;TEST THAT THE BREAK BIT IS SET IN 16. TUMBL
E TRBLE ENTRIES
MOV
STUMTRB,
X1
MOV
816 . %2
5$:
BIT
#BITIN. (1)+
;BREAK BIT SET?

68:

BNE

DEC

ERROR
B8R

BNE

IBRANCH IF SET

:ERROR! MISSING BREAK B1T
CEXIT

138

; DECREMENT SCAN COUNT

5§

;TEST THAT THE TUMBLE TABLE DATA BYTE IS ALL 0'S
MOV
STUNTRS.
X1
OV
816 .%2

001600
000020

7s:

8s.

TSTB
ERROR
R
13

BNE

BEQ

1)+

; TEST DATA BYTE
:ERROR' INCORRECT DATR
CEXIT
:STEP TRBLE POINTER TO NEXT DATR BYTE

:BRANCH IF 0'S

138

;CLEAR ALL BUT LIN: NUMBER IN TUMBLE TRBLE ENTRY
WOV
STUNTAS,
X1
MV
816 .X2

9s:

s FEEeRR

EERiGE

CZDMRDO DM11R LGC TST
MACY11 30R(1052)
C
. P11
28-APR-78 13: Wy

BIC

8160777.(1)+

CLEAR ALL BUT LINE NUMBER

BNE
;TEST THAT THERE IS A TUNBLE TABLE ENTRY FOR ERCH LINE
R
Y
;CLEAR LINE NUMBER

1s:

MOV
CW

8EQ

MOV
MOV

126:
001000

138:

STUNTRS.X!
XN, (1)+

128

XN, XNTOAT
X4, RCVDAT

;TEST FOR LINR ENTRY FOR THIS LINE

;BRANCH IF FOUND

ERROR! i

;ERRORY NO LINE ENTRY FOUND FOR THIS LINE

DEC

;ALL LINES BEEN FOUND

BEQ
AOD

SCOPE

138
#1000X%
,

108

JEXIT IF YES
: SERRCH FOR

S NEXT LINE

SCOPE

i Tyt
vr———

CZDMADO DM11A LGC TST_
MACY11 30A{1052)
CZDMRD. P11
28-APR-78 13: w4
3399

%00
%01
302

3403

016019

016012
01601%
016016

000137

RT137:

016026
000002
016020

000137

016020
016024

004537
000040

016026
016030
016032
016034

000140
016044
000002
016036
000140

;ROUTINE 8 137

;RDDR OF NEXT ROUT INE.
; ITERATION COUNT
; SCOPE ENTRY POINT.

¥
¥
3

005602

RT137R:

JSR
5. S80L Y)NMT
;60 DO TEST. DELRY
32.
;THIS MUCH BETKEEN L INES
; l!ultultntttt!ttttlt"lltt8388388!38888“83”8!3
3!!“!l!l!!t”!tttttt
RT140:
140
;ROUTINE 8 140
RT141
;RDDR OF NEXT ROUT INE.
3
2
; ITERATION COUNT
RT140A
;SCOPE ENTRY POINT.
X
X=X+1

; u:u:ununtzs:xxnuxxunxnuzxxut:uuu

uuunxuu:uuxxxxxx

.:}g} I?"TIHCSHIT ON EACH LINE WITH R DELAY BEFOR
E STATING THE

016036
016042

004537
000020

N23
N2%
3425
N26

016084
016086
016050
016052

000141
016062
000002
016054

005602

RTI40A:

JSR
16.

5. SR0L YT

-60 DO TEST. DELRY
;THIS MUCH BETMEEN LINES

; xtuunuuuunutxuuzutuumm:mxmxtuuuxx

RTIN1:

000141

141
RT142
2
RT14IA

;ROUTINE & 1y1
;RDDR OF NEXT ROUT INE.
; ITERATION COUNT
; SCOPE ENTRY POINT.

X=X+1

nuutxuxxu

¥
S
¥
&

; ttuuuxmnuunzmnmtmmtmmumz

uzmnmxuuuxxn

137

RT140
2
RT137R

.'IE’S& I?'EIHCSHIT ON ERCH LINE WITH R DELAY BEFOR
E STATING THE

3820
MN21

MN3Z
N33
M3
M35
MN36
MN37
N38
N3

SEQ 0066

X=X+1

:}:

MN27

B
6
PRGE 66

ttt“t!tlt!tutttt!t!

g};

MN22

13: 48

; !ttt!t”ttutttn!!!t83!!l!lltltlt“ltlt!lu!t“t!t

408
409
TM10
11
3412
13
%1%
M5

28-APR-78

.;I"Eg; I?"Tlml'f ON EACH LINE WITH R DELAY BEFOR
E STATING THE

016054
016060

004537
000010

016062
01_06%
016066
016070

000142
016100
000002
016072
000142

005602

RTIMIA:

JSR
5. S8DL Y)NT
;60 DO TEST. DELAY
8.
;THIS MUCH BETHEEN LINES
; umzmmnu:mnunuxmztmmzmmxm
muuxmxmuu
RT142:
182
;ROUTINE & 142
%
RT183
;ADOR OF NEXT ROUTINE.
¥
2
; ITERATION COUNT
x
RT142A
;SCOPE ENTRY POINT.
4
X=X+1

; x:unmtmmttnnnxtuunum:m:mzmt

uumuxxmuuuu

6072
6076

004537
000004

6100
6102
6108
6106

000143
016116
000002
016110

000143

005602

;TEST TO TRANSMIT ON EACH LINE WITH A DELAY BEFORE
STATING THE
sNEXT LINE.

RT142R:

JSR
i

5. S8DL YT

;G0 DO TEST. DELRY
:THIS MUCH BETUEEN LINES

; uuu:unxuunuuunxu:mtmmumxmmu

RTI43:

SRR

unuuuunxxxx

143
RT14Y4
2
RT143R

X=X+1

sROUTINE & 183
;ADDR OF NEXT ROUTINE.
; ITERARTION COUNT
;SCOPE ENTRY POINT.

RE R

4
b§
|
3

R AR R R LR AR LR LR RRRLRLRRRRRLALL

;TEST TO TRANSMIT ON EACH LINE WITH A DELRY BEFORE
STATING THE

CZDMRDO DM11R LGC TST
MACY11 30A(1052)
CZDMAD. P11
28-APR-78 13: 44

3455
3456
N57
3458

016110
016114

004537
000002

016116
016120
016122
01612

000144
016134
000002
016126
00014y

28-APR-78

13: 48

;NEXT LINE.
RT143A: JSR
2

005602

C_6
PRAGE 67

5, SR0LYXMT

SEQ 0067

;60 DO TEST. DELRY
;:THIS MUCH BETMEEN LINES

; xtxxxuuuutu:nuuuxtxxxunuuun
unuxnxnxnuunuxxxnxx
RTINN:
14y
;ROUTINE & 14y
4
RT14S
;RDDR OF NEXT ROUT INE.
3
2

; ITERATION COUNT
;SCOPE ENTRY POINT

RTIN4A
X=X+

|
4

Ry
et
i
i
—

TEST To"nmsnn ON ERCH LINE WITH A DELAY
BEFORE STATING THE

016126
016132

004537
000001

016134
016136
016140
016142

000145
016302
000144
01614y
000145

RTIN
R 4A: JSR

005602

5, 380L V)T

;60 DO TEST. DELAY

;THIS MUCH BETMEEN L INES

; :xmug;mmnmxmxmxmuumnm

RT145:

tmmumxmmnmxx:

;ROUTINE & 145

RT1%6

;RDOR OF NEXT ROUT INE.

100.
RTINSA

; ITERATION COUNT
:SCOPE ENTRY POINT.

32
£

X=X+1
; nu:mztmmzmxmtutmumuux

mmxmxm:nxmzmuu

0161%%- 00S037

: g\-

016150
016154

005037

;TEST THAT THE DM11 WORKS PROPERLY WMEN THE MALFDUPLEX BIT (CSR BIT 1)
;1S SET. THE TEST TRANSMITS DATA ON LINE 0. AND
'BREAKS' ON LINE 1. ONLY
: THE BREAK SHOULD BE RECEIVED ON LINE O IN THE TUMBL
E TRBLE.
RTI45R: CLR
TUNTRS
;CLERR THME FIRST TWO

001600

017102

CLR

001400
001440
163344
163340
163334

001602

MoV
nov
TST8
BPL
CLR

SLBITO. aBAR
SLBITI. @BKCSR
(SR
v =9
SBKCSR

001566
001570

18:

001570
163244

SOUTBUF . CAT
-1, T
87,

;TUMBLE TRBLE ENTRIES

;SET UP TO
;TRANSNIT 1 CHARACTER

;SET 60. MALF DUPLEX & MAINT BITS

;TRANSHIT 1 CHAP. ON LHNE O
;SET BREAK ON LINE 1
;MAIT FOR THE CHARACTER
-70 BE RECEIVED
;CLEAR THE BRERK BIT ON LINE 1

;TEST THAT ONLY THE BREAKX WAS RECE IVED

141000

001600
141000

TUNTRB+2

MoV
MoV

SE"O

’;umnmn

: TOST FOR BRERK ENTRY (LINE 1)

nov
oV
ERROR1
BR

TUNTRB, RCVOAT
#141000. XNTOAT

;GET ACTURL ENTRY
. GET CORRECT ENTRY
;ERROR! INCORRECT BRERK ENTRY
;60 TO EXIT

BEQ

;EXIT IF CORRECT

ERROR1
TST

oCSR

;MAIT FOR THE TRANSMITTER

Hov
CLR

28:
AR

RT146:

146

RTLAST
100.
RT146A

TUNTRB+2 RCVDAT . TEST THAT NEXT ENTRY IS CLERR

XMTDAY

;ERROR! SECOND ENTRY WRS NOT CLERR

R L XL

SRR SRR LR LRRRRL
R
RRRARLLTLRLLTLIRTLLRLLRL

;ROUTINE & 146

:RDOR OF NEXT ROUTINE.
; ITERATION COUNT
: SCOPE ENTRY POINT.

b3
X
X

CZDMADO DM11A LGC TST
MACY11
CZDMRD . P11
28-APR-78 13: Wy

30A(1052)

000146

28-RPR-78

13:48

D 6
PAGE 68

SEQ 0068

X=X+1
; xttuuuunuuunxntnxtxunnuuuu:

unxnxxunxxnxnxxxun

Lg‘.-gR
gsggg-e
382ie
L

001400
001440
016376
016442

; TEST THAT THE Of11 RESPONDS CORRECTLY TO
A RESET
RT146A:
SOUTBUF, CAT
;SET UP TO TRANSMIT 1 0
HC
s CHARACTERS ON LINE O
;GET TIME TO TRANSMIT Z CHARACTERS

163166
163162
163156

8170, 8RR
82, %4

163120

sBRANCH IF O
;Exm" ! BAR IS NOT CLERR

4s:
;HAIT B MORE CHARACTER TIMES

65:
9CSR, RCVDAT

g“
28

;HAIT 2 CHARACTER
;TIMNES

;BRANCH IF O
;ERROR! CSR DID NOT CLEAR
;GET BRAR CONTENTS

001566

163066

163042

;SET MAINT. , HALF DUPLEX & GO BITS
;STRART TO TRANSMIT ON LINE O
7BREAK ON LINE 1

sRESET
;BET CSR CONTENTS

163130

558

ikt
~

WN -

R LT
- :

3518

012737
012737
013737
013737

0C1566

9
SBAR. RCVDAT
8s

001566

93
dBKCSR, RCVDAT
9

;TEST THAT CSR IS CLERR

;ERROR! CSR WAS NOT CLEAR
-60 TO EXIT
:TES THAT BAR IS CLEAR
;ERROR! BAR DID NOT CLERR

: TEST THAT BKCSR 1S CLERR

;ERROR! BKCSR DID NOT CLERR

+ SCOPE

CZDMADO DM11A LGC TST
MACY11 30R(1052)
CZDMRD. P11
28-RPR-78 13: 4wy

iéifiEiEiEi;

016514
016514
016516
016520
016524
016530
016534
M“fiz

016572

13: 48

E
6
PAGE 69

;PRG1- TRANSMITTER SCOPE LOOP
PRGI:
TYPE
PRGIN
JSR
7. PARAN
PRGIR:
JSR
7. LOOP
PRG1B:
TST
@BAR
BNE
PRG1B
PRGIC:
CLR
JCSR

104000

016720
016772
163010
163000
016570
162430
000377
016570

28-RAPR-78

016570
016570
PRG1D:

CLR
HovV
BIC
SHRB
DELRY
OPEN
BR

PRGID
SHR, PRG1D
8377.PRGID

PRG1D

SEQ 0069

/BEGIN
: TYPE PROGRAM TITLE

;60 GET USER PARAMETERS

;GO LOOP TRANSMITTER

;MAIT FOR ALL LINES TO FINISH
;BRANCH IF NOT DONE
;CLERR THE CSR
;CLEAR DELRY TIME
;GET DELRY
;44D

;DELRY RS SPECIFIED
;BY USER
;LOOP BACK

;44D
;44D

CZDMADO DM11A LGC TST_
MACY11
CZDMRD. P11
28-APR-78 13: 4y

30R(1052)

28-APR-78

13: 48

F
&
PRGE 70
‘

SEQ 0070

3571

3572

3573 016574
3574 01657%
3575 016576
3576 016600
3577 016608
3578. 016610
3579 016616
3580 016622
3581 016624
3582 016630
3583 016632
3588 016680
3585 01668
3586 016686
2587 016652
3588 016654
3589 016656
3590 016662
3591 016666
3592 016672
3593 016700
359 016706
3595 016712
35% 01671%
nm 016716

: PRG2- RECEIVER SCOPE L0OOP

104000
020135
004737 016720
004737 016772
012777 000001
162724
005777 162722
001415
105777 162712
100372
ON2777 000200
162702
020127 001776
001002
012701 001576
005721
000755
005077 162660
005077 162656
005037 016714
017737 162304 016714
082737 000377 016714
000337 016714
10%%00
000000
000732

PRG2:

TYPE
PRG2M
JSR
PRG2R:
JSR
PRG2R:
MOV
PRG2AR: TST
BEQ
TST8
BPL
BIC
CHP
BNE
MOV
TST
BR
PRG28:
CLR
CLR
CLR
KoV
BIC
SWAB
DELRY
PRG2C:
OPEN
BR

7. PRRAN
7. LOOP
#8170, aCSR
SBAR
PRG28
SCSR
PRG2RA
#8177, CSR
X1, 8TUNTRB+176
+6
#TUNTRB-2, X1
(1)+
PRG2A
oCSR
SBRAR
PRG2C
SSHR, PRG2C
8377, PRG2C
PRG2C
PRG2R

;BEGIN
: TYPE PROGRAM
;TITLE
;60 GET USER PARAMETERS
;G0
_START TRANSMITTER
;SET 60.CLEAR THE OTHERS
;HAVE ALL I.l“ES SELECTED F INISHED
sBRANCH IF F1+iSHED TRANSMITT!NG
(MAIT FOR fl( l((!lfil T0
;RECEIVE A CHARRCTER
;CLEAR RECEIVER FLRG
. 1S THE POINTER AT THE END OF THE TT
;BRANCH IF NOT
;RESET POINTER
; INCREMENT POINTER
;60 BACK & TEST TRANSMITTER FLAG
;:CLERR THME CSR
;CLEAR THE BAR
;CLEAR USER DELRY
;GET USER DELRY
;:DELRY RS SPECIFIED
;BY USER
;REPERT LoOP

3599

3600

3601
3602
3603
360%
3605
3606
3607
3608
3609
3610

016720
016722
016724
016730
016732
016738
016736
016742
01679
016752

10%000
020154
008537
000000
108000
020177
008537
0000CO
023727
101%03

3613
361%
3615
3616
3617

016760
016762
01676%
016766
016770

000764
10%000
020043
104015
000207

016772
017000
017008
017006
017010
017012

117737
004537
017102
017103
000307
012777

319

3620
3621
3622
3623
362
3625
3626

WIK TO GET USER PARAMETERS (FOR PRGI & 2)

00%416

016742

000310

TYPE
L INPAR
JSR
LINE:
O
PARAMA: TYPE
HOWMAN
JSR
CHARS:
O
cne
BLOS

PARAME:

162204
006224

017102

001400

162530

BR
TYPE
"
CNTLU
RTS

5. RECD

CHARS. ¥200.
PRARAME
PARAMA

;ASK USER WMICH LINE
;70 _TEST
;GET LINE AND PUT IT
s MERE
+ASK USER HOM MANY
.cmms TO TRANSMIT
;GET CHARS AND PUT IT
o
IE
. T um T0
: (CORE LINITRTION)

+RE-REQUEST PRRAMETER
+TYPEINSTRUCTIONS
;60 GET VALUE
SEXIT

; SUBROUTINE TO mn OATA FROM THE SR

LOOP:

Move
SSHR., OUTBUF
JSR
5. BNOVE
OUTBUF
OUTBUF +1
199.
MoV
#CAT, JBRSREG

+FILL QUTPUT
: BUFFER
HITH
;DATR TO BE
: TRANSNITTED
: INITIALIZE BASE REGISTER

s:44D
;:44D
;o 44D

LU M FEECRERRERRRE
R r e sk ey

CZDIMRDO DM11R LGC TST
MACY11
C
. P11
28-APR-78 13: 4wy

30R(1052)

28-APR-78

012737 017102 001400
017026 004537
006224

017032
017034

MOV

001%00
001402

016742
001440
006224

016730
016730

001440

8!!883
RT

e ol

§9$

FFETTT

0179436

CHARS., WCT
WCT

;LORD WORD COUNT
;FORM THO'S COMPLEMENT

RTS

28:

3s:

5. BMOVE

; TRANSMITTED

LINE.LINBIT
L INE. 9BRR

;SAVE LINES TO BE TRANSMITTED ON
;START TRANSMITTING ON SELECTED L INES

MOV

JEXIT

+FIRST RDDRESS OF 100.

;CHARACTER OUTPUT BLFFER
;FIRST RDDRESS OF 100.

;CHARACTER INPUT BUFFER (MMERE RECE IVED
;DATA IS ST

;SAVE VECTORS

#18. 900

sSET UP FOR TIMCOUT

EE"O

;;I.CSII

nov
nov
MoV

ASUREG. SUR
S0ISPREG. DISPLAY
(SP)+. 3N

nov

KBDINTT: CP
BNE
e

BEQ
CLR

nove
BICB
CHPB
BNE
CNTLUY

sREFERENCE HARDUARE SMITCM REGISTER

(SP)+, (SP)+

;RDJUST STRCK

sPOINT TO SOFTHRRE SHITCH REG
;POINT TO SOFT DISPLAY REG
sRESTORE VECTORS

(SP)+, 386

G BEING TYPED

BSUREG. SR
13
B2, 3%

TMP1

STKDBR. TP 1
#200. TP
7. TP
15

RTI

sARCT11?

:BR

IF YES

:CLERR TENP RRER
;FETCH THE BUFFER
sSTRIP OFF PRARITY
MRS IT 6
: NOP
+G0 CHANGE 1T

JEXIT

/ROUTINE TO CHANGE CONTENTS OF SWREG(LOC 176)

000176

CNTLUU:

CHP

)

86, -(SP)

oy, -(SP)

;ROUTINE TO CHECK FOR

19:

;NUMBER OF
;CHARARCTERS TO BE

= INBUF +100.

RTI

000176

;TRBLE MITH

=0UTBUF +100.

MoV

18:

;LORD CURRENT

MOV
NEG

32.

SUSURR:

#OUTBUF ., CAT

- RDDRESS TRBLE
;HITH RDDRESS
;OF OUTPUT BUFFER

MoV
MOV

INBUF:

SEQ 0071

5. BMOVE

JSR

OUTBUF:

G 6
PRGE 71

JSR
CAT
glzlhz

HCT
HCT+2
001564
16244y

13: 48

#SUREG, SWR
Fix

GBERGEE

CZDMADO DM11R LGC TST
MACY11
CZDMAD. P11
28-APR-78 13: 4y

30R(1052)

3693

13:48

SSHREG
JSR
SHREG
zVRLUE

006154

H
PRGE 72

SEQ 0072

RS5. OACNV

- CONVERT TO RSCII

TYPE

3690
3691

3695
3695

28-APR-78

004574
161356

THP1:

FJX:

SVALUE
JSR
0
CHP
BEQ
MOV
RTI

5. RECD
87, CNT
FJX
THP1, 3SIR

':GE;E"'! AND PUT IT
’

; CHANGE CONTENTS OF SHREG

CZOMADO DM11R LGC TST_
MACY11
CZDMRD. P11
28-APR-78 13: 4wy

3697

3698
3699
3700
3701
3702
3703
3704
37205
3706
3707
3708
3709

017626
017634

0176M1
017646
017647

017654
017662
017666
017674
017702
017710
017716

0530M5
042101

ONS
100
ONO

041505
037522

053523

020080

30A(1052)

020124
100

13:48

; MESSRGES

WHERE:

. ASCII

036522

SSWREG: . ASCI|

PRGE 73

'XVECT ADR7Q’

‘'X%SWR=d'

020040
0583505
ONWANS
0N2522

020040
040075
OM1516
052103

020040

SVALUE: .ASCII

051117
Q44440

SCTLU:

. ASCII

'XINCORRECT INPUT,

gllfi

lez

043501
MMICH:

. ASCII

ASCIl

'%=3'

.RSCI!

'XCHAR LNGTHa'

.ASCI!

‘XERR S/B:

O470M0

5
100
71 s 03684
ONS ON7126 052111

712
3713
3718
3715
3716
37217
3718
3719
3720
3721
3722

28-APR-78

017732
0244
0170 ONINAS ONOS10 020122 LEVEL:
17786
01775% ON2wWS 051122 051%40 ERDAT:
017262 ONOS? 020072
017766 020080 O200N0 020040 ARSB:
017774 053W0 051501 020072
020002 0200W0 020080 020040 AWRS:
02000
100
020011
O8NS 051120 021507 MO:
020016
100

NEW=Q'
TRY AGRIN!’

'XUNIT(8)73°

. ASCII
°

WAS:
°*

.ASCII

.RSCI1

"XPRGES'

3723
372
3725
3726
3727
3728
3729
3730

020017
020022
020030
020036
Q20063
020080
020086
020064

_ ONS
ONZWN6
051WW6
OWIWO
ONG
ONOSI0
061480
ON2073

ONOO77
ON2116
036522
027117
ON2118
020122
030122
OBNSIY

ONOONO
037460
_ 100
ONINN0
ON7111
0335
OWAWND

M
M2.
M3:

ASCII
.ASCII
.ASCI|

329"
'XEND @'
'XSR=07 GO. 3’

-ASCI1

"XLD CHAR IN SRO-7;DLY IN SR8-153°

3733

020103

OWS

ON751N

OWWS07

PRGOM:

. ASCI!

'XLOGIC TSTSa"

3736
PE

020117
BN

OV
oumn

OWGS30
020122

052111
Nty

PRGIM:

.ASCI1

'XXMITTER LOOPS'

061087

373

372

020156

OAI1T

ONGONO

LINPAR:

346
3746
37%7

020176
020177
02020

100
NG
Ow103

ON743
051101

020106
037523

HOWMAN: .ASCII

gmmay

gaiaz

3751

02022%

02004

020040

732 GE0w0 Gitees o oo

T® omiie i oo OSiSH

3 omim

37w

3ng

(6 ONGEID 082111 PRGZL . ASCII “XXNIT/REC LOOPY'
OVISOS W60
OB1E08 OSSN

020117 06152% 02012
100

020040

APC:

. ASCII

*XTYP LINES TO TST @'

'XROF CHARSTMR'

.ASCIi

28-APR-78

13: 48

segigeSt2sansgsgs

EmERmARmREmREmRRmRmS

CZDMRDO D1 1R LGC TST
MACY11 30R(1052)
CZDMRD. P11
28-APR-78 13: w4

. BYTE
. ASCI

END

J
6
PAGE 7y

QUICK BROWN FOX JUMPED OVER THE LAZY DOGS BACK
1234567890°

SEQ 007y

K
6
CZDMADO DM11A LGC TST
MACY11 30A(1052)
28-RAPR-78
13:4
8
PAGE
76
CZDMRD. P11
28-RPR-78 13: Wy
CROSS REFERENCE TRBLE -- USER SYMBOLS
A
= 000000
5268
23418
28558
3033s
ARS8
017766
37178
APC
020224
APCADD 002102
76M4%
770
L {1
013526
27219
2720
2730
27408
ATNUMB 020216
S
020002
A12x
013546

R16XK

013552

R20K
A24K
A28K
ASK

81715 = 100000

8172
8173
8ITs

= 0DDDDM
= 000010
= 000020

==;2 - 000100
BNOVE
BRKTST
BRK0
8RK1
BRK1I0
PRK11

BRKIZ
BRK13
BRK1Y
MRKIS
PRK16
BRK1I7
K2
BRK3
BiKy

006224
005856
01%20%
014222
019364
019402

019420
019436
019454
01972
019510
019526
014240
014256
014274

-:n

= OCONOD

BIT9 = 001000
BKCSR
0015%6

BITS

= 000200

LR EE R R PR T

8177

19512

1952

1132
1718

1305
1722

1269

1812

1332
1393

1362
15427

1269
1132

1308
1736

1756
1775
1132

1760
1779
1318

898
13813
21053
15058

13882
21063
1539

3019

3030

13585

138%

1435

2543
3244

1523z

2547
3248

2008

255132
34862

1544

1698

1699

1817

2130

2558

1881

1889

1915

1366
1741

1547
2828

1556

1793
1889

179%
2772

1798
2836

1877

1885%

1886

2909

2%0

29M

15562

1568

25893
352132

1703

1831

i%5e &

81710 = 002000
81T11 = 00ON000
8iT12 = 010000
81713 = 020000
BIT1% = ONODDO

1520z
3626%

o BIC

E 3

28332

1245

BiT1 = 00000

11312
2086
2803

001500
= 000007

1033
2083
2801

5483

001550

SEAEESY Eafsy

BRASREG

EaEgEdRE

001544

013556
013562
013566
013536

B8AR

BAT
BELL

SEQ 0075

2038

20423
3545

20433
2692
3559

2044
2723
3579

1987

19932

19%2

20053

2832

3234

3328

3578

213
1991

3251
2553

2593

1917z
3522

19182
3I5%9

2975

2986

25923
3532

L6
CZDMADO DM11A LGC TST_
MACY11 30A(1052)
28-APR-78
13: 48 PRGE 77
CZDMRD. P11
28-APR-78 13: 4y
CROSS REFERENCE TRBLE -- USER SYMBOLS
BRKS
014312
2916
29208

BRK6

BRK?
CARMSK
CAT

014330

014346
001572
001400

2927

2938
6998
6808

3483x

6928

3609
10612
11302

3632
1129x

13172

860
36808
765
10383

3616

1175

004574

CNTLU = 108015
CNTLWU 017546
CNVDAT 002332
COUNT
002076

(SR

001542

519¢
729
753
7348

6878

1306

13878

1699

1760
1818

2062

CURTST 002002
DATCHK= 104002
DATTST 006312

DATO

DAT1

DATIAR
DATI0
DATI1
DATIZ
DAT13
DATIS
DATIS

01454

014562

006316
014724
O1%N2
014760
014776
01501%
015032

25588
2697
2836
3488

006000

DNPARS

003746

%'. 003464

1761
18312

20658

2567%
27213
28%7
3503

1439

170M

17248
1832

2069

2593
272%
28%9
3520

3626

36278

3629

11M13

14098

1421

15312

1351

1353

1521

1139%

1081

1318

1442

1217z

1778
18363

2093

1088

13262

11328

1327

15%7

1779
1837

1
1851

1718

2117

21308

11373

1549

1723

1793
1854

21313

11%ss

1552

17363

17%
18582

21493

1737

1798
18593

1682

16982

18128
2057

1813
2058:

18172
2059

2157

17%12

17%2

1557

1799
1860

21588

15592

25423

17558

1385

175

3098

3109

3120

3182

3153

31eM

2598

2630

2795

32%2

3333

3TMy

3837

10666

15568

13843

3581

’:gr 1018# 'I,ag
1076

SNZ

13052

1382

25572

25%0

30768
30878
30988

6788
6658

1270

13803

2553

2573

31318
31828
315348
31648
31758
31868

5208

3208

13552

269
28
3wusss

30548

15318
3127
3138
3149
3160
3171
3182

917z

15353

12v8

2693
2832z
3337

2545

30u3s

12693

2659

2690%F
2828%
3338

1431

3039

3050

12612

26498

2657
2797
3330
35893

3087

3197

2648

26563
2781
3328%
3583z

3076

318

873

2534

3692

3065

3175

867
1605
30M3

2009

3620

3674

3054

7048
5088
15308

3072
3083
30%

oLy

1703z

1310

3515%

2654
27773

01%16
01%63%
01%652

00120%
000174

18173

1031z

3278

1520

26528
2775
32582
3578z

DATI
DATS
DATS

DISPLA
DISPRE

13082

8008
1035

2731

1256

2620
27703
3251
3561

3193

883

12118

2701

11282

26198
2728%
3249
3s5M1

015050

DELAY = 10%400

11928

1603

2617
2726
32:Nx
3529

DAT16

1364

1030

2720x

CNT

001554

133y

1009

2689

4328
5098
36088
6918

CLKLVL

29314

29428
1118x
681

2663

CC
= 177776
CHALT = 104003
CHARS
0167%2
CLKINT 001552

SEQ 0076

3197%

BB
1422

36573
3657

14uBs

N
6
CZDMRDO D1 1R LGC TST
MACY11 30R(1052)
28-APR-78 13: 48 PRGE 78
CZDMAD. P11
28-RPR-78 13: 4y
CROSS REFERENCE TRBLE -- USER SYMBOLS
DMPARC
004072
1108
DTCHK
002126
718
7518
EHRLT = 104004
510.
E
020213
37494

003100

781

922¢
928
3715!

npcmimspeRemdnss3eetmn8Rgu3aeralmR3ean8ebdraes§nsnrBagigRntealinBe=3le2danPuifbl&ob8nJsgSQea.fflpuaelgendingan

017754
002146
002204
002246

71“

SEQ 0077

763%

779%

seasasas zzei.8ncheEaEeisEiAEmSnwaEt |
ERRVEC=

862%

16812

16833

25862

877

899

906

1671

2589

2683

BEES 2y

ERROR1= 104011

EERY ¥
3483 BES

m m m w m f imm

ml clcl:l cl
To XL
35& 3o= mz8328eslN

olSRalal8E‘-85"zSs

ERROR = 104001

S3S3l“:“zs88=8

002306
002326
002324

554
777
799
1580
2063
2790
3547

26003

26463

26478

26738

26742

27182

2692

2723

2833

2866

3233

3486

2540

N
b6
CZDMADO DM11R LGC TST
MACY11 30A(1052)
28-APR-78
13: 48 PRGE 79
CZDMRD. P11
28-APR-78 13: 44
CROSS REFERENCE TRBLE -- USER SYMBOLS

LBIT16= ONOOODO
LBIT17= 100000

L8113 - Soaane
'

LBITY = 000020
LBITS = 0OGONO
L8176 = 000100
LBIT? = 000200
LENGTH 0O0%112
LENOKR 0O0%130
LENOKE O0O0%1%0
LENOKC OONINE
LENOKD 0ON20€
LEVEL
017740
LINBIT 001564

LINE

016730

LINED = 00000
LINEY = 0000020
LINE1O= 00002
LINE11= 0000220
LINE12= 00002
LINE13= 00002%6
LINET4= 000030
LINE1S= 000032
LINE16= 0000
LINE17= 000036
LINEZ = OOO0O
LINES = 0O000¢N
LINEW = 00001
LINES = 0000120
LINES = 000014
LINEZ = 000016
LINPR

R
LOoP
LTSTO
LTSTI
LTSTI0
LTSTI1

020184
016772
011464
011872
011634
011652

LTSTIZ
LTSTI
LTSTSS

011670
011706
011724

LTSTI?
LTSTZ

011776
011610

o wE

LTSI

011626

4398
4388

\E0§

W98
wgE
ot
el
109
1102
11068
108
118
1098
6962

1234

26143

81§
We28
NES
NSOR
w918
w928
938
WNE
w958
W968§
NE38
WENS
WES§
wees
we78
WES§

3602
3368
2168
2179
226
2267

1251

26268

2173
2184
2261
2272
2283
2294
2308
2316
2327
2338
219
2206
2217
2228
2239
2750

37428
3577
21728
21838
22608
22718

2333
2190

23378
2198
22088
22168
22278

2201

011644
011862

2212
2223

FACHER

00000

£308

020011

gl U

2895

2910
2921
293
2943
11008
11088
1110
11098
11208
37134
14152

22828
22938
230v

LTSTS
LTSTS

3020
3031

2278
2289
2300

SEQ 0078

iz 37838
837

37218

1101

1103x

1104

1109

1111

1112%

1113

1427%

1523

1654%

16572

2622

2623

2627

2787

2808%

3233%

32392

15302

1576

1578

1588

1655

13022

27698

2381
2362
2439
2480
2ve1
2472
2483
249w
2808
2816
2373
238

2398

2%17
2428

36218

1338

2772

3oue
30ee
3132
31as
3iek
3iee
317¢
3180
3198
3209
3066
3077
3088
3099
3110
3121

1365

28073

14162

32388

14262

leoes

1518

sess

Sess

B
7
CZDMADO DM11A LGC TST_
MACY11 30A(1052)
28-APR-78
13: 48 PRAGE 80
CZOMRD. P11
28-APR-78 13: 4y
CROSS REFERENCE TRBLE -- USER

020017

1174

020022

020030

ay]

020043

NOP
= 000240
NXTST
002006
OACNY
006154
ORCNVA 006166
OPEN = 000000

904

1055

37248

857

37258

4358
7068
769
14918
4368

8612
773
1500
680

3615

703
M2
1645
3528

708
N3
1646
3538

017102

OVRLAY
PARAN
PARAMA
PARAMS

004372
016720
016732
016762

3610

1128
3623
1044
3576
3613
36148

PARZ

067032

16352

16468

PRRS
Page

007040
007082

1638
1639%

PCROD
002100
PFRIL
008576
POPSP = 005726
POPSP2= 022626
PRGLIN 00201%
PRGN 002454

7358
842
4708
4718
7098
835

16498
16508
894

761
8ug
144y
1149
840
8398

PRGON
FRGOR

020103
007120

1685
713

37338
16698

016530
016536
016570

35598
35618
35623

3560

PAROD
PAR1

PREY

007026
007030

0O7D30

PRSS

002116

PRG1

01651%

PRGIS
PRGIC
PRGID

PRGN

g?u?

PRG2

PRTYD =
PRTYL =
PRIYZ =

016574

016610
016616
g ¥
016714
gms
bl
00

PRTYS = 000200
s

PRTYS = 0DO2%0

16338
1634

1107

1207

3612

874
800

900
804

912
1486%

914x
368y

682

684

686

705
957
1647
3567

1255
3624
11568
36018

706
958
1648
3596

12982
3627

691

711

742
1471
3243

779
164Y
333

1413
J6438

1521
3euy

1532

1594

1600

3231%

3277

3483

3515

850

35642

3565%

35678

35923

3593%

3594z

35948

35778

3597

35548

35738

4798
4788
4778

3582

35898

37398

u7e8 2150
Y748

£92

694

701

737
1470
27%

Buy

712

35788
35798
3580
3591%
3575
715

699

736
1469
2599

841z

Tan

698

735
1460
2591

840%

37368

697

734
1459
257y

92ux

3563%

696

709
11563
2546

764
12148
1629
2736

3%:

695

708
11562
1650

16448
16458

902%x

693

707
100%
1649

16398 lenas
7428

3723%

37278

OUTBUF

1030
36212
1042
3857

1075

SEQ 0079

SYMBOLS

005034

RCVO
RCV1
RCVIO
RCVI1
RCVIZ
RCVIZ

012014
012032
012174
012212
012230
0122%6

8710

RT101

0o7ene

007656
O1%2%6

014264

RSTRG
003172
RILAST= 177777
RTMNO
00200%
R70
007136
RTOR
0071%6
RT1
007200

R 3B W

002426
002514
003226
:llllg

§§a§§§§§§§z§!!§§!R

RSTATT
RSTATZ
RSTPC
RSTPSH

I
Ee

003250
006764
003316
003320

o=t

RNGEN
RORPAR
RP1
RP2

01210%
012122
0121%0
012156
00%%16

RCV3
RCVS
RCVS
RCV6
RCV7
=E§g

RT10A
RT100

1138

1264

1268

1301

1321

1324

12682

1301%

1319%

13212

13242

2132

13312
15982

13323
16042

1337
16102
198732

13442
16173
1988

135632
185432
20213

28373
35492
n27

3244z

1252%
1435%
1912
2093%
2778
3529%
2383

1256
14822
19363
2110%
2779
3532%
23%

1257
15793
19522
2117%
28033
35u1%
2405

25472
28303
35452
2416

1099
14698

11738
14763

3603

3607

3690

16338
9814

1641

9132

1667

13992
1886
2069
2732
3495
2361
2504

14002
19112
2086%
27712
34992
2372
2515

1070
1466

DPDDIE

012264

BN N o s et e ot 2t

RCVIN
RCV1S

PR R RS

RCVTST

SEQ 0080

¥ 4 p e

13623
1877%
20842

o o e ) et
NEE=D

oot

.
CZDIMADO DM11A LGC TST
HACY11 30A(1052)
28-RAPR-78
13: 48 PRGE 81
CZDMRD. P11
28-APR-78 13: 4wy
CROSS REFERENCE TRBLE -- USER SYMBOLS
PRTY6 = 000300
4738
PRTY? = 000340
4728
543
843
847
1010
1130
2147
2568
2647
PRVCNT
002104
7378
1918
19823
199%
PSH
= 177776
4338
1032
11332
1138%
1262%
12642
2147%
2155z
2559x
2561%
25682
PTO
006100
14708
1480x
PT1
006102
14718
14752
14782
1479
1480
1481
PURUP
004606
1214
RCVDAT 0C1566
6978
805
12452

1983
1619
979

9783

9828

1221
9574
9584
1512

871
16738

16702

19613
25633

2438

3280

2449

2460

RT136
RT136RA

01547y
015504

RT1S
RTISA
RT180
RT1%0R
RT181
RT181R
RT182
RT182R
RT183
RTINIA

010256
010266
016026
016036
016044
016054
016062
016072
016100
016110

g, fo

RT1%8
RYIS8A
RTIN6
RTINGA
RT1%6
RT1%6A

016116
016126
016134
016144
6302
016312

-»

e ek el pots
-t
3““““""“

D
7
CZDMRDO DM11A LGC /ST
MACY11 30A(1052)
28-APR-78
13:4
8
PRGE
82
CZDMRD. P11
28-RPR-78 13: 44
CROSS REFERENCE TRBLE -- USER SYMBOLS
RT102
014302
2903
29138
RT103
014320
2914
RTI0N
014336
2925
RT105
014354
2936
RT106
014372
29%?
RT107
014410
2958
RT11
007720
1824
RT11IR
007730
1845
1857
RT110
014826
2969
RT111
01444y
2980
RT112
01862
2991
RT113
014500
3002
RT118
014516
3013
RT115
014534
3024
RT116
014552
3037
RT117
014570
3048
RT12
010010
1843
RT12R
010020
RT120
01%606
RT121
O1%62%
RT122
0O1%es2
RT123
014660
RTI2v
014676
RT125
018714
RT126
014732
RT127
014750
RT13
0101%
RT13R
010154
RT130
014766
RT131
01500
RT13Z2
015022
RT133
015080
RTI1N
015056
RT135
01507y
RT135A 01510

SEC 0081

-y
CZDMADO DM11A LGC TST_
MACY11 30R(1052)
28-APR-78
13: 48 PAGE 83
CZOMAD. P11
28-APR-78 13: 44
CROSS REFERENCE TRBLE -- USER SYMBOLS
RTISA
010326
194
19508
RT16
010452
1942
19738
RT16A
010462
1976
19818
RT1?
010570
1974
20008
RTI7A
010600
2003
2008%
RT2
007252
1691
17098
RTZ2A
007262
1212
17178
RT20
010662
2001
2027%
RT20A
010672
2030
20354
RT21
010750
2028
20498
RT21R
010760
2052
20578
RT22
011056
2050
2073%
RT22R
011066
2076
20818
RT23
011164
207
2097%
RT23R
0117w
2100
21058
RT2N
011272
2098
21218
RT24A
011302
2124
21298
RT25
01133
2122
2139
RT25A
0113%6
2142
21478
RT26
011444
2180
21658
RT2?
01142
2166
21768
RT3
00732v
1710
17288
RT3R
00733
1231
17368
RT30
011500
2177
21878
RT31
011516
2188
21988
RT32
01153%
2199
2209
RT33
011552
2210
22208
RT3¥
011570
2221
22318
RT3S
011606
2232
2228
RT36
011624
2243
2253
RT37
011642
2254
226M8
RT"
007376
1229
17478
RTSA
007406
1750
17558
RTS0
011660
2265
22758
RT81
011676
2276
22868
RTS2
011714
2287
22978
RTS3
011732
2298
23088
RTSS
011750
2309
2319
RTSS
011766
2320
23308
RTS6
012004
2331
23438
RTS7
012022
23%8
23548
RTS
007450
17%8
17668
RT5A
007460
1769
17748

RTS0
RT51
RT52

RTER

RTS5
RT56
RTS7
k76
RT6A
RT60
RT61

RT6Z

012080
012086
01207%

01713

0121%6
012164
012202
007522
007532
012220
012236

012254

2355
2366
2377

2399

2410
2421
2432
1767
1788
2443
2454

2465

23658
23768
23878

2409

24208
24318
24428
17854
17938
24538
24648
24758

SEQ 0082

F
7
CZDMADO DM11A LGC TST
MACY11 30R(1052)
28-RPR-78
13:
48
PRGE
8y
CZDMRD. P11
28-RPR-78 13: 4y
CROSS REFERENCE TRBLE -- USER SYMBOLS
RT63
012272
2476
24864

RT7R

RT70

RT70R

012362
012606
012616
007574

007604

RT72

013226

RT72R

RT73R

RT7%

RT74RA

RT?7S
RT76
RY?7?7

2603

012726

013032

RT?23

0130M2

013236

013572

013602

014006

01%016

01417y
018212
014230

SAVREG= 10%007
003132
SCOPE = 10%006

001562
001600

895

898#

832

2037

1445
1922

1630
1939

2632

2675

848

10112

1012

3528

1726

1745

2019
2854

2087
3312

890
36562

898
3665

1783
2095
3505

1802
2119
3552

1889

1915

3322

3817

3518

1393

1392

1400

207
3397

9632

5EERTHEESTt

TTDAT
TUMTAS

002066
002070
017604
002072

2601

:g‘

TKCSR
TKDS®
TM1
TPCSR

1403
1896

2875

1935

e oy Bl et bt e o
ol el e O Bk G pos ol

hel, S

EASERR SENRCSgRES

000176

008272
008325
008336
008216

SHREG

TIRER
TINEB
TIMEC
TIMER

001202

Suk

ganda

START
002360
SUSIR = 104013
SUSIRR 017912
SVRPC
003166
SVRPSH 003170

R s Bk e pots

Ry &y
00323
2

SRSETT

i.im

1371
1864

SPBOT

002736
0027%2
002776
002012

1505

SCOPER
SCOPES
SCOPED
SCOPTR

2508%

25324

012716

RT?71

RT71R

2497%
2498
25208

RT66R
RT6?
RT67R
RT?

012310
012326
01236

N2s

7”33.

791

852

2665
3665

3563
3680

RTHN
RT65
RT66

SEQ 0083

869
3621

11528
11538

1420
25wy

2588

1430

2572
27%

33:7! 2 3672
787

36918

3694

1991
3656

2532

1145
11482

1195

18788 g% 1479
1299
1300
1331

1200%
1343

2597

32w

3691

1201

134

1386

1361

= 000020

2851

3226%
3363

3228
337%

107%
3688

1097

1106

35162

HE BEeiRESEIaE hE

2827
3343

2822
3326

1664

3555

3574

1001%
856
3601

1072

10772

1078%

10792

10849

10512

3635

3636

;o‘

995

3353

16778

1689

1NE8

1972

23588

230%

§===!

2759

1558
1968

1818

12363

1ag9s
195

i o=
12602

2183

219%

2241

22518

2337

zf#c 217%
2

23178

2318

38
2192

23408

R :;

-e

b+ 22

i
s

—

27012

801

31618

1349

e B R

4278

30518

3123
31948

L3dat : :

308

31178
3189

3§NN

29728

2500 2800

1808¢

:BZ383

1803

11272

s ven

1029

10528
1060

004622

2729
3325
3586

XNTTST

001560

780

XMTLVL

001556

777

g § 283525

XMTINT

006246
001570

1002

991

i 5 £28:43
& 2248H

XMITD
XMTDAT

1000

ok e

003766
00%006
00%03"

o gt

UNIT
UNTOKR
UNTOKB

9992

2699
3323%
3584

SEQ 008y

1003

=
b

TYPF
TYPG

003%0n
003w16

1585
3299
3499

003366

TYPO

TYPDAT
003432
= 104000
TYPE

1583
3288
3495

003350

1541
3279
3493

<38Lsiidgn

TYPC

716

1540
32723
Ju82%

003322
003332

gasg;PR R
Y
g !!cEaghs TRRHS
EE
Sg2SSEEEATE
SHngs
PR
LT N
33 gBusgss

TYP
TYPA

15382

3260
3481z
9844

1537

3229
3384

G
7
13: 48 PRAGE 85
CROSS REFERENCE TRBLE -- USER SYMBOLS

28-RAPR-78

28-RPR-78 13: 44

¥[&7

CZDMAD. P11

MACY11 30A(1052)

m‘-“’

CZDMADO DM11A LGC TST

2207¢
22N

2218+
2285
2383

2219
2295%

]
s
H 7
{czo
omo
DM11
R
LGC
TST
MACY1
1
30A(1
052)
28-AP
R-78
13:48
PAGE
86
CZDMAD. P11
28-APR-78 13: 4y

CROSS REFERENCE TRBLE -- USER SYMBOLS

31338

SCTLU
SENDRD
SSHREG
SVALUE
:

3200

017666
003036
017641
017647

1209
659
3683
3686

= 020332

527%

556
582
608
634
6648

1142

. BAR
.BASRE
-BKCSR

002110
002114
002112

- (SR

002106

020332

RABS.

ERRORS DETECTED:

2999
3067¢

32108

3000
3068

31448

37058
9084
37008
3689

3702%

558
584
610
636
6688

560
586
612
638
6758

528

1242

2655

2658

739%
7418
7408

20902

738%

23858
2452
2857
29338

211M4x

1089

530

1307

206632

000

DSKZ: CZDMAD. DSK2Z: CZDMAD. SEQ=DSKZ: CZDMAD. P11
RUN-TIME: 7 11 1 SECONDS
RUN-TIME RATIO: 322/20=15.
8
CORE USED:
13X
(25 PRGES)

DOCUMENT PRGES:

2386
24628
28678
29

30108
30788

3148

532

562
588
614
640
6798

1352

2696

23%8%
2463
2868
29448

3011
3079

2397
24738
28784
295

30218
30898

31558

3156

534

536

564
590
616
642
6818

1354

2728

592
618
b4y
1383

2727

24078
47y
879
29554

25068
29118
2978

31664

31228
3189

3022
3090

538

568
594
620
646
6858

1386

2848

2989
3057

2378
24518
28568
2923

£ 355858

23748
2441
25178
29228