Digital PDFs

MAINDEC-11-DXQLA-T-D

March 1977

134 pages

Original

6.9MB

Document:	MAINDEC-11-DXQlA-T-D DEC X11 Monitor Library
Order Number:	MAINDEC-11-DXQLA-T-D
Revision:	0
Pages:	134
Original Filename:	http://bitsavers.org/pdf/dec/pdp11/xxdp/x11_listings/MAINDEC-11-DXQlA-T-D_DEC_X11_Monitor_Library_Mar77.pdf

OCR Text

IDENTIFICATION
.......
......
-~

P~OOUCT

CODF.i

DATEi

MARCH 197'7

MAINTAINE~!

DIAGNOSTIC G~OUP

THE INFORMaTION IN THIS DOCUMENT IS SUBJECT TO CHA~GE WITijOUT NOT!C~
A~n SHOULD NOT BE CONSTPUED AS A COMMITMENT BY DIGITAL ~QUIPM!NT
COP~ORATtON.
DIGITA~ F.QUIPMENT CORPO~ATrON ASSUMEs NO RESPONSI8IiilTY
'O~ ANY EP,"ORS THAT MAY APPEAR IN THIS MANUAL.
TijE SOFTWARE DESCRIBED IN THIS DOCUMENT IS rURNIS~ED UNDER A LICENS~
AND MAY ONLY R~ USED OR COPIED IN ACCORDANCE WITH TR~ TtRMS OF STICH
LICENSE.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSI~ttITY FOR THE USE
OR RF.LIA8ILITY or ITS SOFTWARE ON EQUIpMENT THAT Is NOT SUPPLIED BY
DIGITAL.
COPYPIGHT eC) 29'74,1975,1976,19'77
ay DIGITAL ~QutPMENT COP~ORATION

CONTENTS
..
-.- .. Q~5K DEC/XiI

STANDARD MONITOR

QAED DEC/Xtt

S"O~T

MONITOP

•

GAIM DEe/Xtt STANDUD MONITOR
DXQUM.ptt
21-APR-.,., 12i42

!41eY1t 2H t006)

OO,U

23-APR-77

PAGE t

SEQ 0001

1
2
1
4

5
~

,
7

9
10

IOE!JTIf'ICUION

13
\4

,PRODUCT eOD!:,

15
16
17
18
19
20
21
22

,PRODUCT lolA!.!!: I

MA INDEC-11-DXOA8-~-LA
DF.CXll - STANDA~O hI(JNlTI1R

,DATEI

APRIL 19'77

,"'AINTlINERI

DIAGNOSTIC GROUP

13
'24

-_ .. _- ... -... - -----_. __ ..... .
(,.\ti!." .. C""t"l".t,o

...

\"!.JII"\r'U,..jio ........ l~'

OABM DEC/Xll STANDARD !AONITOR
DXOABM,P11
21-.PR-77 12142
27
29
29
)0

oonooo
OMnoo

~ACYl1

27(1006)

23-APR-77

00111

PAGE 2
S~Q

,LtST
,TITLE
,ASECT

SEO
OASM

DEC IX 11 STANllARD "!O',ITOR

,:00

12
))

H
)5
)6

,GLOBL
,GLOSL
,GL05L
,(;LOBt.
,GLOSL

LCOR12. HCORt2. OACNV. BDCI>fV, 10'000, CLr.JCKL,CLOCKP
KW11L,KwllP,HMS,IofOUPS,WCASF.,WCASEE,CLOCK
OP'P'SET. HUNGCK. H!<GTI'4, LrLEAP, PCL~~AR. CHKSUM
TKS, TICB. TPS, TP8, FILCIIT, ~tLLI':R, SII, RA "'NUM, CAS"
MODCNT, MODCTR, PASRgL, IIEt.OC. ALLIIK, l<TPPES, PWRCNT

31
H
]9

.
4\
42

45
46
4'1
49
49
50

' . . . . . . IP' RUNNING iOTTH AN 11/60 AND "lilY SYS"E~ TYPE ERMP OCCURS
,
(TPAP TO 4, ETC,) "LOGBUP'" .;nL CONTAII!
THE CONTF,lITS OF' 6CRUCIf".O r«.'!'Yf'lIIf!! "~"M
SCItATCHPH'
LOCUIONS 100-tll" APF !>PIN,!,,,,!) OUT,

"_! "".

I SWITCH RJ;:GISTEP Op'I'rONS,
,SR1S_1
,SR14:o:1
,SR13-1
,5R12-1
,SRto-l
,5R9-1

HALT "10DULE ~.FTEIl P:PPOR,
INHISIT MODULE IiALT AF'TEP 20 ERRORS.
INHIBIT ERROR PlItNT,
ENIIBuE ENDPAS PPINTOUT,
P1HNT ALL DATA EPRORS TN BUFFER
INHIBIT "RELOCATED TO " ~ESSAG"

'11
52

,MODULE S'I'UUS BIT OEP'INITIONSI

'54

55
Ijli
0j7

'58
'59
60
iiI

BIT 15-\
BIT 14-1
BIT 13-1

BIT 12-\
eTT 11-1
BIT 10-\
en 09-1
ALL o·S

IOMOD
MODULE SELECTED
MODULI': DROPPED
EXT!:1II0Et' MODULE
D!'SELJ;:CT !P' PROGRAM IS II[t.OC ATE~
DESELECT IF NOT ON AN EVEN 321( OP'P'SET
N8KMOO
SBIC"'OD

(1004

QUM DEC/x! t
DXOUN.Pl t

STANDARD I«l'lNtTOIt
U-APh71 12142

n
U
64
65
&&
67
69
69
70
'71
72

73
74
75
76
'77

'78
79
80

IofACYU 2'7(100&)

U-AP~-7'7

PAG! ]

00 I \I

I" rEw I'tErINtTIONS.

.""
.'1
-u

000000
'l00001
(100002
000003
000004
000005
000006
000006
00000'7

Rl
112
P]
R4
RS
RtSP
PC

1(:EI;!RAL
,r.!N!PAL
,GENERAL
,GENERAL
,GENERAL
,G!NF:RU
,GENERAL
, POINT!R
, PROGRAM

·'3
·U
.,~

.'116
.'116
-''7

puppon REGIST,.P
!lUPP'lSE PEGIST!"
PURPOSE REGISTER
PURPOS": REGISTER
Puppnsl'" REr-TIIT"R
PUPPOSF: RF:GISTrR
!lUPP.,SF RI':GlSTlI'R 6
TO HAR"WAPF CSYSTE~ "r.r~ULT) STACIC
COIINT!P

-t 7'1776 ,PIIOCEIIIIOR STATUS PEGIIITER

1'7'77'76
17'7'176
1 775'70

PS
PSw
H~RDSII

-177776 ,PROCP:SSOR STATlTS WIJP"
-177570 ,HARD"'ARE SWITC>I PP:GI ST!':R

1775'72
172516

SSRO
SSR]

_1'77572 ,MII;MORY MANAGE"II]'NT REGISTER
-172516 ,MEMORY ~UNAGEMP:NT REGISTI!:foI

1 '70200

MAP~EG

.171)200 ,eASE ADDR!SS 01" UNIBUS MAP BClX (t 1170)

OA8N D!C/Xtl StaNDARD "ONITOR
21-APR-77 12142
DXQl8M.PII

'IaCYll 2'1( 10061

23-ApI'I-"

no 111

PAGF. 4
SE? oon6

1176600
.101
IIt,,2
_tn3

IMAINTEIIIINCF: EU"I!NE ANI) DErOSlT INSTRUCTTO":
,LOG SEPVJCF. PEG. AOP -- P"~D
,LOG PHYSICAL· IIUSS 4DR. REG. ~DR. -- pEAD
,l,OG ClIIIFlE'lT 141CRO AD!!. REG. aDR. -- READ
,LOG P'LAG/T'lHRPUPT IU;G. ~DP. -- RE~O
,GEN. WHO J~ t PEr-. AnR. -- PF'~D
IGEII. w,m AlA I Rft;. aOR. -- ,IIHTE

(llI~n )

076600
000101
000t02
000103
000104
000022
000222

"EO
FlOSERV
ROP8A
ROCUA
PDFGIN
PDIIH"'I
IITIIHMI

119
90

177772

PIRQRG

-177772 ,PROGRA"MED INn'lIPUPT RI!'QUEST REGrSTEP

140000
n4(1noo

U!lODE
SMOO!

.14nooO ,BI'1' CONP'tGURATIO'l TO 1'10 IC ATP: USER HODf. J N PS;"
,eIT CO>lFIGURATION TO nOIC~TE SUPERVISOR MODE IN PSIr
.40000

172300
172302
17'231'14
172306
t 723\6
172340
1'72342
172344
112346
1'72]56

KIPDRO
KIPDRI
IOPDR2
KIPOR3
KIPOR?
KIPARO
I(IPARI
J<JPAR2
KJPAR3
ICIPAR7

-172300
- t 72302
.1 '72304
-1'12306
-172316
·'72340
-172342
-172344
0:172346
-172356

,ICERNEL
,J<ERNII;L
,J<ERNEL
,J<EPNEL
, KEPNF,L
,J<ERNEL
IICEI'INEL
II<ERNEL
,J<ERNJl:L
, KEPNEL

INSTFlUCTlC!N
P'STRUCTION
INSTRUCTtf'N
INSTRUCTION
INSTRIICTlnN
INSTRUCTION
INSTRUCTION
INSTRlJCTIO.1
JNSTRUCTION
JIISTI'IUCTION

177600
t 77602
177604
177616
177640
177642
177644
1 ''7656

UIPDRO
UIPOR\
UrPDR2
UIPDR'
UIPARO
UIPARI
UIPAR2
UIP.R7

"177600
.,77602
-177604
'"177616
-177640
01177642
.'77644
=177656

,USER
,USER
,USER
,USER
,USER
,USER
,USER
,USEl1

I IISTRUCT 10"

93
B4
95

86
97

91
92

93
94
95
96
97
98
99
100
101
102
103
t04
105
106
107
108
109
110

111
112

113

-104
-n22
-222

TNSTRUCTIO~

PISTRUCTION
INSTRUCTlO~
PlSTRUCTIo~r

INSTRUCTION
INSTRUCTiON
pJStl1UCTTO'i

PAG~ DESeRIpT"R
PAGE DESCRIpTnR
PAGF: nESCRIPTf)R
PAGI!:. "ESCRIPTOP
PAGP: OrSCI'IIPT"p
ADOPESS
PAG!!'
APORESS
PAGE
PAGE
~DORF.:SS
ADDRESS
PAGe:
PAGI':
~DDRESS

PAGE
PAGE
PAGE
P,IIGE
PA.GE
PAGE
PAGE
p.tGE

Of-SCRIPTOI'!
DESCRIPTOR
!'!l!:SCRtPTOI'I
OE'SCRIPTOI'I
ADDRESS
ADDRFSS
A"ORESS
At:"ORESS

foIEGISTe:R
RF.GISTEP
REGISTER
IIF.GISTER
REGISTEp
REGISTER
RF.:GrSTER
REGISTEI'I
REGISTER
R~GISTEI'I

.
QUI! tlEC/Xll STlNtllRtI MONITOR
tlXQABM.Pt 1
21-APR-" 12142

114
! !5
116
117

118
119
120

121
122
121
124

US
126
127
128

129
130

131

MACYl1 2'7(1005)

OOr t 1

2]-APR-17

SEQ 0007
PIRQS
OPEN
BITUS
BIT14
BIT13
BIT12
BIT11
BtTtO

000004
nt)l)OO(l

100000
0400('0
020000

010000
004000
002000
001000
000400
000200
000100
nOO040
000020
00(10 to
000004
01)0002
000001

-tOT
*0
"100000
*41)000
*20000
-iOOOO
*4000
.2000

1n
136
07

U8
tl9
140

141

143

,SIT 15 OEflNITtON
,BIT \4 DEFINITIClIi
,8IT

13 DEFTNITIOll

,8IT 14 OEnNITTOJl
,8IT 11 OFFH.ITIOIi

a400
.200
*100
-40
*20
*1/'1

BIT2

BtT1

BITO

a2
*1

,Bn 10 D!:FINITION
DEFiNiTIOr.:
,BiT
,IUT
DEFINITION
D!!.FINITION
,FlIT
DEFINITION
,Bn
DEFINITION
,FlIT
DEFINITTO'l
DEP'lNITIOtJ
I !lIT
OErINITIO<l
,8IT
DEP'!NITrO"
IBIT
DEf'T,NITION
,F3IT

000340
(10(1300
'H)0240
000200

PRTY7
PRTY5
PRTY!!
PRTY4

*340
a300
a24('1
*200

:BIT CONFIGURATION FOR PRIOPITY
IBIT CONrIGURATYON II'OR PRIOPITY
.BIT CONFIGURATION FOR PRIOllrTY
,SIT CONFIGURATION rOR PRIORITY

01'15746
1124646
005726
022626

I'USit
PUSH2
POPSP
POPSP2

*OOS74t1
·(124646
a005726
.022526

,i'ST
,CMP
,TST
,CMP

000100
000040
01)(1620
001130
Oll 222
01(107'2

IE
t(BUFL
IOQL
TyPQL
TYPLIM
IOOLIM

,IlEP'lPlI'I'ION or INTERRUPT Jl'N~BLE erT FOR ALL PDP-1 t DEVICF.S
=RJT6
IDEP'INITIC1!>1 OF I{EYBor.RD BUFFER LENGTH (IN WOIlDS)
a32.
,DEP'INITIOI'l all' INP(TT/OUTPUT SERVICE QUEUE LENGTH(IN BYTFS]
a400.
,nFFYNITIO" OF '1'YPING CUtUE LENGTH (nl BYTES)
a61111.
,DEF'PIITYON OF' tAST WORD IN TYPE QUEUE
=TYPEQ+TYPQL
,I)FF'I'lITION OJ' Lt.ST W"PO I~ I/O QUE:UE
arOQ+IOQL

142
144
145
146
147
149

,foIAlCE THE PIPO CALL A TRAP THROUGH THE ttlT 'JECTOR
,USE OPEN TO OECLAR?: ALL V,~"lHBLES AS 0 BUC:?E 5T' . "'" ~ ~.~ l:j

BtT8
IHT7
AlT6
BIT5
BI14
IHT]

sng

*ioOO

\32

114
135

PAGE 5

QABM DEC /XU STANDAPD 1I0NITOR
DXQAB!"<.Pl!
21-JPR-'77 12142

MACYll 2'7C 1006)

23-APR-77

,sn

00111

LEVEL
LEVEL
LEVEL
LEVrL

IN PS\Io
IN PSIi
IN PS\oI
IN PSW

-(l;;Pj
IluSEn Tu p.[)v A ~l'~D 70 'Tne: S'i'AC;
"USED TO PUT TWO WORDS 0111 THE snclC
-CSP),-CSP)
(SP)+
II USED TO OF,LETE~ A WORD FROM THE STACt(
(SP)+, (SP,+,USE!) TO onETE TWO WORDS FROM THE STACK

PAGE 6
SEt::

~009

IT).!! rOLLOiolING DEf'INITIONS ARE THr INDEX Vr.r,UES USED 9Y A40DE 6 AND 7
,MONITOR INSTPUCTIONS WHEN PEl"l"RRrNG TO Lt)ClTIOIJS IN THE: HEADER or 11 ,",OOULE

149
150
1~1

152
153
154
155
156
Pi7
158
159
160
151
162
16)
154
165
166
167
1611
169
170
171
172

173
174
175
176

0'10000;
001'11)20
00002 t
0011022
(100024
OClIl02tr;
nOO(l30
000032
0001'134
0001116

XFLAG
SUT
STAT1
INIT
SPOINT
PSCNT
!:PCNT
SVRO
aVR1
/;VR2

000040

8VU

1)00042
(1110044
0011/'146
000050
0001152
000052
000054
000054
000'156
/'100060
000062
000064
00M66
0110/)70

SVR4
SVR5
SV R 5

177

oon'l77

178

000074
1)110076
MH'IlOO
1'1/)0102

179
til 0

till
182
1113

~SRA
A~S!!

SBAOR
ASTAT
WASlDP
ASB
AWAS
RSr!!T
RBuP'n
R9UP'PA
RBUP'E14
IIFlU,.SZ
w8urpA
wSU"!:)\.
WBUII'RQ
wBursz

I RF.P'I!:IlENCE
I POINTS TO
,POINTS TO
,POINTS TO
,POINTS TO

USED TI1 KEF.P TRACK OF WRITE BurrER USAGE
THF: LOW J;lY'I'E or THE ,",OOULE STATUS WORD
THE IUGH BYTF. OF THE "nDULE STATUS WORD
THE MODULE'S STAPTING ADDRESS
THE MODULE'S STACK pal NTE!!
,RErEREN~ES THE LOCATIO" Kt;;F.'PtNG TRACK OF THE ~UMBE:P OF PASSES
,REP'ERp':NCES THE L"C~TtO'l l(EF.'PING TRACK OF TliE NUPI,BER OF E:PRORS
,POTNTS TO WIIT;!RE T)'!E "'ODULE'S REGISTER 0 CONTENTS ARE: STORED
,POINTS Tn "HERE TH" "ODUlE"S REGISTER t CONTENTS ARE STORED
,POINTS TO WHF.:RE THE "'OOU!.E"S REGISTEP 2 CONTENTS ARE STORED
,POIMT'& .TO i11i£A€ THE MOl)ULE',/i. AG.1SUA I eOMT&liT5 AAE &TOIt£D
,POINTS TO ~HERF: THF. '10J')ULE'S !!EGIS"e:R 4 CO"TENTS ARE STORED
,POINTS TI) WHERF. THE MOOU[,F'S RI!:GtSTER 5 CONTENTS AR! STORED
,POINTS TO IfHF'RE THF ... onULE· S REGT STER 6 CO~TENTS ARJ!: STORED
,PEr!lItIiCES TMt BASE lDD"Jr.SS or THE f<lODULF."S DEVICES(~ONTROL AND
,PEF'ERENCES THE COftlTENTS OF THE CONTROL lNO STATUS REGISTER
,POINTS TO TIIA ADORESS or WHAT THE DATA SHOULD HAVE BEE~'
,POINTS TO ANYSUTUS REGISTI"RNOT THE SAME AS THE CSR
,POINTS TO THE ADDRESS OF WHAT TH!: DATAWAS
I POtras TO THEACTUAL EXPECTED DATA
,potNTS TO Tilt ACTUAL RECEIVED DATA
I POINTS TO TilE MODULE REST APT ADDRESS
,R!:rERENCES Tlo/!: VIRTUAL ADDR!SS or THe: READ BurrER
,POINTS THE LOCATtOIl rOR THE PHYSICAL A!lDRtSS or THE REAr> 8urrER
,POINTS THE E:XTENDED ADDRESS BITS or THE READ Bur"EFI
rPOINTS TIlF SIZE N' THE: READ IIUrre:R
, POINTS TO TH!: rlRITE ElUrrER PHYSICAL ADDRESS
,POTNTS TO TilE EYTP"'DED .aDl"RESS BITS or THt WRIT! BUFr!1I
,RErERENCES THE l'lOIJNT OF WPITE BI/FFER REQUESTED BY MODllt.P'
I PErERENCES THE SIZF. or THE WRITE BurrER

ClUM DEC/XII STANOlllD ~ONITOFI
DXClAlM.Pll
21-APFI-17 12142
184
185
186
187
188
189
190

191
192
193
194
195
196
197

198
19q
200
201
202
203
204

205
2(16
20"
208
209
210
211

'12

2U
214
215
2U

"'.C:Yll 27[1OQI)

OOIlI

2J-lPFI-17

PlGP.: 1

SEQ 0009

,LOAD TRlP lND VECTOR lFlEA
QOOOOO
000004
0000(16
000010
000012
000014
000016
000020
0000'2
000024
~00026
000010
00(1032
000014
000036
000040
00(1042
0(10044
000046
QOO050
0(10052
000054
00(1056
000060
noo062
non064
001)066

000000
000000
015246
000340
015276
000340
005700
0000(10
006416
000340

000000
BUSEV,
FlU IV ,
TRCvi
IOTVi

•• 0
.wORO
BUIERFI
PPTY7
RESIN,.
PRTY'
TRCI
0
PIRQ.
PFlTY7

oonooo

,BUS EPPOR TRAP POI"UR.
,PESEFlVP:D I "'TRUCnOI! TRAP.
,TIIACt

TR~P

POT'4T"R.

PWRrv;

,SERVIC" PIRQ CALL
,PREVENT f,OWER LEVn '"'OOU"'!: rROII C:O"ING I>.i nN
,TOP or HIGHER LEVn ON!!:S
,POWER P'HL porNTEFI.

E"'TVi

,r,MT POINTt:R

PII'IIDN
PRTY?
.+2
HALT
TRPV;
TRPIHT
0
.-40
.110'110
DD"TRi .WORO
.WO'llD
LOGIC
OPEN

nl5460
(100340
(100032
000000
nl!1t34
nooooo
000040
000000
000000
000000
016134
000000

0,0

,TRAP POINTEP.
OPEN
0
0

ILOAO "'EOIUI.I INDIClTOP.
,CllBIN MOJ)F.: ONLY. PrlI",.S TO ""'''ON.

DnN

,(;LO!AL P"IN'TE'II rOR CAST "ODIFICATION
J~LSO rOR CftST

CAST

OOOOOOG
nOOOOl
000(160
006552
nOOHO
001526
n00200

1
.-60
KYlIOV,
'l'TPIV,

Qlll'" DtC/X11 STANDlllD MONITOR
DXQUIol.Pl1
21-aPII-" 12142

"laCYll 2H 10(6)

,ICY~D

IeIlSRVe
PRrY'7
TTYSPV
PRTY4

1'1TEPRIJPT PC'll ~ITEP.

,TEt.ETypg

H-app.'7'7

00,,1

PRIMT~P

SEPVICE

PAGf. B

21 '7
218

219
220
221
222
221
224

000114
000116

onott4
"1567'
""0]40

.-114
puveT, PlREPR
PRrY'

,FAPITY EPROP INTl':'RUPT POJN'l'P:R

225
,LOAD StaRTJHG lDOP!:SS!!

226
22"
228

229
210
231
232
23!

234

000200

000200
001'116'7
(011)00

001330

.-201)
JMP

001000

000167

000530

J"'P

001004

(loonotl

STAPT

,GO TO STAPT

or "Im.nOR.

STAPT

:GO TO STAn

or "10NITOP.

.-1000

:t·OCATION OF" PS1!:UDO

~WITCII

Rgr,. WIIE'i USi::O

CilAIII'I

PEC IXlI

E1l0lBM.Pl1

STANDARD MONI'l'OR
21-APR-'7'7 12,42

2;;

?4l
244
245
246
,,7
248
249
250
251
252
2~]

2S4
255
256
251
258

23-APR-77

00111

SEQ 0011

277
2'79
279
290
281
292
283

294
290;
296
287
289
?89
290

.0'"

.I. Col

1",It'"r".. '"

TYPOUEi
spcrLGi
OIRIHD i
BKQUEI
BRAKEI
TTYBSyj
MODCNTi
MODCTRI
ERRINO!
rILCTRi
MOXCTR;
,..OXCNTI
WSFLGi
sTopi
BKCNTr
XCNTI
QUECTRj
xrRrLGi
ROTCTI

.BYTE
.BYTE
.BYTE
.BYTE
.RYTE
.BYTE
.RY!E
.BYTE

OPEN
OPEN
OPEN
C.PEN
OP1';N
OPEN
OP!';N
OPEN
OPEN
OprN
OPEN
OPE'"
OPEN
OPEfol
OPEN
OPEN

OP~N

,VU,UE us!';!) FOR BUFrEP ROTATIOH '!'lMEOUT (Hi TIIoIP.:S

001032

000

P.lSTOT;

.BYTE

OPEN

I ALTERNATE RnOC UINJ COU~~TER- TOTAL ENOP"SS
:CALLS tt.! CtJP!lEIIIT lH"'lC

nOloll
0() I 034
nnl035

(100
oon
(Ion

PASRELi
SI(T1"'Ri
ROTI

OPEN

(101036
1;11'11040
001042
nOl044
nOl046
0(11050
0(11052
0010!"4

nOO(lOO
nooooO
noollOo
1100000
ooonoo
1'100000
000000
000000
"00000
1'100000
000000
0011000
000000

.SYT!
.llyrE
.Jl.YrE
.EVEN
KBPTRj
OPEN
MOOPTR: OPEN
ADORLoj OPEN
~ODRHI i OPEN
NUMBERi OPEN
NUMBPAi oprlll
NUMBEA, (lPE"
OSTADR, OPEN
SRETRN; OPEfol
IOBRID i OPEN
OPEN
YESI
TABADR; OPEN
PSTAT,
OPEN

.~YTE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE:
.BYTE
.BYTE
.BYTE
.BYTE

.. "'n/'Hle"'
........

0011l~6

11010611
001062
001064
001066
0lli010
001072
nOlo'74
01')10'76
oottoo
Oil! I 02
001104
I')nl \06
001110

000000

TRCPCi

001112

nooOOO
0000110
000000
noonoo
0000110
onoooo
1')1')1')1)00
000000
000000

TRCPS"'I
1001'
IOQ21
TYPQII
TYP02,
TYPAOR,
TYpRtTl
TYPCTIII
O"SCEAI

001 t 14
1')01116

')00000
nooooo

MOOWPAI OFtN
MOOWEA, OPEN

"'ACYl 1 27(1006)

~ ""1"'\

MUST BE IN SAME

,SPCFLG ANll DIRIND .... UST BE IN SAME WORDI!

,TELETYPE BIISY P'LAG. 0= NOT BUSY.
, ,,_ERROR, NOT OIlD.lTA ERROR.
:F:XTENOEO IIO "IODULES NOT YET RUN :iN CUi<RENT BANK
,EXTE'IDI';D 110 MODULI" COUIlT
:ClJRRENT VALUE or U'LAG BElfolG CloIECKED FOR
,STOP MonULF.S TO RELOCATE PROGRAM
,S1ICKGROU'm MODULE COUNT
: PUNNABLe: EXTENDED MOOUt.E COUNT (TO CALCUt.ATE POTCT1

01'11:"
OPFN

iXCNT

OPP.~

OPEN

377,

WJ,fICHEVE~

SMALL!~'

I BK"OI) INSTR crR- LOADED "ROM SKTIME
,Wl\tlP' IH'I'l'A'!'!ON RATE CTR- T.OADED rRO'" POTN

! MODULE Pl'1l'JTEP

OPEN
OPE:N

,11(1 QUE!)!'; POINTFRS.

OPr,~

OPEN
OPP;~

:1,OAO TYPE QUElIE POtNTE~
: U~LOAD TYPE QU,"UF pQTNTEP

OPEN
OPEN
OJ)EN
OPE'"
OPEN

23-AP~·77

: lIS!!:D TO '40>,JtTOR CO~!SOLF. TET.ETYPE Tn PREVENT HA"'GlllOG
,USEI) Tn HOLD U lITT/; FnR OCTAL TO
: ~SC IT CO"V€RS 1('1N

00 III

PAGE 10
SEQ 0012

MODWI2,
MODPP.li
"'COREA I
1400R121
OEPPCTr
SAVLO,
SAVill,
MOO"DRi
TYPPI,
TYPR2,
TYPRll
TYPR4,
TyplI5,
SPSAV,

000000
onoono
nllOOOO
000000
000000
000000
01')0000
0110000
oooono
01')0000
1'0(01)0
000000
oooono
nooooo

)05
306

0011 ~ 4

('00000

oooooc

E'F!~'POSI

nil 1156

COrLG I

O"E~

307

001160

n~oooo

CCSRAI

O~tN

309

~OPO~ 1

!OQU!:i

000
000
I)on
"00
000
000
000
000
000
"00
000
noo
000
000
000
000
ono
1')00
000

1)01120
nOll'2
OIl1tH
001t26
OOttlO
00H32
001134
nl')t 1 31\
nOl1411
00 It 42
"01144
on1141\
nOll!iO
001152

308

'!'Y~QUE

000

QASM
OF.C IXt 1 STANDARD MONITOI!
OXQU"',J)11
21-.PP-77 12142
291
292
293
294
'95
296
297
291;1
299
300
301
302
303
304

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

i'li'lii'106
nOl00'7
oat 01 0
001011
0,,1012
001013
"01/114
0(11015
001016
00t017
001020
001021
nOl022
00\02]
001024
nOl025
001026
00t027
001030
n(l\ 031

?!~

260
261
262
263
264
265
266
267
261!
269
270
2'71
272
2H
2'74
"5
276

PAGE 9

,VARIABLE DATA AREA CLEARED EVERY TIME RUN IS ISSUED OR ·C IS TypED

215
236

H9
H9
240
241
242

NACY!l 2-/u\ju"J

OPEN
OPEN
OpEIII
OPEN
Op,!!:N
OPEN
OpEN
OPEN
OPE'I
OPE III
OPEN
OPEN
OPEN
OJ)EN

: AOI)PESS r)F CUR"E"TLY EXECUTI"'G (lOQ LEVF:L)
,SlVE LOCATIO'lS FOR TYPE ROUTIN" Rt!;ISTERS

O~E'~r

: !>Jl'!ca'."E

1>F'~"'!""

CUEr"DAT~

POU"'!'1F.

"'OOULl':

QABM OrCnll SU"OA~O 140NlTOl!
DXQABIol.PII
21-APII-" 12142

]to
311
112
U1
314
315
316
317
1U
119

321
122
123
324
)'J5
326
327

:ua

329
310
331
332
333

334
335
316
317

338
319
340
34t
342
343
344
345
346
34'7

348
349
350
3'51
352
353

3'54
355
356
3'57

IIACYI! 27(1006'

00111

2l-APII-"

SEQ 1'101'

,V.,ItABLE UJO fIXED
001162
001164
001166
001170
0011'72
001174
001176
001200
001202
001204
1'01206
00'21 "

O~T~

363
364
365

001214
001216
001220
001222
001224
001226

TICSI
TICBI
TPSI
TPBI
LPSI
LPBI
SR,
IIUNUM;
!'IANWRIt'
MEMV"I
JiilEIIIPA;
HEMEAI
MEM121,
MEMSBEI
MEMWASi
LOCOREI
ZEROi
LCOR121
HCOR12i

177560
177562
177564
177566
1 '17514
177516
177570
1234'56
22331
OP!N
OP!N
OP!N
OPE"
OPEN
OPEN
OPEN
0
OPEN
OPEN

MI230
001232
001234
OOt236
I:IOl2 4 O
001242
001244
001 '246

000000
001534
000000
000000
000000
nooOOo
000000
000000

HCORSVJ
IIBuri
WBrtAI
W8Uf'12;
O""'XJ,
OP'rStT,
OF'STDI
OFrST"',

OPEN
STAPT
OPEN
OPtN
OPEN
OPEN
OPEN
OPF.N

001250
00t'2'52
0012'54
noU'56

000000
000000
no0024
012000

MOVBNKI OPEN
MAPRETi OPEN
ERRt.IMI 20.
MXWllrl
AMODNIoI-STARTI2&177000

001260
001262
001264
001266
0012'70
/'10\2'12
001214
on12'76
001 )00
oot 302
1)01304

000000
000000
000000
000000
000000
1)00000
000000
1'77600
1'72200
1'72301)
000000

TTYBYTI
CXRETI
SYSCNTI
PWRCNTi
Sl(PTRI
ICTSAVI
HCR12AI
PORTABI

001306
001)07
nOI 31 0
(1)1311
001 3t '01)1313
001 'H4

014

'ILCNT,
FILLERI
SYSERI;
RMOO!I
Cl{NI
POTt;
ROTLI

M1212

On(!
000
000
001)
1)00

ono

QABM Dr-CIXII STANDAPD "'ONITOR
DXQABM.PII
21-r.PP-" 12,42

366
367
368
3611
3'10
371
372
373

3'74
3'75
376
377
378
379
380

381

392

001]15
0(1)16
oot 320

001330
001131
1'01312

000
(lnOOOI)
I) on 1 00
000400
000
1100
000
000
(l00
000
010

001]33
001334
001]35
001)36
001 )37

('JOO
1)10
0113

OO11n

nl)t 374
"OIH!5
(1) t 326

nOln.,

000

oon

"'''CYtl 27( 10(6)

.BYTE
.BYTE
.~YTE

.BYTE
.BYTE
.BYTE
.BYTE

lI5
]86
387
388
389
390
391
392
393
394
39'5
396
397

001 340
001341
001342

no 134 3
001344
001345
(01)46
00134'7
001350
0111351
001352
001353
001354

000
000
000
000
000
000
000
000

nt2

398
399

(101356
001360

000
noo
000
000
001356
OOnOOOG
OOOOOOG

400
401
402
403
404

01362
01164
01366

001604
OOOOOOG
O('JOOOOG

~OT

CLEAPgO wHEr.: PU" OR -C IS ISSUEO

,IF TlIIS UlO '1EXT Lne' ARE CHANGF.O,
,CHANGE LOC.S LPWKI ~'lD LNI1(2 IF PR~SE'NT
: ADDRESS OF nlE swtrC,", REGISTER
IRANDOM Nfllo1RER IS CALC"II:O A~D PU!5EO HE!'IE
,T4LSO USEO 8Y HIm.

:STJlPTING ADDR nF FOEE CORE ('IULTJPLE or 1000 OCTAl.)
:LOCORE F.I'< BITS
,TOP 12 BITS nF LOW CORr. A[lDPESS
,CONTAINS ST. AllOR OF HtGHEST BUrFER.
: (TOP 12 BITS O'lLY)

OPEN
OPEN
OPEN
OPEN
OpEN
0
0
17'7600
172200
PORENOI 1'72300
KTPPESI OPEN

:CO"'TAIl>i$ CURRg"T iIo!l!TE BUFFER ~DDR.
:I'IPTTF: l'ltlFn:p n 8I'I'S (S"'!I"TEO TO J:'OS 4,5)
;TOP 12 ~TTS OF Wl'IUF AO"lR!':SS IF USfNG ROT~TTI)"
; 'l'OP AI,LOWABLE PROGRAM I'lFFSFT
,CIJPRENT PRnGI:!A" OP'FSF.1'
,DESTIN UION r'lFP'S€T
,SAVE 1.0CATlO~ FOR OP;STYlIIITIO" OFFSET
,DUPI"'G MOVE
:BII'II( BF:ING "OVEO (SOURer. ADDRESS)
; RETUR~l ADDRESS P'RO" MVCOOE ROUTINE
:MAX snE 01" liRITF. BUFFF.P. VAPI!,;S
:IF 8t1FrFR OOTATION IS ENABLED

:CTRLX oETUpN lIDi'REI'\S
: TOTAL NUMBER OP' SY5TF.M EPPORS
: TOTAl, NUMBPR OF' ~CI:o/EP rAILS
IQUICUP' POtl>TER I>IJTTALIZATION FOP RUNNIfo'G BI"'''ODS
,USED FOR SF.CONO PASS I'l CIUJ"I MOOE TO
I PESTORE TRUE STATe: OF SYST~M

12.
0
OPEN
OPEN
OPEN
OPEN
OPEN

2]-APP-77

00 III

,0: t~>HIBITEn OP 'lOT PRF.SF.t.lT (LEAVE AS FULL
:WORD rOR EASY "IOOIII'ICATInJi A~!D TO G'IARANTEII.:
ITHAT f'lLCt.lT ~III" FILL'P ARE PI SAf.4E INURD)
,FILCNT ,11110 Ftt.L1':P "UST ElE IN SAMF.: 1I0RD
,PUN 'lO!'t l"OtCATnq
:WRITE PUFFEP

RnTATIn~

LOC((EP FLAG

PAGF.: 12
S"~'

RELOCI
.BYTE
ROTCNTi OPEN
ROTNUM; 100
ROTSIZI 400
P'ILt.ID 1 .AYTE
MOVING; .BYTE
RUNRP'LI .BYTE
LOCl(,
.BYTE
MVOOWNi .BYTE
RETRY I
• BYT!!:
QUECNTr .AYTE

OPEN
OPP;N
10

MDL45;
.GWBFCI
MEMERP'I
SKTIMEi
ROTNj

.BYTE
.flYTE
.BYTE
.BYTE
.BYTE

OPEN
OPEN
OPFN
10
3

.BYTE
.!lYTE
.IIYTE
.BYTE
.BYTE
.BYT!
.ElYTE
.BYTE
.AYTE
.BYTE
.BYTE
.BYTE
.BYTE
.EVEN
CLDCn. ICW11t.
Ct.OCICPI J(WI1P

aPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN

KNGTIM; 900.
At.C1.R;
LCt.EAP
APCt.1I1
PCLEAII

383

3114

~IIEA

1"560
177562
t 77564
1 '77566
1775t4
1'77!H6
17'7570
123456
022331
000000
000000
000000
000000
000000
000000
1'00000
1)00000
000000
000000

358
359
360
361
362

PAGE II

PPRESI
CNTli
ATE I
MnAG,
"INGrLGi
MOVP'LG'
MSGP'LGI
DATP'LG,
SYS1.IM;
TP'LAGI
NSTOP I
Ct.OCICI
At.LBIC,

OPEN

OPEtl
OPE'"
OPEN
OP~~!

10.
OPEN
OPEN
OPF,N
OPEN

,!'IF-LOCATlnN ~LI.IJW!,;f) nAG
:RonTH'" COU'lT,"P lISEr) WITH ROTL
:ROTATtnN cn"ST4'1T liS!!:!' WITH ROTCNT
:ROTATE PRnGRu4 llY 11K
,f'lLL IIIOICATnR.
,CODE BEING PrLOCAT!':O
I PP£Vr,NT ROTIITlnrl OF CODE EXECUTION
l RETRY

COUNT FOR COPE RnaCATION
: I OF TT"'ES Tr> CHF'CK IOQUF. SEfORE CHECKING
,TYPEQ Wl{EN BOTH HAVE REQUESTS PENDING
,NON-ZERO IF cpu IS 11/45
,WRlTE RU'FEP MTATtON COUNT
1# nr G>JBur CALt.S (tiESS a"'E) NF.EOF:D PER
I ROTIlU" C ALT.
,P.lIPITY PRESP!T. O:JNHIBJ'tI;;O OR NONEXISTF."'T

I P'LAG INDiCATES CKHUNG ROIlTINE IS BUSY
,FLAG USP::D IN ~1VCODE pOliTINI';
,FLAG I'iDICATING "SGN OR "'SGS CALL
I FLAG tNOTCAUN!; CI(OATA OP I:'ATACl( CALL
I MAX. NuMBEP aF SYSTEM ERRORS Al,t.OWED
rTJIo1ER 'LAG Io.JDtCATING FRPOP OR EOP
:FLAG PREVENTING STOP FPO" FlEING SET
,CLOCK nAG
,WHEN NON 0 MEANS RUN ALL 8((MOOS BEFORE PELOCATING
,WILt. BE 0 IF NO KWI1-1. C1.0Cl(
II'IIt.L BE 0 !P' NO Klll1-P CLOCK
"'lUNG TIME J,PltT IN SECONDS
I SUBpOUTINE ADDPESS IN 1, CLOCI( 1010DULE
,SU];IPOUTINE ADDP IN P C1.0CK MODut.E
,WILL DPOP ANY t If) "OOlltE INACTIVE "OR 15. "'INS.

0014

QAaM DEe/xu S'llllOlAO MONITOA
DXQlIJM.PIl
21-lPA-11 Ui42

MACYll 21(1006)

23-APA."

00111

PAGE U
SEQ OOlS

••• DO NOT CHANGE THE SEQUENCE OF TME NEXT 9 WORDS . . . I

405

to!
,REFIll TO THE DOCUMENT FOR THE MONITOR CHECICSUM MODULE (SlCBA)
,rOR THE UIE or THE NEXT IIX WORDI, AND HOW THE TWO .OPEN- t.OCATIONS
,ARE DEFINED WHEN A NEW VERSION or THE MONITOR IS Rtt.EASED

401
401
409

:~:

001310

13'1'"

412
UJ
414
US
411
411

001312
q01J'"
OOU'76

411

001405
001410
1)01412

002641
001534
025106
1 J'7601
002641
001405
OOOOOJ
000000
000000
000000
000000
000000
000000
000000
000000
000020
O(HIOOO
000000
000000

419
420

421
422
423
424

425
425
421
421

429
4;0
431
432

qOl400
OGU02

Q01414
001416

001420
001422
001424
~Ot.2!

QOl430
OQ1470

001412
0014'74

~ot416
001500

CHKL21 1315'7'1
CHKH2i 2641
CHKlUMi .WQAD
.WORD
CHKL1, 131601
CHltllll 2641

START
WCUtE

, t.OW CRICIUN rOR PROC. WITK NO RTT IN IT •
tHIGH CHItIUM
,BEGIN ADDA or MONITOR PURE AREA
tEND ADDR or MONITOR PUAE UEA
tCO"TAINa LOW CUM or MONITOR PURE AREA 'PROC WITHRTT)
,CONTlINI HI CKSM or MONITOR PURE AREA

.000
HOURsi
MIIII'fI;
sEUDSI
R'l'INE'
RTIMXi
Ct.KlDR,
Ct.KHLDI
PTIMti
MAUIM,
PAR'lll,
CPUERR,

~ILK!

OPEN
OPEN
OPEN
OPEN
OPEN
OPEl
OPEN
O,EN
.• Bt.KW
OPtN
IinEltll; OPEN
t.GHOLD, OPEN
CONTRL, 1.,.,746
KOIfTRLI

1,.,.,46
000000

,HOURS IN ASCU
,MIIIUTES IN lICII
,SECONDS IN ASCII
,TO'llt. ELAPSED RUNTIME IN SECONDS
J MOLDS RUNTIME EXTENDED BITS
,SAVE t.OCATION ,"OR Ct.OCK ADDRElIS
,SAVE t.OCATION rOR eLOCK CSR
,MOLDS MODUt.E PASS TIME IN SECONDS
,HOLDS MAX. ELAPSED TIME rOR CJ(MUNG ROUTINE
,TABLE or PARITY REGISTtR ADDRESSES
,ADDRP.:SS or 11/60 CPU ERROR RtG.
'AOj)~tSS Oi' ii/fiG i'iEi'iOil'i f:RilOil ilil:C.
,MOLDS CONTENTS or ERROR LOG FlEG. t.AST READ/WRITTEN
,CACHE CONTROL REG
,TE!!P STOR rOR CACHE OPtRATIONS

16·•

.EVEN

OAIN DECiXt1 STANDARD MONITOR
DXOlBM.PII
21-APR-n 12i42
435
436
437
438
419
440
441
442
443
444
445

449
450

001502
001506
001'512
001'514

012700
000167
0011000
000000

001516
oot!20
001'522

001512
001304

104421
(1)0001)

onot"

PAGE 14
SEQ 0016

0067]6

COMQUEI MOV
",",P
CADDIII OPEN
CSTlRTi OPEN

,DESTINATION ADDR.
,MOOULE STAPT ADDII.

,CH!CICDATA EPROP CALL
CDERRI DERRXI
CDIllRP1 i OPIJIf
"MP CORn
I TEt.ETYPE ROUTINE PIRQ CALt.
,TTYt.NK IS FREQUENTLY MODIFIED DURING EXECUTION

452
453
455
456

00111

,COMMON -QUE CALt.- FlOUTINE. DOES A DIRECT DISPATCH PATHER THAN
,REQUEING DUE TO MULTIPLE POINTS CALLING TMIS ROUTI~E WHICH
,MAY OVERLAP IF RtQUEUEO.

"51

454

23-APR-"

,YlIlIABLE QUE CALL ARU- KEPT IN trRONT OF START SHiCE IT IS IMPUII! CODE

U6
447

MACYl1 27(1006)

001526
00153()
001'532

000004
00'4]6
000000

TTYSRVi PIRQ.
TTYLNKI TTSRVI

CO \l'OR MONITOP).

QAlM O~Ci)(t 1 SHfI[IIlRD "ONITO'l
21-APR-n t2in
DXQABM.Ptt
451
458
459
460
461
462
463
464
465
466
467
468
469
410
471
472
473
4'74
4'75
4'76
4'77
478
479
480
481
482
483
484

485
486
487

488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
SO)
504
505
506
507
508
509
!1l0
511
512

21(1006)

n-kPR-n

00111

PkGE 15
SEQ 11011

,SURTUP SEQUENCE
I CLEAR THI!: :.IOIILO.
RESET
I Sl!:T Up STACK.
MOV
'SPROT,1I6
MOV
,sn UP POWF.II nIt, VECTOII.
IPWRDN,PWllrV
I SAVE PRESENT BUS EIIII TRAP
MOV
IBUSEV, - CSP)
MOV
I SET SPaHkllDWAIlE SP
.HAIIDSR,SR
MOV
,StT N!W BUS ERP TRa P
U.,BUSEV
,IS IT HARDWARE SR?
TST
UR
BR
,Ir YES, RESTORE TR~P
4S
MOV
I !LSE SET UP SOP'TWAFIE SR
.nK!SR,SR
311
(SP)+, (SP)+
, RESTORE STACK
CMP
MOV
(SP)+,SUSEV
IR!nORE BlIS ERR TPAP
41,
,INITIAI,IZE Tn START BKMODS WITII 1ST ONE
MOV
.MOOQ-2, BKPTII
,DONE BUrFER SETUP?
LOCORE
TST
BNE
,eR IP' Yr.S.
2.
R5,SETBur
1'10. DO IT.
J5P
,THE rOLLOWING IS USED TO WRITE ALL MEMORY WITH "'!lATEVEIl IS
,ALIlEADY THERE, JUST TO CLEAR ANY PAil TTY EIlIlOPS PRESE>!T
,TURN orr KT
linn
,II:T?
KTPIIES
T5TB
,SR IF NO
eEO
14.
PC,KTINtT
,sn UP KT REG'S rOR NORMAL USE
J5R
,ropcr. A KT TPAI) iIIHFN LOOP OVERFLOWS
KIP[lR2
CLII
,IN'1'O NeXT PAGE
,TUII~ ON KT
MOV
.1,PUSRO
,EXIT POINT P'OR END or ME~ORY
MOV
t17S,U4
,SET BACl< A PAGE P'OR LOOP'S INC
MOV
'-200,Rl
,SET UP KT TI/·AP TO !'UMP TO NEXT PAGF.:
MOV
U3S,Pt250
,BUMP TO NEXT P~GE
ADD
.200,111
1381
,SET UP LOOP'S I)~GE
MOV
Rl, KIPARI
,GET PID OF TRAI) JUNK ON STACK
MOV
.CCSRA,R6
,USING THIS AREl rop STACK TEMpORaRiLY SINCE ITS
,IN THE SAME PAil SPACe
I SET RO Tn USE PAR 1
MOV
'20000,RO
,GO DO A PAGE
8R
151
,SET UP EXIT !l'OP "ION I(T
MOV
t!fl$,1lt4
141'
,START .at LOC 0
CLI!
RO
(110),(110)+
MOV
I WIlITE A LOC WITH ITSELF
15si
,BR TILL KT OP 4 TRAP
SR 15.
,TUIIN J(T SACK O,,"P'
MOV
'o,t8tSSPO
1781
,IIESET STACK TO REAl, ARI':A
MOV
UPSOT,R6
1811
,COPRECT TIlIIP VeCTOP
MOV
nUSEIIII,IIU

STUTI

001534
001536
QOt542
001550
QOt554
001562
(101570
001574
901576
001604
001606
001612
001620
001624
001626

000005
Ot2706
ot 271!'7
012746
012767
012767
005777
000404
012767
022626
012667
012767
005767
001054
004567

00t632
001634
001640
001642
001646

000005
105767
001430
004767
005067

010146
170432

001652
001660
001666
001672
001700
~01704
001710

012737
012737
012701
012737
062701
010167
012706

000001
001736
177600
001700
000200
170432
001160

001714
001720
001722
001730
Q01732
001734
001736
001744
001750

012700
000404
(112737
005000
011020
000776
012737
0\2706
012737

001756
001762
001766
001774
002000
002004
002012
002014
002020
tlI)2024
0020"30
002034

004767
105067
11276'1
t 05067
104406
!l22767
001002
104406
00476'1
004767
004767
105767

027212
015460
noOO04
177570
001576
177402

t 76254
177414
176214

001004

177372

176172
026520
1'77374

177450

025420

177444

177572
000004
000250

020000
!lOtH4

000004

000000
027212
015246

0!l0004

013004
177323
1777?'1
177314
022672
001004

177572

002040
002042
1)02046
1)02054

001410
1)04767
012737
104406

007746
000001
02461 !!

!l02060
002062

000402
104406

2"
177025
17'7164

024633
014714
!l15022
015514
177244

QABM DtC/Xll STANDAIID MONITOR
DXQl8M.Pll
21-lPII;'77 12in
513
514
515
516
51"
518
519
520
521
522
523
524
52!!
526
52?
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545

"'~CYl1

55S,

MACYl1 2'7(1006)

PC,CLIIQUS
JSR
RMODE
CLRI!
MOV8
'-I,MDXCTR
CLRB
ROTL
MSGS,TITLE
.rAKESII,SII
C"P
BNE
55.
MSGe,NOSWIl
PC, POTCHI(
JSR
PC',SYSIZ
JSR
JSII
PC,KLOCK
T5TB
KTPRES

23-APR-77

00111

rCLEAR OUEUf:S.
:INITIALIZE cnU'lTER
,MAKE SURE 1I0TATION 1S 'lOT LOCl<F.D
,TYPE THE TITLE
,DO WE HAVE A II!'"IIL SP?
: BII IF' YES
IEtSF. TF.LL HIM WHERF IT IS
,CHECK IF' ROnTE: ALLOWED ANO TYPE
:PRINT OUT THE SYSTl':M $IZr
,CHECK rop A CLOCI( 6ND SET FLAGS
III:T11 At.LOWEO?

PAGE 16
sr~

BEQ
START)
START2; JSR
PC,K'I'INIT
MOV
H,USSRO
MSG.,leTON"

INO- BRANCfi
:YES- INITIALTZF:
,TUFIN ON IS-BrT 1<'111
,·KT11 ENABLED"

021776

BR
START4
START3, MSGS,NOKT

I CONTINIIE
,"NO «Tl1"

START4i JSII

IGO TURN ON ""RtTY IF AVAILABLE

1)02066

004767

010722

002072
002076
0021 00
002104
Q02110
Q02114
002120
002124
002130
Q02U2
002136
002142
002146
002150
002156

1 057 37
001402
104406
005067
004767
004767
004767
105767
001002
004767
104406
105767
001405
112777
000167

000041

000015
006526

002162
002166
00'2172
002200
002206

012706
105067
0\2767
0527'17
116767

02'1212
177116
026712
000100
177120

RA~IGE.

177572

023!!20
177134
017360
012646
012724
177154

111

022534
022737
177144

!I' I
176660

61,
INPUT,

176636
176754
176613

PC,PONN

TST8
lil41
BEQ
11
MSGs,CLR40
CLR
O~FSTO
PC, MVCOOE
"SR
JIIR
PC,CLIIOUS
JSR
PC,CLRVEC
TIIT8
KTPREII
BNE
5.
JSII
PC,LOADWC
MSG.,OOT
TST8
CHN
eEQ
INPUT
MOVB
U5"KBPTR
JIlP
RUN
MOV
CLRB
MOV
BIS
MOVB

tSPBOT,R6
BY!!RI
tKBUf, KBPTII
1Ir., @irKS
QUECNT,OUECTR

,ANY LOAD "'F.DtUM BITS sr.T ?
:NO, CONTINUE
,. TO EXERCISE r,OAO MEDIUM YOll "'UST CLEAR Lnc 40
,!>lAKE SURE PROGPAIoI IS NClT PARTHLLY RELOCATED
,CLEAR QUEUES IN CASE MvcnOE OVr.R IoiROTE THE!.!
,INITIALIZE VE:CTOR AIIEA
I le111 IN USE ?
,YES, CONTINUF.:
,NO, 1,0110 WORST CASE PArTEII>! TN BUFFER
,TYPE DOT.
,CHAIN MOOE?
,NO- GO AWAIT KEyeO~PO INPUT
,CLEAN OUT «!YBOARO BUFFER WITH A CFl
I YES-SUIIT PU"'N INC.
IIIESET STACK.
,CLUR SYSTEIoI ERROR INOICATOII,
I IN !TIALIZE KYBO BUFFr.R POINTER.
rENI\BLE: KYBD INTERPUPTS.

001 ~

Q1814 DEC/XI1 ITUDA~D MOM%'fO~
DXQAIM.P11
21.&"'·'71 12in

IUCYSS nCl006)

546

2l·AP~·"

ooiu

PAGE 17
SEQ 0019

,QUEUE CHECK.

MOTE TN A'!'

QiiET5Ti DECIl
BGT

QUECTR

tr 10BKID IS NEGA'!'IVE, NO TYPE QUE REQUESTS WILL BE SEAVICED

547
5.'

549

Q02214

105317

002220

003004

002222
002230
0022)2
1)02236
002240
002244
002250

116767
000405
10576?
001402
000167
005'767
100422
t05767
1)01412
to5767
oot 002
000167
005361
001002
000167
005767
001402

17&601

,COUNT TO PREVENT BIIEAJ( CAt.t.S rROM t.OCKlNG OUT TYPING
,ALSO PREVENTS HIGH SPEED INT DEVICES rROM
,LOCKING OUT TYPE QUEUE AND RUN SERVICE
,STARTUP
MODUL!:S

550

55!
552
553
554
555
S!56

5!5'7

558
559
560
561
562
563
564
565
566
567
568
569

~022!52

002256
~02260
~O2264
0022~6

q022'72
002276
002300
002304
002310

1'71104
176550

0004'76
1 '7661 0

2' i

176531

• 7E 530
000674

116612

QTsni

005132
176560

QTSTBi

_~fO

cc;~::

ooc;a7

~Oc6;:

5'71
5'12

002316
003322

ttI576?
001'734

t76'767

" 'w

OABM

DtC IX11

DXQ~8M.PII

176577

STANDUD MONITOR
H-APII-" 12142

QU'1'ci

MACYll 27C 1 006)

5'74
575
576
t05767
notH!
10576'7
nnt 407

176463

590

002324
"n2HO
002332
002136

'581

002]40

176460

592

0(\2344

1593

nn2346

'5~4

(1(12)'54

\05767
1)01407
0127,;7
nn04!!1

tHl'n'!le

10'5"'67

578
'579

5R7

/l1\?!~2

oon,4

599

002364
002370

105767
0(11007
105767

'5n
5Qo
5Ql
'5Q2

nn7372

593

n1)241)';
(11)2410

594
'59'5

596
'597
599
'599

600
601
602

j~r

:;~Q~ye

UTI3
BEQ

RMODE
QUtTST

23-APII-77

117016

040020

176504

RUNSVC i Tsn
SNE
TSTS
SEQ
TSTR
REQ
MOV
BII

!5~5

'lU

BEQ

QUECNT, QUECTR
2.
IOQUE
2.
IOQSVC
IOBKlD
QUTC
TYPQUE
QTBTB
TTYBSY
QTBTA
TYPSVC
TYPCTR
QTBTB
TTSIIY1
TIICPC
QTSTC

00111

,IIESET QUE COUNTER
f 10 QUE REQUEST PENDING?

,GO SERVICE IP' YES.
,STARTING 1/0 MODULES?
,9R IF YES.
,TYPE REQUEST PENDING?
,9R Ir NOT.
,TTY 8USY?
,8R Ir YEB.
,NO. GO SERVICE TYP!!: QUEU!!:.
,CHECK rOR TTY HUNG
,UNHANG TTY
,UCKGROUND MODULE PtNDING7

;i;~~u~r M6~~?
,8R IF' NOT, GO CHEel( AGAIN.

PAGE 1 R

,RUN MODE SERVICE ROUTINE.
,NOTE THAT MODULE"S STACK POINTER IS REINITIALTZED RU"r r'JTHEII
,REGISTERS HAVE ANY PIIEVIOUS VALUES RESTOREO AT STAFT 011 IIESTAII1

573

577

MOVB
BR
TSTB
IIEQ
"MP
TST
BMI
TSTS
BEQ
TSTB
BNE
"MP
DEC
SNE
"MP
TIT

t 16426
176714

1)02)76

100004

nn24no

0400211

176452

000002

176422

0(12440

n12767
000702
n67767
0\7700
(')(,)\476
(')16n46
042716
n'22667
oot 136

001442

00'5767

176574

002446

n014! 4

002416
n02422
002424
0(24)0
lH12434

176416

0(10021:1
0161:100
\ 76420

11,

T5Ta
e'lt
TSTB
8NE
TSTB
BPI.
MOV
811
ADO
MOV
I!I£Q
MaY
BIC
CMP
I!INE
TST
SEQ

8RAKE
QUETST
ALL8J<:

12.
STOP
tH
H0020,IOBKID

,IS THE BRAKE ON?
,BII IF' YES. 00 NOT 1NIT MOllE MODULES,
,PUN ALL 81<MOOS 8EFORE RELOCATING?
INO, CON"rINl'E
,WAITING 'to PEL~CAT" ?
,NO, CONTINUE
,ST).RT UP OOlLY 81<,",00" S
,CONTINUE

STOP
I STOP SET?
QUnST
,YEll, DnN"T STAPT ANY MI"IRE MODULES
MOOCTR
: 1010DCTR -01
18
:!lll U' ~!OT.
CHIJ
I YES. ARE WE: IN CHAII! 101(10£7
is
18R IF' NOT,
.40020,IOBKlD
I SWITCH IT TO BACKGROUND AND PREVENT I..OOPU.iG
QUE:TSt
:THRU SI\CKGI<OiJND MD~ULE S.. ilHS MeRE 'rMAr. ::iNCE
.2. MOOP'I'II
I POINT '1'0 NEXT I.lODUT,E.
tIIMOOPTR,1I0
,MOllUT,E AODII TO RO,
18
,811 H' NO AOOP,
STA!CIIO,,-CSP)
,GET MOOULE"S STATUS
.BITI21RITll11\lTl0. (51') rMI\SI< SPECIH INDICATORS
r SP)+. IOI31(ID
,CORRECT MODULE TYPE TO RUN?
118
,NO- BIIANCH
OfFSET
,Ir OF'F'5tT 0, IGNOII!!' BITS 10 +11
2C
, CONTINUE

OAIN DEC/Xil ''UNDAI'D MON1TOR
DXQUM.Pt I
21."'1'·71 17142
603
604
605

002450
002456
002460

032760
00lt27
032767

ooi 11

MACYll 27C 1006)

23-"PR-71

004000

000020

001777

176554

BIT
BNE
Btl'

IBUll,STAT(RO) ,BITU SET?
,YES- DON'T RUN MODULE SINCE orrSET NOT 0
.! 777, orFSET
,OFrSET 32K MULTIPLr..,

000020

BEO
BIT
BNE
T8T

rYES- IGNORE 8IT 10
2.
IBtTI0,STAT(RO) ,NO- BITtO SET?
,YES- DON'T FlUN MODULE
Its
1081<10
,8ACKGROUNO MODULE.,

81011
MOV8
liIOV
JaR
BIT
BEQ
INC8
CLRB
liIOV
TSTB
BNE
MOV
BR
MOV
TST
8NE
BF!
OECB
JMP
CMP
BNE
M(lV
BR
CMP
SNE
MOV
Move

3$
.'BR Ir NOT.
,YES. APPLY BFlAKE.
'-l,SRAKE
MOOPTR, BKPTR
,RECORD MODO ADDRESS OF CURRENT 81<1400
PC,eKTYM
'RECORD START TIM! OF TllIs BKMOO
t8ITI2,STAT(RO) :!XTENOEO 110 MODULE?
,"10- SRANCH
48
HOXCNT
,YES, COUNT IT
XF'LAG(RO)
,CLEAR IWOICATOR
SPOINTCRO), SVFl6(RO) ,SET UP MODIILE sP POINTI'II.
RUNRFL
5S
INIT(RO),DSTAOR :SET UP OESTI"IA'I'ION AODR.
6.
RSTRT(RO),OSTAOR
PSCNT(RO)
, HAS MODULE 8EEN THRU START YET?
6$
,8R IF' YES
,ELSE GO 8ACl(
44.
MOOCTF!
:OECR COUNT or 10100S IHITE".
IOOSVE
,GO TO START "ODULE
• 401'100, IOBKID
:FJNISHF:O wITH SPECIAL 8KIII00
: BR IF NOT,
81
UI000,IOSKI0
f YES, SWITCH TO NBK"OO
:CONTINU£
10.
141000, rOBKIO
,FINISHED WITH NBIC\lOOS
9.
,NO " CONTINl'£
.. 40000,I08KJO
,YES. SWITCH TO IOMOO,
J IN ITULLY trICK MOXCTR
. - " I-IDXCTR

P"G! t9
SEQ 0021

tt'

606
60'
608

002466
002470

001404

0]2760

002000

609

002476

610
611
612
6t]
6t4
615
6t6
61'
618
619
620
621
622
623
624
625
626
62'
628
629

002500

001117
005767

176354

630
631
632
6ll
634
615
636
637
638
619
640
641
642
643
644
645
646
64'7
648
649
650
6'51
652
653
654
655
656
657
6'59

002504
002506

100410
112767

177771

002514

016767

1'76320

176277
1'6546

004767

015314
010000

000020

(102,22
n02526
002534
002536
002542
002546
002554
002560
002562
0025'70
0025'72
002600
002604
002606
1102610
002614
002620
002626
002630
002616
002640
002646
1'102650
n02656

032'760
001402
105267
105060
016060
10576'7
001004
016067
000407

016067
005760
001001
00076!!
105167

000167
022757
001004

1 '76260
000005
000024
1'76546

660
6151
662
663
664
66!!
666
66'

669
669

311

ui
000046

000022

1 '6264

4411

000062
000026

1762!!4

!!II

1 '76202
000212
040000

1 '76232

6Ii

012767
000434

0410011

176222

022767
001013
1112'67
112'67

041000

176212

1411000
17'7777

1 '76202
176135

10506'7

17602

CLR8

MOXCNT

,INITIALIZE COUNT

0026'70

, 0506'7

176456

000415

CLRB
8R
TST
BPI.

NSTOP

002674
002676
0(12702

: ALLOw STOP F"LlG TO liE SET
, CONTI"IUE
,Ir ALREADY BACKGPO!)ND
,DON'T IIFS"T >,!OXCTP

01)2664

00!!767

1'76156

881

911

100012

QAB'" OEClXll STANDARD MONITOR
OXQA8M,Pl ,
21-.PP-77 12142
659

MlCYll 27(1006)

23-APII-77

002704
002712

!16'/67
012767

176112
040020

1761 07
1'76140

MOVB
"'OV

002720

016'/67

1'76344

176112

00'726
01'12710
002716

"00403
"12767
000167

026520

176102

MOV
MOVB
[lP
MOV
J!.IP

1'17252

10'1
lUI

lOS
rOI\KID
lOS

00111

PACiE

'1'1

MOXCNT,I'DXCTFI
1401)20,108KIO

,SETUP "OXCTR
,SWTTCH Tr'I 1\A(:KGpnu~n N1DF:

8!<PTR,toI00PTIl
t I, RUNIIF'!.

,CONTINUE: firTH NEXT IIIfMno
,SET RU" RFSTAIIT FLAG! 1/6"

1ts
• "'01')0-2, MOOPTR
QUtTST

:POIN'I' TO "OOULl': TA"LF ST~RT,

SEQ 11022

•••••••• ** ••

OliN ~Icixi 1 l'lANDAJlD NONI'lOR
21-A,R-'7'7 12in
DIQUM.'ll

MACYl! 27UOOI)

612
6'U
614

&1'

61'
610
6et
612
68]

61.

615
61&
68'7

"I
619
690

69!
692

~02'H2
002750
002752
002760
90nu
002710
Q02"&
903000
001002
001006
(IU010
001014

~01016
003022
001024
003026

OO~(ln·

694
695

003040
003046
901050
003054
003062
003064
9030'70
0010'74
Q03ioo
OOll04
OOll06
003110
OOll12

696
"'7
691
699
'700

'701
'702
'703
'704
'705
'70&
'70'7
'701

'709
110

711
'712
'7tJ

003114
9031 16
00)120
003122

QO!126
OOH12
0.,3136

02612'7
10]403
012'"
lOSl"
01'1'700
062761
010001
014046
022'72&
001002
00016'7
005'720
01206'7
012000

nino

0100'72

02'252
176022
n6106
000002

i16U&

718
'719

116100

10440'7
000440
1'760]2

00!002
000"'7
i 1606'7
012760
001402
000167
032'760
001002
000167
01006'7
010667
062700

176022
000020
020000

GOOGiO

1'7'7140
040000

000020

1'76026

Ioosvci CMP
8LO
MOV
DEca
ui
NOV
ADD
MOV
MOV
CM'
8NE
JMP
TIT
2Ii

.%002 •• IOQLIM

IOQIVlfi MOV
MOV
8NE
JMP
IOQSVEi Mova
IOt.lIYA; fin
BEQ
JM'
8tT
ui
8NE

(II0)+,DS'l'ADR
(RO)+,RO
10QIVE
'DSTlDR
STAT(IIO) ,RITAT

"NP

11'7124

MOV
MOV
ADD
MOV
IOOSVDi MOV
MOV
MOV
MOV
MOV
MOV
IOOSVBi "IOV

1'76042

2.i

1'76052
000050

014006
014005
01400.
014003
014002
014001
014000

016'746
105066

1'75'740
000001

016'746

1'75'716

eLRS

RTT1,

000006

QABM DECixl1 STANDARD MONITOR
DXQUM.Pll
21-APR." 12142
714
'715
716
717

MACYll 2'7( 1006)

MOV
RTT

11
nOQ,IOQ2
IOQUE
nOQ2,RO
12,IOQ2
RO,Rt
-(RO),-(SP)
I8REAX.,(IP)+
2.
8REAK.
(110)+

,RUCHED LIMIT or ~UEUE?
IBR IF NOT.
,RElE'l' IOQ2.
IDECREMEN'l REQUEST COUNT
,GET PC+2 or CALL.
,UPDATE II)Q2.
I SAVE PC+2 or CALL
,PUSH CALL ON S'UCX
IBREAK CALL?
,NO, CONTINUE
,YES, GO SERVICE IT

,GET DESTINATION lDDR.
,GET MODULE ADDR. IS IT Ot
I BR IF NOT. IT- S A MODULE.
,GO DO MONITOR FU"CTION.
tGET RO" STATUS.
,snu,a'UfRt)j r i'iOiHiLi S'l'OPilEiH
11
CONTINUE
QUETST
lYES. rORGET IT
nn14.STAT(RO) r IS MODULE IELECTED
21
rYES. CON'U"U!:
QUtTST
IN.O, FORGET n
RO.MODADR
,SAVE RO. (MODULE ADDR).
R6,SPSlV
, SAVE MONITOR STACJ( TOO I.
UVR6+2,RO
,RESTORE MOOULE-S REGS.
-CRO),R6
,STARTING WITH STACK POINTEIl.
-CRO),R5
-CRO),P:4
-CRO),1I3
-CRO),R2
-(RO),fIt
-(RO),RO
RSTAT,-(SP)
,LOAD RUN STATUS.
USP)
!~ERNEL. 18T REGIST"R SET
DSTADR,-cap)
,LOAD DESTINATION ADDR.
,GO TO DESTINATION.

'''0,

23.APR.'77

00111

PAGE 22
SEQ 0024

I BACJ(GROUND QUEUE SERVICED HERE.
OO)t 40
nnl146
01'131'54
001160

016'76'7

003164

000725

116'76'7

017'700
('10'5061

17572.
1'75'720
175660
175'71)4

175706
1'75'712

8KQSvci MOV
MOVB
MOV
CLR

TRCPC,DSTADR
TRCPSIII,RS'I'A'!'
.Io!ODPTII,RO
TRCPC

'720

'721
'722

PAaE 21
SEQ oon

6'?!

615

oOin

,% 10 QUE IERVICE ROUTINE.
!IERYICES PIRQt~QUEt. AND &RElXt CALL!
,NO'll THAT PJRQ SERVICE CAN OCCUII ON 'lOP OF THIS ROUTINE- SO
,LIYIL '7 PItIOIII'lY IS REQUIRED IF COUNT IS DECREMENTED ArTER 1002
,II MOVED

610

616
"'7

n-APR-"

911

IOQSVA

rSET UP DESTI~ATIOtl ADDR.
ISET UP RUN STATUS.
,MODULE STAIIT ADDII TO RO.
,CLEAR 81< MODULE wArTING INDICATOR.
, IF ERROR OCCUIIlI, NTLL STOP MODULE 'ROM rURTliER
,r.XECUTIOt.l UNTIL EIIROR IS REPORTED
'CO Gn GOIO/G.

QABM DEC IXl! f,'! PIOARD "'ONITOR
DXQABM.Pll
21-APR-" 12;42

MACYII 27(1006)

U-APR-77

00111

PAGE 73
SEQ 0025

,TYPE QUE SERVICE 1I0UTINE.
,REMOVES PC+2 or CALL rROM Q, PUSING IT IN lit

723
724

725
726
777
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747

0031 66
00]174
0031 76
003204
003210
003214
003222
003226

003230
003232
003236
003240
003242
n03246
003250
003252

003260
003266
003274
003]02
0(3)10

026727
103403
012767
105267
017701
06276'7
105367
010146
005741
010167
011101
006301

016101

1'75110

031222

030072
175604
175666
000002
17556 t

175676

175610
1'72244

000201

005310
005014
003476
003322
000001
000001
003466

004042
000001
000001
000001
000001

QABM DEC/XU STANDl!!D MaNITO!!
DXQABM.Pll
21-aPR-77 12142
748
749
750
7~1

752
753
754
755
756
7!17
758
7!19

760
76t
762
763
764
765
766
767
768
769
770
7'7t
772
773

175660

TYPsvci CMP
81,,0
MOV
INC8
111
MOV
ADD
DECB
MOV
TST
MOV
MOV
ASt.
MCOV
RTS

,REACHED UPPER ENO ClF QUEUE?
IBR IF NOT.
nYPEQ, TYPQ2
,YES. RESET TYPQ2.
TTY85Y
,INDICATE TTY BUSY.
lITYPQ2, Rl
,GET PC+2 OF C~LL,
• 2,TYPQ2
I UPDATE TYPQ2 •
TYPQUE
IDECIIEMENT PEQUEST COUNT.
,PUSH PC+2 OF CALL
Rt,-esP'
-(Rt)
:POINT TO CALL.
Rt,NUMBER
,SAVE ADDRESS OF C A.lJL
CRt) ,PI
:GE'!' CALL
Rt
,TI"'ES 2.
TYPTAB-TRP2-4(Rl), Rl
,FORM SERVICE AODR,
,GO TO tT, RESTOR I': Pl.
Rl

TYPTAB:

PlISEND
ENDSVC, ERRSVC, EPSVCl
MSG. ,1, P.:RSVC2, MSGN.,I, 1,1,1, "'SGS., 1,1. OERIIX,. MSGO •

004034
004024
000001
003312
003562

MlCYU 27C 10(6)

.1oJ0RD
.WORD
• WORD

TYPQ2 •• TYPLIM

23-APR-'77

00111

PAG! 24
II!:!')

,MSGN. POUTINF, • SERVICES CaLLS TO TYPE lISC II IoIESSAGF:S.
003312
003]20
00]]22

112767
000402
1 n5067

003]26
00]]32
003]36
001342
on33415
n(3)54
003356
003362
003364
003170
003374
003]76
001400
003402
003404
003410
003412
no3416
003420
001424

Ot 2167
012Ui7
Ot0167
016701
0)2777
001033
10!5767

177777

176026

MSGS.I

Move
BII
CLRI'

176020

MSGN .1

175532
176156
1761!50
176146
020000

"'SCCNT; MOV
MOV
MOV
MOV
SIT
BNE
TST8
SIolI
JSR
JSR
eRCR
Al'.:Nn
SPASS
0
MOV
lSI
MOV
281
CMP
BEQ
JSP

175764

100410
004767
n04567
022744
025721
0257!56

001300
nO]754

016701
"12146
02271 6
001412
004767
000711

175454

nooooo

177777
003742

175622

'-1. MSGYLG
MSCONT
IolSGl"LG

,SET MSGS CALL FLAG
,CONTINUE
:S.T ~SGN CAt,T, I"t,AG

(RO+.UBADII
(RtH,CST"RT
IlI,ClODR
CSTART.R1
IBITt3.IiISP
MSGt.
MSGP'LG

:GET ASCrt HRLF ADnR.
:"'ODULE IIOOR TO CSTART,
: RF-SUME "'OOR TO (' ADJ'lR.
:MOOur,F.: AnOR TO I'll.
:INHI~I'I' !':!!RClR PRINT?
,1IR IF' YES.
,IS TillS A MSGS CALI, ?
,Y~S, CONTINtlI"
, NO, Do COM"O~ STUPOl".
:TYPE
," C ARRAGl'.: RETUpNS
: COMMON HF:ADF'R,
: PASS .,

PC,ENDCOM
Pili, TYP"N

TARADR,R!
CPI H,-CSP)
'-I. CSP)
MSG1,
PC. TYPE
2$

,TAALF.: Aonll TO R1,
: GET MESSAGF' ~[lDR.
, TF;P,'4II'HTOP?
:FlR tl" YF.:5, DnNI':.
:NO, TYPE MESSAGE,
:GI"I nn TT AI:ATN,

nou,

..
8AIII DEC/XU .TlNDlRD MONUOR
DXOllM.PI I
21-APII-" 12i42

'"
77i
,;,
';5

,'".
79

710
111

QUM

785
796

n-APR-"

ooi 11

PAGE 25
SEQ 002,

,MIG* CALL IERVICED HERE

66hii
OO!430
003414
~0!440
OO!444
00!450

iiUHi
01016'
005067
004'76'7
105067
00016'7

liiG.i

116056
1'76054
003722
1'75344
1 '76026

DEC/XU STANDARD 140NITOR

DXQUM.P!!

782
'783
784

MACYl1 2'(1006)

MSGI. i

liey
MOV
CLR

(iit)+,-tI5P)

,nen MEI!iUG! ADDR TO STACK.

IIS,CADDR
CS'J'ART

JSR

PC,TYPf

rRESUME ADDR TO CADDR.
rINDICATE MONITOR QUE CALLING.
,GO TYP!: D!:SIREO MEssaGE.

CLR!

TTYBSY
COMQUE

,GO QUEUE UP TO RESUME.

J)lP

MACYII 21(1006)

23-APR-77

00111

PAGE 26

2\- .. PR-77 !2,42

SEQ

,BREAK ROUTINE. SERVICES BREAK CALL.
003454

012100

003456

010\67

175372

MOV
MOV

003462

000167

1'71344

JMP

BREAK. I

(P1)+,RO
Rl,OSTlOR
lOQSVE

,GET MODULE ADOR.
,GET DEST!NATION AD['IR.
,QUE UP TO RESU"'!

~028

OUM I)ECIXII S'1'lMDUD ,",OM ITO"
I)XOUM.Pll
21-APII-'7'7 12iu
'787
'789
'789
790
'791
'792
'791
'794
'795
'796
'7"
'798
'799
800
801
802

803
804
805

806

"'''CYl1 27(1001)

003466

OOU'72
0034'76
003500
003504
003~10
003512
003516
003522
003524
003530
003534
003536
003544
003546
003552
003556

01016'7
004767
01016'7
004561
026424
00..,61
004561

1'76010
010124
001234

010650

026436
004'76'7
004561
0264'70

001222
010616

032'7'77

020000

001004
012'746
00..,61
000167

026423
003610
001014

175U2

815
9t6
81'7
818
819

820

003630

921

003634
003636
(1031S40
003644
00]650
003652
00]654
003660
Q03662
003666
0036'72

822
923
824
825
826
927
828
829
830
831
832
933
934
935
U6
837
838
839
940
941
942
9U
944
845
946
"'7
848
849
850
8$1
8n

853
854
I !IS
85.

In
8$8
8'5'

860

RI,CADOR
PC,TYPDAT
(SP)+,Rl
Rt ,eSTART
R5,FILLNM

J SET UP RESUME ADDRESS
J GET MODULE ADDRESS

,SAVE AoDDRESS
,GET MODULE NAME

PC,TYPDAT
R5,BDCNV

,SETUP ERROR COUNT (ASCII)

PC, TYPDlT
R5,BDCNV

,SETUP TOTAL WORDS TRANSFlRRED

.BnU,UR
MSGDI.
.aERNM,-(SP)
PC, TYPE
ERSVND

,JNHIBIT ERROR PJlINTOUT?
,YES- BRaNCH
,NO- TYPE MESSAGE

23-APII-77

00111

,CHECK FOR HALTING "'ODULE, AND RETURN If' NOT

PAGE 1.8
SEQ 1')0]0

,DERIIX. ROUTINE. SERVICES EXTENDED DATA ERROR C"LLS FROM THe: "ONI"'OR
,CHECKDATA ROUTINE. TYPES ERROR INFORMATION Aro1'" RET'IRNS
003562
00]570
1)1)3572
003576
003602
003604
003610
003614
00]620
003624

813

MOV
JSR
ilOV
MOV
JSR
AERNM+1
JSR
JSR
UIICT
JSII
JSII
URTOT
BIT
BNE
MOV
JSR
MSGD1.i JMP

MAoCY!1 27(1006)

809

814

PAGE 27
SEQ 0029

MSGD.i

1'76020
001254

012601

807
808

ItO

00.11

, MSGD. SERVICe:- TYPE DATA ERROR COUNT AND TRaNSFER SIZE
, UD HAL'!' MOOULt IP' MECESSARY

QlBM DECIXU STA'IDAJlD MONITOR
DXOA8M.Pll
21-AoPR-77 12.42

8ll
912

:U-APII-71

~036'74

0036 76
003702
~on06

003710
003'712
003'720
003722
003726
003730
003734
003;36
0037 4 0
00 3 742
()0375Q
003'752
003;56
003762
003764

00n'70
001772
1)0]'776
004000
004004
00400.
Q04010
004012
004016
0041'120

!t2767
005721

000001

010167

175714
001150

004767
012601
010167
004767
012667
004767
012'702
004767
005302
0013'74
016146
004567
026335
005046
005766
001402
012'716

004567
026205
012603
012667
006367
012345
012346
066766
103002
062716

175227

175704
1)01136
1'75226
001044
000005
001116
000030
010522
000002
000060
010260
1'75252
175246
175236

000002

000020

005'723
004567
026265
012346
012346
066766
103002
062'716
004567
026250
004567
026220
004567
026231

016746

010216

175206
000020
010170
010150

010142
1'75150

000241
006216

005216
O04!6'7

010354

02631'7
000167

000306

000002

DERRX. i MOV8
TST
MOV
JSFI
MOV
MOV
JSR
MOV
JSR
MOV
DERRXI i JSR
DEC
8NE
MOV
JSFI
AERNMB
CLR
TST
BJI;Q
MOV
JSR
ui
ADTE6
MOV
MOV
ASt.
MOV
MOV
ADD
BCC
ADD
TST
ui
JSII
ADTE4
MOV
MOV
ADD
BCe
ADD
JSR
ui
ADTE5
JSR
ADT!!]
JSR
ADTE2
MOV
CLC
ASR
INC
JSR
ADTE7
J"'P

U,ERRI"D
(Rl)+
Rl,CAODR
PC,TYPDAT
(SP)+,Rl
Rl,CSURT
PC, TYPDAT
(SPH,NUMBEFI
PC,ENDCOM
.5,112
PC,TYPDAT
R2
DERFlXl
EReNT(Rl) ,-(SP)
P5,8DCNV

:POINT TO RETtJlHi LOCATION
,SETUP RESU"! Al)DRE~S
,GF.T IoIODULF. Aoo'n:ss
JAND SAVE IT
I SETUP aDDRESS or CKDIIU CALL

I ERPOR COUNT TO STACK
I CO~VERT ERROP COUNT TO DECIMAL

-CSP)
2(SP)

IS
U;I),(sP)

R5,OACNVX
CSP)+,R3
(SP) +, ERRPOS
ERRPOS
(R))+,-(IIP)
(R))+,-C511)
[FlIIPOS, 2 (SP)
2,
'20, (SP)
(R3)+
R5,OACNVX
(3)+,-(SP)
O)+,-(SP)
ERRPOS, 2 (SP)

,CSRA EA BITS
,CSR ADORF.SS-

A~CII

,SAVE TABLE ADDRESS
,SAVE OFFSET COil NT
I SETUP P!AO S'Jl"P'FR I'll
,GET EA 8ITS

,SKIP SIZE
,GET PA OF ROADR
,GET WRITE PA
IGn EA 8ITS

3t
.20, (SP)
115,OACNVX

,GET ASCII OF IIPADR

R5,OACNV

,CONVERT SIB TO ASCII

R5,OACNV

,CONVERT WAS TO ASCII

UIIPOS,-CSP)

,ERROR PosnION IN !lUrrtR
, CORRECT BACK FPOM PonE TO WOIIO PTR

esP)
(SP)
115, BO;::'IV

I MAKE 1 aT WORD t1
,GET DECIMAL

ERSVX

,GO TO COMMON ROUTINE

QAlM DECixll IS'UNDlRD MCHU'fOR
U-An • .,., 12142
DXQUM.Pll

MlCYll 21(1006)

liZ

164

~040U

112'76'7

000003

IU
I"
II'
"I

904,,12
004014
004040
004042
tJ04050
004054
904062
004064
0040'0
0040'74
004100
004104
004110
004112
Q04\16
004122
Q0412G
004130
\)04132

000406
105061

1'74'7!1'7

016146

000030

g¢i:,3·6

u~'5!?

t)!~~'"

!-,04142
Q04t"
004150
Q04S52
0041!16
004160
004164
004166
0041'2
Q041"
004202
004206
!-,04212
004214
004220
Q04224
0042:J0
004234
004240
00'242
004244
0042!12
004254
004260
004264
004266
004270
004212
0042'76
0(4)00
000&104
004306

026335
105'761
00104'7
00456'7
02623l
OO·U6'7
026220
012667
104413
016'746
016'746
004!!67
02626!1
01266'7
104413
016746
016'46

...
no

17t

172

1'73
1'74
175

.,.,

I"
1'71
119
110

III

.."'.,
=e~

liS

.11

119
890
191
192

194
195

."
197
8"
199
900
901
90a
903
904
90!l
906
907
908
909
910
911

912
9tl
914
9t5
916

93\
9]2
933
934
935
9l!
93'7

9U
939
940
941
942
941
944
945
946
9n
948
949
9"10
951
952
953
954
~!I!I

956
957
9!18
959
960
961
962
963
964
965
966
96'7
968
969
970
971
972

004110

004]16
004]20
004)24
004110
004))2
004340
004342
004)46
004)50
004]54
004')60
004362

PlGE 29
SEQ OOll

=.'I'!y

ERSVC2i MOVB

n,ERRIND
n'VCA
ERIIIND,
ERIVCl
n,ERJlIIID
(Rl )+,CITlRT
n,ERRIND

012161
122'761
001002
012161
01016'

OU'Ot
00411'7
005261
001002
005161
012'02
00411'7
005]02

cou,.

00456'1

026250
005046
01166'7
001402

012716
00456'
026205

000002
1'75440
000003

004567

1'74'735

1'74'"
1'75416
1 '75414
000564
000030
000030
000005
000624

1'746n
00"'62
00"54
1'74654
001046
174646
174644
00'.,.0
174626
001046
1 '74620
1 '74616
00'712
000002

ERJlIVCi MOYI
EJlIVCli MOV
CMP'
BtfE
11
MOV
CRl,.,TABADR
MOV
Rl.ClDDII
1fi
MOV
CITlIlT.1I1
PC,ENDCOM
JIll
!RCN'fCRl)
INC
ER,VCS
INE
ERCNT(Rt)
COM
I5,R2
ERIVCI; MOV
PC, TYPDU
ERIVCC. JIll
R2
DEC
liNE
!RIvec
ERCNT(Rl)' -(IP)
MOV
J!R
RS.!DeNV
lERNMB
ERUND
'!'STB
BNE
2•
R5.0lCNV
JIR
ADTE2
R!I,OACNV
JaR
lDTE]
(5P) +. NUMBER
MOV
GETPl$, NUM~ER
NUMBPl.-CIP)
MOV
NUMBEl, -(SP)
MOV
R!I,OlCNVX
JIR
lDTE4
CSP) +. NtlMBER
MOV
GETPU, NUMBEII
MOV
NUMBPl,-CIP)
MOV
NU14BEl. - CIP)

J511
1'74706

000060
00'666

ttl
2*.

00'7642

02616'7
('I04!167

007634

026152
005046

016667
001402
012716
004567
n26136
0327'77
1101116
10!l767
001414
004'767
004!16'7
022744
026066

\'fnrn

025721
025756
026327
000000
000407
004!e7
022744
02!1721

000002

MlCYl1 2'7(1006)

000060
00'7622
020000

00.«60

00446'

012'746

004466
0044'7'
004476
004!102
004510
004512
004516
004522
004526
004S]0
o 04!5:J 2
004536
004540
004544
004'!!l0
00'552
004554
00'560
004564

00n157
012'746
004767
122767
001032

016702
012703
022712
001417
ot 1246
on4567
0256'75
0'2746
on 4'76'7
OO!l]O]
001363
01:n46

M476'7
000754

ADT!5
CLR
MOV
BEQ
MOV
JSR
AOTE6
BII
CMP
JIR
ASUTC
JSIl
ACSRC
CLR

lSi
174636

ERSVX.

175005
013476
0027'70

002744

1743'73

002'16

U.
1 '74337

21.

026311
0026'74
0221."
002664
00000]
174346
000010
1".,,"7
00'7402
025675

002616
022'7'72
002602

rINDICUE ·NORMlL. !RROR.
,SA VE ITART lDOR or MODULE.
,EI\RORN ClLL'
,SR IF NOT
rllVE TlBLE lDDR.
,REIUME 1DDII TO PIENDS.
,GET UCP: ITAIIT lDDII.
,DO COMMON STUFr.
,INCREMENT MOOULE'S EIIROIl COUNT,
,SR IF RE8ULT NOT 0,
,RElET COUNT TO -1,
,GET TYPE DlTl rROM QUEUE TO STACJ(,
,DO IT,
,DONE'
:!R !P' NOT.
,ERROR COUNT TO STACK,
! CONVE",. ERROR COUNT TO DECIMAL.
,DaTl ERIIOIl'
,SR U' NOT.
,CONVERT WAS TO AICn,
,CONVERT liB TO ASCtI,RI!:II!:T TYPQ2,
,GET lDOR or LOCATION RElD

,CONVERT WASlDR TO ASCU,

A~C!!.

~5,0ACNVX

:CO'l'lERT SUOR TO

,0 ONTO sncp:
,SA VE CSII ADDRESS
,Ir O. BRANCH
,SETUP El BITS
,CONVEIIT CSII lDDII TO ASCU,

ERSVX
CIP)+. CSP'+
R!I.eACNV

,SKIP WAS lND SIB.
, CONVEIIT STU REG CONTENTS TO asCII.
eSIl CONTENTS TO Ascn,

1l5,OACNV

I eONVt!lT

-(SP)

'0 ON'I'O 8TAeK

n-APR-""
MOV
BEQ
MOV
JSR
ACIRlC
B1'1'
BNE
TSTe
BEQ
JSR
JSR
CRCR
TOTIM
lEWD
.,ASS
ERIINM!
0
BR

026130
002'71 4
000001

,INDICATE DATA EliliClilt.

-CSP)
2(SP).CCSRl
it
tlO, CSP)
R!I.OACNVX

00111

PAGE 30

2CSP)'CCSRA
3S
'60, (SP)
R5,OACNVX

:SAVE CSII ADDRESS
,BlllNCK IF ADDIIESS 0

UITtl.UR
ERSVIoIO
CLOCK

,INI!IeIT ERROR PRINT,
,BR IF YEI,
, IS THERE A CLOCK AVlILABLE
,NO, CONTINUE
,YES. SUUP TIM!': OF THE ERIIOR
,TYPE
,2 CURlGE RETUIINS
,THE TOTAL TIME

.,.

PC.ERRTYII.
115.TYPEN

"'"lit

000003-

,INDICATE ERRORN CALL,

SEQ 0032
174642

025756
026327
nooooo
122'767
003406
004567
026,,,
0261'77
000000
000404
012746
004767
122767
OOlOM

004446
004452

BR
114'741

000421
022626

OO'4)'~4

(1044)6
004440
n04442

ERavCl i CLU

00040l

112'76'7

004366
0043'70
0043'72
004')74
004376
(1(14400
004404
004406
004410
004412
00'414
004416
004424
004426
004412

004434

1'74'765

QAIM Otc flU STA"DIIRO ""ONITOR
OXQABII..P11
21-APR-77 12142
917
919
919
920
921
922
923
924
925
926
92'7
928
929

ooi 11

,ERROR CALLIS ARE SERVICED HERE.
ClI.!:
j =-1 1'1'
eON!!.!!!! pe~2

161
IU

n-lPR."

UI
174307

411
5' i

"'"

CIICII
lEND
,PAIS
EIIRNMB
0
CMPS-

eLE

JSR
lOTE4A
lOTEIIR
0
SA
MOV
JSR
C'"'PB
8NE
MOV
JIR
MOV
JSR
CMPB
BNE
MOV
MOV
CMP
BEQ
MOV
JIR
HOLD6
MOV
JIR
DEC
BNE
MOV
JaR
BR

,CO~VERT

CSII IIDOR TO ASCII,

J~"s~,.r!ll!

! COMMON HElDtR

98
",.TYP!N

.2.ERIIINO
18
RS,TYPEN

2.
IAEIIltOR,. CliP)
PC. TYPE
tl.!ARIND
U
UDT!X. -CIP)
PC.TYP!
UCIILF.-CSP)
PC, TYPE
U.ERRIND
!RSVND
TlBlDR.R2
.... Rl
'-1,(2)
U
(!lC2)+,-CSP)
RS.OlCNV
.HOLD6,-UPl
PC. TYPE
R3
5*
UCRLF.-(SP)
PC. TYPE
41

, PASS NUMStR
, ERROR NUMBER
,THAT'S lLL
,CONTINUE
,TYPE
,2 CARRlGE AETUIINS
rCOMMON HEADr:R.
,PASS' ,
,I!:RROR t.
,DATA EllROR?
,!III Ir "OT,
,YES, TYPE
,0lTA EIIROR VALUES

, TYP! EFtllOR M!SSlGE.
,UTENDED DAU tllRO'"
,NO- BRANCH
rYtS- OUTPUT POSITION It.! 8UFnll

,EIIRORN CALL?
,8R IF NOT.
lDOR TO R2,
, WILL TYPE 8 VALUEI PER LIIIE.
, TERMINl'fOR?
,BR IF YES, DONE.
,PUT VlLUE IN ITACl.
,CONVEflT It TO OCUL.
, AND PUT It HERE
,TYPE IT,
I TABLE

,DONE 8 PER LINE?
,BR Ir NOT,
,OUTPUT CRLF,
, GO rOR MOllE.

wAIN oeC/Xll IIUNDUD MORJTOR
DXQ18M.Pll
21-APR-77 12.42
9'73
974
975
976
9'7'7
978
979
980
981
982
983
984
985

986
98'7
988
989

\)0 4566
004572
Q04576
004602
004604
(104612
004614
004622
004624
004630
Q04634
004640
004644
(HI4646
004652
004660

004664

012746
004'76'7
01)57'7'7
100410
026'761
003010
0]2'777
001004
005067
00016'1
105067
00576'1
001407
016'700
n16760
I'I0!!06'1
000167

992
993
994
q95
996
997
9qe
999
1000
1001
1002
1003
1004
100!!

004670
0,,4674
004700
004704
004710
004712
n04716
004720
n04724
004726
004732
fl04734
004740
004742
004746
n047!!0

11'14413
016746
016746
fl16746
16011fi
004!67
025746
004!67
025733
1)04567
n25721

174444

000030

040000

174354

174330

000166
114154
174314

016146
005216
004567
025766
0002(17

001046
174150
174146
174136
007222
on1226
006'71')2
000026
007424

PAGE 11

00111

SEQ 0033

0025'70
114174

174642
174102
114274
174612

23-APR-77

022'7'72

QlBN DEC IX 11 STANDARD MONITOR
OXQA8"'.Pll
21-.PII-77 12142
990
991

MAcYlt &nl006)

000050

MOY
JIIR
!RSYND, TST
eMI
CMP
BGT
BIT
BN!
CLR
ui
JMP
CUB
21i
TST
BEQ
MOV
MOV
eLI'
JMP
ui

"'AC'lll 2'7(1006)

UCRL",-CSP)
PC, TYPE

,OUTPUT CRL".

,HALT MODULE ON ERROR?
'151'
11
,eR I" YES.
EIIRLIM,!RCNTClll )
,ERROR COUNT 20 OR GRUTER?
,eR IF NOT. CONTINUE MODULE EXECUTION.
21
IBIT14,ISR
,YES. HALT MODULf. AP'TtI'l 20 ERRORS?
,NO- SKIP
21
CCSRA
,CLEAR CCSRA
ENDSYA
,YES, GO HALT MODULE
TTYBSY
: QUE TO RESUME
,IF NOT SETUP, nON'T RESTORE INTO MODULE
CCSRA

CSTART,RO
CCSRA,CSRACRO)
CCSlIA
CONOUE

'2)-.,PII-7'1

00111

,RESTOI'I! CSR~ IN ""OOULE

PAGE 32
S~~

E~1)COloili GETPAS, Nu~eEII

MOV
MOY
MOV
SUB
JSR
AEN02
JSR
AENOt
JSI!
AENO
MOV
INC
JSR
APASS
IITS

,NUIABER cn~ITArNS ADoRESS OF CIILL

NUMflPA,-(SP)
NUIoiIR!A,-CSP)
NUM!!!';R,-(SP)
Rt, (SP)
R!!,OACNV

:CO~PUTE ASSF."'eLY PC.
,CONVERT JlSSF.:'4IlLY PC" TO ASCII.

R5,OACNV)(

,CCI'lVERT PC Tn IISCII.

P5, FILLN'"

,LET'S GET MonULE NU4E.
,STUFF AT U:JI;O.
PSCt.:T(RI) ,-eSP) ,GET PASS COl'NT.
(SP)
,up IT 1.
R!!, SDCNV
,CONVERT IT Tr) DE(,PH ~SCI1.
PC

,IJET'S GET OUT.

n014

QAIII

PEc:ixu SUNDARD MON~TOR

ISI01IM~Pll

2l-APR-n

00111

PlGE U

SEQ 0035

,T!PDAT ROUTINE LOADS QUEUED DATl ONTO STlCJ(.

1006
1007
1001
100'
1010

Q04752
00 4 754
4)0 4 762
Q04T64
004'772
005000
QOS006
005012

011646
026727
103403
012'761
011166

DP;C/Xll

STA IlDARD "'ON ITOP
21-APR-'77 12,42

IOU

soU

IOU
1014
1015

QABM

MlCY11 27Cl9OI~

21-lPR-77 12142

DXQAS"'. Pl. 1
1016
1017
1019
101Q
1020
1021
1022
1023
10?4
1025
10'6
1027
1028
1029

062'767
10U67
000207

011101
004767
052761
105767
001413
004767

00~046

00'0'52
;;05054
005056
OOSOliO
005062

022744
026066
0"111
025721
025775
000000
000406

005064
005070
005072

004567
022744
025721

10315

OOS074

025175

1037
10]8
1039
1040
10 4 1
1042
1043
1044
1045
\046
1047
1049
1049
1050
10'51
lO52
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
t066
1 067
1068
IOU
1070
t071

005076
005100
005104
005110
00!!l112
005116
005122
00'5124
005\30
005132
00'H40
005142
005146
0051'52
00'5156

000000

1011
1032
lOll
1014
10]5

031222

030072

114110

1'74104
000002

000002
1'74074

113715

TYPDA'!'i MOY
CMP
81.0
MOY
MOV
ui
lDD
DECS
RTS

MlCYU 2'7C 1006'

cap),-csp,
TyPQ2, ITYPLIM
U
tTy,!:Q. T1'PQ2
tTYPQ2, 2 CSI')
U,TYPQ2
TyPQUE
PC

23-APR-77

00111

,SlYE EXIT ON STlCK AGAIN.
,REACHED END or QUEU!!:?
,SR Ir NOT.
QUEUE.
t YES. POINT TO START
,QutUE DA Tl TO STACK.
,UPDATE QUEUE POINTER.
,DECREMENT COUNT.
,EXIT. LEAYE DATA IN STACK.

PAGE 34
SEQ 0036

,END CALL SERV ICED HERE.
005014
00'5016
005022
005030
0050H
005036
005042

1030

1'74122

OO~O~O

004~('7

10~067

00~761

100410
105067
1115767
on 140 3
105767
(101413
(132761
001402
105367
105367
10'5767
001445

IH~5160

U6161

005166
005170
0051'74
005t'76
005202
005'04
005206
005212
005214
00522'
005230
00'5236
005240
005144
005250
005254
005260
005266
00'52'72

003046
105767
001404
105'767
001404
000437
1(15767
nOl034
016767
066767
026767
101402
005067
004761
004767
004767
112767
000167
105767

177646
020000
1'74317

000020

0\3010
002]02

00226(')

ENDSVC, MOV
JSR
ENDSVAi BIS
TSTB
BEQ
JSR
JSR
CRCR
TOTII!
PSTIM
AENO
MODENO
0
BR

111

JSR
CRCR
lEND

ept) ,Rl
PC. ENDCOM
,8ITU, STATeRt'
CLOCK

11
PC, F.RRTYM
R5, TYPEN

173675
173702
174224

SEQ
01000n

000020

173654
173643
173646
lH631

!is,

C'*P~

ENDSVGl

174022
IH014
174002

BGT
TSTA
litO
TSTB
eEQ
BR
TST8
itl
BNE
ENDSVB; MOV
ADD
CMP
IILOS
CLP
]$1
JSR
JSR
JSR
MOVB
JMP
ENDSVP'I TSTB

173613

113601

174000
OU064
Ot4220
013136
000001
003642
173517

BTT
SEQ
DltCS
DECB
TSTe
BEQ

IH631

174160

174022
174074
174010

lSI

174040

,ns,

R5, TYPEN

,TYPE
,:2 CARRIIGE RETURNS
,COMMON HEADER.
: END 'ltSSAGF..

TTYBSY
STATeRl'
11
BRAKE

,CLEAR TTY BUSY I'IOICATOR.
r BACKGROUND "'aDULt?
,8R IF' NOT.
,RELEASE BRAKE.
,STOP MODULES FOR RHOCATION?
I NO, CO~ITINUE
IIIUN ALL 1110.'005 BT!:P'ORE RELOCATION
,NO, CONTINUE
:EXTENO!!:D 110 MOD?
,NO- BRANCH
,YES, DEC EXTENDED "00 COUNT
,DECR COUNT OF' MODULES RUNNING,
,RELOCATE CODE?
,NO- BRANCH
,1<LL !lO MODULES OFF'?
,NO- BRANCII
,RUN ALL 8KMQI)'S StP'ORE RELOCATING 1
,NO, CONTINUE
r ALL MODULES DONE ?
,YES, GO RELOCAT!
,NO, GO RUN THt PEST OP' THE MODULES
rYES- 81(MOD OFF?
: NO- BRANCH eSTOP BKMOD CLElNLY)
,YES- CALCULATE NEW OF'FSET
,ey STEPPING AHElO 8K OF! 16K
,NEW ADDRESS IN R1<NGE?
,YES- BRANCH
,NO- START OVER IN BAliK 0
,"'AXE SURF SYSTEM CLOCK Is OFF
,MOVE PROGRAM
,TURN SYSTEM CLOCK BACK ON
P'LAG TO INDICATE MODULE RESTART
,GO STARTUP AGAIN
I ANY MODULES RUIlNING?

MODEN!)

0
CLRB
211
ENOSVE. TST
8MI
CLRS
T5T8
SEQ
TSTB

173710
000020

,GET ST"RT .lOOP.
,DO COMMON STUFr.
,SET STOP BIT IN MODULE STAT.
:CLOCK lVAlLABLE ?
,NO, CONTINUE
SETUP TIME OF DROP
I TYPE
12 CARRAGt RETUIHIS
:TOTAL TIME
,MODULE PASS TIllE
: COMMON HEADEII
,NOOULE !)AOl>PEO
,THAT'S lLL
,CONTINUe:

STOP

15
ALLBI(
ENDSVG
.8ITI2,STAT(R! ,

U
"'DXCNT
MODCNT
STOP
ENDSVF'
~ODCItT.P!(CNT

E'IDSVD
ALtBK
IS
MODCNT
ENOSVB
FoNDSVD
BRAKE
ENDSVD
OF'F'SET,OrF'STO
RO'['S!Z,OF'FSTO
OF'F'STD,OP'P'MX

31
OF'P'STD
PC ,CLXOF'F'
PC,MVCODE
pC,CLI(ON
'1,I'IUNRP'L
RUNRES
MODC'IT

,sn

QUM olc/xi 1 STAt/DUD MONITOR
DXQUM. P11
21-APII-" 12142
1072
10'73
1014

OO!! 2 '76

QO!!~OO

00!!304

001002
000161
000167

1097
1089
1089
1090
1091
1092
t093
t094
t095
1096
1097
1099
1099
1100
1101
1102

1103
1104

1105
1106

1107
1109

1109
1110
1111
1112
111]
1114
lU5
1116

llP
1118

1119

1120
1121

1122
1123

1124
1125
lUIS
1127

1128
1129
11]0

23-APR-7'7

00 III

PAGE]!I
SEQ 00J7

8NE

JIIIP

001544
1'74104

Ol8111 DEC/X!! STANDaRD MONITOR
DXQUM.Pl'
21-aPR-77 12142

1075
1076
1077
1078
1079
1080
1091
t092
1093
10A4
t085
1086

MlCYS1 21 (l 006)

INDSVDt JMP

MlCYl1 2'7(1006'

,YES- BRANCH
I COUNT O. TERMINATE RUN MODE.
, GO !lCK TO SERVICE QUEUES.

ENDSVD
CTRLC8

ounST

23-APR-77

00111

paGE 36

,paSEND ROUTINE. TYPES END Of" PASS ~ESSAGE.
,BACKGROUND MODULES ARE NOT lLLOWED TO MUI'; MULTIPLrr pass!!:s,

005310
005312
005]20
o o !'I 324
00'5330
n05334
005336
005]42
005341i
005354
005l51S
005162
005366
005372
00!!374
005400
005402
n05406
00!!410
005412
005414
005416
005.120
005422
005426
(105430
00!!432
005434
005436
905440
005442
005446
005452
005454
0054!!6·

005460
005464
0054'70
005472
005474
005502
005504
005512
005514
005520
005522
005!!24
005526
005530
005532
005534

011101
016167
010167
005261
, 05767

n01404
004767
004767
032777

001432
004767
016146
004567
026016
105767
00\010
004567
022744
025721
026007
n22742
000000
000410
004567
022744
025721

000062
174170
000026
\1401'7
013120
012514
010000

17417'2

173622

177306
000026
007000
173753
001742

026066

010046
010146
012700
062700
011001

173346
173640

026520
000002

001416

032761
001770
032'761
001364
00!!761
00U61
0121501
012600
000404
012601
012600
000167

[RO,Rl
FlSTRTCR1) ,CADDR
Pt ,CSTAIIT
PSCNT(RI )
CLOCK

,LOAD Rt WITH MDUtF ltDDRF.:SS
ISAVE RF;SUPT ADDRESS
I SAVE MODULE AOIH'ESII
,IIICREMP.;NT !>ASS COH';T,
I IS THEPE A Ct,OCK AVAILABLE?
INO,
COI/TINlIE
18
,co CHECK rOil Ally "flUNC" MODULES
PC,CKHUNG
,SfT 'JP RIINTIME, PASTTI4E INP'OPMATION
PC,PASTYM
IIUT12,I!ISR
,P.;IIDPAS PIIINTOU"'?
PSENDA
,BII IF 'fOT.
,DO COMMON STUrF'.
PC,ENDCOM
PSC"'TC R1), - (SP) ,11010 CET IT.
R5,BDCNV
,CONVEPT tT TO ne:CIMAL ASCII.
,STurF IT AT RPSCNT,
, IS THEilE A CLOCK AVAILABLE?
CLOCK
,YES, CONTINUE
115,TYPEN
:TYPE
,2 CARRAG' RETUIINS
: COMMON HEADEI!.
: I':NDPAS ,ND COU'IT.

001722

(126007

026111
000000
105067
105767
100032

PASENDi MOV
MOV
MOV
INC
TST8
BEQ
JSR
JSR
BIT
ui
BEQ
JSR
NOV
JSR
BPSCNT
UTB
BNE
JSR
CFlCP
AEND
APSEND
CR

040000

000020

020000

000020

000026

BFI
PSENDA
,CONTItHlE
JSFI
R5, TYPEN
I TYPF.
CRCFI
12 CARRAGE PETURNS
AEND
iCOMMON H!ADEP
APSEND
,END pASS AND COUNT
TOTIN
1 TOTlL TIME
PSTIN
,PASS TlfIIP;
o
,THAT·S ALL
TTYBSY
,CLEAR TTY BUSY INDICATOII.
PSENDAi CLRB
TSTB
CHN
, IN CAA IN MODE?
BPI.
10$
,BR IF NOT
,ELSE MlICE SURE EVEPY MODlILE KEEPS RUNNING TILL ALL HAVE CO"PLETED
,AN END Of PASS, THEN STOP ONE AT 1 TIME, THPI RETURN TO CHAIN MONITOR
MOV
RO,-(SP)
,SAVE RO
MOV
RI,-(SP)
,SAVE Rt
MOV
.14000-2, RO
, GET LIST OF MODULE lDDPESS
ADD
'2,PO
,1.001( AT NEXT PITRY
1U,
MOV
CRO), R1
,ANY HODur,!S LEFT?
BEQ
121
,BR IF' NOT, aLL DONF, DO NOT RESTAIIT MODUL"!
BIT
tBIT14,STlT(Rl) ,MODULE SELECTEO?
BEQ
1 18
,~R IF NOT
BIT
UITU,STAT(Rtl ,WAS IT DROPPED?
BNE
118
,SR IF YES
TST
PSCNT( Rt)
,HAS HE DONE A PASS YET?
BNE
118
,BR I f YES
MOV
(SP)+,R1
,RESTORE R
MOV
(SP) +, RO
,RESTORE RO
BR
101
, GO LET THIS GUY DOING THE EOP RUN AGAIN
MOV
[SP)+,Rl
,RESTORE Rl
MOV
(liP) +, RO
I RESTORE PO
JMP
ENDSY!
,START LETTJNG \IODULES on: OFF

12',

177344

01114 I)EC/XU ''l'lHDAltD MbNJ'I'bR
DXOllN •• ll
2t-A.R-1'7 12142

DOS!\40

1011'76'7

QQ"'4

001402

iU3

005546

00016'7

iUl

MACYll 21(1001'

lUi

113'7
lUI
IU9
1140
1141

U42
U43

1144

U45
U46
114'7
114'

1149
1150

1151

un
U!13

li54
U55

U56
U5'7

001562
005564
0015570
(105512
905600

10' i

1'7'7332

1011'76'7
001403
1011'76'7
001021

1'73531

126'767

iH2U

14ii

1'732:12

1'U33

103415

~05602

105717

q05606
005610
005614
005616
005622
0015624
005630
005614
005640
0015642
0(15146
905654
005656
00560 ..
00,,'70
0056'74

001412
105'76'7
00100'7
105'76'7
001004
10526'7
00016'7
005'761
100415
10506'7
012'761
001613

OOil1

PUE 17
II:Q 0019

l'l2I0

uu 008$12 101526'7 1'7:1254

un ooes56

U-1Ph'7'7

11350'7
1'73513

lnuo

'l'I'I'.
II:Q

I'l'OP
l,i

11M,

ENDSVE

INca
'l'ITB
aEO
UTI
INI:
CMP.
ILO
'I'ITB
BEO
TSTB
BNE
'I'STa

PASTOT
ROTI

BNI!

173174
11'7250
000020

1'73145
001000

000020

052'761
IOU'"

020000

000020

00016'7
00016'7

1'7'7210
17:1602

l'h:U

IIfCB
JMP
TIT
BMI
CLR!
BIT
BEO

BIS

!NQ IR~

11
MDxcn
2.
PASTOT. 'AiREL

21
RELOC

21
LOCK

21
NSTOP
2 •.
STOP
ENDSVE
STueRO
PSENDB
BRAKE
UIT9,STATCRU
ENDSVD
UITU, STATC R1)

DEes

ncN'f

JMP
PSENDS; "NP

ENDSVE
COMQUE

, IITOP ALL MODULES '1'0 RO'l'U'E COD!?
,COUNT TOTAL PASSEl AT PRESENT orFSET
,IIIIITE BUrFER ROTATION ENABLED'
,NO, TREAT LIKE ALL 8ltMOaS RUNIIlKe
,ANY EXTENDED MODULES RUNNINO.,
,YES- SICIP ALTERNATE RELOCATION METHOD
;NO- UP TO RELOCATION NUMBER'
,NO- BRAIICH
,YEI- IIELOC1TIOTC ALLOIIED'
,NO- BRANCH
,LOCK SET TO INHIBIT RELOCATION'
,YES- IRANCH
,".1010011 STOP TO SET ,
,lfO. CONTINUE
,YES. SET 8TOP
,BACKGROUND MODULE?
,BR I' NOT,
,RELEAIE IRAKE.
f IS IT AN NBKMOD ,
,If 0, CONTINUE
,ns, SET IT'S STOP BIT
,ONE LEU 8itMOD RUNNING
,GO TAKE CARE or OTHER STurr
,GO TO COMMON QUE CALL,

U58

1159

OlBr<! DEC/XlI STAND1RD MOIiITOR
DXQABM, I'll
2i-APR-" 12142

1160
1161
1162

1163
1164
1165
1166
1167
lH.1l
1169
11 '70

MACYll 27(1006)

23-APR-77

00,11

PAGE 38
SEQ 0040

,TRACE TRAP ENTERS HERE,

005'700
on5704
005706
005710
005716
00!!;22
(105724
005730
00~734

10536'7
100401
000006
116767
005767
0017'71
012667
012667
000401

173130
173422
173064
1'7314"
173136

TRClI
173116

TRCIA.
TRcrc.
TRCIB,

DECS
BMI
RTT
MOVB
TST
BEQ
MOV
"'OV

BICTIMR
TRCIC
BKTIME, lIKTIMR
IOQUE
TRCIA
(SP)+.TRCPC
(SP)+,TRCPSW
EXITI.

,110 OR TYPE QUE WAITING?
,NO, EXIT,
,SAVE MOD'S PC,
,SAVE MOD'S PSW,

OlllM DEC/XU STlNDlllD MONITOFI
DXOABM.Pll
:21-APII-71 12.42
11'71
11 12
11'73

1174
11'75
U'76
11'77
11 18
11 '79
U80
U81
1192
1183
1184
U85

1186
118'7
1188

1193
119"
1195
1196
1197
1199
1199
1200
1201

23-lPII-77

00.11

PAGe: 39
SEQ 0041

,EXIT CALL !NTEIIS H!FI!.
005736
005740
005142
005746
005'752
005754
005'756
005;60
005'762
005;64
005766
005770
0(15774
005776
006002
006004

022626
010046
016700
062700
012620
010120

1'73170
000032

010220
010320
010420
010520
010610
016706

1'73156

005046
012746
000002
00016'7

006004
1 '74204

OABH D!C IXI 1 STANDARD vDNITOR
DXQ18 M .PlI
21-I\PR-77 12.42
1199
11110
1191
1192

"'ACYU 2'7C 1006)

CMP
EXIT ••
EXI'!'I.' MOV
MOV
ADD
MOV
MOV
MOV
HOV
MOV
MOV
MOV
MOV
EXIT2. i CLR
MOV
RTI
JHP
111

ItI=CY11 2'700(6)

(SP)+, CSP)+
1I0,-(SP)
MODADR,RO
UV1I0,1I0
(SP)+, (110)+
Rl, (RO)+
R2.c RO)+
Ill, (RO)+
114, (RO)+
R5, (RO)+
R6, (RO)
SPSAV,R6
-CSP)
IU,-CSP)

004767
016700
010046
004767
016046
004767
1l16"46
004'767
005726
016706
000747

000242
tH116
000230
000060
000220
01l0"56
000210
17]076

,SAVE MODULE STACK POINTtR.
,RESTOP! "lONITOIl STACK.
,CLEAR PSw ON STACK
I SET UP RETURN PC
,CLEAR PSW AN" CONTINUE

QUnST

23-APFI-77

001 I I

PAGE 41l
SEQ 0042

,TYP04. ROUTIN!. LOADS MSGDs
006010
n06014
006020
006022
006026
006032
on60 ]6
0011042
006046
006050
006054

,SAVE RO IN STACK.
,MODUL! ADDR TO RO.
,POINT TO Mati'S FlEG SAV! AlitA.
,SAVE RO. (FFIOM STACK).
,SAVE FlEMAIllING REGS.

'l'YPQ4.1 J5R
MOV
HOV
JSR
I~OV

JSR
"lOV
JSR
pOPSP
MOV

BII

INP'OPM~TIO'I

PC,LDTYPQ
MODAOR,RO
RO,-(SP)
PC,LPTYPQ
AWAS(RO), -(SPl
PC,LDTYPQ
ASB(1I0),-(SP)
PC,LDTYPQ
SPSAV,""
£X1T2.

INTO TYPEQ

,Qugur PC+2 OF' r. ALL
I LOAO "lflOULE ~onRrS$ IN RO
: ANn SAVE IN QUlWE
,QUEllE: OAn EIIFlOR cnt"-'T
: QUFUE: SIZE OF' TlllNSFER
,RP:MOVr. PS FROM S'I'ACK
:Gr.T MONITOII ~'I'ACK ~OTN'I'E~
IF-XI!

GAiM !)I:cixi' I'UNDAItD MONnDR
DXGAlM.,U
21-UR-" u i u

UOt

i212

1213
1214

1215
1216
1211

1218
121'

1220
1221
1222

1223

0060111
QOIOIO
001064
Q06010
001012
0060'16
006102
006.06
001110
006114
006120
006122
006124
006\26
006132
,,06U4
006136

~06142

006146
0061!2

011646
0041"
016'00
010046
00.'167
1'17616
00"11'7
005726
062100
012'01
000401
005010
014046
004'167
005]01
00U;2
016100
010660
016706
000167

12H
1212

1233

1214
1235
1236
1237
1239
1239
1240
1241

00;11

PAGE 41
SEQ OOU

'l"ii'Q;i.i
000112
111046
000160
000000
000150
000062
OOOOO!

itl
2.i
000124
172774
000046
1noon
177616

OABM DtC/XU STANDARD MONITOR
DXQUM.Plt
21-APII-77 12142
1224
i2'!!
1226
1227
1228
1229
i210

U-lPlt-'7'7

InPQJ~ ltoUUNE QUEUES IN,oltMl'1'IoN ,olt DEltltX CALLI

1202
UOJ
1205
1201
UO'
120'
120'
1210
1211

MACYl1 2U1006)

MOV

JSR
MoV
MOV
JSR
MOV
JSA
POPSP
ADD
MOV
8R
CLR
MOV
JSA
DEC
BNE
MOV
MOV
MOV
J14P

MACY11 2'7C 1006)

(SP),-(SP)
PC,LDTYPQ
MoDADR,1I0
RO,-(!P)
PC,LDTY'Q
"SP)'(SP)
PC,LD'!'!PQ
UWAS+2,RO
15,A1

(RO)
-(1I0),-CSP)
PC,LDTYPQ
Al
11
MODADII, AO
A6, SVAIC RO)
SPSAV,R6
EXIT2.

23-APR-77

00111

,QUEUE PC+2 Dr CALL
,LOAD MODULE ADORES! IN RO
r AHD SAVE IN QUEUE
,QUEUE VIRTUAL ADDRESS or CHECKDATl CALL
,GtT ADDRESS or INrOAJo!ATION
,CLEAR DATA (EXCEPT LAST)
,GET DATA
,QUEUE: DATA

PAGE 42
SEa 0044

,TYPQ2. ROUTI"'E SERV ICES tRROR, DATA ERROR, AND ERRN CALLS.
006156
006160
006164
nOfl166
(l061 7 2
006176
n06211?
006'-04
00fl206
0062111
006212
006216
006220
006222
006,24
006226

011646
004767
010046
017600
062700
012746
01'046
on04112
011046
005020
004767
1105316
001372
005726
012600
000167

000072
000002
000050
000005

TYPQ2.i MOV
JSR
MOV
MOV
TYPOX, ADO

Mev
MOV
SR

18,
00(1040

177504

211

MOV
CtR
JSR
DEC
ElNt:
pot'SP
MOV
JIoIP

(SP),-(SP)
PC,LDTY'O
RO,-CSP)
112(SI') ,RO
.CSRA,RQ
IS,-(SP)
(RO).,-CSP)

,SAVE PC.2 or CALL AGAIN.
,QUEUE UP PC.2 OF caLL.
,SAVE M.
,GET MODULE AOOR.

(RO) ,"(SP)
(RO)·
PC, LDTYPQ
CSP)

a
(SP)+,RO
EXIT.

I RESTOR! 110.

OUM DICIXts IUNDUD MbNJ,.OIl
u.lPlI.n 111,42
DXQaIM •• ll

1246

001232
90'216
006240

oon"
00S'726
0001"

000010

npo,i

U'7n4

QUM DEC/Xt! S'rANDUD MONITOR
DXQASM.P!!
21-APR-7' 12i42
1247
1248
1249
12!10
12!11

u·a .... "

tlOIlS

.UE 4J

UQ 004!!

,nPG. IIDu'Un. IIlInC11 Elf0, IND'AI, aND MIGN CAliL,.

1242

un
1244
un

MaCYU UClOO.,

lo!JICYlt 27(1006)

"IR
POPIP
oJMP

PC,LD"YPQ

,QUEUe: UP CALli.

EXt'U I

23-APR-7'7

00.11

PAGE 44
1;EQ 0046

rTYPOI. ROUTt"!. SERVICES MSG CALL.
006244
0062!10
!lOU!!2

004'"
00!l726
000167

000006

1'77 !I 16

TYPol.i JSR
POPSP
J"'P

PC,LDTYPQ
EXIn.

,QUIr:uE UP CALI,.

QUM DEC/XU STANDARD MONITOR
DXQlBM.Ptt
21-APR-77 12i42

MACYtl 2' (1 006)

."'." (l06260
006~5~ "",,,,.,,41,&
012746 006266

1267
1268
;269
1270
1271

006264
006266
0062'2
(lOU74
006302
006304
00fi312
006316
n06322
006]24

000002
10516'
001414
026761
001010
012767
t04406
104406
000000

006332

001003
012767

006334
006342
006]50
006354
006362
006364

026'727
016677
11)5267
062767
012616
000207

172515

172600

1'72600

030072
022774
023746

17'2566

172550

031222

030072
000002
172433
000002

172536
172530

OAeM OrClXl! sn""DARD "!O"I'I'OP
OXQABM.Pt 1
21-APR-77 12142
1272
1273
1274
1275
t276
1217
127A
1279
1290
1291
12A2
1283

12,114

1295

n06366
Ontl)74

112766
000402

'77777

nO';]'6

005066

000002

1)(16402
00U06
006412

OU746
01~746

000403

112766
105767
(l01414
026767

1]1'1)

1304
1305
13n6
1307
13011
1)09
1310

011

"'_crt 1 270006'

23-.PP-7.,

00,11

PlGE 46
SEQ 0048

000003

LDBRK.I MOYS
8F!

QUE.;

OO~516

006540

006542
006546
n06550

LOIOQ,

000340
006414

IHlOOC::!

005414

uno

'-I,3(SP)
LOrOQ

I INDICATE BRUKS CALL

eLF!

2(SP)

, TNDrCAT! OU[

C~LL.

,1.010Q ROUTINE. MUST NOT DROP BELOW LlVE1. Of' INTERRUPTING DEVICE.

006416
006424
n06410
n06H2
OOU40
006442
oCl645n
nn6454
006460
006462
006470
006472
006500
n06504
006510
0060;16
006520
1)06522
006524
006530

nnt
1302

172516

,ROUTINE TO LOAD TYPE QUEUE. ENTERED YU JSR PC.
LD'!'YPQ; eL~
=t~~)
jCL~'\R ~SW O~: STAC~
MOV
131,-(5P)
I SETUP RETURN PC
RTI
,CLEAR P511 AND CONTINUE
TSTB
TYPQUE
lfl
,REQUEST COUNT 01
BEQ
,BR U' YES.
11
CMP
TYPQl, TYP02
t NO. TYPQI AND TYPQ'2 SUE1
BNE
.SR IF NOT.
U
MOV
tTYPEQ,TYPQl
,RESET THE TYPE QUEUE
MSG" QOVAn
,YES. QUEUE OFLO. CRASH SYSTEM
IISGI,HLT
, 'HALT"
HALT
CMP
TYPOI. tTYP1.IM
,REACHED HIGH LIMIT?
11.
8NE
,8R If' NOT.
2.
MOV
nYPEO, TYPQI
r RESET TYPQl.
MOV
2 (SP). tlTYPQl
,STORE ARGUMENT IN QUEUE
2'1
INCB
TYPOUE
,UPDATE REQUEST COUNTS.
ADO
t2,TYPQt
,UPDATE TYPQ1.
MOV
(SP)+, (5P)
PC
RTS
,EXIT.

,ROUTINE TO LOAD QUES ClLL.

1281
1299
1289
1'290
t7~1

PAGE 45

,ROUTINE TO LOAD BREAK' CALL

1296

1292
129)
12H
1295
1296
1297
1299
1299

ooi 11

SEO 0041

1252

1254
1255
1256
1257
1258
1259
t260
1261
1262
1263
t264
1265
1266

23-APR-11

lSi

000001
172356

OClOO02

172436

027252
022774

172424

PIRO.I

nO'010
012767
104406
104406
ononoo
026727
001003
ot 2767
012671
105267
062767
(lO5'116
001003
005726
000167
126627
001003
on5'126
000167
005726
000002

023746
172406

030072

027252
172170
172276
000n02

172374

111

211
172356

177244
000001

11'7777

MOV
MOV

i<Tl
IHI
MOVB
TST8
BEO
CMP

JPRTY1,-(SP)
tt.,-CSP)

•• 10
_I, 2( SP)
IOOUE
11
IOtU,IOO2

,REQUEST COUNT 01
,BR IF' YES.
,1001 AND 1002 SAME?
!:!11ft
1$
f~R I" MOT.
MOV
nOQ,IOOl
,RESET tOOt
MSGa,COVRn
,QUE ono. CRASH SYSTEM
, 'HlLT'
MSG.,HLT
HALT
CMP
,REACHED HIGH LIMIT?
1001,' 1001.114
8NE"
,BR IF NOT.
2.
~OV
nOO,IOOI
,RESET IM1.
MOV
(8P)+,fIOQl
,STORE PC+2 or PE"DING CALL.
INCS
100UE
,UPDATE RlQUEST COUNTS.
ADD
U,IOQl
,UPDATE IOQ1.
(8P)
TST
,OUE CALL1
]I
8NE
,NO- BRANCH
(SP)+
, YES, POP STACK
TST
,EXIT
EXIT2.
J"'P
CMP!
,BREAK CALL?
HSP),'-l
,NO_ BIlANCH
SHE
(SP)+
,YES- POP STACK
TST
JIIIP
EXITI.
(tlp)+
!ST
,PIRQ- UIT VIA RTl
RTI

177172
411

, PUT NEW PSW ON STACK

t SETUP RETURN PC
I LOAD Nt.. PSW )1."0 eO~TINUE

QABM DEC/XII STAND_liD MONITOII
DXQABM.Pll
:21-APR-77 12142

MACYll 2'1( 1006)

Ill5
1316
1317

1319
1319
1320
1321
1322
1323
1324
1325
1326
132'1
1329
1329
1]]0

lHI
1312
1333
1334
1335
1336

1337
1339
1339
1340

1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
U51
1352
1353
1354
1355
1356
1357
1'358
13'19
1360
1361
1362
2363
1364
1365
1366
067

006~52

006556
006!!62
006!!66
{lOU72
0065'14
0065"16

12271~

00!!24
005726
000004

006604

000000

I(BSIIVci CLR
UK!
MOV
UICB, - (SP)
nOO,(SP)
BIC
1], (SP)
CMPB
BEQ
CTRLCA
POPSP
PIRQ',1I,0

1'12226

026752

18,

026727
001511
01'1746
042716
121627
001443
121627
001460
121627
001462
121627
001457
121627
103425
121627
103405
12Hi27
101017
162716
111677
005267
11266'1
10441)6
052777
000167
005726
000771

006740
006746
1'1067'50
006754
006760
('106'162
006764
006770
OtI,,776

022767
001405
005367
117716
000754
005726
104406
012767
000751

007000
0070(16

022767
001741

172344
000200
000177
000040
000015
000(112
000060
000141
000172
000040
172130
1'12124
172342
001260
000100
1"13260

2$ •

31.
172232

U.
108.

1374
1375
1376
1377

CMP
BEQ
MOV
BIC
CMPS
8!:Q
CMPS
BEQ
CMPl!
BEQ
CMPB
BEQ
CMPB
BLO
CMPB
81.0
CMPB
8HI
SUS
MOVB
INC

KB~TR, II<Bur+KBurL ,BurrER EXCEEDED?

12S
lITKB,-eSP)
1200, esP)
(SP)"177
5S
(SP),140

(SP"U5
9.
esP), '12
9.
(SP),.60
lOS
eSP),1141
2t
(SP)"172
lOS
140,(SP)
(SP) • raKBPTR
KRPTR
Move
(SP)+,TTYBYT
MSGS, TTYBYT
UE,IiITKS
8IS
QUF.TST
"MP
POPSP
BR
U

,BR Ir YES,
,GET CHAR.
I CLEAR PARITY BIT.
,RUBOUT?
,BR Ir YES.
,SPACF;? eIGNORE LF.ADING ONES) •
,SP IF YES.
,CR? en"E TO QUIT?).
,aR IF YES.
,LF? (TREAT LIKE CR).
,SR Ir YES.
,CHAR LESS THAN 60?
rSR I ' YES. IGNORE IT.
,CHAR LESS THAN LOWII:R CASE A?
,SR Ir YES.
rCHAP HIGHER TH~1>j LOWEI! CASE Z?
,AP IF YES.
,LOWEI'! CASE CHAP. MAKE IT UPPER CASE,
,STORE CHAR.
r UPDATE BUFFEP POINTER.
:CHAR TO ECHO RUFrER.
,ECHO THE CHARACTF.P.
,RE~NABLE KYBD INTE!!RUPTS.

,SERVICE DELETE IRUSOUT CODE.
02~712

1"12070

5$.

172062
172056
6'1
022772
026712

1"12040

026712

172030

SS.

IKSUF, 1C8PTR
C!4P
BEQ
U
DEC
KBPTR
MOVS
!lKBPTP. eSP)
811
31
POPSP
MSGs, ACRLF
MOV
tKRUF,KFlPTR
I!P
48

rBUFrER EMPTY?
:eR IF' YES.
,POtNT TO PREVIOUS CHAR.
,GET PREVIOUS CIlAP.
,GO ECHO IT,
10UTPUT CRL'.
: RF.:!;ET KBur POl'ITEP.

,SERVICE SPACE.

00701 (I

"'ACYl 1 27Cl006)

CMP
SEQ

.KBUF, KBPTR
3t

23-APR-"
BR

0110734

00111

I l,EADING SPliCE?
:BI! I ' YEll n!,;'lORF;

PAGE 4R

, STORr IT,

007012
007016
007024
007030

\12677
0127117
104406
104401

172020
026712
022772
0105 t 2

007036
nO'7042

104406
00(l7!!2

023505

9$ •
172012
1'100000

",nVB
(SP)+.raKBPTR
H'BUF,KRPTR
MOV
I4SG$, ACRLF'
QUEs , DECODE, 0

,ST(,!RE CHAR.
,POTNT TO STAPT OF KBUF.
10UTPUT CRL'
,Que: TO SERVICE COM"'~>rD.

,BERV ICE K9Ur OVP.:PP'LOW.

1378
1379
1390

Tn.

,SERVICE CR lIND Lr.

1171
1373

,CLEAR INTERIIUPT ENABLE.
,GET ClIAR.
,REMOVE EXTRA BITS.
,IS IT CTRL C?
,BR Ir YES.
,REMOVE CHAR FROM STACK,
,Q DEVICE SERVICE,

,KEYBOARD SERVICE,
006604
006612
n06614
006620
006624
006630
0066 32
006636
006640
006644
006646
006652
006654
006660
006662
006666
006670
006674
0066'76
006702
1)06706
006712
006716
006722
006'/30
006734
006736

1369
1370
1372

PAGE 47
SItO 0049

172404
1 '12402
000200
000003

0050'77
017746
042716

CAeM DECixl1 STANDARD MONITOR
DXQASM.PII
21-APR-77 12142

1369

00111

,KEyBOARD INTERRUPT SERVICE

1312

1313
1314

23-APR-77

12$1

MSGS, KBOnO
BR
7S

rTYPE l<BUr ono.

iii".,,,,

DEC/XU STANDARD MONITOR
DXQlBM.PU
21-APR-." 12142

MACY11 27(10011'

,SERVICE CTRL C. ENDS RUN MOD! ALSO.

!,g"",-I'\
~~~!! !~.~~!!S .~ .. ~~~ : . B~~~~~ ~~;~~N !~G ..'-"'''"'1.1
~:~ K111 IN USE)

1382
i Sa3

!"'\oI,J,n ...... 1'\

ill!!

1390

1391
1392
1393
t]U

1395
139,6
UQ7
1398
i399
1401')
1401
1402

onWU1.I1J

CIt"...

0071)44
007050
007054
00'060
007064
11070'72
007100
01171114
n07106
1107112
00'7116
007122

012'06
Oil 4'167

005067
004767

02'212
000130
172164

012410

1116767
016767
105767
110101')2
1100167
105067
105767
100426

012054
012050
172205

OM100
022753
1'72211

172074
172070

001544
17217]
''':, 70

CTRLCAi MOV
CTRLCBi JSR
CLR
JSR
MOV
MOV
TSTB
SNE
JMP
CLRB
111
TSTB
SMI

fIln~"""

\,. ... I"I.i.lA

VI'

00; 142

BEQ

01)7144

010506

JSR

PC,IW"'TYM

~t:'t"!~~

1n440!

n2274'

M!G!ilAT

007154
007160
607164
007170
007174
1)07200

104406
104406
on4'67
004767
0(14767
000!67

026066
022742
003144
007744
010024
01)6700

HSG.,TOTIM
21,
MSGS,CR
PC,DIPA
JSP
P(" SYSHUM
JSR
PC,PWRNUM
JSI!
CHNOUT
CTRLcoi JM!?

p'r;l:ogc.l\'fc,

I RESTORE TTY

UE,lITKS
MSGI, SUMARY
TSTII
CLOCK

i403

.loW

,IN RUN MODE?
:BP. H' YES.
t RACK TO KYAO MUT HIE.
,CLEAR RUN MODE INDICATOR
,IN CHAIN MODE?
:SR II" YES. BYPASS SUMMARY AND RETURN TO
,CHAIN MONITOR
: REENABLE KEYBOARD INTERRUPTS
I TYPE RUN tNO SUMMARY TITL!.
: IS TfoI!TI! A CLOCK AVULABL!?

SIS

172030

1404
, 41'l!
1406
1407
1409
1409
1410

OO7tH
007132
01)7136

,.". . . . . . . "' .. ""' ..... I!"

OR CAUSE REMAPPING TO

IRP.:I~ITIALIZP; STACK POINTER
I CLEAR QUEUE:S, TYPE -C
,GET PROGRAM SACK TO BANK 0

tSPBOT, SP
PC,CTRLX
OF'STD
PC,MVCODE
LPWK1,TPS
LPWIC2,TPB
RMOOE
18
COMCO]
RMOOE
CMN
CTRLCO

052777
104406
10!!767
ooi 400
004767

1411

~~"ur

,NEEDED INFORMUION PRIOR TO REMAPPING TO 0 I
,CURRENT ARU AFTER

1384
13A6
1387

PAGE 49

00111

SEQ 0051

1388
1389

23-APR-"

JNO, CONTINU2:
I YES,

sn UP RU"'TIMr. INFORMATION

• • .6'1'11

I PRINT THE TOTAL TIM!
I CARRIAGE RETURN
I TYP1!: RUN SUM"4A RY •
I TYPE NUM8ER OF' SYSTE~ ERI!OPS
,TYPE NUMIIEp OF' POWEP FAILS
: EX!T. OR RF.TURN TO ICYSt) RTH.

1412

QAB~
DEC IXII STl'-lDARD ~ONITOP
OXQIIBM,P\ 1
21-11'11-77 12.42

1411
1414
14\ 5
1416
1417
141 A
1419
1420
14"
1422
1423
1424
1425
141.6

14'27
141.R
142Cl

1430
1411
141'

007204
n07210
1107214
1)072tf;

012746
0'''46
11000112
012767

(107224
n07'210
On7?12
00724(')
(1)7244
on72511
1)07252

1n5767
I)nlOo]
1)12767
1104767
00536'
001373
011604

0~72'54

(I~OOO~

007256
on7 26 0

010416
1·~"!767

I)n7271')
007272
0(17276
1)07304

00140'5
0!'l4767
012737
132767
Of)! 40'2
004767
005046
(112746

!H~

00'7)12

1434
1435

I)n7114
(1)7120
007122
00'126
007))0
007334

1436
14)7
t41R
1439
1440

2441

1')114167

0072~4

nO"H2
007146

MACYll 27(1006)

CTRLX,

172270

4$ 1

172061
(001)10
1)05522
172244

172254
181

005502
1720\4
002'516
nOOOl')1
0(1)1)01

177572
172026

25 I

MOV
MOV
RTl
MOV
TST8
BNF.
MOV
JSR
DF.:C
B"lE
MOV
RESET
Mnv
JSR
TSI8
SEO
JSR
r.oOV

RITS
~r,Q

002712

lSi
00B30

001')00~

105267
016767
1 n44t'l1'i
000207

1714'5'171760

1')22771')

00.11

PAGE 50
SEQ 0052

000340
on7216
(100144

23-APR-77

581
171754

JIOO .. CSTART

: SETUP "le:w psw ON
I PUT RETURN PC ON
: I,OAD NEW plIW 11.1110
,CLEAR QllI!:Uf.S A'IO

STACIC
STACK
CONTINU1!:
DF.LAY TOO.

I\I-IODE

,IF NOT IN RMODE,

S~ORTEN

H'PTY7,-(SP)
'4$,-CSP)

18
" O,CSTART
PC.CLRQUS
CST ART

15
(SP), P4

114, (51')
PC. CLPQl.!S
KIPRES

WAIT

,CLEAII QUEUES,
, "ONE?
,liP IF NOT,
f SAVE RETURN PC
,RESTORE PF.:TURN PC' IN ClJRIIENT SANK
: CLEA~ QuEUES l~ SA "I<. 0

2$
PC, KTINIT
U, li tSSRO
;!,·lTO,PPRFS
33
PC,PUNSL

JSR
-(51')
CLR
MOV
'58,-CSP)
IITI
INCEI
BPAKE
MOV
ROTIIUM, ROTCNT
"SGS,CTllLC
RTS
PC

,PARITY PRESENT?
;/'1IU,

CONTINUE

,YES, Gn TURN O~ PARITY
,RETYPE: NEW PSW ON STACK
,PUT RETURN PC ON STACK
,LOAD NEW PSw A~IO CONTIIIJUE
I SET BRAKE TO PREVENT BACKGROUND MODULE FROM BEING START
,RESET TH~ POTATION COUNTER
,OUTPUT ·C
,P'XTT,

OAIM DEC/Xli STANDARD NONU'OR
DXQABM.Pll
21dPR-77 12142

MACYH 27(1006)

PAGE 51
SEO 0053

1444
007]50
007]52
007]54
007]56
007162
007]64

005726
012546
001403
004767
000773
000205

TYPEN;
TYPEti
000004

IIi

QABM DECixtt STANDARD MONITOR
DXOABM.Pl t
2t-APII-77 12i42

MACY1S 27(1006)

TST
MOV
8EO
JSA
BA
ATS

,REMOVE OLD P!5 "'ROM STACK
,CitT ASCII ADDRESS.
,8R Ir 0 TEAMINATOR.
,TYPE IT.
,CiET MORE.
,RETURN.

(SP]+
(5)+,-(SP)
11
PC, TYPE
TypEI
R5

23-APA-77

ooi 11

PAG! 52
SEQ 0054

,TYPE SUBAOUTINr..
,TYPES ASCIZ STPINt;
I NOTE TIIAT Ir AMOOE IS SET BUT MOD ilLES AREN' T I n BnNG STARTED, IIRAKE
,MUST B! SET TO PAp:V!,;NT STARTNG MODULES WlflLE TYPINt;

t 451
1452
145l
1454
14!5!5
1456
t 457
1458
1459
1460

007366
007314
00'7400
001404
007410

1461

007414

1462
1463
1464
1465
1466
1467
14611
1469
1470
1471
1472
1473
1414
1475
1476
1477
1478
1479
14110
1481
1482
1483
1484

007416
007420
00142~
007424

012767
012667
012667

007436
111506
171500

010167

171530
001142

012701
010221
010121
010421

tll0521
012777

000100

1'72t34

007460
007462
1)07466
007472

000167
117746
001015
005726
012701
012102
012103
012104
012105
016701
005077
000177

001476
007504
007510
007512
007516
Q07U4
007526

062767
122716
001037
1127U
012767
000411
112746

007432
001436
001442

007444
001446
007452
001454
007456

001142

171 452
171474
171410

000015
007526
000012

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

JMP
TTaRVI i MOVB
BN!
TST
140V
MOV
MOV
MOV
MOV
MOV
CLR
JMP

172556
171442

000001
000045

TYPEI

171534

1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506

00111

ISUBROUTINE TO TYPE MULTIPLE ASCU STRINCiS. NOTE THaT THE PREVIOUS
,VALUE or R5 IS NOT SAVED.

1442
1443
1445
1446
1447
1448
1449
1450

23-APR-77

171400

TYPEBI
U'PECr

172004

ADD
CMPB
BN!
MOVa
MOV
BR
MOV8

tTTSAVI , TTYLNll:
CSP) +. TYPAET
(SP)+,TYPADA
AI, TYPAl
ITYPA2,Rt
A2,(IU)+
Al,(RO+
A4, (R1)+
R5, (A1)+
11 0(\, tlTPS

QU!TST
flTYPADR,-CSP)
TYPEB
(SP)+
tTYPA2,Rl
(AO+,1I2
(Rl)+,A3
(AO+,R4
(RO+,A5
TYPAl, Al
flTPS
ITYPAET
.I,TYPADR
H5,(SP]
TYP!':L
115, (SP)
'l.,TTYLNK
TYP!':L
.12,-(SP)

,SAV!!: Rr.TUAN 'DOAESS
,SAVE MIr.SSAGE AnDRESS
,SAVE REGI STEPS 1-5

,SET IE

,GET CHAR.
rSR IF NOT TERMrNUOR.
, RESTOR!': REGIST!':R! 1-5

,CLEAR IE

,IS IT U
,NO- BAANCH
,OUTPUT CR.
rOUTP'JT lip'.

QlBM DEC/Xl1 STANDlFID !lONITOR
21-APR-,., 12142
DXQABM.P11

MACYll 2'7C 1006)

23-APR-77

ooi 11

PAGE 53
SEQ 0055

150'/

1!O9
15n9
15tO
1511
1!!12
1!!U
1514
1!!1!!
1516
t !!t7

1!5tt1
1!'lt9
1'520
1521
15'2
1 '523
1!!24

007532
(')0?!!40
nO'7'542
nO'7'550
007!!52
00'7!!56
00'!!62
(')0'7!!'70
n07S12
007'576
00'7600
007606
007610
007614
1107622

012'767
000423
115'767
001002
10!!26'7

00'7542

1717'70

1'71540

l'1U50

1'71242

1167Ui

171525

(')12767
000407
1 (5)67
001367
n12'67
000713
01267"1
(')12767
000167

00'75'72

007626
001,,14
0016]6

112767
00(1402
105061

007642
00'7646
007652
007,,56
007662
00'7"66
00'7674

HI lit

~~"~lft

lo;J9
1540
10;41
1 !542
1541

00'7'7110
001704
00171{l
007712
no77! 4
00'7716
n07120
00'722
007,,4
00 7 726
007732
007734
007'140
007742
00"746
00'7'754
0077'56
("'''''62
00 7 764
007766
00"710
01)'7772
007774
007776
010004
0100n6
01nOl0
010016
01002n
010(122
010026
010032
010036
010042
010044
010050
010052
010056
010060
010066
n10014
010102

00'51)67
00'5067
004467
01660'
010467
1"2767
01241')1
MH&3
010161
062701
01 '''21
nl2621
012621
012621
012621
nlo511
022626
nl6401
012]no
012167
1\1?30!5
016\02
0\61 f,.,
005003
(1)5767
(10'421
0126"3
1'10520]
006303
1')!i(l]OO
10)003
062767
060302
103003
062767
1)06203
16(1305
01266'7
010067
010267
00456'1
001114
004567
001122
105767
001443
012767
012767
012767
012767

1 '5~ 3
1554
1'555
, 'I~6
1'10;7
1'158
10;59
1560

1561
1562
1561
1564
1'565
1566
1561
156A
1569
15'0
1571
15'2
157]
1574
10;75
1576
1577
15'711

U'79
1580

TYPEDi

1'71222
171722

171154
1I10noo
1'72366

171266

TYPELI

MOV
BR
MOVS
BNE
INCa
MOVS
MOV
BR
DEC a
BNE
MOV
BR

Mev

MOV
J"P

MACY11 27(1006)

nt,'1'TYLNIC
TYPEI.
F'II.CNT, FILCTl'I
TypEE
FII.CTR
FII.LER, .. (SPi
i3.,TTYLNK
TYPEL
FlLCTR
TYPEE
,TTSRVl, TTYLNJ(
TrSRVS
CSP)+,PTPB
UOOOO,TYPCTR
QUnST

23-APR·77

00111

iGET F'ILL COUNT.
,aR IF NOT O.
,OOPS. MaKE IT A 1.
j OUTPUT

rILLE~.

,DECREMENT P'II.L COU"iTER.
,BII U' NOT O.

PA!,;!; 54
SEQ

, ROUTIN~ TO SERVICE CKDATA CALL eCDATA"

1525
10;26
10;27
1529
152<:1
1530
1531
1,))2
15H
1!'i]4
1 '535
1516
1517

1 'i4!1
1546
1547
154A
1549
1 '5'50
1'5'51
1!'i52

TYPEEI
111740

n07436

QAB'" DP:ClXll STANDARD MONITOR
DXQlBM.Pll
21-APR-77 12142

1544

2'1

177777

171!!13

111S05

l11HO
1 '71256
O{lSOU
000012
171632
000002

1 '7t624

0011052
0000]2

! 77774
171164"'
000074
000076

171142

1711'74

DATCK.i MDVS
SR
CDATA.i CLRS
CKCONTi CLR
CLR
JSR
MOV
CDATAli Mnv
SUB
foIOV
I40V
MOV
ADD
MCIV
MOV
MOV
MOV
!oIDV
MOV
C!OIP
Io'OV
MaV
MDV
MOV
MOV
I'IOV
CLR
TST
B!Q
MOV
INC
ASL
ADO

aec

000020

171120

000020

1711 00

171102
171070
171056
004560

30U

004552
171226
077406

07'7406
07'7406
017406

16'7512
167!!06
167502
167506

ADD
ADD
BCC
ADO
ASR
SUB
MOV
MOV
MOV
JSR
MODIlPA
JSR
MODRPA
1ST8
BEQ
MOV
MOV
MOV
MOV

.-I,"ATFLG

CICCON'!'
DATFLG
conG
DERIICT
R4,SAV04
12eSP1,R4
114,CDERRI
'2,C'DERRI
(R4)+,Rl

,SET FLAG FOil DATACIt' CALL
:CONTINUE
,SET FLAG FOil CICDATA CALL

,INITIALIZE O'TA ERROR COUNT
,TE"4PORARILY SAVE RP:GS
,GET PC+2 OF CALL
: SETUP PC 011' CALL

,GET BEGIN _DORESS or MCIDULF
(Jl4)+,R)
,eE'I' ,. .. BLII.: .DI)R~8" "r RBUrPA II'ROM ,",ODULE
Rl,S8ADPeRn
,SAVE IT
'SVIIO,RI
,SAV!,; MnDULE'S REGISTEII!
(SP)+,cRt)+
eSPH,(R1)+
(SP)+,cR1)+
(SP)+. CRS>+
(SP)+,(Rt)+
RS'(R1)
(5P)+, CSP)+
-4(R4) ,1'1
I RESTORE MODULE ADDR
(3)+,RO
J GP:T RElD BUFrER PA
(l)+,MODREA
: GET EA BITS ALSO
0)+,R5
I BUrFEII WORD COUNT
WBUI"PAeR1>,R2
J GET WRITF. BUFFER PA
WBUFEA (I'll), 1I0DWEA
,AND GET EA BITS
R3
,CL!!:AR OUT RtG. 3
COnG
,ENTERED FROM DATA ERROR RETUFlN?
,NO- BRUCH
30S
eSp)+,R3
,YES- Gf:T COUNT
R]
R3
,CREATE OFFSET
R3,RO
,GI!:T ADDRESS or CURRENT FlEAD BUrFEIi WOIIO
.+10
no,MODREA
R3,1I2
,GET ADDRESS OF CURRENT IIRITE BUFFER IIORD
.+10
.20,MODIII!:A
113
,RESTOR!!: COUNT
113,R5
,CALCULlTE ilORDS LErT
(SPl+,D!RRCT
,RtaTORE DAn ERROR COUllfT
RO,MODRPA
R2,MODIIPA
,GET 12 BIT irlRITE BUFrtR ADDRESS
A5,TOP125
R5,TOP125

,GET 12 BIT READ BUFFER PA

KTPRES

,USE KTII !
,NO. BRUCH
,MAP USER Rill

11
1'77406,UIPDRO
.77406, UIPDRI
""06, UIPDR2
1'77406,UIPDR7

OO~6

D!:C /XI \
.. "elM
DXQll!Io!,P"
1581
1592
IS81
IS94
!585
1596
IS87
1588
t 599
1'590
1!591
1!192
159]
\594
159!
1!596
IS97
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608

IM9
1610
1611
1612
1613
'614
1615
1616
'617
161 A
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
16]1
16n

1633
1614
16]5
1636

010110
0\11,16
0'0124
1110132
010140
010144
010150
01<1154
010160
010166
010t70
010t72
010176
010204
QI0206
010214
010216
010222
010226
010230
010236
Ot0244
O!02S0
'Il02!4
0102'16
010262
010266
010270
010272
010274
010]00
010302
010306
010310
"to]14
010]22
010]26
010330
(103)4
tl10142

STANOA.~O 'lONnJ~
'1.AP~-7' 12.4,

016767
016767
1116767
017767
042700
OS2700
042702
052702
052767
021012
001436
OOS267
026727

1707'76
007600
177700
040000
1777(10
020000
140000

167610

00000]

032177
001424
011067

002000

170762

011267

170670

010146
010]!i0
010354
010356
010]62
010364
010370
010]72
1')10]76
0104/)4
010410
11'0412
01 (1416
010420

001/102
005161
016761
010361
Oln446
010Ul
104422
012604

170672

111

2 ••

000056
000060

171236
171230

1'71004

020000
000200
017777
020000
000200

SNE
SUII
ADD

167322

41,
167300

58.
170554
170472
0000]0

000030
170526
0000S6

68,

016'701
012467
105767
100002
1)167]4
11(1\167
010100
062700
000167

000046
172422

Ot0464
011)466
01047:>'
n 10476
010502
01050';

005746
(1)4467
016604
062704
1)05267
ono167

004246
000T'l14
000n02
170450
1 '7715r1

M~CYI I

00.11

PAGE 55

BNE
SUB
ADD
DEC
eNE
RTTK,
TST
SNE
MOV
BP
tNC

27(1006)

KIPAM,UIPARO
MODW12, UlPA~l
MODR12, UlPlR2
"600,UIPAR7
U77700,M
UOOOO,FtO
1177'700,R2
120000,R2
IUMODt,PSW
~Po,(lP2

U
DEPPCT
DERPCT,.]
2.
uITIO,14SR

H
(lRO, MOOWPA
(lR2,MODWEA
MOOWEA,AsseRI )
f.lODWPA, AWAS CR I ,
113,wASADReRt)
oERRCT, - (SP)
Rl,-eSP)
CDtRR1,-CSP)
CDERR
R3
(RO)+
(R2)+
KTPRES

,EXECUTE TN PAGE 0
,PAGE 1 IS WRITE lIur"':R
,PAGE' IS RtAO BUrrER
,PAGE 7 IS UTERNAL
,SETUP READ BurrER VA
,SETUP WRITE BurFER VA
,CHANGE TO USER
,DATA OK?
,YES, BPlINCH
.,NO, COUNT DATlI EPROR
,"'ORE THlIN 1 ERRORS?
,NO- PEPOIIT ERROR
J YES- PEPORT ALL?
,NO- BRANCH
,TEMPORARILY SAVr. DATA
,RETURN TO JfERNfI;L
: SAVE EXPF.CTEn
,SAVE A("TfIAL
:SAVE COUNT
,SAVE DATA E~ROR COUNT
I SAVE WOIlO COUNT ON STACK
,SAVE V~ OF CKDATA CALL
,GO TO p':PROR CALL
,COUNT WORDS CHECItED

,REMAP IF N!,;EO!';O

''''777,RO

4e
.20000,PO
1200, U1 PAP2
117777 ,R2
5S
• 20000, R2
.200,UIPARI
P5
1$

DEPRCT

!is
(R4)+,DSTADP
7,
EPCNTCRI'
.+6
ERCNT(R1)
DERRCT, AWAS CPIl
R3,ASBCPll
R4,-CSP)
Sp,SVR6(PO
(Sp)+,114

21-APR-?7

00111

: RETURN TO ItEP"II':L
I ANY DATA F:PPORS?
,YES, BPA"ICH
,GET TliE PP;TlTRN ADDRESS
,GO TO CO"~ON RF.TUP~ CODE
,DATA EPPORS OCCUPRF'D- UP MODULE ERROR
:COUNT BY 1
,SET TO -I IF' 0
,STOPE T "'F'ORMATION lN MODULE'
:STORE SIZE 1'1 lISII
:S~V! POINTER T'J FIIIIOR PE'l'UPN ADDPESS
:SAVE STlCt( POINTER
,REPORT T"TALS, HALT MO~ULE IF NEFDr;;O
,Gn ERROII RETURN P!'1INTF.R

PAGE 56
SEG n058

170S10
170422
170711
170464
000020

BIT

8NE
COM
MOV
MOV
MOV
MOV
MSGOS
IIOV

000060

000046

010422
0'0426
nl0432
010436
010440
010444
010452
Ot0454
010450

MOV
MOV
MOV
MOV
BIC
8IS
BIC
IHS
Bra
CMP
8EQ
INC
CMP
BLE
BIT
BEQ
MOV
MOV
RTTKI
MOV
"OV
MOV
MDV
MOV
MOV
JMP
lIo/C
TST
TST
TSTB
StQ

SIT

0\ 7777

QABM DEC/XII STANDARD MONITOR
OXQ1BM, I'll
21-APR-77 12142
163'7
1638
1619
1640
Hi41
1642
1643
16'4
1645
1646
t 647
1649
1649
1650
16!!1
1611j2

167516

00]404

170662
170652
0000S4
171'1654

2J-lPR-'77

srC) 005'7
167522
161516
167!U2

170732
170726

104423
016761
016761
010]61
016746
010346
016746
000167
(105203
005'720
OO!722
105767
001420
0]2700
001005
162700
1')6276'7
0)'2702
001(105
162702
062767
00S305
001HO
104423
005767
001003
012467
000423
005261

(ll0~44

162224
170776

"'IICYl1 " dO¢Ii'

7$.
170414

!lSI

CORETI

MOV
MOV
TSTB
BpL
MOV
MClVI\
MOV
ADD
JMP
TST
JSR
MOV
ADD
IOIC
J10Ip

MonADR, Rl
(1I4)+,DSTADR
D~TI"LG

DEIIRCT,~(R4"

STATCR1),PSTAT
RI,RO
4SVR6,RO
IOQSVD
-CSp)
R4,SAV04
14CSP)'1!4
~2, P4
CDnG
COATAI

,GET ~ODULE STAPT MDRESS
,GET TH~ T:lETURN ADDRESS
:IS THIS A DATACIt CALL?
,NO, CONTINUE
,YES, LOAD THE Nlf"'BI;:R OF OAT A EPPOPS
I SF.T UP F(lp MOD flLE pETUIIN

: PUSI! '!;TAr.K
:GET

OF' CKDATA caT,L

QlBM DEC/XU STANDIRD MONITOR
DXQlBM.Pll
21-1PR-77 t2iU

USl

MICYll 2'H 1(06)

23-APR-77

00111

PAGE 57
SEQ 0059

,COMMAND DECODER. CHECKS SYNTAX AGAINST COMMAND TABt,l!:.
! AI! I! C:OMMANDS ARE: CHEC:Ke:o AGA tN5T THE QUOTES, NO lBAREVUT10NS A!!LOWED

!n.
IUS
1656
US7

1658
US,
1660

1661
1662
1663
1664
1665

1666
1667
1668
1669
1670
16'71
167'2
16'7]

010512
IIUlS16
0111520
Otos24
OIOUO
010534
1110536
010542
010!44
0111S50
01 nS!14
010'560
010!62
010564
010566
010570
01057'2
Ot0574

105767
001404

170272

onSo67

1'0264
170326
1705!!

000177
IO!7&?
001403
104406
000441
004467
016'700
012701
010046
1'22021
001407
105721
0013'16
111102
001422

16'14

010~76

()6020t

1675

01(1600
0\(160'2
010604
010606

011600
000767

1676
1617
1678
1679

16RO
t691
1682
1683
1694
1685
1696

OAIIM

OIOUO
01061'2
ot0614
010/;16
0106'22
0106'26
0106]'2
0106]6

IIEQ
023111
004170
170262
025106

2. i
GTOKI
GTOKXI
GTOl(ll

"OR!!:!

GTO IC 21

1('5711
001365
1'22126
111102
1160'201
014167
005067
010067
(104767
00016'7

DECODEi TSTs
BEQ
eLR
JMP
TSTS
111

170670
1'70666
170'204
004114
170640

Drc/xu 5TA'IOARO MONJTOII
2!-A.PR.-17 12142

"ACYll 27(1006)

SPCP'LG

11
SPCf'LG
IISRtTIIN
R!!ODE

MSG,. INVCOI
SP
COMCON
JSR
R4,SAV04
MOV
KBPTR,FlO
MOV
.CO,,"TAB, Rl
MOV
Ro,-(SP)
CMPS
(RO)+, (111)+
GTOl(2
SEQ
(111)+
TSTS
SNE
.-'2
MOVB
(Ill) ,R2
PEO
COMCOI
~DD
R'2.Fll
MOV
CSP)'iIO
BII
GTOK1
(I'll)
TSts
SNE
GTOI(I
CliPS
(R1 )+, (SPl+
MOVB
(Pt),R2
ADO
R2. PI
MOV
- CI!\ ) , CADCR
CLP
eSTAIIT
MOV
M,KBpTR
JSR
PC, RST04
JMP
CO"'QUE

'3-APP-77

00111

t SPECIAL. P'LrlG StT?
tSR If' NOT,
,YES. CLUR IT.
,GO VIA SRETRN.
,IN RUN MODE:?
,NO. CONTINUE
,. INVAL!D CMO. ONLY CNTL C IS Oleo
,CONTINUE
,SUE REGS 0-4.
: POINTER TO RO,
r DEVICE DECODING COMES HERE
,SIVE STRING POINTEP
tMATCH 'I'HE CHARlCTER?
:YEp, SU If' THE RUT MATCH
:NO, GO CHECK AGAINST NEXT
,SUT f'IND WHERE NEXT ENTRY IS
:DISPLACEMENT TO NEXT ENTRY
,NO SUCH THING.
! !'OINT TO NEXT rNTFlY
,POtNT TO BEGIN~ING OF INPUT
,KEEP LOOKING
,LAST CHP IN ENTRY?
,NO, CHECK THE OTHER CHP'S
f RESET SP AND Ri
,GET DISPlITCH ADDRESS
I PI POINTS TO NEXT ENTRY
:SET MODULE AOOR IN CSTART TO 0,
,SAVE CURRENT surFEP POINTER,
,RESTORE REGS 0-4.
,GO TO COMMON QUE CALL.

PA(;E 58

DXQABM.PII
, 6R7

1698
1689
1690
16111
169'2
1693
1694
1695
1696

SEQ 0060
,COMII.Otol PP'TURN I"POM COMMAND EXECUTJr.1N 110;0 F!l1N RI')UTI"E ClNCLUOING
,PELOCUION AND INTERNAL PESTlIIT)

01064,
010646
010646

104406

OH107

005067

170136

010652
0I06'1f;
010"'62

1~5067

170446

1"4406

O~2737

000167

171274

COMCOI i MSGS, INVC'lD
COMCONI
COMC021 CLFI
SPcrLG
CLRB
P'TLLID
COMC03, [IoISGS, DOT
COMC041 JMP
INpUT

,TYPE

INV~LID

COMMAND.

,CLEAR SPFCIAL nAG AND
: DIP COM~AND tHOICHOR.
:CLEAR nLL COM~ANO INOICATOR,
: TYPE DOT,
,GO GFT MORE H'Pur.

OABM D!C /XU STANDARD MONUOR
DXOABM.Pl1
21-APR-7'7 12142
1697
1699
1699
1700
1701
1702

I4lCYl1 27C 1 006)

23-APR-7'1

00 i 11

PlG! 59
SEQ 0061

,SPEC rAL INPUT ROUTINE.
,CALLED BY MODIrY ROUTINE, IIH!N WAITING rOR NEW VALUE TO BE INPUT.
010666
010672
0106'16

012667
105267
000771

SINPUTi MOV
INCB
BR

1'10164
1'70112

Ol8M OtC/X11 STlifOARO MONITOR
DXQABM.P!!
21-APR-7'7 12.42

MACYll 27(1006)

(SP)+,SRETRII
SPcnG
C014C04

23-lPR-77

00.11

,SlYE RETURN lDDR.
,SET SPECIAL FLAG.

PAGE 60
Sfo;Q fl062

,RUN ROUTINE. STARTS EXERCISER P;XECUTIO~.
,NOT! THAT "RUN- IS ENTERED O'iLY "ROM BANI( 0, !HlT "IlUNR'S' IS US!O WHEII
,THE PROGRAM I S NOT IN BANK O.

1703
1704
1705

1'106
1 '10'1
1108
1709
1'710

1'111
1112

t1tl
1714
1715
1'116
1717
1718
1119
1720
1721
1122
1 '12)
1724
1725
1726
172'1
1729
1729

1730

010700

112767

010706
010'110
010714
010'120
010'124
010;31')
011')736
010740
010'/44
010'746
010754
010756
010;62
0107'70
010776
011 002
011004
011010
011014
01 I ot 6
1)11020
011022

00040'
105061
n05061
005067
005067
132767
001403
0047'7'7
000406
132767

042761

012767
004'167
000436
016701
016700
006200
006001
006200

042'161

00(1241

011032

006201

QU034
011036
01 t042

042701

1743
1744
1745
1146
1747
1748

1749
1750
1'151
17!2
1751
1754
l75!
1756
l7S7

'.158

ott

Dl1 i06
011112
011116

011122

170)77

tI.

001540
001554

2'1

002446
t 70032
170030

006201
0001"

001416
02016'1

101403
104406
000673
105767

1101'70
023203
170220

/101003

104406

023241

000665
01016'1
112767

000001

105067
004767

105067
012767

011130

oonll7
004767
132767

170144
17020)

110214
010356
170167
026520
003714
003626
000002

170172

100001

110116

170140

001424
012767

MOVB

'I.LOCK

BR
CLRB
CLR
CLR
CLR
RITB
8EQ
JSR
8R
IUTS
8EQ
JSR

.+6
LOCK
orrSTD
SYSCNT
PWRCNT
nITO,CLOCK
Ie
PC, liALCLR
2.
,IIIT1,CLOCK
2.

!olav

MOV
JSII
BR
HOV
MOV
lSR
ROR
ASR
ROR
CLC
ROR
ASR
ASR
ASP
BIC
BEQ

006201

QI1134
011140
OU146
1'11150

!Ii

006001
006001

1741

000002

012767

~t1024

1742

170415

170420

170404

Q11026
Qll030

011044
011050
011052
011056,
011060
Q1t064
(HI066
011072
074
011100

110336
000001

RUNL.
RUN,

170413
170324
1 7 0340

004777

\'732

1'740

170421

001402

17)1
17ll
1734
11:15
1716
173'7
1738
1739

000001

~C,UPCLR

142761, SLOSB
"27S1,BLOSE
PC,GETAOR

5.
lDORLO,Pl
ADDRHI,RO
RO
Rl
RO
RI
Rl
Rl
Rl
Rl
.t'77,Rl

RI,OFrMX
CMP
8LOS
31
MSG',INVC02
COMCON
BR
TSTB
KTPRES
8t1E
MSGI,INVCO)
COMCON
BII
MOV
Rl,orrSTD
MOV8
.I,RMOOE

CLR8
JSR
eLR8
MOV
JSR
RUNRESi JSR
BITS
BEO
MOV

RUNRP'L
PC,HVCODE
R"'OO!
,MODQ-2,BKPTR
PC,CLRVEC
PC,CLRoua
IBITl,PPRES

lt1
• \ 0000 1, LGHOLD

,SET LOCI( TO PREVF.NT REI,OC ATING CODE EACH
,TIME WBUF I S CYCLED
,CLEAR LOCK TO ALI.. O;.l CODE RELOCATION
,ZEIIO SYSTEM I':RROR COUNTER
,ZERO POWEll FAIL COUNTER
,USING THE KW11-L CLOCK?
,NO, CONTINUE
,YES, 14lKI': SllRE CLOCI< TABLE IS CLEARED
,CONTINUE
,USING THP.: KWl1-P r:LOCK ?
,110, CONTINUE
,YES, "'An SllRE CLOCK UBLr. IS CLEARED
,RESTORE THY.SE I!fSTPUCTIO!!S
:rOR A CHEC/( SU'" ~ODULE
,Ir INVAL to OR 1'10 ArlORESS, rORCE 0
,GET LOW OROFR BITS
:GET lINY HIGH OIlOEP BITS

,rORCE TO 41( BOUNOA RY
,Ir NOW 0, SKIP RP.:ST eTO PRF.VENT ERR PRINTOUT
,IF KTPPES WAS CLEAIIED)
,ADDRESS IS OK, CONTINUE
,'CANNOT GO THAT HIGH'
,CONTINUE
,KTI1 IN USE?
,YES, CONTINUE
,'NEED KT-l1'
,CONTINUE
,MAI(E SURE BANK 0 Copy or RMOOE IS
,SET WHILI!: EXECUTING "'VCOOE
,"'OVE PROGRAM TO NEW 8ANK AND GO TH!PE
,CLEAR CURRENT COpy or AMODE
,INITIALIZE TRAPCATCHER IN VECTOR AREA
,INCLUD!S CLEARING BRlKE, MOOCNT, IOBKID
,IS IT AN 11/60 ?
,NO, CONTINUE
,YES, LOAD EPROR LOG !HA!L! BIT

••••••••••••••••••••••••

QABM DEC/Xii STAOJD~RD MONITOI!
DXQABM.Pl1
21-U1R-77 12142
1759

!HO
1761.
1762
1763
1764
1765
1766
1767
1768
1769
1770
1771

!',

MACYU 27C 1006)

010046

076600
056700

011164
nll pn
niH74
0111'6
011204
ntt212
011220

076600
012600
nl':'76'
052767

016'''17

011226

112767
n127n2

011232
011214
011236
OU242
011244
011250
01\ '52

001462
105767
00ln12
105767
10n"07
n05061

000022
170304
000222
1'70274
000200
170262
,.,.,77"1
026522

170274
170266

170256
167575

1772
1773
t 774
1775
1776
1777
1778
t7'79

1700'7
170042
000026

1790

011256

005061

oooo]n

IItt262

042761
nl2761
nOl1SS
032'761
01)1351
005767
001414
n32761
001142
032767
001404
n32761
001332
t 05 26 7
005761
100ot02
t 05267
032761
001402

020000
040000

noo020
noo020

020000

000020

1'788
1789
t7C10
1'791
1792
1793
17C14
lH5
lH6
1797
1He
17C19

1900
1IInl
1802
tAO]
1904
1805
18116
leo7
iii 08
1809
tl!IO

n11276
0111110
Qt 1)06
nttl10
011314
nil ]16
011324
01 I ]26
011134
011 ]36
011144
011346
011152
01 t 156
011160
ot 1 ~64
011172
C111'74
011400
0114112
011406
01141 (\
011414
011416

10'5267
non" 4
1t'15767
OOIOOS
005761
nOl50t
n(1011'>1

000020

0017"17

167706

0020no

000020

167443
167441
!'Il0000

000020

RUNCI

1674n7
167(,26
173512

t j 6767

167367

167366

026520
041}000
167702
167637

167402
16'7414

011450

1814

01; 454

QABM DEC/XU STANDAPO "ONITOR
OXOA811.PI I
7t .IPR-77 12; 42

MOV
SEO
TSTB
BNE
TSTB
11M!
Ct.R
CtR
RIC
BIT

5a i

,lIESTOllE REG. 0
,GET CURRENT STATE
I ADD ABORT BIT
,WRITE IT BACK
,INITIALIZE Bur'ER ROTATION FUG
I snup TO COUNT SELlCTED MODULES, . AND
I IP' NOT SYSEIIR OR POiriER FAIL RESTART
,CLIUII MODULES" PASCNT AND ERRCNT.
(2}+,Rl
,MODULe: AODR TO Rl.
IWNC
,BP Ir NO IoIOllE.
RIoIOOE
:INTEllffAL RF-START?
,SR IF YES.
2.
CIIN
,IN CHAIN MODE?
2$
:IIR IF YES.
PSCHT(R1 )
,CLEAP MOO"S PASCHT.
ERCNT(R1 )
,CLEAR MOO"S ERROR COUNT.
tBrTU, STAT(Rll ,CLEAP STOPPED BIT.
'BITt 4, STAT(Rt) I,",OOULE SELIr.CTEO?

-----.-•• --* •••• -•••• *•••••• -•••

SEQ

.BITU, STATe R1> I JoIOOULE STOPPED?
18
rBP IF YES.
OFFSET
,IF orFSET 0, IGNORE BITS 10+11

BEQ
BI'I'
BfIIE
INCB
TST
BMI
INCB
BIT
BEQ
SR
TST8
BNE
TST
BEQ
JMP
Move
MOV

",nv

INCB
TST!!
BEQ

MACY11 2HIOO6)

fA ND rREEZE ON rIRST ElllIOIl BIT
I ENABLE 11/60 ElllIOll LOG
;SAVE REG. (I
,SAVE

BIT
BNE
TST
BEQ
BIT
8NE

INca

167426

012767
012167
! O~ 267
1115767
00144'

180

PAGE 61

WRtre:
1I0IllHMI. WTWHMI
NOV
P.O,-(SP)
IoIEO,FIOWHMl
1oGHOLO,1IO
BIS
MED,i/TitH!!I
MOV
(SP)+,1I0
MOV
.CONTIIL, KONTR1o
SIS
.200,KONTRL
MOV
KONTRL, ~CONTRL
MOVS
'-i,WBrLG
MOV
,MOOQ,A2

lin

nn0020

011430
t'l11436

011444

281

16"1726
004000

i'Jti422

18\1
1St 2

lUI

18 i

012~nl

1781
!782
1793
1784
1795
,.,86
1787

11112'10

00111

SEQ 0063

!t!~

011156

01\\60

23-APR-77

:~K

I!l' NiH'.

31
,AUll ,STAT(Rt)
is
#I"1",OrFSET
3$
IIlITI 0, STATe R1)

,NOT 0- IF BITlI IS SET, DO"'"T COUNT IT

I32K BOUNOARY?
,YES- IG"'ORE BIT 10
:NO- BIT 10 SEn
1$
,YES- DON"T RUN THIS MODULE
MODCNT
:~O. UP COU"'T Olr. RUNABLE MODULES.
STAT(Rl)
,I'II<M001
,NO- BRANCH
.+6
BKCNT
,YES- UP COUNT
J8IT12,STAT(Rl ) ,EXTENDED MODULP:1
,NO- 8RANCH
.+6
XCloiT
! YES- COUNT IT
CHECK NEX'!' MODUt,F..
is
JoIODCNT
,ANY RUIt"BLE "'OOUttS?
,YES, BRA'lCJoI
58
OP'F'SP.:T
INO, OFFSET 01
RUND
I YES- COMMAND INVALID
F.NDSVB
I NO- THE ONLY MODS PUNNABt.E MUST BE THOSE
,WITH BrTS 10 OR 11 SET- "ELOCATE
1I0~CNT, IoIOOCTIl
,LOAD COUNT or RUN~ ABLE MODULES
: INTO STARTUP COUNTr.R
,14000-2, MOOPTR
,MODULE T~BtE ADOP '1'0 MOOPTR.
,START WITH SPECIAL BACKGROllND MODULES.
140000. J081<1D
: SE'I' THE NON-STOP rtAG
"STOP
POTT

,ao

:21

23-APR-77

00111

PAGE 62
SEQ 0064

U1S
1816
1817
1819
1919
18~0

11121
1822
1823

In4

18"

1826
t9~,

1829
!l!'Z~

18]0

tell
1832

tell
1834
18'5
1816
1817
1838
1839
1840
1841
1842

011456

1\6767

011464
011470
(111474
n115no
011504
011512
!'I11514
Oil ~22
011510
OU536

It'16367
106367
106367
106367
126727
103403
'''767
116767
116767
J 06367

(l11542

I063~7

n11546

10,.3,.7

n1 f55~

C11560
011562
nlts70
at! 5"14
011 (Ii 00
!!tH!!?
011606
n11614
011,.20
011624
nJ1630
n11634
rll1l'>40

1"26'72':'
103403
112767
004767
10576"1
onl00S
'!lUI'l15
112767
000167
005067
n04767
105067
104411('
Iln01b':'

167344

167345

167341

1673]5
167331
167325
Ho"l316
00037"1
167303
167261
167271
167265
16726'
i 67237
000377
000050
16"1511

oOO02n
16730"1
167604
167,75

iSl

XCNT,R!'ITCT

AStB
ASLB
ASLB
ASLB
CMPR
PLO
MOVB
MOVS
Mova
ASLB
ASLB

ROTCT
ROTCT
ROTCT
ROTCT
XCNT,no

16724]

38.
211

CMP&

tl77,ROTCT
ROTCT,IGHBFe
MOOCNT, PASREL
PASREL
PASPEL
PAS.R!:L
MODCNT,UO

SLO
Mova
JSP
TST9
BNE

1377, PASREL
PC,SETWBF
RMony.
4$

AIILB
000040

{'2'''1'

000001
170342
167420
007644
167455"
023316
17'7002

Move

,SETUP RO'I'~TION TI"'P'OUT COUNTER- 16 TIMES NUMBER
,or EXTr.NOED Po!ODUI,E5

,PREVENT LOllS Olr. COUNT If OVERFLOW
J INITIALIZP.: wRlTE BI!l"l"EP ROTATION COUNTER
,SET UTEPNt4TE RELOCATION COU'!T TO 8
,TIMES MOOC"'T

MSGS,OO!
161475

RUND,

MOVB
'1, PMODI!:
JMP INPUT
CLP
OI"P'STD
JSR
PC,MVCOOE
CLRI'I
RMOOE
MSGs,INVCD4
JIIP
COMCON

: SET RMODE IN CURRENT BliNK

I "NO IoIODULES SELECTF:O"

OA8M
DEC/XU STlND-'PP "'ONlTOP
DXOABM.PlI
21-APR-77 12142

MACytt 27(1006)

23-APR-77

PAGe: 63

00111

SEQ 0065

lUl

1 stTUP WRITE BurrER INrORMATION

1844
1845
1846
1841
1848
11149
1850
1851
1852
1851
ln4
1855
1856
1857
USA
US9
1860
11161
1862
1863
SB64
1865

1866
1867
1868
1969
1870

1871

1'111644
011650
nl1652
011654
011656
011664
011666
1)11674
011702
Ott710
I'll 1716
011720
011724

004567
00124'2
on1232
001214
066767
103003
062767
016767
n66767
026767
00100]
004767
00021'17

003022

011726
011734
1)11741'1
1'111742
1'111750
011756
011762
011766
n11772
011776
012002
012004
012012

016767
105767
11'10003
1'162767
166767
006367
006367
006167
006367
006367
103003
012767
0002(17

167274
167352

OAB!!
DEC !Xl!
DXQnM.Plt

167336

167346

000020
167324
167334
16'1322

167340
167334
167326
167310

004726

000041)
167262
1&7274
167270
167264

167322

167306
167100

167260
167254
177777

167244

SETWBfl JSR
orrsn
lIeur
werEA
APD
BCC
ADD
MOV
ADD
CMP
BNE
JSR
RTS
S!TWBll MOV
TSTB
BPL
ADD
SUB
lSI
ASL
ASL
ASL
ASL
ASL
BCC
MOV
RTS

STANDARD 1010NITOR
21-APR-77 12142

"'ACYil 27C 10(6)

(115254
000340
001276
000006
000002
00004n

KTINITI

115,T018S

LOCORE,wBur
.+10
.20, WBP'EA
LCOR12,WBUP'12
Or,.SET, W8U'12
W8UF12, MCOR12
SETWBI
PC,POTLOW
PC
HCOP12,MXWBF
CHN

11
.40, MxwB,.
WIIUFI2,MXWB,.
MXWBF
"'XWBF
,",XWBF
MXIIBF
MXWIIF
.+10
'177777,MXWBF
PC

23-APII-77

00 111

,IS WRITE BUFFEP AT THE TOP
:NO, IT'S OK, CONTINUE
snup TO ROTATE BELnw PROGIIAM
IRETURN

,ns,

,CALCULATE fo4U SIZE 0'" WIUTP.: BUrFER
,IN CHAIN MOOr. ?
,NO, OO"l'T AOD AWl 'lORE WPITE BUFFER
,YES, ADD 1 K TO MAX. !4RITl". BUFFER SIZE

P~GE 64

,KTll tNITIHIZATION ROUTINE ~SSUlo1e:S KTI I IS

1872

19H

t974
1975
1876

1877
1878
tA79
U80

1891
1982
1883
1884
1885

11186
1887

1899
1890

1891
1992
1993
1994
11195
1996
1897

012014
012022
(112(1](1
012034
012042
n120S0
012054
01'2(156
012060
012064
012066
012070
n12074
012076
n1210 4
nt 2i 12
012120
nt 2124
012110
012132
012140
012144

012737
n12737
012701
1'112737
012737
n1270]
012102
1'10'1012
062702
005303
n01373
020127
01)3765
(112737
n12737
012737
012706
10SH7
1'101405
012737
012706
Ofl'5037

000004
onn006

lSI
2' 1

000002

191!

UTERII, 1it250
HRTY7,1I'25:2
tPOPTAB,RI

"'ov

'RTI,1II6
n2.,113
(Rl )+,R2
(1':2'
'2,1'2
R3

MoV
MOV
CLR
ADO

OtC
001302
015246
000340
140000
027002
167203

000004
000006
177776

040000
027012
177716

177776
1$1

BNE
CMP
IILE
MOV
MOV
MOV
MOV
TSTB
BEQ
MOV
MOV
CLR

'6, (01'4

2.
Rl, 'POREND
18
'BUSERp,PH
tPpT'{7,flit6
,UMOOI!:, PIPS
'USp,!P
MOL4!

3S
'SMOOI!:,(oltPS
UsP,sP

UPS

orF' WlfE'H ClLLEO

,SETUP ME"'ORY f~~~JlGF'MF-NT ~BOPT VECTOR
IOON'T t.ET ANYTl-IHlG ABOPT A MEMORY MJlNlGF."E~;T 1I8nRT
; SETUP TO CT,E aR ALL KT I! QEGISTE'RS
:SETUP TO RTt IF I<Tll-0 WHEN
,AODpESSING REGISTf:pS IT I.JoCKs
,LOAD TME COUNT 0'" I'TII RFGISTERS To Ell!: CLEAP€P
,GET 1I0DRF.SS I)F IIEGl STF.P SET
,CLEAR ALL PAR'S ANO POR"S
:USf. THE liDO lillSTRUC"!'lON TO POlflT TO THE '1EXT REGISn:;t1,
,REnUCE cnU"lT OF TIP" RE'GISTF.RS CLEARED
: JS COU"T EXC"'E"FD? IF NO, GO CLEAR AGUN
,IF
TtlF.N I" THf. TABLE ROUNOAPY EXCEEDED?
: JP' 1'11), 00 T"lF :,:EXT SET IN THI': TABLE
: RESTI)Q'I': THE flUS f.PPQP VECTOII.
:RESTOR!': THY. ~U~ ERPOP PRIOPITY
,SF.T TO USFR MOllE
ILOAO USER SnCK POYNTER
,IS THIS A PDP 11/45?
,IF NOT, DO NI)T SET UP THE SUPEIIVISOR STACK
,IF YES, SFT TO SUPERVISOR MODE
,LOAD SUPERVISOR snCK POINTER
: PETUPN TO KERNFr.. M(lOP'

n:s,

ISET UP ALL THE PAGE DESCRIPTIONS THE SAMEI RUD/WRIT!: PROTECTIUN
,UPWARD PlIGf: ADDRESSING, AliD 'HXJHU~ BLOCK COUNT.
, (t 77 OCTAL SLOCKS • 129 X 32 WORD DECIMAL BLOCKS)

1898
1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
t91l
1912
1913
1914

MOV
M(lV
MOV
MOV

012150
012154
nl 2156
012162
0121116
o12i 72
012176
012200
012204
012206

004467
flOSOOI
012702
012703
fl12712
1)10162
005722
062701
005103
001367

012210
012216
012224
012230

012737
012737
(104767
000207

002564

KTSETor JSR
CLR
MOV
MOV
lSI
MOV
MOV
TST
AOD
DEC
SNE

172100
000007
077406
000040
000200

007600
077406
002522

172356

172316

MOV
MOV
JSR
IITS

R4,SAV04
Rt
'KIPOPO,R2
",R3
177406, (112)
Rl,40(R2)
(R2)+
.2no, Pl
113

,SAVE PEGS. 0 THRU 4
,IIAP STAIITI/IIG AT BA':K 0
,LOAD ADDRESS OF PDR 0
,LOAD COUNTF.R TO no 28K
,SET THI!: POP TO 4K, R/W, UP
I SI!:T THE PAR TO THE PROPER 4lC BANK
:POINT TO NEXT PDR AND PAP
,ST1!:P TO NEXT 4K BA"K
:ALL DONI!: ?
INO, CONTI'IUE

17600, t!ltKIPAR7
,POINT REGISTER 7 TlfE UNI!lUS ADDRESS SPACF
177406, UKIPDR7 I SETS UP REGISTEP 7
PC, PST04
,RESTORE PEGS. 0 THRU 4
PC
,RETURN TO THF. CALLING I'RnCEDURE

Q18M ~EC IXU SUNDA~D MbNJTO~
DXClUM.Pll
21."~·" 12.42

MACY1! 27C 1006)

1919
1920
1921
1922

1921
1924
1925
1926
192'7

1928
1929
1930

1931
1932

1933

00111

PAGE 65
SEQ 006'7

1916
191'7

1918

23.AP~-"

,PARITY ENABLE ROUTINE - •• ASSUMES THAT PARITY ts PlIESENT
(112232
012240

132767
001403

(100002

167100

012242

052.,,,

000001

167226

012250
012254

012700
005001

(1014](1

0127.56
012254
fit 2272
012214

012170
032170
001002
004.,67

000001
000001

012300
012102
012104
012]10

005720
0052n1
126701
00)362

012312

000207

000000
000000

PAENBLI BITB
SEQ
BIS

tl!ITt,PP~ES

U, (IICONTRL

,IS IT AN 11/60 7
,NO, CONTINUE
,ENABLE CACHE PARITY '!'FIA,PIS

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

1f.

MOV
CLR

,PARTAR,RO
Al

,GET ADDRESS OP' P.RfTY ADDRESS!S
,CLUII COUNTER

2. i

MOV
BIT
8NE
JSII

U,(II(ROl
U,(iI(AO)

,SET PARITY ENABLE
,IS PARITY ENABLED
,YE8, CONTINUE
,NO, REPORT THE ERROR

noH76

3S
PC,PAMSG

TIST
TNC
CMPR
BGT

(RoH
Rt
CNT1,F1!

,STEP TO ~EXT REGISTER ADDRESS
,STEP THE REGISTER COUNTER
,At.t. PAIUT'i REGISTEPS SET?
,NO, DO THE NEXT ONE

411

RTS

,YES, UL DON!!:, RETURN

1""':"11

19]4
1935
1916

QABM OECIX11 STAIoIDAPO MONITOR
DXOABM ,I'll
21-IIPR-7' 12142
193'7
fUR
1919
1940
1941

1942
1941
1944
\945
1946
1947
1~49

1949

lno
1951
1952
195]
1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1~64
1965
1966
1967
1969
1969
1970

MACYI! 27(1006)

23-APR-77

00111

PAGE 66
se:Q 0068

,MAP ROUTINE. TYPES IIESIDENT IIOOULES AND THEIR gTAR" ADDPgSg.
012314
012320
012324
012330

105267
105067
0047157
000167

166471
013303
000004
176312

MAP,

INCB
CLR8
JSR
JMP

DIRIND
MDIRE
PC. DIRA
COMCON

,SET OIl! INDICATOR.
I TERMINATE ASC I l STP ING EARLY.
,TYPE MAP.

012134
012]40
012342
012144
012152
012354
Ol2.)60
0121f;2
01216f;
012]70
0"3'72
012376
012400
0124n4
1)12410
012412
n1241'i
012422
012424
012410
012434
012436
012442
"12444
12452
(112456
012UO

012702
012201
001446
0)2761
onl00]
105767
001767
004567
025574
01 n146
nn4567
02!560!5
ot6146
004567
025621
016146
004567
025640
n16146
004567
1'25657
105767
001003
112767
!(l4oI06
nOO710
no0207

026522

OIIIA i

MOV
MOV
BEQ
BIT
8NE
T!TB

'MODQ,1I2
C2)+, RI
5S
nIT! 4, STATe Rl)

o1111 1'1 D

eEO

,GET "400Ul,.E TlBl,E ADDII.
,GEr "400ULE AnDR,
:RR IF O. ALL DONE,
,Moour,E SELP'c"gn?
'~R II'" YES,
,TYPING DIRECTORY?
r8*rl" 1t0'l', on"'!' '!'T"! !!'fSn!CT!:!I
,P'Ht M("O NA"4f!: TN A~CTI STRING,
:"001' TO STUP'P' NAIIE TN.
,MODULE AODR TO STACK.
,CONVERT MOD AODII TrJ ASC It.

III
040000

noon20

16643\
001246

01)1542
000020
()0153n
000026
1)01750

OOOIlJO
001736
166347
000040
(1255'73

O! 3155

H,
5al

J!R
1'5, P"ILL~II
AMODNM.l
MOV
FlI.-CSP)
R5.0ACNV
JSR
APC
MOV
STA't'(R1),-(SP)
JSR
R'S,OACNV
AIIOSTA
MOV
PSCNTClll)'-CSP)
JSR
115,l.\OCNV
.PSCNT
MOV
EPCNT(Rl),-(SPl
JSP
P!5,RDCIIV
AERRS
TSTI'
OIRINO
8NE
3S
MOVE\
Uo. MOIRE
Io1SGS, I "'CON",
BP
1$
RTS
PC

I CONVF:RT MODULE STATUS.
:10100'5 PASS COUIIT TO STACK,
,CONVERT IT TO OECI'1~L ASCll.
,MOD'S ERROR COU/tIT ,.0 STACK.
,COHVEIIT IT TO O!:CI"'U ASCI!.
,TrPING 0 tRECTORY?
,8R II'" n:s.
rNO. ALLO" T"iPI"G FUL .. STRING.
,TYP!: ASCn tTNlI;,
,DO IT AGAIN.
rI!:XIT.

... o"s.

ClAIM DEC/XU STANDARD MONITOR
DXCIUM.PII
21-APR-'7' 12i42
19'71
19'72
1913
19'74
19'75
1976
19'77
1978
1979

1980
1981
1982

MACY11 2'7C 1006)

2:a-APR-.,.,

00.11

PAGE"
SEQ 0069

,SELICT "'ODULEeS) ROUTINE.
012462
0124'70
0124'76

012'76'7
012'"
000406

052'61
052761

012500
iH2S06

1)12767
012767

042761
042761

000040
000054

MOV
MOV
SR

SELl

.52761,S1.DSB
U2761, SLDSE
SLDS

,MODln COMMON TO SELECT MODULE (S) •

,GO TO COMMON.

,DESELECT MODULEeS) ROUTINE.
000022
000036

on;

MOV
MOV

.42761, SLOSS
142761,5LDSE

,MODIP'Y COMMON TO DESELECT MODULE(S).

,SELECT /DESELECT COMMON.

1983

1984

012514

1985

012514

1986

012520
1)12522
OU524
012530
OU536
012542
012;46
012550
012552
012560

1987

1988
1989
1990
1991
1992
1993
1994
1995
1996

004767
000410
000405
016701
042761
000tlS7
012702
012201
001772
042761
000772

SLDSi
SLDU,

001142
166310
040000
176104

0110020

026522
040000

000020

CIABM DEC IXII STAr-IDAIIO '10NJTOR
OXOlBM.PII
21-lPR-77 12.42

"'~CYll

2008
2009
2010
2011
2012

2l-APR-77

00111

PAGE 68

,KT11 DISABLE ROUTINE

1999

2007

27(1006)

s~;r.

199'7
1999
2000
2001
2002
2003
20n4
2005
2006

PC,GETNAM
.lSI'
,CHECK NAME. GET MODULE ADOI' •
SR
SLDSC
tHO NAME. snECT/DESELECT ALL.
81'
SLDSL
,INVALID OR WEX NAME.
MOV
MODPTR,Rl
,MODULE AilOR TO PI.
SLOSS,
BIC
.SIT14, STATeR!) ,SELECT /DESI!:LECT MODULE.
SL05L,
JMP
COMCON
,DONE.
SLOllC, MOV
114000,1'2
,MODULE TABLE ADOR TO R2.
8LOSDt MOV
(2)+,Rl
I GET MODULE ADOI'.
BEO
SLDSL
,(II' IP' O.END OP' TA8LE. DONE.
SLOSEi BIC
.~IT14, STATeR!) ,SELECT IDESELEC T !!OnULE.
BR
SLDSO
,DO IT AGAIN.
,LOCATIONS SLOSB AtlO SLOSr: ARE PURE WHILE IN RlIN "OI'lE.

nl2562
n 12566
01257(1
0121574

1115767
001002
00016 ,
1(\5067

166516

012600
012604
nt2SS2
012614
012622
012626

0050 )7
026727
11)1403
1)12767
104406
000167

177572
t 66416

012612
012640
012646
0126"50
012656
n1261!i4
1112670

01'737
n32737
nOl027
112767
016767
01)4767
1'11'737

012676
nl2702
0,2704
012712
0127115
012722
012726
012734
012'741)

104406
000411
012737
1)051)67
11)44011
000167
012737
005067
(1)0167

nop".

176062

166504

001600

01l160n
024007
1 '76024

166404

012104

001)004
177572

2'1

TSTB
BNE
JMP
Ct.RB

UPIIES
11
COMe03
KTpRES

(USSRO
CLR
eMP
HCOPI2,H600
RJ,OS
2.
MOV
11600,HCOP12
MSGS,KTOIS
JMP
COMCO)

,KTll

EN~BLE

"TON;

MOV
BIT
8NE
MOVI:\
NOV
JSR
140V

,IGNORE CO",..AI'IO- '10 KT OP AI,IIuny orF'

I TUPIl OrF K'J'11
,MORE THAN 29K lVULABL!'
,NO, CONTINUE
,YES, SET MF."ORY SIZP; TO 28K
,"1('1'1 t OFF"

ROUTINE

2013
2014
2015
2016
2017
:1019

2019
2020
2021
2022
2021
2024
2025
2026

2027
2028
2029
20]0
2031

000001
1)00001
166346
177124
000001

166426
166342
177572

024615
015246
165060

000004

2. ;

023776
175720
1115246
1650]6
\ 75712

., S,tiIt4
l1,raISSRO

2.
• I, KTPRES
HCORSV,IICORI2
PC,KTINIT
'1,'ISS"O

MSGS,KTONM
8R
2.
1140V
'BUSERP,lIIU
CLR
PSW
MSG$,NOKT
JMP
COMCON
MOV
UUSEPR,(lt4
CLR
PSW
J!!P
COIIC03

,ALRE~DY

ON ?
: YES, p'nRGE'!' IT
,NO, SET I(T PRESENT FLAG
,RESTORE M[!lOIIY SIZI':
,INITIAt.IZE K'1'1 t
,TUPN IT 0111
,"K111 ENAI:\LEO"
,CONTINUE
,"NO KT11"
:CO"'TINUE

007 i')

QAaM DEC/XU aTAIlDARD MONITOR
21-APR-71 12.42
DXQABM.Ptt
2032
2033
2034
20J!
20]6
20]1
2038
20]9
2040
2Ml
2042
2043
2044

OlBM

MACYll 27(1006)

23-APR-'77

00111

PAGr. 69
SEQ 0071

• THIS ROUTINE ENABLES WRITE BUP'P'ER
012;44
012150
n12'754

1015067
004167
000167

166344
001164
175616

012160
1112166
012174
lit '000

112'76'7
016161
1044011
00016'7

OOOl77
166326
024555
175652

litOTONi

CLRS
JSR
JMP

ROTL
PC, ROTCHIC
COMCO)

FlO'!'J.T1(l~

,CLEAR ROTATION LOCK P'LAG
:GO DO "ENABLED" IIESUGE
,CONTINUE

,THIS ROUTINE DISABLES WRITE eUP'p'ER ROTA'flON

DEC/XU STA1<IDARD MONITOR
21-,a,PFI·" 12142

166]26
166322

ROTorri MOVB
'3'71 "'OTL
MOV
ROTNUH, ROTCNT
MSG"ROTDIS
JMP
COMe03

IolACYl1 2Hl006)

2l-lPR-77

00.11

,SET THE ROTATIIlN LOCI( rUG
rLOAD THE ROTATION COUNTER
,"weur ROTATIIlN DISABLED"
,CONTINUE

P.GE 70

DXQ~B"'.PII

SEQ no'72
ITHTS ROUTINE IS IIfECESSARY TO SUPPORT THE PON

2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
20'55
2056
205'

013004
';13010

004767
IlOO167

000004
175642

n13014
0110'2
OIlOH
013030

132767
001405
on4761
1044(16

000001

305a

Ou~a4

O~~O2

20!l9
2060
2061
20U
2063
2064
2065
2066
2067
2068
2069
20'70

1111n36
011042

1n4401'i
no020'

024021

013044
013052
otln54
011060
01]062
013070
01 ]072

132767
(101003
104406
000421
13276'7
001403
(142'777

000001

Olll 00
013104

012700
005001

nlll06
Ot3110
Oilt!2
011116

on51)]0
005201
126701
001173

013120
OU124

104406
nOOI6'7

013130
DIll]2
OUIl6
013140
Ot3142
013144
013152
01lt60
013164

010046
012700
076600
000152
012600
n42767
016117
10U06
000167

000014
166322
023643
175466

166326
166316

Ot1170
00176

052767
016777

000014
166276

166302
166272

2011
2072
20'3
2014
2075
2076
2077
2078
2079
20"'0
20111
2082
2093
20A4
2085
2086
2087
2098
2089
2090
2091
2092
209]
2094
2095
2096
2097
2098
2099
2100

PON,

JSR
JMP

PC, PONN
COMe03

COMMA~O

IGO TURN ON PARITY
:COIlfTINUE

,THIS ROUTlllfE wILL TURN ON PARITY 11" AVAILABLr.
166316

PONNI

177202
021756

BITB
BEQ
JSR

IBITO, PPRFS
1$
PC. PAENSL

~SG.,PENASL

1S1
2. t

"SG8,NOPAP
IlfS
PC

,ANY PARITY TO TURN ON ?
,NO, SAY SO A~D RETI)RN
IYES, GO TUR~ IT ON
,"PARtTY ENIIBLEO"
I RF:TURN
1"1'0 PARITy·
IIlETURH

,THIS ROUTINE DISABLES PAlltTY IP' PRESENT
U62 6 1,j

POP'P'I

OOOOoa

166250

111

000001

166376

024021

001430

,ANY PARITy TO TUPN OP'P' .,
,YES, CONTINUE
,"NO PAPITY"
,IlETURN
lIS IT AN 11/60
,NO, CONTINUE
,rlIS.lBLE CACHE PARITY TRAPS •••••••

••••••••••••••••••••••••••••

211

I>10V
CLR

.PAIlTAB,RO
Rl

I en ADDRESS OP' PARITY ADDPESSES
,CLEAR THE COUNTER

lSi

CtR
INC
CI.IPB
BGT

~CROl+

RI
CNTl,1l1

ICLEAR THE PARITY REGISTER
,STEP THE REGISTER COUNTER
,ALL PAIlITY REGISTERS CLEARED
INO, CLEAIl THE NEXT ONE

166221
024034
175526

BITB
·f1ITO,PPP~S
BNE
1$
MSGt, NOPAP
IIR
41
BITa
'RIT1,PPRES
BEQ
2.
BTC
'1, ItCONTRL

MSGS,PAOP'P'
JMP
COMC03

I ·PARITY orp'·
,CONTINUE

IrHIS POUTINE TURNS ON THE CACHE. SUPPORTS THE CON COMMAND.
CONI
000200

MOV
RO,-CIP)
MOV
UOO,RO
MEO
]152
MOV
(SP)+,PO
BIC
.14,ICONTRL
MOV
1t0NTRL, 'C:ONTRL
MSG.,CONN
COMCO]
JMP

,SAVE RO
,SWEEP CACHE CLEAN rtRST
,RESTOPE RO
,CLEAR OUT THE FORCE MISS SITS
,DO IT
,"CACHE ENABLED"
,CONTINUE

rTHIS ROUTINE TURNS orr THE ClCHE. SUPPORTS THE corp' COMMAND.
cOP'ri

SIS
MOV

114,ICONTRL
KONTRL, 'CONTRL

,SET THE P'ORCE MISS UTS
,DO IT

** ••• **

QlI'" DrC/Xu STaNDARD MONITOR
DXQlB"',Ptl
21-lPP.77 12.42

2101

013204

104406

023662

2102
2103

OIUto

000167

115442

QlBM DI!CIXII STaNDARD "'ONITOR
DXQIIBM,PI t
21-IPR-77 12142
2104
2105
2106
2107
2108
2109
2110

'H11
2112
2113
2114
2115
2116
2117
211 A
2119
2120
2121
2122
2123
2124
2125
2126
2127
2129
2129
2130
2131
202
2133
2134
2135

MAC'tl1 2'7(1006)

23-lPR • .,.,

00111

PlG! 71

SEQ 00'1
MSGI,CO"P'
JMP
COMCO]

"'ACYll 27(1006)

23·APR-77

00111

,'CACM! DISABLED"

PAGE"
SEQ ()U74

,MODIP'Y ROUTINE,
,GETS ADDRESS I'll) PRINTS lDOR CO'lTENTS,
,USER ClN INPUT NEW NUMBER OR CR,
,CP MEANS HE JUST wANTS TO F.XAMINE,
013214
01322'
013222
013226
011110
013212
0132]6
013240
013244
013250
013252
01 J2~6
0132f1iO
013264
01 ]270
0\3274
013276
013302
01]304
0133(16
013312
013314
013316

01312n
013324
013130
613332

112767

177777

004767
00040 I
000440
004767
000430
016704
1166704
010446
004767
011446
004767
00n67
004767
000416
005767
001401
010114
122702
001007
005724
000754
!'It2'704
105767
001352
000167

000434

FILLI
MODI
5S1

000212

166102

165576
165570

lSI
000150
7$1

000142
175376
000272
165560
000012

001306
165774

6C,

175310

3$1

MOVR

'-1, FILL!!)

:SET FIT,L

J5R
flP
Bll
JSR
liP
MOV
ADD
MDV
JSR
MOV
JSR
JSP
JSR
BF!
1ST
SEQ
MOV
CI'PfI
BNE
TST
fiR
fo'OV
TSTS
BNE
JMP

PC,GETNA'"

:GET NAt.iE AND IoIL'OflLF AonR,
:NO IU'4E,
:1~IV/lLIO OR Ii 1'; x NAME,
I GET "DORES:;,
:lNVALIO ADOP 01'1 r~o r..ODP,
,"'OVE /lOOP 'TO R4,
:ADO MODULE IIDOP TO AOOII,
,TYPF; ADDP,

38
PC, (,;ETAOR
6S
ADDRLO,P4
MOOPTR, R4
P4,-(SP)
PC, nOA
(P4) ,-(SP)
PC, nnA
PC,SINPUT
PC, GETNUI'
3S
YES
2S
111, (1'14)
112, R2
3$

(R4)+
1$

H'ILCNT,1l4
FIt.LIO
7S
COMCON

I~iDJCUOP,

: GET COI/TENT~ OF' AODFI,
,PFlJNT IT OUT,
: CFT NP.:lIi CDNTEIIl'!'S,
,CONVERT INPUT TI) BTNIIIIY,
:INVlILIO DATA plOT ~ NU"II!:P),
: NU~BF.R?
:SF! IF NOT,
I STOllE Np.:W VIHJlJE,
:LYN£: FEE!)?
:NO, DONE,
,POTNT TO NF:Xl' T,OCATION,
I REPEII.T FOFl NF,XT LOr.,
: GP.:T rILC"T AODP,
:IN FILL I'ODE?
:BR IF' YES,
:OONE,

9~8M
PEC/Xl1 STAND_PO MONITOP
DXQABM.Pll
21-APR-" 12142

MlCYU 2Hl~~!1

23-APP-',

00rl1

PAGE 73
SEQ 00'5

,BINARY TO ASCn TYPE POUTINE. TYPES NUMBERtS) ON STACK.

2136

2137
21]8
2119
2140
2141
2142
2143
2144
2145
2146
214'7
214A

013336
01U42
013]50
013156
013362
013]64
nl1370

016646
016666
016666
on4567
025675
104406
000425

00n002
0(10002
000006
000570

013372
01])'76
IItH04

(116646
016666
016666

000002
000002
000006

025675

QAB'" DEC/XII STANDARD MONITOR
Oll'OABM,Pl1
21-APR-" 1214'
2149
2150
21 '51
2152
21li3
2154
2155
2156
2151
2158
21"i9
2160

nlH12
1'111416
01H21'1
013424

n04567
02'5706
1 n4406
000407

011426
013432
011436
n t 34 40
013444
011446

Ot6646
004567
025615
104406
01261(';
000201

ITOAXr
000004
(100002

rTOA8.

140V

2(SP) ,-(SP)
2(Sp)'4(SP)
6CSP) ,2(SP)

nOO(l04
01'10002

Mnv

M_CY1l 27(1006)

23-/1.1'1'1-"

MOV

00111

:1.0110 U

BITS

I AND PUT IT III':JolE
r TYPE OUT THE VALUE

fLOAD UPPER BITS
rAND LOWER BITS
f AND ADJUST THE STACK

PAGE '74
SEQ 0076

000542

JSR
R5.0ACNV8
HOLDS
MSGS, HOL08
BR
tTOUT

025'706

000002
Otl0502

MOV
2(Sp) ,-CSP)
MOV
2(SP) ,4(SP)
MOV
6CSP) ,2CSP)
JSF!
R5,OACNVX
HOLD6
MSGS,HOL06
SP.
nOUT

ITOAI

2CSP) ,-CSP)
R'5.0ACNV
HOL06
Msas, HOL06
MOV
(Sp)+, (SP)
RTS
PC

MOV
JS~

02561'5
lTOUTI

:CO'lVEJolT 8 OCTAL f'lUf<oBERS TO ASCII
f AND PUT THF.M HERE
,TYPE OUT THE OCTAL VALUE
: GO TYp" IT OUT

,CONVERT

NUMBE~

T('1 ~SCII •

:TYPE OCTAL VALUE.
,EXIT.

QlO8M DEC/XU STANDA"'D MONnO'"
DXQA8M.Pll
21-APR-" 12142
2161
2162
2163
2164
2165
2166
2167
2169
2169
21'70
2171
2172
2173
2174
2175
2176

23-AP"'-"

00111

PAGE 75
SEQ 007'1

,THIS ",OUT IN! GnS TH! ADDIIESS lSSOCIATP.:D WITH THE
013450
013454
013456
013462
013464
Ot3466
013470
011472
Ot3476
013'502
013506

004767
000414
005767
001411
006201
103410
060101
010167
010167
062716
000207

nOOO42

{)U'510
013514

104406
0002n7

023344

165400

165344
165342
000002

Q1BM DEC/XII ST1.,OAIID MONJTDII
21e1,PII-77 1l,42
DXQA8"'.Pll

GETAl)lIi JSII
8'"
TST
BEQ
ASR
8CS
ADD
MOV
MOV
ADD
IITS
iti

PC,GI!:TNUM
11
YES

it
RI
ADIIERR
RI,Rl
Rt ,ADDIILO
R3,ADDRHI
'2, (SP)
PC

23-APII-77

COMMANI)

,GET NUMBER
: INVALID DATA IIETURN.
, NUM8!II?
,8R IF NOT.
,GOOD ADDRESS?
INOGOOD, n"S 01'0
I RtSTORE THE ADII
I STORE AT ADDRLO
I AND ANY HIGH OllDER BITS IN I.DDRHI
·:SET UP GOOD EXIT.
,DO~E

,TYPE INVALID ADOR nil DATA.
,EXIT.

ADfttRlli MSCt,INVADR
RTS
PC

MACYt! 27(1006)

~OD

00.11

PAG! 76
SEC (1)79

,GET NUMBEII rllOIll l{EY80AIID Burp'!A, ,.HI) PET Up" THf: LOi' OIlOEP 'l ITS
,IN "'1 ,.ND THE HIGH ORDE'" 81 TS IN 1'13.
,ROUTINE ADDS 2 TO THE RETUlIN PC IF SUCCESSFUL.

2177
2179
2179
2180

2181

MACYU 2'7(1006)

011516
013522
013524
011526
013532

016700
0"5001
005003
005067
112002

165314

013534

120227

000040

2182
2183
2194
2195
2196
21 !!7
2189
2199
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201

013564
013570
01]572
013574
013576
013600
013602
0136114

2202
2203

o13sto

162701

000060

2204
2205
2206
n07
220.

013614
0136:10
jU3622
ill :1626
OU632

005267
n00744

165242

010067
062716

165210
000002

165330

OU540
013542

001770
122702

000015

tl1]546

001425
120227

000012

n13550
On554
013556

013562

013606

001422
120227
002752
120227
003347
006301
006103
006301
006103
006301
006103
060201

000207

000060
000067

GETNUMi "'OV
CLR
lSi
CLII
CLR
"'OV8
lSI
CMPB
BEQ
CMP8
8EQ
CMP8
8EQ
CMPe
BLT
CMPB
BGT
A.SL
POL
Ai'lL
ROL
Ai'lL
POL
A.DD
SUB
INC
811
MOV
2' i
ADD
IITS

K!lPTII,JlO
RI
R3
YES
(PO)+,II2
Jl2,140
le
'15,Jl2
2.
R2, '12

2C
112,' '0
ADREIIR
P2,' "7
ADREJIR
Fll
113
111
113
I'll

"'3

R2,lIl
, "O,Jll
YES
It
Ro,ICBPTP
." (SP)
PC

,Gn BUFrEII PI)I'ITFJI.
:DATl
,F{.AG
IGET A lIYTE
:SPACE?
IYES,IGNOPE IT
,CII?
I YES, IIETUII~
,LF?
,tlONE
,LOW LIMIT
,TOO 1.0W, REPOIIT TH'" ERROl!
,HIGH LIMIT
I TOO HIGH, REPORT THE EFIROR
,SHIFT OLD 5TUF,.
,3 TIMES I.EFT
,I.E. HULT. BY OCTAL 10
, ADD NEW Tn OLD
,eUT GET 1110 OF ASCII STUFF
rSET FLAG
'''ORE, "'OP!!:
,SAVE CURRENT BUr POINTEII.
ISET UP OK EXIT.

:tXIT.

QUM DEC/XU STANDARD 'IONtTOR
DXQ1BM.Pl1
21-lPR-'I? 12iU
2209
H!Q
2211
2212
2213
2214
2215
2216
2217
221&
2219

'2214
221S
22)6
223'7
2239
'2]9
2240

2241
'242
2243
2244
2245
2'246

224'7
2249
2249
2250
'2251
2252
2253
2254
2255
2256
225'7
2258
2259
2260
2261
2262

2263
2264
2265
2266
2267

23-1PR-77

00.11

P1GE 77
SEQ 00'19

,THIS ROUTINE PUTS TilE IIODULt HAlite: INTO AN
013634
(136)6
OU640

nt)644
011646
013650
011652
013656
013660

P'tLLNMi MOV
MOV
MOV
MOVB
ii,
OP.:C

010346
012503
012704
1 UU3
00!l104
00137S
162701
012603
00020S

000005

SNE

OOOOO!!

Q1BM DEClXtt STlflDARD 'IONITOR
DXQABM.PII
21-APR-77 12142
2220
2221
2222
2223
2224
22'5
2226
2227
'228
2229
2230
2Ht
2212

MAC!Yl1 21(1006)

SUB
MOV
IITS

MlCYl1 2Hl006)

113,-(SP)
(R5) +, 113
.s,1I4
CRt).,cRlH
114
11
Ri
(SP)+,R3
RS

,SAVE R3.
,STOPE lDDR TO 113.
,WILL DO 5 TI"'ES.
,MOVE: CHAR.
, DONE?
:BP IP' NOT.
I RESTORE R1.
,RESTOIIE R3.
,EXIT.

.!I,

H-APR-77

00111

r.scn STRING P'OIl OUTPUT

PAGE 78
SEQ 0080

,THIS POUTINE G!'TS THE MODUl>E NAME ASSOCIATED WITH THE MOD AND SEL/OtS COMIolUDS.
013662
011666
013672
ot 36'76
013702
011'706
013;12
1113'71"
013716
ntn22
013724

016700
00506'1
005067
012702
012'701
112'721
0053n2
001174
~, 27n\
t 1 !fl02
122702

165150
165170
165142
000005
025574
000040

013'7]2

, 22'702
tin 1 437

000012

1221n2

000040

II, ".,'0 flO""
0'3136
0\3740
013'744

n14026

001430
120227
002403
120227
00341 t
120227
n02427
120227
003024
005'16'7
001426
026727
002015
110221
00526'1
005200
000736
005767

014012
014034

001773
000416

014036
614042
014044

005'767
001013
000405
104406
062716
00020'1

n13746
OU'752
013"154
013760
OU;62
013766
011'7'7n
0137'74
01]""6
014002
014004
014012
014014
014016
014022
n14024

014046
014052
Ot4056

GETN~Mi MOV
CLII
CLR
MOV
Io'OV

M(WB

DEC
SNE

MOV

025574
211
000015

C~P8

000101
00002
Hi

000060
000071
165060
1/;5052

MOVB
Cr-IPB
9flO
CMPlI
IIrQ
C"'PB
AEQ

~00005

BLT
CMPS
SLE
CMP~
8LT
CMPS
8GT·
18T
BEQ
CMP
BGE

Move

165040

41t.
165030

51'

165020

61.

023370
000002

7 ..

164776
164'746

II.

I(~PTR,RO

,GtT 8UP'FF:R POINT£R.

yr.s

I CLEU SUCCESS INDICATOII.

IolODPTII
'5,112
IIAMODNM+1,1I1
(140,(111 , .
P2
U
UMODNM+l,1I1
(Pn)'112
115,P2

,IP' 0, ABS .lOOP.
:WILL DO 5 TIllES.
:WILL STOllE KYBD "fA"'E IN THPNAM.
,BUT CLEAII IT Tn SPACES P'IRST.
,DONE7
,8R IP' NOT.
,PELOAD T!':MP ADDR,
,GtT CHAP P'POM !C811P' AREl.
,CII?
,BFI t·p' VEla,
ILP'? TREAT AS CII,
:8P tP' VES.
I SPACE? DISPEG1RD LEADING ONES.
,IIR IP' YES.
,A OR HIGHe:R?
,8R IF LESS. (COULD BE A NUMBER).
,Z OR LESS?
,BR IP' Z OP LESS.
10 OR IIIGHEII?
,R~ rr LESS. YOU LOOSE I
,9 OR LESS?
,SR IP' GREATtR. YOU LOOSEI.
,ANY PREVIOUS CHAflS?
: SI:! IP' NO'!'. NOT LUDING NUMERICS ALLOW!D I.
,6TH CHARACTE"?
,If' YES, 8RANCH
,STORE CHAR.

It 2,112

58
140,P2

5.
P2,' 'A

3'
112,'

.,.

R2,' '0

112, "9

7.
VE8

.,.

YES, .5

INC
tNC
1111
TST

112,(R1)+
YES
110
2&
YES

BEQ
8P

411
91

,POINT TO NEXT CHAR.
,DO IT AGAINI
,ANY CHAIIS?

,BR IP' NOT.

TST
YES
BNE
91
811
88
MSG.,INVNAM
ADD
n,(sP)
RTS
PC

,ANY CHARS?
,BR IP' YES.
,NO NAME.
,TYPE INV1LID OR NEX (NON-EXISTENT) MESS1GE.
,SET UP INVALID NA"t EXIT.
,EXIT.

CLR

YES

MOV

MOV
MOV

RO,IC8PTR
PC
,MODQ,R2
(R2)+,R]

8!Q

2268
2269
2270
22'71
22'72
22'73
22'74
2275

014060
014064
0140'70
0140'72
0140'76
014tOO

014\02

00S067
01006'7
00020'7
012702
012203
001762
Ilt2'70l

RTS
026522

tI,
10',

025574

MOV

IAMODNM+l. Rl

,SlVE CURRENT BUf' POINTER.
,EXIT.
J MODULE TABLE lDDR TO

1112.

,GET MODULE ADDIil.
,INVALID NAME. NO MODULEII

QUM Dte IXII STIINDAr.O'ONPOR
21-APII-77 12142
DXQABM.Pll
2216
2271
2219
22'79
2280
22111
2282
2293
2284

014106
014112
014114
014116
014120
01 4 122

014126
014132
014136

012704
122123
0013'0
005304
001374
0\4267
010067
062716

MACYll 27(1006)

00111

PAG! '79
SEQ 0091

nOOO05
1181

164712
164704
000004

000207

QABM O!C1l(11 STANDARD "'ONITOR
DXQAB"'.Pl1
2\-APR-77 12142

23-APR-'77

MACYll 27(1006)

MOV
CMPB
BNt
De:C
BN!
MOV
MOV
ADD
RTS

15,114
(P1)+d3l+
lOt
R4

118
- (R2), MOOPTII
RO,ICBPTR
14, (SP)
PC

23-"PR-77

00111

,WILL MATCH 5 CIIARS.
,CHAR MATCH?
,BR Ir NOT.
,DON!?
,SR If' NOT.
,MODULE AODR TO MODPTP.
,SAVE CURRENT BUr Pt'lINTfl:R.
,Se:T UP SUCCESS EXlT.
,!XIT.

PAGE go
5E.'Q ooQ2

,OCTAL TO ASCII CONVERT ROUTIN!.
,CONVERTS ARGUMENT ON STACK TO Ase I J, STO~ES STpyr;G STARTIN(; AT ADDPESS
,GIvEN rOLLOWING THE CALL
,EXTENDED ENTRY REQUIRES AODITIO'IJAlo
~R(;U"F"'IT O~J ST~CK- AFTF"!!
,PUSHING LOW!p 16 IIITS ONTO STACK, FIJSfI l';A PI 'T'S (SH H'TE!) TO POS 4,!5 )

22fl5
2286
2287
2289
2289

2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
230B
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319

2320
2321
2322
2323
2324
2325
2326
2327

2328
2329
23'0
2331
2332
2333
2334
2335
2]36
2]3'7
2338
2339
2340

OASCEA
ATE
CONVRT

:CLEAp nu'T' uppe:q lilTS -- NOT liSE!)
:CLF"AP !l CHAl:UCTF.:R F'[,AG
:CON'T'TNUE

ATE
HOP

:CLF:P.q 9 CflAl>ACTEp FLAG
:CONTI'IUE

OACNVBI 140VB

'AIT7,ATE

,SFT l! CHARACTER F'LAG

MOV
MOV
CONVRTi JSR
MOV
MoV
MOV
APD
TST8
BPI..
ADO
!olOV
ui
BIC
ADO
MOVS
SIC
ROR
ROR
ROR
DEC
BtIE
TSTB
BMI
MOV
ASR
ASR
ASR
ADD
MOVB
BR

2CSP) ,OASCEA
(SP)+, (SP)
R4, SAV04
12.(SP),RO
(R5)+,Rl
I6,R2
R2,pl
ATE

1)14140
014144
014150

005067
105067
000412

164746
165172

OACNVI

01 4 152
014\56

10'5067
000403

165164

OACNVX I CLRS
BR

014160

112767

(100200

165154

01 4 166
014174
Ot4176
014202
014206
014210
014214
014216
014222
014224
014230
014232
014236
014242
014244
014250
014252
014254
014256
014260
014262
014266
014270
014274
014276
014300
(114302
014304
0143011

016667
012616
004467
016600
012501
012702
060201
105767
100002
062701
010003
042703
062703
1\ 0341
042700
006000
006000
006000
005302
001363
105767
100410
016702
006202
006202
006202
060203
110311
000425

(100002

164716

014310
014316
014:no
014324
0143211
014332
014334
0143311
014342

132767
001021
016700
006300
042700
0110003
110311
016700
006200
006200
012'702

014]44
0'4346

000536
000014
000006
165120
000002
177770
000060
000007

165054
164616

000001

164566
177770

1645150
000002

165024

CLR
CLPB
SR

HOPI

.. i

BITB
BNE
MOV
AsL
BIC
ADD
MOVB
MOV
ASR
ABR
"'OV

31
'2, PI
RO,R3
'177770,R3
'60,11.3
R3,-(l11)
17,1<0
RO
RO
RO
R2

3S
ATE
U
OASCEA,R2
R2
R2
R2
R2,R3
R3'(RI)

,SAVE RF.:GS 0-4.
,GET OCTAL VALUF..
I GET OEST AMDP.
: SET Call/VERT COUNT TO 6.
J DEVELOP ADDR TO STORE 1 S1 CHAR.
,SET UP TO no 8 CHAIlACTERS ?
:1010, CONTINUE
:YES, AOD 2 TO THF ~DDRESS
: GET VALUE TO Pl.
:ISOLATE LEIIS! SIGNIFICANT DIGIT.
,CONVERT TO ASCII.
,STClRI" IT.
,CLEAR DIGIT JUST CONVERTED.
,SHIFT IN NEXT DIGIT.
,DONE 6 DIGITS?
,SR If' NOT.
:SET up TO no B CHAPACTERS ?
,YES, 00 IT

,GO nNISH UP

,ALL OONE ?
,YES, GFT OUT
,NO, LOAD UPPER NUMIIERS TO BE CONVERTED
,LIN!!; UP BITS BELONGING TO LowEP tIUMSE!1
,GIT RID or ALL OTHERS
,ADD IT IN TO COMPLETE THE NUMBEII
,STORE IT
,LOAD UPPER BITS AG~IN
,GIT RIO or TH! 2 BITS
,JUST TAlC!'" CAR! or
I SET UP TO 00 TilE LAST 2 CHARlCTERS

.BITO, AT!

OASCEA,RO
RO
U77770,RO
RO,Rl
R3, (R1)
OASCEA,RO
RO
RO
'2,112

OEC /XO STA~DARD MO~ITOR
W;I'lgl"'
DXQlBM~'P1 t
21-APR-" 12142

2341
2342

a14352
111.4360

152767
000723

OOIlOOt

Ot4362
014366
1114370

004767
012616
(100205

000364

MACYI1 2111UUDJ

23-APR-77

00111

PAGE B1
SEQ 0083

164162

8IS8
BR

.8ITO,ATE

JSR
MOV
RTS

PC,IIST04
Csp,., esP)
RS

r SET • ALL DONE· FLAG
,GO DO THE LAST 2 CHARACTERS

3Ii

2!43
2344
2345
2]46

QA8'" DEC/XII SUNt-ARO "ONITr:lR
DXQABM.Pll
21-APp-n 12142

5S,

MAcrll 27C 101')6)

014172
01417S
014402
014406
014412
014416
1'1\4420
O! 44"
014424

?~8t

"T'4C26

2162

1'114430
1'114432
014436
"14440
014442
014444
014446
014452
014454
(1\ 4456
014460
014462
014466
014470
(114472
014500

2171
ll"
2375
2316
2371

THRU 4

PAGE 82

SEa OOH

2348

2363
'164
2365
2366
2367
2369
2369
2370
2371
2372

00111

rPESTep!; REGS.

,RETUPN

,SI"'AP't TO DECI~AL ASCYl CONV~RT ROUTI~l';.
,CONVEPTS ARGU!-IENT ON STACK TO DECIMAL ,.scn, STORES IT
,STARTING AT AOt'RRSS GIVEN AFTEP THE CALL.
,REMOVES ARGUMENT FROM STACK BEFORE RETURN I'IG

2347
2349
23511
23 'B
HS2
U!!3
23!!4
2]5!!
ll56
2357
2358
2159
2360

23·APP.77

on4467
/I 16601
012700
012702
012703
0051'104
161201
!(I]4"2
005204

000342
000014
026513
014472
000005

0152704
110420
005103
001365
01250\
1'112702
060201
114041
noS 302
Oll1375
004767
1'1'2616
000205
023420
000012

nfIO"6(l

RDCNVI

181

:2S I

"00.,"11
062201

JSR
lAOV
MOV
MOV
MOV
CLR
SUB
BC!
I"lC
SII
ADD
ADD

Fl4,Slvn4
12. (SP) ,Fl1
.OECVAL,R/I
.TE"lPWR,R2
'5,113
114
(R2),Rl
3$
R4

~OV!\
R~E

R4, (PO)+
R3
IS

loIOV

(II~)+,II,

DEC

nOOO05

01'10264

001750
000001

000144

'2!
(l'!, 1 +,!,!!
'~0,R4

MOV
'5,112
112, RI
ADO
MOVB
-CRI) ,-(PI)
411
DEC
R2
SNE
4S
p~, RST04
JSFI
!lOV
CSI'HdSP'
FITS
RS
TENPWRI 10000,,1000,,100,.10,,1

:SAVE FlEGS 0-4,
,GET RI1J VALUE,
:GET AOOR OF OECVAL STPING,
,ADOR OF TENPwll TO R2,
: SrT UP TO DO 5 CONVERS10NS,
,CLEAR RESULT,
: SUBTFIACT T~N P(1W€R,
IRR IF' IJNSUCC€SSrUL,
:ADD 1 TO RESlJI,T.

:M r'" lG'U'>!,

;PE:STClRO: SU!\'l'~ACT!.O
:MAKE IT ASCII,
,SAVE IT,
,DONE 5?
18R IF' 'lOT,

,G!'!' "!"'Ar.

~'!'O~F

~oo~.

,GET DIGIT COUNT DESIRED,
:COMPUTE ADDR O~ 1ST DIGIT,
,TRANSFEP CHAR,
,"ONE?
,SR IP' NOT,
:RESTORE REGS 0-4.
,EXIT.

\'~::';::.

QUM DEC/XU STANDlRD "'ONITOR
DXQABM,P1t
21-011.'7' 12 i 42
23'78
23'79
2380
2381
2382
2U]
2384
2385
2U6
2387
2388
2319
2390
2391
2392
2393
2394
2395
2396
239'7
2398
2399
2400
2401
2402
2403
2404
2405
2406
240'7
2408
2409
2410
2411
2412
24U
2414

2426
2427
242'
2429

014504
014512

00111

PAGE 83
SEQ

043766
000002

170000

000002

RTTK,I

8IC

'I'70000,2(SP)

IlTI
ROUTIN! TO CALC NEXT RANDOM NUM8Ep, USES A 29 BIT SHIFT REGISTER
ALGORITHM, EXCLUSIVELY OR-ING THE 29TH AND 1ST(LOW ORO!R) BITS
INTO THE 29TH BIT AS I'l' SHIFTS RIGHT. SHIFTS 16 TIMES EACH TIME
MODULES DO A RAND CALL TIi!N JUST REFERENCE RlNNUM
ITS CALLED,
, WHICH IS DEFINED AS GLOBAL IN DDXCOM

,
Ot4514
014520
014524
014530
014534
014536
014540

00446'7
016'700
016'701
012'702
006000
006001
103410

000220
164456
164450
000020

ii14542
014546
014552
014554
014560

042'700
032'700
001412
052'700
000407

010000
002000

014562
014566
0145'72
"14574

052700
032700
001402
042700

010000
002000

ot 4600

005102
001154
010067
010Ui7
004'767
000002

014602
014604
024610
014614
014620

JSR
MOV
"IDV
MOV
ROR
11011
BC!

114,SAV04
RANWRIC,pO
RANNUM,Pt
116.,1'12
111
11

,SAVE THE REGISTEIIS
,GET UPPER 81'1'5
,GET LOWEll OIlDER 16 BITS
,SHIFT t 6 TIMES
,SHIrT PO INTO CAIIRY
,SHIrT CARIIY INTO Rl, 111 INTO CARRY
,FIRST HAL' OF EX-OJ! PIIOCESS

BIC
BIT
BEQ
815
BR

110000,RO
12000,110
2.
11 0000 ,110
2.

,ASSUME OLD BIT 2S WAS ALSO CLEAR
:CHF.CIC THAT ASSUMPTION
,BP I ' pIGHT, ELSE
,PUT BIT IN
,GO SHIP'T AGAIN

BIS
BIT
BrQ
BIC

"0000, FlO
t2000,RO
2.
"0000,lItI

,ASSUME OLD BIT 28 WASN"T ALSO SET
,CHECK TIoIAT ASSUMPTION
,BR IF PIGHT
,ELSE 2 l'S • A ZER[1 BIT

2S i

DEC
BilfE
MDV
MDV
JSR
IITI

112
IIt,OOP
RO, pANWPK
111. RANNUM
PC.FlST04

IDONE 16 TIMES?
IBR IF NO
,SAVE CIlRRENT VALUES

IIAND,i

IILoopi

010000

1643'72
164364
000132

IoIACYlt 27C 1 006)

FlO

n-APR-77

00111

,REi;TORF.: IIEG" S
,prTupN FROM TIIA P C lLL

PAGE 84

,SUBROUTINE TO GET PAGE .PDIIESS FJELD VALVE ('''''P 12 BITS OF ADDRESS)
,CALL VIA,
JSR 115,'1'OPI2S
ADDRESS OF TARLE CONTAtNING L('IIIIER 16 JHTS. TOP
PITS (SHIFTED).
AND SLOT FOP RETUPNED V ~LUl!:
ADDpE/;!';

014622
014624
014626
01 4 630
014632
014/1]4
014636
014640

Q1 4 642

2434
2435
2436

014644
014650
014654
014656
014660
014662
014664

243'7

014666

2438

014670

2430
2431
2432
2433

2]-APR-77

,RETURN TO ICtRN!L MOO!

OAB'" DEC ix 11 SHNDAPD 'IO"ITOP
DXQU"'.Pll
21-.PR-?? 12i42
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425

'UCYll 2'7 ( 1006)

010.,46
012500
1)12046
00",216
006216
006216
006216
006216
n06216
n42716
011660
012016
000316
006216
006216
05261 0
nl2600
000205

176000
000002

TOP12Si MOV
MOV
MOV
ASII
A8P
ASII
ASII
AS II
ASP
BIC
"I0V
1oI0V
SNAS
UR
ASR

SIS
MOV
PTS

R(I,-eSp)
(115)+,110
(RO)+,-(SP)
(SP)
(SP)
esP)
(SP)
(SP)
(SP)
11711000. (SP)
(SP)'2C!'tO)
(RO)+, (SP)
(SP)

esp)

(SP)
(SP)+, (!'to)
(SP)+.Pn
P5

,SAVE THE OLD VALUE 01" RO
:GET THE ADORF.SS ", THE TA8LE-PUT IT IN Rn
,'ETCH THE ADOPESS TO BE ACTEO ON TO THE STACK
,ELIMINATE THI': sIX LOW OR PEP 8ITS. THIs ONE Dpnps BIT,)
,THIS ROTATIO., DROP!'; BITl
,THIS 1I0TATIO" PROPS BIT2
,TillS ROTATrO"l Dllnps lilT)
,'I'HIS POTATIOII OIlOPlI lilT 4
,AtlD THIS ROTA1'IOII! "'ROPS BIT5
,ISOI.ATF. THE 12 HIGH OP!lER lilTS IN THE LOWEP
,SAVE THE U liIGH DRDEP BITS IN 'l'IoIE TABLE'S )PD ENTRY
,'ETC!! TH!': EXTE~~OF:D AODRESS BITS P'paM THE 2'jO E!JTIIY
,MOVE THE BITS TO BIT P!1SITIO~'S 6+7.FtPST. TO 8+9,
,THroN MOVE THEf.4 TO '1 + e
IrINAt.LY ROTATE THEil TO 6 + ?
,ADD THE EXTEND£O ADDPESS BITS '1'0 Tlo1E 3RD E"TRY
,RESTORF. 'I'HE OLD VAt,UE OF RO
I RtTUpN TO TH' CALLING PPnCEtlt)pE

oon

QUM

DEC:lXl1 STAND1IID MONITOII

DXQlIM.Pl1

21-1PR-"

uin

2419

2447

2U8
2U'
2450
2451

2452
2453
2454
245!

2456
2457
2458
245.
2460
2461
2462

2463
2464

00111

PlGE 85

ato 008'7

014672
014614
014676
014700
014;02
014'706

014'710
014'712
014714
014'716
014720
014722
014724
014726

o14no

ot 4'732
n,4734
ot4'736

1110046
010146
005001
013546
012700
006316
006101
005300

TOUS.

000006

Ooll14

MOV
MOV
CLR
MOV
MOV
UL
ROL
DEC
BNE
ASL
ASL

1I0,-(SP)

ili,-CSP)
III
teIl5)+, - (211')
",PO
eSP)
111
110

001Sl0 1

1St.

006301
Ot2635

ASL
MOV
MOV
MOV
MOV

III
Rt
F/l
111
(211')+,
115) +
IH,li(1I5)+
(211')+,111
(SP)+,RO

RT~

I<~

006301
006101

o!oU5
012601
OU600

000205

OlBM DEC/XU STANDAIID MON1 TOR
DXQABM.PI I
21-APR.77 12i42
2465
2466
2467
2468
2469
24'70
24'71
24'72
24'73
2474
2475
2416
2477
)478
2479
,.110

23-1PII-"

,ROUTINE TO GET THE 18 BIT PA rllOM THE 12 SIT UP'
.CALL VIA
R5,T01BS
"2111
lDDIlESS or 12 BITS
I
DEaT ADDIIESS or LOW 16 BITS
I
DEsT ADDIIES! OF SHIFTED El BITS
I

2H~

2441
2442
24U
24"
2U5
2U6

M1C:Yl1 21(1006)

MACYlt 27( 1006)

lie

23-APR-77

0011 I

PAGE 86
SEQ 0098

I SAVE REGS 0-4 SUBROUTINE. CCALL VIA JSR P4,SIV04'
014740
014742
014744
014746
014750

010146
010246
010146
1)10046
010407

5AV04,

1)14752
!l14'7'54
014756
nt4760
01476'
ot 4764

012604
Ot 2600
012601

IIST04,

MOV
MOV
MOV
MOV
MOV

113,-(51')
R2,-CSP)
1I1,-CSP)
110,-(211')
R4,PC

,SAVE R3
,SAVE P2
,SAVE RI
,SAVE PO
,R4 IS ALREADY SAVEll

,RtSTORE PEGS 0-4 SUBROUTINE. CCII!"!" YU JSR PC,RST04)
MClY
MOV
MOY

CSP)+,U
(5p)+,;'0
(Sp)+,Rl

IHa6~2

M"V

t81t,·,1t2

1112601
000204

IIIC1V

lITS

(S1',+,R]
114

f RETUII~I ADD liES!

,RESTeRE RO

,Rl

,1117
IRtSTOP! R4 Tli'JD RtTlJRN

ioASM DEC IX 11 STANDAIID MON~TOII
21-APFI-''7 12142
DXQUI4.Pll

MACYll • ",(06)

2482
014766
(114712
014176
015000
015002
015004

015010
0150t4
01!l020
015026
01!l0H
015040
015042
015044
ot 5046

01 '700
012701
t 05020
005301
001375
012100
010067
010067
012767
01276 '7
012701
105020
005301
001375
0002(17

001006
000lH

027252
164060

164056
030072
030072
001750

QUM DEC/XII STANDARD t.40NtTOR
DXQA8M,Pl1
21-aPR-77 12142
2498
2499
2500
25tH

2502
2503
2504
25n5

2506
2507
2509
2509

2510
25tt
2512
2513
2514
2515
2!516
2!5t 7
2518
2519

2520
2521
2522
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532
2!533
2534
2535
2536
2537
2539
2539

2!540
2!541
2542
2!5U
2544
2!54!
2!546
2547
2!49
2!49

00111

PAGE 87

SEQ COn

,CLEAR VAllIABLES AND OUEUES, AND LOAD TRAP CATCH!;II STr.IITING AT 70

2481
2483
2484
2495
2486
2497
2488
2489
2490
2491
2492
2493
2494
2495
2496
2497

23-APFI-77

164052
164046

CLROUsi MOV
MOV
CLIIS
!Ii
DEC
BNE
MOV
MOV
"'OV
MOV
MOV
MOV
CLRS
Hi
DEC
BNE
RTS

MACYll 27C 1006)

HOOUE,1I0
UKS·IOQUE, Rl
(110)+
Rl

,CLEAR VARHBLES,

11
noo,RO
R('I,IOOI
Ro,I002
nYPEQ, TYPQl
• TyPEO, TYpQ2
UOCL+TYPQL, Rl
(fIO)+
Rl
28
PC

23-APP-77

00 III

,INITULlZE QUEUE POIlJTERS

,SET UP TO CLEAR aUEurs.
,DONE?
,IlR IF NOT.

PAGE 88
sO(,. Iln9(1

,LOAD TPJPCATCHER IN VECTOR AREA
1')15050
015054
0151')60
015064
015070
015072
015074
01'5076
015100
il15104
Ot 5106
015114
015122
015126
01 !132

013746
01]746
012700
012701
010n21
005021
010100
005720
020027
001371
012767
012767
012637
012637
OOn20?

015134

010046
n16600
014000
006300
n62700
020n27
103002
011000
000200
104406
104406
000000
011000
000000

000200
000202
000072
000070

001002
015672
000340
000202
000200

163000
162774

CLRVECi MOV
MOV
MOV
MOV
MOV
lSI
CLR
MOV
TST
CMP
SNE
MOV
MOV
MOV
IolOV
RTS

tu200,-(SP)
U202,-(SP)
"2,110
170,Rl
110, (Rt)+
(Rl )+
1I1,RO
(RO)+
FIO,U002

,FILL VECTOR AREA WITW .+2
:ANO HALT.

:FILLED UP?
,SII IF NOT.
JPAREIIR, PARVCT
:RESTOIIl'.: PAIlITY VECTOR
'PRTY7, PAPVCT+2 ,AND THE PRlORTY

(SP)+'~'202

(Sp)+,11'200
PC

,PIIESF.IIVE
LP VECTrJR
,VESt EXIT,

,TRAP INTEPPIIETER ROUTINE.
Ot5136
015142
015144
01!5146
015152
015156
0l!H60
015162
I'll !l164
015170
015174
01!1t 76
015176
01!1176
01!lOO
015200
015202
015202
Ot!204
01!5204
01!206
015206

00!5736
006376
006232
006232
006156

01!5210
015210
Ot!212
Ot!l212
01!l214
015214

2!50

QU216
Q1!I216

25!51
2552
2553

Ot!l220
015220
01!l222

0061!56

006244
006366
0061!56
006232

000002
004176

015246

023 I) <HI
023746

RI),·(SP)
TRPINTi MOV
,PUSH RO,
HOV
2(SP),RO
,GET TRAP PC,
MOY
-(RO) ,RO
,GET TRAP CALL.
ASL
RO
,MULTIPLY BY 'l.
ADD
• TRPTAS-TRP2, 1'0 :rORM TABLE ADDRESS
CMP
1I0,UIIPLIM
,WITHIN LIMITS?
BHIS
1$
:SR IF NO'!'.
HOV
,GET ROUTINF ADDRESS
~RO,RO
RTS
,GO TO ROUTINE, RFSTOIIE RI'l.
Po
1$,
fo'SGS,INVTRP
,ERROR INVALID TRAP CALL. CRASH SYSTE'" •
, 'HALT'
MSG',HLT
HALT
TRP2.11000
TRAPXaO
TRPTABi
TRPDEr EXITS, EXIT.
, POINTEI'! FOP TRAP CALL EXITS
EXIT.
TRPPEF QUE.,QUE.
, POINTER rOR TRAP CUI. QUf:$
~UE.
TRPPE' ENDPS.,TYPO.
,POINTER FOR TRAp CALL ENDPSS
TYPO.
TIIPDEF ENDS,TYPQ.
: POINTEII rOR TRAP CALL ENDS
TYPO.
TRPDE' ERIIOR" TYPQ2 •
,POINTEII FOil TRAP CALL EPROII'
TYPQ2.
TIIPDE' DATEIII, TYPQ2.
, POINTER rOR TRAP ClLL DATERS
TYP02.
TIIPPEr MSG$, TYPQ1.
, POINTER FOR TRlP CALL MSG8
TYPQ1.
TRPD!" BREAK" LDIIRK.
,POINTEII FOil TFIAP CALL BRUIeS
LDBFlK.
TFlPDEr ERIINS, TYPQ2.
, POINTER rOR TRAP CALL ERRNG
TYP02.
TRPDE,. MSGNS, TYPQ.
,POINTEP ,"op TRAP CALL MSGN,
TYPQ.
TIIPDEr GWBUF$, GWBU'.

OABM DEC/XI1 STANDARD MONITOP
DXOABM.Pl1
21-.lPR-" 12142
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566
2567
2569
2569
2570
2571
2572
25H

015222
015224
015224
015226
015226
0152)0
015230
015232
015232
015234
015234
015236
015236
015240
!)15240
015242
015242
015244
015244
015246

MACYI1 2?CI006)

021272
007636
021426
006232
007626
014'514
n06056
006010
0145/)4

~ACYll

,POINTER FOR TRAP CALL GWBUrs
GETPA', GETPA.
,PO!NTER FOF TRAP CALL GETPA.
CDATA" CDlTA.
,POINTER fOR TRAP

MSGSS,TypQ.
:POHjTE~

2599
261)0
2601

2602
2603
26M
2(1)5
2606
2607

2608
2609
2flt 0
2611
2612
2613

2614
2615
2616
2617
2618
2619
2620

2621
2622
262]

2624

CJLL MSGS$

, POYNTER rOR TRAP CALL DATCK,
RANO$, RAND.
I POINTER FOR TRAP CALL RANDS

DERRXS, TypOl.
,pOtNTEII rOR TRAP CALL OERRXS
MSGDS, TYP04.
IpOIN'I'EP FOil TIIAP CALL MSGOS
RTTIC, , RTTIf ,
:POINTER FOR TRAP CALL RTTKs

27Cl006'

')-APR-77

00111

PAGE 90

015246
015252
(lIS254
015262
(115266
0152'72
015274

012746
01l041]
04"]7
t 1'\4406
104406
000000
0007",

000004
01)0001

177572

0241')50
023746

Bl!SEIIIII MOV
#4,-(51')
BP
IIESIA
KTF:PRI
SIC
."USSRO
I4SGS,ICTP'ATL
MSG!, HLT
HALT
RP
.-2

25~6

25 Q 8

rOR 'I' RAP

DATCKs,OATCK.

,{flarCATE FlUS EPROR TRAP,
I TURN OFF ICT!!

,'KI11 ~BORT • FATAl'
,'HALT'

,I(T 11 l\;lO FlT- P'A TAt O:RIIOP
KTI t SSRO TO DI':TEIIMINE
'~r aNn PIG!: R~.. !t~!f('rn

I EXAMINE

2.58"7
25F!8
2599

259'
2593
iSH
2595
2596
2597

COATAS

,POINTER FOR TIUp CUt MAP22.

SEQ 0092

2577
2578

2590
2591

C~LL

MAP22., MAPZ2.

,BUS ER~O~ AND IIESE~VED INSTRUCTION TRAil POUTINES
,CHECK MonE BITS OF' PSW ON STACIC CMAYBE USER IF K111 IN USE)
,OIlOEII OF' lRGUMENTSI VIRTUAL PC ON STACK, PSW ON S'I'~CK, STACK POINTEP
IAFTER TP~P, VIRTUAL ADDRESS TRAPPEO '1'0

2575
2576

25A2

PAGE 89

TRpL!MI

2574

2583
2594
2585

00111

SEQ 00«11
GWBur.
TRpoe:r
GETp,,-.
TRPDEr
COATA.
TRPoe:r
MAP22.
TRPDEr
TYPO.
TRpOEr
DATCK.
TRPDEr
RAND.
TRpOE'
TYP03.
TIIpOe:,
TYP04.
TRpDEr
II'1'TK,

021150

OABM DEC/leU STANDARD 140NtTOII
DXQAB".PH
21-A,1I;l-77 12142

2579
2580
2581

23-APR-77

0152'76
(115]02
n 15 ]04
015]06

015]64
015]70
015]74
(115400
015406
015412
015416
015420
OU422
015424

012746
(100240
010605
01,706
oI 2~ 46
010546
0\6546
nl1546
(l12706
M4767
004767
004767
I n5267
105767
001005
105767
001402
004767
012706
005067
112167
1 (14406
012705
004715
00471 'I
004715
004715

015426
015431
015440
015442
015446
015452
il1545~

n12706
112'767
001404
11)4406
004767
104406
n004]5

O\i)312

nl'1314
015316
01 '1]22
015)24
015330
015334
015]40
015H4
015350
O! 5 35 4
015]56

015362

000010

PESltJT: MOV
RESIAI
NOp
MeW
MOV
MOV
"'OV
MOV
II0V
MOV
JSR
JSR
JSR

00000'

027212
002152

002774
1.71640
163714
163751

I~CS

TST!!

163722
004104
027242
163460

onnoni

181

023420
000360
022737

Sp,RS
.SpSPEC,Sp
CFl5)+,-CSPI
1'15,-(51"
2CR5),-CSp)
(115) ,-CSp)
'SPBOT,SP
PC, SAVLOG
PC,CLKOFJI'
PC,CTRLX
SYSCNT
MOvING

!PIE

'!'STP
BEO
JSR
MOV
CLR

KTPIIES

153700

211

OF ABOPT,
~.':'D1>.ESS

,SAVE THE STlICI< POINTER,
,PUT INFORMAtiON INTO SPECIAL MONITOR STACK
: PUSH T~)):' VECTOR orl STACK
,DUSH STACK POINTF.:R ON STACK
:PUSH THE PSW O~I STACK
,PUSH THE PC ON STACK
,RESTORE '-'ONITOR STACK pOIl'TER

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

,GO SAVE 11/60 LOG
I TUlIN OrF CLOCK AND SAVE STlTUS
:CLEAR QUEUES, CLEAN UP, MAP TO BANKS 0+1
: COllNT A SYSTEM E~ROR

1$
PC, "'VCOOE
'Sl'SPEC-IO,SP

IORno

140119
II. SRAKE
MSG" SYSEPR
MOV
• ITOA, 115
JSR
PC, (1'15)
JSR
PC, C1l5)
JSR
PC, (R5)
JSR
PC, CR5)

163400;

023601
013426

"27212
000002

"0,-CSp)

TYp~

,1;XlM!N! ICTII SSP, TO D'"TtRMINE VTRTUAl
: OF ItJSTRUCTrON WHICH ABOIIT!O
,INDICATE RF.SERVED INSTPUCTION TRAP.

MOV
• Sp80T, SP
BITB
tBIT1,PPRES
BEQ
21
MSGS, SUER 1
JSR
PC. pAMSGI
14SGt,DOT
BR
PWRUA

,MAP BACK TO CURRENT copy
ISET lip THE SPECIAL STACK POH'T!:R
,ALLOW TYPING
,PREVENT MODULE STARTUP DURING MESSAGE
,TYPE SYS r.RROR rAILURE,
I TYPE ERR PC,
I TYPE !!:IIR pSW,
I TYPE 51' 1<rrER ERIIOR

,TYPE TRA D VECTOR ADORE:SS
,R!STORE MONITOR STACt( POINTER

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

,IS I TAN 11/60 ?
,NO, CONTINUe:
,YES, TELL WHAT LOG REGS, ARE PRINTED
,GO 'INISH UP M!!:SSAGE
,TYPE CRLF AND DOT
,ATTEMPT TO CONTINUE

OUM DEC/lIU II'I'A"DARO JoIONJ'I'Ol'
DXOUM,PII
21-01'-"'1 12.42
2125
2126
2127

2628
2629
2630

26)1

26]2
2633
2634
2635
2636
261'7
2611
2639
2640
2641
2642
2643
2644
264!
2646
264'7
2648
2649
2650
21i51
'6!12
2653
2&54
2655
2656
26'57
2659
21159
2660
2661
21162
2663

00.11

PAGE 91
nQ (109)

,POIIER DOWN AND POWER UP ROUTINES.
O,H60
OHl464
0154'70
0154'72
Ot!l416
OHl504
015506
OU514
oHlno
OU!I24
015!1l0
OUSl4
015540
015546
015552
0155!2
OU5!6
01!1!160
fit 5566
015572
015600

015604
015612
Ot!lU4

015&20
015&24
Ot!l&12
015634
1115642
015642

015644
"15650
0151154
01'5660
01'5662
1115666
015670

011416.,
10516.,
001402
0050n
OU'767
000000
012"/6'7

012'706
00526'7
10506'7

00"'''

0050117
112'"
104406

PWRDN,

0026!0
163614
1'7'711'72
OU506
OHl460
02'7212

162)20

1Ii

162310

PIIIIUP,

u!!In

1635'76
1'71450
163320
000001
023702

UU4!

"SF!

Pc,CLKorr
TaT8
ICTPIIES
BEQ
11
Ct.R
_nSRD
• PWRUP, PWRrv
"'OV
IIAL'1'
MOV
• PWRDN, FWllrv
/oIOV
npeOT,u
INe
PWIICNT
eLRS
RUNRrL
JSR
PC,eTRLX
CLR
IOal<ID
Mova
_1,IIRAKE
M5GS,PWRP'AI

,TUIIN or, CLOCI( _ND SAV! STATUS
,I<T11 IN US! .,
,NO, CONTINUE
,YU, TURN IT orr
I s n UP POWER UP VECTOR.
,POWER DOWN HUT
,SET UP POWEI' DOWN VECTOR.
,IIESET STACK.
, eOUNT A POWER P'A II.
',eLEARRESUM! RU'" rLAG
,CLEAR QUEUES !ND I'lITIALJZE KTll IF IN
,ALLOW TYPING
,PR!!:VENT MODULE aT ARTUP
I nPE POWF.R P'IIILURE MESSAGE.

TSTB
KTPPES
BEQ
11
BIC
.1, . . SSRO
MOV8
SYsCHT,1I1
BIS
'''U5SRO
MOVB
111, nBCHT
CMPB
BYBLIM, nSCHT
BHI
2.
",SG., SYBBAD
JMP
CTRLCA
BITB
tBIT1,PPRES
8!Q
U
MOV
UOOO01,LGHOLD
WIIITE
IIl'lWHMI, WTWKMl
MOV
1I0,-(SP)
MED,IIDWH"I
BIS
LGHOLD,1I0
"'ED,WTWHMt
(SP)+,1I0
MOV
TST8
II"ODE
eNf
LOr.ICA
flP
CHNOUT

,KTll IN liSE ?
,NO, CO"'TtNUE
,YES, BAeK TO LOW UHK
,SA VP': THE SYSTE .. ERROR COUNT
,BACK TO HIGIiER BANK
,PUT BYS ERA COUNT IN TillS MEMOIIY SANI<
IREACHED TH! SYS. ERR. LIMIT ?
,NO, CONTINUE
,"EXERCISE ABnPTtD"
,CTPL C ANIl KILL THE UERCIS!
, IS THIS A" 11/60 ?
rHO, CONTINUE
IYES, LOAD EIIROR LOG tHABLED BIT
: WPITE w!oIAI'I PEGISTF.II
,SAVE IIEG. 0
,SAVE
IPE~TOIIF PEG. 0
I WERE WE IN IIUN MOOI':?
: BII I ' YES TO RESTART.
''''0, COI/TINUE

23-APR-77

un.

PWRUAI
111516'7
001412
042'737
1167111

05273'7
1111167
126167
101004
104406
000167
132767
001413
012767
010"46
11'76600
056700

163526
000001
1634'72
000001

1'7'75'72
1775'72

163460
163!140

163452

02414!1
171220
000002

163506

2.i

1"0001

163&32

076600

000022
163620
n00222

012600
1(15767

153423

3' i

(lOI12~

000505

CAB'" DEClXt I STA~OAPD '~ONTTOR
DXQAB".PII
21-APII-n 12142
2664
2665
2666
2667
2668
2669
2670
'1171
2672
2673
2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2611"1
2689
2689
2690
2691
2692
2693

:n-APR-,.,

"'ACYll 2Hl00"

".CY11 27(1006'

IIO! 11

P~GE

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

BE!') Ml94
,PARITY ERIIOR TRAP HANDLER ROUTtNE

015672

015674
015700
01570/\
111571 0

0226:<6
004767
I J 27 6 7
001002

163432

PARrIlP: CI'P
JSII
BITB
BI/E
U!
HALT

000002

163416

21.

oeoooo

0'5712

000711i

0'5714
IIt5722
015724
015730
01 '57 34

132767
001405
104406
004767
000706

015736
015742
015744
015750
015752
015754
015756
015762
015764

012700
110"1(101
005770
100407
005720
005201
126701
(11)3]65
11000011

015766

01)('17'76

0\5'70

004167
000666

015774

~oconi

OOH14

IIR

0'5427
000076

001430

311

nooooo

41,

163357

5'1

OOO~O~

68i

(SP)+, (SP)+
PC,CLKOP'Y
eBnO,PPPES

,.
IS

BITII
HHT1,PPIIES
BEQ
3t
MSGS,PERR2
JSIl
PC,PAMSGI
811
PWRUA
Mav
CLR
TST
BMI
TST
INC
CMPB
IIGT
HALT

'PAPUB,1l1'!

,POP THE SUCK POINTER TWICE
''''AKE SUIIE SYSTII;M CLOCK IS (IF"
I IS PARITY PRESENT/ENABLED
,YES, CONTI"'U~
:NO PAIlIn RUT TRAPPED ANYWAY
: PUN PARITY DIAGNOSTICS
,KEEP HJLTlNG If' HE HITS CONTINUE
,IS IT AN 11/60 ?
,NO, CONTINUE
"PARITY ERROII"
,GO FINISH PARITY EIlROP MESSAGE
I ATTEMPT TO KEEP GOING

**".""*.""""."."*.",,.,,",,•• ,, •••

liP

IGET ADDRESS 0" P,ARTTY ADDPESSES
,ZERO THe: REGISTER COUNTER
:[PROII BIT SET?
:YES, GO REPORT IT
,STEP TO THE NEXT RE'GISTER ADDRESS
: STEP THE REGISTEP COUNTEII
I ALL PEGISTF.:RS CHECKED ?
,>.10, CONTJ'!IIE
1 YES, TRAPPED BUT NO EPRORS SET
,RUN PAIIITY DIAGNOSTICS
,KEEP HALTING IF HE HITS CO'lTlNUE

JSR
BII

PC, PA"51,;
PWPUA

:GO PPI"'T PAIlITY ERROP MESSAGI':
,ATTEMPT TO KEEP GOnG

(I(P(I)
61
(PO,.
RI
CNU ,PI
3S

QA8N DECixl1 S'rlNDARD MONITOIt
DXQAlM.Ptl
21-APR-n uiu

IIACYll 27(1006)

2703
2'704
2705
2706
270'
2708
2709
27tO
2711
2712
2713
2714

27U
2716

~A~!T'!

015776
016000
016004
016010
016012
016016
0{6022
016024
016030

011046
012746
0045&7
025350
01'7046
004567
025357
104406
000207

016012
016036

004767
012702
012701
012246
004567
025675
012746

016042
016046
016050
016054
016056
016062
016066

004767

PAMSGi
000060
176142
000000
176116
025]]0

176064
025675
t '71300

005301

Ot 60'2
Ot6076
016102

012746
004767
000207

022772
171264

QA814 DEClXt' STANDARD MONITOR
DXQAB".Pl t
21-APR-" 12142
2722
'2723
2724
2'725
2726
2727
2728
2729

27)0
2711
2732
2733
27]4

.,,,,,
2'7]6
271'
27]9
2739
2740
'2741
2742
2"3
2744
2745
2746
2747
27411
2749
2750
2751
2752
2753
2754
2755
2756
2757
2758

MACYll 27(1006)

:'O':'~ESS

0[1' ':'HE P'U"tNG

!S I!'! DI\

R!GI!T!~

,GET ADDRESS or FAILING PARITY IIEG.
,LOAD THE EA BITS
,CONVERT IT TO OCTAL ASCII
,PUT IT INTO LOC. PREG
,GET CONTENTS or rAILING PARITY REG.
,CONVERT IT TO OCTAL ASCII
,PUT IT INTO LOC. PCONT
,"PARITY ERROR -- RUN PARITY DIAG."
,RETURN

MOV
CRol,-CSP)
MOV
'60,-CSP)
JSR
R5,OACNVX
PREG
MOV
I(RO),-CSP)
JSR
R5,OACNV
PCONT
MSG"PERRI
PTS
PC

IHOLD6,-(SP)

,SAVE ERROR LOG IN Burr!!:R
•••••••••••••••••••
,GET ADR. or SERVICE REGISTER CiOO*2)
,SET THE COUNTER
,PUT COMUNTS or LOG REG. ON STACK
,CONV!!:RT IT TO OCTAL
r ANI) PUT IT H!!:RE
,PUT IT ON THE STACIC

J5R

PC.T!P!

:lNO T!P! !T

DEC
!HIE
MOV
JSR
RTS

Rl
is
IACRLP',-CSP)
PC,TYPE
PC

rALL DONE?
sfi'O. CONTINUE
A CR AND LF ON THE STACK
,AND TYPE IT
,RETURN

PUSGSI JSR
MOV
MOV
ui
MOV
JSR
HOLD6
MOV

001450
031622
000010

n1$~"('

27"
2'19
2720
2721

PAGE 93
SEQ 0095

':VllJ;;;J

2701
2'702

00111

,PARITY ERROR MESSAGE ROUTINE, ASS;':"!:.!' 't(olA'I' THE

2694
2696
2697
2698
2699
2'700

23-APR-'77

PC,SAVLOG
IILOGBUP'.200, R2
UO,Rl
CR2)·,-(SP)
R5,OACNV

21-APR-77

00.11

I PUT

PAGE 94
SEQ 0096

, ROUTINE TO EXIT TO CHAIN MONITOR, OR PETURN TO KYBD RTN.
,PROGRA" SHOULD AtWAYS BE IN BANK 0 BY HERE
016104
016110
016112
016116
016122
1116124
016110
016134
IH6136
016144
lT16t50
016152
016156
OH'160
016166
016174
Ot6,00
016204
016212
016220
016224
016226
016234
016236
016242
016250
016256
ot6262
016266
0162'2
016274
016300

10576'
1004112
000167
105767
001402
01150]7
016700
004710
000240

CHNOUTi TST8

163202

81011

105267

16311]

11>5'267
012767
016767
105767
001420
032737
001005
004767
012737

tUUI
000001
163054
163060

163100
163064

000001

t 7'7572

1'1)552
000001

177572

JMP
TST8
lSI
SEQ
CLR
MOV
21i
JSP
LOGICI
.WORD
LOGICAl TST8
I!l't.
T!T!.I
SEQ
MOV
'"'OV
INCB
laIC8
HOV
411
MOV
TSTB
3. i
8EQ
8IT
ui
BNE
JSP
MOV

016767
004767
004'67
105767
001402
000167
000167

162766
003212
002130
163020

162766

2&.

105767
to"0073
105'16'
001412
016'767
0\6767

172530
163162
177572
161 '06
000240
163142

01\0240

Ul114
163110
163102

163234
172630

*•••••

163040

163044

5 ..

611

MOV
JSR
JSR
TSTB
8EQ
JMP
JMP

CHN
11
COMCON
KTPl'IF.S

,IN CHAIN '"'ODE?
,BR IF YES.
,BACK TO KYSD SERVICE.

,BRANCH IF NO KTll
,TURN OFF II. T11

!lUlSIIO
42,PO
PC, (RO)
NOP,NOP,NOP
CHN

!I
KTSAV

48
HCP12A,HCOR12
HCIH2A,orrMX
ROTI
RELOt
11 ,CH'"
KTSAV, KTPPES
KTpRES
5'
fi,II.SSRO
21
PC,ftTINIT
U,ItSSRO

orrSET,OrP'STD
PC. MVCOOE
PC.CLJ(ON
CHN

51
STAIIT
RUNRES

,RETURN TO "'ONITOR.
: IN CHAtN "ODE?
,,,.,, U' NO
IY!!:S, !(T RtALLY PRESENT?
,SR Ir NOT
! SET REAL "'EfoIOIIY SIZE
,TOP ALLOWABLE PROGRAM OFrSET
,ALLOW wBurr ROTATION
,ALT,OW COOt RELOCITrON
,ONLY RETIRN TO CHAIN MONITOR ONCE
,TELL TH!!: TRUTH
:!(Tl1 ALREADY ON?
,YES-SUP REINITIALLlZING

,TUIIN CLOCK ON

QUM DEC/XII STANDAflD MONITOII
21-.,PII-71 12i42
DXOUM .Pl!
2759
2760
2761
2762
276]
2764
2765
2766
2767
2769
2769
2770
2771
2772

7773
2714
2775
2776
2777
2778
2779
2790
2791
2782
2793
2794
2795
2786
2787
2789
2799
2790
2791
2792
2793
2794
2795
2796
2797
2799
2799
2800
2801

2802
2903
2804
2905
2806
2807
2809
2909
2810
2911
29 t 2
2813
2914

23-APR-"

00.11

PAGE 95
SEQ 0097

,SUBIIOUTINE TO POTUE WRITE BUFFEIIS IF' 110'1'1 It,(DIC~TOR .1.
016104
016]10
016312
016]16
016]20
016324
016326
016332
016334
!l1 6 ]40
016]42
016)46
016)54
016]60
016362
016)66
916370
016374
016376
016402
016406
016412
016414
016420
016422
016426
016430
016436
016444
o 164!10
016456
016460
016466
016474
(116476
016500
016506
01651!l
016514
016516
016522
016524
016530
1'116532
016536
016540
016544
016552
1116554
016562
016'564
016572
016576
016600

105767
001557
10!!767
100016
105767
001013
005367
003146
105767
001002
10!!267
IIt6767
10!!767
001133
105767
100530
105767
100525
016746
042716
022726
001016
105767
001403
105367
001t10
116767
116767
11)5167
1126767
101453
06276 7
(126767
1.03427
1100400
026727
103403
004767
000455
105767
001426
105767
001023
105767
001002
105267
162767
000436
1162767
tll3001
062767
004767
000424
004767

163003
162776
163003
162764
163012
162456
162746
162444

016604

000421

016606
0166t4
016622
OU624
016626
016634
016616
016644
016650

062767
1126767
103401
000734
062767
103003
062767
004767
000207

162142

162726
162425
162630
160000
016000
162401
162706
162363
1152670

162366
162367
162353
162562

162564

000020
162544

162550
162532

162536

000400

000136
162573
162!!77
162614
162260
000020

ROTBUF; TBT8
8EQ
TSTII
BPI.
TSTS
BNE
DEC
BGT
TSTB
BNE
INCB
foIOV
1081
TaTB
itl
BNE
TSTS
B"'I
TSTB
BMI
MOV
BIC
CMP
BGT
TST8
BEQ
DECf.\
aNE
MOVB
281
Mova
COMB
CMP
lSI
SLOS
ADD
CMP
BLO
BR
CMP
ui
BLO
JSR
BR
ROTBII
TSTP
BEQ
TSTR
BNE
TSTB
BNE

INca

162464

iSl

0112000

162450

POTB21

000020
173130

162442

til
1I0TB31

173040

QABM DEC IXll STANDAIID "lONITOIl
21-APR-77 , 2.42
DXQABM. lit t
2815
2916
2817
2819
2819
2820
2921
2922
2823
2824
2825

MACYlI 27(1006)

"ACYll

27(100~)

SUB
BII
ADD
BCC
ADO
JSII
5P
JSII

162422
162420

002000

162376

000020
01)0(116

162370

18
LOCK

18
1I0TCNT
POTXT
NSTOP
108
STOP
POTNUM. ROTC NT
STOP
POTU
POTL
POTXT
MDXCTR
POTXT
WflUF,-CSP)
1160000, (SP)
tI6000, (SP)+

3S
MDXCTP

28
eGWBFC
1I0TXT
MOXCNT, "'DXCTR
ROTCT, SGWBFC
wBFLG
WSUF'12,OHSET
ROTLOI
'20,W8UP'12
WBUP'12, HCORl2
ROT"'2
4$
OP'f'SET,uOO
1I0TBI
PC ,POTLOW
ROTXT
RF.LOC
ROTB3
LOCK
POTp3
NSTOP

18
STOP
'20,W8UF'12
1I0TXT
nooo,WAUr.'
18
.20, WBP'F.A
PC,SETlo/AI
ROTXT
PC, SETWBF

23-APR-77

00111

,IIOTATION ALLOWED?
,8R IP' NOT.
,IS ROTATION LOCKF.D
,NO. CONtiNUE
,YES, IS THE PROGIIAM LOCKED
,YES. DON'T SET S'1'OP
,NO, TI"'! TO RnOCATE
:NO. CONTINUE
,ALLOW STOP TO SET .,
,NO, CONTINUE
I YES, SET THE STOP F'LAG
,RF.STOIIE TIIF. COUNTEP
,IF STOP IS SET. DON'T POnTE
I ROTATE LOCKED?
,8P If' YES
: IP' COUNTER NOT INITIALIZED, DON'T POTA"E
:CHECK CUPIIENT VALUE
,IP' NOT LAST IN B~NK, BIIAt,(CIi
: HAVE ALL MODULES USED • VALUE IN THIS BANK?
,YES- TI"'E TO CHAt.lGe: BANKS
,NO, DEC TtM£OUT COUNTER
,EXIT UNLESS TI~EOUT HAS OCCURRED
: RESET COIINTERS
,TOGGLE It,(DIC aT!j1l
:LOCOPE P01ATIO"l?
:YES- BIIANCH
,CHECK POR TOP OP' WPITE BUFFER AREA
,IP' NOT, BIIANCH
,If' OVER, START AGAIN
,POTATE THIIU "lEMOPY snow PROGRAM IF ENOUGH POOM
,NOT ENOUGH POO'~
,SETUP TO ROTA TO: !\E:I,OW PROGRAM
:PETURN
:RELOCATION ALLOwFD?
,NO- BRANCH
,LOCKED?
I YES- BPANCH
: ALLOW STOP TO SET
:NO, CONTINUE
,YES, SET STOP
,RESTORE WSUf'
:EXlT
,BUMP ADDII- POt'lT 5' 2 W"ROS HIGHER
:CALCULATI'; IoIxwSP'

PAGE 96
S,'l

BII
000020
162416

ROTI
ROTXT
PO'1'L

IlOTLOI i AeD
C"'P
IILO
!IF!
~DO
1I0TB41
BCC
ADD
JSII
i ai
ROTXTI
1<TS

ROTXT

,PETUP'!

.20,loI8UP'12
lo/EllJF'12,Of'F'SET
1I0'l'!!4
1I0T81
t2000,WElllF
IS
'20, WAn:,.
PC,ROTLWI
PC

:01<- USE IT
:NO- RF-LOCATE OJ.! SHRT waUF CYCLE OVER
: /lDV,II NCE TilE WRITE RUFFEII
,IF' NO CARRY PO'~'T ADJUST THE EA BITS
,CUllY SET, ADJUST TIiE I';A BITS
:TAKE CAPE OF' P1)TAT1NG BELOW THE PRnGRA'"
lRETURN

OOq~

QUM DEC/XII STANDARD MONITOR
DXQABM.P11
21-lPP.-" 12iu
2826
2827
2828
2829
2830

2831

0(1506'
005067
00506i
016767
166767
006367
006367
006367
00636'
006367
10]/l01
012767
11002(17

295(1

o1675i

295 1
2852
2853

016756
OJ 6762
016766
016770
016774
017000
017004
0171)10
1'J17(112
0171'J14
017016
017024
017026
017034
017040
017044

105767
001406
104406
104406
105067
i 115767
1'J01430
11'J4406
016746
1)04767
004567
001226
001132
001134
162767
11'J3003
162767
016746
016746
004767

0170'50

000207

2860
2861
2962
2863
2964
2865
2866
2867
2869

016'716
016722
/l16726
016'730
0167]6

162354
162352
162350
162350
162336
1623!10
162344
162340
162334
162330
177777

SEQ 0099

ROTLowi CLR
CLII

eLI!
162362
162354

162320

1I0TL W11 MOV
SUB
,\SL
lSI.
lSI.
ASL
ASL
SCC
MOV
FITS
1'1

\IIBUP'
IIBP'EA
WRU"12
OP'P'SET, ",xwBP'
WBUP' 12 , "!XWBP'
MXWBP'
MXWBP'
MXWBr
MXwBP'
MXWBr

11
"77777,MXWIIP'
PC

162171

1I0TC!llCi T5T8

026344
023724
162153
162125

,RUUI1N

181

024505
162220
174422
175662

000002

Hi2101;

000020
162072
162070
174266

162100

j ,,~!y

"'!M£Rf

BEQ
18
MSG" "'E:RR!
MSGS, MEIolCHG
CLIIB
MEMF!'''
TSTe
POTI
BEQ
2.
MSG$, ROTENA
MOV
LOCOPE,-CSP)
JSR
PC,ITOA
JSII
R5,rOI8S
HCOP12
SAVLO
SAVHI
a2,SAVJ.,0
SUB
3$
SUB
.20,SAVHI
MOV
SAVLO,-CSP)
MOV
.s~VHl,-CSPl
JSR
PC, tTOAX

2A93
2984
2995
2896

2881

1J17ln

2RB9

017136

01 ~7(1)
006200
006200
01)6200
006200
0(,16200
010046
"04'567
11,0;667
0127(1)
122720

28 I

RTS

MACYII 27CI006)

,II0TATE ENABLED?
,SP III' NOT,
,TYPF.: LOWER LIM!'!'.
,CONVERT UPPER 1.1"'11'

,'TYPE UPPER LTMTT

'B-I\PR-77

SYSIZ,

'"'0 If

ASR
ASP
~SR

175274

n''5667

iSl

000060

024465
025667
0245 0 ~

€~F'n~s?

,EXIT,

001'1

PAI;E 98
SEQ 0100

162150

oono411

TO TYPE

acc

lSI

.,"trmlf
112760
000771
11')4406
11'\4406
104406
(100201

~EMtH:tY

~NO

I NO- BRANCIi

ITHIS ROUTtNE PRINTS OUT THE
01 7 052
(117056
017060
017062
011064
017066
017071)
017072
017076
1'17100
Olil04
1'tt11111'
nl" I l '
017 t 20
01 7 1(2
017126

,,"'2

PAGE 9'7

I SUBROUTINE TO CHECK IF BUP'rEII ROTATION ENABLED,
,THE ROTATION RANGE.

OABM
DECIXII STANDARO 140NtTOR
DXQABIoI,Pll
21.~PIl-77 12142
'869
297(1
2871
2872
2873
2974
2875
2976
2977
2978
2879
2980
2991

00111

BrNE!TII THF. P!'!OGPA'"
016652
016656
016662
016666
0166'74
016'702
016706
1116'712

(116740
016744
016;46

2855
2856
2857
2858
2959

:U-APII-7'7

I THIS MUTINE WILL HAtlDLE TME SITUATION liMEN THE WRITE BU"rElI IS ROTATING

2832
2833
2834
2835
2836
28]7
2838
2839
2840
2841
2942
2943
21144
2845
2846
2847
2848
2849

211!!4

MACYll 2'7( 1006)

!"n~"

2$,

liSP
ASR
110V
JSP
HOLDS
MDV
CMPR
BNT'

HCOP12,PO
PO
RO
PO
RO
RO
flO,· CSPl
P5.ADC~!V

I Hot.05.):<11
'60, (PO)+

I.InVl!

'4n,-1 CPO)

SFI

~SGS, SYSSIZ
MSG$, HOLD!';
IISG$,KAY
IITS
PC'

SYSTI';1~

IoI"MflRY SIZF. f'I DECIY,AL,

,GET THI" MEMORY SIZE
:CONVEPT rPQM BYTF. ~IZE TO K WORD SIZE

, PUT IT o~, THE snn.
,COMVI::RT TO DP:CI'4AJ., ASCII CIHRACTl':PS
,liND PUT THE:~ HERE
,GI':T rli;;; LOCPI'HJ OF' THF'. ASC 11 NUMBER
,IS IT l\ LEADIIJr, O?
:~D,

(,O~TINn:

,YES, FILL IT ~ IT;'; ;" SL4NK
,CHECl( THE NEXT CHIiFl!CTE:1'l
," SYSTE·"1 STZE I ·
I TYPE T'!E SYSTF'A sat.

: "K"

; p~TUP~J

OAiM DEC/XU I'UNDAllt) MONUOI'
DXOUM.PII
21-lPIt-n 12142

MlCYl1 2'7(1006)

2906
2907
2908
2909
29fO
2911

2912

PAGE 99
no 0101

THIS IIOUTINE WILL PRINT THE NUMBEII 0 .. SV&T!'" ERIIORS
,rQUND IN COUNTER IYSCNT.
PC,SYSNUM
CALL VUI
JSR

017140
011142
01'7144
017150
017154
017156

010046
010146
016746
004567

SYSNUMi MOV
MOV
MOV
JSR
HOLDS
MOV

162114

175216

025667
012701

000004

OABM DEC/XII STA~DAlln 1.10NITOII
DXOUM.PII
21-APQ-77 12142
2998
2899
2900
2901
2902
2903
2904
2905

ooiu

2889
2890
2891
2892
2893
2894
2895
2896
289'7

U-lPR-n

017162

012700

025667

017 t 66
017172
017174
1117202

127720
001005
112760
01)5301

000060

ilt '204

OOD10

01 '206
017212

1114406

025531

104406

025667

O1'2t6
0\'7220
017222

01260t
012600
0002(17

o~on40

MACYll 27C 1 006'

IIO,-(SP)
Rl,-CSP)
IYSCNT,-(SPl
RS,BDCNV
'4,Rl

23-APP-17

0011 1

,SAVE REG.
,SAVE REG. 1
,PUT snU14 ERROR COUNT ON STACK
,CONVEFIT IT TO DECIMAL ASCII CHARS.
,AND PUT THEM Hr.IIE
,LOIID THE COUNTElI

PAGE 100

SE'J

111
177777

2',

MOV

tHOLD5,PO

,GET lOR OF THE lisen IlUMPER

eMPs
BNE
MOYl'!

160. (PO)+
2.
140,-1 (POl

DEC

I II IT 1\ [.EIIOING ZEPO
,NO, CO~TINlIE
,YI!:S, REPLACE 1 T WITH A IlLAIIII(
,IILL nOIllE ?

8N!

MSG', NU"'IYI
MSGS,HOLD5
140Y
MOY
RTS

(SPH,Rl
(SP)+.RO
PC

,,~O,

CHECK MOPE CHAPACTEPS

,. SVITE'" ERRO':'S ,"
,TYPE THE NlIl.!BEo
,RESTORE PEG. 1
,P!STORr:: REr., (\
,RF.:TUPN

I) 1 ~2

QASM DEC/Xii SU~DARD MONITOR
21-ApR-" 12142
DXQlBM .1'11

MACYl1 27(1006)

PAGE 101

RO,-(Sp)
Rl,-eSp)
pWRCNT,"CSP)
R5,BOCNV

000004
025667

pWRNUMI MOV
MOV
MOV
JSR
HOL05
/olD V
MOV

122720
001005
112760
0<115301
001170

000060

DEC

'60, (FIO)+
21
140,-1(RO)
RI

SNE

104406
104406

(I 215 !I !I 1

01 '7224
017226
(172)0
017234
017240
017242
017246

010046
010146
016746
Ot'l4567
025667
012701
012'1(1)

017252
017256
017260
017266
01 '2'10
017272
017271\
017]02

162032
\75132

000040

2' i

ot 2600

017306

000207

14ACV11 27(1006)

H,P1
tHOLD5,M

(Sp)+,Rl
(Sp)+,RO
PC

23-APP-77

,SAVE PEG.
,SAV! REG.
,PUT POWER F~!L EPP.OR COUt.lT 0'"' STACK
,CONVEt:lT IT TO DECIMAL ASCII CHARS.
,AND PUT THEM HERE
I LOAD THE COUNTER
J GE'T' AOR OF TliE ASC II NUMBER
I IS IT A LEADING ZEPO
rNO, CONTINUE

,ns, REPLACE IT 'lITH

BLANK
,ALL DONE ..
:NO, CHECK MOR! CliARJCTERS
,.POWER FAILS,"
I TY~E THE NUIoIBER

MSG" NUMPWR
MSGI, HOLDS
MOV
;.lOV
RTS

012601

01'7]04

CMpS
8NE

!love

177777

0215667

QASH DEC IXI 1 STANDARD MONITOR
DXQABM.PII
21-APP-77 12142

00111

,RESTORE REG. 1
,RESTORtr. REG. 0
,RETURN

PAGE 102
SEQ 0104

THIS ROUTINE WILL CONVERT THE GIV~N BTNAPY
LOCJTIONS
,NUMIH':R IIITO HOURS, MINUTES, AND SECONDS.
,HOLDING THE f'III~L NUMS!!:RS WILL BE TAGGED ASI
!lOUPS,
,MINITS, AND SEKNOS. HOURS MUST BE ON AN 000 BOUNOAPY.
,MINITS AND SEKNDS IAUST BE ON EVEN 1l0UNOA"HES.
,TEMPOPl!'Y LOCATION HOLO'5 MUST BE ON AN 000 BOU'lD~PY.
PC,HMS
C~LL VIAl
JSP
ADR
,ADDRESS OF THE TIME
, AOOPf'SS OP' EXTENDED TIME BITS
AOR"

2937
2939
1939
'940
2941
2942
2943
'944
2945
2946
2947
2948
2949

017310
1'117314
017320

0114467
1'1161\00
010003

1flo

Itt"??

I't~",!

1951
29152
2953
2954
2955
2956
2957
2959
29'19
2960
2961
2962
296J
2964
29615
2966
2967
2968
2969
2970
2971
29'72
2973
29'74
2975
2976
2977
2978
2979
2990
2981
2982
2983
2984
2985
2986
2987

(\17]24
1'117130
01'1334
0173 36

(\\'1000
017303
005001
(1151)02

000000
'100000

011)40
017344
017346
!It 7152
(117)54

022'100
1'H 0 13
162700

007020

0173'S(,
017362
1'117364
017370
017372

022700
,1'111'114
162700
1)05201
000171

'1P)74
017]76
017400
017404
nl7410
017412

(\05'103
001767
062702
062700
005303
000'752

01'7414
017416
017422
01 '1424
017432
01744n
017442
017446
0\7450
017456
017460
017464
017466

010146
004567
025667
116767
016767
010146
0('14567
025667
016767
010046
0(14567
025667
016767

017474
017500
017504

004767
062716
0110207

MOY
CLP
CLP

P4,SAV04
10,(S,")'po
po, R3
(lItH+
'(RO) ,!Ill
II(R3),1'3
PI
R2

,SAVE PEGS. 0-4
,GET AD!' Of' ~f' _OR TIME
,COPY IT If'lTO RP:G. 3
r(;!:" .t)P m" E,(ffIfOE" TIIII!, !!IYT! '0.
,PUT THr Tl"'! Ill! REG, 0
:PUT EXTENDED TIMI': RITS IIIITO REG. 3
: ZERO MINUTES CQUNTIrR
r ZF.RO HOURS COU'iTER

CMP

113~00 .. RO

BHI
SUB
INC
BP

t36t'10 •• RO
R2
IS

rl.ESS TflAN 1 IiOU!!?
,YES, GO LOOK rop "'ORE HOURS
,NO, SUBTRACT 1 HOUP' S WORTH OF SECONDS
,COUf'lT ~N HOUR
:CHECK FOR !IIORF. HOURS

SUB
INC
BP

.60.,RO
4.
160.,PO
Rl
2.

,LESS TMAN 1 ~INUTE?
:YES, ALL DONE
: NO, SUBTRACT 1 MINUTF.·S WORTIi Of' SECONDS
I COUNT A MINUTE
I CHECK FOR MORE MINUTES

]$1

TST
BEQ
ADO
ADO
DEC
BR

R3
2.
U7.,R2
143)6.,PO
R3
U

I ANY EXTENDED TtMt III'!'S ?
,NO, GO LOOK rOR "'INUTES
,YES, ADD IN 17. HOURS
I ADO IN 1 IIR 12 MIN 16 SEC
,GET RIO OF ONE TIME EXTENDED BIT
,CONTINUE

4$1

MOV
JSR
HOLDS

R2,-(SP)
RS,BOCIIV

MMSI

175424
000012

JSP
!oIOV
MOV
,.S'I'
"lOV

1$1

0070,,0

00'S~02

000771
0(10074

2S1

CMP

SHY
000074

000021
010360

1617153
161'746

Move

i6iH2

"0'1

161'16

MOV
JSR
HOLD!5
MOV

I PUT THE HOURS ON THE STACK
,CONVERT IT TO Ase IT
,AND PUT IT HERE
HOLD5+2, HOURS
,LOAD HOURS
HOLD5+ 3, HOURS+ 1 ,LOAD HOUPS
Rl,-(Sp)
,PUT THE l!INUTES ON THE STACK
R!5,eOCNV
,CONVEPT IT TO ASCII
,AND PUT IT HERE
liOLIl5+l,MIWITS
,LOAD MIliUTES
RO,-CSP)
,PUT TH! SECONDS ON THI!: STACK
P!5,BDCNV
,CONVERT IT TO ASCII
,AND PUT IT HERE
,LOAD SECONDS
HOLD5+3, SEKNOS

JaR
ADD
RTS

PC,RST04
14, (SP)
PC

174750
006241
006234
174724
006216
174706
006200

MOV
MOY
JSR
HOLD!5

2988
2989
2990
2991
'9CU

SEQ 0103

THIS POUTIN! wILL PRINT THE NUf'l5ER OF POW!R FAIL !RRORS
pC,pWRNUM
JSR
CALL VIAl
!rOUND IN COUNTER PWPCNT.

2913
2916
2917
,9t9
2919
2920
2921
2922
2923
2924
2925
2926
2927
2928
2929
2930
2911
2932
29)]
2914
29]!!
2936

00111

"'8""

2915

23-ApR-77

175252
000004

,RESTORE REGS 0-4
,SET PROPER R!TURN PC
,AMD RETURN

QUM DEC/X) 1 S'l'AND~FlO MONITOP
DXQlB"'.P1!
21-APR-'~ 12142

MAeyU 2Hl006)

:U-T\PR-'7'I

00111

PAGE 103

"'/lCY1! 27(10n6)

23-APR-"

00:11

PAGT': 104

2993

QA8M DEC/XU STANDIIPD I.IONITOR
DXQABt.!.J:!11
21-APR-71 12142
2994
2995
2996
2997
2999
2999
1000
3001
]002
3003
]004
3005
3006
3007
3009
]009
]010
]011

THIS ROUTINE COPIES THY, 11/60 ERRQR LnG AND pnTS JT INTO

,II l!UFP'ER IN THE MON ITOR.

01751'16
017514
017516
017522

132767
on1414
012701
01'151'102

000002

Ot7524
nt751n
nlH32
nt75H
017536
017540
017544

011)267
n76600
0000(10
010021
005202
1!22702
001367

0110002

I) 17546

"00207

031422

161624

SAVLOG, £I ITS
BEO
MOV
CLP

IRIT\,PPRES

16,

R2,2$

2$ i

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

I!S IT ~"I 11/61!
,NO, GFT OIlT
:CI!:T AIlII. 01'" U1G 8UfFER
IINITULIZE LOG cnjll"AI''' A'lO ADOIIESS

P2
.I'P,P,

:LO~D !ll'"AD CO\'HI>JD ~N" T.'!I'" AO"IIESS
:PFAO THE LOG PT':GIS'!'F:P
:READ Cf"lM"A"JD A'ID PfGISTER APPJH~SS
I STORE CONTE>;'!'S or tOG t~ 8nFFEII
:STEP TO NEXT IID!'!?FSS
: ALL nONE ?

B~E

:1010, Kg!':p GO! '1G

IlTS

rYES, RF:T'jRI'

MOV
"ED
.~'ORD

MOV
INC
CMP

0001"

H
fLOGBUf,PI
R'l

RO,(Pl)+

QABM etc IUt STANDAIIO MONITOI!
21-APR-71 12i42
DXQUM.Plt

M1\CYl1 27tloollJ

SEQ 0107

~~i~
]015

161577
161576

017560
017562
017570
017574

10S067
0"5767
001406
112767
01'1700
000410

017576
017602
ot 71504
0\ 71512
01715115
017624
0171530

005767
001421
t 12767
017700
012737
005070
000406

t 61556

017532
017634
0171540

022626

105067

161'505

0171546
017654

012737
000207

015246

017550

0\'75'54

000001
161562

000002
,'" ~42
i 12
000006

KLOCJ(I

16156]

1$z
16! 541
000004

2$1

)0)2
30B

]034
1035
,n]6

]037
lOll!

n, '~42

lSi

304~

3049
3050
)051
)052

eLF'S
TST
BEQ

CLOCii
CLOCKL

MOYS

MOV
eR

.BITO.CLOCr:
t1CLOCKL,RO
2.

'!'ST

CLOCKp

I ZERO CLOCK "LAG
,KW11-L CLOCK PRESENT?
,NO. CONTINUE

lIEQ

MOVS
MOV
CLR
SIl

"mv

'l!IT1.CLOCK
~CLOCK", RO
'3B,taU
ta6(M)
48

CMP

(SP)+, (SP)+

M5<;$, NClctJ(

024317

lo440S
000000

Q~Bf.1
DECIXII SU."DARD l.IONITOP
OXQAB·... Pl1
21-APR-" 12142

3039
3040
3041
3042
)043
)044
)045
]046
)047

PAGE: 105

00 i l l

THIS ROUU!!! CHECKS TO SEE IF' ANY CLOCK
I
I MODULES 1\RE PRESENT AND SETS BIT FL1\GS IN IIYTE
: !'OCAT!O~ ('!'O{'l(
CALL VIAl
JSR
PC. KLOCK

3012

)016
3017
]018
]019
3020
]021
]022
1023
3024
3025
)026
]027
]028
]029
1010
30)1

23-1\PR-77

000004

4&1

'HCYI! 27CI1)01;)

HALT
CLRB
f.10V
RTS

CLOCK
,BUSEFlR,UiI
PC

23-APR-77

00111

,SET L CLOCK ?RF.SEN't' FLAG
: GET BEGIN AOOPESS OF CLOCK MODULE
,CONTI~UE

1I(\tI11-P CLOCK PRESENT?
,NO. RETURN
,SET I' CLOCK pRESI!:II'!' ¥'LAG
,GET SEGI~I APOI!!':SS OF' CLOCK MOCULE
: LOAD TfME-OU" VECTOR
I MAKE sup!!: SYSTEM CLOCK IS THERE
ItT'S THERE, IlETUR~ OK
,POP THE STACK POINTER TwtCE
,'NO SYSTEM CLOCI< F'OUNO'
,WAIT FOR OPERATOR'S DECISION
,INDICATE NO CLOCK AVAILABLE
:R£stORE HMt:-OU'i' 'it:C;Of<
IRETUIlN

P!.GF: 106
SEQ 0108

THIS ROUTINE WILL GET THE I!UlIlTT"E IN
I SECONDS FROM THI" Cl,OCK f.10DULE, HAVE tT CONVERTED
ITO HOURS, !>IfNUTES, AND SECONDS VU SUBPOUT!NE IiMS,
,STUFFS IT BlTO PROPER LOCUION FOR pRIlIlTOUT.
CALL V 111 I
JSP
PC, RUNTY~
I

I!UNTYMi !>IOV

017656
1')17660
017666
01767(1
017676
0177(,)0

010046
112767
00 \ 005
132767
001t'04
000456

017'02

016700

017706
017711'1

on0402
016700

0177\4

01&067
011506 7
105767
0(11407
105767
100404
n)27'77

000002

117330

017760
017762
017764
0,,,72
020000
020006
020014
020022
020030

004767
(1)1414
(101416
1 t 6767
116767
1 \6767
116767
1115767
1115767
116767

020036
020040

012600
000207

BITS

RO,-(Sp)
tBHO,CLOCK

BNE

A"D

BITB

#RUI.CLOCK

RNE
RR

,SAVE RF:G. 0
:USING THE Kwl1-L CLOCK?
,YES, CONTINUF.
,USING THE !<"l1-P CLOCI<?
rYES, CQN1'1NUC::
:NO. CA~"" DO A'IY'l'HING, FlFTURN

161450

MOY

CLocn, FlO

: GET ADR OF CLOCK If1FOIUIATION

BI!
MOV

11'>1444

C1,OCKP,RO

:CO'lTINtJE
:GET ADFI OF CLOCK INl"OR"ATH1N

000001
O~0002

t 61465
161455

'JO'!l
3054
]055
3056
]057
3058
1059
)060
]0151
)062
)063
]0154
3065
30615
)067
)068
)0159
)070
)071

017722
(177)0
0177]4
017736

01774.
n17744

161472

""' '/'0 Hil4156

lSI

161355
161407

MOV
"OV
TSTB
eEa
TSTII
S"I

ArT

H1224

2(RO) ,R'tIME
-2(!<0) ,PTIMX
RMODE
4S

TFLAG
49

fFl!T12,<3SlI

,GET THE TIME FROM THE CLOCK MODULE
: GFT THl': TIME F.XTENllED BITS TOO
,PROGI!M~ ! N Tj-IE RUN MODE ?
,NO, "'1ST aE TIME ro1'1 SU"'MARY
IYES, IS IT ERRQR TIME?
I YES, Sl';'J'U? RUNTl"E rOR OUTPUT
:1010, PRTIoiT THE EOP nATA 1

)072
1073

1074
3075
]0715
1077
1078
3079
]090
1081
3082
3093
1084
)085
3086

3087
3089

O! 77'12

017754

161415
161410
161403
161376
161371
161364
161357

,NO, R"TURN

481

JSFI
RTIME
RTI"X
MOVII
Mova
Move
Mova
MOVS
MOVS
MOVS

PC, HMS

,C:O'lVE~T

5'1

fIIOV
RTS

(SP)+,RO
PC

, RESTORE REG. 0
II!ETUI!N

006105
0015100
00607 ]
006067
006"62
006056
006051

TO HOURS, "IINUTES ANO srCO!!OS
,F'ROIII SECONDS
IEXTENDED BITS
HOI]RS,THI!S
IL"AO 100'5 COLl]MN OF' HOURS
HDURS+l,THRS .. 1 ,LOAD 10'S COLUMN OF' HOURS
HOURS+2, THRS+2
,1.0'-0 1 'S COLUMN OF HOURS
MINITS,TMINS
ILOAD 10'S COLUfIIN OF' MIliUTES
MINITS+1,TMINS+1
,LOAD l'S COLUMN OF' MINUTES
SEK!!OS,TSECS
ILOAO 10'S COLU'1N OF SECOIIOS
I LOAD I'S COLUMN OF' SI!:CONDS
SE,OIOS+ 1. TSECS+ 1

OAIM
DEClXtt II' .~DAPD "'ONITOfl
DXQUM.P'I\
"""1'11... 77 12142
3099
3090
3091
3092
309]
3094
3095
]096
3097
3098
3099
3100
3101
3102
3103
1104
3105
3106
3107
3108
3109
3110
3111
!U2

MACYl1 2'7(1006)

23-APII-77

OOt 11

P~GE

! 07
SEQ 0109

,
,

T.H15 ROUTINE WILL snup THE TI"t IHrOIlIH!TIOI'S
• rOil THE END or PASS AND ERROII MESSAGES. IT ALSO LOADS THE SURT
,TIME FOR ~ BKMOO.
SUBIIOUTINES CALLEn A.IIE RUNTYM ...10 HMS.
CALL VIA.
JSR
PC,PASTYM
JSII
PC,EIIRTY'"
JSR
PC,BKTYM

02(1042
020050
020052
020060
020062

112767
000406
112767
000402
t 05067

000001

1(,1301

BKTYMi

000200

li'H271

MOV8
BII
ERIITYM, MOVS
8R
PASTYMi CLIIB

UITO,TFLAG
RUNPAS
'BIT7,TP'LAG
RUNPAS
TP'LAG

,SET FLAG INDICATING 8K"'OO 1I"'E SETUP
.CONTINUE
• SET ERROR C A.LL rLAC:
,.CONTINUE
,SET END or p"ss nAC

020066
020072
020100
020102
020110
020112

(1(14467
1]2767
1)0100!!
1327157
001004
000505

174646
000001

161253

RUNPASi JSR
BITB
SNE

P4,SAV04
,IHTO,CLOCK

,SAVE REGS. 0"4
,USING THE KWH-I.. CLOCK?
,YES, CONTINUE
.USING THE Klll1-P CLOCK?
,YES, CONTINUE
rNa, CAN'T DO ANYTHING, IIETUIIN

020114
020120
020 \22

OHi70C
000402
016700

020126
020 \14
020136
020142

112767
(101403
017701
000402

(100001

020144
020150
020154

016701
012702
01270]

161344
026522
000004

02(1160
020162
020164
02"170
020174
020176

020122
01')1406
O!i270l

16126 ]

000002

BtTB

161243

BNE
BR
161236

181

161232

2. :

MOY
811
MOV

U
.BIT1,CLOCK
28

98
CLOCI<L,RO

CLOCKP,1I0

,GET ADR or CLOCK I ~FOR" ATI ON
,CONTINUE
,GET ADR OF CLOCK I'IP'ORIIATIOIi

1111
]114
3115
3116
3117
3118
3119
3120
3121
3122
3123
3124
l125
l126
312'
3128
3129
3130
lUI
lll2

3133

]1]4
3135
1136
3137
3138

020200
020202
020204
020210
020214
n20216
0202"
ry2 0 224
n20230

~n7"3

3143
3144

0202)6
'120244
020246
020254
n20256

QAB'" OECI11t
OXQAB"'. "'II
3145
3146
3147

0'0262

411
511
6$ ,

000004
000360

060~nl

1$1

M)4767

IGET _DR or MODULE "OING fl:OP
,GET ADR or MODI1L~ lDOIIESS!:S
,SET POINTER TO 1ST MODULE TI"IE FNTRY

CMP
BEQ
ADD
CMP
BGT
BR

161105

RITB
BIT
BEQ
MOV

016'163

161152

132767
001(130

(})27'77
!)1!1424
1I10n67

161142

~NE

~1·APII·7~

"'ONITOII
12142

OO~O67
~tl4767

161130
177016

8St

M.CY11 27(1006)

0111424

Oto'2H

~'Ilt41!i

0702~~

1 U;7~"

15lt06

005615

H50
J 1 51
1152
3153

020J04
020)17
(20)2 :

116767

1.611 01
1 ~t074

! ' ~157

\ 'I ~67

n05610
005604
I)O!~ 77

3154

02n]2'S
0203'2

. ~';167

~ ~

4420

Rl,(R2)+

'4, R3
.240 .. 113
6.
9$
RO,II3
(113) ,1'14
PC,lIl1NTYM
RTIME,RO
R4,1I0
T"L~G

at
RTIME, (R3)
RTt MX,2(R3)
UIITO,TF"LAG

9',SITU,ISII
9.
pO,PTIME

'3-APII-77

00111

,HAS THE "'ODUI,E TIMF anN rOUND?
I YE3, CONTINUE
I ADD 4 TO THE TAStE ADDRESS
,AT THE END or THE T .. BLF.?
,NO, KEEP SEARC~IlIG
,SOl"F.THING'S WIlONG--GET nUT
,GET ADR or CLOCK Il,Iro TABLE
,GET TIME or 1400llLE'S LAST PASS
,GET .NO SET UP l!\lr;TI~E INrOR'lATION
,PI1T THE IIU'ITtME Iii IIEG. 0
,GET THE MODULE'S Ef,APS~D TIM"
,IS IT ERROR T1"'E ?
J YES, CONTI"UF
rNO, UPDATE T~e: MODl'Le:'s PASS TIME
,AND THE F"XTICHDE!:' ens
r SETUP I"OR 111(0.100 ?
,YES, ALL DOli'", RETI)RN
,NO, PRINT THr. EOP DATA
,NO, RETUP~
,PUT T~!' ELAPSED n',IE INTO

PTr~E:

PAGE 108
SE~

020266
020272

: ')02(17

CSURT,1I1
'MODQ,R2
I4,R3

160722

! 61164

• 676~

Mav
MOV
MOV

010000

161127

I r;041!!
0\67\3

I SETUP rOR flKMOD
,NO, CONTINUE
,YES, GET ADR 01" THI' BII.MOO
,COSTINUE

onooo 1

160400
t ~5767

S'l'J'IN~n

ttBKPTR,Rl
!SS

000002

016700

177446
! 51200

tBITO,TrLAG

BITB
8EQ
MOV
BR

ADD
MOV
JSR
MOV
SlJB
TST8
SMI
MOY
MOV

(l11F4

3148
3149

3155

381

003171
0004!>3

li39
3140
3141
3142

161215

161126

qt.

RTIMX
PC,IoIMS

,T~IS ~lLL ALwAYS SF' 0
ICONV~RT IT TO HOUIIS, MINlITI':S,

CLR
JSR
PTIME
RTIMX
"IOV!!
Move
Move
Move

,GIVEN THI'; Tllo!E HI /lEeOHDS
rO
MINITS, "'I4INS
,1,OAO 10' S COLU"''' 01" "INUTES
MINITS+l.M"'IN8+1
,LOAD I'S COLU"" 1lP' MINUTEs
SEJ(rJDS, "'SECS
,LOAD 1 0' 5 COLU"N 01" SECOrIDS
SEI(NDS+ I, IoISECS+ 1 ,LOAD l ' S COLUM~ 01" SECONDS

JSII
PTS

PC, RST04
PC

, RESTO!!!': REGS,
, PETUR"

~-4

AND SECOr.DS

011"

QAeM DEClXtI
DXQABM.Pll

STAND) ~t:I MONITOR
21.AP~·7' 12.42

MACYll 27Cl006}

23-APFI-"

00111

PAGE 109
S!:Q 0111

THIS FlOUTINt ;.jUL SHUT orr THE CLaCK (II" AVULABLE) TO KEEP

U56
~1!'
:U58

: %T r~c~

t~T:PU;:~I~C JJu,.... .. '.,v
"",,,ft . . .,,..

""u.
u.,,..,,,,,,,,,, ROUTIN!: •
J.nc.
r"lY\"'UVc.

CALL VIA,

JS~

PC,CLlCOrF

]159
3160
]161

]162
3163
]164
3165

020334
020340
020342
020350
020)52
n20360

105767
001425
132767
001004
132767
001 n03

020)62
020366
02037(1

01'7700
000402
017'700

160770

160'764

211

02n]74
020402
0'2n410
020414

016067
017067
005070
non'20'7

000006
000006
00nn06

161013

c:LKO",

000001

161003

000002

160773

TSTB
BP'Q
BITB
BNE
BITB
BNE

,IS THERE A CLOCK 0'1 THE SYSTEM
,NO, RlTURN
,YES, THE lOI11-w ?
,YES, CONTINUE
,NO, 1I0w ABOUT THe: 'OI11-P
,YES, CONTI/IUE

CLOCK

U
'lIlTO,CLOCK

11
tBrTl,CLOCK
2.

:u66

3167
3169
3169
J170
3171
]1'72
U'73
],,4
U75
3176

1611)16
161012

1'1

41,

!lOV
SR
MOV

IICLOCKP,RO

,GET TilE BEGIN AOOR!!:SS OF CLOCK MODULE
:CONTINUE
,GF.T THE BEGIN lOOFle:SS or CLOCK MODULE

MOV
MOV
CLR
RTS

6(1110) ,CLKADIII
116 (FlO), CLKIILO
116(PO)
PC

,SAVE TilE CLOCK ADDPESS
,SAVE CONTENTS rJll' CLOCK CSR
,KILL TilE CLOCK
,RETURN

IICLOCKL,RO

3178

~1 "

THIS ROUTINE WILL TUIlN THE CLOCK BAC/( ON Ir

:11'9

,0P'P' BY

CL!cOP'P'~

H80
3181
3182
)1n
3184
:JU!!
:JU6
3197

CALL VIAl
020416
0204'22
020424
(l2l'1U2

105'767
n0140!
(l16777
000207

n204]4
020440
0'1)444
020450
020454
020456

016706
005(l67
005067
004767
n00240
00016'7

CLKONI

160'731
1607'72

160766

111

TSTB
BEQ
MOV
RTS

CLOCK

U
CLKHLD, PCLICADR
PC

JSII

,IS THEIIIE A CLOCK ON THE SYSTE!!
,NO, RETUPN
,PESTORE THE CLOCK 5T~TTJS
!RETUR"

THIS IS TIfE CALLING SEQUENCF FOR THe:

31118

IT WAS TUPN~D

PC,CLKON

CRHU~G

ROUTINE

]t 89

3190
]191
)192
3193
3194
]195

164476

DABIII O"C 1X11 5TH!NPO "'oNnop
OXQABM.1'11
21-APR-77 12142
1196
3197
3198
3199
3200
3201
3202
320l
3204

0?1I4~2

004467
t3'2"~7

3206

3207

020506

)208

0'2051 '2

3210

020520

010203

3211
3212
3213
3214

020~22

062703

02n~26

(llnl)O
OO'io67

3220
3221

3222
3223
3224
1225
32'6

3227

3228
3229
3230
3211
3232

3'234
1'2l5
3236
3237

121B
3239
324n
3241
3242
3'243
3244
3245
3246
3'247
3248

3249
3250

3251

E~OSVG

IGO CIIECI< P'OR OTHER MOOULES RUNNING

23-IIPR-77

on 111

PAGE 11 0
SEQ 0112

Oi<~S14

0'0'532

C\670~

1'74252
Ol'lnOnl

CKIlUNGt JSR
BITA
BNE
BtTR
SEQ
MOV
SR

020'540
020542
"200;46
020'55n
0'205'5&
0'21)561)
020566
0'1()570
02"5"'"
n,o~no

01'11442
"2670\
1\1)1467
022761
001463
03"61

~ov

CLOCK!., R2
1<2, R3

1)00004

Aon

'4.R3

0'6'522
16n670

"lnv
CLR

"100Q,P(1
"'AXTIM
C~oj+,d(i

;PU'T MODULE BEGI;" AODR IN Rl

BF.Q
ClolP
BEQ
CMP
BEQ
BIT
REQ
BIT
eNE
TST
BPI.
C"'P
BEQ
MOV
SUB

: BR IF ~ONE ALt. MODULES
,IS IT THE "lODULE DOING TilE tOP
68
;YP:S, SKIP IT
1144nOO,STAT(Rt) ,IS IT AN IO"'OOR ?
6$
,BR IF YES
'l'IITI4,STAT(Rt) ,IS I'!' SELECT!!:D ?1
6S
,BR IF !IIOT
tflTTO, STAT(R" ,Ins IT aLREADY DROPPED 11
6S
181\ IF YES
STlT(P1l
,TS IT A flRMOD ?
6'
IUS, FOP GET IT
'142000,STAT(R1) lIS IT AN 10"1000'
6$
,YES. FORGET IT
2CR2),R4
,GET TIME FRO'" THE TIMER
(RJ),R4
:CALCULATE TIM!!: SINCE LAST END PAS
,!'OINT TO TilE NUT TIME ENTRY
14,113
R4, MAXTIM
,IS THIS ELAPSED TIME BIGGER ,
3t
: NO, CONTnUE
RI,P!!
,YES, S.VE TilE MODULE POINTER
P4, MAXTI'"
,UPDATE THE MAXTIM
31
,CONTINUE
KNGTIM, MAXTIM
,IS THE MODULE HUNG n
'7,
,IF NOT, RETURN
R5,R1
,YES, INDICATE MODULE TO 8E DROPPED
PC,DRPHNG
,GO DROP IT AND REPORT ERROR
STnp
,WAlTING TO PELClCAT!: ?
7C
,NO, PETURN
,,400Q, RO
,SET POINTER TO MODULE ADDFI TABLE
2(112),114
,YES, GET THE PRESENT TIME
-UR2), R1
I ANO TIM!: EX1TIft)tD BT'1'S
R2,R]
,GET POINTER TO TIME INFO
H,Rl
,POINT TO PASTIME INFO

n00002
160&4&

1601>36

1$1
2$1

160146
144000

000020

040000

000020

021)00n

0000'20

001457
032761
001053
(10'5761
Ino050

00(1)'20

0'2n604
020606
020614
020616
020622

n22761

142000

n01444
016204
161304

000002

020~24

0621M

02n6]0
021')634
020636
0'20640
020644
0'20646
020654
020656
020660
0'20664
020670
0206'2
020616
n20'702
020706
020710

020467
nl0105
01046'7
000734
026767
100027
0\0501
00476'7
105761
001421
ot 2700
016204
016'20t
010203
062703

(120'714
020716
020720

005720
001406
010423

R4,SAV04
,IIITO,CLOCK
IS
.flIf1,CLClCK

,GO SAVE !In - R4
,USING THE ICWU-r, CLOCK 7
1 FIR IF YES
,USING 'I'HE II:WU-P CLOCK 7
,BP IF NOT - SOfolE'I'HING'S SCREwEY 'l?
:GET FOINTER TO TIMING INFO
: C.O."'<T IN.U.!'.OJI
,GET POINTER TO TIMING INFO
,COpy R2
;R3 FOINT5 TO UBLE OF' PASS TIMES
,IN THE "TINIER" MODULE
,GET FOTNTEP TO rAOOUT,!: AooR TULE
,ZERO LARGEST ELAPSC:O TIME

160"57

t~OV

121 ~
3216
321 '7
321 R
3219

,PESTOIlE MONITOR ST~C!( POINTEP
,PROCESSOR '1'0 STATUS (l
,INDICATE NO "OOULF.S DOING FOP
I GO CHECK FOP HUNG "'OOULES

, ***** ****** ***** ** ********** **** ******** ****** ***** ************ ******* **

00 1007
132767
(HIlSl]
1'1167n2
000402

32,j9

"'AcvH 27C 1 ,,(6)

SPSAV,SP
PSw
CSTART
PC,CKHUNG

,TillS ROUTINE IS CALLED FROM Til! "PASENO· OR HUNGCR ROUTINE ANO CHECI(S
,THAT ALL RUNNUG MOOULES HAVE COMPLETE!) AT LEAST O"'E PASS DUllING A
,SPECIFrEO TIME JNTF.RVAL. IF IT DETECTS l "HUNG" MOOUL£, THE
,"'OOULE IS DROPPED AND AN EPPOR IoI!!:SSAGE REPORTED.
0,11466
n20474
1)20476
0205n4

320~

HUNGCKi MOV
CLP
CLR
JSR
NOP
Jill'

160512
157:Jl2
161044
000006

000020

ADD

000004
1605'72

101740
160562
160510

160552

411

CMP
BLOS
MOV
MOV
BR
CMP
BPL
MOV

JSR

0000'70
160134

TSTS
BEQ
MOV

026522
00(100'2
1'7'7'7'76

",,-,v

MOV
MOV
ADO

000004

5. i

TST
BEQ
MOV

'7S
CLnCKP,P2

liS

CST ART , Pl

(RO"

R4.CR31+

,ALL DONE 7
,YES, R!TURN
I UPDATE ALL MODULE 1»&11'1'11111:.11

Q~l'IM

DE~/Xil

OXQUM.Pll
3252
3253
3254
3255
3256
3257
3258
3259
3260

"TlND~ flO "'ON I TOil
21-APR-n 12.42

020722
020724
020726
(120732
020734
020'140
0'0744
020746
020752

010123
00077 3
062703
000701
004767
10'5767
001002
000167
000207

~278

1279
3290
:n81
32P2
3283
1294
3285
3286
3211'
3288
3289
3290
3291
)292
3293
3294
3295
3296
1297
3299

3299
3300
3301
3302

23-J\PR-77

00111

PAGE III
SEQ 0113

000004

611

174012
160051

71,

166076

9$,

QABM
orelXll STANO~PO MO"lITOR
2t-APR-77 12,42
OXQAB"'.Pll
3261
3262
3263
3264
3265
3266
1267
3269
3269
3270
1271
3272
3271
3274
3275
1276
1277

'lACY\ ! 27(1006)

"IACY11 27(1006)

MOV
BR
ADD
IlR
JSR
TSTB
BNE
JMP
RTS

RI, (R3)+
5.
H, R3

,AND TIME EXTENI'lEO !lIT!!
,CONTINUE
I POINT TO NEXT P~ SS TIME ENTPY
I GO DO IT "GAl"l
,GO RESTORE PO - R4
I ANY 1o\00ULFS STTLL FlUNNING ??
rBR IF YES
:GO TERMINATE THIS "RUN"
,RETURN TO CALLING ROUTTNE

3$
PC,RST04
MOOCNT

CTPLCB
PC

23-APR-77

00111

PAGE 112
SF;')

,,THIS
*****************
*************** **** *** ** ***** ********* ******* ********* *
ROllTINE IS CALLED FROM THE "CKI-IUNC" RnUTTllfE Ar'D IT IS USEI'l
,TO DROP THE HUNG MOOULF. UO REPORT THE EPROR ON THF" CON~nLe:
,TTY. IF THE "TIMf.R" MODULE IS FOI)Nn TO BE HU~:G THE" THE ROUTINE
,DISABLES ANY FTTRTMER TIMING CHFCKS USING TilE CLOCI<
,BY CLEAPTNG THE "rTf: TAGGED "CT,nCK"
()OO020
000020

oRPHNGI I'I1S

020754
020762
020770
020772
020776
021002
021004
021006
021 ot 2
021014
02102"
021022
021024
021026
021030
021032
021034

0'52761
032761
001402
ln5367
1"5367
021201
nOl014
105067
(110046
004567
022744
022744
024230
022744
000000
012600
000207

020000
010000

021036
1'21042
021044
021050
021054
021056
021062
Q21064
021070
021072
0'1074
1'21076
021100
021102
021104
021106

021267
1'101002
105067
004'567
026026
004767
010046
004567
022744
022744
026025
026066
022744
000000
012600
000207

160226

,si

157743
172560

lSI

BIT

161'024
1~0013

1$1

160341
166330

176770
166260

BEQ
DECB
DECII
CMP
BtlE
CLRS
MOV
JSR
CRCR
CRCR
TIIIXI
CPCR
0
1o40V
RTS
CMP
SHE
CLRB
JSR
TlMX+l
JS!l
MOV
JSR
CRCR
CRCR
TIMX
TOTIII
CPCP
0
MOV
FTS

MnXCNT
MODCNT
(R2)'Rl
2$
CLOCK
RIl,-esP)
R5,TYPEN

: sn THE OROPPEI' 9 I'T
: wMonx MOOllLF; ?1
:BR IF NOT
: DECREMF:NT CO'JN" OF !OMODX "'O"ULE~
:DECREMF,'JT COliN,. OF PUNNIIiG MODULES
: 01[1 WE STOP TH~ TIMER MOI'lULE ?1
:ElR IF' NOT
,rnSAflLE ~LI, '1'J~ING CflF:CKS
,TYPE"! SCREWS YOU III' YOU DO~!' T SAVE RO
,GO RF:PORT DROPP!NG THE TIMEll MODULE

(Sp)+,RO
PC

I ;:IESTOR'.: RO
,RETURN TO "CKHI1NG"

(R2), BKPTR
3$
BRAKE
P5,FILLNM
PC,ERRTYM
!lO,-CSP)
R!5, TYPEN

,DID WE DROP AN AcrTVE 81C1o\00
,ap IF NOT
,CLEAR THE BRAKE
,GO GET MOO NAME" SET UP
,POINTER TO ERROl! MESSAGE
,GO SETUP TIM!'; INFCIIMATIOtl
,TYPEII SCREWS YOU IF" YOU DON'T S,"VE 1'10
:REPO!lT THAT WE DROPPED IT

(SP)+,F1O
PC

,RESTORE RO
,RETUFIN TO "CKHUlIG" ROUT!'JE

UIITI3,STAT(Rl )
HIJT12, STUeRl)
1$

~ 1t 4

QABM De:C/Xl1 STANDARD MONITOR
21-l\PR-77 12142
DXQABM.Pll
160056
160052

160050
160044

001526

000200
000202

021140
021144
0211 46

016767
016767
012737
012737
000167
177564
177566

3316
3317
331 e
3319
3320
3321
3322
3323
3324
3325
3326

021150
021152
021154
021160
021162
021166
021172
021176
021200
021204
0'1206
021212
on216
021220
021226

010146
010246
017601
010102
062701
016721
016721
012111
021167
101402
016711
105767
100410
126267
001404

H:li

02i 230

i ;!5i6~

ijvvvC~

3329

021234
021240
0'1242
021244
021250
021254
021256
n21264
021270

1 tJ5367
012602
012601
062716
105367
100005
116767
004767
000002

157561

3303

3304
3305
H06
3307
3308
3309
3310

021110
021116
021124

021132

MACYll 27(1006)

000200
167512

3311
3312

3313
3314

3315

3129
3330

3331
3332

3133
3334
3335
3316
3317
3)38

QABM
OECn"
DXQA!\"I.P\I

000004
000074
160040

160036
,

~ "l J 2

160044
157603
000005

3144
3345
3346
H47
3348
1349
3350
3351

3352
H,)3
H'>4
3355
1356
3)57

3359
3359
3360

1361
3362
3363
1364
3365

3366
3367
136A
1369
H70
3371
3172
1373

3374
3375
3376
3377

3378
1379
H81l

LPS, TPS
LPB, TPS

"OY

~nlSi<.,iH2iiO

GWBUF .1 MOV
MOV
MOV
MOV
ADO
MOV
MOV
MOV
CMp
8LOS
MOV
TSTB
1& i
BMI
eM?EI
~r;~=

000002
157561

SEQ 0115

MACr11 27(1006)

~DDRESS

OF IIODUL!

,LOAD ADDRESS OF WR ITE BUFFEP
,LOAD EXTENDED ADDRESS BITS
:MOVE SIZE REQUESTEO INTO SIZE ALLOwED
I REQUFSTED SIZE OK?
,YES- BRANCH
:NO- SET IILLOIllEO SIZE
I IF NOT YET SETUP, SUP

ALR~AOY

USED THIS BANK

: IF SAM£, HAS

X~!';.~~!:2:

,.H1T .. ~fT FLAG TO SAME
! AND COUNT DOWN MODULES
I RESTOPE PEGISTl!:RS

orcs

R('1T
3$
PQTN, ROT
PC, ROTBUF

JSP
RT!

: GET

XFLAG(2i ,WBFLG

I!DXCTR
(SP)+,R2
CSP)+,Rl

~OVB

157551

,SAVE REGISTFR

Rl,-CSP)
R2,-(SP)
!l4(SP) ,Rl
Pl,R2
IWBUFPA,R1
WBUF, (Rt)+
WBFEA, CR1)+
(Pl)+,CP1)
CR1),MXWFlF
1$
MXWBF, CRt)
MOXCTR

DECB
"'OV
MOV
ADO
BPI.

STA"DARP "'O'I1TOP
21-~PR-"I7 12142

PAGe: 113

MOV
.PRTY4, U202
JMP
COMCO]
177564
LPlriKll
177566
LPWK21
,GET WRIT~ BurFER ADDR!SS SERVICE

2$ I

160055
175014

00111

MOV
MOV

SEQ

3319
3340
3341
3342

1343

157575

LPONi

23-APR-77

~Tr

: SETUP RETURN PC

'2, (SP)

23-APR-77

00 I I 1

:GO CHANGE WRITE BUFFER ADDRESS
: PETUPN

PAGE 114
5EG

,ROUTTNP: '1'0 GET 1 P flIT PHYSICl\L ADDRESS 01" VIRTUA I, ADDRESS GIVEN.
,TOP 2 BITS ARE AT.,LIGNEP TO POSITIO"lS 4 A"'O 5
,ASSUMES I(ERNEL I-SPACE ADDRESS IN CURRENT '~AP
('21272
021274
021276
0?1302
0?1304
0'-1310
n? 1312
0" 116

010146
010246
1'117601
012111

021120
0'1322
02 1324
071326
0'1 )30
"'21132
1"21336
021142
021146
021352
0''-11!54
021360
021362
021164
021166
n21372
021374
021376
0'-1400
0'1404
02141'16
0214\0
021412
0214t4
021416
1'121420
021424

000311
006211
01)6211
006211
0'16211
042711
(162711
rl\' 111
017102
006311
on6161
00'5102
001373
014102
042702
on'5721
060221
005'511
042711

GETPA ,I MIJV
MOV
000004

~OV

1~~767

1'17714

Ml"V
'1'S'1'FI

flO 1 01"3
01)'5'161
000436

000002

B~!E

CLR
ElR
181

177761
172340
OOOOOli
000006

~~ov

;~OV

281
000002

ASt,
1'101.
DEC
BNE
~OV

16(1000

RIC
TST

1100
177774

on63! \
on6311
on6311
006311
012602
012601
0627\6
000002

SWAB
ASR
ASP
1>SR
1>SR
RIC
ADD

lSI

AOC
SIC
ASL
ASL
ASL
ASL
MOV

""ov
000002

ADD

PTI

Rl,-(SP)
R2,-(SP)
li4(SP), Rl
(R1H,(R1l
K'1'pPES
1S
2 (Rt)

:S~VE

PEGISTERS

:GET TIIFlLF; ADl)RESS
IVA HI'l'O PA t,OC II! TA!lLE
:K'l'11 I'! 1IS<:1
,YES- BPA"CH
,NO- CLFt\1'I Ell BrTS
:AND EXIT

(Rt)

( "0

(RI)
( P1)
CRt)
'\77761.(PI)
#KIPARO, (PI)
@(f<tJ,cRl)
.6,R2
(RP
2(Rt)
R2

'$-CRU,R2

HE-0000,R2
(PI )+
R2, (R1)+
(Rn
.,77774, CRI 1
( Rt)

:PII(lE BITS ALLIGNED
,KIPAR ADDRESS "'ORMED
:GET CO';TE~TS
:SHIFT 6 LEFT

,GET VA
,CLI':AR PAGE SUS
,CREATE 16 BIT PA
,ALLIGN BITS IN POSTTTONS 4+5

(1'1)

(1'It)
fRn
(SI')+,R2
CSP)+,Rl
.?, (SP)

,RESTOPE REG!STf:PS

I RUURII

()i;e

QABM DEC IX 11 STANDAPD MONITOR
DXQA8M.PII
21-AIIR-" 12i42

NACY11 27 (1006)

])92

3393
)394

02t426
1)21430
021434
021440
021444
021450
021454
021460
021464
0214&6
021472

QABM DECixii
DXQAB"'.PII

010146
Ot7601
012161
01 t 161
006261
006261
006261
006261
012601
062716
000002

MAP22.i MOV
MOV
MOV
MOV
ASII

000002
000002
000004
000004
000004
000004
000004

ASR
ASR
ASII
MOV
ADD
RTI

000002

ST,\~D~PD I!ONITOR

'""Cyll

3403

1401
3408
3409
3410

34tl
3412
3413
3414
3415

34\6
3417
341 ~
3419
3420
1421

3422

3423
3424
3425

3426
3427
3428
3429

021474
(121500
021502
021504
021510
02t514
021520
021522
021526
021532
021'540
021544
021550

10'5767
001001
000207

1571504

016'00

1'57712
1!5'704
157'524

01670'5
016703

01161)4
P5017
(\",4161
052 7 37
010C('7
010567
011')167

1 ~H'72
157561
157172
173172
1!57230
077406
071406
1'57'505

021646
Mi652

3435
3436

0216'56
021664
021672
021614

016767

021 ;02
021; 1 0

016737

3439

3440
3441
3442

344l
3444
3445

"lOY
CLRS
MVCODS, CLR
JSR
,",VCOD1' CLRB

105067

016767

021716
021720
021726
021134
021']5

3446

021744

3447
3441

3449

021752
';21761')
02176('

H!50

OH'174

10'5067
02676'
001004
10'5167
000167
026767
101012
016717
112767
0004'50
016737
032737
00101'3

151416
1'57467
1!57402
157473
000'534
l!57l62
U7156

1A0V
MOV

157376

1'57362
1'57350

157300

172344
172344

MOV
CLRB

181

11*,

172]46
157412

/ (" ~

'7:2344

344

1. 72346

1-,',

MOV
TST8
SEQ
BPI.

1'57410

172344

0.,017'7

MOV

172304
172306

157342
1'57340
000001

l",'n~
i' 4" 7 "
111173
0"671
1'16673
!.05M

CLR
JSP
BIS

117'572

foIOV

01t'4~7

02157(1
021'514
021600
021606
021614
021620
021622

~()V

MOV
foIOV

1'57656
157650
157470

00'5077
004767
10'5067
012737
012737
10'5767
001406
100067

3433
3434
3437

,SAVE REG. 1
,GET THE 1ST ADDRESS or THE TABLE
,GIY!: BACK THE SA"'E 19 8ITS
,THAT WEllE GIVEN TO BE CONVERTED
,SHIrT BACK rRO'" POSITIONS 4 AND 5
,TO POSITIONS 0 AND 1

Rl,-(8P)
U(5P),1I1

(111)+,2(111)
(R1>,4(R1>
4(RU
HRi)
4(IH)
HRI )
(SP)+,Rl
'2, (SP)

23-APP-77

MVCODE i TSTB
BNE
RTS
MOV

:77sn

"21554
02156(1

3432

]4]9

270(06)

17(1416

(100001

021564

021624
021632
021636
021644

3430
3431

SEQ 011'

00,11

j RESTORE PF.G. 1
,SKIP OVEP VA TO GET THE RETUIIN PC
,RETURN

PAGE 116

,MOVE Conp; TO !IFill Ol"P'SET, AP'T!':P CHECKING FnR CODE ALPEAI'lY IN
,MIllST OF BUNG "'OVED. MAP I(TII TO NEW CODE :'''0 pETURN TO IT.
,ALL VALUES USED EXCEPT orP'STD ARE ASSUMED COPRECT TN BliNK 0 COpy
, . . . . STIICI( POINTFP IS RFPOSITIo"e:n TO SPI:lOT BEFOPE RETURNING
,MYe'OOS f;NTRY POl"T IS USED TO LEAY!': QFF'SFl:T AS PRF:VIOUSLY SETUP,'10TE, HOWEVEII, THAT MlPPET "UST PE LOADED WITH TIiP: J:lF.:TUPN AODPF-SII
,BErORE c~r.LING. ,",vCOOS SHOULD /JOT FIE C~LLEl) IINf,ESS KTPRI!:S IS SET
,NOTE THAT "'VCODE I:IISABLES THF: TTY I(EYBOARO

34110
3401
3402

3404

PAGE 11 5

2t- APR-77 12,42

3395
3396
339'
3398
3399

3405
3406

00111

,THIS ROUTINE ALLOwS R""0 DtvIC!:S TO BE PUN WITH ITH! STANDAIID MONITOR.

3381

]382
33n
3384
:U85
3386
B87
3388
U89
B90
:U91

HeAPR-"

IHH

15 256

1'2344

15 254
15 no

172346

2. i

31'

eMp
BNI!:
COMB
JHP
MOV
CMP
BHI
HOV
HOV
HOVB
SR
MOV
BIT
8NI!:
SUB
BIC
MOV
ADD
ADD
CLRS

KTPRES
.+4
PC
CLKHLD,RO
CLKADR, P5
OF'P'STD,P3
(SP) ,1'14
@I*SSPO
PC.KTSETO
UIITO,USSPO
Rtl,CLKHLD
1'15, C1.KAOP
R),OFFSTl'I
P4."APPET
MOYP'LG

nICs

,KTII III USE?
,YES- BRANCH
:",o- RETUIHI ("IOVI'IG NOT ALLOlOEO W/O 1(1111
,SII VE CO'lTE"TS OF CI,OCK CSP
,SAVE ADP OF CLIjCII' rsp
:SAVE DESTINATION OprS!T
: SAVE; RETUPN PC
: TURN orr I(T11
I MAP DOWIII TO RANK 0
I TURN ON 1(11 t
,STORE CONTEf'lTS or CLOCIC CSR I'" BAllI( 0
,STORE AOR of CSP h BANK 0
,SET up DESl'IIIATI'lN OFFSET IN BAN'" I)
:CO?y or POINTEll
: SETUP RETURN PC
,CLEAP FLAG FOl! 'ROTATED' MESSAGE
I SHUT OUT TTY

PC,CLPQUS
XP'RF'LG
""406, •• IflPD R2
'77406,lItKIPDPl
MOVING
,CODE PARTIALLY RELOCATED?
,NO- BRANCH
18
:IF PARTIALLY PF-LOCATED, BUNCH TO
4$
,n"'ISH RELOCATION
,IP' rLAG NEGATIVE, INDICATES MOVE IS
OP'FSTM, orrsn
,DONE BUT POINT1':RS "OT YET PESTORED
HOVING
OP'P'STD,OP'P'sn

liS
MOVP'LG
/lVMAP
OP'P'STD, OP'rSTM
OFFST"', OP'rSE'!'
28
OP'P'SET, tllKIPAI!2
OFrSTH, UKIPAR]
'2,MVOOWN
I!VCOD2
LCOR12,"KIPAI!2
U77,UnPAP2

: SET rLAG NOT TO PRINT !lESSAGE
,PUT DESTHIATIO'f OFFSET INTO SAVE LOCATION
,TO PREVENT LOSING VALUE IN MIDST OF MOVI'lG
,Ir MOVING CODE UP, BRANCH
,IP' MOVING DOWN, SETUP TO
,00 LOWEST BANK FIPST

,IF MOVlNG UP, DO HIGHEST BliNK FIRST

l8
.200, IItKIPAR2
• t 77, .,KIPU2
lIP' 41( 80UNDARY, DROP TO START OF LAST BA'lK OF CO"E
II*KIPAP2, (IIKIPAP3
OFrSET, "KIPAP2
OrP'STM,UKIPAR]
MVDeWN

QABM DEC/XII STAWDlRO Mt:lI~nOfl
21.APR.7, 12142
DXQABM.P' t

..... "
JUt

3453
3454
3455
:-456
345'
3458
3459
3460
3461
3462
3463
3464
3465
3466
3467
3468
3469
3470

H?1

1122000
e220e2
022010
022016
022024
022012
022040
022044
022052
022060
022064

0220'0
022074
022076

022100
022104
1122106
1122114
022120
022124
022126

000417
~! :1'76'

O~OOO !

016731

157234
15'226
15'7212
15'7210
t 57265
172344
000001
040000
060000
172346

016B7
166737
n66'7]'7
105n6'
OU767
112767
01270t
012702
005737

012701
012702

041270
05!5000
075000

022140

012702

050000

J475
34'76
3477
3478
3479
3480
3481

022144
0221!50

172346

li22t!4
022156
n22t62
022164
022170
1122172
1)22176

005737
001014
1121112
001402
000167
022122
032702
1101770
01271)1
012702

022202

021\12

1)22204
022206
1172212
n22214
022220
022222

01)1402
on0167
022122
032701
001]70
026767
: 0111]
162737
162737
023767
103271
0110415
062737
1\62731
016"101
066701
('12]"101
1 (IllS!! 1
, t27Si
016767
1'116"137

3482

3490
3491

H92

O~2~lO

3493
3494
3495
3496
3497
3498
3499
1500
3501
3502
3503
3!501
3!505
1506

022'232
1122240
n,2246
022254
022256
022260
~222fi6

022274
022300
n2:ilJo4
1'122310

022312

1!57176
1!57245

38,
000402

48;

001000
0!55000
07!5000
5ei
000]52
UI

017777
157020

151012

000200
00020n
172346

112344
112346
156772

000200
1100200
t!!6746
156720
t 12146

172344
112346

,"7.,., 1

012701
01\2701
016711
105067
111'5767
001402
004767

n2n66
022372
022400
1'12404
022406

00'5067
112767
11'15767
0('1141\2
000167

156466
000001
156424

nl~704

'!5t§~H

3522
3523
3524
3525
31)26
3527
3'5211
]529
3510
3531
3532
1533
3514
3535
3536
3537
35 JI!
3539

1116701
062701
012702
012711]
012712
010162
062702
1'1627(11
005303
Onl]66
11671)1
016"37
1'112706
005037
105701
100425
(13'21'77
001021
104406
on456"
001242
001206
0012U
1116746
016746
n04767
012746
004"167
010407

156620
000200
172302
000006
017406
000040
000002
000200

3540
3541
3542
3543
3544
3545
3546
3547
3548
3549
3550
3551
3552
3553
3554
35!55
]556
3557
35!8
3559
3560
]561
3562

022416
022422
022426
022432
022436
022442
022446
1121452
022456
022460
022462
11"1466
022474
0"500
022504
1)22506
tl22!;!/)

022516
022520
022524
1122530
022532
022!)4
022536
022542
n22546
022552

022556
022562
022564
022570
022576
022602
022606

022612
022616
022622
022626
022632

i 05067
112767
010267
104406
104413
nt6746
016746
004767
012746
004767

eto!

7$1

~iOO5

,",vCOD3!

27(1006)

,",VMSG,
156413

177162
"VM~PI

1 '1646('

024446
1'72142

156444
156442
170564

022772
164604

2ti

170510

,GO Ttl RCc"!'li':

TH~T

ACTt'ALLY "OVES fHE COOF
,TNDIC'ArE ':'NOT;!!:R P~;:::; ,,:;,~'~ :,;;; ~ .. ::;;:
"'OVBNK~" trI PAil 2 , TO 00 OESIIlEP MOVE AP'.i:iI CLEANING
MOVeHK, UnPAfl3 ,UP LAST ONE
Of'rSET,IIIICIPAfl3
OP'fSTM, 'UIPA!']
RETPY
UKIPAP2, MOVSNK ,SAVE CUFlRENT ~ANK BtING MOVED
'1, i'iOVINC
,INDICATE MOVE IN PFIOCESS
HOOOO,FlI
160000, R2
UKlPAII3
2.
(Pt ,+, (R2)+
,COpy VECTOR AREA POWN TO !lANK 0
.lnOO,R2

11
"SI(PTp+40000, USKPTFl+600011
155000,R1
"5000,112
(111)+, (R2)+
,foIOVE CClDF.
U1777,Fl1

I Copy BKPTII TO

2.
HOOOO,Rl
.60000,112
UUPAR3
!5'
(111)'(112)

U
MYEIIII
(R1)+, (R2]+
tlOOO,R2

It
.55000,ill
"5000,112
(PI), (R2)
6S
,",VEilll
(PI H, (R2]+
117777,Rl
5.
OFF'ST14,OFFSET

,NEW COpy Ol(?
: YES, CONTINUE
I NO- BIIANCfoI Tn REPORT ERROR

'200, (IIKIPAII2
.200,IltKIPAR]
IItKIPAFl3,OF'FSrM
MVCOO2
MVCOD3
1200,(IIKIPAR2
.200, UII'lPAR3
OrF'STM,lIl
LCOP12,Rl
UI(IPAR3,~1

MVCOD2
'-I, MOVING
OFF'STM,OrrS!T
OFFSET, fitI(JPAl<2

00111

l TNDICATE "OVE: !:)C'.;, BUT POINTERS
,NOT YET IIF.STnPED

PAGE 118

MOV
lDD
'lOY
CLRS
TSTf!
BF:O
JSFl

.OFFSET,RI
HOOOO,PI
OFFSET, (~1)
MOVING
MVOOWN

CLR
"OVB
TST8

rOBI( 10
., ,BRAKe:
XP'RP'LG

MV!:RRI
156215

IolV~SG

PC,LOADWC

!lEQ

"VMAP

JIolP

,",veOPI

I<'f"IV

",appJ!:T,R4
OFFS!:T,Rl
1200,111
'KIPDR1,R2
H,II]
177406, (112)
1I1,40(R2)
'2,112
'200,Rl
R3

ADD
MOV
"IOV
MDV
"lOY
ADD
ADD
DEC
SNE
Move

: SET OFFSET VALUE INTO NEW (,OPY

: REt,OAD \lOFlST CASe: P'ROH LCORI2+0FFSET
:TO HCOFl12
: P'INAL ,",OVE NOT YET DON!!:?
I YES- PO DESIRED "'OVE NOW THAT PREVIOUS ONE
'~.~'~"~E.~
! GET PET URN PC

: GET !lEW OFFSET

:SET POR TO 4!C,RN.UP
,MAP PAR TO DESIRED 41(
: ,,"DVE POINTJ!:Fl TO NEXT PAGlr
,CHANGE TO ~EXT 411 VALUE

MOVFLG,Rl
,SAVE THE FLAG
O\l'FSET,tlUTPARO ,CHANG!: TO MEII CODE
MOY
.SP!lOT.SP
CLR
UPSW
TSTB
RI
,OJ( TO PRINT 'IESSAGt
eMt
: NO, CONTINUE
2t
en
.SIT9,UP
'Y!~. BUT IS IT INHIBIT!D
BilE
2t
I YES, CONTINUE
,",SGS,FlELMSG
,"CODE RELOCATED TO.
JSR
115, T018S
,GET 18 £I IT ADDRESS
OFrSET
MP;MPA
"!:NEA
MOV
MEMPA,-(SPl
MOV
MEfoIEA,-(SP)
JSR
PC, ITOAX
I TYPE ADDRESS
MOV
.ACilLr, -( SP)
JSP
PC,TYP!:
MaY
Rt,PC
,RnUR" rROIi MVCOD!: CALL
MOV

172)40

177776

156566

PAGE 1\7

MVCOO2
'I.Y'RlI'U:

21-APR-77

~OV

027212

022712
164530

ooi 11

SEQ 0120

002304

156270
000001
156402
024420
001204
156]10

"'nv~

MOV
MOV

156750

on1000

SUB
SHB
CMP
BHIS
liP
ADO
AOO

001242
040000
156672
1567!51

1566!57
1!65!!10

FlNt
MOV
MOY
TST
BNE
CMP
BtQ
JMP
CMP
BIT
SEQ
MOV
"OY
CMP
BEQ
J"P
C'"'P
BIT
8NE
CMP

MOV
ADD
CMP
BLO

MACVlI

022334
1'122340
022344
0?2350
n22354
0223fiO
022362

BEQ
MOV
MOV
MOV
MOV

£lIT

040000

QA8~
DEC/XII STANDAPD MONITOR
PXQABM.PI I
21-APR-" 12142

'357'
'?1'\ n22412

sus

BIT

156714
172144

3507
3508
3509
3510
3511
3512
3513
3514
3515
3516
3517
35111
1519

SP
MO"B
MOV
MOV

ADD

061270

156722
156710

n22320
012326

2l-APFl-77

MVCOO2. CLFlS
foIOV
MOVS
MVPTFlY; MOV
MOY
TST
S"'E
MOV
ui

21 i

!474

3493
3494
34115
34116
3487
3489
3489

,Hi

172346
172]46
1'2]46

012122

0221]4

022152

,,,.,I\:2n

i ;2344

001000

017777

022132

2H 1 006)

SEQ 0119

00101]
012122
032702
001174
013737

032101
001314
012101

1472
l471

MACYl1

CtRS
IOBJ(ID
MOVe
'l,BRAJ(E
toIOV
R2,MEMVA
MSG.,RELERR
GtTPA., MEMVA
MOV
MEMPA,-(SP)
1I0V
MEMEl,-(SP)
JSII
PC, non
MOV
IACRLr,-UP)
JSFl
PC, TYPE

,"RELOCATION ERROR AT"

,TYPE ADDRESS

OAB'" DEC IXll UAND"RD !'ONITOR
21-"PR-77 12,42
OXOAIIM.PII
3563
3564
3565
3566
3567
]569
3569
]570

022636
022642
022650
022652
022656
022662
022666
022670

10'1267
126727
002002
000167
104406
104406
000000
000776

156467
t564U

'00003

177202
024100
02]746

OAeM 0~C/Xl1 STAND4RD "IONITOI'!
21·apR-77 12;42
DX018M.Pl t
3'5'71
)572
3573
3574
3575
3576
3577
3579
3579
3590
15R1
3582
3583
3'594
3585
3586
3597
3598
3599
3590
3591
3592
3593
3594
3595
3596
3597
3599
1599
3600
3601
3602
3603
3604
3605
3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
3617
3619
3619
3620
3621
3622
3623
3624
3625
3626

!UCYl1 ,,(10061

6.,

00,11

2)-"P"·'77

PACE 119

RETRY
INCB
RETRY,.)
CMPB
BCE
6.
MVRTRY
JMP
MSC.,P'UAL
"'SelfAL'!'
HALT
H
BR

MACYII 27(1006)

13-APp-n

00111

SEQ 0121

,"UNABLE TO RELOCATE- FATAL. RELOAD."
,"HALT"

PAcr 120
SfQ 0122

,PURE MESSAGES
1'122672
022700
022706
022714
022722
022"/30
022736
022?]7
022742
022744
022747
022753
022760
022766
022770
022774
023002
(123010
023016
023024
023032
023040
023046
023054
023062
112]07(1
023076
023104
023107
023114
023122
023130
0231 31
023136
(123144
023152
023160
923166
0'23174
!)23202
023203
023210
023216
023224
023232
023240
023241
923246
023254
Q23262
023270
Q23276
023304

042045
010461
050'530
n20040
04n504
047117
000
1145
nOO045
022445
040
045
052523
000131
022772
041536
022445
042'525
043122
026455
052123
(l40522
022445
046101
(140522
046114
051440
021')115
(122510
045
044514
046515
000
045
047515
026455
020131
046124
020123
052111
000
045
040522
047116
020117
044040
000
045
054501
042515
046440
046505
052515
02010!

n41505
020056
0411IH
n52123
042122
0521 t1

054,,5"1
1')42040
046455
041101
046440
051111

001')056
000
052101
052522
046515

000
020116
0511 0 1

TITLEI

.ASCI!

DOT,
CR,
CRCPI
AAT,
SUMARY;

.ISCn
,lISCn
,ASCa
.lIsen
,lscn

-,orc/xu.

OXQAe-M

STIINI'1AFD "1'1N11,)R'

., ..
.,-,,'
'

AT'

'''PUN SUMMARY'

~r,RLF. ,+2

CTRLC,
• ASCIZ
QOVRFLi ,ASCIZ

'·c,'
' n QUEUE OVERFLOW --- SYSn:M CRASH,'

INVTPP, ,A.SCIZ

' u INVALID TRAP CALL ••• SYSTE" CIl~S!nl'

040526
047503
022504

INVCMOi

'UNVALID COMMAND"

052522
042504
047440
020101
041440
042520
042524

020116
026440
046116
04710]
044440
046522
022504

INVCOI i ~ASCIZ

"RUN MODE --- ONLY A CNTL C IS PER"'ITTEO"

051120
020115
052117
044124
043511

043517
040503
043440
052101
022510

INVCD2 i ,AScn

'URoeRAM CANNOT GO THAT HIGH"

047516
020041
047515
047101
047105
052123
047111

053440
020040
054522
043501
020124
041040
O!2440

INVCD3 i

000045
050440
047440
047514
020055
046505
044123
044440
042111
020120
026440
O'lI'lH
0'51103
000
(147111
020104
047101

042525
042526
020127
054523
041440
000045
053116
052040
040503
026455
1')42524
051501

,~SCIZ

,Ascrz

"NO WAYI

MEMORY "ANAGEMENT MUST BE IN USE"

QABM DEC/XU STANDAIID MONITOR
2\-APR-77 12142
tiXQUM .Pll
3627
3628

lei!9
3630
3611
3632
3633
3634
363'5
3636
3637
363~

3639
3640
3641
3642
3643
3644
]645
3646
3647
3641l
]649
3650
!;; !
3652
3653
3654
3655
3656
36'5"1
31558
3659
3660
3661
3662
3663
3664
3665
3666
366"1
3669
3669
36'70
3671
3672
3673
3674
)675
3676
3677

1679
1679
]680
3681
36~2

042523
!'l47045
05250 ..
042523
042105
!'l44445
042111
027'522
0001'145
046445
.,20105
047040
052517
020045
046501
050054
040525
044457
040510
040504
040524
024525
045
047440

000045
020117
o~ 25 i 4
042514
000045
0'53116
040440
040504

~23;2~

023'526
023534
OH542
1121550
023'156
023564
021'572
023600
013601
OH606
1123614
1)23622
023630
023636
023643
1'1236'50
0'236515
023662
023670
n21676
023702
023"110
023716
0;'3724
023732
0<'3"/40
0217415
1123754
023756
1')2'761
023772

023312
023]16
02';324
023332
023340
02H44
023352
023360

023166
023]70
02]]76
023404
023412
023420
023426
023434
023442
023450
0'3456
0214154
021472
023'500
023505
023512

0'B776
0'4004
024007
024014
024021
(241)26
024034
024042

3&97
3699

O~41 14

3699
]700
]7"1
3702
37M3
3704
371)5
3706
3707
370ij
3709
371 "
]711
1712

3113
3714
37\5
3716
37\7

3718
3719
3720

0740~0

02400;6
01.4064
024072
024100
02 4 tO,6
024\22
024110
024116
024144
02414'5

23-APII-'77

00111

PAGE 121
SEQ 0123

INVCD4;

.UCIZ

• \NO MODULES SELECTED"

1')46101
042104
040524

INVADRI

.UC!Z

'UNVALID ADIlP/DATU'

042117
040!116
052117
042116
020040
051454
040502
04H114
00,21.6
044515
040524
027'!S0'7
020045
0411 1J
046106

046125
042515
043040
000045
045050
053122
041 454
043514
053454
041454
041454
050103
000

tNVNAMi

.IISCIZ

• ,,,,OOULE NlME NOT P'QUIlO,"'

SUER1;

.lSCn

n~~44~

n4'1S?4

n4~440

042530
020105
046440
02011 'I
052'5\5
1')42514
0415 I "I
non
045
(151 HI5
051 III
0'51)054
026120
0351)51
045
020105
042'514
04i445
042040
042'514
022445
0'(1t 22
051125
051045
046505
042524
044045
0000 45
(1'5004'1
020131
042514

041'522
04"1514
042105
04"1511
052123
0'51101
032040

051511
042101
052511
020125
041440
046040
022460

054523
n20122
021124
053523
042526
020040
040503
047105
oonl04

1120123
053050
041520
051454
052103
000
04410]
1)41101

041 SOi

051 '511
000104
047520
040506
02250'5
047125
051! 17
052 t 23
(146101
051 t 01
047105
000104

QABM DEC/XII STANDARD r.oONITOP
DXQAA"', PI I
21·A~P-'7"1 "142
36Q3
3684
3685
3686
3687
3688
3689
315QO
3691
3692
3693
3694
3695
3696

t.!lCYll 27(1006)

(471)45
(31)461
')45
047440
045
O!'i It 01
050045
020131
02244'5
040440
026440
00;2101
052445
.0.?.0.1.05
O~1i 1 O~
026~OS

046101
047'514

non
045

024] '52

02~O~'2

0241150
024166
0241"14
024202
02421 n
024216
024224
O?4'HO
02423""
024244
"24252
n74260
024266
0242 7 4
024302
024310
024316

046440
0'54523
047522
026455
04152'
041tOI
"22~04

041445
1)46440
020105
042'52(1
046114
047111
041516
020123
046102
000

020117
000
052113
043106
047516
n!121 \ 1
0511 (\ 1
04311'7
0'521 I 3
047502
026455
046101
040'516
n4H24
0'4'15'17
043040
02001\6
042101
I)2244"i
0'5'2"4"
(')47101
020123
051522
042440
051511
0511! 7
000045
047514
042 t 17
n51104
02'7104
052040
020107
044'524
044504
042105

047515

02ui23
052103

(JAM, Sill V,peA, ClIA, FLG/!NT, \\HA>.iI, COATA.CTAG/CP;J),

~'j(aur

OF'LO~

~LR40 !

~ !SC IZ

"'~TO

!XE~C!S~

SYSE~~I

,ASCn

'tsYS

E~R

COllNI

,ASCn

"CACHE ENABLEO'

042510
0411 01

eOTTn

• ASC!Z

'iCACHE iiISASLEO'

042527
046111
000045
046440
020131
000123
022524

PWRP'AII

.ASCrz

'''POWEI' FAILURE'"

043i 25

KoOrLOi .ASCiZ

000117

OS21!!
041101

"'EMCHGI .ASCn

"~UN

LOlD MP.::O!UM 'fOU MUST

MFM!)RY TESTS'

,-'Scn

"HALT","'

PENlSr..i

,ASCrz

'U~PITY tN~B!,~'"

23-APP.77

LaC 40'·

(VIRT, PC, PSw, SP, Ve:CTll

HLTI

MAC'llt 27(1006)

c!LE:~:R

1')0111

PAGE 122
SEQ 0124

052113

NOKTI

.ASC 1 Z

',NO 1(T\I'

030461
000
0501')40
OOOt31
052111
000106
030461
052122
043040
000045
046102
051040

KTOISI

.ASCIZ

"1('1'11 OP'P"

NOPARI

• ASC!7.

',NO PlRITY'

PAOP'P' I

,ASCa

"PARITY OP'F'

KTl"ATLI

,ASCa

'"K'I'1 I ABOPT --- p'aTlLI!<'

Jl'Anr...

• A5CIZ

"UNABLE TO RELOCATE· FATAL, RHOAD "

SYSBAOI

,ASCIZ

' " " . . . TOO MANY SYS EPPORS .-. EXERCISE ASOPTEOU'

TIMXII

.ASClZ

'''CLOCK MODULe: OPOPPED. ALL TlMII;(i fUNCTIONS DISABLED."

0'5 '2101
052101
042522
022440
025045

t:t4''!1'
020131
051105
0215440
042530
020105
042524
045503
046125
050117
040440
046511
052506
047117
040523
On456

QU"- DICnt! STANDUD MONITOP
'21-,l.PII-n t2IU
DXQU".Pll
1771
3772
3723

3124
3725
3726
3727
3728
3729
3730
3731
1732
3733
3734

373'1
3736
1737

3738
1739
3740
3741
3742

3743
3'744
1745
3746
374'
3748
3749
3750
J751
)752
3753
]754
37!S5
J756
17!57
]759
]759
3760
3761
J762
1763
]764
3765
3766

02431~

n24324

1I?4332
024340
024346
024354
n24367
024370
024376
024404
024412
024420
0244"
024434
024442
024446
024454
024462
024465
1124477
024500
OH501
024505
024512
024520
024526
024514
024542
024550
0",4<,5'5

02t'562
024570
1124576
024604
024612
02461'5
024622
024630
024633
024640
024646

024654
1124662
024670

'UNO SYSTEM CLOCI(··-RESTART iii 10,00 011 HIT CONTINUE rOR NO CLOCI(,'

04n524
01044C1
05 tt 17
041440
052516
070122
047'\1 4
051045
052101
051105
052101
051045
052101
02nl 17
045
046505
0351"5
113
045
020105
051105
052101
0471 (\5
027104
042507

REL!RRi

.Ascn

·,RELOC.TION ERROR AT '

041517
052040

RtLMSGI

.lScn

"RELOCATED TO '

052123
055111

SYSSlZl • ASC IZ

'''SYSTEM SIZE,'

'lot!!
020105
051105
0'52101
044504
042105
045
042441)
042105
045
044103
051511
052101
020056

(151127
052502
051040
047511
040'523
000
052113
040!H6
000
053523
051n40
042524
046040
0300~ !

n264~5

II:AYI
ROTENB,

.A8CIZ
.Ascn

'K'
'''WRITE BurFER POTlTtON ENA!lLED. RANGEl

052tl t
0431 06
052117
020116
1)46102

POTOI!l

.Ascn

',wPITE l'Iup"rER ROTATION DISABLE!)'

030461
046102

ICTONM I

.ASCIZ

"KTll ENABLED'

052111
04350'5
020122
041517
032060

NOSIfRI

.ASCIZ

"SWITCH PEGISTER AT LOC. 1004,'

052111
043106
052117
020116
042514
047101
000

.EVEN

"ACYl! 27(1006)

2J-APII-77

00,11

PAGE 124

SFQ
I ROUTINE TO LClAll WOPST CASE UNIBUS PATTERN III ALL F'!'IF.F'

0,.672

0044!i7

0746'~

~!670'

1)'47 07

1'''67r~

o:n~06
')2~~"

024' \'

'J16'''i

r·1"'l1415
~~ 6700

n2474~
0247~(

\ll')n

024., it";

00(1)4~

3781

3'789
3790
]791
3792

I!!Q 0125

.ASCn

]779
3779
3780

3798

PAGE 123

HOCLKI

fl127()4
11)5767
001404
017700
010267
012703
.11' 4'0

3782
3783
3784
:n85
]786
3797

00111

020117
046505
04550]
051505
040040
020060
052111
044524
047506
041440
000045
041517
020116
020122

024724
024730
024732
024736
024742

]776
3777

n-APP-77

047045
n52121
047S14
051055
052122
030060
044040
047117
020105
047516
045503
0461 05
047511
047522
000040
046105
042105
000
054523
051440
000
000
051127
052502
051040
047511
041101
05! 040
020072

045
054523
n4H4n

OEC/X11 SI:"··f\~'" "(;INITeR
Q~!'"
DXQABM,Pl I
't-AP!'l-77 12 r 42
3767
3768
3769
]770
377 1
3772
37" 3
3714
3775

MACYll 2'H 1006)

LOADwci JSR
MOV
AD[I
CfoIP
!'IEQ
MOV
MOV
2. i
T8T8
3f1
BEQ
MOV
fli
MOV
MOV
5'1
MOV
611
DEC
BNE
ADD
C"P
BLT
811
"SF!
RTS
TST
781

170042
154322
154334
154314
IS4300
025006
154354
040000
145402
01\0400

175

')2475.
024754

Or,~ i(12

02476~

02~:~7

';2476 ..
024766
024"'2
024774
0247'"

002403
or~~67

·,00010
1!4242
117760

or( ;"

Cl,\p

C25106

02!iOO~

\«',

025004

f'\O~7B

025006
025014
025022
025026
025034
02!!042
02!!046
025054
025062
025066
0250'74
02!5102
025\ 06

177776
000002
171761
1 '17157
000040
177577
177]77
001000
1 13777
16'777
020000
0'1777'

R4, SAV04
LCOPI2,P2
onSET,p2
HCOpI2, R2

91
LClCClRE,pO
IIWCASE,P4
KTPPE5
58
t40000,RO
1l2,l<IPAp2
'256 .. 1'3
CR4), (RO).
R3

~E"OPY

,SETUP 12 !lIT STARTTf.lG ADDRESS
I ANY ~EMORY TO 1.0AD ?
:NO, GET OUT
:IF NO KT11, PO WTLL CONTUN PHVSICAL ADDRESS
,LOAD ADDPESS Of" WOIlST CASE DATA TABLE
,USF' I(Tll?
rNO- BRANCH
:SET VIRTUAL .DnpF.SS TO THE STAPT or PAGE
:"AP PAGE 2 TO PIlYSJC.aL ADDREss
: SET UP COU~ITEp
:LO~D DU.a

1I~,R2

Fl2,HCOp12
7.
PC, PST04
PC
(R4l+
R4"WCASEE

I AFTEP EACH ''56 "aROS, IIE"AP
,DONE?
,NO- BRANC,",
:Y!'S- EXIT
,MOVE DATA POINTEP
: TO NEXT WORST CASE VALUE
rAND CONTINUE

BLO
BF!

.WOFtD

177776,1,177775,2,177'7'7],4,1771'57, In

177737
000100

.10101'0

177757,20,177737,40.177677,10",177577,200

176777
002000

• WORD

! 77377,400,176777 ,loon, 1 '75777,2"00,173777,4000

157777
!l40000

.WOF!O

167777,10000,157777,20000,137777,40000,17777,100000

]793

]794
1795

3796
3797

3798
3799
]800
3801
]802
3803
]804
3805
3806

000001
177773
000010
000020
17",77
000200
000400
175777
004000
010000
1]7'777
100000

17'7775
000004

WCASE,

IIcASni

"I'~

QlBN DEC/XU STANDAPD MONITOR
DXQABM.Pll
21-APR-77 12i42

MACYll 27(1006)

23-APR-77

ooi 11

PlGE 125
SEQ 0127

.::,,'vv

,COMMANO TABLE. KEYBOAflO COMMANOS AflE MATCHED AGAINST IT.
i TNt ~lTCM MUST e. II'Y1I.#"1111
...... ,Uf'\
.. """ ABE~~VIA'rIONS A~t ALLcwtC.

3809
3810

COMTABi

lB07

3811
3812

3Rt!
]814
)915

~JI;o

025106
025106
02" 06
025i 14
025116
02!11 !6
02!!!IH

3916
3817
3818

025126
025126

lU9

025134

3820
3821
3822
3823
3824
3825
3826
3827

025136

0!!!2522

000116

025136

042523

000114

025144

012462

025146
025146

025154
025156
025156
025164

025166
t;)2!,E!
025174
025176
1)25176
025206
025210
025210

025216
025220
1125220
025226
025230
0252]0

025236
025240
1125240
025250
025252
02!5252
025260
025262
025264
025264
025272

042504
o 12!!! 00

000123

040515
012314

000120

044506
013214

046 t 14

052113
012562

043117

000106

052113
012632

047117

000

047520
01]004

000116

047520
013044

043106

000

047522
012744

047524

000116

047522

047524-

043106

000

025274
025]04
025304
n2'5312
025314
02'5316
1l25)?n

025322

.ASCI!
.WORO
TOKN
.ASCIZ
.WORO
TOI<N
.ASCIZ
.WORO
TOI<N
.ASCIZ
.WORO
TOKN
.ASCIZ
.WORD
TOKN
.ASCIZ
.WORO

.Ascrz

.WOPO
TOKII
.ASCIZ
.WOPD
TOl<lI
• ASCrZ
.WORO
TOJ('N
.lSCIZ
.WOPD

050114
021110

n47117

04'1'503
013130

000116

041'50)
nl3170

043106

t}15

000

.BYTE

004
010646

000

.BYTE
.WOIIO

000

025274
(125]02

TOK!<!
.ASCn
.WORO
TOICN
.ASCIZ
.WORD
TOJ(N
.ASCIZ
.WORO
TOKN
.ASCIZ
.WORO
TOKN
.ASCIZ
.WORD
TOKN
.ASCIZ
.WORD
10KN

TOK~

non
(It 2760

QlB~
DEC /XU STANDARD MONITOR
DXQABI'.PII
21 .. APR-" 12142

386)

000

010710
000104

3829
lelO
3UI
3832
3933
3n4
31135
38)6
3837
3839
3B39
3941
]942
3843
3844
3945
3946
3947
lUI!
3949
]850
3851
3952
3853
3854
)855
3956
3857
3ess
3959
]960
3961
3862

046116

010700

047515
013222

3829

3840

052522

000000

000

~n"

··flUNL",flUNt
,PUNLt
RUNL
-"flUN',flUN
'flUN'
flUN

·°11400","'00
''''00'

MOD
-·SEL", SEL
UEL'
SEL
··OES·,DES
tOEn
DES
··MAp· ,MAP
''''.aPt
MAP
··P'ILL", rILL
!!:ntL!!:
FILL
-'KTOP'F",I(TOP'P'
tKTOFrt
1{10Fr
·°1(TO"",KTON
'KTON,
KTON
-'PON",PON

\PO~'

PON
··POP'p'·, POP'P'
uorn
pOP'r
-. ROTOll' , POTON
'ROTON,
ROTON
-. POTOrf'w , ROTOrf'
~ROTorr'

POTorr
-. LPON· , LPO!!
\LPON,
LPON
-wCON·, CON
tCO'"
CON
-·COFp'· ,COFF
tCOf'r,
COP'P'
1!5,O
4,0
COMC02

MACYl1 27C 1006)

:n-APP-77

OnOOOO

.WOPO

OOt 11

i~~

PlGE: 126
SEQ 0128

0,0,0

Q.\8M DEC/XU aUNDUD "ONITDII
DXQUM.Pll
21-APII-" 12142

M~CYll

un
U83
3884

3885
3886
388'7
n98
3889
3890
]891
3892
3893
3894
3895
3896
3897
3898
3899
3900
3901
3902
1903
3904
390'!!
3906
3907
3908
3909
3910
3911
3912
3913
3914
3915
3916
3917

]918

3919

025)30
025336
02!IJ44
025350
02!IJ56
025357
02!IJ64
025365
025372
Q25400
025406
025414
025422
02542'7
025434
025442
025450
025456
025464
025472
025500
025506
025514
025522
025530
025531
025536
025544
025551
025556
025564
025572
025573
025600
025605
1)25612
025620
025621
025626
02562'7
025634
025640
025646
025654
025657
025664
02"i667
025674
025675
025702
025706
025714
025721

050045
020131
020122
020040
057
040
040
040
020116
054S24
051117
043501
041511
045
054524
n51117
024040
051123
026101
046106
026124
026111
026101
041457
000
045
046505
051117
040
047520
040506
000
045
020040
n40
020040
040
040
04n
040
047103
020040
020040
052116
040
000056
025667
!l40
000
040
020040
n20040
020040
040

~969

3970
3911
]972

J971
3974
:t975

00111

PAGE 127
SEQ 0129

051101
051105
020040
020040

052111
047522

PERII11

.ASCII

'UAllny EIIIIDII

02004/l

PIIEGi

• ASC II

020040

PCDNTi

• ASC II

020040
040520
04645'7
020131
047516
022523
040520
042440
026440
040512
026126
052503
027507
OH12'7
042103
052103
052520

052522
044522
046505
044504
052123
000
044522
051122
026455
026115
041120
026101
04'7111
046501
052101
043501
022451

IIUNDUi .ASCIZ

054523
042440
035123
020n40
04252'7
046111

052,23
051122
000
020040
020122
035123

NUMSYSI .ASCIZ

020040
052101
02004n
n52123

020040
040
020040
052101

025726
n2'!17ll
025740
025'746
025754
025756
025764
025766
025774
025775
026002
n26007
026014
026016
026024
026025
026032
(126040
026046
026054
026062
026066
026074
026077
026103
026106
1)26111
026116
026121
026124
o 21st 30
026136
026144
026152
926160
026166
026167
026174
026177
026204,
026205
026212
026220
026226
026233
026240
026246
026250
026256
Q26264
026265
926272
026275
Q2U02
026)10
026311

020040
040
020040
020040
000040
020040
020043
020040
000
040
042520
105
026523
020040
000
045
020040
04'7125
n42117
051104
02'7104
0'!!1040
042515
040
040
020040
040
042515
040
020040
041445
020040
041440
020040
051440
040
040
020040
045
040
040
020040
020040
053440
040
020040
020122
020040
051040
040
040
020040
040
042440
000
127

PE1I1I2.

.AScn

IIUN PUITY/MEMDRY OIAGNOSTICU'

'VAIIITY EIIIIOII ••• CJU',SPV,PSA,CUA,rLG/IlIT,WMAIII,COATA,CTAG/CPU)\'

"SYSTEM ERIIDIISI'

NUMPWI'!j ,ASCIZ

AMOONM! ,'SCII
ApC.

020040

AMOSTAI ,ASCII

050040
020124
020040
051105
040
020040

051501

MOIREI

027040
041522

APSCNT, ,ASCII

0201)40

AERRSI

._SClZ

020n40

020040

,ODD
KOL051

,ASCIZ

020040
000040
020040
020040
020040

020040

HOLD61

,lISCIZ

020040
000
020040

HOLD81

.ASCIZ

lENDI

,Ascn

"IACYlt 2?Cl006)

POWEI'! FAILS,'

AT '

,ASCII

020040

QABM OI!:(,/Xll STANDARD "'ONITOR
DXQABM,Pl t
2\-I\PII-77 12142

3920
3921
3922
3923
3924
3925
3926
3927
3928
3929
3930
3931
3932
]933
3934
]9]5
3936
]9]'7
]938
]919
3940
3941
]942
]943
3944
3945
3946
3947
3948
3949
3950
]951
3952
]953
]954
3955
]956
3957
3958
3959
3960
3961
3962
3963
3964
3965
3966
3967
3968

2l-~PII·77

.IMPUIIE MESSAGES.

)864
3866
3867
3868
3869
3870
38'71
38'72
3873
3874
38'75
3876
387'7
3878
3879
3880
3881

2'7C 1006)

STAT -

.ASCII

PASCIIT '
EIIIICNT '

PC--

23-AplI-77

00,11

PAGE 128
Sf-Q 1)130

041520
020040
050101
020040

1)55
020040
02650]
020040

040520
020040
051104
022504
042116

AENOI.

,ASCII

UN021

.ASCIZ

051523

SPASS,

,ASCII

027040

APASSI

,ASClZ

050117
000
040520

MODENDi ,ASCIZ

' DI'!OPPED"

ApSENO I ,ASCII

'ENDPAS-'

APC-'

PASS. '

020040

027040

BPSCNTj .ASCIZ

020040
051511
0271 0'7
046125
050117
000045
047125
055
020040
035040
000
051520
055
035040
000045
051123
02004n
051123
020040
040524

020040
044040
046440
020105
042520

TIMX.

.ASCIZ

044524

TOTIM,

,ASCII

' RUNTIME·'

072

TlllISi
TMINS,
TSECS,
PSTIMj

,ASCII
,ASCII
.Asen
,ASCII

• pSTIM!:-'

MMINSI
MSECSI
AEIIRORI
ACSIIAC;

.ASCII
,IISCIZ
.ASCII
,ASCII

ACSRCI

,ASCII

020040
000
051503

020040
040522

AOTERlli • ASC II

020040
027523
020040
051501
020040
051127

020040
020102
020040
040
020040
042101

ADTE61

,ASCII

SIB'

ADTE]i

,Ascn

WAS'

ADTE21

,ASCII

WRAOR '

020040
040504

020040
0511 04

ADTE5i

• ASCII

RDADII -

020040
000
040504
051122

020040

~DTE4i

,lIScn

040524
051117

ADT!:ui .lIScn

' DATA ERIIOR'

051117

021504

ADTEXI

'WORDI '

044524

020101
020040
020103
020040
041524

IS HUNG. MODULE

"
"

,."

"CSRA '
CSRC '
STATC '

ASTlTci .ASCIZ

• ASC II

"CSIIA •

OPOPP~D,,·

OA8r.! DEC IXl 1 STANDARD MONITOR
21-APR-77 "12142
DXQABM.Pl1
3976
3977
]978
3979
]980

026)16

040

026317

Cl40
022456
040
040
040
000056
046445
044501
020055
040
020040
020040
053440
040
020040
045
020040
020040
042040
051105
047440
020106
(120040

020040
000
0511 05

)982
3993
)9B4
3985
3986
]997
]98S
3989
)990
3991
]992
399]
3994
3995
3996
3997
]998
3999

026324
026)27
026314
n2631!l
026)42
026]44
026352
026]60
026]65
026372
026400
n26406
n26413
026420
026423
026430
026436
026444
026452
0'6460
{)26466
026470

"oilO

0264 7 6

()~j44o

O!lll1 'I

026504
026513
1'126516

051040
000
040
040

OEelXl1

STAND~PO

MONITOP
12142

3991

400t
4002
4003
4004

QAB'"

1l26~12

DX(lAP,~ ,PI 1

4005
4006
4007
4009
4009
4010
4011
4012
4(1 I 3
4(114
4015
4016
4017
4{l1B

2\ -APR-77

MACYl1 27C 1 006)

23-APR-"

ooi 11

PAGE 129
SEQ 0131

020040

ADTE7 I

,"SCI~

021522

ERRNMBi

.ASCII

• EPP •

."'..

02004n

020040

AERNMBi

.lISCIZ

046505
or;25i4
040520
02on40
027523
020040
051501
020040
000
02" )40

043040
042522
040
020040
020102
020040
040
1)20040

MEPR1,

.ASCII

""'EM FAILURE- PA '

MERP21

.ASCII

S/8 '

MERR)I

.ASCII

WAS •

MERP41

.ASCIZ

020040
020104
027040
020101
051522
047440

URNMI

.ASCII

AEFlCII

.ASCII

• DATA ERROPS OUT OF •

027040
051504
022504

AEi<TOTi

... sca

• WOPDS READ"

040505
040
040

040
040

OECVALI

.BYTE

o~O~. I)

020040
052101
047522
052125
020040

MACY11 27(1006)

IUD •

40,40,40,40,40,40

23-APP-77

00111

PAGE 130
SEQ "132

,BUF'FEFI APEAS.
026522
0'60;2'
026712
0267'52
0"002
027nl2
027012
0"212
027212
0?7,52
027252

.F.:VEN
MODQI
I<I3UF:

000014
000004

:Pr)f)" F"P 61) "ooUtE POINTEFlS,
I KEYBO~ PC al)FF'EP. KRUFt LONG
.8LKIII

USPI
SSPI

000100

.BLKW

.8LKIrl

64.

: MONITOR STACie: APEA

,FlLKW

16.

:~PECIA1,

.~LKB

100L
TYDIlL

SPBOT,
000020
000& 20

nJo~72

nlUU{I

0112"
031224
031226
031230
0312'2
031234
031236
031240
031242
1'111244
1'131246
031?50
031252
011254
oH,56
0) t '60
01,,6,
031264
031266
011,70
0317'2
0312 7 4
031276
031300
o Jll02
0)1304
031306

oOoOno

SPSpF:C I
IOQI
TYPEO,

• 1"'.. 11 I!

"'ON ITOP

401 q
4020
402 I
4022
4023
4024
4025

4026
402'
402R
4029
4010
4031
4032

40n
4034
4035
4036
4037
4038
4039
4040

4041
4042
404)
4044
4045
4046
4047
4049

4049
4050
4051

4052
4053
4054
4055

0]1310
031312
031314
03016
011320
031322
031324
031326
031330

4056

1))1332

4057
4058

031334
031336
031340
031342

4059
4060

onoooO
o')ooon
nnoooo
000000
onoool')
000000
000000
000000
000000
000000
onoooo
000000
Oonooo
onoooo
0000110
000000
000000
000000
(\00000

ooooon
noooao
000000
000000
0('10000
000000
nooooo
1')00000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

N'F,N
OPE'll
OPEN
I!PEIIJ
OPEN
OPEN
OPE"!
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN

0"11:11
OPE>.!
OPEN
OPEN
OPE'!
OPEI>/
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPE~

OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN

,PATCH
:PHCH
:I'ATCH
, P~TCH
,PATCH
:PATCH
:PATCH
:PATCH
:PATCH
:PATCH
,PATCH
,P."'CM
,PATCH
: PATCH
,PATCH
: PATCH
: PATCH
: PATCH
,PATCH
: PATCI'
,PATCH
,PATCH
:PATCH
: PATCH
,PATCH
,PATC'"
,PATCH
,PATCH
,PATCI!
,PATCH
:PATCH
,PATCH
,PATCH
,PATCH
,PATCH
I PATCH
rPATCH
,PATCH
rPATCI!
,PATCH
,PATCH

APEA
APEA
A~EA

AREA
APgA
AREA
AREA
~RgA

AREft,
APEA
ARF.A
~PEA

AREA
AREA
AFIFA
"Rf:A
AP~A

AREA
AREA
apEA
APE~

APEA
AREA
APEA
"PEA
APEA
AREA
APEA
AREA
AREA
AREA
AFIEA
AREA
"REA
AREA
AREA
AREA
AREA
AREA
AREA
AREA

sncll AREA

OA8M D1!:C IXt 1 STlNDARD 'lONITOll
DXOABIoI.Pl t
21-~PII.n i ,,42

4061

(31)44

4062
4063
4064
4065
4066
4067
4069
4069
4070

031346
Q31350
031352
031 j54
(31)56
011360
031362

011364

4071

031366
031370

4072

031172

40'7]
4074

0113'74
031)76

4075

031400

4076
4077
4078

031402
031404
031406
031410

4079
4090
4081
4092
4093
4094

i)]1412

4095

031422

QABM

000000

onooon
olloooe
000000

rJOG~UFI

000200

t:~~/XII

ST~'in~p!,

400

,~;Ir~1!

'4aCYl1 27CIOMi)
,FlOUTI~":

1''27 2~
02 7 ,52
027,60
112'262

00/11

PAGt;; 132

TO DF:TII;RMINE WHEIHFP WlllTE PUFFEP 1l0TATION SHOIILD TAI<E PLIICF.,
OETFllMI~E US!': OF

.~IC'Q

:"1)

150530

027;>66

nO(l~(I~

0'2'7270

(112767

02'7276

012767

)00002
000002

153632

02730~

016767

152060

1~2066

027312

016767

152054

152062
150462

1'12'7326

.; (~!)

c -:-

, 200t

0050H

r I 274 ~

,~,

I~'

r: ~i

'HIj'2

on"737
!t276'

IP772

02~ 344

: ' .,

027102

4118
4Ull
4120
4121
4122
4123

02'1434
027440
027444

n27450
027452
027460

t ",,' 60 '7
0' '-71\7
1105067

1 '§!.7(\4
(115246
1 '50362

150)74

i 05067
105057
"'1 £';~ or
(',~1 004

005167
000167
004'567
001220
(132'67

31/

1 ~ I ~70
5T8;'111

151673
ISO)!! ~

n00777

151540

000777
000007
001000
000010
150324

151530

027462
027470
027476
1'127504
027512

042767
042H7

4132
4131

02'520
027522

001403

112767

t 77777

41]4

02'530
02'75H

411fi
4137
4138

105767
'l01 "3!
01 ;P6i

151550

4135

02 1 'SU

OH4t4
06275 7
(162767
'I! 6"167

151526
151514
151512
151506

2./

tug

J:ri'$~?

4140

.~'" ;~H

4141

n',~"is<

4143

O'2'!iH

4tH

"21370

'~:~ ~!'

1'!0%40

'Ii

11", .' ') i

MDI,4!

: CT,EAP T'!F' PDP-11/4"i INDICATOR

tH,BUSEV
I!!t pIRQRG
" ,"DL45
ICTPRES
Hs,BUSEV
<usSRO
f(TPIlES
KTPpES,1<TSAV
.auSERR, BUSEV
PSw
ROT I
RELOC
",LIJCOPE

: ~ET UP A !IION-EXI STF'NT ADDRESS TRAP
: IS THE PROGRAMMED HITERRUPT REQUEST REG 1ST"?
:IF' IT IS, SF'T THI'; FLAG I:<DICATlIiG At<; 11145
:CLEAR THI': MEMORY "'ANAGF;MP.NT INOICATOp
I SET U~ A NON-EXI STF;NT ADDRESS TRAP
: IS THERE A I(T-l1 ON TH1S SYSTEM?
,IF THERE IS, Sf'T TilE KT1I PRJl:SENT rNDICATOR
,SAVE FOR USE I'I SE'cOHD PASS OF CHAPJING
: REPLACE THE BUS ERPOIl TRAP VECTOR
: RESET THE PSW
I ASSUME NO SUFFER MTATTO".
I ASSUME NO CODE RELOCATION
: Gr." LOC(lPF. ADOI'. 1"1'0" LOC 0
:BP IF LINKED WITH CONFIG/LINKER PPOGRA~
: IF NOT ASSUMES NOT IN CHAIN "lODE
: INI)ICATE SETBUF HAS flEEN RUN
:GO PREPARE TO EXIT SETBUF POUTINE
,GET TOP 12 BITS or LOCORE PHYS AODR
: AND PUT IT INTO LC("JR12
: rs IT ON A 256 WORD BOUt/DARY
,YES, CONTINUE
CLEAR OUT LOWEP BITS
I PQ!JNDING OFF' TO 'lEXT HIGHEST 256 BOUNDARY
,ROUND UP TO THE IIEXT 256 wORD BOUNDARY
: ALSO I"'DICATE THAT BOU~O~RY IN LOCOP12
,ARE WE I'" CHAIN '"'ODE?
,IF 110, GO DETElIloIINE IF KT IS TO BE UII~D
, I f YES, SET THE CI!UN INDICATOR
,IS THE IfTlt nAILABLE FOR USE?
,IF' YES, GO SIZE MEMORY USING IT
I r, NO, O"lLY SIZe: MtMORY UP TO 2aIC
/INYTlALIZE LOOP COUNTEII TO POnlT TO BA:iK "
,INITIALIZF THE COU"'TER 0,. II< CHUNKSCB~NKS)
,POINT TO THE FIRST WORP III THE NEXT 11< SlNl(
,WILL TRAP IF LOC DOESN"T EXIST
IIF' NO, CONTINUE PROCESIflG AT 48
I I ' YES, UP THE !!EMORY BA"'K COUtfT
,HAn: 28 BANICS BEEN COUNTED?
: IF' NO, GO CONTINUE SIZING
,IF' YES, I~DICAT!: THE NUf.lSER Of WORDS I~ PO

TST
!'IOVB
CTJll!\
!olOV
CLR
CO:.lB

"'OV
CLR
CLRS
CLP8
'1I)V
BNE

J"'P

JSR

LOCOPE
BIT
BEQ
BIC
BIC
ADO
liDO
MOV
BEQ

KTTtSTi TSTB

!.'?~'5'5t)

: SET up A IlESERVEI) 1NSTRUCTlON TIUP.
:CLOP A ;';01'0 0" THF SUCK FOR A NEW psI SET UP Tr'l FX IT WITH PTT INSTRUCTION.
I IF' RTT ~''JT V~LtD IT "!ILL TRAP OUT.
,Tll~P CC""F'S HERE. CHANGE llTT's TO RTI'S.
:
FlY SF.TTI~G THE INSTRUCTION VALUE'
,CHAIJGE SET OF CHKSUM WORDS BECAUSE
:OF PT1"S REPLACIIIG RTT"S
:OP' ALL PTI"S TO THOSE OF RT!"S
: RE:STORF' THE Ile;SERVED INSTRUCTION TRAP VF.CTOP

I>IIJV

Move

151562

_FlTl,TRClA
• pTI, IITTI
CH1<L2,CHI<Ll
CHICH2,CHICHI

l'OV

CO'l

151560
000420
165152

.! s, RESlv
-( SP)
OS,-(SP)

CLPR

"'OV~

4$/

151671

4125
U26
4127
4128
4129
41 ]0
4131

o~7516

151/61

150420

11')5067

012"67

027410
027414
027420
n£i424
027<\32

1110444

OIlS" 17
1 ns! 67

027352

4115
4116
4117

156HO

('00001
1'51725
027402
177572
15171(>

02' ~56
02H64
n2 7 3 7 0
f):l' ' j ' 4

4114

4~, ~,

23-"PR-77

SETP!;"I MOV
CLP
MOV
PTT
!lOV
!lOV
MOV
MOV

1'1276 '

(\2"~l?

4tH

:F'IRST ADDPESS IIFTEP QUEUFS

/ RII OP RTT INSTPUCTION.

027,40

4124

: BUF'FER HOLOS LAST COpy TAI<EN OF 11/60 LOG

,.,"'0 TO t'ETEPr.1INE CORE LIMITS OF' P,UF'F'EP P'll'AT10H. ALSO TO

4107
4108
4109
4110

4113

20n

2l-,PII-"): lJ 42

411)6

4111
41 t 2

.BLI<W

, PATCH AllEr.
,PATCH AlIEA
,PATCH AilEA
,PATCH AlIEA
,PATCH AlIEA
,PATCH AlIEA
,PATCH AIlEA
, PATCH TlIlEA
,PIITCH Alln
,PATCH AIIEA
:PATCH AIlEA
,PATCH APEA
, PATCH IIIIEA
,PATCH AIIEA
,PATCH AIlEA
:PATCH AIIEA
,PI\TCH AREA
,PATCH ARP..&
:PATCH ~IIE?
,PATCH AREA
:PATCH II ilEA
:PATCH AREA
:PATCH AREA

BUFS IZ.~ MODNM-STAPT

4090
40111
4092

4094
4095
40116
4097
4099
4099
4100
410t
4102
4103
4104
41 n!i

PAGE 13t

.-.

032022
1'124037

DX'QlE~.PII

0011 t

OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEII
OPE II
OPEII
OPEN
OPEN
OPEN
OPEN
OPEII
OPE II
OPEN
OPE'"
OPE'"
OPEN
OPEN
OPEN
OPEN
OPE"!

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

031420

21-APII-77

SEQ 01]3

1'100000
000000
000000
000000
000000
000000
000000
000000
000000

031414
Ol! 416

4096
4097
4099
4099

"'"CYU 2H t 0(6)

BNE
foIOV
MOV
CLP
ADD
ADO
I'lC

LOCORE
SETXT
R5,TOPI2S
#777,LOCORE

2.
.777, LOCORE
",LCOPI2
flOOO,LOCORE
"n,LCOU2
42,HCOIl12
1<TTEST
'-1, CHN
II:TPRES
SFTl<T

,5$,4
'-4000,RO

PI
t4000,RO
to,n~o)

III

CMP
BNE

UA.,Rl
U

.'00

1411"0,1'0

,"'0,

QlBM DECixl1
OXQAS"I.Pt t
4146

4!P
4148
4149
4150
4151
4152
4153
4154
4155
4151S
4157
4158
4159
4160
4161
4162
4163
4164
4165
4166
4167
4169
4169
4170
4171
4172

4173
4174

4175
4176
4177
4178
4179
4180
4181
4182
4183
4184
4185
4186

4197
4189
4189
4190
4191
4192
4191
4194
4195
4196
41117
4199
4199
4200
4201

027576

o:n!!oo

STANO~RD MONITOR
21-APR-77 12r42

:23-APR-'77

ooi 11

PAGE 133
SEQ nll5

000401

(5"*. CSP}?

ISKIP OVER 'I'HI': NEXT I t;STRUCTION
i rr THE~E WAS NO LOC~TIQN AT LAlOr Ti<Y,
I REMOVE THE TIlAP 'ROM THE STACK
,ISOLATE TNE 12 MGM ORDER BITS. FIRST,
: GFT THE I-'OST SIGNIFICANT BITS IN THE 1.011 BYTE
,ALIG'f THE BITS TO ACCOUNT rOR
,EXTENDED ADDRESS 8ITS (1'7 + 18)
rELIMINATE THE UNWANTED BITS P'ROM RO
,ACTtl CHAIN?
I NO- DON'T Aon ROOM FOil MONITOR
,YES- ALLOW 1100'" rop MONITOR
,GO TF:ST THE ME!40RY
I TUIlN ON THE KT11

02~!!~E

!! :

,"UD

027602

11003110

IS*'

SN~~

027604
027606
1127610
027614
1127620
027622
027626
027610
027634
027642

(06)00
006300
042700
105767
1(')0054
162700
000451
004767
('112737
012737

ASL
ASL
BIC
T8T8
BPL
SUB
BII
JSR
MOV
MOV

RO
flO
1170037,110
CHN
SErCO'"
UOO,RO
Sl':TCOM
PC ,l(TINrT
t77406,lIIKIPOR2
#t, _.sSM
,TURN

027650
027656
027662
027666
027672
(I?7S7S
027704
027712
027714
('2772()
02'1722
027724
0277 30
027734
027736
0,7742
027746
027750
!l27752
027760
°'7764

012737
016701
Mi2701
042701
1)10137
062737
062737
ont 17t
('12700
0004!l1
022626
1)16700
105767
100006
01)5067
1)10067
000005
0()O667
()t2767
010067
(1)4767

MOV
MOV
ADD
8IC
MOV

.2htu4
LrORI2,1I!
t40,Rl
B7,Rl
Rl,UKIPAR2
II' ,11#40000
.40, .,KIPAR2
U
'76(10, RO

0,7770
02"7'74
031)000
(I]I'!004
031)010
;1)0(')14
0]0016
030022
030026
03003(1

004H7
016700
!l10()67
166700
0'227!l0

(I~()OH

"30036
()30044
030052
0)0056
"10062
010064
010064

170037
151472
000100
162160
077406
000001
027722
151342
OD0040
000037
172344
000000
()00040

(31)071)

SETlCTa
172304
177572
000004

1)40000
172344

1107600
142414
151356
15134'
151326
1115246
151242
000102

150024

!!:

JSP
~OV

!lOV

!5U14

sue

1)(')0040

C"IP
BHl
INCS
15TB
SEQ
C'4P

1~1023

1 n5267
105767

MlO

ADO
FINE
:MOV
BII
CMP
2*1
MOV
TST8
lSI
BPL
CLI!
MOV
RESt'!'
fiR
SETCOMI MOV
MOV
SETC Mli JSR

1)00626
10;1226
151224

151271
151256

no 14! 3
022100
1(11(110
OJ 6767
16"767
1 ~'5267
1)04'767
(1(\0"05

000400

005061

141'710

8"'1

151164
15t 154
151231
174610

"ov

1 '51174
151166
1$1

SlI8
INC£I
JSP
PES!:!

elN I(T11

,SETUP TII>IEOUT VECTOR
I GET TH!: TOP or TH!: PPOGRAM
,ROUND IT UP
I MAKE SURl': IT" SAIl( BOUllIOARY
,LO~D T~E 1':'1'11 flEGIST!:R
iTI~E

,CHAIN ~ODE?
rNa, JUST GO TEST MroMORY
I YES SHUT orr I<T rOll raST CHIIIN PASS
I SAVE THE REAL MEI.!Opy SI u:
:TURN KT OFF'
:NOW GO SIZF.: "I'I'HOUT IT
: PESET 8US F.:RROR TRAP.
,HI ADDP TO HCOPI2.
:TEST MEMORY r(lR 8~SIC FUNCTIONING
,VIA 1I0DRESS UP/DOWN TEST
,CHECK 1I'0R PARITY Mfl:M. AND TUIIN IT ON
,OIr, BETWE€I< LCOP12 AND HCORt2
,INrTULIZE SAV!!: LOCATION FOR ICTOv/o"

KTTEST
'8USERII,4
PO,HCOFl12
PC', TSTMEM
PC, ANYPlR
HeOPI2. RO
PO,HCOPSV
1~COP:2,~O

j~UST

140, PO
SF-TXT
POT!
KTPPES

I IS IT?

tEAST 40

0('0205

11
1$

HCap 12, arP'MX
LCOR 12. O,rMX
R!l:LOC
PC,LOADWC

lIP' 8K OP GPE~TE'R, ALLOW CODE RELOCATION
,BPANCH IF flO"
:CALCULATE Tilt '1IGHFST LOC TO WIIICIl
,TH" PROGP.a~ CA'i (IE RF:LOCATEO
It!;lIBLE PELC1ClTIO"
,LOAD Wr]RST CASE lINTBUS NOISE PATTERN
: TURN OFF K'l'I j IF If,; US ..
ICLEAR LOC 0.

23-API<-77
PTS

CO"'''!A'''DS

,rORGET IT I ' N(lT.
I ALLOW POTATION.
,NO IInOCATIO'" TP' NO KTll

140('), PO

CLp

MACYl1 27(1006)

CUT IF THIS LOCATION IS iVXi"

U
(Sp,+, CSP)+
KIPAR2,RO
CHN
SETCOM
KTPRES
PO,HCR1211

SETXTI

QAIIM D1I;CIXtt STANDARD MONITOP
OXQ1IB M."11
?1-APp-n 1'2142
4202

"'ACY11 27(1006)

00.11

PAGE 134
,,,,XIT.

;1
1\
4'03
4204
4205
4206
4207
4,o8
4209
4210
421 I
4212
4213
4214
4215
4216
4217
4218
4219
4220
4221
4272
4223
4224
422'5
4226
4227
4229
4229
4230
4231
4232
4233
4234
4235
4216
4237

4238
4239
4240
4241
4242
4243
4244
4245
4246
4247
4248
4249

4250
4251
4252
4253
4254
4255
4256
4257
4258

4274
4275

4276
4271
4278
4279
4280
4291
42112
4293
4294
429!!
4296

4197
4299
4299
4290
4291
4292
4293
4294
4295
4296
4297
4298
4299
4300
4301
n02
4303
4304
430!
4306
4307
4308
4309
4310
4311

431 2

nil
H!'"

23-APFI-17

no, I ,

P.G1t 13!
SEQ 0137

I "'EMOPY ADO~tSS UP 100Wtl TEST

o!r f)":
o 3et ('10
030t02
030t 04
030110
n301' 4
('130122
030126
03('1110
0;0132
0;0134
030140
030144
0301!0
030152
030156
030160
03(')162
0311\64
030\ 70
030172
030174
030200
010204
030206
030210
0302"
030216
(') ~('I2'2
O~o226

030,32
030?3(1
030240
030244
0]02'10
030252
010254
030256
010262
030264
'130270
0]n272
1'l31')274
031')276
030100
O)/l 3n2
"]03114
03('1306
030310
0)0312
II 303 16
(30)20
OV1372

QABII
Oe::/Xl!
DXQA8'" ,;01 I
42'59
4260
4261
42&2
4263
4264
4265
4266
4267
4268
4269
427('1
4271
4272
4273

,H1006l

.', ,'",-17 1 ~! 42

030124
0303~0

030334
01'340
03('342
('1]0]44
1130350
030354

}t~:~1

000207
0167n2
016701
11\2767
105767
001002
010100
000404
(I~ 271)0
010267
012703
010120
M2701
005303
0013'73
005202
t'l20267
0t'l2754
005302
1627nl
105767
001002
nl0100
0004(\4
012700
010267

• 5: ~. "'I

151114
t!' 104
030476

!4~662

! '511~6

04(1)01)
142200
nOO04{1

1 S 1 036

.,00002
1511 00

n411076
142122

~ 1 ?"(\~

r:-Ot"n4t'
150764
150760

TSTMEIoII eMP
BNE
RTS
!.IOV
5.i
MOV
MOV
1S,
TST8
BNE
MOV
BP
2$,
MOV
MCiV
MOV
MOV
481
AOD
OF:C
BNE
INC
CMP
ElL!
DEC
SUB
TSTM11
TSTII
ElN!
MOV
BP
MOV
1$1
MClV
"'('IV
2' I
MOV
HI
ClAP
liNE
4$,
SUB
SUR
OEC
RNE
DEC
CMP
aGE
MOV
MOV
DFC
1<SL
ASL
ASL
ASL
ASL
DEC
ASL
TSTP
TST"'I
8"1E
MOV

38,

000002

011067
n,0167
('101120
! 6270('1
1617nl
(1)5303
!)f)1165
oo~ ]02
0';10267
002346
1)16702
010201
005302
006301
0('163('11
006301
O()6101
006301
(1(15301
1')1)6301
I ~"i767

000002
000002

15(1742
1'10736

1~0766

1)0 1 ~1')2
Illotl)()
0"1041) 4

POP

5TA'HaR'J ·.''1'lITO''<
2'·~PR-7'

"142

ryl 270~

1)40075

010267
012703

1421)1j

"~CYll

1)1)0002

16"~O

,,)~'lOO2

00137"
020267

('1303~!\

n1)2)51

O303 7 n
03n3'2
0)0376
030400
('130404
030406
030410
030412
030416
1))0422
0]('1426
030432
030434
0]0436
030442
030444
030446
030452
0]0454
030456
0]0460
030464
030466
010474

O()52n2
062 7 01
1 n'5767
001002
010400
000404
('11270('1
010267
012703
011 (167
01 ('1401
005101
n20t67
onl016
005720
062704
005303
0(11364
005202
020267
002145
(112767
000207

0)0476
030500
030506
030512
030516
030522
030526
030532
0]0536
0]0542
030544
030550
031)554
030556
030562
030566
030570

022626
012767
105267
010067
104413
010167
016746
016146
004567
026365
(116746
004567
026400
n16746
004567
026413
004567

1l012(11!.

18
1<2
.2, Rl
KTPPES

IUSE teTI!?
,YES- BIlANC!!
:NO- I,OAD V1PTUAL ADDPESS POI!>!TEP WITH PHYS

IS
PI, PO
2$
UOO76,PO
1<2,KlPTlP2
O?"P3
liFO, ME"'WAS
PI, "'EMWAS
MF.pp
."PO
'2, PI

,DOES LOCATICl~l
,NO- lIRA~CH

CON'l'1\l~

ITS I'A?

3S
: Al"TF.R C'H11:CICiNG 1 Bl,OCK, ADDRESS 'lEXT
:DONE?
,NO- CO~TINUE CIolECKING
,YES- 511:T '1'0 lOAD "'FMOPY
,p'pn", TOP DOWN

P2
P2,LCOPI2
TST M I
IIC01l12,1<2
R2,1<1
R'
PI
PI
Rl
PI
PI

PI
PI
I(TPPES
1$
Pl,PO

: IISF' 1':111?
,HS- BOA"lCf'
:110- LOAD VJII'1'I]~L POP:TF'P 101fT'"
IPHYS!CU ~1)l:'ol';SS

~3-ArR-77

no: 11

MOV
"'OV
~OV

FI?, KIPAP2
t32"P3
I'll , ~RO
iii 1'1 0

000002
TST>.43 :

150700

040000
141727
000040
t50564

1$1

COM
SUR
SUB
DEC
fiN.
DEC'
C>.4P
BGE
INC
ADD
MOV
TST1'I
8101£
f<lOV
RP
MOV
~(\V

2$ :
3$1

150554

481
000002

150542
015246

147310

015246

1472'6

PAGE 136

NOMEM I
MERPj

"'OV
MOV
MOV
COM
CMP
8NE
1ST
ADO
DEC
BNE
INC
CMP
BLT
MOV
FITS

:LOAD VTFlTun >iP~ TOP ADl'lRESS OF'
II ST I:ILOCK T"i paG!;: ?
:MAP p~t;F: 2 TO PI'YSrCAL
~ COIINT ~ "'L(1C"
: tOAD L'lC ATI 0" '''ITH ITS PIoIVS ~OnRESS
:COMPLE"'EtIT IT

12, PI
#2, PO
R]

3S
P?
P2, l,COPl 2
TST"2
1<2
.2," 1
PI,p4
KTpPES

is
Fl4, PO

: AF'TER I,OM) p, ~
100'IE?

RL"CK,

SET UP f"OR IJEXT

n'o- BRA'IC"

:YES- SETUP T'1 C"FCK IT

:UST£ KTll1
: VES- BPII/'CK
:SI':T VIPTI.1llL

~[)"PESfi

FQIIA!. TO PHVS

,SET VIPTUAI, lll)DI<ES~ TO STAPT OF PAGE'
: MAP PAGE 2 TI) PHYS1CAL ADDRESS
:COUNT A BLOC'"

M,F11
P1
Rl,"'£MWAS
MI;:RI'
(PO)+
'2, Fl4
P3

IOOES Lor.~rrO~j COflTAIM COMPLEMENT 01" ITS pHVS ADPR~SS?
INO- 8R.aNCH

3S
P2
R2,HCOP12
TST M3
'!lUSERR,4
pC

(SP)+, (SP)+
CMP
MOV
.8USEIIR,4
M£MEPF
INC8
RO, MEMVA
MOV
Gl!:TPAS,MEMVA
PI, MEIISBE
MOV
MOV
I>IEMPA, - (SP)
I'F"lEA,-(SP)
MOV
JSp
R5,OACNVX
MERR2
MOV
MEMSaE,-cSP)
P5,OACNV
JSR

164026

MOV
JSR
f>4ERR4
JSII
MEMPA

ADD~f;SS

2$
140000,1'10
R2,l<IPAI'2
n2"P3
(OPQ,MEMI<AS

,CHlINGF 12 BIT ~DDPESS AFTER CHECJ<ING A BLOCK
, DONE?
,NO- BPANCI-!
,I'IESF.T THI': TI ,I,e:-OUT TP.a P VECTOR
I YES- pETURN
,POP THE SUCK POINTER TWIC£
I RESET THE n ME-OIIT TPAP VECTOR
I SAVE FA tLING ADDRESS
,SAVE EXPECTED CC"'n;NTS
,CONVERT PHYSTCAL ADDPESS TO ASC I I

,CONVEPT SHOULD BE TO ASCII

ME~R3

150434
163352

~OOI<ESS

I"AI' VA TO TOP OF 1ST BLOCK IN PAGE
,MAP PAGE 2 TO PA
,COUNT
FlLOC'"

1<3

2S1

OJ (')\ 04

150444
163364

,AI"'1:EP \ PLOCK, UP p~Gf ADDRESS FIELD
,AT TOP?
,NO- CONTINUE
IYF:S- TEST GOINt; DOlo'"

R2,HCOPI2

lSI

150536

150466
001204
150466
150454
150452
163410

: ANY MEMORY TO TEST
rYES, CONTINUe:
INO, RF-TUR.N
,LO~O 12 RIT LOCOI'I!: ADDRESS
'~1 CONTAINS 1.OCORE PHYS ADDRESS
,LOAD TIME-OUT VECTDP
: USF. KT11?
,YES- BPA'iC!!
,NO- SI':T VA EQUAL TO PA
:SET VA TO PAGE 2
,MAP PAGE 2 TO PHYSICAL ADDPESS
,COUNT 1 flLOCI<
ILOAD LOCATION '~ITfI ITS ADDRESS

U
1<2

.40076,"<1')

~r'5102

150623

Lcb~12,R2

LOCOI'IE, PI
HIOlAEM,4
KTPPES
28
I'll, PO
3$
HOOOO,RO
P2,KIPAR2
132"P3
~!, eRO) +
.2, Pt
Rl

MOV

I'I!l'l1 n 3

03~356
(\3'36~

HCOP12,LCOPI'
5S
PC

~~'l

'l~OO41)

005110
1627 n,

"C100~l

15:

'101 P

03C1162

6Hl~74

l!; 130

.,01 no!

MEMWAS,-eSP)
P5,OACNV

,CO'lVEPT WAS V1lLUE TO ASCII

115, TOP12S

,GET NEW HIG;! COP~ VALUE

~13R

qAljIM
DEC/XU STl NDARD !lONITOR
DXQABM.Ptt
21-APP-77 12142
030~76

4315
4316

030604

Hi i

o3ii6i 2

4318

030620

016767
042767
i 62ia;
000207

150410
000007

uOOo.o

OA8M Dr:C 1)(1 ! STANDAPn MeNITOI'
DXQABM.Pt I
21-APP-77 12142
4319
4320
4321
4322
4323
43H
4325
4326
4327
4328
4329
4330
4331
4332

nn
UH
4335
4336
4337
4338

4He!
4]40
434t

4342
4343
4344
4345
4346
4347
4348
4349
4350
4351

MACY11 27C;0~6,~

23-APR-77

00111

1 O~ ,,6'
11)5067
01 ?767
tl76600
152767
000401

01n654
0301;56
1'130664
(I]r)Ir;ir)
03067,;
OJr).,04
n3(1710
1'130712

0'2626
012767
1'112701
n12767
012702
I'!n!tl!1
I O~2~7
010122
1'100401

0]0714

fl22626

030716
03tl722
030726
010730
0]"734
0]0736

n62701
022701
0(12365
1 tl5767
(101403
152767

030744
030'152
030760

012767
n12767
000207

")""~2

r)nooo 1

150512
150'507
03tl654
00010\
000002

o t 5276
172100
1'131'1714
001430

137
SEQ 0139

150422
150414

!lOV
8IC
SUE
PTS

i ;0406

~ACYll

2'7C 1006}

MEMI2,HCOR12
'7,HCORI2

iri(j,HCCH'(i2
PC

23-APP-;;

00111

PAGF. 138
SgO 0140

,THIS POUTHiE CHECKS FOP
03N;'2
0306'6
030632
tl)064tl
0)0644
030652

PAGE

147150
150466

147124

pPRES
ANYPAPI CLPE\
Cl,PB
CNTI
J.!OV
IIS,RESTV
MED,PDSEPV
BISfl
'fltTl,PpRES
BP
11$
1$1
1181

CIoII'
MOV
MOV

Mnv

1471 O~

MOV

2St

cr~R

INCR

1 ~t'4J1

J.!OV
8R

r)00002
1'72116

150]74

015246
r)15672

147032
147134

(SI'l+rCspl+
jPESUT. RESIV
t172100.~1

ns ,!3lJSFV
'I'APTA8, P2
fl'n
C"'TI
RI. (P2)+
4S

J.!EJ.!OFlY
:CLEAR PARITY pRESE']T FLAG
:CLEAR • Or PEGT STEPS COUNTER
: SET UP Fell' A RESERVEO I~STp • TRAP
: IS TillS Ml 11/60 ?
,YES, S!':! It 160 PAPITY pRP;SENT nPoG
,GET OUT

,ClOP STACK POINTER TWICE
,RESTt)RE RF;SERV<:D I'lSTR. TRAP VECTOR
: LOAD ADDR~;SS OF' 1 ST REGISTER
f LO~D TTM1!:-OU'I' V!!:CTOR
: LClAD ADDRESS OF' TABLE Of ADR' S
:Ir R!'GTS'I'l':t' rs Til!!:"!!: • CU;':R IT
: IT'S HF:RE, cnU'Jj' IT
,PUT nos ADDRESS I'ITO THE TARLE
,CONTINUF.

]SI

('Mt:>

(Sp)+, (SPl+

AOD
CMP
aGE
TSTlI
PI!:Q
PISB

'2. RI
'172136,PI
28
CIIT!
SS
'BITO,PPPES

,STEP TO THF: ~EJ(T AODRESS
fALL REGISTERS CHECKF.D ?
:'JO, DO THE NEXT ONF
IYES, FIND ANY PARITY PIJ:GISTERS
,NO. GET OUT
:YES, SET PARITY PP["SENT

5$1

MOV
MOV
RTS

tBUSERR, BUSEV
HARERR, P"RVCT
PC

,RESET TIME-OUT VECTOP
I RESET PARITY VECTOR
IRETUPN

150405
000001

p~ RITY

.l!J.iD

:pnp THF

ST~CK

POINTER TWICE

QAe'" D£C IXII STANDARD MONnOR
DXQABM.?t 1
21-APR-77 12142

MAcrll 27(006) 23-APR-77 00111 PAGE 140
CROSS FltP'tFlENCE TABLE
USER SYMBOLS

AU
ACRLP' •
ACSR
AcaRAC
ACIRC
"DDRHl
ADDRLO
ADREIIR
AD'!'!RR
AD'l'tx
AD'l'n
AD'l'n
ADTE4
ADTUA
ADTt!:
AD '!'! 6
ADTE7
lEND
UNDI
UND2
URCT
. URNM
UPN"'B
URROR
AERRS
URTOT
ALCU
ALLBK
AMDSTA
AMODNN
ANYP"FI
APASS
APC
APCLR
APSCNT
APSEND
APTCAL.

]583'
970

022;47
022772
000052
026136
026152
001044
/)oto42
OU'510
1)26177

026311
02623)

1405
955
1671
921
915
2671
266.
2168
946
953
853

~26220

851

026265
026275
026250
026205
026317
02'S721
025733
025746
026436
026423
026))5
026130
025657
026470
001364
001)54 G
025621
025573
030622
025766
025605
001366
0'5640
11261107
U

842
945
849
831
859
765

••••••

U8
0000'56
UTA, • 0000'54
UTUC 026167
ATE
001342
AMlS • 000060
BDCNY
Otn72 G
BITO

• 000001

BITI

• 000002

B%'I'IO •
BITt 1 •
BIT12 •
SITU·
8ITl4 •
BIT15 •
BIT2 •

002000
004000
010000
02noOO
1)40000
100000
000004

998
996
798
795
825
949
1964
801
4021
36'
1958
344
4184
1004
1955
403'
1961
1097
1
2829

nit

1691
913
18U

n:u

32'
2919
·lU
::1140
1311.
3205

1211
120.
119.
119.
1171

0001110
DOO020
00004(1
flOO100
1)00200
000400
001000
00t025
001270
003140
nOl n12
001336
001034
020042
026016
nOl013
104407

BUIE,,"
BUSEY
C1DDR
CAST
CCSRl
COAT".
CD1TA.
CDlTU
CDEIIR
CDERRI
COrLe
CDRU
CHICHI
CHKH2
CHlCLl
CHlCL2
CHKSUM
CHN

015246
000004
0(\1'512
•• *, ••
OO! 160
104414
007636
007662
001 '516
oot 0;20
001156
111 04154
001402
~01372
001400
001370
001374 C
001312

CHNOUT
CKCONT
CKHUNG
CLKADR
CLKHLD
CLKorp'
CLP:ON
CLOClC

OUI104
007642
020462
001420
001422
020334
020416
001]5] C

CLOCKL
CLoelCP
CLAOUS
CLRve::::
CLUO
ClfTt
COP'P'

~Ol ]5

0014~4

Buran- oH031

129t
1271
1215'

1251
1241
1231
122'
252t
l5o.
570

corr"
COIIICON

~1<4H

l8U
2611
617
1091
242·
684
686
40891
188
18et
441
35.
3071
2559'
15291
1!3!,
4471
448.
30U
449
4115'
412.
415.
4111

'~:I;

2171'
2116
2193

2170'
2195

1374

2718

]548

3561

35871

11128

1035

1096

1103

39191

39641
3962'
3970.
39671
3960,
938

1000

3992.
39811

579

1044

1054

1968

2226

2230

2275

3UU

4088

28
3580
1600'

29
4201
1632'

206

318

435

460

2295,
1212

2298'
16111'
924
2995
2054
3413
1919

2)07
1631.
858

2320

2330

2341'

800
2981
1714
3203
1756

884

1003

2n65
4345
2069

2HO

609
603
618
7'58
979

1';95
17BB
1046
902
11 19

lUU
41;2

53'S

560

\773

17'79

1090

191;1)

1963

2352'

'2978

'P95

2341

2668

In'l

1046

3097

31 n4

11 t 4

2619

2652

'674

,9Q7

)n27

304B

311'16

3164

1798
1020
1947

30'71
1121
1999

3\42
1154
19q4

32"9
I7Pl
]271

11114

32'23

321;9

1792
1086
922
t 792

23-APP-77 00111 PAGF. 141
MACrll 27(1006)
CPOSS Pe:FI!:P~NCe: TARLE -- USEP SYMBOI"S

S~·Q

143
2298

3099

1152
1052
470.
7161

3538
1155'
616.

1'79'71
665

1753.

3116

3286

3467.

1165
1162*
l09"
39)3'
577
25491
'7114'

615'

1041'

ln59

1151'

'438'

7610'

2639*

3288.

3516'

3554.

499
462
4431
210
488

1887
4641
7561

2025
469.
77'7'

2(129
4106'
790'

2579.
4110'
B12'

3037
41141

4111(1
4347'
16112*

4294

4298

4347

eH'

4114
433\.
1079*

90S·

9171

981'

9A4

99'7

2558
1652
1606
\535.
1531'
1647.
4101'
4101
4100.
4100

9118'

15361
1555

1605
1651*

1109

1397

1777

1860

2725

2714

2742'

2755

4133'

4154

3409
3407
2667

3415'
34141
3160'

1021
3106
3022
3028
1427

1082
3160
3059
30U
1755

1092
3162
3110

1714
3182
3209
3207

1719

3018'
3205

3021'
3275.

3027.

3036'

nO]

2483.

141)2
3164
3167
3169
3421

2079

2686

4322.

413"*

4lU

1742

1746

1842

1942

1990

2028

2135

2727

1165'

14.

4tH

363'
4174
1411
1528
1084
4231

535

590

2663
153U

2725'

3193

32021
31S,,*
3184
2627
3182.
924
lt04
3019
3025
1421
25001

4241
10615
1068

32'
)2'

3171'
3172.
2600
2754
nSf
]048
)98.
)99t

:)1

'529

! ~ 1'\

1754
165U
1932

,:'!

395U
2292'
1195
197
2976
1432
3162
1'719
4125
S9B
59B
598
694
697

U60

241t

3046
001)6

u9'7

973

1161
129t

QABM DEC IX II sn 'HHPD "'ONnOp
21-APp-n 12142
DXQAB!!.PII
BIT3 •
BITt •
BITS •
BIT6 •
BIT7 •
8IT8 •
BU9 •
BKCNT
BlCPTR
BlCQSYC
8lCQUE
BICTI!!E
IKTIMP
InYM
BPSCNT
8RAKE
BRtAlCSc
BREAK.

39511
3953.
1726
1125
2175.
)9581
]9751
889
891
897
3972.
903
909
3977.
9ll
392U
39211
39941
a04
8SS
]950'
3910.
39991
1716
3961
390H
1952
4321.
39271
3900.
1720
3907.
1104
27
3573

SEQ 0141

.. '1;
~ I': i
!U~

:H12

38'59
36691
169H

r,142

QA8fi1 DEC/XU STA~DlIH) 140N~TOR
21-olPh77 12142
DXQU 14 .Pll
COMCOl
eOJllle02
COMCO]
COMC04
eOMQUE
COMTAB

IH0642

1673

olo64i1

i6;~i

CO~

010656
010662
001502
025106
011130

CONN
CONTIIL
CONVIIT
CPUEPII
CII
CIICII

1395
16 QU
44tt
1666
2086t
209]

001476
014P6
001470
022742
022744

n'21643

CSIIA a 000050
CSTAIIT 001514
CTPLC
CTIILCA
C'1'RLC8
CTIILeO
C'i'RLX
CXRET

022770
007044
007050
n07200
001204

001262
!n~~! .,
DATCIC. 007626
DolTEUa 104405
DATfLG M13 4 7
DDPnll 000042
DECODE 010512
DECVAL 02"513
DEIIIRCT 1101130
DERPUa 104421
DERPX. 003562
DERIIIXI (1)3630
DES
012500
DIU
012314
DIUND 001 Ql1
DOT
022717
DIIPHNG 020754
DSTlOR 001054
EMTV
000030
ENl>COM 0046'70
ENDPU- 104402
ENOSV~
005022
ENDSV!! On5214
ENDSVC 005014
ENDSVO 1)05]04
ENDSVE 00!H04
!NDSYl" 005272
ENOSYG 0051611
ENDS a 104403
ERe"T - IIOnnHJ
EIIPINO 001017
E!lFlLJ'" 001254
ERRNMR 021§]2'
tPRNS a 10441(1
~.~~C~Sii

43t1
2293
4281
1099

764

35!l2t
1661
444'
16SH
1440
1319
1073
1399

139&

34,.

nT'I'T.

'~'111'

EXIT?
rAKESR 001004
rAnL
024100
FILCNT 001 )06 G
rILCTR 001020
rILL
O11?1.
rILLER 001]1)7
FILLIO ~O' 324
rfLLN"" 011634
GETlOR 0134'50
GETIU"1 ttt 3662
GE'I'NU'" 0\3516
GtTl'lS:r 1044U
GEr PA • 021272
GTOK
010S54
GTOKX
010'560
1)10')62
GTOI<I
GTan
IIIOM4
GW8Ul"U 1 04412
GW8UP'. 021150
HARDS!!a 17"1'570
HCORSV 001230
HCORI2 001226 G
1100;774

HCRI21
HLT
HMS
HNGnG
HNGTJ'"
HOLDS

001274
023746
1117310
001344
OOUS2 G
0,5667

HOLM
HOLDe
HOP
HOURS
HUNGCK
IE
INIT
INPUT
INVADR
INVCDI
INVCD2

025675
025706
014166
00140S G
020434 G
000100
000022
002162
023344

G23U!
02320)

SEQ 01U

\690.
~DO.

2036

2044

2071*

2092.

2100·

1025

1034

1095

778.
3217

793·

2001

2010

2031

989

1157

!686

176h

1920*

1407
929

35811
9]7

987.
755.
3119
3588.
13871

1230
757
3192·

1695'
1702
781
3810.
3856
36661
1766
2]02.

2048

2082

2094

2102

3307

1102

3278

3279

3291

3294

3295

3299

815·

869.

9'74

986

1090.

1416-

1420-

1422-

1603

1623

1631

1641

11611

7aS*

1625.

163h

162'*
886

16311.
Q42

17110.
951

1962
957

un.

2651
3259

14111
i4i 1.

2601

.637

1529.

1639

t56h

\592·

1593

19441
1949
1835

1965
2623

35901

627.

689.

,,92

7t2

SiS

;is

;;0;

iOi9

10;;

1020.
t061,
1018'
1058
1130
ln7h
1052.

1060

\1)72
t 148

ln1"
1156

1153

1133

879+
866*

883

977

96B*

870

'?!!t~~!

152"
2545.
3911
205'
1375
2354
29!SJ
447
743
820'
1979'
1409
240'
534
3240
271'
1991

162
2539t
982
1057
742

1053
1039.
1051
1045
2541'
1581

246'
34311
933
25511

QA8!! OEC'1X11 STA'IOARD MONITOP
DXaABM.I'1 t
21-API1-n 0142
EPROPSa 104404
ERRPOS 0011 54
ERPSVC 004042
tRRTY"" 020052
tRSVCA 004050
ERSvce 004t 16
ERSVCC 004122
ERSVCl 004014
EI'SYC2 n04024
!:R!lVNO 004'5'6
ERSVX
004332
EX!TS - 104400
EXIT.
005736

"IACytl 27CI006) 23-APlh77 00111 PAGE 142
CIIOSS PErtllENCE TA8LE _. USEII SYfil80LS

2!14H
30'H
742
"6
865
8n
890.
742
14]

806
860
2535'
1173.
!rrtI
11 R~'

23U
3567
35.
2471
?109.
15.
370.
794
1723
1995
2123
99]
25'56
16661
166,.
166U
1669
25'55t
2554
761
3321
32#
4131.
3521
1262
331
3981
34.
2879
2993
965
2150
2296
3)'
341

143.
155'
536
2175
1662
1741

2564
1527.
1656.
4001#

1532.
25691
910t
822
3825
1941
1919.
t695
3268.
625.

823
810.

1806

3195
8715.
964*

977

940

3979.

MACYi t 2'(1006) 23-APR-77 00111 PAGE 143
CROSS REFERENCE U8LE
USER SYMBOLS
933*
868.
1023
867
879.
892
8661
8641
923
910

834+

937

3099.
869.

3291

958
Q22t

975'

1241

25]4

~!T4't

1?Ot')

I ?nt
467
3695.
359.
1512.
lUI
360'
\694+
999
2114
2111
2163
899
3343J

1221
506

! 251

\ 512
1514*

2132
lSI"·

1676
\6'71
3312.
463
2018
330.
41111.
2738
1294
29471
40U
28110
29B6
966
21S1
2300.
41St
3190.
543
625
540.
3632.
]6061
361ft

151'5
2109*
1951
21631
2222'
21911
990

845

SEQ 0144

854

1)05

2133
22111

3289

75571

]55'7

Hi'll

1859
4t95
4177.
2593
3146

2006
4205

2008*
4223

3568

36781

3237
2886
29A7
2142
39171

2896
39t31
2143

2998
2157

2978*

2979.

)079

1347

1400

1696

1837

1678

4196.
1854
4185
2739
2528
3076

20U·
4244

2738.
4292

2793
4315*

2859
4316*

2871
431'1·

3772

3785

2908

2920

2922

2931

29'17

2978

2979

2982

2158

2713

2714

)915'

30BO

3081

QU'" DF;C 1lC! I SU~OARr: '. ClIIITOR
21.apP·77 ! 2142
DXQABM.I>l t
INVCDl
INVC04
%NVCMD
%NVNAM
INVTRP
IOB!(IO

023241
023316
023107

023370

021040
001060

2609*

100
IOOL
IOQLIM.
IOOSVA
IOQSVB
IOQSVC
IOQSVO
IOOSVE
IOOSVN
IOOUE
1001
IOQ2
IOTV
ITOA
ITOAl(
ITeAt!
ITellT
ICAY
ICBono
ICBPTR

0'27252
000620
03n072
003040
003122
002742
n03106
003032
n03016
001006
001074
001076
000020
013426
013336
013372
013444
024503
021!50"i
001036

ICBSI'VC
ICBUf'
ICBUrL •
!CIPARO.
!CIPAR1·
ICIPAR2'"

006552
026712
000040
1'72340
172342
172344

KIPAFI3.
KIPAR7.
KIPORO.
KIPORt ..
!CIpOP2'"
ICYPOP3.
KIPDR7.
ICLOCK
ICONTRL
ICTOIS
ICTERR
ICTrATL
ICTINtT
ICTOFf'
KTON

172346
1 '72356
1'72300
172]02
172304
t 72306
1 '72316
o t 7550
OOISMJ
02400 7
01!52!54
0240"iO
012014
012562
012632
02461!1
(l01]n4

ICTON~

ICTPRES

ICTsn

001272
0121"i0

ICTSETO

1 '745
1941
1690
2264
2527
27H
148
145'
148t
6941
7105'7
7041
632
442
23,.
279'
2110'
19U
2119

21381
2146.
2144
2897
1379
2641
1665
213
!542
1441
100.
IOU
1021
3779.
103'
IOU
9!5.
91;'
9H

991
99'
!5lt
432*
2009
1874
2!582
479
t 999.
20141
516
36,
26'8
4191
3!5,.
190U

MACYll 27(1006'
PAGE t44
23·~PI' .. 77
00111
CROSS IIEP'ERENCE TABLE •• USER SYMBOLS

3602.
3636.
3595.
559
263h
678
t 48
676
722

583*
351!5*
1292
2493
1296

592*
3553*
1299
4017

599

610

633 .

2488

401 ...

4093

1299
1298*
681*

13ell)*
1299*
1290

1301*
24C10*

LOBRt(.
LOIOQ
LDTYPC
LGHOt..O

006366
006402
01)6256
0014'74
LO~DWC
024672
LOCK
001327
LOCORE 00112n
LOGBUF 031422
016tH
LOGIC
LOGICA 016144
(1)11 '74
LPB
LPON
021110
LPS
not"2
LPWJ(I
021144
LPWK2
021146
MAP
012H4
M.PREG. 170200
MAPRET 001252
MAP728. 104415
021426
MAP22.
MAXTr'" (1)1426
MOIRE
025627
MOL4!5
001333
MOXCNT 001022
"'OXCTR 001021
MED
076600
MEMCMG 023724
001210
"'EMEA
MEM!I'f' 00133!5
MEMERR 001472
MEMPA
001206
"'E",seE Q01214
001204
ME"'VA
MEMWAS 001216
MrM12
001212
MERP
030!500
MEI'I'1
026]44
MEI'R2
Q2636!'!
MERI'3
026400
MEI'R4
026413
MFLAG
001343
MINITS 001410
MMINS
02512t
MOD
013222
MOOAOl' 001136
MODeNT 001015 G
MOOCTI' 001016 G
MODENO 025775
MboP~R
01)1040

3996'
3988.
3990.

660*

1811*

1356*

135'7

1361*

1366

1372*

1)73*

3453*

34!58

3493*

3498*

35°6*

3475

3494*

3495

349C1*

35 0 2

'743
4109*

19C1g
4112*

'Of)2.
4113

'0 I 7.
4134

2f)!l!5
41 7 6*

796

1166

2121
2866

215St
3547

2612
3!560

2856

2152
37421
3649.
537*
1684*
131"
1324
\324
1581
497*
3438*
4166*
3439*
1912*
1903
3524
480*
3424*
1913*
301
\760.
369!5'
25911
36911
514
3834
3937
2023
356.
2642
4211
2736
3412

2159.
542*
2181

1324
2206*

1343*
2222

1344*
22'70*

1354
22A2*

13!54
4010
3358

1361

1366

1373

40(19'

3533*

3442*
4168*
3447*

3443
4173
3449*

3445*
4216*
3454.

3446*
4232*
3455*

3447
421\1*
3456*

3448*
4290*
3462

3423.

4159*

1767.

t 768

20Cl1*

2092

2099*

2100

143n

11174'

2019

2'748

4159

37571
477
2729
4227
2743

512
2743*
42!54
4113*

531
"'744
4275

1428
3347

1575
3404

t 296
6BO

24~3

4134.
398
399

33'

6!53

6931

ICTT£ST
ICWI It.. ..
ICWIIP •
ICYBDV
LCLEAR:
LCORI2

2111
341
32'
4242
12741
1275
1191
4]0.
533
3731
3271
2709
20'7
2662
31H
3303'
316.
UClI
1392
1939'
8U
342'
2!561'
2560
426'
1940*
3781
249.
24Bt
92'
2850
3231
380'
4291
322'
325f
32 It
326.
3241
4236
2849

639*

67h
1292*
67h

23-APP .. 77
00111
PAGE 145
"'ACYll 27C 10061
CROSS PEF'FRF:NCE TABLE .- USER SYMBOLS

4132
3H

6)7

635*

676'
164!5
691
699.
!55!5
1290
676

CAB'" OECIX11 SrA'lOAPO I!lJNlTOP
OXQARM.Pll
21·APlh7'7 12142
027530
*.****
******
000060
.*****
001224

SEQ 0145

3620.
36291

402
329.
4270
2!548
12831
1194
t'Se.
3!513
1143
471
2999
27321
2734'
3304
3853
3303
3308.
]309,
3828
341e.
H9U
321h
1967*
1991
620*
503*
1762
367!5'
3544
2847
3!543
4302*
3555*
423h
4315
4296
399H
4306
4309

2484
2489*

t610
3776

SEQ 0146

4179

1852

3442

3SI)1

3770

4129*

4130*

41'i3

4187

419b

4,00;

42flq

1196
1763
3769'
1707*
1849
4085.

1198
2654*
4198
17' 0*
28"i5

1205
2658

1208

121 "

'217

1227

1236

!i144

12H

1253_

4118*

41 :11*

4124

41,5

41,7*

4129*

421')</

1137
2783
2659

27R7
2797*
3003

3271*
3323
4324

3328.

2765
37'74

2q(l2

3521
3232
390!5'
4105.
64!5*
640*
1764

3235*

3237

410e.
659
6!59*
2098

104g.
2777
2657

3!546
285t.

35SCI
4299*

4304

3545
4307
3557
423!5

3558

4303

4314

4300*
4282*

4301
428!5

4310

3092
394U

3083

3149

31!50

117!!
1049*
588
3929t
595

1192
1052
631*

1206
1056
190B*

1220
1071

1637
1794*

1802

18"8

192!5

1929

3257

616

665*

66S*

719

1810*

19S8

2117

2224*

22P 1*

42981

4312

lBH
4191
3149*
2110'
29"
361
361

1029

26St

2983*
3150*
3819
700*
2441
245'
1036
!59h

~2"2*

QA8'" DtCIX1\ STANDARD MONITOP
DXQlB M.P11
21-APR-77 12142
MODQ

026522

MOMU
MODIIPA
MODRI2
MODWEA
ioiOOIiPA
MODWI2
MOPE

001124
001122
001126
Olll116

MoveNt(

MOVnG
MOVING
MSCONT
MStCS
MSGDS •
Mseo.
MSGOt.
MSGP'LG
MseNe •
MseN.
MSGS$ I:
MSGS.
MSGS

32'
40081
29~·

292'
'941
290'

DOli 14

289.

001120
010'576
001250
001345
001325
003326
026124
104422
003466
003556
001346
104411
003]22
104416
003312
104406

29H
1674'

H1'
389'
311.
"/151
3151 II
1635
743
CI , I ;

'S5H
743
25631
743
50'S
1379
1968
2158
2676

3540
MSG.
MSG1 ~
MVCODE
MVCOOS
MVCOOI
MVCOO2
MVCOO)
MVOOWN
MVEIIR
MVMAP
MVMSG
MVIITRY
MXW8P'

001426
ClO3444
0<114'74
021'564
021574
022040
"'22112
oot 330

NEil

......... II

NOCLI(
HOKT
HOMEM
HOpAR
NOSWR
NSTOP
NUIolBEA
NUM8ER
NUM8Pl
NUIolPWR
NUMl!Yl!
OACNV

074317
023776
n)0476
024021
""41'1)1
"(ll3'!2
001052
001046
0(l105"
1'2'55'51
n2'55l1
014t 40 C;

1122~64

022412
022166
022060
001256

743
759
528
3420t

34223441
3497
374'
3479

3434
3512
3460344·
2935"
2@

23-APR-77
MACVll 2"/(1006)
ooi 11 PAGE 146
CROSS REFERENCE TASLE
USER SYMBOLS

no
I ~o:Cl.

1569.
1583
1553.
15'10.
1582
3453
34th
2603
7541
3115211
2!'i711
790'
806,
75011

7!'iOi
"1,,8
14111
2009
2175
2704
3556
776.
771
1067
3519
3451
35041
3440.
3497
3518
35t 5.
3566
1859.
2836*

37
I7RO
372U
2027
42971
206'7
376°'
6'11 II
895
73511
994
l89U

29(17

J9<;1!·
850

DJI'C'1X1 \ S'T'l~DUW 1,I0NT'!'OF!
QAf!I'"
DXQARM.Pl1
21-APR-77 12142

I,I~CYI t

"02
930
2149
286'
336'
34'
21119
3522

2712
841
2298#
22911t
1063

OACNVX
OACNV~

OASCU
OFP''''X
OFFSET

014152
ot416n
no 1112
001240
001242

OFP'STD

001244

OFFST~
OP~N
..

001246
000000

Hel
3431
339'
115 •
245
260

2'4
289

302
329

PAEN8L
PAMSG

012232
(\15776
~ 1 603 i
PA"S~1
PAOFP'
024034
PlIIERR 0156'2
PARTA8 001·410
PAIIVCT 000114
P.SEN" 00'1310
PASREL 0010H C;
PASTOT 00t032
PASTY'" 020062
PCLEAR. It It It II. II
PCO~T
02!'i357
PDp70 • ... 11* •• i1

POREI/O
PORTA!!
PENA8L
PEIIR!
PEIIR2
PIRQPC:.
PIRQS •
PIRQ~

porr

PON

00130'
001275
023756
025330
025427
17'77'2
000004
0064t6
013044
013004

372
390
426
4026
4039
4052
4065
4078
1434
1928
2622
2091
222
427.
222'
741
362'581

lOBS

33H
2832
3533
527.
3435
342 9
204
246
261
27,S
2QO
303
330
349
373
3Ql
428
4027
4040
4053
41166
4079
lQtU
2692
2677
3699.

2510
! 922
2510.
10'781
260'
113411

1753

1598*
159111

1(,00
1601

345B*
3532
343011

3459·

1770

! 810

3504!l

3510"

SEQ 0147
1944

1991

2272

3120

3213

3243

1~52!!

1574
1565*

i572
3454
34HII

3425
3949.

752·

760

51(i
1405

5'20
14fl6
2027
2527
2850
3568

526

534

1261

12~2

1407
20 4 3
2528
2954

1440
2057
'5471
2995

1662
2059
25E12
2896

1690
2067
25!13
2887

1390

17'51

1939

2607

27"13

34041

3457.

34Q6

3503

345011
35531
3521#

3'511

lA62.
2837 ..

1116311
2838*

t 964*
2R4011

1865.

1866.

!~2

3' 1

823

S7n

1962

")37

2541

2549

1145
901
817"
90n

1 e 12"
992
89211
9ql

2769

2804

R93

A52

~A8

e90

20~3

2264
2849
3567

i 2~4
1741

i346
1745

i36

, 374

1695

183

20~ 1

'091

'? ~ ~ ~

?! to

t 841
?! ~!

2611
29n7

2621
2908

26?3
2930

264
?,q)

26~0

19671

\969+

1;;70-

2832·

28B"

'Al4*

8~:;

1160

)91'7

9i i
3956

957

3573

976
3766

3979

89811

eq9

990

9q3

912

9\4

964

995

1954

1957

2156

n'HI

i~;:;

3034

780.

3no

33?2

3683#
)69,.

27(100")
23-APR-77
I'AGE 147
00111
CROSS REFERENCE 'T'lElLE
IISER SY"~Ol,S
4308
q48

4HI

230011

:1322
273911
60'5
3431
3771
106211
H36
209
241'1
264
177
,Q2
3n'5
334
3'56
375
394
430
4029
4042
4055
4068
4081

1739
601
3429*
3542
10"111
343'51t
209
247
21'!i2
2'J~

291
304

332
350
374
393
429
4029
4041
4054
4067
4090
205('
2697.
27Ca.
2666,
20B
2511"
1139
1139

996

S!:Q OU@

q21'

997

2141

2295t

2699

43~5

1790

1 R04

1953
350511

2752
3506

2796

H'i!l

1846
l491

279~

344~

35'17

3509

1!l65.

1399 ..

1711·

1747.

tR38"

2751*

Hil9

H!fj*

3449
237
250
266
1'79

3456

3491
239
252
268

HCJS
240
2'53
269
192

3500
241

3505
242
255
271

2~~

25 e

272

273

902

908

2332

41 'l511
11161
3436

233"1
4196.
1786
3438

1063
3439
234
249
265
1"/t
2Q]
306
335
361
37 8
395
443
4030
4043
40!'i6
4069
4082

,'14
307
336
362
37'1
396

444
4031
4044
4057
4070
4083

23R
?'il
267
1110
?Il"i
321

29 1
'2'1~

2 Q .,

322

323

337

338

339

364
3q4
410
4020

365

390
41 Q
448
4032
4045
4058
4071

4033

4046
4059
4072

2~4

270

'''3

,QA

'243

244

2 QS

2P.6

3 C:'!

38:
327

421
40'21
4034
4047
4060
4073

21lg
324
341
366
3 R6
422
4022
4035
4048
4061
4074

4023
4036
4049
4062
4075

40'4
4031
4050
4063
4076

4025
4038
4051
4064
4077

!'i18
IB1
2599
2818
3640
4184

522
1756
2607
2832
3666
4200

528
1839
2618
2871
3672
4301

82q
1845
2619
2994

1193
\ 912
2649
33!'il
3795
4319

)115

299
)25

342
367
3 R7

"'3

326
346
370

lRS
4'14

347
371
389

425

4348

269C

4332

434811
182511

192611

192711

1 en.

1831"

289
1432
2086
2779
3557
3967

369
1571
2104
2790
3560
3986

427
1582
2465
2796
35 7 3

501
1727
2594
2798
3580
4162

]lOU

34t

403

2703

3871'

1
9QO
1916
2652
3391
3860
355'
3531
2057
2704
2676
90'
1141
;94
2065'
2047*

1115

752'

, 627
3034
520
421(1
21)59
508
3q4'
270r
26et
269'
2930
32'

668

27
997
2004
2664
1409
3921
1885
1876

28
1066
2022
2751
3414
3951

3680.
38661
3879,
4107
454
12871
3843
3840

1320

lHO
2052
2753
3541
3960

4110

3770
43(15

OAiM DEC IXII IIUNOUD MONITOR
DXOatM.Pl t
21 . . PII.''7 t2i 42

MACYII 2'7(1006' 2:1-APII-" ooiu PACE 141
CIIOIIII REFEIIENCE TULE
UIIER IYMIOt.S

01)014
'ONN
'O,S, • 005726
,O,n2. 022626
001340
"REI

204'7

025)50
'''EG
,lIn4 • 000200
PIITY5 • 000240
000:100
PIIU7 • 000)40
PS
• 17'7'776
pseNT • 000026
'SENDA 005442
PSEND! 005674
026111
'ITtM
PSII
• 171776
PTIME
001424
PUSH • 005746
PUSH2 • 024646
PIIRCNT 001266 G
PWIIDN
015460
'WIIFU 023702
,WRn
000024
,WRNUM 01 '224
,WRUA
015552
,MRU'
015506
QOVPFL 022'7'74
Qun
00,,72
QTST!
002]04
QTSTC
002316
QUECNT oot 332
QUECTP (101027
QUETST 002214
QUE. s 104401
QUE. _
006376
llANO' • 104420
llANO.
Ot4'514
RANNUI! 001200
RANIIRK 001202
IIIunA. 000070
IIBU"~· 000066
RlIursz. 000012
RBUnA. 000064
RDeUA • 000t03
IIDrGIN. 000t04
RDPBA • 000t02
IIDSERV. 0011101
RDWHMI. 000022
REURII 024420
RtLMSG 1124446
IItLOe
0111315
IIUll
015302
RUtNT I'll ~276
RtaIV
()OOOln
RETIIY
00t)31
014534
RLOO'

'"'l'Y6 •

522
140.
14 It

432S2'700

1361
13 Sf
1341
U3t
'74'
ISH
108'7
1150
930
75'
425.
U8I
13"
361
197
2640
197.
1410
2624
2631
1261
563
561
559
37U
25H
5481
1375
12791
25611
2390'
35.
320'
1761
1 '75'
17,.
17U
85'
8U
IIU
8U
871
3556
3540
3U
2580
190
t 90.
375.
23941

QAB'" DEC/XII S'!A'irH~1) "':1NITOII
21 .. l':"h77 12i42
DXQABN.Pll
RMODE

OOt311

ROT
ROTeUp'
1I0TBI

OOI!!3!5
1116]04
016516
AOT~2
1116554
1I0T83
IIt6600
ROTB4
01!;626
ROTCNI( 016740
ROTCNT 001316
1I0TCT
0010]1
ROTDIS 024555
ROTENB 024505
ROTI
nOl313
ROTt.
1)01314
ROTLOW 016652
flO'1'LOl 016606
ROTJ.,Wl Ot 6666
IIOTN
001H7
ROTtlU'" 001 )20
IIOTO .... 012;60
IIOTON
012744
ROTSIZ 001322
ROTIT
016650
RSTAT
1J01066
IISTIIT • 000062
II litO 4
014'52
llTIME
001414
RTIMX
001416
IIT'tK$ • 104423
014504
RT'J'K~
II'tTt
003136
IIUN
010710
RUNe
011402
RUND
011620
RUMDU 0253 65
IIUIL
010700
RUtI'AS 020066
RUNPES 011134
IIUNIIP'L 00132'6
AUNSVC 002324
RUnYM 01'656
IAVHI
001134
SAYLO
001132
SAVLOG 01'!S06
SAV04
014140
SUDR • 00Cla52
SEItNDS 0(11412
Ot2462
S!L
SEnur 027~"I2

SnC!41
UTeO'"

0271~ ~

S!'l'liiH'

~ .2
01 Oc.
01 $H

IInXT

03 Iji.\

a£TXT

n,..,81

'II

'~f\

362'
2561
262.
27611
21C17
"94
2901
2919
509
3671
256.
2043
2854
3641
365'
1856
2'791
2824
182'
36111
2041'
20341
369'
2762
2'U
1731
1685

4211
422.
1599
2380.

7131
538
1774
11105
187H
17071
3098
1070
372.
5771
1404
297.
2961
2599
1533
16 ..
420'
1973'
4'73
,,\ 82.t
4155

4135
1832
U55
4122

SEQ 0149

205ft

1199

1211·

1239

1245

1250

U19

1340

1359

ln2
U4h
386"
2U

1'756

1918

2054

2065

2069

2619

2652

2668

2614

2997

195
1895.
1081·

198

214

223

1283

1413

18'75

1888

?511

1099

1123

1779.

1959

1106
202641
3147

39461
2030.

3191-

3535.

4115.

1713.
262"

2635.
2633

26H·

263]-

2678

2693

593

669

696

699

1074

11ge

1348

14~6

1524

4117.

4197*

1'775

1913

193'!'*

, ~dO.

2825'

189
18!!'628
1100
11!IH
1027

ts8941

3144.

349.
461
3672.
461*
29161
26411
2633.
1293
565.
566
569
544
544_
572
25371
2536

4321-

n06
191

1893.
1001
11081

2918

3589.
56U
5711
553
54841
578

553*
587

2566

H9I
2391

4324
1162
3732.
37361
]1\6.
25911
2590.
4094.
14572410

~ACYll

502.
3067
33323335
2800.
2809.
2803
28211
2035
143'*
181537511
37431
1135
5042798
28171
2832.
3334
1439
38!50
3846
1062
2768
693*
627
19t4
3065306641
1622
2572
409941
1710.
1802.
18381

2392
2411*

2412-

2657
tt41

2741*

2900

4103
4103.
3563*

4329
4323.
3564

4329*

2'7( 1006) 23-APII-77 00111 PAGF. 149
CROSS Rfl:rERttiCE net.E -- USE" SYfoIBOLS
1196*

1419

1660

t74h

17S2*

27671819.

2'772·
1819*

tl120-

1923-

11124

27'H'

1813
20342829.

2740*
2041·

2761
2763

2852
2775

4116-

41'!0-

2042

2772

2774
710
1079
2344
3071
3079
25'731

2776
717*

2778
1642*

2786

2799

291)8

2913

2A15

2373
3133
3138

2413
3137
3145*

2475'

299t;1

3t54

3256

3787

1750*

2636*

2390

246,.

2947

3103

3]]441
28?!!
2814.
28471
2042*
1817*

3148

3816

3813
3100
1755.
623

:UOH
2758
1069.

3045'
2860
2859
2708
1648

3132
2863*
286141
2997.
1664

2865
2864
1901

2302

2352

3094

3085

lI51

3152

41'75

4U(I'

153941
298741
3822
40941
4157
415"
U4U
t159.

4189

SE~

1393

2814
2812
4200'

1202

3769

0150

QABM DEC/Xl I STANDARD "ONITOR
DXQABM.PII
21-.PI\-'77 12i42

MACYll 2'7(1006) 23-APR-17 00111 PAGE 150
CROSS }llEFERENCr TABLE
USER SYMBOLS

SHORT •••• **. tT

27
6t'7
1428

1
522
1409
18'72
2664
3395

SII/PUT
BLOB

010666
012514
&LDU
012514
SLOSS
012510
SLDSC
2542
BLOISO
012'546
SLDSE
012'5'52
SLOSL
012536
SMOOE .. 041;'000
SPIlC'l'
027212
SPCrLG 001010
spOrNT. 000024
spsn 001152
BPSPEC 027252
SR
001 "6

BRE'rRN

(101056

0210U

U'"

SSRa

• 177572

SSR3 •
STlRT
START2
START]
SURT4
STU •

'72'5t6
(101534
0112042
002062
(102066
000020

UATt • 000021
STBrl
027414
STOP
001024
SU104lRY 0227'5)
aVllo • 000032
SVRI • 000034
SVll2 • 000036
BVlIl .. 000(140
SV"4 • 000042
SVII'5 • 000044
BVR6
000046
SYSeAD (124140;
sneNT 001264
nSERI 001110
IYSERR 021601
IYSEPI oHno
usn (1170'52
SYSLfM 0011'50
SYSNU'" 017140
1124465
'I'lBlOR 1"101064

nun

4104
1700'
1975
1985'
1721*
1996
1992'
1722·
1997
931
460
2]91
ISU
lOU
259l

353071
272'
1894
7at
'746
7U
229
SlU
513
5!9
1'5H
1149
t9A9.
l'5U

014472
001351
026077
026025
TI"'X
TIMXl
024230
TITLE
022672
'l'KB
not 164
001162
US
TM!.,S
02" \ 01
TOPUS 014622
'l'OTI'"
026066
T0185
014672
TP8
001170 r.
QUL6.6. G
VA
TPlPX • (100024
TRCI
'l'RCU
'l'RCre
TRCrC
'i'iieFie

'l'RCPSW
TRCV
TIIPI"T
TRPLJlo'
TRPTU
TIIPV
TPP2 :0:
TStt'S
TSTME~
TST~t

TSTM2
TSTM3
TTPIV
T'l'SRVI
TTYBSY
TnSY,.
'l'TYLNI<
TTySPV
TTPlDP
'l'YPCTR
TYPO'"
TYPE
TYPE8
TYPEC
TYPED
TYPEE
TYPEL
'l'YP!:N
TTP!:O
TYPE 1
TYPLIM.
'l'YPQL •
'l'YPOUE
'l'YPOX

005700
00~706

005724
00'5710
(lO1070
onl0?2
000014
11151H
Ot5246
015176
000034
nIl 000
1'1211\ 06
0100n
1I1020n
0'0312
03040n
000064
007436
0111014
oOt?M
001530
0010;26
0011(14
001210
nonS2

2'7]4
:i573
4157
2122

29
t021
1562
2084
2795
3602
4184

1979*

19P9t

1980*
1993

19941

540
Hi58*

1397
Pi92·

1194
40161
463lISle
1700*

288

SEQ 0151
316

395
! 110
1723
2603
3191
)U5

922

221
107'7
159'7
2500
2826
3680

108;1

ll'l9~

1610
2510
2857
3811

1707
2StI1
2969
3851

18U

2598
1'701*

2619

2634

3534

40141

1200

1222

]190

465

46'7*

506

758

802

145
t061
1569
2U9
2917
3666

351

17'56
2619
3196
4009

4'14
1391
1845
2627
)](1]
4010

510
14"2
1856
2642
)]]9
4019

975

979

1086

1595

2591*

2630-

2644*

2646*

2730.

1119
194'

\121
1956

1\1'1\

17ii

2599
2994

421

11)1

4319

1984.
1973*
19911
1995
1974*
1990,
189]
499
1656
622
70U
26(18
3181
1142
1659

4(112,
492*
274910

497*

515*

\431*

2020*

34U-

4i 11*

2005*
4160*

201'5

3411-

2)1

333

344

413

4591

2757

4088

520.
'5221
597
1152
199410

603
1154*
3219

608
U42
l221

618
2781*
]223

691
17A2
l22S

694

697
1788
3269*

1020*
t 792
3269

1039
179'5

1046
\798

3227

1042

1050

1131

1147*

2771*

2773

2806*

J241

17114

411625H
1401

581
35IJU

586

1591
160'

11 '6

1540

1611
162'
16H
1&U
16St
2650
348'
16tt
261 1
2621
510
3921
\409
2985
:;'75'

Olll'" DEC /XU 5TA!iDf<RD MIj~ITOP
21.apP.77 12142
DXQAR'A."11
TP.:NPWII
TP'LAG
THRS

1997

28
924
1550
2045
2'791
3580
U58

231S5
393'
3079.
3290
3280
505
35'
35'
3nA2*
ISH
929
1845
35'
3S*
2S31.
2559192
11641
I H8'
1163
2771
278~

1921
201
2523
2522
2011
738
)(184*
4182
422,.
42541
4275'
2\5'
455
243'

455'
215
2831
285'
791

(07)66

772

007476
(1)7512
n07562
007556
00761/'1
0073'50
03007'2
00'7)52
031 222
/lott )0
001007
006172

3549
1498
!'50H
1!!16'
1513
1502
76)
147
14461
1471
146.
2381
1230'

622*
]70H
1712.
!541*
3660.
3640.
28711
'2648
2992.
3739.
75410

~'''CYll

237St
3069
3090.
3296
37111
1573.
Hl.
1l2t
3('1Q3lO
tS71
1026
2446.
315.

H4.
2535.
2561t
1162.
11f17

702

1221*

1634*

1644

2602*

264S

2647*

2649

7611

9;2-

9S9

2894

27(1006) 21-APP-77 00111
PlGE 10;1
CPOSS IIEP'F.IIENCE 'l'Aat!'; .- llSER SYMMLS
3097.
301'11.
3935'

3099*
39431

lllS
543*
3944'
24211
1105
2857
1392*
1191*
25371
2563.

, 326
lH4*

SEQ OllS2

JIlll*

3114

H3!5

3140

2484

3420*

254' •
2S7lt

1347*

1400*

4123
141)6
3541
1522*
1465*
'539'
2565'

4313
32 9 7

394\.

3304.
J496*
25411
25""

25431
2569'

25451
25711

719*

116B*

14871
7110.

1520
9113-

lS21
lOla.

110a.

1510*

1516*

1520*

Btl
950

816
954

820
956

980
967

10081
971

1519
1511
9)6
1011

1517
944
1260

1522'
! 024
1266

1033
2491

1094
2492

1101
4018'

1009
2493
732*

1264
4018
1014*

1256

1268*

ll~l*

25491

2551'

25531

2'555'

255"

9'14

1448

14561

2715

2719

1445'

3277

3293

4098*

, 165.
~68

717

716
1169*

2518.
25731
2S]2it
'-522
3085*
4205.
4243
4271
4293

2530.
3945'

567
562
1345*
145610
4541

1456
729*
1346
1504*
3305

145 a.

565*
796
779
3562
1500.
15!S.
1505
927
728
1449
726
147
!l60

1487
1523*
799
BOS

1500.

QABM

O!CIXt t STANDARD MONITOR
21-"PR-17 12142

DXO~8M.PII

TYPO~
006232
TYPOl
001100
TYPQ1. 006244
TYP02
001102
rYPQ2. 006156
TYPQ3. 0060!!6
TYPQ4. 006010
TYPRET 001106
TYPRI
001140
TnR2
001142
1101144
TYPIIl
TYPR4
001146
001150
TYP"5
TYPSVC 003166
TYPTA8 003250
UIPARO- 117640
UIPARl- 177642
UIPAR2- 177644
UIPAR7- 177656
UJPORO- 177600
UIPDRl- 177602
UIPDR2- 177604
UIPOR7- , 77616
UMbO! - 140000
USP
027002
WASADII- 0000!!4
wBrtA
001234
WBrLG
001023
WBur
001232
WBurEr.. 000076
WBurpr.. 000074
WBurRO- 000100
WBursz- 000102
!fBUn2 001236
!fCASE
025006 G
WCASEE 025106 G
WTWIfMh 000222
XCNT
001026
XrLAG - 000005
xrllFLG 001030
YES
(101062
ZERO
001222
eGWBFC 001])4
IP~SS
025756
- 0]0762

• AilS.

032022
000000

'o1aCYll 2'1( 1006) 23-"PR-77 00111 PACE l!!2
CROSS !lEF'ERENCE TA8LE -- USER SYMBOLS

1244.
28U
t 2491
282'
1226.
12041
11911
2841
2991
300t

2538

USB
2!546
726
2542
2568
2570
145'*
145'*
1460

SEQ (1153

2540
1260.

2552
1264

2562
1266·

1267.

1269.

2491.

72h
2544

730
2550

HI·

1009

11111·

1012

2911*
3325
?779

2923.

2830.

331~

2809*

2821*

2829*

3317

1854

1863

2790

2792*

IOU·

1258

2492·

"93

291'17*

291'*

2918

?Q31 *

2254

2261

226'h

3971

41,.
2595
3843

419'
1405
3846.
40R5'

1497
1495
1490

)1'1,

302'
30lt
564
738
110'
llU
1121
l1H
1061
1071
IOU
109.
921
1990
170'
334.
250'
333*
179'
1781
1801

726.
74U
1581*
1582.
1593*
1584*
1577*
157S.
157h
15110.
1599
40111
1602*
t 848
176'*
1947
1553
1552

1811
335.
3H

2531
152'
25'5'
274.
328.
379.
766
30'
1286
3913
3853
401131

161h
1615*

1899
1951*
2799*
1849*
3316

1852*
3775
4\4
1764
1800*
621*
3422.
'2125

195H
3794.
3790
2659
Ist5
3325
3452*
2165

t1121
3327*
35t 7
211!4*

2204*

2223*

2246

224~

2251*

1824*
932
196J
1561
3816.
39!56,

2795*
939
199
1564
38191
39!59

"'788*
3925'
2031
1629
3822'
39121

212'
1671
38?5.
40071

219
1709
3829'
4010.

221'
1'196
3911
4011f

22U
1799
Hl3H

I. 8'50

4(1131

4'1\ 5'

000
001

EIIIIOPS DETECTED 1

QABM DEC iX11 STA!lDAPD t.10NITOP
DXOAIIM.PI\
21-APR-77 12 i 42

t.1r.CyII 2"IC I 006, 23-APR-7'1 00 III
PAGE 153
CROSS Re:n:Rrr.Ncr TAI'ILE -- US!':II SYMBOl,S

DEFAULT GLbRALS GENERATED I
DXQABM, DXQABM ISOL ICPP'I SYM .. OlCQABM
RUN-TIMEi '5 10 ! SECONDS
RUN-TIME PATTOI 44/U"'2.4
COP! UStDi
UK (22 PAGP.:S)

2933

3806.

230'
1837

1869
3840'

40tH

4018.

4,,.
3587
)85'1

41\97.

OAEO qe:c:iXll SHORT MONITOR
D*QABM~P! 1
21-APR-77 12142

IoIACYl1 27(1006)

22-APR-77

12153

PAGE 1

SEQ 0155

2
3

4
5
6

7
8
9

10
11
12
13

IOESTIP'ICATION
,
,PIlODUC'! COOEI
,
,,PRODUCT NAMEI OEClXl1 ,,OllTEI
I

\4
15

SIIOPT MONITOR

16
17

JTHIUAPY 1977

t8
19

,MAINTAtNl!:PI

20
21

DIAGNOSTIC GROUP

'H
24
.... .=.6F,io.=i.u .. my.=; .. '

..........'c ...·•·· .............. ,

OAED OFCIXt1 SliMT MONITOR
DXQAl!'II,Pl1
2!-APR-'7'7 12142

21
29
29
30

31
32

MlCYU 2700(6)

22-APR-77

,LIST
.F.:N.\SL
.T!TL!"
Otll'OOO
000000

PAGE 2

DEClXl1 SHORT MONITr)R

.ASF:CT

."0

,GLOBL
,r.LORt

,1';1.,1:181.,

)6
]7

,r.L09t,
,GL08L

12153

LCOR12, JolCClR12, OACNV, BDCIlV, MODQ, CV1CKL, CLOCKP
](Illt t L. ](10111 P, HMS, HOURS, WCllS .. , WCASre:, CLOC!!'
OIl'F'SET, IIUNGCIC, InlGTl ~. LCLEAR, peL!!:A R, CHI<5UM
T!<S, TK8, TPS. TPB, rILCNT, P'ILLE'R, SIl, RA'INUM, CAST
MOPCNT, MODCTR, PASREL. RELOC, ALLBr<, KTPRE5, PWRCNT

3Q
40
41

42
43
44
45
46

I******TF' RUNNI!\G Iorrll ~N 11160 J,NO A.~y SYS!E" TYPE EIlRnR OCCURS
(TRAP TO 4, ETC., "LOGBUP'" WILL CONTAIN
1nE CCINTE"TS or SCRA'tCHPAD LOOnJ":; n~o~ 0-177. SCRA1'Clil'A:
LOe~TIOKS 11lO-107 ARE PRlr;T[O OUT.

,SWITCH REGISTER r)PTIONS I

,SIH5=1

i Sl=I14.!
,SP13:1

49
'i0

,5R1281
ISRI0al

52
53

I SP9"1

IlALT MODULE AFTER ERROR.
!"1'4IBI"r MODULE HAtT ~P"!'E? 20 E~Pr.~S.
INHIBIT ERPOR PRINT.
ENABLE ENDPAS PRINTOUT.
PRINT IILL DATA ERRORS IN FlUFrER
INHIBIT "RELOCATED TO • "ESSAGE

,MODULE STATUS FlTT 1IEFINITIONSI

54
'i5
'16
57
51!

59
60

BIT 1581
8TT 14=1
lITT 138\
BIT 12=1
BIT 11'"
BIT 10a1
BIT 09-'
ALL o· S

rOMOD
MODULE SELECTED
MODULE DROPPEl)

EXTEND!I'I MODULE
DESELECT IF PROGRA~ IS RELOe ATEO
DESELECT IF NOT ON AN EVEN 321< OFFSET
NRI<,..OD
SI'IKMOD

QUD D!ClXlI SHORT MOM nOR
DXQUM.Pl1
21-APII-"I"1 12142

MACVll 27(1006)

2:2-APR-"I7

12is3

PAG! 3

sro n!!i7

,,, P'EItI PE"I"IITIONS.

63
64

65
66
6"1
61
69

000000
000001
000002

111

,GENERAL
,GENEIIlL
,GENEIIlL
,GENERAL
,GENEJlAL
,GENEIIlL
,GENERAL
,POINTER
,PROGRAIol

.'0

·U

lin

PURPOSE Rr.GISTI!:R I)
PURPOSE REGISTER 1
PURPOSE REGISTER 2
PURPOSE REGISTER ]
PURPOSE REGISTER 4
PURPOSE RI!:G I ST!!:R S
PURPOSE REGISTER 6
TO HARDWARE CSYSTE" DEFAULT) STACK
COUNTER

000006

000007

1'1:2
R3
114
RS
1'16
SP
PC

74
7S
76
'77

1777"16
1 77776
177S70

PS
PSW
HAROSII

.177776 ,PROCESSOII STATUS REGIS"7ER
·17'7776 ,PJlOCESSOR STATUS WORD
8177S70 ,HARDIIARE SWITCH REGISTER

177572
1 '72'516

SSRO
SSR]

cl77572 ,MEMORY MANAGEMENT REGISTF.R
8172516 ,MEMORY MANAGEMENT REGISTFR

170200

"'APREG

.170200 ,BASE AODRESS OP' UNIBUS MAP BOX (11170)

000003

000004
000005
000006

·'3

8\4
·,S
8'6
8\6
8'7

78
79
90

81
82

QAEO DECIXII SHORT "'ONfTOII
DXQAIIM.PII
2t-APR-77 12142
83

84
85
86
87
88
89
90
91

07UOO
000101
000102
000103
000104
000022
000222

IIICUl 2'7(1"06)

22-APII-77

12153

PAGE 4

SEn P1 ~8
MED
ROSERV
RDPBA
RDCUA
ROFGIN
1I0WHMI
WTWHMI

.76600
IIl0t
11102
.103
8104
8022
8222

,MAINTENUICP.: I':XAMINE AND DEFOSIT INSTRUCTION C11/(;1'))
,LOG SERVICE REG. A~R _. IIrAD
,LOG PHYSICH BUSS HIR. II!G. ADR. -- READ
ILOG CUPIIFNT MICIIO .~R. REG. AOR. -- REID
,LOG rL~GII/JTl!:RRUPT PC;G. AO~. -- READ
,GEN. ~HO AM I REG. ~DR. -- REAl')
,GEN. WHO ." I REt;. ilOR • • - WRITE

1'77772

PIRQRG

11177772 ,PFlOGFIAMIoIll:D IIiTEFIRUPT RJrQl1EST FlF;GI STER

140000
040000

UMODE
SMODE

11140000 ,BIT CONFIG!lRATJON TO
.40000
,9IT CO"'FIGUFIATtON TO

172300

!(I POliO

1'72302
172304
1'72306
172316
172]40
1'72342
172344
172346
172356

KIPDJll
ICIPOll2
I(IPllF!]
npOR'7
J(lPARO
J(lPAFll
KJPAFl2
KIPAFI]
KIPAR7

11172300
11172302
·172304
lit 72306
11172316
.172340
8172342
11172344
11172346
11172356

,KERNEL
,KEIINEL
,KERNEL
,KERNEL
,KEPNEr,
,KERNEL
,KEPNEL
,KEIINEL
,KERNEL
,KERNEL

INSTlWCTIOIll
INSTFlUCTION
INSTRl'CTION
INSTRUCTI!')"
INS'1'IIUCTlr:J'J
INSTRUCTlotJ
INSTRUCTIO"
INSTFlUCTII)N
INSTRUCTIO'l
INSTFlUCTION

17'7600
t77602
177604
177616
17'7640
177642
177644
1 '77656

UIPOFIO
UIPOlll
UIPDFl2
UIPDR7
UJPARO
UTPAR1
UIPAR2
UTPAR'7

lit 77600
11177602
:017'7604
1117'7616
11177640
.'77642
1:17'7644
1:177656

,USER
,USER
,USER
,USEII
,USER
,USER
,USER
,USER

INSTRUCTION
INSTRUCT lOll
INSTRUCT10'1
INSTIIUCTIO!4
INSTRUCTION
ItlSTRUCTIOIi

92
93
94
95
96
97
98
99
100
lot
102
10]
104
105
106
107

loa

109
110
111
112
113

114

PJOIC~TE
I~10ICATe;

PAGE
PAG!,;
PAGE
PAGg
PAG".:
PAGE
PAGII;
PI!.GE
PAG!!:
PAGE

PAGE
PAGE
pAGE
RAGE
PAGE
PAGE
IIiSTRUCTIO~ PAGt!:
INSTRUCTION PAGE

'JSEI'! MODE IN PSw
SUPEFlVrSOI'l "lODE pi P;;1oi

DE~CllIpTOR

llESCIIIPTOFI
DESCPIPTOR
DEsCRIPTOR
OESCRIPTOP
ADl)PESS
ADDIIESS
aODIIF.:SS
AOORESS
ADDRESS

I'IEGISTEP
REGISTER
REGISTER
REGISTE1=!
PEGISTER
FlEGISTER
IIP.:GISTER
RF-GISTER
REGISTEI!
IIF:GISTER

DESCIlIPTOR
O!SCRIPTOR
OESCRIPTOFI
DESCRIPTOR
A"ORESS
A"0 I'! I!: SS
ADDRESS
AlIORESS

QUD DEC/XU SHORT "'ONtTOR
DXQUM.PII
21-~PR-7'7 1214'

tiS
!!(.

131

000004
",,0"1)"
100000
040000
020000
010000
004000
002000
001 n OO
000400
000200
000100
000040
t'!00020
000010
000004
1)0(1002

132

ooonoi

1\7
118
119
120
121
122

123
124
125
126
127

129
129

130
U1
134
115

136
137

MACYll 27(1006)

2'2-APR-'77

12153

PAGE 5

SEQ 01!59
,MlKE TIJI':

PIRQ,
OPEN

UTi!
!'lITH
BITI3
SIT12
STTI1
BIT10
SIT9
Ell '1'8
BIT7

IITT"
BITS
BIT4
ElITl
81'1'2
BrTl
RITO

8100000
840noo
82(\000
810000
84000
820(\0
81000
.. 400
8200
8100
840
=20

j'FI~l)

"fl~OUIi!of

;~i~ i:F.~E;IN!ii~~..)E ~l:t V~~!~EL!5

THE lOT VECTOIl

AS 0 !!~CrtE STA;,":!';G

14 DEP'INI'I'ION

-10

,BIT
rBIT
,BIT
fBIT
IBn
,IUT
,BIT
,8IT
,BIT
,BIT
,BIT
,BIT

a4
82

IBIT
,BIT

2 DEP'INITION
1 DEP'TNITTOt<
0 DEFINITION

13 DEP'tNITION
12 DE!"TNIT!ON
11 DEP'INITION
10 DEP'INITION
9 DEFINITION
DEFINITION
'7 oEFrNITIO~
6 DEFItHTION
5 DEFINITION
4 DEfINITTON

3 DEP'INITIO~

I BIT

,aIT CONP'tGURATION
I BIT CONFIGURATION
,B!T CCH!!I'!GUl'!AT!ON
,BIT CONP'IGURA'I'ION
,TST
,CMP
,'I'ST
,C"!P

000340
000300
000240
000200

PRTY7
PRTY6
PRTY4

-340
8300
0;24(1
a200

005746
024646
00572&
022626

PUSH
PUSH2
POPSP
POPSP2

-005746
-024646
a005726
-022626

000100
000040
00031 0
000454
017'172
017116

IE
KRUFL
IOQL
TYPQL
TYPLIM
10QLIM

aAIT"
,DEP'HrITtON OF INTERPUPT EtHBLE BIT rOR ALL PDP-l1 DEVICE:S
.. 32.
,DEFINITION OF KEYBOARD 8UFP'E:R LENGTH (IN WORDS)
a200.
I DEP'tNITION OP' TlO SERVICE ~UEUE LENGTH (IN BYTES)
:0:300.
,DEP'lIiITION OF TYPING SERVICE QUE LENGTI{ (IN BYTES)
,DEFINITION O!l' LAST WORD IN TYPE QUEUE
aTYPEQ+TYPQL
"IOQ+IOOL
:DEFINITION Of' LAST WORD tN 1/0 QUEUE

PP~Y5

FOR
FOR
FOR
rOR

PRIORITY
PRIORlTY
PRIORITY
!)RIORITY

UVFL
L!VEL
LEVEL
LEVEL

IN PSW
IN PSIl
IN ~sw
IN PSW

D8
139
140

t41
142

143
144
145
146
147
148
149

QAEO DECIXI t
DXQABI-!.PI,
150
151
152
153
154

ISS
1'16
157
158
159
160
161
162
163
164
165
166

167
168
U;9
170

171

172
173
1 '74
175
176
177
178
179
lAO

SHORT MONITOr>
~!·APP." 12:42

"'ACyl 1 27( 1 006)

22-APR-77

12153

- (SP)
"USED TO ADO A WORD TO
THE STACI<
-(SP),-(SP)
"UIIED TO PUT TWO WORDS 0"1 THE STACK
(SPH
, ,USED TO DF'LETE A WORD rROIi THE STACK
CSP)+, (SP).,USF" TO DELETE TlIl'! WOR"S FROM THE STACIC

PAGE 6
SEQ 01(,(1

,THE f'OLLOI<ING DEFINITIOlllS ARE THE T'IIDEX VALUr::S USED BY MODE to AND '7
:"OIiITOR HIS'I'RUCTIONS WHEIII PEf'£RPHiG "'0 Loe~TIO"'S IN THE HEADEFI OF A MODULE
000005
00(1)20
000021
000022
000024
000026
nOOI130
000012
000034
000036
1)1)0440
00004'2
000044
000046
000050
000052
000052
000054
000054
000056
000060
0001)62
000064
0001)66
000010

(Hln072
000074

no0076

1111

000100

182
1113
184

onOl02

XF'LAG
STAT
STIITI
I'ITT
SPOTNT
PSCNT
ERCNT
SYRO
SYRI
SVp2

SVP3
SVR4
SVPS
SVR6

eSR).
ACSR
SRADR
ASTA!
\HSADR
ASB
AWAS
PSTRT
RBurVA
Fl8urPA
RBurEA
RBursz
WBUFPA
WRtTFEA
WRUP'RQ
WBUFSZ

,REFERENCE USED TO KEEP TRACK OF WRITll: BUFrER USAGE
,POINTS TO TfoIE LOW SITE OF THE 1dOOULE STATUS INORD
,POINTS TO THE HIGH BYTP.: OF THE MODULE STATUS WORD
,POINTS TO THE "ODULE 's STARTING ADDRESS
,POINTS TO THE IoIODULE"S STACT( POINTER
,REFERE"CES THE LoeATIO~ lCEEPING TRACK or THE NUMBER OF PASSES
,REFERENCES THE L"CATIO>J KEEPING TRACK I')P' THE NUMBER or ERROPS
,POINTS TO \1fHERE THE MO!'lULE"S REGISTER 0 CONTENTS ARE STallED
,POINTS TO WHtRF THE ~OOULE' S PEGISTER 1 CO"fTENTS ARE STOP.ED
,POINTS TO WHERF. THP: !-IOout,E"S REGISTER 2 CONTENTS AilE STOIIED
,pOnl"~ 1'0 WIfE.F 'l'fIf.: fl4ODUbr"8 REGte'l'f'R 3 {'O"'TE"TS it"t': HO"EO
,POI"TS TO WHERE TME MonUt,E'S REGISTER 4 CONTENTS ARt STaR to
,POINTS TO WHEPE THE "Or-ULE'S RtGISl'ER 5 CO!tlTEI(TS ARE STORED
,POINTS TO WH'!:PE THE ~ODULE'S REGtSTER 6 CONTENTS ARE STORED
rJ~Erp;RE"CES THE SASE AOryPESS or THE MODULE'S DEVICES(CONTROL AND
,REF'ERE~CES THE CONTE'MTS OF THE CONTROL A'ID STATUS PtGISTER
,POINTS TO THA ADDRESS OF WHU THE OATA $HOUl.D HUE BEEII
,POINTS TO I\NYSTATUS REGISTERNOT THE SAME AS THE CSP
,POINTS TO TH'!: ADDRESS OF loI'IAT THE DATAWAS
,POINTS TO THEACTUAL EXPECTED DAT~
,POINTS TO THE ACTUAL RECEIVED DATA
,POINTS TO THE "'ODULE RESTART ADDIIESS
,REFERENCES THE VIRTUAL ADDRESS OF THE READ BUrFER
,pOINTS THE LOC_TI0N rOR THE' PHYSICAL AODRESS OF THt READ BUrl"!R
,POINTS THE EXTENDED ADDRESS BITS or THE READ BurFER
,POINTS TliE SIZE or TliE REAl) BUP'rtR
,POINTS TO THE WRITE BUFFER PHYSICAL ADDRESS
,PornTS TO THE EXTENDED ADDRESS BITS or THE WRITE BUFFER
,IIErERENC!S THE ~M(lUNT OF WIHTE BurrER REQUtSTED tIT "'DDUL!
,REFERENCES THt sIZE I'!F THE WRITE BurP'ER

QUO D!C/XU SHORT MONITOR
DXQlBM.Pl1
21-APR-7'7 12142
195
196
187
188
189
190
191
192
193
194
195
196
197
199
199
200
20t
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217

MACY1! 2'7C 1 006)

22-APR-'7'7

12153

PAC! '7
SEQ nUl

,LOlD TRAP AND VECTOR ARU

01l01l00
01)0004
000006
000010
000012
000014
000016
000020
000022
000024
000026
000030
000032
000034
000036
<100040
000042
000044
non046
000050
000052
000054
onoo'S6
000060
<100062
0000/;4
000066

0011000
000000
012516
000340
012524
000340
004'7'72
000000
005510
000340

00001l1l
BUSEV,
RESIV,
TRCV,
IOTVi
pItJRP'V,

012636
000340
1)00032
000000
0124n4
000000
000040
000000
0000011
000000
1112'752
000000
01)0000
OOOOOOG
000001
ononljO
005644
000340
001406
000200

EMTVi
TRPVI

ODPPTR,

KYBoV,
TTPIV,

QAED DEC/XII SHOPT WnNITOP
DXQAB". PI 1
21-APP-77 12,42

M~CYll

27(1006)

._n
.WORD
8USERR
PPTY7
RESINT
PRTY'7
TRCI
0
PIRQ.
PRTY'7

0,0
,BUS ERROR TRlP POI"TER.
,RESERVED INSTP!JC't'TON TRAP.
,TRACE TRAP PClINTfl:R.
,SERVICE PIRQ CALL
,PREVENT LOWER LEVEL. MODULE FROM COMING
,TO~ OF HIGHER LEVEL ONES
,POWER P'AtL P"HIT£R.

PWRDN
PIITY7
.1'2
HALT
TPPINT
._40
.WOllD
.1010110
.WORD
LOGIC
OPEN
OPEN
C'AST
1
.-60
l<flSRVC
PRTY'7
TTYSFIV
Pf!TY4

,EMT POINTEII
,TRAP POINTEII.

OPE~j

,1.0110 MEOIUIiI IriDICATOR.
: CHIIIN /oIOOE Of'1LY. POINTS TO OOP/oION.

0
0

I GLOBAL POl'1T)l:II FOR CAST !.IOOIPIC ATIO"!
:ALSO ""II CAST

J KYSO INTEFIRUPT POI"1'EFI.

1 TELETYPE pPI "!TEP S"'PVICE

22-APII-77

12153

PAGE 8

IFROM 70 THPO!JGH 776 FILLED "'tTl' .+?

218
219

I~l

~NI'l

I.!AL!.

220
221
222
2?3
224
225
226

,LOlO STAPTING aDOpF·SSFS

227
229

000200

229
230

001000

000200
000137
01)1000
000137

onl004

00(1(10(1

001414
00141 ~

.-200
JIo1P
.-1000
JIo!P

STAf!T

,GO TO START OF

STAPT

:'10 TO

ST~P!

~·n~lTO"'.

OF "'C'MTTIJP.

231
232

P'AKESFli OPEN

,LOCATION OF PSFlTOO

swnC'''' REG. 'IJ.lE" USED

QUO DEC/Xt 1 SHOPT MONITOII
21-APh7'7 12.42
I)lQAB"'.PII
233
234
235
2]6
21'7

238
239
240
241
242

243
244
245
246
24'7
24&
249
250
251
252
253
254
255
256

MIlCYtl 2'7Cl006)

22-APII-7'7

12 i53

SEQ 0163
,VAlIUSt.E DATA APFA Ct.EAPEO EVEpy TIME RUN IS ISSUED OR -C IS TYPEO
.~YTE

OPEN

.IIYTE

OPE~!

.~YTE

OPE'"
OPEN
OP!':N
all!!:!!
QPi!:N

001006
00100'7
001010
ootoll
001012
0(11)13
001014
001015
001016
ootol'7
001020
001021
Qot 022
001023
001024
001025
001026
OO! 027
oot 030
001011

000
000
000
0011
noD
000
1)00
000
000
000
1')00
000
000
000
000
000
noo
000
noo

IOQU!I
TYPQU!i
SPCP't.Gi
DIRINOi
BKQUE,
SpAKE.
TTYBSYt
MOOCNTI
MOOCTIII
ERRINOI
P'It.CTP,
MOXCTP,
"'OXCNTI
WSrLG.
STopi
SKCNT.
)CCNTt
QUECTPj
XF'RF'LGI
1I0TCT.

~010]2

1')00

PASTOTi

.AYTE

OP;;;"

001031
ooto34
00103'5

000

pASRELI
B«TIMR,
ROT.

.FlYTE
.RY'!'E
.FlYTE

OPEN
OPEN
OPEN

000

.IIYTE
.BYTE
.BYTE
.BYTE
.BYT!:
.SYTE
.RYTE
.BYTE
.BYTE
.~YT!:

.BYT!:
.BYTE
.BYTE
.5Y'rE
• AYTIl:
.FlYTE
.BYTE

,IOQUE: AND TYPQUE MUST BE IN SAME WORD II
,SPCrLG AND DIIIIND MUST BE IN SAloIE WORD II

J'I'ELETYPii: flUSY Ii'LAG. (ill: NOT BUSY.

01'''101
OP!:N
OPEN
OPEN
OPEN
OPEN
OPEN

:OI:£RROII, NOT O:aOATA ERROP.
,EXTENOF.:O I/O MIJDUt.ES NOT YET RUN IN CURRENT BANK
: EXTE!lOEO 110 MODULE CorJNT
:CUPR!NT VALUE I)F XI"t.~G BEING CHECKED FOR
,STOP MOOUt.ES T(1 REr,OCATE PROGFIAM
I BIICKGpOUND MOOtrU COUNT
,RUNNABLE Il:XTENI)EO ~ODUL!: COUNT (TO CAt.CULAT£ ROTCn

OPIl:~1

OPEN
OPEN
OPEN
OPEN
OIilEN

,VALlIF. USP:D ,.011 RUF'II'F.P 1I0TATION TlIo1E.OUT 06 T!\!ES
I XCNT Oil 377, WHICHtyF.P IS SMALLEP)
I At.TEPNATF.:

'f,~

270

2'71
272
273
274
27'5
216

,,,

2711
279
280

2111
'92

293
2114
295
296

287
2"iJ

QAEO

RELOCATlnN COUNTER- TOTAL gNDPASS

,CALLS IN CURRENT BANK

25i
258
2'59
260
261
262
263
264
2*,5
266
267
269

PAGE 9

000
000

:BKMOD INSTil crR- t.OAOEO FROM 8KT1"I£
: iIIBUr POTATTON RATE CTR- t.OADEO P'ROM ROTN

.F,VE~J

001036
001040
(101042
ooto44
001046
01)1050
001052
0010'54
1'0100;6
001061'1
001062
001064

001066
Onll)'70
001072
1'101074
ont 076

oott 00

000000
000000
000000
000000
000000
000000
000000
000000
(11)(1000
000000
noool)o
000000
01)01'01)
01'10000
onn(\oo
00(\000
1'100(\00

001102
(\l'Ilt04
001106
1'101 II 0
001112

ooonno
Mnooo
000000
(01)1)00
000000
OnMn!)

1'01114
n01116
I'Il)t t 20

ooonoo
1'11)1'1000
01100110

OECIlIt!

CXQ~8M.~lt

nnl t 22
n01124
00II'*,
ont 130
001132
001134
001136
00' 140
1')1)11'2
1)01144

SHOPT "'ONITOR
21-.Pp • .,., Ui42
onnl)nl)
oonnoo
o('1'10 nn
noooon
000000
ooooon
onoooo
O(looon
('00000
nooooo

KBPTPI
MOOPTRi
ADDRLoj
ACORHI.
NUMAEPj
NUMBPA,
HUMBEl,
OSTADRI
SRUIINI
IOBKIOi
YES,
TAUDRi
PSTUI
TRCPCI
TRCPSW.
IOOl i
1002.
TYPQ1.
TYP021
TYPAOR,

OPEN
OPEN
ODF;N
OPEN
OPEN
OPEN
OPFN
OPEN
OPEN
OPEN
OPEN
OPF:N
OPEN
('IPP:N

: MOOULE POIIITFII

OPE~
QUF'U~

OPEN
OPEN

: I 10

OPEN

: t.OAO TYP" OUF:UE: POrr-iTFI>
'''''LOAO TYPF. QUgUF: POINTER

nPEN

POI N'l'ERS.

OPE~

OPEN
TYPCTRr OPEN
IlASCEAi OPEli
,!ypR~T:

:IISI'"!) TO MONrTOP CO"'SOLP: TELETYPE TO PREVr.'IT HA'IGING
:I.ISEO TO !lor,!) F:A lilTS FOR OCTAL TO
:ASCI I C:O."V .. PSlnN

PERRCT; OP!l/
OPEN
SAVt.1l1

SAVHli

MACYl1 27(1006)

OPEN

22-APp.n

121'53

PAGE 10
SEQ 0164

MOOADP.
TYPPt.
TYPP2r
TYPRll
TYPR4.
TYPR51
SPSAVI
EIIPPOSr
corM,
CCSRA,

: ADl'JRESS 01" C"Pp .. "'TT, Y EXECUTI'IC; (lOa LEVEt.) '!OOULE
,SAVF, LIjC~TIONS FOR TYPe: ROUTINE REGISTERS

: INOICAn: 1I!:1"P') TO CHF.CKOATA ROUTHiE:

QUO

DtClXtl IIIOIIT MONlTOP

DXQAlIM.Pl1
lOl
302
303
304
l05
l06
307
308
309
310
3t1
312
313
314
315
316
3t'1
3U
319
320
321
322
323
324
32!!
326
32'1
328
329
330
331
332
333
334
31'1
336

337
HI!
339
)40
341
342
343
344
345
346
347

348
349
350
3!!1
352
353
3'14
355
356

3!l1!
3!59
360

22-APR-77

n01146
QOt150
001152
00tt54
oot t56
001160
001162
oot 164
001166
0011 '10
001172
0011 '74
0011'16
0012 n O
001202
001204
001206

177560
177562
177564
17'1566
17'1'170
1234'56
022333
000000
000000
000000
000000
000000
000000
oonnoo
000000
ooonoo
00(11)00

TICSs
TKBa
TPla
TP8a
SRa
IIANNUMi
RANIfRKi
MEMVAI
I4EMPAi
MEMtAl
M!M12t
MEMSBEa
MEMIIJASi
LOCOR!,
ZERO;
LCOR12 ,
HCOR12 I

177560
177562
177564
1'17566
177570
123456
22333
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN
0
OPEN
OPEN

00\210
001212
001214
001216
001220
001222
001224
001226

000000
001414
000000
000000
000000
000000
000000
000000

HCOR5Va
If Bur a
WBrEAs
wBur12i
orrMXa
orrse:ri
orrSTDI
orrsTMj

OPEN
START
OPEN
OPEN
OPEN
OPEN
OPEN
OPEN

0012]0
001232
0llt214
001236

(loon 24

000000
000000
006000

MOVI'INKa
MAPIIETi
F:RRLIMJ
MxwBra

OPEN
OPEN
20.
AMOONM-START 12, 177000

000000
000000
0(10000
IInllOoo
000000
0001)00

TTYBYTJ
CXllnl
SY5CNTr
PWRCNT;
BKPTlla
KTPFlESi

OPEN
OPEN
OPEN
(lPEN
OPEN
OPEN

(lot 240
001242
00"44
001246
001250
0012!!2

0012'54
0111 '2'5!5
001256
0<11251
001260
nOl261
001262
001263
001264
001266
001270
001272
(lnI273
001274

001275
001276
001277
no! )00
0(11301
001302
001303
001304
001305

362
363
364
365
366
367
369
369
370
371
372

00 1 306
001]07
001110
001311
001312

373

00131]

374
375

1101314
001]15
001316
00131'1
001320
001321
onl322

379
3AO
381
382

383
394
385
386
]81

398

PAGE It
SEQ 0165

nLCN'rr .IlYTE
FILLE", • ",YTE
SYSERIa .BYTE
IIMODEa
.RY"E
CHN,
.BYTE
FlOTI,
.PYT!
ROTLi
.IlYTE
RELOCa
.PoYTE
ROTCNT, OPEN
IIOTNUMi 100
IIOT5a.i 4(10
rILLIOa • BYTE
MOVINGr .RYTE
RUNRrL, .BYTF.

014
000
1)00
1)00
000
000
1)00
(l00

onoooo
000101'1
0,.,04no
1)00
onll
1100

"'~CY11

27(1006)

,IF' THIS AND NEXT LOC ARE CHANGED,
,CHANGE LOC.8 LPWKI AND LPWK2 Ir PRESENT
,ADDRESS or THE SWITCH REGISTER
,RANDOM NUMBER IS CALC'!!D AND PASSED HERE
,ALSO tlSED flY RAND.

,STARTrNG AOOR 01" FPEP; CORt C"'ULTIPLE Of' 1000 OCTAL)
,LOCORE EA BITS
,TOP t 2 51T8 Of' LOW COilE ADOIIESS
:CONTAINS ST. "ODR OF IHGHEST BurrER.
J eTC'P 12 SITS O"LY)

n·AF'~.77

000
1)10
(100
000
000
010
1'10]

"lDL4S,
,awRrC,
MEIoIEJlP'1
SKU MEa
IIOTN,

.!lYTE
.RYTF.
.BYTE
.BYTE
.I'IYTE

OPE'"

000
000
000
000
000
nno
'100
000
1')12

PPRESs
CNT! I
AT!r
MP'LAGa
IINGnGa
MOVII'LGI
MSGP'LGI
DATnG,
SV/ILIMI
TP'LAGI
1'18TOPI
CLOCl<a
ALLBKI

,IlYTE
.RYTE

OPII;N
OPF.'l
OPEN
OPt::N
npEN
OPEN

000
nOI
000

.nTE

.BYTE
• ElY'!'!
.RYTE
.BYTE

,BYTE

oPg~

12 t 53

P~Gl':

11'1
3

OPP:~

OPP:'"
10,

.~YTI':

OPF'N
OPF~I

001]24
001326

OllOIlOOG

ooooooe

001 ]30
OO! 332
001 )34

001604
OOOOOOG
OOOIlOOG

HNGTtM! 900.
ALCLII,
LCLEAR
A!)CLII,
PCLEAII

: "P"Vl':"T ROTHI"N 011: CODE EXECUTHlIi
I PETRY COUNT 1'01< CON!" RP'LCCATION
nF TI"l!':S Tf1 r.HI!:Cl( rOQue: I3EfORE CHfi:CI(lNG
,TYpEQ WHEN HIJTH HAVE REQUESTS pE!'lDING
: 'IO"-ZI!:RO IF CPH J S t 1/45
:>iRTTE RUFFP:fI ROUTTO'l COllNT

OPF~J

.RYTE

,RYTE
.flYTE
.RYTE
.EVEN
I(wllL
cLocni
CLOCKPj KWI1P

oot 324

,WRITE eUP'p'FR RONnON LOCKED FL"G
:Pe:t.OCATIOh ALLt1WEO nAG
: POTlI.Tlr)N COU'ITII;II USF.O WITH R('ITL
: pnTATIoN CON liT ANT TIsrr. WtTll POTCNT
I POTUE PRClGP~M !lY qK
trILT, INDrCATr)II •
:CODe: SlnNG Pt:L'lCHBD

SF.r.
OPE'!
OPp:N
OPEN
111

OOn

:PUN MODE IN01CI\TOR

OPP:N
OPF.N
o PII; "

.!'IYTE
.BYTE
.PYTE
.RYTE

ono

:MAX StZE OF WRtTE I'UFF!':R. VARIES
: Ir BurFER ROTATION I IS ENABLED
J O"LX PETUpN ADDpESS
ITOTA!.. NUMBF,P nF SYsTEM F.PROIIS
ITOTH NUIIBER 0" POWER FAILS
JQUFUE POINTEII INlTJALIZATION FOil RUfIj.~ING BICMODS
l"IH1BITrD Oil NOT PRESENT [LEAVE AS FULL
:I<'ORO rOR EASY "IODIfICATI"N AND TO GIJARA~TEF.
,TH_T nLCNT AtlO FItLF.R "DE PI SA"'E 1100110)
: FILCNT AND rtLtER "UIIT SF. IN SA"IE IiORD

12.
0
OPEN
o PI':'"
OP£,N
OPEN
OPEN
Opr N

LOCICS
MVDOWNI
RETRYa
QUECNTr

000

:CONTAIN5 CtTRDE)IT WRITE BurFER ADDR.
,WRrTE BUrFF.:p EA 8tTS (SHtFTED TO pos 4,51
I TOP 12 BITS OF w~UP' ADDRESS IF USIJlG IIOTaTIOI,I
I TOP ALLOWABLF.: J.'R(lGPAM OFFSET
: CURRENT PROGRA'" OFFSET
IDESTINATION or' .. ET
:SAVE LOCATIO'l II'OR t'ESTINATIO!'l OFJI'Sn
,DIJPING MOVE
,FlANI\' BEING r.<('IVl':D [SOURCE AOOpESS)
I PETURII ADDRESS FPOl' MVCODE ROU'l'lNE

,(I.

3~1

376
377
378

12.53

.VAIIUBU AND rUEO DATA ARU NOT CLUIIED WHEN PUN OR -C IS ISSUED

QAEO DrCIXll SflClPT ~Ofl!TC1I(
DXQAB"!.Pl1
2i .. APR-" 12142
357

foIACY11 2H 1006)

21-.PII-77 12.42

!
OP~N

,_ nF GW811f' CALLS (I.. ESIS ONE) NEEDED Pt:R
:ROTI:IU" CALL
:PAPITY PRESE'JT, n.,plwIRJ'I'I!:!:' nJ< !lI")NEX! S!E:-·:T

,rLAG INDIC~TP:S CI(HUNG ROUTIN!i; IS BUSY
IFLAG USED IN ~cnDr POUTIIJE
I'JDICATlNG "'SGIJ OP MSGS CALL
:P'LAG 1NDtcaTINr, CKI'ATA OR OATACI( CALL
: HAX. NUMBER O~· SYSTE~ EIIROPS ALLOIOlEO
: TIM!'"R FLAG tHDIC A11"G ERROP OR Enp
: FL~G PRF.VFNTINt; ST"", FflOM F.lEING SET
:CLOCf( FLAG SF.T FOR SliORT ".OIlITOR
:WHEtl >jnN I) ",F.ANS JI'JN At.L B«III")OS F.lEFOFlE
:FL~G

FH~L('ICATr>JG

:wILL BE 0 IF NI) KW! t-L CLOCK
,WILL SE 0 tF NO KW,,-P CLOCIC
,HU"G TIlliE LIMIT TN SECONDS
,5U'lI!OUTI'IE AnORESS I~ L CLOCT( filOOULE
,f;t)'IPOUTINE ADOR IN P CLOCK MODULE
,loILL OPOP ANY flO ~ODULE INACTIVI'.: FOP 15, "I'IS.

f\1~~

Qun DECIX1t SMOP' MONITOR
DXQA8!f.P11
21-lPII-71 Ui42

!fACYl1 2'7Cl006)

22-APII-77

12153

PAGE 13
SEQ "167

*** DO NOT CHANGE THE SEQUENCE or TilE NEXT 9 HOIIDS *** I
391
392
393
394
395
396
397
398
399
400
401
402
403
404
4115
406

QAED

,FlEP'EII TO THE DOCUI4ENT rOil THE MONITOR CHECKSUM MODULE CRKBA)
,rOR THE liSE or Tfl~ NEXT SIX WOPOS. AND HOW THE TWO ·OPEN" LOCATIONS
tARt DEnNED WHEN A NEW VERSION or THE MONITOR IS RELEASED
OO! 136
001340
001342
001144
001146
001 ]50
00135]
001156
oot 360

1 ]7'577
OO''i41
001414
015232
t 37607
00264,

137577
CHteL21
CHKH21
2641
CHKSUMi .WORD
.!IIORD
CHteLII
137607
CHKH!I
2641

001353

.000

000003
000000
000000

104INITSi OPEN

HOURS.

,LOW
START
WCASE!:

CH«SU~

FOR PROC. WITfl NO IITT INS!.

,HIGH CH«SUM
: BEGIN ADDR OF MONITOR PURE AREA
: ENI) ADDR OP' '40'!ITOFI PURE AilE A
,CONTAINS LOW ClCSH or !lONITOII PUIIE AlitA (PROC WITH RTT)
,CONTAINS HI CKSM OF HO"'ITOR PURE APEA

.flLKB

,HOtlRS IN ASCII
,MINUTES IN ASCII
,SECONDS IN ASCtI

SEteNDSI OPtN
.EVEN

OECI'<t1 SHORT MONITOR
21-AP~-71 12142

MACYl1 27(t006)

'2-APP-71

121H

PAGF. 14

DXQ~RI'.PI 1

4('7
408
409
410
411

SEQ 01"8
,VlPtABLF' QUE CALL APU- KEPT I" rrpONT OF STAPT SINCE IT IS I"IPtlRE CODE
,COMMON '~UE CAL~· ROUTINE. nOES A DIRECT DTSPATCH PATHER THAN
,REOUEtHr; DUE TO "iULTIPLE POINTS CALLING THtS ROUTI"[ WHICH
,MAY OVERLAP IF' II!"OllEUED.

412

413

1'11)1 362

012700

414
415
416
417
418

oot 366

ooot ]7

nOl172
OOt374

0001100
000000

419

OOlH6
O'ot 400
n014'"

O(tOOOO
onllt37

.'lO

411

0013'12
002500

COMQUEI MQV
J~P

ICADDR, PO
IOQSVN

CADnR I OrEll
CSTART, OPEN

104421
0(11202

:DESTINATION ADnll.
,IIIODULE START "!:IDP. (0 P'OR MONITOR).

,CHtCICDnJ ERROR rHl
CDERRI
I)EIIRXS
{' DI!:~!lt1 t """III
J"P CORET

422
,TELETYPE ROUTtNI'; prRQ CALL
,TTYL~IIC IS FREQUT';"TLY "1001"1£1) OUR 1 NG EXECUTlON

4'3

474

425

426
i27
429

001406
0"1410
001412

ooon04
01'!6426
nnOOOO

TTYSRV, PIRQ*
TTYLNK, TTSRVt
(I

QAtD Oa:cnll 5HOFtT MONITOFt
OXQUM.Pll
21-APFt-" 12.42
429
430
431

432
433

434
435
436
4]7
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
459
459
460
461
462
463
464
465
466
467
469
469
470
471
472
473
474
475
476
477

IIACYtl 2Hl006)

n-APR-'I'I

12.5]

PAGE 15
SEQ 0169

I STARTUP SEQUENCE
(101414
OO! 416
001422
001430
001434
001442
001450
001454
001456
001464
001466
001472
001500
001504
001506
001512
001'516
001522
001'530
001534
001540
001546
001550
0015'54

000005
012'106
012737
(112746
012737
012'737
00577'1
000404
012'137
022626
012637
012737
005737
001002
004537
004737
10'5037
112737
105037
104406
022737
001002
1 n4406
004737

001560
001564
001566
001572
001'1'16
001602
001606
001612
001616
001620
001624
001630
001634
001636
001644

105'137
001402
104406
00503'1
004'137
0047)'1
004'13'1
105737
1)01002
004737
104406
105'137
00140'1
112777
000137

001650
n016!14
0111660
001666
001674

012706
105037
012737
052777
113737

STAPTI
016'546
012636
000004
1'17570
001456
1'17502
001004

000024
001156
000004

001156

H.
41.

000004
(162)4
001200

001250

016606
1'112272
001257
1 '177'77
n01262
014062
001004

001021

2*.

001156

014756
013262

5581

000041
0144]1
001224
014060
012272
012354
001252

0\'1(116
014122
001260
000015
00'1420
1'116546
001256
016306
000100
001100

QAED DEC/XI1 SHOIIT MONITOP
DXQABM. I'll
21-APR-77 12142

5'1
17'1172

68:
INPUTi

001036
177252
001027

M~CYl1

4'18

27(1006)

PESn
MOV
UPBOT,P6
MOV
• PWFtON, PWRP'V
MaV
tRUSEV,-(SP)
MOV
.HAROSFt, SFt
MOV
'U,BUSEV
TST
'SR
BFt
U
MOV
U' AkESFt, SR
(Sp)+, (SP)+
CMP
IIOV
(Sp)+,BUsn
MOV
.MODQ-2,BKPTR
LOCORE
TST
8NE
2.
R5,SETBUF
JSR
PC,CLRQUS
JSR
CLRB
RMODE
Move
'-t,MOXCTR
CLIIB
ROTL
MSG.,TITLE
CMP
"',.Kr.SII,SP
SNE
55.
MSGe,NOSWII
PC,!!OTCHJ(
JSR

:CLF.AII QUP.:UES Pi CAsE MVCODE OVER WROTE THE"!
,1NtTtALIZE VF:CTO" AIIEA
:KTI I IN USE ?
: YES. CO!llTINUE
,NO. LOAD w('lP1!T CASE' PATTF.:RN Itl 8UFFER
:TYPE DOT.
,CHUN MODE?
:NO- GO ""'),TT J(EYBOAPD INPUT
,Ct-EAN nUT I<F.YBCla"D BUFFEP wIT"! 11 CR
:YF.:1!-STJ.1I1 PU'IMING.

iSPROT,1I6
SYSERT
• KSUF, K1!IPTR
liE, ElTI(S
QUECNT.OUECTR

"-),PR-77

12153

,JNYTIALIZE COUNTE!!
: MAI<E SUR I!: 1I0T~T10l'l IS NOT LOCKED
,TYPE TilE TITLE
,DO WE H~VE A Rr.At SII?
,!III IF YES
,ELSE T!LL HIM WHP.:R~ IT IS
,CHECK IF ROTAT'" ALLOWED lINO TYPE RANGE.
I ~NY LOAD MII'OIU'I flITS sn ?
:NO, CO'lTINUE
;. TO EXEIICYSe: LOAD MEDIUM YOU !'UST Ct.!AR Loe 40
:MAI(E SURE PROGIIA" IS NOT PARTIALLY RELOCATED

TSTB
1U41
BEQ
18
MSG.,CLR40
CLR
OFF5TD
JSR
PC,MVCOOE
PC,CLIIOUS
JSR
PC,CLRVEC
JSR
I<TpRES
TST8
RNE
5.
PC, LOADWC
JSII
foISG.,DOT
TST!!
CllN
I'lPlJT
SEQ
MOV8
.15, ElKBPTR
JMP
PUN
!oOOV
CLR£I
MOV
IUS
Move

I CLEAFt THE WORLD.
,SET UP SUCk.
I SET UP POWER rAn nCTOFt.
,S~VE PRESENT 8US EFtR TRAP
I SET SR_HAROWARF. SR
I SET NEW BUS P:RR TRAP
: IS IT H~POIIARE SR?
: U' YES, PESTORE TRAP
I ELSE 811.:T UP SOFTWAPE 8R
I RESTORE STACK
:RE8TOR1I.: BUS ERR TRAP
I It-llTIALlZE TO STAPT IIJ( MODS WITH 1ST ONE
,DOI,jE BUFFER SETUP?
,BR IF YES.
,NO. DO IT.
,CLEAR QU~UES.

,RESET STACie.
,CLEAII SYSTE'" ERROR tHOICATrlP.
,INITIALIZE K'iBO I'IUF'FFR Pt'lI'ITER.
:ENABLE J(YSO INTEPIIUPTS.

PAGE \6

srQ ~170

,QUEU!!: CHECK.

NOT! TH1IT IF IOBI<IO IS HEGATIV".:. NO TYPE QUE REQUESTS ilILL BE SEPVlCF.l'I

QUnSTI l'IF.CB
BCT

QUF.CTR

479
480
481
482
483
484

001702
001 '106

t05337
003004

001027

485

no! 710
001 '116
001720
001724
001726
001732
001736
001740
001744
001746
0017'52
001754
001760
001764
001766
001772
001776
01)2"00
002004
00201 n

113737
000405
105737
001402
000137
On5737
100422
105737
001412
1 05737
001002
000137
00533'1
0010n2
000137
005737
001402
000137
105737
1'101'134

001300

486
48'1
498
489
490
491
492
4<13
494
495
496
497
499
499
500
501
502
503
504

001027

001006

ttl

002424
001060

2. i

001007

3$ r

001014
002650
001110

QTSTA,

n06426
0011170

QTSTB,

002622
001257

QTSTCI

MOVA
8R
TST8
BEQ
JJlP
TST
8MI
TSTA
BEQ
T51R
RNE
JMp
DEC
BNE
•.1Mp
1ST
SEQ
JMP
TSTB
8EQ

QUECNT,OUECTII
2.
IOQUE
2.
IOQSVC
IOBHD
QTSTC
TYPOUE
OTSTB
TTYBSY
QT5T1.
TYPSVC
TypeTR
OTSTB
TTSRVI
TIICpC
OTSTC
BKQ5VC
""'ODE
QUETST

,COUNT TO PPEVENT BREAK CUlLS FRO'" LOCKlpjG "UT TypINe;
,At..SO PREVENTS HIGH SPEED lilT DEVICES FRO~
: LOCKING OUT TYpF. QUEUE AND R"N SERVICE
,STAIITUP OF MODULES
: RESET QUr COUNTE"
110 QUE REQIIEST PF.Nf'lING?
:GO SERVICE IF YES.
,STARTING 1/0 ,",ODULFS?
,£IR IF YES.
I TYPE REQUEST PF.NI'II~IG7
:BR IF N"T.
,TTY RUSY?
:BR IF YES.
I NO. GO SERVICE TYPF; QUEUF..
,CHECK FOil TTY HUNG
: UNHANG TTY
,RACkGROUNO "OOllLE PENDING?
: JUMP IF YES
I TN IIUN MOOF.?
,BR IF NOT, GI) CHFCK AGAIN.

inc.

!)EClXl1 SHORT MONITOR
DXQAIIM.PII
21-APII-7'7 12142

MACYll 2'7Cl0n6)

002017

510

002016

511
512
51]
514
5! 5
516
517
519
519
520
521
522
523
524
525
'126

002020
002024
002026
002032
002034
002042
002044
002050
002052
1102056
002060
002064
002066
002014
1102076

002i04

528

002tto

529

002112

530
531
532
5ll
'134

0021.16
002122
002121i
1)02130
0(12114

'559
560
561
0;62
563
'564
565
566
'567
568
569

570
5'71
572
5'11
574
5'15
576
577
5711
'579
5110
581
592
593
584
5115
586
587
598
599
5110

105737
001311
105'737
00140'7
105'73'7
001407
01273'7
000415
105737
0(11314
105737
('Ill I 007
It'1573'1
1000(14
012737
00(1702

062737
1)1,.,00

001322

04ClI120

TilTS
BEQ
foIOV
BP

001060

TSTR

001024

1",.,30

(1)!?]'7

On1'-22

,91t IP' YES. 00 NO'!' INn MOllE MODUlo!!.

STOP

13.
H0020, rOBKI0

MOV
BR

001040

.2,~ODPTJit

REQ

"'''ODiiTJiI,M
71

rSp)+,IOBKID
!IS
orrsn
28

,CORRECT "'onULE TYPE TO RUN?
,NO- BRANCH
lIP' OP'P'SI!:T 0, IGNORr. BITS 10 +11
: CONTINUE

UTB
BNE
T5TB

III

,,0.
MOV

IIIC
C:MP
BNE
TST
SEQ

Clt'l1414

MA.CYll 21(1006)

STOP
QUnST
foIODCTR

,JitUN ALL BKMODS 8£P'OJitE RELOCATING
,NO, CONTINUE
:WUTING TO RELOCATE '1
,NO, CONTINU!
,STAJitT UP ONLY BKMOn'S
,CONTINUE

AD!!

eNE

111'1.

000002

,IS THE BRAKE ON?

('Ifl1060

OOU60
040020

BIIAl(!
OUf;TST
ALUI(
12,

,STOP SET?
,YES, DON'T START ANY MOR!: MODULES
,!!ODCTR .01
,BR IP' NOT.
,YES. UtE WE IN CHAIN MOD!:?
,BR IP' NOT.
,SWITCH IT '1'0 BACKGROUND AND PREVENT LOOPING
,THRU BACICGPOUNl'! MOOULE SERna MORE THAN ONCE
,POINT TO NEXT MODULE.
,/OODULE ADD II TO 110.
:1\11 Ir tOO AnDR.

lui

OOtOi6

000020
016000
001060

is
CHN
18
H0020,IOBKID
QUETST

:;;;i;i ~I;i ir~rTi ~~i s;;~;;i;~ i~i~iiL INDICATORS

22-ApR-77

12,53

PAGE 18

21-ApP-71 12.42
1I]27liO
001125
032737

0021 "14
0112156
0021 6 4
002166

OOl4n4
1)32761l

Ot'l2266

BEQ

001024

001474
016n46
042716
022637
001134

on2136
(102144
00'1 4 6

002172
I)02t74
0022 11 2
00121!'
11"2216
002220
1)02224
00223('1
002236
002?4,
002244
002252
002254
0112262

JitUNSVC i TSTS
BNE
TUB

001011

DEC /XII SHORT MONITnll

DXQARM,PII

'5'5('1
551
552
553
5'54
555
'156
557
558

1'7

5011
509

PAGE

,RUN MODE SERVICE ROUTINE.
,NOTE THlT MODULE'
STACIC POINTER IS RErNITULIZEO BUT OTHER
jll1i:GiS'ii:iiS ;;AVE ANT iiji!:VIOii5 YALu!;! RESTORED AT STAPT OR RESTART

~~;

535
'36
537
5 )9
519
540
541
542
543
544
545
541i
547
548

121!l3

SEQ 0171

505

Ql£O

22-APR-77

SEQ ~172

0(14000

1'100020

0017'7'7

001222

IlO200o

1)1)0020

nOli l '
005737

100406
11271'1
01l73'7
OJ2'1~O

01')1402
105237
105060
016060

10'5137
0010('14
01603'1
000407
016037
005760
001001
000765
105))'
000137
022737
001004
1112737
000434
022717
001013
273'7
11273'1

001060

flIT
ANE
BtT

HI IT t! ,STAT(PO)

"'FoQ
flIT
BillE
TI;T

28
'(\IT10, STATeRO)

8MI

17'1'1"
0(11)40
I'Ii0nOO
001 ('122
1100005
00('1024
0012'74

001013
001250
000n20

"'nvg
MOV

381

lllT

481

BrQ
INCB
CLRB
MOV
TSTB

000046

000022

001054

448.

000062
000026_

001054

58,

002270
0022'12
0022'76
002302
002310
002312
O1')2]?1l
(1)2]22
01')2]30
t'l021l2
0112]40

041000

001060

14('1000
1777'17

001060
001021

on2 )46

10503'/

0011)22

002]52
002156
002]60
002]64

t05037
000415
005'137
tOOO12

002366

113737

6,i

0010Hi
002514
040000

001060

041000

001060

""E
MOV

001120

9. ,

00 I 060

001022

Oot021

.'777,OP'rSET

IDflKID

,YES- tGNORE BIT 10
,NO- BITIO S!T?
,YES- DON'T PUN MODULE
,BACKGROU"IO MODULE?

,fiR IF' NOT,
,YES, lPPLY BIIAKE.
,IIECORD MODO ADDRESS or CURRENT BKMOD
*1'II112,STA'l'(M) :;:XTE~OEO 1/0 ;lOOk)L!:?
4S
I NO- BRANCH
foIDXCNT
,YES, COUNT IT
XP'LAG CRO)
,CLEAR INDICATOR
SPOINTC RO), SVR6 (RO) 1SET up MODULE SP POINTER,

'-I,BRAKE
MODPTII, BlCpTII

Rt1N~P'L

!Ie

CMp
BNE
MOV
MOVB

I"fIT(Po),DSTAOR ,SET UP DESTINATION ADOR.
68
PSTPT CFlO) ,DSTlOR
PSCNT(RO)
,JoIAS MODULE BEEN THRU START nT?
,sp Ir YES
6S
441
:ELSE GO BACK
MODCTR
10ECR COU'lT OP' 'lODS II/ITED,
IOQSVE
rOO TO START NODULE
140000, IOBKID
,P'INISHP:D WITH SPECIAL BKMOO
,BR Ir NO'!'.
U1000,IOBKID
,YES, SWITCH TO NBKMOD
10i
,CONTINUE
Ul000,10BUD
,P'INISHEO WITH NBKMODS
,NO, CONTINUE
9'
.140000,IOBICI0
,YES, SWITCH TO 101400.
'-t,MDXC'!'P
,INITIALLY LOCK MDXCTq

CLIIB

MOXCNT

I INITIALIZE com.'!'

CLRB
BR
BPI.

NSTOP
10,
IOBKID
10.

,ALLOW STOP P'LAG TO BE
, CONTINUE
,IP' ALREADY BACKGPOUND
,DON'T RESET "'DXCTR

MOVB

foIDXCNT, MDXCTR

,SETUP MOXCTR

BR
MOV
TST
BNE
BP
OECB
JMP
CfoIP
BNE
MOV
e~

881

11$

,II1Tll SF.T?
,YES- ~ON'T RUN !.IODIlLE SINCE np'rSET NOT 0
,orrSET 32K MULTIPLF.?

TST

SET

QAEO DI'.:C 1lC11 SHOPT ,",0 III TOR
:21-APFt-" 1,j42
OXQU'"'.PI1
5Ql
'59:2
593
594
595
596
597
598
599
600

!oIACY11 27Cl006)

22-APp.n

PAGI'.: 19
SEQ 0171

n02374

1:112737

040021'

0(11060

MOV

'4ry020,IOII)(ID

, SW!TCH TO

00:2402

013137

001250

001n40

,CONTINU! WITH NEXT BKMOO
,SET RUN RESTART P'LAG11/60

011040 1
012737
000137

MOV
MOVB
BFt
,",OV
J14P

BKPTR, MOOPTR
11, RUNRP'L

002410
002412
(1024'20

016234
001702

QA!D DEC IX11 SHORT "'O~: 'Ta~
71·lPR-7~ 12:42
DXQASM. PI 1

001040

10$1
1111

MACYll 27(1006)

B~CKGROU"D

MODE

11 $
• "'00Q-2, "'OOPTR
OUnST

22-APR-77

12153

: POINT TO "'ODULE TABLE

••••••••••••

ST~RT.

PAGE 2C
SEQ r,tH

,110 QUE SERVICE POUTINE.
,SEFtVYC!S PIRQ., QU!':., AND BPEA!(S CA1,LS
,NOTE T"'AT PIRQ SFPVICE CAN OCCIJR 0'" TOP ['IF' THIS ROUTIN!- SO
,LEVEL 7 pRIORI'!'Y IS PI'.:OU!REO II" COUNT IS [lECDE14ENTP:D AFTf,R 1002
,IS MOn~D

6111

60:2
603
604
6n!
606
fl07
608
609
610
611
612
611
614
615
6! 6
617
619
619
620
621
622
623
624
625
626
621
628
629
630
611
632
633
634
615
636
637
638
639
640
641
642
643
644

121!13

1\"'424
001437
0~?414

002442
002446
0024~2

002460
002462
002464
002470
00'2472
00'2476
002500
002504
002~06

002510
002514
n02522
002530
002532
002536
002544

002546
002552
002556
002562
002566
002570
002572
002574
002576
002600
00260'2
002604
00261 0
002614

OO'1!>20

023727
103403
012737
l'l!U7
nl7700
062737
010001
014046
"22726
0010n2
000137

n'i\ 07f,

017116

016606
001006
176424
000002

001075
001076

~'440'7

0"3136

00~'720

0120]7
012000
nOl(11)2
00017'1
! 161)37
032760
on 1402
Oll0137
032760
001002
000137
010037
01063'7
062700
014006
01400!l
014004
0140n3
0140112
014001
014000
013746
10!066

013746
00 (1 il()!i

001054

176340
000020
020000

001066
000020

001702
n40000

0001)20

001702
n01122
001136
000050

001066
000001

'011)54

lOQSV': I C"'p
PLO
MOV
nECB
I*'
MOV
ADD
MOV
MOV
CMP
BNE
JMP
Hi
TST
IOQSVNj W)V
MOV
SNE
JMP
IOQSV!I M!'lVEI
IOQSVAj flIT
BEQ
JMP
BIT
UI
SNE
JMP
MOV
28,
MOV
AnD
MOV
1OQSvoi MOV
MOV
MOV
MOV
lolOV
MOV
10QS13 i MOV
CLPS
MOV
PTT
IlTTlI

IOQ2,UI:IOLI'"
is
HOQ,I002
rOQUE
~IOO2,RO

'2,10Q2
PO, PI
-CPO),-CSP)
tSREAK" CsP)+

2S
I'PEAK.
(PO )+
(RO)+,DSTADFI
( Fl o)+,1'10
IOQSVE
1II0StADFI
STUCRQ) ,FiSTAT
.IIIT13,STATCRO)

QlInST
tSJTI4,STATCPO)

QlIUST
RO, MODlIDFI
R6,SPSAV
tSVP6+2,PO
-CRO),R6
-CP01,R5
-CRlll,R4
-ClIO),R3
-CFlO)'1l2
-CM) ,R1
-(110) ,FlO
RSTAT,-CSPl
1(SP)
DSTADFI,-CSP)

:Rl':ACIoIED LI"'lT (:lP' OllEllE?
:p'P IF' "CIT.
I FlIl:SET IOQ2.
,DECREMENT FIE QUEST r.OUNT
:GET PC+2 OF" CALL.
,UPDAT1'; IOQ?
,SAVE PC+2 OF CALL
,PlISH C~LL ON SUCK
:SRnK CALL?
,"la, CONTINUE
,YES, G!'l SEFiV!C,E IT
:1;1;:1 DE5TTNATtON ~DnFl.
,GET '10DULE ADoR. IS IT O?
:SFI IF' 1I0T. IT"S A "OOULE.
: GO DO MONITOFI FUNCTION.
:I;ET FlUN STATUS.
,MODULE STOPPED?
CONTINUE
,YES, rORGEr IT
: IS foIOOULP." SELECTED
,YES, CONTINUE
,NO, FOFlG"T IT
,SAVE RO. CMODULE AnOR).
,SAVE MONITOFI STACK TOO!.
,RESTOR!: lolOoULE" S PEGS.
,STAPTING WITH STTlCK POINTER.

'''(I,

:LOAO FlUN STlITUS.
,KERNEL, 1 ST REGIST!'.:P SET
: LOAD DESTl NATION AODFI.
:GO TO DESTINIITIO".

OlEO DEC/Xtt aMi:II" MONlTO~
DX018M.Pl1
21-lPR-77 UrU

MACYll 21(1006)

22·AP~-77

12i53

PAGe: 21
SEQ 0175

,UCKGPOUNO QUEUE

645

SE~VICED

HERE.

e46
647
648

649
no

002622
002630
002U6
002642

OU731
lU731
01"00
005037

002646

000725

001070
001072
176176
001070

001054
001066

8KQavci MOV
MOV8
MOV
CLR

TRCPC, DSnOl!
TIICPSW,IISTAT
,MODPTR,RO
TRCPC

651

652
653

OAED DEC/X!! SHOIIT MONITOII
DXOlBM .Pt!
21-APR-" 12142
654
655
6'56
657
658
6'19
660
661
662
663
664
615'5
666

I§'n
669
669
670
671
672
671
674
675
676
677
679

MACYll 27(1006)

IOOSVA

22-APII-"

12153

, su UP DESTINATION ADDR.
,SET UP RUN STUUS.
,/<IOOULE STAPT AOOR TO RO.
,CLEAR 81( /<IOOULE WAITING INDICATOR.
,IF UROR OCCURS, WILL STOP MODULE 'ROM FURTHER
,tncu'!'toN UNTIL !:RIIOR IS Rf:POR'l'!O
,GO GET GOING,

PAGE 22
SEQ 0176

,TYPE QUE SERVICE ROUTINE.
,REMons PC+2 or CALL rROM Q, PASSING IT IN 111
002650
002656
002660
002666
002672
00'616
002704
002710
002712
nn27U

""7"770

0(12722
002724
002730

0"2712
01)?1)4
n02742
00'27'50
0027'56
002764
00''''

023727
10]403

001102

027572

012737

n17116
001014

001102

105237
017'701
062137
105337
ot0146
005741
OtOU7

"'1,n'l\
006101
ot6l01
0011201

0114626
004440
003 t1 0
00300"
000001
0(001)1
01llt'50

TST

-C1'I1 )

001046

MOV
"OV
ASL

lit , NUMBrR

,lInCHEO UPPER I!:ND r.tF QUEUE?
,BII IF NO'!'.
,YES. RESET TYPQ2.
,INDICATE TTY BUSY.
,GET PC+2 or CALL.
,UPDA'!'!: TYP02.
,DI!:CIIEMENT IIEOU!:ST COUNT.
, PUSH PC+2 OF C _Lt
,POtNT TO CALL.
:SAVE ADDRESS OF' CALL

(ltU,J!1

:GET C'AtL

17172"

MOV

11.

116204
000002
onl001

TYPSVCI CMP
BLO
MOV

001102

INca

MOV
-DO
OECB
MOV

IITS
Oo)5?4
000001
000001
000001
000001

OOl!H6
003506
000001
002774
003244

TYPTABI ,WORD
,IIOPO
.WORO

TYPQ2, • TYPL I M
1$
nYPto, TYP02
TTYBSY
nyP02,Rl
.2, TYP02
TYPOUE
Pl,-(SP)

Pt
,TI"ES 2.
TYPTAB-TRP2-4(Rl )'lIt
,rOPM SERVICE ADDR.
,GO TO n, PEST"!!!: 111.
111
PASEND
!!;NN'VC, !:PPSYC, [""YCt
"'SG., t ,tIlSVC2,MSGN., 1, 1, 1, 1,"SGS., 1, t ,DEPRX.,MSGO.

Qno DEC/Xt t aHO~T MONITO"
DXQUN.P!1
21-APR-77 12i42
679
690
691
682
693
694
695
696
697
699
689
690
691
692
693

695
696
697
699
699
700
701
702
703

704

22-AP"-77

12;53

PAGE 23
SEO 0117

,MSGN. ROUTIN!. SERV ICES C.LLS TO TYPE ASCII "'ESSAGES.
002774
003002
003004

112737
000402
10503'7

003010

012137
012137
010137
013701
032177
0010n
105737
100410
01)4737
004537

003014
003020
003024
003030
003036
003040
003044
003046
003052

003056
003060
003062
003064
003066
003072
003074

ooliOO
1)03t02
003106

117177

001314

MSGS.I
NSGN.I

001064
001374
001372
001374
020000

MSCONT; MOV
MOV
MOV
MOV
SIT
BNE
TSTB
8MI
JSR
JSR

176120

001314
004314
006340

004737

'-t , MSGrLG
MSCONT
"'SCrLC

,SET MSGS CALL rLAG
,CONTINUE
,SET MSGN CALL n_G

CAt )+,TASADII
(1It)+,CSTART
III,CAODR
CSTART,R!
.BITU,PSR
MSGt.
MSGrLG

:GET ASCII TASL-! AOOR.
,MODULE ADDR TO CSURT.
, RESUME AOOR TO C aDOR.
r MODULE ADDII TO R1.
, INHIBIT ERROR PRINT?
,8R IF YES.
,IS THIS A MSGS CALL?
, YES, CONTINUE
,NO, 00 COMMON STurr.
,TYPE
" CARRAGE RETURNS
,C014"'ON HEAnER.
,PASS ' .

18
PC,ENDCOM
R5,TYPEN

CAC~

014127
015541
015576
000000
01)701
Ot 2146
022716
001412

NOVB
BR
CLRB

001314

1)01064

2.i

lEND
,PASS
0

"'ov
"'OV
CMP
BEQ
JSR
8R

177777
006356

000771

QArO DEC/lett SHO~T MON ITOFI
2!-APP-77 12i42
DlCQAB"'.Pt t
705
706
707
709
709
710

M.CY11 27(1006)

M~CY11

27CHI06)

TABAD~,~l
(~t )+,-(SP)
'-1, (SP)
MSGl.
PC,TYPE

22-APR-77

12,53

,TABL! ADOR TO Rt.
I GET MESSAGE AOOR.
,TERMINATOR?
,8R Ir YES. DONE.
, NO. TYPE MESSAGE.
,GO DO IT AGHN.

PAGE 24
So:Q OJ 111

,MSG$ CALL SERVycrO HE"!!

711

003110
OOH 12
001116
01'13122
003126

712

OOlt 12

012146
010137
005')37
004737
1 051)17
0"0137

MSG.i
001372
001374
006356
0010t4
001362

'"'0 v

040V
CtP
JS~

MSGt .,

et.RS
Jl.lP

(P1)+,-CSP)
Pt ,CADDR
CSTAFIT
PC, TYPE
T1'yesY
CIJMQUE

I ASCII MESSAGS:: AODFI TO STACK.
:RESU"'E ADOP '1'0 C"OO~.
:TNOtC_TE "'ONnOFl QUE CUI,lNG.
,GO TYPE DESIRr.n "ESSlG!,;.
f GO QUEUE UP TO IIES1Ih1E.

~:~~BM~~~:Xtl :~~::R:~;tr~:42

MACYl1 27(1006)

22-APR-77

12i!51

PAG! 25
SEQ 0179

,BUAK POUTtNE. SERVIC!S BREAK CALL.

713

714
715
716

717

001t]6
003140
01)] 144

Ot2100
IHOll7
000U7

BREAK.i MOY

(R1)t,RO

001054

MOY

Rl,OSTAOR

002514

Jtlp

IOOSYE

Qun DEC n i l SHORT MONITOP
'21 -~PR.77 12142
DXQABM.Pl1

MACyll 27(1006)

728

729
710

HI
732
713

7]4
1]5

736
717

01)3150
o~31 54

0031 60

ooH62
(101\66
003172
1)011 74
003200
003204
001206
01)3212
01\3216
003220
01)3226
003210
00]234
001240

011)1 J7
0(41)7
012601
1)101 ]7
1104537
016141
01)4737
0045 J7
0\6153
1'104717
11045)7
01620'5
012777
oot 0r)4
(112146
01'147]7
000137

onU72
004376

1')04]76
nl1744

004376
011144

11161411
006356
004222

PAGE 26

I !.lSGOS SERVICE- TYPF. DATA ERROP
,ANO MALT MODULF TP' NtCF.SSARY

COU~T

MOV
"SP
MOV
.,OV
JSP
AtRNM+l
JSR
JSR
.lEPCT
JSF!
JSP
A.. RTOT
8tT
PoNt
MOV
JSF!
MSG01.1 JMP

I SET UP F!E5U"IE .a('lDj:I~SS
: GET MODULE ADDRESS

MSGD.I

001374
011206

020000

1215]

.5f.Q 11 80

718
719
720
721
722
723
714
725
716

22-.lPR.7'

,GtT ~OOULE ADD~.
,Gn DESTINATIO'l ADDR.
,QUE UP TO RESUME

175730

Rl,CADDR
pc, TYPOJ.T
(SP)+,R1
Rt ,CSTART
R5, FILLN",

AND

TRA~SP'ER

sIZF

: SAvt AnDRESS
I GET "'ODULF \llIME

PC,TVPD.lT
R5,RDCNV

,SETUP ERROR COflNT (ASCtI )

PC, TYPOAT
P5,POCNV

:SETUP TOTAL wORDS TRANSFERRED

'",IT13,1ISP
"'SCDt.

11I'HiIBIT ERROR PRINTOUT?

'~I':IlNM,-(SPi

,YES- BRANCH
: ~O. TYPE "'F:SS/lGE

PC,TVPE
EIlSVND

:CHECK FOR Hl\l,.TING MODULE,

~ND

PETURN IF ,,;OT

QUD
DECIXI t SHORT MONnO~
OXQaI'M.PII
21-APII-n 12.42
'Ill
'Il9
740
741
742
743
744
745
7415
747
741
749

750
751
752
753
754
755
'56
7!n
758
7st
7150
761
762
783
764
7155
766
767
769
769
710

771
772

773
774
77'5
776
771
778
779
780
781
792
793
784
785
7815
7117
798
789
79C

MACYll 27Cl006)

n-APII-"

12in

PAGE

2'7
SEQ 11181

,DEIIIIX. ROUTINE. SEPVICES EXTENDED DUA EIIIIOR CAr..r..S FROM THE MaNITO!!
,CHECKDATA ROUTINE. TYPES 1:1111011 INrORMUION ",..D IIETURNS

003'244
003252
003254
0032150
003264
00321515
1)03272
0032715
001102
001106

OOHU
00]]16
001]20
001122
0033215
003332
003]34
00H36
001142
001344
00U50
003)54
01)3)56
003]60
003364
(03)70
0033'72

OOll74
003402
003404
1)03410
003412

(1)1416
001420
1)03422
003424
003412
003434
003440
1103444
0034415
003452
003454
003460
0(13462
003466
003470
003472
0034'74
003500
00151')2

OAEO
DECIXII
OXOA8M.Pt1

112137
005721
010U7
004737
012601
010117
004'37
012637
004737
012702
004737

00000:

OEIIIIX.I "'OVB
TST
MOV
JSII
MOV
MOV
JSII
MOV
JSFI
MOV
D!RRXI i JSR
DEC
8NE
MLlV
JSR
ArRNIol!!
Ct,R
TST

110(1(160
011524

1100001

001017

001172

004376
001374
004176

001046
004114
000005
004176

005302
1')01374
0161415

004537
11115052
005046
0115766
001402
012716
004537
1115722
01260]
(126)7
0063l'
012346
012346
015]766
103002
01527115
005723

004537
01601)2
0123415
012346
061766
10]Q02
062715
o04H7
01 '.1765
004537
015735
004'137
015750
01)746
000241
006216
00'nt6
004'137
016034
000137

000030
1111744

(l,rw
JSR
AO'l'l!:6
~OV

002140
001140

001140

000002

000020
2'1
011524

MOV
ASr..
MOV
MOV
ADD
BCC
ADD
TST
JSP
.. DTP.:4
~OV

001140

(100002

000020
011524

311

011512
,,: • 51 ~
001140

011'744
004014

SloIOFlT "ION:TDR
21-lPR-77 12142

"'.Cyll 27(10015)

!'IOV
A['10
acc
ADD
JSR
AOTE5
JSR
AOTE3
JSII
AOTE2
MOV
CI,C
ASR
INC
JSP
ADTE7
JMP

'I,EIIIIINO
(111)+
RI,CADDR
PC,TYPOAT
(SP)+,Rl
III,CSTART
PC,TYPDAT
(SPl+, NUMBER
PC, [NDCOM
n,R2
PC,TYPOAT
R2
O'flFlXl
ERCNT(RI) ,-[SP)
R5,80CllV

,POINT TO RETURN LOC UION
,SETUP RESUME ADDRESS
,GET MODULI!: ADDRESS
,AND SAVE IT
,SI!:TUP ADOPES! or CKDATA CALL

,EFlROR COUNT TO STACK
: CONVERT ERROR COUNT TO DEC IMAr..

-(SP)
2[SP)

16('), (SP)

:CSqA EA BITS
,CSR ADDRESS- ASCIl

R~,OACNVX

(SPl+,R3
(SPl+,ERRPOS
EIIPPOS
(R3)+,-(SP)
(R3l+,-[SP)
ERRPOS, 2 CSP)
2.
120, (SP)
CP3l+
R5,OACNVX
O)+,-(SP)
C3)+,-(SP)
EIIRPOS,2(SP)

I SAVE TABLE AOD~F.:SS
,SAVE orrsn COUNT

t SETUP READ BurP'ER PA
,GET tA BITS

:SKIP SIZE
,GET PA OP' ROADR
,GET WRIT!!: PA
,GFT EA BtTS

3t
.20, (SP)
115,ClACNVX

: GET ASC I I <:IF WAACR

R5,OACNV

:COI-.IVERT SIS TO ASCll

R5,OACNV

,CO"VERT wAS TO ASCU

EFIRPOS,-(SP)

,r.RROR POSITION I~ RUFP'P:R
,COIIRECT BACK P'qo~ PYTE TO WOFID PTR

[SP)
(SP)
P5,qDC~V

,"'AICE 1ST walla H
,etT t'lECI'lAL

EflSVX

,GO TO C0'4f'101-.1 IH)UTI',E

22-APR-77

'2153

PAGE 2R
HG nlQ,

,ERPOFI caLliS AilE Sy.RVICr.O !!EPE.
,Rt AT ENTIIY CO~T.INS PC+2 or C~LL

792

?Il
7114
795
796
797
798

11015015
003514
003516
1'103522
003524
0(\]532
1')03516

112737

001742
003746

10503"
000403
112737
012137
t 22737
001"02
012137
0111137
013701
01)4737
005261
01')1002
OO!! t 6 t
012702
1\04737
005 J02
001174
1'1161415
on4!!37
016052
105737
00104'
004537
015750
004537
015H5
012637
t04413
013746
0117415
004537
0115002
012637
104413
013746
01374&
004537
015715!
0050415
016637
001402
012716
004537
015722

841
942
843
844
845
9U

OCJ7!50

OOOA2:

CHi!2

I'~H':

U"I

~n'iC

7119

eoo

81)\
902
903
804
e05

OOU44

9315
937

003546
no3552
0035515
(101562
1)01'566
001'572
001514
01'13600
003604
001610
003612
003614
001620
003624
003626
003632
003634
003640
1'103642
003646
0036S0
0011554
1'10315150
0031564
003670
0031574
003676
n03702
0037015
003;12
003716
003722
003724
01))7215
003714

8]8

001716

839

~06

807
e09
809
910

911
912
9tl
914
EllS
916
8t'l
9t8
8t9
920
921
922

823
824
825
9215
827
828
A29
830
9]1

832
8)3

834
835

940

( }' '( tl ~

OOl,SO

000003

001017

ERSVC2, 140VS

00040~

BII
COl ('II '7
000002

001314
000003

Ol! '

(1)4531

01!!U'
(105045

JSII
tNC
BNE
Cr:I"I
EFlSVCS; MOV
ERSVCCI JSR
DEC
B>lE

oono]o

000030
011744

"'OV

0010t .,

01l5t2
0010415
0010415
001050
001052
011524
0010415
0010415
001050
0OI~52

011524

000060
011!l24

001144

Hi
2111

',11! 12

O,ERPINO
ERSVCA
EPIIIND
EPSVCl

,YNDICATE !'IIPOP'I CUI,.

'2,FRRI~O

: tNOI~ATF. ·~'()I>~l\L· fRROP.
,1IAVE STAIIT ~ ;:lOR 01" ",noULP.:.
,'RPORN CALL?
:BP IF >lOT
,SUE TABLE lOOR.
f RESUME AOOR TO PSF.':OB.
,GET BACK STAPT ADOP.
J DO COM~O'" STur",.
,TNCPEfoIENT "'DOUIJE"S ERRnR COUIIT.
I ell II" PESU!,T NnT I).
,IIF-SET COUNT TO " ' .
,G!;;T TYPE DATA F'FlO" QUEIlE TO ST,.CK.
,00 IT.
lOOt_F.?
:!lFI IF' "'OT.
,F.RROP COUNT TO SnI':K.
:COfllnRT EPFlOI'! COl'NT TO OECI"IlIL.

(Pt )+,CSTAilT
B,I"RRINO

it
CRt )+,TA8.1.011
Pf ,CAt'lOFl
CSTAPT,Pt
PC, ENOCO'"
EII(,NT(Rt)
n~SVCB

gRCMTCPI)
.~, Fl2
PC, HPDA'!'
P2
EPSVCC
ERC"iT( P1), - (SP)

RIj,BDC~V
JSFI
AERNIII8
TSTS
EPRJNO
BilE
R5,OACIIV
JSR
AOTE2
JSR
P5,OACIIV
AOTE3
IolOV
(SP l+, NU"'BEFI
G1!:TPAS, NU"'BER
lIOV
NU!4SPA,-CSP)
foIUfoIBEA,-[SP)
MOV
R5,OACNVX
JSFI
AOTU
(Spl+,NUM8EP
IolDV
GtTP" $, "lUlIB!P
Ntrlo'SPA,-(SP)
MOV
IliOV
NUMBEA,-(!P)
R5,OACNVX
JSR
ADTES
-(SP)
eLR
NOV
2(SP) ,CCSPJ.
BEQ
18
HOV
160, (SP)
115,OACNVX
JSR
.. OTES
E!lSVX
BII
(SPl+, (SF)+
i' 3, O,.C;';V
dolL

:28

011512

000002

f'lIW

1o!0V

000005
1104376

0037112

1'101017

001064
00U72
001374
00U14
0(100]0

~'~1'6!

001017

ERSVCII CLRS
8R
EPRSVCI ~DVB
!PSVCA, MOV
CMPB
BNE
'lOY

JSP

,HlnICATE DATA

,OA TA ERROR?
,RR IF' 1I0T.
,COIIVERT WAS TO ASCll.
:COIWVEIIT SIP TO ASCrI .RESF.T TYPQ2.
,GET ADO II (lr LOCATION RUD

,CONVERT WASAOII TO aSCII.

,CONVERT SaAOl! TO ASCII.
,0 ONTO SUCK
,SAVE CSR ADDIIESS
IIf' 0, SIIANC!!
,SETUP I!:l BITS
,CONVEPT CSR ADDR TO ASCII.

,SKIP WA.S A"O SIB.

,Culo:VEI'l:r StAT llF.:G CONTEfIITS TO ASCII.

1'"CiAC~V

,CO/>lVEP'I' CSR CO"'Tr.NTS TO ASCII.

-( SP)

,,, ONTO

ACS~:

CI,R

EFlRO~.

ST~C1(

QUO OECIXt 1 IIIIOPT MONnO~
21-APR-" 12142
DXQAB"'.Pll

....
US

950
851
952
8'53
854
B55
856
8'57
958
~59

860
861
862
863
864
865

966
867
!lIS!!

a6g
8'10
~'t

972
S73
974
975
976

877
879
879
~eo

981
1182

883
8~4

'185
886

987
988
R~9

890
891
RII2

893
994
ell!5
A96
!!Q7
~98

999
1100
90i
902
lin)

QlEO

003772

016637

004000

OO140~

004002
004006
004012
004014
004022
004024
004030
004032
(l040H
004036
004040
0040U
004050
';04052
004056
004060
004062
004064
004066
n040?2
01'14076
nn4,04
004106
004112
0(14116
01)4122
n04126
004134
0!H136
004,42
004146
004152
00 4 154
004156
004162
004164
004170
004174
1')1)4176
Or,4200
004204
004210
n04212
004216
004222
n04226
o(4231)
00 4 2]6
n04240
n1')4246
004250
004254
004260
004,64

012'716
004537
015653
03?717
001077
004537
014127
015541
0151J76
016044
000000
122731
01))406
004537
016(112
015714
000000
000404
01274!

OC,4H7
122737
ont 004
012746
0(14737
012746
1'104737
I 2:n 37
O{lt032
013702
012703
022712
001417
013246
(10451'7
0151515
012746
01'14737
0(5)03
1'01363

012746
004737
on0754
O! 2746
00473'7
005717
100410
nn"l61
00)0' 0
(132717
OOIN!4
1)(\50)7
MOD'7
105037
nO'!7]7

000002

MlCYll 27(1006)

22-APR-"

001144

140V

PAGE 29
SEQ 0183

0000110
011524
020000

1215)

l'75134

BEQ

MOV
JIIR
ACSRAC

160,(SP)
R5,OACNVX

!:RSVXr

BIT

.flIT13,UR
EPIIVNO

'781

JSR
CRC:FI
AEND
,PlSS
!:RRNMB

811

CI4PB
BLE
JIIR
ADTEU
ADT!:RR
0
aR

B~!:

006340

,SAVE CSR ADDRESS
J Si(ANCH IF' Run"~55

2C$P),CCSRA

,COI>IV!:RT CSR lOOR TC ASCII.
I IN~IBIT !:RROR PRIN'l'?

JB:FI IP' YES.
,TYPE
J 2 CAIlIlAGE RETURNS
J COMMON HE.OEII.
,PlSS ' .
,il:RROR ••

R~.TYPEN

000002

00101'7

1)06340

015645
00635&
000001

01602&
006356
014155
006355
001')003

!II
001017

2'1

001017

001064
000010
117777

4a I
5a I

1'111512
1)15515
006356

014155
006356

1)14155
006356
174130

~OV

28
UrPROR,-(SPl

PC:,'rYPE:

cupS

II ,ERRIND

SHE:

II
UDTEX.-CSP)
PC,TYPE
UCRLP',-CSP)
PC, TYP!:
13, E:FIRIND
ERSVND
nBAOR,R2
R3
'-1, (2)
6$
1!I(2)+,-(SP)
R5, CACNV

MOV
JSR
'1CV
JSR
CIolPR
9'12:
MCV
'lClV

c,..p

040000

174710

,IICLD6, - (SP)
PC, TYP!:
R3
58
UCOlr..',-CSPi
PC, TYPE

MDV

DECIXII SHOPT MONITOR
21-APO-77 12142

C"'P

eeT
en
181

01'11144
004446
001014
1'101144

aNE
eLl!
J~P

211

MACYl1 27(1006)

I".,

SEQ
MOV
JSR
HliLD6
MCV
JSR
DlC
BilE
>10V
JSR

8"1
noo030

is
R5,TYPI!:~

JS~

JSR
EPSVNO 1 TilT

01)1234

; DATA ERROR?
,BII IP' MOT.
IYES, TYPE
rDATA ERROR VALU!:!;

'2,ERII!ND

CtR!!
TST

: TYPE ER~OR I4ESIIAGE.

,!:XTENDED DATA ERROR?
~ P-JO= 'A~ANC~
,YES- OIJTPUT POSI'I'ION IN BU""!:R

,ERRCRN CALL?
,SR IF NOT.
,TABLE AODR TO R2.
,WILL TYPE 9 VALUES PER LINF.:.
, TERMINATOR?
,aR IF YES. DOH!:.
,PUT VlLUE I!'i S'1'ACK.
,CCNVERT IT TC OCTAL.
,AlIID PUT IT H!:RF;
:TYPE IT.
,DONE: II PF.:R LINF,?
,SR IF -.rOT.

,OuTPuT CPl. ••

'CO FOR MCRE.
HCRLP',-CSP)
,CUTPUT CRLF'.
PC,TYP!
,HALT MCDUl,F. ON EIlIIOI<?
IISR
,BII IF YES.
18
EPRLlIoI,EPCNT(1I1)
,EPIIOl' COUNT 20 OR GREATER?
,aR IF NCT. CONTINUE MCDULE txtCUTION.
2.
: YES. HALT MODULE A!"TEII 20 [l;IIRCIIS?
tIHTI4,IISI1
:NO- SIC!P
2.
CCSRA
ICLUR CCSlU
E~DSVA
I YES, GO flA!.r MMULF.:
TTyeSY
I QUE TO IIFIIU"-F.
CCSRA
rIP' NOT SETUP. !:lOrl''1' RESTCRF INTO MODULE

22-APII-'77

12.!5)

PAGE 10
SEQ OiR4

OXQA£\M.PII
9n4
905
906
907
908

n04270
01)4272
no 4276
n(4)n4
0('4]10

01)1407
nlHOO
1)13760
000;017
000137

1)01374
001144
001144
0111362

000050

38,

REQ
MOV
I40V
eLII
JMP

3$
CSTART,IIO
CCSFlA,CSFll(PO)
CC'SRA
COMQUE

,RESTORE CSRA til MODUL!

QUO OEC/XU SHOIIT MONUOR
OXQUM.Ptl
21-0R-" 12iu
909
910
911
912
913
914
915
916
917
918
919
920
921
922

004314
004320
004324
004330
004334
004336
004342

004344
004350
004352
004356
004360
Q04364

923

004366
004372

924

004374

104413
013746
013746
013746
160116
004537
015566
004537
015553
004537
015541
016146
005216
0045]7
015606
000207

928
929
930
931
932
913
q34

22-APII-11

12153

PAG! 31
SEQ 0115

!NDCOMI GETU" NU"'8!R
MOY
'NI)IoI8,A,-(SP)
MOY
NUMBU, - (SP)
!olDY
NUMBER,-(SP)
lH,(a,)
aUB
JaR
R5,OACNY
UN02
JSR
115,OACNYX
UNDl
JSR
R5,rILLN!o1
UNO
!lOV
paCNTCRl) ,-(Sp)
(SP)
PIC
JIll
115,BDCNV
APASS
RTS
PC

001046
001050
0010!2
001046
011512
n11524
011206
000026
011 744

QUO OEClXl1 S!!ORT "ONITOP
OXQA811l.P21
21-APP-77 12142
q'5
926
927

MACYll 21(1006)

MACYll 21(10011)

'2-APR.77

12.53

,NUMBER CONTAINS ADDRESS or CALL

,eop,oPUTE ASSEOlSLY PC.
,CONVERT ASSEMBLY PC TO ASCrI.
,CO'lYF'RT PC T!'J ASCII.
,LU'S GET "'OOULE NA"!.
,STU'F' AT UNO.
,GET PASS coun.
,up IT t.
,CONVERT IT Tn. OECI"IAL ASCII.
,I,ET'S GET ClUT.

PACE 32
51"" '11 qf,

,TYPOA'l' ROUTINE Ln.,OS QUEUEO DATI OMT" STACK.
1104376
0044(10
0(14406
O()44t 0
(104416
004424
1104432
004436

011646
"23727
10]40)
012737
(117766
tl62737
II1"iH7
000207

oott02
017116
174460
000(1)2
001007

017572
001102
000002
0(1111)2

TYPOAT. M"V
CM,
BLO
"IOV
MOV
181

,.OD

orcs
PTS

(SP),-(5P)
TYPQ2,ITYPLI'"
11

tTYPEQ, TYPQ2
IiTYPQ2, 2( SP)
'2,TYPQ2
'rYPQUE
PC

,SlIVE EXIT ON STACI< .GAIN.
: REACWf:(l F.:rHl riP' QUEIIP:?
,8P IP' ~IOT.
,Yr.s. pnI'IT TO snp'" OF" QI1EI.'E.
:PUEUE DATA Tn STAC~.
:llP""T£ QUEUE POI"T~R.
IDEC''REOjFNT COUNT.
rEXIT. LrAVl'" flUA %" S'PC'I(.

QAtO REC/Xt t aHiH''!' MONITOR
~~~hM.pit
21-APR-n 12142
93S
936
93'1
938
9]9

MACYll 27(100"

22-APR-"

12153

PAGE U
SEQ 0197

rEND CALL SERVICtD HERE.
n04440
004"2
0044U

01 i 101
00"37
oS2761

004454
00U60
004462
01)4464
004,66
004470
004474
004500
004502
004506
004'512
004514
004520
004522
004510
004532
004516
004542

004!!!)?
014127
o Hi!!! 41
01561!!1
01)0000
10'51'131
005761
1004\0
11'15037
!o!!!717
001403
105737
0(141)
032761
00 l402
105337
105]31
105737

'1i:;~

oo4:i66

~C! ~2e

960
961
962
961
964
965
966
967
968
969
970
971
Q12
973
9'74

004550
004556
004560
On4!564
004566
(11)4572
0045'74
004576
0046 0 2
004604
004604
nn4610
1104614
004616
004622

! 23737
003021
In'57]7
001404
11')5737
n01404
0"0412
11)5737
O(l11l07

j;No$vc:i "o'v

oonu
020000

000020

ENDSVA i

JSR

SIS

(Flll,FlI
r GI!:T START flOOR.
PC,ENDCOM
100 COMMON STurr.
IBUll,STATeRI) r sn STOP B tT IN' IIOf'JULE STAT.

tl40
941
942
943
946
tI'S
9U
94'7
948
949
9'50

951
952
951
954
955
9'56
Qs1
959

oon! ]7
10'5737
001002
1'100\37
1100137

JSR
CRCR

1I!!!,TYPEN

,TYPE
t 2 CARIIAGE RETURNS
I COt-lMO!l H!ADER.
I END MESSAGE.

TTYBSY
STATeRI)

,CLEAR TTY BUSY INOrCnOR.
r SACKr.ROUND MODULE?
I BR Ir NOT.
,REL!flSE BRAKE.
I STOP MODULES rOR Rr-LOe AT ION?
,NO, CONTINUe;
,RUN ALL BKMOOS Be:F'ORE RELOCATION
INO, CONTINUE
I EXTENDED IIO MOD'
,NO- BPANCH
I YES, DEC £XTEII!')EO "00 COUNT
,O!:C~ COUNT OF' MClDUl,!:S RUNNING.
,RELOCATE CODE?

lEND
MODEND
('l

2. I
. CLlIS
ENDSVEI TST

001014
000020
00101J
ootn:u
r;;'l ~22
010000

000020

001022
001015
(101024
001015

111
61.

001025

Bill

CLRS
TSTS
BEQ
TSTB
IIEQ
BIT
BEQ
DECS

BRAKE
STOP

Df;CB

TSTI'
9::Q
ENDSVGi CMpe

is
ALLBK
ENDSVG
nIT12,STAT(R!)

51
MOXCNT
MODCNT
STOP

: ~!o~ !:;t~NC}:

EN05V::IoI0DCNT,SKCNT
E:'lOSVD

,ALL 1/f) MODULES orr?

001322

TSTB

ALLI~K

="'0- eRlNCH
lI.t.L BKMOO"S BErORE RF:LOCATtNG ?

REO
00101!!

TSTB
SEQ

1&
"'ClOCNT
ENDSVB
ENDSVD
BRAKE
ENDSVD

COl-<TINUE
I ALT. MODULES DO"E ?
,:iES, GO RELOCATE
,NO, GO RUN THE REST OF THE MODULES
,YES- BKMOD OFF'?
INO- BRANCH CSTr:!P BI<MOD CLUNLY)

RUN~ES

,GO STAP'!'UP AGAIN
I ANY "'ODULES RUNNING?
,YES- B~A~ICH
,COUNT Il. T1!:PI.IINAT! RUN MODE.
,Gr:! BACK TO SEPVTCE QUEUES.

sr.!

BII
001013

0074'6
001015

ENDSVS.
JMP
ENDSVF'. TSTB

TSTB
BNE

BilE
t)()6142
001702

OAtO DtC/XU SHORT r.lONITOP
DXQABM.P11
71-apP-77 17r 4'
915
976
Q7'7
978
979
Q80
981
997
993
994
985
996
987
989

111

006340

JMP
ENDSVD i ,]MP

MACv11 27(1006)

,~lIN

'''0,

MOOCNT
E;NDSVD
CTPLca
QlI1'.:TST

22-APR-77

12153

PAGE 34
SEO

,PASENO FC'UTINE, TYPES END OF' PASS ~ESSAGE,
,SACKGPOtlND MODULEs ARE NOT ALLOWED TO IoCAKE MULTIPLF: PASSES,
I IN CHA IN MODE NO MODULE ALLOWEO TO MAKF r.lULTIPLE PASSES.
01l4U6
0114&30
004636
004642
004646
0114654
n04656
1')04662
0(14666
004672

011101
0161]7
0101]7
005261
D32777
Oc\1417
004737
016146
(1(14'537
(115636

~~~

oof~"f~

od4t;3'''

990
991
992
99]
994
995
996
9117
998
999
11100
1001
1002
1001
10t)4
1005
1006
'007
1008
1.009

004700
004702
004704
004706
OCl4710
n04712
004714
004720
(104724
0"4726
004712
004734
On4740
on4746
0(14'750
n04756
004762
004766

1')15541
015627
014125
1')00000
1\('('400
105037
105737
1 00663
00,\761
100415
10St)]7
037 7 61
001725
0'52761
105337
000tl7
000137

0(10062
001374
000026
nu)ooo

(101372

1'74302

on4314
000026
CIt 1744

PASEND, MOV
MOV
"OV
IIIC
SIT
ui
!,\EQ
JSR

"rw
JSR
BPSClIIT

.1!5'fl

"06]40

1'114127

(PIl,Rt
RSTRTCRU,CAD[\P
Rl,CSTlRT
PSCNTeRI'
_IIITI2,1I8R
PSE'IDA
PC,ENDCOM
PSClIIT(Rl), -CSP)
R~, SUCNV

!'I'I, 1YPE~

!P
PSENDAi CLFR
1STR
11"1
TST.
28,
BMI

00002(1
001013
001000
(120000
001025
004474
001362

CLR~

000020
on0020

BIT
BEQ
8IS
DECa
JI4P
PSEIIOElI J"I'

,'l"'fPr'

:2 CAR?AGE RETURNS
: COlolMON HEADER.
,ENOPAS AND COU'l,!"

CRC?
AEND
APSENP
CP
0
001014
001260

,LOAD PI WITH "'OPUL£ ADDRESS
: SAVE RESTART AODPE~S
,SAVE MODULF ADORP.:S~
,tNCPEME~T PASS COUIIIT.
,EHOPA8 PRINTOUT?
,liP IF' toIOr,
,00 COM"ON STUF'r.
,NOW GET IT.
,CONVERT IT Tn ~ECI"'AL ASC II.
,STUPP IT AT APSCNT.

DS~"'Dl
TTY~SV

CH"
ENDSVE
STATeR1 )
PSENDB
BRAl<E
.81T9, STATeR1l
ENDSVD
,SITU. SUT(R1)
BKCNT
EIIOSVE
COM QUE

:CO'fT!MtrE
,CLEAR TTY BUSY INDICATOR,
: IN CHAIN 10400£1
r SF IF YES TO END MODULE EXECUTIO>l
,BACKGROUND MODULE?
I~P II" NOT.
r RELEASE IIRAKE,
: IS IT AN NSKMOO ?
,NO, COIIITtN!lE
,YES, S!'!' IT"S STOP 8IT
,ONE LESS BKMOD RUNNING
,GO TAKE CAPE or OTIlER STUF'P
r GO TO COMMON QUE C /ILL,

I'lt~e

QAlD DEC/Xll IMO'" MQN!'I'Q~
DXQUM.Ptl
U-1PR-" 12in
tOl0
1011
1012
IOU
1014
1015
1016
1011
1018
1019
1020

MACY1! 2'(1006'

12i53

P1Gt n
SEQ "1119

,T"lCE T""P EMU"S HERE,
1.104"2
004'"
1.11.15001.1
005002
OD!lOl0
1.11.151.114
~G!5D16

1051n
10041.11
000006
11373'
1.105131
1.101'771
1.112637
1.112637
00041.11

001034
001304
001006

TRCli
001034

TRCIA.
TRCIC.

0011.171.1
0010'2

TRClII.

QUD DEC n i l SHOPT MONITOR
DXQABM.Pll
21"PP-'" 12.42

MACYlI 27Cl001l)

1021
11.122
11.123
11.124
1025
1026
1021
1028
1029
10]1.1
10l!
lDn
IOU
10H
10]5
11.1]6
1017
1038

22-1PII-11

1.105022
00!l026

DECS
BMI
RTT
MOVB
TST
BEQ
MOV
MOV
SR

BICTIM"
TRCIC
BICTI"'E, lIJ(TIMR
IOQUE
TRCU
(SP)+,TRCPC
(SP)+,TRCP5W
EXITI.

22-APR-71

1 '2153

I 110 OR TtP@: QUE WAITING?
rNO, EXIT.
,SAY! MOD'S PC.
,SAVE MOD'S PSW,

PAG!!: III
SEQ

I EXIT CALL EN'I'!J:lS HERE.
01.15030
00'5032
005034
00'51.140
01.151.144
005046
IIO!l05G
01.15052
OO!lo54
01.1505'
005060
1.11.151.162
01.15066
0050'1.1
1.11.151.174
01.151.176

1.122626
111('1.146
013701.1
06271.10
1.112621.1
010121.1
1111.1220
1.110321.1
(110420
1.1 1 ono
010610
013'06
1.105046
012746
001.101.12
000137

EXIT •• , CMP

(11.11122
001.10 !2

01.11136
01.15016
001702

EXIT1,1 MOV
,",OV
ADD
MOV
MOV
1010 V
"'OV
MOV
MOV
MOV
MOV
!XIT2,i ct.JI
MOV
PTJ
ui
J"'P

(5P)+, (SP)+
RO,-(SP)

"ONDJI,po
.SVPO,R1I
(SP)+, CFlO)+
FIt, CRO)+
P2, (PO)+
Jl3, (RO)+
R4, (RO)+
R5, (RO)+
R6, (Ra)
SPSAV,Fl6
-csP)
'1I,-(SP)
QUETST

,SAVE RO IN SUCK,
I "'ODUT,E ~DDII TO PO,
I POINT TO MM' S JlEG S. VF: ~JlF.A,
STACK).
,SIIVE All,
,SAVE R!IUI~I"G REGS,

,,.p,,14

,SAVE MODULE snCK POT NTER,
,PESTOPe: MONITOR STACK.
rCLEAIl PSW ON STACK
,StT UP IlI!:TUJlN PC
,CL!AR PSW AND. CO'lTINUP:

~1q~

DEC/XII SHOJ:1T MONITOR
QUO
21-APJ:1-n 12i42
DXQAB'" .PI t

/!IlCYl1 27(1006)

22-APR-77

12.53

PAGE 37
SEQ 0191

,TYPQ4. F10UTINE. LOADS MSGD. INFORMATION I'ITO TYP£Q

1039

10411
1041
t042
104]
1044
1045
1046

1041
1048

1049
1050
t051

00!i1 02
(105106
005112
005114
005120
005124
005130
005U4
005t40

005142
005146

004737
013'700
010046
004737
016046
004737
016046

004737
005726
Ot 3706
OOOH'

005350
001122

TYPQ4 •• JSR
MOV
/!1O V

005350
000060
005350
000056
005350

JSF!

1064
1065
1061>
1067
!06Q
1069
1070
107 t
1072
1073

MOV

JSR

pnpsp
!o10V
BFI

001136

OAEfl
DECIXII SHClPT MONITOR
OXCA8M.1'1 t
21 -AI'P-77 i,,42
1052
1053
1054
1055
10'56
10'57
10'59
1059
106O
1061
1062
106]

toIOV
JSFI

PC,LOTYPQ
MOOAOFl,pO
RO,-eSP)
PC,tDTYPO
UAS(RO) ,-CSP)
PC,LDTYPQ
ASBCRO),-(SP)
PC:.LDTYPQ

MACYI1 27Cl006)

SPSAV,R6
EXIT2,

22-APR-77

12153

,QUP.UE PC+2 or CALL
f LOAD MODULE lODFlE!!! 'IN RO
fAND SAVE IN QUEUE
,QUE:UE: DATA ERROR COUNT
,QUtUE SIZE or TRANSP'E:R
,RE:MOVE PS P'MM STACK
,GET MONITOR STACt( POTNTn

,EXIT

PAGE 38
SEC 11192

,TYPQl. "'OlJTIN'E QUEllF.S INP'OR"'IUION 11'0'" DEFlFlX CAtLS
005150
0110;' 52
01')'5156
00'5162
00'5\64
005170
OO~ 174
005200
005202
00'5206
0115212
005;21<&
1'10'5216
00'5220
00'5224
01')'5226
00'5230
00'1234

005240
005244

011646
00473'
013700
1110046
004737
017616
004737
005726
062700
012701
000401
005010
0\4046
004737
01')5]01
1')01172
1')13700
0101',60
01 3706
000137

00'53'50
(1)1122
005350
oooono
on5350
01')0062
1'10000'5

(\05350

001122
000046
001 i 3"
005066

TYPQ3 •• MOV
JSFI
"10V
MOV
J5R
lADV
J5f1
POPSP
ADD
MOV
SfI

(Sp) ,-(SP,
PC,LDTYPO
MOOADR,RO
RO,-(SP)
PC,LDTYPO
IH!P), CSP)
PC. LDTYPQ

IGET ADDRESS OF' INF'OPMATICIN

,CLEAR DATA (EXCEPT LAST)
,GET DlTA
,QUF:UE DATA

eLA

(RO)

MOV
J8P
DFC
!I'll!:
//,OV

-C PO), -( SPl
PI', LDTYPQ
PI

li,OV
JMP

,QUEUe: v IRTtfAL AD!:'R!"S! OF CHECKDATA CUI"

• AWAS+2, flO
'5, FIt
2$

,5 I

Mev

,QUEUE pC+2 OF' CALL
: I,OAD MODULl=: ADDRESl'I IN flO
,ANI) SAVE IN !:lUEU!';

18
~ODADFI, flO
R6,SVFl6CRO)
5PSH,R6
EXIT2.

QUD DEC IX 11 IHO~T MONITOR
OXQUM.Ptt
21-1PR-" 12.42
10'74
10'75
1076
1077

1078
1079
1080
1011
1082

Ion

1094
1085
1086
1087

1088
1089
1090

1091

\096

22-APR-77

12.53

PAGE 39
SEQ 0193

,TYP02. ROUTINE SEIIVICES EUtOR, DATA ERIIOR, AND
0052!!0
0052!!2
on!!256

005260
005264
005270
00!!274
005276
005300
0()5302

005]04
005]10
onS112
005314
On5J16
005320

011646
004737
010046
017600
062700
012746
012046
000402
011046
o{l!!020
004737
005316
001372
00!!726
012600
000137

005350

000002
000050
000005

005350

005030

OlEO DEC/XU SIIOpT MONITOR
DXO.814.Pll
2!-.PR-77 12.42
1092
1093
1094
1095

"'"CY1! 2'7(1006)

tH)!!]24

00!!130
no'5]12

no4137
00!!726
000137

005350
nO!!032

TYP02. i MOV
JSlI
MOV
MOV
TYPOX,
ADD
MOV
MOV
I'll
MOV
ui
Ct.R
JIll
2$1
DEC
aNE
pOPSP
MOV
JMP

"'.lCYU 27(1006)

TYPO. •

(SP) ,-esp)
PC, LDTYPQ
RO,-CIP)
'2(IIP),RO
_CIIRA,RO
-S,-CSP)
(1I0)+,-(sP)
2.
(1I0),-(SP)
(FlO)+
PC,t.DTYPO
(SP)

JSR
POPSP

(SP)+,1I0
EXIT.

PC, LIlTy?Q

nut.

CAt.U.

,SAVE PC+2 0 .. cr.t,t, AGAI"l.
,QUEUE UP PC+2 0" CALL.
,SAVE RO.
,GET MOOllr,E AODR.

22-.PII-77· 12.53

Jill'

EII~N

,IIESTOR!!; PO.

PACE 40

qUI>. DEC/XU SHORT MONITOII
tiXQASM.Pl1
21-APII-77 12i42

MACYll 27(1006)

1101

005136
005342
005U4

004737
005726
(100137

tloe

1109
I I 10

1111
111'2

Itl3
1114
1115
1116

1111
1118
1\19
1120
tt21

PAGE 41
SEQ 0195

nO'5]'5n
(1)5352
00'5)56
n(5)60
0(5)64
(1)'5)66
nn5)H
005]76
005404
n05410
005414
005416
00'5424
(\(\'5426
00'5414
01)'5442
nO'5446
00'5454
01)'5456

005046
012746
000002
1(\'5737
001414
023737
001010
012737
11)4406
t 04406
O(\OClOO
023727
001003
012737
016677
105'31
062737
012616
000207

TYPot. i JSII
POPSP
JMP

005350
005066

QA~D
D1I.:C IX 11 SHC'lIlT MONITOIl
OJrQA[I"'.Pll
21·~PP-'17 12i4'2

1102
t 1 0]
tl04
1105
1106
1107

12153

,TTPQ1. 1I0UTINE. SEll VICES MSG CALL.

1097
1098

1099
111'10

22-APII-77

"'ACYl1 27 C1 0(6)

PC, LOTYPQ

,QUEUE UP CALL.

EXIT2.

22-1\1'11-77

12153

PAGE 42

5;;"

(05)60
001007
0011 00

1\01102

017116
014157
014620

0"1100

001100

017')72

017116
000002
001007
000002

001100

173436

oottOO

IROUTINE TO LnAD TYPE QUElT!:. ENTERED VIA JSP PC.
-(SI')
LOTYPQI CLI'!
,CLEAR PSw ON STACl<
~ov
I3S,-(SP)
I SETUP RETURN PC
1'ITl
,CLgAIl PS'I AND COllfTTSUE
TYPQUE
TST8
,REQUEST COUNT 01
lSI
SEQ
1$
1811 IF' YES.
C,,"P
TyoQl, TYPQ2
:NO. TYPQI UO TYPQ2 S1\~E?
8llE
,ail IF' "'0'1'.
is
'1C'V
• TYl?EQ. TYPQ I
! II£SET THP: TYPE QUE!.!E
~sG$, QDVPfL
,YES. QUEUE ono. CRASH SYSTE~
I!SGe, HLT
t 'HALT'
HALT
TYPQ1, 'TYI'LlM
,liP-ACHED ~IGH LtfolIT?
UI
8N!
2$
,aR .1P' ~OT.
MOV
nYPEQ, TYPQl
,~F.SF.:T TYPQ1.
MDV
2(SP).fiITYPQI
,STORE ARGUI'E"'T I N QUEUe:
25 I
INCe
TYPQUE
,UPDATE REQUEST COU"TS.
AnD
'2,TY\>Ql
,UP!)A'1'E TYPQ1.
Mrv
(SI'H'(SP)
:
RTS
PC
:EXIT.

C"'''

~ 1 Q6

OUO DIC/XU 11f0"T MONITOlII
21·l,[II-.,., 12.42
DXOUM.'ll
1122
1123
1124
1125
1126
112'7
t128
1129
1130
lUI
1132

lln

1134
1135
tU6

U3'7
lUI

1139
1140

1141
1142
1143
1144
1 U5
1146
114'7

1148
1149
1150
1151
1152
U5l
1154
1155
1156
1157
1158
1159
1160
1161

1176
11'77
1178

1179
1180
1181
1192

1184
ue5
1186
118'7

1188
1119
1190
U91
1192

1193
1194
1195
1196

tl97
Uti

11n
1200
1201

005460
005466

112'766
000402

1'7'77'7'7

0054'70

005066

000002

00000)

LDBRIt. i MOVa
BR

121'7

'ACE U

'-hleSP)

,ROUTltlE TO LOAD

cute CALL.
2CSP)

CLR

,INDICATE BREAK. CALL

LDIOQ

QUE.i

,INDICATE QUE CALL.

,LOIOQ 1I0UTINE. MUST NOT DROP BlLOW LEnL OF INTEIIRUPTING DEVICE.
0054'74
005500
005504
005506
005510
005516
005522
005524
OOSSU
OO!U4
OO!SSU
0051546
0055!S2
00!lS!l4
005562
005564
01155'2
00SS'76
00!l602
005610
005612
005614
005616
005622
005630
005632
005634
005640
005642

012'746
012146
000002
000403
112'766
101J'737
001414
023'73'7
001010
012'73'7
104406
104406
000000
023'727
00100)
012'73'7
0126'7'7
10un
06273'7
005716
001003
005726
000131
12662'
001003
005726
000137
005726
000002

LDIOQ.

000340
005506

000001
001006

000002

0010'4

0010'76

016606
01415'7
014620

0010'74

0010'14

01'7U6

016606
1 '732'6
001006
000002

0010'74

005066
000001

PIRQ.,

ui
2"

0010'74

1171'7'7

005032

111

41,

MOV
MOV
RTI
BR

"RTY7, - CSP'
'U,-CIIP)

,PUT NEW PSW ON STACIC
,SETUP RETURN PC
ILOlO NEW PSW AIID CONrINUE

.+10
H,2CS,)
IOQUE
,REQUEST COUNT 01
TST!!
BEQ
,IIR IF ns.
11
CMP
IOQ1,I002
,1001 AND IOQ2 SAME?
BNE
,BR If' NOT.
it
,",OV
1100,1001
,RESET 1001
,QUE OrLO. CRAIIH SYSUM
,",SG',OOVRP'L
, 'lflI,T'
IIsce,HLT
HALT
CMP
'REACHED HIGM LIMIT?
tOOl/ nOOLI'"
BNE
,BR U' MOT.
U
MOV
uno, 1001
I RESET tOOl.
140V
,STORE PC+2 01" PENDI~C CALL.
CSP", III 0 ell
IOQUE
INC!!
,UPDA TE REQUEST COUIITS.
.2,IOQl
ADD
,UPDATE IOQ1.
(Sp)
TST
,OUE CALL?
B~E
:NO- BRANCH
3S
(SP)+
TST
,YES, POP STACK
JMP
,EXIT
EXIT2.
CMPB
,BREAK CALL?
1(SI»"-l
BNE
,NC. SPIP.IICM
U
(SPl+
TST
,YES~ POP !lUCK
JMP
EXITI.
(SP)+
,PIAQ- EXIT VIA PTY
TST
PTI

Move

'1ACYll 27C 1006)

22-APR-77

12153

PAGE 44
SEQ "IllS

,ICEYBOAP"

INT~RPUPT

SEIIVICE

00!l1i44
005650
005654
005660
005664
0056611
00'5670

0050'7'7
0\7146
042116
122716
001524
tlI}5126
1100004

173276
1732'74
000200
1100003
005676

000000

ICBSPVCt CLP
IITItS
MOV
IIITK8,-CSP)
120/), CSP)
IlIC
CMP!
n,(sP'
SEQ
CTPLCA
POPSP
PIRQt. u.o

005676
005704
005706
005712
005'716
005772
005724
005'730
005732
005736
005740
OO!'44
0057411
(l05?52
005754
005760
0(15762
005766
0057'70
005774
006000
006004
006010
006014
006022
006026
006030

023727
OOUll
01'7'746
042716
12162'7
001443
121627
001460
121627
001462
121627
001457
121627
103425
121627
103405
121627
101011
162716
111617
00523'7
11253'7
104406
0527"
000137
005726
1'1007'71

001t1l6

016346

ttt

:CLUR INTERRUPT ENlF!LE.
,GET CHAR.
:PE"OVE EXTRA BtTS.
I IS IT CTPL C?
,8P IP' YES.
I REMOVE CMII R F'ROM STACK.
,Q OEVICE SERVICE.

,KEYBOARD SEPVICF..

1732]6
000200
1)00171
000040
000015
000012
(1000110
000141
IIOOt72
000040
173016
0010]6
001240
001240
000100
001702

2 ••

lI'
173124

4Ii
10.i

C"1P
1I:8PTR, IKBUF+ItBUF'L ,BUFFER EXCEEDEn?
BEQ
:9R IF' ns.
12.
(IITKB,-(SP)
MOV
,GET CHAR.
1200, (SP)
etC
,CLEAR. PAPITY BIT.
(8P),I177
CMP!
,RU80U11
BEQ
:8R IF' YES.
'5'
(SP),140
CMPS
,SPACE? (IG'IORE LUl'ING OriES) •
BEQ
,eR tp' YES.
liS
(SP),115
CMP8
,CP? (TIME 'f0 QIIIT?).
8EQ
,8R IF YES.
9S
(SP),tt2
CMPB
,LP'? eTREAT LIKE CR).
BI!:Q
,8R IF YES.
9$
(SP),160
CMPB
,CMAR LESS THAN 60?
81.0
,BR IF' YES. IGNORE IT.
lOS
CMPB
(5P)"\41
,CIiIlP LESS THAN LOWER CASE A?
flLO
,BP IP' YES.
2.
CMPB
,CHAR HIGHEP THAN LOifER CASE Z?
(SP)"172
BKI
IBR IP' YES.
10.
SUB
140,UP)
,LOWEll CASE CHAP. MAKE IT UPPER CAS!!:.
(SP), (IIK8PTR
MOVB
,STOPE CHAR.
K8PTR
,UPDATE BUFFER POINTER.
INC
(SP)+,TTYBYT
MOVB
,CHAR TO ECHO BUFFER.
MSG., TTYBYT
,ECHO THE CHARACTER.
UE,nKS
,REENABLE KYBO INTERRUPTS.
BIS
QUETST
JMP
POPSP
BP

,SERVICE DELETE/RUBOUT CODE.
006032
006040
!l06042
006046
006052
006054
006056
006062
006070

02273'7
001405
oon37
11'7716
000754
005726
104406
012137
000'1!l1

Q06072
0061 00

022737
001741

016106

0010lS

5e,

001036
172764

Ut
014155
016306

0010lS

71.

015306

001036

tKBUF, !CBPrR
CMP
BEQ
1St
DEC
KBPTR
NOV8
1I11:8PTR, (SP)
]I
BR
POPSP
MSC.,ACPLF
.KBUF, KBPTR
NOV
BR

12tl

1214
1215
1216

12153

SEQ 0197

1202
120]
1204
1205
1206
1207
1201
1209
12tO
1211
1212

22-l'II-.,.,

, ROUTINE TO LOlD BRElIC. CALL

QUO DEC/Xl1 SHOIIT MONITOR
DXQABM.Pl1
21-IIPR-71 12i42
1162
1163
1164
U65
1166
1167
1168
1169
1110
1171
1172
1173
1114
11'75

MlCnt 27(1006'

,SUFFER EMPTY?
,8R IF YES.
,POINT TO PREVlt'JUS CHAR.
,GET PREVIOUS CHAR.
,GO ECHO n.
,OUTPUT CRLF'.
,RESET ICBUF POINTER.

,SERVICE SPACE.
CMP

UC!lUF,KBPTP
]I

,LEADING SPACE?
,BR IF YES (lGNOIIE IT) •

cue

DECIle,1 SMOPT MONnop

DXQUM,Pt1

IUB

MACYU 2'7(1001)

neAPP."

uln

PAGE 4S
SEQ 01~9

21-.,P." 12142
BP

006102

000734

00st04
006110
Q06116
0(16122

1t2677
012737
10H06
In4401

1'2'26
016306
014155
001230

006110
on6114

104406
000752

014416

,STOPE tT.

I . III

,SERVIC! CR AND lIr.

1220

1221
1222
1223
1224

1225

9U
001036
01)0000

Mova

(SP)+,(II(BPTR
NOV
'!(9UF,KBPTP
"ISG.,ACRt.r
QUE •• DECODE. 0

:STOPE CHAR.
,POINT TO START or K9ur,
,OUTPUT cPl.r
, QUE TO SEPVICE COMMAnD.

1226

1227
1229
1229

tHO

,SERVIC! K9UF' OvtRFt.OIl,

QlEO DF:C/Xtl s~nRT MON lTOR
OXQA!!M.Pl ,
21-APR-71 12142
1231
1'12
1233
1234
1235
1236
1231
1218

1239
1240
1241
1242
1243
t?·'
!?41S
1246
1247
1249
1249
1250

12'\1
1252
1253

! 21,

MlCY! 1 2'IC 1 n06)

MaG., KBono
BR
7S

22-lPR-77

, TYPE KBur ono,

12153

PAGE 46

S!O 0200
,SERVICE r:TIIL C. ENOS Run MODE ALSO.
,DIIOPS TO SANKS (I AND 1 BEFOPE RETUPNI'iG (IF' I<T11 IN USE)
,STACK POINTER SHOULD BE SETUP AHEAD OF' CAt.L 1'0 CTRLX TO PRl:SI!:RVE
,NEEDE" INP'OP,",ATION PPINI TO REMAPPJNr. TO O. OR CAUSP: RE"'APPING TO
,CUPRENT JREA AFTl:R

006116
nn6 t 42
n06146
0061 IS2
006156
o o !I, 1 ~2
006164

~~"'''o

0127 n6
004137
(105031
004737
1('15737

nr)t nn?
01)0137
t!'l"~3"

00~200

, 0'5 '731
1 ('11)41 t

OQ!I,202
00621 I)
006214
(ln62:HI
n06224

('I!'i2777
104406
I n4406
00473'7
000137

t'loftlH

CTRr,CAI !>I 0 V
CTIILCSr J~R
CLR
JSR
TST8
l!NE
J'IP

016546
006230
0('11224
(114(160
00125'
007374
not?!!?
11(11261)

n00100
014t36
014125
(11(1214
012722

1ST

<,{.RA

TIITB
P."I

t 72736

UPBOT, SP
PC,CTRt.X
OP'F'STO
PC, '!VCOO£
P1100£
11
CO"1C03
!"'OO£'
CHN
CTRLCO

BIS
tt£,nKS
14SGS,SUMAP'I
"SGI,C'"
\lSP
PC,DIRA
CHNOUT
CTPLCO, J"'P
2$.

,REINtTIALIZE STACK POI1'ITl:R
,Ct.EAR QUEUES, TYP£ ·C
,GET PROGRAM BACK TO ~ANK 0
, IN RUN MODE?
,BII 11" YES,
;BACK TO KY~O POUTINE.
:~~F.R IIU~ ~~. r~orclTOP

I PI CHAIN MODlI'?
;M Ir YES. 8YPlSS SUMIIURY AND RETUR"! TO
:CI!AIN "ONiTOR
: REP-liABLE KEYBOARD tNTERRUPTS
f TYPE RUN ENO SUMMARY TITLE,
:CARRIAGE RETURN
,TYPt RUN SU","ARY,
:F-XIT, OR RETURN TO KYBD PTN,

QAtD DEC IXU SHO~T MONtTO~
DXQABII,Ptt
21-APII-7'7 12i42
012746

000340

012'746

006242

000002
n12737

000144

1254
12'55
1256
125'7
1258
1259

006230
(106234
006240
006242

1260

006254

1261

006256
006264
006270
n06274
006276
006300

105737
001003
(11273'7
004737
005337
0013'73
011604
000005

006)02

010416

(06)04
006310
006312
006316
006]20
nof' 324

on4737
On5046

012272

012746

006320

1262
1263
1264
1265
1266
1267
1268
1269
1270

12'71
1272
1273
1274
127S

0062S0

006332
006]]6

000010
012272
001374

12114

001]74

411

0(11374

181

lSi

000002

1052]7
013737
104406
000207

001013
001266
014153

22-APR-'7'7

12iS3

PAGE 4"1
nQ 0201

cnLXI

00t25'7

QA!D
OE~ IX, t 8110~T Io\Ij"lITOP
OXQABM,Pl1
21-APR-77 12,47
1276
1277
1278
1279
1290
!2111
1282
1283

MACVll 2'7C I 001)

SS i

001264

M~CYI\

27ClOO6)

MOV
MOV
RTI
MOV

IPRTY7,-CSP)
U',-CIIP)
UOO"CSTART

,SETUP ~EW PSW tlN
,PUT ~E1'URN PC ON
,LOAO NEW P5W AIIO
,Ct.EAR QUEUES AIID

TSTB
BilE
MOY

R!oIODE

' I f NOT IN IIMOD!'.:, SHOIITP.:N WAIT

11
'10,CBTART

JS~

PC,Ct.~QUS

DEt'
8NE
MOV
RESET
MOV
JIR

CSTAn

CL~

-C5P)

,Ct.EAR QUEUES,
,IlONE!
,BR IF NOT,
I SAVE III'':TURN PC

(SP),II4
114,(SP)
PC,CLRQUI

MOV
'51.-(8P)
IITt
tNCR
BRAl<E
!oIOV
~OTNU"" 'ROTCNT
MSGS,CTRLC
'RTS
PC

22-APII-77

12,53

00'5726
1112S46
00140]
0047 37
n0077 )
000205

TYP!tJ,

TY'PF,II
0063S6

18'

TST
MOV
eEQ
JSR
B'R
RTS

(51'''
C~)+,·CSPl

18
PC, TYPE
TYPE\
R!Ii

,flESTO~E RETURN PC IN CURRENT BANK
,CLEAR QUEUES IN BANK 0
,RETYPE NEW PI~ ON STACK
,PUT fI[TURN PC ON STACK
,LOAD IIEW psw A"ID CONTINUE
,SET BfI'KE TO PREYE~T BACKGROUND "'OOULE
,RElET THE 'ROTATIO~ COUNTER
,OUTPUT ·C

,!XIT,

PAGE 48

,SUBROUTINE TO TYPE' MULTtPLE
,VALUE or R5 tS I/OT SAVr.O,
006]40
1106342
1106]44
006]46
006352
006)54

STlCIC
STACK
CONTIIIUE
DII;t.H TOO,

IIScn STRINGS, ~nTE' TH~r THE p~EVlnus
I ~EIo\OVE OLD PO; P'RCH.' STACK
I GET AS~II u~npO:IS,
IBR Ir n TERIIINATn'R.
;TYPE IT,
IGET MORE,
IIIETUIIN,

nlli'" I.IE!IlG START

Cm;D DEC/Xll SHORT MONITOR
DXaABM.P11
2t-ApR-77 12142

MACYll 2'7(1006)

12;53

PAGE 49
SEQ 0203

U8!5
!2!H5
t 29'7
1298
1299
1290
1291
1292
1293
1294
129S
1296
1297
1298
1299

22-ApR-77

,TYPE SUBROUTINE.
,TY~I:~

l~Ca

~'!'!lt)lt;

,NOTE THAT IF' IIMODE IS SET BUT MODULES AREN'T YET BEING STARTED, BRAKE
,MUST BE SET TO PREVENT STARTNG MODULES WHILE TYPING
006356
006 ]64
006]70
006]14
006400
006404
006406
1106410
006412
006414

OU137

006426
001106
001104
001124
001126

001410

012777

000100

172530

012637
01263'7
010137
012701
010221
010321
010421

TYPE;

010'521

.,OV

• 'l'TSRVi, '1"l'YLNJi:

M('IV
MOV
MOV
MOV
MOV
M('IV
MOV
M('IV
MOV

CSP)+,TYPRET
CSP)+,TypADR

I'H ,TYt>Rl

,SAVE RETURN ADDRESS
:SAVE "'!:SSAGE ADOPESS
,SAVE P!GISTtPS 1-5

nYPR2,Rt
R2'(R1)+
113,(R1)+
R4'(1I1) +
IIs,eRt)+
HOO,InpS

: SET IE

1300
13111

1302
1301
1304
13('15

!l06
13117

uoa

1309
1310
1311
131'2
1313
1314
1315

\316
13t7
1]19

1319
1320
1321
ll~n

1323
1324
1325
1326
1327
1328
1329
1330
Ill1
Ill2
tH3
1334
1315
1316
1337

1338
1339

tHo

0(16422
1106426
006432
01'16434
006436
(106442
006444
1106446
n06450
006452
006456
006462

onol37

001702

117746
001015
005726
1'112701
11121112
tH2!(\]
1112104
0121115
01)701
(105077
000177

172452

006466
0116474
006500
006502
00(1;'506
006514
006'16

1162737
122716
0010]7
112716
(112737
000431
i 12746

13411
1349
1150
1351
13"12
1353
,3'5,4
11'55
1356
1357
1358

0(16522
006HO
006'532
0065411
006542
006546
1l06'552
OMi560
0116'562
(06561)
006570
1106576
11066(11)
1106604
006612

012717
110(')423
113737
(101002
105237
113746
012717
00040'
105317
001167
()'~737

1100711
012677

I'll '2737
1I0ot ]"/

"loll'

Move
8NE
TST

Mav

00112';

!olOV
1oI0V
1010 V

Mnv
MOV

001124
172471)
172420
ooonOI
000045

CLII
I1MP
001104

TypEB,

Al'1O
CMpB

00001'
M6516

,RESTORE RS'c;rSTERS

!-s

ell
itt

MOVS

112,-(81';

22-ApR-77

12153

,CLEAR IE

,IS IT U
,NO- BRANCH
,OUTPUT CII,
,OUTPUT LF,

PAGE SO
SEQ 0204

(1t)6532

001410

001254

001020

001020
001255
(l1l6562

CRt )+,R4
CRI,+,R5
TypRl,"1
ilTpS
nypRET

MOVII
YOV

"ACYl1 27(1006)

,GET CH~II.
,8R IF' NOT TERMINATOR,

(R1 H,Q3

TYPEe,

['10141 ~

o(l(ji'H 2

OUETST
nypAOR,-(Sp)
TypE8
(SP)+
nypR2,II1
(111 H,1I2

'1, TYpADIl
HS,CSP)
TYPEL
.15, (SP)
"8,TTYLNlC
TypEL

PNE

QAtO DECIXII SHOpT MONITOII
DXQABM. Pl1
21-ApII-77 12142
1341
1342
1343
1344
1345
1346
1347

TTSRVI i

I'OV
28 I

ell
Move

SliE
INCB
001410

IIOln20

TYPEEI
TYPED,
lSI

006426

01\1410

172350
010non
(10171)2

n01110

TypEL:

t.lOVP.

MOV
8R
DEce

t2$,TTYLNK
TYPEL
FIt.CNT,FILCTR
TYPEE
FILCTR
P'TLLER, - esP)
Os,TTYLNJ(
TYPEL
FILeTIl

811O[

TYpEE

M/.JV
liP

ilTTS~Vl,TTYLNJ(

HOV
HOV
JHP

TTSIIVl
(SPH,fII'I'PfI
11 ('100('1, TYPCTP
QIJETST

,GET nLL COUNT.
,SII H' NOT O.
,OOPS, MA!<E IT A I.
,OUTPUT FILLER,
,DECREMENT FILL C(lUNTER,
,811 IF NOT O.

aHon

QAED DEC/Xll
MONITO"
21-lPII • .,., 12i42
DXQAlM.Pll

MACYlt 2'7 C1006)

un
1363
1364

1365
1366
136'1

1368
1369
13"0
13'11
13"2

13'14
U.,5

13'16
13'7'1

13".
13'79
1380
1381

1383
1384

U86

un
1388
1389
1390

1391

1392

1393
1394

1396

U9'1
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
t410

14\1
1412
1413

1414

006616
006624
006626

112.,37
000402
105U"

lUO

14]1

1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442

006632
(066)6
006642
006646

0050n
0050n
00"]'1
0\6604
01041"
162"3'1
012401
012403
010361
062"01
012621
012621
012621

006652
Q06656
006664
006666
0066"0
0066'14
006701)
006'102
006704
006'106
006110
006'112
006114
006'116
006;22
006724
('106'126
006130
006'134
Q06'136
006'142
006'144
006746
006750
006152
006754
n06756
006;60
Q06762
006.,64
006'166
006;72
0067"2
006'1'14
non'16
007002
007010
007012
007020
007022
00"026
00"032
00"036
00"042
007044
00"050

1'777,.,

001142
001114
012244
000012

001400
000002

012621
010511
022626
01640t
012300
005"21
012305
016102
001J003
0057 3'1
001413
012603
005201
006303
060300
10]003
060302
10300]
006203
160305
(11263"
(121012
ootn.,
00523"
OU"27
003404
032.,.,7
001415
011061
011261
Ot036t
013746
010346
013'146
000U7

0052n]
005720
005722
00531)5
001342
005737
001003
012437
000423
0115261

00't06
00"110
007114
00"122
007126
007130
007134
007136
007140
007144

001002
00!5161
013'161
010361
010446
010661
104422
012604
013'01

~0"150

001400

000052
000032

012621

007054
00"056
00"(')60
(10"062
007064
007066
00"0.,2
00"0'14
00'1l0(l
00"t02

007154
0071!!6
00"162
0071 70
0071"2
00., 1 '16

001315

1.".,.,4

000074
001142

001114

001114
001114

000003

002000

172135

000060
000056
00(1)54
onUt4
no 14011
001376

01243"
10!!7]"
100002
n13734

DUCK.i MOIlB
BR
CDATA.t eLRB

'-1,DlTrLG
CKCON!
DUrLc

eKeONTi CLR
eLR
JSII
MOV
CDATAl i IiIOV
SUB
MOV
IiIOV
MOV
ADD
MOV
MOV
MOV
MOV
MOV
MOY
CMP
MOV
MOY
TST
MOV
MOV
CLR
TST
BEQ
MOV
INC
ASL
ADD
BCC
ADD
BCC
A5R
SUB
MOV
3n ••
CMP
ui
BEQ
INC
CMP
SLE
BIT
REQ
MOV
2"
MOV
MOV
MOV
MOV
MOV
JMP

CDrLG
DERlleT
U,SAV04
12(SP),R4
R4,CDEIIII1
'2,CDEIIR1
(R4)+,1\1
(R4)+,R3
Rl, SBADR (R l)
tSVRO,R1
(SP)+, CRt)+
CSP)+, CRl)+
(SP)+, CR1)+
(SP)+, (Rt)+
(S,)+, (R1)+
R5, CRl)
(21,)+, CSP)+
-4(U),Rl
0)+,110
0)+
(])+,R5
IIBUrPA (RU, R2
R]
CDrLG
]0,
(SP)+,n
R]
R]
IIl,RO
.+10
113,P2
.+10
113
113,R5
(Sp)+,DERRCT

MACY11 27(1006)

51 t
001114
001054

61;

000030

000060

000046
001122
001054
OOtH!!

11613'1

001114
000020

010100
062700
000137

000046
002570

1444
1446
144'1
1448
1449

00"202
007204
00"210
00"214
007220
007224

005746
004U7
016604
062.,04
005237
000137

012244
000014
000002
001142
006652

taRO, ~R2

U
ARQ,AWlSCRl)
8R2,ASB(RI)
P3,wASADRCPl)
D!PRCT,-(SP)
113, -( SP)
CDERRt,-(!P)
CDEFIR

12,53

I INITIALIZE DATA ERROR COUNT
,TEMPORAIIILY SAV! R~GS
,GET PC+2 OP' CUI.
I SETU' ,C or CALL
I GET BEGIN ADDRESS or MODULE
I GET TA8LE ADDRESS or IIeurPA rROM MODULE
,SAVE IT
lSAVE MODUI.E'S REGISTERS

I RESTORE MODULE ADDR
,GET READ flurrER 'A
,SKIP EA RITS
,BurrER WORD COUN'!'
,GET "'UTE BurrP:R P~
,CLEAR OUT REG. ]
,ENTERED FROM DATA ~RIIOR RETURN?
,NO- BRANCH
IYES- GET COUNT
,CREATE orr SET
,GET ADDRESS or CURPENT REAO BurrER WORD
,GET ADDRESS OF CURPFt.lT WRITE BurrER wORD
,RESTORE COUNT
,CALCULATE WORDS [,ErT
,RESTORE OATA ERIIOR COUNT
JDATA on
,YES, BflANCH
,NO, COUNT DATA ERROR
I MOflE THAN 3 ERRORS?
,'10- REPORT EIIROR
I YE'S- REPORT ALL?
,'10- SIIANCH
,SlYE ACTUAL DATA
,SAVE EXPF.CTED DUI
,S.WE COUNT
,SAVE DATA ERI\OP COUNT
,SAVE WORD COUNT oro; STACK
,SAVE VA or CKDITA CALL
,GO TO ERROP CALL

PAG!: 52
SEQ

31.

00003(1
001114
000056

,SET rt.AG rOil DAnCIl' CALL
,CONTINUE
rSET rI.AG rOil CKDATA CALL

DERPCT
DERRCT,U
21
.aUI0,taSR

22-APR-17

.,..
001066

91.

INC
TST
TST
DtC
eNE
TST
8N!
MOV
SR
INC

CDRETt

P3
(Rn)+
(112)+
R!!

,COUNT WORDS CHECICEIl

u
OERPCT
61
(R4)+,DSTA[l1l

[RCNTeR1 )

8NE
COM
Mev
MOV
MOV
HOV
MSGDS
MOV
MOV
MOV
TSTS
BPI,
MOV
MOVS
MOV
ADD
JM,

DF.RPCT.iI(R4,+
STAT(P1),RSTAT
Rl,pO
.SVR6,RIl
IOQSVD

TST
JSP
MOV
ADD
INC
JMP

-(SP)
R4,SAV04
14(SP) ,R4
'2, R4
COrLG
CDATAt

1443
1445

PlGE 51
SEQ 02n5

OoUt5

QAED DtC Ill: 11 SHORT MON trOll
2t -APR-,., 12 •• 2
DXQAB" .Pt 1
1415
1416
14t'1
1418
1419
1420
1421
1422
1423
1424
1425
1426
142"
1428
1429

12t53

,ROUTINE TO SERVICE CKDAU CALL (CDATlI)

1359
1360

1361

22-APII-.,.,

.+6
ERCNT(P1)
[lERPCT, ANASCRI)
R],ASB(Pl)
R4.-(SP)
SP,SVR6CRO
(S,,+,R4
MonADR,P1
(R4)+,DSTADR
DATrLG

,ANY DAU ERPORS?
:YES. BIIANCIl
,GET THE RETUIIN AnD!!E!S
,GO TO COM/oIOI/ RETURN r.ODE
,DATA ERRORS nCCURR5'D- UP toIeDUL! ERPOR
ICOUNT BY 1

rsn TO -I Ir 0
,STORE INI"ORMATJON IN MODULE
,STORE SIZE 1'1 ASB
,SAYE POlt.lTf:R Tn !IIROR pETURN ADDRESS
,SAVE SUCK POINTP:P
,RtPORT TOTALS, HALT MODULE IP' NEEDED
,GET EPPOR RETUPtl POIlITrR
IGET MODULF STA~T ADDPESS
I GET THfo: RETURN ADDpESS
I IS T'lIS A DUACK C.ALL '1
,NO, CO'lTl"'Ue:
,YES, LOAD T'II'; NU'ISI';R or or. TA EPRORS
,SET UP rOil IoIOOULe: II[TUIIN

,PUSH STACK
,Gn VA 01" Cl<D1;TA CALL

02~6

alEO DI!:C IX 11 SHOIIT MONITOR
21-APII-77 12i42
DXQUM.Pt 1

1*51

1465
1466
1467
14611

1469
1470

00'7230
007234
(072)6
007242
007246
007252
007254
007260
007262
007266
007272
007276
no7]OO
007]02
007]04
007]06
007]10
OO'llU

105737
001404
005037
000177
105137
001403
104406
000441
004437
011700
012101
010046

007314

C602n!

on'll16
007320
noH22
007]24
007]26
007'U0
(107]]2
007]14
007]4n
n07]44
001]50
007354

I)IUOO
(1)076'7
105711
001365
122126
111102
060201
014137
o(51)]7
010037
004737
000137

1471
1478
1479

1480

1491
Uti 2
HAl

QAEO DEC/Xl1
DXQ.A8!o!,PII
1494
1485
2496
1497

1489
1499
2490
1491

1492
t 493

001010

DECOOEI TSTe
B!Q

ootOtO

C1.II

171610
001257

1$1

014304
012244
001036
015232

122021

1472
24H
14'15
1476

12153

P_G! 53
SEQ 0207

21 i
GTOKj
GTOKX,
GTOlC11

001401
1(15721
001]76
111102
not422

1471

!4H

22-APII-77

,COMMAND O!COOEII. CHECKS SYNTAX AGAINST COMt.lANO TABU:.
! ~LL COIiIM~ND$ ~RI!: (,HECK!!:D AGlINST THE QUOTES, NO ABBREVIATIONS ALLOwED

1450
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464

MACY1! 27(006)

MOPEI

GTOK21

0013'72
001174
001036
012256
001362

SRORT "'ONITOII
2t-ApQ-77 12142

"'ACYU 27(11)06)

SPCFLG

SPCFLG
.SPtTIIN
J"'P
liMO oI!:
TSTS
BEQ
2.
,",SC.,INveOI
COMCON
BII
JSII
R4,SAV04
MOV
J(BPTFl,IIO
I'OV
.COMTAB,IH
!'ov
IIO,-(SP)
(110)+, (;:11)+
CMPR
GTO!(2
~EQ
(~l )+
TST8
8NE
.-2
Move
(lit> ,1'12
BEQ
COIllCOl
P2,fll
"00
MOV
(SP) ,PO
GTOKt
811
(lit)
TSTB
SNE
GTOKI
(Rt H, (51')+
C~PB
Move
(Rt) ,112
ADD
1'12,111
HOV
-CIIU,CADOR
CLII
CSTAIIT
1II0V
1\0, KBpTII
JSII
pC,IIST04
COlolQUE
J"'p

22-APII-77

12153

,S .. ECUL FL"G SET?
,BII Ir NOT,
,YES, CLEAII IT,
,GO VIA SIIETIIN.
,IN IIUN "'OOE?

,NO, CONTINUE
,'INVALID CND, ONLY CNTL C IS OK'
,CONTINU!
,SAY! II!GS 0-4.
:POINTEII TO PO.
,D!VIC! D!COOtNG CO"lElI M!RE
,SAVE STUNG POINTEII
,IoIA'I'CH THI': CHAlIlCTE;:I?
,YEP, SEE IF TM!!: IIEST MATCH
,NO, GO CHECK AGAINST NI':XT
I SUT FIND YiNEPE NUT ENTRY IS
I DISPLACEMENT TO NEXT ENTPY
,NO SUCH THING.
! POINT TO NEXT ENTRY
,POINT TO SI':GIN'IING or INPUT
sKEEl' LOOKING
,LAST CHR IN EI'I'l'Ri'1

sNO,CHECK THE
,RESET SP AND
IGET DISPATCH
,I'll POINTS TO

OTHER CHII"S
R1
ADDIIESS
NEXT E'ITIIY

I SET MODULE AODP IN C5TAIIT TO O.
I SAVE CUIIP!NT BUFrER POINTEII.
I PESTOP .. ~EGS 0-4.
: GO TO COMMON QUE CALL.

PAGE 54

,COlol"Ol' PETUPN !'"POM COMMM'D EXECUTIr:lN !lNO IIUN lI'1UTI"'E ClNCLUDING
,III!:LOCA'l'!ON !lNO INTEIINAL PESTART)
0(17)61)
1'01]64
007]64

104406

014212

005011

001010

COMC01l '4SGS,INVC\10
COMCON.
COMC02. CLII
SPCf'LG

007]70
0(')7114
on7400

1051131
104406
nOOl37

0(11272
014122
0(')\ (,50

FILl.IO
CLP8
COMC031 MSGS, DOT
COMC041 JMP
IllpUT

,TYPE INVALID

COM"A~O,

,CLEAR SPECIAL P'LAG AND
,OIR COMMAND INOICATOR.
,CLEAII F'ILL COMMAND INDICATOR.
,TYPE DOT.
,GO GET MOR!,: INPUT.

QUD DtC iX\t SIIORT MON ITO II
DXQUM.P1t
21-APR-" 12142

MAC'll1 27C 1006)

1494
iU5
1496

149'1

1498
1499

Qno

nOl056
001010

SINPUTI

Dr-CIXII SHORT NONITIJR
21-APR-" 12142

MACY1! 27(1006)

DD74D4
007410
1)07414

012637
105237

22-APR-"

"'nv
INCB
BR

000771

12153

PACt 55

(SP)+, SRE:TRN
SPCrLC
C0'4C04

22·~PR-77

12153

,SAVE RETURN ~DDR.
,SET SPEC tAL POLA G.

PAGF. 56

OXQ~llfol.Pt 1

~F.?

,RUN ROUTT"'''. STARTS EXFRCISER EXECU'l'TO".
,NOTE THAT "PU"'" IS ENTERf:D ONLY P'Rn", BANI( 0, P'!T
,THE' PROGRAIo! IS NOT IN BANI( O.

1500
1501
1502
150J
007416
007420
007424
1)07430
007434
007440
00'7446
007454
007460
007464
007412
007476
n07502
007510

1'100402
11)5037
005037
005037
005037
012737
012737
10lj037
105031
012137
004737
004737
112737
012702

1553

0075 \ 4
0075115
007520
007524
007526
007532
007534
007540
007544
007552
007560
0075152
007570
007572
007'576
Q07600
007606
007610
007616
007620
00'762'6
007630
007634
007640
001642
0071546
0071S!l4
0071556
007662
007664
007670
007672
007676
007700

012201
001462
105737
001012
105737
11)0407
005061
0050151
0427151
032761
001755
032761
0"1351
005737
001414
032761
001342
012737
001404
032761
001332
105237
005761
100402
105237
032761
001402
105237
000714
105737
001005
005737
001501
000137

ISS4
1555

007704

113737

1504
1505

1506
1507
1508
1509
1510
1!51l
1512
1St]
t!l14
1515
t516
1517
1519
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530

1531
1532
1533
1534
1535
1536
1537
Ul8
1539
1540
1541
1542

1544
U45
1546
1547
1548
U49
1550
15!1
1552

001275
on1224
n01244
001246
0427151
0427151
0('\1274
001257
016234
0\ 2354
012272
177771
016236

8R
CLREI
CLR
CLR
CI,R
"'OV
2'1
MOV
CLRB
CLRR
MOV
JSR
RUNRgSI JSR
MOVR
11S I
"'OV
RUN,

010470
010512
0t)125n

0011)23

1$1

001257
001260
000026
000030
020000
040000

000020
000020

020000

000020

2si

001222
004000

000020

001777

001222

002000

000020
]Ii

001015
000020
001025
010000

000020

0010215
IIUIfCI

001015
001222
004604
001015

0010115

5.i

MOV
BEQ
T5TS
Bioi!
TST8
BMI
CLR
CLR
RIC
lilT
B!Q
BIT
BNE
TST
BEQ
BIT
8NE
BIT
BEQ
8n
BNE
INCB
TST
BMI
INCB
BIT
BEQ
INCB
BR
TSTB
8NE
TST
BEQ
JMP

Move

.+6
LOCK
orFSTO
SYSCNT
PWRCNT
142761,SLOSR
14,761,SLClS!
PUNPFL
R"'onE
• ~onQ-", BKPTR
PC,CLRVEC
PC,CLRQUS
'-1, WllJ1"LG
• "'OOQ, R2

,CLElI"! LOCK Tn

N~UNPES"

~LI,O":

IS USE!) WHEll

CODE RELOCATION

,ZFRO SYST!!" EPROR rOUNTER
: ZERO p r lloll';R f" ~ It, COl''''TER
I RESTOR," THr::SIf INSTRUC'TIO'!S
:FOII A C''''ECK 5U'I "O"UT.,g

,PHTIALIZF TRAPOTCHEP I" VECTOR AREA
:I!'lCLllOES Ci,ElI.RING RPU(F.,MODCNT,IOPKTI)
: INITIALIZe: BUFFER \IOU TIC'" FLAG
,SETUP TO COU"1T SF.:L'C'TEO MODULES, A1'10
I IF NOT SYSEPR OR POWER FAIL REsnRT
,CLEAR "OOULES' PASCNT AND ERPCHT.
,NODULE ~ODP TO R1 •
(2l+,Rt
RUNC
I RR IF NO 1'0111':.
PMODE
,INTERN ilL RFSTAIIT"
,BR IF YES.
2.
CHN
,IN CHAIN MOOE:?
2$
,BR IF' YES.
PSCNTeR! )
:CL!AR MO"'5 PASCI'lT.
EPCNT(RI )
,CLEAR MOO'S F.PROR COUNT.
'B!T13,STAT(RI ) :CLEAR StOPPED SIr.
,IIITt4,STAT(RI ) ,MODULE SFLECTED?
,BR IF NOT.
18
.BU13,STAT(RI ) ,NODULE STOPPED?
1$
,BR IF YES.
,IF OFFSET 0, IGNClPF PITS 10+ 11
OFrSET

31
'SITll,STAT(R1) ,NOT 0- IP' RIT1t

rs SF-T, DON'T COUNT IT

11
,'777,OFFSET

J32K BOUNDARY?
,YES- IGNORE SIT , 0
3$
'BIT10,STIITOH) ,NO- BIT to SET?
,YES- ~ON'T flU., THIS MODULE
IS
MODCNT
,NO. UP COUNT OF RUNABL! MODULES.
STAT(R1)
,RKMOD?
,NO- BRANCH
.+15
BKCNT
,YES- UP COUtOT
tBITI2,STAT(RI ) ,EX'l'ENDtD MODULE?
,NO- BRANCH
.+15
,YES- COUNT IT
XCNT
,CiO CHEel( NEXT "'ODULE.
11
MOOCNT
,ANY RUNABLE MODULES?
,YES, BRANCH
5'
OFFSET
,NO, OFFSET 01
IHINO
,YES- COMMAND INVALTD
,NO- THE ONLY MOOS RUNNA8LE I4UST BE THOSE
!NOSV8
,IIITH BITS 10 OR 11 SET- RELOCATE
MODCNT, MODCTR
,LOAD COUNT OF RUNNABLE !!ODULES

1')21(1

q~t:Q
DtC/XU SHORT IIIONI'l'Oll
DXQABM.Pll
21-APR-77 12iu

1556
1551
1558

1559
1560

1561
1!562

007712
007720
007126
007732
007736
001740

MACYl1 2'7(1006)

012131

016234

001040

040000
001320
001261

0"1060

001026

001031

11'5737
001447
113737

12153

PAGt 51
SEQ 0211

!H27J7

105237

22-APII-77

MOV
MOV
INC8
TSTS
SEQ
Mova

• MOOQ-2, foJOOPTII
HOOOO,10£\K10
NSTOP
ROTI

2$
XCNT,ROTCT

I SETUP ROTATION TIMEOUT COUNTER- 16 TIMES NUMBER
,OF EXTENDEO MODULES

1563
1564
1565
1566
1567

tS68
1569
15'10
1511
1572
1513
15'74

lS1:1
1576

U'77
1578
1579

;;;0
1581
1582
1583
1584
1585
1586
1581

1588
t589

007746
007152
007756
007762
007766
00'17'14
007776
OUlO04
010012
010020
010024
Oi 00)0
010034
010042
010044
0100'52
O:OO!;G
010062
(H0064
010070
010076
010102
011>1 06
01 Ot 12
1)10116
010122

106337
106337
11)6337

t 06337
t 23727
103403
112737
11373'7
1\3737
106337
, 06337
106337
123727
103403
112737
(l04717
"O~'7:;7

001005
104406
lU737
000137
005037
004737
1 ~5037
104406
onOl37

001031
001031
001031
001031
001026

000020

000377
001031
0"iOi5

001031
001302
001033

OOHI]]
00103]
001015
000377
010126
OO:::~ 7
014122
000001
001650
001224

1607
1601!
1609

000040
001033

381
~~

001257

481
RUND.I

014060
001251
014346
007364

QAEO OFC/XII S"'OqT "'O'"Ifnp
DXQUI4.Pl1
2t-~PR-"" 12;42
1590
1591
1592
1593
1594
t595
1596
1597
1598
1599
1600
1601
1602
160]
1604
161l!!
1606

111

Mi':!J3

M~CYll

27(1006)

ASLB
ASLB
ABLB
ABLB
CMPS
SLO

FlOTCT
FlOTCT
ROTCT
ROTCT
XCN'T,.20

"love

'377,ROTCT
ROTCr, .C;WBP'C
MOOCNT, PASIIEt.
paS!IIEL
PASPEL
PASPEL
MOnCNT,HO

Move
NOVB
ASLP
ASLB
ASLB
CIIPB
BLO
MOVB
JSR
'!"~t~

,INTO STARTUP COUNTER
I MOOUL! TABLE ADOII TO IoIOOP'1'II •
ISTART WITH SPECIAL BACKGROUNO MODULES.
,SET TH! NON-STOP nAG

: PREVENT LOSS 0,. COUNT TF OVERFLOW

is
,INITIALIZE WRITE l\UP'FEFI !IIOTATION COUNTER
I SET ALTERNIITE RELOCATION COUNT TO 8
, TIMES MOOCIiT

31
1377, PASREL
PC. SETWPP'
~~O=~

BNE
4S
MSGS, DO'!'
,",ova
11,l'!MOOF.
JMP INPUT
CLR
OFFSTO
PC, a.jVCOOE
JSR
CLRS
RMOOE
MSGS,INVC04
CO!olCON
JMP

22-APR-77

12153

I SET RMODE IN CURRE"T BANK

,'NO MODULES SELECTF.O·

PAGF. 58
SEQ ()2t2

,SETlIP Io:RTTF. flUFF'ER INFOPMATION
1)10126
010132
010140
010146
010154
010,62
010164

005037
013737
013737
1)63737
1123737
001001
000207

1)10166
OIOt74
010200
I)t0202
0102U1
01"216
010222
010226
0111232
010236

013737
lo5B7
tOOl103
062737

1631)1
006331
006331
0\)6337
006337
0~6H7

1e~("I

O~ "'242

~ (']t'''''3

1611
1612

011)244
010252

1112737
000207

(1)0t)'76
01)1200
001204
001222
001216

nn1206

001212
001216
!'rl1216
01)1206

no 12 3 6

001260
000041)
001216
001236
001236
001236
001236
001236

001236

177117

0r)1236

001236

SETWBFt CLR
MOV
folOV
Ar:>D
CIoIP
8NE
PTS
SETlIRl; MOV
TST8
BPL
ADD
1 $1
SLTB
ASL
ASL
ASL
ASL
ASL

sec

MOV
RTS

WBUF'EA
LOCORE, WBUF
LCORI2,wBUP't2
O'FSET, waurt 2
WFlUF12,HCOPI2
SETwBl

PC'
HCOPI2."1XWl\P"

ell"
1$

UO,MXWl'1F

"'!'t,;f'12, "IX_8,
MXWBF
fIIXWS,.
"XwBF
"XwRF
MXWBF

• 4=1 0
U77177,MXIolBP'
PC

:ZFRO n BITS
,LOAD STARTING ltOR OF WRITE BUP'FI'.:\:I

tIS WRITE RUFFER AT THE TOP
:NO, n's orr, CONTI'JUE
rRf:TURli
,CIILCULATF: "AX SIZE: OF WRITE SUP'F!!:P
I IN CHAIN ~'ODE ?
:NO, DO~" T ADD A1~Y 'ORr. "'lUTE SUFP"ER
,YES, ADO lK TO MAX. WRITE 8UFFER SIZE

OlEO DEC/Xli IIHOItT MONITnll
21-.,1t-,., 12142
DIGA'M.'11
1613
1614
1615

1616
1617

lUI
1619
1620

1621
1622

U2l
1624
1625
1626
1627
1628
1629
1630
1631
1632
1631
1634
1635
1636
1637
1638

1639
1640

1641
1642
1643
1644
1645
1646

1671
1672

22-APII-''7

12'53

PAGE 59
Sl!:Q

0:11'

,MAP ItOU'l'INE. TYP!II R!SIDENT MODULICS AND THEIR ~'1'ART ADDRESS.
(110254
010260
010264
0102'70

105237
105037
00473'7
00013'

001011
015450
010214
007364

MAPi

INC8
CLRB
.JSR
.JMP

o I 0~'74
(110300
(110302
010304
010312
010314
010320
010322
010326
010110
010]32
010]]6
010340
010144
010350
010152
010356
010362
010364
010370
010]74
010376
010402
010404
010412
010416
010420

012702
012201
001446
032761
001003
105737
001767
004537
015415
010146
004537
015426
016146
004537
015442
016146
004537
015461
016146
on4537
015500
105737
oot 003
112717
104406
000730
000207

016236

DIRAI

MOV
,MOOO,R2
MOV
(2)+,RI.
BEQ
5t
BIT
.8ITI4,STAT(lIt'
8NE
2.
'1'ST8
DIRINO
BEO
11
P5,rILI,NM
.JSR
AMOONN+!
Rl,-(SP)
MOV
R5,OACNV
.JSR
APC
Mnv
STAT(Rl) ,-(SP)
R5,OACNV
.JSA
AMDSTA
PSCNT(R!),-(SP)
II!OV
R5,BDCNV
.JSR
APSCNT
ERCNT(II1),-(SP)
MOV
RS,BDCNV
.JSII
AEIIRS
TSTB
OIIIIND
8NE
18
Mova
'40,MOIRE
MSG$,AMOONM
8R
1$
RTS
PC

040000

tli

000020

001011
011206

011512
000020
011512
000026
011 '744
000010
011744
001011
000040
015414

015450

3'1
5.i

OAtD DEC/XI t SHOIlT MONITOP
21-.PII-,., 12;42
DXOARM.Pt 1
'64'
164B
1649
1650
1651
1652
165]
1654
1655
1656
1657
165B
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
U69
1670

MACYU 2'7C 1006)

MACYU 27(1006)

OlUND
MOIRE
PC,DlltA
COMCON

?'2-IlPII-'7

12153

,SET DIR INDICATOR,
,TERMINATE Ascn STRING !AIILY,
,TYPE MAP.
,GET MODULE TlBLE ADOR.
,GET MODULE AOD.R.
,8R If' O. ALL DONE.
,MOOUM: SELECTED?
,BR If' YES.
,TYPItfG DIRECTORY?
,8R If' MOT. DONT TYPE UlfSELECTEO "'ODS.
,FILL MOD !UME IN ASCII ~TRIHG •
,AllOR TO STUF' ",jlIo1E Itf.
,·'40DULE lOOP TO S'J'ACIC.
,CONVERT '400 ADOR TO .scn •
,CONVERT "ODULE STATUS.
:MOD'S PASS COUNT TO SUCK.
,CONVERT IT TO DECI"AL ASCII •
:MOO'S EPROIl COU"IT TO STACK.
,CONVERT IT TO OECI"'AL .SCII.
, TYPING DIRECTORy?
:BR I ' YES.
: NO. ALLOW TYPII'IG F'ULL STRING.
:TYPE ASCII LINE.
'DO IT ~GAIN.
,EXIT.

PAl'll' 60
SE(, (1214

,SELECT MODULEeS) 1I0UTINE.
010422
010430
010436

nun,
012717
000406

052761
052'761

010470
010512

sELl

MOV
,,"OV
BR

.52'61, SLOS~
'52761,SLOS£
SLOS

, MODIFY CO""O" TO snECT "'OOULE(S).
,GO TO CO~"O".

, DESELECT MODULE (5) ROUTl"£.
010440
010446

012737
012737

n42761
n42761

010470
010512

OESt

MOV
MOV

,4?761,SLOSB
142'61, SLOSE

:"OOIf'Y

CO~"OtJ

TO DI"SP.:J.ECT MODULE(s).

,SELECT /DESELECT C(lMMON.
Ot 0454
010454
0104150
010462
011)464
010470
010476
010502
OtO!!06
010\HO
010!!12
010520

on4717
000410
000405
013701
042761
00(1)7
012702
012201
001772
042?61
000772

SLDSi
sLDSA,

011234
001040
040000
0(17164
016216
04(1000

000020

: CHECK NAME. GET !40l)ULE ADDII.
PC,GETNAM
Sf,DSC
:NO NAME. SELI!:CTlDESEL£CT ALL.
:TNVALID 1111 fII£X rUME.
SLPSL
",n"PTII,1I1
:"OOULE A['IOP TO Rl.
"OV
SLOSS I
BIC
'RIT14,STAT(Rt) I SELECT IDESELECT 1010('lULE.
JMP
COMCO!;
,00fllE.
SLDSL!
sLDSC,
r MoDULE TABlJE AllnR TO Fl2.
""oOQ,1I2
"oV
MOV
(2)+,Rl
SLDSD,
,GET MOOUlJF AODA.
8p':Q
,SR IF I).END Of' TABU:. DOlliE.
SLOSL
8IC
'IHT14,STAT(RI) ,SELECT IDF.SELECT ~O[lULE.
sLDSE.
lIR
S'LDlID
:"0 IT II.GAIII.
,LOCATIONS SLOSB AND SLDSE II.RE PURE WIIILE I~ FlU'! "(11'£.
JSR
8R
SR

OAED DEeixil S!ofOIlT MONITOFI
2t-APR-77 12i~2
DXQUN.PIt

un
U74
1675

1676
1677
U78
1679
1680
Uli
161)
1684
1685
!686
1687
1688
tU9
1690

0111542
010550
010556
(H0562

112737
013737
104406
0(01)7

0003'77
001266
014700
007374

1717
1718
1719
1720
1721
1722

,IGNORE TIfE

C014C03

COM'olA~D

FlOTONt

CLRS
JSFI
JI4P

ICLEAR ROTATIOII LOCK FLAG
,GO DO "ENABLED" MESSAGE
,CONTINUE

ROTL
PC,1I0TCIIK
COMCO)

,THIS ROUTInE DISABLES WFlITE BUFFER ROTATIOII

O"ED or;C/XI t SHORT ,",ONITOII
llXQ,lB M.P1 \
21-APR-77 12142

1744
1705
1706
1707
1709
t709
1710
1711
170'
1713
t7t 4
t715
1716

JMP

,THIS ROUTINE ENABLES IiRITE BUFFER 1I0TA'I'ION
001262
013262
001174

17"]

KTQNi
!(TO .... ,

0073'74

1050)7
004137
ollot17

1702

PAGE 61

~np'p'!

ono137

Ot0526
0105]2
010'516

17(11

12.53

SEO 021!l

iii0522

0\ 0522

22-APFI-77

PON.

010522
01 Ol;~~

1691
1692
!f93
1694
1695
1696
1697
1698
1699
1700

toIleyt! 27(1006)

001262
1101264

FlOTOFF; HOVB
077,ROTL
MCIV
1I0TNUId, FlOTCN'!'
"'SCOt, ROTDIS
COMCO)
JMP

"'ACYll 27(1006)

22-APR-77

121S)

ISET THE POTATION LOCK .. LAG
,Ln10 TIoIE ROTUION COUI/TER
,·WBU .. POTATION DISIIBLED"
,CONTINUE

PAGE 62
SF.Q 0216

,MODIn ROtlTINE.
,GETS AODPESS AND PRINTS AOOR CONTENTS.
,USEFI ClN INPlIT N"W NU"'BER OR CR.
,CR "'EAIlS HF JUST WANTS TO EXA"'IIlE.
(110566

010574
(110'174
(11 n600
0\ 0602
010604
01lH;10
01 (1612

010616
0111622
1110624
(1111630
01061'2
010636
010642
010646
1)1(1650
010654
(It 06'16
010660
011')664
010666
1)10670
0,1)672
010676
010702
010704

112737

177777

n(l4737
0004n 1
nOO440

011234

001272

FILL,

MOVA

.-I,FILLID

: SET P'TLL INDICATOR.

JSR
8R
BR
,'SR
BR
"'OV
ADO
MOV
J511
MOV
JSR
J5R
JSFI

PC,GETNAM
U

:GET NA"'E UO MODULe; ADDR.
INO NAfIIE.
,INVALID OFI NEX NA"'IC.
I GP;T ADDRESS.
:IIfVlI.LTl"I AOOl! OR </0 ADOR.
,~OVE AODR TO R4.

101001

On.,n

0004]0
013704
063704
(1111446
111)4737
(111446
0047 37
0('14737
0.O~7 37
(l'10416
005737
001401
nl0114
"2702
(101007
1105724
1')00754
(1\ 2"104
105737

ot 1 022

5S,

001042
001040
011000

If'
7$,

011000
007404
011070

811

Ml062
0(01)12

001254

2$:

6S I

MOV

T5TB
8NE
JIIP

0(11272

001152
01')0137

ooH64

TST
BEQ
MOV
CMP8
BNETST
l\P

38
PC,GETADR
6.
AOORLO,R4
MOnPTR.liI.
R4,-(SP)
PC,ITO_
(",),-(SP)
PC,ITOA
PC,SINPUT
PC,GETNUM
3S
YES
21
RI, (R4)
t12,R2

3C
(R4)+
U
'FILCNT,R4
FILLID
78
COIICO""

T ~O!l M(lmttJl!,' _ODIt TO 111'11)1' •

,TYPE AOOR,
I

,GET CO»TEIlTS or ~DDFI.
I PRINT IT OUT.
I GET IIEw CO'lTENTS.
,CONVERT I,.PUT TO BIWAFIY.
,INVALI" nATA P'OT A NUMBER).
,NUf!!BER?
,BP IF NOT.
,STOllE "e;iI' VALUe:.
,LINE FEE!)?
,NO. DOr.oE.
,POINt TO NUT LOCA'!'ION,
,REPEAT FOR NEXT LOC.
,GET nLCNT ADDR.
f IN FILL MODE?
,SR IF YE:S.

,00'1[.

QUO DECillll 51{0llT "!OIiJTOII
DXQUM.Pl t
2t-APII-n 12142
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735

U-APII-.,.,

12153

PAGE 6]
SEt'J 0217

IBINAn TO ASCII TYPE ROUTINE. TYPES
010710
010714
ot0722
1)10730
011)734
010736
OtO'742

016646
016666
0115666
00453'7
015515
104406
000425

010744
010750
010756

016646
0115666
016666

000002
000002
000006
011524

010764
Otfl771l
011:'772
1)10776

On453'7
015526
1 n4406
00040'7

011000
011004
011010
011012
011016
1')11020

1116646
01'14517
01551 !l
104406
012616
000207

ITOUr
000004
000002

1)155l!5
000002
000002
000006

QU:D DEC IXI 1 SHOPT MONITOR
DXQUM.PI \
21-APII-'7 12142

1736
1737
1738
1739
1740
1741
1 '742
1743
!'744
1745
1746
1747

MlCYl1 27(1006)

000004
000002

MOV
MOV
MOV

"lCYU 27Cl006)

22-APII-,7

ITOABI

2(SP)'-(SP)
2(SP)'4(SP)
6(SP),2(SP)

12153

'ON STACK.

,LOAD !:A BITS

,AND PUT IT HERE
,TYPE OUT THE VALUE
,LOAD UPPEII BITS
J AND LOoiER BITS
,ANO ADJUST THE STIICK

PAGE 64
~,,',

ot 1532

115,OlCNV8
JSR
HOLDe
MSCt, !fOLD!!
BII
ITOllT

0\ 5'526

000002
011512

MOV
2(SP)'-(Sf)
MOV
2(SP),4(SP)
MOV
6(1SP),2(SP)
JSR
R5,OACNVX
HOL.06
MSG"HOLD6
811
abUT

~UMBEII(S)

tTOAi

01551'5
ITOI.!Tr

~OV
2CSP),-CSP)
115,OACNV
JSIl
HOLD6
MSGS,HOLD6
MOV
(SP)., esP)
RTS
PC

,CO'lVEIIT ~ OCTAL, '4UI>'8EIII; TO
,lNll PUT THf:M H!'"P,"
,TYPE OUT THE OCTU, HL"E
I GO TYI'F. IT OUT

,CO'4VEPT

~tlMPC;P

:TYPE nCTAT.

,EXJT.

TO ASClT •

V~L1JE.

~SClI

1)218

Qap;o ~EC IX t1 SHORT MONITOP
6XQABM.PU
21-APII-" 12142

l'i~o

DliolZ

004137

1'751
1'7'52
1753
1754
17'5'5
1756
1757
1'7'58
1759

011026
01 t03!)

000414
0057]7

1760

1763

2Hl006)

~2-lPP-77

12i53

PAGE 6!S
SEQ 0219

I THIS ROUTINE GETS THE AOOPF-SS ASSOCIATED WITH THE 1400 COMMAND

1748
1749

1761
1762

M~Crll

Oii010

GETAU;;i

001062

(110)4

oOHU

011036
011040
ott042
011044
il110S0
(It 1054
011060

006201
103410
06010'
010tl7
010]37

001042
0111044

062716

OOOllO2

Ott062
011066

104406
000207

1$1

01)1'207

014364

QAEO OEC/Xtt SHOR'\' MONITOR
DXOlRM.PI1
'21-APR-?? 12142

,", ..

811
TST
BEQ
ASII
BCS
ADO
MOV
MOV
ADO
IITS

........
"' ...,., ..
r,,-,uc..,"'UI'"1
11
YES

18
III
AOREPR
111. Rl
RI,AOOIILO
IIl.AOOIlHI
'2. (SP)
PC

ADIIERRi MSGS, INVADII
RTS
PC

MACYI1 27(1006)

22-APII-"

GET ~:U~StR

, INVALlO DATA RETURII.
,NUMBEII?
,BII IF' 'lOT.
,GOOD AOOIIESS?
IIIOGOOO. IT'S 000
,RESTORI'.: THE foOR
f STOllE AT AOORLO
llND lNY HIGH ORDER BITS III AODIIHI
,SET UP GOOD EXIT.
:OOIlE
: TYPE I'IVtlLIO
,EXIT.

12153

~DDII

011 DATA.

PlGE 66
SEQ 0220

,GET NUI4BEII FIIOM KEYBOAIID BtIF!"EII, ANn IIETUR'" TH" LO>; OIlDEII InTS
,IN III AIID THE HIGH OROEP SITS tN 113.
,1I0UTtNE ADDS 2 TO THE IIETURN PC IF SUCCESSFUL.

1764
1765
171;6

1767
1768
1769
1'770
1'7'71

1"/79
1790
1791
17A2
1'793

0110711
('11074
011076
0111 no
01 t 104
011106
0111 t 2
01\114
n I' t 20
ott 12'2
0111'215
!'II \130
1111134
011 t 36
011142
1111 \44

!7!4

01' 146

1795
1796
1787
1799
17911
1790
1'191
1792
1793
1794
1795

01115(1
0111 5 2
011154
o t 1156
011160
(11116'2
nll166
011 172

1772

1773
1774
1775
1776
1177

t1'1g

Ollt'"
011200
01 1204

013700
oolioot
005003
005037
t 12002
120227
0')1'7'70
122'02
0",425
12022'7

(101')1'40

GETlIUMj MOV
3$1
CLR
C{,II
CT.,II
MOVB
iSl
CMP8
BF:Q

0!'lOOt5

CMPA

H'.'I,1I2
2$
112, .12
'2$
R2,' '0
ADRERR
R2, #'7
ADIIEIIR

0111036

001062

SEQ

000012

CMPB

(lOCCtiO

C'A!'8

~~t42'2

120227
1)(127'52
120227
003]47
006101
(lM!O!
01'16301
006103
0116301
01)6103
060201
162701
(lnSH7
000744
nloo37
062716
0110207

t'lt:O

BLT
C~P!I

00006'

Bt;T
ASL

000060

01'10"2
001 (1)6
000002

2$1

K~PTR, 110
PI
R3
YES
(Ro)+,R2
1i2, Uo

PnT,

II~

ASL
1I0L
UL
POL
ADD
SUB

T'IC

111
113
Rl
R3
112, Rl
• '0, Rl
Y1!:!'i

BR
MOV
AOD
IITS

RO,KBPTR
'2, (SP)
PC

, GET 8lJI"F'EP POI"ITER.
,DATA
rFLAG
,GET. eYTE
, SPACE?
:YES, tGNORF, IT
:CR?
:Y!'':S,RETlJl''''
,LF?
~"o,,!:

!LOW LT~T'!'
iTOO LOW, REPOP'1' THI': FPI:lOII
rHIGH LIMIT
,TOO HIGH, REPORT THE ERIIOR
ISHI!"T nLn STUFF
,3 TIMES LF,P"T
,I.E. I4ULT. BY OCTAL 10
I "DO NEW TO OLD
,BUT GET 1110 OF ASCII STUF'r
,!In naG
,MOPE, ~ORE
,SAVE CURRENT Bur POINTER.
r SET UP OK EXIT.
,EXIT.

QUD DEC/Xt t IHORT MOltl'OA
DXQUM.Pll
21-APR-'77 12142

MACY11 21(1006)

1'799
liDO
1101
1102
1103
1804
tl05
1106

~t! 206

~11210

011212
iH1U6
!llU20
011222
011224
011230
011232

010346
0121503
012'704
112123
005304
0013'75
162'701
012603
00020!!

1811
11112
1813

1814
1815

U16
tl1'7
1118
tU9

1820
1121
1822

1823
1824
1825
1826
182'7
1128
1829
1130
tl31

11132
1833
1114
1835
tU6
1III '7
1838
1839
1840
1141
1842
1843
1844
1845
t846
184'7
1148
1849

1850

1152

i853
U54

U55
U56

011234
(111240
01 t 244
011250
011254
011260
011264
;)11266
011270
011274
1276
OU302

011304
011310
Ot1312
011316
011320
ot 1324

011326
01U32

011334
011340
011342
0'1346

011350
011354
Ql11S6

011 ]64

olnu
011370

01U74
011]76
011400

OOOOO!!

121!!3

,SAVE FIl.
,STORE "DDR '1'0 U.
,WILL DO 5 TI"'ES.
,MOVE C)fAR.
,DONE?
,SR IF NOT.
,RESTORE Rl.
,RESTORr. R3.
,EXIT.

P~GP; 68

I'E'1 0222

013700
1'105037
005037

012702
012701
112721
005302
001374
012701
t 11002
122702
001442
122702
00tU7
122702
001430
120227
002403
120227
003411
120227
002427
120227
003024
00573'7
001426
02]'727
00201!!
110221
0052J7
005200
000'736
005'737

001036
001062
t'lt'1040
0000015
01541!!
1)00040

CET" .. "', MOV
CLP
CLR
HOV
MOV
11,
MOVS
DEC
8NE
MOV

015415

0001)15
000012
000040

/'laVA
CMPB
SEQ
CMP!!
BEQ
CMf'''

SEQ

000101
000U2

311

000060
000071
001062
001062

000005

001062
4U,
001062

5'1

CMPS
8LT
CMPB
SLE
CMPS
8LT
CMpe
BGT
TST

911436
011442

00503'7
010037
000207
012'702
012203
001'712'
012'701

014403
000002

.,.i

001062
0010U

016236
OU4n

.. i

ttt

lOli

.,.
.,.

112,.'9

BGE

7S
R2,(R1)+

MOVS
INC
INC
BII
TIT

005'73'7
OOlOU
000405
104406
062716
00020'7

011430

,SJ! If YES.
rL"? TPEAT AS CR.
,FIR IF YES.

112,112
6.
Uo,R2
58
R2,.'A
38
R2,' 'z
U
Fl2, "0

Y!S
IS

011410

YES, '5

SR
001062

,GET p.urrER POINTER.
,CLEAP SUCCESS I1f!')ICATOP.
rIP' 0, ASS ADnR.
,WILL DO !5 1I"'ES.
,"'ILL STORE J(YRD '1A,"1': I~ T"'''NAt.!.
I AUT CLF.:AR IT TO 5P~Cl':S FIRST.

BEQ

SEQ

91!U4
011416
911420
011424

KBPTR,RO
YP:S
"'ODPTII
'5,R2
II AMODN"'+ 1 , Rt
UO,cRl)+
R2
It
_A",ODRMU,Rt
(FlO),R2
115,R2

CMP

000416

011444
011450
911452
0\14154

1161

FI3,-(8P)
(R5 H,U
'5,U
(R1H,tR3)+
R4
11
.5,Rl
(SP)+,R3
R!!

n-APR-n

001 '7'73

,8U
1862

'UCY11 2'1(1006'

911404
011406

911432

1110

rILLNMt 140V
MOV
MOV
MOV8
tit
DEC
8NE
SUB
MOV
RTS

,THIS POUTUE Gns THE MODULE NAME ASSOCIATED WITH THE MOD ftNO SEL/D!:!

tlS8

PAGE n

SEQ 0221

0000015

QUO DEC/XU SHORT "OlllTOR
DXQASH.PH
21-APFI-77 12,42
180'7
1809
1809
1810

12i53

,THU ROUTINE PUTS THE MODULE NAM! INTO AN ASCII. STruNG rOR OUTPUT

t796

17n
1798

n-APR-'7'

YES'
FlO

YES

411
9t

TST
YEs
BNE
91
BII
U
MSCt,INVNAM
ADD
U,(SP)
IITS
PC
CLR
MOV
FITS
MOV
MOV

YEI

110, ICBPTP
PC
'MODO,R2
(R2)+,U

BEO

.,.

MOV

UMODWIIl+l , III

CO"o;~Nl')S.

'DO~E?

,8R IF NOT.
,IIELOAD TEfI'P "'DDR.
,CtT CHAR FPO~ KBUF AREA.
,CR?

,SPACE? DISIIEGARD LF.AOIIIG ONES.
rSP IF YES.
r A OR HIGH!P.?
,ep IP' LESS. (COULD BE II NUMBEP).
,Z 011 L!:SS?
,BR IF Z OR LESS.
rO OR HIGlftR?
, BR IF LESS. YOU LOCSE I
,9 OR LESS?
rSR IF GREATEP. YOU LOOSEI.
,ANY PREVIOUS CHAPS?
rap IF >.101. NO'!' LE"OING NUMERICS ALl.OIriEDI.
CHARACTEP?
,IF YES, BRANCH
,STOPE CHAR.

,n!!

,POII1T TO NEXT CHAR.
,DO IT AGUNI
,AllY CH"~S?

,BR IF NOT.
,ANY CHARS7
rSR IP' Y!S.
,NO WAME.
,TYPE INVALID OR NEX (NON-EXISTENT) MESSAGE,
,SET UP INVALID NAME EXIT.

,EXIT.

,
,SAVE CURPENT BUF POINTEII.

,EXIT.
,MODULE TABLE ADDR'TO R2.
,GET 140DULE ADDR.
,INVALID NAME. NO MODULEII

QUO OtCiXl1 S'1ORT MONITOR
21-11.1'1"-17 12 i 42
DXQABM,Pl1

1863
J iiii4
1865
1966

t967
1868
1869
11170
1971

1'111460
oj i4li4
0\1466
011470
ii, 1472
011474
11115 0 0
011504
011510

(112704
l i i i 2:;
001370
005304
00\)74
014237
010037
o627U
000207

MACYll 27Cl006)

iUI

, A86
!Be7
! 8A8
1889
lA90
t119t
I AII2
, 991
1894
1895
1896
1997
1998
1899
1900
190t
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927

PAGE 69

eioipB

001040
001036
000004

"'_CV11 2700(6)

.5,114
(t<lH,,(li+

orc

10,
R4

SNE
MOV
MOV
ADO
RTS

-(R2),/lfOOPTR
FlO,t<BPTR
14, (SP'
PC

S~!E

118

22-APII.'77

12153

:\tiILL IIHCH 5 ('liARS,
:CHAl't MATCH?
,SR IF NOT,
,DONE?
,BR !P' NOT.
,MODULE AOOFl TO 1ol0DPTFI,
,SAVE CURRENT SU, POll/TEfl,
! SET Up SUCCESS !XI'!'.
:!:XIT.

PAGE 7!'
SEC 0224

IOCTAL TO ASCII CONVERT ROUTINE.
,CONV!FlTS APGUMENT ON STACK TO ASC It, S1"FlES STIII"'G STAIITI"IG AT ADDRESS
,GIVEN "OLLO"'!N!; THe: CALL
,EXTENOEO ENTIlY REQUIRl!:S ADDITIONAL
AFlGU"'ENT ON SnCK- AFTER
,PUSHING LOWER 16 IlITS ONTO STACK, PUSH E' BITS CSHIP'T£O TO POS 4,5)

1872
1873
1974

11t~

12i53

SEQ 0223
MOV

000005

QlEO DEC/Xll SrlOlIT MO"ITOII
DXQABM,Pl I
21-.&PIl-77 12142

1875
U76
t877
1878
1979
'880
19A 1
1892
1883
1884

22-APR-77

OACNVI

OASCEl
ATE

CO'iV~T

fCO~TH"'E

ATE
HOP

,CLEAFl 9 CHARIICTFR P'LAG
: COr·!TINUE

'!I;1"'7, ~~~

:SET

I SA VE FlEGS 0-4.
,C:ET OCTAL VALUE.

005037
t05037
(100412

001112
001310

011 ~24
0111j30

1 ()503?
!'!'O403

001310

"1·~~1

!!'Z.,:t.,

OO"21l!'!

'l(l! ~1"

(lAC1f,,!!: "[!'tV"

011 '540
011546
Oil '550
o t11j"i4
011'560
11110;62
n11566
011570
011574
011576
011602
O! li'i04
011610
011614
nt 1616
011622
011624
011626
011630
1)11632
011634
011640
0' 1642
011646
011650
011652
ot 1654
011656
011660

(116637
012616
004437
1'16600
n'~"IO'
012702
060201
105737
100002
062701
010003
042703
0102703
1111141
042700
006000
006000
006000
005 ]02
01)1363
105737
100410
OU'702
006202
006202
006202
060203
110311
000425

000002

001112

HOP,

COI/VIlT,

J5~

011662
011670
011672
0116 7 6
011700
Olt 704
011706
01171 ('I
011714
011716
011720

132737
001021
01 ]700
006]00
042700
060003
110311
013700
006200
006200
012702

CLP

OACI/VX, C!"RB
81'

,"DV

2eSP) ,OASCEA
(Sp)+, eSP)
P4,SAV04
12.(SP) ,1'0

IoInv

(~!!)+.P!

MOV
ADD
T5TB
SPL
ADD
MOV

";,112
R2, PI
ATE

!lOV

n12244
0000\4
(100006
001310
000002

]8,
117710
000060

BTC

000007

8IC
ROI'

ADO

,.ova
1'101<

ROP
D£C
BN£
TSTS
8MI
MOV
UII
ASR
ASR
ADD
,,"OV8
BR

001110
001112

000001
001112
177770

001112
000002

00131 0

I CLEAP. OUT UPPE~ BITS -. NOT UStD
ICLI"A~ 8 CH.IUCTE~ nAG

CL~S

ot 1'512
011'516
01 t~22

BITB
BNE
MOV
lSL
BIC
ADO
MOVB
MOV
ASR
ASR
MOV

31
'2, Rl
RO,R3
• 177770,1'13
• 60,R3
~3,-(lIt )
t7.~0

RO
"0
FlO
R2
31
ATE
4C
OASCEA,P2
A2
R2
R2
R2, Fl3
R], (Rt)

CH~P.AC':'tll

rt~G

,GET DE!! !D!)P.
,SET CONVERT COUNT TO 6.
,DEVELOP ADOR TO STORE 1 ST CHAR.
,SET UP TO DO 8 CHARACTERS
,NO, CONTINUE
,YES, ADO 2 TO THE ~DDRESS
,GET VALUE TO 1'3.
:ISIJLATE LEAST SIGNIFICANT DIGIT •
,CONVEIIT TO ASC I I •
,STORE IT,
,CLEAR DIGIT JUST CONVERTED.
,SHIFT IN NEXT DIGIT.

,00"£ 6 DIGITS?
,SR IF NOT.
,StT UP TO DO
CHARACTERS 7
,YES, 00 IT

!5 •

,GO 'PItSH UP

IBITO,ATE
5.
OlSCEA, flO
RO
1177770,RO
RO,P3
A3'(R1l
OASCEA,RO
flO
RO
12,1'2

,ALL DONI!: ?
,ytS, GET OUT
,NO, LOlD UPPER NUMflEFlS TO St CONVtRTED
,LINE UP BITS BELONGING TO LOWER If UMBER
,GIT IUD or ALL OTHlA8
,ADO IT IN TO COMPUTE THE NUMBER
,STORt IT
,LOAD UPPtR BITS AGAIN
,GIT RID 0' THE 2 BITS
,JUST TAKtN CUE 0'
,SET UP TO 00 THE LAST 2 CHAFIACTERS

QUO DEC/Xlt SMORT !lOMITOR
DXQUM.Pl t
21-APR-7'/ 12142
t928
1929
1930

1931
1932

1933

0117 24
011'732
011 34
011 40

on 42

U271'7

000001

19~0
19~1

1952
1953
19~4

1955
1956
1957
1958
1959
1960
1961
1962
1963
1964

22-APR-71

001310

BUB

.sno,UE

004'73'7
012616
000205

JSR
MOV
RTS

PC,RST04

12153

PAGE H
SEQ 0225

000'723
012256

QAEO DEC IXI! SIIORT M['INITnR
OXQABM,!>!1
21-APR-'''1 12142
1934
1935
1936
t 937
1938
1939
1940
1941
1942
1943
1944
1945
1946
1947
19411
1949

MaCYll 2Hl006)

!UI

IoIACY1\ 27(1006)

I SET • aLL DONE" ,.LAG
,GO DO THE LUT 2 CMaRACTr.RS
, P!IITORE REGS, 0 THPU 4
I
,RETUPN

(SP)+, (~P)

2,·APP·"I7

12153

PAGE "12
!H:Q 0226

IBIN1PY TO "ECIMAt. .aSCU CONVEIIT ROtJTIl'll'",
,COIfV!II'1'S ARGIJMF.NT ON SUCK TO DECIMAL ASC Ii, STOPES IT
,SnnING AT ADDRESS GIVEN UTEII THE CHt,
,IIElllons "RGU"E~IT rpOM STACI( BP.:I"ORE RF,TI.'IINI"IG
011744
011750
011754
01\760
011764
011770
011772
011774
011776
012000
012002
012004
012010
012012
0120\4
012016
012020
012024
012026
012030
012032
012034
012040
012042
012044
1.'12052

004437
016601
012'00
012702
012'03
005004
UH201
103402
005204
000774
062201
0&2704
111.'420
005103
001365
(112501
012702
060201
114041
005302
0013'5
0047 37
012616
000205
023420
000012

8DCNVI

012244
000014
<)16230
012 0 44
000005

181
281

JSR
/lOV
I'OV
MOV
MOV

cr,p
sue
ees
r~c

000005

012256
oot 750
000001

000144

114
2$
(R2)+,Rl
3$1
ADO
ADO
16(1,R4
I'OVB
P.4, (RO).
DEC
R3
I!NE
IS
MOV
(lIS)+,Pt
~IOV
.5,112
112, PI
ADO
M(lVe
·(PO), -(Rl)
4Si
DEC
112
8NE
U
JSP
PC,IIST04
(Sp)+, (SP)
MOV
115
IITS
TENPWRI 10noo " 1(\00 , I 100 .. 1(\" 1
BP

000060

114,SIIV04
12,(SII)'PI
'OECVAL,P(I
tTF,NPilR,R2
.5, P3
R4
(lI2), Rl

,SJVE PEGS /)-4,
,Gn SlN VAt.Hr.,
IGET ADDP or OECVAL STPING,
I JODII OF' TFNPWR Tn 1'12,
I SET UP 'TO PO 5 COt/VElIS TONS,
I CLI=:AP I'IESl11,T,
: SUP.TI'IAC'I' TF:N POWr.R.
ISR IF' UIliSUCCJ;;SSrllL,
: 1100 1 '1'0 IIESULT,
100 IT AG.IN,
I RESTO III': SUSTRACTFD V~l,UE,
l'"1Al<E 1'1' ASCII,
ISAVI': IT,
100NE

IIIP If"

51
~OT,

,GET FI N AL STORE ADOR,
: r.E:T 111GIT COUNT OE,qII'IE(I.
,COMPIITY AOOR OP' 1ST "TGIT,
ITP~NS'EP CMIoP,
100NE?
:ElR II" II(lT,
I PEflTOPF' PEGS 0-4,
,EXIT,

QlED DEC/X11 SHOII'f MONITOII
DXQABM.Pt1
21-APR-''7 12,42

MACYll 2Hl006)

22-APR-71

ni5l

PAGE '73
SEQ 022'7

,RETURN TO KERJlEL MODE

1965
1966

i ge;

OUoS6

042766

1968
1969
1970
19'71
1972
!9H
1974
1975
1976
1977
1979
1979
1980
1981
1982
1983

012064

0000112

i70000

000002

RTTK.I

,,
,
,

012066

004437

012072
012076
0121112
012106
012110
012! 12

01]700
Ill]?(\!

n12702
006000
0060nl
\03410

'170000,2(SP)

ROUTINE TO CALC NEXT RANDOM NUMBEFI, USES A 29 BIT SHIrT REGISTEFI
ALGORITHM, EXCr.,UStVELY OR-ING TIiE 28TH AND IST(LO:.l ORDEFI) BITS
INTO THE 29TH BIT AS IT SHIrTS RIGHT. SHIrTS 16 TrfolES EACH TIME
ITS CALLED,
,",ODULU DO A RAND CALL THE~ JUST FlEFEFIENCE RANNU!II
WHICH IS DEFINED AS GLOBAL IN OOXCOM

FlAND.i

ot2244
001162

BIC
RTI

001160
000020
FlLOOP,

JSP
"iOV
MOV
MOV
FlOR
ROR
BCS

R4,SAV04
RANirlRK ,FIt)
RANNUM,Rl
'Hi"R2
FlO

BTC

II 0000, RO
'2000,RO
2S
110000,1'1'1

,SAVE THE FlIl:GISTEFIS
,GET UPPER BITS
,GET LOWER ORDER 16 BITS
,SHIFT 16 TUlES
,SHIFT PII INTO CARRY
,SHlP'T CAPPY INTO Rl. Rt INTO CAIIIIY
,rIRST HALP' or EX-OR PROCESS

1\1
1$

Hj9~

1985
1996

012114

1987

I.H2124

1988

012126
IJ! 2i~~

!~~~

t990
t9ql
11192
1993
t994
1995
1996
1997
1998
1999

2000
20Ql

012120

042700
032700
001412
052700

010000

0527(10
(1]2700
On1402
042700

012152

005 )t)2

iH2154

001354
01003'7
010137
004737
000002

1110000
oCl2noo

Il,2174
012176
01:nOO

012102
012204
012206
III 221"
012217

IH721 ~

2017
2018

1)12216
012222
(II "226
012231)

2025
2026

,SP IF' RIGHT, ELSE
~!~T _~!!_ t~ ___ ..

BIT

SIC
28,

D!:C
B~E

MOV
MOV
JSR
RT!

01'11162
001161'1
012256

~ACYl1

27Cl006)

1"'\,,1

.,n . . r:

,",\:I'JoIt.,a.I"

tiOOOO,RO
''ZOOO,RO
2S
tiOOOQ,PO

,ASSUME OLD BIT 29 J;ASN'1 ALSO SET
,CHECK THU ASSUMPTtON
,Sf! IF RIGHT
,ELSE 2 I'S .. A ZERO BIT

R2
Pt·OOI'
RO,PANWRK
R1, f!ANNUM
PC, PST04

IDONE t,r, TIMES?
,SP IF NO
,SAVE CUf!PENT V~LU£S

22-APP-77

12,53

: RESTI"IPE REG'S
,FlETURN FPO'" TPAP C ~LL

PAGE 74
!;F.;(;

,SUBPOUTINE '1'0 GET PAGE ADDRESS FH:LD VALliE (TOP t2 BITS OF ADDRESS)
,CALL VIAl
JSR R5,TOP12S
ADDRESS OF' TASLE CONTAINING LOWER 16 I3ITS, TOP
BITS CSHIFT!':O),
ANn SLOT F''lR RETUFlNF,D VALUE OF' ADDRESS

2C1H
2019
21'1,-(1
21)21
21)12
2073
2024

91S

BEQ

200~

20"9

1$1

010(lQO

20(12
2Dn3
2D04

2QHl
201 I
201 '2
20t 3
2014
201 Ij

,ASSU"'E OLD BIT 28 ilAS ALSO CLEAR
,CHECK THAT ASSl!MPTTON

QUO DEC/XII SHOPT MONITOR
DXQAIIM.!'!I
21-app-", 12142

20116
20'"
200!!

BIT
BEQ
BIS

~~~~~:

012134
n12140
012144
n12146

nt 2!56
012162
1'112166
012172

olnoot)
002000

(II (1046
nt251)Q
01 '''46
006216
006216
1'106216
O~6216

tlClll2U
"427H
1'11166(1

012236
(112240
012242

1)002(15

nf22lt

~SR

ASf!
ASf!
ASI:<

006216

012n16
000316
00621(;
OO!2! ~
0526111
nt26(1)

01221'

TOP12S1 MflV
!lOV
MCIV
ASP
.. SR

176GOO
01)0(102

erc

RO,-CSP)
CP5l+,RO
(RO)+,-C~P)

rsl')
CSP)
(SP)
(Sp)

(SP)
(SP)

MOV
MOV
swAA
ASR

#1700CC, (SF)
CSP), 2 (flO)
(M)+, (SP)
(SP)
( SPl

!lIS
MOV
FITS

(SI')+, (FlO)
(SPl+,RO
R5

,SAVE THE OLD VALUE OF PO
:GET THE A!'IDRESS OF THE TABLE-PUT IT III RO
I F'UCH TJoIII' ADDPESS TO BE ACTED ON TO TilE STACK
,ELPIT/H.n: THE SIX LOW ORDER BITS. THIS ONE DflOPS STTO
,THYS ROTATrON DRI'lPS BITI
,THIS flOTATIOI>/ DROP!! BIT2
,THIS POIATIO" DROPS BIT3
,THtS ROTA~IO~ DROPS BIT 4
'A~D THIS ROTATION DROPS lilTS
,!SOLlITE II'I': 12 HIG'! ORDER flITS IN fi1i:: L.OIOER
,SAVe: THE 12 HIGH OPPER BITS IN THE TABLE'S 3RO ENTlly
,FETe" TIIF. EXTENDED ADDPESS BITS "FlOM THE 20lD tl'lTRY
,MOVE THE !lITS TO BIT POSITIONS 6+7,F'lRST, TO 8+9,
,THEN >-lOVE THEM TO 7 + 8
;r!~JAtLY ROTATE THEV, TO 6 "" "1
I ADD THE EXTEND~D ADDRESS BITS TO THE 3RD ENTRY
,RESTORE: THE OLD VALUE OF' RO
,RETURN TO THE CALLING PROCEDURE

C228

OAID

~le/Xtl SMO'" MONI'rOtt
21-l.II-" 12in

MlCYil 2Hl006)

22-1PII • ."

12in

PlGE 75

DXQlIM.'l1
2027
2028
2029
2030
2031
2032

2033
2034
2035
2036
2037
2038
2039
2040
2041
2042

SEQ 0229
,lAVE IIEGS 0-4 SUUOU'l'INE. (CALL VU JSR

012244
012246
012250
012252
012254

010346
010246
010146
010046
010407

SAVMI

012256

012604
012600
012601
012602
012603
000204

RST04.

~12260
012262
012264
012266
012270

"aCYI1 27( 10(6)

2054
2055
2056
20S7
2058
20S9

,SlYE ft3
,SlVE R2
,SAVE Rt
,SAVE RO
f R4 IS AI.READY SAVED

MOV
MOV
MOV
MOV
MOV
RTS

(SP)+,R4
(SP)+,RO
(SP)+,Rl
[SP)+,R2
(SP)+,R3
P4

22-APR-77

12.53

, RETURN ADDRESS
,RESTORE RO
rRI
,R2
,RESTOP! 114 "ND RP.:TI1RII

PAGE 76
S~·''l

,CLEAR VARIABLE5 AND QUF"!S, AND Ln.D TRAP CATCHER STARTING AT 71)

2043

2052
2053

R3. -(SP)
R2.-(SP)
Rl,-UP)
RO,-(8P)
R4,PC

,RESTORE REGS 0-4 SUBROUTINE. [CUI. VIA JSR PC,,,,ST04)

QlED DEC/XU SHOPT MOfiITOR
DXQAB"'.P11
21-APR-77 12.42
21144
2045
2046
2047
2048
2049
2050
2051

'NOV
MOV
MOV
MOV
MOV

R4,SAV~4)

IIn272
012276
012]11'
012304
1112)06
012310
012314
012320
012324
012332
012)40
012344
012]46
012350
012352

012700
1112701
t 05020
0115301
0(1)75
012700
0101')]'1
010037

012737
012737
012701
105020
005301
001175
000207

0011106
0001411

016606
001074
001076
1)17116
017116
000764

001100
001102

CLRQU5, HOV
MOV
CLRB
ttl
DEC
BN!
MOV
II0Y
MOV
MOV
MOV
MOV
2 ••
eLRS
OEC
BNE
PTS

UOQUE, JH)
nlts-rOOUE,Rl
(RO)+
III
11
UOO,RO
PO, 1001
RO. I002
• TyPEQ, TYPQ t
• TYPtQ, TYPO,
UOOI.+TYPOL, RI
CRO)+
I'll
2$
PC

,CLEAR VARIABLES.

,INITIALIZF QUEUE POP1TERS

,SET UP TO CLI!:AP
, DONE?
,FIR IF

~JOT.

QU~U!S.

0230

QlEO DEC/Xl I SIIOAT MONITOII
OXQAeM.PlI
21-APR-n 12.42

ioU

206'
2068
2069
2070
2071
2072
20'73
20H
20'15
2076
207'
2078
20'79
2090
2081
2082

OI23iU
~IU60

012364
012366
0123'70
012372
0121'74
Ot2400
012402

012'100
012'701
01(1021
005021
010100
005'720
02002'1
00ll'71
000207

000072
0000'70

001002

1112404
012406
012412
012414
1)12416

012422
012426
1112430
Ot2432

000002
001446
012516

2~~3

~124~~

: ~4A~A

~!~22:

1'112440
(')12444

10"06
000000
011000
0110001)

014620

012446
012446
012446
012450

20~1

1'112452

012452
012454
012454
1'112456
012456
012460
012460

21tt
2112
2113
2\ 14
211 '5

01)~030

1'112450

2094
2095
2096
209'7
2098
2099
2100
2iOi
2102
2103
2104
2105
2107
211)q
2109
2110

005470
nn5124
01)5324
005250
005250

012462

1'112462
1'112464
012464
1'112466
012466
012470
I) 1247 I)
('1124'12
1'112412
1112474
1'112474
012.76
1I1H76
0\ ''500

M5336
(105460
001§250
(105324
1'113&46

013170
on6626

QAEO OEClXt I SHOAT MOIiITOP
OX01R"l. PI I
21-"PI'-71 12142
2116
2117
2118
2119
2t 21l
2121
2122
2123
2174
212'5
2126
2127
2128
7170'

12153

PACE .,.,
UOOUl

CLIIVECI MOV
MOV
MOV
1S i
eLR
MOV
TilT
C'4P
8NE
RTS

'H,RO

trILL VECTOR AREA WITH .+2
,AND HALT.

"'o,Rl
RO'(R1)+
(111)+

II1,M
CPo)+
FlO.1l002

,rILLEO UP?
18R Ir NOT.
,YES. EXIT.

18
PC

,TRAP INTtRPRtTtFl ROUTINE:.
010046
016600
014000
006JOO
062700
02002'7
10]002
011000
000200

2084
2085
2096
208'
20AS
20119
2090
2091
2092

2106

22-APII-'n

I LOAD TRAPC nCIIER IN VECTOII AREA

2050
2062
2083
2064
206S
2066

MACYll 2H1006)

012'500
012'02
012'502
012504
n125(H
012506
012'506
n121§11\
ol21§IO
0,2"2
0125t2
012'511
1112514
Or7«:Hi

TRPINTI MOV
FlO,-CSP)
,PUSH RO.
,GET TFIAP PC.
MOV
2CSP).M
MOV
-CRO),RO
,Gn TFiAP CALL.
,MULTIPLY BY 2.
ASL
FlO
ADO
tTFlPTAB-TPP2, FlO ,rOFlI! TABLE AOOFIESS
,WITIIIN LIMITS?
CMP
FlO.ITIIPLIM
,8R Ir NOT.
SHts
11
MOV
(lIiO.RO
ICtT FlOUT!NE AOORtsS
RO
RTS
'CO TO II0UTlNE. II!STOFl! 110.
.=-==:"11= !~V~L!!'" ~:=!;;~ cat!... C~i5:: 5Y3!::~.
~S~i; !~V!??
! ~:
MSCS,HLT
HALT
TPP2.11000
TUPXaO
TIIPU8i
TP?DtP' EXITS. EXIT.
, POINTEP Fr)FI TIIAP CALL EXITS
EXIT.
T]:IPO[P' QUES.OUE.
:POINTEFI
~UE.
"'OFI TPAP CALL QUES
TPPoEr ENllPSe.TYPQ.
:POINTE]:I rOil T!!lP CALL P'NDPS,
TYPO.
TRPDEr ENOII,TYPO.
, POINTER FOR TFllP CALL ENOl
TYPO.
TFlPoEP' ERFlOR$, TYPQ2 •
,POINTER FaR TRAP CALL EFlIIOR,
TYPQ2.
TRPDEF [lATERS, TYPQ2.
I POINTER rop TRAP CALL DATERS
TYPQ2.
TPPOU MSGS, TYPOI •
,POINTER rOil TR~P CALL ~SCS
TYPOI.
TPPOEF BREAKS, LoBIIK.
,POINTEP rop TRAP CALL BPEAlCa
LoBRK.
TRPOEP' ERFlNS, TYPQ2.
,paTNTEP
rOR TIIAP C~LL ERRN,
TYP02,
TPP~EP'
"SGN •• TYPO.
TYPO,
:POINTF.R FOR TRAP OLt. MSGN$
TPPOEr Gweu"s, GWBur.
,POINTER FOR TRAP CALL CWBUP'J
GWl\ur.
TRI'1'lEF GETPAs, CETPA,
,PO!NTEP FOR 'TRAP C~LL GETPAS
GETPA.
TPPPEF CC'ATAI,CDATA.
,POINT!!:R P'OP TFIAP CALl. eDATAS
COATII.
TPPOEF "I1P22" MAP:!'.

;;HAL;;'

"'ACYl I 27(1006)

22-APII.'77

12153

PAG': '79
SEQ 0232

MAP22.
TPPOEF
TYPO.
TRPl'lEF'
DATCK.
TPPon'

014012
005324
006f,16

,POiNTEP rop TRAP CALI.. MAP22&
MSaSS,TYPO.
: POINTEP rOR TPAP CUI.. MSCSS
OA'I'CICS .1)lTCK.
, pOtNT~R FOP TFIAP CALL DA'I'CKS
PANOS,FI~NO.

, POINTER FOR TR.,P CALL FlANDS

P~ND.

012066

TRPDEr
TYPQ] ,
TPPDEr
TYP04.
TPP"Er
RTTK.

0051'0
00511'12
012056
~PPL!"I

O£APXS. TYPOl.
rPOINTI!:P rOFi TIIIIP CALL DEPFIXI
MSCIlS. TYPQ4.
: POINTER FOR TRAp CALL MSGDS
PTTKS, RTTIf ,
, POINT.!!:R rOil TRAP CALL PTTKS

"' .... 0 CP.:ClXll SHORT MONITOR
21-APP-77 12.42
DXQlBM.PII
2130
2131
2132
2133
2134
2135
2136

2131
2138
2139
2140

2141

2142
2143
2144
214'5
2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
21'58
2159
2160

•• ":06)

22-l\PR-77

22.53

PAGE '79
sro 023]

• BUS ERROR AND PESERVED JNSTPUCTION TPAP POUTINES
,CHECIC MODE BITS or PSW ON STACIC (MAYB! USER IP' KTll IN USE)
,ORDER or ARGUMENTS I VIRTUAL PC ON STACK, PSW ON STACK, STACK POINTER
,ArTEP TPAP, VIRTUAL ADDRESS TRAPPED TO
012516
012522
012'524
012$30
012!1l2

n1274~

012540
Ot2542
012$44
012550
012$52
012556
022'562
012'5615
012572
012576
012604
012610
0221514
012616
012620
012622

000402
012746
000240
010605
012706
012546
010546
0115546
011546
012706
0047)7
105237
012706
005037
112737
104406
01270'5
004715
004715
0()471 '5
004715

(112624
012630
012634

012706
104406
000426

012'534

000004
000010

1)16606

000002
011\546
006230
001244
0115576
0010150
000001
014512
011000

001013

0115546
014122

QAED DEC 1JC11 SHORT WHIITOP
DXOABM, Pll
21-APP-77 12.42
2161
2162
2163
2164
21155
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177

MACV11

H,-(SP)
BUSERPi MOV
BR
RESIA
R!SINTi foIOV
fiO,-CSP)
NOP
RESlA,
MOV
SP,R5
IIIOV
'SPSPi!:C, SP
MOV
(R5)+,-CSP)
R!5,-CSP)
MOV
MOV
2(P5),-(SP)
MOV
(R5) ,-CSP)
MOV
'SPBOT,SP
PC ,CTRLX
"SR
INCB
SYSCNT
MOV
ISPSPEC-IO,SP
CLII
IOBKID
., ,BRAKE
MOVS
MSGS, SYSERII
MOV
UTOA,R5
PC, (R5)
"SR
PC, (R5)
"SR
PC, (R5)
"511
PC, (R5)
"SR

2' I

MACYll 27(1006)

MOV
'SPPOT, SP
MSGS, DOT
BII
PWRUA

22-APP-77

12.53

,lNDICATE BUS ERROR TRAP,
,INDICATE RESERVED 1 NSTRUCTION TRAP.
,SAVE THE STACK POI'ITtR,
,PUT INP'ORMATION INTO SPECIAL MONITOR STACie
,PUSH TRAP VECTOR ON STACIC
,PUSH STACK POI 'ITER ON STACK
,PUSH THE PSW ON STACK
,PUSH THE PC ON STACK
,REST!'IPfr MONITOP STACK POINTER
,CLP:AII QUEUr:;S, CLElr>: up, MAP TO SANK!! ~+ 1
,COUNT A SYSTEM EPROII
,S!:TUP IIPEt'UL STACK POINTER
,ALLOw TYPING
,PIIF.'VF.NT MODUT,E STAliTUP DURING "'USAGE
I TYPE SYS ERROII rULUP!,
,TYPE
,TYPE
:TYPE
,TYPE

ERR PC,
EPII psw,
SP AFTEP EIIPOP
TIIAP VECTOR ADDPESS

,IIESTOR! '~ON ITOR snCK POINTER
,TYPE CRL!" AND DOT
: ATTEMPT TO CONTINUE

PAGE 81'
Sf:" 1'l214

,POWEll DOWN AND POWER np ROUTtNF'S,
012636
0126315
012644
012"46
012654
012660
012664
012670
012674
012700
012706
Ot 2722
012712
012716
Ot 2720

PWIIDNI
012737
01)0000
012737
012706
005237
105037
004737
00'50]7
l ' 2737
1044015

012646

000024

1$,

1)121536
016546
001246
001274
006230
001060
00000 t
014'5'54

000024

pWPUPI

001013

• pWIIUP, pwprv
MOV
IIlLT
MOV
• PWIIDN, PIiPFV
MOV
'SP80T,P6
pwRCNT
INC
CLPR
PUNPfL
PC,CTIILX
"gil
CLP
1081<10
IoIOVI!
'" BRAI<E
MSGS, P'''I'lF'A I

,SET UP pn",e;p UP VEt' TOP ,
,POWER OOWN HlILT
: SET up PO .. FP DnliN yF,CTOP,
IIIESET STACK,
I COUNT A Pr')W!1I P'A II"
,CLEAPII!!:SlJME PU" FL~G
,CL!!:AP QIlEUES A"D II TTIALtzE I(Tl1 IF' H
,ALLOII TYPING
:PI'lF.:YP.11T ~COULE STAPTUP
,TYPE PChiEP nILUIIE "'P:SSAGP.:,

TST!!
BNE

,WEPE WP. til "UN "lODE?
:all IF YES TO PESTAPT,
,NO, COIIITtNlJE

PWIIUAI
105737
001021
00040(1

001257

3$1

BII

PMODE
LOGICA
CIINOUT

USE,

QUD DECixl1 SHOIlT MONITOFI
21-APIl-n 12,42
DXQUM.Pll
2178
2179
2190
2Ul
2182

2113
2184
2185

2111iS
21117
2188
21119
2190
2191
2192
2193
2194

012722
012726
012'7]0
0127]4
n12740
012'742
012746
012752
012154
012762
012762
(112766
0127'0
012'"

10573'
100402
000137
1057)7
001402
005037
013700
004710
000240
105737
1101402
000137
1100137

CHNOUTi TSTII

lIMI
I1 MP

U
COMCC"I

TSTB
SJl:Q
CLp
MOV
JSII
,WORD

I(TPFlts
2.

18,

001252

17'7!!72
28,
LOGIC,

on0042
000240

000240

LOGICAi
TST6
$$1
SEQ
JMp
J"1P
ui

OOiao
001414
007476

Io4ACytl 27(1006)

! o~13'1

001024

2212
2213
2214

2215

rtt 30"

01!74!

001212

2216
2217
2218
221Q
2220
2221
2222
2223
'2224
2225
2226
2227
2229
'2229
2230
2211
2232
2233
22]4
2235

013076
013102
013106
IlUI10
0131 14
011116
013122
013124
013112
013140
013144
0lHS2
013160
013166
0131 '70

160noo
1116000

013'226
013234
013236
0\3244
013250
013252
013256

042716
02'27'26
003016
105737
001403
1051)7
001056
lU737
I! 3737
105137
023737
062737
1)23737
103417
105737
001426
105737
001023
1057]7
001002
105237
1627]'7
000415
062737
10300]
062737
004737
000403
004737
000400

OU'260

000207

013174
013176
013202
013'204
013'210
013212
013216

013224

IIOTBUII"I TSTR
BEQ
TST!!
BPL
TSTB

001 '275

a~E

DEC
BGT
T5TB
BNE

001'264
00U20

INC~

001264

lOS!

MOV

1 S:

'l'S"S
!HIE

OOU 01

105137
100476
105737
11)0473

T5TB
8MI
T5T8
BMI
11110 V
BIC
CMP
BGT
TS18
BEQ
DECR
B'IE

001262

001 0 '21
001302
0(11022
0010]1
001023

oot021
001302

2$.

0fl1'216

1101222

000020
001216

001216
001206

00126]

ReTBll

n01275
001320
001024
000020

001216

111

002000

001212

ROTB21

000020
010166

001214

010126

: IN C!lUN MOO!!?
,BII Ir YEll,
,!!AC!< TO I<yat> SEIIVH:E.
,BIIANCH Ir NO I<T11
:TlJ!'IN Oll'!" I(T11

!I HISJ!O
42, PO
PC, (RO)
!lOp,NOp,NOP

,II!TUII"

'to MOIHTOFl,

CH~

6S
STAIIT
IIUNIIES

12153

PAGE 82
S!!Q 0236

00126 '2

001024
001266

CMN

22-APlh77

ISUBROUTINE TO
(1)1261

223'7
2238
2239
2240
2241
2242
2241
2244
224!!
2246
2247

PAGE 81
SEQ nuS

007364

10'5737
001 '125
105737
100016
11')5737
001013
00'1337
(1)3114
105737
001002
1/)'123;
013H7

2'216

12is3

001260

00000
013004
00006
nl301 '2
OSlOl4
(113020
(113022
00026
013030
nt 3034
013036
013042
(II ;(jSI'l
013054
013056
011062
013064
013070

22\1

U-APFI-17

IFlOUTINt TO EXIT TO CHAIN MONITOit, 011 R!TURN TO I<YBO FlTN.
,PFlOGRAM SHOULD ALWAYS BE IN BANK 0 BY IlERE

CUD DtC/XI' SHORT "ONITOII
DXQABM.Pl1
'21-IPp-77 12,42
2195
2196
2197
21911
2199
'2200
2201
2202
2203
2'204
2205
2206
2207
2209
220~
2210

MACyll 27(1006)

11,
IIOTB31
ROTXTI

Move

Move
COIIF!
C!oIP
ADO
CMp
BLO
TSTB
BEQ
TSTS
SNE
TSTB
BNE
I"lCB
SUB
BR
ADD
BCC
ADD
JSII
BR
JSR
BR
RTS

~OTATE

WIIITE BurrUS IF 1':OTI

POT 1
IIOTXT
ROTL
1$

LOCI(
IS
POTeNT
POTXT
NSTOP
lOS
SToP
ROTNU"', POTCNT
51'0'1'
IH1'!'XT
POTL
FlOUT
MOXCTII
IIOTXT

I~DICATOII

-I.

:1I0TATION ALLOWF.:D?
IBR iF ~10T,
,IS ROTATTON LOCI<EO
:NO, CO'lTlNUE
,YES, IS THE PROGRAM LOCKED
,YES, DON'T SET STOP
,NO, TiME TO REtJOCA'!'E
,NO, CONT1I\1IJE
,ALLOW STOP Tn SET ?
INO, CONTHlUE
,YES, SFT THE STOP P'LAG
,RESTOPE THE COUNTE",
IT?' STOP TS SET, no'l'! lIo"~'!'r
: fIOTATE LOCKI!:O?
:llll IF YES
:Ir COUNTI!:R !lOT INITIALIZED, DON'T IIOTATE'

"~U!l';-(SP)

1160000, (SP)
1115(100, CSP)+

3S
MOXCTR
'2'
SGWSFC
ROTXT
140XCNT, MOXCTII
ROTCT,.GWBrC
W8rtG
WBUFi2,orrSET
'20, WBur1:!
WBur12,HCOR12
ROT82
IIELOC
ROTBJ
LOCI<
itOT83
NSTOp

It
STOP
t20,WBUF'12
ROTXT
'2000,WBur

I If' NOT L~ST IN BANI(, BIIANCH
,HAVE ALL "lODULES USED A VALUE IN THIS BANK?
,YES- TI!oIE TO CHAMGE BANKS
:NO, DEC TIMEOUT COUNTER
,FXIT UNLESS TI~EOUT HAS OCCURRED
,RESET COUNTERS

,TOGGLE INDICATOR
,LOCOIIE ROTATIO"?
,CHECK rOil TOP or WRUE BurrEFI AIIEA
lIP' NOT, BII""lCH
,flELOCUION ALLOWED?
,NO- B.RANCH
ILOCJ(ED7
,YES- SIIANCH
,ALLOW STOP TO SET ?
,110, CONTINUE
,YES, SET STOP
,RES TORt WBur
,EXIT
I BUMP ADDII- POINT 512 WOIIDS HIGHER

.20,WBFEA
PC,SETWBI
IIOTXT
PC,SETWBr
1I0TXT

IRETURII

,RtTURN

,CALCULATE Mxwsr

QUD

DEC/Xi S IMDIIT MONUOI!

DXQAlM.P1t

MACYll 2'7Cl006)

2259

2260
2261
2262
2263
2264
2265
2266
2261
2268

2269
22'70
22'71
22'72
22'73
2274
22'75
2276
2271

013262
01)266

0132'70
qS3274
011300
OU304
0i3ll0
013312
OU1l6
013322

013326
OUU2
013]40
01UU
013350
OU354
01U60
OU364
01U'70
0133'76
OU400
013406

10573'7
001406
10441'6
104406
105037

1057]7
001444
104406
013746
004737
005037

0137]'7
006337

013416

00633'7
00633'7
00633'7
001331
006U'7
162'737
103003
1627]'7
OU746
01nu
004737

OU422

00020'7

013412

001303
016061
0145'76
001]03
001261
014630

001200
011000
001120
001206
001116
001116
001116
001116
001116
001116
000002
000020
001116
001120
010'710

001115

001116
001120

MACYl t 27(1006'

2284

2285

2293

2294
2295
2296
2297
229.
2299
2300
2301
2302
2303
2304
2305
2306
2307
2301
n09

2310
2311
2312
n13

2U5
2316
2317
2318
U19
U20
2321
2322

2324
2325
n26
2327
2321
2129
2lJO
23.11

un
un

22-APII-7'7

,IIOTATE ENABLED?
,BlI lr NOT,
,TYPE LOW1':P LINIT,
,ZEIIO ANY HIGH OflDEP BITS
,COpy I"JTO LOW OIlDEIl BITS
,MAKE IT A 16-BtT NUMBtll

:TYPE UPp!1I LIMIT

,!:XtT,

12i5]

PAG1': 84
SEQ n23A

THIS 1I0UTt~E WILL CO~vEIIT THE GlVEN BTNARY
,NUMB!:" INTO HOUPS, MINUTES, AND SECONDS, {'IJCATIONS
,HOLDING THE P'I"'lL NUMBE"RS WILL BE TAGGrD ASI
!lOUII~.
,MINITS. AND SF.,NOS. HOURS MUST BIr ON ,l .. oDO 80UNDAPY,
,"'INITS AND SEKNDS MUST BE ON EVEN ROUNl)AP1F:S,
,TEMPOPA"RY LOCATION HOLD5 MUST 8E 0'" A'I ODD FlOU'fO),RY,
CALL VIA,
PC.H"S
"SR
ADR
, ADOPES! or THE TIME
ADIIX
,lDO"!SS or EXTENDED TIME BITS

2283

2291
2292

fITS

,AtoIY MEMORY EPROIIS7
,NO- BIIAtoICH

2278
2279
2280
2281

2290

1I0TCIIICi TSTB
MEfoIEllr
BEQ
11
MIGt. MElIlll
foIIG" MEMCHG
CLII!
Nt"'EII"
TITB
1I0TI
!Ii
BEQ
2.
MIGS, ROTENB
MOV
LOCOIIE,-CSP)
PC. tTOA
"SII
CLII
SAVHI
MOV
HCOIl12, SAVLO
UL
SAVLO
AIL
SAVLO
ASL
SAVLO
SAVLO
ASt.
SAVLO
AIL
IAVt,O
AIL
SUB
'2.SAVLO
BCC
18
SUB
nO,SAVH!
31,
MOV
SAVLO,-CSP)
NOV
SAVHI,-CSP)
PC, tTOAX
"SII
2. i

OlED DtC/X11 SHORT MONITOR
21-APR-71 12.42
DXQABM,Pl1

2286
228'7
2288
2289

PAGE B3

,SUBIIOUTINE TO CH!CK Jr' BurFER flOTATION ENABLED, AND TO TYPE
,THE IIOTATION RANGE,

2251

2258

12'53

SEQ 1)231

2248
2249
2250
2252
22!5l
2254
2255
2256
2251

22-APfl-77

21-APII-7'7 12iu

013424
013430

013434
013436
01)440
013444
013450
013452

004437
016600
0\0003
005723
017000
017303
005001

000000
1)00000

005002
022'00

007020

101013
162'00

00'7020

0134'70

005202
0007'71

9134'72

022'00

000014

013454
01]460
!l13462
013466

013476
013500
913$04
013506
013'510

q13512
OUS14
OU520

013,24
OU'526

OUS~O

HMSi

012244
000012

101014
162700
005201
000111
005'703
001'76'7
062'702
062700
005303
000752

013,32
IJUSl6
\lU5 4 0
013,46
013$54
!l13,56
013562
QU,64
013572
013574
913600
013602

010246
004537
015507
113737
013737
010146
004531
01550'7
OU'7)'7
010046
00453'
015507
013137

QU610
\lU614
013620

004'731
062'7U
000207

C"'P
BMI
SUB
INC
BII

f3600"RO
lS
'3600"PO
R2
18

: LESS THAN! HOUP?
,YES. GO LOOK rOR "'ORE 1I01lllS
,NO, SUBTRACT 1 HOUO'S WORTH or SECOlllDS
,COUNT AN HOUR
,CHECK rOR MOPE HOUPS

21i

CMP
BMI
SU!!
INC
BII

UO"RO
.60,.RO
Rl
2.

,LESS THAN 1 "IINUTE?
,YES, ALL OONP.:
,NO, SUBTRACT 1 ~INUTE'S WORTH or SECONDS
,COUNT A MINUTE
,CHECK FOil /40PE MINUTES

ui
000021
010160

411
015511
015512

00135]
001354

011 '744
015512

00U56

011144
01!5!1t2
012256
000004

001360

IICIIO"RO
fiCR)) ,R3
111
R2

,SAVE PEGS, 0-4
,GET ADP r')F OP' ADR TI"'E
,COpy IT INTO REG. 3
,GET lD" OF EXTENDEr} TI ME BrTS ADP
:PUT THE TIME IN REG, 0
: PUT EXTE~OF:D TIllE FlIrS INTO "EG. )
,ZEIIO MINUTES COUNTER
,ZEPO HOUPS COUNTER

114, SAVO""
10.(SP),RO

"0,
R3
(P3)+

181

000074

011744

"511
MOV
MOV
TST
MOV
",OV
CLII
CLR

TST
B!Q
ADD
ADD
DEC
BP

113

MOV
JSII
HOLDS
NOV!!
MOV
MOV
"Sfl
HOLDS
MOV
MOV
"SP
HOLD5
MOV

P2.-CSP)
PS.BOCNV

: PUT THE HOUPS ON T HI'.: STACK
,CONVERT IT TO lSCII
,AND PUT IT HERE
HOLD5+2, HOURS
,LOAD MOURS
HOLDS+3, HOURS+1 ,LOAD HOUPS
Pt,-CSP,
,PUT THE MINUTES ON THE STACK
115,BDCNV
,CONV!:IIT IT TO ASCII
,AND PUT IT HERE
HOLD5+],MINITS ,LOAD MINUTES
, PUT THE SECONDS ON THE STACII
1I0,-C8P)
R5,BDCJtlV
,CONVEPT IT TO ABC II
,AND PUT IT HERE
HOLD5+hS!KNDS ,LOAD SECONDS

,,511

PC.RST04
14. CSP)
PC

ADD
IITS

2.
117.,R2
.4336,,110
fl3
is

,AI'lY EXTI!:NOEO TIME II ITS ?
,NO, GO LOOK FOil MI>oIUTES
,YES, ADO II; 17, HOUIIS
,ADD IN 1 HP 12 MIN 16 SEC
,GET fIlD or ONE TIM" EXTENDED BIT
,CONTII'lUE

,RESTOPt REGS 0-4
,sn PROPEII II!!:TUII'" PC
,AND P£TURN

OlED DECixl1 IIHOII'!' MON%'l'O~
21-APII-77 12.42
DXOAlM.P1S

MACY 11 27 ( 1006)

22-APR-'"

12153

PAGE 85
SEQ 0239

2334

2535

THIS IS THE CALLING SEQUENCE rOil THE CKPIUNG ROUTINE

'336

2U'
2340

OU6n
01U26
01)630

2342
2343

013636
OU642

nu OU6U

IH3'706
005044\
012746
0001102
005037
00013'1

0136]6

7'~'?
23~8

2359

2360

2361
2362
236l
2364
2365
2366
2367
2368
2369
23"/0
2371
2372
2373
2374
23'15
2376
2377
237.
2379
2380
2381
2382

11.

001374
0045'51')

QAEO DEC iXl1 SHORT MONITOR
21-H'R-77 12142
DXOAB"'.PI t
2344
2345
2346
2341
2348
2349
2150
2351
2352
2353
2354
2355
2356

HUN(iCKI MOV
CLII
MOV
IITt
CLII

001136

"loll'

MACYll 2H 1 006)

,REIITORE MONITOR STACK POUlTER
,CL£AP PSW ON STACK
, SETUP RETURN PC
,LOAD n:w PSili AND CONTINUE
, INDICATE NO Io'OOULES DOIIiG EOP
,GO CHECK rOR OTHER MODULES RUNNING

SPSAV,SP
-CSP)
Ha,-csp,
CSTART
ENOSVG

22-APR-77

12153

PAGE 86
SEQ 0240

,GET WRtT .. Burn:" A[,DRESS SERVICE
()13646
013650
013652
n13656
01366!)
013664
013(71)
013674
011676
013702
1'13104

1'10146
010'246
011601
010102
062701
013721
013721
012111
02113'7
! Ill402
013711

,1'1'5"'''
"']""1'1
1 1'11'141
013"1\4

GWBU,. .i MOV
"'av
Mev
MOV
ADD
MOV

01'001]4
000074
001212
001214

!olav

1'101236
ClCl12l6
"1'11021

1ft

013'716
013724
011726
013712
nU716
013"/40
013742
1111746
011752
013754

013'762
013"166

011770
1'111"172
013776
014000
014002
014004
014010

126237
001404
105162
I 0~33'7
012602
01'('01
062716
105H7
100005
113737
004737
000002

010146
01H!l1
012121
005011
0\2601
062716
000002

onooo'5

001 (123

000005
nOl021

2'1
000002
001035
001305
013000

001035

!l000n2

000002

MOV
CMP
BLOS
MOV
'I'MfI
I\fo'1
CMpe
BEO
COMB
DECB
MOV
MOV
ADO
DECS
BPL
MOVB
JSII
PTJ

GETPA.I MOV
MOV
MOV
CLR
!lOV

ADO
PTI

1I1,-(SP)
"',-(SP)
IiI4(SP) ,FlI
Rl,1I2
4W8UFPA,1I1
waUF, (Ill
iIIBI"EA, (R1)+
(Rl)+,(P!)
(lit) ,MxwBF
IS
"'xwsr, (Pt)
,\4[\1(('",P

,SAVE RF-GI STER
,GET ADOIl1':SS OF 14 (10 11LI':
:LOAD ADDRESS OF WIIITE BUFFEFI
,LOAD EXTENDED ADDIIESS BITS
,MOVE SIZE PEOUF-STED INTO SIZE ALLOWED
I FIE QUESTED SIZF. OK?
,Yf:s- BPA~Cf'
,NO- SET ~LLOWEO SIZE
t If' NOT YF.T ISE'I'lfp, flfOP

2t
XnAG(2), wenG
28
XI"LAG(2)
"'oxcn
(SP)t,P2
(SP)+,1I1
'2, (SP)
ROT
3S
POTN,POT
PC,I<OTBUP'

Pl,-(SP)
n(5P)'1I1
(Pl)t, (111)+
cPt)
(!lP)+,Rt
'2, (51')

,II" SA"'E, HAS ALIIEAOY USEO THIS BAtIK
,IF NOT, SET P'L~G TO SAME
1 AND COUNT DO,"1j MODllLES
,RESTORE PEGISTERS
: SETUP RETUIIN PC

,GO CHANGP.: WIIITE BUP'P'EFI ADDFIESS
,IIETUP'"

,SAVE PFG. 1
,Gn lDOIIESS OF neL!"
,COPY VA INTO PA
,CLEAIl El BITS
,FlESTOFIE PEG. t
,!lETUP PETUFIN PC
,IlETUP'"

QUD DEC IX 11 S"OFIT MONITOFI
DXQABM.Pl1
21-APFI-77 12142

MlCY11 27(1006)

2388
2389
2390
2391
2392
2393
2394

2395
2396
2397

12IS]

PAGE 87
SEQ 0241

,THIS pOUTINE ALLOWS FI!l70 DEVICES TO BE F1UN WITH TH!: SrANDAFlD MONITOR.

2383
2384
2385
2386
2387

22-APR-77

014012
014014
014020
014024
014030
014034
n14040
014044
014050
014052
014056
014060

010146
017601
012161
011161
006261
006261
006261
006261
012601
062716
0001)02
000207

MAP22. i !oIOV
MOV
MOV
IolOV
ASR
ASR
ASR
ASR
MOV
ADD
RTI
MVCODE. RTS

000002
000002
onOO04
000004
000004
000004
000004
000002

QU:D DF.ClXtt SHORT MONITOR
21-APR-71 12.42
DXQUM.P'1

"'ACYll 27C 1 006)

Rl,·(SP)
'2(SP)'1I1
(1I1)+,2(R1>
(111),4(111)
4(Fll)
4(R1)
4(R1)
4(111)
(SP)+,Rt
." (SP)

,SAVE REG. 1
,GET THE 1ST ADDIIESS OF THE TABLE
,GIVE BACK THE SA"'E 18 BITS
,THAT WERE GIVE'! TO BE CONVERTED
,SHIFT flACIt FROM POSITIONS 4 AND 5
,TO POSITIONS 0 AND 1

, R!STORE REG. I
,SKIP OVER VA TI') GET THl'; RETURN PC
,RETUFIN
,DO NOTHING

22-APR-77

12: '5 3

PAGF 88
M'r. n242

,PUFIE MESSAGES

2399
2399

2404
2405
2406
2407
2408

1)14062
014070
014076
014104
014112
014120
014122
014125
014127

2409

014132

2400
2401
2402
2403

2410

0\4\36

2411
2412
24U
2414
2415
2416
2417
2418
2419

0141 44
014152
014153
014157

014164
1)141'72
014200

1)14206

2420

014214

2421
2422
2423
2424
2425
2426
2427
2429
2429

014222

2430
2431
2432

24]]

2434
2435
2436
243'7
2438
2439

2440
2441
2442
2443
2444
2445
2446
2447
2448
2449

014223
014230
014236
014244

(1421)45
030461
040521
n44l23
047515
000127
027045

045
045
041)440
1151045
046'525
000
014155
tl6
045
052505
0511 05
026440
051531
051t03
000
045
040526
051124

041505
n20056
076505
051117
044516
000
001)
000045
000124
047125
040515
022503
020045
020105
046106
n26455
042524
051501
020045

044514

014252

020055

014260

046505

014266
014272
014300
014304

044123
041045
042115
041445

014312

020103

050101
.,20114
054523
041440
000045
042tOl
000045
052116
047117

014320
014322
014130

000045
047045

020117

046101

030461

014334

047045
Q14,42· 030461
014346 047045
Q14]54 051504
014362 000045
014364 041 045
014372 051104
014400 022501
014403
04!!

014410
014416
014424

014431
014436

2450

014444

2451
2452
2453

014460

014452
014466

000045
020117
000045
020117
051440

n51440
054522
000
052521

053117

.IISCIZ

' AT'
"RUN SUM"'ARY'

ACRLP'a .+2
CTI'LC.
.ASCIZ '·C,'
QOVRFLi ./ISCIZ ' " QUEUE OVEPFt.Ow ._-

SYSTf.I~

CC>ASH,'

041440

INVCMDi .ASCIZ

''BAD CMD"

020114
054514

INVCD1, .ASCIZ

',CNTL C ONLn'

05211]

INVCD2 i .lSCIZ

'''10 I(T1U'

052113

INVCD3i .ASCIZ

"NO KT1U'

047515

CP~SH"

INVC04i .ASCIZ

"110 "1005 SELt'

INVADRi .ASCIZ

'nAD ADR/DATA"

046105

020104
000045
020106
000
020117

054440
051!!25

-'. "

','
',,'
.-scn

052123
040522

040502
047514

.ASCIZ
.ASCIZ
.ASCIZ

' " INVALID TRAP CALL _ •• SYST'E"

040440

045 n!!2045
054105 051105
042523 046040
020104 ' 042515

DOT.
CFI,
CRCllt
AAT,
SUMARY,

"DPC/XII. DXOAE-D SIfOFlT IJ,ONITOR'

INVTRPi .ASCIZ

047111
020104

052101

043117

.ASCIZ

041440
026455

042101

042515
052502

TITLE.

053517
051440
020115
022510

042057
000

040516
045445

046525
046440

n54057
054104
020104
020124
047524

04450]
040511
044504
052517
020124

INVNAMi .ASCIZ

'nAD NANn'

Je!oFLoi

.A8CIZ

"JeSUP' OFLO'

CLR40i

.A8CIZ

"UO EXERCISE LOAD NEDIU" YOU "'UST CLEAR LOC 40"

........

eEC/XU SMORT MONITOR
21-APR-1'7 12142

MACYll 21l1uUIIJ

22-APR-77

12.53

PAGE B9

DlIaJBM~pl1

2454
2455
:6."D

245'7
2458
2459
2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2410

0144'74

014502

OJ 'S10

014512
014520
014526
014514
014542
014550
014554
014562
0145'70
014576
014604
014612
014620
014626

04610]
041514

020122
0]0064

051531
024040
050056
026127
041505
000040
041520
040506
022505
047125
051117
052123
046101

042440
044526
026103
050123
024524

SYSERRi

.lScn

042527
046111
000045
046440
020131
000123
022524

pWRrui

.Ascn

-"POWER FAILURE"-

MEMCHGI .ASClZ

-'RUN MEMORY TESTS-

VVV1/'~

051445
051122
052122
051520
053054
020012
022445
020122
051125
051045
046505
042524
044045
000045

QUO DEC/XU SHOPT MOtJTTr'lR
OXQAII"'.P! t
21-APR-" 12.42
2471
2472
2473
2474
2475
2476
24'71
2478
2479
2490
2491
2492
2'")
2484

?"'~

241!6
2497
2499
2499
24QO
2491
2492
2493
2494

111 4 630

014636
0\4644
1)14652
014660
Ot 4666
014674
014700
014706
014714
014722
014730
014736
014""0
014741;
014754
0147'56
014764
014772
01'1000
01 '5006
010;01.

SEQ 0243

040505
020103

HuTI

.ASCIZ

toIlCY11 2?Cl0(6)

n-A1>R-77

.lscn

12153

PAGE 90
SEQ 0244

0'53445
041040
fl20122
044524
040516
020056
1)35105

044522
043125
047522
047117
046102
040522
000040

042524
042506
040524
04,440
042105
043516

ROTENSi

0'53445
041040
020122
044524
05151 t
000104
O"!!_"!!
IU710'5
(1)0104
051445

(144522
043125
047522
047117
041101

042524
042'506
040524
042040
042514

ROTDISi .ASCIZ

-"WRITE' surrER ROTATION OISI\IlLE"-

OJO".
tl411111

O?OMl
1142'514

I{TO'f"'r

• ~ SCTZ

-"K'I'11 P'IUBt,FO-

044527
042522
n51105
047514
030060

1141524
044507
040440
02" 03
022464

NOSWP,

• .ASCIZ

-'SWITCII PEGIST!R AT LOC. 1004\'

020110
(10;2123

0201:24
O3044()
000
1115016

.EVEN

-,WIIIT! BurrER ROTATION E"ABLE1'. Pt.'iCEI

QUD DI:CiX11 IHO"" MONITOR
DXQUM.P! 1
21-A'"-" 12i42

"'lCY11 UC100I)

2498
2499
2500
250S
2502

2503
2504
2505
2506

250'7
2508
2509
2510
2511
2512
25U
25t4
2515
2516
2517
2511
2519

2520
2521
2522
2523
2524
252!!
2526
252'7
2528
2529
2530
2531
2!1l2
25]3
2534

12153

PAG! 91
SEQ 0245

,ROU'rrN! TO LnlD WO"S,. CUE UNIBUS PAT'!'!:"" IN ALt.' ""EE M!IoIO"Y

2495
2496

2491

22-lP"-"

015016
015022
CU021
015032
015036
015040
(U5044
015050
015054
015056
915062
015066
0150'72
015074
Ono'76
1315100

(\15104
015110
015112
01'5116
1315120
OU122
015126
025130

015132
015140
015146
n151!!2
015160
015166
cui72
015200

015206
Ot!5212
ilU220
015226

0044]'7
013'702

063'702
023'702
001425
013'700
012'704
105'73'7
001404
012'700
01023'7

012'703
011420
005303
0013'75
062'02
02023'7
002403
004'7]'7
00020'7
005'724
02042'7
103'750
00074'5
1'7'7'7'76
000002
1'7'7'76'7
1'7'7'75'7
000040
t '7'75'7'7
1 '713'7'7
001000
1 '73777
16'7777
020000
077777

LOlDwci .JSR
MOV
ADD
CMP
BEQ
MOV
MOV
2ti
TSTB
ui
BEQ
MOV
ui
MOV
MOV
"
i
61,
MOV
DEC
8NE
ADD
CM'
BLT
.JSR
&II
RTS
,.i
TST
CMP
BLO
BII

012244
001204
001222
001206
001200
015132
001252
040000
172344
000400

000010
001206
012256
(115232

000001
1'77773
000010
000020
1 '7'767'7
00021)0
000400
1 '75'777
004000
nl0000
137'777
100000

R4,SAV04
1.COA12,R2
0""S£",R2
HCOIl12,R2
U

,SETUP 12 BIT S'APTtNG ADDA!SS
,ANY MEMOIIY TO LOAD .,
rNO, GET OUT
,I,. NO KT11, RO WILL CONTAIN PHYSICAL ADDRESS
,LOAD ADDRESS 0" 'WORST ClSE DATA TABLE
,USE ItTll?
,NO- BRANCH
,SET VJPTUAL AODlltsS TO THE START 0,. PlIG&:
,MAP PAGE 2 TO PHYSICAL ADDRESS
,SET UP COUNT!:II
,LOAD DATA

t.OCORE,R~

UCASE,R4
KTPRES

!It
140000,RO
R2,ltIPAII2
'256.,113
(R4), eM)+
R3
U
'10, R2
R2,HCOIl12

,ArTER E'CH 256 WORDS, REMAP
,DON!?
rNO- BRlINCH

H
PC,RST04
PC
(P4)+
R4,UC'SEE

,YES- EXIT
,MOVE DAn POINTEP
,TO NEXT WOPST CAS&: VALUE
,AND CONTINur

3S
2.

.WORD

17'77'76,1,177'7'75,2,1'777'73,4, I '7'7767.1/\

1'7773'7
000100

.WORD

1'7'7'757,20,17'7'73'7,40,17'7677. 100.1775"17.2(10

1'76'7'7'7
002000

.WORD

17737'7,400,1'76'777,1000,17577'7.21)00,173'7'7'7,4000

15'77'77
040000

.WORD

167'7'77,10000,157777,200(10,137777, .foonn, 77777,100000

1'7'7'7'75
000004

015232

wCAS£i

IfcASui

UED DEC/XII SKOPT MO~JTOII
DXOABM.Pll
21-APP-'7'7 12,42

MACYll 27(1006)

22-APP.77

12,5)

PAGE 92
liFO 1124fo

,CO'4MA~D

TA8LE. KEY80APO CDMMANIlS APE "IATCHF:O At:AINST IT.
,TKE MATCK MUST 8E I':XJCT. NO AS8REVUTIO'lS lPg Al,t.O~'ED.

2535
2!1l6
253'7
2518
2539

015232
015232

2540

015232

2541
2542
25U
2544
2545
2546
2547
2548
2549
2!1!50
2'551
2552
2553
2!554
2555
2556
2!1!5'7
2!5!18
2559

C:O foI TAB ,

043106

-·,.ILL", FILL
\F'ILLt
rILL
-OKTOF'", KTO,.,.
'''Tor"
I< TOP'F
-wltTON·,KTON
'ICTON,
KTON
-'flOf/", POf/
'PON,
PON
-·POP'''·, PO,.F
,POP''''
POP"
-" ROTON" , POTON
'''OTON,
ROTON
-·POTO,.,.-, ROTOP"
,POTOP'''

000000

.WORD
.8YTE
.BYTE
.WORD
.WORD

!lOTOFF
15,0
4.0
COMC02
O. o. 0

1)4'7515

000104

015252
015260

1142'52]
010422

000114

042504
010440

000123

040515
010254

1)00120

044506
010566

046114

000

052tt 3
010522

04311'7

000106

052113
010522

04711'7

000

047520
010522

000116

047520
010522

043106

000

047522
010526

04'7524

000116

047522
000
Ot0542

04'7524

015
004

000
000

007364
000000

000000

Ot5262
(115262

0!!52'70

010574

Ot52'72
01~2'72

015300
015302
015302
(115)10

015312
Ot5312

015)22

2560

015)24

2561
2562
2563
2564
2565
2566
256'7
2568
2569

015)24
(115332
015H4
015)34

015]42
015344
OU]44

015)52
015)54

25'70

015354

2571
25'72
25'73
2574
25'75
2576
257'7
25'78
25'79

OU)64
01!5)66
OU3 6 6
015]74
Q15]76
OJ5400
015402
015404
015406

-"PUN·,RU~

TOKN
.Ascn
• !fOliO
TOKN
.ASCIZ
.WORD
TOKN
.ASCIZ
.WORD
TOICH
.ASCn
.WORO
TOICN
.AScn
.wOPD
TOKN
.ASCIZ
.WOPD
TOKH
.ASCIZ
.WORD
TOltH
.ASCIZ
.WORO
TOKN
.lIscn
.WORD
TOKN
.Ascn
.wORD
TOICN
.Ascn
.WORD
TOK"
.Ascn

000116

015240
01'5242
015242
Ot'5250
0!!5252

052522
00'7420

'PUN,
IIU~

-"1400","00
'''00'
'"'00
-·SEL",S!:L

UEt'
SEll
-oDESo. rES
'DES'
DES
-·MAP", MAP
'''AP'
M~P

,CP

II"

QUD DEC/XII SHORT MONlTOII
21-APII-77 12142
DXQU"!.Pl1

2580
258i
2582
2583
2594
2585
2586
258'
2589
2589
2590
2591
2592
2593
2594
2595
2596
2597
2598
2599
2600
2601
2602
2;C:~

2604
2605
2606
2607
2608
2609
2610
2611
2612
2613
2614
2615
2616
2617
2619
26PI
2620
2621
2622
2623
2624
2625
2626
2627
26'S
2629
2610
2631
2632
2633

2634
2635

26~2

2663
2664
2665
2666
2667
2668
2669

22-APR-"

PAGE 93

12i53

SEQ 0247

IIMPUPE MESSAGES.
015414
015422
0\5426
015434
015442
015450
015456
015461
015466
015474
015500
015506
015507
0155\4
015515
015522
015526
I)US34
Ot5541
015546
;:!!5!3
015560
015566
015514
0155'76
015604
015606
Q15614
nt 5615
015622
015627
('115634
015636
015644
015645
015652
015653
015660
iH;S666
015667
015674
015702
nl5704
015712
015714
"1!!722
n15730
015735
015'742
01571j1'\
fJj 5751'.
n15'764
1115765

020045
040440
020040
051440
020040
020040
052116
040
020056
047103
020040
000
040
000
040
020040
020040
020040
040
020040
!!"Co
020040
(20041)
000040
(201)40
020043
020040
000
040
n42520
105
026523
020040
000
045
040
040
020040
040
040
020040
0201")
n20040
0(01)40
n41445
020040
051440
"40
020040
02004"
051440
04()
1'140

020040
020124
020040
040524
020040
040520
040
020040
042440
020124
020040

015772
016000
OU002
nl6010
016012
tH6,,20
016026
016014
016042
016044
016052
011'>060
016061

020n40
020122
020040
00004n
042040
0'51105
04'7527
020n411
onon45
042440
(120040

Ittll~"1II"

"""'~'6

0'1';(174
0161"2
0161 I (I
016\15
016122
)0
016136
016140
(116146
t'l16153
016160
016166
nl'; 17"
016202
016205
016212
01622n
1'11£,226
o 1t't 230
016233

M",

020040

AMODN!!; ,ASCII

020040
020124
020040
041523

APCI

.ASCII

AMDSTAI
MDlREi

.Ascn

020040
051122

APSCNTi

,ASCH

027040

URRS,

,lScn
,ASCIZ

045

020(')40

020040

AT •
STAT •

,ucn

PASCHT •
ERRCNT •

020040

020040
000040
020040
020040
020040
041520

020040

HOLD6t

.ASCIZ

020040
000
020040
055

HOLD8.

,ASCIZ

lEliD.

,ucn

PC-'

!j20~4"

'j2~04~

A~::!:'! !

.. ~5C!!

l?~-·

050101
020040

026503
020040

UND2.

,UCtz

040!!21)

051~23

.PASSI

,ASCII

020040

027040

APA!!.

,ASCIZ

051104
022504
042116

050117
000
040520

,,"oDEnoi ,UCIZ

' DROPPED"

APStNOi ",ASCII

'ENDPAS-'

020040

027040

BPSCNTI ,ASCIZ

05150]

040522

URRORi ,ASCII

"CSPA •

0201)40
051503

1'120040
041522

ACSIIACi ,ASCII

(l2004'l
052123

020040
052101

ACSPC.

,ASCII
,ASCIZ

PASS. •

·
CSRC '
STATC •

020(41)

020040

urATC.

051123
020040
04105'7
02004(1
040527
020040
0405'2

020101
020040
040
020040
020123

ADTERPi ,ASCII
ADTUI
,ASCI!
ADTEl,

,ASCII

WAS'

02004~

AOTF.21

,ASCII

wIlAD!! •

020040

ADTE!! I

.HIC!!

RDADR •

n42122

:'CSRA '
SIB •

051104

"'ACYl 1 2Hl(06)

'2-APR-77

12153

Pier. 9.SEQ 0248

042101

,lscn

020040

ADTE4,

1152101
047!!22
042122
020040

020101
000122
020041
027040

ADTE4A.

,IISCIZ

ADTEX.
ADTE7.

,ASCII
,ASCIZ

051122
020040

020043
027040

E~RN"'81

UlltI/.I8i

,ASCI I
,ASCIZ

101,.11111.

, ASCII

"FilII 2 I

,ASCII

S/8 •

",,,RP31

,ASCII

WAS'

MER"4!

• IS<' J Z

Ot'lO

n,I\'In5
1120040
01\ 1440
040

.000
HOLD5t

QUO DIr.ClXt 1 SHORT 140NITOR
DXQUM.Pl t
21-APR-17 12.42
2636
2637
2638
2639
2640
2641
2642
2643
2644
2645
2646
2647
2648
?e-"9
265(\
2651
2652
2653
'654
26"i5
2656
2657
'658
2659
266n
2661

MlCY11 27(1006)

042515

020115

t:!~1'"

"~1't?~

1l~0t'l40

0'0101
020040
1)40
02004(1
020123
"20040

020040
04105'7
020040
n40527
020040

• "IIU EIIROP'

. ""~
. ··
'WO~D' •

• EPP.

""'EM P'AlLURE- PA •

1'\0004~

020045
044040
040
020(\56
04'440
020121
(143117
1)41)
020056
020121
000(145
040
040

02004(')
042101
020040
04(51)4
051122
052'517
040
020040
047!!27
042522

020040
042122
042101

04tl
1)40

040
040

020040
040
02(104(1
040524
05t11?
020124

URNMl

.ASCIT

AFRCTI

.ASCII

AERTOT •

• Asca

DtCVALI ,BYTE

HAD •
, DATA EPROPS OUT OF' •

, WORDS READ"

41),40,40,40,40,40

... "",IJ

O!c/xu

DXQABM .Pl t
2670
2671
2612
2673
2674
2675
2676
2677
2678
2679

2680

I"'O~T !40NITOIt
21-APP-7'7 12142

2691
2692
2693
2694
2695
2696
2697
2699
2699
2700
2701
2702
2703
2704
2705

2706
2707
27011

2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719

2720
2721
2722
2723
2724
2725
2726
2727
2"28
2729
2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
2740

~\I'l

n-APP-"

12153

PAG! 95
SEQ 0249

.EVEN
016236
016306
016]46
016546
016546
016606
016606
017116

MODGI
I(8UFI
000100
SPSP!ci
Iooi
TYPEQI

OOO]! 0
000454

1\16624
016632
016640
016646

016606
012737
1)051)46
01 "46
000006
012717
012737
013737
011737

OHi654
016662
016666
016672
0'6676
01.6702
016710

012'137
105037
1115037
105037
105037
013717
001004

016712
016716
016722
016726
016730
Q16736
016740
016746
016754
016762
016;70
016776
017000
017006
017012
017014
011022
017026
017030
017034
017040

005137
000137
004537
001200
032737
001414
04273"
042737
062737
062737

016616
016622

013737
001403
112717
105737
001035
Ot2737
012700
005001
062700
062710
005201

017n42
017046
017050
ot 7054
017056

022701
001370
062700
000401

o t 7 060

0110300

Ot7062

006300
006300
0427QO
105737
100003

017064
017066
017072
017076

64.

,ROOM FOil 20 MODULE POINTERS
,KEYBOAIIO BUF'-ER. K8UFL LONG
,MON ITOP STACK A]:IEA

.£11.10/

16.

,SPI!:CIAL MONITOR STACK AilEA

·oBLKB
.ElLKB

TYPQL

1001.
f FIPST AOOIIESS

oa.
BUFsrZaA MODNM-aT APT

017572
o t 4000

016606
n16614

.BLICW
SPBOTI

000020

OAED DEC/XII SHORT MONITOR
21-APP-7., 12142
OlCOAB"'.Pl1

2690

I BUrrEll AIIEAS.

2681
2682
268]
2684

2695
26!16
2697
768A
26119

'HeYlI

016624

MACYII 27(101)6'

012524
001301
001252
001261
001263
000000

nOO010

005 00 0
002620

001346
001350
oooOln

001200

001200
0\7214

012174
000777

001200

000777
000007
001000
000010
000042

001200
001204
001200
001204

001206

1777'77
001252

001260

017056
174000

!l00004

004000
onoooo
000034
004000

022626

170037

001260

12153

PAGE

CjEo
SE'~

016654
000002
000002
001136
001340

:/I2-APP-"

AFTtl! GUrUES

,ROUTlfJE TO OFTF:II"JNE WHETH!P lrIPTTE EllJrrf':!1 POTATII"JN SHOULD TAICE PLACE,
,ANO TO OETERMINE CORE LIMITS or PUp-rr.R POTATro~. ALSO TO OnEII'lI"'E use: Of
,RTI OR IITT INSTIlUCTION o
•• :rOO
,SET UP A Rr.SEPVED TNSTI>UCTlO"l TIIA!>.
118 .IIESIV
SET~U'-I MOV
,CLEAR A WORD ON Tlil': STACl( fOR II NE": PS"
-CSP)
CLP
:SET UP T(1 EXIT wJTH PTT INSTRUCTTO·j.
foIOV
'2',-CSP'
RTT
: IP" PTT "In1 VALID IT WILL TPAP OUT.
MOV
IPTI,TRCIA
: 'TRAP C(WF.S HERE:. CHANGE PTT'S TO !IT!' s.
181
MOV
RY SF'TTI'IG THE P.'STPUCTION VALUE
.RTI,RTT!
"IOV
CHKL2, CHKL 1
:CHANGE SF-T OP" CHKSU'" flOPDS BECAUSF:
"IOV
:01'" PTY'S REPLACI'lG RTT'S
CHICH2. CHIC'"' 1
10f Al.L RTT' S TI:' TI-lOS£ or FlTJ' 5
,RESTOR" THE PESEPVI',D I"'STRUCTI'l", TRAP VECTOFl
• PtSINT. RESIV
781
'"'0 v
:NOT A 45
~DL45
CLRB
JfTPRES
CLRB
: NO /i'Tt!
: ~,SSUMe: NO BUlI'rFR ROTloTTON 0
STeFAi
CLPB
Ron
,ASSUME NO CODE RELonTION
PFLOC
CLPll
MOV
Od,OCORE
: GET TJOCOPE ADOIl. rRO" {.OC 0
8'1E
feR IF LI'IKEO WITH CO"FTG/LINKEP PPOGPl\!"
1$
I IF NOT ASSUMES NOT IN CHAIN MODE
COM
,INDICA!E SETBUF HAS ~EFN RUt:
LOCORE
,GO PREPAPE TO FXIT SETBUF POUTTNE
JMP
Sf TXT
: GeT TOP ! 2 SITS or LOCOPE PHYS ADDP
JSFl
R5,TOPI2S
UI
:AND PUT XT II'1T'3 LCI)II12
LOCORE
,r S IT ON A 256 WORD ROUNOARY
n77,LOCORE
BIT
SEQ
: YES. CONTINUE
28
: NO. CLEAR OUT LOwEI> BITS
.777.LOCOPE
£ITC
:~O'J"D!'IG OFF TO ~EXT HIGHEST 256 BOUI1DARY
SIC
'7, LCOll12
: !'IOUN" UP TO THE ~EXT 256 wORD SOUNDAIIY
ADO
1l000,LOCORE
:ALSO I~DICATE THAT BOUNDARY IN LOCOR12
ADO
Uo,LCOR12
MOV
:ARE WE IN CHAI'" "'ODE?
42. HeOR12
2'1
,Ir
NO,GO DET!':II"'INE II" K'l' IS TO BE USED
BEQ
KTTEST
MOVS
IIF YES, SET THE CHHN INDICATOR
'-l.CHN
I<TPIIES
,IS THE I<Tll AVAIJ,ABLE rOR USE?
ICTTESTI TSTB
: IF YES, GO SIZE "IE"OPY USING IT
BNI::
SETKT
MOV
: IF NO, ONLY SIze: MEMORY UP TO 28t<:
15.,4
,INITIALlZE LOOP COUNTER TO POINT TO BANK 0
folOV
'-4000,110
,INITIALIZE THE COUNTER OF lK CHUNKS(SANKS)
CLR
Rl
:POINT TO THE FIRST WORI) IN THE NEXT lK B"N~
ADO
14000, I!O
Hi
,!'ILL
TPAP IF LOC DOESN"T EXIST
ADD
'0, (RO)
I IF NO, CONTINU!!: PROCESING AT 4S
INC
Rt
: IF ns. UP THE "'E!lORY BANI( COUNT
CIoIP
:HAVE 29 RANKS flEEN COUNTED?
'28 •• 111
,IF NO. GO CONTINUE SIZING
BNE
4$
: IF YES, INDICATE THE NUMBER OF WORDS IN PO
ADD
t4000,RO
: SKIP OVER THE NEXT IfoIS'I'RUCTION
BR
6.
,IF THERE WAS NO LOCATION AT LAST TPY,
CIoIP
CSP)+, CSP"
!it I
,PEMOVE THE TRAP ']:10'" THE STACK
SWAB
,ISOLATE THE 12 HGH OROEII BITS. FIPST,
RO
6'1
:GET THE "OST SIGNIP'ICANT BITs IN THE LOW BYTE
pO
,ALIGN THE AITS TO _CCOUNT FO~
ASL
,EXTENDED ADDRESS BITS (17 + t9,
RO
ASL
,ELIMINATE THE UNWANTED BITS FIIO'l RO
BrC
U 70037, FlO
TSTB
CHN
IACTl1 CHAIN?
,NO- DOt.l"T ADO ROOM ,.0]:1 MONITOR
BPL
SETCOI!

0250

..
9~!1° DEC/XU SHORT IIIONITOR
21-APII-77 12142
DXQABM.Pl1
2741
2742
2743
2744
2745
2746
2747
2748

2749
2750
2751
2752
2753
2754
2755
2756
2757
2758
2759
"60
2761
2762
2763
2764
';765

017100
017104
017106
017106
017114
017120

162700
000400

000100

012737
010037

012516
001206
0In:!:!

017124
017130
017134
017140
017144
01 7 1 46
017152
017156
0"160
ot 7164
01 7 166
017174
011202
01 7 206
017212
017214
!H7214
C! '?~ie

011700
1'10037
163700
022700
101023
105237
105'1]7
001413
022700
101010
013737
1637]7
105237
0047]7
000005

004737

12153

PAGE 97
SEQ 0251

SUB
811

1100,RO
SErCOM

,YES- ALLOW ROOM FOil iliON ITOR
I GO nST THE MEMOIIY

000004

SETCOMi MOV
MOV
SETCMli JSR

.BUSERR,4
RO,HCOR12
PC,TSTMEM

: RESET BUS ERROR TRAP.
,HI AODII TO HCOR12.
! TEST '4EMORY FOR BASIC FUNCTIONING
I VIA ADDRESS UP/OOIlN TEST
101" Br.TWEEN LCOR12 AND HCOR12
IINITIALUE SAVE t.OClTION FOR )(TorUOF' COMIIIANOS
r MUST BE AT LEAST 40
: IS IT?
: FORGn IT IF NOT.
,ALLOw ROTATION,
,NO I'!ELOClTION IF' NO ICTl1

"lOV

001206
001210
001204
000040

~OV

001261
001252
000400
tH1j~O~

01)1204
1')01263
015016

001220
001220

SUI!
CMP
SliI
TNCS
fSTS
BEQ
CIIIP
BHI
MDV
SUB
INCB
JSR
IIES1':T

HCOIl12,M
RO,HCORSV
LCORI2,PO
HO,RO
SETXT
ROT I
KTPI'!ES
U
HOO,RO
1$
HCOR12,O',.,",X
LCOR 12, OP'FMX
RELOC
PC,LOADWC

: If' AI( 011 GREATER, ULOW CODE RELOCATIOt.
,BRANCH IF IIOT
: CALCULATE THE IIlGHP:ST LOC TO WHICH
ITHE PROGRAM CAN B!: RELOCATED
tENABLE RELOCATION
,LOAD wORST CASE UNIBUS NOISE PATTERN
: TURN orr I(T 11 IP' I~ USE:

SETX'I' I
005037

CLR

000000

?"!'~

AA;;'~A=

~ACYll

27 (1006)

ICLElR LOC O.

; ~xr'!.

22-APR-?'

12153

PAGg 98
SEQ 0252

, MEMORY ADDRESS UP 100WN TEST

21St
2792
2793
2794
2785

017222
III 7230
0172l?
017234
01'240
1117244
017252
017256
01'7260
017262
01 '1264
0172 7 0
0,7'2'14
(17)00
017]0'2
(17)06
01'7310
017]12

023737
01)1001
000207
013'02
013701
012737
105737
001002
010100
000404
012700
010237
n12703
010120
01')2701
005]0]
001373
005202

'796

01'314

o'20:n7

2797
'2788
2789
2790
2791
2792
'2793
2794
2795
2796
2197
2799
2799
2800
29n 1
2802
2803
2804
2805
2806
2807
2808
2809
2810
2811
2812
2813
2814
2815
2816
2817
2919
2819
2820
2821

017320
017322
0\1124
017]30
1117]34
017336
01'1340
017]42
017346
017)52
017156
01' 362
017366
017]711
017]74
Ot 1400
017402
011404
1117406
017412
011414
017420
ot1422
011424
011426
017430
01'7432
017434
017436
017440
017442
017446
017450

002754
0(15302
162701
105737
1)01002
010100
000404
012700
1110237
012703

017452

000404

2"19~

22-UR-'77

SEfi(TI

QUO DEC/Xlt SHORT MON ITOR
21-IIPP-77 12142
DXQ"BM,PI t

2766
2767
2768
2769
2770
2771
2772
2771
2774
2775
2776
2777
'779
2779

MACUl 27Cl006)

otto)'
021) 13'
001\20
1152700
1152701
01)5303
001365
005302
021)2)7
002346
01 )702
010201
005302
006301
006301
006301
006101
006101
005101
006301
105'737
001002
010100

001206

001204
001200
1117626
001252

040000
172344
nOO040

001204

TST"'E"'I CMP
!lNE
RTS
MOV
58 I
~OV

0110004

1&1

2$ I

4$1

001206

TSTMI :

040076
t 72344
OOOMO
001176
(lOllH

28 &

000002
00(1)02

481

IS&

3$1

001204
001206

001252

~OV

MOV

IHlOO02

000002
001252

140V
TSTB
P.NE
MOV
ElP

TSTM21

!lev
Mev

ADD
DEC
BNE
I'lC
C"'P
BLT
DEC
SUB
TST8
BNE
MOV
8R
foIOV
MOV
I'OV
MOV
CMP
BIlE
SUB
SUB
DEC
BNE
DEC
CIllP
BGE
MOV
1I0V
DEC
ASL
ASL
ASL
ASL
ASL
DEC
ASI.
TSTB
liNE
MOV
ell

HCOP12,LCOP12
5S
PC
LCOP12.R2
LOCOpE.Rl
,NOMEM,4
KTpRES
2.
Rl,PO
3.
UOOOO,RO
R2.KIPAR2
132""3
Rl, (110).
'2, Jill
R3

I ANy 14e;"'oRy Tn TF.ST
,YES, CONTINUF.
:NO, RETURI'I
,LoaD 12 BIT Lt:lCORE ADDRESS
,Rl COt>lTlINS LOCOPE PIIYS ADDRESS
I LO~D TIME-OUT VECTOR
,USF 1<TII?
I YES- BR.l NCI!
I NO- SET VA EQUAL TO PA
:SET VA, TO PAGE' 2
,MAP PAGE 2 TO PHYSICAL ADDRESS
l':!:'fYN'" ! !!L!:'t'~
It.OAD LOClTTO'l WITH ITS ,aDDRESS

112
"'2,,",COJl!12
is

"''2,Fl

ItTPPES
U
Pl,RO
28
U0076,PO
P2,UPAR2
·]2.,R3
'Po,MEMWAS
PI. MEMloiAS
,",ElIlI
I2,RO

I AFTER 1 HOCK, UP PAGE ADDRESS nELD
,1'1' TOP?
: NO- CONTTNUE
,YES- TEST GOING 001011\1
IUS~: I<Tl1?
,YES- BRANCH
,NO- LOAD VIRTUAL ADDII!SS POINTER WITH pHYS ADOIIESS

,MAP VA TO TOP or 1ST BLOCK IN PAGE 2
,MAP I'AGE 2 TO PA
,COUNT 1 BLOCI(
IOOr.S L('!C1TION
r 110- BPINCH

CONTlI~

ITS PA7

",PI

3t
R2
R2,LCOR12
T5TM1
HCOR12,R2
p2,Rl
1'2
Rl

,AFT!!! CHEC!(JNG 1 BLOCK. ADDRESS NEXT
IDONE?
,NO- COUINUE CHEC!(JNG
r YES- SET TO LOAD MEMORY
,FROM TOP DOWN

PI
RI
PI
Rl

PI
Rl
ICTPIIES

11
R1,RO

'US! I(Tli7
'us- BRANCH
,NO- LOAD VlllTUU POINTE" WITH
,PHYSICAL ADDRESS

QUD DEC/xii .HOn MONno..
DXQllI"'.PlI
U-APR-" Ui42

2822

ot '7454

012700

MACYll 2'7(t006)

n-APII-"

UI!!

PACE 99
SEQ 0253

040016

MOV

U0076, 110

MOV
MOV
MOV
COM
SUB

A2, K:rPAII2
'32.,A3
Rl.tRO
'Ro

I LOAD vrr~TUAt. WITH ,"OP lDDRr.sS 0'
,1'T BLOCK IN PAGE 2
,MAP PAG! 2 TO PHYSICAL
,COUNT A eLOCK
,LOAD LOCATION WITH ITS PHYS ADDRESS
,COMPLEMENT IT

2123

2124
282!
2826

282'
2828
2829
2830
2831
2832
2833
2834
2835
2836
2U'

2U8
2839
2840
2841

017460

010237

dU44

Ot 7464
017470

000040

017472

012'03
010110
005110

011474
1117500
017;04
017$06

16270t
162700
005303
0013'0

000002
000002

01'510
017$12

005302
02023'

017516
01'520

002351
005202
062701

01'522
017526
017530
017534

017536

2842
2843

017540
017542
017546

2844

01'552

2845

ot 7556
017562
017564
0"566
017572
017574
Ot7576
017602
017604
017606

2846
2847

2848
2849

2850
2851
2852
2851
2854

2855
2SS6
2B!1'
2858
2859
2860
28U

il'7610
Ot 7614
017616
017624

2866
2867
2868

017626
017630
01 '636
017642
017646
017652
0171S6
01 '662
Ill'666

2869

Ot '6'2

2862

2863
2864
2865

2870
21171

01 '674
017700

2872

017704

2873
2874
2875
2876
2877

017706
Ot7712

tl17716
0177 20
1117724

010104
10573'
001002
010400
000404
012700
010237
012'03
01103'
ot0401
005101
020137
001016
005720
OU704

017'726
011'734
(117742
017;50

sua

001204
000002

001252

'!'Sf"'3i

040000

172344
000040
001176

2.i
UI

001176

411
000002

005303
001364
005202
020237
002745
012'37
000207
022626
012"r3'
105237
010037
104413
010137
011746
!'I13746
004537
016102
013746
00453'
016115
013746
004537
016130
004537
001166

001206
I'It2516

000004

012516
001303
001164
001164

000004

013737
042737
162731
000207

NOMEMI
MERRi

001174
001166

0011 '0
011524
0011 "

011512
001176
011512
012174

QUO DEC/Xl! SHOFIT MONITOR
DXQABM.PII
21-1oPP-77 12142
2879
2879
2880
2881

2' i

111

001172
000007
on0040

MACY11 27Cl(06)

DEC
BNE
DEC
eMp
BGE
INC
ADD
MOV
T!'fB
SNE
MOV
SR
MOV
MOV
MOV
MOV
MOV
COM
CMP
SNE
TST
ADD
DEC
BNE
INC
CMP
Bt.T
MOV
RTS

n.Pl
12.110
Rl

3t
R2
112. LCOll12
TST"2
R2
'2,Pl
IH,II4
ICTPRES
U
R4.II0
2.
HOOOO,fIO
R2,KIPAII2
032., 1!3
no, MEMMA!
R4,II1
PI
IIl,,,,EMMAS
MERR
CfIO)+
.2,U
113
II
R2
R2,HC"U2
TST!!3
UUSERR. 4
PC

,ArTfR LOADING A BLOCK, SET UP
,DONE?
,NO- 8PANCH
,YES- snup TO CHECK IT

12153

PlEXT

rUSE KTll?
,YES- BRANCH
I SET VIPTUAL ADDRESS EQUAl. TO PHYS ADDRESS
ISET VIPTUAL ADDFIESS TO STAPT OP' PAGI!: 2
f MAP PAGE 2 TO PHYSICAL ADDPESS
,COUNT A BLOCK

f DOES

LOCATION CONTAIN COMPLEMENT OF ITS PIlYS ADORESS?
,,10- BRA-ICH

I CNA NI';l': 12 8IT ADDRESS AFTER CHECK I HG A BLOCIC
,DONE?
,NO- BPANCN
,PESET THF. TI~E-OUT TFiAP VECTOR
,YES- ~ET'JRN

CMP
CSP)+, (SP)+
MOV
*eUSEFlR.4
INca
ME"'!''''
MOV
RO,MEMVA
GETPAI, MEMVA
!lOV
R1, MEMsn
MOV
IIEMPA,-CSP)
MOV
MEMEA,-CSP)
R5, OACNVX
"SFI
MERR2
MOV
"IEMS8E,-(sP)
"SR
Fl5,OACNV
MEFlR3
MOV
"EMWAS,-(SP)
JSFI
R5. OACNV
MERR4
JSII
P5, TOP12S
MEMPA

22-APFI-77

P'O~

,POP THE STACK POIPlTER TWICE
,FlESET THE TIME-OUT TRAP vECTnR
,SAVF FULING ADDRESS
,SAvr ExprCTEO CONTF,HTS
,CONVEPT PHYSIClL ADDPESS TO ASClt

,CO~VEPT

SHOTJLD BE TO ASCII

,CONVF;P'!' IoIAS VAl..UE TO AIICtI
:GET 'lEW "'JGH COPE VALUE

PAGE 100
SEQ 0254

001206
001206
001206

MOV
!lIC
SVS
PTS

MEM12,,",COP1'
",HCOR12
Ho,KCOP12
PC

QUO DEC/XU SHOll' MONnOIl
OXQUM.PI1
21.).PII-" 12142

MACYll 2Hl006)

12'5)

PAGE 101
SEQ 02S5

...

21182

....... """

,£'''ID~

QUO DEC IX 11 SHOPT MON I TOP
21-f,PP-77 12142
OXOAIH'.Pl \
AAT
ACPtF z
ACSII z
ACSPAC
ACSIIC
AOOIIMI
AOOIILO
AOPEIlIl
AOTEPII
lOTEX
AOTt2
AOTn
AOTE4
AOTE"
AOTt"!
AOT!6
AOTE7
lEND
AtNOI
UND2
UIICT
AtIlN!!
AEIINlII8
AEPIIOII
AEIlIlS
AEII'I'OT
Ate'tP
ALLBK
A"lOSTA

014132
014155
000052
015653
015667
0!:I1044
001042
011062
015714
016026
015750
01!?15
016002
01MU
015'165
015'122
0\6014
015541
0015553
015566
016153
016140
0160'52
015645
015500
1116205
nol112
001322
015442
015414
015606
015426
001334
015461
015627

AMOONto'
APASS
APe'
APCLII
APSCNT
APSENO
APTC_t. •••••• u

ASB
UTAT •
ASTATC
ATE
AWAS •
BDCNV
BITO
BITt
BIT10
BITII
BIT12
BIT1]
B1T14
BITU
BIT2
BITl
BIT4
BITS

22-APR-"

000056
000054
015704
001 ]10
000060
011744

• ooooni

··
•
•
•
•
•
•
•

0001102
002000
004000
010000
020000
040000
t 00000
000004
000010
000020
000040

2409'
974
16U
A52
846
265.
2641
1755
865

872
'194
'192
773
964
'lAO

762
79n
696
917
915
729
726
756
868
1640
'Il2
396'

"lACY11 27(1006) 22-APR-77 12153 PAGE 10)
USEP SY~!\OLS
C1I0SS PEFEPFNC£ TABLE
889
26191
2622.
175h
17003
1762.
262"
264H
820
1122
828
2640'
834
840
26431
857
2f.Olt
26051
2659.
735
816

371

lAO.

25A"
1628
2609.
25841

2400
172'
170.
844
370.
17],
l)'
2326
132'
1311
122'
1211
120.
1191

119.
1171
130.
1291

1281
12'11

1210

1757.
1780

1782

1224

2413'

991

26011

2632'
26300.
26181
2635'
26281
919

943

26571
2646.

26171
2592.
26641

1634
333
923
1631
3871
, 637
992
t

892

SEQ 0256

511

952

962

1644

1913

1817

1862

2582'

268]

2589.
261 3.
27
2406
1047

28
2764
1409*

207

107

407

432

1429.

2625.
187h
1045
728

1982.
1062
731

1885.
140a*
755

1894
1428.
789

1907

1917

192B*

815

922

1917

1928

530
5]0
510
625
628

540
535
549

1406
1535
954

15]9

689
898

1529

1004
1670

733

983
85]
1623

1545
939

11565

434

467

492

1520

1526

987

1636

1639

1919.

2317

2322

1528

1531

QAED arc/xII SHOPT ""Nunp
OXOAB".Pll
2t-APR-" 12142
BIT6
BIT'

• 000100
• 000200
BITB
000400
BIT9
0'" 000
BKCNT
001025
BKPTR
001250
BKOSVC 002622
BKQUE
001012
BKTIME 001304
BKTI"''' 001034
BPSCffT 01!!636
BRAKE
001013
BREAK'. 104407
BRUK. 0031)6
BUrsn. 014000
BUSERP 012'516
BUSEV
000004
CADDP
001372
***_ ••
C"ST
CCSRA
001144
CDArA,. 104414
CDATA. 006626
CDATU 006652
CDEIIP
o III 376
CDEFlRI 001400
CDP'LG
"01142
CDPET
01)7202
CHI(HI
001]50
CHKH2
oot 340
1')01346
CHKLI
CHKL2
001336
CHKSUM 1')01342
CHN
001260
CHNOUT 012722
CKCONT 006632
CL1'ICK
001321
CLOCKL 001124
CLOCKP 001326
CLRQUS 012272
CLPVEC 012354
CLR40
014431
001 ]07
CNTI
COMCO~
01')7364
COMCOI
"07360
COMC02 007 ]64
COMC03 1)073'74
COMC04 007400
COMQU! 001 ]62
COMTAB 015232
CONVPT 011550
CII
0\4125
CIICP
1)14127
CSIIA • 000050
CSTART 001374

-•

CTRLC

1261
125'
1241
12H
250.
339.
502
2391
365'
2591
988
240'
615
617
26831
189
199'
413
361
29U
2115.
13631

136U
419.
420.
29,.

421
400.
396'
399.
395'
)5-

3471
G
c;
G

014153

l252
1362
34'
331
3]'
446
462
458
369'
1460

1470
1489.
1243
149)1
4131
1463
1890
993
695
1671
4161
1491')*
1274

"lACY11 27(1006) 22-APR-"
12153 PAGE 1 04
CROSS FltrER!:NCE TABLE -- USEFI SYMBOLS

1895
1002
960
44264"

1005.
5481t

1544.
596

1513-

547*

949-

967

2'744

2857
441708.

2861

68'7.
9481t

900.

1370.
1388

1413
1449.

522
21811

997

3el'
461
1514
24481

1262
2062'

1488'

1589

1015
1012.
2615.
509
2105'

1015*
1001-

1272-

'ISO.

21'72*

721*

743.

81')4*

980*

1479-

903

906

90'*

1245

1524

261')1

2181

2191

271Blt

27)9

1268

1515

2045.

1618

1666

1722

2183

1676

16I!2

1690

909

1007

1483

990

24MI.

7n9.

'724·

746*

AIlO·

PO'S

9no;

9~ 1"

12514

7tH

2135.
434
415.
211
83'*
2114
1449
14,4
136911
1365.
14441
2696*
2696
2695.
2695
3971
467
2177
1365.
379.

436.

H2.

1487.
2578
1492.
1499
712
253St
1899.
1250
1156
90h
6R6*
2342.
2414.

240"
942
1090
689

OAED DEC/XII SHORT MONITOP
21-IPP-77 ,,;42
DXOAB"'.Pll

MACYll 2Hl006) ,,-APR-" 12153 PAGE 1 '15
CROSS PFrEPENCE TABLE •• USEFI SYIAElO(,S

CTPLCA
CTFILCEI
CTPLCD
CTRt,Y
CXIIET
OATCI($OATCre •
DATEPSOATP'LG
DDPPTP
OECOOE
DECVAL
DEIIRCT
DEFlRXU
DERRY.
DERRXl
DES
OIRA
OIRINO

12371
12]8t
U5"
1254.

00'1'

DSTAOR
EMTV
ENDCO'"
ENDPS'ENDSVA
ENDSVB
ENOSVC
ENOSVD
ENDSVE
ENDSVF
ENDSVG
END.
ERCNT •
EIIRIND
ERPLIM
ERIINMB
EIIRNS •
EFlROR$.
ERRPOS
ERRSVC
EIISVCA
ERSVCB
ERSVCC
EIISVCl
ERSVC2
ERSVND
EIISVX

EXITS.
EXIT~
EXITI.
EXIT2.
rAKESFI
FILCHT
rILCTR
FILL
FILL!P

006136
006142
006224
"06230
001242
104417
006616
104405
OOlll5
000042
007230
016230
OO! 114
104421
1'103244
003312
010441')
010274
00101 t
014122
001054
0000 ]0
004]14
104402
004446
004604
004440
004622
004474
004610
004550
104403
000030
1)01017
001234
016044
104410
104404
001140
003!524003532
003600
003604
0·03516
003506
004222
004014
104400
005030
005032
005066
001004
001254 G
001(120
010566
001255 G

1168
973
1246
IHB
336'
21211
136U
210U
375'
2061
122'5
1941
286_
419
674
7511
1655'
1251
2381
466
2691
200.
693
20951
901
965
673
961
9471
959
9!53
20971
1591
24U

3321
859
210,.
20991
296'
673
796
808

81U
673
674
737
791
209U
10231
1020
103S1
2)2'

361
24S1
16961
361

no 025'

144

1453.
2668t
1366*
2125.
741'
753
2550
1617
1615.
1492
!55h
749

2146

2170

1363*

1436

1399.

1403*

1404

1411

1420

142P

t 438

1620.
162!5
1592
5!5a.

1641
2159
1;20*

24061
623

643

6"*

'716"

14'2.

! 435*

909'

938

9A!5

939.
96911
9]71
966
998
97U
960.

9'2

9741

1003

7!54
741*
996
264S,

807.
795-

809*
797.

814
799.

896

1424*
917

, 427*

15'27.
8'0

1638
876

764799.
798
910.
913
7971
79!5'
854
841

765*

768

776

785

1091
10241
1051
439
343.
134'*
2S56

3441

806
1553
968
1006
234]

800.

877
8531

8941

2090
1096
1073
451

1159
1101

1346
1341-

1719
13!52.

1349

1155

801

, 2'; l"

5F"1

2120
1361.

1261·

~61

~25B

QUO D!C/XU SHORT MONITOR
rSlCQABM.'11
21-A,II-77 12i42
P'ILLID
P'ILLNM
G£TADR
GET!lAM
G!T!lUM
GETPA'.
GETP ••
GTote
GTClIO:
GTOtel
GTOK2
GWBU ....
GWBUP' •
HAPDSRa
HCORSV
HCOR12
HLT
lIMS
HIIGnG
HNGTIM
HOLD5
HOL06
HOLoS
nO.,
HOURS
HUNGCK
IE
•

001272
011206
011022
011234
ot 1070
, 04413
013770
007272
007276
007300
007322
104412
013646
17'570
001210
001206
014620
011424
!HIt) 12
001330 G
015507
015515

015526

OJ 1540
00U53 G
013622 G
0001('10
IIiIT • 000022
INPUT
001650
IIIV.OII 014]64
IIIVCOI
014304
IIIVC02 014322
IIIVCO] 014]34
IIIVC04 014146
INVCMD 014272
lliVlilM 014403
lliVTIIP 014223
I08no 001060
IOQ
IOQL •
IOQLTM.
IOQSVA
IOQSve
IOQSVC
IOQSVD
IOQSV£
IOOSVN
IOQur
1001
1002
IOTV
tTOII

016606
000]10

3541
725
1701
1661
1710

824
2112
14631
14641
1465.
1466
21111
2110

7H
3211
3)1
"':~e
1, ~ l

]4'
372'
35'

MACYll 27(1006)
22-APR-77
UiS3 PAGE 106
CROSa R!FERENC! TABLE -- USER SYMBOLS
1491*
918
1750.

1696*
1627

\698

1809,
17681
909

1750
830
237h
1473
14741
23461
435
2749*
319.
2807
1144
22881

2319

884
1737

1738

35t
144'

15U
468
1762
1459
24341
2436.
1589
1497
18151
2083

2711
2149.
149
146.

1'596
2855
2084

2323
1730

402'
2net
475
556

2263
2880*

2500

2513

2327
1745

2326
259,.

25951

566*

231911

2320*

1197

1248

472.
244U

1493

1584

2324
1744

2431*
24381
24291

2444.
2422.
490
2171*
609
149

149.
625t
6411

653

489
635.

6071
1442

nOAx

ITO,l,!!

(lt0744

607

515*

524*

531

542

564

1142

1148

2050

2679.

26ge

2055

2679

1138

1150*
1149.
1140

2045
1151·
2052*

7261

497
1140

6 t c.
1142.

607

60911

1016
1146
611

1708

17421

2152

1.148*
612*

ITOUT
KBono
KBPTR

011016
1)14416
001036

KB!IIVC
teBUF
te8UP'L •
KIP.1I0.
KIPARt.
KIPIIP2"
KIPAFI)"
KIPII1I7.
KIpOFIO.
KIPORI.

005644
(16)06
oOO04n
172140
17'2342
172344

1'739
,4461
469.
1481*
1164.

"KIl'DR~~S

1'2H~

172304

KnOF )s "23116
KIPOR7. 172316
!<TOFr 010522
KTO~
0100.;22
teTON'"
014740
~TP~~5
{trt1'15'
KTTEST 017006
teWtI L s •• ,* •• G
KWIIP .. ** ••• * G
KYBDV
000060
LCLEARII * •••••
LCOFll2 (101204
LOBRI< ,
005460
1.0100
OO'H74
LOTYPQ 1)053'50
LO"OwC (151)16
LOCK
0'11175
LOC'OIlE 001200
LOGIC
0127152
LOCICII 1'112762
MAP
011'1254
MAPREG. "02M
MAPPU 001232
MAP22$· 1114415
101"'22, 014012
MDIR!
Ot 5450
MOL4!
001301
MOXCNT 01)1022
MDXCTR 001021
MED
07661'11'1
MEMCHG 1'114'576
MEMEA
01'11170
MEMtRP' 1'101303
MEMPA
1'101166
ME"lStlE 001114
MEIIVA
00tt64
MEMtlAS 001176
MEM12
oelt 72
ME~R
017630
MERRI
016061
M!RR2
016102

1558*

2046

2051'

2275

14ACY1! 27(1006)
22-IIPP-77
12153 PACE 1 tl7
C'ROS! IIE"II'P!NC'lI; ueu .- U51!:P SYTtlROt·S

172356
172300
17'2302

591*

717

622

620.

5114

568

1146

QIIEO DEC/XII SHOPT MON ITOR
Ol!'QABM,PII
21-APP-71 !?r42
1731
1229
262'
1462
214

2748

tts=;;

017116

1725.
!71H

1475

2320
1729
2599.

885

002522
002604
002424
002570
002514
('0'500
001006
001014
oot076
000020
011000
1')10710

563
414
235'
277'
2781
195'
1706

2964

3~5'

2318
~;:;~

SEQ 0259

1720
17981

SEQ 0260

1746'
47411
1769

1174
1793*

1193*
lA09

1194*
1857.

1204
1869.
'267U

1206*

1207

1211*

1216

1222*

474

1174

1216

1223

1174

1204
'675

1211

14'5'
1011
1112'
1014
IOU
1"5'
96.
9,.

'2507.

2779.

'2795.

2924.

2843·

463

" a4

2'5'14

270n*

2719

'''54

"'4

2790

2917

293!

1594

'498

7713*

2715*

2750

'2759

2768

2771

2805

2833

1046
2761
2201
1593

11\48

1(155

10'58

1060

IM,7

10'7

10116

1094

1099

2212
2260

2502

2 7 ")*

270".

27 C9

271 0

2712'

27 i oj*

277 2

5764
571*

590
590·

956*
2213

2223
2219

2223*

2357

2362*

22'5&*
2977
2970
2864
2798

2962*

2848

2873

1223*

9~h

991
100.
1676_
1675'

'2495'
37t
7717

34'
)4'
21H
3S1

t12H
1125
1041
465
]'5"
316.
208
'176
1615'

2559
2562

140.
2719.
382
3113
396
3191
2104
11331
1044
24971
1505*
443
2188.
2190.
2553

8:U

nu
2117'
2116
1616*
362'
2471
246'
831
22'55
312'
3641

l1it
l1U

:UO'
3151
3131
2799
2254
2651t

23116.
1643*
269911
5511

24661
2867
22'52
2866
286'5*
2863*
2797*
2978
2849
26481
2869

25871

28611

2845*

11031

QAED DEe/xu aHORT MONnOIl
DXQUM.Pll
21-APII·77 12142

MleYll 2'1( 1006' 22·1PII.77 12i5J PACE loa
eROII IIEP'!RENeE TABLE •• UIER SYMBOLS

MERII)
MERR4
MrLAC
MINITS
MOD
MODADR
MODen'
MODeTR
MODEND
MODP'l'R
MODQ
MORE
MOVBNK
MOVnG
MOVING
MSCONT
MSGD, •
MSGD.
MSGDI.
MSGrLG
MSGN, •
MSGN.
MSGS, •
MSGS.
MSG. •

016115
016110
001311
001)56
0105'74
001122
001015 G
001016 G
015615
001040
016236 G
007314
1)012)0

26531
2USt

2812
28'75

40U

U2h
2544
611.

MSG.,
MSGI.
MVCODE
MVDOWN
MXliBr
NEW

003110
003126
014060
00t276
001236

oouu

001273
003010
104422
00]150
001240
001314
t 04411
003004
104416
002774
t 04406

• •••••• U

NOMEM
NOSWR
NSTOP
NU"'BEl
NUMBER
NUMBPA
OACNV

017626
014756

00U20
001052
001046
001050
011512 G

9ACNVX
OACHV9
QASCEA
orFMx
orrSET
orrSTD
orrSTM
OPEN

011524
011532
oott12
001220
001222 G
001224
001226
000000

un.

289'

3,.
944
2611

14711
330'
37U
155t
682
t432
674
734
37H
21091
6'74
21191
674
450
1250
1851
674
690
460

35U

38
1527
2773
453
3'7111
2681
26U
2671

2871
761
1736
2841
325'
15.
32,.

net

116'
243
258
272
286

]to
326

QAED DECllI:t t SHORT "'ONITOP
DXQABM.Pll
21.~Pll·77 12142

PASEND 004626
P1SIIEL 0010l] G
PASTOT 0(11032
PCLl!:AP. •••• *- G
POP70 - •• * •• * U
PIIIQRC- 177772
PIRQS • 000004
pIRQ~
0(lSS10
porr
010522
paN
(l10522
POPSP • 005726
POpSP2· 022626
1)01306
PPPES
pRTY4 • 000200
PRTY5
000240
PRTY6
000300
PRTY7 • 000)40
PS
• 177776
PSCNT • 000026
PSENDl 004714
PSENDB 004;66
PSW
177776
PUSH
005746
PUSH2 • 024646
PW~CH'l'
00\246 G
PWRDN
012636
PWIII .. U
014554
pWlllrv
000024
PWIIVA
012712
PWRUP
1'112646
QOVRrL 01415'7
O'l'!Tl
001760
nOl772
OTSTlS
QTSTC
002004
QUECNT 001300
QUEeTIil 001027
OUE'l'ST 001 ;02
QUES • 104401
005470
QUE •.
RAllO, • 104420
RAND.
012066
R1NNUM 001160 G
R1NliRK 001162
RBUrEl. 000070
RBUrPU 000066
RBuraZ. 000072
RBUP'Vl. 000064
RDeUA • 00010]
RDrGIN. 000104
PDpSA • 000102
RD!!RV- 000101

··•

347
364
404
672
371
25U
3S.
1
1586
2576
911
1 !S.
195
16741
16731
14it
142'
3681
13"
1361
1351

13 ..

2421
2431
261 It
526.
442

1025

1042
960
562.

1056
964
1555.

10'70
9'71

1414
1541.

1549

1555

15'72

1 576

520
52'7
599

548

1513

596.
1517

59h
1557

649
16:20

155'7*
1667

1664
1859

1704
267]1

1811·

1868.

693.

691

458
1459
20B4

466
1487
210ll

1111
1492
2151

1112
1582
2159

1143
1588
2173

t 144
1644
2254

1196
1689
2255

1210
1730
2259

1224
l'73B

1229
1745

, 249
1762

1606.
BOI
2494

1607*
807
25A9

160&*
814
26'25

1609*
!H2
'645

1611·
876

2354
996

2356
lOt 0

1424

824

1:112
1743

1878'

241
254

242
25.,
271

2 iii 3
297
3'24

2114

345

)46

3"'3

9,'7.

685.
212"
7211

73"

681*

6U.
6811
451
12'74
20U
70"
702
1240

7111
1586

2)971

160).
310
2093

160h
332
2097

1605*
754
2105

1559.
832
74841
831
783

2205
911
823*
910
819

2234
1129.

830

909

821

845

993

914

1630

1633

7'79

927

833

839

851

916

1728

1992'

'8611

1909

1919

1924

531
1506-

1533
15A5.

1537

1551

1595

2226

2499

45'*

1887.
27595)3
1239.

205
244
259
273
287
311
327

21}9
245
260
274
288
312
328

210
246
262
275
289
113
3]0

212
247

235
24B
264
277
291

236
249
"65
278
292
316
336

237
250
266
279
293
318
337

238
251
2"7
280
119
338

239
252
268
281
295
121
339

240
253
269
2R2
296
323
340

374

357
375

358
377

)59
378

362
3RIJ

41'1]

909

2406
2868

1:116
2463

124(1
249S

10;\6
2513

1198

1320

1358

1600.
153

16:U
2860,
248811
58"
826
66611
825
781
2874
7'72

1885'

187S.
27'S.

3261

263
2 76
290
314
331

liS
13S

349
369
416

350
370
420

351
371

354
372

355
373

1572.

157].

1574*

1575.

1578.

187
27
1592
2603

28
2027
2619

30
2141
2628

353
2159
2635

446
7215
2651

2226
"48

7flIJ
23A3
2763

824
24(\0
,8f1i4

1099

1095

1100

1169

1199

121111

1254

426
113"
2568
2565
t049

4~0

1061

196

199

2tS

1133

982.

9116

1526.

1615

37.

H8,

19.
2173
19"
2160
2164
1111
495
493
491
3601

433
24631
4U21'741
2166.

1508.
2163'

2169.
2166

2164-

2166.

1143

2415'

525

600

627

17U
17 ..
175'

a1l

84.

35fJ

21'7
192

17"

3?'~

1170

920
9961

U2I

299

!'.P'Q

349
368
415
979.
2SSt

190

480.
1225
11291
21231
19771
36'
3091

2~4

27n

MACY11 27(1006) :n·APR-7'7 12153 PAGE 1n9
CROSS RErEilENC! TABLE
USE II SY"I'OL5

559
995
1007.

75'
1581
984
1000
761
1391
140'

SEQ 0261

497.
491
501
476
47&.
504
2093.
2092
2122
301t
1978

500.
SOH
485
480.
S10

1979
199B.

495.
519

1999.

630

974

1038

nU·2

.
QolED DlClXll SHOPT MONITOIl
21-olPp-n 12142
DXQAII"'.Pll
RDWHllr.
RI:t.Oe
FlESU
RI:SINT
RE5rv
fiEfn
RLOOP
RMODE
RO'!'
ROT8UF'
ROT81
ROTS2
ROTe)
ROTCHK
ROTC liT
lIOTeT
ROTOIS
ROTENe
ROT I
ROTL
ROTN
1I0nUM
ROTO"
ROTON
ROfSU
ROTXT
RSTAT
RSTRT •
RST04
RTTK$ •
RTTlC.
RTTI
RUN
IIUNC
RUND
RUNPES
RlJNPP'L
PlINSVC
SAVHI
SAVLO
',flV04

1'100022
0OI~61

8"
3,.

012530
012524
000010

2136
Hll

001217

3591
198U
3461
261H
219'71
2230.
2229
2231
454
351'
2541
1689
2259

012106
001257
00101!
013000
0131 70
013226
013252
013262
0')1264
001011
014700
014630
001261
001262
001305
n012"6
01054'2
010526
(101270
n11260
001066
000062
1112256
104423
012056
f.10262n
no7420
007664
010102
007476
0012'74
002012
nI.'l 120
001116
/)12244
IBADR • O!lO('l!!\2
IflCNOS 001360
ilL
010422
1\ TeUF' 1116606
1\ TC"'1 '111120
.. TCO" 1"17106
1''1'1('1'
017106
"'TilBr
010126
IETwlH 010166
1.'172\4
I'TXT
IHOn • nonooo

1911

HBt
)491
3661
352'
16871
1680'
l51il
2t 98
274.

PH
1482
21291
196'"
6441
410
1521
1552
970
3561
SOU
2881
28H
1367
169.
4('14'
1649.
445
2 7 461
2740
2'720
1'579
1597
270'7
1
940
13C1,!

'026
1247

1~F'D

DEC/Xtl SHORT MONITOR
21-ll'P.'77 12142

MACYl1 2'7( 1006' 22-olPR-77 12i53 PAGE 110
CFlOSS FlEP'£RENCE TAIILE .- USER SYMFIOLS
350t

213"
21171
2689*

III PUT
SLI S
SLI SII
iLl SB
iLl se
iLl SO
ILt SE
I"'tSL
'''C DE ,.
SP@OT
SperLG
,PC IN'"

IPAAV
IP&PEC

Iii
.RETRN
ISRo ,.
IIIR! •
STAPT
iiA,.

1.'07404
010454
010454
010470
010502
010506
010'112
010476
040000
1.'16546
001010
0001)24
nOl,J,l6
0\6606
00115/0 G
(11)1056
177572
1720; 16
001414
0'10020

IT AT I ,. 1100021
,un n 1 (,672
n'op
001024
IU"'JoRY 01H36
IVRo • 000032
IVRI '" 1.'00034
IVYI?
,. 110"0)6
IVRJ • ono040
• nl)n042
!Yllf
• 0001)44
IVRI
• 0/)0046
nil NT 1101244
lUI PI 001256
lUI RR n14'512

""04

nst 1M

"(1)16

rUj DR
rENt iliR
rnl G
rtTI E

001064
012044
no 1317
01406'2
flCS
on1150
fKS
001146
rop; 2S 0\2174
fPS
001154 G
fP5
nott52 G
fRA' X • nOO024
flies
fPel A

,,,c'e

rRCle
rRel C
rRelSw

fPC'

fR" NT

004772
005000
005016
005002
00\ 070
001072
000014
012404

7(H

eo.

227
1541
1004*
155.
2701'
24CJt
1249160.
161'
1112'
16H
1641
165.
166.
3371
H'5'
215 t
316'
21U
1942
3771
450
361
36.
20081
36.
36.
20971
21 t 51
193
10141
10181
lOll
275.

2761
1931
202

2702*

n60*

1241

1244*

1259

1457

1512*

1522

2244.
2252.
U8h
1564*

2203.
1565.

2209.
1566*

1567*

1570*

1571

2224

2197
1680*

2257
1697*

2701*
2199

2753*
2211

1688

2208

2210
641
980
1960

2212
64!Il.

2214
1439*

2222

2239

2243

2245

22471

2000

20171

2330

2515

2266*
1939

2267*
1977

2269*
2029.

221;9*
2288

2270*
249'1

2213

286
989

307
9CJ6
1509
2149
2U9

340
998
''''.1
2159
2344

379
999
1516
2163
2171

4n5
1241
1592
2115
2lQ7

446
1250
1599
2178
241)0

26CJ9

2742

2699
2698*

1997

447+
236611
2369
2239,
2233

16111
1273+
1562*
2479,
24711
1560
449*
2368
1273
2575
2571
2204
624*
558
1931
2128
2694tt
1505'
1549.
1585'
15 15.
554

50)
2l6h

2169*

2262*
2263*
1445
111h
2329*
254'1
2689.

2272*
2264tt
1461

2274
,,65*
1999

2742
274H
1592.
1600.
2752
29
969
1400
2062
2248

2744'

~I\CY11

1583.

1587+

455
1252
1613
2190

549
1269
167]
2'27

2429

2463

2'743

2748

'81!2

1580

2175

2541
2194
1511*

,X01B".1>11

2539
14971
1651
16611
1509*
1662
16681
1'110*
1663
9H
412
2371
15H
295.
2140
36.
270.

2230

SEQ 0263

2244
2242

2'76H
146
977
1408
207(1
'262

222
993
1418
2137
1278

IS/)4

2146
2335

27(1006) 22-APR-77 12153 PAGE 111
CIIOSS pr.rP'llENCF '!'ABLE
USER SY"'MLS

2516
1709
1660.

2582

2617

1649*
16671
1671
\650*
1666.

1655*

1665.

1656*
1669

1670.

472
1453
553
632*
'148
30h
1456
21Sh

1237
1455*

ass
1384
1691
2230
2471

SEQ 0264

2673

2675

2681

2145
1499*

'2158
149B*

2167

2676'

1Q34
:1167U
4]5"
1497*

1050

1072

2338

437

439*

451

689

733

653

994

89a

983

1406

229
529
1439

32'2
535
152S.

333
540
1529

397
549

1531

431'
624
153'5

2193
625
1539

26P]
629
1542

919*
1545

941
1623

954
1632

999
1665*

1002
1670.

51l
241 O.
1026

518

950

958

2207*

221.'9

'236*

1374

1441

2105.

210"

21091

21111

21131

553.
1507.
473*
24571

633
214'*

1071"

1431"

685*
19631

699

803*

"78

1165
475*
2876
1356*
129CJ*
20931
211 CJ.

1176
1164*

1197*

1248+

2046

lll0.
2095'
21211

20971
21231

20991
2125.

21011
21271

650*

1018*

2400.
304.
303'
2'108
3061
305.
20911

2117.
1012'
1017

2693.

1015,
500
648

647
1019+

20741

21031
21291

~AEt

D!CIX1\ SMOIIT MONITOR
21-IIPII-7'7 12;42

M~CYI t

)XQ'BM.Plt

rRPIIM
rlltP' AS
rR"

20'79
2078
202'
669
2746
2790'
28171
283U
216'
427
2411
335.
42,.
216
2811
2SH
722
703
1322
13371
1350.
1347
l336
694
148
1280'
1481
1471
236'
1090.
10941
279.
1099.
280'
10761
10541
104U
2B2t
290.
29U
292'
2931
2941
496
669
tilt
112'
tilt
1141
10H
108'
109'

012516
ot 2446
000034
rRP~
011000
rl'l'~ EM
017222
rST.! 017)30
rSTt 2
017442
rST.3
017530
rTPlv
000064
rTSJVl 005426
rTY! SY 001014
rTYI YT oot 240
rTYl NK 001410
rna IIV 001406
rn'DR 001104
npe Til 001110
npE AT 00.376
nPf
006]56
np! 8
006466
rYP!C
006502
n,ID
006552
rYPiE
006546
006600
np'L
rYPI N
1'106)40
rYPlQ
0i7116
rYP11
006342
TYP( 1M. ot7572
TYpe L a 000454
TYPe UE 001007
005264
005324
TYpe 1
0011 00
TYpe 1. 005316
TYpe :2
nOl102
TYPe 2. n05250
TYPC 3. 005t 50
TYPC 4. oo'ii 02
TYPJ !T (lOlt06
TYPJ I
001\ 24
001126
TYP'2
TYPI,
001130
(101132
TYP'4
nOI134
TYP' 5
TYPI VC 002650
TYP, AB 002732
UIPIIIO- t 77640
UI" 111 a 177642
UIPI1I2- 177644
UI" R7- 177656
utP( ROa 177600
UIPIR,a \ 77602
UIP( R2a t77604
UIPI"7_ 177616
UMOI E - 140000
WASIOR_ 000054
WBrIA
00f2t4

•

~~:: ~

24Bt
322'
190'
179'

WI'.rl C
001023
OOt212
W8u'
W8ul Eh 000076
1118UI p~a 000074
W8UIROa 000100
1118UI SZ- 000102
WIIU' 12 001216
IIICll E
015132
WCli E! 0152]2
WTW'MJa n00222
XCN,
001026
XfL/C • riOOO05
lCrR'LC 001030
YEa
001062
ZElie
001202
POC 001302
SPAI S
0155'76
- 017752

21291
2088.
2078
2768.
2906
2834
2B56

20861

499
494
1195*
1290*
426.
1292*
49'*
727
710
1334.

1290
660*
1196
133 . .

1321'
711*

1354
902*

1355
94h

1344*

1350*

135h

1321
1357*
730
736

tU4*
744
869

747
973

751
975

911
986

92,.
890

13491
1339
IS5
659
U93
657
148
492

1353
1345
863
930

1351
941
1110

1356.
989
1116

1279.
2053

2054

2680'

928
205S
663*

1.114
2680
933*

1106

1118*

2094
. 110.8
2102
657
2098
2124
2126
1291*
1293*
1294

2096
1110*

2108

1114

2119
1 t 16*

1117*

1119*

2053*

659*
2100

661
2106

662*

928

930*

931

996*

893

1292

12900

932*

1108

2054*

1331
1329
1324

6sH
6'12'

1410*
2241*

2352

22-APP.7'7 12153 PAr.E 1!3
MACYlI 2Hl0"'"
CROSS REP-ERENeE TABLE .- USER SY~IlOLS
2225*
2215

~F:Q

2)59
2239*

2351

1596

1604

2221.'

22''*

2228

2237*

1791*

1810*

1933

193"i

f A311*

1841

\A4e

21l'

220
1546
2568

226'
1610
2571'

39,.

4011
2541'
2677-

4Cl2'

1136

240
2575

2544'
2679.

254H
2680#

151.6*
1593*
1592*
1386

2350

159441
2503
398

1595*
2522'
2518

2534'

tH7*
552*

15MI
2359

1568
2361*

1712

1752

177111

15H*
958

2221*
260"
200
1468
2559.

'22411

tAU

lfI2t
324'
34.
34'
89'
2511
1531
25H
272.
31H
3631
697
3U
1396
25531
26981

,CIoI'

017752
000000

SEQ 0265

Ito.

931
17\1
]2]1

QAtl
DEC/XI t SHORT MON1TC'lR
DXQI lIM.PI 1
2\ .APR-" 12.42

• AI S.

27[1001)
12153 PAGE 112
22~APR-'"
CROSS IIEF!RENC! TABLE _. USER SY!oIBOLS

18"

1426
2556

000
00 I

rlu ORS OErrcTtO;

II
DEI AULT GLOBUS GENtRATED.

DX( U:O, OXQAEO ISOL/CRr lEO i SHORTaDXQAB"1
RU' -TIME i 5 9 1 SECONDS
RU'~TIME RUrOr 191/14a13.1
COl E U!!:oi
10K (20 PACES)

20U
1504
2562

1543
2565'

22~'

2494'
.'6'5'

1 Ro;/ill

.,1]04

1';0;0'

2682'

0266