on $*:text:/^[!@]stats*/Si:*: {
  if (!$2) { notice $nick Syntax !stats RSN }
  elseif ($sock(Stats)) {
    .sockclose Stats
  }
  set %display $iif($left($1,1) == @,msg $chan,notice $nick)
  set %display1 $iif($left($1,1) == @,msg $chan,notice $nick)
  set %chan $chan
  set %nick $nick
  set %person $2
  sockopen Stats /lang/en/aff/runescape/hiscorepersonal.ws?user1=$+ 80
}
on *:SOCKOPEN:Stats: {
  sockwrite -nt $Sockname GET /lang/en/aff/runescape/hiscorepersonal.ws?user1= $+ %person HTTP/1.1
  $sockname Host: http://hiscore.runescape.com/lang/en/aff/runescape/hiscores.ws
  sockwrite -nt $sockname $crlf $crlf
}
on *:SOCKREAD:stats:{
  if ($sockerr) {
    msg $chan ERROR: $sockname $+ . Code: $Sockerr
    halt
  }

  unset %chan
  unset %nick
  unset %person
}