--- a/hedgewars/uConsts.pas Sun Dec 17 18:40:04 2006 +0000
+++ b/hedgewars/uConsts.pas Sun Dec 17 20:50:49 2006 +0000
@@ -92,6 +92,10 @@
msgGettingConfig = 'Getting game config...';
const
+ cMaxPower = 1500;
+ cMaxAngle = 2048;
+ cPowerDivisor = 1500;
+
MAXNAMELEN = 32;
COLOR_LAND = $00FFFFFF;
@@ -292,6 +296,7 @@
Ammo: TAmmo;
Slot: 0..cMaxSlotIndex;
TimeAfterTurn: Longword;
+ minAngle, maxAngle: Longword;
end = (
(NameId: sidGrenade;
Ammo: (Propz: ammoprop_Timerable or
@@ -364,7 +369,8 @@
Timer: 0;
AmmoType: amRope);
Slot: 7;
- TimeAfterTurn: 0),
+ TimeAfterTurn: 0;
+ maxAngle: cMaxAngle div 2),
(NameId: sidMine;
Ammo: (Propz: ammoprop_NoCrosshair;
Count: 2;
@@ -447,7 +453,9 @@
Timer: 0;
AmmoType: amBlowTorch);
Slot: 6;
- TimeAfterTurn: 3000));
+ TimeAfterTurn: 3000;
+ minAngle: 510;
+ maxAngle: 1400));
implementation