@1
MOV UP, RIGHT

@2
S: MOV LEFT, ACC
SAV
MOV UP, ACC
MOV ACC, DOWN
JLZ N
C: MOV ACC, DOWN
L: JEZ S
SWP
MOV ACC, DOWN
SWP
SUB 1
JMP L
N: NEG
JMP C

@5
MOV UP, DOWN
MOV UP, ACC
SAV
MOV 0, ACC
L: SWP
JEZ D
SUB 1
SWP
ADD UP
JMP L
D: SWP
MOV ACC, DOWN

@7
S: MOV UP, ACC
SAV
MOV UP, ACC
JLZ N
MOV ACC, DOWN
JMP S
N: NEG
MOV ACC, DOWN
