Tekil Mesaj gösterimi
Alt 17 Haziran 2005, 03:46   #13
Çevrimdışı
Flyman
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



on *:LOAD: {
set %ebap.kmsg You have been owned by me! [Easy Ban Protection v1.5]
}
alias bprot { dialog -m ebap ebap }
dialog ebap {
title "Kisisel ban korumasi"
size -1 -1 103 78
option dbu
box "Kick messajinizi girin:", 5, 3 13 98 22
edit "", 6, 6 20 92 11, autohs
check "Acik", 7, 3 1 28 10
box "Uygulama:", 1, 3 37 51 39
radio "Deop user", 2, 7 44 37 10, group
radio "Kick user", 3, 7 54 32 10
radio "Kick/Ban user", 4, 7 64 43 10
button "Yardim", 8, 72 56 30 10
button "Kapat", 9, 72 67 30 10, cancel
button "Kick msg sil", 10, 59 36 42 10
}
on *:dialog:ebap:init:*: {
did -a ebap 6 %ebap.kmsg
if (%ebap.p == d) { did -c ebap 2 }
elseif (%ebap.p == k) { did -c ebap 3 }
elseif (%ebap.p == kb) { did -c ebap 4 }
if (%ebap.st == on) { did -c ebap 7 | did -e ebap 2,3,4,6,10 }
if (%ebap.st == off) { did -b ebap 2,3,4,6,10 }
}
on *:dialog:ebap:sclick:*: {
if ($did == 7) { if ($did(ebap,$did).state == 1) { did -e ebap 2,3,4,6,10 | set %ebap.st on | .enable #prot } | else { did -b ebap 2,3,4,6,10 | set %ebap.st off | .disable #prot } }
if ($did == 2) { set %ebap.p d }
if ($did == 3) { set %ebap.p k }
if ($did == 4) { set %ebap.p kb }
if ($did == 10) { did -r ebap 6 | unset %ebap.kmsg }
if ($did == 8) { dialog -m ebaphelp ebaphelp }
}
on *:dialog:ebap:edit:6: { set %ebap.kmsg $did(ebap,6) }
#prot off
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#: {
if (%ebap.st == on) {
if ($me == $nick) { return }
if ($me isop $chan) && (%ebap.p == d) && ($banmask iswm $address($me,5)) { mode $chan -b $banmask | mode $chan -o $nick | msg # $nick %ebap.kmsg }
if ($me isop $chan) && (%ebap.p == k) && ($banmask iswm $address($me,5)) { mode $chan -b $banmask | mode $chan -o $nick | kick $chan $nick %ebap.kmsg }
if ($me isop $chan) && (%ebap.p == kb) && ($banmask iswm $address($me,5)) { mode $chan -o $nick | mode $chan -b $banmask | ban $chan $nick | kick $chan $nick %ebap.kmsg }
}
else { halt }
}
#prot end

Menu status,menubar {
-

© Ban korumasi { bprot }
}
dialog ebaphelp {
title "Ban korumasi"
size -1 -1 110 86
option dbu
edit "Ban korumasinda artik secenek yapabilirsiniz sizi banliyan operatoru ister deop ister kick veya kick ban ederek cezalandirabilirsiniz", 2, 2 12 106 63, read multi
button "Button", 3, 80 76 30 10, cancel
}



ben deb unu bi yerden almistim ama unuttuim nerden aldigimi guzel secenekli bisey ban korumasi yapan artik kusura bakmasin nerdne aldigimi hatirlayamadim

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver