10
s
U
I
I
s
U
I
R
Get Internal
chan.
01 ,.,....,
QQIIM
Convert
ftUIIIber
to binary
MONARCH CONTROL ROUTINE (cont.)
s
U
•
I
5
U
•
R
SGETWRD
C1~----------~"
5
U
•
I
~
Get
IWCt
ct..
(C)
fl'Ofll
cunwnt ........
x •
left dell",lt., cla.lflcatlon code
forC
IC • character cla.mcation code for C
G.t Internal cha-
of
number
DEQIN
Convert number
to
binary
S
U
•
I
S
U
I
R
GETINT
Get internal
chan •
of
word
~
Pack
chars. of
word
S
GETINT
U
Get internal
I
chars. of
R
word
5
!ill
U
Pack
chars. of
I
word
I