diff --git a/Irpg/Action.pm b/Irpg/Action.pm
index 31480314ecce7c27563cd0ab75bc7e14a0a6be9a..5f28c8086f260442beb16b563efd32a199271cd1 100644
--- a/Irpg/Action.pm
+++ b/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}++;
diff --git a/Irpg/Classes/Farmer.pm b/Irpg/Classes/Farmer.pm
index 0bcc68d309c61129e42a11ba51d0f72a17d9c938..db74568f9806863c3d3aca3c12e2bade15ec2d09 100644
--- a/Irpg/Classes/Farmer.pm
+++ b/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;
 }