172 begin

   172 begin

   173 // Sky

   173 // Sky

   174 glClear(GL_COLOR_BUFFER_BIT);

   174 glClear(GL_COLOR_BUFFER_BIT);

   175 glEnable(GL_BLEND);

   175 glEnable(GL_BLEND);

   176 glEnable(GL_TEXTURE_2D);

   176 glEnable(GL_TEXTURE_2D);

   177 

   179 

   178 if not isPaused then MoveCamera;

   180 if not isPaused then MoveCamera;

   179 

   181 

   180 // background

   182 // background

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

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

   247         end;

   249         end;

   248 

   250 

   249 // Target

   251 // Target

   250 if TargetPoint.X <> NoPointX then DrawSprite(sprTargetP, TargetPoint.X + WorldDx - 16, TargetPoint.Y + WorldDy - 16, 0, Surface);

   252 if TargetPoint.X <> NoPointX then DrawSprite(sprTargetP, TargetPoint.X + WorldDx - 16, TargetPoint.Y + WorldDy - 16, 0, Surface);

   251 

   253 

   252 // Captions

   256 // Captions

   253 i:= 8;

   257 i:= 8;

   254 for grp:= Low(TCapGroup) to High(TCapGroup) do

   258 for grp:= Low(TCapGroup) to High(TCapGroup) do

   255     with Captions[grp] do

   259     with Captions[grp] do

   256          if Tex <> nil then

   260          if Tex <> nil then