Kod: Tümünü seç
alias Bad if $dialog(Badlist) == $null dialog -m badlist badlist
dialog Badlist {
title "Badnick Korumasi"
size -1 -1 200 280
button "Tamam", 1, 110 200 70 20,ok
list 2, 10 20 180 135, sort
edit "", 4, 10 165 180 20, autohs center
box "Eklenecek Nicki Girin", 5, 5 150 190 45
button "Nick Ekle", 6, 20 200 70 20
box "Not:", 7, 5 225 190 45
text "Nicki silmek icin Uzerine Cift Tiklayin", 8, 25 240 140 45
}
on *:dialog:Badlist:dclick:2:{ .ruser Badnick $did(2).seltext | did -d badlist 2 $did(2).sel }
on *:dialog:Badlist:sclick:6:{ if ($did(4) != $null) { did -a Badlist 2 $did(4) | .auser Badnick * $+ $did(4) $+ *!*@* | did -fr badlist 4 } }
on *:dialog:badlist:init:*:{
if ($ulist(*,Badnick,0) != $null) {
set %Bd.bad 0
while (%Bd.Bad < $ulist(*,Badnick,0)) {
inc %Bd.bad 1
did -a badlist 2 $ulist(*,Badnick,%Bd.bad)
}
unset %Bd.Bad
did -f badlist 4
}
}
Menu menubar,channel,status {
Ayarlar
.$iif(%badnicks,$style(1)) Badnick Koruma ( $+ $iif(%badnicks,ON,OFF) $+ ) {
if (%badnicks) { unset %badnicks | .disable #badnicks | echo -a $timestamp %logo 15,2 Badnick Koruma 14 Kapatıldı }
else { set %badnicks on | .enable #badnicks | Bad | echo -a $timestamp %logo 15,2 Badnick Koruma 0 Açıldı }
}
}
#badnicks off
on BadNick:JOIN:#:{
.mode # +b $nick
.kick # $nick 05,15Badnick:1Nickiniz KanaL Seviyesine Uygun Değildir. %logo
}
#badnicks end