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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Ban Koruması... (https://www.ircforumlari.net/mirc-scripting-sorunlari/4233-ban-korumasi.html)

Abdest almayı dene :D

azuhahhaa
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] dan yeni mIRC indir.. :) oncekinden komple kurtul :)

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 *:BAN:#: {
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ı:

Mast3r Nickli Üyeden Alıntı

Eğer ßirisi ßeni ßanlarsa ßanı kaldırıp Onu Kanaldan atmamı Sağlayacak ßi Code ama çalı$mıor ßi ßakarmısınız ???

on *:ban:#:{
if $banmask == $address($me,0) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }
if $banmask == $address($me,1) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }
if $banmask == $address($me,2) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }
if $banmask == $address($me,3) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }
if $banmask == $address($me,5) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }
if $banmask == $address($me,6) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }
if $banmask == $address($me,7) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }
if $banmask == $address($me,8) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }
if $banmask == $address($me,9) { /notice $nick (do not baN mE !..) | mode $chan -ob+b $nick $banmask $address($nick,3) | kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }

Kod calismaz cünkü senin nickini tanimiyor

Kod:

on *:ban:#:{

if $nick == $me { halt }

if ($banmask iswm $address($me,5)) { .mode $chan -bo+b $banmask $nick $address($nick,2) | .kick $chan $nick yoU fooLI14mpossibLe F14or Y14ou 4! }

Bunu dene.

Daha ne yazıp duruosunuz. Çalışan kodları yazıpta ekleyemedi arkadaş...

Tekrarlıyorum..

Verilen bütün kodlar çalışıyor..
Remote yi açtığın zaman Listen menusundeki events in check olup olmadığını bi baksana sen..
Bide "/remote on" yaz hata sende..

Alıntı:

Utku Nickli Üyeden Alıntı

Kim sallamış bu kodları :)

Sen zahmet etme cocorico, git biraz başlık falan sil, biz yardım ederiz KENDİ çabalarımızla. :)

+999 Utku :)

S@meT Ne ekLeyememsi Ya Sende Alla Alla .. Diğer ßütün Remotede ßuLunan Kodlar Çalı$ıyor Diorum ... Çalı$madı işte ... 0 Mirc e koydum yine çaLı$madı ...

Bende niye çalışıyorum arkadaşım o zaman alla allaaaa....

on *:ban: varmı scriptinin başka yerinde varsa eğer sonunda haltdef olup olmadığına bak..
on &*:ban da olabilir onceki kodlarını bi gözden geçir...

yeni bi dosya txt olustur sonra kodunu at onun icine, dosyayıda mIRC inin icine sonra herhangi bi editboxta /load -rs dosya.txt yap..ßirde ßunu dene.inş işine yarar

Alıntı:

Utku Nickli Üyeden Alıntı

Kim sallamış bu kodları :)

Sen zahmet etme cocorico, git biraz başlık falan sil, biz yardım ederiz KENDİ çabalarımızla. :)

Senin başka işin yokmu "YAĞDANLIK"