Tekil Mesaj gösterimi
Alt 19 Mayıs 2009, 16:22   #2
Çevrimdışı
Lucifer
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Texten Hızlı Okutmak




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
 
alias bkufur 
//Ban -u $+ 900 # $nick 2 } | .mode $chan +b $nick | .kick $chan $1 Kanal genelindeki duzeysiz konusmalariniz sebebiyle uzaklastirildiniz.  | halt }
#Kufurler on
ON @*:TEXT:*:#:if ($_kufur(#,$nick,$1-)) bkufur $nick
ON @*:NOTiCE:*:#:if ($_kufur(#,$nick,$1-)) bkufur $nick
ON @*:ACTION:*:#:if ($_kufur(#,$nick,$1-)) bkufur $nick
#Kufurler end
$_kufur(kanal,nick,yazi)
alias -l _kufur {
  if ($
2 isop $1) || ($istok(#Opers #Ops #Services #Log #Operhelp #help,$1,32)) return
  
if (*a.?* iswm $3-) || (a.?* iswm $3-) || (a.qiswm $3-) || (s?ürtügiswm $3-) || (o?rosbuiswm $3-) || (o?nun bunun cocuiswm $3-) || (anana y?diriswm $3-) || (SİİKİiswm $3-) || (KâlTâkiswm $3-) || (*? siker?* iswm $3-) || (sakso ?* iswm $3-) || (kodumun ?* iswm $3-)   return 1
  
if (Dötiswm $3-) || (sullaleniswm $3-) || (****** iswm $3-) || (a??cghını yltmk iiswm $3-) || (siikiiswm $3-) || (*? ananla ?* iswm $3-) || (*? ananı ?* iswm $3-) || (*? sokim ?* iswm $3-) || (******** iswm $3-) || (*? bok ?* iswm $3-) || (i?nelik iswm $3-) || (*? kıLLı  ?* iswm $3-) return 2
  
if (*? amın ?* iswm $3-) || (*? ananısı ?* iswm $3-) || (*arka deliğeiswm $3-) || (*? arka deliğe ?* iswm $3-) || (*malı şöyle vuracaksıniswm $3-) || (*? zilli ?* iswm $3-) || (*? zıllı ?* iswm $3-) || (fai..şeiswm $3-) || (sıktır ?* iswm $3-) || (Amînîiswm $3-) || (gavahtiswm $3-) return 3
  
if (*S İ K İiswm $3-) || (s i k iiswm $3-) || (s.i.k.iiswm $3-) || (*? o.ç ?* iswm $3-) || (*? o.?* iswm $3-) || (*? o.çiswm $3-) || (*? o.ciswm $3-) || (s..tiriswm $3-) || (s?k?t?i?r gitiswm $3-) || (s!kt!* iswm $3-) || (*? ananız ?* iswm $3-) || (s!keriswm $3-) || (*? ananıniswm $3-) return 4
  
if (*? am ?* iswm $3-) || (ananı siiswm $3-) || (göt ?* iswm $3-) || (â.qiswm $3-) || (â-qiswm $3-) || *anasına ?* iswm $3-) || (çocuguiswm $3-) || (cocuguiswm $3-) || (seks ?* iswm $3-) || (emmeli ?* iswm $3-) || (k.o.yumiswm $3-) return 5
  
if (*A nneniiswm $3-) || (*kanbo?ukiswm $3-) || (*? ***** ?* iswm $3-) || (*? amcik ?* iswm $3-) || (sktir ?* iswm $3-) || (*ni yalar?miswm $3-) || (sikimiswm $3-) || (sihikiswm $3-) || (am iswm $3-) || (Anânîzîniswm $3-) || (a.k. ?* iswm $3-) || (mikicemiswm $3-) return 6
  
if (*a.kiswm $3-) || (a.giswm $3-) || (m.kiswm $3-) || (m.qiswm $3-) || (******* iswm $3-) || (******iswm $3-) || (PİÇiswm $3-) || (**** iswm $3-) || (kaşariswm $3-) || (*ka$ariswm $3-) return 7
  
if (*Qrospuiswm $3-) || (dangalakiswm $3-) || (a-qiswm $3-) || (********* iswm $3-) || (amcukiswm $3-) || (****** iswm $3-) || (******** iswm $3-) || (sikicemiswm $3-) || (ShîKécém iswm $3-) return 8
  
if (*şıllıkiswm $3-) || (kaltakiswm $3-) || (s!keriswm $3-) || (*? ***** ?* iswm $3-) || (******** iswm $3-) || (yarragımiswm $3-) || (zalaqiswm $3-) || (zalakiswm $3-) || (zuhecemiswm $3-) || (zuherimiswm $3-) || (sikikiswm $3-) return 9
  
if (*pheseiswm $3-) || (An.Ne.Neiswm $3-) || (ananuniswm $3-) || (ámínáiswm $3-) || (aNheniiniswm $3-) || (ánáníniswm $3-) || (zikicemiswm $3-) || (zikikiswm $3-) || (sikemiswm $3-) || (a_qiswm $3-) return 10
  
if (*0r0 Spuiswm $3-) || (y.lattırmakiswm $3-) || (a'q* iswm $3-) || (a-q* iswm $3-) || (kaşhar* iswm $3-) || (ka$har* iswm $3-) || (öküz* iswm $3-) || (zohacam* iswm $3-) || (zihecem* iswm $3-) || (p.i.ç* iswm $3-) || (a;q* iswm $3-) || (ÂnÂni* iswm $3-) return 11
  if (*goyum* iswm $3-) || (qoyum* iswm $3-) || (m!q* iswm $3-) || (mahL* iswm $3-) || (a!q* iswm $3-) || (a!g* iswm $3-) || (ananı siker* iswm $3-) || (Siqe* iswm $3-) || (Döthü* iswm $3-) || (Koyıyım* iswm $3-) || (ejdadını* iswm $3-) || (ibne* iswm $3-) return 12
  if (*ahmmcıgına* iswm $3-) || (ânân?* iswm $3-) || (YeNgElEriNi* iswm $3-) || (*?éqérím* iswm $3-) || (DinqiL* iswm $3-) || (ANAAN* iswm $3-) || (****** iswm $3-) || (Ghötünü* iswm $3-) || (Anhenin* iswm $3-) || (Anneni sik* iswm $3-) || (sıkıyım* iswm $3-) return 13
  if (SaLaq* iswm $3-) || (A.cığ.nı* iswm $3-) || (hepinizin* iswm $3-) || (o c iswm $3-) || (GTHUNE* iswm $3-) || (VE3RİRİM* iswm $3-) || (PİÇ* iswm $3-) || (*** iswm $3-) || (Sochy!m* iswm $3-) || (anneen* iswm $3-) || (* siksin* iswm $3-) || (or gan la* iswm $3-) return 14
  if (*SiKeYiM* iswm $3-) || (sokar?m* iswm $3-) || (*A-V-R-A-DI-N-I* iswm $3-) || (*4_k* iswm $3-) || (*$hq£R!M* iswm $3-) || (*****ken* iswm $3-) || (******** iswm $3-) || (******* iswm $3-) || (sik si* iswm $3-) || (* topunuz* iswm $3-) || (zi ke* iswm $3-) || (*amcıq* iswm $3-) return 15
  if (*gotler* iswm $3-) || (a m ı na* iswm $3-) || (0r0$pu* iswm $3-) || (qajar* iswm $3-) || (o ç iswm $3-) || (aMCuh* iswm $3-) || (sikebil* iswm $3-) || (*Sié* iswm $3-) || (*sıkeyım seni* iswm $3-) || (*becerir* iswm $3-) || (*a.m.k* iswm $3-) || (*ænænın* iswm $3-) return 16
  if (*şie* iswm $3-) || (amına * iswm $3-) || (SëñIñ* iswm $3-) || (sıker* iswm $3-) || (a..q* iswm $3-) || (ZÜKEr* iswm $3-) || (amina kor* iswm $3-) || (*******l* iswm $3-) || (****** iswm $3-) || (ıbne* iswm $3-) || (ibne* iswm $3-) || (s.i.k.?* iswm $3-) return 17
  if (*anasını siker* iswm $3-) || (* Amg * iswm $3-) || (*Siğimi* iswm $3-) || (*Siğerım* iswm $3-) || (* s?ğer?m * iswm $3-) || (*gohthunu* iswm $3-) || (a zı na* iswm $3-) || (s2k* iswm $3-) || (s!ker* iswm $3-) || (ZühKéR* iswm $3-) || (Ânâs* iswm $3-) || (ØrØsbû* iswm $3-) || (zike* iswm $3-) || (S!q!cém* iswm $3-) || (Sokaim* iswm $3-) || (soyunu* iswm $3-) || (Anhanı* iswm $3-) || (SİKE* iswm $3-) || (AhNaN* iswm $3-) || (a-na-n-i* iswm $3-) || (si-ki10m* iswm $3-) || (a/q* iswm $3-) || (a/g* iswm $3-) || (m/q* iswm $3-) return 18
  var %i 1
  while $gettok(%kufurss,%i,46) {
    if ($ifmatch isin $3-) return 1
    inc %i
  }
}
#Kufurler end 


Daha önceden PC'imde mevcut olan bir code, Coderini bilmiyorum ama işine yarayacağına inanıyorum. Bu code ile kanal genelinde küfür edenler mutlaka atılacaktır, Cümle içinde yada tek başına fark etmez.. Ayrıca dediğiniz gibi belirlemiş olduğunuz odalarda işlevi olmaz.

Örnek

* eLdorado sets mode: +I carpat!*@*
* carpat has joined #X
<carpat> a.k
* carpat was kicked by eLdorado (Kanal genelindeki duzeysiz konusmalariniz sebebiyle uzaklastirildiniz.)

Herhangi bir problem var ise, konu başlığı altında belirtirsen yardımcı olunacaktır.

Örnek için kusura bakmayınız, saygılarımla iyi forumlar..

__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.

Konu Lucifer tarafından (19 Mayıs 2009 Saat 16:23 ) değiştirilmiştir. Sebep: Ekleme..
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan