BadNick & Küfür Koruması
 

Yapmış olduğum bir addonı sizlere sunuyorum..Bir dialog üzerinde hem badnick hemde küfür koruma ayarlarını yapabiliceğiniz bir addon sizleri bekliyor...Dialog üzerinde eklediğiniz ve çıkarttığınız kelimeleri anında görebileceğiniz aktif bir pencerede bulunmaktadır.. Tek yapmanız gereken /antipity komutunu kullanmak..
--------------------------------------------------------------------------

alias gurkan {
if !$istok(isimsiz ,$1,32) { return $false }
goto $1
:isimsiz
var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false)
}
on @*:join:#:{ if $gurkan(isimsiz,$nick,badnick.txt) { .mode $chan +b $wildsite | .kick $chan $nick BadNick! }
}
on @*:text:*:#:if $gurkan(isimsiz,$1-,kufur.txt) { .mode $chan +b $wildsite | kick # $nick Yasak Kelime Kullanımı! }

alias antipity { dialog -m antipity antipity }
dialog antipity {
title "BadNick & Kufur Koruma Sistemi ßy AntiPity"
size -1 -1 226 102
option dbu
list 2, 38 22 70 58, size
list 5, 118 22 70 58, size
edit "", 10, 38 12 70 10
edit "", 11, 118 12 70 10
box "BAD NICK", 6, 5 3 107 81
box "KUFUR", 7, 114 3 107 81
button "T A M A M", 1, 38 87 148 12,ok
button "EKLE", 3, 10 14 24 28
button "KALDIR", 4, 10 45 24 28
button "EKLE", 8, 192 14 24 28
button "KALDIR", 9, 192 45 24 28
}
on *:dialog:antipity:INIT:*: {
if ($isfile(badnick.txt) == $false) { write -c badnick.txt } | else { loadbuf -o $dname 2 badnick.txt }
if ($isfile(kufur.txt) == $false) { write -c kufur.txt } | else { loadbuf -o $dname 5 kufur.txt }
if (%badnick) .didtok $dname 2 32 $ifmatch
if (%kufur) .didtok $dname 5 32 $ifmatch
}
on *:dialog:antipity:sclick:*:{
if ($did == 3) { write badnick.txt $did(10) | did -a $dname 2 $did(10) | did -r $dname 10 }
if ($did == 8) { write kufur.txt $did(11) | did -a $dname 5 $did(11) | did -r $dname 11 }
if ($did == 4) { write -dl $+ $did(2).sel badnick.txt | did -d $dname 2 $did(2).sel }
if ($did == 9) { write -dl $+ $did(5).sel kufur.txt | did -d $dname 5 $did(5).sel }

}
on *:dialog:antipity:sclick:1:{
set %badnick $didtok($dname,2,44)
set %kufur $didtok($dname,5,44)
}

Yanıt: BadNick & Küfür Koruması
 

Paylaşım İçin Tşkler , Ancak Cümle İçerisinde Geçtigi Zaman Atmıyor :(

Cevap: BadNick & Küfür Koruması
 

PayLaşım için TeşekkürLer Fakat ; mirc'ime EkLiyorum Txt'den,mircde /antipity Yapıyorum ve karşıma kutu çıkıyor fakat badnick böLümüne ***** yazıyorum ekLe tusuna basıyorum işLemiyor ne yazarsam yazayim ekLe tusuna bastigimda işLemiyor Listeye ekLenmiyor. bu başka badnick addonundada oLdu ve bunu deneyeyim dedim bundada aynısı oLdu Yardimci oLabiLirmisiniz? ;scare

Cevap: BadNick & Küfür Koruması
 

Kodu Remoteye Ekliyorsun
/dialog -m kötürumuz kötürumuz
Şeklinde Çalıştırıyorsun.
****y* Şeklinde de Ekleyebiliyorsun.
--

Cevap: BadNick & Küfür Koruması
 

PayLaSiM iCiN TsKLeR, BeNDe BuNu aRiYoRDuM :)

Cevap: BadNick & Küfür Koruması
 

kardeş bu kod çok güzelde bu kodda *pic* diye eklediğimde küfürlü cümle veya ident içerisinde geçen pic kelimesini atmıyor sadece pic yazdğında atıyor pic diye ident girdiğinde atıyor cümle içerisinde atması için ne yapmalıyız.

veyada cesuryurek üstadım senin kodunu aldımda senin bu koda badident bölümü nasıl ekleyebiliriz gürkan kardeşimizinkinde cümle içerisinde olanları atmıyor

----------

konu baya eskiymiş kusura bakmayın yeni farkettim:)

Cevap: BadNick & Küfür Koruması
 

güzel bi remoteye benziyor bi kaç düzenlemeyle kullanılabilir hale gelecektir.

Cevap: BadNick & Küfür Koruması
 

Evet Konu baya eskimiş, aradan 2 yıl geçti.

Badident için şu kodu kullanman yeterli.

Kullanım: /Badident

Cevap: BadNick & Küfür Koruması
 

paylaşdıgın icin tskler emeyine saglık

Cevap: BadNick & Küfür Koruması
 

Üstad : * /dialog: 'kötürumuz' Tablo yok diyor ..