terraform_gui.cpp

Go to the documentation of this file.
00001 /* $Id: terraform_gui.cpp 21608 2010-12-23 14:24:34Z alberth $ */
00002 
00003 /*
00004  * This file is part of OpenTTD.
00005  * 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.
00006  * 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.
00007  * 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/>.
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         /* FALL THROUGH */
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     /* When end_tile is MP_VOID, the error tile will not be visible to the
00103      * user. This happens when terraforming at the southern border. */
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   /* This button is NOT a place-push-button, so don't treat it as such */
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   /* Don't show the place object button when there are no objects to place. */
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     /* This is needed as we like to have the tree available on OnInit. */
00234     this->CreateNestedTree(desc);
00235     this->FinishInitNested(desc, window_number);
00236   }
00237 
00238   ~TerraformToolbarWindow()
00239   {
00240   }
00241 
00242   virtual void OnInit()
00243   {
00244     /* Don't show the place object button when there are no objects to place. */
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   /* Delete the terraform toolbar to place it again. */
00371   DeleteWindowById(WC_SCEN_LAND_GEN, 0, true);
00372   w = AllocateWindowDescFront<TerraformToolbarWindow>(&_terraform_desc, 0);
00373   /* Align the terraform toolbar under the main toolbar. */
00374   w->top -= w->height;
00375   w->SetDirty();
00376   /* Put the linked toolbar to the left / right of it. */
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       /* Raise land */
00423       h = MAX_TILE_HEIGHT;
00424       TILE_AREA_LOOP(tile2, ta) {
00425         h = min(h, TileHeight(tile2));
00426       }
00427     } else {
00428       /* Lower land */
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     /* Set generating_world to true to get instant-green grass after removing
00602      * company property. */
00603     _generating_world = true;
00604 
00605     /* Delete all companies */
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     /* Delete all station signs */
00615     BaseStation *st;
00616     FOR_ALL_BASE_STATIONS(st) {
00617       /* There can be buoys, remove them */
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)) { // change area-size if raise/lower corner is selected
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: { // Increase/Decrease terraform 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: // gen random land
00689           this->HandleButtonClick(widget);
00690           ShowCreateScenario();
00691           break;
00692         case ETTW_RESET_LANDSCAPE: // 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; // skip the buttons
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 }

Generated on Thu Dec 23 23:41:33 2010 for OpenTTD by  doxygen 1.6.1