hola antes que nada para ver, la Ips de un user.. su verdadera ip... tenes que ser IRCops Co-Adm Adm o roots del servidor igual te dejare un remote
alias wip {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
.enable #grupo.wip
set %nick.wip.vnt $1
whois $1 $1
}
#grupo.wip off
raw *:*:{
set %chan.temp $chr(32)
if ($numeric == 311) {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
echo @WhoisUser ----------------------------------( $+(,Whois:,$chr(32),04,$2,,) $+ )----------------------------------
aline 1 @WhoisUser 2Whois/Wip Mode:4 $+($2,$chr(33),$chr(3),7,$3,$chr(3),12,@,$chr(3),5,$4-)
}
if ($numeric == 312) {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
aline 1 @WhoisUser 2Servidor:3 $3-
}
if ($numeric == 313) {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
echo @WhoisUser 2IRCop Status:4 $5-
}
if ($numeric == 319) {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
var %i 1
set %canal.nick $chr(32)
while (%i < $numtok($3-,32)) {
set %chan.temp $+(%chan.temp,$chr(32),$chr(3),$rand(0,7),$gettok($3-,%i,32),$chr(3))
inc %i
}
echo @WhoisUser 2Canales: $replace(%chan.temp,@,4@,+,3+,&,7&,%,12%,~,10~)
; echo -s %chan.temp
}
if ($numeric == 378) {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
echo @WhoisUser 2Host:3 $6 <> 2Ip:4 $7
set %ip.nick.wip $7
}
if ($numeric == 318) {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
wipDos %ip.nick.wip
}
if ($numeric == 402) {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
echo @WhoisUser 3No existe información para el 2nick:4 %nick.wip.vnt
}
}
#grupo.wip end
alias wipDos {
if (!$window(@WhoisUser)) { window -ak @WhoisUser 700 100 600 300 @WhoisUser }
if ($1 != $null) {
set %ip.consulta $1
sockopen wipNuevo
www.ip-tracker.org 80
set %ipc $chan
}
}
on *:sockopen:wipNuevo:{
if (!$sockerr) {
sockwrite -n $sockname GET /locator/ip-lookup.php?ip= $+ %ip.consulta HTTP/1.0
sockwrite -nt $sockname Host:
www.ip-tracker.org sockwrite -n $sockname User-Agent: Mozilla
sockwrite -n $sockname
echo @WhoisUser ----------------------------------( $+(,04,%ip.consulta,,) $+ )----------------------------------
; echo @WhoisUser IP Consulta : 4 %ip.consulta
}
else { sockclose wipNuevo }
}
on *:sockread:wipNuevo:{
sockread %wipNew
if (Hostname: isin %wipNew) {
echo @WhoisUser Host : 4 $gettok($gettok(%wipNew,10,62),1,60)
}
if (IP Blacklist Check: isin %wipNew) {
echo @WhoisUser IP en Lista Negra : 4 $gettok(%wipNew,4,62)
}
if (Continent: isin %wipNew) {
echo @WhoisUser Continente : 4 $gettok($gettok(%wipNew,11,62),1,60)
echo @WhoisUser País : 4 $remove($gettok($gettok(%wipNew,17,62),1,60), ) $+(,$gettok($gettok(%wipNew,18,62),1,60),)
echo @WhoisUser Ciudad : 4 $remove($gettok($gettok(%wipNew,23,62),1,60), )
echo @WhoisUser Estado : 4 $remove($gettok($gettok(%wipNew,30,62),1,60), )
echo @WhoisUser ISP : 4 $remove($gettok($gettok(%wipNew,42,62),1,60), )
echo @WhoisUser Organización : 4 $remove($gettok($gettok(%wipNew,48,62),1,60), )
}
if (IP Currency: isin %wipNew) {
echo @WhoisUser Moneda : 4 $gettok($gettok(%wipNew,7,62),1,60)
echo @WhoisUser Código País : 4 $gettok($gettok(%wipNew,13,62),1,60)
}
if (var ip_point isin %wipNew) {
echo @WhoisUser Coordenadas Google Maps : 4 $gettok($gettok(%wipNew,2,40),1,41)
echo @WhoisUser ----------------------------------( $+(,03,Fin consulta IP:,$chr(32),04,%ip.consulta,,) $+ )----------------------------------
.disable #grupo.wip
}
}
esto va en remote (alt+r file new ahi pegas suerte )
