alias -l cleanup {
  unset % $+ $1 $+ *
  unset %name
  unset %s
  if ($sock($1)) { /sockclose $1 }
  to unset %remainder*, %xp*, %v
}

on $*:TEXT:/^[@!](att|def|str|range|mage|pray|overall|hunt|farm|farming|hunter|attack|defence|defense|strength|magic|prayer|con|construction|fish|fishing|thief|theif|thieving|rc|runecrafting|crafting|craft|mine|mining|agil|agility|hp|hitpoints|hits|herb|herblaw|herblore|slay|slayer|fletch|fletching|fm|firemaking|wc|woodcutting|smith|smithing|cook|cooking|stats) */Si:#: {
  if ($2) { set %name $2 }
  if (!$2) { set %name $nick }
  set %temp1 [ $+ [ %name ] ] $replace($1,!,$null)
  set %skill [ $+ [ %name ] ] $replace(%temp1 [ $+ [ %name ] ],@,$null)
  unset %temp1
  if (!$2) {   var %x 1

    while ($sock(rsstats. $+ %x)) {
      inc %x
    }

    if ($regex($1-,(Symptora \s)?\.)) { set % $+ rsstats. $+ %x $+ .return .msg $nick }
    if ($regex($1-,(Symptora \s)?\@)) { set % $+ rsstats. $+ %x $+ .return msg $chan }
    if ($regex($1-,(Symptora \s)?\!)) { set % $+ rsstats. $+ %x $+ .return .notice $nick }

    set % $+ rsstats. $+ %x $regsubex($nick,(Symptora \s)?[\.!@]stats,)
    sockopen rsstats. $+ %x hiscore.runescape.com 80 
  halt }
  var %x 1

  while ($sock(rsstats. $+ %x)) {
    inc %x
  }

  if ($regex($1-,(Symptora \s)?\.)) { set % $+ rsstats. $+ %x $+ .return .msg $nick }
  if ($regex($1-,(Symptora \s)?\@)) { set % $+ rsstats. $+ %x $+ .return msg $chan }
  if ($regex($1-,(Symptora \s)?\!)) { set % $+ rsstats. $+ %x $+ .return .notice $nick }

  set % $+ rsstats. $+ %x $regsubex($2-,(Symptora \s)?[\.!@]stats,)
  sockopen rsstats. $+ %x hiscore.runescape.com 80
}

on *:SOCKOPEN:rsstats.*: {
  sockwrite -nt $sockname GET /index_lite.ws?player= $+ $(% $+ $sockname,2) HTTP/1.1
  sockwrite -nt $sockname HOST: hiscore.runescape.com
  sockwrite -nt $sockname
}

on *:SOCKREAD:rsstats.*: {
  if ($sockerr) {
    $(% $+ $sockname $+ .return,2) Socket error while looking up4 $(% $+ $sockname,2) $+ 1: $sockerr
    /cleanup $sockname
    /return
  }
  var %read
  /sockread %read

  if (<html>* iswm %read) {
    $(% $+ $sockname $+ .return,2) 4 $(% $+ $sockname,2) 1isn't on the hiscores.
    /cleanup $sockname
    /return
  }

  inc % $+ $sockname $+ .inc
  set % $+ $sockname $+ .stat. $+ $(% $+ $sockname $+ .inc,2) %read
  if ($(% $+ $sockname $+ .inc,2) >= 35) { /results $sockname }
}

alias -l results {
  var %x - $+ $(% $+ $1,2) $+ -
  var %s $chr(124)
  var %i 1

  while (%i <= 24) {
    while (%i <= 24) {
      set %stats $null
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 1),2),2,44) != -1) { set %stats $chr(32) $+ 2,0Overall4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 1),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 2),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Attack4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 2),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 3),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Defense4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 3),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 4),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Strength4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 4),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 5),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2HP4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 5),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 6),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Range4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 6),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 7),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Prayer4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 7),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 8),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Magic4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 8),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 9),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Cooking4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 9),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 10),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Woodcutting4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 10),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 11),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Fletching4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 11),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 12),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Fishing4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 12),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 13),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Firemaking4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 13),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 14),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Crafting4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 14),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 15),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Smithing4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 15),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 16),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Mining4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 16),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 17),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Herblore4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 17),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 18),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Agility4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 18),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 19),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Theiving4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 19),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 20),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Slayer4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 20),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 21),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Farming4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 21),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 22),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Runecrafting4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 22),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 23),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Hunter4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 23),2),2,44) $+ %s }
      if ($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 24),2),2,44) != -1) { set %stats %stats $+ $chr(32) $+ 2Construction4 $+ $chr(32) $+ $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 24),2),2,44) }
      inc %i
    }
    set %lv [ $+ [ $1 ] ] $calc($gettok($(% $+ $1 $+ .stat. $+ $calc(11 + %v [ $+ [ $1 ] ] ),2),2,44) + 1)
    if (%lv [ $+ [ $1 ] ] == 2 ) { set %xptonext [ $+ [ $1 ] ] 83 }
    if (%lv [ $+ [ $1 ] ] == 3 ) { set %xptonext [ $+ [ $1 ] ] 174 }
    if (%lv [ $+ [ $1 ] ] == 4 ) { set %xptonext [ $+ [ $1 ] ] 276 }
    if (%lv [ $+ [ $1 ] ] == 5 ) { set %xptonext [ $+ [ $1 ] ] 388 }
    if (%lv [ $+ [ $1 ] ] == 6 ) { set %xptonext [ $+ [ $1 ] ] 512 }
    if (%lv [ $+ [ $1 ] ] == 7 ) { set %xptonext [ $+ [ $1 ] ] 650 }
    if (%lv [ $+ [ $1 ] ] == 8 ) { set %xptonext [ $+ [ $1 ] ] 801 }
    if (%lv [ $+ [ $1 ] ] == 9 ) { set %xptonext [ $+ [ $1 ] ] 969 }
    if (%lv [ $+ [ $1 ] ] == 10 ) { set %xptonext [ $+ [ $1 ] ] 1154 }
    if (%lv [ $+ [ $1 ] ] == 11 ) { set %xptonext [ $+ [ $1 ] ] 1358 }
    if (%lv [ $+ [ $1 ] ] == 12 ) { set %xptonext [ $+ [ $1 ] ] 1584 }
    if (%lv [ $+ [ $1 ] ] == 13 ) { set %xptonext [ $+ [ $1 ] ] 1833 }
    if (%lv [ $+ [ $1 ] ] == 14 ) { set %xptonext [ $+ [ $1 ] ] 2107 }
    if (%lv [ $+ [ $1 ] ] == 15 ) { set %xptonext [ $+ [ $1 ] ] 2411 }
    if (%lv [ $+ [ $1 ] ] == 16 ) { set %xptonext [ $+ [ $1 ] ] 2746 }
    if (%lv [ $+ [ $1 ] ] == 17 ) { set %xptonext [ $+ [ $1 ] ] 3115 }
    if (%lv [ $+ [ $1 ] ] == 18 ) { set %xptonext [ $+ [ $1 ] ] 3523 }
    if (%lv [ $+ [ $1 ] ] == 19 ) { set %xptonext [ $+ [ $1 ] ] 3973 }
    if (%lv [ $+ [ $1 ] ] == 20 ) { set %xptonext [ $+ [ $1 ] ] 4470 }
    if (%lv [ $+ [ $1 ] ] == 21 ) { set %xptonext [ $+ [ $1 ] ] 5018 }
    if (%lv [ $+ [ $1 ] ] == 22 ) { set %xptonext [ $+ [ $1 ] ] 5624 }
    if (%lv [ $+ [ $1 ] ] == 23 ) { set %xptonext [ $+ [ $1 ] ] 6291 }
    if (%lv [ $+ [ $1 ] ] == 24 ) { set %xptonext [ $+ [ $1 ] ] 7028 }
    if (%lv [ $+ [ $1 ] ] == 25 ) { set %xptonext [ $+ [ $1 ] ] 7842 }
    if (%lv [ $+ [ $1 ] ] == 26 ) { set %xptonext [ $+ [ $1 ] ] 8740 }
    if (%lv [ $+ [ $1 ] ] == 27 ) { set %xptonext [ $+ [ $1 ] ] 9730 }
    if (%lv [ $+ [ $1 ] ] == 28 ) { set %xptonext [ $+ [ $1 ] ] 10824 }
    if (%lv [ $+ [ $1 ] ] == 29 ) { set %xptonext [ $+ [ $1 ] ] 12031 }
    if (%lv [ $+ [ $1 ] ] == 30 ) { set %xptonext [ $+ [ $1 ] ] 13363 }
    if (%lv [ $+ [ $1 ] ] == 31 ) { set %xptonext [ $+ [ $1 ] ] 14833 }
    if (%lv [ $+ [ $1 ] ] == 32 ) { set %xptonext [ $+ [ $1 ] ] 16456 }
    if (%lv [ $+ [ $1 ] ] == 33 ) { set %xptonext [ $+ [ $1 ] ] 18247 }
    if (%lv [ $+ [ $1 ] ] == 34 ) { set %xptonext [ $+ [ $1 ] ] 20224 }
    if (%lv [ $+ [ $1 ] ] == 35 ) { set %xptonext [ $+ [ $1 ] ] 22406 }
    if (%lv [ $+ [ $1 ] ] == 36 ) { set %xptonext [ $+ [ $1 ] ] 24815 }
    if (%lv [ $+ [ $1 ] ] == 37 ) { set %xptonext [ $+ [ $1 ] ] 27473 }
    if (%lv [ $+ [ $1 ] ] == 38 ) { set %xptonext [ $+ [ $1 ] ] 30408 }
    if (%lv [ $+ [ $1 ] ] == 39 ) { set %xptonext [ $+ [ $1 ] ] 33648 }
    if (%lv [ $+ [ $1 ] ] == 40 ) { set %xptonext [ $+ [ $1 ] ] 37224 }
    if (%lv [ $+ [ $1 ] ] == 41 ) { set %xptonext [ $+ [ $1 ] ] 41171 }
    if (%lv [ $+ [ $1 ] ] == 42 ) { set %xptonext [ $+ [ $1 ] ] 45529 }
    if (%lv [ $+ [ $1 ] ] == 43 ) { set %xptonext [ $+ [ $1 ] ] 50339 }
    if (%lv [ $+ [ $1 ] ] == 44 ) { set %xptonext [ $+ [ $1 ] ] 55649 }
    if (%lv [ $+ [ $1 ] ] == 45 ) { set %xptonext [ $+ [ $1 ] ] 61512 }
    if (%lv [ $+ [ $1 ] ] == 46 ) { set %xptonext [ $+ [ $1 ] ] 67983 }
    if (%lv [ $+ [ $1 ] ] == 47 ) { set %xptonext [ $+ [ $1 ] ] 75127 }
    if (%lv [ $+ [ $1 ] ] == 48 ) { set %xptonext [ $+ [ $1 ] ] 83014 }
    if (%lv [ $+ [ $1 ] ] == 49 ) { set %xptonext [ $+ [ $1 ] ] 91721 }
    if (%lv [ $+ [ $1 ] ] == 50 ) { set %xptonext [ $+ [ $1 ] ] 101333 }
    if (%lv [ $+ [ $1 ] ] == 51 ) { set %xptonext [ $+ [ $1 ] ] 111945 }
    if (%lv [ $+ [ $1 ] ] == 52 ) { set %xptonext [ $+ [ $1 ] ] 123660 }
    if (%lv [ $+ [ $1 ] ] == 53 ) { set %xptonext [ $+ [ $1 ] ] 136594 }
    if (%lv [ $+ [ $1 ] ] == 54 ) { set %xptonext [ $+ [ $1 ] ] 150872 }
    if (%lv [ $+ [ $1 ] ] == 55 ) { set %xptonext [ $+ [ $1 ] ] 166636 }
    if (%lv [ $+ [ $1 ] ] == 56 ) { set %xptonext [ $+ [ $1 ] ] 184040 }
    if (%lv [ $+ [ $1 ] ] == 57 ) { set %xptonext [ $+ [ $1 ] ] 203254 }
    if (%lv [ $+ [ $1 ] ] == 58 ) { set %xptonext [ $+ [ $1 ] ] 224466 }
    if (%lv [ $+ [ $1 ] ] == 59 ) { set %xptonext [ $+ [ $1 ] ] 247886 }
    if (%lv [ $+ [ $1 ] ] == 60 ) { set %xptonext [ $+ [ $1 ] ] 273742 }
    if (%lv [ $+ [ $1 ] ] == 61 ) { set %xptonext [ $+ [ $1 ] ] 302288 }
    if (%lv [ $+ [ $1 ] ] == 62 ) { set %xptonext [ $+ [ $1 ] ] 333804 }
    if (%lv [ $+ [ $1 ] ] == 63 ) { set %xptonext [ $+ [ $1 ] ] 368599 }
    if (%lv [ $+ [ $1 ] ] == 64 ) { set %xptonext [ $+ [ $1 ] ] 407015 }
    if (%lv [ $+ [ $1 ] ] == 65 ) { set %xptonext [ $+ [ $1 ] ] 449428 }
    if (%lv [ $+ [ $1 ] ] == 66 ) { set %xptonext [ $+ [ $1 ] ] 496254 }
    if (%lv [ $+ [ $1 ] ] == 67 ) { set %xptonext [ $+ [ $1 ] ] 547953 }
    if (%lv [ $+ [ $1 ] ] == 68 ) { set %xptonext [ $+ [ $1 ] ] 605032 }
    if (%lv [ $+ [ $1 ] ] == 69 ) { set %xptonext [ $+ [ $1 ] ] 668051 }
    if (%lv [ $+ [ $1 ] ] == 70 ) { set %xptonext [ $+ [ $1 ] ] 737627 }
    if (%lv [ $+ [ $1 ] ] == 71 ) { set %xptonext [ $+ [ $1 ] ] 814445 }
    if (%lv [ $+ [ $1 ] ] == 72 ) { set %xptonext [ $+ [ $1 ] ] 899257 }
    if (%lv [ $+ [ $1 ] ] == 73 ) { set %xptonext [ $+ [ $1 ] ] 992895 }
    if (%lv [ $+ [ $1 ] ] == 74 ) { set %xptonext [ $+ [ $1 ] ] 1096278 }
    if (%lv [ $+ [ $1 ] ] == 75 ) { set %xptonext [ $+ [ $1 ] ] 1210421 }
    if (%lv [ $+ [ $1 ] ] == 76 ) { set %xptonext [ $+ [ $1 ] ] 1336443 }
    if (%lv [ $+ [ $1 ] ] == 77 ) { set %xptonext [ $+ [ $1 ] ] 1475581 }
    if (%lv [ $+ [ $1 ] ] == 78 ) { set %xptonext [ $+ [ $1 ] ] 1629200 }
    if (%lv [ $+ [ $1 ] ] == 79 ) { set %xptonext [ $+ [ $1 ] ] 1798808 }
    if (%lv [ $+ [ $1 ] ] == 80 ) { set %xptonext [ $+ [ $1 ] ] 1986068 }
    if (%lv [ $+ [ $1 ] ] == 81 ) { set %xptonext [ $+ [ $1 ] ] 2192818 }
    if (%lv [ $+ [ $1 ] ] == 82 ) { set %xptonext [ $+ [ $1 ] ] 2421087 }
    if (%lv [ $+ [ $1 ] ] == 83 ) { set %xptonext [ $+ [ $1 ] ] 2673114 }
    if (%lv [ $+ [ $1 ] ] == 84 ) { set %xptonext [ $+ [ $1 ] ] 2951373 }
    if (%lv [ $+ [ $1 ] ] == 85 ) { set %xptonext [ $+ [ $1 ] ] 3258594 }
    if (%lv [ $+ [ $1 ] ] == 86 ) { set %xptonext [ $+ [ $1 ] ] 3597792 }
    if (%lv [ $+ [ $1 ] ] == 87 ) { set %xptonext [ $+ [ $1 ] ] 3972294 }
    if (%lv [ $+ [ $1 ] ] == 88 ) { set %xptonext [ $+ [ $1 ] ] 4385776 }
    if (%lv [ $+ [ $1 ] ] == 89 ) { set %xptonext [ $+ [ $1 ] ] 4842295 }
    if (%lv [ $+ [ $1 ] ] == 90 ) { set %xptonext [ $+ [ $1 ] ] 5346332 }
    if (%lv [ $+ [ $1 ] ] == 91 ) { set %xptonext [ $+ [ $1 ] ] 5902831 }
    if (%lv [ $+ [ $1 ] ] == 92 ) { set %xptonext [ $+ [ $1 ] ] 6517253 }
    if (%lv [ $+ [ $1 ] ] == 93 ) { set %xptonext [ $+ [ $1 ] ] 7195629 }
    if (%lv [ $+ [ $1 ] ] == 94 ) { set %xptonext [ $+ [ $1 ] ] 7944614 }
    if (%lv [ $+ [ $1 ] ] == 95 ) { set %xptonext [ $+ [ $1 ] ] 8771558 }
    if (%lv [ $+ [ $1 ] ] == 96 ) { set %xptonext [ $+ [ $1 ] ] 9684577 }
    if (%lv [ $+ [ $1 ] ] == 97 ) { set %xptonext [ $+ [ $1 ] ] 10692629 }
    if (%lv [ $+ [ $1 ] ] == 98 ) { set %xptonext [ $+ [ $1 ] ] 11805606 }
    if (%lv [ $+ [ $1 ] ] == 99 ) { set %xptonext [ $+ [ $1 ] ] 13034431 }
    if (%lv [ $+ [ $1 ] ] == 100 ) { set %xptonext [ $+ [ $1 ] ] 14391160 }
    set %xp [ $+ [ $1 ] ] $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + %v [ $+ [ $1 ] ] ),2),3,44)
    set %remainder [ $+ [ $1 ] ] $calc(%xptonext [ $+ [ $1 ] ] - %xp [ $+ [ $1 ] ] ) 
    if (%skill [ $+ [ $name ] ] == overall) || (%skill [ $+ [ $name ] ] == total) { goto end }


  }
  if (%skill [ $+ [ %name ] ] == stats) {  $(% $+ $1 $+ .return,2) 4Stats of: %x
    $(% $+ $1 $+ .return,2) %stats
  }
  elseif (%skill [ $+ [ %name ] ] == att) || (%skill [ $+ [ %name ] ] == attack) { set %v [ $+ [ $1 ] ] 2
    $(% $+ $1 $+ .return,2) 2,0Attack4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 2),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 2),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 2),3),3,44)   4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]

  }
  elseif (%skill [ $+ [ %name ] ] == def) || (%skill [ $+ [ %name ] ] == defence) || (%skill [ $+ [ %name ] ] == defense) { set %v [ $+ [ $1 ] ] 3
    $(% $+ $1 $+ .return,2) 2,0Defence4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 3),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 3),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 3),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == str) || (%skill [ $+ [ %name ] ] == strength) { set %v [ $+ [ $1 ] ] 4
    $(% $+ $1 $+ .return,2) 2,0Strength4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 4),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 4),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 4),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == hp) || (%skill [ $+ [ %name ] ] == hits) || (%skill [ $+ [ %name ] ] == hitpoints) { set %v [ $+ [ $1 ] ] 5
    $(% $+ $1 $+ .return,2) 2,0Hitpoints4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 5),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 5),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 5),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == range) { set %v [ $+ [ $1 ] ] 6
    $(% $+ $1 $+ .return,2) 2,0Range4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 6),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 6),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 6),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == pray) || (%skill [ $+ [ %name ] ] == prayer) { set %v [ $+ [ $1 ] ] 7
    $(% $+ $1 $+ .return,2) 2,0Prayer4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 7),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 7),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 7),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == mage) || (%skill [ $+ [ %name ] ] == magic) { set %v [ $+ [ $1 ] ] 8
    $(% $+ $1 $+ .return,2) 2,0Magic4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 8),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 8),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 8),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == cook) || (%skill [ $+ [ %name ] ] == cooking) { set %v [ $+ [ $1 ] ] 9
    $(% $+ $1 $+ .return,2) 2,0Cooking4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 9),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 9),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 9),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == wc) || (%skill [ $+ [ %name ] ] == woodcutting) { set %v [ $+ [ $1 ] ] 10
    $(% $+ $1 $+ .return,2) 2,0Woodcutting4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 10),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 10),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 10),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == fletch) || (%skill [ $+ [ %name ] ] == fletching) { set %v [ $+ [ $1 ] ] 11
    $(% $+ $1 $+ .return,2) 2,0Fletching4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 11),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 11),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 11),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == fish) || (%skill [ $+ [ %name ] ] == fishing) { set %v [ $+ [ $1 ] ] 12
    $(% $+ $1 $+ .return,2) 2,0Fishing4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 12),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 12),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 12),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == fm) || (%skill [ $+ [ %name ] ] == firemaking) { set %v [ $+ [ $1 ] ] 13
    $(% $+ $1 $+ .return,2) 2,0Firemaking4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 13),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 13),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 13),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == craft) || (%skill [ $+ [ %name ] ] == crafting) { set %v [ $+ [ $1 ] ] 14
    $(% $+ $1 $+ .return,2) 2,0Crafting4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 14),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 14),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 14),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == smith) || (%skill [ $+ [ %name ] ] == smithing) { set %v [ $+ [ $1 ] ] 15
    $(% $+ $1 $+ .return,2) 2,0Smithing4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 15),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 15),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 15),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == mine) || (%skill [ $+ [ %name ] ] == mining) { set %v [ $+ [ $1 ] ] 16
    $(% $+ $1 $+ .return,2) 2,0Mining4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 16),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 16),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 16),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == herb) || (%skill [ $+ [ %name ] ] == herblaw) || (%skill [ $+ [ %name ] ] == herblore) { set %v [ $+ [ $1 ] ] 17
    $(% $+ $1 $+ .return,2) 2,0Herblore4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 17),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 17),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 17),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == agil) || (%skill [ $+ [ %name ] ] == agility) { set %v [ $+ [ $1 ] ] 18
    $(% $+ $1 $+ .return,2) 2,0Agility4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 18),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 18),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 18),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == thief) || (%skill [ $+ [ %name ] ] == theif) || (%skill [ $+ [ %name ] ] == thieving) || (%skill [ $+ [ %name ] ] == theiving) { set %v [ $+ [ $1 ] ] 19
    $(% $+ $1 $+ .return,2) 2,0Thieving4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 19),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 19),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 19),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == slay) || (%skill [ $+ [ %name ] ] == slayer) { set %v [ $+ [ $1 ] ] 20
    $(% $+ $1 $+ .return,2) 2,0Slayer4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 20),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 20),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 20),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == farm) || (%skill [ $+ [ %name ] ] == farming) { set %v [ $+ [ $1 ] ] 21
    $(% $+ $1 $+ .return,2) 2,0Farming4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 21),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 21),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 21),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == rc) || (%skill [ $+ [ %name ] ] == runecrafting) { set %v [ $+ [ $1 ] ] 22
    $(% $+ $1 $+ .return,2) 2,0Runecrafting4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 22),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 22),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 22),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == hunt) || (%skill [ $+ [ %name ] ] == hunter) { set %v [ $+ [ $1 ] ] 23
    $(% $+ $1 $+ .return,2) 2,0Hunter4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 23),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 23),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 23),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  elseif (%skill [ $+ [ %name ] ] == con) || (%skill [ $+ [ %name ] ] == construction) { set %v [ $+ [ $1 ] ] 24
    $(% $+ $1 $+ .return,2) 2,0Construction4 of:4 %x 
    $(% $+ $1 $+ .return,2) 4,0 $+ Rank:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 24),2),1,44) $+ $chr(32) $+ 4Level:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 24),2),2,44) $+ $chr(32) $+ 4Exp:1 $gettok($(% $+ $1 $+ .stat. $+ $calc(11 + 24),3),3,44) 4,0Xp to level $+ $chr(32) $+ %lv [ $+ [ $1 ] ] $+ :1,0 $+ $chr(32) $+ %remainder [ $+ [ $1 ] ]
    getlv $1
  }
  cleanup {
    unset %skill [ $+ [ %name ] ]
    cleanup $1 


  }