hedgewars/uSound.pas
changeset 12621 d972b31f8881
parent 12618 2d68c113fc8d
child 12668 308846e05154
equal deleted inserted replaced
12620:22bbf0392b71 12621:d972b31f8881
   108     SDMusicFN: shortstring; // SD music file name
   108     SDMusicFN: shortstring; // SD music file name
   109 
   109 
   110 var Volume: LongInt;
   110 var Volume: LongInt;
   111     SoundTimerTicks: Longword;
   111     SoundTimerTicks: Longword;
   112 implementation
   112 implementation
   113 uses uVariables, uConsole, uCommands, uChat, uUtils, uDebug, uPhysFSLayer;
   113 uses uVariables, uConsole, uCommands, uDebug, uPhysFSLayer;
   114 
   114 
   115 const chanTPU = 32;
   115 const chanTPU = 32;
   116 var cInitVolume: LongInt;
   116 var cInitVolume: LongInt;
   117     previousVolume: LongInt; // cached volume value
   117     previousVolume: LongInt; // cached volume value
   118     lastChan: array [TSound] of LongInt;
   118     lastChan: array [TSound] of LongInt;