@0


@1


@2


@3


@4


@5
  JMP E
B: MOV -1  DOWN
   ADD 1
N: MOV -1  DOWN
  JLZ B
   MOV 112 ACC
A: MOV  1  LAST
E: SUB 14
  JGZ A
  JNZ N
Z: MOV 999 ANY
   SWP
   JRO DOWN
   ADD DOWN
   SAV

@6


@7


@8


@9
   MOV  0  DOWN
   MOV ACC DOWN
   SUB 8
  JGZ G
   ADD 1
   MOV 1   LAST
G: MOV 15  LAST
   SUB 10
   NEG
A: MOV  3  DOWN
   JRO ANY
   MOV  0  DOWN
   JRO ANY
  JMP A
   MOV -1  DOWN

@10