on !*:join:#:{
  if $me !isop $chan && $me !ishop $chan  { return }
  if $regex($gettok($fulladdress,2,64),/(Root|admin|ircop|oper|techinal)/i) { return }
  if $istokcs(Kelebek Sohbet mIRCNET Ayna.Net,$token($gettok($fulladdress,2,33),1,64),32) { return }
  set -u5 %identler $addtok(%identler,$token($gettok($fulladdress,2,33),1,64),32)
  inc %id.ban
  if %id.ban == 1 { .timer 1 4 .unset %id.ban }
  if %id.ban == 4 {
    unset id.ban
    var %s 1, %g $numtok(%identler,32) 
    while %s <= %g {
      mode $chan +b $+(*!,$gettok(%identler,%s,32),@*) 
      inc %s
    }
  }
}