terraform_gui.cpp

Go to the documentation of this file.
00001 /* $Id$ */
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 "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         /* FALL THROUGH */
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     /* When end_tile is MP_VOID, the error tile will not be visible to the
00104      * user. This happens when terraforming at the southern border. */
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     /* This is needed as we like to have the tree available on OnInit. */
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     /* Don't show the place object button when there are no objects to place. */
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: // Lower land button
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: // Raise land button
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: // Level land button
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: // Demolish aka dynamite button
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: // Buy land button
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: // Plant trees button
00212         /* This button is NOT a place-push-button, so don't treat it as such */
00213         this->HandleButtonClick(TTW_PLANT_TREES);
00214         ShowBuildTreesToolbar();
00215         break;
00216 
00217       case TTW_PLACE_SIGN: // Place sign button
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: // Place object button
00223         /* Don't show the place object button when there are no objects to place. */
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: // Lower land button
00253         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LOWER_AND_LEVEL_AREA);
00254         break;
00255 
00256       case TTW_RAISE_LAND: // Raise land button
00257         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_RAISE_AND_LEVEL_AREA);
00258         break;
00259 
00260       case TTW_LEVEL_LAND: // Level land button
00261         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LEVEL_AREA);
00262         break;
00263 
00264       case TTW_DEMOLISH: // Demolish aka dynamite button
00265         PlaceProc_DemolishArea(tile);
00266         break;
00267 
00268       case TTW_BUY_LAND: // Buy land button
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: // Place sign button
00273         PlaceProc_Sign(tile);
00274         break;
00275 
00276       case TTW_PLACE_OBJECT: // Place object button
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   /* Delete the terraform toolbar to place it again. */
00387   DeleteWindowById(WC_SCEN_LAND_GEN, 0, true);
00388   w = AllocateWindowDescFront<TerraformToolbarWindow>(&_terraform_desc, 0);
00389   /* Align the terraform toolbar under the main toolbar. */
00390   w->top -= w->height;
00391   w->SetDirty();
00392   /* Put the linked toolbar to the left / right of it. */
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       /* Raise land */
00439       h = MAX_TILE_HEIGHT;
00440       TILE_AREA_LOOP(tile2, ta) {
00441         h = min(h, TileHeight(tile2));
00442       }
00443     } else {
00444       /* Lower land */
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     /* Set generating_world to true to get instant-green grass after removing
00548      * company property. */
00549     _generating_world = true;
00550 
00551     /* Delete all companies */
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     /* Delete all station signs */
00561     BaseStation *st;
00562     FOR_ALL_BASE_STATIONS(st) {
00563       /* There can be buoys, remove them */
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     /* Now that all vehicles are gone, we can reset the engine pool. Maybe it reduces some NewGRF changing-mess */
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)) { // change area-size if raise/lower corner is selected
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: // Demolish aka dynamite button
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: // Lower land button
00633         HandlePlacePushButton(this, ETTW_LOWER_LAND, ANIMCURSOR_LOWERLAND, HT_POINT);
00634         this->last_user_action = widget;
00635         break;
00636 
00637       case ETTW_RAISE_LAND: // Raise land button
00638         HandlePlacePushButton(this, ETTW_RAISE_LAND, ANIMCURSOR_RAISELAND, HT_POINT);
00639         this->last_user_action = widget;
00640         break;
00641 
00642       case ETTW_LEVEL_LAND: // Level land button
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: // Place rocks button
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: // Place desert button (in tropical climate)
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: // Place transmitter button
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: { // Increase/Decrease terraform 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: // gen random land
00679         this->HandleButtonClick(widget);
00680         ShowCreateScenario();
00681         break;
00682 
00683       case ETTW_RESET_LANDSCAPE: // 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; // skip the buttons
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: // Demolish aka dynamite button
00706         PlaceProc_DemolishArea(tile);
00707         break;
00708 
00709       case ETTW_LOWER_LAND: // Lower land button
00710         CommonRaiseLowerBigLand(tile, 0);
00711         break;
00712 
00713       case ETTW_RAISE_LAND: // Raise land button
00714         CommonRaiseLowerBigLand(tile, 1);
00715         break;
00716 
00717       case ETTW_LEVEL_LAND: // Level land button
00718         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_LEVEL_AREA);
00719         break;
00720 
00721       case ETTW_PLACE_ROCKS: // Place rocks button
00722         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_ROCKS);
00723         break;
00724 
00725       case ETTW_PLACE_DESERT: // Place desert button (in tropical climate)
00726         VpStartPlaceSizing(tile, VPM_X_AND_Y, DDSP_CREATE_DESERT);
00727         break;
00728 
00729       case ETTW_PLACE_OBJECT: // Place transmitter button
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 }

Generated on Mon May 9 05:19:02 2011 for OpenTTD by  doxygen 1.6.1