@1
MOV UP, ACC
ADD 4
MOV ACC, RIGHT
SUB 4
NEG
MOV ACC, RIGHT

@2
MOV LEFT, DOWN
MOV LEFT, DOWN
MOV UP, ACC
MOV ACC, DOWN
SWP
MOV ACC, DOWN

@5
MOV RIGHT, ACC
SWP
MOV ACC, RIGHT
SWP
SAV

@6
MOV UP, DOWN
MOV UP, DOWN
MOV UP, ACC
MOV ACC, DOWN
MOV UP, ACC
MOV ACC, DOWN
MOV ACC, LEFT
MOV LEFT, ACC
MOV ACC, DOWN
MOV ACC, RIGHT
MOV RIGHT, ACC
MOV ACC, DOWN
SWP
MOV ACC, DOWN

@7
MOV LEFT, ACC
SWP
MOV ACC, LEFT
SWP
SAV

@9
T0: MOV UP, ACC
SAV
MOV UP, ACC
L: JEZ T
SUB 1
MOV UP, NIL
JMP L
T: MOV UP, ACC
MOV ACC, DOWN
SWP
L2: JEZ T0
SUB 1
MOV UP, NIL
JMP L2
