@1
S: MOV UP, ACC
SWP
MOV UP, ACC
MOV ACC, DOWN
C: SWP
SUB 13
JGZ B
NEG
ADD 1
MOV ACC, DOWN
JMP S
B: MOV 1, DOWN
SWP
MOV ACC, DOWN
JMP C

@5
MOV UP, DOWN

@9
MOV UP, ACC
L: JRO UP
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, RIGHT

@10
R: MOV 0, DOWN
MOV ACC, DOWN
SWP
MOV 5, ACC
L: MOV LEFT, DOWN
MOV LEFT, DOWN
MOV LEFT, DOWN
MOV LEFT, DOWN
MOV LEFT, DOWN
MOV LEFT, DOWN
SUB 1
JNZ L
MOV -1, DOWN
SWP
ADD 1
