@0
MOV 8, ACC
I: MOV 0, LEFT
SUB 1
JNZ I
S: MOV UP, ACC
SWP
MOV UP, ACC
MOV ACC, DOWN
MOV ACC, DOWN
SWP
ADD 1
MOV ACC, DOWN
JRO ACC
MOV UP, DOWN
JMP S

@3
S: MOV RIGHT, ACC
JGZ K
F: JEZ O
MOV UP, DOWN
ADD 1
JMP F
K: MOV DOWN, UP
SUB 1
JGZ K
O: MOV UP, RIGHT
MOV RIGHT, UP

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

@7
MOV UP, ACC
MOV ACC, UP
MOV ACC, DOWN
