truelight@0: #include "stdafx.h"
truelight@0: #include "ttd.h"
truelight@0: 
truelight@0: #include "window.h"
truelight@0: #include "gui.h"
truelight@0: #include "gfx.h"
truelight@0: #include "vehicle.h"
truelight@0: #include "viewport.h"
truelight@0: #include "station.h"
truelight@0: #include "command.h"
truelight@0: #include "player.h"
truelight@0: //#include "town.h"
truelight@0: #include "engine.h"
truelight@0: 
truelight@0: extern const byte _roadveh_price[88];
truelight@0: extern const byte _roadveh_speed[88];
truelight@0: extern const byte _roadveh_runningcost[88];
truelight@0: extern const byte _roadveh_capacity[88];
truelight@0: extern const byte _roadveh_cargo_type[88];
truelight@0: 
truelight@0: static void DrawRoadVehImage(Vehicle *v, int x, int y, VehicleID selection)
truelight@0: {
truelight@0: 	int image = GetRoadVehImage(v, 6);
truelight@0: 	uint32 ormod = SPRITE_PALETTE(PLAYER_SPRITE_COLOR(v->owner));
truelight@0: 	if (v->vehstatus & VS_CRASHED) ormod = 0x3248000;
truelight@0: 	DrawSprite(image | ormod, x+14, y+6);
truelight@0: 
truelight@0: 	if (v->index == selection) {
truelight@0: 		DrawFrameRect(x-1, y-1, x+28, y+12, 15, 0x10);
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static void RoadVehDetailsWndProc(Window *w, WindowEvent *e)
truelight@0: {
truelight@0: 	Vehicle *v = &_vehicles[w->window_number];
truelight@0: 	StringID str;
truelight@0: 	int mod;
truelight@0: 
truelight@0: 	switch(e->event) {
truelight@0: 	case WE_PAINT:
truelight@0: 		w->disabled_state = v->owner == _local_player ? 0 : (1 << 2);
truelight@0: 		SET_DPARAM16(0, v->string_id);
truelight@0: 		SET_DPARAM16(1, v->unitnumber);
truelight@0: 		DrawWindowWidgets(w);
truelight@0: 
truelight@0: 		/* Draw running cost */
truelight@0: 		{
truelight@0: 			int year = v->age / 366;
truelight@0: 			StringID str;
truelight@0: 
truelight@0: 			SET_DPARAM16(1, year);
truelight@0: 			
truelight@0: 			str = STR_0199_YEAR;
truelight@0: 			if (year != 1) {
truelight@0: 				str++;
truelight@0: 				if (v->max_age - 366 < v->age)
truelight@0: 					str++;
truelight@0: 			}
truelight@0: 			SET_DPARAM16(0, str);
truelight@0: 			SET_DPARAM16(2, v->max_age / 366);
truelight@0: 			SET_DPARAM32(3, _roadveh_runningcost[v->engine_type - ROAD_ENGINES_INDEX] * _price.roadveh_running >> 8);
truelight@0: 			DrawString(2, 15, STR_900D_AGE_RUNNING_COST_YR, 0);
truelight@0: 		}
truelight@0: 
truelight@0: 		/* Draw max speed */
truelight@0: 		{
truelight@0: 			SET_DPARAM16(0, v->max_speed * 10 >> 5);
truelight@0: 			DrawString(2, 25, STR_900E_MAX_SPEED, 0);
truelight@0: 		}
truelight@0: 
truelight@0: 		/* Draw profit */
truelight@0: 		{
truelight@0: 			SET_DPARAM32(0, v->profit_this_year);
truelight@0: 			SET_DPARAM32(1, v->profit_last_year);
truelight@0: 			DrawString(2, 35, STR_900F_PROFIT_THIS_YEAR_LAST_YEAR, 0);
truelight@0: 		}
truelight@0: 
truelight@0: 		/* Draw breakdown & reliability */
truelight@0: 		{
truelight@0: 			SET_DPARAM8(0, v->reliability * 100 >> 16);
truelight@0: 			SET_DPARAM16(1, v->breakdowns_since_last_service);
truelight@0: 			DrawString(2, 45, STR_9010_RELIABILITY_BREAKDOWNS, 0);
truelight@0: 		}
truelight@0: 
truelight@0: 		/* Draw service interval text */
truelight@0: 		{
truelight@0: 			SET_DPARAM16(0, v->service_interval);
truelight@0: 			SET_DPARAM16(1, v->date_of_last_service);
truelight@0: 			DrawString(13, 90, STR_883C_SERVICING_INTERVAL_DAYS, 0);
truelight@0: 		}
truelight@0: 
truelight@0: 		DrawRoadVehImage(v, 3, 57, INVALID_VEHICLE);
truelight@0: 
truelight@0: 		SET_DPARAM16(0, GetCustomEngineName(v->engine_type));
truelight@0: 		SET_DPARAM16(1, 1920 + v->build_year);
truelight@0: 		SET_DPARAM32(2, v->value);
truelight@0: 		DrawString(34, 57, STR_9011_BUILT_VALUE, 0);
truelight@0: 		
truelight@0: 		SET_DPARAM16(0, _cargoc.names_long_p[v->cargo_type]);
truelight@0: 		SET_DPARAM16(1, v->cargo_cap);
truelight@0: 		DrawString(34, 67, STR_9012_CAPACITY, 0);
truelight@0: 
truelight@0: 		str = STR_8812_EMPTY;
truelight@0: 		if (v->cargo_count != 0) {
truelight@0: 			SET_DPARAM8(0, v->cargo_type);
truelight@0: 			SET_DPARAM16(1, v->cargo_count);
truelight@0: 			SET_DPARAM16(2, v->cargo_source);
truelight@0: 			str = STR_8813_FROM;
truelight@0: 		}
truelight@0: 		DrawString(34, 78, str, 0);
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_CLICK:
truelight@0: 		switch(e->click.widget) {
truelight@0: 		case 2: /* rename */
truelight@0: 			SET_DPARAM16(0, v->unitnumber);
truelight@0: 			ShowQueryString(v->string_id, STR_902C_NAME_ROAD_VEHICLE, 31, 150, w->window_class, w->window_number);
truelight@0: 			break;
truelight@0: 
truelight@0: 		case 5: /* increase int */
truelight@0: 			mod = 10;
truelight@0: 			goto change_int;
truelight@0: 		case 6: /* decrease int */
truelight@0: 			mod = -10;
truelight@0: change_int:
truelight@0: 			mod += v->service_interval;
truelight@0: 			if (!IS_INT_INSIDE(mod, 30, 800+1))
truelight@0: 				return;
truelight@0: 			DoCommandP(v->tile, v->index, mod, NULL, CMD_CHANGE_ROADVEH_SERVICE_INT | CMD_MSG(STR_018A_CAN_T_CHANGE_SERVICING));
truelight@0: 			break;
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_4:
truelight@0: 		if (FindWindowById(WC_VEHICLE_VIEW, w->window_number) == NULL)
truelight@0: 			DeleteWindow(w);
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_ON_EDIT_TEXT: {
truelight@0: 		byte *b = e->edittext.str;
truelight@0: 		if (*b == 0)
truelight@0: 			return;
truelight@0: 		memcpy(_decode_parameters, b, 32);
truelight@0: 		DoCommandP(0, w->window_number, 0, NULL, CMD_NAME_VEHICLE | CMD_MSG(STR_902D_CAN_T_NAME_ROAD_VEHICLE));
truelight@0: 	} break;
truelight@0: 
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _roadveh_details_widgets[] = {
truelight@0: {    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
truelight@0: {    WWT_CAPTION,    14,    11,   339,     0,    13, STR_900C_DETAILS, STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@0: { WWT_PUSHTXTBTN,    14,   340,   379,     0,    13, STR_01AA_NAME, STR_902E_NAME_ROAD_VEHICLE},
truelight@0: {     WWT_IMGBTN,    14,     0,   379,    14,    55, 0x0},
truelight@0: {     WWT_IMGBTN,    14,     0,   379,    56,    88, 0x0},
truelight@0: { WWT_PUSHTXTBTN,    14,     0,    10,    89,    94, STR_0188, STR_884D_INCREASE_SERVICING_INTERVAL},
truelight@0: { WWT_PUSHTXTBTN,    14,     0,    10,    95,   100, STR_0189, STR_884E_DECREASE_SERVICING_INTERVAL},
truelight@0: {     WWT_IMGBTN,    14,    11,   379,    89,   100, 0x0},
truelight@0: {      WWT_LAST},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _roadveh_details_desc = {
truelight@0: 	-1,-1, 380, 101,
truelight@0: 	WC_VEHICLE_DETAILS,WC_VEHICLE_VIEW,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
truelight@0: 	_roadveh_details_widgets,
truelight@0: 	RoadVehDetailsWndProc
truelight@0: };
truelight@0: 
truelight@0: static void ShowRoadVehDetailsWindow(Vehicle *v)
truelight@0: {
truelight@0: 	Window *w;
truelight@0: 	VehicleID veh = v->index;
truelight@0: 	DeleteWindowById(WC_VEHICLE_ORDERS, veh);
truelight@0: 	DeleteWindowById(WC_VEHICLE_DETAILS, veh);
truelight@0: 	_alloc_wnd_parent_num = veh;	
truelight@0: 	w = AllocateWindowDesc(&_roadveh_details_desc);
truelight@0: 	w->window_number = veh;
truelight@0: 	w->caption_color = v->owner;
truelight@0: }
truelight@0: 
truelight@0: static void RoadVehViewWndProc(Window *w, WindowEvent *e)
truelight@0: {
truelight@0: 	switch(e->event) {
truelight@0: 	case WE_PAINT: {
truelight@0: 		Vehicle *v = &_vehicles[w->window_number];
truelight@0: 		StringID str;
truelight@0: 
truelight@0: 		w->disabled_state = (v->owner != _local_player) ? (1<<7 | 1<<6) : 0;
truelight@0: 
truelight@0: 		/* draw widgets & caption */
truelight@0: 		SET_DPARAM16(0, v->string_id);
truelight@0: 		SET_DPARAM16(1, v->unitnumber);
truelight@0: 		DrawWindowWidgets(w);
truelight@0: 
truelight@0: 		/* draw the flag */
truelight@0: 		DrawSprite((v->vehstatus & VS_STOPPED) ? 0xC12  : 0xC13, 2, 105);
truelight@0: 
truelight@0: 		if (v->u.road.crashed_ctr != 0) {
truelight@0: 			str = STR_8863_CRASHED;
truelight@0: 		} else if (v->breakdown_ctr == 1) {
truelight@0: 			str = STR_885C_BROKEN_DOWN;
truelight@0: 		} else if (v->vehstatus & VS_STOPPED) {
truelight@0: 			str = STR_8861_STOPPED;
truelight@0: 		} else {
truelight@0: 			switch(v->next_order & OT_MASK) {
truelight@0: 			case OT_GOTO_STATION: {
truelight@0: 				SET_DPARAM16(0, v->next_order_param);
truelight@0: 				SET_DPARAM16(1, v->cur_speed * 10 >> 5);
truelight@0: 				str = STR_HEADING_FOR_STATION + _patches.vehicle_speed;
truelight@0: 			} break;
truelight@0: 
truelight@0: 			case OT_GOTO_DEPOT: {
truelight@0: 				Depot *dep = &_depots[v->next_order_param];
truelight@0: 				SET_DPARAM16(0, dep->town_index);
truelight@0: 				SET_DPARAM16(1, v->cur_speed * 10 >> 5);
truelight@0: 				str = STR_HEADING_FOR_ROAD_DEPOT + _patches.vehicle_speed;
truelight@0: 			} break;
truelight@0: 
truelight@0: 			case OT_LOADING:
truelight@0: 			case OT_LEAVESTATION:
truelight@0: 				str = STR_882F_LOADING_UNLOADING;
truelight@0: 				break;
truelight@0: 
truelight@0: 			default:
truelight@0: 				if (v->num_orders == 0) {
truelight@0: 					str = STR_NO_ORDERS + _patches.vehicle_speed;
truelight@0: 					SET_DPARAM16(0, v->cur_speed * 10 >> 5);
truelight@0: 				} else
truelight@0: 					str = STR_EMPTY;
truelight@0: 				break;
truelight@0: 			}
truelight@0: 		}
truelight@0: 
truelight@0: 		DrawStringCentered(125, 105, str, 0);
truelight@0: 		DrawWindowViewport(w);
truelight@0: 	} break;
truelight@0: 		
truelight@0: 	case WE_CLICK: {
truelight@0: 		Vehicle *v = &_vehicles[w->window_number];
truelight@0: 
truelight@0: 		switch(e->click.widget) {
truelight@0: 		case 4: /* start stop */
truelight@0: 			DoCommandP(v->tile, v->index, 0, NULL, CMD_START_STOP_ROADVEH | CMD_MSG(STR_9015_CAN_T_STOP_START_ROAD_VEHICLE)); 
truelight@0: 			break;
truelight@0: 		case 5: /* center main view */
truelight@0: 			ScrollMainWindowTo(v->x_pos, v->y_pos);
truelight@0: 			break;
truelight@0: 		case 6: /* goto hangar */
truelight@0: 			DoCommandP(v->tile, v->index, 0, NULL, CMD_SEND_ROADVEH_TO_DEPOT | CMD_MSG(STR_9018_CAN_T_SEND_VEHICLE_TO_DEPOT));
truelight@0: 			break;
truelight@0: 		case 7: /* turn around */
truelight@0: 			DoCommandP(v->tile, v->index, 0, NULL, CMD_TURN_ROADVEH | CMD_MSG(STR_9033_CAN_T_MAKE_VEHICLE_TURN));
truelight@0: 			break;
truelight@0: 		case 8: /* show orders */
truelight@0: 			ShowOrdersWindow(v);
truelight@0: 			break;
truelight@0: 		case 9: /* show details */
truelight@0: 			ShowRoadVehDetailsWindow(v);
truelight@0: 			break;
truelight@0: 		}
truelight@0: 	} break;
truelight@0: 		
truelight@0: 	case WE_DESTROY:
truelight@0: 		DeleteWindowById(WC_VEHICLE_ORDERS, w->window_number);
truelight@0: 		DeleteWindowById(WC_VEHICLE_DETAILS, w->window_number);
truelight@0: 		break;	
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _roadveh_view_widgets[] = {
truelight@0: {    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
truelight@0: {    WWT_CAPTION,    14,    11,   249,     0,    13, STR_9002, STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@0: {     WWT_IMGBTN,    14,     0,   231,    14,   103, 0x0},
truelight@0: {          WWT_6,    14,     2,   229,    16,   101, 0},
truelight@0: { WWT_PUSHIMGBTN,    14,     0,   249,   104,   115, 0x0, STR_901C_CURRENT_VEHICLE_ACTION},
truelight@0: { WWT_PUSHIMGBTN,    14,   232,   249,    14,    31, 0x2AB, STR_901E_CENTER_MAIN_VIEW_ON_VEHICLE},
truelight@0: { WWT_PUSHIMGBTN,    14,   232,   249,    32,    49, 0x2AE, STR_901F_SEND_VEHICLE_TO_DEPOT},
truelight@0: { WWT_PUSHIMGBTN,    14,   232,   249,    50,    67, 0x2CB, STR_9020_FORCE_VEHICLE_TO_TURN_AROUND},
truelight@0: { WWT_PUSHIMGBTN,    14,   232,   249,    68,    85, 0x2B2, STR_901D_SHOW_VEHICLE_S_ORDERS},
truelight@0: { WWT_PUSHIMGBTN,    14,   232,   249,    86,   103, 0x2B3, STR_9021_SHOW_ROAD_VEHICLE_DETAILS},
truelight@0: {      WWT_LAST},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _roadveh_view_desc = {
truelight@0: 	-1,-1, 250, 116,
truelight@0: 	WC_VEHICLE_VIEW,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
truelight@0: 	_roadveh_view_widgets,
truelight@0: 	RoadVehViewWndProc,
truelight@0: };
truelight@0: 
truelight@0: void ShowRoadVehViewWindow(Vehicle *v)
truelight@0: {
truelight@0: 	Window *w;
truelight@0: 
truelight@0: 	w = AllocateWindowDescFront(&_roadveh_view_desc, v->index);
truelight@0: 	if (w) {
truelight@0: 		w->caption_color = v->owner;
truelight@0: 		AssignWindowViewport(w, 3, 17, 0xE2, 0x54, w->window_number | (1 << 31), 0);
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: 
truelight@0: static void DrawNewRoadVehWindow(Window *w)
truelight@0: {
truelight@0: 	YearMonthDay ymd;
truelight@0: 
truelight@0: 	if (w->window_number == 0)
truelight@0: 		w->disabled_state = 1 << 5;
truelight@0: 
truelight@0: 	// setup scroller
truelight@0: 	{
truelight@0: 		int count = 0;
truelight@0: 		int num = NUM_ROAD_ENGINES;
truelight@0: 		Engine *e = &_engines[ROAD_ENGINES_INDEX];
truelight@0: 		do {
truelight@0: 			if (HASBIT(e->player_avail, _local_player))
truelight@0: 				count++;
truelight@0: 		} while (++e,--num);
truelight@0: 		SetVScrollCount(w, count);
truelight@0: 	}
truelight@0: 
truelight@0: 	DrawWindowWidgets(w);
truelight@0: 
truelight@0: 	{
truelight@0: 		int num = NUM_ROAD_ENGINES;
truelight@0: 		Engine *e = &_engines[ROAD_ENGINES_INDEX];
truelight@0: 		int x = 1;
truelight@0: 		int y = 15;
truelight@0: 		int sel = WP(w,buildtrain_d).sel_index;
truelight@0: 		int pos = w->vscroll.pos;
truelight@0: 		int engine_id = ROAD_ENGINES_INDEX;
truelight@0: 		int selected_id = -1;
truelight@0: 
truelight@0: 		do {
truelight@0: 			if (HASBIT(e->player_avail, _local_player)) {
truelight@0: 				if (sel==0) selected_id = engine_id;
truelight@0: 				if (IS_INT_INSIDE(--pos, -8, 0)) {
truelight@0: 					DrawString(x+59, y+2, GetCustomEngineName(engine_id), sel==0 ? 0xC : 0x10);
truelight@0: 					DrawRoadVehEngine(x+29, y+6, engine_id, SPRITE_PALETTE(PLAYER_SPRITE_COLOR(_local_player)));
truelight@0: 					y += 14;
truelight@0: 				}
truelight@0: 				sel--; 
truelight@0: 			}
truelight@0: 		} while (++engine_id, ++e,--num);
truelight@0: 
truelight@0: 		WP(w,buildtrain_d).sel_engine = selected_id;
truelight@0: 		if (selected_id != -1) {
truelight@0: 			Engine *e;
truelight@0: 
truelight@0: 			SET_DPARAM32(0, _roadveh_price[selected_id - ROAD_ENGINES_INDEX] * (_price.roadveh_base>>3)>>5);
truelight@0: 			SET_DPARAM16(1, _roadveh_speed[selected_id - ROAD_ENGINES_INDEX] * 10 >> 5);
truelight@0: 			SET_DPARAM32(2, _roadveh_runningcost[selected_id - ROAD_ENGINES_INDEX] * _price.roadveh_running >> 8);
truelight@0: 			SET_DPARAM16(4, _roadveh_capacity[selected_id - ROAD_ENGINES_INDEX]);
truelight@0: 			SET_DPARAM16(3, _cargoc.names_long_p[_roadveh_cargo_type[selected_id - ROAD_ENGINES_INDEX]]);
truelight@0: 
truelight@0: 			e = &_engines[selected_id];	
truelight@0: 			SET_DPARAM16(6, e->lifelength);
truelight@0: 			SET_DPARAM8(7, e->reliability * 100 >> 16);
truelight@0: 			ConvertDayToYMD(&ymd, e->intro_date);
truelight@0: 			SET_DPARAM16(5, ymd.year + 1920);
truelight@0: 			
truelight@0: 			DrawString(2, 127, STR_9008_COST_SPEED_RUNNING_COST, 0);
truelight@0: 		}
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static void CcBuildRoadVeh(bool success, uint tile, uint32 p1, uint32 p2)
truelight@0: {
truelight@0: 	Vehicle *v;
truelight@0: 
truelight@0: 	if (!success) return;
truelight@0: 
truelight@0: 	v = &_vehicles[_new_roadveh_id];
truelight@0: 	if (v->tile == _backup_orders_tile) {
truelight@0: 		_backup_orders_tile = 0;
truelight@0: 		RestoreVehicleOrders(v, _backup_orders_data);
truelight@0: 	}
truelight@0: 	ShowRoadVehViewWindow(v);
truelight@0: }
truelight@0: 
truelight@0: static void NewRoadVehWndProc(Window *w, WindowEvent *e)
truelight@0: {
truelight@0: 	switch(e->event) {
truelight@0: 	case WE_PAINT:
truelight@0: 		DrawNewRoadVehWindow(w);
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_CLICK:
truelight@0: 		switch(e->click.widget) {
truelight@0: 		case 2: { /* listbox */
truelight@0: 			uint i = (e->click.pt.y - 14) / 14;
truelight@0: 			if (i < 8) {
truelight@0: 				WP(w,buildtrain_d).sel_index = i + w->vscroll.pos;
truelight@0: 				SetWindowDirty(w);
truelight@0: 			}
truelight@0: 		} break;
truelight@0: 
truelight@0: 		case 5: { /* build */
truelight@0: 			int sel_eng = WP(w,buildtrain_d).sel_engine;
truelight@0: 			if (sel_eng != -1)
truelight@0: 				DoCommandP(w->window_number, sel_eng, 0, CcBuildRoadVeh, CMD_BUILD_ROAD_VEH | CMD_MSG(STR_9009_CAN_T_BUILD_ROAD_VEHICLE));
truelight@0: 		} break;
truelight@0: 
truelight@0: 		case 6: /* rename */
truelight@0: 			WP(w,buildtrain_d).rename_engine = WP(w,buildtrain_d).sel_engine;
truelight@0: 			ShowQueryString(
truelight@0: 				GetCustomEngineName(WP(w,buildtrain_d).sel_engine),
truelight@0: 				STR_9036_RENAME_ROAD_VEHICLE_TYPE,
truelight@0: 				31,
truelight@0: 				160,
truelight@0: 				w->window_class,
truelight@0: 				w->window_number);
truelight@0: 			break;		
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_4:
truelight@0: 		if (w->window_number != 0 && !FindWindowById(WC_VEHICLE_DEPOT, w->window_number)) {
truelight@0: 			DeleteWindow(w);
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_ON_EDIT_TEXT: {
truelight@0: 		byte *b = e->edittext.str;
truelight@0: 		if (*b == 0)
truelight@0: 			return;
truelight@0: 		memcpy(_decode_parameters, b, 32);
truelight@0: 		DoCommandP(0, WP(w,buildtrain_d).rename_engine, 0, NULL, CMD_RENAME_ENGINE | CMD_MSG(STR_9037_CAN_T_RENAME_ROAD_VEHICLE));
truelight@0: 	} break;
truelight@0: 		
truelight@0: 	}	
truelight@0: }
truelight@0: 
truelight@0: static const Widget _new_road_veh_widgets[] = {
truelight@0: {    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
truelight@0: {    WWT_CAPTION,    14,    11,   247,     0,    13, STR_9006_NEW_ROAD_VEHICLES, STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@0: {     WWT_MATRIX,    14,     0,   236,    14,   125, 0x801, STR_9026_ROAD_VEHICLE_SELECTION},
truelight@0: {  WWT_SCROLLBAR,    14,   237,   247,    14,   125, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
truelight@0: {     WWT_IMGBTN,    14,     0,   247,   126,   177, 0x0, 0},
truelight@0: { WWT_PUSHTXTBTN,    14,     0,   123,   178,   189, STR_9007_BUILD_VEHICLE, STR_9027_BUILD_THE_HIGHLIGHTED_ROAD},
truelight@0: { WWT_PUSHTXTBTN,    14,   124,   247,   178,   189, STR_9034_RENAME, STR_9035_RENAME_ROAD_VEHICLE_TYPE},
truelight@0: {      WWT_LAST},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _new_road_veh_desc = {
truelight@0: 	-1, -1, 248, 190,
truelight@0: 	WC_BUILD_VEHICLE,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
truelight@0: 	_new_road_veh_widgets,
truelight@0: 	NewRoadVehWndProc
truelight@0: };
truelight@0: 
truelight@0: static void ShowBuildRoadVehWindow(TileIndex tile)
truelight@0: {
truelight@0: 	Window *w;
truelight@0: 
truelight@0: 	DeleteWindowById(WC_BUILD_VEHICLE, tile);
truelight@0: 
truelight@0: 	w = AllocateWindowDesc(&_new_road_veh_desc);
truelight@0: 	w->window_number = tile;
truelight@0: 	w->vscroll.cap = 8;
truelight@0: 	
truelight@0: 	if (tile != 0) {
truelight@0: 		w->caption_color = _map_owner[tile];
truelight@0: 	} else {
truelight@0: 		w->caption_color = _local_player;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static void DrawRoadDepotWindow(Window *w)
truelight@0: {
truelight@0: 	uint tile;
truelight@0: 	Vehicle *v;
truelight@0: 	int num,x,y;
truelight@0: 	Depot *d;
truelight@0: 
truelight@0: 	tile = w->window_number;
truelight@0: 
truelight@0: 	/* setup disabled buttons */
truelight@0: 	w->disabled_state = (_map_owner[tile]==_local_player) ? 0 : ((1<<3)|(1<<5));
truelight@0: 
truelight@0: 	/* determine amount of items for scroller */
truelight@0: 	num = 0;
truelight@0: 	FOR_ALL_VEHICLES(v) {
truelight@0: 		if (v->type == VEH_Road && v->u.road.state == 254 &&
truelight@0: 				v->tile == (TileIndex)tile)
truelight@0: 					num++;
truelight@0: 	}
truelight@0: 	SetVScrollCount(w, (num + 4) / 5);
truelight@0: 
truelight@0: 	/* locate the depot struct */
truelight@0: 	for(d=_depots; d->xy != (TileIndex)tile; d++) {}
truelight@0: 
truelight@0: 	SET_DPARAM16(0, d->town_index);
truelight@0: 	DrawWindowWidgets(w);
truelight@0: 
truelight@0: 	x = 2;
truelight@0: 	y = 15;
truelight@0: 	num = w->vscroll.pos * 5;
truelight@0: 
truelight@0: 	FOR_ALL_VEHICLES(v) {
truelight@0: 		if (v->type == VEH_Road &&
truelight@0: 				v->u.road.state == 254 && 
truelight@0: 				v->tile == (TileIndex)tile &&
truelight@0: 				--num < 0 && num >=	-15) {
truelight@0: 
truelight@0: 			DrawRoadVehImage(v, x+24, y, WP(w,traindepot_d).sel);
truelight@0: 			
truelight@0: 			SET_DPARAM16(0, v->unitnumber);
truelight@0: 			DrawString(x, y+2, (uint16)(v->max_age-366) >= v->age ? STR_00E2 : STR_00E3, 0);
truelight@0: 
truelight@0: 			DrawSprite( (v->vehstatus & VS_STOPPED) ? 0xC12 : 0xC13, x + 16, y);
truelight@0: 			
truelight@0: 			if ((x+=56) == 2+56*5) {
truelight@0: 				x = 2;
truelight@0: 				y += 14;
truelight@0: 			}
truelight@0: 		}
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static int GetVehicleFromRoadDepotWndPt(Window *w, int x, int y, Vehicle **veh)
truelight@0: {
truelight@0: 	uint xt,yt,xm;
truelight@0: 	TileIndex tile;
truelight@0: 	Vehicle *v;
truelight@0: 	int pos;
truelight@0: 		
truelight@0: 	xt = x / 56;
truelight@0: 	xm = x % 56;
truelight@0: 	if (xt >= 5)
truelight@0: 		return 1;
truelight@0: 
truelight@0: 	yt = (y - 14) / 14;
truelight@0: 	if (yt >= 3)
truelight@0: 		return 1;
truelight@0: 
truelight@0: 	pos = (yt + w->vscroll.pos) * 5 + xt;
truelight@0: 
truelight@0: 	tile = w->window_number;
truelight@0: 	FOR_ALL_VEHICLES(v) {
truelight@0: 		if (v->type == VEH_Road &&
truelight@0: 				v->u.road.state == 254 && 
truelight@0: 				v->tile == (TileIndex)tile &&
truelight@0: 				--pos < 0) {
truelight@0: 					*veh = v;
truelight@0: 					if (xm >= 24)
truelight@0: 						return 0;
truelight@0: 
truelight@0: 					if (xm <= 16)
truelight@0: 						return -1; /* show window */
truelight@0: 
truelight@0: 					return -2; /* start stop */
truelight@0: 				}
truelight@0: 	}
truelight@0: 
truelight@0: 	return 1; /* outside */
truelight@0: }
truelight@0: 
truelight@0: static void RoadDepotClickVeh(Window *w, int x, int y)
truelight@0: {
truelight@0: 	Vehicle *v;
dominik@10: 	int mode;
truelight@0: 
dominik@10: 	mode = GetVehicleFromRoadDepotWndPt(w, x, y, &v);
dominik@10: 	if (mode > 0) return;
truelight@0: 
dominik@10: 	// share / copy orders
dominik@10: 	if (_thd.place_mode && mode <= 0) { _place_clicked_vehicle = v; return; }
dominik@10: 
dominik@10: 	switch (mode) {
dominik@10: 	case 0: // start dragging of vehicle
truelight@0: 		if (v != NULL) {
truelight@0: 			WP(w,traindepot_d).sel = v->index;
truelight@0: 			SetWindowDirty(w);
truelight@0: 			SetObjectToPlaceWnd( SPRITE_PALETTE(PLAYER_SPRITE_COLOR(v->owner)) + GetRoadVehImage(v, 6), 4, w);
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
dominik@10: 	case -1: // show info window
truelight@0: 		ShowRoadVehViewWindow(v);
truelight@0: 		break;
truelight@0: 
dominik@10: 	case -2: // click start/stop flag
truelight@0: 		DoCommandP(v->tile, v->index, 0, NULL, CMD_START_STOP_ROADVEH | CMD_MSG(STR_9015_CAN_T_STOP_START_ROAD_VEHICLE));
truelight@0: 		break;
truelight@0: 
truelight@0: 	default:
truelight@0: 		NOT_REACHED();
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static void RoadDepotWndProc(Window *w, WindowEvent *e)
truelight@0: {
truelight@0: 	switch(e->event) {
truelight@0: 	case WE_PAINT:
truelight@0: 		DrawRoadDepotWindow(w);
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_CLICK: {
truelight@0: 		switch(e->click.widget) {
truelight@0: 		case 2:
truelight@0: 			RoadDepotClickVeh(w, e->click.pt.x, e->click.pt.y);
truelight@0: 			break;
truelight@0: 			
truelight@0: 		case 5:
truelight@0: 			ShowBuildRoadVehWindow(w->window_number);
truelight@0: 			break;
truelight@0: 
truelight@0: 		case 6: /* scroll to tile */
truelight@0: 			ScrollMainWindowToTile(w->window_number);
truelight@0: 			break;
truelight@0: 		}
truelight@0: 	} break;
truelight@0: 	
truelight@0: 	case WE_DESTROY:
truelight@0: 		DeleteWindowById(WC_BUILD_VEHICLE, w->window_number);
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_DRAGDROP: {
truelight@0: 		switch(e->click.widget) {
truelight@0: 		case 2: {
truelight@0: 			Vehicle *v;
truelight@0: 			VehicleID sel = WP(w,traindepot_d).sel;
truelight@0: 
truelight@0: 			WP(w,traindepot_d).sel = INVALID_VEHICLE;
truelight@0: 			SetWindowDirty(w);
truelight@0: 
truelight@0: 			if (GetVehicleFromRoadDepotWndPt(w, e->dragdrop.pt.x, e->dragdrop.pt.y, &v) == 0 &&
truelight@0: 					v != NULL &&
truelight@0: 					sel == v->index) {
truelight@0: 				ShowRoadVehViewWindow(v);
truelight@0: 			}
truelight@0: 		} break;
truelight@0: 					
truelight@0: 		case 3:
truelight@0: 			if (!HASBIT(w->disabled_state, 3) &&
truelight@0: 					WP(w,traindepot_d).sel != INVALID_VEHICLE)	{
truelight@0: 				Vehicle *v;
truelight@0: 				
truelight@0: 				HandleButtonClick(w, 3);
truelight@0: 
truelight@0: 				v = &_vehicles[WP(w,traindepot_d).sel];
truelight@0: 				WP(w,traindepot_d).sel = INVALID_VEHICLE;
truelight@0: 
truelight@0: 				_backup_orders_tile = v->tile;
truelight@0: 				BackupVehicleOrders(v, _backup_orders_data);
truelight@0: 	
truelight@0: 				if (!DoCommandP(v->tile, v->index, 0, NULL, CMD_SELL_ROAD_VEH | CMD_MSG(STR_9014_CAN_T_SELL_ROAD_VEHICLE)))
truelight@0: 					_backup_orders_tile = 0;
truelight@0: 			}
truelight@0: 			break;
truelight@0: 		default:
truelight@0: 			WP(w,traindepot_d).sel = INVALID_VEHICLE;
truelight@0: 			SetWindowDirty(w);
truelight@0: 		}
truelight@0: 		break;
truelight@0: 	}
truelight@0: 	break;
truelight@0: 
truelight@0: 	}
truelight@0: 
truelight@0: }
truelight@0: 
truelight@0: static const Widget _road_depot_widgets[] = {
truelight@0: {    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
truelight@0: {    WWT_CAPTION,    14,    11,   314,     0,    13, STR_9003_ROAD_VEHICLE_DEPOT, STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@0: {     WWT_MATRIX,    14,     0,   279,    14,    55, 0x305, STR_9022_VEHICLES_CLICK_ON_VEHICLE},
truelight@0: {     WWT_IMGBTN,    14,   280,   303,    14,    55, 0x2A9, STR_9024_DRAG_ROAD_VEHICLE_TO_HERE},
truelight@0: {  WWT_SCROLLBAR,    14,   304,   314,    14,    55, 0x0,  STR_0190_SCROLL_BAR_SCROLLS_LIST},
truelight@0: { WWT_PUSHTXTBTN,    14,     0,   156,    56,    67, STR_9004_NEW_VEHICLES, STR_9023_BUILD_NEW_ROAD_VEHICLE},
truelight@0: { WWT_PUSHTXTBTN,    14,   157,   314,    56,    67, STR_00E4_LOCATION, STR_9025_CENTER_MAIN_VIEW_ON_ROAD},
truelight@0: {      WWT_LAST},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _road_depot_desc = {
truelight@0: 	-1, -1, 315, 68,
truelight@0: 	WC_VEHICLE_DEPOT,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
truelight@0: 	_road_depot_widgets,
truelight@0: 	RoadDepotWndProc
truelight@0: };
truelight@0: 
truelight@0: void ShowRoadDepotWindow(uint tile)
truelight@0: {
truelight@0: 	Window *w;
truelight@0: 	
truelight@0: 	w = AllocateWindowDescFront(&_road_depot_desc, tile);
truelight@0: 	if (w) {
truelight@0: 		w->caption_color = _map_owner[w->window_number];
truelight@0: 		w->vscroll.cap = 3;
truelight@0: 		WP(w,traindepot_d).sel = -1;
truelight@0: 		_backup_orders_tile = 0;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static void PlayerRoadVehWndProc(Window *w, WindowEvent *e)
truelight@0: {
truelight@0: 	switch(e->event) {
truelight@0: 	case WE_PAINT:
truelight@0: 		/* determine amount of items for scroller */
truelight@0: 		{
truelight@0: 			Vehicle *v;
truelight@0: 			int num = 0;
truelight@0: 			byte owner = (byte)w->window_number;
truelight@0: 
truelight@0: 			FOR_ALL_VEHICLES(v) {
truelight@0: 				if (v->type == VEH_Road && v->owner == owner)
truelight@0: 					num++;
truelight@0: 			}
truelight@0: 			SetVScrollCount(w, num);
truelight@0: 		}
truelight@0: 
truelight@0: 		/* draw the widgets */
truelight@0: 		{
truelight@0: 			Player *p = DEREF_PLAYER(w->window_number);
truelight@0: 			SET_DPARAM16(0, p->name_1);
truelight@0: 			SET_DPARAM32(1, p->name_2);
truelight@0: 			DrawWindowWidgets(w);
truelight@0: 		}
truelight@0: 
truelight@0: 		/* draw the road vehicles */
truelight@0: 		{
truelight@0: 			Vehicle *v;
truelight@0: 			int pos = w->vscroll.pos;
truelight@0: 			byte owner = (byte)w->window_number;
truelight@0: 			int x = 2;
truelight@0: 			int y = 15;
truelight@0: 			
truelight@0: 			FOR_ALL_VEHICLES(v) {
truelight@0: 				if (v->type == VEH_Road && v->owner == owner &&
truelight@0: 						--pos < 0 && pos >= -7) {
truelight@0: 					StringID str;
truelight@0: 					
truelight@0: 					DrawRoadVehImage(v, x + 22, y + 6, INVALID_VEHICLE);
truelight@0: 					DrawVehicleProfitButton(v, x, y+13);
truelight@0: 					
truelight@0: 					SET_DPARAM16(0, v->unitnumber);
truelight@0: 					if (IsRoadDepotTile(v->tile)) {
truelight@0: 						str = STR_021F;
truelight@0: 					} else {
truelight@0: 						str = v->age > v->max_age - 366 ? STR_00E3 : STR_00E2;
truelight@0: 					}
truelight@0: 					DrawString(x, y+2, str, 0);
truelight@0: 
truelight@0: 					SET_DPARAM32(0, v->profit_this_year);
truelight@0: 					SET_DPARAM32(1, v->profit_last_year);
truelight@0: 					DrawString(x + 24, y + 18, STR_0198_PROFIT_THIS_YEAR_LAST_YEAR, 0);
truelight@0: 					
truelight@0: 					if (v->string_id != STR_SV_ROADVEH_NAME) {
truelight@0: 						SET_DPARAM16(0, v->string_id);
truelight@0: 						DrawString(x+24, y, STR_01AB, 0);
truelight@0: 					}
truelight@0: 					y += 26;
truelight@0: 				}				
truelight@0: 			}
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_CLICK:
truelight@0: 		switch(e->click.widget) {
truelight@0: 		case 2: {
truelight@0: 			int idx = (e->click.pt.y - 14) / 26;
truelight@0: 			Vehicle *v;
truelight@0: 			byte owner;
truelight@0: 
truelight@0: 			if ((uint)idx >= 7)
truelight@0: 				break;
truelight@0: 
truelight@0: 			idx += w->vscroll.pos;
truelight@0: 
truelight@0: 			owner = (byte)w->window_number;
truelight@0: 
truelight@0: 			FOR_ALL_VEHICLES(v) {
truelight@0: 				if (v->type == VEH_Road && v->owner == owner &&
truelight@0: 						--idx < 0) {	
truelight@0: 					ShowRoadVehViewWindow(v);
truelight@0: 					break;
truelight@0: 				}
truelight@0: 			}
truelight@0: 		} break;
truelight@0: 
truelight@0: 		case 4: {
truelight@0: 			uint tile;
truelight@0: 
truelight@0: 			tile = _last_built_road_depot_tile;
truelight@0: 			do {
truelight@0: 				if (_map_owner[tile] == _local_player &&
truelight@0: 						IsRoadDepotTile(tile)) {
truelight@0: 					
truelight@0: 					ShowRoadDepotWindow(tile);
truelight@0: 					ShowBuildRoadVehWindow(tile);
truelight@0: 					return;
truelight@0: 				}
truelight@0: 				
truelight@0: 				tile = TILE_MASK(tile + 1);
truelight@0: 			} while(tile != _last_built_road_depot_tile);
truelight@0: 			
truelight@0: 			ShowBuildRoadVehWindow(0);
truelight@0: 		} break;
truelight@0: 	} break;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _player_roadveh_widgets[] = {
truelight@0: {    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
truelight@0: {    WWT_CAPTION,    14,    11,   259,     0,    13, STR_9001_ROAD_VEHICLES, STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@0: {     WWT_MATRIX,    14,     0,   248,    14,   195, 0x701, STR_901A_ROAD_VEHICLES_CLICK_ON},
truelight@0: {  WWT_SCROLLBAR,    14,   249,   259,    14,   195, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
truelight@0: { WWT_PUSHTXTBTN,    14,     0,   129,   196,   207, STR_9004_NEW_VEHICLES, STR_901B_BUILD_NEW_ROAD_VEHICLES},
truelight@0: {     WWT_IMGBTN,    14,   130,   259,   196,   207, 0x0, 0},
truelight@0: {      WWT_LAST},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _player_roadveh_desc = {
truelight@0: 	-1, -1, 260, 208,
truelight@0: 	WC_ROADVEH_LIST,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
truelight@0: 	_player_roadveh_widgets,
truelight@0: 	PlayerRoadVehWndProc
truelight@0: };
truelight@0: 
truelight@0: static const Widget _other_player_roadveh_widgets[] = {
truelight@0: {    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
truelight@0: {    WWT_CAPTION,    14,    11,   259,     0,    13, STR_9001_ROAD_VEHICLES, STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@0: {     WWT_MATRIX,    14,     0,   248,    14,   195, 0x701, STR_901A_ROAD_VEHICLES_CLICK_ON},
truelight@0: {  WWT_SCROLLBAR,    14,   249,   259,    14,   195, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
truelight@0: {      WWT_LAST},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _other_player_roadveh_desc = {
truelight@0: 	-1, -1, 260, 196,
truelight@0: 	WC_ROADVEH_LIST,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_other_player_roadveh_widgets,
truelight@0: 	PlayerRoadVehWndProc
truelight@0: };
truelight@0: 
truelight@0: 
truelight@0: void ShowPlayerRoadVehicles(int player)
truelight@0: {
truelight@0: 	Window *w;
truelight@0: 
truelight@0: 	if ( player == _local_player) {
truelight@0: 		w = AllocateWindowDescFront(&_player_roadveh_desc, player);
truelight@0: 	} else  {
truelight@0: 		w = AllocateWindowDescFront(&_other_player_roadveh_desc, player);
truelight@0: 	}
truelight@0: 	if (w) {
truelight@0: 		w->caption_color = player;
truelight@0: 		w->vscroll.cap = 7;
truelight@0: 	}
truelight@0: }