changeset 2327 | 4832b77ec958 |
parent 2290 | bf87ca44782e |
child 2372 | f3e7a066c2b8 |
--- a/hedgewars/uMisc.pas Wed Aug 19 13:49:47 2009 +0000 +++ b/hedgewars/uMisc.pas Wed Aug 19 15:17:21 2009 +0000 @@ -162,7 +162,7 @@ TargetPoint: TPoint = (X: NoPointX; Y: 0); implementation -uses uConsole, uStore, uIO, Math, uRandom; +uses uConsole, uStore, uIO, Math, uRandom, uSound; var KBnum: Longword = 0; {$IFDEF DEBUGFILE} var f: textfile; @@ -522,6 +522,7 @@ size: Longword; f: file; begin +playSound(sndShutter, false, nil); head[6]:= cScreenWidth; head[7]:= cScreenHeight;