08_IFSTART 08 IFSTART
08_IFSTART 08_IFSTART
User Manual: Pdf 08_IFSTART
Open the PDF directly: View 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. 
t· 
~ 
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"" 
c· 
E· 
I "L 
.-
R· 
/ 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+!.. 
5· 
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· 
~ 
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