1043     WriteLnToConsole('Generating land...');

  1043     WriteLnToConsole('Generating land...');

  1044     case cMapGen of

  1044     case cMapGen of

  1045         0: GenBlank(EdgeTemplates[SelectTemplate]);

  1045         0: GenBlank(EdgeTemplates[SelectTemplate]);

  1046         1: GenMaze;

  1046         1: GenMaze;

  1047         2: GenDrawnMap;

  1047         2: GenDrawnMap;

  1048     end;

  1050     end;

  1049     AddProgress();

  1051     AddProgress();

  1050 

  1052 

  1051     tmpsurf:= SDL_CreateRGBSurface(SDL_SWSURFACE, LAND_WIDTH, LAND_HEIGHT, 32, RMask, GMask, BMask, 0);

  1053     tmpsurf:= SDL_CreateRGBSurface(SDL_SWSURFACE, LAND_WIDTH, LAND_HEIGHT, 32, RMask, GMask, BMask, 0);

  1052 

  1054 

  1284     WriteLnToConsole('Generating preview...');

  1286     WriteLnToConsole('Generating preview...');

  1285     case cMapGen of

  1287     case cMapGen of

  1286         0: GenBlank(EdgeTemplates[SelectTemplate]);

  1288         0: GenBlank(EdgeTemplates[SelectTemplate]);

  1287         1: GenMaze;

  1289         1: GenMaze;

  1288         2: GenDrawnMap;

  1290         2: GenDrawnMap;

  1289     end;

  1293     end;

  1290 

  1294 

  1291     lh:= LAND_HEIGHT div 128;

  1295     lh:= LAND_HEIGHT div 128;

  1292     lw:= LAND_WIDTH div 32;

  1296     lw:= LAND_WIDTH div 32;

  1293     for y:= 0 to 127 do

  1297     for y:= 0 to 127 do