@1
MOV UP, ACC
SAV
MOV RIGHT, ACC
L: SWP
MOV ACC, RIGHT
SWP
SUB 1
JNZ L
MOV 0, RIGHT

@2
MOV UP, ACC
MOV ACC, LEFT
T: MOV DOWN, ACC
SAV
S: MOV LEFT, ACC
MOV ACC, DOWN
JEZ D
L: SWP
MOV ACC, DOWN
SWP
SUB 1
JNZ L
JMP T
D: SWP
MOV ACC, DOWN

@5
MOV 1, UP
R: MOV UP, ACC
JEZ D
L: SWP
ADD UP
SWP
SUB 1
JNZ L
T: SWP
MOV ACC, UP
JMP R
D: MOV UP, DOWN

@7
MOV UP, DOWN
