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

    16

static void HandleSubsidyClick(int y)

    17

{

    18

	const Subsidy* s;

    19

	uint num;

    20

	int offs;

    21

	TileIndex xy;

    22

    23

	if (y < 0) return;

    24

    25

	num = 0;

    26

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

    27

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

    28

			y -= 10;

    29

			if (y < 0) goto handle_click;

    30

			num++;

    31

		}

    32

	}

    33

    34

	if (num == 0) {

    35

		y -= 10;

    36

		if (y < 0) return;

    37

	}

    38

    39

	y -= 11;

    40

	if (y < 0) return;

    41

    42

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

    43

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

    44

			y -= 10;

    45

			if (y < 0) goto handle_click;

    46

		}

    47

	}

    48

	return;

    49

    50

handle_click:

    51

    52

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

    53

	offs = s->from;

    54

	if (s->age >= 12) {

    55

		xy = GetStation(offs)->xy;

    56

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

    57

		xy = GetTown(offs)->xy;

    58

	} else {

    59

		xy = GetIndustry(offs)->xy;

    60

    61

	}

    62

	if (!ScrollMainWindowToTile(xy)) {

    63

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

    64

		offs = s->to;

    65

		if (s->age >= 12) {

    66

			xy = GetStation(offs)->xy;

    67

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

    68

			xy = GetTown(offs)->xy;

    69

		} else {

    70

			xy = GetIndustry(offs)->xy;

    71

		}

    72

		ScrollMainWindowToTile(xy);

    73

	}

    74

}

    75

    76

static void DrawSubsidiesWindow(const Window* w)

    77

{

    78

	YearMonthDay ymd;

    79

	const Subsidy* s;

    80

	uint num;

    81

	int x;

    82

	int y;

    83

    84

	DrawWindowWidgets(w);

    85

    86

	ConvertDayToYMD(&ymd, _date);

    87

    88

	y = 15;

    89

	x = 1;

    90

	DrawString(x, y, STR_2026_SUBSIDIES_ON_OFFER_FOR, 0);

    91

	y += 10;

    92

	num = 0;

    93

    94

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

    95

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

    96

			int x2;

    97

    98

			SetupSubsidyDecodeParam(s, 1);

    99

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

   100

   101

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

   102

			DrawString(x2, y, STR_2028_BY, 0);

   103

			y += 10;

   104

			num++;

   105

		}

   106

	}

   107

   108

	if (num == 0) {

   109

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

   110

		y += 10;

   111

	}

   112

   113

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

   114

	y += 10;

   115

	num = 0;

   116

   117

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

   118

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

   119

			const Player* p;

   120

			int xt;

   121

   122

			SetupSubsidyDecodeParam(s, 1);

   123

   124

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

   125

			SetDParam(3, p->name_1);

   126

			SetDParam(4, p->name_2);

   127

   128

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

   129

   130

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

   131

			DrawString(xt, y, STR_202D_UNTIL, 0);

   132

			y += 10;

   133

			num++;

   134

		}

   135

	}

   136

   137

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

   138

}

   139

   140

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

   141

{

   142

	switch (e->event) {

   143

		case WE_PAINT: DrawSubsidiesWindow(w); break;

   144

   145

		case WE_CLICK:

   146

			switch (e->click.widget) {

   147

				case 3: HandleSubsidyClick(e->click.pt.y - 25); break;

   148

			}

   149

		break;

   150

	}

   151

}

   152

   153

static const Widget _subsidies_list_widgets[] = {

   154

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

   155

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

   156

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

   157

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

   158

{   WIDGETS_END},

   159

};

   160

   161

static const WindowDesc _subsidies_list_desc = {

   162

	-1, -1, 630, 127,

   163

	WC_SUBSIDIES_LIST,0,

   164

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_STICKY_BUTTON,

   165

	_subsidies_list_widgets,

   166

	SubsidiesListWndProc

   167

};

   168

   169

   170

void ShowSubsidiesList(void)

   171

{

   172

	AllocateWindowDescFront(&_subsidies_list_desc, 0);

   173

}