hedgewars/uSound.pas
branch0.9.25
changeset 14387 2ab312c47dc3
parent 14096 df0e86b2630f
child 14410 07c9bdc45115
equal deleted inserted replaced
14386:a7769dbd7088 14387:2ab312c47dc3
   473 end;
   473 end;
   474 
   474 
   475 // Get a fallback voice, assuming that snd is not available. Returns sndNone if none is found.
   475 // Get a fallback voice, assuming that snd is not available. Returns sndNone if none is found.
   476 function GetFallbackV(snd: TSound): TSound;
   476 function GetFallbackV(snd: TSound): TSound;
   477 begin
   477 begin
   478     // Fallback to sndFirePunch1 / sndOw1 / sndOoff1 if a “higher-numbered” sound is missing
   478     // Fallback to sndFirePunch1 / sndOw1 / sndOoff1 if a "higher-numbered" sound is missing
   479     if (snd in [sndFirePunch2, sndFirePunch3, sndFirePunch4, sndFirePunch5, sndFirePunch6]) then
   479     if (snd in [sndFirePunch2, sndFirePunch3, sndFirePunch4, sndFirePunch5, sndFirePunch6]) then
   480         GetFallbackV := sndFirePunch1
   480         GetFallbackV := sndFirePunch1
   481     else if (snd in [sndOw2, sndOw3, sndOw4, sndOuch]) then
   481     else if (snd in [sndOw2, sndOw3, sndOw4, sndOuch]) then
   482         GetFallbackV := sndOw1
   482         GetFallbackV := sndOw1
   483     else if (snd in [sndOoff2, sndOoff3]) then
   483     else if (snd in [sndOoff2, sndOoff3]) then