hedgewars/uWorld.pas
changeset 1807 795f97007833
parent 1806 3c4f0886c123
child 1812 3d4692e825e7
equal deleted inserted replaced
1806:3c4f0886c123 1807:795f97007833
    39 	WaterColor, DeepWaterColor: TSDL_Color;
    39 	WaterColor, DeepWaterColor: TSDL_Color;
    40 
    40 
    41 implementation
    41 implementation
    42 uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound, GL,
    42 uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound, GL,
    43      uAmmos, uVisualGears, uChat, uLandTexture;
    43      uAmmos, uVisualGears, uChat, uLandTexture;
    44      
    44 
    45 const FPS: Longword = 0;
    45 const FPS: Longword = 0;
    46       CountTicks: Longword = 0;
    46       CountTicks: Longword = 0;
    47       SoundTimerTicks: Longword = 0;
    47       SoundTimerTicks: Longword = 0;
    48       prevPoint: TPoint = (X: 0; Y: 0);
    48       prevPoint: TPoint = (X: 0; Y: 0);
    49 
    49