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