@1
MOV UP, ACC
ADD 1
MOV ACC, DOWN
MOV ACC, RIGHT

@3
MOV RIGHT, RIGHT

@4
T: MOV UP, ACC
NEG
S: SAV
ADD UP
JLZ N
SWP
JMP S
N: MOV ACC, LEFT
SWP
SUB LEFT
JLZ S
SWP
MOV ACC, RIGHT
MOV RIGHT, NIL

@5
MOV -1, UP
L: MOV LEFT, DOWN
MOV UP, RIGHT
D: MOV UP, ACC
MOV ACC, RIGHT
JGZ D
MOV ACC, LEFT
MOV ACC, UP
MOV RIGHT, NIL
O: MOV RIGHT, ACC
MOV ACC, DOWN
JNZ O
JMP L

@7
MOV UP, ACC
L: SAV
ADD UP
JLZ Z
MOV ACC, DOWN
SWP
JMP L
Z: MOV -1, DOWN
