on *:TEXT:*:#:{ if ($1 == !rsnews) { /set %display /notice $nick } if ($1 == @rsnews) { /set %display /msg $chan sockopen rsnews runescape.com 80 } on *:sockopen:rsnews:{ sockwrite -n $sockname GET /lang/en/aff/runescape/title.ws HTTP/1.1 sockwrite -n $sockname Host: runescape.com $+ $crlf $+ $crlf } on *:sockread:rsnews:{ if ($sockerr) { echo -a Error. halt } else { var %rsnews sockread %rsnews if (
* iswm %rsnews || *
* iswm %rsnews) { var %stripped = $nohtml(%rsnews), %rsnewsdate = $gettok(%stripped,1,32), %rsnewstitle = $gettok(%stripped,2-,32), %rsnewstext = $gettok(%stripped,4-,32) /display 1¤¤¤ 12RuneScape News 1¤¤¤7 %rsnewstitle 1¤7 %rsnewsdate 14¤ } if (* iswm %rsnews) { %display 3 $nohtml(%rsnews) sockclose $sockname } } } alias -l nohtml { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$chr(32),%x), %x = $remove(%x, ) return %x }