tron@2186: /* $Id$ */
tron@2186: 
rubidium@9111: /** @file subsidy_gui.cpp GUI for subsidies. */
belugas@6420: 
truelight@0: #include "stdafx.h"
Darkvater@1891: #include "openttd.h"
rubidium@8785: #include "station_base.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"
peter1138@9094: #include "gui.h"
truelight@0: 
rubidium@8264: #include "table/strings.h"
rubidium@8264: 
rubidium@9286: struct SubsidyListWindow : Window {
rubidium@9286: 	SubsidyListWindow(const WindowDesc *desc, WindowNumber window_number) : Window(desc, window_number)
rubidium@9286: 	{
peter1138@9333: 		this->FindWindowPlacementAndResize(desc);
rubidium@9286: 	}
truelight@0: 
rubidium@9286: 	virtual void OnClick(Point pt, int widget)
rubidium@9286: 	{
rubidium@9286: 		if (widget != 3) return;
truelight@0: 
rubidium@9286: 		int y = pt.y - 25;
rubidium@9286: 
rubidium@9286: 		if (y < 0) return;
rubidium@9286: 
rubidium@9286: 		uint num = 0;
rubidium@9286: 		for (const Subsidy *s = _subsidies; s != endof(_subsidies); s++) {
rubidium@9286: 			if (s->cargo_type != CT_INVALID && s->age < 12) {
rubidium@9286: 				y -= 10;
smatz@9448: 				if (y < 0) {
smatz@9448: 					this->HandleClick(s);
smatz@9448: 					return;
smatz@9448: 				}
rubidium@9286: 				num++;
rubidium@9286: 			}
rubidium@9286: 		}
rubidium@9286: 
rubidium@9286: 		if (num == 0) {
smatz@9455: 			y -= 10; // "None"
rubidium@9286: 			if (y < 0) return;
rubidium@9286: 		}
rubidium@9286: 
smatz@9455: 		y -= 11; // "Services already subsidised:"
rubidium@9286: 		if (y < 0) return;
rubidium@9286: 
rubidium@9286: 		for (const Subsidy *s = _subsidies; s != endof(_subsidies); s++) {
rubidium@9286: 			if (s->cargo_type != CT_INVALID && s->age >= 12) {
rubidium@9286: 				y -= 10;
smatz@9448: 				if (y < 0) {
smatz@9448: 					this->HandleClick(s);
smatz@9448: 					return;
smatz@9448: 				}
rubidium@9286: 			}
truelight@0: 		}
truelight@0: 	}
truelight@0: 
rubidium@9286: 	void HandleClick(const Subsidy *s)
rubidium@9286: 	{
rubidium@9286: 		TownEffect te = GetCargo(s->cargo_type)->town_effect;
rubidium@9286: 		TileIndex xy;
truelight@193: 
rubidium@9286: 		/* determine from coordinate for subsidy and try to scroll to it */
rubidium@9286: 		uint offs = s->from;
truelight@0: 		if (s->age >= 12) {
truelight@919: 			xy = GetStation(offs)->xy;
rubidium@9286: 		} else if (te == TE_PASSENGERS || te == TE_MAIL) {
truelight@919: 			xy = GetTown(offs)->xy;
truelight@0: 		} else {
truelight@919: 			xy = GetIndustry(offs)->xy;
truelight@0: 		}
peter1138@9094: 
rubidium@9286: 		if (_ctrl_pressed || !ScrollMainWindowToTile(xy)) {
rubidium@9286: 			if (_ctrl_pressed) ShowExtraViewPortWindow(xy);
truelight@0: 
rubidium@9286: 			/* otherwise determine to coordinate for subsidy and scroll to it */
rubidium@9286: 			offs = s->to;
rubidium@9286: 			if (s->age >= 12) {
rubidium@9286: 				xy = GetStation(offs)->xy;
rubidium@9286: 			} else if (te == TE_PASSENGERS || te == TE_MAIL || te == TE_GOODS || te == TE_FOOD) {
rubidium@9286: 				xy = GetTown(offs)->xy;
rubidium@9286: 			} else {
rubidium@9286: 				xy = GetIndustry(offs)->xy;
rubidium@9286: 			}
truelight@0: 
rubidium@9286: 			if (_ctrl_pressed) {
rubidium@9286: 				ShowExtraViewPortWindow(xy);
rubidium@9286: 			} else {
rubidium@9286: 				ScrollMainWindowToTile(xy);
rubidium@9286: 			}
truelight@0: 		}
truelight@0: 	}
truelight@0: 
rubidium@9286: 	virtual void OnPaint()
rubidium@9286: 	{
rubidium@9286: 		YearMonthDay ymd;
rubidium@9286: 		const Subsidy *s;
truelight@0: 
rubidium@9286: 		this->DrawWidgets();
truelight@0: 
rubidium@9286: 		ConvertDateToYMD(_date, &ymd);
tron@2639: 
rubidium@9286: 		int width = this->width - 13;  // scroll bar = 11 + pixel each side
rubidium@9286: 		int y = 15;
rubidium@9286: 		int x = 1;
rubidium@9286: 
rubidium@9286: 		/* Section for drawing the offered subisidies */
rubidium@9286: 		DrawStringTruncated(x, y, STR_2026_SUBSIDIES_ON_OFFER_FOR, TC_FROMSTRING, width);
rubidium@9286: 		y += 10;
rubidium@9286: 		uint num = 0;
rubidium@9286: 
rubidium@9286: 		for (s = _subsidies; s != endof(_subsidies); s++) {
rubidium@9286: 			if (s->cargo_type != CT_INVALID && s->age < 12) {
rubidium@9286: 				int x2;
rubidium@9286: 
rubidium@9286: 				/* Displays the two offered towns */
rubidium@9286: 				SetupSubsidyDecodeParam(s, 1);
peter1138@9362: 				x2 = DrawStringTruncated(x + 2, y, STR_2027_FROM_TO, TC_FROMSTRING, width - 2);
rubidium@9286: 
peter1138@9362: 				if (width - x2 > 10) {
peter1138@9362: 					/* Displays the deadline before voiding the proposal */
peter1138@9362: 					SetDParam(0, _date - ymd.day + 384 - s->age * 32);
peter1138@9362: 					DrawStringTruncated(x2, y, STR_2028_BY, TC_FROMSTRING, width - x2);
peter1138@9362: 				}
peter1138@9362: 
rubidium@9286: 				y += 10;
rubidium@9286: 				num++;
tron@2639: 			}
rubidium@9286: 		}
rubidium@9286: 
rubidium@9286: 		if (num == 0) {
rubidium@9286: 			DrawStringTruncated(x + 2, y, STR_202A_NONE, TC_FROMSTRING, width - 2);
rubidium@9286: 			y += 10;
rubidium@9286: 		}
rubidium@9286: 
rubidium@9286: 		/* Section for drawing the already granted subisidies */
rubidium@9286: 		DrawStringTruncated(x, y + 1, STR_202B_SERVICES_ALREADY_SUBSIDISED, TC_FROMSTRING, width);
rubidium@9286: 		y += 10;
rubidium@9286: 		num = 0;
rubidium@9286: 
rubidium@9286: 		for (s = _subsidies; s != endof(_subsidies); s++) {
rubidium@9286: 			if (s->cargo_type != CT_INVALID && s->age >= 12) {
rubidium@9286: 				int xt;
rubidium@9286: 
rubidium@9286: 				SetupSubsidyDecodeParam(s, 1);
rubidium@9286: 
rubidium@9286: 				PlayerID player = GetStation(s->to)->owner;
rubidium@9286: 				SetDParam(3, player);
rubidium@9286: 
rubidium@9286: 				/* Displays the two connected stations */
rubidium@9286: 				xt = DrawStringTruncated(x + 2, y, STR_202C_FROM_TO, TC_FROMSTRING, width - 2);
rubidium@9286: 
rubidium@9286: 				/* Displays the date where the granted subsidy will end */
rubidium@9286: 				if ((xt > 3) && (width - xt) > 9 ) { // do not draw if previous drawing failed or if it will overlap on scrollbar
rubidium@9286: 					SetDParam(0, _date - ymd.day + 768 - s->age * 32);
rubidium@9286: 					DrawStringTruncated(xt, y, STR_202D_UNTIL, TC_FROMSTRING, width - xt);
rubidium@9286: 				}
rubidium@9286: 				y += 10;
rubidium@9286: 				num++;
rubidium@9286: 			}
rubidium@9286: 		}
rubidium@9286: 
rubidium@9286: 		if (num == 0) DrawStringTruncated(x + 2, y, STR_202A_NONE, TC_FROMSTRING, width - 2);
truelight@0: 	}
rubidium@9286: };
truelight@0: 
truelight@0: static const Widget _subsidies_list_widgets[] = {
belugas@8813: {   WWT_CLOSEBOX, RESIZE_NONE,   13,   0,  10,   0,  13, STR_00C5,           STR_018B_CLOSE_WINDOW},
belugas@8813: {    WWT_CAPTION, RESIZE_RIGHT,  13,  11, 307,   0,  13, STR_2025_SUBSIDIES, STR_018C_WINDOW_TITLE_DRAG_THIS},
belugas@8813: {  WWT_STICKYBOX, RESIZE_LR,     13, 308, 319,   0,  13, STR_NULL,           STR_STICKY_BUTTON},
belugas@8813: {      WWT_PANEL, RESIZE_RB,     13,   0, 307,  14, 126, 0x0,                STR_01FD_CLICK_ON_SERVICE_TO_CENTER},
belugas@8852: {  WWT_SCROLLBAR, RESIZE_LRB,    13, 308, 319,  14, 114, 0x0,                STR_0190_SCROLL_BAR_SCROLLS_LIST},
belugas@8852: {  WWT_RESIZEBOX, RESIZE_LRTB,   13, 308, 319, 115, 126, 0x0,                STR_RESIZE_BUTTON},
belugas@8813: 
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _subsidies_list_desc = {
belugas@8813: 	WDP_AUTO, WDP_AUTO, 320, 127, 320, 127,
rubidium@5893: 	WC_SUBSIDIES_LIST, WC_NONE,
belugas@8813: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_STICKY_BUTTON | WDF_RESIZABLE,
truelight@0: 	_subsidies_list_widgets,
truelight@0: };
truelight@0: 
truelight@0: 
rubidium@6247: void ShowSubsidiesList()
truelight@0: {
rubidium@9286: 	AllocateWindowDescFront<SubsidyListWindow>(&_subsidies_list_desc, 0);
truelight@0: }