equal
deleted
inserted
replaced
556 procedure PlayMusic; |
556 procedure PlayMusic; |
557 var s: shortstring; |
557 var s: shortstring; |
558 begin |
558 begin |
559 if (MusicFN = '') or (not isMusicEnabled) then |
559 if (MusicFN = '') or (not isMusicEnabled) then |
560 exit; |
560 exit; |
561 if SuddenDeath and (SDMusicFN <> '') then |
561 if SuddenDeath and (SDMusicFN <> '') then |
562 s:= '/Music/' + SDMusicFN |
562 s:= '/Music/' + SDMusicFN |
563 else s:= '/Music/' + MusicFN; |
563 else s:= '/Music/' + MusicFN; |
564 WriteToConsole(msgLoading + s + ' '); |
564 WriteToConsole(msgLoading + s + ' '); |
565 |
565 |
566 Mus:= Mix_LoadMUS_RW(rwopsOpenRead(s)); |
566 Mus:= Mix_LoadMUS_RW(rwopsOpenRead(s)); |