@1
MOV UP, RIGHT

@2
L:MOV LEFT, ACC
SAV
MOV LEFT, ACC
SWP
P:SUB 2
JLZ O
SWP
MOV ACC, DOWN
MOV ACC, DOWN
SWP
JGZ P
JMP L
O:SWP
MOV ACC, DOWN
JMP L

@6
X:MOV 0, DOWN
SWP
MOV ACC, DOWN
ADD 1
SAV
MOV 30, ACC
P:MOV UP, DOWN
MOV UP, DOWN
MOV UP, DOWN
MOV UP, DOWN
MOV UP, DOWN
SUB 5
JNZ P
MOV -1, DOWN
JMP X

@10
MOV UP, DOWN
