company_sl.cpp

Go to the documentation of this file.
00001 /* $Id: company_sl.cpp 23826 2012-01-20 20:18:19Z rubidium $ */
00002 
00003 /*
00004  * This file is part of OpenTTD.
00005  * 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.
00006  * 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.
00007  * 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/>.
00008  */
00009 
00012 #include "../stdafx.h"
00013 #include "../company_func.h"
00014 #include "../company_manager_face.h"
00015 #include "../fios.h"
00016 #include "../tunnelbridge_map.h"
00017 #include "../tunnelbridge.h"
00018 #include "../station_base.h"
00019 
00020 #include "saveload.h"
00021 
00022 #include "table/strings.h"
00023 
00042 CompanyManagerFace ConvertFromOldCompanyManagerFace(uint32 face)
00043 {
00044   CompanyManagerFace cmf = 0;
00045   GenderEthnicity ge = GE_WM;
00046 
00047   if (HasBit(face, 31)) SetBit(ge, GENDER_FEMALE);
00048   if (HasBit(face, 27) && (HasBit(face, 26) == HasBit(face, 19))) SetBit(ge, ETHNICITY_BLACK);
00049 
00050   SetCompanyManagerFaceBits(cmf, CMFV_GEN_ETHN,    ge, ge);
00051   SetCompanyManagerFaceBits(cmf, CMFV_HAS_GLASSES, ge, GB(face, 28, 3) <= 1);
00052   SetCompanyManagerFaceBits(cmf, CMFV_EYE_COLOUR,  ge, HasBit(ge, ETHNICITY_BLACK) ? 0 : ClampU(GB(face, 20, 3), 5, 7) - 5);
00053   SetCompanyManagerFaceBits(cmf, CMFV_CHIN,        ge, ScaleCompanyManagerFaceValue(CMFV_CHIN,     ge, GB(face,  4, 2)));
00054   SetCompanyManagerFaceBits(cmf, CMFV_EYEBROWS,    ge, ScaleCompanyManagerFaceValue(CMFV_EYEBROWS, ge, GB(face,  6, 4)));
00055   SetCompanyManagerFaceBits(cmf, CMFV_HAIR,        ge, ScaleCompanyManagerFaceValue(CMFV_HAIR,     ge, GB(face, 16, 4)));
00056   SetCompanyManagerFaceBits(cmf, CMFV_JACKET,      ge, ScaleCompanyManagerFaceValue(CMFV_JACKET,   ge, GB(face, 20, 2)));
00057   SetCompanyManagerFaceBits(cmf, CMFV_COLLAR,      ge, ScaleCompanyManagerFaceValue(CMFV_COLLAR,   ge, GB(face, 22, 2)));
00058   SetCompanyManagerFaceBits(cmf, CMFV_GLASSES,     ge, GB(face, 28, 1));
00059 
00060   uint lips = GB(face, 10, 4);
00061   if (!HasBit(ge, GENDER_FEMALE) && lips < 4) {
00062     SetCompanyManagerFaceBits(cmf, CMFV_HAS_MOUSTACHE, ge, true);
00063     SetCompanyManagerFaceBits(cmf, CMFV_MOUSTACHE,     ge, max(lips, 1U) - 1);
00064   } else {
00065     if (!HasBit(ge, GENDER_FEMALE)) {
00066       lips = lips * 15 / 16;
00067       lips -= 3;
00068       if (HasBit(ge, ETHNICITY_BLACK) && lips > 8) lips = 0;
00069     } else {
00070       lips = ScaleCompanyManagerFaceValue(CMFV_LIPS, ge, lips);
00071     }
00072     SetCompanyManagerFaceBits(cmf, CMFV_LIPS, ge, lips);
00073 
00074     uint nose = GB(face, 13, 3);
00075     if (ge == GE_WF) {
00076       nose = (nose * 3 >> 3) * 3 >> 2; // There is 'hole' in the nose sprites for females
00077     } else {
00078       nose = ScaleCompanyManagerFaceValue(CMFV_NOSE, ge, nose);
00079     }
00080     SetCompanyManagerFaceBits(cmf, CMFV_NOSE, ge, nose);
00081   }
00082 
00083   uint tie_earring = GB(face, 24, 4);
00084   if (!HasBit(ge, GENDER_FEMALE) || tie_earring < 3) { // Not all females have an earring
00085     if (HasBit(ge, GENDER_FEMALE)) SetCompanyManagerFaceBits(cmf, CMFV_HAS_TIE_EARRING, ge, true);
00086     SetCompanyManagerFaceBits(cmf, CMFV_TIE_EARRING, ge, HasBit(ge, GENDER_FEMALE) ? tie_earring : ScaleCompanyManagerFaceValue(CMFV_TIE_EARRING, ge, tie_earring / 2));
00087   }
00088 
00089   return cmf;
00090 }
00091 
00093 void AfterLoadCompanyStats()
00094 {
00095   /* Reset infrastructure statistics to zero. */
00096   Company *c;
00097   FOR_ALL_COMPANIES(c) MemSetT(&c->infrastructure, 0);
00098 
00099   /* Collect airport count. */
00100   Station *st;
00101   FOR_ALL_STATIONS(st) {
00102     if ((st->facilities & FACIL_AIRPORT) && Company::IsValidID(st->owner)) {
00103       Company::Get(st->owner)->infrastructure.airport++;
00104     }
00105   }
00106 
00107   for (TileIndex tile = 0; tile < MapSize(); tile++) {
00108     switch (GetTileType(tile)) {
00109       case MP_RAILWAY:
00110         c = Company::GetIfValid(GetTileOwner(tile));
00111         if (c != NULL) {
00112           uint pieces = 1;
00113           if (IsPlainRail(tile)) {
00114             TrackBits bits = GetTrackBits(tile);
00115             pieces = CountBits(bits);
00116             if (TracksOverlap(bits)) pieces *= pieces;
00117           }
00118           c->infrastructure.rail[GetRailType(tile)] += pieces;
00119 
00120           if (HasSignals(tile)) c->infrastructure.signal += CountBits(GetPresentSignals(tile));
00121         }
00122         break;
00123 
00124       case MP_ROAD: {
00125         if (IsLevelCrossing(tile)) {
00126           c = Company::GetIfValid(GetTileOwner(tile));
00127           if (c != NULL) c->infrastructure.rail[GetRailType(tile)] += LEVELCROSSING_TRACKBIT_FACTOR;
00128         }
00129 
00130         /* Iterate all present road types as each can have a different owner. */
00131         RoadType rt;
00132         FOR_EACH_SET_ROADTYPE(rt, GetRoadTypes(tile)) {
00133           c = Company::GetIfValid(IsRoadDepot(tile) ? GetTileOwner(tile) : GetRoadOwner(tile, rt));
00134           /* A level crossings and depots have two road bits. */
00135           if (c != NULL) c->infrastructure.road[rt] += IsNormalRoad(tile) ? CountBits(GetRoadBits(tile, rt)) : 2;
00136         }
00137         break;
00138       }
00139 
00140       case MP_STATION:
00141         c = Company::GetIfValid(GetTileOwner(tile));
00142         if (c != NULL && GetStationType(tile) != STATION_AIRPORT) c->infrastructure.station++;
00143 
00144         switch (GetStationType(tile)) {
00145           case STATION_RAIL:
00146           case STATION_WAYPOINT:
00147             if (c != NULL && !IsStationTileBlocked(tile)) c->infrastructure.rail[GetRailType(tile)]++;
00148             break;
00149 
00150           case STATION_BUS:
00151           case STATION_TRUCK: {
00152             /* Iterate all present road types as each can have a different owner. */
00153             RoadType rt;
00154             FOR_EACH_SET_ROADTYPE(rt, GetRoadTypes(tile)) {
00155               c = Company::GetIfValid(GetRoadOwner(tile, rt));
00156               if (c != NULL) c->infrastructure.road[rt] += 2; // A road stop has two road bits.
00157             }
00158             break;
00159           }
00160 
00161           case STATION_DOCK:
00162           case STATION_BUOY:
00163             if (GetWaterClass(tile) == WATER_CLASS_CANAL) {
00164               if (c != NULL) c->infrastructure.water++;
00165             }
00166             break;
00167 
00168           default:
00169             break;
00170         }
00171         break;
00172 
00173       case MP_WATER:
00174         if (IsShipDepot(tile) || IsLock(tile)) {
00175           c = Company::GetIfValid(GetTileOwner(tile));
00176           if (c != NULL) c->infrastructure.water += LOCK_DEPOT_TILE_FACTOR;
00177         }
00178         /* FALL THROUGH */
00179 
00180       case MP_OBJECT:
00181         if (GetWaterClass(tile) == WATER_CLASS_CANAL) {
00182           c = Company::GetIfValid(GetTileOwner(tile));
00183           if (c != NULL) c->infrastructure.water++;
00184         }
00185         break;
00186 
00187       case MP_TUNNELBRIDGE: {
00188         /* Only count the tunnel/bridge if we're on the northern end tile. */
00189         TileIndex other_end = GetOtherTunnelBridgeEnd(tile);
00190         if (tile < other_end) {
00191           /* Count each tunnel/bridge TUNNELBRIDGE_TRACKBIT_FACTOR times to simulate
00192            * the higher structural maintenance needs, and don't forget the end tiles. */
00193           uint len = (GetTunnelBridgeLength(tile, other_end) + 2) * TUNNELBRIDGE_TRACKBIT_FACTOR;
00194 
00195           switch (GetTunnelBridgeTransportType(tile)) {
00196             case TRANSPORT_RAIL:
00197               c = Company::GetIfValid(GetTileOwner(tile));
00198               if (c != NULL) c->infrastructure.rail[GetRailType(tile)] += len;
00199               break;
00200 
00201             case TRANSPORT_ROAD: {
00202               /* Iterate all present road types as each can have a different owner. */
00203               RoadType rt;
00204               FOR_EACH_SET_ROADTYPE(rt, GetRoadTypes(tile)) {
00205                 c = Company::GetIfValid(GetRoadOwner(tile, rt));
00206                 if (c != NULL) c->infrastructure.road[rt] += len * 2; // A full diagonal road has two road bits.
00207               }
00208               break;
00209             }
00210 
00211             case TRANSPORT_WATER:
00212               c = Company::GetIfValid(GetTileOwner(tile));
00213               if (c != NULL) c->infrastructure.water += len;
00214               break;
00215 
00216             default:
00217               break;
00218           }
00219         }
00220         break;
00221       }
00222 
00223       default:
00224         break;
00225     }
00226   }
00227 }
00228 
00229 
00230 
00231 /* Save/load of companies */
00232 static const SaveLoad _company_desc[] = {
00233       SLE_VAR(CompanyProperties, name_2,          SLE_UINT32),
00234       SLE_VAR(CompanyProperties, name_1,          SLE_STRINGID),
00235   SLE_CONDSTR(CompanyProperties, name,            SLE_STR | SLF_ALLOW_CONTROL, 0, 84, SL_MAX_VERSION),
00236 
00237       SLE_VAR(CompanyProperties, president_name_1, SLE_UINT16),
00238       SLE_VAR(CompanyProperties, president_name_2, SLE_UINT32),
00239   SLE_CONDSTR(CompanyProperties, president_name,  SLE_STR | SLF_ALLOW_CONTROL, 0, 84, SL_MAX_VERSION),
00240 
00241       SLE_VAR(CompanyProperties, face,            SLE_UINT32),
00242 
00243   /* money was changed to a 64 bit field in savegame version 1. */
00244   SLE_CONDVAR(CompanyProperties, money,                 SLE_VAR_I64 | SLE_FILE_I32,  0, 0),
00245   SLE_CONDVAR(CompanyProperties, money,                 SLE_INT64,                   1, SL_MAX_VERSION),
00246 
00247   SLE_CONDVAR(CompanyProperties, current_loan,          SLE_VAR_I64 | SLE_FILE_I32,  0, 64),
00248   SLE_CONDVAR(CompanyProperties, current_loan,          SLE_INT64,                  65, SL_MAX_VERSION),
00249 
00250       SLE_VAR(CompanyProperties, colour,                SLE_UINT8),
00251       SLE_VAR(CompanyProperties, money_fraction,        SLE_UINT8),
00252   SLE_CONDVAR(CompanyProperties, avail_railtypes,       SLE_UINT8,                   0, 57),
00253       SLE_VAR(CompanyProperties, block_preview,         SLE_UINT8),
00254 
00255   SLE_CONDNULL(2,  0,  93), 
00256   SLE_CONDNULL(4, 94, 169), 
00257   SLE_CONDVAR(CompanyProperties, location_of_HQ,        SLE_FILE_U16 | SLE_VAR_U32,  0,  5),
00258   SLE_CONDVAR(CompanyProperties, location_of_HQ,        SLE_UINT32,                  6, SL_MAX_VERSION),
00259   SLE_CONDVAR(CompanyProperties, last_build_coordinate, SLE_FILE_U16 | SLE_VAR_U32,  0,  5),
00260   SLE_CONDVAR(CompanyProperties, last_build_coordinate, SLE_UINT32,                  6, SL_MAX_VERSION),
00261   SLE_CONDVAR(CompanyProperties, inaugurated_year,      SLE_FILE_U8  | SLE_VAR_I32,  0, 30),
00262   SLE_CONDVAR(CompanyProperties, inaugurated_year,      SLE_INT32,                  31, SL_MAX_VERSION),
00263 
00264       SLE_ARR(CompanyProperties, share_owners,          SLE_UINT8, 4),
00265 
00266       SLE_VAR(CompanyProperties, num_valid_stat_ent,    SLE_UINT8),
00267 
00268       SLE_VAR(CompanyProperties, quarters_of_bankruptcy,SLE_UINT8),
00269   SLE_CONDVAR(CompanyProperties, bankrupt_asked,        SLE_FILE_U8  | SLE_VAR_U16,  0, 103),
00270   SLE_CONDVAR(CompanyProperties, bankrupt_asked,        SLE_UINT16,                104, SL_MAX_VERSION),
00271       SLE_VAR(CompanyProperties, bankrupt_timeout,      SLE_INT16),
00272   SLE_CONDVAR(CompanyProperties, bankrupt_value,        SLE_VAR_I64 | SLE_FILE_I32,  0, 64),
00273   SLE_CONDVAR(CompanyProperties, bankrupt_value,        SLE_INT64,                  65, SL_MAX_VERSION),
00274 
00275   /* yearly expenses was changed to 64-bit in savegame version 2. */
00276   SLE_CONDARR(CompanyProperties, yearly_expenses,       SLE_FILE_I32 | SLE_VAR_I64, 3 * 13, 0, 1),
00277   SLE_CONDARR(CompanyProperties, yearly_expenses,       SLE_INT64, 3 * 13,                  2, SL_MAX_VERSION),
00278 
00279   SLE_CONDVAR(CompanyProperties, is_ai,                 SLE_BOOL,                    2, SL_MAX_VERSION),
00280   SLE_CONDNULL(1, 107, 111), 
00281   SLE_CONDNULL(1, 4, 99),
00282 
00283   SLE_CONDVAR(CompanyProperties, terraform_limit,       SLE_UINT32,                156, SL_MAX_VERSION),
00284   SLE_CONDVAR(CompanyProperties, clear_limit,           SLE_UINT32,                156, SL_MAX_VERSION),
00285 
00286   SLE_END()
00287 };
00288 
00289 static const SaveLoad _company_settings_desc[] = {
00290   /* Engine renewal settings */
00291   SLE_CONDNULL(512, 16, 18),
00292   SLE_CONDREF(Company, engine_renew_list,            REF_ENGINE_RENEWS,   19, SL_MAX_VERSION),
00293   SLE_CONDVAR(Company, settings.engine_renew,        SLE_BOOL,            16, SL_MAX_VERSION),
00294   SLE_CONDVAR(Company, settings.engine_renew_months, SLE_INT16,           16, SL_MAX_VERSION),
00295   SLE_CONDVAR(Company, settings.engine_renew_money,  SLE_UINT32,          16, SL_MAX_VERSION),
00296   SLE_CONDVAR(Company, settings.renew_keep_length,   SLE_BOOL,             2, SL_MAX_VERSION),
00297 
00298   /* Default vehicle settings */
00299   SLE_CONDVAR(Company, settings.vehicle.servint_ispercent,   SLE_BOOL,     120, SL_MAX_VERSION),
00300   SLE_CONDVAR(Company, settings.vehicle.servint_trains,    SLE_UINT16,     120, SL_MAX_VERSION),
00301   SLE_CONDVAR(Company, settings.vehicle.servint_roadveh,   SLE_UINT16,     120, SL_MAX_VERSION),
00302   SLE_CONDVAR(Company, settings.vehicle.servint_aircraft,  SLE_UINT16,     120, SL_MAX_VERSION),
00303   SLE_CONDVAR(Company, settings.vehicle.servint_ships,     SLE_UINT16,     120, SL_MAX_VERSION),
00304 
00305   SLE_CONDNULL(63, 2, 143), // old reserved space
00306 
00307   SLE_END()
00308 };
00309 
00310 static const SaveLoad _company_settings_skip_desc[] = {
00311   /* Engine renewal settings */
00312   SLE_CONDNULL(512, 16, 18),
00313   SLE_CONDNULL(2, 19, 68),                 // engine_renew_list
00314   SLE_CONDNULL(4, 69, SL_MAX_VERSION),     // engine_renew_list
00315   SLE_CONDNULL(1, 16, SL_MAX_VERSION),     // settings.engine_renew
00316   SLE_CONDNULL(2, 16, SL_MAX_VERSION),     // settings.engine_renew_months
00317   SLE_CONDNULL(4, 16, SL_MAX_VERSION),     // settings.engine_renew_money
00318   SLE_CONDNULL(1,  2, SL_MAX_VERSION),     // settings.renew_keep_length
00319 
00320   /* Default vehicle settings */
00321   SLE_CONDNULL(1, 120, SL_MAX_VERSION),    // settings.vehicle.servint_ispercent
00322   SLE_CONDNULL(2, 120, SL_MAX_VERSION),    // settings.vehicle.servint_trains
00323   SLE_CONDNULL(2, 120, SL_MAX_VERSION),    // settings.vehicle.servint_roadveh
00324   SLE_CONDNULL(2, 120, SL_MAX_VERSION),    // settings.vehicle.servint_aircraft
00325   SLE_CONDNULL(2, 120, SL_MAX_VERSION),    // settings.vehicle.servint_ships
00326 
00327   SLE_CONDNULL(63, 2, 143), // old reserved space
00328 
00329   SLE_END()
00330 };
00331 
00332 static const SaveLoad _company_economy_desc[] = {
00333   /* these were changed to 64-bit in savegame format 2 */
00334   SLE_CONDVAR(CompanyEconomyEntry, income,              SLE_FILE_I32 | SLE_VAR_I64, 0, 1),
00335   SLE_CONDVAR(CompanyEconomyEntry, income,              SLE_INT64,                  2, SL_MAX_VERSION),
00336   SLE_CONDVAR(CompanyEconomyEntry, expenses,            SLE_FILE_I32 | SLE_VAR_I64, 0, 1),
00337   SLE_CONDVAR(CompanyEconomyEntry, expenses,            SLE_INT64,                  2, SL_MAX_VERSION),
00338   SLE_CONDVAR(CompanyEconomyEntry, company_value,       SLE_FILE_I32 | SLE_VAR_I64, 0, 1),
00339   SLE_CONDVAR(CompanyEconomyEntry, company_value,       SLE_INT64,                  2, SL_MAX_VERSION),
00340 
00341   SLE_CONDVAR(CompanyEconomyEntry, delivered_cargo[NUM_CARGO - 1], SLE_INT32,       0, 169),
00342   SLE_CONDARR(CompanyEconomyEntry, delivered_cargo,     SLE_UINT32, NUM_CARGO,    170, SL_MAX_VERSION),
00343       SLE_VAR(CompanyEconomyEntry, performance_history, SLE_INT32),
00344 
00345   SLE_END()
00346 };
00347 
00348 /* We do need to read this single value, as the bigger it gets, the more data is stored */
00349 struct CompanyOldAI {
00350   uint8 num_build_rec;
00351 };
00352 
00353 static const SaveLoad _company_ai_desc[] = {
00354   SLE_CONDNULL(2,  0, 106),
00355   SLE_CONDNULL(2,  0, 12),
00356   SLE_CONDNULL(4, 13, 106),
00357   SLE_CONDNULL(8,  0, 106),
00358    SLE_CONDVAR(CompanyOldAI, num_build_rec, SLE_UINT8, 0, 106),
00359   SLE_CONDNULL(3,  0, 106),
00360 
00361   SLE_CONDNULL(2,  0,  5),
00362   SLE_CONDNULL(4,  6, 106),
00363   SLE_CONDNULL(2,  0,  5),
00364   SLE_CONDNULL(4,  6, 106),
00365   SLE_CONDNULL(2,  0, 106),
00366 
00367   SLE_CONDNULL(2,  0,  5),
00368   SLE_CONDNULL(4,  6, 106),
00369   SLE_CONDNULL(2,  0,  5),
00370   SLE_CONDNULL(4,  6, 106),
00371   SLE_CONDNULL(2,  0, 106),
00372 
00373   SLE_CONDNULL(2,  0, 68),
00374   SLE_CONDNULL(4,  69, 106),
00375 
00376   SLE_CONDNULL(18, 0, 106),
00377   SLE_CONDNULL(20, 0, 106),
00378   SLE_CONDNULL(32, 0, 106),
00379 
00380   SLE_CONDNULL(64, 2, 106),
00381   SLE_END()
00382 };
00383 
00384 static const SaveLoad _company_ai_build_rec_desc[] = {
00385   SLE_CONDNULL(2, 0, 5),
00386   SLE_CONDNULL(4, 6, 106),
00387   SLE_CONDNULL(2, 0, 5),
00388   SLE_CONDNULL(4, 6, 106),
00389   SLE_CONDNULL(8, 0, 106),
00390   SLE_END()
00391 };
00392 
00393 static const SaveLoad _company_livery_desc[] = {
00394   SLE_CONDVAR(Livery, in_use,  SLE_BOOL,  34, SL_MAX_VERSION),
00395   SLE_CONDVAR(Livery, colour1, SLE_UINT8, 34, SL_MAX_VERSION),
00396   SLE_CONDVAR(Livery, colour2, SLE_UINT8, 34, SL_MAX_VERSION),
00397   SLE_END()
00398 };
00399 
00400 static void SaveLoad_PLYR_common(Company *c, CompanyProperties *cprops)
00401 {
00402   int i;
00403 
00404   SlObject(cprops, _company_desc);
00405   if (c != NULL) {
00406     SlObject(c, _company_settings_desc);
00407   } else {
00408     char nothing;
00409     SlObject(&nothing, _company_settings_skip_desc);
00410   }
00411 
00412   /* Keep backwards compatible for savegames, so load the old AI block */
00413   if (IsSavegameVersionBefore(107) && cprops->is_ai) {
00414     CompanyOldAI old_ai;
00415     char nothing;
00416 
00417     SlObject(&old_ai, _company_ai_desc);
00418     for (i = 0; i != old_ai.num_build_rec; i++) {
00419       SlObject(&nothing, _company_ai_build_rec_desc);
00420     }
00421   }
00422 
00423   /* Write economy */
00424   SlObject(&cprops->cur_economy, _company_economy_desc);
00425 
00426   /* Write old economy entries. */
00427   if (cprops->num_valid_stat_ent > lengthof(cprops->old_economy)) SlErrorCorrupt("Too many old economy entries");
00428   for (i = 0; i < cprops->num_valid_stat_ent; i++) {
00429     SlObject(&cprops->old_economy[i], _company_economy_desc);
00430   }
00431 
00432   /* Write each livery entry. */
00433   int num_liveries = IsSavegameVersionBefore(63) ? LS_END - 4 : (IsSavegameVersionBefore(85) ? LS_END - 2: LS_END);
00434   if (c != NULL) {
00435     for (i = 0; i < num_liveries; i++) {
00436       SlObject(&c->livery[i], _company_livery_desc);
00437     }
00438 
00439     if (num_liveries < LS_END) {
00440       /* We want to insert some liveries somewhere in between. This means some have to be moved. */
00441       memmove(&c->livery[LS_FREIGHT_WAGON], &c->livery[LS_PASSENGER_WAGON_MONORAIL], (LS_END - LS_FREIGHT_WAGON) * sizeof(c->livery[0]));
00442       c->livery[LS_PASSENGER_WAGON_MONORAIL] = c->livery[LS_MONORAIL];
00443       c->livery[LS_PASSENGER_WAGON_MAGLEV]   = c->livery[LS_MAGLEV];
00444     }
00445 
00446     if (num_liveries == LS_END - 4) {
00447       /* Copy bus/truck liveries over to trams */
00448       c->livery[LS_PASSENGER_TRAM] = c->livery[LS_BUS];
00449       c->livery[LS_FREIGHT_TRAM]   = c->livery[LS_TRUCK];
00450     }
00451   } else {
00452     /* Skip liveries */
00453     Livery dummy_livery;
00454     for (i = 0; i < num_liveries; i++) {
00455       SlObject(&dummy_livery, _company_livery_desc);
00456     }
00457   }
00458 }
00459 
00460 static void SaveLoad_PLYR(Company *c)
00461 {
00462   SaveLoad_PLYR_common(c, c);
00463 }
00464 
00465 static void Save_PLYR()
00466 {
00467   Company *c;
00468   FOR_ALL_COMPANIES(c) {
00469     SlSetArrayIndex(c->index);
00470     SlAutolength((AutolengthProc*)SaveLoad_PLYR, c);
00471   }
00472 }
00473 
00474 static void Load_PLYR()
00475 {
00476   int index;
00477   while ((index = SlIterateArray()) != -1) {
00478     Company *c = new (index) Company();
00479     SaveLoad_PLYR(c);
00480     _company_colours[index] = (Colours)c->colour;
00481   }
00482 }
00483 
00484 static void Check_PLYR()
00485 {
00486   int index;
00487   while ((index = SlIterateArray()) != -1) {
00488     CompanyProperties *cprops = new CompanyProperties();
00489     memset(cprops, 0, sizeof(*cprops));
00490     SaveLoad_PLYR_common(NULL, cprops);
00491 
00492     /* We do not load old custom names */
00493     if (IsSavegameVersionBefore(84)) {
00494       if (GB(cprops->name_1, 11, 5) == 15) {
00495         cprops->name_1 = STR_GAME_SAVELOAD_NOT_AVAILABLE;
00496       }
00497 
00498       if (GB(cprops->president_name_1, 11, 5) == 15) {
00499         cprops->president_name_1 = STR_GAME_SAVELOAD_NOT_AVAILABLE;
00500       }
00501     }
00502 
00503     if (cprops->name == NULL && !IsInsideMM(cprops->name_1, SPECSTR_COMPANY_NAME_START, SPECSTR_COMPANY_NAME_LAST + 1) &&
00504         cprops->name_1 != STR_GAME_SAVELOAD_NOT_AVAILABLE && cprops->name_1 != STR_SV_UNNAMED &&
00505         cprops->name_1 != SPECSTR_ANDCO_NAME && cprops->name_1 != SPECSTR_PRESIDENT_NAME &&
00506         cprops->name_1 != SPECSTR_SILLY_NAME) {
00507       cprops->name_1 = STR_GAME_SAVELOAD_NOT_AVAILABLE;
00508     }
00509 
00510     if (!_load_check_data.companies.Insert(index, cprops)) delete cprops;
00511   }
00512 }
00513 
00514 static void Ptrs_PLYR()
00515 {
00516   Company *c;
00517   FOR_ALL_COMPANIES(c) {
00518     SlObject(c, _company_settings_desc);
00519   }
00520 }
00521 
00522 
00523 extern const ChunkHandler _company_chunk_handlers[] = {
00524   { 'PLYR', Save_PLYR, Load_PLYR, Ptrs_PLYR, Check_PLYR, CH_ARRAY | CH_LAST},
00525 };