00001
00002
00003
00004
00005
00006
00007
00008
00009
00012 #include "stdafx.h"
00013 #include "clear_map.h"
00014 #include "company_func.h"
00015 #include "company_base.h"
00016 #include "gui.h"
00017 #include "window_gui.h"
00018 #include "window_func.h"
00019 #include "viewport_func.h"
00020 #include "command_func.h"
00021 #include "signs_func.h"
00022 #include "functions.h"
00023 #include "sound_func.h"
00024 #include "base_station_base.h"
00025 #include "textbuf_gui.h"
00026 #include "genworld.h"
00027 #include "tree_map.h"
00028 #include "landscape_type.h"
00029 #include "tilehighlight_func.h"
00030 #include "strings_func.h"
00031 #include "newgrf_object.h"
00032 #include "object.h"
00033 #include "hotkeys.h"
00034
00035 #include "table/strings.h"
00036
00037 void CcTerraform(const CommandCost &result, TileIndex tile, uint32 p1, uint32 p2)
00038 {
00039 if (result.Succeeded()) {
00040 SndPlayTileFx(SND_1F_SPLAT, tile);
00041 } else {
00042 extern TileIndex _terraform_err_tile;
00043 SetRedErrorSquare(_terraform_err_tile);
00044 }
00045 }
00046
00047
00049 static void GenerateDesertArea(TileIndex end, TileIndex start)
00050 {
00051 if (_game_mode != GM_EDITOR) return;
00052
00053 _generating_world = true;
00054
00055 TileArea ta(start, end);
00056 TILE_AREA_LOOP(tile, ta) {
00057 SetTropicZone(tile, (_ctrl_pressed) ? TROPICZONE_NORMAL : TROPICZONE_DESERT);
00058 DoCommandP(tile, 0, 0, CMD_LANDSCAPE_CLEAR);
00059 MarkTileDirtyByTile(tile);
00060 }
00061 _generating_world = false;
00062 }
00063
00065 static void GenerateRockyArea(TileIndex end, TileIndex start)
00066 {
00067 if (_game_mode != GM_EDITOR) return;
00068
00069 bool success = false;
00070 TileArea ta(start, end);
00071
00072 TILE_AREA_LOOP(tile, ta) {
00073 switch (GetTileType(tile)) {
00074 case MP_TREES:
00075 if (GetTreeGround(tile) == TREE_GROUND_SHORE) continue;
00076
00077 case MP_CLEAR:
00078 MakeClear(tile, CLEAR_ROCKS, 3);
00079 break;
00080
00081 default: continue;
00082 }
00083 MarkTileDirtyByTile(tile);
00084 success = true;
00085 }
00086
00087 if (success) SndPlayTileFx(SND_1F_SPLAT, end);
00088 }
00089
00099 bool GUIPlaceProcDragXY(ViewportDragDropSelectionProcess proc, TileIndex start_tile, TileIndex end_tile)
00100 {
00101 if (!_settings_game.construction.freeform_edges) {
00102
00103
00104 if (TileX(end_tile) == MapMaxX()) end_tile += TileDiffXY(-1, 0);
00105 if (TileY(end_tile) == MapMaxY()) end_tile += TileDiffXY(0, -1);
00106 }
00107
00108 switch (proc) {
00109 case DDSP_DEMOLISH_AREA:
00110 DoCommandP(end_tile, start_tile, _ctrl_pressed ? 1 : 0, CMD_CLEAR_AREA | CMD_MSG(STR_ERROR_CAN_T_CLEAR_THIS_AREA), CcPlaySound10);
00111 break;
00112 case DDSP_RAISE_AND_LEVEL_AREA:
00113 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);
00114 break;
00115 case DDSP_LOWER_AND_LEVEL_AREA:
00116 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);
00117 break;
00118 case DDSP_LEVEL_AREA:
00119 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);
00120 break;
00121 case DDSP_CREATE_ROCKS:
00122 GenerateRockyArea(end_tile, start_tile);
00123 break;
00124 case DDSP_CREATE_DESERT:
00125 GenerateDesertArea(end_tile, start_tile);
00126 break;
00127 default:
00128 return false;
00129 }
00130
00131 return true;
00132 }
00133
00134 typedef void OnButtonClick(Window *w);
00135
00136 static void PlaceProc_BuyLand(TileIndex tile)
00137 {
00138 DoCommandP(tile, OBJECT_OWNED_LAND, 0, CMD_BUILD_OBJECT | CMD_MSG(STR_ERROR_CAN_T_PURCHASE_THIS_LAND), CcPlaySound1E);
00139 }
00140
00141 void PlaceProc_DemolishArea(TileIndex tile)
00142 {
00143 VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_DEMOLISH_AREA);
00144 }
00145
00146 static void PlaceProc_RaiseLand(TileIndex tile)
00147 {
00148 VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_RAISE_AND_LEVEL_AREA);
00149 }
00150
00151 static void PlaceProc_LowerLand(TileIndex tile)
00152 {
00153 VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LOWER_AND_LEVEL_AREA);
00154 }
00155
00156 static void PlaceProc_LevelLand(TileIndex tile)
00157 {
00158 VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LEVEL_AREA);
00159 }
00160
00162 enum TerraformToolbarWidgets {
00163 TTW_SHOW_PLACE_OBJECT,
00164 TTW_BUTTONS_START,
00165 TTW_LOWER_LAND = TTW_BUTTONS_START,
00166 TTW_RAISE_LAND,
00167 TTW_LEVEL_LAND,
00168 TTW_DEMOLISH,
00169 TTW_BUY_LAND,
00170 TTW_PLANT_TREES,
00171 TTW_PLACE_SIGN,
00172 TTW_PLACE_OBJECT,
00173 };
00174
00175 static void TerraformClick_Lower(Window *w)
00176 {
00177 HandlePlacePushButton(w, TTW_LOWER_LAND, ANIMCURSOR_LOWERLAND, HT_POINT | HT_DIAGONAL, PlaceProc_LowerLand);
00178 }
00179
00180 static void TerraformClick_Raise(Window *w)
00181 {
00182 HandlePlacePushButton(w, TTW_RAISE_LAND, ANIMCURSOR_RAISELAND, HT_POINT | HT_DIAGONAL, PlaceProc_RaiseLand);
00183 }
00184
00185 static void TerraformClick_Level(Window *w)
00186 {
00187 HandlePlacePushButton(w, TTW_LEVEL_LAND, SPR_CURSOR_LEVEL_LAND, HT_POINT | HT_DIAGONAL, PlaceProc_LevelLand);
00188 }
00189
00190 static void TerraformClick_Dynamite(Window *w)
00191 {
00192 HandlePlacePushButton(w, TTW_DEMOLISH, ANIMCURSOR_DEMOLISH, HT_RECT | HT_DIAGONAL, PlaceProc_DemolishArea);
00193 }
00194
00195 static void TerraformClick_BuyLand(Window *w)
00196 {
00197 HandlePlacePushButton(w, TTW_BUY_LAND, SPR_CURSOR_BUY_LAND, HT_RECT, PlaceProc_BuyLand);
00198 }
00199
00200 static void TerraformClick_Trees(Window *w)
00201 {
00202
00203 w->HandleButtonClick(TTW_PLANT_TREES);
00204 ShowBuildTreesToolbar();
00205 }
00206
00207 static void TerraformClick_PlaceSign(Window *w)
00208 {
00209 HandlePlacePushButton(w, TTW_PLACE_SIGN, SPR_CURSOR_SIGN, HT_RECT, PlaceProc_Sign);
00210 }
00211
00212 static void TerraformClick_PlaceObject(Window *w)
00213 {
00214
00215 if (ObjectClass::GetCount() == 0) return;
00216 if (HandlePlacePushButton(w, TTW_PLACE_OBJECT, SPR_CURSOR_TRANSMITTER, HT_RECT, PlaceProc_Object)) ShowBuildObjectPicker(w);
00217 }
00218
00219 static OnButtonClick * const _terraform_button_proc[] = {
00220 TerraformClick_Lower,
00221 TerraformClick_Raise,
00222 TerraformClick_Level,
00223 TerraformClick_Dynamite,
00224 TerraformClick_BuyLand,
00225 TerraformClick_Trees,
00226 TerraformClick_PlaceSign,
00227 TerraformClick_PlaceObject,
00228 };
00229
00230 struct TerraformToolbarWindow : Window {
00231 TerraformToolbarWindow(const WindowDesc *desc, WindowNumber window_number) : Window()
00232 {
00233
00234 this->CreateNestedTree(desc);
00235 this->FinishInitNested(desc, window_number);
00236 }
00237
00238 ~TerraformToolbarWindow()
00239 {
00240 }
00241
00242 virtual void OnInit()
00243 {
00244
00245 NWidgetStacked *show_object = this->GetWidget<NWidgetStacked>(TTW_SHOW_PLACE_OBJECT);
00246 show_object->SetDisplayedPlane(ObjectClass::GetCount() != 0 ? 0 : SZSP_NONE);
00247 }
00248
00249 virtual void OnClick(Point pt, int widget, int click_count)
00250 {
00251 if (widget >= TTW_BUTTONS_START) _terraform_button_proc[widget - TTW_BUTTONS_START](this);
00252 }
00253
00254 virtual void OnTimeout()
00255 {
00256 this->RaiseWidget(TTW_PLANT_TREES);
00257 this->SetWidgetDirty(TTW_PLANT_TREES);
00258 }
00259
00260 virtual EventState OnKeyPress(uint16 key, uint16 keycode)
00261 {
00262 int num = CheckHotkeyMatch(terraform_hotkeys, keycode, this);
00263 if (num == -1) return ES_NOT_HANDLED;
00264 this->OnClick(Point(), num, 1);
00265 return ES_HANDLED;
00266 }
00267
00268 virtual void OnPlaceObject(Point pt, TileIndex tile)
00269 {
00270 _place_proc(tile);
00271 }
00272
00273 virtual void OnPlaceDrag(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt)
00274 {
00275 VpSelectTilesWithMethod(pt.x, pt.y, select_method);
00276 }
00277
00278 virtual Point OnInitialPosition(const WindowDesc *desc, int16 sm_width, int16 sm_height, int window_number)
00279 {
00280 Point pt = GetToolbarAlignedWindowPosition(sm_width);
00281 pt.y += sm_height;
00282 return pt;
00283 }
00284
00285 virtual void OnPlaceMouseUp(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt, TileIndex start_tile, TileIndex end_tile)
00286 {
00287 if (pt.x != -1) {
00288 switch (select_proc) {
00289 default: NOT_REACHED();
00290 case DDSP_DEMOLISH_AREA:
00291 case DDSP_RAISE_AND_LEVEL_AREA:
00292 case DDSP_LOWER_AND_LEVEL_AREA:
00293 case DDSP_LEVEL_AREA:
00294 GUIPlaceProcDragXY(select_proc, start_tile, end_tile);
00295 break;
00296 }
00297 }
00298 }
00299
00300 virtual void OnPlaceObjectAbort()
00301 {
00302 DeleteWindowById(WC_BUILD_OBJECT, 0);
00303 this->RaiseButtons();
00304 }
00305
00306 static Hotkey<TerraformToolbarWindow> terraform_hotkeys[];
00307 };
00308
00309 Hotkey<TerraformToolbarWindow> TerraformToolbarWindow::terraform_hotkeys[] = {
00310 Hotkey<TerraformToolbarWindow>('Q' | WKC_GLOBAL_HOTKEY, "lower", TTW_LOWER_LAND),
00311 Hotkey<TerraformToolbarWindow>('W' | WKC_GLOBAL_HOTKEY, "raise", TTW_RAISE_LAND),
00312 Hotkey<TerraformToolbarWindow>('E' | WKC_GLOBAL_HOTKEY, "level", TTW_LEVEL_LAND),
00313 Hotkey<TerraformToolbarWindow>('D' | WKC_GLOBAL_HOTKEY, "dynamite", TTW_DEMOLISH),
00314 Hotkey<TerraformToolbarWindow>('U', "buyland", TTW_BUY_LAND),
00315 Hotkey<TerraformToolbarWindow>('I', "trees", TTW_PLANT_TREES),
00316 Hotkey<TerraformToolbarWindow>('O', "placesign", TTW_PLACE_SIGN),
00317 Hotkey<TerraformToolbarWindow>('P', "placeobject", TTW_PLACE_OBJECT),
00318 HOTKEY_LIST_END(TerraformToolbarWindow)
00319 };
00320 Hotkey<TerraformToolbarWindow> *_terraform_hotkeys = TerraformToolbarWindow::terraform_hotkeys;
00321
00322 static const NWidgetPart _nested_terraform_widgets[] = {
00323 NWidget(NWID_HORIZONTAL),
00324 NWidget(WWT_CLOSEBOX, COLOUR_DARK_GREEN),
00325 NWidget(WWT_CAPTION, COLOUR_DARK_GREEN), SetDataTip(STR_LANDSCAPING_TOOLBAR, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
00326 NWidget(WWT_STICKYBOX, COLOUR_DARK_GREEN),
00327 EndContainer(),
00328 NWidget(NWID_HORIZONTAL),
00329 NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_LOWER_LAND), SetMinimalSize(22, 22),
00330 SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_DOWN, STR_LANDSCAPING_TOOLTIP_LOWER_A_CORNER_OF_LAND),
00331 NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_RAISE_LAND), SetMinimalSize(22, 22),
00332 SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_UP, STR_LANDSCAPING_TOOLTIP_RAISE_A_CORNER_OF_LAND),
00333 NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_LEVEL_LAND), SetMinimalSize(22, 22),
00334 SetFill(0, 1), SetDataTip(SPR_IMG_LEVEL_LAND, STR_LANDSCAPING_LEVEL_LAND_TOOLTIP),
00335
00336 NWidget(WWT_PANEL, COLOUR_DARK_GREEN), SetMinimalSize(4, 22), EndContainer(),
00337
00338 NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_DEMOLISH), SetMinimalSize(22, 22),
00339 SetFill(0, 1), SetDataTip(SPR_IMG_DYNAMITE, STR_TOOLTIP_DEMOLISH_BUILDINGS_ETC),
00340 NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_BUY_LAND), SetMinimalSize(22, 22),
00341 SetFill(0, 1), SetDataTip(SPR_IMG_BUY_LAND, STR_LANDSCAPING_TOOLTIP_PURCHASE_LAND),
00342 NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_PLANT_TREES), SetMinimalSize(22, 22),
00343 SetFill(0, 1), SetDataTip(SPR_IMG_PLANTTREES, STR_SCENEDIT_TOOLBAR_PLANT_TREES),
00344 NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_PLACE_SIGN), SetMinimalSize(22, 22),
00345 SetFill(0, 1), SetDataTip(SPR_IMG_SIGN, STR_SCENEDIT_TOOLBAR_PLACE_SIGN),
00346 NWidget(NWID_SELECTION, INVALID_COLOUR, TTW_SHOW_PLACE_OBJECT),
00347 NWidget(WWT_IMGBTN, COLOUR_DARK_GREEN, TTW_PLACE_OBJECT), SetMinimalSize(22, 22),
00348 SetFill(0, 1), SetDataTip(SPR_IMG_TRANSMITTER, STR_SCENEDIT_TOOLBAR_PLACE_OBJECT),
00349 EndContainer(),
00350 EndContainer(),
00351 };
00352
00353 static const WindowDesc _terraform_desc(
00354 WDP_MANUAL, 0, 0,
00355 WC_SCEN_LAND_GEN, WC_NONE,
00356 WDF_CONSTRUCTION,
00357 _nested_terraform_widgets, lengthof(_nested_terraform_widgets)
00358 );
00359
00360 Window *ShowTerraformToolbar(Window *link)
00361 {
00362 if (!Company::IsValidID(_local_company)) return NULL;
00363
00364 Window *w;
00365 if (link == NULL) {
00366 w = AllocateWindowDescFront<TerraformToolbarWindow>(&_terraform_desc, 0);
00367 return w;
00368 }
00369
00370
00371 DeleteWindowById(WC_SCEN_LAND_GEN, 0, true);
00372 w = AllocateWindowDescFront<TerraformToolbarWindow>(&_terraform_desc, 0);
00373
00374 w->top -= w->height;
00375 w->SetDirty();
00376
00377 link->left = w->left + (_current_text_dir == TD_RTL ? w->width : -link->width);
00378 link->top = w->top;
00379 link->SetDirty();
00380
00381 return w;
00382 }
00383
00384 EventState TerraformToolbarGlobalHotkeys(uint16 key, uint16 keycode)
00385 {
00386 int num = CheckHotkeyMatch<TerraformToolbarWindow>(_terraform_hotkeys, keycode, NULL, true);
00387 if (num == -1) return ES_NOT_HANDLED;
00388 Window *w = ShowTerraformToolbar(NULL);
00389 if (w == NULL) return ES_NOT_HANDLED;
00390 return w->OnKeyPress(key, keycode);
00391 }
00392
00393 static byte _terraform_size = 1;
00394
00404 static void CommonRaiseLowerBigLand(TileIndex tile, int mode)
00405 {
00406 if (_terraform_size == 1) {
00407 StringID msg =
00408 mode ? STR_ERROR_CAN_T_RAISE_LAND_HERE : STR_ERROR_CAN_T_LOWER_LAND_HERE;
00409
00410 DoCommandP(tile, SLOPE_N, (uint32)mode, CMD_TERRAFORM_LAND | CMD_MSG(msg), CcTerraform);
00411 } else {
00412 assert(_terraform_size != 0);
00413 TileArea ta(tile, _terraform_size, _terraform_size);
00414 ta.ClampToMap();
00415
00416 if (ta.w == 0 || ta.h == 0) return;
00417
00418 SndPlayTileFx(SND_1F_SPLAT, tile);
00419
00420 uint h;
00421 if (mode != 0) {
00422
00423 h = MAX_TILE_HEIGHT;
00424 TILE_AREA_LOOP(tile2, ta) {
00425 h = min(h, TileHeight(tile2));
00426 }
00427 } else {
00428
00429 h = 0;
00430 TILE_AREA_LOOP(tile2, ta) {
00431 h = max(h, TileHeight(tile2));
00432 }
00433 }
00434
00435 TILE_AREA_LOOP(tile2, ta) {
00436 if (TileHeight(tile2) == h) {
00437 DoCommandP(tile2, SLOPE_N, (uint32)mode, CMD_TERRAFORM_LAND);
00438 }
00439 }
00440 }
00441 }
00442
00443 static void PlaceProc_RaiseBigLand(TileIndex tile)
00444 {
00445 CommonRaiseLowerBigLand(tile, 1);
00446 }
00447
00448 static void PlaceProc_LowerBigLand(TileIndex tile)
00449 {
00450 CommonRaiseLowerBigLand(tile, 0);
00451 }
00452
00453 static void PlaceProc_RockyArea(TileIndex tile)
00454 {
00455 VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_ROCKS);
00456 }
00457
00458 static void PlaceProc_DesertArea(TileIndex tile)
00459 {
00460 VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_DESERT);
00461 }
00462
00463 static const int8 _multi_terraform_coords[][2] = {
00464 { 0, -2},
00465 { 4, 0}, { -4, 0}, { 0, 2},
00466 { -8, 2}, { -4, 4}, { 0, 6}, { 4, 4}, { 8, 2},
00467 {-12, 0}, { -8, -2}, { -4, -4}, { 0, -6}, { 4, -4}, { 8, -2}, { 12, 0},
00468 {-16, 2}, {-12, 4}, { -8, 6}, { -4, 8}, { 0, 10}, { 4, 8}, { 8, 6}, { 12, 4}, { 16, 2},
00469 {-20, 0}, {-16, -2}, {-12, -4}, { -8, -6}, { -4, -8}, { 0,-10}, { 4, -8}, { 8, -6}, { 12, -4}, { 16, -2}, { 20, 0},
00470 {-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},
00471 {-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},
00472 };
00473
00475 enum EditorTerraformToolbarWidgets {
00476 ETTW_SHOW_PLACE_DESERT,
00477 ETTW_START,
00478 ETTW_DOTS = ETTW_START,
00479 ETTW_BUTTONS_START,
00480 ETTW_DEMOLISH = ETTW_BUTTONS_START,
00481 ETTW_LOWER_LAND,
00482 ETTW_RAISE_LAND,
00483 ETTW_LEVEL_LAND,
00484 ETTW_PLACE_ROCKS,
00485 ETTW_PLACE_DESERT,
00486 ETTW_PLACE_OBJECT,
00487 ETTW_BUTTONS_END,
00488 ETTW_INCREASE_SIZE = ETTW_BUTTONS_END,
00489 ETTW_DECREASE_SIZE,
00490 ETTW_NEW_SCENARIO,
00491 ETTW_RESET_LANDSCAPE,
00492 };
00493
00494 static const NWidgetPart _nested_scen_edit_land_gen_widgets[] = {
00495 NWidget(NWID_HORIZONTAL),
00496 NWidget(WWT_CLOSEBOX, COLOUR_DARK_GREEN),
00497 NWidget(WWT_CAPTION, COLOUR_DARK_GREEN), SetDataTip(STR_TERRAFORM_TOOLBAR_LAND_GENERATION_CAPTION, STR_TOOLTIP_WINDOW_TITLE_DRAG_THIS),
00498 NWidget(WWT_SHADEBOX, COLOUR_DARK_GREEN),
00499 NWidget(WWT_STICKYBOX, COLOUR_DARK_GREEN),
00500 EndContainer(),
00501 NWidget(WWT_PANEL, COLOUR_DARK_GREEN),
00502 NWidget(NWID_HORIZONTAL), SetPadding(2, 2, 7, 2),
00503 NWidget(NWID_SPACER), SetFill(1, 0),
00504 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_DEMOLISH), SetMinimalSize(22, 22),
00505 SetFill(0, 1), SetDataTip(SPR_IMG_DYNAMITE, STR_TOOLTIP_DEMOLISH_BUILDINGS_ETC),
00506 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_LOWER_LAND), SetMinimalSize(22, 22),
00507 SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_DOWN, STR_LANDSCAPING_TOOLTIP_LOWER_A_CORNER_OF_LAND),
00508 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_RAISE_LAND), SetMinimalSize(22, 22),
00509 SetFill(0, 1), SetDataTip(SPR_IMG_TERRAFORM_UP, STR_LANDSCAPING_TOOLTIP_RAISE_A_CORNER_OF_LAND),
00510 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_LEVEL_LAND), SetMinimalSize(22, 22),
00511 SetFill(0, 1), SetDataTip(SPR_IMG_LEVEL_LAND, STR_LANDSCAPING_LEVEL_LAND_TOOLTIP),
00512 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_PLACE_ROCKS), SetMinimalSize(22, 22),
00513 SetFill(0, 1), SetDataTip(SPR_IMG_ROCKS, STR_TERRAFORM_TOOLTIP_PLACE_ROCKY_AREAS_ON_LANDSCAPE),
00514 NWidget(NWID_SELECTION, INVALID_COLOUR, ETTW_SHOW_PLACE_DESERT),
00515 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_PLACE_DESERT), SetMinimalSize(22, 22),
00516 SetFill(0, 1), SetDataTip(SPR_IMG_DESERT, STR_TERRAFORM_TOOLTIP_DEFINE_DESERT_AREA),
00517 EndContainer(),
00518 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_PLACE_OBJECT), SetMinimalSize(23, 22),
00519 SetFill(0, 1), SetDataTip(SPR_IMG_TRANSMITTER, STR_SCENEDIT_TOOLBAR_PLACE_OBJECT),
00520 NWidget(NWID_SPACER), SetFill(1, 0),
00521 EndContainer(),
00522 NWidget(NWID_HORIZONTAL),
00523 NWidget(NWID_SPACER), SetFill(1, 0),
00524 NWidget(WWT_EMPTY, COLOUR_DARK_GREEN, ETTW_DOTS), SetMinimalSize(59, 31), SetDataTip(STR_EMPTY, STR_NULL),
00525 NWidget(NWID_SPACER), SetFill(1, 0),
00526 NWidget(NWID_VERTICAL),
00527 NWidget(NWID_SPACER), SetFill(0, 1),
00528 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_INCREASE_SIZE), SetMinimalSize(12, 12), SetDataTip(SPR_ARROW_UP, STR_TERRAFORM_TOOLTIP_INCREASE_SIZE_OF_LAND_AREA),
00529 NWidget(NWID_SPACER), SetMinimalSize(0, 1),
00530 NWidget(WWT_IMGBTN, COLOUR_GREY, ETTW_DECREASE_SIZE), SetMinimalSize(12, 12), SetDataTip(SPR_ARROW_DOWN, STR_TERRAFORM_TOOLTIP_DECREASE_SIZE_OF_LAND_AREA),
00531 NWidget(NWID_SPACER), SetFill(0, 1),
00532 EndContainer(),
00533 NWidget(NWID_SPACER), SetMinimalSize(2, 0),
00534 EndContainer(),
00535 NWidget(NWID_SPACER), SetMinimalSize(0, 6),
00536 NWidget(WWT_TEXTBTN, COLOUR_GREY, ETTW_NEW_SCENARIO), SetMinimalSize(160, 12),
00537 SetFill(1, 0), SetDataTip(STR_TERRAFORM_SE_NEW_WORLD, STR_TERRAFORM_TOOLTIP_GENERATE_RANDOM_LAND), SetPadding(0, 2, 0, 2),
00538 NWidget(WWT_TEXTBTN, COLOUR_GREY, ETTW_RESET_LANDSCAPE), SetMinimalSize(160, 12),
00539 SetFill(1, 0), SetDataTip(STR_TERRAFORM_RESET_LANDSCAPE, STR_TERRAFORM_RESET_LANDSCAPE_TOOLTIP), SetPadding(1, 2, 2, 2),
00540 EndContainer(),
00541 };
00542
00547 static void EditorTerraformClick_Dynamite(Window *w)
00548 {
00549 HandlePlacePushButton(w, ETTW_DEMOLISH, ANIMCURSOR_DEMOLISH, HT_RECT | HT_DIAGONAL, PlaceProc_DemolishArea);
00550 }
00551
00552 static void EditorTerraformClick_LowerBigLand(Window *w)
00553 {
00554 HandlePlacePushButton(w, ETTW_LOWER_LAND, ANIMCURSOR_LOWERLAND, HT_POINT, PlaceProc_LowerBigLand);
00555 }
00556
00557 static void EditorTerraformClick_RaiseBigLand(Window *w)
00558 {
00559 HandlePlacePushButton(w, ETTW_RAISE_LAND, ANIMCURSOR_RAISELAND, HT_POINT, PlaceProc_RaiseBigLand);
00560 }
00561
00562 static void EditorTerraformClick_LevelLand(Window *w)
00563 {
00564 HandlePlacePushButton(w, ETTW_LEVEL_LAND, SPR_CURSOR_LEVEL_LAND, HT_POINT | HT_DIAGONAL, PlaceProc_LevelLand);
00565 }
00566
00567 static void EditorTerraformClick_RockyArea(Window *w)
00568 {
00569 HandlePlacePushButton(w, ETTW_PLACE_ROCKS, SPR_CURSOR_ROCKY_AREA, HT_RECT, PlaceProc_RockyArea);
00570 }
00571
00572 static void EditorTerraformClick_Desert(Window *w)
00573 {
00574 HandlePlacePushButton(w, ETTW_PLACE_DESERT, SPR_CURSOR_DESERT, HT_RECT, PlaceProc_DesertArea);
00575 }
00576
00577 static void EditorTerraformClick_PlaceObject(Window *w)
00578 {
00579 if (HandlePlacePushButton(w, ETTW_PLACE_OBJECT, SPR_CURSOR_TRANSMITTER, HT_RECT, PlaceProc_Object)) ShowBuildObjectPicker(w);
00580 }
00581
00582 static OnButtonClick * const _editor_terraform_button_proc[] = {
00583 EditorTerraformClick_Dynamite,
00584 EditorTerraformClick_LowerBigLand,
00585 EditorTerraformClick_RaiseBigLand,
00586 EditorTerraformClick_LevelLand,
00587 EditorTerraformClick_RockyArea,
00588 EditorTerraformClick_Desert,
00589 EditorTerraformClick_PlaceObject
00590 };
00591
00592
00598 static void ResetLandscapeConfirmationCallback(Window *w, bool confirmed)
00599 {
00600 if (confirmed) {
00601
00602
00603 _generating_world = true;
00604
00605
00606 Company *c;
00607 FOR_ALL_COMPANIES(c) {
00608 ChangeOwnershipOfCompanyItems(c->index, INVALID_OWNER);
00609 delete c;
00610 }
00611
00612 _generating_world = false;
00613
00614
00615 BaseStation *st;
00616 FOR_ALL_BASE_STATIONS(st) {
00617
00618 if (IsBuoyTile(st->xy)) DoCommand(st->xy, 0, 0, DC_EXEC | DC_BANKRUPT, CMD_LANDSCAPE_CLEAR);
00619 if (!st->IsInUse()) delete st;
00620 }
00621
00622 MarkWholeScreenDirty();
00623 }
00624 }
00625
00626 struct ScenarioEditorLandscapeGenerationWindow : Window {
00627 ScenarioEditorLandscapeGenerationWindow(const WindowDesc *desc, WindowNumber window_number) : Window()
00628 {
00629 this->CreateNestedTree(desc);
00630 NWidgetStacked *show_desert = this->GetWidget<NWidgetStacked>(ETTW_SHOW_PLACE_DESERT);
00631 show_desert->SetDisplayedPlane(_settings_game.game_creation.landscape == LT_TROPIC ? 0 : SZSP_NONE);
00632 this->FinishInitNested(desc, window_number);
00633 }
00634
00635 virtual void OnPaint()
00636 {
00637 this->DrawWidgets();
00638
00639 if (this->IsWidgetLowered(ETTW_LOWER_LAND) || this->IsWidgetLowered(ETTW_RAISE_LAND)) {
00640 SetTileSelectSize(_terraform_size, _terraform_size);
00641 }
00642 }
00643
00644 virtual void DrawWidget(const Rect &r, int widget) const
00645 {
00646 if (widget != ETTW_DOTS) return;
00647
00648 int center_x = RoundDivSU(r.left + r.right, 2);
00649 int center_y = RoundDivSU(r.top + r.bottom, 2);
00650
00651 int n = _terraform_size * _terraform_size;
00652 const int8 *coords = &_multi_terraform_coords[0][0];
00653
00654 assert(n != 0);
00655 do {
00656 DrawSprite(SPR_WHITE_POINT, PAL_NONE, center_x + coords[0], center_y + coords[1]);
00657 coords += 2;
00658 } while (--n);
00659 }
00660
00661 virtual EventState OnKeyPress(uint16 key, uint16 keycode)
00662 {
00663 int num = CheckHotkeyMatch(terraform_editor_hotkeys, keycode, this);
00664 if (num == -1) return ES_NOT_HANDLED;
00665 this->OnClick(Point(), num, 1);
00666 return ES_HANDLED;
00667 }
00668
00669 virtual void OnClick(Point pt, int widget, int click_count)
00670 {
00671 if (IsInsideMM(widget, ETTW_BUTTONS_START, ETTW_BUTTONS_END)) {
00672 _editor_terraform_button_proc[widget - ETTW_BUTTONS_START](this);
00673 } else {
00674 switch (widget) {
00675 case ETTW_INCREASE_SIZE:
00676 case ETTW_DECREASE_SIZE: {
00677 int size = (widget == ETTW_INCREASE_SIZE) ? 1 : -1;
00678 this->HandleButtonClick(widget);
00679 size += _terraform_size;
00680
00681 if (!IsInsideMM(size, 1, 8 + 1)) return;
00682 _terraform_size = size;
00683
00684 SndPlayFx(SND_15_BEEP);
00685 this->SetDirty();
00686 break;
00687 }
00688 case ETTW_NEW_SCENARIO:
00689 this->HandleButtonClick(widget);
00690 ShowCreateScenario();
00691 break;
00692 case ETTW_RESET_LANDSCAPE:
00693 ShowQuery(
00694 STR_QUERY_RESET_LANDSCAPE_CAPTION,
00695 STR_RESET_LANDSCAPE_CONFIRMATION_TEXT,
00696 NULL,
00697 ResetLandscapeConfirmationCallback);
00698 break;
00699 }
00700 }
00701 }
00702
00703 virtual void OnTimeout()
00704 {
00705 for (uint i = ETTW_START; i < this->nested_array_size; i++) {
00706 if (i == ETTW_BUTTONS_START) i = ETTW_BUTTONS_END;
00707 if (this->IsWidgetLowered(i)) {
00708 this->RaiseWidget(i);
00709 this->SetWidgetDirty(i);
00710 }
00711 }
00712 }
00713
00714 virtual void OnPlaceObject(Point pt, TileIndex tile)
00715 {
00716 _place_proc(tile);
00717 }
00718
00719 virtual void OnPlaceDrag(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt)
00720 {
00721 VpSelectTilesWithMethod(pt.x, pt.y, select_method);
00722 }
00723
00724 virtual void OnPlaceMouseUp(ViewportPlaceMethod select_method, ViewportDragDropSelectionProcess select_proc, Point pt, TileIndex start_tile, TileIndex end_tile)
00725 {
00726 if (pt.x != -1) {
00727 switch (select_proc) {
00728 default: NOT_REACHED();
00729 case DDSP_CREATE_ROCKS:
00730 case DDSP_CREATE_DESERT:
00731 case DDSP_RAISE_AND_LEVEL_AREA:
00732 case DDSP_LOWER_AND_LEVEL_AREA:
00733 case DDSP_LEVEL_AREA:
00734 case DDSP_DEMOLISH_AREA:
00735 GUIPlaceProcDragXY(select_proc, start_tile, end_tile);
00736 break;
00737 }
00738 }
00739 }
00740
00741 virtual void OnPlaceObjectAbort()
00742 {
00743 this->RaiseButtons();
00744 this->SetDirty();
00745 DeleteWindowById(WC_BUILD_OBJECT, 0);
00746 }
00747
00748 static Hotkey<ScenarioEditorLandscapeGenerationWindow> terraform_editor_hotkeys[];
00749 };
00750
00751 Hotkey<ScenarioEditorLandscapeGenerationWindow> ScenarioEditorLandscapeGenerationWindow::terraform_editor_hotkeys[] = {
00752 Hotkey<ScenarioEditorLandscapeGenerationWindow>('D' | WKC_GLOBAL_HOTKEY, "dynamite", ETTW_DEMOLISH),
00753 Hotkey<ScenarioEditorLandscapeGenerationWindow>('Q' | WKC_GLOBAL_HOTKEY, "lower", ETTW_LOWER_LAND),
00754 Hotkey<ScenarioEditorLandscapeGenerationWindow>('W' | WKC_GLOBAL_HOTKEY, "raise", ETTW_RAISE_LAND),
00755 Hotkey<ScenarioEditorLandscapeGenerationWindow>('E' | WKC_GLOBAL_HOTKEY, "level", ETTW_LEVEL_LAND),
00756 Hotkey<ScenarioEditorLandscapeGenerationWindow>('R', "rocky", ETTW_PLACE_ROCKS),
00757 Hotkey<ScenarioEditorLandscapeGenerationWindow>('T', "desert", ETTW_PLACE_DESERT),
00758 Hotkey<ScenarioEditorLandscapeGenerationWindow>('O', "object", ETTW_PLACE_OBJECT),
00759 HOTKEY_LIST_END(ScenarioEditorLandscapeGenerationWindow)
00760 };
00761
00762 Hotkey<ScenarioEditorLandscapeGenerationWindow> *_terraform_editor_hotkeys = ScenarioEditorLandscapeGenerationWindow::terraform_editor_hotkeys;
00763
00764 static const WindowDesc _scen_edit_land_gen_desc(
00765 WDP_AUTO, 0, 0,
00766 WC_SCEN_LAND_GEN, WC_NONE,
00767 WDF_CONSTRUCTION,
00768 _nested_scen_edit_land_gen_widgets, lengthof(_nested_scen_edit_land_gen_widgets)
00769 );
00770
00771 Window *ShowEditorTerraformToolbar()
00772 {
00773 return AllocateWindowDescFront<ScenarioEditorLandscapeGenerationWindow>(&_scen_edit_land_gen_desc, 0);
00774 }
00775
00776 EventState TerraformToolbarEditorGlobalHotkeys(uint16 key, uint16 keycode)
00777 {
00778 int num = CheckHotkeyMatch<ScenarioEditorLandscapeGenerationWindow>(_terraform_editor_hotkeys, keycode, NULL, true);
00779 if (num == -1) return ES_NOT_HANDLED;
00780 Window *w = ShowEditorTerraformToolbar();
00781 if (w == NULL) return ES_NOT_HANDLED;
00782 return w->OnKeyPress(key, keycode);
00783 }