IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Texten Hızlı Okutmak (https://www.ircforumlari.net/mirc-scripting-sorunlari/210967-texten-hizli-okutmak.html)

Cihandar 19 Mayıs 2009 15:35
Texten Hızlı Okutmak
 
PHP- Kodu:
on 1:TEXT:lan:#: { 
  if ($chan == #opers) { halt }
  if ($chan == #services) { halt }
  if ($chan == #log) { halt }
  if ($chan == #operhelp) { halt }
  if ($chan == #guvenlik) { halt }
  if ($chan == #help) { halt }
  if ($nick isop $chan) { halt } 
  ban -k # $nick 2 1Argo konuşmak yasaktır! %banl 
  halt
} 
PHP- Kodu:
#kufur on
on 1:text:*:#:{ 
  if ($chan == #opers) { halt }
  if ($chan == #services) { halt }
  if ($chan == #log) { halt }
  if ($chan == #operhelp) { halt }
  if ($chan == #guvenlik) { halt }
  if ($chan == #help) { halt }
  if (g** isin $-) || (p** isin $-)  {
    ban -k # $nick 2 1Küfürlü konuşmak yasaktır! %banl 
    halt
  }
} 
Bu Şekilde Teker Teker Okutmak Yerine Texten Hızlı Okutmayı Nasıl Sağlayabilirm. Yardımlarınız İçin Şimdiden Teşekkür Ederim .

Dipnot: Yalnız Yukardaki Gibi Bazı Kanallarda İşlem Yapmayacak .

Lucifer 19 Mayıs 2009 16:22
Cevap: Texten Hızlı Okutmak
 
PHP- Kodu:
 
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.k ?* iswm $3-) || (a.g ?* iswm $3-) || (a.q* iswm $3-) || (s?ürtüg* iswm $3-) || (o?rosbu* iswm $3-) || (o?nun bunun cocu* iswm $3-) || (anana y?dir* iswm $3-) || (SİİKİ* iswm $3-) || (KâlTâk* iswm $3-) || (*? siker?* iswm $3-) || (sakso ?* iswm $3-) || (kodumun ?* iswm $3-)   return 1
  if (Döt* iswm $3-) || (sullalen* iswm $3-) || (****** iswm $3-) || (a??cghını yltmk i* iswm $3-) || (siiki* iswm $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ğe* iswm $3-) || (*? arka deliğe ?* iswm $3-) || (*malı şöyle vuracaksın* iswm $3-) || (*? zilli ?* iswm $3-) || (*? zıllı ?* iswm $3-) || (fai..şe* iswm $3-) || (sıktır ?* iswm $3-) || (Amînî* iswm $3-) || (gavaht* iswm $3-) return 3
  if (*S İ K İ* iswm $3-) || (s i k i* iswm $3-) || (s.i.k.i* iswm $3-) || (*? o.ç ?* iswm $3-) || (*? o.c ?* iswm $3-) || (*? o.ç* iswm $3-) || (*? o.c* iswm $3-) || (s..tir* iswm $3-) || (s?k?t?i?r git* iswm $3-) || (s!kt!* iswm $3-) || (*? ananız ?* iswm $3-) || (s!ker* iswm $3-) || (*? ananın* iswm $3-) return 4
  if (*? am ?* iswm $3-) || (ananı si* iswm $3-) || (göt ?* iswm $3-) || (â.q* iswm $3-) || (â-q* iswm $3-) || *anasına ?* iswm $3-) || (çocugu* iswm $3-) || (cocugu* iswm $3-) || (seks ?* iswm $3-) || (emmeli ?* iswm $3-) || (k.o.yum* iswm $3-) return 5
  if (*A nneni* iswm $3-) || (*kan? bo?uk* iswm $3-) || (*? ***** ?* iswm $3-) || (*? amcik ?* iswm $3-) || (sktir ?* iswm $3-) || (*ni yalar?m* iswm $3-) || (sikim* iswm $3-) || (sihik* iswm $3-) || (am iswm $3-) || (Anânîzîn* iswm $3-) || (a.k. ?* iswm $3-) || (mikicem* iswm $3-) return 6
  if (*a.k* iswm $3-) || (a.g* iswm $3-) || (m.k* iswm $3-) || (m.q* iswm $3-) || (******* iswm $3-) || (******* iswm $3-) || (PİÇ* iswm $3-) || (**** iswm $3-) || (kaşar* iswm $3-) || (*ka$ar* iswm $3-) return 7
  if (*Qrospu* iswm $3-) || (dangalak* iswm $3-) || (a-q* iswm $3-) || (********* iswm $3-) || (amcuk* iswm $3-) || (****** iswm $3-) || (******** iswm $3-) || (sikicem* iswm $3-) || (ShîKécém * iswm $3-) return 8
  if (*şıllık* iswm $3-) || (kaltak* iswm $3-) || (s!ker* iswm $3-) || (*? ***** ?* iswm $3-) || (******** iswm $3-) || (yarragım* iswm $3-) || (zalaq* iswm $3-) || (zalak* iswm $3-) || (zuhecem* iswm $3-) || (zuherim* iswm $3-) || (sikik* iswm $3-) return 9
  if (*phese* iswm $3-) || (An.Ne.Ne* iswm $3-) || (ananun* iswm $3-) || (ámíná* iswm $3-) || (aNheniin* iswm $3-) || (ánánín* iswm $3-) || (zikicem* iswm $3-) || (zikik* iswm $3-) || (sikem* iswm $3-) || (a_q* iswm $3-) return 10
  if (*0r0 Spu* iswm $3-) || (y.lattırmak* iswm $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..

Cihandar 19 Mayıs 2009 16:25
Cevap: Texten Hızlı Okutmak
 
Tşk Ederim Hocam .. Sorun Çözüldü : )

lordsulu 30 Haziran 2009 14:54
Cevap: Texten Hızlı Okutmak
 
paylaşım için teşekkürler ...

uFuK 30 Haziran 2009 15:57
Cevap: Texten Hızlı Okutmak
 
Hash kullanın. En hızlısı hashtır. Debug'da ayrı tabi.

Leo 30 Haziran 2009 16:12
Cevap: Texten Hızlı Okutmak
 
mrb diyorum nbr diyorum selam diyom bu koruma bunlari bile banliyor arkadaslar hatali sanirim addon

uFuK 01 Temmuz 2009 01:48
Cevap: Texten Hızlı Okutmak
 
PHP- Kodu:
on *:start: { 
hmake zimbirti 1000 
.hload -s zimbirti $shortfn(ufuk.hash)
}
on *:text:*:#: { 
var %ufuk $strip(1-)
if ($hmatch(zimbirti,%ufuk)) { mode $chan +b $wildsite | kick $chan $nick Sebep }
}

alias ekle { 
if $2 == $null { echo -a eklenicek birşey yok canım, yazda ekleyelim /ekle eklenicek kelime } 
if $2 != $null { hadd zimbirti $2 | hsave -s zimbirti ufuk.hash | hload zimbirti ufuk.hash 
}
}

alias sil { 
if $2 == $null { echo -a Silinecek birşey yok tatlım kelime yazda silelim /sil silinecekkelime
if $2 != $null { hdel zimbirti $2 | hsave -s zimbirti ufuk.hash | hload zimbirti ufuk.hash 
}
}
alias liste { 
  var %i 1 
  while (%i <= $hmatch(zimbirti,*,0)) {
    echo -a $hmatch(kufur,*,%i)
    inc %i 
}
} 
/ekle küfürlükelime [ kelime ekler ]
/sil küfürlükelime [ kelime siler ]
/liste [listeyi echo'lar ]

kodu ALT R remoteye kopyala.
kopyaladıktan sonra /ekle küfürlükelime şeklinde kelimeleri eklet.
Scripti açıp kapatmana falan gerek yok devam et direkt.

Not; kodu denemedim bir hayli zamandırda kod yazmıyorum ama çalışıcaktır. Sorun olursa yaz burdan


Not2: Benim kodlamış oldugum Full Hash Mynet Koruma Menüsünü'de kullanabilirsin. Koruma istiyorsan.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 06:13.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk