tron@2186: /* $Id$ */
tron@2186: 
belugas@6420: /** @file subsidy_gui.cpp */
belugas@6420: 
truelight@0: #include "stdafx.h"
Darkvater@1891: #include "openttd.h"
truelight@0: #include "station.h"
truelight@0: #include "industry.h"
truelight@0: #include "town.h"
rubidium@8116: #include "economy_func.h"
tron@2159: #include "variables.h"
peter1138@6328: #include "cargotype.h"
rubidium@8106: #include "window_gui.h"
rubidium@8114: #include "strings_func.h"
rubidium@8140: #include "date_func.h"
rubidium@8224: #include "viewport_func.h"
rubidium@8224: #include "gfx_func.h"
truelight@0: 
rubidium@8264: #include "table/strings.h"
rubidium@8264: 
truelight@0: static void HandleSubsidyClick(int y)
truelight@193: {
belugas@4171: 	const Subsidy *s;
tron@2639: 	uint num;
tron@2639: 	int offs;
truelight@0: 	TileIndex xy;
truelight@0: 
tron@2639: 	if (y < 0) return;
truelight@0: 
truelight@0: 	num = 0;
tron@2639: 	for (s = _subsidies; s != endof(_subsidies); s++) {
tron@2469: 		if (s->cargo_type != CT_INVALID && s->age < 12) {
truelight@0: 			y -= 10;
truelight@0: 			if (y < 0) goto handle_click;
truelight@0: 			num++;
truelight@0: 		}
truelight@0: 	}
truelight@0: 
truelight@0: 	if (num == 0) {
truelight@0: 		y -= 10;
truelight@0: 		if (y < 0) return;
truelight@0: 	}
truelight@0: 
truelight@0: 	y -= 11;
truelight@0: 	if (y < 0) return;
truelight@0: 
tron@2639: 	for (s = _subsidies; s != endof(_subsidies); s++) {
tron@2469: 		if (s->cargo_type != CT_INVALID && s->age >= 12) {
truelight@0: 			y -= 10;
truelight@0: 			if (y < 0) goto handle_click;
truelight@0: 		}
truelight@0: 	}
truelight@0: 	return;
truelight@193: 
truelight@0: handle_click:
truelight@0: 
peter1138@6328: 	TownEffect te = GetCargo(s->cargo_type)->town_effect;
peter1138@6328: 
truelight@0: 	/* determine from coordinate for subsidy and try to scroll to it */
truelight@0: 	offs = s->from;
truelight@0: 	if (s->age >= 12) {
truelight@919: 		xy = GetStation(offs)->xy;
peter1138@6328: 	} else if (te == TE_PASSENGERS || te == TE_MAIL) {
truelight@919: 		xy = GetTown(offs)->xy;
truelight@0: 	} else {
truelight@919: 		xy = GetIndustry(offs)->xy;
peter1138@6328: 	}
truelight@193: 
truelight@0: 	if (!ScrollMainWindowToTile(xy)) {
truelight@0: 		/* otherwise determine to coordinate for subsidy and scroll to it */
truelight@0: 		offs = s->to;
truelight@0: 		if (s->age >= 12) {
truelight@919: 			xy = GetStation(offs)->xy;
peter1138@6328: 		} else if (te == TE_PASSENGERS || te == TE_MAIL || te == TE_GOODS || te == TE_FOOD) {
truelight@919: 			xy = GetTown(offs)->xy;
truelight@0: 		} else {
truelight@919: 			xy = GetIndustry(offs)->xy;
truelight@0: 		}
truelight@0: 		ScrollMainWindowToTile(xy);
truelight@0: 	}
truelight@0: }
truelight@0: 
belugas@4171: static void DrawSubsidiesWindow(const Window *w)
truelight@0: {
truelight@0: 	YearMonthDay ymd;
belugas@4171: 	const Subsidy *s;
tron@2639: 	uint num;
tron@2639: 	int x;
tron@2639: 	int y;
truelight@0: 
truelight@0: 	DrawWindowWidgets(w);
truelight@0: 
rubidium@4288: 	ConvertDateToYMD(_date, &ymd);
truelight@0: 
rubidium@7956: 	int width = w->width - 2;
truelight@0: 	y = 15;
truelight@0: 	x = 1;
rubidium@7956: 	DrawStringTruncated(x, y, STR_2026_SUBSIDIES_ON_OFFER_FOR, TC_FROMSTRING, width);
truelight@0: 	y += 10;
truelight@0: 	num = 0;
truelight@0: 
tron@2639: 	for (s = _subsidies; s != endof(_subsidies); s++) {
tron@2469: 		if (s->cargo_type != CT_INVALID && s->age < 12) {
tron@2639: 			int x2;
tron@2639: 
truelight@0: 			SetupSubsidyDecodeParam(s, 1);
rubidium@7956: 			x2 = DrawStringTruncated(x + 2, y, STR_2027_FROM_TO, TC_FROMSTRING, width);
truelight@193: 
tron@534: 			SetDParam(0, _date - ymd.day + 384 - s->age * 32);
rubidium@7956: 			DrawStringTruncated(x2, y, STR_2028_BY, TC_FROMSTRING, width - x2);
truelight@0: 			y += 10;
truelight@0: 			num++;
truelight@0: 		}
truelight@0: 	}
truelight@0: 
truelight@0: 	if (num == 0) {
rubidium@7956: 		DrawStringTruncated(x + 2, y, STR_202A_NONE, TC_FROMSTRING, width - 2);
truelight@0: 		y += 10;
truelight@0: 	}
truelight@0: 
rubidium@7956: 	DrawStringTruncated(x, y + 1, STR_202B_SERVICES_ALREADY_SUBSIDISED, TC_FROMSTRING, width);
truelight@0: 	y += 10;
truelight@0: 	num = 0;
truelight@0: 
tron@2639: 	for (s = _subsidies; s != endof(_subsidies); s++) {
tron@2469: 		if (s->cargo_type != CT_INVALID && s->age >= 12) {
tron@2639: 			int xt;
tron@2630: 
truelight@0: 			SetupSubsidyDecodeParam(s, 1);
truelight@0: 
peter1138@7058: 			PlayerID player = GetStation(s->to)->owner;
peter1138@7058: 			SetDParam(3, player);
truelight@0: 
rubidium@7956: 			xt = DrawStringTruncated(x + 2, y, STR_202C_FROM_TO, TC_FROMSTRING, width - 2);
truelight@0: 
tron@534: 			SetDParam(0, _date - ymd.day + 768 - s->age * 32);
rubidium@7956: 			DrawStringTruncated(xt, y, STR_202D_UNTIL, TC_FROMSTRING, width - xt);
truelight@0: 			y += 10;
truelight@0: 			num++;
truelight@0: 		}
truelight@0: 	}
truelight@0: 
rubidium@7956: 	if (num == 0) DrawStringTruncated(x + 2, y, STR_202A_NONE, TC_FROMSTRING, width - 2);
truelight@0: }
truelight@0: 
truelight@0: static void SubsidiesListWndProc(Window *w, WindowEvent *e)
truelight@0: {
tron@2639: 	switch (e->event) {
tron@2639: 		case WE_PAINT: DrawSubsidiesWindow(w); break;
tron@2639: 
tron@2639: 		case WE_CLICK:
belugas@4634: 			switch (e->we.click.widget) {
belugas@4634: 				case 3:
belugas@4634: 					HandleSubsidyClick(e->we.click.pt.y - 25);
belugas@4634: 					break;
tron@2639: 			}
tron@2639: 		break;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _subsidies_list_widgets[] = {
rubidium@7956: {   WWT_CLOSEBOX, RESIZE_NONE,  13,   0,  10,   0,  13, STR_00C5,           STR_018B_CLOSE_WINDOW},
rubidium@7956: {    WWT_CAPTION, RESIZE_RIGHT, 13,  11, 307,   0,  13, STR_2025_SUBSIDIES, STR_018C_WINDOW_TITLE_DRAG_THIS},
rubidium@7956: {  WWT_STICKYBOX, RESIZE_LR,    13, 308, 319,   0,  13, STR_NULL,           STR_STICKY_BUTTON},
rubidium@7956: {      WWT_PANEL, RESIZE_RIGHT, 13,   0, 319,  14, 126, 0x0,                STR_01FD_CLICK_ON_SERVICE_TO_CENTER},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _subsidies_list_desc = {
rubidium@7956: 	WDP_AUTO, WDP_AUTO, 320, 127, 630, 127,
rubidium@5893: 	WC_SUBSIDIES_LIST, WC_NONE,
Darkvater@2857: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_STICKY_BUTTON,
truelight@0: 	_subsidies_list_widgets,
truelight@0: 	SubsidiesListWndProc
truelight@0: };
truelight@0: 
truelight@0: 
rubidium@6247: void ShowSubsidiesList()
truelight@0: {
truelight@0: 	AllocateWindowDescFront(&_subsidies_list_desc, 0);
truelight@0: }