532 

   532 

   533 tmpsurf:= SDL_CreateRGBSurface(SDL_SWSURFACE, 2048, 1024, 32, RMask, GMask, BMask, 0);

   533 tmpsurf:= SDL_CreateRGBSurface(SDL_SWSURFACE, 2048, 1024, 32, RMask, GMask, BMask, 0);

   534 

   534 

   535 TryDo(tmpsurf <> nil, 'Error creating pre-land surface', true);

   535 TryDo(tmpsurf <> nil, 'Error creating pre-land surface', true);

   536 ColorizeLand(tmpsurf);

   536 ColorizeLand(tmpsurf);

   537 

   538 

   538 LandSurface2LandPixels(tmpsurf);

   539 LandSurface2LandPixels(tmpsurf);

   539 SDL_FreeSurface(tmpsurf);

   540 SDL_FreeSurface(tmpsurf);

   540 

   541 

   541 AddProgress;

   542 AddProgress;