@0
MOV RIGHT, ACC
JEZ R
SUB 180
JEZ LF
MOV 0, DOWN
JMP C
R: MOV 1, DOWN
JMP C
LF: MOV -1, DOWN
C: MOV RIGHT, DOWN

@1
MOV UP, ACC
MOV ACC, LEFT
MOV ACC, RIGHT
MOV UP, ACC
MOV ACC, LEFT
MOV ACC, RIGHT

@2
MOV LEFT, ACC
JEZ Z
SUB 90
JEZ M
SUB 90
JEZ Z
MOV 1, RIGHT
JMP C
M: MOV -1, RIGHT
JMP C
Z: MOV 0, RIGHT
C: MOV LEFT, RIGHT

@3
MOV LEFT, ACC
SAV
MOV LEFT, ACC
SUB 1
MOV 0, DOWN
L: SWP
MOV ACC, DOWN
SWP
SUB 1
JNZ L

@4
MOV UP, ACC
SAV
MOV UP, ACC
SUB 1
MOV 0, RIGHT
L: SWP
MOV ACC, RIGHT
SWP
SUB 1
JNZ L

@5
ADD LEFT
MOV ACC, RIGHT

@6
MOV LEFT, DOWN
ADD RIGHT
MOV ACC, DOWN

@7
MOV UP, LEFT

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