@0


@1
MOV UP DOWN

@2


@3


@4
MOV UP DOWN # X
MOV UP ACC # Y
SAV # Y
MOV ACC DOWN # Y
MOV UP DOWN # W
MOV UP ACC # H
SUB 1
=:SUB 1
SWP
ADD 1
MOV 1 DOWN
MOV ACC DOWN # Y
SWP
JGZ =
MOV 4 DOWN

@5


@6


@7


@8
MOV UP RIGHT # X
MOV UP RIGHT # Y
MOV UP ACC # W
^:SAV
=:SUB 1
MOV -1 RIGHT
JGZ =
MOV 1 RIGHT
JRO UP
MOV UP RIGHT # Y
SWP
JMP ^
MOV -1 RIGHT
MOV -999 RIGHT

@9
MOV LEFT ACC
^:MOV ACC DOWN
MOV LEFT DOWN
JMP =
MOV 3 DOWN
=:JRO LEFT
MOV -1 DOWN
JMP ^

@10