rendered paste bodyon $*:text:/^[!@.](rsnews|runenews|runescapenews)/Si:#:{
/INC %ID 1
set $+(%,output.rsnews.,%ID) $iif($left($1,1) == @,msg $chan,notice $nick)
sockopen $+(rsnews.,%ID) www.xbot.frosthost.net 80
}
ON *:SOCKOPEN:rsnews.*:{
var %price.id = $gettok($sockname,2,46)
sockwrite -nt $sockname GET /parsers/rsnews.php HTTP/1.1
sockwrite -nt $sockname Host: www.xbot.frosthost.net
sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:rsnews.*:{
var %price.id = $gettok($sockname,2,46)
if ($sockerr) {
echo -a Error in RSNews lookup
sockclose $sockname
halt
}
else {
var %read
sockread %read
if (*[RSNEWS]* iswm %read) { $($+(%,output.RSNEWS.,%ID),2) $c1(RuneScape News) $+ $c2($($+(%,RNEWS.,%ID),2) $+ :) $c2($remove(%read,[RSNEWS])) }
}
}
alias htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
return %x
}