mIRCbuL.Net Türkçe mIRC indir

on *:text:*:#: { var %: $lines(kufur.txt)
  while (%: > 0) { if $read(kufur.txt,%:) iswm $strip($1-) {
      sajoin $nick 0
      msg $nick # kanalında küfür ettiginiz için tüm kanallardan çıkartılıp #spam kanalına alındınız
shun $nick Kufur | sajoin $nick #spam } | dec %: } }

Sitenizi küfüre karşı   koruma amaçlı  olan bu kod küfür eden nicki tüm kanallardan çıkartır #spam kanalına çeker ve shunlar. 

 kufur  adında  bir text dosyasına eklemek istedeğiniz küfürleri yazıyorsunuz.Mircinize bu text dosyasını koyuyorsunuz.Alt +R remote kısmına ekliyorsunuz kodu. Sadece oper adminler kullanabilir.

Yığın İleti (SPAM) Nedir?

Elektronik posta (e-posta), internet’in en eski ve halen en vazgeçilmez iletişim araçlarından birisidir. E-posta, fiziksel, alışılagelmiş posta alımı ya da gönderiminin elektronik olanı ve internet üzerinden gerçekleştirilen, düşük maliyetli ve hızlı duyulan güvenlik, hız, kimlik denetimi gibi gereklilikler göz önünde bulundurulmamış tır ve bu yüzden e-posta altyapısı günümüzde İnternet’in en büyük problemlerine yataklık etmektedir. “Spam” aynı zamanda Geo. A. Hormel and Company (Hormel) şirketi tarafından üretilen domuz eti konservesinin de adıdır.

Mircinizde ALT  + R  yaparak calıstırabilirsiniz.  spamekle, spamsil gibi komutlarla rahat sekil de ekleyebilir ve silebiliriz.

alias spamekle {
spamfilter add cpNna gzline – $server $yildiztemizle($1-)
}
alias spamsil {
spamfilter del cpNna gzline – $server $yildiztemizle($1-)
}
alias yildiztemizle {
var %y $+(.,?) , %yi
if $numtok($1-,32) == 1 {
var %1kelime 1
}
%yi = $replace($1-,$chr(42),%y,$chr(36),%y,$chr(91),%y,$chr(93),%y,$ chr(92),%y,$chr(47),%y,$chr(43),%y,$chr(63),%y,$ch r(94),%y,$chr(124),%y,$chr(40),%y,$chr(41),%y,$chr (164),%y,$chr(33),%y,$chr(123),%y,$chr(125),%y,$ch r(189),%y,$chr(188),%y,$chr(39),%y,$chr(46),%y,$ch r(44),%y,$chr(60),%y,$chr(61),%y,$chr(62),%y,$chr( 34),%y,$chr(199),%y,$chr(221),%y,$chr(58),%y,$chr( 45),%y,$chr(254),%y,$chr(222),%y,$chr(32),%y)
if %1kelime {
%yi = $+(^,%yi,$chr(36))
}
return $iif($len($remove(%yi,.,*)) > 5,%yi,SPAMKONTROLUNDEGECERSIZ aslolan mesaj: $1- )
}