[CHATTY69
[ENTIRELY NEW REWRITE WITHOUT REFERENCE TO EARLIER VERSIONS
[USES SAM 17 AND RELAY REGISTER
[AJH DEC 69
$20
[RECORD
SETi2
7777
SETi1
1
#1A SAM 17
STA
1D
BCOi
#1B 0000
APO
JMP 1C
XSKi1
LDA
1
SHDi
7700
JMP 1E
SCR 7
SCR 7
JMP 1F
#1C NOP
LDAi
#1D 0000
STC 1B
ADD 1
#1E STHi2
SETi1
1
#1F XSK 2
JMP 1A
[PLAYBACK
SETi2
7777
#1G LDHi2
COM
STC 1
JMP 1J
#1H SCR 13
SCR 13
SCR 13
NOP
#1J SCR 7
SCR 13
SCR 13
XSKi1
JMP 1H
RTA
COM
ATR
XSK 2
JMP 1G
SNSi0
JMP p-1
JMP 1G-2
[END
[CHATTY69