/* * This file is part of OpenTTD. * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2. * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see . */ /** @file newgrf_town.cpp Implementation of the town part of NewGRF houses. */ #include "stdafx.h" #include "debug.h" #include "town.h" #include "newgrf_town.h" #include "timer/timer_game_tick.h" #include "safeguards.h" /* virtual */ uint32_t TownScopeResolver::GetVariable(byte variable, [[maybe_unused]] uint32_t parameter, bool *available) const { switch (variable) { /* Larger towns */ case 0x40: if (_settings_game.economy.larger_towns == 0) return 2; if (this->t->larger_town) return 1; return 0; /* Town index */ case 0x41: return this->t->index; /* Get a variable from the persistent storage */ case 0x7C: { /* Check the persistent storage for the GrfID stored in register 100h. */ uint32_t grfid = GetRegister(0x100); if (grfid == 0xFFFFFFFF) { if (this->ro.grffile == nullptr) return 0; grfid = this->ro.grffile->grfid; } for (auto &it : this->t->psa_list) { if (it->grfid == grfid) return it->GetValue(parameter); } return 0; } /* Town properties */ case 0x80: return this->t->xy.base(); case 0x81: return GB(this->t->xy.base(), 8, 8); case 0x82: return ClampTo(this->t->cache.population); case 0x83: return GB(ClampTo(this->t->cache.population), 8, 8); case 0x8A: return this->t->grow_counter / Ticks::TOWN_GROWTH_TICKS; case 0x92: return this->t->flags; // In original game, 0x92 and 0x93 are really one word. Since flags is a byte, this is to adjust case 0x93: return 0; case 0x94: return ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_EDGE]); case 0x95: return GB(ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_EDGE]), 8, 8); case 0x96: return ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_OUTSKIRT]); case 0x97: return GB(ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_OUTSKIRT]), 8, 8); case 0x98: return ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_OUTER_SUBURB]); case 0x99: return GB(ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_OUTER_SUBURB]), 8, 8); case 0x9A: return ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_INNER_SUBURB]); case 0x9B: return GB(ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_INNER_SUBURB]), 8, 8); case 0x9C: return ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_CENTRE]); case 0x9D: return GB(ClampTo(this->t->cache.squared_town_zone_radius[HZB_TOWN_CENTRE]), 8, 8); case 0x9E: return this->t->ratings[0]; case 0x9F: return GB(this->t->ratings[0], 8, 8); case 0xA0: return this->t->ratings[1]; case 0xA1: return GB(this->t->ratings[1], 8, 8); case 0xA2: return this->t->ratings[2]; case 0xA3: return GB(this->t->ratings[2], 8, 8); case 0xA4: return this->t->ratings[3]; case 0xA5: return GB(this->t->ratings[3], 8, 8); case 0xA6: return this->t->ratings[4]; case 0xA7: return GB(this->t->ratings[4], 8, 8); case 0xA8: return this->t->ratings[5]; case 0xA9: return GB(this->t->ratings[5], 8, 8); case 0xAA: return this->t->ratings[6]; case 0xAB: return GB(this->t->ratings[6], 8, 8); case 0xAC: return this->t->ratings[7]; case 0xAD: return GB(this->t->ratings[7], 8, 8); case 0xAE: return this->t->have_ratings; case 0xB2: return this->t->statues; case 0xB6: return ClampTo(this->t->cache.num_houses); case 0xB9: return this->t->growth_rate / Ticks::TOWN_GROWTH_TICKS; case 0xBA: return ClampTo(this->t->supplied[CT_PASSENGERS].new_max); case 0xBB: return GB(ClampTo(this->t->supplied[CT_PASSENGERS].new_max), 8, 8); case 0xBC: return ClampTo(this->t->supplied[CT_MAIL].new_max); case 0xBD: return GB(ClampTo(this->t->supplied[CT_MAIL].new_max), 8, 8); case 0xBE: return ClampTo(this->t->supplied[CT_PASSENGERS].new_act); case 0xBF: return GB(ClampTo(this->t->supplied[CT_PASSENGERS].new_act), 8, 8); case 0xC0: return ClampTo(this->t->supplied[CT_MAIL].new_act); case 0xC1: return GB(ClampTo(this->t->supplied[CT_MAIL].new_act), 8, 8); case 0xC2: return ClampTo(this->t->supplied[CT_PASSENGERS].old_max); case 0xC3: return GB(ClampTo(this->t->supplied[CT_PASSENGERS].old_max), 8, 8); case 0xC4: return ClampTo(this->t->supplied[CT_MAIL].old_max); case 0xC5: return GB(ClampTo(this->t->supplied[CT_MAIL].old_max), 8, 8); case 0xC6: return ClampTo(this->t->supplied[CT_PASSENGERS].old_act); case 0xC7: return GB(ClampTo(this->t->supplied[CT_PASSENGERS].old_act), 8, 8); case 0xC8: return ClampTo(this->t->supplied[CT_MAIL].old_act); case 0xC9: return GB(ClampTo(this->t->supplied[CT_MAIL].old_act), 8, 8); case 0xCA: return this->t->GetPercentTransported(CT_PASSENGERS); case 0xCB: return this->t->GetPercentTransported(CT_MAIL); case 0xCC: return this->t->received[TE_FOOD].new_act; case 0xCD: return GB(this->t->received[TE_FOOD].new_act, 8, 8); case 0xCE: return this->t->received[TE_WATER].new_act; case 0xCF: return GB(this->t->received[TE_WATER].new_act, 8, 8); case 0xD0: return this->t->received[TE_FOOD].old_act; case 0xD1: return GB(this->t->received[TE_FOOD].old_act, 8, 8); case 0xD2: return this->t->received[TE_WATER].old_act; case 0xD3: return GB(this->t->received[TE_WATER].old_act, 8, 8); case 0xD4: return this->t->road_build_months; case 0xD5: return this->t->fund_buildings_months; } Debug(grf, 1, "Unhandled town variable 0x{:X}", variable); *available = false; return UINT_MAX; } /* virtual */ void TownScopeResolver::StorePSA(uint pos, int32_t value) { if (this->readonly) return; assert(this->t != nullptr); /* We can't store anything if the caller has no #GRFFile. */ if (this->ro.grffile == nullptr) return; /* Check the persistent storage for the GrfID stored in register 100h. */ uint32_t grfid = GetRegister(0x100); /* A NewGRF can only write in the persistent storage associated to its own GRFID. */ if (grfid == 0xFFFFFFFF) grfid = this->ro.grffile->grfid; if (grfid != this->ro.grffile->grfid) return; /* Check if the storage exists. */ for (auto &it : t->psa_list) { if (it->grfid == grfid) { it->StoreValue(pos, value); return; } } /* Create a new storage. */ assert(PersistentStorage::CanAllocateItem()); PersistentStorage *psa = new PersistentStorage(grfid, GSF_FAKE_TOWNS, this->t->xy); psa->StoreValue(pos, value); t->psa_list.push_back(psa); } /** * Resolver for a town. * @param grffile NewGRF file associated with the town. * @param t %Town of the scope. * @param readonly Scope may change persistent storage of the town. */ TownResolverObject::TownResolverObject(const struct GRFFile *grffile, Town *t, bool readonly) : ResolverObject(grffile), town_scope(*this, t, readonly) { }