@0
MOV UP,ACC
MOV ACC,RIGHT
MOV ACC,RIGHT
MOV RIGHT,DOWN

@1
S: MOV UP,ACC
SAV
SUB LEFT
JLZ W
SWP
MOV ACC,DOWN
MOV LEFT,LEFT
JMP S
W: MOV LEFT,DOWN
SWP
MOV ACC,LEFT

@2
S: MOV UP,ACC
SAV
SUB RIGHT
JLZ W
SWP
MOV ACC,DOWN
MOV RIGHT,RIGHT
JMP S
W: MOV RIGHT,DOWN
SWP
MOV ACC,RIGHT

@3
MOV UP,ACC
MOV ACC,LEFT
MOV ACC,LEFT
MOV LEFT,DOWN

@4
MOV UP,RIGHT

@5
S: MOV UP,ACC
MOV ACC,RIGHT
JRO RIGHT
MOV LEFT,NIL
MOV ACC,DOWN
JMP S
W: MOV LEFT,DOWN

@6
S: MOV UP,ACC
SAV
SUB LEFT
JLZ W
MOV 1,LEFT
MOV RIGHT,DOWN
JMP S
W: MOV 4,LEFT
MOV RIGHT,NIL
SWP
MOV ACC,DOWN

@7
MOV UP,LEFT

@8
MOV UP,ACC
MOV ACC,RIGHT
MOV ACC,RIGHT

@9
S: MOV UP,ACC
SAV
SUB LEFT
JLZ W
MOV LEFT,NIL
SWP
MOV ACC,DOWN
JMP S
W: MOV LEFT,DOWN

@10

