Unnamed

alias trackhost {
  if ($regex($2,/^-c(#.*)$/)) {
    if (!$chan($regml(1)) {
      echo -a Not in specified channel.
      halt
    }
    else {
      var %c = $regml(1)
      tokenize 32 $2-
    }
  }
  if (*!*@* !iswm $1) echo -a You must specify a valid hostmask to search for.
  elseif (!$iif(%c,$ialchan($1,%c,1),$ial($1,1))) echo -a No users matching the hostmask $1 were found.
  else {
    var %a = 1
    while ($iif(%c,$ialchan($1,%c,%a).nick,$ial($1,%a).nick)) {
      var %n = %n $v1
      inc %a
    }
    echo -a Users found matching hostmask $1 $+([,$numtok(%n,32)) in total]:
    echo -a $replace(%n,$chr(32),$+($chr(44),$chr(32)))
  }
}