08_IFSTART 08 IFSTART

08_IFSTART 08_IFSTART

User Manual: Pdf 08_IFSTART

Open the PDF directly: View PDF PDF.
Page Count: 22

CD
ASSEM3L~R/OS3
Vl.O
U9/21/74
2217
FAGE
(]J
LENGTH
OF
Pt<.G
()
o
o
o
()
o
()
o
o
o
C>
o
o
o
o
o
o
Ul1GOU
OIHlUl
0000;:2
aUDGS
0000£)
tJUOUl
OOOi:]
00011
o
UJ
12:
GaOL)
o a 0
lit
D
00
lS
OOOlb
00016
1
2
1+
5
6
7
H
9
10
11
12
13
14
is
16
1f
ld
19
20
21
22
;:)
1
IFSTAfrr
SYSNAC
I
UtiH
IFST
AIH
-
THIS
ROUTINE
DOES
ALL
THE
SET
UP
FOR
THE
TRANSFER
OF
INFORMATION
BETWEEN
THE
POP8
AND
THE
3300a
IN
THE
PRUCESS
OF
DOING
THIS
IT
BUILD
THREE
MAIN
QUEUES
CALLED
POPIQ (INPUT
FROM
POPS),
POPOQ
(OUTPUT
TO
popa),
AND
porCQ
(CONTROL
INFORMATION
FROM
POPS).
TO
ADO
A
NEW
TYPE
Uf
DATA
OR
TO
CHANGE
EXISTING
ONES
AROUND
THE
ENTRIES
IN
THESE
TABLES
MUST
BE
CHANGED.
THIS
ROUTINE
ALSO
SETS
VARIOUS
BITS IN
PSA8LK
TO
SAY
THAT
VARIOUS
TERMINALS
ARE
NCT
TTYS
BUT
200
UTtS
OR
TEi<lRONIX
GF<APHIC
TERtlINAlS
..
ALL
INFOR11ATIONUSED
IN
THE
BUILOING
AND
MODIFING
OF
THE
VARIOUS
TABLES
IS
OBTAINEO
FROM
THE
SYMBOL
BLOCK
VIA
INITIAL~
ENTRIES
IN
THE
SYMBOL
BLOCK
LOOK
AS
FOLLOWS~
INC
DE
cos
tJTLPOEF
B/DEVICE
I
NUt~BER
OF
5/0UTPUT
LA
5/INPUT
LAB
5lCONTf(OL
B
6/PDP-8
MUX
1'S·YSi'~1AC
03)
MULTI
PROGRAM
IF
READER
ANNEl
NUMBER
.~
¥
•••••••
~
••••••••••••
~
••••••
~
••••••••••••••••••••••••••••••••••••••••
~
~
BLOCK
BLOCK
DEFINITIONS
.
BFCP
C;AL8A[<
EQU
~
,~
,--
t:
UHi"!
I{ILLFLAG
E
EN/H) c
N~Jf'rt
E
ENIT E
~>;.
..
:;
...
::;.
••
!Y-
-lto
~
iJEV8lK
EQU
COUiH
EQJ
POSI
EQU
PFWORO
EQU
FORdSxRU
EQU
,.-
(]
FB-r!
BLF-tl
BGN+t
f~
PP+
1
el4.L8AK+~1
I
AO+t
LNHitt
KILLFLAG+l
ENf~O+l
N,j::1'1+
1.
ENIT+l
OEVBLK-tl
COUNT+l
POSI+l
PFWCRO
POINTER T
LE
BLOCK
GOUNT
OF
THIS
FILE
QUARTER
PROF
CURRENT
512
WORD
POI
TER
T
WORD
TO
BE
-
LOA
BLOCK.
THIS
POIN E
TO
T P
BEGI
URRENT
LOCK
GOT
WHEN
BUFFER-
IS
DON
NTERRUPT·
81T23
LOCATI
URD
IS
TO
BE
PLACED
OM.
MAXIMU
REGORD
SIZE
STI
~,o
9
EN!
BlOCK,Xl
UJP
IMPURE
TEMP
FOR
INDEX
3
If
81T23
DEVICE
MUST
8E
STARTED
BY
OPERATOR
IF
8IT22
00
NOT
PROCESS
FORMS
ON·
THIS
DEVICE
IF
BIT21
THEN
STOP
MACRO
IF
8IT20
THEN
BUFFER
IS
UNSAFE
BIT
19
IS
A
QUEUEING
FLAG
PTR
TO
4
WORD
BLOCK
COUNT
OF
WORDS
IN
RECORD
RELATIVE
LOCATION
IN
8UFFER
CONTENTS
OF
PFl
8IT19
SEZ
WAITING
FOR
OPERATOR
TO
READY
DEVICE
81T20
SEZ
WANTS
FORMS
8IT21
SEZ
HAS
FORMS
8IT22
SEZ
TAKE
FORMS
OUT
8IT23
SEZ
SAME
AS
81T22
BUT
DRIVER
IS
WAITING
TO
OUTPUT
NEXT·
FILE
ce
()
o
o
()
o
o
o
o
o
()
I)
\...,
()
o
o
o
o
o
o
o
CD
I
I
ASSE,'I!JL[f-UOS.:)
(}I
I
()
o
o
o
o
o
o
o
o
()
o
o
o
o
o
o
o
Vl.J
Ug/Zl/74
2217
DUUi,
Ll002D
UtJ021
OUi)2~
OOJ2J
0002
<t
lJ0025
OOdeS
00U27
OQ(jj:O
o
!Jf.!
31
QOIL'I2
00036
PAGE
19b
97
~<
.",
~,
..l
~1
c>
2
IFSTA1<T
IDENT
[QU
URElt:xITA
EQU
URBEXIT
EQU
QldGLOC
EOU
~.!.
QPNT .
ElW
(~Ei'lPT
Y cQU
..
';'
:::;TfHLOC
fQll
,a
:y.
••
URWUi=(O
t:UU
>;-
[QU
[CHl
~
..
~
....
1',
EQU
CO
OL
I~(~U
""it
fNfLOC
ECtU
·
:t,.!.
f<
rAOD
E(JU
·
""
r<
EG~
PF\~ORO+l
IDENT+l
UR8EXITA+l
URBEXIT+l
CUNGLUC+i
QPNT+l
QEI~
PlY
+1
SnnlOG+i
GRO+1
0+1.
'fR+l
JR+'1
CONTROL+l
It~T
LOC+2
T
1400"'1
BCD
IDENT
OF
THE
DEVICE
ENI
BLOCK,Xl
UJP
IMPURE
ADDRESS
TO
GO
TO
WHEN
FILES
ARE
UNEQUIPPED
POINTER
TO
NXPTR
AND
LXPTR
ADDRESS
TO
TELL
DRIVER
THAT
IT
HAS
TO
MORE
FILES
TO
OUTPUT
ADDRESS
TO
TELL
DRIVER
TO
START
FILE
ADDRSS
OF
WHERE
TO
JUMP
ON
THE
NEXT
INTERRUPT
POINTER
TO
THE
pupa
TRANSFER
Q 4
POINTER
TO
NEXT
FILE
TO
PROCESS
POINTER
TO
LAST
FILE
Te
PReCESS
HAS
pope
CONTROL
BYTE
THAT
~
SEZ
WE
HAVE
LP
INFORMATION
ENI
8LK~Xl+CBI
ENlER
HERE
WHEN
UJP
INTERRUP
popa
WANTS
DATA
RETURN
ADDRESS
IF
BIT23 A
LOW
INTERRUPT
REQUEST·
GOUNTER
0
INTERRUPT
REQUESTS
()
o
o
o
o
o
o
o
o
o
o
o
()
o
o
o
o
o
- - -
___
- -
____________________
._.
__
-
_,
______
- -
_._
- - -
__
._
- -
._._
-
____
__
"_.
__
- -
_._._
- -
__
,_,_.
__
._._,
__
~
__
._
- - -
_,_':'
______
0-
__
,
___
."
I
ASSE;"l:3lEi-UOS's
CDI
1
()
()
o
o
o
o
o
o
o
o
()
(J
o
o
o
()
o
o
o
Vl.0
09/21/74
2217
uoooo
000111
nOUD2
UOUDd
00D04
00006
DOiHG
OQLll1
OOQ12
0001.5
HOU1;)
OOU1':i
QU016
00017
O(]028
U0021
00022
00023
00021+
OU!1Z':i
U
II
U26
G
021
PiHi[
35
102
103
104
lOS
iUb
107
100
1t]
I:J
11U
111
112
113
114
::
....
IFSTAI~T
UWiJUEF
••
~
•••••••••••••••••••••••••••••••••••••••••••••
¥.¥
•••••••••••••••••••••
GON3LOGK
EQU
8FPTH
EQU
)<
,
...
dlKPOS
EqU
II"lADR
t.QU
GALL8AO
EQU
'II
~t
~JC
CB
II
PS
D1
.,
::~
t
l<
E
i=
,.
C E
USY
E
EQU
EQ
EQIJ
E(~U
EQU
EQ
few
EQU
E PDtU;';
EClU
.
,
,~,~
':j:.
.v~
2-;,
~e. ";~
.,.'(:'
:y.
UNBLOCK
BLOCK
DEFINITIONS
o
CONBLOCK+i
BFPTrH
1
BLKFOS+l
I~!AORtl
CALUlAO+2
RDISf+2
HGNT+l
C8LOC!<+1
TINAD+i
PStllOC
+2
D'H
+1
1
+.1
G
D+1.
VTY
+1
POINTER
TO
8
WORD
CONTROL
BLOCK
POINTER
TO
CURRENT
CORE
BUFFER
-0
IF
NO
BUFFER
PRESENT
CURRENT
BLOCK
POSITION
ADDRESS
OF
HORD
COUNT
AND
IMAGE
CALL
BACK
ADDRESS
RTJ
HACHERR
ENI
BLOCK,CBI
UJ?
IMPURE
TEMFORARY
WORD
COUNT
ADDRESS
OF
CURRENT
BLOCK
TEMPORARY
FOR
CURRENT
POSITION
ADDRESS
OF
ASSOCIATED
PSA
BUFFER
UNSAFE
FLAG
ENI
BlOCK,CBI
UJP
IMPURE
RETURN
ADDRESS
TEMP
TO
SAVE
THE
CONTENTS
OF
PF1·
TEMP
TO
SAVE
we
AND
CALL
BACK
ADDRESS
IF
CALL
TO
UWBLOCKB
TEMP
TO
SAVE
RETURN
ADDRESS
IF
CALL
TO
UHBLOCKB
81T23
IF
LAST
RECORD
HAS
[LOGOFF·
POINTER
TO
THE
PROPER
BATCH
Q
DESTINATION
LINE
PRINTER
CODE
NUMBER
OF
WORDS
IN
BLOCK
LLOIHNG
S
THAT
SEZZ
EX
1f
f--1]
HA
SS
T
USED
ONLY
FOR
FROM
THE
pupa
ING
DATA
.t;:
'4
!NORD
BLOCK
TH
THE
CONTROL
ON
UWBLOCK
ROUTINE
WORDS
IN
LONGER
BLOCKS·
()
o
o
o
o
o
o
o
o
()
o
o
C)
o
o
()
o
o
____
J
_____________________________________________________________________________________________________________________________________________
_
I
(J)
I
I
ASSEi·IJLcJUOS3
<JI
()I
I
01
1
I
°1
()
1
1
01
1
01
o
(,
'
....
)
()
()
o
o
o
o
o
o
o
o
I
Vl.J
83/21//4
2217
DUGUl
OUOU2
OtJOUJ
iJ
0
(j(j
U
OOOUO
uOOOU
UOO[J!J
UOJOi
OGU02
DODO;)
lluOu4
OCODe;
o
Vuo
UOClllI'
00001
DOOG2
00003
OOOOL!
tJODO~j
OOlJ06
00533
P
00563
P
DOU2iJP
00000
P
00206
P
.37
.)
d
39
40
,+1
42
42+001
43
44
65
66
bl
oB
22
22Y
23
{)
231
232
233
23
L
I
235
47
4d
49
5U
51
52
Xl
XL
,(3
IFSTART
EGU
EQU
crn
I i'l PURE
SELECT
·
.,.
.11
!j,
.1
:;..
~
::::.
"
"'-
i1)
C C
b~
a
f<
0
LP
GOHEP
'.
'"
,.
J(!-
~
~\'!
~
d
t.
'.
::;;,
E~
p
·il
<':1-"
:'<>:t
,.
-:7(l.,
L
PUNKEC
PLOTREC
PfPREC
UTLPi~
EO
NSFTIME
EUU
EOU
EQU
EQU
FCBDEF
E
E
EQU
EQU
lQU
EQU
EQU
ENTRY
ENTRY
nHRY
ENTrH
ENTRY
1
2
.3
o
o
a
FILE
CONTROL
BLOCK
DEFINITIONS :;.
.:;.
:;.
G
I.;.
EP+l
LPREC+l
3
t~
5'
6
HSI.~
suP,
HSI
..
STR
HsrT~sup,HSTT.STR
POPB
..
STR
POP8.SUP
POP8QS
AGCO
LOAD
CORE
IF
81
BE
BL
CU
(R
B1
B1
81
81
B
8
B
i3
:;.
nWST
BE
OJ
:;.
K
:;.
N-ZERO
:;.
, 0
BLOCK
HAS
:;.
ITTEN
INTO
UMBER
OF
THE
CURRENT
BLOC·
POSITION
POINTER
:;.
OS11
WITHIN
BLOCK
cap)
EZ
O-ONlY
EZ
LOAD
POINT
EZ
OF
DATA
EZ
MARK
JUST
READ
8 Y
RECORD
PROCESSE·
A MAL/UNAVAILABLE·
A
S5
ERROR
FILE
S
EEYONO
OGK
GINTER
FILE
HAS
CHANGED
:;.
c ITIONER
READY
FEAD
:;.
HT
POSITION
=;
0\<
TER
·:::INEI;;i~TOR
AY
CE
SS
FILE
PUl
FOR
RE~OTE
DPTCH
FA.
r::
~"
'TYPES)
+ 1
RE
TYPE
PUNCH
RECORDS
PLOTTER
RECORDS
PAPER
TAPE
PUNCH
RECORDS
200
UT
LP
RECORDS
SECONDS
OF
USER
DISK
PACK
TIME
:;..
a
:\
.}
()
()
o
o
o
o
o
o
o
o
o
o
o
o
o
CD
I
i
AS.=:;C''i.JLCR/USj
(])I
()I
1
1
°1
()
I
I
I
01
I
01
1
°1
()
o
C)
o
o
o
o
o
o
o
o
o
o
o
Vl.J
83/21/74
2217
o 0
.)
1 J
'J
UU')361:,
GUSSlJ P
iJ
0 l)
it
2
r-:
o
OoLll
e
UDSbS
IJ
PL\GE
:5
~3
'J4
50
50
57
58
59
all
61
62
03
G~
65
60
6"1
6:
+001
G
+002
G
OOJ
+
II
0
I,
6"(+005
6/+000
t.;a
5
':J
i"O
'tl
72
7'
;;;
7
7
001
?
l6
16+001
1
IFSTAFH
r-
i'l
'r-
i<
'(
!:
~r-
RY
Ei\iH:Y
ENTRY
ENTRY
El\TRY
t:XT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
EXT
E T
Elf
I
EXT
EXT
EXT
EX.I
E r
E 1
E T
E r
f::XT
EXT
EX,I
EXT
EXT
EXT
EXT
~..
r
E l'
E
'I
i::
T
PTP.('T5!
PTP~§UP
TEX.STR
TEK.SUP
UT.STfi:
UT.SUP
l:HT.1B
BIT19
[3IT20
81T22
81I23
BUILDBLK
BUILDCRQ
8
OLPTAB
AR
A~OUl
o
(JfH!
.
!"lPlAB
MPLABl
f,~OvlARE
LENGTH
F'CON
FINT
ST
N
f'
v
X
CD
o
o
o
LABEL
WORD
IN
ORIVER
o
o
o
o
o
o
(j
o
o
o
o
o
o
o
o
o
'
I
CD
1
! ASSEdfJlER/OS.j
Vl.U
09/21/74
2217
I
I
~I
(.11
I
()
I
I
C)
I
I
01
01
I
()
1
1
o
o
o
C)
o
()
o
o
o
o
o
o
o
o
UUOOO
[JUUUl
UOOu2
U0003
UUOD4
[JODOS
UOUUO
[lOUD7
00010
UUiLLl
OCl012
U0013
J0014
iJ001S
IJOOt6
U0017
OU020
U0021
00022
OUO;'::3
0002!-.
UD025
JLlUZ6
00027
000,)0
130031
000,52
(}00':)3
00034
OfJOJ5
00036
00037
(J[JQ'+O
OU01+1
00042
tJ0043
UUQl.4
OUOL;S
U 0 0
LtD
U0041'
[JOO\jO
iJU051
UOli52
DUOS3
U0054
Q0055
00056
000'37
00060
00061
lllJ062
llUOb3
130064
00065
00066
!JOG6l
OOOlD
OfJ071
00072
00073
00074
QUU/S
00016
00U77
00100
00lU1
QUiOZ
OU1U3
IJOli)lt
00105
08106
U10UOOOO
44U/7777
;<
'+4UOfJ134
P
:L2d0001
L,
S.51UOLlUD
173UOUiJl
1(::UU(j(J06
1('600070
:>37401]00
14'6/77'111.
4L
tS7?l71
X
14677777
X
15
l
tl?T16
120l]U017
L
t
UOD02US
P
Ulll000UQ
P
U10
lJ
13
[J
U U
1
itl
U
!JL]
0 i
2U1./7771
:<
3'3077777
X
40100022
X
lS1UUlJUl
~OlUUi]24
)(
35000023
X
LfOl0;)JZ5 X
5SQZClU37
11'600;037
1~~071
04i"
Sial
71
x
3200
1.52 P
if
200
?O?
P
43
(HllJll
0 P
5.iQ20022
13G17?4?
SHlOfli5
lt P
1300DO
60[}(J(J
6000
100
U
32.0CHH
420:)0,71.2
P
i+3
U U P
11
0
1;5D"{
itl
5107
71'
131)1
If7
51G;J.DUl;·6
,32000152
42UOO/15
4·,) 0 0 0
716
S,302Dll3l
L:SU7I'l/,12
1770i.1037
510000511
32000152
I.t200U7:21
,+30U0722
5302U0:17
1.2017165
17600017
S3SUUDUU
2010
1
0170
P
It
000016
I)
P
'5J020037
13017731
11'700177
51000065
X
32U00152
P
4.2DDU73U P
L~30U0731
P
1437llT7
;<
p
p
D
X
P
P
P
i
DJlb
2'
c;,
~3,
lJ
U
,(]
163
t
0163
2
0
'1
l,
.L6~
1
0
[J
164
2
00166
a
00166
1
PAGE
85
8ll
(\7
89
gO
':l1
':31+001
92
93
94
95
Yb
'37
rj
9
J +1HI1
(3
002
9
+!J03
y U
Ol~
HI
r;
101
Iel:'::'
iin
1 u
,t~
105
:U.Jb
107
1H6
109
:L
B
1.1..1
11,,1-i'OD1
ili-HJ02
1i.1t-G03
1.1:1.+004
1:1.-1+005
j,1i+·nOb
j
6
7
,
;J
',,<,~
9
J
ti.lt
0
.i
l.U,+D2;;;
1
t+O;Z3
:1
+024
l'H}
2:.5
:L:l+[l;2:6
111+iJc~7
111+02[\
111+029
111+0.30
111+(LH
111+032
111+U33
tli+J34
lL1+035
111+(136
111+U37
111+038
111+039
111+040
111+041
111+U
L
t2
lil+U·lt~)
111+01+l~
111+·0£1-5
111+
U46
6 IFSTArH
••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
'.~
.
PDPa~sup
PDF'S
..
srR
ss
vc
THIS
SECTION
STORES
TE
POPS
CONNECT
CODE
INTO
THE
DRIVER
liJP
ENI
lDt\
SSi~
SIA
INI
LOA
,s
sr~CH
SQCH
HIt\
SHA
ANA
TAl
LOA
STA
H'jL\
SHAQ
t\NQ
OVA
AOAQ
SACH
SQGH
ENI
H1PUF~E
IFGON
IFCCNX
12
X3
OfHJU7B,X3
6
D
X
.r
NT
I
IL,)(3
iJ
t"i
IMPURE
Xl
f~BLK,Xl
r19
ABU"
Xi
!X1
PSIIB
,Xi
BITi
PSAB
378
Jtt!
-2
3
U
A
II
DO
OD+1
378
'-5-5
178
Xi
l'lONTHS,X1
i'lO
378
-2
l
+-5-5-4
17713
010
ASCII
Yf
YY+1
TERNINAl,X3
SAVE
THE
CONNECT
CODE
IN
THE
DRIV
INTO
STARTUP
ROUTINE
FORM
ADDRESS
INTO
INST
FOR
INTERRUPT
DECODING
GET
THE
HIGH
TTY
NUMBER
BACK
UP
BY
ONE
FOR
OfFSET
UP
TO
THE
TOP
9 BITS
SET
INTO
PSEUDO
PSA
.ENTRY
EXIT
DEVICE
1
IS
NOTA
TTY
GET
0,£\
TE
,J?;SK
TO
OWN
TO
AKE
IT
AKE.tl.S
NTO
STER
1G11S
NTO
IlI1E
o
f\!
l~
I DIGITS
DIGIT 1
DIGIT
2:
GITS
1
S
?iN
KE
CK
11
1<
f1
At<
SEC
SEC
GET
DAY
OF
MONTH
t-IASKTO
5
BITS
i"lAJ<E
IT
DIGITS
:2
MAKE
ASCII DIGITS
DAY
DIGIT i
DAY
DIGIT 2
DATE
AGAIN
GET
MONTH
POSITION
MASK
TO
4 BITS
FOR
INDEXING
TABLE
OF
MONTHS
GET
PROPER
IDENT
FOR
MONTH
SAVE
INTO
MESSAGE
LAST
TIME
DOWN
TO
Q
{'IASK
TO
7 BITS
MAKE
DIGITS
MAKE
ASCII DIGITS
YEAR
DIGIT 1
YEAR
DIGIT 2
OFFSET
FOR
PSA
POINTER
o
o
o
o
o
o
o
o
o
o
(')
o
o
o
o
o
o
o
o
C)
o
o
()
I:)
o
o
o
('
,.J
o
o
()
o
o
o
o
()
o
o
I
I
I
I
I
I
I
I
I
I
I
I
I
A S
~;t::
118
L E R J
()
S
oS
'Ii
1.
U
00107
1037777?
U01.10
1::,JOiJZU0
00111
i1
t60Q21:i
00112
007001i.t3
00113
l't60U212
0011'-1·
00700143
OfJ115 11
*177720
00116
22:tOO7
L
t3
:J0117
1S60D24U
00120
00700143
IJ0121
U21U0115
00122
146Ui.l215
00123
n07UOlli3
00121+
146U0212
00125
00700143
00126
' J
,"
7 7 7 7
~J
.l.'+ 0
I,
, ! V
lJJiZ?
1200001£i
U0130
156UUi14
00131
4UUl??71
UU132
2200lJ561
00133
775i.OOtlO
OU13L~
770UiH1GU
lHJi35
1'-dl
fJ
0
[j
U (j
00136
771Q1.600
00137
1Lj·ODOOOO
o [J1·40 UiUOOO20
OVZ1/
74
2217
p
P
P
p
0017U
3
P
P
p
P
\!
"
X
P 0111':;4
1.
P
111+0l~7
lil+U4d
111+01~9
111+050
111+051
111+D5r~
111+053
111+054
111+055
1
1+056
1 OS7
G58
+ 05':3
060
1+061
(j
..
2
Hl
3
G
i·HI&,
1+06
1+G6
7
IFST
Af-H
XOf
IN
ENA
H r J
ENA
RTJ
ENI
LACH
INA
RTJ
IJI
ENA
RTJ
ENA
RT
H
i+06!3
IFGONX
lHI69
p,
II
[l
Don
FlJ
777778,
X3
TERM,X;S
2150
CTa
2128
CTa
-NCHAr<S,X1
UPMES+NCHA!"<S,
Xi
240E
CTa
';<·-3,
Xi
2158·
eTa
2128
eTO
DUMPLA8L
12
2 ·
1r
6 2
(}
Pl~
8
I 0
+1
CT
,024/20
~h~~
!f
RELATIVE
TO
PSA
FAKERY
CAR
R I
AGE
RET U R
i~
OUTPUT
THE
CHARACTER
OUTPUT
THE
CHARACT.ER
NUMBER
OF
CHARACTER
IN
MESSAGE
GET A CHA1'!ACTER
MAKE
ASCII
OUTPUT
IT
LOOP
TIL
OUTPUT
.
CARRIAGE
RETURN
OUTPUT
THE
RETURN
LINE
FEED
NEI~
LINE
NOW
LAB
FOR
DUMP
INfO
UP
TOP
12
BITS
FLU
~WRn
COUNT
SAV
IN
popa
DRIVER
GET
CHANNEL
NUMBER
INTO
CHANNEL
INDEX
REGISTER
CONNECT
TO
POPS
IGNORE
JECTS
SELECT
TERRUPT
ENABLES
IGNORE
JEeTS
f~ESTORE
IT
AND
X3
TOO
GHA
ACTER
UTPUT
ROUTINE
SAV
THE
ARACTER
INTO
IfHNOLR
SPIV
POIN
R
SA'll
X3
TO
INITIATED
RET
AND
CHARACTER
FOR
TI
UNPACK
OS-3
UP
AT
HHJMMJSS
DD-HMH-YY
••
~
••••
~r,_.,
:1.
~
J
J~
6
'!I
\j;
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
o
CI)
I
ASS
E
.'i
i3
L
t::
IV
J:;;
;;i
Vl.J
Ug/21/!4
2217
()I
I
()
0
0
0
0
0
0
0
0
0
0
0
()
0
0
0
0
0
C)
0
002U6
l102LJl
OtL~:LO
00211
00212
00213
OdZ14
QO;~15
OJ216
UirZ1-r
U0220
O1l2;21
UU222
OU22~S
00221+
00225
00226
OU227
o iJZ j Q
DU231
002J2
OU233
liU234
002J5
00236
iJU237
OJ
2
it
0
00241
lJIJ242
Ij
02.
id
IJ02
1
+1
t
OlJ21.,5
ODZlto
00247
00250
00251
00252
00253
lJiJ2~i4
00255
00256
00237
00260
UiJ2Gi
U0262
00253
o
{]
20
it
002b5
Ot.lZGo
01]267
aDZ/Q
U1l211
o
d272
00273
OJ
2
7L~
00215
o
lJ
276
OU277
U03UO
00.5Ul
01]302
00::';03
00304
00305
00:)06
00307
00310
00311
OU612
OlOOOllOU
lId
lJ
a
[J
2.3
2Ujlll051.
P
0310021-3
P
027iJ021U
P
47300231
P
20JUiUSl
P
53600;]00
53H1000J
4UILJUUuCi
Ifj17l
rt'G
04ZGOiHli.l
liLteD
UU;U
1]270021[1
P
151fHlU
i
250UO~Hl
P
OU??????
X
250iHJ321
p
'+7100234
P
li
dUOOlHI
15100001
UU?OiJ22
lLj·1(H1UOD
11
d00023
203D1075
D611JiJ2 l
t2
02lQU236
p
p
P
3l"{"' I
J a
n2~
3000
[L.OOQZ5
F}
P
P
e
14
:~
iJ
l1
0 2
·3
2U5G1
21
O:,HOO
73
P
027U
67
P
1437
76
15300QUl
47300313
P
01Lll10311b P
20301121
P
5360000U
15600033
35ll
0 U
33!'t
P
05200UO~
2UOQJ::;~;3
p
15177778
ItdiUllOOO
02700276
P
25U00327
P
OD7fJ02b
1t X
25000331
P
471003:1.5
P
Pi\
GE
116
117
lid
12U
121
122
123
124
t2S
126
127
122-
12g
13U
131
1
2.
1 7
Lj
175
176
17'1
178
179
18:Q
181
182
133
1B4
185
laG
11}l
188
la9
19
IJ
191
192
193
IFSTART
••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
:;.
l/-.
PDPdO:::;
Qt~
02
"
1..:
...
cwu
(,lQ
ill
Q011
THIS SECTION
BUILDS
POPIQ, POPCO,
AND
popaa
UJP
ENl
LOA
AZJ,NE
IJD
STI
LOA
L Q
R
l Q
~,
t~
<:;.,
,,)
Y'
..
N
"
1<
.,
E
JP
LOA
TAL
INI.\
SSA
ISG
LDA
INI
STA
IJU
LOA\)
"
RTJ
LDAO
STI
IMPur~E
DUMQL-i,X3
DUMOQ,X3
>'<+2
'~'-2
t
X3
O·!.;,X3
MOQ,X3
UJP'
a
'1
.....
f~I1'2.
-l~:Xl
.x,
DUt'1C1L-J,X
DUNCO
t X
3:
>.<
+
~~
":'
-2,
X;)
-i,X3
1,;{3
QQ12,X3
QQ11
DUNCQ,X:S
X2
INfLOC
UJPOO
1,X2
UJPOX2
-i,X1
O,X1
QQ10,X3
BCOPDP8C
LINKIT
BCD8COL
>'<+3,Xl
BUILD
THE
10
QUEUES
IS
ANY
THING
THERE
SAVE
THE
QUEUE
LENGTH
LOAD
THE
QUEUE
POINTER
POINTER
TO
X2
BUILD
REAL
OUTPUT
QUEUE
FORM
FWA
:t.POF8.0(U
tPOP80QL:t
ENTER
LENGTH
OF
OUTPUT
QUEUE
RESTORE
lOW
MORY
ADDRESS
LeOK
FOR
I
UT
QUEUE
ENTRIES
SAVE
THE
QUEUE
LENGTH
U:;iW
THE
EN
SET
IN
A
SKIP
If
RE
SET
NOT
P
:;tPOP8I
t
CH,
FIN L
INS
Y
AN
I~D
T BIT
Ot
(~UE
T
HE
I]
SAVE
THE
QUEUE
LENGTH
LOAD
THE
CONTROL
BLOCK
CTION
SS
JUMP
IF
REALLY
AN
AODR~SS
OTHERWISE
IGNORE
THE
CCNROL
BYTE
tPDP8CQ;t
tPOF8CQLt
G)
()
o
o
o
(j
()
o
o
()
o
c)
o
o
o
o
(;
o
()
(l) I
[ASSEI'1t3LER/OSJ
Vl.8
U9/2i/74
2217
(j;
I
()
o
o
o
C)
o
o
o
()
o
o
o
()
00.)13
lJUJ14
o lJ..HS
00316
00:51
7
00;521
OIJ3Z3
OfJJ25
00;:;1-7
UO.331
00333
003..54
.141.0UOOI]
UUIIJ031G
><
14
11)
0
Ll
iJ
IJ
02S002UG
P
Lf'72
1
t411D
4724411U
472
L
.471U
4724
l
.710
472
LrLr
71d
L
t
724471U
01200000
OlOLlUOOO
PAGE
9
lq!:t
l:JS
196
1':17
1'08
19q
2UO
20l
21.12
203
204
20.5
206
207
20g
IFSTAI~T
QOle t:.NI
HTJ
lfvlPUi<E
Xi
INKIT'
ENI
If1PURE,
Xl
IJO
POP8QS,Xi
EXIT
BCiJPDP80
BCD
2,PDP80Q
t3CD80Ql
BCU
2,PDP80QL
aCOPDP81
BCD
2,PCP8IQ
BC03IOl
BCD
2,PDPdIQL
BCDPOP8C
BCD
2,PDP8CQ
3CD8CQL
dCD
2,POP8CQL
UJPOX2 UJP O,X2 o
UJPllU UJP
GOODO
o
o
o
o
()
o
()
o
o
C)
o
o
o
o
o 0
____
J __ . __ . ___
._.
__________ .
__
..
_______
._.
______
.
___
._.
__
. _____
..
__
. ____ .
__
. __________ , ____ . ___
._,
____ , ___________ ,
__________________________________________________________________
_
I
ASSEH8LEiVOS:S
Vl.J
03/21/742217
()I
I
C)I
I
°1
()
I
I
()
I
o
o
()
()
o
(J
o
o
o
o
o
o
o
o
o
o
00335
lJ
Ll
.3,3
r':'
U
iJ
.)
.
.:17
orBc.u
U0341
Ou3
L
I2
UO,3
L
!3
00.)44
00345
o
(J3
i
..
6
lJ0347
01.33':)0
OfJ3S1
1)03')2
ufJ3!jj
Oil:>:;4
llJ305
D U
~S5
6
OJ'}5?
f"JiJ363
00361
00362
i..lO:)63
OU.)OI
..
IJ
t.l
:~65
00360
UD367
0
IJ
37
0
IJ
U
:3
71
0 0 "
13
J
:J
0 3
7l~
54100352
01Ui..lUOUJ
40000702
ItI'10U352
14177777
14600iJ15
14l000t7
130UU(J17
Ub27777?
UI000·~n~:;
20100345
17L~7l7l6
'+U10U347
li
tiUQOUJ
24077
II
JIDGJ
S
4UOiHl
S
2UOOO
U
00700'143
101UU001
li+60U07'6
'tlll00iJ06
2500U371
O1l7U0314i
200002'50
~)td,01JiJt;;::
U250U336
47
63
?'
1+
7 6·J 4
"72:
i.
01
(]
i.l
!J
G
(l U
Q
1
lJ
(J
[J
'/
''''~
-;
3
P
P
P
)(
X
P
X
X
X
P
P
P
P
P
X
X
P
D
I
Pi\
GL
21lJ
211
21,3
21
l
215
217
210
"'1
U
(,.
.....
22
U
",
",)
c~
1
2?;,J
,-
'-
2;:~
3
224
?
?&'
_~2
22iJ
22'7
,..
..
.,
~
~L.\J
22g
23
0
231
2,52
""J
J:.
'..J
')'Z
"",,,",,,
10
G 1
0
,""
,~"
3
IF
STAj~T
PTPEXIT
LOI
PTP
..
SUP
UJP
SlA
STI
ENI
ENA
ENO
SHP~Q
,'IEQ
!j,JP
LOA
j~NA"S
S T
/J,
PIPXl
ENI
p
P
"'r~
l
\i"1
,~
,}
LeA
L.P
;,
0
0
p
,}f
J
PTPX1,X1
IMPURE
TEMP
PTPXb
Xi
HOLENGTH
...
Xl
HTPTP
MAS
IT
L
IT
DP
P
1'1
l<EUTLP
.1"Xl+CBI
1'~
"')
0;:"
LNIM,X1.+CBI
BGDPTPB
LINi<:IT
BIT 3
EN!
,Xl
.6.1
PTP
..
SUP,
1+C8I
~
FiT
.l..
,
2 ,
PT
E{L
DC
r
",",
p-
RESTORE
Xi
SAVE
FOR
LATER
SAVE
Xi
ENTER
LENGTH
OF
THE
TABLE
LOOK
FOR
THIS
DEVICE
ALLOW
U
RS
TO
EQUIP
THE
DEVICE
CLEAR
T
NOT
PRESENT
BIT
RESTORE
Xi
SAY
FORMS
fOR
THIS
DEVICE
MAX
REC
SIZE
FOR
THE
PUNCH
IS
62
WORD
;;tPTP8LOG:t
O£VIC
o
BY
E.EOSTG
E
CPERAT
o
o
o
C)
o
o
o
o
o
C>
o
o
o
o
o
o
o
o
I
A""
I "L
.-
/ 0
c.
,
I
~.J-i"tJ;:',
2)j
Vl.J
U9/21/74
2217
()
I
I
01
()
o
o
o
()
I
I
0 I
I
I
C)
I
I
0 I
I
0 I
I
,--..
~)
I
I
0 I
I
I
0 I
0 I
I
0 I
I
0 I
I
0
0
0
0
urn??
00376
U0317
Ij[J400
00401
[J
0
It
02
ilJ4U3
00'+04
004US
OJ
it
i.J
G
00407
00410
00411
UOLf12
J
(lLd
3
00
1
+14
JU415
00416
00417
n0420
0042.1
00422
00423
00424
00425
Od 1
t2G
(J
l!
4,::1
U04JO
UU431
U!J
1
d2
dUlt.n
J0434
0:]435
iJ
0
Ld
G
00437
004'+0
uo
1
OJ4 2
00'+'43
00444
OJ I+!..
004
i
+6
00447
004'30
llOI+Sl
UiOuOOUU
1+0000702
P
IJU7UUll.j·2
P
15100001
14700000
U0777777
i.
1467777;'
;{
44100026
1420GIJUl
2ll20.id3b
P
401'17776
lS177?7b
O~6QUi.+i}6.
P
14571'777
X
441COUiJb
S.HQUOOG
L~O
10
lHllll
2UOU(I
02
P
37ulHJ531
P
1500UU;>0
S3100UUU
lj
;;;
i.J
tdl
(l
1:Jt7lJ';t~,
4010UO
1
lLj6000
2
31
+v
U
Ql.62
,?
542)il
[r')
01
ZG
PA
GE
251.
252
253
25
ij-
255
257
258
2SQ
260
261
2,02
263
,:64
11
IFSTART
.*
••••
v
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
;~
~
HSI.SUP
T
ur
tIS
IE
IT
SIFOli\~D
THE
FOLLOWING
START
UP
ROUTINE
SETS
UP
THE
LUNLIST~
CONTROL
BLOCK,
~ND
CR
MACRO
FOR
EACH
HSI
DEVICE
SPECIfIED.
ALL
NECESSARY
POINTERS
ARE
PLUGGED.
UJP
S T
j~
RTJ
INI
ENQ
TJ
A
H1PUf<E
TEMP
CR8UILO
1,X1
o
BUr
Q
Ul!lB 0
UEV
YPE,X1
Fe8
-1.,X2
Fee, 2
_1.
X
-1.,;
X
;~-
3,
~\tl;\
XU
T
E
p~x
)i;
G
E:H.OGK"I-FCBL'J
Xl
T P
9
i
t,~
S
l<
2 9
H
IPUT
p
A.
G
J'
AVE
CONTROL
INFORMATION
IlD
A
CR
MACRO
VANCE
FOR
BUILDCRQ
Y
NOT
REAL
CARD
READER
LO
INPUT
QUEUE
PER
BL
eKING
ROUTINE
T
PROPE
BLOCKING
ROUTINE
VE
A
CO
TROL
BLOCK
T A
~WR
UT
HHO
OWN
AWO
OOP
TIL
AX
DESTI
NTO
co~n
GINTER
UT
IT
:~HJ~Y
ON
NON
MACRO
PNTR
BLOCK
£T
CONTROL
INFO
XTRACT
TERMINAL
NUMBE
A E IN Q
DRESS
OF
TOGETH'E
RET
THI
H
BLOCK
H LUNL I
S1
WORD
LUNLISJ ElEHEN
WORD
y.
MENT'
OR
END
L
Uj\~
I T
IOi'~
LlH~Lr;3T
o
LUNLIST
ELEHEUT
T
THIS
TO
LAST
ONE.
t~
TO
THIS
ONE
G
NTRY
THE
,\l
S
TOGETH
Xl
LUN
o
SET
PROPER
ORDER
t~ND
PUT
AWAY
o
o
o
o
o
o
o
o
o
o
o
o
o
()
o
o
CD
(J;
I
ASSEi'lllLER/OSJ
I
()I
I
01
Vl.U
U9/21/74
2217
()
o
o
o
o
()
o
()
o
o
o
o
o
o
o
o
o
o
I] 0 it
61
00
Itb
2
00
[H?.3
o U
4oy·
o
tJ
1
tS5
U
llL,66
UtJ4G'7
UU'-l-70
OU471
(JOLf72
U U
It
7 J
OU,+71~
0047!5
o Oi+16
00Lt7"1
Ll0500
00:)01
LliJ5U2
UUS03
005
Of.
00505
(l05U6
00507
UD5iO
(JOSli
U0512
OOi::i1::J
00514·
(JUS1S
U0516
00517
U!152
[]
00521
00522
UU::.i2J
U0525
Ll0527
DOS
31
00532
005:':;3
005::54
00"161 P
14200000
146UOUUU
1b477777
53~ltUllUO
It7iiJU514
P
llOI-tGS P
21UU0531
P
2120U001
'J.20l1776
I.tU1UOOOD
532000GU
4lf 1 n
00
[J
0
10bU0025
401011iJOl
lit
7
IJ
0
(J
0 G
24000531P
37200QUl
::;1;)00U532
j-J
LdJ
2 0
lJ
1]
0 i
202UOLl02
41200IJU2
53GJOJOU
15100!H12
Ll42:0[JUUO
01000466
P
SltlOfJl-d:i2
P
2SUO(]52?
e
UD7lJU364 X
lld.GOnGU
2SUOU523 P
U 0
70
0
51.:3
1510
{HI U 1
2S
00052:;
P
llLl?iJ0516
(J2~OUi.152
p
J062Si63
J06Z::JI
L
.3
JD62'316.3
3750UOOO
00400000
01.000000
OiOOUS33 P
f'>.l\
GE
;513
3ll~
::lEi
316
317
318
319
320
321
:j66
""il'
El
9
12
IFSTART
~
••••••••
9
••
9
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
.::..
;;.
HSIALLOC
HSIPTR
HSIC(JUNT
HSISLOOP
HSIT,£\!:)P
l-lSI.STR
fHE
FCLLGWING
ROUTINE
WILL
SET
UP
tHSITABt,
THE
TABLE
USED
FOR
FINDING
WHEN
A
TERMINAL
IS
A HSI
USER
A~D
HOW
TO
CHARGE,
WHEN
TO
RESET
ACCOUNTING
I
j\1
F G
.,
ETC 4
IT
IS
GUILT
UF
FROM
tENOPOINTt
IN
CONTIGUOUS
GROUPS
OF
TWO
WORDS
(
TWO
FOR
EACH
HSI
DEVICE
)~
EQU
ENI
ENA
XOA,S
I
tJ.
f
SI1
EQU
LOG
LOL
SHA
STA
11/4
S
~,!
A
INt\
STA
END
LeA
LP,/.\
SSA
STA
LOA
sra
r
A,I
I
I
U
lor
LU
A(~
FHJ
E~\~
I
ij,qQ
J
";:-
J.
A
,J
D
VFO
1,;::-0
.
\1';
U
UJP
lJJP
H1PURE
,X2
H1PURE
-0
Xl
tiSITIl,gp,X1
~'!.
TER~ASK
1,X2
-1
Q,
Xi
;(
2
01X1
2+FC8L+PSALOC
l.,Xl
o
TERI'I:ASK
1,X2
CRT'fPE
1,)<2
2.,·
X2
2,)(2
X2
2,Xl
U,X2
HSI
HSI
t3HS
LIN
INP
a s
rAB
IN
I<II
Xi
SIt
NKI
HSIEX
2"H£11
t:'rHSIL
2,HSIT
o
0,
0.
7 1
177
, 0 1
J\
IHTGR,015/0B
IiWURE
HSI"STR
o
[J
POINTER
TO
LAST
HSl
BLOCK
GET
COUNT
UF
HSI
DEVICES
NEGATE
IT
SUBTRACT
FROM
INDEX
SAIJE
FOR
LINKING
GE
T
~1ASK
GET
THIS
TERMINAL
NUMBER
MAKE
TERMINAL
IN
UPPER
9 BITS
AND
PUT
INTO
THIS
ENTRY
ADDRESS
TO
LUNlIST
ELEMENT
PUT INTO
TABLE
ENTRY
ADVANCE
TO
PSA
LOCATION
POINTER
SET
PSA
POINTER
TO
TABLE
TO
RESET
POINTER
MASl<
THROW
AWAY
TERMINAL
NUMBER
AND
MAKE
IT A
CARD
READER
PUT
BACK
INTO
CORE
GET
POINTER
TO
NEXT
BLeCK
RESET
THIS
BLOCl<
AND
CHAIN
TO
IT
NEXT
ENTRY
SKIP
IF
EN
OF
LOOP
LOOP
TIL
0
NE
F LINKI SIZE
OF
TABLE
L
GTH
OF
ABLE
SYMBOL
l K
UP
TH
SYMBOL
G lINl<IN
POINTER
!~
E
TABLE
A L K IT
UP
TOO
P L POINTER
SYMBOL
N E
ENTRY
,q
L
rr
roo
R
NO
DECRIMENT
TWIG
NAME
PSA.
LEN
T
LiE
i>~T
OF
ABLE
A
CARD
READER
ENTRY
RETURN
THOUT
DOING
A
THIN~
Ct
o
C)
()
()
o
()
o
o
()
o
o
()
o
o
o
o
o
o
o
.-.----------------
........
-----.-.-,---,---~--------,'-.,---'--,-.-,---,_._--------'.-----._-----,--,-'"-----,_._-----"---,-,--~---.-.-,-,-.----~-.-.
(t,
i
I
ASSEdt:lLErUUS::l
\fL"
U 0':3/
21/li~
2217
P!~GE
13
()
0
()
()
0
0
()
rj
'"-,,
()
0
"-\
('--"
t')
L,
a
0
C)
0
(~)
'
......
o
I
!J
OS
,35
Oll566
00537
DO'540
005!41
00542
00543
U!J5 1
t4
iJ
05
if5
i]
05
1
+6
JJij;'}?
00550
GO'.)51
U0552
iJ0553
Ou5':i4
Ql15S5
QU51;"i6
UU5 l
j7
UlJ56Q
iJ0561
00562
II
0563
a
OS6l~
372
00'535
P
20U77717
x
35.3l.J[J(L5U X
itO
30
05~%
X
200LJlLS53
X
l·flJ301.J52
P
IHOOOOOO
1760UU71
53l00LlJU
05s00UL1
X
uJ.OiJ05;::~:-j
i)
DUUOO5 l
tl
P
:] o
(J
fHHJ
Jl0()OS5!J
P
(I
L, U
Ii
Q 0
'j
6
C)
,
t~)
IFSTART
l'
HIS
SEC T I
Oi\1
SETS THE
BIT
IN
P S A 8 L K
THAT
SAYS THAT
A
TERMINAL
HAS
BLOCKED
OUTPUT
TEK02
EQU
LDA
SSA
STA
LOA
STA
[EK.SUP
UJP
tU~A
TAl
SG
HLT
TEK
.•
SIR
UJP
UJP
31T2U
PSABLK,X3
PSA!3LK,X3
81122
o U
t~
0
Q+
1 , X 3
I
PURE
l B
I
PU
T
..
S R
SET
THE
BLOCKED
OUTPUT
BIT
REMEMBER
TO
EXPAND
THE
OUTFUT
Q
HUX
CHANNEL
TO
X3
SKIP
IF
OUT
OF
RANGE
H~
F
LOWING
SECT
N S r
HIGH
SEED
TTY
BIT
INTO
HE
G
RESPONDING
ABLK
NTR
*
~~
a "
,.4
P B
p.
0
I U
?
;);(
T r
,
H
,~
.J
:'t::.
srT
:31"
p
,
P
.J
LIMIT BIT
ON
TTY
CHARS
INP
INTO
THE
.ENTRY
STORE
IT
TO
THE
PSABLK
P'OINT
TO
TER
UH
T
IN
lING
PSABL
o a
D IT
N
E,
STUPID.,
.....
POINT
TURN
WITHOUT
DOING
A
THING
o
o
o
o
o
o
o
o
o
()
o
o
o
o
o
o
o
o
o
CL
I
I ASSEi18LEFU0SJ
Vi.l]
01/21/74
2217
C]I
I
c)
I
I
()
I
01
()
()
o
()
C)
C)
o
o
(J
o
o
o
o
o
o
o
o
JOSti!:>
811566
UU5G7
00570
:)05/1
JOS12
00573
J U '37
if
JuS!5
00576
tJIJ0l7
00600
QIJ601
UQ6U2
0061J3
ULl604
\J
LJ
60':>
00606
:)U6LJ7
llD610
DU611
OU612
U U61:1
0061Lt
UU615
00616
OU617
00620
U[J621
00622
00623
U0624
00625
00626
Q
:)627
D0630
o
lHdl
006::12
1H633
00
b
31.
006;55
UJbSS
00637
01llUOOOO
007UOiJUO
17,)00077
ltUOOU7U~
P
2UO(]Oll27
~<
J::i31Jlb54
X
40,)I)OS72
;<
2UOOQ5
1
tli
X
J5iJOOl15
jJ
1.+0000715 P
llfuOOJOl
sUU00701
P
1+
U 0
[J
0
701
P
OU70U643 P
11;2UO:)02
531QuQQU
iSbiJUOOl
J~lJlliJDL~O
e
U0777777
A
lS200001
47,~OOb03
P
ZuOU0102
P
1~07ll71
1760uOJ1
1l:.>604UGLl
441IJUiJ33
OU700742
P
lS1UUOiJi
14600001
341DiJG25
1[t07n71
A
4410U(J26
2UnOU6iJ3
IJ
1760007"1
lSLtn'(7~j
12111l7?6
4'+180023
21lJUU7f.!2 P
12477752
1770(JDUf
uD7t:10402 X
1517??7'b
ll10t.JO~j6rj
p
OJGI.;O
U{J50000U
J U 5
'+
:l 0
"ill
U 0 Q U tl
00642
010QOb4i
P
fJf\
GE
14
417
Ido
I·Ll 9
42;]
421
422
Lf23
423+UU1
lf23+0fJ2
1..23+00.3
1+24
425
426
427
I
...
28
9
J
tf31
432
4,3::)
434
lj
3~;;
436
!{
;$l
tft~1;
a
~;~.3
9
4L
i U
1
2
43
Lt
44
Lft~S
,~
1+:,)
i- D 0
1-
4ii~~+(J02
L{·!~5+!1G3
ft·
tU!J4-
+ U
fb
IFST/~kT
ur.suP
UHwt~8
UJP
TAl
/.\
I'll
STA
LOA
SSA
STA
LUA
SSA
STA
ENA
ADA
SIA
RTJ
ENI
'IIA
I
N.1\
SSJ~
I;::
r J
INI
STI
LOA
SMA
?iNA
INA
Sv;A
RTJ
INl
ENA
i-H\D
H~A
S~~A
LDt\
i~NA
HHhS
S
f\
S,
A
LPT.ABXX
VFD
T.::;T
U~,
UJP
H1PURE
XS
778
t
X3
TEMP
SlT13
PSA8LK,X3
PSABll<,X3
8IT22
U.T
IF
MA
C+ENI
T
Ul"lPMAC+ENIT
i
BCOUT
BCaUT
i'1t\KEUTLP
2+IMPUR£,X2
Xl
..
.1..
LPTABXX
8tOlPTAB
1,X2
UTNUNB,X2
TEMP
-6
.3
7'!J
!t
(UHI
CuNT
L+1,X:1.+CBI
G
BU
fJ
1,
)<:1.
~
_I-
C~O~1
W
UHBL
DEVT'I
UTNUMB
1~l8
,X1+CBI
B
,Xi
--1
DESTLP,Xi+C81
T'EMP
-21
U L
RG
-l~X
UT
..
S
A9/U1LPREC,015JOODOD
POP8
CHANNEL
NUMBER
TO
X3
SAVE
FOR
LATER
TELL
THE
WORLD
THE
DEVICE
IS
NOT
A
TELETYPE
NO
FORMS
FOR
THIS
DEVICE
GOUNT
UP
THE
UT
NUMBER
MAKE
THE
LiNE PRINTER
BLOCK
UT
LPtS
START
AT
2
BLeCK
ADDRESS
TO
A
SET
IN
WHICH
ACCOUNTING
WORO
BUILD
THE
LINE PRINT
TABLE
INCREMENT
THE
COUNTER
EXTRACT
THE
CONTROL
BYTE
S.tWE
WE
HAV
BUILD
R
INFORMING
THE
POPB
THAT
D.ATA
FOR
IT
HE
CARD
READER
BLOCK
SET
THE
PROPER
BLOCKING
ROUTINE
T
ENTRY
IN LPTA8
USED
ENl'RY
-
NOT
TWO
-
WORDS
MACRO
TABLE
TIMES
TO
MULTI
PRO
BUILD
THE
INPUT
Q
()
c~
()
()
o
o
C)
o
o
o
o
o
o
o
o
o
o
o
o
------
--
---------------~-.--.-.-------.-----.--.---.--,--.---.,-----.~--~--.--,-----.-----.-.-,--.-
..
--.-.-,-,----,-'--'-----'""""
-~---.-------"-
..
CI:
I
I
I
t\SSLldlE:UC;:.:>3
\/Lt!
W3/21.ll1+
2217
fJAGE
()
I o U
bit
3 010UOUUU
4GU
U
IJ
b
l~
It
i+
U U 0
U?
2
I!.
P
461
I
UIJ64S
lLI2IJUil3b
4(:)2
OOo:tb
2U2UO-;0,.)
p LI63
()
I
000'.7
it
U
100
U 0
lJ
1+61+
uLlf..l?O
1S
17
7l7l)
4(
1
)
I QU6S1
02
G U
[J
64;.'.1
p
4[)')
DUb~)2
1S1U[JUOl
L~o
7
()
I
468
UiJuS~)
1j3iiJUIJUO
46g
I U i) b 5 4 441[]OO10 4711
(JUGSS
4410002iJ
471
0 I
UU6S6
[141uUU3:)
47'2
I
I UU6:i7
54300702
P
473
OIJ6GO
173iJOU7
471.j
I
UlJobl
4lLHJi121
I.)
lt~.
75
()
00662
<::UUl]OlO2
p
476
I
006b3
It:.'jj'7751
£;,,7
7
(]
06(:;1+
il,SOIlU37
-4
c~
d
I I) ]1;)·55
53700000
i+
7'
':J
0
OOGGb
53180UUO
4tHl
I o
(lSi;)
7 SSOGU365
.x
ill:} i
UiJS7il
I+U301051
P
ita
,:
I (JOS7i
1560000l
45
~3,
0
OU672
441UOnO?
i+;3,4
I
0067':;
154U0021
(:~d5
00614
{t411JOD3t
b
00675
44100023
(
0 I
U0676
00771777
X
00677
15i77776
00700
UI00064:)
p
0
007U1
04630
Gli
GJ7J2
UUUOO(!(JJ]
01
o
o
o
()
o
o
o
o
o
o
o
15
IFSTART
l'IAi(EUTLP
UJP
SIA
t:.NI
LOA
.:)T
A
INI
IJO
11'·\
I
iIA
S
~I
A
Syi A
S~<J
A
lfJi
ANI
STA
LUA
SHA
,4Ni\
fAI
T'
II
->-i-'.
~
(~
~
.J;.J
r'1
S1i'A
I
j'rr~
J~
S?LE;
INAJS
~;
r,:
j~
S~lA
RTJ
HH
UJP
acour w
rEi"ip
\fF D
IHPU1<E
UTLPMAC+IDENT
U T L P
11
A C
l'-l
, X 2
UTLPNAC,X2
I),
Xl
:l,Xl~
-.--
3,
X.:::
1,Xl
Xl
ENAu,Xl
U;:'~BEXITA,Xl
INTlOC,X1
TEMP,X3
778,X3
DUMCQ,X3
TEi'lP
-6-5-5
L )(1
L
+NXPTR
I
T ,
LO
-t,X1
l'1AI<EUTLP
MOVE
THE
MACRO
INTO
FREE
STORAGE
PLUG
THE
ENI
INSTRUCTIONS
LOAD
THE
POPS
MUX
NUMBER
REMEMBER
TO
EXPAND
THE
CONTROL
Q
GET
THE
OUTPUT
QUEUE
LABEL
MACRO
ADDRESS
BACK
TO
A
REMEMBER
HHE~E
THE
MACRO
IS
SET
UP
THE
EING
WORDS
BUILD
MOVEBUFF
Q
INFORMATION
()
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
()
()
o
o
CD
I
, ' I
I
ASSEHJLCR/USJ
Vl.U
0'3/21/74
2217
Pt-\GE
I 1J070-':';
fJ
f~
g 6
UU703
P
It
<;)
7
01]"703
OOOOOUOU
49i:l
OU7D4
D
4]9
I
C) UD7UL}
UOOUOUIJO
SUU
D07US
P
5Ul
DOlUS
OUiJiJOOOO
502
007d6
P
503
()
UU1Ub
QOOQUODO
504
','
U0707 P
50S
506
OU707
OU0777Tl
507
0
U07UJ
P
SOB
00110
0000001]0
5iJ9
00711
P
5tU
LJUll1
IJU,JOOU4~
511
0
00712
P
512
OU712 47UOU712 P ro, 4 ,
:)'..l., ,.I
OlJl1J
P
5lL~
00713
14100703
F
5i5
'J
0071
l
U100000U
516
\
..
00715
P
51
't
IJO"715
(jOOOOOO[J
5Hl
DOll?'
P
~:,lS
0 OU717
OQOOllUllD
52fJ
QOl2U P
r-
'>-"'!I
J
.':J
.'.#
~
-"''''
"*'
00720
OQUOOOOO
522
00721
P
0
00721
OUOOOOOO
JUl22
P
00722
64630000
6
OUl23
P 7
()
UQ723
14100(Q3
P tj
UU72
L
l-
P 9
Ll
07
21
t iJ1UOlJODO "
:;
001'25
I;J
4
""
0 i
,2
tJ
J 7
c5
0107'77?l
'/
:3
"
U0125
P
~,<~
,3
~~·t
I
UIJ726
UiJO[][jiJOQ :535
C)
I
OU7'27 P
S~
,1,6,
OU727
DiG?????
0 I
[l
0
nll1
p
I D U7.:)0
Ui017?
'J
'''l
iI,
I tH.I?3 p
I
0 I
OU7,s1
QOOI??
007
?
I'
00732
DU400(1
OfH
P
d0733
QuQ(JOO
0 I (JOY3 tt P
iJ0134
iJQaUUO~HJ
I
(JUl,35
00735
OOOOOOOU
~~
~j
.i
0 I
00136
(~
:1'52:
r-dl
J0736
141
U 0 7 rn P
~3::3
~:).
is;
'::i
'I
00737
Ul077771
X
'7
:),
0
007[.0
}J
'7
b
00/40
OOllOUOOQ
""
?
fJ[j
i'
l;.1
P
5S
IJ07
L
.1
177l71'76
S59
0
LlUU37
560
561
562
563
()
00742
:J1000000
564
00743
14200020
565
007
ff4
20201001
P
566
Jj
U
li.5
i-tUlijOJijQ
567
0
007
1
t6
15171776
568
iJIJ747
0260074
L
I P
569
Ofl750
53100UOO
570
00751
15600001
571
0
00752
441UOO07
572
Q G 75·3
441(jfjU15
5"13
oor~)I.
13000030
574
0
16
IFSTART
UTLPr·1AC
EGU
Oi~GR
VFO
ORGR
\1
F U
ORGR
VFO
GRGR
VFD
ORGR
EX
VF
OR
VF
Ok
UTLPiH\CL
CRBUILO
UJP
ENI
L
[JA
STA
INI
IJO
rIA
INA
SltiA
Sy.jA
SHAQ
",'
UTLPMAC+FB
A 2
4/
I i'i
PURE
UTLPMAC+BLF
A
24
{IMPURE
UTlFMAC+8FBGN
AZ4/IMPURE
U
TL
Pi"lAC+BFCPP
A24/INPURE
UTLPi~AC+CAlBAK
UTLPCB
.
CALL
BACK
AODRESS
09JOOO,A15/UTlPCB
UTL
Pi'1AC+II"IAD
OC)
/
U,
At!)II
~lPURE
UTLPMAC+lNIM
1:1.24/34
UfLPMAC+KILlFLAG
~,a
UTLFMllC+ENA
0
UTlPMAC,X1+CBI
IMPURE
UTLFHAC+
o
aoo,A
U
Pt'1,AG
A IINP
U
P!"'lAC
I
if / Im';)
LPMJ~C+
ltWRlJ
IIMPU
,03/G,A15/IMPURE
lPfvlAG+ DENT
8/UTfi,
6/IMPURE
LP
C+Ui:::,l3EXI
T
J-l
lP
G,Xi+CBI
LP
C+UR8EXIT
+QINGlOC
IH1PIJ
H1PURE
TADD
A15/IMPURE
R
-1
fWD
LP
FOR;
PiW
SSING
UPTS
UWMAXA-l,X2
MOVE.
THE
MACRO
INTO
FREE
STORAGE
CRPHOTO,
X2
O,X1
-i,X1
:;'-3,
X2
Xl
BLOCK
ADDRESS
TO
A
1
RDIST+1,X1+CBI
PLUG
THE
ENI BLOCK,CBI
EXITAOD+l-1,Xl+CBI INSTRUCTIONS
24
()
o
o
()
C)
o
o
o
o
o
o
o
o
o
o
o
o
o
a)
I A SSE
,"1~3
LERI
0 S j
V1.lJ
(F3/21/7
L
t
2217
()
Dfl755
2DOQiFU;2
P
UO/Sa
1e::
U
T77b:l
[]
U7:;;7
1760003/
iJU70U
5:':;7iJOUUJ
()
UO/::".I1
!+1.501U7:)
P
QUlb2
200U0702
P
llGlb3
12U177l1
OU/04
116tJUfJ37
0
G070S
l:iG0400Li
UUlb6
4UluUU26
00767
010U07112
P
0
00710
01000008
\l0771
4!?JOI0DS p
00712
142
iHltHI?
()
00713
2J2ui[J3'j
P
U
UT14
1,0100000
IJ011'y
151777;;'6
l1017G
U2GIJU773
P
0 OU777
1'5100001
UIUUO
331000[Hl
:JliJJl
4i]l1JOOlu
0
lJIIJD2
25001000
t:;
J i
fJ
iJ:3
00700521
v
,',
fllU
04
UI00ul?1l
p
0
at
U 0 5 ODUOOOOIJ
01007
P
(l1
CJ
O? P
0 J 1
ij
Lll
OtH1DQULlJ
ll101G
p
III
U
1.
a
ll?17!'1'(
OiLl.'Ll
!:J
0
OlGl1
OUllOUfHlCi
D 1U i F
01tJ14
Gull;
"I'
','1
1"-,
o
10
.1:-:;
14111tUO p
0 o 1U
16
011100!](J
o
liLt
F'
I
01017
OOUUOUUll
at
C)
01U20
Oll
no
p
01.021
P
()
01022
r=\
tll023
p
0
01024
010
tJl020
I~
CJ
c_
iU26
P
01026
UUUtlOQ[JO
0 OlU3D P
01030
OOlJDOOOfl
Ul
7.1;
..
,j,.l.,.
010:)1
iJOltOOtlOfJ
0
0111~~3
P
01033
400110DOO
o il1:1
<I
p
il1034
UlJJlJu[JOU
0
OlllJ5
P
t11.D35
OitlUUUtlO
01U32
P
01032
1+0000000
0
01035
P
00027
()
U1d36
P
010;)6
P
U1036
(JOOlJUUOO
01iJ3l
p
I~
0
01037
00000000
U10
ll-0 P
01.040
OUDUDDOU
0
575
Slb
517
578
57)
580
SUi
51..12
563
S
£lit
SidS
5>
tIc
SB
7
5<38
5ag
.;..:.
'-'
~
U
o
:1
b!J
Z:
fJ
U 3
>5
[}I-l
b~n'
3
6 S
(l
6
0+001
6'.
D+
U 0 2
b41
642
643
641.,
b45
fAb
Oit 7
648
649
650
651
IFSTMn
s~~
AI'lA
TAL
STU
LOA
SH.~
AtH\
INA
S T i\
UJP
BUILDFC8 UJP
SlAG
EN!
LOA
STA
r T
D
1
VFO
()
ifFD
ORG:~
CRP;'(O T
OL
EQU
FC8
EUU
ORG1~
VfJ
O~:G!:':
VFO
ORGR
VFD
TEt1P
-6-5
37U
X3
UU~lIQ,
X3
TEMP
-6
378
4iJ008
COl'HIORO+
1,
X
l+CBI
CRBUILO
H!PURE
TEr1PB
FGBL'-1,X2
FC8,X2
0,1<1
,-1.,
Xl
-'I'-3,X2
l.,Xl
;U
CON
i<+FCBL,X1
rEfiP
LINK
BUre
,A24/IM
K
IINPURE
D
PU
GET
THE
INPUT
GLOCK
LABEL
GET
THE
CONTROL
B~rE
INFORMATION
SAVE
AU
ALSO
GENERATE
A FILE
CONTROL
BLOCK
lE
C
RO
OCK
ADDRESS
TO
A
T
TH
POI
EXIT
A3/4
tA1S/IMPURE
O+EXP
A
i..,
OS+IMP
CRPfHHO+COM
G12/IJ,Al2:/1
CRPROTO+DEV
Ii1PUr';;E
CRPROTO+OESTLP
DESTINATION
LINE
PRINTER
POINTER
A1/1,A8/0,A15/IMPURE
CRPROTOtUHMAXA
FILL
OUT
THE
BLOCK
>:--CRPROTO
FC8+ACCi~ORD
A24!
It~PUf~E
FC8+LP
.1:\
24
I
IMP
U RE
FC8+COREP
JIZIt/IMPURE
G)
()
o
o
t)
V
o
(J
o
o
()
()
o
o
o
o
o
o
o
o
o
CD!
iASS£MULER/USJ
Vl.J
Q~/21/74
2217
n,
[JiU
iii
P
~,
1
01041
ouauuauu
UllJL~;':
p
1
01042
OUOOOOOO
(11
U1U4J
P
J 1
01043
-
77777170
01U44
P
()
1
01044
0440UOU1
1
01045
P
01
1
01
1
°1
1
01
o
()
()
()
o
o
o
o
o
o
o
o
o
U10it5 lHiUUOUOlJ
GOOlD
01075
U112:L
l~O
L
INt:S
DlGSl
P
IHTH
E RORS
PAGE
E~3
b54
655
SS6
657
550
65g
660
bu1
062
663
b64
[-;65
6b6
?
H
'3
D
1
18
IFSTART
O<GH
V~U
ORGf<
VFD
ORGI~
VFD
ORGf~
VFD
O~~GR
';ifD
fC3L
EQU
mmQL
EQU
00,3·
8.
0(;:
t:.
10
B
,'"
('Of
,.~
til
~,,"'i;
tj
t.
fC1HC8P
A24/lMPURE
FeStCPP
A24/11'1PURE
FC[HBlKR
A2
J
·tlH1PURE-i
FCfHEPP
05/D2,A4/HTCR,A15/00GDl
DESTRUCTIVE
READ
STILL
BEING
CREATED
FCG+TFL
A21~/
I!1PURE
;<..;FC13
AND
o
o
o
o
()
o
o
o
o
o
C)
o
o
o
o
o
o
I
Go
I
CI:
I
ASSE.·I:JLi:.R/U:':;.:.i
Vl.O
0':3/21/74
2211:1
PAGE
1 IFSTART
(J; I
ACC'/~OFW
(JOUUu
71
6/fO
1J1036P
a::
I /-\SCI I U 0 :l'.)
:~
P
11.31-11
111+5
OOiJ35P
111+15
UOU1.7P
111+23
0OO57P
111+30
DOO66P
111+43
00103P
t31\
TCHP,H
llOJ22
130
131
D(JGGOP
633
Oi031P
I 8C013CQl
UD:i31P
2J5
192
JfJ311P
()
I
3CUdIQl
OO~)25P
203
167
00261P
I
tJCJdOQl
U03(~lP
201
140
00221P
i3COPOP8G OU:)27P
204
i'~O
OO:507P
()
I
dCDPUP81 OU323P
202
165
00257P
JCJPJP80
II
(J
~i
17
P
200
138
Oil22SP
Q
JCOPTP
OO:;7QP
244
233
OOJ56P
I dCOPTP8 OU.371P
245
238
U0363P
i3CDUr
UIJ7U1P I
a'J
42S
006UJP
ii
26
006011)
i
't.;L
()
JF8Gi'l
UUllU2
13
1S
:Joouor
501
U01U5P C)
I l1FCPP
00003
15
19
OUllOOP
503
D07USP
I
dF,JH~
OOUOl
109
111
DOOOGP
608
UiOiOP
BHSILOC
0052SP
362
357
OOS20P
()
I
BHSITAB
OU523P
361
35
ft
OG515P
0
dH:.:iITA8L
aU52i'p
363
351
Ol]S12P
I
UITUl
X
611
It
iJ
l+
OG552P
dlT19
X 5:1
10
0OO23P
110
GOO27P £.21
00571P
()
I
81T20
X
62
38
OOS3SP a
!3IT22
x
6J
232+
00 3P
.3
8
it
0054ilP
423+1
0057lfP
I
EH
T23
X
61
t 1
00
OP
240
G0365P
481
006&7P
t3LDlPTAU X
6t
4
006U
()
8LF
DlHlOl
12
OODO
4
U1J7i.l4P
0
I
8LKPJS
QUllU2
111
1
OOUi}
6
lJiOU.P
DL
Ki\
OJiJi.J5
.5
~j
6 tl1Cij
I
13UILDBLI<
x
55
1+
liDS7
0 BUIlOCRU v
56
2 [JOttO !149
00635P
0
1\
I
iJUIlDFCll
II
[J7'
I' 0 P
588
b
0100
I
Ci)'L3A:<
aOUU4
19
oauo
505
007G7P
I CALlBAD OOllO4
113
, (jjHI n
[j
1.
()
CUI [lOGO!)
l~
n
.2
U[J36D
003
1
00366P
2 OO.361P
439
aOG16P
443
00622P
0
I
445
(!1]631.
007
8
00723P
'5
Of.l735P
572
(10752P
573
00753P
584- lSG16 fJHi 5
Oig2:~P
CdlOCK
fJlJ!jl1
Ila
o
lHl
0
{Hn
0 CdP
DOOG3
[
:-
o i 0
ii
C)
t'}
~)
CHA;~
;:<
1.13+
1Hllif
CHA!<OU
T X
Ll3
nil
1.5
CUtHIU
RO
[lUG
14
{j
lHl
D
010
P
'.jo4::;:
00
p
:5
iFt
00766P
()
C
(j
1\l13
L 0 C K Dull
10
GClOS.!UP
OiO P
(~7
2
00
P
597
OiOfllP
0
CONTROL
GJD
194
Qoaot}p
007
p
4$9
GO
P
CO
RE:P
IJUQO
3
7'6
DnGOOP
r
[)
1 Q lj.
t)
IJ ,
COU;H OOal 7
38
OOOOOP
'5
UO?
P
0
cpp
DOGO!.
77
6
~54
G1U42P 0
CH3UILiJ
(I
7 ii·2P
~)64
261)
OO;H7P
440
585
OOl6?P
C;~PFWTU
lJ!
G?'P
OS
606
O:LDO
£)
IW
610
D10i1P
01.012P
616
01Dl?P
618
Dl020P
,
620
\JUI2: 6
FJ
624-
Olv23P
D
tfl.2·~iP
5.2'~
D1D26P
631
0103QP
C)
633
cao
:5
'6
p £)37
(j
1
03
t
+P
OiG35P
640+1
01036P
641
01033P
0
6Lt 2 G:HII3
5:
r"
6 :i.lt
OiOl~5P
Dl023P
,."
Jt.
C~<PROTOL
ODU27
",
~
Cf<
T
lPE
OOS32P 31
t2
005U
C)
cro
OLl.143P
11
,1
1+5D
DOil
.111+:52
fJiJit4P
111+:36
Qu1ZUP
111+59
o
O12:)P
:111+61
00125P
0
CTOX1
001.4·iP
1
.j
LHSi
DlJl1-j
113+(1
J0150P
......
CTOX3
00142P
11
11.3+6
D014
p
CTi<
DO,J3S ssa OOl41P
0
uli!
X 6 1..11
+l~
UiJ03
f
1P
iLi·f.l
lt
OOOl.6P
111-1-22
00056P
111+29
GOD65P
111+42
!J0102P
0
0100u
\"
6
!,t
:Ll1.+20
0OO54P
A
OfJooao
G015
1
tP
113+12
111+10
0OO42P
DO
Oll164P
113+2i.l
LLl+31
OOiJ5?P
111+32
0OO7(JP
0
OESTlP
00023
131
13.2
DOOOOP
640+1
01036P
445+5
00631P
0
OEVBlK 001]13
36
37
DOOGO?
OEVf't'PE
00026
142
144
Dooaop
639
01035P
265
OD4f}l
..
P
445
OD624P
~;..
DISKi1USY
OtJ013
121
0 OUi'lCO
0112iP
.070
174
OQ2'67P
181
D0276P
ttl
5
[j066iP
0
iJUiHC/
Ul1.l75P
669
147
00236P
155
00245P
579
00761P
OUdOQ
01051P
668
125
OD2.10P
129
00214P
.385
a054iP
482
00670P
OU;"IOQH3
OlO46P
667
668
DlU?S?
0
DUHPLAU
.",
6"1+5
111+65
00131P
0
1\
OUi1PLAi:ll X
07+6
111+62
l]0126P
OU,'1QL
00021+
665
667
01fJ46P
659
0107SP
670
Oii21P
124
00207P
146
00235P
173
00266P
E\lf.\;) 0001:1
26
27
DOODOP
514
007i3P
470
00654P
C)
E,HT
iJ
0 ;]12
2d
36
oaDUOP
517
GOl15P
232+2
OOJ54P
232+3
a0355P
241
00366P
423+2
OD575P 0
{.23+3
(J0576P
EPP
00006
90
658
D1044P
271H2
00413P
EXITAOO
OO!H5
123
124
DODOOP
624
lJlll23P
573
00753P
0
EXPDiHA
OOCl24
137
140
UOUOOP
635
01032P
0
FEI
00000
11
12
QoaOOp
497
[J070.3P
Fed
U1036P
61
.5
.646
Ul03bP
6i.t8 11lU37P
650
01040P
652
01041P
654
01042P
656
01043F
0 0
___
0
______________
._"
_____
._.
_____
._._.
______
_____
______
,
__
_______________
._.
_______
____
._~
____
._~
____
._.
______
"
()
o
o
()
o
o
()
o
()
o
o
o
o
o
o
o
o I
01
[
ASSE;·18LER/OS3
111.J
0'j/21/74
.2218
P~\GE
IF
START
FGl~L
>;.
F U
f<
1"1
S W R 0
H~\i~D
"JA
}<[
HULENGTH
HH
H3r.STR
1:
rl.3I.SUP
E
HS
I!\LL
OC
HSIGUUiH
rLiIEXIT
H:;
IFUUND
HSILOOK
HSIlULJP
HSINOT
HSIPTR.
HSIPUT
HSrSLOOP
HSIT.4Bt::>
HS
TTJl
H'3T1'.STI<
E
rlSTT.SUP
E
;-nCI<
>;.
HTFILE
>;.
HTLP
HH1ASK
>;.
HTi'IAx
>;.
HHISF
>;.
HTHT
>;.
HTNULL
~<
HTPLOT
HTPTP
>;.
H
TPUii
>;.
j-H~U\F
~t
H T 1 ASI(
:;.
HTTTY
:;.
H1TI1
ILlENT
IFCOi'J
IFCOI~X
IFnn
I
i'l
i\
Ll
LU~Dj·<
Hli:;Uj~E
IdSTL
Hl
rLOC
KILLFUIG
LIHKIT
LiHd
U)
U)f<
:::C
L/::lTI\uXX
LXpm
M~\GHERR
i"IA
!(EU T LP
H.l\XOEST
d>l
1'10
Hl.);H:-lS
>;.
t~SFT
L'IE
NCHARS
NJi"1
NXPfR
PUP8.STR
E
,<
X
'l
)(
x
X
X
X
tJOU10
o U
J]16
00.1611-"
OIJ333P
UUJ75P
OU461P
OQi~62P
QO'-tS2P
U0453P
l10133P
OQLI31P
OU1tLdP
l! 0
'-tbiP
L1
tJ
y 1,
If
P
QO~b6P
QQ51 l
tP
OiJS52P
DOS63P
LlO5S5P
O..ltJU4
o
ulHl1
OOOU2
CD]1?
UQG16
OtJOl lf
DuGaS
DUJ1JJ
00001
000t5
lJULlO3
001]12
U,Hli,j
00006
UO\J1L
Doall
01
tEl?
OfH105
OU,JlJ3
GOG
[l
ODfL3:3
0:)007
iJUOi.l6
UilDU1
00001
Oi.l640P
00031
o
06
i
dP
OiJ162P
o
iHb5P
O~Hli.lP
uuU06
00057
DUUlt
U0030
OiJ020P
66J
1-\
a
68
59
11,)+16
369
251:.1
32
Lt
326
JIJ3
J05
285
234
2':l3
325
~g.7
;330
353
41)3
414
L"
lJ
7
?
'"
c
'-
L.
Q
453
191
l
i,.
It 6 (j
74+1
11:)1-17
113+1(3
1131-23
233
113+15
27
1'00
103
227
00345P
223
OU;S4iP
111+6
01JlJJ6P
48
IJ
0
lJ
oop,
43
OanDO?
3u2
OiJ451P
281
Ll0426P
S59
lJ052:2P
291
UU437P
233
fl043UP
2-.:J2
G0440P
288
!Hl4·3
282
00
;HQ
[J
0
au
GO
OJ56
ODOi]
QOOO
S 1][153
224
lJ0342P
,=~
~~
4d
-{,.":;!:::
,~,
,,..,
G(l
oJ
./
J.
96
26
1;:;9
239
-,
~-
,,::
::I
648
229
431
192
b
13
234
210+1
111+16
111+38
111+37
OfJfH10?
010.S7P
OOGOOP
a0606P
oaOGOP
01iJ14P
DfJ357P
OOJ-+12P
oa050P
OUfJ76P
OOl]7SP
111+53
00115P
28
oooooP
1'31
lJUOOOP
50
DaDGOP
661
01045P
272
aUy1?p
229
00347P
1.11+7
lJOO37P
310
o
OS
3l~P
304
00452P
350
OO::511P
415
OQ564P
659
U1044P
5 001' P
5
007
P
.1.
OD2
P
.J-
005
P
SiB
(H1711P
548
0
(}
7 3/+P
427
00602P
111+17
QOOSiP
111+54
DOl16P
5l
.6
00733P
112
00140P
663
337
01046P
U0474P
231
00351P
JOQ
IHl447P
111+
..
,..
.j
,',
~s
.~
4
:>
I;:'
";,)
:5
6
b
6
6
6
6
nus
007
DOl
eo!'
rErr
(j
t D
(l10
iUG
fila
010
bP
01.(Jl.tSP
G0300P
GG671P
00260P
OOS1.6P
Ou3b2P
486
0067ltP
490
00700P
4B5
OOG73P
267
590
001
U6P
00-
72P
111
00134P
00231P
00336P
o
Of:?
1,:'
n
G:1
'c';:)
U07Q
OIHt
OOi'(~
P
O£ll!+OP
010U7P
o ItJ.2IJP
0102bP
&;H;)
ijlD33P
64'3
UI0:37P
472
(lOSS6P
48'+
00672P
17Q
00264P
353
00521P
549
00734P
~~,
O~773~
o
001
113+-1
Oll141P
145
(10234P
232
UU352P
36'S
00533P
lf2~
lliJ603P
5n2
OOlDSP
522' 1l072IJP
E;itS
D0132P
559
n0741P
609
01010P
621
Ol021P
630
01027P
636
GI033P
651
01040P
485
00673P
191
00310P
5Sg
01003P
___
,_._._,_.
__
.
______
._.
____
._.
___
,._,_,
______
,_._.
__
,
___
,_.
_________
"_.
__
,
___
.
__
________________________
._
H_'
____
,_,
___
,
______
·
__
·
__
·_·
____________
-----------
113+2
00142P
168
00262P
247
00373P
386
00542P
457
00641P
504
00706P
524
D0721P
547
00733P
564
tl0742P
611
01011P
623
01022P
632
01030P
638
01034P
653
01041P
195
00314P
()
()
o
(J
o
o
o
()
()
v
o
o
o
o
o
o
o
o
o
o
CD
IASSEd8lt:R/OS3
(]I I
PLleg
~U~
i:.:
,..
PLlP(
GTl
I
PL1P8lJS
t:
PFSA'JE
()
I
PF~W:-W
.,.
PlCl
n;EC
I
paSI
PSMllK
0 I PSj\LOC
I PTP
..
STR
E.
PTP~SUP
E
()
I PTPEXIT
I
>f.
PTPR!::G
I PTPXl
>f.
PUNi~EC
0 I
QAuO
I
QEdPTY
QHIGLOG
I
f)Pi'.JT
()
QQU2
I
OQ
J
1+
QQOS
I Q007
()
QClll8
I QU09
QOI0
I
Qlll1
()
QUiZ
ROIST
I
Rt:fADD
I SELECT
()
I SS
SSSAVE
I
STI~fLOC
TE
I(
lJ
2
(J
I TEK"STR E
'--
TE1<.
SUP
i:.
I TEf'lP
()
TEtlPH
'--'
I TERH
TEfWAS
Tc:rnHN
0
TFL
II
1'li\ 0
THWI1
TTYJNIT
,'\
UJPOO
\~)
UJPOX2
uPI,a:::::;
()
U;~8EX
I r
URUEXITA
URBlOKI
0
UFW
l
OK
(~
UI..z
~/lJRD
UT.STR
1.:
I uT.SJe
t,
UTlPGB
C)
I
UTU>GKQ
I
UfLPDONE
I UTLPINT
UT
LP
,1~\
C
0 I
0 I
I
UTLPi1ACL
I urLPREC
C)
UHIUl"l8
I
U~'18LOCf(
UI'1
Uloe
KG
:.t.
UyWi<:ET
0 Uli
BH
C
U
i-j
tJ
~<:~
U
1'1
i'll\ X
V1.U
U9/21/74
221d
PAGE
'7
J
IFSTAHT
QOUOOP
X
X
X
>::
X
X
X
X
ouzusp
DUU1S
U0016
DODUJ
OUClS
00Q13
OIL573P
OD3:56P
00335P
OOODLy
UL!352P
OOG
2
00 7
ua
ouo
0002
D !.l21 P
O[j2~1
tJ
o
245P
!]G253P
OU2b2P
OG~~55P
UG2?6P
UG3D6P
OU31,3P
OliODE,
OLIO,}'?
UQOUIJ
II
n
IJ
0 c-
D
[J(J641P
U
!:j
fl"
::i
P
DUlO3P
00037
GllOUS
U(JoiJ3P
OilUZU
00!]17
00021
lHlO24
19
123
124
3':,,)
230
38
76
560
232
,'+28
80
51
126
125
127
132
51
S2
125
40
39
liEi
405
121
53
54
228
;~i9
1
DUOOOP
DUOOOP
OUiJUOP
UOOOUP
OOOOOP
OiJ022P
00553P
DaDGOP
OO[JlH1P
OOUOIJP
00 :346P
IJ03.55P
(1
t~l
OD
GOi'
DOl
ClG?
OD7
4
007
5
DOr
5
I)
07
5
a07
550
00T3
2+,3
0035
528
0072
462
0064
453
00640P
434
aUEiil?
264
00403P
444
00623P
:126
HOllOOP
130
OOOOOP
137
DOOOJP
100
0OO17P
191
00316P
627
01025P
49
OUOOOP
521
00720P
107
DUU2lj.P
406
00554P
123
iJODOIJP
248
00374P
242
OQ,357P
222
OO;:S4!JP
5)
(lO?
P
~-
y tHl? p
53,1
a..
n
~7
p
534
OU7
P
()12
DiP] P
556
uu?
OP
",-,
,J
!Lf
J
...
DCl
007
onl
tP
[l1J7,~H
OG64~:':
G0737P
uD?
P
[jOY
p
JO? P
flO?
P
00736P
U U5
75P
OG735P
445+1
D0625P
127 Daonop
631
01030P
523
U0721P
109
[JOO26P
422
lJ0572P
522
01022P
135
O!l2:22P
487
IJ[J675P
572
Gu2P
2 7 3 U
is
P
14
"['
b·1
(J
2 P
501
Cll7GSP
~)14
00713P
527
00723P
542
U0731P
556
00740P
423+3
GOSIoP
629
01026P
111
423
331
~;;
03
517
529
544
5509
461
0OO30P
00573P
0047
i
tP
(J
G
l?lP
007Cl6P
OIJ71SP
Olrl24P
00732P
OOl41P
00644P
382
00536P
,
a
00570P
(J
Cl0152P
503
nOlO'7P
519
DOlloP
531
UD725P
546
00733P
560
0074_2P
4&3
00646P
383
00537P
C)
o
o
C)
o
o
o
o
435
00612P
o
()
o
113+20
00171P
o
o
()
508
D07l0P
521
D07l0P
534
D07l6P
o
548
00734P
232+2
00354P
515
00713P
o
o
o
010
____
-1
____________________________________________________________________________________________________________________
,
____________
,
_____
,
___________
,
__
,
_____________
_
.m
JT
__
IJ_ITTTT
IE
ASSErl8LER/OS3
Vl.0
U9/21/74
2218
PAGE
()
C)
C)
I
o
I.
I
01
I
01
I
01
i
°1
01
o[
01
I
()
1
I
01
1
01
1
01
01
1
01
1
1
o
°1
01
1
01
Uill'IM(A
wetl
r
Xl
)(2
)(3
yy
UU027
QuOiD
UOD01
00002
OLJUu3
DCl16o?
641
.L18
104
1.1U-36
113+5
142
163
188
222
237
269
2'79
329
353
443
467
484
553
584-
61l+
38
113+8
207
335
348;
466
594-
39
93
111+48
128
150
174
189
305
389
/.".19
419
113""21
111+44
I.;.
IFSTART
U
1113
3P
565
00743P
OOOOOP
616
OlO17P
DOO21P
105
UOO22P
107
0OO24P
ooa74P
111+37
aOO7SP
111+53
0011SP
001ltS?
131
0021GP
132
D0217P
U0231P
143
00232P
·145
00234P
00255P
164
00256
P
168
00262P
OU305P
193
00312P
194
OU313P
ilO340P
223
Oll341P
229
00347P
00352P.
2'+1
1l036b?
242
00367P
00410P
.270+2
00413P
271
00414P
OU424P
297
00444P
299
00446P
U046SP
334
D0471?
336
00473P
OOS14P
356
OOS17?
359
00522P
00622P
445
!)0624P
445+5
00631P
00652P
469
Q0653P
470
00654P
O1l672P
486
00674P
487
(JOG?S?
(}0736P
567
(10745P
558
00746P
GOl66P
592
00774P
593
(lOl7SP
ut!]!5P
625
01023P
OOiS!]P
130
OOZlS?
134
OOZZlP
003J3P
266
G0405P
267
00406P
00472P
341
00500P
343
n0502P
£lOSU,??
428
00603P
433
00610P
()CloS!P
565
00143P
566
00744P
00776P
OiJOG4P
94
ilOOO5P
97
OlHl10P
D011UP
113+2
00142P'
113+6
00146P
00213P
129
00214P
136
00223P
IJ0241P
151
00242P
152
00243P
a0267P
176
002?1?
177
00272P
Oi03!J6P
282
0042lP
284
00431P
£HJ453P
306
a0454P
382
00536P
(J0545?
405
00553P
406
00554P
00557P
422
005?2P
423
00573P
DOGoSP
482
006lIJP
578
D0760?
00104P
111+45
OOiOS?
____
......:...Joo.1..
__
.__..
___
"_'-_
•.
______
._.
___
___
ct
()
108
OOO.25P
111+54
00116P
109
aOO26P
111
gg~~~~
111+57
00121P
113+.1
133
00220P
159
a0251P
137
00224P
141
00230P
()
160
a0252P
162
00254P
169
00263P
171
00265P
187
00304P
190
00315P
197
00316P
219
00335P
231
00351P
261
00400P
232
00352P
235
00360P
0
265
00404P
268
00407?
272
o O.415P
276
00421P
278
00423I'
300
01l447P
304
00452P
328
00464P
338
o
0475P
429
00604P
347
a050SP
350
00511P
0
43<3
00616P
441
oa620P
450
00636P
464
00647P
465
00650P
471
OOO55?
472
D0656P
480
006G6P
489
0067?P
570
OU?50?
595
OO?7?P
515
007131'
528
00723P
0
572
o O.752P
573
00753P
596
01000P
597
01001I'
135
fJ0222P
270
004.!!P
182
a0277P
185
00302P
0
325
00461P
332
a0467P
344
00503P
345
00504P
346
005USP
434- [JOGi1P
462
00645P
463
a0646P
569
0074?P
590
00772P
591
00773P
0
99
OOO.12P
1:11+46
0010GP
111+47
0010.7P
124
DOlO7P
125
00210P
127
00212P
146
00235P
155
00245P
147
00236P
149
00240P
0
161
00253P
173
00266P
17B
00273?
179
00274P
181
OOl76P
2.85
00432P
287
00433P
290
00436P
383
OG537P
409
OOS5?P
385
00541P
388
00544P
0
410
aOS60P
418
oa566P
473
00657P
474
D0600P
475
006.61P
57'3
0076l?
o
o
o
o
o
o
o
o
o
o
o
o

Navigation menu