mIRC Homepage
Posted By: FMJ user's IP - 22/11/03 03:37 PM
how to save user's IP in a var? is possible? thanks
Posted By: Adrenalin Re: user's IP - 22/11/03 04:03 PM
set %Ip = $addtok(%Ip,$address($nick,2),32)
But take care.. The max lengh of a var is ~800 symbols.
Posted By: FMJ Re: user's IP - 22/11/03 04:07 PM
Quote:

But take care.. The max lengh of a var is ~800 symbols.

so? I don't understand...?
Posted By: Adrenalin Re: user's IP - 22/11/03 04:20 PM
In one var you can save max. ~27 ips.
You can write to a file the ip's..
write file.txt $remove($address($nick,2),*!*@)
And to find if the ip exist in the file use $read(file.txt,s,$address($nick,2))
Posted By: FMJ Re: user's IP - 22/11/03 04:31 PM
but it's not the real IP... confused
ip019-11-2.dialup.edisontel.com
ip is for example 180.92.102.29

Posted By: Adrenalin Re: user's IP - 22/11/03 04:34 PM
Show me the full script where you use that..
Posted By: FMJ Re: user's IP - 22/11/03 04:53 PM
but it's not the real IP...
ip019-11-2.dialup.edisontel.com
real IP is for example 180.92.102.29
Posted By: Adrenalin Re: user's IP - 22/11/03 04:56 PM
Then you need to check if that is ip or not.. If not dns it..
var %host = $remove($address($nick,2),*!*@)
if ($right(%host,1) isletter) {
dns %host
}
else {
write file.tx %host
}t
write
on 1:DNS:{
var %n = $dns(0)
while (%n > 0) {
write file.txt $dns(%n).ip
dec %n
}
}

Posted By: FMJ Re: user's IP - 22/11/03 05:16 PM
there is a syntax error...
but the first part where I put?
Posted By: Dr4g0n Re: user's IP - 23/11/03 11:05 AM
create dns.mrc or whatever put this [censored] in: [and ip.txt]

var %host = $remove($address($nick,2),*!*@)
if ($right(%host,1) isletter) {
dns %host
}
else {
write ip.txt %host
}
write
on 1:DNS:{
var %n = $dns(0)
while (%n > 0) {
write ip.txt $dns(%n).ip
dec %n
}
}

and load the sucker and boom youre pc explodes i should watch out
have you read and improved the script that was posted?
Posted By: FMJ Re: user's IP - 23/11/03 01:29 PM
I don't understand about dns.mrc but I used:
Code:
on 1:DNS:{
var %n = $dns(0)
while (%n > 0) {
write ip.txt $dns(%n).ip
dec %n
}
}
 

and it works... thanks
© mIRC Discussion Forums