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,

    44 const FPS: Longword = 0;

    45 const FPS: Longword = 0;

    45       CountTicks: Longword = 0;

    46       CountTicks: Longword = 0;

    46       SoundTimerTicks: Longword = 0;

    47       SoundTimerTicks: Longword = 0;

    47       prevPoint: TPoint = (X: 0; Y: 0);

    48       prevPoint: TPoint = (X: 0; Y: 0);

    48 

    49 

   187 glClear(GL_COLOR_BUFFER_BIT);

   188 glClear(GL_COLOR_BUFFER_BIT);

   188 glEnable(GL_BLEND);

   189 glEnable(GL_BLEND);

   189 glEnable(GL_TEXTURE_2D);

   190 glEnable(GL_TEXTURE_2D);

   190 //glPushMatrix;

   191 //glPushMatrix;

   191 //glScalef(1.0, 1.0, 1.0);

   192 //glScalef(1.0, 1.0, 1.0);

   192 

   195 

   193 if not isPaused then MoveCamera;

   196 if not isPaused then MoveCamera;

   194 

   197 

   195 // background

   198 // background

   196 DrawRepeated(sprSky, WorldDx * 3 div 8);

   199 DrawRepeated(sprSky, WorldDx * 3 div 8);