fillbans {

  set %i 0

  :next

  mode # +b %i

  inc %i 1

  if (%i == 100)

  halt

  else goto next

}