@0
MOV 4, ACC
K: MOV 0, LEFT
MOV 0, LEFT
SUB 1
JNZ K
R: MOV UP, DOWN
JMP R

@3
L: MOV RIGHT, ACC
SWP
SUB RIGHT
JLZ A
JEZ P
B: MOV DOWN, UP
SUB 1
JNZ B
JMP P
A: MOV UP, DOWN
ADD 1
JNZ A
P: MOV UP, RIGHT
MOV RIGHT, UP

@4
L: MOV UP, ACC
JNZ RD
MOV UP, ACC
MOV ACC, LEFT
MOV ACC, LEFT
MOV LEFT, NIL
MOV UP, LEFT
JMP L
RD: MOV UP, ACC
MOV ACC, LEFT
MOV ACC, LEFT
MOV LEFT, ACC
MOV ACC, LEFT
MOV ACC, DOWN

@7
MOV UP, DOWN
