--- a/hedgewars/uConsts.pas Thu Sep 01 18:41:23 2005 +0000
+++ b/hedgewars/uConsts.pas Sat Sep 03 16:01:28 2005 +0000
@@ -43,13 +43,15 @@
ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts);
TSprite = (sprWater, sprCloud, sprBomb, sprBigDigit, sprFrame,
sprLag, sprArrow, sprGrenade, sprTargetP, sprUFO,
- sprSmokeTrace, sprRopeHook, sprExplosion50);
+ sprSmokeTrace, sprRopeHook, sprExplosion50, sprMineOff,
+ sprMineOn);
TGearType = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
gtGrave, gtUFO, gtShotgunShot, gtActionTimer, gtPickHammer, gtRope,
- gtSmokeTrace, gtExplosion);
+ gtSmokeTrace, gtExplosion, gtMine);
TSound = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease, sndSplash,
sndShotgunReload, sndShotgunFire, sndGraveImpact);
- TAmmoType = (amGrenade, amBazooka, amUFO, amShotgun, amPickHammer, amSkip, amRope);
+ TAmmoType = (amGrenade, amBazooka, amUFO, amShotgun, amPickHammer, amSkip, amRope,
+ amMine);
THWFont = (fnt16, fntBig);
THHFont = record
Handle: PTTF_Font;
@@ -130,8 +132,8 @@
gm_HJump = $00000080;
gm_Destroy= $00000100;
- cMaxSlot = 4;
- cMaxSlotAmmo = 1;
+ cMaxSlotIndex = 6;
+ cMaxSlotAmmoIndex = 1;
ammoprop_Timerable = $00000001;
ammoprop_Power = $00000002;
@@ -221,7 +223,9 @@
(FileName: 'UFO.png'; Path: ptGraphics; Width: 32; Height: 32),// sprUFO
(FileName:'SmokeTrace.png'; Path: ptGraphics; Width: 32; Height: 32),// sprSmokeTrace
(FileName: 'RopeHook.png'; Path: ptGraphics; Width: 32; Height: 32),// sprRopeHook
- (FileName: 'Expl50.png'; Path: ptGraphics; Width: 64; Height: 64) // sprExplosion50
+ (FileName: 'Expl50.png'; Path: ptGraphics; Width: 64; Height: 64),// sprExplosion50
+ (FileName: 'MineOff.png'; Path: ptGraphics; Width: 16; Height: 16),// sprMineOff
+ (FileName: 'MineOn.png'; Path: ptGraphics; Width: 16; Height: 16) // sprMineOn
);
Soundz: array[TSound] of record
FileName: String[31];
@@ -250,7 +254,7 @@
NumPerTurn: 0;
Timer: 3000;
AmmoType: amGrenade);
- Slot: 0;
+ Slot: 1;
TimeAfterTurn: 3000),
(Name: 'Bazooka';
Ammo: (Propz: ammoprop_Power;
@@ -258,7 +262,7 @@
NumPerTurn: 0;
Timer: 0;
AmmoType: amBazooka);
- Slot: 1;
+ Slot: 0;
TimeAfterTurn: 3000),
(Name: 'UFO';
Ammo: (Propz: ammoprop_Power or ammoprop_NeedTarget;
@@ -282,7 +286,7 @@
NumPerTurn: 0;
Timer: 0;
AmmoType: amPickHammer);
- Slot: 3;
+ Slot: 4;
TimeAfterTurn: 0),
(Name: 'Skip turn';
Ammo: (Propz: 0;
@@ -290,7 +294,7 @@
NumPerTurn: 0;
Timer: 0;
AmmoType: amSkip);
- Slot: 4;
+ Slot: 6;
TimeAfterTurn: 0),
(Name: 'Rope';
Ammo: (Propz: ammoprop_ForwMsgs or ammoprop_AttackInFall or ammoprop_AttackInJump;
@@ -298,8 +302,16 @@
NumPerTurn: 0;
Timer: 0;
AmmoType: amRope);
+ Slot: 5;
+ TimeAfterTurn: 0),
+ (Name: 'Mine';
+ Ammo: (Propz: 0;
+ Count: 5;
+ NumPerTurn: 0;
+ Timer: 0;
+ AmmoType: amMine);
Slot: 3;
- TimeAfterTurn: 0)
+ TimeAfterTurn: 3000)
);
Resolutions: array[0..3] of String = (