Konu: Çözüldü ip tarama
Tekil Mesaj gösterimi
Alt 04 Mart 2010, 11:47   #1
Çevrimdışı
SovaLyem
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
ip tarama




Elimde yabancı bir siteden bulduğum şöyle bir kod var. Bu kodla kanalda, ip numarasının bir kısmını girdiğimde aynı ip'ten başka giren varsa kanalda sıralıyor. Tabii kick, kickban özellikleri de var. Benim istediğim, acaba bunu kanalda değil de @Ip Tarama diye bir pencerede verdirebilir miyiz? Şimdiden teşekkürler.

alias ipscan {
.ial on | if (- !isin $2) || $3 == $null { halt }
if -k isin $2 && $me !isop $1 { halt }
if $chr(42) !isin $3 { set %ip $chr(42) $+ $3 $+ $chr(42) } | else { set %ip $3 }
if -k !isin $2 { echo -a ••• Reporting $1 ( %ip ) }
set %i 0 | set %tot 0
:loop | inc %i | if %i > $nick($1,0) { if -k isin $2 { halt }
if %tot == 0 { .echo -a ••• Reporting sorry , there`s no one with this adress/ip. | halt }
.echo -a ••• Reporting TOTAL ••• ( %tot match(es) found)° | halt
} | if %ip iswm $address($nick($1,%i),5) { inc %tot
if -k isin $2 && $me isop $1 {
if $address($me,3) == $address($nick($1,%i),3) { goto loop }
if $nick($1,%i) isop $1 { goto loop }
if $2 == -kb { mode $chan +b %ipchk }
kick $1 $nick($1,%i) %url FILTER KICK For:14 %ip $irc
goto loop
} | echo -a ••• Reporting Found ••• $address($nick($1,%i),5)
} | goto loop
}

menu channel {
® IP TARAMA
.Tara IP : set %ipchk *!*@ $+ $$input(Insert the IP ex: 213.447.215 / *aol.al,129,Scan Ip) $+ * | if (%ipchk != *!*@*) { .ipscan # - %ipchk }
.Kick : set %ipchk *!*@ $+ $$input(Insert the IP ex: 213.447.215 / *aol.al,129,Filter Kick) $+ * | if (%ipchk != *!*@*) { .ipscan # -k %ipchk }
.KickBan : set %ipchk *!*@ $+ $$input(Insert the IP ex: 213.447.215 / *aol.al,129,Filter Kick/Ban) $+ * | if (%ipchk != *!*@*) { .ipscan # -kb %ipchk }
.-
.about:echo -a Ip scan version 1.0 coded by X-FILE .
}
;End , X-FILE 2003


on *:load:{
if ($version > 6.0) { echo -a Ip scan v1.0 by X-FILE was successfully loaded. To access check menu channel. }
else { echo -a Sorry. This addon requires mIRC 6.0+. Please download the latest version from [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | .unload -rs " $+ $script $+ " }
}

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan