equal
deleted
inserted
replaced
28 SetLength(LandDirty, (LAND_HEIGHT div 32), (LAND_WIDTH div 32)); |
28 SetLength(LandDirty, (LAND_HEIGHT div 32), (LAND_WIDTH div 32)); |
29 // 0.5 is already approaching on unplayable |
29 // 0.5 is already approaching on unplayable |
30 if (width div 4096 >= 2) or (height div 2048 >= 2) then cMaxZoomLevel:= cMaxZoomLevel/2; |
30 if (width div 4096 >= 2) or (height div 2048 >= 2) then cMaxZoomLevel:= cMaxZoomLevel/2; |
31 cMinMaxZoomLevelDelta:= cMaxZoomLevel - cMinZoomLevel |
31 cMinMaxZoomLevelDelta:= cMaxZoomLevel - cMinZoomLevel |
32 end; |
32 end; |
|
33 initScreenSpaceVars(); |
33 end; |
34 end; |
34 |
35 |
35 procedure InitWorldEdges(); |
36 procedure InitWorldEdges(); |
36 var cy, cx, lx, ly: LongInt; |
37 var cy, cx, lx, ly: LongInt; |
37 found: boolean; |
38 found: boolean; |