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 "station.h"

    10

#include "town.h"

    11

#include "command.h"

    12

#include "viewport.h"

    13

    14

static int OrderGetSel(Window *w)

    15

{

    16

	Vehicle *v = GetVehicle(w->window_number);

    17

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

    18

    21

    23

}

    24

    25

static void DrawOrdersWindow(Window *w)

    26

{

    31

	int y, i;

    34

    35

	v = GetVehicle(w->window_number);

    36

    37

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

    38

		1 << 4 |   //skip

    39

		1 << 5 |   //delete

    40

		1 << 6 |   //non-stop

    41

		1 << 7 |   //go-to

    42

		1 << 8 |   //full load

    43

		1 << 9     //unload

    44

		);

    45

    46

	//disable non-stop for non-trains

    47

	if (v->type != VEH_Train) {

    48

		w->disabled_state |= 1 << 6;

    49

	}

    50

    52

    54

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

    55

    57

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

    58

    60

    61

	sel = OrderGetSel(w);

    63

    65

    74

    86

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

    87

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

    88

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

    89

	}

    90

    91

	SetDParam(0, v->string_id);

    92

	SetDParam(1, v->unitnumber);

    93

	DrawWindowWidgets(w);

    94

    95

	y = 15;

    96

   101

   119

					}

   120

				}

   131

			}

   141

			}

   142

			y += 10;

   143

		}

   144

   145

		i++;

   148

   153

	}

   154

}

   155

   156

   157

// lookup a vehicle on a tile

   158

typedef struct {

   159

	TileIndex tile;

   160

	byte owner;

   161

	byte type;

   162

} FindVehS;

   163

   164

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

   165

{

   166

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

   167

	return v;

   168

}

   169

   170

Vehicle *GetVehicleOnTile(TileIndex tile, byte owner)

   171

{

   172

	FindVehS fs;

   173

	fs.tile = tile;

   174

	fs.owner = owner;

   175

	fs.type = 0;

   176

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

   177

}

   178

   179

static Order GetOrderCmdFromTile(Vehicle *v, uint tile)

   180

{

   181

	Order order;

   182

	Station *st;

   183

	int st_index;

   184

   185

	// check depot first

   186

	if (_patches.gotodepot) {

   187

		switch(GET_TILETYPE(tile)) {

   188

		case MP_RAILWAY:

   189

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

   190

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

   191

					order.type = OT_GOTO_DEPOT;

   192

					order.flags = OF_UNLOAD;

   193

					order.station = GetDepotByTile(tile);

   194

					return order;

   195

				}

   196

			}

   197

			break;

   198

   199

		case MP_STREET:

   200

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

   201

				order.type = OT_GOTO_DEPOT;

   202

				order.flags = OF_UNLOAD;

   203

				order.station = GetDepotByTile(tile);

   204

				return order;

   205

			}

   206

			break;

   207

   208

		case MP_STATION:

   209

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

   210

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

   211

				order.type = OT_GOTO_DEPOT;

   212

				order.flags = OF_UNLOAD | OF_NON_STOP;

   213

				order.station = _map2[tile];

   214

				return order;

   215

			}

   216

			break;

   217

   218

		case MP_WATER:

   219

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

   220

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

   221

				switch (_map5[tile]) {

   222

				case 0x81: tile--; break;

   223

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

   224

				}

   225

				order.type = OT_GOTO_DEPOT;

   226

				order.flags = OF_UNLOAD;

   227

				order.station = GetDepotByTile(tile);

   228

				return order;

   229

			}

   230

		}

   231

	}

   232

   233

	// check waypoint

   234

	if (IS_TILETYPE(tile, MP_RAILWAY)

   235

	&& v->type == VEH_Train

   236

	&& _map_owner[tile] == _local_player

   237

	&& (_map5[tile]&0xFE)==0xC4) {

   238

		order.type = OT_GOTO_WAYPOINT;

   239

		order.flags = 0;

   240

		order.station = GetWaypointByTile(tile);

   241

		return order;

   242

	}

   243

   244

	if (IS_TILETYPE(tile, MP_STATION)) {

   245

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

   246

   247

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

   248

			byte facil;

   249

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

   250

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

   251

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

   252

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

   253

			(facil=FACIL_TRUCK_STOP, 1);

   254

			if (st->facilities & facil) {

   255

				order.type = OT_GOTO_STATION;

   256

				order.flags = 0;

   257

				order.station = st_index;

   258

				return order;

   259

			}

   260

		}

   261

	}

   262

   263

	// not found

   264

	order.type = OT_NOTHING;

   265

	order.flags = 0;

   266

	return order;

   267

}

   268

   269

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

   270

{

   271

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

   272

		return false;

   273

   274

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

   275

		u = GetFirstVehicleInChain(u);

   276

		if (u->subtype != 0)

   277

			return false;

   278

	}

   279

   280

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

   281

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

   282

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

   283

   284

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

   285

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

   286

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

   287

		ResetObjectToPlace();

   288

	}

   289

   290

	return true;

   291

}

   292

   293

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

   294

{

   295

	Order cmd;

   296

	Vehicle *u;

   297

   298

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

   299

	u = CheckMouseOverVehicle();

   300

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

   301

		return;

   302

   303

	cmd = GetOrderCmdFromTile(v, tile);

   304

	if (cmd.type == OT_NOTHING) return;

   305

   306

	if (DoCommandP(v->tile, v->index + (OrderGetSel(w) << 16), PackOrder(&cmd), NULL, CMD_INSERT_ORDER | CMD_MSG(STR_8833_CAN_T_INSERT_NEW_ORDER))) {

   307

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

   308

			WP(w,order_d).sel++;

   309

		ResetObjectToPlace();

   310

	}

   311

}

   312

   313

static void OrderClick_Goto(Window *w, Vehicle *v)

   314

{

   315

	InvalidateWidget(w, 7);

   316

	TOGGLEBIT(w->click_state, 7);

   317

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

   318

		_place_clicked_vehicle = NULL;

   319

		SetObjectToPlaceWnd(ANIMCURSOR_PICKSTATION, 1, w);

   320

	} else {

   321

		ResetObjectToPlace();

   322

	}

   323

}

   324

   325

static void OrderClick_FullLoad(Window *w, Vehicle *v)

   326

{

   328

}

   329

   330

static void OrderClick_Unload(Window *w, Vehicle *v)

   331

{

   338

}

   339

   340

static void OrderClick_Skip(Window *w, Vehicle *v)

   341

{

   343

}

   344

   345

static void OrderClick_Delete(Window *w, Vehicle *v)

   346

{

   348

}

   349

   350

typedef void OnButtonClick(Window *w, Vehicle *v);

   351

   352

static OnButtonClick * const _order_button_proc[] = {

   353

	OrderClick_Skip,

   354

	OrderClick_Delete,

   355

	OrderClick_Nonstop,

   356

	OrderClick_Goto,

   357

	OrderClick_FullLoad,

   358

	OrderClick_Unload

   359

};

   360

   361

static const uint16 _order_keycodes[] = {

   362

	'D', //skip order

   363

	'F', //delete order

   364

	'G', //non-stop

   365

	'H', //goto order

   366

	'J', //full load

   367

	'K'  //unload

   368

};

   369

   370

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

   371

{

   372

	switch(e->event) {

   373

	case WE_PAINT:

   374

		DrawOrdersWindow(w);

   375

		break;

   376

   377

	case WE_CLICK: {

   378

		Vehicle *v = GetVehicle(w->window_number);

   379

		switch(e->click.widget) {

   380

		case 2:	{/* orders list */

   381

			int sel;

   382

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

   383

   384

			if ( (uint) sel >= 6)

   385

				return;

   386

   387

			sel += w->vscroll.pos;

   388

   391

				int xy = 0;

   393

				case OT_GOTO_STATION:			/* station order */

   395

					break;

   396

				case OT_GOTO_DEPOT:				/* goto depot order */

   398

					break;

   399

				case OT_GOTO_WAYPOINT:	/* goto waypoint order */

   401

				}

   402

   403

				if (xy)

   404

					ScrollMainWindowToTile(xy);

   405

   406

				return;

   407

			}

   408

   409

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

   410

			WP(w,order_d).sel = sel;

   411

			SetWindowDirty(w);

   412

		}	break;

   413

   414

		case 4: /* skip button */

   415

			OrderClick_Skip(w, v);

   416

			break;

   417

   418

		case 5: /* delete button */

   419

			OrderClick_Delete(w, v);

   420

			break;

   421

   422

		case 6: /* non stop button */

   423

			OrderClick_Nonstop(w, v);

   424

			break;

   425

   426

		case 7: /* goto button */

   427

			OrderClick_Goto(w, v);

   428

			break;

   429

   430

		case 8: /* full load button */

   431

			OrderClick_FullLoad(w, v);

   432

			break;

   433

   434

		case 9: /* unload button */

   435

			OrderClick_Unload(w, v);

   436

			break;

   437

		}

   438

	} break;

   439

   440

	case WE_KEYPRESS: {

   441

		Vehicle *v = GetVehicle(w->window_number);

   442

		uint i;

   443

   444

		for(i = 0; i < lengthof(_order_keycodes); i++) {

   445

			if (e->keypress.keycode == _order_keycodes[i]) {

   446

				e->keypress.cont = false;

   447

				//see if the button is disabled

   448

				if (!(HASBIT(w->disabled_state, (i + 4)))) {

   449

					_order_button_proc[i](w, v);

   450

				}

   451

				break;

   452

			}

   453

		}

   454

		break;

   455

	}

   456

   457

   458

   459

	case WE_RCLICK: {

   460

		Vehicle *v = GetVehicle(w->window_number);

   461

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

   463

			GuiShowTooltips(STR_SERVICE_HINT);

   464

		else

   465

			GuiShowTooltips(STR_8857_MAKE_THE_HIGHLIGHTED_ORDER);

   466

		} break;

   467

   468

	case WE_4: {

   469

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

   470

			DeleteWindow(w);

   471

	} break;

   472

   473

	case WE_PLACE_OBJ: {

   474

		OrdersPlaceObj(GetVehicle(w->window_number), e->place.tile, w);

   475

	} break;

   476

   477

	case WE_ABORT_PLACE_OBJ: {

   478

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

   479

		InvalidateWidget(w, 7);

   480

	} break;

   481

   482

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

   483

	case WE_MOUSELOOP: {

   484

		Vehicle *v = _place_clicked_vehicle;

   485

		/*

   486

		 * Check if we clicked on a vehicle

   487

		 * and if the GOTO button of this window is pressed

   488

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

   489

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

   490

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

   491

		 * one where GOTO is enalbed

   492

		 */

   493

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

   494

			_place_clicked_vehicle = NULL;

   495

			HandleOrderVehClick(GetVehicle(w->window_number), v, w);

   496

		}

   497

	} break;

   498

   499

	}

   500

}