(svn r27953) -Cleanup: Adjust other languages for r27952
[openttd.git] / src / saveload / company_sl.cpp
blobd7c3130271805eadad054ca4ab3c42ed38d59cae
1 /* $Id$ */
3 /*
4 * This file is part of OpenTTD.
5 * 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.
6 * 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.
7 * 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 <http://www.gnu.org/licenses/>.
8 */
10 /** @file company_sl.cpp Code handling saving and loading of company data */
12 #include "../stdafx.h"
13 #include "../company_func.h"
14 #include "../company_manager_face.h"
15 #include "../fios.h"
16 #include "../tunnelbridge_map.h"
17 #include "../tunnelbridge.h"
18 #include "../station_base.h"
19 #include "../strings_func.h"
21 #include "saveload.h"
23 #include "table/strings.h"
25 #include "../safeguards.h"
27 /**
28 * Converts an old company manager's face format to the new company manager's face format
30 * Meaning of the bits in the old face (some bits are used in several times):
31 * - 4 and 5: chin
32 * - 6 to 9: eyebrows
33 * - 10 to 13: nose
34 * - 13 to 15: lips (also moustache for males)
35 * - 16 to 19: hair
36 * - 20 to 22: eye colour
37 * - 20 to 27: tie, ear rings etc.
38 * - 28 to 30: glasses
39 * - 19, 26 and 27: race (bit 27 set and bit 19 equal to bit 26 = black, otherwise white)
40 * - 31: gender (0 = male, 1 = female)
42 * @param face the face in the old format
43 * @return the face in the new format
45 CompanyManagerFace ConvertFromOldCompanyManagerFace(uint32 face)
47 CompanyManagerFace cmf = 0;
48 GenderEthnicity ge = GE_WM;
50 if (HasBit(face, 31)) SetBit(ge, GENDER_FEMALE);
51 if (HasBit(face, 27) && (HasBit(face, 26) == HasBit(face, 19))) SetBit(ge, ETHNICITY_BLACK);
53 SetCompanyManagerFaceBits(cmf, CMFV_GEN_ETHN, ge, ge);
54 SetCompanyManagerFaceBits(cmf, CMFV_HAS_GLASSES, ge, GB(face, 28, 3) <= 1);
55 SetCompanyManagerFaceBits(cmf, CMFV_EYE_COLOUR, ge, HasBit(ge, ETHNICITY_BLACK) ? 0 : ClampU(GB(face, 20, 3), 5, 7) - 5);
56 SetCompanyManagerFaceBits(cmf, CMFV_CHIN, ge, ScaleCompanyManagerFaceValue(CMFV_CHIN, ge, GB(face, 4, 2)));
57 SetCompanyManagerFaceBits(cmf, CMFV_EYEBROWS, ge, ScaleCompanyManagerFaceValue(CMFV_EYEBROWS, ge, GB(face, 6, 4)));
58 SetCompanyManagerFaceBits(cmf, CMFV_HAIR, ge, ScaleCompanyManagerFaceValue(CMFV_HAIR, ge, GB(face, 16, 4)));
59 SetCompanyManagerFaceBits(cmf, CMFV_JACKET, ge, ScaleCompanyManagerFaceValue(CMFV_JACKET, ge, GB(face, 20, 2)));
60 SetCompanyManagerFaceBits(cmf, CMFV_COLLAR, ge, ScaleCompanyManagerFaceValue(CMFV_COLLAR, ge, GB(face, 22, 2)));
61 SetCompanyManagerFaceBits(cmf, CMFV_GLASSES, ge, GB(face, 28, 1));
63 uint lips = GB(face, 10, 4);
64 if (!HasBit(ge, GENDER_FEMALE) && lips < 4) {
65 SetCompanyManagerFaceBits(cmf, CMFV_HAS_MOUSTACHE, ge, true);
66 SetCompanyManagerFaceBits(cmf, CMFV_MOUSTACHE, ge, max(lips, 1U) - 1);
67 } else {
68 if (!HasBit(ge, GENDER_FEMALE)) {
69 lips = lips * 15 / 16;
70 lips -= 3;
71 if (HasBit(ge, ETHNICITY_BLACK) && lips > 8) lips = 0;
72 } else {
73 lips = ScaleCompanyManagerFaceValue(CMFV_LIPS, ge, lips);
75 SetCompanyManagerFaceBits(cmf, CMFV_LIPS, ge, lips);
77 uint nose = GB(face, 13, 3);
78 if (ge == GE_WF) {
79 nose = (nose * 3 >> 3) * 3 >> 2; // There is 'hole' in the nose sprites for females
80 } else {
81 nose = ScaleCompanyManagerFaceValue(CMFV_NOSE, ge, nose);
83 SetCompanyManagerFaceBits(cmf, CMFV_NOSE, ge, nose);
86 uint tie_earring = GB(face, 24, 4);
87 if (!HasBit(ge, GENDER_FEMALE) || tie_earring < 3) { // Not all females have an earring
88 if (HasBit(ge, GENDER_FEMALE)) SetCompanyManagerFaceBits(cmf, CMFV_HAS_TIE_EARRING, ge, true);
89 SetCompanyManagerFaceBits(cmf, CMFV_TIE_EARRING, ge, HasBit(ge, GENDER_FEMALE) ? tie_earring : ScaleCompanyManagerFaceValue(CMFV_TIE_EARRING, ge, tie_earring / 2));
92 return cmf;
95 /** Rebuilding of company statistics after loading a savegame. */
96 void AfterLoadCompanyStats()
98 /* Reset infrastructure statistics to zero. */
99 Company *c;
100 FOR_ALL_COMPANIES(c) MemSetT(&c->infrastructure, 0);
102 /* Collect airport count. */
103 Station *st;
104 FOR_ALL_STATIONS(st) {
105 if ((st->facilities & FACIL_AIRPORT) && Company::IsValidID(st->owner)) {
106 Company::Get(st->owner)->infrastructure.airport++;
110 for (TileIndex tile = 0; tile < MapSize(); tile++) {
111 switch (GetTileType(tile)) {
112 case MP_RAILWAY:
113 c = Company::GetIfValid(GetTileOwner(tile));
114 if (c != NULL) {
115 uint pieces = 1;
116 if (IsPlainRail(tile)) {
117 TrackBits bits = GetTrackBits(tile);
118 pieces = CountBits(bits);
119 if (TracksOverlap(bits)) pieces *= pieces;
121 c->infrastructure.rail[GetRailType(tile)] += pieces;
123 if (HasSignals(tile)) c->infrastructure.signal += CountBits(GetPresentSignals(tile));
125 break;
127 case MP_ROAD: {
128 if (IsLevelCrossing(tile)) {
129 c = Company::GetIfValid(GetTileOwner(tile));
130 if (c != NULL) c->infrastructure.rail[GetRailType(tile)] += LEVELCROSSING_TRACKBIT_FACTOR;
133 /* Iterate all present road types as each can have a different owner. */
134 RoadType rt;
135 FOR_EACH_SET_ROADTYPE(rt, GetRoadTypes(tile)) {
136 c = Company::GetIfValid(IsRoadDepot(tile) ? GetTileOwner(tile) : GetRoadOwner(tile, rt));
137 /* A level crossings and depots have two road bits. */
138 if (c != NULL) c->infrastructure.road[rt] += IsNormalRoad(tile) ? CountBits(GetRoadBits(tile, rt)) : 2;
140 break;
143 case MP_STATION:
144 c = Company::GetIfValid(GetTileOwner(tile));
145 if (c != NULL && GetStationType(tile) != STATION_AIRPORT && !IsBuoy(tile)) c->infrastructure.station++;
147 switch (GetStationType(tile)) {
148 case STATION_RAIL:
149 case STATION_WAYPOINT:
150 if (c != NULL && !IsStationTileBlocked(tile)) c->infrastructure.rail[GetRailType(tile)]++;
151 break;
153 case STATION_BUS:
154 case STATION_TRUCK: {
155 /* Iterate all present road types as each can have a different owner. */
156 RoadType rt;
157 FOR_EACH_SET_ROADTYPE(rt, GetRoadTypes(tile)) {
158 c = Company::GetIfValid(GetRoadOwner(tile, rt));
159 if (c != NULL) c->infrastructure.road[rt] += 2; // A road stop has two road bits.
161 break;
164 case STATION_DOCK:
165 case STATION_BUOY:
166 if (GetWaterClass(tile) == WATER_CLASS_CANAL) {
167 if (c != NULL) c->infrastructure.water++;
169 break;
171 default:
172 break;
174 break;
176 case MP_WATER:
177 if (IsShipDepot(tile) || IsLock(tile)) {
178 c = Company::GetIfValid(GetTileOwner(tile));
179 if (c != NULL) {
180 if (IsShipDepot(tile)) c->infrastructure.water += LOCK_DEPOT_TILE_FACTOR;
181 if (IsLock(tile) && GetLockPart(tile) == LOCK_PART_MIDDLE) {
182 /* The middle tile specifies the owner of the lock. */
183 c->infrastructure.water += 3 * LOCK_DEPOT_TILE_FACTOR; // the middle tile specifies the owner of the
184 break; // do not count the middle tile as canal
188 FALLTHROUGH;
190 case MP_OBJECT:
191 if (GetWaterClass(tile) == WATER_CLASS_CANAL) {
192 c = Company::GetIfValid(GetTileOwner(tile));
193 if (c != NULL) c->infrastructure.water++;
195 break;
197 case MP_TUNNELBRIDGE: {
198 /* Only count the tunnel/bridge if we're on the northern end tile. */
199 TileIndex other_end = GetOtherTunnelBridgeEnd(tile);
200 if (tile < other_end) {
201 /* Count each tunnel/bridge TUNNELBRIDGE_TRACKBIT_FACTOR times to simulate
202 * the higher structural maintenance needs, and don't forget the end tiles. */
203 uint len = (GetTunnelBridgeLength(tile, other_end) + 2) * TUNNELBRIDGE_TRACKBIT_FACTOR;
205 switch (GetTunnelBridgeTransportType(tile)) {
206 case TRANSPORT_RAIL:
207 c = Company::GetIfValid(GetTileOwner(tile));
208 if (c != NULL) c->infrastructure.rail[GetRailType(tile)] += len;
209 break;
211 case TRANSPORT_ROAD: {
212 /* Iterate all present road types as each can have a different owner. */
213 RoadType rt;
214 FOR_EACH_SET_ROADTYPE(rt, GetRoadTypes(tile)) {
215 c = Company::GetIfValid(GetRoadOwner(tile, rt));
216 if (c != NULL) c->infrastructure.road[rt] += len * 2; // A full diagonal road has two road bits.
218 break;
221 case TRANSPORT_WATER:
222 c = Company::GetIfValid(GetTileOwner(tile));
223 if (c != NULL) c->infrastructure.water += len;
224 break;
226 default:
227 break;
230 break;
233 default:
234 break;
241 /* Save/load of companies */
242 static const SaveLoad _company_desc[] = {
243 SLE_VAR(CompanyProperties, name_2, SLE_UINT32),
244 SLE_VAR(CompanyProperties, name_1, SLE_STRINGID),
245 SLE_CONDSTR(CompanyProperties, name, SLE_STR | SLF_ALLOW_CONTROL, 0, 84, SL_MAX_VERSION),
247 SLE_VAR(CompanyProperties, president_name_1, SLE_STRINGID),
248 SLE_VAR(CompanyProperties, president_name_2, SLE_UINT32),
249 SLE_CONDSTR(CompanyProperties, president_name, SLE_STR | SLF_ALLOW_CONTROL, 0, 84, SL_MAX_VERSION),
251 SLE_VAR(CompanyProperties, face, SLE_UINT32),
253 /* money was changed to a 64 bit field in savegame version 1. */
254 SLE_CONDVAR(CompanyProperties, money, SLE_VAR_I64 | SLE_FILE_I32, 0, 0),
255 SLE_CONDVAR(CompanyProperties, money, SLE_INT64, 1, SL_MAX_VERSION),
257 SLE_CONDVAR(CompanyProperties, current_loan, SLE_VAR_I64 | SLE_FILE_I32, 0, 64),
258 SLE_CONDVAR(CompanyProperties, current_loan, SLE_INT64, 65, SL_MAX_VERSION),
260 SLE_VAR(CompanyProperties, colour, SLE_UINT8),
261 SLE_VAR(CompanyProperties, money_fraction, SLE_UINT8),
262 SLE_CONDVAR(CompanyProperties, avail_railtypes, SLE_VAR_I32 | SLE_FILE_I8, 0, 57),
263 SLE_VAR(CompanyProperties, block_preview, SLE_UINT8),
265 SLE_CONDNULL(2, 0, 93), ///< cargo_types
266 SLE_CONDNULL(4, 94, 169), ///< cargo_types
267 SLE_CONDVAR(CompanyProperties, location_of_HQ, SLE_FILE_U16 | SLE_VAR_U32, 0, 5),
268 SLE_CONDVAR(CompanyProperties, location_of_HQ, SLE_UINT32, 6, SL_MAX_VERSION),
269 SLE_CONDVAR(CompanyProperties, last_build_coordinate, SLE_FILE_U16 | SLE_VAR_U32, 0, 5),
270 SLE_CONDVAR(CompanyProperties, last_build_coordinate, SLE_UINT32, 6, SL_MAX_VERSION),
271 SLE_CONDVAR(CompanyProperties, inaugurated_year, SLE_FILE_U8 | SLE_VAR_I32, 0, 30),
272 SLE_CONDVAR(CompanyProperties, inaugurated_year, SLE_INT32, 31, SL_MAX_VERSION),
274 SLE_ARR(CompanyProperties, share_owners, SLE_UINT8, 4),
276 SLE_VAR(CompanyProperties, num_valid_stat_ent, SLE_UINT8),
278 SLE_VAR(CompanyProperties, months_of_bankruptcy, SLE_UINT8),
279 SLE_CONDVAR(CompanyProperties, bankrupt_asked, SLE_FILE_U8 | SLE_VAR_U16, 0, 103),
280 SLE_CONDVAR(CompanyProperties, bankrupt_asked, SLE_UINT16, 104, SL_MAX_VERSION),
281 SLE_VAR(CompanyProperties, bankrupt_timeout, SLE_INT16),
282 SLE_CONDVAR(CompanyProperties, bankrupt_value, SLE_VAR_I64 | SLE_FILE_I32, 0, 64),
283 SLE_CONDVAR(CompanyProperties, bankrupt_value, SLE_INT64, 65, SL_MAX_VERSION),
285 /* yearly expenses was changed to 64-bit in savegame version 2. */
286 SLE_CONDARR(CompanyProperties, yearly_expenses, SLE_FILE_I32 | SLE_VAR_I64, 3 * 13, 0, 1),
287 SLE_CONDARR(CompanyProperties, yearly_expenses, SLE_INT64, 3 * 13, 2, SL_MAX_VERSION),
289 SLE_CONDVAR(CompanyProperties, is_ai, SLE_BOOL, 2, SL_MAX_VERSION),
290 SLE_CONDNULL(1, 107, 111), ///< is_noai
291 SLE_CONDNULL(1, 4, 99),
293 SLE_CONDVAR(CompanyProperties, terraform_limit, SLE_UINT32, 156, SL_MAX_VERSION),
294 SLE_CONDVAR(CompanyProperties, clear_limit, SLE_UINT32, 156, SL_MAX_VERSION),
295 SLE_CONDVAR(CompanyProperties, tree_limit, SLE_UINT32, 175, SL_MAX_VERSION),
297 SLE_END()
300 static const SaveLoad _company_settings_desc[] = {
301 /* Engine renewal settings */
302 SLE_CONDNULL(512, 16, 18),
303 SLE_CONDREF(Company, engine_renew_list, REF_ENGINE_RENEWS, 19, SL_MAX_VERSION),
304 SLE_CONDVAR(Company, settings.engine_renew, SLE_BOOL, 16, SL_MAX_VERSION),
305 SLE_CONDVAR(Company, settings.engine_renew_months, SLE_INT16, 16, SL_MAX_VERSION),
306 SLE_CONDVAR(Company, settings.engine_renew_money, SLE_UINT32, 16, SL_MAX_VERSION),
307 SLE_CONDVAR(Company, settings.renew_keep_length, SLE_BOOL, 2, SL_MAX_VERSION),
309 /* Default vehicle settings */
310 SLE_CONDVAR(Company, settings.vehicle.servint_ispercent, SLE_BOOL, 120, SL_MAX_VERSION),
311 SLE_CONDVAR(Company, settings.vehicle.servint_trains, SLE_UINT16, 120, SL_MAX_VERSION),
312 SLE_CONDVAR(Company, settings.vehicle.servint_roadveh, SLE_UINT16, 120, SL_MAX_VERSION),
313 SLE_CONDVAR(Company, settings.vehicle.servint_aircraft, SLE_UINT16, 120, SL_MAX_VERSION),
314 SLE_CONDVAR(Company, settings.vehicle.servint_ships, SLE_UINT16, 120, SL_MAX_VERSION),
316 SLE_CONDNULL(63, 2, 143), // old reserved space
318 SLE_END()
321 static const SaveLoad _company_settings_skip_desc[] = {
322 /* Engine renewal settings */
323 SLE_CONDNULL(512, 16, 18),
324 SLE_CONDNULL(2, 19, 68), // engine_renew_list
325 SLE_CONDNULL(4, 69, SL_MAX_VERSION), // engine_renew_list
326 SLE_CONDNULL(1, 16, SL_MAX_VERSION), // settings.engine_renew
327 SLE_CONDNULL(2, 16, SL_MAX_VERSION), // settings.engine_renew_months
328 SLE_CONDNULL(4, 16, SL_MAX_VERSION), // settings.engine_renew_money
329 SLE_CONDNULL(1, 2, SL_MAX_VERSION), // settings.renew_keep_length
331 /* Default vehicle settings */
332 SLE_CONDNULL(1, 120, SL_MAX_VERSION), // settings.vehicle.servint_ispercent
333 SLE_CONDNULL(2, 120, SL_MAX_VERSION), // settings.vehicle.servint_trains
334 SLE_CONDNULL(2, 120, SL_MAX_VERSION), // settings.vehicle.servint_roadveh
335 SLE_CONDNULL(2, 120, SL_MAX_VERSION), // settings.vehicle.servint_aircraft
336 SLE_CONDNULL(2, 120, SL_MAX_VERSION), // settings.vehicle.servint_ships
338 SLE_CONDNULL(63, 2, 143), // old reserved space
340 SLE_END()
343 static const SaveLoad _company_economy_desc[] = {
344 /* these were changed to 64-bit in savegame format 2 */
345 SLE_CONDVAR(CompanyEconomyEntry, income, SLE_FILE_I32 | SLE_VAR_I64, 0, 1),
346 SLE_CONDVAR(CompanyEconomyEntry, income, SLE_INT64, 2, SL_MAX_VERSION),
347 SLE_CONDVAR(CompanyEconomyEntry, expenses, SLE_FILE_I32 | SLE_VAR_I64, 0, 1),
348 SLE_CONDVAR(CompanyEconomyEntry, expenses, SLE_INT64, 2, SL_MAX_VERSION),
349 SLE_CONDVAR(CompanyEconomyEntry, company_value, SLE_FILE_I32 | SLE_VAR_I64, 0, 1),
350 SLE_CONDVAR(CompanyEconomyEntry, company_value, SLE_INT64, 2, SL_MAX_VERSION),
352 SLE_CONDVAR(CompanyEconomyEntry, delivered_cargo[NUM_CARGO - 1], SLE_INT32, 0, 169),
353 SLE_CONDARR(CompanyEconomyEntry, delivered_cargo, SLE_UINT32, NUM_CARGO, 170, SL_MAX_VERSION),
354 SLE_VAR(CompanyEconomyEntry, performance_history, SLE_INT32),
356 SLE_END()
359 /* We do need to read this single value, as the bigger it gets, the more data is stored */
360 struct CompanyOldAI {
361 uint8 num_build_rec;
364 static const SaveLoad _company_ai_desc[] = {
365 SLE_CONDNULL(2, 0, 106),
366 SLE_CONDNULL(2, 0, 12),
367 SLE_CONDNULL(4, 13, 106),
368 SLE_CONDNULL(8, 0, 106),
369 SLE_CONDVAR(CompanyOldAI, num_build_rec, SLE_UINT8, 0, 106),
370 SLE_CONDNULL(3, 0, 106),
372 SLE_CONDNULL(2, 0, 5),
373 SLE_CONDNULL(4, 6, 106),
374 SLE_CONDNULL(2, 0, 5),
375 SLE_CONDNULL(4, 6, 106),
376 SLE_CONDNULL(2, 0, 106),
378 SLE_CONDNULL(2, 0, 5),
379 SLE_CONDNULL(4, 6, 106),
380 SLE_CONDNULL(2, 0, 5),
381 SLE_CONDNULL(4, 6, 106),
382 SLE_CONDNULL(2, 0, 106),
384 SLE_CONDNULL(2, 0, 68),
385 SLE_CONDNULL(4, 69, 106),
387 SLE_CONDNULL(18, 0, 106),
388 SLE_CONDNULL(20, 0, 106),
389 SLE_CONDNULL(32, 0, 106),
391 SLE_CONDNULL(64, 2, 106),
392 SLE_END()
395 static const SaveLoad _company_ai_build_rec_desc[] = {
396 SLE_CONDNULL(2, 0, 5),
397 SLE_CONDNULL(4, 6, 106),
398 SLE_CONDNULL(2, 0, 5),
399 SLE_CONDNULL(4, 6, 106),
400 SLE_CONDNULL(8, 0, 106),
401 SLE_END()
404 static const SaveLoad _company_livery_desc[] = {
405 SLE_CONDVAR(Livery, in_use, SLE_BOOL, 34, SL_MAX_VERSION),
406 SLE_CONDVAR(Livery, colour1, SLE_UINT8, 34, SL_MAX_VERSION),
407 SLE_CONDVAR(Livery, colour2, SLE_UINT8, 34, SL_MAX_VERSION),
408 SLE_END()
411 static void SaveLoad_PLYR_common(Company *c, CompanyProperties *cprops)
413 int i;
415 SlObject(cprops, _company_desc);
416 if (c != NULL) {
417 SlObject(c, _company_settings_desc);
418 } else {
419 char nothing;
420 SlObject(&nothing, _company_settings_skip_desc);
423 /* Keep backwards compatible for savegames, so load the old AI block */
424 if (IsSavegameVersionBefore(107) && cprops->is_ai) {
425 CompanyOldAI old_ai;
426 char nothing;
428 SlObject(&old_ai, _company_ai_desc);
429 for (i = 0; i != old_ai.num_build_rec; i++) {
430 SlObject(&nothing, _company_ai_build_rec_desc);
434 /* Write economy */
435 SlObject(&cprops->cur_economy, _company_economy_desc);
437 /* Write old economy entries. */
438 if (cprops->num_valid_stat_ent > lengthof(cprops->old_economy)) SlErrorCorrupt("Too many old economy entries");
439 for (i = 0; i < cprops->num_valid_stat_ent; i++) {
440 SlObject(&cprops->old_economy[i], _company_economy_desc);
443 /* Write each livery entry. */
444 int num_liveries = IsSavegameVersionBefore(63) ? LS_END - 4 : (IsSavegameVersionBefore(85) ? LS_END - 2: LS_END);
445 if (c != NULL) {
446 for (i = 0; i < num_liveries; i++) {
447 SlObject(&c->livery[i], _company_livery_desc);
450 if (num_liveries < LS_END) {
451 /* We want to insert some liveries somewhere in between. This means some have to be moved. */
452 memmove(&c->livery[LS_FREIGHT_WAGON], &c->livery[LS_PASSENGER_WAGON_MONORAIL], (LS_END - LS_FREIGHT_WAGON) * sizeof(c->livery[0]));
453 c->livery[LS_PASSENGER_WAGON_MONORAIL] = c->livery[LS_MONORAIL];
454 c->livery[LS_PASSENGER_WAGON_MAGLEV] = c->livery[LS_MAGLEV];
457 if (num_liveries == LS_END - 4) {
458 /* Copy bus/truck liveries over to trams */
459 c->livery[LS_PASSENGER_TRAM] = c->livery[LS_BUS];
460 c->livery[LS_FREIGHT_TRAM] = c->livery[LS_TRUCK];
462 } else {
463 /* Skip liveries */
464 Livery dummy_livery;
465 for (i = 0; i < num_liveries; i++) {
466 SlObject(&dummy_livery, _company_livery_desc);
471 static void SaveLoad_PLYR(Company *c)
473 SaveLoad_PLYR_common(c, c);
476 static void Save_PLYR()
478 Company *c;
479 FOR_ALL_COMPANIES(c) {
480 SlSetArrayIndex(c->index);
481 SlAutolength((AutolengthProc*)SaveLoad_PLYR, c);
485 static void Load_PLYR()
487 int index;
488 while ((index = SlIterateArray()) != -1) {
489 Company *c = new (index) Company();
490 SaveLoad_PLYR(c);
491 _company_colours[index] = (Colours)c->colour;
495 static void Check_PLYR()
497 int index;
498 while ((index = SlIterateArray()) != -1) {
499 CompanyProperties *cprops = new CompanyProperties();
500 memset(cprops, 0, sizeof(*cprops));
501 SaveLoad_PLYR_common(NULL, cprops);
503 /* We do not load old custom names */
504 if (IsSavegameVersionBefore(84)) {
505 if (GetStringTab(cprops->name_1) == TEXT_TAB_OLD_CUSTOM) {
506 cprops->name_1 = STR_GAME_SAVELOAD_NOT_AVAILABLE;
509 if (GetStringTab(cprops->president_name_1) == TEXT_TAB_OLD_CUSTOM) {
510 cprops->president_name_1 = STR_GAME_SAVELOAD_NOT_AVAILABLE;
514 if (cprops->name == NULL && !IsInsideMM(cprops->name_1, SPECSTR_COMPANY_NAME_START, SPECSTR_COMPANY_NAME_LAST + 1) &&
515 cprops->name_1 != STR_GAME_SAVELOAD_NOT_AVAILABLE && cprops->name_1 != STR_SV_UNNAMED &&
516 cprops->name_1 != SPECSTR_ANDCO_NAME && cprops->name_1 != SPECSTR_PRESIDENT_NAME &&
517 cprops->name_1 != SPECSTR_SILLY_NAME) {
518 cprops->name_1 = STR_GAME_SAVELOAD_NOT_AVAILABLE;
521 if (!_load_check_data.companies.Insert(index, cprops)) delete cprops;
525 static void Ptrs_PLYR()
527 Company *c;
528 FOR_ALL_COMPANIES(c) {
529 SlObject(c, _company_settings_desc);
534 extern const ChunkHandler _company_chunk_handlers[] = {
535 { 'PLYR', Save_PLYR, Load_PLYR, Ptrs_PLYR, Check_PLYR, CH_ARRAY | CH_LAST},