--- a/hedgewars/GSHandlers.inc Sat Jul 14 11:46:54 2007 +0000
+++ b/hedgewars/GSHandlers.inc Sun Jul 15 13:35:32 2007 +0000
@@ -327,7 +327,7 @@
end;
////////////////////////////////////////////////////////////////////////////////
-procedure doStepDEagleShot(Gear: PGear);
+procedure doStepDEagleShotWork(Gear: PGear);
var i, x, y: LongWord;
oX, oY: hwFloat;
begin
@@ -355,6 +355,12 @@
DeleteGear(Gear)
end;
+procedure doStepDEagleShot(Gear: PGear);
+begin
+PlaySound(sndGun, false);
+Gear^.doStep:= @doStepDEagleShotWork
+end;
+
////////////////////////////////////////////////////////////////////////////////
procedure doStepActionTimer(Gear: PGear);
begin
--- a/hedgewars/uConsts.pas Sat Jul 14 11:46:54 2007 +0000
+++ b/hedgewars/uConsts.pas Sun Jul 15 13:35:32 2007 +0000
@@ -54,7 +54,7 @@
TSound = (sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
- sndMineTick, sndPickhammer);
+ sndMineTick, sndPickhammer, sndGun);
TAmmoType = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch,
@@ -345,7 +345,8 @@
(FileName: 'shotgunfire.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndShotgunFire
(FileName: 'graveimpact.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndGraveImpact
(FileName: 'minetick.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndMineTicks
- (FileName: 'pickhammer.ogg'; Path: ptSounds; id: nil; lastChan: 0) // sndPickhammer
+ (FileName: 'pickhammer.ogg'; Path: ptSounds; id: nil; lastChan: 0),// sndPickhammer
+ (FileName: 'gun.ogg'; Path: ptSounds; id: nil; lastChan: 0) // sndGun
);
Ammoz: array [TAmmoType] of record
--- a/share/hedgewars/Data/Sounds/CMakeLists.txt Sat Jul 14 11:46:54 2007 +0000
+++ b/share/hedgewars/Data/Sounds/CMakeLists.txt Sun Jul 15 13:35:32 2007 +0000
@@ -2,6 +2,7 @@
explosion.ogg
graveimpact.ogg
grenadeimpact.ogg
+ gun.ogg
minetick.ogg
pickhammer.ogg
shotgunfire.ogg
Binary file share/hedgewars/Data/Sounds/gun.ogg has changed