on *:JOIN:#:{ 
  if ($level($nick) == muafnlist) { halt }
  if ($level($chan) == muafclist) { halt }
  if ($regex($address($nick,2),/(helper|admin|ircop|services|dj.|tech|global)/i)) { halt }
  if $nick isop $chan { halt }  
  if ($ial == $false) .ial on 
  if ($chan(#).ial == $false) { who # | return } 
  var %total = $ialchan($wildsite,#,0) 
  if (%total > 4) { 
    var %i = 0 
    while (%i < %total) { 
      inc %i 
      var %nick = $ialchan($wildsite,#,%i).nick 
      var %all.nicks = $addtok(%all.nicks,%nick,32) 
      if (%nick !== $me) {  
        .raw gzline %nick 2Agresif Giris Tespit Edilmistir  Trojen:4 %total 
        .unset %nick  
      } 
    } 
  } 
}

#sericlone on
on *:snotice:*Client connecting on*:{
  .timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] 
  inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] 
  if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 5 { 
    .kline $+(*@,$gettok($gettok($10,2,64),1,41)) 4C12Lone 4G12irişi 4Y12apmak 4Y12asaktır 4T12RBot..!
    unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
  }
}
#sericlone end

#sericlone on on *:snotice:*Client connecting on*:{   .timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]    inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]    if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 5 {      .kline $+(*@,$gettok($gettok($10,2,64),1,41)) 4C12Lone 4G12irişi 4Y12apmak 4Y12asaktır 4T12RBot..!     unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]   } } #sericlone end

buna muaf ip ve nick nasıl ekleriz nick ve muaf ip i text dosyasından okusa dahada kullanışlı olur 

yada hali hazırda clone koruması snotice eventli muaf ip ve nick de olucak

on *:snotice:*: { 
  if *client conn* iswm $1- {
if !$istok(nick1,nick2,nick3,nick4,nick5,$9,32) { 
    if !$hget(clone) { hmake clone 1000 }  
    if ($hget(clone,$gettok($gettok($10,2,64),1,41)) > 2) { 
      zline *@ $+ $gettok($gettok($10,2,64),1,41) 900 clone yogunlugu 
    }
    hinc -m clone $gettok($gettok($10,2,64),1,41)
  }
}
  if *client exiting* iswm $1- { 
    hdec clone $gettok($gettok($10,2,64),1,41)
  }
}

on *:snotice:*: { 
  if *client conn* iswm $1- {
    if !$istok(nick1,nick2,nick3,nick4,nick5,$9,32) { 
      if $gettok($gettok($10,2,64),1,41)) != 124.22.22.22 || $gettok($gettok($10,2,64),1,41)) != 141.4141.414.414 { 
        if !$hget(clone) { hmake clone 1000 }  
        if ($hget(clone,$gettok($gettok($10,2,64),1,41)) > 2) { 
          zline *@ $+ $gettok($gettok($10,2,64),1,41) 900 clone yogunlugu 
        }
        hinc -m clone $gettok($gettok($10,2,64),1,41)
      }
    }
  }
  if *client exiting* iswm $1- { 
    hdec clone $gettok($gettok($10,2,64),1,41)
  }
}