@0
MOV RIGHT,ACC
SAV
MOV RIGHT,ACC
SUB 300
JLZ N
SWP
ADD 3
JMP P
N:ADD 300
SWP
P:MOV ACC,DOWN
SWP
MOV ACC,DOWN

@1
MOV UP,ACC
SUB 500
JLZ N
MOV 5,LEFT
JMP S
N:ADD 500
MOV 0,LEFT
S:MOV ACC,LEFT

@3
MOV UP,DOWN
MOV UP,ACC
L:SUB 100
JLZ A
MOV 1,DOWN
JMP L
A:ADD 100
MOV -100,DOWN
MOV ACC,RIGHT

@4
MOV LEFT,ACC
SUB 50
JLZ N
MOV 5,DOWN
JMP C
N:ADD 50
MOV 0,DOWN
C:SUB 30
JLZ M
MOV 3,DOWN
JMP S
M:ADD 30
MOV 0,DOWN
S:MOV ACC,DOWN

@7
MOV UP,ACC
L:ADD UP
JGZ L
ADD 100
MOV ACC,DOWN

@8
MOV UP,ACC
ADD UP
SAV
MOV UP,ACC
L:SUB 10
JLZ D
SWP
ADD 1
SWP
JMP L
D:ADD 10
SWP
MOV ACC,DOWN
SWP
MOV ACC,RIGHT

@9
MOV LEFT,DOWN
