diff -r c9da8046f618 -r 927c45b83496 hedgewars/uSound.pas --- a/hedgewars/uSound.pas Fri Apr 29 12:26:13 2016 +0200 +++ b/hedgewars/uSound.pas Fri Apr 29 13:12:26 2016 +0200 @@ -110,7 +110,7 @@ var Volume: LongInt; SoundTimerTicks: Longword; implementation -uses uVariables, uConsole, uCommands, uDebug, uPhysFSLayer; +uses uVariables, uConsole, uCommands, uChat, uUtils, uDebug, uPhysFSLayer; const chanTPU = 32; var cInitVolume: LongInt; @@ -581,6 +581,11 @@ SDLCheck(Mus <> nil, 'Mix_LoadMUS_RW', false); WriteLnToConsole(msgOK); + // display music credits + s:= read1stLn(s + '_credits.txt'); + if Length(s) > 0 then + AddChatString(char(2) + '© Music: ' + s); + SDLCheck(Mix_FadeInMusic(Mus, -1, 3000) <> -1, 'Mix_FadeInMusic', false) end;