@0
MOV UP, RIGHT

@1
MOV LEFT, ACC
MOV LEFT, DOWN
MOV LEFT, DOWN
H:MOV ACC, RIGHT
JMP H

@2
MOV UP, ACC
MOV ACC, DOWN
SUB LEFT
MOV ACC, DOWN

@5
MOV UP, ACC
MOV UP, DOWN
H:MOV ACC, RIGHT
JMP H

@6
MOV LEFT, ACC
L:SAV
MOV UP, ACC
MOV ACC, DOWN
SUB LEFT
JNZ Z
SWP
JNZ Z
MOV 1, DOWN
JMP N
Z:MOV 0, DOWN
N:MOV UP, ACC
JMP L

@9
MOV UP, ACC
H:MOV ACC, RIGHT
JMP H

@10
L:MOV UP, ACC
SUB LEFT
JNZ Z
SWP
MOV ACC, DOWN
JMP N
Z:MOV 0, DOWN
N:MOV UP, ACC
SAV
JMP L
