on @badnick:JOIN:*:{
  if ($ulist($nick,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 ($level($newnick) == badnick) { 
      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 
      } 
    } 
  }
}

Badnick eklemek :
Örnek) /auser badnick *gay*
Örnek) /auser badnick *sex*
Örnek) /auser badnick lez*
Örnek) /auser badnick *top*
Örnek) /auser badnick travesti

Koruma(nick) eklemek :
Örnek) /auser koruma gaye
Örnek) /auser koruma *tugay*
Örnek) /auser koruma turgay*
Örnek) /auser koruma leziz_yemek
Örnek) /auser koruma topcu_piyade

Badnick veya Koruma Silmek :
Örnek) /ruser koruma gaye
Örnek) /ruser badnick lez*

Bu işlemlerin nerde olup bittiğini görüntülemek için (Alt + r) ile açılan panelde "KULLANICI" başlığını tıklayınız.
Muaf kanal konusuna gelince hem JOIN hemde NICK event'larında " !$istok(#Kanal1 #Kanal2 #Kanal3 #Kanal4 #Kanal5,$chan,32) " gereken yerlere kanal isimlerini yazarsanız.Ben 5 kanal yazdım, kanalları çoğaltma imkanınız var.

Kod Mantığı; kanala giren "badnick" listesinden biri önce "koruma" listeden olup olmayacağı sorgulanacaktır.Değilse ve muaf kanallar bulunmuyorsa işlem yapacaktır.Nick değiştirme konusunda da işlem benzerini takip eder.
Üstteki txt'ye göre daha seri işlem yapacaktır ve en önemlisi gereksiz yere while döngüsüne sokmaktan(mIRC'i kasmak) kurtulmuş olduk.
kaynak: ircforumlari.net

En güzel aşklar ve dostluklar bu sitede..

Site İçerikleri

Oyunlar	Adanalı İzle	Şiirler
Gazeteler	Arka Sıradakiler İzle	Resimler
Güzel Sözler	Kutsal Damacana İzle	izmir sohbet
Hazır Mesajlar	Akasya Durağı İzle	Kızlarla Sohbet
istanbul sohbet	Ah Kalbim İzle	Canlı Tv Kanalları
TJK At Yarışı Sonuçları	Aliye İzle	Canlı Tv İzle
Ankara Chat	Geniş Aile İzle	TJK Tv
TJK Canlı Yayın	Ankara Sohbet	Canlı Sohbet
Mirc İndir	Güncel Haber Bloğu
iddaa	Limewire indir