Stuff

alias stylee {
  if ($regex($1,/^acc(ura?(cy|te)?)?$/Si)) return Accurate
  elseif ($regex($1,/^str|agg(rength|ressive)?$/Si)) return Aggressive
  elseif ($regex($1,/^def(en[cs]?(e|ive)?)?$/Si)) return Defensive
  elseif ($regex($1,/^con(troll?(ed)?)?$/Si)) return Controlled
  else return Error
}
alias bonus {
  if ($regex($1,/^SP?$/Si)) return Strength_Potion
  elseif ($regex($1,/^ZP?$/Si)) return Zamorak_Potion
  elseif ($regex($1,/^SS?$/Si)) return Super_Strength_Potion
  elseif ($regex($1,/^BS?$/Si)) return Burst_of_Strength
  elseif ($regex($1,/^HS?$/Si)) return Superhuman_Strength
  elseif ($regex($1,/^US?$/Si)) return Ultimate_Strength
}
alias formula {
  var %pot = $readini(Maxhit.ini,Maxhit,$gettok($1,1,32))
  var %pray = $readini(Maxhit.ini,Maxhit,$gettok($1,2,32))
  var %style = $readini(Maxhit.ini,Maxhit,$gettok($1,5,32))
  var %max = $floor($calc((( $gettok($1,3,32) * %pot ) + ( $gettok($1,3,32) * %pray ) + %style ) * (( $gettok($1,4,32) * 0.00175) + 0.1) + 1.08))
  return %max
}