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

[ MARK TAPE WITH    1000 WORD BLOCKS FROM  430 TO 527
[MARK PROGRAM
[WITHOUT
[DISPLAY
[JULY 1965
[WITH SHORT
[END ZONE
[PLUS LONG
[IBZ AT START
$20
MTB i 
0
HLT
$40
#7A SET i 15
JMP 7X-1
SET i 3
-440
SET i 16
4
SET i 4
10
SET i 7
6
SET i 6
-10
MSC 13
SET i 5
0
#1G SAE i 
0
XSK i 5
JMP 1G
SAE i 17
#1B SET i 5
0
#1A SAE i 17
XSK i 5
JMP 1A
SAE i 17
XSK i 6
JMP 1B
SAE i 17
#1D SAE i 17
SAE i 17
SAE i 17
SAE i 17
SAE 16
SAE i 2
LDA i 
-0
SAE i 11
ADD 4
SAE i 11
COM
SAE i 11
STC 6
SAE i 11
SRO 7
ADD 5A
SAE i 11
SRO 7
ADD 5B
SAE i 11
SRO 7
ADD 5C
SAE i 11
SRO 7
ADD 5D
SAE i 11
SRO 7
ADD 5E
SAE i 11
SRO 7
ADD 5F
SAE i 11
SRO 7 
ADD 5G
SAE i 11
SRO 7
ADD 5H
SAE i 11
SRO 7 
ADD 5J
SAE i 11
SRO 7
ADD 5K
SAE i 11
SRO 7
ADD 5L
SAE i 11
SRO 7
ADD 5M
SAE i 11
SAE i 11
SAE i 11
STC 6
SAE i 11
ADD 4
SAE i 11
ADA i 
-1
SAE i 11
STC 4
SAE i 11
SET i 5
-351
#1C SAE i 11
XSK i 5
JMP 1C
SAE i 13
SAE i 1
SAE i 1
SAE i 1
SAE i 2
SAE 7
SAE i 17
XSK i 3
JMP 1D
XSK i 15
SAE i 17
JMP 15
#7B SAE i
0
#1F SET i 5
0
#1E SAE i 
0
XSK i 5
JMP 1E
HLT
SET i 2
777
LDA i 
#2B 11
#2A STA i 2
ADD 2B
XSK 2
JMP 2A
LDA i 
2000
STA 
2C
STC 2D
#2E WRI i u
#2C
LDA i 
#2F 1
ADM
2C
SAE i 
3000
JMP 2E
MTB i u
0
MTB i u
0
#2H ADD 2F
STA i 
#2G 0
MTB i u
0
SAE 
2G
JMP 3C
[NON CONSEC.
[BWD BLK NO.
AZE
JMP 2H
#2J RDE i u
#2D
AZE
JMP 3C
[CHK SUM FAIL
[ON READ
ADD 2F
ADM 
2D
SAE i 
3000
JMP 2J
MTB i u
0
SET i 2
777
SET i 3
-400
LDA i 
#2K 11
#2L SAE i 2
#3C HLT
XSK i 3
JMP 7I
SET i 15
RCG
SET i 16
7300
JMP 15
#7I ADD 2K
JMP 2L
#7X JMP 7C
JMP 7D
JMP 7B
#7C SAE i 17
SET i 3
-100
LDA i
-751
SAE i 17
STC 1C-1
JMP 1D+3
#7D SAE i 17
SET i 3
-350
LDA i
-351
SAE i 17
STC 1C-1
JMP 1D+3
[DONE MARKING
#5A 10
#5B 4
#5C 2
#5D 1
#5E 200
#5F 100
#5G 40
#5H 20
#5J 4000
#5K 2000
#5L 1000
#5M 400