diff -r 73cdc306888f -r 128ace913837 hedgewars/uLandGenMaze.pas --- a/hedgewars/uLandGenMaze.pas Tue Dec 13 21:21:55 2022 +0100 +++ b/hedgewars/uLandGenMaze.pas Mon Jan 02 15:59:26 2023 +0100 @@ -8,7 +8,8 @@ implementation -uses uRandom, uLandOutline, uLandTemplates, uVariables, uFloat, uConsts, uLandGenTemplateBased, uUtils; +uses uRandom, uLandOutline, uLandTemplates, uVariables, uFloat, uConsts, + uLandGenTemplateBased, uUtils, uLandUtils; type direction = record x, y: LongInt; end; const DIR_N: direction = (x: 0; y: -1); @@ -403,11 +404,11 @@ for x := 0 to playWidth do for y := 0 to off_y - 1 do - Land[y, x] := 0; + LandSet(y, x, 0); for x := 0 to playWidth do for y := off_y to LAND_HEIGHT - 1 do - Land[y, x] := lfBasic; + LandSet(y, x, lfBasic); for y := 0 to num_cells_y - 1 do for x := 0 to num_cells_x - 1 do @@ -527,9 +528,9 @@ else begin x := 0; - while Land[cellsize div 2 + cellsize + off_y, x] = lfBasic do + while LandGet(cellsize div 2 + cellsize + off_y, x) = lfBasic do x := x + 1; - while Land[cellsize div 2 + cellsize + off_y, x] = 0 do + while LandGet(cellsize div 2 + cellsize + off_y, x) = 0 do x := x + 1; FillLand(x+1, cellsize div 2 + cellsize + off_y, 0, 0); end;