alias -l kb_bantime { return 3600 } ; Ban seconds
alias -l kb_bantype { return 2 } ; Ban type (/help $mask)
 
ON @!*:JOIN:#test1: {
  var %host = $address($nick,2)
  var %domain = $address($nick,4)
  var %fullhost = $address($nick,5)
 
  var %ident = $remove($gettok($gettok(%fullhost,2,33),1,64),~)
 
 
  if (!$ulist(%domain,host,0))
      elseif (*.IP iswm %h) { ban $+(-u,$kb_bantime) %c *!*@*. $+ $gettok(%h,3-,46)  }
      else { ban $+(-ku,$kb_bantime) %c $1 $kb_bantype $kb_reason }
    }
 
  }
}