Kod:   Kodu kopyalamak için üzerine çift tıklayın!  on @ [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]:JOIN:*:{
  if ($ulist($fulladdress,koruma,0) >= 1) { return }
  elseif !$istok(#kanal1 #kanal2 #kanal3 #kanal4 #kanal5,$chan,32) {
    mode $chan +b $nick
    kick $chan $nick Badnick sebebiyle atıldın...
  }
}
on *:NICK:{ 
  if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }
  else {
    if $ulist($+($newnick,!*@*),badnick,0) { 
      var %Cnk = 1 
      while $comchan($newnick,%Cnk) { 
        var %e = $v1 
        if $me isop %e && !$istok(#kanal1 #kanal2 #kanal3 #kanal4 #kanal5,%e,32) { 
          mode %e +b $newnick 
          kick %e $newnick Dışarı!
        } 
        inc %Cnk 
      } 
    } 
  }
}
alias badnickekle {
  auser badnick $1 $+ !*@*
}
alias badnicksil {
  ruser badnick $1 $+ !*@*
}
alias nickkoruma {
  auser koruma $1 $+ !*@*
}
alias badidentekle {
  auser badnick *! $+ $1 $+ @*
}
alias badidentsil {
  ruser badnick *! $+ $1 $+ @*
}
alias identkoruma {
  auser koruma *! $+ $1 $+ @*
}            Badnick eklemek için: 
/badnickekle ***** 
/badnickekle gay*    Badnick silmek için: 
/badnicksil ***y 
/badnicksil *lez*    Nick Koruma eklemek için: 
/nickkoruma gaye* 
/nickkoruma *tugay*    Badident eklemek için: 
/badidentekle *msn* 
/badidentekle gay    Badident silmek için: 
/badidentsil *msn* 
/badidentsil gay    İdent Koruma eklemek için: 
/identkoruma msn 
/identkoruma gaye*   
İşlemleri takip için (ALT + r) "Kullanıcı" başlığından takip edebilirsiniz.Yeni kodlamayla Nick!Ident@Hostsisteminde çalışacaktır(Daha önce sadece *maske* olarak çalışıyordu).Kanala giren kullanıcının fulladdress bilgisi "badnick:" kullanıcı maskesiyle örtüşüyorsa; evvela "koruma:" maskesinde sorgulanacaktır, tutmuyorsa kanaldan atacaktır. 
Nick değiştirme işleminde de sistem aynısı takip eder.Fakat nick değiştirme aşamasında ident kısmını sorgulamaz,sadece değişen nickin Nick kısmından sorgulama yapar.Bunu dikkate alırsınız...    İyi forumlar...  |