# HG changeset patch
# User nemo
# Date 1255633988 0
# Node ID 5e58b1e3210b1981e8ef14a9281cb1d095c2b14b
# Parent  ac0c497fb84276296bdb1662e9cf066cc196f47d
Tweak shoppa probabilities

diff -r ac0c497fb842 -r 5e58b1e3210b QTfrontend/hwconsts.cpp.in
--- a/QTfrontend/hwconsts.cpp.in	Thu Oct 15 18:02:01 2009 +0000
+++ b/QTfrontend/hwconsts.cpp.in	Thu Oct 15 19:13:08 2009 +0000
@@ -47,7 +47,7 @@
 		"0000000000000000000000000000000000000000"))
 	<< qMakePair(QString("Shoppa"),    QString(
 		"0000009900000000000000000000000000000000"
-		"4444410044244402210114121222122000000002"))
+		"4444410044244402210112121222422000000002"))
 	<< qMakePair(QString("Basketball"),QString(
 		"0000009000000900000000000000000000000000"
 		"0000000000000000000000000000000000000000"))
diff -r ac0c497fb842 -r 5e58b1e3210b hedgewars/uAmmos.pas
--- a/hedgewars/uAmmos.pas	Thu Oct 15 18:02:01 2009 +0000
+++ b/hedgewars/uAmmos.pas	Thu Oct 15 19:13:08 2009 +0000
@@ -91,6 +91,7 @@
             Ammoz[a].Probability:= 0
             end;
         // avoid things we already have by scheme
+        // merge this into DisableSomeWeapons ?
         if ((a = amLowGravity) and ((GameFlags and gfLowGravity) <> 0)) or
            ((a = amInvulnerable) and ((GameFlags and gfInvulnerable) <> 0)) or
            ((a = amLaserSight) and ((GameFlags and gfLaserSight) <> 0)) or