diff --git a/Irpg/Action.pm b/Irpg/Action.pm
index 1a0757cb94bf2b7661c39de846589409b843d32b..952e613b15833bed7821934f4cc7ed7297fc4898 100644
--- a/Irpg/Action.pm
+++ b/Irpg/Action.pm
@@ -149,7 +149,7 @@ sub mystic_result {
         my $gain_p1 = int(($perc/100)*$rps->{$p1}{next});
         my $gain_p2 = int(($perc/100)*$rps->{$p2}{next});
         $gain_p1 = -$rps->{$p1}{class}->real_gain(-$gain_p1);
-        $gain_p2 = -$rps->{$p2}{class}->real_gain(-$gain_p2);
+        $gain_p2 = $rps->{$p2}{class}->real_gain($gain_p2);
         $rps->{$p1}{next} = $gain_p1 >= $rps->{$p1}{next} ?
                             0 : $rps->{$p1}{next} - $gain_p1;
         $rps->{$p2}{next} += $gain_p2;
@@ -178,7 +178,7 @@ sub mystic_result {
         my $gain_p1 = int(($perc/100)*$rps->{$p1}{next});
         my $gain_p2 = int(($perc/100)*$rps->{$p2}{next});
         $gain_p1 = $rps->{$p1}{class}->real_gain($gain_p1);
-        $gain_p2 = $rps->{$p2}{class}->real_gain($gain_p2);
+        $gain_p2 = -$rps->{$p2}{class}->real_gain(-$gain_p2);
         $rps->{$p1}{next} += $gain_p1;
         $rps->{$p2}{next} = $gain_p2 >= $rps->{$p2}{next} ?
                             0 : $rps->{$p2}{next} - $gain_p2;