fix & improve critic strike range

90% for neutral, 95 for good, 85 for evil

Irpg/Action.pm

@@ -297,8 +297,8 @@ sub perform_action {
         # VICTORY
         $ret->{vict}++;
         my $align_mod = $rps->{$p1}{alignment} eq 'Good' ? 0.05 :
-                        $rps->{$p1}{alignment} eq 'Evil' ? -0.10 :
-                        1;
+                        $rps->{$p1}{alignment} eq 'Evil' ? -0.05 :
+                        0;
         if ($p1roll*$p1atk >= $p1sum*$p1atk*($rps->{$p1}{class}->{CRIT_SK} + $align_mod)) {
             # CRITICAL STRIKE
             $ret->{vict}++;

Irpg/Classes/Farmer.pm

@@ -17,7 +17,7 @@ sub new {
 	$self->{MOD_INT} = 1; # intelligence
 	$self->{MOD_CHA} = 1; # charisma
 	$self->{MOD_DEX} = 1; # dexterity
-	$self->{CRIT_SK} = 0.95; # critical strike minimum range, the lower the largest acceptance
+	$self->{CRIT_SK} = 0.90; # critical strike minimum range, the lower the largest acceptance
 	$self->{MOD_CRT} = 1; # criticak strike modificator
 	return $self;
 }