@1
MOV UP,DOWN

@2
MOV UP,DOWN

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

@5
SUB UP
MOV ACC,DOWN
MOV LEFT,DOWN
SWP
ADD 8
SAV

@7
L: MOV UP,ACC
JLZ NM
NEG
ADD RIGHT
MOV ACC,DOWN
MOV UP,NIL
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
