hedgewars/uSound.pas
changeset 14035 ecfd13128100
parent 14034 f9281c294a4c
child 14036 bf14c7c1be02
equal deleted inserted replaced
14034:f9281c294a4c 14035:ecfd13128100
   318             (FileName:            'Brilliant.ogg'; Path: ptVoices; AltPath: ptNone),// sndBrilliant
   318             (FileName:            'Brilliant.ogg'; Path: ptVoices; AltPath: ptNone),// sndBrilliant
   319             (FileName:            'Excellent.ogg'; Path: ptVoices; AltPath: ptNone),// sndExcellent
   319             (FileName:            'Excellent.ogg'; Path: ptVoices; AltPath: ptNone),// sndExcellent
   320             (FileName:                 'Fire.ogg'; Path: ptVoices; AltPath: ptNone),// sndFire
   320             (FileName:                 'Fire.ogg'; Path: ptVoices; AltPath: ptNone),// sndFire
   321             (FileName:            'Watchthis.ogg'; Path: ptVoices; AltPath: ptNone),// sndWatchThis
   321             (FileName:            'Watchthis.ogg'; Path: ptVoices; AltPath: ptNone),// sndWatchThis
   322             (FileName:              'Runaway.ogg'; Path: ptVoices; AltPath: ptNone),// sndRunAway
   322             (FileName:              'Runaway.ogg'; Path: ptVoices; AltPath: ptNone),// sndRunAway
   323             (FileName:              'Revenge.ogg'; Path: ptVoices; AltPath: ptNone) // sndRevenge
   323             (FileName:              'Revenge.ogg'; Path: ptVoices; AltPath: ptNone),// sndRevenge
       
   324             (FileName:             'Cutitout.ogg'; Path: ptVoices; AltPath: ptNone),// sndCutItOut
       
   325             (FileName:         'Leavemealone.ogg'; Path: ptVoices; AltPath: ptNone) // sndLeaveMeAlone
   324             );
   326             );
   325 
   327 
   326 
   328 
   327 function  AskForVoicepack(name: shortstring): Pointer;
   329 function  AskForVoicepack(name: shortstring): Pointer;
   328 var i: Longword;
   330 var i: Longword;
   532                         snd := sndNooo
   534                         snd := sndNooo
   533                     else
   535                     else
   534                         snd := sndUhOh
   536                         snd := sndUhOh
   535                 else if (snd in [sndDrat, sndBugger]) then
   537                 else if (snd in [sndDrat, sndBugger]) then
   536                     snd := sndStupid
   538                     snd := sndStupid
   537                 else if (snd = sndGonnaGetYou) then
   539                 else if (snd in [sndGonnaGetYou, sndCutItOut, sndLeaveMeAlone]) then
   538                     snd := sndRegret
   540                     snd := sndRegret
   539                 else if (snd in [sndOhDear, sndSoLong]) then
   541                 else if (snd in [sndOhDear, sndSoLong]) then
   540                     snd := sndByeBye
   542                     snd := sndByeBye
   541                 else if (snd = sndWhatThe) then
   543                 else if (snd = sndWhatThe) then
   542                     snd := sndNooo
   544                     snd := sndNooo