bin/game/compat_1.3.nut

   1 /*
   2  * This file is part of OpenTTD.
   3  * 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.
   4  * 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.
   5  * 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/>.
   6  */
   7
   8 GSLog.Info("1.3 API compatibility in effect.");
   9
  10 GSTown._SetGrowthRate <- GSTown.SetGrowthRate;
  11 GSTown.SetGrowthRate <- function(town_id, days_between_town_growth)
  12 {
  13         /* Growth rate 0 caused resetting the custom growth rate. While this was undocumented, it was used nevertheless (ofc). */
  14         if (days_between_town_growth == 0) days_between_town_growth = GSTown.TOWN_GROWTH_NORMAL;
  15         return GSTown._SetGrowthRate(town_id, days_between_town_growth);
  16 }
  17
  18 /* 1.5 adds a game element reference to the news. */
  19 GSNews._Create <- GSNews.Create;
  20 GSNews.Create <- function(type, text, company)
  21 {
  22     return GSNews._Create(type, text, company, GSNews.NR_NONE, 0);
  23 }
  24
  25 /* 1.9 adds a vehicle type parameter. */
  26 GSBridge._GetName <- GSBridge.GetName;
  27 GSBridge.GetName <- function(bridge_id)
  28 {
  29         return GSBridge._GetName(bridge_id, GSVehicle.VT_RAIL);
  30 }
  31
  32 /* 1.11 adds a tile parameter. */
  33 GSCompany._ChangeBankBalance <- GSCompany.ChangeBankBalance;
  34 GSCompany.ChangeBankBalance <- function(company, delta, expenses_type)
  35 {
  36         return GSCompany._ChangeBankBalance(company, delta, expenses_type, GSMap.TILE_INVALID);
  37 }