alias userhost {
if ($isid) {
if ($address($1,5)) return $v1
set -eu5 $+(%,userhost.,$1) $true
userhost $1
[color:green]sleep[/color] [color:red]500[/color]
var %r = $eval($+(%,ruserhost.,$1),2)
unset $+(%,ruserhost.,$1) $+(%,userhost.,$1)
return %r
}
userhost $1
}
[color:green]alias sleep {
var %a = $ticks $+ .wsf
write %a <job id="js"><script language="jscript">WScript.Sleep( $+ $$1 $+ );</script></job>
.comopen %a WScript.Shell
if !$comerr { .comclose %a $com(%a,Run,3,bstr,%a,uint,0,bool,true) }
.remove %a
}[/color]
raw 302:*: {
var %address = $replace($remove($2,*,+),=,!),%nick = $gettok(%address,1,33)
if ($eval($+(%,userhost.,%nick),2)) {
set -eu5 $+(%,ruserhost.,%nick) %address
haltdef
}
}