12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576 |
- /*
- * Seven Kingdoms: Ancient Adversaries
- *
- * Copyright 1997,1998 Enlight Software Ltd.
- *
- * This program is free software: you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation, either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program. If not, see <http://www.gnu.org/licenses/>.
- *
- */
- //Filename : OF_BASE2.CPP
- //Description : Firm Base - part 2, the AI functions
- #include <ONATION.h>
- #include <OTOWN.h>
- #include <OF_BASE.h>
- //--------- Begin of function FirmBase::process_ai ---------//
- void FirmBase::process_ai()
- {
- think_assign_unit();
- think_invoke_god();
- }
- //----------- End of function FirmBase::process_ai -----------//
- //--------- Begin of function FirmBase::think_assign_unit ---------//
- void FirmBase::think_assign_unit()
- {
- Nation* nationPtr = nation_array[nation_recno];
- //-------- assign overseer ---------//
- if( info.game_date%15==firm_recno%15 ) // do not call too often because when an AI action is queued, it will take a while to carry it out
- {
- if( !overseer_recno )
- nationPtr->add_action(loc_x1, loc_y1, -1, -1, ACTION_AI_ASSIGN_OVERSEER, FIRM_BASE);
- }
- //------- recruit workers ---------//
- if( info.game_date%15==firm_recno%15 )
- {
- if( worker_count < MAX_WORKER )
- ai_recruit_worker();
- }
- }
- //----------- End of function FirmBase::think_assign_unit -----------//
- //--------- Begin of function FirmBase::think_invoke_god ---------//
- void FirmBase::think_invoke_god()
- {
- if( pray_points < MAX_PRAY_POINTS || !can_invoke() )
- return;
- invoke_god();
- }
- //----------- End of function FirmBase::think_invoke_god -----------//
|