Tekil Mesaj gösterimi
Alt 14 Aralık 2015, 01:07   #232
Çevrimdışı
ASiHeLL
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Add-on ve snippet(parça) kod istekleri buraya




KuL Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Kim ne sebepden ban atmis olayin bakmak icin, her atilan bani kayit etmen gerekiyor.

Bunun icin XcLusive daha önce bir Kod yazmisti, o Kodun alt kismini diledigin sekilde degistirip bunu elde edebilirsin.

Oda böyle gözükür:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias xline.data return $shortfn($+($mircdir,xline.data)) on *:snotice:*:{ if (*Z:line added* iswm $1-) { if ($2 == Global) { write xline.data $6 $+ $chr(183) $+ $15 $+ $chr(183) $+ $left($25-,-1) $+ $chr(183) $+ $date $time } else { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time } } if (*K:Line added for* iswm $1-) { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time } if (*G:Line added for* iswm $1-) { write xline.data $5 $+ $chr(183) $+ $14 $+ $chr(183) $+ $left($24-,-1) $+ $chr(183) $+ $date $time } if (*Permanent Global Z:line* iswm $1-) { write xline.data $7 $+ $chr(183) $+ $remove($16,:) $+ $chr(183) $+ $left($17,-1) $date $time } if (*Permanent Z:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time } if (*Permanent G:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time } if (*Permanent K:Line* iswm $1-) { write xline.data $6 $+ $chr(183) $+ $remove($15,:) $+ $chr(183) $+ $left($16,-1) $+ $chr(183) $+ $date $time } if (*removed Global Z:line* iswm $1-) { if ($read($xline.data,w,$+(*,$5,*))) { write $+(-dl,$readn) $xline.data } } if (*removed K:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) { write $+(-dl,$readn) $xline.data } } if (*removed Z:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) { write $+(-dl,$readn) $xline.data } } if (*removed G:Line* iswm $1-) { if ($read($xline.data,w,$+(*,$4,*))) { write $+(-dl,$readn) $xline.data } } if *Expiring Global Z:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($5,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data } } if *Expiring K:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data } } if *Expiring G:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data } } if *Expiring Z:Line* iswm $1-) { if ($read($xline.data,w,$+($remove($4,$chr(40),$chr(41)),*))) { write $+(-dl,$readn) $xline.data } } } on *:input:#KANAL:{ if $1 == !banac && $2 { if $read($xline.data,w,$+(*,$2,*)) { var %xline.data $read($xline.data,$readn) | set -u30 %banliip $2 } if (!%xline.data) { msg # $qt($2) ipi icin herhangi bir Kayit bulunamadi! | halt } else { msg # $qt($2) Hakkinda Ban Raporu: msg # - msg # IP Adresi: $gettok(%xline.data,1,183) msg # Banlayan: $gettok(%xline.data,2,183) msg # Sebep ve Tarih: $gettok(%xline.data,3,183) $gettok(%xline.data,4,183) msg # - msg # Bani acmak istiyorsaniz !ac yazmaniz yeterli. } } if $1 == !ac { .gline $+(-*@,%banliip) .gzline $+(-*@,%banliip) .zline $+(-*@,%banliip) .kline $+(-*@,%banliip) .shun $+(-*@,%banliip) msg # %banliip üzerinde bütün Banlar kaldirilmistir. } }

!ac Komutunu anladimda, !acma ne icin gerekli onu anlamadim.

Calisma sekli söyle, Üstde kalin sekilde yazan Kanal yerine calismasini istedigin kanali yaziyorsun.

Sonra o Kanala !banac IP diyorsun.

Ban varsa sana raporu gösteriyor, yoksada bir sonuc bulunamadi yaziyor.

Rapor cikiyorsa eger verilen IP Adresi 30 Saniyeligine hafizaya aliniyor. Ve sen kanala !ac dediginde o IP üzerindeki Banlari aciyor.

30 saniye sonra gectikden sonra !ac dersen islem yapmaz.

Banin acilmasini istemiyorsan, hic birsey yapman gerekmiyor


--

Sahsi fikrim böyle birseyi yapicaksan, kanalda hep duran bir botun icine eklemeni tavsiye ederim. Yoksa sen online oldugun sürece kayit tutar. Sen ciktikdan sonra atilmis olan banlari kayit edemez.

Bu yüzden INPUT Eventini TEXT olarak degistirip, basit bir botun icine ekleyip tüm banlari kontrol edebilirsin.

######################################



Global mesaj notice olarak algilaniyordu sanirim.

Bu sekilde deniyebilirsin.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:NOTICE:*:*:{ if ($nick == Global) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] aline @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1- halt } }

Global Mesaj gelince, hangi Nickden geliyor sana bilmiyorum. Genelde GLOBAL MESAJ seklinde geldigi icin üstde $nick Kismina Global yazdim.

Eger baska Nickde geliyorsa orayi degisebilirsin.

Ya ben tüm global kanaldaki banlanan bad nickleri banlanan userlerin banını açmak için alias yada remote istiyordum ama bi türlü cevabınızı alıntı yapamadım yardımcı olurmusunuz lütfen

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver