*200
BPUN,CLA CLL
PLS
DCA CKSM
JMS PLOT
HLT
LAS
CIA
DCA NB
NXBL,HLT
LAS
DCA IA
HLT
LAS
IAC
DCA FA
TAD IA
STL
PUNL,JMS BINP
TAD IA
CIA
TAD FA
SNA CLA
JMP .+5
TAD I IA
CLL
ISZ IA
JMP PUNL
ISZ NB
JMP NXBL
TAD CKSM
CLL
JMS BINP
JMS PLOT
HLT
JMP BPUN
PLOT,0
CLA CLL
TAD M212
DCA CTR1
TAD C200
JMS PUN
ISZ CTR1
JMP .-2
JMP I PLOT
BINP,0
DCA TEM1
TAD TEM1
RTR
RTR
RTR
AND SL7
JMS PUN
TAD CKSM
DCA CKSM
TAD TEM1
AND SL6
JMS PUN
TAD CKSM
DCA CKSM
JMP I BINP
PUN,0
PSF
JMP .-1
PLS
JMP I PUN
CKSM,0
NB,0
IA,0
FA,0
M212,-212
CTR1,0
C200,200
TEM1,0
SL7,177
SL6,77
$