Çevrimdışı

Bunu hem ident reklam koruması hem kara liste olarak kullana bilirsin zaten açıklamarda yazıyor kullanma sekli umarım isine yarar
İnşallah [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] okurda yavas yavas ögrendigimi anlar :D



on 1:LOAD:{
.set %karalist_sebep 5Kanalına Girisiniz Engellenmistir sakıncalı nick ident
.set %karalistt on
echo Ayarlar Ve Addon Yüklendi..:)
dialog -m karaliste karaliste

}
dialog karaliste {
title "Kara Liste"
size -1 -1 135 190
option dbu
box "Kara Liste", 2, 5 0 65 85
edit "", 3, 80 10 45 10, autohs
button "Ekle", 4, 80 25 47 12
box "", 5, 5 120 125 30
button "Açıklama", 6, 80 65 47 12
edit %karalist_sebep , 7, 10 100 115 10, autohs
box "Kick Mesajı", 8, 5 90 125 25
button "Tamam", 11, 5 165 42 12, ok
button "iptal", 12, 85 165 42 12, cancel
radio "Kapalı", 15, 80 130 30 10
radio "Açık", 9, 20 130 40 10
button "Kaldır", 10, 80 45 47 12
box "", 16, 5 120 125 30
box "Nick", 14, 75 0 55 85
list 1, 10 10 55 70, size
}
alias listkontrol1 {
goto karaliste 1
:karaliste
inc %vo1
if ($ulist(*,karaliste,%vo1) == $null) { unset %vo1 | halt }
did -a karaliste 1 $ulist(*,karaliste,%vo1)
goto karaliste
}
on *:dialog:karaliste:sclick:6: { dialog -m KaraAcıklama KaraAcıklama }
on *:dialog:karaliste:sclick:11: { set %karalist_sebep $did(7) }
on *:dialog:karaliste:sclick:9: { set %karalistt on | dialog -t karaliste Koruma Açıldı. | did -e karaliste 7 | .enable #karaListe }
on *:dialog:karaliste:sclick:15: { set %karalistt off | dialog -t karaliste Koruma Kapandı. | did -b karaliste 7 | set %karalistt off }
on *:dialog:karaliste:init:0:{
if (%karalistt == on) { did -c karaliste 9 | .enable #karaListe }
if (%karalistt == off) { did -c karaliste 15 | .disable #karaListe }
listkontrol1
}
on 1:dialog:karaliste:sclick:4: {
.auser karaliste $did(3)
did -a karaliste 1 $did(3)
; listkontrol1
}
on 1:dialog:karaliste:sclick:10: {
.ruser karaliste $did(1,$did(1).sel)
did -r karaliste 1
listkontrol1
}
dialog KaraAcıklama {
title "Acıklama"
size -1 -1 125 110
option dbu
text "Dikket Ederseniz Daha Rahat Edersiniz", 1, 10 10 105 8
text "Örnek nick!*@* ", 2, 10 20 105 8
text "Nick Eklerseniz Nickki Kara Listeye Alırsınız", 3, 10 30 105 8
text "Örnek *!identd*@*", 4, 10 40 105 8
text "İdenti Eklerseniz Kara Listeye Alırsınız", 5, 10 50 105 8
text "Örnek *!*@ip ", 6, 10 60 105 8
text "ipi Eklersiniz Kara Listeye Almıs Olursunuz", 7, 10 70 105 8
box "Önemli Acıklama", 8, 5 0 115 85
button "Tamam", 9, 15 90 97 12, ok
}
#karaListe on
on @karaliste:join:#:{
ban # $nick 7 | kick # $nick 4 %$- # %karalist_sebep
}
#karaListe end