hedgewars/hwengine.pas
changeset 11777 927c45b83496
parent 11776 c9da8046f618
child 11781 f2031643fe98
equal deleted inserted replaced
11776:c9da8046f618 11777:927c45b83496
    64         end;
    64         end;
    65 
    65 
    66         themeCredits:= read1stLn(cPathz[ptCurrTheme] + '/credits.txt');
    66         themeCredits:= read1stLn(cPathz[ptCurrTheme] + '/credits.txt');
    67         if Length(themeCredits) > 0 then
    67         if Length(themeCredits) > 0 then
    68             AddChatString(char(8) + '© Theme: ' + themeCredits);
    68             AddChatString(char(8) + '© Theme: ' + themeCredits);
    69 
       
    70         //AddChatString(char(9) + '© Hats : TODO');
       
    71         //AddChatString(char(2) + '© Music : TODO');
       
    72 end;
    69 end;
    73 
    70 
    74 ///////////////////////////////////////////////////////////////////////////////
    71 ///////////////////////////////////////////////////////////////////////////////
    75 function DoTimer(Lag: LongInt): boolean;
    72 function DoTimer(Lag: LongInt): boolean;
    76 var s: shortstring;
    73 var s: shortstring;