🐛 Fix invalid Z range on load
This commit is contained in:
parent
b83c5f4b2d
commit
9f66004c44
|
@ -62,6 +62,9 @@ type
|
|||
|
||||
implementation
|
||||
|
||||
uses
|
||||
Math;
|
||||
|
||||
function ReadString(AStream: TStream): String;
|
||||
var
|
||||
nonNullFlag: Byte;
|
||||
|
@ -104,7 +107,7 @@ begin
|
|||
tile.TileID := ReadInt;
|
||||
tile.X := ReadInt;
|
||||
tile.Y := ReadInt;
|
||||
tile.Z := ReadInt;
|
||||
tile.Z := EnsureRange(ReadInt, -128, 127);
|
||||
ReadInt; // Level; unused
|
||||
|
||||
if version = 1 then
|
||||
|
|
Loading…
Reference in New Issue