[COAUTO
[CONTINUOUS
[AUTOCORREL,
[DATA FROM U1,
[CORRELOGRAMS
[ON U0. LSW
[GIVE 1ST DATA
[BLOCK, RSW
[GIVE LAST ONE
[AJH OCT 64
$15
MTBi
0000
HLT
LSW
BCLi
7000
ADAi
-1
STC 16
RSW
BCLi
7000
STC 17
#4A LDA
16
SAE
17
JMP p+2
JMP 4F
ADAi
1
STA
16
BSEi
6000
STA
4B
ADAi
1001
STC 4C
RDCiu
#4B 0
RDCu
#4C 0
SETi12
2777
JMP 401
SETi1
1377
SETi2
2377
CLR
STAi2
XSKi1
JMP p-2
SETi1
6777
SETi4
1577
SETi5
2400
SETi6
400
LDAi
2777
STC 2A
#1I SETi2
2777
CLR
STC 400
SETi3
#2A 2777
#1J LDAi3
MULi2
STA
1K
SCR 13
STC 1L
CLR
ADD 1K
LAM 6
STC 0
ADD 1L
LAM 5
STC 0
LAM 6
STC 0
LAM 5
XSK 3
JMP 1J
LDA 5
STC 1L
ADD 1
COM
STC 1A
STC 7F
STC 7
SETi11
-14
ADD 1L
STAi
#7F 0
APOi
JMP 7B
COM
STC 1L
ADD 400
COM
STC 400
#7B CLR
ADD 7
ROL 1
STC 7
ADD 400
ROLi1
STC 400
ADD 1L
ROLi1
STA
1L
ADD 1
AZEi
CLR
APO
JMP p+6
STC 1L
LDAi
1
ADD 7
STC 7
XSKi11
JMP 7B
LDA
7F
APOi
JMP p+5
LDA
7
COM
STC 7
LDA
7
STA 5
XSKi1
LDAi5
LDAi5
XSKi4
JMP p+2
JMP 2C
LDAi
1
ADM
2A
JMP 1I
#2C SETi1
0
LDAi
-3770
ADA
2400
APOi
JMP p+3
XSKi1
JMP p-5
SETi2
2377
SETi3
1377
LDAi2
MUL
1
SCR 3
STA 2
XSKi3
JMP p-6
SETi1
1577
SETi2
2376
SETi3
2377
SETi4
2400
LDA
2776
STA
3000
#1Q XSKi2
XSKi3
XSKi4
LDAi2
ADAi4
SCR 1
STAi3
XSKi1
JMP 1Q
LDA
16
STA
2777
BSEi
5000
STC 4D
WRC
#4D 0
JMP 4A
#4F CHKu
0
CHK
0
CLR
SETi1
100
SETi2
4E
SETi3
1767
DSCi2
XSKi3
JMP p-2
#4E JMP 4F+4
4477
4044
0
7741
0041
0
3077
7706
#1A 0
#1K 0
#1L 0
[END FOR NOW