@1
I: MOV UP, DOWN
MOV UP, DOWN
MOV UP, ACC
MOV UP, DOWN
SUB 4
JGZ B
NEG
SUB 13
JMP S
B: ADD 4
S: MOV ACC, DOWN
JRO DOWN

@4
I: MOV -1, DOWN
MOV UP, ACC
SAV
MOV UP, DOWN
MOV UP, ACC
L: SWP
MOV ACC, DOWN
SWP
MOV UP, DOWN
SUB 1
JEZ E
MOV -1, UP
JMP L
E: MOV -11, UP

@8
T: MOV UP, ACC
JLZ N
MOV ACC, RIGHT
SWP
MOV ACC, RIGHT
ADD 1
SWP
MOV UP, RIGHT
JMP T
N: MOV UP, ACC
SWP

@9
JMP H
C: MOV 3, DOWN
MOV 3, DOWN
MOV 3, DOWN
MOV 3, DOWN
E: MOV -1, DOWN
H: MOV LEFT, DOWN
MOV LEFT, DOWN
MOV LEFT, ACC
JLZ S
P: MOV 3, DOWN
SUB 1
JGZ P
JMP E
S: JRO ACC
