on *:JOIN:#:{
  if ($nick == $me) {
    timer 1 2 msg $chan 14 Scanning for globally blacklisted!
    timer 1 3 msg $chan 14...
    var %s = 1
    while (%s <= $nick($iif(!$2,$chan,$2),0)) {
      $iif($nick($iif(!$2,$chan,$2),%s) isin %blist,inc %bfound)
      $iif($nick($iif(!$2,$chan,$2),%s) isin %blist,timer 1 4 ban -k $chan $nick($iif(!$2,$chan,$2),%s) 2 ~Blacklisted~ )
      inc %s
    }
    timer 1 5 msg $iif(!$2,$chan,$2) 14I found4 $iif(%bfound,%bfound,0) 14blacklisted person durning my scan!
    unset %bfound
  }
}