Stuff

on $*:text:/^[!@](Cmb-Est)/Si:#: { 
  if (!$8) { 
    $iif($left($1,1) == @,Msg $chan,Notice $nick) $c2($nick) $c1(Invalid Format) $logo $c1(Must Be in Format ASDHPRM) 
  }
  Else {
    $iif($left($1,1) == @,Msg $chan,Notice $nick) $logo $c1(Combat Estimate For ASDHPRM:) $c2($2 $3 $4 $5 $6 $7 $8) $+ $c1(: Is) $c2($cmb($5,$4,$6,$2,$3,$7,$8))
  }
}
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) { return $c2($calc(%hit.def.pray + %range.cmb)) $c1($chr(91)) $+ $c2(Range based) $+ $c1($chr(93)) } 
  elseIf (%Mage.cmb > %melee.cmb) && (%Mage.cmb > %range.cmb) { return $c2($calc(%hit.def.pray + %Mage.cmb)) $c1($chr(91)) $+ $c2(Mage based) $+ $c1($chr(93)) }
  elseIf (%Melee.cmb > %mage.cmb) && (%melee.cmb > %range.cmb) { return $calc(%Hit.def.pray + %melee.cmb) $c1($chr(91)) $+ $c2(Melee based) $+ $c1($chr(93)) } 
}