QA4010 1B_CYBER_18_MSOS_Analysis_Volume_2_Feb79 1B CYBER 18 MSOS Analysis Volume 2 Feb79
User Manual: QA4010-1B_CYBER_18_MSOS_Analysis_Volume_2_Feb79
Open the PDF directly: View PDF 
.
Page Count: 313
| Download | |
| Open PDF In Browser | View PDF |
'.
CYBER 18/1700
MSOS
ANALYSIS
SeDlinar NUDlber QA4020
VolUllle 2
Seminars designed
to help improve
performance and
productivity.
APPLICATIONS
& SOFTWARE
EDUCATION
CS~ CONTI\OL DATA
SEMINAR
DIVISION
couRse,:.No.~QA4020":'1
-
CYBER - t?11700.~:MSOS ANAL YSlSLlST1NGS
STUDENT HANDOUT
VOLUME 2
PROPRIETARY NOTICE
'The ideas and designs set forth in this
document are the property of Control Data
Corporation and are not to be disseminated, distributed, ·gr otherwise conveyed
. to,. third ,persons without the express
Data
written
permission of Contro'l
Corporation.
c
REVISION RECORD
DESCRIPTION
REVISION
A
(11-22-78)
Manual Release
"R
(02-01-79)
Manual Update
,
,.
'.,'
..
."
",,'!
.. ,
I~,
U
/
Publication No.
QA4020-1
REVISION LETTERS I, 0, Q AND X ARE NOT USED
CYBER 18/1700 MSOS ANALYSIS
Address commen ts concerning
this manual to:
CONTROL DATA CORPORATION
1978,1979,1982
©COPYRIGHT CONTROL DATA CORPORATION 1982
All Rights Resenred
National Coordinator
5001 West 80th Street
Bloomington, Minnesota 55437
Attn:
Curtis Vicha
or use Commen t Shee t in the
back
this manual.
of
o
o
RO/J2/04. 1?30.ll.
PIWf,HI\H
I. TMSOS
1700 ASSEMRLY OF COMMON
STORAr.E AllOCATION.
AnDRESS
UNroTlI
0000
0027
0027
CLASS - VER 3.0
BINARY CONTROL CARDS.
NAM
END
ENTRY POINT NAMES AND ADDRESSES.
I\Ll.IN -- £1000
EXTERNAL SYMBOLS.
PRO
OO/?1/00 00.19.51.
COMMON
DfCK-IO·M13 MSOS 5.0'
SU~IMARY
PI\GE
CLASS - VER 3.0
1700 ASSEMBLY OF COMMON
5
10
40
4!l
50
55
CJ
*
COMMON INTERRUPT HANDLER
COI·1MON
ENT ALUN
EXT PRO
EQU COUNT~$BA~
EOU PRLVL $EF
EQU AMASKT($B7)
EOIJ ZERO($22)
EOU LPMSK(2)
COMMON
COMMON
Cor1MON
COMf10N
COMMON
*
*
*
*
*
*
0001
0002
0003
0004
0005
30
35
*
*
*
*
25
POOOO
POOOI
Pon02
POOO3
POO04
POOOS
PonOfl
POOO]
POOO9
P(lOOA
POOOB
poonn
pnOOE
POOOF
POO]O
POoH
POOl?
P0013
0000
01FC
480B
E8FC
POO14
P00l5
1'0016
POO)7
1'(0)8
POO)Q
POOIA
POOlO
B032
6204
COFF
6702
40FF
0[105
40DO
EOE4
oom
E622
442B
EOOO
44F8
E803
140(1
0000
44B8
[flR8
fi?Ol
COEF
An 11
01Bl
0102
7FFF X
SUMMARY-IIO COMMON
COMMON
COMMON
COMMON
*
*
00B8
OOEF
OflS7
0022
0002
20
PAGE
OECK-ID M13 MSOS 5.0
NAM CmlHON
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SY~TEMS DIVISION, LA JOLLA, CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
0000 P
15
08/2I/SO 00.19.52.
*
ENTRY TN NIPROC
CO~'MON
AFTER CONTROL IS TRANSFERRED FROM THE INTERRUPT
TRAP LOCATION TO THE COMMON INTERRUPT HANDLER,
THE RETURN LOCATION, A, Q AND I REGISTERS AND
PRIORITY ARE SAVED IN A PUSH-UP POP-DOWN STACK
BY PRIORITY LEVEL. THEN THE NEW PRIORITY AND
MASK ARE SET AND CONTROL IS TRANSFERRED TO TIlE
ADDRESS ASSOCIATED WITH THE LINE ON WIIICH HIE
INTERRUPT APPEARED.
EOU
ALUN 0
SNF
STQ*
LOO*
INO
LOOSTOLOO
STQlOO*
JMP
OREG t-Jttr1
CPMFIX STQLDOSTALOAANDSNO
*
[ORALLA STALDASTASTOINO
STQLDQ*
XA(I),XI(2),XR(3),XPL(4),XL(5)
0
CPHFIX
QREG
Al.lIN
-2
(ZERO).Q
($28)
=N$102
UFO)
OREG
PRO
0
(COllNT)
COUNT
XA,O
PRLVL
LPMSK+15
ALlA-*-1
ZEIW+16
XPl,O
I
XI,O
I
XL
COlJNl
ALLIN
**MSOS 4.0 COMMON
COMMON
COMMON
COt1t10N
COMMON
COMMON
COMMON
COMMON
COHMON
COMMON
COMMON
COMMON
COHHON
COMMON
COMMON
COMMON
COMMON
COMMON
COMMON
COHMON
COMMON
COMMON
CONMON
COMMON
COt1MON
SAVE 0 IN STACK
COMMON
STACK COUNTER AS INOEX
COMWlN
SAVE A
Cor1WlN
SAVE PlnOR ITY
**MSOS 4.0 COMMON
CIlECK IF OVERFLOW COND ITI ON EX ISTfO **MSOS 4.0 COMf10N
AT TilE TIME TIlE INTERRUPT OCCURREIJ **MSOS 4. 0 C(l~1MON
SAVE OVERFLOW A5 BIT 15 WITH PRIORITY*MSOS 4.0 COMMON
Y*MSOS 4.0 COMMON
SAVE OVERFLOW AND PRIORITY LEVEL
COMMON
SAVE MEMORY
COMMON
INDEX REGISTER
COHMON
STACK LOCATION BASE
C(lt1MON
UPDATE STACK
LINK TO LEVEL ENTRY
PROTECT FAULT
YES, SET UP LINKAGE TO IPROC
SO IT CAN PROCESS THE FAULT
LEVEL I. INK
()
2
2
3
4
5
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
3B
39
40
41
42
43
44
45
46
47
48
49
50
51
COM~lON
52
COHMON
53
l)
o
C)
0
5
POOle
room
POOlE
POO1F
POO?O
roon
poon
rOO23
roo24
POO25
OOFO
C622
6103
40FF
P002f'l
16?2
POO?,]
[202
40EF
Cfilll
0400
O~21
£103
08/21/80 00.19.52.
CLASS - VI:R 3.0
1700 ASSEMBLY OF COMMON
INQ
LOA51ASTQLOQSTOLOAEIN
TRA
(ZUW).Q"
ADJUST TRAP LOCATION
RETURN l.OCATION
XR, f
I
2,0
PRlVL
(AMASKT),O
SAVE THAP LOCATION IN
SET NEW
PH lOR ITY LEVEL
SET NEW MASK I M REGISTER
-2
M
U1Q- 3, I
JMP- (ZEIW) ,Q
END
56751B STORAGE USED
6400 ASSEMBLY
JUMP TO PROCESSOR
LOCATION IN Q
64 STATEMENTS
0.506 SECONDS
15 SYMBOLS
42 REFERENCES
PAGE
COMI10N
cnf1MON
COMMON
COMfi0N
COMMON
COl1rmN
COMMON
COMMON
COMMON
COMMON
COf1MON
COMMON
3
54
55
56
57
5A
51)
60
61
67
63
64
65
1700 ASSEMBLY or COMMON
COMPLETE REFERENCE MAP.
ALtA
AI.LIN
AMASKT
COUNT
CPMFIX
J
LPMSK
PRLVL
PRO
QREG
XA
XI
0015
oono
00B7
OOB8
OOOE
OOFF
0002
OOEF
nooc
0000
0001
0002
XL
Dons
XPL
XR
ZERO
0004
0003
0022
ABSOLUTE
ABSOLUTE
-SYSTEMABSOLUTE
ABSOLUTE
*EXTERNAL*
ABSOLUTE
ABSOLUTE
I\BSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
r.LASS - VER 3.0
2/50
2/11
2/15
2/13
2/34
2/54
2/17
2/14
2/12
2/35
2/28
2/28
2/31
2/30
2/29
2/16
E
Q
Q
Q
Q
X
Q
Q
Q
Q
Q
Q
2/53L
2/33 l
3/09
2/45
2/45 L
2/56
2/49
2/48
2/43
2/42
2/47
2/55
2/57
2/53
3/05
2/38
2/36
2/59
2/46
2/58
3/06
3/08
2/44 L
2/52
o
3/04
3/13
08/21/80 00.19.52.
PAGE
4
o
o
: 1700 ASSEMBLY OF NIPROC
STORAGE AL.LOCATION.
AnDRESS
LENGTH
0000
OOCl2
'CLASS - V[R 3.0
08/21/80
00.19.52.
BINARY CONTROL CARDS.
NAM
ENI)
0092
NIPROC
DECK-IO Ml2 MSOS 5.0
ENTRY POINT NAMES AND ADORESSES.
ASAV
HA
IPROC
EXTERNAL
-- 0025
-- 0074
-- noon
IPI
-- 0010
MSAV -- 0070
tllPRnC -- 0000
PRO
-- 0004
PTYERR -- 0011
PWFAIL -- 0050
POWERU
SYFAIL
SYMBOLS~
JOBINO
PARITY
SWTCH
PWFOV -- 0071
QSAV -- 006F
SUMMARY
PAGE
CLASS - VfR 3.0
1700 ASSEMBLY OF NIPROC
*
*
*
*
5
0000
0010
0025
006F
0070
0071
0074
0004
0050
0011
10
15
002B
002B
0032
0007
30
35
.:10
45
50
5!l
0000 P
0000 P
POOOO
POOOI
POO02
POO03
POOO.:1
POOOS
POO07
POOOR
POOOA
POOOB
POOOC
PonnE
POOOF
POO]O
POOll
0000
0lE2
01CE
1840
6R21
C400
01Hi
C400
7FFF X
7FFF X
0113
0500
5400
Cr.17
lCOl
0000
O~OO
7FFF X
0011 P
DECK-IO MI2 MSOS 5.0
NAM NIPROC·
INTERNAL INTERRUPT PROCESSOR
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION. LA JOLLA. CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
nn IPROC.IP1
P
P
P
P
P
P
P
P
P
P
20
25
*
*
*
*
*
*
*
*
PAGE
1
3
4
5
6
**MSOS 4.1* NIPROC
8
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC132
NIPROC132
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
EOIJ LPMASK(2)
TItIS PROCESSOR MlIST BE IN RESIIJENT IN ORDER TO
PROCESS MEMMORY PARITY. THE PROCESSOR WUICH
RESPONDS TO PROTECT VIOLATIONS MAY BE IN RESDENT OR ON MASS STORAGE AS PART or THE JOB
PROCESSOR. IF THE LATTER IS THE CASE. TIlEN
IPROCI WILL BE REPORTED AS AN UNUSED MODULE AT
nlE END OF SYSTEM INITIALIZATION.
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPIWC
NIPROC
NIPfWC
NIPROC
NIPIWC
NJPROC
NIPROC
NJrnOC
NIPROC
NIPROC
NJPROC
NIPROC
NIPfH1C
NIPROC
NIPROC132
NIPfWC
NIPROC
NJPROC
NJPROC
NIPROC
ENT
EQU
NIPIWC
NIPROC(*)
*
INTERNAL INTERRUPT PROCESSOR
IPROC ADC 0
PROTECT VIOL
SPF PRO-*-1
SPE CONVRT-*-1 PAR ITY
POWER
JMP* PwrAIL
STA* ASAV
PRO
TEST FOR JOB-PROCESSOR OR LIBEDT IN
LOA tJOB JNO
SAN PPROC-*-l
CORE.
LOA SWTCH
SAN PPROC-*-1
lIN 0
JOB PROCESSOR Nor IN CORE - HANG
IHJ+ SYFAIL
RfSTORl A
PPROC LOA* ASAV
GO TO PROTfCT PROCESSOR
JMP* (IPl)
AOC 0
IPI
EQII PTYERR(*)
CONVRT I IN 0
TilE FOllOWING CODE SIWUlO BE IMPlEMfNTEJ) TO
TYPE our TilE CORRECT P.E. /\DORESS WilEN
*
1. TUE P.E. WAS (~ENERATEO WilEN P-REG WAS NOT EQ Y-REG
2. TilE P.E. WAS GENERATED BY DSATRANSFER
*
..
0
2
SUMMARY-1I8 NIPROC132
NIPROC
NIPROC
NIPROC
NIPROC
**MSOS 4.1**
A-REGISTEn SAVED FROM ENTRY
ENT ASAV
**Msds 4.1**
Q-REGISTER SAVED FROM ENTRY
ENT QSAV
**MSOS 4.1**
M-REGISTER SAVED FROM ENTRY
ErlT MSAV
**MSOS 4.1**
OVERFLOW SAVED FROM ENTRY
ENT PWFOV
**MSOS 4.1**
GENERALIZED HEX TO. ASCII CONY.
ENT HA
ENT PRO
116*4372
POWER FAILURE INTERRUPT PROCESSOR
ENT PWFAIL
116*4377
MEMORY PARITY ERROR PROCESSOR
ENT PTYERR
lISER SUPPLIED POWER RESTORE HAND. **MSOS 4.1**
EXT POWERU
EXT JOBINO.SWTCtf
EXT PARITY
SITE FAIL LOCATEO IN SYSOAT ($18FF)
EXT SYFAIL
EQU INT{$2B)
EQU ATEH($2R).SIGN($32)
..
C)
OR/21/RO 00.19.53.
*505
118*4372
*585
68*1519
68*1519
6R*1519
68*1519
9
10
11
12
13
14
2
3
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
4
47
48
49
50
51·
0
()
0
0
CLASS - VER 3.0
1700 ASSEMBLY OF NIPROC
5
III
15
?O
lflO7
1'0(123
P0024
POO25
0000
0000
0000
MAXCOR NOM 0
TCPAR NUM 0
ASAV NUM 0
lumlEST CORE ADORESS +
AODRESS COUNTER
P002fi
P0027
C8FD
642B
FNDPE LnA*
STA*
RTJ*
NOPE SOY
STO*
STA*
LDQ
LOAOUT
ENA
STAMORE LOA*
LOQ
ALS
OUT
ALS
OIiT
RAOLOAINA
SAl
,JMP*
GOON LOA*
lIN
EORINA
SAl
I.DQJMP*
PAREXT ADC
NOEX IT liN
RTJ-1
*
ADDRESS or P.E. CELL + 1
COF5
09ell
fiflOF
0844
680E
CCOI)
OICD
or()fl
C80A
BRfl8
0101
]PF9
EOOO
coon
4453
413F
$r5
1
MAXCOR
A
TCPAR
(TCrAR)
FNOPE-*-1
TCPAll
TCPAR
MAXCOR
NOFND-*-1
PARMOR
=N$4453
=N$413F
NOPE
25
30
35
40
P0028
POO29
P002A
P002B
P002C
P002E
P002F
P0030
POO31
pon32
pn033
pn035
POO36
P0037
P003~
45
50
55
MAXCOR+l IS NECESSARY FOR
HIE SEARCU 1I11WUGH MAXCOR
LOAINA
STA*
CLR
STA*
PARMOR LDA*
SPE
RAO*
LDA*
EOR*
SAl
JMP*
NOFNO LUO
LOA
JMP*
POO12
rOO13
POO14
POOlS
ponl6
POO17
POO18
P(0)9
P001A
POOlS
POOIC
pon]o
PonlE
pontO
POO?2
P0039
P003A
POO3B
P003C
P00311
P(l03E
P003F
P0040
P004}
P0042
POO43
pnn44
P0045
POO46
P0047
584C
01AO
4824
6824
EOOO 0091
C02B
03H
01\00
(lOFF
C917
EOOO 0090
OFCR
03FE
orC8
03FE
DOFF
COFF
09F8
0101
lRF4
CflOl
05PO
B032
0900
0103
E02B
lCOI
7FFF X
0500
5400
ooon x
TCPAR
(INT)
HA
0
MESSAG+5
MESSAG+6
=N$91
ATEIl
-1
0
I
MESSAG, I
08/21/80 00.19.53.
SCAN ALL CORE FOR PARITY ERROR
MAKE P.E. PRINTOUT EO P+I
nONE WITII SCAN
YES
NO
OUTPUT PARn Y DSA< IF NO
PARITY ERROR IS FOUND DURING
TIlE CORE SCAN
2 CARDS DElElED
CONVERT PARITY ADDRESS TO ASCII
CLEAR OVERflOW
SAVED ASCII IN PARITY MESSAGE
SET WR ITE MODE
INITIALIZE COUNT
=N$90
8
-1
SEND UPPER CHARACTER
-1
SEND LOWER HALF
INCREMENT COUNT
8
I
J
-7
GOON-*-l
MORE
PAREXT
0
SIGN
0
NOEXIT-*-l
INT
(PAI{EXT)
PAR lTV
0
SYFAll
GO
no
SO~IE
MORE
SKIP IF USER PGM NOT HERE
GET CON1ENTS or $100
GO TO PROGRAl1 NAMED PAR I TV
PAR ITY EfHWR - BANe;
1 CARD UHf Tf:O
70*1519
70*151')
70*1519
68*1519
68*1519
68*1519
72*1519
72*1519
68*1519
70*1519
6~1r1519
68*1519
PAGE
NIPHOC
NIPROC
NIPIWC
NIPIHlC
NIPROC
NIPROC
NIPROC
NIPROC
NIPIWC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
3
53
5'1
55
56
57
50
59
60
61
62
63
64
65
66
67
NIPROC
NIPIWC
NIPROC
69
70
NIPROC
NIPROC
NIPROC
**MSOS4.1** NIPROC
NIPHOC
**MSOS 4.1** NIPROC
**MSOS 4.1** NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIf'ROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NJPROC
NIPRUC
NIPHOC
NIPROC
tH PROC
NIPROC
NJPIWC
NIPROC
NI PROC
NIPROC
NIPROC
tllPIWC
N1PIWC
6B*1519 Nll'lWC
73
70*1519
68*1519
68*15]9
68*1519
68*1519
71
74
75
76
77
78
79
SO
81
82
83
~4
85
86
87
08
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
IIl5
106
ClASS - VER 3.0
1700 ASSfMnlY OF NIPROC
5
10
15
P0049
pnMA
POO4B
POO4C
POO.10
P004E
POO4F
onnA
5041
5249
5459
2C20
3030
3030
P0050
P0051
P0052
POD53
P0054
0500
(lR[l3
4AW
OAOO
01Bl
OAOI
681B
rOO55
70
25
30
3!i
40
P0056
POD57
P0058
POO59
P005A
P005B
P005e
1'0050
P005F
POOfiO
POOn2
POOn3
POOt14
POOn5
POOfifi
POOfil
POOEl8
POOfi9
POOM
POO6n
POOfiC
P006E
P006F
POO1O
POO71
poon
P0073
()
Of~OC
6818
C422
6M8
COOl
6817
COOO 1400
6427
COOO OOM P
6001
IPFF
caOE
li4??
CflOD
6nOl
CR06
0011
0101
1C03
5400 0048 X
7FFF X
0000
0000
0000
onoo
0000
OA/21/80 00.19.53.
PAGE
4
*
MESSAG NUM $OOOA
AlF 6.PAR ITY. 0000
NIPROC
NIPIWC
NIPIWC
107
*
NIPROC
NIPROC
NIPROC
NJPROC
NIPROC
NIPROC
NIPROC
NJPROC
NIPRoe
NIPROC
NIPRoe
NIPROC
NIPRoe
NIPROC
NIPROC
NIPRoe
NI PRoe
NIPRoe
NIPROC
NIPROC
NIPRoe
NIPRoe
NIPROC
NIPROC
NIPROC
NIPRoe
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
110
111
112
113
114
115
116
liN
STA*
STQ*
ENA
SNO
ENA
PWOV STA*
TRM
STA*
LDASTA*
LDASTA*
LilA
STAlDA
STANUM
PRFAIl lOA*
STALOA*
STALOA*
EORSAZ
JMP*
HANG RTJ+
lIPOWER ADC
QSAV ADe
MSAV Aoe
pwrov AOC
lZERO ADC
lONE ADC
Pl~FAIl
0
ASAV
QSAV
0
PWOV-*-1
1
~~~
CHECK IF OVERFLOW EXlsrs
YES.SET INDICATOR
SAVE IND.O=NO OVERFlOW.1=OVERFLOW
**MSOS
**MSOS
**MSOS
**MSOS
4.0
4.0
4.0
4.0
PWFOV
A
MSAV
(M)
($22)
(D)
LZERO
1
LONE
(1)
JMP+ INSTRUCTION
=NU400
($22-)
=XPRFAIl
1
HANG lINTIl POWER RETURNS
$I8FF
lZERO
($22)
(0)
(1)
LONE
]
**MSOS 4.1**
CHECK IF USER ROUTINE LOADED
lIPOWER
**MSOS 4.1**
I.PMASK+15
**MSOS 4.1**
SKIP IF NO ROUTINE
HANG
EXIT TO USER POWER RESTORE ROUIINE**MSOS 4.1**
(lIPOWER)
POWER UP - HANG
SYFAIl
**MSOS 4.1**
ADDRESS OF USER PROGRAM
POWERU
0
0
**MSOS 4.0
0
0
0
()
lOA
109
III
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
1'10
141
142
143
n
c)
0
0
CLASS - VER 3.0
1700 ASSEMBLY OF NIPROC
08/21/80 00.19.53.
******-**************************". ****************************""MSOS
***MSOS
*
**MSOS
II E X T 0 A SCI I CON V E R S ION
*
***MSOS
*
**************************************************************MSOS
5
PAGE
5
4.1 **
4.1**
4.1**
4.1**
4.1**
NIPIWC
NIPHOC
NIPROC
NIPnOC
NIP/WC
]45
146
147
148
149
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
NIPROC
NJPROC
NIPROC
NIPHOC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIP/WC
NIPROC
NIPROC
NIPROC
NIPROC
NIPHOC
NIPROC
NIPROC
NIPROC
NIPROC
NIPnoc
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
NIPROC
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
160
169
170
171
172
173
174
175
176
177
]0
1~
?O
?5
30
35
40
P0074
P007S
P007fi
P(1077
P007fl
Pfl079
POO7A
P0070
POO7C
POOlO
P007E
P007F
P(lORO
POOA1
POOP2
POOR3
P0084
P(l085
POOP,6
POO87
POOSS
POOH9
POORA
P008B
POOSC
POOAO
POORE
POORF
P(l090
POO91
POO2
WILL CAUSE PROTECT BITS
TO BE SET, THEN PARTITION
16 IS RELEASED FOR
SYSTEM liSE
USER TERMINAL SIMULATOR ROUTINE
(MIP)
=ARE
SPR
SLCK
1
(MIP) ,Q
8
-$53
SLCK
S200ns
SPRO
MI12
MIBX
MIB
S2000S
MIP
(MONIT)
$2404
SIM200
(DISP)
(MIP)
8
-$2F
G02
MIlO
S200ns
G020
TEST IF RES IS INPUT
TEST FOR FINAL S
ZERO MI PERMISSIVE FLAGS
SET 200UT BUSY FLAG
PIckup START OF MESSAGE ADDRESS
SCHEDULE SIM200
GET SIH200
RETURN TO DISPATCHER
NOT RES, SO TEST FOR SLASK (/)
NOT 1\ SIM200 COMMl\tm, SO HETURN
TEST IF SIM200 IS IN CORE
0
PAGE
8
**MSOS 4.0 MINT
MINT
MINT
MINT
**MSOS 4.0 MINT
**MSOS 4.0 MINT
116*4377 MINT132
**MSOS 4.0 MINT
**MSOS 4.0 MINT
**MSOS 4.0 MINT
116*4377 MINT132
MINT
**MSOS 4.0 MINT
116*4377 MINT132
**MSOS 4.0 MINT
**MSOS 4.0 MINT
**MSOS 4.0 MINT
249
250
251
252
253
254
**MSOS 4.0
**MSOS 4.0
116*4377
116*4377
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
llfi*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
266
267
101
102
270
08/21/80 00.19.56.
MINT
MINT
MINT132
MINTI32
MINT
MINT
MINT
MINT132
MINT132
MINT132
MINT132
MINT132
MINT132
MINT132
MINT132
MINTl32
MINT132
MINT132
MINT132
MINT132
MINT132
MINTl32
MINT132
MINTl32
MINTl32
MINTl32
MINTl32
MINT132
MINT132
MI NTJ 32
MINT132
MINT132
MIN1132
MINTl32
MINT132
MINT132
98
256
257
258
99
260
261
100
263
264
265
271
272
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
~llNTl32
132
MINT132
MINT132
133
134
0
o
o
CLASS - VER 3.0
1700 ASSEMBLY OF MINT
5
10
15
POl ]8
P0119
POllB
POIIC
POI1O
P011E
POllF
POl20
POJ22
P0123
POllS
P0126
POl27
POll8
P0129
POll'A
H~80
EOOO
FOEB
C201
6rOA
OAOF
Olor X
G020
Af}?'?
poon
6804
EAOO
54F4
1207
0000
14EA
0000
o
1200
FF76
LOC
JMP*
LOQ
AOQLOASTA*
ENA
ANDAOD
STA*
LDQ
RTJNlIM
NlJM
JMP-
MI12
=XSIM200
$EB
1.0
LOC+ 1
15
(ZERO).O
::N$1200
LOC
MIP
(MONIT)
$1207
0
(DISP)
*
S200BS NUM 0
- END
64127B STORAGE USED
6400 ASSEMBLY
08/21/80 00.19.56.
NOT IN CORE. SO GO TO PRINT ERROR 5 116*4377
BUILD ADDRESS OF SIM200 DIRECTORY LOC.116*4377
116*4377
PICKUP CORE AODRESS
116*4377
116*4377
116*4377
llfi*4377
116*4377
116*4377
PICKUP MESSAGE START AODRESS
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
116*4377
366 STATEMENTS
2.029 SECONDS
94 SYMBOLS
284 REFERENCES
PAI~E
9
MINTl32
MINT132
MINTl32
MINf132
MINTl32
MINT132
MINTl32
MINT132
MINT]32
MINT132
MINT132
MINT132
MINT132
MINT132
MINT132
MINT132
MINT
135
136
137
138
139
140
141
142
143
]44
145
14G
III 7
140
149
150
273
1·
ALVLST
AMIPRO
ASTSKR
~ATCIf
I1ATCLU
CCP
CIUlRSK
CREXTB
OISP
ERR
FILE!
00138
OOM
OO'lF
OOBO
007B
0025
002A
00E9
OO[A
G02
G020
HICORE
JBCNCL
JOM
JOAENT
.JOI1 I
.1OB INO
JORSTR
JPCIfr.E
L
LEND
LOAOIN
tOC
LOCORE
LPHSK
LVLSTR
LVLSTV
MI
MIB
MIBFAO
005A
00R3
00B3
0116
0119
00F6
007E
00fi8
006E
0072
0072
00511
008A
0024
00139
0049
017.6
00F7
0002
0008
OOOB
0000
0070
0018
MIBX
MIGO
MIINP
MINT
MIOIIT
MIP
0071
0004
0098
0000
0086
0098
MIPRO
MIJ
MIl n
MI) 2
MIl4
MIlfi
00A4
OOOE
MI2
m7A
MI7.AA
MI?J\E
on12
00('4
0010
0020
0021
£1030
0038
003C
Fl
m2J\X
MI21
HI3
MI3]
C)
CLASS - VER 3.0
1700 ASSEMBLY OF HINT
COt1PLHE REFERENCE MI\P.
n09C
OOM
00B4
001\0
"EXTERNAl*
*EXTERNAL*
AOSOLUTE
ABSOLUTE
. ARSOLtJTE
*EXTERNAL*
6/35
5/57
4/30
4/36
2/36
2/30
2/50
2/49
2/52
3/04
4/37
2/33
6/30
8/56
l
Q
X
X
Q
Q
Q
X
l
8/59
ABSOLUTE
*EXTERNAL*
-AEXTERNAl*
*EXTERNAL*
"EXTERNAL*
ABSOLUTE
"EXTERNAL*
"EXTERNAL*
ABSOLIJTE
ABSOLUTE
*EXTERNAL*
*EXTERNAL*
·EXTERNAL*
2/55
2/37
4/46
2/35
4/11
2/32
2/22
2/41
2/53
2/39
2/42
9/07
2/40
2/46
2/39
6/38
2/17
2/18
3/15
3/28
2/19
2/60
2/25
2/10
3/11
4/32
5/09
2/3R
3/15
5/57
4/10
6/17
3/43
3/53
3/17
3/42
3/31
3/34
3/22
3/46
3/57
4/09
7/45
6/08
5/47
6/7.6
5/25
3/44
3/56
4/42
3/32
3/36
4/41
6/30
7/19
8/58
08/21/80 00.19.56.
7/49
8/05
7/32
4/54
5/13
6/20
7/56
8/23
8/52
9/16
5/15 L
4/28
4/35
5/36
6/19
5/19
5/20
5/50
7/16
5/30
5/41
6/05
5/55 L
6/04
8/33
8/38
8/48
8/53
9/12
5/49
5/60
6/11 L
R/44
5/44
5/5"
6/09
6/18 L
7/35
8/06
8/27
PAGE
10
l.
l
l
7/26
L
9/04 '-
Q
X
X
X
E
X
Q
X
X
Q
Q
X
L
E
E
Q
E
X
E
X
L
L
7/47
5/28
4/55
5/12
5/17
5/17
4/38
5/39
3/14
6/36
4/23
9/11
8/09
3/45
6/35
7/46
2/58
2/58
3/49
3/54
2/59
3/05
3/26
2/11
6/33
5/35
5/45
6/08
3/18
8/57
4/41
6/31
5/29
5/40
3/20
3/44
3/33
3/36
3/42
3/48
4/0B
4/11
'L
7/31
4/42 l
3/25
9/14 l
7/59
L
3/05
4/17
4/18
5/16 L
8/46
5/46
8/45
l
5/55
Q
L
8/60
I.
l
L
L
l
L
3/35
3/54 L
L
L
0
0
C)
0
CLASS - VER 3.0
1700 ASSEMBLY OF MINT
COMPLETE REfERENCE MAP.
~1I5
0073
MI5A
HJ5AA
MI5B
MI6
MI!l
oono
MI~B
00%
OOF4
MONIT
MOI~E
NLA
NlO
REtA
REtFL
RElFLE
RELFlO
RElfll
HELFL2
RELH3
RHFl4
RELPRT
RELSWP
RELlJP
HELUPA
RESTOR
RP
SIMPRO
SlM200
S,JOB
SLCK
SPR
SPRO
STU
SWAP ON
SWAPPo
SWTCH
S200BS
TlfR
TSCNAC
TSCNMI
Z
ZERO
0079
OOR6
OO~C
00~1
0054
0048
0040
OOF6
00C5
OOBC
OOCO
00C8
00C8
0001
0004
00E7
006A
OOED
OnF8
0099
0001
OOFA
OllA
OOflB
0111
OOfF
ABSOLUTE
*EXTERNAL*
ABSOLIJTE
*EXTERNAL*
Ollll
0037
OORA
OOEI
0037
0129
0015
0029
002E
0036
0022
4/13
5/23
4/26
5/32
4/22
5/43
4/33
2/45
3/06
3/20
4/35
4/21
4/15
8/18
7/21
2/20
7/19
7/20
7/28
7/34
7/37
7/38
4/57
0/11
8/12
2/40
2/54
3/58
2/29
4/44
8/36
8/35
Q
L
E
L
L
X
Q
X
*EXTfRNAL*
*EXTERNAL*
*EXHRNAL*
ABSOLUTE
4/05
2/39
7/52
2/34
2/21
3/24
-;/26
2/28
4/04
2/47
5/18
5/30
5/24
5/35
5/34
5/45
5/48
3/29
3/50
4/47
4/40
4/23
4/27
8/24
7/24
7/15
7/29
7/27
7/30
7/36
7/44
0/09
7/60
8/15
8/26
5/53
7/44
8/33
8/51
4/49
8/41
8/37
8/45
H/43
*EXTERNAL*
0
L
X
4/14
6/37
X
E
L
X
X
L
Q
4/05
4/08
3/33
3/47
3/52
4/20
9/09
00/21/80 00.19.57.
L
l
L
t
5/41 L
L
5/50 L
4/55
5/10
5/26
5/37
5/51
6/06
7/51
8/04
6/11
7/22
7/50
8/13
8/16
8/24
8/58
9/18 L
L
Q
L
L
L
L
L
L
L
L
L
L
L
9/04
5/09 L
8/53 L
L
L
4125
l/5£) L
8/42
5/22
8/47
8/49
9/13
PAGE
11
C)
o
o
o
1700 ASSEMRlY OF lINIV4
STORAGE AllOCATION.
A()('IRESS
LENGTU
0000
0038
0038
CL.ASS - VER 3.0
EXTERNAL SYMBOLS.
LNITV4
08/21/80 00.19.57.
BINARY CONTROL CARDS.
NAM
END
UNIV4
ENTRY POINT NAMES AND ADDRESSES.
INVJNT -- 0033
o
LINI V4 -- 0000
DECK-ID MIl MSOS 5.0
SUMNAR
PAGE
CLASS - VER 3.0
1700 ASSEMnI.Y or LINlV4
]0
15
70
PAGE
2
SUMMARY-lIO lINIV4
LI NI V4
LI N1 V4
LIrnV4
3
4
*
LINIV4
7
*****************************************************
UNIV4 PROCESSES ONLY tINE 1 INTERHUPTS.
*
IF INTERRUPT IS LINE 1.ALL DEVICE LISTED IN
*
LNlTV4 WILL BE CHECKED FOR INTERRUPT STATUS.
*
TilE [lRIVER CONTINUATOR FOR INTERRUPT DEVICE
*
WILL BE ENTER.IF NO DEVICE IN LNlTV4 HAS *
INTEHRUPTEO, A GHOST INTERRUPT MESSAGE IS
*
SCHEDULED, AND COHTROL IS RETURNED TO THE
*
DISPATCIlER.
*
IF HIE INT-ERRUPT IS NOT FROM UNE I A ,JUMP IS
*
MADE TO DEBUG CELL "NOTLNI"(SLS).LINE NUMBER
*
WILL BE IN "Q~.lr STOP SWITCH IS NUT SET.
*
TilE INTERRUPT WILL BE PROCESSED AS AN INVAL. INTERRUPT.
*
LINI V4
UNIV4
1I Nt V4
LINIV4
L1Nl V4
LI NIV4
LI Nl V4
lINIV4
LI Nl V4
1I Nl V4
LINl V4
lINI V4
LINIV4
16
17
18
19
20
21
INVALID INTERRUPTS WILL BE PROCESSED AS
GHOST INTERRUPTS.
LINI V4
U NI V4
23
24
*****************************************************
LINl V4
26
*
*
*
5
08/21/80 00.19.57.
25
*
*
DECK-IV Mll MSOS 5.0
NAM LINlV4
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION. LA JOLLA. CALIFORNIA
COPYRIGIIT CONTROL DATA CORPORATION 1976
2
5
9
10
11
12
13
14
15
30
0000 P
0033 P
ENT LINI V4
ENT INVINT
LINE 1 INTERRUPT PROCESSOR
INVALID INTERRUPT PROCESSOR
*MSOS V4.0 LINt V4
*MSOS V4.0 LINIV4
28
29
EXT LNITV4
EOU [lISP($EA)
EQU ONEO IT ($73)
EOll LPMSK(2)
TABLE OF LINE 1 DEVICES
nOEA
0073
0002
*MSOS V4.0 LINt V4
LINl V4
LINIV4
LINIV4
31
32
33
34
ENTRY I CONTAINS TRAP LOC.
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
.r.MSOS
*MSOS
*MSOS
*MSOS
*MSOS
*Msns
LI Nt V4
LINIV4
LINIV4
LINIV4
LINIV4
UN1V4
LINl V4
LINI V4
LINIV4
LINIV4
LINIV4
lINIV4
LINIV4
LINIV4
LINIV4
lINJV4
LlNIV4
1I Nl V4
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
35
40
45
50
!15
(~-
-~)
poono
POODI
poon2
POOO3
POOO4
POOOS
POO06
POO07
PonOll
POOO9
POOOA
PoonB
poooe
rOOOD
PoonE
pooor
paOlO
POOll
EOFF
OF22
OI1BF
OR14
09FE
0101
If!] 4
60FF
E02F
017A
(/814
0011
0104
E207
0203
A025
0115
Ol1no
LINI V4 LDQORS
INQ
TRO
INA
SAl
JMP*
STALNI
CIfKOEV LO!}*
SQM
TRQ
EORSAl
I
2
-$40
A
-1
LNl-*-l
NOHNI
I
(DEVTAB).l
ENOT-*-l
A
LPMSK+15
CIlKNXT-*-1
U1Q- 7.Q
INP CIIKNXT-*
AND- ONmIT~2
SAN GOT IT -*-1
OIKNXT NOP 0
CONTAINS INTERRIIPT LINE
NUMBER.
CIIECK FOR LI NE 1
SKIP IF LINE I INTERRUPT
LINE NUMBER IN "Q"
Q
PHYTAB AODRESS
SKIP IF END OF lABLE
7FFF MASK
SKIP IF DEVICE NOT PRESENT
HARDWARE AnDRESS
STATUS
SKIP IF INTERRUPT STATIIS
C)
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
V4.0
0
0
0
CLASS - VER 3.0
1700 ASSEMnLY OF LINIV4
5
10
15
20
25
30
35
40
45
POOl2
POOl3
POOl4
POOl5
POOlt)
POOl7
POOl8
POO19
OOFF
I~F4
OCOl
1805
Ell21
C202
60FF
1522
OOIA P
POOIA
POOIB
POOIC
POOlO
54F4
5204
DOlE P
14EA
POOlE
POOIF
POO20
0814
0030
09F5
poon
0131
POO22
P0023
POO?4
POP25
PIl021l
P0027
P0028
r0029
P002A
P002B
P002C
P0020
P002E
POO2F
P0030
0007
F030
480E
CflOR
AOOF
P003l
POO32
4749
0000
P0033
POO34
P003!)
pon36
P0037
POO3A
~030
6805
54F4
4COO
0000
0000
WFC
0002
01l3l P
l4EA
./"'\
U
RI\OJMP*
ENOT ENQ
JMP*
GOTH LllQ*
LOA5TAJMPEQU
*
SCOPRT RTJNUM
AIlC
JMP-
I
CHKOEV
1
SCOPRl
(OEVTAB),I
2,Q
I
($27),1
NOTLtH(*)
PRINT TRQ
INlJ
INA
SAM
UfQ
PRINT3 AOQSTQ*
LOA*
ANOAOOSTA*
rnJNUM
A
$30
-$A
PRINT3-*-1
7
$30
LN
PRINTl
$F
$30
PR INTl
($F4)
$4COO,O,O
~744?B
PAGE
*MSOS V4.0 LINIV4
*MSOS V4.0 IINIV4
L1NI V4
LINI V4
GET PHYTAB ADDRESS
*MSOS V4.0 LINI V4
CONTINUATOR ADORESS
*MSOS V4.0 L1Nl V4
*MSOS V4.0 L1NIV4
JUMP TO CONTINUATOR
*MSOS V4.0 LINIV4
*MSOS V4.0 L1NlV4
LINE 1 INT. RESP. WAS USED
Flm INT. LINES 2-1S,LINE NO. IS IN "Q"
LINI V4
*MSOS V4.0 L1NlV4
*MSOS V4.0 UNIV4
LINIV4
*~1S0S V4.0
*MSOS V4.0 1.1 Nl V4
INCREMENT INOEX
CHECK NEXT DEVICE
GHOST FROM LINE 1
($F4)
$5204
PRINT
(OISP)
PRINT ERROR MESSAGE -GI LINE NO.
RECORO ASCII CODE FOR SPACE
AND LINE NUMBER AT LN
*t1S0S V4.0 LI Nl V4
LINI V4
LINlV4
L1Nl V4
L1Nl V4
LI Nl V4
LI Nl V4
L1Nl V4
LI NI V4
L1Nl V4
LINI V4
LI Nl V4
*MSOS V4.0 LI Nl V4
3
54
55
56
57
58
59
60
61
62
63
64
65
66
67
69
70
71
72
73
74
75
76
77
78
79
80
01
82
AOC GI
JMP- (OISP)
LINI V4
LINI V4
83
84
ALF
NUM
L1Nl V4
LI Nl V4
86
87
LINI V4
LI Nt V4
LINI V4
lINl V4
LINI V4
LI NI V4
1I Nl V4
LI NIV4
89
90
$IRFC,$OO02
I,GJ
$0000
INVALIO INTERRUPT ROUTINE
**
*
INVINT LOQGET LINE NUMBER
QRS 2
INQ -$40
JMP* SCOPRT
USE ·BALANCE OF LINE 1 GI PATH
TABLE OF LINE I OEVICES
OEVTAB AOC LNITV4
END
EOFF
OF22
OOBF
18E3
7FFF X
00.19.57.
LI Nl V4
PRINTl NUM
GJ
LN
0~/21/8(l
STORAGE USEO
MOO ASSEMBL Y
95 STATEMENTS
0.746 SECONDS
19 SYMBOLS
48 REFERENCES
*MSOS
*MSOS
*MSOS
*MSOS
*MSOS
V4.0
V4.0
V4.0
V4.0
V4.0
91
92
93
94
95
96
CLASS - VER 3.0
1700 ASSEMBLY OF LIN1V4
REFERENCE MAP.
08/21/80 00.19.57.
PAGE
4
COI~PLETE
CHJ(DEV
CHKNXT
DEVTAB
OJSP
ENllT
GI
GOTIT
I
JtJ"INT
UII1V4
LtJ
lNl
U'lTV4
LPHSK
NOTLN}
ONEBIT
PRINT
PRINT!
PR1NTJ
SCDPnT
0008
0011
0037
OOEA
0014
0031
0016
OOFF
0033
(1000
0032
0007
OC137
0002
nOlA
0023
001E
OO?D
0023
OOIA
ABSOLUTE
-SYSTEM-
*EXTERNAL*
ABSOLUTE
ABSOLUTE
2/50
2/54
2/50
2/37
2/51
3/36
2/58
2/42
2/33
2/32
3/25
2/47
2/36
2/39
L
Q
E
E
X
Q
3/04
2/56
3/07
3/16
3/05
3/39
3/07
2/49
3/44
2/42
3/40
2/49
3/4R
2/53
2/59 L
3/48 L
3/37
l
L
l
2/60
3/09
3/44
l
l
l
l
2/48
3/11 Q
2/38 0
3/15
3/26
3/22
3/06
2/57
3/19 l
3/29
3/24 L
3/13 l
3/34 L
3/47
o
o
o
1700 ASSEMBLY OF MIPRO
STORAr.E ALLOCATION.
ADDRESS
LENGTH
0000
024A
024A
ClASS - VER 3.0
08/21/80 00.19.58.
RINARY CONTROL CARDS.
NAM
END
MIPRO
MIPROC
OECK-ID N06 MSOS 5.0
ENTRY POINT NAMES AND ADDRESSES.
MIPROC -- 0000
EXTERNAL SYMBOLS.
ClfRSFG
CRIMPT
EQ3644
EI0336
015721
HLIST
E1572
EI572F
E15721
E1573
Fl0336
IU5721
INDACS
LOGIA
MIBX
ODBSIZ
OOEBUG
010336
01572
015721
SCMMLC
SCMM17
SYSCOP
TOFUNC
TMCODE
TMRTYP
TSUTIL
VERIFY
SUMMAR
PAGE
CLASS - VER 3.0
1700 ASSEMBLY or MIPRO
5
*
*
*
*
OR/21/80
00.20.02.
NAM MIPRO
DECK-IV N06 MSOS 5.0
SUMMARY-lIO
MANUAL INTERRUPT RESPONSE HANOLER FOR INPUTS OTHER TIIAN *
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMAll SYSTEMS DIVISION, LA JOLLA, CALIFOImIA
COPYRIGlfT CONTROL DATA CORPORATION 1976
* TIlE PROGRAM BASTCAlf.Y INVOLVES ENTRY FROM MINT (IN
**MSOS
MONITOR) WilEN THE FIRST CHARACTER INPUT AFTER A MANUAl. uMSOS
*
INTERRUPT IS NOT AN *. IF THE INPUT CHARACTER STRING **MSOS
*
IS MATCIfED HI TADLE -FUNCTN-, THE REQUESTED ACTION IS **MSOS
*
TAKEN. IF THE ACTION INVOLVES STARTING OR STOPPINr. A **MSOS
*
TIMER AND A RE\.lHT IS FOUNO, TJlE MESSAGE -TIMER REJECT-*"MSOS
*
UNLINKED, OR nlE INPIIT IS OTlIERWISE IN ERROR, THE
**MSOS
*
MESSAGE. -MI INPUT ERROR IS PRINTED. HIE FOllOWING
**MSOS
*
LIST OF INPUT COUES IS CONSIDERED BASIC TO THE PROGRAM.**MSOS
*
ADIHTIONS TO THIS LIST MAY OE MADE BY IJSERS AS REQUIRED**MSOS
15
20
25
30
35
*
=S
FOR SCHEDULING SYSTEM LIBRARY ORDINAL WITH **MSOS
nlE INPUT FORMAT =SXXX.Y,ZZZZ WIfERE XXX IS**MSOS
TIfE 3-DIGIT DECIMAL ORDINAL NUMBER (NUMBER**MSOS
CORRESPONDS TO DIRECTORY POSITION), Y IS **MSOS
THE HEX PRIORITY FOR EXECUTION, AND ZlZZ **MSOS
IS A JlEX PARAMETER PASSED TO THE PROGRAM **MSOS
IN THE Q-REGISTER.
**MSOS
*
*
SCMM
*
*
*
EF
"*
*
*
EFMM
*
EFllJ
*
40
45
*
*
(~
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
SCHEDULES ON-l.INE SMALL COMPUTER MAINTENANCE**MSOS 4.1** MIPRO
MONITOR (SCMM-17) LOADED UNDER ORDINAL
**MSOS 4.1** MIPRO
NAME SCMM17
**MSOS 4.1** MIPRO
SCHEDIJLES ORDINAL EFLIST TO PRINT
FNr.INEERING FILE DATA FOR ALL LOGICAL
UNITS
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.)** MIPRO
SCHEOllLES ORDINAL EFlIST TO PRINT
ENGINEEIHNG FILE DATA FOR MASS MEMORY
UNITS
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
SCHEDIJLES ORDINAL fFLIST TO PRINT
ENGINEERING FItE DATA FOR SPECIFIED
LOGICAL IINIT
**MSOS 4.1** MIPRO
**MSOS 4.1** MlrRO
**MSOS 4.1** MlrRO
11
12
13
14
15
16
17
21
22
23
24
25
26
27
29
30
31
33
34
35
37
38
39
41
42
43
STARTS SYSTEM HARJ)HARE TIME BASE AS DEFINED **MSOS 4.1** MIPRO
IN SYSOAT
**MSOS 4.1** MIPRO
45
TUFF
STOPS SYSTEM HARDWARE TIHE BASE AS DEFINED HMSOS 4.1*.* MIPRO
IN SYSDAT
.
""*f1S0S 4.1** MIPRO
48
SYSCOP
SCIIEDlILES SYSTEM CHECKOUT PACKAGE LOADED
IINDER ORDINAL NAME SYSCOP
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
51
*
TON
*
*
*
*
55
6
19
FUNCTION
*
*
*
5
**MSOS 4.1** MIPRO
INPUT
*
*
2
3
4
8
9
10
*
*
MIPRO
mPRO
MIPRO
MIPIW
MIPIW
2
MIPRO
MIPRO
MIPRO
fHPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
'It
4.1**
4.1**
4.1**
4.1**
4.)**
4.1**
4.1**
4.1**
4.1**
4.1**
PAGE
*
46
49
52
o
o
CLASS - VER 3.0
]700 ASSEMBLY OF MIPRO
3~
60
LOA[)EIJ**~1SOS
58
61
62
CAUSES TUE CURRENT DATE AND TIME TO BE
**MSOS 4.1**
PRINTED ON TIlE COMMENT UNIT. ROUTINE IS AHMSOS 4.1**
SUB-FUNCTION OF TOFUNC LOADED UNDER
**MSOS 4.1**
ORDINAL NAME TOFUNC.
**MSOS 4.1**
MIPRO
HIPRO
MIPRO
HIPRO
65
66
67
SCUEOULES THE MSOS.VERIFICATION PACKAGE LOADED
UNDEf{ ORDINAL NAME VERIFY.
MIPRO
MIPRU
70
*
TIME
*
*
VERIFY
*
TSUT
SCIIEDULES THE TIMESHARE UTILITY PACKAGE
**MSOS 4.1** MIPRU
LDADED UNDER ORDINAL NAME TSUTIl. nus IS**MSOS 4.1** MJPRO
A PART OF TIE TIMESUARE 1.0 PRODUCT.
**MSOS 4.1** MIPRO
73
74
*
*
*
DACS
SCIIEDULES TUE DATA ACQIIISITION AND CONTROL **MSOS 4.1** MIPRO
SUBSYSTEM LOADED UNDER ORDINAL NAME INDACS**MSOS 4.1** MIPRO
TUIS IS A PART OF TilE AUTRAN 2.0 PRODUCT. **MSOS 4.1** MIPRO
76
77
*
*
WRON,llJ ENABLE TUE WRITE RING FEATURE ON TJlE MAr. TAPE
SIMULATOR SPECIFIED BY LU.
MIPRO
MIPfW
80
*
WROF-,LU DISABLE TUE WRITE RING FEATURE ON TUE MAG TAPE
SIMULATOR SPECIFIED BY LU.
MIPRO
MIPRO
83
*
*
*
*
QIJESTION MARK----- SCUEDlILES GORE RESIDENT PROGRAM CRIMPT
TO INITATE IMPORl PACKAGE THIS IS A
PART OF THE IMPORT PRODUCT
HIPRO
MIPRO
MIPRO
86
*
*
*
*
30
ALLOWS TUE USER TO ENTER A NEW DATE AND
**HSOS 4.1** MIPRO
TIME. ROUTINE IS A SUB-FUNCTION OF TDFUNC**HSOS 4.1** MIPRO
LOADED UNDER ORIHNAL NAME TDftlNC.
**MSOS 4.1** MIPHO
STOPS ON-LI tiE DEBUG PACKAGE BY CLEAR ING
CURSFG IN SYSOAT
*
2~
57
ox
*.
20
**MSOS 4.1** MIPRO
**HSOS 4.1** H[PRO
*
DATE
3
54
55
STARTS ON-LINE OEBIIG PACKAGE, ODEBUG,
tiNDER OR[H NAL NAME ODEBUG.
*
PAGE
4.1** MIPRO
uMSOS 4.1 ** HI fifW
DB
*
. *
00.20.07.
08/21/~0
*
*
15
o
64
69
72
78
81
84
87
88
CLASS - VER 3.0
1700 ASSEMBLY OF MIPRO
5
10
15
70
30
*
*
*
*
WORDS 0-1
*
*
*
*
WORD 2
*
*
*
*
*
*
A MNEMONIC CODE WHICH MAY CONTAIN
2-4 CHARACTERS. UNUSED CHARACTERS
MUST OE SPACES. ANY LEGAL ASCII
CODE MAY BE USED BUT A SPACE.
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
MIPRO
MIPRO
MIPRO
MIPRO
THE RELATIVE DISTANCE BETWEEN THE **MSOS
LABEL JMP AND ANY DESIRED FUNCTION**MSOS
PRE-PROCESSOR. IF A DATA STRING **MSOS
FOLLOWS THE MNEMONIC, THE PRE**MSOS
PROCESSOR MAY BE USED FOR ITS
**MSOS
ANALYSIS. IN THIS CASE, THE
**MSOS
ADDRESS OF TilE INPUT BUFFER IS
**MSOS
CONTAI~ED IN LOCATION, QSAVE. IF
**MSOS
NO PRE-PROCESSING IS REQUIRED,
**MSOS
CONTROL SH«ILD BE PASSED TO LABEL,**MSOS
GETIND.
**MSOS
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
MIPRO
MIPRO
MIrRO
MIPRO
MIPRO
MIrRO
MIPRO
MIPRO
MIPRO
MlrRO
MIrRO
90
91
92
94
95
96
97
99
100
101
102
103
104
105
106
107
108
109
WORD 3
A SCHEDULER CAll (SYSCUD TYPE) FOR THE
OESIRED PROCESSOR
MIPRO
MIPIW
111
112
*
*
WORD 4
AN INDEX TO THE ORDINAL TABLE (ORDTBL)
SET TO $FFFF IF NO ORDINAL
MIPRO
MIPRO
115
*
WORD 5
*
THE PARAMETER TO BE PASSED TO THE **MSOS 4.1** MIrRO
PROCESSOR PROGRAM IN THE Q**MSOS 4.1** MIPRO
REGISTER.
**MSOS 4.1** MIPRO
* EACH ENTRY IN THIS TABLE MUST CONTAIN SIX WORDS EVEN IF
*
LESS ARE USED. A SAMPLE ENTRY FOLlOWS...
40
45
4
*
*
*
35
PAGE
* TIlE TABLE -FUNCTN- CONTAINS A 6-WORD DATA BLOCK FOR EACU **MSOS 4.1** MIPRO
*
PARAMETERIZED INPUT MNEMONIC. TUE DATA BLOCK IS
**MSOS 4.1** MIPRO
*
DEFINED AS FOLLOWS...
**MSOS 4.1** MlrRO
*
25
08/21/80 00.20.02.
*
*
*
*
*
*
*
*
*
ALF 2,SAMPLE
Anc PREPRO-JMP
NUM $240X
NUM
X OR $FFFF
NUM
XXX X
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
MNEMONIC NAME
**MSOS
INCREMENT FROM PRE-PROCESSOR TO **MSOS
JMP LABEL
**MSOS
SYSTEM SCHEDIJLER CALL AT PRIORITY
X.
**MSOS
WHERE X IS THE INDEX TO TABLE ORDTBL
$FFFF IS lISED IF NO ORDINAL REQUIRED
PARAMETER TO BE PASSED IN THE Q- **MSOS
REGISTER.
**MSOS
o
4.1** MIPRO
4.1** MIPRO
4.1** MIPRO
MIPRO
4.1** MIPRO
MIPRO
MIPRO
4.1** MIPRO
4.1** MIPRO
114
117
118
119
121
122
124
125
126
127
128
129
130
131
132
o
c)
0
0
ClASS - VER 3.0
1700 ASSEMBLY OF MIPRO
5
oono P
*
PROGRAM ENTRY POINTS
ENT MIPROC
* PROGRAM
EXT
EXT
EXT
EXT
EXT
EXT
}(l
EXr
15
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
7.0
7.5
30
35
EXT
40
0002
0012
0023
0022
115
0025
0044
OOEA
OOF4
* PROGRAM
EOll
EQU
EQU
EQU
EQU
EQU
EQU
EQU
TRANSFER ADDRESS
OA/21/80 00.20.02.
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS
EXTERNAL POINTS
**MSOS
TABLE OF P.D.T. ADDRESSES
LOGIA
MANUAL INTERRUPT BUSY FLAG
**MSOS
MIBX
**MSOS
ODEBUG ACTIVE FLAG
ClfRSFG
SCMM-17 ACTIVE FLAG
SCMMLC
SYScop
SYSTEM CHECKOUT ORDINAL
**MSOS
ODEBUG
ON-LINE DEBUG ORDINAL
**MSOS
ON-LINE DEBUG OVERLAY SIZE
ODBSfz
ENGINEERING FILE LIST ORDINAL
**MSOS
EHIST
**MSOS
TIME/DATE FUNCTION ORDINAL
TDFUNC
MSOS VERIFICATION ORDINAL
VERIFY
**MSOS
TIMESHARE UTILITIES ORDINAL
TSUTIL
IN()ACS
DACS ORDINAL
**MSOS
**MSOS
SCMM ORDINAL NAME
SCMM17
TMrnyp
**MSOS
TIMER TYPE DESIGNATOR
**MSOS
TIMER TYPE COOE
TMCODE
**MSOS
1572-1 HISTORY WORD
J115721
**MSOS
1572 BASIC W,E,S WORD
E1572
FUNCTION CODE TO ENABLE 1572
**MSOS
E1572F
1572 OSCILLATOR FREQ./CLOCK FREQ. **MSOS
01572
**MSOS
1573 BASIC W,E,S WORO
E1573
1572-1 BASIC W,E,S WORD - FUNCTION**MSOS
E15721
**MSOS
1572-1 BASIC W,E,S WORD - DATA
015721
**MSOS
SRG TIME BASE/CLOCK FREQ.
015721
**MSOS
FUNCTION CODE FOR COMM. MIJX
EQ3644
10336-1 BASIC W,E,S WORD
EI0336
10336-1 CLOCK REGISTER VALUE
01033fl
ENARLE 10336-1
Fl0336
IMPORT INPUT ENTRY
CRIMPT
EQUIVALENCES
LPMSK(~2)
NZERO($12)
ONEB IT ($23)
ZERO($22)
Fotm( $25)
SIX($44)
ADISP($EA)
AMONI($F4)
RIGIIT JUSTIFIED MASKS
LEFT JUST~FIED MASKS
SINGLE BIT MASKS
CELL CONTAINING ZERO
CELL CONTAINING FOUR
CELL CONTAINING SIX
ADDRESS OF DISPATCHER
ADDRESS OF MONITOR
PAGE
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
5
134
135
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
4.1** MIPRO
4.1** MIPRO
4.1** MIPRO
4.1** MIPRO
4.1** MIPRO
4.1** MIPRO
4.1**MIPRO
4.1** MIPRO
4.1** MIPRO
167
168
169
170
171
4.]**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
172
173
174
175
CLASS - VER 3.0
1700 ASSEMOLY or MIPRO
5
MIPRO ENA
STASTA*
STQ*
STQ
0
I
ISAVE
QSI\VE
QDACS
POOOO
ponOJ
POOO2
poon3
rnOO4
OAnO
60FF
68413
4R49
4ROO
POO06
POO07
POOO8
POOOA
PODOll
POODC
poooo
POOOE
PonOF
ponto
POOlI
Ponl?
C622
AOIA
BOOO
0119
C806
BOll
1829
54F4
5206
7FFF X
lROO 0111
CHECK FOR QUESTION
LOA- (ZEIW) ,0
ANO- NZERO+8
EOR =N$3FOO
SAN REPEAT
LOA* IMPT
EOR- LPMSK~15
SAN Qsnu
JMP* JMP
QSKEO RTJ- (AMONI)
NUM $5206
IMPT AOC CRIMPT
JMP MIOONE
POO14
POOl5
POOHi
POOl7
POOl8
EA3A
Cf)?2
9938
OInl
IA21
REPEAT I.OQ*
LDASUIl*
SAZ
JMP*
QSAVE
(ZERO),Q
FIlNCTN. I
CIIAR2
NEXT
POO19
prOIA
prOIC
POOIO
POOlE
PoolF
C936
9000
0113
COFF
6R20
181A
C92F
AOOA
09DF
0110
C201
OFCR
CHAR2 LOA*
SUB
SAN
LOASTA*
JMP*
NOT2 LOA*
ANOINA
SAN
LDAALS
LOQ*
QRS
LRS
STA*
LOQ*
LOA*
SUR-
FUNCTN+l,I
=A
NOT2
I
FOUN02
NEXT
FUNCTN+l.I
LPMSK+8
-$20
CUAR4
I.Q
8
FUNCTN+ 1• J
00A2
]0
*
15
70
25
3FOO
nl11
30
35
POOl~O
POO21
poon
40
45
50
5!l
POOl~3
POON
POO25
POO26
P0027
POO2n
POO29
POO?A
P002B
P002C
POO20
rOME
P002F
PP03(1
P0031
POr3?
Pon33
POO34
P0035
0
EQ?9
OF28
OF6R
6926
F822
C924
9201
011B
COFF
2020
SI\N
8
8
FlfNCTN+ 1, I
QSAVE
FUNCTN+I,I
1.Q
NEXT
I
FOlfNP3
NEXT
FIINCTN+ I, I
I,Q
NEXT
C91E
9?OI
0115
L[lASTA*
,IMP*
CUM4 LO/\ *
SUBSAN
(9](
OtlfE
FOliNO LOA"* FUNCTN+2. I
INA -]
fiRIB
1~09
OO/21/AO 00.20.02.
**MSOS
**MSOS
**MSOS
SAVE LOCATION OF INPUT CHAR BUFFER**MSOS
SAVE INPUT BUFFER LOC IF OACS ENT *·MSOS
6
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
177
]78
179
IBO
181
MIPRO
183
MIPRO
MIrRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
185
186
187
188
189
190
191
192
193
194
195
MIPRO
MIPRO
MIPRO
MIrRO
MIPRO
197
198
199
200
201
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
IS THIS A 2 CHARACTER INPUT
**MSOS 4.1** MIPRO
NO
SAVE INDEX TO 2 CHAR INPUT MATCH **MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
CONTINUE TO SEE IF 3 OR 4 CHAR
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
NO, IS IT 3 CHARACTERS
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
NO, IT IS 4 CHAR.
**MSOS 4.1** MIPRO
3 CHARACTER INPUT
MERGE HIE 4TH CHAR OF HIE INPUT **MSOS 4.1** MIPRO
WITH HIE 3RO CHAR OF lifE FUNCTION" **MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
SEE IF THREE CHAR MATCH
**MSOS 4.1** MIPRO
*·MSOS 4.1** MIPRO
SKIP Ir NO MATCfI
**MSOS 4.1** MIPRO
SAVE INOEX TO 3 CHAR MATCH
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
SEE IF SIMILAR 4 CIIAR MATCH
**MSOS 4.1** MlrRO
DO HIE SECOND SET OF CUI\R MATCH **MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
NO
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
728
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
230
231
INITIALIZE INDEX
4.1**
4.1**
4.]**
4.]**
4.1**
PAGE
MARK ENTRY FOR IMPORT
LOOK AT FIRST CHARACTER
mPlw
CHECK FOR QUESTION MARK
SKIP IF NOT
CHECK IF IMPORT HANDLER LINKED
NOT LINKED-ERROR
SCHEDULE IMPORT HI\NDLER
PASS BUFFER AODRESS IN Q-REG.
EXIT MIPRO
PICKUP FIRST 2 CHAR INPUT
00 ntH MATCH
YES
NO, TRY AGAIN
YES, PROCESS TIlE REQUEST
0
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
4.1**
HJ4
0
o
CLASS - VER 3.0
1700 ASSEMBLY OF MIPRO
P0036
llR02
P0037
11100
0164
JMP
STA* JMP+l
JMP ERROR
o
08/21/80 00.20.02.
PAGE
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
7
232
233
ClASS - VER 3.0
17ro ASSEMBLY OF MIPRO
0121
1804
RAO*
LOA*
MUISTASUB*
SAP
JHP*
ISAVE
ISAVE
SIX
I
MAX
FINI
REPEAT
2(1
P0040
POO41
POO42
r0043
P0044
P0045
POO46
POO47
P004A
EOOC
C809
0132
60FF
lAEF
C806
0131
ltWB
1800
LOQ*
LOA*
SAM
SMAll STAJMP*
TRY2 lOA*
SAM
JMP*
GERROR JMP
QSAVE
FOUN03
TRY2
I
FOIJND
FOUND2
GERRORo
SMAll
ERROR
2!i
P004A
P004B
P(l04C
P0040
FFFE
FFFE
0000
0000
FOUND3
FOUND2
QSAVE
ISAVE
-1
-1
0
0
5
10
15
o
POO39
POO3A
P003B
POO3C
P0030
P003E
P003F
Ofll4
CA13
2044
6OFF
NEXT
9fl77
FINI
0153
NIJM
NIIM
NUM
NlJM
08/21/80 00.20.02.
PAGE
0
ARE WE THROUGH
YES
NO. TRY AGAIN
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
MIPRO
MIrRO
MIPRO
MIPIW
MIrRO
MIPRO
MIPRO
236
237
238
239
240
241
242
SEE IF 3 CHAR MATCH FOUND
SKIP IF NOT
SETUP MATCH INDEX
PROCESS INPUT
SEE IF 2 CHAR MATCH
SKIP IF NO
PROCESS INPUT
IllEGAL REQUEST
*·MSOS
**MSOS
*·MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
244
245
246
247
248
249
250
251
252
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
MIPRO
MIPRO
MIPRO
MIPRO
254
SET UP FOR NEXT GROUP
o
255
256
257
0
0
0
CLASS - VER 3.0
1700 ASSEMBLY OF MIPRO
5
]0
]5
20
25
30
45
**MSOS 4.1** MIPRO
MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
260
261
262
263
SMAll COMPUTER MAINTENANCE MONITOR**MSOS 4.1** MIPRO
265
SCMM17
**MSOS 4.1** MIPRO
MIPRO
MIPRO
**MSOS 4.1** MIPRO
266
267
268
269
EF lIST filL UNITS
**MSOS 4.1** MIPRO
271
**MSOS 4.1** MIPRO
MIPRO
MIPRO
**MSOS 4.1** MIPRO
272
273
274
275
**MSOS 4.1** MIPRO
277
**MSOS 4.1** MIPRO
MIPRO
MIPRO
**MSOS 4.1** MIPRO
278
279
280
281
**MSOS 4.1** MIPRO
283
**MSOS 4.1** MIPRO
MIPRO
MIPRO
**MSOS 4.1** MIPRO
284
285
286
287
**MSOS 4.1** rllPRO
289
**MSOS 4.1** MIPRO
MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
290
291
292
293
**MSOS 4.1** MIPRO
295
**MSOS 4.1** MIPRO
mPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
296
297
298
299
FUNCTN fllF
flOC
NUM
NIJM
NtJM
EQUfllS-JMP
$2404
$FFFF
0
P0054
P0055
POO5ti
P0057
pn058
P0059
5343
4040
0185
7404
0000
0000
AlF
2,SCMM
AOC
NtlM
NtJM
NIIM
SCMM-JMP
$2404
0
0
P(l05A
P005R
P005C
POOSO
POOSE
P005F
4546
2020
0004
2404
0001
0000
AlF
2,EF
P0060
P0061
POOfi2
P0063
P0064
P0065
4546
4040
0004
2404
0001
0002
AlF
2,EFMM
AOC
NIJM
NUM
NUM
GETINO-JMP
$2404
1
2
[FLIST
P0066
P0067
POOf;8
POO()9
POOtiA
P006B
4546
4C55
00D4
2404
AtF
2,EFLU
EF LIST SPECIFIED LU
POOfiC
P0060
POO(lf
P006F
P0070
POO71
544F
4E20
008fi
2404
FFFF
00110
AlF
poon
544F
4646
OOFA
2404
FFFF
0000
ALF
2, TOFF
AOC
NUM
NUM
NIIM
MOTIME-JMP
$2404
$FFFF
0
oom
0001
AOC GETINO-JMP
NUM $2404
NlIM 1
NUM 1
2,TON
9
259
3053
2020
019F
2404
FFFF
0000
flOC GETINO-JMP
NUM $2404
NIlM 1
NUM 0
PAGE
M]P~O
=S SCHEDULE ORDINAL
P004E
P004F
P0050
P0051
P0052
POO53
35
40
2,=5
08/21/S0 00.20.02.
EFLIST
EF LIST MflSS MEMORY
EFlIST
START TIMER
AOC TlMER-JMP
NIlM $2404
NtJM $FFFF
NIlM a
**MSOS 4.1**
50
55
POO73
POO74
POOlS
P007fi
POO77
STOP TIMER
CLASS - VER 3.0
1700 ASSEMnlY OF MIPRO
5
15
20
SYSTEM CHECKOUT
P(l(l7R
POO79
POn7A
POO71l
POOle
POO7D
5359
5343
0004
2404
0002
0000
AlF
2,SYSCOP
ADC
NUM
NIJM
NlIM
GETIND-tJMP
$2404
2
0
SYSCOP
P007E
f'OO7f
POOAO
POORI
POOA2
POOR3
4442
2020
018F
2404
0003
AlF
2,OS
START ODEBUG
POOR4
POOR5
POORIl
POOR7
POOR8
PO(lR9
4458
2020
019A
2404
FFFF
0000
POORA
POORS
10
ADC DS-JMP
NlJM $2404
NlJM 3
NUM 0
ODESUG
AlF
2,OX
STOP OOEBUG
ADC
NlIM
NlIM
NUM
OX-JMP
$2404
$FFFF
0
AlF
2,IlATE
ADC
NlIM
NIIM
NlIM
GETINn-JMP
$2404
4
1
TOFtINC
POO~F
4441
5445
0004
2404
0(l04
0001
P0090
POOQ)
P0092
P0093
POOQ4
P0095
5fi45
5249
0004
2404
0005
0000
AlF
2,VERIFV
MSOS VERIFICATION
P0096
5449
4045
0004
2404
0004
0002
onon
08/21/~0
00.20.07..
PAGE
10
*·MSOS 4.1** MIPRO
301
**MSOS 4.1*k MIPRO
MIPRO
MIPRO
**MSOS 4.1** MIPRO
307.
303
304
305
**MSOS 4.1** MIPRO
307
*~MSOS
4.1** MIrRO
MIPRO
MIPRO
**MSOS 4.1** MIPIW
308
309
310
311
**MSOS 4.1** MIPRO
313
**MSOS 4.1** MIPRO
MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
314
315
316
317
**MSOS 4.1** MIPRO
319
**MSOS 4.1** MIPRO
MIPRO
MIPRO
**MSOS 4.1** MIPRO
320
321
322
323
MIPRO
325
MIPRO
MIPRO
MIPRO
MIPRO
326
327
328
329
**MSOS 4.1** MIPRO
331
**MSOS 4.1** MIPRO
MIPRO
MIPRO
*~MSOS 4.1** MIPRO
332
333
334
335
**MSOS 4.1** MIPRO
337
**MSOS 4.1** MIPRO
MIPRO
MIPRO
**MSOS 4.1** MIPRO
338
339
340
341
75
PO(lf~C
30
POORn
POflflE
3!i
40
45
POO~}]
P0098
P(l099
P009A
P009S
ADC GET I NO-Jt-1P
NUM $2404
NIJM 5
NlJM 0
AlF
2, TIME
ADC GETINO-JMP
NlIM $2404
Nm1 4
NlIM 2
ENTER DATE/TIME
VERIFY
PRINT CURRENT DATE AND TIME
TOFUNC
50
55
()
P009C
P009D
P009E
P009F
pnOAO
POOAl
5453
5554
0004
2404
OOOfl
noon
AlF
2,TSlIT
Aoe GETINO-JMP
NUM $2404
NlIM f)
NIJM 0
TIMESHA~E
TSUTIL
0
UTILITIES
0
0
0
ClASS - VER 3.0
1700 ASSEMBLY OF MIPRO
5
10
1!l
20
0
ALF
2,OACS
POOA2
POOA3
POOA4
POOA5
POOA6
POOA7
4441
4353
00114
2407
0007
0000
POOAS
POOA9
POOAA
POOAR
POOAC
POOAO
5752
4F4E
0130
2402
FFFF
0000
ALF
POOAE
PonAF
POMO
P(lOB1
P(lOB2
POOS3
5752
4F4fi
0132
2402
FFFF
0000
ALF
2,WROF
ADC
NIIM
NUM
NUM
WRNGOF-JMP
$2402
$FFFF
0
POOB4
POOB5
POOB6
POOB7
POOO8
POOB9
POOOA
POOBn
OOfifi
ADC
NUM
NUM
QOACS NUM
GETINO-JMP
$2407
7
08/21/80 00.20.02.
OACS
INDACS
0
2,WRON
ENABLE WRITE RINft
AOC WRNGON-JMP
~UM
$2402
NUM $FFFF
NlIM 0
nISABLE WRITE RING
PAGE
11
**MSOS 4.1** MIPRO
343
**MSOS 4.1** MIPRO
MIPIW
~1I PRO
**MSOS 4.1** MIPRO
344
345
346
347
MIPHO
349
MlrRO
MIPRO
MIPRO
~'IPRO
350
351
352
353
MIPRO
355
MIPRO
MIrRO
MIPRO
MIPRO
356
357
358
359
**MSOS 4.1** MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPHO
MIPIW
MIPRO
361
362
363
364
365
366
367
368
369
1I!l
30
35
poonc
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
X
X
X
X
X
X
X
X
MAX
AOC *-FUNCTN
OROTBL ADC SCMM17
ADC . EHIST
ADC SYSCOP
ADC ODEBlIG
ADC TOFUNC
ADC VERIFY
ADC TSUTIL
ADC INDAr.S
FUNCTION TABLE SIZE
ORDINAL TABLE FOR MNEMONICS
CLASS - VER 3.0
1700 ASSEMBLY OF MIPRO
5
In
15
20
25
ponno
POOBF
POOCO
Pooel
Pooe2
Pooe3
POOC4
pones
POOC6
POOC8
POOCA
EOOO
E201
C200
0901
0103
C200
POOCR
PooCC
lA73
procn
POOCE
pnocr
poono
POOlll
POOU2
UHO
lA14
lAIE
1820
lA30
lED 0
POOD3
POOD5
POOD7
POOOO
POOO9
POODB
POODC
E400
C400
0353
OOFE
C400
034F
1848
PoonD
PO(lPF
POOEO
POOEI
E400
ODH
r.032
IflF9
7FFF X
MIl
6200
EOOO
4400
1AOI
7FFF X
7FFF X
30
3~
1~07
40
45
7FFF X
7FFF X
7FFF X
50
55
()
\_/
7FFF X
08/21/80 00.20.03.
PAGE
**MSOS 4.1** MIPRO
TIMER INITIATION CODING
*
**MSOS 4.1** MIPRO
*
TIMER STARTING SEQUENCE IS BASEll ON TilE TIMER TYPE **MSOS 4.1** MIPRO
*
**MSOS 4.1** MIPRO
CODE
TYPE
*
**MSOS 4.1** MIPRO
0
NONE
*
**MSOS 4.1** MIPRO
1
1572
*
**MSOS 4.1** MIPRO
2
1573
*
**MSOS 4.1** MIPRU
3
1572-1 LST
*
**MSOS 4.1** MIPRO
4
1572-1 SRG
*
**MSOS 4.1** MIPRO
5
364-4 COMM. MUX.
*
**MSOS 4.1** MlrRO
6
PSEUDO
*
MIPIW
7
10336-1
*
**MSOS 4.1** MIPRU
*
**MSOS 4.1** MIPRO
*
**MSOS 4.1** MIPRO
TIMER LOO =XLOGIA
**MSOS 4.1** MIPRU
LOQ- 1,0
**MSOS 4.1** MIPRO
LOA- 13,0
**MSOS 4.1** MIPRO
IS THERE A SWAP TIME DEFINED
INA 1
**MSOS 4.1** MIPRO
NO
SAl TIMERI
**MSOS 4.1** MIPRO
LOA- 13,0
**MSOS 4.1** MIPRO
RE-ENABLE CORE SWAP DELAYS
ANO- LPMSKt15
**MSOS 4.1** MIPRO
STA- 13,0
**MSOS 4.1** MIPRO
TIMERI LOO =XTMCODE
**MSOS 4.1** MIPRO
RESTORE HIE TIMER TYPE CODE
STQt TMRTYP
**MSOS 4.1** MIPRO
GO TO VECTOR FOR JUMP
JMP* TIMVCT,Q
**MSOS 4.1** MIPRO
*
**MSOS 4.1** MIPRO
TIMER PROCESSOR VECTOR TABLE
*
**MSOS 4.1** MIPRO
*
**MSOS 4.1** MIPRO
o = NO TIMER
TIMVCT JMP* VCTTIM
**MSOS 4.1** MIPRO
1 = 1572
JMP* T1572
**MSOS 4.1** MIPRO
2 = l!i73
JMP* T1573
**MSOS 4.1** MIPRO
3 = 1572-1 LST
JMP* T72LST
**MSOS 4.1** MIPRO
4 = 1572-1 SRG
JMP* T72SRG
**MSUS 4.1** MIPRO
5 = 364-4 COMM. MUX.
JMP* 13644
**MSOS 4.1** MIPRO
6 = PSEUDO TIMER
JMP* PSEUDO
MIPIW
7 = 10336-1
JMP* Tl0336
**MSOS 4.1** MIPRO
*
**MSOS 4.1** MIPRO
1572 TIMER STARTING CODE
*
**MSOS 4.1** MIPRU
*
**MSOS 4.1** MIPRU
FUNCTION CODE
T1572 LOQ. [1572
**MSOS 4.1** MIPRO
ENABLE 1572
LOA+ [l572F
**MSOS 4.1** MIPRO
OUT REJ-*
DATA CODE
**MSOS 4.1** MIPRO
INQ -I
**MSOS 4.1** MIM~U
REGISTER COUNTS
LOA+ 01S7l
**MSOS 4.1** MIPRO
TOUT OUT REJ-*
MIPRO
EXIT
JMP* MIOONE
**MSOS 4.1** MIPRO
*
**MSOS 4.1** MIPRO
1573 TIMER STARTING CODE
*
**MSOS 4.1** MIPRO
*
**MSOS 4.1** MIPRO
FUNCT ION COilE
T1573 lDQt [1573
MIPRO
INQ -1
**MSOS 4.1** MIPRO
${WOO = ENABLE
LOA- ONEB ITt 15
GO TO OUTPUT
**MSOS 4.1** MIPRO
JMP* TOIIT
**MSOS 4.1** MIrRO
*
**MSOS 4.1** MlrRO
*
1!l72-J LST STARTING CODE
**MSOS 4.1** MIPRO
*
0
12
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414 .
415
416
417
418
419
420
421
422
423
424
425
426
0
0
0
0
1700 ASSEMBLY OF MIPRO
5
10
15
20
POOE2
POOE4
POOE5
POOHi
POOE8
POOE9
POOEB
POOEC
E400
OA3C
0500
A400
0902
6400
0400
1flEE
POOEn
POOEF
P(lOFO
POOF1
POOF3
POOF4
POOF6
POOF7
POOFE'
P(lOFA
E400
OM7
0500
MOO
0910
6400
0400
0333
E400
e400
18DE
pooro
POOFF
P0100
E400
OA06
HUlA
P010l
1820
POI02
pOI04
PO}06
POI07
PO}08
PO}OA
E400
C400
0324
OOFE
C400
18110
poorc
7FFF X
7FFF X
00E7 X
00E3 X
OOEA X
00F2 X
7FFF X
7FFF X
?5
30
7FFF X
35
40
7FFF X
7FFF X
7FFF X
CLASS - VER 3.0
08/21/flO 00.20.03.
FUNCTION CODE
T72LST LDQ+ E15721
AND MASK FOR SRG FUNCTION BITS
ENA $3C
I IN 0
AND+ B15721
2 = ENABLE INTERRUPT
INA 2
STA+ B15721
RESTORE HISTORY WORD
EIN 0
GO TO OUTPUT
JMP* TOUT
*
1572-1 SRG STARTING CODE
*
*
FUNCTION CODE
T72SRG lOQ+ E15721
AND MASK FOR LST FUNCTION BITS
ENA $27
I IN 0
ANO+ H15721
$10 : ENABLE INTERRUPT
INA $10
RESTORE HISTORY WORD
STA+ H15721
EIN 0
OUT REJ-*
DATA CODE
LOQ+ 015721
REGISTER COUNTS
LOA+ 015721
GO TO OUTPUT
JMP* TOUT
*
364-4 COMMUNICATIONS MUX. TIMER
*
*
FUNCTI ON CODE
T36114 lOQ+ EQ3644
6 = ENABLE INTERRUPT
ENA 6
GO TO OUTPUT
JMP* TOUT
*
PSEUDO TIMER
*
*
PSEUDO JMP* PFJl
*
10336-1 TIMER START CODE
*
*
TI0336 LOQ+ E10336
FUNCTION CODE
ENABLE
LDA+ Fl0336
OUT RE,J-*
DATA CODE
INQ -1
LDA+ 010336
CLOCK REGISTER VALUE
J~'P* TOllT
PAGE
**MSOS 4.1** MIrRO
MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIrRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIrRO
MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
MIPIW
MIPRO
MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPIW
MIPRO
13
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
CLASS - VER 3.0
1700 ASSEMBLY OF MIPRO
*
MAKE SYSTD1
~IRECTORY
00/21/00 00.20.03.
SCI/EOULER CALL If PROGRAM SUPPLIED
PAGE
14
MIPRO
469
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPIW
MIPRO
MlrRO
MIPRO
MIPRO
MIPIW
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
4B6
487
488
MIPRO
490
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
492
493
494
495
496
497
498
499
500
5
10
15
POlOB
POI 011
POIOF
POlIO
P(ll))
PO)13
PO]}5
P0116
POl17
POlIO
P01l9
20
25
POlIA
POIIC
POIIE
POI IF
POl21
P0122
POl23
E900
(AOO
BOll
0112
IPOO
CAOO
(lROE
(JR22
fOEB
C204
0117
1800
C900
6804
E900
54F4
5204
0000
Ff45
fFAh
OrM
FFAO
0081
FF33
FF32
*
30
POl;~4
35
Pnti!5
POl i'7
POIl'8
POl?9
POl?A
40
o
GETINO LOQ
LOA
EORSAN
,JMP
GETl LOA
STA*
TRA
ADQlDASAN
GETERR Jt~P
GET2 LOA
STA*
LDQ
SCHORP RTJCALL NlJM
ADC
POll'S
P(l)t'C
P012E
P0130
OAOO
6400
54F4
1901
FE07
OBOO
OAOO
6400
COOO
1fl6E
7FFF X
OOC9 X
OOOE
GET ORDINAL INDEX
FtlNCTN-f4,I
GET ORDINAL
ORIlTBL,Q
LPMSK+15
SKIP If ENTRY PRESENT
GETl
ERROR
GET ORDINAL
OROTBL,Q
STORE ORDINAL IN SCflEDULER CALL
CAlI.i)
Q
$EB
HAS TIlE ORDINAL BEEN LOADED
4,Q
YES
GF.T2
PROGRAM IS UNLINKED OR NOT LOADED
ERROR
fUNCTN+3,1
SET THE LEVEL OF THE PROGRAM
CALL
OBTAIN THE PARAMETER TO PASS
FUNCTN+5,I
SCHEDULE REQUESTED PROGRAM
(AMONI)
$5204
0
EXIT PATH FROM MIPRO
MIDONE ENA 0
STA+ MIBX
RTJ- (AMONI)
LIST NUM $1901
ADC (MIPRO-LIST)
REJECT EX IT
*
REJ
NOP 0
ENA 0
STA+ TMRTYP
REJI LOA =XMSG2-REF
JMP* STORIT
CLEAR BUSY fLAG IN MANINT PROGRAM
RELEASE CORE AND EXIT
INOICATE NO TIMER
TO PRINT -TIMER REJECT-
()
**MSOS 4.1**
**MSOS 4.1**
*MSOS V4.0
**MSOS 4.1**
501
502
o
0
0
0
CLASS - VER 3.0
]700 ASSFMBLY OF MIPRO
5
10
15
POI31
POI33
P0134
POl35
POI36
POI37
P0138
P013A
P013B
P0130
EOOO
E201
C20D
A011
B032
620D
EOOO
OAOO
0400
]AOI
OOBE X
POI3E
P013F
POI40
POl 41
P0142
POl1\3
POI44
P0145
18ER
1807
180A
lAOE
P0l46
P0148
POI49
E400
C031
1891
0004 X
P014A
P014C
P0l40
P0l4E
E'lOO
OOH
C031
188C
OOOE X
P014F
POl51
E400
OA38
0500
1\400
MOO
0400
lnP2
OOEE X
00C7 X
0120 X
20
25
]P]7
lI~]F
1PBC
1818
30
35
40
45
POl~2
50
POl53
POIS5
POl57
POI58
OOF5 X
0154 X
TIMER TERMTNATION COOING
*
*
TIMER TERMINATION SEQUENCE IS BASED ON TIMER TYPE
*
AS DEFINEIl ABOVE
*
*
MOTIME lOQ ;:XLOGIA
lOQ- ItQ
LOA- l3.ll
AND- lPMSK+I5
DISABLE DELAYED CORE SWAPS
EOR- ONEBIT+ 15
5TA- l3 t Q
lDQ ;:XTMCODE
ENA 0
INDICATE NO TIMER
STA+ TMRTYP
GO TO VECTon FOR JUMP
JMP* VCTTIM,Q
*
STOP TIMER PROCESSOR VECTOR TABLE
*
*
o ;: NO TIMER
VCTTIM JMP* REJ
1 ;: 1572
JMP* N1572
2 = 1573
J~'P* NI573
3 = 1572-1 lST
Jr1P* N72LST
4 = 1572-1 SRG
JMP* N72SRG
5 = 364-4 COMM. MUX.
JMP* N3644
6 = PSEUDO TIMER
JMP* PSEUDO
7 = 10336-1
JMP* N10336
*
1572 TIMER STOP CODE
*
*
FUNCTION CODE
NI572 lDQ+ E1572
$4000 = DISABLE
LDA- ONEB IT -1-14
GO TO OUTPUT
JMP* TOUT
*
1573 TIMER STOP CODE
*
*
FUNCTION CODE
N1573 lDQ+ E1573
INQ -1
U1A- ONEB IT +14
$4000 = DISABLE
GO TO OUTPUT
JMP* TOUT
*
1572-1 LST STOP CODE
*
*
FUNCTION CODE
N72LST LDQ+ E15721
AND MASK FOR SRG FUNCTION BITS
ENA $38
NOUT
liN 0
AND+ H15721
RESTORE HISTORY
STA+ H15721
EIN 0
GO TO OUTPUT
JMP* TOUT
*
55
POl5Cl
P015B
PO] 5C
E400
OA07
IRFS
0150 X
08/21/80 00.70.03.
1572-1 SRG STOP CODE
*
*
FUNCTION CODE
N72SRG lOQ+ [15721
J\ND MASK FOR LST FUNCTION BITS
ENA 7
GO TO OUTPUT
J~'P* NOIJT
*
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MS05
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
4.]**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.]**
4.1**
4.1**
4.1**
4.1**
4.1**
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
4.1**
PJ\GE
MIrRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPno
MIPRO
MirRa
MIrRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIrna
MIPRO
MIPno
MIPRO
MIrRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPIW
MIPRO
MIPIW
MIPfW
15
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
51'6
527
528
529
530
531
532
533
534
535
536
537
538
539
. 540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
1700 ASSEMBLY OF MIPRO
5
10
()
PO]5D
P01!lF
P0160
[400
C031
HH10
PO]fl2
POIC'4
P016!i
E400
OA02
lE~nO
0103 X
FF79
OOH X
FF74
ClASS - V[R 3.0
10336-1 TIMER STOP CODE
*
*
FUNCTION CODE
N]0336 lDQ+ EI0336
$4000 = OISALBE
LDA- ONEBJT+14
JMP TOUT
*
364-4 COMMUNICATION MUX. TIMER
*
*
FUNCTION CODE
N3644 lOQ+ EQ3644
2 = DISABLE INTERRUPT
ENA 2
GO TO OIJTPUT
JMP TOIIT
()
08/21/80 00.20.03.
PAGE
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
MIPRO
16
561
562
563
564
565
. 566
567
568
569
570
571
o
0
0
ctASS - VER 3.0
1700 ASSEMfiLY OF MIPRO
*
*
*
*
*
*
*
5
10
15
20
2~
30
3~
40
45
~o
55
P0167
P0168
P0169
- P016A
POltiB
POltin
POI6E
P016F
PO}70
POI7}
POI72
POI73
POl74
P0176
POI 77
P0179
PO] 7A
POl7R
POI7\)
POl7F
POIAl
P0182
POIEl3
POIA4
POlPfi
POIR7
POlR9
P018A
P0l8B
POIAO
POl8E
POlAr
POI90
P0191
POJ92
P0193
P0194
P0195
PO]96
POlQ7
POl9A
P0199
P019A
POJcm
C032
]802
OAOO
6831
E800
C202
FEDF
OFC~
AOOA
0903
0101
1~I2
C202
5ROO
OFC4
6f100
C?03
OFCR
5ElOO
ElROO
5ROO
OA2?
09FE
0123
COOO
1818
9400
0131
18F9
[600
40FF
C108
OF44
A009
0ge3
0101
18FO
0500
elOe
AOl1
BflO4
filOC
01100
lARQ
0000
00A5
OOAI
009E
009B
OOAA
0015
0132 X
0188 X
0
OR/21/80 00.20.04.
MAG TAPE SIMULATOR WRITE RING PROCESSOR
THIS ROUTINE ENABLES OR DISABLES THE WRITE RING ON THE
SPECIFIED MAG TAPE SIMULATOR UNIT.
THE LOGICAL UNIT SPECIFIED MUST CONTAIN 2 DIGITS
EXAMPLE ••• WRON.09
WROF.28
WRNGONLDAJMP*
WRNGOF ENA
TAPSIM STA*
LOQ
LOAALS
ANDINA
SAZ
,JMP*
NOERR LDARTJ
ALS
STA
LOAALS
RTJ
ADD
RTJ
TRA
INA
SAP
·TAPERR LOA
JMP*
OKTAPI SUB+
SAM
JMP*
OKTAP2 LDQ+
STQLDAARS
ANOINA
SAl
JMP*
OKTAP3 lIN
LOAAND[OR*
STAEIN
JMP*
*
FtAGPS NIIM
ONEBIT+15
TAPSIM
0
FLAGPS
QSAVE
2.Q
SET ON FLAG
SET OFF FLAG
ISOLATE FIELD SEPARATOR
8
LPMSK+8
-$2C
NOERR
TAPERR
2.Q
CK
4
HOLD
3,Q
IS IT A COMMA
GET FIRST DIGIT
CONVERT TO HEX
GET SECOND DIGIT
fl
CK
HOLD
OEUCT
Q
-1
OKTAPI
=XMSG3-REF
STORIT
LOGIA
OKTAP2
TAPERR
LOGlA,Q
I
8, I
4
LPMSK+7
-60
OKTAP3
TAPERR
0
12, I
LPMSK+15
FlAGPS
12,1
0
MIOONE
0
CONVERT TO HEX
IS THE lU NEGATIVE
TO PRINT -TAPE SIM ERRORIS TilE LU TOO LARGE
YES, ERROR
SAVE TIlE PHYSTAB ADDRESS
ISOLATE THE EQUIPMENT TYPE CODE
IS IT A MAG TAPE SIMULATOR
NO,. ERROR
GET TUE HARDWARE STATUS WORD
CLEAR THE WRITE RING BIT
SET /ClEAR TIlE BIT
RESTORE THE STATUS WORD
EXIT
PAGE
17
MIPRO
MIPRO
MIPRU
MIPRO
MIPRO
MIPRO
MIPIW
573
574
575
576
577
578
579
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
mPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
t11PRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPRO
MIPrw
MIPRO
MIPRO
MIPRO
MIPIW
MIPrw
MIPRO
MIPRO
MIPfW
MIPRO
MIPIW
MIPRO
MIPRO
MIPRO
MJPIW
MIPHO
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
610
619
620
621
622
623
624
625
1700
ASSEMBLY
OF
MIPRO
CLASS - VER 3.0
*
6 CARDS DELETED
(j
08/21/80 00.20.04.
PAGE
MIPRO
18
627
o
r,
\J
0
0
CLASS - VER 3.0
1700 ASSEMBLY (IF MIPRO
*
n8/21/eo 00.20.04.
PAGE
19
MIPRO
630
*·MSOS 4.1** MIPRO
**MSOS 4.1** MIPRO
MIPRU
MIPRU
MIPRO
MIPRU
MIPIW
**MSOS 4.1** MIPRO
**MSOS 4.1** MIPRU
MIPRO
632
633
634
635
636
637
638
639
640
641
**MSOS 4.1** MIPRO
643
**MSOS 4.1** MIPRO
644
MIPRO
645
**MSOS 4.1** MIPRO
MIPRO
**MSOS 4.1** MIPRU
MIPRO
MIPRO
MIPRO
647
649
650
651
652
MIPRO
654
MIPRO
MIPRO
MIPRO
MIPRO
656
657
658
659
ERROR EX IT
!l
10
15
20
25
30
35
40
POJ9C
P019E
P019F
PO lAO
POIAI
POIA2
POIA3
POIM
POIA5
POIA6
COOO
fiR07
54F4
OD33
7F03
0000
18FC
0007
0000
14EA
POlA7
POlAR
POlA9
P01AA
POIAB
POIAC
POIAO
POIAE
POlAF
POlflO
PflIlH
POJR2
POlB3
POIB4
POIB5
POlBfi
P(lIB7
POlRB
POlB9
POIRA
POlBll
4049
2049
4E50
5554
2045
5252
4F52
5449
4n45
5220
5245
4M5
4354
2020
M4l
5045
2053
4940
2045
5252
4F52
POIBC
POIBE
P01BF
POIC1
P01C3
C400
0112
1800
6800
1ROO
0007
7 MI INPUT ERROR
ALF
MSG2
ALF- 7,TIMER REJECT
MSG3
ALF
7fFF X
*
SCMM
H4A
FF60
FF5C
R1
ON-LINE SCMM-17 HANDLER
CHECK FLAG IN SYSOAT
LOA+ SCMMLC
SKIP IF SCMM NOW IN CORE
SAN RI
FIRST TIME. SCHEDULE SCMM
J~!P
GETIND
STA CAUt 1
JMP SCIIORP
*
55
POlC5
POICfi
Pfl)C7
PO}CA
TO PRINT -MI INPUT ERROR-
MSGI
45
50
ERROR LOA =XMSGI-REF
STORIT STA* MSGLOC
RTJ- (AMONI)
NUM $033
REF
AOC MIDONE-REF
AOC 0
AOC $UJFC
Anc 7
MSGLOC ADC 0
JMP- ($EA)
OOBA X
EOEB
FAFO
coon 7FFF x
t
7,TAPE SIM ERROR
INITIATE OERUG PACKAGE
[lBsysn AOC
UlQOR
AOQ*
LOA
OOEBlIG
$ER
ORSYS[l
=XOOASIZ
REL. INCREMENT TO OEBUG ENTRY IN SVS. [lIR.
STORE CORRECT LENGTH
IN SYS. DIR. ENTRY
CIIANGE 1)1 R. LE NGTII
648
CLASS - VER 3.0
1700 ASSEMBLY OF MIPRO
5
10
POICA
POICB
POICD
POICE
POICF
6625
C400
0101
18CO
1800
FF3A
POlOl
POlD2
POI04
OAOO
6400
1800
OICC X
FF4E
7FFF X
STADBCKIT LOA+
SAl
JMP*
DBRQIT JMP
TURN
*
ENA
OX
STA+
JMP
(FOUR).Q
IS DEBUG IN
CHRSFG
SKIP NO
DBRQIT-*-I
PRINT ERROR MSG.
ERROR
SCHEDULE OSEDUG
GETIND
OFF DEBUG PKG.
0
CHRSFG
MlDONE
o
08/21/80 00.20.04.
PAS~ ,,\~~}-~~~~\_4 O\~
) ,"'"
~
',",'
v
"o
'"
,,~
':'
~<>,-: -;~~ <:t--';~:>-
~.
~
0~
(,
""'1
-'
c
o
~
,~
45
~
50
l80A
POOOF
POOlO
POOl I
POOl?
Poo13
P(lOl4
P0015
POOlfi
POO17
POOlR
POOl9
POOl A
POOIB
POOIO
POOlE
POO20
P0021
P0022
P0023
P0024
P002fi
POO2S
P0029
P002A
P002B
POO2C
POO2E
POO2F
P0030
POn3l
C622
A03l
0114
C201
0122.
OP2£'
It'03
C201
54RE
4107
£]05
C672
AOOO OOCO
0102
5400 7FFF X
C4FF
AOll
64Fr
C622
AOOO 400F
8000 1200
0500
[0134
0000
0152
5400 OOIF X
6622
C202
#lOB4
4)Ofi
pon32
C107
pno33
POO34
POO3!)
Pon3fi
P0037
P0030
POO39
P003A
POO3B
POO3C
P00311
P003E
POO3F
POO40
P004l
P0042
POO43
fi?n1
flO5
Cfin
OF44
AOO4
OA?2
4107
CA54
E106
6202
Et07
6A4F
Et05
C202
ElO6
6203
POO44
14B9
0~14
08/21/80 00.20.06.
JMP* TRIA+1
RC=8· GO T6 PARAME AND ABSOLUTIZE
CUECK FOR PART 0 DIRECTORY CAU
LOA- (ZERO) ,0
o BIT SET, NOT PART 0
AND- ONER1T+14
SAN NOTOIR
LOA- PC,O
BIT 15 SET = DIRECTORY CALL
SAP NOTDIR
DON"T ARSOLUTIZE DIRECTORY CALL
TRA 0
JMP* TRlA+l
ABSOLUTIZE CONPLETION ADDRESS
NOTDIR LOA- PC,O
ABSOLUTIZE COMPI.ETION ADDRESS.
TRIA RTJ- (ACAOS)
STO- VH1P,I
LDO- VPTR,I
LOA- (ZERO) ,0
PICK UP USERS ORIGINAL "U" FIELD
AND =N$OOCO
NO ERROR "U" .LT. 4
SAZ (tRBI5
ERROR "U" .GE. 4 - HANG
RTJ+ SYFAIL
CLEAR BIT 15 IN USERS O-REG
CLRB15 LDA- (I)
AND- LPMSK+15
STA- (I)
LDA- (ZERO).O
AND =N$400F
SAVE PL AND 0 BIT
ADD =XRCSCUD*$200
I IN 0
LDO- TOf1PT
ItIO 0
THREAD IS EMPTY, GO TO
SQN TRIB-*-l
SCHEDULER STACK OVERFLOW -HANG
RTJ+ SYFAIL
TRIR STA- (ZERO) ,0
REMOVE SLOT FROM EMPTY LIST
LDA- PT,O
STA- TOMPT
SAVE ADDRESS OF EMPTY SLOT
STQ- VTPE,I
lOA- VlMP,I
STA- PC,O
LOO- VPTR,1
LllA- (ZERO) ,0
ARS 4
USE ONLY LOWER 2 BITS
AND- LPMSK+2
"
~~
TRA Q
STO- VTMP,I
nlREAD TO 1BREAD(D)
LDA* THREAD,Q
lDQ- VTPE,I
STA- PT,O
TRO A
lDQ- VTMP,I
STA* nlREAD,Q
GET USERS lIME
lDO- VPlR, I
FROM USERS CALLING SEQUENCE
UlA- 2,0
LDQ- VTPE,I
PUT TIME INTO SLOT.
STA- PTIME.Q
11 CARDS DELETED
*
EXIT
JMP- (AREQXT)
*
TRIC
\t.t,L·--;
AU)
v i
.u.}}j,J.i
PAGE
*.MSOS 4.0 TMINT
TMINT
**MSOS 4.0 TMINT
**MSOS 4.0 TMINT
**MSOS 4.0 TMINT
**MSOS 4.0 TMINT
**MSOS 4.0 TMINT
**MSOS 4.0 TMINT
**MSOS 4.0 TMINT
**MSOS 4.0 TMINT
lMINT
TMINT
TMINT
H1INT
LO!.(n1/
Nq F\~l.b TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
***MSOS4.0 TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
THINT
TMINT
THINT
lMINT
TMINT
THUll
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
IMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
;nmt.
3
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
~\N\ey ~~vl s'\V\W
-h nU (" c..oU/V\~:' ot, 0 L:.J'"
-* o'/,Lv
... of ~
:::.t
t-k..--~ 'f (,~l
~ v'-. -, c.t
79
no
81
A2
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
f La c.t n"J -\k \,1 q'"
oIt\
~ \,\\.Q1v
r v
- ';'~ . t/.O
~~ 'x'
ClASS - VER 3.0
1700 ASSEMBLY OF TMINT
5
DOE8
C400
683C
OCOO
poottl\
4H39
CA3E
0133
0103
09FE
61\3A
14EA
15
POO4B
POO4C
POO40
POO4E
POOtlF
POO50
CA34
20
POOS1
POOS2
POO53
POOS5
POO5fi
POO!)7
POOSR
POO!)!l
POOM
P005n
40FF
n02
0153
[RlA
0001
lREE
P005C
P005D
PO(l5E
P005F
POO60
C203
0103
09rE
6203
lRF4
P0061
P0062
POO63
POOM
P0065
C823
0119
C820
0111
IBE,F
P006fi
POO67
POO6A
POOfi9
POOfiA
POOfiB
C202
6102
C8?fi
fi202
4fl24
IREA
POO6C
POOfiO
POOfiE
P006F
P0070
POO71
POO72
r0073
POO74
P007S
C201
()fl07
C622
fifl{l4
10
2S
30
35
40
45
50
55
C)
rOO45
POO4fi
POO4R
POO49
7FFF X
6/13/
FOOO
onoo
lIFflJ
EOER
54F4
0000
0000
OFFO
OORC P
TIMEUP RAOLOA
STA*
ENQ
*
NXTIIM STQ*
LDA*
SAM
SAl
INA
STA*
EXIT JMP-
08/21/flO 00.20.06.
I
99
100
101
102
103
104
105
106
107
108
109
110
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
TMINT
UIJNT
TMINT
112
113
114
115
116
IJ7
118
119
120
121
122
124
125
126
127
128
129
130
131
132
133
134
135
137
138
PC.O
CAl.l"'1
(lEIW) ,Q
CAll
lfi
ClOCK
(AMON I )
0,0
TMINT
TMINT
TMINT
TMINT
DECREMENT TIME DELAY REQUEST ,AND
. lMINT
CONTINUE TO CIfEeK THE THREAD.
TMINT
TMINT
HAS NO. SCHEDULER CALLS BEEN EXCEEDED
TMINT
FOR THIS PERIOD.
TMINT
YES, CHECK IF ON COUNTS THREAD
TMINT
TMINT
YES. CONTINUE TO CHECK HIE TIIREAD
TMINT
NO, PUT THE REQUEST ON TUE COUNTS TUREAl> SO
TMINT
REQUEST WULL BE SCHEDULED AS SOON AS POSSIBLE. TMINT
lMINT
THINT
TMINT
COUNTINUE TO CflECK TIlE THREAD
TMINT
TMINT
lMINT
n1lNT
TMINT
MOVE CAll FROM TIMER TlIREI\D
TMINT
TMINT
PUT Q IN A TO SAVE THROUGII MONITOR
TMINT
PASS TIlE CORE CLOCK IN Q
TMINT
rMINT
SCIIElJlJU HIE REQUESTED Cor1PLEHON ADDRESS
11'1
RESTORE rOINTER TO LIST
TMINT
151
TIMIDX
TlMCTR,Q
EXIT -*-1
RESET-*-1
-1
TIMCTR.Q
(AOISP)
INCREMENT CORE CLOCK
RSTCTR.Q
TlMCTR ,0
=XTHREAD-2
RESET TIME COUNTER AND CHECK ITS HIREAO
I
PT,I
CIIECK THREAD Fon TIME DElAY REQUESTS
TOREQ LDASAl
INA
STAJMP*
*
CHKSCH LOA*
SAN
LOPI LOA*
SAN
JMP*
*
PUTCNT LDASTALDA*
STASTQ*
JMP*
*
SCHEOU LOASTA*
LOI\STA*
llS
LDQIHJCALL ADC
PTIME ,Q
CHKSCH-*-l
-1
PTIME.Q
CHKHIR
0
TOREQ-*-1
TIMIOX
1
NXTT 1M
NUMSCH
SCHEDU-*-1
TIMIOX
purctH-*-1
CIIKTHR
PT.Q
PT, I
THREAD
PT,Q
THREAD
LOOP
TIME DELAY REQUEST ENCOUNTEREO
END OF HtREAD. CIfEeK NEXT TIME COUNTER
TIME DELAY REQUEST
TIME DELAY HI\S EXPIRED
(J
V'"
4
**MSOS 4.1** TMINT
mINT
SEr NUMBER OF SCHEDULER CALLS ALLOWED/PERIOD THINT
TMINT
IM!NT
TMINT
CHECK NEXT TIME COUNTER
lMINT
mIrH
ALL DONE. EX IT
TMINT
TIME COUNTER COUNTED DOWN, RESET
TMINT
TMINT
DECREMENT TIME COUNTER AND EXIT
TMINT
CLOCK
NSClffO
NUMSCIf
0
RESET LOA*
STAA'
1'100
*
CHKntR STOLOOP LDQINQ
SQN
LOQ*
INQ
,IMP*
US
PA(;E
)\-au.;
({}Jv\
5-
IM/LNJ-,\
\;-1t\ l \'~ -t::)
~\ J X-d \t
(J
vlg 0\ S \-vI- J..(
i
\t(./'--
,J
I)J\\-t-();~~
_V
136
139
140
141
142
143
144
145
146
147
148
149
150
(-)
o
o
CLASS - VER 3.0
1700 ASSEMBLY OF TMINT
5
10
15
20
30
35
40
P0076
poon
pn07S
P0079
P007A
P007B
poo,e
0121
IREB
CROC
09rE
680A
C202
610£
P0070
P007E
P007F
POORO
05no
COR4
6202
40114
pon81
POOP?
0400
1R03
POOS3
POOR4
0000
nooo
POOR5
POOR6
POOS7
POO80
0000
7FFF X
0009
003B
POOR9
pnnrA
POORB
POORe
poonn
noon
0000
oorm
0000
FFFF
PoonE
POOfW
P0090
Poon1
FFFF
FFFF
FFFF
FFFF
GOGO
POO97
SAP GOGO
Jt1P* LOPI
l.DA* NUMSCH
INA
*
liN
-1
TIMER DELAY HAS EXPIRED.
0
RETURN SLOT TO EMPTY THREAD
lDA- TOMPT
STA- PT.O
STO- TOMPT
*
EIN
0
CONTINUE TO CHECK THE THREAD
JMP* LOOP
TIME COUNTER INDEX
NO SCIIEIJUER CAllS PER TIME PER IOD
TlMIDX NUM 0
NUMSCIt NUM 0
*
*
*
*
*
RSTCTR ADC
AOC
ADe
ADe
*
TlMCTR Anc
AOC
ADC
AOC
NUM
*
THREAO NlI~1
NUM
NUH
NUM
08/21/80 00.70.06.
BACK TO RETHREADING SECTION IF r'lrJEcj~---DECREMENT NUMSCII
"------
STA* NUMSCH
LDA- PT.O
5TA- PT,f
oonE P
45
o
TIMER UNITS MAY BE 0 = COUNTS
OR 1 = 0.1 SECONDS
OR 2 '; SfCONDS
OR 3 = MINUlUES
1-1
TIMEC
10-1
60-1
NUMBER
NUMBER
NUMRER
NUMBER
0
0
TIME COUNTER FOR COIlNTS
TIME COUNTER FOR .1 SECONDS
TIME COUNTER FOR SECONDS
TIME COUNTER FOR MINUTES
END OF TIME COUNTER TABLE
0
0
-0
TlfREAD
THREAD
THREAD
THREAO
-0
-0
-()
-0
OF
OF
OF
OF
FOR
FOR
FOR
FOR
INTERRUPTS PER COUNT
COUNTS PER .1 SECOND
.1 SECONDS PER SECOND
SECONDS PER MINUTE
COUNT OELAYS
.1 SECONDS DElAYS
SECOND OELAYS
MINUTE DELAYS
193 STATEMENTS
1.263 SECONDS
-----TM fNT--f52
TMINf
153
rMINT
154
lHINT
155
TMINT
156
TMINT
157
THINT
15£l
TMINT
159
TMINT
160
THINT
161
THINT
162
TMI NT
163
TMINT
164
TMINT
165
TMINT
166
TMINT
lMINT
168
169
THINT
TMINT
TMINT
TMINT
TMINT
TMINT
THJNT
TMINT
TMINT
TMINT
TMINT
lMINT
TMINT
THINT
TMINT
TMINT
lMINT
TMINT
TMINT
TMINT
171
172
173
174
175
176
177
178
179
180
181
182
IB3
184
IP5
186
187
188
189
190
4
116*4373 THINT132
TMINT
191
EOll TMRnlD(THREAD)
END
610310 STORAGE USED
MOO ASSEMRl Y
PAGE
50 SHmOLS
156 REFERENCES
CLASS - VER 3.0
170n ASSEMBLY OF TMINT
COMPLETE REFERENCE MAP.
ACABS
AOJSP
AMONJ
AREI)XT
CAli.
CUKSCH
CHKTUR
CLOCK
CLRB15
EXIT
GOGO
J
LOOP
LOP]
LPMSK
NOTOJR
NSCIIED
NIJ~1SCH
NXTTIM
• ONEBIT
PC
PT
PTlME
PIITCNT
PlTIME
RCSClfO
RESET
RSTCTR
SCHEOIJ
SYFAIL
TOREQ
THREAD
TIMCTR
TIMEC
TIMEUP
TIMIOX
TMINT
TMRum
TOMPT
TRIA
TRlB
TRIC
TRIX
Tlfi
T8
TosrZE
VPTR
VR
VTMP
VTPE
ZERO
o
OOBE
OOEA
00F4
00B9
MlSOLUTE
ABSOLIJTE
ABSOLUTE
ABSOLUTE
on73
00(,1
0055
00E8
0020
0050
0078
OOFF
0056
ABSOLUTE
-SYSTEM-
0063
0002
0016
0047
00R4
004A
0023
0001
0002
0003
OOllfi
OOOF
0009
0051
00R5
006C
(l020
005e
008E
0089
0086
0045
0083
0000
DOSE
00B4
0017
002E
OOOF
0006
0000
0000
0003
0005
0003
0007
OOOfi
0022
ABSOLUTE
*EXTERNAL*
ABSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
ARSOllITE
*EXTERNAl*
*EXTERNAl*
ABSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
A13S0LlJTE
ABSOLUTE
ARSOllJTE
2/37
2/32
2/35
2/38
4/51
4/32
4/22
2/23
3/18
4/11
4/60
3/20
4/23
4/39
2/33
3/07
2/19
4/06
4/09
2/32
2/24
2/24
3/32
2/25
4/40
2/41
2/27
4/12
4/18
4/38
2/21
4/25
3/43
4/10
2/20
2/15
4/09
2/10
2/18
2/36
2/60
3/29
2/56
2/40
2/17
2/16
2/40
2/28
2/?8
2/30
2/29
2/37
Q
Q
4/~6
Q
3/54
4/53
4/37
4/35
4/04
3/20
4/15
5/05
3/22
4/48
5/04
2/54
3/09
4/05
4/37
4/28
2/58
2/57
3/45
4/23
3/52
4/43
2/55
3/25
4/18
5/29
4/50
3/19
4/31
3/48
4/14
5/30
4/04
4/26
2/11
5/45
3/27
3/11
3/31
3/05
2/52
2/42
2/46
2/49
3/15
2/S0
3/14
3/34
2/52
L
L
L
Q
X
l
Q
Q
Q
Q
Q
Q
X
X
E
E
E
Q
E
E
Q
Q
Q
Q
Q
Q
PAGE·
6
3/13
4/15
Q
Q
OA/21/80 00.20.06.
4/57 L
L
4/41
4/55
L
L
L
4/22
5/17
3/21
3/12 l
3/40
5/05
5/07
5/21 l
3/06
3/08
4/43
4/44
4/31
3/12
4/46
5/08
4/34
3/36
5/09
5/13
4/50
4/20
4/19
4/45
5/34 L
4/47
5/40 L
5/45
4/39
5/20 l
3/33
3/13 L
5/12
3/37
2/51
3/35
3/44
3/115
3/49
3/31
3/38
l
l
L
L
3/30
l
L
Q
Q
5/14
L
l
L
Q
L
3/42
3/51
3/16
o
3/47
3/23
4/52
o
o
o
o
1700 ASSEMBLY OF NMONI
STORAGE ALLOCATION.
AODRESS
LENGTH
0000
004C
CLASS - VER 3.0
BINARY CONTROL CAROS.
NAM
END
004C
NMONI
DECK-ID MID MSOS 5.0
-- 0000
-- 002E
REQXT -- 0042
ENTRY POINT NAMES AND ADDRESSES.
ASC
MONI
-- OOIB
-- 0000
NMONI
RCTV
EXTERNAL SYMBOLS.
CCP
CPSET
TO
08/21/80 00.20.07.
T1
TI4
TI7
T2
TIO
TI5
TI8
TI2
TI6
TI9
T4
T6
T8
T9
SUMt1J\RY
PAGE
CLASS - VER 3.0
1700 ASSEMBLY OF NMONI
*
*
5
*
10
0000 P
0000 P
15
002E
0000
0042
OOW
OOBB
OORA
0022
0023
lJ002
0003
0005
70
1'5
OR/21/AO 00.20.07.
OECK-IO MIO MSOS 5.0
NAM NMONI
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION, LA JOLLA. CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
SlIMMAR Y-122 NMON 1132
N~lON I
NMONI
NMONI
2
1
3
4
5
NMONI
NMONI
Nr10NI
NHUNI
Nf10NI
10
11
NMONI
13
ENT RCTV,MONI.REQXT
tiMON I
15
Eln ASC
EQlI AVOLA($BB).AVOLR($RA)
NMONI
NMONI
16
17
EQU ZERO($22).ONEBIT($23).LPMSK(2)
NMONI
18
**MSOS 4.0 NMONI
19
*
*
*
MONITOR ENTRY FOR REQUESTS
SPEC 10 REFER TO IMS
PROGRAMMING SYSTEMS, A/D SYSTEMS DIVISION. CDC
NMONI
EtH
EQlI NMONI(*)
*
PART NO.
P
P
P
P
PAGE
EOO610A0030S
EQU VR(3),VPTR(5).VTDS{6),VTMP{7).VIO(R)
7
8
9
nOOfi
0007
30
noo~
(1004
OOOA
0009
EQU
EOU
EQU
EXT
EXT
EX"I
EXT
EXT
EXT
EXT
EQB
EQU
35
40
0001
0009
*
*
45
*
*
*
*
*
SO
P(lOOO
0000
POOD]
0500
54RB
oonA
EAFB
rooOJ
Pon04
*
MONI
\
0
ENTRY POINT FROM ALL PROGRAMS IS AT MONI
UNPROTECTED MONITOR REQUESTS WILL BE TRAPPED
AT MONI+2. THIS PROGRAM RUNS WITH INTERRUPTS
INHIBITED FOR LESS THAN 25 MICRO SECONDS.
ALL LOCATIONS ARE PROTECTED UNLESS OTHERWISE
INDICATED.
*
pnn02
5~
**MSOS 4.1**
VPL(4)
122*4823
NUMRER OF WOROS OF VOLATILE.
V( 10)
122*4823
REQUESTOR"S CONTROL POINT NUMBER.
VCCP(9)
LOCATION CONTAINING CURRENT CNTRL POIN122*4823
CCP
122*4823
ROUTINE TO SET A CONTROL POINT.
CPSET
TO, Tl, T2
T4,T6
T8, T9, TIO
TI2, TI4. TI5
TI6. TIl. TIS. TI9
PC(1 )
SCHEDULE REQUEST CODE
RCSCIIO( 9)
*
*
*
0
lIN
RTJADe
LI1Q*
0
0
(AVOLA)
V
MOtH
UNPROTECTED
ALLOCATE VOLATILE FOR THIS REQEST
NO. OF WDS TO ALLOCATE
REENTRANT PAST HERE
SAVE RETRN ADORESS ANI1 POINTER IN VOLATILE
n
NMONI
NMONI132
NMONII32
NMONI132
NMONI132
NMONI
Nr10N I
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
N~IONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
NMONI
Nf·IONI
20
2
3
4
5
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
3np
5"1.
LoAI
Y-}\'\o-
I
i\
l3'(>i
5Y1ti
LVii -
t
\
\31...
I
I
l
~
I
\
5
NDISP
NDISP
NDISP
NOISP
NOISP
NDISP
NOISP
NDISP
NDISP
NDISP
NDISP
***MSOS4.0 NDISP
NDISP
NOISP
NOISP
***HSOS4.0 NOISP
*
*
*
*
*
*
*
*
*
004B P
0048 p
?O
PAGE
126
127
128
*
15
08/21/80 00.20.12.
**************************************************************MSOS 4.1** NUISP
*
SCHEDULER SECTION
**MSOS 4.1** NUISP
**********~***************************************************MSOS 4.1** NDISP
*
10
;{),
o
o
o
'JM'irr
D'(Z~\'1l
L'OA'3\;\e,-
'Pfl..L \J L
5H~
:f,I,J"".1f
\} 'PL )L
V::..
VJhl'"l"';
Tf- (l.Q.q
C\o \0
,
,
\
~OUJ ':;"L.\'fC-.L{,
\\'\'j
0-
~
Co-
>-
'f n · \
~(\Oi\\tl > c...lA.'I'.{(:~ fY~O'("1 ~,4.-'"
H l;l\ L.tyf; L
~\1
I
1
'
131
132
133
. 134
135
136
137
138
139
]40
141
142
143
144
145
ClASS - VEn 3.0
1700 ASSEMBLY OF NOISP
~
Pon7~
CI06
A03}
0110
CI06
A02B
0108
BI06
1\106
OA14
A011
8032
PO(l79
POfllA
POfllB
POOle
poom
POO7E
P007F
PO(l80
POO82
POOP3
POOfl4
POOO5
POOP6
P0087
P0088
P0089
POOSA
AOll
6107
0500
EOB4
0000
0152
5400
C202
60B4
4105
CI06
6622
CI07
6201
C4FF
6203
POOtiE
POO6F
POOlO
POfl71
POO72
POO73
POO74
PO(l75
POO76
POO77
5
10
15
20
25
30
rr\
If(\ 0. f
~107
7FFF X
35
POWl4
0500
EOOO
OOFO
0400
410fi
OBOO
0!l00
C202
0900
pno%
fIlO6
pnn9~
OR22
P0097
P0098
P0099
P009A
POO9B
Cfi22
AOOfi
9104
0131
JAF3
POO~B
POORC
POO~E
40
45
50
.
PO(lPF
POO!"!O
P0091
POO!l2
PO(J~3
55
*
*
SCH2
lOAANOSAN
lOAANOSAl
EORSTATRO
ANOAIlOAOOANIlSTAABS
lIN
lOQINQ
SQN
R1J+
S3
LlJASTA'STQLOASTALlJASTASCIIE02 LOASTA*
*
*
*
0000 P
ell \\ \V)\y\\e t:, \ e0,.LL'?il\ CD;~(.. ~ "
I IN
LOQ
ItJQ
HIREOI EIN'
5TQNOP
liN
LOA":
INA
SAl
*
TRA
*
E106
08/21/80 00.20.12.
ABSOLUTIlE ANO TRANSFER TO STACK
VTPE,I
ONEB IT +14
ABS-*-l
VTPE,I
ONEB IT +8
ABS-*-l
VTPE,I
VTPf,I
A
LPMSK+15
ONEB IT +15
VTMP,I
LPMSK+15
VTMP II
0
TOMPT
0
S3-*-1
SYFAIL
PTIQ
TOMPT
VPTR I I
VTPEII
(lERO) ,Q
VTMP.I
PC.Q
(I)
PQ,Q
**MSOS 4.1**
***MSOS4.0
***MSOS4.0
**MSOS 4.1**
CHECK lJ BIT
T
SKIP ON ABS CALL
**MSOS 4.1**
**MSOS 4.1**
FINO EMPTY IN STACK
SCHEOULER STACK HAS OVERFLOWEO - HANG
STORE NEW POINTER TO
PARAMETER LIST
STORE Q
SEARCH FOR STACK POSITION ACCORDING
TO PRIORITY OF THE REQUEST.
0
=XSCHTOP
-2
0
VTPE.I
0
0
P.T ,Q
POINTER TO SCIITOP IN Q
ALLOH
INTERRUPT
POINTER TO NEXT ENTRY
0
THREAD
Q
lOA- (lERO),Q
ANO- LPMSK+4
SUB-.VPL.I
SAM THREAD-*-I
JMP* THREOI
THREAD INTO Q
CARO DELETED
SKIP TO TlIREAD NEW ENTRY
IF ITS PRIORITY HIGHER
*
P009C
0
I.] 5J."
THREAD NEW EUTRY
*
*
1 CARD OELETED
*
POINTER TO PRECEDING EN1RY
IHREAD.lOQ- VTPE II
n
*465
*465
*465
*465
PAGE
NDISP
NlJISP
NOISP
NDISP
NI)ISP
NOISP
NOISP
NDISP
NOISP
NOISP
UOISP
NlJISP
NIHSP
NDISP
NOISP
NOISP
NIH SP
NIJlSP
NOISP
NlJISP
NOIS!>
NDISP
NOISP
NIHSP
NOISP
NOISP
NOISP
NOISP
NOISP
NOISP
NOISP
NOISP
NOISP
NDISP
NOISP
NOISP
NDISP
NOISP
NDISP
NOISP
NOISP
NDISP
NDISP
NOISP
NDISP
NOISP
NDISP
NOISP
NOISP
NDISP
NDISP
NIJISP
NOISP
NOISP
NOISP
NDISP
NIBSP
6
181
182
183
184
185
186
187
188
1A9
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
210
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
n
0
0
CLASS - VER 3.0
1700 ASSEMBLY OF NDISP
5
10
P0090
P009E
C202
El05
POOClF
POOAO
POOAI
POOA2
POOA3
PO(1J\4
POOA5
POOA6
62(12
(1814
El06
6202
C4FF
A011
64FF
14S9
LOA- PT,O
LDO- VPTR,I
*
15
20
25
30
35
POOA7
POOA8
POOA9
POOM
POOAB
POOJ\C
POOAD
POOAE
POOAF
POOHO
POOS]
POOS2
ponR3
POOR4
POOB5
POOB6
POOS7
POOB9
POOBA
POORS
A011
80ES
0500
6105
C622
OF49
A007
09F6
01(14
09F6
0]02
nAOO
6202
£105
C202
0102
1400
C622
OI?2
1400
POOBD
POOBE
POOBF
POOCO
POOCI
POOC2
A016
8104
6622
OF49
A007
OlOC
7FFF X
00B8 X
STA- PT,O .
TRQ A
LDO- VTPE.I
STA~ PT,Q
LDA- (I)
AND- lPMSK+15
STA- (I)
JMP- (AREQXT)
*
**
*
*
DIRCAl ANDADDlIN
STALOAARS
ANDINA
SAl
INA
SAl
ENA
STADIR2 lDOU1ASAl
JMP
DIRI LDASAP
JMP
45
50
55
POOC3
POOC4
POOC5
rOOC6
Pone7
POOCA
POOC9
POOCA
0804
6202
0400
COEF
ponCA
(20]
POor.c
6]07
9}(l4
0125
CIl22
610fi
*
UIRIA ANDADDSTAARS
ANDSAZ
*
*
**
*
SET
STAEIN
lDASUBSAP
LOASTALflASTA-
08/21/80 00.20.12.
POINTER TO NEXT ENTRY
STORE INTO NEW ENTRY
ALLOW 16 BIT ADDRESSING
STORE NEW POINTER
IN PRECEDING ENTRY
PICK-UP USERS Q REGISTER
REMOVE THE SIGN BIT
PUT IT BACK
PROCESS DIRECTORY CAllS
lPMSKt15
ASYSOR
0
VPTR,I
(lERO),Q
GET SYSDIR ADDRESS
PICK UP REOUEST CODE
9
lPMSK+5
-RCSCUD
IF NOT SCUEOULE REOUEST CODE
OIR2-*-1
-P]SCHD+RCSCUD
SKIP IF REO CODE 18
OJR2
MlIST BE A SECONDARY CAll
0
CLEAR TI/READ IN USERS REQUEST
PT ,0.
Q = SYSTEM DIRECTORY ADR.
VPTR,I
2.Q
OIRl-*-1
SCHERR
CI~CK IF OK TO SCHEDULE
(ZERO).O
DIRIA
OK. CONTINUE
SCUERR
*
40
0
NZERO+4
VPL,I
(ZERO) ,Q
9
LPMSI<+5
MASCAL-*-I
REPLACE PRIOR ITY
IN DIRECTORY WITU
CAU PRIORITY
IF f4ASS MEMMORY CAll
GO TO DIRECTORY CALL
CORE RESIOENT DIRECTORY CALL
A
PT.O
0
PRlVl
VPt.I
S5-*-1
(ZERO).O
VTPE.I
PC to
VTMP.I
SAVE WORD 0 OF DIRECTORY ENTRY
SAVE SCI/EI.lUI.ED AODRESS
PAGE
NDISP
NDISP
***MSOS4.0 NDISP
NDISP
NOISP
NDISr
NDISP
NUISP
NDISP
NOISP
NDISP
NDISP
NDISP
NDISP
NOISP
NDISP
NOISP
NDISP
NOISP
NOISP
NDISP
***MSOS4.0 NOISP
NDISP
NDISP
***MSOS4.0 NDISP
***MSOS4.0 NOISP
NDISP
NDISP
NDISP
NOISP
NDISP
**MSOS 4.0 NOISP
***MSOS4.0 NOISP
***MSOS4.0 NDISP
**MSOS 4.0 NOISP
NDISP
*uMSOS4.0 NIHSP
***MSOS4.0 NDISP
NOISP
NOISP
NDISP
***MSOS4.0 NDISP
NOISP
NOISP
NOISP
rmlsP
NDISP
NOISP
NDISP
NOISP
NDISP
NIHSP
NDISP
. NfllSP
N[)ISP
N[)ISP
NOISP
7
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
28B
289
290
291
292
293
294
1700 ASSEMBLY OF NDISP
POOCD
POOCE
182B
18BA
PODCF
ponoo
ponD 1
pon03
POOO4
Pon05
PO(lOfi
PonOR
C4FF
6104
5400
CI04
6203
C622
AOOO
6104
pon09
C622
5
10
15
20
o
ponnA
P{lflOB
P{lOOC
poonE
POOOF
A031
0102
1400
OCOI
1400
7FFF X
OOFO
7FFF X
7FFF X
CLASS - VER 3.0
08/21/80 00.20.]2.
JMP* HILVL
JMP* SCHED2
S5
*
MASS MEMORY DIRECTORY CALL.
**
*
*433***
MASCAL LDA- (I)
*433****
SAVE Q TEMP IN VOLATILE
STA- VPL.I
CHECK THREAD - BUSY. REJECT REQUEST(QI5=1)***
RTJ CKTHRD
*433****
LDA- VPL.I
MOVE PARAM TO DIRECTORY SLOT 3
*433****
STA- 3.Q
*433****
lOA- (ZERO).Q
*433****
SAVE REQ PRIORITY
AND =N$FO
SET UP REQUEST PRIORITY IN VOLATILE *433****
5TA- VPL.I
***MSOS4.0
CHECK HIE 0 BIT
LOA- (ZERO).Q
***MSOS4.0
ANO- ONEBIT+14
***MSOS4.0
SAZ HASCO
***HSOS4.0
EXIT TO PARTITION CORE DRIVER
JMP K65COR
***MSOS4.0
LU OF CORE ALLOCATOR
MASCO ENQ 1
*43)***
SET UP THREAD TO CORE ALLOCATOR
JMP SAVLlJ
*433****
T1fREAD REQUEST TO LOGICAL UNIT 1
*
o
PAGE
NIHSP
NDISP
NIH SP
NOISP
NDISP
NOISP
NOISP
NOISP
NOISP
NDISP
NDISP
NDISP
NDISP
NDISP
NOISP
NlllSP
NDISP
NDISP
NDISP
NDISP
8
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
o
,--...
0-
r'---"'"
L)
CLASS - VER 3.0
]700 ASSEMBLY OF NDISP
'"
*
*
5
nOFl P
10
15
?O
ponEl
POOE2
POnl:3
POOEIl
POnE5
POnE6
POOE7
POOE8
POOE9
POOEA
POOEB POOF.C
POOED
POOH
0~22
CI08
0132
0103
0103
C622
AOOA
0116
E201
FOEB
C622
A011
6622
14B9
EOU
TRA
LDASAM
RAORAOENSCH LDAANOSAN
LDQAOQLDAANDSTAJMP*
*
?5
30
POOEF
POOFO
POOFI
POOF2
POOF3
POOF4
POOFS
POnF6
POOF?
f201
FOEB
C622
0500
A011
0400
B032
fl622
14B9
*
DISCII LDQADQLDAI IN
ANOEIN
EOHSTAJMP-
U
08/21/80 00.20.12.
PROCESS ENABLE SCI/DllLE CALL
T19(*)
0
8, I
ENSCU
VR, I
VR, I
(ZERO) ,0
LPMSK+8
DISCU
PC ,0
ASYSOR
(ZERO),Q
lPMSK+15
(ZEIW).Q
(AREQXT)
PICK UP INDIRECT FLAG
SKIP IF INDIRECT
UPDATE RETURN ADDRESS
DISABLE REQUEST
GET SYS DIR INDEX
CALCULATE ADDRESS
CLEAR DISABLE BIT IN DIRECTORY
PROCESS DISABLE SCHEDULE CALL
PC.O
ASVSDR
(ZERO).O
0
LPMSK+15
0
ONEB IT +15
(ZERO) ,0
(AREOXf)
GET DIREC10RY INDEX
CALCULATE ADDRESS
SET DISABLE BIT IN DIRECTORY
PAGE
"'**MSOS4.0"NDISP
***MSOS4.0 NOISP
***MSOS4.0 NDISP
***MSOS4./ NDISP
tID ISP
NDISP
NDISP
NDISP
NDISP
NOISP
"'MSOS 4.0 NOISP
*MSOS 4.0 NDISP
""'**MSIJS4.0 NOISP
***MSOS4.0 NDISP
***f1S0S4.0 NOISP
***MS054.0 NOISP
***MSOS4.0 NDISP
***MSOS4.0 NDISP
***MS054.0 NDISP
***MSOS4.0 NDISP
***MSOS4.0 NOISP
*MSOS 4.0 NDISP
***MSOS4.0 NIlISP
***MSOS4.0 NlllSP
69*1566 NOISP
69*1566 NDISP
69*1566 NDISP
***MSOS4.0 NOISP
***MSOS4.0 NOISP
***MSOS4.0 NDISP
9
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
CLASS - VER 3.0
1700 ASSEMBLY OF NOISP
*
*
*
*
IHLVL
5
10
15
7.0
25
30
POOF8
POOF9
POOFA
POOFB
POOFe
pooro
POOH
POClFF
POIOO
POIOI
POJ02
POl03
POl 04
POlO!)
P0106
POl 07
POl (l~
P0109
P010A
P010S
POlOC
POIOD
P010E
P010F
POlIO
0~"4
6202
C106
A031
0102
CI07
1~09
CIOti
AO?R
0101
0814
Aon
8032
8107
Aon
0500
6817
4817
*
35
40
4S
50
55
(]
\
-'
SCIIOLE REQUEST IS OF IIIGIIER PRIOIUTY
TIIAN CURRENT LEVEL.
LDQliN
LDAARS
ANDINA.
SAl
ClR
STAPRIMRY LDAANDSAZ
LOAJMP*
LDAS6A
ANDSAl
TRQ
ANDS6
ADDADDAND56Bl
I IN
STA*
*
STQ*
*
ElOS
0500
C622
OF49
A007
09F6
0102
08/21/AO 00.20.12.
VPTR, I
0
(lERO),Q
9
LPMSK+S
-RCSCHD
PRHIRY-*-l
A
PT,Q
VTPE.I
ONEB IT +14
S6A
VTMP,I
S6Bl
VTPE,I
ONEB 1T+8
56-*-1
A
Lpr~SK+15
ONEBIT+15
VTMP,I
lPMSK+lS
0
JMP+l
PASSA
GET POINTER
REQUEST CODE/LEVEL
EXTRACT REQUESl CODE
***MSOS4.0
IF SECONDARY CALl,(RC.NE.9)
CLEAR THREAD IN CALL
**MSOS 4.1**
***MSOS4.0
***MSOS4.0
**MSOS 4.1**
***MSOS4.0
**MSOS 4.1**
FINO PLACE TO GO
PART 1 REQUEST "
FOR REL AND ASS MODE
15 BIT ARITHMETIC
**MSOS 4.1**
***MSOS4.0
1 CARD DElETED
LOC OF PARAMETER LIST
PUT RQUESTOR ON INTERRUPT STACK
*
P0111
P01l2
POl13
POll4
POllS
P0116
POl17
P01l8
P0119
POlIA
P(lllB
PO)]C
POlJO
POllE
POl1F
POl20
POl21
'P0122
POI?3
POI 24
POl?5
P0127
P0178
EOB8
COEF
6204
COB9
6203
COFF
6202
on 05
40B~
El04
40EF
CfiB7
0821
E4FF
O~l4
1\011
(iliFF
C805
01AO
0400
1400
0000
0000
Jr1P
PASSA
LOQlOASTALOASTALOA5TAINQ
STQLOQSTQLDATRA
LDQTRQ
I\NOSTALOA*
SOV
EIN
JMP+
NlJ~1
COUNT
PRlVl
XPL,Q
AREQXT
XR,Q
I
XI,Q
XL
COUNT
VPL,I
PRLVL
(AMASKT),O
M
(I)
A
LPMSK+15
(I)
PASSA
0
SAVE PRESENT LEVEL
SAVE
SET NEW BASE
SET NEW LEVEL AND
MASK
625
625
MASK OFF UPPER BIT
624
624
TURN OFF OVERFLOW IND.
0
0
0
GO
END
0
624
PAGE
NUISP
NUISP
NDISP
NOISP
NDISP
NDISP
NUISP
NOISP
NOISP
NOISP
NOlSP
NOISP
NOISP
NOISP
NOISP
NDISP
NDISP
NDISP
NDISP
NOISP
NDISP
NDISP
NDISP
NDISP
NDISP
NOISP
NDISP
NDISP
tmlSP
NOISP
NDISP
NOISP
NDISP
NDISP
N[)ISP
NDISP
NDISP
NOISP
NOISP
NDISP
NOISP
NDISP
NDISP
NDISP
NOISP
NDISP
NDISP
NOISP
NOISP
NllISP
NOISP
NOISP
NUISP
NDISP
NDISP
NOISP
10
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
3/0
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
3A9
390
391
392
393
394
395
396
397
398
399
400
401
402
()
]700 ASSEMfilY
or
.0
NOISP
646358 STORAGE USED
6400 ASSEMBLY
o
CLASS - VER 3.0
401 STATEMENTS
2.226 SECONDS
08/21/80
79 SYMBOLS
317 REFERENCES
00.20.12.
PAGE
11
CLASS - VER 3.0
1700 ASSEMBLY OF NOISP
COMPLETE REFERENCE NAP.
JMJ>
K6!5COR
LPf1SK
007C
0048
0007
0009
0049
004A
OOEB
0002
0104
00B8
00138
00A7
00B9
OOBO
00B4
OOEF
0001
00E6
00F8
OOFF
0125
0000
0002
MASCAL
MASCO
NOISP
NZERO
ONEBIT
OOCF
OODE
0000
0012
0023
PASSA
PC
PQ
PRIMRY
PRLVL
0127
0001
. 0003
0101
OOEF
ABSOLUTE
ABSOLUTE
PT
0002
ABSOLUTE
PISCHD
RCSCllfl
RESA
RESINT
SI\VLU
SCHA
SCHE(lU
SCHE02
SCI/ERR
SCHLNG
SCHSEC
SCI/STC
SCIISTK
SCHTOP
SCHX IT
SOIl
SCIllA
SCHIX
0012
0009
001C
0012
OOEO
003A
004B
0009
OOBC
004A
0035
0023
0049
0000
0045
003E
0042
0050
ABSOLUTE
ABSOLUTE
ABS
ACOMO
Af'IASKT
AREOXT
ASCHD
ASCLNG
ASYSOR
CKTlmO
COMEXT
CONT
COlJNT
DIRCAL
DIRI
OIRIA
Om2
DISCIf
OISPXX
ENSCH
HILVL
I
0
ABSOLUTE
ABSOLUTE
ABSOLUTE
*EXTERNAL*
AIlSOLlITE
ABSOLUTE
ABSOLUTE
-SYSTEM*EXTERNAL*
ABSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
"'EXTERNAL*
"'EXTERNAL *
*EXTERNAL*
*EXTERNAL*
6/10
4/17
3/51
Q
7/13
Q
4/39
4/40
Q
7/19
8/10
X
3/54
0
3/17
Q
0 10/37
7/18
7/35
7/40
7/28
9/25
E
3/17
9/13
7/60
6/31
10/57
X
8/19
4/28
Q
4/31
5/32
8/08
8/20
3/15
E
Q
7/40
4/20
Q
4/25
10/54
4/16
Q
4/36
0
10/17
3/30
Q
3/50
4/14
0
4/34
5/37
0
5/53
0
3/48
3/31
8/21
X
4/24
E
5/21
6/31
7/34
2/19 X
2/21 X - 4/40
4/10
4/12
3/33
3/58
4/39
2/21 X
2/14 E
3/16
4/35
4/18
4/28
4/26
4/32
4/23
5/28
5/25
6/07
3/38
2/32
2/23
4/09
4/11
2/31
2/21
2/25
2/25
2/32
5/45
7/33
7/36
7/26
9/15
2/13
9/10
5/49
3/40
10/31
2/18
2/34
3/28
3/47
7/45
8/18
2/10
2/34
2/37
3/43
10/33
2/44
2/45
10/14
2/22
3/23
-2/44
4/06
2/29
2/27
3/45
3/26
2/21
4/21
2/10
5/56
6/19 L
4/32
3/60
9/21
4/38 L
10/48
9/33
08/21/80 00.20.13.
PAGE
12
10/40
l.
L
9/17
9/26
4/37
3/48
10/45
4/38
3/53
L
L.
L
7/31 L
l
L
L
10/08 L
7/10
7/12
8/08
10/42
10/50
10/53
5/36
5/52
6/14
6/17
6/51
7/11
7/18
7/24
7/44
9/14
9/19
9/29
10/12
10/26
10/29
10/52
4/29
5/42
10/58 L
4/22
6/32
6/06
6/09
6/15
8/17
9/31
10/18
10/23
10/27
4/30
6/30
7/58
9/16
7/53
10/38
6/60
7/06
10/47
7/27
10/13
L
l
L
Q
9/25
L
3/59
5/46
6/24
6/44
7/27
7/25
L
7/51
10/16
3/37 L
3/32
L
Q
L
7/09
7/30
8/04
7/37
4/19 L
L
L
L
L
L
L
3/24
3/27
n
"
-
/
4/05
4/07
6/30
0
n
0
A5SHIBLV OF tJIlI5P
COMPLETE REFERENCE MAP.
l70n
SCII2
SPI
SVFAIL
n06E
OOtiO
SI
0062
S2
S3
55
S6
S6A
S61H
THREAD
nmfD1
TOMPT
TI8
0067
0082
OOCE
OIOA
0106
OlOE
009C
008r
00B4
0048
OOBI
*EXTERNAL*
ABSOLUTE
Tl9
OOEl
T9
VPL
004B
0004
ABSOLUTE
VPTR
VR
VTMP
0005
0003
0007
ABSOLIITE
ABSOLUTE
ABSOLUTE
VTPE
0006
ABSOLIJTE
XA
XI
XL
XPL
XR
ZERO
0001
0002
0005
0004
0003
0022
ABSOLIITE
ABSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
ZROBIT
0033
ABSOLUTE
5/54
5/3R.
2/20
5/40
5/48
6/22
7/55
10/24
10/19
10/21
6/46
6/40
2/22
2/16
2/17
2/13
2/3q
5/30
2/40
2/39
2/42
5/29
2/42
5/28
5/31
2/47
2/47
2/50
X
L
Q
E
E
E
Q
Q
Q
Q
Q
Q
Q
Q
2/4q Q
2/48 Q
2/35 Q
4/19
4/24
2/37 Q
6/05 l
5/44 l
fi/23
5/43
5/50 L
6/24 l
8/04 L
10/26 L
10/22 L
10/30 l
6/53
6/54
4/13
5/20 Q
9/07 Q
5/23 L
5/33
5/47'
6/26
5/26
5/39
5/44
5/34
5/41
5/50
3/49
3/39
3/18
3/20
3/37
6/28
6/50
7/22
0
ClASS - VER 3.0
08/21/HO 00.20.13.
5/46 L
6/59 L
4/15
6/20
6/25
6/52
7/41
7/04
5/27
6/16
6/18
6/05
6/08
6/11
7/54
8/09
7/21
9/11
6/29
7/59
6/12
6/27
6/41
8/11
8/15
7/31
9/12
10/20
10/28
6/59
7/08
7/57
10/46
9/18
9/20
9/27
9/32
10/10
10/43
10/44
3/42
10/41
7/35
7/42
7/56
10/08
10/17
10/22
10/39
8/13
8/16
9/13
PAGE
13
()
()
o
o
1700 ASSEMBLY OF RW
STORAGE ALLOCATION.
CLASS - VF.R 3.0
ADDRESS
l.ENGTH
0000
OOAE
OOAE
BINARY CONTROL CARDS.
NAM
END
nw
DECK-IO M09 MSOS 5.0
ENTRY POINT NAMES ANO ADDRESSES.
CKTlIRD -- OO~E
nPMASK -- OORB
RW
-- 0000
SAVltl -- 0012
TO
-- 0000
Tl
-- 0000
T2
T4
Hi
lOG}
lOG2
EXTERNAL SYMBOLS.
AlTSUB
08/21/80 00.20.13.
CONVER
lOGIA
-- 0000
-- 0000
-- 0000
SUMMARY
PAGE
CLASS - VER 3.0
1700 ASSEMBLY OF RW
*
*
*
5
*
PAGE
OR/21/AO 00.20.14.
DECK-IO H09 MSOS 5.0
NAM RW
MASS STORAGE" OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION, LA JOLLA, CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
Sur~MARY
READ WRITE REQUEST PROCESSOR
RW
RW(*)
2
-110 RW
RW
RW
RW
2
3
4
RW
RW
RW
7
R
9
5
10
0000 P
0000 P
ENT
EQU
0000 P
0000 P
0000 P
ENT TO,Tl,T2,T4,T6
RW
12
]5
ENT SAVLU ,CKTfIRD ,RPMASK
RW
13
RW
RW
RW
RW
RW
14
15
16
RW
19
**MSOS 4.0 RW
RW
RW
20
21
22
EQU PT(2),PS(5)
RW
23
EQU AMONI ($F4)
EQU ELU(5),EREQST(8)
RW
RW
24
25
EQU NZERO($12)
EQU ZERO($22)
EQlI LPMSK(2),ONEBIT($23)
RW
RW
RW
26
0000 P
0000
0012
008E
0088
20
002F
(1003
0004
0005
0006
0007
OOOB
00C2
OOBC
0089
0002
0005
00F4
0005
0008
0012
0022
0002
0023
0002
25
30
35
40
45
50
poono"
poom
POOO2
55
POO(l3
pnon4
pooos
PO(lOfl
()
0822
C108
0133
OAOfl
A]03
fiJ03
C622
P
P
P
P
EXT
EXT
EXT
EQtJ
EQU
LOG2,LOGl,LOGIA
SUB. TO SET Q=ALT. IF LU IN Q IS DOWN
ALTSUB
CONYER
HIOOO($2F)
VR(3),VPL(4),VPTR(5)
EQU VTPE(6),VTMP(7)
EQU VID(8)
EQlI lIBLU($C2)
EQlI ALtJABS($RC),AREQXT($B9)
*
*
*
*
*
*
Tl
*
*
RJ
M.M. CLASS CODE
EQU MMCOUE(2)
ON ENTRY A. Q, AND I CONTAIN THE FOLLOWING
A,
PARAMETER LIST LOCATION
PARAMETER GIVING
Q,
ADDRESS OF PROCESSOR
ADDRESS OF VOLATILE
I,
PARAMETER LIST TO Q
TRA Q
LDA- R,I
SKIP IF INDIRECT REQUEST
SAM RI-*-1
INCREMENT RETURN ADDRESS
ENA (;
ADD- VR.I
STA- VR,I
SET liP PRIORITY LEVEl. OF TIfE REQUEST
LIlA- (ZERO).O
0
RW
RW
RW
RW
RW
RW
RW
RW
uMSOS 4.0 RW
**MSOS 4.0 RW
HW
RW
RW
RW
I~W
RW
17
18
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
0
C)
0
ClASS - VER 3.0
1700 ASSEMBLY OF RW
5
10
IS
2(l
POO07
POO09
1'800
6104
P(l(l13
POOl4
C107
0400
0112
EOC2
1804
5~00
54BC
41(l7
OOlE
30
35
40
P(l0l5
POO16
POO17
POO18
POO19
POOIA
POOIB
POOIC
POOIO
POOlE
POOIF
P0020
P002I
P0022
POO23
P0024
PO(l?"
P0027
fl08
OFC5
A005
09FO
0119
0178
Et05
C622
A031
0112
C205
0132
0103
0103
flO7
FOOO
OOFO
0500
POO?R
4](l6
POO£!9
POO?A
POO2B
P002C
P0020
P002E
P(l02F
E202
0000
0151
1808
C622
A85A
9104
0133
£106
45
50
55
1>0030
P0031
P0032
f202
VTMP,I
0
RWUSER-*-I
LIBlU
SAVlU
CKHIRD
(ALUABS)
VTMP,I
*
*
*
*
IF THIS IS SYS DIR
CHECK THREAD lOC FOR 0
*436
SAVE lOGICAL UNIT NUMBER.
Q CONTAINS THE ACTUAL lOGICAL UNIT NUMBER.
IF CAll WAS-OIRECT.
tDO* (AlOG1A),Q
lOA- 8,0
7FFF X
08/21/80 00.20.14.
GET LOGICAL UNIT NUMBER IN Q
LDAEIN
SAN
lOQJMP*
RWUSER RTJ
RTJSAVlU STQ*
*
.*
EE34
C20R
1'5
',--J
AND RPMASK
STA- VPL,I
0080
*
POOOA
POOOS
POOOC
POOOD
POOOE
P(lOOF
POOll
POO12
(')
IF CAll IS TO MASS
MEMMORY AND S15 IS ZERO
AND IF REQ. IS NOT
INDIRECT, THEN ADD 2
TO THE RETURN
LDQ- VID, I
AlS 5
MASK OFF CLASS CODE
ANo- LPMSK+3
IS THIS A MASS STORAGE DEVICE
INA -MMCODE
SAN THDSTR-*-I SKIP IF NOT
SQM TlfDSTR-*-1
LDQ- VPTR,I
lDA- (ZERO) ,Q
AND- ONEB IT +14
SAN R2-*-1
LOA- PS,Q
SAM THoSTR-*-1
RAO- VR,I
R2
RAO- VR, I
THDSTR LOQ- VTMP,I
AOQ -;'XLOG2
INQ -2
lIN
I-CARD nELETEO
*
*
GET NEXT ENTRY FROM THREAD
*
*
PRECEOING ENTRY SAVED
THDNXT STQ- VTPE,1
1O-CARDS DElETED
*
NEXT ENTRY ON THREAO
lOQ- PT,Q
INO 0
SQN TlIIH-*-1
JMP* RCTHo
TUREAo END. GO THREAD
IF ENTRYS PRIORITY IS
THDI lOA- (ZERO),Q
REQUESTS PRIORITY
AND* RPMASK
SUB- VPl,1
THEN GO nlnEAO REQ.
SAM RCnlD-*-1
LDQ- VTPE,I
l.DO- PT,Q
**MSOS 4.0
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.0
4.0
4.0
4.0
4.0
4.0
4.0
PAGE
3
RW
RW
45
46
RW
48
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
50
51
52
53
54
55
56
57
58
59
60
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
62
63
64
65
66
67
R~I
RW
RW
RW
RW
RW
RW
RW
HW
RW
HW
6A
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
·99
IOU
101
CLASS - VER 3.0
1700 ASSEMRLY OF RW
Pon33
JMP*
*
*
*
RCnln LDQLDAlDOSTA-;
TRQ
LDQSTA[IN
*
*
*
LDQ-
lRF4
!l
10
ron34
POO35
POO36
POO37
POO38
P(l039
P003A
P003B
noo
Cl'(l2
EI05
0202
P003C
Elo]
0~14
ElOo
0202
0400
15
*
*
*
*
25
30
P003D
P003F
P0040
- POOH
POo.12
POO,B
poO,~4
35
40
45
POM5
POO·16
POO47
POO4A
P0049
P004A
POOIIB
POOl\C
POOtlD
POOtlE
POO/IF
POO~iO
50
POOfil
POOS3
POO~.4
POO55
P(l05ll
55
P0057
POO~9
POO!iA
POO5R
n
5400
0148
1839
7FFF X
0500
n07
OAFF
6E3E
CEF9
A02F
0101
1817
CI07
5400
fROB
0141
1811
7FFF X
6REn
coon
BOEF
llAil2
!l4F4
I1C20
128
129
RW
RW
RW
I-CARD DELETED
3 CARDS DElETED
62*1174 RW
RW
RW
REQUESTED LOGICAL UNIT
62*1174 RW
RW
30*534
RW
CLEAR THREAD IN LOG2
30*534
RW
RW
CHECK BIT 12 OF LOGI ENTRY
flW
~IIECK MSG. FLAG BIT
RW
62*1174 RW
RW
IF REQUEST CURRENTLY BUSY COMPLETE 62*1174 RW
CURRENT REQUEST WITH ERROR AND OUTPUT
RW
RW
MESSAGE NEXT TIME LU REQUESTED
RW
PUT LU IN MESSAGE
HW
***MSOS4.0 RW
SET liP CP PR lOR lTV 30""531
RW
SET liP ClIRRENT REQUEST PR lOR ITY
HW
RW
OllTPIJT UI OOWN MESSAGE
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150151
]52
153
POINTER TO NEW LIST
END OF THREADING
IF DEVICE BUSY. RELEASE VOLATILE
ACTUAL LU IN Q
1 CARD DELETED
62*1174
RTJ AlTSUB
SQl AL Tl-*-1
JMP* AlT~
*
OWNMSG ALF 5,L,
4C2C
2020
2044
4F57
4E20
7FFF X
7FFF X
RW
RW
POINTER TO PREVIOlIS ENTRY
VTMP,I
ALOGI ADC
ALOGIA ADC
*
*
*
lIN
AL Tl
LOQENA
STA*
LDA*
ANDSAl
JMP*
LDARTJ
lOQ*
SQl
JMP*
TOOWNM SfA*
*
LOA
EORSTA*
RTJ-
DOWN
LOGI
LOGIA
VTMP,I
-0
{ALOG2~,Q
(ALOGI ,Q
mooo
1
G01
VH1P,I
CONYER
TUREAD
TODWNM
GOI
DWNMSG+l
=N$4C20
$EF
nWN
(AMONI)
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
4
RW
RW
THREAD NEXT ENTRY
VTPE.I
PT.Q
VPTR, I
PT,Q
A
VTPE.I
PT.£)
PAGE
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
THIHIXT
IN CASE ALT. TO BE USED, THE
FOLLOWING CODE SUBSTITUTES IT.
IF NO ALT. AVAILABLE, REQ. REJECTED.
*
*
20
OR/21/80 00.20.14.
*465
()
-
nw
(J
0
0
5
0000
0000
0000
10FC
0005
0041 P
10
P0062
POOfi3
P0064
P0065
n07
CEE2
B02F
6EEO
15
P006fl
POOfi7
P006fl
POOfl9
P006A
P006B
POOflC
pnOflD
P006E
POOfiF
P0070
POO]]
POO72
poon
P0074
P0075
P0076
POO77
P0078
nos
C203
AOOF
ROlF
6203
C201
0112
6202
lrOA
C622
B032
6627
0500
4fl04
E203
54F4
2000
(lOOO
14B9
P0079
POO7A
P007B
POOlC
HCD
0500
C205
011A
20
?5
30
UPDATED WITH REQ CODE AND CURRENT PRIORITY
NUM 0
AOC 0
30*531
62* 1174
TIIREAD NUM 0
NUM $lOFC
NUM 5
ADC DWNMSG
***MSOS4.0
*
-J
.......
COMP LDQ- VTMP.'
62*1174
LDA* (ALOG1) ,Q
SET MESSAGE FLAG BIT
EOR- 111000
STA* (ALOG1).Q
*
62*1174
G01
LDQ- VPTR.I
LOA- 3.Q
AND- lPMSK+13
EOR - NZEROt·13
SET ERROR COllE I N REQUEST
STA- 3.Q
*MSOS V4.0
LDA- I.Q
SKIP IF NONZERO COMPo AODRESS
*MSOS V4.0
SAN ALT2
CLEAR REQUEST THREAD
*MSOS V4.0
STA- 2.Q
*MSOS V4.0
COMPLETE REQUEST
JMP* OUT
**MSOS 4.0
ALT2 UlA- (ZERO).O
**MSOS 4.0
EOR- ONEBIT+15
uMSOS 4.0
STA-. (ZERO).Q
liN 0
STO* ESCIID
ERROR WORD
LDQ- 3.Q
RTJ- ($F4)
**MSOS 4.0
NUM $2000
INDIRECT REQUEST(PART 1 TYPE)
ESCIm NUM 0
OUT
JMP- (AREQXT)
OWN
I
35
40
45
5(1
*
*
*
POOlO
P007E
POO7F
POORO
POO~l
55
ALT3
rOOA2
POOR3
PonR4
PonR5
POORfi
Poon7
POO8R
C107
0400
fi205
0500
4803
54F4
7000
0000
0500
0173
14B9
OOFO
*
*
*
*
LDQ*
JJN
LDASAN
(ALOGIA) ,Q
0
ElU.Q
RHESV-*-1
PHYSTB ADDRESS
GET LU ASSIGNED
IF LU .NE. ZERO, EXIT VIA RELESV
PtJT LU NUMBER IN EQUIPMENT TABLE
LOA- VTMP,I
ElN 0
STA- ELtJ.Q
nEQUESTEO LU
SCUEOlJLE ORIVER
IItJ 0
STO* RSCHO
*
RTJNUM
RSCIUl AOC
liN
SOM
RELESV JMPRPMASK NIIM
lAMONI)
2000
RW
HW
RW
RW
RW
RW
RW
nw
RW
RW
RW
IW
RW
RW
RW
RW
RW
RW
RW
RW
HW
RW
RW
RW
RW
RW
RW
RW
RW
RW
RW
nw
RW
RW
RW
RW
RW
RW
RW
HW
RW
RW
RW
RW
********** RH
RW
R~I
INDIRECT SCIIDLE REQUEST
0
0
GSK1A·
(AREQXT)
$FO
PAGE
08/21/80 00.20.14.
CLASS - VER 3.0
1700 ASSEMBLY OF RW
. P005C
P0050
P005E
P005F
POO(jO
P0061
0
REQUEST PRIORITY MASK
********** RW
RW
***MSOS4.0 RW
RW
RW
*436
RW
*436
RW
RW
5
154
155
156
1'57
150
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
186
187
188
189
190
191
192
193
194
195
196
197
190
199
200
201
202
203
204
205
206
207
208
209
ClASS - VER 3.0
]700 ASSEMBLY OF RW
POOR9
00?5 X
POOflA
ppnno
p(10rC
POnrD
POORE
pnnnF
Pongo
FOll
(111(10
filO!)
5
In
POfi~]
15
20
25
30
35
40
P0092
POO,I
-10
CORZ
J(65TIO
lllCORE
SAVLlJ
POOIA
PonlB
0000
FFFF
MO~'\
GET REQUEST PRIORITY
r<.eo., , p "- Oq ~
CHK FOR ZERO THREAD LOC.
CHECK REQ CODE
SPACE REQUEST CC()(fL (2 QI.A.JA\)
A PARTITIONED REQ
SET UP LU FOR ALLOCATOR
ENTER TIME/OATE Q CODE
TOIOLE ENO 1
SCHOLE (TrlFlJtlC) 4
JMP+ IDLE
\\'\
SKIP IF INDIRECT REQ
INCREMENT RETURN ADDRESS
FOR DIRECT
CALL
t
POO]6
pOOJ7
PonlR
**MSOS 4.0 SPACE
SPACE
**MSOS 4.0 SPACE
**MSOS 4.0 SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
**MSOS 4.0 SPACE
**MSOS 4.0 SPACE
**MSOS 4.0 SPACE
**MSOS 4.0 SPACE
**MSOS 4.0 SPACE
SPACE
129
130
131
132
133
134
135
136
137
138
139
140
141
**MSOS 4.1** SPI\CE
**MSOS 4.1** SPACE
148
149
**MSOS 4.1** SPACE
150
SPACE
SPACE
SPACE
SPACE
152
153
154
155
p",,\ . COle.-- r e.a, -:c \i~;.(:>t\G£ ~ 10
C(vO'lf\
GO TO IDLE LOOP
5
122
]23
]24
125
126
127
lllCORE MllST BE EQlIATED TO THE LOGICAL
lINIT ASSIGNED TO HIE CORE ALLOCATOR.
Oor1O P ~ EQU TII(')
TIO
TRA Q
LDA- 8, I
SAM COR1
ENA 5
PAGE
SPACE
SPACE
SPACE
SPACE
SPI\CE
SPI\CE
RW REQUEST PROCESSOR MIIST BE PRESENT
FOR OPERATION OF THIS MODULE.
*:
20
08/21/80 00.20.22.
CLASS - VER 3.0
1700 ASSEMBLY OF SPACE
5
0
***********************************************************************
TOTAL LENGTH OF ALLOCATABLE CORE
AREAC AVC 0
THREAD
ADC ($7FFF)
*******************.***************************************************
0~ \0:: AJOCiUU 'CQq
\7 'ftM\
' CO'(e...,
142
143
144
145
146
S ¥-3\) lLA.
\ao.0~
~/VJ
\7
~ (y'0 ·!Jvr "
1 If))!:'6~"iJ.,I\.V'f"
'v)
'f"''Oc.Q Ss Do("
'!-'
,
]7110
ASSEMBLY OF
CtASS - V[JI 3.0
SPACE
*
*
*
*
*
*
*
*
10
*
*
*
*
15
*
*
*
*
?O
?5
30
POOle
POOlE
POOIF
POn21
POCl22
P0024
P0025
P0026
pon2~
35
()
'----- ./
P0029
P002A
1'0028
p002e
P002E
C~OO
04QF
OQ(\2
fl~OO
OCOF
cono
OOFf
60FF
CAOO
04~C
001A P
0495
OIlll
0902
80FF
0143
6flOO
18F5
7FFF X
THIS IS THE R[START ROUT]NE.
08/21/8U 00.20.22.
ITS PUHPOSE IS -
SET liP TIlE CORE ALLOCATION TARLE
PROTECT AND UNPROTECT APPROPRIATE CORE LOCATIONS
SET ur TIlE SYSTEM DIRECTORY ENTRY OF CERTAIN JOB
PROCESSOR MODULES
4.
START TIlE SYSTEM TIMER, AND INITIATE TIlE DIAGNOSTIC
TIMER AND TIME-OF-OAY PROGRAMS
5.
PRHlT TIlE SYSTEM PSR LEVEL MESSAGE
6.
REQIIEST TIfJ\T THE PROGRAM PROTECT SWITCH BE ENABLED
IF IT IS NOT
7.
prUNT TlfE SYSTEM HlENTIF IGATION
~.
PRINT THE SYSTEM CORE SIZE MODE
9. PERFORM A VALIDITY CHECK ON TIlE SYSTEH FILES (IF J\NY)
10. INITIATE A REOUEST FOR TIlE TIME AND DATE
11. TRANSFER CONTROL TO TlfE SYSTEM IDLE LOOP
1.
2.
3.
PAGE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACF.
SPACE
SPACE
SPACE
*
SET UP THE CORE ALLOCATION TABLE
SPACE
*
SPACE
RESTRT LOA ALCLGIf
122*4381 SPACE132
INA 2
ALLOW ROOM FOR THREAD BETWEEN AREA 0-1
SPACE
STA ALCLGH
SPACE
RSTI ENQ 15
122*4381 SPACE132
LOA =XAREAC
SPACE
SETTRL INQ -1
SETUP ALLOCATION TABLE (LVLSTR)
SPACE
STA- I
SPACE
LOA ALCLGH,Q
SPACE
SAl CHKEND
NO ALLOCATION, SEE IF DONE
SPACE
INA 2
SPACE
CHKEND ADD- I
SPACE
SQl SETEND
SPACE
STA lVLSTR,Q
SPJ\CE
JMP* SETTBL
SPACE
174
175
11
178
179
12
IHO
luI
182
183
184
185
IH6
187
188
189
o
c)
0
CLASS - VER 3.0
1700 ASSEMBLY OF SPACE
5
!l
10
15
20
25
30
0901
POO2F
pn03£)
Mfln 7FFF X
J700 ASSEMRlY OF SPACE
P£103?
P0033
POfl34
Pon35
P0036
POO37
P003~
P003A
Pfl03B
P003C
POO30
POO3F
POO40
POO41
POO42
P0043
P0044
P0045
Pfl046
PflO47
Pfl048
ron49
POO4A
P004C
pn040
P004F
POO!)]
POO53
SETENO INA 1
STA LENIJ
OCOA
EfiE9
OJ!'}
I~OF
fl8fi2
COOO
OR34
0121
FIX4
7FFF X
IH1~
0105
EOOO
8203
fi203
181lF
0854
1807
08?2
90Fl
0132
40Fl
40EO
0814
9000
fiRCD
6400
MOO
1'400
lA10
FIX4A
041lC P
FIX4X
FIX4Y
0019 P
7FFF X
7FFF X
7FFF X
0
SK I PIT
ENO
LOOSON
JMP*
TCA
LOA
AAQ
SAP
JMP*
SAZ
LlJQ
AOOSTAJMP*
TCQ
JMP*
TRA
SUBSAM
STQSTQTRO
SUB
STA*
STA
ST/\
STA
JMP*
10
($E9),Q
FlX4
FIX4Y
Q
=XfNDOV4
A
FIX4A
NTENUF
FIX4X
:.~XALr.LGU
3,Q
3,Q
RSTI
A
SKIPIT
0
$Fl
SKIPIT-l
$F7
$ED
A
=XAREAC-l
AREAC
CAL TlfO
MIBX
[flOCK
INIT
08/21/80 00.20.22.
SETUP ENO OF PROTECTED ALLOCATABLE AREA
CLASS - VER 3.0
08/21/RO 00.20.22.
**MSOS 4.1**
**MSOS 4.1**
IS UNPROTECTED IN PART 1
122*4381
YES
122*4381
NO
122*4381
-(END OF ALLOCATABLE) TO Q
AOOR OF LAS T LOCATION I N PART 0 TO A 122*4381
122*4381
COMPUlE ; EXTRA LOCATIONS
122*4381
SKIP IF EXTRA.GE.ZERO
GO AWAY IF NOT ENOUGII ROOM
122*4381
122*4381
SKIP IF ZERO EXTRA MEMORY
START OF LENGTlf 1ABLE TO A
122*4381
122*4381
ADD EXTRA TO REQUESTED AREA 4
122*4381
STORE BACK IN TABLE
122*4381
SET UP ALLOCATABLE WITU NEW AREA 4
122*4381
SET A TO END OF ALLOCATABLE
122*4381
122*4381
IS TIlE SIZE OF AllOCATABLE GREATER
THAN SPECIFIED BY lifE INITIAlIZER
NO
YES, SPECIFY TIlE NEW SIZE
8
()]
SPACE
191
SPA@ 10)
AGE
SPACE
SPACE
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
SPACEl32
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SETUP TOTAL AVAILABLE PROTECTED ALLOCATABLE
SPACE
SPACE
LOCK OUT MIPRO
**MSOS 4.1** SPACE
LOCK OUT LOGGER
122*4381 SPACE!32
194
195
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
198
199
200
201
202
203
204
205
206
707
29
PAGE
SPACE
0202
0201
o20ft
0205
0206
020 T
020&
olOt)
0210
0211
P f f i t E6E.9
PO 0
01 'it
POOlS
OF
PO 03f> 066
POOlT COOO
POOl8 TfFF
POOl9 08llt
POOlA 0121
P0030 1819
POOlC 0105
021 Z POOlO
P003E
0213 POOJf
)21" POOltO
aZ15 POO,.1
0216 PDOItZ
0211 POO .. ]
021& POD'...
0219 POOltS
0220 PO U'.6
0221 POOlt1
0222 POOf.8
o22J POO .. 9
o 22ft POO .. A
poo .. o
0225 POOItC
0226 POO'.O
POO .. E
022T POo .. F
o
EUIl
10
LUU- U[q.,£1
S£1U
F IX'.
JHp· fIXity
POO.J2 OCOA
FIX~A
EOOO
OftOC P
820]
620]
IS0F
F[X~)(
085,.
1801
0822
90F1
0112
.. OFT
.. OED
081 ..
'laoo
0019
611CD
6 .. 00
1FFE
b
0
FI)(~Y
TCA
Q
LOA
::XEtiOOVIt
OATEI 08/21178
ft
(S t!NPROTEClEO IN PARr 1
YES
L
NO
-CUID Of ALLOCATAOl.E. In {)
AOORo OF LAST LOCATION I~ RT 0 fO
A
C OHPUI E , EXTRA L OGAJ...rous
AP
FIX .. A
SKIP IF EXIRA.r,r.l-flfo
JI l!.... tnENUF
[;0 AHAY IF NOf /[.t{OUGII ROmt
SAZ~(IX~X
SKIP IF Z[~O f~TRA HENORY
LOQ =1t~LGH
s rAin O/t1GTIt lADLE TO A
AOO- l.Q
AOO EX/TRA TO REQUESTEO AREA ~
STA- 1.Q
STOflE OACK IN lAOlE
.JHp. RSTl
,,-~UP AllOCATAOLE "lfH NEM AREA..
TCQ A
y"-SET
TO END OF AlLOCAIAOlE
J"p. SKIPIT
.
TRA
Q
IS THE SI
Of ALLOCATABLE GREATE.R
SUO- SFT.
IIlAN SPEGIFI ll....!JY HIE INlllAlIZER
SAH
SKI"P1T-l
NO
~
5TQYES, SPECIFY TIlE
SIZE
SlQ-/SEO
t'
sn
T..Ret A
SKIPITAuB
=XAREAC-l
Sf A" ARE'AC
SrA
CAL THO
SETUP TOTAL AVAILAOLE
STA
HIOK
lOCI( OUT HI PRO
0218
P~-1FfF
PO
1 6ftOO
STA
EFLOCK
lOCI( OUT lOGGER.
022
P- 052 lFFF
POOS] 1810
JHp· INIT
/
··HSOS.At.l··H2Qn01Qj
·"tlS-o.'i ".I··"2<)00IQ"
A
122· .. 381········
122· .. 381········
122·"J81····· .. •
122· .. 361····· . . •
122 ..d e l · · · · · · ..
122· .. J81······ . .
122·" J81··· . . . . .
ll2·~Jftl········
122" .. 381··· •••••
12Z· .. 381········
122" .. ]81········
12Z· .. 381······ ..
122· .. 381········
122· .. 381········
lZ2·~l81········
H29001')1
H2900198
H2Q0011)9
H 290 0 200
Hl900201
H2900202
H290020]
H 2'10 0 20 ~
o
(J
(,)
,--J
CLASS - VER 3.0
1700 ASSEMBLY OF SPACE
10
IS
20
25
30
35
9
31
32
33
34
35
36
37
122*4381
122*4381
122*4381
122*4381
SPACE132
SPACE132
SPACE132
SPACE132
39
40
41
42
*»INSlIFFICIENT ALLOCATABLE MEMORY*
122*4381 SPACE132
44
NTEMSL(*-NTEMSG)
122*4381 SPACE132
45
P(l056
P0057
P0058
POO59
P005A
(AMONI)
$OCOO
0
0
$lAFC
NTEMSL
NTEMSG
P005B
PCl05C
POOS£)
POOSE
C8FB
0101
InFO
54110
NTEWAT LOA*
SAZ
JMP*
RTJ
NTETHD
1
NTEWAT
SYFAIL
P0060
POOfil
POOti?
POOfi3
POOM
POOfi5
POOfifi
POOfi7
POOfiR
P(lOfl9
rOOfiA
P006B
POOtiC
POOfiO
POO6E
POO6F
494E
5355
4fi4fi
NTEMSr. ALF
NTEMSL EQU
7FFF X
PRINT INSUF~ICIENT MEMORY MESSAGE
PAGE
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
NTENUF RTJAOC
AUC
NTETHD AOC
NlIM
ADC
ADC
POO~5
08/21/80 00.20.22.
122*4381
122*4381
122*4381
122*4381
122*4381
122*4381
122*4381
54F4
OCOO
0000
0000
18Fe
0010
0060 P
POO54
5
0
WAIT FOR COMPLETION
KILL SYSTEM
4~43
4945
4[54
2Cl41
4C4C
4F43
4154
4142
4C45
2040
4540
4F52
5920
0010
CLASS - VER 3.0
1700 ASSEMBLY OF SPACE
10
1!l
20
25
P(lOlO
COOO
POO72
POOl3
POO74
BOll
0111
1827
POM!)
PO(l](l
POO77
onOB
01'44
OCOF
POM8
OBC3
Pon7~
Bono
40
pn07B
n6A3
POP7C
0500
POOlO
POO7E
POO7F
POOPO
POOBl
OBOC
OA}(l
OFCB
6OFF
097F
POD82
POO83
P0083
07Cl
7FfF X
0071 P
0075 P
30
35
116*4381
116*4381
116*4381
116*4381
116*4381
116*4381
1. SET PAnE REGS 0-15 TO 0-15 BECAUSE
116*4381
TIfIS CODE IS IN THE LOWEST 32K OF MEMORY
116*4381
---------116*4381
2. GO TO PAGE MODE 0
116*4381
3. USE PAf.E REG 16 TO INDEX PAGE (2K) TO WORK ON
116*4381
START WITH PAGE 1~7 (POSSIBLE LAST PAGE IN MACHINE)
116*4381
4. WRITE S18FF TO ALL LOCATIONS IN CURRENT PAGE
116*4381
AND SET PROTECT BIT ON
116*4381
5. DECREMENT PAGE NUMBER UNTIL ALL PAGES ABOVE $FFFF
IN BOTH CPUS HAVE BEEN COVEREO.
116*4381
116*4381
IF A PAGE DOES NOT EXIST, THE WRITE OPERATION WILL
116*4381
BE ABORTED AND PARITY ERROR SET
116*4381
6. GO TO ABSOLUTE MODE
116*4381
7. SET UP PAGE REGS 16-31 TO CONTAIN 16-31. THUS
PHYSICAL ADDRESS = LOGICAL ADDRESS FOR THE LOWEST 65K.116*4381
*
116*4381
*
116*4381
CURRENT CONTROL POINT
INIT LOA =XCCP
116*4381
EQU ACCP{*-I}
116*4381
EOR- LPMSK+15
116*4381
SKIP IF PATCHED
SAN SETUPO
116*4381
JMP* SPBLPO
116*4381
SETUPO EQU SETUPO(*)
116*4381
GO TO ABSOLUTE MODE
APM 0
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
5
50
07C2
CAM
OOA" P
n
64
65
66
67
68
69
70
71
72
73
74
*
WRITE IN PAGE REG
INCREMENT PAGE REG AND ITS CONTENT
116*43Pl SPACE132
116*4381 SPACE132
116*4381 SPACE132
78
79
80
lIN 0
PMO 0
INHIBIT INTERRtJPT FROM PARITY ERROR
GO TO PAGE MODE 0
116*4381 SPACE132
116*4381 SPACE132
116*4381 SPACE132
81
82
83
ENA
ALS
STAIf'JA
XFA
116*4381
116*4381
USE PAGE REG $10 TO INDEX EACII PAGE
CURRENTLY BEING WRITTEN
116*4381
MAX PAGE IN MACHINE
116*4381
REri 1 CONTAINS CURRENT PAGE'(BITS 0-8)116*4381
SPACE132
SPACE132
SPACE132
SPACE132
SPACE132
84
85
86
87
88
AND PAGE REG (BITS 10-15)
TOTAL NO. OF PAGES = 96 ($60)
FROM PAf1C
Pn?fiO
]OFO
COOO
OlO?
!iAOO
7FFF X
01B3
OOAA
7FFF X
M06
Bfi22
fili?2
PP30
lAF2
TIB
~AMOt'H)
IRQ
P-
EORSAZ
LOASAZ
LDA
Af'lOEORSTARAO*
JMP*
LPMSK-tJ5
TIB
(ZERO) ,0
SETPF
PCORE
LPMSK+4
(ZERO}.Q
(ZERO),O
ATe
Tl
WRITE MODE MESSAGE
WAIT FOR COMPLETION
GO CLOSE ALL JOB FILES
GO CHECK FOR FILE ERRORS
INHIBIT WHILE SETTING PRIORITIES
LOAO 0 WITH COUNT VALUE
f.ET AOORESS FROM TABLE
00 ~OT SET PRIORJTY IF
EXTERNAL IS Uf-IPATOIEO
IF VALUE OF AonRESS IS ZERO
TARLE IS COMPLETEO
GET CORE ORIVER COMPLETION PRIORITY
AND
STORE BACK INTO REQUEST
CONTlNU~ SETTJNG PRIORITIES
()
4.1**
4.1**
4.1**
4.]**
4.1**
4.1**
4.1**
(iIA
6]9
fi20
621
622
623
624
625
626
OCOl
0
0
$18FC
7
0
Pr'?~4
dO
P
O?P~
CIIECK MilL TJ -LEVEL ItJOJRECT
FOR MOOE
RT JAOC
AOC
MODETH AOC
ADC
ADG"
MMODE AOC
PO:?~4
3r;
OW]
IA04
COOfl
)AOS
cnoo
OCOl
114fCl
(lA07
13
(J 1)
!'4F4
OC01
(lOfln
0000
H1FC
0007
0000
Pfl?4E
PO.24F
PMsn
P02S]
POlS?
POl53
25
:10
CCf'~
BPM
629
630
631
632
633
634
640
641
611H
649
650
651
652
653
654
655
656
657
o
.~
0
\_~
17(1(1 ASSnWL Y (IF SPACE
5.
10
Pf1?(lE
P0270
PO? 71
P02l?
PO?73
PO?74
P027!'
1'£l276
J5
20
25
~£l
conn
BOI J
0111
JH29
OClF
ORJ4
OFCB
0874
PWI77
ORC3
P(1?7P
P£l?79
Pfl?7/\
P077B
0142
Pf1?7C
P£l27[1
P077F
ponF
Pn?PJ
PO?P2
Pfl?P~
7FFF X
OOFf
]PFQ
OBoe
OM(l
(lf1]O
£l!'or
~lt100
7EFF X
OJ33
0102
£ljC£l
PO?Pt1
JP]7
POI'P~
C~J5
PO?P6
p(1?pr
B4£lO
ORC3
P02fl9
P028A
P0211C
P02A[)
P02PE
COOP
B4(10
6R03
PO?Q(I
6400
POI'!,?
CAFE
/\OOD
£lJn?
09FE
JPF3
PP03
7FFF X
3~
40
45
P(l2~3
PO?~4
P0295
PO?~(l
!'(1
PO?07
P(1?OR
P(l7°9
Pfl?Q/\
7FFF X
fi~04
C400
CPO?
)HE~
0(1(10
0000
02BF P
0000
Oe91 P
0
ClASS - VfH 3.0
08/2]/~0
nO.20.2ll.
(;IIECK IF NEEO TO SET UP PAGE FILE FOR EXTENDED COHE STORAGE
*
*
FETCH EXTENDUl CORE POINTER
SETPF LOA =XPJ8ECM
EOR- LPMSK+15
SKIP IF EeM IN THE SYSTEM
SAN SPF
JMP* TII\A
SET LAST PAGE FILE ADDRESS
SPF
ENO 31
SPFJ
TRO A
PAGE FILE SELECTEO. BITS 11-15
ALS 11
VALUE SET • BITS 0-8
EAO A
BITS 0-8 (IF A GO INTO PAGE FlU SPECIFIED BY BITS 11-15 OF A
*
o FOR PAGE FILE ZERO
BIT 10 SPECIFIES FILE 0 OR 1
*
HAHOCOO[ ENIIANCED INSTRUCTION
NliM $ORO
SET UP THIS PAGE FILE
WPR A
*
SKIP IF ALL FILE ENTRIES SET
SOZ SPF~
INO -1
CONTINUE SETTING PAGE FILES
JMP* SPFI
SET PAGE MODE TO ZERO
SPF5 fJUM $OBOC
WANT TO HESET IJPPER CORE IN CASE OF PAR ITY IN MOS MEMORY.
*
FETCH ANIl RESTORE WItL CLEAR MY PAR ITY AND NOT CHANGE UPPER CORE
*
BIAS TO FIRST fi5K OF UPPER CORE
ENA $20
STA* PFCNT
JItJ 0
MINUS MAXIMUM PACE IN SYSTEM
RSETl SUR PJPMXP
SKIP IF NOT ENO
SAM RSET2
SKIP IF NOT nONE
SAZ RSET2
CLEAR PARITY INf AND STATUS
SPE 0
,JMP* TIAA
RSET2 LOA* PFCNT
BRING IN ECM PAGE ADDRESS BITS 10-15
EOR P18PGA
BARD COllE ENHANCED INSTRUCTION
NlIM $ORC3
SET UP TillS PAGE FILE
WPR A
*
LAST ADDRESS IN 2K BLOCK
$7FF
lOA- LPMSK+ll
OR IN BLOCK AOOR[SS
RSET4 EOR P1RADO
STA* LRSH
STA* SRSET
LDA+ 0(100
LRSET EOII LRSET{*-I}
STA+ 0000
SRSET EQU SRSET{*-1 }
LOA* SRSET
SAVE 2K AODRESS ONLY
AND- lPMSK .. l1
Sft.Z RSET6
INA -I
JMP* RSET4
RSETfi RAO* PFCNT
tnA* PFCNT
JMP* RSETl
PFCNT NIIM n
PAr,E
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
25
(.59
660
661
662
663
664
665
6hfJ
667
668
669
670
671
672
673
fi74
675
67fi
677
678
67(1
tiRO
flAl
fiR?
683
fif>,4
685
686
687
688
6H9
690
691
692
693
694
695 .
696
697
698
699
700
701
702
703
704
705
706
707
ClASS - VER 3.0
]700 ASSEMOLY OF SPACE
5
P02!)B
PO?OC
prl,'·tp
pn7QF
P(l7111
)0
p;
25
3(1
(j
TIM
X
OO!'2 X
(l0~0
frill
W(lO
Pn?Jl3
P(l7M
(1(1(1)
(10 (I (l
PMI\!'
P7Ati P
07A7 P
7FQ(
(1£100
P02A~
PMA7
P(l?J\P
2f'
(11100
01\00
()4(1(l
MO(l
P(l7A9
P02AA
P(l7J1R
p02i\C
P02All
P02AE
P07AF
P02BO
P02Bl
P02B2
P07B3
P02B4
pPFtAr. ~\lM
HAGIT NliM
(I(l(l(l
7EFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
JFFF
0022
EIN 0
ENA 0
STJ\ MIBX
STA EFUICK
,JMP TOIOLE
X
X
X
X
X
X
X
X
X
X
12
AOC
AllC
13
NIIf~
ATC
T
NliM
AOC
ADC
AOC
AOC
ADC
ADC
ADC
AOC
11
08/21/80 00.20.24.
CLEAR MIPRO AND
LOGGER LOCKOUl FLAGS
r.O TO IDLE EX IT
1
(I
(l2)
I3
PF9C
SAVIll NIIM 0
0
OIlTPIIT
SPACE4
NOG30A
REL
SCU
PTNALC
PTNREl
SPCEV4
I\DC RDPTV4
ADC OUTPV4
MC ZERO
INDEX FOR TABLE
THIS IS USED TO INDICATE THE END
o
PI\(;E
26
SPACE
**MSOS 4.1 ** SPI\CE
SPI\CE
**MSOS 4.1** SPACE
**MSOS II.J** SPACE
709
710
711
**MSOS 4.1** SPACE
**MSOS 4.1** SPI\CE
115
**MSOS
**MSOS
**MSOS
**MSOS
7JA
4.]**
4.1**
4.1**
4.1**
SPACE
SPACE
SPACE
SPI\CE
SPACE
SPACE
SPI\CE
SPACE
SPACE
SPACE
SPACE
SPACE
SPI\CE
SPI\CE
SPACE
SPACE
712
713
710
719
no
721
723
724
725
726
727
728
729
730
731
732
733
734
(J
n
0
0
,-/
J700
ASS[M~LY
P[I?R~
!l
P07Rf)
P07R7
PO?B~
]0
1~
?O
P[l2I3 Q
pn7RA
P(l2BB
P02BC
P0280
P02BE
P02RF
P02CO
P02C]
P02C2
P07C3
PO?C4
P07C5
PCl7C';
P07C7
P07CA
r.tASS - VEH 3.0
PF SPACE
nOOA
JlP!l3
JlF!l3
7n3!l
2E3(l
202n
5053
5??O
4C45
5645
4C20
2031
7FFF X
2070
2020
?020
2020
2Cl70
202(l
70no
30
35
40
45
~O'
55
FOR PSR SUMMARIES OVER 100
SPACE
SPACE
SYSLVL ISC2 LEAST SIGNIFICANT DHiITS
**MSOS 4.1** SPACE
738
739
740
SPACE
**MSOS 4.1** SPACE
741
742
NUM
• ADC
nATE ALF
$2031
SYSL VL .
6,
NIIM $2000
EQU lSlJMlV(*-SlIMlVl)
PP
27
736
737
$0[10A
]O,MSOS 5.0--PSR LEVEL
25
PAGE
SPACE
SPACE
SUMLVL tJIIM
ALF
0014
OH/?J/PO 00.20.24.
tJlJM
AlF
$2n(l O
]O,SET PROGRAM PROTECT
SPACE
**MSOS 4.]** SPACE
744
745
NU~'
$200D
**MSOS 4.1** SPACE
746
NlIM $OOOA
AlF 4,32K MODE
**MSOS 4.1** SPACE
**MSOS 4.1** SPACE
740
749
NtJr1 $0[10A
NIlM $2000
**MSOS 4.1** SPACE
**MSOS 4.1** SPACE
750
751
NlIM
AlF
$OOOA
4,65K MODE
**MSOS 4.1** SPACE
**MSOS 4.1** SPACE
753
754
tJll~1
$[lP[lA
$700n
**MSOS 4.1** SPACE
**MSOS 4.1** SPACE
755
75('
SYS~lO~1
**MSOS 4.1** SPACE
**MSOS 4.1** SPACE
**MSOS 4.1** SPACE
75~
P07C:~
7nnr
P(l?CA
P07r.R
P[l7Cr.
PO('CI1
PO?CE
Pn7CF
P07P(l
P07111
Pfl202
P0703
P[l204
!l345
!l470
5[152
4F47
524]
4P20
5057
4F54
4543
PO?05
PMPf)
P0207
P(l7()fl
P0209
PCl70A
P02DB
OflOA
333?
4820
404F
4445
OOOA
2000
X32K
PCl7I1C
P020!)
P020E
r070F
pn7FO
Pfl7EJ
P02E2
nnOA
3fi35
4[320
4114F
4445
OPOA
200P
Xti5K
P07E3
P07E4
P07E5
7FFF X
7FFF X
7FFF X
MONTH AOC
(lAY
Anc
YEM APC
547n
200£1
tJlIM
SYSPAY
SYSYER
759
760
CLASS - VER 3.0
]700 ASSEMBLY OF SPACE
*
08/21/RO 00.20.24.
SUBROUTINE TO CHECK ALL FILE MANAGER SPACE THREADS
PACiE
28
SPACE
762
SPACE
SPACE
SPACE
SPACE
SPACE
7M
765
766
767
768
SPACE
SPJ\CE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
770
771
772
773
774
5
]0
]5
?(1
25
30
35
4(1
n
PO?Efi
POlO
PP?ER
Pn?E9
P02EA
OBOO
C8H
PO?[(l
PfI?EC
Pn:?EE
Pn?FO
PO?FJ
Pn?F?
PO?F3
PO?F4
PO?F5
PMF7
PO?Ffl
PMF9
PO?FA
PO;'FB
PO?FC
('ICOO
BONES NOP
LOA*
SUBSAN
JMP*
(lfl))
0] 11
lCFIl
~ROO
Ct100
OPEC
7FFF
f)flM
CC57
(lQPO
0114
OCO]
5800
]CEE
Ofl42
4R~3
('I FE 9
OFC7
484E
PO;~F()
M.~7A
pm!FE
PO?Ff
P0300
PO:lOl
PO:l02
PO:!P3
P0304
P030!l
PO:l06
P0307
PO:IOR
PO:!O!l
PO:IOA
PO:!OA
E04A
C20t
684B
C202
6P4ll
0004
t1R45
0116
CM2
8fl43
M~40
(lP44
tiP4?
]R?~
OOE3
X
ENO
RTJ
LIlA+
5TA*
nONE50 LOA*
INA
SAN
ENO
RTJ
JI1P*
BONES} CLR
STO*
llS
ALS
STO*
STA*
LDQ*
LDASTA*
LDASTA*
INO
STQ*
SAN
LIlA*
ADIl*
STA*
CLR
ST/\*
0
FSPtJT
tPMSK+]5
]
(BONES)
IS ntERE A FILE MANAGER IN TItIS SYSTEM
YES
NO, RETURN
0
MESSAG
ADRFMS
SECTOR
(FSPNT)
0
nONESI
}
MESSAG
(BONES)
0
ACCUM
9
7
LUENTL
MMLU
FSPNT
1,0
BGSCPL
2,Q
FSENTO
4
FSLUPT
BONES2
FSPNT
lIJENTL
FSPNT
A
"CCIIM
J~1P* BO~'ES7
PRINT
I~ITJAL
MESSAGE
HllTlAlIZE TIlE LIBRARY lINIT SPACE AOORESS
GET FSLIST POltJTER
IS THIS THE EtJO OF THE LIST
NO
YES, PRINT FINAL MESSAGE
AND RETURN
CLEAR LU AVAILABLE ACCUMULATOR
SHIFT LU ENTRY LENGTH INTO 0
SHIFT LU NUMBER INTO A
SAVE LU ENTRY LENGTH
SET UP LU FOR READ
GET LIST POINTER INTO 0
GET START OF fILE SPACE POOL
AND SAVE IT
GET NUMBER OF AVAILABLE SECTORS
AND SAVE IT
INCREASE POINTER AROUND HEADER WORDS
AND SAVE AS LU ENTRY POINTER
SKIP IF FSLIST lIAS BEEN SET UP
GET POINTER TO CURRENT LU ENTRY
INCREMENT IT BY LENGTH OF TJfE ENTRY
AND STORE IT AS THE CURRENT LU ENTRY POINTER
CLEAR ACCtJl11lLATOR
ro PROCESS NEXT III
(-)
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
o
0
0
CLASS - VER 3.0
J70fl ASSEMBLY OF SPACE
Pfl~OC
!l
Ifl
1~
?O
1'5
3n
3!1
pn3flD
pn3flE
pn30F
pn3]fl
1'(1311
1'0311'
P0313
pn314
pn315
P031tl
P0317
1'03]8
P0319
P03]A
1'0318
pn31C
P0310
p03lE
P031F
P0320
1'0321
1'(1322
1'0323
P03?t1
1'(1325
PO~7fi
P(l327
P03?P
P03?9
pn3?A
P032R
PO~?C
40
1'03211
p032E
P03?F
P0330
1'0331
CP3F
nlOF
!lP5P
C844
()P3F
8A3R
flP3A
C83F
QP37
11
IHliF
(1]
C838
li833
C838
liA34
5817
lAEF
C82C
982A
982B
0137
C8?B
Ofl7B
(110]
LOA*
SAZ
IlTJ*
LOA*
STA*
AOO*
5TA*
LOA*
SUB*
SAN
JMP*
BONES6 LOA*
STA*
LOA*
STA*
RT J*
JMP*
BONES3 LOA*
SIJB*
SUB*
SAM
LOA*
SUB*
SAZ
nO~ES?
1Pfl]
~lMP*
CR?4
fiA??
BONES5 LOA*
STA*
,IMP*
BONES4 HIJ\*
STA*
RAO*
LOA*
STA*
RAO*
RTJ*
JMP*
BONES7 RAO*
JMP*
]P09
CC?1
fifl75
I1Plr
eCIE
f;flt>3
()flIC
!lP04
IRED
OR?O
18BF
0
R~S[PL
.
BONES3
Rnt~ASS
MMBUrF+?
BLKSIZ
ACCI1M
ACCUM
MMBlIFF+I
BGSCpL
80NES6
ERJWR'
MM8UFF+I
BGSCPL
MMBUFF
HIOPNT
ANATIIO
BONES2
FSLlIPT
FSpNT
LUENTl
BONES4
ACCUM
FSENTO
ROtJES5
ERROR
FSLUPT
FSPNT
BONES7
(FSlIJPT)
TlfDPNT
FSlIJPT
(FSLlIPT)
BLKSIZ
FSUJpT
ANATlfO
BONES3
LUNO
BONESO
08/21/80 00.?0.24.
GET
POI~TER TO NEXT FILE SPACE POOL HEADER
IF IT IS ZERO WE ARE DONE WITH SPACE POOL
READ HEADER
GET BLOCK SIZE
ANO SAVE IT
INCREMENT ACCUMULATOR
BY TIlE SIZE OF THIS BLOCK
GET POINTER TO NEXT HEADER
DOES THE THREAD POINT TO ITSELF
NO
YES,ERROR
SAVE HEADER POINTER
(iEf THREAD POINTER
AND SET UP TO ANALIZE IT
ANAlIZE HIREAO
GO GET NEXT HEADER AND SET IT UP FOR ANALYSIS
LOAD lU POINTER
SUBTRACT POINTER TO FIRST WORD FOR ntIS HI
SUIHRACT LENGTU OF THIS LUS ENTRY
IF NEGATIVE SET LIP TO ANALIZE NEXT CORE THREAO
GET OUR TOTAL
SUBTRACT TlfflR TOTAL
SHOULD BE EQUAL
NOT EQUAL, ERROR EXIT
GET CURRENT ltl POINTER
AND IJSE IT AS IIEADER POINTER FOR NEXT ENTRY
GO ANALIZE NEXT lUS ENTRY
f,fT TlIREAO POINTER
ANIl STORE IT
INCREMENT ltl POINTER
GET THIS THREADS BLOCK SIZE
ANO SAVE IT
INCREMENT LU POINTER
GO ANALIZE TI/REAO
GO SEE IF WE ARE DONE
INCREMENT TilE lU COllNT
AND CONTINUE
PAGE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPJ\CE
SPACE
29
801
802
fHl3
P04
805
806
fl07
ROH
809
810
811
812
813
814
815
816
817
818
819
820
821
822
B23
024
825
A2(i
827
02R
829
830
831
832
833
834
835
836
837
838
CI ASS - VEn 3.0
17no ASSEMBLY OF SPACE
08/21/80 00.20.24.
*
* ROUTINE TO ANALIZE TI/READS
5
10
P0332
PO]33
POJ34
P0335
r033f)
PO:)37
POJ3~
]~
70
P0339
pn:nJ\
PO]3B
pn:BC
P0330
pn33E
pn33F
pn:~lIn
25
()
P(l34]
P(l34?
pn343
PO:l44
P(l345
0000
CAIR
0111
ICFC
CRI9
~A15
fiP]4
!lP.I4
OD?
01n1
IP49
Cflll
fiP?r
cm2
9flnF
OJ1l
IP43
C80E
(lAOA
18W
*
ANATHD NII~I
ANAnlO LDA*
SAN
JMP*
ANAnn LDA*
ADO*
STA*
SUB*
SAM
SAZ
JMP*
ANATII2 lOA*
RTJ*
LDA*
SIIO*
SAN
JMP*
ANATH3 lDA*
STA*
JMP*
0
TlIOPNT
ANATlfl
(ANA litO}
BLKSIZ
ACCUM
ACCuri
FSENTO
Af-JATH2
At-IA TIl 2
ERROR
THnp~T
ROt-1ASS
MMBUFF
THOPNT
ANATII3
ERROR
MMBUFF
nlOPNT
ANATIIO
ENTRY POINT
GET THREAD POINTER
IF NONZERO GO ANALIZE IT
FINISIIEI1 WITII lUIS TlIREAD, EXIT
GET BLOCK SIZE
INCREMENT ACCUMULATOR
SlIBTRACT TlIEIR AVAILABLE SPACE FOR TIllS UI
SKIP IF NOT BEYOND IT
SKIP IF NOT BEYOND IT
ALREADY TO MUCII, ERROR EXIT
GET SECTOR rOR READ
REAfl UP NEXT Et-IlRY It-I TW~EAfl
GEl THREAP
DOES IT POI~T TO ITSELF
NO
YES, ERROR
SAVE litE NEW THREAD
GO INCREMENT ACCUMULATOR
PAGE
SPAtE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
30
840
841
842
843
844
845
846
8117
848
849
050
R51
852
853
8511
855
85fi
857
85H
059
860
861
B62
o
0
0
CLASS - VEn 3.0
J70n ASSFMRLY or SPACE
*
~
]0
l~
70
25
P034fl
P0347
pn3t1(l
P0349
P034J\
P034B
P034C
P0340
P034E
P034F
P0350
P0351
onoo
7FFF
7FFF )(
0000
oono
0(100
on(lo
0000
oono
0000
ooon
P0354
P0355
pn35fl
P0357
P035A
P0359
0000
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
7FFF
lFFF
7FFF
7rFF
7FFF
P03~A
P035B
P035C
pn35D
30
P03~E
P(l35F
PO~fiO
35
P03f>1
Pn3fi2
P03fl3
pn3fi4
P03(l5
X
x
X
X
x
X
X
X
x
X
X
X
X
X
X
x
X
MAXRD
FSPNT
FSLUPT
LtJENTt
BGSCPL
ACCUM
FSENTO
TJIOPNT
BLKSIZ
LUNO
MMBUFF
08/21/80 00.20.25.
DATA STORAGE
*
*NIIMRO NIIM 0
0003
f\
~)
NliM
AOC
NUM
NIIM
NlIM
NUM
NlIM
NUM
NIIM
NUM
SIS
SECTOR AOC
ADC
ADC
ADC
A[le
AUC
ADC
AUC
ADC
LENGTH ADC
ADC
A[lC
ADC
A[lC
ADC
AOC
AOC
AOC
$7FFF
FSLIST
0
0
0
0
0
0
0
0
MMBlIFF (3)
0
BEGLlIl
BEGUJ2
BEGUJ3
BEGLU4
BEGLU5
BEGUI6
BEGLlI7
BEf;LU8
NIIMFSO
NIIMFS1
NlIMFS2
NlfMFS3
NUMFS4
NIIMFS5
NIIMFS6
NlIMrS7
NllMFS8
ACCUMIILATOR OF NUMBER PASSES THROUGH RDMASS
PASS CYCLE LIMIT
FILE SPACE LIST POINTER
CURRENT LU POINTER
LENGTH OF THIS LUS ENTRY
POINTER TO FILE SPACE POOL
ANALYSIS ACCUMULATOR
WI/AT THEY THINK TOTAL SHOULD BE
CURRENT TI/READ POINTER
CURRENT BLOCK SIZE
CURRENT UNIT NUMBER
MASS MEMORY READ BUFFER
TABLE OF SPACE POOL STARTING SECTORS
TABLE OF SPACE POOL LENGTI/S
PAGE
31
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
.SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
864
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
880
m.ll
882
883
B65
866
fi67
868
869
870
871
872
873
874
875
876
877
878
884
8U5
886
887
B88
889
890
891
892
893
894
895
89fl
897
"
P036F
P0370
pn371
pn37?
0101
0125
CAEll
MEE
09FE
9ROR
011'1
1P13
P(l:173
P0374
~ilF4
ROM)
OAOI
PO:!~(l
10
1~
?(l
PO:167
pn:Il)8
PO:l69
PO:16A
PO:!6B
P03fiC
P0360
P03~E
P037~
25
P(l37fi
P0377
P0378
P037~
P(1:t7A
P0378
30
35
40
OR/21/80 00.20.25.
*
* ROUTINE TO READ THREE WORDS FROM MASS MEMORY
*
RDMASS NUM 0
SAVE HIE CURRENT SECTOR
STA* SEC
L()Q* LUND
LDA* SECTOR,Q
IS THE CURRENT SECTOR IN RANGE
SUB* SEC
YES, SAME SECTOR
SAZ SAMOK
NO
SAP ROMO
CALCULATE THE END SECTOR FOR THIS UNIT
lOA* SECTOR,Q
SA~1OK
AOO* LENGHI,Q
INA -1
IS THE CURRENT SECTOR IN RANGE
SUB* SEC
YES
SAP ROMI
NO, ERROR
ROMO JMP* ERROR
5
(j
ClASS - VER 3.0
)70n ASSEMRLY OF SPACE
0000
6814
EBEl
CAEA
9fH)
nooo
0000
oonn
0003
0351 P
0000
onoo
RT JAOC
AOC
RDTIIO AOC
MMLU APC
AOC
ADC
AOC
AOC
SEC
PAGE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
32
899
900
901
902
903
904
905
906
907
90R
909
910
911
912
913
914
916
0
0
0
3
MMBUFF
0
0
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
926
927
928
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
930
931
932
933
934
935
(AMOtJI)
REAO TIlE T1IREAO
~OA01
P037C
P0370
Pfl37E
C~F9
0101
}flFO
ROWAIT L()A* ROTHD
SAZ RDHIN
JMP* ROWAIT
P037F
P03flO
P03P1
P0382
P03H3
P03P4
0]75
08C5
Cr.C4
9flC4
0121
]CE]
RDM]N SQM
RAO*
LOA*
SUB*
SAP
JMP*
EHROR
NtlMRD
NUMRD
MAXRll
ERROR
(ROMI\SS)
WAIT FOR COMPLETION
I/O ERROR
HAS THE READ CYCLE BEEN EXCEEDED
YES, ERROR
o
917
918
919
920
921
922
923
924
0
0
0
CLASS - VER 3.0
1700 ASSEMBLY OF SPACE
*
5
pn::lA5
pn3Pfl
]0
]fl
20
('5
r03P7
P03RR
pn3po
P03RA
P03PIl
r03HC
pn3Pfl
~4F4
RTJAOC
AOC
ERHm AOC
ADC
ADC
ADC
lfWD
0003
n35] P
P038E
Pfl3PF
P0390
CRFB
0101
P03 Q l
P0392
P0394
CnSF
9000
0109
P03~l5
ceBB
P0399
P039A
P039B
r039C
9000
0101
1REB
OC03
flP3E
1COO
P03 0 F
P039F
P03AO
EOE9
(lP44
f1713
(JlMOf'JI)
ER1
5945
4E4F
ER2
FF4R
LOA*
SUB
SAZ
LOA*
SUB
SAZ
JMP*
ENQ
RTJ*
JMP
SPliCE
SPACE
939
940
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPAn
942
943
944
945
946
947
SPACE
SPACE
~PACE
950
951
952
PRINT LF/CR
EXIT
SPACE
SPACE
SPACE
SPACE
SPl\CE
SPACE
SPACE
SPACE
SPACE
SPACE
954
9S5
956
957
958
959
960
961
962
963
CLEAR JOB TABLE INITIALIZATION FLAG
SO JOR FILES WILL BE CLEARED
SPACE
SPACE
SPACE
965
966
967
PRINT ERROR MESSAr.E
RfAD THE REPLY
0
0
$]8FO
3
MMBIIFF
MrmUFF
=AYE
CLJFIL
MMBllFF
=ANO
ER2
ERROR
3
MESSAG
(BONES)
33
937
~OAOJ
ERWAIT LOA* ERTHD
SAZ ERI
JMP* ERWAIT
18FO
P039fl
P03~R
30
ERROR ENQ 2
RTJ* MESSAG
rAGE
SPACE
ROllTINE TO PROCESS FILE TlIREAll ERRORS
OC02
flR!'3
OPO]
(loon
0000
OA/21/80 00.20.25.
INPUT IS COMPLETE
IS THE ANSWER YES
YES, CLEAR THE FILE TABLES
IS THE ANSWER NO
YES, EXIT
NE ITiIER. REPEAT THE REQUEST
948
35
40
CLJFIL Lno- ~E9
CLR A
STA- 19.Q
ClASS - VER 3.0
]700 ASSEMBLY OF SPACE
*
OR/21/RO 00.20.25.
ROUTINE TO CLEAR ALL SYSTEM FILES
. PAGE
SPACE
34
969
5
]0
15
20
75
3('
o
PO:lA)
PO]A3
rO:lA4
PO]A5
PO:IA6
PO]A7
P031\R
P03A9
PO]I\A
P03AO
P03AC
PO:!A£)
1'031\[
PO::IAF
P03EW
p031l1
r031l7
1'0303
p03R4
P031l5
P030ti
P03R7
Pfl;IRR
P031l9
P('3RA
EO(lO
OnFC
4P21l
OAOO
6622
6201
6202
01103
40FF
oeoo
CAA7
6101
OAOO
filM
CMC
fi103
C4FF
OF47
P(lFF
fiOFF
C4FF
0~(l0
0102
ODO}
]PFl
0348 X
CLF)LE LOQ
INQ
STQ*
EtJA
STASTASTAINQ
STOENQ
=XFSLIST
-3
CLAIJR
0
(ZEIW).Q
I.Q
2.Q
3
I
0
CLFILI LOA*
STAENA
STALI1A*
STALflAARS
AI1f1STAUlAINA
SAZ
INQ
JMP*
SECTOR,Q
1,1
SAVE TlfE BASE ADDRESS
CLEAR F IOSEC
CLEAR FISLSA
CLEAR FIBNIX
SET UP THE BASE AUORESS OF FL]ST
INITIALIZE HIE FILE MANAGER TABLE
0
2,1
LENGTH,Q
3,1
(I)
7
I
]
(I)
LENGTH OF TH]S UNIT
POINT TO NEXT UNIT
(1
IS THE LIST COMPLETE
CLFIL2
YES
1
ClFIl1
CONTINUE
()
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPAU
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
spr\c[
SPACE
SPACE
SPACE
971 .
972
973
914
975
976
977
978
979
980
982
983
984
985
986
9R7
9R8
9P9
990
991
992
993
994
995
996
(J
0
0
0
CLASS - VER 3.0
1700 ASSEMBLY or SPACE
5
JO
Hi
l'O
25
30
35
P03BB
P031lC
P03BO
P03BE
P030F
P03CO
OMiO
OC04
21'E9
OFE!
OFCF
P(l~Cl
OJ??
P03C2
PO?C3
P03C4
AO])
P03C5
P(l3CI'
P03C7
P03C8
COFF
9POn
CLFIL2 ENA
ENO
MUILLS
ALS
ADO*
SAP
If-IO
AtJOctFILl STO*
~~OF
onO]
4flOC
96
4
{$(9).0
1
}5
CLADR
elF Il3
OA/21/80 00.20.25.
CALCULATE THE WORD ADDRESS OF
TlfE CORE IMAGE
CALCULATE THE ADDRESS OF THE FILE TABL
IN TlfE CORE IMAGE
1
LPMSK+15
FLMSB
SAVE FOR THE TRANSFER
PAGE
35
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
998
999
1000
1001
}()02
1003
1004
1005
1006
1007
SPACE
SPACE
SPACE
SPACE
1009
1010
1011
1012
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
1014
1015
1016
1017
1018
1019
1020
1021
1022
(lROE)
STA*
LDASlIB*
STA*
FllSn
I
CLADR
ellEN
pn3C9
P03CA
P03CR
P03CC
P03CD
P03CE
P03CF
P03£'0
P031l1
54F4
0401
0000
0000
08C2
0000
0000
0000
0000
CllEN
CLADR
FlMSB
FllSB
RTJAOC
Anc
ADC
AOC
AOC
ADC
ADC
AOC
(AMONI)
$0401
0
0
$08C2
0
0
0
0
P031l2
P0303
P03£'4
C8F9
0101
IRFO
CLFIL4 LOA* CLTHD
SAZ CLFIL5
JMP* CLFIL4
THE WRITE IS COMPLETE
SPACE
SPACE
SPACE
1024
1025
1026
P0305
P0306
P0307
oe03
5R03
CLFIL5 ENO 3
RTJ* MESSAG
JMP (BONES)
PRINT LF/CR
SPACE
SPACE
SPACE
1028
1029
1030
I'~rc
]eOO
CLTHO
FFOO
LENGTH OF THE TRIINSFER
WRITE CLEARED TABLE TO CORE IMAGE
RETURN
CLASS - VER 3.0
1700 ASSEMBLY OF SPACE
*
OR/21/flO 00.20.25.
PAGE
36
MESSAGE SIIBRnUTltlE
SPI\CE
1032
0
MESSAOtO
ME-SAOD
MESSlNtO
MESLEN
SPACE
SPACE
SPI\CE
SPACE
SPACE
1034
1035
1036
1037
1038
(AI10NJ)
$0401
0
0
$1BFC
0
SPI\CE
SPACE
SPACE
SPACE
SPACE
SPI\CE
SPACE
1040
1041
1042
1043
1044
1045
1046
SPACE
SPACE
SPACE
SPACE
1048
1049
1050
1051
SPACE
SPACE
SPACE
SPACE
SPI\CE
SPACE
SPACE
SPACE
1053
1054
1055
1056
-1057
1058
1059
1060
~
CAll
68n6
MESSAr. NOP
LDA*
STA*
LDA*
STA*
P03DE
P030F
P03EO
P03E1
P03[2
PO:3E3
P03E4
54F4
0401
0000
0000
1RFC
0000
0000
RTJADC
ADC
f1ESTHD ADC
ADC
MESlEN I\DC
MESADO ADC
P03E5
pn3Efi
P03E7
pn:IEP
C8FB
0101
HWD
1CFO
MESCIIK lDA* MESTIIO
SAZ MESOIJN
~JMP* MESCHK
MESDUN JMP* (MESSAf-)
pn3E0(152
POO53
POO54
pros!'
PonS6
n
-
OBOO
0)77
POO2!l
POn?A
PO(l2B
POO2C
P(102D
POO2E
P(102F
POO30
POO31
POO32
POO33
015~
(lM2
54F4
(l000
EB70
I~B5
fl~AB
OPJ4
5C13
08/21/80 00.20.29.
*
WAIT2 LDO*
INO
SON
SET
STA*
JMPWAIT3 LOASTA*
TRO
RTll*
OCORE
oconE
DCORE
OCORE
OCORE
DCORE
OCORE
DCORE
OCORE
llCORE
OCOIlE
DCORE
DCORE
DCORE
OCORE
DCORE
DCORE
UCORE
DCORE
DCORE
DCORE
OCORE
DCORE
OCORE
OCORE
OCORE
DCORE
OCORE
DCORE
OCORE
DCORE
DCORE
STORE ORIGIN AS COMPo ADDRESS
START I/O
NOTHING LEFT ON TIIREAD
SFT BOTH TlfO POINTERS TO -0
J\NO OIT
POINTER TO NEXT ENtRY ON Hm.
UPDATE TOP OF THO.
MOVE TO CORE LU THO.
0
4
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
III
112
113
114
115
116
117
118
119
120
121
122
123
DCORE
DCORE
OCORE
oconE
OCORE
DCORE
OCORE
DCORE
OCORE
DCORE
**MSOS 4.1** OCORE
135
[)CORE
DCORE
!lCORE
OCORE
OCORE
OCORE
IlCORE
OCORE
OCORE
OCORE
OCORE
137
138
139
140
141
142
143
144
145
146
147
IF CORE NOT AllOCATED, IGNORE REQUEST
0
WAJT3
A
1l0nOM
($EA)
PT,Q
WAIT
A
(GTllOlT)
PAGE
**MSOS 4.0
4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
*~MSOS
125
126
127
128
129
130
131
132
133
134
,----,
(~
o
o
CLASS - VER 3.0
1700 ASSEMBLY OF OCORE
P(lOfi7
P005P
10
15
20
25
30
JMP* WAIT2
XLOG2 AOC LOG2
If'Ffi
7FFF X
OCORE
oconE
OCOnE
DCORE
DCORE
DCORE
OCORE
DCORE
DCORE
DCORE
oconE
OCORE
DCORE
DCORE
OCORE
OCORE
DCORE
DCORE
DCORE
DCORE
DCORE
DCORE
OCORE
DCORE
DCORE
OIl}
POnfi6
POOti7
POPliA
C80A
5400
PPOfiA
P(lOfiR
P(lOI'C
POOti(l
POOliE
POOtiF
P(l070
OC(11
CEEC
9805
OlDl
)R94
6105
14EA
P0071
0000
poon
CI04
0131
18F2
CC4A
0102
6C49
IREE
NOG2
COFti
90Fl
P9FE
fiPon
NOr.5
C~5P'
)AOC
0)4 0 P
00li9 P
XCORE
I
(TEMP)
LPMSK+4
-3
NOGl-*-l
$E9
10.0
11.0
1
NOr.}
SWAPON
I
tJOG2
TEMP
THROH
GTHOIT(*-I}
CORHU
(XLOG2),Q
TEMP
I
CORI
HU. I
(AOISP)
0
RESTORE PHYSTB ADDRESS
IF COMPLETION PRIORITY IS
NOT GREATER THAN 2.
DONOT TRY TO SWAP.
IF SWAP INHIBITED, DO NOT
ATTEMPT SWAP, RE-TIlREAO
REQUEST
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
GO TO NOG2 IF NOT SWAPPEO
**MSOS 4.0
**MSOS 4.0
IF TOP OF THREAD CHANGED
TRY AGAIN
CLEAR SPACOR BUSY FLAG
ADDRESS OF CURRENT REQUEST
5
OCORE
OCORE
REPEAT UNTIL WAIT THREAO IS EMPTY
NOGOT LOA*
STALOA*
ANOINA
SAM
LOQLOAAOOSAl
JMP*
LOA*
SAN
JMP*
NOGI LOA*
RTJ+
r.THOIT EQU
ENQ
LOA*
SUB*
SAl
JMP*
STAJMPTEMP AOC
POO~5
W04
PAGE
OCOHE
C862
60FF
CC16
AOOti
09FC
0138
EOE9
C20A
~20B
08/21/80 00.20.29.
* HIE FOLLOWING IS ENTERRED ON UN-SUCCESSFUL ALLOCATION
Pfl059
P005A
P005B
P005C
POOSO
P(l05E
P005F
POOfiO
P0061
P(l(l62
PO(lti3
POOM
0101
()
35
40
45
Pf1073
P0074
P0075
P0076
P0f177
P007~
PO(l79
POOlA
P007B
P(l(l7C
P0070
Pflf17E
P007F
POOflP
POOPI
PO OM
POOA3
POOR4
con
0001
6R07
54F4
4CFf1
009A P
0000
ORC2
NOG4
LDASAM
JMP*
LOA*
SAl
STA*
JMP*
L(lASIIRIfJA
STA*
LOAINA
STA*
RTJOUTPUT AOC
AOC
NUM
TIME,I
NOG4-*-1
NOGI
(XUNPIO)
NOG5-*-1
(XSPASW)
NOGI
HICORE
LOCORE
-1
LENGTH
LOCORE
1
START
($F4)
$4CFO
NOG20
O,$AC2
IF INTERVAL SINCE LAST SWAP
HAS PASSEO, SKIP TO NOG4
SKIP IF NO UNPROTECTEO I/O
SET WAITING TO SWAP SWITCH
SET UP SWAP WRITE BLOCK
SIZE AND START
DCORE
DCORE
DCORE
OCORE
DCORE
DCORE
OCORE
180
181
182
183
184
185
186
OCORE
nCORE
OCORE
188
189
190
191
192
193
194
195
196
197
198
oconE
oconE
OCORE
PART 1 FWR HE
UCORE
OCORE
**MSOS 4.0 DCORE
oconE
OCOHE
CLASS - VER 3.0
1700 ASSEMIlL Y OF OCORE
1'0089
ponllA
0000
0000
0000
7FFF X
5802
IPIlC
POPRIl
pnope
I' (lOflfl
PClPRE
POO8F
oonn
OAOO
6C33
CP3A
6834
pnn~n
CP39
POO~5
5
POOP6
P0087
poo~n
20
P(1091
P0092
p£l093
PO(l94
1'0095
1'0096
1'0097
0114
fl~37
54F4
5202
OOCI I'
DR26
lCF3
PAGE
6
DCORE
OCORE
OCORE
DCORE
DCORE
DCORE
DCORE
IlCORE
OCORE
OCORE
OCORE
OCORE
OCORE
DCORE
DCORE
DCORE
DCORE
OCORE
DCORE
DCORE
DCORE
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
DCORE
222
DCORE
DCORE
OCORE
UPDATE TOP OF ALLOCATABLE AREA
DCORE
DCORE
1
DCORE
UPOATE START OF LEVEL ZERO
LVLSTR
DCORE
pGMS IN LVLSTR TABLE
(tJOG6+1)
DCORE
TEMPL
DCORE
A
DCORE
2
DCORE
I,Q
DCORE
SET UP PSEUDO THREAO FOR ALLOCATOR
LENGTH
DCORE
(ZERO) ,Q
OCORE
RTNCOR
OCORE
HICORE
OCORE
LENGHI
OCOHE
SET PROTECT BITS FOR TIlE AREA
-1
DCOH
0
OCOHE
-1
OCORE
NOG22-*-1
UCORE
Nor,21
OCURE
XCORE
OCORE
I
OCORE
LENGTH
SET UP SPACE REQIJEST- TO
OCOHE
GET CORE BACK + PUT
-2
UCORE
IT ON WAIT THHEAD
SPACE!
OCURE
SPACE REQUEST
($r4)
DCORE
Nl/0,N1/1,N5/10,Nl/0,Nfl/0
***MSOS4.0 llCORE
NOG30, ,
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
LENGTH NUM 0
START NUM 0
NUM 0
ADC SWApAR
RTJ* STlpV4
JMP* NOGI
*
*
STLPV4 NOP 0
TELL PROTECT PROCESSOR
ENA 0
SWAP IS NOT WAITING
STA* (XSPASW)
LDA* LOOPI
SET UP AND SCHEDULE LEVEL
STA* LOOP
IF lOOP NEVER RAN
LOA'" LOOPFG
00 ~OT RESCHEDULE IT
SAN TURNON-*-l
SET flAG
RAO* LOOpFG
2 LOOP SO AS TO LOCK OUT
RTJ- ($F4)
VFD Nl/0,NI/l,N5/9,Nl/0,N4/0,N4/2 JOB PROCESSING
AIlC LOOPEN
TURN ON SWAP INDICATOR
TURNON RAO* SWAPON
JMP* (STLPV4)
10
15
08/21/80 00.20.29.
**MSOS
uMSOS
**MSOS
**MSOS
**MSOS
4.0
4.0
4.0
4.0
4.0
***MSOS4.0
**MSOS 4.0
199
25
* THIS ROUTINE IS ENTERRED ON COMPLETION OF SWAP I/O
30
POO9S
pOCl99
pon~A
35
4n
P(109B
pn(l9C
P0090
P(lOOF
POOM
p(lPJ\l
ponA?
pn(lA3
POOM
P(lfl~5
45
50
5!'
0
pOflJ\fi
POflAR
POOA9
P£lflAA
POOAO
POflAC
POOAO
POOAE
POOAF
PorlBO
POOBI
POOB2
POOB3
PO[JR4
PonS5
PO(1Bli
COF6
09FE
fifl23
EOF]
oom
C400
4CFE
f'PIE
7FFF X
np14
0902
MOJ
CflEO
fi622
5400
EOFfl
cnDB
OPFE
OliOO
09FE
0101
18FB
E~OC
4OFF
C803
O~FO
fi~06
54F4
5400
OOCA P
7FFF X
NOG20 LOAINA
STA*
LDQINQ
NOGfi LnA+
STQ*
STA*
TRO
INA
STALOA*
5TARTJ+
LOQlOA"
NOG21 INQ
SPB
INA
SAZ
Jr1P*
NOG22 LOQ*
STOLOA*
INA
STA*
RTJSPACf4 VFll
Anc
HICORE
-1
LEND
LOCORE
0
248
249
250
251
252
()
CJ
0
0
17£1£1
Pn(lR7
pnnB~
5
pn(1B9
pnORA
}(1
pnnBB
ronBC
poono
POOOE
p(lnBF
PODcn
pnnCl
PonCl
POOC3
pnOC4
pnnC5
ponC7
15
?O
CLASS - VER 3.0
ASSEMBLY OF nCORE
POOC~
, p£1nC9
n(1(1(1
nnnn
SPACE! NlIM £1
,)MP* RUI
£1£1(1(1
l~tl9
7FFF x
£1£100
£10£10
0001
7FFF x
7FFF x
0044
6~n7
0800
0800
54£10
18FS
0000
£10£10
7FfF X
SIZE
RESTART DRIVER IF NOT BUSY
ADC
NUM
AOC
SSS
ADC
AOC
CLR
S1A*
LOOP NOP
NOP
RTJ+
,)MP*
LOOPI NOP
tOOPFG NlIM
PCORE
0
0
TEMPL
UNPIO
SPASW
A
LOOPFG
0
0
IOLER
LOOP
0
£1
*
*
HITER HERE WilEN SWAPPED
SPACE BECOMES AVAILABLE AGAIN
NOf,3n LOA*
STA*
LOA*
STA*
*
RTJNOG3nA VFD
ADC
NUM
NUM
LGTH AOC
STRT AOC
ADC
AOC
AJOISP JMPNOG33 LOA*
STA*
LDA*
STA*
LOASTA*
LOO·
LOASTALOOLOA*
foIOf,3? INO
CPB
IfJA
SAZ
LENGTH
UiTH
START
STRT
XCORE
SWAPON
LEND
TEMPL
XUNPIO
XSPASW
LOOPEN
08/21/AO on.20.29.
ZERO WHEN NOT SWAPPED
LWA OF ALLOCATABLE - STUFFED BY SPACE
TEMPORARY HOLD FOR LVLSTR
UNPROTECTED I/O REQUEST COUNT AOR
SWAP WAITING SWITCH ADR
**MSOS 4.1**
**MSOS 4.1**
**MSOS 4.1**
**MSOS 4.1**
**MSOS 4.1**
FLAG TO PREVENT MORE THAN ONE LEVEL 2 LOOP SCH
MATCH CYCLES IN LEVEL -1 LOOP
USE SYSOAT IDLE LOOP
PAGE
7
oconE
oconE
253
254
oconE
oconE
DCORE
DCORE
DCORE
oconE
OCORE
OCORE
oconE
oconE
OCORE
BCORE
OCORE
OCORE
256
257
258
259
260
261
262
263
264
265
266
267
260
269
OCORE
OCORE
271
272
OCORE
DCORE
oconE
OCORE
DCORE
oconE
oconE
DCORE
DCORE
OCORE
DCORE
oconE
OCORE
oconE
OCORE
OCORE
DCORE
[lCORE
OCORE
DCORE
[lCORE
[lCOnE
OCORE
DCOHE
(JcnRE
nCOHE
OCORE
nCORE
nCORE
nCOHE
274
275276
277
278
279
280
281
282
283
284
285
286
287
-288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
2S
3£1
35
pnncJ\
pnnCR
pnrcc
prnco
CflBA
ponCE
PonCF
rn£1nn
54F4
pnoOl
4£1
45
fiO
55
Pon02
PonD3
pnn04
POOD5
Pon06
pnn07
ponDA
Ponn9
pnnDA
ponpB
ponrc
p(10flr
pnnPE
p(1nPF
PonEn
POrE}
pnOE?
PonE3
POOE4
PflOfS
POOffi
6pn~
C~B9
fiR07
4~on
onos P
00£10
08C2
0000
£1£100
00£1£1
OOAS x
14EA
C8FE
6RE9
CrEJ
6CC2
cnn
fi~flF
E~nc
C2no
fl?n4
EnFti
CRA2
(lI1FE
n70n
n9FE
n101
STUFF PARAMTERS
READ SWAPPED AREA BACK IN
($F4)
NI/0.NI/1.N5/4.NI/n.N4/0.N4/0
NOG33
0
$8C2
0
0
MSB
0
LSB
SWAPAR
(ADISP)
AJDISP
TURN OFF LEVEL 2 LOOP
LOOP
TEMPl
REstORE lVlSTR
(fJOGfi+l)
lOCORE
RESTORE END OF ALLOCATABLE CORE
LEND
XCORE
DElAY TIME
13,0
RESET TIME SINCE LAST SWAP
TIME ,Q
HICORE
UfoIr.n-l
-]
CLEAR PROTECT BITS I N TIlE AREA
£1
-1
f'JOr.35-*-1
***MSOS4.'O
***MSOS4.0
***MSOS4.0
***MSOS4.0
***MSOS4.0
***MSOS4.0
***MSOS4.0
***MSOS4.0
***MSOS4.0
***MSOS4.0
***MSOS4.0
303
CLASS - VER 3.0
1700 ASSEMBL Y OF OCORE
5
POOE7
P(lOEtl
pnnE9
ponEA
IOFB
0500
fi802
1839
NOG35
10
15
20
25
3n
. 35
4£1
!i(l
PO[IER
POfiEC
POfiE[)
Cl(lP
£1132
0103
POr>EE
(1)(\3
pnPEF
POPFO
POPFl
POflF2
POOF3
POOF4
POOF5
POOFfl
POOF7
POOF8
PO(lFA
pooro
pnorc
pnom
P(lOFE
pnrlFF
POlno
pnJOl
P(l102
POJ03
POI(l4
POln5
POlflfl
POI07
PO)flSl
Et05
Cfln
A023
0102
COEA
fiHl3
C622
A031
n102
1400
CHl6
nl2e
C622
A02B
n115
EJnfl
COlI
P(llOA
pnlOC
POI £10
POI(l[
POWF
POlIO
P0112
POJl3
POl14
P01l5
POl16
POl17
55
()
-
NOG32
0
SWAP ON
RELI
POll~
pnl19
POIIA
POlIO
POlIO
TJ2
RIA
Rl
7FFF X
Rll
0~B2
C622
1~05
0814
AOn
tlJOfl
AOll
(l9FO
£1M?
~O(l(l
013E
nOl4
R2
R29
7FFF X
~62?
050n
9POO
09Fn
0127
0814
0902
9201
0113
Cfi22
09FO
0122
1400
54F4
FFAB
7FFF X
lOASAM
RAORAOLDQLDAAt-IOSAZ
LDASTALDAANOSAl
JMP
LOASAP
LOAANOSAN
LDQLOALAQ
LDAJt1P*
TRO
ANDAOOAt-ID1M
TRA
SUB
SAM
TRQ
AOOliN
SUB
INA
SAP
TRQ
INA
SUBSAN
LOAINA
SAP
ERROR ,JMP
R41
RTJ-
£I
LEND
-2
ERROR
A
2
I,Q
ERROR
(ZERO) ,Q
-2
R41
SCIIERR
($F4)
SKIP IF INDIRECT REQUEST
UPDATE RETURN FOR OIRECT CAtL
OCORE
309
oconE
**MSOS 4.0 DCORE
DCORE
311
312
313
DCORE
OCOnE
DCORE
DCORE
DCORE
DCORE
OCORE
OCORE
oCORE
oconE
DCORE
DCORE
DCORE
OCORE
OCORE
DCORE
DCORE
DCORE
DCORE
OCORE
DCORE
DCORE
OCORE
DCORE
DCORE
DCORE
OCORE
OCORE
OCORE
OCORE
DCORE
llCORE
oconE
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
oconE
CHECK BIT· 0 (R)
OF FIRST WORD OF REQUEST
CHECK RETURN INDICATOR
IF NOT ZERO
RETURN TO ADR OF DISPATCHER
CHECK TilE 0 PARAMETER OF HIE REQUEST**MSOS
TO OETERMINE WHICH AREA TO RELEASE **MSOS
**MSOS
SKIP IF PART 0 RELEASE REQUEST
**MSOS
GO RELEASE PART 1 AREAS
**MSOS
TRANSLATE RETURN PARAMETERS
MASK INDIRECT BIT FROM "S" PARAMETER
SAVE IN Q-REG
4.0
4.0
4.0
4.0
4.0
**MSOS 4.0
**MSOS 4.0
AREA RETURNED BELOW AREAC IS IN ERROR*434****
*434****
*434****
*434****
*434*****
*434****
OK TO RETURN BLOCK THAT ENDS AT LEND 63*1213
END OF AREA RETURNED ABOVE LEND IS AN ERROR**
*434
*434****
*434****
UEADER WORD NOT POINTING TO 1ST WORD OF AREA
*434****
*434****
*434
LENGTH LESS TItAN TWO IS AN ERROR
SET BIT 15 OF Q ANO RETURN TO REQUESTOR
(J
a·
304
305
306
307
TURN OFF SWAP INDICATOR
IF DRIVER NOT RUNNING, RESTART IT
~,I
RIA-*-1
3,1
3,1
5,1
(ZERO),Q
$23
Rl-*-1
ADISP
3,1
(ZERO) ,Q
ONEB IT +14
R11-*-1
K65Tl2
6,1
R29-*-1
(ZERO) ,Q
ZEROt9
R2-*-1
6, I
NZERO-l
Q
(ZERO),Q
R2Q
A
NZERO-l
fi,1
NZERO-l
-2
0
=XAREAC
ERROR
A
(ZERO) ,0
PAGE
OCOHE
OCORE
[lCORE
OCORE
* THIS IS ENTERREO FROM RELEASE REQUESTS
po]O~
45
JMP*
liN
STA*
JMP*
08/21/80 00.20.30.
oconE
OCORE
ocunE
OCORE
UCORE
OCORE
UCORE
oconE
OCORE
OCORE
314
0
n
(\,
0
"---)
CLASS - VER 3.0
.1700 ASSEMBLY OF DCORE
5
P01]E
POl1F
POl 20
R[l
5200
OJ?] P
REi
]4B9
\,-,-/
AOC $~?OO
ADC RELEAS
JMP- (REOXT)
OR/21/~0
RELEASE AT DRIVER PRIORITY LEVEL
PAGE
00.20.30.
**MSOS 4.0 DCORE
**MSOS 4.0 [leORE
DCORE
359
360
DCORE
362
OCORE
DCORE
*·MSOS 4.1** oconE
DCOHE
OCORE
OCORE
OCORE
DCORE
DCORE
**MSOS 4.1** DCORE
DCORE
364
365
366
367
368
369
370
371
372
373
374
' DCORE
DCORE
DCORE
376
377
378
OCORE
l1CORE
OCORE
DCORE
OCORE
DCORE
DCORE
DCORE
DCORE
OCORE
OCORE
OCORE
OCORE
OCOHE
DCORE
OCORE
oconE
oconE
OCORE
DCORE
oconE
OCORE
DCORE
DCORE
DCORE
oconE
DCORE
DCOHE
DCORE
f)CORE
nCORE
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
* ENTERRED AT LEVEL OF ALLOCATOR TO RELEASE SPACE
10
1~
1I0
P012]
POl23
5400
E897
P0124
P012S
P0126
POl27
P0l28
P0129
POI2A
0500
C205
0101
14EA
OA01
6205
IROO
(lOA7 X
0123 P
H06
0120 P
?~
30
35
dO
45
50
!)~
P012C
PClI?11
POl2E
PO]2F
POl30
POI31
r0132
POl33
P0134
POl35
P0136
prl37
P013S
PO)39
P013A
POI3B
P013C
P013D
P013F
P0140
P£l141
P014?
P0143
PO}44
pn14~
Pfl)4fi
PO)47
P014~
0000
OlllC P
O~OO
54BB
0004
CRFB
0400
fi103
CCBB
OlOE
O!lFE
6CAA
OllB
CC87
0109
OCOA
CflE9
0103
COOO 7FFF X
(iA03
54F4
5;>00
0123 P
05{l0
C103
flflEf)
f>4BA
01100
ICD
RELEAS RTJ+ RTNCOR
RElI LDQ* XCORE
EOU ECORE (REll)
lIN 0
LOA- LU,O
SAl REl2-*-1
JMP- (AOISP)
REL2 ENA CORELU
STA- LU,Q .
JMP ICORE
EOU R5(R6)
SET ALLOCATOR BUSY
ENTRY FROM DIAGNOSTIC TIMER
INHIBIT INTERRUPTS
CHECK FOR WAITING REQUESTS
*
*
*
THE SWAPCK SUBROUTINE IS ENTERED TO DECREMENT UNPIO
WHEN UNPROTECTED I/O IS COMPLETED, BY JOBPRO AND LIBEDT
IF UNPIO EO 0 AND SPASW NE 0, DRCORE IS RESTARTED
ENT
SWAPCK NUM
liN
RTJNIIM
LOA*
EIN
STALDA*
SAl
INA
STA*
SAN
LDA*
SAl
ENQ
LDA*
SAZ
LOA
STA*
SCHA RTJVFO
SCH
ADC
SWCKEX liN
LDASTA*
RTJEltJ
,mp*
*
SWAPCK
0
0
(AVOLA)
ENTERED WHEN UNPROTECTED I/O IS COMPLETED
~ET
VOLATILE
4
SWAPCK
0
3,1
(XUNPJO)
SWCKEX-*-1
-1
(XUNPIO)
SWCKEX
(XSPASW)
SWCKEX-*-1
10
(SE9).Q
SAVE RETURN ADDRESS
DECREMENT UNPIO BY I
EXIT IF SWAP NOT POSSIBLE
63*1378
SKIP IF NOT WAITING TO SWAP
GET RESIDENCY OF UNPROTECTED FROM
EXTENDED CORE TABLE
SCHEDULE PARTITION CORE
D'R IVER IF UNPROTECTED
IS IN PART 1
9
**MSOS 4.0
SCIIA
**MSOS 4.0
:XPRTCOR
**MSOS 4.0
SCH+1
**MSOS 4.0
($F4)
SCI/EOULE DRIVER IF NOT BUSY***
NI/0.Nl/J,N5/9,Nl/O,N8/0
***MSOS4.0
REll
0
3,1
RESTORE RETURN AnnnESS
SWAPCK
RELEASE VOLATILE
(AVOLR)
0
RETURN 10 USER
(S~IAPCK)
;> CARDS DElETED
358
401
402
403
404
405
406
407
408
409
410
CLASS - VER 3.0
17no ASSEMBLY OF DCORE
5
In
P0149
P014A
P014B
P014C
POl4D
P014E
PO)50
POl51
POl52
pnl53
P(lI~4
15
P0155 .
POI~fl
pnl57
pnl~p
2n
pnl59
POl5A
POl5R
pnlSC
POI~(l
?5
30
35
pnlSE
POl5F
pnl60
POIlll
P0162
POl63
POl64
PO]65
pn166
pn167
P0168
PO]69
onoo·
681E
CClD
AR11
6811
EAOO
OOFE
0500
4PO[l
ElI02
opno
n151
IPOA
C622
AP(l5
~A05
0135
OW4
IPF5
OOFO
onoo
0000
EAFE
C202
E8(16
6202
0814
E8F9
6202
lcn
0000
FF08
THRDIT 0
STA*
LDA*
AND*
STA*
LOQ
INQ
lIN
TJIONXT STO*
LDOINO
SON
JMP*
lnAANO*
SUB*
SAM
SAZ
JMP*
RPMSK NUM
REOP NUM
TlfOX NUM
THOTJIS LDO*
LDALOQ*
STATRQ
LOQ*
STAJMP*
TEMPI ADC
0
TEMPI
(TEMPI)
RPMSK
REQP
XLOG2
CORELU-2
0
TlfOX
PT,O
,
I
THREAD REQUEST IN A TO CORE LU
CHECK FOR END OF TIIREAO
0
1
ninTHS
(ZERO),O
RPMSK
REOP
T"OTHS-*-1
THOTHS-*-l
TJIDNXT
$FO
SEARCH FOR LOWER RP
THREAD ENTRY IF NEGATIVE
THREAD ENTRY IF EQUAL RP
GET NEXT ENTRY
0
0
TlIOX
PT,O
TEMPI
PT,O
A
THDX
PT,Q
(THRDIT)
0
POINTER TO PREVIOUS ENTRY
POINTER TO ENTRY TO ADD
POINTER TO NEXT ENTRY
POINTER TO PREVIOUS ENTRY
END
65677B STORAGE USEn
64no ASSEMBLY
n
08/21/80 00.20.30.
443 STATEMENTS
2.839 SECONDS
o
PAGE
10
DCORE
DCORE
DCORE
DCORE
OCORE
DCORE
OCORE
DCORE
DCORE
DCORE
OCORE
OCORE
OCORE
OCORE
DCORE
OCORE
OCORE
DCORE
DCORE
UCORE
DconE
DCORE
DCORE
DCORE
OCORE
DCORE
DCORE
OCORE
OCORE
DCORE
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
DCORE
444
DCOI~E
115 SYMBOLS
345 REFERENCES
o
0
0
CLASS - VER 3.0
]700 ASSEMBLY OF OCORE
COMPLETE REFERENCE MAP.
ACOMPR
AnISP
AFfJn
AIJIl JSP
AtJABS
ARfAC
ASWAPO
AVOLA
AVOLR
BOTTOM
conELlI
CORI
OIRCAl
nlR1
ECORE
ELU
ERROR
GTHDIT
HICORE
I
ICORE
I[lLER
JNOGOT
Kfi5T12
UNO
LENr.TH
LGTU
lOCOHE
l.OG?
LOOP
LOOPEN
LOOPFG
l.OOPI
tPMSK
1I1
LVLSTR
NOGOT
tJOGl
NOr.?
tJor.?O
NOG21
Nor.n
NOG30
NOG30A
NO(i32
NOG33
NOG35
NOG4
NOG5
NO(;fi
tJOTMOT
NOTOK
NZERO
OKO
OK)
m'E
ONF.BJT
OORfl
OOEA
00B5
(lOll 7
OOBF
O]OB
0041
OOOB
OOIlA
0001
0001
0003
0042
004A
0123
0005
011B
0069
00F6
OOFF
0002
OOC6
0032
00F9
OOBO
00El5
oon3
00F7
005A
00C3
00C1
orco
oocp.
(l(l(l2
(lO(l5
009E
0059
0067
0072
009El
OOAA
(lOAF
OOCA
OOCF
00E3
00[18
00E8
0075
0079
0090
OOOE
0017
0012
OO](i
0023
(l(l34
Or?3
ABSOLUTE
ARSOlllTE
AOSOLUTE
ABSOl.UTE
*EXIERNAL*
ABSOl.UTE
ABSOLUTE
ABSOLUTE
ARSOllJTE
ABSOLUTE
-SYSTEM*EXTERNAL*
*EXTERNAL*
ARSOLUTE
*EXTERtJAL*
ABSOLUTE
ABSOLUTE
*EXTERNAl*
ABSOLUTE
ARSOLIITF
0
2/54 0
2/52 0
2/57 0
7/114 L
'l/5P. 0
2/44 X
3/35
2/flO Q
3/03 Q
3/22 l
3/08 Q
3/25 l
4/24
4/36
2/31 E
3/09 Q
8/44
.4/59
3/05 Q
3/23
2/30 E
2/51 X
4/11
2/48 X
2/32 E
5/51
7/31
3/05 Q
2/44 X
2/35 E
6/21
6/16
fi/14
2/56 Q
2/52 Q
2/44 X
4/19
5/15
5/23
5/57
6/47 l
6/50
6/59
2/38 E
7/56 L
7/37
7/59
5/40
5/43
6/36 L
3/32
3/44
2/56 ()
3/40
3/45
4/12
3/ltl 0
4/32
5/33
3/'15
7/45
3/38
8/43
3/39
9/32
9/56
3/47
5/27
3/57
4/36
4/41
9/13
5/32
8/50
5/26
5/48
4/31
3/23
7/20
4/16
8/26
6/33
5/60
7/40
5/49
5/04
6/15
7/16
6/18
7/22
3/30
9/15
6/36
5/10
5/20
5/39
6/31
6/51
6/52
7/30
7/36
7/60
7/45
8/04
5/42
5/46
6/37
3/36
3/46
4/23
0~/21/80
00.20.30.
.
7/44
0/21
4/17
4/34 L
3/53
9/18
4/33
9/17
4/54
10/10
5/31
L
4/44 l
Q
Q
l
8/54
8/58 L
6/31
5/11
4/46
6/45
6/53
9/20
7/54
7/12 L
6/42
7/50
6/4fi
8/48
6/54
5/52
6/34
7/49
7/1A l
7/21
. 7/46
7/17
7/23 L
3/42
9/19
4/04
5/13
5/24 L
5/41
5/45
6/08
4/40
8/33
8/38
4/19 l
L
l
l
L
7/30
7/55
L
l
L
L
L
L
l
l
L
l
7/48
Q
l
L
3/59 L
4/22 L
4/70
4/29
3/4~
R/N
8/40
PAGE
11
CLASS - VER 3.0
1700 ASSEMBLY OF DCORE
COMPLETE REFERE~CE MAP.
OllTPUT
OUTPV4
PCORE
PRTCOR
PT
PTNAlC
PTNREl
RDPTV4
REt
RHEAS
REU
REt2
REQJllC
REC)P
REQXT
RPHSK
RTf.lCOR
Rl
R]/I
Rll
R2
R29
R41
R5
Rfl
SCIf
SetlA
SetlERR
SP/\CEl
SP/ICE4
SP/\SW
SPCEV4
ST/IRT
STlPV4
STRT
SW/IPAR
SW/IPCK
SW/IPON
SWCKEX
TE~IP
THIPL
THIPI
T1lOfJXT
TlIIlTHS
. THIlX
TllRllIT
TIf/IE
TIn'
TIIRNON
TJl'
tJfJPJO
WAIT
WAIT?
WAIT3
XCOR[
XlOG?
n
0081
7FFF
OOBB
013E
0002
7FFF
7FFF
7FFF
OllE
0121
0123
nt28
0028
*EXTERNAl*
*EXTERNAl*
*EXTERNAl*
ABSOLUTE
*EXTERNAl*
*EXTERNAl*
*EXTERNAl*
*EXTERNJll*
(lISE
(1(1B9
0150
0122
OOFS
OnEF
OOFA
0)04
OHl8
OlJr
nt20
0]20
0141
0140
OllC
0089
00B5
OOCO
7FFF
0086
008B
0004
0006
012C
OOSC
0143
0071
ABSOLUTE
*EXTERtJAl*
*EXTERNAL*
*EXTERNAl*
*EXTERNAl*
*EXTERNAl*
OORE
011\8
0)57
0160
O}!lF
0)4~
on04
00(15
0091i
OOEB
OOBF
0000
0040
0053
OOBB
0058
ABSOLUTE
*EXTERNAl*
2/37
2/49
2/43
2/50
3/10
2/46
2/47
2/49
2/39
9/04
7/06
9/16
2/44
10/08
3/13
W/07
E
X
X
X
Q
X
X
X
E
X
Q
'l/43 X
P-/?O
8/14
8/25
8/31
8/28
A/57
9/21
9/05
2/40
9/47
2/45
6/56
2/37
2/44
2/49
5/54
2/35
7/33
2/43
9/29
2/34
9/38
3/37
3/41
(,/3P10/05
10/12
lO/16
10/12
5/25
3/06
3/27
6/17
2/30
08/21/80 00.20.30 ..
PAGE
12
5/56.l
7/10
9/48
3/50
8/60
9/11
8/06
9/18
4/06
10/19
9/05
10/18
6/44
8/?3
8/17
8/27
P-/37
8/36
8/59
3/56
4/56
10/13
9/12 l
9/13
9/52
10/27
10/29
10/32
l
l
l
10/24 l
10/23 l
9/11
l
l
l
l
8/41 l
l
Q
l
E
X
E
X
X
E
X
E
E
l
0
l
E
'l/44 X
3/21 l
3/26
4/52
4/28
5/04 L
9/21
9/49
9/50 l
8/58
7/05 l
4/34
7/15
6/04
6/07
7/41
6/06
9/30
5/21
9/41
3/46
3/59
7/13
Hl/Cl6
W/22
10/70
10/25
10/(14
!,/39
l
6/22
8/13
7/14
3/52
4/50
4/56
4/45
5/28
l
l
9/51 l
6/58 l
7/32
6/11 l
6/23
l
l
B
L
l
L
l
7/43
9/34
6/22
9/43
4/22
4/26
7/47
10/28
9/55
7/11 l
9/53 l
4/38
5/12
5/24
5/29
5/34 l
7/10 L
7/51
10/34 l
10/21
10/26
10/33
7/53
10/26 l
10/31
4/50
4/60
4/57
5/10
10/09
6/52
n
9/58
8/05
9/12
0
o
CLASS - VER 3.0
1700 ASSEMBLY OF OCORE
COMPLETE REFERENCE MAP.
XSPASW
XlfNPIO
ZERO
ooeo
5/44
5/42
OOBF
00?2
ABSOLUTE
2/53 Q
3/2f1.
6/13 .
7/14 L
6/43
fI./1f1.
7/15 L
9/37
9/42
9/40
8/23
8/30
8/35
fl./29
8/46
8/55
08/21/80 00.20.30.
10/17
PAGE
13
n
n
C)
o
o
CLASS - VER 3.0
l70n ASSEMRLY OF ALCORE
ALLOCATION.
OA/21/80 00.20.31.
~TrRAGE
AOORESS
LENGm
0000
OOAE
OOAE
BINARY CONTROL CARDS.NAM
ALCORE
DECK-ID M17 MSOS 5.0
END
BLOCKS
TYPE
ALCORE
LSIPRI
LS3PRI
PR()(iRAM*
LOCAL
LOCAL
ADDRESS
LENGTH
0000
0077
0079
0069
0069
OOAE
ENTRY POINT NAMES AND ADDRESSES.
ALCORE -- oroo
REQALC -- rooo
EXTERNAL SYMBOLS.
CAL THO
LEND
LVLSTR
RTNCOR -- 007e
SUMMARY
PAGE
CLASS - VER 3.0
1700 ASSEMBLY OF ALCORE
*
*
*
5
)0
00(10 P
(lnrn P
)!l
(lonn P
n07C P
*
n002
0022
0002
0011
70
30
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
35
iln
4!l
*
*
!l0
55
n
ponoo
POGOI
POOll2
POO03
Pflon4
oono
482F
0902
()B2C
C600
7FFF X
DECK-ID M17 MSOS 5.0
NAM ALCORE .
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION. LA JOLLA. CALIFORNIA
COPYRIGIIT CONTROL DATA CORPORATION 1976
PAGE
SUMMARY-110 ALCORE
I\l.CORE
ALCORE
I\LCORE
2
2
3
4
5
CORE ALLOCATOR
ENT ALCORE
ALCORE-(*)
EOU
ALCORE
ALCORE
ALCORE
8
ENT REOALC.RTNCOR
ALCORE
12
EXT LVLSTR.LEND.CALTHD
EQU LPMSK($2).ZERO($22)
ALCORE
ALCORE
13
14
ALCORE
ALCORE
15
16·
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
MINSIZ EQII MINSIZ(2)
MAXNO EQU MAXNO(LPMSK+15)
*
*
*
*
*
*
*
*
*
.*
25
08/21/80 00.20.32.
ALCOI~E
TUIS MODULE FINDS AN AVAILABLE AREA IN
THE SPACE ALLOCATED TO IT AND ASSIGNS
PART OF IT PER A SPACE REQUEST.
THE CORE ALLOCATOR IS ENTERRED FROM THE
CORE ALLOCATOR DRIVER AND FROM THE
RELEASE REQUEST PROCESSOR.
ON ENTRY TO ALLOCATE CORE. A AND Q MUST
BE AS FOLLOWS.
A= REQUESTED LENGTIf.
O=PRIORITY LEVEL OF THE REQUEST.
AN ENTRY TO RETURN CORE PREVIOlJSL Y
AllOCATED MUST HAVE THE ORIGH' OF HIE
ALOCK BEING RETURNED IN Q.
ENTRIES TO OBTAIN SPACE ARE MADE
TI/ROUGH REQALC.
ENTRIES TO .RETURN CORE ARE MADE
THROllGH RTNCOR.
IF AN ALLOCATION CAN NEVER BE MADE. THEN
A REtURN TO CALl~R IS MADE WITH Q=O
IF NO SPACE IS AVAILABLE NOW. THEN A
RETURN TO CALLER IS MADE WITH Q~-l
IF THE ALLOCATION IS SUCCESSFUL. THEN
A RETURN TO CAllER IS MADE WITH THE
ORIGIN OF TilE AREA IN Q.
*
*
*
*
REQALC 000 0
STQ* REQLVL
INA MINSIZ
STA* REQLTI/
lJ1A+ LVLSTR. 0
ALCORE
ALCORE
ALCORE
ALGOHE
ALCORE
ALCORE
ALconE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
L£NGTH~(A)+MINSIZ
~
"
f)
.
9
ALCOI~E
42
ALCORE
ALCORE
ALCOHE
ALCORE
ALCURE
ALCORE
ALCORE
ALeORE
43
44
ALCOI~E
REQUEST LEVEL
7
ALeORE
ALCORE
ALCORE
ALCORE
45
46
47
48
49
50
51
52
53
54
55
r,
\~
C:
0
0
CLASS - VER 3.0
)7PO ASSEMBLY OF ALCORE
5
POOPli
POO07
pnnos
POOOA
POOOB
POOOC
pnpn£l
9400
09FO
0132
OCOO
lCF2
7FFF
)C
10
15
70
25
POODE
PnOOF
POOIO
POOl2
POO)3
POO14
POO15
POOll'
POOl7
Pont A
PPOl~
30
P(lOIA
ppnlB
POo]C
POOIO
pnOlE
POOIF
STA*
ADO*
SUB..
INA
SAM
ENQ
JMP*
liMA
PP?A
*
*
*
*
CA2
COIl
6P22
EOOO
4821
E201
OllOD
0151
HHE
40FF
C4FF
9AIl'
0121
Ill}]
OA14
9811
0131
1~05
3~
7FFF X
LOASTA*
LOQ
RCOREI STQ*
*
*
*
LOQINQ
SQN
JMP*
STQLOASUB*
SAP
JMP*
TRQ
*
SUB*
SAM
JMP*
*
*
*
*
LSTR
REQlTH
LEND
-'2
CA2
0
(REQAlC)
MAXNO
rHNPCE
=XCAl TlfO
LTIID
1
CEOT
I
(I)
REQLTH
1
CNXT
A
LSTR
1
CSIZCK
45
50
55
I'P07
[OFF
IPE4
0000
P{lOO
0000
IF PIECE TOO SMALL
GO GET NEXT PIECE
IF THE START OF TIlE
PIECE ABOVE LEVEL START
GO CHECK SIZE
OTHERWISE. PIECE STARS
BELOW START FOR THIS
LEVEL.
IF START OF PIECE, SI,
PLUS ITS LENGTH IS
.GE. TIlE REQUEST LEVEl
PLUS LENGTH, GO CHECK SIZ
*
ADOSUB*
SAP
JMP*
CSIZCK LOASUB*
SAM
JNP*
lDASTA*
LOA*
STA*
CNXT LflQJMP*
LSTR NlIM
REQlTll NLJM
REQLVL f'JUM
2**15-1
I,Q
0
*
R4FF
98DE
0121
1809
C4FF
9AOC
ODI
1005
C4FF
fiflOR
Cfl09
IF LSTR + REQLTH .GT. LEND
ERROR CODE, Q=O
IF THREAD = FFFF, GO TO CEOT
*
POO20
POOll
P0022
POO23
POO?4
POOlS
pnM6
POM7
Pon2A
P0029
PPO?A
PP(l2B
POfl2C
P0020
P002E
POO?F
PO(l30
LEVEL START
IF LSTRfREQLTH .GE. LEND
LOOK THROUGH THE AVAILABLE AREA FOR HIE
SMALLEST USEABLE PIECE.
*
40
OR/2l/AO 00.20.32.
(I)
REQLTH
1
CNXT
(I)
MINPCE
1
CANT USE PIECE
IF THIS PIECE LARGER THAN
LAST PIECE, CIIECK NEXT
CNXT
(I)
HH'PCE
LTHO
LMINT£l
I
RCOREI
0
SAVE lNGTH AND LOCo
TlffiEA£l LOCo FOR SMALLEST
GET TIlE NEXT PIECE
REPEAT SEARCH OF THREAD.
PAGE
ALCOHE
ALCORE
ALCORE
ALCURE
ALCURE
ALCURE
AlCORE
ALCUHE
ALCORE
ALCURE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCURE
ALCORE
. ALCORE
ALCURE
ALCORE
ALCOHE
ALCURE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALconE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCUHE
ALCORE
ALCORE
ALCORE
ALCORE
ALCURE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
AlCORE
ALCORE
AlCORE
ALCORE
ALCORE
ALCORE
ALCOIlE
ALCORE
ALCORE
ALCORE
3
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
BB
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
III
112
CLASS - VER 3.0
1700 ASSEMBLY OF ALCORE
5
10
POO31
POO32
P0033
0000
0000
0000
POO34
POO35
POO36
POO37
POO3fl
r0039
COlI
98FB
0101
0122
rCH
lCCfl
]s
20
25
30
35
40
45
Pon3A
P(1(l3B
P(11l3C
PO(l30
POl'3E
POO3F
POll40
POll41
POO42
EPF7
C201
4A3A
flP3B
CC3A
683C
EP3R
C201
6838
POll43
POO44
POO45
POO46
CREA
9834
0103
0132
POO47
POO48
POO49
POO4A
P(1(l4R
POO4C
POO4£l
PO(l4E
P(1(l4F
PO(l50
poost
P(l(l52
09FC
0121
1A1O
0903
6fl2C
EB2C
0
*
*
*
CA4PI
*
*
ACA5
4M9
40FF
EPOE4P2fl
ClOt
(l2(11
P(l(l~3
4)0)
POOS4
PO(l55
POO5fi
P(l(l57
ponsp
eCl?
9M2
(lcn
C820
(iCIE
*
50
55
MINPCE
lMINTO
LTHD
*
CEOT
POO59
POOSA
P005B
POO5C
POO50
POO5E
POO5F
P(lOfiO
CCIF
9804
0111
IB11
09FC
0121
IflOE
0903
*
*
CAS
08/21/80 00.20.32.
NUM 0
MJM 0
NUM 0
LDASUB*
SAZ
SAP
ENO
JMP*
MAXNO
MINPCE
1
CMPl-*-1
-1
(REOALC)
END OF THREAD.
IF NO PIECE FOUND. THEN
ERROR COOE RETURNED IN 0
A PIECE WAS FOUND
LOO*
LOA5TO*
STA*
LOA*
STA*
lOO*
lDASTA*
LMINTO
1.0
51
S2
(52)
CN
52
1.0
S3
LOA* lSTR
SUB* S2
SAl ACA5-*-1
SAM ACA5-*-1
INA -MINSIZ-l
SAP 1
JMP* CA5
INA HINSIZ+l
STA* LSIPRIME
lOO* S2
STO* SI
STO- I
lOO* lSTR
STO* 52
U1A- 1,1
5TA- 1.0
STO- 1,1
LOA* (SI)
SUB* lSI PRIME
5TA* (52)
LDA* lSIPRIME
STA* (SI)
51 POINTS TO 52
START OF SEGMENTS=51=S2
CHOSEN PIECE LENGTH = CN
52 POINT5 TO 53
IF NO LOWER PIECE
A LOWER PIECE EXISTS.
IF LOWER PIECE LESS THAN
MINIMUM SIZE PLUS 1
SI.I=S2
POINTER TO S3
PUT INTO S2
POINTER TO 52 PUT IN 51
LTH S2=L51PRIME-ORIG LTH
TllREAD NOW IS ••• SI.52.53
IF THERE IS NO UPPER PIECE, THEN GO TO CA6
LOA* (52)
SUB* REQLTH
5AN 1
JMP* CA6
INA -MINSIZ-l
SAP 1
JMP* CA6
INA MINSIZ+1
GO TO CA6
IF UPPER PIECE SMALLER
THAN MIN SIZE. GO TO CA6
0
PAGE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
AlCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
-ALCORE
AlCORE
ALCURE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
. ALconE
ALCOHE
ALCORE
ALCOHE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
4
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
,
~
(W
~Vy'"
U
}
""
;lLO
~L1
()
{\
(oj
({t<
.
cJ{
tY'
PVv
I
I
(1 r./i):Y
r
/'1""U
, )}f~
'I.t J
LL (J~
165
166
167
16H
169
0
"':'..1
0
0
0
CLASS - VF.R 3.0
17nn ASSEMBLY OF ALCORE
5
10 •
15
70
P(l(lpJ
MHP
P0062
POntl3
pn064
pnp6!l
POnf'6
POOfi7
EflIll
lInFF
pn06~
P0069
pnOM
POOf'S
P006C
STA*
LOQ*
5TQLOA*
STA*
ADQ*
LDA*
STALOASTASTQSTQ*
C~CA
6C13
F8C8
C812
11622
CWI
6201
4101
4~OE
P006D
POOtlE
E809
C80C
P006F
P0070
P0(7)
poon
6201
E808
OAI4
0902
*
*
*
CA6
*
*
*
*
7~
30
35
POP73
PO(1]lI
PO(l75
P00711
POO77
P007fl
P0079
P007A
POO7S
6201
OR??
ICflA
*
*
*
SI
0000
000)
0000
S2
0001
0000
nooo
40
45
50
POOlC
POOlD
P007E
POOUO
POOAI
P0082
POOR3
POOO4
pn01~5
POO~6
POO~7
~!'
pnOPR
POOPQ
PonPA
pnOf1R
0000
4fl30
EOOO
4S2C
C201
onoo
n900
0111
!li06
60FF
9fl?6
OJ??
EOFF
lPF~
40FF
0011 X
LS3PRIME
S7
I
REOLTH
(52)
REQL HI
LS3PRIME
(ZERO) ,Q
1,1
I,Q
1,1
S3
LDQ* SI
LOA* S3
STALDQ*
TRQ
INA
1.0
S2
A
MINSIZ
I POINTS TO S2
LENTH S3PRIME TO S3PRIME
POINTER TO NEW S3 INTO S2
PTR TO OLD S3 TO S3PRIME
S3PRIME IS NEW S3
THREAD SI TO S3
RETURN TO CALLER WITH
O=FIRST USABLE ADDRESS
STORE LOCATION OF AREA BEfORE TUE AREA
STA- I,Q
TRA 0
JMP* (REOALC)
DATA STORAGE
NUM
BSS LS) PR IME (J)
NUM
ass LS3PR IME (1 )
NUM
NUM 0
1
RCEOTl
STA- I
SUB* RS2
SAP
LOOJMp·
RCEon STO-
LENGTU OF CORE ALLOCATOR REQUEST
CORE ALLOCATOR - RETURN CORE LOGIC
0
RETURNED PIECE CALLED RS2
RS2
=XCALTHD
REFERENCE TO NEXT ENTRY
RTHD
.ADDRESS OF ENTRY
I,Q
0
0
J~'P*
•
LEFTOVER CALLED S3PRIME
REMOVE SEGMENT 52 FROM THREAD 51, S2, S3.
S3
CN
*
*
*
RTNCOR 0
STO·
LDQ
RCAI STQ*
LDANOP
INA
SAN
•
08/21/80 00.20.32.
END OF THREAD
IF ENTRY ABOVE RS2,
GO TO RCEon
RCEOTl-*-l
I
RCAl
GET NEXT PIECE
J
REF TO E~TRY WHERE NEW
PIECE WIll BE PIll IN I
PAGE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCOI~E
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALeORE
f\LCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALCORE
ALcor~E
ALCORE
AlCORE
ALCORE
ALCORE
ALCORE
ALCORE
AlCORE
ALCORE
ALCORE
AtCOHE
ALCORE
ALCORE
ALCOHE
ALCOHE
AtCORE
ALCOI~E
5
170
171
In
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
22fl
5
POORC
PonSD
POO8E
PonSF
P(l(190
PO(191
POO92
CI0l
POO93
4101
10
on72
0151
IS1C
E8ID
C101
6201
]5
P(1094
PO(19!i
POoofj
Pon 0 7
?O
?fi
30
35
40
0117
~4FF
POfl~A
64FF
C2fl1
fliot
COFF
f)ROF
E80E
OR14
[lCOC
9201
0117
Pon~l(l
Pfl09E
PflO9F
POflAO
PonAI
POOl\2
PonA3
POOM
POn,1\5
POfl.A6
pon,1\7
POO,I\S
POO,1\9
POOM
POOj~R
POOJ\C
POflM)
POO,IiE
*
*
*
*
9~I7
pnn99
POO~C
*
~4FF
CC]5
POfl9R
RCA
COFF
POOClP
C20t
60FF
C4FF
scn6
6C05
C101
6201
lCPO
0(100
OOOfl
RCAC
*
RCAD
RnlO
RS2
LDAEAQ
SQN
,JMP*
lDQ*
lDASTA-
1,1
Q
RCA
RCAD
RS2
1,1
I,Q
STQ- 1,1
CHECK IF RE1URNED PIECE ALREADY
RElEASED
SKIP IF NOT
THREAD NEW PIECE
THREAD NEW PIECE IN
LOC. OF NEXT PIECE INTO
NEW PIECE.
LOCo OF NEW PIECE
INTO REFERENCE
IF lOWER PIECE TOUCUES
N;EW PIECE
l(lAAOOSUB*
SAN
LDA*
AD[lSTALDASTALDASTA*
lOQ*
TRQ
AOO*
SUBSAN
lOASTALDAADO*
STA*
lDASTA,JMP*
NUM
NlIM
END
I
(I)
RS2
RCAC-*-1
~RS2)
I)
(I)
I,Q
1,1
I
RS2
RS2
A
(RS2)
I,Q
RCAD-*-1
I,Q
I
COMBINE PIECES
REF TO NEXT PIECE GOES TO
COMBINED PIECE FRONT.
CAll NEW PIECE RS2
IF RS2 TOUCHES NEXT PIECE
COMBINE PIECES
~I)
RS2)
(RS2)
1,1
I,Q
(RTNCOR)
0
6?d74B STORAGE USEO
6400 ASSEMBLY
()
OS/21/S0 00.20.32.
CLASS - VER 3.0
1700 ASSEMBLY OF AlCORE
REFERENCE TO THREAD
266 STATEMENTS
1.498 SECONDS
(j
46*750
46*750
46*750
46*750
46*750
PAGE
ALCORE
AlCORE
AlCORE
ALCOHE
ALCORE
AlCORE
ALCORE
AlCORE
ALCORE
AlCORE
ALCORE
AlCORE
AlCORE
AlCORE
ALCORE
ALCORE
ALCORE
ALCORE
AlCORE
ALCORE
ALCORE
ALCORE
ALCORE
AlCORE
ALCORE
ALCORE
AlCORE
ALCORE
ALCORE
AlCORE
AlCORE
ALCORE
AlCORE
AlCORE
ALCORE
ALCOHE
ALCORE
AlCORE
ALCORE
ALeORE
ALCORE
6
227
22B
229
230
231
232
233
234
235
236
237
23S
239
240
241
242
243
244
245
246
247
24S
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
38 SYMBOLS
153 REFERENCES
o
0
0
0
CLASS - VER 3.0
1700 ASSmBLY OF ALCORE
COMPLETE REFERENCE MAP.
ACA5
ALCORE
CAL THO
CAl
CMPI
CA!l
CAf}
CEOT
0049
0000
007F
OOOE·
003A
0059
4/10
on~[l
Cf-lXT
CSIZCK
I
n034
007B
002C
0024
DOFF
LENO
LMINTO
LPMSK
LSTR
LSIPRI
LS3PRI
LHID
lVLSTR
MAXNO
MINPCE
MINSIZ
RCA
RCAC
RCAD
RCAI
RCEOTl
RC,OREl
REOALe
REOLTH
REOLVl
RS2
0009
0032
0002
002E
0077
0079
0033
0005
DOll
OD31
0002
0090
009F
OOAB
ooao
OOP,R
nOl2
nroo
002F
on30
OOAO
RTHD
RTf-lCOR
SI
S2
OOAC
007C
0076
0078
S3
ZERO
007A
0022
0'
*EXTERf-lAL*
4/2Po
2/10 E
2/1fi X
3/07
-SYSTEM*EXTERNAL*
ABSOLUTE
*fXTERNAL*
ABSOLUTE
ABSOLUTE
ABSOLUTE
4/33
4/55
3/24
4/21
3/29
3/34
3/25
3/26
3/43
2/16
3/54
2/17
2/60
4/35
4/60
3/17
2/16
2/20
3/15
2/19
6/05
6/19
6/06
' 5/46
5/!,1
3/17
2/14
2/58
2/56
5/44
5/53
5/46
2/14
4/J8
4/19
4/20
4/24
2/17
X
Q
X
0
Q
l
l
E
E
0
4/29,
2/11 0
3/J6
3/14 l
4/16 L
4/52 l
4/58
4/07 l
5/39 L
3/46
3/47 L
3/47
3/51
3/55
3/05
4/04 l
2/20
3/32
4/45
5/09
3/53
2/59
3/14
3/48
2/57
6/07 l
6/27 l
6/31
5/57
5/55
3/56
'l/55 L
3/n4
3/59 l
6/07
6/1R
6/41 l
5/43"L
4/37
4/72
4/27
5/14
5/10
08/21/80 00.20.32.
PAGE
4/33 L
5/45
5/18 l
3/5D
3/55 L
4/38
5/05
5/52
5/56
5/58
6/16
6/17
6/21
6/22
4/26
5/35 B
4/39
, 3/60 L
4/34
4/08
4/56
4/59
5/24
5/06
6/25
6/34
6/35
4/16
3/57 l
4/47
5/37 B
4/05 l
4/07
3/52
4/31
6/40 l
5/58 l
3/09
3/27
4/12
3/44
5/30
3/58 L
4/53
6/20
6/26
6/27
6/29
6/36
6/37
6/42 l
6/40
4/44
4/36
4/40
5/19
4/48
4/46
4/52
5/38 l
5/18
5/04
5/07
5/34 L
5/22
5/36 l
5/08 '
7
(j
r'
~.. )
o
o
o
ClASS - VER 3.0
1700 ASSEMBLY OF NFNR
STORAGE ALLOCATION.
AOORESS
LENGTH
0000
0075
0075
BINARY CONTROL CARDS.
NAM
NFNR
DECK-ID M2l MSOS 5.0
-- 0000
NFNR
ENO
ENTRY POINT NAMES AND ADDRESSES.
FINDRQ -- 0000
FNR
EXTERNAL SYMBOLS.
AlTSlIB
08/21/80 00.20.32.
LOGl
lOr.lA
lOG2
-- 0000
SUMMARY
PAGE
CLASS - VER 3.0
1700 ASSEMBLY OF NFNR
*
*
*
~
nooo P
10
0000
*
P
l~
?O
25
30
0000 P
O(lOO P
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
*
35
0005
0006
40
*
*
OOO~
0009
OOOA
OOOB
OOOF
45
0002
0022
0023
50
*
*
*
oono
OOBF
PODOO
55
rooOl
POOO2
P(lP03
P(1004
PO(1O~
0
OBOO
0500
C8FO
6l0F
OCOO
410A
*
FNR
08/21/80 00.20.33.
OECK-ID M21 MSOS 5.0
NAM NFNR
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION, LA JOLLA, CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
SUMMARY-IIO NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
FINO NEXT REQUEST-NON-BUFFERED
ENT NFfJR
EQlJ NFNR{*)
THIS PROGnAM FINDS THE NEXT REQUEST
FOR A GIVEN PHYSICAL DEVICE.
IT IS ENTERED FROM ALL DRIVERS AND
RETURNS AS FOLLOWS
CALL+l IMPLIES NO REQUEST FOUND
CALL+2 IMPLIES A REQUEST IS READY
WHEN A REQUEST IS FOUND, FNR SETS
ALL POSSIBLE INFORMATION IN THE
PHYSICAL TABLE SLOT BEFORE RETURNING.
FNR IS ENTERED WITH THE CORE LOCATION
OF THE PHYSICAL DEVICE TABLE SLOT IN I.
ENT FNR
ENT FINDRQ
EXT lOGl,LOC,lA,lOr.2
SUB. TO SET Q=AL T• IF lU IN Q IS DOWN
EXT ALTSUB
EQU
EQU
EQU
EQU
EQU
EQU
EQU
PHYSICAL DEVICE TABLE.
ELU(5)
EPTR(ti)
EREQST(a)
ESTAn (9~
[CCOR{ 10
ELSTWO( 11)
LOGICAL UNIT=L.U.
CALL PARAMETER LIST LOCo
STATUS WO.l.
CURRENT I/O WD.LOC.
LAST+l WO.LOC.
RETUR~(l5)
*632
EQU LPMSJ(1 2)
EQlJ ZERO( 22)
EQU ONEBIT($23)
EQU ASABS($BO)
EQU ANABS($BF)
NOP
lIN
LOA*
STAENO
STO-
0
FINIJRQ
RETIIRN, I
0
ECCOR,I
\ ~.If-, (Q..;"-."'(~\\
\:t
SAVE RETURN AnR
I~u..tfi
n
PAGE
*632
NFNR
NFNn
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
tlFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNH
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
2
2
3
4
5
7
~
9
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28 .
29
30
31
32
33
34
35
36
37
3R
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
0
0
0
0
5
10
15
?(l
PflO(lfl
POO07
Pfl(lflfl
POO09
Fl05
0[100
0}47
lRIA
POOOA
POOOC
POOOE
POOOF
POOIO
POOll
POOl2
POO}3
POO14
POOl5
PClOlfl
5400
C600
90FF
0107
CIOA
0822
9C49
0129
POOl7
POOlS
nClA
POOl~
25
POOJA
POO)B
POOIC
3(l
PClOHl
POOlE
POCllF
P0020
POO21
POO22
3!l
7fFF X
7FFF X
AC
AD
0001
4lOA
lflf3
AE
O~OO
4105
CIOF
fiPE4
lfl07
EXIT
0500
OAOO
6105
EIOF
0400
1622
AIl-*-l
CM
NFNR
NFNR
NFNR
NFNR
RTJ
LOA
SUBSAl
LDATRA
SUB*
SAP
INQ
STOJMP*
IF LU = Q IS DOWN, SET Q = ALTERNATE LU
ALTSUB
LOGlA.Q
INTERRUPTS ARE ENABLED
6 / rtr'dI ~_______ -(A...-v'--'..L-1~~_ r-f> /7 1L --:fU---J (}--0tC" rY~
If THIS L.U. USES nils DEVICE, GO TO AE
.
AE-*-l
SEARCH ALL LU FOR THIS DEVICE /~'v-t()..A.f0 d..J..JJlrp
ECCOR,I
Q
MAX LU NO
(ALOGI)
IF SEARCH IS COMPLETED. GO TO EXIT
EXIT -*-1
I
SAVE LU NO FOR SEARCH
ECCOR,I
AC
NFNR
NFNR
NFNn
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
NFNR
LDQliN
STQLDASTA*
JMP*
ECCOR,I
0
ElU,1
RETURN, I
FlNDRO
CAA
REQUESTED LOGICAL UNIT
liN
ENA
STALDQEIN
JMP-
0
0
ElU,I
RETURN, I
0
(ZERO).Q
NO FURTHER REQUESTS fOR THIS DEVICE
FREE THE DEVICE
C600·
0900
Ollfi
45
7FfF X
VJ\~ \\yo,
CM
~\~Oh(
O(j'~
POfl27
P00211
LDAf LOG2,0
INA 0'
SAN CB-*-l
!i5
011("10
18E4
1flFO
~MP*
rn029
PO(l7A
POO2B
POMe
£1122
pn020
pnO?E
fiJ06
OP72
CB
'f"'S
IF THE TlIREAD I~ NOT EM,fTY, GO TO CB
acrtv.::... {il.Q.u.tA"' 5~\\ ~
(ALOCa},Q
1
2
CJlECK HIE TYPE 0/1 BIT
b\~ \l.\ ~
Vlo\-
5'ho. t &J.
-:
!:-\i{ \,", \';'\
~\'(.l("~(.\..
'-l
(l
AD '
EXIT
STA- EPTR,I
THA Q .'
CONTINUE SEARCH IF LU
S~IAHES
A DEVICE
SAVE ADDRESS OF TOP REQUEST IN TlIREAD
\~\ Y\\\I~ \1\;;
63
64
65 /''---£v~
66
67
68
69
70
71
72
73
82
83
84
85
86
NfNR
NFNR
89
90
NFNR
NFNR
NFNR
92
93
94
NFNR
96
NFNH
NFNR
NFNR
NFNR
NFNR
tlFNH
98
99
101
102
103
4.0 NFNR
NFNH
105
106
RETURN TO ADR. OF CAll +1
0...\\
60
61
NFNR
NrNR
NFNR
NFNR
NFNR
NFNR
*632
I{\J,.. 0-'
58
59·
75
76
*632
~;Z ~\(Q.C(J, ~\~ l..lI...
3
NFNR
NFNR
NFNR
NfNR
NFNR
NFNR
ASSIGN THIS L.U. TO THE DEVICE
THE TIIREAD IS EMPH
LOA*
ALS
SAP
fiN
JMP*
CE34
nFCl
LU ASSIGNED TO DEVICE
DEVICE IS ASSIGNED TO A L.U. (I.E., THE L.U. ADDRESS IS IN
WORD ELU I N HIE PIIYS DEV TABLE, AND IN Q).
*
SO
HU, I
0
'1tAJ(~$ J'(
POM3
P0075
POfl?fi
PAGE
LDQINQ
SQZ
JMP*
*
*
40
00/21/80 00.20.33.
CLASS - VER 3.0
1700 ASSEMBLY OF NFNR
77
78
79
80
87
100
CLASS - VER 3.0
1700 ASSEMBLY OF NFNR
S
]0
1~
20
P002F
P0030
P0031
P0032
P0033
P0034
P0035
P003fi
pr037
P0038
CI0~
AOI0
B032
6)08
CIn~
A02C
Pon3~
fllP9
prn3A
P003S
Por3C
pno3E
P003F
Pf'040
P0041
POfl42
P0043
P0044
PO(l45
EIOfi
C622
AOPO
01]7
C201
fi10A
C204
nOF
8 lOA
3EOO
-------2 5---·---- ~g:~:~ -----~~~~-\-\-O-\--,,-L.----~-CCX
30
35
40
50
~,.'
,.;::;J,W€'C.\-tifj
/J/1
POl(l48
POO49
P004A
P004B
P004C
P0040
P004E
P004F
PO(lSO
P0051
pons?
PO(lS3
P(l(l54
P0055
A007
OFFO
A026
OOFE
014ll
ODFE
014A
OIlFO
0]47
OOFll
0144
OOFl
(l159
1800
pr057
POO58
POO59
POO5A
090]
0901
0901
JAM
CBO
CBE
CBF
CBG
POO5B
7FFF X
POO5C
POOSIl
B109
6109
CG-'~
0010
-&
INA
INA
INA
JMP*
1
1
1
CBJ
ClDAlDQ-
]201
4
ADDSTAJMPl OQlRS
ANDLlS
ANDINQ
SQZ
I NQ
SQZ
INO
SQZ
INO
SQZ
INO
SON
JMP
~TA-
610B
PAGE
2,Q
leo"'- UJfYiC).NFNR
107
ElU,I.
NFNR
108
0
L A ) NFNR
109
(CAA+l),Q
UPDATE THE HIREAO \o.o\~{A ~ ~ d- ~CA"1t\
NFNR
110
EREQST, I .)
NFNR
111
lPMSK+14
NFNR
112
ONEBIT+15
SET REQUEST IN PROGRESS BIT
NFNR
113
EREQST,I
NFNR
114
\
ESTATI,I
rA\f\U"-V' s\a\u~ ~V'I\ ...p'v... y >,\1I1i20
NFNR
115 &t~ ~,\\- ~r S'(J-CA.a,l ~
ONEBIT+9'
CLEAR STATUS WORD EXCEPT FOR M.M. BIT
NFNR
116
.1. I~
ESTAll, I
NFNR
117 I.lt( ~,01 ~ \-~~:v.~?{.....
EPTR,I
NFNR
118
(ZERO),Q
NFNR
119
=N$3EOO
EXTRACT REQUEST CODE
NFNR
120
CCX-*-1
~
7
NFNR
121
I,Q
,~ORY
NFNR
122
ECCOR,I
NFNR
123
4,Q
SET STARTING
NFNR
124
RETURN,I
AND FINISHING
*632
NFNR
125
ECCOR,I
ADDRESSES FROM
NFNR
126
ElSTWD. I
THE DIRECTORY,
(,,:1 ll)\
.
.
N,F. NR" '.
12.7
r&:/-?~~/9-..-1,(L._._
~L10 nw.,.J1,c,f- t1.._\..f~~~__~-,- __-____Jlt!R _____~128--~'2~·I.Lt01 J , ,.:.-t.. '"
3, Q - - - '-L..A
, .. Wo ret-----,
'-',--- -----rNFNR
129
at \C~u...e.6\
9
.
I
NFNR
130
;J J LLPMSK+5
MASK FOR REQUEST CODE·'r.0QU2.dt**MSOS 4.0 NFNR
131) 1.vt ;:-ulq 2/ ?\,..'
16
A--=- VI-\o3..L \~l ~'i.f PI '-o;~J
Ca).Q., \So ""\/{ ~vYl41
NFNR
132
"
/, . L
ONEBIl +3
~ ~
, !
NFNR
133
~d.Q__ t.--(·~r?
-1
re.C:L(':~j-C. ~rt.-f--t-..
NFNR
134
-7 -'___.• , ( . //:"'1"",-~V-;;J/tf(J-CBG-*-1
READ 0
NFNR
135
/7)0,."
-1
NFNR
136
..-tLr~ E:-- CBF-*-l
WRITE 3..
NFNR
137
-2
NFNR
138
CBE-*-1
FREAD
~
NFNR
139
-2
NFNR
140
CRIl-*-1
FWRITE 3
NFNR
141
-8
MOTION
NFNR
142
CO
ALL OTHERS
NFNR
143
COl
. NFNR
144
lDALDQEIN
STA*
LOAANIlEORSTALIlAANPSTALOOlOAAND
SAN
(LDA-
C202
n05
0400
6EFl
08/21/80 00.20.33.
-
cy·
4L
\
S£;-\
c-;(f .
NFNR
NFNR
NFNR
NFNR
146
147
148
149
ALOGI AOC lOGl
NFNR
151
CBJ
NFNR
NFNR
153
154
NFNR
156
/
~o~0\\ \0 1\'
£~1 r E51~I)T.i
FORMAT WRITE CODE = 3
FORMAT READ CODE = 2
WRITE CODE = 1
READ CODE = 0
EOR- ESTAll, I
STA- ESTAll. I
i
55
*
o
GET THE ABSOLUTE VALUE OF NAND S FROM TIlE REQUEST
()
0
,
o
o
()
1700 ASSEMBLY OF
08/21/80 00.20.34.
ClASS - VER 3.0
~FNR
PAGE
5
P(l(l5E
ElOll
CD
LOQ- EPTR,I
G~ ~O~(tI\'\;'\Q,kr \;S~
NFNR
158
P005F
C~22
.LDA- (ZERO)~Q
hET FIRST WORD OF REQUEST
**MSOS 4.0 NFNR
159
5
POOfiO
A031
AND- ONEBll+14
MASK FOR D PARAMETER
**MSOS 4.0 NFNR
160
P0061
0106
SAZ CDA-*-1
A=O 0 PARAMETER NOT SET--PART 0
**MSOS 4.0 NFNR
161
P(lOfl2
C205.
LDA- 5,Q
GET THE STARTING ADDRESS
**MSOS 4.0 NFNR
162
P0063
610A
STA- ECCOR,I
SAVE IN PDT
**MSOS 4.0 NFNR
163
P0064
8204
ADD- 4,Q
ADD NO OF WORDS TO FORM LAST+l
**MSOS 4.0 NFNR
164
10
P0065
610B
STA- ElSTWD,I
SAVE IN PDT
**MSOS 4.0 NFNR
165
.
POOfi6
ElOF
COl
LDQ- RETURN, I
PICK UP RETURN ADDRESS
NFNR
166 /? I.-//7 ~/: ' / J
POD67
1201
~ ____ ._J~:~l_tQ-___~_~U1JB1LIO~~~ll+2
**MSOS 4.0 NFNR
167 .l.l£~ ¥.JL
(
-+'ff~r.
or
by
r '(
~! (!eq O~ ~\'15-UJ\W~
55
56
57
o
o
CLASS - VER3.0
1700 ASSEMBLY OF NCMPRQ
poonE
pnonF
5
10
15
2n
POOJO
POOl!
P0012
P0013
P0014
POOl5
P0016
POOl7
P0018
P0019
POOlA
POOlB
POOlC
POOlP
POOlE
PoolF
pnr.20
pnn?1
pn022
pnn?3
P0024
pon2!'
30
35
6203
CI09
AOlF
B203
fi203
C201
0112
6202
l80C
C6?2
Aon
B032
6622
O~14
E203
0500
6~03
54F4
6000
onno
C108
AOI0
filOR
nos
pon2P
P0026
C(lOO
, OFCI
P0029
(l123
POOi'A
P002B
P002C
P0020
P002E
P002F
P0030
OP04
0500
fl105
0400
ElOF
1622
STA- 3,Q
LOA- ESTATl,I
ANO- NZERO+13
IN REQUEST ANO
REPLACE WITH
SAME FROM PHYSTB
~~:= ~:~
~\Uv
\Jetc\.\ \.\
08/21/80 00.20.35.
NCMPRQ
NCMPRQ
NCMPRQ
\CVj\(~\ LV;}'
LlJorc\
LOI\- 1,Q
('0 ""'f,)~\-tOI' OC\cLtp~ U)Drcl- .
SAN CO-*-l
IF COMPo ADDR. EQUAL ZERO
STA- 2,Q
CLEAR THREAD ANO
JMP* EE
GO TO EE.
CO
LOA- (ZERO) ,Q
pd~c~...uYL CO'''N-1tuA:7-(Y't\ ~L-\(!/J.J
AND- LPMSK+15
SET BIT 15 OF WORD ZERO
EOR- ONEBIT+15
QF THE REQUEST
STA- (ZERO),Q
~ M 0-- ~JGU/-;\ (o-~.
TRQ A
4 -= '(~u'...eA (t.j.)~
LDQ- 3,Q
GET ERROR WORD FROM REQ.
lIN 0
STA* CE
RT J- (AMorH)
REQUEST AN INDIRECT
VFO Nl/O,Nl/l,tJ5/1(l,Nl/0,NR/0
II
***MSOS4.0
o
0
SECONDARY SCHEO. CALlL(j1Vi'r"U\"\OV\ c}..c-I..6!.,-<;.'
CE
lOA- EREQST,I
IF E )5 EQUAL TO 1
H
AND- lPMSK+14
OTHERWISE,
STA- EREOST,I
ZERO HIE FIElD 'A<,\'IJ~e.)(WJ,(
LOQ- ElU,1
LOA+ lOG1,Q
7FFF X
ALS 1
TEST l.U. TYPE
SAP HH-*-1
SET A
-lIN 0
/ / STA- ElU, I
/'(fH
EIN 0
//
lDQ- RETURN, I
(
\
(I
\
/
JMP- (ZERO),Q '
OP5F
nOH
n02F
ABSOLUTE
ABSOLUTE
*EXTERtJAL*
*EXTERNAL *
-SVSTEM-
ARSOLUTE
ooon
0005
0065
0063
nD67
nO(l8
P062
0015
n028
n009
002D
00Ei4
0022
*EXTERNAL*
ABSOLUTE
2/43
2/44
3/29
3/55
2/36
2/35
3/15
4/28
3/32
3/19
4/20
3/18
3/56
3/25
3/47
5/P5
2/42
2/31
2/30
3/1R
5/D9
4/52
4/53
4/42
3/28
2/37
3/27
3/16
3/57
3/43
2/41
3/31
Q
Q
L
X
X
l
Q
E
E
L
X
0~/21/80
00.20.41.
PAGE
8
7/19
3/51
7/B
3/42
4/26
3/49
4/56
3/54 l
5/07
3/53 L
4/39 L
4/34
3/58 L
4/18
4/17
7/16
4/25
6/11
6/09
3/17
4/32
3/34
3/23
4/24
3/22
4/24
3/27
3/11')
5/n7
3/40
4/15
3/13
3/26
7/10
6/10
7/12
7/13
4/29
3/33
3/37
3/22
L
4/35
4/47
7/1D
5/0R
7/15
7/18
4/46
4/49
4/51
4/55
L
4/36
l
l
l
L
L
4/23
3/21
4/38
3/34
4/39
6/D9 L
L
l
L
L
3/52 L
L
L
Q
4/58
3/35
3/38
6/11 l
3/41
4/31
n
4/41
4/44
(j
o
n
1700 ASSEMBLY OF OTIMFR
STORAf.E ALLOCATION.
AnnnESS
lE~GTH
0000
0022
0072
E~TRY
CLASS - VER 3.0
NAM
ENO
OTIMER -- 0000
SYMBOLS.
Or.NTAB
08/21/80 00.20.42.
BI NARY COtJTROL CARDS.
(lllMER
POINT NAMES AND ADDRESSES.
EXTER~Al
o
TMRLVL
OTMER
-- 0000
(lECK-IO MOS MSOS S.O
SlIMr1AHY.
PAGE
E006 DIAGNOSTIC TIMER
ENT DTMER
EOU DTMER(*)
UllMEn
OllMER
D1IMER
8
*
*
*
THIS CORE RESIDENT PROGRAM IS OPERA1ED PERIODICALLY
VIA A TIMER REOUEST. IT IS USED TO DETECT I/O HANGUP
ONLY HIE DEVICES LISTED IN TABLE DGNTAB ARE SUPERVISED.
OTIMER
OTIMER
DTIMER
12
*
IT CAN OE OPERATED IN MULTIPLES OF 1/10 SECS
DTIMER
16
ENT OHMER
IHIMER
18
DTIMER
**MSOS 4.0 DTIMER
DTIMER
DlIMER
UllMER
OllMER
***MSOS4.0 UllMER
DlIMER
20
21
22
23
24
25
26
27
DlIMER
28
OTIMER
OTIMER
UTIMER
OTIMER
OTIMER
DTIMER
OTIMER
OTIMER
OllMER
DTIMEn
OTIHER
OT J~IER
OTIMER
J1TJMER
DTIMER
OTIMER
llTIM[R
UllMER
OlIMfH
DTlMF.H
UTJMEH
UTIMER
UllMER
UTIMER
UTIMER
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45 46
47
*
15
2n
ooon P
Ofl04
Ofl03
nOOA
0008
4000
00F4
OO[A
0002
25
30
35
lIO
d!\
50
POOOO
POOOl
POOO?
poa03
POO05
POO(l6
POOOl
poonfl
POOOe)
PoonA
ponoo
poore
ponnn
pnnoE
PO(lOF
POO]O
POOll
roo]?
rnOl3
POO14
OAOO
6016
E815
E600
OIfll
1812
C204
0121
H~OC
OClFE
fl204
OJ31
Jr08
r.602
flROll
C?03
flO03
54F4
0000
0000
55
POOl~
POOlfl
POOll
()
[1802
IPEO
0000
7FFF X
2
2
3
4
5
0000 P
0000 P
10
PAGE
SUMMARY-IIO DTIMER
DTIMER
DlIMER
UTIMER
*
*
*
5
08/21/80 00.20.42.
CLASS - VER 3.0
170n ASSEMBLY OF DTIMER
DECK-ID M05 MSOS 5.0
NAM DTIMER
MASS STORAG~ OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION, LA JOLLA, CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
EXT
EXT
EOll
EOU
EOU
EOll
EOU
EOll
TABLE OF P.D.T. ADRS
DGNTAB
TIMER LEVEL DEFINED IN SYSDAT
TMRLVL
DIAGNOSTIC CLOCK LOCATION
EOCLK(4)
DIAGNOSTIC ERROR ENTRY
EOPGM(3)
DELAY TIME IN 1/10 SECS
OELAY( 10)
TIMER REOllEST CODE
TIMRC(8)
DBIT($4000)
AMONI($F4),ADISP($EA)
EQU ZERO(2)
DTIMER ENA
5TA*
A2
LDQ*
LOQ
SQP
JMP*
I.OAA7
SAP
JMP*
A5
INA
STASAM
JMP*
A6
LOASTA*
LOASTA*
RT JSCHEO] NtJM
SCIIE[12 NIIM
*
*
RAO*
Al
JMP*
NlJM
J
0
J
J
DGNTAB,O
A7-*-1
A3
EDCLK,Q
A5-*-1
Al
-1
EOCU,O
A6-*-1
Al
(ZFRO).Q
SCHEIlI
ErlPr.M,O
SCIIEI12
(AMONI)
0
n
J
A2
0
SET J=IST LGIA ENTRY
GET AOR OF P.O.T.
IS lHIS END OF TABLE
YES
EXIT
pJ'1f~vL
GO TO AI.
DECREMENT OCLK(J) BY 1.
IF DCLK(J) IS NEGATIVE,
SCI/EDULE OIAf;NOSTIC
ERROR ENTRY
CAll SCJIEDIILER
REQUEST COUE,LEVEL
LOCATION IN DRIVER
INSERT ANY OTHER PROGRAM
ACT ION IN UERE
INCR[MENT J BY 1.
n
ilj)
· frLClsr!fjJ
"'J [/l
7
9
13
14
48
49
50
51
52
53
54
()
o
o
ClASS - VER 3.0
1700 ASSEMBLY OF DTIMER
pnOIR
pnOl!l
PflOIA
POflHl
In
PO(lIC
ppnIn
POfllE
PflfllF
POO7n
P(l(l21
CPO!l
AOlfl
*
A3
~R07
flPfl7
!It'lFIl
!lOW
oono p
OOO/l
Il1fA
7FFF X
*
LOA*
ANPAOD*
STA*
RTlJ-
ROCOO AOC
AOC
AOC
JMPOTLVL ADC
ROCOD
$11'
08/21/80 00.20.112.
TIMER DELAY
SET OIAGNOSTIC TIMER LEVEL
$FFFO MASK
nnVL
ROCOO
(Ar~mH)
TIMRC*$200+$10+0BIT
(lTIMER
OElAY
(AOISP)
CALL DISPATCHER
TMRLVL
PAGE
3
OTIMER
OTIMER
OIIMER
DTIMER
OTIMER
OTIMER
**MSOS 4.0 OTIMER
**MSOS 11.0 UTIMER
***MSOS4.0 DIIMER
OTIMER
OTIMER
OIIMER
55
56
OllMER
68
**MSOS
**MSOS
**MSOS
**MSOS
11.0
4.0
4.0
4.0
57
58
59
60
61
62
63
64
65
66
1!l
P00?2
END
56751B STORAGE USED
6400 ASSEMBLY
67 STATEMENTS
0.587 SECONUS
23 SYMBOLS
53 REFERENCES
CLASS - VER 3.0
J7nn ASSFMRLY OF OTJMfR
COMPLETE RErERE~CE MAP.
AOISP
AMONJ
AJ
A2
A3
AS
Aft
1\7
OBIT
DELAY
or.rHI\B
UllMER
OTi. VL
UHlER
EDCLK
Erwr.M
J
ROCOO
sellE01
SCHEO?
TIMRC
TMRLVL
ZEI10
OOEA
00F4
0015
0002
0018
OOOA
OOOE
(1007
4000
onOA
0004
ooon
0021
oono
0004
n003
on 17
onw
OOl3
0014
O(lnp
001')
0002
ABSOLUH
ABSOLUTE
ABSOLUTE
ABSOLUTE
*EXTERNAL*
ABSOLUTE
ARSOLIITE
ARSOlUTE
*EXTER~I\L*
AIJSOLlITE
2/30
2/30
2/43
2/37
2/40
2/42
2/46
2/39
2/29
2/27
2/23
2/21
3/06
2/10
2/25
2/26
2/36
3/04
2/49
2/5l
2/28
2/24
2/32
0
0
L
0
0
X
E
E
0
0
0
X
0
3/13
2/52
2/47
2/58
3/04
2/44
2/48
2/41
3/10
3/12
2/38
2/35
3/14
2/11
2/41
2/50
2/37
3/07
2/53
2/54
3/1n
.
3/09
2/57 L
L
L
L
L
L
L
0
3/11
2/45
2/57
3/10 L
L
L
3/l4
2/48
n
2/59 l
08/21/80 (10.20.42.
PI\(i[
4
n
,-/
CLASS - VER 3.0
1700 ASSEMBLY OF MMEXEC
STORAGE ALLOCATION.
A[l[lRESS
LENGTIf
onoo
0193
BINARY CONTROL CARDS.
NAM
END
01~3
ENTRY POINT NAMES
TYPE
MMEXEC
OClIPNT
QUE
QUEMM
PROGRAM*
LOCAL
LOCAL
LOCAL
A~D
DECK-ID MOl
MMEXEC
BLOCKS
ADORESS
LENGTH
0000
0094
OOA2
OOAA
0007
MSOS 5.0
0193
0008
OOOA
ADDRESSES.
MASCON -- 0155
MAS()RV -- 0000
MASERR -- OlH9
MASEXT -- 00B3
'MAS300 -- 00B3
RELBY£) -- 00B2
EXTERNAL SYMBOLS.
ALTllEV
08/21/80 00.20.43.
BUFF
BUFFE
LOG
LOGIA
SUMMARY
PAGE
CLASS - VER 3.0
170n ASSEMRlY OF MMEXEC
*
*
*
*
5
OA/21/flO 00.70.45.
fJAM MMEXEC
DECK-ID MOl MSOS 5.0
EXECUTIVE FOR MASS MEMORY RESIDENT I/O ORIVERS
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION. LA JOLLA. CALIFORNIA
COPYRIGIIT CONTROL DATA CORPORATION 1976
IS
M~IEXEC
MMEXEC
1
3
4
5
6
*****************************************************
*
*
*
MMEXEC
MMEXEC
MMEXEC
24
25
MMEXEC
MMEXEC
MMEXEC
Mf·1EXEC
28
29
30
31
THE I/O DRIVERS ARE READ INTO THE BUFFER AREA
WHEN THEY HAVE I/O TO PERFORM. OR QUEUES HIE
DRIVER INTERNALLY WHEN NO BIJFFER IS AVAILABLE.
*
*
*
*
*
*
70
SlIf1MARY-132 MMEXEC132
MMEXEC
MMEXEC
2
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
****************************************************
*
THIS ROIJTlNE IS n/E CORE RESIDENT INTERFACE
*
FOR ALL I/O DRIVERS WHICH RESIDENT ON
*
MASS MEMORY.
*
*
THIS PROGRAM MANAGES 1 OR 2 INTERNAL BUFFERS.
*
10
PAGE
THE ROUTINE MAY BE ENTERED AT ANY PRIORITY LEVEL.
THE LEVEL IS ALWAYS CORRECTED. IF REQUIRED.
TO THE OPERATI~G LEVEL OF THE PROf,RAM.
8
9
10
11
12
13
14
15
16
17
HI
19
20
21
22
?!'
LOCORE EOUS
3(l
35
40
45
EQlI
EOIJ
EQlI
EOU
EQIJ
EOU
on03
0073
onBS
nOEA
onEF
OOF4
*
*
0000 P
00B3 P
0155 P
01~9 P
OOB3 P
OOR2 P
*
LPMSK(3)
ONEB IT ($23)
AHIR( $85)
ADISP($EA)
PRILVLPEF)
AMONI ( F4)
M~IEXEC
*
!'~
33
MMEXEC
MMEXEC
MMEXEC
. MMEXEC
36
37
38
39
ENT MAS30n
ENT RELBYQ
MMEXEC
MMEXEC
40
MMEXEC
MMEXEC
MrlEXEC
MMEXEC
43
EXTERNAl.S
ENTRY POINTS
ENT MASORV.MASEXT.MASCON.MASERR
EXT AL TOrv .LOr.)A
fXT lOr.
BUFFERS FOR ORIVERS
EXT BtlFF.BtlFFE
*
n
32
MMEXEC
r.o
*
*
26
('\,.
\,
I
~lMEX[C
41
44
45
46
47
Mf1F.XEC
48
MMF.XEC
50
,.,..-,\
\,
)
0
(\\
\_j
CLASS - VER 3.0
1700 ASSEMBLY OF MMEXEC
!'
(lO05
0007
0000
*
*
0009
ooon
)0
(lOOE
PI/YSICAL DEVICE TJ\BLE EQUS
fQU
EQU
EQU
EQIJ
EQU
EOll
ELU(5)
EWES( 7)
EREOST(8)
ESTJ\T1(9)
MASLGN(13)
MASSfr.(14)
*
0010
(l04~
O(lO~
1'0
0003
0033
OOOfi
0044
PAGE
MMEXEC
MMEXEC
MMEX[C
Mt·1EX[C
MMEXEC
Mt·1EXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
*
MMEXEC
EQU ERCOfI.E (29)
MMEXEC
FDD PHYSICAL DEVICE TABLE THREAD
EOU FnOPHI( 72)
MMEXEC
EQII OPLVl(O)
MMEXEC
EQU MSKBNM(LPMSK)
USEABLE SECTOR CNT IN WORO-ADDR BUFFR 132*5305 MMEXEC132
SECNlJM EQU SECNUM~51)
MMEXEC
EQU SELCTF 06)
MMEXEC
l:{)lJ Tl8335( 6R)
*
15
00/21/80 00.20.45.
INTERNAL E£JlIS
3
51
52
53
54
55
5f)
57
58
60
61
62
fi3
64
65
66
2
67
68
0
CLASS - VER 3.0
17r>0 ASSEMI1LY OF MMEXEC
porro
5
10
PO{lO]
P{l(102
PO{103
PO(1(l4
Pon05
POOO/)
PO(107
POO{l~
15
20
25
30
~!'
40
45
50
5!'
f)
\.
/
PO{109
PO{lOA
POOOR
POO{)O
PO{lOE
POOOF
POOll
POO12
POO14
POOl5
POO]/)
POOl7
P{lOl~
POOl9
POOl/\
Ponln
PO{l)['l
POOlF
P(I(1?O
P(1{l21
Por??
PO{l?3
P0024
POO?6
POMP
P0079
POO?I\
pont's
PO(l2C
Pon20
POn?E
POO2F
POO30
Pon31
POO32
POO33
P0034
PO(\35
POO3(i
1I0FF
5Pfi7
1~05
511F4
!l2F8
0007 p
14EI\
'4 OFF
5852
0161
1811
CAOO 0084
0l3C
0115
OAOO 0080
COFF
61\00 007F
C4FF
0500
6802
54F4
520A
OllE P
14EA
E~OO
OORI
4P(1(1 007fl
CAll
0105
!;fl32
CAflE
(IJn2
IPOO O{lll8
5800 010';
OAFE
6A67
COFF
6A67
C}OE
61\67
CIOO
6808
40FF
29fi6
8967
6960
EflliA
';A()O
coon
POO3El
PO(l39
POP3A
P003R
pn03C
POO311
6/\09
C95A
(iAOA
1AOI
54FiI
P(I(l~f
0071 P
1I~F8
0000
0037 P
MI\SORV STQRTJ*
JMP*
RTJADC
ADC
JNPSAMLVI STl}RTJ*
SQP
JMP*
lOA
SAM
SAN
RAO
IN
GOTOIT lOASTA
TAGY LDAlIN
STA*
RTJORVLVL NIJM
AOC
EXIT JMPNOTIN LllQ
STQ
lllA*
SAZ
RTJ*
lOA*
SAZ
JMP
GOll RTJ
ENA
STA*
LDASTA*
lDASTA*
LOASTA*
STOMUI*
AOD*
STA*
1110*
STA*
LOA
TEMP [01/
STA*
lOA*
STA*
JMP*
REAOJ RTJAPC
AOC
I
LEVLIT .
SAMLVI
($1=4)
$52FO+OPLVL
SI\MLVI
($EA)
I
FINOIT
1
NOlIN
BFSTAT,Q
EXIT
TAGY
BFSTAT,Q
I
BUFPDT,Q
08/21/80 00.20.45.
INITII\TOR FOR MM ORIVERS
SET LEVEL FOR OPERATION
SI\ME LEVEL
MONI CALL
SCHEOIJLE AT PIWPER LEVEL
CALL OISPATCIIER
POT TO I
FINO IF IN CORE ALREADY
STATUS OF DRIVER, Q = INDEX OF BUFFER 0-1
IT IS COMING, NOT THERE YET, EXIT
IN CORE Q = BUFFER INDEX
UPDATE RECORD OF lAST POT USED
(I)
0
DRVLVL
(AMONI)
$52(1A
STRTlIP
(AOISP)
fJXTAtlF
BtlFNlJM
BFSTAT,Q
CoOTI
SWITCU
BFSTAT,O
GOll
OUEIT
CUECKL
-1
BFSTAT,O
I
BUFPDT,Q
MASSEC, I
OClIPfn ,0
MASlGN, I
TEMP
I
SIGN,I
BUFADR.I
BlJFSTR, I
I f'JCRMT ,I
STAR1,O
=f"0
SCI/EOULE STARTER AT DRIVER lEVEl
SCUE[lIlLE REQUEST, Q = DUFFER INDEX
EXIT
INITIALIZE INDEX
GET BUFFER STATUS
INACTIVE, CAN USE
SWITCH
BUFFER STATUS
TUI S ONE OPEN
CHECK LENGTU
SET COMING
SAVE PDT ADDRESS
SAVE MASS MEMORY ADDRESS OCCUPANT
LENGTII
TEMP, NO WORDS
INDEX TO I
* 0 OR -1
TO GET START OF DRIVER
DEHRMI NE WIIICII FREAO CALL
STARTING ADORESS
STORE NO WORDS
MM AllonESS
FREAD
CCOMPLETION
C)
4
MMEXEC
MM[XEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
Mt1EXEC
MMEXEC
lH
79
80
M~'EXEC
HI
r~MEXEC
83
811
85
86
87
88
89
90
91
92
93
94
95
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MHEXEC
MI'IEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXf.C
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
~'MEXEC
TEf~P(*-1 )
Nl.0
OCIIPNT,I
MM] ,Q
REAlll,O
tAMOfJl)
.4RFO+OPlVI.
RoeMP
PAGE
r1MEXEC
MMEXEC
MMEXEC
MMEXEC
MMfXEC
MMEXEC
t1MEXEC
MMEXEC
70
71
72
73
74
75
76
77
H2
96
97
98
99
100
101
102
103
10'1
105
106
lU7
108
lU9
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
()
0
0
(j
CLASS - VER 3.0
1700 ASSEMBLY OF MMEXEC
5
10
]~
?O
PO(l3F
P(l040
P0041
P0042
P0043
POO44
P0045
P0046
P(l047
P0048
Pfl049
P004A
PflO4B
POOtlC
P(l(ltl(l
P004E
PonllF
pnoso
pn(lSl
pnos2
0000
08C2
0000 .
0000
0000
0000
HIOA
54F4
48F8
0073 P
0000
ORC2
OOflO
OO(lO
(loon
ooon
EOFF
5R03
4R4C
14EA
25
3fl
35
40
45
P0053
POOS4
PO(lS5
POO56
POOS7
P005fl
POO'59
0000
0001
0814
A003
0822
683E
lCF9
POOSA
pnfl5B
POOSC
pon!'!)
pnn5E
P005F
POor-o
0000
fl500
ocno
CA37
IHOE
0113
4R36
(lll(l(l
pon~l
SO
P(lOli2
POflf-3
POOM
PO(lfi!i
POOfifi
P0067
leFl
!iPEF
OWl
1~F7
nCFF
lP.F8
5S
POOfiR
0000
Nl
STARI
MMI
READ2
N2
STM2
MM2.
SWICIIM
NUM
NUM
NUM
NUM
NUM
NUM
JMP*
RTJIIDC
Anc
NUM
NIIM
NllM
NlJM
NIIM
tRIM
LOQHT J*
STO*
JMP-
*
*
*
*
*
SWITCH NUM
INO
TRQ
ANDTRA
STA*
lIMP*
*
FINDIT NUM
lIN
ENO
LOOPI LOA*
EORSAN
EXTFNO STQ*
fIN
JMP*
NOTlIIS RTJ*
SAZ
JMP*
ALLCI1K ENO
JMP*
*
*
*
0
$8C2
0
0
0
0
SWIClJM
(AMONI)
$48FO+OPLVL
RICMP
0
$RC2
0
0
0
0
I
SWITCH
NXTI3UF
(ADISP)
08/21/80 00.20.45.
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
NMEXEC
MMEXEC
TlIREAD
LIB. UNIT IN LOCORE
NO WORDS
STARTING ADDRESS
MSB
LSB
M~lEXEC
FREAD
COMPLETION
TIl READ
LIB. UNIT
NO WORns
STARTING AnDRESS
MSB
LSB
RESTORE BUFFER INDEX
PROBABLE NEXT BUFFER TO USE
EXIT
5 CARDS DUETED
ENTRY
INHIBIT. IISED BY
~lASCON.
MMEXEC
MMEXEC
MHEXEC
MMEXEC
MMEXEC
MMfXEC
MMfXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
14MEXEC
MMEXEC
MMEXEC
NMEXEC
MMEXEC
f1MEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
f1MEXEC
MMEXEC
MMEXEC
SWITCH BUFFER SlJBIWlJTINE
INDEX IN Q
INDEX IN 0
ACCOUT FOR SINGEl OR DOUBLE BUFFER
ENTRY
0
BUMP 1
1
A
MASK FOR MAX 0,1
MSKBNM
DUPLICATE
Q
UPDATE CURRENT
BUFNlJM
RETURN
(SWITCII)
0
0
0
OClJPNT.O
MASSEC.I
NOTHIS
BUFNIIM
0
(FINDIT)
SWITCII
ALLCIIK
LOOPI
-0
EXlFND
PAGE
MAY NOT BE OPLVL
GET OCCUPANTS MASSEC
DIFFERENCE WITH CURRENT DRIVER
NO MATCII
RETURN CAllfR
ALl IIAVE BEEN CIIUK
ONE MORE
NO FINO IN BUFFERS, NOT IN CORE
MMEXEC
MMEXEC
MMEXEC
MMEXEC
~'MEXEC
LEVL IT NUM 0
ENTRY
126
127
1213
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
147
}It 8
149
150
151
152
153
154
155
156
157
158
160
Hil
162
163
164
~lMEXEC
HiS
MMEXEC
MMEXEC
MMEXEC
MMEXEC
f1t-1E XEC
MMEXEC
MNEXEC
MMEXEC
'·It-1EXEC
166
167
168
169
170
171
MMEXEC
MMEXEC
172
173
174
175
] 76
177
~tEXEC
179
Mr~EXEC
CORRECT PRIORITY LEVEL IF NECESSARY
5
CLASS - VER 3.0
1700 ASSEMBLY OF MMEXEC
5
)0
15
20
1'5
30
35
40
POOF9
POntiA
PflOf'R
POOtiC
POflf'()
POOt't
pnOfiF
ro070
0500
[OFF
COEF
09F7
0101
()PF9
04PO
1cn
POP71
POO72
P0073
Pon74
POO75
POO76
PP077
POO78
P0079
POO7B
P007C
room
P007E
P007F
POOf10
Poorl
POnf12
POOP3
POOP4
POOPS
POflPfl
P(l(l87
P(lOPP
POOP9
P(lOPA
POOf1C
POOPO
Pfl08E
OAOO
1802
OAOI
0176
0822
CAlC
60FF
DA18
1800
0822
CA16
flOFF
OAOO
6A15
MI0
541J5
OBO(l
C109
B037
F]09
El05
OFA6
OA1()
0832
5400
54F4
lIN
LOQL(lAINA
SAl
RAO*
LEVLRT EIN
JMP*
FF94
7FFF X
~2F8
7FFF X
ROCMP [NA
JMP*
RICMP ENA
SQM
TRA
LDA*
STARAO*
JMP
BAOXFR TRA
LDA*
STAEtJA
STA*
STA*
RTJNOP
LDAEOR5TALDQQlS
EtJA
AAQ
RTJ+
RTJAOC
Anc
*
*
..
*
45
P008F
]824
0
I
PRILVL
-OPLVL
LEVLRT
lEVLIT
08/21/80 00.20.45.
PDT ADDRESS
CURRENT SYSTEM LEVEL
SAME PRIORITY
NOT SAME, GO TO SCHED CALL
0
(LEVL IT)
RETURN
0
RICMPt1
1
RADXFR
Q
BUFPDT,Q
I
BFSTAT,Q
IN
Q
BUFPDT,Q
I
0
OCUPNT,Q
BfSTAT,Q
(AFNR)
0
EST An , I
ONEB IT +15
ESTAT!, I
ELlI, I
COMPLETION FOR
6
ERCOOE
Q
LOG
(AMONI)
$52FOtOPLVL
ALTOEV
0
COMPLETION FOR 1
Q MINUS FOR I/O ERROR
NO ERROR
RESTORE PDT ADDRESS
]N AN INACTIVE STATE
FAILED TRANSFER
RESTORE POT ADDRESS
MAKE UNOCCUPIED
FINO NEXT REQUEST, SET UP PDT
SET ERROR BIT
LOGICAL UNIT
ERROR CODE
TOTAL CODE IN Q FOR ALTOEV
GO LOG ERROR
SCHEDULE
AT'CURRENT LEVEL
ALTERNATE DEVICE HANDLER
CONTINUE AS IF EXIT FROM DRIVER
FIND ANY WAITING DRIVERS
*
*
WORKING AREA
*
55
n
6
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
100
181
182
183
184
185
186
187
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
NMEXEC
MMEXEC
MMEXEC
189
190
191
M~'EXEC
r~MEXEC
JMP* MASEXT
50
PAGE
MMEXEC
MMEXEC
MMEXEC
HHEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
HMEXEC
MMEXEC
]92
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
20R
209
210
211
212
213
214
215
216
HMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
218
219
220
221
222
MMEXEC
MMEXEC
MMEXEC
224
225
226
PO(1QO
POOg]
0(l00
0000
BFSlAT NliM 0
NIIM 0
BUFFER STATUS- 0 = INACTIVE
1 = COMING OR ACTIVE
MMEXEC
MMEXEC
220
PflOQ7
Pon93
OOOP
0000
BIIFPOl A()C 0,0
POT FOR RESPECTIVE BUFFER
MMEXEC
231
OCIIPf'JT HIS
MM AnDRESS OF DRIVER IN BUFFER
MMEXEC
233
POOO4
0(l0?
OCIJP~IT(7)
(-)
229
0
n
"--/
-~
(/
:J
~-
CLASS - VER 3.0
1700 ASSEMBLY OF MMEXEC
10
1!l
lin
1'5
30
235
MMF.XfC
237
BUFFER ADDRESSES,
SEE -SIGN-
MMEXEC
MMEXEC
239
240
NXTQUE NUM 0
NXTXCT NUM 0
NEXT QUE SLOT
NEXT TO EXECUTE
MMEXEC
t1MEXEC
242
243
nono
NXTBUF NUM 0
NEXT BUFFER TO USE, 0-1
MMEXEC
245
0000
onnA
INCRHT ADC
MMEXEC
247
START OF DRIVER
MMEXEC
249
PDT ADORESSES OF WAITING DRIVERS
MMEXEC
251
MM ADDRESS OF POT IN OUE
MMEXEC
r111EXEC
253
254
MMEXEC
MMEXEC
MMEXEC
MMEX[C
256
257
258
259
MMEXEC
MMEXEC
MMEXEC
MNEXEC
MMEXEC
MHEXEC
MMEXEC
Mr1EXEC
MMEXEC
261
262
263
0000
BUFNUM NUM 0
pnO~7
0000
FFFE
SIGN
P0098
P0099
POO9/\
7FFF X
7FFF X
BUF/\DR ADC BUFF
ADC BUFFE
POO9R
P(lO~C
noon
0000
POO~l[l
pno9E
Pon~F
roOM
PlltiA1
00~9
nooo
ono~
QlIE
POOAA
(I00~
OllEMM RZS OUEMM(A)
*
~n
S~
BZS
QlJ[(~)
BUFFER BEING PHOCESSED,
* LENGTH + BUFAOR
=
INCREMENT TO PROPER READ CALL
4nFF
POOB3
5AR4
*
*
*
*
*
MASEXT
POOB4
POOB5
POORtl
PonR7
lA05
54F4
PonR9
pnORA
POORR
POORC
roorm
POORF
POOBF
pror.n
rone}
PonC2
POOC3
ponC4
POOC!i
P(lOc'6
POOCA
00B3 P
57F~
0089 P
14EA
40FF
!lflQF
01114
COFF
I -- CONTAINS POT ADDRESS
RTJ*
EQU
lIMP*
RTJA[lC
AOC
SJ\MLV? STORTJ*
SOP
LOIISTA*
JMPNOF I~IO MC
OKIN LDA*
STQ*
]4[A
00(10
(IICF
4lmR
0105
09FE
SAl
INA
ST/\*
Mcn
0102
)POO
E400
DRIVERS EXIT HERE WHEN THEY HAVE SERVICED
ALL REQUESTS ON ,ALL LOGICAL UNITS THEY CONTROL
.JMP-
6~0?
S/\l
FF49
7FFF X
0-1
START OF DRIVER
*
RELEASE BUFFER OF POT IN --Q--, USED BY AOEV
*
*
SAVE Q FOR RELEASE
RElBYQ STQ- I
POOR~
45
0,REA02-REAOI
BUFSTR AOC BUFF,*-*
X
35
4n
NUM 0,-1
ponA?
POOR2
PAGE
Mr1EXEC
P(1096
5
08/21/80 ()O.20.46.
OKIN2 dMP
AtOONE LOQt
CORR~CT PRIORITY LEVEL
LEVLIT
M/\S300(MASEXT)
SAME LEVEL
SAMLV2
MONI CAll
($F4)
$52FO .. OPLVL SCIlEOtlLE AT PROPER LEVEl
SAMLV2
CALL DISPATCIIER
($1:1\)
PDT TO I
I
FINO BtlFFER CONTAINING DRIVER
FINDIT
OK I,.,
I
SAVE PDT FOR DEBUG
NOFIND
(ADJSP)
LAST PDT OF DRIVER RELEASING WilEN NOT IN
*-*
RfSTAT,O
NXTBlIF
AUlOUE
DECREMENT REQUEST
-1
BFST J\ T. 0
NO NEW WAITING
ALOONE
['0101T
GET NO. LOGICJ\l UNITS
LOGI/\
~'MEXEC
MMEXEC
MMEXEC
M~IEXEC
MHEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEX[C
MMEXEC
MMEXEC
MMEXEC
~IMEXEC
MMEXEC
~lME.XEC
MMEXE.C
MMEXEC
264
265
266
267
268
269
270
271
272
273
274
275
276
277
21H
279
280
281
2B2
283
284
285
2Hfi
2B7
CLASS - VER 3.0
1700 ASSEMBLY OF MMEXEC
5
to
1.!l
20
ponCA
poncc
POPCf'
ponCE
poneF
ponoo
Pllflf'l
POnD?
pon03
POOOIl
4800
£EFe
C20E
B]OE
0]0]
JAIA
C?OO
RIOO
0]0]
HH4
POOO!'
pon06
PIIOO7
POOOA
POO09
ronDA
POODB
rOODC
ponoo
05(10
C205
POOPE
PO OED
POOEI
PonE3
PonE4
PonEfl
PonE7
COOO
6201
COOO
6202
COOO
6203
(l lin 0
E800
OOFE
0141
]800
E8AE
CA03
0115
E8M
5POO
PonF~
35
40
4!l
ponEA
PonEll
ponEe
POIlEIl
pOoH
POOEF
POOFO
POOFI
POOF3
POOF4
POOF!l
POOF6
PflOF7
POOFR
POOF<~
~o
POOFA
POOFR
0l0f)
OODE P
0000 P
0155 P
0lA9 P
FF41l
FHO
481\9
14EA
fiOFF
OAOO
('AI\A
582F
6M2
ER9B
IflOO
FF29
ALOGIA EOII Al.OGIA(*-I}
LOOP2 STO TEMP
lDO* (ALOGIA).O
lOA- MASSEC.O
EOR- MASSEC. I
SAl TAGnnO
JMP* NOSMIE
TAGOnO lOA- MASLGN.O
EOR- MASLGN.I
SAl TAGnnl
JMP* NOSAME
TAGOn] EOU TACOOl(*)
lIN 0
LOA- EUI.O
SAl NOASGN
LDA- 8.0
SAM NOASGN
STQ- I
LDQ* NXTBUF
RAO* BFSTAT.Q
JMP* OKIN2
*
NOASGN EQU NOASGN(*)
LOA =XMASDRV
STA- I.Q
LOA =XMASCON
STA- 2,Q
LOA =XMASERR
STA- 3.0
EIN 0
NOSAME LOO TEMP
INQ -1
SOl DOf'IRES
JMP* LOOP?
DONRES LOO* NX1XCT
LOA* QUE,Q
SAN ONEWAT
LOQ* BIIFNlIM
RTJ SWITCH
STQ* tJXTBUF
JMP- (AOISP)
OtJEWAT STA- I
ENA 0
STA* QUE,O
RIJ* Bur1PQ
STA* NXTXCT
LDO* BUFNLJM
JMP GOTt
*
*
*
5!l
ponFn
PonFE
()
OOD5 P
C20f1
0134
4OFF
E8Cl
OAB3
l8E8
25
30
00C9 P
FHB
EACIE
CAI\3
ADDRESS OF l.OGIA
GET PDT ADI1RESS
GET SECTOR
DIFFERENCE OF ONE EXITI~G
SKIP IF MATCH
JUMP I F NO MATCH
CHECK LENGTHS SAME TOO
THIS DEVICE DOES NOT MATCH RELEASING
SKIP IF UNIT NOT ACTIVE
GET REQUEST STATUS TillS PDT
SKIP IF OPERATION IN PROGRESS
SAVE NEW PDT ADDRESS
RESTORE INDEX
BUMP INTERNAL ACTIVE STATUS
JUST REACTIVATED. GO TO DRIVER
6 CARDS DElETED
SAME RESET ADDRESS
--- INITIATOR
--- CONTINUATOR
--- DIAGNOSTIC TIME OUT
DECREMENT COUNTER
ALL SEARCHED
MORE TO SEARCH
INDEX OF NEXT TO EXECUTE
NONE OUED. EXIT
CLEAR OUEUE· SLOT
UPDATE
GET BUFFER NUMBER
QUE IT ROUTltJE
OUEIT Lno* NXTXCT
100P3 LIlA* OIlF,£}
08/21/80 00.20.46.
GET INITIAL INDEX
()
PAGE
MMEXEC
MMEXEC
MMEXEC
8
2el8
2119
290
291
MMEXEC
292
123*4885 MMEXECl32 3
123*48R5 MMEXEC132 4
123*4885 MMEXEC132 5
MMfXEC
294
MMEXEC
295
MMEXEC
296
MMfXEC
297
MMEXEC
298
MMEXEC
299
~'MEXEC
MMEXEC
300
MMfXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEX[C
MHEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMFXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
r1MEXEC
Mt·1EXEC
MMEXEC
MNEXEC
t1MEXEC
MMEXEC
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
MMEXEC
MMEXEC
MMEXEC
335
336
337
M~1EXEC
339
340
MMEXfC
('
\,-)
0
0
]7~~
5
]0
]!l
pnOFF
PO]OO
POJOl
POW?
POI03
POlO4
POI05
POI06
POI07
POlO8
POI09
POIC'A
POIOB
POlOC
POWO
POHlE
SAN OCCPJ()
UJA- I
STA*
lOASTA*
. RTJ*
STQ*
JMPOCCPID lDA*
EORSAN
JMPBMPQIJE RTJ*
EOR*
SAZ
JMP*
6AA6
5~?3
4895
14EA
CAM
BIOE
0111
14F.A
5fHC
BA8F
OlDl
I~EF
*
20
?S
30
35
POJOF
PC'lJO
POI] ]
P01J2
PO}]3
PO]14
PO]}S
POl16
POI17
POllA
P0119
POllA
POlle
P~110
EOFF
S4F4
!l?02
0}]4 P
]4EA
40FF
CARB
EOFF
0101
WF6
IROO
4OFF
lRDF
FEE4
40
POllE
4!l
P~]lF
r0121
PO]22
rOl?4
POl?5
50
55
PO) '17
POII'll
POJ?9
P(1l2A
rOll'B
PO]2C
0500
CAon
"ROS
EAnO
0400
]400
0000
O~14
OClO]
ArlOS
0~?2
lCFA
FF7F
FF6E
OOC'O
(1126 P
QUE ,Q
MASSEC, I
QUEMM,Q
BUMPQ
NXTQUE
(ADISP)
QUEMM,Q
MASSEC,I
BMPQtJE
(ADISP)
BUMPQ
NXTXCT
NOQlJE
lOOP3
PAGE
EXIT
DIFFERENCE OF MM ADDRESSES
NOT SAME, BUT
THIS DRIVER ALREADY QUED, EXIT
TEST All SLOTS CHECKED
ALL CHECKED
NOOUF.
lOORTJNUM
AOC
JMP-
PASS PDT ADDRESS
SCHEDULE lEVEL 2 WAIT
lEVEL 2 WAITING FOR QUE SLOT
SCRCHQ STO- I
lOQ* NXTQlIE .
lDA* QUE,Q
RESTORE POT
lDQ- I
OPEN BACK
SAZ BACKUP
RESCHEDULE
JMP* DOWNlK
QUEUE OPEN, GO QUE THIS DRIVER
BACKUP JMP MASURV
PDT TO I
STQ- I
GO QUE IT
JMP* QUEIT
*
START UP DRIVER
*
Q = PDT ADDR.
*
A = ADORESS OF DRIVER
*
*
STRTlJP lIN 0
GET STARTING ADDRESS
lOA BlJFSTR,Q
STA* GOArlR
lOQ BlJFPOT,Q
GET POT
fIN 0
JMP+ 0
GOAOR EQlI GOAOR{*-I)
BlIMPO NUM 0
TRO A
BUf1P INOEX
If'JA 1
ANO- lPr1SK+2
TRA 0
JMP* (BtJrWQ)
9
MMEXEC
MMEXEC
MMEXEC
f1MEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
f1MEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
341
342
343
344
345
346
347
348
349
350
35]
352
353
354
355
356
357
35A
359
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
36}
362.
363
3M
365
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXF.C
MMEXEC
MMEXEC
Mr1EXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
306
387
388
3R9
390
391
392
393
~1H[XEC
SHOlllO wAn IN SCHEDULE STACK
I
(AMONI)
$5202
SCRCffQ
(AOISP)
OA/21/flO 00.20.46.
UNOCCUPIED QUE SLOT, AND NU PREVIOUS ENTRY
PUT THIS ONE IN IT
SAVE MASS MEMORY ADDRESS
*
*
OOW~lK
E~B5
'---~J
CLASS - VfR 3.0
ASSEMBLY OF MMEXEC
C'l17
COFF
6AAO
C1(lE
()
M~lEXEC
~IMEXEC
MMF.XEC
MMEXEC
MMEXfC
NMEXEC
MMEXEC
CLASS - VER 3.0
1700 ASSFMBLY OF MMEXEC
*
*
5
}O
I!'
70
25
30
3!'
*
*
RmlTINE TO CHECK LENGTH OF ALL DRIVERS
USING BUFF
POl20
P012E
pnJ30
PO:J37
PCl133
PCl]34
P0136
P0137
pnl39
ooon
CRon
pn]3A
nIl'll
SQl
P013B
pn13C
P0130
PO] 3E
pn13F
PCll4Cl
pnl41
P0142
POl43
POl44
P0146
pnl47
POl49
POl4A
P014B
pn14D
P014F
PCl]5n
PO]!']
P01!'3
PO] !'4
MOO
9100
ADOSUBSAM
LOA*
SQZ
SlJBADDJMP*
ENA
EOR
TRA
LOA
SAZ
JMP*
STA
STA
LOASTA*
U1Q
JMP*
NIIM
~llon
Q]O[l
0122
1PClO
RIOO
EAon
9lllB
FHA
FFf'7
FF4f'
FF59
CIIECKL NUM
LOA
SIIB
SUIlSAP
JMP
WILFIT ADOLOO
SUB*
LABELl
n135
CAIll
0141
9200
810D
1AOE
OA01
B8nn
0822
CAon
n101
tRB2
6AnO
61\On
ClOD
(lA04
EROn
lcn9
nnno
LABEL2
NOTNUF
FF5n
FF47
FF47
FF43
FF43
LABEl3
GnTNIIF
~'lISEn
08/21/BO 00.20.46.
0
nUFADR+l
BUFAl1R
MASLr.N,I
WILFIT BAOXFR+1
MASLGN, I
BUFPOT,Q
t-JUSEO
LABELl
MASLGN.Q
MASLGN,I
NOTNUF
NUSED
LABEL2
MASLGN,Q'
MASLGN, I
GOTNUF
1
BUFNUM
Q
BFSTAT,Q
LABEL3
QUEIT
OClIPNT,Q
BlIFP[lT,Q
MASLGN,I
f-IIISEO
BUFNUM
(CHECKL)
0
SUBROUTI NE ENTRY
ENO AnDRESS
= TOTAL AVAIL
MUlliS LENGTH TIllS DRIVER
WILL FIT SOME TIME
REPORT ERROR AS MM FAIL
TOTAL AVAILABLE
POT ADDRESS OF CURRENT OCCUPANT
MINUS WORDS IN USE
NOT ASSIGNED TO A DRIVER
PLUS WORDS USED BY OCCUPANT
MINUS WORDS FOR NEW DRIVER
TOTAL USED
BUFFER f-IOT USED
MINUS CURRENT LENGTH
PLUS NEW LENGTH
NEW NUSED
NEW DRIVER BIGGER THAN OLD, OVERLAP
TEST OTHER DRIVER
GET ACTIVE STATUS
INACTIVE
ACTIVE, NEW ONE NO FIT NOW
FITS, WILL OVERLAY OTHER PARTIALLY
NEW DRIVER LENGH! TOTAL USED
RESTORE ORIGIt-JAL INDEX
RETURN
NUMBER OF WOIWS IN liSE
PAGE
10
MMEXEC
MMEXEC
MMEXEC
MMEXEC
395
396
397
398
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
r1MEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
'MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
40n
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
43n
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
MMEXEC
432
433
434
435
436
437
438
439
MMEXEC
MMEXEC
MMEXEC
f1MEXEC
MMEXEC
MMEXEC
MMEXEC
441
442
443
444
445
446
447
~IMEXEC
449
401·
402
4n3
404
405
406
407
408
409
40
*
*
*
*
*
45
*
50
5!l
*
*
pnl!l5
P0156
pn:t57
pn158
P015/\
pn15B
POlSC
05no
40FF
4~3]
58nO
0500
FFOO
TltIS MUST BE CONSIDERED
lIN
0
I
LASTPT
FINDIT
0
SQM NOTINC
JMP* OKINl
nl71
18lF
1\
GIIOST INTERRUPT SITUATION
OR THE INTERRUPT RESPONSE IS USING
ADDRESS OlliEn TUAN THE ACTIVE ONE
MASCON lIN
STQSTQ*
RTJ
*
()
TUIS ROUTINE RESPONOS TO INTERRUPTS
FOR DRIVERS WHICH ARE NOT CIIRRENTL Y IN -CORE
1\
PDT
I IN FOR FINOIT
PDT TO I
OII\G SAVE
DETERMINE IF DRIVER IN CORE
lIN AGAIN, FIN[JIT DOES EIN
IN, BUT PDT MUST BE OlliER THAN INT RESPONSE
NOT IN CORE
n
/
C)
0
("\
0
. \...J'
CLASS - VER 3.0
1700 /\SSEMRLY OF MMEXEC
5
10
15
20
1'5
30
PO]5P
POI5E
POJ5F
PO] flO
POl61
P(l162
POlfi3
POI ()4
POlfi5
POlfi6
POj67
POlfiA
POlfi9
POIM
POlfiB
PO]fiC
POlflO
POlfiE
POlflF
POl70
P0171
P(lI72
PO] ]?
P0174
POl75
P(l17f1
POI77
POI7f>.
POl7Q
POl7A
01100
EI07
COlO
OtlB2
FO?E
0201
01300
fl07
OA02
0301
OJ5D P
NOTJNC EOU NOTINC(*)
EIN 0
LDQ- EWES,I
LDA- $ID
LAO Q
AOO- $2E
INP 1
NOP 0
LDO- EWES "I
ENA 2
OUT 1
NOP 0
RAO* INTCNT
LDA- EREOST, I
ARS 4
AND- LPMSK+fi
INA - Tl8335
SAN NOIFOO
STA- SECNUM,I
ENQ SHCTF
AOO- EWES ,I
OllT 1
NOP
LDQ- FnDPTH, I
STO- I
STA- SECNUM,I
ENQ SELCTF
AOO- EWES,I
OUT 1
NOP
NOTFDD JMP- (ADISP)
HI3
OKINI
onoo
DAIF
ClOR
OF44
1\009
09813
O])C
(i133
OC06
FI07
030]
(lBOO
E1tJ~
40FF
fi]33
(leoti
FJ07
0301
0000
J4EA
OR/21/1l0 00.20.46.
PAGE
11
f·1MEXfC
MMfXF.C
45J
452
M~1EXf:C
453
GET EOII I P CODE
MMEXEC
454
MMEXEC.
455
MASK CONVERTER $F100
ADO $800
MMEXEC
456
MMEXEC
457
NMA AND TERMINATE IF BUFFERED
MNEXEC
458
MMEXf:.C
459
GET EQUIP COllE
MMEXEC
460
Mf.1EXEC
461
ACK I NTERRlJPT
MMEXEC
462
463
MMEXEC
BUMP COUNT
C/IECK TYPE CODE FOR FOO DEVICE
MMEXEC
464
465
MMEXEC
MMEXEC
466
MMEXEC
467
SKIP IF NOT FOD
MMEXEC
468
INO ICATE WORD-ADOR. BUFFER NOT Goon 132*5305 MMEXEC132 6
SELECT UNIT AND EOP AND CLEAR INTERRUPT
MMEXF.C
469
MMEXEC
470
ADD EQUIPMENT COOE FOR UNIT 0
MMEXEC
471
MMEXEC
472
MMEXEC
473
REPEAl FOR OTHER UNIT IF IT EXIST
MMEXEC
474
INOICATE WORD-AODR. BUFFER NOT GOOD 132*5305 MMEXEC132 7
r1MEXEC
475
MMEXEC
476
HMEXEC
477
MMEXEC
478
MMEXEC
479
3!'
40
POl7B
POI 70
POIlE
P017F
POISl
POlf12
POl~3
45
P0184
POW5
CAOO
0111
HmE
fAOO
C202
6804
EOFF
0400
1400
FFll
0000
01A6 P
POl~7
POl~R
0000
0000
LOA
SAN
JMP*
LOO
LDASTA*
LDQ[IN
BFSTAT.Q
1
NOT INC
BUFP()T,Q
2,0
ADOCON
I
0
J~1P+ 0
ADDCON EQIl AOOCON(*-l)
INTCNT NUM 0
LASTPT NUM 0
H~1EXEC
I S ACTIVE
A GHOST TREAT AS NUT IN CORE
USE PDT ADDRESS LAST USEQ
liEl CONIJNUATOH
RESTORE PDT
JMP TO CURRENTLY DEFINEO CONTINUATOR
COUNTER OF GI
l.AST PIlT AOORESS OF GI
MMEXlC
MMEXEC
MMEXEC
MMEXEC
MMEXf:.C
MMEXEC
MMEXEC
MMEXEC
MMEXEC
Mr1EXEC
MMEXEC
481
4B2
483
4H4
485
4U6
487
488
489
490
491
492
!i0
55
POJpo
PO]P/\
pnlPO
POlRC
4PO~
E?OS
OFM
nRO()
*
THIS ROllTJNE RESPONDS TO A OIAGNOSTJC TIMEOUT
*
OF A DRIVER WIIICU IS NOT RESIOENT IN THE BUFFER
*
*
MASERR STO* LASTER
LOO- ELU,I)
ERROR COOE OF 0
OLS fi.
RAO* ERReNT
MMEXEC
f1MEXEC
t411EXEC
Mr1EXEC
MMEXEC
4q4
4q5
49fi
497
499
N~1EXEC
SOO
MMEXEC
MMEXEC
502
~)UI
1700 ASSEMRLY OF MMEXEC
POlgl1
POIRF
5
P0191
P0192
P01~3
5400
]400
0000
onoo
008B X
OOAE X
CLASS - VER 3.0
RTJ+
JMP+
LASTER NliM
ERRCNT NlIM
END
lOG
ALTlIEV·
0
0
fifi743B STORAGE USED
fi400 ASSEMALY
08/21/80
GO LOG ERROR
POT ADDRESS OF LAST TIMEOUT
. COUNT OF TIMEOUT ERRORS
511 STATEMENTS
3.220 SECONDS
()
\
/
00.20.47.
PAGE
MMEXEC
MMEXEC
MMEXEC
MMEX[C
MMEXEC
12
503
504
505
506
507
112 SYMBOLS
368 REFERENCES
o
0
0
('!
\.. /
CLASS - VER 3.0
1700 ~SSfMRLY or MMEXEC
COMPLETE REFERE~CE MAP.
AnnCON
A[lISP
OJlln
OOEA
AFNR
ALPONE
ALlCIiK
I\LOG1A
ALTnEV
At10NI
BACKUP
BADXFR
BFSTAT
00135
00C8
OOfifi
00C9
0190
00F4
0111'1
007B
0090
BMPOIIE
BIIFAOR
BUFF
BUFFf
BIIFNUM
BlIFPDT
010B
0099
001'10
0091'1
0096
0092
BUFSTR
BIIMPO
CHECn
[lOf'JR[S
OOWNLK
[lI1VLVL
GOTNIIF
GOTOIT
GOll
I
001'10
01?7
0I2[)
OOED
01 In
on18
n005
OOHl
DOOR
0192
0009
0007
0011'1
OOfiO
nOl/8
005A
0126
(l} 50
0011
0026
OOFF
IN
If'JCRMT
INTCNT
LABELl
LABEL2
LI\BEL3
LI\STER
IASlPT
LEVI. IT
LFVLRT
LOr.
LOG11\
LOOP1
LrOP?
OOOF
OOQE
0187
013C
0141
OJ4B
(lJ 91
O]flA
OOfift
on()F
OJ8E
OrCg
005[l
OnCA
ELl!
[PCOOE
ERFOST
ERRCNT
ESTAT]
EWES
EXIT
EXTFf'JO
FOOpn!
FJNnIT
WArlR
ABSOLUTE
ABSOLUTE
*EXTERNAL*
JlBSOLllTE
*EXTERNAL*
*EXTERNAL*
ABSOl.UTE
ABSOLUTE
ABSOLUTE
ABSOI.UTE
ABSOlllTE
ABSOLUTE
-SYSTEM-
*EXTERNAl.*
*EXTERt'IIL -Ie
11/47
2/34
4/27
2/33
7/54
5/51
7/60
2/54
2/36
9/34
6116
4/15
4/18
9/13
4/47
2/56
2/56
4/29
4/20
4/40
4/4R
8/47
4/36
8/35
f:l/24
4/23
3/05
3/1fl
3/(\7
11/59
3/08
3/0fl
4/16
5/47
3/17
4/12
9/46
10/25
4/19
4/31
4/04
4/11
4/19
4/18
4/49
11/16
10/17
10/22
10/30
1]/56
10/53
4/05
6/07
2/55
2/54
5/44
8/04
OR/2l/flO 00.20.47.
PAGE
l1/Mi 0
0
Q
0
X
Q
X
X
L
0
0
0
0
0
lo
0
l
l
X
X
L
L
5/,??
7/50
fl/?Jl
7/57
5/53
R/05
6/40
4/24
9/36
6/22
4/30
4/33
9/15
7/09
7/09
7/10
5/36
6/18
6/23
7/20
9/0R
10/08
8/37
9/35
4/25
6/33
6/35
11/17
12/0fl
fl/30
11/06
4/27
R/ 1J 3
9/10
~114
11/34
9/27
7/59 L
L
L
L
L
L
l
l
l
12/04
4/57
5/10
6/38
9/24
10/13
4/38
6/20
6/27
6/53 L
7/52
7/56
8/22
10/29
11/37
8/49
10/27
10/36
9/04
9/23
9/30
9/33
9/37
10/52
11/28
11/43
10/09
7/20
10/10
5/47
6/56 L
9/47
9/45
9/15
10/37
7/04 L
10/15
10/33
8/40
11/40
9/51 L
9/5fl
L
R/16
1]/57
6/3?
11/12
11/24
11/31
5/49
7/46
10/54
4/36 l
5/19
6/04
6/19
8/50
6/24
7/31
7/45
7/48
8/20
8/44
6/08
fi/IO
7/3fl
L
l
5/54
11/27
5/41
9/50
10/35
7/58
4/34
4/21
4/39
4/45
6/21
7/17
11/47
10/19
] 0/24
10/32
12/05
11/4A
5/59
fi/Oq
(,/37
7/59
5/57
ft/3fi
l
Q
l
L
L
L
L
L
L
L
L
L
l1/fiO
13
CLASS - VER 3.0
17PO ASSEMBLY OF HMEXEC
REFERENCE MAP.
08/21/80 00.20.47.
PI\GE
14
CO~PLETE
LOOP3
Lpr~SK
MASCON
HASORV
MASERR
MJ\SEXT
HASLC,f-I
MJ\SSEC
MAS300
HMI
MH?
f-IOASr.N
onOE
00B3
0044
004E
00n3
OOOE
t-J(lFINfl
flflRF
f-IOOllE
010F
tJ(lSI\~E
nnE~
NOTFrl[l
NOHIIS
NOlIN
n17A
001'3
0(11B
0]50
0143
(1154
0090
on9B
009C
0041
00413
0107
0094
OOCO
0178
00C6
0023
00F5
0008
nOEF
0(lA2
O(lF[l
OnAA"
nOJC
0046
OnR?
0071
0073
(l(l07
00B9
0114
0033
0006
0097
0042
nn4C
OIlE
004F
0053
00]4
MSKR~'H
~'OTI~IC
NOTNIIF
f-IIISEO
NXTBIIF
NXTr}Uf
f-IXTXCT
Nl
N2
OCCPJO
OCUPNT
OKIN
OKI Nl
OKJN2
ONEllIT
oNn/J\T
OPLVL
PRILVL
OIlE
QIIEJT
OllfMM
RfAnl
REAfl2
RHIWO
ROCIIIP
RJCIW
SAMLVI
SJlMLV7
SCRCIIO
SECNlJM
SHelF
SIGN
STAIn
STAn2
STRTIIP
SWICIlM
SWITCH
TAG V
n
'\
;'
OOFE
0003
0155
0000
0189
00133
0000
ABSOLUTE
ABSOLUTE
J\BSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
J\BSOLUTE
ABSOLIITE
ABSOLUTE
8/59
2/31
2/44
2/43
2/45
2/43
L
Q
E
E
E
E
3/09 Q
4/43
3/10 Q
2/47 E
4/55
5/18 L
3/19 Q
8/17
7/49
9/17
8/09
11/21
5/46
4/14
10/56
10/20
10/16
4128
7/12 l
7/13 L
4/53
5/15 L
8/60
4/42
7/47
10/57
7/58 L
2/32 Q
8/39
3/18 Q
2/35 Q
7/23 B
4/35
7/25 B
4/56
5/10 l
2/48 E
4/59
5/17
4/06
7/4(l
9/26
3/70 Q
3/21 Q
4/46
4/50
5/16 L
4/?6
5/09
4/32
4/17
9/18
3/19
8/28
4/04
8/30
6/46
8/10
8/11
4/41
7/39
5/08
.
l
~/23
11/19
9/36
7/39
10/18
10/19
8/06
10/23
10/24
8/07
10/34
8/21
8/42
9/06
9/12
Q
l
5/34
8/19
7/51 L
8/13
11/34
5/5n
4/28
11/04
10/26
10/21
5/21
9/09
8/37
5/05
9/54
10/51 l
8/26
11/56 L
7/38 l
10/11
10/14
5/45
8/75 0
l
L
~/33
L
L
L
0
L
11/39
10/35
7/15 l
9/31
8/48
10/38 L
7/53
8/58
9/16
5/44
6/26
6/59 B
4/58
5/11
6/06
6/39
8/46
8/59
10/31
9/05
9/32
5/37
5/50
8/41
L
9/11 L
4/54
7/52 L
11/37 L
8/23
10/32
6/31
8/44 L
4/08
6/05
~/38
8/5~
9/07
4/57
7/17
7/31
6/13
6/14
4/09
7/43
9/30
11/22
11/23
7/06
L
9/38
L
7/17
7/42
9/11
L
L
6/15 L
4/11 L
7/45 L
L
11/29
11/30
L
5/06 L
9/44 L
5/19 L
5/20
4/21 L
5/31 L
C)
0
o
o
~,_/J
17PO ASSEMBLY OF MMEXEC
COMPLETE REFERENCE MAP.
TAr-oon
TAr-nO)
TEMP
P(lll]
0(lll5
Tl~335
0044
WILF JT
(l13~
rn37
CLASS - VER 3.0
~/(l~
BIl2
ARSOLlITf
4/44
3/72 Q
10/12
8/ln L
~Il" Q
4/f.? Q
ll/?O
]0/14 L
8/(l4
8/33
08/21/80 00.20.47.
PAGE
15
(-;
o
o
o
AnORESS
lENGTH
nooo
on53
08/21/80 00.20.47.
CLASS - VER 3.D
17nr ASSEMBLY OF TRVEC
STORAGE ALLnCATION.
BINARY CONTROL CARDS.
NAM
END
on53
TRVEC
DECK-IO MI4 MSOS 5.0
-- OOOE
LOAfH N -lOCF -lPTRS -MIHUF -NSTACK -PARBV4 -PRORn -RECOV -RElSIA -SCHERR -SPASW --
SUMMARY
ENTRY POINT NAMES AND ADDRESSES.
AUTFA
AtJTFB
AlITFC)
BATClU
COMPV4
EIWMSG
FILEI
FJLE2
FILE3
FILE4
INPTV4
------------
EXTERNAL SYMBOLS.
PROTEC
DOll
0012
nnlo
OOOll
on44
00n2
nn17
nnlA
no] 9
onlA
On(lF
IUP
JBCFGZ -JBCNCL -JBCNFG -JBPROE.-JKJN -JDBIN£) -JPnETN -. JPRETl -JPSWT -LIBEl --
002fi
0020
0036
nD01
OOIF
Dn09
(1038
n037
n016
Dn05
001 E
OOIB
ODIC
D003
Dn05
0008
0015
0(106
n007
nn3F
n(l13
SWTCH
TRANV
TRNVEC
TRVEC
lINP 10
IINPIOF
UtJPT 1M
VINPV4
-- ~Oll)
-- no 00
-- 0004
-- 0000
-- OOOA
-- OOOC
-- oonB
-- D014
PAGE
CLASS - VER 3.0
J7n(l ASSEMBLY OF TRVEC
*
*
5
*
(In(l(l P
(loon p
In
nnoc
onn8
n044
onOF
on3F
0009
00n5
0000
nOOA
OOOE
0013
00n5
0017
0018
on19
001A
0006
001B
OO]C
15
20
25
3(l
nnw
onlE
(l(l(ln
0014
oorn
n015
non3
00]6
:1~
4(l
onn1
nnn4
onn7
on02
nnlO
0011
0012
001F
0026
45
50
55
0005
0089
0002
0023
PO(lOO
POOO}
POPnt'
r(l(1n3
()
1BFF
ooon
nnon
£1000
P
p
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
P
*
08/21/80 00.20.48.
NAM TRVEC
DECK-IO ~14 MSOS 5.0
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION, LA JOLLA, CALIFORNIA
COPYRIGHT CO~TROL DATA CORPORATION 1976
SUMMARY-116 TRVEC132
TRVEC
TRVEC
TRVEC
t1NPJOF
PARBV4
COMPV4
INPTV4
SCHERR
JOBINO
NSTACK
TRANV
UNPIO
IUP
SPAS'"'
LIBEl
FIU1
FIL£2
FILE3,FILE4
ENT
ENT
RECOV
Lnf:F,LPTRS
ENT
ENT
ENT
ENT
ENT
ENT
UIT
SUTCH
LOAOIN
UNPTIM
VINPV4
BATCLU
PRORET
MIfHJF
JPSWT
tJBPROE
TRNVEC
RElSIA
ERRMSG
AlITF9
AlITFA
AUTFB
ENT
ENT
ENT
ENT
ENT
ENT
ENT
ENT
JKIN
ENT
ENT JBCFGZ
EXT PRUHC
EOII NSTACK(5)
EOU AREQXT($09)
EQll LPMSK($2)
EOll ONEB IT ($23)
TRA~V
fIlllM $}BFF
,JRPRO[ NIIM $0
ERRNSG t/IIM n
MIBlIF NII~' 0
SCHEDULER ERROR ENTRY
BATCH CONTROL STATEMENT LU
RETURN LOC TO JPLOAD FOR PROTEC
\
)
5
lRVEC
rRVEC
TRVEC
l/{VEC
**MSOS 4.0 TRVEC
TRVEC
TRVEC
TRVEC
rRVEC
TRVEC
TRVEC
TRVEC
TRVEC
THVEC
TRVEC
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
TRVEC
lRVEC
27
28
TRVEC
lRVEC
TRVEC
TRVEC
TRVEC132
TRVEC
THVEC
TRVEC
TRVEC
IHVEC
THVEC
TRVEC
TRVEC
THVEC
lHVEC
TRVEC
lRVEC
TRVEC
lRVEC
THVEC
TRVEC
TRVEC
29
30
31
32
2
33
34
35
36
37
38
39
40
**MSOS 4.0
1]6*4366
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
LOC. IN JOBENT TO PROCESS JOB PROC. MODULES
ABS. AODR. OF ERRM IN JOBENT
ADDRESS OF MIINP BUFFER IN JORENT
(\
3
4
7
8
9
JOB ABORT flAG
MAX NO. OF STACKED REQUESTS
2
TRVEC
TRVEC
THVEC
TRANSFER VECTOR
HIT TRVEC
EOII TRVEC{*)
ENT
ENT
ENT
ENT
[NT
ENT
ENT
ENT
ENT
ENT
ENT
ENT
ENT
ENT
ENT
PAGE
TRVEC
TRVEC
TRVEC
TRVEC
41
42
43
44
45
46
47
48
49
51
52
53
54
0
C)
0
CLASS - VER 3.0
17nn ASSEMBLY OF TRVfC
5
Ponn4
pnnn!)
poonfi
pnnD7
PonnR
I!'
7n
2!'
3D
35
40
PODD9
pnnOA
0000
onon
pnnOB
pnnoe
ponoo
pnnnE
ponPF
prnw
POOll
POO]7
pnn13
rnn]4
PODl5
P(lOlfi
0000
nnoo
nDnn
lPF9
nDDO
O('l('lD
nODn
ooon
onDn
(In(l(l
oono
(l(lOD
P00l7
PDOlS
p(ln19
PDnlA
pnOIB
pnOlC
PODID
onoo
0000
0000
ODno
DOOO
£10£10
0000
pn(llE
O(lon
pon]r
onOD
61
62
*********************************************************************** TRVEC
64
JKIN
*
*
'ln
NUM
NUM
NUM
NlIM
NUM
NtlM
NlIM
tJlIM
NlIH
NUM
NIIM
NIJM
NIIM
NlJM
NIIM
NUM
NIJM
(lllfi
o()n!i
$)fW~
0
0
0
0
0
0
$0
$0
NIIM
$DDOO
NliM
*
C~]f)
0
0
$0000
$0000
$0000
$0000
$0000
$(1000
$0000
*
POMD
rOn?1
p(ln27
TRVEC
TRVEC
TRVEC
TRVEC
TRVEC
TRVEC
TRVEC
TRVEC
TRVEC132
TRVEC
lRVEC
TRVEC
TRVEC
TRVEC
TRVEC
INPUT ASSIGNED BY *V
**MSOS 4.0 TRVEC
lRVEC
LOC. IN JOBPRO TO RETURN TO FROM PROT5
TEMP LOC. FOR MIINP BlIFFER ADDR. OR AN INDEX TRVEC
lRVEC
TO THE TRANTA TABLE IN JOBPRO OR A NEG.
VALUE SET BY JOBENT OR JBKILL
lRVEC
TRVEC
LOCATION OF JOBENT FILE
LOCATION OF JOBPRO FILE
lRVEC
TRVEC
LOC. Of THIRD FILE
LOCo OF FOURTH FILE
lRVEC
TRVEC
LOC. OF F IN PROTECT PROCESSOR
LOC. OF PTRS IN PROTECT PROC.
TRVEC
TRVEC
SWITCH TO LOCK-DIn JOBPROCESSOR
WHILE lIBEDll OR THE RECOVERY
lRVEC
THVEC
PROGRAM IS IN OPERATION.
PROTECT PROCESSOR FLAG TO LET
TRVEC
TRVEC
LOADER READ AND WRITE ON MASS
TRVEC
STDRAGE.
HIT
ENT
JBCNCL LOA*
SAN
INQ
SET IF UNPROTECTED I/O IS GOING ON. ODES
NOT ALLOW JOB TO BE KILLED UNTIL ALL OF THE
UNPROTECTED I/O REQUESTS ARE COMPLETED.
AS EACII REQUEST TERMINATES HIE COUNT IN UNPIO
IS DECREMENTED
~UMBER OF UNPROTECTED TIMER REQ. WAIT
FlAF FOR BUFFERING I/O REQUESTS
BATCH CONTROL STATEMENT LUt*BATCH.LU 116*4366
INPUT UNIT POINTER
BOSS INPlIT DEVICE-SET BY SPACE
STO INPUT AT AUTOLOAD. SET BY RESTART
STO PUNCH AT AUTOLOAD. SET BY RESTART
S10 LIST AT AUTOLOAD. SET BY RESTART
0
NlIM
NUM
NUM
NLJM
NlIM
NlIM
NlJM
*
(102D P
0(l3£' P
ABS. AOOR. OF TRANTA RUFFER IN JOBENT
ABS. ADOR. IN JOBENT THAT SCHEDULES LIBEDT.
LOC IN JOBENT TO·SCHED. RECOVR
LOC IN JOBENT TO RELEASE SPECIFIED FILE
PARAMETER BUFFER IN JOBENT FOR FILES
$D
$0000
$7FFF
0
0
NUM 0
NUM $0
*
~~
3
ANY ENTRIES,TO TRVEC MUST BE MADE FOLLOWING THIS STATEMENT.
TRVEC
AS THE PRECEDING ENTRIES ARE PART OF A TABLE TRANSFER FROM JOBENT. TRVEC
JOBINO
UNPIO
*
*
*
*
tlNPTIM
tlNPIOF
BATCllJ
IlIP
If'lPTV4
AUTFQ
AlITFA
AUTFS
SPASW
VINPV4
PRORET
JPSWT
*
*
FILE1
FlLE2
FILE3
FILE4
LOCF
LPTRS
SWTC.,
*
*
LOADIN
*
*
4!i
PAGE
56
57
5H
59
***
***
10
98 /2i/BO 0(1. 2D. 11 B.
TRVEC
TRVEC
TRVEC
TRVEC
TRVEC
TRNVEC
LIBEl
RECOV.
RELSIA
PARBV4
nnnn
onno
7FFF
nnn(l
ODDO
0
66
67
68
69
70
71
72
73
3
74
75
76
77
70
79
80
HI
82
83
84
85
86
87
88
09
90
91
92
93
94
95
96
TRVEC
TRVEC
TRVEC
TRVEC
TRVEC
lRVEC
TRV[C
99
IOD
101
102
103
104
THVEC
TRVEC
THVEC
TRVEC
**MSOS 4.0 TRVEC
107
lOB
109
11D
0
THIS CORE RESIDENT PROGRAM IS ENTEREO
TO CAt/CEL JDB PROCESSING. IT SCIIEOULES
THE MM RES WENT JOK ILL MODULE TIIEN SETS
TilE JBCNFG NOT ZERO WIHCH TEUS HIE PROTECT
PROCESSOR TO QUIT 1I0NORItJG REQUESTS FROM
UNPROTECTED CORE.
J£lCNCl
JBCNFG
J£lCtJFG
JKO
5
55
JOB CA~'CEl. FLAG
IF JIIKILL liAS BEEN SCI/EnULED. DONI REDO
98
106
CLASS - VER 3.0
1700 ASSEMBLY OF TRVEC
5
10
PPM3
pno2"
pn025
POMfl
ronn
pnll2fl
pn079
pnn?A
pnn7R
POMe
15
pn071'
pno7E
pno7F
pnn30
25
30
n
lRn~
nnoo
CflFE
OllC
Ef'I'A
C7nc
nJO~
£lRF9
npo?
CRFO
oro7
£llOA
POO3?
pon33
pnll34
Pon35
Pon3fi
tirn3
54F4
5702
(l000
14EA
nooo
POD37
P0038
Pon39
POO3A
P003B
P(103C
PO()30
POO3E
0000
0000
0500
lCFC
54F4
2402
7FFF X
14EA
P(lP31
?n
0153
nCFA
0038 P
0037 P
SQN JK
ENQ -5
Jt1P* JK 1
JBCFGZ Anc 0
LOA* JBCFGZ
JK
SAf.I JBEXIT
JKO
U1Q* TRNVEC
LDA- 12,0
SAZ JBEXIT
RAO* .JBCFGZ
SET 0
LDA* JKIN
JKl
RAO* ,JBCNFG
SAZ JKNIN
STA* JBJK
RTJ- ($F4)
NUM $5202
NIJM
0
JBJK
JBEXIT,JMP- ($EA)
JBCNFG AOC 0
ENT JPRETN ,JPRETl
JPRETl AOC
JPRETN 0
lIN
JMP*
JKNIN RTJNUM
AOC
JMP-
0
0
0
(JPRETl)
PFII)
2402
PROTEC
($£A)
08/21/HO 00.20.1\8.
THE REQUEST TO CANCEL WAS FROM
T5- OON"T ABORT JOB
JOB ABORT FLAG
IF A JOB IS ABORTING, DONT REDO
IF NO JOB IN PROGRESS, DONT ABORT
SFT JOB ABORT FLAG
SET JOB CANCEL FLAG NON ZERO
SCHEOULE MM PROG AT LVL
TWO
EXIT TO OISP
JOB CANCEL FLAG
PAGE
TRVEC
*"MSOS 4.0 lRVEC
TRVEC
lRVEC
TRVEC
TRVEC
TRVEC
lRVEC
TRVEC
TRVEC
TRVEC
TRVEC
TRVEC
**MSOS 4.0 TRVEC
lRVEC
TRVEC
**MSOS 4.0 TRVEC
1RVf.:.C
TRVEC
4
III
112
113
114
115
Ilfi
117
IIR
119
120
121
122
123
124
125
126
127
128
129
Tf~VEC
130
mVEC
131
TRV[C
SET UP BY T7 AND JPLOAO
TRVEC
JPRETN MUST BE IN PRESET TABLE FOR PROTECT
PROCESSOR TO PASS THIS ON TO LOADER REQUESTOR TRVEC
TRVEC
GO TO T7 OR JPLOAO
TRVEC
TRVEC
TRVEC
**MSOS 4.0 TRVEC
132
133
134
135
136
137
138
139
()
()
0
0
J7nn ASSEMRLY OF TRVEC
!i
10
P003F
P0040
P0041
P0042
pn043
C4FF
AOll
B032
64FF
14B9
P0044
P0045
P004ll
P0047
pn04P
P0049
pn041\
POOtlB
pnot'lC
PO(lIlD
P004E
P004F
POO!iO
P0051
P005?
onoo
0500
0132
01115
IPflP
0173
0"52
OR34
JPfl5
OB5?
15
20
2!i
30
3!i
P0053
OP~4
0121
0[1011
0400
lCFl
CLASS - VEn 3.0
OH/71/AO -00.20.4".
************************************************************************
*
SCHEDULER ERROR RETURN TO USER
*
*
************************************************************************
SCHERR lOA- (I)
**HSOS 4.0
SET 0
NEGATIVE
**MSOS 4.0
AND- LPMSK+I5
EOR- ONEBlh15
ON RETURN
**MSOS 4.0
ot1StlS 'l.0
TO IJSr:i~
STA- (I)
JMP- (1\f{[OXT)
**MSOS 4.0
************************************************************************
ADDRESS COMPATE ROUTINE
*
*
DIFFERENCE RETURNED IN 1\
A.GT.Q
*
A EQUAL 0
A.EQ.Q
*
A SET TO FFFF
A.lT.O
*
*
COMPV4 NOP 0
lIN 0
SAM AUPPER
A IN IJPPEIl BI\NK
BOTH IN LOWER BANK
SQP BTHSI\M
A HI LOWER Q IN UPPER
JMP* OBlr,R
BOTH IN UPPER BI\NK
AUPPER SOM BTHSAM
A IN UPPER o IN LOWER
TCO 0
GET DIFFERENCE IN A
AI\O A
JMP* AB Ir.R
(lTlISAM TCO 0
SUBTRACT 0 FROM A
AAO A
SAP ABIGR
Q IS BIGGER
ORIGR SET A
ABIGR EIN 0
JMP* (COMPV4)
************************************************************************
END
61017B STORAGE USED
6400 ASSEMOL Y
175 STATEMENTS
1.093 SECONDS
55 SYMBOLS
123 REFERENCES
PAGE
IHVEC
TRVEC
If{VEC
mVEC
lRVEC
lRVEC
TRVEC
TRVEC
mvu:
TRVEC
TRVEC
lRVEC
TRVtC
TRVEC
TRVEC
TRVEC
TRVEC
mVEC
TRVEC
THVEC
TRVEC
TRVEC
TRVEC
TllVEC
TRVEC
TRVEC
TRVEC
TRVEC
If{VEC
TRVEC
TRVEC
TRV[C
lRVEC
TRVEC
5
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
CLASS - VER 3.0
1700 ASSEMBLY OF TRVEC
cnMPLETE REFERENCE MAP.
ABIGR
AREQXT
AIIPPER
AUTFA
AUTFB
AUTF9
BATClll
BTHSAM
COMPV4
ERRMSG
FILEl
FILE2
FILE3
FILE4
J
INPTV4
WP
JBCFGZ
JBCtJCL
JRCNFG
JBEXIT
JBJK
JBPRDE
JK
JKIN
JKNIN
JKO
JKl
JORINO
JPRETN
JPRETl
JPSWT
LIBET
LOAOIN
lOCF
LPMSK
LPTRS
MlRtlF
f'lSTI\CK
nf'JE13JT
PJ\lHlV4
PRORET
PRon:e
OBIGR
HECOV
RELSIA
SCHERR
SPASW
SHTOl
TRAtJV
TR~IVEC
TRV[C
tJNPJO
UNPIOF
UNPTIM
VINPV4
n
DD51
00B9
n049
nD11
n012
nolO
0000
(l040
0044
DD02
0017
ABSOLUTE
onl~
Ofll~
OOlA
nnFF
nDnF
O(lOE
DD2t;
O£120
D036
on35
OD34
0001
D027
DOIF
n03B
OD28
002E
DD09
D038
n037
n016
Oflfl5
001E
nn1A
DD02
onlC
0003
OO(lS
Ofl23
-SYSTEM-
ABSOLUTE
flBSnLtlTE
ABSOLUTE
O£1£1~
OO)ft
O£131'l
005n
Ofl06
0(l(l7
003F
0013
noll'
onoo
0004
noon
OOOA
Done
onOB
0014
*EXTEr!NAl*
5/29
2/52
5/23
2/46
2/47
2/45
2/37
5/24
2/16
'1/44
2/26
'1/27
2/28
2/28
Q
E
E
E
E
E
E
E
E
E
E
5/12
~/(l9
2/17
2/23
2/49
3/55
3/56
4/D8
4/17
2/41
3/6n
2/48
4/16
3/58
4/05
2/19
4/23
4/23
2/4D
2/25
2/34
2/3]
2/53
2/3)
'1/39
2/20
2/54
2/lft
5/32
5/13
5/26
3/26
3/27
3/25
3/22
5/26
5/21
2/58
3/34
3/35
3/36
3/37
E
E
E
E
E
E
E
E
E
E
E
E
E
E
Q
E
E
E
0
E
2/3~ E
2/50 X
5/25
lI/30 E
2/43 E
2/18 E
2/24 E
2/33 E
2/21 E
2/42 E
2/10 E
2/22 E
2/14 E
2/35 E
'1/36 E
3/24
3/23
4/06
3/57
3/57
4/11
4/2D
2/57
4/D7
3/47
4/29
4/D8
4/14
3/14
4/26
4/?5
3/31
3/04
3/43
3/38
5/10
3/3q
2/ft9
2/51
5/11
3/07
3/3n
4/31
5/33
3/05
3/06
5/09
3/28
3/40
2/56
2/60
2/11
08/21/80 00.20.48.
PAGE
6
5/34 l
L
L
L
L
L
L
L
L
L
L
l
L
l
L
L
L
L
L
L
l
l
L
l
L
l
l
l
L
l
5/3D L
5/3S
4/D7
4/12
4/15
4/21 l
4/22 L
4/14
4/28
L
l
0
L
l
l
L
L
L
l
l
L
L
Q
4/09
3/15 l
3/21 L
3/20 L
3/29 L
n
()
o
o
CLASS - VER 3.0
]700 ASSEMRLY OF JOBENT
STORAGE ALLOCATION.
AOORESS
LENr.TH
noon
(l1l2
0~/21/RO
00.20.49.
BINARY CO·rIlTROL CAROS.
NAM
ENO
0112
~LOCKS
TYPE
JOBENT
FILL
DRV
PROGRAM*
LOCAL
LOCAL
SUMMARY
nECK-ID M64 MSOS 5.0
JOBENT
ADDRESS
LENGTH
0000
001A
002C
0112
0012
0001
ENTRY POINT NAMES AND ADDRESSES.
JBENT -- 0000
JBPRO -- 00A7
MIPBllF -- 0008
EXTERNAL SYMBOLS.
AFILV4
BATCLU
FILEt
FILE2
INPTV4
IUP
JBCNFG
JCRDV4
JKIN
JLGOV4
JOBItJO
JOBPRO
JPCHGE
JPFL V4
JPLOAD
JPSTV4
JPSWT
JPT13
UBEDT
MIB
NAMEV4
NUMLU
RCOVER
RESTOR
SHTCH
TRANV
TI]
T3
T5
T7
PAGE
CLASS - VER 3.0
17PO ASSEMBLY OF JOBENT
5
*
*
*
OECI<-IO M64 MSOS 5.0
NAM JOBENT
MASS STORAGE"OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION. LA JOLLA, CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
*
PROGRAM BASE- MSOS 3.0 JOBENT
*
JOB PROCESSOR CONTROL MODULE
08/21/80 00.20.50.
PAGE
SUMMARY-116 JOBENl132
JOSENT
JOBENl
JOSENT
2
1
3
4
5
**MSOS 4.0 JOBENT
7
JOBENT
10
JOBENT
12
,JOBENI
JOSENT
JOBENT
14
15
16
JOBENT
,1013 EN T
JOBENT
JOBENT
JOBENT
JOSENl
JOSENT
JUBENT
JOBENT
JOSENT
JOBENT
JOSENT
JOUENT
JOBENT
JOBENT132
JOBENT132
JOSE NT
JOBENT
JOBENT
JOI3ENT
JOSENT
JOSENT
JOBENT
18
19
20
21
22
23
24
25
26
27
28
?9
30
31
2
3
32
33
34
35
36
37
30
10
*****************************************************
]S
ENT JRENT
ENT JBPRO
ENT MIPBUF
0000 P
00A7 P
ooop P
20
EXT
EXT
EXT
EXT
EXT
EXT
EXT
2S
*
*
30
35
40
T3
T5
T7
TIl
EOU DISP($EA)
EOU ZERO($?2)
EOU AMONI(~F4),AOISP($EA)
OoEA
45
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT*
EXT*
EXT*
EXT*
FILEl,FILE?
JOB CANCEL FLAG
JBCNFG
MIB
JOBINO
SWTCU
LI BEIH ,RCOVER
TEMP. LOC. FOR MIINP BUFFER AOR. OR
JPSWT
AN INDEX TO THE TRANTA TABLE OR
A NEG. VALUE SET BY JOSENT OR JSKILl
JOSPRO.JPLOAD.JPCHGE,JPTI3
**MSOS 4.0
JLGOV4,JCRDV4,JPFLV4,NAMEV4
**MSOS 4.0
JPSTV4,AFILV4
**MSOS 4.0
IUP
**MSOS 4.0
INPTV4
116*4366
(TRVEC)
BATCLU
116*4366
NUMLU
RESTOR
TRANV
JKIN
pon
OOF4
00[1\
0046
OOClA
50
EOll
EOII
EOU
EOU
00]]
nON
55
r---)
\
,
pnnnn
CPFf
JBENT
****
****
****
****
NIl~'
TEN($46)
HOOFFPA)
H7FFF $11)
L(36)
$COFE
INPUT BUFFER Lf.NGTlI
ENTRY POINT
NOTICE - THE INSTRUCTION LOA*
*-1 CAN NOT BE ASSEMBLED
BECAUSE IT REFEHENCES A LOC.
OUTS WE HIE PIWGRAH
(-j
40
JOSENT
JOSENT
41
1]6*4366 JOSENT132 4
116*4366
116*4366
**MSUS 4.0
**MSOS 4.0
JOBENT132 5
JOSENT132 6
42
JUBENT
43
JOSENT
JOBENT
JOSENT
,!OHENT
JOBlNl
JOBENT
45
46
47
48
49
0
n
n
"'-/
CLASS - VER 3.0
]700 ASSEMBLY OF JOBfNT
5
10
ponOI
rOOM
6C7~
ron[l3
Ponfl4
Pflnfl5
POflOfi
POOO7
4P71l
20
75
3n
35
OC08
CA34
~833
6600
011 FE
0141
18F9
EOE9
E209
C865
A011
BOl1
0111
]8]9
CC5F
0977
H~14
00]2
0012
oon]
P(lOlA
POO2C
40
45
50
53
54
55
56
57
*********************************************************************** JOBENT
59
P0020
P002E
P002F
1'0030
P0031
P0032
P0033
P(l034
P0035
1'0036
P0037
P003R
P-B4A
6207
CC47
0978
0~47
P003A
620B
CC43
0979
8844
6203
CC3F
097A
P,041
1)205
rOfl3B
OAOO
STO*
JMP*
ALF
ALF
ALF
SAVRIJF
BtlFFI
1.JP
1.
1..
STORE LOCATION OF JOBENT FILE
STORE FWA OF JOBENT IN ENTRY POINT TABLE
SAVE MIINP BtlFFER ADDRESS
AFTER TUE INITIAL PASS THROUGH JOBENT nils AREA WII.L BE
OVERLAID BY TilE MI PBUF BUFFER.
BUFFl ENO LENGTH
LOOP LOA* ENTTBL,O
AOO* ENTTBL
STA TRANV.O
INQ -1
SQl OUT
JMP* LOOP
LOQ- $E9
OUT
LOQ- 9.0
LOA* Jill
AND- UlFFF
EOR- H7FFF
SAN 1
JMP* BUFF2+2
LOA* (FI)
INA JBI-JRENT .
JMP* BtlFF2
JOBENT
JOBENT
LOAD Q WI HI TilE LENGTH OF ENTRY POINT TABLE
PICK UP RELATIVE ENTRY POINT ADDRESS
ADO FWA OF JOBENT
STORE IN TRVEC
61
62
**MSOS 4.0
JOUENT
JOBENT
JOBENT
JOBENT
JOBENl
JOBENT
JOBENT
JOBENT
JOHENT
JORENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
72
73
74
75
76
77
7B
79
80
**MSOS 4.0
EOU ENDB (* -BUFFl)
**MSOS 4.0
BZS FILl(l-ENDB)
WORD FOR DRIVERS ON SHORT READ
**MSOS 4.0
BZS DRV(t }
***********************************************************************
JOBENT
JOBENT
JOBENT
JOllENT
B2
83
04
85
JOBENT
87
JOBENT
JOBENT
JOOENT
JOBENT
JOBENT
,JUBENT
.JOBENT
JOUENT
JOBENT
JOBENT
JOBENT
JOBENT
**MSOS 4.0 JOBENT
JOBENT
89
90
91
92
93
94
95
96
97
98
99
100
*
P003~
~5
7FFF X
3
**MSOS 4.0 JOBENT
JOBENT
**MSOS 4.0 JOUfNT
**MSOS 4.0 JOBENT
**MSOS 4.0 JOBENT
*
*
POO08
POO09
pnOOA
POOOB
POOOD
POOOE
POOOF
POOlO
POOII
POO12
POO13
POO]4
POOlS
POfl]6.
POO17
POOl8
POO19
PAGE
50
51
ERRM
]5
OB/2l/80 00.20.50.
,JOBfNT
JOBENT
STA* (Fl )
STI\* ENTTBL
fi~3B
]804
4M;0
2020
2C20
0
AND LINK
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.0
4.0
4.0
4.0
4.0
4.0
TillS AREA WIll BE OVERLAID BY THE TRNTBL BUFFER.
BlIFF2 AOO*
STALOA*
INA
AOO*
STALDA*
INA
BPS
RI
A110*
LOAOEP STALOA*
INA
JFLG ADO*
STAftJA
*
*
ADOR OF EXTENDED CORE TABLE
AODR OF RCTV IN MONI
IF THERE IS NO
T7 MODULE OON"T TRY
JBl
LOADER REQUEST
7,0
(Fl )
JB2-JBENT
JB2
CORE REQUEST
11,0.
(Fl )
JB3-JBENT
JB3
STATUS REQUEST
3.Q
(Fl)
JB4-JBENT
JB4
EX IT REQUEST
5,0
0
THIS IS THE LAST LOCATION OF TRANTA **MSOS 4.0 JOBFNT
**MSOS
,JORENT
TABLE RUFFER •• NEXT 22 LOCATIONS
ARE 3 WORDS--JOB NAMr. 3 WOROS-- **MSOS 4.0 JUBENT
".0
64
65
66
67
68
69
70
71
101
102
104
Hl5
106
CLASS - VER 3.0
1700 ASSEMBLY OF JOBENT
*
5
10
15
P003C
l~OA
P0030
P003E
P003F
P0040
P0041
P0042
POOl\3
POO'14
POO'15
0000
00A7
0005
0008
00211
00C3
OOOF
00C2
0(l4?
*
JNAME JMP* BRL
20
75
POO/I"
POC1ll7
POOllA
PO(llI9
POOllA
POOllB
P0054
P0055
pn056
OAOI
60E4
pnn~7
C400
0400
6400
POO~IC
30
POO4P
P004E
POOtJF
POO~;O
35
6~f('I
flPEF
Ofl(l4
f'PFO
E82F
4C73
40FF
OC23
C6FF
flAB6
OOFE
0171
18FB
POOSI
Pom.2
POO~.3
45
50
P005D
POO5E
POfl5F
P006n
POOFI
POOfl?
(j
W41
POOM
PflOfl5
pnOfl6
POOfi7
POOfiA
C]O!'
n04
OFflP
OfJOO
0101
IMA
OPI4
(lnoo
PO(l69
rOOfiA
01Hi
Et03
P(l(l~~
5~
CIn3
OClOO
(l111
7FFF X
7FFF X
7FFF X
4
107
108
109
111
112
113
114
115
116
117
118
119
120
*********************************************************************** JOIJENT
124
CLEAR THESE THREE LOCATIONS IN WHAT **MSOS 4.0
STA* BPS
BE TUE TRNTBL BUFFER BEFORE SCHEDULING
STA* RI
JOB PRO
STA* LOA[lEP
**MSOS 4.0
STA* JFLG
**MSOS 4.0
SET FIRST WORD TO INDICATE NO
SET A
**MSOS 4.0
JOB NAME YET
STA* JNMIE
PICK UP MIINP BUFFER ADDRESS
LDO* :;AVBUF
SAVE INPUT BUFFER ADDRESS IN TRVEC 61*1295
STQ* (JBST)
SAVE BUFFER ADDRESS IN I REG.
STQ- I
**MSOS 4.0
ENO L-l
TRANSFER MIINP BUFFER TO BUFFER IN JOBENT
MVBUF LOA- (I) ,Q.
STORE IN MIPBUF LOCAL
STA* MI PIHIF,O
INQ -1
SQM 1
JNP* MVBUF
* LOAD AND GO SECTOR NUMBER
ENA 1
STA- $E4
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOI3ENT
JOI3ENT
JOBENT
JUBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JORENT
JOBENT
126
127
128
129
130
131
132
133
134
135
136
137
)38
139
140
141
142
143
JOSENT
JOBENT
JORENTl32
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JORENT132
JUBENT132
JOHENT132
JOBENT132
JOUENT132
JOBENT132
JOBENTl32
JOBENl132
145
146
7
8
9
10
ENTTBL NUM
ADC
A[lC
ADC
AOC
FILTAB ADC
ADC
A[lC
AOC
EQU
TABLE OF ENTRY POINTS TO JOBENT
FWA OF JOBENT
SCUEDULE J P MODULES (JBPTROE)
J03 J04 ERRORS (ERRMSG)
(MIBUF)
LOCAL INPUT BUFFER
TRANSFER TABLE ADURESS (TRNVEC)
SCUEDULE LI BEDT
SCUEDULE RCOVER (RECOV)
IN[lEX PASSED TO J.P. POUTINES
FILTAB-JBE~T FILE PARAMETER TABLE (PARBV4)
LENGlH(*-ENlTBl-I)
0
JBPRO-JBENT
ERRM-JBENT
MIPBUF-JBENT
TRNTBL-JBENT
LIB-JBENT
RECOVR-JBENT
SAVOI-JBENT
40
Pon!'9
PO(l5R
ACCOUNT NUMBER •• 16 WORDS PARAMETER**MSOS 4.0 JOBENT
**MSOS 4.0 JOBENT
BUFFER FOR FILES
**MSOS 4.0 JOBENT
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
4.0
4.0
4.0
4.0
4.0
4.0
4.0
4.0
BRL
fi~Ef}
oREO·
PAGE
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
**MSOS 4.0 JOBENT
**MSOS 4.0 JOBENl
*
OOOll
08/21/80 00.20.50.
LOA INPTV4
STA IUP
ABATCl STAt OATCLlI
*
lOA- 3,1
INA 0
SAN JOIW70
\JMP* JOB 130
JOB070 LOA- 5,1
l[lO- 4,1
LRS 8
INA 0
SAl JOB(lflO
JMP* JP05fR
JOB(lP(l TRQ A
INA 0
*
SAN JOBOll2
LDO- 3,1
**MSOS 4.0
**MSOS 4.0
SET BATCH CONTROL STATEMENT LU = SYS. 116*4366
116*4366
CONTROL LU
116*4366
116*4366
116*4366
SEf'JSE LlJ SPEC IF IEll
116*4366
GO PROCESS *BATCH
116*4366
116*4366
116*4366
116*4366
116*4366
SENSE 2 DIGITS OR LESS
116*4366
116*4366
(PREVIOUS SIGN EX1ENSION WILL RESULT 116*4366
116*4366
IN $FFFF
116*43fi6
SENSE 2 DIGITS
116*4366
RESET CONTROL INPUT DEVICE
!
\
\.
--)
121
11
12
13
14
15
16
17
18
19
20
21
22
23
(~
.~
0
(\
,-j
5
10
1~
20
pn(lflB
POO6C
PflO(\fl
P(lO(lF
POO7(l
PO(l7]
POOl?
P0073
POO74
P(1075
pn076
POO77
P007fl
P0079
P007A
P007B
P007C
POO7E
P007F
POOR 1
POOf'l2
25
30
35
Poor3
P0084
P0085
POOP6
POOP7
POOAe
POO8A
PflflAB
poorc
PflflPE
POOAF
POO90
POr9}
PO(192
50
55
30.00
X
X
X
X
X
LRS
ARS
EOR
JMP*
JOBOfl2 LRS
LDQlRS
JOBOM I~'Q
F1
3030
JSl
JR2
JB3
JR4
SAVBUF
JOB090
0100
7FFF X
JOSI00
JOBllO
CRl~
MOO
6ecn
0(15A X
lA12
POOCJfi
POO97
pn09~
O~44
POO99
P009B
P009C
POO911
POO9E
POO9F
P(10AO
POOA1
POOA2
PonA3
POOM
POOA!)
P()oAfi
POOA7
64()O
54F4
1901
FF63
4A50
3035
0000
E809
40FF
OC03
4fHE
PO(194
POO~!l
115
Bono
]P04
OF6fl
El03
Ofl;r
OP(l3
(l]47
] RIB
7FFF
7FFF
7FFF
7FFF
7FFF
0000
900(1
OCOO
3000
481F
2046
88lD
6fllC
09FO
0]21
lR09
9000
0125
!l4F4
()()OO
or07
0('1('10
1AFC
OO()?
oOOP
14EA
P()('I~3
110
OF6P
OF4~
C~OE
IPOI1
4AI0
*
JP05ER
PARMER
7FFF X
0
CLASS - VER 3.0
1700 ASSEMBLY OF JOBENT
B
R
=t"$3000
JOSOR4
08/21/80 00.20.50.
(ADJUST fOR 1 DIGITS)
~
3.1
R
-$2C
JOl3£l90
JP05ER
FILEl
T7
TIl
SENSE DELIMITER A COMMA
soz
JMP*
AOC
AllC
AI1C
ADC 13
AIlC T5
NUM 0
SUB =N$3030
ENQ 0
DVI =N$100
STQ* TEMPI
MlII- TEN
ADD* TEMPI
STA* TEMPI
INA -2
SENSE lU NOT=I(AllOVATOR)
SAP JOBIIO
JMP* JP05ER
SUB =XNUMLU
SENSE lU .GT. MAX.
SAP JP05ER
LOA* TEMPI
UPDATE CONTROL STATEMENT LU
STA+ IUP
SET BATCH CONTROL STATEMENT LU
STA* (ARATCl+l)
JMP* JOB130
ERROR STATEMENT AFTER HI
OUTPUT JP05 ERROR
RTJ- (AMONI)
NUM $onoo
ADC JOB1?5-PARMER
ADC O,$lflfC,2
AflC
JMPJOB125 CLR
STA+
RTJNUM
ADC
JP05 ALF
J rn5- PARMER
(ADI SP)
A
MIB
(AMONI)
$1901
(JBENT-*+l)
2.JP05
TEMPI NUM 0
JOB130 LOQ* SAVl3l1F
STQ- I
ENQ 3
SJSPRO 51Q* SAVQ1
LnA* JBPAnR
JMP* JIWROO
JRPRO STO* SAVQl
*
CLEAR MIS TO ALLOW MI
RELEASE JOBENT
PAGE
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
]16*4366
116*4366
116*4366
116*4366
116*4366
116*4366
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOSENT132
JOBENT132
JOSENT132
JOHENT132
JOSENT132
JOHENT132
JOHENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENl132
JOBENT132
JOBENT132
JOBENT132
JUBENT132
JOBENl132
JOBENT132
J(ijJENTI32
JOSENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENT132
JOBENTl32
1]6*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
116*4366
JOBENT132
JOBENT132
JOBENT132
JOBENT132
,JOBENTl32
J(mENTI32
JOHENT132
JUBEN1132
116*4366
116*4366
116*4366
**MSOS 4.0
JOBENT132
JOBENT132
JOBENT132
JOBENT
,)OBENT
**MSOS 4.0 JOBENT
SCHEDULE JOB PRO
t10BENT
,HmENT
SAVE INDEX TO PROPER ROUTINE WI1ItIN THE
,)OGENT
SCI/EnlllEn MOOllLE OR AN EXECIITlOtJ AOIlRESS
5
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
fJ4
65
66
67
68
69
70
71
147
148
149
150
151
152
CLASS - VEn 3.0
1700 ASSEMBLY OF JOBENT
POOMl
POPJ\9
082?
CA09
POOIIA
6806
pnn/ln
POOIIO
E815
POO/IE
P(1flJIF
POOfIO
POfl[l1
54F4
1?00
0000
14EA
15
PAGE
JOB[NT
~IOV[ INDEX FOR PROPER MODULE TO Q REG.
Q REG. O=JPT13, l=JOBPRO, 2=JPLOAD,
JOBENT
**MSOS 4.0 JOBENT
3=JPCHGE, 4=RESTOR, 5=JLGOV4
*
6=JCRDV4. 7=JBFLV4. 8=NAMEC4
*
**MSOS 4.0 JUBENT
**MSOS 4.0 JOBENT
9=JPSTV4. IO=AFILV4
*
JOPROO STA* SCIIAOR
JOBENT
RELEASE FILES TWO AND THREE
JOBENT
*
RELEASE SPECIFIED FILE
RTJ MRELF
JOBENT
LOQ* SAVQ1
INDEX TO LOC IN SCHEDULED MODULE TO BEGIN
JOBENT
EXECIITJON OR AN EXEClITlON ADDRESS.
JOBENT
*
JOBENT
SOlED RTJ- ($FII)
NlJM $1200
.IOOENT
JORENT
SCI/ADR A[lC 0
JOBENT
JMP- (DISP)
5 CARns DELETED
116*4366 JOBENT132
*
TRA Q
LDA* TnL,Q
5
In
08/21/80 00.20.51.
0054
~flO(l
(j
153
154
155
156
157
158
159
160
161
162
I/)3
164
165
166
72
20
25
30
POOfl2
Ponn3
POOB4
POOEl5
Pflon6
POOB7
POOBR
POOB9
ponBA
POOI3B
POOBC
FFFF
FFFF
FFFF
FFFF
FFFF
FFFF
FrrF
FFFF
FFFF
FFFF
FFFF
X
x
X
X
x
X
x
X
x
X
X
AOC
TilL
JBPADR ADC
AOC
ADC
ADC
ADC
ADC
AOC
ADC
ADC
ADC
POOPD
POOEE
POOBF
POO(:()
7FFF
7FFF
7FFF
7FFF
X
X
X
X
F2
SWT
,JB
JBST
Anc FILE?
ADC SWTCU
ADC JOBINO
AOC JPSWT
Pooei
poor?
0(100
uooo
SAVI
SAVOI
*
NIIM 0
NUM 0
35
(JPTl3)
(JOBPRO)
(JPLOAD~
(JPClfGE
(RESTOR)
(,JLGOV4)
**MSOS
*AMSOS
*AMSOS
**MSOS
**MSOS
**MSOS
(JCRDV4~
(JPFl VII
(NAMEV4)
(JPSTV4)
(AFILV4)
4.0
4.0
4.0
4.0
4.0
4.0
61*1295
JOBENT
JOBENT
JOOENl
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
JOBENT
IH2
103
184
185
JOBENT
JOBENT
JOBENT
JOBENT
187
188
189
190
175
176
177
178
179
IBO
18]
40
OOf'fl P
0020 P
45
!lfl
1 CARD OELETEO
EOII MIrOIlF(RIIFFl)
EQU TRN1BL(BUFF2)
JOBENT
JOBENT
116*4366 JOBENT132
JOBEN"'
JOBENT
192
193
73
195
196
A*****k**********************************************
JOBENT
198
* THIS ROUTINE RElEASES FILE3 (PROTEC) IF PRESENTlY
* IHCOHE, RELEASES FILE2 (JOB PROC. MODS.) AND SCIIEDULES
* lIBEOIT WITH HIE RETIlRN LOCATION STORED IN Q.
"OBENT
JORENT
JOBENT
200
201
202
*************************************************A***
JOBENT
204
JOBfNT
JOBENT
JOBENT
206
207
208
55
rooe3
P(10C4
porC5
/'"\
r..
)
5r.2E
fCln
rooo
LIB
OOCC
RTJ* REL
LOQ* (F 1)
AOQ =XLR2-JBfNT
RELEASE OUTSTANDING FILES
()
0
()
'"--,
0
0
CLASS - VER 3.0
1700 ASSEMBLY OF JOBENT
5
POClCl
PonCR
POOCQ
ponCA
RTJ- ($F4)
TWLVE NUM $1200 .
(lIBEDT)
AOC
JMP- (DISP)
54F4
17no
FFFF '1
14E/\
************************
10
]5
70
25
30
35
40
45
POOCB
POOCC
pooeo
POOCE
POODO
PODOl
POOO2
PDOO4
Pon05
POOD6
POOP7
pooon
POOO9
PClOOA
POClPB
POODC
ponon
POODE
DRl3
OAOI
60E4
0400
OADO
6CEC
6~00
OR02
4CEA
4CE8
CR07
0111
LB2
009A X
LB4
FF62
1PC9
OAOO
fiP03
OC06
wefi
SAVQ
(lOOO
RAO*
ENA
STARAO
HIA
STA*
STA
SET
STQ*
STQ*
LDA*
SAN
JMp.
ENA
STA*
H'Q
JMP*
NUM
SAVQ
1
$E4
MIB
0
(S~lT )
LOADEP
Q
(JBST)
(JB)
SAVQ
1
SJBPRO-1
0
SAVQ
6
SJBPRO
0(l/21/~0
00.20.51.
JOBHIT
JOB[NT
,JOB[NT
JOBENl
SCHOLE LIBElH
RETURN FROM LIBEDT
********************
POOOF
5f!J 2
EC95
**MSOS 4.0 JOBENT
JOnENT
JOBENT
RESET LOAD AND GO ON RETURN FROM LIBEDT
JOBENT
SET MIB FLAG TO LOCK OUT OHlER ENTR IES
JUBENT
JOBENT
CLEAR SWITCH FOR JP LOCK-OUT.
116*4366 JOBENT132
CLEAR LOADER IN CORE FLAG
JOBENT
**MSOS 4.0 JOBENT
**MSOS 4.0 JOBENT
RESET J.P. IN CORE FLAG
**MSOS 4.0 JOBENT
**MSOS 4.0 JOBENT
**MSOS 4.0 JOBENT
**MSOS 4.0 JOBENT
LIBEDT IS TERMINATING
**MSOS 4.0 JOBENT
ABNORMALLY
**MSOS 4.0 JOBENT
TELL JOBPRO TO
**MSOS 4.0 JOBENT
ABORT JOB
$0000
POOE1
PflOD
POOE4
POOES
POOE6
POOE7
FOOD 00E8
40EE
54F4
]200
FFFF X
]4EA
POOEO
POOE9
POOEA
POflEC
POOEE
pooro
0500
OAOO
6800
6800
6flOO
]ROO
PflflFl
POClF2
POOF3
POOF5
PflClFfl
POOF7
pnOFf<
O(lfln
0500
C400
(l](ll
14EA
REL
(Fl)
=XRC2-JBENT
$H
($F4)
$1200
(RCOVER)
([JISP)
RELEASE ANY UNUSED FILES
lIN
Et'A
STA
STA
STA
lJMP*
0
0
RI
BPS
LOAIlEP
LB4
RETURN FROM RECOVERY PROGRAM
AOC
liN
LOA
SAZ
JMPSTA*
STA
0
0
JRCtlFG
G01
(tEA)
(JB)
.JKIN
RECOVR RTJ*
lDQ*
ADQ
STQRTJNIJM
ADC
JMPRC2
FF49
FF46
FF46
JOBENT
THIS MUST REMAIN BEFORE TAG LB2
* THIS ROUTINE RELEASES FILE3 (PROTEC) IF PRESENTLY
* INCORE. RELEASES FILE2 (JOB PROC. MODS.) AND SCHEDULES RECOVERY
* WITH THE RETURN LOCATION STORED IN LOCATION $EE.
pnn[n
PAGE
SET RETURN IN $EE TO RC2
CLEAR RECOVERY SWITCH
BREAKPOINT SWITCH
LOAOER FLAG
7
209
210
211
212
215
217
2IB
219
220
221
222
74
224
225
226
227
228
229
230
231
232
233
JOBENT
235
JOBENT
JOBENT
JOllENT
237
23R
239
**MSOS 4.0 JOBENT
JOBENT
JOI3ENT
JOBENT
,JOBENT
JOBENT
JOllENT
JOBENl
**MSOS 4.0 JOBENT
JOBENT
116*4366 JUBENT132
116*4366 JOBENT132
116*4366 J013ENT132
**MSOS 4.0 JOBENT
241
242
243
244
245
246
247
240
250
251
75
76
77
255
~O
5~
REL
7HF X
6CC]
ti400
7FFF X
roOl
RELEASE FILE2. FILE3 ROUTINE IF HIEY"RE IN
IF CANCEL FLAG SET - GO AWAY ~ND LfT IT
TAKE OVER. I F NOT SEl. CONT I NilE ON
SET JOB PROCESSOR
~OT
ACTIVE
,JOIIENT
JOBENT
JOBENT
,JOBENT
JOOENT
JOI3ENT
JOBENT
257
258
259
2fiO
261
262
263
CLASS - VER 3.0
1700 ASSEMBLY OF JOBENT
POOFA
POOFS
5
10
l~
1'0
25
O~04
POOFD
PonFE
POOFF
PO]OO
PO]oI
PO]o?
POI03
PO]04
P0105
PO]flfl
POIfl7
6CC2
0400
0802
5802
1CFl
OBO(1
0143
OOFA
0141
OCOI
CER7
O)flO
fiRO!)
pn}(lp
OP44
poore
Pfl](1Q
PO]flll
PO]OS
P(1JOC
PO]fl[l
POJOE
PO]OF
P01l0
PO]ll
PO]]2
SET
STA*
EIN
SET
RTJ*
JMP*
MRELF NOP
SQZ
INQ
SQZ
ENQ
LOPER LDA*
SAZ
STA*
ClR
flE03
!)4F4
]POO
0(1(10
0142
OOFE
laF5
lCfF
corH
0000
SAVA
RELl
CK
A
(SWT)
0
Q
MRELF
(REL)
0
LOPER
-5
LOPER
1
(F2) ,Q
CK
RELl
A
(F?) ,Q
($F4)
$1800
0
CONT
STA*
RTJIIOC
ADC
SQZ
INQ -1
J,.,P* LOPER
JMP* (MRELF)
SET LIBEDT IN FLAG
RELEASE AREA 3
DON"T RELEASE 3 IF T13 OR JLGOV4
ARE BEING CALLED
PROTEC IS THERE
SET TO RELEASE FILE3 AND FILE2
IF ALREADY RELEASED - TO NEXT ONE
NOT RELEASED - RELEASE IT
ZERO flAG
RELEASE
ALL COMPLETED - LEAVE
NO - TRY AGAIN
PAGE
JOUENT
JOBENT
JOBENT
JOBfNT
JOUENT
JOUENT
JOBENT
JOUENT
,)(lBENT
JOBENT
JOBENT
lJOBENT
JORENT
JOBENT
JOI3EtH
JOBENT
JOBENT
JOBENT
JOUENT
JOBENT
JOBENT
JOBENT
JOBENT
JOOENT
JOBENT
NUM 0
END
64124B STORAGE USED
6400 ASSEMBL Y
()
08/21/80 00.20.51.
354 STATEMENTS
1.979 SECONDS
107 SYHOOLS
281 REFERENCES
B
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
2HO
?Hl
282
283
284
285
286
288
2B9
AnATCl
MHSP
AFILV4
AMO~II
RI\TClIJ
BPS
ORl
OliFF]
Oliff?
cr-
corn
OISP
nRV
ENPB
ENTTBL
ERRH
FIlEl
FILE2
FIll
FJLTAn
F1
F2
Gnl
HnOFF
117FFF
I
1~IPTV4
IIIP
JB
n(l5B
nnfA
nnBC
n(lF4
n(l5C
nn34
004fi
nnnr
nn?l)
nJOn
n110
onEA
nMe
nn12
on30
0005
on7fi
onoo
001A
nn42
0076
nOF7
nonA
on11
nnFF
on5fl
nnnn
nnBF
,mC~IFr.
nnF4
(lnnn
JBPJlOR
JOPRO
JBPfWn
,mST
Jill
JB2
JB3
,JB4
,}CROV4
JFLr.
JKIN
JLGnV4
JNAME
JnBINO
JOOPRO
JOBn7n
JOOORO
JOBOA2
nnR3
nnA7
JOBnf~4
Jorn no
Jnn) 10
.JOR] 25
JnRJln
AIlSOllJTE
AnSOlUTE
*EXTERNAl*
*EXTERNAl*
Dorm
JBff-'T
..J(1ROC1P
AIlSOLlITE
*EXTERNAL*
JII\SOllITE
*EXTERNAl*
ABSOLUTE
ABSOLUTE
-SYSTEH*EXTERNJlL*
*EXTERNAl*
*EXTERNAl*
nnco
no 77
nnw
on79
007A
nOB8
0039
onF9
OClB7
003C
OOEIF
onB3
n061
0067
on70
nn73
on7C
nnA7
nnPfl
nn9R
(l(lA]
4/43 l
2/47 0
2/32 X
2/1J7 0
2/35 X
3/49 l
4/05
3/07
3/3U
£1/15
Po/22
2/45 Q
3/37 B
3/35 Q
3/04
3/08 L
2/21 X
2/21 X •
3/36 B
4/13 l
2/60
*fXTERNAl*
*EXTERNAl*
*EXHRNAL*
*EXTERNAl *
*EXTERNAl*
5/33
5/43
6/33
5/3fi
08/?I/flO 00.20.51.
5/46
4/22
4/22
3/17
3/33
8/22
8/25
6/16
7/47
l.
6/45
6/46
7/06
7/42
3/19
4/08 L
4/17
4/16
3/31
3/44
3/48
3/52
5/13 l
6/36 l
8/14
8/18
7/56
2/50
2/51
4/30
'2/34
2/33
6/3fl
'2/22
2/17
'2/55
3/32
7/58 L
4/12
4/13
4/14
4/15
4/16
5/48
6/59
7/37
Q
Q
X
X
L
X
E
l
2/18
5/57
4/29
3/26
3/45
3/49
3/53
2/31
3/54
2/39
2/31
4/05
2/'24
2/30
4/47
4/53
4/58
5/06
5/11
5/28
5/27
5j3R
4/4P
l.
l
l
3/36
3/18
4/10
5/13
6/36
3/28
5/53
3/27
4/32
4/41
5/32
7/58
1J/42
7/'t0
7/r;,S
3/45
3/49
3/53
4/n9
4/10
4/11
6/24 l
E
X
l
X
X
l
X
X
l
PAGE
4/113
3/35
3/42 L
5/56
nnl\A
~~,
CLASS - VEn 3.0
]7nO ASSEMOlY OF JOBENT
C(lMPlETE REHRn'CE HAr.
•
f)
0
0
4/n9
6/0R
6/39
3/32
3/46
3/50
3/54
6/29
4/25
7/59
6/28
4/27
6/38
6/24
4/49
4/55
5/07
5/1n
5/19
5/5R l
L
l
7/19
3/42
5/15 l
5/16 L
5/17 l
I.
L
L
l
l
5/29 l
5/44 l
5/34
5/5'/ t
5/14 l
6/58
7/36
9
CU\SS - VER 3.0
1700 ASSEMRLY OF JORENT
COMPLfTE REFERE~CE MAP.
,JPCHGE
JPFLV4
JPLOAO
JPSTV4
JPSWT
JPTl3
JP05
,JP05ER
L
lS2
L04
I.ENGTH
LIB
LJOErlT
10ADEP
lOOP
LOPER
HIR
HrrBIIF
HRElF
MVRIIF
NJ\MEVt1
NIIMlU
OIlT
rARMER
RCOVER
Re2
RECOVR
REL
REll
RESTOR
RI
SAVA
SAVBlJF
SAVI
SAVQ
SAVQ1
SCHAOR
SCIlEO
S,lBPRO
SWT
SWTCU
TRL
TEMP]
TEN
TRM'V
TRtJTRL
TWLVE
Tl1
n
.T5
T7
ZERO
n
00115
nOB9
00134
OOBB
OOCO
00B2
OOQE
0090
0024
OOCC
OOCE
*EXTERNAL*
*EXTERNAL*
*EXTERNAL*
*EXTEIUJAL*
*EXTERNAL*
*fXTEHNAL*
OOO~
AOSOLlJTE
00C3
O(lCC}
ABSOLUTE
*EXTERNAL*
nO)f)
oonel
0]05
(loer
3/1~
0(l0~
oO~O
00~9
0010
0091
00E6
00E8
OOPF
*EXTERtJAI.*
*EXHRNAL*
*EXTERtJAL*
(lOFl
OlOC
00136
0035
0111
00713
00C1
oonE
00C2
OOBO
OOAE
001\4
OOBE
£lOBE
onB2
(lOAO
on46
nooe
nn2n
OOCft
007P.
0079
007A
0077
n022
X
X
X
X
X
X
Q
L·
*EXTERNAL*
*EXTERNAL*
ABSOLUTE
*EXTERtJAL*
*EXTERtJAL*
*EXHR~AL*
*EXTERNAL*
*EXTERNAL*
ABSOLUTE
2/23
2/19
6/10
4/32
2/31
2/3fi
3/22
5/37
2/26
7/37
4/14
6/57
8/16
2/37
3/50
8/27
3/06
6/42
7/11
4/15
6/00
6/13
5/55
6/37
2/25
6/04
5/22
X
L
L
7/05
4/24
3/23
8/12
X
E
5/L1~
L
X
X
L
X
X
L
L
10
.
L
5/28
4/31
5/30
7/17
7/4P.
5/36 L
L
Q
L
~/14
4/11
7/14
L1/33
~/07
~/09
4/36
6/31
5/29
3/24
5/38
7/41
7/44
7/35
7/35
8/21
6/27
4/23
PAGE
L
8/24
L
6/45 Q
8/25
L
5/42
L
L
7/53 L
8/08
L
7/46
4/28
5/10 L
5/52
7/21
5/55
6/15 L
7/25
5/58
7/29 L
6/11
6/43 L
7/23
7/16
fi/37
fi/23 L
7/27
8/04
~/24
5/'15
5/31
5/51 L
L
L
L
L
X
)(
5/23
3/?0
(,/46 Q
L
X
X
X
X
Q
5/15
5/10
5/17
5/14
2/49 Q
2/3P.
L1/12
7/04
2/43
2/40
2/41
'1/42
2/46
6/26
6/30
6/25
6/32
6/39
6/23
5/49
5/12
3/36
7/12
7/49
4/17
6/~7
~/In
*EXTfRf'JAL*
0](10
OORA
2/30
2/31
2/30
2/32
2/27
2/30
5/42
4/54
2/52
6/59
7/14
3/17
4/13
'l/?fi
3/51
00/21/80 00.20.51.
C)
o
C)
CLASS - VER 3.0
1700 ASSEMBLY OF JOBPRO
SlORAGE ALLOCATION.
AOlWESS
LENGTH
nooo
(l230
o
08/21/80 00.20.51.
BINARY CONTROL CARDS.
NAM
JOBPRO
DECK-IO M69 MSOS 5.0
SlIMMAR
EtJO
0730
BLOCKS
TYPE
JOB PRO
SMI
PROGRAM*
LOCAL
ADDRESS
LENGTH
0000
0163
0230
0024
ENTRY POINT NAMES AND ADDRESSES.
JOBTWO -- 000£1
J03T
-- on9F
RF3
-- 0006
RI
-- 00B7
EXTERtJAL SYMBOLS.
BATCLU
BATLST
ERRMSG
FIU2
FIU3
INPTV4
IUP
JBCFGZ
JBCNFG
JBPROE
JOBINO
JPSWT
LOGIA
MIB
MIBUF
NSTACK
ONE
RECOV
THREE
TRANV
TRNVEC
TWO
VINPV4
PAGE
CLASS - VfR 3.0
1700 ASSEMBLY OF JORPRO
*
*
*
5
OEl/21/00 00.20.55.
NAM JOBPRO
DECK-JO Mfi9 MSOS 5.0
MASS STORAGE OPERATING SYSTEM VERSION 5.0
SMALL SYSTEMS DIVISION, LA JOLLA, 'CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
SUMMARY-132 JOBPR0132
JOB PRO
JOB PRO
JOBPRO
*
JOR PROCESSOR SECONDARY CONTROL MODULE
0000
0006
009F
00B7
P
P
P
P
20
?~
30
35
40
OOOA
0011
001?
45
50
~~
(j
pooon
POOO]
ron(l2
CElFE
f'C4f)
4PJF
pnn03
~R(lO
pon05
POOO7
POOO
ronnq
OA07
MOO
ENT JOB TWO
ENT RF3
ENT J03T
ENT RI
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT*
EXT
EQU
EQU
EXT BATLST
EQlJ LPMSK(2)
EOII REOXT( $B9)
(lOEA
OM?
EOU OISP($F.A)
EQU ZERO($22)
nOAll
(lOAF
7FFF X
5
**MSOS 4.0 JOB PRO
9
JOBPRO
11
JORPRO
JOB PRO
**MSOS 4.1** JOBPRO
JOBPRO
13
14
ABS. AnDRESS OF TRANTA BUFFER IN JOBENT
TRNVEC
ENTRY POINT TO JOBENT (TRVEC)
JBPROE
ADDR. OF JOBENT MIBUF (TRVEC)
MIBIIF
SW ITCH IN TRVEC SET BY JOBENT
JPSWT
JOB CAt-ICEL FLAG
JBCNFG
RECOV
ERRMSG
FILE2
NSTACK
TRANV
IllP
MIB
FlLE3
**MSOS 4.0
JOBINO
**MSOS 4.0
INPTV4
**MSOS 4.0
LOGIA
116*4366
BATCLIJ
(TRVEC)
VINPV4
ONE,TWO,THREE
JBCFGZ
HFFe$A)
H7FFF($11),HFFFF($12)
0002
Oonq
Jon TWO NtJM
STA*
JPl
STO*
STA
Arm
STA
*
ENA
ERROR RETURN FROM DUMMY 1,2,3
1
3
4
7
*****************************************************
]5
2'
JOB PRO
*****************************************************
10
PAGE
JOBPfW
JOB PRO
JOB PRO
JOIWRO
JOB PRO
JOBPRO
JOBPIW
JOBPRO
JOB PRO
JOB PRO
JOB PRO
JOBPRO
JOB PRO
JOB PRO
JOBPRO
JODPRO
JOBPR0132
JOBPRO
JOB PRO
JODPfW
JOB PRO
JOBPIW
15
]6
lEl
19
20
21
22
23
24
25
26
27
20
29
30
31
32
33
2
34
35
36
37
38
132*5184 JOBPR0132 3
132*5184 JOBPR0132 4
JOB PRO
39
JOBPRO
**MSOS 4.0 JOBPIW
JOB PRO
ENTRY POINT
$CPFE
JOBPRO
(F2)
. ,lOB PRO
SAVE Q REG.
SAV02
**MSOS 4.0 JOBPRO
TRANTA
**MSOS 4.0 JOBPRO
=XTRANTA-JOBH/O
JOBPRO
AlJIl. OF JORPRO TRI\NT 1\ TI\BLE STORED
TRANV
JOOPRO
IN TRV[C.
JOBPRO
7
(----,
\
/
41
42
44
45
46
47
48
49
50
51
(\
\J
0
0
0
CLASS - VER 3.0
17PO ASSEMBLY OF JOBPRO
5
)('I
POnOA
poonc
POOOO
poorE
ponOF
pno) J
POOl2
pnOl3
POOJ4
prnJ5
POnlli
PO(l17
0170
C40n
P(l019
POOIA
0115
0804
POOIA
POOIC
pnOIE
()CFC
EAOO
IAE1
POOIF
P0020
P0021
P0022
012C
HlFB
0000
E400
~400
fiOFF
OCF9
CliFF
6AOO
OOFF
DonI
OJ41
HlF9
25
OOAC
n~oc
15
70
7FFF X
7FFF x
OOIR P
0092
7FFF X
30
Pon74
P0071i
pnon
P002n
POO?J\
Pfl(l2C
35
4fl
4~
50
55
.
4r.00
OIti8
OR44
tiCOO
IflOO
OORC
OOA3
nflJ\C
OR22
P0070
P002E
pn07F
onN
6CE9
P0031
POfl32
P0033
P0034
P0035
P0036
POO37
POo?n
P0039
P003A
POO.3B
Po03C
POO30
pn03E
POP3F
POO"'O
4B2C
47FF
55FF
5fiFF
5AFF
5352
FFFF
454F
562C
4353
4144
4253
522C
4A4F
4354
5041
Iroo
(l) 32
ADD
STAENQ
LOOP LllASTA
RAOItlO
SQZ
JMP*
OUT2 LO!)*
SQM
LOA
EOU
SAN
OUT2A SET
*
STA*
OllT3 LOQ
JMP*
*
OUT3A SAP
JMP*
SAVQ2 NUM
LDQ
JB
*
*
*
*
*
STO
SOP
CLR
STA
JMP
,JBP
TRA
*
*
SET
STA*
JBPRO Jr1P
JPTAB ALF
NUM
NllM
NUM
NUM
ALF
NUM
ALF
ALF
AlF
ALF
AI.F
ALF
ALF
AI.F
ALF
-fi
(I)
TRANTA+13,Q
I
1
0llT2
lOOP
SAV02
JA-*-1
JOBINO
JOBI(*-I)
OlIT3A
A
(JOBI)
TRANTA,Q
JOBTWO,Q
JBP
OUT3
0
JPSWT
INPBUF
JBPRO-*-l
A
(MIB I)
JOlW
0
A
(JOB I)
SSI
l,es
l,AO
1,BS
I,R,
I,JO
l,CT
I,PA
PAGE
**MSOS 4.0 JOIlPRO
JOB PRO
**MSOS 4.0 JODPHO
MOVE CONTENTS OF DPI, RI, AND LOAOEP**MSOS 4.0 JODPRO
AND ERROR NIINBEH,STACK ADOR. JOB FLA**MSOS 4.0 JOBPRO
JOIlPHO
**MSOS 4.0 JOBPIW
JOUPRO
JOIWRO
JOBPRO
JOBPRO
SKIP IF Q IS SET NEG.
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBI'IW
EITHER INITIAL CALL OR BACK FROM
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
LIBEOT OR RECOVERY
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
JOUPR(J
JUMP TllROUGU TIlE ADDRESS IN TilE TRANTA
TABLE TO TIlE PROPER ROUTINE.
JOUPIW
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
JOBPRO
JPSWT IS SET NEG. AFTER RETURN FROM
JOB PRO
JOB PRO
LIBEDT AND RECOVERY. JOBENT STORES TIlE
,JOBPRO
MIINP BUFFER ADDRESS IN HERE. IF A NEW
J P STMT. IS READ IN BY JOBPRO, THE ADDRESS JOBPRO
OF MIBUF IN JOBENT IS STORED IN INPBUF
JOBPRO
JOB PRO
AT TAG R03.
STORE MIINP BUFFER AODR IN TRANTA TA*·MSOS 4.0 JOBPRO
JOB PRO
JOB PRO
**MSOS 4.0 JOBPRO
CLEAR MIB SWITCH
TYPE "J" ANO INPUT CONTROL STATEMENT
JOBPHO
T7 OR JPLOAD TERMINATED ON A CONTROL**MSOS 4.0 JOB PRO
STATEMENT. JOBINO IS BIIFFER AOORESS **MSOS 4.0 JOBPRO
OF CONTROL STATEMENT.
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
RESET FOR NORMAL CONTROL CARD PROC. **MSOS 4.0 JOBPRO
,JOBPRO
STATEMENT AlREADY INPUT, MOVE TO SM BUF
TRNVEC
I
I,K.
$42FF
$55FF
$56FF
$5AFF
I,SR •
$FFFF
l,EO
l,V,
08/21/80 00.20.56.
K
JP REQ. NO. 0
JP REQ. NO. I
JP REQ. NO. 2
JP flEQ. NO. 3
JP- REQ. NO. 4
JP RF.Q. NO. 5
JP REQ. NO. 6
JP REQ. NO. 7
lIP REQ. NO. 8
JP REQ. NO. 9
AD JP REO. NO. A
BS JP REQ. NO. B
R, JPREQ. NO. C
JO JP REQ. NO. 0
CT JP REQ. NO. E
PA JP REQ. NO. F
B
U
V
Z
SH
*
EO
V,
CS
JOIlPRO
JOB PRO
JOBPRO
,JOBPIW
JOB PRO
JO/3PIW
JOBPIW
UMSOS 4.0 JUBPRO
JOB PRO
**MSOS 4.0 JOBPIW
JOBPRO
JOBP!!O
lJOBPRO
JOUPIHI
JOB PRO
JOBPfW
3
52
53
54
55
5f)
57
58
59
60
61
62
63
fi4
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
CLASS - VER 3.0
1700 ASSEMBLY OF JOBPRO
5
10
15
20
?5
30
35
40
45
50
~5
~,
( ~)
pnf14]
PO(142
P(1(1113
pn044
POO45
P(1046
POO47
POOII~
P0049
P004A
POOII[l
POOIIC
P004C
POOIID
POOIIE
P004F
POP50
P0051
POO!12
POO53
P(l054
POOS!)
ponSfi
POO!'7
POOf-R
P0059
POO!)I\
P005B
P005C
1'0050
POOSE
POOSF
POOOO
POOlil
POO02
POO03
P(l01i4
POOS6
P0067
POOfi8
POOl'9
POOSA
P006C
POO60
POOf>F
POO(iF
Pfl07(l
pr071
POO77
POO73
P0074
pnfl]5
POP7(i
poon
PO(l7P
rOOlA
~!'4E
4M9
50!)5
404F
5245
4445
434C
4F50
31FF
32FF
33FF
0000
0000
0000
7FFF X
E522
C101
OFE~
4ElFA
AOOA
OQ[l5
(1101
]R4~
CP('4
OJ1E
CRnB
BRF2
01n7
BHJO
0105
CRnF
B8ED
OlOO
C~07
RREA
olOA
COOO
IR3B
C806
0874
0114
IROO
OOOF
47FF
DC]A
CAct
BRne
0105
3135
0182
RPF9
0103
OflFE
OJ7]
WFP
4842
!'8fln
582A
flflP[
ALF
ALF
AlF
ALF
ALF
ALF
ALF
ALF
NIJM
NUM
NUM
JPTAI3L BSS
SAVQ NlIM
TEMP NUM
AOC
F2
JOBP4 LOO.:.
lOAlLS
STQ*
ANllINA
SAl
JMP*
L(lA*
SAN
LDA*
EOR*
SAl
EOR*
SAl
JCHK LOA*
EOR*
SAZ
LOA*
EOR*
JOLKAI SAl
LOA
JMP*
JOlK LOA*
EAt)
SAN
JMP
HEXl1F f>JIIM
TTYEOF NlIM
JOLKA ENQ
RETRY LOA*
E(lR*
SAl
EOR*
SAZ
ItJQ
SQM
JtW*
JOBP() STQ*
RTJ
RTJ*
I.UN
1.FI
I.PU
I.MO
1.RE
1.0E
I.Cl
1.0P
$31FF
$32FF
$33Fr
JPTAI3L(O)
$0000
UN
FI
PU
MO
RE
DE
CL
OP
1
2
3
JP
JP
JP
JP
JP
JP
JP
JP
JP
JP
JP
REQ.
REQ.
REQ.
REQ.
REQ.
REQ.
REQ.
REQ.
REQ.
REQ.
REQ.
00/21/00 00.20.56.
NO. 10
NO. 11
NO. 12
NO.
NO.
NO.
NO.
NO.
NO.
NO.
NO.
13
14
15
16
17
18
19
lA
0
FIlE2
($22).1
1• I
8
TEMP
$A
-$2A
1
J03T
TRANTA+12
JOlK
JPTAB+4
TEMP
JOlKAl
HnnF
JOlKAl
JPTAB+l3
TEMP
JOlKA
JPTAI3+8
TEMP
JOLKA
SAVE SECOND AND THIRD CHAR.
CHECK FOR ASTERICK
**MSOS
**MSOS
**MSOS
**MSOS
TEST FOR BLANK
NO-BUT MAY BE A JOB CARD
**MSOS
LET JCRDV4 DO THE REST OF THE CHECK **MSOS
**MSOS
V. ALLOWED TO START INPUT
**MSOS
FROM OTHEn JUAN STANOAIW
=N$3135
J03T1
TTYfOF
JOI3PRO
JOBPRO
.IOBrRO
JOBPHO
JOBPRO
JOB PRO
JOBPRO
JOBPIW
JOBPRO
JOI3PRO
JOBPRO
JOI3PIW
JOI3PHO
**MSOS 4.0 JOBPHO
**MSOS 4.0 JOnPRO
GET FIRST TWO WORDS.
IS A JOB IN PROGRESS
YES
LET AN *l "mil
ABORT TilE JOB
*G - EOF FOR TTY
A
JOlKA
TERMINATE JOB
TERMA
$UF
$47FF
JPTABL-JPTAO-l SEARCII HIE TAOLE
WECK FOR REQUEST WORD.
JPTAR,f)
TEMP
JOIlPf;-*-1
HOUF
JORP6-*-]
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
-J
1
RETRY
f)Rrr.
Jnt:MIB
MVTHL
LOOP AROIltJO FOR NEXT STATEMENT
REQUEST NUMBER
CHECK FOR JOB CANCEL
MOVE TRANTA TABLE TO JOBENT
n
PAGE
**MSOS
**MSOS
**MSOS
JOBPRO
JOI3PRO
JOB PRO
JOBPRO
JOBPIW
JOBPHO
JOBPHO
JO[lPRO
4.0 .JOBPRO
4.0 JOBPRO
4.0 JOBPRO
4.0 JUBPRO
JOBPIW
JOB PRO
JOB PRO
. JOBPRO
4.0 JOBPRO
4.0 JOBPRO
4.0 JOB PRO
4.0 JOBPIW
JOBPRO
4.0 JOBPRO
4.0 JOBPnO
4.0 JOBPRO
4.0 JOI3PRO
4.0 JOUPRO
4.0 JOBPRO
.IOBPRO
4.0 JORPRO
4.0 JOOPRO
JOBPIH>
JOOPIW
JOBPIW
JOIWIW
JOBPRO
. JOBPfW
JORPfW
JOB PRO
4. () JOUPRO
4.0 JOBPIW
4.0 JOB PRO
4
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
125
126
127
120
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
1~2
153
154
155
156
157
150
159
HiO
161
162
163
164
165
n
_/
0
0
f)
\~
CLASS - VER 3.0
1700 ASSEMBLY OF JOBPRO
5
POO7B
POOlC
poom
P007E
Pfl07F
POO~O
]0
poor}
--r 00r2
PPO~3
POOR4
POOR5
POOfl~
15
?O
Poor7
POOPS
POOfl9
PoorA
POORR
poprc
POOf4A
O[lFB
0]77
()OF 7
OJ 74
JIl33
09F7
0901
0907
090)
0902
0901
0903
OCOO.
6806
C400
fiOFF
CR02
14FF
0000
5R32
OA07
7FFF X
(l~02
ISF5
POOC}F
POOM
POOJ\2
POOJ\3
conn
POflJ\il
POPA5
OOOP
C400
PonA7
POOM
POOA9
POOM
POOIIIl
POOAC
POOAD
rOOAE
fiOFF
OCOE
CAOfi
66FF
0]42
OOFE
I8FO
]CF5
EC05
fi?OA
IAFl
3033
45
50
55
ooon X
OOllfi P
OREG
0
IDXTBL
1
IDXTBL +6
08/21/80 00.20.56.
1
IDXTBL+?
-4
1
I[lXTBL+6
IOXTBL+5
H'O -4
SOM - IOXTBL+4
ItJO -8
SOM J()XTOL+3
JMP* lJOBP9
J()XTBL INA -R
INA 1
INA 2
INA 1
INA 2
INA 1
INA 3
JBPEX ENQ 0
STA* INDEX
LOA JBPROE
STA- I
LDA* INDEX
JMP- (I)
INDEX NUM 0
TERM RTJ* RELFIL
ENA 7
SET 0
JMP* JBPEX+l
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
1H2
183
184
185
186
187
188
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPIW
203
204
205
206
207
JOBPIW
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
JOBPHO
JOB PRO
**MSOS 4.0 JOOPRO
JOBrlW
JOBPRU
,JOI3PIW
JOB PRO
209
210
211
212
213
214
215
216
217
218
K
*.B.SR.U.V.Z.EOF
**MSOS 4.0
**MSOS 4.0
-8
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
JOB .CTO.PAUS
**MSOS 4.0
**MSOS 4.0
REWIND,FILES
**MSOS 4.1**
1,2,3
**MSOS 4.0
JPLOAO
**MSOS 4.0
AFILV4
**MSOS 4.0
JPSTV4
**MSOS 4.0
JPFLV4
**MSOS 4.0
JCRDB4
**MSOS 4.0
RESTOR
**MSOS 4.0
JPCIfGE
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
**MSOS 4.0
A JOB IS ABNORMALLY TERMINATING SO **MSOS 4.0
SCHEDULE FILE MOD TO CLOSE OPEN JOB **MSOS 4.0
**MSOS 4.0
FILES- RETURN WILL BE AT CLSDON
SET UP 03 ERROR CODE
**MSOS
L[lA =N$3033
JOBENT TRANTA TABLE
**MSOS
LOO* (TRNTB)
**MSOS
STORE ERROR IN TRANTA ERROR WORD
STA- }(l.O
**MSOS
Jf1P* TERM
TIllS ROllTINE MOVES TIlE TRANTA TABLE TO JOBENT ********
*****
MVTBL NlJM
LOA
EQU
STAHJO
MOVE LOA*
STASQl
IrlQ
JMP*
Jf1P*
0
TRNVEC
TRNTB(*-I)
I
LENGHl
TRANTA.f1
(I).Q
2
-1
MOVE
(MVTBL)
4.0
4.0
4.0
4.0
4.0
CSY.V.ADR.A!1F.BSR.BSF
R
llP3T
JP3Tl
GET TRN TBL AOOR IN JOBENT
FROM TRVEC AND SAVE
TRANSFER TRANTA TABLE TO JOBENT
5
JOBPRO
JOBPRO
JOBPRO
JUBPRO
JOBPRO
JOBPIW
JOBPRO
JOBPRO
,JOBPRO
JOnPRO
,J(lRPRO
JOBPRO
JOBPRO
JOBPRO
JOB PRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JUBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPIW
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
**MSOS
**MSOS
**MSOS
**MSOS
**MSOS
JPLOAD CONTROL STATEMENT
PAGE
4.0
4.0
4.0
4.0
189
190
191
192
193
194
195
196
197
198
199
200
219
CLASS - VER 3.0
1700 ASSEMBLY OF JOnPRO
OH/2l/80 00.20.56.
PAGE
6
JOBPRO
22]
JOBPRO
JOl3prw
JOB PRO
JOBPHO
JOI3PRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOB PRO
JOB PRO
.JOBPIW
JOBPRO
JOBPRO
JOBPRO
JOBPRO
223
224
225
226
227
228
229
230
231
232
233
235
236
237
238
GET ADDRESS OF PROGRAM
JOBP9 LDA* TABLE,Q
AAO A
TI\BLE-JOBPIO
1M
STA* JOBPI0
RESTORE INPUT BUFFER POINTER
LOA SSIl
STI\- J
RTJ* *
JOBPIO NIIM $0000
f.ET NEXT STATEMENT
JMP* JOOP
JOBPRO
JOB PRO
JOBPRO
JOB PRO
.JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOB PRO
240
241
242
243
244
245
246
247
248
RELATIVE TRANSFER TABLE
A[lC OtJE
USERS PROGRAMS.
ADe TWO
ADC THREE
* USER CAN ADO PROGRAM NAMES If ERE.
JOBPRO
JORPRO
JOB PRO
JOBPRO
250
251
252
253
**MSOS 4.0 JOBPRO
JOB PRO
255
256
JOBPRO
JOBPRO
JOBPIW
JOBPJW
JOBPRO
25H
259
260
261
262
JOllPRO
**MSOS 4.0 JORPnO
**MSOS 4.0 JOllPRO
**MSOS 4.0 JOBPRO
JOB PRO
**MSOS 4.0 JOBPRO
JOBPrW
JOB PRO
**MSOS 4.0 JOIJPRO
264
265
266
267
2fiR
* VECTOR TABLE rOR JOB PROCESSOR
5
]0
15
20
PO(lAF
ponno
PflflBl
PonB2
POflB3
POOB4
POCUS
PO[IfJfl
Porn7
POf1B8
POOB9
POf1BA
pomm
POORC
POOBD
7FFF
002F
nnnn
0007
0]97
00113
009B
0000
0000
0000
0000
0000
0000
7FFF X
0006
OOOE
POORE
POORF
PflOCO
POOCI
POOC2
POflC4
pnflC5
POOCll
pnOC7
CAOA
OR34
0907
F.P05
CROO
f;OFF
SPOO
nono
35
POOCP
rn(lC9
POOCA
7FFF X
7FFF X
7FFF X
TI\BLE
40
POOCB
pooee
7FFF X
7FFF X
F3
MIBI
onoo
45
POOCD
pnOCE
POODO
POOll1
POOO2
POO[l3
POOll4
pon!)5
5PF9
OAnO
IPfl7
25
30
50
55
(j
TRANTA NllM
AOC
ItJPBtlF NlIM
ADC
ADC
ADC
ADC
NUM
BPS
NUM
RI
LOADEP NUM
QREG NUM
STCK NUM
JFLG NUM
AOC
NN
ADC
EQU
POfl!)~
POn!)7
rnorQ
POOI1A
pnflrlR
00C5
lPIn
5~00
OORR
0842
4CFA
lCFA
5RFfi
ccno
FR?R
AnOA
90Fn
Pl55
ADC FILE3
ADC MlB
RELFIL NOP
RTJ
CLR
STQ*
JMP*
FlUID
*
RF3
JOIW
o - ABSOLUTE LOCATION OF JOBTWO
1 - RETURN WHEN STATEMENT ALREADY INPUT
2 - ABS. ADOR. OF INPUT BUFFER IN JOBENT
0
3 - RETURN WHEN NO STATEMENT - "J" PIHNTED
JOBP-JOBTWO
**MSOS 4.0
CLSOON-JOBTWO 4-RETURN AFTER FILES CLOSED
**MSOS 4.0
FILHD-JOBTWO 5-ROUTINE FOR FILE MOOS
6-START ABNORMAL JOB TERMINATION **MSOS 4.0
TERM-JOBTWO
7 - BREAKPOINT SWITCH
0
8 - RECOVERY ON/OFF S~lITCIf
0
9 - LOADER ENTRY POINT
0
10 - REQUEST NUMBER
0
11 - LOCATION OF PROTECT PROCESSOR REQ STACK
0
12-INDICATES IF A JOB IS IN PROGRESS**MSOS 4.0
0
13 - NO. OF ENTRIES IN PROTEC STACK
NSTACK
14 - RETURN TO RELEASE FILE 3 "OUTPUT J"
RF3-JOBTWO
**MSOS 4.0
LENGTH(*-TRANTA-l)
$7FFF
JBPRO-~'OBTWO
0
JBKMIB
Q
(MInI)
(RELFIL)
RTJ* RELF It
ENA 0
JMP* IOXTBL+]
RTJ*
LnA
STA*
I\N[lSlIIJ-
RELFIL
(IlIPP)
REAOLII
$1\
$FO
CLEAR MIB FLAG
RTS
SCHErllJLE TlfE SECOND PORTION OF
TIlE FILE HANDI.ER
CHECK FOR TYPE PF INPUT
MElJItJM
I NPllT COMMENT I1EV ICE
-\
()
234
269
270
271
272
0
c)
(J
CLASS - VER 3.0
1700 ASSEMBLY OF JOBPRO
5
10
15
20
25
POOOC
POODO
POOOE
POOEO
POOEI
POOE2
POOE3
POOE4
POOE5
POO[fi
POOf7
POnEA
PorEQ
POO[A
pnOER
poore
POOEI1
pnOEF
poon
POOF2
POOF3
POOF4
POOF5
POOFf)
35
1I~
!'O
55
011B
5P.7A
54F4
0000
0007
0000
IPFC
0002
0070
]4EA
O)Il)
If!F5
ccon
P.OOO
fiOFF
CC7.9
fiP.04
FF5F
0)63
OAFf
POI03
POI04
POJ05
P(lIOt)
POI07
POIOR
POIOCl
POlOA
Pnlrn
POlOe
pnlO[l
POWE
POtoF
pOlIO
pnll?
POI 13
POl]4
POllS
POll7
P(l1l9
BI06 X
POOF9
POOFA
POOFB
POOFC
POOFD
POOFF
POIOO
P0101
POHl2
40
oom
6~73
OC23
6600 0000
flA6B
DOH
0171
18FA
5860
C400 7FFF X
6P07
54F4
0800
0000
0000
0000
0025
BOFE X
CP.FB
0101
IflFn
CPF9
O1?E
OFC4
0139
ocno
OFEC
E600 7FFF X
C?OC
OFC4
0172
IROO 0007
IROO 0116
PonH~
30
0]03
BOFO
9000
0
08/21/80 00.20.57.
PAGE
7
SAl
AOOSUB
JOBPI STA*
SAN
WRIT RTJ*
RTJADC
**MSOS 4.0
YES
JOBPI
**MSOS 4.0
$FO
**MSOS 4.0
=N$FD
**MSOS 4.0
COMSW
OON"T PRINT A -J- ON THE LIST nEVICE**MSOS 4.0
JOBP61
CHECK FOR JOB CANCEL FLAG SET
JBKILL
OUTPUT J
($F4)
**MSOS 4.0
$DOO,WRITI-WRIT-2
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPIW
JOB PRO
JOBPRO
273
274
275
276
277
278
279
280
WRITIIO AOC
WRITLU AI1C
0
$lAFC.$2
JOB PRO
JOBPIW
281
AOC
JMPWRITI SQP
JMP*
JOBP61 U1A
AOn
STALOA*
STA*
ENA
ENO STA+
SET
STA*
INQ
SQM
JMP*
REAOR RTJ*
LOA
STA*
RTJREOPAR NUM
(OISP)
JOBPfi}
WRIT
(F2)
=XSM)-JOBTWO
I
(STABUF)
SET+l
-0
L-l
O,Q
SM1,O
-1
REAOR
SET
JBKIU
MIBllF
READLU+2
($F4)
$800,0
JOBPRO
**MSOS 4.0 JORPRO
**MSOS 4.0 JORPRO
,JOBPRO
**MSOS 4.0 JOBPRO
JOI3PRO
JOBPRO
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
JOBPRO
JOI3PRO
**MSOS 4.0 JOBPRO
JOB PRO
JOUPRO
JOUPIW
JOBPRO
JOI3PRO
JOBPRO
JOUPIW
JOBPRO
JOBPRO
283
284
~IRITO-*-+5
FINO ADS. LOCo OF SM
GET AOORESS INPUT BUF IN JOBENT
SET BUFFER TO $FFFF
STORE IN MIBUF IN JOBENT
STORE IN LOCAL BUFFER
CHECK FOR JOB CANCEL FLAG SET
SET BUFFER AODRESS IN CASE
MONITOR IS IN UPPER BANK
READ JP STATEMENT
JOB PRO
RDTHO AOC 0
REAOLU AOC O,L+l, (MIBIIF)
ROTIIO
R[l1
R[l2
REAOUJ
R03
4
ROIA
ROIA
LOA*
SAl
JMP*
LOA*
SAP
ALS
SAM
EllQ
US
LOQ
L.DAALS
SAP
JMP
Jt1P
SMIA
ADC
(MIBlIF)
R02
ROI
CUECK FOR' COMPLET ION OF I/O
CUECK FOR I/O ERROR
IF A REAO ERROR,
TTY ERROR
0
12
lOG1/\ ,Q
12,Q
4
ROlA
TERMA
RESTR
PSYTAB OF INPUT DEVICE
LOOK FOR EOF
EOF--TERMINATE JOB
RESTORE INPUT ON FAILURE
ABS ADOR. OF INPUT BUFFER IN JUSENT
**MSOS
*·MSOS
**MSOS
**MSOS
**MSOS
**MSOS
*·MSOS
**MSOS
**MSOS
**MSOS
4.0
4.0
4.0
4.0
4.0
4.0
4.0
4.0
4.0
4.0
282
2[15
2R6
2fl7
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
~JOBPRO
304
305
JOBPRO
JOBPIW
JOB PRO
JOBPRO
JOI3PRO
JOnPRO
JOB PRO
JOBPRO
JORPRO
JOBPRO
JOBPRO
JOBPRO
JOUPRO
JOBPIW
JOBPRO
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
JOBPIW
322
CLASS - VER 3.0
1700 ASSEMBLY OF JOBPRO
5
10
P0l1A
[400
P011C
PPllfl
P01JE
POJ]F
P0170
PO]?]
I All£)
(lC23
CCFC
pr] ??
15
20
75
3f1
35
40
45
50
!)!)
POI?3
P0174
POl25
P0l27
POl2S
P0129
POl 213
P012C
POl20
POI?E
P0130
POl 31
POl32
POl33
PO]34
P013S
P013tl
P(l137
P0138
PODQ
PO:J3/\
P013B
POJ3C
P0130
POJ3F
P0140
P0l41
P0142
PfI]43
P0l44
POl45
P0146
POl47
PO].4R
PO]49
P0l4A
P0l4B
P0l4C
P0140
P()]4E
PO]4F
PO]SO
PO] 51
PO]!)3
PO]54
PO]!)!)
P01~(,
()
0119 X
OlJR P
lun
SMCKS
(,~)(I
6PJE
CM2
B0l2
O]OP
CA3F
13000
0104
C/\3B
13000
0117
C012
6A36
6600
OOFE
0141
lAH
C/\30
/\OOA
B028
0]02
S~'CKSI
20FF
2020
BCKGNO
0000
SMCKS2
SMX
CMe
1805
CAlA
A01A
1300/\
FA27
fi600
SMXl
0000
C~14
SMXIA
SMCKS3
SHY
010F
EM3
CA23
OFfi~
9~12
010/\
!l4F4
0000
0000
0000
18FB
0024
OOlC
CRrll
0101
18ft)
SMWRIT
4nr.
AOC
LOA*
SAl
JMP*
JJOBP4 RTJ*
JMP
COMSW NIIM
WRITO ALF
NIIM
SMWI
5~OC
IflOO
0000
4A20
OflFF
Lno
EOIl
JMP*
ENO
LOA*
STA*
ST/\*
LOM
EORSAl
LOA*
EOR
SAl
LO/\*
EOR
SAN
LOASTA*
STA+
INQ
SQl
JMP*
LOA*
ANOEORSAl
UlA*
lJMP*
LOA*
ANOEORSTA*
STA+
LOA*
SAl
tOQ*
LOA*
LRS
SUB*
SAl
RTlJAOC
FEFC
13
ALF
00/21/80 00.20.57.
PAGE
0
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPHO
JOB PRO
TRANSFER MIINP BUFFER
JOBPRO
AnDR. OF INPUT BUFFER IN JOBENT
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPRO
**MSOS 4.0 JOBPHO
GET WORn FROM STATEMENT BUFFER
JOBPIW
JOBPfW
IS WORD $FFFF
YES, STORE INTO BUFFERS
JOBPfW
NO
JOBPIW
IS WORD $20FF
JOUPRO
JOBPRO
YES, FILL ENTIRE WORD WITU $FFFF
NO
JOB PRO
JUBPRU
IS WORD $2020
NO, MUST HAVE A VALID CUARACTER
JOBPfW
JOUPIW
YES, FILL ENTIRE WORD WITH $FFFF
IN LOCAL BUFFER
JOBPIW
JOB PRO
AND IN JOBENT BUFFER
JOBPRO
JOBPRO
JOB PRO
LOOP
JOBPRO
IS LOWER CHARACTER A SPACE ($20)
JOB PRO
JOB PRO
($0020)
JOBPRO
YES, B/\CKGROIJNO LOWER CHARACTER
JOB PRO
NO, ENTIRE WORD IS VALID TO PROCESS
JOB PRO
JOBPRO
PUT $FF INTO LOWER CHARACTER
JOBPRO
($FFOO)
JOBPRO
JOBPRO
JOBPRO
JOBPRO
cm,sw
JUBPRO
JJOBP4-*-1
**MSOS 4.0 JOBPRO
srH+1
**MSOS 4.0 JOBPRO
SM) .. 2
**MSOS 4.0 JOOPRO
R
**MSOS 4.0 JOBrRO
OON"T COpy A JOB CARD
B
**MSOS 4.0 JOBPRO
JCROV4 WILL DO IT
JJO[3P4
JOOPRO
($F4)
JOB PRO
$OOO,O,O.$lRFB,L COPY SM BUFFER TO LIST OUTPUT
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
JOB PRO
JOB PRO
,JOBPfW
lJOBPRO
JOBPRO
JOBPRO
JOOPRO
JOIlPRO
JOIWfW
366
367
368
369
370
371
372
373
374
**MSOS 4.0 JOIWRO
376
MIBtlF
STABlIF(*-l}
SSI
L-l
(ST/\I3I1F),
SMCKS2+1
SMCKS3+1
SMl,Q
UFFFF
BCKGNO
SMl,O
=N$20FF
BCKGNO
SMl,Q
=N$2020
SMX
HFFFF
SMl,Q
O,Q
-1
SMX
SMCKSI
SMl,O
HFF
$2A
SMXl
SM1,O
SMCKS3
SMl,Q
$lA
BFF
SM1,Q
O,Q
SM1-SMWR IT
SMWR IT +2
JJOBP4
SMWI
JBKILL
JOl1P4
0
1,lJ
$nDFF
CUECK FOR JOB CANCEl FLAG SET
1,n,
()
-
/
()
0
0
0
CLASS - VER 3.0
1700 ASSEMBLY OF JORPRO
* THI S SUBROUTI NE CHECKS FOR JOB CANCEL FLAG SET AND, IF CLEAR, SETS
* MIB FLAG FOR JOB LOCKOUT.
5
PAGE
08/21/S0 00.20.57.
JOBPRO
JOBPRO
"
10
POl57
OOOCl
POl5~
5~04
POl59
0400
POlSB
1CFB
PCl15C
POISD
PfllSF
POlf)O
PCl)f\1
onoo
C4(l0
0101
14EA
lCFA
OOCC X
OI5A P
15
70
7FFF X
381
3U2
383
384
385
386
387
JOB PRO
JOBPRO
JOB PRO
JOBPRO
JOBPRO
389
390
391
392
393
JOIWRO
JOB PRO
396
397
**MSOS 4.0 JOBPRO
JOBPRO
JOBPRO
JOBPRO
JOBPRO
ABS LOCATION OF SMI BUFFER
JOB PRO
JOBPRO
I POINTS TO BEGINNING OF INPUT BUFFER
JOB PRO
SET BUFPTR TO POINT TO SOURCE BUFFER
JOBPIW
JOB PRO
JOBPRO
PICK-UP fROM USERS
JOB PRO
INTO LOCAL
JOB PRO
IF Q ZERO - DONE'
JOBPRO
JOBPIW
NEXT WORD
**MSOS 4.0 JOBPRO
CLEAR MIS SlHTCH
JOBPRO
GET LOCAL BUFFER AND BUFFER IN JOBENT
JOB PRO
BACKGROUND[l)
JOBPRO
POINTER TO USERS BUFFER
399
400
401
402
403
404
405
406
407
408
JBKILL ADC
LOA
SAl
JMPRETURN JMP*
* THIS
0024
30
Pfllf.?
POlf'3
POl87
POl~8
P(lIP9
POlf1A
35
45
SSI
0024
FFFF
0000
SSIl
C~FE
60FF
POl~B
4~OB
POI8C
pnl8E
P0l90
P0191
P0192
POl93
POI94
PO)95
4800
OC23
CE07
66FF
0142
OOH
18FB
4CC5
1AA7
P0196
0000
PO]~f
40
5~26
37H
379
JOB PRO
JBKMIB ADC 0
JUBPRO
CHECK FOR JOB CANCEL FLAG SET
RTJ* JBKILL
**MSOS 4.0 JOBPRO
NOT SET SET MIB SWITCH
RAO MIB
**MSOS 4.0 JOBPIW
EQlI MIBFLG(*-I)
JOI3PRO
RETURN TO SENDER
JMP* (JBKMIB)
JOBPRO
* THIS SUBROUTINE CUECKS TUE JOB CANCEL HAG. IF SET, IT EX ITS TO
JOB PRO
THE DISP. TO WAIT FOR JOBKILL
*
0
JBCNFG
RETURN
($EA)
(JBKILL)
ROUTI~E
CIfECK FOR JOB KILL MOOIJLE ACTIVE
t-IOT ACTIVE- RETURN WITH INIHBITEn INTERRUPTS
SAVES THE JOB PROCESSOR STATEMEt-IT
* OEFINE BY LOCATION SPECIFIED IN 0 REGISTER.
75
9
FF23
LOPI
oun
EQU
RTJ*
BSS
NIJM
0
LDA*
STASTQ*
STQ
ENQ
LOA*
STASQl
INQ
JMP*
STQ*
JMP*
L(36)
SSII
SMI (L)
$FFFF
0
SSIl
I
BUFPTR
INPBUF
L-l
(BUfPTR).Q
(I),Q
OUll
-1
LOPI
(MIBFLG)
SMCKS
*
BIJFPTR ADe 0
MOVE STATEMENT TO INTERNAL BUFFER
STATEMENT BUFFER
409
410
411
412
413
414
4]5
416
417
ClASS - VER 3.0
1700 ASSEMBLY OF JOOPRO
5
10
P0l97
PO}qQ
PO}IlA
POIlle
POl9E
P019F
POll\O
CROO
OJ??
C800
E400
4Al5
flf)?3
002]
POl/II
POl/I?
P01l13
POl 114
POl/15
POl1l6
POl/17
POl/Ill
PO 1119
40FF
OC08
C722
P(lll,A
POIM
POll,C
POlAD
P01AE
POlAF
POlOO
POIOI
POlO2
POIS3
POW4
P01l3S
pnJnfl
pn1B7
5802
180E
OBO(l
54F4
OCOO
0000
00(l0
IPFC
0000
(l000
CRFR
0101
IPFO
ERF9
H2O
0090
7FFF X
Hi
20
25
30
35
4(1
45
50
55
POIB8
POJR/33
fi/56 L
12/35
fi/3? L
II/57 L
10/48
10/50
PAGE
13
C1.ASS - VER 3.0
]700 ASSEMBLY OF JOBPRO
COMPLETE REFERENCE MAP.
JORPfi)
JOBP9
JORTWO
OOEo
OOBE
0000
JOLt:
JOLKA
JOLKAI
J03T
J03T1
JPS\.'T
JPTAB
JPTML
JPI
JSTMH
J1
J'IA
L
0067
OOfiE
00ti3
OooF
00A1
0023
0(13)
004C
0002
LENr.m
lOADEP
LOG1A
lOOP
LOP]
lPMSK
OOOE
00n8
0200
OOOE
OHlF
0002
015A
015A
011B
~1JB
MIBFlG
MIBlJF
MIBI
~1L1'
MOVE
MVTBL
NAME
tm
NOEOF
NST/\CK
Of'JE
Ollll
0llT7
0llT2A
OllT3
01 IT 3/\
QREG
ROllll1
Rill
RP]A
RI12
RIl3
REAI1LU
HEAPR
RECOV
REI1PAR
RUFll
REQXT
RESlR
RETRY
RETURN
RF3
e)
*EXTERNAL*
0103
01A3
O]AA
0024
ooce
01C9
00A9
00A4
0234
OOBC
MIO
OOBC
00C8
01 ~L1
001!'
(lO]A
OOIC
OOIF
OOBQ
ABSOLUTE
ABSOLtlTE
*EXTERNAL*
ABSOLtlTE
*EXTERNJ\L *
*EXTERNAl*
*EXTERNAL*
*EXTERNAL'"
0103
olOA
0117
(ll07
OIIA
0104
OOFC
onEl
*EXTERNAL *
0101
OOCO
00B9
022E
OOfiF
ARSOLlITE
O)Ii]
0000
7/07
5/19
2/16 E
2/52 L
4/28
4/36
4/31
711ft E
4/41
'1/74 X
3/44 L
4/14 B
2/~4 L
]0/12
10/18 L
10/20
7/25
7/38
5/50
6/16 l
2/3fi X
3/06 L
9/37 l
2/45 Q
2/32 X
9/11 Q
2/23 X
3/35
10/52
5/51 l
4/59
10/10
6/20 l
11/58
2/')9 X
2/39 X
9/39
3/10
3/17 l
3/70 L
3/16
4/57
7/37 l
7/L12
7/47
7/41 L
7/45
6/57
7/29
2/26 X
7/35 l
5/34
2/46 Q
7/55
4/49 L
9/19
2/17 E
7/17
6/25 l
2/56
3/21
4/42 L
4/39
4/33
4/26
5/41 l
3/26
4/29
4/48
10/35 L
10/24
]0/23
8/06
8/47
6/22 Q
PAGE
14
7/19 L
6/13
6/21
7/20
4/37
4/48
4/49
9/36
10/14
10/17
7/39
6/46
7/58
7/60
5/56
11/11
11/13
11/25
6/08
6/10
6/11
6/12
4/44
4/39 L
~/40 L
4/48 L
4/34
l
9/27 Q
9/29
W/76
7/50
3/r
9/ 1
11/55
6/41
9/42
7/32
6/41 l
10/57 l
5/55
5/46 l
11/09
11/53
12/09
0/20
0/35
9/42 L
3/12 l
12/11 Q
3/74
3/23
4/60
7/41
7/44
7/53
7/43
7/60
7/33
7/3)
12/27
08/21/80 00.20.58.
9/10
12/37 L
L
6/17 L
l
7/55 L
l
L
6/43 l
12/32 L
4/56
9/2J l
fi/21
7/38 l
7/44
6/47
6/51
12/30'
6/55 l
I)·
~.
6/55
.1
0
()
0
01F~
SMCKS
SMCKSI
Sr·1CKS2
SMCKS3
SMWRJT
SMWI
SMX
SMXl
SMXIA
SMY
SMI
OOF"
0110
0121
012E
0130
0147
0140
Un3
0139
013C
013F
0163
SET
SMlA
SSI
SSIl
STABIIF
STCK
STPTE[
STRH!
TABLE
TFMP
1EHM
TrR~1A
TERMl
TH
TllR
TltREE
TRANTA
TRANV
TRATBl
TRL.
TRNTA
lRNVEC
lR3
TTYEOF
TWO
VINPV4
HEOFB
HR[RR
WHIT
WR I nil)
WR JTUI
WRITO
WRIT)
ZERO
2/1~
00B7
021'0
0233
004C
0021
0119
0162
0188
0118
OORA
023C
01F!
OOCP
0040
0(1013
DIED
O1E4
01C8
()lF4
OOCA
OOAF
DOOR
O1CF
0200
00A6
01CF
020A
OOliO
00C9
021C
0207
01AC
00E2
00E6
12/22
12/36
4/15
2/54
11/38
7/23
f\/06
R/I0
8/08
8/09
8/44
8/50
8/18
8/28
8/34
8/36
. 7/20
7/27
7/58
3/42
6/29
l
l
l
L
*EXTEHNAl*
*EXTERNAl*
*EXTERNAl*
ASSOlllT[
12/26
3/25 l
7/30
7/26 l
9/43
8/24
8/21 l
8/30
8/49
8/52
8/23
8/31 l
8/35 l
8/50
8/10
8/13
8/16
8/20
8/25
8/29
8/05
9/2f\
8/04 Q
9/28 l
9/31 l
8/07
9/32
8/25 L
8/31
8/34
8/38
8/39
4/38
4/50
10/08
12/15
12/17
12/18
l .
6/'15
*EXTERtJAl*
12/22
OR/2l/80 00.20.58.
l
L
6/18 L
11/45
11/39 L
*EXTERNAl*
6/Pi l
3/12
11/tl6 l
7/2'l
nOEl
0154
onFS
0022
E
l
l
l
4/16 l
5/34 l
4/45
11/17
10/56 l
11/4'1 l
2/39 X
2/55
2/56
2/30 X
11/06 0.
12/08 L
5/41
2/21 X
12/05 l
4/42
2/39 X
2/38 X
11/52
10/26
7/08 l
7/12 l
7/13 l
7/15
7/10
2/49 0.
12/45 L
11/45
6/27
4/22
5/43
7/54
11/'10
10/59
11/48
6/37
3/07
3/20
2/57
12/13
12/10
5/48
2/60
12/08
4/47
6/36
12/19
11/59
10/28
7/10
4/27
5/51
4/35
6/07 l
6/22
Q
5/47
11/05
10/41
7/18
10/47
l
l
l
L
7/17 L.
10/1A
~/56
6/35 l
4/30
fl/13
11/35 l
11 /27 l
)
'--~
ClASS - VEn 3.0
J70r ASSEMBLY OF JOSPRO
COMPLETE REFERENCE MAP.
RI
RSfT
SAVJT
SAVo.
SAV02
SECT
/'--"
t
8/49
9/29 B
PAGE
15
C)
(;
0
0
0
CLASS - VEIl 3.0
17nn ASSEMBLY OF (171)
STORAGE ALLOCATION.
AOORESS
lENGTH
0000
01AR
OlA8
(l8/21/S0 00.21.00.
PAG!:.
BINARY.CONTROL CARDS.
DECK- ID B27 PERIPH. DRIVERS 1.013 SIJMMARY-106
NAM 01711
END
ENTRY POINT NAMES AND AOORESSES.
C1711
E1711
-- 0000
MAKEQ
MI
-- 0042
11711
-- 0004
EXTERNAL SYMBOLS.
ALTf1EV
170n ASSEMBLY OF (17)1
lOG
*
*
5
*
*
RI.AQ
RQAQ
CLASS - VER 3.0
OR/21/AO 00.21.03.
NAM 01711
DECK-IO 1327. PERIPH. DRIVERS 1.013 SUMMARY-106
1711 TELETYPE AND 713-10/711-100/713-120 CRT DRIVER
PERIPHERAL DRIVERS 1.0B
SMALL SYS1EMS OIVISION. lA JOLLA. CALIFORNIA
COPYRIGHT CONTROL DATA CORPORATION 1976
10
*
*P1711 ADC
ADC
*
ADC
*
ADC
*
NIJM
*
NIJM
*
NUM
*
NUM
*
ABC
*
NUM
*
NUM
*
NlIM
*
tJlJM
*
NIIM
*
tJUM
*
tJlIM
*
NIIM
*
NlIM
*
AOC
*
IS
?O
75
30
35
00('4 P
0042 P
. 0000 P
40
*
***
$520A
CII7l1
(CI711
CE1711
-1
0
0
09 1
.
3006+T713
0
0
0
0
1°
n
$7FFF
0
0
1
lI17]}
00
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
SCHEDULER CALL
INITIATOR ADDRESS
CONTINUATOR ADDRESS
TIMEOUT ERROR ADDRESS
DIAGNOSTIC CLOCK
lOGICAL UNIT
PARAMETER lOCATION
CONVERTER. EQUIPMENT. STATION
REQUEST STATUS
DRIVER STATUS
ClIRRENT LOCATION
lAST LOCATION PLUS ONE
DEVICE STAlIIS
ERROR CODE AND STARTING LOCATION
RESERVfO
RESERVED FOR FNR AND CMR
DRIVER FLAr.S
. HARDWARE PARITY CHECK FLAG
OIAG ttl
PAGE
01711
01/11
01711
01711
01711
01711
01711
DIll 1
01711
01711
U1711
1)1711
01711
01711
rn711
DIll 1
11]711
01711
01711
017])
01711
01711
D1711
01111
01711
2
2
3
4
5
6
8
9
10
11
12
13
14
15
16
17
IS
19
20
21
22
23
24
25
26
27
HiT
11711.CI711.EI711
DIll 1
29
EXT
EXT
EXT
EXT
EXT
EXT
ALTrlEV
MAKEQ
HI
lOG
ROAQ
RLAQ
OIlll
DIll 1
D1711
01711
01711
111711
30
31
32
33
34
35
III 711
37
ERROR LOGGING ENTRY
REQUEST A/Q ALL OCATOR
RELEASE A/Q ALLOCATOR
*~MSUS 4.1~*
DRIVEn MAY BE USEI1 FOR 1713 IF ONLY KEYOOARD IS USED
PHYSICAL OEVICE TAOL[ WORDS
Pl711
3n
II!)
~o
0004
(l005
n006
0007
OOOR
5~
()
,
.
0009
nonA
onOB
oooe
(lono
(lOP£)
ooor
0010
fOll
EOU
fQlI
EOU
EOU
fQlI
fOU
EOll
EOU
EOU
EQU
EQU
EQU
TIME(4) .
UJ(5)
RfOAO(6)
CAll ( 7)
ERRTAn(p)
SWITCJI(9)
CORE(lO)
lASTPl(ll)
STATtJS(I2)
ERRCOn(13)
COREIN(I3)
TEMPp5~
FlAG 16
OIAG. CLOCK TIME
LOGICAL lINIT
RfQIJES ADDRESS
HAROWARE ADDRESS
REOllEST STATUS
SWITCH wono
CORE AOORESS
LAST CORE LOCATION + 1
HARDWARE STATUS
fRROR CODE (THIS ORIVER NEVER MASS MEM.)
TEMP STORAGE
(j
01711
01711
01711
40
41
42
D1711
43
Ill7l1
01711
01711
01711
01711
D1711
01711
01711
01711
44
45
46
47
48
49
50
51
52
n
0
0
CLASS - VER 3.0
1700 ASSEMBLY OF 01711
5
EQll TMPWRO(11)
EOU PARFLG( 17)
EOU DIAGLU{lO)
0000
0011
0012
***
10
]5
0000
0001
0002
0003
0005
OOOfi
;O=HAROWARE PARITY CHECK
DIAGNOSTIC LU
ERROR CODES
EOU
EOll
EOU
EOU
EOll
EOll
TIMERR ~ O~
LOSOAT 1
ALARM(2)
PARERR(3)
ItHREJ (5)
EXTREJ(6)
TIME OUT ERROR
LOST DATA
ALARM
PAR ITY ERROR
INTERNAL REJECT
fXTERNAL REJECT
'-
08/21/80 00.21.03.
PAGE
3
01711
MSOS4.1 V1711
**MSOS 4.1** 01711
53
54
01711
57
01711
01711
01711
01711
*MSOS V4 01711
*MSOS V4 01711
59
60
61
62
~5
63
64
---
CLASS - VER 3.0
1700 ASSEMBLY OF n1711
***
08/21/80 00.21.03.
MASKS
PAGE
4
01711
fi6
111711
111711
111]] 1
111711
01711
01711
IH711
01711
01711
01711
01711
01711
01711
01711
68
01711
83
5
OfllA
EOll
EQU
EOIJ
EOU
EOtJ
EOU
EOII
EQU
EOU
EOU
[OU
EOll
[OU
EOU
oon
0007
](l
OOOC
OOflP
OOlfi
0fl7~
0021i
1~
002A
0028
nO('c
002E
n031
20
0021
***
25
XFFOO($IA)
ZERO{~2?)
LPMSK(2)
TFORM{J2)
H003F{~)
UFFFO~ $lfi)
BIT2( . 25)
BIT3!$Z6j
BIT7 $2A
*MSOS V4.0
*MSOS V4.0
*MSOS V4.0
"MSOS V4.0
*MSOS V4.0
MSOS4.1
85AJ $28
BIT9{$2C)
BlTll($2E)
BIT14 ($31)
BIT15($21)
TIME OUT VALUES ARE IN SECONOS
69
70
]]
72
73
74
75
76
77
78
79
80
81
003C
0002
EOU INPVAL(60)
EOIJ OUTVAL(2)
KEYBOARO INPUT TIMEOUT PERIOD
KEYBOARD OUTPUT TIMEOUT PERIOD
01711
01711
85
86
00B5
00136
OOEA
EOU AFNR{$(5)
EOII ACOMPR($B6)
EQU OISPAD($EA)
FIND NEXT REQIIEST
COMPLETE REOUEST
01 SPATCIIER
01711
01711
01711
89
90
n
88
(~
,,_ J
()
()
0
ClASS - VfR 3.0
1700 ASSEMRlY OF 01711
5
pooon
POOO)
POO02
40FF
OAOO
lAM
El711
POOO3
0111'
WREOAL NlIM $11B
STQ- I
ENA TIMERR
JMP* SElCOD
OB/2I/HO 00.21.03.
DIAGNOSTIC TIMER ERROR ENTRY
WRITE MODE,ALARM/EOP INT.
PAGE
5
**MSOS 4.1** D17l]
01711
D1711
92
93
94
01711
96
D1711
98
}(l
***
I1RIVER INITIATOR ENTRY
POO04
POOO5
rnnOli
4OFF
5485
lA7A
582E
OAn
A109
li109
CIOA
f'l](lO
El07
UH)-
45
POO07
rooop
ron09
pnonA
PoonB
poone
POOOO
POOOE
POOOF
PonlO
PIlOl1
POOl?
Pon13
POO14
Pon1S
POOlf'l
POO17
rOOlS
POOl9
PonlA
POOIC
POOIO
POOlE
POO?O
P0021
P0022
POO23
rO(l75
11711 STQRTJJMP*
*
RTJ*
Ef'JA
ANOSTALOASTA-
Elo]
50
Pon2f'
pon?]
rOfl?R
POO?Cl
POOl'A
Poo2e
pno?o
Pon2E
rn07F
POO30
OAnO
flROO
EW7
(l235
FlOC
1\02e
OCO?
15
20
n
30
35
40
5~
CflF4
0353
£lOll
Cfi22
OF49
AOO]
09Fl
011A
fllOA
fil0B
C204
0122
AOOO
A016
fil0B
1800
OA01
AI09
0102
1AOO
OA07
7000
009A
00A7
LOA*
OllT
LtlOLOAARS
ANDINA
SAN
STASTALDASAP
AND
ANOP3
STAJMP
SENULL ENA
ANDSAZ
JMP
SENBEL ENA
I
(AFNR)
CLROUT
CLEAR
O]oA
EXIT
ENA
STA
LOQINP
STAI\NOENO
CLEAR ANO EX IT
2 CARDS DELETED FOR PSR 83*2129
CLEAR DEVICE
-8
SWITCH, I
SWITCH,I
CORE, I
COREIN,I
CAll, I
WREOAL
ERROR-*
REQAn,I
(ZERO).Q
9
LPMSK+5
-14
SENULL
CORE, I
LASTPl,I
4,Q
P3-*-1
::N$7000
tlFFFO
lMPWRD,1
M01REQ
1
SWITCU. I
SENBEl
AUR ITE
$07
SENOCH lOO- CALl,1
INQ -1
OllTOtJT OllT ERROR-*
OOFE
0331\
INITIATOR ENTRY
0
ROFlAG
CALl. J
ERROR-*
STATlIS,J
11 ITC)
OtlTVAL
CLEAR PASS SWITCH BIT 3
SET REPEAT LOCATION
SELECT WRITE MODE AND
INTERRUPT ON EOP OR ALARM
REQUEST AnDRESS
*r1S0S V4.0
*MSOS V4.0
GET REQUEST COOE
CHECK CODE FOR MOTION REQUEST
SKIP IF NOT MC
*r1S0S V4.0
*MSOS V4.0
GET PARAMETER STRING
SKIP IF NOT ITER. TYPE PARA~
GET ONLY PARA. IF ITER.
GET THREE PARAMETERS
SAVE PARA. LIST
PROCESS MOTION REQUEST
CHECK IF READ OR WRITE
SKIP IF READ MODE TO OUTPUT BELL
GO PREP. FOR WRITE
BElL CHARACTER
OUTPUT ROUTINE
SAVE STATIJS
READ MOOE BIT
OIJTPUT TI ME OUT PER JOO
**MSOS 4.1** 01711
01711
D1711
01711
01711
01711
01711
01711
l11711
01711
*MSOS V4 01711
U1711
01711
*MSOS V4 D1711
01711
DI711
*MSOS V4 0] 711
*MSOS V4 01711
*MSOS V4 01711
01711
01711
*MSOS V4 D1711
*MSOS V4 D1711
*MSOS V4 L1l711
*MSOS V4 IH 711
*MSOS V4 01711
*MSOS V4 01711
01711
D17ll
MSOS4.1 01711
01711
MSOS4.101711
100
101
102
103 .
104
105
106
107
lOR
109
110
III
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
01711
01711
01711
133
134
135
1l171J
D1711
01711
0]711
lI1711
D1711
137
138
139
140
Dl7ll
I'll
142
143
ClA~S
1700 ASSEMBLY OF 01711
5
POP3}
Pon32
P(1033
Pon34
P(1(135
JO
POO3fl
pnp37
PO(l3fl
POO39
PO(I3A
El07
POfl3C
P0030
POP3E
nPFE
(1201
osnn
Pfl01
(11\03
0301
Pilon
0201
pnfl3F
nRno
POfl40
PO[l41
fi)OC
pr031l
1~
0101
OC3C
4104
14EA
0000
leD
SAZ
ENO
SETIME S10JMPCLEAR NlJM
LOOINO
If'JP
NOP
INO
ENA
OUT
NOP
INP
NOP
STAJMP*
- VER 3.0
08/21/80 00.21.03.
0
SKIP IF WRITE MODE
INPUT TIMEOUT PERIOD
SET ClOCK
GO TO DISPATCHER
SUBROUTINE TO CLEAR DEVICE
CALL, I
-1
1
READ TO CLEAR OATA IF ANY
SETIME
INPVAL
TIME,I
(OISPAO)
(1
1
3
1
CLEAR CON1ROLLER AND INT.
0
1
0
STAllIS,I
(CLEAR)
READ STATUS
A = STATUS, Q = DIRECTOR CODE
RETURN
i'\
\, __ J
PAGE
01711
01711
01711
01711
01711
01711
[)l7l1
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
6
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
r"
,
)
,
/
()
0
ClASS - VER 3.0
1700 ASSEMRLY OF 01711
l;
OR/21/80 00.21.04.
PAGE
7.
01711
162
ST£)- I
LDQ- CAll, I
INP ERROR-*
STA- STATUS,I
ENA 6
OUT ERROR-*
LDA- STATlIS,I
ANO- BInI
SAN GOMAN
JMP* NOMAN
GOMAN LDA- FLAG,I
S(\Z TAGITI .
*
JMP-_ (DISPAO)
TAGITI RAO- FLAG,I
RTJ ROAO
STO- I
*
ENA 0
STA- FLAG,I
LOA- (I)
STA* SCHCAL
RTJ- ($F4)
SCHCAL NUM $l20(l
ADC MI
RTJ RLAQ
STQ- I
ENA B5A3
AND- STATUS,I
SAN JNOMAN
*
*
JMP- (OISPAO)
JNOMAN JMP* NOMAN
**t1S0S 4.1** 01711
01711
01711
GET STATUS
01711
01711
CLEAR AND SELECT DATA INTERRUPT
01711
01711
CHECK FOR MANUAL INTERRUPT
01711
SKIP IF MANUAL INTERRUPT
l1l711
01711
MI BEFOHE
01711
NO
01711
2 CARDS DELETED (FOR 97*3168)
01711
YES, WAIT FOR COMPLETION
01711
SET flAG
01711
01711
REOUEST A/Q ALLOCATION
111711
01711
1 CARD DELETED (FOR 97*31(8)
RESET FlAr.
01711
01711
PICKUP SCHEDULER CALL FROM PHYSTB
01711
01711
MAKE UP SCHEDULER CAll
01711
SCHEDULE MI
01711
01711
01711
RELEASE A/Q
01711
01711
CHECK FOR DATA OR ALARM
01711
01711
SKIP IF DATA OR ALAJ~M
01711
2 CARDS DElETED
01711
1 CARD DELETED (FOR 97*3168)
01711
EXIT
lJ1711
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
ERROR JMP*
ENA
JMP*
INTRNL ENA
SETCOO l.00QLS
EAO
STALOAEORSTARTJ*
LOASAt-'
JMPRTJ
rNA
*MSOS V4.0
EXTERNAL REJECT 6
*MSOS V4.0
INTERNAL REJECT 5
01711
*MSOS V4 DI711
01711
*MSOS V4 01711
01711
01711
01711
01711
IH711
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
***
ORIVER
CO~TJ~UATOR
ENTRY
5
10
15
20
1'5
30
35
110
45
50
~~
P(1047
POO43
P0044
PO(145
POO46
P0047
P0048
POn49
P(l04A
PO(l4R
PO(l4C
POOIIO
40FF
El07
07]f
fllOC
(lAOt'
031B
CIOC
A02E
0111
1833
C110
0101
POO4E
P004F
P0050
POO!'?
14EA
0110
5400
40FF
Pon!'3
P(l(154
PonS5
P(1fl5fl
Pfl057
PflO!'P
PO(l5 Q
POOSA
P005C
P(l050
P005E
P005F
OAOO
f'110
C4FF
POOfiO
P0061
14fA
HnD
POOl'2
POOfl3
P(l(lf)4
PflOfl5
POOflfl
POfl67
PO(1fiP
POOfi9
POOfiA
P(10fiR
PflOfiC
POOflO
POOflE
POOflF
POO7n
P007]
In03
OAO{)
IP(l2
OA05
fl05
(IF An
(1874
6100
C031
pnn73
C1711
7FFF X
t'P(12
54F4
1200
7FFF X
5400 7FFF X
4OFF
OA28
AIOC
0111
BJOR
FJnP
5RCl
CJn5
OJ 11
J4EA
51100
(1AFE
7FFF X
INTRNL
EXTREJ
snCOD
INTREJ
LU, I
CONTINUATOR
()
A
ERRCOO,I
BIT14
ERRTAB,I
ERRTAR,I
CLEAR
1I1, I
1
(flISPAIl)
MAKEQ
-1
01711
CLEAR [lEVICE
EXIT IF NOT ASSIGNED
01711
111711
01711
01711
!l17l1
01711
III 711
180
181
18?
183
184
W5
186
187
188
189
190
191
192
193
194
195
196
197
CLASS - VER 3.0
1700 ASSEMOlV OF 01711
rOn74
STA- TIME,I
6104
*
5
Pon75
P0076
POO77
1!'
n
9)12
Pon79
P007A
POO7C
pn07E
POO7F
0111
lA2A
5400
]400
CInS
0111'
PO(lPO
SPA4
pnrlPJ
14EA
P007~
10
ElOD
C105
7FFF X
7FFF X
lDQLOASURSAN
JMP*
LOGIT RTJ+
JMP+
NOMAN LDASAN
CLHOUT RTJ*
JMP-
ERRCOD,I
lll,l
OIAGlU,I
LOGIT
COMPRQ
LOG
ALTOEV
LU,I
CLEAR TIME
2 CARDS DELETED (FOn 97*3160)
00 NOT REPORT ERROR
ON DIAGNOSTIC lU
**MSOS 4.1**
**MSOS 4.1**
lOG ERROR IN EF
Nor~AN1-*-]
CLEAR
(ll]SPAO)
08/21/80 00.21.04.
CLEAR AND EXIT
EXIT
PAGE
01711
DI711
01711
**MSOS 4.1** 01711
k*MSOS 4.1** 01711
01711
01711
**MSOS 4.1** 01711
01711
01711
01711
(11711
fl1711
8
216
217
218
219
220
271
222
223
224
225
226
227
22A
n
0
0
"-/
CLASS - VER 3.0
1700 ASSEMBLY OF 0]711
5
10
ronp?
Ponp3
POOP4
pnops
POOPfl
POOA7
PoonA
P(lOP9
POOf~A
15
20
25
P008B
POORC
PonAO
POORE
POORF
P0090
Pon91
P0092
POO93
P0094
POO95
POOCl6
Pon97
pn09P
POo o9
P009A
3fl
POO~R
pn(l~C
35
porloo
P009E
POOQF
PonAn
P(lOA1
POOA3
rOOM
PMO
AlOC
0117
CI09
OJ?]
185E
OAnA
AI0C
OWF
Hno
01\40
A10C
0117
Clll
0103
C02A
AlOC
0114
01\02
Hmo
OAOI
1HCE
OA03
lRCC
E107
OA02
03C5
OAFE
f)ln4
02C2
610e
!l400
non x
54R6
1AOO
FF5F
NOMAtI) H'A
ANDSAN
U1ASAP
JMP*
CBKD EN"
ANOSAl
JMP*
ALRINT ENA
ANOSAN
LOASAl
LOAANOSAN
AO
ENA
JMP*
ENA
Al
,JMP*
ENA
A2
JMP*
*
nONE LOQENA
OUT
ENA
STAINP
STARTJ
COMPRQ RTJ-
*
JMP
$20
STATtlS,I
ALRINT
SW J TCH, I
CHKO-*-1
MOTRTN
H
STATUS,I
DONE
NOTllON
$40
STAllIS,I
Al
PARFLG, I
AO
BIT7
STAlUS, I
A2
ALARM
snCOD
LosnAT
SHCOO
PflRERR
sncoo
CAll, I
2
ERROR-*
-1
TIME, I
ERROR-*
STATUS,I
MAKEQ
(ACOMPR)
11711+1
PAGE
OP/21/AO 00.21.04.
ALARM BIT
CHECK FOR ALARM
SKIP IF ALARM INTERRUPT
CHECK FOR MOTI ON REQUEST
SKIP IF NOT MOTION REQUEST
MOTION REQUEST RETURN
DATA BIl
CIIECK fOR DATA INTERRUPT
SKIP IF NOT
PROCESS DATA IN~ERRUPT
BIT 6
CIIECK FOR LOST DATA
SKIP IF LOST DATA
CHECK FOR HARDWARE PARITY CHECK
SKIP IF NOT
*MSOS
*MSOS
*MSOS
*MSOS
·MSOS
·MSOS
*MSOS
*MSOS
V4
V4
V4
V4
V4
V4
V4
V4
*MSOS V4
·MSOS V4
CUECK FOR PAR ITY ERROR
SKIP IF PARITY ERROR
·MSOS V4.0
LOST DATA ERROR
*MSOS V4.0
PAR ITY ERROR 3
*MSOS V4
3 CARDS OELETEO
NO,CLEAR
INTERRUPTS
CLEAR TIME
SAVE STATUS
GO TO COMPLETE TlfE STATUS
2 CARDS DELETED (FOR 97*3168)
**MSOS 4.1**
**MSOS 4.1**
01711
01711
01711
01711
Ll1711
Ll1711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
III 711
01711
01711
01711
01711
01711
01711
01711
01711
01711
9
23n
231
232
233
234 .
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
CLASS - VER 3.0
17PO ASSEMfiLY OF 0]711
***
PROCESS OATA. INTERRUPT
08/21/80 00.21.04.
PAGE
10
()1711
267
01711
01711
01711
U1711
01711
01711
01711
01711
01711
01711
01711
01711
0171 ]
01711
269
270
5
]0
1~
1'0
(j
OAOI
AI09
0101
1822
OA02
AJOC
POOAfi
POOA7
POOM
pnOA9
POOM
POOAB
ponAC
PonAO
POOI\F
POORn
pnOR)
panR2
POPB3
EJrl7
VA 02
03BO
CfW3
Ill00
PPO~1~
0?14
0102
I~OO
0093
FF73
NOTOON ENA 1
ANO- SWITCH.I
SAZ 1
JMP* AWRITE
ENA 2
ANO- STA TlIS. I
SAZ ·NFREAO
JMP REAO
~FREJ\O LOQ- CALL.I
ENA 2
OIlT ERROR-*
lOA* B9A4A2
JMP OlITOIIT
R9A4A2 NlIM $214
OPERATION
YES
~!O ,fillSY
CLEAR INT.AND
SET READ MODE
SELECT INT.ON
DATA AND ALARM
271
272
273
274
275
276
277
27~
279
2RO
281
2fl2
(j
()
'--
.
./
n
()
'-..
.'
'----./
CtASS - VER 3.0
1700 ASSEMBLY OF 01711
***
PAGE
08/21/80 00.21.04.
11
(11711
2A4
01711
*MSOS V4 01711
*MSOS V4 01711
*MSOS V4 01711
01711
*MSOS V4 01711
*MSOS V4 01711
*MSOS V4 D1711
*MSOS V4 01711
*MSOS V4 01711
*MSOS V4 01711
*MSOS V4 01711
*MSOS V4 01711
01711
286
287
288
289
290
291
292
293
294
295
296
297
298
299
*MSOS V4.0 01711
301
01711
01711
01711
01711
01711
01711
303
304
305
306
307
308
PROCESS MOTION REQUEST
5
10
l!l
20
POOBfi
POOB7
POORO
POOR9
POORI'
POORB
POOBC
POnlJD
POOBE
rOOBF
ponco
POOC1
POOC2
POOC3
tJXTMCR UlAEORSTAMOTREQ LOACLR
llS
SQZ
STAINQ
SOZ
INQ
SQZ
JMP*
TRMMCR JMP*
CI09
B021
fi109
CIOB
(lP42
OFE4
(l14fi
fi10B
OnFD
0]44
(lllFll
0141
JOF6
1806
***
7.5
30
POOC4
POOC5
POOCfi
P£l£lC8
PO£lC9
POOCA
C109
AOOO
Bnoo
6109
OAnC
lPOE
8lCO
SW ITCH. I
BIl15
SWITCH, I
TMPWRO,I
Q
4
TRMMCR
TMP~IRO,I
-2
TOPFRM
-2
TRMMCR
MOTREQ
DONE
*MSOS V4.0
CLEAR BIT 15 FROM
PREVIOUS MOTION REQUEST
GET PARAMETER STRING
*MSOS V4.0
GET ONE PARA. FROM STRING
SKIP IF ZERO PARA
SAVE REMAINDER OF STRING
IS IT WEOF
SKIP IF WEOF
IS IT REWIND/UNLOAD
SK IP IF YES
GET NEXT PARAMETER
*MSOS V4.0
TOP OF FORM
TOPFRM LOAANDEOR
STAENA
JMP*
SWITCH,I
HOO3F
=tJ$OICO
SWITCH, I
TFORM
TOStJO
*MSOS V4.0
SAVE LOWER SWITCIIS
SET BIT 15 AND NULL COUNT FOR 7
INTO SWITCH
ASCII TOP OF FORM (OC)
OUTPUT TOP OF FORM
*MSOS
*MSOS
*MSOS
*MSOS
*~lS0S
V4
V4
V4
V4
V4
ClASS - VER 3.0
1700 ASSEMBLY OF 0}71}
por>C1l
por'cc
porco
POGCE
ronCF
ponno
rOOD)
P£1OD2
p£1nD3
P£1OD4
POflD5
Pflon6
POflO7
POO[lB
pn£1r/\
poonB
poorc
POOf'l1l
POfl[)F
POOOF
PO£1EO
PDnEl
POOE2
POOE3
POOE4
5
10
]5
7£1
('5
OAO?
A109
OR72
OAI0
A109
0119
OAI0
0151
OA30
BI09
6109
014E
DA(lO
1800
FF4C
OJ4/\
Dno
Al09
£1117
5PSA
CP5~
O!l?O
B109
l)}Oo
OAOA
]~F3
AWRITE ENA
ANllIRA
ENA
ANDSAN
ENA
SQN
ENA
EORSTASQl
ENA
lOSND J~IP
NonST SOl
ENA
ANOSAN
RT J*
LOA*
If'JA
EORSTAENA
JMP*
2
SWITCfl, I
Q
$10
SHITOI. I
NOTlST -*-1
$]0
1
$30
SWITCH, I
SWITCU, I
NOCONT-*-I
$0
SENOCH
NOCONT-*-1
$20
SWITCfl,1
tJOCONT-*-l
C.IKTYP
BITH!}
$?O
SWITCII,I
SWITCH, I
$A
TOSNO
08/21/80 00.21.04.
FORMATTEU
D1711
O}711
01711
IH711
D1711
IH711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
*MSOS V4.1 01711
*MSOS V4.I 01711
*MSOS V4.1 01711
01711
01711
01711
DIll 1
01711
01711
336
337
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
U1711
01711
01711
01711
[)1711
111711
01711
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
IF UNFORMATTED
1ST CflAR.
YES,CLEAR 1ST
SKIP IF FORMATTED
RESET LINE FEED FLAGIF UNFORMATTED
CHAR. SWITCH
SEND OUT A
CONTINUE IF UNFORMATTED
MARRIAGE
HETURN
SKIP IF UNFORMATTED
58*11B3
5P*llR3
SET
10 SENDCH
D1711
3D
***
DOE5 P
35
40
45
sn
55
r-,
(
/
.
POOES
POOE6
PDon
POOE8
POOE9
PODEA
POOEB
rODEL
Pfl£1m
POOH
PO£1FO
p£1OF]
PflOF?
po£1F3
prOF4
PODFS
PonFfl
POOF7
CI09
A850
OlO~
C109
09BF
0109
5A40
lRD2
OA7F
lEW 0
LIOo
0121
]PC3
1\020
(l)Ol
1~1\4
flflJ\
E622
roor~
01\£14
po£1F9
po£1FA
POOFS
poorc
room
poorE
A109
011]
OF28
01\7F
ORB6
09FC
FF36
RETURN FROM TOP OF FORM
*MSOS V4.0
EOU MOTRTN(*)
NOCONT LOAANO*
SAl
LOAINA
STARTJ*
JMP*
ENA
SEN[lOl Jr4P
NOSPCC LOASI\P
JMP*
ANOSAl
,JMP*
l[lQLOQ-
ENA
ANOSAN
ORS
LOWER ENA
LAO
INA
swnCII.1
BIT6A7
NOSPCC-*-I
SW nCII, I
-$40
SWJTCIf. I
OIKTYP
SENOOI
$7F
SEtJUCH
SWITCH,I
1
NxmCR
BIT3
1
DONE
CORE,I
(lERO) ,Q
4
SWITCH, I
LOWfR-*-1
8
$7F
A,O
-3
ANY CANCELS
TO BE SENT
DECREMENT
CANCEL COUNT
CHECK IF TTY OR OISPLAY.
DISPLAY.
TTY.
GO OUTPUT CUARACTER.
"MSOS V4.0
SKIP IF NOT MOTION
GET NEXT PARAMETER
CHECK COMPLETION SW ITCIf BIT
YES,FINISHED
tW.PICK UP
OATA WORO
UPPER CHAR.
YES,SHIFT
NO,CLEAR
UPPER CHAR.
IS IT AN LO. T.
(---)
12
310
311
312
313
314
315
316
3)7
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
o=0
CHECK IF TTY OR DISPLAY.
0lSPLAY9
TTY.
AND SENO OUT
A LINE FEED
PAGE
*MSOS
*MSOS
*MSOS
*MSOS
V4.I
V4.1
V4.I
V4.1
-'MSOS V4
*MSOS V4
*MSOS V4
D1711
01711
D1711
01711
DI711
D1711
01711
U1711
r'\
\ )
f
)
\,--
0
/
1700 ASSEMBLY OF 01711
5
]0
PO(lFF
PO](lO
POlO]
POlO?
P(l]03
PO)04
PO](l5
P(lI(lfi
POJ(l7
P010~
15
2(l
25
30
PnIOq
POI0A
P010R
POIOC
POJOn
POlOE
POl£lF
POllll
POll 1
P0112
POll3
P0114
P(l115
P0116
P0117
P01l8
P(l]]9
POllA
POllS
PO) IC
po]]n
3!l
40
POllE
P(111F
Pnt 20
P£l)21
POI2?
P£lJ?)
POl?4
PO]?5
P0l2n
PO]27
PO]2~
45
50
55
PO)?9
POl2A
P(l]21l
P012C
P0120
P012E
P(lJ2F
PO]30
PO]31
P0133
P(ll35
POl3fl
P(l137
P(l)3fl
PO]3~
0111
1~99
NOTEOT
(l~J4
011?
(lA7F
(lC7F
NOTNIJL
0~F2
(l114
5~31
CMF
OCl?O
IPOR
0901
0104
09(l1
0102
(l902
0113
CR25
B109
NOTCR
GOTTAB
GOTCR
6109
NOCR
08J4
09RO
0112
O~IE
lR07
01100
6RlS
NOCRI
0~14
n07
OflFE
032F
C)[IA
RIIBOtrT
9 lOB
(l](l9
OA04
Btn~
1l]09
A025
(l]]{l
O]OA
CIOA
9)OB
0114
OAOfl
BI09
ll109
HlO5
C(lOll
0102
1800
1800
(l000
03CO
OOCO
(loon
cJnr
COMPLl
GOGODI
HIO
FEF4
0
CLASS - VER 3.0
GOGOOO
ROFLAG
BJT6A7
BIHiT9
CHKTYP
SAN
JMP*
TRQ
SAN
EtJA
ENQ
INA
SAN
RTJ*
LOA*
INA
JMP*
INA
SAl
INA
SAl
INA
SAN
LOA*
EORSTATRQ
INA
SAN
RAO*
JMP*
ENA
STA*
TRQ
LOQINO
OUT
LnASUBSAl
H'A
EORSTAANOSAN
RAOLOASlIBSAN
ENA
EnRSTAJMP*
LOA*
SAl
JMP
JMP
rJUM
NtlM
NtlM
NUM
LllA-
NOHOT
OO~E
A
NOTtJlIl-*-l
$7F
$7F
-$[1
NOTCR-*-l
CIIKTYP
BITfiT9
$20
GOTCR
1
GOTTAB-*-1
1
GOTTAB-*-1
2
NOCR-*-1
BIT6A7
SWITCH,I
SWITCH, I
A
-$7F
NOCRI
ROFlAG
RtlB()UT
0
ROFlAG
A
CALL. I
-1
TOEROR-*
CORE,I
LASTP 1, I
COMPLT-*-1
4
SWITCII,I
SWITCH, I
BIT2
GOGOOI
CORE,I
CORE, I
LASTPI,I
GOGOOI-*-1
8
SWITCH, I
SWITCH, J
GOGOOO
ROFLAG
GOGODO
Cl711tl
EXIT
0
$3CO
$C(l
0
ERRTAR,I
OR/21/80 00.21.04.
NO
YES, FINISHED
NUll
YES .SUBSTITUTE
CANCEL
CARRIAGE RET.
CHECK IF TTY OR DISPLAY.
DISPLAY.
TTY.
CONTROL
NO,FORM OUT
NO,VERTICAL
TAB
NO,HORIZONTAL
TAB
YES,MOOIFY
SWITCH
OUTPUT
TEST FOR RUBOUT
SKIP IF NOT A RUBOUT CHARACTER
SET RUBOUT PRESENT FLAG
DON"T OUTPUT A RUBOUT
RESET RlIBOllT PRESENT FLAG
RESTORE ORIGINAL CHARACTER
CHARACTER
LAST WORD
PAGE
01711
01711
01711
DI7l1
01711
0] 711
01711
1l17l]
-*MSOS V4.1 01711
*MSOS V4.1 01711
*MSOS V4.1 01711
lH711
IH711
01711
01711
01711
IH711
01711
01711
IH711
01711
01711
01711
01711
01711
01711
01711
01711
0] 711
01711
01711
01711
D1711
NO,REVERSE
UPPER LOWER
SWITCH
NOW SET FOR
UPPER
YES, INCRH1ENT
CORE LOCATION
NOW LAST
NO
YES,SET
COMPLETEO BIT
ANO EXIT
RUBOUT PRESENT FLAG SET
NO
YES, GO GET THE NEXT CIIARACTER
RtlBOllT FLAG PRESENT
*MSOS V4.1
ROUTINE CHECKS FOR TTY OR DISPLAY *MSOS V4.1
FETCII TYPE conE FROM PDT.
"MSOS V4.1
13
364
365
366
367
36R
369
370
371
372
373
374
375
376
377
378
379
3HO
381
382
383
384
385
386
387
388
3R9
390
391
392
393
394
395
396
01711
397
01711
01711
01711
01711
III 711
01711
Dl7ll
398
399
400
401
402
403
404
U17ll
01711
01711
D17ll
U1711
0] 711
01711
UI711
01711
01711
01711
01711
01711
lH711
0] 711
01711
406
407
408
409
410
411
412
413
414
415
416
417
418
4]9
420
40~
ClASS - VER 3.0
1700 ASSEMBLY OF 017]1
5
10
15
70
pn13A
POl3B
pnJ:3C
P0130
POl3E
POUF
POJ40
POl41
P0142
POl '13
PO]/14
P0l45
POllio
PO]ll7
P01 l 18
POILJ9
PO]/IA
POIllB
POlliO
POIAE
pn] ~;n
POl~2
75
pnl ~;3
Po] ~,4
PO]55
PO] ~;o
pn]~7
30
35
40
45
pn]f.8
PO]fo9
P015A
POHH
P015C
P01!i0
P0I5E
POl5F
POlliO
POltil
POlli?
P0163
P0164
P0165
POlfifi
PO]fi7
P01fiA
POJ69
POJ(iA
PO]~R
50
5')
()
POlliC
PO]fifl
POHlE
PO] f\F
pOJ70
PO]7]
POl72
pn173
P0174
pn]75
OF44
1\009
09FB
0101
OPF9
0844
]CF7
OOFE
OAOO
020A
fil0F
C111
0118
CI0F
710F
011B
OA03
1800
IP03
]800
IPOO
01\7F
AIOF
0822
nAO?
AI09
READ
H19
HJ3
FFln
TOEROR
TRS
NOPAR
mon
n~14
09F5
(l109
09FC
011]
1833
0980
0111
1843
OAI0
AI09
0101
HHF
Ofl14
099E
0133
09E5
(lJ?]
ooor
(1"04
PASSIT
lIFORH
ZIFORf'I
J\lP9
0])3
(1J\FF
OFFA
]~n5
08]4
BOlA
flOA
An22
flOA
LOWLOW
TOSTO
ARS
ANOINA
SAZ
RAO*
CLR
JMP*
INQ
ENA
INP
STALOASAN
LOASPASAN
ENA
JMP
JHP*
JMP
JMP
ENA
At-lOTRA
ENA
ANOSAl
TRQ
INA
SAZ
INA
SAN
JMP*
INA
SAN
JMP*
ENA
ANOSAZ
JMP*
TRQ
INA
SAM
INA
SAP
INQ
ENIl
IlN[lSAtJ
ENA
llS
JMP*
TRO
EORLOQAN[IlOQ-
4
LPMSK+7
-4
1
CHKTYP
A
(CIIKTYP)
-I
0
TOEROR-*
TEMP, I
PARFlG,I
NOPAR
TEMP, I
TEMP, I
NOPAR-*-1
PAR ERR
SETCOD
TR!)
ERROR+l
ERROR
$7F
TEMP, I
Q
2
SWITCH,I
lIFORM-*-l
A
-$A
PASSIT-*-1
-3
1
CARRET
-$72
1
CANCEl
$10
SWITCH, I
1
TGOOIS
A
-$61
ZIFORN
-$IA
ZlrORN
-$20
4
SW ITCH, I
LOWlOW-*-l
-0
74
TOSTO
A
XFFOO
CORE,I
(ZERO) ,Q
CORE.I
OB/21/00 00.21.04.
*MSOS V4.1
SAVE ONLY THE TYPE CODE.
*MSOS V4.1
*MSOS V4.1
RETURN AT +2 IF TTY. A = O.
**MSOS 4.1**
*MSOS V4.1
INPUT A CHAR
*~IS0S
V4.1
*MSOS V4.1
SKIP IF HAROWARE PARITY CHECK
PAR ITY OK
PAR ITY ERROR 3
*MSOS V4.0
*MSOS V4.0
EXTERNAL REJECT
INTERNAL RE~JECT
YES,STRIP
PARITY BIT
*MSOS V4
*MSOS V4
*MSOS V4
FORMATTED
YES,
LINE FEED
YES, IGNORE IT
NO,CARRIAGE
RETURN
YES
NO.CANCEl
YES
NO,PASS SWITCH
SET
YES,EXIT
*MSOS V4.1
*MSOS
LOWER CASE A
*MSOS
SKIP IF LESS THAN LOWER CASE A.
*MSOS
CHECK RANGE TO LOWER CASE Z.
SKIP IF ABOVE LOWER CASE CHARACTERS*MSOS
*MSOS
DROP LOWER CASE BIT.
*MSOS
CHECK IF IIPPER CHARACTER.
YES
NO
(j
V4.1
V4.1
V4.1
V4.1
V4.1
V4.1
PAGE
01711
01711
lJ1711
UI711
01711
01711
U1711
01711
01711
01711
01711
U1711
01711
01711
01711
01711
01711
01711
01711
01711
01711
01711
0] 711
01711
01711
1)1711
01711
01711
01711
01711
01711
lJ1711
01711
01711
01711
01711
U1711
01711
01711
01711
01711
[)1711
01711
01711
01711
01711
01711
DIll 1
14
421
422
423
424
425
426
427
42U
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
1166
467
468
D1711
469
01711
01711
01711
D1711
01711
01711
01711
01711
470
471
472
473
474
475
476
477
r,)
c'
()
\.
~-
0
.~
''
CLASS - VER 3.0
1700 ASSEMBLY OF 01711
P(l171i
POl 77
!)
10
1~
POI7?
P0179
P017A
P0171l
Pfl17C
POl70
POl7E
P0l7F
PP)PO
POJ?l
PPlP2
POlS3
~01?4
70
POl85
POIPll
P0187
POlfl?
POlS9
35
P01M
POlSB
POIRC
POIPO
P018E
P018F
POl90
P0191
P0192
P0193
POl94
POl95
40
PflJ97
P0l9f1
PO]OO
POIQA
25
30
POl~fi
4~
03C3
*
181\4
003C
OAID
B109
6109
I?F3
OA20
AI09
0111
1?F3
OACB
1\109
fll09
ElOO
410A
or04
lifi22
P019B
CIOB
P019C
POl90
POJ9E
POl9F
POlAO
POlA1
0874
0104
0804
(lll72
0001
18F9
POIA2
POIJl3
POll\4
rOlA5
P(llA6
POIA7
POll\n
lf~EO
019B P
JMP*
AOC
ENA
NOG
EORSTAJMP*
CARRET ENA
ANDSAN
JMP*
ENA
ANIl5TI\lOOSTOMORIIB SET
5TAMORllBO EOll
lOA-
*
01A2 P
OACF
A109
0930
6109
IHOB
(ZERO), Q
conE,1
LASTP1.1
TGElOU-*-1
4
S~JITCII,I
SWITCH.I
BIT?
TGOOIS
CORE,I
CORE, I
LASTP1,I
tJGOOIS-*-l
GOGOOI
EAO
SAZ
SET·
STAINO
JMP*
~10RUBI EQlJ
JMP*
CI\NCEL ENA
ANOINA
STI\JMP"
ENIl
LAST LOC
YES .GETOIJT
+NO,REVERSE
UPPER-LOWER
SWITCH
CHECK IF UPPER
SKIP IF UPPER
YES ,I tJCREMENT
CORE LOCATION
NOW LAST
*MSOS
*MSOS
TO EXIT
*MSOS
2
SW ITCH, I
NOG-*-l
8
U)Q- CAll,I
OUT TOEROR-*
Elo]
50
55
ST ALOASUBSAZ
HJA
EORSTAAN[lSAN
RAOLDASUBSAZ
TGOOIS JMP*
~IGOOI S ENA
ANDSAN
TGETOIJ ENA
6622
CIOA
9100
0100
(lA04
0109
filfl9
A025
0)]4
O]OA
CIPA
910B
0101
1MB
OA02
A109
0115
OA08
08/21/80 00.21.05.
GOGOOI
INPVAL
$10
SWITCII.I
SWITCII,I
TGOIlIS
$20
SWITCH,I
1
TGETOU
-$34
SWITCI/,I
5WITCtf,I
COREI~,I
CORE, I
A
(ZERO),O
MORlIBO(*)
I.ASTP1,I
SELECT EDT
INTERRUPT
1 CARD DElETED
TO EXIT
TURN ON PASS
SWITCH
CANCEL SW ITCH
SET
NO
YES,CLEAR PASS
CANCEL AND
LOWER
INITIALIZE
CORE LOCATION
TO ALL OtJES
01711
01711
D1711
. 01711
01711
D1711
01711
V4 D1711
V4 nl7ll
01711
01711
01711
01711
V4 DI711
01711
01711
IH711
01711
l1l711
01711
01711
V4 D1711
01711
01711
01711
01711
01711
01711
01711
ll1711
01711
01711
01711
01711
01711
D1711
(n 711
D1711
PSR 89*2925 OELETEO
A
MORURI
A
(ZERO).O
1
MORUBO
MORUB1(*)
TGOOIS
-$30
SWITCH,'
$30
SWITCII,I
TGOIlIS
*MSOS
PAGE
SKIP IF ALL DATA ERASEO
01711
D1711
01711
01711
01711
01711
U1711
CANCEl-SET
PASS AND
CANCEL SWITCH
01711
01711
In 711
01711
01711
ll1711
01711
01711
01711
01711
15
478
479
4BO
481
482
483
484
485
486
4fl7
4H8
489
490
491
492
493
494
495
496
497
49B
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
1700 ASSEMBLY OF 01711
~7375n
CLASS - V[R 3.0
STORAGE USEO
6400 ASSEMI3L Y
531 STATEMENTS
4.324 SECONOS
(~
\
j
OB/21/HO 00.21.05.
PAGE
16
125 SYMBOLS
412 REFERENCES
o
r:,
C)
0
~
CLASS - VER 3.0
1700 ASSEMBLY OF 01711
COMPLETE REFERENCE MAP.
ACOMPR
AF~R
00B6
OOR5
0002
008C
n070
OOCA
ABSOLUTE
ABSOLUTE
ABSOLUTE
4/28
4/27
3/13
9/06
2/35
5/44
ALARM
ALRINT
ALTOEV
. AHRITE
AO
Al
A7
RITll
BIT14
BIT]5
BIT2
BIT3
IHTfiA7
BITH9
BIT7
BIT9
B5A3
B9A4A2
CAli.
(l(l94
9/111
00AN£)-
*
I
(AF~R)
(AOISP)
Ell!, I
LOr.tA,O
I
ASI\LT
(I\COMPR)
CDIIMMY
DlIMAL T
0
(I\LOGl) ,Q
ZRon IT +13
ZROIlIT+12
STA* (ALOGl).Q
SAVE AO[lRESS OF POT IN I-REG.
LOOK FOR MORE REQUESTS
NO REQlIESTS--EXIT TO DISPATCHER
GET LOGICAL UNIT NUMBER
GET· P[lT ADDRESS FOR THIS ttl
MINUS MY POT ADDRESS
SKIP IF REQUEST AS ALTERNATE DEVICE
COMPLETE REQUEST
GO TO SEE IF MORE REQUESTS
DlIMMY LOGICAL UNIT
LOCK OUT OHlER CHAN(iES TO LOGI
GET lOGI ENTRY FOR REQUESTED L.U.
RESTORE UNIT
CLEAR MESSAGE FLAG OIT
1 CARD DELETED
MODIFY LOGI ENTRY
DUMMY
DtJr-lMY
DUMMY
DUMMY
DUMMY
DUMMY
DUMMY
DIIMMY
DII~lMY
()l/~lMY
DUMMY
DUMMY
Ollf1MY
DUMMY
DLJMNY
DUMMY
28
29
30
31
32
33
34
35
36
38
39
40
41
42
43
44
45
46
47
4H
49
50
51
52
53
(;
CJ
()
1700
S
10
ASSEI~RL
POOIO
P('lfl)?
POOl3
P(l('l] 4
POOl5
POn]fi
POO17
POOJP
POO]~
]5
2(1
POO]A
POOlB
POOlC
POOlO
POOlE
P001F
PO(120
rOO21
P0022
POO?3
CLASS - VER 3.0
Y OF DIJMtW
EfiOO
C109
1\011
B032
fi109
4~0J\
54Bfi
0500
EflO7
C20S
0115
C105
fi205
54F4
2000
0000
180F
7FFF X
0005 X
LDQt
LDAANDEORSTASTQ*
RTJlIN
LOQ*
LDASAN
LDASTARTJNUM
ADRPHY NUM
BUSY JMP*
ALOGl ADC
END
LOGlA.O
EST All. ]
LPMSK+15
Of'JER IT +15
ESTAll,I
ADRPHY
(ACOMPR)
0
AORPUY
ElIJ.O
BUSY
Elll,]
Elll,Q
(AMONI)
$2000
0
CDUMMY
LOGI
56747B STORAGE USED
6400 ASSEMBLY
08/21/80 00.21.07.
MAKE.O-REG. POINT TO FAILED L.U. PDT
SET ERROR IND]CATOR ]N V-F]ELD
SAVE ADDRESS OF FAILED L.U. POT
COMPLETE REQUEST
LOCK OUT OTHER ENTRIES TO FA]LEO DR]VER
]S DRIVER BUSY (L.U. NOT ZERO)
SKIP IF BUSY
SET BUSY SO ANY NEW REQUESTS W]LL
BE HlREADED
PART 1 ]ND]RECT REQUEST
PAGE
.DUMMY
DUMMY
DUMMY
DUMMY
DUMMY
nUMMY
DUMMY
DUMMY
DUMMY
DlIt1MY
DUMMY
DUMMY
DUMMY
DUMMY
DU~lMY
PDT ADDRESS OF FA]LED DRIVER
GO TO LOOK FOR MORE REQUESTS
71 STATEMENTS
0.515 SECONDS
20 SYMBOLS
52 REFERENCES
DUMMY
DUMMY
DUMMY
DUMMY
3
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
CLASS - VER 3.0
17(10 J\SSfMRL Y OF DUMMY
COMPLETE REFERENCE MAP.
ACOMPR
J\()ISP
J\I1RPUY
AFtJR
J\LOr,1
AMONJ
J\SALT
BUSY
Cl1lll~MY
DlJM.I\LT
[l1lJl>1MY
ELU
ESTj~T1
I
J(llll1MY
LOCl
lOf,lA
LPMSK
llll1l1MY
ONEBIT
ZROIHT
OOBfl
OOEA
n020
00B5
0022
00F4
OOOB
0021
0001
OOOA
0002
0005
0009
~OFF
ABSOLUTE
ABSOLUTE
ABSOLUTE
ABSOLUTE
*EXTERNAL*
ABSOLUTE
ABSOLUTE
-SYSTEM-
0000
0022
0011
0002
OOOA
non
n033
*EXTERNAl*
*EXTERtJAl*
ABSOLUTE
ABSOLUTE
ABSOLUTE
2/40
2/34
3/08
2/33
2/55
2/41
2/50
3/13
2/22
2/28
2/23
2/35
2/38
2/44
2/21
2/27
2/29
2/37
2/53
2/39
2/3ft
0
Q
Q
Q
E
X
E
Q
Q
E
X
X
2/51
2/46
3/11
2/45
2/59
3/16
2/54
3/19
2/45
2/53
2/46
2/47
3/04
2/49
08/21/80 00.21.07.
PAGE
4
3/09
3/18 L
3/20 L
L
L
l
2/52
3/19
3/12
3/07
3/14
l
3/15
2/44 l
Q
3/20
2/48
3/05
l
0
0
2/fifl
2/(,0
3/n~
2/57
S2)W=::L:
()
n
o
n
o
PAGE
TIME
(ln~7
*
*
*
(lr~3
0034
POO?7
pnr2P
4~~3
POM~
lIS4E
prO?A
POMR
pn£17C
pn0711
£1£13(. pn(l?F
p007r
p(I(l3n
p£1n31
(1037
003R
n(l3~ ro032
nn40
S4?0
(ln3~
P£:M;;
I;O~?
~s~
M[SSM~E
Z.PRESE~T
JlRMSr;
ALF
!lATE: 08/27/(1.£1
2
AlF
TIME- Z
S1I4f1
4[)4S
2[)7(l
3£130
3A3n
z.on:no:ooz
3£1~A
303£1
EQU MSGL{*-MSG)
DOnI'
0000
nn33 (
*
INC
NUMBER
NIIM 0
or TIMES THROUGH THE PROGRAM
END
51}
COM;:
nnoo{
.
0)
OAT;: ODD£)
0)
()
o
n
.0
,---
[)A~E:
TIME
EQ
II
08/27/80
I V ALE N C E S
OEF.LINE
(lOOO
()00(l
nO(l7
ooor
0037
NAME
REFERENCED AT LINE NUMBER
VALUE
(000255)
(000234)
(000251)
~000005~
(l000] 1
OOFF
I
AOISP OOEA
onFn
LIST
OOPS
PRJ
nOOB
MSr.L
TIME
0023, 0029
0022
0022, 0022, O(l?8
0022
PAGE 4
nATE: OA/27/flO
S Y M R (1 L S
flrF •LJ NE
(10(19
n010
00?4
0030
0035
00~f)
[1(139
NAME
Aflf1RESS
roo
nooo
LOOP]
0000
ENWIH 0018
H'OPRG 0024
MSG
0027
HRMSG 007E
INC
0032
TIME
REFERENCEO AT LINE NUMBER
0030
002A .
0022
0027, 0030
0022, 0037
0012, DO]7, 0018, 0021
0024, 0025
PAGE
5
nATE: 08/27/80
EXT ERN A L S
PEr.L H'E
0(102
00n3
(1(1(14
[lno~
~'AM[
VAllIE
HOPTn
(1001
(1(l[lf)
nonE
0(1) 1
MI~'TO
SfC(lN
CONVER
TIME
REFERENCEO AT LINE NUMBER
0010
on13
0019
0011, 00] 4, 0020
PAr,E
6
*** A t P II ARE T I CAt S n R T D F
AfllSP
HORTO
tflOPI
SEWN
000f) COf'lV[R
0002 IlRt4Sr.
0010 MINTO
[In(l4
S Y M B () L S
0005 EN[lPRr. 0030 ENWRT
003f; I
0000 INC
00fl3 MSG
0035 Msct
OATE: OP/77/RO
***
0024 GD
0(l39 LIST
0037 PRI
0009
D007
0008
!)
~/
()
,
"
c)
()
o
(\
"
)
PAGE
HANG
oom
pnn?
npP7 pnnno !lilF4
nnn? pnnn] 1:lP4
nnn? POOP? nnn3
nrr3
onn3 Poon3 14E/\
Oflfl4
Ofl04 rnpn4 !l4F4
OPfll1 pnnn!l ) :Hl~
flnn4 rnnOfi nn03
OISP
r.fl7
nnn!l
nnn!l pnon7 14[A
onnf'
on07
nno?
ooon pooon !l4F4
nflrn P0009 1301
nOOR POOOA 7FFfl
no09 poorB 5800
nolO POOOC srl7
(l0] 1 PoonD 5l~7]
nO)2
nn12 poonE 54F4
nOl2 pnnnF 1305
no)? prnlO 7FFF
n013
Or]3 pno)) 14EA
nO]4
on]!l pn01? SPOfl
nOlfl
nO]1) rn013 ]<1E/\
r017
00][1 POn)il 5pnF
r0l9
nO)Q pnO)5 )tlEA
on?o
on?] ron)" !l[1]P
non
no?? . rnn) 7 1<1EA
SET liP SCHSTK, INTSTK, VOLATILE, /\NO LOG?
tlAf'lG
SCIIJ)LE GO?-GOI-1,4,X,n
N/\M
GO)
SCHOLE r.03-G02-1.5,X,O
[lISP
*
*
G03
SCI/UlE GOI-G03-1,l,X,O
G04
RTJ* RI-I
RTJ* R2-1
RTJ* R3-1
SCIf[)LE G04-G04-1,5,X,O
OISP
*
Cl
*
C7
*
C3
DATE: 08/27/80
RTJ* Rl-l
[lISP
RTJ* R?-l
!"lISP
RTll* R3-]
[lISP
PAr.E
('(124
P(10J~
0000
Rl
(l(l?~
PATE: 0P-/27/(I(l
2
ENTRY POINT
NlJM 0
FREAD (l,Cl-RI-l,BUF,<)h.B,3,6"X,0
(1(12S POO]Q 54F4
OO?!) POO]" 003fl
OM5 P(1OlB 7FF7
POO]C n(100
(l(l2!' p(1m [I OOO~
n075 POOlE np60
POOIF 0037 P
NlIM 0,(1
0026 P(1020 (lnOO
P0021 0000
JMP* (RI-I)
0077 POO?? ]CF!l
002(1
*
************************************************************************
Ofl2Q
0030
*
~lJM 0
ENTRY POINT
on3l P0023 ornn
R2
FREAD P-,C2-R2-I,BlJF,96.B,3,6.,X,O
n03?
0(13? Pp(l?4 !lIlF,~
or3? P002!' OQ3fl
nM? pn07fl 7FEE
POfl27 O(1(1n
0037 P(1(12~ (lP(1P
(1n37 pnn2!l (lnf\(l
P(102A 0037 P
NIIM (1,0
nn33 POp?S onno
POMe 000(l
JMP* (R2-1)
OP34 pnO?fl ICF!J
PO~!l
*
************************************************************************
*
nr3fl
0(l37
(103A pnME
0039
nn3Q P(107F
(1039 P0030
003~ p(1n31
P0032
0(l3~ P0033
on39 P0034
PO(l35
0040 P(l(l36
0041
(l042
0043 P0037
0044 POO<)7
p04!)
prM=
onnn
R3
NUM 0
ENTRY POINT
FREAD 6,C3-R3-I,MBF,96,B,3,6"X,O
54F4
0~36
7Ff!;
(loon
(l(1n6
0060
0097 P
lcn
0060
00f\(l
pnF7 (
JMP* (R3-1)
*
*
AUF
MRF
(47)
BSS BlJF (96)
BSS MAF(9fl)
ENO
COr1
= (l(1(l(l
(
0)
OAT
pOO(l (
(1)
o
o
PAGE
HANG
3
DATF.: Ofl/27/RO
E 0 II I V ft. LEN C E S
nEF • LI ~IF
VAllIE
tJAr~E
OOFF
nnflO
REFERENCEO AT Uf'JE NIIMBER
(n002!'!))
UJ\tJr.
PAGE
4
[lATE : OR/'ll/PO
S Y MR 0 L S
------------nEE .LJf"F
NAME
AOORESS
REFERENCED AT LINE NIIMBER
0007
oooa
0008
n012
0015
001 A
OO?!
0(175
(WI32
0039
nn43
nntl4
GOI
COO2
G03
G04
C1
C2
C3
Rl
H2
R3
RUF
MnF
0000
onol1
OOOR
OOOE
(l012
0014
0002. OOO~
0007. 0004
0004, OOOR
0012. 001?
0025
0032
0039
0009. 0015, n025, 0027
0010, OOIR. 0032, (1034
0011. on21, 0039. 0040
0075, 0032
0039
PJ\GE
OATE: 0P-/27/no
5
fl0l6
00)9
0024
on?F
(1(137
nOQ7
HJI~,IG
***
J\ L
PI~JlRET
GO;>
on43
nflna
C)
r.03
RI
(1M!)
R2
~IIF
I C ft. L S 0 R T o F S Y M B 0 l S ***
0015 C2
nnnp, GOil
fl03? R3
nnH~
C3
(1(112
0039
I
0071 r.01
0000 MIlF
00n2
0044
()
o
o
NAM l-lflISK
TPASC MAC H,A
nool
nrr?
or03
or(ll1
[Ions
RTJ
AflC *
EMC
EtJT
BSS
ORr.
"HASC
•It • , • A•
CLR
Q
FIRST
BtJFF(96)
BUFF
n009
0000 P
on]o roooo COCI FIRST LI1A- $C1
STA* CSA
0011 POO(l} fiA19
0007
(l(l)?
0013
0014
(10)5
(lP)S
0(l15
n[l)5
roooo OOfiO
RUFF
P(l002 (lA4?
POO(l3 SPl8
POO(l4 noon
LOOP
Cl
FW1
POO(lS
Pon06
Poo07
p(lOn8
00]5 PO{lP!)
0(1)5 PO{l(lA
P[I[lOR
P(ll f' prp[lc
rO[lOfl
poonF
GET START OF SCRATCH
RTJ* CKREQ
NIIM 0
ERROR COUNTER
FWRITE 8,Cl.BUFF,96,B,0.5",1
~I1F4
4cn5
0003 P
nooo
OOO~
OOtiO
(l(l(lP
OO[l(l
0000
r
AnC 0,0
(l0) P pnnOF 08112
(0) 9
WR ITE IN 01 SK. SCRATCU AREA
fXT* "fXASC
OOO£'
OOO~
(lATE: 08/27/80
PAGE
WflISK
51~nc
ClR
C2
FW2
O(l?O
{l020 ron] 0 511F4
(lo?n rO(l) 1 4C05
nn20 POPl2 OOOF P
P(l013 00{l(l
007(l pnOl4 ornA
0{l2n P(l(l15 OOW
POOl6 nooo p
0[17.1 P{l017 onO{l
PonlS 0000
npn ron) ~ I RE8
on?3 roolA ooro CSA
SECTOR Afll1RfSS
Q
RTJ* CKREO
FWRITE R,C2,flIlFF.96.B,0,5".1
AnC o.n
SECTOR AODRESS .
dMP* Lnop
NltM 0
CURRENT SECTOR AODRESS
PAGE
WOISK
OMfi
0027
OP2l{
OM9
0030
PCl3]
OP3?
PP33
0034
('035
{l03f'
EOU
00n9
0004
(lOOO
08·14
OFE2
0] J]
0025
P(l07~
IP?5
PO(lO
3fl:1O
P037
P(l3fl
(lCl3Q
("I("ItlO
P{l4]
{l04] POMB
PP(l2C
0041 P{l020
PO(l2F
004?
0("142 P{l02F
004? P0030
0042 P0031
P0032
0042 PO(l33
0042 P0034
P{l035
0(143
{l043 P0036
0{ltl4 P(l{l37
0045 ro03P
Por39
Pon3A
p{l{l3n
proJC
004(\
n04A P003!)
OOd Q PO{l3E
0050 pn03F
(I{l!'] P{l("l40
0052 ro041
ILSB(9),ITIIO(4)
CKHEO NUM 0
CLR A
POOlS
POOle
POO]O
PClO] E
PClO)F lErIE
POCl?O flCFA
POP?] ECF~
PPM? OflFA
POO?3 {lII;]
PPM!'
P007fl
P{l{l77
PO(l21l
P(lM9
P{l{l2A
DATE: DA/27/AO
2
LLS
2
SAN ERROR
~JMP* OK
ERROR RAOk (CKREO)
LOO* (CKRfO)
HIO -5
SOP PRtJTIT
JMP* EXIT
PRtJTJT AflO =A={l
RETRY TIlE REQUEST
PRINT ERROR MESSAr.E
STA* EMSr.+tJ
L[lO* CKREO
LOA- ILSR,O
STA* SEC
TOASC SEC.fMSr.+l
IlP]~
fllF?
C2(l(l
fiPPfl
X
7FFF X
OOOA
OOOB
~8(l0
EWR
FWRITE 4.ECOMP.EMSG,5,A.O.5",1
54F4
4C(l5
0030 P
00(10
1004
0005
{l0~1R
P
OISP
14EA
00(10
5330
3030
3030
SEC
EMSG
NUM
ALF
0
5.S=0000 0=0
?O~;J
3fl3{l
{lP~fl
("IP44
ficnc
E8flB
C?pt!
0101
00~3
0053 P004? 14EA
0("154 r0043 CPfl6
{lOSS pn044 h2(19
P ECOMP
OK
EOU ECOt1P (*)
ClR
A
STA*
LOQ*
LOASAZ
[lISP
(CKREO)
CKREQ
Inm,O
NOTBSY
NOTBSY LOA* CSA
STA- ILSO,Q
c)
o
PAGE
W()ISK
ro~o P004~ ~40n
SUB
MAX SEC
(l0~7
EXT
PP047 (1123
rn~fl pnP4fl Pp,()]
onFO P0049 PPO]
or()} pnOI1Jl ] COO
EXIT
SAP
RAO*
RAO*
JMP*
MAXSEC
()ONE
CSA
CKREQ
(CKREO)
nONE
SAN ALLOON
OISP
X
pn04F 7FFF X
(1(1~p,
OOfi3
onh4
(lOh4
OOhS
£1065
POl'S
Pon4R 011]
P004C ]4EA
P004ll
P004E
OOfi~ P004F
r0050
OOflS P0(15]
OOhS P0052
P0053
00f)f)
OOf'ti POOS4
0067
0067 pnns!'
onF7 ponsI'
0067 P(lO~7
(10FfI, pnn~p
POOS9
OOflO
PGl1=
[lATE: On/27/fI,O
3
ALLOON FWRITE 4,DONE2,MSG,2.A.O,5 ••• r
54F4
4CO!'
(lOSS P
0000
1004
0002
005P, P
OISP
]4EA
O(1NE?
RELEAS
FIRST.OISP •• 1
!'4F4
~p,nl
nonp P
444F
MSr.
4[45
OOSA (
90)
JlLF
?OO~E
H'll
FIRST
COM = onoo (
0)
OAT
= 0000
(
0)
WnJSK
E0
1/ J
PAGE
4
. DATE: 00/27/80
V A I. E N C E S
OFF .LINE
NAME
VAlliE
nnoo
0075
on25
J
OOFF
JLSn
OOO~
I TIl[}
00r4
wnISK
REFERENCED AT L HIE NIlMBER
(000755)
(000009)
(000004)
(l03~.
0055
0051
PAGE
5
OATE: OA/27/00
S Y MR 0 L S
------------~IAMF
I\nORESS
0007
FIRST
000~
nUFF
0012
nO]3
nO)5
on19
(l020
LOOP
C1
FWI
C7
FW2
CSA
CKREO
(lOOO
00£10
0002
0003
0005
OOOF
0010
001A
00111
OEF.LH'E
onn
0076
0031
0036
0042
£1044
00115
on~p
ERROR
PRNTIT
EWR
SEC
EMSG
ECOt1P
OK
tJOTRSY
EXIT
(l(l~3
f1n~IE
rnl'5
I\U.O(l~1
POF7
nOl'R
Of'tJE7
MSr.
(ln46
004R
OO"d
0020
0025
002F
0037
003R
on30
0030
0(M3
00t1~
ooaA
ootto
0(1 !' 5
P(l5R
REFERENCED AT LINE
M~nER
0007. £1067
nOfl9. nfl15. 0020
0022
0015
0020
0011. 0054. 0059
0013. 0019. 0031. 0032, 0030, 0049
0050, 0060, 0061
0029
0034
0040. on4l
£1037, 0041. ona2
0042
0030
0052
£1035
n050
00F3
001'5
00t'5
o
PAGE
HPISK
OATE: 08/27/80
6
F X T ERN A l S
OEF .l.I NE
(lOll]
on!'7
REFERENCEO AT l.INE NUMBER
VAllIE
tJJlME
0041
OO!lfl
PAGE
7
ItEXASC OO?C
MAX SEC OOll/)
WDISK
*** A L P H ABE T I CAL S () R T o F S Y M B 0
ALlDON Oflfl5
0023
CSA
ERROR
Ofl31
OO?O
FW?
LOOP
0017
PRNTIT (I03fl
OUFF
0008
0063
EWR
0042
UEXASC 0041
MAX SEC 0057
0044
SEC
OONE
Cl
OONE2
EXIT
I
MSG
0013
0067
0060
0000
0068
DATE: 08/27/80
l S
***
0019 CKREQ
C2
ECOMP 0046 EMSG
FIRST 0007 FWI
0(125 nUll
ILSB
NOTBSY 0054 OK
0026
0045
0015
OU25
0048
r-----·)
\
o
onrI
noo?
on03
n004
n005
OOOfi
OP07
OOOP
00n9
(0)0
on11
OO)? poooo ono]
om 3
ono}
00]4 pono] onno
nnJ~ pnon? EeFE
onJ~ poon3 CEFn
nO]7 pnor4 OPFC
no}? POOPS FerR
on]9 pnoo~ FPFA
nn?o pnnr7 4PFA
007] POOOA nPFA
on??
non pn009 !)ROE
or?? poonA or M
oon ponOB 4CF4
PM? ponrc !)prB
nnn pnoon FCF?
oon P£1orE 4CFI
00?3 r£1onr ORFO
£1024
£1024 POO)O 5R07
00?4 POOll OFAf!
0074 P£10]2 4CEO
0024 P0013 5P04
0£124 POO}4 FUR
00?4 POO]5 4CEA
0075 POOl£) }CEA
0026
0(1?7 P(lf1]7 rooo
on?? rOO]A nr42
nn?CI POO]fI OFE4
n03n POOIA nOF!)
0(l3) pon1R n171
(l0~? pro)e orr7
0033 pnnw 0113A
on34 POO) E lCFA
CONVERT flEX NUMBER TO ASC II (2 WORDS)
N.nM RUA
C20Ir. MAC
RTJ* CNVOIG
OLS R
STQ* (ANSAD)
RTJ* CNVDIG
AnO* (ANSAD)
STO* (ANSAO)
EMC
ENT EEAHEX
ENT HEXASC
BSS ANSAD
P UEXASC EOU IfEXASC'(*)
EEAHEX M~ 0
LOO* (EEAUEX)'
LOA* (EEAUEX),Q
RAO* EEAHEX
LOO* (EEAHEX)
AOO* EFAHEX
STO* ANSA"
RJ\O* EEAUEX
C?rIG
RAO* ANSAO
C2DIG
JMP* (EEAHEX)
*
CNVOIr. NIIM n
nn~!)
Pr.~1:::
DATE: 08/27/80
PAr.r.
RHII
CLR
0
US
INO
SOM
INO
H'O
,}MP*
4
-10
]
7
10+$30
(O'V('lIr.)
ft.1!)
On)F (
31)
crM = nnoo (
0)
OIlT = nooo (
0)
PAGE
RII/\
2
O/\TE: 08/27/80
EOtlIV/\LE~ICES
flEF • LH'E
REFERENCEn AT LINE NIIM£JER
VAllIE
tJAME
0(1(10
RJlA
OOFF
«(l0025~)
PAGE
3
n/\TE: OR/27/RO
S YMR 0 L S
PEF.LINE
NAME
ADDRESS
no]O
EEJ\HEX onOl
0011
IfEXASC 0001
ANSJl.O oono
OO)?
n027
CNVDIG 0017
RIIA
REFERENCED AT LINE NUMBER
0010.
0021.
0011
0020.
0024.
0022.
PAGE
0015. 0016. 0017. 0018. 0019
0025
0022. 0022. 0022. 0023. 0024
0024
0022. 0024. 0024. 0034
4
DATE: ORIl7/RD
*** ALP H ABE TIC A L S 0 R T 0 F S Y M B 0 L S ***
A~SJ\O
(1(1)2
CNVDJr. 00?7 [EAHEX (1010 HEXftSC 0011
I
0000
1
S?)W=
RfI\OV.
('~)
\.
.j
)
EVALUATION FORM
('
'-......-/
From _ _ _ To _ _ __
Course/Seminar Name _ _ _ _ _ _ _ __
Date of Attendance
Instructor _ _ _ _ _ _ _._ _ _ _ _ __
Location _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
Please place a rating in the box fer each area and then add comments explaining your rating.
Rating Key
Excellent
Very Good
Good
Fair
Poor
5
4
3
2
1
The Course/Seminar
C")
*
How well did the course/seminar cover the stated objectives?
*
To what degree will the course/seminar be helpful in improving on-the-job
performance?
*
To what extent were the handout materials and visuals helpful in aiding YOllr
understanding of the' topic?
'
*
What is your overall rating of the organization and content of the course/seminar?
D
D
D
D
The Instructor
*
How do you rate the instructor's knowledge of the material and ability to answer
questions?
D
*
How effective was the instructor in presenting the material in an understandable
manner?
D
*
How effective was the instructor in generating and sllstaining in terest in the
course/seminar?
*
How do you rate the instructor's responsiveness to the needs of participants?
*
What is your overall rating of the instructor?
D
D
D
The Facilities
*
How do you rate the appropriateness of the facilities to the topic and means of
presen ta tion?
*
To what extent were the facilities comfortable, well-lighted and heated or cooled?
*
How convenient was the location of the facility?
D
D
D
EVALUATION FORM
Page 2
General Comments
*
What changes in the ~ourse/seminar would you make if you were the instructor?
*
Would you recommend this course/seminar to others in your company or .
departmen t? Why?
*
Please list colleagues or associates who should receive advance notices of similar
cou rses/ seminars.
1)
Name _ _ _ _ _ _ _ _ _ _ _ __
Name
Organization _ _ _ _ _ _ _ _ __
Organization
Address _ _ _ _ _ _ _ _ _ _ __
Address _ _ _ _ _ _ _ _ _ _ _ __
Bus.
Bus. Tel.
Te1.
No. _ _ _ _ _ _ _ __
Name _ _ _ _ _ _ _ _ _ _ _ __
. 3)
2)
4)
No.
Name
Organization _ _ _ _ _ _ _ _ __
Organization
Address _ _ _ _~-------
Address _ _ _ _ _ _ _ _ _ _ _ __
Bus.
Tel.
No. _ _ _ _ _ _ _ __
Bus.
Tel.
No.
*
Should this course be offered at your company site? If so, who should be contacted
to manage it?
*
If we may use your comments in future descriptions ot the course/seminar~ please
sign below.
Signature
(Optional)
PARTICIPANT INFORMATION FORM
·c-. ·
/
.
In order for our seminars/courses to be most .effective, they need to take into account the
characteristics, needs and objectives of the people who attend them. The information asked
for below will assist us in keeping our presentations relevant to the participants and in developing and scheduling new presentations that will meet participant needs. Please complete this
form and leave it with the presenter at the next break.
Seminar/Course Title _ _ _ _ _ _ _ _ _ __
Date of Presentation _ _ _ _ _ _ __
Name _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
Field or Type of Business _ _ _ _ __
Title _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
Years of Experience _ _ _ _ _ _ __
Business Address _ _ _ _ _ _ _ _ _ _ __
Supervisor's Title _ _ _ _ _ _ _ __
last professional degree _ _ _ _ _ __
List your three primary objectives in attending this seminar.
1.
2.
C)
3.
Will this course/seminar be credited toward certification/training requirements?
Rank in order of importance in your choice of this seminar session.
Instructor _ __
Date _ __
Location _ __
Employer's Preference _ __
Previous courses/seminars attended relating to this topic.
1.
2.
3.
Topics for additional courses/seminars in which you would be interested.
1.
2.
3.
(
"1,
/,
PARTICIPANT INFORMATION FORM
Page 2
What trade journals/magazines do you regularly read or subscribe to in order to keep abreast
in your profession?
1.
2.
3.
How did you become aware of this course/seminar?
Schedule/Catalogue _ _ __
Direct Mail Brochure _ _ __
Recommendations of Supervisor _ _ __
Recommendation of Colleague ______
Corporate Training Department _ _ _ __
Other ____________________
COMMENT. SHEET
MANUAL TITLE:
PUBLICATION NO.:
CYBER 18/1700 MSOS ANALYSIS LISTINGS
QA4020-1
REVISION:
B
NAME_·____________________________________________________________________
COMPANY: ________________________________________________________________
STREET ADDRESS: ________________________________________________
OTY: _ _ _ _ _ _ _ _ _ _ _ _ _ STATE: ___________ ZIP CODE: __________
This form is not intended to be used as an order blanlc. Control Data Corporation welcomes your evaluation of
this manual. Please indicate any errors, suggested additions or deletions, or general comments below (please
include page number references).
w
Z
:;;
C\
C)
z
0
....
c(
~
::l
U
ci
v;
::j
~
Q
w
~
Z
Ci:
Il..
C:I
0-
.....
....... 1
~
>
w
eo:::
0~
M
c(
<
NO POSTAGE STAMP NECESSARY IF MAILED IN U.S.A.
FOLD ON DOTTED UNES AND STAPLE
STAPLE
STAPle
FOLD
FOLD
----------------------------------------------------------'
NO POSTAGE
NECESSARY
IF MAILED
IN THE
UNITED S1Ares
111111
-
, BUSINESS REPLY MAIL .
FIRST ClASS
PERMIT NO. 8241
MINNEAPOLIS, MINN.
POSTAGE Will BE PAID BY
e
... .,;
...
-.-J. .....
......
----------FOLD
<:>
Z
0
~
CONTROL DATA CORPORATION
National Coordinator
Bloomington Facility (MNA02B)
5001 West 80th Street
Bloomington, Minnesota 55437
Attn: Curtis Vicha
w
S ('
~
•
------------'-------------------------------------,
FOLD
;:)
u
"
I• • • •
I
CONT~LDATA
t:J ~
\::I ~
an education service of
CONT"OL DATA CO""OR,ATION
CORPORATE HEADQUARTERS
P.O. BOX 0
MINNEAPOLIS, MINNESOTA 55440 .
SEMINARS
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.3 Linearized : No XMP Toolkit : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37 Producer : Adobe Acrobat 9.13 Paper Capture Plug-in Modify Date : 2009:08:26 00:29:38-07:00 Create Date : 2009:08:26 00:29:38-07:00 Metadata Date : 2009:08:26 00:29:38-07:00 Format : application/pdf Document ID : uuid:7738e3e3-a984-477c-ac84-54e4ce824fad Instance ID : uuid:7ce06a87-7d30-45fe-b92a-ab16afb5ee87 Page Layout : SinglePage Page Mode : UseNone Page Count : 313EXIF Metadata provided by EXIF.tools