@1
MOV RIGHT, ACC
SAV
MOV RIGHT, ACC
L: SWP
ADD 1
SWP
SUB 100
JGZ L
ADD 100
MOV UP, DOWN
MOV ACC, DOWN
SWP
MOV ACC, DOWN

@2
MOV UP, ACC
SUB 499
JGZ A1
ADD 500
MOV 0, LEFT
JMP S3
A1: MOV 5, LEFT
S3: MOV ACC, LEFT

@4
S: MOV UP, ACC
JRO ACC
JMP P1
NOP
MOV UP, RIGHT
MOV UP, NIL
MOV ACC, RIGHT
JMP S
P1: MOV UP, NIL
MOV UP, RIGHT
MOV ACC, RIGHT

@5
MOV -1, ACC
SAV
MOV LEFT, ACC
L: SWP
ADD 1
SWP
SUB 10
JGZ L
ADD 9
JRO LEFT
JMP E
SWP
E: MOV ACC, DOWN

@7
MOV RIGHT, ACC
MOV ACC, LEFT
ADD ACC
ADD ACC
ADD LEFT
ADD ACC
MOV ACC, RIGHT

@8
MOV UP, ACC
MOV ACC, LEFT
MOV LEFT, ACC
ADD UP
MOV ACC, LEFT
MOV LEFT, ACC
ADD UP
MOV ACC, DOWN
