@0
   MOV UP ACC
S: SUB 3
   JGZ A
   ADD 4
A: MOV ACC RIGHT
   ADD 1
   MOV ACC RIGHT
   MOV UP ACC
   JEZ E
   MOV 27 RIGHT
   JMP S
E: MOV 0 RIGHT

@1
B: MOV LEFT DOWN
   MOV 1 DOWN
   MOV ACC DOWN
   MOV LEFT DOWN
   SUB LEFT
   JLZ L
   SUB ACC
   MOV 2 DOWN
   JRO 999
L: MOV -1 DOWN
   ADD 30
   MOV ACC DOWN

@2


@3


@4
MOV UP DOWN

@5


@6


@7
   MOV LAST DOWN#X
   MOV ACC DOWN #Y
   JRO ANY
   MOV 3 DOWN
   JMP B
   JMP B
   MOV 0 DOWN
B: MOV 3 DOWN
A: ADD UP
   MOV -1 DOWN

@8