@1
A: MOV UP, ACC
SAV
MOV RIGHT, ACC
L: JEZ E
SUB 1
SWP
MOV ACC, DOWN
SWP
JMP L
E: MOV 0, DOWN

@2
MOV UP, LEFT

@4
MOV UP, DOWN

@6
L: MOV UP, ACC
JEZ F
MOV ACC, RIGHT
SWP
SWP
I: SUB 1
SWP
ADD RIGHT
SWP
JNZ I
E: SWP
MOV ACC, RIGHT
JMP L
F: MOV 0, RIGHT

@7
MOV 1, ACC
L: SAV
MOV LEFT, ACC
JEZ E
SWP
SWP
I: SUB 1
SWP
MOV ACC, LEFT
SWP
JNZ I
M: MOV LEFT, ACC
JMP L
E: SWP
MOV ACC, DOWN
