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

>
+
Etiketlenen Kullanıcılar

 
 
LinkBack Seçenekler Arama Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 17 Haziran 2005, 03:46   #13
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



on *:LOAD: {
set %ebap.kmsg You have been owned by me! [Easy Ban Protection v1.5]
}
alias bprot { dialog -m ebap ebap }
dialog ebap {
title "Kisisel ban korumasi"
size -1 -1 103 78
option dbu
box "Kick messajinizi girin:", 5, 3 13 98 22
edit "", 6, 6 20 92 11, autohs
check "Acik", 7, 3 1 28 10
box "Uygulama:", 1, 3 37 51 39
radio "Deop user", 2, 7 44 37 10, group
radio "Kick user", 3, 7 54 32 10
radio "Kick/Ban user", 4, 7 64 43 10
button "Yardim", 8, 72 56 30 10
button "Kapat", 9, 72 67 30 10, cancel
button "Kick msg sil", 10, 59 36 42 10
}
on *:dialog:ebap:init:*: {
did -a ebap 6 %ebap.kmsg
if (%ebap.p == d) { did -c ebap 2 }
elseif (%ebap.p == k) { did -c ebap 3 }
elseif (%ebap.p == kb) { did -c ebap 4 }
if (%ebap.st == on) { did -c ebap 7 | did -e ebap 2,3,4,6,10 }
if (%ebap.st == off) { did -b ebap 2,3,4,6,10 }
}
on *:dialog:ebap:sclick:*: {
if ($did == 7) { if ($did(ebap,$did).state == 1) { did -e ebap 2,3,4,6,10 | set %ebap.st on | .enable #prot } | else { did -b ebap 2,3,4,6,10 | set %ebap.st off | .disable #prot } }
if ($did == 2) { set %ebap.p d }
if ($did == 3) { set %ebap.p k }
if ($did == 4) { set %ebap.p kb }
if ($did == 10) { did -r ebap 6 | unset %ebap.kmsg }
if ($did == 8) { dialog -m ebaphelp ebaphelp }
}
on *:dialog:ebap:edit:6: { set %ebap.kmsg $did(ebap,6) }
#prot off
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#: {
if (%ebap.st == on) {
if ($me == $nick) { return }
if ($me isop $chan) && (%ebap.p == d) && ($banmask iswm $address($me,5)) { mode $chan -b $banmask | mode $chan -o $nick | msg # $nick %ebap.kmsg }
if ($me isop $chan) && (%ebap.p == k) && ($banmask iswm $address($me,5)) { mode $chan -b $banmask | mode $chan -o $nick | kick $chan $nick %ebap.kmsg }
if ($me isop $chan) && (%ebap.p == kb) && ($banmask iswm $address($me,5)) { mode $chan -o $nick | mode $chan -b $banmask | ban $chan $nick | kick $chan $nick %ebap.kmsg }
}
else { halt }
}
#prot end

Menu status,menubar {
-

© Ban korumasi { bprot }
}
dialog ebaphelp {
title "Ban korumasi"
size -1 -1 110 86
option dbu
edit "Ban korumasinda artik secenek yapabilirsiniz sizi banliyan operatoru ister deop ister kick veya kick ban ederek cezalandirabilirsiniz", 2, 2 12 106 63, read multi
button "Button", 3, 80 76 30 10, cancel
}



ben deb unu bi yerden almistim ama unuttuim nerden aldigimi guzel secenekli bisey ban korumasi yapan artik kusura bakmasin nerdne aldigimi hatirlayamadim

 
Alıntı ile Cevapla

 

Etiketler
ban, korumasi, koruması, mirc, mirc download, mirc indir


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

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
IP Koruması Toprak mIRC Scripting Hazır Kodlar 7 17 Ekim 2013 21:10
Join Part Koruması & Hızlı Giriş Koruması Lazım ACİL PLS darkshades1 mIRC Scripting Sorunları 5 15 Kasım 2010 11:12
Clone Koruması Proxy Koruması ve SaldırıProgramına OnLem KOdu Lazım neobre mIRC Scripting Sorunları 13 09 Ekim 2009 00:07
ban koruması ahmet_corum mIRC Scripting Sorunları 5 17 Mart 2009 09:01
@ koruması lacremel mIRC Scripting Sorunları 1 25 Ocak 2008 17:49