@0
ADD UP
G:SUB 100
JLZ L
JGZ G
NOP
NOP
L:SAV
S:MOV LAST ACC
MOV ACC LAST
J:JNZ S
SWP
MOV ACC ANY
MOV ACC RIGHT
MOV 0 RIGHT
MOV 100 ACC

@1


@2


@3


@4
   MOV 6 DOWN
N: MOV LAST ACC
   MOV ACC DOWN
   JNZ N
   MOV ANY DOWN
   MOV UP ACC
   JNZ G
   MOV UP DOWN
   MOV 0 UP
L: MOV -2 DOWN
   JEZ N
G: MOV DOWN ACC
   MOV ACC UP
   SUB DOWN
   JLZ L

@5


@6


@7
   MOV UP  ACC
   JNZ R
   MOV UP   ACC
   JEZ O
   MOV LEFT ANY
   MOV ACC  UP
   JRO UP
E: ADD 100
   MOV ACC DOWN
O: MOV ANY ACC
   JLZ E
   MOV UP DOWN
   MOV UP LEFT
R: MOV ACC LEFT

@8