alright, i post my problem here...
it will be a LooooooooooooooooNg post :tongue:
okay, first things to know:
#DNS group is for my default dns script
#NDNS is for 2nd dns script that is NOT default
-------------------------------------------------------------
Default DNS:
-------------------------------------------------------------
;made by codemastr
;www.codemastr.com
;www.unrealircd.com
#DNS on
ON *:DNS:{
if ($dns(0) == 0) {
linesep -s
echo -s $timestamps $+ $theme(logo) Unable to resolve $iif($iaddress,$iaddress,$dns(0).addr)
linesep -s
}
else {
var %numhosts $dns(0), %host = 0
var %hosts
while (%host < %numhosts) {
inc %host 1
set %hosts %hosts $iif($dns(1) == $dns(1).ip,$dns(%host).addr $+([,$ccode($dns(%host).addr),]),$dns(%host).ip) $+ $chr(44)
}
linesep -s
echo -s $timestamps $+ $theme(logo) Resolved $dns(1) to $left(%hosts,$calc($len(%hosts)-1))
linesep -s
}
halt
}
#DNS end
just not to get confused, this line:
echo -s $timestamps $+ $theme(logo)
makes echo in this shape (its theme thing):
(hh:mm) >> some echo
-----------------------------------------------
anyways here come second script that i need help with
-----------------------------------------------
; IP WHOIS INFORMATION v0.2 by magic <magic@mirc.net>
; ---------------------------------------------------
; To use the addon load it in your copy of mirc: /load -rs whoisip.mrc
; and to use the addon type /whoisip IP/HOST/NICKNAME in any window and
; the result should echo into yoru active window.
; You are free to use this code any way you want aslong you give me credit for it.
; A special thanks to tidy_trax for his recomendations and $regex help.
alias whoisip {
.disable #DNS
sockclose whois
if ($regex($1,/^(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})$/)) {
sockopen whois whois.cyberabuse.org 43
set %whois.ip $1-
}
if (!$regex($1,/^(\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3})$/)) {
.enable #NDNS
.dns $1-
}
}
#NDNS off
on *:DNS:{
if ($dns(0).ip) {
set %whois.ip $dns(0).ip
sockopen whois whois.cyberabuse.org 43
.disable #NDNS
}
else {
window -lk -t4,15 +s @HostInfo 220 50 320 290 @HostInfo Verdana 11
aline @HostInfo Error: invalid Nickname or IP
.disable #NDNS
.enable #DNS
}
}
#NDNS end
on *:sockopen:whois: {
if ($sockerr) {
aline @HostInfo Error: Unable to connect to whois server.
sockclose whois
.enable #DNS
.disable #NDNS
}
else {
sockwrite -nt whois %whois.ip
}
}
on *:sockread:whois: {
sockread %data
window -lk -t4,15 +s @HostInfo 220 50 320 290 @HostInfo Verdana 11
if (%data != $null) && (% $+ * !iswm %data) {
aline @HostInfo %data
}
.enable #DNS
}
thing i have problem is that i cannot /whoisip on
nickname that returns HOST NAME, or /whoisip HOST name.
but just on IP number, so i need some kind soul to make this second script make to always resolve host or ip to IP
so i can ALWAYS send valid info to cyberabuse.org
hope someone understand what i want to acomplish...