IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 25 Kasım 2007, 19:36   #1
goKhaN`
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Bad Nick / Düşman Menü




SoyLe bir Kod buLdum biLmiyorum Varmi yokmu Ben arama Yaptim Ama buLamadım. Varsada Yetkılı Arkdaslar Konuyu Silebilr. Benim Hosuma gıttı Calisisiyorda. Kolay gelsin..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias Bads { dialog -m Bads Bads } #shitlizt on on @666:join:#:{ if ($nick != $me) { kick # $nick %shitkickmsg if (%banx == !) { /mode # +b $$1 | /kick # $$1,%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: *!*user@*.host", 13, 20 80 120 20 radio "4: *!*@*.host", 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: nick!*user@*.host", 18, 20 180 120 20 radio "9: nick!*@*.host", 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 } } alias badnick { /mode # +b $$1 | /kick # $$1 14ßad Nick Enfocer 4ßan 14Detected 4[60 Secs] | halt } #blacklist on on +@karaliste:join:#: { badnick $nick } #blacklist end


Not: Cod3r'i Kımdır biLmiyorum..

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Mobil Chat
Cevapla

Etiketler
bad, dusman, düşman, menu, menü, mirc, mirc download, mirc indir, nick


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
!rootekle nick !rootsil nick !root bot'a üzerinde nasil uygularım? ircmsn mIRC Scripting Sorunları 30 20 Temmuz 2012 18:15
Düşman listesine nick ekleme Burce mIRC Scripting Hazır Kodlar 1 23 Mart 2012 19:08
Nick renklendirici addon lazım sunucu sahibi nin nick rengi renkli olcak mesela iCe-t mIRC Scripting Sorunları 10 10 Kasım 2009 23:36