IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - /* mIRC SpamFilter(unrealircd) <text> oluşturucu */

- mIRC Parça Kodlar (https://www.ircforumlari.net/mirc-parca-kodlar/)

- - /* mIRC SpamFilter(unrealircd) <text> oluşturucu */ (https://www.ircforumlari.net/mirc-parca-kodlar/531676-mirc-spamfilterunrealircd-lttextgt-olusturucu.html)

/* mIRC SpamFilter(unrealircd) <text> oluşturucu */

/* mIRC SpamFilter(unrealircd) <text> oluşturucu */

Sürekli SpamFilter ekleyen kullanıcılar için, dizayn etmiş olduğum ufak bir alias.

/* Kullanım */

Kullanımı çok basittir. altta göstermiş olduğum şekilde, uygularsanız ekleyeceğiniz her türlü kelimeyi, uygun hale getirecektir, bu sayede de spamfilter üzerinde yanlış ekleme yapmaktan kurtulacaksınız.

Kod:

//spamfilter add c block - <reason> $_cr(<text>)

/* Örnek */

Kod:

//echo -a -> $_cr(bu bir deneme spam\ıdır\.*?)
 return -> bu.?bir.?deneme.?spam\\ıdır\\\.\*\?

/* Alias */

Kod:

alias _cr { if $remove($regsubex($1-,$regsubex($1-,/([[:punct:]])/g,$+($chr(92),\1)),/([[:space:]])/g,$+($chr(46),$chr(63),\1)),$chr(32)) { return $ifmatch } }

Not: Kodu, ALT+R yaptıktan sonra, remote penceresinde uygun bir yere eklemeniz yeterli olacaktır, kod mIRC6.17 ve üzeri version'larda çalışmaktadır. (regsubex support)

Cevap: /* mIRC SpamFilter(unrealircd) <text> oluşturucu */

;--- Yapılması gerekenden 1 fazlası daha : W
;--- Spamfilter'i kullanma sıkıntısı cekenler içinde ;
;--- Bende böyle bir kolaylık açısından bu kodu paylaşım.

Kod:

on *:input:#:{

  if $1 == -spam {

    //echo -a 0 $_cr( $+ $2- $+ )  | .timer 1 1 msg # 2Çözülen-S 6 $_cr( $+ $2- $+ )  2 < belirtildiği gibi eklenmeli.

  }

 if $1 == -sblock {

    /Spamfilter add $2 block 24h 1[2IRC_Security_Protection]  $3-  | .timer 1 1 msg #Security  2Belirtilen Spamfilter ~~ 5 ( 2Alınan Block Mode : 1 $2 2 Alınan SPAM : 1 $3- 5)  Sebeb : 1[2IRC_Security_Protection]

  } 

}

;--- Kullanımı :
-spam yazılcak kelime : ( kontrol amaçlı denetim )
-sblock yazılcak kelime : ( spamfilter ekleme metni )
;---

;--- ÖRNEK :
; -spam
;---[19:29:22] [ Available ] ~ : -spam Deneme amaclı yazılıp kontrol edilmiştir.
;---[19:29:24] <Available> Çözülen-S Deneme.?amaclı.?yazılıp.?kontrol.?edilmiştir\. < belirtildiği gibi eklenmeli.
;---
; -sblock
;---[19:30:11] [ Available ] ~ : -sblock cp Deneme.?amaclı.?yazılıp.?kontrol.?edilmiştir\.
;---[19:30:13] <Available> Belirtilen Spamfilter ~~ ( Alınan Block Mode : cp Alınan SPAM : Deneme.?amaclı.?yazılıp.?kontrol.?edilmiştir\. ) Sebeb : [IRC_Security_Protection]
;---
;---Not :
;--- Spamfilter ceza şekli : block'a ayarlıdır : '' Block - kill - Gzline '' olarak değiştire bilirsiniz.
;--- Sblock < Spamfilter'de : '' $2 - $3- '' kısmı kullanılmıştır.
;--- $2 < yasaklancak : Mode ;
;--- u : Nick!ident@Host(ıp) yasaklar
;--- c : Kanal'a mesaj yasaklar
;--- p : Özel'e mesaj yasaklar
;--- N : Kanal'a notice yasaklar
;--- a : Away mesaj'ını yasaklar
;--- $3- < Yasaklancak metin ( Cümle )
;--- $3 ( - ) tire vardır , yani yazılcak cümlenin kelimesini değil , cümlenin tamamını kapsar.

;--- Saygılarımla ; kSc

Cevap: /* mIRC SpamFilter(unrealircd) <text> oluşturucu */

saqoL işime yaradı

Cevap: /* mIRC SpamFilter(unrealircd) <text> oluşturucu */

Alıntı:

WingmaN Nickli Üyeden Alıntı (Mesaj 1041303437)

Kod:

//spamfilter add c block - <reason> $_cr(<text>)

/* Örnek */

Kod:

//echo -a -> $_cr(bu bir deneme spam\ıdır\.*?)
 return -> bu.?bir.?deneme.?spam\\ıdır\\\.\*\?

/* Alias */

Kod:

alias _cr { if $remove($regsubex($1-,$regsubex($1-,/([[:punct:]])/g,$+($chr(92),\1)),/([[:space:]])/g,$+($chr(46),$chr(63),\1)),$chr(32)) { return $ifmatch } }

Not: Kodu, ALT+R yaptıktan sonra, remote penceresinde uygun bir yere eklemeniz yeterli olacaktır, kod mIRC6.17 ve üzeri version'larda çalışmaktadır. (regsubex support)

bunun mirce ekleme ve kullanımı nasıl acaba ?

Cevap: /* mIRC SpamFilter(unrealircd) <text> oluşturucu */

Alıntı:

WingmaN Nickli Üyeden Alıntı (Mesaj 1041303437)

Not: Kodu, ALT+R yaptıktan sonra, remote penceresinde uygun bir yere eklemeniz yeterli olacaktır, kod mIRC6.17 ve üzeri version'larda çalışmaktadır. (regsubex support)

istediğiniz cevab: