1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "table/strings.h"

     6

#include "functions.h"

     7

#include "window.h"

     8

#include "station.h"

     9

#include "industry.h"

    10

#include "town.h"

    11

#include "player.h"

    12

#include "gfx.h"

    13

#include "economy.h"

    14

#include "variables.h"

    15

#include "date.h"

    16

    17

static void HandleSubsidyClick(int y)

    18

{

    19

	const Subsidy *s;

    20

	uint num;

    21

	int offs;

    22

	TileIndex xy;

    23

    24

	if (y < 0) return;

    25

    26

	num = 0;

    27

	for (s = _subsidies; s != endof(_subsidies); s++) {

    28

		if (s->cargo_type != CT_INVALID && s->age < 12) {

    29

			y -= 10;

    30

			if (y < 0) goto handle_click;

    31

			num++;

    32

		}

    33

	}

    34

    35

	if (num == 0) {

    36

		y -= 10;

    37

		if (y < 0) return;

    38

	}

    39

    40

	y -= 11;

    41

	if (y < 0) return;

    42

    43

	for (s = _subsidies; s != endof(_subsidies); s++) {

    44

		if (s->cargo_type != CT_INVALID && s->age >= 12) {

    45

			y -= 10;

    46

			if (y < 0) goto handle_click;

    47

		}

    48

	}

    49

	return;

    50

    51

handle_click:

    52

    53

	/* determine from coordinate for subsidy and try to scroll to it */

    54

	offs = s->from;

    55

	if (s->age >= 12) {

    56

		xy = GetStation(offs)->xy;

    57

	} else if (s->cargo_type == CT_PASSENGERS || s->cargo_type == CT_MAIL) {

    58

		xy = GetTown(offs)->xy;

    59

	} else {

    60

		xy = GetIndustry(offs)->xy;

    61

    62

	}

    63

	if (!ScrollMainWindowToTile(xy)) {

    64

		/* otherwise determine to coordinate for subsidy and scroll to it */

    65

		offs = s->to;

    66

		if (s->age >= 12) {

    67

			xy = GetStation(offs)->xy;

    68

		} else if (s->cargo_type == CT_PASSENGERS || s->cargo_type == CT_MAIL || s->cargo_type == CT_GOODS || s->cargo_type == CT_FOOD) {

    69

			xy = GetTown(offs)->xy;

    70

		} else {

    71

			xy = GetIndustry(offs)->xy;

    72

		}

    73

		ScrollMainWindowToTile(xy);

    74

	}

    75

}

    76

    77

static void DrawSubsidiesWindow(const Window *w)

    78

{

    79

	YearMonthDay ymd;

    80

	const Subsidy *s;

    81

	uint num;

    82

	int x;

    83

	int y;

    84

    85

	DrawWindowWidgets(w);

    86

    87

	ConvertDateToYMD(_date, &ymd);

    88

    89

	y = 15;

    90

	x = 1;

    91

	DrawString(x, y, STR_2026_SUBSIDIES_ON_OFFER_FOR, 0);

    92

	y += 10;

    93

	num = 0;

    94

    95

	for (s = _subsidies; s != endof(_subsidies); s++) {

    96

		if (s->cargo_type != CT_INVALID && s->age < 12) {

    97

			int x2;

    98

    99

			SetupSubsidyDecodeParam(s, 1);

   100

			x2 = DrawString(x + 2, y, STR_2027_FROM_TO, 0);

   101

   102

			SetDParam(0, _date - ymd.day + 384 - s->age * 32);

   103

			DrawString(x2, y, STR_2028_BY, 0);

   104

			y += 10;

   105

			num++;

   106

		}

   107

	}

   108

   109

	if (num == 0) {

   110

		DrawString(x + 2, y, STR_202A_NONE, 0);

   111

		y += 10;

   112

	}

   113

   114

	DrawString(x, y + 1, STR_202B_SERVICES_ALREADY_SUBSIDISED, 0);

   115

	y += 10;

   116

	num = 0;

   117

   118

	for (s = _subsidies; s != endof(_subsidies); s++) {

   119

		if (s->cargo_type != CT_INVALID && s->age >= 12) {

   120

			const Player *p;

   121

			int xt;

   122

   123

			SetupSubsidyDecodeParam(s, 1);

   124

   125

			p = GetPlayer(GetStation(s->to)->owner);

   126

			SetDParam(3, p->name_1);

   127

			SetDParam(4, p->name_2);

   128

   129

			xt = DrawString(x + 2, y, STR_202C_FROM_TO, 0);

   130

   131

			SetDParam(0, _date - ymd.day + 768 - s->age * 32);

   132

			DrawString(xt, y, STR_202D_UNTIL, 0);

   133

			y += 10;

   134

			num++;

   135

		}

   136

	}

   137

   138

	if (num == 0) DrawString(x + 2, y, STR_202A_NONE, 0);

   139

}

   140

   141

static void SubsidiesListWndProc(Window *w, WindowEvent *e)

   142

{

   143

	switch (e->event) {

   144

		case WE_PAINT: DrawSubsidiesWindow(w); break;

   145

   146

		case WE_CLICK:

   147

			switch (e->we.click.widget) {

   148

				case 3:

   149

					HandleSubsidyClick(e->we.click.pt.y - 25);

   150

					break;

   151

			}

   152

		break;

   153

	}

   154

}

   155

   156

static const Widget _subsidies_list_widgets[] = {

   157

{   WWT_CLOSEBOX,   RESIZE_NONE, 13,   0,  10,   0,  13, STR_00C5,           STR_018B_CLOSE_WINDOW},

   158

{    WWT_CAPTION,   RESIZE_NONE, 13,  11, 617,   0,  13, STR_2025_SUBSIDIES, STR_018C_WINDOW_TITLE_DRAG_THIS},

   159

{  WWT_STICKYBOX,   RESIZE_NONE, 13, 618, 629,   0,  13, STR_NULL,           STR_STICKY_BUTTON},

   160

{      WWT_PANEL,   RESIZE_NONE, 13,   0, 629,  14, 126, STR_NULL,           STR_01FD_CLICK_ON_SERVICE_TO_CENTER},

   161

{   WIDGETS_END},

   162

};

   163

   164

static const WindowDesc _subsidies_list_desc = {

   165

	-1, -1, 630, 127,

   166

	WC_SUBSIDIES_LIST,0,

   167

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_STICKY_BUTTON,

   168

	_subsidies_list_widgets,

   169

	SubsidiesListWndProc

   170

};

   171

   172

   173

void ShowSubsidiesList(void)

   174

{

   175

	AllocateWindowDescFront(&_subsidies_list_desc, 0);

   176

}