Directory of image this file is from
This file as a plain text file

LDA i
#1X   1
STA i
#1A    [12 BIT RN
STC 2R
STC 2L
STC 1R
STC 1L
LDA i
 00
STA i
#1Y
SET i 1
 -40
SET i 2
 1777
#1C SET i 3
#3C  2000
#2C JMP 9A [GET RN
[COLLECT DATA FOR FREQUENCY TEST
LDA
 1A
ROL 5
BCL i
 7740
ADD 3
STC 3
LDA 3
ADA i
#4C   1
APO
JMP 7C
STA 3
[COLLECT DATA FOR INDEPENDENCE TEST
SET i 3
#5C  2200
LDA
 1A
ROL 3
BCL i
 7770
ADD 1Y
ADD 3
STC 3
LDA 3
ADD 4C 
APO
JMP 7C
STA 3
LDA
 1A
ROR 6
BCL i
 7707
STC 1Y
XSK i 2
JMP 1C
XSK i 1
JMP 1C
[SAVE DATA ON TAPE
#7C WRC
 4|600
HLT
LDA i
 1
ADD p-4
STC p-5
SET i 10
 3777
CLR
STA i 10
XSK 10
JMP p-2
JMP 1Y+1
[RANDOM NUMBER GENERATOR
#9A LDA
  0
STC 8A
LDA i
#1R
BCO i
#2R
STC 3R
LDA i
#1L
BCO i
#2L
STC 3L
ADD 2R
STC 1R
ADD 2L
STC 1L
LDA i
#3R
ROR 5
BCL i
 7600
STC 2L
ADD 3R
ROR 5
BCL i
 177
BSE i
#3L
STA
 1A
STC 2R
#8A     [RETURN