@0
MOV 7, DOWN
T: MOV 17, ACC
S: SAV
MOV 4, DOWN
P: MOV 8, DOWN
SUB 1
JGZ P
SWP
SUB 2
JGZ S
MOV 1, DOWN
JMP T

@2
L: JRO UP
MOV -9, DOWN
MOV 10, DOWN
MOV 1, DOWN
SWP
NEG
JMP L
MOV 1, ACC
MOV ACC, DOWN
SWP
MOV ACC, DOWN
SWP
MOV 0, DOWN

@6
MOV 3, ACC
SAV
MOV 22, ACC
L: ADD UP
MOV ACC, RIGHT
MOV UP, RIGHT
SWP
ADD UP
MOV ACC, RIGHT
SWP
JMP L

@7
MOV -1, ACC
L: MOV LEFT, DOWN
ADD LEFT
MOV ACC, DOWN
MOV LEFT, DOWN
MOV -1, DOWN
JMP L
