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 "gui.h"

     9

#include "station.h"

    10

#include "industry.h"

    11

#include "town.h"

    12

#include "player.h"

    13

#include "gfx.h"

    14

#include "economy.h"

    15

#include "variables.h"

    16

    17

static void HandleSubsidyClick(int y)

    18

{

    19

	Subsidy *s;

    20

	int num,offs;

    21

	TileIndex xy;

    22

    23

	if (y < 0)

    24

		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(Window *w)

    78

{

    79

	YearMonthDay ymd;

    80

	Subsidy *s;

    81

	int x,xt,y,num,x2;

    82

	Player *p;

    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

			SetupSubsidyDecodeParam(s, 1);

    97

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

    98

    99

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

   100

			DrawString(x2, y, STR_2028_BY, 0);

   101

			y += 10;

   102

			num++;

   103

		}

   104

	}

   105

   106

	if (num == 0) {

   107

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

   108

		y += 10;

   109

	}

   110

   111

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

   112

	y += 10;

   113

	num = 0;

   114

   115

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

   116

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

   117

			SetupSubsidyDecodeParam(s, 1);

   118

   119

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

   120

			SetDParam(3, p->name_1);

   121

			SetDParam(4, p->name_2);

   122

   123

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

   124

   125

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

   126

			DrawString(xt, y, STR_202D_UNTIL, 0);

   127

			y += 10;

   128

			num++;

   129

		}

   130

	}

   131

   132

	if (num == 0) {

   133

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

   134

	}

   135

}

   136

   137

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

   138

{

   139

	switch(e->event) {

   140

	case WE_PAINT: DrawSubsidiesWindow(w); break;

   141

	case WE_CLICK: {

   142

		switch(e->click.widget) {

   143

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

   144

		}

   145

	}

   146

	break;

   147

	}

   148

}

   149

   150

static const Widget _subsidies_list_widgets[] = {

   151

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

   152

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

   153

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

   154

{   WIDGETS_END},

   155

};

   156

   157

static const WindowDesc _subsidies_list_desc = {

   158

	-1, -1, 630, 127,

   159

	WC_SUBSIDIES_LIST,0,

   160

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   161

	_subsidies_list_widgets,

   162

	SubsidiesListWndProc

   163

};

   164

   165

   166

void ShowSubsidiesList(void)

   167

{

   168

	AllocateWindowDescFront(&_subsidies_list_desc, 0);

   169

}