Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Play sound before cake explodes
authorunc0rr
Sun, 27 Jul 2008 14:28:45 +0000
changeset 1111 25d0ca2e4a7d
parent 1110 3660bbfc1cba
child 1112 11590c68b68e
Play sound before cake explodes
hedgewars/GSHandlers.inc file | annotate | diff | comparison | revisions
hedgewars/uConsts.pas file | annotate | diff | comparison | revisions 
--- a/hedgewars/GSHandlers.inc	Sun Jul 27 14:05:17 2008 +0000
+++ b/hedgewars/GSHandlers.inc	Sun Jul 27 14:28:45 2008 +0000
@@ -1519,6 +1519,7 @@
 		gi:= gi^.NextGear
 		end;
 	Gear^.doStep:= @doStepCakeExpl;
+	PlaySound(sndCake, false)
 	end else dec(Gear^.Pos)
 end;
 
--- a/hedgewars/uConsts.pas	Sun Jul 27 14:05:17 2008 +0000
+++ b/hedgewars/uConsts.pas	Sun Jul 27 14:28:45 2008 +0000
@@ -68,7 +68,8 @@
                    sndJump3, sndYesSir, sndLaugh, sndIllGetYou, sndIncoming,
                    sndMissed, sndStupid, sndFirstBlood, sndBoring, sndByeBye,
                    sndSameTeam, sndNutter, sndReinforce, sndTraitor, sndRegret,
-                   sndEnemyDown, sndCoward, sndHurry, sndWatchIt, sndKamikaze);
+                   sndEnemyDown, sndCoward, sndHurry, sndWatchIt, sndKamikaze,
+                   sndCake);
 
      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
@@ -475,7 +476,8 @@
                 (FileName:        'Coward.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndCoward
                 (FileName:         'Hurry.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndHurry
                 (FileName:       'Watchit.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndWatchIt
-                (FileName:      'Kamikaze.ogg'; Path: ptVoices; id: nil; lastChan: 0) // sndKamikaze
+                (FileName:      'Kamikaze.ogg'; Path: ptVoices; id: nil; lastChan: 0),// sndKamikaze
+                (FileName:         'cake2.ogg'; Path: ptSounds; id: nil; lastChan: 0) // sndCake
                 );
 
       Ammoz: array [TAmmoType] of record
hedgewars