[XPhytoN]

/* Beni Oku (Readme) */

* Küfür Koruması (Argo Protection);
* Korumamız, ekteki rar dosyasının içindedir.

Kullanım;

* kufur.bugra ve kufur.mrc dosyalarınız mIRC 'inizin bulunduğu ana klasörde olmalıdır.
* load -rs kufur.mrc yazarak scriptinize addon'unuzu yukleyebilirsiniz.
* kurduktan sonra /kufurkur yazarak, kurulumunuzu tamamlamış bulunacaksınız.

Yıldızlı Kelimelerin nasıl ekleneceği;

* Eğer Kelimenin başlangıcına, " **** " yazarsanız, bi***uel ve bunun gibi *** kelimesinin başında ne geçerse geçsin algılayacaktır.
* Eğer kelimenin başlangıcına değil de sonuna koyarsanız, " **** " ***y gibi bir kelimeyi yakalayacaktır.
* Eğer kelimenin her iki tarafına da koyarsanız " ***** " içinde, *** kelimesi geçen her kelimeyi yakalayacaktır.

Talimatlar;

* Sadece #Bugra kanalında komutları çalışmaktadır.
* !kotusoz <küfür> / örnek : !kotusoz **** yazarak, kelime ekleyebilirsiniz.
* !kotusil <küfür> / örnek : !kotusil **** yazarak, kelime silebilirsiniz.

Ekteki, RAR dosyasını açtığınız da tekrar'dan benioku isimli notdefterini okuyabilirsiniz.

[Duffy`DuCk]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

* Sadece #Bugra kanalında komutları çalışmaktadır.
* !kotusoz <küfür> / örnek : !kotusoz **** yazarak, kelime ekleyebilirsiniz.
* !kotusil <küfür> / örnek : !kotusil **** yazarak, kelime silebilirsiniz.

WingmaN, küfür ekleme olayını alias olarak yapsaydın daha iyi olurdu, Korumayı script'ine ekliyen. 2. bi nick sokarak küfür eklemesi zor olucakdır.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on 1:start:{
  hmake kufur
  hload kufur kufur.bugra
}
on 1:text:*:#:{
  var %::text = $1-
  if $hfind(kufur,$1-,1,W).data && $nick {
    mode # +b $nick
    msg # $nick küfürlü konuştunuz Bu yuzden kanaldan uzaklaştırıldınız. yakalanan küfürünüz >4,4 $hget(kufur,$hfind(kufur,$1-,1,W).data)
  }
}
alias küfür {
  if $1 == ekle {  
    hadd -m kufur $r(1000,999999) $2-
    hsave kufur kufur.mercy
    echo -a Kötü Söz Eklendi: $2-
  }
  elseif $1 == sil {
    if $hfind(kufur,$2-,1,W).data {
      hdel kufur $ifmatch
      hsave kufur kufur.mercy
      echo -a Kötü Söz Silindi: ( $+ $ifmatch $+ ) $2-
    }
    else {
      Echo -a Silmeye çalıştıgınız küfür listede yok,  $+(,$me,)
    }
  }
  elseif $1 == liste {
    echo -a $+(,$me,) Küfür listesi listeleniyor
    var %x = 1 
    while (%x <= $hget(Kufur,0).item) { 
      echo -a 4 $+ $hget(Kufur,%x).data 
      inc %x 
    }
    echo -a $+(,$me,) küfür liste sonu..
  }
}
on *:load:{
  echo -a 4|2WingmaN4| 2 Küfür korumanız Yüklenmiştir.
  echo -a 4<2WingmaN4> 2 Kurmak için > 4/kufurkur 2 yazabilirsiniz
}
alias kufurkur {
  hmake kufur
  hload kufur kufur.bugra
  echo -a 4|2WingmaN4| 2: Küfür korumanız kurulmuştur.
}

Kırmızı ile belirttiğim yer :S ne işe yarıyor onu anlamadım.. ;|
/küfür ekle <kelime>
/küfür sil <kelime>
/küfür liste

komutlar bunlardır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[bøCek]

peki ben birsey soracam geliyorlar kufur ediyorlar misal s*e*x a*n*a*n*ı veya s/e/x a/n/a/n/ı gibi küfürler ediyorlar. onlarda çalışırmı ?

[XPhytoN]

Gökhan, küfürleri nasıl eklersen, o şekilde atar ama ben, bir çoğunu kaydettim zaten.

Duffy, Sanırım, kırmızı ile işaretlediğin yerin cevabını aslında, kendi ağzınla söylemişsin, yazdığını dikkatli oku bakalım ne demişsin?
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Ayrıca, verdiğin kod da hatalar var hemde, büyük hatalar. Dikkat et bakalım onlar neymiş? sonra, editle post'unu istersen.

Benim eklediğim koruma addon'unda, hata yoktur.

[Duffy`DuCk]

XPhytoN Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Gökhan, küfürleri nasıl eklersen, o şekilde atar ama ben, bir çoğunu kaydettim zaten. Duffy, Sanırım, kırmızı ile işaretlediğin yerin cevabını aslında, kendi ağzınla söylemişsin, yazdığını dikkatli oku bakalım ne demişsin? Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. Ayrıca, verdiğin kod da hatalar var hemde, büyük hatalar. Dikkat et bakalım onlar neymiş? sonra, editle post'unu istersen. Benim eklediğim koruma addon'unda, hata yoktur.

Büyük hatalardan kastın nedir anlıyamadım onu. Ayrıca sadece alias'ları ekledim ben
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kod'una hiç dokunmadım, extra olarakda liste olayını ekledim.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Büyük hataları gösterirsen sevinicem.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on 1:start:{
hmake kufur
hload kufur kufur.bugra
}
on 1:text:*:#:{
var %::text = $1-
if $hfind(kufur,$1-,1,W).data && $nick {
mode # +b $nick
msg # $nick küfürlü konuştunuz Bu yuzden kanaldan uzaklaştırıldınız. yakalanan küfürünüz >4 $hget(kufur,$hfind(kufur,$1-,1,W).data)
}
if $chan == #Bugra {
if $gettok($1-,1,32) == !kotusoz {
hadd -m kufur $r(1000,999999) $gettok($1-,2-,32)
hsave kufur kufur.mercy
msg # Kötü Söz Eklendi: $gettok($1-,2-,32)
}
if $gettok($1-,1,32) == !kotusil {
if $hfind(kufur,$gettok($1-,2-,32),1,W).data {
hdel kufur $ifmatch
hsave kufur kufur.mercy
msg # Kötü Söz Silindi: ( $+ $ifmatch $+ ) $gettok($1-,2-,32)
}
}
}
}
on *:load:{
echo -a 4|2WingmaN4| 2 Küfür korumanız Yüklenmiştir.
echo -a 4<2WingmaN4> 2 Kurmak için > 4/kufurkur 2 yazabilirsiniz
}
alias kufurkur {
hmake kufur
hload kufur kufur.bugra
echo -a 4|2WingmaN4| 2: Küfür korumanız kurulmuştur.
}
;Coded by WingmaN Başlangıç ve Bitiş : 03:50 - 04:07

Buda senin eklediğin kod.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[XPhytoN]

Hmm evet haklısın, link'i yeniliyorum. Şuan ki ekteki korumayı indirebilirsiniz.

Teşekkürler Duff, hata benimmiş ;oki

[Gulsum]

bi sorun var örnek olarak hot kelimesini ekledim. başa ve sonuna * eklemedim sadece hot olarak ekledim
[23:11] <Sugargirl> hot
sadece kanalda hot yazarsan banlıyor fakakat
[23:11] <Sugargirl> sugar hot ekle
bu şekilde yazıldında atmıyor veya
[23:11] <Sugargirl> ekle sugar hot
bu şekil yazdında atmıyor belki diceksiniz *hot* olarak ekle öle atıcaktır ama bazı kelimeleri yıldız icine alamıyorum yanlış ban atma olasılığı oluyor. yardım ederseniz sevinirim.

[Gulsum]

yardım yokmu
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[MaNyAKprens]

tskler

[WingmaN]

Gulsum, kullandığın komut yanlış, düzgün okursan, daha iyi anlayacağından eminim, ayrıca Duffy, kodu değiştirmişsin, komutları dahil. Benim yazdığım bilgi ile alakası yok, kullanıcıları yanlış bilgilendirmezsen sevinirim.