$20
SET i 2
  -4
SET i 3
   1
SET i 4
   2
CLR
OPR 10
CLR
#1A ADD 3
OPR 10
STC p+3
OPR 11
SAE i
  X
JMP p-3
XSK i 2
JMP 2A
JMP 2A
#2A CLR
ADD 2
APO
JMP 3A
JMP 4A
#3A CLR
ADD 4
ADD 3
STC 3
ADD 4
ROL 1
STC 4
JMP 5A
#4A CLR
ADD 3
SCR 1
STC 3
JMP 5A
#5A SET i 17
   0
XSK i 17
JMP p-1
JMP 2A