MAINDEC 11 DZDMH A D_DMC11_HIGH_SPEED_JUMP_AND_FREE_RUNNING_S_Jan77 D DMC11 HIGH SPEED JUMP AND FREE RUNNING S Jan77
MAINDEC-11-DZDMH-A-D_DMC11_HIGH_SPEED_JUMP_AND_FREE_RUNNING_S_Jan77 MAINDEC-11-DZDMH-A-D_DMC11_HIGH_SPEED_JUMP_AND_FREE_RUNNING_S_Jan77
User Manual: MAINDEC-11-DZDMH-A-D_DMC11_HIGH_SPEED_JUMP_AND_FREE_RUNNING_S_Jan77
Open the PDF directly: View PDF 
.
Page Count: 141
| Download | |
| Open PDF In Browser | View PDF |
PAGEl
IDENTIFICATION
PRODUCT CODE,
P~OOUCT
NAME,
MAINOEC-l1-0Z0MH-A-D
DMC11 HIGH SPEED JUMP AND FREE RUNNING TESTS
OATES
JANUARY 1977
MAINTAINERI
DIAGNOSTICS
AUTHORI
fAY BASHAW
The information 1n this document Is subject to Chanqe
not lee and mhould not be eonstrued as a commitment by
Equipment cowporetton. Dlqitel Equipment Corporat1on
no responsibility for any errors that may appear
document.
w1thout
Oiqltal
assumes
In this
The software described In this document Is furnished under a
license and may only be used or copied 1n accor'danee with the
terms of such license,
Diqttal Equipment Corporation aSlumes no responsibility for
the use or reliability Of its software on equipment that Is
not supplied" by Oiqital.
Copyr~Qht
eC) 1977 by Oigltal
Equip~ent
Corporation
0001
PAGEl
I,
A~STRACT
The function Of the DMCII diaqnosti:s 11 to ver1fy that the
oPtion operates accOrdinq to specifications, The diagnostics
verfiy that there are no mal~unctlo,s and the all operations
of the ONCll are correct in its envlronment.
P~rameters must be .et up to
alert the diagnost1cs to the
DMC11 conflgurat1on.
The.e para~eters are contained in the
STATUS TABLE and are generated In two ways. 1) Manual
Input. the operator answers que.tion., 2) Autosizinq • the
program determine. the parameters automatically.
DZDMH tests the DMCII-AL miero.proe~slor (M8200-YB) wIth hlqh
speed erom, or the KMCII mlero.proe~lsor (M8204). It performs
1ump tests on the m1ero-processor. ~erlfies the control ~OM of
the M8200-YS, and telts the CRAM anti other un1que fUnctions of
the ~8204. If a DMCI1-AL (M8200-YB) and 11ne unit (M8202-YA
or M8202-YD) are present, free-runnin9 tests are performed.
These tests are SKipped if a KMC (M8204) or no line-unit I.
prelent,
The belt teat Is With a !ine-unlt installed, DZDMH
can be used as a Heat Telt Dlaonolt~c by Manufacturlnq.
CurrentlY there are four off l1nt d!~onostles that are to be
run 1n seauence to insure that ! f an error Should occur it
will be detected at an early staqe,
Additional dlaqnoltlcs may tIe added 1n the future.
The four d1agnostics are,
OZOMC [R~V] Baale W/R and Mlcro v processor telts
DZDM! [PEV] DDCMp Line unit tests
OZO~F [REV] BITSTU,F Line unit telts
4.
OZDMG [REV] Low speed jum~ anet Free-runnlnq tests (Heat
test tape) NOTE. DZOMG IS RUN ONLY ON A OMCI1-AR (M8200-YA).
OZO~H [REV] HiOh s~eed jump a~d Free-running tests (Heat
test ta~e) ~OTEI DZDMH IS RUN ONLY UN A DMC11-AL (~e200-YB).
1,
2.
3.
2,
REQutRE~ENTS
2.1
EQUIPMENT
Any PDP11 familV CPU (except an LSI·1!) with
ASP )1 (or equiltvalent)
DHell-AL (M9200-YB) or an KMC11-A
D~C11-MO
(~e204)
mlnlmu~
B~
memory
with a DMCI1-MA or a
0002
Page 3
2.2
STORAGE
Proqram will use
all 8K of memory exeept wher~ ABL and
rellde. Locations 1500 thru 1640, contain
th@ "STATUS TABLE" information which Is generated at start of
diagnostic. by manual 1nput (questions) or ~utomatlcallY
(auto-slzlnQ), This area Is an overlay area a~d should not be
altered by the operator.
BOOTST~AP
LOADE~
3.
LOAnING PROCEEDURE
3.!
METHOD
All proQrams are in absolute format and are loaded using the
ABSOLUT! LOADER. NOTE, if the dlaOnostles are on a media such
as DISK ,MAGTAPE,OECTAPE, or CASSETTE,
follow instructions
for th~ monItor Which has be@n provided on that specific
met11a.
ABSOLUTt
MEMORY
LOAD!~
*
SIZE
4k
17
8k
12k
20)(
37
57
77
117
,,41c
281c
137
157
16k
starting address *500
Place a1dress of ABS loader into switch register.
(alSo place 'HALT' SW up)
Depress 'LOAD ADDRESS' key on console and release.
Depress -ST~RT KEY' on console and release (prooram should now
he loftdlnq tnto CPU)
PAGEl
0003
Page 4
4.
ST~RTtNG
PROCEEDURE
Set Iwiteh reqister to 000200
Oepress ·LOAD ADDRESS' ~ey and release
Set SWR to zero for 'AUTO SIZING' or SWR hltO.l for manual
l~put (questions) or SWR bit7.t to use exlstinq parameters
set up by a prev10us start or a orev10usly run DMClt
dIagnostIc.
Depress 'STA~T KEY' and release, The proqram will type
Malndec Name and proqram name (It this was the first start
uo of the proqram) and al.o t~e following,
MAP OF DMCll STATUS
PC
.--
CSR
STATI
001500 160010 145310
001510 160020 145320
STAT2
STAT3
177771
177777
000000
000000
The proqram wl11 type ,~, and proce!d to run the diaqnostic.
The above 11 only an example. Thi1 would indicate the statuI
table starting at add, 1500 1n the prooram, In th1s example
the table contains the information and status of two DMC11'S.
THE STATUS TABLE MUST 8E VERIFIED Bt THE USER IF AUTO SIZING
IS DONE. For Information of ItatuJ table lee section 8.4 for
helP.
If the dlaQnostlc was started w1th SWOO=l indIcating manual
parameter input then the followLng Ihows an example of the
q~estlons asked and some eX4mple anlwerSI
HOW MANY DMC11'S TO BE
T~STEO?l
01
CSR AODRESS?160010
VgrTOR AonRESS?3to
BR PRIORITY LEVEL? (4,5,6,7)?5
DOES MICRO-PROCESSOR HAVE CRAM? CY OR N)N
WHJCH LINE UNIT? IF NONE TYPE "N", If MQ201
M9202 TYPF "2"?1
IS THE LOOP BACK CONNECTOR ON?Y
SWITCH PAC'1 (ODCMP LINE')?3??
SWITCH PACt2 (SMS7l BOOT ADD)?)77
TYPE
"1",
IF
Follow1nQ ~he Questions the status ma~ 15 ~rint.d out as
described 8bove, the Information In the map reflects the
answers to the questions. It the d!~qnost1c was ~t8rted wIth
swon~o
and SW07.0 (AUTO-SIZING) rhen n~ questions are aSked
and only the r.tatus-map 1s printed out.
If AUTO-SIZING Is
used the status {nformatlon mus~ he ver1fle~ to be correct
(match th~ hardware). 1f 1t does not matCh the hardware the
dlao~ost1c
must De restarted with swon:! anrl the Quest10ns
answered.
PAGEl
0004
Paqe 5
4,1
CONTPOL SWITCH SETTINGS
SW 15
SW t 4
SI!rtt
S4!~t
SW 13 S4!!t
sw 12 S4!!t
SW 11 S4!!t
SW 10 S4!!t
SW 09 5mt
SW 08 Smt
07 S4!!t
SW 06 SI!!t
SW
SW 05
sw
SI!!t I
04 Smt:
SW 03 Smtz
SW 02 SI!!t I
SW 01 S4!!tt
SW 00 S4'lt I
Halt on error
LooP on current test
Inhibit error print out
Inhibit ~ype out/abell o~ error,
Inhibit Iterations, (quick pass)
Escape to nlxt test on error
Lnop with current data
Catch error and loop on it
Use previous status table,
Halt In
ROMCLK
routine
before
clocking
micro-processor
Reserved
Reserved
Reselect OMCll·s deSired active
Loek on selected test
Restart program at selected test
Build new statuI table from questions. (If SW07=0
and SWOO-O a new status table Is bullt by
auto-slz1nQ)
switCh 06 and 08-15 are dynamic and can be changed as needed
while the dlaQnostle 18 runninq. Sw1tches 00.03 and switch 07
are static, and are uled only on startlnQ or restarting the
dlaqnos1~:lc ,
PAGEl
0005
Page 6
SWITCH REGISTER OPTIONS (at start up)
SW 01
PE8TAPT PROGRA~ AT SELECTED TEST.
It 15 stronoly
sUggested that at least one pass ~as been made before
trYlnQ to select a test, the reason being 1s that the
program hal to clear areas and set up ~arameters.
When this swltch 1s used the diaanostic will ask TEST
NO.?
Answer by typing the number of t~e test desired
and carr!ge return to begin execution at the selected
test.
~w
02
LOCK ON SELECTED TEST. ThiS switch when used wlth
SW01 wl11 cause the program to constantlY loop on the
selected test, Hitting any key on the console will
let It advance to the next test and loop untll a key
is hit again. If SW02=O when SW01 1s used,
The
proqram will begin at the selected test and continue
normal operatlons.
SW 0]
PESELECT DMCll'S DESIRED ACtIVE. Please note that a
message 11 typed out for setting the switch reglster
equal to OMCll's active, t~il means if the system has
four DMClla,
bits aO,Ql,02,03 wll1 be let in loc
'DMACTV' from the switch reg1lter.
Using
this
swltch(8WOO) alters that locatlon,therefore if four
DMClls are In the system .**DO NOT*** set switchs
greater than SW 03 in the ~p pOSition, th1s would be
a fatal error, do not .eleet more active OMClls than
there Is information on in the statuI table,
~£THODi
AI
8a
CI
n:
F.:
Load address 200
Start with SW QODI
Program will type m~ssage
set a Iwitch for ~ach OMC des1red active.
EXAMPLE. If you have 4 OMC's but only want to
run the first and t~e last let SWR bits 0 and
3 • 1. PRESS CONTI~UE
Number (IF VALID) will be in data lights
(exclud1ng 11/05)
Set with anY other switch settinQs desired.
PRESS CONTINUE,
PAGEl
0006
Paqe 7
DYNAMlC
SWITCHES
ERROR l!.WITCHES
SI'l 12
1•
sw
2.
3.
4,
5.
13
sw 15
SW 08
sw
SCOPE
4.2
10
Delete print out/bell on error.
Delete error printout.
Halt on the error,
Goto heginning of the test(on error),
Goto next testCon error),
:!.wITCHES
'.
SW06
3.
4.
SWl1
SWS4
Halt
in
ROMCLK
routine
before
clocking
micro-processor
Instruction.
This alloWS the
operator to scope a micro-processor 1nstruction In
the static state before it 1s clocked.
Hit
continue to resume running,
(If enabled bY 'SCOP1') on an error, If an -*' Is
printed in front of the test no, (ex. *TEST NO.
10 ) SW09 Is
incorporated in that test and
therefore SW09 i. usuallY the best switCh tor the
scope loop Csw14=O, SWI0xO, SW09-l, SWOS.O),
If
SWOg is not enabeled, and there is a HARD error
(constant), SW08 11 best.
(SW14-1,O, SWI0=O,
SWOg-O, awos-!), for lntermlttemt errors, SW14-1
will looP on test reguardless of error or not
error, CSW14al, SWI0-0, SW09=O, SW08 x l,O)
InhIb1t lnteratlons.
LooP on current test,
STARTING ADDRESS
starting address Is at 000200 there
addresles tor the OMCII diagnostles.
NOTEr
5.
are no other startlnQ
(See Sectton 4,0)
~rldress 000042 15 non-zero the program
assumes It
is
under
ACT!1
or XXDP control and will act
accordingly after all available DNC11~s are tested the
progr~m will return to 'XXDP' or 'ACT-It'.
If
OPERATING PROCEDURE
When progra~ Is initially started messages as deserlbed in
section 4.0 will be printed, and pro~ram will beQin runnlnQ
the cUaanost!c
PAGE:.
000'7
Page 8
5.2
PROGRAM AND lOP OPERATOR ACTION
The typieal approach should be
1.
2.
l.
4.
Halt on error (via SW 15=1) when ever an error oceurs.
Clear SW 15.
Set sw 141 (loop on this test)
Set SW 131 (1nhlbit error print out)
The TEST NUMBER and PC will be ty~ed out and pOSllbl1y an
error ~eSl8ge (thil depends on th~ test) to give the operator
an idea al to the source of the pr~blem. It It Is necessary
to ~now more information eoncernin1 the error reportr LOO~ IN
THE LISTING for that TEST NUMBER w~lch was typed out and then
NOT€ THE PC of thE ERROR REPORT this way the EXACT FUNCTION of
tne test CAN BE DETERMINED.
6.
ERRORS
As delcribed previoully there will always be a TF.ST NUMBER ~nd
PC typed out at the time of an error (providing sw 13-0 and SW
1n mOlt ealel addItional Information will be supplied
in the the error messaqe to give ttle operator an Indication of
the error.
12-0),
6,2
ERPOR RECOVERY
It tor some real on the DMCll should 'HANG THE BUS' (oaln
eontrol of bUt so that conSole manual functions are inhibited)
8~ Init or power down/up 11 neceSldlY tor operator
to reoain
control of epu.
If. thiS ShOUld happen, look In loeatlon
'TSTNO' (address 1226)for the number of the test that was
ru~~ing
~t
the time of the catAstrophie error. In thIs way
the operator will have an idea as to What the D~C11 was dOing
at the time of the error,
7,
RESTRICTIONS
7.1
STARTING RESTRICTIONS
S~e section 4.
(PLEASE)
Status table should be verified requardless of how prOqfam was
started.
Also it 1s Important to use this listing along with
the information printed on the TTY to completly isolate
problems.
PAGEl
0008
Pc\ge 9
7.2
OP[RATING
~ESTRICTIONS
Th@ fir~t time a DMCl1 diagnostic Is loaded into core and run
the STATUS TABLE ~ust be set UP, This Is done by manual input
CSWOOK11 or by autosizinq (SWOO=O and SW07=O),
Thpreafter
however the status table need not be setup by subsequent
restarts or even loading the next OMC diagnostic because the
ST~TUS
TABLE 1s overlayed,
The current para~eters In the
STATUS TABLE are used when SW07=1 on start up,
7,3
HAROWAPE CONrIGURATION RESTRICTIONS
DMCll(M9200)- Jumper W1 must be In, and switch 7 of
be In the OFr pOSition.
[76
must
KMC(M8204'- Jumper WI must be In.
UNtT(M8201). Jumper. Wi, W2, a~d W4 must be TN,
Jumpers
W3, and W5 must be OUT.
swe of E26 must be 1n the ON
POSITIOIIl,
LIN~
LINE UNIT CM8202)- Jumper WI must be In.
in the orr POltt~on.
8.
MISCELLANEOUS
8,1
EXECUTION TIME
swe
of E26
must
be
All DMCtl deviee diaonostics will oive an "END PASS' messag.
(provldinQ no errors and IW12=O) within 4 mlns. This 1s
assumlnl~ SW11~1 (DELETE ITERATIONS) i. set to give the fastest
posslbl~ execution.
The actual execution tIme depends greatlY
on the PDP11 CPU configuration and the amount of memorY In the
systern.
8.2
PASS COMPLETE
NOTEr EVERY tlme the program 15 started: the tests w1ll run
as 1f SWll (delete iterations) was up (=1). ThiS Is to
-VERIFY NO HARD ERRORS· as soon as possible.
Therefore the
flrst ~ass -EACH TIME PROGRAM IS STARTED- w1ll be a -QUICK
PASS' until all DMC11'S In system are tested,
When the
diagnostiC has completed a pass the followlng Is an example ot
the pr 1 'r\t Ollt to be expected.
END PASS DZDMH CSPI
ERRORS. 000000
NOTr.f
175000 VECI
0300 PASSES'
000001
The pass count and error counts are cum mut1tive for
each DMC11 that 1s running, and are set to zero only
wnen the diagnostic 15 started.
Therefore after an
overnlqht run for example, the total passes and errors
for each DMC11 since the diagnostiC w~s started are
reflected In PASSES' and ERROPS:.
PAGEt
0009
Paqe 10
8.4
KF.Y
LOC~TIONS
Rr.TURN (2214)
Conteinl the address where program will return
when iteration count is reached or it loop on
test Is asserted.
NEXT
(1216)
Contains the address of the next
peformed.
TSTNO
(1226)
contains the number
test
to
be
now
being
The bit in 'PUN' always points to the
currently
being
tested,
EXAMPLE.
1302/0000000001000000 Means that DMC11
Is the DMC11 now runnlnQ.
OMC11
(RUN)
no,06
of
the
test
pefor~ed.
PUN
(1316)
OMC~OO·OMCR17
OMSTOO-OMST17
(t500)-(1640)
8.4A
These loeations contain the information needed
to test up to 16 (d~cim~l) OMC11a sequentialy,
they contain the
CSP,VECTOP
and
STATUS
concerning the configuration of each OMCll,
DMACTV (1308)
Each bit let In thll location indicate, that
the associated OMC11 w1l1 be tested in turn,
EXAMPLES (OMACTV) 1276/0000000000011111 means
that OMCll no, 00,01,02,03,04 will be tested.
EXAMPLE I (DMACTV) 1276/0000000000010001 Means
that DMC11 no. 00,C4 w1l1 be teated.
OMCSR
Contains the CSP of the
telt.
(1404)
current
OMC11
under
'STATUS TABLE' (1500-1640)
The table is filled by AUTO SIZING or by the manual parameter
input (Questions) as described previously. Also it des1red by
user, the locations ~ay be altered by hand (tOQqled In) to
suit the specific confi9uration.
examPle status map Shown beloW contains tn~or~ation for
two OMClt·S.
the table can eo~taln up to 16 OMC11~S.
Followina the ~8P Is a description of the bits for each map
T~e
entry
~AP
PC
~01500
~01510
OF DMC11 STATUS
STAT2
STAT)
160010 145310
177777
160020 016320
000000
000000
000000
CSP
STATt
.....
PAGEl
0010
Page 11
Each m~p entry contalns 4 words which contaln the status
inform6tlon for 1 OMCll. The PC shows where In core memory
the first of the 4 words Is. In the example abov~ the first
DMC'S ~tatus Is in locations, 1500, 1502, 1!04, and 1506, The
second DMC status Is located at 1510~ 1512, 1514, and 1516,
The information contained in each 4 word entry Is defined as
follOW~1
eSPI
Contains OMCll CSR address
STATI.
BITS 00-09 IS OMC11 VECTOR ADDRESS
BIT1Sz1 MICRO-PROCESSOR HAS CRAM
SITI5=0 MICRO-PROCESSOR HAS CROM
81T14-1 TURNAROUND CONNECTOR IS ON
81T14-0 NO TURNAROUND CONNECTOR
~tT13-0 LINE UNIT IS AN M8201
8tT13al LINE UNIT IS AN M9202
BIT12-1 NO LINE UNIT
BITS 09-11 IS DMCt1 8R PRIORITY LEVEL
STAT21
LOW BYT! IS SWITCH PACt1 CODCMP LINE NUM8!R)
HIGH BYTE IS SWITCH PACt2 (BMA73 BOOT ADD)
STAT3.
BITO~l
PERFORM FREE RUNNING TESTS ON KMC
(mu.t be let manuallY. SEE TEST ~O)
PAGEl
0011
Paoe 12
~FTHOD
OF AUTO SIZING
FINDING TijE CONTROL STATUS REGISTEP.
The auto-sizing routine finds a DMCll as followsl
It
starts
at address 160000 and tests all address in increments of to up
to and including address t67160, If the address doe. not tl~e
out, the following 1s done, the first CPOM address i, written
to a 125252 then it 1s read back. It it contains a - l o r
125252 or 63220 a DMCll or KMCtl haS been found, if not, the
address is updated by 10 and the search continues,
A -I
indicates a OMCtl with no CROM, a 125252 Indicates a ~MCtl
with CRAM and a 63220 indicates a OMC11 with the DDCMP CROM,
Further tests are performed at this point to deter~ine which
line unit, if any, II installed, if a loop-back connector Is
installed and various switch settings on the line unit, THIS
IS WHY THE STATUS TABLE MUST BE VEPlrIED BY THE USER AND IF
ANy OF THE InFORMATION DOES NOT AGREE WITH THE HARDWAPE THE
DIAGNOSTIC MUST BE RESTARTED AND THE QUESTIONS MUST BE
ANSWERED,
All DMC11'. 1n the SYltem will be found by the
auto-sizer. If it does not find a OMC11 the diagnoltic mUlt
be restarted and the queltlonl answered.
FINDING THE VECTOR AND BR LEVEL
The vector area (addrels 300-"6) il filled
with
the
instruction lOT and ',+2' (next addre,s),
The processor
status 11 started at , and the ONC 1s proqrammed to 1nterrup~,
The PS 11 lowered by 1 until the OMC 1nterrupts, a delay 11
made and if no interupt occures at PS level 3 (because of a
bad DMC11) the proqra~ assumes vector addfels 300 at BR level
5 and the prOblem should be f1xed 1n the diaqnostic. Once the
problem i. fixed, the program should be re-Ietup again to qet
correct vector. If an Interupt occured, the address to wh1ch
the DMC11 tnterupte~ to is picked up and reported al the
vector. NOT!, it the vector reported 11 not the vector set
uc by you, there Is a problem and AUTO SIZING should not be
done.
8,6
SOFTWARE SWITCH PEGISTER
If the diagnostIc is run on an 11/04 o~ other CPU without 8
switCh register then a software switch regIster Is used to
e110w user tne same ,.itCh options as descrIbed previouslY,
If the herdware switch regIster does not exIst or If one does
end it conte!", all ones (177~77) this software switCh
register Is used.
Controll
To obtain control at any allowable time durIng execution of
th~
dlaQnostlc the operator types a CTRL G on the console
ter~inal keyboard.
As soon as the CTPL G Is recognIzed, by
the dlaQnostlc, the fOllowing message w111 be displayed,
PACEa
0012
Page 13
SWR=XXXXXX NEW?
Where XXXXXX i5 the current contents of the software switch
reQister In octal,
The software control routine will then
await operator action, At which time the operator is required
to type one or more of the legal characters: 1) 0 • 7, 2)
line feed«LF», 3) carriage return«CP», or 4) control-U
(CTPL U).
NO check Is made for leqality. If the Input
character ts not 8 , , or CTRL U it Is assumed to be
an octal diQlt.
To change the contents of the SSR the op~rator simply types
the new desired Value in octal • leading zeros need not be
typed, And term1nates the input string with a or
depending on the ~rogram act10n deSired as descr1bed below,
The Input value Will be truncated to the last 6 digits typed.
At least one diolt must be typed on any given input string
prior to the terminator before a change tC) the SSR will occur.
When the Input string 11 terminated with a the diagnostic
will continue execution from the point at Which it was
interrupted. If a is the only thing typed the program
will continue without changing the SSP, The differs from
the by restarting the program as 1t It were restarted at
address 200,
If a CTRL U is typed at any point In the Input strtng prior to
the t~rmlnator the input value will be disregarded and the
prompt displayed (SWR
XXXXXX NEW?).
=
To set the ssp tor· the starting switches, first load
dlaqno~tlc, then hit CTPL G, then start the diagnostic.
the
PAGEl
0013
DZDMH
LST
DECDOC VER
DOCUMEN1'
**********.***
DZDMH
r"ST
**************
COPYRIGHT 1976
DIGITAL EQUIPMENT CORPORATION
~AYNAPO, ~ASS. 01754
00.04
14 .. 0EC-76 16.37
PAGE 01
PAGEl
0014
DZOMH
DECDCC VER
LS1
6
MAI~DEC·lt-OZDMij.A
00,n4
OMCtl LOCAL CROM, JUMP, AND FREE RUNNING TESTS
EQUIPMENT CORP., MAYNARD, MASS. 01154
.--.....•.........•.......•......
-..•....... __ ........ __ ...I_. ____ ..
COPYRIGHT 1976,
14-DEC-76 16137
DIGIT~L
1626
************************** TEST 1 ***************************
TEST OF BR RIGHT SHIFT
VERIFY THAT A DEST OF 8R RSH (011) OF A MICRO-INSTRUCTION
SHIFTS THE RESULTING SP D~TA RIGHT ONCE,
1666
************************** TEST 2 ***************************
lOP CRAM WRITE/READ TEST
'LOAT A 1 THROUGH EACH CRAM LOCATION
1700
************************** TEST J ***************************
lOP CRAM WRITE/READ TEST
FLOAT A 0 THROUGH EACH CRAM LOCATION
1737
************************** TEST 4 ***************************
lOP CRAM DUAL ADDRESSING TEST
WRITE EACH ADDRESS INTO ITSELF, READ EACH
ADDRESS TO VERIFY CORRECT ADDRESSING
1793
*************************u TEST 5 ***************************
top C~AM READ TEST
THIS TEST WRITES THE CRAM WITH THE CROM MICRO-CODE MAP
THEN READS IT BACK AND COMPARES EACH ADD~ESS WITH THE
DUPLICATE or THE CROM MICPO-CODE.
1820
************************** TEST 6 ***************************
lOP MAIN MEMORY TEST
FLOAT A 1 THROUGH ALL MAIN MEMORY LOCATIONS
1866
************************** TEST 7 ***************************
lOP MAIN MEMORY TEST
FLOAT A 0 THROUGH ALL MAIN MEMORY LOCATIONS
1Qt4
*************************~
lQS2
************************** TEST 11 ***************************
lOP MAR TEST
PERFORM DUAL AODRESSING T~ST
USING MAR AUTO-INC FEATURE
2022
************************** TEST 12 *************~*************
lOP (CRAM) aDT BITS TEST
LOAD MAR WITH A 0 INC MAR UNTIL IT OVERFLOWS (2000 TIMES)
VERIFY THAT IBUS* 10 BIT5 IS SET ONLY WHEN MAR BIT e IS A ONE
AND THAT IBUS* 10 81T6 IS SET ON MAR OVEPFLOW(2000)
TEST 10 ***************************
lOP MAIN ME~ORY DUAL ADDRESSING TEST
LOAD EACH MEMORY LOCATION WITH ITS OWN ADDRESS
R~AD BACK EACH LOCATION TO VERIFY CORRECT ADDRESSING
~
PAGE 02
PAGEl
0015
DZDMH
LST
DEcooe VER
00,04
2083
*******************.****** TEST 13 ***************************
CPOM READ TEST
THIS TEST PEADS EACH ROM LOCATION AND COMPARES
2096
IT TO A SOFTWARE DUPLICATE OF THE CROM. THIS TEST
ALSO TESTS TH~ JUMP!r) ~ICPO-PROCESSOR INSTRUCTION.
2132
************************** TEST 14 ***************************
CPOM TEST OF JUMPe!) NEVEP MICRO-PROCESSOR INSTRUCTION.
PERFORM THE JUMP INSTRUCTION
VERIFY THAT THE JUMP DIO NOT OCCUR BY READING
THE CONTENTS OF THE NEW ROM PceIT SHOULD INCREMENT BY ONE).
2189
************************** TEST 15 ***************************
CRaM TEST or JUMP(I) ALWAYS MICRO-PROCESSOR INSTRUCTION.
PERFORM THE JUMP INSTPUCTION
VERIFY THE JUMP BY READING THE CONTENTS OF THE NEW ROM PC
2242
************************** TEST 16 ***************************
CRaM TEST OF JUMpeI} ON C BIT SET MICRO-PPOCESSOR INSTRUCTION,
SET THE C BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP BY ~EADtNG THE CONTENTS OF THE NEW ROM PC
2298
************************** TEST 17 ***************************
CROM TEST OF JUMPeI) ON Z BIT SET MICRO-PROCESSOR INSTRUCTION,
SET THE ZBIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP BY READtNG THE CONTENTS or THE NEW ROM PC
2354
************************** TEST 20 ***************************
CROM TEST OF JUMP(I) ON BPO SET MICRO-PROCESSOR INSTRUCTION.
StT THE BRO BIT, PERFORM THE JUMP INSTRUCTION,
vtRIry THE JUMP BY READING THE CONTENTS or THE NEW ROM PC
2410
************************** TEST 21 ***************************
CROM TEST OF JUMPeI) ON BRl SET MICRO-PROCESSOR INSTRUCTION,
SET THE BRI BIT; PERFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP BY READING THE CONTENTS OF THE NEW ROM PC
2466
************************** TEST 22 ***************************
CROM TEST OF JUMP(I) ON BR4 SET MICRO-PROCESSOR INSTRUCTIO~.
SET TijE BP4 BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP BY READING THE CONTENTS OF THE NEW ROM PC
2522
************************** TEST 23 ***************************
257q
************************** TEST 24 ***************************
CROM TEST OF JUMP{I) ON C aIT SET MICRO-PROCESSOR INSTRUCTION.
CLEAR THE C BIT, PERFORM THE JU~P INSTRUCTION,
VERIFY THAT THE JUMP DID NOT OCCUR BY REAOING
THE CONTENTS OF THE NEW ROM PCCIT SHOULD INCREMENT BY ONE),
TEST OF JUMper) ON BR7 SET MICRO-PROCESSOR INSTPUCTION.
SET THE BR7 BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP BY READI~G THE CONTENTS OF THE NEW ROM PC
CRO~
14-DEC-76 16&37
PAGE 0)
PAGE:
0016
DZDMH
DEcnoe VER
LSI
00.04
2635
************************** TEST 25 ***************************
CROM TEST or JUMP(I) ON Z BIT SET MICRO-PROCESSOR INSTRUCTION.
CLEAR THE Z BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THAT THE JUMP DID NOT OCCUR BY READING
THE CONTENTS OF THE NEW ROM PcelT SHOULD INCREMENT BY ONE),
2692
************************** TEST
26
***************************
2749
************************** TEST
27
***************************
2806
************************** TEST 30 ***************************
CPOM TEST or JUMP(I) ON SP4 SET MICRO.PROCESSOR INSTRUCTION,
CLEAR THE BR4 81T, PERFORM THE JUMP INSTRUCTION,
VERIFY THAT THE JUMP DID NOT OCCUR AY READING
THE CONTENTS OF THE NEW ROM pceIT SHOULD INCREMENT BY ONE),
2863
************************** TEST
CROM TEST or JUMPeI) ON 8R7 SET MICRO.PROCESSOR INSTRUCTION.
CLEAR THE 8R1 BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THAT THE JUMP DYD NOT OCCUR BY READING
THE CONTENTS OF THE NEW ROM PC(lT SHOULD INCREMENT BY ONE).
2920
************************** TEST 32 ***************************
CRAM TEST OF JUMP(I) NEVER ~ICRO.PROCESSOR INSTRUCTION.
PERFORM THE JUMP INSTRUCTION
VERIFY THE JUMP 010 NOT OCCUR BY CLOCKING THE INSTRUCTION
IN THE LOCATION IT IS AT. THIS INSTRUCTION LOADS THE
BR WITH THE LOWEST 8 BITS OF THE CRAM PC, AT THIS POINT
2926
THE BR DATA IS MOVED TO PORT4, IF THIS DATA IS CORRECT
THE CRAM PC IS CORRECT, IF THE CRAM PC IS NOT RIGHT,
THEN PORT4 CONT~INS A 37
298?
************************** TEST 33 ***************************
CRAM TEST OF JUMPer) ALWAYS MICRO-PROCESSOR INSTRUCTION.
PERFORM THE JUMP INSTRUCTION
VERtFY THE JUMP 010 OCCUR BY CLOCKING THE INSRUCTION
IN THE LOCATION IT IS AT, 1HI5 INSTRUCTION LOADS THE
BR WITH THE LOWEST A BITS OF THE CRAM PC. AT THIS POINT
THE BR DATA IS MOVED TO POPT4, IF THIS DATA IS CORRECT,
THE JUMP WAS SUCCESSFUL, IF THE JUMP WAS UNSUCCESSFUL
THEN PORT4 WILL CQNT~IN A 37
CROM TEST or JU~P(I) ON BRa SET MICRO-PROCESSOR INSTRUCTION,
CLEAR THE BRO BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THAT THE JUMP 010 NOT OCCUR BY READING
THE CONTENTS OF THE NEW ROM PcelT SHOULD INCREMENT BY ONE).
CROM TEST OF JUMPeI) ON BRt SET MICRO-PROCESSOR INSTRUCTION,
CLEAR THE BRt BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THAT THE JUMP 010 NOT OCCUR BY READING
THE CONTENTS OF THE NEW ROM PcerT SHOULD INCREMENT BY ONE),
31
***************************
PAGE 04
PAGEl
0017
OZDMH
LST
DECDOC VER
3041
************************** TEST
34
00,04
***************************
TEST OF JU~P(I) ON C BIT SET MICRO-PROCESSOR INSTRUCTION.
SET THE C BIT, PERFORM THF JUMP INSTRUCTION,
VERIFY THE JUMP DID OCCUR BY CLOCKING THE INSRUCTION
IN THE LOCATION IT IS AT, THIS INSTPUCTION LOADS THE
SR WITH THE LOWEST e BITS OF THE CRAM PC. AT THIS POINT
THE BR DATA IS MOVED TO POPT4. IF THIS DATA IS CORRECT,
TH! JUMP WAS SUCCESSFUL, IF THE JUMP WAS UNSUCCESSFUL
THEN PORT4 WILL CONTAIN A 17
CRA~
3103
************************** TEST 35 ***************************
CRAM TEST or JUMP(I) ON Z BIT SET MICRO-PROCESSOR INSTRUCTION.
SET THE Z BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP DID OCCUR BY CLOCKING THE INSRUCTION
IN THE LOCATION IT IS AT. THIS INSTPUCTION LOADS THE
BR WITH THE LOWEST 8 BIT8 OF THE CRAM PC, AT THIS POINT
THE BR DATA IS MOvtD TO PORT4. IF THIS DATA IS CORRECT,
THE JUMP WAS SUCCESSFUL, IF THE JUMP WAS UNSUCCESSFUL
THEN PORT4 WILL CONTAIN A 37
3165
************************** TEST 36 ***************************
CRAM TEST OF JUMP(I) ON BRO SET MICRO-PROCESSOR INSTRUCTION.
SET THE BRO BIT, PEPFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP DID OCCUR BY CLOCKING THE INSRUCTION
IN THE LOCATION IT IS AT. THIS INSTPUCTION LOADS THE
BR WITH THE LOWEST 8 BITS OF THE CRAM PC. AT THIS POINT
THE BR DATA IS MOVED TO PORT4, IF THIS DATA IS CORRECT,
THE JUMP WAS SUCCESSFUL, IF THE JUMP WAS UNSUCCESSFUL
THEN PORT4 WItL CONTAIN A 37
3227
************************** TEST 37 ***************************
CRAM TEST OF JUMPCI) ON BRt SET MICPO.PROCESSOR INSTPUCTION,
SET THE BRt BtT, PERFORM THE JU~P INSTRUCTION,
VERIFY THE JUMP DID OCCUR BY CLOCKING THE INSRUCTION
IN THE LOCATION IT IS AT. THIS INSTPUCTION LOADS THE
SR WITH THE LOWEST 8 BITS OF THE CRAM PC. AT THIS POINT
THE BR DATA IS MOVED TO POPT4. IF THIS DATA IS COPPECT,
THE JUMP WAS SUCCESSFUL, IF THE JUMP WAS UNSUCCESSFUL
THEN PORT4 WILL CONTAIN A 37
3289
************************** TEST 40 ***************************
CRAM TEST OF JUMPCI) ON BR4 SET MTCPO-PROCESSOR INSTRUCTION.
SET THE BR4 BIT, PERFOPM THE JU~P INSTRUCTION,
VERIFY THE JUMP DID OCCIlR BY CLOCKING THE INSPUCTION
IN THE LOCATION IT IS AT. THIS INST~UCTIO~ LOADS THE
SR WITH THE LOWEST 9 BITS OF THE CRA~ PC. AT THIS POINT
THE BR DATA IS MOVED TO PORT4. IF THIs DATA IS CORPECT,
THE JUMP WAS SUCCESSFUL, IF THE JUMP WAS UNSUCCESSFUL
THEN PORT4 WILL CONTAIN A 37
PAGE 05
PAGE.
0018
DZD~H
DECDOC VgR
LST
00.04
3351
************************** TEST 41 ******-********************
CRAM TEST OF JUMPeI) ON BP7 SET MICRO-PROCESSOR INSTRUCTION.
SET THE SR7 BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP DID OCCUP BY CLOCKING THE INSRUCTION
IN THE LOCATION IT IS AT. THIS INSTRUCTION LOADS THE
BR WITH THE LOWEST 8 B1TS or TH[ CRAM PC. AT THIS POINT
THE BR DATA IS MOVED TO POPT4. IF THIS DATA IS CORRECT,
THE JUMP WAS SUCCEssrUL, IF THE JUMP WAS UNSUCCESSFUL
THEN PORT4 WILL CONTAIN A 37
3413
************************** TEST 42 ***************************
CRAM TEST or JUMP(I) ON C BIT SET MICRO-PROCESSOR INSTRUCTION.
CLEAR THE C BIT, PERFORM THE JUMP INSTRUCTION,
VEPIFY THE JUMP DID NOT OCCUR AY CLOCKING THE INSTRUCTION
IN THE LOCATION IT IS ~T4 THIS INSTRUCTION LOADS THE
BR WITH THE LOWEST 8 BITS OF THE CRAM PC, AT THIS POINT
THE BR DATA IS MOVED TO PORT4. IF THIS DATA IS CORRECT
THE CRAM PC IS CORRECT, IF THE CRAM PC IS NOT RIGHT,
THEN PORT4 CONTAINS A 37
3475
************************** TEST 43 ***************************
CRAM TEST OF JUMP(I) ON Z BIT SET MICRO-PROCESSOR INSTRUCTION.
THE Z BIT, PERFORM THE JUMP INSTRUCTION,
VERI'Y THE JUMP OlD NOT OCCUR BY CLOCKING THE INSTRUCTION
IN THE LOCATION IT IS AT. THIS INSTRUCTION LOAOS THE
BR WITH THE LOWEST 9 BITS or THE CRAM PCB AT THIS POINT
TH! BR DATA IS MOVED TO PORT4. IF THIS DATA IS CORRECT
THE CRAM PC IS CORRECT, IF THE CRAM PC IS NOT RIGHT,
THEN PORT. CONTAINS A 37
C~EAR
*************************.~ TEST 44
***************************
35)1
TEST or JUMP(I) ON BRO SET MICRO-PROCESSOR INSTRUCTION.
CLEAR THE BRO BIT, PERFORM THE JUMP INSTRUCTION,
VERIrY THE JUMP DID NOT OCCUR BY CLOCKING THE INSTRUCTION
IN THE LOCATION IT IS AT. THIS INSTRUCTION LOADS THE
3542
BR WITH THE LOWEST 8 BITS 0' THE CRAM PC. AT THIS POINT
THE BP DATA IS MOVED TO PORT4. tF THIS DATA IS CORRECT
THE CRAM PC IS CORRECT, IF THE CRAM PC IS NOT RIGHT,
THEN PORT4 CONTAINS A 37
3599
C~A~
*************************. TEST 45 *************+*************
CRAM TEST or JUMPCI) ON BR1 SET MICRO-PROCESSOR INSTRUCTION.
CLEAR THE BR1 BIT, PERFORM THE JU~P INSTRUCTION,
VERIFY THE JUMP DID NOT OCCUR BY CLOCKING THE INSTRUCTION
IN THE LOCATION IT IS AT. THIS TNSTRUCTION LOADS THE
BR WITH THE LOWEST e BITS OF THE CRAM PC, AT THIS POINT
, THE BR DATA IS MOVED TO PORT4, IF THIS DATA IS CORRECT
THE CR~M PC IS CORRECT, IF THE CRAM PC IS NOT RIGHT,
THEN PORT4 CONTAINS A 37
PAGE 06
PAGEl
0019
DZOMH
LST
DECOOC VEP
00,04
3661
************************** TEST 46 ***************************
CPAM TEST OF JUMPeI) ON BP4 SET ~ICRO.PROCESSOR INSTRUCTION.
CLEAR THE BR4 BIT, PERFORM THE JUMP INSTRUCTION,
VERIFY THE JUMP DID NOT OCCUR BY CLOCKING THE INSTRUCTION
IN THE LOCATION IT IS AT, THIS INSTRUCTION LOADS THE
BR WITH THE LOWEST 8 BITS OF THE CRAM PC. AT THIS POINT
THE BR DATA IS MOVED TO PORT4, IF THIS DATA IS CORRECT
THE CRAM PC IS CORPECT, IF THE CRAM PC IS NOT RIGHT,
THEN PORT4 CONTAIN5 A 37
3723
************************** TEST 47 ***************************
CRAM TEST or JUMP(l) ON BR1 SET MICRO-PROCESSOR INSTRUCTION.
CLEAR THE SR7 BIT, PER'OR~ THE JUMP INSTRUCTION,
VERI'Y THE JUMP DIt; NOT OCCUR BY CLOCKING THE INSTRUCTION
IN THE LOCATION IT IS AT, THIS INSTRUCTION LOADS THE
BR WITH THE LOWEST 8 BITS or THE CRAM PC, AT THIS POINT
THE BR DATA IS MOVED TO PORT4, IF THIS DATA IS CORRECT
THE CRAM PC IS COR~ECT, IF THE CRAM PC IS NOT RIGHT,
THEN PORT4 CONTAINS A 31
3785
************************** TEST
50
***************************
3960
******************.******* TEST
51
***************************
4016
******************.,******* TEST 52 ***************************
4065
************************** TEST 53 ***************************
411t
**************.***.******* TEST 54 ***************************
FREE RUNNING 'LAG MODE DATA TEST
TRANSMIT A MESSAGE AND VERIFY THE RECEIVED DATA
IF NO TURNAROUND CONNECTOR IS ON LINE UNIT LOOP IS SET,
ALL FOLLOWING TESTS ARE FREE RUNNING AND ARE PERFORMED
ONLY ON DMC'S WITH LINE UNITS, IF YOU WISH TO PERFORM
THESE rREE RUNNING TESTS ON A ~MC (NORMALLY THE 'REE RUNNING TESTS
WILL rAIL ON A KMC, THE TI"ER IS TOO FAST) THEN YOU MUST
MANUALLY SET 8ITO OF STAT) IN THE STATUS MAP,
OVERUN TEST
IN FREE RUNNING MODE SEND MESSAGE WITH NO RECEIVE
BUFFER AVAILABLE, VERIFY THAT AN OVERRUN ERROR OCCU~S
LOST DATA TEST
IN FREE RUNNING MODE SEND A MESSAGE LONGEP THAN THE RECEIVE
BUFFEP, VERIFY THAT A LOST DATA EPROR OCCURS,
NON-EXISTENT MEMORY TEST
IN FREE RUNNING Mor,E, LOAD A TPANSMIT BA THAT WILL TIME OUT
VERIFY THAT A NON-EXISTENT MEMO~Y ERROR OCCURS
TRANS~IT
RECEIVE NON-EXISTENT MEMORY TEST
IN FREE RUNNING MODE, LOAD A RECEIVE BA THAT WILL TIME OUT
VERIFY THAT A NON-~XISTENT MEMORY ERROR OCCURS
PAGE 01
PAGEl
0020
DZOMH
LST
DECDDC VER
00.04
************************** TEST
55
***************************
4204
************************** TEST
56
*************.'*************
4248
************************** TEST
S7
***************************
4289
************************** TEST 60 ************************.'**
4160
PROCESSOR ERROR TEST
IN FREE RUN~ING MODE, DO A BASE TPANSFER REQUEST AFTER A
BASE HAS BEEN SET Up, VERIFY THAT A PROCESSOR ERROR OCCURS.
PROCESSOR ERROR TEST
IN FREE RUNNING MODE DO A RQI WITH AN ILLEGAL 10 CODE
VERrFY THAT A PROCESSOR ERROR OCCURS
HALF DUPLEX TEST
IN FREE RUNNING MODE, SET HALF DUPLEX AND L U LOOP
SEND A MESSAGE AND VERIFY THAT THERE ARE NO DONES
FREE RUNNING DATA TEST (INTERRUPT DRIVEN ~XERCISER)
THIS TEST REPEATEDLY QUEUES UP , RECEIVE BUFFERS AND
, TRANSMIT BU'FERS AND CHECKS DATA WHEN ALL 7 BurFERS
ARE RECEIVED. TRANSMIT COUNTS RANGE FROM i TO 104, ALSO
000 AND EVEN TRANSMIT AND RECEIVE SA'S ARE USED, DATA
IS A BINARY COUNT PATTERN. THE RESUME FUNCTION IS CHECKED IN THIS TEST
PAGE 08
PAGE.
0021
OZOMH
HlICYll 27C 1(06)
14-0EC-76
09-DEC-76 14159
DZOMH .Plt
16132 PAGE 2
INTRODUCTION TO DMCll OIAGNOSC'l'IC
PAGEl
0022
,*MAINDEC-l1-DZDMK-A
ONCO LOCAL CROM, JUMP, lIND FREE RUNNING TESTS
,*COPYRIGHT 1976, DIGITAL EQUIPMENT CORP •• MAYNARD, MASS. 01754
! •• -- .... ••• -I!!'~"
B
9
10
11
12
_•• ___ •• _._ •• _--••••••••••• _••••••••••••••• --. - ••••••••
,STARTltlG PROCEDURE
I LOAD PROGRAM
:LOAD ADDRESS OOO~OO
1';
:SW~.,o
14
15
,SII0'7-1 USE CURRENT DNCll PARAfoIETERS
: SWOO_1
INPUT NEIf OMC11 PARlMETEllS
I PRESS START
,PROGRAM WILL TYP! -MAINDEC-l1-DZDMH-A
DMCll LOCAL CROM, JUMP, AND FREE RUNNIN
,PlIOGRAM WILL TYPE STATUS MAP
,PROGRAM WILL TYPE -R- TO INDICATE THAT TESTING HAS STARTED
,AT THE END OF A PASS, PROGlIAJI WILL TYPE PASS COMPLETE MESSAGE
,AKD THEN RESUME TESTING
J SUBSEQUENT RESTARTS WILL NOT TYPE PROGRAM' TI'1'LE
Hi
17
t8
19
20
2122
lUTOSlZE DitcH
23
24
25
26
,SWITCH lIEGISTER OPTIONS
27
,.......................
~8
29
30
31
32
100000
040000
020000
010000
01)4000
002000
001000
OO!l400
o0020n
000100
000040
000020
000010
000004
000002
000001
B
H
30;
36
37
H
3Q
40
41
42
4s
44
40;
DZrf<.H
Mr.CYl1 27(1006)
14-DEC-76
09-0EC-76 141 S9
DZIWH. Pl1
,sl • HALT ON EPROP
,=t,LOOP ON CURRENT TEST
,sl, INHIBIT ERROR TYPEOUT
,= 1, DELETE TYPEOUT IBELL ON ERROR.
,-1, INHIBIT ITERATIONS
, .. t,ESCAPE TO NEXT TEST ON ERROR
:st,LOOP WITH CURRENT DATA
,=1, LOOP ON ElIROR
,"I,USE CURRENT DMC11 PARAMETERS, ",O,AUTOSIZE DMC11
,al. HALT BEFORE CLOCKING MICRO-PROCESSOR INSTRUCTION
SII15"100000
S1I14-40000
SII13"20000
SW12-10000
SW11.,4000
SW10_2000
S1I09"1000
SWOea400
S~07"200
8W06=100
S1I05=40
S1I04-20
81103_10
50102 .. 4
51101=2
SWOO=l
,RESELECT DMCl1'S TO BE TESTED (ACTIVE)
jLOCK ON TEST aZLECT
,RESTART PROGlIAM AT SELECTED TEST
,INPUT DMCll PARAMETERS
16132 PAGE 1
GENElIAL DEFINATIONS AND EQUIVALENCIES
41.
47
DEFINITIONS
,,PEGISTER
...................
.
48
4'1
0;0
S!
'52
53
54
S'5
0;6
57
5~
000000
000001
01)0002
000003
000004
000005
000006
000007
RO"M
1'1.'1
R2.,n
R3c:\3
1'4-\4
RS:r:,S
SPsU
PC.,,,
,CENERAL REGISTER
,GENERAL REGISTER
rGENElIAL REGISTER
,GENERAL REGISTER
,<:ENERAL REGISTER
,GENERAL lIEGISTER
,PROCESSOR STACK POINTER
J PROGRAM COUNTER
5'1
I.n
rLOCATION EQUIVALENCn:S
,......................
61
62
63
64
65
177776
001200
PSIII17776
STACK"120C
J PROCESSOR STATUS WORD
,START OF PROCESSOR STACK
,ItfSTRUCTION DEFINITIONS
66
n05146
00'5726
010046
012600
024646
022626
J •• - •••• ~ •••••• 8
.........
PUSHiSPs5746
POP1Sp.S726
PUSHRO .. t 0046
POPRO=12600
PUSH2SP"24646
POP2SP:r:22626
.EQUIV EMT. HLT
iiORD
,DECREMENT PlIOCESSOR STACK
WORD
,INCREMENT PROCESSOR STACK
,SAVE RO ON STACK
,RESTORE 1'0 FROM STACK
,DECREMENT STACK TWICE
,INClIEJlENT STACK TWICE
,BASIC DEFINITION or ERROR CALL
,IlIT DEFINITIONS
,--------------100000
040000
020000
010000
004000
002000
(1)1000
000400
01')0200
(1)0100
000040
000020
0(0011)
1)1)0004
0,)0002
BIT15=100000
8IT14 .. 40000
OOOOO!
P-TTI'l=1
RT~D=20000
8IT12=10000
B1T11=4000
AIT10 .. 2000
iH19"1000
B118=400
1l1T7=200
BJT6=100
A1T5=40
B TT4=20
ktT3=10
B !T2=4
~IT1=2
PAGE:
0023
? ~GE 4
::RAPCATCHEI< FOR TjNEXPECTEC INTEI<12>/MAINDEC-U-OZoMH-A/<377>
IDMCll LOCAL CROM, JUMP, AMD rREE RUNNING TESTS/
.81200
139
139
140
141
142
143
, INDIRECT POINTEII! TO SWITCH IIEGISTER AND LIGHT DISPLAY
1··········_--·····································-··.
001200
1)01202
177570
171570
OZO"H
MACYII 27(1006)
14-DEC-76
DZO"H .PI 1
09-0EC-76 14159
IH
145
146
147
149
149
150
lSI
152
153
154
1'55
156
115'7
ISA
15C1
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
1 AI
'~2
I A3
194
IllS
I q6
I R7
188
IS9
I 110
1 III
192
193
194
I q~
1<16
DISPLAYt 177570
SWill
177570
16132 PAGE 5
PROGIIAM PAIIAMETERS, VARIABLES,
PAGEl
0025
AND TRAP CALLS.
INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS
,...............................
----_ ........ ----- ...
I
001204
001206
001210
001212
177560
177~62
177564
17'7566
TKCSRI
TItOBR.
TPCSRI
TPoBRI
1 '77560
177562
177564
1'77566
,TELETYPE KEYBOARD CONTROL REGISTER
r TELETYPE KEYBOARD DATA BUFFER
,TELEPRINTEP CONTROL REGISTER
,TELEPRINTER DATA BUrFER
,PROGRA~
CONTPOL PARAMETERS
,-_ ........................
.
001214
001216
001220
001222
001224
001226
001210
001232
001214
000000
000000
000000
000003
01)0000
000000
000000
000000
000000
: ~C~!'! ~!:"'1)!"" .. nil T·('!np ON TEST
,ADDRESS OF NEXT TEST TO BE txECUTED
,ADDRESS FOR LOCK ON CURRENT DATA
,NUMBER OF ITERATIONS THAT CURR!NT TEST
,NUMBER or ITEREATIONS COMPLETED
,NUMBER OF TEST IN PROGRESS
,NUMBER OF PASSES COMPLETED
,TOTAL NUMBER or ERRORS
,PC OF LAST ERROR CALL
i(i:t;iUi.
NEXTr
LOCKI
ICOUNT.
LPCNT.
TSTNO.
PASCNT,
ERRCNT,
LSTERR.
PROGRAM VAR I ABLES
,I ....
_-----_ ...-...
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000001
000000
000001
onOOOI
ol)oon I
(11'10001
5TRTSIoI,
STATI
CLKXr
MASKXt
TEMP1.
TEMP2.
TE14P3r
TF.MP41
TEMPSI
SAVPO.
SAVR11
SAVR2,
SIlVR31
SAVR4.
SJlVR5 :
S/lVSPr
SAVPC I
ZERO.
ONEr
"'f:MLIMr
OMACTV I
OMNUM I
SAVACT!
SA VNUI>,
ooonnO
llU~
001320
nOl472
Cll€II11.,
0'l1 !22
('\1'11 ".,.,
''Ttl(,
001236
001240
01)1242
001244
001246
01)1250
001252
001254
001256
001260
001262
001264
001266
001270
001272
001274
0012'76
001300
001302
001304
on 1306
001310
0'11312
001314
nO'316
:
,SWITCHES AT START OF PROGRAM
,DM STATUS WORD STORAGE
J TEMPORARY STOPAG£:
,TEMPORARY STORAGE
,TEMPORARY STORAGE
, TEMPORARY STORr.GE
,TEMPORARY STOFAGE
,RQ STORAGE
,R1 STORAGE
,R2 STORAGE
I R3 STORAGE
,R4 STORAGE
,R5 STOPAGE
,STACK POI NTER STORAGE
, PROGRAM COUNTER STORAGE
,BLKW
.BL~W
,,,T,l(W
,RLK w
(l
,HIGHEST LOCATION FOP NPR"S
,OMC11'S SELECTED ACTIVE.
,OCTAL NUMBEP OF OMC11'S.
,ORIGINU AeTV DEVICES
,'10RK ABLE NUMBER
I POINTER TO RUNN! "G DEVICE,
.~VE"J'
1''' ."AP- ...
C';'r ."ap-lj
: TM'LE PGIN"!'n;,
lTABLF POINTER
iIInr. "'E
DZDMH
MACYl1 27(1006)
14-DEC-76
DZDMH .Pl1
09.DEC-76 i4159
197
198
199
200
201
202
203
001324
001325
001326
000
INIfLGz .BYTE
!lOO
000
204
001327
000
ERRFLGI
LOKP'LGI
QV.'LGI
... -.......----- ......
001330
onl332
001334
12'
223
01)1336
7t'4
001340
725
226
(?7
on 1342
;>'1
232
?~3
?34
2 ~~
:nb
00\344
001346
(")1350
001352
001354
'37
231;
104400
OCl3506
104401
on3644
104402
003674
104403
003756
104404
0"4062
104405
219
BO
0.11 356
?~q
740
241
742
243
001360
744
001364
0013&2
004102
1"4406
004302
104407
004342
104410
004174
104411
004400
1(\4412
01'(5)70
104413
005340
i '-'44 j 4
00'>40';
104415
005454
104416
(1)5520
245
24(,
247
'53
"4
DEFINITIONS
.TRPTA81
SCOPEaTRAP+O
.SCOPE
SCOPlllTRAP+ 1
.SCOPI
T,{PElITRAP+2
.TYPE
1NSTRlITRAP+3
.INSTR
INSTERa:TRAP+4
.INSTER
PARAM=TRAP+5
.PARAM
SA VOS=TRAP+6
.SAV05
RES05-TRAP+7
.RES05
CONVRT"TRAP+I0
.CONVRT
CNVRTDTRA P+ 11
.CHVRT
!oISTCLR-TRAP+12
.MSTCLR
DELAYlITRAP+13
.DELAY
ROMC1!("'TPAP+!4
.ROMCLK
DATACLKdRAP+15
.DATACLK
TI"lERlITRAP+16
.TIIo!ER
,CALL TO SCOPE LOOp AND ITERATION HANDLER
,CALL TO LOOP ON CURRENT DATA HANDLER
,CALL TO TELETYPE OUTPUT ROUTINE
rCALL TO ASCII STRING INPUT ROUTINE
,CALI. TO INPUT ERROR HANDLER
,CALL TO NUMERICAL DATA INPUT ROUTINE
,CALL TO REGISTER SAVF. ROUTINE
,CALL TO REGISTER RESTORE ROUTINE
,CALL TO DATA OUTPUT ROUTINE
rCALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF.
,CALL TO ISUE A MASTER CLEAR
,CALL TO DELAY
,CALL TO CLOCK ROM ONCE
,CALL TO ct.K DATA
,CALL TO DELAY A CLOCK TICK
J .... -_ ........ -- ---._.- ---- .......... - ..... -_ .... -- ........................ -- ................................ --
, 1*********. **** •• *.* ••• **••• ****.**** *. ********** ******** *** **** *** **
DZD""
MACYll 27C 10(6)
14-DEC-76
DZIH'H,P11
09-DI';C-76 14:59
,1P
,-.\0:.1
2o;n
,51
7<;7
or
1 ***********************************************.***.*.******-**".***
,, ............
-_ ................ -.......---- ........ -- .... -.-- ... _.....-.
01)1310
22\
nil
1LOCK
IDEFINITIONS FOR TRAP SUBROUTINE CALLS
j ?CINTERS TO SUBROUTINES CAN BE FOUND
: IN THE TABLE IMMEDIATLY FOLLOWING THE
210:.1
no
,PROGRAM INITIALIZATION P'LAG
I ERROR OCCURED FLAG
ON CURRENT TEST FLAG
,QUICK VER IF! FLAG.
,ON FIRST pASS
EACH OMC 11 ITERAT!ONS WI1.L BE
.BYTE
.BYTE
.BYTE
.EVEN
tOQ
'18
16132
PAGE 7
PROGRAM PARAMETEPS,
PAGE I
VARIABLES,
AND TRAP CALLS.
:DMCl1 CONTROL INDICATOPS FOR CURRENT DMCll UNDER TEST
J -- •• ----- .---- . . . . . . . . . . . . -- ••••••••• _._--- --------1)()13E!6
no 1 ~70
ne)\ 372
000000
OnCOOQ
000000
STAT1,
STAT21
STAT31
?<;o;
-........... -...... --........ -..... ---------
25~
,DMCl1 VECTOR AND REGISTER INDIRECT POI liTERS
'57
:
75'l
,r;9
LbO
'b \
?1i2
7€13
2"4
?65
?<,,,
267
001374
n!'I376
01)1400
nOl402
001404
001406
001410
001412
001414
000000
001'1000
000000
onooOO
()"OOOO
0001)00
000000
000000
0"0000
'-6~
76'l
270
771
772
CMRVECI
D"lRLVL:
D'lTVEC,
DMTLVLI
DMCSRI
DtI
,QR
0(11530
1'101';37
001534
01)1'53 ..
,CONTROL 5T~iU5 R.. GISTER FOR DMCli NUMBER 03
I VECTOR FOR DMC 11 NlIMBER 03
,ODCMP LI NE. FOR DMCll NU"'BER 03
,3RD STATUS WORD
0"0001
1)00001
0')1'1,'01
D"CP04
I)"S104
,?LKW
(1'~S204
,F!LlCw
,BLlC\91
''13
:;>0:.14
2'1"
79b
?97
0(11)001
MIOOO!
,QLKW
iCC;;oJTROL S!A'!'UE
REG!5T~~
FOR
D~C!
1 NUMBER 01
"'UMBER 02
?'l'l
Vl(!
3n 1
0026
,PROGRAM CONTROL FLAGS
;
205
206
207
208
210
211
212
213
214
215
21';
217
PAGE:
16132
PAGE
PROGRAM PARAMETERS, VAP-IABLES, AND TRAP CALLS.
0(11
1)('1
4()
42
ln~
no, 44
, 13
l)lj
1
46
,CONTROL STATUS PEGISTEP FOR OMC11 NUMBER 04
I VECTI"JR FOR O"lCII NUMRER 04
,DDCM? LINE' I"OP DMCll NU"lBER 04
: 3RD STATUS ,WORD
0027
MACYl1 27 (11)06)
14-0£:C-76
OZD"H
09-[lEC-76 141 S9
OZD'IH.Plt
304
305
306
301
308
30Q
310
311
312
113
314
115
3t6
~t 7
16132
PAGE 8
PIIOGRAM PAPAMETEPS, VARIABLE!, AND TPAP CALLS,
PAGEl
001550
001552
001554
001556
000001
000001
000001
000001
OMCP051 ,BLKW
014S105. .BLKW
DMS205, ,BLKW
DMs)05i ,BLKW
,CONTROL STATUS REGISTER rOR OMCll NUMBER 05
,VECTOR rOR DMCll NUMBER 05
,DDCMP LINE. rOR DMCl1 NUMBER 05
,HID STATUS WORD
001560
001562
001564
001566
000001
000001
000001
000001
DMCR06J
DMS106t
DM5206.
OMSl06.
,BLKW
.BLICW
.BLKW
.BLICW
,CONTROL STATUS PEGISTER rOR DNCll NUMBER 06
, VECTOR rOR DMC 11 NUMBER 06
,DDCMP LINt. P'OR DMCll NUMBER 06
,lRD STATUS WORD
001570
001571
001574
001576
000001
000001
000001
000001
OlolCR07 •
OMS1071
OMS2071
OMS30'71
• BLKIt
.BLICIt
,BLICW
,BLKW
,CONTROL STATUS REGISTER rOR DMCll NU148ER 07
, VECTOR rOR OMCl1 NUMBER 07
,DDCMP LINE. FOR DMC11 NUMBER 07
,3RD STATUS WORD
001(,00
001602
001604
01)1606
000001
01)(')001
000001
000001
DMCRtO,
O"'SHOI
DIo4S2101
DMS1101
,BLItW
,8LJ(W
.BLKW
.BLKW
,CONTROL STATUS REGISTER rOR OMCU NUMBER 10
, VECTOR rOR DMC 11 NUMBER 10
,DDCMP LINE. rOR DMcn NUMBE" 10
,lRD STATUS WORD
001610
01)1612
001614
001616
(')00001
(!OOOOI
0(10001
000001
DMCRlll .Bt-ICW
OJlS111 t .BLJ(W
0"'52111 .BLItW
OMUS11 .BLICW
,CONTROL STATUS REGISTE" P'OR OMCU NUMBER 11
,VECTOR P'OR DMCl1 NU!IIBER 11
,DOCMP LINE' P'OR OMCll NUMBER 11
,lRO STATUS WORD
001620
1)01622
001624
001626
000001
1\00001
onOOOI
000001
DMCR12 •
OMS112.
0145212 •
• 8LKW
.8LICW
• BLKW
.8LKW
,CONTROL STATUS REGISTER rOR OMCll NUMBER 12
,VECTOR rOR DMC 11 NUMBER 12
,DDCMP LINE. P'OR DMCll NUMBER 12
,3!!D STUUS WORD
001630
(\'11632
1)01634
001636
I)(looot
ooonOl
000001
000001
OMCRU, .BLK'"
DMSI13 • • 8LKIt
0"'5213. ,BLKW
DHS1U • • 8Lltw
,CONTROL STATUS REGISTER rOR DIoIC11 NUMBER 13
,VECTOR P'OR DMC 11 NUMBE!! 1l
,DDCMP LINE' rOR Olo4Cll NUMBER 13
,3RD STATUS WORD
3]9
340
HI
0(')1640
001642
342
001644
H~
001646
01)0001
000001
000001
000001
OMCR14 •
DMS114,
D145214 1
DMS114 •
• BLKW
,!lLKIl
.8Lltlt
• BLKW
,CONTROL STATUS REGISTER rOR OMClt NUMBER 14
,VECTOR P'OR DMCll NUMBER 14
,DDCMP LINEt FO!! DMCll NUMBER 14
, lRD STATUS WORD
001650
00\652
001654
1'11)1656
ooonOl
000001
000001
0')0001
OlolC"15,
010'5115.
OMS215.
OlolS315.
.BLKIt
,BLKW
,BLICIt
.BLJ(W
,CONTROL STATUS REGISTE!! P'OR DMCll NUI4BER 15
,VECTOR rOR D14C 11 NUI4BER 15
,DDCMP LINE. rOR DMC11 NUMBER 15
,3!!D STATUS IIORD
001660
1)111662
001664
(1)1666
onoooi
000001
ooonOI
(')00001
DMCRt61
OM15116.
0"'52161
OMSl161
.BLKW
,BLKW
,BLK'"
.BLKW
,CONTROL STATUS REGISTt!! rOR DMCl1 NUIliBER 16
,VECTOR rop DMCll NUMBER 16
,DDCMP LINE. FO!! DMCll NUMBER 16
,lRD STATUS WORD
Otl1670
01) 1672
001674
000001
tlOnOOI
(11)0001
000001
0"lCR17 • • BLJ(W
O"'S11 '71 .BLKW
O"lS2171 .BLKW
OMS3171 .BLI(\II
,CONTROL STATUS REGISTER FOR DMCU NUMBER 17
,VECTOR rOR OMC 11 NUMBER 17
,DDCMP LINE. rOR DMC1l NUMBE!! 17
, lRD STATUS WOPO
~19
319
no
321
322
323
324
325
326
327
32R
329
330
nl
332
333
334
135
Bf337
BEl
0~Slt21
0028
344
345
346
341
34~
l4<)
350
3'i 1
352
3'i 1
354
~"i5
3"&
357
15B
3'iCl
001676
OZO"H
~ACY1 I 271 1(')06)
14-0EC-76
DZn"H.P11
09-DEC-76 14:59
i!\'l
011700
r)nOClon
16.32
PAGE 9
PIIOGRAM PAPAMETEIIS, VARUBLES,
O"l,ENDI 000000
PAGEl
AND TRAP CALLS,
0029
MACYll 27(1006)
OZDMI'
14-0EC-76
DZOMH.P1 t
09-0€C-76 14159
361
.f.2
363
364
365
16132
PAGE 10
PROGRAM PARAMETERS, VARIABI.ES, liND TRAP CAI.LS.
0111702
nO~702
::noooo
367
368
3&9
001704
000000
CHT.MAPI
PACTOOr 0
ERC'l'OOz 0
,PiSS COuNT ,OR Of'lC i i "UMBER 00
: tRROP COUNT P'OR DIIC 11 NUMBER 00
no 1706
370
iJ011i0
000000
01)0000
PACTO!!
ERCT011
: PASS COUNT rop Df!lC 11 NUMBEP (\ 1
JERROR COUNi' FOR DltCU NUM8ER 01
001712
001714
000000
000000
PACT02: 0
ERCT02: 0
,PASS COUNT rOR DNCil NUMBER 02
JERROR COUNT FOR DMCU IfUI4BER 02
001716
001720
000000
000000
PACT03r
ERCTOls
,PASS COUNT rOR DNCtl NUMBER 03
,ERROR COUNT rOR DMCl1 NUMBER 03
379
0111722
001724
000000
000000
PACT041 0
ERCT04r 0
,PASS COUNT FOR OMC11 NUMBER 04
,ERROR COUNT P'OR DMC11 NUMBER 04
3Rl
3 I'! '2
001726
0111730
0"0000
000000
PACTO!I
ERCTO!!
: PASS COUNT FOR DMC 11 NUMBER 05
,ERROR COUNT FOR DMCl1 NUMBER 05
001732
0')1734
000000
000000
PACT061
ERCT06:
: PASS COUNT FOR DMC 11 NUMBER 06
,ERROR COUNT FOR DMC11 NUMBER 06
1)01736
001740
000000
('100000
PACT07:
ERCT071
,PASS COUNT FOR OMC 11 NUMBER 07
,ERROR COUNT rOR OMCl1 NUMBER 07
1)01742
001744
000000
(\(10000
PACTtO:
ERCTI01
,!'ASI) COUNT FOR O"lC11 NUMBER 10
, ERROR COUNT rOR DMC 11 NUMBER 10
001746
001750
onoooo
000000
PACT1!!
ERCT1!1
,PASS COUNT FOR DMC11 NUMBER 11
, ERROR COUNT FOR DMC 11 NUMBER 11
001752
001754
000000
000000
PACT121
ERCTt21
:PASS COUNT FOR DMC!1 NUMBER 12
, ERROR COUNT FOR DHC 11 NUMBER 12
400
0'11756
01)1760
000000
000000
PACT13.
ERCT131
I PASS COUNT FOR DMC 11 NUMBER 13
,ERROR COUNT FOR DMC11 NUMBER 13
401
402
4113
001762
IlOl764
01)0000
000000
PACTt4!
ERCT141
,PASS COUNT FOR DMCll NUMBER 14
,ERROR COUNT rOR D"'Cl1 NU"BER 14
405
41)&
41)7
1)01766
01)1770
'lOOOOO
000000
PACT151 0
ERCT1!1 0
,PASS COUNT rOR OMClI NUMBER 15
, ERROR COUNT rOR DMC 11 NUMBER 15
4')~
oot772
OO! 774
ononoo
1)00000
PACT16 : 0
ERCT16t 0
,PASS COUNT FOR DMCl1 NUMBER 16
I ERROR COUNT FOR OMC 11 NUFoIBER 16
1)01776
o020CO
onOIlOO
01)0000
PACT1'?!
ERCT17r
,PASS COUNT rOR DMC 11 NUMBER 17
J ERROR COUNT FOR DIIC 11 NUI'BER 17
373
:;74
375
376
0030
PAGEl
0031
,OMC11 pASS COUNT AIfD ERFlOFl COUNT TABLE
J ••••• _-_ . . . . . . . . . . . . . . . . . . . . . . . - •••••••••
3M
371
372
PAGEl
377
3711
18n
38~
384
3!l5
3Rf.
3137
3RB
389
390
391
397
393
394
395
396
3'H
398
39Cl
4r:~
4('19
41 Il
411
412
413
1l2'.[l.....
"~CYlI
Ot:(>V,H.Pll
27(1006)
14-DEC-76
09-0EC-76 14159
16132
PAGE 11
PARAMETERS, VARIABI.ES, AND TRAP CALLS.
PROGPA~
414
41 ~
416
417
41 R
41 C/
FOR~AT
15
14
I
! C
13
11
12
1n
OF STATUS TABLE
09
08
07
06
05
04
03
02
01 - 00
I
a
L
R I
S
REG
r
I
I
I
I
I
I
STAT!
*
I
I
I
8TAT2
*
I
I
I
STAT)
III
I*I*I*I*I*I*I*I*
I
I
I
I
I
I
I
t
I
I
CSR
I
I
V
E
*
C
N
T
*
0
E
I
I
I
I
DEFINITION OF FORMAT
CSR:
STATI:
CONTAINS DMCl1 eSR ADDRESS
EIlTS 00-08 IS O~Cll VECTOR ADDRESS
!lIT1S,,! MICRO-PROCESSOR HAS CRAM
B 1T15=0 MICRO.PROCESSOR HAS CRO,",
81T14"1 ???? TURNAROUND CONNECTOR IS ON
~rT14=O NO TURNAROUND CONNECTOR
IHT13=0 LINE UNIT IS AN M9201
I\lT13=1 LINE UNIT IS AN M8202
fHT12=1 "'0 LINE UNIT
bJrS 09-11 1S DMCII BR PRIORITY LEVEL
STAT2:
L;')N 8YTE IS SWITCH PAC.1 (DDC'1P LINE '1UMtlERl
HIGH f'YTE If; SWITCH PACt2 (RJ.'R73 Bonr ADD)
STAT):
'lITO:! flO pqEF RIJNNI"IG TESTS nN j("C
(~IlST Elf. ::;ET TO A ONY. "ANUAf.LY (PROr.RAM::;
r.
Al\iO H [INt Y l)
"'~CYll
DZO'HI
OZI'l~1;
27( 1(06)
14-0EC-76
Oq-1)F'C·76 14: SCI
.Pl1
470
411
474
475
476
477
4~6
d87
4R~
4PC;
49n
4<11
492
493
4<14
002002
002010
002014
00202:2
002030
0('12034
002040
002044
1107n52
0('12060
(102066
00'072
002074
002100
n02102
002106
002114
012737
o l 2706
012737
013737
005037
105037
105037
012717
012737
012737
012700
0('15020
0'2700
nOI374
005037
012737
012737
000340
001200
005240
001310
007556
001325
001327
001470
001676
100000
001702
001234
000001
002002
001226
001214
0f)7122
00212('
002132
0021411
00?146
002154
00?162
002164
0 11 7161\
002170
('10217.,.
002204
002210
002214
oon20
Ofl12?2
002230
0 11 2232
(1)2236
002242
On2'250
002254
01)1256
(1)2'262
01)2270
002212
1)0'7.76
00230n
on7. 304
Ml2306
013746
013746
(112737
012737
012737
022777
001402
000407
0?2626
012737
01"37
01263'7
012637
10573'7
001006
0'-2737
00H02
104402
1)0473'7
017737
005737
0111402
0051'137
032'737
nOl012
1('15737
1('10007
('I OC; 7 37
01111106
104402
000006
000004
002166
177570
17'7570
177777
000004
001202
001200
177020
177776
000024
001314
001320
001322
001316
002002
.START: MOV
MOV
MOV
MOV
CLR
CLIIB
CLIIS
MOV
MOV
MOV
MOV
HSI
CtR
CIoIP
BNE
CLR
/oIOV
MOV
4'1<'
4<16
497
191'1
4Qq
500
51)1
51)2
I)OJ
~n,1
<,(15
"or,
507
o;.IR
<,0<1
-;1~
51l
" 12
';13
~ 14
515
"If,
511
<;1'<
C;ICI
0;2 n
0,71
521
"'"
0;'14
5:1"
00"
,PROGRAM INITIALIZATION
,LOCK OUT INTP;RIIUPTS
,SET UP PIIOCESSOII STACK
J lin UP POW!!:II rAIL VECTOR
,CLEAR PJlOCIlAM CONTIIOL rLAGS AND COUNTS
,TYPE TITLE MESSAGE
47:'
471
478
479
480
1~ 1
41'12
493
411 4
485
PAGEl
16132 PAGF 12
PROGIIAI' rr;ITIHIZATTON AND START liP.
su
000176
000174
000004
000006
001324
001202
001200
003432
000042
(101000
(107362
176734
000042
781
20S:
001236
(1)123~
000001
001236
001236
BPI.
n01306
TST
BNE
TYPE,
007056
DZD'I,l
'HeY I 1 27(11)06)
14-DEC-76
DZO"'l.Pll
Oq-DF.C·76 1415 11
('I1J2312
,}11::n14
(1)731 f,
0112322
002'26
(1)23l0
002334
('102336
0(12344
0(02346
00235n
('1('1; 354
002160
(102 )64
002370
(102374
0('12)'"
01'1240'
00240(,
1)02412
0(12414
002416
11')2420
1"/$ I
16$ :
010252
001324
001236
000006
,
.-1,
=
,
20.
,J.1TITLE
PC,CKSIIR
lISNR, STIITSW
fl142
,+6
STRTSW
.SWOO,STRTSW
17$
STRTSw
17.
DMACTV
168
NOlCT
,TYPE TITLE MESSAGE
,CHECK rOR 50FT SWR
,STORE STARTING SWITCHES
,IS IT ~UNNING IN AUTO MODE?
,SR IF NO
, IF YES, CLEAR SWITCHES
I IF S WOO=I, QUESTIONS ARE ASKED.
,BR IF 51100=1
,BIT7=1 ??
,BF! IF SW07"0
,ARE ANY DEVICES SF-LECTED?
,BF! IF YES
,NO DEVICES SELECTED.
161)2
PAGE 13
PROGPU INITtALIZATtON AND START UP.
(HIOOOO
(100776
004737
105737
001410
105'737
100ni
032737
001401
01)0124
005137
104402
0127114
010437
012417
(10141t
(112437
012437
012437
104410
007230
000762
612700
MOV
MOV
MOV
MOV
MOV
CMp
SEQ
BR
CMP
MOV
MOV
MOV
MOV
TlITB
8"E
CMP
BEQ
TYPE
JSR
MOV
TST
BEQ
CLR
BIT
BNE
TlITB
,LOCK OUT INTERRUPTS
t340,PS
,SET UP STACK
'STACK,SP
,SET UP POWEll FAIL VECTOR
•• prAIL,t1II24
,SAVE NUMBEII OF DEVICES IN SYSTEM,
DMNUM, SAVNUM
,CLEAR SOFT TYPEOUT FLAG
SWFLG
,CLEAJI ERROR P'LAG
EJlllrLG
,ZERO QUICK VEllIf'Y rLAG
QV,rLG
.DM,MAP-10,CREAM,GET MAP POINTER.
tCNT .MAP-4, MILK ,GET PASS COUNT MAP POINTER
,POINT POINTER TO rIRST DEVICE.
JBIT15,RUN
,PASS COUNT POI NTF-R TO PO
'CNT,IIIAP,RO
,CLEAR
TASLE
(RO)+
'CNT.MAP+100,RO ,DONE YET?
,KEEP
GOING
231
,CLEAR LAST ERROR POINTEP
LISTERR
,SET UP FOR TEST 1
I1,TSTNO
,SET UP FOR POWER FAIL BEFOPE
• ,START, RETURN
,TESTING STARTS
,SAVE CURPENT VECTORS
"6,-CSP)
U4,-CSP)
,SET UP FOR TIMEOUT
tIS" Elt4
7 SET SWR TO HARD SWR ADDRESS
1177570,SWR
Ii 77570-, DISPLAY ,SET DISPLAY TO HARD SWR ADDRt:SS
,REFERPICE HARDWARE SWITCH REGISTER
iSNR
, IF
-I USE SOFT SWR ANYWAY
68+2
,IF IT EXISTS AND NOT .. -I USE HARD SWR
7.
(SP)+, (SP)+
,ADJUST STACK
,POINTER TO SOFT SIIR
tSWREG,SWR
,DISPREG,DISPLAYIPOINTER TO SOFT DISPLAY REG
(SP)+,~t4
I RESTORE VECTORS
(SP)+.1U6
,HAS INITIALIZATION BEEN PERrOR/oIED
IIIIrLG
,BR IP' YES
208
,IP' ACT-l1 AUTOOIATIC MODE, DON'T TYPE 10
UENDAD,U42
001236
HALT
BR
JSR
TSTB
BEQ
TST6
aMI
SIT
BgO
fiR
(1)1324
OOEII 26
(l01500
001246
001250
21 S I
'2481
CO~
55 I
~OV
lSI
MOV
BEQ
MOV
HOV
MOV
CONVRT
XSTATQ
IIR
MOV
001252
01)1254
001256
001500
TYPE
MOV
,-2
PC. :'UTO .SIZE
INIFLG
218
STRTSW
PAGEl
0033
,STOP TIfE SJolOll
,DISQUALIFY CONTINUE SWITCH
,GO DO THE AUTO SIZE
,FIRST TlIo\E?
,BR IF YES
, IF USING SAMF. PARAMETERS DONT TYPE MAP
U
t8IT118IT2,STRTSW,IS TEST NO. OR LOCK SEt.ECTED
,IF NO THE)j TYPE STATUS
1$
lIP' YES DO NOT TYPE STATUS
INlrt.G
,SET FLAG
, TYPE HF.ADEF!
, XHEAD
'DM.MAP,R4
,SET POINTER
R4, TEMPt
,SET II.DORe;SS
(P4)+,TEMP2
,SET CSR
18
I ALL DONE IF ZEPO
(R4)+,TEMP3
,SET STII.TI
(R4)+,TEMP4
,SET STAT2
(R4'+,TEMP5
,SET STAn
,TYPE OUT STATUS MAP
241
,RO POINTS TO STATU/ol TABt.E
I '* * * * ******* **************** ** ****** * ** *** ** **** **** **** ** ** ** * * ** ***
"UUTO SIZE TEST
".TIlIS TEST VERIP'YS THAT THe; D~Cl1S AND/OR KMC11S ARE AT THE CORRECT n.OATING
,,*flDDRESSES FOR YOUR SYSTEM. IF THIS TEST FAILS, IT IS NOT A HARDWARE ERROR.
,,*CHECK THE: ADDRESSES OF ALL FLOATING DEVICES (DJ,DH,DQ,DU,DUP,LK,DMC,DZ,KMC).
, : * IF TJolERE ARE NO OTHER FLOATING DEVICES BI':FIJRE THE DMC 11, THE FIRST
II*DMCll ADDRESS IS 760070, KMCll IS 761)110. '10 DEVICE SHOULD EVER BE AT
II*ADDRESS 760000.
, J *****.***."*,, .. ******** ** ****** .. ****** **** ******* ********IHHHHHHHHllIc4*
(102424
000004
00000"
000006
001252
(l1)2~'
013746
01374(,
0051)37
0051)37
n05005
0111137
001 '530
On~ 11)5
0" I n05
0327 .. n
onln44
0004(14
'I '2160
001437
(112717
nnS7(lr;
1')"10'13
ooono.;
n~2'DO
nino)
On041'l2
01)2'i 2'
1\
~1)2~2~
n'
0024~1)
002434
1)02440
1)02444
tl07H6
1)074C;2
1)02454
1)02456
('\1)'4(,1)
0(\746"
(102470
00247'
n025nn
nO,'ijr)2
00251 n
2
oOi'i 14
"'07~
I?
I ,in3
2"l''''
n, 27"
1
~'JSTRTI
001404
1 00000
onon02
100"00
000002
(lrl2606
oonn04
1 S:
foIOV
MOV
CLR
CLR
CLR
MOV
SEO
TST
BNl"
BIT
BilE
BP
BIT
efO
'S I
MOV
1ST
U4,-CSP)
U6,-(SP)
~.6
TEMP3
R5
CRO),DMCSR
AUDONE
RI)
1$
.BITtS,HRO)
01(
28
'I'ITI5,2(1<0)
01(
.NODEV,U4
PIS
FIiE
"lOV
3S
16, R3
~~:
,·~OV
110, R3
it;::
)~nv
1II~F.\,Tap,;;,
!>~ (j ~
• i 6;;0
4$
j '),;;
1
,SAVE LOC 4
,SAVE LaC 6
,CLEAR VEC+2
,CLEAR FLAG
,R5=O=DMC, R5=-\=KMC
IGET NEXT DMC CSR
,BP IF DONE
,DMC OR J(MC?
ISR If KMC
, CHECK rOR OMC CSR
;SKIP If NOT OI'C
; ITS 11 DMC 50 CO~TINUE
:CHECK 1" DR KMC CSI<.
:S~IF If NOT l(I"C
: S~T UP FOR T!:-IfOUT
;!'lr-t(' OR K"'C?
:~R
IF' q,C
:R3 IS C(1fJ~T C'~' r',vrCES BHORE IlMC
:(,0 0'<
: P3 IS CC1Il"T rF' ;1"VICES HE!'"0RI:. KI!C
,tl? IS ~E'V'(,,<' TART,": P"'1TEll
DZDMh
MACYll 27(11)06)
14-0E:C-76
OZOMH, P11
09-DEC-76 14159
58?
593
5A4
5~o;
5!l/\
591
599
5q9
5'11)
5'n
592
593
5~4
590;
5'1F,
597
5Qq
5<1'l
60'1
601
602
603
604
605
606
607
60R
60"
I'll ~
611
612
61 ~
002536
002540
002542
<'02544
00254&
002550
002552
002554
002562
002564
()02570
002572
002576
OO;!liOO
0()2604
0021;0&
002610
002612
002lil6
0<,)262()
002622
0<12624
002632
002634
002636
01)2640
002642
002650
002654
0026'56
002660
01)2662
614
()02(;G~
61';
61 ~
617
61B
61
Ii 47
64~
649
6~f)
6"1
652
6~ ~
65~
6';5
65('
657
658
/\r;q
/',/-(\
6/; I
662
H~
664
H~
002734
002736
1)02'140
002741
002750
002752
0.,2756
002762
002'70
002772
002776
003000
003002
003(')10
003t112
fl03016
003020
003022
003030
003034
003036
M304'2
003046
on 3050
003052
003054
0030"0
002734
005705
001005
012705
012700
000636
012637
012637
032737
001422
104402
005000
0(01)00
0,,7737
1014/)4
104402
000000
000776
017737
013700
000(100
012700
012101
010120
0051)21
022 n 21
022700
001372
3$ I
4$ I
EPRPCI
002
004
n02
o t 2706
01374/;
013746
u,~
V\1~.&
6"
0031 !.4
003120
n03122
Ot)3121i
On3132
(1)3136
n03142
Onlt44
003116
001152
00315('
003162
01)31li4
0(3171)
fl'l] 172
16270(1
1'2nO('l
('1('11361
012700
00(175/\
(')12737
,,«?
00 ""'()
,,"7P
f,~1
'In 37'1(,
0llPl1
~79
6~n
M2
"n
6P4
II~"
fH ..
/\~7
~Q'P
f.~O
6Q n
.,0,
CRU
1I1.0MCSR
OK
UO,Ri
ry
ADD
Un,lIn
AUSTn
CR2)+,-CRl)
TEMP]
11
IERR,SAVPC
,ANY MORE DEVICES TO CHECK FOR?
JAR IF YES
,OK ONLY DMC'S ARE LEFT, SET UP FOR TIMEOUT
,CHECK OMC ADDRESS
,DOES IT MATCH
,SR IF YES
, GET NEXT DMC ADDRESS
,DO IT AGAIN
,SUP TO NEXT OMC CSR
,CONTINUE
,ON TIMEOUT, INC R2, DEC R3
,RETURN
o TYPE HEADER
,CHECK fLAG IF
,SKI P HEAPER
,TYPEOUT HEAPER IoIE:SSAGE
,CONFIGURATION ERROR!lll
,SAVE PC FOR TY!'E(1UT
,TYPE OUT ERROR PC
=
,
,
,TYPE REST OF HEADER
'-1,TtMP3
Rl,SAVRI
,SET .. LAG SO IT ONLY GETS TYPED ONCE
,SAVE R 1 FOR TYPEOUT
RS
3.
,TYPE CSR VALUES
IOMC OR KMC ?
,BR II" KMC
177777
001500
000001i
000004
000010
001236
006046
176174
001312
005707
! 76154
001306
OItlCIII
BR
TYPE
ICMCM
CMP
SR
1
.BYTE
S"VPC
4S
,CONTINUE
(SP)+, (SP)+
OK
:AOJUST STACK
,SP TO GET OUT
6,2
6.4
6,2
7
17
7
7
7
7
?
7
7
,OJ
,OH
JDQ
,OU
,,,UP
,LK
,OPie
,PZ
,KMC
001306
000300
000302
ai'll (100
,EVEN
'UDONEI TST
BNE
MOV
MOV
BR
MOV
lSI
MOV
BIT
SEQ
TYPE
CLR
HALT
CMP
BLOS
TYPE
HALT
BR
MOV
2S I
MOV
HALT
"IOV
3$1
Mev
4$1
MOV
CLR
C"IP
CMP
BNE
R5
18
1-1, R5
tDM,MAP,RO
AUSTRT
(SP)+,@II6
CSP)+,U4
UW03,STRTSW
3$
,MNEW
RO
~SWR,SAVACT
2$
,MERR]
.-2
~SWR, DMACTV
DMACTV,M
tlOO,RO
t302,Rl
Rl,(RO)+
CRt)+
CRO)+, (R1)+
11000,RO
4$
PAGEl
,OMC?
,BIl IF KMC AND ALL DONE
,SET R5 TO -1 CKMC)
,RESET 1<0 TO ST"RT or TABLE
,GO DO KMC'S
, RESTORE LOC 6
I RESTORE LOC 4
,SELECT SPECIFIC DEVICES??
,SR II" NO.
,TYPE THE MESSAGE.
,ZERO DATA LIGHTS
,WAIT FOR USER TO TELL WHAT DEVICES TO RUN
,IS THE NUMBEP VALID?
,SI< IF NUMBER IS OK.
: TELL USER OF INVALID NUMBER,
,STOP EVERY THING.
: RESTART THE PROGRAM AGAIN,
,GET NEW PEV ICE PATTERN
I SHOw THE USER wHAT HE SELECTED.
,CONTINUE DYNAMIC SWITCHES.
,PREPA.RE TO CLEAR THE FLOATING
,VECTOR AREA. 300-776
,START PUTTING ·PC+2 - HALTI IN VEC'I'OR AREA.
I POP POINTERS
,ALL DONE??
,BR IP' NO.
,TEST START AND RESTART
673
674
67<;
6Q 1
FLOAT
IERR" . .
,,
,---------------------003062
003n66
00)072
003076
003100
003106
67~
!I]
,CHECK ADDRESS IN R1
,IF NO TIMEOUT, GET NEXT ADOR!:;SS
,IN R1
16132 PAGE 15
PROGRAM INITULIZATION AND START UP.
n6~
677
eRO
CR2),R4
R4,Rl
R1
R4,R1
BR
CMPB
RTI
1ST
8NE
TYPE:
CONERR
MOV
CNVlIT
ERRPC
TYPE
CNEPR
MOV
MOV
CONVRT
CONTlB
TST
BNE
CONTAS: 2
.BYTE
SAVRI
.BYTE
P"ICSR
DEVTABI .BYTE
.BYTE
.BYTE
.SYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
66.,
611'
6liQ
670
671
TST
1140VB
ADO
INC
BIC
TST
BNE
MOV
TST
CMP
SEQ
ADD
SR
~£
001200
000006
000004
~05000
012737
005037
V""'· £\.'
022700
0('11374
16270n
010031
012/\37
012"'37
000413
022"'26
ano"!
0034
T'lPE
DZD'lH
MACYII 27(11'06)
14-DEC-76
[lZPM'l,Pll
1'l9-DEC-76 14 :59
Ii 3 0
PAGEl
16132
PliGE 14
PROGRAM INITIALIZATION AND START UP.
003144
000006
000004
,BEGI"'I MOV
MOV
MOV
CLR
MOV
CLP
60S i
157776
007776
0<11304
000004
000006
7$1
2$1
000n04
007176
030000
('00140
fli]l')nn4
T5·7
{i(Qj ...
JeHEei': ADOPE55 iN RO
.1S7776,RO
68
.7776,RO
RO,MEIolLIM
CSP)+,(lH
CSP)+,(l'6
,rs IT AT LEAST 29K
,SR IF NO
! SAVE 21< f"OR MONITORS
,STORE MEMORY LIMIT
,RESTORE LaC 4
: RESTORE LOC &
,CONTINUE
: ADJUST STACIC
: GET LA~T Gl')nO ADDPESS
,SAVE 21< FOR MONITORS
;IS IT -K?
:AR IF '1/(1
: IF bK OO'l'T SAVE: 2K
MI')V
fiR
17777;,
nnl'1'"
1 "$:
I SET UP STACK
,SAVE LOC 6
I SAVe: LOC 4
, START AT 0
,SET UP FOR TIME OUT
,TO AUTOSIZE ~EMOj:lY
CMP
BNE
SUB
MOV
MOV
MOV
BR
CMP
SUB
SUB
CMP
B~F
OH400
tsTACK,SP
{i'6,-CSP)
(lU,-CSP)
RO
.28, f!1l4
lU6
~nv
8TT
p.,,:u
lOS
(SP)+, (SP)+
.4,RO
'7776,PO
130000,1'10
7S
1)7400,RO
7S
n4(1,PS
Jlf;IT2,STFlTS"
1S
: LOCK OllT p·TERRUrTS
:Cfi'-CI<' 'OP LOCI( 0'1 TEST
;RR II'" ... n LOCI< DESIRED.
0035
>!r.C:Yll 27(1(')06)
14-D':C-76
OZOJl'H
09-DI':C-7f. 14159
OZD!'H.Pll
691
69<;
6 Q f,
6111
"Q8
6Qq
11)0
701
70?
701
71'4
001210
003214
003222
001230
003232
003240
OOl246
003254
00]262
003264
01)'270
104402
012737
012737
000406
013737
013737
012737
032737
on 1 002
104402
000177
005745
000240
000240
003522
003524
00)640
003642
007620
000002
003522
003524
001214
001216
005"57
175720
1S1
HI
4$1
SSI
D2D"f->
"IACYlI 27 (1006)
14-0EC-76
OZ" ....... PII
09-0EC-76 14159
PAGEl
P~GE 16
16132
PPOl;l'IAM !'IITlAL1Z ATlON lNO START UP.
TYPE
MOV
MOV
BR
MOV
MOV
MOV
BIT.
811E
TYPE
JMP
,MLOCK
'NOP,nST
INOP, TTST.2
3f
BRW,TTST
8RX,TT!T.2
.CYCLE, RETURN
nW01, STRTSW
se
,MR
.RETURN
,TYPE LOCK SELECTED,
,ADJUST SCOPE ROUTIlIE.
,SET liP TO LOC"
,CONTINUE ALONG.
I PREPARE NORMAL SCOPE ROUTINE
,LOCK NOT SELECTED, SET UP rOR NORMAL SCOPE LOOP
,STAJIT AT ·CYCLE· rIND WHICH DEVICE TO TtST
, IS nST 110. SELECTED?
,BR IF YES
,TYPE R
,START TESTING
16132 P~Gr. \7
END OF PASS ROUTINE
PAGE:
,END OF PASS
,TYPE NAMF. or TEST
,UPDATE PASS COUNT
,CHECK ro, EXIT TO ACT-ll
, RESTART TEST
1'01274
003276
0"3)02
003306
003312
<)0'120
J V
000005
005037
\ 11'i '1 37
005231
013777
\04402
j"" . .
01)3330
OOHH
01)3340
003344
0<)3350
nOB~4
003360
003364
01)3371'
n(1)74
1)03400
(10]404
003406
003414
on 3422
1)03426
(11'1]430
003432
O'J3432
orn414
003436
003440
003442
(1)3444
003452
0'13456
(1)3460
OO]46?
(1)3464
111)3466
nOH70
003472
QO)474
104411
104401.
104411
104402
104411
104 t02
104411
013700
013720
013720
01'5317
001017
112737
013737
Ot 3701
001406
000005
.FOPI
001234
001325
001230
1'101230
005635
175660
RESET
CLR
CLJlR
INC
MOV
TYPE
~~!..,., ~
TV?!::
003456
006002
003464
006010
003472
0(61)21
003500
001322
001230
001232
001314
CNVRT
TYPE
CNVRT
TYPE
CNVJlT
TYPE
CNVJlT
MOV
MOV
1010 V
DEC
BNE
MOVB
foIOV
MOV
BF:Q
RESET
000377
001310
0('10042
001327
001114
000240
1112737
000 137
0001101
1106
00'7620
007620
002
OI'J14f)4
OOOr)OI
')04
0('11374
000001
n06
(0)47f;
on?30
O'lJS04
0(101'10 I
1'10"
o~, 232
,.." '11:1 n,:.,
(l ....
002
001214
JSR
NOP
NOP
NOP
NOP
RESTRTt MOV
JMP
lCCSFlI
1
,1>rTE
D"ICSP
XVEC I
1
,8YTE
PC, (I'll)
.CYCLE, RETUPN
CYCLE
4,2
D~PVEC
XPASSI
1')02
XFPP;
1
.B'iTE
PASCNT
1
,R'iTE
EFPC NT
:
2
,MAKE THE
WOJlLD CLEAN AGA 1'1.
,CLEAR LAST ERROR PC
,CLEIIR ERJlOR FLAG
,UPDATE PASS COUNT
,DISPLAY PASS COUNT
,TYPE EIID PASS
,TYPE CSR
,SHOW IT
,TYPE VECTOR
,SHOW IT
,TYPE PASSES
,SHOW IT
,TYPE ERROJIS
,SHOW IT
, GET POINTER TO PASS COUNT
,STORE PASS COUNT rOR THIS DMC 11
,STORE EJlROJI COUNT FOR TIfIS DMCll
,ARE ALL DEVICES TESTED?
,BR II" NO.
,SET THE QUICK VERIFY FLAG,
,RESTORE THE COUNT
,CHFCK rOJi ACT-I t OR nop
J IF NOT. CONTINUE TESTING
J STOP THE SHOW-·CLEAR THE liORLD
SENOADI
004711
000240
OMI240
000140
1'1)3500
0('13'502
(.,,)~,
LSTERR
EPRP'LG
PASCHT
PASCNT, ~OISPLl< 'i
,MEPASS
• MCSRX
,XCSJI
, MVECX
,XVEC
,MPASSX
,XPASS
,MEJlRX
,XEPR
MILK,PO
PASCNT, (JlO)+
ERRCNT, (RO)+
SAVNUM
RESTJlT
1377 ,OV .P'l,G
DMNUM, SAVlIUM
U42,Rl
RESTRT
-_.. --- --_........ --- ---- ---_ ... --...
A., 1i
?f,
("~.
1 '"
P(",
{~P)
fl, pn
5i-'F
oon
: ,.. .. F':'\-·
~ ,~;. .,,"
1::
v,.,:::
0037
MACYll 27(11)06)
14-DEC-76
DZll"'H
DZD!'Ii.Pll
09-DF.C-7f> 14159
761
7f>2
7"3
7&4
76'5
761'
767
768
769
iiO
771
772
773
774
77S
776
717
77S
779
780
7~1
7'l2
7/13
7!l4
7R5
7R6
7q7
71!8
789
7<10
7<11
H'}.
7q3
7~4
795
7'l/i
797
79B
799
$000
~r:l
8'"
"03
qfJ4
~(l"
s:l(,~
~07
,HlP
8(')9
!l10
811
qp
"I ~
B 14
?\<;
q II>
003514
003522
00 352 ~
01))526
003532
003514
01)3540
003542
01) 3550
003552
003556
003560
003564
003572
003574
003600
003604
003610
003616
003624
003626
003630
003634
003640
003642
040000
i0573i
uOi32i
UTEi
001224
001224
BEQ
INC
CMP
BLOS
001406
005237
023737
101414
IOS()37
005037
005037
012737
013737
011600
0?2626
01371)1
000177
001407
000437
175460
TTSTI
175452
175446
004000
175432
lSi
OOinS
001224
001220
000020
001216
25:
001222
001214
3$:
001404
175354
BRWr
BRXI
~n
·2"
R?f>
qn
@2~
R ~9
9,0
~ ~1
R32
PH
RH
" 35
1'31'>
R37
R 3R
;n9
R40
R 41
~4'
843
B44
~45
~H,
004737
032777
001405
0057 ]7
001402
013716
007362
001000
175324
0!'i!220
TST
001220
BEQ
MOV
RT1
000002
1$1
0()31;74
0'>3702
01)3710
003714
003716
003724
003726
1)(\1730
003732
001736
0(l3742
003744
010546
017605
01'2766
Oo5H7
001('04
032777
001012
105715
1(')0002
104402
105777
100375
1 \2517
00)7S()
0013157
0'137'5'
012605
000002
1),)3f,7~
ool7'54
.TYPEI
000002
000002
000~02
0()7556
010000
4$1
175256
lS,
005574
175246
2S1
175242
lSI
.
--
R';I;
q~7·
Qo;8
8~9
p"o
A1'1
P62
q'S~
M"~
PI>·
~h"
Qf.,7
Q(\C
",~q
Q
11"1
!oi"
:.."
QV.lI'i,t:
2S
LpCN!'
LPCN1', ICOUNT
35
ERRFLG
LPCNT
LOCK
120, ICOUNT
NEXT, RETURN
(SP),RO
OMCSR,Rl
~I'ETURN
,RESET ITERATIONS
,GET· NEXT TEST
, POP RO OFF' OF THE STACK
,FAKE AN "RTI"
, R1 CONTAINS BASE DMC ADDRESS
,GO DO THE TEST
PC.CICSWR
tSW09,UNR
18
LOCK
1$
LOCK, (SP)
,CHECK FOil SOFT SWR
,IS SW09::1(SET)?
, BR IF NOT SET.
,GOTO THE ADDRESS IN LOCK.
,GO BACK.
003756
003760
I)n3762
003770
003776
!,.,40ii(l
0C)4002
oa4006
n04012
(1)4016
004020
n(l4024
(1)40]0
004014
0')41)]6
11<')4042
004044
004()'52
()(\4054
0040'56
0041.11'10
004062
004066
0(')4070
004072
004()74
004076
004100
1)10346
010446
0171'>37
01'>27&6
104402
000000
012704
012703
105777
11)0375
117714
142714
122427
001417
105777
100375
017777
005303
00D56
012604
012603
104402
010346
010446
000741
012604
012603
000()02
000004
000002
004000
000004
007256
000007
175166
175162
(100200
OOO()15
175146
175136
MOV
MOV
ADD
TST
BNE
BIT
BNE
TSTB
BPL
TYPE
TSTB
BPL
MOYB
Slit
MOV
RTI
(R5)
2.
, MCRLF
'TPCSR
2.
(RS)+.nPDBR
,SAYE R5 ON TilE STACK.
,CET ADDRESS OF MESSAGE.
,POP OVER ADDPESS.
,SOfT SWR MESSAGE?
, IF YES TYPE IT OUT REGARDLESS OF SIH2
, INHIBIT ALL PRINT OUT??
,BR IF' NO PRINT OUT WANTED (SWI281)
,IS NUMBER MINUS? (MSB=1 (BIT7»
,BR IF NUI'BER IS PLUS
J TYPE A CR/LF I
,TTY REAOY?
,BR IF NO.
,PRINT CUI'I'ENT CHAR.
U
,IF NCT ZEl05
0120;37
v'w
~~
004122
004126
04
nll417n
on4172
CiH171',
01'14,o(\
('1('1 !20 1
004'r)1;
000004
004272
__ • . •
012'537
1120; 37
112537
010566
005005
012704
122714
onl420
121i27
01'12415
004276
004300
004301
000004
121417
000%7
003n 12
112714
152405
122714
0~1406
on!', 11)5
,PARA!!I MOV
MOV
MOV
MOV
,--"""
..
007256
00001'5
MOV
MOVS
MOVB
MOV
PARAN11 CLP
MOV
C!oIPR
000')60
IS:
SEQ
Ol)on6(1
01)01'15
CMPA
BLT
C"PEI
Br.T
B1eP.
ElISf:\
C"PI'
RF,l
AI'-l
R5,-(SP)
R4,-CSP)
4(SP).R5
(FlS) +, LOLl!!
,:~=",;;-.:.:~~"},:
........ ".,. p ..... _ . . . .
(I'5)+,DEVAOR
CR5H,LOaITS
(R5)+,ADPCNT
!l5,4(SP)
R5
UNBUF.R4
115, (P4)
PAREIIR
(R4),.60
PIIRF.RP
(R4),#67
PARERR
.60. CR4)
(R41 +r R5
iI5,cP4)
LIMITS
R5
PAGE:
0039
... ACYI1 27( 1<10~1
14-0EC-'?6
OZO"H
OZoO'AH.PII
1l9-DEC-76 14.5 0
i! 73
874
875
1176
Fl7l
004210
004212
004214
004216
004220
16132
PAGE 20
GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)
ASL
ASL
SR
INSTER
PARERR.
5R
006305
006 ~O5
000760
104404
000750
819
879
Ael
AS2
RIl3
0040
PAGEl
0041
1!5
R5
it
PARAMI
TO SEE IF NUMBER IS WITHIN LIMITS
,,TEST
......................................
BIlO
1l1!4
RB5
AS'"
81'17
PAGEl
004222
0042;!6
004230
004234
004236
004242
020537
101173
020537
103770
133705
001365
004274
004244
0042'50
004252
0042'56
004262
004264
004266
0('14270
004272
004274
004276
004300
013'704
010524
062705
105137
001372
012604
012605
000002
1'100000
000000
0('10000
000000
OQ4 30 t
004276
LIMITS. CMP
8Ml
004272
CMP
8LO
8ITS
BNE
004300
A5,HIL!M
PARERR
R5,LOLI'PAItERR
LOBITS,R5
P1RERR
Be!!
flA9
P90
891
1'92
P9l
~94
e95
891;
897
1l9A
P99
900
'101
902
9(13
'11\4
905
qllb
907
90Q
,STORE NUMB!" AT SPECIFIED ADDRESS
MOV
MOV
lSI
ADO
OECB
BNE
MOV
MOV
RTI
LOLIM,
0
IHLIM,
0
DEVADA. 0
LOBITSI 0
ADIICNT=LOBITS+l
000002
004301
DEVADR,Flt
RS, (R4)+
.2,FlS
AORCNT
11
(SP)+,R4
(5P)+,R5
,SAVE PC OF TEST THAT FAILED AND FlO-!'!5
t ............ ---•••••••• ---.. ----- ••• --.
(l04302
016b37
000004
001276
.SAVOS' MOV
4(SP), SAYPC
,SAVE R7 (PC)
90'1
010
Q 11
<112
'11)
014
910;
14
onOO02
r"'4~ '"
I1l)o"nn
9f.'
/1113
964
oliO;
~6n
967
°6R
969
070
071
H2
073
074
n'i
076
'17 '7
07R
'179
~ ~
"1·2
~;n
JO~
16132 PAGE 21
GENEIIAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)
005574
112137
112137
013117
122737
001003
04273'7
011704
113705
012700
010403
944
945
9411
Q47
948
94Q
°50
n51
Q52
Q53
954
955
<156
Q57
9'5ij
959
Qf,()
961
RO
111
112
113
R4
115
,CONVERT OCTAL NUMBER TO ASCII AND nUTPUT TO TELEPIlINTEFI
c:.;.;z~
00
,RESTORE
I RESTORE
,RESTORE
,RESTORE
,I!ESTORE
,RESTORE
,LEAVl
r •••••••••••••••••• ------ •••••••••••••••• ------.--- ......
004430
004434
004440
0'14444
004452
004454
00446'
004466
004472
0(14476
004500
01'14'504
004510
004512
01)4514
(104516
004520
004522
004524
004526
004530
0('14'532
004536
01)45411
004544
0(14546
(1('14552
004554
004'560
01)4564
0'145611
0(14'570
on40;74
OO4r,oO
1\,;4602
OIJ4r;04
1"'46116
()"41i 1 0
1)114512
-'"i.
942
SAVIIO,RO
5AVR1,Rl
SAVR2,R2
SAVR3,R3
SAVR4,R4
SAVRS,Fl5
,'n4"'711
04n03
062703
110320
000241
006/)04
0(10241
006004
000241
006004
005305
001362
012703
114023
1 (15337
(1('11374
105737
01'11405
112723
I05H7
001371
1 "'~O13
1 "4402
00!'H7
001113
012 .. 05
1112<;04
177400
004622
004620
001416
000012
.CONVRI TYPE
.CNVRT, MOV
MOV
!lOV
MOV
HOV
MOV
AOO
Mflv
1$1
004620
004622
2sr
35 I
177770
0001160
Move
MOVa
MOV
C!o1PB
SNE
BIC
WlOV
MOVS
MOV
MOV
BIC
4$ I
004620
004621
000040
(104621
007320
1)"4~ '"
SSI
'" S I
R4,-(8P)
~S,-(sP)
(I12(SP) ,Rl
.2,12eSp)
rll, , •• WPOCNT
(Rt '+,CHRCNT
(RD+,SPACNT
ll(R1>.,BtNW!lD
t],CHRCNT
2.
1177400, BINWIIO
81IIWIIO,R'
CHRCNT,Fl5
UEMP,RO
R4,R3
U77770,R3
ADD
'060,~3
R3,
RO~
R4
R4
R5
OEC
BtlE
MOV
HOVB
DEC8
8HE
T5T8
BEQ
MOVS
DECB
8NE
CLilB
TYPE
DEC
BNE
~(lV
012';0)
"OV
OIU,O!
~nv
MClV
RTI
n~I)I)O!)
'.I>f')C"IT:
t"PPIT:
0,'14,,21
S:,,~~~,.=r}-''O(''''T+l
(~O)+
R4
ROR
i"OV
nl2 .. l1n
~3,-(SP)
MOVa
CLC
ROR
CLC
ctc
007320
,MCRLF
FlO,-(SPl
fl1,-(8P)
35
,MOATA,R3
-(RO),(R3).
CHRCHT
4S
SPACHT
6$
.040, (Rl)+
SPACNT
5S
(113)
, MOATA
WIIDCNT
18
(SPl+,R5
(5P)+,R4
(SP)+,R3
(SP)+. RI
(SPl.,1<1I
DZOMH
MIICYl1 27(1006)
14·DEC-76
09-0EC-16 14:5'1
DZDMH.P11
9B5
986
'187
;16
0<'14654
000136
177(101
001330
000000
(SP) ,-CSP)
U,CS")
iCSP), esP)
(SP)
1177001, esP)
•• TRPnB, eSP)
iHSPj,(SPj
'(SP)+
PAGEl
0043
J GET PC OF RETURN
,"PC Or TRAP
JGET TRP
,MULTtPLYTRAP ARG BY 2
:CLEAR UNWANTED BITS
I POINTER TO SUBROUTINE ADDRESS
,SUBROUTINE ADDRESS
J GO TO SUBROUTINE
,..._.-._.._-.
,ERROR KANDLER
004656
004662
004670
01)4672
004676
(1)4700
004706
004714
004716
004722
004724
0(14730
(1')4734
004736
() 1'1 4740
004744
n04746
(1.)4 750
004752
004754
004160
00H64
1l()4170
0(14774
o"'St)OO
0·)501)4
OnSOO6
(100;012
005014
005020
005024
01)<;030
04)S032
005036
01)5042
005046
004737
012777
001406
105777
1001)03
t 12777
032777
001105
021637
001404
011637
105037
104406
(111605
162705
011504
006304
061504
006'404
042704
06n04
012437
0\2437
011437
lliSi :;,
00140]
005737
001040
1<14402
1 (14402
005737
0()1402
104402
104402
\04411
104402
007362
010000
.\.fLTI
174312
174312
000207
020000
174304
174266
001234
001234
001325
000002
177001
0]727(1
005100
005112
005124
001325
005124
0(15574
01)5574
001220
006(')44
006032
005232
006121
onO;052
(If!~056
0115062
005070
1105074
01')<;076
0115100
1')00;102
n05102
nos! 06
005110
on<;112
O()5114
00'i 120
005122
noS 1 24
01)512~
01)51]0
on5136
0.-,<;140
005144
005145
005150
(H"5154
0'15156
005160
00<;164
Ou5172
005174
00'i202
005204
005212
or)",2! '"
00'i222
005224
0'15226
t)()S230
1')05232
005234
()05236
IOH11
1(\4402
112737
005731
001402
104402
0<'10000
005224
005574
177777
005100
0(157)7
0(11402
104402
000000
005737
001402
104410
000000
104407
022737
001403
005777
10(1005
01(1)46
016"'00
005112
JSR
BIT
BEQ
TSTB
BPI.
Move
XBXI
BIT
BNE
CMP
BEQ
MOV
CLRB
lSI
SAVOs
MOV
SUB
MOV
ASL
ADD
ASL
BIC
ADD
MOV
MOV
MOV
1STB
BEQ
TST
BNE
TYPMSGI TYPE
TYPE
TST
BEQ
TYPE
IS!
TYPE
CNVRT
TYPE
PC,CKSWR
tSw12,.SIiR
xex
IITPCP
XBX
1207, tlTPDBR
tSWt3,iS"IR
HALTS
(SP),LSTERR
1$
(SP),LS-TERR
ERRFLG
(SP),R5
I2,R5
(R5),R4
R4
(R5),R4
R4
1177001,R4
t.ERRTAB,R4
(R4 )+, ERRMSG
(R4)+,OATAHO
(R4),OATABP
ERRFLG
TYPMSG
DATABP
TYPOAt'
,,",CRLF
,MCRLF
LOCK
1$
,MASTEK
• "'1STH
,XTSTN
,MERRPC
001325
CNVRT
TYPE
MOVB
TST
BEQ
TYPE
ERRMSGI 0
OATAHOI
TYPDATI
00'5124
000042
DATABPI
RESREG:
HALTS I
174036
lSI
000002
00(1)00
012601)
0'15237
032777
001007
001232
000400
0~2777
002000
174000
on1216
001200
173712
001214
001401
013737
012706
000177
000002
000001
006
001276
000001
,SHOW IT
,TYPE PC.
,ERTABO
,!olCRLF'
.-t,ERRFLG
tRRMSG
WRKO.f'M
,SHOW IT
,GIVE A CR/I.F
:NO MORE HEADER UNLESS NO DATA TABLE.
J IS THERE AN ERROR MESSAGE?
,BR If' NO.
,TYPE
ERROR MESSAGE
OATAHO
TYPDAT
,DATA HEADER?
:SR IF NO
,TyPE
,
DATA HEADER
,DATA TABtE?
,RR IF NO.
:SHOW
,
PATA TABLE
,RESTORE PROC REGISTERS
:IF ACT-ll AUTOMATIC MODE, HALTII
WP.!(O,FM:
003432
,CHECK FOR SOFT SWR
,BELL ON ERROR?
,eR IF NO BELL
,TTY READY.
,DON-T WAIT IF TTY NOT READY.
,PUSH A BELL AT THE TTY.
,DELETE ERROR PRI'IT OUT?
,BR IF NO PRINT OUT WANTED.
,WAS THIS ERROR FOUND LAST TIME?
,BR IF YES
,RECORD BEING HERE
J PREPARE HEADER
~SAVE ALL PflOC !lEG!5TEP.5
,GET THE PC OF ERROR
,GET ADDRESS OF TRAP CALL
,GET HLT INSTRUCTION
,MUloT BY TWO
,DOUBLE IT
,MULT AGAIN
,CLEAR JUNK
,GET POINTER
,GrT ERROR MESSAGE
,GET DATA HEAORER
,GET DATA TABLE
,TYPE HEADREER
,BR IF YES
IDOES OJTA TABLE EXIST?
rBR IF YES.
16132
PAGE 2]
GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)
EXlTERI
002
j
TST
SEQ
TYPE
0
TST
BEQ
COHVRT
0
RES05
CMP
BEQ
TST
BPI.
PUSHRO
MOV
HALT
POPRO
INC
BIT
114010
BNE
BIT
BEQ
MOV
lSI
MOV
J"'P
2$ r
RTI
ERTABOr 1
.BYTE
SAVPC
XTSTNr
1
1)03
I:iV"'r:o
;~. ~ !!,....:
001226
DATABP
RESREG
tsENOAO,(l142
is
iSWR
EX ITER
2(SP),RO
ERRCNT
• SWOB, ilSWR
1$
.SW10,llSWR
2$
NEXT, RETURN
UTACK, SP
.RETURN
,HALT ON ERROR?
,BR IF NO HALT ON ERROR
: SAVE RO
,SHOW ERROR PC IN DATA LIGHTS
,HALT
,GET RO
,UPDATE ERROR COUNT
,GOTO TOP OF TEST?
,SR If' YES
,GOTO NEXT TEST?
:ap IF NO
,SET FOR NEXT TEST
:RESET SP
,GOTO SPECIFIED TEST
,R[TURN
6,2
-
.. -
TSTNO
,ENTER HERE ON POW!::R F'ULIJPF:
J •• --.-------._-.--------- ••
005240
005240
005246
000;25(1
.PF'AILe
012737
000000
000777
005252
MOV
HALT
8P
000024
IPESTART,24
,SET UP FOR POWER UP TRAP
,HALT ON POWER DOWN NORMAL
1 ()~9
1 "'1/'1
1 r,Q 1
Inq?
0042
,TRAP DISPATCH SERVICE
I ARGUMENT OF TRAP IS EXTRACTED
lAND USED AS OFF$ET TO OBTAIN POINTER
,'1'0 SELECTED SUBROUTINE
1 ~R. J
1084
II')Q7
PAGEl
BINWRDe 0
D 7.[> " '1
,"~C'i11 27(1006)
14-DEC-76
DZI)"H.Pl1
09-0Ii;C-76 14:59
1 "41
16132
PAG! 22
CENFRAL l1TILITIES e TYPEOUT, ERROR, SCOPE, ETC)
,I?ROCf.SSOR WILL TPAP HERE ':HEN PO"'EIl IS RESTORED
,"'Q
0052<;2
"1'<;2<;2
1 nq4
,,"<;'60
1 n~c;
n"';2"'~
1""<'
')P5270
IIFSTAR:
01:1737
0127M.
n 1370 I
OOSnn
n~,)?4n
Ol'! 20n
0014()4
nn] d \ 6
onon24
•• PF'AIL.:7.4
'~TACIC. 51'
DMCSR.R!
TEMP
ISH UP fOR POWEll fAILURE
,R~_SET THE STACK POTNTER
; Rr.STOIlE RI
,READY .OR TIMMf:H
OZO'lH
MACYll 21(1006)
14-0F.:C-76
DZ!)MH,Pll
Og-OEC-76 14159
\ 097
10'H!
1099
1100
1101
1102
11 ('13
11(14
110">
l!Cl6
1107
110P
11 09
1110
llU
1112
110
1114
1115
1 I 16
II t7
! 119
I I 1q
1120
11;11
117:.>
11'23
1124
0052H
005300
00'5)02
000;306
005312
00'.;316
005322
0053:?4
005326
005332
005334
005336
005340
005340
005346
005350
005352
005352
005354
OOS 35'"
005364
(0531)6
f)0C;370
005370
005376
005404
0(15237
001416
104402
104411
105037
005037
005011
104412
000177
000001
003
01'11226
005577
005332
001325
001234
012777
104414
121111
000020
oot 375
PAGEr
16132 PAGE 24
GENERAL PTILITIES (TYPECUT, ERROR, 5CjPE, ETC)
1 '73E06 2
PFTASI
.BYTE
002
INC
BNE
TYPE
CNVPT
CLR8
CLR
CLR
MSTCLII
JMP
1
3,2
'fSTNO
TEIolP
,-4
, MPFAIL
,PfTAB
ERRFLG
LSTERII
(RU
.UTURN
0044
t PLUS ONE TO THE T1 MER I
ISR IF MORE TO GO
ITYPE THE MESSAGE
I TELL WHAT TEST TO !'!ETU!'!N TO,
ISTART CLEAN
,,,.,,.,, ......
,CLEAR lolA! NT BITS
,STAIIT CLEAN UP OF DEVICE
I START DOI"G THAT TEST AGAIN.
,DELAYI
174044
MOV
ROMCLlC
121111
nO,.DMp04
,NEXT WORD IS INSTRUCTION, ROMCLK PC.5304
I pon CLOC!!: DELAY BIT
lSI
104414
1 '2t'224
032777
001172
000002
000020
174026
INEXT WORD IS INSTRUCTION, ROMCL" PC.5304
RO MC I.!!:
121224
BIT
SEQ
RTl
.BlT4, PDMP04
BIS!.!
SICB
RTI
,SET MASTER CLEAR
.BlT6, tlDMCSRH
,CLEAR MASTER CLEAR UD RUN
nIT6IBIT7, (lOMCSRH
, RtTURN
BISB
MOV
ADD
BIT
SEQ
HALT
BISB
BICB
RTI
,SET ROIolI
,LOAD INSTRUCTION IN SEL6
,ADJUST STACK
,HALT IF SW06 =1
,SR IF SW06 .. 0
11
,HALT BEFORE CLOCKING InSTRUCTION
tB1'I'11SITO, IiIDMCSRH ,CLOCK INSTIIUCTIO"
.8IT21BITlIBITO,tlDMCSRH ,CLEAR ROMO, ROMI, STEP
I PORT4 .. IBUS*11
11
,IS CLOCK BIT SET?
,SR IF NO
.JolSTCLRI
152777
142777
000002
000100
0('10300
174('110
174002
152777
000002
173774
000002
OOO! 00
173772
173550
000003
000007
173742
173734
l1i~
1126
1117
112R
1129
1130
1111
Ill?
1133
tlH
I I J5
11 36
, I 31
t1 311
113'1
1140
114 t
1142
1143
1144
1,40;
1146
1141
11 ~ p
11 4'1
, 10;0
I' '5 \
110;'}
005406
005406
0f)5414
00';420
005424
005432
005434
0(15436
005444
005452
062746
032777
001401
000000
152777
142777
00000'2
005454
00'5454
005460
OOS464
005472
00S500
000;506
000;0;11
f) ()5 '5 I 4
11(15516
013637
062741)
152777
027777
142 1 77
005337
001364
0001'102
0001'101
001416
000002
000020
173706
000020
001416
013637
062746
001416
000002
0l'lS520
005520
005524
0055)0
1'1050;30
,ROIIICLK,
013~77
173714
173704
173700
110;'5
1151>
11 .. 7
11 '5R
11"9
11 !'o0
IHI
\162
1163
OQ .. 5J2
1)00;534
(\0-;542
1'105544
0110;'544
00'5546
005550
005<;56
0 0 5560
005564
OO!i566
,DATACLKI
MOV
ADD
lSI
BISB
CMP
BICB
DEC
SNE
RTI
,BLl(lI
351
f(SP)+,TEMP
12,·(SP)
,BIT4, 'DMCSRH
'DMCSII, IiIDMCSR
.BIT4,@lDMCSFlH
TEMP
1$
,PUT TIC" COUNT IN
,ADJUST STAC"
,SET STEP LU
,WASTE TIME
,CLEAR STEP LU
,DEC TICK COUNT
,BR IF NOT DONE
,RETURN
!lCSP).,TEMP
12,·(51")
,MOVE COUNT TO TEIilP
,ADJUST STACK
TE~P
,TIMERt
MOV
ADD
1$1
ReMCL!(
104414
DZO""
'I~rY1t 27(1006)
14-DEC-76
PZD"H,PI t
09·DF:C-76 14:5'1
1\ 51
IIH
lSI
IBIT1, tlDMCSRH
• CSP)+, (lDMP06
",·UP)
UIl06,UIIR
021364
032777
1)01772
,NI!:XT WORD IS INSTRUCTION, ROI4CI.K PC .. 5304
16132 P~GE 25
GENERAL UTILITUS (TYPEOUT, I!:IIROR, SCOPE, ETC)
021364
000002
(1)45
I POR1'4.IBUS* REGll
, IS PGM CLOCl( SIT CLEAR?
,BR If YES
BIT
173650
PAGEl
SEQ
25 I
104414
021364
032777
001372
005337
001361
000002
000(102
ROMCLI(
021364
BIT
BNE
DEC
SNE
flTI
173634
001416
12"DMP04
2.
TEMP
U
,NEXT WORD IS INSTIIUCTION, ROMCLK PC .. 5304
,PORT4_IBUS* REGlt
, IS PGM CLOCK BIT SET?
,SR IF YES
,DEC COUNT
,SR IF NOT OONE
I RETURN
IH4
,q, ..
1100;570
(2)
00557<1
(n
0)
(;1)
(? )
0f)5O;77
1\"'5635
00'51'057
005662
1'100;707
005733
000:;7<15
00<;774
001'.002
01'16010
00fin21
(106032
006044
006046
006121
1'106116
0 0 6165
nl)<'224
0)
ol1!;2H
(7)
nn6352
0(11'.412
nn64J0
"'1)6451
006511)
006606
(7)
01
(2 )
(2)
r 2)
eLl
(1)
(2\
en
rn
(2 )
(2 )
(2)
(:"
C71
(?l
( 2)
Ol
0)
(2)
(1067~O
(71
00&10;6
0(\71)16
0070'16
007107
"',)71 t7
007125
01)71 &7
nl)111 I)
()'I72211
( 2)
r? )
(?1
0)
(2 )
( 11
(i)
{2 \
020040
005015
377
377
177
047177
377
377
377
o''I\lj03
(142526
040~20
105
042524
000052
05P77
120
020212
377
020212
,121\;77
0'4377
041777
053H7
177
(144777
053777
00;1777
n51717
044777
04H77
177
116
377
"7
024,)40
0?4'14"
PI
(100077
MOMI
• .1 ... ":' .. .,.. ..
000
053520
047105
000122
020117
047111
042524
047514
035122
035103
051523
051122
052123
052105
035103
020040
020040
050040
026455
053517
051123
041505
051102
020106
044510
044~27
044527
1)20121
020117
051412
053505
042377
OS 4105
046!\1l4
04651 3
020122
020104
042504
052523
052123
045503
000040
000040
051505
051117
047040
051440
000040
020040
020040
020103
026455
046440
040440
047524
050040
046504
044103
041524
041524
044124
042504
051127
020071
041515
04252(1
024503
0245('13
MPFlILI
MEPASSI
loll'll
t'ERR21
HERR]I
MTSTPCI
KLOCKI
MCSRX,
MVECXI
MPAtlSXI
MtRRll
MTST"I
HASTEKI
MNEW,
MERRPCI
XHEAO,
NUM,
CSRI
VECI
PRIOI
CPAMI
folOOUt
LINEI
8MI
COlli'll
NOACTI
SliMES,
S'liMESll
rONER? I
CNEFIRI
OMC"'I
l""ICMl
,~~~!;
:"scii
,ASCIZ
,lISCn
,flSCn
.ASCIZ
,ASCIZ
,ASCIZ
,ASCIZ
,,,scn
,ASCn
,ASCIZ
,ASCIZ
,ASCn
,ASCIZ
,ASCIZ
... scn
,ASCII
... SCII
.ASCIZ
,ASCIZ
, .. scn
,ASCn
,ASCIZ
,ASCIZ
,ASCIZ
,ASCIZ
, ~Sr:IZ
.ASCIZ
,ASCIZ
,ASCIZ
,ASCIZ
,,,sca
,Ase IZ
,ASCIZ
,~SC IZ
<377>/RI
<377>1"0 DEVICES PRESENT ,I
<377>/IlUIUFFICIENT DATAl I
<37"1>/TE8T PC·I
<377>/LOCIC ON SELECTED TEST I
ICSRI I
IVEC, I
!PASS!ISI 1
IERRORSI I
!TEST NO, I
1*1
<377>ISET SWITCH REG TO DMCl1' S DESIFIED ACTIVE ,I
IPet I
<212>1
<377>1
<212>1 PC
<377>1·····-
~06
,,,yorE
, \~7
, 1" Q
Ml7?H
no., 2 31'>
'1"'1241-
TI'''PI
Ill'f,
, /HOW MANY OJolCI1'S TO Sf: TESTED"
<377> ICSR ADORESS7I
<377>/VECTOR ADDRESS?I
<377>/BR PFlIORITY LEV!L? (4,5,6,7)1/
<377>I1F D~C HAS CRAIol (M8204) TYPE "Y", IF CRO"l (1018200) TYPE "'I"
<377>/WHICH LINE UNIT? IF NONE TYPE "N", IF Mi201 TYPE "1", IF M
<377>/SWlrc~ PAC'I rDnCMp LINE ')?I
<377>/SWITCH PACI2 (BMBH BOOT ADD)?I
<377>115 THE LOOP BACK CONNY-CTOR ON?I
<377>1"10 DEVICES ARE SEt.ECTEDI
<377>< 12> IS;;!'!. 1
INEW? I
<377><)77>/D'IC11 CONfIGU!lA!I(1'1 El/EXP'=CTED rOUNDI
I COMC) I
I (KMC) I
,I'VI'N
1)1172]1)
1),)7211
~ClO'll\o;
11.,1;
(?l
11
't~~~~?~
/PWR FAILED, RESTART AT TEST I
<177>/E~D PASS DZDMH
I
OJ
6.3
f\,3
MACYll 27(1006)
OZOl'H
14-0EC-76
OZOlOH.Ptl
09-DEC-76 14:59
1171
1172
1171
1174
117"
117;;
1177
11711
tl7'l
1 UIO
007244
007246
007250
00"52
007254
1211
1215
1216
"17
12H
121 9
InCl
I'? 71
1222
122~
1224
122<;
122<;
DOl
OOb
002
TEMP]
oBYTE
TEMP4
oBYTE
TEMPS
001256
000')00
007320
.~.+40
007320
000000
007362
MOATAI
.... +40
0()7362
O()73'70
007372
(107400
007402
007410
0'17412
007414
007416
n07420
n07426
O1l74~0
0')7434
OOi440
017442
on7444
007450
007454
nl>7460
00741;2
007466
007470
0'17474
0·j7476
00'7502
007504
007506
007512
0'17514
007516
007570
0fl7522
007524
0075]2
007534
01)7';36
007542
022737
001071
022777
001404
022777
001061
010246
010346
010446
012737
005002
012704
104402
10441 i
0i'l7612
104402
004737
022703
001424
0227n)
001416
022703
001754
02270)
0017.,2
005004
042703
006302
006302
00&302
050]02
000752
n12766
005704
001('02
010277
(051)37
123"
1231
lH2
007556
000000
00'7561)
01)7564
007r;66
n07572
007576
007600
nt)7604
on7610
105777
100375
017703
105777
100375
010]77
042703
000207
n07612
007614
0')761 F,
000001
006
nOOI7"
12!<;
12,)6
1?P
t2H
1239
1240
1241
124,
1243
1244
1240;
rOR IIIPUT-OUTPUT
INSUFt
I ROUTINE USED TO CHANGE SOFTWARE SWITCH
,PEGISTER USIJIG THE CONSOLE TER"'INAt"
012604
01261)3
012602
000207
1233
1214
6,2
r •••••• --•••••••••• --_ •• - ......... - ••••••
007546
007550
0(')7<;52
Of)7S54
1227
0046
6,]
r 8UFFERS
007256
(l00176
001202
000007
171606
(l00207
171576
177777
007556
177777
007107
CKSWRI
CM?
BNt
CMP
BEQ
CMP
BNE
MOV
1$1
MOV
MOV
MOV
CKSWRII CLR
MOV
TYPE
ei{6iiR21
000012
000025
000007
SEC!
177770
002002
000006
171440
007556
4& I
5$:
6$ I
ISWREG,SWtI
CICSWR5
t7,eTKDBR
11
t207,ttTICDBR
CKSlfR5
R2,-(SP)
Rl,-CSP)
R4,-(SP)
'-l,SwrLG
R2
.-t,R4
,SWMES
CLR
BIC
ASI.
AsL
ASL
BIS
BR
MOV
TST
BNE
MOV
CLR
.SWMESl
PC,INCHlR
U5,Rl
5.
t12.Rl
U
U5,R3
CKSIIRI
.7,lIl
C!I!5!!1!H
R4
.177770,R3
R2
R2
R2
R3,1I2
CKSWR4
• ,START,6 (SP)
R4
6'R2.liISWR
SWFLG
(SP)+,R4
(SP)+,R]
(SP)+,R2
PC
SWP'LGI
171414
171412
171406
000200
n02
,or SOFT SWITCH REGISTER
,TYPE -NEW? •
:GET RESPONSE
,WAS IT A CR?
,BR IF YES
,WAS IT A LF'?
,BR IF YES
J WAS IT CTRL U?
,SR Ir nS(START OVER)
, IF CNTL G GET NElCT CHAR
,IT MUST BE A DIGIT SO CLR FLAG
,ONLY 0-7 ARE LEGAL sa MASK OrF BITS
, SHIrT 112 3 TIMES
,ADD LAST DIGIT
,GET NEXT CHAIIACTER
,LF WAS TYPEO so GO TO START
,IS FLAG CLEAR?
,IF NOT DON'T CHANGE SOFT SWR
, IF YES THEN WRITE NEW CONTENTS TO SOFT SIIR
,CLEAR TYPEOUT FLAG
16132 PAGE 27
GENERAL UTII.ITIES (TYPEOUT, ERROR, SCOPE, ETC)
MOV
MOV
MOV
CKSIIIl5: RTS
171420
,IS THE SOFT SWR BEING USED?
,BR IF NO
,WAS CTRL G TYPED? C7 BIT ASCII)
,BR IF YES
,WAS CTRL G TYPED? (8 BIT ASCII)
,BR IF NO
,STORE tl2
,STORE 113
,STORE R4
,SET SOrT TYPE OUT FLAG
,CLEAR NEW SltIll CONTENTS
,SET FLAG TO ALL ONES
,TYPE -SWR= •
,TYpE OUT pRESENT CONTENTS
CWVRT
SOFTSN
CKSNR3l TYPe:
CKSWR41 JSR
CMP
BEQ
CMP
BEQ
CfIIP
BEQ
CMP
007117
007560
000015
DZDM'l
"'ACYl I 27(1006)
14-0EC-76
DZDM,.f. Pll
09-DEC-76 14159
12 2~
lnq
PAGEl
.EVEN
1181
1192
11 P3
IHl4
IIR5
IIElb
1187
1188
1tS9
1190
II'll
1192
1191
1194
1195
119f,
1197
1198
tt99
1200
1201
120;>
i 70;
1204
1205
1201;
12"7
12C'1R
120Q
1210
1211
121?
121 ~
001252
006
001254
16132 PAGE 26
GENERlI.. UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)
INCHAIII TST8
BPI..
MOV
TSTB
BPI..
MOV
SIC
IITS
liITICCSR
0- 4
(lTKDBR,Rl
ilTPCSR
0- 4
R],liITPDBR
,BIT7,Rl
PC
SOFTSWz 1
.BYTE
/lWREG
6.2
,RESTORE R4
,RESTORE 113
:RESTORE R2
,RETURN
PAGE:
0047
OZPMH
"ACYI117(1006)
14-IlFC-76
OZ1)'1H.Pt1
09-DEC-7t1; 1415'1
Htl32
P~GE 2Q
CiCNFlOU ;JTILlTIF.S (TYPEOUT. ERROR.
SCOPE. ETC)
124€1247
I
,POUTINE USED TO ·CYCLE" THROUGH UP TO 16 DMCll'S
,THIS ~OUTINE SETS UP THE CONTROL ADDRESS FOR THE DIAGNOSTIC
,AND RUNS THE SPECIFIED DMCl1'S,
THIS ROUTINE *MUST.
,BE RUN FIRST SErORE ENTERING THE OIAGNOSTIC rOR THE
,SETUP NECESSARY.
12~~
124'1
12~'\
12~ ,
12!'>:1
1253
1254
t 255
12511257
125q
125'1
1260
12/\ 1
DI-2
12()~
t 264
1265
126~
1267
1261l
12()'l
1270
1271
t 27 2
1271
1274
t 215
1276
1277
12711
127Q
t 2Rn
,
01)71>20
007624
007626
007632
0076H
007636
007640
0071;44
007"'0;(1
0076~6
007f,fi4
0071'72
00;r'4
007702
007710
00771 "
007720
(1)77;>4
01)7730
007734
007740
007746
01)7752
0077 51>
007762
007766
007772
0'17176
010004
010010
01(1)16
01 0 022
005737
001004
104402
000000
000776
01)0241
006137
onS537
062737
062737
1)22717
001006
012717
012737
013717
001747
01 )700
013702
012037
011031
1)~2737
001306
CYCUI
007056
1$,
001316
001316
000004
000010
001700
001322
001320
001320
001500
001702
001316
001320
001322
001306
001320
001322
001404
0('1374
177000
001366
001370
00137'2
001230
001212
000002
001404
001406
001406
(101410
001410
001412
001412
001 4 14
001374
12~7
0100~0
11,R
1 ?RQ
1290
1291
0100'4
010042
012037
012037
01203 7
(It2237
012237
012700
013737
01)5237
(113737
005'237
013737
060037
013737
0">0037
010046
010054
1)10060
0100fof>
010072
01')100
013737
(61)037
01373'7
06(0)7
013737
060037
001374
001376
001376
0014110
001400
001402
001376
01011)4
01011"
(110114
010114
(327)7
000002
001236
!?~ I
121l;>
1 2~ ~
t 2114
12@'i
12~"
12'??
1293
1294
12'10;
t
2Q~
129'
12'10
\20Q
13'10
1301
001406
001410
001412
001414
ADO
001402
001450
010137
0101H
nl 1l131\
1)10140
01 nl 42
IlI0143
011'144
010150
01 (l152
'" III 0;4
DMACTV
,ARE ANY DHcn's TO BE TESTED?
,IIR IF OK.
,NO D"'Cl1'S SELECTED I I
,STOP THE SHOW.
.-2
,DISQUALlry CONT. SW,
,CLEAR PROC. CARRY BIT.
RUN
,UPDATE POINTER
RUN
,CATCH CARRY FROM RUN
I4,MILlC
,UPOATE POINTER
110,CREAM
,UPDATE ADDRESS POINTER.
IOM.MAP+200.CREAM
28
,KEEP GOI NG, NOT AI.L TESTED FOR.
,DM.HAP,CREAM
,RESET ADDRESS POINTER.
'CNT .MAP. MILl(
,RESET PASS COUNT POltfTER
RUN,D14ACTV
,IS THIS ONE ACTIVE?
1$
,aR IF NO
CREAM, RO
,GET ADDRESS POINTER
MILK,1I2
,GET PASS COUNT POINTER
(RO)+,OMCSR
,LOAD SYSTEM CTRL. REG
(RO).OMIWEC
,l>OAO VECTOR
U71000.0!4RVEC
,CLEAR UNWANTED BITS
(RO)+,STATl
,LOAD STATt
(RO)+,STA12
,LOAD STAT2
(ROH,STAT]
,LOAP STAT3
(R2l+, PASCNT
,LOAD PASS COUNT
C!t2)+,ERIICNT
,LOAO ERROR COUNT
12,RO
,SAVE CORE THIS WAYI
OMCSII,DMCSRH
DIIlCSIIH
OMCSRH,DMcn
OMCTl>
DIIlCTL, OMP04
RO, OMP04
D)!P04, DMP06
M,DMP06
18
,NOACT
,
ADD
OMRVEC,DMRLVL
RO,DMRLVL
DMRLVL, DMTVEC
RO,DMTVEC
DMTVEC,OMTLVL
RO,DMTLVL
BIT
BEQ
71
,IS TEST NO. SELECTED
IBR IF NO
TST
'142
,RUHIfING IN AUTO '"'ODE?
ISW01.S'l'RTSW
,PTY LVI.
,TX VEC
I
,TX LVI.
4$1
005717
0011042
n
OIOIJ\J
MOV
ADD
MOV
ADD
MOV
001400
DZOM;;
'HCYII
(1 006)
14-DEC-76
DZO"''''.PI1
oq-OEC-7f; 14:59
0111120
01012'
') 11) 12,.,
2S1
TST
BtlE
TYPE
HALT
BR
CLC
ROL
ADC
ADO
APO
CMP
BNE
"'OV
HlOV
BIT
BEQ
'40V
MOV
MOV
MOV
SIC
/l40V
MOV
MOV
""OV
MOV
MOV
MOV
INC
MOV
INC
MOV
ADD
MOV
00 \040;
104402
104403
0061132
16132
PAGE 29
GENEilAL IJTILITIES (TYPEOUT, ERROR, SCOPE. ETC)
BNE
TYPE
INSTil
"'TSTH
PARAM
005574
10440~
o,~onOI
1
00 1000
001726
<)00
001
01270(1
022710
012737
on 1 ,)20
1000
TSTNO
,BYTE
.BYTE
015766
5Sl
(\23760
001014
022160
0010111
001226
000002
''''P
BNE
001226
000004
0\0037
104402
042737
00041 ?
00S120
020027
001151
1114402
000730
001214
00565'7
000002
CMP
BNE
MOV
TYPE
BIC
BR
TST
CMP
BNE
TYPE
BR
010234
010242
010246
012737
0137:')1
000177
015766
001404
170742
681
031442
005570
001214
7$1
8SI
,9R Ir YES
, NCIILr
,GET TEST NO.
o
I
MOV
CMP
MOV
SNE
010156
010164
"10166
010174
010176
01 (1202
~ 10206
010214
01021 (,
010220
010224
010'26
010'32
001236
,.
PAGE:
MDV
MOV
"Mp
ITST1,flO
(PC)+, (PO)
(PC) +, '(PC) +
tiS
,CMP rIRST WORD TO 12737
,BR Ir NOT SAME
!SrNG,~cr.~j
:eC!S
6$
tTSTNO.4CRO)
,BR IF ~O
,IS LAST WORD OK?
,8R IF NO
,IT IS A LEGAL TEST SO 00 IT
68
RO, RETURN
,loll'
uwO 1. STRTSW
!!1~O ~'!C~?
8S
(110)+
110, ULAST+! 0
U
,POP AO
,AT END YET?
,8R IF NO
,YES tLLECAL TEST NO.
,TRY AGAIN
nST1, RETURN
DMCSR,Rl
'RETURN
,PREPARE RETURN ADORESS
,Rl
BASE OMC 11 ADDRESS
,GO START TESTING,
~.
,MQIoI
=
,ROUTINE USED Til ",WT('I SIZE" THE DMCI!
,CSR AND VECTOR.
,NOTEI
THE CSR MAY BE ANY WHERE IN THE FLOATING
,
ADDRESS RA"'GE (1600001164000)
,
AND THE VECTOR ~AY BE ANY WHERE IN THE
,
FLOATING VECTOR PANGE 000,770)
,
0102'5?
rl102<;2
1'110254
01~260
01nr,2
0102611
01 n27~
Ol1l2H
",03'. 0
'
01 n 304
nl n,'
Iloo;n J7
AlITO.SIZE,
RESFT
CI\RMAPI MOV
1$:
CLl<
C'IP
BNt
IH\1500
001701)
00 \ 31 0
01')1500
(101306
0('('('01
tOM.END,1I2
IS
DMNllM
MOV
CIF
ElIT
BHE
n"'ACTV
'I\WOO. STPTS',
,+6
75
.1. TE"'P5
"" 11'0'
or n Il7
0\ 0744
",,.v.p
'I i ~ '7 ~ 7
1'.,4·." ..
('\ '11'"
O!
loA"\,
~1?~
on737
00123'"
'014, M.P. R2
CR2h
CLR
1,
nl ~'I 4
(), 03 f r,
n,
010005
012702
005022
'>22702
(101374
0115037
'12701
lDtoI.MIIP,R2
,INSURE A BUS INIT,
,LOI!.O MAP pnINTER,
,ZERO E'lTlRE "'liP
,ALL DONE?
,Ell! 1P' NO
,SET OCTAL NU~BER 0" D!oIe 11 'S TO 0
:112 POINTS TO O¥C "AP
;CLE:AR ~CTIVf,
: QUESTIONS?
:1>1'1 n' YES
; If "0 SKIP GL;ESrrOlliS
I ,c;r~P::' "'IT"! 1
0049
14-DF.C-76
OZOMH
MACYll 27(1006)
09-DEC .. 76 14159
OZOMH.Pt I
13!\~
135Q
1361')
1161
13"'2
1363
1364
1365
11f;6
13"'7
1369
1369
1370
i 371
1312
13'73
1374
137<;
1376
1377
13711
137Q
n~n
13«1
t 3~'2
13q
13114
1395
1311"
1387
13Q~
139 0
13QIl
1301
13'l2
13 QJ
1394
1395
13911397
130R
139Q
14r.(I
14()!
14n,
14(1~
1404
14()~
140';
14n7
14 '1R
140q
141
~
1411
1412
1 41 3
010332
010334
010336
010340
010342
01034]
1)10344
0103'52
<)10356
010360
010362
010366
010370
0\0;72
010374
010]76
010400
010402
nl0403
010404
010410
(11)412
010414
010416
010420
010422
010424
0104]5
010426
010432
010434
010436
010442
010446
(111)450
01"454
010456
0104&2
01(1464
010466
010470
010474
(110476
0105(1)
010502
010504
010506
0100;10
01 OS 12
010516
010522
010524
010<;30
0105 )2
nl""H
010<; 31>
104405
00000 I
000020
001252
('152712
104402
(l06M6
0'.)4717
022703
001417
nt0562
!,\"l".,t\1
1412
010566
010570
1421
010~74
t4/4
010516
010600
010602
01n(1)4
0101\10
010612
01(1614
01 (11,20
010622
010624
01(\530
010634
.,1,'636
010642
010&44
010646
010650
0101\52
010656
n 1 n660
n10664
0\0664
010666
(11)670
010672
010614
010616
010700
010701
010702
010106
010710
1\10712
(110714
OI071!'
010720
011)722
011'723
(\ 10724
011'(7)0
nl0712
010736
01 n740
010144
'>I 0750
"I (170;"
001412
022703
001403
1 04402
00"<;70
01)0760
0"2722
022222
000447
00;2712
104402
0,,7(l16
0'14737
('1227"3
001406
022703
(1)1406
104402
005<;70
000763
00;2722
000402
042722
11/~
t478
1429
143')
1431
143?
1433
1434
1435
i43~
1437
141 Q
1439
1440
1441
IH,
1443
1444
1445
1146
1447
11 4R
1149
1450
1451
14<;2
1453
14.,4
)4<;5
145fo
1457
14';Q
\ 45'1
1460
14&1
H.,2
1 4 63
1464
14""
14&"
1 ~"7
,
4~~
, \',q
001310
12$1
001256
001254
001254
10"
011734
000024
000021
000011
17017'7
SOU
'04402
010540
010544
010546
010"i50
010554
O! 0560
1426
1427
001252
005574
:04410
005"70
000'752
104402
006510
004737
022703
001406
022703
001405
104402
005<;70
0 11 0763
8S1
011734
00(1131
000116
l.4-DEC .. 16
14:<;9
toOOoo
i
TEMP],DMNUM
, MCRLr
TYPE
CONVRT
WHICH
INC
Ilf5TR
CSR
PARAM
160000
164000
TtMP4
.BYTE
.BYTE
MOV
INsn
VEC
PAItAII
0
776
TEIIP4
.BYTE
.BYTE
MOV
TYPE
PIUO
JSR
CMP
0
1
TEMP4, (R2)+
9$ t
16$1
011734
000021
000022
000116
010000
32$1
020000
31$1
30$1
01 t 734
000131
0
1
50.
SIS
TYPE:
MOOU
JSR
CM?
SEQ
CMP
BEQ
CI'P
SEQ
TYP!
MQM
SR
SIS
CM?
BR
BIS
TYPE:
CONN
JSR
CMP
BEQ
040000
17$1
040000
1981
BEQ
TYPE
MQM
BII
SIS
BR
BIC
,STORE VECTOR HI MAP
, ASK WHAT 81'1 LEVEL
,GET RESPONSE
,
,
PC,INTTY
124,Rl
'27,R3
50.
111,1'14
1'13
R4
CM?
0001 i6
,BR IF LESS TIIAN 4
as
,BR IF GREATEll THAN
,1'14 .. NUMSEP OF SHIFTS
,SHIFT R3 LEFT
,DEC SHIFr COUNT
,81'1 If' NOT DONE
,BIC UNWANTED BITS
,PUT BR LEVEL IN STATUS MAP
,CONTINUE
10.
,RESPONSE IS OUT OF LIMITS
,TRY AGAIN
, .. 4
U70777,R3
R), (1'12)
,DOES ONC IIAVE CRA!Il1
PC,INTTY
t131,R]
,GET REPLY
9.
US
,YES
,NO
,NOT A Y OR "
as
: TYPE "1"
,ASK AGAIN
t116,Rl
SCOPE, ETC)
'BIT15, (R2)
PC,INTTY
121,1'13
lOS
In,R)
318
U16,R3
128
,SET BIT 15
Ir
CRAM
,ASK WHICH LINE UNIT
,GET REPLY
, "I"
,Ir
tBIT12, (112)+
(R2)+, (1'12)+
NOT A 1,2 OR N rYPE "1"
,TRY AGIAN
,SET BIT 12 IN STAT2 IF NO LU
,POP OVER STAT2 AND STAU
181T13, (R2)
,SET BIT 13 IN STAT2 IF M8202
PC,INTTY
'131,1'13
, ASK If' LOOP-BACK IS ON
,GET REPLY
IY
165
H.
1"
IU6,1<3
18.
10.
.SIT14, (1'12)+
19'
.BITt4, (R2)+
,IF NOT Y OR N TYPE ","
,TRY AGAIN
,TURNAROUND IS CONNECTED
I NO TURNAROUND
INSTi<
LINE
PARAM
o
3'77
TEMP4
,IIYTE
.BYTE
MOVB
INSTR
1100
001254
I I
o
1
TEMP4,(R2'"
,STORE SWITCH PAC IN /lAP
8"1
PAPAM
o
377
TEMP4
.8YTE
o
.BYTE
1
001254
~OVB
1'I!'112<;2
3'5:
TST
['IEC
T£MP4, (R2)"
(R2)+
TEMP3
12$
011351)
,." (lnon
'1\ I 447
7 S:
0"1
;1~<;n
0051
,STORE CSR IN MAP
TEMP4, (1'12)
Bill
TYrE:
HO\li MANY
TYPE WHICH ONC IS SEING DONE
; l'EIIIP5 IS WHICII CMC
TEMPS
CMP
BLO
MOV
ASL
DEC
BNE
BIC
BIS
BI'!
MOM
BR
TYPE
CRAM
JSP
CMP
BEQ
CMP
BEQ
TYPE
MOM
8P
,OHNUM •
I
1981
113772
on<;722
!l"5337
0"1 '00;
0"0 1 ~7
III 27(lt
(II ~137
PAGEl
0
.BYTE
MOV
16132
PAGE 31
GENERAL UTILITIES (TYPEOUT, ERROR,
10440]
0('6720
11)4405
0"0000
0003'71
01)1254
001
113722
10HO)
006756
11\4405
000000
ODO)77
001254
')00
0050
1
16.
TEMP3
.IIYTE
noo
011450
005231
11)4403
006412
104405
160000
164000
001254
000
001
013722
104403
006430
104405
000(100
000'776
001254
1)00
001
(113712
104402
006451
004737
022703
101014
02270l
1 (l3l 11
0127(14
0(16303
005304
001375
0 4 2703
050312
000403
PAGEt
PARAM
OOi
013"37
104402
OZO~1
'6S,IiI'4
CI.P
(PI)
,STORE SWITCH PAC 1'4 MAP
,POP OVER STA13
I DEC DMC COUNT
: HR II" "ORE TO !'IO
:cn'4TPWE
: SET POI' F"I !'1ST ADDRESS TO BE TESTED
I sr.1 POR ~mN-F:X I STANT DEVICE TIME OUT
:CLEAR SEI,O
OZDMH
MACytl 27(1006)
14-D~C-76
DZD"IH.Ptl
ng-D!:C-76 14159
\470
1471
14'72
1473
1474
t 475
1476
1477
1478
1479
1480
1481
14112
14P3
1484
141'15
14~6
14E1'7
1488
1489
149n
010760
010762
010764
010770
0107'74
010776
011002
011006
OP014
011020
011026
0110]0
011 036
011040
011044
0\ 1052
nt 1 056
011062
Ot! 070
011072
011100
005711
001162
005061
005761
001155
012111
OOS061
012761
OS2711
022761
001004
052762
00042 I
012111
012761
012711
1)\2711
022761
001404
022761
001113
011102
011104
011110
011114
011122
()11126
o 11134
011140
010122
012711
005061
012761
052711
012761
052711
122761
001003
052712
tl00416
032761
001403
16132 PAGE 32
GI!:NERAL UTILITIES (TYPEOUT, tFlfIOR, SCOPE, ETC)
TST
8NE
CLR
000006
000006
12~252
000006
020000
125252
000004
100000
000002
001000
100400
001400
002000
06322(')
177777
1492
14Q3
1497
14911
t 4911
1'500
1'501
1502
1 50 ~
l'5n4
1'505
10;06
1507
150~
1'51l9
I r; 1 n
1"11
"H2
1513
1 0; 14
151 "i
1516
1517
I ~ 1A
1519
1'520
10:;21
1522
1"23
1524
1525
(l1114~
011150
011154
011156
011164
011166
011172
011174
0\1202
011 ;.>04
011212
011220
011224
011232
011236
011244
011246
011252
011254
011262
011266
011272
(\1130r)
011304
01131 "
011312
052712
000427
032761
001023
01"61
012761
052711
012761
052711
012761
001402
00;2712
005722
012761
012711
156122
(I 12761
012711
156122
005722
005011
0010110
000004
122113
000400
021264
000400
0110377
000006
000006
000006
000006
000004
010000
000002
000004
060000
000010
000004
000100
122113
000400
021264
000400
000010
000004
000006
000006
000004
040000
021324
001400
0000(')4
1121344
001400
000004
000006
000005
DZO'4H
"ACYlI 27£11')06)
14-0EC-76
DZl)"tl,Pll
09-0[C-76 14:59
1526
l'i27
1'i2A
l'i29
10;30
1'53\
1'532
1'533
1534
1'535
1'511',
1537
I') 39
!54Cl
!'HI
1 "i42
1543
1544
10;45
1<;4&
1517
1549
1549
1550
1551
10;52
1<;53
1554
1<'5,)
1<;56
10;<;7
1<;')11
1559
1560
151i I
1 'i&2
1'561
151'04
1'\65
1<;66
1567
1<;61'1
1569
1570
Iql
1572
l'iH
1'514
1'175
I"iH
lq7
15H
1~ 1 Q
1 ~"~
p~ ~!
011314
011320
011326
011330
011332
011336
011342
011346
011150
011354
1)1 \ 360
011362
011366
"11374
011400
1)11404
011406
011410
011416
n11424
011HO
'111434
011436
011440
011442
011446
011450
011452
011454
0\ 1 4S6
01 I 464
011466
011474
011502
01lS05
011512
011516
011521')
011524
0110;26
011532
01 ISH
01 \ 542
01 t 5 46
011 '5'50
nllO;54
011562
nl1Sfi4
011572
011 r;7b
nIl" r 4
"1''''/\'2
;; 1 ~ ~ ~
005237
n;!2717
001410
(,n5011
nOS()61
062701
1)22701
001203
005037
005137
001421
1113701
010137
0"6137
005237
005301
0'l117t
'112737
013137
000\ 37
1')4402
005000
000000
000776
012716
000002
001310
0llo020
032737
INC
(l! 2701
010120
012721
022021
020127
101771
013137
006'l37
\l1 3J63
012704
III !\417
011201
(11?7f, I
111 i"' \ !
n 1 '7~ t
n' 7711
t ',r;., Of'
C~P
001HO
1411
011
001306
001310
BEO
CLR
CLR
ADD
CMP
BNE
CLR
TST
AEO
MOV
001310
(1111314
MOV
001306
001306
ROL
INC
DEC
8NE
000004
001312
581
011336
6$ I
iiHICH,
002
000001
001236
000]40
011650
01l1S00
000100
OCl0302
000022
000020
001114
012702
012700
flnU,2(R2)
,WRITE ITI
,WAS IT WRITTEN'
,IF NO IT IS NOT CUM
,8E'l' 8U't5 IF CItA"!
221
,BITt, (Rt)
tt00400.6(Rl )
.8ITtlBIT8, (Rt)
.BITtO, (Rll
.63220,6(R1 )
Il01246
2SI
MOV
MOV
MOV
CMP
BLOS
PoIOV
ROR
ACC
"'[1.
1'M200
noo
Mrv
1 '1111
O~ 1400
~r'lV
"'r, v
H:
CIt1)
&CRt)
110,Rl
'164000, Rl
2.
OMACTV
DMNUN
"
PAGEl
,ARE MAX. NO. OF DEV rOUND?
,YES DON'T LOOK rOR ANY MORF..
,CLEAR BIT 10
,CLEAR SEL 6
,UPDATE CSR POINTER ADDRESS
,BR IF MORE ADDRESS TO CHECK,
,WERE ANY DMC11'S FOUND AT ALL?
,EItROR AUTO SIZER FOUND NO DMCll'S IN THIS SYS.
OMWUM, ~1
Rl,SAVNUM
,SAVE NUMBER OF DEVICES
OMACTV
DMACTV
,GENERAT! ACTIVE REGISTEIt or DEVICES,
,SET THE BIT
I'll
U
,-2
U4S, (SP)
,BR IF MORE TO GE~IERATE
,RESTORE TRAp VECTOR
,SAVE ACTIVE REGISTER
,GO FIND THE VECTOR NOli,
,NOTIFY aPR THAT NO DMC11'S FOUND.
,MAKE DATA LIGHTS ZERO
,IITOP THE SHOW
,DISABLE CONT. SII.
,ENTERED BY NON-EXISTJNT TIME-OUT,
, RETURN TO "lAINSTREAM
!"C~
,"-'10"
• SWOO, STRTSW
5.
1340,U22
tU,U20
tDM.MAP, R2
t300,RO
n02,Rl
Rl,cRO)+
U,cR1)+
(RO)+, (1'11)+
1'11,11000
U
DMACTV,TEI!Pl
T!I4Pl
5S
112,P4
BRLVL(P4),PS
(R2),Pl
'200, Hili'
.BIT9,(Pll
tt21111.6(Bll
.f'IT'll!!TT~. (.,)
PO
·2
0053
J UPDATE DEVICE COUNTER
1
.BYTE
TEMP!
M('IV
MC'V
MC'V
1777H.
III
16, .. 4
MOV
0010110
DMMUN
nO,OMNUM
DMACTV, SAVACT
VECIiIAP
,MERR2
RO
C~P
(101
211
MOV
JMP
TYPE
CLR
HALT
BR
MOV
RTI
MOV
MOV
000004
000012
1l1172n
4(ltl )
1125252,6(1t0
tBIT13. (R1)
'125252,4(R1)
MOV
VECMAPI BIT
BNE
\lOV
IS I
on 1306
001246
]I
nITtO,(pt)
,IF OMCl1 ONCSR SIB 0
,IF NO. OEV , TRAP TO 4. IF NO BIT 8 THEIf NO OMCI
,Cl.EAR SEL6
,IF DNCH TlItN DMRIC SIB -01
,BR IF NOT OMCli
,SET ROMO
,CLEAR SEL4
,WRITE THIS TO SEL6
16132 PAGE 33
GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC)
000006
000010
164000
000006
001306
01 I 456
005662
SR
MOY
MOV
MOV
MOV
6(R1)
0052
,SET ROMI
,PUT INSTRUCTION IN SEL6
,CLOCK INSTRUCTION (MICRO PROC PC TO 0)
,SET ROMO
,IS IT CROM
CMP
,8R Ir YES
SEQ
221
,Ir • -I IT HAS NO CROM
CMP
'-S,6(Rll
, BR Ir NOT OMC 11
BNE
11
,AT THIS POINT IT IS ASSUMED THAT R1 HOLDS A ONCl1 C8R ADDRESS.
,STORI'! CSR IN CORE TABLE,
2281
MOV
Itil (R2)+
,CLf!AR LINE UNIT LOOP
151.
MOV
.BITt, (itO
, CLEAR PORU
4(Rl )
CLIt
,LOAD INSTRUCTION CCLR DTR)
MOV
U22113,6(IH)
,CLOCK INSTRUCTION
BIS
nITa, (Rt)
, LOAD INSTRUCTION
MOV
'021264,6(1H)
,CLOCK INSTItUCTION
BIS
'BI'l'8, (Jilt)
,IS
IT ALL ONES?
CMPS
U17,4(fU)
,BR Ir NO
BNE
,+10
,
IF
YES, NO LINE UNIT, SET STATUS BIT
8IS
'8IT12,(R2)
BR
20.
'8ITh4(R!)
,IS
SWITCH
A ONE?
BIT
8EQ
,+10
,eR Ir M8201
'8lT131111T14'(R2) ,M8202 ASSUME CONNECTOR
BIS
201
,CONNECTOR ON)
81'
.8n3,4CR1)
,IS MRDY SET
BIT
20'
,8R IP' M8201 NO CONNECTOR (ON LINE)
8NE
MOV
,8%'1'6,4(R1)
,LOAD PORN
MOV
'122113,6CR1)
,LOlD INSTRUCTION
fBI'll, CRt)
,CLOCK INSTRUCTION( SET DTR)
BIS
MOV
'02t264,6CRU
,LOAD INSTRUCTION
.BITa, (R1)
,CLOCK INSTItUCTIOII(RUD MODEM REG)
8IS
UI'U,4CRt)
,IS MRDY SET NOW.,
BIT
8EQ
20'
,BR IP' NO CONNECTOR
818
'8IT14, (R2)
,SET STATUS BIT FOR CONNECTOR
(R2).
,PDP POINTER
2011
TST
MOV
'021324,6(R1)
,PUT INSTRUCTION IN PORT6
MDV
'8IT9IBITB, (Rt) ,?ORT4-LU 15
4(Rt),(R2).
,STORE DDCMP LINE. IN TABLE
81158
MOV
'021344,6(Rl)
,PORT6.INSTRUCTION
MOV
nU81eIT9,cFlU ,CLOCK INSTR.
BISB
URn,(R2,.
,STORE BM873 ADD IN TABLE
CJII2).
,POP OVER STAT)
TST
CRl)
,CLEU ROMI
CLR
1$ r
0'l0001
102
001256
('112737
012737
8ta
21$.
000006
14111
14Q4
1495
1496
taT
BNE
MOV
Ct.R
MOV
SIS
CMP
SHE
0020011
000004
(JU)
'I
6UU)
PAGEt
,SET lOT TRAP PRIO TO 7
,SET lOT TRAP VECTOR
,SET SOFTWARE POINTER
,FLOATING VECTORS START HERE.
,PC or lOT tN8TR,
,START FILLING VECTOR AREA
,WITH .+2, lOT
,ADD 2 TO RO +Rl
,BR IF MORE TO rILL
,STORE TEMPOFlALLY
,BIUNG OUT A BIT
,BR If' ALL rONE
,R4 IS INDEX REGISTER
,SET PS TO 7
:Sr~T
puL·~r
,PUT ItJSTf'UCTION IN PORT6
,rOIlCE ~N I"n~pIHJPT
1 STlIt w
!
F'~'Q
""!"'F
T~
T-';"''i;:'P~'P''
14-DEC .. 76
DZD"IH
"'lIcn 1 27( 1006)
09 .. 0EC"76 14159
DZDMH.Pl1
1582
15!!3
1584
1 !'iRS
15R6
t 587
158.
15Bq
lSqO
1591
1592
1593
1594
1595
15<16
1597
15ge
1'5Q9
1600
1601
1602
1603
1604
1600;
160f>
1607
1601!
1609
161 (l
1611
1617
i6i -;
1614
161'5
1616
1617
161 R
1619
1621)
1621
1622
011614
011620
011622
011630
011632
01' 640
011642
011646
011650
011654
011662
011666
01' 670
0116,/2
011674
011676
011702
Cit 1706
(111710
011714
01171f>
162704
001404
016437
000767
052762
01)5011
062702
000735
000000
011734
105777
100175
017703
105777
10037'5
010377
042703
000207
~11740
011720
177776
005300
000002
6$1
lS:
000010
Q5i66i
011720
Ot 1722
011724
011726
0117)0
011732
011742
011746
011752
011754
011760
011764
000002
000002
000007
011722
042762
('11640'\
006305
006305
006305
006305
042705
050562
022626
012716
000002
000207
5$1
BRLVLI
0
0
200
240
]00
)40
,LEVEL
,LEVEL
,LEVEL
,LEVEL
,LEVEL
,LEVEL
INTTYI
TSTB
BPt,
MOV
TSTB
BPI.
,",OV
BIC
IlTS
167240
167236
161232
000240
ONC-I t ~ICP(1PRnCESSf')R INSTRUCTIONS
DMCHGH,,;AC
06 .. 11 EC-76 10131
~r.CRO
RFVISION 00
FERIIUARY 25,
,GET NEXT LOWEST PS LEVEL
JBll IF R4 • 0
,MOVE NEXT LOWER LEVEL IN PS
,BR TO OELAY
,NO INTERUPT ASSUME 300 AT LEVEL 5 AND FIX DMCU
,POP SOFTWARE POINTER
,KEEP GOING
: Gt! VECTO~ ADDRESS
:CLEU JUNK
, GET BR LEVEL
D~C 11
, SHIFT LEVEL 4 PLACES
I TO THE LEFT rOf! THE
,S'1'ATU& Ti
3S7
J8~
38"
3Qn
3<11
3C!?
3<13
394
HARVEY M, SCHLESINGER
COPYRIGHT 1975 DIGITAL EQUIPMENT CORPORATION
MTCFO T~STRUCTION OEP'INITIONS
BRANCH INST~UCTIONS
I>:IDEXEO BRAMCK INSTRUCTIONS
MOVE INSTRUCTIONS
INPUT/OI1TPUT ASSIGNMENTS
PROTOCOL OEpEIoiDANT MACROS
DlACl1 onCMp MICRO CODE ASSEMBLED FOP USE
VERSIOO: 00:' P'EBPUARY 26,197!!
WITM THE M8201 LINE u>;IT
HARVEY 114, SCHLESINGER
COPYPIGHT 1975, DIGITAL EQUIPMENT CORPORATION
VERSIOtJ OOB
MARCH 17,1975
CSR A'IO MICROPIIOCESSO~ CHANGES
V!':RStON OOC
RETRlNS~ISSION
NOVEMBER 6, 1915
CHANGES
)<1';
396
397
398
~9q
400
402
467
502
590
627
66P
71 R
766
778
"l9R
81 p
ee4
921
95P
97Q
loon
1013
1021
102~
10ClI
111"
0054
,CLEAR i
PAGEl
16:32 PAGE 34
GENERAL UTILITIES (TYPEOUT, ERROll, SCOPE, ETC)
VERSION 000
DECEMBER 3,19'75
DONE CHANGES
TRA~JS"IT
THE LIITEST "IODIP"lCATIONS WERE ADDED ONI
NOVEMBEII 16, 1976
MtCROpPOCESSDR MAIN MEMORY ASSIGNMENTS
SCPATCH PAD ASSIGNMENTS
II/IT--INITIALIZATION ROUTINE
F1ASSRV-- .... BASE SEIIVICE ROUTINE
N101.E2-- .. 1I0 CSR ACTIVITY STATF:
INWAtT- .. - .. IHT FOR RQ! TO CLEIIR
OtJTT N'I'-·-5£T UP OUTPUT INTERPUPT [POYO]
OUT"AI- .. WAIT FOP ROYO TO GO AWAY
CT1.SRV--CNTL I SEPVICF.
TFlASPV--TPAIISIAITTEP BUFFEP lOOFlFSS SERVICE
flAASRV--1'IECE I VE BUP'FER ADOPESS SEPVICF.
RCVA--flOUTINE TO HANDLE FIRST OTle,",p CHARACTER
RCVfi--ROUTINE TO HANDLE FIPST CHARACTER OF COUNT FIELD
Pcvr--p01JTINE TO HANDLE SECOND CHARIICTEP OF COUNT f'lELD, SELECT AND FINAL
RCVD--1H'IUT!'1E TO HANDLE RESPONSE FFI,n FOP NUMBF.RFD MESSAGES
RC:V~;--PI'IUTINE TO HANDLE N fTEloD OF' ~U"'Bf.RF:D MFS!;AGF
RCVf--POUTTNF.: TO IGNORE AODPE5S
"RCVG--R('IIJTT'lE TO IG"IORE CRCI
QCV"--R'1\)TI',E TO HA'mLE CRC2 ~"f' TO ''HSPATCP NU"BfRED A'l[l l"'!"r'~RF'R":) TYPES
.Qrv~('\!--!lOITTINE TO HANDI,E F'TIolST P,YTE" nor FlEC'ETVF:
;>CV'<(1--i'RClCFSS nDD CHARACTER
PAGEt
0055
ere"!>
OMell
OJ)CHGH.''~C'
1121
t 171
1177
1191
120 t
1207
122<1
125 I
1271
1320
1326
1397
1428
1452
1462
! 47!
149 ~
1494
1551
1557
1567
1570
158.
1604
167 n
17 37
174'"
"SCI
O"'C-\'
Pi4
23
000000
100000
020000
0000(1)
040000
O"OOO~
0t'0000
14-0£C-76
MlCY11 27(1006)
It>:44 PAGE 1-1
COPYRIGHT 1975 DIGITAL EQUIPMENT CORPORATION
IVEN.O
, MtCROPIlOCESSOR
MOV£cO
JUMP .. ! 00000
IBUS"20000
!~"'=C
MEMX=40000
BRX=60000
BII.60000
\1I1TEB~"400
JDEST-iiRI!E BP.
J"i
WROUTX=1000
SHFTBR .. 1400
IIROUT.2000
WRMEM=2400
SPX=3000
SPBRXa3400
,DEST-EXTENDED tBUS
,DEST-SHIFT 5R LEFT
rDEST-WRITE OUTPUT
,DEST-WRITE MEMORY
,DEST-WRITE SP
,DEST-WRITE SP AND BlI
~"
>7
3R
H
40
41
42
43
4-\
45
46
47
000200
000220
000240
000260
000300
000320
00034:>
000360
OOOOnO
()C0020
000040
SELA:l200
SELS=220
AORNS .. 240
AANDB .. 2fiO
AOPS=30C
AXORBc320
SU8=340
SUBTC=160
AoD=O
AODC=20
SUBC=40
211
2q.
30
3t
3:1
H
34
DP,UiOOOO
LDMAR=10000
INCMAR=14000
4~
OOO'JeO
I'IeA"60
0001 (>0
00(1120
1)0014(1
0(0161)
AC=100
AA=120
AAC=140
DECAc161.l
51
"2
.q
';4
55
'5t.
0;1
C; ~
'5 Q
6f)
6,
62
,,1
0040 11 0
010 11 00
014000
001000
001400
000400
002000
002400
003000
001400
O~c-t 1 "lCROPROCESSOP INS'fRUCT10NS
DMCIlC;".OIAC
06-"E(,-76 10131
A!';COf!!O=400
BROCO!J=2000
BR1CON=2400
BR4CI'lN=3000
BR7CON=3400
72
n
74
7<;
H
71
7~
,CONDITION
,CONDITION
jA:'IIUS
,CONDITION
,CONDITION
,CONDITION
,CONDITION
MACY1 t 27(1006)
14-0EC-76 16144
MICRO IIiSTRUCTION DEFINITIONS
.Bl!TTL
.SBTTL
6~
71
,rUMCTION-SELECT A
,FUMCTION-SELECT B
,FUNCTIOn-A OR 'fOT a
,FUNCTION A A~O B
,P'UMCTION-A OR B
J FUNCTION A XOR B
,SUBTRACT
,rUNCTION- TNOS COMPLEMENT SUBTRACT
,ADD A+8
,A+B+CARRY
,A-B-C
,INCREMENT A
,A PLUS CARRY
,A PLUS A
,A PLUS A PLUS C
,DECREMENT A
, END FUNCTIONS
PAGE1=4000
PAGE2=10000
PAGEl·UOOO
CCOND=100Q
ZCONO=1400
Ii~
f,7
b ;.
6<1
7C'
C
Z
8RO
BRI
flR4
BR7
PAGE 2
MICFlO INSTRUCTION DEFINITIONS
BRANCH INSTRUCTIONS
:
100000
JUMP=100000
,JUMP OP CODE
,MACRO SZEFIO
MICPCaMICPC+1
000000
.ENOM
SZEPO
:JUMP ALWAYS
,1IACRO ALWAYS AODRES
I-IICPC:aMICPC+1
1 1 1 11 !
123
.ENDM
124
.MlCRO ,8RO SRC,P'UNC,SPLOC ,INDEXED JUMP ON 8RO SET
MlCPCaMICPC+ 1
cJUMP 18i1OCON I SRC I rUNC I SPLOC>
12"\
126
127
1211
129
! 30
.ENDM
tll
\32
,MACRO ,8111 SRC,P'UNC,SPLOC ,INDEXED JUMP ON 8Rl SET
MJCPC.MICPC+l
CJUMP 1811 1CON I SRC ,rUNC I SPLOC>
133
134
135
136
137
.ENDM
,MACRO ,8114 SRC,rUNC,SPLOC IINDEXED JUMP ON 8R4 SET
HICPCcMICPC+l
13R
139
140
141
142
143
144
.EHOM
,MACRO ,8R7 SRC,rUNc,spLOC ,INDEXED JUMP ON BR7 SET
IIICPCaMICPC+l
145
\ 41\
.ENOM
147
1411
,MACRO ,Z SRC,FUIIC,SPLOC ,INDEXED JUMp ON Z 8IT SET
MICPCaMICPC+l
CJUMP I ZCOND I SRC I rUNC, SPLOC>
149
150
1'\1
10;2
.ENDM
153
1'54
.MACIIO .C SRc,rUNc,SPLOC ,IIIDEXEO JUMP ON C BIT SET
MICPC.MICPC+l
155
151'>
157
1'511
159
160
16\
\£02
163
O'looon
164
165
16f,
167
11'>\1
169
170
,
HOVtDO
,
.ENDM
,S8TTL
MOV! INSTRUCTIONS
,MOVE OPCOD!
,MACRO BIISIIFT ,BR SHIn RICHT
MICPCaMICPC+l
CMOVe: I SRFTBII' WRTtBR I SEL8>
,ENDM
,MACIIO 8SHFTB ,BR ROnT!
MICPC.MICPC+l
171
172
173
.tNDM
1'74
170;
,MACRO
IH
O"lC-1 \ "'!C'QIJPPOCESSr)1I INSTIIUCTIONS
!)"("I.j(~H."AC
177
1711
1)6-'I':C.7611'1131
SP SRC,FUNC,SPLOC ,LOAD SCRATCH-PAD
MACYU 27(1006) 14-DEC-76
MOVE INSTRUCTIONS
16144
PAGE 2-2
PAGE:
MICPCaMICPC+l
179
1~0
.ENDM
11'11
lB"
183
11'14
1 'l5
11'16
,MACRO SPBR SRC,FUNC,SpLOC ,LOAD SP AND BR
MICpCcKICPC+ 1
,EHDM
1 H7
pIll
.MACRO
MEM SRC,OATA ,MOVE TO MEMORY
1119
fJ, ICF~=MIC~C+:
190
CMOVE I WRMEM I SRC I cOAT A»
1 Q!
,9'
.ENDM
191
194
\95
191'>
197
1 etll
19et
201'1
201
,MACRO MEMADR ADDRES,FUNC
,WRITE ADDRESS TO MEMORY
MICPC.M1CPC+l
.IF B
rUNC
.MACRO CMp SRC,SPADDR
MICPCaNICPC+l
,COIIPAR!: SOUIICE AND SP
.ENDM
.ro:A\.ItU
NOP aRC,F'L'1CC,'PADD~ jNOil!eSOURCE i
Io!ICPC=MICPC+l
FUP!Ci NO D!ST
.ENDM
OMC-11
'1ICIlOPPOCESSOP INSTRUCTIONS
06-DEC-76 10131
D"CHG".~AC'
?~,
?P)
284
2~o;
:;>~'"
21<7
;1~ p
nQ
?"l0
;I'll
7'12
''13
?Q4
29'5
2Q&
"<7
2'lR
299
300
301
3",
3(\ ~
)04
300;
306
307
30R
109
31 f!
311
3P
311
J1~
315
3''-
,17
31
~
314
32()
321
32?
321
11')0000
10(102"
100040
1000f>O
1001 (10
1(10120
100140
lrlO160
11')0200
100220
01')(1000
000020
000140
000160
000100
000120
000200
01)02'-(')
000241)
(1)0260
000300
on0320
000340
0(')0360
0(')0000
000001
000002
000003
000(1(')4
(')(')(l00!;
OOOOOf,
0001107
000010
0<)(j')1 i
Hn
000002
0(1<:>0 0 3
0000(')6
000007
000n04
00000'1
000010
000011
0(10012
000(113
331
B?
O()O('l11
000('11 .,
~24
3'0;
326
321
J2~
3,'l
.MACRO CALL
R!:G,ADDFIES
or SPar.377
SRWIITE
IMN, DISP+3
SP
SR,SELB,REG
ALWAYS ADDFIES
,SUBROUTINE CALL
.1'lCIIO
.ALWAY
.ENDM
, SUBFlOUTINE RETURN
RETURN REG, PAGE
BR,SELA,
MACYU 27(1006)
14-0EC-'76
INPUT 10UTPUT ASSIGNMENTS
16144
PAGE 3
.SBTTL ItlPUT/OUTPUT ASSIGNI'ENTS
: lSUS
ASSIGNMENTS
,IN CONTROL CSR
INCONaO+100000
,MAINTAINENCE FlEGrSTEFI
MA1"1"20+ 1 00000
,OUT CO~TROL CSR
OCONa40+100000
,UNUSED
UBADORa60+ 1 00000
,CSR4
PORT1a100+100000
,CS~5
PORT28120+100000
pORT1 .. 140+100000
ICSR6
,CSR7
PORT4=160+100000
f NPR COIOTROL
NPR-200+100000
,SFI(
INTERPUPT)CONTROL
UBSR=220+100000
,INPUT DATA LOW BYTE
INDATl=O
INPUT
DATA HIGH AYTE
,
1NOAT2=20
,OUTPUT 8A LOW BYTE
IOBA111140
,0UTpIJ!
BA HIGH BYTE
IOBA2=160
,INPUT SA LOW SYTE
ItBA1=100
, INPUT BA HIGH BYTE
IIBA2a120
RC'VOAT_200
,RECEIVE DATA
TMTCONI:220
,TMTR CONTROL
f PCVR CONTROL
RCVCON=240
,MODEM CONTFIOL
MODE"'.260
,5YN REGISTEP
SYNREG=300
,LItlE NUMBER SWITCH
LNOSW.120
,BMB'73 ~DDRESS
BM873=340
,LINE UNIT MAINTATNENCE
LUIolAIN-360
,OSUS
ASSIGNMENTS
,EXTENDED OSUS
OINCON .. O
,IN CONTROL CSR
,MAINT
OMAIN"1
,OUT CONTROL CSFI
00CO"a2
OUSADOa)
,UNUSED
,CSP4
OPORT184
,CSR5
O;:OORT2"5
,CSR6
OPOFlT3=6
,CSFI'7
OPORT4=7
INPP CONTROL
ONPR"10
if;~ eaN'fHGL
OOK5i i
I UNlX'I'ENDF.D OBtlS
:OUTPUT DATA LOW BYTE
OUTDAI=2
:OUTpU1 DATA HIGH BYTE
OU1010283
OBA1_6
,OUTPUT SA LOW BYTE
0IlA2_'7
,OUTPUT BA HIGH BYT!:
,INPUT SA LOW BYTE
IBA11:4
,INPUT SA HIGH BYTE
IBA2o:5
Tfl1DAT_10
ITMTR DATA
OTMTC0811
: TMTR CONTPOL
:RCVI! CONTFIOL
OPCVCO=12
! MODEI' C'ONTPOT.
0"0!"1'::"=13
SYNC'=14
:SYN RE<;r:;TER
:LINE UNIT MAINT.
OT.U"lIN=17
OMC-ll
"lCP'lPPOCE'5SPR !'ISTRUCTIONS
DMCHGli,vAC
oli-nEC-Hi 1(\131
334
MACHt 2'7(1006)
14-DEC-76
PROTOCOL DEPENDANT MACROS
16144
PAGE 3-1
• SSTTL PROTOCOL DEPENDANT MACROS
,MACRO RSTUE STATE
MICPC=MICPC+1
337
33~
no
PAGEl
0064
PAGE I
0065
,UPDATE RECEIVE STATE POINTER
,
)4()
34\
34'
343
,MACRO TSTATE STATE
MICPCaMICPC+l
,ENOM
344
H5
34 Ii
341
Hf:!
349
J
,MACRO STATE
AODR
MICPCaMICPC+l
,
, SOl' TO TI'ITR CONTROL
,
,SYNC TO TMTR SILO
,
31; I
362
363
36 4
365
,
361'.
367
36;;
3fi9
37(1
371
37')
PSTATE STATE
IMM, «STATE- tNIU 777/2»
,UPDATE STUE POINTER FROM BR
IDLE
14
,IMAGE ClF SP16
,rMAGE' Of' SPI'
TV?TA~=rMG17+1
I TYPE TAIILE--,72 TYPE TABLE J
15P1 ,,,15PI1.1
P"("'O~.c;::ISPl
7+'
PTH>JS= TrJril" 5.,
:
: RECF.:IVr IIYTE COUNT
ISPlt IMAGE
, SP12 I"'AG~:
I IN CONTpnL eM- ''1Ar.E
f flF(,V TflPf.S"nt.r> T, IIjl(
DMCII 00C"'P PROTOCOL IMPLE~P;NTATIOIi
DDCHGH."AC
06-0EC-H, 11134
4~~
IoIACYt1 27r 10(6)
14-0EC-76
16144 PAGE 6-2
MICPOPPOCESSOR "AIN lliE .. ORY AsSrGNMENTS
PAGE:
0068
paGE I
0069
,ALL LOCATIONS P'ROM 200 ON ARE NOT WRITTEN OUT OURI'IG A TABLE UPOUE
4SQ
4&0
41\1
462
46J
41\4
460j
0"Cl1 l~rc"p
Ol"CHf,"."AC
000210
00021 I
000240
000241
000242
000400
O"C'TocC'r
I~PLF."ENTATION
()f;-nf:C-1fj 11:34
4b~
.SBTTL
SPI).O
SPt.l
000002
nnoon1
51>20:2
SP3=3
471'
411
477
4n
414
470,
47"
-477
47~
41'1
4R 1
4~7
4~
3
4Q4
j ~r~~
000(111
000,)1 ,
000013
000014
nooo15
onon1(,
SP11=11
51;'12"12
,SP5---EII0 RECEIVE lODR!SS
,SPFt---ENO TRANSMIT ADDRESS
,5P7---END TRANSMIT ADDRESS
J BPI O---LINE STATUS WORD
I BIT ASSIGNIIENTS
,FlITO--UNNUMB PENDING
,BITi--MESSAGE IN PROGRESS
,BIT2--LINE HAS GONE IDLE
,IHn--START RECEIVED
,BIT4--CLEAR ACTIVE O~ END
,BIT5--START MODE
,BIT6--KALr DUPLEX
IIIIT7--0J( TO SEND
I SPU---R rIELD
,SP12---N FIELD
I SPI3---TYPE
,SPI4---pr;CEIVE LINK IMAGE
I 8PI5---TIMEII £NTRY---NtlMBER OF ONE SECOND TICKS
,SPI6---POINTER TO TfliT LI"'K COpy IN M_I'I "IEM
,SI'17---LAST "USAGE ACKNOWLEDGED
4Qn
4q 1
4'17
4Q~
d9~
r;1)~
...... p;~~~
S~",=·~
4117
4Q7
41l-
SCRATCH PAD ASSIGNMENTS
, SPO---SCRATCH REGISTER
,SP1---PORT sTATUS WORD
,BIT ASSIGNMENTS
,BITO--INIT MODE
,BIT1--SEC STATION SELECT(UNUSEO)
,BIT2--NO BurrER ASSIGNED IN BOOT MODE
,BIU--OLE RECEIVED WHILE NOT IN MUNT MOOE
,8IT4 . . IIITERRUPT PENDING
,BIT6--0ISCONNECT ERROR
,BI17--BOOT MODE
,SP2---TRANSMIT STATE POI"'TEP
J SP3---RECEIV£ STATE POINTER
SP5.5
SP6.6
SP7.7
SP10=10
4~i'
4 Cl r;
PAGE 6-3
000005
(001)01'>
000n07
000010
4RR
4BCj
40 4
16144
IJI/,J.JU"r
4 ~';
4Clf,
,TABLE UPDATE STATE
,PORT STATE
, NEXT UITtRRUPT POSITION
,END or INTERUPT CHAIN
,STACK or INTERUPTS
,MUN MEMORY END
MACY11 27C 1 (06)
14-DEC-76
SCFlATCH PAD ASSIGNMENTS
01')0000
ooono t
4f.7
4hQ
TABST=210
PPTST.TABST+ 1
NXTINT.240
NXTSP.NXTINT+ 1
INTSTKaNXTSP+l
MNENDa400
ooo~
17
51'13=13
5P14·14
SP15"15
51'16·16
51117·17
~!:C'!
.ft.~O?!SS
OMCll DOCMP PROTOCOL IMPLEMENTATION
O!'-OEC-76 11134
DOCHGH.MAC
MACY11 27(1006)
t4-DEC-76
lSl44
INIT--I"ITIALIZATION ROUTINE
0;02
PAGEl
0070
PAGEl
0071
.SBTTL INIT·-INITIALIZATION ROUTINE
,ZEROS MAIN MI!:MORY
,LOOPS WAITING FOR RECEIVE DATA(SOOT?)
,OR FOR RQI TO BE SET
I WILL ACCEPT ONU BASE FORMAT. ALL OTHERS WILL RETURN A PROCEDURE ERROR
50~
504
505
5(16
,
'.\07
50ft
SOil
PAGE 6-4
510
oi i ;66
(I)
(1)
011766
000000
063'2n
I AT INITIALIZATION _ ... THE HARDWARE CLEARS THE BR AND MAR
.'"11766
S?
BR.SELB,SPO
,Ct,F.AR
SPO
MICPCaMICPC+l
SP
BR,SELB,SPl
MICPCaMICPC"1
,PAGE ONE TRANSFER ADDRESS
OtjOOOi
063223
SP
,CLEAR SP17
0t116~
I~IT:
(1)
511
0111'70
(1)
(11
011770
(I)
512
(1)
011712
(1)
011772
BR,SELB,SPt7
MICPC.MICPC+ 1
000002
063237
<;.IOVEI SPX I BIl I SELSI SPt7>
(1)
511
011774
(1)
ell
"011774
OUT
BR,
III rCPc.MICPC+ 1
MICPC .. MICPC+ 1
<'lOVE I WROUTX I BR 1
,WRITE 5 ONE BITS TO THE HIGH ORDER
000('\05
01)3310
(1)
77~
514
(11
01 I
(Il
011776
(1)
C;15
012000
(I)
(\)
012000
,,'
'516
<;17
(I)
017.002
(1)
012002
5*1
rBITS OF SP10
,SHIFT SP10 LEFT SETTING CARRY THE
OnOO06
063130
SP
BJI,AA,SP10
MICPC=MICPC+t
0lloo07
07f'.423
,FIJIST 5 TIMES THJlU THE LOOP
MEMINC
BR,ADDC!SP3
,WRITE A ONE TO THE FIRST 5 MEMOIlY
MICPC=MICPC+l
(I)
1112006
SF'
SR, INCA, 5Pu
i IHeRE"!:)!T COUNTER
000010
063060
MICPC:lMICPC+l
onoo 11
1 (11413
'[.
lOS
rALL DONE
MICPC.MICPC+1
I I <51-INIT""/2»
0~Oi)1 ~
(11
('\ 12012
100406
(Il
"'4
(112014
10S1
D"iCI I DDC"P PROTOCOL IMPL[MFNT1I.TION
DOCf'GH .... AC
06-0EC-76 I I 134
(I)
(11
012014
SPBR
IMM,I,SPl
MACY11 27(1006)
14-0EC-76
16144
INIT--INITIALIZATION ROUTINE
M1CPC .. MICPC+l
SP
BR,SELB,SP12
MICPC.MICPC+l
,WRITE A 1 TO SP12
000(115
0')3132
LDMA
IMM,TYPTAB
MICPC=MICPC+1
.IF ION IMM,IMM
(l)
5'ft
,)12020
(1)
(1)
(11
527
(I)
(I)
(I)
0\ 2(120
n 121'122
n 1 2022
000016
001
010162
(Il
(I)
(1)
000
(1)
c;,?~
(112024
(1)
(1)
012024
(I)
r;'?'1
(tl
01 '-026
(11
n I 2026
en
'\30
(1)
(Il
(11
531
0120]0
'It 20]0
0120]2
nn~022
(1)
(I)
(I)
532
1)\ 2032
012034
":: ~
01
~O34
1Mi',2
"rCPC.MICPC+l
"'E:Jo!INC
1101101,6
MICPC .. MICPC+l
<"'OVEI WP"IEi< I INCMAP 1 IMM I <6»
,START
01)01)24
(116406
"EMINC
IM"I,7
MTCPCaMTCPC+l
<"OVE I WRMEM! INCi'lAR I IMM I <7»
I STACK
1)0(1025
016407
Me;M!NC
1M!',l
'''.1C'PC''''"CPC+I
<"'OVE! WR,..l'""! INCMAR 1111\II! <1»
lACK
ot'lOO26
0164(11
T""',TAPST
"1C'PC=M1("t'lC·l
.TF"IDN 1"1-',1"/0'
;PntNT TO TABtE UPDATF: STATE
000'121
(1)
:
002402
COUNT
(11
r;H
n 120]1;
(Il
(\)
III ;>035
(I)
534
"12040
(1)
(Il
011040
(I)
53'>
'1 12042
(11
(ll
(1)
"12042
<;36
'I' 7044
")
(11
, I,
1,0"'A
11':0'127
'lOI
(11
0\,n44
I), "71 ()
<~'nVE!L"'"'AR! h"'!>>
LOMA
IMM,STC
MICPC:l:MICPC+l
.IF IDN IMM,IMM
>>
ooon 30
012050
012050
(lDOSO
1)12052
(1)01'32
'101
010067
(11
(11
000
(1)
(ll
540
012054
(\)
(tl
012054
0072
,INITIALIZe: LAST XMIT POINTER
LOMA
IMM,SRC
MICPCaMICPC+1
• IF ION 114M, 114M
070
(112070
1'('0041
043234
SP
folEMX.SELB.SP14
MICPC.MICPC+ 1
<"'OVEI SPX! MEMX I SELSI SPI4>
ono042
001
LOMA
IMM, NXTIHT
I4JCPCaMICPC+l
.lP' ION IM",IM14
(11
5-17
"'12072
Itl
(11
0"(;11 'lr"C -'I'
OD("4(:(.f."'Ar
II)
PROTOC"L I"PLr"E'NTATION
0"'·I)F.C-76 11134
'1\1. )72
MACY11 27(1006)
14-0£C-76 16t44
INIT-·I'lITlALIZIITION ROUT IN!
010240
or
NEXT INTERRUPT POINTER TO '41111
PAGE 6-7
PAGEl
<"'OVEI LDMAJI I IIIIMI1M,INTSTIC
MICPCaM ICPC+ 1
MJCPCaMICPC+l
I
.ENDC
0073
DMC11 DDC~p PROTOCOL IMPLEMFNTATION
DOCHGH • .,AC
o6-DEC-16 1 t 134
MACYl1 27(1006)
14-0EC-76
IDLF.--PROGRAIoI II'JLE r,oop
I
lDLn
012110
~REAO
0074
TRAJISMIT STATUS WORD FROM Spl0 TO 811
00005\
0601>10
BIll/RTE BR:
I4ICPCaMICPC+l
! 5
012112
(0
(I)
012112
(1)
5M:
(ll
, rF OAT) TOSEND-- BRANCH
'!'M !!) A
MICPC=MICPC+l
I
XEUTI
"00
en
III
(ll
0;73
012170
(Il
(I)
011120
$LO~
It
,READ LINE UNIT RECEIVE CONTROL WORD
(I)
574
(1)
(1)
121
0\ 212'
(I)
(Ii
(ll'l2?
000'15"
liD i
010210
,IF IiiN
000
(1)
(1)
(1)
(1)
57F>
5''''1
57~
(11
(1)
MEMX,SELB,O
.~LIIAY
MICPCcMICPC+1
(l1?124
(1)
011124
('112126
,100057
14(1620
(11)1
III
n0006 I
060342
; IF NPF SLOW
,GET IDLE TRANSMIT STATE + 1
STATE
TMTA+2
MICPCaMICPC+l
000062
111 '100
,NON-IDLE STATE
TMTOA
C
MICPCaMICpC+l
i d;;'iO ... -INIT .. 77712»
012171',
0;7"
012126
(11213"
(1)
(1)
012tB
i~lii,iPiM
<'40VEILDMAIIIIMM!
000(l64
113255
BP4
T1MSRV
MICPC=MICPC+l
I
,PEAD THE RECEIVE CO"lTROL REGISTER
000065
023240
BPWPTE BII, AA I SPO
MICPCcMICPC+l
! 134
(1)
.F-NOC
(1)
581
0121 J6
(1)
(1)
(11
5R4
(1)
ell
(I'
5RC;
(\12136
012140
012140
n 12147
(11
(11
0"142
(1)
5Q~
rJ12144
(I)
(11
(11
012144
5117
()1214&
000070
(I)
(11
(1\
001
01114"-
(11021 I
(1)
LD"'A
IMII.,PRTST
"ICPC.M1CPC+l
.IF !ON 1M"'.l"'"
:>
.t=:NOC
(ll
5eR
(1)
(1)
(1)
,11 2 I 5 0
000071
'112150
1406~n
.ALWAY MEMX,SELB,O
fII1CPCaMICPC+l
,INDEX
PAGE:
0075
O~CI
I
I)~C~P
OOCHG4. '1AC
P"OTOCOt, TMPLr.'''Wt.iTA'TlI')N
06.0EC·76 1 t 134
59{)
591
Ot:!t 52
(Il
0111';2
(2)
( 2)
( 21
0121 '12
592
(\ I 2154
.SBTTL
BASSRVI PST ATE
MEM
011154
PAGE 6-10
PAGEl
0076
BASSIW •••• BUE SERVICE ROUTINE
NIOLE2
I~M, «NIOLE2.IN IT~ 777 12»
~ICPCaMICPC+l
>>
,CLEAR TO MAR SO IT POINTS TO BASE POINT
LDMA
IMM, BASE
MICPCaMICPC+l
.IP' IDN 1I4M,IMM
,CLEAR THE TNCONTROL CSR
MICPC.IIICPC+l
MICPCaMICPC+1
!
01'164
(1)
IBUS,PORT4
101 tCPCaMICPC+ t
(I)
5<1P
(11
('11'170
(I)
nl2170
(11
59<1
1"1\ '1"
(I'
017172
(n
(11
60(\
(Il
fll21H
(1)
012174
OnOlll'
(1)
6fll
01217"
(11
(Il
(1)
b02
ntll1&
Ol7Un
(1)
0(l010o;
Cll
onl
(I)
(n
"'2701"1
LOMA
IMM,T
MICPCIlMICPC+l
• IF IDN IMM, II'II4
0127·H
01721"14
PAGE 6-11
00'77
.ENDC
(1221)2
(I)
(II
MACYll 27(1006)
14-O[C-76 16144
Br.SSRV-··· RASE SERVICE ROUTINE
noo
(1)
(1)
hnl
(11
(1)
(1)
,LOAD ADDRESS OF TYPE FIELD
(1)
"v~
0122(16
(11
...
~
"\ "'I .... ,oe;
,TURN OFF INIT "'('IDE
(1 1
"O~
01 2i. In
(11
(11
01171 (l
(I)
fd)7
(112211
(11
(11
(I)
01 '" 12
608
(11
(II
(I)
012214
(I
I 2214
6()t'l
It
1221 JO;
(I)
(1)
012216
000111
000&41
FlRWRTE IMII,241
,SET 01< TO SEND,STAPTMOOE AND UNNUM PENDING
MICPCzMICPC+1
I
,SET up SP4 FOR COUNTING NPRS
SP
SII,INCA,SP10
MICPCaMICPC+1
000114
063070
,SET UNNUMB MY-SSAGE PENDINC TO
(11
611)
61\
(1)
oti'-10
001
(!)
(1)
O1227n
01 ont 7
(11
01
(11
(I)
512
(1)
(1)
"11
ann
000116
(ll
(1'
FUDGE
STATE
lSET T"'TR STATE TO ENTER TABLE UPI)ATE
MIC PCaMICPC+ 1
I
SP
MEMXI1NCMAR,SELB,SP11
MICPC=MICPC+ 1
, RESTORE SPll
000122
057231
SF
MEMXIINCMAR,SELB.8P12
M!CPC.MICPC+1
C"IOVEISPXjMEMXIIIICMARUELBISPt2>
,RESTORE SPi2
000\23
057232
MEMX1INCMAR, 8ELB, SP14
SP
IHCPC.MICPC+1
CI40YElSPXl MEMXI lNCMARISELBI SP14>
,RESTORE SP14
000124
057234
SP
MEMXUNCMAR,SELB,SPi6
M1CPC .. MICPC+ 1
CMOYEI SPX I MEMXl INCM1Ri 5EL81 SP16>
I RESTORE 51'16
000125
057236
SP
MEMX, SELB, 5P17
MICPC .. MICPC+1
<140YE I SPII MEMX1SELB1SP17>
,RESTORE
000126
043237
SP
BP,DECA,SP10
MICPC-MICPC+l
,TURN OFF
000127
0(3171)
000130
SP
BR,DECA,SP1
MICPCo:MICPC+1
PAGEl
0078
PAGE:
00'79
(1)
6H.
(11
cn
(l122~2
0122:l2
(1)
1'017
(1)
012'34
(I)
012234
(1)
618
(n
(n
012236
012236
(1)
61<1
012240
(I)
(1)
012240
(I)
62(1
01224,
(1)
(1)
(n
012242
67.1
(0
012244
(11
(Il
012244
012241'1
(I)
012246
("
06316 t
U~NUM
MESSAGE PENDING AND
, ZERO TNE BRG
,CLEAR nUT MODE
fI')2
1;7. ~
SP1?
(I)
674
012750
\IJ
(I)
(1122';1')
BRWRTE
,SET OK TO SEND
IMM,200
nn0131
~!C!'C~M!C?C+!'
(1006(10
I I <~IIOLES -IN IT& 777/2»
01220;6
(!l
012256
PAGE 6-13
,S8TTL NI0LE2---NO CSI'! ACTIVITY SUrE
NIDLE21 BPio/RTE BR,SELAI8Pl
,READ PORT STATUS WORD
MICPCo:M1CPC+l
!ICPC .. MICPC+l
<"'OYE I SPBRX I IBUS I nCON I SPO>
012262
000136
OI)H>20
MICPCo:~ICPC+l
<~OVEI SHFTBR I
012264
00013'7
103146
BR4
INWAT1
,IF RQI SET -- BRANCH
MICPCaMICPC+l
I
(1)
( 1)
(1)
(I)
f, J ~
63<1
1',411
(,41
012266
(11
(1)
(1)
,TO PE-READ THE IN CNTRL REGISTER TO AVOID
I~ RACE TN ~1CRO-P READ/UNIBUS WRITE
,IF NDF SLOII
ALiOroyS IDLE
MICPC=MICPC+1
I CIOLE-INIT& 77712»
001
012266
00014(1
100451
"'4~
~d3
,ENDC
012270
NIDLE6:
001
~ ~4
64"
.JF OF
lOS:
f,',6
SPSI'!
SRWRTE
SLOW
ISUS, MODEM, SPO
BR,AAISPO
IIJIr.'IJ",1"t
"4~
aRWRTE
SPSHFT
BP4
8PWRTE
SRl
1'117
SPBP
BPWPTE
RP4
BRiiRTF.
SP
nWAYIi
f 40
I.'in
':;0;1
65?
':;0;3
"51
"0;"
6" __
~"7
,;"
~
~,,~
--''''0
SE:TDSP: F\;lWI'ITE
(,f,I
ALwllYS
.FNOC
~""
'-;:' l
"'''4
8R,SELA1SPI0
IDLE
BF,UISP1
IDLE
IDLE
1BU5, MA IN, SPO
BR, ADDISPO
IDLE
1"1'1,100
Rl'!,AORR,SPI
EPPXX
1"",277
CI.I< TDL
,READ MODEM CONTROL CSR
I SHIFT IT LEFT
; IF' D5R 5E!. C!.::A~ r!;.~G
,READ LINE STATUS WORD
,STAPT MODE
,PEAD PORT STATIIS WORD
,HilT MODE
,DISCONNECT ERROP ALREADY SENT
,REM THE MAINI REGISTER
,SHIFT t.F:f'T
Jl,U LOOP -- EXIT
pIRITF. DISCONNFCT (';PROR
IfLAG ERROR PECORDED
I '"A"" A CONTROL OUT
:C'LF.AR DISC'1NNECT EPROR FLAG
,If NO, Sr.rL'
017270
NTlll.E'51
"'<'T~TC'
OlliT"T
:'''IT linT, FO" INTERRUPT PROCESSING
01'("1 I ODC"P PROTOCOL J"PLf"I'NT1;TIC1N
DOCH!;H. 'lAC
06-DEC-76 t 1: 34
(I)
(2)
012270
(2)
012770
¥ACYl1 27(1006)
14-0EC-76 16144
NIOLE2---NO CSR ACTIVITY STATE
PAGE 6-14
000141
0112';14
ME'!
114/111, «OUTINT-INITI0777/2»
MICPCsMICPC+l
000142
100451
ALWAYS
IDLE
MICPC.MICPC+1
I
0!"O'520
SRWRTE BR,
"HCPCaMICPC+ 1
<""aYE I WRTE8R 18R I I
000147
10]557
SR7
INWAT2
,READY IN STILL SET
MrCPCaMICPC+l
I
01 H04
,,75
,READ
('11'0146
121$00
000151
060520
BRWFTE SI'!, AA I SPO
MICPC_M ICPC+ 1
I
rll
1;77
012312
(t1
(1)
0171t2
(1)
f.7R
(1)
012314
(112314
(21
( 2)
012314
( 21
ii7Q
012316
(n
(11
(I)
"s<)
012316
(1)
1
(I)
(11
(11
f,R
f117n'l
(lilT
"""1 '56
1"04') 1
(,TtIMP I AtCr'lND! < I DLE-INIT& ~ o"r, .. 4>! <1 DLE- PI I T& 77 7 12»
UWAYS
'1'
IOLF
~ICPC.l"ICPC+l
I
"17324
'II
1'1 Oi AT:; :
OJ
,'1232 ~
,SET THE FlPYI
(MOVE I itiPOUTX! FIliI l»
(\ 12322
01 ?l22
BFI, AOPB! OINeON
~TCPC=MICPC+I
OClOI5,)
Of, t 100
~Q7
'"'W'''!
NJDLE4: IIRWRTE
II'M,20(1
'1JCPCaMICPC+l
7
n" ,,,7"
8~SHrT
:rcPc:MrcPC·l
:SHTf T '!'HI'
~!:/
!:/IG"T
01'(11 DI:ICMP PROTnCOL 1MPLE!oIENTATION
OOC~GH.p.4AC
C~~De:C-76
11!34
14l>.CYll 21(1006)
14-DEC-76 16:44
INWA !T.--IoiAIT FOR RQI TO CLEAR
PAGE 6-16
PAGE:
0082
PAGE:
0083
(I)
61;4
685
686
foB'
001
I'>8A
(112326
(I)
(I)
(1)
012326
611Q
(1)
000161
{,02563
,SET NEXT STATE TO INPUT SERVICE
PSTAT!
INSRV
MEN
114M, «INSRV-INIT&777/2»
MICPC_MICPC+l
>>
000162
100451
ALIIAYS
IDLE
!o\ICPC=MICPC+ 1
l I
000164
102600
,--SENSE OR SASE
BRl
30.
MICPC8I4JCPC+1
1<30S-INIT&777/2»
000165
1021'72
,CNTT.. I
BRO
lOS
MICPC.MICPC+l
I <1 OS-INn& 77712»
000166
001620
MICPCIIMICPC+l
011016'7
1 n2r;74
IIP1
iSS
MICPCaMICPC+l
eJUIoIP! BRtCON I 1 < 15S-INIT& 777/2»
000170
II IcPCaMIcPC+ 1
O"'~270"
<",OVg! WRMg!'1IMM!
f)()0171
InQ575
ALWAYS 20$
MICPCcMICPC+ 1
I <20$-INIT& 77'712»
INSRVI
011334
(I)
(l)
,)12336
I READ THE INPUT COtiTROL CSR
II)
694
012340
fll
(0
012340
ell
fo9o;
(11
(1)
(tl
,:,9F,
012342
012344
(11
(1)
EPSHtT
('117342
012]44
; "-UST BE
eA/CC~SH!F'!'
FO!! IN OR OUT
(1)
697
(I'
('112346
() 12346
0)
C?}
(2 )
{) 12 .14r,
,:,QF!
f)IHSO
(I)
II)
01235n
PSTATE
MEI4
I TRAN SM I TTER
TBASRV
HIM, <>>
nOC173
1 "0')75
ALWAYS 20S
'" ICPC=MICPC+1
1<20S-INIT&77'7/2»
1)12352
(112352
~ I
2154
D"r 11 PDC'IP PROTOCOL IMPLEMENTATION
ODC!;;;". VAr
06-UEC-76 11134
II)
7~I
(11
(2)
( 2)
('\12356
n 12356
')1'356
MACYl1 27(1006)
14-0EC-76
16144
IHWAIT---WAIT FOR RQI TO cLEAR
PAGE 6-17
1S$t
PSTATE RBASRV
MEM
I~M, «RBASRV-INn& 77'7/2»
!oIICPC:MICPC+1
<"IOVEI flRMEM 1 IMMI «RBASRV-IN IT& 7'77/2>>>
20St
(lOO175
1l1;01501
BRWRTE IIP,SELAlSP!
" ICPC8MICPC+1
I I I >>
(2 )
707
012372
(1)
(1)
1'12372
n00202
(lOOSOO
BRWRTE 11<1"1,100
MICPC:MICPC+!
& 37'7»
(11
~'!CPC8MtCPC+l
• IFF
("
noo
(1)
<"aVE: LD"AR! I1<1I11! «RTHRS+3»>
.ENOC
(1)
710
(ll
(11
(11
711
()12400
ME~INC
IMM,2
"'!CPCOIMICPC+1
<~OVE! wPMF.III I !NCMAR I
nn0206
0112400
I"M,O
MTCPC=MICPC+ 1
<"OVE! WI<~lFM! 1M,..! <0»
0(10107
OllTPUT "'F"X,SELF\!OMOD~:Y
MTCPC=" IepC'+ I
< "'OVE! "PO"T! "IE"" X! lrll Dl\~·'p PROTnC!Jl. IMPLE"ENTATl':'N
DOC'IGh. "lAC
0;,-DEC-76 11; 34
(n
(0
ell
rt12406
714
1)12410
(n
(1)
012410
01)0210
114524
000211
01;061:11
(0
7\'5
012412
PAGE 6-18
PAGE:
0084
PAGEr
001;15
MICPCoaMICPC+1
I eRCEXX-INIT& 777/2»
,INIT MODE?
fNSRV1: RRWRTE BII,SELl1SPl
'" ICPCaMJCPC+ 1
I <8ASSIIV·Il/IT, 777/2»
000213
100601
ALWAYS PIIOCER
,NO - PROCEDURE ERROR
MICPCcMICPC+l
eJUMp I ALCONO lePROCER.INIU3000*4> I >>
0)
"2
721
000
001
724
noo
715
72f.
7"
SLOW
OUTWAIT
,PORT STATUS TO WAITING rOR OUT
,COMPLc:-r:C"
LoMA
IMM, NXTIN'l'
MICPCIIMICPC+1
.If' ION IMM,IMM
eMQVEILD"'AP lIMN I eNXTINT&l77»
• If'f'
,PEAD THF. OUTPUT CONTROL CSR
000217
123040
'112420
(I)
000215
(I)
oot
(1)
.ENOC
.IP' Of'
PSTATE
.ENDC
012420
(110240
(1)
(Il
000
(I)
(1)
72"
il12422
0')0216
1)01
(1)
(1)
(11
(1)
!I)
(n
(1)
72Q
(11
" 1242'
012424
(\)
(1)
(112424
130
012426
(1)
(I)
01242&
ooono
055302
OUT
e"EMXIINCMAR>, eAORB! DOC ON>
"'ICPCaHICPC+1
,(SELP!OPl1RT1>
:WPtTF LOw RUE OF IIA To CSR
"'YCPc=IotJrpC'+l
< "0 V" ! \.; I; PI i T ~ I ~ f" X : J N C" A fl ! (:::,' t " ! "p np,. , >:.
i1IJT
(frIO/'/'
3~
II)
iii
,eJlA1SPo>
"tCPCo:MTCPC+ 1
[1101('11 DDC"P PROTOCOL IMPLEMENTATION
onCHGH.MAC
06-DEC-76 llr34
(I)
en
('12436
PAGE:
MAcnl 27(1006)
14-DEC-76
16144 PAGE 6-20
OUT1 .. T---5ET UP OUTPUT INTERRUPT [RDYO)
000224
(\55225
MICPCaMICpC+l
,
MICPCaMJCPC+ 1
<'lOVE I WIIOUTX i MEiotX i INCIliAIl i 1 I .
(;00226
('1/)0230
100451
(ll
744
(11
011450
()12450
(2)
( 2)
012450
p1N121
000231
002652
( 2)
745
746
747
000
001
748
000
749
(n
.ENDC
.IP' OP'
SLOW
PINT2r
.EHOC
L014A
IMM.NXTINT
MICPCaMICPC+ t
• IF ION 114M, 114M
>>
1112452
(I)
(1)
(1)
000232
0('11
01('1240
: ADDRESS NEXT INTERRUPT QUEUE
• IFP'
<140VEILOMARIIMMI
01)0234
002(,42
MEM
IMM,lNTSTK
MICPC.MICpC+1
<"OVE I WPMEM I I 111M I <1 NTSTK»
BRWRTE IIoIM, «MMEND-2»
MICPC=MICPC+l
>>
,ADDPESS or LAST INT IN STACK
Oi;('I235
(l00776
CMP
BR,SPO
"'!C!'CIIM!CPCo!o1
,SHOULD wE WRAP
(1)
7""
(11
012460
(1)
(\12460
(tl
75l
I)
12462
n~!'!2
(1}
(I'
(Il
012462
754
012464
36
060360
5$
D~C"I 1 n!'C'-1p PROTOCC'L IMpLEMr~TATION
Or.("HGfl. 'lAC
Q6-'lF'C-76 11134
(1)
12464
(I)
I)
(1)
755
012466
(I)
(I)
012466
, YES--BFtANCH
PAGEr
MACY11 27(1006)
14-DEC-76
16144
PAGE 6-21
OUTINT---SET UP OUTPUT INTERRUPT (RDYO]
0,'0237
101642
MICPCaMICpC+l
1 <5S-INIT& 777/2»
SRWRTE
IMM,2
MICPC=MICPC+l
,COpy pOINTER TO SPO
LDMA
IMII, NXTSP
MICpCcMICpC+l
• TF ION IM/I,IM'"
,COMPARE TO END
000244
040360
oll0245
101647
Z
lOS
,IF EQUAL--CLEAR INT PENDING
MTCPCaMICPC+ 1
! <1 OS-INITr.77712»
(),11)246
100451
~LWAYS
IOLF.
MICPCzMICPC+l
I !::
(1)
761
'112506
(1)
(1)
012506
M10250
OF!3761
CLRIDLI SP
BR,AANDS,SPI
MICPCaMJCpC+ 1
<"'OVE I SPX! BR I UNDB ISP\ >
(Il
764
012510
(1)
(1)
(Il
11170;10
0'1025 t
1 r}045 1
ALWAYS
TDLE
1
! < IOLE-I NI T& 777/2»
M ICpC=MICPC+
0087
pr-o(, I 1 DDCMp PROTOCOL U4PLFJolENTA'I'IO"
OI'CHr.H ."\i~C
06-DEC-76 11134
766
767
(112512
(1)
(n
(112512
(100252
123440
n)
768
769
77'1
MACYt1 17(1006)
14-0EC-76
16144
OUTWU.-WAIT FOR ROYO TO GO AWAY
.Ir or
012514
(1)
(I)
01'514
ooee
PAGEl
0089
a1.0W
8R7
NIDLE6
, ROYO SET --GET OUT
.ENDC
• IF NDF SLOW
81'17
I01.E
MICPCcMICPC+l
I
001
771
PAGE 6-22
0()()253
103451
(I)
773
000
774
012516
(1)
(1)
012516
ICLEAR CONTROL BITS
000254
onOl)OO
(1)
771)
012520
(1)
(1'
012520
OUT
000255
061262
01 ''322
(\1
(Il
I}J2522
BR,OOCONUANOB
MICPC=MICPC+ 1
ALWAYS
INS1]
MICPCliMJCPC+l
,
,TO SPO
(I)
7RO
012526
(I)
(I)
nl2526
(t)
181
f\
IIRSRrT
MICPCcMICPC+1
<"OVEl SHFTBR I WRTEBRI SELS>
000261
102754
81'11
HOSEL
,IF SET IS HALF DUPLEX
"rCPC-MJCPC+ 1
I
MICPC=MICPC+l
MtCPCcMICPC+l
<"OVE I WRTEBP I OP I
(1)
7011
(II
"1
fl
t 20;0; i
f"
! ]t; ';
'll
'?:',f1
"1 -,/ ~
Ar,WAYS
"'2,\0;2
4
rDLF
0'lI.'112
,
lOP 4'i'
< TU'~P! AT C')"l:'!!
r IN
000274
01'3301
8RWilTE I"IM,204
MrCPCIIMICPC+ 1
<"'OVEIIiRTEBRI IMM 1<204»
,MASK rOR OK TO SEND AND LINE IDLE
000215
000604
SP
BR,SEt,B,SPI0
MICPC:aMICPC+l
~"OV!; 1 SP)( I DR: S~~18 i SlOt 0>
: IN LINE STATUS
0 0 0276
01'3230
000277
100665
ALWAYS INS12
"ICPC=MICPC+l
1 RWRTE <1M"! INC"'AP>, TML8
"YCPC:MICPC+l
<"OVEI WRTEBR I IMMI INCMAIII
MICPC.MICPC+l
• IF ION MENX,IMM
on0313
!"Plli
Z
lOS
,Ir YES--BPANCH
MICPCIIMICPC+l
1<1 OS-INITn77/2»
BRWRTE IMII,6
MJCPC.'HCPC+l
,UPDATE LINE STATUS
000317
063310
000)20
10066'5
AL\liAYS INSl2
MICPCIIMICPC+l
1
MTCPCa"'ICPC+l
• Ir IDN MEMX, 114M
44
(11
(I)
n12641
(11
921>
827
012646
(1)
(11
(I)
0121;46
000330
'101
0lnn1
(1)
(11
(I)
(1)
92R
1'\00
I)
1 ?6~O
(1)
(1)
(1)
~ 1 2~~'1
R2q
'1176<;2
(11
(I)
'11
2~'i]
1"11
,,,c..'t
(1)
q ~.(1
'
o!'lonl
0"204
, '" NOTE INVERTED ORDER OF PORT 3 AND POPT4
LDMA
I~M.[RC
"ICPCIIMICPC+1
.If IDN IMM.IMM
TI"
P''',
PC['7
/\nll LJ;l
"TC"C=" rCPC.l
OJ)('1'.., ~
<"'nVF! :.IRTI""P! p""!
C\oIp
\' -')0
1 ~
l
JlP, hPt"'!
HI("[,,~:MrrpC+l
<~(,L7»
: ASSU"l ;;PAP AR'JU\'D CASE
0093
0'"C11
c,oe"!'
DDCKG~,~AC
(1)
en
931
PROTOCOL TMpr.JEMF.NTATION
('6 .. DEC-76 11:34
0126')4
(n
060360
000334
Z
INS12
MICPC=MICPC+ 1
101~6S
1 56
PAGEl
MACY11 27(1006)
14-DE'C-76 16144 ?AGE 6-28
PBASRY- .. REcrn VE BUFFER ADDRESS SEPYICE
0094
,IF EQUAL BRANCH
(1)
93:>
0126"'0
it)
(tl
(11
(112660
833
012662
(11
012662
,..
062400
MEM
BR,AODISPO
MIC?C .. I;!C~C+1
I
,CLEAR BIT TN LINE STATUS WORD
000341
063670
BRWRTE IMM, 0
MICPC=MICPC+ 1
12672
RAlI
(1)
83a
012674
(1)
en
012674
RUI"'ID
MESSAGE TYPE IN SPll
(1)
83'1
840
12676
1'12700
iJ
000344
000424
00034~
(1)
(I)
(1)
STATE
RCVS
,CHANGE RECEIVE STATE POINTER TO STATE B
MICPC .. MICPC+l
I
060530
,IP' NDP' SLOW
BRWRTE BR,AA!SP10
MICPC=MICPC+l
! <58-IIlIT& 77712»
000350
10045 I
ALwAYS IDLE
MICPCzMICPC+l
I
000353
I fl4501
ALWAYS ROS
MICPC_MICPC+l
t
,UPDATE PORT STATUS WORD
000355
063311"1
000356
100663
ALWIIY5
INSlt
IIIICPC.MICPC+l
I
,REAO BP CONTROL REG
oorQ60
123220
OUT
BP,
MICPCaMICPC+l
<1I0VE! WROUTX I BP I I
HICPCa!lICPC+ 1
I <58-INIT'77712»
0(10]70
154620
,ALWAY
MEMX,SELB,PACE3
MICPC"MICPC+l
(11
~77
111275\)
(1)
(1)
n127!iO
000171
120fi20
CKTIIIF.I SRWPTE
IBUS, llBBIl
MICPCaMICPC+l
<"OVE I IIPTEBI'I! IBUS I I I I I
~97
O~2766
(1)
(1)
017766
(!,
!l89
012770
{11
(1)
012110
0098
PAGE:
0099
.=1:NIT+l000
MICPC=377
.SBTTL RCVA-·ROUTINE TO HANDLE FIRST DDCMP CHARACTER
~i!4
e9~
PAGEl
RCVA,
0 0 0400
023200
ENT£i\ED
SP10lRTE
r~OM
IiiI,E LOOP
aR,SELAISP1
,PEAD PORT STATUS WORD
~!CPC.;;;ICPC+:i
000401
060501
<"OVEI WRTEBP IBRI 1 <5S-INIT&777/2»
000403
1 0 7412
,IF BOOT MOOE---ONLY BOOT OJ(
BII7
5$
MICI?CaMICPC+l
I
,COMPARE BR TO SPO
00040!5
0f>0360
')00406
101740
,IF EQUAi..-IS NU;';SEi I
,COMPARE ENQ TO SPO
0/'.03tt;O
0<)0411
10S 422
,IF EQUAL-IS UNNU"'BF.:REO MESSAGE
RA2
Z
14ICPcafllICPC+l
I
,COMPARE DLF. TO SPO
06(\ 360
800T
Z
HICPCaMICPC+1
J IF EQUAL IS ROOT
000414
013012
(11
(1)
013012
581
000412
n00620
ill
~'l"
(I)
('II '014
II)
01,014
01 1 0413
(1)
Q(H'l
~11016
(I)
n~CI
I
0I1e·'0 PPOTOCOL
Dnr"p'.MAC
(1)
l~PLfl~e:N't'ATION
06-0F.C-76 11114
01301f.
HACY11 :17(1006)
14-0EC-76
16144 PAGE 6-33
RCVA--ROUTINE TO HANDLE FIRST DDC"'P CI'AIIACTEP
I
MICPC=MICP('+l
<"'OVE I W~OUT 1 !1414! <2(1()! Q;lCVCO»
qq
I)
1 3026
(11
Ql0
013026
013030
(1)
(1)
RMll
000420
(1)
01 Hllo
r MASK
TO CLEAR--CLEAR ACTIVE
J IN LINE
ST~TUS
wnRn
.Ir Dr
(101
000
n01
90Q
111M, 357
~iICPC=HICPC+1
(100416
001)7S7
go(,
'107
'10'1
,nUSH INPUT SILO
00(1400
0!l0421
1004S0
SLOW
ALWAYS
RM1
,SET STATE TO RCVA AND RETURN TO IDLE
.F.:NOC
• IF Nor SLOW
STATE
RCVA
~ rCPC .. lHCPC+l
1 65
001
000423
100'lSO
.EtlOC
STATE
0 . .'
000
.\,;N!,)C
001
• IF OF
SP
HOIAYS
QI q
QI9
noo
,CHANGE RECEIVE STATE TO I
l
0<10424
0'23204
J READ CHARACTER TO SP4
(1)
'I"
013040
,/,01<0 MAR WITH ADDRESS OF CURRENT BA
070214
000
LDMA
SR,
MICPC.MICPC+ 1
• IF ION BR,IMM
<140VEl LD"'AR 1 IMM1 1 I 4
~1'064
ALWAYS PH5
,SRANCH TO Se:"D ~"K ROUTINE
MICPCIIMICPC+l
I
,SET THE fLAG
(I)
qH
1)1
~OftE;
('nouo
(1)
(Il
.
111306ft
I\I'.HOI
,
93'l
I)! 3070
i)
01'10441
.1110461
'It 3072
(1)0442
0<;3223
STATE
RCVC
MICPC=MICPC+l
n00443
O!'i6226
OUTPUT ,
MICPC=MICPC+1
:'
(I)
(11
04n
13070
n 1307'
(II
(11
(11
'l41
(11
(II
I)
RBll
RBOI
13074
01]074
J OUTPUT LOW ORDER BYTE: OF ADDRESS
(11
Q47
(II
ell
941
OUTPUT MEMX! INCMAR,<&ELS10BA2> ,OUTPUT foIIGH BYTE OF ADDRESS
MICPC:II4tCPC+1
,READ THE !lUS REQ REGISTER
(1'10445
123220
BRWRTl!: 110114,101
MICPCcMICPC+1
~0450
~
nnH05
<"DVE I SPX! 114M! 3001 SP5>
'''OTE THIS I1EALLY WRITES A lOb bUT THE
,5 GETS SHIFTED OUT
,"ASK ALL BllT .. X, "EM BITS
"4Q
Q4Q
i'l
111 n
(11
(11
"11110
!'RWlIn'
orrJ45 I
0401'.65
TO ISOLATE EX, IoIE'" BITS
"r~'~X,J\ANDB1SP5
... ICPC"MTC PC.,
< "OVF ! W211
<"nVF!
:::"FT~P!
(11
1.:t'1
(1'
"1 11 1 4
r.~S;.1p,;
1,.Jj",t;.
:.5HH-T Tt' .... IWrn THE CGF1RtCT f'OSlTII'lN
l<"SHFT
"'1(,PC::cMTCP(,+j
'oil
TCPC'=",' I r:'P ...... 1
liPTE,<\P! S'"l
c~
~1
01
D"Ctl DOC"P PI10'!'OCOL IMPLE"1ENTATION
!l~r.HG1i.~AC
(1)
M-f.'f.C-76 11: 34
(,13114
MACYll 27(1006)
14-0EC-76
16:44 PAGE 6-36
RCVB--?OIJTINE TO HANDLE fIRST CH4.RACIER OF COUNT FIELD
001620
<"lOVE! SHYTBII! WRTESR 1 SELB>
0,10454
nn1620
8RSHFT
MICPC=MICPC+1
000455
O(11&2C
BRSBFT
MICPCaMICPC+l
1 I
01)0462
01)0600
BRWRTE
1"'11,200
MICPCaMICPC+ 1
000
00\
'167
qf,R
(1)
(I)
MACYt 1 27 (1 006)
14-0EC-76
16144
PAGE 6-37
RCVC--ROUTINE TO HAIJDLE SECOND CHARACTER OF COUNT FJELD, SELECT AND FINAL
0\3130
Oll0461
1)13130
I "CALL"
SELECT IQS¥hC SUBROUTlhE
,GET CHAkACTEP
(1)
91,9
(11
n1:lt32
(11
nl H32
,SEPARATE SELECT !'lIT FRO"" COUNT
(1)
970
(I)
fJIllH
(1)
r)13t34
(il
97\
nl3136
(Il
(I)
niH 36
(1)
Q7?
r)11140
(1\
(1)
LOMA
TMM,BC
"'rCPCaMICPC+1
.IF ION IMM,I"!'"
5»
.E'lOC
STATE
RCVO
:SET '1F:XT STATE TO D
"'ICPC=MICPC+l
IM I
,INPUT THE CHARACTER
000474
023600
BRWRTE BR,SUBISPi'
"'lepeaMICPC+l
<"'OVE I WRTESRI BRI I <10S-INIT' 77712»
000477
100451
ALWAYS IDLE
MICPC .. MtCPC+l
I < IOLE-ItUT£ 777/2»
1)00472
0('1('1<; 13
1'1021
(0
9E13
011156
rtl
(t)
013\ 56
(t)
9B4
01311';0
(Il
(11
011160
(1)
9R5
0111(1;2
(1)
(I)
013162
(1)
Q~f,
013164
(1)
(1)
('113164
(1)
9~i
01316('
{ll
(I)
1)13166
108 I
BRWR'fE SR, SELA I sPt
"TCPCIIHtCPC+1
WPTE8R 1 BR I I < IOLE-INIT'77712»
0 0 0';02
06(>(,10
SPWRTE 8R,SELAISP10
"rCPC:M!CPC+1
<"aVE IIiRTEBR 181'1 I
0')00;04
1'.3'10; I
8114
lOLl':
MICPC=MICPC+l
<.JUMP! BR4CON I < IDLE-INIT&3 (lOO*4> I < IDLE-INIT('77712»
(1)
Q>lQ
01317(1
(1)
(11
013170
(1)
q89
013172
(Il
(11
() 13172
(Il
oon
013174
(I)
(Il
013174
(1)
q'll
011171\
(ll
(1)
1)1)176
III
9..,
(lJ
(11
(11
III
OIl2(1)
I)lnn.)
0(1)505
00 I
01 (I \ 0; 3
(I)
,1(10
(I'
LflMA
1Il0l''', IsPt 7
MICPC .. MICPC+1
• tf ION I"'''',IMM
l'wMT('t>(" .. ,
<"'OVEI sp)C I BA I SELBI SP15>
(1)
c,',n;,
(lj
321")
(1)
(ll
I"
olnl'
000512
I "0 ~51
~LWAYS
IDLE
MICPC .. 14ICPC+l
I I
Orl0517
t05522
Z
58
~ ICPC=MICPC+ 1
I <5S .. INIT&77712»
000520
0631;)
SI?
BP,DECA,SP13
I4ICPCa'HCPC+1
000"'1
104523
~LWAYS
RE2
MICPCaMICPC+1
1
RE2:
STATE
RCVP'
,NEXT RECEIV.E STATE IS F
~lICPC .. MICPC+l
1
000526
105130
C
RCVFO
,NO OVERFLOW
MICPC=MICPC+l
I
RCVP'I
013744
n 13244
PACE 6-41
000525
n~ 3164
1111240
(11
101 <;
(11
:UPDATE R FIELD
: OVERFLOW -
DECREMENT HICH BYTE
(1)
1 n 11
(1)
(1)
011241';
tOP
013<4"
01320;0
" (11
(1)
rq 1250
RCV'OI
OOO!!' 31
020200
STATE
RCVG
r-:TCPC:oMICPC+l
000'532
100450
ALWAYS REXIT
MrCPCcMICPC+1
I 4ICPC+1
<"'aVE I WRTEBR! IMM I