Unnamed

      tokenize 32 $hget(%table,$setskill(%x)) 
      if ($2) var %statline = %statline $c1($setskill(%x)) $c2($2) 
      inc %x 
    } 
    %display $c1(Stats for) $c2(%rsn) $+ $c1(:) 
    %display %statline  
  } 
  elseif (%style == istat) { 
    if (!$hget(%table,%skill)) %display $c1(The nick) $c2(%rsn) $c1(does not appear in the hiscores for) $c2(%skill) 
    else { 
      tokenize 32 $hget(%table,%skill) 
      if (!%level) var %level = $calc($2 + 1) 
      var %x = 1 
      while ($ini(statcalc.ini,%skill,%x)) { 
        set $+(%,rs.item.,%x) $c1($replace($v1,$chr(95),$chr(32))) $+ s: $c2($floor($calc($calc($remove($readini(statcalc.ini,level,%level),$chr(44)) - $remove($3,$chr(44)))/$calc($readini(StatCalc.ini,%skill,$v1) + 1))))))) 
        inc %x 
      } 
      if (%level isnum 1-99) && (%skill != overall) { var %xp2next $c1(Exp For) $c2($strip(%level)) $c1(%skill $+ :) $c2($bytes($4,b))) } 
      elseif ($2 != 99) && (%skill != overall) { var %xp2next $c1(Exp For) $c2($calc($2 + 1)) $c1(%skill $+ :) $c2($comma($4)) }      
      %display $c2(%skill) $c1(Stats for) $c2(%rsn) 
      %display $c1(Level:) $c2($2) $c1(Rank:) $c2($1) $c1(Exp:) $c2($3) %xp2next 
      if ($2 != 99) && (%skill != overall) { %display $c1(Items for) $c2($iif(%level isnum 1-99,%level,$calc($2 + 1))))) $c1(%skill) - $($+(%,rs.item.,1),2) $($+(%,rs.item.,2),2) $($+(%,rs.item.,3),2) $($+(%,rs.item.,4),2) $($+(%,rs.item.,5),2) } 
      unset %rs.item.*
    } 
  } 
  elseif (%style == combat) { 
    var %a.mult = .32707, %s.mult = .324, %d.mult = .25, %h.mult = .25, %p.mult = .124, %r.mult = .487, %m.mult = .487 
    var %a = $iif($gettok($hget(%table,attack),2,32),$v1,-), $& 
      %s = $iif($gettok($hget(%table,strength),2,32),$v1,-), $& 
      %d = $iif($gettok($hget(%table,defence),2,32),$v1,-), $& 
      %h = $iif($gettok($hget(%table,hitpoints),2,32),$v1,-), $&