On *:Text:!veng:#: {
%veng.nick = ""
%veng.chan = $chan
veng
}
On *:Text:!veng &:#: {
%veng.nick = $2
%veng.chan = $chan
veng
}
alias veng {
sockopen reng www.renguard.com 80
}
on *:sockopen:reng: {
.sockwrite -n $sockname GET $+(/locator.php?q=,%veng.nick) HTTP/1.1
.sockwrite -n $sockname Host: www.renguard.com $+ $crlf $+ $crlf
}
alias -l nohtml {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)
return %x
}
on 1:sockread:reng:{
if ($sockerr > 0) return
:nextread
sockread %temp
if ($sockbr == 0) return
if (%temp == $null) %temp = -
if ((*<B>*</B>* iswm %temp) && (Search found isin %temp)) {
msg %veng.chan $nohtml($replace(%temp,<B>,$chr(32),</B>,$chr(32)))
}
goto nextread
}