Tekil Mesaj gösterimi
Alt 27 Aralık 2008, 22:43   #9
Çevrimdışı
Difuzyon
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: @Küfür | Kick/Akick/Msg




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: { var %kufur $lines(kufur.txt) while (%kufur > 0) { if ($read(kufur.txt,%kufur) isin $strip($1-)) { set -e %kfrbz $nick $chan $time $1- | who $nick | .enable #wholist } dec %kufur } } #wholist off raw 352:*: { haltdef if $gettok(%kfrbz,1,32) == $6 { if *r* iswm $7 { if ($window(@Kufur) == $null) { window -ne @Kufur } echo 12 -t @Kufur $6 Nicki $gettok(%kfrbz,2,32) Kanalında $gettok(%kfrbz,3,32) Saatinde Şunu Yazdı: $gettok(%kfrbz,4-,32) } } unset %kfrbz if $gettok(%kickfrbz,2,32) == $6 { if *r* iswm $7 { if ($window(@Kick) == $null) { window -ne @Kick } echo 4 -t @Kick $gettok(%kickfrbz,2,32) $gettok(%kickfrbz,3,32) nickli kişiyi $gettok(%kickfrbz,1,32) Kanalından şu sebeple attı: $gettok(%kickfrbz,4-,32) } } unset %kickfrbz } raw 315:*:haltdef | .disable #wholist #wholist end on *:Kick:#: { if *AKICK by* iswm $1- { var %i $lines(kufur.txt) while (%i > 0) { if ($read(kufur.txt,%i) isin $strip($4-)) { if ($window(@Akick) == $null) { window -ne @Akick } echo 4 -t @Akick $nick $knick nickli kişiyi $chan Kanalından şu sebeple attı: $1- } dec %i } } else { var %i $lines(kufur.txt) while (%i > 0) { if ($read(kufur.txt,%i) isin $strip($1-)) { set -e %kickfrbz $chan $nick $knick $1- | who $nick | .enable #wholist } dec %i } } }

Kanalda geçen küfürlü text mesajlarında ve kick mesajlarında,nick kayıtlı biriyse @uyarı verir.Değilse pas geçecektir.

Akick komutunu uygulayacak kişinin kayıtlı bir nick olması gerektiğinden, küfürlü mesaj varsa direk @uyarı verecektir.


Kolay gelsin.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet bizimmekan sohbet odaları