@0


@1
L: MOV UP, ACC
   SAV
   MOV UP, ACC
C: MOV ACC, DOWN
   SWP
   SUB 7
   JLZ S
   MOV 1, DOWN
   ADD 1
   SWP
   JMP C
S: NEG
   MOV ACC, DOWN

@2


@3


@4


@5
MOV UP, RIGHT

@6
   MOV LEFT, ACC
L: JRO LEFT
   MOV ACC, DOWN
   MOV ACC, DOWN
   MOV ACC, DOWN
   MOV ACC, DOWN
   MOV ACC, DOWN
   MOV ACC, DOWN

@7


@8


@9


@10
R: MOV -1, DOWN
   MOV 0, DOWN
   SWP
   MOV ACC, DOWN
   ADD 1
   SAV
   MOV 30, ACC
L: MOV UP, DOWN
MOV UP, DOWN
MOV UP, DOWN
MOV UP, DOWN
MOV UP, DOWN
MOV UP, DOWN
   SUB 6
   JGZ L

@11

