| LauReLL | 29 Haziran 2007 06:22 |
KişiseL Ban Koruması (deop - Kick - ban+kick Yapıyor )
Kod:
on *:LOAD: {
set %KBK_s disabled
set %KBK_kmsg KişiSel Ban Koruması CodEr ßy LauReLL ;)
set %KBK_pu KBK_pud
echo -a KişiSel Ban Koruması (KBK) v2.0 Şu Anda YükLendi...
echo -a Kişisel Ban Korumasını YükLediğiniz için Teşekkür
echo -a Ban Koruması Addonu ßy LauReLL!!!
}
alias KBK { dialog -m KBK KBK }
dialog KBK {
title "Kişisel Ban Koruması"
size -1 -1 102 101
option dbu
check "Aktif Et", 1, 3 3 28 10
box "Kick Mesajı:", 2, 3 43 97 26
edit "", 3, 9 52 84 11, autohs
box "Cezası:", 5, 3 17 97 24
radio "Deop", 6, 8 26 24 10
radio "Kick", 7, 37 26 21 10
radio "Ban/Kick", 8, 64 26 32 10
button "Kick Mesajını Sil", 9, 3 76 96 11
button "Çık", 4, 3 87 96 11, ok
}
on *:DIALOG:KBK:init:*: {
did -a KBK 3 %KBK_kmsg
if (%KBK_pu == KBK_pud) { did -c KBK 6 }
elseif (%KBK_pu == KBK_puk) { did -c KBK 7 }
elseif (%KBK_pu == KBK_pukb) { did -c KBK 8 }
if (%KBK_s == enabled) { did -c KBK 1 | did -e KBK 3,6,7,8,9 }
if (%KBK_s == disabled) { did -b KBK 3,6,7,8,9 }
}
on *:DIALOG:KBK:sclick:*: {
if ($did == 1) { if ($did(KBK,$did).state == 1) { did -e KBK 3,6,7,8,9 | set %KBK_s enabled | .enable #KBK } | else { did -b KBK 3,6,7,8,9 | set %KBK_s disabled | .disable #KBK } }
if ($did == 6) { set %KBK_pu KBK_pud }
if ($did == 7) { set %KBK_pu KBK_puk }
if ($did == 8) { set %KBK_pu KBK_pukb }
if ($did == 9) { did -r KBK 3 | set %KBK_kmsg }
}
on *:DIALOG:KBK:edit:3: { set %KBK_kmsg $did(KBK,3) }
#KBK on
on *:BAN:#: {
if (%KBK_s == enabled) {
if ($me == $nick) { return }
if ($me isop $chan) && (%KBK_pu == KBK_pud) && ($banmask iswm $address($me,5)) { mode $chan -b $banmask | mode $chan -o $nick | msg $nick %KBK_kmsg }
if ($me isop $chan) && (%KBK_pu == KBK_puk) && ($banmask iswm $address($me,5)) { mode $chan -b $banmask | mode $chan -o $nick | kick $chan $nick %KBK_kmsg }
if ($me isop $chan) && (%KBK_pu == KBK_pukb) && ($banmask iswm $address($me,5)) { mode $chan -o $nick | mode $chan -b $banmask | ban $chan $nick | kick $chan $nick %KBK_kmsg }
}
if ($me isreg $chan) { echo -a [KişiSeL Ban Koruması] banned in $chan | echo -a [KişiSeL Ban Koruması] Reason: OP Olmanız Gerekiyoo (@) | halt }
if ($me isvoice $chan ) { echo -a [KişiSeL Ban Koruması] banned in $chan | echo -a [KişiSeL Ban Koruması] Reason: OP Olmanız Gerekiyoo (@) | halt }
else { halt }
}
#KBK end
Menu channel,status,menubar {
KişiSel Ban Koruması
.Dialog { KBK }
.Unload { unset %KBK_* | echo -a KişiSeL Ban Koruması mIRc2inizden KaLdırıLdı!... | unload -rs KBK.mrc }
}
Kodu Bir Yerden Yardım Edinerek DiaLog haLıne getirdim Umarın Sizde Seversiniz... |
