Bad Nick Ekleme Addonu.
Resimdede Gorundugu Gibi Cok Basit Bir Bad Nick Ekleme Addonu. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kod:
alias Bads { dialog -m Bads Bads }
#shitlizt on
on @666:join:#:{
if ($nick != $me) {
kick # $nick %shitkickmsg
if (%banx == !) { mode # +b $address($nick,%mazk) }
}
}
#shitlizt end
dialog Bads {
title "[ Bad Nick / Düşman Menü ]"
size -1 -1 385 340
button "&Kapat", 1, 323 198 58 30,ok
list 2, 165 20 210 135, sort
box "Düşman Listen", 3, 160 5 220 145
edit "", 4, 165 165 210 20, autohs
box "Eklenecek Nicki Yazınız", 5, 160 150 220 45
button "E&kLe", 6, 160 200 50 20
box "Note:", 7, 160 225 220 35
text "Nick Üzerinde Çift Tıklamak Siler", 8, 190 240 180 45
box "Ban Seçin", 9, 5 5 150 225
radio " 0: *!user@host", 10, 20 20 120 20
radio "1: *!*user@host", 11, 20 40 120 20
radio "2: *!*@host", 12, 20 60 120 20
radio "3: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]", 13, 20 80 120 20
radio "4: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]", 14, 20 100 120 20
radio "5: nick!user@host", 15, 20 120 120 20
radio "6: nick!*user@host", 16, 20 140 120 20
radio "7: nick!*@host", 17, 20 160 120 20
radio "8: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]", 18, 20 180 120 20
radio "9: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]", 19, 20 200 120 20
box "Giriş Yaptığında:", 20, 5 235 150 75
check "Sadece Kick", 21, 20 255 100 20
check "Kick+Ban", 22, 20 275 100 20
button "De&fault", 23, 215 200 50 20
button "&Özellik", 24, 270 200 50 20
edit "", 26, 165 280 210 20, autohs
box "Kick Mesajınız", 25, 160 265 220 45
button "Düşman Listesi Açık", 27, 5 315 180 20
button "Düşman Listesi Kapalı", 28, 200 315 180 20
}
alias shitdefmsg { return 4Bad Nick / Düşman Listemdesin.! }
alias shitsetup if $dialog(Bads) == $null dialog -m Bads Bads
alias s_about_s if $dialog(sabout) == $null yardi Bu özellik Sayesinde Kanala Giren İstenmeyen Kişiler Kick Sebebiyle Birlikte Kanaldan Atılır.
on *:dialog:Bads:dclick:2:{ /.ruser 666 $did(2).seltext | did -d Bads 2 $did(2).sel }
on *:dialog:Bads:sclick:6:{ if ($did(4) != $null) { did -a Bads 2 $did(4) | .auser 666 $did(4) | did -fr Bads 4 } }
on *:dialog:Bads:sclick:10:{ set %mazk 0 }
on *:dialog:Bads:sclick:11:{ set %mazk 1 }
on *:dialog:Bads:sclick:12:{ set %mazk 2 }
on *:dialog:Bads:sclick:13:{ set %mazk 3 }
on *:dialog:Bads:sclick:14:{ set %mazk 4 }
on *:dialog:Bads:sclick:15:{ set %mazk 5 }
on *:dialog:Bads:sclick:16:{ set %mazk 6 }
on *:dialog:Bads:sclick:17:{ set %mazk 7 }
on *:dialog:Bads:sclick:18:{ set %mazk 8 }
on *:dialog:Bads:sclick:19:{ set %mazk 9 }
on *:dialog:Bads:sclick:21:{ if (%banx == !) { unset %banx | did -u Bads 22 } | else { set %banx ! | did -c Bads 22 } }
on *:dialog:Bads:sclick:22:{ if (%banx == $null) { set %banx ! | did -u Bads 21 } | else { unset %banx | did -c Bads 21 } }
on *:dialog:Bads:sclick:23:{
set %banx ! | set %mazk 2 | set %shitkickmsg $shitdefmsg | did -c Bads 12,22
did -a Bads 26 %shitkickmsg | did -u Bads 10,11,13,14,15,16,17,18,19,21
}
on *:dialog:Bads:sclick:24:{ s_about_s }
on *:dialog:Bads:edit:26:{ set %shitkickmsg $did(26) }
on *:dialog:Bads:sclick:27:{ .enable #shitlizt | did -e Bads 21,22 }
on *:dialog:Bads:sclick:28:{ .disable #shitlizt | did -b Bads 21,22 }
on *:dialog:Bads:init:*:{
if ($group(#shitlizt) == off) { did -b Bads 21,22 }
if (%mazk == 0) { did -c Bads 10 }
if (%mazk == 1) { did -c Bads 11 }
if (%mazk == 2) { did -c Bads 12 }
if (%mazk == 3) { did -c Bads 13 }
if (%mazk == 4) { did -c Bads 14 }
if (%mazk == 5) { did -c Bads 15 }
if (%mazk == 6) { did -c Bads 16 }
if (%mazk == 7) { did -c Bads 17 }
if (%mazk == 8) { did -c Bads 18 }
if (%mazk == 9) { did -c Bads 19 }
if (%banx == $null) { did -c Bads 21 }
if (%banx == !) { did -c Bads 22 }
did -a Bads 26 %shitkickmsg
if ($ulist(*,666,0) != $null) {
set %cnt.shit 0
while (%cnt.shit < $ulist(*,666,0)) {
inc %cnt.shit 1
did -a Bads 2 $ulist(*,666,%cnt.shit)
}
unset %cnt.shit
}
}
Kodu ALT+R Yapip Remoteye Koyduktan Sonra, Bad Nick Eklemek icin /bads Yazmaniz Yeterlidir. |
