- Fixed tiles only being checked for animdata if they have the appropriate tiledata flag

This commit is contained in:
Andreas Schneider 2009-12-09 16:56:39 +01:00
parent be935a6bcb
commit 36afc1e1d9
1 changed files with 4 additions and 2 deletions

View File

@ -320,7 +320,8 @@ var
begin
Result := nil;
if ATileID >= $4000 then
if (ATileID >= $4000) and (tdfAnimation in
ResMan.Tiledata.StaticTiles[ATileID -$4000].Flags) then
begin
animData := ResMan.Animdata.AnimData[ATileID - $4000];
if (animData.FrameCount > 0) and not FAnimations.QueryID(ATileID, Result) then
@ -356,7 +357,8 @@ begin
Result := nil;
id := ATileID or ((AHue.ID and $3FFF) shl 16) or (Byte(APartialHue) shl 30);
if ATileID >= $4000 then
if (ATileID >= $4000) and (tdfAnimation in
ResMan.Tiledata.StaticTiles[ATileID -$4000].Flags) then
begin
animData := ResMan.Animdata.AnimData[ATileID - $4000];
if (animData.FrameCount > 0) and not FAnimations.QueryID(id, Result) then