Stuff

alias sb {
  if ($active !ischan) {
    echo 4 $active Error: You are not on a channel.
  }
  if (!$1) {
    echo 4 $active $+(4Banlist Size,$chr(32),$chr(40),$ibl($active,0),$chr(41))
    halt
  }
  var %i = $1
  var %d = $ibl($active,0)
  var %o = 1
  while (%o <= %d) {
    if (%i iswm $ibl($active,%o)) {
      write wmsb.txt $+(4,[,$iif($lines(wmsb.txt) < 1, 1, $calc($lines(wmsb.txt) +1)),],) Matched string $+(,$chr(40),$1,$chr(41),) - $ibl($active,%o)
    }
    inc %o
  }
  echo 4 $+(4,$lines(wmsb.txt)) results found for string $+(%i,.)
  .play -e wmsb.txt
  .write -c wmsb.txt
}