@0


@1
W: ADD 1
JLZ W
MOV UP, ACC
ADD 1
MOV ACC, RIGHT
JEZ Z
MOV 68, ACC
Z: SUB 69

@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

