1

/* $Id$ */

     2

     3

/** @file */

     4

     5

#include "economy_new.h"

     6

#include "town.h"

     7

     8

/** The global economy */

     9

CEconomy *_eco;

    10

    11

/**

    12

 * Adjust the global activity level by the cumulative activity level of all towns.

    13

 * This is to iron out the difference between the sum of all economic activites of

    14

 * all towns and the the product of the economic activity per capita times the

    15

 * population of the map.

    16

 */

    17

void CEconomy::AdjustActivityByTowns()

    18

{

    19

	Town *t;

    20

	FixedT<int64, 16> total_activity = 0;

    21

	FixedT<int64, 16> old_activity = m_activity_level;

    22

    23

	FOR_ALL_TOWNS(t) {

    24

		total_activity += (t->GetActivity() * t->population * m_activity_level);

    25

		DEBUG(eco, 6, "Obtained EAL of %f", (double)t->GetActivity());

    26

	}

    27

    28

	DEBUG(eco, 5, "Global EAL is             %f", (double)m_activity_level * GetWorldPopulation());

    29

	DEBUG(eco, 5, "Total EAL of all towns is %f", (double)total_activity);

    30

    31

	m_activity_level = total_activity / GetWorldPopulation();

    32

	DEBUG(eco, 4, "Adjusting global EAL to %f (ratio %f)", (double)m_activity_level, (double)(m_activity_level/old_activity));

    33

    34

	FOR_ALL_TOWNS(t) t->SetActivity(t->GetActivity() * old_activity / m_activity_level);

    35

}

    36

    37

/**

    52

 * Starts a new economy. As there can always be only one economy in place,

    53

 * deletes the one that is currently active

    54

 */

    55

void InitializeEconomy()

    56

{

    57

	delete _eco;

    58

	_eco = new CEconomy;

    59

	assert(_eco != NULL);

    60

}