All pastes #566730 Raw Edit

Something

public text v1 · immutable
·published 2007-06-14 16:30 UTC
rendered paste body
Alias cmb { 
  Var %Def.Var = $calc($2 * 100) 
  Var %Hits.Var = $calc($1 * 100) 
  Var %Pray.var = $calc($3 * 50) 
  Var %hit.def.pray = $calc($calc(%Def.var + %hits.var + %Pray.var) / 400) 
  Var %Att.var = $calc($4 * 130) 
  Var %str.var = $calc($5 * 130) 
  If ($right($6,1) isin 02468) Var %range.var = $calc($calc($calc($6 - 1) + $calc($6 * 2)) * 65) 
  Else var %Range.var = $calc($6 * 195) 
  if ($right($7,1) isin 02468) Var %mage.var = $calc($calc($calc($7 - 1) + $calc($7 * 2)) * 65) 
  Else var %Mage.var = $calc($7 * 195) 
  Var %Melee.Cmb = $calc($calc(%att.var + %str.var) /400) 
  Var %Range.cmb = $calc(%range.var / 400) 
  Var %mage.cmb = $calc(%mage.var /400) 
  If (%range.cmb > %melee.cmb) && (%range.cmb > %Mage.cmb) { Msg #Rf The combat level is $calc(%hit.def.pray + %range.cmb) Range based } 
  elseIf (%Mage.cmb > %melee.cmb) && (%Mage.cmb > %range.cmb) { Msg #Rf The combat level is $calc(%hit.def.pray + %Mage.cmb) Mage based }
  elseIf (%Melee.cmb > %mage.cmb) && (%melee.cmb > %range.cmb) { Msg #RF The combat level is $calc(%Hit.def.pray + %melee.cmb) Melee based } 
}