@0
MOV 8, ACC
L: MOV 0, LEFT
SUB 1
JNZ L
T: MOV UP, DOWN
JMP T

@1


@2


@3
T: ADD RIGHT
JEZ A
JLZ L2
L1: MOV UP, DOWN
SUB 1
JGZ L1
JMP A
L2: MOV DOWN, UP
ADD 1
JLZ L2
A: MOV RIGHT, ACC
MOV UP, RIGHT
MOV RIGHT, UP

@4
T: MOV UP, ACC
SAV
MOV UP, ACC
MOV ACC, LEFT
NEG
MOV ACC, LEFT
MOV LEFT, ACC
SWP
JNZ L
MOV UP, LEFT
JMP T
L: SWP
MOV ACC, DOWN
MOV ACC, LEFT

@5


@6


@7
MOV UP, DOWN

@8

