tron@2186: /* $Id$ */
tron@2186: 
belugas@6451: /** @file engine_gui.cpp */
belugas@6451: 
truelight@0: #include "stdafx.h"
Darkvater@1891: #include "openttd.h"
tron@507: #include "table/strings.h"
celestar@2218: #include "table/sprites.h"
tron@2163: #include "functions.h"
truelight@0: #include "window.h"
truelight@0: #include "gui.h"
truelight@0: #include "viewport.h"
truelight@0: #include "gfx.h"
truelight@0: #include "engine.h"
truelight@0: #include "command.h"
truelight@0: #include "news.h"
tron@2159: #include "variables.h"
peter1138@2962: #include "newgrf_engine.h"
truelight@0: 
truelight@0: 
tron@2477: static StringID GetEngineCategoryName(EngineID engine)
truelight@0: {
rubidium@6535: 	switch (GetEngine(engine)->type) {
rubidium@6535: 		default: NOT_REACHED();
celestar@9895: 		case VEH_ROAD:              return STR_8103_ROAD_VEHICLE;
celestar@9895: 		case VEH_AIRCRAFT:          return STR_8104_AIRCRAFT;
celestar@9895: 		case VEH_SHIP:              return STR_8105_SHIP;
celestar@9895: 		case VEH_TRAIN:
rubidium@6535: 			switch (RailVehInfo(engine)->railtype) {
rubidium@6535: 				default: NOT_REACHED();
rubidium@6535: 				case RAILTYPE_RAIL:     return STR_8102_RAILROAD_LOCOMOTIVE;
rubidium@6535: 				case RAILTYPE_ELECTRIC: return STR_8102_RAILROAD_LOCOMOTIVE;
rubidium@6535: 				case RAILTYPE_MONO:     return STR_8106_MONORAIL_LOCOMOTIVE;
rubidium@6535: 				case RAILTYPE_MAGLEV:   return STR_8107_MAGLEV_LOCOMOTIVE;
rubidium@6535: 			}
darkvater@460: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _engine_preview_widgets[] = {
rubidium@4344: {   WWT_CLOSEBOX,   RESIZE_NONE,     5,     0,    10,     0,    13, STR_00C5,                                  STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     5,    11,   299,     0,    13, STR_8100_MESSAGE_FROM_VEHICLE_MANUFACTURE, STR_018C_WINDOW_TITLE_DRAG_THIS},
Darkvater@4938: {      WWT_PANEL,   RESIZE_NONE,     5,     0,   299,    14,   191, 0x0,                                       STR_NULL},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,     5,    85,   144,   172,   183, STR_00C9_NO,                               STR_NULL},
rubidium@4344: { WWT_PUSHTXTBTN,   RESIZE_NONE,     5,   155,   214,   172,   183, STR_00C8_YES,                              STR_NULL},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
peter1138@5919: typedef void DrawEngineProc(int x, int y, EngineID engine, SpriteID pal);
tron@2477: typedef void DrawEngineInfoProc(EngineID, int x, int y, int maxw);
truelight@0: 
celestar@9895: struct DrawEngineInfo {
truelight@0: 	DrawEngineProc *engine_proc;
truelight@0: 	DrawEngineInfoProc *info_proc;
celestar@9895: };
truelight@0: 
tron@2477: static void DrawTrainEngineInfo(EngineID engine, int x, int y, int maxw);
tron@2477: static void DrawRoadVehEngineInfo(EngineID engine, int x, int y, int maxw);
tron@2477: static void DrawShipEngineInfo(EngineID engine, int x, int y, int maxw);
tron@2477: static void DrawAircraftEngineInfo(EngineID engine, int x, int y, int maxw);
tron@1998: 
truelight@0: static const DrawEngineInfo _draw_engine_list[4] = {
rubidium@6535: 	{ DrawTrainEngine,    DrawTrainEngineInfo    },
rubidium@6535: 	{ DrawRoadVehEngine,  DrawRoadVehEngineInfo  },
rubidium@6535: 	{ DrawShipEngine,     DrawShipEngineInfo     },
rubidium@6535: 	{ DrawAircraftEngine, DrawAircraftEngineInfo },
truelight@0: };
truelight@0: 
truelight@0: static void EnginePreviewWndProc(Window *w, WindowEvent *e)
truelight@0: {
tron@2639: 	switch (e->event) {
tron@2477: 	case WE_PAINT: {
tron@2477: 		EngineID engine = w->window_number;
tron@2639: 		const DrawEngineInfo* dei;
tron@2639: 		int width;
tron@2477: 
truelight@0: 		DrawWindowWidgets(w);
truelight@0: 
tron@534: 		SetDParam(0, GetEngineCategoryName(engine));
truelight@0: 		DrawStringMultiCenter(150, 44, STR_8101_WE_HAVE_JUST_DESIGNED_A, 296);
truelight@0: 
truelight@0: 		DrawStringCentered(w->width >> 1, 80, GetCustomEngineName(engine), 0x10);
truelight@0: 
rubidium@6535: 		dei = &_draw_engine_list[GetEngine(engine)->type];
truelight@0: 
truelight@0: 		width = w->width;
truelight@0: 		dei->engine_proc(width >> 1, 100, engine, 0);
truelight@0: 		dei->info_proc(engine, width >> 1, 130, width - 52);
truelight@0: 		break;
tron@2477: 	}
truelight@0: 
truelight@0: 	case WE_CLICK:
belugas@4634: 		switch (e->we.click.widget) {
tron@2639: 			case 4:
tron@2639: 				DoCommandP(0, w->window_number, 0, NULL, CMD_WANT_ENGINE_PREVIEW);
Darkvater@5125: 				/* Fallthrough */
Darkvater@5125: 			case 3:
tron@2639: 				DeleteWindow(w);
tron@2639: 				break;
truelight@0: 		}
truelight@0: 		break;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const WindowDesc _engine_preview_desc = {
truelight@0: 	WDP_CENTER, WDP_CENTER, 300, 192,
rubidium@6144: 	WC_ENGINE_PREVIEW, WC_NONE,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_engine_preview_widgets,
truelight@0: 	EnginePreviewWndProc
truelight@0: };
truelight@0: 
truelight@0: 
tron@2477: void ShowEnginePreviewWindow(EngineID engine)
truelight@0: {
Darkvater@5137: 	AllocateWindowDescFront(&_engine_preview_desc, engine);
truelight@0: }
truelight@0: 
tron@2477: static void DrawTrainEngineInfo(EngineID engine, int x, int y, int maxw)
tron@1998: {
tron@1998: 	const RailVehicleInfo *rvi = RailVehInfo(engine);
belugas@6119: 	uint multihead = (rvi->railveh_type == RAILVEH_MULTIHEAD) ? 1 : 0;
tron@1998: 
celestar@9903: 	SetDParam(0, (_eco->GetPrice(CEconomy::BUILD_RAILVEHICLE) >> 3) * rvi->base_cost >> 5);
peter1138@6182: 	SetDParam(2, rvi->max_speed * 10 / 16);
tron@1998: 	SetDParam(3, rvi->power << multihead);
tron@1998: 	SetDParam(1, rvi->weight << multihead);
tron@1998: 
celestar@9903: 	uint32 cost_class;
celestar@9903: 	switch (rvi->running_cost_class)
celestar@9903: 	{
celestar@9903: 		default:
celestar@9903: 		case 0: cost_class = _eco->GetPrice(CEconomy::RUNNING_RAIL0); break;
celestar@9903: 		case 1: cost_class = _eco->GetPrice(CEconomy::RUNNING_RAIL1); break;
celestar@9903: 		case 2: cost_class = _eco->GetPrice(CEconomy::RUNNING_RAIL2); break;
celestar@9903: 	}
celestar@9903: 	SetDParam(4, rvi->running_cost_base * cost_class >> 8 << multihead);
tron@1998: 
tron@2549: 	if (rvi->capacity != 0) {
peter1138@4896: 		SetDParam(5, rvi->cargo_type);
tron@2549: 		SetDParam(6, rvi->capacity << multihead);
tron@2549: 	} else {
peter1138@4898: 		SetDParam(5, CT_INVALID);
tron@1998: 	}
peter1138@3401: 	DrawStringMultiCenter(x, y, STR_VEHICLE_INFO_COST_WEIGHT_SPEED_POWER, maxw);
tron@1998: }
tron@1998: 
tron@2477: static void DrawAircraftEngineInfo(EngineID engine, int x, int y, int maxw)
tron@1998: {
tron@1998: 	const AircraftVehicleInfo *avi = AircraftVehInfo(engine);
celestar@9903: 	SetDParam(0, (_eco->GetPrice(CEconomy::AIRCRAFT_BASE) >> 3) * avi->base_cost >> 5);
celestar@9895: 	SetDParam(1, avi->max_speed * 10 / 16);
tron@1998: 	SetDParam(2, avi->passenger_capacity);
tron@1998: 	SetDParam(3, avi->mail_capacity);
celestar@9903: 	SetDParam(4, avi->running_cost * _eco->GetPrice(CEconomy::AIRCRAFT_RUNNING) >> 8);
tron@1998: 
tron@1998: 	DrawStringMultiCenter(x, y, STR_A02E_COST_MAX_SPEED_CAPACITY, maxw);
tron@1998: }
tron@1998: 
tron@2477: static void DrawRoadVehEngineInfo(EngineID engine, int x, int y, int maxw)
tron@1998: {
tron@1998: 	const RoadVehicleInfo *rvi = RoadVehInfo(engine);
tron@1998: 
celestar@9903: 	SetDParam(0, (_eco->GetPrice(CEconomy::ROADVEH_BASE) >> 3) * rvi->base_cost >> 5);
peter1138@6182: 	SetDParam(1, rvi->max_speed * 10 / 32);
celestar@9903: 	SetDParam(2, rvi->running_cost * _eco->GetPrice(CEconomy::ROADVEH_RUNNING) >> 8);
peter1138@4896: 	SetDParam(3, rvi->cargo_type);
tron@1998: 	SetDParam(4, rvi->capacity);
tron@1998: 
tron@1998: 	DrawStringMultiCenter(x, y, STR_902A_COST_SPEED_RUNNING_COST, maxw);
tron@1998: }
tron@1998: 
tron@2477: static void DrawShipEngineInfo(EngineID engine, int x, int y, int maxw)
tron@1998: {
tron@1998: 	const ShipVehicleInfo *svi = ShipVehInfo(engine);
celestar@9903: 	SetDParam(0, svi->base_cost * (_eco->GetPrice(CEconomy::SHIP_BASE) >> 3) >> 5);
peter1138@6182: 	SetDParam(1, svi->max_speed * 10 / 32);
peter1138@4896: 	SetDParam(2, svi->cargo_type);
tron@1998: 	SetDParam(3, svi->capacity);
celestar@9903: 	SetDParam(4, svi->running_cost * _eco->GetPrice(CEconomy::SHIP_RUNNING) >> 8);
tron@1998: 	DrawStringMultiCenter(x, y, STR_982E_COST_MAX_SPEED_CAPACITY, maxw);
tron@1998: }
tron@1998: 
rubidium@6535: 
rubidium@6535: StringID GetNewsStringNewVehicleAvail(const NewsItem *ni)
truelight@0: {
rubidium@6535: 	EngineID engine = ni->string_id;
rubidium@6535: 	SetDParam(0, GetEngineCategoryName(engine));
rubidium@6535: 	SetDParam(1, GetCustomEngineName(engine));
rubidium@6535: 	return STR_NEW_VEHICLE_NOW_AVAILABLE_WITH_TYPE;
rubidium@6535: }
truelight@0: 
rubidium@6535: void DrawNewsNewVehicleAvail(Window *w)
rubidium@6535: {
truelight@0: 	DrawNewsBorder(w);
truelight@0: 
rubidium@6535: 	EngineID engine = WP(w, news_d).ni->string_id;
rubidium@6535: 	const DrawEngineInfo *dei = &_draw_engine_list[GetEngine(engine)->type];
truelight@193: 
rubidium@6535: 	SetDParam(0, GetEngineCategoryName(engine));
rubidium@6535: 	DrawStringMultiCenter(w->width >> 1, 20, STR_NEW_VEHICLE_NOW_AVAILABLE, w->width - 2);
rubidium@6535: 
truelight@0: 	GfxFillRect(25, 56, w->width - 25, w->height - 2, 10);
truelight@0: 
tron@534: 	SetDParam(0, GetCustomEngineName(engine));
rubidium@6535: 	DrawStringMultiCenter(w->width >> 1, 57, STR_NEW_VEHICLE_TYPE, w->width - 2);
truelight@0: 
rubidium@6535: 	dei->engine_proc(w->width >> 1, 88, engine, 0);
rubidium@6535: 	GfxFillRect(25, 56, w->width - 56, 112, PALETTE_TO_STRUCT_GREY | (1 << USE_COLORTABLE));
rubidium@6535: 	dei->info_proc(engine, w->width >> 1, 129, w->width - 52);
truelight@0: }