@1
MOV UP, ACC
JEZ R
SUB 90
JEZ U
SUB 90
JEZ L
MOV 2, DOWN
JMP LEN
R: MOV 1, DOWN
JMP LEN
U: MOV 5, DOWN
JMP LEN
L: MOV 4, DOWN
LEN: MOV UP, DOWN

@5
S: MOV UP, ACC
SAV
MOV UP, ACC
SUB 1
JEZ S
LP: SWP
MOV ACC, DOWN
MOV ACC, RIGHT
SWP
SUB 1
JNZ LP

@6
MOV 0, DOWN
Q: JRO LEFT
JMP O
ADD 1
JMP O
JMP O
SUB 1
JMP O
O: MOV ACC, DOWN
JMP Q

@8
MOV 0, RIGHT
Q: JRO UP
ADD 1
MOV ACC, RIGHT
JMP Q
SUB 1
MOV ACC, RIGHT
JMP Q

@9
MOV LEFT, DOWN
MOV UP, DOWN
MOV 3, DOWN
MOV -1, DOWN
