if (%style == astats) {
    while (%x <= 23) {
      tokenize 32 $hget(%table,$setskill(%x))
      if ($2) {
        var %sl = %sl $c1($setskill(%x)) $c2($2)
        inc %x
      }
    }
    %display $c1(Stats for) $c2(%rsn)
    %display %sl
    $iif(%sl2,%display %sl2)
  }

TO

  if (%style == astats) 
    while (%x <= 23) {
      tokenize 32 $hget(%table,$setskill(%x))
      if ($2) {
        if ($numtok(%sl,32) == 90) {
          var %sl2 = %sl2 $c1($setskill(%x)) $c2($2)
        }
        else {
          var %sl = %sl $c1($setskill(%x)) $c2($2)
        }
      }
      inc %x
    }
    %display $c1(Stats for) $c2(%rsn)
    %display %sl
  }