OpenTTD
terraform_gui.cpp
Go to the documentation of this file.
1 /* $Id$ */
2 
3 /*
4  * This file is part of OpenTTD.
5  * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
6  * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
7  * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
8  */
9 
12 #include "stdafx.h"
13 #include "clear_map.h"
14 #include "company_func.h"
15 #include "company_base.h"
16 #include "gui.h"
17 #include "window_gui.h"
18 #include "window_func.h"
19 #include "viewport_func.h"
20 #include "command_func.h"
21 #include "signs_func.h"
22 #include "sound_func.h"
23 #include "base_station_base.h"
24 #include "textbuf_gui.h"
25 #include "genworld.h"
26 #include "tree_map.h"
27 #include "landscape_type.h"
28 #include "tilehighlight_func.h"
29 #include "strings_func.h"
30 #include "newgrf_object.h"
31 #include "object.h"
32 #include "hotkeys.h"
33 #include "engine_base.h"
34 #include "terraform_gui.h"
35 #include "zoom_func.h"
36 
38 
39 #include "table/strings.h"
40 
41 #include "safeguards.h"
42 
43 void CcTerraform(const CommandCost &result, TileIndex tile, uint32 p1, uint32 p2)
44 {
45  if (result.Succeeded()) {
46  if (_settings_client.sound.confirm) SndPlayTileFx(SND_1F_SPLAT_OTHER, tile);
47  } else {
49  SetRedErrorSquare(_terraform_err_tile);
50  }
51 }
52 
53 
55 static void GenerateDesertArea(TileIndex end, TileIndex start)
56 {
57  if (_game_mode != GM_EDITOR) return;
58 
59  _generating_world = true;
60 
61  TileArea ta(start, end);
62  TILE_AREA_LOOP(tile, ta) {
64  DoCommandP(tile, 0, 0, CMD_LANDSCAPE_CLEAR);
65  MarkTileDirtyByTile(tile);
66  }
67  _generating_world = false;
69 }
70 
72 static void GenerateRockyArea(TileIndex end, TileIndex start)
73 {
74  if (_game_mode != GM_EDITOR) return;
75 
76  bool success = false;
77  TileArea ta(start, end);
78 
79  TILE_AREA_LOOP(tile, ta) {
80  switch (GetTileType(tile)) {
81  case MP_TREES:
82  if (GetTreeGround(tile) == TREE_GROUND_SHORE) continue;
83  /* FALL THROUGH */
84  case MP_CLEAR:
85  MakeClear(tile, CLEAR_ROCKS, 3);
86  break;
87 
88  default: continue;
89  }
90  MarkTileDirtyByTile(tile);
91  success = true;
92  }
93 
94  if (success && _settings_client.sound.confirm) SndPlayTileFx(SND_1F_SPLAT_OTHER, end);
95 }
96 
107 {
109  /* When end_tile is MP_VOID, the error tile will not be visible to the
110  * user. This happens when terraforming at the southern border. */
111  if (TileX(end_tile) == MapMaxX()) end_tile += TileDiffXY(-1, 0);
112  if (TileY(end_tile) == MapMaxY()) end_tile += TileDiffXY(0, -1);
113  }
114 
115  switch (proc) {
116  case DDSP_DEMOLISH_AREA:
117  DoCommandP(end_tile, start_tile, _ctrl_pressed ? 1 : 0, CMD_CLEAR_AREA | CMD_MSG(STR_ERROR_CAN_T_CLEAR_THIS_AREA), CcPlaySound10);
118  break;
120  DoCommandP(end_tile, start_tile, LM_RAISE << 1 | (_ctrl_pressed ? 1 : 0), CMD_LEVEL_LAND | CMD_MSG(STR_ERROR_CAN_T_RAISE_LAND_HERE), CcTerraform);
121  break;
123  DoCommandP(end_tile, start_tile, LM_LOWER << 1 | (_ctrl_pressed ? 1 : 0), CMD_LEVEL_LAND | CMD_MSG(STR_ERROR_CAN_T_LOWER_LAND_HERE), CcTerraform);
124  break;
125  case DDSP_LEVEL_AREA:
126  DoCommandP(end_tile, start_tile, LM_LEVEL << 1 | (_ctrl_pressed ? 1 : 0), CMD_LEVEL_LAND | CMD_MSG(STR_ERROR_CAN_T_LEVEL_LAND_HERE), CcTerraform);
127  break;
128  case DDSP_CREATE_ROCKS:
129  GenerateRockyArea(end_tile, start_tile);
130  break;
131  case DDSP_CREATE_DESERT:
132  GenerateDesertArea(end_tile, start_tile);
133  break;
134  default:
135  return false;
136  }
137 
138  return true;
139 }
140 
146 {
148 }
149 
153 
155  {
156  /* This is needed as we like to have the tree available on OnInit. */
157  this->CreateNestedTree();
158  this->FinishInitNested(window_number);
160  }
161 
163  {
164  }
165 
166  virtual void OnInit()
167  {
168  /* Don't show the place object button when there are no objects to place. */
169  NWidgetStacked *show_object = this->GetWidget<NWidgetStacked>(WID_TT_SHOW_PLACE_OBJECT);
170  show_object->SetDisplayedPlane(ObjectClass::GetUIClassCount() != 0 ? 0 : SZSP_NONE);
171  }
172 
173  virtual void OnClick(Point pt, int widget, int click_count)
174  {
175  if (widget < WID_TT_BUTTONS_START) return;
176 
177  switch (widget) {
178  case WID_TT_LOWER_LAND: // Lower land button
180  this->last_user_action = widget;
181  break;
182 
183  case WID_TT_RAISE_LAND: // Raise land button
185  this->last_user_action = widget;
186  break;
187 
188  case WID_TT_LEVEL_LAND: // Level land button
189  HandlePlacePushButton(this, WID_TT_LEVEL_LAND, SPR_CURSOR_LEVEL_LAND, HT_POINT | HT_DIAGONAL);
190  this->last_user_action = widget;
191  break;
192 
193  case WID_TT_DEMOLISH: // Demolish aka dynamite button
195  this->last_user_action = widget;
196  break;
197 
198  case WID_TT_BUY_LAND: // Buy land button
199  HandlePlacePushButton(this, WID_TT_BUY_LAND, SPR_CURSOR_BUY_LAND, HT_RECT);
200  this->last_user_action = widget;
201  break;
202 
203  case WID_TT_PLANT_TREES: // Plant trees button
204  ShowBuildTreesToolbar();
205  break;
206 
207  case WID_TT_PLACE_SIGN: // Place sign button
208  HandlePlacePushButton(this, WID_TT_PLACE_SIGN, SPR_CURSOR_SIGN, HT_RECT);
209  this->last_user_action = widget;
210  break;
211 
212  case WID_TT_PLACE_OBJECT: // Place object button
213  /* Don't show the place object button when there are no objects to place. */
214  if (ObjectClass::GetUIClassCount() == 0) return;
215  if (HandlePlacePushButton(this, WID_TT_PLACE_OBJECT, SPR_CURSOR_TRANSMITTER, HT_RECT)) {
216  ShowBuildObjectPicker(this);
217  this->last_user_action = widget;
218  }
219  break;
220 
221  default: NOT_REACHED();
222  }
223  }
224 
225  virtual void OnPlaceObject(Point pt, TileIndex tile)
226  {
227  switch (this->last_user_action) {
228  case WID_TT_LOWER_LAND: // Lower land button
230  break;
231 
232  case WID_TT_RAISE_LAND: // Raise land button
234  break;
235 
236  case WID_TT_LEVEL_LAND: // Level land button
238  break;
239 
240  case WID_TT_DEMOLISH: // Demolish aka dynamite button
242  break;
243 
244  case WID_TT_BUY_LAND: // Buy land button
245  DoCommandP(tile, OBJECT_OWNED_LAND, 0, CMD_BUILD_OBJECT | CMD_MSG(STR_ERROR_CAN_T_PURCHASE_THIS_LAND), CcPlaySound1E);
246  break;
247 
248  case WID_TT_PLACE_SIGN: // Place sign button
249  PlaceProc_Sign(tile);
250  break;
251 
252  case WID_TT_PLACE_OBJECT: // Place object button
253  PlaceProc_Object(tile);
254  break;
255 
256  default: NOT_REACHED();
257  }
258  }
259 
260  virtual void OnPlaceDrag(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt)
261  {
262  VpSelectTilesWithMethod(pt.x, pt.y, select_method);
263  }
264 
265  virtual Point OnInitialPosition(int16 sm_width, int16 sm_height, int window_number)
266  {
267  Point pt = GetToolbarAlignedWindowPosition(sm_width);
268  pt.y += sm_height;
269  return pt;
270  }
271 
272  virtual void OnPlaceMouseUp(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt, TileIndex start_tile, TileIndex end_tile)
273  {
274  if (pt.x != -1) {
275  switch (select_proc) {
276  default: NOT_REACHED();
277  case DDSP_DEMOLISH_AREA:
280  case DDSP_LEVEL_AREA:
281  GUIPlaceProcDragXY(select_proc, start_tile, end_tile);
282  break;
283  }
284  }
285  }
286 
287  virtual void OnPlaceObjectAbort()
288  {
290  this->RaiseButtons();
291  }
292 
293  static HotkeyList hotkeys;
294 };
295 
302 {
303  if (_game_mode != GM_NORMAL) return ES_NOT_HANDLED;
304  Window *w = ShowTerraformToolbar(NULL);
305  if (w == NULL) return ES_NOT_HANDLED;
306  return w->OnHotkey(hotkey);
307 }
308 
309 static Hotkey terraform_hotkeys[] = {
310  Hotkey('Q' | WKC_GLOBAL_HOTKEY, "lower", WID_TT_LOWER_LAND),
311  Hotkey('W' | WKC_GLOBAL_HOTKEY, "raise", WID_TT_RAISE_LAND),
312  Hotkey('E' | WKC_GLOBAL_HOTKEY, "level", WID_TT_LEVEL_LAND),
313  Hotkey('D' | WKC_GLOBAL_HOTKEY, "dynamite", WID_TT_DEMOLISH),
314  Hotkey('U', "buyland", WID_TT_BUY_LAND),
315  Hotkey('I', "trees", WID_TT_PLANT_TREES),
316  Hotkey('O', "placesign", WID_TT_PLACE_SIGN),
317  Hotkey('P', "placeobject", WID_TT_PLACE_OBJECT),
318  HOTKEY_LIST_END
319 };
320 HotkeyList TerraformToolbarWindow::hotkeys("terraform", terraform_hotkeys, TerraformToolbarGlobalHotkeys);
321 
322 static const NWidgetPart _nested_terraform_widgets[] = {
324  NWidget(WWT_CLOSEBOX, COLOUR_DARK_GREEN),
325  NWidget(WWT_CAPTION, COLOUR_DARK_GREEN), SetDataTip(STR_LANDSCAPING_TOOLBAR, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
326  NWidget(WWT_STICKYBOX, COLOUR_DARK_GREEN),
327  EndContainer(),
329  NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, WID_TT_LOWER_LAND), SetMinimalSize(22, 22),
330  SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_DOWN, STR_LANDSCAPING_TOOLTIP_LOWER_A_CORNER_OF_LAND),
331  NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, WID_TT_RAISE_LAND), SetMinimalSize(22, 22),
332  SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_UP, STR_LANDSCAPING_TOOLTIP_RAISE_A_CORNER_OF_LAND),
333  NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, WID_TT_LEVEL_LAND), SetMinimalSize(22, 22),
334  SetFill(0, 1), SetDataTip(SPR_IMG_LEVEL_LAND, STR_LANDSCAPING_LEVEL_LAND_TOOLTIP),
335 
336  NWidget(WWT_PANEL, COLOUR_DARK_GREEN), SetMinimalSize(4, 22), EndContainer(),
337 
338  NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, WID_TT_DEMOLISH), SetMinimalSize(22, 22),
339  SetFill(0, 1), SetDataTip(SPR_IMG_DYNAMITE, STR_TOOLTIP_DEMOLISH_BUILDINGS_ETC),
340  NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, WID_TT_BUY_LAND), SetMinimalSize(22, 22),
341  SetFill(0, 1), SetDataTip(SPR_IMG_BUY_LAND, STR_LANDSCAPING_TOOLTIP_PURCHASE_LAND),
342  NWidget(WWT_PUSHIMGBTN, COLOUR_DARK_GREEN, WID_TT_PLANT_TREES), SetMinimalSize(22, 22),
343  SetFill(0, 1), SetDataTip(SPR_IMG_PLANTTREES, STR_SCENEDIT_TOOLBAR_PLANT_TREES),
344  NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, WID_TT_PLACE_SIGN), SetMinimalSize(22, 22),
345  SetFill(0, 1), SetDataTip(SPR_IMG_SIGN, STR_SCENEDIT_TOOLBAR_PLACE_SIGN),
347  NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, WID_TT_PLACE_OBJECT), SetMinimalSize(22, 22),
348  SetFill(0, 1), SetDataTip(SPR_IMG_TRANSMITTER, STR_SCENEDIT_TOOLBAR_PLACE_OBJECT),
349  EndContainer(),
350  EndContainer(),
351 };
352 
353 static WindowDesc _terraform_desc(
354  WDP_MANUAL, "toolbar_landscape", 0, 0,
357  _nested_terraform_widgets, lengthof(_nested_terraform_widgets),
358  &TerraformToolbarWindow::hotkeys
359 );
360 
367 {
368  if (!Company::IsValidID(_local_company)) return NULL;
369 
370  Window *w;
371  if (link == NULL) {
372  w = AllocateWindowDescFront<TerraformToolbarWindow>(&_terraform_desc, 0);
373  return w;
374  }
375 
376  /* Delete the terraform toolbar to place it again. */
378  w = AllocateWindowDescFront<TerraformToolbarWindow>(&_terraform_desc, 0);
379  /* Align the terraform toolbar under the main toolbar. */
380  w->top -= w->height;
381  w->SetDirty();
382  /* Put the linked toolbar to the left / right of it. */
383  link->left = w->left + (_current_text_dir == TD_RTL ? w->width : -link->width);
384  link->top = w->top;
385  link->SetDirty();
386 
387  return w;
388 }
389 
390 static byte _terraform_size = 1;
391 
401 static void CommonRaiseLowerBigLand(TileIndex tile, int mode)
402 {
403  if (_terraform_size == 1) {
404  StringID msg =
405  mode ? STR_ERROR_CAN_T_RAISE_LAND_HERE : STR_ERROR_CAN_T_LOWER_LAND_HERE;
406 
407  DoCommandP(tile, SLOPE_N, (uint32)mode, CMD_TERRAFORM_LAND | CMD_MSG(msg), CcTerraform);
408  } else {
409  assert(_terraform_size != 0);
410  TileArea ta(tile, _terraform_size, _terraform_size);
411  ta.ClampToMap();
412 
413  if (ta.w == 0 || ta.h == 0) return;
414 
415  if (_settings_client.sound.confirm) SndPlayTileFx(SND_1F_SPLAT_OTHER, tile);
416 
417  uint h;
418  if (mode != 0) {
419  /* Raise land */
420  h = MAX_TILE_HEIGHT;
421  TILE_AREA_LOOP(tile2, ta) {
422  h = min(h, TileHeight(tile2));
423  }
424  } else {
425  /* Lower land */
426  h = 0;
427  TILE_AREA_LOOP(tile2, ta) {
428  h = max(h, TileHeight(tile2));
429  }
430  }
431 
432  TILE_AREA_LOOP(tile2, ta) {
433  if (TileHeight(tile2) == h) {
434  DoCommandP(tile2, SLOPE_N, (uint32)mode, CMD_TERRAFORM_LAND);
435  }
436  }
437  }
438 }
439 
440 static const int8 _multi_terraform_coords[][2] = {
441  { 0, -2},
442  { 4, 0}, { -4, 0}, { 0, 2},
443  { -8, 2}, { -4, 4}, { 0, 6}, { 4, 4}, { 8, 2},
444  {-12, 0}, { -8, -2}, { -4, -4}, { 0, -6}, { 4, -4}, { 8, -2}, { 12, 0},
445  {-16, 2}, {-12, 4}, { -8, 6}, { -4, 8}, { 0, 10}, { 4, 8}, { 8, 6}, { 12, 4}, { 16, 2},
446  {-20, 0}, {-16, -2}, {-12, -4}, { -8, -6}, { -4, -8}, { 0,-10}, { 4, -8}, { 8, -6}, { 12, -4}, { 16, -2}, { 20, 0},
447  {-24, 2}, {-20, 4}, {-16, 6}, {-12, 8}, { -8, 10}, { -4, 12}, { 0, 14}, { 4, 12}, { 8, 10}, { 12, 8}, { 16, 6}, { 20, 4}, { 24, 2},
448  {-28, 0}, {-24, -2}, {-20, -4}, {-16, -6}, {-12, -8}, { -8,-10}, { -4,-12}, { 0,-14}, { 4,-12}, { 8,-10}, { 12, -8}, { 16, -6}, { 20, -4}, { 24, -2}, { 28, 0},
449 };
450 
451 static const NWidgetPart _nested_scen_edit_land_gen_widgets[] = {
453  NWidget(WWT_CLOSEBOX, COLOUR_DARK_GREEN),
454  NWidget(WWT_CAPTION, COLOUR_DARK_GREEN), SetDataTip(STR_TERRAFORM_TOOLBAR_LAND_GENERATION_CAPTION, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
455  NWidget(WWT_SHADEBOX, COLOUR_DARK_GREEN),
456  NWidget(WWT_STICKYBOX, COLOUR_DARK_GREEN),
457  EndContainer(),
458  NWidget(WWT_PANEL, COLOUR_DARK_GREEN),
459  NWidget(NWID_HORIZONTAL), SetPadding(2, 2, 7, 2),
460  NWidget(NWID_SPACER), SetFill(1, 0),
461  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_DEMOLISH), SetMinimalSize(22, 22),
462  SetFill(0, 1), SetDataTip(SPR_IMG_DYNAMITE, STR_TOOLTIP_DEMOLISH_BUILDINGS_ETC),
463  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_LOWER_LAND), SetMinimalSize(22, 22),
464  SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_DOWN, STR_LANDSCAPING_TOOLTIP_LOWER_A_CORNER_OF_LAND),
465  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_RAISE_LAND), SetMinimalSize(22, 22),
466  SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_UP, STR_LANDSCAPING_TOOLTIP_RAISE_A_CORNER_OF_LAND),
467  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_LEVEL_LAND), SetMinimalSize(22, 22),
468  SetFill(0, 1), SetDataTip(SPR_IMG_LEVEL_LAND, STR_LANDSCAPING_LEVEL_LAND_TOOLTIP),
469  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_PLACE_ROCKS), SetMinimalSize(22, 22),
470  SetFill(0, 1), SetDataTip(SPR_IMG_ROCKS, STR_TERRAFORM_TOOLTIP_PLACE_ROCKY_AREAS_ON_LANDSCAPE),
472  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_PLACE_DESERT), SetMinimalSize(22, 22),
473  SetFill(0, 1), SetDataTip(SPR_IMG_DESERT, STR_TERRAFORM_TOOLTIP_DEFINE_DESERT_AREA),
474  EndContainer(),
475  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_PLACE_OBJECT), SetMinimalSize(23, 22),
476  SetFill(0, 1), SetDataTip(SPR_IMG_TRANSMITTER, STR_SCENEDIT_TOOLBAR_PLACE_OBJECT),
477  NWidget(NWID_SPACER), SetFill(1, 0),
478  EndContainer(),
480  NWidget(NWID_SPACER), SetFill(1, 0),
481  NWidget(WWT_EMPTY, COLOUR_DARK_GREEN, WID_ETT_DOTS), SetMinimalSize(59, 31), SetDataTip(STR_EMPTY, STR_NULL),
482  NWidget(NWID_SPACER), SetFill(1, 0),
484  NWidget(NWID_SPACER), SetFill(0, 1),
485  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_INCREASE_SIZE), SetMinimalSize(12, 12), SetDataTip(SPR_ARROW_UP, STR_TERRAFORM_TOOLTIP_INCREASE_SIZE_OF_LAND_AREA),
487  NWidget(WWT_IMGBTN, COLOUR_GREY, WID_ETT_DECREASE_SIZE), SetMinimalSize(12, 12), SetDataTip(SPR_ARROW_DOWN, STR_TERRAFORM_TOOLTIP_DECREASE_SIZE_OF_LAND_AREA),
488  NWidget(NWID_SPACER), SetFill(0, 1),
489  EndContainer(),
491  EndContainer(),
493  NWidget(WWT_TEXTBTN, COLOUR_GREY, WID_ETT_NEW_SCENARIO), SetMinimalSize(160, 12),
494  SetFill(1, 0), SetDataTip(STR_TERRAFORM_SE_NEW_WORLD, STR_TERRAFORM_TOOLTIP_GENERATE_RANDOM_LAND), SetPadding(0, 2, 0, 2),
496  SetFill(1, 0), SetDataTip(STR_TERRAFORM_RESET_LANDSCAPE, STR_TERRAFORM_RESET_LANDSCAPE_TOOLTIP), SetPadding(1, 2, 2, 2),
497  EndContainer(),
498 };
499 
505 static void ResetLandscapeConfirmationCallback(Window *w, bool confirmed)
506 {
507  if (confirmed) {
508  /* Set generating_world to true to get instant-green grass after removing
509  * company property. */
510  _generating_world = true;
511 
512  /* Delete all companies */
513  Company *c;
514  FOR_ALL_COMPANIES(c) {
516  delete c;
517  }
518 
519  _generating_world = false;
520 
521  /* Delete all station signs */
522  BaseStation *st;
523  FOR_ALL_BASE_STATIONS(st) {
524  /* There can be buoys, remove them */
526  if (!st->IsInUse()) delete st;
527  }
528 
529  /* Now that all vehicles are gone, we can reset the engine pool. Maybe it reduces some NewGRF changing-mess */
531 
533  }
534 }
535 
539 
541  {
542  this->CreateNestedTree();
543  NWidgetStacked *show_desert = this->GetWidget<NWidgetStacked>(WID_ETT_SHOW_PLACE_DESERT);
544  show_desert->SetDisplayedPlane(_settings_game.game_creation.landscape == LT_TROPIC ? 0 : SZSP_NONE);
545  this->FinishInitNested(window_number);
547  }
548 
549  virtual void OnPaint()
550  {
551  this->DrawWidgets();
552 
553  if (this->IsWidgetLowered(WID_ETT_LOWER_LAND) || this->IsWidgetLowered(WID_ETT_RAISE_LAND)) { // change area-size if raise/lower corner is selected
554  SetTileSelectSize(_terraform_size, _terraform_size);
555  }
556  }
557 
558  virtual void UpdateWidgetSize(int widget, Dimension *size, const Dimension &padding, Dimension *fill, Dimension *resize)
559  {
560  if (widget != WID_ETT_DOTS) return;
561 
562  size->width = max<uint>(size->width, ScaleGUITrad(59));
563  size->height = max<uint>(size->height, ScaleGUITrad(31));
564  }
565 
566  virtual void DrawWidget(const Rect &r, int widget) const
567  {
568  if (widget != WID_ETT_DOTS) return;
569 
570  int center_x = RoundDivSU(r.left + r.right, 2);
571  int center_y = RoundDivSU(r.top + r.bottom, 2);
572 
573  int n = _terraform_size * _terraform_size;
574  const int8 *coords = &_multi_terraform_coords[0][0];
575 
576  assert(n != 0);
577  do {
578  DrawSprite(SPR_WHITE_POINT, PAL_NONE, center_x + ScaleGUITrad(coords[0]), center_y + ScaleGUITrad(coords[1]));
579  coords += 2;
580  } while (--n);
581  }
582 
583  virtual void OnClick(Point pt, int widget, int click_count)
584  {
585  if (widget < WID_ETT_BUTTONS_START) return;
586 
587  switch (widget) {
588  case WID_ETT_DEMOLISH: // Demolish aka dynamite button
590  this->last_user_action = widget;
591  break;
592 
593  case WID_ETT_LOWER_LAND: // Lower land button
595  this->last_user_action = widget;
596  break;
597 
598  case WID_ETT_RAISE_LAND: // Raise land button
600  this->last_user_action = widget;
601  break;
602 
603  case WID_ETT_LEVEL_LAND: // Level land button
604  HandlePlacePushButton(this, WID_ETT_LEVEL_LAND, SPR_CURSOR_LEVEL_LAND, HT_POINT | HT_DIAGONAL);
605  this->last_user_action = widget;
606  break;
607 
608  case WID_ETT_PLACE_ROCKS: // Place rocks button
609  HandlePlacePushButton(this, WID_ETT_PLACE_ROCKS, SPR_CURSOR_ROCKY_AREA, HT_RECT);
610  this->last_user_action = widget;
611  break;
612 
613  case WID_ETT_PLACE_DESERT: // Place desert button (in tropical climate)
614  HandlePlacePushButton(this, WID_ETT_PLACE_DESERT, SPR_CURSOR_DESERT, HT_RECT);
615  this->last_user_action = widget;
616  break;
617 
618  case WID_ETT_PLACE_OBJECT: // Place transmitter button
619  if (HandlePlacePushButton(this, WID_ETT_PLACE_OBJECT, SPR_CURSOR_TRANSMITTER, HT_RECT)) {
620  ShowBuildObjectPicker(this);
621  this->last_user_action = widget;
622  }
623  break;
624 
626  case WID_ETT_DECREASE_SIZE: { // Increase/Decrease terraform size
627  int size = (widget == WID_ETT_INCREASE_SIZE) ? 1 : -1;
628  this->HandleButtonClick(widget);
629  size += _terraform_size;
630 
631  if (!IsInsideMM(size, 1, 8 + 1)) return;
632  _terraform_size = size;
633 
634  if (_settings_client.sound.click_beep) SndPlayFx(SND_15_BEEP);
635  this->SetDirty();
636  break;
637  }
638 
639  case WID_ETT_NEW_SCENARIO: // gen random land
640  this->HandleButtonClick(widget);
642  break;
643 
644  case WID_ETT_RESET_LANDSCAPE: // Reset landscape
645  ShowQuery(STR_QUERY_RESET_LANDSCAPE_CAPTION, STR_RESET_LANDSCAPE_CONFIRMATION_TEXT, NULL, ResetLandscapeConfirmationCallback);
646  break;
647 
648  default: NOT_REACHED();
649  }
650  }
651 
652  virtual void OnTimeout()
653  {
654  for (uint i = WID_ETT_START; i < this->nested_array_size; i++) {
655  if (i == WID_ETT_BUTTONS_START) i = WID_ETT_BUTTONS_END; // skip the buttons
656  if (this->IsWidgetLowered(i)) {
657  this->RaiseWidget(i);
658  this->SetWidgetDirty(i);
659  }
660  }
661  }
662 
663  virtual void OnPlaceObject(Point pt, TileIndex tile)
664  {
665  switch (this->last_user_action) {
666  case WID_ETT_DEMOLISH: // Demolish aka dynamite button
668  break;
669 
670  case WID_ETT_LOWER_LAND: // Lower land button
671  CommonRaiseLowerBigLand(tile, 0);
672  break;
673 
674  case WID_ETT_RAISE_LAND: // Raise land button
675  CommonRaiseLowerBigLand(tile, 1);
676  break;
677 
678  case WID_ETT_LEVEL_LAND: // Level land button
680  break;
681 
682  case WID_ETT_PLACE_ROCKS: // Place rocks button
684  break;
685 
686  case WID_ETT_PLACE_DESERT: // Place desert button (in tropical climate)
688  break;
689 
690  case WID_ETT_PLACE_OBJECT: // Place transmitter button
691  PlaceProc_Object(tile);
692  break;
693 
694  default: NOT_REACHED();
695  }
696  }
697 
698  virtual void OnPlaceDrag(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt)
699  {
700  VpSelectTilesWithMethod(pt.x, pt.y, select_method);
701  }
702 
703  virtual void OnPlaceMouseUp(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt, TileIndex start_tile, TileIndex end_tile)
704  {
705  if (pt.x != -1) {
706  switch (select_proc) {
707  default: NOT_REACHED();
708  case DDSP_CREATE_ROCKS:
709  case DDSP_CREATE_DESERT:
712  case DDSP_LEVEL_AREA:
713  case DDSP_DEMOLISH_AREA:
714  GUIPlaceProcDragXY(select_proc, start_tile, end_tile);
715  break;
716  }
717  }
718  }
719 
720  virtual void OnPlaceObjectAbort()
721  {
722  this->RaiseButtons();
723  this->SetDirty();
725  }
726 
727  static HotkeyList hotkeys;
728 };
729 
736 {
737  if (_game_mode != GM_EDITOR) return ES_NOT_HANDLED;
739  if (w == NULL) return ES_NOT_HANDLED;
740  return w->OnHotkey(hotkey);
741 }
742 
743 static Hotkey terraform_editor_hotkeys[] = {
744  Hotkey('D' | WKC_GLOBAL_HOTKEY, "dynamite", WID_ETT_DEMOLISH),
748  Hotkey('R', "rocky", WID_ETT_PLACE_ROCKS),
749  Hotkey('T', "desert", WID_ETT_PLACE_DESERT),
750  Hotkey('O', "object", WID_ETT_PLACE_OBJECT),
751  HOTKEY_LIST_END
752 };
753 
754 HotkeyList ScenarioEditorLandscapeGenerationWindow::hotkeys("terraform_editor", terraform_editor_hotkeys, TerraformToolbarEditorGlobalHotkeys);
755 
756 static WindowDesc _scen_edit_land_gen_desc(
757  WDP_AUTO, "toolbar_landscape_scen", 0, 0,
760  _nested_scen_edit_land_gen_widgets, lengthof(_nested_scen_edit_land_gen_widgets),
761  &ScenarioEditorLandscapeGenerationWindow::hotkeys
762 );
763 
769 {
770  return AllocateWindowDescFront<ScenarioEditorLandscapeGenerationWindow>(&_scen_edit_land_gen_desc, 0);
771 }