1

/* $Id$ */

     2

     3

/** @file industry_gui.cpp */

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "debug.h"

     8

#include "functions.h"

     9

#include "strings.h"

    10

#include "table/strings.h"

    11

#include "table/sprites.h"

    12

#include "map.h"

    13

#include "gui.h"

    14

#include "window.h"

    15

#include "gfx.h"

    16

#include "command.h"

    17

#include "viewport.h"

    18

#include "industry.h"

    19

#include "town.h"

    20

#include "variables.h"

    21

#include "helpers.hpp"

    22

#include "cargotype.h"

    23

#include "newgrf.h"

    24

#include "newgrf_callbacks.h"

    25

#include "newgrf_industries.h"

    26

#include "newgrf_text.h"

    28

    29

extern Industry *CreateNewIndustry(TileIndex tile, IndustryType type);

    30

    31

/**

    32

 * Search callback function for TryBuildIndustry

    33

 * @param tile to test

    34

 * @param data that is passed by the caller.  In this case, the type of industry been tested

    35

 * @return the success (or not) of the operation

    36

 */

    37

static bool SearchTileForIndustry(TileIndex tile, uint32 data)

    38

{

    39

	return CreateNewIndustry(tile, data) != NULL;

    40

}

    41

    42

/**

    43

 * Perform a 9*9 tiles circular search around a tile

    44

 * in order to find a suitable zone to create the desired industry

    45

 * @param tile to start search for

    46

 * @param type of the desired industry

    47

 * @return the success (or not) of the operation

    48

 */

    49

static bool TryBuildIndustry(TileIndex tile, int type)

    50

{

    51

	return CircularTileSearch(tile, 9, SearchTileForIndustry, type);

    52

}

    53

bool _ignore_restrictions;

    54

    55

enum {

    56

	DYNA_INDU_MATRIX_WIDGET = 2,

    57

	DYNA_INDU_INFOPANEL = 4,

    58

	DYNA_INDU_FUND_WIDGET,

    59

	DYNA_INDU_RESIZE_WIDGET,

    60

};

    61

    72

static struct IndustryData {

    78

    79

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

    80

{

    81

	switch (e->event) {

    82

		case WE_CREATE: {

    83

			IndustryType ind;

    84

			const IndustrySpec *indsp;

    85

    86

			/* Shorten the window to the equivalant of the additionnal purchase

    87

			 * info coming from the callback.  SO it will only be available to tis full

    88

			 * height when newindistries are loaded */

    89

			if (!_loaded_newgrf_features.has_newindustries) {

    90

				w->widget[DYNA_INDU_INFOPANEL].bottom -= 44;

    91

				w->widget[DYNA_INDU_FUND_WIDGET].bottom -= 44;

    92

				w->widget[DYNA_INDU_FUND_WIDGET].top -= 44;

    93

				w->widget[DYNA_INDU_RESIZE_WIDGET].bottom -= 44;

    94

				w->widget[DYNA_INDU_RESIZE_WIDGET].top -= 44;

    95

				w->resize.height = w->height -= 44;

    96

			}

    97

   100

			/* Initilialize structures */

   105

   106

			w->vscroll.cap = 8; // rows in grid, same in scroller

   107

			w->resize.step_height = 13;

   108

   109

			if (_game_mode == GM_EDITOR) { // give room for the Many Random "button"

   113

			}

   114

   115

			/* We'll perform two distinct loops, one for secondary industries, and the other one for

   117

			for (ind = IT_COAL_MINE; ind < NUM_INDUSTRYTYPES; ind++) {

   118

				indsp = GetIndustrySpec(ind);

   119

				if (indsp->enabled && (!indsp->IsRawIndustry() || _game_mode == GM_EDITOR)) {

   123

				}

   124

			}

   125

   126

			if (_patches.raw_industry_construction != 0 && _game_mode != GM_EDITOR) {

   127

				for (ind = IT_COAL_MINE; ind < NUM_INDUSTRYTYPES; ind++) {

   128

					indsp = GetIndustrySpec(ind);

   129

					if (indsp->enabled && indsp->IsRawIndustry()) {

   133

					}

   134

				}

   135

			}

   142

		} break;

   143

   144

		case WE_PAINT: {

   146

			StringID str = STR_4827_REQUIRES;

   147

			int x_str = w->widget[DYNA_INDU_INFOPANEL].left + 3;

   148

			int y_str = w->widget[DYNA_INDU_INFOPANEL].top + 3;

   149

			const Widget *wi = &w->widget[DYNA_INDU_INFOPANEL];

   150

			int max_width = wi->right - wi->left - 4;

   151

   154

			if (_game_mode == GM_EDITOR) {

   157

				w->widget[DYNA_INDU_FUND_WIDGET].data = STR_BUILD_NEW_INDUSTRY;

   158

			} else {

   159

				w->widget[DYNA_INDU_FUND_WIDGET].data = (_patches.raw_industry_construction == 2 && indsp->IsRawIndustry()) ? STR_PROSPECT_NEW_INDUSTRY : STR_FUND_NEW_INDUSTRY;

   160

			}

   162

   164

   165

			DrawWindowWidgets(w);

   166

   167

			/* and now with the matrix painting */

   169

				int offset = i * 13;

   170

				int x = 3;

   171

				int y = 16;

   173

   175

					DrawString(21, y + offset, STR_MANY_RANDOM_INDUSTRIES, selected ? 12 : 6);

   176

					continue;

   177

				}

   179

   180

				/* Draw the name of the industry in white is selected, otherwise, in orange */

   181

				DrawString(20,     y + offset, indsp->name, selected ? 12 : 6);

   182

				GfxFillRect(x,     y + 1 + offset,  x + 10, y + 7 + offset, selected ? 15 : 0);

   183

				GfxFillRect(x + 1, y + 2 + offset,  x +  9, y + 6 + offset, indsp->map_colour);

   184

			}

   185

   187

				DrawStringMultiLine(x_str, y_str, STR_RANDOM_INDUSTRIES_TIP, max_width, wi->bottom - wi->top - 40);

   188

				break;

   189

			}

   190

   191

			if (_game_mode != GM_EDITOR) {

   192

				SetDParam(0, indsp->GetConstructionCost());

   193

				DrawStringTruncated(x_str, y_str, STR_482F_COST, 0, max_width);

   194

				y_str += 11;

   195

			}

   196

   197

			/* Draw the accepted cargos, if any. Otherwhise, will print "Nothing" */

   198

			if (indsp->accepts_cargo[0] != CT_INVALID) {

   199

				SetDParam(0, GetCargo(indsp->accepts_cargo[0])->name);

   200

				if (indsp->accepts_cargo[1] != CT_INVALID) {

   201

					SetDParam(1, GetCargo(indsp->accepts_cargo[1])->name);

   202

					str = STR_4828_REQUIRES;

   203

					if (indsp->accepts_cargo[2] != CT_INVALID) {

   204

						SetDParam(2, GetCargo(indsp->accepts_cargo[2])->name);

   205

						str = STR_4829_REQUIRES;

   206

					}

   207

				}

   208

			} else {

   209

				SetDParam(0, STR_00D0_NOTHING);

   210

			}

   211

			DrawStringTruncated(x_str, y_str, str, 0, max_width);

   212

   213

			y_str += 11;

   214

			/* Draw the produced cargos, if any. Otherwhise, will print "Nothing" */

   215

			str = STR_4827_PRODUCES;

   216

			if (indsp->produced_cargo[0] != CT_INVALID) {

   217

				SetDParam(0, GetCargo(indsp->produced_cargo[0])->name);

   218

				if (indsp->produced_cargo[1] != CT_INVALID) {

   219

					SetDParam(1, GetCargo(indsp->produced_cargo[1])->name);

   220

					str = STR_4828_PRODUCES;

   221

				}

   222

			} else {

   223

				SetDParam(0, STR_00D0_NOTHING);

   224

			}

   225

			DrawStringTruncated(x_str, y_str, str, 0, max_width);

   226

   227

			/* Get the additional purchase info text, if it has not already been */

   229

				if (HASBIT(indsp->callback_flags, CBM_IND_FUND_MORE_TEXT)) {          // No. Can it be called?

   231

					if (callback_res != CALLBACK_FAILED) {  // Did it failed?

   232

						StringID newtxt = GetGRFStringID(indsp->grf_prop.grffile->grfid, 0xD000 + callback_res);  // No. here's the new string

   234

					}

   235

				}

   236

			}

   237

   238

			y_str += 11;

   239

			/* Draw the Additional purchase text, provided by newgrf callback, if any.

   240

			 * Otherwhise, will print Nothing */

   245

			}

   246

		} break;

   247

   248

		case WE_CLICK:

   249

			switch (e->we.click.widget) {

   250

				case DYNA_INDU_MATRIX_WIDGET: {

   252

					int y = (e->we.click.pt.y - w->widget[DYNA_INDU_MATRIX_WIDGET].top) / 13 + w->vscroll.pos ;

   253

   258

   259

						SetWindowDirty(w);

   263

							/* Reset the button state if going to prospecting or "build many industries" */

   264

							RaiseWindowButtons(w);

   265

							ResetObjectToPlace();

   266

						}

   267

					}

   268

				} break;

   269

   270

				case DYNA_INDU_FUND_WIDGET: {

   272

						HandleButtonClick(w, DYNA_INDU_FUND_WIDGET);

   273

   274

						if (GetNumTowns() == 0) {

   275

							ShowErrorMessage(STR_0286_MUST_BUILD_TOWN_FIRST, STR_CAN_T_GENERATE_INDUSTRIES, 0, 0);

   276

						} else {

   277

							extern void GenerateIndustries();

   278

							_generating_world = true;

   279

							GenerateIndustries();

   280

							_generating_world = false;

   281

						}

   284

						HandleButtonClick(w, DYNA_INDU_FUND_WIDGET);

   287

					}

   288

				} break;

   289

			}

   290

			break;

   291

   292

		case WE_RESIZE: {

   294

			w->vscroll.cap  += e->we.sizing.diff.y / (int)w->resize.step_height;

   295

			w->widget[DYNA_INDU_MATRIX_WIDGET].data = (w->vscroll.cap << 8) + 1;

   296

		} break;

   297

   298

		case WE_PLACE_OBJ: {

   301

   302

			if (_game_mode == GM_EDITOR) {

   303

				/* Show error if no town exists at all */

   304

				if (GetNumTowns() == 0) {

   306

					ShowErrorMessage(STR_0286_MUST_BUILD_TOWN_FIRST, STR_0285_CAN_T_BUILD_HERE, e->we.place.pt.x, e->we.place.pt.y);

   307

					return;

   308

				}

   309

   310

				_current_player = OWNER_NONE;

   311

				_generating_world = true;

   312

				_ignore_restrictions = true;

   315

					ShowErrorMessage(_error_message, STR_0285_CAN_T_BUILD_HERE, e->we.place.pt.x, e->we.place.pt.y);

   316

				}

   318

				_ignore_restrictions = false;

   319

				_generating_world = false;

   324

		} break;

   325

   345

			break;

   346

   347

		case WE_TIMEOUT:

   350

			break;

   351

	}

   352

}

   353

   354

static const Widget _build_dynamic_industry_widgets[] = {

   355

{   WWT_CLOSEBOX,    RESIZE_NONE,    7,     0,    10,     0,    13, STR_00C5,                       STR_018B_CLOSE_WINDOW},

   356

{    WWT_CAPTION,   RESIZE_RIGHT,    7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,     STR_018C_WINDOW_TITLE_DRAG_THIS},

   357

{     WWT_MATRIX,      RESIZE_RB,    7,     0,   157,    14,   118, 0x801,                          STR_INDUSTRY_SELECTION_HINT},

   358

{  WWT_SCROLLBAR,     RESIZE_LRB,    7,   158,   169,    14,   118, 0x0,                            STR_0190_SCROLL_BAR_SCROLLS_LIST},

   359

{      WWT_PANEL,     RESIZE_RTB,    7,     0,   169,   119,   199, 0x0,                            STR_NULL},

   360

{    WWT_TEXTBTN,     RESIZE_RTB,    7,     0,   157,   200,   211, STR_FUND_NEW_INDUSTRY,          STR_NULL},

   361

{  WWT_RESIZEBOX,    RESIZE_LRTB,    7,   158,   169,   200,   211, 0x0,                            STR_RESIZE_BUTTON},

   362

{   WIDGETS_END},

   363

};

   364

   365

static const WindowDesc _build_industry_dynamic_desc = {

   366

	WDP_AUTO, WDP_AUTO, 170, 212,

   367

	WC_BUILD_INDUSTRY, WC_NONE,

   368

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_RESIZABLE,

   369

	_build_dynamic_industry_widgets,

   370

	BuildDynamicIndustryWndProc,

   371

};

   372

   373

void ShowBuildIndustryWindow()

   374

{

   375

	if (_game_mode != GM_EDITOR && !IsValidPlayer(_current_player)) return;

   376

	AllocateWindowDescFront(&_build_industry_dynamic_desc, 0);

   377

}

   378

   379

static void UpdateIndustryProduction(Industry *i);

   380

   383

	return i->production_rate[pt] == 1;

   384

}

   385

   388

	return i->production_rate[pt] == 255;

   389

}

   390

   391

static inline bool IsProductionAlterable(const Industry *i)

   392

{

   393

	const IndustrySpec *ind = GetIndustrySpec(i->type);

   394

	return ((_game_mode == GM_EDITOR || _cheats.setup_prod.value) &&

   395

			(ind->accepts_cargo[0] == CT_INVALID || ind->accepts_cargo[0] == CT_VALUABLES));

   396

}

   397

   408

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

   409

{

   410

	switch (e->event) {

   411

	case WE_CREATE: {

   412

		/* Count the number of lines that we need to resize the GUI with */

   413

		const IndustrySpec *ind = GetIndustrySpec(GetIndustry(w->window_number)->type);

   414

		int lines = -3;

   415

   416

		if (HASBIT(ind->callback_flags, CBM_IND_PRODUCTION_CARGO_ARRIVAL) || HASBIT(ind->callback_flags, CBM_IND_PRODUCTION_256_TICKS)) {

   417

			for (uint j = 0; j < 3 && ind->accepts_cargo[j] != CT_INVALID; j++) {

   418

				if (j == 0) lines++;

   419

				lines++;

   420

			}

   421

		} else if (ind->accepts_cargo[0] != CT_INVALID) {

   422

			lines++;

   423

		}

   424

   425

		for (uint j = 0; j < 2 && ind->produced_cargo[j] != CT_INVALID; j++) {

   426

			if (j == 0) {

   427

				if (ind->accepts_cargo[0] != CT_INVALID) lines++;

   428

				lines++;

   429

			}

   430

			lines++;

   431

		}

   432

   433

		if (HASBIT(ind->callback_flags, CBM_IND_WINDOW_MORE_TEXT)) lines += 2;

   434

   435

		for (uint j = 5; j <= 7; j++) {

   436

			if (j != 5) w->widget[j].top += lines * 10;

   437

			w->widget[j].bottom += lines * 10;

   438

		}

   439

		w->height += lines * 10;

   440

	} break;

   441

   442

	case WE_PAINT: {

   443

		Industry *i = GetIndustry(w->window_number);

   444

		const IndustrySpec *ind = GetIndustrySpec(i->type);

   445

		int y = 111;

   446

   447

		SetDParam(0, w->window_number);

   448

		DrawWindowWidgets(w);

   449

   450

		if (HASBIT(ind->callback_flags, CBM_IND_PRODUCTION_CARGO_ARRIVAL) || HASBIT(ind->callback_flags, CBM_IND_PRODUCTION_256_TICKS)) {

   451

			for (uint j = 0; j < 3 && ind->accepts_cargo[j] != CT_INVALID; j++) {

   452

				if (j == 0) {

   453

					DrawString(2, y, STR_INDUSTRY_WINDOW_WAITING_FOR_PROCESSING, 0);

   454

					y += 10;

   455

				}

   456

				SetDParam(0, ind->accepts_cargo[j]);

   457

				SetDParam(1, i->incoming_cargo_waiting[j]);

   458

				DrawString(4, y, STR_INDUSTRY_WINDOW_WAITING_STOCKPILE_CARGO, 0);

   459

				y += 10;

   460

			}

   461

		} else if (ind->accepts_cargo[0] != CT_INVALID) {

   462

			StringID str;

   463

   464

			SetDParam(0, GetCargo(ind->accepts_cargo[0])->name);

   465

			str = STR_4827_REQUIRES;

   466

			if (ind->accepts_cargo[1] != CT_INVALID) {

   467

				SetDParam(1, GetCargo(ind->accepts_cargo[1])->name);

   468

				str = STR_4828_REQUIRES;

   469

				if (ind->accepts_cargo[2] != CT_INVALID) {

   470

					SetDParam(2, GetCargo(ind->accepts_cargo[2])->name);

   471

					str = STR_4829_REQUIRES;

   472

				}

   473

			}

   474

			DrawString(2, y, str, 0);

   475

			y += 10;

   476

		}

   477

   478

		for (uint j = 0; j < 2 && ind->produced_cargo[j] != CT_INVALID; j++) {

   479

			if (j == 0) {

   480

				if (ind->accepts_cargo[0] != CT_INVALID) y += 10;

   481

				DrawString(2, y, STR_482A_PRODUCTION_LAST_MONTH, 0);

   482

				y += 10;

   484

			}

   485

   486

			SetDParam(0, ind->produced_cargo[j]);

   487

			SetDParam(1, i->last_month_production[j]);

   488