1

/* $Id$ */

     2

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "currency.h"

     8

#include "spritecache.h"

     9

#include "gui.h"

    10

#include "window_gui.h"

    11

#include "window_func.h"

    12

#include "textbuf_gui.h"

    13

#include "viewport_func.h"

    14

#include "command_func.h"

    15

#include "news_gui.h"

    16

#include "console.h"

    17

#include "waypoint.h"

    18

#include "genworld.h"

    19

#include "transparency_gui.h"

    20

#include "date_func.h"

    21

#include "functions.h"

    22

#include "sound_func.h"

    23

#include "transparency.h"

    24

#include "strings_func.h"

    25

#include "zoom_func.h"

    26

#include "string_func.h"

    27

#include "player_base.h"

    28

#include "player_func.h"

    29

#include "player_gui.h"

    30

#include "settings_type.h"

    31

#include "toolbar_gui.h"

    32

#include "variables.h"

    33

    34

#include "network/network.h"

    35

#include "network/network_data.h"

    36

#include "network/network_client.h"

    37

#include "network/network_server.h"

    38

#include "network/network_gui.h"

    39

    40

#include "table/sprites.h"

    41

#include "table/strings.h"

    42

    43

static int _rename_id = 1;

    44

static int _rename_what = -1;

    45

    46

void CcGiveMoney(bool success, TileIndex tile, uint32 p1, uint32 p2)

    47

{

    48

#ifdef ENABLE_NETWORK

    49

	if (!success || !_patches.give_money) return;

    50

    51

	char msg[20];

    52

	/* Inform the player of this action */

    53

	snprintf(msg, sizeof(msg), "%d", p1);

    54

    55

	if (!_network_server) {

    56

		SEND_COMMAND(PACKET_CLIENT_CHAT)(NETWORK_ACTION_GIVE_MONEY, DESTTYPE_TEAM, p2, msg);

    57

	} else {

    58

		NetworkServer_HandleChat(NETWORK_ACTION_GIVE_MONEY, DESTTYPE_TEAM, p2, msg, NETWORK_SERVER_INDEX);

    59

	}

    60

#endif /* ENABLE_NETWORK */

    61

}

    62

    63

void HandleOnEditText(const char *str)

    64

{

    65

	int id = _rename_id;

    66

	_cmd_text = str;

    67

    68

	switch (_rename_what) {

    69

	case 1: // Rename a waypoint

    70

		if (*str == '\0') return;

    71

		DoCommandP(0, id, 0, NULL, CMD_RENAME_WAYPOINT | CMD_MSG(STR_CANT_CHANGE_WAYPOINT_NAME));

    72

		break;

    73

#ifdef ENABLE_NETWORK

    74

	case 3: { // Give money, you can only give money in excess of loan

    75

		const Player *p = GetPlayer(_current_player);

    76

		Money money = min(p->player_money - p->current_loan, (Money)(atoi(str) / _currency->rate));

    77

    78

		uint32 money_c = Clamp(ClampToI32(money), 0, 20000000); // Clamp between 20 million and 0

    79

    80

		/* Give 'id' the money, and substract it from ourself */

    81

		DoCommandP(0, money_c, id, CcGiveMoney, CMD_GIVE_MONEY | CMD_MSG(STR_INSUFFICIENT_FUNDS));

    82

	} break;

    83

#endif /* ENABLE_NETWORK */

    84

		default: NOT_REACHED();

    85

	}

    86

    87

	_rename_id = _rename_what = -1;

    88

}

    89

    90

/**

    91

 * This code is shared for the majority of the pushbuttons.

    92

 * Handles e.g. the pressing of a button (to build things), playing of click sound and sets certain parameters

    93

 *

    94

 * @param w Window which called the function

    95

 * @param widget ID of the widget (=button) that called this function

    96

 * @param cursor How should the cursor image change? E.g. cursor with depot image in it

    97

 * @param mode Tile highlighting mode, e.g. drawing a rectangle or a dot on the ground

    98

 * @param placeproc Procedure which will be called when someone clicks on the map

    99

 * @return true if the button is clicked, false if it's unclicked

   100

 */

   101

bool HandlePlacePushButton(Window *w, int widget, CursorID cursor, ViewportHighlightMode mode, PlaceProc *placeproc)

   102

{

   103

	if (w->IsWidgetDisabled(widget)) return false;

   104

   105

	SndPlayFx(SND_15_BEEP);

   106

	SetWindowDirty(w);

   107

   108

	if (w->IsWidgetLowered(widget)) {

   109

		ResetObjectToPlace();

   110

		return false;

   111

	}

   112

   113

	SetObjectToPlace(cursor, PAL_NONE, mode, w->window_class, w->window_number);

   114

	w->LowerWidget(widget);

   115

	_place_proc = placeproc;

   116

	return true;

   117

}

   118

   119

   120

void CcPlaySound10(bool success, TileIndex tile, uint32 p1, uint32 p2)

   121

{

   122

	if (success) SndPlayTileFx(SND_12_EXPLOSION, tile);

   123

}

   124

   125

#ifdef ENABLE_NETWORK

   126

void ShowNetworkGiveMoneyWindow(PlayerID player)

   127

{

   128

	_rename_id = player;

   129

	_rename_what = 3;

   130

	ShowQueryString(STR_EMPTY, STR_NETWORK_GIVE_MONEY_CAPTION, 30, 180, NULL, CS_NUMERAL);

   131

}

   132

#endif /* ENABLE_NETWORK */

   133

   134

void ShowRenameWaypointWindow(const Waypoint *wp)

   135

{

   136

	int id = wp->index;

   137

   138

	/* Are we allowed to change the name of the waypoint? */

   139

	if (!CheckTileOwnership(wp->xy)) {

   140

		ShowErrorMessage(_error_message, STR_CANT_CHANGE_WAYPOINT_NAME,

   141

			TileX(wp->xy) * TILE_SIZE, TileY(wp->xy) * TILE_SIZE);

   142

		return;

   143

	}

   144

   145

	_rename_id = id;

   146

	_rename_what = 1;

   147

	SetDParam(0, id);

   148

	ShowQueryString(STR_WAYPOINT_RAW, STR_EDIT_WAYPOINT_NAME, 30, 180, NULL, CS_ALPHANUMERAL);

   149

}

   150

   151

   152

/* Zooms a viewport in a window in or out */

   153

/* No button handling or what so ever */

   154

bool DoZoomInOutWindow(int how, Window *w)

   155

{

   156

	ViewPort *vp;

   157

   158

	assert(w != NULL);

   159

	vp = w->viewport;

   160

   161

	switch (how) {

   162

		case ZOOM_IN:

   163

			if (vp->zoom == ZOOM_LVL_MIN) return false;

   164

			vp->zoom = (ZoomLevel)((int)vp->zoom - 1);

   165

			vp->virtual_width >>= 1;

   166

			vp->virtual_height >>= 1;

   167

   168

			WP(w, vp_d).scrollpos_x += vp->virtual_width >> 1;

   169

			WP(w, vp_d).scrollpos_y += vp->virtual_height >> 1;

   170

			WP(w, vp_d).dest_scrollpos_x = WP(w,vp_d).scrollpos_x;

   171

			WP(w, vp_d).dest_scrollpos_y = WP(w,vp_d).scrollpos_y;

   172

			break;

   173

		case ZOOM_OUT:

   174

			if (vp->zoom == ZOOM_LVL_MAX) return false;

   175

			vp->zoom = (ZoomLevel)((int)vp->zoom + 1);

   176

   177

			WP(w, vp_d).scrollpos_x -= vp->virtual_width >> 1;

   178

			WP(w, vp_d).scrollpos_y -= vp->virtual_height >> 1;

   179

			WP(w, vp_d).dest_scrollpos_x = WP(w,vp_d).scrollpos_x;

   180

			WP(w, vp_d).dest_scrollpos_y = WP(w,vp_d).scrollpos_y;

   181

   182

			vp->virtual_width <<= 1;

   183

			vp->virtual_height <<= 1;

   184

			break;

   185

	}

   186

	if (vp != NULL) { // the vp can be null when how == ZOOM_NONE

   187

		vp->virtual_left = WP(w, vp_d).scrollpos_x;

   188

		vp->virtual_top = WP(w, vp_d).scrollpos_y;

   189

	}

   190

	SetWindowDirty(w);

   191

	/* Update the windows that have zoom-buttons to perhaps disable their buttons */

   192

	SendWindowMessageClass(w->window_class, how, w->window_number, 0);

   193

	return true;

   194

}

   195

   196

void ZoomInOrOutToCursorWindow(bool in, Window *w)

   197

{

   198

	assert(w != NULL);

   199

   200

	if (_game_mode != GM_MENU) {

   201

		ViewPort *vp = w->viewport;

   202

		if ((in && vp->zoom == ZOOM_LVL_MIN) || (!in && vp->zoom == ZOOM_LVL_MAX))

   203

			return;

   204

   205

		Point pt = GetTileZoomCenterWindow(in,w);

   206

		if (pt.x != -1) {

   207

			ScrollWindowTo(pt.x, pt.y, w, true);

   208

   209

			DoZoomInOutWindow(in ? ZOOM_IN : ZOOM_OUT, w);

   210

		}

   211

	}

   212

}

   213

   214

extern void UpdateAllStationVirtCoord();

   215

   216

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

   217

{

   218

	switch (e->event) {

   219

		case WE_PAINT:

   220

			DrawWindowViewport(w);

   221

			if (_game_mode == GM_MENU) {

   222

				int off_x = _screen.width / 2;

   223

   224

				DrawSprite(SPR_OTTD_O, PAL_NONE, off_x - 120, 50);

   225

				DrawSprite(SPR_OTTD_P, PAL_NONE, off_x -  86, 50);

   226

				DrawSprite(SPR_OTTD_E, PAL_NONE, off_x -  53, 50);

   227

				DrawSprite(SPR_OTTD_N, PAL_NONE, off_x -  22, 50);

   228

   229

				DrawSprite(SPR_OTTD_T, PAL_NONE, off_x +  34, 50);

   230

				DrawSprite(SPR_OTTD_T, PAL_NONE, off_x +  65, 50);

   231

				DrawSprite(SPR_OTTD_D, PAL_NONE, off_x +  96, 50);

   232

			}

   233

			break;

   234

   235

		case WE_KEYPRESS:

   236

			switch (e->we.keypress.keycode) {

   237

				case 'Q' | WKC_CTRL:

   238

				case 'Q' | WKC_META:

   239

					HandleExitGameRequest();

   240

					break;

   241

			}

   242

   243

			/* Disable all key shortcuts, except quit shortcuts when

   244

			* generating the world, otherwise they create threading

   245

			* problem during the generating, resulting in random

   246

			* assertions that are hard to trigger and debug */

   247

			if (IsGeneratingWorld()) break;

   248

   249

			if (e->we.keypress.keycode == WKC_BACKQUOTE) {

   250

				IConsoleSwitch();

   251

				e->we.keypress.cont = false;

   252

				break;

   253

			}

   254

   255

			if (e->we.keypress.keycode == ('B' | WKC_CTRL)) {

   256

				e->we.keypress.cont = false;

   257

				extern bool _draw_bounding_boxes;

   258

				_draw_bounding_boxes = !_draw_bounding_boxes;

   259

				MarkWholeScreenDirty();

   260

				break;

   261

			}

   262

   263

			if (_game_mode == GM_MENU) break;

   264

   265

			switch (e->we.keypress.keycode) {

   266

				case 'C':

   267

				case 'Z': {

   268

					Point pt = GetTileBelowCursor();

   269

					if (pt.x != -1) {

   270

						if (e->we.keypress.keycode == 'Z') MaxZoomInOut(ZOOM_IN, w);

   271

						ScrollMainWindowTo(pt.x, pt.y);

   272

					}

   273

					break;

   274

				}

   275

   276

				case WKC_ESC: ResetObjectToPlace(); break;

   277

				case WKC_DELETE: DeleteNonVitalWindows(); break;

   278

				case WKC_DELETE | WKC_SHIFT: DeleteAllNonVitalWindows(); break;

   279

				case 'R' | WKC_CTRL: MarkWholeScreenDirty(); break;

   280

   281

#if defined(_DEBUG)

   282

				case '0' | WKC_ALT: // Crash the game

   283

					*(byte*)0 = 0;

   284

					break;

   285

   286

				case '1' | WKC_ALT: // Gimme money

   287

					/* Server can not cheat in advertise mode either! */

   288

					if (!_networking || !_network_server || !_network_advertise)

   289

						DoCommandP(0, 10000000, 0, NULL, CMD_MONEY_CHEAT);

   290

					break;

   291

   292

				case '2' | WKC_ALT: // Update the coordinates of all station signs

   293

					UpdateAllStationVirtCoord();

   294

					break;

   295

#endif

   296

   297

				case '1' | WKC_CTRL:

   298

				case '2' | WKC_CTRL:

   299

				case '3' | WKC_CTRL:

   300

				case '4' | WKC_CTRL:

   301

				case '5' | WKC_CTRL:

   302

				case '6' | WKC_CTRL:

   303

				case '7' | WKC_CTRL:

   304

				case '8' | WKC_CTRL:

   305

				case '9' | WKC_CTRL:

   306

					/* Transparency toggle hot keys */

   307

					ToggleTransparency((TransparencyOption)(e->we.keypress.keycode - ('1' | WKC_CTRL)));

   308

					MarkWholeScreenDirty();

   309

					break;

   310

   311

				case '1' | WKC_CTRL | WKC_SHIFT:

   312

				case '2' | WKC_CTRL | WKC_SHIFT:

   313

				case '3' | WKC_CTRL | WKC_SHIFT:

   314

				case '4' | WKC_CTRL | WKC_SHIFT:

   315

				case '5' | WKC_CTRL | WKC_SHIFT:

   316

				case '6' | WKC_CTRL | WKC_SHIFT:

   317

				case '7' | WKC_CTRL | WKC_SHIFT:

   318

				case '8' | WKC_CTRL | WKC_SHIFT:

   319

					/* Invisibility toggle hot keys */

   320

					ToggleInvisibilityWithTransparency((TransparencyOption)(e->we.keypress.keycode - ('1' | WKC_CTRL | WKC_SHIFT)));

   321

					MarkWholeScreenDirty();

   322

					break;

   323

   324

				case 'X' | WKC_CTRL:

   325

					ShowTransparencyToolbar();

   326

					break;

   327

   328

				case 'X':

   329

					ResetRestoreAllTransparency();

   330

					break;

   331

   332

#ifdef ENABLE_NETWORK

   333

				case WKC_RETURN: case 'T': // smart chat; send to team if any, otherwise to all

   334

					if (_networking) {

   335

						const NetworkClientInfo *cio = NetworkFindClientInfoFromIndex(_network_own_client_index);

   336

						bool teamchat = false;

   337

   338

						if (cio == NULL) break;

   339

   340

						/* Only players actually playing can speak to team. Eg spectators cannot */

   341

						if (_patches.prefer_teamchat && IsValidPlayer(cio->client_playas)) {

   342

							const NetworkClientInfo *ci;

   343

							FOR_ALL_ACTIVE_CLIENT_INFOS(ci) {

   344

								if (ci->client_playas == cio->client_playas && ci != cio) {

   345

									teamchat = true;

   346

									break;

   347

								}

   348

							}

   349

						}

   350

   351

						ShowNetworkChatQueryWindow(teamchat ? DESTTYPE_TEAM : DESTTYPE_BROADCAST, cio->client_playas);

   352

					}

   353

					break;

   354

   355

				case WKC_SHIFT | WKC_RETURN: case WKC_SHIFT | 'T': // send text message to all players

   356

					if (_networking) ShowNetworkChatQueryWindow(DESTTYPE_BROADCAST, 0);

   357

					break;

   358

   359

				case WKC_CTRL | WKC_RETURN: case WKC_CTRL | 'T': // send text to all team mates

   360

					if (_networking) {

   361

						const NetworkClientInfo *cio = NetworkFindClientInfoFromIndex(_network_own_client_index);

   362

						if (cio == NULL) break;

   363

   364

						ShowNetworkChatQueryWindow(DESTTYPE_TEAM, cio->client_playas);

   365

					}

   366

					break;

   367

#endif

   368

   369

				default: return;

   370

			}

   371

			e->we.keypress.cont = false;

   372

			break;

   373

   374

		case WE_SCROLL: {

   375

			ViewPort *vp = IsPtInWindowViewport(w, _cursor.pos.x, _cursor.pos.y);

   376

   377

			if (vp == NULL) {

   378

				_cursor.fix_at = false;

   379

				_scrolling_viewport = false;

   380

			}

   381

   382

			WP(w, vp_d).scrollpos_x += ScaleByZoom(e->we.scroll.delta.x, vp->zoom);

   383

			WP(w, vp_d).scrollpos_y += ScaleByZoom(e->we.scroll.delta.y, vp->zoom);

   384

			WP(w, vp_d).dest_scrollpos_x = WP(w, vp_d).scrollpos_x;

   385

			WP(w, vp_d).dest_scrollpos_y = WP(w, vp_d).scrollpos_y;

   386

		} break;

   387

   388

		case WE_MOUSEWHEEL:

   389

			ZoomInOrOutToCursorWindow(e->we.wheel.wheel < 0, w);

   390

			break;

   391

   392

		case WE_MESSAGE:

   393

			/* Forward the message to the appropiate toolbar (ingame or scenario editor) */

   394

			SendWindowMessage(WC_MAIN_TOOLBAR, 0, e->we.message.msg, e->we.message.wparam, e->we.message.lparam);

   395

			break;

   396

	}

   397

}

   398

   399

   400

void ShowSelectGameWindow();

   401

   402

void SetupColorsAndInitialWindow()

   403

{

   404

	for (uint i = 0; i != 16; i++) {

   405

		const byte *b = GetNonSprite(PALETTE_RECOLOR_START + i);

   406

   407

		assert(b);

   408

		memcpy(_colour_gradient[i], b + 0xC6, sizeof(_colour_gradient[i]));

   409

	}

   410

   411

	int width = _screen.width;

   412

	int height = _screen.height;

   413

   414

	Window *w = AllocateWindow(0, 0, width, height, MainWindowWndProc, WC_MAIN_WINDOW, NULL);

   415

	InitializeWindowViewport(w, 0, 0, width, height, TileXY(32, 32), ZOOM_LVL_VIEWPORT);

   416

   417

	/* XXX: these are not done */

   418

	switch (_game_mode) {

   419

		default: NOT_REACHED();

   420

		case GM_MENU:

   421

			ShowSelectGameWindow();

   422

			break;

   423

   424

		case GM_NORMAL:

   425

		case GM_EDITOR:

   426

			ShowVitalWindows();

   427

			break;

   428

	}

   429

}

   430

   431

extern void ShowStatusBar();

   432

   433

void ShowVitalWindows()

   434

{

   435

	Window *w = AllocateToolbar();

   436

	DoZoomInOutWindow(ZOOM_NONE, w);

   437

   438

	/* Status bad only for normal games */

   439

	if (_game_mode == GM_EDITOR) return;

   440

   441

	ShowStatusBar();

   442

}

   443

   444

/**

   445

 * Size of the application screen changed.

   446

 * Adapt the game screen-size, re-allocate the open windows, and repaint everything

   447

 */

   448

void GameSizeChanged()

   449

{

   450

	_cur_resolution[0] = _screen.width;

   451

	_cur_resolution[1] = _screen.height;

   452

	ScreenSizeChanged();

   453

	RelocateAllWindows(_screen.width, _screen.height);

   454

	MarkWholeScreenDirty();

   455

}