All pastes #271873 Raw Edit

Something

public text v1 · immutable
·published 2006-12-08 14:56 UTC
rendered paste body
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 (<dt><span class="newsdate">* iswm %rsnews || </span>*</dt><td style="text-align: justify; vertical-align: top;">*</td> 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 (<td style="text-align: justify; vertical-align: top;">* iswm %rsnews) {
      %display  3 $nohtml(%rsnews)
      sockclose $sockname
    } 
  }
}
alias -l nohtml {
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$chr(32),%x), %x = $remove(%x,&nbsp;)
  return %x
}