1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "map.h"

     5

#include "window.h"

     6

#include "gui.h"

     7

#include "gfx.h"

     8

#include "vehicle.h"

     9

#include "viewport.h"

    10

#include "station.h"

    11

#include "command.h"

    12

#include "player.h"

    13

#include "engine.h"

    14

    15

static void DrawRoadVehImage(Vehicle *v, int x, int y, VehicleID selection)

    16

{

    17

	int image = GetRoadVehImage(v, 6);

    18

	uint32 ormod = SPRITE_PALETTE(PLAYER_SPRITE_COLOR(v->owner));

    19

	if (v->vehstatus & VS_CRASHED) ormod = 0x3248000;

    20

	DrawSprite(image | ormod, x+14, y+6);

    21

    22

	if (v->index == selection) {

    23

		DrawFrameRect(x-1, y-1, x+28, y+12, 15, 0x10);

    24

	}

    25

}

    26

    27

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

    28

{

    29

	Vehicle *v = &_vehicles[w->window_number];

    30

	StringID str;

    31

	int mod;

    32

    33

	switch(e->event) {

    34

	case WE_PAINT:

    35

		w->disabled_state = v->owner == _local_player ? 0 : (1 << 2);

    36

		if (!_patches.servint_roadveh) // disable service-scroller when interval is set to disabled

    37

			w->disabled_state |= (1 << 5) | (1 << 6);

    38

    39

		SetDParam(0, v->string_id);

    40

		SetDParam(1, v->unitnumber);

    41

		DrawWindowWidgets(w);

    42

    43

		/* Draw running cost */

    44

		{

    45

			int year = v->age / 366;

    46

			StringID str;

    47

    48

			SetDParam(1, year);

    49

    50

			str = STR_0199_YEAR;

    51

			if (year != 1) {

    52

				str++;

    53

				if (v->max_age - 366 < v->age)

    54

					str++;

    55

			}

    56

			SetDParam(0, str);

    57

			SetDParam(2, v->max_age / 366);

    58

			SetDParam(3, RoadVehInfo(v->engine_type)->running_cost * _price.roadveh_running >> 8);

    59

			DrawString(2, 15, STR_900D_AGE_RUNNING_COST_YR, 0);

    60

		}

    61

    62

		/* Draw max speed */

    63

		{

    64

			SetDParam(0, v->max_speed * 10 >> 5);

    65

			DrawString(2, 25, STR_900E_MAX_SPEED, 0);

    66

		}

    67

    68

		/* Draw profit */

    69

		{

    70

			SetDParam(0, v->profit_this_year);

    71

			SetDParam(1, v->profit_last_year);

    72

			DrawString(2, 35, STR_900F_PROFIT_THIS_YEAR_LAST_YEAR, 0);

    73

		}

    74

    75

		/* Draw breakdown & reliability */

    76

		{

    77

			SetDParam(0, v->reliability * 100 >> 16);

    78

			SetDParam(1, v->breakdowns_since_last_service);

    79

			DrawString(2, 45, STR_9010_RELIABILITY_BREAKDOWNS, 0);

    80

		}

    81

    82

		/* Draw service interval text */

    83

		{

    84

			SetDParam(0, v->service_interval);

    85

			SetDParam(1, v->date_of_last_service);

    86

			DrawString(13, 90, _patches.servint_ispercent?STR_SERVICING_INTERVAL_PERCENT:STR_883C_SERVICING_INTERVAL_DAYS, 0);

    87

		}

    88

    89

		DrawRoadVehImage(v, 3, 57, INVALID_VEHICLE);

    90

    91

		SetDParam(0, GetCustomEngineName(v->engine_type));

    92

		SetDParam(1, 1920 + v->build_year);

    93

		SetDParam(2, v->value);

    94

		DrawString(34, 57, STR_9011_BUILT_VALUE, 0);

    95

    96

		SetDParam(0, _cargoc.names_long_p[v->cargo_type]);

    97

		SetDParam(1, v->cargo_cap);

    98

		DrawString(34, 67, STR_9012_CAPACITY, 0);

    99

   100

		str = STR_8812_EMPTY;

   101

		if (v->cargo_count != 0) {

   102

			SetDParam(0, v->cargo_type);

   103

			SetDParam(1, v->cargo_count);

   104

			SetDParam(2, v->cargo_source);

   105

			str = STR_8813_FROM;

   106

		}

   107

		DrawString(34, 78, str, 0);

   108

		break;

   109

   110

	case WE_CLICK:

   111

		switch(e->click.widget) {

   112

		case 2: /* rename */

   113

			SetDParam(0, v->unitnumber);

   114

			ShowQueryString(v->string_id, STR_902C_NAME_ROAD_VEHICLE, 31, 150, w->window_class, w->window_number);

   115

			break;

   116

   117

		case 5: /* increase int */

   118

			mod = _ctrl_pressed? 5 : 10;

   119

			goto change_int;

   120

		case 6: /* decrease int */

   121

			mod = _ctrl_pressed? -5 : -10;

   122

change_int:

   123

			mod += v->service_interval;

   124

   125

			/*	%-based service interval max 5%-90%

   126

					day-based service interval max 30-800 days */

   127

			mod = _patches.servint_ispercent ? clamp(mod, MIN_SERVINT_PERCENT, MAX_SERVINT_PERCENT) : clamp(mod, MIN_SERVINT_DAYS, MAX_SERVINT_DAYS+1);

   128

			if (mod == v->service_interval)

   129

				return;

   130

   131

			DoCommandP(v->tile, v->index, mod, NULL, CMD_CHANGE_ROADVEH_SERVICE_INT | CMD_MSG(STR_018A_CAN_T_CHANGE_SERVICING));

   132

			break;

   133

		}

   134

		break;

   135

   136

	case WE_4:

   137

		if (FindWindowById(WC_VEHICLE_VIEW, w->window_number) == NULL)

   138

			DeleteWindow(w);

   139

		break;

   140

   141

	case WE_ON_EDIT_TEXT: {

   142

		byte *b = e->edittext.str;

   143

		if (*b == 0)

   144

			return;

   145

		memcpy(_decode_parameters, b, 32);

   146

		DoCommandP(0, w->window_number, 0, NULL, CMD_NAME_VEHICLE | CMD_MSG(STR_902D_CAN_T_NAME_ROAD_VEHICLE));

   147

	} break;

   148

   149

	}

   150

}

   151

   152

static const Widget _roadveh_details_widgets[] = {

   153

{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5,				STR_018B_CLOSE_WINDOW},

   154

{    WWT_CAPTION,    14,    11,   339,     0,    13, STR_900C_DETAILS,STR_018C_WINDOW_TITLE_DRAG_THIS},

   155

{ WWT_PUSHTXTBTN,    14,   340,   379,     0,    13, STR_01AA_NAME,		STR_902E_NAME_ROAD_VEHICLE},

   156

{     WWT_IMGBTN,    14,     0,   379,    14,    55, 0x0,							STR_NULL},

   157

{     WWT_IMGBTN,    14,     0,   379,    56,    88, 0x0,							STR_NULL},

   158

{ WWT_PUSHTXTBTN,    14,     0,    10,    89,    94, STR_0188,				STR_884D_INCREASE_SERVICING_INTERVAL},

   159

{ WWT_PUSHTXTBTN,    14,     0,    10,    95,   100, STR_0189,				STR_884E_DECREASE_SERVICING_INTERVAL},

   160

{     WWT_IMGBTN,    14,    11,   379,    89,   100, 0x0,							STR_NULL},

   161

{   WIDGETS_END},

   162

};

   163

   164

static const WindowDesc _roadveh_details_desc = {

   165

	-1,-1, 380, 101,

   166

	WC_VEHICLE_DETAILS,WC_VEHICLE_VIEW,

   167

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   168

	_roadveh_details_widgets,

   169

	RoadVehDetailsWndProc

   170

};

   171

   172

static void ShowRoadVehDetailsWindow(Vehicle *v)

   173

{

   174

	Window *w;

   175

	VehicleID veh = v->index;

   176

	DeleteWindowById(WC_VEHICLE_ORDERS, veh);

   177

	DeleteWindowById(WC_VEHICLE_DETAILS, veh);

   178

	_alloc_wnd_parent_num = veh;

   179

	w = AllocateWindowDesc(&_roadveh_details_desc);

   180

	w->window_number = veh;

   181

	w->caption_color = v->owner;

   182

}

   183

   184

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

   185

{

   186

	switch(e->event) {

   187

	case WE_PAINT: {

   188

		Vehicle *v = &_vehicles[w->window_number];

   189

		StringID str;

   190

   191

		w->disabled_state = (v->owner != _local_player) ? (1<<7 | 1<<6) : 0;

   192

   193

		/* draw widgets & caption */

   194

		SetDParam(0, v->string_id);

   195

		SetDParam(1, v->unitnumber);

   196

		DrawWindowWidgets(w);

   197

   198

		/* draw the flag */

   199

		DrawSprite((v->vehstatus & VS_STOPPED) ? 0xC12  : 0xC13, 2, 105);

   200

   201

		if (v->u.road.crashed_ctr != 0) {

   202

			str = STR_8863_CRASHED;

   203

		} else if (v->breakdown_ctr == 1) {

   204

			str = STR_885C_BROKEN_DOWN;

   205

		} else if (v->vehstatus & VS_STOPPED) {

   206

			str = STR_8861_STOPPED;

   207

		} else {

   208

			switch (v->current_order.type) {

   209

			case OT_GOTO_STATION: {

   210

				SetDParam(0, v->current_order.station);

   211

				SetDParam(1, v->cur_speed * 10 >> 5);

   212

				str = STR_HEADING_FOR_STATION + _patches.vehicle_speed;

   213

			} break;

   214

   215

			case OT_GOTO_DEPOT: {

   216

				Depot *dep = &_depots[v->current_order.station];

   217

				SetDParam(0, dep->town_index);

   218

				SetDParam(1, v->cur_speed * 10 >> 5);

   219

				str = STR_HEADING_FOR_ROAD_DEPOT + _patches.vehicle_speed;

   220

			} break;

   221

   222

			case OT_LOADING:

   223

			case OT_LEAVESTATION:

   224

				str = STR_882F_LOADING_UNLOADING;

   225

				break;

   226

   227

			default:

   228

				if (v->num_orders == 0) {

   229

					str = STR_NO_ORDERS + _patches.vehicle_speed;

   230

					SetDParam(0, v->cur_speed * 10 >> 5);

   231

				} else

   232

					str = STR_EMPTY;

   233

				break;

   234

			}

   235

		}

   236

   237

		DrawStringCentered(125, 105, str, 0);

   238

		DrawWindowViewport(w);

   239

	} break;

   240

   241

	case WE_CLICK: {

   242

		Vehicle *v = &_vehicles[w->window_number];

   243

   244

		switch(e->click.widget) {

   245

		case 4: /* start stop */

   246

			DoCommandP(v->tile, v->index, 0, NULL, CMD_START_STOP_ROADVEH | CMD_MSG(STR_9015_CAN_T_STOP_START_ROAD_VEHICLE));

   247

			break;

   248

		case 5: /* center main view */

   249

			ScrollMainWindowTo(v->x_pos, v->y_pos);

   250

			break;

   251

		case 6: /* goto hangar */

   252

			DoCommandP(v->tile, v->index, 0, NULL, CMD_SEND_ROADVEH_TO_DEPOT | CMD_MSG(STR_9018_CAN_T_SEND_VEHICLE_TO_DEPOT));

   253

			break;

   254

		case 7: /* turn around */

   255

			DoCommandP(v->tile, v->index, 0, NULL, CMD_TURN_ROADVEH | CMD_MSG(STR_9033_CAN_T_MAKE_VEHICLE_TURN));

   256

			break;

   257

		case 8: /* show orders */

   258

			ShowOrdersWindow(v);

   259

			break;

   260

		case 9: /* show details */

   261

			ShowRoadVehDetailsWindow(v);

   262

			break;

   263

		}

   264

	} break;

   265

   266

	case WE_DESTROY:

   267

		DeleteWindowById(WC_VEHICLE_ORDERS, w->window_number);

   268

		DeleteWindowById(WC_VEHICLE_DETAILS, w->window_number);

   269

		break;

   270

	}

   271

}

   272

   273

static const Widget _roadveh_view_widgets[] = {

   274

{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5,	STR_018B_CLOSE_WINDOW},

   275

{    WWT_CAPTION,    14,    11,   249,     0,    13, STR_9002,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   276

{     WWT_IMGBTN,    14,     0,   231,    14,   103, 0x0,				STR_NULL},

   277

{          WWT_6,    14,     2,   229,    16,   101, 0x0,				STR_NULL},

   278

{ WWT_PUSHIMGBTN,    14,     0,   249,   104,   115, 0x0,				STR_901C_CURRENT_VEHICLE_ACTION},

   279

{ WWT_PUSHIMGBTN,    14,   232,   249,    14,    31, 0x2AB,			STR_901E_CENTER_MAIN_VIEW_ON_VEHICLE},

   280

{ WWT_PUSHIMGBTN,    14,   232,   249,    32,    49, 0x2AE,			STR_901F_SEND_VEHICLE_TO_DEPOT},

   281

{ WWT_PUSHIMGBTN,    14,   232,   249,    50,    67, 0x2CB,			STR_9020_FORCE_VEHICLE_TO_TURN_AROUND},

   282

{ WWT_PUSHIMGBTN,    14,   232,   249,    68,    85, 0x2B2,			STR_901D_SHOW_VEHICLE_S_ORDERS},

   283

{ WWT_PUSHIMGBTN,    14,   232,   249,    86,   103, 0x2B3,			STR_9021_SHOW_ROAD_VEHICLE_DETAILS},

   284

{   WIDGETS_END},

   285

};

   286

   287

static const WindowDesc _roadveh_view_desc = {

   288

	-1,-1, 250, 116,

   289

	WC_VEHICLE_VIEW,0,

   290

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   291

	_roadveh_view_widgets,

   292

	RoadVehViewWndProc,

   293

};

   294

   295

void ShowRoadVehViewWindow(Vehicle *v)

   296

{

   297

	Window *w;

   298

   299

	w = AllocateWindowDescFront(&_roadveh_view_desc, v->index);

   300

	if (w) {

   301

		w->caption_color = v->owner;

   302

		AssignWindowViewport(w, 3, 17, 0xE2, 0x54, w->window_number | (1 << 31), 0);

   303

	}

   304

}

   305

   306

   307

static void DrawNewRoadVehWindow(Window *w)

   308

{

   309

	YearMonthDay ymd;

   310

   311

	if (w->window_number == 0)

   312

		w->disabled_state = 1 << 5;

   313

   314

	// setup scroller

   315

	{

   316

		int count = 0;

   317

		int num = NUM_ROAD_ENGINES;

   318

		Engine *e = &_engines[ROAD_ENGINES_INDEX];

   319

		do {

   320

			if (HASBIT(e->player_avail, _local_player))

   321

				count++;

   322

		} while (++e,--num);

   323

		SetVScrollCount(w, count);

   324

	}

   325

   326

	DrawWindowWidgets(w);

   327

   328

	{

   329

		int num = NUM_ROAD_ENGINES;

   330

		Engine *e = &_engines[ROAD_ENGINES_INDEX];

   331

		int x = 1;

   332

		int y = 15;

   333

		int sel = WP(w,buildtrain_d).sel_index;

   334

		int pos = w->vscroll.pos;

   335

		int engine_id = ROAD_ENGINES_INDEX;

   336

		int selected_id = -1;

   337

   338

		do {

   339

			if (HASBIT(e->player_avail, _local_player)) {

   340

				if (sel==0) selected_id = engine_id;

   341

				if (IS_INT_INSIDE(--pos, -8, 0)) {

   342

					DrawString(x+59, y+2, GetCustomEngineName(engine_id), sel==0 ? 0xC : 0x10);

   343

					DrawRoadVehEngine(x+29, y+6, engine_id, SPRITE_PALETTE(PLAYER_SPRITE_COLOR(_local_player)));

   344

					y += 14;

   345

				}

   346

				sel--;

   347

			}

   348

		} while (++engine_id, ++e,--num);

   349

   350

		WP(w,buildtrain_d).sel_engine = selected_id;

   351

		if (selected_id != -1) {

   352

			const RoadVehicleInfo *rvi = RoadVehInfo(selected_id);

   353

			Engine *e;

   354

   355

			SetDParam(0, rvi->base_cost * (_price.roadveh_base>>3)>>5);

   356

			SetDParam(1, rvi->max_speed * 10 >> 5);

   357

			SetDParam(2, rvi->running_cost * _price.roadveh_running >> 8);

   358

			SetDParam(4, rvi->capacity);

   359

			SetDParam(3, _cargoc.names_long_p[rvi->cargo_type]);

   360

   361

			e = &_engines[selected_id];

   362

			SetDParam(6, e->lifelength);

   363

			SetDParam(7, e->reliability * 100 >> 16);

   364

			ConvertDayToYMD(&ymd, e->intro_date);

   365

			SetDParam(5, ymd.year + 1920);

   366

   367

			DrawString(2, 127, STR_9008_COST_SPEED_RUNNING_COST, 0);

   368

		}

   369

	}

   370

}

   371

   372

void CcBuildRoadVeh(bool success, uint tile, uint32 p1, uint32 p2)

   373

{

   374

	Vehicle *v;

   375

   376

	if (!success) return;

   377

   378

	v = &_vehicles[_new_roadveh_id];

   379

	if (v->tile == _backup_orders_tile) {

   380

		_backup_orders_tile = 0;

   381

		RestoreVehicleOrders(v, _backup_orders_data);

   382

	}

   383

	ShowRoadVehViewWindow(v);

   384

}

   385

   386

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

   387

{

   388

	switch(e->event) {

   389

	case WE_PAINT:

   390

		DrawNewRoadVehWindow(w);

   391

		break;

   392

   393

	case WE_CLICK:

   394

		switch(e->click.widget) {

   395

		case 2: { /* listbox */

   396

			uint i = (e->click.pt.y - 14) / 14;

   397

			if (i < 8) {

   398

				WP(w,buildtrain_d).sel_index = i + w->vscroll.pos;

   399

				SetWindowDirty(w);

   400

			}

   401

		} break;

   402

   403

		case 5: { /* build */

   404

			int sel_eng = WP(w,buildtrain_d).sel_engine;

   405

			if (sel_eng != -1)

   406

				DoCommandP(w->window_number, sel_eng, 0, CcBuildRoadVeh, CMD_BUILD_ROAD_VEH | CMD_MSG(STR_9009_CAN_T_BUILD_ROAD_VEHICLE));

   407

		} break;

   408

   409

		case 6: /* rename */

   410

			WP(w,buildtrain_d).rename_engine = WP(w,buildtrain_d).sel_engine;

   411

			ShowQueryString(

   412

				GetCustomEngineName(WP(w,buildtrain_d).sel_engine),

   413

				STR_9036_RENAME_ROAD_VEHICLE_TYPE,

   414

				31,

   415

				160,

   416

				w->window_class,

   417

				w->window_number);

   418

			break;

   419

		}

   420

		break;

   421

   422

	case WE_4:

   423

		if (w->window_number != 0 && !FindWindowById(WC_VEHICLE_DEPOT, w->window_number)) {

   424

			DeleteWindow(w);

   425

		}

   426

		break;

   427

   428

	case WE_ON_EDIT_TEXT: {

   429

		byte *b = e->edittext.str;

   430

		if (*b == 0)

   431

			return;

   432

		memcpy(_decode_parameters, b, 32);

   433

		DoCommandP(0, WP(w,buildtrain_d).rename_engine, 0, NULL, CMD_RENAME_ENGINE | CMD_MSG(STR_9037_CAN_T_RENAME_ROAD_VEHICLE));

   434

	} break;

   435

   436

	}

   437

}

   438

   439

static const Widget _new_road_veh_widgets[] = {

   440

{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5,							STR_018B_CLOSE_WINDOW},

   441

{    WWT_CAPTION,    14,    11,   247,     0,    13, STR_9006_NEW_ROAD_VEHICLES, STR_018C_WINDOW_TITLE_DRAG_THIS},

   442

{     WWT_MATRIX,    14,     0,   236,    14,   125, 0x801,									STR_9026_ROAD_VEHICLE_SELECTION},

   443

{  WWT_SCROLLBAR,    14,   237,   247,    14,   125, 0x0,										STR_0190_SCROLL_BAR_SCROLLS_LIST},

   444

{     WWT_IMGBTN,    14,     0,   247,   126,   177, 0x0,										STR_NULL},

   445

{ WWT_PUSHTXTBTN,    14,     0,   123,   178,   189, STR_9007_BUILD_VEHICLE,STR_9027_BUILD_THE_HIGHLIGHTED_ROAD},

   446

{ WWT_PUSHTXTBTN,    14,   124,   247,   178,   189, STR_9034_RENAME,				STR_9035_RENAME_ROAD_VEHICLE_TYPE},

   447

{   WIDGETS_END},

   448

};

   449

   450

static const WindowDesc _new_road_veh_desc = {

   451

	-1, -1, 248, 190,

   452

	WC_BUILD_VEHICLE,0,

   453

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   454

	_new_road_veh_widgets,

   455

	NewRoadVehWndProc

   456

};

   457

   458

static void ShowBuildRoadVehWindow(TileIndex tile)

   459

{

   460

	Window *w;

   461

   462

	DeleteWindowById(WC_BUILD_VEHICLE, tile);

   463

   464

	w = AllocateWindowDesc(&_new_road_veh_desc);

   465

	w->window_number = tile;

   466

	w->vscroll.cap = 8;

   467

   468

	if (tile != 0) {

   469

		w->caption_color = _map_owner[tile];

   470

	} else {

   471

		w->caption_color = _local_player;

   472

	}

   473

}

   474

   475

static void DrawRoadDepotWindow(Window *w)

   476

{

   477

	uint tile;

   478

	Vehicle *v;

   479

	int num,x,y;

   480

	Depot *d;

   481

   482

	tile = w->window_number;

   483

   484

	/* setup disabled buttons */

   485

	w->disabled_state = (_map_owner[tile]==_local_player) ? 0 : ((1<<3)|(1<<5));

   486

   487

	/* determine amount of items for scroller */

   488

	num = 0;

   489

	FOR_ALL_VEHICLES(v) {

   490

		if (v->type == VEH_Road && v->u.road.state == 254 &&

   491

				v->tile == (TileIndex)tile)

   492

					num++;

   493

	}

   494

	SetVScrollCount(w, (num + 4) / 5);

   495

   496

	/* locate the depot struct */

   497

	for(d=_depots; d->xy != (TileIndex)tile; d++) {}

   498

   499

	SetDParam(0, d->town_index);

   500

	DrawWindowWidgets(w);

   501

   502

	x = 2;

   503

	y = 15;

   504

	num = w->vscroll.pos * 5;

   505

   506

	FOR_ALL_VEHICLES(v) {

   507

		if (v->type == VEH_Road &&

   508

				v->u.road.state == 254 &&

   509

				v->tile == (TileIndex)tile &&

   510

				--num < 0 && num >=	-15) {

   511

   512

			DrawRoadVehImage(v, x+24, y, WP(w,traindepot_d).sel);

   513

   514

			SetDParam(0, v->unitnumber);

   515

			DrawString(x, y+2, (uint16)(v->max_age-366) >= v->age ? STR_00E2 : STR_00E3, 0);

   516