@0
  JRO UP
   MOV DOWN RIGHT
   MOV 7 RIGHT
   MOV 40 LEFT
   MOV 9 RIGHT

@1
   MOV LEFT DOWN
   MOV -4 DOWN
   MOV 9 DOWN
   MOV -8 DOWN
   MOV -5 DOWN
   MOV -6 DOWN
   MOV -6 DOWN
   MOV -2 DOWN
   MOV -5 DOWN

@2
   MOV 7 ACC
   SUB RIGHT
   ADD RIGHT
   >:SUB 7
   MOV 1 RIGHT
   JLZ L
   JGZ >
   MOV 9 ACC
   JMP >
L: MOV 2 RIGHT
   MOV -10 RIGHT
S: MOV 1 RIGHT
   ADD 1
   JLZ S

@3
   MOV 1 DOWN
   MOV 1 DOWN
   MOV 7 DOWN

   MOV ANY LEFT

   MOV ANY LEFT
   MOV LEFT DOWN
   JRO -1

@4
   MOV 1 ANY
   MOV 8 DOWN

@5
   JRO UP
   MOV -5 DOWN
   MOV 7 DOWN
   MOV -4 DOWN
   MOV -7 DOWN
   MOV -8 DOWN
   MOV -3 DOWN
   MOV -6 DOWN
   MOV 1 DOWN
&: MOV UP DOWN
   JMP &

@6


# READ FROM RIGHT
# IF POSSIBLE, OR
# FROM STACK WHICH
# FORCES OUT NODE
# TO READ UP WITH
# SOME NICE FTL!

@7
   MOV 0 DOWN
   MOV 0 DOWN
   MOV 0 DOWN
   JRO ANY
   MOV ACC DOWN
   MOV ACC DOWN
   MOV ACC DOWN
   MOV ACC DOWN
   MOV ACC DOWN
   MOV ACC DOWN
   MOV ACC DOWN
   ADD LEFT
   MOV ACC DOWN
   JRO RIGHT

@8
   MOV UP LEFT
   JRO UP
   MOV -4 LEFT
   MOV -8 LEFT
   MOV -2 LEFT
   MOV -4 LEFT
   MOV -9 LEFT
   MOV -4 LEFT
   MOV -5 LEFT
   MOV -5 LEFT
   MOV -6 LEFT
&: MOV UP LEFT
   JMP &