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

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 21 Haziran 2007, 10:01   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Küfür KorumasI HakkInda Sorun!




Alıntı:
on @*:TEXT:*:#: {
; +o +h +v ler bu degerden etkilenmeyecekler
if ($nick !isreg #) return
var %l = $strip($1-)
if ($hmatch(kufur,%l)) {
mode # +b $wildsite | mode # +b $nick
kick # $nick Kötü Sözler Kullanmak Yasaktır!
}
}
alias küfür {
if ($1 == ekle) && ($regex($2,[A-Za-z])) {
hadd kufur $2
secho $2 veritabanina başarıyla eklendi
}
elseif ($1 == sil) {
if ($hfind(kufur,$2)) {
hdel kufur $2
secho $2 veritabanindan başarıyla silindi
}
else { secho $2 veritabaninda bulunamadi }
}
elseif ($1 == list) {
var %x = 1
while (%x <= $hget(kufur,0).item) {
set %hkufur $addtok(%hkufur,$hget(kufur,%x).item,1)
if ($numtok(%hkufur,32) >= 7) { secho $replace(%hkufur,$chr(1),$+($chr(32),-,$chr(32))) | unset %hkufur }
inc %x
}
if ($numtok(%hkufur,32) >= 1) { secho $replace(%hkufur,$chr(1),$+($chr(32),-,$chr(32))) | unset %hkufur }
}
else { secho hatali islem }
}
alias secho {
;echo -a $1-
if (!$window(@kufur)) { window -e @kufur }
echo @kufur $+($chr(40),$time,$chr(41),$chr(32),$1-)
}
on *:EXIT: hsave -o kufur kufur.txt
on *:start: {
hmake kufur 1000
if ($exists(kufur.txt)) { hsave -o kufur kufur.txt }
hload kufur kufur.txt
}


Forum Sitesinden Bulmuştum Bu Kodu. Kod Gayet Güzel Çalışıyor Ancak * Yapan Atılıyor. Küfür Listesine Baktım Öyle Bir Küfür Ekli Değil , Sorun Nerede Acaba..?

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 21 Haziran 2007, 12:13   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Küfür KorumasI HakkInda Sorun!




Bahsettiğin şey wilcard karakter, her kelimenin yerine ge&#231;er.

__________________
Suyun intiharıdır şelale...
 
Alıntı ile Cevapla

Alt 21 Haziran 2007, 12:42   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Küfür KorumasI HakkInda Sorun!




k&#252;f&#252;r&#252; * b&#246;yle ekledigimdenmi kaynaklanıyor yani , misal *siker* gibi?

 
Alıntı ile Cevapla

Alt 21 Haziran 2007, 17:29   #4
Çevrimdışı
SaW
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yanıt: Küfür KorumasI HakkInda Sorun!




Şu ilk kısmı:
on @*:TEXT:*:#: {
; +o +h +v ler bu degerden etkilenmeyecekler
if ($nick !isreg #) return
var %l = $strip($1-)
if ($hmatch(kufur,%l)) {
mode # +b $wildsite | mode # +b $nick
kick # $nick Kötü Sözler Kullanmak Yasaktır!
}
}

bu şekilde değiştirmen sorununu çözebilir:

alias rplc return $iif($pos($1-,*,0) == 0,$1-,$replace($1-,*,?))

on @*:TEXT:*:#: {
; +o +h +v ler bu degerden etkilenmeyecekler
if ($nick !isreg #) return
var %k = $strip($1-)
var %l = $rplc(%k)
if ($hmatch(kufur,%l)) {
mode # +b $wildsite | mode # +b $nick
kick # $nick Kötü Sözler Kullanmak Yasaktır!
}
}

 
Alıntı ile Cevapla

Cevapla

Etiketler
hakkinda, korumasi, kufur, küfür, mirc, mirc download, mirc indir, sorun


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Uzun Harf Korumasi Hakkinda Cybersoft mIRC Scripting Sorunları 7 12 Haziran 2008 15:42
Tekrar korumasi hakkinda yardim Support Eggdrop, NeoStats, BNC 0 21 Eylül 2007 22:35
Küfür Korumada Sorun StanteaR mIRC Scripting Sorunları 3 04 Eylül 2007 23:21
Küfür Korumasi StanteaR mIRC Scripting Sorunları 2 18 Haziran 2007 14:53
Küfür Korumasında Sorun! BeLaLim mIRC Scripting Sorunları 6 28 Mart 2007 03:20