@1
MOV UP,DOWN

@2
MOV UP,DOWN

@4
SUB UP
MOV ACC,RIGHT
SWP
ADD 8
SAV

@5
L: SUB UP
MOV ACC,DOWN
JLZ NM
MOV LEFT,NIL
SWP
JMP I
NM: MOV LEFT,DOWN
SWP
I: ADD 8
SAV

@7
L: MOV UP,ACC
JLZ NM
NEG
ADD RIGHT
MOV ACC,DOWN
JMP L
NM: MOV UP,ACC
JLZ ON
MOV RIGHT,NIL
MOV 0,DOWN
JMP L
ON: NEG
ADD RIGHT
MOV ACC,DOWN

@8
MOV ACC,LEFT
ADD 8
