17_UIO 17 UIO
17_UIO 17_UIO
User Manual: Pdf 17_UIO
Open the PDF directly: View PDF 
.
Page Count: 77
| Download | |
| Open PDF In Browser | View PDF |
i"~
·-"lilllll1_ _ •••• _iII.U'O 1'1'1
IiIt'I!!IRiUI_nIRI.Fllana
1
UIO
() _.................................... ......... ......................................................... .
"
"
. .......... "........ ·....~s()
o
0;] .-.. . -.. . -.. --.. . . . . . . . . . . . . -.. . . . . . . . . . . . . . . . . . . . .,. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .-.. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
c .............................................. _ ...................................._ ....................... c................................................................................. c.................................................................................................................................................................................................................................................................................................................................................-,............................. -.-....
0
ASSE f"!3LER/OS3
0:;
(j
()
-()
()
()
o
o
()
()
.',
-0
~
o
·0
()
..... ____ , 0
o
.0
-0
o
o
o·
o
·0
....
-
·0
o
o
o
V1.U 09/21/74 2229
ASSE~18LER/OS3
P II GE
UIO
3
EXT
EXT
EXT
EXT
EXT
T55
156
157
158
15S
160'
'EXT
161
162
"'163
.
164
EXT
EXT
EXT
EXT
165
()
EXT
EXT
TVIN1T
TVREAO
....... ·-TVWA IT .
T VWRI TE
T WFM
r"WRITE
TxsrARr
TXTor AL
UD3ITS .
o
o
()
170
"'f7r
07773
07771.;
. u ODD O·
00U40
·············oI~n··
172
EINl
1 7 3 1 MPURE
174
NPU
175
PFR
GOOOO
. (lOa 00'
00000
00550
"00554
PF ~~
,JMP
176
177
178
RIS
EXT
VMNGM
X FLAG
Z EROPG·· ......
ZROPAGE
EQU
17738······
EQU
EQU
Eeu
EQU
······000008·
180
.. KPF8 .
1~i
00776
x
o
··X
X
X
o
X
X
X
X
X
o
o
182
183
LPg
:['H T
188
··159
190
191
. ·. ··'1'9'2..
65
65
67
000 a
000'3
oooa
5508
····5548
£QU
EQU
bE
6··9··
70
."'EQ U
~
o·
FILE CONTROL BLOCK OEFINITIONS
............"1:
.¥
cap
.. CRR
ORE P+i
EQU
. ·.. E QU. . . . . . . . . . . . . . . . . . . .
'+ .................................
• ¥
• ¥............
:.;. ....... " ... .
•*
•
• >;,
84
8..5
86
. · .,. . £),o·o .·o's. .·. ,· . ·. ,. . . . . . . . . . '....... ·......·.·. ·. . . . . ·. . . ·. ·" . ·····8..8 .". . . . . . '...............
"·8I.:K"F~"
. . . . . " . ,. •. . . . EQ!+ ." . . . . . . . ."....·,'·H, . .,. . . "'". . . . . . . . . . ,. . . . . . . . . ,.
.¥
EPP
...... 93 ....
c)'·
0"" . . . . . . . . . . . . . . . ..
90
gr
92
4.
.>t-
.*
94
00007
95
,· . ·96 . .·..
97
:
......................... "
.>f-
.•
ACCCUNTING WORD (MUST BE 0)
•
'LOAOP 01 NT'S LCOK'·
"f".
CORE peINTER IF NON-ZERO
•
~.
IF 81T23
1 CORE BLOCK
HAS
BEENWRITrEN'INTO
..... ............. ..............
4•
BLOCK NUMBER OF THE CURRENT BLOC·
CURRENT·POSIT ION POINTER
.¥
(REL. Fosrr. WITHIN BLOCK CSP) •
•
811'23 SEZ READ-ONLY
. . ··8I122·SEZ ·AT····L OA f:J'p 0"1 NT"
BIT21 SEZ END OF DATA
4
~ARK JUST ...............................
READ
•.
.. BIT20
..... ..... SEZ
..... FILE
.......;';..
8IT18 SEZ 8INARY RECORO PROCESSE¥
BI117 . S£Z A8N ORMAL/UNAVA ILABLE~.
8IT16 SEZ ADDRESS ERROR
"f
8IT15
SEZ
SAVED
FILE
•".. . . . . . . . .,. . . .,. ,. . . . . . ,. . . . . . . . . "'. . . . . . ,. . . . . . . . . . . . . . . . .,. . ,. . . . . . . . . . . ,. . . . . . . . . . . . . . . . . ,.,
NUMseR'''' 0 P -BleCK S' 8 EVON !3........... . .
THE CURRENT SLOCK
•
END POSlrION PGINrER
•
. alT22 S EZTHFF IL EHASC HANGED>;'
8IT21 SEZ POSlrICNER READY
•
.SIT 20S EZ DES.J RUCTIVER£ AD
•
FILE DIRECTORY
•
BITS 15-18 CONTAIN THE HT
4
.·....... BIT·.S .. O.Q-:1:4 . CEl.Nr . A.IN . . . ENO . . . PCSITIO. N . . •
rOTAL LENGTh IN BLOCKS
•
o
0
=
.... ,.. ,.,
4
4
4
A CWORD
00003
00 DO 1+
0 6
o
•
.4
69
C)
.~
... ; >f..... .
87
o
• • • • ¥¥¥ • • • • • • • • 44 • • • • • • • • • 4.4 • • • 4 • • • • • • • • • ~ • • • • • • • • • • • • • • • • • • • ~4.4 • • • • • 4
;'"
.
....
. . . . . . . . . .......
..:t-
()
o
FILE .. BLOC K SIZ E (IN·· WORDS)·
510
,. . ·.,. .·.·. +. ,0....
C)
'0
NUMBER OF PAGES PER USER
32
BIT22
N'8IT~22
E008
EQU
BH21
NEDDS
EQU
NBIT2!
F 1'rB
E Q0
811'20
2RPB
EQU
BIT18
BIT17·······............................... .
.. AUB
..EQU
AE8
EQU
8IT16
SVB
EQU
8IT15
·...... ·..·......... , ·. ·. . . PC ."S DEp·'. . ,··. . . .···, ,.... ,. . . . . . . . . . ,. . . . .,. . .
.NL·re' .. ··
184' '.
155
186
()
77748
EQU '.
EQU
EQU
1 7 S R O S "EQU
\..1)
~.
V~lMSAVE
""'16 a " E X T '
169
I
V 1-11'1
-EXT
166
167
:),."
."
.
m
EQU
7
193 ..·. . . ·. · · ·..·. · . ·. · . · · · ..·. · · · ·..·....· .............................................................................................................. .
·194···
.
i
'
o
o
o
o
..................................., ... ,.., ... , ..................... '
o
195
00001
GD002
,.....!} a. 0·0,3, . . . . . ·,··
OOOOD
o
196
197
198
Xl
X2
EQU
EQU
1
2
200
CNBLK
EQU
0
.................. ,.......... ............ . . . . . . . . . . ,. . . ,............. ·1·9 ·9. .,·, ..............,. .". ,. · ..X· .3. . ·. ·..•• ......". . · . ,. ~·£Qu··,. ' ...... ,...~ '" ", . . .:·. 3··,. ,....... ,,. .".............". . . . . ".".........'......................."". "..... ,...""
. "
o
o
a
(]::
oJ
ASSEMBlER/OS3
i ()
00000
00022
00036
00004
'0010U'
00060
00122
00140
··04fJOO
00001
I
'0 o· 002
00003
OO(J'()4
I
00005
00006
1 ()
1
!
()
I
I
I
I
I
I
I
"'0 Door·
00010
000.11
000 12
OOD13
I ill
......,
I
0
·C·PPX·""
00000
00001
i CJl
I~
uro
Vl.0
....................................... [) 0014 .
00015
.........................,.'........... , "., 00016
uo 017'"
.
·········E·QU····,····
PSA
EQU
CLOCK ····EUU
LEVEL
EQU
i'l HlI NRE C EO U
'MTPFAREAEQ U·· . .
~ISFPF
EQU
T VP F ARE A EQU
PS"········· EQU
PFLOC
········CORE
EQU
EQU ....
, lOi
·'0·'··""
o
,·223
368
it
"""'1' tJ 08 .. ". ,..•. ".. "".". .
0608
1228
.......... '1408
MINIMUM RECCRD LENGTH
""PAGE 'FTLE"AREtl'FOR"MTPAGE FILE AREA FOR MSF
PAGE FILE AREA FOR TV IIC
PAGEFILEAREA FOR VIRTUAlHEMORY
0018
······"PFLOC-t<2$11
0313
CARD
PUNCH
···,·CARO·REAOER
MAGNETIC TAFE
0613
TELETYPE
0 7 i : . 1 X / Y P L O T T ER
108
ONLINE INCI~ERATCR
i138
~ ~..
2~ ~'[JR~S'~'~ ~t SSF ICE
..... 'J. ..... .
Ie)
"I.."1- ...
lJ.
.... ;;.
:If
:If
Jj.
:If
FUTURE INPUT FOR REMOTE SATCH
·USEROTSKPACK·
:If
158
PAPER TAPE PUNCH
:If
168
(NUMBR OF HARDWARE TYPES) + 1
·"'-178"'· ............................. ····· .. ·..··········MA·S K'FC R··THEHAR OWA·RE·TYFE" "'."..........,..... .....".
·-148
;(])
':';:()
013
FILE
0"28··LINEPRINiER
·048
058
....•...........•.•......••..•
, ,
.~
l.
....*
l-
e)
"'!,",M
"I-
0
Q
Q
0
0
0
0
0
0
0
o
Ct
o
d'
o
0
o
0:
o
0
. . . . . . . . . . ,. . . . . . . 0
0"
o
:l['t
L4;
o
0/
o
ASSEMBLER/ass
j
()
217
PURE01
EQU
""218""""",, TDLEPCEQU
LOA
2iS
220
221'
221+001
221+U02
" 226
' ,., ".,' "
227
227+ 001
AZJ,EQ
231
232
233
SCREAM
~-1
XOA,S
777778
IJ 0 . . ,"',., ,,",. .,., '. ~-41.Xl·
UJP
IoLcPC
NFl'lBRP 'OCT
7'2777777
F,MEO.08, OCT,.,.
1..400.0,0,00
CLEARCON
LPEOoB
FPSV
EQU
OCT
235
OCT
236WRi4ASK·OCT·
237
CRMASK
OCT
238
CRMASKX
OCT
234
~
""" ENT
.' ?O 08 1 Xl
TIM
77d,X1
TMI
,r7B~.X2
I J o " / - , X2
229
230
~
NFM8RP
30000000
40100000
42377777 '"
37700000
BEGINNING OF FURE REGION 01
THIS IS THE· IDLE PROGRAM
DO WE kANT THE NOISE MAKER
,;/ ,
TRANSFER INDEX 1
.... T a JNlJEX .;2 ..... .
····LOOP8tlCKTCKAKE NOISE ...
"NOT
I, .
(FMR+8RP)"
FM.Rt.E 008 ..
LP+Ecoe
FP+SV 8ITS
·NOT·····(·LF·+EOO+FMR+·8 RP+AIU.) ....
.. ()
.•.............•. ,.....:,
........
....:
41077777
, ......" ......... I
I
()
.<)
0
,,:1
I 0
I
o
0
..... , . ,.............. " ...
0
, .............•
'
.....
,..
.. .. .
o
0
o
0
(""
U,
o
o
o
o
0'
o
0
0
"
1(:
0,;
o
0'
o
Oli
o
0'
0
.,--
o
1;
Oi'
o
Vl.0 09/21/14 2229
ASSH18LER/OS3
CL
243
24,4
245
246
247' '
24 e
249
~'
1""
(j
l~
J
250
J
I
FILE INPUT
';'J.'
~~
r:,
UIO
6
T;';" ~(~<' >J.'>,'" ';.'.';.>;:¥'f.'>;. lI·'>;.'.....
(])
f
PAGE
()
>t-'>;.>j."iif::j.'f'~' >f.>;:'~'>t-'>;'
>;">j.!f "T'>t-'>t-~;. >;.~'i;.>;'.>;'~'>;' >;.'>;'>;.>""::- ~.~, >;~;;.>; .'''10 "10""
¥:f. :1#''I>''''~ iI-:f. ¥
•
;,;,
•
~,
4
. FTL E1 N P U T " " " , V ¥
T5
USERS A REGISTER
CURRENT" AODRESS"REGISTER
F5
F6
RECORD WORD CCUNT
16 .
Y~ER~_QREGISIER ..
u'w'"
,252
'"
253
FINPW
EQU
~
00020
254
LDQ
CPP,X1+CNBLK
GET THE STATUS heRD
""0 fJ 0'2'1' "'''',2''7 0'7'7'7"t7"'''X'''''' '"'''''''''''''''''''''''''''''''''''' "'"''''2'55''' ",'"'' " '"'''''''''''''''''''''' """" 'to L
"'A'U B""""""" "','''',''',,'''','
uCHECK'FOR"A8N OR MAtIUNAVA'ItABtE"
00022 03104766 P
256
AZJ,NE
IOSMASH
SNASH THE FINK
00023 27077777 X
257
LOL
E003
CHECK FOR E~O OF DATA
'00024'0 3 T O S 0 0 3 P 2 58'
AZ J,'NEZRDE'OO
JUMP"IFENDOF DATA"
00025 27077777 X
259
LOt::
NLPB
CLEAR LOACPOINT! FILE MARK,
00.026 3700 O , Q , 1 1 " , P 2 6 0
"LPA",NFM8RP"
..... AN 0 SIN ARYRE C DKD PROCESSED
00027 40100004
261
STA
CPP 1 Xl+CNBLK
8ITS A~D STORE IT BACK
00030
00705064 P
262
RTJ
SAVe
SAVE INDEX REGISTERS AND FAULTS
. . '''CORE8tGCK'PC HnE R"TDA
"00031 20100002
263
'"tElACOREP,Xl+CN8LK'''
OJ032 03100035 P
264
AZJ,NE
·+3
JUMP IF IN CORE
00033 0077777! X
255
RTJ
FIX
AND
THE RES
FILE
BLOCK INTO
ITS" READ
ALREADY
ERVEO'"''
........... . 1T
00034' "JfO'O'(j036"P
'266'"
UJP~+2
U0035 00777777 X
257
RTJ
RESERVE
RESERVE THE CCRE BLOCK
,00036" ,2,Q,10,0,0,04
268
LOA
""C,PP"Xl+CNBLK "
lOAD,THESTATLSWGRO
Oa037 53600000
TAl
X2+CPPX
00040 15200003
INI
3,X2+CPPX
ADJUST FOR THE POINTERS
, """"""0 a04i"'202 u ' s 7 ' 7 7 " ' " tOA"""" . 'Mm''"'''e ORE:-i',X2+CPP)(''''''''''''LOAO''THE'I'NTERRE EOR O·······'·GA P"W OR 0""
00042 03300215 P
AZJ,LT
FINPW09
JUMP IF A FILE MARK
00043 030U0234 P
AZJ EQ
FINEOD
JUMP IF THE ECO WORD
"'''000'44'' ''37'OOSi35P'"
'CRFINPWLPA'"''''
8ITi6MI"
. LEAVE '.' THE RECCROlENG TH
00045 40377777 X
275
STA
F6,X3+PSA
AND STORE IT INTC F6
,00046 ··2 o· 0,/',717,,7····,X···
276"
LOA
"BRP8,,,,,
LOAD ThE·····8TNAR·Y·····RECORO···81T·,·
00047 37203777
277
LPA
CORE-1,X2+CPPX
AND IT WITH THE RECORD GAP
00050 34100004
279
RAO
CPP,Xi+CNBLK
OR IT INTO THE STATUS WORD
·····,··""00051i1'177'7'77···
·377773·"'·······"279···~EeHA''''''''t777778'···
" . ··,···········MItSK"FOR"'STXTEE"N"8'ITS "', ', " """""""""""" """"""',"., "'"'''''''''''''' '"
00052 37377777 X
280
LPA
T6,X3+PSA
MASK THE USERS G REGISTER
W6g~~ ~g~ ~g~~~ ~..
·~~J11~,Etr "l~N~~O~SA
3~~pSl~,RfH~Iw3~,gKCOUNT WAstER'b
00055 21300045 X
283
LDQ
F6,X3+PSA
LOAD THE RECCRD LENGTH
OOfJ56 037DG060P
284,
"AQJ,LT
,.. ·:'i:··+2·",,····,····JUt1p······IF rHE\~CRO·· COUNT IS LESS
285
¥
THAN THE RECORD LENGTH
00057 13000030
286
SHAQ
24
PUT THE SMALLER INTO A
oQ060"47205i50P'
····'28('''''··,,·,
·····""'sT'r~"""TENP2·fX2+CPPX·
"""""SAVEIHECURRENT"'POSI'TION"
0006i i4200063 P
288
ENI
¥+2,X2
ENTER THE RETURN ADDRESS
00062 Q1003212 P
2ag
UJP
RCHECKB
CHECK
FOR ILLEGAL WRITE
29'0
.
"'UJP
RERRORA'"
WE GOT""ONE'" . . ..... .......",," "''''''
0']D63 "01004771 . p'"
00064 542Q5150 P
291
LOI
EMP2,X2+CPPX
RESTORE THE CURRENT POSITION
D 0065203777 77,X
R"X3+PSA,
····ENTERFROGRAM"STATE",
. 292,,,F I,t;.P,W 0··1.,,····· LO A
00066 7763t~OOa
293
ACR
00067 53lt3Q036
294
TIM
EVEL,O
0 iJU7Q" 0 iOj(J07'1P'
""""2(J9"'~""'"'' "."""""''',,,'''''',,',,.,, ""'''''''''''''''''''''''U'jP
'+i"""""
00U71 14600073 P
ZSl6
ENA
''<+2
SET UP F4 FeR THE RETURNS
U.OO 7? .,1+0 377]]7 X
.~.~~,.S,J8.,.. .
P,lt,X,;3±PsA,,
00073 20377777 X
LDA
SELECT,X3+PSA
299
RESTORE THE C~8LK INDEX
00 074 ,5:~ 50000 Q
,,300
·······.""TAT.
X1+CN8LK
00075
20300055 X
301
LOA
F6,X3+PSA
LOAD THE RECORD WORD COUNT
00076 03000210 P
30'2
AZJ,EQ
FINPW08
JUMP IF THE RECORD IS FINISHED
"""""""'''''''''' '"30'''3''''' ,,,,,.,,,,,,,,,,,,,,.,,,
''''''''',,'' "'''SHA''Q """','"
'''2'·4'
'00077 . i3ilOOtl30
00100 203Q0053.X
304
LOA
T6,X3+PSA
LOAD THE USERS Q REGISTER
0010i 03D00167 P
305
AZJ EQ
FINPW06X
HAVE WE MOVED ENOUGH WORDS
3U6'
.
....".,
""""'"AQJ;'GE'''''
'>1-+2
,
.,
.
00102 0360·0104 P
00103 13000030
307
SHAQ
24
,308
,,,T,,lA
........ X2+CPPX
00104 5320()(lOG
.CHECK, THE NUM8ER OF WORDS" LEFT IN
00105 15476777
309
INA,S
-WPF8-2
THE FILE BLOCK
00106 03200162 P
310
AlJ,GE
FINPW05
GET A N
FILE CORE BLOCK
"""F'lNPW'0'2"Z''''''X'O''A'',''S'''''''''''''' """"""'7"7'7'7'7'8'''''''''''''''
00107"'1647'777'7'"'' """""""'.,,,,,,,,,,,,,,,,,,, "'"""'"''''''31'::1:'''''''''
·""'TFNEEO
00110 036U0112 P
312
AUJ,GE
~+2
00111 13000030
313
SHAQ
24
o DT122437777T'X
3"14'"
LCA"F5,'X 3+FS A
CHECK THE NUMBER "OF WORDS LEFT"
00113 17603777
315
ANA
37778
IN THE PAGE
00i14 05600001 ...
,,31~-~SG
1
SKIP I F"N CTW CRD, 777778
00115 14-600001
317
ENA
1
MOVE 1 WORD
318
AQJ
~+2
001i6 03700120 P
, ""'"'''''''''''''''''''' "3
00117 H16QO'Q 030·
00120 13077776
3
COMPUTE NUM8ER OF PAIRS CF WORDS
00020 P
21100004
()
1 0
0
()
0
0
0
'4:",.",.
.....
()
,
:()
'0
o
o
o
.
0
0
0
o
o
':-0
V""""w
0
!
Of
;0
! '
"'.,.,"""',
0,,,
0"
0
0'
"
,.~.
__
e
• ______ "
".
¥,."_
.•
""
'eo , 0,,",
,"_."
______
, , __ ._." " . ,
"
. . . __ " . , , ,
__ •• _ _ . . . . ,
I
~O
,-,0
::0
"",'"LI'''''''''''''''''''''''''''''''
-3D,:
~lb",
0
1
o
o
ASSEM8LER/OS3
00121
00122
Vl.0 09/21114 2229
()
00133
2030~130X
00137
o
o
o
o
o
"-, ,
00141
00142
00143
00144
15200001
. oo141····P ....
1200DOOl
16477777
3431]0124' X·
34300125 X
00145 P
D0145 . '2520 40 GO
00146
55400000
··00147 .. ·45700134 X
00150
55000000
00151 14600002
00152"'34 300J:4:7 X .
OU153
15280002
00154
02500145
0015501700140
00156 .]] 67.0000
00157 16600001
00160
77660000
00 161· 010 04: 537 P
00162
000001.63
00163 "00704644 P
00164
00700033 X
.. Q0165-1~2nna02
00166 0100U065 P
"00167-'0 ODD 0:1:70
00170
0017:1:
QOIT2
532DO'000
O±~?'-B±~~~2~2-P
00200
15477001
00201
05400776
324
325
'326
327
328
'329
330
...... ······331 .' . .
0 ..
00207
.
3i'4
37 '5
376
371'"
378
37'S
53200000
00213
15477000
0" · · . · · · · · . ·. ········gB~±~ ·······g6~gE~~r·
····,·",,·. ·········00214 . . ····0001}0226
0..' ....... . . . . . . . . . . . . . . . . .
380
.3 8 j.
382·····
X
383
384
385
01000200 P
00210
0 0 21 5
20 0 7 777
002161560
ouo 17
00217
34100004
386
.... .3JIL
388
389
"39'0""·"""
x . . . . . . . . . . . . . . . . . . . . . . . . . . . . . "...............................
i§
39 ~3""· .
394
. D0220 .... lTI77777
3]177 .. 3....395.
0'······
00221 37300171 X
396
00222
40300221 X
397
..."..~., . ·,. . ·O. {j ..2·2. 3 . . ·" . OS. 20,,1···(}jJO····<....· .... ·• ,., ........,,,...
........... "'< ..".. "3 -9,8,··" .. ··· .
00224 01000564 P
399
o
FINPl-103,Xl
~UMP
-1
IF WE
CA~
MOVE ANY PAIRS
DECREMENT GUNTER WORDS
. MOVE ONE WORD INTO THE USERtS
i'1EMORY
F6,X3+PSA
T6,X3+PSA
CORE, X2+CPPX
A9/ROS
. F5,X3+PSA
A9/RIS
; ....
. ;":1:
:.'
'I/'
.()
",
-bOAG THE ADDRESS REGISTER
....... F5,X3·+PSA -
1
F5, X3+PSA
-.- ·. ····' .... 1
"ASG
r . " ....
.......... "'- ..- ....... "
a;
i
0
c
".,
8100022£ P
D0203 4Q300175 X
U0204
00704644 P
···, . ·. .·,· . . . .···· . 0020 5tH)? 0016 4">;;
2030020~
::;WA
. . ,0;
THAT CA}l BEM 0 VEIl
SKIP" IFNf' .....
... IN.A.L;:; .. ,.
"'''''',.,.,
0
0
0
".,.,'
< .................. " . . . .
"
............. " "
•• "
0
........
,~,._
,
••••
• ••
~_~
••
0
e"" __' " ,
,M
•• "
••
0
Cl
0
"
. . . . . . . ."." •• "
•• , . " "... , . . . . '
. . . . . . . , ..
' w... , .,'"...
....,"••
""<" ..
0
0
ASSEM8LER/OS3
V1.0 09/21/74 2223
o0'22S M T 1t M6MOlfOOO
00226
4~10000L~
o0227 .. O· 0 .7 0 L}·b it it . P
00230
Dl0UD565P
··0025"1: .. 15 If17776····· ..···· .. ·· ..·
00252 4L~100004
00253 01000~64 .~ ...
00234
20000023 X
0023514 2MOD ou
OM
00236
M .. ···M···············
J1000217 P
FILE INPUT
8
PAGE
UIO
4 o n M M T f I ; t \ · ..
o
401
FINPW10 SWA
CPP Xl+CN8LK
.. REWRITE), ....... .
·402 . .....·..
········RTJ·
403
UJP
REAORTN
4U 4
M'FINPW12rNk,S' .
'4ilS
'-'1'"
CPP,X1+CNBLK
4UE:
FINPW13 SWA
4U7
UJP
"MREADE)(
408
409
FINEOO
LOA
EOOd
410·
0, X2
MENI
UJP
FINPW9X
411
""..
. " . " • • " " . . . . . . . . . . M................. "M
MM
M''''
,;
.M
MM.M .•
M.
. ••
C])
STORE THE CURRENT POSITION
00 THE8C a KKE EFI NG
POI NT' M'fOMfHE'NEXTW ORO MC·OUN'P······
WORD
M ••
M
•
••
M
SET THE EOO 3IT INTO THE STATUS
MGO·fTXM THE"MMlJSERSMM GREG ISTERAND
()
ST AT US
()
()
o
o
o
o
I
"M"..
. • MMMMMMM
.•.•.••."
.M .....MM.M.MM .........
MMMMM
I
o
,0
MMM
o
.M••••• MMM . . . ...•...• "
•..•.••••" .
.M." •••••• M •. M....... ...•.•..•.•....• •.•
o
M .... ....... .
o
()
c)
o
o
o
o
q.
("'I
................ M"........................
• .••.•......M.M •.•
MMMi'M
• MM MMMM • • MM •...•..•.• M ............... MM
....•..•.. ..........
." .•.....•.. .••••.......•..• ...•.•..•.•.•..•.•.•.
MMM"
M'
'-"
0'
0 ..
o
o
o
o
o
ASSEMBLER/OS3
.G' ;
V1.0 09/21/74 2229
PAGE
'f
415
lfiE
GJ
Lll
()
I
'j
421
422'
423
424
425
()
426
,"',' """""""42 7
i
1
II
II
I
\<'>;. >;. >;. >;'J;" >;.~. >;. :;. >;. >;.':,;. ¥- ¥¥ 'f '>J. >/->;. ¥ IJ.>J. >J.>.' lJ. >J. >;. OJ. >;. '+ >;. >J..'f
428
0
429
,',' 430
431
4:52,
()
00237 P
"435<
436
0
()
0
,
0
.......
00253
"l1025 If
()
00256
0
00264·40300206 X"
00265
012;JOOOO
0
00256" P
2i10flOOl~
00266
00267,
00270
00271
00 272
00273
0
0 ','
1,7777777
51005136 P
31100005
14200336 P
00276
30100007
00301
U0302
00303
311U0007
00307
21377777 X
00277
14Tr77?7
o0300'0360032tP'
211U0004
12477776
00304
05740000
.00305.. 15377774
00306 30377777 X
0(;
"."',",.,,,.,,, 00310,1:,3086030""
00311
03600330 P
0
00312 54377777 X
OTI313'2D377777'X-
00314
00316
00317
00315
0:
!';
Q.
~~""<
"FOUHi
"SET
452
458
45S'
460
461
46Z
It
'EQU'
'~""'''''''''O'0·;32'O·······''·
03100317 P
11+600006
4030UJ13 X
2U377777 X
83'30"O'32,Lv'P-"'"
00321 P
0
".",,,,,,,,.,--
UPF5 ... E(}U
LO ~\
SWA
"SHA"
AZJ J GE
'XOA
AOS
ECHA,
LPA
AZJ, EQ
",""'''''''''',,'''' '''S1' A'"
UJP
····FOUTHZ
Tau
LOQ
. ANQ
AOA
INA
"SHA'!}'
OVA
469
SBA
TNT
4TO"····
471
472
472+001
472+002
lJ.
LOA
EPP,X1+CN3LK
CHECK FOR DESTRUCTIVE READ
SHA
23-20
AZJ ;TT" ,
TA3'ORT"
LOA
CPP,X1+CNdLK
CHECK FOR FILE-FRCTECTION
AZJ, LT
""FPV
"'" "",JUMPIF" PROTECT VIOLATION",
LPA
AUB
CHECK FOR AENCR~AL/UNAVAILA8LE
LOQ
TFL,Xl+CNBLK
LOAD THE FILE LENGTH
'eSErS"
0
'''''''''''' ,",""",,"',",",",," SKI p' IFZ ER C" L £1\ GT H ' ' ' ' ' ' ' ' ' ' ' '
AZJ,NE
IOSMASH
KILL THE FINK
RTJ"
SAVE
SAVE INDEX REGISTERS AND FAULTS
""" EN'I '''',,····,,'''''''''''Fourw Z,'X2ENTERTHE RET URN ADDRESS .......... .. .
GSA
453
'454
455
,45&
457
""""""" "",
0
'451
37777 ···.5
,',,'"""",
"
15600002
"130777lfl '
00276 g
0
>.<
'f.,
450
53040000
[J0274
00275
0
""""""""
>j.
446"
77670000
()
OVERCHEC
ROUTINE TO CHECK FOR INSUFFICIENT FILE SPACE
"""'5~} '§~J~§~E~PORE S,S"X2,
WILL PUT INTO CONTROL MCCE IF AN ERRCR OCCURS
Jf
445
1550 [j 001
00260 77660000
0026111177777
00262 37300222 X
00263
03005DOO P
'>J.""'''''' ,
"..
""'443
444
,00252P,
USERS A REGISTER
CURRENT ADDRESS REGISTER
USER.SQREGISTER'"
'"
GOUNT OF WORDS LEFT aT MOVE
>J.
>J.
442
03200261 P
··00257
;,;.
. lJ..,
44D
1200001'0'"
00255
>;.
'~C"
441
20377777 X
44300152 X
00252
T5
F5
f6'
F6
>".
437
447
,448
449
'J. ,+' >;.¥ >" >;.'~v-:v. '{>;.1.;.>;. J;.'o;.>.;. 'Jo' Jf. >.;. ¥O' >j. >;::;'>;">J.>;.'~ >;. >;. ~
~
'43i3' '
439
00247 03104766 P
00250
00705064 P
00251I4200265P'
'+~
FOUTW
FILE OUTPUT ROUTINE
,,¥ ,
434
20100006
00240 12000003
00241' 03304673 P
00242 20100004
00243
:)3304763 P
00244 37000021 X
[)0245
21100007
00'2460 45UO 00 (} .
00237
>:- lJ. J,p,;. >f ¥,.,
>J.
e
420
~.
i
~<
FILE OUTPUT
417
419t
UIO
9
0
j",
,~, ~
()
0
........ 3:.,
T5,X3+PSA
F5,X3+PSA
0
LOAD THE USERS A REGISTER
SAVE THE LOHE~ 15 8ITS
" ' " ' ' . SA NK'BTT ·'TO·'T HE··· SI
JUMP IF THE SAME 3
SI-HT CR t'I£MORY dAN KS'
8'
"",i.,."., ••• ,.".,.,.
~+4
DOOGUf
0
1··77.7.,778·
0
T5,X3+PSA
ZWCZERO
'''FEf;"X3 +PSA"·
0, X2
0
CPP Xl+CNt3LK
7"l7178
LOAD THE CURRENT POSITION POINTER
ST AT LlSBITS
ADO IN THE CURRENT POSITION
COMPENSATE FOR THE I-R GAP
'PR EPAREYOOIVrB E'
.. "", ..,.. ,.,,,..
DIVIDE BY WORDS PER FILE BLOCK
SUBTRACT BLOCKS TO 8E FREED
ENTER THE RETURN ADDRESS . .
...
MASKOFFTHL
2
-24"""""'"''''''''
KWPFB
8LKR,Xl+GN8LK
'OVERCH06, Xl" ..
0
0
OVERCHEC .EQ.U.
.. ,.>1-.....".., , ' ' ' '
,-----"",..
.''\
ADA
TFL~xl+CNaLK
COMFUTE ACTUAL LENGTH OF FILE
\,.J
ENQ
777(78
MAXIMUM LENGTH OF FILE
"472+003"'"
'''AOJ',GE''''w . av ERC Hot"'"''''
""""""J tJ MP'I F'OVER-T Hc""'MAX'Iit-' UM'''S I'ZE
472+004
S8A
TFL,X1+CNBLK
RETURN A TO AS BEFORE
473
LOQ
cpr. L .......
X1+CN8LK
LOAD
THE STATLSTO'81rT4"
HeRD
0
474
3HQ';;;1
"'...... .......
SA
VE'FTLE"'BIT"
475
QSG
400006
SKIP IF A SAVED FILE
,476
INL=3,X3±PSA, ......AOOIN{TF81.KS~SF8LKS),·.,""""".,
477
ADA
SF8LKS,X3+PSA
ADO IN THE TOTAL FILE SPACE
0
478
LOQ
SF8LKLIM,X3+PSA
LOAD THE ALLOWABLE NUMBER OF
'" ",,·4,7- g..
",' ,'", ""' ..' "., ...,. , , .."'''''''' '" S'HA'Q·,·,·,m., ,2'4····'·,
FI I::E'·'6'L·Q C' KS······ ", """""".,--.,."""",.,.,~,,,,,,.,,.,,,,,,,,.,,..,,,,,, .. ,,, ,., ""'.'."
479+001
AQJ,GE
OVERCH03
JUMP IF ENOUGH ROOM
481
LOI
RPSAPTR,X3+PSA
RESTORE
INDEX '''''''.,''''''''''',''",.,,',,''
48"2
COA
C'
1'1 CODE;" X3 + PSA
. .. ...."
.. . . . ......THE
....... ..... PSA
...... ......,'"
482+001
AZJ,NE
~+3
JUMP IF A REQUEST EXISTS
,,484 . E N k
..,INSFI L..OTHERWISE,tPUT IHISCODEINTO
485
STA
CNCODE,X3+PSA
CNCODE FOK FUTURE REFFERENCE
486
LOA
SYSCM,X3+PSA
IS THE USER IN CONTROL HODE
""45'''7",,,'''',,,·,,, '..'"''''''''
AZ'd ','·L·T"···"""'''··''''O'VER€'HO''2·''''··' "'''''.'' "'" ..
'CO'N'T'R Cll::"'" MO-o'E·"c·A'N'f··'''H 'A'V"E·,·t'RR'OR'S""'" .",,'" "..,,~...'.'"' ... ''' ,....', " ."'''".......,.. ' " "'" ."" .."... ",,,,.,,,
487+001 OVERCH01 EQU
>;.
"--'"
' . " ' " # ••' , ,
..
'" "' •• ".'" ,,,., ''''
o
o
'.,M"'"'.'•• ",,
"w.',.,,' ""
"' . . . . . . . . ,'''". . . . . . . . . . , ""'''''' 0
o
0
~
------------------- -- - - - - - - - - - - - --------- - - - - - - - - - - - - - - - - - - - - - - - - --------- - - - - - - - -
-- --
-- - - - - -
-~--------
- - - - - - - -------- - - - - - - - - - - - - - - - - - - - - - - - - - - -
ASSEM8LER/OS3
Vl.D 09/21/74 2229
IJ o:r2I"'''ll07u 5100
00322
110.323·
~,
!..
~,'
i
Cl1
,
FILE OUTPUT
R'T J
RZ
... ......... .......
t(}
!
14700006
01004675 p..
00336 P
0033 6··ZIJ07 777T X·
00337
35100006
00340
40100006
.,. "003lfl'203DO 2B2X'
00342
370U0046 X
00343
.. '00
34Ii ..... 35300264
403 tJ034T"XX . . . . . . . . . . . . . . . . . . . . . . ..
o
o
o
00345
21100004
00346 .. 270GOD15 P
00347
35000234 X
U0350
40100004
·· .. ·003 51"'2'u'1 OOIJOZ
00352
03100374
00353
27000336
'00354"'OTOO 0'372' r-i·
0
. . . . . . . . . . . . . . . . . . . . . . . . ~g£
502
•.•
o
00365
o
Q.
21100005
00377
00700364 X
EPP,Xl+CNBLK
. T6,X'3+PSA'
BRP9
····LOAfJ········ST·ATU·S81TS
SAVED FILE Bli TO BIT 14
SKIP IF FILE IS SAVED
AOOIN'(TF8LK ~-SF 8LKsf
. · .. ST·ORE·IHE.. NEW··· . . TOTtI·L·VALU E . . ......~ .. .
LOAD THE MAXIMUM FILE SPACE USED
JUMP IF NCT A NEW MAXIMU~
· ....REMEMtIER·TH c"'I\'E ",···t-j"A·XT MUM '"V AttJ E'"
RESTORE THE PSA INDEX
;()
RE. Jl,JRN. 10 TJjf.C P. L..LEB
..
. ···SET THE CHANGE··B IT
AND THE "RITE STATUS 8IT
AND STORE THEM AWAY
LOAO"rHEUSERS' QREGI STER'"
LEAVE THE BINARY 8IT
E~R~~T~~~;~X~5~g~~:~m . . .
L O L W R M A S K C L E A R A HUNCH 0 F8ITSH
SSA
E008
SET THE END OF DATA BIT
ST ~ "
AZJ,NE
C b~E~~~~~~~gLK..',,~62§~.T~~~'c5~~!.~~I ~~.~~ .• ", ...~"."
OUTW~2
JUMP IF THE FILE BLeCK IS IN CORE
~l~ 'T~;""'k~J';'EQ~bBTWKr
" . ···§·~·I···· . ,·)· '"' ". .
....
52 9
S30
H"W'H
'b8~~i~ :r~6TQi+LgA~' peINT
8~~~' . . . . . .
(
...
.
..
~. g~ I~ ~ 3, .?~.?........................................... ¥~··~·~···~cl~~,§ ~!¥·~~ ~ ~.g~·~5iRECTORY···
..'
535
(
LDQ
.." ........ ,.........................· .. 5·3·6···....··~···· .. ·•.. ~..···..··• ............................'...................
537)
RTJ
EqlJTHK3~~~.
... ~~§E.RVE....... RE.sERVETHECORE.. BLOCK ......................... .
CORE
8lKR X1+GNBLK
........................
FREEFILE
0'
0(';
u
o
o
o
o
o
lOAD THE FORWARC POINTER
GEr THE NUMBER OF BLOCKS rHAT
··AR r .. ··8 'EY'O N'O·..·..TH £ . . . . CU·RR:EN·r.. ·..8·co-C·K·. ·. ··
RELEASE THE FILE SPACE
....... ~ ~~~~llt2~t~·b~~~TEJ ~~~a~~ l~F c~~g¥~s FREED.~
00402
14700000
540
FOUTWK4
ENQ
0
BLKR IS ZERO NOW
.. 00.403. 41·1UO 0 0 5 5 1 + 1
.... 5 l Q . , . . 8 LKR,X1+ CNBU<·SO S EI.IrA FPRCPR lATELY
00404
20077777 X
542
LOA
BIT23
INDICATE THAT IT HAS BEEN WRITTEN
00405
40100002
543
~
STA
COREP,Xl+CNBLK
INTO
............................ 0'0406" ·····2DI0iJiJ04············ ················· .. · · · ·
.. S·4Lf· .. · ·
·· .. Lf) A'" ... ,
·CPP.... X1+CNHLK··..·····. · · · · · · . · ..······tOAD . ····TH E'C tJRRENT--PO S I-lIG'N"
00407
53600000
545
TAl
x2+6ppx
PUT IT INTO THE INDEX
00410
15200003
546
<
INI
3,X2+CPPX
ADJUST THE RELATIVE POSITION
"0'0411 ·····ZI3U·0'344X·
······546+·0·u1"·
''''TOGr'''T6;'''X3~+PSA''
··. . [OAO·vJORUGCUNT···ANO BINARY ····BIT
00412
41203777
546+002
STQ
CORE-l,X2+CPPX
WRITE WORO COUNT INTO THE IR GAP
.00413 ... 53 L t 3 U G 3 6 . 5 1 t S
TIM ................. tEVEL,O .............................. ..... GET.THEMCNLTORI NTO . . PROGRAM.
00414
20300065 X
550
LOA
CR,X3+PSA
STATE THE FAST WAY
00415
77634000
551
ACR
i· .. .~ ...... ·· .. ··..·004:1:"6·..· ·. . . Ol. 000·4:1:· .7.. · P · · · ·......S5·2· .. ·....·· ....... ". ,...........................
~. Uj·p···
................. >§-.+:1: ..................................... ,
·..··· ..' . ·.... ENT·ER .... ·P'ROGRA·M.. ·..·S·y·A . T·E· .. ···. . ·.................................................
00417
27000342 X
552+001
lOL
BIT18
BINARY BIT TO A
00420
0310U450 P
552+002
AZJ NE
FOUTW04
JUMP IF BINARY RECORD
"D OIi2T'2IJ07T777'X
5 5 3 ' [ O A L...
.. FORMFLAG.. · · · · C H E C K F O R FORfiSREQUESi
00422
55400000
554
VFO
A9/ROS
00423 .. 2170.02 5 3 X 5 5 S ..................
............LOQ,L.F 5,X3+F'SA.LOAOTHE FIRSTWCRO OF THE RECORD
00424
55000000
556
VFO
A9/RIS
00425
03400440 P
557
AQJ,EQ
FourWX2
JUMP IF IT IS FCRMS
.... ,~..........~ ..~ . . ·U·0.. 42·6·· . · "2'0"1'0'0"0"'0- 6··'·....··· .............................' .. ·..····...... ·...........-5·5 ...8 ............ " ......,.......................... 'H. ..,...
Ltl A· ......·. . ·· . · ...... ·..·. '· ......E.. PP·· . X·l+CN 8l:·K··........ ·....................."'H. ··GE·r ..·':r-·HEH·'·. .H·AROW . .·A R·E····'Ty·PE·..'· ...................... ,.,.......................... .
00427
12077760
. 559
SHA
-15'
0'
o
o
EQU ................. ·····FIX
>§..FOUH1K1
·...... ··..·········· · .. ·RTJ·
.. . . . . . . . . . . . . . . . . . §1t..
) . Foun~K2.~ij
534
/
LOA
. . 8~tR~·~t 199~gf ...~§ ~
H"
I
······5·3r·'·<::~
()
Ul
51
!
RfJ
GETCORE
GET A BLOCK OF CORE
.. 51
ENA ,5
..····77177 B··... . . .
......................................
518
STA
CORE+l
SET THE BACKWARD POINTER
519,
LOO
TFL,X1+CN8LK
LOAD THE LENGTH OF THE FILE
"5'20"'('''
.· · · · · · ' ' ' ' · E N · A · ' · ' ' ' t · , ' ' , · NO"CHJl.Nt3 ENE E lJEO·IF"O'l'·tL'Y'·1·SLOGK:
521
\
AQJ,EQ
FOUTWK4
JUMP IF 1 BLOCK LONG
522
LOA
L P, X 1 +CNBLK
LOAD.J HE ST ART 1~G8tOGK.... KUM8.ER. ......... H.....................................H. . . . . . . . .H........
·······523
'RfJ '·FREtFfU::·· ...
RELEASE THE SPACE
524
RTJ
SEL8LK
GET Jl FILE BLeCK
525 · S T A · L P·,Xli: CN8lK .....
·,SIO RET HE 8 LO CK NUM 8ERI NTOT H E·
526
STA
CBP,Xl+CN8LK
LP AND CBP WORDS
007f7??? X
00376
.§i.l ... '~':·;"~1 . ".",.. ""
..············· ..·. .················· ..·· ..·····.. ·····..·................
. _. . . . . . . . . . j~~I~j1~~g,~I~,~...
00375
20004000
EPP, Xl+CN8LK
m~l~~~Hm~lK
-5 u·9/
510 ~
513.'
'''00372 '007000372
0205' P
x·····················. .·......·····..· ·..·················
o
SSA
1!1
.~"..""...
00366 . . ·40l00·0IH
00367
L.0100003
00370
14280400 P
O' 0371''''''0 10?77·77·X·······
o
,~OVE~~H 0 6 Cg~.~IT22
,.::~-_
503)
STA
.......... ············5uy···"ttJA·..
5U5
LPA
00355
U0 777777 X
00.356· ..1447777.7
00357
40004001
00360
2110[J007
"'00 '36:1:"14600'1)0:1:
00362
03400402 P
0036320.10.00.0.1 ..
00364
00777777 X
o
G.
REf URN ···FRCN·STJfTF·ZER(Y· .. ········ --
w
~
1
UI0
m
Ie)
I
1U
489
ENQ
INSFIL
... 49·0··UJP······································· QCOt~TROL··
491
00324 P
492
OVERCH02 EQU
. Q032 Lf'2 010 0 0 0 4 · 1 r 9 2 + · O O l · ............
LDA00325
12077776
492+002
SHA
U0326
05640000
492+003
ASG
003271537777449'2+004
IN I
00330 P
492+005
OVERCH03 EQU
.............................. ··0 03 3D··· 41 30·03 0 6X-·········· ...
483
sr Q........ ... S F-BL-KS,X3 + P S·A
80331
20377777 X
494
LOA
SF8LKMAX,X3+PSA
00332
03600334 P
495
AQJ,GE
·+2
.•.... ...... ····003 '3"3 ...... Lft'3u'u ·331:···X···· ···················49S···········S·C Q........ ...••" S F8tK~IA·X·;X3+· PS"A
00334
54300312 X
497
LOI
RPSAPTR,X3+PSA
(J 013 5.0)'XQ QOoO.
498 ...
JLJP.. ......0 ,.l/ 06, X1
RAO
• • • • • • ..,..•.••••••.• , . . . . . . . . . . .. .
PAGE
1
IJO
FOUTW10
VFDA·····
.... "..........."............... EN
........................... u
HOW MAt\Y WORDS ARE LEFT eN THIS
....... .
SKIP IF Nor THE LAST WORD
F5,X3+PSA
37.7.7 8· ........ ~ . . . . . . . . . . . . . . . .~.................
STA
CORE
LoQ
C8P,X1+CNBLK
·····• ..·······,········6·4·6.... ·.. ,· .............................,.............................,........... dS·:FGl··..· · · . .· · · ·. . ··,·.. ······"..·F·····4·rX····3·+PS,A··········. .·,·····,···..······u,.•....
647
RTJ
REWRITEX
644
645
ilO
RAD
F6,X3+PSA
. "VFD
~·A9tROS·
LOA,I
F5,X3+PSA
MOVE ONE WORD FROM THE USERtS
VFO
A9/RIS
_M~MPB~. __
···STA·CORE,X2+CPPX
LOA
F5,X3+PSA
INCREMENT THE CURRENT ADDRESS
..INk·1·
...
REGISTER· .......'..........................
SWA
F5,X3+PSA
ASG
1
SKIP IF NO 8 ~
····vpO···,', ... ·····A9h:H1P,-A·15t·FINPWO 4·' SWI~rc H'M2Mf\\;l'l.. ":< .. lHJ·l(·,,········,···,,··· ..·······
INI
1,X2+CPPX
l))J? ,.1....
1:4 ,X ~:!- P~A
8.1::. TU RN TO .. 1.HE p gopl;gB.Ol,lJ I Nf: ...........................
FOUTW06 EQU
•
633··~
..~. ····~6L+T··~
o
BLOCK
. ... JUMP·lt=
LDAQ,I
F5,X3
VFO
A9JRI
CPPX
634
ENA
2
.... 635
...~~~R AO.....~.......~...E5, X3±. ESA.. .,',.......................
63E
INI
2 1 X2+CPPX
637
IJD
FuUTW08,Xl
•.. .... ",... ,.... ·,·e38 ....., . ,.... ,... ",..........'Ml:tJP 'fI"" · ·..··F· 4',)(:3' +PS'A·"· .. ··· . .
0' ..···· . ····8 ~·~~·~····g~~gg~l6·~ x.
00534
CORE-l,X2+CPPX
·+2
·F4,'X3+PSA'
SELECT, X3+PS A
X1+CNBLK
·X2+·CPPX·
-WPF8-2
631
.. ······ ..
63<::
....
SKIP IF A CONTROt CARD
JUMP IF NOT
SET THE CONTROL CARD BIT
SET UP F4 FOR ThE RETURNS
RESTORE THE CN8LK INOEX
·ISTH ER'fRoor-r···r t\····T HEF ICE
00017B
~~··~~6g ,s
00515 34300477 X
629
•"M"·· •...••. ···OtJ 5·16·'·%' '5 5'4tj'O .UOO·· ..· · · · , · · · · ....."... "6.50 '..
... 0
.... FOUT~~~04 . ·
ANA ..
604
605
()
,..
LCA
ASG
ENA
"'AQ·J,tT
SHAQ
SHAQ
TAT ..
602
607
8.....
~
.fOlUJ4 Q.2
·61)3· ..
ooa
00502
·0'050·3 ...
597
JJ:!.E.EOL ... kWRQ
:;';6
INA, S
EQ·~·
XOA,S
SHAQ
t O·A:,,···,,··m,. .
AlJ,EQ
. ·AlJ,
.W.RITE
GE·TT HE·HA RDWARE TYPE
SET FORMS IN FILE BIT
SAVE NE~~ WORD
9
.... 'FOUTW04"
LOA
TIA
.. c;0
EPP,X1+CN8LK
TA I
596
599
60Ll
501·
.
BIT
SlA······
. ·····6uc
u
o
•EPPI·X1+CNBLK
..1: QJ)TJLO ~.§ a~
QSE
UJP·
r~A 0
FOUHI04
ENA
594
·SKIP'! F .. A.... F·ILE .... ~ARK·'·· .. ····
FOUTW02
EQU
LOA
SSA
ST A
UJp·'
FOUH1X2
·595······
u'59a
-12
......... 01'7178
FOUTW:1,it, X?tGPPX .
591
592
593"
00455
15476777
00456 . O·3·0·0·0·S2·I.····,P· .....
00457 16477777
0046013077747
·00461··20300343X
00462
03000551 P
00463 13000030·'
03600465 P . . . . . . . . . . . . . . . . . ..
00464
00465
24300423 X
00466 ... 176037.:7 7~ ...
JUST·· THE H~ARDW·AR·ETYPE . .
SKIF IF A TASK
JU MPIF NOTAT AS K
LOAD THE CONTROL MODE BIT
LOOK AT THE FIRST TWO CHARACTERS
~J)O
574
575
582·
40100006
00443'OtO OOll-50P
FILE OUTPUT
HHIASK
HTTAS K
. FOUT W04
8IT23
UJP
···573
35077777 X
00442
··QSE
·5Ere
00435·'04701717
00436 01000444 P
o
ANA
ASE
UJP .
LOA
SHQ
560
20000404 X
00433
UIa
11
ENTER
STATE
................... MONITOR
............
..
. ..... ... .... ...........
UPDATE THE tE~GTH OF THE FltE
....... GET .. AFI.LL8LCCK
WRITE FORWARD peINTER
LOAD ThE CURRENT 8tOCK NUMBER
,· ..··•..·,·········A·N·O..mS··frV·E······,·I··T·····'I··11.',...... A..······T··E..!"lP·O·R·A·Ry··· ..·..····,·····,,··· . . . . ·. . . ,. . ·,..·. .·....". . . . . . ·.u.·,·...·.·.•' ...................,.•.....•,.................."., .......................
REWRITE THE BLOCK
~~
~..
".,~
~~.
,~......
~
o
o
o
o
cr
(1)
ASSE:HBLER/OS3
Vi.O 09/21/74 2229
PAGE
-.-.~~~". .-""---.. , ""U 'O'5"3'7'~"'" ""U'0'7'O"0' 3 S"S"··'·'X
······61+~r
FILE OUTPUT
GET·A·NCIHER··S[(.:-t: K "bF CORE ....................... .
GETeORE·
U0540
20300535 X
F4,X3+PSA
649
LOA
LOAD THE PREVIOUS BLOCK NUMBER
. . CORETl
00541
40004001.··. · ·
WRITE BACK· POINTER .
.....
STA
·····650····
00542
20000433 X
651
LOA
8IT23
INDICATE THAT THIS BLeCK HAS
00543
40100U02
652
STA
COREP,X1+CNBLK
BEEN WRITTEN
INTO
············SET,.TH
E' CUR REI\·Y.. ····p OSITI ('\.1\1 ...........................................................................................................................................................................,
653···························· .. ···················. · .
2"X2+ CPPX' . . ..
····00544 .. ,.·1420 0 002
EN!'
00545
534::;0036
654
TIM
LEVEL,O
PUT THE MONITOR INTO P GRAM
00546
20300414 X
LOA
.
CIS,
X.3
..
±
P..S
flo
...
.
.
.
SJ AlE......
1§~···········..···
U0 54'7 ····7 76341JOO'
ACR'
00550 01000450 P
F OUT W04
657
UJP
-.
-_ ..
----,
····658 ..·
.......... .
00551 20300411 X
6SS
FOUTW12 LOA
T6 X3+PSA
LOAD WORD COUNT AND BINARY BIT
00552
40204000
660
FOUTW14 STA
CORE,X2+CPPX
WRITE hORD COLNT INTO THE IR GAP
0'055-3 · · ... 1·0800???····· ....· ............._.
..· ...... ··ocrt···.. w............................ ·· ..T:S 0
·..··WPF8t·t·,X2+CPPX
SKlp .. ·TFTHE··FILEBtOCK . . IS··FtJtt· . ····. · .. ···
00554
00000556
662
VFO
A9/JMP,A15J¥+2
00555
00000610
.... ()
.......... ~~{
~~~
.. ~9/J ..HP.,.A15/EOUJW.20
OO? 56
i460 dODO·
00557
40204002
665
STA
CORE+2,X2+CPPX
STORE THE END OF DAT~ WORD
666·..
.. . ···TIA .........
·X2+C pPX·
....... .
·00560·53200000
CURRENTP CSI1 leK TOA
00561 4410000 L•
667
FOUTW16 SWA
CPP,X1+CN8LK
SAVE THE CURRENT POSITION
o0562 14477777
668
FOUTW18 ENA,S
777778
" 6 6 9 ' S f A ···..CORE .
00563· 400lJ4000
WRITE" TH Eu "FO RW'A RO"P OINT E R
00564
00777777 X
670
REAOFX
RTJ
FLOAT
FLOAT THE CURRENT BLOCK
I{)
.............................. 0056.5 ...00]05.0]2 P.
........................... 6)'1...
.... REAO.RIN ...... RIJ.... ... . ...........U.NSAV..E .........................
.. . . RE.S.TORE....IHEUSERS ... REG..ISJERS ...
00566 20300551 X
672
FINISH
LOA
T6,X3+PSA
RESTORE THE Q REGISTER
00567
40377777 X
673
STA
Q,X3+PSA
....,..................... 00570··2 a 100 0 04,...
..6 74STA·TUS ··········LOA·
·C PP, X1+ CN8LK
. GET THE STATUS BITS
00571
21100006
675
ASTATUS LoQ
EPP,X1+CN8LK
LOAD THE HARO~ARE TYPE
00':372
13000011
676
SHAQ
9
SHIFT
INTO POSITION
"AND' OFFSDR·8Tl·
.··· . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .,. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
·········0·05 73'··17577·'157····· .................................
·· .. 6·7·0·+·0·01·· ..................... ······.. ·.. ··..A N·Gt,.-S····· ············;.;,.·20·8········ ..•··· ............................ .
00574 176001357
676+002
ANA
HTMASK+408
SAVE EPP SDR 8IT
00575
05600040
676+003
ASG
408
SKIP IfDESTRIJCJI.VE .. READ
676+ 0'0 4UJp··~·+2
'UO 57 60'10 00600
00577
167 GOO 2 a
676+005
XOQ
208
SET SDR 8IT FeR USER
.. ·· ..······. · · · · · · · . ··0060·0 ····1760·0 O·lI·· . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
· .. 6r·7··
................... ······AN A··
........ HTMAS K·· ..
···. ,.··········..· · . ···········MAS K·· . ·TO····THE···HA RDWARE···YY·PE· ..
00601 120UOU11
67 e
SH A
9
00602 13000041
679
SHAQ
39
COMBINE
WI1H STATUS
. . . . . ..... .... ······SET
. ··A. '·TO HT
..TH E··ST'AT
.............. ,.BITS
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ,. . . . . . _............ .
6·c)'0 .. ·· .... "ASTATU S·-A .. STA .. ·
..··A;X3·tP SA...··
. 006"03·· . ·····1+0377777· ··X·"
00604 00705107 P
681
RTJ
EXIT
00605
20377777 X
682
LDA.J2,X3.:+:PSA
LOAD INDEX 3
683
..... ·····sIM
I 3, X3 + P S A A N o RESTORE !T
·'00606
443777 77}C
00607
01004537 P
684
UJP
SKIP
RETURN
···············································68 5·
............~.
··THE····RECORO···EXA CTL·Y·FILLEDUP THE
686
9
BLOCK. REWRITE IT AND GET
587
• ................................. , .......... ,..,.......... ,................,................................................" . ,....
ANOTHER,
.......................................................... .,..... ·•. ·..·..···....0·
8··a·· ...•. '...... " ...->,<,
EO
O··. . ·WORO WHICH WILL ONLY HAVE THE
aOE10 14600001
689
FOUTW20
ENA
1
H~~jJl3J~·8gg~ X'·
·t~ ~···~~.g.······ltb3~~±CNgLK
~Ift\l!:FitglE~ckJL!:.LI;NC;TH
00613 21100003
692
LOQ
C8P,Xl+CN8LK
LOAD THE CURRENT POSITION
.00614
41.300540·. . X 6 9 3
··SlQ ............ ····..·· ..·F.4,X3+-PSA·SAVEIT.·IN A TE·t-'.PORARy····· .
00615
400Q4000
694
STA
CORE
WRITE THE FOR~ARD POINTER
00616
00700536 X
695
RTJ
REWRITEX
REWRITE
THE BLOCK
·...... ·..·.. ···..····00·6·17··· ···..a·u ..7·0·tJ53',.···· ..X····· .. ··· ..........,. .... ,............ ····· ..
..···. . . ··....·..···..•·....··· .. · ..·····,.· .·..
.... RT··J ....··
·····..·.....G·ET·C'O·RE·....·.. ···· . ·•· ········• . ··..···• .. ···..·......·.. ·G·ET····A···· . e·L·C·CK···C·F· . CORE"·· ...... ··.. ·· ...............................................,. ........... ,.........,.......................
00620 203U0614 X
697
LOA
F4,X3+PSA
LOAD THE NUMBER OF THE LAST BLOCK
00621 147000DO
598
ENO
0
ZERO IS THE END O.F DATA WORD
00 6224500 Lt O O i 6 9 S
3TA·Q··CORE f T S T O R E EAGKWARDPO INTER' ANDEOO
00623
20000542 X
700
LOA
8IT23
THIS BLOCK· HAS BE EN·WRITTENIN TO.
8g%~~ar&B8~gr" pf5~
··G3~"·
~g~¥~I€t+CN8LK
n
,
()..,e,
~
~
i
()
I
1I ()
j
I, 0
I
I ()
I
0
0
0
12
UIO
••
"
".,....
",.
~--,
·~···
,.
o
o
~
0
0
o
o
· w..... ............ ~.............. • ........
0
0
···.
····6·9·6·~
O.
d'
...
o
.
o
o
··~·,.
. ·.
o
°'1
o
0"
0
o
o
0
o
o
o
Vi.D 09/21/74 2229
ASSEM8L~R/QS3
cr
0626p
20300566 X
(J
00626
00627···· 536000·00
00630
2010LU06
00031
35077777
X
OOE32'0 30(:)'06 50 P
00633 05200012
00634 01600636 P
00635 'in 004673 p'"
00630.000U0570 P
00637
OU000665 P
00640
00001142 P
00642
00643
00000676 P
00E Lr1'OOO 01277 P .,
()
00001026 P
0'0644 ... 00U00717 P
00545
000UD716 P
orr646000J~025 p
00647
o
00650
00651
00652
00653
o
00000670 P
00650 P
00650 P
0420000:)
. 05200002
01600636 P
01004673 f.)
._$.
00654 P
. 'OO'654P
00654
.Q 0655·
o
20300626 X
53·60·QOO·0
00656 0560 0004
00657
01600661 P
'ut1660"0 1:0U'4673P
o
. 00661 p'
() 0 66 i
00000570 P
. . 00662 .... U0 OU0665 p ...
o
o
00663
00664
00001140 P
00001277 P
Q665P
PAGE
70 :;
10E
UIO
13
FILE AND PUNCH CONTROL
F C ON T R 0 LEU. U
LOA
LOA
SSA
AZJrEQ
ISG
70 7
708
709
7tO
711
712
.. 713
714
715
TAl·
.... U.,JP,L.
UJP
-FCNTRLl
00
00
00
716
717
'718
719
720
721
722
723
724
725
"'726
727
72
e
'00
JO
00
00
00
00
00
FCNTRL2
FCNTRL3
EQU
EQU
ISE
"'ISG'
UJP, I
729
730
UJP
····731
732
733
.................. " ........ ·....73·4' ..
735
736
"737
738
........ ·····73·9··
740
741
PUNCNTRL EQU
EQU
LOA
... PRCNTRC
. ···· ..····7 tr2 . ·..· .......,........... .
·····TAI
AS G
UJP,I
····· . UjP'
Cl
JI.
TG,X3+PSA
LOAD THE FU~CTICN CODE
.... X2 · ·
········PREPARETO·OECOOE
CHECK FOR DESTRUCTIVE RE~D
EPP,Xl+CN8LK
N8IT20
LEAVING A NON ZERO IF IT IS NOT
. . F CNTRL3'''''SET'
.
FCNj'RL2-FCNTRL1,X2 SKIP IF ILLEGAL
FCNTRL1.,X.2..
DECODE THE
FUl\CTIGN
ZAdORT
ILLEGAL
FuNcrICN
......... .
·ST·AYU~
CLEAR
WFM
"RELEASE····
REWIND
SFPFM
'S'8PPM
a KSPACE
FWD S·PAC£· ..
S
ETOESRO
'1J.
00·-
01
STATUS
=
= CLEAR
WRITE
STATUS
02
FILE MARK
'03 - RE LE'ASE
04 :: REWIND
8~ ~ ~~~~g~~~§~~~20P~·~~·/~~tEt1~K
(t
:.;
(]
,
. SiC)
i.
()
=
07
SPACE BACKWARD 1 RECORD
10 -·SPACE·FOR WARD1REC ORO
11
=
SET DESTRUCTIVE READ, REWIND
()
UL
>f
3 X2
'2~X2
FCNTRL1, X2
LABORr
SKIP IF RELEASE
." "SKrPIF"'NorSTATUS OR'C[EAR
DECODE THE FUl\CTION
;:L
0
0
>J.
.~
T6,XJ+PSA
X 2·
,0
"'-
PRCNTRL2-PRCNT~L1
PRCi'lTRL1,X2
ZA80 RT"
.... "'FRCNT RL f E Q U ¥
745
00
STATUS
746
.. 00
CLEAR
147
a0
A CC WF M
148
DO
RELEASE
······74g··..··· ·······P·R(}NTRL. 2:·EOU· ...... ····· .. ·····:>j.····
LOAD THE FUKCTICN CODE
·····PREP A.RE···TO ...DEC·O 0,£.······
SKIP IF ILLEGAL
0
····ILLE·GAL·PUNCTION
0
744
00
= ·CLEAR
STATUS
ST ATUS
01 .:::.
02 :::
03
=
WRITE FILE
RELEASE
8ITS
MARK
0
0
o
0
0
0
o
I.
0
0
o
0
0;
0
OJ
0
0
----------_._--------------_.._-----------_.-------------~------------.------------------,-----------------.---_._.-._._----_._-_._----_._,------._-----_.-----------.---
ASSEMf:3LER/OS3
V1.U
09121/74
-'uOo'6S"'ZJOL10'U-rC
006663710000 1+
0066701001340 .p...
PAGE
14
UIO
CLEAR SDR AND REWIND
. . CLEAR--····COA··- ·····················ClEAF(CON-·
CLEARX
LPA
CPP,Xl+CN3LK
UJP· ······················R Rep············
. C0J10'IFC'M ASk
MASK WITH THE STA1US WORD
S1 GRE·THESTAT US8ACK AND RETURN
o
()
()
o
o
o
o
o
o
00706
20100004
OJJ Z01 .. ~ZQQ..QO.JLL
00710
35000353 X
·····-00711-··40·-10 Ga04·00712
20100007
00713 15477776
.... J.O].12.
Q:to OJI5§ .6...J:.
FJNISH
o
o
o
o
.....,
U
o
o
o
o
o
u'.',
o
o
o
0:·<
o
0"
o
I3CJ
o
o
o
A SS EM 3LE RillS 3
(}
Vi.O U9/21/74
PAGE
2229
15
FILE BACKSPACE AND SEARCH BACKWARD
UIO
7137
.. 788
789
F5
790
. ··791
792
E~
793
794
795
797
798
799
fJKS PACE ENA
INDICATE BACKSPACE
o
FS, X3+PSA·"···
'·SBPFMJt.lM PS HERE
"'JACK01SWA
SAVE INDEX REGISTERS AND FAULTS
800
SAVE
RTJ
801
f)ACK02 .. VFD
" A.12LEINT..... .
LClQ··
. LOAO" THESTATLSWCRCl
802
GPP,X1+CN8LK
LDL
AUB
CHECK FOR ABNCRMAL/UNAVAILA8LE
803
..... 804
" " AlJ,NE·"" IOS;1ASH·
K ILL "T H E FI NK
BRING THE LOAD POINT 8IT TO A
805
lOL
LPB
806
VFD
A 121 DINT
..... ·'·807
······"AZ·J,NE
"··C·KSEARCH
·00···· NCTBACKSP{lCEPASTLO AO·P OINT
808
RESET EOO, FM, AND BRP INDICATORS
LDL
NEODS
aog
LPA
NFM8RP
C"PP,X 1+ CNdTK···
'sTORe TRC RODTFIE O·STAT uS·' sACK'
8iD
STA
LOAD THE CO~E peINTER
811
LOA
COREP,Xl+CNBLK
¥: +3
....... "
.. .
JUMP··IFIN CORE
··812
AlJ,NE"
813
READ THE CURRENT BLOCK INTO CORE
RTJ
FIX
¥: +2
814
UJP
RESE RVE'"THE'CCRE'StOCK""" .................. .
. . RESERVE"
··""RTJ·······
815
81 E
LOA
CPP,Xl+CNBLK
LOAD THE CURRENT POSITION
817
777778
AND OFF THE STATUS BITS
ANA
... "8fa
. JUMP IF . THE I t\TERRECORDGAP
AZJ;:NE
8ACK03
81 S
IS IN THIS 8l0CK
LOADTHEEACK P·(I·NT.ER
j3 2 0···
LOA
·CORE:f:l
321
RTJ
REWRITEX
REWRITE THE SLOCK
822
RTJ
FIX
READ THE CURRENT BLOCK INTO CORE
..................... TH E: . . NUM 8E RaFS LOC KS °pAS'lTH E"'""
ENA··
·1·
··"°'82·3
CURRENT BLOCK HAS INCREASED BY 1
1324
RAD
8LKR,X1+CN8LK
825
ENA
WPF8-1
POSITION
IS GLOCK
New AT.........................................
THE END OF.
THE·
CO RRENT
UJP
¥+2
.......
.
826
827
6ACK03
INA,S
-1
MOVE BACK PAST THE RECORD GAP
82B
. UPDATE THE CURRENT POSITION
¥~ ~...
~ ~~ C~ ~~. CN8 LK··
829
830
LOA
CORE+2,X2+CPPX
LOAD THE INTER-RECORD GAP WORD
···e·3·1·········"w."...
°;:lOMpoI'P""ITISAP'ItE MARK'···
""AZJ,t'T··'"8 ACK05"
8::52
lPA
BlT1GH1
MASK Te 16 8ITS
833
STA
F6 X3+PSA...
XGA,S
.
";';'0'·
"83' lf"
AIA
X2+CPPX
ADD IN THE CURRENT POSITION
835
B<3E ".."." ... ".
·COMPENSATE "FO~ THE I-R GAP
INA,S"""
""··1···
837
AZJ,GE
t3ACK06
JUMP IF THE END IS IN THIS BLOCK
838
BACK04
INA
WPF8
UPDATE
THE COUNT OF WORDS
...
"
.....
ANO····· S" A·\i [ .."..'1' T ""'·1' N···· F6······· ".................."................""............................"" •....•..........."....... . . . . . .
·····"········"··"··SfA···"
"FG,X3+PSk'""U
LOA
CORE+1
LOAD THE BACKWARD POINTER
RTJ
REWRITEX
REWRIT E THE BLOCK
ENA····T"···""·····
THENLJMBER OF BLOCKS BEYOND THE
RAD
BLKR,Xl+CN8LK
CURRENT BLOCK HAS INCREASED BY :1:
".... "".".""""." .."..".". L GA.
...FG, K3+P·S A" " .
LOAD THE····CURRENT"flOSITION ..·
SWA
CPP,Xl+CN8LK
PUT IT INTO THE CURRENT POSITION
POINTER A~D JUMP IF DONE
AZJ,GE
BACKOS
·RE Ao··"rN·TH E··el:;·RRE·NT··S 1:0CI<"····.. "" .. · ......•....."....
·····RT·J·····"·
··"·P·I·X········"""U""....."" ...............
LOA
F6,X3+PSA
LOAD lHE CURRENT POSITION
UJP
8ACK04
LogP"8AGK ...
U0716 14600000
007:1:7" 44"3cr0523X
()
00720
00721
00722
o
·0·07·24
o
o
00730
00723
UU72S
00726
00727
27000710 X
77730000
03101021'P
00731
37000011
. 00732' " 40100004
00733
20100002
""".... "."" . . . "" ".... 00731+ " 0310"0737
00735
00700372
00736
010U0740
·00737"
C)
X
P
".".
"P "
X
P
00 700374'"X
00740
20100004
17617777
.·"".".00743
20004001
U07 i t!
00742iJ3TO 0752P
o
o
o
o
o
00744
00700616 X
00745
007U0735 X
U0746 "14600 iHil"
007L~7
34100005
[) 0 75 0
14 60 0 77::;
00752
00754
15477776
. ".. 0075T010a0753 p'
0075.3"
00755
.. .
44100 DO 4
536UOOOO
20204002
OtJ756U3·301001p··
00757
37005135 P
00760
40300515 X
00761 ·16477777···
00762
"001.63
00764
00765
Q"
I'"
0
00705064 P
77740000
2110 00 04
27000244 X
D3104766P
27077777
1
0.
53240000
15477776
03201006 P
15600776
40300768 X .
OB766
00767
20 0040 {} 1
00770
00700744 X
0"0771 .... 14 6U [J U 01"
00772 341000135
0071.3 ..... 20300766"*
00774441UOOOI+
00775
03201010 P
0100U
01000765 P
·,·0·0776"007007'45 X
00777
20300773 X
.. 01001 200U.0674 X
01002 34100004
01003 14600000
7 ...w.······"·····················{)·1·0"DlF··· . 4"O··3·lj ·O·1·1"7"WX~M ...• ".....
01005 01001007 P
01006 4410U004
······01007·····00700564"""X·
01010 20100U03
. U.l.0 11 .. 21100 OD 1
01012 03501017 P
U1013 20100004
····0··:1:0··1:··4······· O·5··6U··Q·Q·O ..1:·"···············
01015 35000725 X
, , " , ' • __
0;
o
SBPFM
SEARCH FLAG
IF F5=O SEZ EKSPACE
IF F5 to SEZ SBPFM
NUM8ER OFPAST
WORes
IN THE RECORD. WEARE
SPACING
.......LEFT
.
.aKSPACE-~
w •• ••• "".".O" .•. •
85.1.
852
853
"8·5·4·····
8S5
856
·'·857
858
~,
0 ,
d'.
o
("'"
IU
o
o
o
.. .
, __
~,
,
__ ' "
, ___
~"'"
' " __ , _ "
o
o
o
"..................................".......".......... "••.
o
,0
~
...... 8ACK05...LDA
EMS""."
RAD
CPP,Xl+CNBLK
ENA
0
.......·.........
".w····~·S:rA"··
····"···P5··,···x;·\3·+P·SA···············
UJP
8AGK07
BACK06
SWA
CPP,Xl+CN8LK
... ···Ti"AGKOT··"·RTJ"
PLOAT"·""·""·········""
8ACK08
LOA
C8P,X1+CNBLK
8S9
LOQ
..l.P..,.x 1+. C N..8LK
8~U
AQJ,NE
8AGK09
861
LOA
CPP,X1+CNBLK
..•. 8·02·""····· ..········ .. ······"··.. ····· ..•········· ..··· ··""··"·'"··A"S·G ...• "..............".......• ···t..
."...•·.......·...". . .
863
SSA
LPB
•• ·"M " ............... H
()
M••••.••·..• •
w . . . . . . . . . ".
LOAOIEL FILE MARK READ BIT
OR IT INTO THE STATUS WORO
··CL:·E·AR··"""THE· ··S·EA·RC+i···F·l:A·G················"~·..· · · · ""·· ·
AND GO CLEAN UP
UPDATE THE CURRENT POSITION
·"··:""··""··"·····"F [OATTH EC URREN rat: OC K··" .....
LOAD THE CURRENT BLOCK NUMBER
COMPARE"IT .viIT HTHELOAOPOINT ....
JUMP IF NOT AT THE LOAD POINT
LOAD THE CURRENT POSITION POINTER
. "····SK·lp·:r·F·"NOT""AT·wTHE··t:t>AD·POIN·l'
SET THE LOAC FOINT BIT
. "N"..
." .•••"•• " ............................................"•••••·••• "•••••••""· ••w
o
.• m ........ '
o
o
o
(r
ASSEM8LER/OS3 Vl.J 09/21/74 2229
"iJTOI6 "4'0100004
01017
14200721 P
01020· " 0100·11 O·3···P
(1
010'21'20 :; 01 004 X""""""" .
~,
l?
~
I
I
1
01022 031J0565 P
01023
00705072 f:>
ui02 LtO:CO II Lj.b? 3' P
()
;;.
. ···007.17 P
()
PA GE
':3(:,4
d65
···866
867
868
8Ug'
16
FILE 3ACKSPACE AND SEARCH BACKWARD
Ula
STA
ENI
'2ACK09
....·· . · · · · · . . ·..··· .. · . ···. ·········UJP··
CKSEARCHtOA
870
AZJ,NE
871 ......... ····························· ....······..· · · ·.. ··UJfi
Rl'J
87·2····
873
. . . . . . . . . . . . . . . . . . . . . . . . . . . ·874
875
0)
F5,X3+PSA
REAORTN
U NSA VE
Z ABORT
··BAGK01············.............. .
.
............................. THE··A REGISTER·MUSTSE NON-ZERO··
AT THIS FeItH
()
()
I
I ()
.....................................................................................................................................................................................................................................................................................................................................................................................................................................................................
I
0
0
o
0
o
()
o
0
C)
0
"'-1
U
Q
o
d
l)
'1:>
(J.)
................ 0
Cr"
o
Oil
o
o
0"
,~
"to
c)
3(2.
o
~
0
1 _' _ _ _ _ _._ _ _ _ _ _ .._ _ _ _ _ ._ _ _ _ ._ _ _ _ . _ . _. _ _ _ ._ _.. _ _ _ _ _ _._ _ _ _ _ _ _ _ _ _ _ ._. _ _ _ _ ._ _._._._._ _ _ _ _ _ _ . _ _ _ _ _ _ _ _ _ _ _ . _ _ _ _ _ _ _ _ _ _ _. _ _ _ _ .._ _ _ _ .._ .. _ _ _ . _ _ _ _ . _ _ _ _ _ _ _ _ _ . _ _ _ _ _ . _ _ ._ _ _. _ _ _ . _ _ _ _ _ _ _ _
A::iS E HOLE RIGS 3
.
(]
)
'\
Vl.u 09/21/74
222~
PAGE
17
>;. ',''1-4:;. 'I-
B7S
aHa
01025
1£t600000
uO'1026'·4lJ.301021
o
o
()
o
()
.u
o
o
o
X··
01027
00705064 P
01030
77740000
. "'01031'21100004
01032 27000723 X
01033 ···03·104·J.66 ..... P··
01034
27000341 X
01035 77730000
01036' 03tu 1021' P
01037
27000025 X
01040
37000011 P
' 0 10liT4GTO'O 004 ...
01042
20100002
01043·,03101046 P
01044
00700776 X
01045
01001047 P
010 4 6' . tJ 0 7. 00137 X
01047 2UI00004
01050 53600000 .
01051202040'02
01052
03001135 P
·01053D3301117·P
01054
37005135 P
01055
21100004
..... ·., ...... ·u.·..·
01056" '1?'7T77?7
01057
01060
010 6f
01062
53040000
156()(JOO
0540 077
01001100 P
~1n63-
40300717 X
01065
00700770 X
01064
'I-. ..>J.'i:.>f:.5PJ. ..'l-
'f.~t "f:.'f>f.JJ..
"'FS,X 3+'PSA""
FWD SP O'I"uSWA"
RT J
SAVE
VFD
rOQ .
LDL
F.WP.SPO;;
A 12/ EINT
CPP,Xl+CNBCK
AUg
. AlJ,NE·
IOSMASH
LDL
E008
UFO
A12/DINT
AlJrNECKSE ARCH"
LOL
N LPg
LPA
NFl'1BRP
. ····STACPPXl+CN81 1("
LOA
COR~P,X1+CN8LK
897
8(38
······899
900
901
9u2
903
... AZJ, NE . ···:1f+3 .,................. .
RT J
FIX
904
905
UJP
906
90
90
00
;;. +2
"HIJ
LOA
RESERVE'u
CPP,Xl+CN8LK
TAI
X2+CPPX
[OA'C'ORE +2;X2+GPFX
AZJ,EQ
FWOSP10
······91
gil
.AlJ,lT
····912
LPA
913
914
LDU
915·····
916
917
.... . .....
FWDSP03
BIT16M1
;;:
. WPFt3 ....
UJP
FHDSPQ4
RTJ
ENA,S·····
RAO
LOA
REWRITEX
Si~A
CPP,
STA ...................... Fco
· ,)X,;,...:3+PSA,
O
LOA
t<, ....
"INA; S
i~SG,
0107.3
.. "010740iO 5"1'102
010?5
40301070
01076 00701044
'DT07T' 'TiOO 10 64
q:;;
H
•• ' • • • • • • . • • •
C)8
X1+CN8LK
S
X
X
P .
ST.A
F6,X3+PSA
'UJP
"'F ~~USP() 3 '
RTJ
H··Ul1frO···· "'44'18 ·OU04······
.. ··9·36···· ·······················PWElSP04 "SW'A"
0110~
00701007 X
937
RTJ
01102 14201030 P
938
FWDSP08
ENI
·····01'1 032U3 Q T 0 2 6 · X 9 3 g ..···
FWJSPU9"'lUA"'" . .
011D4
030U0565 P
940
AlJ,EQ
.. 0 110S .. 203 OJi 316X. ........."."........ ..... ....... ..... ..9 4.1
..... .LOA . .
01106
03002441 P
942
943
AZJ,EQ
RTJ
..... g 4lt······H··"'·····,,···· .. ·ENA····
945
SSA
o · · ·. · · · . ········~1il~igg~
~~j~··X~·t~·
01114 15477776
948
. ""l6'~'
INA,S
..D.l11:5 . .. 4430.L113... X 9 4 9 . Sl-lA.
0;
01116
0100Q565 P
950
UJP
o
--- - -
.>J.
4141-
()
FIX
u .......... ·•·•·•·........
0
INDICATE FORWARD SPACE
SFPFM'J UMPSHERE
SAVE INDEX REGISTERS AND FAULTS
LO AOThES TATC S~ ORO
CHECK FOR ABNORMAL/UNAVAILABLE
KI LLTHEFI~K
END CF DATA 8IT TO A
DO NCT··SPACE PAS;T END OF OATA'"
RESET lP, FH, AND BRP INDICATORS
0
0
0
";,
. 8IfA NOS T ORE"TT" SACK
LOAD THE CORE POINTER
JUMPTFTHE 8 l GCKIS IN CORE
READ lHE CURRENT BLOCK INTO CORE
0
RESERVEuTHE .. CCREBtOCK····
LOAD THE CURRENT FOSITICN
[0 A0' THE
r NTER;';;RECbRD
0
GA FWORD
JUMP IF END OF DATA
JUMP·· IF A FILE MARK
MASK TO SIXTEEN erTS
LOAD THE CURRENT POSITION
,uuMASKO F'P THE: 'ST ATUSBIIS" '" ................. ' ..... .
ADD THE CURRE~T POSITION TO THE
RECORD LENGTH AND ADD 2
SKIP If THE NEXT RECORO"OOES-NOT
END IN THIS alGCK
SAVE THE r-100IFIEO RECORD LENGTH
LOAD THE FORWARD POINTER
REWRITE. S·NOvl'·CNE:·'tESS·'StCOK'·
THE SLOCK
'lHERE'·I
....... ·· .................·.... ·· ...................... ".,.............."..... "".. """ . . ,,, ...,,, ..... ...
REMAINING PAST THE CURRENT BLOCK
LOAD THE MODIFIED RECORD LENGTH
'COUNT . . DeViN BY THE' NUM8ER'OF WORDS
PER FILE BLOCK AND STORE IT INTO
THE.CURRENTPCSITION.POINTER·
SKIP IF THE RECORD DOES NOT END
IN THIS FILE alaCK.".".... ........ .. .... ....... ............. "... ,,,,,.,...
SAVE THE MODIFIED RECCRD LENGTH
AND
CURRENT
....... [0
OF READ
f:nrCK ....THE
...... . .......
.. ....... .. ...........BLOCK
....... ....... ... .......IN....... .
"
",."
"
'
"
0
0
0
o
o
,,
·e Ppr'X1'+eN81::·K·····~·~~·· , ...... ,' UPO'AT'E'fH E' ····c URRENf········p as'f;l"'ION~~~~' . . . ". . u~,_,.,., ..
FLOAT
FLOAT THE CURRENT BLOCK
FWDSP02 X2
ENTER
CONTINUATION ADDRESS
F5 ,'X 3fPS'A"GET'SEARC H7SP trCE 'FLAG' ......... " ......
REAORTN
DONE IF NOT SEARCHING
.CHGOD.£.,.X3.+PSA,
.G£T ... CONTROL~it ·FLAG ..
UJPOX2
CONTINUE SEARCH IF NO ERRORS
CHOSET
MAKE AN OFFICAL REQUEST
·..SWt3I;r·,"..·········......·,,· "'FO R·······eaNTR Ol:"M a BE, .. ANO . SET.. ··········
FLAGS
THE ShITCHING BIT SO THAT
FLAGS
WE IHLL JUMP TO QCONTROL
"Tf',X3'+PSA
GETUSERS"'PROGR AffCOUNTER
-1
00 NCT ALLOW THE PC TO ADVANCE
Ll, X.3.'+.ESA ...
R EADRTN
EXIT AS IF OPERATION DONE
o
~., . . ".
o
I
",....,.
U
o
o
Q . . . . . . . . . . . . . . . . ..
- --
WPF8
................,M ...·.....• M.......... .t.ltiP ..............,....... . 'f'WeSp08·····
'P"
01107
a0777777 X
····01:1:1:0·· "'1:4677777·
01111
35077777
~-
p·OS··· .. ·
777 71B···
INA
ASG,
918
f·I~DS
CPP,X1+CN8LK
"'AN(:lu
AQA
20004000
v
f
'f 'f.c"l-JJ. "". '''..1{'.><:3·*·:;' >f: >f: JJ.. 'Y.>;.>I:.c,t'f.5-""*',' :;'''1-.:;' 'f.'f..>I:. 'f...>I:."f:. >f >/:'/0 '" 'f>f.>f>l:**:1f..'f: 'f.>f :;'f'f >f:'f "I- 'f'f >I: ......
a
FWOSPACE ENA
891
892
893
"89'4
895
896
Loa!
'f.
lJ. .
.v'1-c,t~t"t
,.,,-
()
'f ...
'f
.. ;;. ';'.
8S9
390
0"J
.' I
Vo.v-··
1f.
u
-- -"
lfo·'}- >r >PPf.:;.:;. ..... >J.JJ.:;' 'l- 'I-¥- );.:;.'-'/. >;-'1- .~lJ;.:;':;' i[.'.>J.lJ. >J. lfolJ. 'f'l- if.:J..>J. 'I- >,UJ. >flJ.C>J.lfo:J.:;' C>J.~t 1f.
nWSPACE,.. ... SFPHl
lJ.
.>J.
F5
SEARCH FLAG
. 'f
I FFS=O SEZ F WDSPACE " ' '
>I:
IF F5 to SEZ SFPFM
>;,c6.
NUMdER OF WORDS LEFT IN THERECCRD hE ARE
,'l-'
S PACI NGPAST
......
'0106B 144'71T7&
01067 34100005
ul07U
20301063 X
..... , OT071 .... 15 [~7nrOr
01072 4lfl00004
o
~':J.~ ~'JJ.?;, Jf :;.''1 'l-lfo:;'
';'>:. 'PJ. :r:J. 'Jo'
if
887
o
FORWARD SPACE AND SEARCH FORWARD
... 'l-.....
881
882
883
8134
885
886
()
FILE
UIO
- -.- - ---.---- -- --- --.- --- -.- - -.,-,-- -
- - - -.- - -
.
- -- -- ----- -,- _.,-- - - - -
o
-- -----.---- -- ....... _-,-,-----.-------- --,--- -- ._- - -- -- -- - - - - - , - - - - - -- -,-,--,-- ------.--- - - -,-------
ASSEMOLER/OS3
V140 09/21/1~ 2229
01117"';(00'0 fa 01 . X
01120
341iJOU04
~
01121 ··15200001
~
(1';
!
01122 53200000
\.J1
01123
44100004
........... ,.".......... 01124" '''056U 0'77(t
.,
01125 01000564 P
()
01126 15477001
·············.. ··.. ········'01127 '1+41 DOnuLi·
01130
20004000
01131·0 07-0 ..1D6 bX·
... ...........
! 0
01132 14477776
01133 34100U05
(}""),
'.
!
I
""'0'1134"
I 0
01 OltO 565'P . . ,.. '." .......,.....
01135 20001034 X .
"'01136" '3ifTO'OO'O'4" .....
01137 01000564 P
I
!
0
01026 P
PAGE
AND SEARCH FORWARC
c]
L'OAO A FI LEMA R KRE'AUBI'f"············,·············· .. ··,············......................................................'............................
OR IT INTC THE STATUS
.. ADVANCE·Te·THE NEXT····WORD········
UPDATE THE CURRENT POSITION
"SKIPI F'I KTH £'1\£ XT"BeOCK
j;
....... ~~gR~~~~~·l~EE~gkNIER .....
LOAD THE FORWARD POINTER
· .... ··REkRTTE- TbE·8 L,·GGK·
THERE IS NOW ONE LESS BLOCK PAST
THE CURRE~T FILE BLeCK
o
.......~.!:T . T.l:1E ..... E90 JtII.INTO ... JJ:lE .... STATU.S ............,...................,. . . . . . . . . . . . ". . . . .
THE A REGISTER MUST BE NON-ZERO
AT THIS PCINT
1.0
0
0
0
o
0
o
()
o
0
o
(")
o
0
o
0 :;,:
d
i
On.
o
0"
Os
o
o
0'
o
:1:",tL
o
0'
C)
o
o
ASSEI'1E3LER/(JS3
Vi.O
01140 1460000 r
u1141 34100000
01142 00705064
01143 20111000 1+
U1144 0330476;)
011:45 ~'3IQU103 2
01146 21100007
01147 :l450000lJ
u11:5 0 031.04766
01151 20001015
01152, ·35··1·00u,06
01153 40100006
011S4 2010U004
U1iSS 04600775
01156 01001220
01157 14600001
01160 31100 O~S'
01161 11~201163
" .. 01162 01000276
01163 20100002
01164 LJ3001167
01165 IJO'70 1046
01166 01001172
PAGE
09/21/74 2229
975
X"""'"
,."
~9B
o
o
o
C)
o
989
990
····9Y1
P
P
P
X
992
··,..99,3,,··
994
995
'996
997
998
99'9
lOuD
1001
1002
1003
u10 v4
1005
1006
P
0122U 241Ll0005
'0122'1" ····Q3·2tli·161"P
01222 201U0002
01223 03001226 P
'01224 .... DO 7U1165" X
01225 01Q01232 P
a
o
8' ,
P
..
"
cc \-'j Fi'!
984
9HS ....
986
987
01T67 P
()
1-\
ge~
X
,.
01167 20100U05 n
01170· 03301264 ,
01171 00701076 X
[J1172 20004000
'U1173 u211000~O 5
01174 00700377 X
01175 24100005
OT176 156000D1
01177 34100007
012110 14600000.
01201 4410QQ!JL.
01202 40100005
01'203 n20fJOO623 X
01204 4001J4777
01205 40100002
01206 V07,JO 512 X
01207 21100003
01211.1 41300620 X
01211 40004000
01212 00701131 X
'01213,n ··OU'70'O 61?"Xn
01214 203Ll121Ll X
01215 llr7iJOQOl]
01216· ·····[+5 U·040fJ1······
01217 01001255 P
UIa
976
977
978
97 9
'980'u,
91:\1
982
P
P
?
1Y
HFt-'100
,fFMO
i'IFM 0 2
~J
1
teE
EtW
LOA
....AZJ,LT
RTJ
LOA
LeA
INJ\
RAD
ENA.
:1,007
1008
SWA
STA
···"'···l:UA·
STA
STA
RT J"
. ' . . .M ' u . .
8LKR,X1+CN8l:K
FIX
CORE
"··8:tKRX1+ CN(3 LK
F REEf-ItE
T8lKR
......... L X1+CN3LK
........................
TFl:,Xl+GN8l:K
................. 0 ....... "'
cpp Xl+CN8LK
8LK~, Xl+CN3LK
··aIT 23'·MH .....
CORE + WPFd+l
~'RT'J,'·'
LOA
ENQ
ST"AQ
UJP
1026
.. ·······1027·····
1028
102 S
103lJ
1031
n
WFM08·
~~E~eR.)(.i~.C.NJ3 LJ< ....
C8P,Xl+CNBLK
"'··r 4,.X 3+P SA
CORE
REWRITEX
. ·~'G·E TeOR E'
4,X3+PSA
RE+T
WFMO 7
LeA
BLKR,Xl+c~aLK
,..... M'.'.'.M.'·. ,.• M···ftZ:"d···(j'E'···· ~····.. ~I'FM·lJ·O··"··.. ·M ...'.'.'~
LOA'
COREP,X1+CNBLK
JUM·P IF ···A·I\;··"'·EM·F T't FILE
READ THE CURRENT BLOCK INTO IT
LOAD THE ~UHaER OF THE NEXT
FILE8l0CK"AN OTH ELENGTH'·' .""""""""'""""""'"'
GO FREE IT
PREPARE fa UPDATE
AD 00 NE 8 LeG K .. ....
UPDATE THE FILE LENGTH
cpp AND 8LKR WTLL80TH"'8E ZERO AT ...
THE END OF THE OPERATION
LOAOT HEFltEMAR K'COOE"
WRITE IT INTO THE BLOCK
AND STORE THE CORE POINTER 8ACK
GETAFILE BLOCK
...
LOAD THE CURRENT GLOCK NUMBER
·SAVEI IF OR THE 8 ACK POINTER
WRITE THE FORhARD POIl\TER
REWRI¥E THE 8LOCK
u"GET'A''''~'''El:e CK" CFeCRE"""""
LOAD THE LAST BLOCK NUMBER
ZERO IS ThE E~O OF DATA WORD
o
o
o
""",,.,'"'U
viRTTETHEBACK"PO'rrHER'"
GO CLEAN LP
o
o
.
o
~l F M G3
'"
AlJ EQ
........ RTJ'·············
UJP
o
"'>1-
UJQ
.STOM
STA
RT J
1017
lOU:
1Q19
....... ~; OJ
FIL EM AR KS'C oun ASI RECORD
ACCWORD,Xl+CNBLK
IN THE ACCOuNTI~G WORD
. SAVE
·SAVE ·INDEX·· REGISTERS AND FAULTS
CPP,Xl+CNBLK
LOAD THE STATLS WORD
FPV
JUMP IF PROJECT VIOLATION
"'CHECKFORA8N ORMAt; UNAVAILABLEu .'.
LPA'
Aua
LOQ
TFL,Xl+CN8LK
LOAD THE FILE LE~GTH
QSE S
0
SKIP
IF ZERO
......... KILL THEF
I t\K LE~GTH
.... .....
AZJ:NE
IOSNASH
LOA
SIT22
SET THE CrANGE BIT
SSA
EPP,Xl+CN8LK
STA
EPP,Xl+CNBlK
LOA
CPP,X1+CN8LK
GEf THE CURRE~T POSITION POINTER
ASE'
·····WPF8-1-' ", ........
SKI P'I F'· 'A1THE'E NOOFTHE8tOCK'
UJP
WFMO 3
THIS IS THE E~SY CASE
ENA
1
'S8A'
8 [KR·,X1+CK81.K·················
J~§iR~efLT ~~o8
~§ER~~g~~ING
ENI
"'+2 X2
ENTER THE RETLRl\
·CHECKTHE··FIlE SPACE ·LIMIT
·U·JP·
·"'0 VERCHEC
LOA
COREP,X1+CN8LK
LOAD THE CORE PCINTER
AZ J , EQ
WF MQ 1
JUMP IF NCT I~ CORE
RTJRESERVE
RESER VE T HEC eRE'
UJP
WFM02
'ENA
RAD
·RT J.
LOA
AZJ,LT
"'LOO
RT J .
."'1009
1010
1011
"1012
1013
1014
1[115
1016
R IT E F I LE MAR K
WFM04
'RESERVE
\~
FMO 5
LOAD THE CCRE POINTER
JUMP IF NOT IN CORE
o
'RESERVE ··THE CC RE········
r''''''
u1;;:26 P
1033
HFt104
EQU
*
012·2o·2{}lB 0"0,04
'LOk un ,u·'0PP,X1 +CNB
01227 37001151 X
103
lPA
t PB
01230 03101264 P
103
AZJ,NE
WFM08
JUMP IF AT LOAD POINT
...... "'RTJ ·······TIX·· ...~.. .
····REAU ThEuC·URR EN reco CK TNTOIT
. 01231 D D T O T 1 T r X T 0 3
01232 20004000
1038
WFM05
LOA
CORE
LOAD THE FORW~RD POINTER
0123 3 .... .21 1 ou DOS ..... ",.
............. LO.3 . 9..... .
BLKR,XL+.CN.BLK ...................LO.AD. .. THEJ\Ut'.BER.CE SLeCKS 8EYOND
...... wLDQ
0'·
01234 00701174 X
1040
RTJ
FREEFIlE
FREE THE FILE SPACE
01235 20100004
1041
LOA
CPP,X1+CN8LK
LOAD THE CURRENT POSITION POINTER
".•,' ••"'.' ..•. ,.,' ., ....., .·'IN 'AM, ,.
".1:.' .,u'.".'~ •• '.'.'''·'' ......~,. ".' , .", • '..... , '.'.'. """""U PO A·FE· '·'I'T"··'
''"·"O"i··2,3,6 .. ·"·i,S·6t}!}0,{}1,''····,~u ..'.'u,.' .. '.. ""'.' ...
···1·0'4'2m~'.'.
01237 44100004
1043
SWA
CPP,X1+CN8LK
STORE T.HE POSITION BACK
01240
536uuUOO
1044
TAl
X2+CPPX
SHA
.."';;;r··········
..························"'·····
G
12 4TTZD77776
........... ········1045·
01242 05640000
1046
ASG
400008
SKIP IF A SAVED FILE
D124J 1 5 3 7 7 7 7 4 . 1 0 . 4 7 .
... INI ..
.~3, X3+PS.A
BIA.S FORSCRAT CH.FILES
01244 241000D5
1048
LCA
GLKR,X1+CNBLK
KEEP THE TOTALS CURRENT
01245 05400000
1049
ASG,S
0
IF ZERC LENGTH ACCOUNTING IS DONE
,......~ ... ,......, ,.....,'''''.'''. ·'R·AD··,····u~.'.m.. '.'.'..u.unS,f·:3 L·KS','·X3+ p's·A"."'..u~'" '•••. ".,.,,,. A'£l .JU S·T···'·T'Q'T ·A~L· ·U'$'cR"·,8l0'C,K·g-.··'·"·····"'··· ...u. .,' ...~•.u•••m.' ,,~~~••. ,., •.•,•• ,,~,., ...... 'u•.
n'''~' m
...."••
0..1-24" 0' ,.m."3 4"o'u'u·'3'o'O· ,.7<...... ~, . ' •.. '~"."'m... ,...".,~.."' . ..u...,.M·~±·8' SuO
RAD
TFL,Xl+CNBLK
ADJUST THE TOTAL FILE LENGTH
Q.;
01247 34100007
1051
U
u
o
'h", '..
o
o
o·
o
u••.•.'.' ".,.••.,.•,
o
H
o
••" '••
u
Un.' • •
o
ASSEM9LER/OS3
Vl.G 09,21/74 2229
-0 :1.250---14700000
01251
41100005
01252 -54300334-X01253 200U1203 X
01254 45204001
-.. 01255"'20 G012 5J X"-"-"
01256
40180002
01257
20100004
01260 '37 0 uo Of ~P
01261
35000012 P
U1262 ····4010000-4······························
01263
01000562 P
o
o
o
01264
0070121~X
01265' "1 1.477777
lJ1266 40004001
0·1267--20100001
01270
01271
21100007
00701234 X
01273
40100001
01276
01000371 X
-x
-_."---- gt~~~ te~g-~~g~p
'01272 'Otl70'1'20fJ
o
o
PAGE
·····-1052
UIO
20
ENQ
STQ
1053
LOILOA
40~4
1055
1056
STAQ
·········1057·······_··- "--'vl FI'1"07-" ········_···l.:O·A-·
lose
STA
- - I~~6t~~
SSA
STA
1061
1062 ......... . . . . -.----
UJP
1063
WRITE FILE MARK
o
.. ----- CLE AR-Tlft--C dON r OF Ble CKslEi=-l'
BLKR,X1+CNBlK
BEYOND THE CURRENT BLOCK
·--RPSAPTR,X3+PSA·
RESTORE-THE FSAINDEX
8IT23
LOAD ThE FILE MARK CODE
CORE+l
X2+CPPX
STORE
THE
MARK INTO THE 8LOCK
'8 I T 2 3 - l 0 A O o
TH
E'AtTEI'ED-'INOTCATCR'"'
..... ,. . .
COREP,X1+CN3LK
STORE IT BACK
~ ~~-A ~R + CN8L KBE~RRJ ~ E8E~B~ La FK~~ ~ S
FMEODB
SET FH ANC ECC EITS
-CPR,X1+G NBLK-------STORE I-T EACK -- " ... -- .... _. . . . . . . . . - ....,. . -.. .-..... -...
FOUTW18
RETURN TO THE USER
~,."'o·..• o." ...... _
...
... RTJ
EN A, S --.... ---- GETCORE
777771fSTA
CORE+1
10E5
1066
1067
LOQ
1 Db 9
1070
':1.071""-'
1072
10.7' :3 -"--., .. ,, . . ,--10f4
•• - - " " " " -• • • • • • • • • • • • • ••••••• w
1075
•••••••
........
RTJ
RTj'
STA
ST~
ENI
UJP
.•.._ ..·......•• ., ........ ·•··.•..·.....•.
TFl,Xl+CN8LK
FREEFILE
"SEt
8tK
LP,Xl+CN8LK
_C.8P,.Xit_CN8.UC
WFM06,X2
FDZAP
Ol
w_.·.·.·..·· ...• ••·.·.·.•."".••__ .••.•..w __· •••__
.M ...... __. ,
. . __ . _____ G
o
o
...... ...--- .. -
bO~\LP,X1 +CN8bK
-. -'1-0-68-""
............................................ --"'---lC'
SET THE BACKWARD POINTER
LOAD THE STARTING-BlaCK-NUMBER
LOAD THE FILE LENGTH
RELEASE THE FILE SPACE
. "GETAFltE' BteCK"----
.~.
f)
o
.... ·tNtERfHE 'REfLRN' ADDRESS
TAKE CARE OF THE FILE DIRECTORY
o
o
--- ----"",,----- ........ _--_. __ ... __.. __ .
o
o
()
o
o
o
o
o
o
o
o
a.
0
o
o
1
....... _---_ ............ _._------"-------,,
..
o
o
o
o
o
ASSEM8LER/OS3
Vl.0
09/21/74 2229
012770U70 50b4 P
01300
013112110 (J·O·O.7·····
01312 20100U01
()
01313
007U1271 X
0131 l .241t)"00 07
01315
34377777 X
C)
01316
01.317
54301252
1'4600000
01320
401tJOOOO
01321···40100007
01322 14477776
01323
40100005
01324 1:.4417777
o
o
o
o
o
107e
1079
1080
2010000 Lt
··013010330476;) .. p
013U2 37077777 X
01303
40100004
0'130'Lr . "0300130 GP
01:305 15300003
01306 24001255 X
... 0130737100002
01310
U070U703 X
X
PAGE
21
f~ E LEA SE
1U83"
1084
1085
lOIrE
1087
INI
........ LeA
LPA
RT J
····LOQ
. ......... ·········1 OBE ..
LOA
RT J
LCA"
RAD
LOI
1089
1090
'10Yl
1092
1093
........... ····:C094··
1095
. 1096
ENA'"
STA
STA·····
1097
ENA,S
STA
"ENA,S'
1098
····1099····
STA
1100
S i .4
LOA" .
SSA
1101
'ffC2'
1103
1104··
1105
110 E
'1'1:071108
li09
"1110" .
1111
..1112· ..·
01332
01333
401uDl106
14201335 P
0133 4'0 t 0 tJ12 7 6X
01335
00705072 P
01336
2Q000013P
01337' "35100004
01340
40100004
0134101ll110571P ....
RT J
LOA
··AZJ, LT
LPA
ST A
"AlJ,EQ
10Bl
1082
01325
L~0100001
01326
40100003
0132720001227X
01330
35100006
................................ " (; 1331 3·7·0.77··7·7·7 X
RE LE ASE
UIa
·LPA
STA
ENT
U;:JP
RT J
. SSCP··· ······· .. LOA
SSA
RRCP
STA
·.. UJP·
FPV
SAvE nro EiR EGIs T Ef~S "A ND 'FAlJ Cis
LOAD THE STATuS WORD
JUMF IF PROTEC TV IOLATICt\·
CPP,Xl+CN8LK
+2'
3,X3+PSA
8 IT23
COR.E P,X i+CNS L K
CLEAR THE ALTERED BIT
'IN THECGf'E PCTt\TER . . .
SAVE
CPP, Xl+CN;3LK
S VB
~f.
REWfUTE
REWRITE IT
TFL·,Xl+CN8LK ......
LP,X1+CN8LK
·····LO·AD···THE···LENGT·HOF THEF ILE ..
LOAD THE FIRST ELOCK NUMBER
FREE THE FILE
FREEFILE
TFLX1'+CN8LK
T F8l KS, X3+PS A
... RPSAPJR,X3.±PSA.
o
.
.......... .RESTORE ...J.HE.PSA.I NOEX
ACGWORO, Xl+C NB LK
TFL,Xl+GN8LK
-1
BLKR,Xl+CNSLK
'777778LP,X1+CNBLK
~l~'~ ~1 :r.C.~ El.L. K,. . . . . . . . . . . . ..
EPP,Xl+CNBLK
N8IT1920
EPP,Xl+CN8LK
""+2,X2
POZA?
LPEOD8
·.... · · · · ..·CPP,Xf+CN8Lk·
GPP,Xl+CN8LK
U NSAVE
A STATUS·
.. ·
()
..
SET THE TCTALFIL ELENGT H···
THERE ARE NOW -1 BLOCKS REMAINING
BEYOND THE CURRENT BLeCK
ST'ARTI NGBt'CC\<:' Fe RZEROLENGTH'
SET THE LCAC FeINT WORD
..SJQRE.TJiE C.UR RENT. .BL.OC.K ... pOIN JER
o
.. ,:;:1.
1,0
SET THE CHANGE EIT
CLEAR CISToREAO AND FORMS8lTS
INTO THE EPF ~CRO
ENTER THE RETURN ADDRESS
TAKE CARE' GFHTHE"FILEDTRECTORY
RESTORE INDEX REGISTERS
PILE IS NOW AT lP AND EOO
. SET THE B I lSI NTO HlRESIATUS
AND STORE THE STATUS AWAY
()
o
()
o
o
o
)
o
o
o
o
o
o
o
o
n
o
()
7
()
a
o
'I.'
0':
>-,- - . - ~ -
- - -,_._- -
- " - ~- - ' - , - _ . _ , - - - - -
---.- -
---- -- -
.
_ . _ - - , - , _ . _ . _ _ . _ - - - - - . - - - - - - - . - . - - - . - - . - - - - - - - " - ' - - ' - . - - " - -~-.,- - . - - - -
o
- - - -, -
-
-
-
-,- -
-,-,- -
-
-
-
-
-
•. -
-
----,- --- -
-
-
---'--'_.-.- -
-
-,-- ---,- - - - --_._---,-
A SSOl8LE R/QS3
Vl.G 09/21/74 2229
PAGE
22
GIO
"";;;'",
1116
READER INPUl
CARU
>j.·¥·);.·¥:,..'>J.·¥·4"''1·)j.'Jf~·if..Jf.·>I-..>J.·>J.· >l-if.
"1-";;'
'5f."~ >J.',;,'''''Jj. 4');.);:",*':;. ¥ 'fo>J.' >J.·>J.">J;j.VJf·>j.·Jj:Ji.". lJ."Jf Jf"ij'¥'::;>;":i;.¥':i;. if"": ij:Jj:·i;. ¥'>j. "::""j,.'i;.':;.4J.J/."
~
.. ,. ··>f····CAROREADERINP UT·
. ,·1117
'f
1118
Jj..>J.¥>J.¥:;.Jf."I-:;. • • Jj..~"I->J.>J..Jj.J/.+Jj.Jj..Jj..Jj.4.Jj.¥¥ • • • ¥Jj.>;. • • >J.Jj. • • • Jj."I- • • ¥4.
····'··'··1 120 """ ",. "".,'"", ... ""."".......,..., . .,' ." ...•,."., ",., ......... ..
o13-42
1122
Ti23CRINP~lo
lI~~
01343
. 013442700·113SX
01345
03001353 P
()
01346 20300317 X
"01347 '033Ct'1353' "p'" ,
01350
007U5107 P
01351 1470000Lf
. '0'1352 ... 0 1'0 04 b 7 S' P
1126
.."
1127
.""""1:12" 8
1134
1135
01373
0..1.3.7.6..
READING
LOA
COREP,X1+CNBLK
>;.
IF
1148
DEBUG EQ 0, GO
.... LOA....... ···· .. ,....···········8LKR, Xi·+GNBlK·
ASG,S
Q
Hl T
FHJ
...... UJP
00704644 P
tUJl0.1 4.3 .. P
o
01410
li~~
G1GU1412 P
') "',· .. ,,",··,·········01422·
0';
...........· ...·.·..· . .···01424..
01425
01426
341/7777 X
0'
=tel,
0:
" .... , ................., ....... "',, ....
LOAD THE CURRENT POSITION POINTER
LOAD RELATIVE POSITION INDEX
... w· .. ·COKPENSATE .. ···FOR·1HEp·O·INTERS····.
LOAD THE INTER-RECORD GAP WORD
JUMP
IF NOT A FILLER RECORD
. '''NE'WPOSITIONIS NaY/zERO·. ·· . . . . ..
TO
.OEBUG001
0-
I.,
o
DE-BU G· , ......................." .................
DEBUG
DE
G
, ..................... .
au
•
GO SWIZZEL THE CONTROL BLOCK
GO CHECK.J. OB ...,1".O. RE. .... OA.IA.
REHRITEY
CRINPlr.i01..
2 010n005
03101432 P
J07 OS 072P
14677777 X
INCREMENTED
MAKE ANOT~ER
TELL CONTROL
l1bc
P . . . . . . .,. . , ...... , . . . . . . . . . . . . . . . . . . . . . . . . . . . . . '''7';:;,:; ... ,'', ........,....... " ......................................, ............................,"'..,~.............,..................
00777777 X
'"· ..·01427''' 5if3i:)1:'3:l:6X
01430
00705100 P
Q,.:1,.£;.3.1..0 1. Q] 7J]])(
0 . . . . . .,. .". . . . . . . .
FeINTER
o
o
o
SKIP· IFQ·TA.8LE NEEOST08E
01415R .................
'''''c RKl . ..·· . ·EQU·
01415
05600001
ASG
U1416
14477775
ENA,S
,·······' . . "014:1:7' '53"24' OOI} 0'" ·.. ·. . ···. ··". ,· . . ·,·"'· . ·. ·· .....·. ···,· . . ·". . ·,1 . ··,1,qi:;; ...................,•. , ................................,.................,.
0142D
05601000
01421
01001432 P
01423
0
IN THE FILE
SKIP IF MACRO POINTER
1163
1164 ,.,,, ... ,....... "..
O.1,L~llt01QO 4:(,]5
1;) """
INFOR~ATICN
o
.. ,····' .. ··0:1:4.1::2"'· 0'070510(" .£,.,.",.,.".
01413
14700024
0:
,.
,_.,).
"'U l'0I31~42Lr
01411
q
()
CARD
··IS·THEFILE·ST,ILL BEIt\GGREATED
01407 ·OSSiJQ!lD·O ............ ·.H··"···········.·····,··,·····..···
.H'.······,,·,·,',···..·,··
L
...... RESERVE THE· 8LOCKOFCORE
05677777 X
01001403 P
01403 203004:52
01404 13077755
UI40S'535lJOOOO
01406 14600001
o
()
~~·~b·l~r~~gb 2~~ NfS 8 t~cRORE..
+3
GRKl
. 'GPP,Xl+'CN8CK
SWA"
A CONTRCL
JUMPIFNCT
LOAC THE CCRE
FIX
UJP
•
+2
RTJ·········. ·.. ··············. · ..· .r.; ESERVE ..
LOA
CPP,X1+GNBLK
fAI
X2+CPPX
... ', .............. ·····XNT
· . . ·3',·X2+CPPX . ·········,·
LOA
CORE-1,X2+CPPX
Al.J
vJOR 0
NCT
IS THERE
01377 P
01400
01401
0'\
...FAUlTS
~¥1Er~hP~1~S~ ~~~r~~R¥0~I~~6K
TFL,X1+GNaLK
o1377·2D ·1·Q ·fW·(J 6
~Ol'4 02
o
CPP,X1+CNBLK
RTJ
00001374 P
U1375
STA
LOA
jj. N.D
IND I C..A..T E. J.HE ....US.ERIS ...
creoN n{oL
.AZJ ,.NE......... .
054GOOOO
01374
i:.
>;.
"'AttOWCM"TOR EAB'AT" EOO'··....·,· .....······ ..· .. ·..· ·. ·....···..·,··". ·
EXIT
CCREAD
. · ....,........···..·; . . . · · . 'A Z;:J, EQ""'CRIN P~I03
'113'6
01372·2·04~a005·-
JUMP IF
G RI NPI~O 2 LGL..NLP8FMEO·
01357
20100002
1137
() · · · · ·..······· ..········001360
03101363 P
1361 ·u070123i·X···········································
....
··,·····lll~
111+ 0
01362
010Q1364 P
............... ,. 01363 .. 13070 1221;. .. ·X
......................... . ··1141··,············,········,··
01364 20100004
1142
01365
536UODOO
1143
·····'it1366·" 152DU' 0 (;"1" , ....................... , ........... , ...•••.
.:t:t4'4' .,.". "........ .
11 Lt 5
01367
202037
01370
031D14
1146
·····Oi3Ti44iOOD
114T"
o
o
o
o
o
"j
• • J/. • • • • • • • J/. • • • • • J/.J/.
...HAVE·I~ESEENTHE·EOD
SYSCM,X3+PSA
RTJ
............ ENQ..
UJ P
1132
11,33
~ .....
.... .........>1: .....
¥~
S P>.VE.I NDEI< . EE 6.I .SJ ERS.
1 EdU"·Jj."
. ,.,",......" .. ·······Al:J;·· tr·''''·''c· RINPWO'2
11.30
20100007
. "01356D3001377P"
~
SAVE
LOA
'1 Li1
01355
EQU
RTJ
.... , . . . . . . . . . . . . . . . . . tge...~~b~~.~~C~8LK
AZJ,EQ
CRINPW02
1129
01353 ···27001451 .. p ...
01354
40100004
o
CRINPW
1121
P
007U5064 P
··········01343 P
2110000 1+
01342
., ...., ....... ,._........ , .......
¥
1179
1180··
11tH
1182
1'183""
l1tl4
1185 . . .
......... ''1186'
01432 P
1187
. 01 1+3211177777.· ............ 3 7..777 3 ····1188
01433
373U0654 X
1189
01434
403U1433 X
1190
D14'55'''l Lr6 0,0·0'01:· ..·· .""...",,, . ~ '~""~'1:l:91
01436
34100000
1192
-2
'''X2+C'PPX'' . '''''''' . . "......... "
CRK2
. .. RtlDQ N..E
EQU
•
LPA
T6,X3+PSA
T6,X3+PSA
..................... ECH,A
STA
..... E
N'A'~~'
RAG
1777T1B . . . . . . . . . . . . . . . . . ..
.' .......".........." '1' .. ,........,................................. .
ACCWORO,Xl+CN8LK
'
o
,
...
........................................
1
WPF8+2
CRK2
''''HLRR', XT+CN8[K
J,NE
CRK2
·,·GRTWA IT,A .. RTJ.....UNsAve
ENA
C Rt4A IT
IOWAlT
RTJ
lOSET
"'R ZW 'AIT·. " . ~'tDI'·" ..~ ···· .. ~·"RPSA p:rR,x3+pSA· .. · ."
RTJ
RZ
lJJ.t:...
'
.PLA.C.E ... unOCQt\TRQL MODE
, . , ",.."..
....:'t....
LEGAL. .... ...... , ................... ................
~ODE TO VANISH
PSA
SKIP IF NCT A FILE
o
MARK
, "COMPUTE . H'HERE'THE"RECORDWIt:t£ND .................................................. ,..... ,.
SKIP IF IT ENDS IN THE NEXT FILE
BLOCK
AREHE'IN
.
TEEl AS Ya[CeR
-_.-
ENTER THE 1/0 WAIT BIT
SET THE aIr I~1G THE FSA
. . ,L:O'AO'l'HE ····PSA .. ··PDtJRESS········· .. ·.. ····,·" . ·
EXIT FROM PROGRAM STATE ZERO
.SCR.~.MC lHCf,.b ER E.
MASKTHE,WOROCOUNT TO
1681T5
o
o
o
o
o
()
ct
ASSENBLER/OS3 Vlo0 Og/21/74 2229 PAGE
. ui 43 7 . 2U 2 {] 3 7 7l .
'1103
01440
03200044 P
. ·U1441·3 707 7177 X
01442
03000215 P
X
010U0044 P
01443
21301346
0144'4' 0550U 000'
o
01445
01446
14477776
0'1447 .... 34100000
01450 010U1135 P
01451
4277"l777
ura
CARD READER INPUT
LD/~
AZJ,GE
··LPA .
AZJ,EQ
LDQ
. QSG, S··'·
UJP
119 1-+
···1195······································
1195
11Y7
.... 119B' .,
1199
1200
ENA,S
. 120r
RALl
1202
1203
1204
,----" .
I~LP8F!vlEO
'''''---".,
UJP
OCT
CORE';':i, X2+GPP X
CRFI NPW
N8IT23 .
F INP W09
SYSCM,X3+PSA
0'
... '
C RFI NPW
JUMP IF NCT A CCNTROl CARD
~HECCKTROLKCDE 8~T
JUMP IF ONLY ~ FILE MARK
MASKO~F
-1
ACCWORO,Xl~CNaLK
F\~DSP10
AND RETURN
NOT (LP BIN F~ EOo) BITS
SET EOO
.,....
42777777
.......
,
........................................................................
()
o
o
o
o
.. I,.t.')
o
'0
:1
o
o
o
o
o
o
o
o
o
()
o
o
()
............................
,
............... .
o
0""
o
o
o
o
o
0'/
o
2229
PtlGE
·······.. ·······'1'20·7
81452 P
1208
2·03·0143L~·X · · · 1 2 0 8
53600000
1210
(I
ASSEM8LER/OS3
V1.iJ H9121/74
"'''''''''0 f452····P..
.......1
{j
o
01452
U1453
01454 05200002
'014SS'U"i8d 0 8'36 .. P
01456 01004b73 P
()
01457
01460
0'1461
01462
O·145J.···.p.··
20301452 X
53600000
056·0·000u··· .. ··
01601464 P
.. PJ4f?3. .QJQQ4.9(3 P
81484 P
()
·0·1464··00000570 p ..
o
o
o
o
U1465
U0000665 P
01466
00002122 P
01467"00002106P
01470
OJl~Z.L.
00001504 P
OU001477 p
···········Llf472·P
UIO
24
1219
'1'220'"
1221
1222
:1.223
1224
122·5
1226
1227
CRCNTRL
"1'231
~gu
LU
AND
~
A··········..·
TAl
lSG
······T6,X3+PSA
X2
2,X2
PCNTRL1·,X2
lAdORT
··UjP, I'"
UjP
CONTROL
~AF
OJ
LOAOThE·LSERSQ·REGISTER
FUNCTION CODE TO X2
SKIF IF ILLEGAL
OECODE'lH EREGU EST ..... .
HAVE NO MERCY C~ SINNERS
............ Da;
; j;
().~
c,'
·RAFCNTRL EQU
LOA
TAl
"........... ,. " .....·· .. ·"ASG ..··'· . ·
UJP,I
UJP
RAFCNTLl EQU
·00
>l-
.... RAFGNTL2·-RAF C NH.l
RAFCNTL1,X2
?AaQRI. .,.
CLEAR
RAnlFM
DO'
~f,L SER 10 lJS ...
...
RAFRWND
RAFSFPPM
............... .... .
~
OO-·STATUS
= CLEAR
=
01 -
RAFRLS'
00
R'APCNTL2 EOO
_-
LOAD THE USERS Q REGISTER
PUT IT INTO ThE INDEX
SKIP·IF··r LLEGAL . · .
JUMP THROLGH THE TABLE
()
()
JI.
· ...... ·STATUS· .
00
00
..
T6,X3+PSA
X2
00
..··1·2·2·8········ ..· .................. .
1229
1230
CARD READER,
'Fl SFCN T R"Ct'QU"""
1211
1212'
1213
1214
1215'
1216
................ ···1217
121 d
NSF,
,
02
WRITE FILE MARK
.n"O"3_ RELEASE'
04
REWIND
... 0::3 :: . $E .~.RCH .E.C..Rri.A RD ...PASL.F 1.L£ MK
0
U(,
·0
I.
I
0
0
o
0
l.;
0
o
0
o
0
o
0
0,
0
d
0
i
, O·
!
!',
0
0
o
0
0
0
'0
0
ASSEMRlER/OS3
V1.Q 09;21/74 2229
01472
2'5300252 X
1234
01474
01475
01476
20077777 X
01001337 P
03201506P
1236
12,)7
1238
" 1239
01477
01500
20100006
21100007
o1!+73
0540001lJ
01502
04577776
01503--010015-10·P
01504 14600000
01505
147JLJOOO
iJ1506
51005136 P
lH507
13UU0030
01510 ... 44100u04
01511
20100007
()
0151215477·776
()
U1513
1)3201517 P
015142010000 Lt
I] 151 5370 0 114 5 'x··
01516
0310147:> p
o
o
01517 03701475
01520 .. -03'50T532
p
P
01521
20100006
01522 . 2110 00 0 4
01323 17677777
01524
i7777777
01525037D1:' Lrl'? p.
01526
20100005
()
01527 03301544P
'01530-1460000 D'
01531
01001534 P
o
o
o
1235
1241
1242
1243
' ..........- ·1244···
1245
1246
UIO
RAF SEEK
T5~X3+PSA
RAFSEEK 'LDAQ
ASG, S
8
AZJ,GE ... RAFSK01
RAFAE
lOA
A E8
UJP
SSCP
RAFSFPFM lOA
EPP,Xl+CNBLK
LOG.
TFL,X1+CN3LK
-1
INQ,S
OS E, S
-1
,
...... UJP
RAFSKX,
RAFRWNO ENA
0
ENQ
'1247
124 S
··'1250····
1251
1252··
1253
1254
"1255
1256
1257
12-58
1259
1-260
16577777
01533
53040000
······01534 "2110:DO 05
01535
03401544 P
01536
401UfHiOS
01540
D1 541
37100006
01537 -24ll0T344 X
01542
0100DO 6
L"
25100002
01543
00701310 X
01545
01546
..
35Q0001l+
o
,.,
~-
~"
,~"""""~.-
.~"
,
~-,-
"
,
".",
.... ,
. . . . . 777778
RA FAE"····'··,
" . . . . ,.. "'" .. ". . ,' ..... ,....." ,.AQ;:Jrl::T"
LOA
8LKR,X1+CNBlK
AZJ LT ..... -"0"RAFSK04
....... 'ENA",
.............. .
UJP
RAFSK03
...
.. •.....
1268
126S
RAFSK02 XOQ,S
-0
AQA
1270
",u':1:27'1
RAFSKU3'L:O Q'
·····'··SLKR.,·X1+ C"BlK
AQJ,EQ
RAFSK04
1272
1273
t6~
~
~?~ i X:1,+C.N BL K.
"1274
1275
~P'A
EPP,Xl+CNBLK
'. ::'!A
E PP,Xl+CNBLK
1276·
LOAQ
COREP,X1+CNBLK
1. 77
1 78
RTJ
REWRITE
,~.
1264
1205
1266
1267
...........
,
,'
,.
... . . . ,
.. UfC AT ETC A SPE elF IE 0 waR 0
SKIP IF TCO lARGE
JUNPI F ··OK·
ADDRESS ERROR
SET THE UNIT A8NORNAL .".,.,....•.•.. ...•..... ..
,.'
lOCATE TO THE
END
Ii)cr
'
... RAFSK04·"EN'A'··''''171'7'7'S·
SSA
F PSV
C LEi:\J~)(
)
,
OF THE FILE
--_..
lOCATE TO THE START OF THE FILE
DIVIDE BY WORDS PER FILE BLOCK
SE TTHENE w- CURRENTP'osITlaN
LOAD THE LENGTH OF THE FILE
DECR EM ENTIT 8·Y-ONE
JUMP IF THE FILE HAS LENGTH
LOAD THE STATUS WORD
MASK THE: ABNORMAL/UNAVAILABLE SIT"
ADDRESS ERROR IF A/U
JUMP IF ACDRESS ERROR
'JUMP IF NeTTC THETASr BeOCKLOAD THE ENG FOSITION POINTER
LOAOTHENEWPOSITION
MASK OFF ANY GARBAGE
''';JUMFIF'A N' ACDR ESS'''ERR 0
o
iO
... ·;t
o
o
JUMFlf . THE fILE_IS .E.MPJY.
c)
,
..
, .ll.J?
01000666
... ... •..
. . . . 9~~7~§+CN8LK
~~2
AN Q
1261
1262
12Er3
0
RAFSK01 OVA
KWPFB
SH AQ
24
RAFSKXSWA'
CPP~X:1.+CNBCK·
lOA
TFL,Xl+CNBLK
. . INA,S
, .. -1
,.
. ...
AZJ,GE
'>'<+4
LOA
CPP,Xl+CNBLK
l:PAAUB
"
Al J , NE
R AF A E
AQJ,lT
RAFAE
AQJ ,-NE
'-RAFSK02
LOA
EPP,Xl+CNBlK
1248
,
01532
01:544 '146'77'771
LEAVE THE NEW BLKR IN A
··"···LOA BTHEuOLDStKR
JUMP IF NO BLOCK CHANGE
SAVE THE NEW 8LKR
'8IT'21'SEZ POSITIONER READY
SO CLEAR IT I~ THE EPP WORD
LOAD THE CORE peINTERS
AND RE~RITE TrE CURRENT SLOCK
CL·EAR·······ALL·· BITS'IN ·····lHE·'ST·ATUS··· ..... ·.· ...... ·.....
EXCEPT REAO-C~LY AND SAVED FILE
,,,.,
o
.'_'0'
H'·.
o
o
o
,0
!
25
1240
U15UT . '15577776
()
PAGl
Q.
o
o
o
0····
0,
b
,
'"
'" ,_"
H
__' "
" , ••• , . . . , ' " " ' "
o
o
o
o
cr·
".
(])
()
['c
~
I{
1
AS:::..EIH3LER/OS3
Vl.u 09/21/74 222'-)
PAGE
""""·"LlfS47·007uSUb4· P"
12b4
0155U
11177777
37777 3
1285
121:\6
·""0155~ . 3~3J1457 x01552
40301551 X
1287
01553 0300500U P
1288
Ot554··1420155tr p.
"128·S
01555
01003212 P
1290
01556
010u4772 P
1291
·lf1557 146rHb33P
1292
1293
()
1295
1296
. ··-'·1·2 9']'··
II
·01560·40301214'X
01561 21100004
01562 27001?15 X
01563· ·03TJ4766P
01564 27001475 X
0
o lS 65· ···0 31 O·4··6·{·3··P
0
01566
01567
20100006
37001537 X
····"·'·C1:570·········05101617···P·
o1 57 1 2 (l 1: a 0 0 0 7
01572
03000566 P
0
·'01573·201000 or
01574 40iODO!.l3
··0157S···0070·1361· x··
01576 20100007
01577 31100005
0
· ·. . ···01600. . ····15477'178······
01601
.. 016.0.2
0
01603
40377777 X
.12.0.77.766.
536l1iJOOO
20204000
01605
0·OIQ·1212X
01606
00701575 X
01G07
20301601 X
o161 0 ·····~·17 6t)0 7"77 ..
01611
53600000
016U4
0
0
01612 2U201.. UOO
·OT613 "QOlOISO·S01~14
?OOQ156?
V16l5~4~uoa~~
0
01001521 P
~····Ot 617
201:0 tll102''''
0.
01620
U3101623 P
01621
00701606 X
OT622 .... II iO 0 .1:624 . P
OJ
D1623
0:
0 ..
'..)
0')
20100004
01632
01701:5~O~X.
01633
20301403 X
5·35000Gu,,,··,,,
21301552 X
01:634'
01E35
01636
-.::1C1: .
OS5LlOOOl
····OT637 ···orOOf65·D·P
01640
01642
201uOOD5
U1641"031D1b54P
01643
0
UQ701363X
01625
53600000
'·"'·"01:626iS2uDDO 2
01.627 P
01627
53430036
01530·· 203lT0546T
01631
7763400u
0
···,·······01644·
01645
201000U6
17677777
~156D0002·
164i'7777
13U6
·RTJ·
ECHA
LPA ..
STA
.>f:.Y >f*¥:.>J:.>f.'f. 'f3' ..''f ..¥
'1-
1324
i325
1·3·2,5,"",..
..··'
.(})
"f . ¥:.:;'. 'f . >f ..¥:.1t- ..'f :" ...>f. .;f..>f.. ¥ :>f.. '1: ...'1-.. '1:. Of ..'*: ¥ ..:'I::.'PI-..>f .'1:."1: 'f "I.. "f >f -'If .'1-. 'f.'I- J(...-If ¥'f:lJ:"f¥3f."""'>J-. "f..'I--If.
"f
F4,X3+PSA
CPP,X1+CN8LK
LOQ
LOL
A"ZJ,NE
...................
m~··'·
AUg
rOsMASH"·
AEB
TFL,X1+CNBLK
r~l,E.~.
[~~kI~CN8LX
STA
RT.J···········
LOA
"..... . . .
. ...
C8P,Xl+CNBLK
······FIX·············
TFL,X1+CN8LK
BLKR,Xl+CN8tK
seA
-IN A·,·S"·
STA
. . . . _:1:'....., ...•.•,.,.
T3,X3+PSA
.....~.9................
......... SHA
TAl
X2+CPPX
LOA
CORE X2+CPPX
... RTJ ....,....RE~~RfTEX
RTJ
FIX
LOA
T3 X3+PSA
,f\
PPX
X2+CPPX
irEx·····
.
..
····'SAVE··THERETU RWAODRESS·~··"mLOAD ThE STATlS WORD
CHEC.KfORABNCRMAL/.UNAVAI.LABLE
"·TERMINATETHE ·USER·IF ASt\ORHAl
CHECK FOR ADDRESS ERROR
. H···CCREP,X1+·CN8:LK . .
RAFX 0 3
FIX
~
R~~~
1.
..1 R T J . .
1346
RESERVE.
LOA
TAl
CPP Xl+CNBlK
X2+tpPX
u····'·f N ] ; - ' X 2 +C P PX ..
RAFX06
EQU
11tt~·L~l·'·····
1349
··1350
1351
ACR
UJP,I
RAFR02
LOA
. . . . . . . . ,......,......
t·· . ···r·A I··' .M'..
LDQ
1355
QSG S
· ] . 3 5 6 " UJP L ....
1352
........, ........•....,.... ····1··3'5·3
1354
1357
",'
()
1,0
LOAD THE LENGTH OF THE FILE
.. rg~Kf.~Ez5~2EEl~~·~JjAOORESS
PREPARE
o
SUBTRACT 8l0CKS REMAINING
.SHIFT .. CFFTHEWOROPO'.SITION ..............
TRANSFER THE ~UE DIRECTORY NUMBER
LOAD THE SUB CIRECTORYADDRESS
REWRTfE J·HEOIRECTORYSLOCK
READ THE SUB DIRECTORY SLaCK
LOAD THE DATA BLOCK ADDRESS
REwrHIE IPESC8CIRECTORY BLOCK
LOAD THE P05ITIONER READY BIT
LOA
RESERVE THE CL:RRE·NT .BLOCK
LOAD THE CURRENT POSITION
RETURNINP-ROGR tiM STATE·
RAFR04
8LKR Xl+CN8LK
13S8..AZJ,.NE....RAFR06
...
1359
LOA
EPP,X1+CNBLK
1360
ANA
777778
..••... . . . ....................' ··,······1···3· EI"1:······· ....•....•,...•••....... .•·... ·. w.'.·, .......". ··-TN·A·····..· ·..·····....······ .. ·'2 . . .
1362
XOA,S
777778
o
JUMP IF 11\ CORE
RE A.D IN lHE O.AJABLO.C.K
....... ·F4, X3+PSA
SELECT,X3+PSA
1:
o
o
o
'''LOAiJ·THE·GORE PCINTE
ENTER I{AY
PROGRAM
STATE ...............
THEqVICK
DIRTY
.... ........."
.
T6,X3+PSA
...
o
o
·····t EAVE····THE···RELATIVE'·S I: CC K'N UM BER ..·· .. ·····,··,··..·· ..
. . _. . . 6~.~. ~.~ t~s A
····X·l:+··C·NH·L' K ............ .
"..••. , •• 1.
Ie READ IT INTO CORE
·····REAOIN·THE· ·OIRECTORY·BLOCK
LOAO THE LENGTH OF THE FILE
SET IT·IN TO-IH E EPPWCRD
. . , ...... ········'···1:3 4·5"·
()
'I-
, •••• m~ • •• , ••••••• , •••~., .........
13
13 4
--, .•,'';
•
. . " .. - ............................
LOL
AZJ ,NElABORT
·HAVENCMERC Y· CI\ THEIRS CUtS
LOA
EPP,X1+CN8LK
LOAD THE EPP WORD
LPA
8II21
LEAVE THE POSITIONER READY BIT
..-AZJ',.NE·'······RAFX01M ................... ·····················"dUHp····lp····PCSI'TTCNER··READY··
...........,........................,.,.".........................
LOA
1319
1322
RAFR02
····FtAFX·'··STA
···1,3108··
_1,,32,.,~:t
CHECK FOR ILLEGAL WRITE
WE GOJAN .. .ILLE.GAL W.RITE ....
ENTER THE RETLR~ ADDRESS
o
1314
1315
··T3TE
1317
"·1:321:'
;)0:-..)
JUMP IF WCRO COLNT IS ZERO
SEARCHING THROUGH THE MAJOR AND MINOR ACCESS FILE BLOCKS
.....CQBE . :I.S.Qf:UJ':\lNJ:U.. ANO .. T.I1.E.... C.BP.. I.S ... R E.AD .. I.N 10" .IT ,.IF. NE GE.ssA RY
THE ROUTI~E EXITS IN PROGRAM STATE WITH X2 = CPP
1311
1320
ZWCZERO
IRCHECKB
....... L.RERRORB . .
.. "'+2,·X2"···
."f.. 'f...1f.¥..'f.>f..¥:.,'f.;f"".'f?f'f>f
BIT MASK FOR
ROUTINE TO PERFORM INITIAL DIRTY haRK FeR RANDCH ACCESS
·" . ,······""·'tOCA..TES-TH2'CBp·'PROPERtY-TF····· 81T···21······1 N· -EPP'IS"·Nor··SET·-8Y'·--'··
1·31-0,
1312
ENTER THE
SIXTEE~
THEUSERSQREGIS~ER
··T6,·X3+PSA···
T6,X3+PSA
AZJ,EQ
ENT'·
UJP
. UJP
ENA
1307
··1308
1309
.............. ··········,····,.,····1:'3t··3······
··'··'···S'Ii,VE'·'
1777778
x
D1E16
01624
1304
. ··1305-
REA 0
RA F
R~t\FREAD
1301
1302··"
II 0
I
UIO
1298
1299
1300
()
i
I
26
RESTORE THE Cl\8LK INDEX
LOAD THE kORO CCUNT
JU Mr:·I"F··DC NE
ARE WE IN THE LAST BLOCK
JUMF.IFNCT
ARE WE AT THE END OF DATA
AJ~O
o
o
o
o
o
o
o
ASSEMJLER/033
Vi.O 09/21/74 2229
0164653l40aoo
01647
031001U7 P
. Q 16 SO· . .s 32Ll 000 [).
01551 154?7775
U1652441U0004
······01653·0DOO'0564'u
0165 tt
5320lJiJUO
U1655'f5476177 .
01656
03100107 P
G
01657
JOOD1660
01660
20004000
'01661 .... ··tlO?U1613X .......,.
01662 00701621 X
01663
14477776
···ou1664J[d.u 00 05
01665 142LJG002
o
o
o
o
01666·01·00·1627P··
PAGE
1363
1364
1365
1366
27
UIa
RAFR04
1367
13G8
1369
J,<
1370
"J371'
1372
1373·
1374
1375
'1376
1377
.. . .131.8 ..
1.37 9
1360
·1381
RAFH07
RAFR08
RAF READ
X2+CPP)(
AlA
AZJ,NE
FINPW02Z
TIA
X2+CPPX
INA,S
-2
SWA
CPP,Xl+CN8LK
A9/jMP¥A.15jREACF~
VFO
X2
TIA
.......
... -WPF8-2"
INA,S
AZJ,NE
FlNPW02Z
VFD
A9/JMP,A15/~+1
LOA
CORE
JUMP IF NOT END OF DATA
SETTHECURREt--T POSITION·
GO CLEANep
A.RE. WE ... AJ.. TIjE . . ENo . QFTHE.BLQCK
JUMP IF
RCO~
IN THE CURRENT BLOCK
LOAD l'HE FORWARD POINTER
RT::J""''""'"'" "REW RIT E X - " " ' A N O " ' R E WRI TETn E····· BtOC i("'"
RTJ
FIX
READ IN THE NEXT BLOCK
ENA,
S
-1
. . . . . . . . . . . . . . . . , . . . . . ,KEEP..IHE .. C.O.NTRO.L BLOCK.. CORRECT
'RAD . . "'HL"kR,'Xl +CN9LfC
ENI
2,X2+CPPX
SET THE CURRENT POSITION
·UJP
RAFX06
...
.... ,C)
(),
f.
0
-_.,,'.;
0
c)
o
o
o
o
o
o
o
o
o
o
,0
cY
o
10
o
0
o
1:
o
o
o
.......•...,
....................................................................................... .
o
o
Cl)/
Vl.0 09/21/74 2229
Pt\ GE
28
RAF \'jR1TE
uro
···············uT667···.. 2 OTu"OO'O 4·················
... f3 i ) t t ' t < A F HRI'IE"'Cb A·..· ..····· ..······ .. C·Pp··; ..5Ci+CNaCK· ..·····················Toifo····TREST AT liS wCfR d
ASSEM8LER/OS3
01670 03304763 P
U1572 03104766 P
01673 20100004
··l,t15?q:·M-370·111S64···· X
01675 03104673 P
···01671·37001562·· X····· .....
·······HIg~?
()
f~~Hi¥~t ~..
AZJ,LT
FPV
JUMP IF PROTECT VIOLATION
bPA·· ··········AUg························
... ···CHECKFOR··A6t-;C RNA L··
1387
AZJ,NE
IOSMASH
TERMINATE IF A8~ORMAL
1388
LOA.
CPP,Xl+CNBLK
LOAD THE STATLS WORD
. ······ .. ··131Yg········· .............. '. · · .. ····LPA········ ..··AEcf'·..·······tEA"VE·'·THE··ACGRESSERROR'·'8Tr····
1390
AlJ,NE
ZA80RT
HAVE NO MERCY ON SINNERS
1385
1386
....... ,. . . . . 11~1~~I····. ······~~M·~x2·~~¥~R·T~~£U~~~dR~EX~6~~~§
017UO 01000252 P
1393
UJP
SETUPF5
..... ···0170·1···3410·0004· .. · .. ····· ....... , ... ·1394· .. · .. ··....··· ..· ..· · .. ·.. ·LGA···· ..··.. ··C pP·,·X·l+CN13LK· ..· ............... ········CHE CK .. TOSEE ·IFTHE· FILE·MUST·
()
01702 53600000
1395
TAl
X2
BE LENGTHENED
01703
20100005
1396
LOA
BLKR,Xl+CNBLK
..• ""'U':1:7 0'4······..·t 4'lO"n '2' 0·2·..·····..·. ······· .... ·. . ·· . . . . . ·..·""........·. . . . . . . . 1-3'9· ...........-.............. - .................. " ,,,..........,,.. ,.....·' . l:'N'Q..·. . . . . ··· ......'·. . ··-· ....1'. 3 0· ....·. . ·........·..·. . . . ····, .. ·· .. ·.. _. . . . . . . . ·. ·.... ·.
01705 03601730 P
1398
AQJ,GE
RAFWZIP
01706
50005136
P
1399
MUA
KWPF8
................................ ge)
. ....... ....... 0170 7"'2 ITd'(J a06 . ·····
.. :1.4'0'0 .... ····
..··.."[0·[1·····...... ·····..···Ep p,'xr+"C(\fSLK
01710 17777777
1401
ANQ
777778
····U1. 71·1· .. 53040000
· ..1402·
·AQA···
.............................
01712 5324000G
1403
AlA
X2
01713 13000030
1404
SHAQ
24
U17t 1F·ZO·3U1075" X·
141J5··t:OA
F8, . X'3+PSA· ....
01715 037U1730 P
1406
AQJ,LT
RAFWZIP
JUMF IF THE FILE DOES NOT NEED
01716
03401730
P
__
..
_
1407
AQJ
EO
RAFWZIP
Ie)
rO'
..... BL... L EN Gl.H.E t\EP
01717 '1657'7(77
1408
XOO:S
':';'0 ...................
01720 53040000
1409
AQA
········01721·· 211000 06
.. 1Ll-l0....
LOQ
''''''0
01722 17777777
1411
ANQ
01723
53040000
1412
AQA
..... ····0 . 1'7. 2'4. ·....·'·1'3. 07"7' 7 4l""
.................................
., .................. 1'1:1':1:'·3. . ·....·..· . . . ,..._...............,......."...
·SH . AQ·· . . . ······ ................. 2·4· .... ·......., . . . .
01725 51005136 P
1414
DVA
KWPF8
LEAVE THE INCREASE IN A
01726 14201730 P
1415
ENI
·+2 X2
ENTER THE RETLRN ADDRESS
'0172T · . OiOCI02T6···P
·········· . ·. ·1416....
UJP
·····O'VERC. HE·C·
CHECk . . TRE" FILE" SPA"GETTM II'
U1730 P
1417
RAFWZIP EQU
•
0173 O.... 2.DOll13 27.X......
..1418
LOA . ·..·
. BIT22·· ..···
. Lo.AO. THE ALTERED ...81·T.
01731 35100006
14 9
SSA
EPP,X1+CN8LK
SET IT INTO THE €PP WORD
01732 40100006
14 0
Sf A
EPP,Xl+CN8LK
AND STORE IT EACK
···tOA o "lHE""L'ENGTH'O F"TH E .... FIt:E.. ...............................................................................
'01733· · 2 t J l u O O f J 7 · · ' L f J A · · ' ' ' ' · · ~........r- FL i X'l+ GN8L'K'
U1734 03101774 P
1422
AZJ,NE
RAFW02
JUMP IF NCT-ZERO
01735
00701264 X
1423
RTJ
GETCORE
GET A FILE CORE BUFFER
01736200013Q6 X
142'4
·..· . · T m r · E n r 2 3
SET rHEACTEREO"aIT'"
01737 40100002
1425
SfA'
COREP,Xl+CNBLK
IN THE CORE ACCESS WORD
· .... GET . AFltE .. 8LCCK ......................... .
.017l.0 .. 00701272 X
............ 1·426
··RTJ ..·..··
·SEL8 LK
....
()
01741 40100001
1427
STA
LP,Xl+CN8lK
STORE INTO THE LOAD PCINT
01742 4010UQ03
1428
STA
C8P,Xl+CNBLK
·. Gf:T·· . .
..·. '8·l::·0·C"I<·. ····F.. CR . · . T·H·E...................................................,...................................................................,..........................
"'1'42"9 ,..,.......... .......
...............,....................... ·R'T . J . . ·. . . . ·. . . . N. ·....·•. . ·. ·. ·S.
t ..K.. ·· . ·. ··· . · .... '.............................,.
.
01744 40004UUO
1430
STA
CORE
SECOND DIRECTORY LEVEL
01745 . ·····00701735
00701661
1431
RTJ
REHRITEX
AND REWRITE
1ST-LEVEL
BLOCK.
··01746·
"'1432'"
..... ""RTJ" · · · ......······.. ··. . ···.. ·G·EIC·OR.E·
GETA'8L
OCK"OTHE
F"CO RE'"
............
....
01747 20001736 X
1433
LOA
81T23
SET THE ALTERED 8IT
017-511 L"Gl0D 0 02
. ·1434··· .. .............................
ST. A........... ········ . ·COREP ,Xi+CNB LK
.... ·IN . T HE CORE ACCES·S·. ···W·ORO
01751
00701743 X
1~35
RTJ
SELBLK
GET ANCTHER FILE BLOCK
01752
40004000
1436
STA
CORE
STORE THE BLOCK NUMBER AWAY
. . . . . . . . 01'75..3 . . ·..·. . 00-·'7·0·1. ·7 irS . . X......................................................... . . ·. . . . 1:·4 .::<.r..7.....................
... . . ··•·.... ·. ·· .. .·· . '. . . R·T·j· . . ·..·................................ REWht·I··T'eX..... .·. .
. REWR IT e"THE . ·. 2 N' D-tE V E !.::·Bt·CCK'.·w".. ,..... .. . . ."...~. . . . .
01754 00701746 X
1438
RTJ
GETCORE
GET A SLOCK CF ceRE
01755 20001747 X
1439
LOA
B1T23
SET THE ALTERE08ITIN
THE CORE .
'ACCESS}IdRO
...........................................
'01756'401000 Q2 T 4 4 · O · · S T t r · C ' d R E P , ; ( 1 +CNdL K
01157 14477777
1441
ENA,S
777778
SET THE FORWARD AND BACKWARD
.0176040004000..
....1 . 4 . i . 2 . S T A C O R E
POINTERS OF THE· DATA BLOCK TO
01761 40004001
1443
STA
CORE+l
ALL ONE BITS
01762 14600000
1444
ENA
a
'··H "'u1763'401:CtOOOS ....M......
····.···......·······....······1"44
Sf A""''''
BLKR··X1+. Cl\BLK ........ ·· .· ....... ' SET 8 LKRTOZER c·.... ··. . · .·. ·.·. . ·. . ·. . . . ·. . . . · ·. · . . · , . . ·
01764 14600001
144
ENA
l'
01765 "O'OlO'110'IX
40100007
1447 . ·. · ...........
STA . ···. · ...... FLoAl'·····
TFl Xl+CN8LK
SET TFt TO CNE
01766
········1£+"4S····
···....··RTJ·······
................ .
FLOAT "THE'CURI"E NT'S[OCK
01767 20001614 X
1449
LUA
6IT21
SET POSITIONER READY
01770 . 35.1 0 0 I J 0 6 . 1 4 5 0 · · . ·SSA· ....................EPp, Xl+CN8LK.
01771 40100006
1451
STA
EPP,Xl+CNBLK
01772 142U1774 P
1452
ENI
~+2,X2
ENTER THE RETURN ADDRESS
·...... ·0·1·l'·7·3" . ··. ·0' ..1·f]u·133 Lr· .. X.· . . , ......,................... ·..·· . ·. . . 1·45'. 3' .. ·. . · . . . . . . ,. . . ,...............
·. . ·UJ·p
. ·. ·. . . 'F·rrZ·A·p....·. . . ·. ·. ·........·. . . ".... .
····TA KE"'CA RE . ·.··Op. "T·HE.... PILE.... llIREC'r ORY ....... . . . . . . ,.....................................
01774 14601776 P
1454
RAFW02
ENA
·+2
ENTER THE RETLRN ADDRESS
01775 01001560 P
1455
UJP
RAFX
PERFCRM INITItLIZATION
·····RESTORE·T HE'eN8 [K INDEX
0177fi2030 1633 x
f'4'SE'
·"lOA·sELECT; X'3+PSA'
01777 53500000
1457
TAl
Xl+CN8LK
0200020001755 X
14 58
... LDA....
8IT23
....
SET. THE ALTERE 0 8 IT INT HE
02001 40100002
1459
STA
COREP 1 X1+CNBLK
FILE CCRE BLOCK
02002 53200000
1460
TIA
X2+CPpX
IS THERE ROOM IN THIS FILE CORE
atoCK . . . ·.... •·. ·.. ·..· ................................................,......
"·0 '2003 "Hi 54 7bY .Tl······ .. · · · · ·
. ·1·4 E:l··.. .......... ···. ·· . · ....·............fN·AfS· . ·....-W P F B-2' ..........................
02004 03002027 P
1462
AZJ,EQ
RAFW08
JUMP IF NOT
7'~
()
()
o
o
~·
o
M
,0
o
.............................................~ zO)
.......................
o
o
u
()
o
o
·O·1:·?4~3·""'·""O"O·70·1"·?i.FO
o
o
Et~1
o
~
°
I
d'
·~·A·NC·THER
m ......... ......M .
o
o
o
o
0 .."',
3:),.
o
o
..
_----------
ASSEM8LER/OS3
CD
Vl.J 09/21/74 2229
rr200:;
16477777
0200613000030
·. 020·07 20301714
02010
03100463
02011 15277773
.H020 12'532 (JOOOO
o 2 0 1 3 , t 4- 1 0 0 Ij 0 l~
02014
000(J2G15
02D1520iDOG05
02016
03102024
020 l I 5 3 20 0000
D202i.!
21100U05
02021
17777777
(J)
()
()
X
P
1472
P
···1473
1474
1475
':1..476
1477
1478
1479
1480
·1481
1482
1483
'1484
1485
02024
146000UO
02026
01000564 P
02025 ····40301635 . i<
0
·00002030
02030
20100005
020'31 . 05t01860 P
02032
00701751 X
02a33
400iJ!tOOO
02034
211DO DO;)
0203S
45301472 X
02·0·3·6·· 20100 O!lt
02037
U0701753 X
02040
00701662 X
020 41H2lH 000 0/'
02042 17600777
02043
03102060 P
"·0·2044 ·····u070 2032 X············..· · · · · · · · · · · · ·
02045 13000030
··02046 201000a7
02047
12a77766
02050
53600000
020 5t· "'41·204 DOt)"
02052
20002000 X
02053
40100002
o 205413000TJ3a"
02027
0
0
0
0
0
02055
o20S6
0
02057
00702037 X
DO 70·1754 X
01002066 P
1486
1487
141::,8
····1489
149 Q
1491
·1:492·····
14Y3
1494
"149'5'
1496
1497 ...
1498
14·99
....... H... H............15tl.O .H....
1501
15Q2
":LSu3
1504
1505
i50 E:
1507
:1: 508··.
1509
···02060 .... 20tuOtl 07'
02061 12077766
0
02062
53600000
0'
02071
4010iJU07
02077
40204000
1)
0'
02101
02102
00702056 X
14477777
02104
o 21 as
4500 L;000
aLD 0:166 5.P
o2IU32T3·O·ZO·Z5X
·· .
RAP~Jt'4····· ttl~r
'SHA
TAl
. . . . . . ."" .........
H
•• "
RAn416
0}
o
'0
-9
X2+CPPX
-Lm:~'GORE',X2fC;PFXLOAO
RTJ
RAFIH6
REWRITEX
RTJ . F ' I X
. . . . . . . . . . . . . . . .152.9..........
~OA
........ U J P. .
()
o
()
()
..• . TFtJX1+GN8lK ·· .. ······"·tOAO··IHE .. F·IlE . . LEN 13TH'·
..
THE ADORESS·OFTHELOWER
.REAO . "j'HE BLOCK INTOCORE···················. . · · · · · · · · · · · · ·. .
lOAD THE FILE LENGTH
TAr
X2+GPPX
LOAD THE CPPX INDEX
......................·...............INA .......... ·. ". ·. ·.... ·· ..·· . 1··..... ·.·. ··.. ·......···. ,,···....... ·............· .................... · .... ·"I N eH'E'A'S E......·r He. ··L:-ENGT
1517
Sf A
TFL,X1+CNBLK
AND STORE IT AWAY
1S18
ANI
777B,X2+CPPX
MASK TO THE LCWER NINE BITS
·"Tm\·BIT23·· ...........
SET THE AL TEREOB IT' INT HE eORE
1519
:1:520
STA
COREP,X1+CN8LK
ACCESS WORD
1521
. SI~A
. ERP,.X1·+CNBLK
·····CLEAR·THE Et":G .. POSITION .. POINTER
:1:522
LOA
15 X3+PSA
STORE THE DATA BLOCK ADDRESS
1523
STA
GO~E,X2+CPPX
INTO THE MINOR ACCESS 8LOCK
"':1::; 2'4'" . , u.".· ..·........·..
-RT'd"REi4RIl'EX
'RE W·RITE·"THE··MIN CRAccess .... sLOCK· . ··. . . ·· ........···. ······· ........····. ···· ..·..........................................-.. . . . -...............~..
1525
RTd
GETCORE
GET A BLOCK OF CORE
1526
ENA S
777778
ENTER THE NEW FORWARD POINTER
[O(.r'··
T6,'X3+PSA'
TOADTHE·8AGKhARDPOINTER·········
...........
Tr;;2T
1528
STAQ
CORE
SAVE THEM IN THE FILE SlOCK
1514
i513
"'i5'16
02072 17200777
.... 0 20T3·200020 52 X .
02074 4010lJ002
o2 07 54410 00 06
02076 20302035 X
. ··u2:tOQ..OG702frb 4 'X' . . . ..
UJP
:1:512
20100007
02067
536UOOOO
"'!J2 07'0"'" 156 Q DfrOt .. ··· . .
!.CL
u·."
... .:1.513
02066
Q::
....
"1511""
0206 5iJo. 7. Ct2040.X
RA F WRI TE
.. 717778
XOA,S
3HAQ
24
LOA
·F6,X3+PSACHECKTH&-WGRC COU~T
AlJ,NE
FOUTW05
JUMP IF NOT FINISHED
-2,X2+CPPX
INI
ADJUST SLIGHTLY
·TIA····
X2+C PPX"-"
.. "'CU RR E NTP CSTTTCI\INDEx" TO' (A) ..
SWA
CPP,X1+CNGlK
STORE THE CURRENT POSITION
VFD
A.9/J.~IP.,.A15/~.+.1
...... ENTER .~ON.I..lCR ... STJllf . . . . . . .............................................. .
"LOA
BLKR,X1+CNBlK
ARE WE AT THE END OF THE FILE
AZJ,NE
WRITERTN
JUMP IF NCT THE LAST BLOCK
·········. . ·. · · ·..· · ·. ······TIA······
X·2·+CPPX·················..· · . · .. ········..· .. · · · · ....· · ..·....· · · · · · .... ·CHEGK· rOSEE ·IFTHEEND
lDQ
EPP,Xl+CNBLK
POSITICN SHCULD 8E ADVANCED
ANQ
777778
WITHIN THE SLeCK
I-/RITERTN'dUMPI F"NOT'PAST"THECURRENT ENDH ................. .
AQ.:.l,LT·
SI-JA
EPP,Xl+CNBLK
UPDATE THE ENe POSITION
.W.RITERTN ENA
~6;X3+PSA"~~~CJf:jE ...U.SERtS ... .Q ......RE.G.1SJER .. TO
STA··· .. ·
REAOFX
UJP
~
A9/JMP,A15/-v..+l
RAFW08
VFD
LOA
ARE WE IN THE LAST 8leCK
8LKR,X1+CNBlK
. AL.J,NE···· ······-RAFR07 .
···jUMp···· . IFNGT···
RTJ
GET A FILE BteCK
SEL3LK
STA
STORE
THE FORWARD POINTER
C aRC:
·
·
·
·
·
·
·
·
·
·
·
·
·
_
·
·
__
..
CoA·ol HfC
UR REr'HB COC K AOOR£. S·S . ·
. 'LOQ
C8P,XI+CNBCK
STAQ
T5,X3+PSA
SAVE JUNK FOR FUTURE REFERENCE
L p., Xi + CN8 l K ....
· · · · · · . ···················LOA
LOAD THE DIREC·TOR·Y···8LCCK.. ·NUKBERRTJ
REVIRITEX
REWRITE THE CURRENT BLOCK
RTJ
FIX
READ I~ THE MAJeR Access BtOCK
" 'l::tiA'
u·'tOAtlYHE·T OlAt'FI tEu"tENGTH"
"'T"FtrX1+CN8cKANA
7778
CHECK TO SEE IF MORE MINOR
Rt,FW 14
ACCESS BLOCKS ARE NEEDED
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . AZ.J, .Nt:...
RTJ
SECdLK
GETANCTHERFIl.E 8LOCKFOR' THE
SHAQ
24
ADDITION OF A~OTHER MINOR
ACCESS8l0CK ................... .
..T FL·,X1+CNBI..!< .
······LDA·
SHA
-9
STORE THE FILE BtOCK NUMBER OF
TAl
X 2+CPPX
NEW MINOR ACCESS BtOCK INTO THE
,. ·.·H.... ·........·H.
. ·.. ··S·T Q' ·. ···· . . ·. . . . · . · . ·C·ORE. ·,..X2+CPp X·
'MAdCRuACCESS'S LCCKuuu",,,
LOA
8 1T2 3
SET THE ALTERED 8IT IN THE CORE
STA
.CQREp ,.XltCN8li(
.. AC.CESS...... WORO
SHAQ'
24
RT J .
REliRI TEX
REWRITE THE 8l0CK
GETCORE
R·TJ
GET ·AGCRE SUFF.ER······
15:L 0
02063 .... 20204000
02064
00702055 X
0
0
1Lt66
1467
H1468
1469
1470
1471
...........................
UIO
29
1463
1464
··1465
0202203702024P
02023
44100006
()
PAGE
TFl~X1+CN8lK
RAFRD.8.
o
o
o
o
o
o
0"
o
Oc;
o
II
o
o
o
~
~-----------------------------------------------------------------------------------------------------------------~---------------------------------
ASSEHOU:R/OS3 Vita 09/21/74 2229 PAGE
"02.1.06 "'201uou of
i5SZ
02107
15477776
1533
021iO~0100005·
1·534
1535
02111 24001767 X
02112 37100006
1536
'U 21133 5 00 1730 .,.,.
"'1537"
02114 40100006
1538
RAF RELEASE AND WRITE FILE MARK
r FL.'; Y:f·t'C N8llC
RE LEA S£'I SF; AJ\ C[ED ,.,' 8 i{ "A "SEE k
-1
TO ADDRESS ZERO AND THEN
BLKR,Xl+GN8LI<
WRITING A,,··FIlE MARK
8IT21
CLEAR THE POSITIONER READY BIT
EPP,Xl+CNGLK
IN THE EPP WORD
"81T22""
SET··THEC'HANGE'EIT····"
EPP,Xl+CNBLK
""'RCOEWRREPIJ'EX1.+CN8LK,
.... LOAD IHE PO.IN.T ERIWRDS .,.. ,.,.,. ,. "
. ,... ~?jQ
····8~fl~5B}~ ~ga~ x
"'1~~'6'
I
AND REWRITE THE CURRENT BLOCk
02117 200U0014 P
1541
LOA
FPSV
CLEAR ALL THE BITS IN THE CPP
········02120·3710 Q 0 04.. ,......... , . . . . . . . . . . . . . . . . . . . . ,. . ,··,············1542 ...... ........ ..
LFA
,·C·f1P-,X-1+CN8LK·· ..···················riORO EXCEPT,,··FGR FILE-PROTECT·,
02121
40100004
1543
AND SAVED-FILE
CPP,Xl+CN8LK
STA
1544
,··,',··'···02122·2010·u·OO'4···'·······'t·S4'5
······RAF·~~·F"M········ t·D'A············· ······· ..·C"PP'X:t'feN8t:K·· . . ·'" ..
··tOAD ·THE······STATt S.. WORO· . ··· . . · . ··· . . ···
02123 033U4763 P
1546
AZJ,LT
FPV
JUMP IF FILE PROTECT VIOLATION
()
02124
00
70
5064
P
1547
R
T
J
...
S.AV.E.._...
.
.
.
.
.
.
.
.
SA
.VE ..... THE.JJ SE RS ...RE . GI SI.ER.S .... .. .
··U·212S .. ··2D·iooo07···
1548
···············-·······CUA
TFL,Xl+CN8LK
LOAD THE LENGTH OF THE FILE
02126 03000570 P
1549
AZJ,EQ
STATUS
DONE IF lENGTH EQUALS ZERO
·02127 .... ·146IJ21,31 .P 1 S · S 0
EN A··· . -.. '*+2 . . -....-.-.................. , ..-.......-.. . . . . . . - .... .
ENTER ·THERETURN ADDRESS·
()
02130 U1001560 P
1551
UJP
RAFX
INITIALIZE FeR FOLLOHING JUNK
021Jl 14477777
1552
ENA,S
77777B
SET
THE FORWARD FOINTER TO ALL......................... .
ONE'" BITS
'02:t32" - 4 0 0 0 4 0 0 0 1 5 5 3 ' · · · · ·. S T A · ' GORE
SET THE ALTERED STATUS BIT INTO
02133 20002073 X
1554
LOA
81T23
()
.
········THE·STATUS
,~~1~~···~~lRH·ga2·
19~1""
'~f~
8~I~ :~1lB~~t~
LOAD THE EPP WORD
02136 20100006
1557
LOA
EPP,Xl+CNSlK
SET THEALTERED8IT
·(J2t.·37-·· · 3 5 0 0 2 1 : t 3 X 1 S 5 8
········· . SS·A
. 81T22
02140 37000730 X
1559
LPA
N8IT21
CLEAR THE POSITIONER READY BIT
02141 40100006
1560
STA
EPP,Xl+CN8LK
............-... ,. ·········O·2142·. ··201U0001'··..·. · · · · · · ·-· ·
· · · · · . · · · · · · .... ":1:56. 1 .. ·····, .. ·. . · . ····. . ·.. ·.... ' . . LtrA....'tP....X:t'fCN8t"K·'......
PRES El········THE. ·····MA·JOR ....A·CCESS'. StOCK'"
1562
UFO
A9}JMF,A15/¥+1
JUMP IhTO MCNITCR STATE
02143 000U2144
02144 00702100 X
1563
RTJ
REWRITEX
REWRITE THE CLRRENT BLOCK
. 02145'"(f070206S-X···..·
1564:' .......
····-······RLJ
FIX···-·········
REAO' nrTHE· MAJoR·ACCESS·sLocK
02146 20100004
1555
LOA
CPP,X1+CNBLK
SET THE END PCSITION POINTER
()"~······· ~~t~6·~·i·5B1~~~ xt§~~t~~-~·§~~,Xl+CNBbK
t~~-et+~E·T~~V·~gR~~~~ ~~~ITrON
02151 U3102153 P
156
AZJ,NE
·+2
SKIP IF A SAVED FILE
··02152· . . 15 37777
INI~· . "....... ~-3,·X3:FPSA. ·......·~~'·"..............,... BrA S"'"TO"'T HE· ... SCR·ATCHPOSITION . ~"····· . · · · ·
D2153 2410000
LeA
BLKR,X1+CN8lK
LOAD
-(BLOCKS REMAINING)
30
UIO
RAFRLSCOA
INA,S
···,S1A
LeA
LPA
..... "",' .....;:;; S·A····'
STA
",',...............,. . . . .,
·.
. . -·-· · · · ·. ···8
......... f) ( ] )
.................. ,_
.................................. .
o
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . _.... ,. . ;,Q
o
o
.
.
o
o
o
o
C)
""B~t§§"Jtr~ BE-t} x'~a2""~~E;~1+8~~t~A"
~g~u9'b'+~~' ,ye~S[8~~t~·t~~~l~R.
. g~l§~ . . . ~dI~ltrTII. x
.. ,1gji.
k¥1.~~E~. ~I~c~~tk~A~~8~~~~Hk~~E~~~Fl.~~~ay .
02160 142U2162 P
1575
ENI
¥+2,X2
ENTER THE RETURN ADDRESS
02161 U1001773 x
157E
UJP
FDZAP
TAKE CARE OF THE FILE DIRECTORY
0210·2· . . ·· . 2. 0..'1D'·U·Q·0'7 . . ···, . .··· .....······.....·....··.. · .. ···, . . ·.......· ....·1'5·7·7. · · ........................ ,. . . . ·....· "....· .. . . . ·. . . ·t·O·A"··"..·..· ......· ·
··TFL·;....X:t''fCN3t:K· . ··....· · ......· · ....· · ·. ·tO·An·. ···THE·.... t"ENG·TH········OF ....
..· · · .... ····. .·-....· ..................-.......................................................... .................
02163 40301632 X
1578
RAFE01
STA
F4,X3+PSA
SAVE THE RELATIVE BLOCK NUMBER
U2164 12077766
1579
SHA
-9
SHIFT TO AR.ElATVE MII\OR ACCES.S .__ . . . . . . . . . . . . . . . . . .
U·2165· S 36 oll DO b
Is·1fej"'"·""T'tfI
.x,(f. C f i p X B I ' o C K N UfH3 ER"ANbSA, VE INC P PX····
02166 20100005
581
LOA
8lKR~X1+CN8LK
LOAD THE BLOCKS REMAINING
···02167···· . ·0.3 002226 P ....
S82······
. AZJ, EQ ····· . ·· ..RAF-EQ·4-·······························..,·······JUMP,IF·DONE . . . -... ". . . . . . . . . .
1583
LOA
CORE,X2+CPPX
LOAD MINOR ACCESS BLOCK ADDRESS
02170 20204000
02171 00702144 X
1584
RTJ
REWRITEX
'0 21'7·2-..···. ·. ·1JO··7. 0··2:t-4·g···X· . ·. ·····,. . , ...... ~.............
·· . ·:ts·tj'j ...·. ·· ......................................... ··· ..........··..· · .......·. RTj. . ·· . . . .·········· ....... "'.. F"T·X.. ·.......···'··......·........·-·. · .... ·. "'. . . ····....·.... ··.. ·~. · · . ·. . RE"A·C·:···IN..·. . THE··. . .·M:TNCR··ACCESS··. .·BLOCK···........... ,..,......... ,. . . . . . . . . . . . ..
02173 203U2163 X
1586
LOA
F4,X3+PSA
LOAD THE RELATIVE BLOCK NUMBER
Q2174 53700000
1587
TAl
X3
RELATIVE BLOCK NUMBER TO INDEX
........................................
f :, ..." ... , ................ .
"02:1'75' '17300777
"'15613
·ANIUU777"B,x:r·X3ANOMA Sk'CFFHAJORPOSI TION'
02176 1420000
1589
ENI
1,X2
INITIALIZE FOR CNE FILE BLOCK
....
0217..7
2
0
.
1
0
D
t
l
0
1
S
9
0
.
·
L
O
A
CBP,.X.1+CN8LK
LOAD
MTNOR·ACCESS 8LOCK·ADDRESS
0;
02200 05300001
1591
ISG
1,X3
SKIP IF THE MINOR ACCESS BLOCK
02201 00777777 X
1592
RTJ
FREEBLK
IS NEECEO, OThERWISE, FREE IT
····U2·ZC1Z· ·'20'30 £tHQet···
············. ···1. 5103'··· ..· ....... ~'A FEU2 ..···. tOtr· . '· . . . ··e'ORe . ··X·;3· .. ·"~··-·······. ······ . ·tOA tr·T·HE . NEx-r··DAr··A. ·..St:O CK"NUM8:ER
02203 14200001
1594
ENI
1 X2'
INITIALIZE FOR CNE FILE BLOCK
0....;'..
02204 00702201 X
1595
RTJ
F~EEBLK
FREE THE DATA BtOCK
··-·······-· . -···02205 "'77740 O·DfJ·
. · · · T S 9 6 . . . . V F O ·.. · ....... ······'. AT27EINT
"PREVEN TRED'LIG rT OIST RIels········ ..
02206 20100005
1597
LOA
8LKR,X1+CN8LK
LOAD THE COUNT OF BLOCKS TO BE
02207,··154777761588
·INA,S
··-·. ···",,·1····.. ····················
. . ·RELEASEO-ANDCCUNTIT, OOhN·8Y·······1······
02210 40100005
1599
31A
8LKR 1 X1+CN8LK
AND THEN STORE IT SACK
02211 77730000
1600
VFD
A12/uINT
PREVENT INTERFERENCE
'02212"'030 02225· . P'·.....· . ·· .. ·······.180t .. ·..··.... . . . · ......···'···· . . A·Z:jrEQ··· . ·· ········RAFf:O·3·· .. · . . ··
···jUM P'fF"NC'M 0 R['StO CKs··r·O. ·FREE .. · .. ····. ······ ..
02213 10300777
1602
lSI
7778,X3
ADVANCE THE MINOR POSITION
02214 01002202 P
1603
UJP
RAFE02
LOOP BACK
13"22:1."5"54302156X
16'04""'-["01
R PSAPTR;X3+P·sA
. L"OADTHfPS'AI NOE X
1605
LOA
LP,Xl+CNBLK
. LOAD MAJOR ACCESS BLOCK ADDRESS
02216 2010]001
0221700702171. X
160LRTJ
REWRITEX.
. .
02220 00702172 X
:t607
RTJ
FIX
READ IN THE MAJOR ACCESS BLOCK
02221 20302173 X
1608
LOA
F4,X3+PSA
LOAD THE RELATIVE SLOCK NUMBER
. ~~................. ····· . . 022 22':l:'14'77"fjOl)"
. . . ,. ····· ...... ~ . ··....··:t·6·eg . .·.....·...... ·........~·. . ·..·.. ·ANA.,S·7·7fJil os . .·· ........................ ·· . · ......· . ·MA. S·K····T·C ····yH SMA-dCR'" POSIT·ION·.... ··
02223 15601000
1610
INA
01000B
INCREMENT THE MAJOR POSITION
~
~
·~
THE···'··F·ltE····~
~
H
o
........
o
o
o
o
a
.
:reI.
---_.
__._-------_._-.-------_._--,-,-_._---_._--------._-------_._----_ __ ._._---,-_._--_._--_._-----_._-.-----.-._---,-----_._.__ _--_.__._._.__ __
..
..
.
,
o
o
o
o
o
o
o
C)
.
a:
ASSEM8LER/OS3
Vl.0 09/21/74 222g
"02224 """(Ii 002163 P
lc11
02225
1613
1614
1615
161 E
16J.7
54302215 X
U2226 P
"""""""""0'2226"""" 0070221'7"""' x"
02227
20100U04
02230
04600000
W02231 01000565 p"
02232
21100007
" 02233 "04500001
Q
02234
01000565 P
02235
13077746
" 02236 . 1460DO 00
02237
40100007
02240 14477776
02241
4010U005
()
02242
05740000
""0 224J1S 3 77174
o
02244
02245
02246
o
o
o
o
PAGE
02247
02250
34302154 X
54302225 X
14700003
20100001
00701313
... ".. 0225i 144'17777
02252 4010iJUOi
""·02253 ·OiiWOS65 .p.
31
i~AFED3
LOI
Rl4FE04 ...... RTJ
EQU
LOA
ASE
OJP
LOU.
1618
...... QSE, S
UJP
SHAQ
ENA
1624
ST A
......... ENA ,.S
STA
QSG
IN!
1625
1626"'"'
1627
1628··
1629
'1631
1632
lE33+
.... 163
1
16
.. . ·1E
RAF RELEASE AND WRITE FILE MARK
UJ?
1619
.. "...............".".. "."" ... "···1620
1621
1622
·····~··:t62 3
1630
UIO
RAG
..
LOI
'" ENQ
LOA
RTJ
ENA~-S
STA
·UJP·
L~CP
'[ACR;'
RAFEDl
.
RPSAPTR,X3+PSA
lOAD THE PSA INCEX
RE WRITE .... T HE"FTtEBL OCK
lOAD THE STATUS WORD
~~.f~R~F IFP =.000 .
LOAD THE LENGTH OF THE FILE
SK I P I F-N 0 OATA-IS- PR [SENT-RETURN
SAVED-FILE 8IT TO BIT 14 OF Q
·THE l.ENGTHOFTHEFILEISZERO"
SO CLEAR THE TFt WORD
. THERE.ARE -16 LGCKSR EMA INING
BEYOND THE CURRENT BLeCK
SKIP IF A SAVED FILE
81 A81 aT HES CR AT GH P GS ITI 0 N
UPOA1E THE FILE 8l0CK COUNTER
RESTORE THE PSA INDEX
FREETHE'~AjORACCESS'8LOCK '.
THE MINOR ACCESS BLOCK, ANO'THE
DATA BLOCK
-THENAJCR 'ACCESS8LOCK DOES NOT
EXIST ANYMORE
RETURN
'i-
REWRITEX··
CPP,X1+CNBLK
2EA'JRTN
TFL, X1+CN8LK
1
READRTN
-25
o
T FL, Xl+CNBLK
-1
dLKR;xl+CN8LK
400008
··-3 r X3+PSA .
S FaL KS X3+PS A
RPSAPTR, X3+PSA
.. ··3·_..
. .....
L P Xl+CNBLK
FREEFILE
. '77777fJ"-"
LP X1+CNBLK
REAoR TN . ....
()
o
o
.. i.E
o
o
o
o
o
o
o
o
o
o
()
o
O!
o
................................................_...
0';······"·
0., "........
0'·'
w ....
w"" . . . . . . . . . " . . . . . ,
..........._ ........................._.....
......................................_................................._....................... _..........................................................................................................................................................................._...................................... _................................._.........................................................._.... .
..
o
o
o
o
o
0'"
o
ASSEM8lER/OS3
CD
Vl.U 09/21/74 2229
'"·'0"2"'2'5' ~t" P ,.
,,0,. "'"
o_~., ""-~,
PAGE
32
UIO
TV CONTROL
163 9
LOAU THE USERS G REGISTER
·STATUS· REQ UEST
SKIP IF A CLEAR REQUEST
••.. v·.·.·.................................·................ .
02254
203005&7 X
1640
0560 G0 0 1 1 6 4 1 · · · ·
(J)
02256 01002264 P
1642
02257 04600001
1643
02'260''''01004673 p.MMn··· .. · · · t 6t:r4"
02261 24001117 X
1645
(j9 · · · · . . · · · · ..····················0226::>·40
02262 37301630
X
1646
302262 X
if: 4'7
02264
21302263 X
1648
02265 270022·61· X············164S
()
02266 16600011
1650
....... ···SI< IPIFN OTA
Ll2255
j ..
f>
f
I
·LEAV E . T·HE·F ILE Jv,A RKREAOB-IT
02267
12400004
1651
····02270·········· t)5·50000·0···.. ·· ··· . · · · · ·..· ...... ·1·6'52························
~
1
LOAD THE CLEAR ~ASK
.. MASK...T HESPECI FlED. aITSOUT ..
.... ...........
02271
35002137 X
1653
.Q~.~72.0:J,. OtLO tJ.O.,3 ...P i , 92. lt. __ ..
()
MERGE IN THE HARDWARE TYPE
SEND BIT TO SIGN OF .Q
............................................ . . .
SET THE LOAD FOINT BIT IF SEND
SELJtlE .. STATUS AND . . REUJ.R.N.
()
~
. . . . . . . . . . . . . . . . . . pC}
I, 0
I
o
10
0
1
I
,
0
o
°
.... ....... ...............................................
()
o
o
()
.....................................................
0
0
o
.......................................................................................................--............ ............................................-- ..................................................... .
..........__ ...... 0
0
o
L:;
,...)
o
d!
o
0;;
o
0'"
0."
o
0"
o
J~
3Cl
. \~r,,'Z
0
.-- .............. ---- .......
o
(f
I .;
a
I
;,)
~
!.
i"
•~ ()
1
()
0
0
ASSEM8LER/OS3
0227':) '-TL177777
02274
37.302254
02275·-40302007·
02276
03102315
02277
2030226 Lf
.. 02300"12 0 00 DO 4
0321] 2 :S3L~
02301
0
0
0
0
:3777"13' "1657
X
X
P
X
P
D2302 P
02302 . . 213022 75 X
02:303
41302274 X
·02304···· 24 DOD 016 .p
02305
37302277 X
3500(]417 X
02306
213U2305-X ....
02307
0231Q
40302307 X
27002111 X
02311
····02312.· f2d?77I6········
343iJ2310 X
02313
.. 02314
01002264 P
02315
02'316
02317
02320
02321
02322
02323.
02324
02325
02326
02327
02330
. '02331
14700373
14202320 P
010U3211 P
01004772 P
20302: 31 3 x
12000002
D3302 3D 2 . P
14102332 P
20302J21 X
••
PA GE
V1.0 09/21/"14 222g
1200fj·uOl.r·
0320233 1t P
14205137 P
01002 L,·66 'p'
02332 .14.177777 i'\\I "."."
02333
01002352 P
33
UIO
rvn,:PW'"
TV
1658
.. ···············1658··
1660
1661
'1662
1E63
1664-
...
1665
1665
1667
1777778
LPA
STA
Q,X3+PSA
·F6, X 3·+PSA
LOA
'SHA
CR,X3+PSA
LeA
LPA
SSA
'02'334
02335
0
1f.
SET THE USERS Q REGISTER
CLEAR THE GAREAGE 8ITS
SET THE WRITE E~AELE eIT
STORE IT BACK
LOAD THE FILE MARK READY 8IT
sHIFT TO FILE" t-:ARKPRCCESSED
Q,X3+PSA
C·RMASK
GR,X3+PSA
CR, X3+PSA
. TVCNTRL3
UJ p .
~
UJP
UJP
LOA . .
2
···TVI N pvHJ·l··
TVINP~i05,X1
C R, X3+PSA
:t688.. ··
TVDELAY
IVaUSY
.................... tao
........
JUMP IF A DELAY
2 ...
TVREAo.,Xl .
o
i
!O
.. . . . . . . SETT HET VWAIT8ITuA·N.o WA IT'"
····TVi1AIT·'···· ..
IOWA IT
010Q1426 P
NEEDED
·TELL····THE···lJRIV-ER· TO READ ..
INITIATE THE 1/0 OPERATION
rVOUTW03
'14677·777"'1.
o
SHIF T< READ - ENil2LEBITTCu TH£'"'SI GW
hHl···'1····c:w·!\···.. ·········-········· ..··~·r·
168
168
lo'f)
9
10
HORO COUNT + 1
ENTER THE RETURN ADDRESS . . .
CHECK FOR ILLEGAL WRITE
WE GOT ONE
. . [DAD THE'CCNOITICNREGTSTER
FILE MARK REACY BIT TO THE SIGN
JUMP IF A·FILEMARKONTHE SCREEN
ENTER THE RETLRh ADDRESS
LOAD THE CONDITION REGISTER
IRERROR8
'CR,X3+PSA
,LT
"" '<'
MAXIMU~
251
··.y.·+2,··X2···
IRCHECK
ENT
A
LOAD THE WORD ctuNT
F 6,X3+P5A
RAD
00
0
TVDELAY
LOL
TVINPW02 ENQ
1679
1680
"'1681'
1682
1653
1684
1685
TVINPW02
GR,X3+PSA
BH21..
-1····
SHA"
:1:678'
MASK THE USERS G REGISTER TO 16
AND ·STOREIT INTOF6
JUMP IF WORD COU~T IS NO~-Z£RO
LOAD THE CONDITION REGISTER
SHTFTT HE REAG-EN A8tEBITTOT HE'
SIGN AND JUMP IF DEtAY NEEDED
."eR" X 3-1' PSA'
STA
G)
8ITS
8 Hi8
·····LDf.,(
. . . . . · .. · .. · . • 0 ·
{.
4 .
AZJ,GE
EQU ....
....TIJ..INPWO1 tOQ
STO
1669
Hr70
1671
1672
1673
16 '14
1675
1676
1677
ECHA
AZJ,NE
1668
INPUT
o
0
o
o
o
o
o
Oi
o
o
o
o
o
i;, ........................................................................
o
o
()"
.............. 0
----.
-.- -.- - - - --,- -,- -.-.-- -
o
-- -.-- -- - -- -
- -.-- -- -.- -"--_._----- -,_._._- ---,- ~
- -,- -,- - -
~,-.
-- - _',- - -'- - -
- -,- - --. -
-- -
-- - -.- - - - -- - - --- -.-.- -_.,-
--.~
--.- - - - - - , - - - -
--..-
-
--,-,_'- - -
--
-.~.--
-,- - -
-.- -
- -.-.-
ASSEM8LER/OS3
09/21/74 2229
PAGE
02336P-'
16'1 ir'
14202340 P
1699
Cl:
Vl.0
02336
02337 -·010J0252·~-·
02340
14700373
02341
03604775 P
02342 ····1 4-1'D2351' p ..
02343
20301443 X
02344
03302330 P
'02345
2'0302325 X
02346 120UQLJOl
0234'1·35302346 X
02350
010U2326 P
023 St' --'14'1'7 777'7 _._ . .yH ... ' .. ,., ....
02352 P
02352
007U51UO P
02353 "2ttornrO 16 'pH
02354 37302347 X
(J)
()
()
,,·,,···-······~·······-······O
o
2355 .. 0Lt 102351· X
02356
35002306 X
02357
40302354 X
02360
142Q14:31"X
02361 21302302 X
02362 20302076 X
02363 ·····f1'60·3777
0236 1t
16610000
02365.. U1077777 xH
()
o
o
34
··170·0 ..~..... ~ ....
1701
1702
'1703
1704
1705
"'17f4~
TV
[QU
EN I
UJP
ENQ
AQJ,GE
ENt·
'i70'E'~'"
1707
·········1708
1709
1710
·········lltt·
1712
1713
uro
T V0 onr"-'
LOA
······~~·iLLL
SHA
" ··SSA
UJP
OUTPUT
If.
(~
~~~
>f+2,X2
SETUPFS ..
251
Z WCN A X
"TVOU'T'W 02;X:1:
SYSCM,X3+PSA
TVINPWX
GR,X 3+PSA .
1
··~·····CR,X3+PSA·
RTJ
lPA
1715
·1716
1717
1718
SSA
SlA
1720
LOQ
ISE·~·
171:9 . · · · · · E N : E ·
'TEt:tTHEORIVERTO ..
RZ
"CRHASK
CR,X3+PSA
.... TVWRITE,X1
BIT18
WRITJ::~·~·······························u
CLEAR THE GARBAGE FRGM THE CR
ELSE SET ENABLE WRITE 8IT
SAVE THE NEW STATUS
·SKIP IF A·WRITE
R MOGNE,X2'"
1~'~~"~'~~l~7;~8PS/L
..............................
./
.
()
.....................
'LO AOrHEMAsK ..
CR,X3+PSA
F6,X3+PSA
Q .........................w
IS SET
TVINPW03
.. ··r·VO tJi'W 02' EN'l ·············T·VW RITE,Xt
TVOUTW03 EQU
•
···cc/f
ENTER THE RETURN
ENTER ~AX weRe COUNT
PREVENT WRAP ARCUND
····E NTERT HER Ell:! R !'i""A 0 0 RES
LOAD THE SYSTEM CONTROL MODE WORD
JUMP IF ll'i SYSTEM CONTROL MODE
LOAD ThE CONO I T ION REGIS TER ..... .
OR THE READ AI'iD WRITE ENA8LE BITS
TOGETHER AND WRIT~EIF ETTHERONE
0:
.
1723
VFD
G9/166,A4/TVPFAR£A
...................... -~- ..... ·172-4 . w · · · · · · U J P - T V I N I T·-
o
'.. ENTER1HE'IMMEOIA TERETtJRN ...
LGAO THE WORD CCUNT
LOAU THE FIRST WORD ADDRESS
MASKIC APAGEPOSlrION ...... .
XOA
CALL THE DRIVER
o
o
o
o
v(\
o
o
o
()
U
,'--.
o
0,
o
d
o
l
10
0"1
o
..............................-...................................... ..
o
o
o
o
3.C1.
o
0>
o
ASSEH8LER/OS3
()
o
o
o
o
o
o
o
o
Vl.U Og/21/74 2229
o2 36 6· . 20 0 051 3 1 P
02367 53700000
QZ370· 200000~7P.
02371 37302357 X
02372
40302371 X
02373 -14·'105137 P
02374 14600011
02375
14700000
02376 ·45300603 X
02377 20377777 X
·02400
1560 0001
02401 44302377 X
02402 20302221 X
. 024 lJ35·370·0000··· .
02404
04300000
02405
00777777 X
02406 20fOOOOu·
02407
440U5150 P
o2410·5 3 3 GO 00 G
02411
44100000
02412
54305150 P
02413 14477777 X
02414 OOll7?7, X
02415 47377777 X
02 (-116·· ·1460 fl1 OX
02417
35001112 X
02420 ·40002417 X
02421 14700000
02422 20377777 X
·02423 53500000
02424 03202427 P
02425
1760
1731
1732
1733
1734
1 ]35 ..
1736
·····1737
173 C
173':
........................... 1740··
1741
1742 ..
···1743·
1744
·1745··
1746
1747
1748
1749
1750
····175:C
1752
·1753
1754
1755
1756·····
20100000
02437
02440
02441
17100177
24002133 X
u
ura
35
l.uA··
T/U
LOA
1728
172·9·
02426 . ·53500000
02427 12077752
02430
0:31021..35.8
02431
02432
···02433
02434
02435
o243 6
PAGE
1727·
;3 717771l'X·······
40102433 X
15300001
15 lell] 0 QI .
05700040
0100Z42ZP
01200000
1757
1758
f75S···
1760
...... 1761
1762
1763
1764·
1765
1765
1767
1768
176S
1770
LPA
STA
................ ..............•...
ENT
TV 1/0 CLEAN UP
TV8UsY
X3+PSA
. CRM ASK X
CR,X3+PSA
CR,X3+PSA
TVdUSY,X1
HTTV
ENA
0
SETSTAT STAO
A~X3~PSA
TXPCI
LOA
PC,X3+PSA
INA
1 .....
SWA
PC,X3+PSA
LOA
F4,X3+PSA
TXEND
.··JAI ........ uuX3'*'PSA·
rSE
O,X3+PSA
RTJ
SETN
·COAO,Xl
SWA
T HIP2
~IA·
·X3+PSA·
SWA
0 Xi
LOI
T~MP2,X3+PSA
ENA ,S · · · N QHAIr·
RTJ
IOGLEAR
~~1.....
.~~~~¥'K~±e~
SSA
FLAGS
ENQ
....
........................................ ;:;T A
. FLAGS ....
ENQ
0
TVi"lRLOOP LOA
VMl'1,X3+PSA
TA·r·X1:'
AZJ, GE
;<+3
0 Xi
T A T X l - · · ..
LOA
SHA
..... AZJ ,NE
ANI
LC.l\
- 21
. ·>~+5
177~,X1
8 IT2:3
'··l;PA'····PAGE-TABL',·X1:
STA
PAGETA8L,X1
IN!
1 'X3+PSA
I
HQI
........ .
~
...
U JP OX2
QSG
.. UJP
UJP
N PU
LVMRLOOP
O,X2
LOAD THE BOSYFLAG
LOAD THE PSA INDEX
BITS TCLEAVE IN THE CONDITION
REGISTER
ENTER'T HE QUEUE ADORES S .
FIX THE USERS STATUS TO SAY TV
SET THE LEFT. CVER.I~OROCOUNT
INCREi"IENT THE·USERS ·PROGRAM
COUNTER
ARE OTHER USERS WAITING a DO
TVI/O····
SKIP IF NCT
FIX THEIR CORE IF SO
·GET· THE LINK Fe THE NEXTPSA
AND SAVE IT
ADVANCE TO THE NEXT USER
GET THE LAST LSER
CLEAR THE QUEllEWAIT··SITIN THE'
RU N.. T H 1..S USER .... N.EXI . .IF WE CAN ...
LOAD A VMM ~ORO FROM THE PSA
JUMP IF NCT PLRE CODE
LOAD THE TeIND
PAGE ACCESS
WORD .
. ... ADDRESS
EXT .....................
LEAVE THE UPPER THREE aITS
JUMPTF NCT I~CCRE
MASK TO A PAGE NUMBER
LOAD THE MASK
CtEARlHE i3ITIN·THE······PAGETA8t··.. ···,
AND STCRE IT EACK
INCREMENT TO THE NEXT VMM WORD
INCREHENTrRE PAGE COUNTER ..............
SKIP IF DONE
LOOP-BACK
()
C)
")
L ,\.
····AOORESS·TCTNOEXf
RETURN
o
o
................................
o
o
o
o
o
o
o
. , • • • • • • • • • • • • • • • • • •. . M
................................................................................................................................................................................. .
o
0;
o
0:
o
Q.;
o
o
c{'
V loG 09,21/742229
P.L.GE 36
UIO
MAG TAPE INPUT AND
.
HlI
N"P}r'
...
TNA·
..
...
·..·... FiT Z········
....................ill 4'l~ 2' . --':CL+6'u' 26T5'P"
7 ::r
0244d 147J5141 P
1774
ENU
TX3USY
............................
. . . . . . . . . . . . . . . . . . . . . 0 2444 .p
............. t1 TINP·W 0 i··· EQU········ . . . . 'f...
......................... .
·1775
02444 45377777 X
1776
SiAQ
F1,X3+PSA
1777
02445
2U10GOOlJ
LOA
O,Xi+CNBLK
........•...................,. ····,·········:1?·7···8·······.. ·
··· ..·····....·,.. . ···,············-A·Z·;:t,···tT········..·....... 'M TZ·A·P···..
......... .
. 0244 6 .... 033tJ 304SP'
0244"1
146unooo
1779
ENA
0
02450
40100004
1760
S T A . C Y P , .Xl + CNJlL I(
tf2it51' ILlT? 7 rt ··-·········. 7777 3
17'81
'ECHA"
1 77 7 7 78
ASS E I"IBLERI OS 3
CORE FREEZER
ENTER' ThE RElCRN
.........................................................................
ENTER THE QUEUE ADDRESS
SAVE THE FOINTERS
CLEAR ALL THE STATUS 8ITS
. . THE 110 ALLOWS 65KRECORDS
02452 373U2303 X
LPA
Q,X3+PSA
MASK WITH THE USERS Q RECEISTER
1752
. . . . . . . . . . . . . . . . . . . 1783
SAVE-l H E· \~ OR OCCU·NT» . . . . . . .
.. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
·021+5·3···· 40302.361 X
· · · · · · · · · S T A · · · F 6 , X 3 +PSA
U2454
210U2150 X
1784
LOQ
BIT15
THE HARDWARE ALLOWS 32K RECORDS
SJ3
~l +2
02455 00302457 r
17135
.................................... _.................. cNQ. ·.... NTlTM·IT...... · ....... ·····_·
. . 0· 2456········· ..1' 4777777'''X' .............................. . .... 0·'1'7& 6
"TH ERE-IS·· . . A· ·LI·t.~,.~.~ ,X,.2........
·······..·············'i8·84·
,~
1885
lBiLo ....
1887
o
....-......
2X3+PSA
.....- ............. _..........................
APF
INQ
377
878
~
01778 X3
81T23'
'PAGETABL"X 3
PAGET A8L! X3
SS'A"
STA
....... -- TIA
SHA
874
·. " ....
FAST r;A if
GET THE READ/WRITE BIT
MAKE A PURE REFFERENCE
SKIP IF WRITE OPERATICN
MAKE .. 'AN'IMPtJRE REFFERENCE
RELOCATE TO OUR O~N MEMORY
24-8
RESTORE Q
'A9/J}fp','A"i5/P RZ 02' · ..····LO OF8tl CKII\jT'Cl HEMO 1\1 lOR
LOA
18i'2
THE
8
A9/RO S
F5,X3+PSA
SHQ
1862
1863
1864
:""\.
;~ '0)
F RZlJi-+
RT J
U NSAVE
········,RTJ ..· · · · · · -. ··..·..· ·..· ..· · ·. · CLEARN
UJP
O,Xl
o
o
o
SAVE JUST THE PAGE BITS
LOAD THE PERM~NENT CORE BIT
SET IT INTO THE PAGE TABLE
AND STORE IT 8ACK
PAGE NUM8ER Te A
'C(fNVERTrOQU A"RTE RP"A'GENUMBER'
SHOVE IT INTO THE PAGE FILE
··REsrORE····Q··· ANOSHI FT-TO·RTo END
INCREMENT PAGE ~UM8ER,
DECREMENT NUMBER OF PAGESo
MO VE .. ·F.lACK··. rO'····H IGH··..·e NO'Of'O'"
LOAD THE ADDRESS OF THE PSA
ME) WAY
ACR
LOAD THE CONDITION REGISTER
UJP
MTourW03
JUMP AND SET FRCGRAM STATE
t·n 0 U HI 0 2 VF 0
A9/ROS
RELOCATE TO THE USERS MEMORY
LOA,I
FS X3+PSA
LOAD A WORD FROM IT
VFU ....... .
A9}RTS'
......
RELOGATE hITH' THE ·····MONITORAGATN
;:;;\ A
Ml3UFFER,X1
STORE INTO THE SUFFER
1 ,;Xi . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ..
INT.
...... INCREMENT.TCTHE.NEXT POSITION
F 5, X 3+PSA
LOA
LOAD THE CURRENT ADDRESS
INA
1
INCR.EMENT BY 1
...........""." ............"..... ", ........ "'SltlA "...... "
........""".,..". ., ... '310 REIT8 ACK
S ,X5+PSA
ASG
SKIP IF THE SAME BANK OF MEMORY
VFO
A9/JMP
A15/FINPW04
SWITCH BANKS GF MEMORY
'RTDurwb2,X2 ." ....... .
IJD
PROCESS ALL TFE KOROSA 91 JI'1P, A15/-¥-·t1
VF
EXIT FROM PROGRAM STATE
SElECT,X3+PSA
LOAUTHE ADDRESS OF THE CONTROL
X2
BLOCK AND PUT IT INTO INDEX X2
UNSA E
RESTORE THE USERS REGISTERS
.
...
.
02723
5350UOO
0510000
02726
37002632
02730
14303031 P
._ . . . . . . . . ..
.. flY
................................. "
()
()
o
....................................... ie)
"'r
()
o
o
o
··ENTER'''THE''ADORESSOP·''THE·''Sl:.JFFER·''
o
ENTER T
GOSHAR
OOZ62L~P"'"
. . . . . . . . . . . . . . . . . . . . . . . . . . . . D~I'~·£... ·. ~·
02722
./
OUTPUT
... ..)}O
'0266 22U3 0 2 6 5 0 X 1 8 3 ' €
Q
TAPE
MAG
HTOUHJ
1836
00702405 X
UIO
..... KioUni
"I-
Xi
i1 UH NREC, Xl
MTMINREC,xt'
5
8 IT2 3
0272 4'" "14:1: HOtlOt, ..
02725 12000U05
TFL,XZ"
0272735200007
ENI
...EN I
02731..14277.777 x . . .
02732
01002640 P
UJP
tH ARL OAD, X3
. " ...................IWRLIE,.X2 ...
TXINIT
SKIP IF
REASO~AeLY
o
LARGE
o
MASK OFF ANY GARBAGE
SETTHE DENSITY' ....
ENTER THE COMFLETION RETURN
. . "TXSUS YX"2·" .. · ".. ,,, ...... ,, ......... ,. EN T ER'TH 2 ''''Q'' A" OC RESS'"'' ................ .................."..."......, ...... " . . "... "."...............-............."..".,._. . . .". . ". .",," ...... ".,. "."......."_.., , ,......".
"027<331"4:20 5:t41 " P " ' " ' ' ' ' ' ' ' ' ' '
02734 14102741 P
02735
14702456 X
"u 2736036"O"4673P
02737
40302503 X
C\:l ........................................ .02740 .. Q..LO Q 24.66 P ............
MTOUTWlz,Xl
ENTER THE RETURN
MTLIMIT
ENTER MAX REceRO SIZE
7ABORT ........ ··..ABORTTFTHE·RECOROTS TOOT'ARGE
F6,X3+PSA
SAVE THE RECORD SIZE
QIO.
u
MTOUTW07,X1 i
..."...M..T"X'..".. ".• "." "'"". "...0'".. ".,.. ."""""UM'"
ENTER THE RETURN
o
o
o
T"
U
..................................................................................................................... "................................................. c.......................
o
o
Q;
o
..--.-.------.--.-.-------.---.----------.
- - - - - . - - - - - - - - - - - - - - . - - - - - - -...-.-. -----.-------.-.. -.-------.-------_._----.
__.-._---------_._---------------
(j)
a
!
~
!
j
()
()
0
V1.0 09/21/74 2229
PAGE 40
UIO
'274,f·zr00227I····x·
}IT rrewIND
19Y4
02744 14277777 X
1995
ENI
02745
411li0004
,HTFUH····· srQ
··2·:J1··0
02746 14302760 P
2011
ENI
02747 14502416 X
2012
ENA
..., . . . U2750"35 002 1r20' X'" .,....... ,.,.... ,' .....,., ..
"'SSA'
"201'S""""
U2751
40002750 X
2014
::irA
02752 14603012 P
ENA
2015
'''02753 ""1'+4'0051 4S P
ZOIE
SvfA
LOQ
02754
21100000
2017
...... ,. ...,,201 E
··02755 ... 1240,0022 ..
SHQ
o2 7S 6 2 0 10 0 0 0 7
201 S
LOA
02757
01002542 X
2020
UJP
ASSEM8L~R/JS3
cocr
0276J 54302602 X
0"276 I' '203'J 271:r x
02762
535DOOOO
··0·2·76·3 ···(11000565 .. p
0
MAG TAPE CONTROL FUNCTIONS
02764 P
02784'''142777'77 ····X .., ·
02765
01002777 P
2022
2:023
2024
·.. ········20·2-5········
2026
2026+001
Lpg
T RDI IND X2
C PP,Xl+CN8LK
•
.,·········2u2 6+002'"'''''''''''''' '''''ENf''''''''''TSPP Pt1,X2·'·····
2026+003
UJP
MTDELAY
2025+Q04
.......... ...
..............
'20Z'0+lf05' MTS'BPPM fQU
TS8PFI"I, X2
2026+006
ENI
2··Q26·+0nt,··· .. ····,,·
UJP··,·
..·M TDE·LAY
2lJ26+008
02770 P
2026+009 MTPWSP
EQU
•
.............. ·02··7. 7. ·0'....· . ··. ':1:'4·2u . 2. frg·o ....'..X·. · . ·. ·.... · . . ·..,,,·. . ·. . ·.·. ,,·,· . ·"'· . . · ....·. "''''. '2. 0. 2 . 6'-t . O·:tO"'. ·......· . ·..·. . . . ,. . . "'.
'·E. N·!·................ ..·_,. ·. . ·.·......r·. p·ws' P"""':X'2
0
EQU
,
0
NEW·STATUS
ENTER THE RETURN ADDRESS
SAY TO SWITCH USERS
·STORE THE
l'ITFINlSH,X3
S W3I T
...... F' LAGS" .... ·" . ··.. ,. ,··. . . ·,··'"
FLAGS
T
XOONE
MTXI
........ .
O,X1tCNBLK
·1·8 ..····· ....... .
TFL,X1+CNBlK
TPINIT
'"
e,C])
()
LOAD THE UNIT NUMBER
UNIT NUM8ERTC·LEFT 6 BITS
LOAD THE DENSITY
THE TAFE
INITIATE
..t:1tf.:r:NJS)i LOI
.. ,.......RP~APJR"X~+ps.4.
LOA
SELECT,X3+PSA
TAl
Xt+CNBLK
·UJP··, ,....... ······READRTN·"
MTSFPFM
a
LOAD THE
P~A
OPERATION
INDEX
.. LtfAbThE:AODRE$ SdF'THEC aNTROL
BLOCK INTO THE CNBLK INDEX
GO CLEAN UP
'RO UTI'NE"wT'O·C
AND CALL oRI
0
L
0
0
at
Te RETURN LATER
ROUTINE TO PReOESS THE REQUEST
...........,... ·AND ·JUMP······IN10·0RI VERTO·QO··WORK·
,0
t: L
0
"w ..................'. ·..·....
02771
0
01002777 P
()
()
142777
02774
14277777 X
'O"Z775""IJ11)O"27"7{ P
0277 T
EGO
2027
MTSTATUS ENI
2
(] 2777
I:'l
07u 510 OFf'
START-THE·Fut,;CTTON .. ANOWATT·
TSTATUS,X2
U3000
1~3q~3
03002
Q10027 3 P
X
p.
..... p
"
RNOONE
X3
1'tTA RL.O A0
M TFX
0
OPER FUNCTICN TO CALL
14277777 X
.. 030 O.1 .. L4.6u0 U
0
2026+016
TION AND WAIT
MTDELAY
2026+014
EN
····2026+0·15··· .. ····· ...... ·.. UJ
"·,,·02773·,,Q·l·0 U27
02776
UJP
202'b+fiT3"'}rr8'KSP"""
"'d2772'
02772
2026+011
2026+012
RETU
FR.Of.1 Sl.1l.TE 'ZERC
°0
0
0
0
()
C)
,--..
u'"
0
d'
0
'it..:
0,)
0:::
0
0
On
0
0:;"
0
:La:
0
0;'
0
/1'
\.il
A~~)EM8LER/OS3
o30U 3
' 14600020
03005
14600007
03006
03007
01003010 P
146U0014
54305141P .'.
0300 Lt
" ·0'3010
03011
03012
, ·03013
00701107 X
141051/+1 P
0100240 2P"
TXI~R
"ENA
UJP
ENA
UJP
ENA
'·TXSfv1ASHu, '. LDi'
RTJ
.J.>m ONE
EN I
2042
2043
, 2044
UJP
2049
2050
""2051"
3~O'17777X
2057
ZO~~
2059
" ........... ," 2 0,5 0
Sl'A
HTARLOA 0 LOA
2062
lOQ
2065
SHAQ
130U0011
2052
2054
2055
03043
201000UO
03203047 P
2 0 ' 6 6 ' · · SHA'
2067
STA
2Q68·
ENI
83043 .p .
o
03044
o
o
03047
03052
03604&73 P
1460 [) 000
........,'- ",
a 3054' 40 303U2 T'X
03055
0305£
03057
2073
2074
~lTCNTRl:.."eQU
2076
20T7
11TZAP
LQA
AZJ,GE
'ENA' . . ....
Q,X3+PSA
Xl+CN8LK
T XWC
CPP,'X1+CN8tK'
HnH
SELECT,X3+PSA
010024&6 P
20303031 X
........ -- . --.... ····u-3Cl61·· . ,535 OGOuti··'·
03062 20303Q47 X
...
,',
....
.....
,
9
·'1'5
.A" X3 +PSA
.. TX8U;:;y,X1
~N~
. EN.!.
........................
T XPCI
. Jf.
O,X1+CN8lK
MTCNTRlX
MHltlIT·········
UJP
PO ITER
SAV THE STATLS IN THE CONTROL
"BLO
TELL THE USER HE HAS A MAGTAPE
MERGE THE STATUS AND THE
HARDWARE TYPE' AND PUTIIINTOTHE
USERS A REGISTER
ENTER THE· ··QUEll E,ADDRESS ..
AND GO CHECK IT FOR OTHER USERS
ENTER INTO AN 1/0 HAlT STATE
CHECK THE FUNCTION CODE FOR
LEGALITY
o
-,,~,
"
"."
............... ------ ........- ... .
TO ... - TRANSFER
. ,._."
_."." ...
... ... ZER0
"..
.....
..... WROOS
... . .....
..
.,
-~..
,
"
POINT TO THE TAPE
..'sET THE.RETURK.
T6,X3+PSA
X2
MTCNTRLI, X2
o
o
SAY
...
...:':':i:2.,Xl ....
o
CHECK FOR TAPE MOUN1ED
JUMP IF THE T~PE IS MOUNTED
···"·MAS K-·rO·'·1:58ITFU NCTI0NCOtJE'"
088
LDA
SELECT,X3+PSA
... ······y··j"'R··''''·· ,............... _...'--' --·· ..·--··,----·--·· ..··---·--····T·BT···----'---------·..•·•·• ..--····""kl+CN ;3 t 1<;'
.... " ...........'--•.•
53600000
(11603 D6SP
,0
MAGNETIC TAPE MUST'B£ MOUNTED
TXBUSY,X2
QIO
o
·GET ·THE····· FROPERCO NTRO l ,BLOCK·
2078
UJP
IOWAIT
.... NrCtHRL.X EQU
.....
2080
LOA
T6,X3
2081
ENO
MTCNTLMX
'200-1+'001 ···_····- .. ··· .. ·ANAu.. ····'·7·77'·776······
2082
AQJ,GE
ZABORT
2083
ENA
.
0
. . . . . ZOol,+,'
STA.-..
. F 6; X 3+P SA'
.2.tl.8..6...
03060
03063
03064
UJP
2085
087
14205141 P
~4103D£QP
,
AND GENERATE THE LEFTOVER WORD
"COUNTFOR ·T HE 'USE R - · · · · · ·..······ .
-0
F6,'X3'fPSA ................ -
2Q79
03050
14700012
--03051,·,17 &71777
03053
2069
2075
03045'14677777 X
03046
01001426 P
03047 p.
203Q2662 X
TAl
._ ............. --.206.3·-·.... ,. , ..............,.- ..,.-. '··'·-ST'Q·
20b4
ENA
'03037"12000017
03040
40302376 X
,,030 4114.10 5141 P
01002377 P
XOA S
ADA'--'
2061
"0303 4'4tl0UQ'O 4--"
03035 14600005
03042
T xausy ,)<1
T XEND
2'
U3026
16477777
····'0 302T-30··302737 X'
03030
40302452 X
..... 0303 1 2 030 2761 . X
03032 53500000
03036
TX8USY,X3+PSA
C MQSET
STA
LOI
,·,2053
21005146 P
1'1£ MORY
T XSH ASH
FPVIOl
TXSMASH
DRIVFAIL
TXHC
SAVE THE USERS hORD COUNT
TXdUSY,X3+PSA
GET THE PROFER FSA POINTER
············ .. ·FIGURE TH E·-AMCUNT·OF·TIMETHE··.... ······· ....·. ·. · · · · . ········ . . . . . --........--.... - ....- ....................... ,...... - .- "
··TWA···· '.' ·-·'·"CLOCK····'u
SBA
TXSTART
USER HAD THE TAPE DRIVE
"~B S
""'~ OUR
RAO
TXTOTAL,X3+PSA
CHARGE HIM FOR THE TI~E
". ,.," _.",. . . . ,.._, ._,"
UJ P , I
~1 T XI
..... ,'--.,... .,.,." .
MTAQLOAD LOA
TXWC
GET THE NUMciER CF WORDS THE
ANA
777778
TAPE DRIVE TRANSFERED
TXNE
2048'
0540000U
03033
PARITY ERRCR ON A WRITE
TAFEOOES NOT HAVE A RING
TAPE IS NOT READY
PUT THE USER INTC CONTROL MOVE
ENTER THE QUEUE ADDRESS
GOP R OCESS TH E'GUEUE ........ .
MEt1PARTY
..
2046
2047
03022 34377777 X
,03023" ,,0·140·5145, P
03024 20005146 P
03025 17677777
()
o
iXPV
2039
2 0 L~ 0
"" 204'1
MAG TAPE 1/0 CLEAN UP
UIO
41
T Xrfp
20J8
400U5146 P
03015 54305141 P
030165302 0022
G3017
31077777 X
'-U3021
PAGE
2036
2037
01003010 P
03014
03020
()
2229
----
()
o
V1.0 09/21/74
".
.~.
o
QUEUE
SET UP CN8LOCK TO POINT TO THE
··c a N--TR 01.:81.:'0 CK-LOAD THE USERS Q REGISTER
USE AS A JUMP INDEX
o
o
o
o
o
('J
0)
o
o
0"
_- - -- -.- - - - -- -.- - - - - - . - -.--.-- - -- -
.
..
-- -
-
-.- - - - -,-,- - -
-.....,.
.
- - -,--'- ---_.- - -
o
---.,-
--,--- -
-.- -,-,- -- - -'-- -,- -
-,
-~,-
-- - - - - -- - - - _.- -.- -
.-~-.----
-,-"- - _._,- - - - - - -,- - - - -- ---- - - - - - - -
--- -,--- -.--_._,....,:;
ASS OI'3LE RIO S3
UIO
USER DISK PACK 1/0
IS THE PACK MCU~TED
WA I T I F· NOT· . . . . . . . . . . . . . . . . . . .
........................................... .
LOAD THE SEEK ADDRESS
··DONT"-ALtOW··tA8Et-POOt·rs
LOA D... MA)( .. SE.CI QR. J\jUM.BER
REMEMBER THE SEEK
"'.' ...' ... GO·FIX-·TH 5 ST tlTUS··
o
o
o
.....
0·,
.'
······ZERO·IS ANILLEGAL . WG
WAS THE LAST SEEK BAD
IS THIS A REAC
ITiS A WRITE
. . nrTERTHE· RErORK
ENTER THE QUEUE
o
o
ADDRESS
o
c)
···LOAlJ·····THE FWA···
CLOBBER THE PtlGE 8ITS
THE CONNECT HORD
LOAD
o
o
o
o
o
o
o
o
o
o
d
l
o
o
o
o
o
o
Oi
o
ASSEM8LER/OS3 Vi.U U9/21/74 2229 PAGE
'~1 ~7
03145 ~f~G3i64 P
03146
2158
14700UOO
..... ·0311+71767777'1-
2159 ..
21bO
03150
40005151 P
U3151
53300000
03152 ., . . . 5 660 0 OIl lJ
03103
54305143 P
03154 P
03154
2161
2162'
2163
2164
2165
2166
.................................. 2167
203031.25 X
03155
53500000
03156·41·10 U004·
03157
167lJ0014
0316l+
03165
03166
03167
2174
03176
21001671 X
U32UO
01003147 P
UJI
1'1$F"OQNO't l..UA
EuU ....
TAl
.. SIQ
XOQ
SHAQ
"'LOQ
EN I
. UJP ...
MSFDON10 EQU
............. ANA·····························
STA
o
777778···
MSFT HlP
X3
X2
1'1 SFdUSY, X3+P SA
>;.
SE[EC'.
;X3+PSA
X1+CNBLK
·GPP.tXcl+CN8LK
HTMSF
24
'l'1SFT OW· ..
MSFdUSY,Xl
......SEIS.J.AI . . . . ~. . . . . . . . . . . . . . . . . . . .
0«'.
IR'lJISK ERROR
SET NO BITS I~TO THE STAlUS
··········fvlASK LEFTOVER WORD COUNT T015
8ITS AND SAVE FeR LATER
MOVE RETURN ADDRESS TO INDEX 2
RESTORE THE PSA INDEX
[OAG'THE'CONTROL "'SCOGK ·ADDRESS·····
SAVE THE NE~~ STATUS····
MAKE THE USERS STATUS
STATUS TO A
LOAOTHE"LEFTO\JERWOR
ENTER THE Q ACORESS '
SET THE USERS.STAI.US.ANO
(1::
(~
.. )\,.hr
"0
CO.NTINUE
~
..... SAVE· THE LEFT OVER WORD COUNT
2177
IIA
X3
MOVE RETURN ADDRESS TO X2
"'~'." ... eTA!
·X·2·······
·····2178"
217S
LOr
MSF3USY,X3+PSA
POINT TO THE LSER
2180
LOA
BUSY
LOAD CCUNT OF CCNSOLE MESSAGES
.
.....
·····ASG
10········
··2:l.8T~·
'IFA'TARGEAMCUNTOF'CONSOLE ........
2182
UJP
·+3
CONSOLE OUTPUT IS HAlTING
·2103.·ENA
··········C·ONI~AIT······························ · · · · · ....· · · · · · · · · · · · · ..········ST Gp. THIS USE R
2184
RTJ
IOSET
2185
LOQ
AUB
SET THE A/U BIT INTO THE STATUS
... 2'1:' 5·6·_·· .. '···· .............................._........... ····lJJ p ............................. ,.. MS FlJ 0 N tlit . . .
2187
UJP
MSFOON02
2175···
2176
~
03177'·01 GO<3154P
TIA
TAl
. ····2173
5~360000n
01083176 P
ENQ
STA
217t
2172
03170
54305143 P
03171
20077777 .............................
X
03172 '056000:1.2"
. . . . . ..
U317414677777 X
03175
007U1426 X
HSFDONE
. '~2t7 0 .
03164 P
176 77777~
400J5151 P
53300000
03173
(JJP
USER DISK PACK I/O
I1SFDONI0
. HSF DONO 2 ANA
2168
2169
03160
13000030
031612100'5153:' P
03162
1410514J P
o.9.1E).~ ....... Q),QQZ~],.9. P ... .
o
o
o
o
UIO
43
777718··
MSFTEMP
,.e)
o
o
o
o
o
o
o
q
o
OJ
()
()
2188
O·3201···P······ .
03201
U3202
03203
218':
2190
14203204 P
o
o
.03210
9;32 P9.
03207
EN!
UJP
2191
2192
2193
14(00001
01002645 P
.. ············0320·4 '1:42051"
03205
····NSFviRTTX· EQU········
... EN.Q...
"'¥.
MSFW02,X2
MTOUTHDl
.1 ........................................
. "NSFdUSy,X2
MSFl~ 04, Xl
141032
01 GU?'i' .:0:.::: ...........:..............................
ENI
14277777
0100.3125
. . . . . . . . . . . . . . . . . . . . . . . . . . . . UJP
!tJOt,JIWJ1
SFWRITE,X2
SFR04
o
ENTER THE RETLRN
... St1ALLESTALLOWAELL .. RECORO
GO SHARE SOME ceDE
....ENTER ..THEQ 'AD DRESS....· .
ENTER THE RETURN
ENTER THE IC COCE
c)
o
o
{,
.................................................. ........................................................................................................................................................
~........................................................
.............................
.............................................
~
................ ........................................................................
~
o
0"
o
0'
o
o
A SSE1'lBLER/OS3
(1")
V1.U 09/21/74 2229
PAGE
UIa
4~
, "" """'¥JJ',p/-,;>,;. '0,'
ij.';>,;.
IRCH ECK
'PI: 'II 'I::;;'JJ'~, ~",~~, ),Oril:';':jfJ;. :.;. ';>,;.J<. ';'i.' :{>;.':;" ':iJ.i;' >;;.' >;-;f.J;";f.;;;.jl::;;'''>;':;'''>;;')J.''~n}')J.''' >; '>;.>/-"i;.)J.
;;;.',," >;,''.J.J,j. >;.''1:'1- >; 'II;;;':;;: >;' '11:'1-"1- lj.'J,j. J,f.
¥
>/-
,~,IRCHECK "'~
C)
>;.
J,f.
"
f
!
,
I
I
I
()
0
JUMP IF RECCRC IS TOO LARGE
0
o
"LOACTHC'STARrrNGAOORESS" " " "
LEAVE THE INTRA-PAGE POSITION
,AGO,TN,THE" WOROCCUNT""" """"""""
ROUND TO A PAGE NUM8ER
SHIFT INTO POSITION
", MEMCRYFIEtG'8f: . . . .__ ..... ....··... _..
2284
2285
"'2286
2287
. . . . . . . . . . . . . . . . . 2288
()
o
o
o
o
o
Jf
F1._·._ .... _F2
'l-
2282
. . ···2·2·I:5-S·. . .•··•· ............. ,.< .........
()
TTY INPUT
>J.·5f.';'-4¥-::';;·¥-¥·,..lj.-·v.JI.>J.· Jf';;,,;"¥Jf'J.'>j.'Ji. ·>J.··lj.>.n;. ;y.-.Jf·Jf-i-5f.¥l,CJl.J,(·Jf. lj.':;::>,<>/- >J.-¥ lj.-¥ JfJl. ';:)J.'>f.:1J. 'fJ;.-Jl.¥:>f.J.}.·¥'f¥N· OJ·OJOJi[.Jf>f. i[."
..
... :!.'.
_. --.
·SHIFT COUNTER .................-.. . . . . . . . . . .
----,
SHIFT REGISTEI~
WORD CURRENTLY EEING CONvERTED
13 CD ...................................................................................................................................................................................................
CURR E NT"A'O DRESS'REGI TO
STER'"
USERtS A REGISTER
'"-,._",.
51~~~~I~GR~§ISTER
FILLER WORD
......_...3'................................ _...... ........
........
.¥.~
JJ. • • • • • • J.}..¥¥.¥JJ..J.}.>J. • • • • • •
................
BLANKS OR ZERO
.. .Jf .
INI TA I LIZE-T HEFI LLERT OBLA NKS
o
MASK THE WORD COUNT TO 16 BITS
SAY BEFORE THE FIRST CHARACTER
.Si\VE ... SJ!IEJC CU. NTE R_ .............................................................................................................. .
REMOVE PARITY BIT
SKIF IF LOWER CASE CHARACTER
o
SKIP-IF NorCt KTROC-OHAR;fCTER
JUMP IF A ceNTROl CHARACTER
CONVERT TO A eco CODE
RESTORE
THE PSA POINTER
P······'Tp .. S·H··IPT'··REG"';'"I
CHANGE F2 TO F7 (INITIAL VALUE)
GET THESHIF.TREGISTER
REST6RE"TRE'PS~ ~GINT£R
SHIFT IN THE CHARACTER
·SAVE-TH~SHIFI REGr,FGR·lATER
GET THE SHIFT COUNTER
JUMP IF NOT THE FIRST CHARACTER
INDICATE A CHARACTER HAS ARRIVED
ALJ,.,O.W US .TQ G0._.,1:0 BOUN.D . . . . . . . . . . . . . . . . . .
SKIP IF A FULL WORD
()
·······SK~I
()
o
o
o
S~·INtT'I'A·L·IZEO....
.. . . . . . ., . . ,........ , ......,.. .. .,,,....,. . . . . ,. . . . ,. ., . .,.. .,,. ., ...
o
o
()
. . . . . . . . . . . . . . . . . . . . . GO·GET . MCRE CHARACTERS··
GET USERS Q
o
Q,
d
.........
* •••• 4 • • JJ. • • JfJfJf.JfJ.}. • • • • • • • • • • • Jf • • • • • • • • • • Jf.Jf • • •
c ....
o
SUBTRACT ANOTHER hORD
JUMP IF WORDCCUNT OVERFLOW
STURE 'THEWORCINTU USER CORE
o
GEl THE·-CURREI\ I· ADDRESS-
o
.................., ................ "
.................................
SKIP IF A PRINTING CHAR. FOUND
.................... .......... , , ....,. . .,,.....,,.'.,,.......................................
SKIP IF RETURN
1E_S L. feR .ALJJ\ EEE EJJ. .
GENERATE A LII\E FEED
GEL COUNT AND SHIFT-REGISTERS
JUMP IF SHIFT REG. EMPTY
."'j U"M P.""1' F' . ·F'I·RST' . · D"H A'RA'C'l E·R . ···. ·,'"
II
0'
SKIP IF LEFT JUSTIFIED
o
o
~
o
o
o
o
CD
(1)
to));.
IJI
()
o
o
o
o
o
o
o
ASSEtv18LER/OS3
Viall
03376 0100,)373·
03377 20303347
03 (.0 0 15477776
034LJ1 40303377
U3402 03303406
.. u03403 5540UOOO
03404 41703356
0340 5 5500000U
-03406··· ·21::>03401
03407 01003603
09/21/74 222g
P
X
X
P
X
X
P
03410 04600012
·05411 . 0100331·2 P
ll3412 14600215
03413 77760000
0·34T4 -2 000 D4 4 I X·
03415 35303274 X
0341~
03417
~030~415·X
01003312 P
03420
046D0027
'03421 ··0100"3425 P
03422
200Q3262 X
03423--343 G.34.16 X
03424 010034Db P
03425
································. ··03426
PAGE
lLt600000
03431
03432
20002647 X
35303423 X
INA, S
STA
AlJ,LT
VFD
STQ,I
VFD
TTYINPO 6 LDQ
236tf
2 :366
······2367·
2368
236S
2370
2371
. ·····2.372
UJP
TTYINP07 ASE
UJP
ENA
CTa
rTVTNPQ8 TGA'
SSA
STA···
UJP
2373
2375
2376'2377
2378.
2379
03430._ .. 403G3304X ....
03433
03434
LOA
····235 l
2358
2359
2360
2361
2362
2363
. 403U3Lj32'X .....
010Q3312 P
TTY INPUT
··UJP
2355 .
2355
04-600020
·IJT0033TZP
03427
ura
it 7
1
TYINP09
ASE
..
......... UJP
LOA
UJP
.......·.· .·.· · .·....·...· ·.. -.RAO ..
TT INP06
SHIFT MORE
GET USERS Q
INDICATE ANOTHER WORD READ
JUMP IF WORDCCUNT OVERFLOW
UPDATE THE USERS CORE
GE T USERSQ
RETURN TO USERS PROGRAM
0128
SKIP IF A LINE FEED
I GHOR E···· At:t:O THE'R'u CO DE5"··· .". .· .....~.u"
TTYINP05
F6,X3+PSA
,..1 ....... -
..
Fb~X3+PSA
A9/ROS·
F5,X3+PSA
A9/RIS
F6,X3+PSA
TTYOUHJ5
··TTYINPIA-
2158
-8IT19-··-·
CR,X3+PSA
·····GR,X3+·PSA
027'3
FHS
C R, X3+PSA .
TTYINP06
ASE
0208
... :.....:....:. . . .: : ..:..:. . . . . "'·_·::···········UJ
p"_. ....__. -- ·rrYTNPTA
ENA
Q
.-STA
LOp.
SSA
.. F.7 tX::HPSABRRI:!
CR,X3+PSA
e R;X'3+ PSA·
TTYINPIA
.)
•..•.
GENERATE A CR
THIS'BIT IN THE CONOITIOt\
REGISTER WILL CAUSE INBOUND
. _. . . . . . . . . . . . . . T08E·CLEAREO·8YCRANO LFONLY .
TTYINP1A
-'TTYTNPIO
Da
SKIP IF CONTRCL-W
Nor-C-CNTROL~\-r
GET THE FILE MARK 8IT
Sfl IT INTOLUN1 DO STATUS .
RETURN TO USER WITH ORIGINAL Q
····,·JO HFIF'
SKIP IF CONTROL-P
TGNCRE 'OTf-lERC GCES··
·INDICATETRAILINGZERGS .
GET THE BINARY RECORD BIT
SET IT INTO LUN 100 STATUS
SCAN
FOR ANOTHER CHARACTER
·. .
()
o
1..0
o
o
o
o
o
o
o
o
q; . . _. . . . . . . . . . . . . ._. . . . . . . . . . . . ._. . . . . . _ . . . .
o
o·
o
0::; . . . . . . . . . . . . . . . . . . . . . . . .
o
ot:
o
0, ...._.._......_. . . . . . . . _. _. . . . . . . . . . . . . . . . . . ._. . . . . . ._. ._. . . . . . . . . . . . . . . . . ._. . . _. . . _. . . . . . . . . . _. . . . . . . . . . . . . . . . ._. . . . . _. ._
o
o
()
o
ASSEMBLER/OS3
C]) _ ........ ······
..
Vl.U
U9/21/7~
_··LJ343Sp
03435
21303251 X
03437
03005000 P
03440
r..
r
PA GE
2391+001
LoQ
2394
2394+001
27003414 X
""2394+00"2
2394+003
····,··[OU
.. LOL
······· .. 23·91+002···· .... .....
. '" ····03 441:"'031:03611: p"
TT y OUTPUT
UIO
48
2391 ····.. ··············· .. T TY ODnJ
................. ·······0 3 43627 005135 . p ..... .
()
2229
AZJ,EQ
LOL
""""'AZJNE
........• "
.......................................................................................................
Q,X3+PSA
8IT161'11····
ZWCZERO
BIT19
'TTYOW1""
""
..................................................... .
··MASK·WORo GCUNT··
ABORT THE USER IF Q = 0
CHECK
SPECIAL OUTPUT •••
,· . ·.."".; . . ;.. ';'. ANO'FOR
"'''';j UM'P """1 F. "SO·"·· ..... ·..·, ..,. ".. ·..,",· . . . . . " ,....... ", .......,... ,... ,................ ,..............". . ,
EOU'
•
ENA
TTYOUTWX
ENTER THE RETlRN ADDRESS
....... ()
.. ····STO·RE THE ·RE fUR N"ADDRESS . .
23'J6·"··TT'(SHARE "SrA'
··PC;X3+PSA
2397
RTJ
CLEARN
.2398......
. ......................................................···LeA
···· . CRMASK ..· ·
(}
()
2399
LPA
CR,X3+PSA
2~OO
STA
CR,X3+PSA
'24Cr1"·"'·"·'..~····'········"'····"···'··ttlA'······ .........,., ""T"S",'X'3'+PSA ..... ,.......... ,··,·····,·"··,,,······l:;OA O"·THE'···USERS·"A'REGISTER·····'···~"
,.......... , .. ".
03451 ~4303404 X
2402
SWA
F5,X3+PSA
O~)452
12077760
2403
SHA
-15
LEAVE THE MOST SIGNIFICANT BIT OF
.................... 0
240 Li·
'ANA " 0 ' 0 0 0 1 8
'THESTx l!:.EN8 IT ADDRESS·" ............" .......
1 0
'03453"T76l)00 or
I
03454
03003460 P
2405
AZJ,EQ
·+4
JUMP IF THE SAME BANK OF MEMORY
....................................... u
I
0345-57·7 67DO 0 0
·····2406
. OSA
()
()
2407
XOA
000018
SET FOR THE OTHER BANK OF MEMORY
03456 16600001
03457
77660000
2408
AOS
0346 O· .... 0 t07777'7X' .
·... "'240'3
···'''''''tJdP''''·'·· · .. R E T U R N J U MPTC'THEP ROCESSING"'R OUT"l:NE
03461
54303332 X
2410
)TYOUTWX LOI
RPSAPTR,X3+PSA
LOAD THE ADDRESS OF THE PSA
,10·
034b2
21303306 X
2411LDQ....
T6,X3+PSA
GET THE USERS Q REGISTER
0
"2412'·
LOL
8RP(j
....·
CHECK THE8INARYSIT ...... .
D'3'463
27UU34;:nx
2413
AZJ,EQ
·+4
03464 03003470 P
..
···. · .... ····· .. ····.. ··03 LI65· 343D. 3447·X
2414·· . .
·RAO···················..··················C R,X3+PSA
03466
11;.600220
220 INDICATES A BINARY RECORD
2415
ENA
2208
0
o 3467 777600 (] 0
2416
eTa
. . . . . .·.. · · · .... ,. .·. . ···2·4'. :1:". 7· ....""...., . . . . . · . . ·. . , ·...... " ..... ·....... ·....·E N·A. . . .·'· .................. ·,·o'OS . . ·. ·..·.... ·. ·". . ,,·.. ,. ·........ ,..·""''''
, ····· ..,....···"OE FAU'Cr"'''c AR RI·A..GE· . ··CO·NTR'O t . . . . . . . . . . ·..· ......"........ '.........................".... ,...... ". . . . . . . . . . . . . . . . . . . . . . . . . . . . "........ "..........'. .
. 0 3'4 7il'1: 4'60 0 fi6 Q'
83471 40303430 X
2418
STA
F7,X3+PSA
FOR BINARY RECORDS
2419
LOt
BIT16M1
GET THE HORD COUNT
03472 27005135 P
0
. (13473 ·'40 30 3462 X
24·Z!i'
····S·T A
T6,X3fPStf
SAVE:lHt:·WbRDCaUNT
03474 27003463 X
2421
LOL
BRPS
GET THE dINARY BII
· 2 · 4 2 2 · V F O .......... A·9/ROS .... · ..·. · · · · ·. · · · · · · · . · · · · · · · ·. . . . . . . . . . . . . . . . . . . . . .....
. . . . . . . . . . . . . . . . . . . . . . . . . . ..
· · ·. · · · ...... ··.. · · .... ···03..475 · ..55 400UO·(j···. · .............................................
2423
LOQ,I
F5,X3+PSA
GET THE FIRST WeRD FROM THE
03476 21703451 X
0
03477
55GOOuOO
2424
VFtl
A9/RIS
••• USERS CORE
•'·'''··''''·A'L:;j''·,·''N'E·''· , . . . "" .... 'T TYST'N'''''''''''' . . . ". . ,. . ,... ""...
"";J U·M jl' '''IF'''' .B' I- N"Jl:RY'''''''''' "'~."""'" .... " . ,.... "" .... ""..,.".... ,.. ". . . .".............",,,
035u"0 "031'tl3 553·· p.
03501:
13000005
SHAG
6
03502 40303471
STA
F7
0
TAT'
....
X3' X3+PSA
............. ..
····03503··· 53 to 0000
03504 05600011
ASG
118
03442 P
14603461 P
403U24111X' ....
03444
00702605 X
. ..0;:)445 ... 2400 D010P
03446 37303433 X
03447
403G3446 X
M"0'~3450 '20<30 '3240"'X
I
()
239S
03442
"0'3 1.43
I
TTYOW2
............................................... " .................................................. " " ........ 1·"
,.--
,
-,
o
o
011103511· P
046000£1-0
035U7
01003517 P
" "'0351 O"1·lt3u·0007"
U3505..
03506
0
•.•.•'M"." ........"., "
0
03511
16300007
03514
1460U01
03516
0270351
····UJP·..··
·········lTY.OU·HI·3····· .. ......... . .......................
408
TTYOUTW4
i
03512 15300001
U35T3 "lT3UD007
TYOUn~3
ASCII
0351577760 IJ 0
0
03517
14600000
""03520·'" "13 OOttOt18"
03521
5370DOOO
~")
03522
l.:;,
d
20303722
·····03523 .. 7776 aoo Q
537UOOOO
03527
20303722 P
0:3 5307776 Gulh]"
03531
146U(JO[JO
03532
13000006
····,···· .. ···········03533·······5370·0·0 00····
03534
.................... 0 3535
U3336
03537
0"
, ... ,u. .... ,.,,'.,', ......
0,
;i"
2500
6
2600
"l
04007
04010
'04011'
04015
····'··04016
253::r
'2LF
""",,,,,u"""04(hI6 u6300f.l"j: 25
04014
2532
2536
2537
(t4000336
0400li
45000300
0400'1"
460lHlZT5 ...................................
0 1+002
47000240
041103501] 0.0 25.7. ...
04004
51000123
04005 6200()324
l
25'3'0
2531
22000113
2300031.4
037712700
66 0'0 o331:r
710U0335
17000254
'7500 005D
72000134
55000137
. ? 500U077
UIO
ASCII
GHA RT .
EQU
~~ 8
VFO
VFD
2504
03725 3500UU63
. 03720' 5300026 1+
03727
16000065
03730
1500006b
03731' 1400026 T
03733
03734
03735
2501 .
51
2502
··2503
52000261
03732
PAGE
2539
254D
.. '2541
2:
I
BCD CODE
CONVERSION
.... ".'
....... g~~~ ~ 6~ TI 9b8g; 8~ ~ ~ ~1
TABLE
. COOEC CNV ERSI C N TA8U;:
i
CI)
240 I 00
H6/~,010/000,08/262
H6/~,C10/000,OeI063
'H6/$,010/000,08/264'
VFD
H6/1.,010/000,08/06S
~~
'~~5~:
~~g~g:8~; ~ ~ ~
VFD
H6/(,010/000,08/270
250/10
............ ··VFD·············. ··················H6/),010/00 0,0 8/071····
VFD
H6/¥,010/000,08JO?2
VFD
H6/+,01G/OOO,C8/275
VFOw~"u,
06:173,010/00,. 081 047
VFD
H6/-,010/000,08/246
VFO
..... J,6/.,.010/000,08/245
"'\1 F()'
H 61/ , 010 1000 ,08/333
VFO
H6JO,010/DOO,08/053 260/20
··VFO··H 6/1,010100 0,08/101 .
VFO
H6/2,010/000,08/102
VFO
H6/3,0101000,08/303
., ... , .. ,., ...... VFD ' H 6 / 4 ,010/00 0,08/104
VFD
H6/5,010/000,08/305
VFD
81
.............. 8
.~~g
. .
··,~~~~!gta~8~g~gg~lg~···
H6/8,010/000,08l110 27Q/30
H6/9,010/00Q,08/311
\/FD
H6/; ,010/000,08/074
VFO
H6/; ,010/000,08/056
"VFOu,~
"H6I<,O:1:0100 0,08/251'
VFJ
H6/=,010/000,08/243
~~g.. ..~~.~ ~:gtB
8~8~~~ j.~
VFO
H6/~,010/00Q,08/055
300/40
·VF..fJ... ·
H6IA,010l00Cl,OS/J12 ...·.
UFO
H6/S,010/00D,08/113
VFO
H6/C,010/000,08/314
""VFO"
HEilO,.010 I (Hlfly08/:l:15
VFD
H6/E,01D/DOO,OB/116
UFO
H6/F,010/DOD,08/317
VFO .
R 6IG,0101 0 Q 0,08/120
H6/H,010/0GD,OBI321 310/50
H6/I, 01 0 10 00,081322
H6/J,010/DDO,08/041
H6/K,01D/OOO,08/044
()
o
.. ................. 6
o
,.0
VFO
·\j.FO
58 g
..............
o
o
o
H 6/L'f010:/'Q'OOTO 8/'2 52
···"ri-·;:;;···········..·····..
·\JPfj· .. ·u"... ,''''''''" ....
~~~~,gi8~~~g'g~~i~8
'H 6/G~OIll/ DO O!O 8f276"
H6/P,010/0DO,OBI240
320/60
H6lQ,O 10 /ll 0 u'., 0 8 r25.7 ....
H6/R,01D/GQO,C8/123
H6/S,010/00D,08/324
"H6IT, 01'01'00 o,o8/·1.'2:5·.. ·'
VFO
. . . . . . . . . . . . . . . . . . . . . . . . . \lFO
0~b
Hb/U,010/DOO,OB/126
H6/V,010/000,OB/327
'''H6 /W;OI 07000,087330
VFO
H6/X,OlD/DOO,08/131
............................................. VFO
H6I.Y.,.Ol.0/00.0,08/132
VFD
H6/Z,OlD/OOD,08/335
VFO
H6/[ ,010/000,081254
"VFOuu"H 6/~,O:tfJ/O 00,081'0511"
VFD
H6/1,010/000,08/134
'~~B,~~~~"gl~~ggg:g ~~ .~~. ~
o
o
o
330/70
o
o
o
()
o
o
o
o·
o
A SSEHE3LER/OS3
(I
PAGE 52
UIO
"'25 6'/
U4377
~
(j)
,
I ()
1
I
04400
04 LflJ3
()
I 0
I
I 0
I
II
I 0
0
,..."
012U4347 P
04404
.. ".-. 04Lt03P'
04405 P
"""0'4405""'01Zti'437'3"P"""Z'8Z'3'
04406 P
2824
.A~~Q~
01204401 P
2825
u4407
04410
01204405 P
·,04410,·P····
U4413
04416
01004673 P
".9100,9 2,.~,7.
f'
04423
Oi004673
0442/:;' "1.1100
04425
(.I
4-42 6
04435
UJP
tid?
ZABORT
"'1'T YO ur·w·
p
OiOGOf.J54
.CRJ .. 0 I.S.P~Jl '1 . . .
RANDCM ACCESS
0
FILE I/O
0
TASK OUTPUT
.
OS
USER 'MASS 'STORAGE'UNIT"
'~)
I,U
PAPER TAPE EUNCH"ouIEUI .._
AOJLST THE ORIGIN
0
14700a4~S
,,"H """,,,,, .. , .•• "
0
0
75XX
"',,· ..··.."..7 6"XX"'''''''~''··''''
0
1177778
-75XX
76 XX
SA······
0300500U P
··146rn:rOfli····
MAKE A CHECK ON THE RECORD SIZE
··· ..TO·····8E······cERTA"rN"···I'T'i:·S"'~NOT'·TOO·~tONG.. "
WORGCOUNT IS TOO LARGE
QPNlf:3JLl" FOR .IJl,.EJ;Al,,_~~ ITES
04437
04440
0··1 'l(J
04441
01000554 P
72 XX
····7:3X·X··
04443 01004673 P
01004673 P
·04445 . 'f470002S
04446 20304433 X
INPUT
0
0
34.1d
"'.,
75XX
u
FROM FUKGH NOT ALlOHED
76XX
Olt 44-712 DOGOD 5
04450
03204432 P
..
--~
CHECKW
04451 14700051
""04'452 ·"·U1:CltJ·443·Z"
1
0
81 NARY BIITO -SIG N,POSIT ION
JUMP IF BCD
0
72XX
()
""'FC~1ECKW
04453
010J1452 P
04455
01001342 P
GRIC
UJP .. ·-.. ·,
·········-·····-'-·
..·..OJp·-_
0'4[64 -01U04673P
'.. '." .......•', 0 4 4'60010 0 3' 0403' p."
04451 010U4673 P
04462
01002442 P
·····D 4630101)4673' P
r.
04464
01002643 P
04465
01004471 P
04470
01004673
04466
f.
···················ONtINE'·INCIN2RATO-R··I'IO"
INPUT FROM PRINTER NOT ALLOWED
ZA80RT
... Z·ABORT
35
UJP
UJP
-. UJ 8.---.-..
-04456 ...-01004673-P04457
01004673 P
0;
:10
PtCTTER I/C
72 XX
73XX··
-2
\f1. 004673
u4444
, On'--
X/Y
I
·'i144£+2"OlDOI:j:67·Sp· ..
d
()
I/O
UJP
UJP
(Ji-+432
11177777
'·'''04'433-->373tJ4:3'52' X"·"
04434
03604775 P
'Ul~436'
2'C])
TELETYPE 1/0
···········-lg~~c·b~t~~fRA F
04427
0100Lt673
.... (.1·443·0 . -···iJt··Q U··y.·h73
04431
TTYIO-72B,X2
IODECODE+HTPLGT
PRIO-728,X2
IODECODE+HTNULL
N·IO-7'28'X2'·"
IODECOD~+HTTV
FCONTROL
72XX
ZABORT
73XX
'..,..,..," "",,,,,,,,,,,, ... "",,, .. ,,,,,., Uj p ..""""" '" "·""""'F·TN'P'W'·''''''···'''''' ,,,........,... "",,,,,,,,, "..," .."., "" '"?'4''ix'''''''-'''·''' " .
UJ?
ZA80RT
75XX
.V;.JP
. .t.Q.lJ.LW
.l..6.X.X
UJP
TTYCNTRL
72XX
.................... ····73XX-·..,' ···UJP·--- -.ZA80RT-·
UJP
TTYINPi~
74XX
01004673 P
'0 4415"" 01: 0 trO'020 p'
04414
0
0
--""
FILEIO
tI.AG.NElI.CT APE
~b5-~C'b5~tAtT TY
g(j
01000626 P
0442 Q
01 0 tJ 3250
04421" ,·01·0 0·4673
04'422010Q3300
()
P
jJlt412 ",.,"','
01204413
P
"'04413-P
'p.i!.Lt.i.1.,
0
2
2
CARD
IODECODE+HTMT
UJP
RAFIO-728,X2
-ORGR ··-··IOOECOOE+HTTASK
UJP
PUNIO-72B,X2
ORGR
IOOECODE+HTMSF
'··U;:JP·MSFIO-728',X2'·'
ORGR
IOOECODE+HTPTF
.~~ ~ R{1b~ b~ ~A9~'A X
2
,,·,,2
01204347 P
04411 P
04411012044:21 P
04412
··~·~~R
2826
FRIN'TER I/C
-PUNCH I/O
tINE
.. -....
····CRIO-728,X2·······················
UJP
ORGRUJP
ORGR
U;:JP''''·''''
ORGR
2819
,. 2820
2821
2822
'044'07P
PRIO-728,X2
--IOOECODE+HTP-UN
PUNIO-728,X2
IODECODE+HTCR
~~~R
" 281t'
01204326 P
- 0440lt P
01204333 P
u
()
2814
P " " " " ' 2 81' 5"'"
04402 P
2816
012042) 6 6' P
281 7
Q;
. rOL:fECOOI-+HTCP--'"''
UJP
ORGR
UJP
ORGR
····U"JP-ORGR
2813
04401 P
USER 1/0 INSTRUCTION DECODE
·'--"oRGR·-
01204333 P
2811
04400· P · · 2 8 1 2 ·
o4401' "'012lJ4381
,0440,2
ura
56
01004471 P
'04·467"" 0100 Lr673" p"
P
...
CRGNTRl
Z-AB'ORT .-.- ..CRINPW
.....--2 AS ORT ..
Z ABORT
73XX
74XX
75XX.
OUTPUT TO CARD READER
NOT
ALLOWED
0
··NTGNT'Rt·
ZA80RT
NTINPW
..... ··ZAiJORT
0
~1Toun'l
"--'
72XX
73XX
0
·····"74,XX,·
75XX
C)
0
ASSErr3LUUOS3
cr
04472
01000603 P
04473
01002254 P
01004673 P
04474
,
09/21/74
222{~
U4471~4~UODfO-
(]
I•
VitO
"'2889
2890
·2581·
2882
2893
....... G4'+75"010022'7=~ p'u
2894
2895
U4476
0100467J P
..O.4.~.Zl .... 010u2336 P
()
04500
01001457 P
04501····010D1472·P
04502 01001547 P
04503
01004673 P
04504010tl1867 P
0
I0
I
04505
J4506
01000654 P
04507
01004673
2896
2897
2898
····2899
04513
04514
()
'2902
01001452 P
04516
01004673
.04511 ... ill 003111·
'ENA
"'HTNUCL
TVCNTRL
ZA80RT
'T VINPW
ZABORT
T\i.OLJT W
RAFCNTRL
. ···RAF-SEEK·
RAFREAO
ZABORT
·····tJjp
RAFt-lRITE
. . . .~. ~.~g.~+R L
.. UJP.
UJP
UJP
........................ UJP
29.0 ..4
290E
29\li
ZA80RT
lA80RT
62+1
FCHECKW
.......................
ENQ
t'i SF I 0
,2)31.~·5
76XX .
ASTATUSA
UJP
TVIO
UJP
UJP
UJP
UJP
U-.JE
RAFIO
UJP
... ···UJP
UJP
UJP
2905
2908
2909
2910
2911
291.2
····2913-·
2914
USER 1/0 INSTRUCTION DECODE
UIO
57
2903
P
01003077 P
0'451'5 ····(fI003 I i i ' P
0
2900
2901
0100467;SP
04510·01004673 p ..
U4'311
14700077
oif 512 0 1 0 0 4432 P
0
PAGE
UJP
UJP
UJP
UJP
UJP
. . . . DeD
72 XX
73XX
···74XX·····
75XX
. .76 XX .
72XX
. 73XX .
74XX
75XX
"""""""""76 XX"
····0
...... 72)< X ..
73 XX
INPUT NOT ALLOWED
MAX OUTPUT RECORD SIZE
75X·)(
6
o
".
MSFCNTRl
MSFSEEK
f1SFREAD
Z AgaRT
.. ' l"ISFREAO X
···UJP··
72 XX
. . ~. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . _ ._1.0
73XX
74XX
15XX
····76XX
!....)
,......,.
o
0
o
0
()
0
()
0
o
0
o
I~)
'--I :,
()
d
o
o
1
Off
O':~'
...........................................................................................................................................................................................
~
.....................................................................................
o
O.
o
0"'-
o
Q·.f,
o
u
0'
-~------,-----,~.--.-----,---.---"---.---.---.----
.
--------,-,------.---------.--.-,----,-..
..
-~-,-,-.-.-----._._-------.-----.------.-.
__
o
._------_._-.-._--,-_._------.-.--.---"---.--,--.-.---,~----
cI)
ASSEr18LER/OS::;
V1.0 09/21/74
..........· ........ 0 If'j'2'd .... "T4'r:;U'l;522"P
84521
........ ····04522·
04523
04524
2229
01077777 X
03004537 .p...
20377777 X
12077755
PAGE
"29fT'
2918
()
o
o
o
·
O
o
............................. 04527
'1]1.j:·53li
84534
14677777 X
01077777 X
04535
20304532 X
······--······················--··04536....4-·0 31r4 f6I'x - ...04537
1460GU01
U454·0··· ·3iJ3·Q·4·3Z0 -1<-- ...
04541
44304540 X
04542
OiOJ4322 X
04543
20303663 X
04546
04550
.
M
• • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • • •"
04553
01077777 X
SHA
····AZ:J,·NE·"
M L....
-18
.............. JU MP··I.f-···WE··GOTA CHARACTER
GET TYPE OF SYSTEM
··'··EXCA!:rORT···'v'ABO·RT·-TF··{\;·CT·A·TrY·····~······
....
v
••••
DC)
v ••••••••••
SET BIT 19 IN THE USERS CR WORD
.... LD.A..........._ .CR,X3±PsA
...... IF .HEI.S... 1N CC NTROL Me DE .................... .
SSA
8IT19
AND HE HAS NG TTY INPLT STRING.
Q~G,S
0
SKIF IF NCT I~ CONTROL MODE
'61 A · ..- -GR,·X·3+PSA···········-·· ..... . .
..
ENA
INBOUND
IOBOUND THE USER
UJP
RMTERH
GO SWAP USERS
L...._...
E XE C eRA
LOA
SKIP
ENA
SWA
UJP
STA
SYSCM,X3+P~A
·-··syA·· .. ··
.__.......G..R,.X .3.+..eS.A.......... _... .
A,X3+PSA
sc)
.
GIV.E IJi.S... lJS.ER .. HIS......GR .J'LQRO . .
0
0
··p··C,·X3+PSA
CHA\~:O
SKIP
RHTERtf'
... JU.MFl.:I:f .!;Vf:R), I.H.HLG . IS. OK ......................................
I······.. ··········· . · . ··· ..........
· ....····..···....·. ···· .... ·· . ··!l-te····· ....·............................ ,;: ·Vf'.. I\·,:~ncl ..l'....· ................................ ............ ·
··GET·.. T~E·· . T R·APPiEO·TNSTRU.cT··IO·N
GEl THE SECURITY 8ITS
SKIP IF A 774X XX40 INSTRUCTION
......AB OR 1'''1 F" N
tiSTRIS HT..··
CONVERT TO A tJUHPt INSTRUCTION
THE NEW PC IS I~ A
.... ,J
o
Ut,,!·p·····
0
0
O;T"~;j
TO SA Y'NOTREA'lL¥A';iJUMpt
. LO Au·: HE FRCGHAN··· COUNTER
()
0
0
0
A ·R A014 R·& F; E AKP (lIN J ............................................................. .
o
ERS LAST JUMP ADDRESS
Q
0'
,
·........·". · · . . · · · . . ->J.+·z·X····ENTER "'T HE"RE'f
03004537 p
0'4555"01 00"45':3'4 X'
04554
CHARINP
·SKIP
SYSGODE,X3+PSA
(I)
1
PC,X3+PSA
0
RETURN
TERMINAL,X3+PSA
GET THE USERS TERMINAL NUMBER
ASGIIOUT
................_.. :-:.'.,.:"..............................~ 1 ::L.................... __. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . _........... __........................................................ _.............._......_ . . . . _. _ .......................... ..... ..........._......................................................................._......._....... I'c)
Xi
PSABLK,X1
IS HE USING A TTY
I···,;;;,·,M .. ························· ..·····-·2·
....
()
EXCABORT
ABORT IF ~OT
A,X3+PSA
20103615 X
03204674 P
20304536 X
•• ,
··P·C·INCR· .. -AOA
·1··2·DU·0·O.o2·
04551
.............../. .
- - . . . ..
"0 4 5 5 2'~ 1420 455 4-'P
o
UJP
AZJ ,EQ
LOA
92
.?? ...•...
U;:,ER 110 INSTRUCTION DECODE
.. EN A········
' > l - E N 1 E R " l H E " R E r O RN"AOORES'S
LOQ
0 1+544 . 535lfOOO'O'
12[J77?60
. .......... _.... 0454S
··········· .. ·..························04547
""'-"'~JfSCIInr
213U4251 X
203 [14302 X
3501134·4U·X"
04531
Q5500000
04532 ·······4·0·3J·4·5 27.. ·X·····
04533
UIa
··29·1··9···
2920
'04S2S'031tl4674 P .................................•..............................,,?
04526
Sg
[0 AOTHE USER F ICE 17
CLEAR THE
[}4604
... 04605
ROS
0
0
8IT
0
04606
0 /+607
.... 04610
04611
0.; · · · · · · . ···················046:12
... f760740
04613 031U4616
0':
o
0>
0
ECTNS ....... ANtI-·......·-07lf·Oaa-· ..·
AZ ,NE
EXECINSl
0461420304134
04615 01004536
.... ·........·.············. ········.. ······.··.·.LO
UJ
IS, X3..+.PSA ...................
0
S TA
. 046163730461'4QL~ 61 7
0 3 10 4 6 22
0
04620
146G0002
U'462 1"0 fO OliS40'P
Ok622
04623
.36304616 X
01004634 P
EX Eer NS2 ... SC A
UJP
04624:1: 7603t:l 0 fL. ................................. •· .• ·......
4 62 5 1 2 00 0 0 1
W M .. • . . . . . . . . . .•••
o
....LS,X3+P.S A
EXSSHARE
............... ,......................... ,.......................,..., ......... ...... .................w.,.
'300'v
12
8~'
~
0
~
0
0
ASSEMJLER/OS3
Vlo0
2229
~9/21/74
04626 . 16477777
04627
37304622 X
-04630
0~004b34 P
04631 176U3000
0 1+632"12000014
04533
35304627 X
04634 40304633 X
'04635
01004537 p'
o
o
o
o
()
'0463 7 2 0100 0 05
04640
03204642 P
04641·000·04641 . p ...
04642 14477776
04643 ,,:34100005'
04644
01000000
OLf04520004D00
. 04'646
00702226 X
04647
201iJ0006
0465012000003
o
04660
[J 4661
'04662
o
o
o
o
o
04663
04664
04665
····U4666
04667
04670
XOA,S
LPA
I·MPURE01,VFD,
3009
3010
"'3011
3012
........................... 30t3
3014
3015
301'6
301 7
3018
30r9'
3020
· ..· · ..··················3U21·
3022
3023
'''302 L1"
3025
3026
3027
3028
3029..,
20100007
054 Q 0 000
USER 1/0 INSTRUCTION DECODE
3005·
3007
3008
04651
03204637 P
U4652 13000006
°"04653'144 7777f:r"
04654 17700017
04655
04700004
U £+ 656'34301315' X
04657
341 Q 0 0 07
uro
EXECSSIM ANA
SHA
SSA
STA
300E
04637 P
59
2995
2996
2·CJ 9·),
2998
2999
'3~ 00"
.
3001
3002
30 U 3
3004
0 1+636 .. (lO·O·O·{j··O·OO··· ...
()
PAGE
RE\..lY01
EQU
IF
"LOA'"
AZJ,GE
·HLT
• DE BUGO 02
ENA,S
'RAO
REWRITEY UJP
LOA
. RTJ··
LOA
SHA
,IF
LDA
ASG,S
Ht: l'
• DE BUGO 03
3036
3037.
3038
3039
401U0001
01004637 P
.
IS,X3+PSA
§~ i ~:3! P SA
.. ,C)
,A·24/IMPURE·
r=~4 T
tbix
RT ,.1
····LOA
STA
UJP
EVEN
·PARITY,i~C
RD FOR REGION 0·1···
'/-
"gf~~~X~~C~8[~OJO .•. 0E B,UG 002...... .
'/-+2
.. >f.
'DE 80(;
-1
BL!{R,X±+CN9LK
IMPURE
CORE
..REWRITEX ..
EPP,Xl+CN8LK
... " . ' "
••
DEBUG
DEBUG
1,X2
LP,Xl+CN8Lf(
FREEBLK
C8P,X1+CNBLK·
LP,X1+CNBLK
RE!4Y Q 1
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . :.0
·.O, •. " ..... ,.... ,.
HTMASK
00 WE HAVE A CARD READER
HTCR
DONI HJIIF!3I.,,KSJf ..$O
TF8CKS,"X3+PS l'l.
TFL,Xl+CN8LK
THE FILE IS A BLOCK SHORTER
.OEBUG".. EQ .. O, ... GOTO.OEBUG003
TFL,X1+GNBLK
DE8UG
Q
.... '/-..
o
'FI"X"Bl::CGKS"REI"!A'INING .
LOAD THE NEXT BLOCK NUMBER
"GO"'SWIZZEl..'THE CONlROC8LbCX'
IS THIS A DESTRUCTIVE READ FILE
JUt1P IF NOT
~3~20
o
DEBUG
DEBUG
m
ANQ
QSE
····HAD
RAD
3031
14200001
20100001
00702204 X
201000U3
30008
°12
AZJ,GE
REWY01
SHAQ
24-15+20-23
...., . . . . .,,. ,., ... ,. ,.,',' ..... ' "oEN A, $'0'" -1"°
. '..
3030
'GOGU Lr6620p
IS X3+PSA
.EXSSHARE ..
UJP······..· · · · · · · · · ..· · ·
UJP
/'r~
..............................................., . .: \..I,
777778
SET THE KEW LCADFOINT
o
o
o
o
o
o
-'
U
l
"
0'
o
0;".............. .
o
o·
.. .
0)
o
o
o
0,
o
C)
............................................................."
o
ASS E t't3LE RIO S3
a~
~
VI.0
09/21/74 2229
3042
"",··,,3043
3044
3045
a
' ',. ,.",",."""","",,,,", """"" """'"""""""'3U '4"6
\
•n;
~;
~
PAGE
3047
3048
(]J
304g"
~
3050
",3051
1 ()
UIO
,
60
USER I/O INSTRUCTION DECODE
JJ.
"I-
QCONTROL
,,".""
THIS ROUTINE PERFORMS THE NECESSARY eOOKKEEFING TO PUT A
"'"USERI NTO'"CONTROL"MC
"JJ.,
J,<
JJ.
",""",:y,",'"
>l.".'
JI.
>J.
t::NlJ::F< ",w.rTt',JH.E:, ",ERRoR.,CCCE,.",IN",Q At-;O, PS ~" ,F eIN lEF"IN ,X3
JJ.
.¥....
""",." ..5:,,,,
.~JJ.
'I-
•
.,
EXIT WILL
8E
MADE TO RETURN IN INTSORT
".,.","."","",,,,,,,
"",..
• • JJ.¥.~ • • • • JJ..JJ.JJ. • • • • • • JJ.¥.¥ • • • • • • • • • • • • •
""'''1-
¥
, .. "
",,,,,, ,."
". ,
"."'"
, ",,,,, "", 'f
* •••••••* •••••••••••••••••• "1- • • • • • •
I
j
U4671
0
77674GDD
U4672
03104674 P
"'04673 ""'0070"5TDO' P
04674
14700005
" ,0467-5,""20,31],45 2"O·X,
04676
17777777
04677
37002726 X
'""'04700"53 (J40Q Oil'
0
04701
04702
0
40304165 X
03304746 P
04703'14TJO(fO'4""
04704
00703626 X
,,047055430,4267 X
04706
35004677 X
04707
21 84675 X
0
AGORT
ISA
30S?
AZJ NE
EXCA80RT
305'6
····'ZABO"fURT J""""'·RT"'·'"
3057
EXCA80RT ENQ
ILLINS
30-5 8,·",··"QGONTROL L D A , S 7 · 7YS7Gl'7M:,X3tPS A"
~059
ANQ.
8
3060
LPA
8IT23
CHCOOE,X3+PSA
3054
,,,",.',.,,,,.,,,.,,, CMREQOi:)
4,X3
o
ILLEGAL INSTRUCTION
GHECKFORRE-E KTER,
COMBINE SYSCH BIT 23 AND CMCOOE
JUMP
o
IF A RE-ENTER
''''ASKFOR"'''A' 'f6"ViORG'8COC'IC""
GETHEM
RPSAPTR,X3+PSA
8IT23
SYSCM,X3+PSA
"·",,,,··,·,,,,,,,,·,,,,·,,,<;::·v c· CMrX:'3 ,tPS'"A"u",,,"" ....""
R£STORETHE FSA ··.pCTt\TER
INDICATE IN CeNTRGl MGDE
GET eM RF 4
SA \J e '''"AEO RE"S
o
0
04 14
·(j·471·5··
0
·A,REA
04716
o
04717
," ,,,,,,,,".,,.. ".", '"'·"'0'4'·7'2"0"
04721
04722
0
o
04723
04724
,·04125·
o
04726
04727
PC TO Q
ST ATE,TO··A
JUMF IF NCT PUSHED
POP OUT OF STATE ZERO
o
FORM 18 BIT PC IN A
()
IS,ANDGR XGRD
LEAVE INT. MtSK AND FAULTS
LEAVE ROS BIT
SAVE ROS, 1M tND FAULTS FOR C.M.
GET USERS A REGISTER
SAV~AREGISTER Fa~ C~
FORM DESrlNATION ADDRESS
FGRMSCURCE ACDRSSS
MOVE 3 PAGES
PASS THE eM ERROR CODE
ZERO ·THEREQUESTCODE
GIVE CONTROL ~ODE THE
o
"n~STRUCTICN
0070
IfT3'O""'"'O:LO
't,'r"/'·'~'
SA VE' P C F 0 RC g .. ".",
OLf733
o
:;;
7
~j
·Otr'136
04737
04740
?
17 HQOD
5"31:3"40'1101]
5342\)042
20304551
04742
15377777
04734
04735
·"GET
f
'1:
O~74~·5342n043"
047LI- 3"54 2 047 05
04744
1527777'7
04745
0070503&
'04746"2 t13u4701
d
04747
5342[;045
04750
14600000
04751-4'030'4746 l{
04752
200aS151 P
04753
04754
.53420053
20303610 X
04755
53420052
"""·047·56"2{Y3777lY·X·'" ......
I
0
04757
3
o·
53420056
04760
14677777 X
04761···· 00777777 X:
04762
01004611 X
. , ("
~. [.1
A
X3+PSA
438'
..........
V Hi'IS AVE, X:3+P S A
......,......,.... " RPSAPTR,X2+PSA
'If 1'1:'1G M,.X2+PSA
~1AP110vE
'''3·1:1:3'
3114
3115
·····""CMR
tDA""""'''''CMCODEX3+PSA''""'
TAM
ENA
458'
0
. 3116
....,... "."
'"'STA·'·""""·Cl'1GdOE,X 3tPStl,
3117
LOA
EXECINST
3 1 1 8 " T A M"",,,,", ··$·38""·····,,·
3119
LOA
T3,X3+PSA
3120
TAM
528
'""""'3121 ,...................... "."."" .......... ""
3122
3123
!::OA""'" """" ..""",·,,U aclI·rS, X'3·+ PSA····
TAM
568
ENA
UJP
······312Ii"·RTT·
3125
CMSYSP
RETURN
.. LTarfOVE····
o
o
o
ILLEGAL, IN S:rRL CTIGN
ILLEGAL INSTRUGTION-DRIV
GIV E···C ·oM'.···T HE"UD FtAGS"'W e
o
FAILURE
".'.""""',",m.".,",,,•• "".,,,""",, .. ".• ,.'"""" ',H.'
, .... W
ADORESS OF CM LIBTAS ENTRY
...,... "
RUN THE USER
·ffAPCON TRe l'MCOE"'"
o
o
312
e
,,,"'" ~.>;,.~ .>:, •.>;,.~<. >;'.""1-. >'VJ.. JJ.".>;.J;..,>;, >; ~}.., )f,>J. >.<"J§.. J§.... 'f.>;. >; ,'f rl.v;...>;.•. ~... >.< >;,>; •• ,.::..");,••.,:r:.,>;..JI.,>;',:~ >;>;'.:;':;'>;')J,>;J:;',.>J. OJ, .•••,)f·,~, :;.>.<. >;'J§" )f..>,t.>;..>;.,>;.. IJ.,>;.,~ ,JI..lf,. >;....Jf..'lf,.", ,,.,, •..". """"" ""..,"'",., .. ,"""",,,.,
>;.
;:;.
o
o
ASSEt iBlER/aS3
Vi-a 09/21/74 2229
v
PAGE
UIO
61
USER 1/0 INSTRUCTION DECODE
CODES PA;';Sc:OTO CONTROL I"ODE
"'3129"
6130
............................................
00003
U4
dO~
00005
tHO 06
00007
00010
"M'fJD IH1
OD012
00013
"ITOOf4'
[J001S
(HIOt6
o
UOOi7
00020
00 Q21"
00022
.
U0023
U"01J'24
o
'f ~'.'f"U';''f ~"'< ":y )j.>J:¥.
04766 ... J070510D P ...... .
134767 147UOlJi5
.··.·.04770 .. 01004675P
84771
007131766 X
'04772"O(170S0 7
p
z.
84773
84774
.'f :.; If ..'f..'f >;¥.¥.lJ.lf ~,,<,...:;.:;.'f>i~. >I: >;>; ll:. >f. >f .'f....'f.. '#: ......'1.'1..'4:
'eOGIN'ERROR OCf)
CONTROL-A OR TV t
TIME CUT
AT TE tvlPT 'TO RE ADC aNTRal . CARD
ILLEGAL INSTRLCTION
... INSUFFICIENT ·FILE SPACE
FILE PROTECT ~ICLATION
LOGICAL UNIT UNDEFINED
READ'ATTEMPTEC",tIT'END OF····· . DATA .
110 WITH WOROCOUNT OF ZERO
1/0 WITH ~aROCOlNT.
· . . ·TAPEORIVE·
FAILURE TOO
.... . LARGE
...... .
ABNORMAL 1/0 CONDITION
WARNINGCF SYSTEM ENDING
MEMORY PROTECT VIOLATION
MEMORY PARITY ERROR
OPERAT'OR'ABORT
LOGOFF AT END OF TASK
OPERATOR TERMINATION
lOGREQ
EQU ' 0 0 8
CONTROLA EQU
023
TIMECUT EQU
03B
CCREAO 'EGU
. 04Er
3137
IlLINS
EQU
058
··3i3·f····
INSFTLEQU .
.. 0613·
3139
FPVIOL
EQU
078
3140
LUNUO
EQU
108
'·'3141 .
"READEOO'EQU"
···'11'S··········································
3142
WCZERO
EQU
128
3143
~~CHAX
EQU
138
'3144
'DRIVFAIL EQU'
'1.48
3145
A3NIO
EQU
158
. ·S146··WARN·
EQU· . . . . . . . . . . . . . . . . . . . ·16a
3147
MPVIOL
EQU
17B
3148
MEMPARTY EQU
20B
3149·····
QPA80RTEQU'
2'18"
3150
lOGOFFR EQU
223
3151
OPTERM
EQU
238
. '31 5Z···················· . ·..···VANISR· "'EQU' .
'2L H'
01004675
"-.,.,,
,." •••
,."
••
"
"'0
FPV
· ·. · . ···· .... ···"···3:1:5·5",,
3157
3158
315£
3160
.~
1,,-
()
,.
0
0
0;'
1.0
VARISH~TENrrUFTASK
14700012
01U04675 P
05003 00705100 P
050U4 . 14700011.
05005 01004675 P
05086
05007'
05010
05011 ..
15304744
54204T43
15204742
00705036
01000000
20304710
05012
05013
05015
Ob . . . .
ENQ
ABNIO
RT J
F LOA T
3162
3163
X
3168
:.H6S
3170
3:1.71
···..··3.1:72"·
3173
:5174
3175'
3ilt
:H77
3178
Z we ~lAX
RTJ
ENQ
UJP
318 r
X
3165
21200001
53410040
05026 "'T031IJD5T
05027
02205023 P
'U"
._."
"
"> __ ,
,.,
05030
54305007 X
05031
37001441 X
...................... 050·\5·2 .. ·······/+ 0..3. 0501:3·X··"'"
05033 14277777 X
,_.- - --- -.- -'- - -,-- - -,.- --.---.- - -
MEMORY PROTECT VIOLATION
ZROEOD
UJP
IN!
,x
MAP("\OVE
3187
."
...... TMA
IMPURE
- -- _.- ---,-.- - - - -- -.--.,- - -.- - -.-
WORD 8LOCK
. ...,. . . . .·.................
GET WORD CLOBBERED
8Y FREEMEM.
RESTORERFlfO
..................................................
FREEMEM
...... ........ 448.
0
M' ............. , ................"·.·•••••••••••••.
SAVE ADDRESS IN X2
X2
FREE THE 16 WORD RF SAVE
FOR.CONTROL .. MOOE .
................................................... GETRF.44..
I~'"
U
0
............ " ··RESTORE·. THE . USERSREGISTER..... P"Il:E . . ·
GET A WORD FRCM THE BLOCK
3193
3194
·····3'19Ij+ 0 0 1 " " ' " ' 1 S r . ··...
3196
IJI
.3197.
3198
LOI
--- .
--
GET ADDRESS OF 16
. . . . . . ,........................ t: E NG'T' H·...........······.. · . . . . ...................
.·go@?·
ENI
.... eME·X62' "STr
LOQ
TQM
3199
··3..2·0,O···. ·~·····"··· .......· . ···"···········.· ·
3201
....MO.VE. 3. PAGES
.
SYSGM,X3+PSA
"4 ,><3 . . . " .................,.
0
TINATICN
VMf-1GN, X3+PSA
'R PSA PTR
2+PS'A
V ~1t'1::::' A \IE, X2tPS A
·... RTJ.
3184
0
QCONTROL
LOT
INI
UJP
LOA
······ENr
TAl
LOQ
TOM
R.T J
0
T
. RO L
RZ
... READE-OO .
fHJ
. ENO,..
3183
0
WORDGOUNT IS ZERO
RO
~,
0
0
WaRDcOuNTTOO~AR~E
QCONTROL
..................... ... " . c ... , .
3182
,051323,,4'1305 0 2 5 p · ' o l · S 2 ·
,
.........,.. GIVE UP THE FILE CORE BLOCK
. . ' , ..........,
R.Z
\.0/ CMAX . . . . . . . . . . . . . . . . . . .
..
. "'Z'i,eZERO
3180
X
X
P
53600000
05025
,
NSAve
PVIOL
05016
21200000
3187+001
05017 " ' 5 3 4 1 0 0 4 0 " 3 1 8 7 + 0 0 2 ....,
05020 00777777 X
3188
. u.s 021 ..... S3 02004.4 .............................................................................. 3188.
3190
U5022 14310041
3190+001
05024
ABNORMAL IIC CONDITION
··.. UJ·p·····....···················· ...... Q COi'>lIROL
·'05814' ... :l:4:'30u & 0 4 " 3 ' 1 8 6'
0 ..
0
qCONTROL
050 00"" 0071.)5100" P
05001
05002
'0
rOSRA'SH " R T J ' R Z ' "
"3·161,,,,···.. ············ .. · · · ·
../
"
RTJ
RZ
'ENQ""" F'PVI EH::'· ....
UJP
QCONTROL
.,
007051011 P
1f.t7000i3
01004675 P
04776
04717
.....
3154
3155
147JU017
04775
a
a
>;- 'I: >J.
t
134763 13137135100 P
·· . 84764·,,1:470lJU07·
134765 1311304675 P
o
o
o
o
o
o
*>.J.
"f
'1.'1...•. 11 'I-.."f. ¥.~..'f.. cV::;' cV:.¥ Jf..."f 1f:.. 'f.'f.. >f
--,.,
()
o.
>;':¥.'f. '<:.'f.'f
3133
3134
3135
3136
·[h.l 000"
U0002
()
>,<
(r
I)a
':';
______" . ,
__'_e
"
RPSAPTR,X3+PSA
LPA
N8IT23
...H·ST·A... · · · . ·,···..·w···,,···SySe M","X3+P'SA
ENI
CMPAGE3,X2
TRANSFER
IT E········
TC .. THE
REGISTER
SKI
F'TF 'DON
...........................
. ......... ...... ....FILE
...........
0
LOOP UNTIL DCNE
RESTORE THE PSA INDEX
REMOVE 8IT 23 FRCM RF 44
0
·.fNOf€ATEUS ER.. N-G:f .. ··IN· . CG ~HR Ot:,,'M HRF·.. ,·,····..·····....··..· ......·····.... ···..··~·. ·..· ... ·····. .,....
0
0
- --.-- -.- - -- -,- -
--
- -
---
-,- -
-- - - - -- .._- - -
--
- - - - - - - . - -.--.-- - -_.- - -_._- - - _._"_._,-.-"-----,-- --- - - - - - - - ---- ---- -.-.-.-'- ---
~,-=_,"¢,,,,
..
~""~",.>.,,,,,,~,,,,,·=
...
.
PAG!:::
Olt
UIO
.32 b I d I Tlb ~rf ····OC T
CONSTANTS
AND
TEMPS
........ '0017777'7
3282
KWPFB
00
I-JPFt3
A 241 I MPURE ,A 9/G 00 ,A15/·TV PFAREA·
3263·························..·········T VBUSY
VFO
3284
TXBUSY
VFD
A24/IMPURE,A9/000,A15/MTPFAREA
3285
MSFbUSY
VFD
A24/IMPURE,A9/000,A15/MSFPF
·····Ao/UO,O;iI0,A·15/TXOONETI MPURE ............................ .
"-:328'0'
... r·rTXT··" 'VFO
3287
TXWC
VFD
A 241 IMPURE
3288
I08USY
VFD
'l~Jf R~b~~;03/0,A157IMPURE·································...........
3289'TEHP2 ........ ·····VFO
3290
OSRSAVE EQU,C
T EMP2
A24/ItviPURE
3 2 9 1 · £ XECINS T· . VFO·
EXECINST
3292
MSFTEMP EQU
3293
MTBUFFER ass
MTMINREC
.....•............. ··· ..···$·2·9·lr·
............................. ·EN n··············...
()
.....................................................................................
o
o
o
o
,()
?, t
0
o
0
o
()
c)
0
o
0
C)
0
o
,."
U
o.
0
0
0
0
o . . . . . . . . . . . . . . . ..
0
0
0
o
...
H
__
0
ASS E f'i iJ L t. fV 0 S 3
V 1. 0 0 9 I 2 11 7 4 22;) 0
P AGE
x
A8NIO
A80~T
. 680 OU6D3P
.
E
~0015
D4671P
ACCWFM
01140P
A() Ci'iO RD'" " I ) U 0130'"
ACI
Q4121P
AG R . 0 t.t13 1P
····AED
AOS
X
00160P
~
ASGIILN04520P
04543P
ASCII OUT
ASTATUS
00571P
"ASTATUSA ·········· .. ··006iJ3P
AU8
.... .
'32"10R82Z'
8 ACKO 1
HACK 02,
:3AGKO 3
8AGK04
BA eKO 5
316004767 P
2635
2614 04075P
2616 04101P
26 t.. 4
. 190
357
2917
01006P
0100?P
., .... 01UTOF
·. . ···x . ·
x
·X
OlOi?P
8IT21
. . ·". x· ....
x.··
827
849 OiOOOP
857
855 01005P
851'
856
86
860
01012P
···1SH·· (lOGOGP
190 DOGOOP
274 00U44P
X
CHART
CKSEARCH
CL:EAR' ...
CL:EARCON
CLEARN ..................
X
CLEARX
CLOCK
............ CfvlCOOE
.X
G07l6P
1717 02356P
185 CODOOr
1:312 01567P
183 oonoop
501 fJ0336P
984 011SlP
1558 02i37P
2705+2 IJ4235P
0433 p ..... , ·,,······· . ··65·1 oiJ542P
'542 ····fjIJ4'04P" ,..... ,..... "' ..... '"
1057 G1255P
1306P
1424 01736P
1.5Q1 02052P
1554 02133P
2G73P
197702725 P .
4677P
3DS? £f4706P
13:33 1)1614P
722 llOE4SP
1941 a 2665P
469 002?4P
843 OQ772P
CMEX02
CI-1E:xf04· ...... ·. . ·....·. ,
CMEXIT
¥
'J,t
E
CMPAGE1
X
Cl'lPAGT2X'
CMPAGE3
X
Ct-:l QSE T,
CMREQ04
807 00727P
. ··762 "OO674P'
1274 {} 1537 P
~-,
2295 ··03·3 Q3.p····,··
,
535 003i"6P
538
924 Gl067?
T534-J2110P
3011 OLf637P
::; .05J) !131~ 2: p,,,
o
29;::5 04530P
1449 01767P
.
,
1102 01327P
.. '700 G0623P
1433 ll1747F
1,.}63 Og43.2P
~
..
_-
1418 01730P
"1012"01203P"
1439 0175SP
J 8] f..D. .25] i.P
1535 02111P
1537 02113P
"105501253p:'. . . ·
1458 02000P
:1,<3:1 iO? 63 2P
...
D0400P
954 01133P
v'102 6"0:122 fj P
1178 01422P
1379 Oi664P
. 15TOCr2153P
3016 04643F
.1927 ...U26Lt.7P .
101'1 0:1: 2: El2P
1149 D13('2P
1.357 D1G40P
2419 03472P
Ofl534P
··o1:27Lfp······..
03107P
00403P
G1160P
01"23"'3P'"
11 15 2 6F
01703P
G21 E'6P'"
()
o
o
781 G07l4P
824 00747P
1004 01173P
104:8"01'2 44P""" ·····.. · ...... ·1053 "Ol'25"'1P"
1271 01534P
1273 01S36P
1445 Oi763P
1471 02015P
1000 01167P
o
"~~97U2206P
f5~9 ~2210F·
2412 03463P
.. 242103414P......
767 C070uP
'13:1'7"'01574- P .....
3037 046E6F
772 D070SP
'14'28'"01742 p.
858 Dl0iOP
·...... ' .. 148·7'·0'2·034P'·~.
2'-153 03534P
2471 03556P
o
o
2448 03527P
899 01036P
o
..... ,. "?52"7i:6"C[r5:l7P''''''''746 ·00662p .. ·· ····..· · .. 1226'Ottr65P
232
752 00665P
55
1886 02605P
'753"fzal'GlS46F"
203
2270 03272P
2397.0.3
......... . .. lf..lt..lt.E., . ,.
o
2048 03016P
S.6.... . . . 4 8 2 U. O31. 3£... ......485.0Q316P ....
57
··· . 58···
59
6.U
3092
3113
M
oouoo
()
4521P
05023P
3192
3196 05027P
050fl5P-3:1:80""" ······ .. · .. 32,02·Q5034p..
05012P
3184
9 OOOOOP
CMREQ06
O~lt40P
. . 2.~.9't.±.:t.
045S3P",.... ,....................................... .
2313 03325P
2443 G3522P
2501
Bb9
··. ,. ·. . ·. ·. ·G·M S·Y5-· P . ."......., ,..............*. . . . . . . . . . . . . . . . ~ . . . . -.. . . . . . . . . .'. . . . . . .'" ·n,·1·..
G NBL:K
291~6
3113 04746P
x....
552+1 00417P
2370 03414 P
3171P
0-367P
H·'l·!',<,,'·"!} 1: 2. DIp.... ......... ,.... ~J:
2177P
2
1351F
r1
E.c·" ....· 4T27p·
53
OD022
8J2 00757P
Hi69 02306P
,,54
00011P
00666P'
1255 G1515P
,1784 ·02·4S4·P .......
2391+2 03436F
(l0005
Ofl6Er5P
9.80 01145P
. ,·. . . . . . . "... "" . . . . . . !i,V
913 01054P
·······1572 l12311P
413
Q3722P
01021P
895 01032P
·.. ··1·89.. 00 ao Up· .. ··'Z4:9S+57 "036'7ErP'"
X
X.
.. 2:1. 28 031:1.5 P
"84F'U07 {SF
. 85 8'
000 G;)
CHAROUTP
:1.389 0:1.674P
044;17P
837 00764P
.8RP3
CHAINL
CHARINP
." "
1192 01436P
04254P
831'00756P
······:f483 . 1] Z[l3 iJP"·· ..
1.626 LJ2241P
(Ltl04o?,
CCREAO
:1.309 0:1. 56.4 P
2704 04232P
'2638'04124p
818 00742P
838
1320 01577P
C8P
,
04055P
05105P
874 01025P
010,i·7.P
799
· .. ·tei t16·.. ·(}:!:±·75p . ·
1098 [J1323P
BUSY
,-~.
2265 03266P
2596
3107 04740F
3251
2705+5 04240F
2718
········1·2 01 "'0144'7 F"""'''''''''' ''''2859
·801·····..········,·· .. ··········865
188 DaOGOr
·iHT23
"
03040P
2944 04551P
2067
32 TLi"O 5T SOP
574 00441P
187" C100aOp
x
2932 04536P
2637 04123 P
"1"095 01320 P ....
""1'E5402272P
2 5 5 0 0 0 21 P
1307 01562P
05i35P
8IT22
8KSPAGE
3LANKS
dL:KR
976'011'41 P
1735 . 023 76P
2622 ll4107P
1112 01341P
x
x
x
x
8IT18
or T19
'8IT20'
7 Lr7 OD663P
2938
675
4U·
OD717P
7 DDDDOP
... 1237 'OT475P"
S OOOOOF
. 2621 041··06P,· ....
x
. 01:00 IP
BIT16
BIT16Mi
·····8IT1?···
314S·
3 05 Lt
975
71:· . · · · ·
680'
189
00752P
(J0765P
BACK09
BIT1s· .
2664+5 04161P
x
··0072 LP·
3ACK06
i:3 ACKO 7
8A CK08'
UIO
1
2
3201
943
3097
3063
.....................
05033P
0110]P
04730P
. 2666 . ·.04163P.................................. 2668 . 04165P ...,3062 . 0470. 1E.........., . . _.
3116 04751P
2661 04152P
2042
0
o
o
l130 . 1il?
04702P
..•. ·. .H,/:.r:·f·
~1·?·3i
261 00027P
263 00031P
268 00036P
278 00050?
300 00074P
o
o
-- -- - _.- -
-- -
- ---- -_._._- - ' - - - - - -.-- --- - -.-- -
-----------.~ --------- -.-.-.- ----- - -.-- -
- - - - -- - - -,- - - - - - -- ~ - _._--,--- - - -.-.- -_.- -.- _.-,_._- -.- -
- - - - - - - -.- - - - --.~,- -,-'- --'~ - -
-,
-,- _.- - , - . . - : ;
ASS E ~18LER/O S 3
CLi
PAGE
2
uro
"394'0021 ?P'
""401 Ou226P
40600232F
463 00266P
469 00274P
472+1 00276P
502 O·Q337P·
··503 00340P
·508 00345P
522 00363F
525 00366P
526 00367P
541 OU4J3P
543 00405P
544 00406P
S9200'453P'6£f2'00531P
645 00534P
675 00571P
690 00611P
692 00613P
758 00670P
76.0 006.7ZP.163 Q0615~.
771'OO'704P7720'0705P
774 00706P
802 00722P
810 00732P
811 00733P
········843 ··0·O·772P
845··00774·P
,8520,1002F·
861 Ql013P
864 Ol016P
894 Dl031P
914 01055P
924 Oi067P
927 01072P
""'9a·O··O·t·!·Z'lP·
"'9'84' 01::1'33P-'~"""""96'8 ····O·1::1'3·6p·······
985,01152P
986011S3P
987 01154P
1004 01173P
1006 Oil?SP
1008 01177F
'TO 16'lf1207P-TIJ260i22 UP
....... i02801222P ..
1043 01237P
1048 D1244P
1051 01247P
·,-1 (J 6·g··,·{J·12·62·FL·l06 8-1312·67 p, .....
····1,069 01270 P
1U82 D1303P
1086 01307P
1088 D1311P
1096 0132iP
1098 01323P
1100 01325P
""1110013"3?P""" ···········1:f1:t .. U:t34ilP . .
112qll1343P"
1142 01364P
1147 01371P
1149 01372P
1201 01447P
1240 D1477P
1241 01S00F
T259 Qf~r21F---T26DuT522P'"
"1264"015Z6P'
1276 01541
1277 Q1542P
1306 Oi561P
".,' ······1317 D 1 S 7 4 1 3 1 9 DiS·7iSP
···1320, O..1S·77,P
1353 01634
1357 0164DP
1359 D1642P
1388 01673
1394 G1701P
1396 01703P
Vl.0 09;21/74 2230
o
o
o
o
o
?
436'002 3 7 F 4 39 "00242P-'442'-nn24"SF
472+4 00301F
473 00302P
492+1 00324P
g~ ~8 ~ lj ~ ~g ~~
~g ~ ~ ~ ~~j~ ~l~ 8~ ~""" QJ
I)
558 00426P
573 00440P
575 00442P
652'O'054'SP
·········667·005Erlp·····
········6?4··005?OP701 00624F
708 00630P
753 00666P
;()
765 .. 00676.F.
. .... 767 .00700P..
16900?02P.
778 OOlliF
779 00712P
781 00714P
816 00740F
824 00l47P
828 00753P
·856010·06P,
858 01010P8·5901011P
902 01041F
903 01042P
908 01047P
936 01l0DE
953 01l20P
956 01123P
976' 011Lt! pu
978·0114·3p···'····o98:l:·01·1Lt6P
991 01160P
994 01163P
1000 01167P
1010 01201F
1011 01202P
1014 O~205P
f03401226PI03901233P
i04101235P
1053 01251F
1058 01256P
1059 01257P
. ····1Q72·· 01273p·l073 u1274p·l079 01300P
1089 01312F
1091 01314P
1095 01320P
1101 01326P
1103 01330P
1105 01332P
1134D1354P ····1135 '01-35SP
"113701357P
1157 01377P
1178 01422P
1192 01436P
125[J 01510P
1251 D1S11P
1254 01514P
1,0
"1271 Of534P
I27J"01536P'T27S-0T540p········''''····
1311 DlSE6P
1314 01571P
1316 01573P
o
o
o
f~~~-8ft§~~
tJ~~glggC~
····1~~~8r~~~~.,
'-"<0
1400 GllD?P
1410 01721P
1419 01731P
"1427"0 t7 {r1p"-"~M '1 4'28""0171i'2P' . . . . . ·······················ttt3· l j··Ol·75·0 P~'
1450 G1ll0P
1451 01?71P
1457 01777P
1474 02020P
1477 02023P
1483 02030P
i4 97u2 1)46 fJ
15 02 02053P
i5 08 02060 p . . ,............_--.
1521 D2D75F
1532 02106P
1534 02110P
·.1542 ··Q.21·2·0·P·,······1543 02121P
1545 O·2·122·P·······
1357 02136F
1560 02141P
1561 02142P
157
02155P
1574 02157P
1577 02162P
n .."'···.,.·r"'''c.. ···· .. ········•·.. ········..·.. ·c:.:oo······ 0'2210' p~.........
.' · .. ·-1·6tl5 ····0 '22'1'ep' .... ······16'16..0·2227 p.~.....
D2247P
1635 02252P
1777 02445P
,~~·,~:::'·~-=,·~ .~,~,~·l",······························ ....... ,':: ..~ . :;. ~~......... g~6'~ ~~~Hl~H~ h~i~
~Ifi ~"8 ~
~'~
G312EP
2144 03131P
21~8 03135P
04373P
······2&,59,··04437P ·30·11·04637P
0466QP
3035 04664P
3037 04666P
o
G"·)
··.j·
c)
M.N
h1 . . . . . . . . . . .. o
o
o
o
··.·· ....·. · · ..··. ·. ·.. CONTRO 1..·1\ .. ·· .. "'..···
CONL~A
0··
l
........G"O'.8f;
r
o
19~~
D1256P
108b Q13D?P
···1·,+.).1+01 "i'50P1440 ,··O:L.7·.56P. ··
cpr
0·"
00004
f;:
0.
CPPX
0;""
00000
1555 02i34P
1556 02135P
254 D0020P
261 a0027P
268 00036P
"l.rfr6·ee232p··
.. u,'4·S g'O!] 2'42P"-' ·······463·"00266 PH.'
511 OD350P
5~4 00406P
667 D0561P
760 GOe72P
774 00706P
778 OOlllP
"--a2S'OOTS3F845 U'077LtF---'--·85Z'" 01'0 0 2P
89~ 01U31P
9D2 01041P
908 01047P
S53H.1120P..-956,011238..",,--96.0011278
1010 Oi201P
1034 01226P
1041 01235P
1D79 0130QP
1082 01303P
1110 01337P
····. _·1'1lf2···u . t364P1:t47··0 13''f1P··..
··t25 O' 0151:0P
1343 01624P
1367 01652P
1384 01667P
1542 D2120P
1543 02121P
1545 02122P
'r9290'2'65TP'''-''20fO'MTl2745P
.... '2'()63 "03034P'
269 OOD37P
270 OOO~OP
271 00041P
201
,30B,Q01QhE',.
32.7 J10.126,P",336 ODi37P
369 00172P
386 00210P
398 00223P
570 U0437P
588 OU4~7P
593 00454P
..... '.,.......................,..., ........... ,.... ··. 63 o·a O'5'24P'~'''' ''''~65'5'' OOS·LI4·P' "H"HM~ ··660. . ··· 005S2P ...
829 00754P
830 00755P
835 00762P
77
.................................
H'
345 00145P
518 00357P
534 00375P
633"0 U32TP ........... ······644'00533PES00054'Ip·
694 OOS1S?
ES9 00622P
820 00743P
2·1······\}·1·064p·
961 01130Pl0030i172P,'·
38 01232F
1056 01254P
1067 01266P
31 01612P
1375 G1EGOP
1430 01744P
................ .,.• !t . . ,. E)"'lJ2t)'J3p..tS(lO'02051P'
" . · .. 1511020 6·3p· ..' .... ·..
3 D217DP
1593 02202P
3018 04645P
43 OG405P
652 OOSq3P
701 00624P
94 01T63P
"'1014 01205P
i028 OI222p···-.. ·············,..
1277 01542P
1337 D1617P
1425 01737P
1502· 02G5 3P
····,1520. 02074P
1.5·39 ··O··2·115·P.
278 GanSOr
394 n0217P
401 00226P
. 473"Cl0302P"" ..··. ···q9Zt'1·0'Os24P
508' .. 00345p· ...... ·
674 DD57GP
753 00666P
758 OOG70P
802 OOl22P
810 00732P
816 00740P
856"'010G6P861'OfOT3P
864'OiOI6P
914 01055P
927 01072P
936 01100P
.S68,01136P,
.978.01143P...
.9tH,01154P
1043 01237P
10S9 01257?
1062 01262P
1111 01340P
1124 013~3P
1134 01354P
. . ·' . 125·4·····0·1514p.."· ..... 1. 26·0········0l522p·'.. · ······· .. 1·306 o l56·1p ..·'···· .. · ......
1388 01673F
1394 Gll01P
1469 02013P .'
1565 02146P
1616 D2227P
17~Q Q2~SOP .
'2T270'3114'P'2I6T 03iS6P
277 OD047P
287 00060P
291 00064P
345" 0 0 1 4 5 F 3 5 L on153P
363 on 165P
545 00407P
546 D0410P
546+2 00412P
617 00503F
623 0051iP
633 00521P
,66·1··005S3p
........ 6·65,,··00557p .. · ........ ·· .... 6f:r6·.. 00560P···
S09 010S0P
910 01051P
954 01121P
o
o
o
o
o
o
o
o
o
o
f.\ SS E t'idLER/OS:3
Vl.0 09/21/74 2230
PI\ GE
Ula
3
955 01122 P
1175 01417P
134401625P
1467 02011P
1511 02063P
······CR·"
x
292·00 06S P
1648 0226 i+P
1681 02321P
1730 0237iP
2262 03263P
··2378 ·O·342·3P··
2496 03606P
2924 04527P
GRCNTRL
D14S2P12U8" ··'2873044'53P
CRFINPW
U0044P
274
1194 01440P
CRINPW
01342P
1121
2875 04455P
C RI NPW of'···········, 01343P
.. 11231154 ·01376 P
CRINPW02
01353P
1133
1126 0134SP
o
o
o
o
o
CRINPWJ3·01377P1156 · 1 1 3 6 01356P
CRIO
CRIWAITA
CRK1
CRK2
04453P
2873
01424P
1180
.. , 01415P"1172
01432P
1187
OQOJ6P . . . . . . . . . ,...,. . . . . . . .. Z,;).7..
... "s:: ,R M,A.,? .15...
CRMASKX
,C RvlA IT
DE8UG
DECODE
01240p
105b 01254P
01437P
1324 01603P
D16Z6P
1363 01646P
02012P
1473 D2017P
020E7P
1518 02072P
00414P ..
E55· 00546P
1668 02305P
02277 P
02325P
1706 .. 02345P
02372P
1858 U2555P
03271P
2271 03273P
·03432,P" .
2387 ··(}3433P··
2498+75 03717F
03635 P
04532P
2931 0~535P
01365P
016G4P
01650 P
02050F
02077F
01630P
02307F
02347F
02674F
03274P
03446F·
04137P
OI.602P
1144
1330
1380
1500
1580
. ·····1646
1671
1715
2234
2J71
2400
2741
3266
rf1366P
01611P
0i6S5P
02051P
02165P
02262P
02310P
02354P
03232P
03415P
o3447P . . .
04300P
05120P
1145
1331
1460
1510
1583
'1647
1674
1718
2260
2372
·2414
2743
3271
01367P
01612P
02002P
02062P
02170P
02263P'u
02313P
.. 02357P
03261 P
03416P
03465p· ..
04302P
05125F
.... :: (J)
l:)(J)
t'"
.;()
()
1199 01445P
a
1128 01347P
0
2815 04401P
1159 01402P
1146 01:370P
1177 01421P
667 n2 6
30
. ". 12495'03
054 P
p" .
GDOi7P
172
1179 01423P
1714 U23S3P
. . . . . . .,. . . . . . . . . . ".27;3.03,275p
'91f+ 74·tf3Tf6P'
114
00001
1143
1325
1365
149S
1523
1348
lE70
1708
lS Li8
2272
2399
2650
2S6S
,,~~
X,li8
X
DINf'·'
1044
1193
.... 1345
1468
1515
550
1661
1685
·1731
2269
2386
2498+23
2927
3Q29 C4660P
········:l::5iJO""Q2211p·..
2705+
3261
.. 2398 ... 0.3.4.4.S.L,
0511. SP
(raS5P'
QlENGTH
Oi. ?Qit704P
1423'01735P"···
...
;()
.........
,'()
3026 04655P
676+2 00574P
677 00600P
04654P
2800 04366P
2168 03157P
2064 0303SP
....... 2589"044 7IP .
o
"56-1 . . . U04J1P'
.2264 03265P
2274 03276P
2497 03607P
2498+76 03720P
2731 Olt270P
3231 05G65P
3240 050?4P
307 .3 04714P
3230 05064P
3zas 05f43P'
3291 05151F
3184 05012P
3238 05072P
3286 OS145F
3194 05025P
3246 05100P
3287 . 05146P
165DQ,g2fj6Jl
1 7~§.. D 2 ~. 7 4.E
04230 P
2702
..
f-"
." ........". . . . ;'u
051D3P
OOOiOP
DODOOP
04644 P
05063P
05f1tH:i
05i50P
046368
3205 OS036P
3255 0510?P
')<
2498+6
"x
037U7P
8+67 G37nrp
Ol.t'iOGP
2814 04 1t01P
2826 04407P
"",.
...
04377P
Ol.jltUSP
OLfLf'13P··
2812
2824 044Cl6P
2801: D4'36?'P
,
,,,~~,,,',
'"
,e~
2816 IJ 440 ZP
2828 04410P
"" '''n,,"
0'
328805147P
X
2818 04403P
2830 04411P
o
o
o
o
.X
,
"f}4216:P'
01426P
04272P
01·!556P
04565P
OS136F
00036
.--
983 01150P
(!10~~3P
1308 01563P
i
03223P
D3211P
,
"', . ",."j>-,'"'
3237P
·32·24P
2317F
032 40P
03212P
"'xR ER RO R" , .. :::' ...... ·..0 47"73P
IRERRORA
04771P
IRERROR3
"X ._ ..04772P
"............ ,...
IS·····,
...
804 DG724P
04·766P
.··'···M_.·. · . . . . . . ,." .................... , . , »
1188 02450P
DU52P
1290 G1555P
'23165"""" 'lo . ouOGap··"'····
3163
290 oon63P
3164
1291 01556P
1680 0232DP
... ········ .... 96.. ' .. ,.. ·2'54T04T3lfp·······
... Z98'2' 'Ult614P
':3
" . . . . . . . . . . , •.••.• , . . .
2464 03547P
1789 02461P
'2985"'O'46T6P'2 9·90'046 22F
'Z990046'Z7P
3102 04733P
3233 OS067P
3242 OS076P
3275 05131P
360 00162P
662 00554P
366 DD1G7P
663 OOS55P
388 00212P
1368 01653P
390 00214P
1374 01657P
., . . , . . , , "
····1482···i}202·7·P .. ···· "'''''' ....1562 . ' 02:1:: 43P, . ·.. "
300T'04633P'
204
294 DOGG7P
....2 . 4-98+2203.634 E
3124 D4701P
2660 04151P
2498+55 03674P
549 00413P
654 00545P
1347 0162?P
2676+4 04177P
2965 0-4576P
3090 04721P
o
185'7 02554P
~---"-'----'~---'--'-'-'---'--'---------------.----'--------.--.------------,-"-----------------------_._._--------_._-_._-----,----_.
1947 02673P
o
ooooop
.
o
o
186'8," Q·2567p· ..······· ···············1:961 ····0271Clp .... ' .. ·'·, .·1,96o ...'Oc71·2P"
2498+39 03654P
. 2 S10.D4023P,
o
o
o
2957
2624 04111P
2664+6 04162P
328'2" ......, .. "'46 cf" 0 0273F"'i24 8"'0 1506F'"'' "T3990T7 06F""'T4'11.f' 017ZS'F
17
0'
1438 01754P
2812 U4400F
3002 04634P
... "....,Oit.176P,,, .. 2676+,2 ....... 2614+ 204 077 p.. ,
00000
177
335 00136P
640 00527P
0"
." 6'48 "005'37 P
··,·,2832. fr4412R
2826 04407P
2828f.l4 ifl0 p.
213
"'87
1202 01450P
. '2H34 044t3P' .........,., .. ,'
OJDOD
H1PUREJi - ..
'IOTA""
.. 2808 D.43I6·P····
2810 0'4377 P
·tluQ:u5
INBOUND
1NOCHECK
· . INSFII..:
1NTPDI..:
10
"1OaOUNi)
IOBUSY
t:
IOCI..:Et\R
IODECeOE
IeLIST
reLISTOl
IOLISIOZIOLIsr03
lOSEr
IOSHASH
X
931 01074P
8 6 6 .. 0 ltJ 2 0 P .
911 01052P
723 00646P
... ····84'" ······5i60[J355 P
1432 J1746P
03625P
. .. 85
56 ." 2498+16
. "2051 . 0302iP
208
2 814 0 4 1t 01 P
x·
.... ,1 RCHEC06
0.,
.
X
:\lIZ
UIO
890
214
X"00011
........ .
5
91201053 F .
. .......... CJ 3·9
00012
'u tJO 13
. H TTTY
HTTV
TO'
11
o
o
01135P
0102SP
PAGE
o
__
o
._--_._,-----,--_._,----------"----'--------.------~
ASSEI'WLER/OS3
(I'
"'IF'
CI'
f:
!
t
j
I
I
'aUODT'
LP3
)
~,
i
W
() ._- ",..
'OUU13P
X
LUNLIST
,~-".-.,.
LUNIJO
MAP~102
()
0
(J0010
OS·OJ7P
05052P
05036P······
-"~lA' p~rO'I-'"
... NAPi'lGVf.. .
MASKXX
HA XOES T
MEMPA'RTV'E"
MPVIOL
HSF8USV
,.""''', .....,, NS"FCNTRC
rtSFDON02
·. ··..···HSFDONiJ4··
HSFDONE
03146P
,. 04513P
""5Z2"0 035 3P' ..,
1072 01273P
156i02142F
514 00353P
1994 02743P
525·"00366P··« ""''''''765 "OO676P'
1089 01312F
,1605 02216 P
777 00710P
"'1109'01'336P'
2744
····MSFI~u4
x
.. , .. ,.. " .. MS FREAOX
03·tiiP·
03077P
05151P
MSFSEEK
11SFTEtvIP
2158
859
1427
······3035
1035
orOIfP ,····,···,,···,,······10·68 . 012'6 7P"""" ....... Q:,
1489 02036P
01741P
..... 3038 ·0466·?P
. '·1',
046648
1653 02271P
.W
01227P
04303P
2194 03.204 P
2,·1·86·",·Q,3·t.7.?,P,
Ot
. . ,." ..... ,10
.......... .::;.. .1
2 '315. ·04 51·7.P
2150 0315UF
2152 03141P
2170
031E1
2176 03165P
0320
MSFW04
TE
............... ,....... MSFWRI TX'
o
MSF\~lRI
IH AQLOA
.. , H1ARLO
2032, GJ).O··04 p........ ,. . ,.. "''''',,,.... ,
I'1T BKSP
MT8UFFER
... '.' ... , ....... t1T CNIt X· ......."....... ',.
o
.1967 02716P
1955 02702P
~1
MTCNTRL
(:)
o
o
o
NTCNTRL:; ... ,............
~fTCI~TRL
MTDELAY
IHFINISH
0
2026+11 02"}'71P
2026+15 02773P
1944 02670P
1974 lJ2723P
MTFRINP!t{
MTFUN
N..····Wi FI~S p .... ,
.If.
MTFX
MTINPlrl
,.,"', ........ ErI
NPvrD
MTro
o
-_ ..
·MTLlMfT
OL)uClj·
t1HlINREC
MTOUTW
()
c)
2157 0314SP
2153 03142P
0'32
N.'......' ••• '
0
1100 01325P
1632 ·02·247P ...
805 00725P
771 OOT04P
1~16 01573F
1635 ··02252P
863 01015F
03124P
. 'tl3i25P
I'1SFR02
MS Fi(l)
2592 04051P
2596 04055P
"26Lj7 04134P'~ · . '26·50 . 0413?P'....Z652···· O·4141p .... · .. ' ....
2 6 66 041 E3P
2 6 6 8 0 41 6 5 P
26 7 a 0 416 7 P
. . ; ('l!>
2702 04230P
2705+4 04237P
2715 04251P
~
2736 04274 F···· '27Li :l.04300P2743043 02p······.... ············ .. ·
2787 04352P
2806 04374P
2855 04433P
Z92Lj·04S·Z.?P·
..... 2927 . 04532P
·2931 o4535p·····..·..·. · · · · · · ·..· ..·
2S38 04543F
2944 04551P
2957 04565P
2982 04614F
2985 04616P
2990 04622P
"302"7 ·····04056P .. ~ .. ·········· . 30·58·04675P ..···
"3062 "0470tP"H
3090 04721F
3092 04723P
3102 04733P
3111 04744P
3113 04746P
3116 04751P
318105'00 7 F 3 1 8 2 05010P318S' 05013P'
3208 05041P
3209 05042P
3219 05054P
3233 ··05U67F
32J·405070P
·3239 050?3P
3248 05102P
3249 05103P
3250 05104P
3271 05125F
3272 05126P
3273 05127P
o
o
?""
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ~.. leU
(Jp.~............................................................. ..
673 ODS57P
2252 03251P
.. '
2~~§~ t~83~t~~·~t~~!l~g~~~~~·
.'........................................._ <'~ t
1666 02303P
1782 02452P
2059 03030P
()
''''31:'S'704'765P
3161 D4770P
t~5i g~~j§ ~
1796 02470P
·1·1·5·6..·.. 0 1AilP·········..·.. · · · . ··············..· · · · · · ..· ................................ .
Q ~'I~\IT
R-AFEa 3···
9~~2~' g~g ~~~.
...........
·21
'~
24
G:
o
1263 G1525P
2113 Dale3F
2114 03104P
0
2116 03106P
0
SP
RAFE04
GF
RAFIO
4
OP
.. RAFRQ2'{Jt63';JP .. ~..........,..,
D165DP
RAFR04
RAFRQ6
D1654P
RAFROT"01660P
RAFR08
Q
·RA FREA D · u !.j, ,.·t'·······················
RAFRLS
0 10
RAFRWND
0 50
RA PS E' E:K···· .......................... ······0 :t472P"
tr"
···2··e.9'9-tl430:rp···m..................., .. ,.. ,... .. ,......... .,........... , .......................,...... .
RAFSFPFM
01477P
1240
1230 01~71P
RAFSKOl
D1506P
1248
1236 01474P
................................ RAFSK02
.... OIS32Pf269
RAFSK03
01534P
1271
12&7 Di531P
RAFSK04
. U15 1+4P
···.1,27.9·
. ··t26S····U·1S··2·.7·.p·
RAFSKX
OlS10?
1250
1244 01503P
RAFW02
D1774P
1454
1422 01734P
.. .. RAFW08'·
. . . fi2IJ2·7P· .·,.N. "1:'48'2 . . . . . .., ... ··j;l:Fb'C"·O '200'4 p
150B
1494 02043P
RAFW14
020GOP
RAFW16
02065P
1514
1506 02057P
R AH1FJVl'
. 02122F
'~'T 545
12270II¥66P
RAFWRITE
DiGS7P
1364
2902 04504P
RAFWZIP..
..... 0173 OP.
..1417 ......13980170.5 p~~..
1 406·0 17.15 g
RAFX
D1SS0P
1305
1455 01??SP
1551 02130P
RAFXOl
D1Gl?P
1337
1313 G1570P
......~.~ RA ~XQ2""'~""~"'" "'Qib'2i P ' i 3 3 9 ···'·'·'.:l:·3··35'·,'Oi6:1:6P,·'~··,··""·"""~~·#'····"
F~AFX03
'01623P
1342
1338 D1620P
RAFX04
01624P
1343
1340
. RA
········134'6··'1381'.. 01622P
0 1665F . . ....... . . . . . . . . . . . . . . . . . . . ..
c
REAOEOO
00011
3141
3177 05004P
REAOFX.
nOS64fl.
., .. 670. ...39900224P
..4fL7002.33P'
...... 95.8.0112SP
.S69
READRTN E
00555P
671
23 ooooop
403 00230P
870 01022P
940
1618 02231P
1621 02234P
1636 02253P
2025
01·2l,7p············· ·······'107'·. 8
· · · · ..718··006'4'1P .. ~· ...... " ·······74. S'06S64p . . ' .. ·
'REl::EASE'
I~ESERVE
X
119
267 00035P
533 00374P
815 00737P
907
Cl
""
.,-- ._-
0
()
·····t'2~5
q
o
o
o
0
"'1258Gl~320P
FX06'OT627P~
~
0
0
0
0
~~
01t3.lP ..
01104P
02763P
1368 Oi653P ..
950 D11l6P
1480 02026P
965 01134P
01046P
996 01165P
1030 01224P
0
0
0
<1
ASSE~leLER/OS3
R ETUR1'>J
V1.D
U9/21/74 2230
X
X
X
RE I~RI·rEY·
REHY01
RIS
uro
..... 1342 01623P'
1141 01363 P
2409 0346uP
2676 04175P
2662 04153P
Jt25 04I62p·····
765
719 OOb42P
761 00673P
774
768 OO?01P
... 770 0 HIO 3 F' '
121······
1087 U1310 P 1 2 7 8 . . 01543P'"
122
647 OU536P
695 00616P
821 00744P
1019 01212P
1326 0160SP
1332 01613F
.. '14 9 0 02 0 37 P
1. 5040 205 S P i 512 0206 4P .
1606 02217P
1615 02226P
3019 04646F
3017
::; 61·0·0·16JP.·
··381 O·0204P·40200227P
30U9
3022 04E51P
3039 04670P
178
330 U0131P
348 00150P
556 00424P
.. ' 2-J35 0335'3P'" ... ··········2·362 .... I) 340 5P'"
19S Lt 027U1P
2584 04041F
2770 04332P
2758 04317P
..123
······n.:85 OT431P
:1.7 r9·02·3 O'OP'20 31'030 GOP
124
125
2929 04534P
2948 04555P
179
346·Q01lj6P·554·0 0422p·
··328· ODt27P
1952 02677P
2333 03351P
235D 03403P
2582 04037P
2768 04330P
126· .
4970fr334P"1054 . 0 1252P
'481' 00312P
160 t l 0221SP
1613 02225P
1630 02245P
2233 03231P
2294 033D2P
2314 D3326P
2 ':;9r"'O 360 i P' .. 24'9'8'" 1T .d362TP ······Z49Sf4T 036'5 6F
3066 04705
3110 D4743P
3181 USD07P
... 75 ( t o 0 6·67
1111
3246
2400UOG
o0321?
1184 Oi430P
2498+7-3 0.3715
04573 P
3096 04727P
'O!j GO;3P'
317205000
3'2520510 fiP
1894 02614
02641 P
2155 03144P
262 00030
00250 P
800 0072QP
:1122"u13 42··;.'··················~·· ·x·..,;
'1 391QT6T6P . .
'Of54TP
3235 iJ5t.l71
7.2 1.0 D6 41~
120
00676P
OJ70oP
REWIND
REIHNO 01
REW·<'I TE
RDIRITEX
PAGE
04644P
04637P
00550
u
()
R~ICHArN
X
"'X
X
RHOONE'
RHTERM
. ·ROS
RPSAPTR
o
o
o
o
o
o
X
.........................RRCP .....
RZ
Rz\~A
·O·13·40P
05iOOP
E
r
.... SAVE ..
00554
T
.... S0PF1L
SC REMI
S eCl
······SEl::3LK··
X
.. Gili'll?
2761 04322F
'1540
841
1376
i524
021'1'6P
00770P
01661F
. 02ioep
922 01065P
1431 01745P
156302144P
962 01131P
1437 01753P
1584 . 0 2 171 P
. C)()
1153 . 01375 F
616 005C2F
632 00520P
1866 02565P
...... "2424' 0347 7P~····2467 03552P'2498'+'3203645P
Q
614 ···OQ500P··
2422 03475P
630 OQ516p·
2465 03550P
1862 02561P······
2498+30 03643P
1183 01:427P'
1882 02602P
2410 03461P
'2577'04032 pM'
3224 05001P
1573' ·D2156pM.'
2022 02760P
2455 03536P
"'2730 04'267P
1713 02.352P
3155 04763P
2030 02777P
3159 04766P
2251 03250P
3168 04775P
892 O:1027P
1547 02124P
97"7 01142P
1807' 02502P
1093 "O'13-16P'"
1854 {) 25 S 1 P
2318 03332P
'2498+65 '03706F
3198 G5030P
--"~
0
(1
,
"'
'h~'
1078 01277P
2498+14 03624P .....
691······QQ61'2P
1485 02G32P
:1160 Giit!]:;?
2000 030ZiP
'10t5 01206P"
1495 02044P
1352 01533P
2088
2 498 f12
SF8LKI"IAX.
SFBLKS
0306GP
1897 02616P
216503154P
1456 01776P
2140031251"
1571 02154P
S~ID
o
1629 02244P
427~tP
3SCP
STA
+770:372iP266904i65P
1
745 G0551P
766 n0677P
262f .... 'U-r.,J...·.I..'"I.r.·.·... ·.....·.. ·.·.·...•. ·. 2507. 040 57.f;' ································2610·· D4(l72P···
108
1567 02150P
S4
1751 02416F
2012 02747F
d.. '48 ff ufJf.
03424P
_...
2382 03426P
T TYINPW
"IT YIO'"
0
2379
()
-
o
2388 OJ4J4P
TTYOUHI3
TTYOUT\r{4
TTYOUHi5
TTYOUTI~
o
'frY OU T I-i 5· ..
TTYOUTH7
TTYOUTW8
o
TTYOIU
o
"TTYOUTWX'
0
TTYOW2
"TTYOW3
TTYOW4
TTYSHARE··.
TT YST X
0
o
TTYHRITE
···TV9US·Y··
TVCiHRL
TVCNTRL3
TVDECAY
0
o
TVINIT
TVINPWOi
TVINP ~~
d
o
16 4
16 7
TVINPWO~
'TVIfWt~(J5
U23 26p········:t6e6'tf fr~fi 2<~5{:r p
T~INPW05
02332P
1691
1E84 02324P
D2330P
1688
170S 02344P
.... TVIO ..· · · · · · · U 4 if T3P'''289 2 ' 2 .32S·04it iJ6P
TVMRlOOP
02422P
1755
1769 02440P
0
o
TVINPWX
..... TVNE
0
,
0"
TVI~ArT········X
TVWRITE
0"
,t
(J
'.
o·
...~..... · · · · G 2 3 6 6 P . . 1 7 2 7 . . 2 l . O.lJ OOOR.
TVOUTW
D2336P
1698
VOUTW02
D2351P
1711
VOU'Tvhl3 ·············fl2£l52p···· ·············:l:712·
TVPFAREA
00122
208
TVREAO
X
156
H~nl
lWRITE
TX8USY
TXOONE
X
x...
X
1723 02364P
1691 02332P
T3T"f691f 023'34f'
158
1711 02351P
.159.2029 .. 02 776P._.
160
iCJ80 02731P
05141P
3284
03012P
2043
o
2896 04477P
1703 02342P
·······1692·023:33·P· ...................
1774 02443P
2015 02752P
······················ .. ·20 6 8· .. 03·tJ41·P··..
3283 05140P
o
1716 02355P
1934 02656P
·~·····-2a'8·5··
..03·05 5p···· .. ··
3286 U5145P
1983 02733P
2041 03010P
2043 03012P
o
o
()
(1)
()
i:
V1,\ 11
HFM
t·w ~1 00
Wnl01
........................... WFHiJ2
WFMQ·4·
~~FHa5
\~ F MU 6
\OJFN07'
8
... WPf!3
GOG16
3152
164
···········165
166
3146 .
OOOOOP
1108 01335P
"3243'u 5 077P
1180 01424P
()
1885 02604P
1966 02715P
. ........ .....................,.." .
",
,
. .2.2.3 2 .... 0 323 0 f'
............................
,.,()
o
~l
1478
!J2024P
\~RMASK
GDD1SP
o
o
o
o
a
I
o
o
GOZ23P
2
9
02Q22P
373 00:176P
S940G455P
929 01073P
1371 ol6SSP
376 002IJOF
66100553P
1357 01124f
.·.·.· .... 14610200.3fL..
:na
00201P
····8Z5 'OOT50P
959 01126P
.3282 05136P
Oi260P
f . H I O l h 3 P 2 2 7 + 1 " 2 5 4 0 OOZOF"
" 2 6 1 0 0 0 2 7 P " 2 63 00031:?'
DODSOP
300
321 DD121F
322 a0122P
352 00154 P
00226P
406
32P
436 00237P
439 00242P
442 00245P
. ClO2?'fP472+1
ToP
472+4' 003GfP
. "'47300302P
492+100324F
G 337P
D0340P
SOB OOJ45P
511 D035DP
512 DD~51P
519 00360J
GlJ363p·
00366F'
····526 D0367P
· · 5 3 5 0 0 3 7 6 F 5 3 8 00400P··
·539 004011
OQ403P
00405P
544 n0406P
558 00426P
573 00440P
575 004421
592 00453P
609 D0474P
610 DD475P
637 00525P
642 OD531P
645 00534'
. ,..·····,,·. ·····. ··'652.""u0545p··'· "~ ... f.f67· OOS61P ····"874 'tlG57(}P'
675"OQ.57'lpw·6 90' 00611P'. . . ····"6·9200613f·· . "···. ",·
701 OU624P
70B D0530P
753 D0666P
758 D0670P
760 GOE72P
763 00675J
765 00616P
767 007COP
769 00702P
771 GD7D4P
772 D0705P
774 00706J
"/'76 CfJ7ITF779'i:1!J712 P
781lT0714P
8 0 2 0 0 7 2 2 P ' BTO 00732P81I'00733f
616
740P
4 C0747
828 00753P
843 00772P
845 00774P
852 01002f
.................................. 8'56
c..CoP
6.010.10
859 01Ul·1PB6i G.1G13R864 O·101·6.fL..
894 01031J
902
04iP
9 J 01042P
908 01047P
914 ClOSS?
924 01067P
927 01072f
966
lOOP
9 3 D1120P
9S6 D1123P
960 01127P
964 D1133P
968 01136'
·""" . """·····, ....,····.. · ..·. ' '..,······ ..·······''g;7'Er '01·1· I:fl.P···· ··· . ".... '''9TB'''u''i:1:4S·P-········
9'81 ··0·1'14:6P·
9·S5········C1:152p··········,,·· .. ·,······ ,····9·86'u1:·1:53p..· . ···"9·87·····'01:1:54t.i.'·
991 01150P
994 011E3P
1000 D1167P
1004 01173F
1006 01175P
1008 01177.
1010 U1201P
1011 01202P
1014 01205P
1016 012D7P
1026 01220P
1028 012221
1034 UT22EF"
T0390T23'3P
104TIJ1235P' .
T043(f123TF .
... 104S0T244P'" ······1051 012471"
1053 01251P
1058 01256P
1059 01257P
1062 D1262P
1068 01267P
1069 01270d
. . . . . . . . . . . . . . . . 10720. 1273P
.. 1Q73 012.7 4 P 1 Ol90 1 3 0 0 P . 1 D82013 0 3 P
1086 01307P
1088. 01:31:H ..
10a9 01312P
1091 D1314P
1095 01320P
1096 01321P
1098 01323P
1100 013251
1101 01326P
1103 01330P
1105 01332P
1110 01337F
1111 01340P
1124 0134~?
····113 4'Ol'3'S4F''''11'35'01:3 5'5"P···
"11<37 '0 135'7 P'"
.. , 1:1:42 '''0 l'36·4·P···········
·····1·147. · · · 0 t371p········...,,·· ·· ... 1t-49'O'1·'372f ..' .. ···
1157 01377P
1162 014052
1166 01411P
1178 01422P
1192 01436P
1201 01447P
1240 014??P
1241 01500P
1250 UIS10P
1251 01Si1F
1254 01514P
1259 01521J
1260"U1522 P T 2 6'4'01526 F ' T 2 7 1 . CflS3liP
. ·······1273 01536P1275 0'1540 P
1276 01541F"
1277 01542P
1306 01561P
1311 01566P
1314 01571P
1316 01573P
1317 01574~
,,131 9 il.,i 5.75.£....
.132 il 01S7 7P,,1334,,(l1615 P . i 337 0161 7 P
134301624 P
1353 016341
1357 01640P
1359 01642P
1367 01652P
1379 016E4P
1384 01667P
1388 016731'
1394 01701P
1396 01703P
1400 01707P
1410 01721P
1419 01731P
1420 01732f
........................... , ............. , . ",,· . ·· . "142'1 O·1 . Y·3',3·P .. ····· .. ···":1:4. 2S ....·0·1737'P·
······1·i:r27······01741P . . . ···' . ·14·2··8····01"7·1;2P~""'·· . '''·14·34''''01750P "".,
··144'0···01·756f"
1445 01763P
1447 01765P
1450 01770P
1451 Dll71P
1457 01777P
1459 02001f
1469 02013P
1471 02015P
1474 02020P
1477 02023P
1483 02030P
1487 02034f
........
.....
'''''148 90'2D'36F~'-"149Z"02 0'41 P .. ··"T49TO·2 046'P
....... "1'5020'Z053F""
'15080Z060P'
. . . '151402 066F
1517 02071P
1520 02074P
1521 02075P
1532 0210EP
1534 02110P
1536 02112J
153.B.,,02114 E..
...... 15.3.9.... 0. 2i15P...1542.D2120P"
154302121P15450 2.1.22P
15.48 02..125f.
1555 02134P
1556 02135P
1557 02136F
1560 02141P
1561 02142P
1565 02146.
1566 02147P
1570 02153P
1572 02155P
1574 02157P
1577 02162P
1581 02166f
.......... ,,,,,.- · . . . ""',····,....·· . ·'1-S·90·······0 ..Z·j: 77·P"",,,.... ·. . ,,·,..15·9. 7·'·..O·2·206P"·" .... "··"~··i598···{)221(1'P···· .. ·. · · · · · ..·········16·05"···{j··2·2J. 6P-'"
.. ""1'616''''O'2-22'7P''''
·'16 j;g""0'2"2',3"21"" ".".M ........
236
'197 .. ··
00 () 0:1:'
........ .
0123(JP
00174P
OiO?i?
Ui420P"
8
' w ' " " '• • w
2062 G3033P
·33··00000·p
,
WRITERTN
X:1:
02441P
OS072P
30
2069 03042P
.····31·ll0 Door'
2037 03004P
2039 03006P
2048 03017P
2052 03022P
2046 03014P
2054 03024P
3121 04756 p.
842 01106P
2235 03233P
671 00565P
871 01023P
·"3164'04'17 2P . .
2498 +7 2 "'03(,t4P
32 OOOOOP
1168 01413P
.1755
02422.P .................... 1837 02530P
3111 04744P
3180 o5006p
3109 04742P
3182 US010P
1736
2'038
2041
161
162
3287
163
1770
3238
'OIT7 2p································ 1003
.... "997 'Ulra6P
U1220P
10 6
989 D1156P
0122 oR
1 0 1 0 2 9 1223
01232P
10
1031 1225
Oi235P
10
1074 1275
01"1010'24
01
10
1001
309 .".,' "·;t·,,
1
'389
wnl03
-_.,
.......
OOUOOP
00013
3143
3169 D4776P
00012
3142
3173 U5001P
o1142P877·717··OQ640P·
01161P
992
1027 G122i?
01167P
999
995 01164P
WC ZERO
~jfMO
05146P
00024
x
)(
x
VN1'ISAVE
WARN
WCt1A X
()
..... .
28
2·80 00 00 P
2040
03010P
···········VHMCH
(J
....... 2046
.. '03U05P
······x..
2044 03U13P
1981 02732 P
1 739
1917
2036
030Q7P
02377P
VANISH
()
o
o
U24 U 2P
U2640P
£
0 J U0 3P
......... 030 14F
TXEND
TXHHT
TXi'IP
··TXNE
TXNR
TXPCI
'TXPV'
TXSI-1AS H
T xSTART
TXTOTA[
T XHC
UD8ITS·
UJPOX2
UNSAV E
o
o
o
o
o
o
o
o
o
N
0.
II , ......... ............ , ...." ............
0;·. ···
~
~
......
~"
..............
,,~........
.........~"
~"...
......................... .... .
~
o
o
M
o
o
o
AS:3Et-I8lER/OS3
Q)
Vi.O 09/21/74 2230
a
;j
~
~
I
()
0
I
1
····X2,·--
0
I 0
I
I
I
o·oo·oz·
o
,~gg·8 R~~fi~
I
I
CD
.....--.
10
II
UIO
12
'.'T68'4' 0-2324P
'16'91 . 02332''-'
"'1624'02237P
.. ··:\.'626 02241P"
. I632"022li7P
""T6'3502'25'2P
1746 0241H
1703 02342F
1711 02351P
1716 02355P
1732 02373F
1743 02406P
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . ·························17S·6····02·42·;:sP··
1758 02425P
1159··02·42·6.F·
1,762..·02431P· """ ...... 1764 02433P
1765 02434J
1777 02445P
1780 02450P
1791 02463P
1887 02606F
1907026271
1896 0261SP
1944 026701
1909 02630P
1914 02635P
1925 02645P
1929 02651P
1935 02657P
.. "1973 02722 J'" ......... &.
. ·--··tge9··02?20P
····i9 LtS .. ;J2b71p··· ..... ····~·r9 4 6"'028?2P .
··.. ·1'9550·2702 P ' ' ' 1 9 5 6 ' ' 027'03P'"
2017 027541
1974 G2723P
1975 02724P
1984 02734P
1990 02741P
2010 02745P
2068
03041Ff···..···. · · · · · .. ··,-2019 02756P
2024 02762P
2043 D3012P2061 0303ap.
.20.63.03.0.34P
21
t703107
207S0'304'.JP
·····2086"03056P
208903061P
210903077P
2115 03105P
2166 03155f
2151 03140P
2127 03114P
2141 03126P
2144 03131P
2148 03135F
2·1·67· 0,3·156 P,··Z1710,iS162 p.
2195 03205P ··2,498 + 21 03633F
2498+3103644P
249~;~~ g~8g~~
')0
2498+37 03652P
2498+50 03667P
2498+58 03677P
2498+59 03700F
2498+61 03702P
2679 04201P
2709 04244P
2710 04245P
2720 0425EF
2721 042S7P
2723 04261F
-27 81 04344 F .. ·....·'"'" .:.
····~······"....'27 2B·~1142·64P'~·"··~ ·Z7·38··{lI.f27 6?
2758-'0 '4"3!5P"
"2761 04322 p'
'27?8" o4'34tP--2805 04373P
2859 04437F
2782 04345P
2783 04346P
2797 04363P
2798 04364F
0"
3028 04657F
3020 04647P
2940 04545P
2941 04546P
3011 04637P
3016 04643P
f?
...... 307204713f
'''303U''04660 P ....,. j.·0 35' 1)£1--664 P ............., ... 30'37' If4666P
'30'38' 04667 F
.... 30710 4712.P
3073+2 04716P
221+ 2GU Q..fJ 4 P ........... 226·0 0005P·
·2691JG037F,270 GG1l40P2.71 DOU41P
27700047F,
287 U006UP
288 OODGiP
291 OD064P
308 00104P
327 00126P
336 00137F
345 OD145P
351 OU153P
363 00165P
369 00172F
386 00210P
398 00223F
S·p..········ ···..446..u 11251' p'
·"4600026 5 P - 4 7 GOO 2I5P"'"
"4'980'03'35P527 00370P'
546+2 D0412P
570 00437F
588 00447P
593 00454F
7P
546 D0410P
............,.. --;::;-"';"::J';:: ;::,;::3E
62.3 __.llOS.iiP ...
10
3P
655 OOSS7P
73
00652P
739 OD655F
741 006S7P
829 00754F
00650
729 DOGS1P
·········•·····.. ···············j)0.,'.... · 00·r. 5 5 8 3 5 0 () 762 p. . . . . . . . . . . . . . . . . . .
86
Q··1D17F··
. ······8·j)9··· 0105 O P 9 · 1 , O , 0 1 0 5 1 P 9 3 8 0 1 1 0 2p··
992 01161P1G~4 0124GP
1056 01254P
1074 01275P
01121
95S D1122P
01333
1143 Oi365P
1144 01366P
1145 01367P
1175 01417P
1193 01437P
~'~"1212"Q1455'F~'"
., 12:1:9" .014 eO'F'~" ""1221""01lJ62P '-"""'128 9-'O'1554P'-'w,w
a·145'3P ..··l~2 1:1.' tl:t4 'Sl:f P
1330 D1GilP
1331 D1612P
1344 01625P
1345 01626F
Oi603P
1325 01604P
01646P .. _ ._1365 0155DP . . . . . . . . . . . . . . . ,. ,. 1370 Q165lrP
1380 ...()lE;.p.~:.F.
....... 1.3.92 (U677P1J9S ..O.17.0.2F
a 1 · t i z · P i !~i5'O 17i€iF
145'2 o1772Pfl.j60 02002F
1467 !J201.1P
146802D12P
1500 D20S1F
1510 020E2F
1511 D2063P
1515 02067F
02D1?P
1499 D2D50P
···02 (l:..{ 2· p... ··--,·15 2 3.. 0.20 ·]·7· p..,-,1575 02·1&0 P · · i S 8fi··,··{J·2·1·6-5 p..
1583· 0 2 1 7 0 P 1 5 8 9 02176 F
(j
02203P
167
D2J16P
1688 D2330P
1699 D233EF
1719 02360P
1770 02441F
1798 C2472P
1803 D2477P
1805 02S00P
1806 02501F
0245?F
179 02465P
1·88g··a260?p'·······..·····~~.. t8g1··a 26·rrp·' ...... ····1892 o26'12P" · · · · · · · · .. 1898······02617 F ....
1913 02634P
1915 D2636P
1922 02643P
1930 02652F
1939, G2663P
1 S 62 (} 2711 P
. .1.9. 6.5...... 0.2.7..1.4 P..
..... 1978 02727F.
199~) U2744P2Cf26t-2 02?64F
2026+602766P
Z026+10 02770F
202
G2776P
2085 G3055F
2091 03063P
2092 D3064F
·····216
il3152P
21'18 03167p·
·····2190····03Z·0iP··
2194 03204f
2498+
D3614P
2498+7 Q3615F
2498+10 03620P
2498+17 03627f
2498+2
03635P
2498+27 03641F
2498+28 D3642P
2498+40 03655F
1-56 ····0 3f;?5p···· ········249'8+·e2···iJ370·3PM·2576··04031f·· ....~-..··
629 04114P
2631 04116P
2632 04117F
()
5+1 D4234F
2706 D4241P2708 04243f
754 0431'3P2BO'if 1J4372P
'280904376F .........................
817 D4402P
2819 04403P
2821 04404f
PA GE
0
·······~·~·~·g8~~~~:-·--' .
o
0
r-'
U
o
()
o
0
()
G
g2,9 U441,UP-
o
0
q::; .........._ .... X~L
d
1
0:,
0:;
O.
"~)
0;
i:,
3]
,." ,,2·83·1- 'i144--1-1P
·2·8·33 ,,·04·412,f
034 D46~3P
3D10 04711P
3073+1 04715f
o
181 D50D7P
3182 D5010P
3187 050151
3'1Ij·'{''ft .... uS-n·lelf'''' ..•· .... , .... "'31:'S,r3'ut)'t! 24p.. ··. ·_··_..3196··13S'az? P "3291-05'0";:: 3 p'
:32'06"05'037 P .. ,~. ········'··3 208 ~·05. 0·41S.... ··~ .. ··
3217 D5DS2P
3220 OS055P
3222 D5DS7P
3223 D5DEOP
275 GCOi·!5P
2f5G GOuS2r
281 DOG53P
28.3DD055P
292 Q006':}P2.97.... 0001.2J
.............. 299'otH173P'3G::C (lUO 7 5 P . . 3 D 4 ( ) O i f J c J p 3 1 4 · · 0 0 l i 2 P 3 2 5 00124P
326 001251
329 CG130P
331 00132P
33j 00134P
337 a014DP
342 D0143P
343 00144J
347,··(J·G1.,47.P .. · . J 5 0 (j·o.·1.52.P-··. ····35·3 ···,.u·Q·155.p···3 670 0170 P
,368 00 171P37,200175F·
380 0020JP
383 00206P
396 00221P
397 00222P
449 00252P
450 00253P
457 OG26ZP
459 00264P
476 D0305P
477 DQ306F
478 00307P
481 00312P
'48' e"'(tfi:<31'S485'''IJn Ji6P"uu''486 C:J Il317P'492+4' D032? PM'
·493 .... 00 3~lO p"u'''~''''''''''~494'O 0331;"· .. ·... ,· ......
496 00333
~97 00334P
504 0034iP
506 00343F
507 OD344P
546+1 00411P
5S0 U0414P
5S5 OD423P
590 D0451P
591 00452P
598 00461P
602 00465P
613'" GO'ZtT7P
·········6150·05 OIp···········--"·61B . ·U05G4F
···620····011506 p"
"'62400512P
629 00515"1='
631 OOSi7P
635 00523P
638 DOS26P
646 D0535P
649 00540P
655 00546P
. . . . . . . . . . . . . . . . . . 65,9fj0551P672....011566P--···
,--673UtJS67P680 OOC03P . 6 8 2 O··06·05·P
683·,006·06·.,=···
693 00614P
697 00620P
706 OD626P
738 00654P
799 007l7P
833 00760P
839 GOl66P
844 00773P
848 D0777P
854 01004P
869 01021P
891 01026P
92'u'u1:'063P
···~···· .. ··9·25.. u·Ol·IY70·P· ..· · .. ',,",,'952 ······O . 1075p . ·
.. m9..3-9··0il.. 0~P· ..".. · .. ······ .. 9·41.. 01t.. 05P· .. ···..9·47·· 01·t1~3F"·""·-··"
949 G1115P
1017 01210P
1021 01214P
1047 01243P
1050 01246P
1054 01252P
1084 U1305P
1092 01315P
1093 01316P
1127 01346F
1160 01403P
1183 01427P
TT890T4'33F'
····.. 'T:f9rr"Tlf4·S4PTI9TO'I443P
'1209 01lf52'P--I218 OTlf57P
1Z34 0 14T2P'
1286 D1S51P
1287 01552P
1305 DiS60P
1322 01601F
1328 01607P
1348 01630P
i350.D1632P
.,.. 1.352U16.33,P.
..135 l+0163SP,
... i405 01714P
1456 Dll76P..
..14650200U..,1,
1479 02025P
1488 02035P
1522 02076F
1527 02103F
1569 02152P
1571 D2154F
1573 02156P
1578 02163P
1586 02173P
1587 02174F
1588 02175P
1591 02200F
···' .. ··· ..·····'···1~593~·02·202·P·········· ····~····16·0·2·~'02Z1·3·P· """"""""160'4"[t221:5p······.. ,_····,··· 1:6'08 ','·0 Z'Z 21'P ""-'''''-''161'3 "'0222 5P··-··..·~· ····~1628·· 02·Z4·3F· ...
1629 02244P
1630 02245P
1640 02254P
1646 022E2F
1647 02263P
1648 02264P
i
()
"'~'~'~"5H~~j~----"--'~1r88t~~~
o
o
o
u
o
o
o
o
A SSGI5LER/OS3
Vi.0 09/21/74 223LJ
13
PAGE
UIO
loS802274P
16S902275p·1661 U2277F
1f;65· 02302f
f666-02303P
1668 02305 ""
1670 023U7P
1671 02310P
1674 02313P
1681 02321F
1685 02325P
1704 02343?
··1706 02345P17U8· 02347p·
1715 02354F171802357F
1720 02361P
·1721 02362;·
1728 U2367F
1730 02371P
1731 02372P
1735 02376P
1736 02377P
1738 02401P
1739 02402P
1740 02403P
1741 02404P
1745 02410F
1747 02412P
1750 024150
175502422P
178Et 02435P17760 2444·P
17'82 '. . 02452P" .
'1?8'3'02453P
1790· 02462e' .
1794 U2466P
1797 02471P
1799 02473P
1802 02476P
1808 02503P
1810 02505P
1815 02512P
1820 02517P
1835 .02526P,
.1837 ,D25JOP. __
18380,2531P
184.0 0.2533F
18Ltl·0253 LtP
185402551P
1855 02552P
1858 02555P
1863 02562P
1865 02564F·
1871 02570P
1873 02572P
1874 02573P
1875 02574F
1882 D2602P
1890 02610P
1893,-02613P
1897 02616P ,
1899,Q,262··0P··,1·9·0602626P
191602637,P
... ·191-702640 P
()
1916 02641P
1928 02850P
1938 02662P
1948 02674P
1953 02700P
1957 027042
1959 02706P
1964 02713F
1979 02730P
1987 02737P
2D11 02746P
2022 02760P
. 2023 .. 02 761P
2031'·' 0300 OP
204 t .. O301 OP
'2047'030 t5P" ,
20 52'03022 P·-205803027FM
2059 03030P
2060 03031P
2067 U3040P
2080 03047P
2084 03054P
2088 03060P
2090 03062P
2111 03101P
2125 D3112P
21400~12.5f
2142 03127P
2150 03137F
nO
2153 -03T42P
·--2161'03151 P · 2 1 6 3 03153 P
2165 0315 4P217703166P
·2179 03170ij
2218 03212P
2225 03221P
2230 03226P
2232 03230P
2233 03231P
2234 03232~
-2262 03263p·
·226503266i;; ...
_.. 224·,i···O,3240fL ·-2242-03241P·
--2252 ·OJ251p·2260 ·Q32fi1·P·
2269 0327iP
2271 03273P
2272 03274P
2294 033C2F
2296 D33D4P
2298 03306P
2299 G3307P
2301 03311P
2308 03320P
2312 03324P
2313 03325P
2314 03326P
2321 033'35P
····232403340F'· ...
23161],333 D F . ·2'3:tY·033·31P·
231803332P23 20' O'333'4P'
2329 03345P
2331 03347P
2334 D3352P
2336 03354P
2338 03356P
2350 03371;-;,....
2356 03377P
2358 D3401P
2~61 03404P
2363 034C6F
23~rrl,g.~tl~~
·~~~g,-g~t~~t,,·,0
2-3nr·D3423P-2-3·84 '034-30-P'2386--03432P2387' D3433P
2399 03446P
24DO 03447P
2401 03450P
2402 03451P
241D 03461P
2411 03462P
·2414 03465P-2418-03471P.
...... 242B03473P.·
2423 OJ476P2427035 02P-2428035 03FJ-2433 03510P
2434 035i1P
2435 03512P
2436 03S13F
2439 03516P
2442 03521P
2443 03522P
2447 D3526P
2448 03527P
2452 03533P
2453 03534P
2455 03536P
24'66'·035 5 1 p · ' .... 2 470·'0'35 55}'j"· ..... , ..
2456-075 537P
··Z459··03'542P-'--246t)U'354'3P-24 6'2'035 Ir5 p-2471 03556P
2477 03563P
2478 03564P
2482 03570F
2483 03571P
2484 03572~
2485 D3573P
2490 D3600P
2491 D36D1P
2493 D3603P
2494 036D4P
2496 03606P
···2498'Cr36TOP
. 249B+3:"0361IP--249 o+TS-0362SP ·'·'24 98+19- 03631P
249 8+330364 6 P .
249 8+ 34 03 647F
2498+41 03656P
2498+42 03657P
2498+44 D366tP
2498+46 D36E3P
2498+65 03706P
2498+66 0370ZP
2·4.'3.8·+·6.7········0·3.?10·.R.···· - 2498+75-tl37-i7,P
. 257..?·····{l·4D.3ZP···... ··· ·",·... ,-·,25 83··· 040AOF
2592 04051P259604055Gi:.'
2635 04121P
2638 D4124P
2644 D4131P
2647 D4134P
2650 04137P
2652 04141P
2660 04151P
2664+2 0415bP
2664+5 04161P
2666 041E3F
2668 04165P
2670 04167F
·2
0+'4 lJ4177p·268;S'(l42Q5P271J204230F
2705+4' 042·37P
'271504251ifi
2
5
730 04267P
2731 D4270P
2736 04274F
2741 04300P
2743 04302F
£
OJ
757 04316P
2759 0432DP
2787 04352P
..,.... 2.8Ji604_3.7.4P
2855 04433t;:'
2'
lj.EJ
92£r t1452.3P
2<123 04526P-2S24 U452.7F ...
2927 04532P'2931 04535i~;
2932 045
P
2934 G454UP
2935 04541P
2938 04543P
2944 D4551P
2957 04565P
2958 045 P-_w2.965 IJ4576P-Z969 .G4·602·P··-······-2S8204614F
28~5-046~6P29S0-04622P2996 046
P
3001 04633P
3002 04634P
3027 D4656P
3058 04675P
3062 04701F
3D64 047 P
3066 04705P
3068 04707P
3069 04710P
3090 04721P
3092 04723P
··········3116-·04751p··""'·,··,,·''''·'·3119 0 4-754P""
'31:'0 204'73'3P~'3107 047 40P" '''3·1·09'0 it 742 P
31130'4746P
3121 il4756P
3180 05006P
3185 D5013P
3186 05014P
3190+1 05022P
3182 05023P
3194+1 05026P
3198 05D3DP
3200 05D32P
3209 D5042P
3216 D5D51P
3219 05054?
·······32 34'Q 51J70P32 39·0507 3P
3224!JSIT6IF--3Z3f" Q5055P-32320S056P
323'3 OS06TP
3240 05074
3241 05075P
3242 D5076P
3248 05102P
3249 05103P
3250 05104P
325L051.05
. 3256 . . 05:1108"" ..,,32650 51-20F
32710512.SF
327205126FL
3273 051271"::. . .
3275 OSi3iP
1 1"50 I) 21+ 15 P
·'' <':'a·
()
()
o
o
o
o
...
o
o
o
o
o
o
o
o
o
o
o
x
XFLAG
""'XN 3 ~-IP'
XREQEND
XREQERR
"'Z'A80RT'"
E
E
167
o
~3
i:;:t:H}(lu 0
.'.M'.··"."."' . '. . '.'''.
c'·."'.c.'· •• '__''__ .
35 DOGOD
36 OOOOOP
lf38U[J24:[pi'-""'''·'''· "',. T1 30 06'3 5F
.. ·T3T'GC653P · 7 4 2 006 cO-P · · 8 7 2 Of024PT213-0T456P"
1222 01463P
CY
. ,,-
1310 015E5P
1390 01675P
1644 D2260P
1986 02736P
2082 03052F
··--2128 .·03116P
27.91- 04356P" 2838 ·,04414P
2840-04416P-"·"·,,,,,·2844 04421(=),
~8t~ 04423P
2850 D4426P
2851 04427P
2852 044JOP
2863 04442P
2864 044432
2865 D4444P
2874 04454P
2876 04456P
2877 04457P
2880 D4461P
2882 04463P
',·,,·--··,··,,···,·····,,··· ...·,,·,·,·"·"·2B87 0-4 46'" p . l : : 888·'04470 p ...
'28 93" 044"/4P""-···2·8'9S·'O·4476p·-··'M"Z90'101f50·3P' ''''2905'045061.=-'
2906 04501P
2907 D4510P
291 1+ 04516P
ZEROPG
168
3203
05035P
. ZIP
. . . . . . . . ,....." . 04:roOP
..... '2741
2735'lT4 27 3P-'-'
ZRDEOD
05003P
3176
258 0002LJP
.. .. _, ..... ,. ....... ... _....
..
.. .. _-----_.,., .._-_
.
.... 2R02AGE
.x
"-"" .. ,-".,.169,,
32.0 l ... 0 5.1] 40 PZWCMAX
047752
3168
1702 02341P
2216 03211P
2498+13 03623P
2856 04434P
ZWCZERO
05uOOP
3172
~t58 GU263P
1288 01553P
2394 03437P
2857 04435P
21 ?
h. .. Q3113 [J ..
,.,",
',
,
,
,
,',.,'"
"
,-""
-.,'".
""
,
.. _ , , "
()
o
o
o
o
o·
o
o
o
4
n _ _ • . - . . _ . _ _ _ • _ _ , _ . _ _ _ _ . _ . _ _ _ _ _ _ • _ _ . , _ . _ , ._ _ _ • _ _ _ • _ _ ., _ _ _ _ _ _ _ . _ . _ _ . _ . _ _ , _ _ , _ _ _ _ _ . _ . _ _ _ _ _ _ . _ . _ _ _ _ _ _ _ _ . _ . _•• _ _ • _ _ _ _ _ _ . _ . _ , _ _ _ _ . _ , _ . _ , _ _ _ _ _ _ _ , . _ _ • _ _ • _ _ _ _ _ _ _ _ ~ _ _ _ _ _ _ _ • _ _ .,_~ _ _ . _ . _ _ _ , _ _ _ _ _ _ _ _ _ _. , _ , _ _ , _ _ _ , _ . _ _ _ _ • _ _ _
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-c041 52.342996, 2008/05/07-21:37:19 Create Date : 2018:04:26 10:54:34-08:00 Modify Date : 2018:04:26 12:14:22-07:00 Metadata Date : 2018:04:26 12:14:22-07:00 Producer : Adobe Acrobat 9.0 Paper Capture Plug-in Format : application/pdf Document ID : uuid:689c5704-9e03-0449-bc2d-406918468cfb Instance ID : uuid:f1d82ad2-caab-4d4b-83a5-76aa814947e5 Page Layout : SinglePage Page Mode : UseNone Page Count : 77EXIF Metadata provided by EXIF.tools