@0
MOV -1 LEFT
MOV 3 ACC
I:MOV 0 LEFT
MOV 0 LEFT
MOV 0 LEFT
SUB 1
JGZ I
L:MOV UP ACC
JLZ E
MOV ACC DOWN
MOV ACC DOWN
JMP L
E:MOV -1 DOWN
MOV DOWN NIL
MOV LEFT DOWN

@3
L:MOV RIGHT ACC
JEZ I
JLZ B
F:MOV UP DOWN
SUB 1
JGZ F
JMP I
B:ADD 2
JGZ S
MOV DOWN UP
S:MOV DOWN UP
JLZ B
I:MOV UP ACC
ADD 1
MOV ACC UP

@4
MOV 9 ACC
SAV
L:MOV UP ACC
JLZ E
SWP
SUB UP
MOV ACC LEFT
JMP L
E:SWP
MOV ACC LEFT
MOV 19 ACC
D:SUB 1
JGZ D
MOV 0 UP
MOV UP DOWN

@7
MOV -1 LEFT
MOV UP LEFT
L:MOV LEFT ACC
JLZ E
JEZ N
C:SWP
E:MOV ACC DOWN
SWP
SUB 1
JGZ C
N:SWP
ADD 1
SAV
JMP L
