00001
00002
00003
00004
00005
00006
00007
00008
00009
00012 #include "stdafx.h"
00013 #include "debug.h"
00014 #include "town.h"
00015 #include "newgrf.h"
00016 #include "newgrf_spritegroup.h"
00017
00027 uint32 TownGetVariable(byte variable, uint32 parameter, bool *available, Town *t, const GRFFile *caller_grffile)
00028 {
00029 switch (variable) {
00030
00031 case 0x40:
00032 if (_settings_game.economy.larger_towns == 0) return 2;
00033 if (t->larger_town) return 1;
00034 return 0;
00035
00036
00037 case 0x41: return t->index;
00038
00039
00040 case 0x7C: {
00041
00042 uint32 grfid = GetRegister(0x100);
00043 if (grfid == 0xFFFFFFFF) {
00044 if (caller_grffile == NULL) return 0;
00045 grfid = caller_grffile->grfid;
00046 }
00047
00048 std::list<PersistentStorage *>::iterator iter;
00049 for (iter = t->psa_list.begin(); iter != t->psa_list.end(); iter++) {
00050 if ((*iter)->grfid == grfid) return (*iter)->GetValue(parameter);
00051 }
00052
00053 return 0;
00054 }
00055
00056
00057 case 0x80: return t->xy;
00058 case 0x81: return GB(t->xy, 8, 8);
00059 case 0x82: return ClampToU16(t->population);
00060 case 0x83: return GB(ClampToU16(t->population), 8, 8);
00061 case 0x8A: return t->grow_counter;
00062 case 0x92: return t->flags;
00063 case 0x93: return 0;
00064 case 0x94: return ClampToU16(t->squared_town_zone_radius[0]);
00065 case 0x95: return GB(ClampToU16(t->squared_town_zone_radius[0]), 8, 8);
00066 case 0x96: return ClampToU16(t->squared_town_zone_radius[1]);
00067 case 0x97: return GB(ClampToU16(t->squared_town_zone_radius[1]), 8, 8);
00068 case 0x98: return ClampToU16(t->squared_town_zone_radius[2]);
00069 case 0x99: return GB(ClampToU16(t->squared_town_zone_radius[2]), 8, 8);
00070 case 0x9A: return ClampToU16(t->squared_town_zone_radius[3]);
00071 case 0x9B: return GB(ClampToU16(t->squared_town_zone_radius[3]), 8, 8);
00072 case 0x9C: return ClampToU16(t->squared_town_zone_radius[4]);
00073 case 0x9D: return GB(ClampToU16(t->squared_town_zone_radius[4]), 8, 8);
00074 case 0x9E: return t->ratings[0];
00075 case 0x9F: return GB(t->ratings[0], 8, 8);
00076 case 0xA0: return t->ratings[1];
00077 case 0xA1: return GB(t->ratings[1], 8, 8);
00078 case 0xA2: return t->ratings[2];
00079 case 0xA3: return GB(t->ratings[2], 8, 8);
00080 case 0xA4: return t->ratings[3];
00081 case 0xA5: return GB(t->ratings[3], 8, 8);
00082 case 0xA6: return t->ratings[4];
00083 case 0xA7: return GB(t->ratings[4], 8, 8);
00084 case 0xA8: return t->ratings[5];
00085 case 0xA9: return GB(t->ratings[5], 8, 8);
00086 case 0xAA: return t->ratings[6];
00087 case 0xAB: return GB(t->ratings[6], 8, 8);
00088 case 0xAC: return t->ratings[7];
00089 case 0xAD: return GB(t->ratings[7], 8, 8);
00090 case 0xAE: return t->have_ratings;
00091 case 0xB2: return t->statues;
00092 case 0xB6: return ClampToU16(t->num_houses);
00093 case 0xB9: return t->growth_rate & (~TOWN_GROW_RATE_CUSTOM);
00094 case 0xBA: return ClampToU16(t->supplied[CT_PASSENGERS].new_max);
00095 case 0xBB: return GB(ClampToU16(t->supplied[CT_PASSENGERS].new_max), 8, 8);
00096 case 0xBC: return ClampToU16(t->supplied[CT_MAIL].new_max);
00097 case 0xBD: return GB(ClampToU16(t->supplied[CT_MAIL].new_max), 8, 8);
00098 case 0xBE: return ClampToU16(t->supplied[CT_PASSENGERS].new_act);
00099 case 0xBF: return GB(ClampToU16(t->supplied[CT_PASSENGERS].new_act), 8, 8);
00100 case 0xC0: return ClampToU16(t->supplied[CT_MAIL].new_act);
00101 case 0xC1: return GB(ClampToU16(t->supplied[CT_MAIL].new_act), 8, 8);
00102 case 0xC2: return ClampToU16(t->supplied[CT_PASSENGERS].old_max);
00103 case 0xC3: return GB(ClampToU16(t->supplied[CT_PASSENGERS].old_max), 8, 8);
00104 case 0xC4: return ClampToU16(t->supplied[CT_MAIL].old_max);
00105 case 0xC5: return GB(ClampToU16(t->supplied[CT_MAIL].old_max), 8, 8);
00106 case 0xC6: return ClampToU16(t->supplied[CT_PASSENGERS].old_act);
00107 case 0xC7: return GB(ClampToU16(t->supplied[CT_PASSENGERS].old_act), 8, 8);
00108 case 0xC8: return ClampToU16(t->supplied[CT_MAIL].old_act);
00109 case 0xC9: return GB(ClampToU16(t->supplied[CT_MAIL].old_act), 8, 8);
00110 case 0xCA: return t->GetPercentTransported(CT_PASSENGERS);
00111 case 0xCB: return t->GetPercentTransported(CT_MAIL);
00112 case 0xCC: return t->received[TE_FOOD].new_act;
00113 case 0xCD: return GB(t->received[TE_FOOD].new_act, 8, 8);
00114 case 0xCE: return t->received[TE_WATER].new_act;
00115 case 0xCF: return GB(t->received[TE_WATER].new_act, 8, 8);
00116 case 0xD0: return t->received[TE_FOOD].old_act;
00117 case 0xD1: return GB(t->received[TE_FOOD].old_act, 8, 8);
00118 case 0xD2: return t->received[TE_WATER].old_act;
00119 case 0xD3: return GB(t->received[TE_WATER].old_act, 8, 8);
00120 case 0xD4: return t->road_build_months;
00121 case 0xD5: return t->fund_buildings_months;
00122 }
00123
00124 DEBUG(grf, 1, "Unhandled town variable 0x%X", variable);
00125
00126 *available = false;
00127 return UINT_MAX;
00128 }
00129
00138 void TownStorePSA(Town *t, const GRFFile *caller_grffile, uint pos, int32 value)
00139 {
00140 assert(t != NULL);
00141
00142 if (caller_grffile == NULL) return;
00143
00144
00145 uint32 grfid = GetRegister(0x100);
00146
00147
00148 if (grfid == 0xFFFFFFFF) grfid = caller_grffile->grfid;
00149 if (grfid != caller_grffile->grfid) return;
00150
00151
00152 std::list<PersistentStorage *>::iterator iter;
00153 for (iter = t->psa_list.begin(); iter != t->psa_list.end(); iter++) {
00154 if ((*iter)->grfid == grfid) {
00155 (*iter)->StoreValue(pos, value);
00156 return;
00157 }
00158 }
00159
00160
00161 assert(PersistentStorage::CanAllocateItem());
00162 PersistentStorage *psa = new PersistentStorage(grfid);
00163 psa->StoreValue(pos, value);
00164 t->psa_list.push_back(psa);
00165 }