From d095599b58e1617eafad01a11e03ca95cce5b4e6 Mon Sep 17 00:00:00 2001
From: belugas <belugas@openttd.org>
Date: Sun, 15 Jun 2008 02:48:25 +0000
Subject: (svn r13519) -Feature[newGRF]: Implement var 63, variational action2
 variable for Houses. Or, in more simple terms, the check for the animation
 frame of nearby house.

---
 src/newgrf_house.cpp | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/newgrf_house.cpp b/src/newgrf_house.cpp
index 4ece1f1ac..c794f5233 100644
--- a/src/newgrf_house.cpp
+++ b/src/newgrf_house.cpp
@@ -254,6 +254,12 @@ static uint32 HouseGetVariable(const ResolverObject *object, byte variable, byte
 		/* Land info for nearby tiles. */
 		case 0x62: return GetNearbyTileInformation(parameter, tile);
 
+		/* Current animation frame of nearby house tiles */
+		case 0x63: {
+			TileIndex testtile = GetNearbyTile(parameter, tile);
+			return IsTileType(testtile, MP_HOUSE) ? GetHouseAnimationFrame(testtile) : 0;
+		}
+
 		/* Read GRF parameter */
 		case 0x7F: return GetGRFParameter(object->u.house.house_id, parameter);
 	}
-- 
cgit v1.2.3-70-g09d2