Xerox 900 series - Page 25

20
MONARCH I/O SUBROUTINE LOADER 22
LEGEND I
UAT • Unit .... ignment Table
UAC = Unit ~ Code
initialize eulnutlne para ........ , .. -
tract 1/0 function swltchea & Initial
load relocation bioi',.. IOlElC
Al~------------~
No
UAC .. code for mag. tape?
No
UAC .. code for card read/punch?
Insert origin of RAD file IRallap ... nt
routine Into UAT entry carresponcflng
to current I/O function
Set I/O functIon pointer to next I/O
function swItch
Set
UAT add,.. poInter to UAT entry
corretponcftng to neIlt
I/O functIon
laIt 1,10 functIon .wItch exGIRlned?
Extnlct
unit add,.. code (UAC) from
UAT entry c~tng to current
I/O function
Prl nter 1,10 eut:nutlne loaded ~t?
No
Store current 1_ relocation bl __
printer tubroutl". art,in
No
Store current load relocation bl __
mag. tape subroutine origin
Na
Store current load relocation blaa _
origIn' 01 paper-tape/t)'pewrlter I/O
IUblOUtlne
InMrt printer ...... tl". origin
Into UAT entry correepondlng to
current I/O function
....... orI,1n t:J ..... .......... -
I". Into \JAT entry corretpOndlng
current I/O function
nMrt origin 01 card I/O IUbrou-
lne Into UAT entry correlpOftdlng
current I/O function
nMrt origin 01 paper-tape/type-
Iter I/O subroutine Into UAT
try carr-.ondlnsl to current
/0 function