@1
MOV UP,ACC
SUB 500
JLZ N
MOV 5,DOWN
JMP C
N:ADD 500
MOV 0,DOWN
C:SUB 300
JLZ M
MOV 3,DOWN
JMP S
M:ADD 300
MOV 0,DOWN
S:MOV ACC,DOWN

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

@5
MOV LEFT,ACC
SUB 50
JLZ N
MOV 5,DOWN
JMP S
N:ADD 50
MOV 0,DOWN
S:MOV ACC,DOWN

@7
MOV RIGHT,DOWN

@8
MOV UP,LEFT
MOV RIGHT,ACC
L:ADD RIGHT
JGZ L
ADD 100
MOV ACC,DOWN

@9
MOV UP,LEFT
MOV UP,ACC
SUB 10
JLZ A
L:MOV 1,LEFT
SUB 10
JGZ L
JLZ A
MOV 1,LEFT
SUB 10
A:ADD 10
MOV -100,LEFT
MOV ACC,DOWN
