Merge branch 'master' of whale@ruin.nu:git/ND

diff --git a/Include.pm b/Include.pm
index ba1768ee3447c27c4c1747389f0748bd0d6dad9f..e5f1f2fc47ec41480b3ab9f97149f8b8000b7703 100644 (file)
--- a/Include.pm
+++ b/Include.pm
@@ -91,7 +91,7 @@ sub def_log {
 
 sub pa_xp {
        my ($roids,$ascore,$avalue,$tscore,$tvalue) = @_;
-       my $bravery = (max(0,min(2,$tscore/$ascore)-0.6)) * (min(2,$tvalue/$avalue)-0.4);
+       my $bravery = (max(0,min(2,$tscore/$ascore)-0.2)) * (min(2,$tvalue/$avalue)-0.1);
        return int(max($roids * 10 * $bravery,0))
 
 }