All pastes #419462 Raw Edit

Someone

public text v1 · immutable
·published 2007-04-01 10:58 UTC
rendered paste body
        set %att = $5
        set %def = $7
        set %str = $9
        set %hp = $11
        set %rng = $13
        set %pray = $15 
        set %magic = $htmlfree($17)
        var %combat = $hcmblevel(%att,%def,%str,%hp,%rng,%pray,%magic)
        var %supercombat = $cmblevel(%att,%def,%str,%hp,%rng,%pray,%magic)
        var %temp = $abs($calc($int($calc(%combat +1)) - %combat)), $& 
          %a.lvl = $ceil($calc(%temp / .32707)), %s.lvl = $ceil($calc(%temp / .324)), $& 
          %d.lvl = $ceil($calc(%temp / .25)), $&
          %m.lvl = $ceil($calc(%temp / .487)), $& 
          %r.lvl = $ceil($calc(%temp / .487)), $&
          %p.lvl = $ceil($calc(%temp / .124))
        if (magic isin %supercombat) var %lvl.base = Magic: $c1(Mage:) $c2(%m.lvl) $c1(Def:) $c2(%d.lvl) $c1(Pray:) $c2(%p.lvl)
        elseif (range == %supercombat) var %lvl.base = $c1(Range:) $c2(%r.lvl) $c1(Def:) $c2(%d.lvl) $c1(Pray:) $c2(%p.lvl)
        else var %lvl.base = $c1(Att:) $c2(%a.lvl) $c1(Str:) $c2(%s.lvl) $c1(Def:) $c2(%d.lvl) $c1(Pray:) $c2(%p.lvl)
        echo -a %lvl.base