@0


@1
W: SUB 7
JGZ W
MOV UP, ACC
ADD 1
MOV ACC, RIGHT
JGZ W
MOV 480, ACC

@2


@3


@4


@5
L1: MOV ACC, RIGHT
MOV UP, ACC
MOV ACC, DOWN
NEG
MOV ACC, DOWN
JLZ L1
L2: MOV ACC, UP
MOV RIGHT, ACC
JLZ L2
L3: MOV UP, ACC
MOV ACC, DOWN
JLZ L3

@6


@7
MOV -999, ACC
L: SAV
B: ADD UP
JLZ NEW
ADD UP
JMP B
NEW: MOV UP, ACC
JLZ L
O: SWP
SAV
SUB UP
JLZ D
MOV ACC, DOWN
JMP O
D: MOV -1, DOWN

@8

