ScriptConditions.cpp 105 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871
  1. /*
  2. ** Command & Conquer Generals(tm)
  3. ** Copyright 2025 Electronic Arts Inc.
  4. **
  5. ** This program is free software: you can redistribute it and/or modify
  6. ** it under the terms of the GNU General Public License as published by
  7. ** the Free Software Foundation, either version 3 of the License, or
  8. ** (at your option) any later version.
  9. **
  10. ** This program is distributed in the hope that it will be useful,
  11. ** but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  13. ** GNU General Public License for more details.
  14. **
  15. ** You should have received a copy of the GNU General Public License
  16. ** along with this program. If not, see <http://www.gnu.org/licenses/>.
  17. */
  18. ////////////////////////////////////////////////////////////////////////////////
  19. // //
  20. // (c) 2001-2003 Electronic Arts Inc. //
  21. // //
  22. ////////////////////////////////////////////////////////////////////////////////
  23. // FILE: ScriptConditions.cpp /////////////////////////////////////////////////////////////////////////
  24. // The game scripting conditions. Evaluates conditions.
  25. // Author: John Ahlquist, Nov. 2001
  26. ///////////////////////////////////////////////////////////////////////////////////////////////////
  27. #include "PreRTS.h" // This must go first in EVERY cpp file int the GameEngine
  28. #include "Common/GameEngine.h"
  29. #include "Common/MapObject.h"
  30. #include "Common/PlayerList.h"
  31. #include "Common/Player.h"
  32. #include "Common/SpecialPower.h"
  33. #include "Common/ThingTemplate.h"
  34. #include "Common/ThingFactory.h"
  35. #include "Common/Team.h"
  36. #include "Common/Player.h"
  37. #include "GameClient/ControlBar.h"
  38. #include "GameClient/Drawable.h"
  39. #include "GameClient/GameClient.h"
  40. #include "GameClient/InGameUI.h"
  41. #include "GameClient/View.h"
  42. #include "GameLogic/GameLogic.h"
  43. #include "GameLogic/Module/AIUpdate.h"
  44. #include "GameLogic/Module/BodyModule.h"
  45. #include "GameLogic/Module/ContainModule.h"
  46. #include "GameLogic/Module/SpecialPowerModule.h"
  47. #include "GameLogic/Module/SupplyWarehouseDockUpdate.h"
  48. #include "GameLogic/Object.h"
  49. #include "GameLogic/ObjectTypes.h"
  50. #include "GameLogic/PartitionManager.h"
  51. #include "GameLogic/PolygonTrigger.h"
  52. #include "GameLogic/ScriptConditions.h"
  53. #include "GameLogic/ScriptEngine.h"
  54. #include "GameLogic/Scripts.h"
  55. #include "GameLogic/VictoryConditions.h"
  56. #ifdef _INTERNAL
  57. // for occasional debugging...
  58. //#pragma optimize("", off)
  59. //#pragma MESSAGE("************************************** WARNING, optimization disabled for debugging purposes")
  60. #endif
  61. class ObjectTypesTemp
  62. {
  63. public:
  64. ObjectTypes* m_types;
  65. ObjectTypesTemp() : m_types(NULL)
  66. {
  67. m_types = newInstance(ObjectTypes);
  68. }
  69. ~ObjectTypesTemp()
  70. {
  71. if (m_types)
  72. m_types->deleteInstance();
  73. }
  74. };
  75. // STATICS ////////////////////////////////////////////////////////////////////////////////////////
  76. namespace rts
  77. {
  78. template<typename T>
  79. T sum(std::vector<T>& vecOfValues )
  80. {
  81. T retVal = 0;
  82. std::vector<T>::iterator it;
  83. for (it = vecOfValues.begin(); it != vecOfValues.end(); ++it) {
  84. retVal += (*it);
  85. }
  86. return retVal;
  87. }
  88. };
  89. // GLOBALS ////////////////////////////////////////////////////////////////////////////////////////
  90. ScriptConditionsInterface *TheScriptConditions = NULL;
  91. class TransportStatus : public MemoryPoolObject
  92. {
  93. MEMORY_POOL_GLUE_WITH_USERLOOKUP_CREATE(TransportStatus, "TransportStatus")
  94. public:
  95. TransportStatus * m_nextStatus;
  96. ObjectID m_objID;
  97. UnsignedInt m_frameNumber;
  98. Int m_unitCount;
  99. public:
  100. TransportStatus() : m_objID(INVALID_ID), m_frameNumber(0), m_unitCount(0), m_nextStatus(NULL) {}
  101. //~TransportStatus();
  102. };
  103. //-------------------------------------------------------------------------------------------------
  104. TransportStatus::~TransportStatus()
  105. {
  106. if (m_nextStatus)
  107. m_nextStatus->deleteInstance();
  108. }
  109. //-------------------------------------------------------------------------------------------------
  110. static TransportStatus *s_transportStatuses;
  111. //-------------------------------------------------------------------------------------------------
  112. //-------------------------------------------------------------------------------------------------
  113. ScriptConditions::ScriptConditions()
  114. {
  115. } // end ScriptConditions
  116. //-------------------------------------------------------------------------------------------------
  117. //-------------------------------------------------------------------------------------------------
  118. ScriptConditions::~ScriptConditions()
  119. {
  120. reset(); // just in case.
  121. } // end ~ScriptConditions
  122. //-------------------------------------------------------------------------------------------------
  123. /** Init */
  124. //-------------------------------------------------------------------------------------------------
  125. void ScriptConditions::init( void )
  126. {
  127. reset();
  128. } // end init
  129. //-------------------------------------------------------------------------------------------------
  130. /** Reset */
  131. //-------------------------------------------------------------------------------------------------
  132. void ScriptConditions::reset( void )
  133. {
  134. s_transportStatuses->deleteInstance();
  135. s_transportStatuses = NULL;
  136. // Empty for now. jba.
  137. } // end reset
  138. //-------------------------------------------------------------------------------------------------
  139. /** Update */
  140. //-------------------------------------------------------------------------------------------------
  141. void ScriptConditions::update( void )
  142. {
  143. // Empty for now. jba
  144. } // end update
  145. //-------------------------------------------------------------------------------------------------
  146. /** Finds the player by the name in the parameter, and if found caches the player mask in the
  147. parameter so we don't have to do a name search. May return null if the player doesn't exist.*/
  148. //-------------------------------------------------------------------------------------------------
  149. Player *ScriptConditions::playerFromParam(Parameter *pSideParm)
  150. {
  151. DEBUG_ASSERTCRASH(Parameter::SIDE == pSideParm->getParameterType(), ("Wrong parameter type."));
  152. Player *pPlayer=NULL;
  153. UnsignedInt mask = (UnsignedInt)pSideParm->getInt();
  154. if (mask) {
  155. pPlayer = ThePlayerList->getPlayerFromMask(mask);
  156. } else {
  157. pPlayer = TheScriptEngine->getPlayerFromAsciiString(pSideParm->getString());
  158. if (pPlayer) {
  159. // Enemy player can change dynamically, so don't cache the player mask. jba.
  160. if (pSideParm->getString()!=THIS_PLAYER_ENEMY) {
  161. mask = pPlayer->getPlayerMask();
  162. }
  163. } else {
  164. mask = 0xFFFF0000;
  165. }
  166. pSideParm->friend_setInt((Int)mask);
  167. }
  168. DEBUG_ASSERTCRASH(pPlayer, ("Couldn't find player %s", pSideParm->getString().str()));
  169. return pPlayer;
  170. }
  171. //-------------------------------------------------------------------------------------------------
  172. /** objectTypesFromParam */
  173. //-------------------------------------------------------------------------------------------------
  174. void ScriptConditions::objectTypesFromParam(Parameter *pTypeParm, ObjectTypes *outObjectTypes)
  175. {
  176. if (!(pTypeParm && outObjectTypes)) {
  177. return;
  178. }
  179. AsciiString str = pTypeParm->getString();
  180. if (str.isEmpty()) {
  181. return;
  182. }
  183. ObjectTypes *types = TheScriptEngine->getObjectTypes(str);
  184. if (!types) {
  185. (*outObjectTypes).addObjectType(str);
  186. } else {
  187. (*outObjectTypes) = (*types);
  188. }
  189. }
  190. //-------------------------------------------------------------------------------------------------
  191. /** evaluateAllDestroyed */
  192. //-------------------------------------------------------------------------------------------------
  193. Bool ScriptConditions::evaluateAllDestroyed(Parameter *pSideParm )
  194. {
  195. Player *pPlayer = playerFromParam(pSideParm);
  196. if (pPlayer) {
  197. return (!pPlayer->hasAnyObjects());
  198. }
  199. return true; // Non existent player is all destroyed. :)
  200. }
  201. //-------------------------------------------------------------------------------------------------
  202. /** evaluateAllBuildFacilitiesDestroyed */
  203. //-------------------------------------------------------------------------------------------------
  204. Bool ScriptConditions::evaluateAllBuildFacilitiesDestroyed(Parameter *pSideParm )
  205. {
  206. Player *pPlayer = playerFromParam(pSideParm);
  207. if (pPlayer) {
  208. return (!pPlayer->hasAnyBuildFacility());
  209. }
  210. return true; // Non existent player is all destroyed. :)
  211. }
  212. //-------------------------------------------------------------------------------------------------
  213. /** evaluateIsDestroyed */
  214. //-------------------------------------------------------------------------------------------------
  215. Bool ScriptConditions::evaluateIsDestroyed(Parameter *pTeamParm)
  216. {
  217. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  218. // The team is the team based on the name, and the calling team (if any) and the team that
  219. // is being considered for the condition. jba. :)
  220. if (theTeam) {
  221. return (!theTeam->hasAnyObjects());
  222. }
  223. return false; // Non existent team is not destroyed.
  224. }
  225. //-------------------------------------------------------------------------------------------------
  226. /** evaluateBridgeBroken */
  227. //-------------------------------------------------------------------------------------------------
  228. Bool ScriptConditions::evaluateBridgeBroken(Parameter *pBridgeParm)
  229. {
  230. if (!TheTerrainLogic->anyBridgesDamageStatesChanged()) {
  231. // Don't bother checking if no bridges changed damage states.
  232. return false;
  233. }
  234. Object *theBridge = TheScriptEngine->getUnitNamed( pBridgeParm->getString() );
  235. if (theBridge) {
  236. return (TheTerrainLogic->isBridgeBroken(theBridge));
  237. }
  238. return false;
  239. }
  240. //-------------------------------------------------------------------------------------------------
  241. /** evaluateBridgeRepaired */
  242. //-------------------------------------------------------------------------------------------------
  243. Bool ScriptConditions::evaluateBridgeRepaired(Parameter *pBridgeParm)
  244. {
  245. if (!TheTerrainLogic->anyBridgesDamageStatesChanged()) {
  246. // Don't bother checking if no bridges changed damage states.
  247. return false;
  248. }
  249. Object *theBridge = TheScriptEngine->getUnitNamed( pBridgeParm->getString() );
  250. if (theBridge) {
  251. return (TheTerrainLogic->isBridgeRepaired(theBridge));
  252. }
  253. return false;
  254. }
  255. //-------------------------------------------------------------------------------------------------
  256. /** evaluateNamedUnitDestroyed */
  257. //-------------------------------------------------------------------------------------------------
  258. Bool ScriptConditions::evaluateNamedUnitDestroyed(Parameter *pUnitParm)
  259. {
  260. Object *theUnit = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  261. if (theUnit)
  262. {
  263. return theUnit->isEffectivelyDead();
  264. }
  265. if (TheScriptEngine->didUnitExist(pUnitParm->getString())) {
  266. return true;
  267. }
  268. return false; // Non existent unit is not destroyed.
  269. }
  270. //-------------------------------------------------------------------------------------------------
  271. /** evaluateNamedUnitExists */
  272. //-------------------------------------------------------------------------------------------------
  273. Bool ScriptConditions::evaluateNamedUnitExists(Parameter *pUnitParm)
  274. {
  275. Object *theUnit = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  276. if (theUnit)
  277. {
  278. return !theUnit->isEffectivelyDead();
  279. }
  280. return false; // Doesn't exist.
  281. }
  282. //-------------------------------------------------------------------------------------------------
  283. /** evaluateNamedUnitDying */
  284. //-------------------------------------------------------------------------------------------------
  285. Bool ScriptConditions::evaluateNamedUnitDying(Parameter *pUnitParm)
  286. {
  287. Object *theUnit = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  288. if (theUnit)
  289. {
  290. return theUnit->isEffectivelyDead();
  291. }
  292. if (TheScriptEngine->didUnitExist(pUnitParm->getString()))
  293. {
  294. return false; // already totally killed
  295. }
  296. return false; // Non existent unit is not dying.
  297. }
  298. //-------------------------------------------------------------------------------------------------
  299. /** evaluateNamedUnitTotallyDead */
  300. //-------------------------------------------------------------------------------------------------
  301. Bool ScriptConditions::evaluateNamedUnitTotallyDead(Parameter *pUnitParm)
  302. {
  303. Object *theUnit = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  304. if (theUnit) {
  305. return false; // if the unit still exists, it isn't totally dead.
  306. }
  307. if (TheScriptEngine->didUnitExist(pUnitParm->getString())) {
  308. // Did exist, now it doesnt. So it is really, really dead.
  309. return true; // totally killed
  310. }
  311. return false; // Non existent unit is not dead.
  312. }
  313. //-------------------------------------------------------------------------------------------------
  314. /** evaluateHasUnits */
  315. //-------------------------------------------------------------------------------------------------
  316. Bool ScriptConditions::evaluateHasUnits(Parameter *pTeamParm)
  317. {
  318. AsciiString desiredTeamName = pTeamParm->getString();
  319. // If they are calling a <this team> condition, do it.
  320. if (desiredTeamName == THIS_TEAM) {
  321. Team *theTeam = TheScriptEngine->getTeamNamed( desiredTeamName );
  322. // The team is the team based on the name, and the calling team (if any) and the team that
  323. // is being considered for the condition. jba. :)
  324. if (theTeam) {
  325. return (theTeam->hasAnyUnits());
  326. }
  327. return false; // Non existent team has no units.
  328. }
  329. Team *thisTeam = TheScriptEngine->getTeamNamed(THIS_TEAM);
  330. if (thisTeam && thisTeam->getName()==desiredTeamName) {
  331. return thisTeam->hasAnyUnits();
  332. }
  333. // It isn't THIS_TEAM, and doesn't match the THIS_TEAM, so check if any team with this name
  334. // has units.
  335. TeamPrototype *pProto = NULL;
  336. pProto = TheTeamFactory->findTeamPrototype(desiredTeamName);
  337. if (pProto) {
  338. // We have a team referred to in the conditions. Iterate over the instances of the team,
  339. // applying the script conditions (and possibly actions) to each instance of the team.
  340. for (DLINK_ITERATOR<Team> iter = pProto->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  341. if (iter.cur()->hasAnyUnits()) {
  342. return true;
  343. }
  344. }
  345. }
  346. return false; // Non existent team has no units.
  347. }
  348. //-------------------------------------------------------------------------------------------------
  349. /** evaluateUnitsEntered */
  350. //-------------------------------------------------------------------------------------------------
  351. Bool ScriptConditions::evaluateTeamInsideAreaPartially(Parameter *pTeamParm, Parameter *pTriggerAreaParm, Parameter *pTypeParm)
  352. {
  353. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  354. // The team is the team based on the name, and the calling team (if any) and the team that
  355. // is being considered for the condition. jba. :)
  356. AsciiString triggerName = pTriggerAreaParm->getString();
  357. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerAreaParm->getString());
  358. if (pTrig == NULL) return false;
  359. if (theTeam) {
  360. return (theTeam->someInsideSomeOutside(pTrig, (UnsignedInt) pTypeParm->getInt()) ||
  361. theTeam->allInside(pTrig, (UnsignedInt) pTypeParm->getInt()));
  362. }
  363. return false; // Non existent team isn't in trigger area. :)
  364. }
  365. //-------------------------------------------------------------------------------------------------
  366. /** evaluateNamedInsideArea */
  367. //-------------------------------------------------------------------------------------------------
  368. Bool ScriptConditions::evaluateNamedInsideArea(Parameter *pUnitParm, Parameter *pTriggerAreaParm )
  369. {
  370. Object *theObj = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  371. if (!theObj) {
  372. return false;
  373. }
  374. AsciiString triggerName = pTriggerAreaParm->getString();
  375. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerAreaParm->getString());
  376. if (pTrig == NULL) return false;
  377. if (theObj) {
  378. Coord3D pCoord = *theObj->getPosition();
  379. ICoord3D iCoord;
  380. iCoord.x = pCoord.x; iCoord.y = pCoord.y; iCoord.z = pCoord.z;
  381. return pTrig->pointInTrigger(iCoord);
  382. }
  383. return false; // Non existent team isn't in trigger area. :)
  384. }
  385. //-------------------------------------------------------------------------------------------------
  386. /** evaluatePlayerHasUnitTypeInArea */
  387. //-------------------------------------------------------------------------------------------------
  388. Bool ScriptConditions::evaluatePlayerHasUnitTypeInArea(Condition *pCondition, Parameter *pPlayerParm, Parameter *pComparisonParm, Parameter *pCountParm, Parameter *pTypeParm, Parameter *pTriggerParm )
  389. {
  390. AsciiString triggerName = pTriggerParm->getString();
  391. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  392. if (pTrig == NULL) return false;
  393. Player* pPlayer = playerFromParam(pPlayerParm);
  394. if (!pPlayer) {
  395. return false;
  396. }
  397. Player::PlayerTeamList::const_iterator it;
  398. Bool anyChanges = false;
  399. if (pCondition->getCustomData() == 0) anyChanges = true;
  400. for (it = pPlayer->getPlayerTeams()->begin(); it != pPlayer->getPlayerTeams()->end(); ++it) {
  401. if (anyChanges) break;
  402. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  403. if (anyChanges) break;
  404. Team *team = iter.cur();
  405. if (!team) {
  406. continue;
  407. }
  408. if (team->didEnterOrExit()) {
  409. anyChanges = true;
  410. }
  411. }
  412. }
  413. if (TheScriptEngine->getFrameObjectCountChanged()+1 >= TheGameLogic->getFrame()) {
  414. anyChanges = true; // Objects were added/deleted last frame, so count could have changed. jba.
  415. }
  416. if (!anyChanges) {
  417. if (pCondition->getCustomData()==-1) return false;
  418. if (pCondition->getCustomData()==1) return true;
  419. }
  420. ObjectTypesTemp types;
  421. objectTypesFromParam(pTypeParm, types.m_types);
  422. Int count = 0;
  423. for (it = pPlayer->getPlayerTeams()->begin(); it != pPlayer->getPlayerTeams()->end(); ++it) {
  424. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  425. Team *team = iter.cur();
  426. if (!team) {
  427. continue;
  428. }
  429. for (DLINK_ITERATOR<Object> iter = team->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  430. Object *pObj = iter.cur();
  431. if (!pObj) {
  432. continue;
  433. }
  434. if (types.m_types->isInSet(pObj->getTemplate())) {
  435. if (pObj->isInside(pTrig)) {
  436. //
  437. // dead objects will not be considered, except crates ... they are "dead" cause
  438. // they have no body and health, but are a class of object we want to
  439. // trigger this stuff
  440. //
  441. if (!(pObj->isEffectivelyDead() || pObj->isKindOf(KINDOF_INERT)) || pObj->isKindOf( KINDOF_CRATE ) ) {
  442. count++;
  443. }
  444. }
  445. }
  446. }
  447. }
  448. }
  449. Bool comparison = false;
  450. switch (pComparisonParm->getInt())
  451. {
  452. case Parameter::LESS_THAN : comparison = (count < pCountParm->getInt()); break;
  453. case Parameter::LESS_EQUAL : comparison = (count <= pCountParm->getInt()); break;
  454. case Parameter::EQUAL : comparison = (count == pCountParm->getInt()); break;
  455. case Parameter::GREATER_EQUAL : comparison = (count >= pCountParm->getInt()); break;
  456. case Parameter::GREATER : comparison = (count > pCountParm->getInt()); break;
  457. case Parameter::NOT_EQUAL : comparison = (count != pCountParm->getInt()); break;
  458. }
  459. pCondition->setCustomData(-1); // false.
  460. if (comparison) {
  461. pCondition->setCustomData(1); // true.
  462. }
  463. return comparison;
  464. }
  465. //-------------------------------------------------------------------------------------------------
  466. /** evaluatePlayerHasUnitKindInArea */
  467. //-------------------------------------------------------------------------------------------------
  468. Bool ScriptConditions::evaluatePlayerHasUnitKindInArea(Condition *pCondition, Parameter *pPlayerParm, Parameter *pComparisonParm, Parameter *pCountParm, Parameter *pKindParm, Parameter *pTriggerParm )
  469. {
  470. AsciiString triggerName = pTriggerParm->getString();
  471. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  472. if (pTrig == NULL) return false;
  473. KindOfType kind = (KindOfType)pKindParm->getInt();
  474. Player* pPlayer = playerFromParam(pPlayerParm);
  475. if (!pPlayer) {
  476. return false;
  477. }
  478. Player::PlayerTeamList::const_iterator it;
  479. Bool anyChanges = false;
  480. if (pCondition->getCustomData() == 0) anyChanges = true;
  481. for (it = pPlayer->getPlayerTeams()->begin(); it != pPlayer->getPlayerTeams()->end(); ++it) {
  482. if (anyChanges) break;
  483. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  484. if (anyChanges) break;
  485. Team *team = iter.cur();
  486. if (!team) {
  487. continue;
  488. }
  489. if (team->didEnterOrExit()) {
  490. anyChanges = true;
  491. }
  492. }
  493. }
  494. if (TheScriptEngine->getFrameObjectCountChanged()+1 >= TheGameLogic->getFrame()) {
  495. anyChanges = true; // Objects were added/deleted last frame, so count could have changed. jba.
  496. }
  497. if (!anyChanges) {
  498. if (pCondition->getCustomData()==-1) return false;
  499. if (pCondition->getCustomData()==1) return true;
  500. }
  501. Int count = 0;
  502. for (it = pPlayer->getPlayerTeams()->begin(); it != pPlayer->getPlayerTeams()->end(); ++it) {
  503. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  504. Team *team = iter.cur();
  505. if (!team) {
  506. continue;
  507. }
  508. for (DLINK_ITERATOR<Object> iter = team->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  509. Object *pObj = iter.cur();
  510. if (!pObj) {
  511. continue;
  512. }
  513. if (pObj->isKindOf(kind)) {
  514. if (pObj->isInside(pTrig)) {
  515. if (!(pObj->isEffectivelyDead() || pObj->isKindOf(KINDOF_INERT))) {
  516. count++;
  517. }
  518. }
  519. }
  520. }
  521. }
  522. }
  523. Bool comparison = false;
  524. switch (pComparisonParm->getInt())
  525. {
  526. case Parameter::LESS_THAN : comparison = (count < pCountParm->getInt()); break;
  527. case Parameter::LESS_EQUAL : comparison = (count <= pCountParm->getInt()); break;
  528. case Parameter::EQUAL : comparison = (count == pCountParm->getInt()); break;
  529. case Parameter::GREATER_EQUAL : comparison = (count >= pCountParm->getInt()); break;
  530. case Parameter::GREATER : comparison = (count > pCountParm->getInt()); break;
  531. case Parameter::NOT_EQUAL : comparison = (count != pCountParm->getInt()); break;
  532. }
  533. return comparison;
  534. }
  535. //-------------------------------------------------------------------------------------------------
  536. /** evaluateTeamStateIs */
  537. //-------------------------------------------------------------------------------------------------
  538. Bool ScriptConditions::evaluateTeamStateIs(Parameter *pTeamParm, Parameter *pStateParm )
  539. {
  540. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  541. // The team is the team based on the name, and the calling team (if any) and the team that
  542. // is being considered for the condition. jba. :)
  543. AsciiString stateName = pStateParm->getString();
  544. if (theTeam) {
  545. return (theTeam->getState() == stateName);
  546. }
  547. return false; // Non existent team isn't in any state.
  548. }
  549. //-------------------------------------------------------------------------------------------------
  550. /** evaluateTeamStateIsNot */
  551. //-------------------------------------------------------------------------------------------------
  552. Bool ScriptConditions::evaluateTeamStateIsNot(Parameter *pTeamParm, Parameter *pStateParm )
  553. {
  554. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  555. // The team is the team based on the name, and the calling team (if any) and the team that
  556. // is being considered for the condition. jba. :)
  557. AsciiString stateName = pStateParm->getString();
  558. if (theTeam) {
  559. return (!(theTeam->getState() == stateName));
  560. }
  561. return false; // Non existent team isn't in any state.
  562. }
  563. //-------------------------------------------------------------------------------------------------
  564. /** evaluateNamedOutsideArea */
  565. //-------------------------------------------------------------------------------------------------
  566. Bool ScriptConditions::evaluateNamedOutsideArea(Parameter *pUnitParm, Parameter *pTriggerParm)
  567. {// This is actually NamedUnitInside(...)
  568. return !evaluateNamedInsideArea(pUnitParm, pTriggerParm);
  569. }
  570. //-------------------------------------------------------------------------------------------------
  571. /** evaluateTeamInsideAreaEntirely */
  572. //-------------------------------------------------------------------------------------------------
  573. Bool ScriptConditions::evaluateTeamInsideAreaEntirely(Parameter *pTeamParm, Parameter *pTriggerParm, Parameter *pTypeParm)
  574. {// This is actually TeamInside(...)
  575. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  576. // The team is the team based on the name, and the calling team (if any) and the team that
  577. // is being considered for the condition. jba. :)
  578. AsciiString triggerName = pTriggerParm->getString();
  579. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  580. if (pTrig == NULL)
  581. return false;
  582. if (theTeam) {
  583. return theTeam->allInside(pTrig, (UnsignedInt)pTypeParm->getInt());
  584. }
  585. return false; // Non existent team isn't in trigger area. :)
  586. }
  587. //-------------------------------------------------------------------------------------------------
  588. /** evaluateTeamOutsideAreaEntirely */
  589. //-------------------------------------------------------------------------------------------------
  590. Bool ScriptConditions::evaluateTeamOutsideAreaEntirely(Parameter *pTeamParm, Parameter *pTriggerParm, Parameter *pTypeParm)
  591. {
  592. return !(evaluateTeamInsideAreaEntirely(pTeamParm, pTriggerParm, pTypeParm) ||
  593. evaluateTeamInsideAreaPartially(pTeamParm, pTriggerParm, pTypeParm));
  594. }
  595. //-------------------------------------------------------------------------------------------------
  596. /** evaluateNamedAttackedByType */
  597. //-------------------------------------------------------------------------------------------------
  598. Bool ScriptConditions::evaluateNamedAttackedByType(Parameter *pUnitParm, Parameter *pTypeParm)
  599. {
  600. Object *theObj = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  601. if (!theObj) {
  602. return false;
  603. }
  604. BodyModuleInterface* theBodyModule = theObj->getBodyModule();
  605. if (!theBodyModule) {
  606. return false;
  607. }
  608. const DamageInfo* lastDamageInfo = theBodyModule->getLastDamageInfo();
  609. if (!lastDamageInfo) {
  610. return false;
  611. }
  612. ObjectID id = lastDamageInfo->in.m_sourceID;
  613. Object* pAttacker = TheGameLogic->findObjectByID(id);
  614. if (!pAttacker || !pAttacker->getTemplate()) {
  615. return false;
  616. }
  617. ObjectTypesTemp types;
  618. objectTypesFromParam(pTypeParm, types.m_types);
  619. return (types.m_types->isInSet(pAttacker->getTemplate()->getName()));
  620. }
  621. //-------------------------------------------------------------------------------------------------
  622. /** evaluateTeamAttackedByType */
  623. //-------------------------------------------------------------------------------------------------
  624. Bool ScriptConditions::evaluateTeamAttackedByType(Parameter *pTeamParm, Parameter *pTypeParm)
  625. {
  626. Team *theTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  627. if (!theTeam) {
  628. return false;
  629. }
  630. ObjectTypesTemp types;
  631. objectTypesFromParam(pTypeParm, types.m_types);
  632. for (DLINK_ITERATOR<Object> iter = theTeam->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  633. Object *pCur = iter.cur();
  634. if (!pCur) {
  635. continue;
  636. }
  637. BodyModuleInterface* theBodyModule = pCur->getBodyModule();
  638. if (!theBodyModule) {
  639. continue;
  640. }
  641. const DamageInfo* lastDamageInfo = theBodyModule->getLastDamageInfo();
  642. if (!lastDamageInfo) {
  643. continue;
  644. }
  645. ObjectID id = lastDamageInfo->in.m_sourceID;
  646. Object* pAttacker = TheGameLogic->findObjectByID(id);
  647. if (!pAttacker || !pAttacker->getTemplate()) {
  648. continue;
  649. }
  650. if (types.m_types->isInSet(pAttacker->getTemplate()->getName())) {
  651. return true;
  652. }
  653. }
  654. return false;
  655. }
  656. //-------------------------------------------------------------------------------------------------
  657. /** evaluateNamedAttackedByPlayer */
  658. //-------------------------------------------------------------------------------------------------
  659. Bool ScriptConditions::evaluateNamedAttackedByPlayer(Parameter *pUnitParm, Parameter *pPlayerParm)
  660. {
  661. Object *theObj = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  662. if (!theObj) {
  663. return false;
  664. }
  665. BodyModuleInterface* theBodyModule = theObj->getBodyModule();
  666. if (!theBodyModule) {
  667. return false;
  668. }
  669. const DamageInfo* lastDamageInfo = theBodyModule->getLastDamageInfo();
  670. if (!lastDamageInfo) {
  671. return false;
  672. }
  673. ObjectID id = lastDamageInfo->in.m_sourceID;
  674. Object* pAttacker = TheGameLogic->findObjectByID(id);
  675. Player *pPlayer = NULL;
  676. if (lastDamageInfo->in.m_sourcePlayerMask) {
  677. pPlayer = ThePlayerList->getPlayerFromMask(lastDamageInfo->in.m_sourcePlayerMask);
  678. }
  679. if (pPlayer || pAttacker) {
  680. Player *victimPlayer = playerFromParam(pPlayerParm);
  681. if (pPlayer == victimPlayer) {
  682. return true;
  683. }
  684. if (!pAttacker) return false; // wasn't attacked.
  685. return (pAttacker->getControllingPlayer() == victimPlayer);
  686. }
  687. return false;
  688. }
  689. //-------------------------------------------------------------------------------------------------
  690. /** evaluateTeamAttackedByPlayer */
  691. //-------------------------------------------------------------------------------------------------
  692. Bool ScriptConditions::evaluateTeamAttackedByPlayer(Parameter *pTeamParm, Parameter *pPlayerParm)
  693. {
  694. Team *theTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  695. if (!theTeam) {
  696. return false;
  697. }
  698. for (DLINK_ITERATOR<Object> iter = theTeam->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  699. Object *pCur = iter.cur();
  700. if (!pCur) {
  701. continue;
  702. }
  703. BodyModuleInterface* theBodyModule = pCur->getBodyModule();
  704. if (!theBodyModule) {
  705. continue;
  706. }
  707. const DamageInfo* lastDamageInfo = theBodyModule->getLastDamageInfo();
  708. if (!lastDamageInfo) {
  709. continue;
  710. }
  711. ObjectID id = lastDamageInfo->in.m_sourceID;
  712. Object* pAttacker = TheGameLogic->findObjectByID(id);
  713. if (!pAttacker) {
  714. continue;
  715. }
  716. if (pAttacker->getControllingPlayer() == playerFromParam(pPlayerParm)) {
  717. return true;
  718. }
  719. }
  720. return false;
  721. }
  722. //-------------------------------------------------------------------------------------------------
  723. /** evaluateBuiltByPlayer */
  724. //-------------------------------------------------------------------------------------------------
  725. Bool ScriptConditions::evaluateBuiltByPlayer(Condition *pCondition, Parameter* pTypeParm, Parameter* pPlayerParm)
  726. {
  727. if (pCondition->getCustomData()!=0) {
  728. // We have a cached value.
  729. if (TheScriptEngine->getFrameObjectCountChanged()+1 < TheGameLogic->getFrame()) {
  730. // object count hasn't changed recently. Use cached value.
  731. if (pCondition->getCustomData()==1) return true;
  732. if (pCondition->getCustomData()==-1) return false;
  733. }
  734. }
  735. Player* pPlayer = playerFromParam(pPlayerParm);
  736. if (!pPlayer) {
  737. return false;
  738. }
  739. const ThingTemplate* pTemplate = TheThingFactory->findTemplate(pTypeParm->getString());
  740. if (!pTemplate) {
  741. return false;
  742. }
  743. ObjectTypesTemp types;
  744. objectTypesFromParam(pTypeParm, types.m_types);
  745. std::vector<Int> counts;
  746. std::vector<const ThingTemplate *> templates;
  747. Int numTemplates = types.m_types->prepForPlayerCounting(templates, counts);
  748. if (numTemplates > 0) {
  749. pPlayer->countObjectsByThingTemplate(numTemplates, &(*templates.begin()), false, &(*counts.begin()));
  750. } else {
  751. return 0;
  752. }
  753. Int sumOfObjs = rts::sum(counts);
  754. pCondition->setCustomData(-1); // false.
  755. if (sumOfObjs != 0) {
  756. pCondition->setCustomData(1); // true.
  757. }
  758. return (sumOfObjs != 0);
  759. }
  760. //-------------------------------------------------------------------------------------------------
  761. /** evaluateNamedCreated */
  762. //-------------------------------------------------------------------------------------------------
  763. Bool ScriptConditions::evaluateNamedCreated(Parameter* pUnitParm)
  764. {
  765. // This is actually evaluateNamedExists(...)
  766. ///@todo - evaluate created, not exists...
  767. return (TheScriptEngine->getUnitNamed(pUnitParm->getString()) != NULL);
  768. }
  769. //-------------------------------------------------------------------------------------------------
  770. /** evaluateTeamCreated */
  771. //-------------------------------------------------------------------------------------------------
  772. Bool ScriptConditions::evaluateTeamCreated(Parameter* pTeamParm)
  773. {
  774. Team *pTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  775. if (pTeam) {
  776. return pTeam->isCreated();
  777. }
  778. return ( false );
  779. }
  780. //-------------------------------------------------------------------------------------------------
  781. /** evaluateUnitHealth */
  782. //-------------------------------------------------------------------------------------------------
  783. Bool ScriptConditions::evaluateUnitHealth(Parameter *pUnitParm, Parameter* pComparisonParm, Parameter *pHealthPercent)
  784. {
  785. Object *theObj = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  786. if (!theObj) {
  787. return false;
  788. }
  789. if (!theObj->getBodyModule()) return false;
  790. Real curHealth = theObj->getBodyModule()->getHealth();
  791. Real initialHealth = theObj->getBodyModule()->getInitialHealth();
  792. Int curPercent = (curHealth*100 + initialHealth/2)/initialHealth;
  793. switch (pComparisonParm->getInt())
  794. {
  795. case Parameter::LESS_THAN : return (curPercent < pHealthPercent->getInt());
  796. case Parameter::LESS_EQUAL : return (curPercent <= pHealthPercent->getInt());
  797. case Parameter::EQUAL : return (curPercent == pHealthPercent->getInt());
  798. case Parameter::GREATER_EQUAL : return (curPercent >= pHealthPercent->getInt());
  799. case Parameter::GREATER : return (curPercent > pHealthPercent->getInt());
  800. case Parameter::NOT_EQUAL : return (curPercent != pHealthPercent->getInt());
  801. }
  802. return false;
  803. }
  804. //-------------------------------------------------------------------------------------------------
  805. /** evaluatePlayerHasCredits */
  806. //-------------------------------------------------------------------------------------------------
  807. Bool ScriptConditions::evaluatePlayerHasCredits(Parameter *pCreditsParm, Parameter* pComparisonParm, Parameter *pPlayerParm)
  808. {
  809. Player* pPlayer = playerFromParam(pPlayerParm);
  810. if (!pPlayer) {
  811. return false;
  812. }
  813. if (pPlayer && pPlayer->getMoney()) {
  814. switch (pComparisonParm->getInt())
  815. {
  816. case Parameter::LESS_THAN : return (pCreditsParm->getInt() < pPlayer->getMoney()->countMoney()); break;
  817. case Parameter::LESS_EQUAL : return (pCreditsParm->getInt() <= pPlayer->getMoney()->countMoney()); break;
  818. case Parameter::EQUAL : return (pCreditsParm->getInt() == pPlayer->getMoney()->countMoney()); break;
  819. case Parameter::GREATER_EQUAL : return (pCreditsParm->getInt() >= pPlayer->getMoney()->countMoney()); break;
  820. case Parameter::GREATER : return (pCreditsParm->getInt() > pPlayer->getMoney()->countMoney()); break;
  821. case Parameter::NOT_EQUAL : return (pCreditsParm->getInt() != pPlayer->getMoney()->countMoney()); break;
  822. }
  823. }
  824. return false;
  825. }
  826. //-------------------------------------------------------------------------------------------------
  827. /** evaluateBuildingEntered */
  828. //-------------------------------------------------------------------------------------------------
  829. Bool ScriptConditions::evaluateBuildingEntered( Parameter *pPlayerParm, Parameter *pItemParm )
  830. {
  831. Object *theObj = TheScriptEngine->getUnitNamed( pItemParm->getString() );
  832. if (!theObj) {
  833. return false;
  834. }
  835. ContainModuleInterface *contain = theObj->getContain();
  836. if( !contain )
  837. {
  838. DEBUG_CRASH( ("evaluateBuildingEntered script condition -- building doesn't have a container.") );
  839. return false;
  840. }
  841. PlayerMaskType playerMask = theObj->getContain()->getPlayerWhoEntered();
  842. if (playerMask==0) {
  843. return false;
  844. }
  845. Player *pPlayer = playerFromParam(pPlayerParm);
  846. if (!pPlayer) {
  847. return false;
  848. }
  849. if (playerMask == pPlayer->getPlayerMask()) {
  850. return true;
  851. }
  852. return false;
  853. }
  854. //-------------------------------------------------------------------------------------------------
  855. /** evaluateIsBuildingEmpty */
  856. //-------------------------------------------------------------------------------------------------
  857. Bool ScriptConditions::evaluateIsBuildingEmpty( Parameter *pItemParm )
  858. {
  859. Object *theBuilding = TheScriptEngine->getUnitNamed(pItemParm->getString());
  860. if (!theBuilding) {
  861. return false;
  862. }
  863. ContainModuleInterface* contain = theBuilding->getContain();
  864. if (!contain) {
  865. return false;
  866. }
  867. if (contain->getContainCount() > 0) {
  868. return false;
  869. }
  870. return true;
  871. }
  872. //-------------------------------------------------------------------------------------------------
  873. /** evaluateEnemySighted */
  874. //-------------------------------------------------------------------------------------------------
  875. Bool ScriptConditions::evaluateEnemySighted(Parameter *pItemParm, Parameter *pAllianceParm, Parameter* pPlayerParm)
  876. {
  877. Object *theObj = TheScriptEngine->getUnitNamed( pItemParm->getString() );
  878. if (!theObj) {
  879. return false;
  880. }
  881. Player *pPlayer = playerFromParam(pPlayerParm);
  882. if (!pPlayer) {
  883. return false;
  884. }
  885. // filter out appropriately based on alliances
  886. Int relationDescriber;
  887. switch (pAllianceParm->getInt()) {
  888. case Parameter::REL_NEUTRAL:
  889. relationDescriber = PartitionFilterRelationship::ALLOW_NEUTRAL;
  890. break;
  891. case Parameter::REL_FRIEND:
  892. relationDescriber = PartitionFilterRelationship::ALLOW_ALLIES;
  893. break;
  894. case Parameter::REL_ENEMY:
  895. relationDescriber = PartitionFilterRelationship::ALLOW_ENEMIES;
  896. break;
  897. }
  898. PartitionFilterRelationship filterTeam(theObj, relationDescriber);
  899. // and only stuff that is not dead
  900. PartitionFilterAlive filterAlive;
  901. // and only nonstealthed items.
  902. PartitionFilterRejectByObjectStatus filterStealth(OBJECT_STATUS_STEALTHED, OBJECT_STATUS_DETECTED);
  903. // and only on-map (or not)
  904. PartitionFilterSameMapStatus filterMapStatus(theObj);
  905. PartitionFilter *filters[] = { &filterTeam, &filterAlive, &filterStealth, &filterMapStatus, NULL };
  906. Real visionRange = theObj->getVisionRange();
  907. SimpleObjectIterator *iter = ThePartitionManager->iterateObjectsInRange(
  908. theObj, visionRange, FROM_CENTER_2D, filters);
  909. MemoryPoolObjectHolder hold(iter);
  910. for (Object *them = iter->first(); them; them = iter->next())
  911. {
  912. if (them->getControllingPlayer() == pPlayer) {
  913. return true;
  914. }
  915. }
  916. return false;
  917. }
  918. //-------------------------------------------------------------------------------------------------
  919. /** evaluateTypeSighted */
  920. //-------------------------------------------------------------------------------------------------
  921. Bool ScriptConditions::evaluateTypeSighted(Parameter *pItemParm, Parameter *pTypeParm, Parameter* pPlayerParm)
  922. {
  923. Object *theObj = TheScriptEngine->getUnitNamed( pItemParm->getString() );
  924. if (!theObj) {
  925. return false;
  926. }
  927. Player *pPlayer = playerFromParam(pPlayerParm);
  928. if (!pPlayer) {
  929. return false;
  930. }
  931. ObjectTypesTemp types;
  932. objectTypesFromParam(pTypeParm, types.m_types);
  933. // and only stuff that is not dead
  934. PartitionFilterAlive filterAlive;
  935. // and only nonstealthed items.
  936. PartitionFilterRejectByObjectStatus filterStealth(OBJECT_STATUS_STEALTHED, OBJECT_STATUS_DETECTED);
  937. // and only on-map (or not)
  938. PartitionFilterSameMapStatus filterMapStatus(theObj);
  939. PartitionFilter *filters[] = { &filterAlive, &filterStealth, &filterMapStatus, NULL };
  940. Real visionRange = theObj->getVisionRange();
  941. SimpleObjectIterator *iter = ThePartitionManager->iterateObjectsInRange(
  942. theObj, visionRange, FROM_CENTER_2D, filters);
  943. MemoryPoolObjectHolder hold(iter);
  944. for (Object *them = iter->first(); them; them = iter->next())
  945. {
  946. if (them->getControllingPlayer() == pPlayer) {
  947. if (types.m_types->isInSet(them->getTemplate()->getName()))
  948. return true;
  949. }
  950. }
  951. return false;
  952. }
  953. //-------------------------------------------------------------------------------------------------
  954. /** evaluateNamedDiscovered */
  955. //-------------------------------------------------------------------------------------------------
  956. Bool ScriptConditions::evaluateNamedDiscovered(Parameter *pItemParm, Parameter* pPlayerParm)
  957. {
  958. Object *theObj = TheScriptEngine->getUnitNamed( pItemParm->getString() );
  959. if (!theObj) {
  960. return false;
  961. }
  962. Player *pPlayer = playerFromParam(pPlayerParm);
  963. if (!pPlayer) {
  964. return false;
  965. }
  966. // We are held, so we are not visible.
  967. if( theObj->isDisabledByType( DISABLED_HELD ) )
  968. {
  969. return false;
  970. }
  971. // If we are stealthed we are not visible.
  972. if (BitTest( theObj->getStatusBits(), OBJECT_STATUS_STEALTHED) &&
  973. !BitTest( theObj->getStatusBits(), OBJECT_STATUS_DETECTED)) {
  974. return false;
  975. }
  976. ObjectShroudStatus shroud = theObj->getShroudedStatus(pPlayer->getPlayerIndex());
  977. return (shroud == OBJECTSHROUD_CLEAR || shroud == OBJECTSHROUD_PARTIAL_CLEAR);
  978. }
  979. //-------------------------------------------------------------------------------------------------
  980. /** evaluateTeamDiscovered */
  981. //-------------------------------------------------------------------------------------------------
  982. Bool ScriptConditions::evaluateTeamDiscovered(Parameter *pTeamParm, Parameter *pPlayerParm)
  983. {
  984. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  985. if (!theTeam) {
  986. return false;
  987. }
  988. Player *pPlayer = playerFromParam(pPlayerParm);
  989. if (!pPlayer) {
  990. return false;
  991. }
  992. for (DLINK_ITERATOR<Object> iter = theTeam->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  993. Object *pObj = iter.cur();
  994. if (!pObj) {
  995. continue;
  996. }
  997. // We are held, so we are not visible.
  998. if( pObj->isDisabledByType( DISABLED_HELD ) )
  999. {
  1000. continue;
  1001. }
  1002. // If we are stealthed we are not visible.
  1003. if (BitTest( pObj->getStatusBits(), OBJECT_STATUS_STEALTHED) &&
  1004. !BitTest( pObj->getStatusBits(), OBJECT_STATUS_DETECTED)) {
  1005. continue;
  1006. }
  1007. ObjectShroudStatus shroud = pObj->getShroudedStatus(pPlayer->getPlayerIndex());
  1008. if (shroud == OBJECTSHROUD_CLEAR || shroud == OBJECTSHROUD_PARTIAL_CLEAR) {
  1009. return true;
  1010. }
  1011. }
  1012. return false;
  1013. }
  1014. //-------------------------------------------------------------------------------------------------
  1015. /** evaluateMissionAttempts */
  1016. //-------------------------------------------------------------------------------------------------
  1017. Bool ScriptConditions::evaluateMissionAttempts(Parameter *pPlayerParm, Parameter *pComparisonParm, Parameter *pAttemptsParm)
  1018. {
  1019. //Player* pPlayer = playerFromParam(pPlayerParm);
  1020. return false;
  1021. }
  1022. //-------------------------------------------------------------------------------------------------
  1023. /** evaluateNamedOwnedByPlayer */
  1024. //-------------------------------------------------------------------------------------------------
  1025. Bool ScriptConditions::evaluateNamedOwnedByPlayer(Parameter *pUnitParm, Parameter *pPlayerParm)
  1026. {
  1027. Player* pPlayer = playerFromParam(pPlayerParm);
  1028. if (!pPlayer) {
  1029. return false;
  1030. }
  1031. Object* pObj = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1032. if (!pObj) {
  1033. return false;
  1034. }
  1035. return (pObj->getControllingPlayer() == pPlayer);
  1036. }
  1037. //-------------------------------------------------------------------------------------------------
  1038. /** evaluateTeamOwnedByPlayer */
  1039. //-------------------------------------------------------------------------------------------------
  1040. Bool ScriptConditions::evaluateTeamOwnedByPlayer(Parameter *pTeamParm, Parameter *pPlayerParm)
  1041. {
  1042. Player* pPlayer = playerFromParam(pPlayerParm);
  1043. if (!pPlayer) {
  1044. return false;
  1045. }
  1046. Team* pTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  1047. if (!pTeam) {
  1048. return false;
  1049. }
  1050. return (pTeam->getControllingPlayer() == pPlayer);
  1051. }
  1052. //-------------------------------------------------------------------------------------------------
  1053. /** evaluatePlayerHasNOrFewerBuildings */
  1054. //-------------------------------------------------------------------------------------------------
  1055. Bool ScriptConditions::evaluatePlayerHasNOrFewerBuildings(Parameter *pBuildingCountParm, Parameter *pPlayerParm)
  1056. {
  1057. Player* pPlayer = playerFromParam(pPlayerParm);
  1058. if (!pPlayer) {
  1059. return false;
  1060. }
  1061. return (pBuildingCountParm->getInt() >= pPlayer->countBuildings());
  1062. }
  1063. //-------------------------------------------------------------------------------------------------
  1064. /** evaluatePlayerHasNOrFewerFactionBuildings */
  1065. //-------------------------------------------------------------------------------------------------
  1066. Bool ScriptConditions::evaluatePlayerHasNOrFewerFactionBuildings(Parameter *pBuildingCountParm, Parameter *pPlayerParm)
  1067. {
  1068. Player* pPlayer = playerFromParam(pPlayerParm);
  1069. if (!pPlayer) {
  1070. return false;
  1071. }
  1072. KindOfMaskType mask;
  1073. mask.set(KINDOF_MP_COUNT_FOR_VICTORY);
  1074. mask.set(KINDOF_STRUCTURE);
  1075. return (pBuildingCountParm->getInt() >= pPlayer->countObjects(mask, KINDOFMASK_NONE));
  1076. }
  1077. //-------------------------------------------------------------------------------------------------
  1078. /** evaluatePlayerHasPower */
  1079. //-------------------------------------------------------------------------------------------------
  1080. Bool ScriptConditions::evaluatePlayerHasPower(Parameter *pPlayerParm)
  1081. {
  1082. Player* pPlayer = playerFromParam(pPlayerParm);
  1083. if (!pPlayer) {
  1084. return false;
  1085. }
  1086. Energy* pPlayersEnergy = pPlayer->getEnergy();
  1087. if (!pPlayersEnergy) {
  1088. return false;
  1089. }
  1090. return pPlayersEnergy->hasSufficientPower();
  1091. }
  1092. //-------------------------------------------------------------------------------------------------
  1093. /** evaluateNamedReachedWaypointsEnd */
  1094. //-------------------------------------------------------------------------------------------------
  1095. Bool ScriptConditions::evaluateNamedReachedWaypointsEnd(Parameter *pUnitParm, Parameter* pWaypointPathParm)
  1096. {
  1097. Object *theObj = TheScriptEngine->getUnitNamed( pUnitParm->getString() );
  1098. if (!theObj) {
  1099. return false;
  1100. }
  1101. AIUpdateInterface *ai = theObj->getAIUpdateInterface();
  1102. if (!ai)
  1103. return false;
  1104. const Waypoint *targetWay = ai->getCompletedWaypoint();
  1105. if (!targetWay) return false;
  1106. AsciiString pathName = pWaypointPathParm->getString();
  1107. if (targetWay->getPathLabel1() == pathName) return true;
  1108. if (targetWay->getPathLabel2() == pathName) return true;
  1109. if (targetWay->getPathLabel3() == pathName) return true;
  1110. return false;
  1111. }
  1112. //-------------------------------------------------------------------------------------------------
  1113. /** evaluateTeamReachedWaypointsEnd */
  1114. //-------------------------------------------------------------------------------------------------
  1115. Bool ScriptConditions::evaluateTeamReachedWaypointsEnd(Parameter *pTeamParm, Parameter* pWaypointPathParm)
  1116. {
  1117. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  1118. if (!theTeam) {
  1119. return false;
  1120. }
  1121. AsciiString pathName = pWaypointPathParm->getString();
  1122. Bool anyAtEnd = false;
  1123. Bool anyNotAtEnd = false;
  1124. // Note - This returns true if any of the team completed the path. This is as the current
  1125. // implementation tends to do group pathfinding by default, so we trigger when the leader actually thinks
  1126. // that he has reached the end of the waypoint path.
  1127. //int i = 0;
  1128. for (DLINK_ITERATOR<Object> iter = theTeam->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  1129. Object *pObj = iter.cur();
  1130. if (!pObj) {
  1131. continue;
  1132. }
  1133. AIUpdateInterface *ai = pObj->getAIUpdateInterface();
  1134. if (!ai) continue; // in case there are any rocks or trees in the team :)
  1135. const Waypoint *targetWay = ai->getCompletedWaypoint();
  1136. if (!targetWay) {
  1137. anyNotAtEnd = true;
  1138. continue;
  1139. }
  1140. Bool found = false;
  1141. if (targetWay->getPathLabel1() == pathName) found = true;
  1142. if (targetWay->getPathLabel2() == pathName) found = true;
  1143. if (targetWay->getPathLabel3() == pathName) found = true;
  1144. if (found) {
  1145. anyAtEnd = true;
  1146. } else {
  1147. anyNotAtEnd = true;
  1148. }
  1149. }
  1150. return anyAtEnd;
  1151. }
  1152. //-------------------------------------------------------------------------------------------------
  1153. /** evaluateNamedSelected */
  1154. //-------------------------------------------------------------------------------------------------
  1155. Bool ScriptConditions::evaluateNamedSelected(Condition *pCondition, Parameter *pUnitParm)
  1156. {
  1157. if (TheGameEngine->isMultiplayerSession())
  1158. {
  1159. return false;
  1160. }
  1161. Bool anyChanges = false;
  1162. if (pCondition->getCustomData() == 0) anyChanges = true;
  1163. if (TheInGameUI->getFrameSelectionChanged()+1 >= TheGameLogic->getFrame()) {
  1164. anyChanges = true; // Objects were selected last frame, so count could have changed. jba.
  1165. }
  1166. if (!anyChanges) {
  1167. if (pCondition->getCustomData()==-1) return false;
  1168. if (pCondition->getCustomData()==1) return true;
  1169. }
  1170. Bool isSelected = false;
  1171. const DrawableList *selected = TheInGameUI->getAllSelectedDrawables();
  1172. // loop through all the selected drawables
  1173. Drawable *draw;
  1174. for( DrawableListCIt it = selected->begin(); it != selected->end(); ++it )
  1175. {
  1176. draw = *it;
  1177. if (draw->getObject()->getName() == (pUnitParm->getString())) {
  1178. isSelected = true;
  1179. break;
  1180. }
  1181. }
  1182. pCondition->setCustomData(-1); // false.
  1183. if (isSelected) {
  1184. pCondition->setCustomData(1); // true.
  1185. }
  1186. return isSelected;
  1187. }
  1188. //-------------------------------------------------------------------------------------------------
  1189. /** evaluateVideoHasCompleted */
  1190. //-------------------------------------------------------------------------------------------------
  1191. Bool ScriptConditions::evaluateVideoHasCompleted(Parameter *pVideoParm)
  1192. {
  1193. return TheScriptEngine->isVideoComplete(pVideoParm->getString(), true);
  1194. }
  1195. //-------------------------------------------------------------------------------------------------
  1196. /** evaluateSpeechHasCompleted */
  1197. //-------------------------------------------------------------------------------------------------
  1198. Bool ScriptConditions::evaluateSpeechHasCompleted(Parameter *pSpeechParm)
  1199. {
  1200. return TheScriptEngine->isSpeechComplete(pSpeechParm->getString(), true);
  1201. }
  1202. //-------------------------------------------------------------------------------------------------
  1203. /** evaluateAudioHasCompleted */
  1204. //-------------------------------------------------------------------------------------------------
  1205. Bool ScriptConditions::evaluateAudioHasCompleted(Parameter *pAudioParm)
  1206. {
  1207. return TheScriptEngine->isAudioComplete(pAudioParm->getString(), true);
  1208. }
  1209. //-------------------------------------------------------------------------------------------------
  1210. /** evaluatePlayerSpecialPowerFromUnitTriggered */
  1211. //-------------------------------------------------------------------------------------------------
  1212. Bool ScriptConditions::evaluatePlayerSpecialPowerFromUnitTriggered(Parameter *pPlayerParm, Parameter *pSpecialPowerParm, Parameter* pUnitParm)
  1213. {
  1214. Player *pPlayer = playerFromParam(pPlayerParm);
  1215. ObjectID sourceID = INVALID_ID;
  1216. if (pUnitParm)
  1217. {
  1218. Object* pUnit = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1219. if (!pUnit)
  1220. {
  1221. // we cared about the source object, but it is dead. No sense checking anymore, since we don't know it's objectID anymore. :P
  1222. return FALSE;
  1223. }
  1224. sourceID = pUnit->getID();
  1225. }
  1226. if (pPlayer)
  1227. {
  1228. return TheScriptEngine->isSpecialPowerTriggered(pPlayer->getPlayerIndex(), pSpecialPowerParm->getString(), TRUE, sourceID);
  1229. }
  1230. return FALSE;
  1231. }
  1232. //-------------------------------------------------------------------------------------------------
  1233. /** evaluatePlayerSpecialPowerFromUnitMidway */
  1234. //-------------------------------------------------------------------------------------------------
  1235. Bool ScriptConditions::evaluatePlayerSpecialPowerFromUnitMidway(Parameter *pPlayerParm, Parameter *pSpecialPowerParm, Parameter* pUnitParm)
  1236. {
  1237. Player *pPlayer = playerFromParam(pPlayerParm);
  1238. ObjectID sourceID = INVALID_ID;
  1239. if (pUnitParm)
  1240. {
  1241. Object* pUnit = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1242. if (!pUnit)
  1243. {
  1244. // we cared about the source object, but it is dead. No sense checking anymore, since we don't know it's objectID anymore. :P
  1245. return FALSE;
  1246. }
  1247. sourceID = pUnit->getID();
  1248. }
  1249. if (pPlayer)
  1250. {
  1251. return TheScriptEngine->isSpecialPowerMidway(pPlayer->getPlayerIndex(), pSpecialPowerParm->getString(), TRUE, sourceID);
  1252. }
  1253. return FALSE;
  1254. }
  1255. //-------------------------------------------------------------------------------------------------
  1256. /** evaluatePlayerSpecialPowerFromUnitComplete */
  1257. //-------------------------------------------------------------------------------------------------
  1258. Bool ScriptConditions::evaluatePlayerSpecialPowerFromUnitComplete(Parameter *pPlayerParm, Parameter *pSpecialPowerParm, Parameter* pUnitParm)
  1259. {
  1260. Player *pPlayer = playerFromParam(pPlayerParm);
  1261. ObjectID sourceID = INVALID_ID;
  1262. if (pUnitParm)
  1263. {
  1264. Object* pUnit = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1265. if (!pUnit)
  1266. {
  1267. // we cared about the source object, but it is dead. No sense checking anymore, since we don't know it's objectID anymore. :P
  1268. return FALSE;
  1269. }
  1270. sourceID = pUnit->getID();
  1271. }
  1272. if (pPlayer)
  1273. {
  1274. return TheScriptEngine->isSpecialPowerComplete(pPlayer->getPlayerIndex(), pSpecialPowerParm->getString(), TRUE, sourceID);
  1275. }
  1276. return FALSE;
  1277. }
  1278. //-------------------------------------------------------------------------------------------------
  1279. /** evaluateUpgradeFromUnitComplete */
  1280. //-------------------------------------------------------------------------------------------------
  1281. Bool ScriptConditions::evaluateUpgradeFromUnitComplete(Parameter *pPlayerParm, Parameter *pUpgradeParm, Parameter* pUnitParm)
  1282. {
  1283. Player *pPlayer = playerFromParam(pPlayerParm);
  1284. ObjectID sourceID = INVALID_ID;
  1285. if (pUnitParm)
  1286. {
  1287. Object* pUnit = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1288. if (!pUnit)
  1289. {
  1290. // we cared about the source object, but it is dead. No sense checking anymore, since we don't know it's objectID anymore. :P
  1291. return FALSE;
  1292. }
  1293. sourceID = pUnit->getID();
  1294. }
  1295. if (pPlayer)
  1296. {
  1297. return TheScriptEngine->isUpgradeComplete(pPlayer->getPlayerIndex(), pUpgradeParm->getString(), TRUE, sourceID);
  1298. }
  1299. return FALSE;
  1300. }
  1301. //-------------------------------------------------------------------------------------------------
  1302. /** evaluateScienceAcquired */
  1303. //-------------------------------------------------------------------------------------------------
  1304. Bool ScriptConditions::evaluateScienceAcquired(Parameter *pPlayerParm, Parameter *pScienceParm)
  1305. {
  1306. Player *pPlayer = playerFromParam(pPlayerParm);
  1307. if (pPlayer)
  1308. {
  1309. ScienceType science = TheScienceStore->getScienceFromInternalName(pScienceParm->getString());
  1310. if (science == SCIENCE_INVALID)
  1311. return FALSE;
  1312. return TheScriptEngine->isScienceAcquired(pPlayer->getPlayerIndex(), science, TRUE);
  1313. }
  1314. return FALSE;
  1315. }
  1316. //-------------------------------------------------------------------------------------------------
  1317. /** evaluateCanPurchaseScience */
  1318. //-------------------------------------------------------------------------------------------------
  1319. Bool ScriptConditions::evaluateCanPurchaseScience(Parameter *pPlayerParm, Parameter *pScienceParm)
  1320. {
  1321. Player *pPlayer = playerFromParam(pPlayerParm);
  1322. if (pPlayer)
  1323. {
  1324. ScienceType science = TheScienceStore->getScienceFromInternalName(pScienceParm->getString());
  1325. if (science == SCIENCE_INVALID)
  1326. return FALSE;
  1327. return pPlayer->isCapableOfPurchasingScience(science);
  1328. }
  1329. return FALSE;
  1330. }
  1331. //-------------------------------------------------------------------------------------------------
  1332. /** evaluateSciencePurchasePoints */
  1333. //-------------------------------------------------------------------------------------------------
  1334. Bool ScriptConditions::evaluateSciencePurchasePoints(Parameter *pPlayerParm, Parameter *pSciencePointParm)
  1335. {
  1336. Player *pPlayer = playerFromParam(pPlayerParm);
  1337. if (pPlayer)
  1338. {
  1339. Int pointsNeeded = pSciencePointParm->getInt();
  1340. return pPlayer->getSciencePurchasePoints() >= pointsNeeded;
  1341. }
  1342. return FALSE;
  1343. }
  1344. //-------------------------------------------------------------------------------------------------
  1345. /** evaluateNamedEnteredArea */
  1346. //-------------------------------------------------------------------------------------------------
  1347. Bool ScriptConditions::evaluateNamedEnteredArea(Parameter *pUnitParm, Parameter *pTriggerParm)
  1348. {
  1349. Object* pUnit = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1350. if (!pUnit) {
  1351. return false;
  1352. }
  1353. if (pUnit->isKindOf(KINDOF_INERT)) {
  1354. return false;
  1355. }
  1356. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  1357. if (!pTrig) {
  1358. return false;
  1359. }
  1360. return (pUnit->didEnter(pTrig));
  1361. }
  1362. //-------------------------------------------------------------------------------------------------
  1363. /** evaluateNamedExitedArea */
  1364. //-------------------------------------------------------------------------------------------------
  1365. Bool ScriptConditions::evaluateNamedExitedArea(Parameter *pUnitParm, Parameter *pTriggerParm)
  1366. {
  1367. Object* pUnit = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1368. if (!pUnit) {
  1369. return false;
  1370. }
  1371. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  1372. if (!pTrig) {
  1373. return false;
  1374. }
  1375. return (pUnit->didExit(pTrig));
  1376. }
  1377. //-------------------------------------------------------------------------------------------------
  1378. /** evaluateTeamEnteredAreaEntirely */
  1379. //-------------------------------------------------------------------------------------------------
  1380. Bool ScriptConditions::evaluateTeamEnteredAreaEntirely(Parameter *pTeamParm, Parameter *pTriggerParm, Parameter *pTypeParm)
  1381. {
  1382. Team* pTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  1383. if (!pTeam) {
  1384. return false;
  1385. }
  1386. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  1387. if (pTrig) {
  1388. return pTeam->didAllEnter(pTrig, (UnsignedInt)pTypeParm->getInt());
  1389. }
  1390. return false;
  1391. }
  1392. //-------------------------------------------------------------------------------------------------
  1393. /** evaluateTeamEnteredAreaPartially */
  1394. //-------------------------------------------------------------------------------------------------
  1395. Bool ScriptConditions::evaluateTeamEnteredAreaPartially(Parameter *pTeamParm, Parameter *pTriggerParm, Parameter *pTypeParm)
  1396. {
  1397. Team* pTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  1398. if (!pTeam) {
  1399. return false;
  1400. }
  1401. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  1402. if (pTrig) {
  1403. return pTeam->didPartialEnter(pTrig, (UnsignedInt)pTypeParm->getInt());
  1404. }
  1405. return false;
  1406. }
  1407. //-------------------------------------------------------------------------------------------------
  1408. /** evaluateTeamExitedAreaEntirely */
  1409. //-------------------------------------------------------------------------------------------------
  1410. Bool ScriptConditions::evaluateTeamExitedAreaEntirely(Parameter *pTeamParm, Parameter *pTriggerParm, Parameter *pTypeParm)
  1411. {
  1412. Team* pTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  1413. if (!pTeam) {
  1414. return false;
  1415. }
  1416. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  1417. if (!pTrig) {
  1418. return false;
  1419. }
  1420. return (pTeam->didAllExit(pTrig, (UnsignedInt)pTypeParm->getInt()));
  1421. }
  1422. //-------------------------------------------------------------------------------------------------
  1423. /** evaluateTeamExitedAreaPartially */
  1424. //-------------------------------------------------------------------------------------------------
  1425. Bool ScriptConditions::evaluateTeamExitedAreaPartially(Parameter *pTeamParm, Parameter *pTriggerParm, Parameter *pTypeParm)
  1426. {
  1427. Team* pTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  1428. if (!pTeam) {
  1429. return false;
  1430. }
  1431. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  1432. if (!pTrig) {
  1433. return false;
  1434. }
  1435. return (pTeam->didPartialExit(pTrig, (UnsignedInt)pTypeParm->getInt()));
  1436. }
  1437. //-------------------------------------------------------------------------------------------------
  1438. /** evaluateMultiplayerAlliedVictory */
  1439. //-------------------------------------------------------------------------------------------------
  1440. Bool ScriptConditions::evaluateMultiplayerAlliedVictory(void)
  1441. {
  1442. return TheVictoryConditions->isLocalAlliedVictory();
  1443. }
  1444. //-------------------------------------------------------------------------------------------------
  1445. /** evaluateMultiplayerAlliedDefeat */
  1446. //-------------------------------------------------------------------------------------------------
  1447. Bool ScriptConditions::evaluateMultiplayerAlliedDefeat(void)
  1448. {
  1449. return TheVictoryConditions->isLocalAlliedDefeat();
  1450. }
  1451. //-------------------------------------------------------------------------------------------------
  1452. /** evaluateMultiplayerPlayerDefeat */
  1453. //-------------------------------------------------------------------------------------------------
  1454. Bool ScriptConditions::evaluateMultiplayerPlayerDefeat(void)
  1455. {
  1456. return TheVictoryConditions->isLocalDefeat() && !TheVictoryConditions->isLocalAlliedDefeat();
  1457. }
  1458. //-------------------------------------------------------------------------------------------------
  1459. /** evaluatePlayerUnitCondition */
  1460. //-------------------------------------------------------------------------------------------------
  1461. Bool ScriptConditions::evaluatePlayerUnitCondition(Condition *pCondition, Parameter *pPlayerParm, Parameter *pComparisonParm, Parameter *pCountParm, Parameter *pUnitTypeParm)
  1462. {
  1463. if (pCondition->getCustomData()!=0) {
  1464. // We have a cached value.
  1465. if (TheScriptEngine->getFrameObjectCountChanged()+1 < TheGameLogic->getFrame()) {
  1466. // object count hasn't changed recently. Use cached value.
  1467. if (pCondition->getCustomData()==1) return true;
  1468. if (pCondition->getCustomData()==-1) return false;
  1469. }
  1470. }
  1471. Player* pPlayer = playerFromParam(pPlayerParm);
  1472. if (!pPlayer) {
  1473. return false;
  1474. }
  1475. ObjectTypesTemp types;
  1476. objectTypesFromParam(pUnitTypeParm, types.m_types);
  1477. std::vector<Int> counts;
  1478. std::vector<const ThingTemplate *> templates;
  1479. Int numObjs = types.m_types->prepForPlayerCounting(templates, counts);
  1480. Int count = 0;
  1481. if (numObjs > 0) {
  1482. pPlayer->countObjectsByThingTemplate(numObjs, &(*templates.begin()), false, &(*counts.begin()));
  1483. count = rts::sum(counts);
  1484. }
  1485. Bool comparison = false;
  1486. switch (pComparisonParm->getInt())
  1487. {
  1488. case Parameter::LESS_THAN : comparison = (count < pCountParm->getInt()); break;
  1489. case Parameter::LESS_EQUAL : comparison = (count <= pCountParm->getInt()); break;
  1490. case Parameter::EQUAL : comparison = (count == pCountParm->getInt()); break;
  1491. case Parameter::GREATER_EQUAL : comparison = (count >= pCountParm->getInt()); break;
  1492. case Parameter::GREATER : comparison = (count > pCountParm->getInt()); break;
  1493. case Parameter::NOT_EQUAL : comparison = (count != pCountParm->getInt()); break;
  1494. default:
  1495. DEBUG_CRASH(("ScriptConditions::evaluatePlayerUnitCondition: Invalid comparison type. (jkmcd)"));
  1496. break;
  1497. }
  1498. pCondition->setCustomData(-1); // false.
  1499. if (comparison) {
  1500. pCondition->setCustomData(1); // true.
  1501. }
  1502. return comparison;
  1503. }
  1504. //-------------------------------------------------------------------------------------------------
  1505. /** evaluatePlayerHasComparisonPercentPower */
  1506. //-------------------------------------------------------------------------------------------------
  1507. Bool ScriptConditions::evaluatePlayerHasComparisonPercentPower(Parameter *pPlayerParm, Parameter *pComparisonParm, Parameter *pPercentParm)
  1508. {
  1509. Player* pPlayer = playerFromParam(pPlayerParm);
  1510. if (!pPlayer) {
  1511. return false;
  1512. }
  1513. Real powerRatio = pPlayer->getEnergy()->getEnergySupplyRatio();
  1514. Real testRatio = pPercentParm->getInt()/100.0f;
  1515. switch (pComparisonParm->getInt())
  1516. {
  1517. case Parameter::LESS_THAN : return (powerRatio < testRatio);
  1518. case Parameter::LESS_EQUAL : return (powerRatio <= testRatio);
  1519. case Parameter::EQUAL : return (powerRatio == testRatio);
  1520. case Parameter::GREATER_EQUAL : return (powerRatio >= testRatio);
  1521. case Parameter::GREATER : return (powerRatio > testRatio);
  1522. case Parameter::NOT_EQUAL: return (powerRatio != testRatio);
  1523. }
  1524. return false;
  1525. }
  1526. //-------------------------------------------------------------------------------------------------
  1527. /** evaluatePlayerHasComparisonValueExcessPower */
  1528. //-------------------------------------------------------------------------------------------------
  1529. Bool ScriptConditions::evaluatePlayerHasComparisonValueExcessPower(Parameter *pPlayerParm, Parameter *pComparisonParm, Parameter *pKWHParm)
  1530. {
  1531. Player* pPlayer = playerFromParam(pPlayerParm);
  1532. if (!pPlayer) {
  1533. return false;
  1534. }
  1535. Int desiredKilowattExcess = pKWHParm->getInt();
  1536. Int actualKilowats = pPlayer->getEnergy()->getProduction() - pPlayer->getEnergy()->getConsumption();
  1537. switch (pComparisonParm->getInt())
  1538. {
  1539. case Parameter::LESS_THAN : return (actualKilowats < desiredKilowattExcess);
  1540. case Parameter::LESS_EQUAL : return (actualKilowats <= desiredKilowattExcess);
  1541. case Parameter::EQUAL : return (actualKilowats == desiredKilowattExcess);
  1542. case Parameter::GREATER_EQUAL : return (actualKilowats >= desiredKilowattExcess);
  1543. case Parameter::GREATER : return (actualKilowats > desiredKilowattExcess);
  1544. case Parameter::NOT_EQUAL: return (actualKilowats != desiredKilowattExcess);
  1545. }
  1546. return false;
  1547. }
  1548. //-------------------------------------------------------------------------------------------------
  1549. /** evaluateSkirmishSpecialPowerIsReady - does any unit have this special power ready to use? */
  1550. //-------------------------------------------------------------------------------------------------
  1551. Bool ScriptConditions::evaluateSkirmishSpecialPowerIsReady(Parameter *pSkirmishPlayerParm, Parameter *pPower)
  1552. {
  1553. if (pPower->getInt() == -1) return false;
  1554. if (pPower->getInt()>0 && pPower->getInt()>TheGameLogic->getFrame()) {
  1555. return false;
  1556. }
  1557. Int nextFrame = TheGameLogic->getFrame() + 10*LOGICFRAMES_PER_SECOND;
  1558. const SpecialPowerTemplate *power = TheSpecialPowerStore->findSpecialPowerTemplate(pPower->getString());
  1559. if (power==NULL) {
  1560. pPower->friend_setInt(-1); // flag as never true.
  1561. return false;
  1562. }
  1563. Bool found = false;
  1564. Player::PlayerTeamList::const_iterator it;
  1565. Player *pPlayer = playerFromParam(pSkirmishPlayerParm);
  1566. if (pPlayer==NULL)
  1567. return false;
  1568. for (it = pPlayer->getPlayerTeams()->begin(); it != pPlayer->getPlayerTeams()->end(); ++it) {
  1569. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  1570. Team *team = iter.cur();
  1571. if (!team) continue;
  1572. for (DLINK_ITERATOR<Object> iter = team->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  1573. Object *pObj = iter.cur();
  1574. if (!pObj) continue;
  1575. if ( BitTest( pObj->getStatusBits(), OBJECT_STATUS_UNDER_CONSTRUCTION ) || pObj->isDisabled() )
  1576. {
  1577. continue; // can't fire if under construction or disabled.
  1578. }
  1579. SpecialPowerModuleInterface *mod = pObj->getSpecialPowerModule(power);
  1580. if (mod)
  1581. {
  1582. if (!TheSpecialPowerStore->canUseSpecialPower(pObj, power)) {
  1583. continue;
  1584. }
  1585. found = true;
  1586. if (mod->isReady()) return true;
  1587. if (mod->getReadyFrame()<nextFrame) nextFrame = mod->getReadyFrame();
  1588. }
  1589. }
  1590. }
  1591. }
  1592. pPower->friend_setInt(nextFrame);
  1593. return false;
  1594. }
  1595. //-------------------------------------------------------------------------------------------------
  1596. /** evaluatePlayerDestroyedNOrMoreBuildings */
  1597. //-------------------------------------------------------------------------------------------------
  1598. Bool ScriptConditions::evaluatePlayerDestroyedNOrMoreBuildings(Parameter *pPlayerParm, Parameter *pNumParm, Parameter *pOpponentParm)
  1599. {
  1600. Player* pPlayer = playerFromParam(pPlayerParm);
  1601. Player* pOpponent = playerFromParam(pOpponentParm);
  1602. //Int N = pNumParm->getInt();
  1603. if (!pPlayer || !pOpponent) {
  1604. return false;
  1605. }
  1606. /// @todo CLH implement me!
  1607. return FALSE;
  1608. }
  1609. //-------------------------------------------------------------------------------------------------
  1610. /** evaluateUnitHasEmptied */
  1611. //-------------------------------------------------------------------------------------------------
  1612. Bool ScriptConditions::evaluateUnitHasEmptied(Parameter *pUnitParm)
  1613. {
  1614. Object *object = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1615. if (!object) {
  1616. return false;
  1617. }
  1618. // have we checked this one before?
  1619. TransportStatus *stats = s_transportStatuses;
  1620. while (stats) {
  1621. if (stats->m_objID == object->getID()) {
  1622. break;
  1623. }
  1624. stats = stats->m_nextStatus;
  1625. }
  1626. ContainModuleInterface *cmi = object->getContain();
  1627. Int numPeeps = cmi ? cmi->getContainCount() : 0;
  1628. UnsignedInt frameNum = TheGameLogic->getFrame();
  1629. if (stats == NULL)
  1630. {
  1631. TransportStatus *transportStatus = newInstance(TransportStatus);
  1632. transportStatus->m_objID = object->getID();
  1633. transportStatus->m_frameNumber = frameNum;
  1634. transportStatus->m_unitCount = numPeeps;
  1635. transportStatus->m_nextStatus = s_transportStatuses;
  1636. s_transportStatuses = transportStatus;
  1637. return false;
  1638. }
  1639. if (stats->m_frameNumber == frameNum - 1) {
  1640. if (stats->m_unitCount > 0 && numPeeps == 0) {
  1641. // don't actually update the info on this round, because we want to make sure that
  1642. // multiple calls to this in the same frame actually work.
  1643. return true;
  1644. }
  1645. }
  1646. // perform the update.
  1647. stats->m_frameNumber = frameNum;
  1648. stats->m_unitCount = numPeeps;
  1649. return false;
  1650. }
  1651. //-------------------------------------------------------------------------------------------------
  1652. Bool ScriptConditions::evaluateTeamIsContained(Parameter *pTeamParm, Bool allContained)
  1653. {
  1654. Team* pTeam = TheScriptEngine->getTeamNamed(pTeamParm->getString());
  1655. if (!pTeam) {
  1656. return false;
  1657. }
  1658. Bool anyConsidered = FALSE;
  1659. for (DLINK_ITERATOR<Object> iter = pTeam->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  1660. Object *obj = iter.cur();
  1661. if (!obj) {
  1662. continue;
  1663. }
  1664. Bool isContained = (obj->getContainedBy() != NULL);
  1665. if (!isContained) {
  1666. // we could still be exiting, in which case we should pretend like we are contained.
  1667. AIUpdateInterface *ai = obj->getAIUpdateInterface();
  1668. if (ai) {
  1669. isContained = (isContained && (ai->getCurrentStateID() == AI_EXIT));
  1670. }
  1671. }
  1672. if (isContained) {
  1673. if (!allContained) {
  1674. return TRUE;
  1675. }
  1676. } else {
  1677. if (allContained) {
  1678. return FALSE;
  1679. }
  1680. }
  1681. anyConsidered = TRUE;
  1682. }
  1683. if (anyConsidered) {
  1684. return allContained;
  1685. }
  1686. return FALSE;
  1687. }
  1688. //-------------------------------------------------------------------------------------------------
  1689. Bool ScriptConditions::evaluateUnitHasObjectStatus(Parameter *pUnitParm, Parameter *pObjectStatus)
  1690. {
  1691. Object *object = TheScriptEngine->getUnitNamed(pUnitParm->getString());
  1692. if (!object) {
  1693. return false;
  1694. }
  1695. return ((object->getStatusBits() & pObjectStatus->getInt()) != 0);
  1696. }
  1697. //-------------------------------------------------------------------------------------------------
  1698. Bool ScriptConditions::evaluateTeamHasObjectStatus(Parameter *pTeamParm, Parameter *pObjectStatus, Bool entireTeam)
  1699. {
  1700. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  1701. if (!theTeam) {
  1702. return false;
  1703. }
  1704. for (DLINK_ITERATOR<Object> iter = theTeam->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  1705. Object *pObj = iter.cur();
  1706. if (!pObj) {
  1707. return false;
  1708. }
  1709. Bool currObj = pObj->getStatusBits() & pObjectStatus->getInt();
  1710. if (entireTeam && !currObj) {
  1711. return false;
  1712. } else if (!entireTeam && currObj) {
  1713. return true;
  1714. }
  1715. }
  1716. if (entireTeam) {
  1717. return true;
  1718. }
  1719. return false;
  1720. }
  1721. //-------------------------------------------------------------------------------------------------
  1722. // @todo: PERF_EVALUATE Get a perf timer on this. Should we adjust this function so that it runs like
  1723. // evaluatePlayerHasUnitKindInArea
  1724. // ?
  1725. Bool ScriptConditions::evaluateSkirmishValueInArea(Condition *pCondition, Parameter *pSkirmishPlayerParm, Parameter *pComparisonParm, Parameter *pMoneyParm, Parameter *pTriggerParm)
  1726. {
  1727. Player *player = playerFromParam(pSkirmishPlayerParm);
  1728. if (!player) {
  1729. return false;
  1730. }
  1731. AsciiString triggerName = pTriggerParm->getString();
  1732. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  1733. if (!pTrig) {
  1734. return false;
  1735. }
  1736. Player::PlayerTeamList::const_iterator it;
  1737. Bool anyChanges = false;
  1738. if (pCondition->getCustomData() == 0) anyChanges = true;
  1739. for (it = player->getPlayerTeams()->begin(); it != player->getPlayerTeams()->end(); ++it) {
  1740. if (anyChanges) break;
  1741. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  1742. if (anyChanges) break;
  1743. Team *team = iter.cur();
  1744. if (!team) {
  1745. continue;
  1746. }
  1747. if (team->didEnterOrExit()) {
  1748. anyChanges = true;
  1749. }
  1750. }
  1751. }
  1752. if (TheScriptEngine->getFrameObjectCountChanged()+1 >= TheGameLogic->getFrame()) {
  1753. anyChanges = true; // Objects were added/deleted last frame, so count could have changed. jba.
  1754. }
  1755. if (!anyChanges) {
  1756. if (pCondition->getCustomData()==-1) return false;
  1757. if (pCondition->getCustomData()==1) return true;
  1758. }
  1759. Int totalCost = 0;
  1760. for (it = player->getPlayerTeams()->begin(); it != player->getPlayerTeams()->end(); ++it) {
  1761. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  1762. Team *team = iter.cur();
  1763. if (!team) {
  1764. continue;
  1765. }
  1766. for (DLINK_ITERATOR<Object> iter = team->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  1767. Object *pObj = iter.cur();
  1768. if (!pObj) {
  1769. continue;
  1770. }
  1771. if (!pObj->isKindOf(KINDOF_INERT) && pObj->isInside(pTrig)) {
  1772. if (!pObj->isEffectivelyDead()) {
  1773. const ThingTemplate *tt = pObj->getTemplate();
  1774. if (!tt) {
  1775. continue;
  1776. }
  1777. totalCost += tt->friend_getBuildCost();
  1778. }
  1779. }
  1780. }
  1781. }
  1782. }
  1783. Bool comparison = false;
  1784. switch (pComparisonParm->getInt())
  1785. {
  1786. case Parameter::LESS_THAN : comparison = (totalCost < pMoneyParm->getInt()); break;
  1787. case Parameter::LESS_EQUAL : comparison = (totalCost <= pMoneyParm->getInt()); break;
  1788. case Parameter::EQUAL : comparison = (totalCost == pMoneyParm->getInt()); break;
  1789. case Parameter::GREATER_EQUAL : comparison = (totalCost >= pMoneyParm->getInt()); break;
  1790. case Parameter::GREATER : comparison = (totalCost > pMoneyParm->getInt()); break;
  1791. case Parameter::NOT_EQUAL : comparison = (totalCost != pMoneyParm->getInt()); break;
  1792. default:
  1793. DEBUG_CRASH(("ScriptConditions::evaluateSkirmishValueInArea: Invalid comparison type. (jkmcd)"));
  1794. break;
  1795. }
  1796. pCondition->setCustomData(-1); // false.
  1797. if (comparison) {
  1798. pCondition->setCustomData(1); // true.
  1799. }
  1800. return comparison;
  1801. }
  1802. //-------------------------------------------------------------------------------------------------
  1803. Bool ScriptConditions::evaluateSkirmishPlayerIsFaction(Parameter *pSkirmishPlayerParm, Parameter *pFactionParm)
  1804. {
  1805. Player *player = playerFromParam(pSkirmishPlayerParm);
  1806. if (!player) {
  1807. return false;
  1808. }
  1809. return (player->getSide() == pFactionParm->getString());
  1810. }
  1811. //-------------------------------------------------------------------------------------------------
  1812. Bool ScriptConditions::evaluateSkirmishSuppliesWithinDistancePerimeter(Parameter *pSkirmishPlayerParm, Parameter *pDistanceParm, Parameter *pLocationParm, Parameter *pValueParm)
  1813. {
  1814. Player *player = playerFromParam(pSkirmishPlayerParm);
  1815. if (!player) {
  1816. return false;
  1817. }
  1818. PolygonTrigger *trigger = TheScriptEngine->getQualifiedTriggerAreaByName(pLocationParm->getString());
  1819. if (!trigger) {
  1820. return false;
  1821. }
  1822. Coord3D center;
  1823. trigger->getCenterPoint(&center);
  1824. Real distance = trigger->getRadius() + pDistanceParm->getReal();
  1825. Real compareToValue = pValueParm->getReal();
  1826. PartitionFilterAcceptByKindOf f1(MAKE_KINDOF_MASK(KINDOF_STRUCTURE), KINDOFMASK_NONE);
  1827. PartitionFilterPlayerAffiliation f2(player, ALLOW_NEUTRAL, true);
  1828. PartitionFilterOnMap filterMapStatus;
  1829. PartitionFilter *filters[] = { &f1, &f2, &filterMapStatus, 0 };
  1830. SimpleObjectIterator *iter = ThePartitionManager->iterateObjectsInRange(&center, distance, FROM_CENTER_2D, filters, ITER_FASTEST);
  1831. MemoryPoolObjectHolder hold(iter);
  1832. Real maxValue = 0;
  1833. for (Object *them = iter->first(); them; them = iter->next()) {
  1834. static const NameKeyType key_warehouseUpdate = NAMEKEY("SupplyWarehouseDockUpdate");
  1835. SupplyWarehouseDockUpdate *warehouseModule = (SupplyWarehouseDockUpdate*) them->findUpdateModule( key_warehouseUpdate );
  1836. if (!warehouseModule) {
  1837. continue;
  1838. }
  1839. Real value = player->getSupplyBoxValue() * warehouseModule->getBoxesStored();
  1840. if (value > maxValue) {
  1841. maxValue = value;
  1842. }
  1843. }
  1844. return maxValue > compareToValue;
  1845. }
  1846. //-------------------------------------------------------------------------------------------------
  1847. // @todo: PERF_EVALUATE PERF_WARNING
  1848. // If this is called multiple times per frame, the cost could add up. This will infrequently (read:
  1849. // never) change, so it shouldn't be called very often. jkmcd
  1850. Bool ScriptConditions::evaluateSkirmishPlayerTechBuildingWithinDistancePerimeter(Condition *pCondition, Parameter *pSkirmishPlayerParm, Parameter *pDistanceParm, Parameter *pLocationParm)
  1851. {
  1852. Player *player = playerFromParam(pSkirmishPlayerParm);
  1853. if (!player) {
  1854. return false;
  1855. }
  1856. if (pCondition->getCustomData()==1) return true;
  1857. if (pCondition->getCustomData()==-1) return false;
  1858. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pLocationParm->getString());
  1859. if (!pTrig) {
  1860. return false;
  1861. }
  1862. Coord3D center;
  1863. pTrig->getCenterPoint(&center);
  1864. Real radius = pTrig->getRadius() + pDistanceParm->getReal();
  1865. PartitionFilterAcceptByKindOf f1(MAKE_KINDOF_MASK(KINDOF_TECH_BUILDING), KINDOFMASK_NONE);
  1866. PartitionFilterPlayerAffiliation f2(player, ALLOW_ALLIES, false);
  1867. PartitionFilterPlayer f3(player, false); // Don't find your own units, as our affiliation to self is neutral.
  1868. PartitionFilterOnMap filterMapStatus;
  1869. PartitionFilter *filters[] = { &f1, &f2, &f3, &filterMapStatus, 0 };
  1870. Bool comparison = ThePartitionManager->getClosestObject(&center, radius, FROM_CENTER_2D, filters) != NULL;
  1871. pCondition->setCustomData(-1); // false.
  1872. if (comparison) {
  1873. pCondition->setCustomData(1); // true.
  1874. }
  1875. return comparison;
  1876. }
  1877. //-------------------------------------------------------------------------------------------------
  1878. Bool ScriptConditions::evaluateSkirmishCommandButtonIsReady( Parameter * /* pSkirmishPlayerParm */, Parameter *pTeamParm, Parameter *pCommandButtonParm, Bool allReady )
  1879. {
  1880. // In this one case, the pSkirmishPlayerParm isn't used.
  1881. Team *theTeam = TheScriptEngine->getTeamNamed( pTeamParm->getString() );
  1882. if (!theTeam) {
  1883. return false;
  1884. }
  1885. const CommandButton *commandButton = TheControlBar->findCommandButton( pCommandButtonParm->getString() );
  1886. if( !commandButton ) {
  1887. return false;
  1888. }
  1889. for (DLINK_ITERATOR<Object> iter = theTeam->iterate_TeamMemberList(); !iter.done(); iter.advance()) {
  1890. Object *pObj = iter.cur();
  1891. if (commandButton->getSpecialPowerTemplate()) {
  1892. if( !pObj->hasSpecialPower( commandButton->getSpecialPowerTemplate()->getSpecialPowerType() ) ) {
  1893. continue;
  1894. }
  1895. } else if (!commandButton->getUpgradeTemplate()) {
  1896. continue;
  1897. }
  1898. if (commandButton->isReady(pObj)) {
  1899. if (!allReady) {
  1900. return true;
  1901. }
  1902. } else {
  1903. if (allReady) {
  1904. return false;
  1905. }
  1906. }
  1907. }
  1908. return allReady;
  1909. }
  1910. //-------------------------------------------------------------------------------------------------
  1911. Bool ScriptConditions::evaluateSkirmishUnownedFactionUnitComparison( Parameter * /*pSkirmishPlayerParm*/, Parameter *pComparisonParm, Parameter *pCountParm )
  1912. {
  1913. Player *player = ThePlayerList->getNeutralPlayer();
  1914. if (!player) {
  1915. return FALSE;
  1916. }
  1917. // Note: This looks slow, but in practice it shouldn't be. The neutral player shouldn't really ever
  1918. // have more than one team.
  1919. Int numFactionUnits = 0;
  1920. Player::PlayerTeamList::const_iterator it;
  1921. for (it = player->getPlayerTeams()->begin(); it != player->getPlayerTeams()->end(); ++it) {
  1922. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  1923. Team *team = iter.cur();
  1924. if (!team) {
  1925. continue;
  1926. }
  1927. for (DLINK_ITERATOR<Object> objIter = team->iterate_TeamMemberList(); !objIter.done(); objIter.advance()) {
  1928. Object *obj = objIter.cur();
  1929. if (!obj) {
  1930. continue;
  1931. }
  1932. if( obj->isDisabledByType( DISABLED_UNMANNED ) )
  1933. {
  1934. ++numFactionUnits;
  1935. }
  1936. }
  1937. }
  1938. }
  1939. switch (pComparisonParm->getInt())
  1940. {
  1941. case Parameter::LESS_THAN : return numFactionUnits < pCountParm->getInt(); break;
  1942. case Parameter::LESS_EQUAL : return numFactionUnits <= pCountParm->getInt(); break;
  1943. case Parameter::EQUAL : return numFactionUnits == pCountParm->getInt(); break;
  1944. case Parameter::GREATER_EQUAL : return numFactionUnits >= pCountParm->getInt(); break;
  1945. case Parameter::GREATER : return numFactionUnits > pCountParm->getInt(); break;
  1946. case Parameter::NOT_EQUAL : return numFactionUnits != pCountParm->getInt(); break;
  1947. }
  1948. DEBUG_CRASH(("ScriptConditions::evaluateSkirmishUnownedFactionUnitComparison: Invalid comparison type. (jkmcd)"));
  1949. return FALSE;
  1950. }
  1951. //-------------------------------------------------------------------------------------------------
  1952. Bool ScriptConditions::evaluateSkirmishPlayerHasPrereqsToBuild( Parameter *pSkirmishPlayerParm, Parameter *pObjectTypeParm )
  1953. {
  1954. Player *player = playerFromParam(pSkirmishPlayerParm);
  1955. if (!player) {
  1956. return FALSE;
  1957. }
  1958. ObjectTypesTemp types;
  1959. objectTypesFromParam(pObjectTypeParm, types.m_types);
  1960. return types.m_types->canBuildAny(player);
  1961. }
  1962. //-------------------------------------------------------------------------------------------------
  1963. Bool ScriptConditions::evaluateSkirmishPlayerHasComparisonGarrisoned(Parameter *pSkirmishPlayerParm, Parameter *pComparisonParm, Parameter *pCountParm )
  1964. {
  1965. Player *player = playerFromParam(pSkirmishPlayerParm);
  1966. if (!player) {
  1967. return FALSE;
  1968. }
  1969. // Note: This looks slow, and probably is.
  1970. // @todo: PERF_EVALUATE
  1971. Int numGarrisonedBuildings = 0;
  1972. Player::PlayerTeamList::const_iterator it;
  1973. for (it = player->getPlayerTeams()->begin(); it != player->getPlayerTeams()->end(); ++it) {
  1974. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  1975. Team *team = iter.cur();
  1976. if (!team) {
  1977. continue;
  1978. }
  1979. for (DLINK_ITERATOR<Object> objIter = team->iterate_TeamMemberList(); !objIter.done(); objIter.advance()) {
  1980. Object *obj = objIter.cur();
  1981. if (!obj) {
  1982. continue;
  1983. }
  1984. ContainModuleInterface *cmi = obj->getContain();
  1985. if (!cmi) {
  1986. continue;
  1987. }
  1988. if (cmi->isGarrisonable() && cmi->getContainCount() > 0) {
  1989. ++numGarrisonedBuildings;
  1990. }
  1991. }
  1992. }
  1993. }
  1994. switch (pComparisonParm->getInt())
  1995. {
  1996. case Parameter::LESS_THAN : return numGarrisonedBuildings < pCountParm->getInt(); break;
  1997. case Parameter::LESS_EQUAL : return numGarrisonedBuildings <= pCountParm->getInt(); break;
  1998. case Parameter::EQUAL : return numGarrisonedBuildings == pCountParm->getInt(); break;
  1999. case Parameter::GREATER_EQUAL : return numGarrisonedBuildings >= pCountParm->getInt(); break;
  2000. case Parameter::GREATER : return numGarrisonedBuildings > pCountParm->getInt(); break;
  2001. case Parameter::NOT_EQUAL : return numGarrisonedBuildings != pCountParm->getInt(); break;
  2002. }
  2003. DEBUG_CRASH(("ScriptConditions::evaluateSkirmishPlayerHasComparisonGarrisoned: Invalid comparison type. (jkmcd)"));
  2004. return FALSE;
  2005. }
  2006. //-------------------------------------------------------------------------------------------------
  2007. Bool ScriptConditions::evaluateSkirmishPlayerHasComparisonCapturedUnits(Parameter *pSkirmishPlayerParm, Parameter *pComparisonParm, Parameter *pCountParm )
  2008. {
  2009. Player *player = playerFromParam(pSkirmishPlayerParm);
  2010. if (!player) {
  2011. return FALSE;
  2012. }
  2013. // Note: This looks slow, and probably is.
  2014. // @todo: PERF_EVALUATE
  2015. Int numCapturedUnits = 0;
  2016. Player::PlayerTeamList::const_iterator it;
  2017. for (it = player->getPlayerTeams()->begin(); it != player->getPlayerTeams()->end(); ++it) {
  2018. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  2019. Team *team = iter.cur();
  2020. if (!team) {
  2021. continue;
  2022. }
  2023. for (DLINK_ITERATOR<Object> objIter = team->iterate_TeamMemberList(); !objIter.done(); objIter.advance()) {
  2024. Object *obj = objIter.cur();
  2025. if (!obj) {
  2026. continue;
  2027. }
  2028. if (obj->isCaptured()) {
  2029. ++numCapturedUnits;
  2030. }
  2031. }
  2032. }
  2033. }
  2034. switch (pComparisonParm->getInt())
  2035. {
  2036. case Parameter::LESS_THAN : return numCapturedUnits < pCountParm->getInt(); break;
  2037. case Parameter::LESS_EQUAL : return numCapturedUnits <= pCountParm->getInt(); break;
  2038. case Parameter::EQUAL : return numCapturedUnits == pCountParm->getInt(); break;
  2039. case Parameter::GREATER_EQUAL : return numCapturedUnits >= pCountParm->getInt(); break;
  2040. case Parameter::GREATER : return numCapturedUnits > pCountParm->getInt(); break;
  2041. case Parameter::NOT_EQUAL : return numCapturedUnits != pCountParm->getInt(); break;
  2042. }
  2043. DEBUG_CRASH(("ScriptConditions::evaluateSkirmishPlayerHasComparisonCapturedUnits: Invalid comparison type. (jkmcd)"));
  2044. return FALSE;
  2045. }
  2046. //-------------------------------------------------------------------------------------------------
  2047. Bool ScriptConditions::evaluateSkirmishNamedAreaExists(Parameter *, Parameter *pTriggerParm)
  2048. {
  2049. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  2050. return (pTrig != NULL);
  2051. }
  2052. //-------------------------------------------------------------------------------------------------
  2053. Bool ScriptConditions::evaluateSkirmishPlayerHasUnitsInArea(Condition *pCondition, Parameter *pSkirmishPlayerParm, Parameter *pTriggerParm )
  2054. {
  2055. Player *player = playerFromParam(pSkirmishPlayerParm);
  2056. if (!player) {
  2057. return FALSE;
  2058. }
  2059. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  2060. if (!pTrig) {
  2061. return FALSE;
  2062. }
  2063. Player::PlayerTeamList::const_iterator it;
  2064. Bool anyChanges = false;
  2065. if (pCondition->getCustomData() == 0) anyChanges = true;
  2066. for (it = player->getPlayerTeams()->begin(); it != player->getPlayerTeams()->end(); ++it) {
  2067. if (anyChanges) break;
  2068. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  2069. if (anyChanges) break;
  2070. Team *team = iter.cur();
  2071. if (!team) {
  2072. continue;
  2073. }
  2074. if (team->didEnterOrExit()) {
  2075. anyChanges = true;
  2076. }
  2077. }
  2078. }
  2079. if (TheScriptEngine->getFrameObjectCountChanged()+1 >= TheGameLogic->getFrame()) {
  2080. anyChanges = true; // Objects were added/deleted last frame, so count could have changed. jba.
  2081. }
  2082. if (!anyChanges) {
  2083. if (pCondition->getCustomData()==-1) return false;
  2084. if (pCondition->getCustomData()==1) return true;
  2085. }
  2086. Coord3D center;
  2087. Real radius = pTrig->getRadius();
  2088. pTrig->getCenterPoint(&center);
  2089. PartitionFilterPlayer f1(player, true);
  2090. PartitionFilterPolygonTrigger f2(pTrig);
  2091. PartitionFilterOnMap filterMapStatus;
  2092. PartitionFilter *filters[] = { &f1, &f2, &filterMapStatus, 0 };
  2093. Object *obj = ThePartitionManager->getClosestObject(&center, radius, FROM_CENTER_2D, filters);
  2094. Bool condition = (obj!=NULL);
  2095. pCondition->setCustomData(-1); // false.
  2096. if (condition) {
  2097. pCondition->setCustomData(1); // true.
  2098. }
  2099. return condition;
  2100. }
  2101. //-------------------------------------------------------------------------------------------------
  2102. Bool ScriptConditions::evaluateSkirmishSupplySourceSafe(Condition *pCondition, Parameter *pSkirmishPlayerParm, Parameter *pMinSupplyAmount )
  2103. {
  2104. // Trigger every 32 frames on the 31st frame. jba.
  2105. Bool anyChanges = (TheGameLogic->getFrame() & 0x1F) == 0x1F;
  2106. if (!anyChanges) {
  2107. if (pCondition->getCustomData()==-1) return false;
  2108. if (pCondition->getCustomData()==1) return true;
  2109. }
  2110. Player *player = playerFromParam(pSkirmishPlayerParm);
  2111. if (!player) {
  2112. return FALSE;
  2113. }
  2114. Bool isSafe = player->isSupplySourceSafe(pMinSupplyAmount->getInt());
  2115. pCondition->setCustomData(-1); // false.
  2116. if (isSafe) {
  2117. pCondition->setCustomData(1); // true.
  2118. }
  2119. return isSafe;
  2120. }
  2121. //-------------------------------------------------------------------------------------------------
  2122. Bool ScriptConditions::evaluateSkirmishSupplySourceAttacked(Parameter *pSkirmishPlayerParm)
  2123. {
  2124. Player *player = playerFromParam(pSkirmishPlayerParm);
  2125. if (!player) {
  2126. return FALSE;
  2127. }
  2128. return player->isSupplySourceAttacked( );
  2129. }
  2130. //-------------------------------------------------------------------------------------------------
  2131. Bool ScriptConditions::evaluateSkirmishStartPosition(Parameter *pSkirmishPlayerParm, Parameter *pStartNdx)
  2132. {
  2133. Player *player = playerFromParam(pSkirmishPlayerParm);
  2134. if (!player) {
  2135. return FALSE;
  2136. }
  2137. Int ndx = pStartNdx->getInt()-1; // externally 1, 2, 3, internally 0, 1, 2.
  2138. Int startNdx = player->getMpStartIndex();
  2139. return ndx == startNdx;
  2140. }
  2141. //-------------------------------------------------------------------------------------------------
  2142. Bool ScriptConditions::evaluateSkirmishPlayerHasBeenAttackedByPlayer(Parameter *pSkirmishPlayerParm, Parameter *pAttackedByParm )
  2143. {
  2144. Player *player = playerFromParam(pSkirmishPlayerParm);
  2145. if (!player) {
  2146. return FALSE;
  2147. }
  2148. Player *srcPlayer = playerFromParam(pAttackedByParm);
  2149. if (!srcPlayer ) {
  2150. return FALSE;
  2151. }
  2152. return player->getAttackedBy(srcPlayer->getPlayerIndex());
  2153. }
  2154. //-------------------------------------------------------------------------------------------------
  2155. Bool ScriptConditions::evaluateSkirmishPlayerIsOutsideArea(Condition *pCondition, Parameter *pSkirmishPlayerParm, Parameter *pTriggerParm )
  2156. {
  2157. // Even though these will be prechecked in the other function, we want to preflight here as well.
  2158. Player *player = playerFromParam(pSkirmishPlayerParm);
  2159. if (!player) {
  2160. return FALSE;
  2161. }
  2162. PolygonTrigger *pTrig = TheScriptEngine->getQualifiedTriggerAreaByName(pTriggerParm->getString());
  2163. if (!pTrig) {
  2164. return FALSE;
  2165. }
  2166. return !evaluateSkirmishPlayerHasUnitsInArea(pCondition, pSkirmishPlayerParm, pTriggerParm);
  2167. }
  2168. //-------------------------------------------------------------------------------------------------
  2169. Bool ScriptConditions::evaluateSkirmishPlayerHasDiscoveredPlayer(Parameter *pSkirmishPlayerParm, Parameter *pDiscoveredByParm )
  2170. {
  2171. Player *player = playerFromParam(pSkirmishPlayerParm);
  2172. if (!player) {
  2173. return FALSE;
  2174. }
  2175. Player *discoveredBy = playerFromParam(pDiscoveredByParm);
  2176. if (!discoveredBy) {
  2177. return FALSE;
  2178. }
  2179. Int discoveredByIndex = discoveredBy->getPlayerIndex();
  2180. Player::PlayerTeamList::const_iterator it;
  2181. for (it = player->getPlayerTeams()->begin(); it != player->getPlayerTeams()->end(); ++it) {
  2182. for (DLINK_ITERATOR<Team> iter = (*it)->iterate_TeamInstanceList(); !iter.done(); iter.advance()) {
  2183. Team *team = iter.cur();
  2184. if (!team) {
  2185. continue;
  2186. }
  2187. for (DLINK_ITERATOR<Object> objIter = team->iterate_TeamMemberList(); !objIter.done(); objIter.advance()) {
  2188. Object *obj = objIter.cur();
  2189. if (!obj) {
  2190. continue;
  2191. }
  2192. ObjectShroudStatus shroudStatus = obj->getShroudedStatus(discoveredByIndex);
  2193. if (shroudStatus == OBJECTSHROUD_CLEAR || shroudStatus == OBJECTSHROUD_PARTIAL_CLEAR) {
  2194. return TRUE;
  2195. }
  2196. }
  2197. }
  2198. }
  2199. return FALSE;
  2200. }
  2201. //-------------------------------------------------------------------------------------------------
  2202. Bool ScriptConditions::evaluateMusicHasCompleted(Parameter *pMusicParm, Parameter *pIntParm)
  2203. {
  2204. AsciiString str = pMusicParm->getString();
  2205. return TheAudio->hasMusicTrackCompleted(str, pIntParm->getInt());
  2206. }
  2207. //-------------------------------------------------------------------------------------------------
  2208. Bool ScriptConditions::evaluatePlayerLostObjectType(Parameter *pPlayerParm, Parameter *pTypeParm)
  2209. {
  2210. Player *player = playerFromParam(pPlayerParm);
  2211. if (!player) {
  2212. return FALSE;
  2213. }
  2214. ObjectTypesTemp objs;
  2215. objectTypesFromParam(pTypeParm, objs.m_types);
  2216. std::vector<Int> counts;
  2217. std::vector<const ThingTemplate *> templates;
  2218. Int numTemplates = objs.m_types->prepForPlayerCounting(templates, counts);
  2219. if (numTemplates > 0) {
  2220. player->countObjectsByThingTemplate(numTemplates, &(*templates.begin()), true, &(*counts.begin()));
  2221. } else {
  2222. return FALSE;
  2223. }
  2224. Int sumOfObjs = rts::sum(counts);
  2225. Int currentCount = TheScriptEngine->getObjectCount(player->getPlayerIndex(), pTypeParm->getString());
  2226. if (sumOfObjs != currentCount) {
  2227. TheScriptEngine->setObjectCount(player->getPlayerIndex(), pTypeParm->getString(), sumOfObjs);
  2228. }
  2229. return (sumOfObjs < currentCount);
  2230. }
  2231. //-------------------------------------------------------------------------------------------------
  2232. /** Evaluate a condition */
  2233. //-------------------------------------------------------------------------------------------------
  2234. Bool ScriptConditions::evaluateCondition( Condition *pCondition )
  2235. {
  2236. switch (pCondition->getConditionType()) {
  2237. default:
  2238. DEBUG_CRASH(("Unknown ScriptCondition type %d", pCondition->getConditionType()));
  2239. return false;
  2240. case Condition::PLAYER_ALL_DESTROYED:
  2241. return evaluateAllDestroyed(pCondition->getParameter(0));
  2242. case Condition::PLAYER_ALL_BUILDFACILITIES_DESTROYED:
  2243. return evaluateAllBuildFacilitiesDestroyed(pCondition->getParameter(0));
  2244. case Condition::TEAM_INSIDE_AREA_PARTIALLY:
  2245. return evaluateTeamInsideAreaPartially(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2246. case Condition::NAMED_INSIDE_AREA:
  2247. return evaluateNamedInsideArea(pCondition->getParameter(0), pCondition->getParameter(1));
  2248. case Condition::TEAM_DESTROYED:
  2249. return evaluateIsDestroyed(pCondition->getParameter(0));
  2250. case Condition::NAMED_DESTROYED:
  2251. return evaluateNamedUnitDestroyed(pCondition->getParameter(0));
  2252. case Condition::NAMED_DYING:
  2253. return evaluateNamedUnitDying(pCondition->getParameter(0));
  2254. case Condition::NAMED_TOTALLY_DEAD:
  2255. return evaluateNamedUnitTotallyDead(pCondition->getParameter(0));
  2256. case Condition::NAMED_NOT_DESTROYED:
  2257. return evaluateNamedUnitExists(pCondition->getParameter(0));
  2258. case Condition::TEAM_HAS_UNITS:
  2259. return evaluateHasUnits(pCondition->getParameter(0));
  2260. case Condition::CAMERA_MOVEMENT_FINISHED:
  2261. return TheTacticalView->isCameraMovementFinished();
  2262. case Condition::TEAM_STATE_IS:
  2263. return evaluateTeamStateIs(pCondition->getParameter(0), pCondition->getParameter(1));
  2264. case Condition::TEAM_STATE_IS_NOT:
  2265. return evaluateTeamStateIsNot(pCondition->getParameter(0), pCondition->getParameter(1));
  2266. case Condition::NAMED_OUTSIDE_AREA:
  2267. return evaluateNamedOutsideArea(pCondition->getParameter(0), pCondition->getParameter(1));
  2268. case Condition::TEAM_INSIDE_AREA_ENTIRELY:
  2269. return evaluateTeamInsideAreaEntirely(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2270. case Condition::TEAM_OUTSIDE_AREA_ENTIRELY:
  2271. return evaluateTeamOutsideAreaEntirely(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2272. case Condition::NAMED_ATTACKED_BY_OBJECTTYPE:
  2273. return evaluateNamedAttackedByType(pCondition->getParameter(0), pCondition->getParameter(1));
  2274. case Condition::TEAM_ATTACKED_BY_OBJECTTYPE:
  2275. return evaluateTeamAttackedByType(pCondition->getParameter(0), pCondition->getParameter(1));
  2276. case Condition::NAMED_ATTACKED_BY_PLAYER:
  2277. return evaluateNamedAttackedByPlayer(pCondition->getParameter(0), pCondition->getParameter(1));
  2278. case Condition::TEAM_ATTACKED_BY_PLAYER:
  2279. return evaluateTeamAttackedByPlayer(pCondition->getParameter(0), pCondition->getParameter(1));
  2280. case Condition::BUILT_BY_PLAYER:
  2281. return evaluateBuiltByPlayer(pCondition, pCondition->getParameter(0), pCondition->getParameter(1));
  2282. case Condition::NAMED_CREATED:
  2283. return evaluateNamedCreated(pCondition->getParameter(0));
  2284. case Condition::TEAM_CREATED:
  2285. return evaluateTeamCreated(pCondition->getParameter(0));
  2286. case Condition::PLAYER_HAS_CREDITS:
  2287. return evaluatePlayerHasCredits(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2288. case Condition::BRIDGE_REPAIRED:
  2289. return evaluateBridgeRepaired(pCondition->getParameter(0));
  2290. case Condition::BRIDGE_BROKEN:
  2291. return evaluateBridgeBroken(pCondition->getParameter(0));
  2292. case Condition::NAMED_DISCOVERED:
  2293. return evaluateNamedDiscovered(pCondition->getParameter(0), pCondition->getParameter(1));
  2294. case Condition::TEAM_DISCOVERED:
  2295. return evaluateTeamDiscovered(pCondition->getParameter(0), pCondition->getParameter(1));
  2296. case Condition::BUILDING_ENTERED_BY_PLAYER:
  2297. return evaluateBuildingEntered(pCondition->getParameter(0), pCondition->getParameter(1));
  2298. case Condition::ENEMY_SIGHTED:
  2299. {
  2300. Int numParameters = pCondition->getNumParameters();
  2301. DEBUG_ASSERTCRASH(numParameters == 3, ("'Condition: [Unit] Unit has sighted a(n) friendly/neutral/enemy unit belonging to a side.' has too few parameters. Please fix in WB. (jkmcd)"));
  2302. if (numParameters < 3) {
  2303. return false;
  2304. }
  2305. return evaluateEnemySighted(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2306. }
  2307. case Condition::TYPE_SIGHTED:
  2308. return evaluateTypeSighted(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2309. case Condition::NAMED_BUILDING_IS_EMPTY:
  2310. return evaluateIsBuildingEmpty(pCondition->getParameter(0));
  2311. case Condition::MISSION_ATTEMPTS:
  2312. return evaluateMissionAttempts(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2313. case Condition::NAMED_OWNED_BY_PLAYER:
  2314. return evaluateNamedOwnedByPlayer(pCondition->getParameter(0), pCondition->getParameter(1));
  2315. case Condition::TEAM_OWNED_BY_PLAYER:
  2316. return evaluateTeamOwnedByPlayer(pCondition->getParameter(0), pCondition->getParameter(1));
  2317. case Condition::PLAYER_HAS_N_OR_FEWER_BUILDINGS:
  2318. return evaluatePlayerHasNOrFewerBuildings(pCondition->getParameter(1), pCondition->getParameter(0));
  2319. case Condition::PLAYER_HAS_N_OR_FEWER_FACTION_BUILDINGS:
  2320. return evaluatePlayerHasNOrFewerFactionBuildings(pCondition->getParameter(1), pCondition->getParameter(0));
  2321. case Condition::PLAYER_HAS_POWER:
  2322. return evaluatePlayerHasPower(pCondition->getParameter(0));
  2323. case Condition::PLAYER_HAS_NO_POWER:
  2324. return !evaluatePlayerHasPower(pCondition->getParameter(0));
  2325. case Condition::NAMED_REACHED_WAYPOINTS_END:
  2326. return evaluateNamedReachedWaypointsEnd(pCondition->getParameter(0), pCondition->getParameter(1));
  2327. case Condition::TEAM_REACHED_WAYPOINTS_END:
  2328. return evaluateTeamReachedWaypointsEnd(pCondition->getParameter(0), pCondition->getParameter(1));
  2329. case Condition::NAMED_SELECTED:
  2330. return evaluateNamedSelected(pCondition, pCondition->getParameter(0));
  2331. case Condition::NAMED_ENTERED_AREA:
  2332. return evaluateNamedEnteredArea(pCondition->getParameter(0), pCondition->getParameter(1));
  2333. case Condition::NAMED_EXITED_AREA:
  2334. return evaluateNamedExitedArea(pCondition->getParameter(0), pCondition->getParameter(1));
  2335. case Condition::TEAM_ENTERED_AREA_ENTIRELY:
  2336. return evaluateTeamEnteredAreaEntirely(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2337. case Condition::TEAM_ENTERED_AREA_PARTIALLY:
  2338. return evaluateTeamEnteredAreaPartially(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2339. case Condition::TEAM_EXITED_AREA_ENTIRELY:
  2340. return evaluateTeamExitedAreaEntirely(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2341. case Condition::TEAM_EXITED_AREA_PARTIALLY:
  2342. return evaluateTeamExitedAreaPartially(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2343. case Condition::MULTIPLAYER_ALLIED_VICTORY:
  2344. return evaluateMultiplayerAlliedVictory();
  2345. case Condition::MULTIPLAYER_ALLIED_DEFEAT:
  2346. return evaluateMultiplayerAlliedDefeat();
  2347. case Condition::MULTIPLAYER_PLAYER_DEFEAT:
  2348. return evaluateMultiplayerPlayerDefeat();
  2349. case Condition::HAS_FINISHED_VIDEO:
  2350. return evaluateVideoHasCompleted(pCondition->getParameter(0));
  2351. case Condition::HAS_FINISHED_SPEECH:
  2352. return evaluateSpeechHasCompleted(pCondition->getParameter(0));
  2353. case Condition::HAS_FINISHED_AUDIO:
  2354. return evaluateAudioHasCompleted(pCondition->getParameter(0));
  2355. case Condition::UNIT_HEALTH:
  2356. return evaluateUnitHealth(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2357. case Condition::PLAYER_TRIGGERED_SPECIAL_POWER:
  2358. return evaluatePlayerSpecialPowerFromUnitTriggered(pCondition->getParameter(0), pCondition->getParameter(1), NULL);
  2359. case Condition::PLAYER_TRIGGERED_SPECIAL_POWER_FROM_NAMED:
  2360. return evaluatePlayerSpecialPowerFromUnitTriggered(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2361. case Condition::PLAYER_MIDWAY_SPECIAL_POWER:
  2362. return evaluatePlayerSpecialPowerFromUnitMidway(pCondition->getParameter(0), pCondition->getParameter(1), NULL);
  2363. case Condition::PLAYER_MIDWAY_SPECIAL_POWER_FROM_NAMED:
  2364. return evaluatePlayerSpecialPowerFromUnitMidway(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2365. case Condition::PLAYER_COMPLETED_SPECIAL_POWER:
  2366. return evaluatePlayerSpecialPowerFromUnitComplete(pCondition->getParameter(0), pCondition->getParameter(1), NULL);
  2367. case Condition::PLAYER_COMPLETED_SPECIAL_POWER_FROM_NAMED:
  2368. return evaluatePlayerSpecialPowerFromUnitComplete(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2369. case Condition::PLAYER_ACQUIRED_SCIENCE:
  2370. return evaluateScienceAcquired(pCondition->getParameter(0), pCondition->getParameter(1));
  2371. case Condition::PLAYER_CAN_PURCHASE_SCIENCE:
  2372. return evaluateCanPurchaseScience(pCondition->getParameter(0), pCondition->getParameter(1));
  2373. case Condition::PLAYER_HAS_SCIENCEPURCHASEPOINTS:
  2374. return evaluateSciencePurchasePoints(pCondition->getParameter(0), pCondition->getParameter(1));
  2375. case Condition::DEFUNCT_PLAYER_SELECTED_GENERAL:
  2376. case Condition::DEFUNCT_PLAYER_SELECTED_GENERAL_FROM_NAMED:
  2377. DEBUG_CRASH(("PLAYER_SELECTED_GENERAL script conditions are no longer in use\n"));
  2378. return false;
  2379. case Condition::PLAYER_BUILT_UPGRADE:
  2380. return evaluateUpgradeFromUnitComplete(pCondition->getParameter(0), pCondition->getParameter(1), NULL);
  2381. case Condition::PLAYER_BUILT_UPGRADE_FROM_NAMED:
  2382. return evaluateUpgradeFromUnitComplete(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2383. case Condition::PLAYER_HAS_OBJECT_COMPARISON:
  2384. return evaluatePlayerUnitCondition(pCondition, pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2), pCondition->getParameter(3));
  2385. case Condition::PLAYER_DESTROYED_N_BUILDINGS_PLAYER:
  2386. return evaluatePlayerDestroyedNOrMoreBuildings(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2387. case Condition::PLAYER_HAS_COMPARISON_UNIT_TYPE_IN_TRIGGER_AREA:
  2388. {
  2389. Int numParameters = pCondition->getNumParameters();
  2390. DEBUG_ASSERTCRASH(numParameters == 5, ("'Condition: [Player] has (comparison) unit type in an area' has too few parameters. Please fix in WB. (jkmcd)"));
  2391. if (numParameters < 5) {
  2392. return false;
  2393. }
  2394. return evaluatePlayerHasUnitTypeInArea(pCondition, pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2), pCondition->getParameter(3), pCondition->getParameter(4));
  2395. }
  2396. case Condition::PLAYER_HAS_COMPARISON_UNIT_KIND_IN_TRIGGER_AREA:
  2397. {
  2398. Int numParameters = pCondition->getNumParameters();
  2399. DEBUG_ASSERTCRASH(numParameters == 5, ("'Condition: [Player] has (comparison) kind of unit or structure in an area' has too few parameters. Please fix in WB. (jkmcd)"));
  2400. if (numParameters < 5) {
  2401. return false;
  2402. }
  2403. return evaluatePlayerHasUnitKindInArea(pCondition, pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2), pCondition->getParameter(3), pCondition->getParameter(4));
  2404. }
  2405. case Condition::UNIT_EMPTIED:
  2406. return evaluateUnitHasEmptied(pCondition->getParameter(0));
  2407. case Condition::PLAYER_POWER_COMPARE_PERCENT:
  2408. return evaluatePlayerHasComparisonPercentPower(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2409. case Condition::PLAYER_EXCESS_POWER_COMPARE_VALUE:
  2410. return evaluatePlayerHasComparisonValueExcessPower(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2411. case Condition::SKIRMISH_SPECIAL_POWER_READY:
  2412. return evaluateSkirmishSpecialPowerIsReady(pCondition->getParameter(0), pCondition->getParameter(1));
  2413. case Condition::UNIT_HAS_OBJECT_STATUS:
  2414. return evaluateUnitHasObjectStatus(pCondition->getParameter(0), pCondition->getParameter(1));
  2415. case Condition::TEAM_ALL_HAS_OBJECT_STATUS:
  2416. return evaluateTeamHasObjectStatus(pCondition->getParameter(0), pCondition->getParameter(1), true);
  2417. case Condition::TEAM_SOME_HAVE_OBJECT_STATUS:
  2418. return evaluateTeamHasObjectStatus(pCondition->getParameter(0), pCondition->getParameter(1), false);
  2419. case Condition::SKIRMISH_VALUE_IN_AREA:
  2420. return evaluateSkirmishValueInArea(pCondition, pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2), pCondition->getParameter(3));
  2421. case Condition::SKIRMISH_PLAYER_FACTION:
  2422. return evaluateSkirmishPlayerIsFaction(pCondition->getParameter(0), pCondition->getParameter(1));
  2423. case Condition::SKIRMISH_SUPPLIES_VALUE_WITHIN_DISTANCE:
  2424. return evaluateSkirmishSuppliesWithinDistancePerimeter(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2), pCondition->getParameter(3));
  2425. case Condition::SKIRMISH_TECH_BUILDING_WITHIN_DISTANCE:
  2426. return evaluateSkirmishPlayerTechBuildingWithinDistancePerimeter(pCondition, pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2427. case Condition::SKIRMISH_COMMAND_BUTTON_READY_ALL:
  2428. return evaluateSkirmishCommandButtonIsReady(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2), true);
  2429. case Condition::SKIRMISH_COMMAND_BUTTON_READY_PARTIAL:
  2430. return evaluateSkirmishCommandButtonIsReady(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2), false);
  2431. case Condition::SKIRMISH_UNOWNED_FACTION_UNIT_EXISTS:
  2432. return evaluateSkirmishUnownedFactionUnitComparison(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2433. case Condition::SKIRMISH_PLAYER_HAS_PREREQUISITE_TO_BUILD:
  2434. return evaluateSkirmishPlayerHasPrereqsToBuild(pCondition->getParameter(0), pCondition->getParameter(1));
  2435. case Condition::SKIRMISH_PLAYER_HAS_COMPARISON_GARRISONED:
  2436. return evaluateSkirmishPlayerHasComparisonGarrisoned(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2437. case Condition::SKIRMISH_PLAYER_HAS_COMPARISON_CAPTURED_UNITS:
  2438. return evaluateSkirmishPlayerHasComparisonCapturedUnits(pCondition->getParameter(0), pCondition->getParameter(1), pCondition->getParameter(2));
  2439. case Condition::SKIRMISH_NAMED_AREA_EXIST:
  2440. return evaluateSkirmishNamedAreaExists(pCondition->getParameter(0), pCondition->getParameter(1));
  2441. case Condition::SKIRMISH_PLAYER_HAS_UNITS_IN_AREA:
  2442. return evaluateSkirmishPlayerHasUnitsInArea(pCondition, pCondition->getParameter(0), pCondition->getParameter(1));
  2443. case Condition::SKIRMISH_PLAYER_HAS_BEEN_ATTACKED_BY_PLAYER:
  2444. return evaluateSkirmishPlayerHasBeenAttackedByPlayer(pCondition->getParameter(0), pCondition->getParameter(1));
  2445. case Condition::SKIRMISH_PLAYER_IS_OUTSIDE_AREA:
  2446. return evaluateSkirmishPlayerIsOutsideArea(pCondition, pCondition->getParameter(0), pCondition->getParameter(1));
  2447. case Condition::SKIRMISH_PLAYER_HAS_DISCOVERED_PLAYER:
  2448. return evaluateSkirmishPlayerHasDiscoveredPlayer(pCondition->getParameter(0), pCondition->getParameter(1));
  2449. case Condition::MUSIC_TRACK_HAS_COMPLETED:
  2450. return evaluateMusicHasCompleted(pCondition->getParameter(0), pCondition->getParameter(1));
  2451. case Condition::SUPPLY_SOURCE_SAFE:
  2452. return evaluateSkirmishSupplySourceSafe(pCondition, pCondition->getParameter(0), pCondition->getParameter(1));
  2453. case Condition::SUPPLY_SOURCE_ATTACKED:
  2454. return evaluateSkirmishSupplySourceAttacked(pCondition->getParameter(0));
  2455. case Condition::START_POSITION_IS:
  2456. return evaluateSkirmishStartPosition(pCondition->getParameter(0), pCondition->getParameter(1));
  2457. case Condition::PLAYER_LOST_OBJECT_TYPE:
  2458. return evaluatePlayerLostObjectType(pCondition->getParameter(0), pCondition->getParameter(1));
  2459. }
  2460. }