1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "currency.h"

     6

#include "news.h"

     7

#include "variables.h"

     8

#include "table/strings.h"

     9

#include "date.h"

    10

    11

	//   exchange rate    prefix             symbol_pos

    12

	//   |  separator        |     postfix   |

    13

	//   |   |    Euro year  |       |       |    name

    14

	//   |   |    |          |       |       |    |

    15

const CurrencySpec origin_currency_specs[NUM_CURRENCY] = {

    16

	{    1, ',', CF_NOEURO, "\xA3", "",      0,  STR_CURR_GBP    }, // british pounds

    17

	{    2, ',', CF_NOEURO, "$",    "",      0,  STR_CURR_USD    }, // us dollars

    18

	{    2, ',', CF_ISEURO, "¤",    "",      0,  STR_CURR_EUR    }, // Euro

    19

	{  200, ',', CF_NOEURO, "\xA5", "",      0,  STR_CURR_YEN    }, // yen

    20

	{   19, ',', 2002,      "",     " S.",   1,  STR_CURR_ATS    }, // austrian schilling

    21

	{   57, ',', 2002,      "BEF ", "",      0,  STR_CURR_BEF    }, // belgian franc

    22

	{    2, ',', CF_NOEURO, "CHF ", "",      0,  STR_CURR_CHF    }, // swiss franc

    23

	{   50, ',', CF_NOEURO, "",     " Kc",   1,  STR_CURR_CZK    }, // czech koruna // TODO: Should use the "c" with an upside down "^"

    24

	{    4, '.', 2002,      "DM ",  "",      0,  STR_CURR_DEM    }, // deutsche mark

    25

	{   10, '.', CF_NOEURO, "",     " kr",   1,  STR_CURR_DKK    }, // danish krone

    26

	{  200, '.', 2002,      "Pts ", "",      0,  STR_CURR_ESP    }, // spanish pesetas

    27

	{    8, ',', 2002,      "",     " mk",   1,  STR_CURR_FIM    }, // finnish markka

    28

	{   10, '.', 2002,      "FF ",  "",      0,  STR_CURR_FRF    }, // french francs

    29

	{  480, ',', 2002,      "",     "Dr.",   1,  STR_CURR_GRD    }, // greek drachma

    30

	{  376, ',', 2002,      "",     " Ft",   1,  STR_CURR_HUF    }, // hungarian forint

    31

	{  130, '.', CF_NOEURO, "",     " Kr",   1,  STR_CURR_ISK    }, // icelandic krona

    32

	{ 2730, ',', 2002,      "",     " L.",   1,  STR_CURR_ITL    }, // italian lira

    33

	{    3, ',', 2002,      "NLG ", "",      0,  STR_CURR_NLG    }, // dutch gulden

    34

	{   11, '.', CF_NOEURO, "",     " Kr",   1,  STR_CURR_NOK    }, // norwegian krone

    35

	{    6, ' ', CF_NOEURO, "",     " zl",   1,  STR_CURR_PLN    }, // polish zloty

    36

	{    6, '.', CF_NOEURO, "",     " Lei",  1,  STR_CURR_ROL    }, // romanian Lei

    37

	{    5, ' ', CF_NOEURO, "",     " p",    1,  STR_CURR_RUR    }, // russian rouble

    38

	{  350, '.', CF_NOEURO, "",     " SIT",  1,  STR_CURR_SIT    }, // slovenian tolar

    39

	{   13, '.', CF_NOEURO, "",     " Kr",   1,  STR_CURR_SEK    }, // swedish krona

    40

	{    2, '.', CF_NOEURO, "",     " YTL",  1,  STR_CURR_YTL    }, // turkish lira

    41

	{    1, ' ', CF_NOEURO, "",     "",      2,  STR_CURR_CUSTOM }, // custom currency

    42

};

    43

    44

/* Array of currencies used by the system */

    45

CurrencySpec _currency_specs[NUM_CURRENCY];

    46

    47

/**

    48

 * These enums are only declared in order to make sens

    49

 * out of the TTDPatch_To_OTTDIndex array that will follow

    50

 * Every currency used by Ottd is there, just in case TTDPatch will

    51

 * add those missing in its code

    52

 **/

    53

enum {

    54

	CURR_GBP,

    55

	CURR_USD,

    56

	CURR_EUR,

    57

	CURR_YEN,

    58

	CURR_ATS,

    59

	CURR_BEF,

    60

	CURR_CHF,

    61

	CURR_CZK,

    62

	CURR_DEM,

    63

	CURR_DKK,

    64

	CURR_ESP,

    65

	CURR_FIM,

    66

	CURR_FRF,

    67

	CURR_GRD,

    68

	CURR_HUF,

    69

	CURR_ISK,

    70

	CURR_ITL,

    71

	CURR_NLG,

    72

	CURR_NOK,

    73

	CURR_PLN,

    74

	CURR_ROL,

    75

	CURR_RUR,

    76

	CURR_SIT,

    77

	CURR_SEK,

    78

	CURR_YTL,

    79

};

    80

    81

/**

    82

 * This array represent the position of OpenTTD's currencies,

    83

 * compared to TTDPatch's ones.

    84

 * When a grf sends currencies, they are based on the order defined by TTDPatch.

    85

 * So, we must reindex them to our own order.

    86

 **/

    87

const byte TTDPatch_To_OTTDIndex[] =

    88

{

    89

	CURR_GBP,

    90

	CURR_USD,

    91

	CURR_FRF,

    92

	CURR_DEM,

    93

	CURR_YEN,

    94

	CURR_ESP,

    95

	CURR_HUF,

    96

	CURR_PLN,

    97

	CURR_ATS,

    98

	CURR_BEF,

    99

	CURR_DKK,

   100

	CURR_FIM,

   101

	CURR_GRD,

   102

	CURR_CHF,

   103

	CURR_NLG,

   104

	CURR_ITL,

   105

	CURR_SEK,

   106

	CURR_RUR,

   107

	CURR_EUR,

   108

};

   109

   110

/**

   111

 * Will return the ottd's index correspondance to

   112

 * the ttdpatch's id.  If the id is bigger then the array,

   113

 * it is  a grf written for ottd, thus returning the same id.

   114

 * Only called from newgrf.c

   115

 * @param grfcurr_id currency id coming from newgrf

   116

 * @return the corrected index

   117

 **/

   118

byte GetNewgrfCurrencyIdConverted(byte grfcurr_id)

   119

{

   120

	return (grfcurr_id >= lengthof(TTDPatch_To_OTTDIndex)) ? grfcurr_id : TTDPatch_To_OTTDIndex[grfcurr_id];

   121

}

   122

   123

/* get a mask of the allowed currencies depending on the year */

   124

uint GetMaskOfAllowedCurrencies(void)

   125

{

   126

	uint mask = 0;

   127

	uint i;

   128

   129

	for (i = 0; i < NUM_CURRENCY; i++) {

   130

		Year to_euro = _currency_specs[i].to_euro;

   131

   132

		if (to_euro != CF_NOEURO && to_euro != CF_ISEURO && _cur_year >= to_euro) continue;

   133

		if (to_euro == CF_ISEURO && _cur_year < 2000) continue;

   134

		mask |= (1 << i);

   135

	}

   136

	mask |= (1 << CUSTOM_CURRENCY_ID); // always allow custom currency

   137

	return mask;

   138

}

   139

   140

/**

   141

 * Verify if the currency chosen by the user is about to be converted to Euro

   142

 **/

   143

void CheckSwitchToEuro(void)

   144

{

   145

	if (_currency_specs[_opt.currency].to_euro != CF_NOEURO &&

   146

			_currency_specs[_opt.currency].to_euro != CF_ISEURO &&

   147

			_cur_year >= _currency_specs[_opt.currency].to_euro) {

   148

		_opt.currency = 2; // this is the index of euro above.

   149

		AddNewsItem(STR_EURO_INTRODUCE, NEWS_FLAGS(NM_NORMAL, 0, NT_ECONOMY, 0), 0, 0);

   150

	}

   151

}

   152

   153

/**

   154

 * Called only from newgrf.c.  Will fill _currency_specs array with

   155

 * default values from origin_currency_specs

   156

 **/

   157

void ResetCurrencies(void)

   158

{

   159

	memcpy(&_currency_specs, &origin_currency_specs, sizeof(origin_currency_specs));

   160

}

   161

   162

/**

   163

 * Build a list of currency names StringIDs to use in a dropdown list

   164

 * @return Pointer to a (static) array of StringIDs

   165

 */

   166

StringID* BuildCurrencyDropdown(void)

   167

{

   168

	/* Allow room for all currencies, plus a terminator entry */

   169

	static StringID names[CUSTOM_CURRENCY_ID];

   170

	uint i;

   171

   172

	/* Add each name */

   173

	for (i = 0; i < NUM_CURRENCY; i++) {

   174

		names[i] = _currency_specs[i].name;

   175

	}

   176

	/* Terminate the list */

   177

	names[i] = INVALID_STRING_ID;

   178

   179

	return names;

   180

}