8 Mayıs 2011 Pazar

mIRC Spamfilter ekleme

spamfilter ekleme aliass



Kod:



alias spamekle {
  spamfilter add cpNna gzline - 2Â 7n 2t 7î 2c 7ode 4  $yildiztemizle($1-)
}

alias spamsil {
  spamfilter del cpNna gzline - 2Â 7n 2t 7î 2c 7ode 4  $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,$chr(94),%y,$chr(124),%y,$chr(40),%y,$chr(41),%y,$chr(164),%y,$chr(33),%y,$chr(123),%y,$chr(125),%y,$chr(189),%y,$chr(188),%y,$chr(39),%y,$chr(46),%y,$chr(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- )
}

/spamekle Kelime. /Spamsil Kelime. AraLikLi Spam ekLemenin

Hiç yorum yok:

Yorum Gönder