1

#include "stdafx.h"

     2

#include "ttd.h"

     3

     4

#include "window.h"

     5

#include "gui.h"

     6

#include "gfx.h"

     7

#include "command.h"

     8

#include "engine.h"

     9

    10

static uint32 _difficulty_click_a;

    11

static uint32 _difficulty_click_b;

    12

static byte _difficulty_timeout;

    13

    14

extern const StringID _currency_string_list[];

    15

extern uint GetMaskOfAllowedCurrencies();

    16

    17

static const StringID _distances_dropdown[] = {

    18

	STR_0139_IMPERIAL_MILES,

    19

	STR_013A_METRIC_KILOMETERS,

    20

	INVALID_STRING_ID

    21

};

    22

    23

static const StringID _driveside_dropdown[] = {

    24

	STR_02E9_DRIVE_ON_LEFT,

    25

	STR_02EA_DRIVE_ON_RIGHT,

    26

	INVALID_STRING_ID

    27

};

    28

    29

static const StringID _autosave_dropdown[] = {

    30

	STR_02F7_OFF,

    31

	STR_AUTOSAVE_1_MONTH,

    32

	STR_02F8_EVERY_3_MONTHS,

    33

	STR_02F9_EVERY_6_MONTHS,

    34

	STR_02FA_EVERY_12_MONTHS,

    35

	INVALID_STRING_ID,

    36

};

    37

    38

static const StringID _designnames_dropdown[] = {

    39

	STR_02BE_DEFAULT,

    40

	STR_02BF_CUSTOM,

    41

	INVALID_STRING_ID

    42

};

    43

    44

static StringID *BuildDynamicDropdown(StringID base, int num)

    45

{

    46

	static StringID buf[32 + 1];

    47

	StringID *p = buf;

    48

	while (--num>=0) *p++ = base++;

    49

	*p = INVALID_STRING_ID;

    50

	return buf;

    51

}

    52

    53

static int GetCurRes()

    54

{

    55

	int i;

    56

	for(i=0; i!=_num_resolutions; i++)

    57

		if (_resolutions[i][0] == _cur_resolution[0] && _resolutions[i][1] == _cur_resolution[1])

    58

			break;

    59

	return i;

    60

}

    61

    62

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

    63

{

    64

	int i;

    65

    66

	switch(e->event) {

    67

	case WE_PAINT: {

    68

		StringID str = STR_02BE_DEFAULT;

    69

		w->disabled_state = (_vehicle_design_names & 1) ? (++str, 0) : (1 << 21);

    70

		SET_DPARAM16(0, str);

    71

		SET_DPARAM16(1, _currency_string_list[_opt_mod_ptr->currency]);

    72

		SET_DPARAM16(2, _opt_mod_ptr->kilometers + STR_0139_IMPERIAL_MILES);

    73

		SET_DPARAM16(3, STR_02E9_DRIVE_ON_LEFT + _opt_mod_ptr->road_side);

    74

		SET_DPARAM16(4, STR_TOWNNAME_ENGLISH + _opt_mod_ptr->town_name);

    75

		SET_DPARAM16(5, _autosave_dropdown[_opt_mod_ptr->autosave]);

    76

		SET_DPARAM16(6, SPECSTR_LANGUAGE_START + _dynlang.curr);

    77

		i = GetCurRes();

    78

		SET_DPARAM16(7, i == _num_resolutions ? STR_RES_OTHER : SPECSTR_RESOLUTION_START + i);

    79

		SET_DPARAM16(8, SPECSTR_SCREENSHOT_START + _cur_screenshot_format);

    80

		DrawWindowWidgets(w);

    81

	}	break;

    82

    83

	case WE_CLICK:

    84

		switch(e->click.widget) {

    85

		case 5:

    86

			ShowDropDownMenu(w, _currency_string_list, _opt_mod_ptr->currency, e->click.widget, _game_mode == GM_MENU ? 0 : ~GetMaskOfAllowedCurrencies());

    87

			return;

    88

		case 8:

    89

			ShowDropDownMenu(w, _distances_dropdown, _opt_mod_ptr->kilometers, e->click.widget, 0);

    90

			return;

    91

		case 11: {

    92

			int i = _opt_mod_ptr->road_side;

    93

			ShowDropDownMenu(w, _driveside_dropdown, i, e->click.widget, (_game_mode == GM_MENU) ? 0 : (-1) ^ (1 << i));

    94

			return;

    95

		}

    96

		case 14: {

    97

			int i = _opt_mod_ptr->town_name;

    98

			ShowDropDownMenu(w, BuildDynamicDropdown(STR_TOWNNAME_ENGLISH, SPECSTR_TOWNNAME_LAST - SPECSTR_TOWNNAME_START + 1), i, e->click.widget, (_game_mode == GM_MENU) ? 0 : (-1) ^ (1 << i));

    99

			return;

   100

		}

   101

		case 17:

   102

			ShowDropDownMenu(w, _autosave_dropdown, _opt_mod_ptr->autosave, e->click.widget, 0);

   103

			return;

   104

		case 20:

   105

			ShowDropDownMenu(w, _designnames_dropdown, (_vehicle_design_names&1)?1:0, e->click.widget, (_vehicle_design_names&2)?0:2);

   106

			return;

   107

		case 21:

   108

			return;

   109

		case 24:

   110

			ShowDropDownMenu(w, _dynlang.dropdown, _dynlang.curr, e->click.widget, 0);

   111

			return;

   112

		case 27:

   113

			// setup resolution dropdown

   114

			ShowDropDownMenu(w, BuildDynamicDropdown(SPECSTR_RESOLUTION_START, _num_resolutions), GetCurRes(), e->click.widget, 0);

   115

			return;

   116

		case 30:

   117

			// setup screenshot format dropdown

   118

			ShowDropDownMenu(w, BuildDynamicDropdown(SPECSTR_SCREENSHOT_START, _num_screenshot_formats), _cur_screenshot_format, e->click.widget, 0);

   119

			return;

   120

   121

		}

   122

		break;

   123

   124

	case WE_DROPDOWN_SELECT: 

   125

		switch(e->dropdown.button) {

   126

		case 20:

   127

			if (e->dropdown.index == 0) {

   128

				DeleteCustomEngineNames();

   129

				MarkWholeScreenDirty();

   130

			} else if (!(_vehicle_design_names&1)) {

   131

				LoadCustomEngineNames();

   132

				MarkWholeScreenDirty();

   133

			}

   134

			break;

   135

		case 5:

   136

			_opt_mod_ptr->currency = _opt.currency = e->dropdown.index;

   137

			MarkWholeScreenDirty();

   138

			break;

   139

		case 8:

   140

			_opt_mod_ptr->kilometers = e->dropdown.index;

   141

			MarkWholeScreenDirty();

   142

			break;

   143

		case 11:

   144

			if (_game_mode == GM_MENU)

   145

				DoCommandP(0, e->dropdown.index, 0, NULL, CMD_SET_ROAD_DRIVE_SIDE | CMD_MSG(STR_EMPTY));

   146

			break;

   147

		case 14:

   148

			if (_game_mode == GM_MENU)

   149

				DoCommandP(0, e->dropdown.index, 0, NULL, CMD_SET_TOWN_NAME_TYPE | CMD_MSG(STR_EMPTY));

   150

			break;

   151

		case 17:

   152

			_opt_mod_ptr->autosave = e->dropdown.index;

   153

			SetWindowDirty(w);

   154

			break;

   155

   156

		// change interface language

   157

		case 24:

   158

			ReadLanguagePack(e->dropdown.index);

   159

			MarkWholeScreenDirty();

   160

			break;

   161

   162

		// change resolution

   163

		case 27:

   164

			if (e->dropdown.index < _num_resolutions && ChangeResInGame(_resolutions[e->dropdown.index][0],_resolutions[e->dropdown.index][1]))

   165

				SetWindowDirty(w);

   166

			break;

   167

   168

		// change screenshot format

   169

		case 30:

   170

			SetScreenshotFormat(e->dropdown.index);

   171

			SetWindowDirty(w);

   172

			break;

   173

		}

   174

		break;

   175

	}

   176

}

   177

   178

int32 CmdSetRoadDriveSide(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   179

{

   180

	if (flags & DC_EXEC) {

   181

		_opt_mod_ptr->road_side = p1;

   182

		InvalidateWindow(WC_GAME_OPTIONS,0);

   183

	}

   184

	return 0;

   185

}

   186

   187

int32 CmdSetTownNameType(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   188

{

   189

	if (flags & DC_EXEC) {

   190

		_opt_mod_ptr->town_name = p1;

   191

		InvalidateWindow(WC_GAME_OPTIONS,0);

   192

	}

   193

	return 0;

   194

}

   195

   196

   197

static const Widget _game_options_widgets[] = {

   216

   221

   228

   232

   234

};

   235

   236

static const WindowDesc _game_options_desc = {

   237

	WDP_CENTER, WDP_CENTER, 370, 234,

   238

	WC_GAME_OPTIONS,0,

   239

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_RESTORE_DPARAM | WDF_UNCLICK_BUTTONS,

   240

	_game_options_widgets,

   241

	GameOptionsWndProc

   242

};

   243

   244

   245

void ShowGameOptions()

   246

{

   247

	DeleteWindowById(WC_GAME_OPTIONS, 0);

   248

	AllocateWindowDesc(&_game_options_desc);

   249

}

   250

   251

typedef struct {

   252

	int16 min;

   253

	int16 max;

   254

	int16 step;

   255

	StringID str;

   256

} GameSettingData;

   257

   258

static const GameSettingData _game_setting_info[] = {

   259

	{0,7,1,0},

   260

	{0,3,1,STR_6830_IMMEDIATE},

   261

	{0,2,1,STR_6816_LOW},

   262

	{0,3,1,STR_26816_NONE},

   263

	{100,500,50,0},

   264

	{2,4,1,0},

   265

	{0,2,1,STR_6820_LOW},

   266

	{0,4,1,STR_681B_VERY_SLOW},

   267

	{0,2,1,STR_6820_LOW},

   268

	{0,2,1,STR_6823_NONE},

   269

	{0,3,1,STR_6826_X1_5},

   270

	{0,2,1,STR_6820_LOW},

   271

	{0,3,1,STR_682A_VERY_FLAT},

   272

	{0,3,1,STR_VERY_LOW},

   273

	{0,1,1,STR_682E_STEADY},

   274

	{0,1,1,STR_6834_AT_END_OF_LINE_AND_AT_STATIONS},

   275

	{0,1,1,STR_6836_OFF},

   276

	{0,2,1,STR_6839_PERMISSIVE},

   277

};

   278

   279

static bool FORCEINLINE GetBitAndShift(uint32 *b)

   280

{

   281

	uint32 x = *b;

   282

	*b >>= 1;

   283

	return (x&1) != 0;

   284

}

   285

   286

static GameOptions _opt_mod_temp;

   287

   288

static const int16 _default_game_diff[3][GAME_DIFFICULTY_NUM] = {

   289

	{2, 2, 1, 3, 300, 2, 0, 2, 0, 1, 2, 0, 1, 0, 0, 0, 0, 0},

   290

	{4, 1, 1, 2, 150, 3, 1, 3, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1},

   291

	{7, 0, 2, 2, 100, 4, 1, 3, 2, 2, 0, 2, 3, 2, 1, 1, 1, 2},

   292

};

   293

   294

void SetDifficultyLevel(int mode, GameOptions *gm_opt)

   295

{

   296

	int i;

   297

	assert(mode <= 3);

   298

   299

	gm_opt->diff_level = mode;

   300

	if (mode != 3) { // not custom

   301

		for(i = 0; i != GAME_DIFFICULTY_NUM; i++)

   302

			((int*)&gm_opt->diff)[i] = _default_game_diff[mode][i];

   303

	}

   304

}

   305

   306

extern void StartupEconomy();

   307

   308

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

   309

{

   310

	switch(e->event) {

   311

	case WE_PAINT: {

   312

		uint32 click_a, click_b, disabled;

   313

		int i;

   314

		int x,y,value;

   315

   316

		w->click_state = (1 << 4) << _opt_mod_temp.diff_level;

   317

		w->disabled_state = (_game_mode != GM_NORMAL) ? 0 : (1 << 4) | (1 << 5) | (1 << 6) | (1 << 7);

   318

		DrawWindowWidgets(w);

   319

   320

		click_a = _difficulty_click_a;

   321

		click_b = _difficulty_click_b;

   322

   323

		disabled = _game_mode == GM_NORMAL ? 0x383E : 0;

   324

		// XXX

   325

   326

		x = 0;

   327

		y = 32;

   328

		for (i = 0; i != GAME_DIFFICULTY_NUM; i++) {

   329

			DrawFrameRect(x+5, y+1, x+5+9, y+9, 3, GetBitAndShift(&click_a)?0x20:0);

   330

			DrawFrameRect(x+15, y+1, x+15+9, y+9, 3, GetBitAndShift(&click_b)?0x20:0);

   331

			if (GetBitAndShift(&disabled)) {

   332

				int color = 0x8000 | _color_list[3].unk2;

   333

				GfxFillRect(x+6, y+2, x+6+8, y+9, color);

   334

				GfxFillRect(x+16, y+2, x+16+8, y+9, color);

   335

			}

   336

   337

			DrawStringCentered(x+10, y+1, STR_6819, 0);

   338

			DrawStringCentered(x+20, y+1, STR_681A, 0);

   339

   340

   341

			value = _game_setting_info[i].str + ((int*)&_opt_mod_temp.diff)[i];

   342

			if (i == 4) value *= 1000; // handle currency option

   343

			SET_DPARAM32(0, value);

   344

			DrawString(x+30, y+1, STR_6805_MAXIMUM_NO_COMPETITORS + i, 0);

   345

   346

			y += 11;

   347

		}

   348

	} break;

   349

   350

	case WE_CLICK:

   351

		switch(e->click.widget) {

   352

		case 3: {

   353

			int x,y;

   354

			uint btn, dis;

   355

			int val;

   356

			const GameSettingData *info;

   357

   358

			x = e->click.pt.x - 5;

   359

			if (!IS_INT_INSIDE(x, 0, 21))

   360

				return;

   361

   362

			y = e->click.pt.y - 33;

   363

			if (y < 0)

   364

				return;

   365

   366

			// Get button from Y coord.

   367

			btn = y / 11;

   368

			if (btn >= GAME_DIFFICULTY_NUM || y % 11 > 9)

   369

				return;

   370

   371

			// Clicked disabled button?

   372

			dis = 0;

   373

			if (_game_mode == GM_NORMAL)

   374

				dis |= 0x383E;

   375

			if (HASBIT(dis, btn))

   376

				return;

   377

   378

			_difficulty_timeout = 5;

   379

   380

			val = ((int*)&_opt_mod_temp.diff)[btn];

   381

   382

			info = &_game_setting_info[btn];

   383

			if (x >= 10) {

   384

				// Increase button clicked

   385

				val = min(val + info->step, info->max);

   386

				SETBIT(_difficulty_click_b, btn);

   387

			} else {

   388

				// Decrease button clicked

   389

				val = max(val - info->step, info->min);

   390

				SETBIT(_difficulty_click_a, btn);

   391

			}

   392

   393

			// save value in temporary variable

   394

			((int*)&_opt_mod_temp.diff)[btn] = val;

   395

			SetDifficultyLevel(3, &_opt_mod_temp); // set difficulty level to custom

   396

			SetWindowDirty(w);

   397

			break;

   398

		}

   399

		case 4: case 5: case 6: case 7: // easy/medium/hard/custom

   400

			// temporarily change difficulty level

   401

			SetDifficultyLevel(e->click.widget - 4, &_opt_mod_temp);

   402

			SetWindowDirty(w);

   403

			break;

   404

		case 8:

   405

			ShowHighscoreTable(_opt_mod_ptr->diff_level);

   406

			break;

   407

		case 10: { // Save button - save changes

   408

			int btn, val;

   409

			for (btn = 0; btn != GAME_DIFFICULTY_NUM; btn++) {

   410

				val = ((int*)&_opt_mod_temp.diff)[btn];

   411

				// if setting has changed, change it

   412

				if (val != ((int*)&_opt_mod_ptr->diff)[btn])

   413

					DoCommandP(0, btn, val, NULL, CMD_CHANGE_DIFFICULTY_LEVEL);

   414

			}

   415

			DoCommandP(0, -1, _opt_mod_temp.diff_level, NULL, CMD_CHANGE_DIFFICULTY_LEVEL);

   416

			DeleteWindow(w);

   417

			// If we are in the editor, we should reload the economy.

   418

			//  This way when you load a game, the max loan and interest rate

   419

			//  are loaded correctly.

   420

			if (_game_mode == GM_EDITOR)

   421

				StartupEconomy();

   422

			break;

   423

		}

   424

		case 11: // Cancel button - close window

   425

			DeleteWindow(w);

   426

			break;

   427

		}

   428

		break;

   429

   430

	case WE_MOUSELOOP:

   431

		if (_difficulty_timeout != 0 && !--_difficulty_timeout) {

   432

			_difficulty_click_a = 0;

   433

			_difficulty_click_b = 0;

   434

			SetWindowDirty(w);

   435

		}

   436

		break;

   437

	}

   438

}

   439

   440

static const Widget _game_difficulty_widgets[] = {

   455

};

   456

   457

static const WindowDesc _game_difficulty_desc = {

   458

	WDP_CENTER, WDP_CENTER, 370, 279,

   459

	WC_GAME_OPTIONS,0,

   460

	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,

   461

	_game_difficulty_widgets,

   462

	GameDifficultyWndProc

   463

};

   464

   465

void ShowGameDifficulty()

   466

{

   467

	DeleteWindowById(WC_GAME_OPTIONS, 0);

   468

	/*	copy current settings to temporary holding place

   469

	 *	change that when setting stuff, copy back on clicking 'OK'

   470

	 */

   471

	memcpy(&_opt_mod_temp, _opt_mod_ptr, sizeof(GameOptions));

   472

	AllocateWindowDesc(&_game_difficulty_desc);

   473

}	

   474

   475

void ShowHighscoreTable(int tbl)

   476

{

   477

	ShowInfoF("ShowHighscoreTable(%d) not implemented", tbl);

   478

}

   479

   480

// virtual PositionMainToolbar function, calls the right one.

   481

int32 v_PositionMainToolbar(int32 p1)

   482

{

   483

	if (_game_mode != GM_MENU)

   484

		PositionMainToolbar(NULL);

   485

   486

	return 0;

   487

}

   488

   489

int32 AiNew_PatchActive_Warning(int32 p1)

   490

{

   491

  if (p1 == 1)

   492

    ShowErrorMessage(-1, TEMP_AI_ACTIVATED, 0, 0);

   493

   494

  return 0;

   495

}

   496

   497

int32 InvisibleTreesActive(int32 p1)

   498

{

   499

	MarkWholeScreenDirty();

   500

	return 0;

   501

}

   502

   503

int32 InValidateDetailsWindow(int32 p1)

   504

{

   505

	InvalidateWindowClasses(WC_VEHICLE_DETAILS);

   506

	return 0;

   507

}

   508

   509

/* Check service intervals of vehicles, p1 is value of % or day based servicing */

   510

int32 CheckInterval(int32 p1)

   511

{

   512

	bool warning;

   513

	if (p1) {

   514

		warning = ( (IS_INT_INSIDE(_patches.servint_trains,   5, 90+1) || _patches.servint_trains   == 0) && 

   515

								(IS_INT_INSIDE(_patches.servint_roadveh,  5, 90+1) || _patches.servint_roadveh  == 0) &&

   516

								(IS_INT_INSIDE(_patches.servint_aircraft, 5, 90+1) || _patches.servint_aircraft == 0) && 

   517

								(IS_INT_INSIDE(_patches.servint_ships,    5, 90+1) || _patches.servint_ships    == 0) );

   518

	} else {

   519

		warning = ( (IS_INT_INSIDE(_patches.servint_trains,   30, 800+1) || _patches.servint_trains   == 0) && 

   520

								(IS_INT_INSIDE(_patches.servint_roadveh,  30, 800+1) || _patches.servint_roadveh  == 0) &&

   521

								(IS_INT_INSIDE(_patches.servint_aircraft, 30, 800+1) || _patches.servint_aircraft == 0) &&