ai_industrytype.cpp

Go to the documentation of this file.
00001 /* $Id: ai_industrytype.cpp 21888 2011-01-22 10:33:16Z 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 "ai_industrytype.hpp"
00014 #include "ai_map.hpp"
00015 #include "ai_error.hpp"
00016 #include "../../strings_func.h"
00017 #include "../../industry.h"
00018 #include "../../newgrf_industries.h"
00019 #include "../../core/random_func.hpp"
00020 
00021 /* static */ bool AIIndustryType::IsValidIndustryType(IndustryType industry_type)
00022 {
00023   if (industry_type >= NUM_INDUSTRYTYPES) return false;
00024 
00025   return ::GetIndustrySpec(industry_type)->enabled;
00026 }
00027 
00028 /* static */ bool AIIndustryType::IsRawIndustry(IndustryType industry_type)
00029 {
00030   if (!IsValidIndustryType(industry_type)) return false;
00031 
00032   return ::GetIndustrySpec(industry_type)->IsRawIndustry();
00033 }
00034 
00035 /* static */ bool AIIndustryType::ProductionCanIncrease(IndustryType industry_type)
00036 {
00037   if (!IsValidIndustryType(industry_type)) return false;
00038 
00039   if (_settings_game.game_creation.landscape != LT_TEMPERATE) return true;
00040   return (::GetIndustrySpec(industry_type)->behaviour & INDUSTRYBEH_DONT_INCR_PROD) == 0;
00041 }
00042 
00043 /* static */ Money AIIndustryType::GetConstructionCost(IndustryType industry_type)
00044 {
00045   if (!IsValidIndustryType(industry_type)) return -1;
00046   if (::GetIndustrySpec(industry_type)->IsRawIndustry() && _settings_game.construction.raw_industry_construction == 0) return -1;
00047 
00048   return ::GetIndustrySpec(industry_type)->GetConstructionCost();
00049 }
00050 
00051 /* static */ char *AIIndustryType::GetName(IndustryType industry_type)
00052 {
00053   if (!IsValidIndustryType(industry_type)) return NULL;
00054   static const int len = 64;
00055   char *industrytype_name = MallocT<char>(len);
00056 
00057   ::GetString(industrytype_name, ::GetIndustrySpec(industry_type)->name, &industrytype_name[len - 1]);
00058 
00059   return industrytype_name;
00060 }
00061 
00062 /* static */ AIList *AIIndustryType::GetProducedCargo(IndustryType industry_type)
00063 {
00064   if (!IsValidIndustryType(industry_type)) return NULL;
00065 
00066   const IndustrySpec *ins = ::GetIndustrySpec(industry_type);
00067 
00068   AIList *list = new AIList();
00069   for (size_t i = 0; i < lengthof(ins->produced_cargo); i++) {
00070     if (ins->produced_cargo[i] != CT_INVALID) list->AddItem(ins->produced_cargo[i]);
00071   }
00072 
00073   return list;
00074 }
00075 
00076 /* static */ AIList *AIIndustryType::GetAcceptedCargo(IndustryType industry_type)
00077 {
00078   if (!IsValidIndustryType(industry_type)) return NULL;
00079 
00080   const IndustrySpec *ins = ::GetIndustrySpec(industry_type);
00081 
00082   AIList *list = new AIList();
00083   for (size_t i = 0; i < lengthof(ins->accepts_cargo); i++) {
00084     if (ins->accepts_cargo[i] != CT_INVALID) list->AddItem(ins->accepts_cargo[i]);
00085   }
00086 
00087   return list;
00088 }
00089 
00090 /* static */ bool AIIndustryType::CanBuildIndustry(IndustryType industry_type)
00091 {
00092   if (!IsValidIndustryType(industry_type)) return false;
00093 
00094   if (!::CheckIfCallBackAllowsAvailability(industry_type, IACT_USERCREATION)) return false;
00095   if (!::GetIndustrySpec(industry_type)->IsRawIndustry()) return true;
00096 
00097   /* raw_industry_construction == 1 means "Build as other industries" */
00098   return _settings_game.construction.raw_industry_construction == 1;
00099 }
00100 
00101 /* static */ bool AIIndustryType::CanProspectIndustry(IndustryType industry_type)
00102 {
00103   if (!IsValidIndustryType(industry_type)) return false;
00104 
00105   if (!::GetIndustrySpec(industry_type)->IsRawIndustry()) return false;
00106   if (!::CheckIfCallBackAllowsAvailability(industry_type, IACT_USERCREATION)) return false;
00107 
00108   /* raw_industry_construction == 2 means "prospect" */
00109   return _settings_game.construction.raw_industry_construction == 2;
00110 }
00111 
00112 /* static */ bool AIIndustryType::BuildIndustry(IndustryType industry_type, TileIndex tile)
00113 {
00114   EnforcePrecondition(false, CanBuildIndustry(industry_type));
00115   EnforcePrecondition(false, AIMap::IsValidTile(tile));
00116 
00117   uint32 seed = ::InteractiveRandom();
00118   return AIObject::DoCommand(tile, (::InteractiveRandomRange(::GetIndustrySpec(industry_type)->num_table) << 8) | industry_type, seed, CMD_BUILD_INDUSTRY);
00119 }
00120 
00121 /* static */ bool AIIndustryType::ProspectIndustry(IndustryType industry_type)
00122 {
00123   EnforcePrecondition(false, CanProspectIndustry(industry_type));
00124 
00125   uint32 seed = ::InteractiveRandom();
00126   return AIObject::DoCommand(0, industry_type, seed, CMD_BUILD_INDUSTRY);
00127 }
00128 
00129 /* static */ bool AIIndustryType::IsBuiltOnWater(IndustryType industry_type)
00130 {
00131   if (!IsValidIndustryType(industry_type)) return false;
00132 
00133   return (::GetIndustrySpec(industry_type)->behaviour & INDUSTRYBEH_BUILT_ONWATER) != 0;
00134 }
00135 
00136 /* static */ bool AIIndustryType::HasHeliport(IndustryType industry_type)
00137 {
00138   if (!IsValidIndustryType(industry_type)) return false;
00139 
00140   return (::GetIndustrySpec(industry_type)->behaviour & INDUSTRYBEH_AI_AIRSHIP_ROUTES) != 0;
00141 }
00142 
00143 /* static */ bool AIIndustryType::HasDock(IndustryType industry_type)
00144 {
00145   if (!IsValidIndustryType(industry_type)) return false;
00146 
00147   return (::GetIndustrySpec(industry_type)->behaviour & INDUSTRYBEH_AI_AIRSHIP_ROUTES) != 0;
00148 }

Generated on Fri Mar 4 21:36:56 2011 for OpenTTD by  doxygen 1.6.1