Güzel calisma bastard.
|
ByRoCK Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
|
Çok Güzel Bir Çalışma Emeğine Sağlık
Ama Ekleme Yapamıyorum ( Küfür Eklemesi vs... )
Uzun Süreden Sonra Tekrar İrc'e Giriş Yapacağımda Baya Şeyi Unutmuşum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Acaba Hata Benden mi Kaynaklanıyor Yoksa Farlı Bir Şey Mi Yapmalıyız
|
Sunu dene;
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on 1:start:{
hmake kufur
hload kufur kufur.mercy
}
on 1:text:*:#:{
var %::text = $1-
if $hfind(kufur,$1-,1,W).data && $nick {
if $me !isop $comchan($nick,1) { halt }
if $nick isop $comchan($nick,1) { halt }
if ($nick == BehroozWolf) { halt }
msg $chan $nick Argo/kufur icerikli konusmalariniz yuzunden 30 dk sureyle susturuldunuz/engellendiniz.
msg $nick Kanal genelinde kufur/argo icerikli cumleler kurmayalim, seviyeli bir sohbet kurmaya ozen gosterelim.
msg $nick Yakalanan kelimeniz: 4,4 $hget(kufur,$hfind(kufur,$1-,1,W).data)
onotice $chan Küfür korumasina yakalanan user : $nick
mode $chan +b $nick
}
on *:text:*:#ekşi:{
if !kotusoz isin $1 {
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 !kotusil isin $1 {
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)
}
}
}
}
Nomercy deki küfür korumasini biliyorsundur mutlaka. Onun mIRC versionudur. Nomercydeki
kufur.mercy dosyasini mirc dizinine kopyalaman yeterli olacaktir. Egerki action ve noticelerdede calismasini istiyorsan, kirmizi yaptigim yerlere
action(ame) mesajlari için on
@*:action:*:#: { noticeler icin ise
on @*:notice:*:#: { yazman yeterli olacaktir. #ekşi yazan yere hangi kanalda kullanabileceginizi yazabilirsiniz.