on *:SNOTICE:*Client connecting on port *: { 
  if $read(ident.txt,w,$remove($right($gettok($10,1,64 ),-1),~)) { return }
  inc -u2 %koruma 1
  if %koruma >= 4 {  
    /spamfilter add u block - - ^(.+! $+ $token($token($10,1,64),1,40) $+ @.+:.+)$   
   msg #opers  Bilgi : Agresif  Saldırı Sebebiyle .+! $+ $token($token($10,1,64),1,40) $+ @.+:.+  eklendi. 
  }
}

 if $read(ident.txt,w,$remove($right($gettok($10,1,64 ),-1),~)) { return }

on *:snotice:*Client connecting*:.enable #lcz | who +n $9 
alias uygula .spamfilter add u gline - $+(^(.+!,$1,@.+:.+)$)
#lcz off
raw 352:*:inc -u2 $+(%,$3,.lcz) | $iif($eval($+(%,$3,.lcz)) >= 4,.uygula $3)
raw 315:*:.disable #lcz
#lcz end

 gline $9 :Reklam, spam yasaktir.

/spamfilter add u block - - ^(.+! $+ $token($token($10,1,64),1,40) $+ @.+:.+)$

alias uygula .spamfilter add u gline - $+(^(.+!,$1,@.+:.+)$)

alias uygula .spamfilter add u gline - Spam $+(^(.+!,$1,@.+:.+)$)

menu * {
.» Ident Korumasi
..Açık:.enable #Ident | .echo -a 4Ident Korumasi On 
..Kapalı:.disable #Ident | .echo -a 4Ident Korumasi Off
}

#Ident off
on *:snotice:*connecting*: {
var %ident $token($token($10,1,64),1,40)
if $istok(IdentMuaf IdentMuaf-1 IdentMuaf-2 IdentMuaf-3,%ident,32) { return }
hinc -mu2 ident %ident 1
if ($hget(ident,%ident) >= 3) { /spamfilter add u block - - ^(.+! $+ $token($token($10,1,64),1,40) $+ @.+:.+)$ | hdel -m ident %ident }
}
#Ident end