on *:TEXT:!stat*:#: { sockopen hiscore hiscore.runescape.com 80 | set %user $2 | set %n $nick }
on *:sockopen:hiscore: { 
  sockwrite -n hiscore GET /lang/en/aff/runescape/hiscorepersonal.ws?user1= $+ %user HTTP/1.1
  sockwrite -n hiscore Host: hiscore.runescape.com $+ $crlf $+ $crlf
}
on *:sockread:hiscore:{
  if ($sockerr) {
    notice %n Error.
    halt
  }
  else { 
    var %temptext
    sockread %temptext 
    if (<td align="right">*</td> iswm %temptext) { set %skillline %skillline $+($htmlfree(%temptext)) }
    echo -a %temptext
  }
}
on *:sockclose:hiscore: { unset %n | unset %user | unset %skillline }
alias -l htmlfree {
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)
  return %x
}