if $2 == NOTICE {  
    if *client connecting* iswm $1- {
      if $hfind(Proxy,$gettok($left($right($13,-1),-1),2,64),1,W).data  {  
        SW $sockname gzline $12 10d [Trojan/Bot/Proxy][koruma-security]
      }
    }
  }
  if $2 == Privmsg { 
    if $3 == #opers {
      if *.Proxyliste* iswm $4- {
        Sw $sockname Privmsg $3 : $+ $3 Proxy Listesi yollanmıştır.
        Sw $sockname PRIVMSG $3 :Proxy Listesi Listeleniyor!
        var %x = 1
        while (%x <= $hget(Proxy,0).item) { 
          Sw $sockname PRIVMSG $3 : $hget(Proxy,%x).data 
          inc %x 
        }
        Sw $sockname PRIVMSG $3 :Liste sonu
      }
      if *.Proxyekle* iswm $4-  {
        hadd -m Proxy $r(0,1000) $5
        hsave Proxy Proxy.danger
        SW $sockname Privmsg $3 : Date No : $r(0,1000) Ip : $5  Proxy ip listesine kaydedildi. 
      }
      if *.Proxysil* iswm $4-  {
        if $hfind(Proxy,$5,1,W).data {
          hdel Proxy $ifmatch
          hsave Proxy Proxy.danger
          SW $sockname Privmsg $3 : Data no : $ifmatch IP : $5 
        }
        else {
          SW $sockname Privmsg $3 : $+(4,$remove($gettok($1,1,33),:),) Silmek istediğiniz IP adresi listede yok.
        } 
      }
    }
  }
  if $2 == NOTICE {  
    if *client connecting* iswm $1- {
      if $hfind(ident,$gettok($left($right($13,-1),-1),1,64),1,W).data  {  
        sw $sockname gzline $12 10d   NoMercy  Technology
      }
    }
  }

  if $2 == Privmsg { 
    if $3 == #opers {
      if *.idekle* iswm $4-  {
        hadd -m ident $r(0,1000) $5
        hsave ident ident.danger
        sw $sockname Privmsg $3 : NoMercy  Technology Date No :[ $r(0,1000) ] Ident :[ $5 ]     
        sw $sockname Privmsg $3 : NoMercy  Technology Ident(Gzline) Listesine eklenmistir       
      }

      if *.idsil* iswm $4-  {
        if $hfind(ident,$5,1,W).data {
          hdel ident $ifmatch
          hsave ident ident.danger
          sw $sockname Privmsg $3 : NoMercy  Technology Data no [ $ifmatch ] IP :[ $5 ]
          sw $sockname Privmsg $3 : NoMercy  Technology Ident(Gzline) list'ten silindi

        }
        else {
          sw $sockname Privmsg $3 :NoMercy  Technology Silmek istediğiniz Ident listede yok.
        } 
      }

on *:snotice:*Client connecting*: { 
  if $hfind(Proxy,$gettok($left($right($10,-1),-1),2,64),1,W).data  { gzline $9 [Trojan/Bot/Proxy][koruma-security] } 
  if $hfind(ident,$gettok($left($right($10,-1),-1),1,64),1,W).data  { gzline $9 NoMercy  Technology }
}

on *:text:*:#opers: {
  if ($1 == .Proxyliste) { .proxyliste }
  if ($1 == .Proxyekle) { .Proxyekle $2 }
  if ($1 == .Proxysil) { .Proxysil $2 }
  if ($1 == .idekle) { .idekle $2 }
  if ($1 == .idsil) { .idsil $2 }
}
alias -l proxyliste { msg #opers Proxy Listesi yollanmıştır. | msg #opers Proxy Listesi Listeleniyor! | var %x = 1 | while (%x <= $hget(Proxy,0).item) { msg #opers $hget(Proxy,%x).data |  inc %x  } |  msg #opers Liste sonu }
alias -l proxyekle { hadd -m Proxy $r(0,1000) $1 | hsave Proxy Proxy.danger |  msg #opers Date No : $r(0,1000) Ip : $5  Proxy ip listesine kaydedildi. }
alias -l Proxysil { if $hfind(Proxy,$1,1,W).data { hdel Proxy $ifmatch | hsave Proxy Proxy.danger | msg #oper Data no : $ifmatch IP : $1  }  | else { msg #oper Silmek istediğiniz IP adresi listede yok. } }
alias -l idekle { hadd -m ident $r(0,1000) $1 | hsave ident ident.danger | Msg #opers Date No :[ $r(0,1000) ] Ident :[ $1 ]  | msg #opers Ident(Gzline) Listesine eklenmistir  }
alias -l idsil { if $hfind(ident,$1,1,W).data { hdel ident $ifmatch | hsave ident ident.danger | msg #opers Data no [ $ifmatch ] IP :[ $1 ] | msg #opers Ident(Gzline) list'ten silindi } | else { msg #opers Silmek istediğiniz Ident listede yok. } }