@0
MOV UP, RIGHT
MOV UP, ACC
MOV UP, RIGHT
L: MOV ACC, RIGHT
JMP L

@1
MOV LEFT, ACC
MOV LEFT, RIGHT
SAV
Z: SWP
SAV
SUB RIGHT
MOV 0, RIGHT
JNZ Z
M: SWP
SAV
SUB RIGHT
MOV LEFT, RIGHT
JNZ Z
JMP M

@2
MOV LEFT, DOWN
Z: MOV UP, ACC
MOV ACC, LEFT
MOV 0, DOWN
SUB LEFT
JNZ Z
M: MOV UP, ACC
MOV ACC, LEFT
MOV ACC, DOWN
SUB LEFT
JNZ Z
JMP M

@6
MOV UP, ACC
L: MOV UP, DOWN
MOV ACC, DOWN
JMP L

@10
MOV UP, ACC
SUB UP
JNZ Z
MOV 1, DOWN
JMP E
Z: MOV 0, DOWN
E:
