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

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

@4
S: MOV UP, ACC
MOV UP, LEFT
JEZ W
MOV LEFT, ACC
MOV ACC, LEFT
MOV ACC, DOWN
JMP S
W: MOV LEFT, NIL
MOV UP, LEFT

@7
MOV UP, DOWN
