@1
S: MOV UP, ACC
MOV ACC, DOWN
SAV
L: MOV RIGHT, ACC
JEZ D
SWP
MOV ACC, DOWN
SWP
JMP L
D: MOV 0, DOWN

@2
S: MOV UP, ACC
SUB 1
L: JLZ S
MOV ACC, LEFT
MOV ACC, DOWN
SUB 1
JMP L

@4
S: MOV UP, ACC
SAV
C: MOV UP, ACC
JEZ D
MOV ACC, RIGHT
M: SWP
MOV ACC, RIGHT
SWP
SUB 1
JNZ M
MOV RIGHT, ACC
SAV
JMP C
D: SWP
MOV ACC, RIGHT

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

@7
MOV UP, DOWN
