hedgewars/uAmmos.pas
changeset 4143 eb7981f34800
parent 4141 2bd5ecf7b4fb
child 4148 eaff5615f976
--- a/hedgewars/uAmmos.pas	Fri Nov 05 21:59:02 2010 -0400
+++ b/hedgewars/uAmmos.pas	Fri Nov 05 22:32:00 2010 -0400
@@ -44,8 +44,7 @@
 function  GetAmmoByNum(num: Longword): PHHAmmo;
 function  GetAmmoEntry(var Hedgehog: THedgehog): PAmmo;
 
-var shoppa: boolean;
-    StoreCnt: Longword;
+var StoreCnt: Longword;
 
 implementation
 uses uMisc, uGears, uWorld, uLocale, uConsole, uMobile;
@@ -97,14 +96,6 @@
 begin
 TryDo((byte(ammoLoadout[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoProbability[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoDelay[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoReinforcement[0]) = byte(ord(High(TAmmoType)))), 'Incomplete or missing ammo scheme set (incompatible frontend or demo/save?)', true);
 
-// FIXME - TEMPORARY hardcoded check on shoppa pending creation of crate *type* probability editor
-substr:= Copy(ammoLoadout,1,42);
-if (substr = '000000990000009000000000000000000000000000') or  // ropes + parachute
-   (substr = '000000900000000000000000000000000000009000') or  // saucer
-   (substr = '000000900000000000000000000000000000000009') or  // portal
-   (substr = '000000990000000000000000000000000000000000')     // ropes
-   then shoppa:= true;
-
 inc(StoreCnt);
 TryDo(StoreCnt <= cMaxHHs, 'Ammo stores overflow', true);
 
@@ -432,7 +423,6 @@
 
 procedure initModule;
 begin
-    shoppa:= false;
     StoreCnt:= 0;
     ammoLoadout:= '';
     ammoProbability:= '';