Digital PDFs

XX-98298-B6

May 1977

74 pages

Original

5.1MB

Document:	MAINDEC-11-DZDME-B-D DDCMP MODE LINE UNIT TESTS May77
Order Number:	XX-98298-B6
Revision:	0
Pages:	74
Original Filename:	http://bitsavers.org/pdf/dec/pdp11/xxdp/diag_listings/DMC11/MAINDEC-11-DZDME-B-D_DDCMP_MODE_LINE_UNIT_TESTS_May77.pdf

OCR Text

PAGEl

IDENTIFICATION

PRODUCT CODE,
PRODUCT NAME,

DDCMP MODE LINE UNIT TESTS

DATE.

MAY 1917

MAINTAINER.

DIAGNOSTICS

AUTHOR.

FA¥ BASHAW

The Information 1n this document Is sUbject to change without
notice and should not be construed as a commitment by D1g1tal
Equipment corporation. Digital Equ1pment Corporation assumes
no responsibility for any errors that may appear In th1s
document.
The software descr1bed In this document 1s furn1shed under a
license and may only be used or copied in accordance with the
termS of such license.
Digital Equipment Corporation assu~es no reSPOnS!bi11ty for
tne use or reliability of Its software on equipment that 1s
not suppl1ed by Digital.
Copyright tCl 1976, 1977 by Digital Equipment Corporation

0001

Page 2

ABSTRACT
T~e function of the OMC11 diagnostics Is to
verify that the
option op~rates accOrding to specifications, The diagnostics
verfly that there are no malfunctions and the all operations
Of the DMCll are correct In its env1ronment,

Parameters ~ust be set up to alert tne diagnostics to the
DMCll configuration.These parameters are contained In the
STATUS TABLE and are generated In two waysl 1) ~anual
Input • th~ operator answers questions, 2) Autosizing u the
program determines the parameters automatically.
DZOME test~ the OMC-l1 Line Unlt (M8201 or M9202),
It
performs write/read tests on the OMC Line Unit registers, it
checKs for proper transmitter, receiver, and BeC operation In
DDe~p
mode,
The modem signals are al~o checked. DZDME
requires a DMC Micro-Processor (M8200 or M8204) to run.
For
best diagnosis a turn-around connector should be 1nstalled,
however the diagnostic will run without it (some tests are
skIpped),
Currently there are five off llne diagnostics that are to be
run in sequence to 1nsure that 1f an error should occur it
will be detected at an early staoe.
NOTE:

Additional dlaonostles may be added 1n the future.

The f1ve diagnostics are,
1,
2.
1,
4.
5.

DZDMC
DZDME
DZDMF
DZOMG
OZDMH

[REV]
[REV]
[REV]
(REV]
[REV]

REQUIREME~TS

2.1

EQUIPMENT

Ballc W/R and Micro-processor tests
OOCMP Line unit tests
BITSTUFF Line unit tests
Jump and Crom tests
Free-runninq tests (Heat test tape)

Any PDP!1 tamilY CPU (except an LSI-1ll with min1mum 8K memory
ASR 33 (or equll1valent)
DMCtl-AR with DMC11-DA or DMC11-FA
or
DMCI1-AL with DMC11-MA or DMC11-MD

PAG~1

0002

Page 3
2,2

STORAGE
Program will use

all 8K of memory except where ABL and
LOADER reside, Locations 1500 thru 1640, contain
the "STATUS TABLE" information wh1ch 1s generated at start of
diaqnostlcs by manual input (questions) or automatically
(auto-sizing), This area is an overlay area and Should not be
altered by the operator.
RODrSTRAP

LOAnING PROCEEDURE

3,1

~fTHOD

All programs are In absolute format and are load~d using the
ABSOLUTE LOADER. ~OTEI If the diagnostIcs are on a media SUCh
as DISK ,MAGTAPE,DECTAPE, or CASSETTE,
follow instructions
for the monitor Which haS been provided on that speciflc
medIa,
A8S0LUT~

LOADER starttno address *500

MFMOPY

* SIZE

41<
81(
12\c:

17
37
57

16K

20k
14k:

117

281c

137
157

Place address of ASS loader 1nto switch re91ster,
(also place 'HALT' SW Up)
3,1 ,2

Depress 'LOAD AOD~ESS' key on console and release,
Depress 'START KEY' on console and release (program should no~
be loading tnto CPU)

PAGE:

0003

Page 4

STARTING FPOCEEDURE
a.
b.
c.

Set switch register to 000200
Depress 'LOAD ADDRESS' key and release
set SWR to zero for 'AUTO SIZING' or SWR bltO=l for manual
input (questions) or SWR bit7=1 to use exist1ng parameters
set UP by a previous start or a previously run DMCll
d1agnostlc,
Depress 'START KEY' and release, The program will type
Maindec Name and program name (If th1s was the first start
up of the program) and allo the follo.lng,

MAP OF DMC11 STATUS
..
-...... - ....... _PC

CSR

STAT2
STATl
.....
.-.-.
.STAT3
....

001500 160010 145310
001510 160020 145320

177777
177777

000000
000000

The program will tYPe 'R' and proceed to rUn the d1agnostic.
The above 1s only an example. This would indicate the status
table starting at add. 1500 In the Pfoqram. In thiS example
the table contains the 1nformatlon and status of two DMC11~S,
THE ST~TUS 'rABLE MUST BE VERIFIED BY THE USER IF AUTO SIZING
IS DONE. 'or information of status table see sect10n 8.4 for
help,
If the diagnostic was started With SWOO=1 lndlcatlnq manual
parameter Input then· the fOllowlnQ shows an example of the
questions a~ked and some example answersl
HOW MANY DMC11'S TO BE TESTEO?l
01

CSR ADDRESS1160010
VECTOR ADDRESS?310

BR PRIORITY LEVEL? (4,5,6,7)?5
DOES MICRO-PROCESSOP HAVE CRAM? (Y OR N)N
WHICH LINE UNIT? IF NONE TYPE "N", IF M9201
M8202 TYPE W2"?1
IS THE LOOP SACK CONNECTOR ONlY
SWITCH PAC'! (DDCMP LINE.)?377
SWITCH PAC'2 (BMS7l BOOT ADO)?377

TYPE

"1",

Following the questions the status map Is printed out as
deScribed ~bove, the information 1n the map reflects the
answers to the questions, If the dlagnost1c was started with
swOO=O and SW07=0 (AUTO-SIZING) then no questionS are aSked
and only the status-map Is pr1nted out.
It AUTO-SIZING Is
used the ~tatus information must be verif1ed to be correct
(match tne hardware). If It does not maten the hardware the
dlaqnostlc must be restarted w1th SWOO=l and the questions
answered.

PAGEl

0004

Page '5
4.1

CONTROL

S~ITCH

sw 15 Seta

SW 14 Setr
SW , 3 Seta
SW 12 Set.
SW t 1 Setr
SW 10 set.
sw 09 set.
sw 08 set.
sw 07 setl
SW 06 Setl
SW 05 set.

SW 04 Set.

SW 03 Seta
SW 02 Set.
sw 01 setl
SW 00 Setl

SETTINGS

Halt on error
LooP on current test
Inh1bit error pr1nt out
Inh1bit type out/abell on error.
InhIb1t Iterations. (quick pass)
Escape to next test ori error
LooP with current data
Catch error and loop on 1t
Use previous statuI table.
clockinq
ROMCLK
routine
before
Halt in
micro·processor
Reserved
Reserved
Reselect DMC11's desired active
Loc~ on selected test
Restart program at selected test
Build new status table from questions. (If SW07=0
and SWOO=O fa new :status table is built by
auto-sizin;)

Switch 06 and 08-15 are dynamiC and can be chanqed as needed
while the diagnostic 1. runnln;. SwitChes 00-03 and switch 07
are static, and are used onlY on startinq or restartlnQ the
dlaqnostic,

PAGI::I

0005

·"

SWITCH REGISTEP OPTIONS Cat start up)
Sw 01

ReSTART PROGRAM AT SELECTED TEST,
It Is strongly
suggested that at least one pass has been made before
trying to seleet a test, the reason being 1s that the
program has to clear areas and set up parameters.
When this s~itch Is used the diagnostic wIll ask T~5T
NO.1
Answer bY typing the number of the test desired
and carrlge return to begin execution at the selected
tesl:,

SW 02

LOCK ON SELECTED TEST. This sWItCh When used with
SWot wIll cause the prOgram to constantly loop on the
selected teat, Hitting any key on the console Will
let it advance to the next test and loop until a key
1s hit agaln. If SW02=0 when SWOl Is used,
The
proqram w111 begin at the selected test and continue
normal operations.

SW 03

RES!LECT DMC11#S DESIRED ACTIV~. Please note that a
Is typed out for setting the switch reg1ster
eQual to OMC11#S active, this means if the system has
four OMells,
bIts 00,01,02,03 w1ll be set In loc
·DMACTV· from the SWitch register.
Uslno
this
5wltch(SWOO) alters that locatIon,therefore If four
OMClla are in the system ***00 NOT*** set swltch&
oreater than SW 0] In the up position. th1s WoUld be
a fatal error. do not select more active OMells than
there Is information on In th~ status table.

mes~age

METHODI AI
Ba
CI
01

EI
FI

Load address 200
start with SW 00=1
ProQram will type message
set "a switch for each OMC deSired 8ctlve.
EXAMPLE. If you have 4 DMC·s but only want to
run the first and the last set SWR bits 0 and
3 • 1, PRESS CONTINUE
Number (IF VALID) wl1l be in data l1ghts
Cexcludlnq 11/05)
set wlth any other sw1tch settlnqs desIred,
PRESS CONTINUE,

A:a

0006

Paqe 1
4,1,3

DYNAMIC SWITCHES
E~ROR

SWITCHES

SW 12

Sil
SW
SW
SW

3,
4.
5.

13
15
08
10

Delete print out/bell on error,
Delete error printout,
Halt on the error,
Goto beginning of the test(on error),
Goto next test(on error),

SCOpE SwITCHES

4,2

SW06

SW09

3,
4,

SWll
SW14

Halt

routine
before
clocklnq
instruction,
This allows the
operator to scope a micro-processor instruction in
the static state before it 11 clocked,
Hit
continue to resume running,
(If enabled by 'SCOPI-) on an error, If an '*- is
prInted in front of tha test no, (ex, *T£ST NO,
10 )
SW09 i. Incorp,rated in that test and
therefore SW09 is usually the best sWitch for the
scope loop (SWI4-0, SWlj=O, SW09=1, SW08=O),
If
SW09 1. not enabeled, and there is a HAPD error
(constant), SWOB 1s oest,
(SW14.1,0,
SW10=0,
SWQ9=0, SW08-i), for Intermittemt errors, SW14=1
will lOOP on test requardless of error or not
error, (SW14=1, SWtO=O, SW09=0, SWOB=l,O)
InhibIt interation.,
Loop on current test,
ROMCLK

~icio-~roceslor

STARTING ADDRESS
startIng address 1s at 000200 there
addresses for the OMCll diagnostics.
NOTEI

are no other starting
(See Sectton 4.0)

If address 000042 1s non-zero the program assumes it
Is
under
ACTt1
or XXDP control and will act
accordingly atter all avallable OMC11's are tested the
program will return to 'XXDP' or 'ACT-11',

OPERATING PROCEDURE
When proQram 1s initially

sect10n 4,0 w1ll
the diagnostlc

started~essages
as described ln
be printed, and program will begIn running

PAGE I

0007

e e
5.2

PPOGRAM AND/OR OPERATOR ACTION

The typical approach shoUld be
1.

2.
3.

~alt on error (via sw 15=1) when ever an error occurs.
Clear SW 15.
Set SW 141 (looP on this test)
Set SW 13. (inhibit error print out)

The TEST NUMBER and PC will be typed out and possiblly an
error mes~aqe (this depends on the test) to give the operator
an idea as to the source of the problem. If it Is necessary
to ~now more information concerning the error report, LOOK IN
THE LISTING for that TEST NUMBER Which was typed out and then
NOTE THE PC of thE ERROR REPORT this way the EXACT FUNCTION of
the test CAN BE DETERMINED.
6.

ERRORS
As described previouSly there Will always be a TEST NUMBER and
PC typed o~t at the t1me of an error (providing SW 13=0 and SW
12:0). In most cales add1tional information will be supplied
.In the the error message to 91ve the operator an indication Of
the error.

6.2

EPROR RECOVERY

If for Some reason the DMCl1 Should 'HANG THE BUS' (gain
control of bUS so that console manual functlons are inhibited)
an inlt or power down/up il necessary for operator to rega1n
control of cpu.
If this ShoUld happen, look In location
~TSTNO' (address 1226)for the number
ot the test that was
runn1ng at the time of the catastroPhic error. In this way
the operater will have an idea as to what the DMCl1 was doinq
at the time of the error.

RESTRICTIO~S

7.1

STApTING RESTRICTIONS
See section 4. (PLEASE)
Status table should be verified reguardless of how program was
started.
Also It 1s important to use this listing along with
the information printed on the TTY to completly isolate
problems.

Page q
7,2

OPERATING RESTRICTIONS
first time a DMC11 diagnostic 1& loaded into core and run
the STATUS TABLE must be set uP. This Is done by manual input
(S NOO=1) or by autosizing
(SWOO=O and SW07=0).
Thereafter
however the status table need not be setup by ~ubsequent
restarts or even loading the next DMC dlagno5tlc because the
5T~TUS
TABLE is overlayed.
The current parameters In the
STATUS TABLE are used when SW07=1 on start up,
T~e

1,3

HARDWARE CONFIGURATION RESTRICTIONS
D~Ctl(M8200)· Jumper W1 must be In, and swItch 7 Of
be In the OFF pOlitlon.

E76

must

KMC(M8204>- Jumper W1 must be In.
LINE UNIT(MB201)- Ju~perl W1, W2, and W4 must be IN.
Jumpers
WJ, and WS must be. OUT.
SW8 of E26 must De In the ON
Posltton.
LINE UNIT (MB202)- Jumper W1 must be In.
1~ the OFF pOSition.
8,

MISCELLANEOUS

8.1

EXECUTION TIME

SW8 of E26

must

Atl DMC11 device diagnostics w1ll qlve an ·END PASS· message
(providing no errors and 5w12=0) with1n 4 mins, This Is
assuming SW11=1 (DELETE ITERATIONS) 1s set to g1ve the fa~test
possible execution. The actual execut10n time depends greatly
on the PDP11 CPU confIguration and the amount of memory in the
svstem.
8,2

PASS COMPLETE
NOTFI EVgpy time the proqram 1s started, the tests will run
as 1f SW11 (delete· iterations) was up (=1). Th!S 1s to
'VE~IFY NO HARD ERRORS' as loon as
possible.
Therefore the
first pass -EACH TIME PROGRAM IS STARTED- W1ll be 8 ·QUICK
When the
PASS· until all DMC11'1 in system are tested.
diaqnost1c has completed a pass the follow1ng 1s an example of
the print out to be expected.
E~D

PASS

DZD~C

CSRI

175000 VEC.

0300 PASSES.

000001

ERRORS.

000000

NOTE:

The pass count and error counts are cummul1tlve for
each DMC11 that 11 runnloQ, and are set to zero only
When the dlaQnostlc 1s started.
Theretore after an
ov.ernlqht run for example, the total passes and errors
for each DMC11 Since the dlaQnostlc was started are
reflected In PASSES. and ERRORSz.

PAGE.

0009

8.4

K~Y

LOCAT)ONS

RE'TURN (1214)

contains the address where program w1ll return
when iteration count 1s reached or 1t loop on
test Is asserted.

(1216)

ContaIns the address of the next
peformed.

TSTNO

(t 226)

Contains the number
peformed.

RUN

C1 3 'll6)

The bit In
currentlY

test

now

be1ng

to the
EXAMPLE,
1302/0000000001000000 Means that DMCll
1s the OHCll now runn1ng,

DMC11

·RUN~

being

'of

the

test

always pOints
teste~,

(RUN)

no.06

D"'1CROO·OMCJH 7
D~1STOO-DMS~I~17

( 1 5 0 0 ) • ( 1 6 ~II 0 )

These locations contain the 1nformation needed
to test up to 16 (decimal) DMClls sequentialy,
they contain the
CSP,VECTOR
and
STATUS
concerning the confIguration Of eacn DMCII,

8,4A

DMACTV (13CI6)

Each bit set 1n thiS location indicates that
the associated OMC11 will be tested 1n turn.
EXAMPLE, (DMACTV) 1276/0000000000011111 means
that DMC11 nO, 00,01,02,03,04 w1ll be tested,
EXAMPLE. (DMACTV) 1276/0000000000010001 Means
that DMC11 no, 00,04 will be tested,

DMCSR

Contains the CSR of the
test,

(1402)

current

DMCll

under

·STATUS TABLE· (1500-1640)

The table Is filled by AUTO SIZING or by the manual parameter
input (questions) as described previouslY. Also it desired by
user, the locations may be altered by hand (toggled 1n) to
su1t the specific Configuration,
The example status map shown beloW contains information ,tor
two DMC11~S.
the table can contain UP to 16 D~Cl1·S.
FollOwing the map 1s a descriptIon of the bits for each map
entrY

or
STATUS
.........•.•....
-..
~AP

CSR

D~Cl1

STAT2
STATl
......
.... -.
145310 177177

001500 160010
0015!0 160020 016320

000000

STAT)
000000
000000

AGE:

001.0

Page 11
EaCh map entry contains 4 words which contain the status
information for 1 DMC11. The PC shows wher~ In core memory
the first of the 4 words Is, In the example above the first
DMC'S statuI Is In locations, 1500, 1502, 1504, and 1506, The
second DMC status Is located at 1510, 151?, 1514, and 1516,
The information contained In each 4 word entry is defined as
folloWSI

CSRI

ContaIns DMCII CSR address

STAT1.

BITS 00-08 IS DMC11 VECTOR ADDRFSS
BIT1S-1 MICRO-PROCESSOR HAS CRAM
81T15=0 MICPO-PROCESSOR HAS CROM
8IT14=1 TURNAROUND CONNECTOR IS O~
BIT14=0 NO TURNAROUND CONNECTOR
BIT13=0 LINE UNIT IS AN M8201
BIT13=1 LINE UNIT IS AN M8202
81T12=1 NO LINE UNIT
BITS 09-11 IS DMC11 BR PRIORITY LEVEL

STAT21

LOW BYTE IS SWITCH pACtl (DDCMP LINE NUMBER)
HIGH BYTE IS SWITCH PAC#2 (SMa73 BOOT ADD)

STAT3.

BITO:1 RUN FREE RUNNING TESTS ON KMCII
81T1=0 DMC11-AR (LOW SPEED)
81Tl=1 DMCI1-AL (HIGH SPEED)

PAGEl

0011

Pa~C'

8.5

METHOD OF AUTO SIZING

8 • 5 .1

FI~DING

THE CONTROL STATUS REGISTER.

The auto-sizing routine findS a DMCl1 as follows:
It starts
at address 160000 and tests all address in 1ncrements Of 10 up
to and includ1ng address 167760, If the address does not time
out , the t j).ll 0" 1 n q 11 done, the f 1 r i t CROM address Is wr 1 t 1: en
to a 125252 then it 11 read baCk. If it conta1ns a -1 or
125252 or 626 or 16520 a DMC11 nas been found, 1f not, the
address 1s updated by 10 and the search continues,
A-I
indicates a DMC11 with no CROM or CRAM, a 125252 Indicates a
KMCtl with CRAM, a 626 Indicates a DMCI1-AL and a 16520
Indicates a DMCI1-AR.
Further tests are performed at this
point to determ1ne Which line Unit, 1f any, is 1nstalled, if a
loop-back connector i' Installed and various switch settings
on the l1ne unit. THIS IS WHY THE STATUS TABLE MUST BE
VERIFIED BY THE USER AND IF ANY OF THE INFOR~ATION DOES NOT
AGREE WITH THE HARDWARE THE DIAGNOSTIC ~UST BE RESTARTED A~D
THE QUESTIONS MUST BE ANSWERED. All DMC11's In the system
w111 be found by the auto-sizer. If it doel not f1nd a D~Cl1
the dlaqnostlc mUlt be restarted and the Questions answered.
8.5.2

FINOING THE VECTOR AND BR LEVEL
The vector area Caddr.ls 300-776) 15 f1lled
with
the
instruction lOT and ',+2· (next address).
The processor
status Is started at 7 and the DMC Is proqrammed to Interrupt,
The PS 1. lowered bY"! unt1l the DMC 1nt~rrupts, a delay Is
. made and If no Interupt occures at PS level 3 (because of a
bad OMC11) th~ program assumes vector address 300 at 8R level
5 end the problem should be fixed In the dla9nostlc~ Once ~ne"
prOblem Is fixed, the proqram should be re-setup again to Qet
correct veetor. If an Interupt occured, the address to WhiCh
the DMC11 inter up ted to 1s piCked up and reported as the
vector. NOTE. 1f the vector reported Is not the vector set
UP by you~ there 1. a problem and AUTO SIZING Should not be
done.

9.6

SOFTWARE SWITCH REGISTER
If the diagnostic is run on an 11/04 or other CPU without a
switCh regSster then a SOftware SwitCh register is used to
allow user the lame IwltCh oPt10ns as described previously.
If the hardware Iwltch reOister does not exist or If one does
and it contains all ones (177777) this software switCh
reQlster Is used.
Controll
To obtain contrOl at any allowable time durino execution of
the dlag"oltlc the operator types a CTPL G on the console
terminal keyboard. As soon as the CTRL G Is recognized, by
the diagnostic, the followin9 message will be displayed.

re-"GEa

0012

Page 13

SWF=XXXXXX NEW?

Where XXXXXX Is the current contents of the software switch
reQ1ster in octal.
The software control routine will t~en
a wa1t operator act10n. At which time the operator 1S required
to type one or more ot the legal characters. 1) 0 - 7, 2)
ltne feed«LF», 3) carriage return«CR», or 4) control-U
(CTPL U) • . No check 1s made tor legality. If the input
character is not a <LF>, <CR>, or CTRL U it 15 assumed to be
an octal dlqit.
To chan~e tne contents of the SSR the operator Simply types
the new deSired value 1n octal - leading zeros need not be
tYPed, And terminates the input str1ng w1th a <CR> or <LF>
depend1ng on the program action des1red as described below.
The input value will be truncated to the last 6 digits typed.
At least one dIgit must be typed on any given input string
prior to the terml~ator before a Change to the SSR will occur.
When the inout str1ng 11 terminated with a <CR> the diagnost1c
will continue ex.cutlon from the pOint at Which it was
Interru~ted.
I f . <CR> 15 the only th1ng typed the program
will continue without ehanginq the SSR, The <LF> d1ffers trom
the <CR> by restartln9 the proqram as if it were restarted at
address 200.
If a CTRL U 15 typed at any pOint In the .Input string prior to
the terminator the Input value will be disregarded and the
prompt displayed CSWR • XXXXXX NEW?).
To set the SSR for the starting switches, first load
dtaqnoltle, then hit CTRL G, then start the diaqnostlc.

the

PAGE:

001)

DZDME

DECODe ViR

LST

DOCUMENT

**************
DZOME LST
**************

0 •• J4

PAG~;

... ,,}:;I

0014

DZD~~E

LST

DECOOC VER
6

MAINDEC-11-DZDMg-8
DMC11 DDCMP LINE U~IT TESTS
COPYRIGHT 1976, DIGITAL EQUIPMENT CORP., MAYNAPD, MASS. 01754

-......

1667

00,04

-.-.---... .... -- ...-..-..----.....-.- ...--.--- ._ .. ----------.
~

******************~******* TEST 1

***************************

OUT CONTROL REGISTER READ/ONLY TEST
DO A MASTER CLEAR, VERIFY THAT ALL READ/ONLY
BITS ARE IN THE COPRECT STATE

1691

******************t******* TEST 2 ***************************

1714

************************** TEST 3 ***************************

IN CONTROL REG1STEf READ/ONLY TEST
DO A MASTER CLEAR, VERIFY THAT ALL READ/ONLY
BITS ARE IN THE COFRECT STATE

MODEM CONTROL REGISTER READ/ONLY TEST
00 A MASTER CLEAR, VERIFY THAT ALL READ/ONLY
BITS ARE IN' THE COFRECT STATE

1738

************************** TEST 4 ***************************

1769

************************** TEST 5 ***************************

MAINTENANCE REGISTER READ/ONLY TEST
DO A MASTER CLEAR, VERIFY THAT ALL READ/ONLY
BITS ARE IN THE CORRECT STATE

LINE UNIT REGISTER WRITE/READ TEST
SET aIT5 IN LU REGISTER 12, VERIFY IT IS SET
CLEAR BITS IN LU REGISTER 12, 'VERIFY IT IS CLEAR

1811

*******************»****** TEST 6 ***************************

1953

************************** TEST 7 ***************************

1911

************************** TEST 10 ***************************

1963

*******************+****** TEST 11 ***************************

LINE UNIT REGISTER ~RITE/READ TEST
SET BITI IN LU REGISTER 17, VERIFY IT IS SET
CLEAR BITl IN LU REGISTER 17, VERIFY IT IS CLEAR
LINE UNIT REGISTER NRITE/READ TEST
FLOAT A 1 THROUGH LINE UNIT REGISTER 13
FLOAT A 0 THROUGH L[NE UNIT REGIStER 13

LINE UNIT REGISTER NRITE/READ TEST
FLOAT A 1 THROUGH L[NE UNIT REGISTER 14
FLOAT A 0 THROUGH L[NE UNIT REGISTER 14
SWITCH PAC TEST
THIS TEST READS SWITCH PAC#l

THIS SWITCH PAC CONTA1NS THE DDCMP LINE #

l1-JUL-77 11:53

PAG~

PAGEl

00l~

OZOME

DECD(IC Vt;R r
1.985

************************** TEST 12 ***************************
SWITCH PAC rEST
THIS TEST READS SWITCH PAC.2
THIS SWITCH PAC CONTAINS THE SM873 BOOT ADD

20107

************************** TEST 13 ***********************.****
LINE UNIT CLOCK TEST
THIS TEST VERIFYS TH~T THE LU INTERNAL CLOCK
(BIT 1 IN LU-17) IS WORKING
************************** TEST 14 *************.**************
OUT DATA SILO TEST
SET SOM ANO LOAD OUT DATA SILO
VERIFY THAT OCOR SET, INDICATING THAT THE
CHA~ACTER IS AT THE BOTTOM OF THE OUT SILO

2073

************************** TEST 15 ***************************
DDCMP TEST of RTS AND OUT ACTIVE
SET SOM AND LOAD OUT DATA SILO
SINGLE STEP 2 DATA CLOCKS, VE~IFY
THAT RTS AND ACTIVE A~E SET

21:1.7

************************** TEST 16 ***************************

21 ~"4

************************** TEST 17 *******_.*******************

22~!5

TEST OF OUT CLEAR
SET SOM AND LOAD OUT DATA SILO
SING~E STEP DATA CLOCK, SET OUT CLEAR
VERIFY THAT OCOR, RTS, AND ACTIVE ARE CLEARE:D

DDCMP TRANSMITTER TEST
SINGLE CLOCK THE CHARACTER 0
VERIFY EACH BIT POSITION AS IT
PASSES THE BIT WINDOW (SI BIT)
OHAN ERROR, 1:U CONTAINS 8ITPOSITION OF f'AILURE

********************'****** TEST 20 *************.,.*********.,***
DOCMP TRANSMITTE~ TEST
SINGLE CLOCK THE CHARACTER 125
VERIFY EACH 8IT POSITION AS IT
PASSES THE aIT WINDOW (SI BIT)
ON AN ERROR, R3CONTAINS BIT POSITION OF FAILURE

22;'6

************************** TEST 21 ***************************
OOCMP TRANSMITTER TEST
SINGLE CLOCK THE CHARACTER ~52

VERIFY EACH BIT POSITION AS IT
PASSES THE BIT WINDOW (51 BIT)
ON AN ERROR, R3 CONTAI~S AIT POSITION OF FAILURE

11-JUL-77 11:53

PAGE 03

.GEI

0016

DZOME

LST

DECDoe VER
2327

00.04

************************** TEST 22 ***************************
OOCMP TRA~SMITTER lEST
SINGLE CLOCK THE CfARACTER 377
VERIFY EACH BIT POSITION AS IT
PASSES THE BIT WINDOW (51 BIT)
ON AN ERROR, R3 CONTAINS 81T POSITION or FAILURE

2378

************************** TEST 23 ***************************

DDCMP TRANSMITTER TEST
SINGLE CLOCK A BINARY COUNT PATTERN
VERIFY EACH BIT POSITION AS IT
PASSES THE BIT WINDOw (51 BIT)
ON AN ERROR, R3 CONTAINS 8IT POSITION OF FAILURE
AND RS CONTAINS THE CHAPACTER THAT rAILED
2439

************************** TEST 24 ***************************
OOCMP STRIP SYNC TEST
SET LU LOOP, SINGLE STEP 5 SYNCS,
VERIFY THAT IN ACTI~E DOES NOT SET

2467

************************** TEST 25 ***************************
ODCMP IN ACTIVE TEST
SET LU LOOP, SINGLE STEP 5 SYNCS AND A NON-SYNC (301)
VERIFY THAt IN ACTIVE IS SET

2495

************************** TEST 26 ***************************
OOCMP IN ACTIVE TEST
SET LU LOOP, SINGLE STEP 1 SYNC AND A NON-SYNC (301)
VERIFY THAT IN ACTIVE ODES NOT SET

2523

************************** TEST 27 ***************************
OOCMP IN ACTIVE TEST
SET LU LOOP, SINGLE STEP 2 SYNCS AND A NON-SYNC (301)
VEPIFY THAT IN ACTIVE IS SET

2551

*******************-****** TEST 30 ***************************
IN CLEAR TEST
SYNC UP RECEIVER AND TRANSMIT A CHARACTER
WAIT FOR IN ROY, TH€N SET IN CLEAR
VERIFY THAT IN ACTIVE AND IN ROY ARE CLEAR~O

2600

*******************-****** TEST 31 ***************************
ODCMP BASIC RECEICER TEST
SYNC UP RECEIVER AN) SINGLE CLOCK THE C~ARACTER 0
VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTEP w~s RECEIVED

2637

************************** TEST 32 ***************************
OOCMP BASIC RECEICE~ TEST
SYNC UP RECEIVER AN) SINGLE CLOCK THE CHAPACTE~ 125
VERIFY THAT IN ROY IS SET, AND THAT THE CHARACTER wAS RECEIVED

11-.JUL-77 11.53

PAGE 04

PAGEl

0017

OZD~1E

LB.

DEC Doe VEP
2674

uO.04

************************** TEST 33 ***************************
DDCMP BASIC RECEICEF TEST
SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 252
VERIFY THAT IN ROY IS SgT, AND THAT THE CHARACTER WAS

RECEIV~D

2711

************************** TEST 34 ***************************
DDCMP BASIC RECEICER TEST
SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 377
VERIFY THAT IN ROY IS SET, AND THAT THE CHARACTER WAS REC~lVEO

27·48

************************** TEST 35 ***************************

2787

283'

DDCMP DATA TEST
THIS TEST SINGt.E STEPS A BINARY COUNT PATTI':;RN
CHECKINC EACH CHAFACTER AS IT IS RECEIVED

************************** TEST 36 ***************************

DDCMP DATA TEST
THIS TEST SINGLE STEPS A BINARY COUNT PATTERN
CHECKING EACH CHARACTER AS IT IS RECEIVED
THIS TEST IS EXACTLY THE SAME AS THE LAST TEST,
EXCEPT LINE UNIT LOOP IS SET IN LU REGISTER 12

************************** TEST 37 ***********************~***

TRANSMITTER MARK TEST
CLOCK 3 SYNCS AND A 301 AND 20 EXTRA
CLOCK TICKS, VERIFY THAT A 301, A 377 AND A 371
WERE RECEIVED INDICATING THAT THE TRANSMITTER WENT
TO A MARK STATE FOR 16 BITS WHEN OUT SILO WAS E~PTY
SI~GLE

2876

************************** TEST 40 ***************************
CABLE TURNAROUND TEST
CLEAR LINE UNIT LOOP, SET OTR
VERIFY THAT MODEM READY IS SET
CLEAR DTR, VERIFY THAT MRDY IS CLEARED

2924

************************** TEST 41 ***************************
CABLE TURNAROUND- TEST
CLEAR LINE UNlT LOOP, LOAD OUT DATA SILO
VERIFY THAT ALL MODEM SIGNALS ARE SET

2967

************************** TEST 42 ***************************

3042

************************** TEST 43 ***************************

TEST OF CRC OPERATION
USING THE CRC16 POLYNOMIAL, SINGLE CLOCK THE CHARACTER
0, VERIFY THE LSB OF THE Bce ON EACH SHIFT
TEST TRANSMITTER FIRST THEN THE RECEIVER acc
TEST OF CRC OPERATION
USING THE CRC16 pOLYNOMIAL, SJNGLE CLOCK THE CHAPACTER
377, VERIFY THE LSB OF THE BCC ON EACH SHIFT
TEST TRANSMITTER FIRST THEN THE RECEIVER Bec

l1-JUL-77 11:53

PAGE 05

PAGEl

0018

DZOt-1E

l,ST

DEcoDe VEP
3117

******************fl******* TEST 44 ***************************
TEST

] 119

00.04

USING

OF CRC OPERAT:ON

THE CRC16 POJIYNOMIAll,

SINGLE CLOCK THE CHARACTEP

125, VERIFY THE LSI. OF TBE Bce ON EACH SH U'T

TEST TRANSMITTER FIRST THEN THE RECEIVER
3192

~CC

******************t,******* TEST 45 ***************************
TEST OF CRC OPERATynN
USING THE CRC16 POLYNOMIAL, SINGLE CLOCK THE ChA~ACTER
252, VERIFY THE LSB OF THE BCC ON EACH SHIFT
TEST TRANSMITTER FIRST THEN THE REC~IVER BCC

3267

******************.'******* TEST 4~ ***************************

TRANSMITTgR CRC TE~T
USING THE CRC16 POLYNOMINAL, SINGLE CLOCK A BINARY
COUNT PATTERN, VERIF~ THE LSB OF THE TRANSMITTER BCC ON EACH SHIFT
3]33

******************-******* TEST 47 ***************************

RECEIVER CRC TEST
USING THE CRC16 POLYNOMINAL, SINGLE CLOCK A BI~ARY
COUNT PATTERN, VERIFY THF LSB OF THE RECEIVER BCC ON EACH SHIFT
33q9

************************** TEST 50 ************~***~**********

TRANSMITTER DDCMP CPC lEST
THIS TEST TRANSMITS A FOUP CHARACTEP MESSAGE WITH CRC
BOTH DATA AND THE FCC APE VERIFIED IN THE BIT
WINDOW. THE FOUR C~ARACTERS ARE 0,125,252,377
THE TRANSMITTER IS CHECK~D FOR GOING TO A MARK STATE AFTER THE BCC
3500

**********************~*** TEST 51 ***************************
RECEIVER DDCMp CRC TEST
THIS TEST CLOCKS A FOUR CHARACTER MESSAGE WITH Bec
AND VERIFYS CORREC1 DATA RECEPTION AND BCC MATCH
THE FOUR CHARACTER MESSAGF IS 0,125,252,377

3557

*********************.**** TEST 52 ***************************
DDCMP EOM FUNCTION TEST
THIS TEST LOADS OUI SILO WITH, 2 SyNCS,4 CHAR MESSAGE,EO~
4 CHARACTER MESS,EOM. THE DATA STREAM IS CHECKEO TO BE
4 CHAR,BCC,4 CHAR,ECC,MARKS. THIS TEST VERIFYS THAT
THE CHARCTERS LOADED WITH EOM SET ARE LOST
ALL DATA AND BCC·S ARE CHECKED IN THE BIT WINDOW
THE FOUR CHARACTER MESSAGE IS 0,125,252,377
RECEIVED DATA IS VERIFIED, AND IN BCC MATCH IS CHECKED

3803

************************** TEST 53 ***************************
DOCMP EOM FUNCTION TEST
THIS TEST LOADS OUt SILO WITH, 2 SYNCS,4 CHAR MESSAGE,EOM
SOM,4 CHAR MESS,EOM. THE DATA STREAM IS CHECKED TO BE
4 CHAR,BCC,4 CHAR,ECC,MARKS. THIS TEST VE~IFYS THAT
THE CHARCtERS LOADED WITH EOM SET ARE LOST
~LSO THAT THE CHAP LOADED WITH SOM IS NOT IN ThE BCC
ALL OATA AND BCC'S APE CHECKED IN THE BIT WINDO~

PAG~

PAGEl

0019

DZDME

LST

D~CDOC

V~R

OU,U4

THE fOUR CHARACTER MESSAGE IS 0,125,252,377
PECEIVED DATA IS VERIFIED, AND IN Bec MATCH IS ClU~CKED
4081

************************** TEST 54 ***************************
EMPT~

SILO TEST

LOAD SILO WITH 2 SYNCS, 4 CHAR MESSAGE, SINGLE CLOCK
UNTIL THE SILO IS EMPTY, LQAD 4 MORE CHARACTERS IN TH~
SILO, GIVE MORE TICKS, AND VERIFY THAT ONLY THE FIRST
4 CHARACTER ~ESSAGE WAS RECEXVED AND THAT RTS IS CLEAR
4146

************************** TEST 55 **************~*.**********

HALF DUPLEX TEST
SET LINE UNIT LOOP AND HALF DUPLEX, SEND SYNCS A~D A
MESSAGE, VERIFY THAT IN-ACTIVE AN~ IN-MEADY ARE CLEAR

4181

************************** TEST 56 ***************************

4183

THIS TEST LOADS OUT SILO WITH THE FOLLOWING.
4 SYNCS,16 CHAR,EOM,16 CHAR,EOM,16 CHAR,EOM
THE 16 CHARACTERS INCLUDE A FLOATING ONE AND ZEPO
THE DATA IS TRANSMITTED OVER THE CABLE USING THE I~TERN~L CLOCK
RECEIVED DATA IS VERIFIED AS IS IN BCC MATCH
LOOP-BACK CONNECTOR MUST BE ON TO RUN THIS TEST

4276

************************** TEST 57 ***************************

DDCMP CABLE DATA TEST

DOCMP CABLE DATA TEST
\
THIS TEST LOADS OUT SILO WITH THE FOLLOWING.
4 SYNCS,59 DATA CHARACTERS,EOM WITH GAFBAGE CHARACTER
THE DATA IS TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK
RECEIVED DATA IS VERIFIED AS IS IN BCC MATCH
LOOP-BACK CONNECTOR MUST BE ON TO RUN THIS TEST

I1-JUL-77 11:53

PAGE 07

PAGEg

0020

DZDr.'E
MACY11 31'(1046)
ll-JUL-77
OZOf.4E. Pl1
12-MJll'-77 i 41 i 8

11140 PAGE 2
INTROOUCT r ON TO DMC11 OIAGN05CTIC

PAGEl

0021

..--_..--.....-_.....................................................

,*MAINDEC.l1-0ZDME-B
DMC1l DDCMP LINE UNIT TESTS
,*COPYRIGHT 1976, DIGITAL EQUIPMENT CORP"
~AYNARD, MASS. 01754

,STARTING PROCEDURE
,LOAD PROGRAM
, LOAD ADDRESS 000200

11
12
\3
14
15
16
17
19
19
20
21
22
23
24
25
2'>
27
28
29
30
31
32

33
34
35
36

37
38
39
40
41
42
43
44
45

,SWR;O

AUTCSIZE OMC11

,SW07=1
USE CURRENT OMC11 PARAMETERS
,SWOO-1
INPUT NEW DHCll PARAMETERS
,PRESS START
,PROGRAM WILL TYPE "MAINCEC-ll·DZDME-B
DNC11 DOCNP LINE UNIT TE~~S"
,PROGRAM WILL TYPE STATUS MAP
,PROGRAM WILL TYPE "R" TO INDICATE THAT TESTING HAS STARTED
,AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE
,AND THEN RESUME TESTING
,SUBSEQUENT RESTARTS WILL NOT TYPE PROGRAM TITLE

,_._.-.................,SWITCH REGISTER OPTIONS

,81,HALT ON ERROR

100000
!l40000
020000
010000
004000
002000
001000
000400
000200
000100
000040
000020
nOOO10
000004
000002
000001

OZDMf.:
MACYll 30(046)
U·JUL·n
DZOMe:.Pll
12-MAY-77 14118

;=1,LCOP ON CURRENT TEST
,81,INHIBIT ERROR TYPEOUT
,81,DELoETE TYPEOUT/BELL ON ERROR.
,81,INHIBIT ITERATIONS
,81, ESCAPE TO NEXT TEST ON ERROR
,8i,LOOP WITH CURRENT DATA
,81,LOOP ~N ERROR
",_l,USE CURRENT DMCII PARAMETERS, 80,AUTOSIZE CMC11
HALT BErORE CLOCKING MICRO·PROCESSOR INSTRUCTION

SW13820000
SW12810000
SW11-4000
SW10-2000
SW09-l000
SWOe8400
SW07a200
SW068100
SWOS840
SW04820
SWO!!!10
SW0284
SW0182
SW0081

UhO

,-1,

:RESE!:!!:CT D!<!CU'S TO !IE TESTED (ACTIVE,
,LOCK ON TEST StLECT
-,RESTART PROGRAM AT SELECTED TEST
,INPUT DHC11 PARAMETERS

FAGEI

FAGE 3

GENERAL OtrINATIONS AND EQUIVALENCIES

-16

47
49

,--.... _...........-.
J REGISTER D!:f%!UT!ONS

50
51
52
53
54
S5
56
57
58

000000
000001
000002
000003
000004
OOOOOS
000006
000007

59
bO
61
62
63
64
65

177776
001200

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

94
95

000002
000001

e4
85
96
87

88
89
90
91

96
97

PUSHUP85746
POP18P-S726
PUSHRO-l0046
POPRO-12600
PUSH2SP-24646
POP2SP 8 22626
.EQUIV EMT,KLT

,,BIT
... _- DErINITIONS
.....••..•.

,PROCESSOR STATUS WORD
,START
PROCESSOR STACK

,........-..............
005746
005726
010046
012600
024646
022626

79
SO
81
82

PS817'1776
STACK-1200

,INSTRUCTION DEFINITIONS

74
75
76

1148'"
RS-'S
SPaU
PCa"

,GENERAL REGISTER
,GENERAL REGISTER
,GENERAL REGISTER
,GENERAL REGISTER
,GENERAL REGISTER
,GENERAL REGISTER
,PROCESSOR STACK POINTER
,PROGRAM COUNTER

EQUIVALENCIES
,,LOCUION
.........•..••.•......

68
69
70
71
72

R08'0
R18"
R28'2
Rl-U

8IT1S-l00000
BIT14840000
8IT13820000
BIT12-10000
8IT1184000
81'1'1082000
BIT981000
SIT88400
BIT78200
BIT6-100
BITSa40
BIT4820
BIU_l0

,DECREMENT PROCESSOR STACK
WORD
J INCREMENT PROCESSOR, STACK
WORD
,SAVE RO ON STACK
,RESTORE RO FROM STACK
,DECREMEN'! STACK TWICE
,INCREMENT STACK TWICE
,8ASIC DEFINITION OF ERROR CALL

0022

OZOf.'f
M~CYII 30(1046)
II·JUL-"
DZDMf.PII
12.",Ay.n 14119

11:40 P'G~ 4
THAPCATCHH. rop UI'EXPECTEO INH:PUPTS

PAtlEI

0023

PAGEl

0024

98
Q9

, 1* *.*.** ---.••••.
*****.*******.***
** ******-....••
*********
** .*****
*****.**
*.*** *****
J-.-•••••
-.•. ---.•.•.••.
-----••.
-.•.•.
----.-.-.••
--_. *

In!)

,TRAPCATCAER rop ILLEGAL I~TERHUPTS
,THE STANnARD "TRAP CATCHlR" IS PLACED
,BETWEEII ADDRESS 0 TO ADLJR.ESS 776.
,IT LOOKS LIKE "~C.2 HALT".

1(>1
\1'2

10)
11,4

,....................................................................

100;

,I **.********************.*******************************************.

I lib

\1)7
\lj8

.80
,STANDARD INTERRUPT VECTORS

000000

IIJ9

J --_ •••••••••••••••••• _ ••••

111)
ltl
112

123

000040
000042
000044
000046

124
125

000052

000024
005336
000340
004750
(100340
004716
000340
000040
000000
000000
000000
003522
000052
000000

000174
000176

000174
000000
000000

000200

000200
000137

002002

001000
001025

001000
005377
104

040515
041515

113
114

115
116
117
118

119
120
121

122

000024
000026
000030
001)032
000034
000036

.prAIL
340
.HLT
340
,TRPSIW
340

,POWER rAIL HANDLER
,SERVICE AT LEVEL 7
HANDLER
,SERVICE AT LEVEL 7
:GEIIERAL HANDLER DISPATCH SERVICE
:SERVICE AT LEVEL 7

o
o
o

,SAVE FOR ACT.l1 OR XXDP
,RETURN ADDRESS Ir UNDER ACT.l1 OR XXDP
,SAVE rOR ACT.l1 OR XXDP
,rOR USE WITH ACT.11 OR XXDP

I ERROR

$EIIDAD

,ACT-11 PROGRAM CHARACTERISTI~S

12&

121
128
129

130
131
132

.8174
DISPREGIO
SWREGr 0
JMP

,sorTWARE DISPLAY REGISTER
,SOFTWARE SWlTCH REGISTER
.START

,GO TO START OF PROGRAM

133
134

135
136
(2)
(2 )

047111
030461

.-1000
MTITLEI .ASCII
.ASCIZ

C377><12>/MAINDEC-11-DZDME-S/<377>
IDMCll DDCMP LINE UNIT TESTS/<377>

001200

137
t3El

POINTERS TO SWITCH REGIST!!:R AND LIGHT DISPLAY
,-,INDIRECT
...................................................
..

139
140

141

11\2
141

nOl20n
rl01202

177570
117570

DZDME
MACYll 30(1046) l1-JUL.77
DZDME.PII
12-~AY.77 14118
IH

1 40

15~

159
160
161
162
163
164
11>5
lb6

~-.-

001204
001206
rlOl210
001'212

177560
177562
177564
\ 77566

!'73

001214
001216
001220
001222
001224

001226
onl230
001232
001234

(l00000
000000
000000
000003
0')0000
000000
000(100
(100000
()OOOOO

(11)1260

001250
0[11256

179

(1111262

190
181

001264
001266
01)1270
001272
001274
rH)\2 76
001300
001302
001304
001306
00\310
r11)1312
001314
001316

196

187
t RS

IRq

190
191
192
193

,q4
19'5
1. 96

RETURN I
NEXTI
LOCKI
ICOUNTI
LPCNTI
TSTNOI
PASCNTI
ERRCIITI
LSTERRI

0
0
0
3
0
0
0
0
0

,SCOPE ADDRESS FOR LOOP 011 TEST
,ADDRESS OF NEXT TEST TO BE EXECUTED
,ADDRESS FOR LOCK ON CURRENT UATA
,NUMBER OF ITERATIONS THAT CURRENT TEST WILoL BE
,NUMBER OF ITEREATIONS CO~PLETED
,NUMBER or TEST IN PROGRESS
,NUMBE~ or PASSES COMPLETED
,TOTAL NUMBER OF ERRORS
,PC OF LAST EIlIlOR CALL

,........ -........ .

001236
001240
001242
001244
001,46
0012'12
001254

183

,TELETyPE KEYBOARD CONTROL REGISTER
,TELETYPE KEYBOARD DATA BUFFER
,TELEPRINTER CONTROL REGISTER
,TELEPRINTER DATA BUP'P"ER

,PROGRAM VAPIABLES

177
I 7~

184
IIl5

177560
117562
177564
177566

,-•...•...•.....•..........

174
175
176

192

TKCSRI
TKDARI
TPCSRI
TPDBRI

,PROGRAM CONTROL PARAMETERS

167

11'08
1b9
170
171
172

11140 PAGE!5
PROGRAM PARAMETERS, VARIABLES, AND TRAP CA~LS.
TO TELETYPE VECTORS AND REGISTERS
,,INDIRECT
---.-.--..POINTERS
-......................
-........... ....

14<;
147
148
149
15('1
151
152
153
\54
155
156
157

DISPLAy. 117570
SWRI
177570

001]20

001322

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000001

ooonoo

000001
000001
000001
000001
000000

STRTSW,
STATI
CLKXI
MASKXI
TEMPI 1
TEMP21
TEMP31
TEMP4.
TEMP51
SAVRO,
SAVRll
SAVR2,
SAVR31
SAVR41
SAVR51
SAVSPI
SAVPCI
ZERO,
ONEI
MEMLIMI
DMACTV,
DMIIUMI
SAVACTI
SAVNU,""
RUllI
.EVEN
CPEAl!1
!oIII"KI

o
o
o
o
o
o
o
o
o
o

o
o
o
o
o
o
1

,SWITCHES AT START or PROGRAM
,OM STATUS WORD STORAGE
,TEMPORARY STORAGE
,TEMPORARY STORAGE
,TEMPORARY STORAGE
,TEMPORARY STORAGE
,TEMPORARY STORAGE
,RO STORAGE
,Rl STORAGE
,R2 STORAGE
,R3 STORAGE
,114 STORAGE
,R!5 STORAGE
,STcACK POINTER STORAGE
,PROGRAM COUNTER STORAGE

.BLKW
.BLKW
.BLJ(W
.BLKW

,HIGHEST LOCATION FOR NPR"S
,DMCII"S SELECTED ACTIVE,
,OCTAL NUMBER OF DMCI1'S.
,ORIGINAL ACTV DEVICES
,OlORKABLE NUMBER
,POINTER TO RU~NING DEVICE.

DM.MAP-6
CNT,MAP-'

,TABt.! POINTER.
,TABLE POINTER

\'AGt: I

197

Oii25

....... _-- ............ .

IPHOGRAM CONTROL FLAGS

19~

;

19"
;>0('

2111

001 ]24

2(12

001 '2!\

203

OlJi3:i!E>

204
?05

001327

ouo
(100
(\00

000

Ir-IIP'LGI ,BYTE
ERKP'LGI ,BYTE
LOJl,FLG: ,BYT~
QV,P'LGI ,BYTE

~?ROGRAM
,~RPOR

I~ITIALIZATION

FLAG

OCCURED FLAG

sLOCK ON CURRENi iEST FLAG

:QUICK VERIFY FLAG,
,ON fIRST PASS or EACH DMeil

IT~RATIONS

WILL BE

,EVEN

]1/6

,}n1

,DEFINITIONS FUR T~AP SUBROUTINE CALLS
,POINTERS TO SUBROUTI~ES CAN BE FDUND
,IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS

208
2n9

210
211

,11********************************************************************
.............••.....................................................
.TRPTAB,

212

213
214

21 "

217

001330
001330

21e
219

01)1 )32

220
221
212

(1)\ 334

(11)1336

223

224

00 1340

!!l4405

,~"

104400
003576
104401
003736
104402
003766
104403
004050
104404
004154

242

O(l!1&1

004174
104406
004374
104407
004434
lrl4410
004466
104411
004472
104412
005466
104413
005436
104414
00!i';04
104415
0·)5552

213
241

001]64

104416
0056t6

001342

227

nil

001344

2'J.9

230
231
'-32

233
234
235
?Hi

001146

oat 150
001352
(IIJ1354

237
238

001356

239

240

Oll13bO

241

SCDPEaTRAP+O
,SCOPE
SCOPlaTRAP+l
.SCOPt
TYPEaTRAP+2
,TYPE
INSTR=TR~P.3

.INSTR
INSTERaTRAP+4
,INSTER
PARAMaTRAP+5
.PARAM
SAV05aTRAP+6
,SAV05
RES05~TRAP+7

,RES05
CONVRTaTRAP+l0
,CONVIIT
CNVRTaTRAP+l1
.CNVRT
MSTCLRaTRAP+12
,MSTCLR
DELAY-TRAP+13
.DELAY
ROMCLKaTRAP+14
.ROMCLK
DATACLKaTRAP+15
.DATACLK
TIMERaTRAP+16
,TIMER

,CAI"L TO SCOPE LOOP AND ITERATION

HAN~LER

,CALL TO LOOP ON CURRENT DATA HANDLER
:CALL TO TELETYPE OUTPUT ROUTINE
:CALL TO ASCII STRING INPUT ROUTINE
,CALL TO INPUT ERROR HANDLER
,CALL TO NUMERICAL DATlI INPUT ROUTINE
,ClILL TO REGISTgR SAVE ROUTINE
,CALL TO REGISTER RESTORE ROUTINE
,CALL TO DATA OUTPUT ROUTINE
,CALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF.
,CALL TO ISUE A MASTER CLEAR
,CALL to DELAY
,CALL TO CLOCK ROM ONCE
,CALL TO CLK DATA
,CALL TO OELA~ A CLOCK rICK

245

246

•....................................................................

247

,1********************************************************************

OZOM':
MACYll 30(1046) 11·JUL·"
OZDMl::,Pll
12·MAY-77 14118
248
249
?50
251
252
2'53
254
255

21)2
263

264
26<;

26&

267
26'3
269
270
27 t
272

01)1366
0(11370
1)1)1)72

(l00000
000000
000000

001374
00 t 376
001400
001402
001404
001406
001410
0'.11412
001414

000000
nooooo
000000
0001}00
000000
000000
000000
nooooo
000000

001416

000000
001460

.~=

2119
290
291
292
'93
2H
295
'296
297
298
299
300
301
302
303

,POINTER TO DMC11 RECEIVER INTERRUPT VECTOR
,POINTER TO DMCl1 RECEIVER INTERRUPT SERV ICE PS
,POINTER TO DMCll TRANSMITTER INTERRUPT VECTOR
,POINTER TO DMCl1 TRANSMITTER INTERRUPT SERVICE PS
,POINTER TO OMC11 CONTROL STATUS REGIST!:;R
,POINTER TO DMCll CONTROL STATUS R~GIST!:;R HIGH B'iTE,
,POINTER TO DMCl1 CONTOL OUT REGISTER
,POINTER TO DMC11 PORT REGISTER(SEL 4)
,POINTER TO DMCll PORT REGISTER(SEL 6)

TEMPI
,-,+40

001500

nOl500
001500
001502
(101504
001506

000001
000001
000001
000001

.-1'500
DM.MAPI
OMCROOI
OM51001
OMS2001
DMS3001

,BLKW
.BLKW
.BLKW
,BLKW

,CONTROL STATUS REGISTER FOR ~MC11 NUMBER 00
,VECTOR FOR DMC11 NUMBER 00
,DDCNP LINEt FOR DMC11 NUMBER 00
,3RD STATUS WORD

001510
001512
001514
001516

000001
000001
000001
000001

OMCMll
01451011
OMS2011
OMS3011

,BLKW
.BLKW
.BLK..,
.BLK..,

ICONTROL STATUS REGISTER FOR UNC11 NUMBER 01
,VECTOR FOR DNC11 NUMBER 01
,DDCMP LINE, FOR OMCll NUMBER 01
,3RO STATUS WORD

001'520

000001
000001
1)00001
000001

DMCR02t
DMS1021
D1482021
OMS3021

,8LKII
,BLKII
.BLKII
,BLKN

,CONTROL STATUS REGIIITER FOR DMC11 NUMBER 02
,VECTOR FOR ONCll NUMBER 02
,ODCMP LINE, FOR DMCll NUMBER 02
,3RD STATUS WORD

001534
00t536

000001
000001
000001
000001

OMCR031
OMS1031
OMS2031
0"'Sl031

,BLK'"
,BLKW
.Bt.KII
,BLKIi

,CONTROL STATUS REGISTER FOR ~MC11 NUMBER 03
,VECTOR FOR DMCll NUMBER 03
,DDCMP LINE, FOR OMCll NUMBER 03
,3RD STATUS WORD

001'54n
001542
001544
001'546

000001
000001
000001
000001

OMCR041
DMS1041
0"'52041
DMS3041

,8LKW
,BLKW
,BLKW
,8LKlf

,CONTROL STATUS REGISTER FOR ~MC11 hUMSER 04
,VECTOR FOR OMC11 NUMBER 04
,DDCMP LINE, rOR ONC11 NUMBER 04.
ORO STATUS WORD

283

284
2AS
286
287

0
0
0
0
0
0
0
0
0

STATUS TABLE AND ADDRESS ASSIGNMENTS
,,0MCll
.........................................

'177

290
281
282

OMRVECI
DMRLVLI
DMTVEC,
DfoolTLVLI
OMCSRI
DMCSRHI
DMCTLI
DMP04.
OMP061

STORAGE
,,TEMP
....•.......

274
275
27&
279

STAT11
STAT21
STAT31
VECTOR AND REGISTER INDIRECT POINTERS
,,0MCI1
...........................................

273

279

PAGEl

DM C11 CONTROL INDICATORS rOR CURRENT DMC11 UNDER TEST
,r ...................................................

256

257
258
259
'60
261

1 i 140 PAGE 7
PROGRAM PARAMETERS, VARIABLES. AND TRAP CALLS.

001522
001524
00 t 5 26
001530
001532

0026

OZO'W

II-JUl,;-11
'" ~CY11 JO(ll146)
12-"AY-77 14119

DZ[\·~t: ,Pli

J O~

hiS
3(16
307

1 ~ : 'f 0

p~(';~

PPUGP ,~."

PAGEl

PARAM~;TE:RS,

VAFl1 ABL':S / AI,O

11<~P

!)(l~~

CALLS,

on t '55,1
001 '55'
001554
OCll556

uOOOOI
000001
000001
000001

D"'CR05 :
DI's1051
D·~s205 I
01015305 I

,RLKW
,l\LKIll
,BLKW
,FlLKW

:CIJ"TROL ST~TUs RE(;IsTER rUR PMCll "lU"IBER 05
:V~CIUR FOR D~Cll "UMBER 05
:DDCMP LINEa rOR rr~Cll I'lU;ASER O!l
: 3l<0 STATUS WORD

00156fl
001562
001564
(101506

000001
000001
000001
000001

O"'CR061
O"Msl061
0"'S2061
OMS3061

,BLKW
,BLKw
,BLKW
,BLKW

;COI';TROL STATUS REGISTER FOR UMCI t
,VECTOR FOR O'lCll NUMBER 06
:OOCMp LINE, FOR OMCll NUMBER 06
,3RD STATUS WORD

001570
on1572
flO1574
orllo;76

000001
000001
(001)01
00000 I

0"'CR071
0"'S1071
OMS2071
OMS3071

,BLKW
.BLKII
.BLKW
.BLKW

,CONTROL STATUS REGISTER FOR CMCll NUMBER 07
,VECTOFI FOR O"'Cll NUMHER 07
,POCMp LINE. FOR OMCll NUMBER 07
,3RD STATUS WORD

001600
ll01602
001604
00'606

000001
00')001
000001
000001

OMCRlOI
OMSIl 0 I
0"'S2101
0l'S3101

.BLKW
,BLKW
.BLKYI
.BLKW

,CONTROL STATUS REGISTER FOR ,?MCIt NUMBER 10
,VECTOR fOR O~Cll NUMBER 10
IDOCMp LINE:' FOR OMCll NUMI:IER 10
,3RD STATUS WOFIO

001.610
Dot ,:;12
flOl6 t 4
001610

000001
000001
000001
000001

OMCRll I
OMSlll.
OMS211.
0l<lS311 1

.BLKW
,BLKW
,BLKW
.BLKW

,CONTROL STATUS REGISTER P'OFI ,?MCll NUMBER 11
,VECTOR FOR DHCll NUMBER 11
,00CMp LINE. FOR OMCll NUMBER 11
,3RO STATUS WORO

001620
001672
001624
001626

000001
1)')0001
000001
000001

OMCR121
OMS112t
OMS2121
OMS3121

.BLKW
.BLKW
.BLKW
.8LKW

,CONTROL STATUS REGISTER P'OR ,?MCll NU"IBER 12
,VECTOR P'OR OMCll NUMBER 12
,DOCMP LINE. FOR DMCll NUM8ER 12
,3RO STATUS WORD

001630
001632
00'634
001636

000001
000001
000001
000001

DMCRI3.
OMS1131
OMS2131
DI:S3131

.BLKW
.BLKW.
.BLKW
.BLKW

,CONTROL STATUS REGISTER P'OR PMCl1 NUMBER 13
,VECTOR P'OR OMCll NUMBER 13
:DOCMP LINE. P'OR OHCll NU"IBER 13
,3RO STATUS WORD

001640
001642
(1)\644
001646

000001
(100001
000001
000001

OMCR141
0"'S1141
OMS214.
DMS314.

.8LKW
.BLKW
.BLKW
.BLKW

,CONTROL STATUS REGISTER P'OR ~MCII NUMBEFI 14
,VECTOR FOR OHCII NUMBER 14
,OOCMP LINE. FOR DMCII NUMBER 14
,3RO STATUS WORD

001650
001652
0111654
001656

000001
000001
000001
0110001

OMCR15.
0"'S1151
Of,lS2151
OMS315t

.BLKW
.BLKW
.BLKW
.BLKW

,CONTROL STATUS REGISTER FOR ~MCl1 NUMSER 15
,VECTOR FOR DMCll NUMBER 15
,OOCMp LINE. FOR OMCll NUMBER 15
,3RO STATUS WORO

01116&0

O()OOOl

OHCR16.

,eLKW

001602
001664
001666

000001
000001
000001

OMS116.
OMS2161
OMS31&1

.BLKW
.BLKW
,BLKW

001670
0111672
Oolfi14
0011'171;

000001
000001
000001
nOOO01

OMCR171
OMSf171
OMS2171
0101S317 I

.BLKW
.BLKW
.BLKW
.BL!(W

0(1701)

(1flOOOO

O.... ENOI

000000

~;)A

309
310)

311
312
313
314
3 t 'i
316

317

NUMBER 06

31q

320
321
322
373

324
32'5

326
n7
328
329
3.10
331
332
333

334
335

336
337
338
339
340

HI
H2
343
344
345
346
347
34'"
349
350

3';t
352
3'53
354
355
356
357

,CONTROL STATUS REGISTER P'OR

,1
1

~MC11

NUMBER !Ii

,VECTOR P'OFI DMCll NUMBEFI 16
,OOCMp LINE. FOR OHCll NUMBEFI 16
,3RO STATUS WORD

,CONTROL STATUS REGISTER FOR DMC11 'lUMBER l '
,VECTOR FOR DMCll NUMBER 17
,DDCMP LINE. FOR OMC 11 NUMBER 17
,3RO STATUS IIORO

35~

359

OZO~lE

\lACyll 30(1046)
l1·JUL·77
O'WME.pt 1
t2-MH-77 14118

11140 PAGE 9
PFIOGRU PARAMETERS, VARIABLES,

PAGEl
AND TRAP CALLS.

~60

361
302
363
364
365
3&6
367
308
369
370
371

372

PASS COUNT AND ERROR COUNT TABLE
,,OHCll
......................................
0 0 1702
001702
001704

000000
000000

CNT.MAPI
PACTOO. 0
ERCTOOI 0

,PASS COUNT P'OR OMCll NUMBER 00
I ERROR COUNT FOR OMC 11 NUMBER 00

Ol'1706
001710

000000
000000

PACTOI.
ERCTOll

,PASS COUNT FOR OMCl1 NUHBEFI 01
,ERROR COUNT P'OR OMCll NUMBER 01

001712
001714

()OOOOO
( 1)0000

PACT021
ERCT021

,PASS COUNT P'OR DMCll NUMBER 02
IERROR COUNT P'OR OMCll NUMBER 02

001710
"tll/"IJ

000000

vvvvvO

PACT03!
=~C';CJ i

,PASS COUNT FOR OMCll NUMBER 03

001722
001724

000000
000 0 00

PACT04.
ERCT041

,PASS COUNT FOR DMCll NUMBER 04
,tRROR COUNT FOR OMCii NUMBER 04

001726
001730

000000
000000

PACT051
ERCT051

,PASS COUNT FOR ONC 11 NUMBER 05
,ERROR COUNT P'OR OMCII NUMBER 05

001732
001734

000000
000000

PACT061
ERCT06!

,PASS COUNT rOR OMCII NUMBEFI 06
,ERROR COUNT FOR OMCll NUMBER O~

001736
on1740

000000
000000

PAC TO' • 0
ERCT071 0

,PASS COUNT P'OR DHCll NUMBER 07
,ERROR COUNT FOR OMCll NUMBER 07

001742
001744

000000
01)0000

PACTI01
ERCT101

,PASS COUNT P'OR DMC11 NUMBER 10
,ERROR COUNT FOR OMCII NUMBER 10

001746
001750

000000
000000

PACTlll
ERCTll!

,PASS COUNT P'OR DMCll NUM8ER 11
,ERROR COUNT FOR OMCll NUMBER 11

001752
001754

000000
000000

PACTUI
ERCT12t

,PASS COUNT FOR OMCll NUMBER 12
,ERROR COUNT FOP OMCll NUMBER 12

001756
01)1760

000000
000000

PACT131
ERCTl31

,PASS COUNT FOR OHCll NUMBER 13
,ERROR COUNT FOR OMCll NUMBER 13

001762
0(\1764

000000
000000

PACT141
ERCTl4J

,PASS COUNT P'OR OMCll NUMBER 14
:ERROR COUNT P'OR OMCll NUMBER 14

no 1 ,66
001770

000000
000000

PACT1!51
EFlCT1!51

,PASS COUNT P'OR DHCll NUMBER 15
,ERROR COUNT FOR OHC11 NUMBER 15

001172
001714

000000
000000

PACT161
EFlCT16.

,PASS COUNT FOR OMCll NUMBER 16
rEFIROR COUNT P'OFI OMCll NUMBER 16

001776
0 11 2001'1

000000
000000

PACT171
ERCT171

,PASS COUNT rOR D~C 11 NUMBEFI 17
I ERROR COUNT rOll OMC 11 NUMBER 17

374
~ i:i
376
377

379

i:~~:~

=:~~= r~~

:M~!!

~~UP!P

H9
3~O

381
3~ 2
393

394
3115
380
397
399
389
390
391
392
393
394
395
190
397
398
399
400
40\
402
403
41)4
405
41)6
407
408
4('9
410
411
l1 i

OQ29

DZ['l~f

M~Cy1.t

OZD~~.pll

30fl04&)

11-JUL-?7

iil40

P~GE

pROGRA'" P~RAMETERS, VARIABLES,

12- MH-17 141 \8

~ND

TRAP CALLS.

PAGJ::I

0029

PAGE I

0030

413

FORMAT OF STATUS TABLE
15

I C

REG

00
R I

I
I

eSA

I
I

* I * I * I *I * I *I * I *
I

VEe

* 1I

I *

*I *

STATl

* II

STAT2

STAT3

DEFINITION OF FORMAT
CSRI

CONTAINS DMCll CSR ADDRESS

STAT!I

BITS OO-OB IS DNCII VECTOR ADDRESS
8IT1581 MICRO-PROCESSOR HAS CRAM
BIT1580 MICRO-PROCESSOR HAS CROM
BIT1481 11?? TURNAROUND CONNECTOR IS ON
BIT14aO NO TURNAROUND CONNECTOR
B!T13~O 1INE UN!T IS AN M8201
BIT1381 LINE UNIT IS AN M8202
B1T1281 NO LINE UNIT
BITS 09-11 IS DNCll BR PRIORITY LEVEL

STAT21

LOW BYTE IS SWITCH pACtl (OUCMp LINE NUMBER)
HIGH BYTE IS SWITCH pAC'2 (8MB73 BOOT ADD)

STATll

DZDHE
MACVii 30 C1 (46) 11 -JUL-'71
Dzn"le; .Pl1
12-MAY-77 14118

BIT081 DO FREE RUNNING TESTS ON KMC
(MUST BE SET TO A ONE MANUALLY tPROGRAM DZDMI ONLY),
KMC MUST HAVE MICRO-CODE WRITTEN FROM RUNNING
DZDMG TEST 2 FIRST
BIT181 DMC11-AL LOCAL HIGH SPEED MICRO-CODE
BIT180 ONCll-AR REMOTE LOW SPEED MICRO-CODE

11140 PAGE 1i
PROGRAM INITIAl.IZATION AND START UP.

469
469
470
471
472

,PROGRAM INI'UAt.IZATION
,LOCK OUT INTERRUPTS
,SET UP PROCESSOR STACK
,SET UP POWER FAIL VECTOR
,CLEAR PROGRAM CONTROt. FLAGS AND COUNTS
,TYPE TITLE MESSAGE

473

474
475
416
417
479
479
490
481
4132
483

484
485
496
487
489

489
490
491
492

002002
002010
002014
002022
002030
01)2034
(11)2040
007044
002052
002060
002066
007072
002074
0011100
002102
002106
002114

012131
(1\2706
012131
0131]7
005031
105037
105037
012137
012137
0121]7
012700
005020
022700
001374
005037
012737
012737

000340
001200
01)5336
001310
010016
001325
001327
001410
001676
100000
1)01102

177776

,STARTI MOV
MOV

000024
001314

Muy

001234
000001
002002

001226
001214

002122
002\26
002132
002140
002146
002154
002162
002164
1'11)2161>
Ofl2\70
002176
002204
002210
002214

013746
013746
012731
012737
012737
022771
001402
000401
(122626
012737
012737
012631
012637

000006
000004
002166
177570
177570
171777

000004
001202
001200
177020

001320
001322
001316
2381

002002

MOV
CLR
CLRB
CLR8
MOV
MOV
MOv
MOV
CLR
CMp
8NE
CLR
MOV
MOY

493

494
495
496
491
498
499
500
501
50:l
'50]

504

505
506
507
SO~

509
510

511
512
513
514

515
516
517
518
519
520
521
522
523

105737

002::20

G0100~

002222
002230
002232
002236
on2242
002250
002254
002256
002262
002270
002212
002276
002)00
002304
002306

022737
001402
104402
004731
017137
005137
001402
005031
032731
001012
105137
100007
005731
001006
104402

000176
000174
000004
000006
001324

001202
001200

003522

000042

001000
001606
116734
000042

001236

001236
000001

001236

001216
001306
007154

~O'I

MOV
MOV
MOy
MOV
MOV
CMp
BEQ
BR
eMp
MOV
NOV
MOv
MOV
TST8
BNE
CMp
BEQ
TYPE
JSR
MOV
TST
BEQ
CLR
BIT
BNE
TSTB
BPL
TST
BNE
TYPE,

U40,PS
ISTACK,SP

,t.OCK OUT INTERRUPTS
,SET UP STACK
,SET _up POWER F~IL VECTOR
OMNUM,SAVNUM
,SAVE NUMBER OF DEVICES IN SYSTtM,
SWFLG
,CLEAR SOFT TYPEOUT FLAG
ERRrt.G
,CLEAR ERROR FLAG
QV,FLG
,ZERO QUICK VERIFY FLAG
,DM,MAp-l0,CREAM,GET MAP POINTER.
.CNT,MAp-4,MILK rGET PASS COUNT MAP POINTER
UIT15,RUN
-,POINT POINTER TO FIRST DEVIC~,
,PASS COUNT POINTER TO RO
'CNT,MAP,RO
(RO)+
,CLEAR TABLE
'CNT,MAP+l00,RO ,DONE YET?
rKEEp GOING
231
,CLEAR LAST ERROR POINTER
UTERR
U,TSTNO
,SET UP FOR TEST 1
f,START,RETURN ,SET UP FOR POWER FAIL BEFORE
,TESTING STARTS
,SAVE CURRENT VECTORS
i16,-(5P)
U4,-(SP)
,SET-UP FOR TIMEOUT
IU,it4
,SET SWR TO ijARD StiR ADDRESS
U77510,SWR
It 17570,DISPLAY ,SET DISPLAY TO HARD SWR ADDRESS
,REFERENCE ijARDWARE SWITCH REGISTER
iSWR
,IF 8 -1 USE SOFT SWR ANYWAY
U+2
,IF IT EXISTS AND NOT 8 -1 US£. HARD StiR
7S
,ADJUST STACK
(SPH, (SP)+
,POINTER TO SOFT SWR
ISWREG,SWR
IDISPREG,DISPLAy,POINTER TO SOfT DISPLAY REG
(Sp)+,U4
,RESTOR!!: VECTORS
(Sp)+,U6
I
,HAS INITIALIZATION BEEN PERFORMED
INIFLG
,BR IF YES
20.
,Ir ACT-li AUtQ~A~IC ;:QOEi !HH~·T TYP~ . "
UENDAD, I!t 42
20'
,TYPE TITLE MESSAGE
,MTITLE
:CHEC~ rOR sorT SWR
i'C,CKSWR
,STORE STARTING SWITCHES
ISWR,STPTSW
,IS
IT RUNNING IN AUTO MODE?
ltf42
,BR IF NO
,+6
,IF
YES,
CLEAR SWITCHES
STRTSW
,IF SW0081, QUESTIONS ARE AS~ED,
• SWOO, STRTSW
,SR IF Stri0081
171
,BIT7 8 1 ??
STRTSW
,BR IF SW0180
171
,ARE ANY DEVICES SELECTED'P
DMACTV
,BR IF YES
161
,NO DEVICES SELECTED,
NOACT
.... nr:"JI.""
••
r~"' ......

,I:' •• ""
Q.."A

'-1.

MACy!! 30(!n4b)
II-JUL-77
JZDME,P!l
12->,\AY-77 14118

DZD~~

524
525

516

002312
0(12314
002316

527

1)(11322

52@

002326
002330
on2334
00'2336
007344

579

530
531
532
533
534
535
536

537
538

539
540
541
542
543

544
545
546

002346

002350
002354
0023bO
002364
002370
002374
002316
002402
002406
0024\ 2
002414
002416
002420

000000
l'00176
004737
In5731
(I()1410
105737
100431
(132737
001403
000424
005137
104402
012704
010431
012437
001411
012437
012431
{.12437
104410
007454
000762
012700

11140

PAGF

P~OGQA'l

I'
P·ITlALIZATIO"1

17$1
16$1

010512
001324
001236
000006

001236
21$1
24$1

001324
006224
001500
001246
001250

5S1

001252
001254
001256

1$1

001500

HALT
BP
JSR
TSTB
BEQ
TST8
BI"I
BIT
BEQ
BR
COM
TYPE
MOV
MOV
!>IOV
BEQ
MOV
MOV
MOV
CONVRT
XSTATQ
BR
MOV

PAGt;1

0031

AND ST.\kT llP,

,-2

PC,AUTO,SIZf::
INIFLG
21$

STRTSIol

,STOP THE. ShOw
,LJISQUIILIFY CONTlNUt; SWITCH
,GU DO THE. AUTO SIZE
,FIRST TI~E?
I ~R If" YES
7 IF USING SAME PARAMETERS DONT TYPE MAP

wBIT1ISIT2,STRTswIIS TEST NO, OR LOCK SELECTED
24$
: If" NO THEN TYPE STilT US
18
: IF n:s DO NOT TYPE STATUS
INIFLG
1SET FLAG
, XHEAD
I TYPE HEADE.R
'DI",MAP,R4
,SET POINTER
R4, TEMP 1
I SET ADDRESS
(R4)+,TEMP2
,SET CSR
1$
,ALL DONE IF ZERO
(R4)+,TEI-IP3
,SET STATI
(R4)+,TEMP4
,SET STAT2
(R4)+,TEMP5
ISET STAT3
:TYPE OUT STATUS MAP
IRO POINTS TO STATUS TABLE

547
,,***************************************.****************************
,,*AUTO SIZE TEST
.
,,*THIS TEST VERIFYS THAT THE DMCllS AND/OR KMCllS ARE AT THE CORRECT FLOATING
,,*ADDRESSES FOR YOUR SYSTEM. IF THIS TEST FAILS, IT IS NOT A HARDWARE ERROR.
".CHECK THE ADDRESSES OF ALL FLOATING DEVICES (DJ,DH,DQ,DU,OUP,LK,OMC,DZ,KMC).
,,*IF THERE ARE NO OTHER FLOATING DEVICES BEFORE THE DMC11, THE FIRST
I,*DMCll ADDRESS IS 160010, KMC11 IS 7bOl10, NO DEVICE SHOULD EVER BE AT
nUDDRESS 760000. THIS TEST MAY REQUIRE 2 OR ,",ORE ATTEMPTS TO GET THE
,,*RIGHT ADDRESSES, AFTER YOU HAVE CHANGED THE ADDRESS TO WHAT IT TOLD
,,*YOU THE FIRST TIME, IT MAY COME BACK AND TELL YOU A DIFFERENT ADDRESS
,,*THE NEXT TIME YOU RUN IT, PLEASE HAVE PATIENCE, THE FINAL ADDRESS
,,*WILL BE CORRECT (AS LONG AS ALL DEVICES IN FRONT OF THE DMC'S ARE
I,*CORRECT).
"********************************************************************

548
549

550
551
552
553
554

555
556
557
5.S8
5S9

560
S61
562

569

002424
0024111
002434
002440
002444
002446
002452

013746
013746
005037
005037
005005
011031
001564

5'70
571
572
573
574
575
576
577
578
519

002454
002456
002460
1)02466
002470
on2472
002501'1
01'12502
002510
002512

OC5705
0011'105

563
564
565

566
567
568

032760

00106\
0110404
012'760
001454
(l12737

MOV
MOV
CLR
CLR
CLR
AUSTRTI I-IOV
BEQ

000004
000006
000006
001252
001404

100000

000002

100000

000002

lSI

002674

000004

2$1

01'15705
001001

DZDME
t.1ACvl1 30(1046) l1-JUL-"
DZI)'"'t:,PII
12-I1AY-77 14118

580
591
583
584
585
!l86
587

002514
Ou2520
002522
f)02526
002532
002536
002540
002542

588

01)2544

5[19

002546
002550
002552
002554
00251>2

5112

SqO
591
592
<;93

012703
000402

000006

012703

000010
003010

012702
0\2701
{l0511 I
111204
1)60401
005201
040401
01)5703

lei
4$1

160010

FLOATI

002700
003022

000004

628

002570
002572
002600
002602
002604
002612
01)76 \4
002616
002622
002624
002630
002632
002636
f)02642
002644
002646
002652
0"2660
0026b4
002666
002672
002674
002676
002700
007704
002706
00271 0
0')2712
002720
002722
002724
002726
0"2730
002736

629

002742

b30

002744

596

100000

000002

597
599

599
600
601
&(12
603
&04
605
606
607
608
b09
610
611
b12

100000

000002

b\3

b14
615
616
617
b\ 8

619
620

021
622
b23
624
625
616
627

MOV
BR
MOV
MOV
MOV

TST

MOVe
ADD
INC
BIC
TST
BNE
MOV
MOV

;J0~5&6

595

,SAVE LOC ,
,SAVE LOC 6
,CLEAR VEC+2
,CLEAR FLAG
,RSsOaDMC, R5=-laKMC
,GET NEXT DMC CSR
,SR IF DONE

R!5

,OMC OR KMC?
,!:IR IF KMC
,CHECK FOR OMC CSR
,SKIP IF NOT DMC
,I T8 A DNC sa CONTlNUE
,CHECK FOR KMC CSR
I SKIP IF NOT KMC
,SET UP FOR TI~EOUT
,OMC OR KMC?
,BR IF KMC

,BIT15,2(RO)
SKIP
:28
nIT1!5,2(RO)
SKIP
tNOOEV,IIt4
R!5
3S

11140 PAGE 13
PROGRAM INITIAt.IZATION AND START UP,

001371

012137
010137

TST
BNE
BIT
BNE
SR
BIT
BEQ
I-IOV
TST
BNE

U4,-(SP)
"O,-(SP)
U6
TEMP3
R5
(RO),DMCSR
AUDONE

t6,R3

4'flO,R)
.DEVTAS,R2
U60010,Rl
(Rl)
(Fl2),R4
R4,Rl
Rl
R4,R1
R3
rt.on
,ERR,U'
Rl,XLOC

'!'S':'

001005
032760
(101014
000404
032160
0')1401
005'711
020137
001411
062701
000756
{162700
011031
001410
000750
062700
062737
011037
001457
013'701
000135
122243
000002
005737
001014
104402
001223
012731
104411
002770
104402

18,
2$1

001404
000010
000010
001404
000010
000010
001404

SKIPI

OKI
003022

003022
NODEVI
001252

002700

ERRI

001276

007277

631

(1)2746

632

002750

633

002752

03 4
635

002754

/)12737
010137
104410
002776
01)5705
001003
104402
007320

'102756

(100402

177771
001262

001252
111

SNE
SIT
BNE
BR
BIT
BEQ
TST
CMp
BEQ
ADD
BR
ADD
MOV
BEQ
BR
ADD
ADD
MOV
SEQ
MOV
BR
CMpe
RTI
TST
BNE
TYPE
CONERR
MOV
CNVRT
ERRPC
TYPE
CNERR
HOV
MOV
CONVRT
CONfAB
TST

BNE
TYPE
OMC'"
B1I

.BIT15,2CRO)
SKIP

.BIT15,2(RO)
SKIP
(RU
Rl,DMCSR
OK
HO,Rl

HO,M
(RO),DMCSR
AUDONE
FY

HO,RO
tlO,XLOC
(RO),DMCSR
AUDONE
XLOC,Rl

(R2)+,-(Rl)
TEMP]
11

IERR, SAVIIC

PAGE,
,R3 IS COU~T OF DEVICES BEFORE OHC
,GO ON
,R3 IS COUNT OF DEVICES BEFORE KMC
,R2 IS DEVICE TABLE PDNTER
.
ISTART WITH ADDRESS 160010
,CHECK ADDRESS IN Rl
,IF NO TIMEOUT, GET NEXT ADDRESS
,IN Rl

,
I

,ANY MORE DEVICES TO CHECK rOR?
,BR IF YES
,OK ONLY DMC'S ARE LEFT, SET UP rOR TIMEOUT
,SAVE FIRST DMC/KMC ADDRESS
r OM (' OR «Me?
,BR IF KMC
,CHECK FOR DI-IC CSR
,SKIP IF NOT DIIC
,ITS A DNC sO CONTINUE
,CHECK FOR «MC CSR
,SKIP IF NOT KMC
,CHECK DMC ADDRESS
,DOES IT MATCH
,!:IR IF YES
,GET NEXT OMC ADDRESS
,DO IT AGAIN
,SKIP TO NEXT CSR IN TABLE
,GET NEXT CSR
,BR IF DONE
,Et.SE CONTINUE
,SKIP TO NEXT DMC CSR
,UPDATE EXPECTED DMC/KMC ADDRESS
,GET NEXT DMC IKMC CSR
ISA IF DONE
,GET EXPECTED OMC/KMC ADDRESS
,CONTINUE
ION TIMEOUT, INC R2, DEC R)
,RETURN
,CHECK FLAG IF • 0 TYPE HEADER
I SKIP HEADER
,TYPEOUT HEADER MESSAGE
,CONFIGURATION ERRORIIII
,SAVE PC FOR TYPEOUT
,TYPE OUT ERROR PC
I

'-l,TEMPl
R1, SAVfll

ITYPE REST or HEADER
,,SET
FLAG SO IT ONLY GETS TYPED ONCE
,SAVE Rt FOR TYPEOUT
,TYPE CSR VALUES
IOMC OR KHC ?
rSR IF KMC
,CONTINUE

0032

DZDl-'1:.
;';"Cyii 30 \I 046'
l1-J!JI,.·"
DZDME.PII
12-MIIY·" 14118
63&
637
b3S
(,19

640
641
b42

643

644
645
646
647

648
649
650
651
6'52

653
654
655
1>'56
657
659
659
660

0(12160
on2762,
002764
002166

oon?€)
lIonn
002774
002776
003000
01)3002
003004
003006
003010
003011
003012
003013
(l03014
0{)3015
003016
003017
00].020

104402
007330
')22626
,H)C721
000001
006
001276
000002
(\06
003022
006
001404
007
017
007
007
007
007
007
007
007
003022
000000
(105705
001005
012705
012700
000602
012637

680
681

003022
003024
003026
003030
003034
003040
003042
0030 4 6
003052
003060
003062
003066
003070
003072
003100
003102
003106
003110
~03t 12
003120
01)3124
003126
003132
003136

032737
001422
104402
005000
000000
027737
101404
104402
000000
000776
017137
013700
000000
012700
012701
010120

1>82
f,93
684
685

003140
on3142
003\44
(l!l31'50

005021
(122021
022700
001372

661
662

663
664
665

666
667

668
669
670
671
&72
673

674
67!;
67f;

1,77
678

679

ot 263'

1 11 40 PAGE 14
PROGRl\!.\ INITIAl,.lZlITlON AND STA}<! UP.
3S1
4$1
E~I<PCI

002

TYPE
K/olCfo!
Cl-'p
BR
1
.BYTE
SAVPC

(SPH'(SP)t
OJ(

,ADJUST STACK
~ Bll TO Gc:T OUT

6,2

.BYTE

004

noc

002
DEVTABI

177777
001500
000006

000004
000010

001236

006144
176104

001312

006005
176064
001306

001306

000300
000302

.BYTE
D/olCSR
.BYTE
,BYTE
.BYTE
.BYTE
.BYTE
.ByTE
.BYTE
.BYTE
.BYTE

.EVEN
XLOCa
o
AU·DONEa TST
BNE
MOV
MOV
Sil
MOV
18.
MOV
BIT
BEQ
TYPE
CLR
HALT
CMp
SLOS
TYPE
HALT
SR
MOV
211
MOV
HALT
MOV
3S.
MOV
MOV
481
CLR
CMP
CMP
eN!:

001000

6~b

6,2

,001

,OH

7
7
7
7

,DQ

7
7
R5

It
.-1,R5
'OM.MAP,RO
AUSTRT
(SP)+,1I6
(SP)+,U4
1Sf40l,STRTSW

31
,MNEW
RO
,&.\IIR, SAVACT

,OU
, DUP
,1.1(
,D·MC
,DZ
,KMC
,DMe?
,SR IF !tHe UD ALL DONE
,SET R5 TO .1 CKMC)
,RESET RO TO START OF TASLE
,GO 00 KHC'S
,RE·STORE LOC 6
,RESTO~E LOC 4

,SELECT SPECIFIC OtVICES'l?
,SR IF NO,
,TYPE THE MESSAGE.
,ZERO DATA LIGHTS

:~~IiHiO:u~:~: ~~Li~;L WHAT D~VICES TO RUN

,sa IF NUMBER IS OK.

,MERR3

,TELL USEII OF INVALID NUMBER.
,STOP EVERY THING.
,RESTART THE PROGRAM AGAIN.
,GET NEW DEVICE PATTERN

.·2
UWR,OMACTV

THE USER WMAT HE S~LECT~n

iiitiAC'lV,RO

jS~~W

noo, RO
n02,Rl
Rl,(RO)+

,CONTINUE DYNA)lIC SWITCHES.
- -.
,P~PARE TO CLEAR THE FLOATING
.
,VECTOR AREA. 300.776
,START PUTTING ·PC+2 • HALT"

(R1)+
(RO)+,(Rl)t
11 000, RO

,IN VECTOR AREA.
,POP POINTERS
,ALL DONE??
,SR IF NO.

,......................

,TEST START AND RESTART

688
b89

003iS2
003156

012706
013746

.~EGINI

001200
000006

OZONE
M~CYll 30(1046)
11·JUL·77
DZDr~E.pl1
12.HAY.77 1411B
f,92
693
694
695
;,9&
fi97
699
f.99
70(\
701
702
703
704
705
70b
707
708
709
710
711
712
713
714
7\5
716
717
71B
719
720
721
722
723
724

0033

b87

690
691

PAGEl

0(13162
003\66
(103170
003176
003202
003204
003210
003212
003216
003222
0()3226
003232
01)3234
(J03236
003'242
(103246
003252
003254
003260
003262
003'270
003276
003]00
oaH04
003]12
003320
003322
003]30
003336
003344
(03)5'2
003354
01)3360

013746
005000
",12737
005037
005720
(122700
001374
162700
0100]7
012637
012637
000413
0'22626
162700
162700
022700
001361
012700
00075b
012737
032737
001411
104402
012737
012737
000406
013737
013737
0\2737
032737
001002
104402
000177

MOV
CLR
MOV

000004

CLR
6$1

157776
007776
001304
000004
000006

7::
281

000004
007776
030000
037400
000340
000004
006043
000240
000240
003HO
003732
010060
000002
005755
175630

UTACI(,SP

,u,·(SP)

,SET UP STACK
,SAVE LOC 6

PAGEl

11140 PAGE 15
PROGRAM INITIALIZATION AND START UP.

000004
003234
000006

MOV
MOV

177776
001236

lOU

181

00~614

001214
001236

3S1
411

581

.2t,IJI4
U6
(1'.0)+
115'7'7'76,RO

U
t7776,RO
M,MEMLIM
(5P)t, . . 4
(SP)+,U6
10.
(SP)+, (SP)+
H,RO
.,7'76,RO

,.
,.

130000,~0

137400,RO
.340,PS
ISIT2, STRTSW

SEQ

TYPE

,MI.OCIC
INOP, TTST
tHOP, 'l"rS'ft2

Mo.V

003612
003614
003612

TST
CMP
SNE
SUS
MOV
MOV
MOV
SR
CMP
SUB
SUB
CMP
SNE
MOV
SR
MOV
SIT

'U,-(8P)

MOV
SR
MOV
MOV
MOV
BIT
BNE
TYPE
JMP

:IS
SRW,TTST
BRX,TTST+2
.CYCLE,RETURN
.SW01,STRTSW

,MR
'RETURN

0034

,SAVE LOC 4
,START AT 0
_
,SET UP FOR TIME OUT
,TO AUTOSIZE MEMORY
,CHECIC ADDRES~ IN RO
,IS IT AT LEA,T 2BK
,Ba IF NO
,SAVE 21C FOR MONITORS
,STORE MEMORY LIMIT
,RESTORE LOe "
,RESTORE LOC 6
,CONTINUE
,ADJUST STACK
,GET LAST GOOD ADDRESS
,SAVE 21( FOR MONITORS
,IS IT BIC?
,BR IF NO
,IF BIC DON'T SAVE 2K

,LOCIC OUT INTERRUPTS
,CHECIC FOR !.tOCK ON TEST
,8R IF NO LOCIC DESIRED.
,TYPE LOCK SELECTED.
,AOJUS.T SCOPE ROUTINE.
,SET UP TO LOCK
,CONTINUE ALo.NG,
,PREPARE NORMAL SCOPE ROUTINE
,LOCK NOT SELECTED, SET UP rOR NO~MAL SCOPE LOOP
,START AT .CYCLE- FIND WHICH ~EVICE TO TEST
,IS TEST NO, SELECTED?
,BR IF YES
,TYPE R
,STAilT TESTING

DZDMt
MACYII )(1(1046)
II-JUL-77
DZDui,Pll
12-MAt-77 14118

11140
E~U

PAGE 1'"
or PASS

PUUTI~E

127
71P
72<1

710
731

Orl0005
(1(15037
105037
(1(\5237
013777
104402
104402
1 (14411
104402
104411
t04402
104411
104402
In4411
013700
013720
013720
005337
001017
112737
00737
013701
001406
000005

0033b4
0033106
(1)1372
734
'103)76
735 003402
736 003410
0(13414
737
Be 003420
739
003424
740 003430
741
003434
742 003440
743 003444
744
003450
745 0 1)3454
746
003460
741
003464
74@ 003470
749
003474
750
003476
0(13504
751
752 003512
753
003516
754 003520
155
003522
756, 003572
757
003524
758 003526
759
003'S 30
760 003532
HI 003534
762 003542
7f.3
003546
764
003550
76'5
003552
766 003554
767
003550
71)8
003560
709
003"'02
770
ofi3564

004711
000240
0('10240
000240
000240
012737
000137
OOOOOt
006
001404
000001
004
001374
000001
006

771
172
773

0035&6
003571)
003572

001230
000001
006

774
715
77&
777
778
779
7@0

003574

001232

732
133

.EOP,
001234
001325
001230
001230
005733
006072
003546
006100
003554
006106
003562
006117
003570
001322
001230
001232
001314
000377
001310
000042

175570

001327
001314

HoI

78&
787

788
789
790
791
70 2

793
794

010060
010060

001214

002
002

002

<)03576
oo3~02

004737
010016

003&04
003612
oo36t4
003616
003622
(103624
003630
003632
003640
003642
(1)3646
01))650
003654
003662

.CYCLE,RETURN
CYCLE
6,2

4,2

6,2

1
002

.BYTE

6,2

ERRCNT

007606

040000

001325
001224
001220
000020
001216

(\{\1~1\4

!. (I<;ol'7

005037
005037
012737
013737
ot 1600
022626
013'701
0001'77
001407
000437
000000

8115

.SCOPE, JSR
MOV

1 '75370

003734
003734
175]42

18J

001327
001224
001224

,CKECK P'OR SOP'T SWR
,SAVE RO ON THE STACK

11.40 PAGE 1'7
GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)

TTSTI

004000

PC,CKSWR
RO, (SP)

001222

2*,
001222
001214

381
001404
175264

BJUi.
BRX.
DONE,

SIT
BEQ
BR
TST
BEQ
CLR
BR

BIT
BNE
TST8
BEQ
INC
CMp
BLOS
CloRB
CLR
CLR
MOV
MOV
MOV
POP2SP
MOV
JMP
1401
437

nIT14,~S\OIR

U
DQ.NE

U
DOME
21
ISWU,lISWP
2S
QV,FLG

2.
LPCNT
L.PCNT,lCOUNT

3s
ERRrLG
LPCNT
LOCK
.20,ICOUNT
NEXT. RETURN
(SP)'RO

,"LOOP ON THIS TEST"?
JSR IF NO.
(IF LOCK SW01:1, THIS LOC =240)
(IF LOCI( SW01111' THIS LOC .240)
,GOTO 38
,WAS TKCSR DONE SET?
,BR IP' NO (LOCKED ON TEST)
,YES, CLEAR FLAG
,GO TO NEXT TEST
,DELETE ITERATION?
(QUICK PASS)
,BR IF YES
,HAVE PASSES BEECOMPLETED1
,SR IP' QUICK PASS.
,UPDATE ITERATION COUNTER
,ARE ALL ITERATIONS DONE11
,BR IF NOT YET
,PREPARE FOR NEW TEST
,START ICOUNTER AT 0

DMCSR,Ri
'RETURN

,RESET ITERATIONS
,GET NEXT TEST
,POP RO OP'F OF THE STACK
,P'AKE AN "RTI"
,Rl CONTAINS BASE DMC ADDRESS
,GO DO THE TEST

,................................
,CHECK FOR FREEZE ON CURRENT DATA

~09

!l10

8tl
812
813
914
81 tr;
81b
817
81 e
PI9
820
821
922
823
824
825
826
827

003736 004737
032'777
003742
003750 001405
003752 005737
0037S6 ·001402
003760 013716
000002
003764

O~4006

""41)44

833
834

JSR
175232

BIT

PC,CKSWR
.SW09,tsWR

BEQ

001220

T8T

LOCP::

001220

BEQ
MOV

LOCK, (SP)

lSI

RTI

,CHECK P'OR SOFT SWR
,IS SW09111(SET)1
,SR IF NOT SET,
,GOTO THE ADDRESS IN LOCK.
,GO BACK.

,.......................

003766
003770
003774
004002

835

8)(J

1j31
R12

007606
001000

,TELETYPE OUTPUT ROUTINE

004010
01)4016
004020
004022
004024
004030
004034
004036
00 4 042

919
P29

0036

PCdRO

PASCN!

0327'77
001407
OJ0437
(lOS737
001434
005037
000415
032777
001011
1'15737
001406
005237
023'737
101414

01")3&70
003674
003700
n03706
0037!4
003716
(1)3720
003724
003730
003732
003734

806
807
8 o!'I

JSR
NOP
NOP
NOP
NOP
RESTRT, MOV
JMP
XCSR,
1
,BYTE
DMCSR
XVEC,
1
,BYTE
DMRVEC
XPASS,
1
.BYTE

,SCOPE LOOP AND INTERATION HANDLER

796
797
798

803
804

PAGE,

,"'AKE l'HE
wORLD CLEAN AGAIN.
LSTERR
,CLEAP LAST ERROR PC
ERRFLG
:CLEAR ERPOF FLAG
PASCNT
J UPDATE PASS COUNT
PASCf;T, ~DJ SPLA Y ,DISPLAY PASS COUNT
,MEPASS
,TYPE END P~SS
,MCSRX
,TYPt.. CSR
,XCSR
,SHOW IT
,MVECX
,TYPE VECTOR.
,XVEC
,SHOW IT
,MPASSX
,TYPE PASSES
,XPASS
,SHOW IT
,MERRX
,TYPE ERRORS
,XERR
,SHOW IT
MILK,RO
,GET POINTER TO PASS COUNT
PASCNT, (RO)+
,STORE PASS COUNT FOR THIS oMCll
ERRCNT, (RO)+
,STORE ERROR COUNT FOR THIS DMCll
SAVNUlJI
,ARE ALL DEVICES TESTED1
RESTRT
,SR IP' NO.
1377,QV.FLG
,SET THE QUICK VERIFY FLAG.
DMNUM,SAVNUM
,RESTORE THE COUNT
U42,Rl
,CHECK P'OR ACT.ll OR DDP
RESTRT
,IP' NOT, CONTINUE TESTING
,STOP THE SHOw-.CLEAR THE WORLD

,.........._..-....-..........._..

'700;

799
900
Bol
802

RESET
CLR
CLRB
INC
MOV
TYPE
TYPE
CNVRT
TypE
CNVRT
TYPE
CNVRT
TYPE
CNVRT
MOV
MOV
MOV
DEC
BNE
MOVB
MOV
MOV
BEQ
RESET

UNDAD,

DZDME
hI~CYll 10ct046)
U·JUL·77
DZDME. P 11
12-MAY.77 14118

7@2

00J5

,END OP' PASS
,TYPE NAME OF TEST
,UPDATE PASS COU~T
,CHECK FOP EXIT TO ACT-l1
I PESTART TEST

72'S
72t>

793
784
185

PA(;~:

010546
017605
062766
00573'7
001004
032'777
001012
105715
100002
104402
10577'7
100375

112577
oot357
'1\2605

.TYPE.
000002
000002
010016

000002

010000

17!5164

411

UI
005672
1'75154
175150

2tl

MOV
MOV
ADD
TST
BNE
BIT
SNE
TSTB
BPL
TYPE
TSTB
BPI..
MOV!!
BN!
lolOV

R5,-(SP)
U(SP),R5

.2, HSP)
SWFLG

11
nW12,tlSwR

(R5)

2.
,MCRL'
UPCSII

:1&

(RS)+ ,I'TPDBR

4a
(SP)+, P5

,SAVE R5 ON THE STACK.
,GET ADDRESS or MESSAGE.
,POP OVER ADDRESS.
,SOP'T SWR MESSAGE1
,IP' YES TYPE IT OUT REGARDLESS or S\oI12
,INHIBIT ALL PRINT OUT11
,BR IP' NO PRINT OUT WANTED (SW1211\)
,IS NUMBER NINun (MSB=1CBIT7»
,BR IP' NUMBER IS PLUS
,TYPE A CR/LF I
,TTY READY?
,SR IF NO,
,PRINT CURRENT CRAR,
,H NOT ZERO KEEP PRINTING I
I END OF OUTPUT. RESTORE R5

MACyll Jne 104&)
lI-JUL-77
DZDn
12-MA Y-77 14118
DZD"It.,Pll
831

00404&

0001'102
Oi0346
010446
017637

11140

PAGE IS
UTlLITUS (TYPEOUT,

G~IH:~AL

84b

01'14050
01'14052
0041'154
no 4062
01)407C
0041)72
cn4074

1'!47

n04tOO

~49

004104
01'14110
On4t12
OC4 t 16

H42
843

&44
845

8 ;'.1
~S()

851
852
853
854
955
85b
957
11'58
R59
9&0
961
8b2

"'1'3
BI)4
RI>5
8&6
db7

004\22
004! 26
01'14130
004134

0,,4136
1'104144
004146
004150
004152
"04154
0041&0
004162
(104164
004166
(04171)
004172

0&2766

104402
1'11'10000
o 121C 4
012703
11'15777
100375
117714
142714
1 '-2427
001417
105777
tn0375
017777
005303
001356
012604
012603
104402
01034(>
010446
000741
012604
012603
000002

SCOPE, Erc)

PAGl:;1

0037

PAGEl

0038

:GO HOM!!;
,RTI
..........................

840
841

EP~OR,

000004
COOO,,2

004072
0000C4

007502
000007
175074

MOV
MOV

TST8
8PI.
MOVB
8ICB
CMPB
BEQ
2$ I
TSTB
BPI"
May
DEC
BNE
MOV
MOV
.INSTEI TYPE
MOy
May
8R
1$1

175070
000200

000015
175054
175044

• HoiSTill MY
May
MOV
ADD
,INST11 TYPE
.'1SGI
0

175046

005666

INSTR2i

MUV

MOV
RTI

R3,-CSP)
"4,-(SP)

,SAVE R3 ON STACK
,SAVE 1<4 ON STACK

@4CSPl;.~SG

U,4(SP)
.IHBUF,R4
i7,Rl
ilTKCSR

11
nKDBR, CR4l
.200,(R4)
(R4)+,U5
INSTR2
8TPCSR
2.
iTKDBR, IITPDBR
R3

11
(SP)+,R4
(SP)+,R3
,MQM
R3,-CSP)
R4,-CSP)
,INST1
(.iii'j.,R4
(SP)+,R3

,!lESTORE R4
,RESTORE R3

~6B

969
870
971
R72
973
874
875
~76

877
878
679

6bO
8~1
~~2

B83
8~4

8S5
89f)
e~ 1

sae
899
RQO

8'H
SQ2

ASCII STRING TO OCTAL
,,CONYERT
.............................
C04174
004176
004200
004204
004?10
01'14214
004220
004224
004?jO
00 4 234
01'14236

010546
010446
016605
012537
012537
012537
112537
112537
1'110566
005C05
012704

01'14242
0(14246
004250
01'14254
004256
004262
004264
0(14270
004,72
01)4276

122714
(101420
i ~ 1427
002415
121427
003012
142714

MOV
MOV
1o40V
MOV
MOV
MOV
MOVB
MOYB
MaY
PARA"tl CLR
MOV
.PARA""

000004
004364
004366
004370
004372
004373
000004
007502
000015
000060

181

000067
000060

! 52405
122714
001406

00001 S

OZDME
~ACYll 30(1046)
ll-JUL-77
DZDME.Pll
12-MAY-77 14118
893
891
895
R96
8\17
898
999
901'1
'lot
902
903
904
905

9"6
907
908
909
910
9 11
912
913
9t4
915
91&

917
918
919
920
921
922
923
924
925
921;
927
929
929
930

004101'1
004302
004304
004306
004310
004312

(R5).;.,HIt.lioi
(R5)+,DEVADR
(R5)+,LOBITS
(RS)+,ADRCNT
R!5,4(SP)
R5
UNBUF,il4
U5,(R4)
PARERR
CR4),160
PARERR
(R4),U7
PARERR
160, (R4)
(R4)+, R5

*15,(1<4)
I.IMITS

11140 PAGE 19
GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)

006305
0"6305
006305
01)0760
t (14404
000750

lSI"
ASL
ASL
BR
PARERR, INSTER
BR

R5
RS
R5

18
PARA"l

,.•.•••.•...•.....•.•.•. ••..•..•.•....

,fEST TO SEE IF NUMBER IS WITHIN I.IMITS
~

004314
004320
0043n
004326
01)4330
004334

020537
1111373
020537
103770
133705
001365

004336
004342
01'14344
0(4)50
004]54
OC4)56
004360
004362
0043b4
004366
01)4370
004172

013704
010524
062705
, 05337
001372
012604
012605
000002
000000
000000
000000
000000
004373

004366

LIMITS, CMp
BHI

004364

eMp
BLO
BITB
BNE

004372

R5,HILIM
PARERR
R5,I.OLIM
PARERR
I.OBITS, R5
PARERR

,STORE NUMBER AT SPECIFIED ADDRI!:SS

004370

MOV
181
MOV
ADD
DEC!
BNE
MOV
May
RTI
LOLIMI
0
HILIMI
0
DEVADR, 0
L081TSI 0
ADRCN'l'cLOBITS+1

000002
004373

DEVADR,R4
R5,CR4)+
.2,R5
ADaCHi

Ie
(SPl+,R4
CSP)+,R5

PC OF TEST THAT rAILED AND RO-R5
,,SAVE
.....................................
004374

016637

000004

001276

.SAVO!51 MOV

9]t
932
933
934
93!5
936
937
9311
939
940
941
942
943
944
945
946
947
949

CMPB
BEQ
CMPB
BLT
CMPB
BGT
BICB
ElISB
CMPB
BEQ

RS,-(SP)
R4,-(SP)
4(SP) ,R5
(R5)+,LOLIM

4CSP)'SAVPC

,SAVE R7 (PC)

,SAVE RO-R5
004402
004406
1'104412
00 4 416
004422
00442b
004432

010537
010437
010337
010237
010137
010037
000002

001272

004434
004440
004444
004450
004454
0044&0

013700
013701
013702
01310)
013704
013705

001260
001262
001264

001270

001266
001264
001262
001260

SV051

MOV
MOV
MOV
MOV
MOV
MOV
RTI

R5,SAVR5
R4,SAVR4
Rl,SAYR3
R2, SAVR2
Rl,oSAVRl
RO,SAVRO

,SAVE R!5
,SAVE R4
,SAVE R3
,SAVE R2
,SAVE Rl
,SAVE RO
,LEAVE,

,RESTORE RO-R5

001266
001270
001272

.RES051 MOV
MOV
MOV
MOV
MOV
MOV

BAVRO,RO
SAVR1,Rl
SAVR2,R2
SAVR),R3
S'AVR4,R4
5AVIIS,R5

,RESTORE
,RESTORE
,REsrORE
,RESTORE
,QESTORE
,RESTORE

RO
Rl
R2
R3
R4
R5

DZO".

,.,ACVII

DZDf"r.,. Pl.l

949
9O;fj

30 (11)4b)

12- M At-77

004164

ll-Jl:L-77
! 4116

1114(1

FAG~

G'.;~fRn

l'TIIITlICS (TYPEOUT, lRR('R,

95~

959
960
961
9~2

963
9,)~

965
96b
967
9f,~

9b9
970
971
972
973
974
975
976
977
91 R
979

geo
9~1

ge2
983
9'l4
91:1'5
986
9117
988

91'9
990
991
992
993
99~

9'1'5
996
997
998
999
IUOO
1001
1001
1(1113
1004

1 ;}4402
010(141';
01014"
010346
I) 1 0446
010546
017601
tl"':l766
012137
112137
It 2137
(I! 3137
IL2737
001003
1142737
1)13704
113705
012700
0\0403
042703
062703
110320
000241
006004
000241
006004
000241
006004
1)05305
001362
012703
114/l23
1/l5331
001374
105737
001405
112723
105337
0/l1173
11)5(113
104402

004666
00 4 612
004671

0·1!> 337
0,)1313
012005
012604
012603
(112601
012600
0110002
lliJOOOO
l'OOOOO

0~4676

0047(10
004702
(1047 0 4
004706
00471/)
1l047! 2

,CONVRI TypE:
,CNVRTI MOV

005672

~10V

000012
000002
004710
0047 U'
(104713
004714
000003
177400
004714
004712
001416

000012
I SI

004714

MOV
MOV
MOV
MOV
ADD
MOV
MOVS
MOVS
:~OV

004712
004714
2$1

3S1
177770
000060

007544
4$1
004712
004713
5S.

000040
004713

68.
007544

CIoIpB
SNE
SIC
MOV
"love
MOV
MOV
SIC
ADD
MOVB
CLC
ROR
CLC
ROR
CLC
ROR
DEC
SNE
MOV
140VB
DEce
BNE
TSTB
SEQ
MOVB
DECB
BNE
CLRB
TYPE
DEC
BNE
MOV
MOV
MOV
MOV
MOV
RTI

004710

0040

, MCRLf
RO,-(SP)
RI
SP)
R3,-(SP)
R4,·(SP)
R5,·(SP)
U2(SP),Rl
l2112(SP)
(Rll+,WRllCNT
(R1)+,CHRCNT
(Rll+,SPACNT
~(RI )+,BINiIIRD
n,CHRCNT
2$
'177400,BINWRD
SINWRD,R4
CHRCNT,R5

,-c

nE~p,RO

R4,R3
U77770,R3
.060,R3
R3,(RO)+
R4
R4
R4
R5
3$
,MDATA,R3
.(RO), (R3l+
CHRCNT

U
SPACNT

6.
.040, (R3)+
SPACNT
5$
(R])
,MDATA
WRDCNT

U
(SP)+,R5
(SP)+,R4
(SP)+,R3
(SP)+,Rl
(SP)+,RO

WRDCNTI a
CHRCNTI 0

PAGE 21
11140
G!:NEIUL UTILITIES (TYPEOUT, EIlIIOH, SCOPE, ETC)

0(14713
0')0000

SPACNT=CHRCNT+l
BINWRDI 0

,TIIAP DISPATCH SERVICE
,ARGUMENT or TRAP IS EXTRACTED
,AND USED AS OFFSET TO OBTAIN POINTER
,TO SELECTED SUBROUTINE

1011

1012
lOt 3
1 (II ~
'101'5
1016
1017
1016
1 (1 19
1020
1021
1022
IIl?3
10'24
1(175
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
11)50
11)51
1052
1053
10'54
1055
1056
1057
10'58
1"'59
1 {\60

PAGEl

,---_ .... ------_._-- ... ---------._-------- .. _- .... _---.-

004461>
004472
I)(ln 474
004nh
004500
004502
01)4504
004'51 ()
00451';
0040;22
00452b
004'532
1)04'536
1l04'544
00454!;
004554
IlO4'560
004564
f)04570
0045 7 2
004'516
(1) 4f,tl2
0046 11 4
004606
(1) 4610
1)046 I 2
004614
004616
0(41)2/l
004622
004621
004630
0041)32
004636
on4640
004644
0114646
004652
0046'56
004660
Ill14662

DZDIoIr
"lACYII 30(1046)
U·JUL·'77
12-MAY-77 14118
DZD"E,"\ I
IOl'5
1006
1007
1008
100'1
1010

0('39

,CONVERT OCTAL iWl'1l>ER TO ASC II liNn OUT POT TO TELE::PRHHE:I'<

9'52

90;7

i?AGE::1
ETC)

JUAn;

RT!

U,IO.'02

951

953
9'54
950;
956

SCOPf:,

004716
fl04720
OIJ4724
004730
01)4732
(104736
1104712
on 4 74b

011646
162716
011616
006316
042716
0r,2716
(117616
000136

.TRPSRr MOV
SUB
MOV
TRPOKI
ASL
BIC
ADD
MOV
JMP

000002
000000
177001
001330
000000

(SP),-(SP)
n,(SP)
I(SP)'(SP)
(SP)
U77001,(SP)
',TRPTAB,(SP)
'(SP) '(SP)
fCSP)+

, GET PC or RETURN
,-PC OF TRAP
,GET TRP
,MULTIPLY TRAP AIIG BY 2
,CLEAR UNWANTED BITS
,POINTER TO SUBROUTINE ADDRI!:SS
,SUBROUTINE ADDRESS
,GO TO SUBROUTINE

,ERROII "'ANDLER

,- .............

004750
004754
004762
004764
004770
004772
005000
005006
005010
005014
005016
005022
005026
01)5030
005032
005036
005040
005042
005044
00'5046
00'5052
005056
0050 6 2
01)5066
0 11 5072
005076
005\00
005104
00~106

005112
005116
0(\5122
0('5124
0051HI
1)05134

004137
032777
001406
105777
100003
112777
032777
01)1105
021637
001404
011637
105037
11)4406
011605
162705
011504
006304
061504
006304
042704
(162704
012437
012437
011437
105737
1l0140l
005737
001040
104402
I r)4402
005737
001402
104402

104402
1 ')4411

007606
010000

.HLTI

174220

174220
000207
020000
001234
001234
001325

000002

177001
031660
005172
005204
005216
001325
005216
005672
005672
001220
006142
006130

('0'5330

174212
174174

JSR
BIT
SEQ
T8TB
BPL
MOVS
XBXI
BIT
BNE
CMp
BEQ
MOV
CLRB
1f1
SAV05
MOV
SUB
MOV
ASL
ADD
ASL
BIC
ADD
MOV
,.OV
MOV
TSTB
BEQ
TST
BNE
TYP"'SGI TYPE
TYPE
TST
BEQ
TYPE
ill
TYPE
C!I!vDT

PC,CKSWR
.SW12,IilSwR
XBX
iTPCSR
XBX
• 207,UPDBR
tsW13,~SWR

HALTS
(SP), LSTERR

U
{SP),LSTERR
ERIIP'LG
(SP),RS
'2,RS
(R5),1I4
R4
(RS),R4
R4
1177001,114
•• ERRTAB, R4
(R4)+,ERRMSG
(R4)+,D~TAHO

(R4),DATABP
ERIIFLG

,CHECK rOR SOft SWII
,BELL ON ERROR?
,aR IF NO BELL
,TTY READY.
,DON'T WAIT IF TTY NOT READY.
,PUSH A SELL AT THE TTY •
,DELETE ERROR PRINT OUT?
,BR Ir NO PRINT OUT WANTED.
,WAS THIS ERROR FOUND LAST TIME1
,BR IF YES
,RECORD BEING HERE
,PREPARE HEADER
,SAVE ALL PROC REG ISTERS
,GET THE PC OF' EAROR
I GET ADDRESS OF TRAP CALI,
,GET HLT INSTRUCTION
,MULT SY TWO
,DOUBLE IT
,MULT AGAIN
,Cr..EAR JUNK
,GET POINTER
,GET ERROR MESSAGr.
,GET DATA HEADRER
,GET DATA TABLE
,TYPE IiEADIlEER

TYP~SG

IBR ll" YES

DATABP
TYPDAT
,MCRLP'
,MCRLP'
LOCI{

,DOES DATA TABLE
IIlR IF YES.

U
,MASTEl{

,MTST"
,X'!!!"

! SHO ..

!;X!ST~

PAGEl

106 I
IV/)2

IOb3
1064
1065
106&

101!>1

lObe
1069
1070
1071
! 072
1(173

1074
1075
107&
1077
1078
1079
1080
1081
1082
1083
10il4
10135

loeb

1('87
1098
111119
1090
1091
1092
1093
1094
, 095
1096
1097
109'!
1099
1100
1101

tic:.

005140
000; 144
00515C1
005154
on5162
(10511,)6
00'H70
005i72
OO!i174
005174
005200
000;'02
005204
005206
005212
005214
005216
005220
005222
005230
005232
005,36
01)5'240
005'242
005246
005,50
005'252
005'256
005'264
005,66
005214
005276
005304
005310

OO'53l4
005)20
005322
005324
0053'26
005331)
005332
ij .. 5334

llJ4402
1 u4411
104402
112737

006217
00532'
005672
17'1777

(JIlin];

0051n

TYPE
CNVIIT

npF.
001H5

01)1402
11)4402

000000
005737
001402
11)4402
000000
005737
001402
104410
000000
104407
0'2737
001403
005777
100005
010046
016600
000000
012600
005237
0327'17
001007
032177

005204

MOVS
TST
8EQ
TYPE
EIIIIMSGI 0
\rjl'lKO,FMI
TST

8EQ
tW!'I.!!D:
TYPDATi

005216

003522

000042

DATA8PI
RESREGI
HALTS I

173744
lSI
000002

001232
000400

EXITEFlI
1'73716

tyPE
0
TS'r
SEQ
CONVRT
0
RE805
CMP
BEQ
TST
BPI.
PUSHRO
MOV
HALT
POPFIO
INC

BIT

eNe:
002000
001216
001200
001404
173674

003
001225

002

'-I,

DATAHD
TYPDAT
DUASP
RESREG

UENDAD,U42

I
EFIROR MESSAGE
I
,DATA HEAOEfI?
,SR IP' NO
,TYPE
,
DATA HEADER
,DATA TABLE:?
,SR IF NO,
,SHOW
,
DATA TABLE
,RESTORE PRac FlEGISTERS
,IF ACT-i1 AUTOMATIC MODE, HALTII

it
t8WF
EXITEFI
2(8P),FlO

ERRCNT
UW08,t8WR

11
nWl0,ISWR

1$1

BEQ
MOV
MOV
MOV
JMP

281

RTI

001214

,TYPE PC,
,SHOw IT
,UIVE A CR/LF
,NO MORE HEf\DE~ UNLESS NO DATA TAI:ILE,
lIS THEFE AI' ERFIOR MI::SSAGE?
,BR IF NO.

rTY;:E

B1'1'

173706

OOi411
013737
012706
013701
000177
000002
000001
006
001276
00000\

, MERFlPC
,ERTABU
,MCRt-.
ERIIP'LG
EMMSG
WFKO,FM

0041

NEXT, RETURN
UTACK,SP
DMCSR,Rl
IRETURN

,HAt.T ON EFIROR?
,SR IF NO HAt.T ON EfiROR
,SAVe: RO
,SHOW ERROR PC IN DATA LIGHTI
,HALT
,GET flO
,UPDATE EFlFlOFl COUNT
,GOTO TOP OF TEST?
,8R IF 'lEI
,GOTO NEXT TEIT?
,8R IF NO
JSET FOR NEXI IES'
,RESET SP
,SET UP lU
,GOTO SPECIFIED TEST
, RETURN

EIITABOI 1
,BYTE
SAVPC
XTSTNI
1
.8YTE
3,2
TSTNO
,ENTEFI HERE ON POWER fAILURE

002

,...........................

\1 03

1104
\105
II(lb
11 07

1 toa
1109
lit 0

o(5)36
00'5336
005344
(\(15]46

012737
000000
000777

005350

MOV
HALT
BR

000024

,SET UP rOR POWER UP TRAP
,HALT ON POWER DOWN N~RMAt.

1 \11

1 tl2
II t3
11 \4

1115
11lb

,PROCESSOR WILL TFIAP HERE WHEN POWER 15 RESTORED
005350
005350
0(5)56

RESTAR,
012737
012706

005336

000024

MOV

D2.0l"e;
MAcvll 31)(1046)
I1-JUL-77
DZDME,PII
12-~AY-77 14118

111'7

t 118
1119
\120
till
1\22
1123
1124

1125
1126
1127
1128
1129
1\30
1131

102
1133
1134
1135
1136
1137

1138
1139
1\40

1141

005362
(lOS 366
005372
0(15)76
005400
005404
005410
005414
005420
005422
005424
005430
005432
005434
005436
005436
005444
005446
005450
005450
005452
005454
005462
OO'j464

oooaal

005466
005466
005474
005502

1\44
1145
1146
1\47
1148
1149
U50

1151
1\52
1153
1154

1155
1!1S6
1157
1158
1159
1160
\161
1162
1163

001404
001416
001416

DMCSR,Rl
TEMP
TEMP

,-4

, MPFAlL
,pnAB
ERRFLG
LSTERR
(Rl)

MS'rCLR
113564

JMP
PP'TABI
,BYTE

002

,SET UP rOR POWER FAIt.URE
,flESET THE STACK POINTER

'RETURN

PAGE:

,RESTORE Rl
,READY FOR TIMMER
,PLUS ONE TO THE TIMER 1
,SR IF MORE TO GO
,TYPE THE MESSAGE
,TELt. WHAT TEST TO RETURN TO,
,STAIU CLEAN

,.......... .

,CLEAR MAINT BITS
,START CLEAN UP OF DEVICE
,START DOING THAT TEST AGAIN.

1
3,2
TaTNO

,OELAYI
01'2777
104414
121111

000020

173746

MOV
•
ROMCLK
121111

no, IDMP04
,NEXT WORD IS INSTRUCTION, ROMC~K PC-5304
~POKE CLOCK DELAY BIT

181
104414
121224
032777
001772

173'730

152777
142777
000002

000100
000300

173'704

005504
005504
005512
005516
005522
005530
005532
005534

152777
013677
062746
032777
001401
000000
152777

000002
173676
000002
000100

1'73&74

00554.2

1427'77

000003
000007

173644
173636

005550

000002

ROMCLK
121224
BIT
BEQ
RTI

,BIT4,IDMP04
lS

,NEXT WORD IS INSTRUCTION, RO~CI.K PC-S304
, PORT4 .. IBUS*11
JIS CI.OCK BIT SET?
,SR IF NO

.MITCLRI
173712

BUB
BICB

RTl

,SIT6,IDMC8RH
,SET MASTER CLEAR
.BIT6IBIT7"CMC8RM ,CLEAR MASTER CLEAR AND R~N
,RETURN

.ROMCLKI
BlSB
MOV
ADD
BIT
BEQ
HALT

1 '73452

111

BUB
BICB

,lET ROM I
,LOAC INITRUCTION IN IEL6
,ADJUST STACK
,HUT Ir sw06 -1
,8R Ir SW06 _0
U
,HALT BEFORE CLOCKING INSTRUCTION
'BITlIBITO,'DMCSRK ,CLOCK INSTRUCTION
.BIT2IBITlIBITO,IOMCSRH tCLtAR ROMO, ROMI, STEP
IBIT1,IDMCSRH
I (SPH, iDMP06
12,-(SP)
IIW06, iSWR

RTi
001416
000002
000020
173610
000020
001416

1168

013637
062746
152777
027777
142777
005U7
001364
000002
000001

1169
1170
1171
1172

005616
(1)5616
005622

013637
062746

001416
000002

1165
1166
1167

MOV
CLR
INC
BNE
TYPE
CNVRT
CLRB
CLR
CLR

005675
005430
001325
001234

005552
005552
005556
005562
005570
005576
005604
005610
0056\2
005614

1164

t.PFAIL,24
UTACK,SP

11140 PAGE 23
GENERAL UTILITIES (TYPEOUT, ERROR, 8COPE, ETC)

000020

1142

1143

013701
005037
0()5237
01)1375
104402
104411
105037
OlOS037
005011
104412
000177
000001
003
001226

MOV

OOi~OO

.DATACLItI
MOV
ADD

173616
173606
173602

1..

BISB

CMP
BICB
DEC
BNE
RTI
,BLICW
MOV
ADD

1(8P)+,TiMP

n,-tsp)

IBIT4,IOMCaRM
,DMCSR,'DMCSR
,BITt, tDMCSRH
TEMP

IeIPH,TEMP

.2. -(lP)

,PUT TICK COUNT IN TEMP
,ACJUST STACK
,SET STEP LU
,WAITE TIME
,Ct.EAR STEP t.u
,OEC TICK COUNT
,SR Ir NOT DONE
,RETURN

,MOVE COUNT TO TEMP
,ADJUST ITACK

0042

DZO':, •.
"r.Cyll 3()('''4b)
ll-JUL~77
DZD"f,Pl!
12-"Q-77 14:1P

1173
1174
1115
I 176
I 177
!! 7B
1179
l1ti(l
1191
I I ~2
I I B3
1 I q4
I 185
1186
1187

li""1'0 21>
(11\5621'0

'l05630
IJ')5632
(100;640
11'15642
000;1'042

nOS644
onc;;646
1l()5&54
(11)5656
01)561-2

1.1:)5664

0051;66
IJO!>672
005675
005733
(l0575'5
n0576 11
006005

(2 )

006031

C2)
('2 )

(2)
( 2)
(2 )

('n
(? )
(2 )
('2)

006043
006072

006100

(2)

006106
0(0&117
(l06t 10
006142
00bl44
(lC'6217

(2 )

nOb224

( 2)
( 2)

111)1»22

(1)
(1)

(2 )
(1)

(2)
(2)

( 2)

(2 )
( 2)
( 2)
( 2)
( 2)
('2)

In
r <)
0)
(2 )

(2)

006263
006374
00b450
t 1 0&510
1106526
(\Ob547

01'16&06
006704
00701f>
n '17051\
007114
007154
007205
0(17215
0117123
1107277

(2 )
(2 )

IH)7~10

( 2)

11')7340

l)1I7~30

1)1)7454
fln1456
()n74~O

173552

11 Q4

1195
l19!>
t 197
1198
\I 99
121)0

12"1
1202
1'203
12 1,4

/)uH7/)
')(\747]

007474
'Ir,7476
0075('0

(T¥P~OUT,

.:f/ .. :1', scrPe, f:TCl
:,.r;XT

~'JRD

IS INSTPUCTION,

0213b4

:PORT4_r~vs.

BIT

:IS PGM CLUC~
:I:!R IF n;s

BEQ

ROMCl..K PC=5J04

RtGII

&Il CLEAH?

2$'
I (J44t 4
n21364
1)32777
Ou 1372
005337
001361
000002

020040
005015
377

377
377
047377
377
377

377
051503
04252b
040520
105
042524
000052
051777
120
020212
377
!l20212
026777
044377
041777

000077
000
053520
047105
000122
020117

0 4 7\11
042524
047514
035122
035103
051523
051122
052123
052105
035103

0'}oo40

317
116
317
37'1
1\24040
024040
1.142377

053505
042377
054105
04b504
n46513
04 t 515

000005
00"
Orl124b

003

053377

047377

BIT

17353&

BNE
DEC
BIlE
RTI

001416

020040
050040
026455
053517
051123
041505
051102
020106
044510
044527
044527
0:1.0123
020117
051412

377
044777
0";3777
051777
(OCH 777
(144777

MQM:
MCRLF,
MPFAILI

020122
020104

M~PASSI

MRI

n42504

t.\U~R2'

052523
052123
045503
000040
000040
051505
051117
047040

"ERR31
MTSTPCI
MLOCKI
MCSRXI
MVECX,
MPASSXI
kEflRX,
MTSTN,
IIASTEK,
MNEW,
foiERPPC,
XHEAD,

0514'10
000040
0'}0040
020040
020103
026455
046440
040440
047524
050040
046504
044103
041524
041524
044124
042504
051127

NllM,

CSR,
VEC:
PPIO:
CRAt.!,
MonUI
(,INEI
BMI
CONN,
NOACT,
SWMES,

020077
0410; 15
042520
024503
024503

,ASCIZ
,JlSCIZ
• ASC I Z
.ASCIZ
,ASCIZ
.ASCIZ
,ASCIZ
,ASCIZ

,"'sca

,ASCIZ
,ASCIZ
,ASCIZ
,ASCIZ
,ASCIZ
,ASCIZ
.I<SCIZ
,ASCIZ
.ASCII
,ASCII
,ASCII
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.IISCIZ
.IISCIZ
.ASCIZ
.ASCIZ
,ASCIZ
.ASCIZ
.ASCIZ

SWMESll .ASCIZ
CONERR I .ASCIZ
Ct,ERRI
.ASCIZ
Dt.!CMI
.ASCIZ
«MCMI
.ASCIZ
SPEED,
.IISCIZ
,I!:VEN
XSTATQ, 5

030401

.BYTE

f2 ,IIDI'P04
2S
Tf;MP
1$

<15><12>
<J77>/PWR fAILED. RESTART AT TEST I
<377>/END PASS DZDME
/

<377>/RI
<377>/NO DEVICES PRESENT.I
<377>/INSUFFICIENT DATAII
<377>/TEST PC·I
<377>/LOCK ON S'ELECTED TEST!
ICSRI 1
IVEC I I
IPASSESI I
IERRURS, 1
/TEST Nf'J, 1

1*1
<377>/SET SWITCH REG TO DMCII'S DESIRED
IPCI 1
<212>1
MAP OF DMCll STATUSI
/
<377>1
<212>1 PC
CSR
STATI
STAT2

ACTIV~,I

.....................

.. -.....

STATlI
/
<377>/HOW MANy DMCII'S TO BE TESTED?I
<377>/CSR ADDRESS?I
<377>/VECTOR ADDRESS?I
<377>/BR PRIORITY LEVEL? (4,5,6,7)?1
<377>/IF DMC HAS CRIIM (M8204) TYPE .yo, IF CRUM (MH200) T¥PE "N"
<377>/ioifilCH LTNE UNIT? IF NONE TYPE "N", IF M8201 TYPE "1", IF 1.\
<377>/SWITCH PAC.1 (DDC~P LINE ,)?I
<377>/SWITCH PAC.2 (BM873 BOOT ADD)?I
<377>/IS THI!: LOOP BACK CONNECTOR ON?I
<377>/NO DEVICES ARE SELECTED I
<377><12>/SWR= 1

<377>1·· ••• •

/NEW? I
<377><377>/DMCII FOUND AT NO~·STANDARD ADDRESS
PCI /
<377>/EXPECTED
fOUND/
/ (DMC) I
1 (KMC) /
<377>/DMC11·AR(REMOTE,LOW SPEED) OR DMC11.AL(LOCAL,HIGH SPEEDl T

6,3

TEMPI

OOb
(1'\1250
006
001 '52

003

OO~

003

11140

PAGE; 25
lJTILITIES (TYPEOUT, ERROR,

GENF~RAL

,BYTE
TEMP2
.BYTE
TEMP3
.BYTE
TEMP4
.BYTE
TEMPS

003

t'O 1254

OOb
0'1125&

I~£XT WORD IS IrSTRUCTIUN, RUMCLK PC=5304
I PURT4_IBOS* Rt.Gl t
lIS PGM CLOCK BIr SET?
,SR n- YES
IDEC COllNT
: BR H' NOT DONE
:RETURN

ROMCLl<
021364
000n02

'1ACYI130(1046)
It-JUL."
[,2""C:,"11
12-lo!Ay·n 14119

007462
(1'.7464
Ili.74h6

,'TlLITIES

ROMCLK
OOOU02

DZD"t.

1190
1191
1192
119 !

D~~;:

G~'''E;;~~

15'

11)4414
071,1>4
'132771
"OI71')

(2 )
(2 )
1'1'18
11 ~Q

11!~O

002

PAGE;
SCOPE, ETC)

6,3

.EVEN
,BUHERS FOR I "'PUT·OUTPUT

0'170;02
(I!l7544

\ "i.)~

0-10000
007'544
000000

MDATAI

'1') IbOt.

.",+40

INBUFI

,,,.+40

12')6
l~u7

1:11)8
1209
1210
1211
1212
1213
t 214
1215
1216
1217
1218
1219

,ROUTINE USED TO CHANGE SOFTWARE SwITCH
,REGISTER USING THE CONSOLE TERMINAL

,........................................... .
007606
007614
00 7 611;
0(17622

022737
001077
11)5777
100003

000176

1,107624

1)12737
022777

177777
000007

003734
171346

000207

171336

177777

010016

'225

0 11 7632
007640
007642
00",·50
(1'')765 '2
( 1)7654
1107656
(11)7660
01')7666

1226
1227

007670
007674

1229

007701'
')07702

Ino
1271
1222
1123

1224

,,,9
1230

flo7704

1731
1232
1233

007710
IH17714
1)(}772(1

t}34

(11)7722

liB
1716
1237
I '2 ~ e

If ~772f>
'li)7 7 3 n

\ i 39
124 n
\?41
i 2 42
! 243
I ( 44
1'24'i

[) 17734
0',7736
n07742
(1~7744

001404
022777
001061
III !)246
r'10J4&
010446
012737
005002
o t 2704
1114402

IrJ>\411
1110052
104402
004737
022703
U01424
1122703
001416
022103
"01754
022703

177777
007205

007215
010020
000015
000012
000025

000007

1)011b2

n~n54

005004
042703
UI)&302
l'I\f.>HI2

"17 7 5 h

~IJ6 302

'\")77611

00;(l3U2

fl'17746
OJ7752

001202

171362

1777'11'1

CKSWRI

CMP
BNE
TSTB
BPL
MOV
CMp
2$1
BEQ
CMP
BNE
MOV
1$1
MOV
MOV
MOV
Cl<SWR1, CLR
MOV
TYPE
CKSWR21 CNVRT
SOFTSW
CKSWR31 TYPE
CflSWR41 JSR
CMp
BEQ
CMp
BEQ
CMp
BEQ
C'4p
BEQ
CLR
BIC
ASL

'SWREG,SWR
CKSWR5
I!ITl<CSR
2$
.·I,DONE
t7, I!ITKDBR

IS
t207,llTKDBR
CKSWR5
R2,·(SP)
R3,·(SP)
R4,·(SP)
.·I,SWfLG
R2

.·1,R4
,SWMES

,SWMESl
PC,INCH)l.P
f15,RJ
!I$

U2,R3
48
~ 25, Rl
CKSWRt
." R3
CliSWR4
R4
'17777().f'I~

ASL

R2
R2

ASL

Fl2

P,!~

11),112

, IS THE SOFT SWR BEING USED?
,SR IF NO
,IS DONE SET?
,GO ON IF NOT SET
,IF DONE SET, SET FLAG
,WAS CTRL G TYPED? (7 BIT ASCII)
,SR IF YES
,WAS CTRL G TYPED? (8 BIT ASCII)
,SR II" NO
,STORE R2
,STORE R3
,STORE R4
,SET SOFT T¥PE OUT FLAG
,CLEAR NEW SWR CONTENTS
ISET FLAG TO ALL ONES
,TYPE ·SWR= "
,TYPE OUT PRESE'!T CONTENTS
,Of SOFT SWITCH REGISTER
,TYPE "NEn •
,GET RESPONSE
,WAS IT A CR?
,SR IF YES
,!'lAS IT A LF?
,SR IP' YES
I wAS IT CTRL U?
,BR IF YES(START OVER)
,IF CNTL G GET ~EXT CHAR
,IT MUST BE A DIGIT SO CLR FLAG
IONto¥ 0·7 A~E LEGAL S'J "ASK Ofr BrTS
I SiiIfT
3 TI"'CS

01:'44

I1-JUL-77
,Hey!! .\(:( 1046)
DZDME
1 2":U Y-77 1411&
DZDIoIE.,i?11

tHo
1147
12 4 ij
t :149
t :t'50
12'> 1
D';2
;2'53
12'54
1255
1756
i 257
I ?58
125'1
1'2"0
121:> 1
12"2
1263
1264
1265
1266
121:>7
12b8
12(.9
1.70

0')7762
007764
007772
0<)1774

MJ7716
010002
010006
H1001C

01/)012
01 no 14

1)00752
01276&
005704
001002
010277
o(}5037
012604

O!)21102

11140 PAGt: 2&
GENERAL UT lLITII!:S ('upt:nUT, ERHUR, SC'H't., UC 1

000006

171200
01 QOi6

OOCOOO

1(l5777
100375
017703
105777
100375
010377
042703
000207

010052
010054
"10056

000001
006
01)0176

!l4

I:\tiE

b81

MOV
eLI<
I<!OV

MOV
CKSWIl5'1 RTS

000207

010()16

C~S"'P4

MOV
1ST

MOV

012603
o t7~02

010020
010024
"10026
010032
010036
010040
010044
010050

BR
4$1
5$1

171154
171152
171146
000200

002

IroCHARI TST8
SPL
MOV
TST8
BPI.
MOV
SIC
RTS

ilTKCSR
.-4
ilTKDSR', P 3
€lTPCSII
.-4
113,filTPDSR
'8IT7,R3
PC

SOFTSWI 1
.BYTE
SWREG

6,2

17"16
12"11
1278
1779

1291
1292

010060
1)11)01:>4
0100&6
010072
010074
010076
(l 10100
11 1 0104
010110
010116
010124
0' 0132
010134

005737
001004
104402
nOO(l!)O
000776
v')0241
0,)6137
005537
(162737
062731
022737
(011)06
012737

1193

01 n1 ~2

11l2H?

(1)1702

1294
1295
1296
1297
1298
1299
1300

01 (l150
III 0151:>

on737
(101747
0\3700
013702
012031
011037
042737
012037
012037
012037
0\2237
012237
012700
013737
005237
013737
005237
013737
060037
013737
060037

001316

013737
060037
013737
06r')(I) 7
nUH7
060037

001374
001376
001376
001400
0(11400
001402

1)32737

000002

,n4

1 JOI

1302

no]

13n4

1305
1306
1307
1 )(18
1309
1310
1311
1312
1313
13\4
1315
nl6
1317
1319
1319
1320
1321
1322
1323
J",":"'l'

1325
1326

,RESTORE R2
:RETURN

,ROUTINE USED TO ·CYCI.E" THROUGH UP TO 16 DMC11·S
,THIS ROUTINE SETS UP THE eONTIIOL ADDRESS FOR THE DlAGNUSflC
,AND RUNS THE SPEC lrUD DMC 11· S.
THIS ROUTINE *MUST.
,BE IIUN FIIIST BEFORE ENTERING THE DIAGNOSTIC rOR THE
,SETUP NECESSARY.

1275

12AS
1nti
12li7
1211R
12i39
1290

:RESTORE I'll

1271

1'2" 1

,GET "IEXT C,,"RACTER
:Lf" WAS T'lP":D SO (:0 TO START
:IS FLAG CLlCpR?
IIF NOT DQ~'T CHANGE SOFT S~R
;IF 'lES THE', WRITE ~E. CDNTENtS 10 50FT SiIIi<
:CLEAR TYPt:OUT FLAG
,RESTORE R4

11140 PAGE 27
GENERAL UTILITIES (TYPEOUT, EIIROR, SCOPE, ETC)

1212
1?H
1274

)?82
1 i.e 3

R2,1I5wR
SWrI,G
(SP)+,P4
(SPj+,RJ
CSP)+,R2
PC

0\/)1(,0

(, t 0164
('10170
010174
010200
010201;
010212
010216
010222
ot0226
010212
010236
010244
010250
0\0256
010262
010270
C102H
1110302
010306
010314
010320
010326
010332
0\0340
010)44
n i 0352
0103'i4
010354

001306

CYCLEI

007154

lSI
001316
001316
000004
nOOOl0
001700

001322
001320
001320

MOV
MQV
SIT
BEQ
MOV
MOV
MOV
MOV
SIC
MOV
foIOV
MOV
MOV
MOV
MOV
MOV
INC
MOV
INC
MOV
ADO
MOV
ADO

,ARE ANY DMC11·S TO SE TESTED?
,SR IF OK.
,NO DMCll·S SELECTED"
,STOP THE SHOW.
,DISQUAI.IFY CONTI SW,
.-2
,CLEAR PROC, CARIIY SIT.
RUN
,UPDATE POINTER
RUN
,CATC.1i CARRY P'ROM IIUN
#4,MILK
,UPDATE POINTEII
.10,CREAM
,UPDATE ADDRESS POINTER,
'DM,MAP+200,CPEAM
28
,KEEP GOING, NOT AI.L TESTED FOR.
'DM.MAP,CREAM
,RESET ADDFESS POINTER.
'CNT=~AP.MILK
1RESET PASS COUNT POINTER
,IS THIS Oh€ ACTIVE?
RUN,DMACTV
IS
,S8 IF PIC
ClltAM,IIO
,GET ADDRtSS POINTER
MILK,R2
,GET PASS COUNT POlNTER
(110)+, Df04CSR
,LOAD SYSTEM CTRL. REG
(RO"DMRVEC
,LOAD VECTOIl
.177000,DMRVEC
,CLEAR UhWANTED BITS
(RO)t,STATl
,I.OAD STATl
CRO)+.STAT2
,LOAD STAT2
(RO)+,STAT3
,LOAD STAT)
(1I2)+,PASCNT
,LCAD PASS COUNT
(1I2)+,ERRCNT
,I.CAD ERROR COUNT
.2,RO
.SAVE CORE THIS WAYl
DMCSR,DMCSRH
DMCSRH
DMCSRH,DMCTL
DMCTI.
DMCTL,DMP04
RO,DMP04
DMP04, DMP06
RO,DMPC6

MOV
ADD
MCV
ADD
MOV
ADD

DMIIVEC,DMRLVL
RO,DMRLVI.
DMRI.VI.,DMTVEC
RO,DMTVEC
DMTVEC, DMTLVI.
IIO,DMTLVI.

SIT

.sW01, STRTSW

TST
SNE
TYPE
Hr.I.T
SR
CLC
ROL
ADC
ADO
ADD
C"Ip
SNE

001500

001320
001322
001404
OQ1374
177000
001366
001370
001372
001230
001232
000002
001404
001406
001406
001410
001410
001412
001412
001414

001320
Oot322
001306

2$ I

001374

001406
001410
001412
001414
001376
001400
001402

001236

iS~w

0014SG

48 I
005737

0045

SWFLG,
171160

DZDME
MACY!1 30(1046)
ll-JUL-77
DZDP'E, Pt!
12-M~ Y-77 1411 B

1781)

',STAPT,bCSP)

PAGEl

000042

TST

OMAC'l'V

,NOACT

,
un

,
,

,PTY LVL

,TX VEC

ITX LVI.

,IS TEST NO.. SELECTED
jgR Ii' r~O
,RUNNING IN AUTO MODE?

PAGEr

0046

f'ACy11 30 (104u)
II-JUL-"
'2-,.,AY-77 14: Ie

DZD"E

P~G:: 2q
G'::'liCt<AL 1.ITlLITl!.S (TYPEOUT, EPIWfl,

111 ~ 0

Dn,~ ... pl1

1327
1329
1329

IHO
tHl
13;;?
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1341

1349
1319
,350
1351
1352
1353
1354

135'5
1356
1357
1358
1359

(10)61)

til) 1 045

01031>2
(11 031>~
010370
<JlO)12
010374
010376
010400
(110402
010403
fll0404
010410
010412
010414
°t0416
010424
010426
010434
(110436
010442
010446
010454
010456
0\ 0460
010464
010466
010472

1 n4402
1')4403
006130
\'!4405
000001
on t 000
001226
000
012700
022710
012737
001020
023760
001014
022760
001010
010031
104402
()42731
000412
005720
020027
0(11351
104402
000730

010474
010')02
010506

r)12737
(113701
000117

005672

,IHTE
,BYTE

(Jot
012320

5$.

001226

000002

001226

000004

001214
005155
000002

001236

6$1
026010
005666

012320
001404
170502

001214

'St
8St

1360

136b

1374
1315
1376

1317
1378
1379
1380
t3~1

1382
DZD~E

010512
0100;;12
010514
010520
fll0522

000005
012702
005022
022702

010526
010530
010'\34
'll 05 40
fll0544
010552
010554
010'560
0\0566
f) I 00; 70

001374
005037
012702
Oi/5037
032137
001002
000137
012737
104403
0116450

001700

001310
001500
001306
000001

001236

011252
000001

001256

/oIACYll 30(1046)
l1-JUL-"
12-MAY-77 14118
lr)4405
000001
000020
')01252
000
001
(1)737
104402
104410
012002
005237
104403
006510
104405
160000
'''4000
001254

1135
1436

010572
1)10571
010,)H
0111600
010602
010603
010604
0\1)612
U1°F;16
010620
010622
1)10626
010630
010632
010634
0"1" 1"
010640
010642
0\0643
010644
010650
0\0652
010654
010656
010660
010662
(110664
010665
010666
010672
(11)674
010676
010702
010706
01(l710
010714
010716
Ul0722
010724
010726
1110730
010734
010736
010740
010742
010744
01:)746
010750
0\ 0752
010751;
010762
010764
010770
010772

1437

OHi74

022703
001403
104402
0056b6

~ ·1:' l?

t" 1 ':1"".'~

C't'~Hj763

1388
1389
090
139\
1392

093
1394
1195
1396
1397
'1QI!

1399
1400
141)1
1402
1403
1404
1405
1406
1407
140£1

t 4.)9
1410

1411
t 412
1413
1414
14\5
1416
1417
1418
1419
1420

\421
1422
1423
1424
1425
1426
1427
1428

lHe}
1430
1411
1432
1433
1434

AUTO,SIZE.
RESET
CSRMAP, MOV
CLR
1S.
CMp

001500

DZJ"'f.Pll
1393
1394
\3B5
1386
\387

76
,,.,CPLF

P~GE'

0048

I SR If' YES

,GE-T TEST NO,

UST1,RO
(PC)+,(RO)
(PC)+,Ii\(PC)+
6$
TSTNO,2(RO)
b$

USTNO,4(RO)

68
RO,RETURN
,MR
ISW01,STRTSW

,CMP FIRST WOIID TO 12737
,BR IF NOT SAME
,DOrS TSTNO MATCH?
IBR IF NO
,IS LAST WORD OK?
,SR IF NO
,IT IS A LEGAL TEST SO DO IT

B.
(RO)+
RO,tTLAST+10
5.
,MQM

,POP RO
,AT END YtT?
,SR IF NO
,YES ILLEGAL TEST NO.
,TRY AGAIN

nST1,RETURN
DMCSR,Rl
'RETURN

,PREPARE RETURN ADDRESS
,Rl
BASE DMCll ADDRESS
,GO START TESTING,

,,
,,

1362
1363
1364
1365

1373

MOV
MOv
JMP

0047

,ROUTINE USED TO "AUTO SIZE" THE OMCll
,CSR AND VECTOR.
THE CSR MAY SE ANY WHERE IN THE FLOATING
,NOTE.
ADDRESS RANGE (1600001164000)
AND THE VECTOR MAY BE ANY WHERE IN THE
FLOATING VECTOR RANGE (300.770)

13bl

1367
136i!
\369
1310
\ 371
1172

tiNE
TYPE
INSTR
MTSTN
PARAM
1
1000
TSTNO
0
1
MOV
C"'P
MOV
SNE
CMp
BNE
CMP
BNE
MOV
TYPE
BIC
SR
TST
CMp
BNE
TYPE
BR

PAGEl
SCOPE, ETC)

001252
005672

BNE
CLR
MOV
CLR
SIT
BNE
JMP
MOV
PISTR
NUM

001311)

1211

001256

000
001
013722
104403
006526
104405
000000
000776
001254
000
001
013712

001254

104402
006547
004737
022703
101014
02210)
103411
u12704
006303
005304
001375
042103
050312
000403
104402
005666
000752
104402
006606
004737
022703

10et
012266
000024
00002'
000011

170777

50 ..

PH
012266
000131

0')1427
000 116

it
DMNUM
'DM,MAP,R2
DMACTV
ISWOO,STRT5W
,+6

.1,TEMP5

11140
PAGE 29
GENEIHIL UTILITIES (TYPEOUT, ERROR,
PARAM
1
16,
TEMP]
,BYTE
.BYTE
MOV
TYPE
CONVRT
WHICH
INC
INSTR
CSR
PARAM
160000
164000
TEMP4
.BYTE
,BYTE
MOV
INSTR
VEC
PARAM
0
776
TEMP4
,BYTE
,BYTE
MOV
TYPE
PRIO
JSR
CMP
BHI
CMP
BLO
MOV
ASL
DEC
SNE
BIC
BIS
BR
TYpE
MQM
BR
TYPE
CRAM
JSR
CMP
SEQ
CMp
BEQ
TYPE
MQl!
~R

,INSURE A BUS INIT,
,LOAD MAP POINTER.
,ZERO ENTIRE MAP
,ALL DONE?

,DM.MAP,R2
(R2)+
,DM,ENO,R2

,SR IF NO
,SET OCTAL NUMBER OF OMCll'S 10 0
,R2 POINTS TO DMC MAP
,CLEAR ACTIVE
, QUESTIONS?
,BR IF YES
,IF NO SKIP QUESTIONS
,STAFIT WITH 1

SCOPE, ETC)

1
TEMP1,DIoINUM
,MCRLF

,DMNUM •

HOW MANY

,TYPE WHICH DMC IS SEING DONE
,TE"'P5 IS WHICH DMC
TEMP5

1
TEMP4, (R2)+

,STORE CSR IN MAP

0
1
TEMP4, (R2)

, STORE VECTOR IN MAP

PC,INTTY
.24,R3
SOl
127,R3

,
,

U1,R4
R3
R4
,-4
1170777,R3
R3, (R2)

,BR IF GREATER THAN
,R4
NUMBER OF SHIP'T!
,SKIFT R3 LEFT
,DEC SHIFT COUNT
,SR IF NOT DONE
,BIC UNWANTED BITS
,PUT BR LEYEL IN STATUS MAP
,CONTINUE

101

,RESPONSE IS OUT OF !;I"1ITS
,TRY AGAIN

sal

PC,INTTY
.131,113

\If
1116,113

40$

,ASK WHAT BR LtVELo
,GET RESPONSE
,SR IF LESS THAN 4

,DOES DMC K~ VE CRAM?
,GET IIEPLY
,YES
I NO
,NOT

Y OR N

,TYPE "1"
tit

: ASI(

,lG~IN

flZDME
~ACY11 lOC1n46'
11-JUL-77
DZDME.Pll
12-MAY-77 14118
t439
,440
1441
i 442
1443
1444
1445
1446
1447
1448
1449
1450

t 451
t 452
14~3

1454
1455
1456
1457
1458
1459
1 ~60
1461
1462
1463
1464
1465
1466
t 4E!7
1469
1469
1470
1411
1472
1473
1474

1475
1476
1477
1478
1479
1480
1481
1482
1483
1494
1485
1496
1487
i 488
1489
1490
1491
1492
! 493

1494

011000
011002
011004
ni 1010
011014
011016
01 1 022
oi i024
011026
011030
011032
011040
011042
(111046
011050
01.1052
011056
011062
011064
011070
011072
otl07E!
011100
011102
011104
011106
011112
011114
011116
Ot! 122
011124
011126
('11132
011136
ott 140
011144
011146
01 \1 50
011152
011154
0\1160
011162
011166
01116E!
011170
011172
011174
011176
011200
Oi i 202
011203
0\1204
011210
fl11212
011214
0\1216

104402
0(17340
0('473'7
022703
001414
022703
001403
11)4402
00566E!
000763
052762

40$ 1
0122&6
000122
000114

000002

000004

j50)

,1504
1505
1506
1507
1508
1509
1510
1511
1 '512
1513
1514
1515
1516
1517
15111
1519
1520
1521
1522
1523
1524
1525
1526
1521
1528
1529
1530
1531
1532
1533

15H
1'S35
1536
2537
1539
1539
1540
1541
t 542
1543
1544
1545
1546
1547
1548
1549
1550

41S1

000402
052712
104402
0()6704
004737
022703
001417
022703
001412
022703
001403
104402
005666
000760
052722
022222
000447
052712
! 04402
007114
(104737
1)22703
oot40&
022703
(10140&
104402
005666
000763
052722
000402
042722

100000

9$1
1681

012266
000021
000022
000116

3",

010000

020000

3UI
30$1

012266
000131
000116

040000

17 ..

040000

lSSI
19$1

TYPE
SPEED
JSIl
CMp
8EQ
CMp
8EQ
TYPe;
MQM
BR
815
SF!
BIS
TYPE
MODU
JSR
CMp
BEQ
CMp
8EQ
CMp
BEQ
TYPE
MOM
8R
BI8
CMp
BIl
BI8
TYPE
CONN
JSR
CMp
BEQ
CMp
BEQ
TyPe:
MQM
BR
BIS
BR
BIC

104403
007016
104405

INSTil.
LtNE
PARAM

000000
000377
001254

377
TEMP4

011220
011222
01124'4
011225
011226
(J11232
011234
011240
0i.1242
011246
011252
.011256
011264
011266
011270
011272
011276
011302
011304
011310
011314
011322
011326
011134
(11)36
011344
011346
011352
011360
011364
011370
011376
011400
01 t 406
011410
011416
011420
011422

000377
001254
000
001
113122
1105722
005337
001402

o1i43(J

Oiiii~~

0.11432
011436
0t1442
011450
011454
011462
Ot! 466
011474
011476
011502
011504
011512
011514
011520
1111522
011530

012711
005061
012761
052711
012761
052711
122761
001003
n52712
000436
032761
001403
052712
000427
032761
001023

000137
000137
012701
012737
005011
005711
001172
005061
005761
001165
012711
005061
012761
052711
022761
001004
052762
000431
012711
012761
012711
012711
022761
001411
022761
001410
022761
001404
000516
052762

408
tBIT1,4(R2)
16$
tBIT15, (R2)

0049

PAGEl

0050

,DtoICll-AR OR DMCl1-AL?
: GET RESPOr. SE

,IS IT R
: BR IF REi'lOTt:

,IS IT L
,BR

IF LOCAL

,TRY AGAIN
,SET BITI IN STAT3
ICONTINUE
iSET BIT 15 IF CRAM
,ASK WHICH LINE UNIT

PC,INTTY
f2l,R3
30a
.22,R)

318
1116,R3

328
16$
IBIT12, (R2)+
(R2)+, (R2)+

,GET REPLY

, '1"

, "2"

, "N"
,IF NOT A 1,2 OR N TYPE .?
,TRY AGlAN
,SET BIT 12 IN STAT2 IF NO I.U
,POP OVER STAT2 AND STAT3

3le
UITU. (R2)

,SET BIT 13 IN STAT2 IF M8202

PC,INTTY
U31,R3,

,ASK It LOOP-sACK
,GET REPLY

18 oN

178
BU,R3
19$
30IJ
IBIT14, (R2)+
19.

,8Ih4, lR2jo·

,IF NOT Y OR N TYPE ·1"
,TRY AGAIN
,TURNAROUND IS CONNECTED

,NO TUiU'Ai;,()UNO

.BYTE

000

001
113722
104403
007054
104405
000000

PC,INTTY
U22,R3
16$
*ll4,Rl
US

PAGEr

o
.BYTE
MOVB
INSTR
Bioi
PARAM

001254

1
TEMp4, (R2)+

,STORE SWITCH PAC IN MAP

o·

DZOME
MACYl1 30(1046)
11-JUL-77
DZOME.Pl1
12-MAY-77 14118
1495
1496
1491
1498
1499
1500
1501
1502

11!40 PAG~ 30
GENERAL UrILlTIES (TYPEOUT, ERROR, SCOPE, I:;TC)

11140 PAGE 11
GENERAL UTII.ITIES (TYPEOUT, ERROR, SCOPE, ETC)

377
TEMP4
.BYTE
• BYTE
1
MOVB
TEMP4, (R2)+
,STORE SWITCH PAC IN MAP
(R2)+
TST
,POP OVER STAT3
TEMP3
, DEC DMC COUNT
33$1
DEC
BEQ
34$
,BR U' DONE
rJUMP IF NOT
"lip
12'
;CONTINUE
341'
JMP
,SET FOR FIRST ADDRESS TO BE TESTED
U60000,Rl
MOV
MOV
,SET FOR NON-EXISTANT DEVICE TIME OUT
U8,U4
(Rl)
28,
Ct.R
,CLEAR SEt.O
(Rl)
TST
,IF DMC11 DMCSR SIB 0
BNE
,IF NO DEV , TRAP TO 4. IF NO BIT 8 THEN NO DMCl
U
CLR
6CR1)
,Ct.EAR SEL6
TST
UR!)
,IF DMC 11 THEN DMltIC SIB -0 I
BNE
,BR IF NOT DM.Cl1
U
MOV
tBIT10, (Rt)
,8ET ROMO
4(R1)
CLR
,CLEAR SEL4
MOv
, WRITE THIS TO SEL6
U25252,6(Rl)
BIS
tBIT13, (Rt)
,WRITE ITI
CMp
U25252,4(Rl)
,WAS IT WRITTEN?
211
.
BNE
,IF NO IT IS NOT CRAM
BIS
UITl5,:H(2)
,StT SITU U' C~AM
BR
228
2U.
MOV
tBlT9'(R1)
,SET ROMI
MOV
UOOU7,6(Rl)
,PUT INSTRUCTION IN SEL6
MOV
UIT91BIT8, (R1) ,CLOCK INSTltUCTIOH (MICRO PRO~ PC TO 0)
MOV
,SET ROMO
UIT10, CRi)
CMP
t626,6(R1)
,IS IT LOCAL CROM
BEg
,BR IF YES
23IJ
CMp
U6520,6(R1)
,IS If REMOTE CRaM?
BEg
,BR IF YES
221
CMp
.-1,6(R1)
,NO CROM1
BEQ
,BR IF YES
221
BR
,NOt A DNC
U
,SET BIT 1 IN STAT)
238.
BIS
IBIT1,6(R2)
JAT THIS POINT IT IS ASSUMED THAT 11.1 HOLDS A DMCll CSR ADDRESS,
;!TO~~ ~BR ~~ eQ~E T!BL~_
~iii
:.iOV
15$1
MOV
,CLEAR LINt UNIT LOOP
CLR
,CLEAR PORN
URll
MOV
,LOAD INSTRUCTION (CLR DTR)
1122113,6(11.1)
BIS
IBIT8, (ltl)
,CLOC~ INSTRUCTION
MOV
,LOAD INSTRUCTION
'021264,6(R1)
UITa, (Ri)
,CLOCK INSTRUCTION
BIS
CMPB
U77,4(ltll
,IS IT ALI. ONES7
BNE
,BR IF NO
.+10
, IF YES, flO LINE UNIT. SET STATUS BIT
BIS
IBIT12, eR2)
BR
20IJ
BIT
UIT1,4(Rll
,18 SWITCH A ONE?
BEQ
,+10
,8R IF M8201
BIB
tBITlll 81T14, (R2) I M8202 ASSUME CONNECTOIt
BR
208
,CONNECTOR ON)
BIT
.BITJ,4(Rll
,IS MRDY SET
BNE
201
,Bit IF ~8201 NO CONNECTOR (ON LINE)

001254
001252
ft4 " ' "

011702
160000
011774

000004

000006
000006
002000
000004
125252
020000
125252

000006

100000

000002

001000
100417
001400
002000
000626

000004

000006
000006

016520

000006

177777

000006

000002

000006

000400
021264
000400
000377

000006
000006
000004

010000
000002

000004

060000
000010

i3'

;ii~:;~:1)

001000
000004

122113

'*.

000004

DZDt~l

"'~CYll

DZDvE-.Pll

30(104&)

12-IoIA'{-"

IJ 11532
01 t 540

(), 2761
012761

1'52711

1554

011546
011 S52

155'5

(It 1';60

l~""
1557
1558
1559
15bO

0\10;64
011572
0\ \574
011600
011602
011610
011614
011620
011626
011632
011636
011640
011642
ot 16 4 &
011654
011656
011660
o t 1664
011610
011674
011676
011702
011706
011712
011714
011720
011724
ott 726
011732
011736
0\1740
011742
011750
0075"
011762
011766
011170
(111712
011774
012000

1551
1552
1553

1561
1562
15&3
1564

1565
1501>

1567
15r,8
'''69
lS 7 ()
1571
1'572

1573
1574
157"
1576
1577
1'178

1579
1580

1581
t5q2
1583
1584
t 585
1'5~6

1587
1588

15R9
1590

1591
1592
1593
1594
1595
1596
t 597
159B

017002
00004

!~99

01200&

1"1)0
16111
1602
1603
1604
If-OS
10;(16

012nlO
012016
012020
012026
012034

012040

012761
052711
I' 32761
001402
('152712
('105722
012761
()1271 t
156122
012761
012711
1'16122
005722
005011
005237
012737
001412
('105011
0(15061
062701
022701
001402
000137
005037
005737
001423
013701
{ll0137
000241
006137
(lOS237
005301
001371
012737
0\3737
000137
104402
005000
(lOOOOO
000776
012716
000002
[100001
002
(1)1256
032737
001114
012737
012737
012102
0\2701)

II-JUL-"
L4118
000100
122113
000400
021264
000400
000010

1610
tfoll

1612

1-'!3
Ib J 4
1615
1611>
ltll7
1618
lb19
1620
11;21
1622
IbB
1624
1625

1626
1 &27
1&28

1629
1630
1631
1632

IbH
1634
1635
1636

1637
1638
16)9
1640
1641
1642

012044
011050
012052
012050
012060
012064
012066
012074
012100
012102
012106
012114
012t 16
1112124
012130
012,36
012142
012144
012146

012152
012154
012162
012164
012172
012114
012200
012202
ot 2206
012214
012220
012222
012224
012226

012230

t645

012'234
012240
01224'
012246
(112250

1646
1647
1648

012252
012254

1643
1644

\649
1650
1651
1652
16'\3
1654
1655

1656
1657
1658
1659
H!"\O
t661
\ ~~ ~

0122'56
o1 2'?&~
012262
(112264

012266
!l12272
012274
(112300
(12)04

012701
010120
012721
022021
020121

I'oy
BIS
!-loy
BIS
BIT
SEQ
SIS

000006
000004
208 I

021324
001400
000004
021344
001400
000004

001310
000020

SlSB

MOY
MOV

000006

001310

3S1

lUI

011264
001306
001310

13$1

001310
001314
4S I

001306
0013-06
000006
00\306
012010
005760

5S1

6S 1

011664

WHICH I
002
000001

001236

000340
012202
001500
000300

000022
000020

MOV

001000
001246

281

MOV
CMP
CfoIP
BLO!
MOV
ROR
BCC
MOV

177776

MOV
MOV
MOV
MOV

000006

MOV
7 ..

012252

177776

005300

000002

MOV
INCB
SNE
SU8
SEQ

MOV
BR
6$1

BIll

381

CLR
ADD
BR

000010

481
1.\00002

BIS
BIC

MOV
ASL
ASL
ASL

ASL
170777
000002

SIC
BIS
CMP

138
(R1)
6(R1)
110,Rl
1164000,Rl

13.
2.
DMACTV
DMNUM
5S
DMNUM, R1
RI,SAVNUM
DMACTV
DMACTV

,SR IF DONE
,JUMP IF NOT
,WERE ANY DMCII'S FOUND AT ALL?
,ERROR AUTO SIZER FOUND NO OM~11'5 IN THIS SYS.
,SAVE NUMBER OF DEVICES
,GENERATE ACTIVE REGISTER Of DEVICES.
,SET THE BIT

1'1
U

16, .. 4
DMACTV,SAVACT
VECMAP
,MERR2
RO

• -2

1148, (SP)

ISR IF MORE TO GENERATE
,RESTORE TRAP VECTOR
,SAVE ACTIVE REGISTER
,GO FIND THE VECTOR NOW,
,NOtIFY OPR THAT NO DMCll'S FUUND.
,MAKE DATA LIGHTS ZERO
,STOP THE SHOw
,DISABLE CONT. SW •
,ENTERED BY NON-EXISTANT TIME-OUT.
,RETURN TO MAINSTREAM

2,2
181100, STRTSW

U40,.,22
. . . , . . 20
,DM.MAP,R2
nOO,RO

ISET lOT TR~P PRIO TO 7
,SET lOT TRAP VECTOR
,SET SOFTWARE POINTER
,FLOATING VECTORS START HERE,

U02,Rl
Rl,(RO)+
(Rl)+
(RO)+, (Rl)+
RlIUOOO

,PC OF lOT INSTR,
,START FILLING VECTOR AREA
,WITH ,+2, lOT
,ADD 2 TO RO +Rl

IBR IF MORE TO FILL
,STORE TEMPORALLY
,BRING OUT A BIT
,BR IF ALL ~ONE
,R4 IS INDEX REGISTER
,SET P! TO

,4,

DMACTV, TEMPI
TEMPI
51
U2,R4
BRLVL(1I4), PS
(fl2),R1
1200,4(R1)
IBIT9'(Rll
U2111l,6(Rl)
UIT91BIT8,(R1)
RO

,-2

t2,R4
6$
BRLVL(R4),PS

t!5300, 2 (R2)
(Rl)

110,1'2
21
(SP),2(R2)
.,,2(R2)
BRLVL+2(R4), R5
R5
R5
R5
R5
U70777,R5
R5,2CR2)
(!P).,(SP)+

,SET ROMI
,PUT INSTRUCTION IN PORT6
IFORCE AN INTERRUPT
,STAt.L
,FOR TIME TO INTERUPT
, GET NEXT LOWEST PS LEVEL
,BR IF R4 • 0
,MOVE NEXT t.OWER LEVEL IN PS
,BR TO DELAY
,NO INTERUPT ASSUME 300 AT LE~EL 5 AND
,CLEAR ROMI
,POP SOFTWARE POINTER
,KEEP GOING
,GET VECTOR ADDRESS
,CLEAR JUNK
,GET BR LEVEL OF OMCll
,SHIFT LEVEl,. 4 PLACES
ITO THE LEFT FOR THE
,STATUS TABLE

nt,esp)

RTS

,ALL DONE WITH "AUTO SIZING"

BRLVLI

,LEVEL
,LEVEL
,LEVEL
,LEVEL
,LEVEL
,LEVEL

MOV
flTI

200

240

000300
000340

300
340

.-4

105777

166712

TST8
BPI.

nKCSR

100375
017703

,WAIT rOF! DONE

166706

HOV

166704

TSTB
BPL
MOV
BtC
PTS

tTKDBR,Rl
fTPCSP

,PUT CHII.R IN F!3
,WAIT UNTIL PRI~TEFI 15 READY

R3,npOIHI

,ECliO Cli/lP

105777
100375

010177

166700

(),2)12

042703

C-ol)HIl

'1\

"~('<(l7

005!

;CLOCK INSTPUCTION(SET DTR)
,LOAD INSTlll'CTIOtl
I CLOCK INSTRUCTION (READ MODEM RtoG)
;IS MRDY SET NOw?
,SR IF NO CONNECTOR
,SET STATUS BIT FOR CONNECTOR
,POP POINTEP
,PUT INSTRUCTION IN PORT6
,PORT4...t.U 15
, STORE DDCM~ LINE • IN TABLE
, PORT6_INSTRUCTION
,Ct.OCK INSTR.
,STORE BMB73 ADD IN TABLE
,POp OVER STAT3
,CLEAR ROMI
,UPDATE DEVICE COUNTER
,ARE MAX, NO. OF DEV FOUND?
,YES DON'T t.OOK rOR ANY MORE,
,CLEAR BIT 10
,CLEAR SEL 6
,UPDATE CSR POINTER ADDRESS

5S1

012172

000000
000000
000200
000240

PAGE I

I LOAD PORT4
,LOAD INSTRUCTIUN

,CLEAR UNWANTED BITS
,PUT BR LEVEL IN STATUS TABLE
,POP lOT JUNK OFF STACK
,SET FOR RETURN

022626
012716
000002
1100207

MOV

000004

000002

000002
000007
012254

ISIT&,4(1'1)
tt22113,oCRI)
,I:IIT8,(1<1)
.021264,&(RI )
ISITS, (1<1)
ISIT3,4(Rl)
20S
_81T14, (1<2)
(R2)+
'021324,6(Rl)
ISIT9IBIT8, (Rl)
4(Rl),(P2)+
1021344,&(Rl)
,BIT8IBIT9, (Rl)
4(Rl), (R2)+
(R2)+
CR1)
DMNUM
nO,DMNUM

11140
PAGE 33
G!:NERAL UTILITUS (TYPEOUT, ERROR, SCOPE, ETC)

lSI

000200
001000
121111
001400

I
.BYTE
TEMPS

MOv
MOV

000004

000012
012252

..IMp
TYPE
CLR
HALT
BR
MOV
RTI

VECMAPI BIT
BNE
MOV

000102

001306
001246

BISS
TST
CLR
INC
CMP
SEQ
CLR
CLR
ADD
CMP
BEQ
..IMp
CLR
TST
BEQ
MOV
MOV
CLC
ROL
INC
DEC
SNE

MOV
HOV

00000.
0013101

11)1771
013737
006037
103063
0127114
016437
011201
012761
012711
012761
012711
105200
001376
162704
001404
016437
000767
052762
005011
062702
000735
051662
042762
016405
006311S
006305
006305
006305
04270S
050'562

TST

MOy
MOV

000006

000006
000010
164000

1)\~H)6

2;,,,

"'Oy

000004
000006

H.CYll 30(1046)
U-JUL-77
I)ZDI'IE.P! 1
12-MAY-77 14118

H09

PAGE 32
!JTlLlTI"S (TYPt",OUT, EflfH1f<, SC'lPE, t:TC)

Ge;NfR~L

040000

OZDIoI~

1-'07
1601!

11140

,-4

JeIT'Il.H!5,Pl
PC

,IoIASK orr LOWER CASE
~1l::;'rURN

PAGEl

0052

nx DMCl1

OZDI'~
MACyl! 3lJ(1046) l1-JUL-77
OZD~I<. I'll
12-MAY-77 14118

PAGE 34
GENF:RAL UTILlT I ES (T'ipEOUT, ERPOR, SCOPE,

11140

1663
1664

I:. TC)

PAGEl

0053

02100

lbb~

16,,6
t 667
1668
1669
1670
1671
1672
1673
1674
167'5
1676
1677
If>7e
lli7'!

1680
1 r,8 1
tf>82
1683
1684

1*************************** TEST 1 ***************************
I *OUT CONTROL REGISTER PEAD/O~JLY TEST
'''DO A foIASTER CLEAR, VE!'!!!"!' THAT ALL FlUD/ONLY
I *BITS ARE IN THE CORRECT STATE
,,*************************************************************
TEST 1
,.....•...•.•..
012320
012326

012737
012737

000001
012374

012334
012340
012344
012346
012350
012354
012360

005077
012702
104414
021224
016104
042704
012705
120504
001401
104002
104400

167044
000011

16~'l

012~64

16116
1687
1688
1699
1690
1691
1692
1693

012366
012370
012372

TSTll

001226
001216

.1, TSTNO
nST2, NEXT

CLR
MOV
ROMCLK

1iI0MCSR
111,R2

0210041<20*11>
000004
0000·54
000020

181

MOV
BIC
MOV
CMPB
BEQ
HLT
SCOPE

4(Rt) ,R4
'S4,R4
.20,IIS
RS,R4
IS
2

,Rl CONTAINS BASE DMCll ADDRESS
,CLEAR SELO
,SAVE R2 FOR TYPEOUT
INEXT WORD IS INSTRUCTIO~, ROMCLK PC-5304
,PORT4_LINE UNIT REG 11
,PUT ·FOUNO" IN R4
,CLEAR UNKNOwN BITS
IPUT "EXPECTED" IN RS
,IS OUT READY SET?
,BR IF YES
,ERROR IN LU 11
I SCOPE THIS TEST

1*************************** TEST 2 ***************************
,*IN CONTROL REGISTER READ/ONLY TEST
1*00 A MASTER CLEAR, VERIFY THAT ALL REA~/ONLY
I*BITS ARE IN THE CORRECT STATE
'1*************************************************************

1/'i'l4

1695
H>96
1697
1698
1699

MOV
MOV

• 2, TSTNO
.TST3,NEXT

000012

MOV
ROMCLK

U2,R2

0210041<20*12>

000004
000017

MOV
BIC
CLR
CMPB

4(Rl)'R4
117,114
R!I
RS,R4

IRI CONTAINS BASE OMC11 ADDRE~S
,SAVE R2 FOR TYPEOUT
INEXT WORD IS INSTIIUCTION, ROMCLK PC-5304
,PORT4.LINE UNIT REG 12
,PUT "FOUNO· IN R4
,CLEAR UNKNOWN BITS
IPUT "EXPECTEO" IN RS
IARE AwL BITS CLEARED?

BEQ
HLT
SCOPE

,BR If' YES
,ERROR IN LU 12
jSCCPE THIS 'TEST

PO/)

012737
012737

000002
012442

1701
1702
1703
1704
1705
1706
1707
1708

012410
111"414
012416
012420
1112424
01243(1
012432

012702
104414
021244
016104
042704
005005
120504

1709
1710
17! 1

012434
012436

001401
104002

(1! ?44n

1n41!OO

TST21

TEST 2
,...............
.

MOV
MOV

0\2374
012402

001226
001216

1712
1713
171 q
1715
17 II)
1717

1*************************** TEST 3 ***************************
,*MOOEM CONTROL REGISTER REA~/ONLY TEST
,*00 A MASTER CLEAR, VERIFY THAT A~L READ/ONLY
i*BITS ARE IN THE CORRECT STATE
'1*************************************************************

171i1

"IACYII 30(1046) l1-JUL·77
DZDMF.• pl1
12-MAt-77 14119

CZD~e:

1719
172'1
1721
1722
1723
1724
1725
1726
1727
1728
1'729
1730
1731

1732
1133
1734

1735

PAGE 35
LINE UNIT J:lEAD/ONLY TESTS

11140

012737
012737

012456
012460
012464
012466
012470
012474
012500
012504
012506
012510
012512

1114412
012702
104414
021264
016104
042704
012705
120504
001401
104002
104400

000003
012514

001226
001216

TST31

MOV

000013

MOV
ROMCLK

1749
1752
17'53
11'54
1755
1756
1757
17'58
17'.i9

li60
1761
1762
1763
1764
1765
17156
1767

'TST4,NEXT
'U,R2

0210041<20*13>

000004
000213
000100

lSI

MOV
BIC
MOV
CMPB
BEQ
HLT
SCOPE

4(1I1),R4
1213,R4
HOO,RS
RS,1I4

,R1 CONTAINS BASE CMCll AOORESS
iMASTER CLZ~R OMCil
,SAVE R2 FOR TYPEOUT
,NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
,PORT4,.I.INE UNIT REG 13
,PUT "FOUND" IN R4
,CLEAR UNKNOWN BITS
,PUT "EXPECTED" IN RS
,ARE RING, OTR, AND MODEM READY SET?
,BR IF YES
,ERROR IN LU 13
,SCOPE THIS TEST

I *******.****.*** •• *** ••• *** TEST 4 **.************************
,*MAINTENANCE IIEGISTER READ/ONLY TEST
,*00 A MASTER CLEAR, VERIFY THAT ALL READ/ONLY
,*BITS ARE IN THE CORRECT STATE
, 1***.****************.*********.******************************
012514
012')22

012737
012737

012530
012532
012536
012540
012542
012546
012552
!l1?!5'5/\
012564
012566
012,)74
012576
012602
012606
012606
012610
012612
012614

104412
012702
104414
021364
016104
042704
012105
1)J2717
001004
032737
001004
042704
042705

000004
012616

120504
001401
104002
104400

001226
001216

TST41

TEST 4
•.......•.••...

MOV
MOV

I4,TSTNO
tTSTS,NEXT

oooon

MSTCLR
MOV
ROMCLK

U7,R2

000004
000206
000051

MOV
BIC
MOV

1748
1750
1751

, TEsT
,MOV
.••.•....•••..
.3,TSTNO
MSTCL~

1743

1747

0210041<20.17>

020t}OO

t'H)~~~e

040000

001366

000040
000040

w.i. T

25.

la,

1 ..

BNE
BIT
BNE
BIC
BIC

CMPB
BEQ
HLT
SCOPE

4(Rl),R4

il206,R4

.Sl,R5
iSit,:;, 5iilii
2.

,BIT14,STATI

UO,R4
fBITS,R5
RS,R4
11
2

,Rl CONTAINS BASE DMCII ADDRESS
,MASTER CLEAR DMC!l
,SAVE R2 FOR TYPEOUT
fNEXT WORD IS INSTRUCTION, ROMCLK PC-5304
IPOPT4.LINE UNIT REG 17
,PUT "rOUND" IN R4
,CLEAR UNKNOWN BITS
,PUT "EXPECTED" IN R5
JIB LU Aft M82u2 O~ M82011
,BR IF MB202
,CONNECTOR???
JBR IF M820! WITH CONNECTOR
,MASK O~F 51 BIT IF M8202 OR M8201, NO CONNECTOR
,SI BIT Is UNKNOWN
,ARE 51 AND ICIR SET?
,BR IF YES
,ERROR IN LU 17
I SCOPE THIS TEST

1768

1769
1770

1771
1772

1713
1774

0054

012442
012450

1736
17)7
1738
1739
1740
1741
1742
1744
1745
1746

PAGEl

,*.**.*** ••• **.* •••• *****.*. TEST S **************.******~*****
I*LINE UNIT REGISTER WRITE/READ TEST
,*SET BIT! IN LU REGISTER 12, VERIFY IT IS SET
,.CLEAR BITS IN LU REGISTER 12, VERIFY IT IS CLEAR
,,************.*********.**************************************

DZDMfo:
"'~Cyll 30(1046)
II-J\IL-77
CZ,D"F,l'1\
12- MAy-n 14118

11140
PAGE. 31,
LI'<E l:~T'i wPlTfo:lRrAD TESTS

1715

TE:ST 5

PH
1777
171 ~
l1B

pen
\7A I

1112" 1 b
012621
012632
0121;40

1782

ot 2642

IH3
lIe 4

nt 2646
0126S4
(l126S6
01261>0
nl26b2
012664
1112670
('112674
012700
012702
(112704
('112706
012710
012716
012722
012724
012726
012730
012732
012734
012740
012744
012746
012750
012752
012754

178!\

17S6

178 1
1788
179'1

179n
1791

1792
1793
1794
1795

1796
179 1
1798
t 799
t 8o'l
1901
180?
IR03

1804
11:105
lB06

1807
IRuB

012737

(112737
012737
104412
012702
"' 2761
11)4414
122112
104414
021245
012705
116104
(142704
120504
(J01401
104003
\04401
012737
005061
1114414
122112
104414
021245
00S005
llbl04
042704
120S04
001401
104003
104401
104400

000005
012756
012646

000012
on0040

001226
001216
001220

T5T51

"STCLR
MOV
000004

lSI

000040
000005
0(10337

2$,
012716
000004

001220
3$1

MOVB
BIC
CMPB
BF.Q
HLT
SCOPI
SCOPE

lE1t4
IStS
IBtb
lB17
I RIB

1)12'756
01:/7"4

012737
012737

000006
013116

001226
001216

1821
11312
11:123

012772

012737

013006

001220

III '000

104412

1824
lP.2S

013002
013006
()13014
0130 \ f,
013020
'.l1 '022

012102
000017
012761
000001
104414
122117
104414
!l21365
012705000001

IS 33
1834
I IllS
1831\
1S1H
1838
1839
1840
1841
1842
1843
H44
, ~ 4t;

1846
1847
1848
1[14'1
11'J5CJ
1851
1852
1853
lB'i4
1 R55
\ 85b
1857
1858
1859
1860
11361
1862
1863
1964
11365
18(1)
1967
1868
1 ~69
1810
1871
1872

(113024

0130311
013034
0130 4 0
013042
013044
0130 4 6
013050
013056
0130&2
013064
01306"
013070
013072
013074
1\11100
013104
013106
0131 10
013112
0131 14

116104
040'704
120504
()01401
104003
104401
012737
00S061
104414
122117
11)4414
021365
00S005
116104
042104
120504
001401
104003
104401
104400

012737
012737

013140
0131 4 2
0131 46
()13152
(113152
()llt56
01lt64
013166
'')\3170

104412

012737
~12702

()12700

013\72
013174

"tH76

04110'5

jB17

(\13202
013201>

Ubl'l4
042704
120')04
;)01401
1'14003
104401
'100241
t 06100
1J~135 1
'.1 I 2~ 37

I. ~ 8 3

1.8"4
1825
~ ~ 0 ~

4,
3

TST6.

TEST 6

MOV
MOV

.6,TSTNO
nST7 , NEXT

MOv

US,I.OCJ(
,Rl CONTAINS BASE DMCl1 ADDRESS
.
,MASTER CLEAR DMCll

MOV
MOV
ROMCLJ(
122117
ROMCLK
021365
MOV

000004

",RS

,SAVE REGISTER ADDRESS rOR TYr>EOUT
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, ROMCLK PC=5304
,SET eITl IN LU-17
,NEXT WORD 1S INSTRUCTION, ROMCLK PC=5304
IREAD LU-17
,PUT "EXPECTED" IN RS

11140 PAGE 37
LINE !.'>,!!T WRITE/READ TESTS

000005
000376

2$1
013056
000004

t17,R2
11,4(Rl)

001220

Move
SIC
CMpS
SEQ
HLT
scaPI
MOV
CLR
ROMCI.K

5(Rl),R4
t376,R4
R5,R4

2.
3

122117

000005
000376

4$1

ROMCI.K
021365
CI.R
MOVS
SIC
(;MP8
SEQ
HI.T
SCOP!
SCOPE

R5
S(Rt),R4
tl76,R4

PAGE:!
,PUT "fOUND" IN R4
,CLEAR UNWANTED BITS
,IS BITI SET?
,SR IF YES
,ERROR, BiT 1 IS NOT SET
,SCOPE SUBTEST (SW09 a l)
,NEW SCOPI
,LOAD PORT4
,NEXT wORD IS INSTRUCTION, ROMCI.K PC_5304
,CLEAR BIT 1 IN LU-17
,NEXT WORD Is INSTRUCTION, ROMCLK PC-5304
,READ LU·17
,PUT "EXPECTED' IN R5
,PUT "FOUND" IN R4

'~~E~~_~N~~~:~~ eITs

'""u·,.

rI!I,rI~

.... ~

U
1

,BR If YES
,ERROR, BITl IS NOT CLEAR
,SCOPE sUeTEST (S~09-1)
,SCOPE THIS TEST

0 .....

~ ..

1 3'2 t;I

013214
() 13216
013220
013'227(lD,:?4
013226

," ),3'1

000007
013326
013152

001226
001216
0012:Z0

TST71

J ••••••••••••••
MOV
t7, TSTNO
MOV
tTST10,NEXT
MOV
164S,LOCK
MSTCLR
MOV
MOV

000013
000001

U3,R2
U,RO

,I'll CONTAINs BASE DMC11 ADDRESS
,MASTER CLEAR DMC11
.
I SAVE REGISTER ADDRESS rOR TYPEOUT
,STAflT wITH BIT 0

64$1

leH
I R7 9
l 88n
18 ij I
I ij ~ 2

R5
5(Rll,R4
,337,R4
R5,R4

TEST '7
013116
013124
013132

1974
1875

1978

nS,LOCK
4(Rl )

,PI ~ONTAINS BASE D"'Cll ADDRESS
,~ASTER CLEAR O~Cll
J SAVE REGISTER ADDRESS FOR ryr>EUUT
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, ROMCLK PCa5304
,SET BIT5 IN LU-i2
,NEXT WORD IS INSTRUCTION, ROMCLK PCa5304
,PEAD I.U·12
,PUT "EXPECTED" IN RS
,PUt "FOUND" TN R4
,CLEAR UNWANTED BITS
,IS BITS SET?
,SR IF YES
,ERROR, BIT 5 IS NOT SET
,SCOPE SUBTEST (51'109 .. 1)
,NEW SCOP1
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, ROMCLK PC~5304
,CLEAR BIT 5 IN LU.12
,NEXT WORD IS INSTRUCTIO~, ROMCLK PC~S304
,READ I.U.12
,PUT "EXPECTED" IN R5
,PUT "rOUND" IN R4
;CI.EAR UNWANTED BITS
,IS eIT5 CLEAR?
,8R IF YES
,ERROR, SITS IS NOT CLEAR
,SCOPE SUSTEST (SW09111)
,SCOPE THIS TEST

'*************************** TEST '7 ***************************
,*I.INE UNIT REGISTER WRITE/READ TEST
,*FLOAT A 1 THROUGH I.INE UNIT REGISTER 13
,*FLOAT A 0 THROUGH LINE UNIT REGISTER 13
'1*************************************************************

010061
1142761
104414
122113
104414
021265
010005

19n

HO,R5
5(Rl)'R4
037,R4
R5,R4
2$
3

MSTCLR

DZDI'E
..,ACyll 30(1046)
l1·JUL-77
DZDt-\[,Pl1
t2-MAY-77 14118
1~32

*12,R2
140,4(Hl J

,.......••..•..

\!llQ
1820

1831

#S,TSTNO
ITST6, NEXT

'1$, LOCK

'*************************** TEST 6 ***************************
,*I.INE UNIT REGISTER WRITE/READ TEST
,*SET SITI IN LU REGISTER 17, VERIFY IT IS SET
,*CLEAR BITI IN I.U REGISTER 17, VERIFY IT IS CLEAR
,1*************************************************************

lfl13

11327
I R2ll
11329
1 ~ 3(1

MO~

ROMCLJ<
122112
ROMCLK
02124S
MOV
MOVB
BIC
CMPB
BEQ
HLT
SCOPI
MOV
CLR
ROMCI.K
122112
ROMCI.K
021245

CI.R
000005
000337

181)9
11:1 I 0
tEl11
1812

IR2!>

:-.-- ... -._----

MOV
MOV
"'OV

000004
000257

00()257
000005
')00251

013244

000004

RO,4(R1)
MOV
1237,4(Rll
SIC
ROMCLK
122100113
ROMCL!!:
210051<t3*20)
MOV
RO,R!
SIC
'257,1=15
MOVS
5(Rl),R4
SIC
1257,1=14
CMPS
R!5, 114
B!Q
65.
HLT
3
SCOPI
CLC
POLI'I
RO
b'lt:
641
MOV
U7S,LOCl(

,PUT PATTER~ INTO PORT4
,CLEAR UNWANTED 8ITS
,NEXT WORD IS INSTRUCTION, ROMCLK PC_5304
,MOV DATA TO Ieus REGISTER 13
,NEXT WORD IS I~STRUCTION, POMCLK PCII53C4
,READ FRO~ leus REGISTER 13
,PUT EXPECTED IN R5
,CLEAR UNWANTED BITS
,PUT "rOUND" INTO R4
,CLEAR UNWANTED aITS
IDAU CORRECT'
.1 SR IF YES
,ERROR
, SWogaU
,CLEAR CARRY
,SHIfT BIT IN PO
I If RIJ-O !!<r~ ~C;,;E
I NElli SCOFl

0056

11·JUr..·77
DZDME'
"'ACyll 30 (1046)
t2·MAY·77 14118
DZDMF.i'11
1887
1~ ~ 8
tRa9
1890
1891
18'12

1[193
1894
1895
189&
1897
! 89~
1899
19110
1 QOl
190.
190)

1904
1905

1906
1907
1908

Ot 3236
013242
(J 13244
013244
013250
u,3'256
ot326i')
I) 13262
0132 64
o 1326b

013270
1113274

1!t3)00
013304
013]06
013310
013312
ot 3314
013316
013)20
013322
013324

(\ 127 00
005100

OOOno 1

010061
042761
104414
! 22113
1 "4414
0'21265
010005
042705
116104
042704
120504
001401
104003
104401
00'5100
000241
106100
001347
104400

0(J0004
000257

PAGtl

11140 PAGE H
LINE Ui,n, ~RlTE./READ TESTS
b"al
!'HI

000004

000257
000005
000257

68$1

MOV
COM

'I,RO
RO

1<0,4(;;1)
MOV
1257,4(111'
SIC
RClMCLK
122100113
ROMCLK
210051<13*20>
RO,R5
MOV
#257,1<5
SIC
5CR1),R4
HOVS
'257,R4
SIC
CMpS
R5,R4
BEQ
68S
HLT
1
SCOPI
RO
COM
CLC
ROLB
RO
SNE
695
SCOPE

0057

,START >il'CH aIT 0
ICIiANGE TO FLOATING ZEIIO
,PUT PATTER" INTO PORT4
,CLEAR UNWANTED BITS
:NEXT fiORD IS INSTRUCTION, ROMCLK PC=5304
;MOV DATA 70 InUS REGISTER 13
:NEXT WORD IS It.STRUCTION, ROMCJ..K PCaS304
,READ FROM IBUS REGISTER 13
,PUT EXPECTED IN R5
;C~EAR

UN~AN!ED

aIrS

,PUT "FOUND" INTO R4
,CLEAR UNWANT!W SITS
,DATA CORRECT?
lSR IF YES
,ERROR
,SW09:111
,CHANGE TO FLOATING
,CLEAR CARRY
, SHIFT SIT IN RO
1 IF RO-O THEN DONE
,SCOPE THIS TEST

1909
1910
1911
1912
1913
1914
1915
lqt6
1917
1918
1919
1920
1921
1922
19'23
1924
1925
1926
i 9'2;
1928
1929
1930
1931
1932
1933
1934
1935
193b
1937
1'138
1939
1940
1 94 1
194,

'*************************** TEST 10 ***************************
,*LINE UNIT REGISTER WRITE/READ TEST
,*FLOAT A 1 THROUGH LINE UNIT REGISTER 14
I*FLOAT A 0 THROUGH LINE UNIT REGISTER 14
tI
***.~
*~"** ~**~!oo!o!oo!'!-!--!'!-!!-~~~-=-

*******•• ***********.***.*** ...

,,....•.•.•.....

000010
0135'()2
013362

001226
001216
001220

i9ij~

1983
1984
!geS
198t>
1987
19@8
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998

TST101

MOV
HOV
MOV

UO,TSTNO
nSTll,NEXT
UU,LOCK

MSTCLR
MOV
MOV

U4,R2
H,RO

0133 26
013334
013342

012737
I1t2737
012737

013]SO
013352
013356
013362
013362
013366
013370
013372
013374
013)76

104412
1)12702
o t 2700
01006i
104414
122114
104414
()21305
01000S

000004

RO,4(RO
MOV
ROMCLK
122100114
ROMCLK
210051<14*20>
MOV
RO,RS

013400
013404

116104
120!;04
001401
104003
104401
'100241
106100
{101360
fJt 2737
()12700

000005

MOVS
CMPS
SEQ
HLT
SCOPI
CLC
ROL8
SNE
MOv
HOV

i)1340~

1)13410
013412
013414
013416
013420
011422
01343(1

000014
000001

••

013434
013436
Ot3436
Ul3442
013444
013446
UI3450
013452
Oi3454
013460
013462
013464
0134&6
013470
013472
013474
013476
013S00

,Rl CONTAINS SASE DMCll ADDRE~S
,MASTER CLEAR DMCll
,SAVE ~EGISTER ADDRESS rOR T¥PEOUT
,START WITH SIT 0

64$1

65$1

013436
000001

001220

MACVI t lO( 1(46)
11·JUL·7?
DZD"'E
DZDI'f.;.?11
12-"1AY·77 14118
1943
1944
1945
t 94b
1947
1948
1949
1950
i;'5t
1952
1953
19S4
195'5
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
19&9
t 970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1991

......

TEST 10

RO
64.
U7.,LOCK
.1, RO

,PUT "FOUND" INTO R4
,DATA CORFlECT1

j6R Ii iES
'ERROR
I SW09 a l?
, CLEAR CAFlJlY
,SHIFT SIT IN RO
!IF 110-0 THEN DONE
,NEW SCOPI
,START WITH BIT 0

11 :40 PAGE 39
LINE UNIT WRITE/READ TESTS

005100
010061
104414
122114
104414
021305
010005
i 11)104
120504
001401
104003
104401
005100
000241
106100
001356
104400

5(Rl),R4
R5,R4
65=
3

,PUT PATTERN INTO PORT4
,NEX~ WORD IS INSTRUCTION, ROMCLK PCII5304
,~OV DATA TO ISUS REGISTER 14
,NEXT WORD IS INSTRUCTION" ROftlCLK PC"5304
,READ FIIOM IBUS REGISTER 14
, PUT EXPECTED IN RS

6981
6HI
000004

000005

6UI

COM

RO,4(R1)
MOV
ROMCL!!:
122100114
ROMCLK
210051<14*20>
. RO.R5
HOV
MOVS
SCR1),R4
CMPB
RS,R4
SEQ
6U
HLT
3
SCOPI
COM
RO
CLC
ROLB
RO
SNE
·.69'
SCOPE

PAGEl
,CHANGE TO FLOATING ZERO
,PUT PATTERN INTO PORT4
,NEXT WORD IS INSTRUCTION, FlO~CLK PC-S304
,MOV DATA TO ISUS REGISTER 14
,NEXT WORD IS INSTRUCTION, ROftlCLK PCaS 304
,READ FROM ISUS REGISTER 14
~ PUT ~XPECTE:O

IN R!

,PUT "FOUND" INTO R4
,DATA CORRECT?
,SR IF YES
,ERROR
,SW09-l ?
,CHANGE TO FLOATING
,CLUR CAIIRY
, SHIFT SIT IN RO
,IF ROllO THEN DONE
,SCOPE THIS TEST

, *************************** . TEST 11 ***************************
,*SWITCH PAC TEST
,*THIS TEaT READS SWITCH PACU
l*THIS SWITCH PAC CONTAINS THE DOCNP LINE.
, I **************************************************************

013502
00510

0127]7
012737

013516
0135211
Ot 3522
013524
013530
013534
013536
013540
013542

104412
104414
021324
016104
113705
120504
001401
104031
104400

000011
013544

001225

TEST 11
,...••......•..
TSTUI

001216

HOV
MOY

t11,TSTNO
nSTI2,NEXT

MSTCLR
1I0NCLK
021324
MOV
MOVS
CMpS
SEQ

000004
001370

---

111

SCOPE

4(Al),R4
STAT2,R5
R5,R4
IS

,Rl CONTAINS BASE DHCll ADDRESS
,MASTER CLEAR DMCll
,NEXT WORD IS INSTRUCTION, ROMCLt( PC-Sl04
, PORT4..LU15
,PUT "FOUND" IN R4
,PUT "EXPECTED' IN R5
,SW OK?
,Sf! IF' yES
j ~HRQ~, onI'i'Cii ~A\: REALI Ei'ii'iOi<
,SCOPE THIS TEST

'*************************** TEST 12 ***************************
,*SWITCH pAC TEST
,*THIS TEST READS SWITCH PAC.2
I *THIS SWITCH PAC CONTAINS THE SM813 BOOT ADD
, I **************************************************************
TEST 12
J••••••••••••••

013544
013552

012737
012737

013560
013562
013564

104412
104414
021344

000012
013606

001226
001216

TST121

MOV
MOV
MSTCLR
ROMCLK
021344

112,TSTNO
tTSTU,NEXT
,Rl CONTAINS BASE DHCll ADDPE6S
,MASTER CLEAR ONCll
,NEXT WORD IS lNSTRUCTION, ROMCLK PCIIS)04
,PORT4_LU16

0058

DZDl.1f
'~ACY11 3[1(1046)
II-JIlL-n
,)ZD"F,P1\
12-"IA,{-77 14119
1 '19'1
201)(1

2(1(11
20')1
2o~3

2004

013566
n13c;72
(113'576
n I J",OO

013602
013604

lJ 161 04

113705
120'504
00 110\
10403t
11"/44('0

11140
PAGE 40
LINt:: li'<lT ~Pln,IIH;AD TESTS
'~nv

000004
00 I 37t

I-IOVS
C"P8
SE"Q

flLT
SCOPE

4(R1).F4
STAT2otl,R5
1'5, P4
11
31

I PUT "f'(lUND" iii 1<4
,PUT "EXP~CTED" IN R5
;SW OK?
,I:!P IF YES
I ERROR, SWITCH PAC READ ERROR
,SCOPE THIS TEST

'005
2006
2007

'*************************** TEST 13 ***************************
,*LINE UNIT CLOCK rEST
'*THIS TEST VERIns THAT THE LU INTERNAL CLOCr<
1*(I:'1T 1 Ih LU-17) IS WORKING
, 1************************* ************ *** **********************

20(1"
20()Q
2010
20\ I
20\ '2

2013
20\4
2015
201 b
2017
2018
2019
2020
2021
2022
20,l
2024
2025
2026
2027
2029
2(129
2030
2031

,on

TEST 13
,..............
.
013606
013614

0\2737
0\2737

013622

10441 ,
005037

013624
(113630
1113630

013632
(113634
013642
013644
013650
013652
(113654
013660
013660
013662
c'13664

2033

013672

2034
2035
,o36
2031
203R
2039

1113674

013700
013702
013704

000013
0\3706

001226
001216

TST131

MSTCLR
CLI<

001416

001416
001416

2'1

000Cl02

000004

001416

4'1

.,,,,.,Q

0\2737
n12737

000014
014006

0\3722
0137:14
(1\3730

\04412
0127\1
1)12761

004000
000001

013136
f'1374n
013142
013744
013746
013752
013156
013760
(11371>2
013766
rll3712
011776
014000
014002

I044!4
122111
104414
122110
ln4416
012102
104414
02131>4
016104
042704
012705
120504
001401
104005

012737
(l12737

20~5

2092
209l

014022
014014
014030
')14036
014040
01 4 0 4 2
014044
01 4 046
014052

2094

014056

104412
012711
012761
11)4414
122111
104414
122110
004'37
104415
012702
104414
021224
016\04
042704
012105
! 20'11)4
001401
104005

209 \

2095

014062

014064

210D

0\41)66
0\40 7 2
1\14016
0!4I"'2

2101

0\ 4\04

2102

n14! Of>

~Iol

014110

'104
'105
210/\
:lll'7

014110
014114

:i1

001226
001216

71 1 ~.

T5T141

000004

HOV
MOV

114,TSTNO
t'l'ST15,NEXT

MSTCLR
MOV
MOV

tBITll'(Rl)
11.4(1'1)

ROMCLK
122111
ROMCLK
122110
TIMER,
MOV
ROMCLK
021364
MOV
BIC
HOV
CMPB
BEQ
HLT

000004
000357
000020

IRl CONTAINS BASE DMCll ADDRESS
IMASTER CLEAR DMC11
,SET LINE UNIT LOOP
,LOAD PORT4 wITH BITO

PAG~!

11140 PAGE 4t
BASIC TPl,NSMlTTER TESTS

000002
000017

104400

4(Rl" FI4
U!l7,Fl4
.20,Fl5
RS,F14
1$

,NEXT wORD IS INSTRUCTION, ROMCLK PC-5l04
,SET SOM
INEXT WORD IS INSTRUCTION, ROMCLK PCc5104
ILOAD OUT D~TA SILO
,WAlT FOR OCOR
,SAVE ADDRESS FOR TYPEOUT
,NEXT wORD IS INSTRUCTION, ROMCLK PC-5304
I PORT4_LU 17
,PUT "FOUND· IN R4
,CLI!:AR UNwANTED BITS
,PUT ·~XPECTED· IN 1'15
,IS OCOR SET?
,SR IF YES

SCOPE:

I) \ 41 16

TEST 15
,.............
.
000015
014144
004000
000001

01 4 130
I!. 1 ::14

001226
001216

TST151

MOV
MOV

U!I,TSTNO
nST16, NEXT

MSTCLR
MOV
'BITll'(R1)
MOV
11,4(R1>
ROMCLK
122111
!lOMCLI(
122110
.:ISR
PC,OCOR
DATACLK,
MOV
'1l,R2
ROMCLI(
021224
4(R1),R4
MOV
BIC
U57,R4
MOV
1120,RS
CMP!
!l5. R4
SEQ
11
HLT
!5

000004

026350
000002
000011
000004
000257
000120

,Rl CONTAINS BASE DHCll AODRE~S
,MASTER CLEAR DMC11
,SET LINE UNIT LOOP
,t.OAD PORT4. WlTH BITO
,NEXT WORD IS INSTRUCTION, FlOMeLK PC-5304
,SET SOM
,NEXT WORD IS INSTRUCTION, ROMCLK PC-al04
,LOAD OUT DATA SILO
,WAlT FOR OCOR
,CLOCK DATA FOUP TIMES
,SAVE ADDRESS FOR TYPEOUT
; NEXT WORD IS INSTRUCTION. 1't0MCLK PC_5304
,PORT4.,.LU 11
,PUT "FOUND" IN R4
,CLEAR UNWANTEO SLTS
,PUT "EXpe;CTEO" U R5
,IS ACTIVE SET?
,SR IF YES

! !,
012702
104414
1)21264
016104

000013

n. 1)1')1 4t4 12421\ "12705
042704 000337

21 P9

**** •••• **.*******.*.*.* ••• *.*********************************

, ***-* •• ** ••• *****.****** ••• TEST 15 ********-*._***.******-****
,.ODCMP TEST OF RTS AND OUT ACTIVE
,*SET SOM AND LOAD OUT DATA SILO
,*SINGLE STEP 2 DATA CLOCKS, VERIFY
,*THAT RTS AND ACTIVE ARE SET
, ,.-.*.*.-•• ** .*.**** *** •• ***-*.**.********** ***.*. *.****** ** *.*

2096
2097

2098
2099

3S
4

,NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
, PORT4_LU-17
,IS CLOCK BIT CLEAR?
,BR IF.YES
,DELAY
,BR IF DELAY NOT DONE
,ERROR BIT IS STUCK SET

IH 41104

014006
014014

2099
2090

.2,4(1'1)
4$
TEMP

14
,-._TEST
.. _.......
.
013106
013714

014004

208~

POMCLK
021364
BIT
BEQ
INC
SNE
MLT
SCOPE

2070
2071
2072
2073
2074
207'5
2076
2077
207R
2079
2080
2081
2082
20a3
2084

2096
2097

U
4
TEMP

,NEXT WORD IS INSTRUCTION, ROHCLK PCa5304
,PORT4_LU-17
,IS CLOCK BIT SET?
,SR IF YES
,DELAY
,DELAY FINISHED?
,I!:RROR Bl.T IS STUCK CLEAR
,PREPARE FOR DELAY

,***.*.****** •• *** •• * •• *.*** T!l:ST 14 ****.****.*********.*******
,*OUT DATA SILO TEST
,*SET SON AND LOAD OUT DATA SILO
,*VERIFY THAT OCOR SET, INDICATING THAT THE
,*CHAFIACTER IS AT THE BOTTOM OF THE OUT SILO

DZDME
"ACYII 30(1046)
ll-JUL.'T7
OZO!>'E.Pll
12-'IA'!-77 14118

20,,0
201>1
2062
201'>3
2064
201>5
201>6
'2067
20,,9

BNE
INC
BNE
HLT
CLR

.2,4(1'1)
2S
TEMP

3S1
In4414
02131>4
1)32761
1)0\404
005237
001367
104004
104400

2043
2044

2058
20,)9

,1'1 CONTAINS RASE DMCll ADDRESS
,MAST!R CLEAR DMCli
,PREPARE FOR DELAY

TEMP

ROMCLK

BIT

000004

2041

200;5

tTSTI4,~EXT

021364
nooo02

2042

'0')6
20S7

tt3,TSTNO

lSI
104414
021364
r32761
001004
')05237
001367
104004
005037

2040

2045
7046
2047
204B
2049
2050
70S\
7052
2053
'0')4

!>I (I V
!>IOV

000004

000(140

12051\4

MOV
RCIMCl""
02126,0,
MOV
B!C
MOV
(;1>1"8

4(RU ,1<4

']37,M
'BITS.p~;

P!l,1<4

,SAVE ADDRESS rOR TYPEOUT
, >4EXT wORD t 5 I NSTFlUC nON, FlQMCLJI; PC"5l~4
,POIolT4_LU 13
,PUT EXPECTED IN A4
:CLEAP UNWA~TEO Bns
,PUT "EXPECTED" E~ R5. prs IMOU~D 81 s~r
1 IS ~r·~ Q1C;?

0060

DZD~~~

MACyl1

DZO",.:.t'lI
211 !
2112
21\ 3
2114
211 '5

30(1046)

12-~~Y-77

014131>
1114140
o t 414;1
O~ 4142

'1·JU~-77

11140

14118

TP;'fJS~lTTF.R

2141
2142

2143
2144
2145
2141:>

2147
2148
2149

2150
2151
2152
21 OJ 3
210;4

21 '55
215'"
2157
2151l

2159
2160
2Hit
2162
2163
2164
2160;

21bn

2167
211>8
2170
2171
2172
2173

0141 44
014152

012737
012737

014160
01 4 16:.!
014166
014174
01 4 1 76
014200
014202
014204
1)14210
014214
1)14222

104412
012711
012761
1(14414
122111
104414
122110
004737
1114415
012761
104414
122111
'1)4415
012702
104414
021364
016104
042704
1)05005
120504
001401
104005

(I! 42<!4

014226
014232
014236
014240
014242
014246
014252
014254
014256
014260
014262
014262
111 4 266
014270
014272
014276

004000
000001

000004

026350
000002
000200

000004

014310

014312
(114312
014116
014320
1114)22
014326

012702
104414
1121224
016104
012705

014332
014334
014336
014340
014340

MOV
MOV

U6,TSTNO
.TST17,NEXT

MSTCtoR
MOV
18IT11 rC Rll
MOV
'1,4(R1)
ROMCLK
122111
ROMCLK
122110
JSR
PC,OCOR
DATACLK,
2
MOV
IBIT7, 4 (Rll
ROMCLK
122111
DATACt.K,
MOV
U7,R2
ROMCLK
021364
4(R1) ,F14
MOV
SIC
U57,R4
CLi<
R5
CMpS
R5,R4
BEQ
18
HLT
5

000001
000017
000004
000357

lSI
(112702
104414
021264
011>104
042704
005005
120504
001401
j0400S

014302
014304
014306

000016
014342

TST161

PiCV
ROMCLK
021264
MDV
SIC

000013
000004
000337

CLR
CMPB
SEQ

,Rl CONTAI~S BASE DHCll ADDRESS
, MASTER CLEAR OMC 11
,SET t.I~E UNIT LOOP
ILOAD PORN WITH BITO
,NEXT WORD IS INSTRUCTION, ROMC~K pCa5304
,SET SOM
,NEXT WORD IS INSTRUCTION, ROMCLK PCa5304
,t.OAO OUT OATA SILO
,WAlT FOR OCOR
,Ct.OCK DATA FOUR TIMES
,SET BIT7 IN PORT4
,NEXT WORD IS INSTRUCTION, ROMCLK PCa5304
,SET OUT CLEAR
, linE A TICK TO Ci"Ei<R RiS
,SAVE AOORESS FOR TYPEOUT
,NEXT WORO IS INSTRUCTION, ROMCt.K pCa5304
IPORT4_LU 17
,PUT "FOUND" IN R4
,CLEAR UNWANTED BITS
IpU: "EXPECTED" IN R5
,IS OCOR Ct.EARED?
IBR IF YES

U:i,R2

,SAVE ADDRESS fOR TYPEOUT

4(Rl),R4
4I337,R4

,NEXT WORD IS INSTRUCTION, ROMCLK PCa5304
,pORT4.LU 13
IpUT EXpECTEO IN R4
,Ct.EAR UNWANTEO SITS

IN R5,

,PUT "EXpECTEO·
,IS RTS OK?
,BR IF YES
,RTS ERROR

4(RO ,R4
IBIT4,R5

,SAVE ADDRESS FOR TYPEOUT
,NEXT WORD IS INSTRUCTION, ROMC~K PCaS304
,POPT4.LU11
,PUT "rOUND" IN R4
,ONLY OUT READY SHOUt.D BE SEt

R!5, R4
2.

RTS SHOUt.D BE CLEARED

2$1
MOV
ROMCLK
021224
MOV
MOV

000011
000004
000020

11140 PAGE 43
BASIC TRANSMITTER TESTS

120504
001401
104005

CHpB
BEQ
Ht.T

PAGEl
R!S,R4
3S

,IS ACTIVE CLEAR?
,BR IF YES
,ERROR ACTIVE NOT CLEARED

381
104400

, ,SCOPE THIS TEST

SCOPE

j ..... ;..;r;;.;; ... .;..;. .. ';Bt~ .. ~'I~~;..;::;~~,,~ T!S~ 1'1 '!te-ite·!Ht**.***'*****."" ....... .
,*DDCMP TRANSMITTER TEST
,*SINGt.E CLOCK THE CHARACTER 0
,*VERIFY EACH BIT POSITION AS IT
,*pASSES THE BIT WINDOW (SI BIT)
,*ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE
,1**************************************************************

2177

'IRO

2222

,SCOPf' THiS Ic;ST

TEST 16
,.............
.
001226
001216

217ij
2179

2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221

I RTS ERROII

'**********l!**************** TEST 16 *****"''''*****.****.*********
,*TEST OF OUT: CLE:"R
IIISET SOM ANO LOAD OUT DATA SILO
I*SINGLE STEP DATA CLOCK, SET OUT CLEAR
,*VERIFY THAT OCOR,RTS, AND ACTIVE ARE CLEAPED
, I *.*********** •••• ***** ••• * •• ** •• *****.******************.*****

2; 74

2189

I~R

SCOPE

t04400

·2175
2176

21 B 1
2187
21 R3
21 R4
2185
2186
2187
2188

If' YES

2.
5

2$1

DZDME
MACY11 30(1046)
U-JUL-77
DZDtAE.pl t
12-MAy-n 14118

21(,9

0061

TESTS

SEQ
liLT

001401
11)4005

211fo
,1 I 7
2i i 8

2119
2120
2121
2122
2123
2124
2125
21 if,
2127
2128
2129
2130
2131
2132
2133
2134
2135
2136
2137
2138
2139
2! 40

PAGt;1

PAGE 42

BASIC

014342
014350

012737
012737

014356
014360
014)64
014370
014376
014400
014402
014406
014412
014416
014420
014422
014426
014430
014432
014436
014442
014444
014446
014452
014454
014456
014460
014464
014466
014470
014470
014472
014476
014500
014504
014506
014'510
014516
014'520
Ot 4'522

104412
012711
004737

012761
104414
122\1 1
012705
004737
010561
104414
122110
004737
005003
010502
104415
104415
106002
103005
004737
103406
104006
000404
004737
103001
104006
005203
022703
001357
104415
104414
021264
0]A!761
0(11401
104034
104400

000017
014524
004000
0265Q2
000001

001226
001216

TEST 1'7
,.............
.
TST171

000004

000000
026502
000004
026350
000002
000001

1'1

026316

2S1

MOV
MOV

'17,TsTNO
.TST20,NEXT

,Rl CONTAINS BASE ONCll ADDRESS
MSTCLR
,MASTER CL~AR OMC11
MOV
IBITll,cR1)
,SET LINE UNIT LOOP
JSR
pC,OUTROY
IWAIT FOR OUT-READY
MOV
1i,4(R1)
iSET 8ITO IN pORT4
,NEXT WORD IS INSTRUCTION, ROMCLI( PCa5304
ROMCLK
,SET SOMI
122111
MOV
IOrR5
,LOAD CHARACTER IN R5 FOR TYPEOUT
pC,OUTROY
JSR
,WAIT FOR OUT-READY
MOV
ILOAD pORT4 WITH CHARACTER
R5,4(Rl)
,NEXT WORD IS INSTRUCTION, ROMCLK PC.5304
ROMCLK
,t.OAO OUT OATA
122110
JSR
PC,OCOR
,WAIT FOR DCOR TO SET
Ct.R
Rl
,CLEAR BIT COUNTER
MOV
R5,R2
,LOAD CHARACTER IN R2
OATACLK,
,2 TICKS TO SET UP TRANSMITTER
DATACLI(,
,SHIFT NEXT BIT IN THE WINOOW (SI BIT)
,SHIFT NEXT SOFTWARE 81T IN TO CARRY
RORB
R2
,BR IF CARRY CLEAR
BCC
2.
,GET TiiE Jij;Nuun
JSR
i'c,iiETSI
,SR IF BIT IS A MARK
BCs
3S
,ERROR BIT WAS A SPACE
Ht.T
6
,CONTINE loIITH TEST
BR
31
,GET THE WINOOW
JSR
PC,GETSI
BCC
3S
,BR IF BIT IS A SPACE
,ERROR BIT WAS A MARK
Ht.T
6

lSI
000010
000014
000040

000004
411

INC
R]
CMp
HO,R3
SNE
11
DATACLK,
RDMCLK
021264
BIT
IBITS, 4 (1'1)
BEQ
U
HLT
34
SCOPE

,NEXT BIT
,DONE Y~n
,8R IF NO
,CLOCK TRANSMITTER 14 MORE TIC~S
,NEXT WORD IS INSTRUCTION, ROMC~K PCa5l04
,PORT4,.LU-13
,RTS SHOULD BE CLEAR NOIII
,BR IF YES
,ERROR, RTS NOT CLEAR
,SCOPE THIS TEST

0062

DZOME.

MACYI131)(\046)
It-JUL-"
\2-i'llIY-77 !411~

C'ZD"'~~,Pll

11140 PAGE 44
eASle T"~N5MITHR TESTS

PAGEl

0063

2223

2224
2225

,***************.H********** TEST 211 ***************************
I*DDCMP TRANSMlTTER TEST
I*SINGLE CLOCK THE CHARACTER 125
,*VERIfY EACH BIT PUSITIQrJ AS lT
,*PASSES THE BIT WINDOW (81 BIT)
,*ON AN ERROR, R3 CONTAINS BIT POSITION OF' rAILuRE
, 1************************************** **** ********************

227f'

2727

22n
'2719
2230
2231
2232
'2213

2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
22411
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2168

2269
2270

2211
2'272
2273
2274
2215
2276
2.'}77
2178
DZD~E

TEST 20

r - ...............
014524
014532

O! 2737
012737

014540
014542
014546
014552
014560
014562
014564
014570
014574
014600
014602
014604
1)14610
014612
014614
014620
014624
014626
0\4630
014634
014636
014640
014642
0\4646
014650
,114652
014652
014654
014660
014662
014666

104412
012711
004737
012761
104414
122111
012705
004737
010561
104414
122110
004737
005003
010502
104415
104415
106002
103005
004737
103406
104006
000404
004737
103001
104006
005203
022703
001357
104415
104414

014670
014672
014700
014702
1114704

021264
012761
001401
104034
104400

000020
014706
004000
026502
000001

~4;';

2295
2296
22.97
22911
2299
2300
2301
2302
2303
2304

026350
000002
000001
026316

026316

000014

000040

014722
014724
014734
014742

104412
012711
004737
012761
104414

004000
026502
00000 I

II ..... ' ... .,

•

014730

014746
014752
014756
014762
014764
014766
014772

014'774

015024
015034
0115034

2H2
2323

015044
015 (150
015(152
0151'154
015062
(151)64

2314

(' \ "i~~t;

1')44"0

2331
233~

233"

IBIT5, 4( Rll
4.
34

,NEXT BIT
,DONE yET?
,BR IF NO
,CLOCK TRANSMITTER 14 MORE TICKS
,NEXT WORD IS INSTRUCTION, ROMCI..K PCw5304
,PORT4.LU·13
,RTS SHOULD BE CLEAR "'OW
IBR IP' YES
,ERROR, RTS NOT CLEAR
,SCOPE THIS TEST

PAGEl

()1503f>
015042

001226
001216

TST211

,..............

000004

000252
026502
000004
026350
000002
000001

1$1

026316

201

026316

MOV
MOV

TEST 21

t21,TSTNO
,TST22,NEXT

,R1 CONTAINS BASE OMCll ADDRESS
,MASTER CLEAR OMCll
MSTCLR
IBITll,(Rt)
,SET LINE UNIT LOOP
MOV
PC,OUTRDY
,WAIT FOR OUT-READY
JSR
U,4(flt)
MOV
,SET BITO IN PORT4
,NEXT WORD IS INSTRUCTION, ROMCI..K PCw5304
ROMCLK
11?111
I SET SOMI
MOV
1252,fl5 ,t.OAD CHARACTER IN 1<5 fOi< 1 );i'i-OUI
, WAIT FOR OUT .. READY
JSR
PC,OUTRDY
R5,4(R1)
,LOAD PORT4 WITH CHARACTER
MOV
,NEXT WORD IS INSTRUCTION, ROMCI..K PCa5304
ROMCLK
,LOAD OUT DATA
122110
,WAIT FOR OCOR TO SET
JSR
PC,OCOR
,CLEAR BIT COUNTER
R3
CLR
,LOAD CHARACTER IN R2
MOV
R5, fl2
,2 TICKS TO SET UP TRANSMITTER
DATACLIC,
,SHIFT NEXT BIT IN THE WINDOW (51 BIT)
DATACLK,
,SHIFT NEXT SOFTWARE BIT IN TO CARRY
RORB
R2
,BR IF CARRY CLEAR
BCC
2S
,GET THE WINDOW
JSR
PC,GETSI
,BR IF BIT IS A MARK
BCS
3$
,ERROR
BIT ~AS A SPACE
HLT
6
,CONTINE WITH TEST
BR
3S
,GET THE WI~DOW
I1SR
PC,GETSI
,BR IF BIT IS A SPACE
BCC
38
,ltRROR BIT WAS A MARK
liLT
6

HI
005203
022703
001357
104415
11)4414
021264
032761
001401
104034

233"

11140 PAGE 45
SASIC TR,lNSMITTER TESTS

~~# . . .

104006

2332

021264
BIT
BEQ
HLT
SCOPE

000021
015070

015(132

~nij

000004

48.

012737
1)12737

015030

2329

INC
III
CMp
HO,R3
BNE
11
DATACLK,
ROMCt.K

000010

014706
014714

2311

2327

,Rl CONTAINS BASE DMCll ADDRESS
MSTCLR
,MASTER CLEAR DMCll
MOV
tBIT11,(Rl)
,SET LXNE UNIT LOOP
JSR
PC,OUTRDY
,WAIT fOR OUT. READY
U,4(Rl)
MOV
,SET BlTO IN PORT4
ROMCLK
,NEXT WORD IS INSTRUCTION, ROMCI..K PC:5304
122111
,SET 80'11
MOV
1l25,R5 ,t.OAD CHARACTER IN R5 FOR TYPEOUT
PC,OUTRDY
JSR
,WAIT FOR OUT. READY
R!5,4(Rl)
MOV
I LOAD PORT4 WITH CHARACTER
MMCt.K
,NEXT WORD TS INSTRUCTION, ROMCI..K PC-5304
122110
,LOAD OUT DATA
JSR
PC,OCOR
,WAIT FOR OCOR TO SET
CI..R
R3
,CLEAR BIT COUNTER
MOV
R5,R2
,LOAD CHARACTER IN R2
DATACLK,
,2 TICKS TO SET UP TRANSMITTER
DATACLK,
,SHIFT ~EXT BIT IN THE WINDOW (SI BIT)
RORB
R2
,SHIFT NEXT SOFTWARE BIT IN T~ CARRY
BCC
,BR If CARRY CLEAR
2.
JSR
PC,GETSI
,GET THE WINDOW
BCS
3$
,BR IF BIT IS A MARK
HLT
6
,ERROR BIT WAS A SPACE
BR
3$
,CONTINE WITH TEST
PC,GETSI
I1SR
,GET THE WINDOW
BCC
,BR IF BIT IS A SPACE
HLT
6
,ERROR BIT wAS A MARK

,*VERIFY EACH BIT POSITION AS IT
,*PASSES THE BIT WINDOW (SI BIT)
,.ON AN EflROR, R3 CONTAINS BIT POSITION OF FAll..URE
"*************************************** •• *********************

2310

2325
2326

2S1

M~CYl1 30(1046)
ll-JUL.n
12-~A't.77 14118

2311
2312
2314
2315
2316
23 t'7
231 8
2319
2320
232 t

It1

t20,TSTNO
nST21,NEXT

1*.**********.**.*********** TEST 21 ***************************
J*DDCMP TRANSMITTER TEST
,*SINGt.E CLOCK THE CHARACTER 252

014776
015002
015()06
015010
015012
015016
015020
015022

2306
2307
2308
2309

000004

MOV
MOV

3S1

012705
01)47)7
010561
104414
122110
004737
005003
010502
104415
104415
106002
103005
()04737
103406
104006
000404
004737
103001

2305

'l'ST201

000125
026502
000004

DZD"E,Pll
2279
n80
2291
22q2
22R j
2284
2285
2296
2287
2298
2289
2290
2291
2292
2293

001226
001216

000010
000014
000040

01)0004

INC
Rl
CMp
UO,Rl
SNE
U
DATACLK,
14
ROMCLK
021264
BIT
IBIT5, 4 (lU)
BEQ
U
Ht.T
34
SCOPE

,NEXT BIT
,DONE yET?
,BR IF NO
,et.OCK TRANSMITTER 14 MORE T1CKS
,NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
, PORT4.LU·13
,RTS SHOUt.O BE CLEAR NOW
,BR IF YES
,ERROR, RTS NOT CLEAR
,SCOPE THIS TEST

,****.********************** TEST 22 ***.****.*.********* •• ***.*
,*DOCMP TRANSMITTER TEST
,*SINGLE CI..OCK THE CHARACTER 377
"VERIFY EACH BIT POSITION AS IT
,*PASSU THE BIT WINDOW (51 BIT)
I*ON AN UROR. 1'13 CONTAINS BIT POSITION 01' FAILURE
II * .... * ..... ** .... *.**.** ••••• *** ....... * ...... *.* .. * •• * •• * ................. ..

0064

DZDp.4~

HACVl1 3(.I(i046j
ii-JuL-;;
DZD"< ,PI 1
12-"'1l.Y-77 14118

2335
2336
233 1
2318

015070

012737

0150H>

012;37

015104
"'5106
015112
015116
015124
015126
o i5t 30
015\34
015140
015144
015146
015150
01.5154
015156
01'5160
015164
015170
01 S 172
015174
015200
01'5202
01S204
015206
015212
0157.14
015216
015216
015220
015224
015226
015232
015234
01 '5236
015244
015246
C15?SO

104412
(:127! 1
004731
012161
104414
122111
0127-05
1)04737
010561
104414
122110
004737
005003
010502
104415
104415
106002
103005
004737
103406
104006
000404
004737
103001
104006

000022
015;052

11.40

001226
00121&

TST221

2347
2348

2349
23~0

2351
2352
2353
2354
2355
2356
2357
2358
23S9
2360
2361
2362
2363
4:,)0'"

231>5
2366
2367
236R
2369
2370
2371
23'72
2373
'314
2375

005203
022703
001357
104415
104414
u21264
(132161
001401
11)4034
104400

004000
026502
000001
000377
026502
000004
026350
000002
000001

181

026316

25 I

026316

:R1 CONTAINS BASE DMCil ADDRE~S
,MASTER CLET\R DMCll
,SET LINE UNIT LOOP
JSR
,WAIT rOR OUT-REAOY
11,4(~1)
MOV
,SET BITO IN PORT4
ROMCLK
,NEXT WORD IS INSTRUCTION, ROMCLK PCaS304
,se;T so~q
122111
MOv
1377.R5 :!..OAO CHARACT~R IN R5 rOR TYPEOUT
PC,OUTRDY
,WAIT FOR OUT-READY
JSR
R5,4(Rl)
Mav
,LOAD PORT4 WITH CHARACTER
POMCLK
INEXT WORD IS INSTRUCTION, ROMCLK PCa5304
,LOAD OUT DATA
122110
JSR
PC,OCOR
I WAIT FOR oeOR TO SET
,CLEAR BIT COUNTER
CLR
R3
MOV
R5,R2
ILOAD CHARACTER IN R2
DATACLK,
,2 TICKS TO SET UP TRANSMITTER
DATACLK,
,SHIFT NEXT BIT IN THE WINDOW (Sl BIT)
RORB
R2
,SHIFT NEXT SOFTWARE BIT IN TO CARRY
,BR IF CARRY CLEAR
BCC
2.
JSR
PC,GETSI
,GET THE WINDOW
,SR IF BIT IS A MARK
BCS
31
,ERROR BIT WAS A SPACE
HLT
6
,CONTINE WITH TEST
BR
3t
JSR
PC, GETSI
,GET THE WINDOW
BCC
31
,BR IF BIT IS A SPACE
,ERROR BIT WAS A MARK
HLT
6
IBITll'(R11
PC,ClITROY

INC
R3
CMp
110,R3
SNE
DATACLK,
ROMCLK
021264
UlT5,4(RI )
BIT
BEQ
U
HLT
34
SCOPE

000010
000014
000040

.22,TSTND
tTST2].!'.EXT

MSTCLR
MOV

000004

000004
4$1

00b5

22
,-.-nST
... -......
.

~\C1V

MOV

2339

2340
2341
2342
2343
2344
234S
2346

PAGE I

PAGE 46
BASIC TPANSMITTER !fSTS

,NEXT BIT
,DONE YET?
,SR IF NO
,CLOCK TRANSMITTER 14 MORE TICKS
::~~i4:f~~liS INSTRUCTION, ROMCLK PCa5304
,RTS SHOULD BE CLEAR NOW
,BR IF YES
,ERROR, RTS NOT CLEAR
,SCOPE THIS TEST

2HI>

2377
2378
2379
2lRO

: :~~~::*;:::::~;;~;*;::;**** TEST :z 3 ***************************

2381
2382
2383

,*VERIFY EACH BIT POSITION AS IT
'*PASSES THE BIT WINDOW (81 BIT)
,*ON AN ERROR, R3 CONTAINS BIT POSITION or rAlLURE

'*SINGLE CLOCK A BINARY COUNT PATTERN

2384

,*AND R5 CONTAINS THE CHARACTER THAT rAILED

23~5

, I **************************************************************

7381.
?387
23gB
23S9
2390

TEST 23
015252
015260

012737
ot2737

000023
015460

001226
001216

TST231

~;~-----;;i;;;;NO
MOV

.TST24,NEXT
PAGEl

DZDME
NAC'{11 30(1046)
I1-JUL-77
DZDMe; ,Pit
12-t.\AY-77 14118
2391
2392
2393
239'0
2395
239&
2397
2398
·2399
2400
2401
2402
2403
2404
2405
2406
2407
2408
2409
2~ 10
2411
2412
2413
2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424

2425
2426
2427
24?A

242'1
2430
2431
2432

2433
2434
2435
2436
2437
2438
2439
2440
2441
2442
2443
2444
2445
2446

11140 PAGE 47
BASIC TRANSMITTER TESTS

015'266 104412
004000
01 '5210 012711
015274 01)5003
015176 u05004
015300 005005
015302 004737 026502
000001 000004
015306 rJ1276i
015314 104414
015316 122111
015320 004737 026502
000004
01'jJ24 010461
()15nO 104414
01"i332 122110
015334 005204
015136 004737 026502
000004
015342 010461
015346 104414
015350 122110
015352 004737 026350
015356 10441'5 000002
0\5362 005003
015364 010502
015]66 104415 000001
015372 1(16002
015374 103005
026316
015]16 004737
015402 103406
015404 104006
015406 000404
026316
015410 004737
015414 103001
015416 104006
015420
015420 005203
015422 022703 000010
015426 001357
015430 005204
015432 004737 026502
000004
015436 010461
015442 104414
122110
015444
015446 005205
015450 022705 000400
015454 001342
015456 104400

411

lSI

2..

MSTCLR
18 IT 11 , (Fit)
MOV
Jit3
CLR
R4
CLR
115
CLR
pC,OUTRDY
JSR
11,4CR1)
MOV
ROMCLIC
122111
Pc,OUTRDY
JSPt
R4,4(Rl)
MOV
ROMCLI(
122110
R4
INC
PC,OUTRDY
JSR
R4,4CRl )
MOV
ROMCLI(
122110
JSPt
PC,OCOR
DATACLJ(,
CLR
Jit3
MOV
R5,Pt2
OATACLK,
ROPtB
R2
BCC
2.
JSR
PC,GETSI
BCS
U
HLT
6
U
SR
JSPt
PC,GETSI
BCC
U
HLT
6

311
INC
CMP
BNE
INC

Pt:J
UO,Rl

18
Jit4

~C:OUTF!n¥

MOV
ROMCLIC
122110
INC
CMP
SNE
SCOPE

R4,4CRll

,R1 CONTAINS BASE DMCll ADD~E~S
,MASTER CLEAR DMC11
,SET LINE UNIT LOOP
,R3 CONTAINS BIT COUNT
,R4 CONTAINS CHAR TO BE LOADED IN SI~O
,R5 CONTAINS CHARACTEII CURRENT~Y BEING SHIFTED
,WAIT roPt OUT-READY
,SET BITO IN pORT4
,NEXT .WORD IS iNSTRUCTIOn, ROMe:..K ii'C=5l0~
,SET SOMI
,WAIT FOR OUT-IIEADY
,~OAD pORT4 WITH CHARACTER
,NEXT WORD IS INSTRUCTION, ROMCLK PC~5304
,LOAD OUT DATA
,INCREMENT TO NEXT CHARACTER
,WAIT FOR QUT-READY
,LOAD PORTt WITH CHARACTER
,NEXT WORD IS INSTRUCTION, ROMC~K PCa5304
,LOAD OUT DATA
,WAIT FOR OCOR TO SET
,2 TICKS TO SET UP TUNSMITTER
,CLEAR BIT COUNTER
.
,LOAD CHARACTER IN R2
J SHIFT NEXT BIT tNTH!: WlNDOW (SI BIT)
,SHIrt NEXT SOFTWARE BIT IN TO CAIIRY
,BR IF CARRY CLEAR
,GET THE WINDOW
,SR IF BIT IS A MARK
,ERROR BIT ~AS A SPACE
,CONTINE WITH TEST
,GET THE WINDOW
,BR IF BIT IS A SPACE
,ERROR BIT WAS A MARK
, NEXT BIT
,DONE YET?
,BR IF NO
,NEXT CHARACTER
!W~IT rOR OUT-READY
,LOAD POPtT4 WITH CHARACtER
,NEXT WORD IS INSTRUCTION, ROMCLK PCaSl04
,LOAD OUT DATA
,NEXT CilUACTEI\
,DONE YET?
,SR IP' NO
,SCOPE THIS TEST

, *************************** TEST 24 ***************************
I*DDCMP STRIP SYNC TEST
I*SET LU LOOP, SINGLE STEP 5 SYNCS,
,*VEPtIFY THAT IN ACTIVE DOtS NOT sET
,1**************************************************************
TEST 24
,.............
.

0066

r.ZO"~-

"'ArYl 1 30(1046)

iClZl>I'\'>,?11

12-"A~.""

'2~47

() 15 460

244~

')1 ~ 466

tl t 2737
oD737

I1-Jl!L-"

?~GE 4A
e~stc FE:CUVEFl

000024
015546

001226
uO 121t;

11';T24 :

24';()

2452
24';3
240;4

245'5
'1451>

2457
245R
245~

24bn
24"1
2462
24,,3
2464
2465
'466
2467
24M!
2469
2470
2471

015474
0\0;476
()15502
01'5';06
015512
01 '551 ~
01 '5520
015522
015524
015530
01 '5534
0\ 51\36
015540
015542

015544

O()4737
000005
104415
104414
021244
016104
042704
005005
120504
001401
104040
10440()

'14fl 1
24~2
74~3
24~4

24,,5

24R6
7487
,49A
24~9

2490
2491
2492

MOV
JSP

000004
000277

181

012737
n 127 37

015562
015564
()15570
0150;74
015600
01 '5602
01'5606
1115610
()\ 5612
015616
015622
01'5626
() 15630
III 5632
015634

104412
012711
1)12702
004737
(l00005
104415
104414

000025
015636

001226
001216

TST251

004000
000012
026366

000004
000277
000100

lSI

,BITU, (I'll)
U2, P2
PC, SYNC

,I'll CONTAINS !lASE Df04Cll ADDPESS
,MASTER CLEAR DMCll
,SET LU LOOP
,SAVE loU PEG FOR TYPEOUT
,SINGLE CLOCK 5 SYNC CHARACTERS

MOV
SIC
MOV
CMPS
SEQ
HLT
SCOPE

,NEXT WORD IS INSTRUCTION, ROMCLK PC-S304
,PORT4_LU12
,PUT "FOUND" IN 1'14
,CLEAR UNwANTED SITS
,PUT -EXPECTED- IN 1'15
,IS ACTIVE SET?
,SR IF YES
,ERPOP ACTIVE IS NOT SET
,SCOPE THIS T[ST

4(Rll,R4
'277,1'14
'BIT6,R5
1'15,1'14
1$

'*************************** TEST 26 ************************.**
,*DDCNP IN ACTIVE TEST
,*SET LU LOOP, SINGLE STEP I SYNC AI'1D A NON-SYNC (301)
,*VERIFY THAT I~ ACTIVE DOES NOT SET
.
, 1************************************** ************* **** *******

,-.-- ........ -TEST 26

OZOME
M~CYI I 30 (1 046)
11·JUL·77
07,OMg,Pl1
12-Io\~Y·77 14118

2514
4'515
2510
:>"17
2"'18
i519
2520

MSTCLR
MOV
MOV
JSP

021244

021244
016104
042704
012705
120504
001401
104040
104400

.25,TSTNO
ITST26, NEXT

;>~Ill

2"0

PC~5304

TEST 25

MOV
MOV

OATACLK,
ROMCLK

000064

;>502

2512

~OMCLK

,..................
,

015546
01 '5554

i49~

251\

4(Rl)'P4
'277,1'14
1'15
1'15,1'14

<''lOt)

2501;1
2509
2,\10

MOV
SIC
CLR
CMpB
SEQ
HLT
SCOPE

'*************************** TEST 25 ***************************
,*DDCMP IN ACTIVE TEST
,*SET loU LOOP, SINGLE STEP ~ SYt-jCS AND A NON·SYNC (301)
,*VERIFY THAT IN ACTIVE IS SET
******************************************************"*******

;>499

~IH)7

,NEXT WORD IS INSTRUCTION,
,PORT4_LU12
,PUT "FOUND" IN R4
,CLEAR UNWANTED BITS
,PUT "EXPECTED" IN R5
,IS ACTIVE CLEAR?
IBR IF YES
,ERPOR ACTIVE IS NOT CLEAR
/ SCOPE THIS TEST

021244

'2497

2'5()0

: P1 CONrAII'5 BASE I)~C 11 ADDPE55
;1'/).5TEP- CLEAP D~lC11
: SET LU LOOP
,1l~ VE; LU REG FOP TYPEUUT
,SINGLE CLOCK 5 SYNC CHARr.CTERS

DATACLK,
POMCLK

000054

;>49&

~o;Ol

nIT11,(P-ll
U2,P2
PC,SYNC

2493
:1494
;>4'15

2504
25M;

'24,TST~0
.T5T25,~Exr

~~Ov

1)04000
000012
02113b6

1472
2473
2474
2475
1476
2477
2478
2479
2480

~OV

roISTCLP

104412
fl12711
1)12702

0151';36
015644

0\2737
012137

015652
01 '5654
0156"'0
0\ '5664
015670
n 15672
01 '5676
015700
015702
015706
()15712

104'112
012711
012702
004737
000001
104415
104414
021244
016104
042704

000026
(115724

11140 PAGE 49
BASIC 'RECEIVEP TESTS

001226
001216

T8T261

1?0~04

U,,1401
104040
1 !)4400

.26,TSTNO
.TST27,NEXT

MSTCLR
MOV
MOV
JSR

004000
000012
026366

nITll,(Rl)
U2,~2

PC,SYNC

,PI CONTAINS BASE OMCll ADDRESS
,MASTER CLEr.R DMC11
,SET LU LOOP
,SAVE LU PEG '01'1 TYPEOUT
,SINGLE CLOCK 1 SYNC CHARACTERS

000024

DATACLK,
RONCLK

24
,NEXT NORD IS INSTRUCTION, ROMCLK PC-5304
/PORT4.LU12
,PUT "FOUND" IN 1'14
,CLEAR UNWANTED BITS
. ,PUT "EXPECTED" IN R5
,IS ACTIVE CLEAR?
,SR IF YES
,ERROR ACTIVE IS NOT CLEAFI
,SCOPE THIS TEST

021244
000004
000277

005005

nl ~"14

010;716
01 !o720
015722

MOV
MOV

PAGE,

lSI

MOV
BIC
CLR
CMPB
BEQ
HLT
SCOPE

4(1'10,1'14
t277,R4
1'15
R5,R4
it
40

2521

'522
25;>3

, **** •• *.****.*****.****.*** TEST 27 ***************************
,*DDCMP IN ACTIVE TEST
,*SET LU LOOP, SINGLE STEP 2 SYNCS AND A NON·SYNC (30ll
,*VERIFY THAT IN ACTIVE IS SET
, I ************************************************************ ...

2524
''525
2!\26

2<;27

2528
2529
2530
2'531
iSH

TEST 27

J••••••••••••••

015724
UI5732

012737

015740
015742

104412
o t 2711

(\! 574/\

ot2702

015752
015756
015760

004737
01)0002
104415
104414
021244
016104
042704
012705
120504
01)1401

012737

000027
016014

'533

2534
2535
2'> J6
2537
2'538
2539
2540
2541
2542

2543
2544
2545
~546

2547
2548
2'549
2550
2551
2552
2553
"554
"!iS5
2SS 6
,~57

'5"5;

OO,,?

n;STS

MOV

'449
240;1

PAGI:.I

11 140

14118

015764
015766
015770
015774
OHOOO

(161)04
OH006
016010
~~~~~.2

104040
1 :'44~O

004000
000012
02&366
000034

001226
001216

TST27.

MOV
MOV
MS'rCLR
MOV
MOV
"SR

127 , TST~O
'TST30,~EXT

,I'll CONTAINS BASE OMC 11 ADDRESS
, MASTER CLEAR OMC 11
-

IBITlt,( Rll
112,1'12
PC,SYNC

2
DATACLK,
ROMCLK

021244
000004
00027,

000100

,SET LU LOOP
loU REG rOR TYPEOUT
,SINGLE CLOCK 2 SYNC CHARACTERS

I SAVE

MOV
SIC
MOV
CMPS
SEQ
HLT
SCOPI!;

4(Rl),R4
'277,Fl4

'BIT6,R5
R5,P4

U
40

,NEXT WORD IS INSTRUCTION, 1l0lo!CLK PC-5304
,PORT4.LUU
,PUT "FOUND" IN 1'14
,CLEAR UNWANTED BITS
,PUT "EXPECTED" IN R!S
,IS ACTIVE SET?
,!IR If' YES
,ERROR ACTIVE III NOT SET
,SCOPE THIS n:ST

,***************.,,******.*** TEST 30 **********.*********** .... * ..
.*IN CLEAR TEST
,*SYNC UP RECEIVER AND TPANSMIT A CHARACTER
,*WAIT rop IN POY, THEN SET IN CLEAR
,.VERIP'Y THAT l~ ACT!vE AND IN ROY ARE CLEAREO

; ~ .* ..... "......................................................... **", ....................... * ..... *"'* .... *...

0068

OZO.\~E

MACrI!

DZD"f,Pll
7559
'2560
2561

30(11'46)

l1-JUL·71

1.t140

12- MA't-77 14118

PAG~

2598
2'599
2'i90
2591

2592
2593
2SCl4

2595
25Cl6
7SCl7

0069

,...........•..
016014
016022

012737
012737

016030
016032
016(136
Otf,042
01b046
016050
016054
01£>0£'0
01b062
Olli064
016070
016074
01 bl 00
016102
016104
016106
016106
016114
016116
016120
016122
016124
016130
016134
016136
01E.!40
016142
016t44
016144
016150
016154
016156
016160
016162
016164

104412
012702
012711

000030
01&16&

001226
001216

1 ST30 I

~562

2563
25b 4
,-,65
251>6
2507
'(56a
2569
25;0
2511
2'572
2573
2574
2575
257b
2577
7578
?S79
2580
2581
2582
2583
2584
258'5
2596
2597

PAGEl

BASIC PEcnVER n:STS
'30,T~T~O

UST31,I<EXT

MSTCLR

004137

000012
004000
026534

000301
11)4415
104416

000053
000002

MOV
MOV

U2,R2
#BITl1,(Pt)
PC,CHAR

JSR
301
DATACLK,
53
TIMER,
2
ROMCLJ(
021244
4(R1),R4
MOV
U57,R4
BIC
,BIT4,R5
MOV
CMPB
R5,R4
SEQ
U
HLT
40

!C4~14

021244
01bl04
042704
012705
120504
001401
104040

MOV
MOV

000004
000357
000020

IRI CONTAINS BASE OMC1l AODR~SS
: MASTER CI..t;AR !JI<1C 11
,SAVE REG ADDRESS IN R2 FOR TYPEOUT
,SET LINE UNIT LOOP
,LOAD SILD ~!ITH l SYNCS
,AND A NON-SYNC
(301)
: SINGLE CLOCK THE DATA
: wAIT FOR Il.RD't
:NEXT WORD IS INSTRUCTION, ROMCI.K PCo~304
,PORT4_LU 12
:PUT "FOUND" IN R4
:CLEAR UNWANTED BITS
,PUT "EXPECTED" IN RS
,IS INRDY SET?
",ERROR, INRDY IS NOT SET

1'1
012761
104414
122112
104414
021244
016104
042704
005005
120504
001401
104040

000200

MOV
ROMCL/(
122112
ROMCLK
021244

000004

MOV

000004
000277

BIC
CLR
CMPS
SEQ
HI.T

4(R1),R4
t277,R4
R5
R5,R4

,LOAD PORT4
:NEXT WORD IS INSTRUCTION, ROMCLK PC.S304
,SET IN CI..EAR
,NEXT wORD IS INSTRUCTION, ROMCLK PCaS304
,PORT4.LU 12
,PUT "rOUND" IN R4
,CLEAR UNWANTED SITS
,PUT ·EXP~CTEO· IN R5
,IS IN ACTIVE CLEA~?

211
016104
042704
005005
120504
001401
104040
104400

MOV

000004
000157

3S1

BIC
CLR
CMPB

4(Rll ,R4
U57,R4
R5
R5,R4

BEQ

HLT
SCOPE

,PUT "FOUND" IN R4
,C~EAR UN~ANTED BITS
,PUT "EXPECTEO· IN R5
,IS INRDt C~EARED?
,ERROR, INRDY IS NOT CLEARED
,SCOPE THIS TEST

2598
4'59Cl
'(600
2bOI

, ......*.......................w......... ;;. TEST 31 .;;.~4;.,;.~.:~~~~~~~~'thl$."tHt.,e<!te!o*
,*DDCMP BASIC RECEICER TEST
,*SYNC UP RECEIVER AND SINGLE C~OC~ THE CHARACTER 0
,*VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED
,1**************************************************************

2602
2603
2604
2605
2606
illi07
260~

2609
2610
2611
~612

?613
2*" 14

TEST 31
,.............
.

012737

Olbi66
016174

012737

000031
016302

016202
016'204
!l16210
01 &,14

104412
012702
01271 t
1)04737

000012
004000
026534

00122!i
001216

2620

2621

26')
2624
2625
2626
2627
2b28
2629
'l630
2631
2632
2633
2634
2635

016220
n t/''222
01b226
01 ('232
016234
01623&
016242
{}' e2 4e
01&'252
OUi254
016256
016260
016260
016262
016264
01b270
Ot6272
016274
016276
016300

000000
ln4415
10441b
104414
021244
016104
042'704

012'05

MOV

# 31, TSTNO

MOV

,TST32,NEXT

MSTCLR
MOV
MOV
JSR

DZD"E
M~CYI1 30(1046)
I1-JUL-"
DZDr.'E.Pll
J2-/4r.Y-77 14118

7615
2b 1b
'6 t 7
?618
2619

'!'S'.I'l1 !

.U,R2
,BITll,(Rt)
PC,CHAR

,Rl CONTAINS BASE DMC11 ADDRESS
,MASTER CLEAR DMCll
,SAVE !lEG ADDRESS IN R2 rOR TYPEOUT
,SET LI~E UNIT I..OOP
,LOAD SII.O WITH 3 SYNCS

PAGEl

11140 PAGE 51
BASIC RECEIVER TESTS

o
DATACLK,
53
TIMER,
2
ROMCLK
021244
MOV
4CIH),R4
BIC
U57,R4
MOV
nIT4.RS
CMPB
RS,R4
BEQ
HLT
40

0000S3
000002
000004
000357
000020

120504
001401
ln4040
111

ROMC~K

104414
021204
016104 000004
005005"
120504
001401
104010
104400

021204

MOV

2*1

CLR
CMPB
BEQ
HLT
SCOPE

4(Rll,R4
R5
R5,R4

2.
10

,AND THE CHARACTER 0
,SING~E CLOCK THE DATA
,iIIAIT FOR INRDY
,NEXT WORD IS INSTRUCTION, ROMCI.K PC.5304
,PORT4 .. LU 12
,PUT "FOUND" IN R4
,CLEAR UNWANTED BITS
,PUT 'EXP~CTED~ IN RS
,IS INRDY SET?
,ERROR, INRDY IS NOT aET
,NEXT WORD IS INSTRUCTION, ROMCL~ PCa5304
,PORT4.IN DATA
,PUT ·FOUND" IN R4
,PUT "EXPECTED" IN R5
,WAS A 0 RECEIVED?
,ERROR, RECEIV~D DATA IS WRONG
, SCOPE THIS TEST

2636

2&37
2638
2639
2640
2641
2642
2643
2644
2645

,******************11******** TEST 32 **********11***********111111**
,IICDCMP BASIC RECEICER TEST
,*SYNC UP RECEIVER ANO SINGLE CLOCK THE CHARACTER 125
,*VERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS R~CEIVED
,1*************11***********************11****11****1111*******.**.**

TEST 32
,...•..•.......

~646

016302
016310

012737
012737

2647
2648
2649
2650
2651
26'i2
2653
2654
2655

016316
016320
016)24
016)30
016334
Oib336
016]42
016]46

104412
012702
012711
004737
on0125
jOoioilg
104416
104414
0",44
016104
042704
01270S
120S04
001401
104040

2~!,1I

O! (351)

2657
2658
2659
'2&60
2661
2662
]663
2664
2665
2666
2667
2669
2669
2670

016352
016356
016362
011;366
016370
016372
016)74
016)74
016)76
016400
016404
016410
016412
016414

000032
016420

001226
001216

TS'U21

000012
004000
026534

MOV
MOV

.32,TaTNO
ITST33,NEXT

MSTCt.R
MOV
MOV
JSR
125

U2,R2
UITll,(R1)
PC,CHAR

~~~~~~E

;i~i~;~i

OijeG~l

000002

ROMCLIe
021244

MOV

000004
000357
000020

BIC
MOV
CMPB
·BEQ
HLT

,Rl CONTAINS BASE DHCll ADDRESS
,MASTER CLEAR DMCII
,SAVE REG ADDRESS IN R2 rOR TYPEOUT
,SET LINE UNIT ~OOP
,1.0AD SILO WITH 3 SYNCS
,AND THE CHARACTER 125

4(Rl),R4
nS7,R4
IBIT4,RS
R5,R4

CtQCK TH~ DATA

,WAIT rOR INRDY
,NEXT WORD IS INSTRUCTION, ROMCI..~ PC.S304
,PORT4..LU 12
,PUT "FOUND" IN R4
,CLEAR UNWANTED BITS
,PUT "EXPECTED" IN RS
,IS INRDY SET'l

11
40

,ERROR, INRDY IS NOT SET

4(Rl),R4

,NEXT WORD IS INSTRUCTION, ROMCI..K PCaS304
,PORT4.IN DATA
,PUT "rOUND" IN R4
,PUT "EXPECTED" IN R5
,wAS A 125 RECEIVED?

UI
104414
021204
016104
012705
120504
001401
104010

000004
000125

ROMCtoK
02t:Z06
MOV
MOV
CMPB
SEQ
HLT

U25,fl5
R5,R4
28
10

,ERROR, RECEIVED DATA IS WRONG

0070

DZD"~:
'~ACYI1 10(1046)
11-JUL-77
DZt"·~.Pl1
12- M A,'i-17 14118

21>71
2672

(116416

PAGEl

1114C
PAGE: 52
BPS!C PECnVgp TESTS
2SI

1044(10

SCOPE

,SCOPE THIS

')071

rEST

~67 3

, *************************** TEST 33 ***************************
I*DDC~P BASIC HECEICE:R TES!
I*S~NC UP REC~IVgR AND SINGLE CLOCK THE CHARACTER 252
,*VERIFY THAT IN ROY IS SFT, AND THAT THE CHAflACTER WAS RI'.:CEIVEO
I 1****************** * ****** ** ********* ************ ********* **** *

2674
~675

2676
')677

26H
2679
2690
2681
2h92
2683
2684
2685
26e6
2687

2681l
2689
2690

2691
2692
2693

2694
2695
2696
2697
2698
2699
2700

:nOI
'2702
2703
2704

2705
2701)
2707
2709
7709
2710
2711
2712
2713
2714
2715
271h

016420
016426

012737
012737

PI6434
01f>436
016442
016441'1
016452
016454
016460
016464
016466
016470
016474
016500
01&504
016506
016510
016512
016512
016514
016516
016522
0\6'526
016530

104412
012702
01271 \
004737
000252
104415
104416
104414
021244
016104
042704
012705
120504
001401
104040

01"532
01,6534

000033
016536

001226
001216

TST33t

000012
004000
026534
000053
000002

000004
000357
000020

2725
2726

DZPME

ROMCLIt
021204
MOV
MOV
CMpB
BEQ
HLT
SCOPE

000004
000252

2729

21JO
2731
L732

'133
2734
2135

2736
2737
2738
2739
2740
7741
2742
2743

2744
2745
"46

,ERROR,

INRDY Is NOT SET

4(ft1),R4
1252,R5
R5,R4
2$
10

,NEXT WORD IS INSTRUCTION, ROMCLK PCa5304
,PORT4_IN DATA
,PUT "FOUND" IN R4
,PUT "EXPECTED" IN R5
I WAS A 252 flECEIVED?
IERROR, RECEIVED DATA IS WRONG
, SCOPE ThIS TEST

,*************************** TEST 34 ***************************
,*DDCMP BASIC RECEICtR TEST
,*SYNC UP RECEIVER AND SINGLE CLOCK THE CHARACTER 377
,*VERIfY THAT IN ROY IS SET, AND THAT THE CIiARACTER wAS RECEIVED
"**************************************************************

,.....-......-,

(116536
016544

012737
012737

000034
016654

016552
016554
fl16')60
'116564
(Itb570

104412
!l12702
012711
004737
000377

000012
004000
026534

001226
001216

MACYl1 30 (1046)
U·JUL-77
12-"IAY-77 14118

DZD,,~.pll

2727
:?72B

,Rl CONTAINS BASE DMC11 ADDRESS
,MASTER CLEAR DMCll
,SAVE REG ADDRESS IN R2 FOR TYPEOUT
,SET LINE UNIT LOOP
,LOAD SILO WITH 3 SYNCS
,ANO THE CHARACTER 252
,SINGLE CLOCK THE DATA
,WAIT FOR INRDY
,NEXT wORD IS INSTRUCTION, RO~CLK PCa5304
,PORT4.LU 12
IPUT "FOUND" IN R4
ICLEAR UNWANTED BITS
IPUT "EXPECTED' IN RS
,IS INROY SET?

111
104414
021204
016104
012705
120504
001401
104010
11)4400

2724

.33,TSTNO
nST34,NUT

MSTCLR
MOV
U2,R2
.eIT1l, (111)
MOV
PC,CHAR
JSR
252
DATACL!<,
53
TIMER,
2
ROMCLIt
021244
4(R1),R4
MOV
1357,R4
BIC
MOV
.BIT4,R5
CMPB
R5,R4
BEQ
18
HLT
40

271 B

2719
2720
2721
2122
2723

TEST 33
,...........
---

MOV
MOV

U16o;72

OH516
016602
(116604
I) 16606
011-612
016616
01f1f>22
016624
016626
fllb630
01b630
o If>632
016614
016(,40
016644
016646
1116650

0',66'52

t 04415
104416
104414
021244
016104
042704
012705
120504
001401
104040

TSTH.

TEST 34

MOV
MOV

.34,TSTNO
tTST35,NEXT

MSTCLII
MOV
MOV
JSR
377

U2,R2
,BlTl1, (Rl)
PC,CHAR

IRl CONTAINS BASE DMCll ADDRESS
IMASTER CLEAR DMCll
,SAVE REG ADDRESS IN R2 FOR TYPEOUT
I SET LINE UNIT LOOP
,LOAD SILO WITH l SYNCS
lAND TH~ CHARACTER 377

11140
PAGE 53
BASIC !'!!'CI!:IVER TESTS

01)0053
000002

000004
000357
000020

PAGE;

DATACLK,
53
TIMER,
2
ROMCLK
021244
MOV
4(Rll,R4
BIC
1357,R4
MOV
UlT4, R5
CMPB
R5,R4
SEQ
1S
HLT
40

,SINGLE CLOCK THE DATA
,WAIT FOR INROY
,NEXT ~ORD IS INSTRUCTION, ROMCLK
,PORT4.LU 12
,PUT "FOUND" IN R4
,CLEAR UNWA~TED BITS
,PUT "EXPECTED· IN R5
,IS INRDY SET?

ROMCLK
021204
MOV
MOV

,NEXT WORD IS INSTRUCTION, ROMCLK PCa5104
,PORT4.IN DATA
IPUT "FOUND" IN R4
,PUT "EXPECTED· IN R5
.wac D 1'7'7 PECEYVEO?

PC~5304

,ERROR, INRDY IS NOT SET

1..

104414
021204
016104
012705
120504
()01401
104010
104400

000004
000377

281

BEQ
HLT
SCOPE

4(Rll,R4
U77,R5

T:'
l" T't,A..
4'''',>

IERROR, RECEIVED DATA IS WRONG
,SCOPE THIS TEST

2747
274R

I *************************** TEST 35 ***************************
I*ODCM!? DATA TEST
,*THIS TEST SINGLE STEPS A BINARY COUNT PATTERN
,*CHECKING EACH CHARACTER AS IT IS RECEIVED
, • ************** ** * * * *** * ***************** **** * ******* *** * ** * **"

2749
2750
2751
2752
2753
2754
2755
2756
2751
27'19

2759
2760
2761
2762
'2763
2764
2765
2766
2767
2768
2769
2770
2771

TEST 35
,...••.........
016654
016662

012737
012737

016670
Olb672
016676
0\6702

104412
01)5037
005037
005002
012703
012711
004737
104415
l r)4415
004737
104414
0212n4
016104
010205
120504
001401
104010
005202
022702

016704
016710
016714
016720
016'724

01"730
'116734

(H6736
016740

2712

0\&7'44

21n

IJ 1 674~

2774

0\6750

'2775

016752
'lt5754
0'6756
I) 1 1'1762
n 1 S7f, ~

2771j

2177
2778
2" 79
tiS!.'

f' j f>766

000035
017004

000073
004000
026712
000043
000730
027156
on0004

000400

(lr;5303

7' ~ I

I, "'~70

7;~"

0~ 6"!74

'11 2.703

TST351

001216

027152
027154

001407
001360
nn4737

001226

016712
O?OOi3

181
4$1

MOV
MOV

US, TSTNO
,TST36,NEXT

MSTCLI!
CLR
SCHAR
eLR
STUP'LG
CLR
R2
MOV
.73,113
MOV
tBIT11,(Rl)
JSR
PC,8ILOLO
DATACLK,
43
DATACLK,
7)0
JSR
PC, INR[lY
ROMCLK
021201l
MOV
4(11),114
MOV
R2,RS
CMPJ!,
R5.i'I!i
BEQ
2.
HLT
10
INC
R2
CMp
.400,,,2
BI!:Q
3$
OF,C
R3
lONE
U
JSR
PC,SIl.IQ:'O
MIJV

·:;1,1>3

,111 CONTAINS BAst DMC11 ADDRESS
,MASTER CLEAR DMCl1
'
,START BINARY COUNT AT ZERO
,CLEAR BITSTUfr fLAG
,R2 IS "EXPECTED" DATA
JII3 IS CHARACTER COUNT
,SET LINt UNIT LOOP
I LOAD SILO WITH COUNT PATTERN
,SYNC RECEIVER AND GET IT ACT 1 VE
,CLOCK IN 73 CHARACTERS
,WAIT rOR ItlflDY
,NEXT WORD IS INSTRUCTION, RO~CLK
I PORT4_IN OATA
IPUT "FOUND" IN R4
IPUT "EXPECTED" IN R5
,IS P~T~ CORRECT?

PC.~~04

IBR U" YES
,D~TA ERROR
I"IEXT C~AR~CTI!:R
,r.LL DO'lE?

,Bf! IF YES
IDECREMENT CHAR'CTER COUN1
/BR lr SILO NOT E~pr¥
:L01·D SUO WITH MI:'IlE C1F CDC)'1'! rUlE?>.!
IR~LO~D

CH~RACT!~

COU~T

00'72

DZ[I~r
MACyl1 30(104&)
n·,;uL·n
DZD~E.Plt
12-/o',H-77 14118

278)
27R4

() 17000
017002

11140
PAGE 54
BASIC ;"ECEIVEP 'rESTS

000751
104400

3S1

2785
:t7P,6
;787

2792
2793

::'794
012737 • 000036
012737
017144

2811

017020
017022
017026
017032
017014
0170 4 0
017042
0\7050
017052
0170'54
017060
017064

2812

01 ;o;u

2A13
28 t 4
281 S
2816
28 t 7
281 S
281 q
2820

017074
017076
017100
017104

104412
005037
005037
005002
012703
005011
012761
104414
122112
004737
104415
104415
G047:!7
11)4414
021204
016104
010205
120504
(1)1 4 01
104010
005202
022702
001407

2810

2921
2922

0171 Db

01711 I)
017\12
017114
01711 f;
017122

2823

Ot't24

\)(1531'3

2824

n 17126

,825

017130
017134
017140
017142

001360
(104737
012703
000751
104400

2826

2sn
2828

,..............
,

017004
017012

280E2807
280R
2809

, CONTINUE;
,SCOPE THIS TEST

2;89
2790
2791

2805

0073

,*.**.*.** ... ;;;;*.* •• * •••••• ** TE;ST 36 ** •••••••••••••••••• * •••••
,.DDCMP DATA n:ST
,.THIS TEST SINGLE STEPS A BINARY COUNT PATTERN
,lICHECKING EACH CHARACTER AS IT IS l'e:Ct.lVE:D
I.THIS TEST IS EXACTLY THE SAME AS Thf LAST TEST,
,.EXCEPT LINE UNIT LOOP IS SET IN 1..11 REGISTER 12
, I •••••••••••••••••••••• ** •••••• * ••••••••• ** •••••• * ••••••• * •••• *

218R

2795
2796
2797
2798
2799
2901)
2 A OI
2802
2AO)
2804

SF
SCOPE

PAGEl

001226
001216

TST361

027152
02'7154
000073
000040

000004

026712
000043
000730

000004

2$1
000400

026712
000073

TEST 36

MOV
MOV

f36,TSTNO
.TST37,NEXT

MSTCLF
SCHAF:
CLF
CLR
STUrLG
R2
CLR
MOV
.n,Rl
(Rl)
CLF:
MOV
fBIT5,4(Rll
ROMCLIC
122112
JSR
PC,SILOLD
OATACLIC,
43
DATACLK,
730
JSF
PC. tNRDY
ROMCLK
021204
MOV
4(Rll,R4
MOV
R2,R5
CMPS
F:S,R4
2_
BEQ
10
HLT
INC
R2
CMP
t400,R2
BEQ
U
DEC
R3
SNE
41
JSR
PC,SILOLD
MOV
lIn,R3
BR
u
SCOPE

1 CONTAINS BASE OMC 11 ADDRESS
,MASTER CLEAR OMC 11
,START SINARY COUNT AT ZERO
,CLEAR BITSTUff fLAG
,R2 IS "EXPECTED· OATA
,R3 IS CHARACTER COUNT
,CLEAR LU LOOP IN MAINT REG
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, ROMCLK PC-S304
,SET LU LOOP IN LU REG 12
,LOAD SILO WITH COUNT PATTERN
,SYNC RECEIVER AND GET IT ACTIVE
..
,CLOCK IN 73 CHARACTERS
,WAIT rOR INROY
,NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
,PORT4_IN DATA
,PUT ·rOUNO" IN R4
,PUT "EXPECTED" IN R5
,IS DATA CORRECT?
I BR IF n:s
,DATA ERROR
,NEXT CHARACTER
IALL DONE?
,SR IF YES
,DECREMENT CHARACTER COUNT
,BR IP' SILO HOT EPiPTI
,LOAD SILO WITH MORE or COUNT PATTERN
,RELOAD CHARACTER COUNT
,CONTINUE
,SCOPE THIS TEST

282'1
21130
2~H

,.*.* •••••• ****.*.**.*.* •••• TEST 37 •• *.** •••••• *** ••••• *.* ••• *
i~TRANSM:TTER MARK TEST
,.SINGLE CLOCK 3 SYNCS AND A ]01 AND 20 EXTRA
,.CLOCK TICKS, VERIFY THAT A 301, A 377 AND A 377
,.WERl RECEIVED INDICATING THAT THE TRANSMITTER WENT
,.TO A MARK STATE rOR 16 BITS WHEN OUT SILO WAS EMPTY
, I * ••••••••• * •• *.**.*.* •••••• *.** ••• *.*** ••••••••••• *.*** ••• * •••

2A32

n33

2R34

2R 35
783b
283;
2938
DZDME
MACYll 30(1046)
U·JUL·?7
DZDME.PI1
12-MAY-77 14118

11140 PAGE 55
BASIC RECEIVlR TESTS

211 39
'B40
2B41
2942
2f143
2944
21145
2R46

':leo
2948
·2849

TEST 37
,.............
.
017144
017152

01273"/
012737

017160
n17162
017166

104412
012711
004737
OOO!01
104415
004737
104414
021204
016104
012705
120504
001401
104010
004737
104414
021204
016104
012705
120504
001401
104010
004737
104414
021204
016104
012'705
120504
001401
104010
104400

1\4""""

017 i 74

2~58

017200
1117204
017206
0\7210
017214
017220
017222
017224
017226
017232

?8S9

017234

2860
28bl
2862
2861
2864
2865
2866

017236

29S0
2851

28S2
2853
2854
2855
2856
2857

2867
2868
2869
2870
2871
2972

2873
2874
2815

017242
017246
017250
017252
017254
017260
I) 17262
017264
017270
017274

017276
017300
017302

000037
017304

001226
001216

TST371

004000
026534
000073

02'7156
000004
000301

11.

027156
000004
00037'7

027156

211

000004
000377

311

2976
2977

2893
017]04
017312

012737
012737

2888

017320

2889
2890
2891
2892

017322

104412
0327]7
001004
032737
001451
005011
012761

000040
017466

0012416
001216

020000

001)66

040000

001366

000100

000004

2887

28'l4

MSTCLF:
MOV
taITl1, (ill)
JSR
PC,CHAR
301
OATACU,
13
JSR
PC,INRDY
ROMCLJ(
021204
MOV
4CR1) ,1<4
MOV
nOl,R5
CMPB
R5,R4
BEQ
11
HLT
10
JSR
PC, %HilDY
ROMCLK
021204
MOV
4(RU,R4
MOV
U77,RS
CMPB
R5,R4
SEQ
2.
HLT
10
JSR
PC, INROY
ROMCLK
021204
MOV
4CF:1),R4
MOV
1377, R5
CMPS
R5,R4
BEQ
3S
HLT
10
SCOPE

,Rl CONTAINS BASE DMC11 ADDRE~S
,MASTER CLEAR DMC11
,SET LINE UNIT LOOP
,LOAD SILO WITH l SYNCS
,AND A 301
,CLOCK TtiE 301 IN ANii 20 EXTi... 'l'ICKS
,WAIT FOR INROY
,NEXT WORD IS INSTRUCTION, RO!"Ct.K PC-5304
,POilT4.IN DATA
,PUT ·rOUNO" IN R4
,PUT "EXPECTED" IN R~
,WAS A 301 RECEIVED?
,ERROR rIRST CHARACTER INCOilR~CT
,WAIT rOR INRDY
,NEXT WORD IS INSTRUCTION, ROMCLK PC_5304
,PORT4.IN DATA
,PUT "FOUND" IN R4
,PUT "EXPECTED" IN R5
,WAS A 377 RECEIVED?
,ERROR, 377 WAS NOT RECEIVED
,WAIT rOR INROY
,NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
,PORT4_IN DATA
,PUT "rOUND" IN R4
,PUT "EXPECTED" IN R5
,WAS A 377 RECEIVED'
,ERROR, 377 WAS NOT RECEIVED
,SCOPE THIS TEST

UM!T LOOP;

~tT

DT~

,*VERIry THAT MODEM READY IS SET
,.CLEAR DTR, VERIfY THAT MRDY IS CLEARED
, ,.****** •• **** •• ***•• ** •• ***.****.*.** ••• **** ••••• ** ••••• * •• * ••

?e~ 1
2882

2993

.37,TSTNO
nST40,NEXT

:*CLE!~ ~t~~

'21179
28~1)

2!l86

MOV
MOV

,.* •• * •• **** •• * ••• *.**.**.*. TEST 40 .*.* •• * •••••• * •••• * •• ** ••••
,.CABLE TURNAROUND TEST

~87a

2884
2895

PAGE.

011330
017132
017340
017342
011]44

TST40 I

TEST 40
,.............
.
MOV
MOV
MSTCLR
BIT
BNE
BIT
BEQ
CLR
MOV

.40,TSTNO
,TST41,NEXT

.BIT13, STAT1
.+12
I8IT14,5TATI

2.
(Rl)
t100,4(Rt)

,Rt CONTAINS BASE DMCll ADDREiS
,MASTER CLEAR OMCll
, IS t.INE UNIT M82027
,BR IF YES (DO TEST EVEN If NO LOCP-BAC/( CONN)
,IS TURNAROUND CONNECTOR ON?
,SIC! P TEST IF NO
,Ct.I!:AR LINE UNIT LOOP
,LOAD PORT4

0074

DZD"'!:.
"~CYll ~()(!04f!)
l1-JUL-i7
:;ZD'"E,Pl!
\2~"'A¥-77 14: 18

2R95
299b

21'1 Cl 7
2RClR
~P99

29tH)
2901
2902
2903
2904
2905
2906
2907
2Cl08

2909
2910
2Clt1
2912

2913
2914
2915
2916
2917
2918
2'H9
29;10
2911

017352
(17)54
017156
n 17 3!12
o t 7 J!l4
01711>6
011371
01137b
017402
017404
01740&
(111410
()11414
017416
017420
017424
017426
017430
017414
1)11440
017442
017450
011452
017456
UI 7460
!l17462
017464

1('14414
12211 J
104416
104414
071264
016104
()4 27 04
012705
120504
001401
104(111
005061
104414

,N~;XT

tWMCLK
122113
TIMFP,
ROMCLK

000n02

1$1

000004

MOV
BIC
MOV
CMPB
BEQ
HLT
CLR
ROMCLK

021264
016104
042704
005005

000004
000223

032137

020000

001402
052705

000010

001366

120504
001401

1(14011
2$1

104400

TIMER,
ROMCLK
021264
MOV
BIC
CLR
BIT
BEQ
BIS
CMPB
BEQ
HLT
SCOPE

ROMCLK PC"5,304

,SET DTP

I POHH_LU 13

4(R1).1I4
*223,P4
#l10,R5
R5,R4

,PUT "FOUrlO· IN R4
,CLEAR UNWANTED BITS
,PUT "EXPECTEO' IN RS
:15 MRDI' SET?

,ERROR, MRDV NOT SET
I CLEAP POR14
,NEX'£ WORD IS INSTRUCTION, ROMCLK PCa5304
,CLEAR DTR

11
4(R1)

122113
000002

104414

"OPD IS INSTt<UCTlUN,

OOH

; WAIT
,NI:.XT WORD IS INSTIWCTION, ROMCLK PCa5304

021264
000004
000223
000110

122113
11)4416

PAG~I

11140
P~GE 56
BA1HC P·~Fl\'1!:1I 'TESTS

4(Rl) ,R4
.223,R4
R5
,BIT13,STAT1

.+6
,BIT3,R5
R!5,R4

2e
11

,NEXT WORD IS INSTRUCTION, RaMeLI'. PC=5304
;PORT4_LU13
,PUT "FOUND" IN R4
,CLEAR UNWANTED BITS
,PUT "EXPECTED" IN R5
,IS LINE UNIT M8202?
,BR IF NO
,MROY SET ON Me202
,IS MRDY CLEAR?
,ERROR, MRDY NOT CLEAR
,SCOPE THIS TEST

2922

2923
2924
2925
2926
2927
29:1R

'*************************** TEST 41 ***************************
,*CABLE TURNAROUND TEST
I*CLEAR LINE UNIT LOOP, LOAD OUT DATA SILO
,*VERIFY THAT ALL MODEM SIGNALS ARE SET
**************************************************************

2Cl79

2Cl30
2931

2932

017466

2933
2914
2935
2936
2917

017474

7938
2939

2940

017'502
017'504
017512
0170;\4
017522
017524

000041
017632

001226
001216

032737
001004

020000

001366

032737

040000

001166

001442
01271 t

004000
000100

000004

000002
000001

000004

012737
012737

017" 30
01 7 536
017540

012761

2944
2945
2946
2947
2949
2949
2950

017542
017'54&
(117554
017,,56
0170;60
fl1 7 5b4
0170;66

104416
(112761
104414
122111
004537
030102
fl(lOIOO

2942

2951
2952
2953

0\75 7 0
017574

2954

017576
017'571i

2955
29'16

017600
0171'.02

29'57
295A

2959
2960
29bl

291)2
2'163
2'164

012700
005011

,BIT13,STATl
.+12
,BIT14,STATl

11
,BITll, ClH)

UOO,

4(R1>

2
11,4(Rl)

Fl5,MESLD

IRl CONTAINS BASE DMC11 AODRE6S
,MASTER CLEAR OMCII
,IS LINE UNIT M8202?
,SR IF YES (DO TEST EVEN IF NO LOOp.BACK CONN'
,IS TURNAROUND CONNECTOR ON?
,SKIP TEST IF NO
I SET LINE UNIT LOOP
,LOAD PORT4
INEXT WORD IS INSTRUCTION, ROMCLK PC=5304
,CLEAR ALL MODEM SIGNALS,!XCEPT OTR
,WAIT
,LOAD PORT4
,NEXT WORD IS INSTRUCTION,
,SET SOM
,FILL OUT DATA SILO
,WITH 64 CHARACTERS

ROMC~K

11140
PAGE 57
BASIC P"CEIVF.;R 'TESTS

000050

PC.~]04

PAGEl

MOV
CLR

I PREPARE FOR DELAY
,CLEAR LINE UNIT LOOP

2$1

1 ,14414
021264
016104

0116 06

0~2704

017612
0171i 16
017620
0171\22
017624
017(',26

012705
1200;04
001403
005300
001364
104011
11)4400

017611)

TIMER,
MOV
ROMCLt(
122111
JSR
HESDAT
64.

027620

I'1~CYll 30(1046)
I1-JUL·n
DZD~E.P! 1
12- HV-77 14118

H1,TSTNO
.TST42,NEXT

MOV
ROMCLK
122113

104414
122113

DZDME

TEST U
,........
-_ ...-

MOV
HOV

MSTCLR
BIT
BNE
BIT
BEQ
MOV

104412

2943

2941

TS1411

000004
000223
000154

1$1

ROMCLl(
021264
MOV
BIC
MOV
CMPB
BEQ
DEC
BNE
HLT
SCOPE

4(RO,R4

'223,R4
1154,1'15
fI!5,R4

U
RO

2.
11

INEXT WORD IS INSTRUCTION, ROMCLK PCa5304
,PORT4.LU13
,PUT WFOUNO" IN fl4
,CLEAR UNWANTED BITS
rPUT "EXPECTED" IN R!5
,COMPARE EXPECTED AND FOUND
,BR IF OK
,DEC DELAY COUNT
,BR IF NOT ZERO
,ERROR, ALL SIGNALS ARE NOT S~T
,SCOPE THIS TEST

2965
, ;00

29b7

'*************************** TEST 42 ***************************
,*TEST OF CRC OPERATION
,*USING THE CRC16 POL:tNOMIAL, SINGLE CLOCK THE CHARACTER
,*0, VERIFY THE LSB OF THE BCC ON EACH SHIFT
,*TEST TRANSMITTER rIRST THEN THE RECEIVER BCC
, 1******************* * ** ***************************************

2968
2969
297(1
2971
2972
2973
2'174

2975
2976

2977
2978

,...............
,

017632
017640
017646

012737

012737
1112737

000042
020146
017662

001226
001216
001220

TST42,

TEST 42

MOV
MOV
MOV

t42,TSTNO
nST43, NEXT
.648, LOCK

2979
29QO
2991
29B2
29R3

0176'54

104412

017656

ot 2711

0li6b2

004737
005000
012737
012737
005037
004737

2988

0176&1;
01767(1
011676
017704
017710
017714

2989

017716

2990

017722
01 7 720
017730
1\17734
017'136

2Cl64

29ij5

2986
2987

2991
29Q2
29<l3
2994
2995

:;>99"
299 )
2998
'Q99
30(\0

30(11
3002
30"3
3()04

fll7740
017742
017744
011750
0!7'152
017754

017756
017762
(111764
n177ft6

onoooo

104415
104415
01)5200
n04537
000001
000000
000000
103405
004737
103006

004000
027662
120001
000000
017140
027322

SUI

027316
0\771S

000021
000001

6511

027212

UIT11'(R1)
PC,CLRIO
RO
,CRC16,XPOLY

10,665

PC,BCCLD

DATACLK,
21
DATACLK.
1
INC
RO
JSR
R!!, SIMBCe

6681
1S1S1

027434

\ (13401
104116

30 '1 5

n I 776')

(' ,,(,'131

"1 '77 3~

.Jon"

'i~''''''?

~'117

0;0'73';'0

o
o
BCg
JSR.
BCC
HloT
BR
JSR
BeS
HLT

104012
000404
1)04137

MSTCLFI
MOV
JSR
CLR
MOV
MOV
CLR
JSR

ROP

01,.,40

1Inv

68.
PC,GElwi!

69S
12
69S
PC, CETOD

69S
16

HS
caLBCC.~·7.

,Rl CONTAINS BASE OHCll ADDRE6S
j MASTER CLEAR DMC 11
,SET LU LOOP
,CLEAR BCC REGISTERS
,START SHIFT COUNTER AT ZERO
,,,OAD POLYNOMIAL FOil SOFTWARE BCC
I "DAD CIIAR rOR SOFTWARE Bee
,e LEAR OLD SOFTWARE BCC
,LOAD OUT SILO WITH 2 SYNCS
lAND THE CHARACTER 0
,GET TRANSMITTER ACTIVE
,SHIFT BCC ONCE
I BUMP SHIFT COUNT
,CALCULATE sorTWARE Bee LS8
,ONE SHIFT
,DATA CHARACTER
,OLD SCC
,8R If'" SOFT BCC LSB IS SET
l(ie;r Mp.RDWARE TflJ\liSMIT'rER Bce ;'$L,
,8P IF HARD BCC LSB IS CLEAR
,ERROR. BCC LS8 IS SET
,CONTINUE
,GET IH;RPWA liE TRANSM ITTER !lCC: r..s~·
I"R Ir HARO BCC LS8 15 SET
I r:flROR, HARD Bee LS8 IS eLF-All
,~H!f'r SOFT DAtA
I r..OAD C!.O sOfT f,!CC

0076

ii-JuLa-;;
/oIACYII lO( 1046)
DZO"f
t2-MAY-77 1411H
DZOMI'" .Illl
lOO7
l(!OR

)o()9
31110
311 11
.1012

lUll
3014
3015
3016
3017
3019
301C;
3020
3011
30'22
30'23
3024
3025
3026
3027
30211
3029
3030
3031
3032
30n
3034
3035
~036

3037
3038
3039
3040
3041
]04'2
3043
3044
3045
3046

020000
020004
0:?oo06
0"'00\0
020016
0,r'J021
020024
020032
(120040
0'20044
020050
020052
0200'56
020062
020064
070010
02 0 072
020074
020076
020100
020104
0'0\06
020110
020112
020116
020120
020122
020122
020126
020 t:;4
020 t 40
020142
020144

l1i40 ;:>AG~ 51l
BASIC RECUVER TESTS
CMIl
BNE
sCaPI

It 0, RO
651

MOV

027316

JSR
CLR
MOV

nu,!..OC!(
PC.CLRIO
FlO
fCRC16,XPOLY

020072

MOV

10,738

022700
0'11346
104401

000010

Ol:lH7

0200 i D
027&62

00 i ~20

120\101
000000
020074
027322

004737
005000

012737
012737
005031
004131
000000
10441'5
11)4415
005200
004537
000001

71$1

000032
000001

7211

027212
73S1
7411

UOOOOO

000000
103405
004731
103006
104013
000404
004731
103401
104017

027446

021446

15St

020012
027320

024;00

UV\lV"U

020014

001346
104401
104400

7,..

105~

3059
3060
306 i
30&2

DZOME

311 t
3112
3113
H14

,SHIFT BCC ONCE
,BUMP SHIFT COUNT
,CALCULATE SOFTWARE SCC LSS
,ONE SHIFT
,DATA CfoIARACTER
,OLD BCC
,BR IF SOFT BCC LSB I S SET
,GET HARDWARE RECEIVER BCC L8S
,tlR IF HARD BCC L8B IS Ct.EAR
,ERROR, BCC t.sa IS SET
,CONTUIUE
,GE;T HARDWARE RECEIVER BCC L-S~
,BR IF HARD BCC L8S 18 SET
,ERROR, BCC LSB IS CLEAR

ROR
MOV
e!o1p
BNE
SCOPl
SCOPE

,SHIFT sorT DATA
,t.OAO '01..0 SOFT BCC
!DONE YET?
,SII Ir NOT D"NE
,SCOPE SUBTEST CSW09-0
,SCOPE THIS TEST

lice

!GE:TRIi;Ct!vtR ACTIVt;

738
CALBCC,7U
HO~!lO

12.

TEST 43
,...•..........
02014b
020154

012731
012737

000043
020462

001226
001216

020162

012731

020176

020170
020172
020176
070202
0",0204
020212
Oi022v
020224

104412
012711
004731
005000
012137
012737
00$1'i37

004737

MOV
MOV

U3,TSTNO
fTST44, NEXT

001220

MOV

UU,LOCJ(

027316
020252

MSTeLR
MOV
.JSR
CLR
MOV
MOV

004000
027662
120001
000377
020254
027322

0'20130
020232
0'20236
020'24'2
020244
020'250
020252
0202'54
020256
0'0260
0'20264
020266
020210
020"2
020276
0'20300
0'20302
020302
020306
020314
0'20320
020322
020]24
020332
0'20]36
020]40
020346
0'20'54
020360
020364
0'20366
020372
020376
020400
020404
020406
0'20410

000377
1114415
1 '14415
005200
004537
000001
000000
000000
103405
004737
103006
104012
000404
004737
103401
104016

TSTU.

6411

tolACYlt 30(1046)
11-JUL-."
12- M AY-77 14.18

DZD~e:.Pl t

3063
30&4
3065
30bEo
3067
3068
)069
3070
·3011
3072
3073
3074
3015
3076
3017
3018
3079
30RO
3(,81
3082
30B 3
3084
3085
3086
3087
3Q88
3089
3090
3091
3092
3093
3094
l095
l096
3097
3098
3099
3100
3101
3102
lt03
3104
3105
3106
3107
3108
3109
3110

CLR
74.
JSR
PC,BCCLD
0
DA'UCi.i\:
12
DATACLK,
INC
RO
JSR
R5,SIMSCC
1
0
0
BCS
751
PC,GETQI
.JSR
SCC
768
Ht.T
13
BR
161
PC,GETQI
JSR
BCS
768
HLT
11

i8Ii'ii,(~i)

PC,CLRIO
RO
tCRC16,XPOLY
1377,66.,

CLR

57.

JSR

PC.BCCLO

,Rl CONTAINS BUE DNC1l ADDRE~S
,MA~TER CLEAR DMCll
,SET i..i.l LOO~
,CLEAR BCC REGISTERS
,START SHIrT COUNTER AT ZERO
,t.OAD POLYNOMIAL rOR SOFTWARE BCC
, I10AD CHAR rOR SOrTWARE Bce
,CLEAR O1.D sonwARt ace
,LOAD OUT SILO WITH 2 SYNCS

PAGEl

11140 PAGE 59
BASIC IIECElVER TESTS

000021
000001

658.

027212
66'1
6111
027434

021434

6UI

371
DATACLJ(,
21
DATACLK,
1
INC
ItO
JSR
R5,SlMSCC
1
0
0
BCS
681
.JSR
PC,GETQO
BCC
69.
HIlT
12
BR
698
PC,GETQO
JSR
Bes
691
Ht.T
16

, AND THE CHARACTER 377
,GET TRANSMITTER ACTIVE
,SHIFT BCC ONCE
IB.UMP SHIFT COU1'4T
f~ALCUt.ATE SOFTWARE SCC LSB
,ONE SHIrT
,DATA CHARACTER

ROR
661
MOY
CALBCC,UI
CMP
tiO,RO
BNE
6iu
SCOPl
MOV
nU,LOCK
JSR
Pc,cr..RIO
CLR
RO
MOV
.CRC16,XPOLY
MOV
1371,1U,
CLR
741
.JSR
PC, BCCLD
311
DATACLK,
12
DATACL/(,
INC
RO
JSR
RS, SIMBCC

, s.HIrT SOrt DATA
,t.OAD OLD SOFT SCC
,DONE YET?
,BEl IF NOT DONE
,~COPE SUBTrST (SW09-1)
!NEW SCOPEl
,Cr..EAR Bce REGISTERS
,START SHIrT COUNTER AT ZERO
,LOAD POLYNOMIAt. FOR SOFTIIARE BCC
,wOAD CHAR FOR SOFTWARE SCC
,CloEAR OLl) sonwA~E BCC
,t.QAD OUT SILO WITH 2 SYNCS
,AIID THE CHARACTER 377
,GET RECEIVER ACTIVE
,SHIn Bce ONCE
,BUMP SHIrt COUNT
,CALCULATE SOFTWARE Bce LSB
,ONE SHIrT
,DATA CHARACTER
,OLD BCC
~ 8R IF stlrT BCC UB lS SET
,GET HARDWAIlI!: Rte~IVEM Dec I.IIU'
,SR If HARD SCC LSB IS CLEAR ,ERROR, BCC LSB IS SET

761
PC,GETQI
761
17

,Gn HARDWARE RECEIVER 8CC LSB
,8R lr HARD SCC UB IS SET
,ERROR, BCC LSB IS CLEAR

,OLD BCC
,BR IF SOFT Bec La8 IS SU
,~&T HARDWARE TRANSMITTER BCC LSB
,SR IF HARD BCC LSB IS CL.EAR
,ERROR, BCC LSS IS SET
,CONTINUE
,GET HARDIIARE TRANSMITTER BCC LSB
, B8 Ir HARD Bce
IS SET
,~~ROR, HARD BCC Las IS CLEAR

691.
006037
013737
022700
001346
104401
012731
004737
005000
012137
012737
005031
0047 37
000317
104415
104415
005200
004537
000001
000000
000000

020252
021320
000010

020254

020332
021662

001320

120001
000311
020410
027322

021316
020406

1UI

000032
000001

72*1

027212

1
73St
741.

Q20412

1Q~4Q!

020414
020420
020422
02Q424
020426
020432
020434
020436
02043&
020442
020450
020454
020456
020460

004737
103006
10401]
000404
004731
103401
104017

021446

006037
013731
022700
001346
104401
104400

020406
027320
000010

021446

151.

0
0

Be!

'lit

JSR
BCC
Ht.T
8R
JSR
BCS
HIll'

PC;OETQI
161

ROR
MOY
CMP
BNE
SCOP1
SCOPE

131
CAt.BCC,1U
110,RO
72*

ICONTINUE

1611
020410

7711

,SHIFT SOrt DATA
,I10AD OLD SOFT Bce
,DONE YET?
, BR IF NOT DONE
f SCOPE SUBTEST (SII09-0
,SCOPE THIS TEST

3115
1116
H17
3118

'*************************** TEST 43 *********************** ••••
,*TEST OF CRC OPERATION
,*USING THE CRC16 POLYNOMIAL, SINGLE CLOCK THE CHARACTER
,*317, VERln THE UB OF THE BCC ON EACH SHIFT
,*TEST TRANSMITTER rlRST THEN THE R!CEIVE~ Bce
, ! ***** ••• ***.**************'*******.****************************

lO4R

3053
3054
3055
30'511
3057

IDONE n;T?
18R 11 NOT DONE
I SCOPE SUSTEST (51)109:01)
Z NEW SCOPE!
,CLEAR BCC REGrSTERS
I START $!11FT COUneR' AT ZERO
I LOAD POLYNOMIAL FOil SOFTWARE
1 t.Ol\O CHAR FOR SOFTWARE BCC
,CLEAR OLD SOFTwARE BCC
,LOAD OUT SILO WITh 2 SYNCS
I AhD THE CHARACTER 0

0071

16St
006037
013737

3n~7

3049
3050
3051
30t;2

PAGt:1

, *-************--*********** TEST 44 ******************-*.** •• **
,.TEST OF CRC OPERATION

0078

DZO .... E
MACy1\ 30(1046)
ll-JllL-n
DZDMIi.Pll
12-MlIY-7714119
31 t 9
3120
] 121
3122
3123
3124
l125
3126
3127
3128
3129
3130
3t 31
3132
3131
3134
3135
3116
3137
3138
3139

3140
1141
3142
3143
3144
3145
3I4b
1147
314R
3149
3150
3151
3152
3153
3154
3155
3156
3157
315R
3159
3160
31fH
3162
311>3
311>4
3165
3166
) t 67
31 nB
Hf>9
3170
317\

3172
3173
3174

317'5
3171'.
ll7A
3179
31 eo
31Pl
31112
He3
31114
3185
31 Bf,

31 A7
3HIR
31 RQ

PAGEl

,._._--_..----,

(>20462
0'0470
020476

012737
1112737
012737

020504
020506
020512
0200;16
020520
020526
020534
020'540
020"i44
020546
0'0552

104412
012711
01)4737
005(01)
012737
012737
005037
004737
01)0125
104415
104415
005200
004537
000001
000000
000000
103405
004737
103006
104012
000404
004737
103401
104016

0~0556

020560
!l20564
020,)66
02 0 570
020572
0'00;74
020600
02(1)02
020604
020606
020612
0201)14
020616
020616
020622
020630
010('34
020636
020640
020646
020652
020654
020('62

006037
013737
022700
001346
104401
012737
004737
O()5000
012737
012737

()20670
020674
020700
0'-0702
02070f>
020712
0,1)714
020720
020722
070724

0,)5037
004137
000125
104415
104415
005200
004537
000001
000000
(l00000

000044
020776
020512

001226
001216
001220

020726
020730
020714
020736
1)20740
020742
020746
020750
0207"i 2
020752
020756
020764
0'0770
020772
020774

TST441

004000

027662
120001
000125
020570

6481
027316
020566

027322
000021

000001

65'1

027212
66$,
6781

TEST 44

MOV
MOV
MOV

027434

'TST45,~EXT

t64S,LOCK

MSTCt.R
MOV
,SITll,CR1)
JSR
PC,CI.flIO
CLR
RO
MOV
tCRC16,XPOLY
MOV
1125,666,
CLR
67$
JSR
PC,BCCLD
125
DATACLK,
21
DATACLK,
1
INC
RO
JSR
R5,SIMBCC
1

o
BCS
JSR
BCC
HLT
BR
JSR
BCS
HLT

027434

.44,TSTNO

61t
PC,GETQO

69$
12
69S
PC,GETQO
69S
16

,Rl CONTAINS BASE DMCll ADDRESS
,MASTER CLEAR DMCll
,SET LU t.OOP
,Ct.EAR BCC REGISTE.RS
,START SHIFT COONTER AT ZERO
,LOAD POLYNOMIAL FOR SOFTWARE BCC
I LOAD CHAR FOR SOFTWARE BCC
,Ct.EAR OLD SOfT WAllE BCC
,LOAD OUT SILO WITH 2 SYNCS
,AND THE CHARACTER 125
,GET TRANSMITTER ACTIVE
,SHIFT BCC ONCE
,BUMP SHIFT COUNT
,CALCULATE SOFTWARE SCC t.SB
,ONE SHIFT
,DATA CHARACTER
,01,.0 BCC
,BR IF SOFT BCC t.SS IS SET
,GET HARDWARE TRANSMITTER Bce LSB
,~R IF HARD BCC t.SB IS CLEAR
,ERROR, BCC LSS IS SET
,CONTINUE
,GET HARDWARE TRANSMITTER BCC I.SB
,BR IF HARD BCC t.SB IS SET
,ERROR, HARD BCC LSB IS CLEAR

69"
020566

027320

020570

000010
020646
027662

001220

120001
000125

027316
020722

71$1

020724
027322

103405
01)4737
103006
11)4013
000404
004737
103401
11)4017

ROR
MOV
CMP
SNE
SCOPl
MOV
JSR
Ct.R
MOV
MOV

66.
CAI.BCC,67$
110,RO
655
nU,I.OCK
PC,CI.RIO
RO
'CRC16.XPOI.Y
ti25,73.,

Ct.R
748
JSR
PC,BCCLD
125
DATACLK,
32
DATACLK,
1
INC
RO
JSR
R5, SIMSCC
1

000032
000001
027212
73'1
7481

o
o

,SHIFT sorT DATA
,LOAD OLD sorT BCC
,nONE YET?
,BR IF' NOT DONE
,SCOPE SUSTEST [SWag-I)
,NEW SCOPEl
,CLEAR BCC fl.EGISTERS
,START SHIrT COUNTER AT ZERO
,LOAD POI.YNOMIAt. FOR sorTWARE BCC
,t.OAD CHAR FOR sorTWARE SCC
,Ct.EAR OLD sorTwARE BCC
,LOAD OUT $11,.0 WITH 2 SYNCS
,AND THE CHARACTER 125
,GET RECEIVER ACTIVE
,SHIFT BCC ONCE
,BUMP SHIFT COUNT
,CALCUt.ATE SOFTWARE BCC LSB
,OM': SHIFT
,DATA CHARACTER
,01,.0 BCC
PAGEl

11140 PAGE 61
BASIC RECEIVE!'! TESTS

027446

7511

SCS
JSII
SCC
HI.T
BII
JSR
BCS
HLT

75.
PC,GETQI
7U

ROR
HOV
CMp
SNE
SCOPI
SCOPE;

731
CAI.BCC,7U
110,110
721

13
76.
PC,GETQI

761
17

,8R IF sorT BCC t.SB IS SET
,GET HARDWARE RECEIVER BCC 1.58
,BR IF HARD BCC LSS IS Ct.EAR
,ERROII, BCC t.SB IS SET
,CONTINUE
,GET HARDWARE IIECEIVER BCC LSB
, BR IF HARD BCC X.SB IS SET
,ERROR, BCC LSB IS Ct.!:AR

76 . .
006037
013737
022700
001346
104401
104400

020722
027320
000010

020724

77$,

,SHIrT SOP'T DATA
,LOAD OLD SOFT BCC
,DONE YET?
,BII IP' NOT DONE
ISCOP! SUBTEST (S\II0901)
,SCOPE THIS TEST

~'on

31'11
31 '12
3193
3194
3195
3t 96
3197
3199
1199
3200
3201
3202
3203
3204
3205
3206
3207
3208
1209
3210
3211
3212
3213
3214

3215
3216

3217
3218
3219
3220
3221
3222
3223
3224

3225
3226
3227
3228
12i'l

321{'

0079

,.USING THE CRC 16 PULYNn'l IAL. 51 NGLE CLOCf( THE CHARACTER
'''125. VERIf"{ THE L5B OF' TI1F: BCC ON t.ACH SHUT
,"TEST TRAr.SMlT'TER FIRST THF.N THE RECEIVER BCC
, I * ............... **** ....................... * .......................................... *** ... * .. ***.*** ..

DZO"'E
MACYll 30 C1 046)
l1-JUt.-n
DZO"E. Pit
1 2-"'AY-77 14118

3177

11140 PAG~ bO
BASIC RECEIVER TESTS

,*************************** TEST 45 ***************************
,*T!ST OP' CIIC OPERATION
.
,lOUSING THE CRC16 POt.YNOMIAL, SINGLE CLOCK THE CHARACTER
,*252, VERIP'Y THE LSS OF THE BCC O~ EACH SHIFT
,*TEST TRANSMITTER FIRST THEN THE RECEIVER BCC
, '*********.** *** * **** .. ********* ***** ************************* ***
TEST 45
,.............
.
020776
021004
021012

012737
012737
012737

021020
021022
021026

012711

021032
021034
021042
021050
021054
021060
021062
021066
021072
021074
021100
021102
021104
021106
021110

021114
021116
021120
021122
02112&
021130

000045
021312
021026

TST451

104412
004737
005000
012737
012737
005037
004737
000252

104415
104415
005200
004537
000001
01)0000
01)0000
103405
004737
103006
104012
000404
004737
103401
104016

004000
027662
120001
000252
021104
027322
000021
000001

6UI
027316
021102

6581

027212

MOV
MOV
MOV

.45,TSTNO
nST46,NEXT
164., LOCK

,Rl CONTAINS BASE DMC11 ADDRESS
,~ASTER Ct.EAR DMC11
,SET LU t.OOP
,Ct.EAR BCC REGISTERS
,START SHIn COUNTER AT ZERO
,LOAD POt.YNOMIAL FOR SOP'TWARE SCC
,LOAD CHAII rOR SOFTWARE BCC
,CLEAR 01.0 SOP'TWARE Bce
,t.OAD OUT SIl,.O WITH 2 SYNCS
,AND THE CHARACTER 252
,GET TRANSMITTER ACTIVE
,SHIP'T BCC ONCE
,BUMP SHIFT COUNT
,CALCULATE SOP'TWARE BeC t.SB
,ONE SHUT
,DATA CHARACTER
,01,.0 BCC
,BII IF SOFT BCC LSS IS SET
,GET HAIIDWA!'!E TRANSMITTER SCC t.SB
,BR If HARD BCC LSB IS Ct.EAII
IERROR, SCC t.SB IS SET
.
,CONTINUE
1 GET HARDWARE TRANSMITTER SCC t.SB
,SR IF HARD BCC t.SB IS SET
I ERROR, HARD Bce x.se IS Ct.EAR

66.

I SHIFT sorT DAn

MSTCLR
MOV
.SITU, (Rl)
JSR
PC,Ct.RIO
CLR
RO
MOV
!!CRC16.XPOLY
MOV
1252,661,
CLR
675
JSR
PC,BCCLD
252
DATACLK,
:u
DATACt.K,
1
INC
RO
JSR
115, UMBCC

66t1
6781
027434

027434

Qil132
021131

001226
001216
001220

6811

o
o
BCS
.lSR
BCC
Ht.T
BR
JSR
BCS
Ht.T

681
PC,GETQD
69.

12
691
PC, GETQO

698

6911
O'l!i037

021102

ROR

0080

DZD~IE
"'AC'{11 30(\046)
l1-JuL-n
DZI)"'E,Pll
12-MA~-77 14118

3231
~732

3133
3234
3235
3236
3237
3238
3239
3240
3241
3242

3143
3244
3245
3246
n47
32411
3249
3250
3251
3252
3253
3254
3255
3256
3257
3200;8
325<1
n60
3261
3262
3263
3264
3'6'5
3266
3267
3268
3269
)270
3271
3272
3273
3274
3275
3176

3'177
3278
3279
32~0

3781
3282
3283
32A4
32ij5
3296

Oil136
nil144
021150
021152
021154
0211t>2
021166
021170
112117/)
021204
G' 1210

021214
021 '21 6
071222
021226
021230
021234
021236
021240
021242
1)21244
021250
021252
021254
0212';6
021262
021264
021266
021266
021272
021300
021304
021306
021310

013737
022700
001346
104401
012737
004737
005000
012737
012737
005037
004737
000252
! 04415
104415
005200
004537
0110001
000000
000000
103405
004737
103006
104013
000404
004737
103401
104017
006037
013737
022700
001346
104401
104400

027320
000010

021104

021162
027&62

001220

120001
000252
021240
027322

027316
021236

000032
000001

72'1

02'7312

7UI
74$1
03,.46

027446

7!UI

3323
3324
3325

. 3326
3327
3328
3329
3330
]331
3332
3333
3334
3335

021240

"11

021312
02! 320
021326
021330
021334
0")36
021340
021342
021346
021354
02131>0

012737
012737

000046
021550

001226
001216

021]64
0213"6
021370
021372
021376
tl21400
021402

021472
021472
021476
1)21504
021506
021512
021514
021516
021'520
021524
021526
021532
021534
021536
021540
021544
021546

TST46 1

104412

012711

75.
PC,GETQI

'161
13

761
PC,GtTQI
768
17

ROR
MCV
CMp
SNE
SCo.Pl
SCOPE

73.
CALiCC,,. . .
t10.RO

721

:LCAD OUT SILO wI~H 2 SYNCS
,AND THE CHARACTER 252
,GET RECEIVER ACTIVE
J IUlIfT BCC ONCE
,BUMp SHIFT CCUNT
,CALCUr..ATE SSfTWARE BCC UB
,CNE SHIrT
,DATA CHARACTER
,OLD SCC
,BR If scrT BCC LSB IS SET
, GET HARDWARE RECEIVER BCC Lsa
rBR IF HARD BCC LSB IS CLEAR
,ERROR, Bec loSB IS SET
,CCNTINUE
,GET HARDItIAPE RECEIVER BCC La8
,SR IF HAIlD Bee LSS IS sn
'E~ROR, BCC LSS IS CLEAR
, SHIFT SCFT DATA
, LOA'D CLD SOFT acc
,DONE YET?
,BR IF NOT DCNE
,SCCPE SUB TEST (51'109-1)
,SCOPE THIS TEST

?05003
005004
005005
005037
012737
004737
010461

104414
122110
005204
010461
104414
122110
005204
G104t;1
104414
122110
004737
104415
010537
104415
004537
000001
000000
000000
103405
004737
103006
104020
000404
004737
103401
104021

*•••••••••••••• *•••••••.••••••••••••••••••••••••

MSTCLR
MCV

#1%T11i(~1)

021444
120001
027464
000004

CLR
CLR
CLR
CLR
MCv
JSIl
MOV

R3
R4
R5
41
.CRC16,XPCJ.,Y
PC,SYNLO
R4,4(RO

027316

,Rl CCNTAINS BASE DMCll ADDRE~S
,MASTER CLEAR DMCl1
;SET LiIN£ Uti:': ~OCP
, ZERO. BIT CCUNT
, R4 CONTAINS CIiAR TO. BE LCADED 11-1 SILO
,R5 CCNTAINS CHAR CURRENTLY BEING SHIFTED OUT
,CLEAR SCrT BeC
,LOAD POLYNOMINAt.
,1;.OAD SILO. WITH 2 SYNCS, 150M SET

, PORU..(:HAR

11140 PAGE 63
SASIC RECEIVER TESTS

PAGEl

000004

RCMeL\(
122110
INC
MCV
RCMCLK
122110
INC

occoo~

MOV

026350
000021
021442
000001
027212

ROMCL\(
122110
JSR
PC,CtCR
DATACLK,21
MCV
R5,H
OATACLK,l
R5,SIMBeC
,JSR

181
211

,NEXT wCRD IS INSTRUCTICN, ROMCLK PC_5l04
ItoOAO CUT DATA
,INCREMENT TO NEXT CHARACTER
,PORT4..CHAR
,NEXT WCRO IS INSTRUCTICN, ROMCLK PC-5304
,LOAD OUT D)'TA
,INCR€MENT TO. NEXT CHARACTER
: POR'l'4..cHAR
,NUT WOIlO IS INaTRUCTII)N, RCMCLK PC-lil04
,toCAl) CUT DATA
,IIIAIT FOlt CCOR
,tZLOCK DATA
,LQAD CHAR FOR SOFT CRC
J5HIFT BeC CNCE
,CALCULATE SOFT BCC
,SOFT SHIFT CCUNT
CHARACTER
,0.1.0 SOFT BCC
, BR IF scn BCC LSB IS SET
,GET HARDWARE TRANSMITTER BCC LSB
,BR IF CK (CLEARED)
,ERRCUt, BeC UB ilAS SEt
,.CONTINUE WITH TEST
, GET HARD.wUE TRit.Ii8MITTEii SCC I..SS
,B~ If CK (SET)
, ERROR, BCC LSI liAS CLEAR

J SKIrT SOFT DATA

CALBCC,4,

, LOAD OLD SCFT BCC
,INCREMENT BIT CCUNTER
,DONE A FULL CHARACTER YET?
,~ IF NO
,RESTART BIT COUNTER
I INCREMENT DATA rOR 511.0.
,DCNE BINAIt't COUNT YETt
IBR IF US
, PORT4.J)ATl

1
311
411
on434

sal

027434

*._....•...**

TEST 46
J••••••••••••••
MCV
.46,TSTNC
MOV
ITST47. NEn

004000

,son

o
o
58

BCs
JSR
BCc
Hr.T
BR
JSIl
BCS
HLT

PC,GETQO

U
20

U
PC,GE'l'QO

6 ..
006037
013737
005.203
022703
001346
005003
005204
022704
003404
010461

021442
02'7320

021444

000010

000400
000004

iOHH
122110
005205
022705
001327
104400

911
OOG4!)0

RCIl
MOV
INC
CMp
BNE
CLF!
INC
CMp
SLE
MOv
i\OACLit
122110
INC

CMp

Rl
110dt3

U
U
Rt
HOO,At
91
R4,4(RU
PS
,40i"l.R$

BNE
SCCPE

""11 ••••

;~~!~ ~~iO DiiA !M!T~~CT:J:~~;
,INCUMENT DATA
,DCNE BINARY PATTERN YET?
,IR IF NO
,SCOPE THI5 TEST

*.'*.

,****.1*** ••
** ...
TEST 4' . . . . . . . . . * •• * •• * •• * ••••••• *
,.RECEIVEl\ CRC 'tEn
,*USING THE CRCU POLYNCMINAL, 8INGI.E er..OCK A BINARY
JICOUNT PATTERJI, VERIP'Y THE LSB cr TKE RECEIVER Bee ON EACH SKIFT
, 1 •••• * ••••••••••••• * ••
* ••• ** •• ~.* •••

** •••••••••••••*•• **.*•••

3337

3338
3339

,.............. .
TEI'I' 47

3340
3341

BCS
JSR
BCC
HLT
BR
JSR
BeS
HLT

7681
021236
037320
000010

3116

3342

o
o

I LOAD OLD SOFT BeC
IDO'!£; 'tET?
IBR IF NOT DO'IE
I SCOPE SUBTEST (SWQllzU
,Nf;W SCOPEI
J CLEAR acc REGIST!RS
:S'l'ART SH!FT CCUNTER AT ZERO
I LCAD POLYNOMIAL FCR SOFTWARE SCC
,LOAD CHAR FOR SQFTWARE ace
,CLEAR OLD SOFTWARE BCC

ij~1404

3311

May
1711$, LOCK
.)SR
PC,CLIUO
eLF
RO
MOV
,CRC16,XPOL't
MOV
.252,73$:
CLR
748
JSR
~C;!!CCLP
252
DATACLJ(,
32
DATACLJ(,
1
INC
RO
JSR
R5,SIMSCC
1

, I ••

021410
021412
021414
021420
021424
021430
021434
021440
021442
021444
021446
021450
021454
021456
021460
021462
021466
021470

3312
3313
3314
3315
3316
3317
1318
3319
3320
3321
3322

CALBCC,67S
flO,RO
65$

0081

,•••• *••••••••••••••••••••••

3'<15
3296
3297
3298
3299
3300
3301 .
H02

3305
3306
3307
)308
H09
3310

PAGEl

TEST 46 •••••* ••• ** ••••••• * ••••••••
I.TRANSMITTER CRe TEST
,.USING THE CRC16 PCLYNCMINAL, SINGLE CLCCK A BINARY
,·CCUNT PATTERN, VERIFY THE
CF THE TRANSMITTER Bce ON t;ACH SHIFT

3294

3303
3304

MOV
CMP
BNE
SCO?l

711r

DZDME
MACyll 30(1046)
l1-JUL-"
DZOME,Pll
12-rUY-77 14118
3287
3288
3289
3290
3291
3292
3293

11140 PAGE b2
BAStC RECElVER TESTS

021550
021556

012737
012737

000047
022006

001226
001216

TST4'7:

MOV
MCV

•• 7,TSTIIO
n1iT50. NEXT

0012

!)ZO~~E

"'ACyl1 30( 1046)
l1-JUL-77
"ZouE..Pll
t2-MA~-77 14118

n43
3144

3HS
3l4t>
1147
3348
1349
3350
3351
3352
3353
3354
3355
3356
3157

3358
3359
33&0
3361
3362
3363
3364
33&5
3366
3367

3368
3169
3370
3171
3372

3373
3)74
3375
3376

3377
1371'1
3379

HBO
3381
3182
3383
3384

HilS
3386
3387
3398
3389
1390
3391
3392
3391
3394
H95
H9t'>
3397
1391'

021564
0210;61>
n21 0; 72
021'l74
021576
021600
021604
021612
021616
021622
0'1624
021626
021630
021634
021636
021640
021642
0211\46
021650
1121652
021656
0'11\62
021666
021672
(l2167!>
021700
021702
'121704
021706
021712
021714
1)21716
021720
021724
021726
021730
021730
021734
(I,t742

it'4412
012711
(\0500]
005004
005005
005037
012737
004737
01041>\
104414
122110
005204
010461
104414
122110
005204
010461
104414
122110
(\04737
104415
010537
104415
004537
000001
000000
000000
103405
004737
103006
104022
000404
1104737
103401
104023

004000

021702
120001
021464
000004

027316

000004

026350
000032
021700
000001
027212

181

281

4$ 1
027446

5 ..

027.446

021750
0217'52
021754
1121756
021762
n21764
ll21770
021172
11'21774
11'1716
022002
027004

003404
010461
104414
122ttO
005205
022705
001327
104400

021700
027320
000010

000400

000004

9$1

000400

781

3419
3420
3421
3422
3423
3424
3425
3426
3427
3428
3429
3430
3431
3432
3433
3434
3435
343&
3437

3438
3439
1440
3441
3442

3443
3444

3445
)446

3447

3448
3449
3450
3451
3452
H~3
34~4

BCS
JSR
BCC
HLT
BR
JSR
BCS
HLT

PC,GETQI

22
68
PC,GETQI

be
23

U
CALBCC,4,
R3

UO,R3

21
R3
R4
t400,R4

8Li
MOV
ROMCLIC
12211 0
INC
CMp
BNE
SCOPE

91
Rh4011 )
R5
HOO,R!!

I SHIFT SOFT DATA
,LOAD OLD SOFT 8CC
,INCREMENT BIT COUNTER
,DONE A rULL CHARACTER YET.,
,SR IF NO
,RESTART BIT COUNTER
,INCREMENT DATA FOR SILO
,DONE BINARY COUNT YET?
ISR Ir YES
IPORT4.DATA
,NEXT WORD IS INSTRUCTION, RO~CLK PC-5304
,LOAD OUT DATA
,INCREMENT DATA
,DONE BINARY PATTERN YET.,
,BR Ir NO
,SCOPE THIS TEST

PAGEl

,*************************** TEST 50 ***************************
,*TRANSMITTER DDCMP CRC TEST
,*THIs TEST TRANSMITS A FOUR CHARACTER MESSAGE WITH CRC
,*80TH DATA AND THE BCC ARE VERIFIED IN THE BIT
,*wINDOW, THE FOUR CHARACTERS ARE 0,125,252,377
,*THE TI!ANSMITTER IS CHECKED FOR GOING TO A MARK STAn; AFTEI! THE BCC
I 1******************* ***** * ****** ****** *** *** ***** **** * ** ** **** *

,.•.•••...•....
,

022006
022014

012737
012737

022022

104412

022024
022030
022034
022041)
022044
o22n50
02'2054
022060
022nf:l2
022064
022070
022074
0221)76
022102
022104

012711
012704
005037
012700
004737
004737
004537
030102
000004
004737
004737
0115003
104415
112405
010502

000050
022340

001226
001216

TST501

TEsT 50

MOV
MOY

t!lO,TSTNO
.TST51,NEXT
,R 1 CONTAINS 8ASE DHCll ADDRE~S
,MASTER CLEAR DMC11

MSTCLR
,LOAD OUT DATA SILO
004000
030102
022130
000004
027464
026502
027620

!oIOV
MOy
CLR
MOY
JSR
JSR
JSR
MESDA!

027574
026350

JSR
PC,tOM
JSR
PC,OCOR
CLR
U
DATACLIt,22
MOya
(R4)+,R5
MOV
R5,R2

.8IT11, OU)
,MESDAT,R4
10'
H,RO
PC,SlNLD
PC,OUTRDY
R5,MESLD

000022
1211

,SET LINt UNIT LOOP
,LOAD POINTER TO DATA
,CLEAR sorT BCC
,LOAD CHARACTER COUNT
,LOAD 2 SYNCS IN OUT SILO
,WAIT FOR DUTRO!
,"DAD sILO WITH 4 CHAR MESS
,ADDRESS or MtSSAGE
,NUMBER or CHARACTERS
,LOAD GARBAGE CHARACTER, WITH tOM SET
,WAIT FOR OCOR
,CLEAR BIT COUNTER
,CLOCK DATA
,LOAD R5 WITH CHAR
,~OAD R2 WITH CHAR

,CHtCIC FIRST fOUR CHARACTER MESSAGE
,IN THE BIT WINDOW (0,125,252,377)
022106
022114
022120
022124
022126
022130
022132
022140
022144
022146
02'21 !lo
0221 !l4
022156
022160
022162
022166
022170
022172
022172

022174

Ot'B]

IRI CONTAlNS BASE DMCll ADDRESS
I MASTER CLEA~ DMC 11
,SET LINE: UNIT LOOP
,ZERU BIT cnUNT
I R4 CONTAINS CHAR TO BE LOADED IN SILO
IR5 CONTAINS CHAR CURRENTL~ Bt-ING SHIFTED OUT
I CLEAR SOfT sce
I LOAD POLYNOMINAi"
ILOAD SILO WlTH 2 SYNCS, SOM SET
, PORU_CHAR
INEXT WORD IS INSTRUCTION, ROMCLK PC:5304
I LOAD OUT DATA
,INCREMENT TO NEXT CHARACTER
IPORT4_CHAR
INEXT WORD IS INSTRUCTION, ROMCLK PC=5304
,LUAD OUT DATA
'INCREMENT TO NEXT CHARACTER
, PORT4.. CHAR
,NEXT WORD IS INSTRUCTION, ROMCLK PC=5304
,LOAD OUT DATA
,WAlT FOR OCOR
,CLOCK DATA
,LOAD CHAR rOR SOrT CRC
,SHIFT BCC ONCE
,CALCULATE SOFT BCC
,SOFT SHIFT COUNT
,sorT CHARACTER
,OLD SOFT BCC
,SR IF SOFT BCC LS8 Is SET
I GET HARDWARE RECEIVER acc LSB
,BR IF OK (CLEARED)
,ERROR, BCC LSB WAS SET
,CONTINUE ~ITH TEST
,GET HARDWARE RECEIVER BCC LSS
,SR IF 01( (SET)
,ERROR, BCC LSB WAS CLEAR

11140
PAGE 65
BASIC RECEIYER TESTS

~~. 4

3418

ROR
MOV
INC
CMp
BNE
CLR
INC
CMp

021702

3399

3415
3416
3417

MSTCLR
MOV
'BlT11,(~1)
CLR
R3
R4CLR
R5
CloP
CLp
4S
MOV
.CRC1f:1,XPOL't
PC,SYNi"Ll
JSR
MOV
R4,4(RIl
ROMCLK
122110
INC
R4
MOV
R4,4(RIl
ROMCLII
122110
INC
1'14
R4,4(R1)
MOV
ROMCLK
122110
JSR
PC,OCOR
DATACLK,32
MOV
R5, 18
DATACLK,1
JSR
R5,SIMBCC

3 ..

DZD"lE
MACY11 30 C1 046)
11-JUL·,7
nZD"E. PI'
12-"AY-77 14118

3400
3401
)402
3403
34114
3405
)406
3407
3408
3409
3410
3411
3412
3413

PAGI:;I

6$1

006037
013737
005203
1122703
001346
005003
005204
022704

u2l,44

11140
PAGe: 64
BASIC PECEIVER Tf.STS

012737
010537
004537
000010
000000
000000
013737
1 n4415
106002
103005
004737
103406
104006
000404
004737
103001
104006

120001
022126
027212

027316

027320
000001

022130

MOV
MOV
JSR
10
6"1

lOll
64'1

026316

65'1

.CRC16,XPOLY
R5,67.
R5,SIMBCC

o
o

MOy
CALBCC,10.
DATACLK,
RORB
R2
BCC
65.
JSR
PC, GETSI
BCS
661
HLT
6
BR
668
JSR
PC, GETSI
8CC
66'
HLT
6

,LOAD POLYNOMIAL
,LOAD SOFT CHAR FOR BCC
,CALCULATE SOFT BCC
,SHIFT COUNT
,CHARACTER
,OLD BCC
,LOAD sorT BCC rOR NEXT SHIrT
,SHIFT DATA IN TO BIT WINDOW
,SHIFT SOfT DATA
,SR Ir A SPACE
,LOOK AT BIT WINDOW
,BR Ir OK (MAPI()
,ERROR, BIT WINDOW WAS A SPACE
,CONTINUE
,LOOK AT BIT WINDOW
,BR IP' OK (SPACE)
,ERROR, BIT WINDOW WAS A MAliK

6611
005203
02:1703

000010

INC
C!<Ip

HO,R)

,BU~P

BIT COUNTER
IOONE fULl. B BITS YET

0084

D~O"E:

141)!i
l4~6

14~1

H5a
1459

I ~ .. JUL .. 77
30 (1 1)46)
t2-"AY·77 14119

MA.Cy11

DZD"E,PII

')22200
022202
022204
iil~'206

34~4

3465
3466
3467
]46A
3469
3470
3471

3412
3473

1474
3415
3476

3477
3478
3479
3480
HSl
3482
1483
3494
3485
3486
3487
3488
3489
3490
34Q1
3492
H93
3494
H95
)496
3497
3498
3499
3500

BNE
CLFI
DEC
SNE

00\ 3S7
005001
ooS 300
c01 ~35

6U
I'll
1'10
128

022210
O?2214
022220
022222
022244:
022230
()22232
022234
022236
022242
022244
0222 46
n22246
n22250
022254
02'2256

013700
104415
006000
\03005
004737

103406
104014
000404
004737
ln3001
104014

MOV

o:n120
b8S1

000001
025316

DATACL~,l

FlOR
SCC
JSR

1'10
691
PC,GETSI

HLT
Sil
JSFI
SCC
HLT

14
'70t
PC,GETSI
704

sea
6911

026116

CA!..!lCC.PO

'/oe

,CLEA~ aIT COUNTER
,O~C CI4ARACTER CQUNT
,BP IP NOl OO~E YET

an WINDOW

IPUT acc IN M
,SHU''F HAFDWARE BCC
,SHIFT SOFT SCC
,SR IF CAFIRY CLEAR
I LOOK AT BIT wINDOW
j8R :r OK (MAPK)
,E~OR, CRe WRQNG (SPlCE)

,Ca1tTINU~

,I.OGK U'SIT WINDOW
,BR IY QK CSPACE)
,e;RRllR, eRe WRONG (MARK)

701.1
005203
022703
001357
005003

INC
CMp
BNE
CL.R

000020

1\3
'20,R3

6Sf
1'13

,SUMP BIT COUNTER
'FINI~HED SCC YET?
,SR IF NO
,CLE~R BIT

COU~TE~

,CHECK TO 8tE IF TRANSMITTER IS MARKING
0241260
(J22264
022270
°'22 7 2
022274
022276
022302
022304
022310
0'22312
022316
02'2322
1)~'324

11'2126
022330
0112334
O?2H6

1 n441!1
0047 37
103401
\04024
005203
022703
001366
\04415
005003
11)4415
004737
103401
104024
005203
022703
001366
104400

2 ..

000001
026316

lii
000007
000010
000001
026316

000020
!I"

DATACl.K,
1
PC,GETSI
JSR
SCS
3.
HLT
24

:gc

C(I'Ip
.."R)
BNE
2t
DATACLK,
10
CLR
1'13
DATACLK,
1
PC,GUSl
JSfI
BCS
.+4
HL.T
24
INC
1'13
CMp
.20,1'13
!!N£
~8
SCOPE

,CLOCK TRANSMITTER
,LOOK AT W1NDOW
,IT SHOUI.O SE MARKING
,ERROR, BIT WA.S A SPACE
~8UI4P BIT COUNTER
,DONE YET
,BR IP' NO
,GIVE ENOuGH TICKS TO CLEAR OUT ACTIVE
,CLEAR BIT COUNTER
,SHIFT OUT NEXT SIT
lLOQK AT BIT WIN.DOW
,SR l ' IT IS A MARK
,ERROR, TRANS.MITTEf\ 15 NOT MUKING
,INC BIT COUNT
,DONE YET?
'Bli If' NO
,s.cOt>E THIS TEST

, *******.*** •• **.* ••••• ** •• * TES·T 51 **.* •• *.*******************
,*RECEIVER DDCMP CRC TEST
,*THIS TEST CLOCKS A FOUR CHARACTER MESSAGE WITH BCC
,*AND VERIFYS CORRECT DATA RECEPTION AND sec MATCH

3504
l505
3506
150'1

,*THE FOUR CHARACTER "iSSAGE is 0,125,2:2,377
,1********************************************.*********.*******
TEST 51
,.•....•..••.•.

3"iOR

DZDIo4E

022140
022346

0127)7
012737

000051
022542

MACylI 30(1046)
l1-JUL.-'"
12 .. MA~·77 14118

DZD~E,Pt 1

3511
3512
3513
3514
3515
3516
3517

,:;:a, "

.3519
3520
3521
35'22
3523
3524
3525
3526
3527
3528
3529
30;]0
3531
3532
3533
3514
3535
3536
3537
3538
1539
3540
3541
354:t!
3543
3544
3545
3546
3547
3548
3549
3550
3551
3552
3553
3!154
355!1
3556
3557
1558
3559
356U
3!161
3562
3!163
3'564
3565
3566

001226
OOi216

(122354
022356
o?2362
022366
022372
022376
022402
022406
022410
022412
0'22416
022422
022426
022432
022434
0112436
0'22442
022444
022446
022450
0224S2
022454

104412
012711
012702
012700
004131
004737
OC4~ 37
030102
000004
004737
004737
104415
004137
104414
021204
016104
112205
120504
001401
104010
005300
001364

022456
022462
022464
022466
022474
022502
022506
022!110
0'22512
022516
022522
022526
u22!ilO
022512
022534
022534
022536
022!140

004737
104414
021204
116137
042737
004737
104414
021244
0'6104
042704
012705
1,20504
uOl-ioi
104015

'rUStl

ioiOV
MOV

fS1,TS'l'IIC
Un5a,NEXT

11 . . 0 PAGE 67
BASIC RECEIVER TESTS

004000
030102
000004
027464
026!102

027620
02'7574
026350
000114
0271!16

311

000004

til

PAGE.

MSTCLfI
MOV
tBITll,(R1)
MOV
'MESDAT,R2
MOV
14,1'10
PC,SYNLD
JSR
PC,OUTflDY
JSR
RS,MESLD
JSR
MESDA!
4
PC,EIJ.M
JSR
JSR
PC,OCOR
DATACt.IC,U4
JSR
PC, IfiRDY
ROMCLK
021204
MOV
4(R1),R4
MOVB
(~2)+,R5
CMPB
R5. fI4
SEQ
11
HLT
10
DEC
FlO
BNE
3t

,Hl CONTAINS BASE DMCll ADDRESS
,MASTER CL.EAR DHCll
,SET Ll~E UNIT LOOP
,LOAD POINTER TO DATA
,LOAD CHABlCTER COUNT
,LGAD 2 SYNCS IN OUT sn.o
I \tAIT rOfl OUTRDY
,LOAD SILO WITH 4 I;HAR MESS
,AiiDi.\ESS or MESSAGE
,N.t,I-MSU 01 CHARAeTERS
,LOA.D GA"AGE CHARACTER, WITH EOM SET
J WAIT FOR OCOR
rCLGC'K IlATA
rlllAn rQR INRDY
,NEXT WORD IS INSTRUCTION, RO~CLJ( PCaS304
,GET Itl DATA
,PUT "Ft).(J.ND" IN R4
,PU"f -!;XPECTEO' XN R5
,COMPAIlE RECEIVED DAtA

,1If! II" OK
,DA'J:A e;I'ROR
,DEC C~ARACTEB COUNT
,8R IF tlQT OO&E YE'J:

,CHItCK TO SEE tHAT IN BCC

1040414
021204
104400

027156
000004
177400
027156

JSR
ROMCLK
021204
MOVB
BIC
JSR
ROMe Lit
021244
MOV
SIC
MOV
CMPB
!!!Q
HLT

001252
0012!12

onOO04
000376
000001

pC.INRDY
4(RU,TEMP3
t1 '77400, TEMP)
PC,INRDY
4(RO,fl4
1376,1'14
.1,R5
fI!I,R4

MA~H

IS sn

,WAIT 'OR INROY
,NEXt WORQ IS INSTRUCTION, RO!,CLK PCa!l304
I GET PI"T HALF OF CRC
,p"., IN T·UP)
,CLEAR HI BYTE
'O.R INRDI
JNEtT WORD 18 INSTRUCTION, 1'10 II1C LK PCa5l04

,WAn

,PUT "FOUND" IN 1'14
,CLEAR U,NWANTED BITS
,PUT "EXPECTED" IN as
,IS IN BCC MA'BeH SJ:'1'?

~!!!

,IN sec IIUeH r;ili'ui'

25tl
281

ROMCLK
021204
SCOPE

I
II
•

350\
3502
3503

3509
)')10

0085

IBI< IF "10

,CHECI( BCC P'UR PRECEDING ~ES~A~ IN THE

HbO
3461

3462
3463

PAGEl

11140 PAG~ 66
BASIC RECEIVEFI 'fE:STS

,tlUT WO:iID IS IN&TIlI,lCTION, ROMCt.K PCaS304
,an LAS': HALf'
,SCOPE THIS TEST

, ••••••••• ****** •• **.*.*.*** Te:I!T 52 ** •••• **** •• *.*****.****.*.
,.DOCIIP EOM FUNCTION TEST
I*THIS TEST LOADS OUT SILO wUH' 2 SINCS,4 CHAR MUUloiE,EOM
'*4 CHARACTER MESS,E9M. THE .OAT1 STflEAM IS CHECKED TO-BE.
,*4 CHAR,BCC,4 CHAR,BC.C,MARKS. THIS TEST VERI'YII THAT
,*THE CHARCTERS t.OADED WITH EOM SET ARE LOST
,*ALL DATA AND BCC'S AAE CHECl\iD IN THE BIT WINDOW
,*THE rOUR CHARACTER MltaaAO! IS 0,125,252,37'7
,*RECEIVEP DATA IS VERIfIED, AND IN acc MATCH IS CHECUD
,1**** ••• ,*.****.**·*****.*****.*.***.",***'.'******'** ••• ******

0086

11-JUL-77
DZD~E:
"'ACYl I 30 (1'146)
12-~~A't-77 , 4118
OZD"E.Pll
35fJ7
3"6R
],,"9
3';70
3'571
3572
3573
3'574
3')15
]516
3571
3578
3579
3580
3581
H82
351! 3
3584
3585
3586
3597
3598
35A9
3590
3591
3592
35C13
3594
3595
3596
3597
3598
3599
3&00
3&01
1.. 02
1603
3604
36u5
3606
3607
3608
1609
36tO

012137
012737

022556

104412

022560
022564
()22570
022574
022600
022604
022610
022614
022616
022620
022624
022630
022632
022634
022640
022644
022646
022652
022654

012711
012704
005037
012700
004737
Ou4737
004537
030102
000004
004737
004537
030! 02
1)00004
0()4737
004737
005003
104415
112405
010502

000052
023642

001226
001216

1ST521

PAGEl

0088

•••••••• -~-

MaY
MOV

'52,TSTtI O
nST53,"'EXT
,Rl CONTAINS BASE D~Cll
,~ASTER CLEAR DMCII

MSTCLR

ADDRE~S

MOy
MOy
CLR
MOV
JSR
JSR
JSR
MESDAT
4
JSR
JSR
MESDAT

004000
030102
022700
000004
027464
026502
027620
027574
027620

,BITII,CRI)
,MESDAT,R4
lOS

t4,M
PC,SYNLD
PC,OUTRDY
R5,MESLD
PC,EOM
R5,MESLD

4
027574
026350
000022
12$.

PC,EOM
JSR
PC,OCOR
JSR
CLR
R3
DATACLK,22
(R4)+,R5
MOYB
MOY
R5,R2

,SET LINE UNIT LOOP
,LOAD POINTER TO DATA
,CLEAR SOFT BCC
,LOAD CHARACTER COUNT
,LOAD 2 SYNCS IN OUT SUO
,WAIT FOR OUTROY
,LOAD SILO WITH 4 CHAR MESS
,ADDRESS OF MESSAG~
,foIUM8ER OF CHARACTERS
,LOAD GARBAGE CHARACtER, WItH EOM SET
,LOAD FOUR MORE CHARACTERS
,ADDRESS OF MESSAGE
,NUMBER OF CHACTERS
,SET EOM
,WAIT FOR OCOR
,CLEAR BIT COUNTER
,CLOCK DATA
,LOAD R5 WITH CHAR
,LOAD R2 WITH CHAR

,CHECK FIRST FOUR CHARACTER MESSAGE
,IN THE BIT WINDOW (0,125,252,377)

3612
3613
3614
3b1!
3616
3617
3618
3619
3620
3621
36'22

022730
0'22732
022736
022740
022742
022742
022744
022750
022752
07i751

000404
004737
103001
104006

120001
022676
027212

027316

027320
000001

022700

6781
lOS I
648.

026316

65$1

026316

022756

MOY
.CRC16,XPOLY
MOY
R5,67$
R5,SIMBCC
JSR
10
0
0
MaY
CALBCC, lOS
DATACLK,
RORB
R2
BCC
65S
PC,GETSI
JSR
BCS
66t
HLT
6

,LOAD POLYNOMIAL
,LOAD SOFT CHAR FOR BCC
,CALCULATE: SOFT BCC
,SHIFT COUNT
,CHARACTER
,OLD BCC
,LOAD SOfT BCC rOR NEXT SHIrT
,SHIFT DATA IN TO BIT WINDOW
,Stun SOFT DATA
,BR IF A SPACE
,LOOK AT BIT WINDOW
,SR IF OK (MARK)
,ERROR, BIT WINDOW WAS A SPACE

BR
JSR
BCC
HLT

661
PC. GETSI
6U
6

,CONTINUE
,LOOK AT BIT WINDOW
,BR IF OK (SPACE)
,ERROR. BIT WINDOW WAS A MARK

INC
CMp
BNE
CLR
DEC

R3
Uo,R3
64.
R3
RO

,BUMP BIT COUNTER
,DONE FULL B 8ITS YET
,BR IF NO
,CLEAR BIT COUNTER
,DEC CHARACTER COUNT

66 ..
005203
022703
001357
005003
005300

000010

MACYt 1 30(1046)
U-JUL-n
DZD"'E
DZDI'4E.Pl t
12-MA¥-77 14,18

11140 PAGE 69
BASIC FlECEIVER TESTS
BNE

001335

121

,SR IF NOT DONE YET

,CHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW
022760
022764
u22770
1)'2772
022774
023000
023002
023004
023006
023012
023014
073016
023016
0'-3020
023024
023026
023030
023034
023040
023044
021046

Oll700
104415
006000
103005
004737
103406
104014
000404
004737
103001
104014

027320
000001

6UI

026316

69 ..

026316

MOy
CALBCC,RO
DATACLK,1
ROR
RO
BCC
69S
PC,GETSI
JSR
BCS
701
HLT
14
BR
70'
JSR
PC,GETSI
BCC
'70.
HLT
14

,PUT BCC IN RO
,SHIFT HARDWARE BCC
,SHIFT SOFT Bec
,BR IF CARRY CLEAR
,LOOK AT BIT WINDOW
,BR Ir OK (MARK)
,ERROR, CRC WRONG (SPACE)
,CONTINUE
,LOOK AT BIT WINDOW
,BR IF OK (SPACE)
,ERROR, CRC WRONG (MARK)

70S.
005203
022703
01)1357
005003
012700
012704
005037
112405
010502

000020

000004
030102
023072

13 ..

TNC
CMp
BNE
CLR
MOY
/IIOV
CLR
MOYB
MOY

BIT COUNTER

II)

I~U~P

nO,R3
688
R3
I4,RO
,MESDAT,R4
11$
(R4)+,R5
R5,R2

,fINISHED BCC YET?
,8R IF NO
,CLEAR BIT COUNTER
,RESET CHARACTER COUNTER
,LOAD MESSAGE POINTER
,eLR SOFT BCC
,LOAD CHAR IN R5
,LOAD CHAR IN R2

,CHECK SECOND MESSAGE IN THE 8IT WINDOW (0,125,252,377)
023050
023056
023062
023066
023070
023072
023074
023102
023106
023110
023112
023116
023120
023122
023124
023130
023132
023134
023134
0'3136

012737
010537
004537
000010
000000
000000
013737
104415
106002
103005
004737
103406
104006
000404
004737
103001
104006

023142

001357
005003
005300
001335

023144
023146
023150

120001
023070
027212

027316

027320
000001

023072

7681

1181

0
May
CALBCC,11.
DlTACU:,
RORB
R2
BCC
741
JSR
PC,GETSI
Bes
758
HLT
6
BR
'7st
PC,GETSI
JSR
Bce
'751
HLT
6

,LOAD POLYNOMIAL
,LOAD SOFT CHAR FOR BCC
,CALCULATE SOFT BCC
,SHIFT COUNT
,CHARACTER
,OLD 8ce
, I.OAD SOFT BCC FOR NEXT SHIFT
,SHIrT DATA IN TO BIT WINDOW
,SHIFT SOFT DATA
,8R IF A SPACE
, LOOK AT BIT WINDOW
,8R IF OK (MARIO
,ERROR, BIT WINDOW WAS A SPACE
,CONTINUE
,LOOK AT BIT WINDOW
,BR IF OK (SPACE)
,ERROR, BIT WINDOW WAS A MARK

INC
CMP
BNE
CLR
DEC
BNE

,BUMP BIT COUNTER
,DONE rUI.L 8 BITS lET
,BR IF NO
,CLEAR BIT COUNTER
,DEC CHARACTER COUNT
,SR IF NOT DONE YET

MOY
MOV
JSR
10

'73$ •

026316

7H.

.CRC16,XPOI.Y
R5,76S
R5,SIMBCC

7511
005203
o2~703

000010

R3
UO,R]

73.
R3

flO
131

,CHECK BCC rOR PRECEOING MESSAGE IN THE BIT WINDOW

3677
)1.79

008~

,LOAD OUT DATA SILO

012737
010537
004537
000010
000000
000000
013737
104415
106002
103005
004737
103406
104006

3623
3624
3625
3['26
3627
1629
3629
3630
3611
.'3632
1633
3634
3635
lfl36
3637
3618
1639
3640
3641
31)42
3643
3fJ44
3645
3646
3647
3648
3649
3650
3651
3652
3653
3654
3655
3656
3657
3658
3659
3660
3661
3662
3663
3664
3665
3666
3667
3668
3669
3670
3b71
3672
3673
3674
3675
3676

PAGl!;r

TEST 52
J~--

'122542
022550

1)22656
022664
u22670
022674
1)22676
022700
022702
022710
022'71 i
022716
022720
022724
022726

3~11

PAGE b~
111 4 ~
8ASIC RYCCF.I VEP TESTS

02lt52

013700

027320

MOY

CALBCC,RO

,PUT 8CC IN FlO

11"!!'J!JL-"
MA.C.: 1 ]0(1046,
12-MAY-77 14118
OZOME.Pll

DZOME

3679
36RO
3b81
3lill2
3683
361:14
3685
36"&
3687
3688
~689

3.;90
31>91
3692
3b93
3694
31>95
3696
3697
3699
3699
3700
3701
37()2
3703
3704
3705
3706
3107
3708
3709
3710
3711
3712
3713
3714
3715
3716
3717
3118
37 t 9
3720
3721
3722
3723
3724

023156
0231"2
(l231b4
023t~6

104415
(lObOOO
103005
0047:!7
103406
104014
000404
004737
103001
104014

77S I

025315

022703
(J0135?
005003.

000020

023222
023226
023232
023234
023236
023240
07.3244
023246
023252
023254
O?3260
01.32 64
02321>6
0232 7 0
023272
()23276

104415
004137
103401
104024
005203
022703
001366
104415
005003
104415
004737
,,,3401
104024
005203
022703
001366

000001
026316

7SU

026316

OATACLI(,l
ROR
RO
Bec
78$
JSR
PC,GETSl
Bes
79$
liLT
14
SR
79$
JSR
PC,GETSI
BCC
79$
HLT
14

79&1
005203

PAG~:

HlC
CMp
BNE
CLR

,SkIFT HARDWARE BCC
,SHIH SOFr BCC
,SR IF CA~RY CLEAR
,LOOI( AT !lIT WINDOW
,BR IF OK It-lA.RK)
,ERROR, CRC WRONG (SPACE)
,CONTINUE:
ILOOK AT BIT WINDOW
,SR IF OK (SPACE)
,ERROR, CRC WRONG (MARK)

iBUMP 8IT COUNTER

'20,R3
77$
R3

,FINISHED BCC YET'
,IIR If' NO
,CLEAR BIT COUNTER

2$1

lSI
000007
000010
000001
026316

4$1

000020

DATACLIt,
1
.JSR
PC,GETSI
SCS
H
HLT
24
1'1]
INC
C/Olp
.7,R]
BNE
2.
DATACLK,
10
CLI'l
IU
DATACLK,
1
.JSR
PC,GETSI
SCS
.+4
HLT
24
INC
R3
CMP
no,R3
BNE
41

,CLOCK TRANSMITTER
,LOOK AT ~I"'DOW
,IT SHOULD BE MARKING
,ERROR, BIT WAS A SPACE
,SUMP BIT COUNTER
,DONE YET
,SR IF NO
,GIVE ENOUGH TICKS TO CLEAR OyT ACTIVE
,CLEAR BIT COUNTER
,SHIFT OUT NEXT SIT
,LOOK AT BIT WINDOW
,BR IF IT IS A MARK
,ERROR, TRANSMITTER IS NOT MARKING
IINC BIT COUNT
,DONE YET?
,BR IF NO

,CHECK TO SEE THAT FIRST FOUR CHARACTER MESSAGE
,WAS RECEIVED CORRECTLY (0,125,252,377)
023300
0:n304
023310
023314
023320
023322
023324
023330

104415
012703
012702
01)4737
104414
021204
016104
112205

023332
023334
o2B36

120504
001401
1 (14010
(J0530l
001364

3734

023344

li2334()

000001
000004
030102
027156

4011

000004

4Ui

DATACLK,
MOV
H,R3
MOV
,MESDAT,R2
JSR
PC,INROY
ROMCLIt
021204
MOV
4(Rl)rR4
MOVB
.(R2)+,1'l5

,PUT ·rOUND" IN 1'14
,PUT "EXPECTED" IN R5

CMPS
BEQ
HLT
DEC
BNE

,IS RECEIVED DATA CORREC~?
ISI'l If' YES
,RECEIVE DATA ERROR
j eEC CHARACTE~ COUNT
,BR IF NOT DONE YET

R5,R4
4U
10
~:s

401

,GET LAST BIT IN RECEIVER
,R3-CHARACTER COUNT
,LOAD MESSAGE POINTER IN R2
,WAIT FOR INRDY
,NEXT WORD IS INSTRUCTION, ROMCLK PC-5l04

,CHECK TO SEE THAT IN BCC MATCH IS SET
,AND THAT THE SCC NAS RECEIVED CORRECTLY
004737

02'7156

JSR

MACyII 30(1046)
l1-.JUL-77
DZDME
12-MAY-77 14118
DZDME.PII
023350
023352
023354
023362
023370
023374
023376
n234CC

023404
023410
023414
023416
023420
023422
023422
023424
023426
023434
023442
023450
023456
023460

104414
021204
111>137
042737
004737
104414
1)21244
016104
042704
012705
120504
001401
104015

000004
177400
027156

PC:,INRDY

PAGEl

11140 PAGE 71
BASIC PECEIVER TESTS
ROMCLK
021204
MOVS
BIC
.JSR
ROMCLIt
021244
!o!OV
BIC
MOV
CMPB
BEQ
HLT

001252
001252

000004
000376
000001

4(Rl) ,TE:MP]
U 17400, TEMP3
PC,INROY

4CRt) ~R4
U'76,R4
.1,R5
R5,R4

000004
000377
001250
027320

ROMCLIt
021204
MOVB
SIC
SIS
CMP
BEQ
HLT

001251
001250
001252
001252

,NEXT WORD IS INSTRUCTION, ROI."CLK PC-5304
,GET FIRST HALF OF CRC
,PUT IN TEMP3
,CLEAR HI BYTE
,WAIT rOR INRDY
,NEXT WORD IS INSTRUCTION, ROMCL.K PC-5304
I PUT "rOUND" IN R4
;CLEAR UNWANTED BITS
,PUT "EXPECTED" IN R5
,IS IN SCC HATCH SET?

SOl
15

50tl
104414
021204
116137
042737
053737
023737
001401
104027

,WAIT FOR INROY

4(Rl),TEMP2+1
U'77, TEMP2
TEMP2, TEMP]
CALBCC,TEHP3
42.
27

,IN BCC MATCH ERROR
,NEXT WORD IS INSTRUCTION, ROMCLK PC.5304
,GET LAST HALf'
,PUT IN TEMP2
,CLEAR LO BYTE:
,16 BIT BCC NOW IN TEMP]
,IS IT CORRECT?
,BR IF OK

,CHECK TO SEE THAT SECOND FOUR CHARACTER
,WAS RECEIVED CORRECTLY (0,125,252,377)
023462
023466
OB472
023476
021500
023502
023506
023510
023512
023514
023516
023520

012703
012702
004737
104414
021204
016104
112205
120504
001401
104010
005303
001364

000004
030102
027156

42'1

usa

000004

4481

MOY
HOV
.JSR
ROMCLIt
021204
MOY
HOVB
C"'PB
BEQ
HLT
DEC
SNE

t4,Rl
tMESDAT,R2
PC,INROY
4(RO,P"4
(R2)+,R5
R5,R4

44.
10
R3
4U

MESSlGE

,R]-CHARACTER COUNT
,LOAD MESSAGE POINTER IN R2
,WAIT FOR INRDY
.
,NEXT WORD IS INSTRUCTION, ROMCLK PC.5304
,PUT ·FOUND" IN R4
,PUT "EXPECTED" IN R5
,IS RECEIVED DATA COP"~ECT7
,eR IF YES
,RECEIVE DATA ERROR
,DEC CHARACTER COUNT
,SR IF NOT DONE YET

Hi)

3774
3775
377f.
3777
3778
3779
)790
3791
3782
3783
3784
3785
3786
3787
3788
3789
379Q

ooe9

,CHECK TO SEE IF TRANSMITTER IS MARKING

023342

3772

PAGE 7O
BASIC RECEIVER TESTS

000001

0:B17'J
023174
02317&
0:1),00
023204
023206
023210
n/3210
023212
023216
023220

3725
3721>
3727
3728
3729
3730
371I
3732
3733

3735
3736
3737
3738
3739
3740
3741
3742
.3743
3744
3745
3746
3'147
3748
3749
3750
3751
3752
3753
3754
37')5
3756
3757
3758
3759
3760
37bl
3762
3763
3764
3765
3766
3767
3768
3769
3770
3771

!!!40

,CHECK TO SEE THAT IN BCC MATCH IS SET
,AN~ THAT THE BCC WAS RECEIVED CORRECTLY
023522
023526
023530
023532
023540
023546
023552
023554
023556
021562
023566
023572
023'574
023576

004737
104414
021204
116137
042737
004737
104414
021244
016104
042704
012705
120504
001401
10401'5

027156
000004
177400
027156
000004
000376
000001

001252
001252

.JSR
ROMCLK
021204
MOve
BIC
.JSR
ROMCLIt
021244
MOV
SIC
HOV
CMPB
SEQ
HLT

PC,INRDY
4(Rl).TEMP3
U77400,TEMP]
PC,INRDY
4(R1),Fl4
1376,R4
'1,R5
R5,II4
511
15

,WAIT rOR INRDY
,NEXT WORD IS INSTRUCTION, 1I0MCLK PC-U04
,GET FIRST HALF OF CRC
,PUT IN TEMP3
,CLEAR HI BYTE
,WAIT FOR INRDY
,NEXT WORD 15 INSTRUCTION, RO~CLJIi PC.!!l04
,PUT ·rOUNO· IN R4
,CLEAR UNWA~TED BITS
,PUT -EXPECTED· IN R5
,IS IN BCC MATCH SET?
,IN BCC MATCH ERROR

0090

DZOIlE:
"'ACyl! 30(1()4b)
l1-JIIL-77
OZO"t:.pll
t2-MAY-77 14118
3791
3192
3793
]H4
3795

3Hb
3797
3798
37'l9
1800
3801
3802
3803
31104
3B05
3806
3807
3808
3809
3810

02](,00
023600
11'3,,02
02l!>04
023612
023620
023626
023634
023636
n23640

lIb \37

042737
0'53737
023737
001401
104027
104400

000004
000377
001250
027320

ROMCLK
021204
MOVB

001251
001250
001252
001252

src

5$'

BIS
CMp
REQ
HLT
SCOPE

~R25

382(,
3B27

]828
3R29
3830
3B31

VIl2
3833
3(1H
3835
3R36
3837
3838
3(139
3840
3941
3842
3943
1844
3!!45
3846

;PUT Ir. TICMP2
,CLEAR LO BYTE
'16 BIT BCC NOw IN TEMP3
,IS IT CORRECT?
lSI' IF OK

27
,SCOPE THIS TEST

ace

3A13

3819
3A20
3821
3822
3823
3824

,hEXT WORn IS INSTRUCTION, ROMCLK PCc5304
LAST HALF

,G~;T

4(Rl),TEMP2+t
U77,TE>1p2
TEMP2,TEMp3
CALBCC,TEMP3

'*************************** TEST 53 ***************************
,*DDCMP EOM FUNCTION TEST
,*THIS TEST LOADS OUT SILO WITHI 2 SYNCS,4 CHAR MESSA~E,EOM
,*SOM,4 CHAR MESS,EOM. THE OATA STREAM IS CHECKED TO BE
,*4 CHAR,BCC,4 CHAR,BCC,MARKS. THIS TEST VERIFYSTHAT
,*THE CHARCTERS LOADED WITH EOM SET ARE LOST
,*ALSO THAT THE CHAR LOAD~D wITH SaM IS NOT IN THE BCC
,*ALL DATA AND BCC'S ARE CHECKED IN THE BIT WINDOw
,*THE FOUR CHARACTER MESSAGE IS 0,125,252,371
,*RECEIVED DATA IS VERIFIED, AND IN
MATCH IS CHECKED
,1**************************************************************

3A 12

3~18

,....•....•.•..
,

023642
023650

012737
012137

0:23656

104412

02~660

023664
023670
023674
1)23700
023704
(\23710
023714
021716
023720
023724
023730
(123734

012711
012704
005037
012700
004737
004737
004537
030102
OnOIJ04
004737
004737
004537
030102

023736
(113740
023744
0237'50
0237'52
023756
023760

000004
004737
004737
005003
104415
112405
010502

000053
025042

001226
001216

TST531

TEST 53

MOV
HOV

.53,TSTNO
,TST54,NEXT
,Rl CONTAINS BASE DMCll ADDRESS
,MASTER CLEAR DMC11

MSTCLR
,LOAD OUT DATA SILO
004000
036102
024004
000004
027464
026502
027620

MOV
MOV
CLR
MOV
JSR
JSR
JSR
MESDAT

027574
027544
027620

.:JSR
JSR
JSR
MESDAT

.BITU, (Rt)
,MESDAT,R4

lOS
H,RO
PC,SYNLD
PC,OUTRDY
R5,MESLD

027574
026350
000022
1281

,SET LINE UNIT LOOP
,LOAD POINTER TO DATA
,CLEAR SOFT BeC
,LOAD CHARACTER COUNT
I LOAD 2 SYNCS IN OUT 81j,,0
,WAIT FOR OUTRDY
,LOAD sILO WITH 4 CHAP MESS
,ADDRESS Of MESSAGE
CHARACTERS
,NUMBER
,LOAD GARBAGE CHARACTER, WITH EOM SET
,LOAD GARBAGE CHAR WITH SOM St;T
,LOAD fOUR MORE CHARACTERS
,ADDRESS OF MESSAGE

4
PC, EO'"'
PC, SOH
R5,M£;SLD

4
JSR
PC,EOM
JSR
PC,OCOR
CLR
Rl
DATACLIt,22
,",OVB
(R4)+,R5
MOV
R5,R2

,NUMBER Of CHACTERS
,SET EOM
,WAIT fOR OCOR
,CLEAR BIT COUNTER
,CLOCK DATA
,LOAD R5 WITH CHAR
,LOAD R2 WITH CHAR

,CHECK rIRST fOUR CHARACTER MESSAGE
,IN THE BIT WINDOW (0,125;252,377)

DZDI1E
"'ACyll 30(1046)
l1·JUL·77
OZOME.Pt I
t2-MAY.77 14118

11140 PAGE 73
BASIC RECEIVER TESTS

PAGE I

3847
3A4~

31149
3~50

38!>1
31152
3953
3854
3855
1856
3857
3858
3859
3860
3861
"H'I~,"

3863
3864
3865
3866
3867
3868
3A69
3870
3871
3872
3973
3874
3875
3876
3877
3978
3879
3880
388 t
3882
3E1A]
3A84
3885
3886
3887
31198
3999
3890
3891
3892

023762
023770
0,1'774
024000
024002
024004
024006
024014
024020
024022
024024
(124030
024032
024034
0'21035
024042
024044
024046
024046
024050
024054
024056
024060
024062

(l12737
1110537
004537
000010
000000
000000
013737
104415
106002
103005
004737
103406
104006
000404

024064
024070
024074
024076
024100
024104
024106
024110
024112
024116
024120
024122
024122
024124
024130
024132

013700
104415
006000
103005
004737
103406
104014
000404
004737
103001
104014

120001
024002
027212

027]16

027320
000001

024004

6".
lOU

6411

026316

!H'I~"'l'"

103001
104006

MOV
MOV
JSR
10

MOV
CALBCC, 10'
DATACLIC,
RORB
R2
BCC
658
JSR
PC,GETSI
BCS
661
HLT
6
BR
668
JSR
PC,GETSI
BCC
661
HLT
6

,loOAD POLyNOMIAL
,LOAD SOFT CHAR FOR BCC
,CALCULATE SOFT BCC
,SHIfT COUNT
,CHARACTER
,OLD BCC
,LOAD SOFT BCC fOR N!XT SHIfT
, SHIrt DATA IN TO BIT WINDOW
,SHIrT SOFT DATA
,8R IF A SPACE
,1I00K AT BIT WINDOW
,BR If OK (MARIO
,ERROR, BIT WINDOW WAS A SPAC~
,CONTINUE
,LOOK AT BIT WINDOW
,BR If OK (SPACE)
,ERROR, BIT WINDOW WAS A MARK

INC
CMP
BNE
CloR
DEC
BNE

,BUMP BIT COUNTER
,DONE FULL 8 BITS YET
,BR IF NO
,CLEAR BIT COUNTER
,DEC CHARACTER COUNT
,8R Ir NOT DONE YET

.CRC16. XPOl.Y
RS,n.
R5,SIMBCC

o
o

6611
005203
022703
001357
00500]
005300
001335

000010

HO,R]
641
R]

RO
121

,CHECK Bec rOil PRECEDING MESSAGE IN THE BIT WINDOW
027320
000001

6881

026316

6981

MOV
CALBCC, RO
DATACLK,l
ROR
RO
BCC
691
JSR
PC,GB:TSI
BCS
701
HLT
14
BR
70.
JSR
PC,GETSI
BCC
70_
HLT
14

,PUT BCC IN RO
,SHIrT HARDWARE BCC
,SHIrT SOFT BCC
,BR IF CARRY CLEAR
,LOOK AT BIT WINDOW
,BR IF OIC (MARK)
,ERROR, CRC WRONG (SPACE)
,CONTINUE
,LOOIC AT BIT wI~DOW
,8R IF OK (SPACE)
,ERROR, CRC WRONG (MARK)

INC
CMP
BNE
CLR

,BUMP BIT COUNTER
,P'lNISHED Bce YEn
,BR IF NO
,C~EAR BIT COUNTER

70$1
005203
.022703
001357
005003

000020

Rl
nO,R3

688
Rl

,CHECK CH"RACTEP LOADED WITH SOM (000)' IN THE BIT WINDOW

H93
38Cl4
3895
3996
)A97
)1198
3899
]900
3901
3902

0091

51S1
104414
021204

3811
3814
3815
3916
3817

PAGICI

11140
PAGE 72
BASIC PECEIVEP TESTS

024134
024tl6
024140
024144
024146
024150
024154
n24156
1'124,60

005005
010502
104415
10600'
10]005
004737
10340b
104006
Orl0404

000001
026316

3211

CLR
RS
MOV
AS,R2
DATACLK,
RORB
R2
BCC
301
JSR
PC,GtTSI
BCS
lU
HLT
6
Bl'I
311

,CHARACTER LOADED WITH SOM
,LOAD R2 WITH CHAR
,CLOCK TRANSMITTER
,SHIrT SOFT DATA
,8R IF SPACE
,LOOK AT BIT WINDOW
,8R If OK (MARK)
,ERROl'l,BIT WINDOW WAS" SPACE
,CONTINUE

0092

,
11-JUL-77
DZDME
"ACYl t 30e 1046)
i "2- MA'j-7i i 411 B
DZ"i-'E.Pi i

30$1

0241 b2
0241 bf)
024170
°'41 7 2
0241 74
0242 0 0
074202

u04737
1 n 3001
t 04006
005203
0..:2103
on 1357

39, n

024204

3911
39IL
HI3
3'lt 4

0'24210
024214
024'220
1)2 4 222

012700
012704
VOS037
t 124(15
010502

000004
030102
024246

39ii
3918
3919
3920
3921
1922
3923
3924
3925
3926
39'1
3928
3929
3930
3931
3932

1)24224
024232
02 4 236
024242
0'4244
OL 4 246
024250
02425b
0'24262
024264
0242&6
024272
1)'4274
0;>42 7 6
024)00

012737
010537
01)4537
000010
00001)0
000000
(113737
104415
106002
10)005
004737
10340b
104006
000404
004737

120001
024244
027212

027316

027320
000001

024246

3933

0'14304

i0100i

074306
024310
024310
024312
024316
0'4321'1
024122
024324

104006

3903
3904
39()S
3906
3907
390"8
3909

PAGE:

PAGE 74
11140
BASIC RECUVER TE.SIS

02b316

31S:

OOOOiO

OOSoo~

JSR
BCC
HLT
INC
CMp
BNE
CLI<
MOV

13$1

MOV
CLI<
MOVB
MOV

PC,GETSI

(R4)+,R5

,LOOK AT BIT ~l~OOw
15R IF OK (SP~C~)
~~PROR,BII ~INDOW WAS A MARK
,SUMP BIT COU~TER
,DONE CHA~ACTEI< YET?
,BR If' tlO
,RESET BIT COUNTER
:RESET CHARACTER COUNTER
,LOAD MESSAGE POINTER
,CLI< 50FT BCC
,LOAD CHAR IN R5

1<5,1<2

: LOAD CHAR. Iti R,

31$
6
1<3
'10,1<3
32&
R3
.4,1<0
,MESDAI,R4

11S

C09)

•

HiS
,CHECK SECOND MESSAGE IN THE BIT wtNDOW

3916

3914
3935
393&
3937
3938

3'H9
3940
3941
3942
3'143

76$1
11S1
738 I

026316

74$1

026316

(0,125;252,377)

MOV
'CRC16,XPOLY
MOV
RS,76S
~5,SIMBCC
JSR
10
0
0
MOV
CALBCC, 1 U
DATACLK,
RORS
1'2
BCC
74.
PC,GETSI
JSR
BCS
75.
HLT
6
BR
758
JSR
PC,GETst
BCC
75.
HLT
6

,LOAD POLYNOMIAL
,LOAD SOFT CHAR FOR BCC
,CALCULATE SOFT BCC
,SHIFT COUNT
,CHApACTER
,OLD BCC
,LOAD SOFT BCC FOR NEXT SHIFT
,SHIFT DATA IN TO BIT WINDOW
,SHIFT SOFT DATA
,BR IF A SPACE
,LOOK AT BIT WINDOW
,BR Ir OK '''ARK)
,ERROR, BIT WINDOW WAS A SPACt:
,CONTINUE
fLOOK AT BIT WINOO~
iBR Ir OK (SPACE)
,ERROR, SIT wI~DOW WAS To. MARK

INC
CMP
BNE
CLR
DEC
BNE

,BUMP BIT COUNTER
,DONE rULL 8 BITS YET
JBR If' NO
,CLEAR BIT COUNTE~
,DEC CHApACTER COUNT
,BR IF NOT DONE YET

75$1
005203
022703
00\3'57

000010

00500~

0053{)0
001335

R3
HO,R3
73$
R3
RO

l:U

,CHECK BCC rOR PRECEDING MESSAGE IN THE Brr wINOO'"

3944
)94'5
3'146
3''141
1948

024326
024332
024336
024340

013701)
1 n4415
0(,6000
103005

027320
000001

3949
3C1Su
3951
3'152
3953
3954
3'155

024342
0:?4346
0'-1350
024352
0;>4 )54
1124360
024362
024364
024364
024]6b

004737
103406
104014
000404
004737
103001
104014

026316

3956
3'157
3q5~

77$1

026316

78$1

000020

PC,GETSI
798

795

JSR
BCC
HLT

PC,GETS!
79$
14

,LOOK AT BIT WINDOW
,BR If' OK (MARK)
,ERPOR, CRC WRONG (SPACE)
,CONTINUE
,LOOK AT BIT WINDOW
,SR IF OK (SPACE)
,ERROR, CRC wRONG (MARK)

INC

1'3

:BUMP BIT CCUNT~R

CMP

.20,R3

,FINISHED BCC YET?

024372
07 4 )74

v(l1357
(!05003

024376
024402
0?4406
0'4410
024412
024414
024420
024422
0211426
024430
024414
024440
1)244 42
024444
024446
024452

10441S
004737

11140
PAGE 75
BASIC RFCUVER TESTS

PAGEl

BNE

77$

CL~

113

,BR IF '10
,CLEAR BIT COUNTER

,CHECK TO SEE IF TRANSMITTER IS MARKING
000001
026316

2$1

103401
104024
005203
022703
001366
10441 5
005003
104415
004737
103401
104024
005203
022703
00 t 366

381
000007
000010
000001
026316

4$1

000020

DATACLK,
1
JSR
PC,GETSI
BCS
38
HLT
24
INC
1'3
CMP
n,R3
BNE
2.
DATACLK,
10
CLR
R3
DATACLK,
1
JSR
PC,GETSI
BCS
,+4
HLT
24
INC
1'3
.20,R]
C"'P
BNE
48

,CLOCK TRANSMITTER
,LOOK; ~T lr1!N!:·Ol':
,IT SHOULD BE MARKING
,ERROR, BIT WAS A SPACE
,BUMP BIT COUNTER
,DONE YET
,BR U' NO
,GIVE ENOUGH TICKS TO CLEAR O~T ACT IVE
JCLEAR BIT COUNTER
,SHIFT OUT NEXT BIT
,LOOK AT BIT WINDOW
,SR IF IT IS A MARK
,ERROl', TRA~SMITTER IS NOT MARKING
,INC BIT COUNT
,DONE YET?
,BR IF NO

,CHECK TO SEE THAT FIRST FOUR CHARACTER MESSAGE
,liAS RECEIVED CORRECTLY (0,125,252,377)
024454
0244bO
024464
0'4470
024474
02 4 476
024500
024504
024506
024510
<l24512
0'4514
0"4515

1(14415
012703
012702
004737
104414
021204
016104
t 12205
120504
001401
104010
005303
01)1364

000001
000004
030102
027156

40 ••

000004

41$1

DATACLK,
MOV
U,R]
MOV
_MESDAT,R2
JSR
PC,INRDY
ROMCLK
021204
MOV
4(1'1),1'4
MOVB
(R2)+,R5
CMPB
R!\,R4
BEQ
418
HLT
10
DEC
R3
~~E

17~7

3998
3'lQ9
4000
4001
40(12
4003
40<'4
4005
4006
4007
4009
41109
4010
4011
41>12
4013
4014

"SR
BCS
HLT

,PUT BCC IN RO
,SHIFT HARDWARE BCC
,SHIrT SOFT BCC
,BR II" CAR~Y CLEAR

79$1
(1)5203
u22703

OZDME
M~CYII 30(104b)
l1-JUL-77
DZD"'E..Pl1
12- MAY-77.14119
3"159
3'160
3961
39&2
391,]
3964
3965
3966
3967
31l6e
3969
3970
3971
3972
3973
3974
3q75
3976
3977
]978
3979
3'1RO
39R 1
3982
39R3
3984
391'15
1986
)987
]988
3989
3990
3991
3992
3993
3'194
3995
3'1Q6

MOV
CALBCC,RO
DATACLK,l
ROR
RO
BCC
788

,GET LAST BIT IN RECEIVER
,RlaCHARACTER COUNT
,LOAD MESSAGE POINTER IN R2
,WAIT FOR INRDY
,NEXT WORD IS INSTRUCTION, RO~CLK PCa5304
,PUT "rOUND" IN 1'4
,PUT "EXPECTED" IN R!5
, IS RECEIVED DATA CORRECT?
,SR IF YES
,RECEIVE DATA ERROR
,DEC CHARACTER COUNT
foR If NOr DON~ I~T

,CHECK TO SEE THAT IN BCC MATCH IS SET
,AND THAT THE BCC liAS RECEIVED CORRECTLY
024520
024524
024'526
024530
024536
tl24544
024550
024552
'>74'554
024560
('1;14564
024570
024572
024574

004737
104414
021204
116137
042737
01)4737
104414
021244
016104
042704
012705
120504
001401
t 0401 '5

027156

000004
177400

ont 56
000004
000376
000001

001252
001252

"SR
ROMCLK
021204
MOVS
BIC
"SR
ROMCLK
021244
MOV
BIC
MOV
CMPB
BEQ

HLT

PC,INROY

t(Rll,TEMP3
'177400,TEMPl
PC,INRDY

4(Rt),R4
U76,R4
'1, R5

,WAIT rOR If.RDY
,NEXT WORD IS INSTRUCTION, ROMeLK PC-5304
,GET FIRST HALF or CRC
,PUT IN TF.MP3
,CLEAR HI BYTE
,WAIT ~"OR I"RDY
,NEXT WORD IS INSTRUCTION, ROMCLK PCII5l04

1l5,~4

,PUT ·rOUND" IN R4
,CLEAR UNWANTEO BITS
,PUT "EXPECTED" IN R5
,IS IN BCC MATCH SET?

50'
15

I!N !lCC MATCH ERROR

0094

DZD"''''
"lACy!! 30(1046)
ll-JUL-71
tlZD!oIE.PII
12-MAy-n 14118
4015
401 b
4017
401~

4019

4020
40?1
4(1:}2

4073

104414
021204
116137
042737
053737
023737
001401
104027

024636
024642
024644
024646
024652
024654
024656
024660

004737
104414
021204
016104
005005
120504
001401
104010

000004
000377
001250
027320

024722
1124726
024730
0,4732
0'4740
024746

004737
\04414
021204
J 16137
042737
004737

000004
177400
027156

40bl
401>2
4063

024752
024754
024756

104414
021244
016104

000004

4(164
4065
4066
4067
4011;8
4(;69
4070

074762
024766
024772
024774
024776
025000
02'5000

042704
012705
120504
0(11401
104015

40Q2

40Q6
40Q7

4098
4099
4100
4101
4102
4103
4104
4105
4106
4107
4108
.4109
4110
4111
4112
41' 3

4114
4115

4116
4117
4118

4119
4120
4121
4122

4123
4124
4125
41.26

FlOMCLK
021204
MOVIl
BIC
BIS
CMP
SEQ
HLT

001251
001250
001252
001252

""95

4(Rt),TEfoIP2+1
1377,TE"'P2
TEMP2,TE'1P3
CALBCC,TEMP3
45$
27

Ii,EXT WORD IS INSTRUCTION, ROMCLK PC"S304
IGET L.AST HALF
: PUT IN TEfoIP2
,CLEAR LO BYTE
,16 BIT BCC NOW IN TEMP3
: IS IT COFIRECT?
,BR IF OK

,CHECK THAT CHAFIACTER LOADED WITH SOM WAS RECEIVED (000)
4581

027156
000004

JSR
ROMCLK
021204
MOV
CLR
CMPB
8EQ
MLT

PC,INRDY

4(Rl"R4
R5
R5,R4

U.
10

J WAIT FOR INRDY
,NEXT WORD IS INSTRUCTION, ROMCLK PC-5304
,GET RECEIVE DATA
,PUT "FOUND· IN R4
,PUT "EXPECTED" IN RS
,IS RECEVIED DATA CORRECT?
,BR IF YES
,RECEIVE DATA ERROR

,CHECK TO SEE THAT SECOND FOUR CHARACTER MESSAGE
,WAS RECEIVED CORRECTLY (0,125,252,377)
02461>2
024666
024672
024676
024700
oH702
024706
024'710
024'712
024714
024716
024720

012703
012702
004737
104414
021204
016104
112205
120504
001401
104010
005303
001364

42 ..

000004
030102
027156

43 ..

000004

4411

MOV
MOV
JSR
ROMCLK
021204
MOV
MOVS
CMPB
BEQ
HLT
DEC
8NE

U,R3
,MESDAT,R2
PC,IHRDY

,R)-CHARACTER COUNT
,LOAD MESSAGE POINTER IN .112
,WAIT FOR INRDY
, NEXT WORD IS INSTRUCTION, ROMCLK PC_5l04

4(Rll,R4
(R2)+,R5
R5,R4
4U
10
R3

,PUT ·FOUND· IN .114
,PUT "EXPECTED· IN R5
,IS RECEIVED DATA CORRECT?
JBR IF YES
,RECEIVE DATA ERROR
,DEC CHARACTER COUNT
,SR IF NOT DONE YET

431

,CHECK TO SEE THAT IN 8CC MATCH IS SET
,AND THAT THE BCC WAS RECEIVED CORRECTLY
027156
001252
001252

000376
000001

025002
025004
025012
1)25020
0250'6
025034
025036
025040

,WAIT FOR INRDY
, NEXT WORD IS INSTRUCTION, ROMCLK PC-Sl04
,GET FIRST HALF OF CRC
,PUT IN TEMP3
,CLEAR HI BYTE
,WAIT FOR INRDY

JSR
ROMCLK
021204
MOVB
BIC
JSR

4( Rt), TEMPl
I i 77400, TEMP3
PC,INRDY

ROMCLK
021244
MOV

4(Rl),R4

,PUT ·FOUNDw IN R4

BIC
MOV
CMp!
BEQ
HLT

U76,R4
.1,.115
.115,.114
!S1$
15

,C~EAR UNWANTED 8ITS
,PUT -EXPECTEDR IN R!S
,IS IN BCC MATCH SET?

,NEXT WORD IS INSTRUCTION,

RO~CLK

PC=5304

, IN BCC MATCH ERROR

51$1
104414

ROMCLK

DZDfoIE
MACYI130(1046)
ll-JUr,,-77
DZDME.Pll
12-MAY-77 14118

4093
4094
4095

PAGEl

PAGE 76
l<ECEIVER TESTS

8~SIC

50$,

02457b
024576
024600
024602
024610
024616
024624
024632
0'4634

4024
4025
4026
4027
40211
4029
4030
4031
4032
4033
4034
4035
4036
4037
4038
4039
4040
4041
4042
4043
4044
4045
4046
4047
4048
4049
4050
4051
4052
4053
4054
4055
4056
4057
4058
4(159
4060

4071
4072
4073
4074
4075
4076
4077
4078
4079
4090
4081
40'12
4()91
4094
4085
408b
40117
4098
4089
4090
4091

11140

021204
116137
042737
053717
021737
001401
104027
104400

000004
000377
001250
027320

,NEXT WORD IS INSTRUCTION, ROMCLK PC-Sl04

11140 PAGE 77
BASIC RECEIVER TESTS

001251
001250
001252
001252

5 ..

021204
MOVB
BIC
8IS
CMp
BEQ
HLT
SCOPE

PAGE I

4(Rl)'TEMP2+1
n77,TEMP2
TEMP2, TEMP3
CALBCC, TEMP]
51
27

,GET LAST HALF
,PUT IN TEMP2
,CLEAR LO BYTE
,16 BIT BCC NOW IN TEMP3
,IS IT CORRECT?
,aR IF OK
,SCOPE THI8 TEST

** ••••••••• *•••••• *••••

, ••••••••••••••••••••••••••• TEST 54 ••••
,.EMPTY SILO TEST
,.LOAD SILO WITH 2 SYNCS, 4 CHAR MESSAGE, SINGL! CLOCK
,.UNTIL THE SILO IS EMPTY, LOAD 4 MORE CHARACTERS IN 'tHE

,.SILO i tJIV!

~OR!' T!~!t:Si

A~l~

'lER:r"! ':HAT :N:"Y :HE fIl\.;i:

,.4 CHARACTER NESSAGE WAS RECEIVED AND THAT RTS IS CLtAR

,1 ••••••••••••• ***.**.****** ••*****.*******.***•• *•• ****.**** •••
I··············
TEST 54

025042
025050

012737
012737

025056
025060
025064
025070
025074
025100
025104
025110
025112
025114
025120
025124
025130
025132
025134
025140
025144
025146
025150
025156
025160
025162
025166
025172
025174
025176
025202
025204
025206
025210
025212
n2'5214

104412
012711
012702
012700
004737
004737

O~5<16

004537
030102
000004
004737
104415
004537
030102
000004
004737
104415
104414
021264
032761
001401
104034
104415
004737
104414
021204
016104
112205
120504
001401
104010
005300
001364
()04737

000054
025274

001226
001216

TST541

004000
030102
000004
027464
026502
027620
026350
000065
027620
026350
000005
000040
000041
02'7156

000004

5 ..
lSi

000004

027156

)II

MOV
MOV

.54,TSTNO
,T8T55,NEXT

MSTCLR
MOV
'BITll,(Rl)
MOV
,MESDAT,R2
MOV
. . ,RO
JSR
PC,.SINLD
JSR
PC,OUTRDY
JSR
R5,MESLO
MESDAT
4
JSR
PC,OCOR
DATACLK,
65
JSR
R5,MESLD
MESDAT
4
JSR
PC,OCOR
DATACLK,
RONCLK
021264
BIT
'BIT5,4(Rl)
BEQ
51
HLT
H
DATACLK,
41
JSR
PC,INRDY
ROMCLK
021204
MOV
4(Rl)'R4
MOVB
(R2)+,R5
CMP!
R5,R4
BEQ
2.
HLT
10
DtC
RO
BNE
18
JSR
PC,INIIlOY

,Rl C'ONTAINS BASE DMCll ADDRESS
,MASTER CLEAR DHCll
,SET LINE UNIT LOOP
,.112 POINTS TO MESSAGE
,RO a CHAR COUNT
, LOAD SILO WITH TWO SYNCS
,WAIT FOR OUTROY
,LOAD MESSAGE IN SILO
, START OF MESSAGE
,CHARACTER COUNT
, WAIT FOR OCOR
,CwOCK DATA (EMPTY SILO)
,PUT MORE CHARACTERS IN SILO

,CLOCK UNTIL RTS IS CLEARED
,NEXT WORO IS INSTRUCTION, ROMCLK PCa5l04
,GET RTS
, IS IT CLEAR.,
,BR If' YES
,ERROR, RTS NOT CLEAR
,CLOCK XMITTER SOME MORt
,OK LETS CHECK WHAT WAS RECEIVED
,NEXT WORD IS INSTRUCTION, ROMCLK PCa530t
,GET RECEIVE DATA
,PUT IT IN Fl4
,R5 a "EXPECTEO"
,IS DATA COFIRECT1
,SR IF OK
,DATA ERROR
,DEC CHAR COUNT
,SR IF NOT DONE YET
, WAIT rOR INRDY

00\16

i i -JUL-77
Io''''CYll )(I( 1046)
12- MAY-77 14118
oZOn:,PII

OZOM~

4127
4128
4129
4\)CI
4131
4132
4133
4114
4115
4136
4137
41311
4139
4140
4141
4142
4143
4144
4145
4146
4147
4148
4149
4150
4151
4 I 52
4153
4154
4155
4156
4157
4158
4159
4160
4161
4162
41 b3
4164
4165
4166
4167
4168
4169
4170
4111
4172
4113
4174
4175
4176
4177

4178

0'5222
025224

0252213
025232
025236
025240
07.52~2

025244
015250
025252
025254
025260
025264
025266
025270
0'25272
025272

104414
021204
0\6104

012105

11: 40

ROMCLK
021204
MOV

000004
0110377

MOV

027156

CMPS
SEQ
HLT
JSR
ROMCLI(
021204
MOV

120504
001401
104010
004737
In4414
021'204
016104

000004

OJ 27 05

000171

4Si

120504
001401
104010

4204
4205

4206
4207
4208
4209
4210
4211
4212
4213
4214
421 !!
4216
4217
4218
4219

48
10
PC; !N!!DY
4(R1),R4

Il,.."R!

CMP8

R5,R4
lOt
10

BEQ

0097

I N(:;XT wORD IS INSTRUCTIUN, ROMCIoK PCz5304
,G~T RECEIVE DATA
,PUT 1T IN "rOUND"
I R5 ,. "EXPECTED"
,SHOULD SE~ J77
I i:!R IF 011
I ERROR, TRANSMITTER DID NOT AIIORT
,WAn fOP INfI!)!
,NEXT WORD IS INSTRUCTION, ROItCL.K PC.U04
IGET RECEIVE DATA
,PUT IT IN "FOUND"
IRS" "gXPECTEO"
,SHOULD SEE 377
,SR IF OK
,!:RROR, TRANSMITTER DID NOT ASORT

1081
,SCOPE THIS TEST

SCOPE

104400

,************************.** TEST 55 **.* ••• *****.*******.******
,*HALF DUPLEX TEST
,.SET LINE UNIT LOOP AND HALF DUPLEX, SEND SYNCS AND A
,*MESSAGE. VERIFY THAT IN-ACTIVE AND IN-READY ARE CLEAR
,1*·****·**************************·*·*****·**···****·*.***.*.**
TEST 55
,..............
0'5274
025]02

012737
012737

025310
025312
025]16
1)25322
025330
025332
025334
02'5]40
02!'»44
02';150
0'5352
025354
025360
0:15364
025]66
025370

104412
012702
012711
012761
104414
122113
004737
004737
004537
030102
000004
004737
104415
104414
021244
016104

02'5374
025400
025402
025404
025406
025410

042704
005005
120504
001401
104035
104400

000055
025412
000012
004000
000020

001226
001216

TST551

MOV
MOV

ts5,TSTNO
nST56,NEXT

MSTCLR
MOV
112,R2
UITll,(R1)
MOV
1t0V
UIT4,4(Rll
ROIolCLK
122113
PC,/SYNLD
JSR
PC,OUTRDY
JSR
R5,MESLO
JSR
MESOAT
4
PC,OCOR
JSR
DATACLK,
73
ROMCLK

000004

027464
026502
027620
026350
000073

021244

'Rl CONTAINS BASE OMC!l ADDRESS
,MASTER CLEAR DMC 11
,SAVE R2 FOR TYPEOUT
,SET LINE UNIT LOOP
,LOAD i10RT4
,NEXT WORD IS INSTRUCTION, ROMCLK PCD5304
,SET HID SIT
ILOAD 2 SYNCS
,WAIT FOR OUTROY
,LOAD 4 CHAR MESSAG!:
,ADDRESS OF MESSAGE
, CHARACTER COUNT

plAIT FOR OeOR
,SEND MESSAGE
,NEXT WORD IS INSTRUCTION, RO~CLK PC-5304
,READ LU-12
,PUT "FOUND" IN ~4

000004

MOV

4(Rl),R4

000257

&IC
CLR
CIolPB
QEQ
HLT
SCOPE

1257,R4
R5
R5,R4

J R5 - "EXPECTED"

,ERROR BOTH ARE NOT CLEAR

lat

,CLEAR UNWANTED SITS
,IN-ACTIVE AND IN-ROY SHOULD BE CL!:AR

;BR IF OK

, •• * ••• *.******.*** •• *.****. TEST 56 .*** •• ********* ••• * ••••••••
,.DDCMP CABLE DATA TEST

OZDME
MACYIt 30(1046)
U-JUL-n
DZDME,PII
12-MAY-71 14118

4203

4CRll.R4
H77,R5
R5,R4

Mev

liLT

4179
41 BO
4ltii
4182

4183
4184
4185
4186
4187
41 !l8
4189
4190
4191
4192
4193
4194
4195
4196
4197
4198
4199
4200
4201
4202

PAGt:1

PAGE; 7R

S"'SIC RECEIVER TESTS

11140 PAGE 79 '
BASIC RECEIVER TESTS

PAGEl

,.THIS TEST LOADS OUT SILO WITH THE FOLLOWINGI
,.4 SYNCS,16 CHAR,EOM,16 CHAR,EOM,16 CHAR,EOM
I*THE 16 CHARACTERS INCLUDE A FLOATING ONE AND ZERO
,*THE DATA IS TRANSMITTED OVER THE CASLE USING THE INTERNAL CLOCK
'*RECEIVED DATA IS VERIFIED AS 15 IN Bce MATCH
J *LOOP-SACK CONNECTOR MUST SE ON TO RUN THIS TEST
, I *.** •• **** •• *.**.********.**.**.*********.***.*.**.**.*_ •• *.**
TEST 56
,..............
025412
025420

012737
012737

025426
025430
025436
025440
025444
025450
1)25454
025462
025466
025472
025476
025502
025506
025510
025512
025514
025522
025524
025526
025532
025534
025536
025542
025546

104412
032737
001557
012711
004737
0047 37
012737
005037
012703
012702
112237
004537
000010
000000
000000
013737
005303
001364
004537
030106
000020
004737
004537
030106
000020
004737
004537
010106
000020
004737
004737
005011
012700
012703
012702
004737
104414
021204
016104
11n05
120504
001401
104025

~221)

{:2~~50

4.221
4222
422)
4224
4225
4226
4227
4228
4229
4230
42]1
4232
423)
4234
4235
4236
4237
4238

025552
025556
02!1562
025564
025566
025572
025576
025600
025604
025610
025614
025620
025622
025624
025630
025632
025&34
025636

000056
026000

001226
001216

040000

001366

TST561

004000

027464
027464
120001
025512
000020
030106
025510

027316

'I"

027212

511
651
02'1120

025512

027574
027620
027574
027620

U6,TSTNO
ITST57, NEXT
.sITU,STATt

U
tB:tTll, (R1)
PC,SYNLD
PC,SYNLD
'CRC 16, XPOLY

U
U6.,R3
#rt.TDAT,!'l2
(R2)+,5.
R5,SIMSCC

CALBCC,6S
R3

71
R5,MltSLD
PC,EOM
R5,MESLD
PC,EOM
R5,MESLD

16.

02'1574
026350

000004

MSTCLR
SIT
BEQ
MOV
JSR
JSR
MOV
CLR
MOV
MOV
Move
JSR
10
0
MOV
DEC
SNE
JSR
rLTDA'f
16.
JSR
JSR
FLTDAT
16=
JSR
JSR
FLTDAT

027620

000003
000020
030106
027156

MOV
MOV

Ita

JSR
JSR
CLR
MOV
MOV
MOV
JSR
ROMCLl
021204
MOV
MOVB
CMPS
SEQ
HLT

PC,EOM
PC,OCOR
(Rl)

U,ltO
116.,Rl
U'LTDAT,R2
PC,INRDY
4(R1),R4
(R2).,1I5
R5,R4
2t
25

,Rl CONTAINS BASE DMCll ADDRESS
,MASTER CLEAR DMC11
,SKIP TEST IF NO
,LOOPBACK CONNECTOR ON
,SET LINE UNlT LOOP
,LOAD 2 SYNCS
,LOAD 2 MORE SYNCS
,LOAD POLYNOMIAL FOR SOrt CRC CALC
,CLEAR OLD BCC
,CHARACTER COUNT
,R2. POINTER
,LOAD CHAR FOR SOFT SCC CALC.
,CALC SOFT BCC
,SHIFT COUNT
,CHARACTER
,OLD BCC
,LOAD OLD BCC
,DEC COUNT
,SR Ir NOT DONE YET
,LOAD SILO
,MESSAGE ADOR!8S
,CHARACTER COUNT
,LOAD AN EOM
,LOAD SILO
,MESSAGE ADDRESS
,CHARACTER COUNT
;LOAD AN EOM
,LOAD SILO
rMESSAGE ADDRESS
,CHJRACTElI COUNT
,LOAD AN EOM
,NAIT rOR oeOR
,CLEAR LINE UNIT LOOP
,RO • MESSAGE COUNT
,lI]. CHARACTER COUNT
,LOAD MESSAGE POINTER IN R2
,WAIT FOR INRDY
INEXT WORD IS INSTRUCTION, 1I0~CLK PC.5304
,GET DATA FROM IN SILO
,PUT CHARACTER IN "rOUND"
,PUT "EXPECTED· IN R5
,IS RECEIVED DATA CORRECT
,SR Ir OK
,DATA ERROR

0098

f.lACy II 30ClO4t»
11·JUL-"
DZO"'E
12-MAY-77 14118
DZDME,.Pll
4239
4240
4;>41
4242
4243
4}44
4;>45
4246
42H
4248
4249
4250
4251
4252
4253
4254
425'5
4256
4257
4258
4259
4260
4261
4262
4263
4264
4265
4266
4267
4268
4269
4270
4271
4?72
4~73

02'>640
0'5;;40
1125642
lJ25644

11140 PAGE. 110
!3I1.SIC PECEIVEP TESTS
DEC
6NE
MOV

000020

0256$(1
025654
025656
025660
0256b6
O'S(li74
H?!i700
025702
02570\
fl25710
025714
02572(\
025722
025724
025726
025726
!I257]O
025732
025740
025746
025754
0'5762
025764
025766
(}25772
0'5774
025776

004737
104414
021204
116137
042737
004737
104414
021244
016104
042704
012705
120504
001401
104015

,JSP
IIOMCLK
021204
MOVB
BIC
,JSR
ROMCLK
021244
MOV
BIC
MOV
CMPB
BEQ
HLT

027156

000004
177400
027156

001252
001252

000004
000376
000001

000004
000377
001250
0273:20

001251
001250
001252
001252
4..

030106

3S1

4343
4344
4345
4346
4347
4348
4349
4350

PC,INRDY
4CPll ,TEMP1
U77400,TEMP3
pC,INPDY
4(R1),R4
1376,R4
'I,R5
R5,P4
258
15

,WAIT FOR INPDY
,NEXT wORD IS INSTRUCTION, ROMCLK PC-5304
,GET FIRST HALf OF CRC
,PUT IN TEMP]
,CLEAR HI BYTE
,wAIT fOR H~RDY
,NEXT WORD IS INSTPUCTION, ROMCIoK pC-S304
,PUT "FOUND" IN R4
,CLEAR UNwA~TED BITS
,PUT "EXpECTEO" IN 1'15
,IS IN BCC MATCH SET?

POMCLK
021204
MOVB
BIC
BIS
CMp
BEQ
HLT
MOV
DEC
BNE
SCOPE

,IN BCC MATCH ERROR

40H ), TEMP2+ 1
t377,TEMp2
TEMp2,TEIoIP3
CALBCC,TEMP3

U
27
.FLTDAT,R2
RO

,NEXT WORD IS INSTRUCTION, ROMCLK PC"S304
,GET LAST HALF
,PUT IN TEMP2
,CLEAR 1.00 BYTE
,16 BIT BCC NOW IN TEMP3
,IS IT CORRECT?
,BR IF OK
,RESET MESSAGE POINTER
,DECREMENT COUNTER
,BR IF NOT DONE
,SCOPE THIS TEST

'*************************** TEST 57 ***************************
,*DDCMP CABLE DATA TEST
,*THIS TEST LOADS OUT SILO WITH THE FOLLOWING.
,*4 SYNCS,59 DATA CHARACTERS,EOM WITH GARBAGE CHARACT~R
'*THE.DATA IS TRANSMITTED OVER THE CABLE USING THE IN~ERNAL CLOCK
,*RECEIVED DATA IS VERIFIED AS IS IN BCC MATCK
,*LOOP·BACK CONNECTOR MUST BE ON TO RUN THIS TEST
, • **************************************************************

,,.•....•.....•.
TEST 57

026000
026006

012737
012737

026014
026016
026024
"'6026
1126032

104412
032737
001'533
01271 \
(1)4737

000057
003364

001226
001216

040000

001]66

026036
02b042
026050
026054
026060
026064
02b070
026074
026076
026100
026102
0'1> 110
026112
026114
026120
026tU
026124
026130
02b134
026136
026142
02b146
021>152
02 6 154
026156
026162
02 6 164
026166
02 6 170
026172
026172
026174

004737
012137
005037
012703
012702
112237
004537
000010
000000
000000
013737
005303
001364
004537
030102
oOOOH
004737
004737
005011
012700
012702
004737
104414
021204
016104
112205
120504
001401
104025

T5T57.

027464
120001
026100
000073

'57,TSTNO'
I.EOP,NEXT
IBIT14,STATI

U
,SITU, CRt)
PC,SYNLD

,Rl CONTAINS BASE DMCll ADDRESS
,MASTER CLEAR DMCll
,SKIP TEST IF NO
,LOOPBACK CONNECTOR ON
,SET LINE UNIT LOOP
, LOAD 2 SYNCS

11 140 PAGE 81
BASIC RECEIVEP TESTS

027316

030102

78.

026076
027212

5 ..
681
027)20

MOV
MOV
MSTCLP
BIT
BEQ
MOV
JSR

004000
027464

MACYll 30(1046)
DZD"'E
11·,JUL·77
DZDIoIE.Pll
12-MAY·71 14118

4311
43\2
4313
4314
4315
4316
4317
4318
4319
4320
4321
4322
4323
4324
4325
4326
4327
4329
4329
4330
4331
4332
4333
4334
4335
4336
4337
4338
4339
4340
4341
4342

,DEC CHARACTER COUNT
I BR IF NOT DONE Ttl1S MESSAGE
I kt:SET CHAIlACTlR COUNT

25 ••
104414
021204
116137
042737
(153737
023737
001401
104027
012702
005300
001307
104400

4n2

4HlI

113
1$
116.,R1

,CHECK TO SEE THAT IN BCC MATCH IS SET
,AND THAT THE BCC WAS RECEIVED CORIIECTLY

4283
4?84

4295
4296
4297
4298
4H9
4300
4301
4302
4303
43()4
4305
430b
4307
4308
43fl9

0099

2$1
1)05303
001364
012703

4274
4'-75
4276
4277
4278
4279
4280
4291

4285
4786
421!1
42811
4289
4290
4291
4292
4293
4294

PAG~I

026100

027620
027574
026350
000073
030102

027156

lSI

JSR
MOV
CLR
MOV
MOV
MOVB
JSP
10
0
0
MOV
DEC
BNE
JSR
MESDAT
59.
JSR
JSR
CLR
MOV
MOV
JSR
POMCLK

PAGEl
PC,SYNLD
.CRC16,XPOLY
U
U9.,P3
,MESDAT,P2
(R2)+,5S
R5,SIMBCC

CALBCC,68

ill
7S
R5,MESLD
PC,EOM
pc,oeOR
(1'11)
U9.,RO
,MESDAT,P2
PC,INRDY

021204
000004

MOV
MOVS
CMpS
BEQ
HLT

t(Rl)'R4
CR2)+,P5
RS,Rt

DEC
SNE

21
25

,LOAD 2 MURE SYNCS
,LOAD POLYNOMIAL FOR SOrT CRC CALC
,CLEAR OLD BCC
,CHAlIACTEP COUNT
, R2- POINTER
,LOAD CHAR FOP SOFT BCC CALC.
,CALC SOFT BCC
, SHIrt COUNT
,CHARACTER
,OLD BCC
, LOAD OLD BCC
,DEC COUNT
,BR IF NOT DONE YET
,LOAD SILO
,MESSAG,E ADDPESS
,CHAEIACTER COUNT
,LOAD AN EO'"
,WAIT FOP DC OR
,CLEAR LINE UNIT LOOP
,RO- CHARACTER COUNT
,1.011.0 MESSAGE POINTER IN. R2
, WAIT rop INRDY
,NEXT WORD IS INSTRUCTION, PO~CLK PC"5304
,GET DATA rpOM IN SILO
,PUT CHAPACTER IN "rOUND"
,PUT "EXPECTED" IN R5
,IS RECEIVED DATA COPRECT
,BP Ir OK
,DATA ERROR

2. I
005300
001364

,DECREMENT COUNTER
,BR Ir NOT DONE

,CHECK TO SEE THAT IN BCC MATCH IS SET
, AND THAT THE BCC WAS RECEIVED COPPECTLY
026176
026202
02 6 204
026206
026214
026222

026226
026230
0262]2
026236
026242
026246
026250
026252
026254
026254
021>256
026260
026266
026274

004737
104414
021204
116137
042737
004737
104414
021244
016104
042704
012705
120504
001401
104015

027156
000004
177400
027156

001252
001252

MOV
BIC
MOV
CMPB
BEQ
HLT

4(Rl),TE:MP3
U 77400, TEMP!
PC,INRDY

, WAIT rOR ,INRDY
,NEXT WORD IS INSTRUCTION, ROMCLK PC_53 04
,GET FIRST HALF OF CPC
,PUT IN TEMp3
,CLEAR HI BYTE
,WAIT rOR INRDY
,NEXT WOPD IS INSTRUCTION, ROMCLK PC-530t

t(R1),R4
U76,P4
'1,R5
R5,R4
251
15

,PUT "fOUND" IN R4
,C1.EAR UNWANTED BITS
,PUT "EXPECTED" IN R5
,IS IN BCC MATCH SETl
, IN Bce MATCH ERROR

25'1

021 '204
053137

PC,INRDY

021244
000004
000376
000001

104414
11 Ii 137
042737

J8R
ROMCLK
02120t
MOVB
BIC
JSR
ROMCLK

000004
000377
001250

001251
001250
001252

POMCLK
021204
MOVB

BIC
BIS

4 (Pt), TEMP2+ 1
1377,TEMP2
TEMp2,TEMp3

,NEXT WORD IS IN8TPUCTION, POMC1.K PC-Sl04
,GET LAST HALf
,PUT IN TEMp2
,CLEAR 1.0 BYTE
,16 BIT BCC NOW IN TEMP3

0100

MACyll 30Cl 046)
DZD'IF.
l1-JUr..-77
t 2-"1A~-77 14.18
DZDME.Pll
4351
021>302
43'52 02& 3 1 0
4353 026312
4354 026314
4355
4356
4357
4358
4359
4360 026)16
4361
4302
43id
4364
026316
4365 02&320
4366 026322
4367 OUI 330
4368 026]34
4369 0210 340
4370 026]44
4371 026346
4312
4373
4374 026350
4375
4376
4377 026350
4319 (26)52
4379 1)26154
43AO 026)62
438i
02103104
4392
4383
4H4 026366
4385
4386
4387
4388
4389 026]66
4390 026372
4391
026376
4392 07640 ..
4J93 026406
4394 026410
4395 02"414
4196
020422
4397
4399
4399
4400
4401
4402
4401
4404
4405

026424
1)26426
026434
02&436
026440
026444
026446
026452
026456

440b

026460

023737
00140l
l04027
104400

027320

001252

l$!

00]00
00400
00500
00600
00700
00800
00900
01000
01100
104414
021364
017737
106137
106137
106137
000207
000000

104414
021364
032777
001772
Or)0207

0\3637
062746
012761
J 04 4 i
122114
004737
012761
, 1)4414

122111
012761
104414
122110
005337
001361
004737
005061
104414
122111

153064
026346
026346
026346

026346

012761
104414
122110
004737
000207

005037
104414
021224
032777
001004
005237
001367
104036
000207

000004

04500
04600

000004

JSR IF NQ
10K OCOR IS SET, GO BACK

,GET COUNT
,ADJUST STACK

:LOAO paRT~
WORD IS INSTRUCTION, RO!"CLK PCaS304
SYNC REGISTER
FOR OUTRDY
PORN
WORD IS INSTRUCTION, RO~C1..K PC=S 3 04

09000
09100

PORN
WORD IS INSTRUCTION, ROMCLK PCaS304
OUT DATA
FOR OCOR

SPINS Qn our iiLilili'

TEMPS

,CUAR TIMER

.BlT4"DMP04

,18 OUT ROY Sn?
,BR IP' YES
, INC TIME/!
,KEEP CHECKING IF NOT DONE
,ERROR, OUT REAOY hOT sn

,NEXT WORD IS INSTRUCTION, ROftlCLK PCaS304
,PORT4~U11

2.
TEMPS

11
36
PC

CHARI
,THIS SUBROUTINE LOADS THE SILO WITH :3 SYNCS
JAND THE CHARACTER PASSED TO IT,

18.

MOV
ADD
MOV
MOV
ROMCLIt
122114
J8R
MOV
ROMCLII:
122111
MOV
ROMCLIt

122110

000004

026646

2 ••

ROMCLK
021224
BIT
BHE
INC
BNE
HLT
RTS

Di:e
SNE
JSR
MOV
ROMCLK
122110
JSR
RTS

09900
10000
10100
10290
10300
10400
10500
10600
10700
10800
10900
11000

,LOAD
,NEXT
,1..0AD
,WAIT

1$1

09300
09500
09600
09700

nOl,4(R1)

OUTRDYI

G~4fiG

000004

026350

PAGEl

SUB~CU::tNE

000004

001250
000002
026502
001250

122111

i'!'HIS

000026

026502
001250

CLR

000004

001361
004737
013761
104414
122110
004737
000207

()1l637
062746
004737
013761

!H!Mct.K

TEMPt
PC,OUTRDY
4(RO

0(';300

08600
08700
08800

026620
026622
026626
026634
026636
026640
026644

, NEXT WORD IS INSTRUCTION, ROMCLK PCaS304
,PORT4.LU 17
, IS OCOR SET?

fsn SOM
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, RO~C!:K PCe!304
,LOAD OUT DATA
,ALL DONE?
,SR If' NOT
,WAIT f'OR OUTRDY
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, ROMCLK PCa5304
1SET SOM

U6,4CR1)

06400
06500
06600

026502
000001

O~124;

,PUT 51 IN THE CARRY BIT

,NEXT
,LOAD
,WAIT
, ... OAD
,NEXT

PC,OUTRDY
11,4(R1)

PC,OCOR
PC

001246
000004

152672

001256

0053]7

([I(SP)+,TEMPI
12, -CSP)
'26.,4(Rt)

MOV
ROMCLK
122110
JSR
RTS

05700
05800
05900
06000
06100
06200

026534

026646
026652
026656
026662

DEC
BNE
JSR
CLR

05500

06800
06900
07000
07100
07200
07300
07400
07500
07600
07700
·07800
07900
08000
08100
08200
08300
08400

"26F.! ~

,NEXT WORD IS INSTRUCTION, ROMCr..K PCaS304
,PORN.LU 17
lSTORE LU 17

11140 PAGE 83
SUBROUTINES

001256

001250
000002
000003
000026

UIT4, (oIDMP04
QCOR
PC

122110

04900
05000
05100
05200

026350

013617
062746
012737
012761
104414
122114
004737
012761
104414
122111
012761
104414
12211 0

MOV
ADO
MOV
ROMCLK
122114
JSR
MOV
ROMCLK
122111
MOV
ROMCLK

05400

026'534
026540
026544
026552
026560
026'562
026564
026570
0260;76
026600
026602
026610
026612

IJDMP04,NITCH
NITCH
NITCH
HITCH
PC

,THIS SUBROUNTINE LOADS THE SILO WITH THE NUMBER OF nNe
,CHARACTERS PASSED 10 IT IN THE WORD AFTER THE JSR CALL
,AND A NON-SYNC CHARACTER (301)

04800

4131
4432
4433
4434
4435
4436
4437
4438
44]9
4440
4441
4442
4443
4444
4445
444(!
4447
4448
4449
4450
4451
4452
44'53
4454
4455
4456
4457
4458
4459
4460
4461
4462

TillS TEST

,THIS SUBROUTINE SPINS ON OCOR

000026

000020

ROMCLK
021364
MOv
ROLS
ROLS
ROLS
RTS
0

ROMCLK
021364
BIT
BEQ
RTS

000004

000301

j SCOPE

OCOR.

18.

026502
026502
026506
026506
026510
U26512
026520
026522
026526
026530
026532

HITCH.

04100
04200
04300

026502
000004

,IS IT COPRECT?
lAP If' OK

,THIS SUBROUTINE READS r..U 17, AND PUTS IT INTO NITCH.
jNITCH IS ROTATED ~EFT UNTILL THE 81 aIT IS IN CARRY

026502
000001

001246

CALBCC, Tt:MP3
3$
27

GETSI.

000004

001246
000002
000026

CMp
SEQ
HLT
SCOPE

0101

,SUBROUTINES

SYNC.

153030

MACV11 30(1046)
11-JUL-7'7
DZD~E.Pt 1
12-MA't-77 14.18
026462
(126470
02&472
026474
026500

01300
01400
01500
01600
01700
01800
01900
02000
02100
02200
02300
02400

PAGE,

t ==-.c:oaa_Vo._

02600
02700
02800
02900
03000
03100
03200
03300
03400
03500
03600
03700
03800
03900

000020

DZDME

4407
44I)R
4409
4410
4411
4412
4413
4414
4415
,4416
4417
4418
4419
4420
4421
4422
4423
4424
4425
4426
4427
4428
4429
4430

11.40 PAGg 82
BASIC kECEIVEP TESTS

tcSP).,TEMP2
U,-CSP)
U,'l'EMPI
U6,4(R1)
PC,OUTRDY
U,4(Rl)
126,4(R1)
'UMPl

11
PC,OUTRDY
'UMP2, 4 t R1)
PC,OCOR
PC

,GET CHARACTER
,ADJUST STACK
,SET FOR 3 SYNCS
,LOAD PORT4
,NEXT WORD IS INSTRUCTION,
, LOAD SYNC REGISTER
, WAIT FOR OUTRDY
,LOAD PORT4
,NEXT WORD IS INSTRUCTION,
,SET SOM
,LOAD PORT4
,NEXT WORD IS INSTRUCTION,
,LOAD OUT DATA
,A1..L DONE?
,BR If' NOT
,WAIT P'OR OUTRDY
,LOAD PORN
,NEXT WORD IS INSTRUCTION,
,LOAD OUT DATA
,WAIT FOR OCOR

ROMCLIt PC_S304

ROMCLII: PCaSl04
ROICCLIt PCa5304

ROICCLK Pca5304

CHARSD.
,THIS SUBROUTINE LOADS THE SILO WITH THE CHARACTER PASSED TO IT.
MOV
ADD
JSR
MOV

teSP).,TEMP2
'2,-(SP)
PC,OUTRDY
'l'EMP2, 4C R 1)

,GET CHARACTER
,ADJUST STACK
,WAIT FOR OUTRDY
,LOAD PORT4

0102

DZO ... g
MACYll lo( 1,)46)
11-JUL-n
DZDME..PII
12-MAY-n 14118
4463
4464
4465
4466
441>7
441>8
4469
4470
4471
4472
4473
4474
4475
447&
4477
4478
4479
4480
4481
4482
4483
4484
4495

0261'070
026672
026614
1)21>700
026702
U21:.704
026710

104414
122110
004737
1 (14414
122110
ou4737
000207

001250
001246
000004

1150U
11600
11700
11800
11900
12000
12100
12200
12300
12400
12500
12600
12700
12800
12900
13000

026502
000001

000004

13200
13300
13400

000026

000004

13600
U700

000004

13900
14000
14100
14200
14300

027052

14500
14600
14700
14800

026350

4487
4499
4489
4490
4491
4492
4493
4494
4495
4496
4497
4498
4499
4500
4501
4502
45u3
4504
4505
4506
451)7
450B

012737
005737
100470
001032
062737
012737
012761
104414
12::1114
(104737
012761
104414
122111
012761
1(14414
122110
01)5]37
001361
004737
013761
104414
122110
005737
001407
013737
004537
000000
000010
005237
022737
01)1403
005337
001346

4,)09
4510
451 t
4512
4513
4514
4'115
4516
4517
451 R

027100
027104
027\ (16
027112
027120
027124
027132
027140
027142
02 7 144

004737
000207
00'5037
012737
005037
062737
012761
104414
122111
104414

000073
027152

000002
000003
000026

001250

001246
026502
027152

027154
027152
027702

027152
000400

027152

001250

026350
027152
177777
030100
000002
000001

027154
001250
000004

0271 4&
1l271S0
027t52
027\54

027156

~c ~4

O?1'fo4

027164
027166
o?7170
027176
027200
027204
027206
027210

122110
000721
000000
000000

012737
104414
021244
032'777
001004
005237
001367
104037
000207

000000

000020

WORD IS I~STRUCTION, ROMCLI( PC"5104
OUT OATA
fOR OUTRDY
WURD IS INSTRUCTION, ROMCLK PC"5304
GARBAG~ CHAR
fOR OCDR

1S1

2$1

5S1
611

3 ..
4U

MOV
!ST
BMI
BNE
ADO
MOV
MOV
ROMCLK
122114
JSR
MOV
ROMCLK
122111
MOV
ROMCLK
122110
DEC
BNE
JSR
MOV
ROMCLIC
122110
TST
BEQ
MOV
JSR
0
10
INC
CMp
BEQ
DEC
BNE
JSR
RTS
CLR
MOV
CLR
ADO
MOV
POMCLIC
122111
ROMCLIC

.73,TEMp2
SCHAR

U
2$
t2,TEMP2
I3,TEMPl
126,4(R1)

PC,OUTPDY
11,4(R1)

126,4(R1)

TEMP1

11
PC,OUTRDY
SCHAR,4(Rl)

STUFLG

be
SCHAR,51
R5,STFFCL

SCHAR
HOO,SCHAR

,LOAD COUNT
,fIPST TIME HERE?
,BR IF B lTSTUFF
J8R I f NO
,ADD 2 TO CHARACTER COUNT
,SET FOR 3 SYNCS
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, ROMC1.K
,LOAD SYNC REGISTER
,WAIT FOR OUTRDY
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, POMCLK
,SET 80M
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, ROMCLK
,1.0AD OUT DATA
,ALL DONE?
,BR IF NOT
,WAIT FOR OUT ROY
,LOAD PORT4
,NEXT WORD IS INSTRUCTION, ROJIIC1.K
,LOAD OUT DATA
,BITSTUFF71?
,BR IF NO
,IT IS SOLO SO CHECK BITSTUfFlNti
,ADD ANY BIT STUFF CLOCK TICKS
rCHARACTER
,CHlfT COUNT
,NEXT CHARACTER
,ALL DONE?

001246

152214

001246

027212

16700
16800
16900
17000
"17100
17200
17300
17400
17500
17600
17700
17800
17900
19000
18100
18200
18400
18500
18600
18700
18BOO
18900
19000
19100
19200

,DECREMENT COUNT
,BR IF NOT DONE

PC,OCOR
PC
SCHAR
.-l,STUrLG
BITCON
.2,TEMP2
11,4(R1)

,WAIT FOR OCOR

001246
001250
027320
027320
027320
001250

027316
027320
027316
027320
1)01246
027320

027320

PC"5304

PC-5304

PAGEt

122110
BR
SCHARI
0
STUrLGI 0

,LOAD GARBAGE CHAR
,GO 1.0AD SILO

INRDYI
,THIS SUBROUTINE SPINS ON INRDY
,IF INRDY FAILS TO SET THE DELAY TIMES OUT AND AN
,ERROR IS REPORTED, FOR BETTER SCOPE LOOPS THIS
,DELAY CAN BE MADE SHORTER BY ALTERING THF. NUMBER
I INITIALLY LOADED INTO TEMPI, THE SMAL1.ER THE NUMBER
,THE SHORTER THE DELAY. 0 IS THE LONGEST DELAY.
MOV

'O,TEMPI

,SET UP DEI.AY COUNTER

III
ROl'iel..k
021244
BIT
BNE
INC
BNE
2 ..

; ·ZEX'!'
IBIT4, 'DMP04
2.
TEMP1

HLT

RTS

w~P,!:,

!1/~,!,lIUt''1'lOIi •

FlOMCLK PC-5l04

, PORT4..LU12
,IS INFIDY SET?
,SR IF YES
,INC DELAY
,TRY AGAIN
,ERROR,NO INRDY
,RETUPN

SIM8CCI

010046
012537
012537
012537
013700
000241
006037
006037
005500
006000
103011
013700
043700
043737
050037
005337
001352
013700
006000
012600
000205
000000
000000
000200
1201)(11

I'C-5304

,START PATTERN AT ZERO
,SET BITSTUfF FLAG
,C1.EAR STUFF COUNT
,ADD 2 TO CHARACTER COUNT
,SET BITO IN PORT4
,NEXT 1I0RD IS INSTRUCTION, ROMC1.K PC-5304
,SET SOMI
,NEXT WORD 18 INSTFlUCTION, ROMCLK PC-5l04

,THIS SUBROUTINE CALCULATES THE CRC USING POLYNOMIAl. GIVEN
,IN XPOLY. THE CORRECT CRC IS RETURNED IN CALBCC, AND -THE
,STATE or THE LSB OF THE BCC IS RETURNED IN THE C BIT,
027212
027214
027220
027224
027230
027234
027236
027242
027246
027250
0272S2
027254
027260
027264
027272
02727&
027302
027304
027)10
021312
027314
0'27316
027320

PC_5304

'ttMP2
21

11&40
PAGE 8!
SUBROUTINES

0211 56

4535
4536
45)7
4538
4539
4540
4541
4542
4543
4544
4545
4546
4547
4548
4549
4550
4551
4552
4553
4554
4555
4556
4557
4558
4559
4560
4561
4562
4563
4564
4565
4566
4567
4568
4569
4570
4571
4572
4573
45'4

PC,OCOI<
PC

;NEXT
,LOAU
plAIT
,NEXT
,LOAD
,WAIT

,THIS SUBROUTINE fILLS THE OUT SILO
, WITH A BINARY COUNT PATTEPN

16500

DZDM[
MACY11 30(1046)
ll-JUL-77
DZDI<4E.PlI
12-MAY-77 14118
4519
4520
4521
4522
4523
4524
4525
4526
4527
452A
4529
4530
4531
4532
4533

15700
15800
15900
16000
16100
16200
16300

PC,OUTRDY

010]

STLOLDI

14900
15000
15100
15200
15300
15400
15500
15600

PAGEl

FlOIoICLK
122110
JSR
ROMCLK
122110
JSR
RTS

11200
11300

026502

026712

026712
02&720
026724
02&726
026730
026716
026744
026752
021>754
026756
026762
026770
026772
026774
027002
027004
027006
027012
027014
027020
027026
027030
027032
027036
027040
02704b
027052
027054
027(156
027062
027070
027072
027076

448"

PAGE B 4
11140
SUBR01)Tlt'lf.S

MOV
MOV
MOV
MOV
MOV
lei
CLC
ROR
ROR
ADC
ROR
BCC
MOV
BIC
BIC
BIS
DEC
2'1
8NE
MOV
FlOR
MOV
RTS
XpOLYI
0
CALBCC, 0
LRCh200
CPC16-120001

RO,-CSP)
(R5)+,TEMPl
(R5)+,TEMP2
(R5) +, C ALBCC
CA1.BCC,RQ

,SAVE 1'.0 ON STACK
,TEMPI - SHIFT COUNT
,TEMP2 - CHARACTER
,CALBCC - OLD BCC
, PUT OLD 8CC IN RO

CALBCC
TB:MP2
RO
RO
28
XPOLY,RO
CALBCC,RO
XPOL Y , C AL8Ce
RO,CALBCC
TEMPt

,SHIFT OLD BCC
,SHIFT CHARACTER
,ADO CHAR CARRY TO 01.0 BCC
,PUT BITO TO CARRY BIT
,CARRY IS FEEDBACK BIT
,IF FEEDBACK - 1
,EXCLUSIVLY OR XPOLY TO CAt.BC~

11
CALBCC,RO
1'.0
(SP)+,RO
R5

,DEC SHIFT COUNT
,BP IF NOT DONE
,PUT RESULT IN 110
,SHIFT BITO TO CARRY
,RESTORE 110
, RETURN

0104

OZDMt;
MAC Y 11 30 (t 046)
l1-JUL-77
OZOlo'E, PIt
12-/-IAY-77 1411 8

4577
4578
4579
4580

19800
19900
20000

027322

4589
4590

4591
4592
4593
4594
4595
4596
4597

4598
4599
4600
4601
4602
~~03

46"04
4605
4606
4607
4608
4609
4610
4611
4612
4613
4614

027322
027]26
02'1;32
027340
027346
027350
027352
027356
02736;
027366
02"70
02737&
027400
027402
027406
027410
027414
027422
027424
027426
0"432

013637
062746
O~27]7

012761
104414
122114
004737
012761
104414
122111
012761
104414
122110
005337
001361
004737
013761
104414
122110
004737
000207

001250
000002
000002
000026

ITHIS SlJB~OUTINE LOADS THE OUT 511,,0 WITH 2 SYNCS
fWlTH SOM SET, A"D ONE CHARACTE~ PASSEl) TO IT
jWITH THE SOM eIr CLEl\R tENABt.E CRe)

000004

20200
20300
20400
20500
20600

MOV
ADD
MOV
MOV

000004

20800
20900
21000

000004

21200
21300

0000<14

21500
21600
21700
21800
21900

0"1246

llCSP)+,TEMP2
'2,-(SP)
.2,TEMP!

ILOAD PORN

JS~

PC,OUTROY

MOV

U,4(~1>

,NEXT
,LOAD
,WAIT
,LOAD
,NEXT

026502
000001

122114

1$1

~OMClIK

000026

001246
026502
001250

122111
MOV
ROMCLJ(
122110
OEC
BNE
JS~

MOY

TEMPI

PC,OUT~DY
TltMP2,4(~1)

122110
JS~
~TS

WO~O IS INSTRUCTION, ROMCLK PCa5304
SYNC REGISTER
FO~ OUTROY·
PO~T4
WO~O 18

INST~UCTION,

RO~CLK PC-5304

,SET SOM

~OMCt.K

22100
22200
22300
22400
22500

026]50

,GET CHARACTER
I ADJUS'l STACK
,SET FO~ 2 SYNCS

.26,4(,,1)

~OMCLJ(

PC,OCOR
PC

,1I0AO PORT4
,N.EXT WORO IS IN8T~UCTION, ~OMCLK PC-5304
,LOAD OUT DATA
,ALL DONE?
,B~ IF NOT
,WAIT ro~ OUT~OY
,LOAO PQ~T4
,NEXT WO~O IS INSTRUCTION, ~OMCLK 'C_5304
,1I0AO OUT DATA
,WAIT FOR OCOR

GETQOI

027434

027434
(127436
027440
021444

aCCLDI

20100

4581
4582
4583
4584
4585
4586
4597
4588

0105

CPC,CCITT:l102010

102010

4575
457&

PAG!::!

11140
PAGE 86
SUBROUTI NES

,THIS SUB~OUTINE ~EAOS THE STATE
THE TRANSMIT
,BCC LSB ANO PUTS IT IN THE CAR~Y BIT
104414
021364
106177
000207

ROMCLK
021364
ROLB

151746

~TS

,NEXT WO~D IS INSTRUCTION, ~OMCLK PC-5304
,PO~T4_LU-17

'OMP04
PC

,PUT QO IN CARRY
,RETURN

4615
GETQII

4616
4617
4618
4619
4620

027446

021446

104414

4621
4622
4623

027450
021452
02745b

021364
106171

151734

106177

151130

4624
4625
462&
4627
4628
4&29
4630

027462

000207

22800
22900
23000
23100

012737
012761
104414
122114
004737
012761

46;;

OZ15i6

iOH14

46 )8
4639
4640
4641
4642
4643
4644
4645
4646
4647
4648
4649

027520

122111
0127&1
104414
122110
005337
001361
000207

0275~2

027530
027532
027534
027540
027542

000002
000026

11140

001246
000004

4680
4681
4682
4683
4684

4685
4&86

004737

()12761
104414
122111
005061
104414
122110
000207

026502
000001

004737
012761
t04414
122111
104414
122110
000207

000026

010046
012500
012537
0047 37
112061
t04414
122110
005337

,~ETU~N

SYNLDI

,THIS iiHiEUiOUTIiiE LuALiS OUT SILO \'In!!

,2 SYNC CHARACTERS WITH SOM SET

PAGE 87

PAGEt

SUB~OUTINES

23200
23300

MOV
MOV

n,TEMP1
t26,4(~1)

,PO~T4_26

~O~O IS INST~UCTION, ~OMCLK PC-5304
SYNC ~EG
FOR OUTRDY

~CMCLX

PO~T4
rNE~T WDRD IS

000004

122111
MOY

,PO~T_26

122110
OEC
BNE

TEMPi

,~OAD OUT DATA WITK
,DEC~EMENT COUNTER
,B~ IF NOT OONE

~TS

,RETURN

000004

24200
2UOO
24400
24500
24600
24700
24800
24900
25000
25100
25200
25300

lSi

122114
JSR
MOY

PC,OUTROY

11,4(1'11)

000004

25500
25600

026502
000002

25800
25900
26000
26100
26200
26300
26400
26500
26600
26700

001266
026502
000004

001245

28600
28700

,NEXT·WO~O IS INSTRUCTION,
SYNC

~O~CLK PC-5l04

,THIS SUBROUTINE LOADS SOH AND OUT DATA WITH A
(0)

,GA~BAGE CHARACTE~

JSR
MOV

PC,OUT~OY
U,4(~1)

,WAIT FOR OUT~DY
,PO~T4_1

~OMCLK

,NEXT WORD

122111
CLR

,SET SOM
4(1'11)

122110
~TS

IS INSTRUCTION,

,CLtA~ OATA CHA~
,NEXT WO~D IS INSTRUCTION,
,LOAD GA~BAGE CHARACTE~
,RE:TU~N

~O~CLK

PC-Sl04

~O~CLK PC-5304

EON,
,'1'H18 SUBROUTINE LOADS EOM AND OUT OATA WITH A
,GA~BAGE CHA~AC'l'E~ (2) TO ENABLE T~ANSMISSION 0,. BCe
JSR
MOV
ROMCLK

26iuu
27100
27200
27300
27400
27500
27600
27700
27800
27900
28000
28100
2UoO
28300
28400

~QMCLK PC_5304

SOMt

~OMCLK

000004

!N~T!HJCTlON~

,SE'r SOM

~OMCLK

026502
000001

,LOAO COUNTER ro~ 2 SYNCS
,NEXT
,LOAO
, WAIT
,LOAD

23900
24000

001246

027620

027620
027622
027624
027630
027634
027640
027642
1127644

RTS

000004

027574

027574
027600
027606
027610
027612
027614
027616

,PUT QO IN CA~RY
,PUT QI IN CA~~Y

23500
23600
23700

021544

027544
027551)
027556
027560
027562
027566
027570
027572

ROLB

'OMP04
.OMP04

~OMCLI(

4650
4651
4652
4653
4654
4655
4656
4657
4658
4659
4660
4661
4662
4663
4664
4665
4666
4667
4668
4669
4670
4671
4672
4673
4674
4675
467&
4677
4678
4679

,PO~T4_LU-17

021364
~OLB

0274&4

027464
027472
027500
027502
027504
027510

, NEXT WO~O IS INSTRUCTION, RONCLI( PC-5304

~OMCLI(

OZOf"E
MAc.'Y11 30(1046)
ll-JUL-77
DZOME,Pl1
12-MAY-77 14118
4631
4632
4633
4634
4635
4636

,THIS SUB~OUTINE ~EAOS THE STATE
THE RECEIVE
,BCC LSB ANO PUTS IT IN THE CA~RY BIT

PC,OUTROY
12,4(~1)

,WAIT ro~ OUTROY
,PORT4_2
J NEXT WORD IS INST~UCTION,

~OMCLK PC-5304

12;illl

jiii'i

~OMCLK

,NEXT WORD IS INST~UCTION, ROMCLI( PCa5304
,LOAO GA~BAGE CHARACTER

122110
RTS

E~i;

,RII:TIJ~N

MESLDI
,THIS 8UB~OUTINE LOAOS SU.O IIIITH MESSAGE
,THE 'IRST A~UGUMENT IS THE ADDRESS 0,. THE MESSAGE
,THE SECOND A~GUMENT IS THE NUMBE~
CHA~ACTERS IN THE MESSAGE

111

MOV
MOV
MOy

RO,-(SP)
(R5)+,M

J8~

PC,OUTROY

MOVB

(~Ol+,4CR1)

(~5)+,TEMPl

~OMCLJ(

122110
DEC

TtMPl

,SAVE 1'10
,~O-MESSAGE POINTER
JTEMPI-CHA~ACTER COUNT
,WAIT FOR OUT ROY
,LOAD PORT4 WITH CHARACTE~
,NEXT WORD IS INST~UCTION, ~O"CLK PC-5304
,1I0AO OUT OATA SI1.0
,DEC CHAR COUNT

0106

DZD~E
"'ACYl 1 30(1)46)
II-JUL-71
, 2-t.\A~-77 141 \ 8
DZDME,Pll

4687
46Hq

4689
4690
4691
4692
4693
4694
4695
4696
4697
4698
4699
4700
4701
4702
4703
4704
47(15
4706
4707
4708
4709
471 0
4711
4712
4713
4714
4715
4716
4717
4718
4719
4720

4721
4722
4723
4724
4125
4726
4727
4728
4729
4730
4731
4732
4733
4734
4735
4716
4737
4738
4119
4140
4741
4742

02765()
0276'52
0276'56
027660

0013t-1
004137
0121>00
000205

026350

027662

027662
027670
027672
027674
027676
027700

012761
104414
122112
104414
122111
000207

000200

000004

.. .,c: a

4759
4760
4761
4762
4763
4764
4765
4766
4767
4768
4769
4770
4771
4772
4773

4774
4775
4776
4777
4778
4779
4780
4781

4782
4783
4794
4785

281100
28900
29000
29100
29200
29300
29400
29500
29600
29700
29800

027762

010046

30200
30300
30400
30500
30600
30700
30900
30900
31000
31100
31200
31300
31400
31500
31600
31700
31800
31900
32000
32100
32200
32300
32400
32500
32600
32700
32800
32900
33000
33100
33200
33300

027764
027766
027712
027714
027776
030002
030004
030010
(130016
030020

012500
012537
106000
103403
00"5037
000416
005237
022737
001010
005037

33400
]3500
33600
33700
33800
33900
34000
34100
34200
34100

027702

027702
02770 \
027706
027712
027714
027716
0'7722
027724
027730
o27n6
0?7740
027744
027750
0'7754
()27756
027760

010046
012500
012537
106000
103403
005037
000412
005237
022737
001004
005037
104415
005337
001356
012600
000205

001252
030100
030100
000005

030100

030100
000001
001252

027762

001252
030100
030100
000005

030100

030024
030030
0~0034

030036
1)30040
030044
030046
030050

104415
004737
103001
11)4030
005337
001352
012600
000205

000001
02,6316

]4400
34500
34600
34700
"34800
34900
35000
35100
35200
35300
]5400
)5500
35600
35700
35800

001252

010046

,,~~ ';~ ~

n" .,.,nn

030060
030066
030070
030012
030074

027177
005300
001373
012600
000207

030076
010100
030102
030105
030106
030111
030114
030117
030122
030125
()30126
030131
030134
030137
030140
030143
030146
030151

000176
000000
000
377
001
010
100
375
357
177
100
170
174
001
363
200
377
037

030152
030210
030253
030)17
0)0)61
030411
030430
030455
030501
030530
030554
0]0614
030664

046377
046377
377
377
377
377
051377
377
377
051377
044777
052377
041777

030"/05

371

~n~n ~?

151120

PC,OCOR
(SP)+,RO
R5

CLI'<IO,
,THIS SUBROUTINE SETS IN CLR AND OUT CLR TO
,CLEAR THE TRANS~lIT AND RECEIVE BCC REGISTERS
HOV
ROMCLK
122112
ROMCLK
122111
RTS

IBIT7,4(Rl)

,LOAD PORT4
,NEXT WORD IS INSTkUCTION, RUMCLK PCa5304
,SET IN CLRI
,NEXT WORD IS INSTRUCTION, ROMCLK PC.5ln4
,SET OUT CLRI
,RETURN

STr .. CLI
,THIS SUBROUTINE ADDS ANY NECESSSARY BIT STU .... Cl.OCK TICKS
,FIRST ARGUMENT IS CHAR, SECOND ARGUMENT IS SHIrT COUNT,

1$1

2..

381

RO,-(SP)
MOV
MOV
(R5)+,RO
MOV
(R5)+,TEMP]
RORB
RO
BCS
2'
CLR
BITCON
BR
3.
.tNC
SITCON
CMP
I5,BITCON
BNE
3$
CLR
BITCON
DATACLK,
DEC
TEMP3
BNE
18
MOV
(SP)+,RO
RTS
R5

,SAVE RO
,PUT CHAR IN RO
,PUT SHIFT COUNT IN TEMP3
,LOOK AT NEXT BIT
,8R IF A MARK
,IT WAS A SPACE, Cl.EAR I'S CO~NTER
,CONTINUE
,INC CONSECUTIVE 1'5 COUNTER
,IS IT 5 YET?
,BR IF NO
,YES1
SO START AGAIN
,GIVE EXTRA TICK TO STUF .. ZERO
,DEC SHIFT COUNT
,BR I .. NOT DONE
,RESTORE RO
,RETURN

STFFCK.
,THIS SUBROUTINE CHECKS TO SEE IF TRANSMITTER
,IS STU .. FING ZEROS WHEN IT SHOULD, .. IRST ARGUMENT
JIS THE CHARACTER, SECOND ARGUMENT IS SHIrT COUNT,

I"
281

lSI

MOV

RO,-UP)

,SAVE RO

MOV
MOV
RORB
BCS
CLR
BR
INC
CMP
SNE
Cl.R

(R5)+,RO
(R5 )+, TEMP3
RO
21
BITCON

,PUT CHAR IN RO
,PUT SHI .. T COUNT IN TEMP]
,SHI"T OUT NEXT BIT
,SR I .. IT IS A MARK
,IT WAS A SPACE, CLEAR 1'5 COUNTER
,CONTINUE
,INC CONSECUTIVE 1'5 COUNTER
,5 IN A ROW YET?
',SR I .. NO
,YES, SO START OVER

:II
BITCON
15,BITCON

:II
SITCON

)6000
3iil00
36200
36300
36400
)6500
36600
36700

PAGEl
DATACl.K,
1
JSR
PCrG!TSI
BCC
:II
HLT
30
DEC
TEMP3
BNE
11
MOV
(SP)+,RO
RT8
R5

,EXTRA TICK TO STurr ZERO
,LOOK AT WINDOW
,IS IT A ZERO, SR IF YES
,NO, ERROR ZERO WAS NOT STU .. FED
,DEC SHIrT COUNT
,SR lP' NOT DONE
,RESTORE RO
,RETURN

,THIS SUBROUTINE WASTES TIME UNTIL CTS SETIS,
,BUT HOPEfULLY NOT 80 l.ONG THAT THE SILO RU"S OUT
MOV
MOV

lIa

CMP
DEC
BNE
MOV
RTS

RO,-(SP)
U,.AO
fTKCSR,PTKCBR
RO

U
(SP)+,RO
PC

,SAVE RO
,LOAD RO WITH COUNT
,WASTE TIllE
,DECREMENT COUNTER
,DO IT AGAIN IF NOT •
,RESTORE flO
,RETURN

125

252

36900

FLAG a
-B<01111110>
BITCONa 0
MESDAT. ,BYTE
0,125.252,377

002
020
200
373
337

004
040
376
307
277

31000

P't.TDAT.

,BYTE

1,2,4,10,20,40,100,200,376,375,373,367,357,337.211,177

140
003
176

160
300
177

37100

STU .. DT.

,BYTE

100,140,160,170,3,300,174,176,177,1

347

317
377
200

37200

,BYTE

363,347, U 7,200,0,377,377,377,200,37

,ASCU
,ASClZ
.ASClZ
,ASClZ
,ASClZ
,Ascn
,AScn
,ASca
,ASClZ
,Ascn
,ASCIZ
.Asca
.ASCIZ
,Ascn

077>/LINE UNIT INITALIZATIDN TEST I
C377>-LINI!: UNIT REGISTER READ/ONLY TEST·
<377>-LINE UNIT REGISTER WRITE/READ TESt<377>il.INE UNIT INTERNAL CLOCK .. AILUREI
<377>/TRAN8MITTER DATA ERROR I
<l77>/RECEIVER TESTI
<l77>/RECEIVER DATA ERROR I
<377>/MODEM SIGNAL ERROR I
<37'7>ITRANSMITTER CRC ERRORI
<377>/RECI!:IVER CRC ERRORI
<)77>/IN BCC MATCH ERROR (LU REG 12)1
Cl77>/TRANSMlTTER .. AIL.ED TO GO TO MARK STATE I
<377>/CABLE DATA TESTI
<177>/P'LAG ERRORI

36800

000

177
041111
047111
044514
044514
051124
042522
041505
047515
051124
041505
020116
040522
0411 0 1
046106

020105
020105
042516
042516
047101
04250)

044505
on504
047101
044505
041502
051516
042514
043501

37300
00300
00400
00500
00600
00700
00800
00900
01000
01100
01200
01300
01400
01500
01600

0108

CTSDLYa

1CQIH'I

151116

01 Q7

I FIR IF NOT DUNo;
,WAIT rnp OCOR
,RESTORE PO
,IlETURN

11140 PAGE 89
SUBROUTINES

030052

PAGt:,
BNE
JSR
MOV
RTS

)0000

CZDME
MIICY11 30C 1046)
l1-JUL-77
DZD"E,P11
12-MAY-77 14118
4743
4744
4745
4746
4747
4748
4749
4750
4751
4752
4153
4754
4755
4756
4757

11'40 PAGE 8 P
SUBROUTl /;.~S

,EVEN
EMlI
EM2.
EM3.
EM41
EM51
EM61
EM7.
EM10r
EM111
EM121
EM131
EM14.
EM151
E"'161

,FLAG CHARACTER

MACy! 1 30C 1046)
U-JUL-"
DZDI'';
!2- MAY-77 14118
DZDME.Pll

11140 PAGE 9U
SU!\lolOUTIHS

031070
0311\3

377
377
040777
177
0443ii
047777
377

OS 1124
053523
047502
051124
046101
052125
047111

047101
052111
052122
047101
020106
051040
051040

1}31135
031156
031214
031252
031312
031344
031412
031435

377
042777
041777
041117
042777
042777
041377
377

054105
050130
040510
051117
050130
050130
047514
052122

042520
041505
040522
042522
041505
041505
045503
020123

031460
031462
031464
0314&6
031470
031472
031474
031476
031500
031502
031504
031506
031510
031512
031514
031516
031520
031522
031524
031526
031530
031532
031534
0310;36
031541')
031542
031544
031546

000002
003
001272
003
001270
000003
003
001272
003
001270
001
001264
000002
003
001272
1}02
001266
000002
006
027320
002
001266
000003
001
001300
001
001302
002

03 1 550
031552
031554
031556
031560
031562
0315&4
0315&6
031570
031572

001260
000003
001
001302
001
001300
002
001260
000004
001

030721
030765
o3! oUn
031,,23
031046

007
002
007
010
002
01'7
002
021
002
011
011
002

011
011
002
011

OZDME
MIl.CYll 30(046)
U-JUL-77
OZDME:,PlI
12-"''''1-'' 14118
031574
0)1576
031600
031602
031604
031606
031610
031 ",12
011614
031616
031620
031622
031624
031626
031630
031632
011634
031636
OJ! 640
031642
031644
031646
031650
03i652
031654
031656
031660
031660
031662
031664
031666
031670
031672
031674
031676
031700
031702
0;1704
031706
031710
031712
031714
031716
031720
031722
0]1'124
031726
031730
031732
031734
031736
031740
031 142
031744
031746

001300
001
001302
003
001272
002
001266
000004
001
001302
001
001300
003
001272
002
001266
000002
003
030076
002
001266
000002
006
027320
006
001252
000000
000000
000000
030152
031156
0)1472
030210
031156
031472
030253

011
007
001
011
011
007
001
007
002
004
002

01700
01800
01900
02000
02100
02200
02300
02400
02500
02bOO
02700
·02900
02900
03000
03100
03200
03300
03400
03500
03600
03700
03800
03900
04000
04100
04200
04300
04400
04500
04600
04700
04800
04900
05000
05100
05200
05300
05400
05500
05600
05700
05800
05900
06000
06100
06200
06300
06400
06500
06600
06700
06800
06900
07000
07100
07200

e:M171
E:~i201

EM:.!ll
EM221
EM23r
V~241

EM251
DHll
DH21
DH31
D!44 !

DH51
DH&,
OH71
OHIO.
,EVEN
OTll

012.

OTl.

D14I

DTS.

016.

.ASCIZ
.ASCIZ
.ASClZ
.r.SCIZ
.ASCIZ
.ASCIZ
.ASCIZ

<377>/TRANSI'ITTER FAILED TO STUFF A ZEROI
<377>/SWITCH PAC T~STI
<377>/ABORT ERRORI
<377>/TRANSMITTER ERRORI
<377>/HALF DUPLEX T~STI
<377>/OU1 READY NOT SET!
<377>/IN READY ~OT SETI

.ASCIZ
.ASCIZ
,ASCIZ
.ASCIZ
,ASCIZ
,ASCIZ
,ASCIZ
,ASCIZ

<377>/EXPECTED FOUNDI
<377>/EXPECTED rOUND LU-REGISTERI
<377>/CHARACTER
BIT THAT FAIloEOI
<37?>ICORRECT CRC
BIT THAT FAUEOI
<377>/EXPECTED
FOUND
SHIFTI
<377>/EXPECTEO
FOUND
CHARACTER
SHIFTI
<377>/BLOCK END NOT SETI
<377>/RTS DID HOT CLEARI

2
,BITe:
SAVR5
,BYTE
SAVR4

OT10,

DTl11

DT12.

SAVPO
3
,BYTE
,BYTE
ZERO
,BYTE
SAVRO
4
,BYTE

3,2
3,1'7
2,2
6,21
2,2

1,11
1,11
2,2

1,11
1,.11
2,2

1,11

ZERO
,BYTE
ONE
,BYTE
SAVFI!
,BYTE
SAVP3
4
,BYT!:
ONE
,BYTE
ZERO
,BYTE
SAVR5
,BYTE
SAVPl
2
,BYTE
rLAG
,BYTE
SAVR3
2
,BYTE
CAI.BCC
,BYTE
TEMP3

1,11
3,7
2,1
1,11

1,11
3,7
2,1
3,'7

2,2
6,4
6,2

0
0
0

QZ ll;;

l~lQO

_..•

031472
0)0317
000000
000000
030361
031156
031472
030361
031214
031510
030411
031135
031460
030430
031135
031460
0]0455

11200
11300
11400
11500
11600
11700
11800
11900
12000
12100
12200
12100
12400
12500
12600
12700
12800

OT2
EM4
0
0
EMS
OH2
DT2
EMS
OM3
OT3
EM6
OHl
OTI
EM7
OHl
OTI
EM10

0110

3,'7
3,10

,ERRTABr

EM1
OH2
OT2
EM2
DH2
012
EM3

PAGE.

3,7
3,2

11140 PAGE 91
SUBROUTINES
07300
07400
07!00
"07600
07700
07800
07900
08000
08100
08200
08300
08400
08500
08600
08700
08800
08900
09000
09100
09200
09300
09400
09500
09600
09700
09800
09900
10000
10100
10200
10300
10400
10500
10600
10700
10800
10900
11000

O! 09

)

,BYTE
SAVR5
,BYTE
SAVR4
,BYTE
SAVP2
2
,BYTE
SAVR5
,BYTE
SAVP)
2
,BYTE
CALBCC
,BYTE
SAVP3
3
,BYT&:
ZEPO
,BYTE
ONE
,BYTE

ONE

OT7.

PAGE!

,MLT
,MI.T

.......
rMLT

,MI.!
rHLT
,HI.T
,HLT

D2,0!~':

~ACylt

07.D~~.Pll

lO( 1 ()46)

12-"'A~-71

l1-Jl'L-77
14118

! 1140 PAGE '12
SUBRUUTIJlor 5

011770
031772
OH774
031776
032000
032002
032004
032006
(132010
037012
032014
032016
032020
032022
032024
032026
032030
032032
032034
032036
032040
032042
032044
032046
032050
032052
032054
032056
032060
032062
032064
032066
oH070
032072
On074
032076
032100
032102

()31135
031460
0)0501
031312
0)1'134
030530
1)31312
031534
030501
031252
031522
030554
000000
000000
030501
031312
031552
030530
031312
031552
030501
031344
031570
0]0501
031344
031612
030530
031344
031570
0]0530
031344
031612
(\30614
000000
000000
030664
031135
031460
0]0705
031214
031634
030530
031 135
03\646
030721
000000

12900
13000
13100
13200
13300
13400
13500
13600
13700
13800
13900
14000
14100
14200
14300
14400
14500
14600
14700
14800
14900
15000
15100
15200
15300
15400
15500
15600
15700
15800
15900
16000
16100
16200
16300
16400
16500
16600
16700
16800
16900
17000
17100
17200
17300
17400

032104
032106
032110
032112
032114
032116
1132120
03212:0'
012124
032126

000000
030765
031135
031460
031006
031412
000000
031006
1)31214
()31510

17500
17600
17700
17800
17900
18000
18100
18200
18100
18400

0) t 750
0317'52
031754
oH756
(' 11760
031762
()31764
OH7~6

OZO"'E
IUCYll 30(1046)
U-JUL-n
DZD"E.Pll
12-M~Y-77 14118
032130
032132
032134
032\36
032140
032142
032144
0]2146
032150
032152
032154
032156
032160
032162
0321114
a J2; ~t
012170
032172
032174
032176
032200

031023
031435
000000
031046
031156
IJ31472
031070
000000
000000
031113
000000
000000
0)0411
031156
031472
~30)6!

031312
()31534
030554
031135
031460

032202
000001

DHI

IHLT

IH1.T

,HLT

,liLT

,HLT

0111

PAGEl

0112

OTl
E"'11
DH5
OT5
EM12
DH5
OT5
EMU
DH4
OT4
EM13
0
0
EMU
OH5
OT6
EMU
OH5
OT6
E"11
OH6
OT7
E"'l1
DH6
OT10
EM12
DH6
DT7
EM12
OH6

OTtO
EM14
0
0
EMU
OHI
OTt
EM16
OH)
OTll
EMU
OHI
DT12
EM17
0
0
EM20
OH1

OTl
EM21
0117
0
EM21
0113
DTl

11140 PAGE 93
SUBROUTINES
19500
18600
18700
18800
"18900
19000
19100
19200
19300
19400
19500
19600
19700
19800
19900
20(1)0
20100
20200
20300
20400
20500
20600
20700
20800
21300

PAGE,

EM22

OHIO

,liLT

,HLT

,MLT

OM5
DT5
EMU

,HLT

OHl

,MLT

0
E1423
OH2
OT2
EM24
0
0
EM25
0
0
EM6
OH2

on
E"'!!

DTI
CORMAXI
,END

\ i-JUL-"
¥'~C':l!l 30(!046)
12·M~Y·77 14: 19

OZDM~

OZO"e:.Pt I

ADRCfIIT .. O()~]73
AUOONE 0\1]024
AUSTRT 002446
AU10.5 010!l12
021322
BCCLO
BIN"RD 004714
BrrCON 030101)
BlTO .. 1)00001
000002
SITt
002000
SITIO
SIrll .. 004000

.
"
..

81112 .. 010000
020000
SITt3
040000
B1 T14
SITI5 .. 100000
000004
Sl '1'2
000010
SrT3
SlT4 .. 1100020

SIT5 .. 000040
BIT6 .. 000100
BIT7 I: 000200
000400
BITS
alii 000
BIT9
BM
007054
012252
SRLVL
OOl7 )0
BRW
51'1)(
003732
CALSCC 027320

...

CHAR
CtlARSD
CHRCNT
CKSWI'I
CKSWRI
CKSWR2
CKswp3
CKS~R4

CKSI'lRS
CLKX
CLPIO
CNEPR
CNT,MA

026534
026646
00471.2
007606
007666
007700
007704
007710
010014
001242
IJ?7662
007277
001702

CNV.PT .. 104411
CON£:RP 1107223
007114
CONI>l
CONTA8
on2i76
COrJVRT" 104410
CORMAX 032202
CPAII.
OC6606
CRC ,CCI: 102010
CRCI6 I: 1 ,onol

879·
569
568#

526
2987
965*
4513*
95 •
941
85_
841
2565
3345
831

821
81'
80.
931
92.
911
4537
90 •
8U
9811
871

11871
1617
718
719
3006
3627
4305
2566
445U
963*
512
1225'
1228.
1230#
1231i
1213
1711
2982
626
196

2331
621
11871
630

915*
608
663
13681
3016
968.
4714*

1155
531
1513
2053
2613
3U6
1464
1467
781
485
531
1549
1139
1661
1144
1145
1523
1521
1492
1627
80U
805.
3035
3657
4351
2614

001320
006510
010514
030052
010060
005216
1 04415

OATAHO 005204
DELAY I: 104413
OEVAOP 004]70
OEVTA.e 01)3010
OH1
031135
OHIO
031435
OH2
031156
OHl
011214
OH4
031252
OH5
031312
OHf!
031344
OH7
031412
OISPLA 001200
OISPRE 000174
OMACTV 001306
OMCM
007)20
OMCIlOO 001500
DMeROI 001510
DMCR02 001520
OMCIlO3 001530
OMCR04 001540
OMCR05 001550
OMCR06 nOl560
OMCPo7 001570
DMCIll0 001600
DMCRj t 00; ... to
OMCR12 001620
OMCR13 n01630
DMCR14 001640
DMCll15 001650
OMCR16 001660
O14CR17 001670
OMCSR
001404
DMCSRH
OMCTL
OMNUM
D~P04

001406
001410
001)10
001412

OMP06
DMRLYL
OMRYEC
OMS100

001414
001376
0013'74
001502

195.
11871
1370.
47511
720
1049.
241'
2354
2727
3094
3428
3704
4104
1048*

3137

3166

3212

3241

45'18ii

4717

4719.

4737*

4739*

4740

4742*

n6,.

1155

1156

1449

1532

1545

2130
2681
3577

2188
2724
3824

2239
2764
4095

2290
2845
4159

2341
2940
4i99

2393
2981

2451
1056

2479
3131

1547
1480
575
1156
2917
1164

1756
1547
596

2889
1558
599

2915
1758
1451

2936
2891
1519

2938

4197

4291

2166

2574

2622

2659

2696

2733

1761
1145
1265
1538
1523

2109
1551
1661
1540
1535

2219
2488
2138
1553
1561

2270
2544
2579
1555
1564

2321

2372

2806

4112

4697
1561
1620

1564
1622

1622

1635

164H

3081
3679
4553*
2651

3110
3754
4554
2688

3156
3797
4556*
2725

HiS
3854
4562
2846'

3260
3924
4564*

3316
3945
4567

970

986*
1026

10041
12121

1005

3207

3236

469H

3062
969
4716.
1156
1149
1524
2086
2650
3513
1543
1516
1478
572
712
1556
1162

3091
100U

3~3i

3875
4563*
4429.

2507
3206

2535
3279

4160

4379

4421

3441
4075
4785

'I"'4.~

4211

3606
4267

3435

3600

36!51

4293

..,olOA

4021
4572'

1239
1220

1246
i255,

3011
USH
:t6U

3057

3086

3132

3161

484

496

488

1293

623
11871
1469

738

740

142

744

1060

1062

1122

1228

629

1076

1391

1059
4202

3088
4296

3163

3209

3238

3284

3350

45741

Ul.
543
1430
3013
3918

3134

11140 PAGE 96
CROSS REFERENCE TABLE .- USER SYMBOLS

PAGEl

48341
tJ95

128941

1290

1292-

1296

761
1052
2093
2355
2766
31)9

762
1074
2137
2369
2767
3140
3463
3717
4115
1073.

1280.
10771
2141
2411
2810
3168
148t
3841
4169

2201
2414
2811
3169
3855
4720

2202
2455
2848
3214
3490
3876
4743

2216
2493
2989
3215
3523
389-6

2252
2511
2990
3243
3593
3925

2253
2539
3018
3244
3607
3946

2267
2568
3019
3298
3628
3964

2303
2616
3064
3300
3658
3971

2304
2653
3065
3364
3679
3973

1584.

1588

1613

1298*

1]07

,4537

461~*

3442
3706
4109
1070

3488

2318
2690
lOU
33116
lb97
3984

2lH
871*
583

912
6481

922.

49841
504
521
118"

504*

7l5*

676*

677

1280

1294

1316*

1577.

1583-

612-

647

765

802

1094

1117

1163
U09

4U1

4785.
4785'
478,.
.78,.
4785'
4785.
4785.
478'5'
142.
1281
1891
634
2791
2841
28U
2941
299'
30U
3091
3141
319.

329#
3lU
3391
3441
3491
]541
262.
U56
263.
2641
190.
26"
4622*
2661
259.
2581
280.

0113

659.

911

DZDME
MACYll )0(1046) U-JUL·77
[lZOME.Pll
12-MA Y-77 14118
CREAM
CSIl
CSR"'AP
CTSOLr
CYCLE
DATASP
OATACL"

9'2U
b13

966
779
1237

2311
4785.
118H
4575.
2984
)848

PAGEl

11140 PAGe: 95
CROSS ~e:HRENCE TABLE -- llSER SYMBOLS

56'*
1678*
114441
1309*
479
1133*
46231150*
131h
768

602

607*

1145*
1310*
751
1139

11491311
13'74*
1176

1313.
1317*
1299.

1314.

1l!5*

1156-

1162*

116'*

1307-

1308.

138941

156 a.
1311*

1569
1312*

1578

1580
4366

4379

1181

1318
1300.

1316

1313

0114

I1-JUL-""
OZOMF.
"'ACyl 1 3o(11146l
12-MAY-71 14118
DZOMl, PII
D"I5101
DM5102
OMSI03
OMSI,,4
0"5105
OMS\l'I6
0"15107
0"5110
DMS111
011,5112
0"15113
OM5114
011,5115
011,5116
P"lS117
011,5200
OM5201
0"15202
DM520)
011,5204
011,5205
011,5206
011,5207
011,5210
011,5211
0"15212
011,5213
OMS114
OM5215
[111,5216
011,5217
011,5300
011,5301
011,5302
DM5303
011,5304
011,530'3
011,5306
011,5307
011,5310
0"15311
011,5312
011,5313
011,5314
OMS315
011,5316

(1)151 '2
001'122
001532
nOl542
001552
001562
01)1572
0016 0 2
001612
001622
001632
001642
001652
001662
001672
001504
1)01514
001524'
001534
001544
1101554
001564
001574
001604
0111614
001624
001634
001644
001654
001664
001674
001506
001516
00152b
001536
001546
001556
001566
001516
001606
001616
001626
001636
001646
001656
001666

OM5317
OMTLVL
O'4TVEC

001616
0111402
()Ot400

3511
2b1l

OM.ENO
OM,MAP
DONE
OT!
OTI0
OT! t

001100
1)01500
003734
031460
03\612
()316H
0] 1646

3591
195
184
4185t
4785'
4195.
4785.

Dtl1

OT4
DT5
OT6
OT7
E"II
EMI0
EMU
.. 10112
E"'13
EM14
EMI5
EMI6
E"'! 7
EI>42
£10120
EM21
EM22
EM23
EM24
EM25
EM3
EM4
EMS
EM6
EM7
EOM
ERCTOO
ERCTOI
tRCT02
ERCT03
tRCT04
ERCTOS
ERCT06
tRCT07
ERCTIO
ERCTtl
ERCT12
ERCT13
ERCT14
ERCT15
ERCT16
ERCTl7
ERR
ERRCNT
ERRFLG
ERRMSG
ERRPC
ERTUO
EXIT •
EXI TER
FLAG
FLOIIT
FLTDAT

oll472
031510
031522
0310;34
[)31552
0310;70
030152
030455
')30501
030530
030554
030614
030664
030705
030721
030210
030765
031006
031023
031046
011070
1)31113
0302S3
030)17
030361
030411
030430
027574
001704
001710
001714
00 I, 20
001124
001730
001134
001740
01)1744
001150
001754
001760
001764
001770
001774
002000
002700
001 '232
oot 325
005172
002770
005322
000205
005252
11]0076
002536
030106
11112566

PAGEl

O~ 15

PAGEl

0116

285'
290,
295'
300.
305.
310.
315.
3201
325'
330.

335.
3401
345.
350'
355.

2811
2961
2911
29U
30U
306.

3tH
3161
3211
3261

331*
3361
3411
3461
3511
3561
292.
2871
292'
2'971
302.
3071
312.
31H
3221
3271
332.
3371
3421

3471

3521

2601

1320.
tllh

1321.
1319*

1320

1372
27U
786*

483
8064

536
1216*

OZOME
MACYII 30(1046)
I1-JUL-7'7
OZOME.Pl t
12-~4l:'·77 14118
OT2

11140 PAGE 97
CROSS PHF.P(';NCt: HEILE -- USER S¥.,r,lOLS

546

662

1290

1292

1370

1375

1605

11140 PAGE 98
C ROSS REFERENCE TABLE •• USER SYMBOLS

4785.

4785.
4185.
4785.
,4795'
4185.
418S.
4785.

4785.
4785.
4785.
4'785t
4785w
418S.
418S.
418S.

4785.
41951
478S,
478S.
4785.
4785.
4785.
4785.
4785,
4185.
4185.
3425
366.
3691
3.72.
375.

3521

3S86

611,

622

3590

3833

3831

4217

4221

1081·
795.

UOS.
1037.

10$0

lOU·

112:1*

4223
615

4230

4270

4770.

3181

3811
38U
3871
390,
39U
3964
3991
402.
4051
4081
4111
592
1631
20H
1047.
624
1062
961
10B2
4'7661
585.
4205
5941

747
481.

1065

774
7ll.
1068.

640.
109H
1087'

4785
591
4215
605

4219
609

4225

4311

46611

r.. ACyii jll(i046i
It'''JUL~77
DZD"E
12-MAY-77 UI\A
DZOME;,Pl1

('271 4 6
027434

GFTQ!
GETOO
GfTSl

02631b

005,22
004]66
001222
007'502
010020
001324
027156

MALTS
HILIM
lCOUNT
INBUF
INCHAR
INIi"LG
INRDY
INSTER:o
INSTR II-ISTR2
INTTY
KMCM
LIMITS
LINE
LOBITS
LOCK
LOKftrG
LOLIM
LPCNT
LRCS "

104404
1114403
004166
II 12266
001330
004314
007016
004372
001220

LSTER~

001326
004364
001224
000200
001234

trUTYPh
MASKX
MASTEK
MCRLF
MCSRX
MDATA
MEMLIM
MEPlISS
MFRRPC
MERRX

001244
006142
1)05672
006072
n07544
001304
005733
006217
OOb 117

•• *•••

MERP2

I)057bO

MERR3
MESDAT

006005
030102

MESLO

On620

MILK
MLOCK
MNF.:W
MODU
MPASSX
MPI"AIL

001122
006043
006144
0(\6704
006106
0:)5675
005666
005755

MOM

MRES£T= 004000
MSTCLR- 11'4412

3026
2997
2205
3470
3959
4744
1033
876.
159.
846
1231
201'
2768
3782
4252
22H
2211

853
1414
637
892
118H
fl78*

1581
2978*
20H
875.
160'
457]1

3030
3001
2209
)482
3862
10?9.
903
793
882
12591
507
2912
3987
4316
897
1329
865.
1431
11871
9031
1483
907
797·
3010.

1!4~

1
172t
1058
831
717
984

001000
000130
006031

NEX"!"

ou1216

0()~100

tlITCH
NOACT
NOOEV
NUM
oeOR

02&346
007154
002674
006450
02&350

OK
ONE
OUTRDY

01)2646
001)02
026502

PACTOO 001702
PACTOl 001706
PACT02 001712
PACT03 001716
PACT04 001'722
PACT05 001'726
PACT06 001732
PACT07 (J01736
PACT10 001742
PACTll 001746
PACT12 001752
PACT13 001756
PACT14 001762
PACT15 001766
PACT16 001'772
PACT17 001776
fARAi4 ;; lij4,.U;;
PARAM1
004234
PARBlTa 040000
PARERR 004 31 (I
PlISCNT 001230
PERFOR- 004537
PFTAB
005430
POPRO - 012600
,POP1SP- 005726
POP2SPa 022626
PRIO
006547
P5
17'7716
PUSHRO_ 010046
PUSHU- 005746
PUSH2S_ n24646
QV.FLG 001327
RESREe; 005220
RESTAR 005350

PAGE!
USER SY/oIBOLS

3\Ot
3072
2256

3105
3076
2260

3&10

3879

3983

3180
3151
2311
3631
3903

3251
3222
2358
3635
3928

3255
3226
2362
3661
3932

3372

3491

3176
3147
2307
3514
3899

2417
3665
3949

3376
3310
2421
3682
3953

4616.
4606'
3445
3686
3965

2865
4027
4525.

3524
4041

3537
4055

3542
4060

3720
4116

3734
4126

1491

1795*
3203*

1821*
3235*

1837*

527
2849
4001
4331
1381

1394

1403

1482

1441

1454

1470

16551

9231
814
l053.

924
816
3085*

1056
3128*

1779*
3160*

905
792*

920.
793

796*

490.

?l2.

1014

1036*

1124*

1054

1055

1063

118H

1328

1390

3519

3584
4106
3835

3588
4166
410.0

673
2949
3836
2948
4308

3417
3911
3422
46741

3423
3986
3518

3514
4040
3583

4096
3587

3578
4101
3830

48h
11971
119H
1453

745

128h

1293*

129'7

11871
11971
11871

1352
1346

1427

143'7

1447

1462

1476

1126

1725

1749

1'781

1823

1865

1923

196.
714
66B

118'11
741
1121
861
723

3449

3466

3b98

3707

3974

4360.

3739
4134

3763
4231

4247

1863*

1886*

1921*

1941·

3644
4299
4105

3719
4309
4165

3762
4315
4214

3825
4768.
4218

4222

1974

1996

2019

2052

2085

3777

12041

US7t
3831

11871

96~

235'

2129
2685
3412
13U
1059
11871
739
!!!iH
2016.
2561*
1202*
4366*
523
57'7

118.,.
2092
4103
603

18,.

2199
3517
4494
36U

11140 PAGE 100
CROSS REFERENCE TABLE

2197
2722
3512
511
11871
11871
799

2050*
26011*
3276*
4367*
1187.
61 lit
1382
2136
4108
610'
4785
2194

)582

4589

2238
2759
3573

2289
2800

3820

2340
2944
4094

PAGEl
USER SYMBOLS
2392
2888
4157

2450
2935
4196

2478
2980
4290

2506
3055

2534
3130

2563
3205

2611
327B

2648
3344

1'72]*
2236'
2751*
3571*

1747*
2287*
2798*
3818*

t'71h

1820*

2338*
2842'
4092*

2886*
4155*

1862*
244B*
2933'
4194*

1920*
24'76*
2977*
4298*

1972*
250'3052*

199'2532*
3127*

3297
4410

3363
4452

3426
4468

3522
4509

3591
4602

3839
468B

234'7
44141

2397
4439

2401
4449

2406
4461

2429
4465

3421
4485

1330

1092
2083*
2646*
3342*
U6h
1282

167.6*
212'7*
2683*

1700-

4369*

2185*
2720*
3510.
43711

2198
4168
639

2249
4226

2]00
4312

US1

2410

43741

4380

2240
3829
459B

2245
4099
4635

2291
4164
4651

2296
4394
4665

2342
4403
4682

l.ioJ

'~~'IiiiII'

i4~S

.... v ..

4,7J

906
1304'

908

3410*

3681
3711
3741
37,.
380.
3BH
3861
389.
392'
39,.
398.
40U
404.
4071
410.
~C"'IP

881'
961

'898

894

886

898

162.
961
1122
72.
70.
741

73'-

735

89'7t
746

904
771

711*

161?*

In'*

750.

790

118,.
631
7U
691
731
2041
1075
1108

11281
1086

801
1413
476*
10a3
482.
1078t
11141

;;:.:::.~

2390.

I
II

534*
2857
4006
4336

743
U8H

188J
736
1061

33Cb

01! .,

9211
798.
1202.

11871
954
11871
994
700*
11871
1187#
U8H
Hi90

OZO~E.Pl1

MTITLE
MT5TN
MTSTPC
MVECX

PAGE 99

CPOSS tiEf'ERENCE TASLE

4545

MACyl1 30(1046)
U-.1Ut.-7'7
12- ... AY-77 14119

DZOM£

11:40

OQ8

MAC'Vll 3() (1 046)
OZOM~
l1-JUL-17
DZOME..Pl1
12-I>'Ay-n 141111
RESTRT 0030;34
RESOo; : t "4 401
RETUR~J
nl11214
ROMCLK: 11' \414

RU~

SAVACT
SAVNUM
SAVPC
SAVRO
SAVRI
SAVR2
SAVIl3
SAVR4
SAVR5
SAVSP
SAV05 II
SCHAR
SCOPE •

001]16
001312
001314
001276
001260
0'J1262
001264
001266
001270
001272
001274
104406
027152
104400

SCOPI • 104401
SILOLD
SIMBCC

026712
027212

SlOP
SOf'TSW
SOM
SPACNTII
SPEED
STACK II
STAT
STArt

002632
010052
027544
004713
01)7]40
001200
001240
0013"6

STAT2
STAT]
STFFCK
STFrCL
STRTSW

(101370
001372
021762
027702
001236

STurOT
STUl"LG
SV05
Si'lFLG

030126
027154
004402
010016

749
229.
1561
239'
1826
1997
2143
2349
2618
2866
3357
]783
4127
4377
4483
4633
1931
1911

192t
185.
17U
179.
180.
18U
182.
1831
1841
2271
2760*
2151
2114
2671
3396
21"
3159
2765
2992
3850
573
1229
3834
964*
U8H
641
170.
2511
252'
2531
472"
4501
1691
1601
4776.
2761*
93H
480.

753
1078
492*

1134
1828
2021
2153
2370
2627
2895
3361
3792
4135
4392
4487
4637
48S.
671
47h
622*
93h
62B*
936*
935*
934*
93h
1038
2801*
1688
2171
2708
3497
1794
3188
2781
3021
3920
576
126U
464H
988
1440
477

007205
Otl72t5
001202

5111lEG

SII03 :
SII04 II
510105 II
SWOb II
SW07 II
510108 :
SW09 II
510110 II
SWll
SW12
SWl1
SW14 •
SW15 :
SYNC
SYNID
TEMP
TEMPI

000176
000001
000002
')00004
000010
000020
000040
000100
tll)0700
000400
001000
n02000
004000
010000
020000
040000
100000
02& 366
027464
001416
001246

TEMP2

00 1750

TEMP]

001252

swoo

SWOl

sw02

TEMP4
TEMPS
TIMER II
TKCSR
TKOBR
TLAST II
TPCSR
TPDBR
TRPOK
TSTNO

TSTI
T5Tl0
T8Tt I
TST12
TST13
TSTI4
TSTI5
TST16
TST!'

001254
001256
104416
001204
n01206
02&000
001210
001212
004730
001226

012320
013)26
013502
013544
013606
013706
014006
tl14144
014342

11871
1187.
1431
1081
129'
451
441
431
42.
411
40.
39.
38.
371
361
35.
34.
331
]2'

311
30.
2453
3285
2711
173'
455h
1741
4073*
4480*
175'
3753*
4075
4785
176.
17,.
24H
1481
14'9'
1350
150.

1511
101"
16U
186h
2447*
2932*
4193*

1337
1862
1920
1972
1994
2016
2050
2083
2127

PAGEl

76U
720*
1137
1839
2030
2163
2399
2655
2898
3391
3988
4161
4396
4490
4640
1286*
158B*
74h
642
943
937*
945
946
947
948

724
1174
1841
2055
2191
2403
2664
2907
3525
4002
4170
4399
4496
4653
1287*

761*
1179
1871
2057
2196
2408
2692
2910
3538
4007
4232
4405
4516
4656
1294

751*
929*
4785
944
4785
4785
4785
4785

1581*
1099

4477
1711
2222
2745
3554
1807
3234
2809
3067
4207
597

4495
1735
2273
2784
3800
1836
3263
2825
3096
4301
600

4500
1766
2324
2828
4078
1849
44'72'
3142
4545.
606.

799*
1680
1873
2061
2217
2431
2701
'942
3543
4016
4248
4408
4518
4667

803
1703
1892
20R8
2242
2456
2729
2946
3552
40211
4253
4419
4535
4669

1092*
1727
1894
2090
2247
2484
2738
2954
3721
4042
4262
4437
4587
4684

1928
2095
22&8
2512
271\9
3287
3735
4056
4317
4441
4591
4698

4504*
1808
2375
2873
4143
1882

4505
1850
2436
2921
4178
1903

4511*
1908
2464
2964
4273
1937

45211
1960
2492
3039
4354
1955

3171

3217

3246

1095

1127
1784
1930
2105
2293
2540
2807
3291
3740
4061
4332
4444
4594
4700

1345*
1786
1946
2132
2298
2570
2813
3295
3749
4070
4337
4450
4600

1355*
1797
1948
21B
2319
2580
2850
3325
3764
4110
4346
4463
4610

1357
1799
1975
2139
2344
2582
2858
3353
3778
4117
4364
4466
4620

1982
2520
3114

2004
2548
3189

2037
2597
3264

2070
2634
3330

3009

3038

3084

l1U

3301

3367

3437

3602

]65]

1347*

1377

17~1

991*

1005.
1093

1116

1301*

1756

1758

2889

2891

2915

2936

2938

4197

4291

1302*
1303*

1978

2000

470!H
513.

516*

517

519

529

531

666

712

721

1323

2802*

4498

4512*

4522.

825

1224*

1251*

125,.
PAGEl

11140 PAGE 102
CROSS REFERE;NCE TABLE •• USER SYMBOLS

1227
1230
49'*
10BB
503
517
721

0119

S'i~180LS

690

MAC'll 1 30(1046) 11-JUt.-77
DZD"E
DZDf-IE.Pll
12-MAY-77 14118
SlfMES
SWMESI
SWR

11140 PAGF: J nl
CROSS PEHRENCE TABLE: -- USEP

499
1090
1212
1377
1323

Olao

503*
1152
1270
1601
1347

513
1212

671
1250*

676

781

788

812

827

1027

10]2

3U8
1165*
4389*
4642*
3753
434h
458h
1193
3197
4334*

40n
1171*
4401*
468h
3794*
4349*
4599
1386
4004*
4335*

4200
2019*
4446*

4201
2025.
4481*

4294
2028*
4492*

4295
2034*
4533*

4539*

3796
4433*

401 . .
4449

4019*
4459*

4020
4462

4072*
4476*

1389
4005*
4350*

1501*
4020*
4351

3540*
4021
4711*

3541*
4058*
4721*

3737*
4059*
473h

3738*
4074*
4747*

1411
4417*
2728

1487
4423*
2897

1490

1496

1499

2909

2944

1675*
2126*
2682*
3409*

1699*
2184*
2719*
3509*

1722*
2235*
2756.
3570*

1777*
2U7*
2841*
4091*

1819*
2389*
28854154*

666
1152
1088
812
1090
788
827
1032

1027

2481
3351
971
537.
4565*
53h
4074
4507*
540*
3754
4250.

2509
3420
11th
1189
4585*
1191
4264*
4514*
566*
3780*
4251*

2537
3516
1119*
16\3*
4596*
3751*
4265*
4552*
3781*
4266.

43841
3581
1160*
1614*
4631*
3752*
4266
4557*
627*
3796*
4267

541*
542*
2059
848
850
43551
832
Slh

1195
1197
2569
1214
856

1399
1380*
2617
1259
1217

1402
1393*
2654
1655
1219

1408
1599
2691
4759
1261

854
856*

1029
1031*

1262
1264*

1658
1660*

491*

1102
1971*
2503*
305h

1130
1993*
2531*
3126*

1334

1341

2015*
2560*
3201*

2049*
260e.
3275*

191h
2475.
297h
4287*
1355
1919'
19711
199H
2015'
2049t
208H
21261
2184.

167!1t

619

118h
4435*
4686*
3795*
4350

462U

165-'

1343
2082*
2645*
3341*

1746*
2286*
2797*
3817.

11~JUL·77
MACfll 30't046'
DZD·iE
12-~'lIY-77 14118
DZDME,Pll

1676
2185
2236

012114
014524
01470&

T5T2
T5T21)
TST21

11!40 PAGE 103
CROSS REfERENCE TABLE ••

T5T22

Oi5010

2287

233'11

'll 5252
015460

2338
2390
2448
2476
2504
1700
2532
25b1
2609
2646
2683
2720
2757
2798
1723
2842
2896
2933
2977
3052
3127
3202
3276
1747
3342
Hl0
3510
3571
3818
4092
4155
4194
1778
4288
1820
715·
961
1053
219.
737
1061
1426

23891
24414
2475.
2503#
25311
1722.
2560'

015546

01611>6

01 &302
016420
016536
016654
017()04
1)17144
012514
017]04
017466
017632
020146
020462
020776
021312
021550
012616
022006
'!'ST51
022340
TST52
0:7.7542
T8T53
023642
TST54
025042
T5155
025274
TST56
025412
T5T57
0?6000
(l12756
TST&
TST60 • tltltltltltI U
TST7
013116
TTST
003612
TWOSYN: 010000
TY;>DAT 1)05206
TYI"E
1 04402

TYPMSG
VEC
VECMAP

005106
O()6526
012010
012002
004710
005174
00'5000
003546
003570
006224

WHICH

WPDCNT
WR((O,f'

XBX
XC5R
XEP.!'
XHE~D

003022
003562

XSTATQ
XTSTN
XVEC
ZERO

007454
005330
003554
001300

acan

;;'~ir';;'~

SCFAP a 177777

BENDAD

003522
a 000057

719.

782.

535
1072
1439

620
931
1121
1446

11
17671
1964
20781
2325.
2496
26411
28291
3043
33371
4079.
123

11
1862
2096~

2448
26491
2933
33451
4194
• 000017
• 032202

743

633

625
844
1227
1452

861
1230
1461

USE~

SYMBOIoS

636
954
1282
1468

668
994
1328
1475

673
1054
1346
1590

714
1055
1352

723
1058
1390

736
1059
1412

10031
1032.

11140 PAGE 104
CROSS REFERENCE TABLE _.

PAGEl

614

645

6581

3059t1
4202t1

308811
4296t1

3134.
4561

3163.
4563

3209t1
45711.

323h

3294t1

U50tl

3435t1

3600tl

36!11t1

1665.
1770
19671
2115.
2328
24991
2672.
2832
304711
339"
4082
509
1665
1736
1823
1961
20191
2124
2274
2392
2499
25641
2680
2785
2888
3047
3206.
3407
3801
4157

1668
17731
1983.
2118
23331
25211
2675
28371
3115.
3400
40871
755.
1671
1742
19241
1969
2038
2129
2282
2393.'
2501
2598
2685
2793
2889t
3049
3265
3412
3813
41581

1671t
1809.
1986
2122.
2376.
2524
26781
28741
3118
3405.
41441
1079
1673
1744
1851
1974
2045
2130.
2284
2437
2506
2604
26861
2795
2922
3055
3271
34131
3815
4179

1689.
1812
19891
21721
2379
25271
27091
2877
3122.
34981

1692
1815.
2005.
2175

1695.

1712.
1854
20111
22.231
2440
2556.
27461
2925
3197.
3555.
4182

1715
18571
20381
2226
2443t
2598'
2749
29281
32615.
3558
4189.

17181
1909.
2041
22311
2465.•
2601
2752.
2965.
3268
3566.
4274.

17361
1912
2045.
2274i1
2468
26041
2785.
2968
32711

1739
1915.
20'/U
2277
24711
2635.
2'/88
2972.
33311
3804
4283.

174;;1'
19611
2074
2282.
24931
2638
279H
3040.
3334
3UlI

1697
1773
18661
1991
2071
2187
2333
2451t
2529
26-35
2722
2837
2936.
3124

1712
1781
1915
19971
2080
2223
2340
2471
2535.
2643
2746
2844
2972·
31311
3339
3555
4094
4283

1718
1782.
1917'
2005
2085
2231
23411
2473
2549
2648
2752
2845.
2974
3190
3344
3566
4095.
4285

1720
1809
1923

:UU
3512
40n
419,.

1702'
1775
1909
1996
2078
21881
2335
2465
2534
2641
27231
2839
2965
3130
3337
35131
4089
4274

20861
2233
2376
24'/8
2556
2649.
2754
2974
2980
3197
3345.
3568
4144
4290

1725
1815
192U
2013
2115
2238
2385
2479.
2558
2672
2759
2881
298U
3199
3397
3573
4150
4291'

1676
1866.
2127
24511
2683
2936.
3410
41971
2071
239,
109
2771
294.
310,

16781
1920
2130.
247'6
2686.
2977
3413.
4288
215
2411

1700
19241
2185
2479,
2720
29811
3510
42911
217.
241,
119,
280.
2961
312.
3291
345.

2532
2760.
3127
35741

1747
19971
2287
25351
2798
313U
3818

1750.
2016
22901
2561
280lt
3202
18211

1778
2019.
2338
256U
2842
32061
4092

1782'
2050
23411
2609"
2845f
3276
4095'

1820
20531
2390
2612.
2886
3279.
4155

18241
2083
23931
2646
2889.
3J42
4158t

2JU

:uu

:us.

190'
2891
3051
3211
3371
354.

.191'

192J
2911
3071
32U
340'
356.

611·
769,
301h
391811
1197.
1100,
7661
4785

17261
1817
1961
2018
2122
223U
2387
2493
2563
2678
27601
2893
3040
3205
3405
3574.
4152
.o355i
.. 000061

4355

1th

1597;
995t1
1069.
1030
7631
772'
11871

1861

10741
523
741
1067
1436

1392

593t1
742
2984t1
3848t1
544
1060
740

077316

1071
511
739
1063
1429
1054.
1404
16011

11
237.
lOBI
2721
292.
30U
325.
3411

3261
342.

186U
716t1

DZD"IE
MIICYll 30(1046) l1-JUL-77
DZDME:.PlI
12-MAY-77 14118
Xl"OC
XPASS
XPOLY

0121

2601)#

2645#
268H
2719_
2756t
27971
28411
1746#
2895#
2932.
2976#
30511
31261
32011
3275.
334U
17714
3409.
3509.
3570.
38171
40911
4154#
41931
42871
1819.

1051
11871
1599
962·
1066
1028
738
744
535

5~MBO~S

1699'
2235.
228U

TST23
T5T24
TST25
T5T26
TST27
T5T3
T5T30
TST3t
TST32
T5TH
T5TH
T5T35
TST36
TST37
TST4
TST40
TST41
TST42
TST43
TST44
T8T45
TST4!>
T5T47
TST5
TST50

015636
(115724
012442
1)16()14

PAGEl
USE~

11"

279.
295.
311.
3271
3441

lBS1t

4141

2lBS.
2549.
2712
288U
3190'
3501
4150.

2008
2180.
24371 .
2552
2715'
2922.
3193
3505.
41791

16181
1749
1857
1975.
2047
2172
2289
2443
250H
2606
2709
2800
2928
30561
3273
3498
3820
4189

1689
1750.
1859
1983
2052
2180
2290.
2445
2521
2611
2715
2801.
2930
3115
3278
3505
38211
4191

1695
1767
1865
1989
2053'
2182
2325
2450
2527
2612'
2717
2829
2935
3122
32791
3507
4079
4196

1702.
1972
2UIU
2504
2723.
3052
35131

1723
1975.
2236
2507.
2757
30561
3571

219.
245,
124.
2811
297.
314'
330.
346,

2211

2231

2251

22,.

2291

1271
282.
299.
315.
3311
3471

llU
2841
300.
316.
3321
3491

135.
285.
30U
31"
334.
350.

137t

189.
287.
lOU
320.
3361
352'

17261
1994
22]9~

286'
302.
319.

335.
3511

3801~

4277

2011

290.
3061
l22'
3391
355.

0122

DZD~\E'

,BEGPI
,CNVRT
,CONVP
,DATAC
,DELAY
.EOP
,EFlRTA
,HLT
,INSTE
,INSTil
,HJSTl
• !olSG
,MSTCL
.PARA"!
,prAIL
,RER05
.ROMCL
.SAV05
.SCOPE
.SCOPI
.START
.TIMER
.TRPSR
.TRPl'A
,TYPE

30(104bl
11-.1l1L-n
12-MAy-n 14118

"~CYll

DZP'lE, OJ I

35"
1378
3975
690.
234
232
242
238

001152
01)4472
01)4466
005552
005436
0(13)64
031660
004750
004154
004050
004070
(1)4072
005466
004174
005]36
004434
005504
1)04]74
003576
003736
002002
005616
004716
001]30
003766

7311
1046
115
224
222
8441
842 •
236
226
113
230
240
228
216
219
132
244
117
21U
220

51S
1422
955,
9541
1159.
1132.
4288
4785'
10261
8614
840.
864
U5.
1143.
872.
478
9431
11481
929.
779.
811.

4761

$A801'T
sAUTO
SBCC
SBINCR
SBINi<i!
$BUf"fE
$CDATA
$CLOCK
$COlolP
SCRC
$CI'CSH
.CYCLE
aE"'PTY
SEOP
$F'lNI

SFLAG
SFLOAT

SGET!'A
SHALF"
SHEADE
UNACT

SINIT
SLINEI
SLUt
.LUI2
SLU17
SMARHl
SMARK
SMATCH
SMOCK
,MODEM
$MSG
SMULT
SPATTE
SPP'AIL
SQOQl
SQUESt
,RAMCL
$RCLK

11
11
751
2027
23 t 3
2633
2999
3257
3033
1864
4048
4'>41
11
11
If
11
11
11
it
II
11

2900
11
If
11
U
11
U
11
11
It
11
11
U

U
11
11
11
U

525
1542

65H
1546

11071

1115

492

1247

1110
1624

1120
1656

11 F> 8.
1659

1203*
2890

1205.
2916

1260
2937

1263
3492

11140 PAGE 107
CROSS REFERENCE TABLE -- MACRO NAMES

2670

1734
2102
2364
2699

3028
3312
3663
38RS
4077

3374
3667
3901
4114

1765
2112
2374
2707
3074
3378
3684
3905
4123

)115

3190

2584
3545
3011
3345

2591
3742

3057

2620
3785
lO86

1887

1925

1942

2437

2465

2493

2521

t8!lt
1665
1767
1809

1909
1689

1712

1716

3730

37'73

3991

1403

1482

1491

1174

1873

1179
1892

2090
"2293
2580

2298
2582

1680
1894
2105
2319
2618

547
2965
3265
2376
1199
4179
2005
2572
2912
2982
3279
1271
4079
725
4355
1867

1710
2068
2360

3040
3331

PAGEl

3032

3468
3709
19S1
4177

1848
2207
2491
2819
3149
3472
3727
3955
4238

1881
2211
2519
2856
31!l3
3494
3747
3967
4260

1902
2221
2547
2864
3178
3493
3756
3976
4269

1936
2258
2577
2872
3182
3531
3770
3994
4323

1954
2262
2589
2905
3224
3550
3790
4014
4344

1981
2272
2596
2920
3228
3612
3799
4023
4353

2625
2963
3253
3616
31160

2666
42S5
3207

2694
4339
3236

2703

2'731

2740

2B!l2

2860

2861i

"3161

4243

4327

170l
1928
2132
2344
2627

1727

1751
1946
2139
2370
2664

1794
1948
2143
2399
2692

1786
1975
2153
2403
2701

1797
1997
2163
2408
2729

1799
2021
2191
2431
2738

1B26
2030
2196
2456
2769

1828
2055
2217
2484
2807

1793
21S0
2419
2736
1078
3447
3688
3930
4133

1906
2160
2423
2744
3103
3451
3700
3934
4141

1835
2169
2463
2775

2629
4009
3132

26S7

4051

n07

2003

2309

4034
4425

4274

4063

4144

2829
3534
2874
1187

11
11
11
11

2746
1103
4606
1381

11
11
t 839
2057
2242
2512

1131

1134
1841
2061
2247

2540

2795
4616
1394
1137
1871
2088
2268
2570

01B

1284
3708

725
t687
2036
2323
2662
3003
3308
3637
389t
4068
4746

11
It
It

675
1593

PAGEl
USER SV"BOLS

1170.
10141
1019
822.

DZDME
MACYll 30(1046)
11-.1U1.-77
DZDHE.Pll
12-MAY-77 14118
DMEND
DIoIFPNT
HLT

11140 PAGE 105
CPOSS !lEn RENCE TABLE

2095

1930
2134
2349
2655

0124

DZD;';E

;.tAC'iii 30Cl04&,

2 Rtl
H53
3792
<Ii 70

4409
~!)87

taCRC
'FlEe
$SCOPE
SS]foIBC
$Sr~JAC

SSDFTC
$STUFr
SSWPAC
STCHAR

ncl'Ic

$TFlANIli
$TRANI
npI'D!::
$TSTN

4700
11

u
1#
U

..
11

3988
42 ;2

4419
4591
3498
2549
775
4545

~ACaO

2910
355.2
4056
4317
446&
4637

PAGE:

NAMES
il94,2
312i
4061
4H6
4483
4§40

4437
4594

2866
3391
4007
4253
4441
4600

2895
3525
4016
4262
4444
4610

:lR98
3538
4028
4317
4450
4620

2598

2635

2672

2709

3577
3801
3651
2115
219

3824

221

223

225

227

229

231

233

235

237

239

241

1775
2445
3049

1817
2473
H24

lUll
2501
3199

1917
2529
3:273

1969
2558
U39

1991
2606
34{)7

2013
2643
3507

2047
2680
3568

2080
2717
3815

2124
2754
4089

1712
1989
2l2!!
2604
2922
3405

1718
2005
23H
2635
2928
3498

1736
2011
2316
2641
2965
3'.505

1742
l/9l6

1767
2045

23.85

2H1
2678
3040
35.6.6

17'13
2.!)71
2443
2709
3047
3801

1809
2078
iM!~
2'715

1815
2115
2471
2746
3122
40'79

1851
2122
2493
2752
3190
4087

1857
2172
2499
2785
3197
4144

2858
3361
4002
~24S

2907
3543
4042
4332
4463
4633

29-4b

lH5
40'Hl
4,)f> 4

4487
4653

2953
3740
4110
4377
4490
465..6

3297
3749

4117
4)92

449,6
4&67

3291
3764
4127
4396
41i16
4669

3295
3778
4135
H99
4518
4684

3325
3783
41&1
-HC§

4535
4698

1207

11
It
11
11
11
11
243

1961
3416
3397
3435
2038
215

1983
3513
3555
3600
2071
217

1673
2233
2839
4191
134
2172
1665
1915

1697
2284
2883
4285

1720
2335
29)0

1744
2387
2974

2223
1671
1961

22'74
1689
1967

2325
1695
1983

2223

2231
2549
2837
3331
4189

22H

22@2

2551>
2874
3337

2598
2881
3397
4283

IZEROS
• AilS.

032202

$VARIA

2850
3357

11: 40 PAGE It'S
CROSS REF'ERENCE TABLE

2182
2795
4152
it
11
11
1909
'1.80
2521
2793
3265
41!10
11

$WINDO
SXZ

11~JUL=77

12-t.\A¥-77 14118

DZDflE.i?11

2527
2829
3271
4179

000

ERRORS DETECTED!

DZDME, DZOME/SOL/CFlF _IPLUTL, DZOME
PUN-TIME: 16 22 1 SECONDS
RUN-TIME RATIOI 779139 z 19,5
CORE USED I 31K (bl PAGES)

4274

3848

3918

26'l.~

2972
35!-5

ius
~813

0125