IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

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/)
-   -   Flood ve Kufur Koruması (https://www.ircforumlari.net/mirc-scripting-sorunlari/8058-flood-ve-kufur-korumasi.html)

Wolfram 18 Kasım 2005 22:36
Flood ve Kufur Koruması
 
Arkadaslar gecmis konulara baktım fakat tam ihtiyacım olanına rastlayamadım. bir kac sorun cıktı. bu konularda biraz acemiyim. bana flood koruması ve kufur (badword) koruması lazım.. kodları nereye yazacagımıda soylerseniz sevinirim.
tesekkurler..

SCouNDReL 19 Kasım 2005 00:34
Kod:
on @*:TEXT:*:*:{
.timer 1 8 unset %floodkont! [ $+ [ $nick ] ]
inc %floodkont! [ $+ [ $nick ] ]
if (%floodkont! [ $+ [ $nick ] ] == 5) { mode $chan +b $nick | kick $chan $nick Flood! }
}
8 Saniye içinde 5 Satır kuLLanırSa Atar
Kod:
on @*:TEXT:*:#:{
var %kufurler ***,kevaşe,fahişe,Vs,Vs
var %i $numtok(%kufurler,44)
while (%i > 0) {
if ($gettok(%kufurler,%i,44) isin $strip($1-)) { mode $chan +b $nick | kick $chan $nick Küfür }
}
}
Küfürleri aralara virgül koyarak %kufurler kevaşe,fahişe,... gibi ekLerSin..
Remote ye ekLicen..

Comanche 19 Kasım 2005 12:45
küfürleri bir txten nasıl okutabiliriz

MaeLStrOm 19 Kasım 2005 13:16
alias oku {
var %a $lines(dosya.txt)
while %a { echo -a $read(dosya,%a) | dec %a }
}
bunu remotene eklersen oku yazdığında dosyayı okutmuş olursun.
$read ve $lines ile ilgili ornek olsun diye yazdım.Sorduğun sorunun cevabını bunları anladıktan sonra rahatlıkla verebilirsin.
kolay gelsin

Wolfram 19 Kasım 2005 15:37
küfür koruman mirc i dondurdu, flood koruması da sorunlu, farklı 5 kelimeyi yazarsa da kickleniyor user.

_Omer_ 19 Kasım 2005 15:49
Kod:
#kufurler on
on 1:TEXT:*:#: {
  if $me !isop $chan { halt }
  if $nick isop $chan { halt }
  if (fuck isin $1-) || (AMINA isin $1-) || (AMINI isin $1-) || (kavat isin $1-) || (sike isin $1-) || (avradýný isin $1-) || (sikti isin $1-) || (sokarým isin $1- ) || (pezevenk isin $1-) || (siktir isin $1-) || (yarak isin $1-) || (****** isin $1-) || (sikiyim isin $1-) || (sikis isin $1-) || (sikiþ isin $1-) || (siker isin $1-) || (****** isin $1-) || (****** isin $1-) || (fahiþe isin $1-) || (ananý isin $1-) || (ibne isin $1-) || (ipne isin $1-) || (amýna isin $1-) || (amýný isin $1-) || (amcýk isin $1-) || (amcik isin $1-) || (amina isin $1-) || (amini isin $1-) || (topunuzun isin $1-) || (sikik isin $1-) || (götveren isin $1-) || (shit isin $1-) || (sikerim isin $1-) || (seviþecek isin $1-) || (sux isin $1-) || (götden isin $1-) || (götün isin $1-) || (fahiþe isin $1-) || (*** isin $1-) {
    .mode $chan +b $wildsite | .kick $chan $nick Kanaldan Küfür Ettiginiz Icin Uzaklastirildiniz!
  }
}
on 1:action:*:#: {
  if $me !isop $chan { halt }
  if $nick isop $chan { halt }
  if (fuck isin $1-) || (kavat isin $1-) || (AMINA isin $1-) || (AMINI isin $1-) || (sike isin $1-) || (avradýný isin $1-) || (sikti isin $1-) || (sokarým isin $1- ) || (pezevenk isin $1-) || (siktir isin $1-) || (yarak isin $1-) || (****** isin $1-) || (sikiyim isin $1-) || (sikis isin $1-) || (sikiþ isin $1-) || (siker isin $1-) || (****** isin $1-) || (****** isin $1-) || (fahiþe isin $1-) || (ananý isin $1-) || (ibne isin $1-) || (ipne isin $1-) || (amýna isin $1-) || (amýný isin $1-) || (amcýk isin $1-) || (amcik isin $1-) || (amina isin $1-) || (amini isin $1-) || (topunuzun isin $1-) || (sikik isin $1-) || (götveren isin $1-) || (shit isin $1-) || (sikerim isin $1-) || (seviþecek isin $1-) || (sux isin $1-) || (götden isin $1-) || (götün isin $1-) || (fahiþe isin $1-) || (*** isin $1-) {
    .mode $chan +b $wildsite | .kick $chan $nick Kanaldan Küfür Ettiginiz Icin Uzaklastirildiniz! 
  }
}
on 1:notice:*:#: {
  if $me !isop $chan { halt }
  if $nick isop $chan { halt }
  if (fuck isin $1-) || (kavat isin $1-) || (AMINI isin $1-) || (AMINA isin $1-) || (sike isin $1-) || (avradýný isin $1-) || (sikti isin $1-) || (sokarým isin $1- ) || (pezevenk isin $1-) || (siktir isin $1-) || (yarak isin $1-) || (****** isin $1-) || (sikiyim isin $1-) || (sikis isin $1-) || (sikiþ isin $1-) || (siker isin $1-) || (****** isin $1-) || (****** isin $1-) || (fahiþe isin $1-) || (ananý isin $1-) || (ibne isin $1-) || (ipne isin $1-) || (amýna isin $1-) || (amýný isin $1-) || (amcýk isin $1-) || (amcik isin $1-) || (amina isin $1-) || (amini isin $1-) || (topunuzun isin $1-) || (sikik isin $1-) || (götveren isin $1-) || (shit isin $1-) || (sikerim isin $1-) || (seviþecek isin $1-) || (sux isin $1-) || (götden isin $1-) || (götün isin $1-) || (fahiþe isin $1-) || (*** isin $1-) {
    .mode $chan +b $wildsite | .kick $chan $nick Kanaldan Küfür Ettiginiz Icin Uzaklastirildiniz!  }
}
#kufurler end

SCouNDReL 19 Kasım 2005 16:17
Pardon whiLe de Dec LememiŞim <.
txt den okutmak için ;
Kod:
on @*:TEXT:*:#:{
var %i $lines(kufurler.txt)
while(%i > 0) {
if ($read(kufurler.txt,%i) isin $1-) { mode $chan +b $nick | kick $chan $nick kufur! }
dec %i
}
}
kufurler.txt ye alt alta ekle küfürleri
flood krumasını denedim bi sorun yOq.

MaeLStrOm 19 Kasım 2005 17:03
Arkadaşlar direk kod vermektense yol g&#246;stermek daha &#246;ğretici olucaktır.Buna dikkat edelim.Buranın asıl amacı &#246;ğrenmek ve bildiklerimizi aktarmaktır.S&#252;rekli kod verirseniz kimse birşeyler de &#246;ğreniyim ki kendi kodumu kendim yapıyım demez.

Wolfram 19 Kasım 2005 22:45
kufur koruman calisiyor, saolasın da, adam 'eksik' 'tamam' gibi seyler dedigi zaman da kickleniyor. :D

_Omer_ 20 Kasım 2005 13:50
Benimkindemi?
Benimkinde yapmaz


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 13:54.
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net