1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "window.h"

     5

#include "gui.h"

     6

#include "gfx.h"

     7

#include "vehicle.h"

     8

#include "station.h"

     9

#include "town.h"

    10

#include "command.h"

    11

#include "viewport.h"

    12

    13

static int OrderGetSel(Window *w)

    14

{

    15

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

    16

	const Order *sched = v->schedule_ptr;

    17

	int num = WP(w,order_d).sel;

    18

	int count = 0;

    19

    20

	if (num == 0)

    21

		return 0;

    22

    23

	while (sched->type != OT_NOTHING) {

    24

		sched++;

    25

		count++;

    26

		if (--num == 0)

    27

			break;

    28

	}

    29

    30

	return count;

    31

}

    32

    33

static void DrawOrdersWindow(Window *w)

    34

{

    35

	Vehicle *v;

    36

	int num, sel;

    37

	const Order *sched;

    38

	Order ord;

    39

	int y, i;

    40

	StringID str;

    41

	bool shared_schedule;

    42

    43

	v = &_vehicles[w->window_number];

    44

    45

	w->disabled_state = (v->owner == _local_player) ? 0 : 0x3F0;

    46

    47

	shared_schedule = IsScheduleShared(v) != NULL;

    48

    49

	sched = v->schedule_ptr;

    50

	num=0;

    51

	while (sched->type != OT_NOTHING) {

    52

		sched++;

    53

		num++;

    54

	}

    55

    56

	if ((uint)num + shared_schedule <= (uint)WP(w,order_d).sel)

    57

		SETBIT(w->disabled_state, 5); /* delete */

    58

    59

	if (num == 0)

    60

		SETBIT(w->disabled_state, 4); /* skip */

    61

    62

	SetVScrollCount(w, num+1);

    63

    64

	sel = OrderGetSel(w);

    65

    66

	SetDParam(2,STR_8827_FULL_LOAD);

    67

	switch (v->schedule_ptr[sel].type) {

    68

	case OT_GOTO_STATION:

    69

		break;

    70

	case OT_GOTO_DEPOT:

    71

		SETBIT(w->disabled_state, 9);	/* unload */

    72

		SetDParam(2,STR_SERVICE);

    73

		break;

    74

	default:

    75

		SETBIT(w->disabled_state, 6); /* nonstop */

    76

		SETBIT(w->disabled_state, 8);	/* full load */

    77

		SETBIT(w->disabled_state, 9);	/* unload */

    78

	}

    79

    80

	SetDParam(0, v->string_id);

    81

	SetDParam(1, v->unitnumber);

    82

	DrawWindowWidgets(w);

    83

    84

	y = 15;

    85

    86

	i = 0;

    87

	for(;;) {

    88

		str = ((byte)v->cur_order_index == i) ? STR_8805 : STR_8804;

    89

    90

		ord = v->schedule_ptr[i];

    91

    92

		if ( (uint)(i - w->vscroll.pos) < 6) {

    93

    94

			if (ord.type == OT_NOTHING) {

    95

				str = shared_schedule ? STR_END_OF_SHARED_ORDERS : STR_882A_END_OF_ORDERS;

    96

			} else {

    97

				SetDParam(1, 6);

    98

    99

				if (ord.type == OT_GOTO_STATION) {

   100

					SetDParam(1, STR_8806_GO_TO + (ord.flags >> 1));

   101

					SetDParam(2, ord.station);

   102

				} else if (ord.type == OT_GOTO_DEPOT) {

   103

					StringID s = STR_NULL;

   104

					if (v->type == VEH_Aircraft) {

   105

						s = STR_GO_TO_AIRPORT_HANGAR;

   106

					  SetDParam(2, ord.station);

   107

					} else {

   108

						SetDParam(2, _depots[ord.station].town_index);

   109

						switch (v->type) {

   110

						case VEH_Train:	s = STR_880E_GO_TO_TRAIN_DEPOT; break;

   111

						case VEH_Road:	s = STR_9038_GO_TO_ROADVEH_DEPOT; break;

   112

						case VEH_Ship:	s = STR_GO_TO_SHIP_DEPOT; break;

   113

						}

   114

					}

   115

					if (v->type == VEH_Train && ord.flags & OF_NON_STOP) s += 2;

   116

					if (ord.flags & OF_FULL_LOAD) ++s; /* XXX service */

   117

					SetDParam(1, s);

   118

				} else if (ord.type == OT_GOTO_WAYPOINT) {

   119

					SetDParam(2, ord.station);

   120

					SetDParam(1, STR_GO_TO_WAYPOINT);

   121

				}

   122

			}

   123

			{

   124

				byte color = (i == WP(w,order_d).sel) ? 0xC : 0x10;

   125

				SetDParam(0, i+1);

   126

				if (ord.type != OT_DUMMY) {

   127

					DrawString(2, y, str, color);

   128

				} else {

   129

					SetDParam(1, STR_INVALID_ORDER);

   130

					SetDParam(2, ord.station);

   131

					DrawString(2, y, str, color);

   132

				}

   133

			}

   134

			y += 10;

   135

		}

   136

   137

		i++;

   138

   139

		if (ord.type == OT_NOTHING)

   140

			break;

   141

	}

   142

}

   143

   144

   145

// lookup a vehicle on a tile

   146

typedef struct {

   147

	TileIndex tile;

   148

	byte owner;

   149

	byte type;

   150

} FindVehS;

   151

   152

static void *FindVehicleCallb(Vehicle *v, FindVehS *f)

   153

{

   154

	if (v->tile != f->tile || v->owner != f->owner || v->vehstatus & VS_HIDDEN ) return NULL;

   155

	return v;

   156

}

   157

   158

Vehicle *GetVehicleOnTile(TileIndex tile, byte owner)

   159

{

   160

	FindVehS fs = {tile, owner, 0};

   161

	return VehicleFromPos(tile, &fs, (VehicleFromPosProc*)FindVehicleCallb);

   162

}

   163

   165

{

   167

	Station *st;

   168

	int st_index;

   169

   170

	// check depot first

   171

	if (_patches.gotodepot) {

   172

		switch(GET_TILETYPE(tile)) {

   173

		case MP_RAILWAY:

   174

			if (v->type == VEH_Train && _map_owner[tile] == _local_player) {

   175

				if ((_map5[tile]&0xFC)==0xC0)

   180

			}

   181

			break;

   182

   183

		case MP_STREET:

   184

			if ((_map5[tile] & 0xF0) == 0x20 && v->type == VEH_Road && _map_owner[tile] == _local_player)

   189

			break;

   190

   191

		case MP_STATION:

   192

			if (v->type != VEH_Aircraft) break;

   193

			if ( IsAircraftHangarTile(tile) && _map_owner[tile] == _local_player)

   198

			break;

   199

   200

		case MP_WATER:

   201

			if (v->type != VEH_Ship) break;

   202

			if ( IsShipDepotTile(tile) && _map_owner[tile] == _local_player) {

   203

				switch (_map5[tile]) {

   204

				case 0x81: tile--; break;

   205

				case 0x83: tile-= TILE_XY(0,1); break;

   206

				}

   211

			}

   212

		}

   213

	}

   214

   215

	// check waypoint

   216

	if (IS_TILETYPE(tile, MP_RAILWAY)

   217

	&& v->type == VEH_Train 

   218

	&& _map_owner[tile] == _local_player

   225

   226

	if (IS_TILETYPE(tile, MP_STATION)) {

   227

		st = DEREF_STATION(st_index = _map2[tile]);

   228

   229

		if (st->owner == _current_player || st->owner == OWNER_NONE) {

   230

			byte facil;

   231

			(facil=FACIL_DOCK, v->type == VEH_Ship) ||

   232

			(facil=FACIL_TRAIN, v->type == VEH_Train) ||

   233

			(facil=FACIL_AIRPORT, v->type == VEH_Aircraft) ||

   234

			(facil=FACIL_BUS_STOP, v->type == VEH_Road && v->cargo_type == CT_PASSENGERS) ||

   235

			(facil=FACIL_TRUCK_STOP, 1);

   242

		}

   243

	}

   244

   245

	// not found

   249

}

   250

   251

static bool HandleOrderVehClick(Vehicle *v, Vehicle *u, Window *w)

   252

{

   253

	if (u->type != v->type)

   254

		return false;

   255

   256

	if (u->type == VEH_Train && u->subtype != 0) {

   257

		u = GetFirstVehicleInChain(u);

   258

		if (u->subtype != 0)

   259

			return false;

   260

	}

   261

   262

	// v is vehicle getting orders. Only copy/clone orders if vehicle doesn't have any orders yet

   263

	// obviously if you press CTRL on a non-empty orders vehicle you know what you are doing

   264

	if (v->num_orders != 0 && _ctrl_pressed == 0) {return false;}

   265

   266

	if (DoCommandP(v->tile, v->index | (u->index << 16), _ctrl_pressed ? 0 : 1, NULL,

   267

		_ctrl_pressed ? CMD_CLONE_ORDER | CMD_MSG(STR_CANT_SHARE_ORDER_LIST) : CMD_CLONE_ORDER | CMD_MSG(STR_CANT_COPY_ORDER_LIST))) {

   268

		WP(w,order_d).sel = -1;

   269

		ResetObjectToPlace();

   270

	}

   271

   272

	return true;

   273

}

   274

   275

static void OrdersPlaceObj(Vehicle *v, uint tile, Window *w)

   276

{

   278

	Vehicle *u;

   279

   280

	// check if we're clicking on a vehicle first.. clone orders in that case.

   281

	u = CheckMouseOverVehicle();

   282

	if (u && HandleOrderVehClick(v, u, w))

   283

		return;

   284

   285

	cmd = GetOrderCmdFromTile(v, tile);

   287

   289

		if (WP(w,order_d).sel != -1)

   290

			WP(w,order_d).sel++;

   291

		ResetObjectToPlace();

   292

	}

   293

}

   294

   295

   296

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

   297

{

   298

	switch(e->event) {

   299

	case WE_PAINT:

   300

		DrawOrdersWindow(w);

   301

		break;

   302

   303

	case WE_CLICK: {

   304

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

   305

		int mode;

   306

		switch(e->click.widget) {

   307

		case 2:	{/* orders list */

   308

			int sel;

   309

			sel = (e->click.pt.y - 15) / 10;

   310

   311

			if ( (uint) sel >= 6)

   312

				return;

   313

   314

			sel += w->vscroll.pos;

   315

   316

			if (_ctrl_pressed && sel < v->num_orders) { // watch out for schedule_ptr overflow

   317

				Order ord = v->schedule_ptr[sel];

   318

				int xy = 0;

   319

				switch (ord.type) {

   320

				case OT_GOTO_STATION:			/* station order */

   321

					xy = _stations[ord.station].xy ;

   322

					break;

   323

				case OT_GOTO_DEPOT:				/* goto depot order */

   324

					xy = _depots[ord.station].xy;

   325

					break;

   326

				case OT_GOTO_WAYPOINT:	/* goto waypoint order */

   327

					xy = _waypoints[ord.station].xy;

   328

				}

   329

   330

				if (xy)

   331

					ScrollMainWindowToTile(xy);

   332

   333

				return;

   334

			}

   335

   336

			if (sel == WP(w,order_d).sel) sel = -1;

   337

			WP(w,order_d).sel = sel;

   338

			SetWindowDirty(w);

   339

		}	break;

   340

   341

		case 4: /* skip button */

   342

			DoCommandP(v->tile,v->index, 0, NULL, CMD_SKIP_ORDER);

   343

			break;

   344

   345

		case 5: /* delete button */

   346

			DoCommandP(v->tile,v->index, OrderGetSel(w), NULL, CMD_DELETE_ORDER | CMD_MSG(STR_8834_CAN_T_DELETE_THIS_ORDER));

   347

			break;

   348

   349

		case 7: /* goto button */

   350

			InvalidateWidget(w, 7);

   351

			w->click_state ^= 1<<7;

   352

			if (HASBIT(w->click_state, 7)) {

   353

				_place_clicked_vehicle = NULL;

   354

				SetObjectToPlaceWnd(ANIMCURSOR_PICKSTATION, 1, w);

   355

			} else {

   356

				ResetObjectToPlace();

   357

			}

   358

			break;

   359

   360

		case 8: /* full load button */

   361

			mode = 0;

   362

			DoCommandP(v->tile, v->index, OrderGetSel(w) | (mode << 8), NULL, CMD_MODIFY_ORDER | CMD_MSG(STR_8835_CAN_T_MODIFY_THIS_ORDER));

   363

			break;

   364

   365

		case 9: /* unload button */

   366

			mode = 1;

   367

			DoCommandP(v->tile, v->index, OrderGetSel(w) | (mode << 8), NULL, CMD_MODIFY_ORDER | CMD_MSG(STR_8835_CAN_T_MODIFY_THIS_ORDER));

   368

			break;

   369

   370

		case 6: /* non stop button */

   371

			mode = 2;

   372

			DoCommandP(v->tile, v->index, OrderGetSel(w) | (mode << 8), NULL, CMD_MODIFY_ORDER | CMD_MSG(STR_8835_CAN_T_MODIFY_THIS_ORDER));

   373

			break;

   374

		}

   375

	} break;

   376

   377

   378

	case WE_RCLICK: {

   379

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

   380

		if (e->click.widget != 8) break;

   381

		if (v->schedule_ptr[OrderGetSel(w)].type == OT_GOTO_DEPOT)

   382

			GuiShowTooltips(STR_SERVICE_HINT);

   383

		else

   384

			GuiShowTooltips(STR_8857_MAKE_THE_HIGHLIGHTED_ORDER);

   385

		} break;

   386

   387

	case WE_4: {

   388

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

   389

			DeleteWindow(w);

   390

	} break;

   391

   392

	case WE_PLACE_OBJ: {

   393

		OrdersPlaceObj(&_vehicles[w->window_number], e->place.tile, w);

   394

	} break;

   395

   396

	case WE_ABORT_PLACE_OBJ: {

   397

		w->click_state &= ~(1<<7);

   398

		InvalidateWidget(w, 7);

   399

	} break;

   400

   401

	// check if a vehicle in a depot was clicked..

   402

	case WE_MOUSELOOP: {

   403

		Vehicle *v = _place_clicked_vehicle;

   404

		/*

   405

		 * Check if we clicked on a vehicle

   406

		 * and if the GOTO button of this window is pressed

   407

		 * This is because of all open order windows WE_MOUSELOOP is called

   408

		 * and if you have 3 windows open, and this check is not done

   409

		 * the order is copied to the last open window instead of the

   410

		 * one where GOTO is enalbed

   411

		 */

   412

		if (v && HASBIT(w->click_state, 7)) {

   413

			_place_clicked_vehicle = NULL;

   414

			HandleOrderVehClick(&_vehicles[w->window_number], v, w);

   415

		}

   416

	} break;

   417

   418

	}

   419

}

   420

   421

static const Widget _train_orders_widgets[] = {

   422

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

   423

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_8829_ORDERS,					STR_018C_WINDOW_TITLE_DRAG_THIS},

   424

{      WWT_PANEL,    14,     0,   308,    14,    75, 0x0,											STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   425

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0,											STR_0190_SCROLL_BAR_SCROLLS_LIST},

   426

{ WWT_PUSHTXTBTN,    14,     0,    52,    76,    87, STR_8823_SKIP,						STR_8853_SKIP_THE_CURRENT_ORDER},

   427

{ WWT_PUSHTXTBTN,    14,    53,   105,    76,    87, STR_8824_DELETE,					STR_8854_DELETE_THE_HIGHLIGHTED},

   428

{ WWT_PUSHTXTBTN,    14,   106,   158,    76,    87, STR_8825_NON_STOP,				STR_8855_MAKE_THE_HIGHLIGHTED_ORDER},

   429

{WWT_NODISTXTBTN,    14,   159,   211,    76,    87, STR_8826_GO_TO,					STR_8856_INSERT_A_NEW_ORDER_BEFORE},

   430

{ WWT_PUSHTXTBTN,    14,   212,   264,    76,    87, STR_FULLLOAD_OR_SERVICE,	STR_NULL},

   431

{ WWT_PUSHTXTBTN,    14,   265,   319,    76,    87, STR_8828_UNLOAD,					STR_8858_MAKE_THE_HIGHLIGHTED_ORDER},

   432

{   WIDGETS_END},

   433

};

   434

   435

static const WindowDesc _train_orders_desc = {

   436

	-1,-1, 320, 88,

   437

	WC_VEHICLE_ORDERS,WC_VEHICLE_VIEW,

   438

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESTORE_DPARAM,

   439

	_train_orders_widgets,

   440

	OrdersWndProc

   441

};

   442

   443

static const Widget _other_train_orders_widgets[] = {

   444

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

   445

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_8829_ORDERS, STR_018C_WINDOW_TITLE_DRAG_THIS},

   446

{      WWT_PANEL,    14,     0,   308,    14,    75, 0x0, STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   447

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},

   448

{   WIDGETS_END},

   449

};

   450

   451

static const WindowDesc _other_train_orders_desc = {

   452

	-1,-1, 320, 76,

   453

	WC_VEHICLE_ORDERS,WC_VEHICLE_VIEW,

   454

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   455

	_other_train_orders_widgets,

   456

	OrdersWndProc

   457

};

   458

   459

   460

static const Widget _roadveh_orders_widgets[] = {

   461

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

   462

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_900B_ORDERS,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   463

{     WWT_IMGBTN,    14,     0,   308,    14,    75, 0x0,							STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   464

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0,							STR_0190_SCROLL_BAR_SCROLLS_LIST},

   465

{ WWT_PUSHTXTBTN,    14,     0,    63,    76,    87, STR_8823_SKIP,		STR_8853_SKIP_THE_CURRENT_ORDER},

   466

{ WWT_PUSHTXTBTN,    14,    64,   127,    76,    87, STR_8824_DELETE,	STR_8854_DELETE_THE_HIGHLIGHTED},

   467

{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0,							STR_NULL},

   468

{WWT_NODISTXTBTN,    14,   128,   191,    76,    87, STR_8826_GO_TO,	STR_8856_INSERT_A_NEW_ORDER_BEFORE},

   469

{ WWT_PUSHTXTBTN,    14,   192,   255,    76,    87, STR_FULLLOAD_OR_SERVICE, STR_NULL},

   470

{ WWT_PUSHTXTBTN,    14,   256,   319,    76,    87, STR_8828_UNLOAD,	STR_8858_MAKE_THE_HIGHLIGHTED_ORDER},

   471

{   WIDGETS_END},

   472

};

   473

   474

static const WindowDesc _roadveh_orders_desc = {

   475

	-1,-1, 320, 88,

   476

	WC_VEHICLE_ORDERS,WC_VEHICLE_VIEW,

   477

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESTORE_DPARAM,

   478

	_roadveh_orders_widgets,

   479

	OrdersWndProc

   480

};

   481

   482

static const Widget _other_roadveh_orders_widgets[] = {

   483

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

   484

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_900B_ORDERS,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   485

{     WWT_IMGBTN,    14,     0,   308,    14,    75, 0x0,							STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   486

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0,							STR_0190_SCROLL_BAR_SCROLLS_LIST},

   487

{   WIDGETS_END},

   488

};

   489

   490

static const WindowDesc _other_roadveh_orders_desc = {

   491

	-1,-1, 320, 76,

   492

	WC_VEHICLE_ORDERS,WC_VEHICLE_VIEW,

   493

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

   494

	_other_roadveh_orders_widgets,

   495

	OrdersWndProc

   496

};

   497

   498

static const Widget _ship_orders_widgets[] = {

   499

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

   500

{    WWT_CAPTION,    14,    11,   319,     0,    13, STR_9810_ORDERS,	STR_018C_WINDOW_TITLE_DRAG_THIS},

   501

{     WWT_IMGBTN,    14,     0,   308,    14,    75, 0x0,							STR_8852_ORDERS_LIST_CLICK_ON_ORDER},

   502

{  WWT_SCROLLBAR,    14,   309,   319,    14,    75, 0x0,							STR_0190_SCROLL_BAR_SCROLLS_LIST},

   503

{ WWT_PUSHTXTBTN,    14,     0,    63,    76,    87, STR_8823_SKIP,		STR_8853_SKIP_THE_CURRENT_ORDER},

   504

{ WWT_PUSHTXTBTN,    14,    64,   127,    76,    87, STR_8824_DELETE,	STR_8854_DELETE_THE_HIGHLIGHTED},

   505

{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0,							STR_NULL},

   506

{WWT_NODISTXTBTN,    14,   128,   191,    76,    87, STR_8826_GO_TO,	STR_8856_INSERT_A_NEW_ORDER_BEFORE},

   507

{ WWT_PUSHTXTBTN,    14,   192,   255,    76,    87, STR_FULLLOAD_OR_SERVICE, STR_NULL},

   508

{ WWT_PUSHTXTBTN,    14,   256,   319,    76,    87, STR_8828_UNLOAD,	STR_8858_MAKE_THE_HIGHLIGHTED_ORDER},

   509

{   WIDGETS_END},

   510

};

   511

   512