All pastes #497086 Raw Edit

For aldo

public text v1 · immutable
·published 2007-05-19 16:56 UTC
rendered paste body
[script]
n0=alias c1 { return $+(14,$1-) } 
n1=alias c2 { return $+(04,$1-) } 
n2=on *:text:*:#: { 
  n3=  /illegalcheck $1- 
  n4=  tokenize 32 $strip($1-) 
  n5=  if ($left($1,1) !isin @!.) halt 
  n6=  if ($right($1,-1) == stats) { 
    n7=    var %style = astats 
    n8=    if ($2 == zezima) { 
      n9=      hadd -u10 zezima.flood $+($nick,.,$ticks) 1 
      n10=      if ($hget(zezima.flood,0).item > 6) halt 
    n11=    } 
  n12=  }
  n13=  elseif ($regex($1,/co?mb(at)?/Si)) var %style = combat 
  n14=  elseif ($setskill($remove($1,@,!,.))) var %style = istat, %skill = $setskill($remove($1,@,!,.)) 
  n15=  elseif ($right($1,-1) == setname) && ($2) { 
    n16=    writeini DefRSN.ini RSNs $mask($fulladdress,3) $replace($2-,$chr(32),-) 
    n17=    .notice $nick You're default RSN for the host $mask($fulladdress,3) has been set to $2- 
    n18=    halt 
  n19=  } 
  n20=  else halt 
  n21=
  n22=  inc %ID 
  n23=  if ($len($2-) > 12) { 
    n24=    $($+(%,stats.display.,%ID),2) $c1(The nick) $c2($2-) $c1(is too long) 
    n25=    cleanup %ID 
    n26=    halt 
  n27=  } 
  n28=  elseif ($2) set $+(%,stats.rsn.,%ID) $replace($2-,$chr(32),-) 
  n29=  elseif ($readini(DefRSN.ini,RSNs,$mask($fulladdress,3))) set $+(%,stats.rsn.,%ID) $ifmatch 
  n30=  elseif ($readini(DefRSN.ini,RSNs,$nick)) set $+(%,stats.rsn.,%ID) $ifmatch 
  n31=  else set $+(%,stats.rsn.,%ID) $nick 
  n32=
  n33=  set $+(%,stats.style.,%ID) %style 
  n34=  set $+(%,stats.skill.,%ID) %skill 
  n35=  set $+(%,stats.display.,%ID) $iif($left($1,1) == @,msg $chan,notice $nick) 
  n36=  sockopen $+(stats.,%ID) hiscore.runescape.com 80 
  n37=} 
  n38=
  n39=on *:sockopen:stats.*: { 
    n40=  var %id = $gettok($sockname,2,46) 
    n41=  sockwrite -n $sockname GET /lang/en/aff/runescape/hiscorepersonal.ws?user1= $+ $($+(%,stats.rsn.,%ID),2) HTTP/1.1 
    n42=  sockwrite -n $sockname Host: hiscore.runescape.com $+ $crlf $+ $crlf 
    n43=} 
    n44=on *:sockread:stats.*: { 
      n45=  sockread &Incoming 
      n46=  bwrite $sockname -1 -1 &Incoming 
      n47=  if ($bfind(&Incoming, 1, </html>).text) makehash $sockname 
      n48=  elseif ($bfind(&Incoming, 1, does not feature in the hiscores.).text) { 
        n49=    $($+(%,stats.display.,%ID),2) $c1(The nick) $c2($($+(%,stats.rsn.,%ID),2)) $c1(Does not appear in the hiscores) 
        n50=    cleanup $gettok($sockname,2,46) 
      n51=  } 
      n52=} 
      n53=alias -l makehash { 
        n54=  var %file = $1 
        n55=  bread %file 1 $file(%file).size &stats 
        n56=  var %currentstat, %x = 1 
        n57=  while (%x) { 
          n58=    var %x = $bfind(&stats,$calc(%x + 1),<a href="overall.ws?table=) 
          n59=    var %currentstat = $striptags($bvar(&stats,%x,200).text) 
          n60=    tokenize 10 %currentstat 
          n61=    hadd -m %file $1 $2 $3 $4 $xp2next($3,$4) 
        n62=  } 
        n63=  process %file 
        n64=} 
        n65=alias process { 
          n66=  var %table = $1, %id = $gettok($1,2,46), %x = 0, $& 
            n67=    %display = $($+(%,stats.display.,%ID),2), $& 
            n68=    %rsn = $($+(%,stats.rsn.,%ID),2), $& 
            n69=    %skill = $($+(%,stats.skill.,%ID),2), $& 
            n70=    %style = $($+(%,stats.style.,%ID),2) 
          n71=  ;shoot; 
          n72=  if (%style == astats) { 
            n73=    while (%x <= 23) { 
              n74=      tokenize 32 $hget(%table,$setskill(%x)) 
              n75=      if ($2) var %statline = %statline $c1($setskill(%x)) $c2($2) 
              n76=      inc %x  
            n77=    } 
            n78=    %display $c1(Stats for) $c2(%rsn) $+ $c1(:) 
            n79=    %display %statline 
          n80=  } 
          n81=  elseif (%style == istat) { 
            n82=    if (!$hget(%table,%skill)) %display $c1(The nick) $c2(%rsn) $c1(does not appear in the hiscores for) $c2(%skill) 
            n83=    else { 
              n84=      tokenize 32 $hget(%table,%skill) 
              n85=      %display $c2(%skill) $c1(stats for) $c2(%rsn) $+ $c1(:) 
              n86=      %display $c1(Rank:) $c2($1) $c1(Level:) $c2($bytes($2,b)) $c1(Exp:) $c2($3) $& 
                n87=        $iif(%skill != Overall,$c1(Exp to lvl) $c2($calc($2 + 1)) $+ $c1(:) $c2($bytes($4,b)))
              n88=      var %pcpoint = $calc(($2 * $2) /6)
              n89=      var %pcpray = $calc(($2 * $2) /12)
              n90=      if (%skill = Hitpoints) %display $c1(Pest Points to lvl $c2($calc($2 + 1)) $+ $c1(:)) $c2($calc($4 / %pcpoint))
              n91=      elseif (%skill = Attack) %display $c1(Pest Points to lvl $c2($calc($2 + 1)) $+ $c1(:)) $c2($calc($4 / %pcpoint))
              n92=      elseif (%skill = strength) %display $c1(Pest Points to lvl $c2($calc($2 + 1)) $+ $c1(:)) $c2($calc($4 / %pcpoint))
              n93=      elseif (%skill = defence) %display $c1(Pest Points to lvl $c2($calc($2 + 1)) $+ $c1(:)) $c2($calc($4 / %pcpoint))
              n94=      elseif (%skill = Prayer) %display $c1(Pest Points to lvl $c2($calc($2 + 1)) $+ $c1(:)) $c2($calc($4 / %pcpray))
            n95=    }
            n96=    if (%skill == Mining) {
              n97=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Tin/Copper:) $c2($comma($ceil($calc($4 / 17.5)))) $c1( $+ $chr(124) $+  Iron:) $c2($comma($ceil($calc($4 / 35)))) $c1( $+ $chr(124) $+  Silver:) $c2($comma($ceil($calc($4 / 40)))) $c1( $+ $chr(124) $+  Coal:) $c2($comma($ceil($calc($4 / 50)))) $c1( $+ $chr(124) $+  Gold:) $c2($comma($ceil($calc($4 / 65)))) $c1( $+ $chr(124) $+  Mithril:) $c2($comma($ceil($calc($4 / 80)))) $c1( $+ $chr(124) $+  Adamantite:) $c2($comma($ceil($calc($4 / 95)))) $c1( $+ $chr(124) $+  Runite:) $c2($comma($ceil($calc($4 / 120))))
            n98=    }
            n99=    elseif (%skill == Fishing) {
              n100=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Shrimp:) $c2($comma($ceil($calc($4 / 10)))) $c1( $+ $chr(124) $+  Sardine:) $c2($comma($ceil($calc($4 / 20)))) $c1( $+ $chr(124) $+  Herring:) $c2($comma($ceil($calc($4 / 30)))) $c1( $+ $chr(124) $+  Anchovy:) $c2($comma($ceil($calc($4 / 40)))) $c1( $+ $chr(124) $+  Trout:) $c2($comma($ceil($calc($4 / 50)))) $c1( $+ $chr(124) $+  Pike:) $c2($comma($ceil($calc($4 / 60)))) $c1( $+ $chr(124) $+  Salmon:) $c2($comma($ceil($calc($4 / 70)))) $c1( $+ $chr(124) $+  Tuna:) $c2($comma($ceil($calc($4 / 80)))) $c1( $+ $chr(124) $+  Lobster:) $c2($comma($ceil($calc($4 / 90)))) $c1( $+ $chr(124) $+  Swordfish:) $c2($comma($ceil($calc($4 / 100)))) $c1( $+ $chr(124) $+ Monkfish:) $c2($comma($ceil($calc($4 / 120)))) $c1( $+ $chr(124) $+  Shark:) $c2($comma($ceil($calc($4 / 110))))
            n101=    }
            n102=    elseif (%skill == Runecraft) {
              n103=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Air:) $c2($comma($ceil($calc($4 / 5)))) $c1( $+ $chr(124) $+  Mind:) $c2($comma($ceil($calc($4 / 5.5)))) $c1( $+ $chr(124) $+  Water:) $c2($comma($ceil($calc($4 / 6)))) $c1( $+ $chr(124) $+  Earth:) $c2($comma($ceil($calc($4 / 6.5)))) $c1( $+ $chr(124) $+  Fire:) $c2($comma($ceil($calc($4 / 7)))) $c1( $+ $chr(124) $+  Body:) $c2($comma($ceil($calc($4 / 7.5)))) $c1( $+ $chr(124) $+  Cosmic:) $c2($comma($ceil($calc($4 / 8)))) $c1( $+ $chr(124) $+  Chaos:) $c2($comma($ceil($calc($4 / 8.5)))) $c1( $+ $chr(124) $+  Astral:) $c2($comma($ceil($calc($4 / 8.7)))) $c1( $+ $chr(124) $+  Nature:) $c2($comma($ceil($calc($4 / 9)))) $c1( $+ $chr(124) $+  Law:) $c2($comma($ceil($calc($4 / 9.5)))) $c1( $+ $chr(124) $+  Death:) $c2($comma($ceil($calc($4 / 10))))
            n104=    }
            n105=    elseif (%skill == Woodcutting) {
              n106=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Normal:) $c2($comma($ceil($calc($4 / 25)))) $c1( $+ $chr(124) $+  Oak:) $c2($comma($ceil($calc($4 / 37.5)))) $c1( $+ $chr(124) $+  Willow:) $c2($comma($ceil($calc($4 / 67.5)))) $c1( $+ $chr(124) $+  Teak:) $c2($comma($ceil($calc($4 / 85)))) $c1( $+ $chr(124) $+  Maple:) $c2($comma($ceil($calc($4 / 100)))) $c1( $+ $chr(124) $+  Mahogany:) $c2($comma($ceil($calc($4 / 125)))) $c1( $+ $chr(124) $+  Yew:) $c2($comma($ceil($calc($4 / 175)))) $c1( $+ $chr(124) $+  Magic:) $c2($comma($ceil($calc($4 / 250))))
            n107=    }
            n108=    elseif (%skill == Construction) {
              n109=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Normal Planks:) $c2($comma($ceil($calc($4 / 25)))) $c1( $+ $chr(124) $+  Oak Planks:) $c2($comma($ceil($calc($4 / 60)))) $c1( $+ $chr(124) $+  Teak Planks:) $c2($comma($ceil($calc($4 / 90)))) $c1( $+ $chr(124) $+  Mahogany Planks:) $c2($comma($ceil($calc($4 / 140))))
            n110=    }
            n111=    elseif (%skill == Agility) {
              n112=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Gnome Course:) $c2($comma($ceil($calc($4 / 86.5)))) $c1( $+ $chr(124) $+  Pyramid:) $c2($comma($ceil($calc($4 / 1014)))) $c1( $+ $chr(124) $+  Barbarian Course:) $c2($comma($ceil($calc($4 / 153.2)))) $c1( $+ $chr(124) $+  Ape Atoll:) $c2($comma($ceil($calc($4 / 580)))) $c1( $+ $chr(124) $+  Wilderness Course:) $c2($comma($ceil($calc($4 / 571.4)))) $c1( $+ $chr(124) $+  Werewolves' Course:) $c2($comma($ceil($calc($4 / 540))))
            n113=    }
            n114=    elseif (%skill == Magic) {
              n115=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Superheat Item:) $c2($comma($ceil($calc($4 / 53)))) $c1( $+ $chr(124) $+  Camelot Teleport:) $c2($comma($ceil($calc($4 / 55.5)))) $c1( $+ $chr(124) $+  High Level Alchemy:) $c2($comma($ceil($calc($4 / 65)))) $c1( $+ $chr(124) $+  Charge:) $c2($comma($ceil($calc($4 / 180))))
            n116=    }        
            n117=    elseif (%skill == Hunter) {
              n118=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Prickly Kebbit:) $c2($comma($ceil($calc($4 / 204)))) $c1( $+ $chr(124) $+  Snowy Knight:) $c2($comma($ceil($calc($4 / 44)))) $c1( $+ $chr(124) $+  Swamp Lizard:) $c2($comma($ceil($calc($4 / 152)))) $c1( $+ $chr(124) $+  Spined Larupia:) $c2($comma($ceil($calc($4 / 180))))
            n119=    }
            n120=    elseif (%skill == Cooking) {
              n121=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Sharks:) $c2($comma($ceil($calc($4 / 210)))) $c1( $+ $chr(124) $+  Lobsters:) $c2($comma($ceil($calc($4 / 120)))) $c1( $+ $chr(124) $+  Monkfish:) $c2($comma($ceil($calc($4 / 150)))) $c1( $+ $chr(124) $+  Swordfish:) $c2($comma($ceil($calc($4 / 140)))) $c1( $+ $chr(124) $+  Tuna:) $c2($comma($ceil($calc($4 / 100))))
            n122=    }
            n123=    elseif (%skill == Prayer) {
              n124=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Bones:) $c2($comma($ceil($calc($4 / 4.5)))) $c1( $+ $chr(124) $+  Big bones:) $c2($comma($ceil($calc($4 / 15)))) $c1( $+ $chr(124) $+  Baby-Dragon bones:) $c2($comma($ceil($calc($4 / 30)))) $c1( $+ $chr(124) $+  Dragon bones:) $c2($comma($ceil($calc($4 / 72))))
            n125=    }
            n126=    elseif (%skill == Ranged) {
              n127=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Blue Dragons:) $c2($comma($ceil($calc($4 / 436)))) $c1( $+ $chr(124) $+  Fire giants:) $c2($comma($ceil($calc($4 / 444)))) $c1( $+ $chr(124) $+  Ogres:) $c2($comma($ceil($calc($4 / 240))))
            n128=    }
            n129=    elseif (%skill == Attack) {
              n130=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $c1( $+ $chr(124) $+  Fire giants:) $c2($comma($ceil($calc($4 / 444)))) $+ $chr(124) $+  Ogres:) $c2($comma($ceil($calc($4 / 240)))) $c1( $+ $chr(124) $+  Lesser Demons:) $c2($comma($ceil($calc($4 / 316)))) $c1( $+ $chr(124) $+  Greater Demons:) $c2($comma($ceil($calc($4 / 348)))) $c1( $+ $chr(124) $+  Dust Devils:) $c2($comma($ceil($calc($4 / 420)))) $c1( $+ $chr(124) $+  Shadow Warriors:) $c2($comma($ceil($calc($4 / 268))))
            n131=    }
            n132=    elseif (%skill == Strength) {
              n133=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $c1( $+ $chr(124) $+  Fire giants:) $c2($comma($ceil($calc($4 / 444)))) $+ $chr(124) $+  Ogres:) $c2($comma($ceil($calc($4 / 240)))) $c1( $+ $chr(124) $+  Lesser Demons:) $c2($comma($ceil($calc($4 / 316)))) $c1( $+ $chr(124) $+  Greater Demons:) $c2($comma($ceil($calc($4 / 348)))) $c1( $+ $chr(124) $+  Dust Devils:) $c2($comma($ceil($calc($4 / 420)))) $c1( $+ $chr(124) $+  Shadow Warriors:) $c2($comma($ceil($calc($4 / 268))))
            n134=    }
            n135=    elseif (%skill == Defence) {
              n136=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $c1( $+ $chr(124) $+  Fire giants:) $c2($comma($ceil($calc($4 / 444)))) $+ $chr(124) $+  Ogres:) $c2($comma($ceil($calc($4 / 240)))) $c1( $+ $chr(124) $+  Lesser Demons:) $c2($comma($ceil($calc($4 / 316)))) $c1( $+ $chr(124) $+  Greater Demons:) $c2($comma($ceil($calc($4 / 348)))) $c1( $+ $chr(124) $+  Dust Devils:) $c2($comma($ceil($calc($4 / 420)))) $c1( $+ $chr(124) $+  Shadow Warriors:) $c2($comma($ceil($calc($4 / 268))))
            n137=    }
            n138=    elseif (%skill == Fletching) {
              n139=      %display $c1( $+ $chr(124) $+ For level $+ $iif(%goal,$chr(32) $+ %goal) $+ $chr(124) $+  Magic Longbows:) $c2($comma($ceil($calc($4 / 183)))) $c1( $+ $chr(124) $+  Magic Shortbow:) $c2($comma($ceil($calc($4 / 166.6)))) $c1( $+ $chr(124) $+  Yew Longbow:) $c2($comma($ceil($calc($4 / 150)))) $c1( $+ $chr(124) $+  Yew Shortbow:) $c2($comma($ceil($calc($4 / 133)))) $c1( $+ $chr(124) $+  Willow Longbow:) $c2($comma($ceil($calc($4 / 83)))) $c1( $+ $chr(124) $+  Willow Shortbow:) $c2($comma($ceil($calc($4 / 66.6))))
            n140=    }
          n141=  }
          n142=  elseif (%style == combat) { 
            n143=    var %a.mult = .32707, %s.mult = .324, %d.mult = .25, %h.mult = .25, %p.mult = .124, %r.mult = .487, %m.mult = .487 
            n144=    var %a = $iif($gettok($hget(%table,attack),2,32),$v1,-), $& 
              n145=      %s = $iif($gettok($hget(%table,strength),2,32),$v1,-), $& 
              n146=      %d = $iif($gettok($hget(%table,defence),2,32),$v1,-), $& 
              n147=      %h = $iif($gettok($hget(%table,hitpoints),2,32),$v1,-), $& 
              n148=      %r = $iif($gettok($hget(%table,ranged),2,32),$v1,-), $& 
              n149=      %m = $iif($gettok($hget(%table,magic),2,32),$v1,-), $& 
              n150=      %p = $iif($gettok($hget(%table,prayer),2,32),$v1,-) 
            n151=
            n152=    var %meleecombat  = $calc(%a * %a.mult + %s * %s.mult + %d * %d.mult + %h * %h.mult + %p * %p.mult), $& 
              n153=      %RangedCombat = $calc(%r * %r.mult + %p * %p.mult + %d * %d.mult + %h * %h.mult), $& 
              n154=      %MagicCombat  = $calc(%m * %m.mult + %p * %p.mult + %d * %d.mult + %h * %h.mult) 
            n155=
            n156=    if (%MagicCombat == %RangedCombat) && (%MagicCombat == %RangedCombat) { 
              n157=      %display $c1(The nick) $c2(%rsn) $c1(does not appear in the hiscores for any combat skills) 
              n158=      cleanup %id 
              n159=      halt 
            n160=    } 
            n161=    elseif (%MagicCombat > %RangedCombat) && (%MagicCombat > %MeleeCombat) var %cmbstyle = Magic, %Combat = %MagicCombat 
            n162=    elseif (%RangedCombat > %MeleeCombat) var %cmbstyle = Ranged, %Combat = %RangedCombat 
            n163=    else var %cmbstyle = melee, %combat = %MeleeCombat 
            n164=
            n165=    var %cmb.temp = $abs($calc($int($calc(%combat +1)) - %combat)), $& 
              n166=      %a.2lvl = $ceil($calc(%cmb.temp / %a.mult)), %s.2lvl = $ceil($calc(%cmb.temp / %s.mult)), $& 
              n167=      %d.2lvl = $ceil($calc(%cmb.temp / %d.mult)), %m.2lvl = $ceil($calc(%cmb.temp / %m.mult)), $& 
              n168=      %r.2lvl = $ceil($calc(%cmb.temp / %r.mult)), %p.2lvl = $ceil($calc(%cmb.temp / %p.mult)) 
            n169=
            n170=    if (%cmbstyle == magic) var %dynamic.2lvl = $c1(Magic:) $c2(%m.2lvl) 
            n171=    elseif (%cmbstyle == Ranged) var %dynamic.2lvl = $c1(Ranged:) $c2(%r.2lvl) 
            n172=    else var %dynamic.2lvl = $c1(Att:) $c2(%a.2lvl) $c1(Str:) $c2(%s.2lvl) 
            n173=    var %combat = $round(%combat,2), %next = $ceil(%combat) 
            n174=    %display $c2(%rsn) $c1(is) $c2(%combat) $c1(%cmbstyle style combat) 
            n175=    %display $c1(Attack:) $c2(%a) $c1(Defence:) $c2(%d) $c1(Strength:) $c2(%s) $c1(Hits:) $c2(%h) $& 
              n176=      $c1(Mage:) $c2(%m) $c1(Range:) $c2(%r) $c1(Pray:) $c2(%p)
            n177=    %display $c1(Levels for) $c2(%next) $+ $c1(:) %dynamic.2lvl $& 
              n178=      $c1(Def/Hp:) $c2(%d.2lvl) $c1(Prayer:) $c2(%p.2lvl) 
          n179=  } 
          n180=  cleanup %id 
          n181=} 
          n182=
          n183=alias -l cleanup { 
            n184=  unset $+(%,stats.*.,$1) 
            n185=  sockclose $+(Stats.,$1) 
            n186=  .remove $+(Stats.,$1) 
            n187=} 
            n188=
            n189=alias -l xp { 
              n190=  var %x = 1, %level = $calc($1 - 1), %xp = 0 
              n191=  while (%x <= %level) { 
                n192=    var %TempXp = $calc((%x + 300 * 2^(%x / 7)) /4) 
                n193=    inc %xp %TempXp 
                n194=    inc %x 
              n195=  } 
              n196=  return $int(%xp) 
              n197=} 
              n198=
              n199=alias -l xp2Next { 
                n200=  var %xp = $remove($2,$chr(44)), %nextxp = $xp($calc($1 + 1)) 
                n201=  return $calc(%nextxp - %xp) 
                n202=} 
                n203=alias -l striptags { var %x,%y = $regsub($1-,/(<[^>]+>)/g,$null,%x) | return %x } 
                n204=alias -l setskill { 
                  n205=  if ($1 == 0) || ($regex($1,/^(st|(skill)?total|overall)$/Si)) return Overall 
                  n206=  elseif ($1 == 1) || ($regex($1,/^at(t|k|tack)$/Si)) return Attack 
                  n207=  elseif ($1 == 2) || ($regex($1,/^def(en[cs]e)?$$/Si)) return Defence 
                  n208=  elseif ($1 == 3) || ($regex($1,/^str(ength)?$/Si)) return Strength 
                  n209=  elseif ($1 == 4) || ($regex($1,/^hp|hit(s|points?)?$/Si)) return Hitpoints 
                  n210=  elseif ($1 == 5) || ($regex($1,/^range(r|d|ing)?$/Si)) return Ranged 
                  n211=  elseif ($1 == 6) || ($regex($1,/^Pray(er)?$$/Si)) return Prayer 
                  n212=  elseif ($1 == 7) || ($regex($1,/^mag(e|ic)$$/Si)) return Magic 
                  n213=  elseif ($1 == 8) || ($regex($1,/^cook(ing)?$/Si)) return Cooking 
                  n214=  elseif ($1 == 9) || ($regex($1,/^wc|wood(cut(ting)?)?$/Si)) return Woodcutting 
                  n215=  elseif ($1 == 10) || ($regex($1,/^fletch(ing)?$/Si)) return Fletching 
                  n216=  elseif ($1 == 11) || ($regex($1,/^fish(ing)?$/Si)) return Fishing 
                  n217=  elseif ($1 == 12) || ($regex($1,/^(fire|fm)(make?(ing)?|ing)?$/Si)) return Firemaking 
                  n218=  elseif ($1 == 13) || ($regex($1,/^craft(ing)?$/Si)) return Crafting 
                  n219=  elseif ($1 == 14) || ($regex($1,/^(smith|smelt)(ing)?$/Si)) return Smithing 
                  n220=  elseif ($1 == 15) || ($regex($1,/^mine(ing)?$/Si)) return Mining 
                  n221=  elseif ($1 == 16) || ($regex($1,/^herb(law|lore)?$/Si)) return Herblore 
                  n222=  elseif ($1 == 17) || ($regex($1,/^agil(ity)?$/Si)) return Agility 
                  n223=  elseif ($1 == 18) || ($regex($1,/^(th(ei|ie)[fv](e|ing)?)$/Si)) return Thieving |  elseif ($1 == 19) || ($regex($1,/^slay(er|ing)?$/Si)) return Slayer
                  n224=  elseif ($1 == 20) || ($regex($1,/^farm(er|ing)?$/Si)) return Farming 
                  n225=  elseif ($1 == 21) || ($regex($1,/^(rc|runecraft)(er|ing)?$/Si)) return Runecraft 
                  n226=  elseif ($1 == 22) || ($regex($1,/^hunt(er|ing)?$/Si)) return Hunter 
                  n227=  elseif ($1 == 23) || ($regex($1,/^(con)(ion|ing)?$/si)) return Construction 
                  n228=}
                  n229=alias comma { return $bytes($1,b) }