All pastes #498933 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-05-20 19:37 UTC
rendered paste body
on *:TEXT:!track*:#lookoutpoint:{
  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))) 
    } 
  }
}