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