1

/* $Id$ */

     2

     3

/** @file newgrf_town.cpp */

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "settings_type.h"

     8

#include "debug.h"

     9

#include "core/bitmath_func.hpp"

    10

#include "core/math_func.hpp"

    11

#include "town.h"

    12

    13

/** This function implements the town variables that newGRF defines.

    14

 * @param variable that is queried

    15

 * @param parameter unused

    16

 * @param available will return false if ever the variable asked for does not exist

    17

 * @param t is of course the town we are inquiring

    18

 * @return the value stored in the corresponding variable*/

    19

uint32 TownGetVariable(byte variable, byte parameter, bool *available, const Town *t)

    20

{

    21

	switch (variable) {

    22

		/* Larger towns */

    23

		case 0x40:

    24

			if (_patches.larger_towns == 0) return 2;

    25

			if (t->larger_town) return 1;

    26

			return 0;

    27

    28

		/* Town index */

    29

		case 0x41: return t->index;

    30

    31

		/* Town properties */

    32

		case 0x80: return t->xy;

    33

		case 0x81: return GB(t->xy, 8, 8);

    34

		case 0x82: return ClampToU16(t->population);

    35

		case 0x83: return GB(ClampToU16(t->population), 8, 8);

    36

		case 0x8A: return t->grow_counter;

    37

		case 0x92: return t->flags12;  // In original game, 0x92 and 0x93 are really one word. Since flags12 is a byte, this is to adjust

    38

		case 0x93: return 0;

    39

		case 0x94: return t->radius[0];

    40

		case 0x95: return GB(t->radius[0], 8, 8);

    41

		case 0x96: return t->radius[1];

    42

		case 0x97: return GB(t->radius[1], 8, 8);

    43

		case 0x98: return t->radius[2];

    44

		case 0x99: return GB(t->radius[2], 8, 8);

    45

		case 0x9A: return t->radius[3];

    46

		case 0x9B: return GB(t->radius[3], 8, 8);

    47

		case 0x9C: return t->radius[4];

    48

		case 0x9D: return GB(t->radius[4], 8, 8);

    49

		case 0x9E: return t->ratings[0];

    50

		case 0x9F: return GB(t->ratings[0], 8, 8);

    51

		case 0xA0: return t->ratings[1];

    52

		case 0xA1: return GB(t->ratings[1], 8, 8);

    53

		case 0xA2: return t->ratings[2];

    54

		case 0xA3: return GB(t->ratings[2], 8, 8);

    55

		case 0xA4: return t->ratings[3];

    56

		case 0xA5: return GB(t->ratings[3], 8, 8);

    57

		case 0xA6: return t->ratings[4];

    58

		case 0xA7: return GB(t->ratings[4], 8, 8);

    59

		case 0xA8: return t->ratings[5];

    60

		case 0xA9: return GB(t->ratings[5], 8, 8);

    61

		case 0xAA: return t->ratings[6];

    62

		case 0xAB: return GB(t->ratings[6], 8, 8);

    63

		case 0xAC: return t->ratings[7];

    64

		case 0xAD: return GB(t->ratings[7], 8, 8);

    65

		case 0xAE: return t->have_ratings;

    66

		case 0xB2: return t->statues;

    67

		case 0xB6: return ClampToU16(t->num_houses);

    68

		case 0xB9: return t->growth_rate;

    69

		case 0xBA: return ClampToU16(t->new_max_pass);

    70

		case 0xBB: return GB(ClampToU16(t->new_max_pass), 8, 8);

    71

		case 0xBC: return ClampToU16(t->new_max_mail);

    72

		case 0xBD: return GB(ClampToU16(t->new_max_mail), 8, 8);

    73

		case 0xBE: return ClampToU16(t->new_act_pass);

    74

		case 0xBF: return GB(ClampToU16(t->new_act_pass), 8, 8);

    75

		case 0xC0: return ClampToU16(t->new_act_mail);

    76

		case 0xC1: return GB(ClampToU16(t->new_act_mail), 8, 8);

    77

		case 0xC2: return ClampToU16(t->max_pass);

    78

		case 0xC3: return GB(ClampToU16(t->max_pass), 8, 8);

    79

		case 0xC4: return ClampToU16(t->max_mail);

    80

		case 0xC5: return GB(ClampToU16(t->max_mail), 8, 8);

    81

		case 0xC6: return ClampToU16(t->act_pass);

    82

		case 0xC7: return GB(ClampToU16(t->act_pass), 8, 8);

    83

		case 0xC8: return ClampToU16(t->act_mail);

    84

		case 0xC9: return GB(ClampToU16(t->act_mail), 8, 8);

    85

		case 0xCA: return t->pct_pass_transported;

    86

		case 0xCB: return t->pct_mail_transported;

    87

		case 0xCC: return t->new_act_food;

    88

		case 0xCD: return GB(t->new_act_food, 8, 8);

    89

		case 0xCE: return t->new_act_water;

    90

		case 0xCF: return GB(t->new_act_water, 8, 8);

    91

		case 0xD0: return t->act_food;

    92

		case 0xD1: return GB(t->act_food, 8, 8);

    93

		case 0xD2: return t->act_water;

    94

		case 0xD3: return GB(t->act_water, 8, 8);

    95

		case 0xD4: return t->road_build_months;

    96

		case 0xD5: return t->fund_buildings_months;

    97

	}

    98

    99

	DEBUG(grf, 1, "Unhandled town property 0x%X", variable);

   100

   101

	*available = false;

   102

	return (uint32)-1;

   103

}