hedgewars/uWorld.pas
changeset 1806 3c4f0886c123
parent 1805 dd9fb4b13fd8
child 1807 795f97007833
equal deleted inserted replaced
1805:dd9fb4b13fd8 1806:3c4f0886c123
    38 	Frames: Longword = 0;
    38 	Frames: Longword = 0;
    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, uLand;
    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);