tron@2186: /* $Id$ */
tron@2186: 
truelight@0: #include "stdafx.h"
Darkvater@1891: #include "openttd.h"
tron@1299: #include "debug.h"
tron@2163: #include "functions.h"
tron@1309: #include "strings.h"
tron@507: #include "table/strings.h"
Darkvater@1914: #include "table/sprites.h"
tron@679: #include "map.h"
tron@1386: #include "gui.h"
truelight@0: #include "window.h"
truelight@0: #include "gfx.h"
truelight@0: #include "command.h"
truelight@0: #include "viewport.h"
truelight@0: #include "industry.h"
truelight@0: #include "town.h"
tron@2159: #include "variables.h"
truelight@0: 
Darkvater@1786: /* Present in table/build_industry.h" */
Darkvater@1786: extern const byte _build_industry_types[4][12];
truelight@0: extern const byte _industry_type_costs[37];
truelight@0: 
miham@1004: static void UpdateIndustryProduction(Industry *i);
miham@1004: extern void DrawArrowButtons(int x, int y, int state);
miham@1004: 
truelight@0: static void BuildIndustryWndProc(Window *w, WindowEvent *e)
truelight@0: {
truelight@0: 	switch(e->event) {
truelight@0: 	case WE_PAINT:
truelight@0: 		DrawWindowWidgets(w);
truelight@0: 		if (_thd.place_mode == 1 && _thd.window_class == WC_BUILD_INDUSTRY) {
Darkvater@1786: 			int ind_type = _build_industry_types[_opt_ptr->landscape][WP(w,def_d).data_1];
truelight@0: 
tron@534: 			SetDParam(0, (_price.build_industry >> 5) * _industry_type_costs[ind_type]);
truelight@0: 			DrawStringCentered(85, w->height - 21, STR_482F_COST, 0);
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_CLICK: {
truelight@0: 		int wid = e->click.widget;
truelight@0: 		if (wid >= 3) {
Darkvater@1914: 			if (HandlePlacePushButton(w, wid, SPR_CURSOR_INDUSTRY, 1, NULL))
truelight@0: 				WP(w,def_d).data_1 = wid - 3;
truelight@0: 		}
truelight@0: 	} break;
truelight@0: 
truelight@0: 	case WE_PLACE_OBJ:
Darkvater@1786: 		if (DoCommandP(e->place.tile, _build_industry_types[_opt_ptr->landscape][WP(w,def_d).data_1], 0, NULL, CMD_BUILD_INDUSTRY | CMD_MSG(STR_4830_CAN_T_CONSTRUCT_THIS_INDUSTRY)))
truelight@0: 			ResetObjectToPlace();
truelight@0: 		break;
truelight@193: 
truelight@0: 	case WE_ABORT_PLACE_OBJ:
truelight@0: 		w->click_state = 0;
truelight@0: 		SetWindowDirty(w);
truelight@0: 		break;
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _build_industry_land0_widgets[] = {
truelight@867: {   WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,											STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,		STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {      WWT_PANEL,   RESIZE_NONE,     7,     0,   169,    14,   115, 0x0,														STR_NULL},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    16,    27, STR_0241_POWER_STATION,				STR_0263_CONSTRUCT_POWER_STATION},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    29,    40, STR_0242_SAWMILL,							STR_0264_CONSTRUCT_SAWMILL},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    42,    53, STR_0244_OIL_REFINERY,					STR_0266_CONSTRUCT_OIL_REFINERY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    55,    66, STR_0246_FACTORY,							STR_0268_CONSTRUCT_FACTORY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    68,    79, STR_0247_STEEL_MILL,						STR_0269_CONSTRUCT_STEEL_MILL},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const Widget _build_industry_land1_widgets[] = {
truelight@867: {   WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,											STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,		STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {      WWT_PANEL,   RESIZE_NONE,     7,     0,   169,    14,   115, 0x0,														STR_NULL},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    16,    27, STR_0241_POWER_STATION,				STR_0263_CONSTRUCT_POWER_STATION},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    29,    40, STR_024C_PAPER_MILL,						STR_026E_CONSTRUCT_PAPER_MILL},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    42,    53, STR_0244_OIL_REFINERY,					STR_0266_CONSTRUCT_OIL_REFINERY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    55,    66, STR_024D_FOOD_PROCESSING_PLANT,STR_026F_CONSTRUCT_FOOD_PROCESSING},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    68,    79, STR_024E_PRINTING_WORKS,				STR_0270_CONSTRUCT_PRINTING_WORKS},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const Widget _build_industry_land2_widgets[] = {
truelight@867: {   WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,											STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,		STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {      WWT_PANEL,   RESIZE_NONE,     7,     0,   169,    14,   115, 0x0,														STR_NULL},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    16,    27, STR_0250_LUMBER_MILL,					STR_0273_CONSTRUCT_LUMBER_MILL_TO},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    29,    40, STR_024D_FOOD_PROCESSING_PLANT,STR_026F_CONSTRUCT_FOOD_PROCESSING},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    42,    53, STR_0244_OIL_REFINERY,					STR_0266_CONSTRUCT_OIL_REFINERY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    55,    66, STR_0246_FACTORY,							STR_0268_CONSTRUCT_FACTORY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    68,    79, STR_0254_WATER_TOWER,					STR_0277_CONSTRUCT_WATER_TOWER_CAN},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const Widget _build_industry_land3_widgets[] = {
truelight@867: {   WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,											STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,		STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {      WWT_PANEL,   RESIZE_NONE,     7,     0,   169,    14,   115, 0x0,														STR_NULL},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    16,    27, STR_0258_CANDY_FACTORY,				STR_027B_CONSTRUCT_CANDY_FACTORY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    29,    40, STR_025B_TOY_SHOP,							STR_027E_CONSTRUCT_TOY_SHOP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    42,    53, STR_025C_TOY_FACTORY,					STR_027F_CONSTRUCT_TOY_FACTORY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    55,    66, STR_025E_FIZZY_DRINK_FACTORY,	STR_0281_CONSTRUCT_FIZZY_DRINK_FACTORY},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const Widget _build_industry_land0_widgets_extra[] = {
truelight@867: {   WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,							STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {      WWT_PANEL,   RESIZE_NONE,     7,     0,   169,    14,   187, 0x0,										STR_NULL},
truelight@0: 
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    16,    27, STR_0241_POWER_STATION,STR_0263_CONSTRUCT_POWER_STATION},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    29,    40, STR_0242_SAWMILL,			STR_0264_CONSTRUCT_SAWMILL},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    42,    53, STR_0244_OIL_REFINERY,	STR_0266_CONSTRUCT_OIL_REFINERY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    55,    66, STR_0246_FACTORY,					STR_0268_CONSTRUCT_FACTORY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    68,    79, STR_0247_STEEL_MILL,		STR_0269_CONSTRUCT_STEEL_MILL},
truelight@0: 
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    84,    95, STR_0240_COAL_MINE,		STR_CONSTRUCT_COAL_MINE_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    97,    108, STR_0243_FOREST,			STR_CONSTRUCT_FOREST_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    110,    121, STR_0245_OIL_RIG,		STR_CONSTRUCT_OIL_RIG_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    123,    134, STR_0248_FARM,						STR_CONSTRUCT_FARM_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    136,    147, STR_024A_OIL_WELLS,			STR_CONSTRUCT_OIL_WELLS_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    149,    160, STR_0249_IRON_ORE_MINE,	STR_CONSTRUCT_IRON_ORE_MINE_TIP},
truelight@0: 
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const Widget _build_industry_land1_widgets_extra[] = {
truelight@867: {   WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,								STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,		STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {      WWT_PANEL,   RESIZE_NONE,     7,     0,   169,    14,   174, 0x0,											STR_NULL},
truelight@0: 
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    16,    27, STR_0241_POWER_STATION,	STR_0263_CONSTRUCT_POWER_STATION},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    29,    40, STR_024C_PAPER_MILL,			STR_026E_CONSTRUCT_PAPER_MILL},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    42,    53, STR_0244_OIL_REFINERY,		STR_0266_CONSTRUCT_OIL_REFINERY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    55,    66, STR_024D_FOOD_PROCESSING_PLANT,STR_026F_CONSTRUCT_FOOD_PROCESSING},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    68,    79, STR_024E_PRINTING_WORKS,	STR_0270_CONSTRUCT_PRINTING_WORKS},
truelight@0: 
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    81+3,    92+3, STR_0240_COAL_MINE,	STR_CONSTRUCT_COAL_MINE_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    94+3,   105+3, STR_0243_FOREST,			STR_CONSTRUCT_FOREST_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    107+3,  118+3, STR_0248_FARM,				STR_CONSTRUCT_FARM_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    120+3,  131+3, STR_024A_OIL_WELLS,	STR_CONSTRUCT_OIL_WELLS_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    133+3,  144+3, STR_024F_GOLD_MINE,	STR_CONSTRUCT_GOLD_MINE_TIP},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const Widget _build_industry_land2_widgets_extra[] = {
truelight@867: {   WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,							STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,			STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {      WWT_PANEL,   RESIZE_NONE,     7,     0,   169,    14,   200, 0x0,										STR_NULL},
truelight@0: 
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    16,    27, STR_0250_LUMBER_MILL,	STR_0273_CONSTRUCT_LUMBER_MILL_TO},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    29,    40, STR_024D_FOOD_PROCESSING_PLANT,STR_026F_CONSTRUCT_FOOD_PROCESSING},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    42,    53, STR_0244_OIL_REFINERY,	STR_0266_CONSTRUCT_OIL_REFINERY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    55,    66, STR_0246_FACTORY,			STR_0268_CONSTRUCT_FACTORY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    68,    79, STR_0254_WATER_TOWER,	STR_0277_CONSTRUCT_WATER_TOWER_CAN},
truelight@0: 
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    81+3,    92+3, STR_024A_OIL_WELLS,STR_CONSTRUCT_OIL_WELLS_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    94+3,    105+3, STR_0255_DIAMOND_MINE,			STR_CONSTRUCT_DIAMOND_MINE_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    107+3,    118+3, STR_0256_COPPER_ORE_MINE,	STR_CONSTRUCT_COPPER_ORE_MINE_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    120+3,    131+3, STR_0248_FARM,		STR_CONSTRUCT_FARM_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    133+3,    144+3, STR_0251_FRUIT_PLANTATION,	STR_CONSTRUCT_FRUIT_PLANTATION_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    146+3,    157+3, STR_0252_RUBBER_PLANTATION,STR_CONSTRUCT_RUBBER_PLANTATION_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    159+3,    170+3, STR_0253_WATER_SUPPLY,			STR_CONSTRUCT_WATER_SUPPLY_TIP},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const Widget _build_industry_land3_widgets_extra[] = {
truelight@867: {   WWT_CLOSEBOX,   RESIZE_NONE,     7,     0,    10,     0,    13, STR_00C5,								STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     7,    11,   169,     0,    13, STR_0314_FUND_NEW_INDUSTRY,			STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {      WWT_PANEL,   RESIZE_NONE,     7,     0,   169,    14,   187, 0x0,	STR_NULL},
truelight@0: 
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    16,    27, STR_0258_CANDY_FACTORY,	STR_027B_CONSTRUCT_CANDY_FACTORY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    29,    40, STR_025B_TOY_SHOP,				STR_027E_CONSTRUCT_TOY_SHOP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    42,    53, STR_025C_TOY_FACTORY,		STR_027F_CONSTRUCT_TOY_FACTORY},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    55,    66, STR_025E_FIZZY_DRINK_FACTORY,		STR_0281_CONSTRUCT_FIZZY_DRINK_FACTORY},
truelight@0: 
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    68+3,    79+3, STR_0257_COTTON_CANDY_FOREST,STR_CONSTRUCT_COTTON_CANDY_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    81+3,    92+3, STR_0259_BATTERY_FARM,				STR_CONSTRUCT_BATTERY_FARM_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    94+3,    105+3, STR_025A_COLA_WELLS,				STR_CONSTRUCT_COLA_WELLS_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    107+3,    118+3, STR_025D_PLASTIC_FOUNTAINS,STR_CONSTRUCT_PLASTIC_FOUNTAINS_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    120+3,    131+3, STR_025F_BUBBLE_GENERATOR,	STR_CONSTRUCT_BUBBLE_GENERATOR_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    133+3,    144+3, STR_0260_TOFFEE_QUARRY,		STR_CONSTRUCT_TOFFEE_QUARRY_TIP},
peter1138@2725: {    WWT_TEXTBTN,   RESIZE_NONE,    14,     2,   167,    146+3,    157+3, STR_0261_SUGAR_MINE,				STR_CONSTRUCT_SUGAR_MINE_TIP},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: 
truelight@0: static const WindowDesc _build_industry_land0_desc = {
truelight@0: 	-1, -1, 170, 116,
truelight@0: 	WC_BUILD_INDUSTRY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_build_industry_land0_widgets,
truelight@0: 	BuildIndustryWndProc
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _build_industry_land1_desc = {
truelight@0: 	-1, -1, 170, 116,
truelight@0: 	WC_BUILD_INDUSTRY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_build_industry_land1_widgets,
truelight@0: 	BuildIndustryWndProc
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _build_industry_land2_desc = {
truelight@0: 	-1, -1, 170, 116,
truelight@0: 	WC_BUILD_INDUSTRY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_build_industry_land2_widgets,
truelight@0: 	BuildIndustryWndProc
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _build_industry_land3_desc = {
truelight@0: 	-1, -1, 170, 116,
truelight@0: 	WC_BUILD_INDUSTRY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_build_industry_land3_widgets,
truelight@0: 	BuildIndustryWndProc
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _build_industry_land0_desc_extra = {
truelight@0: 	-1, -1, 170, 188,
truelight@0: 	WC_BUILD_INDUSTRY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_build_industry_land0_widgets_extra,
truelight@0: 	BuildIndustryWndProc
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _build_industry_land1_desc_extra = {
truelight@0: 	-1, -1, 170, 175,
truelight@0: 	WC_BUILD_INDUSTRY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_build_industry_land1_widgets_extra,
truelight@0: 	BuildIndustryWndProc
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _build_industry_land2_desc_extra = {
truelight@0: 	-1, -1, 170, 201,
truelight@0: 	WC_BUILD_INDUSTRY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_build_industry_land2_widgets_extra,
truelight@0: 	BuildIndustryWndProc
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _build_industry_land3_desc_extra = {
truelight@0: 	-1, -1, 170, 188,
truelight@0: 	WC_BUILD_INDUSTRY,0,
truelight@0: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
truelight@0: 	_build_industry_land3_widgets_extra,
truelight@0: 	BuildIndustryWndProc
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc * const _industry_window_desc[2][4] = {
truelight@0: 	{
truelight@0: 	&_build_industry_land0_desc,
truelight@0: 	&_build_industry_land1_desc,
truelight@0: 	&_build_industry_land2_desc,
truelight@0: 	&_build_industry_land3_desc,
truelight@0: 	},
truelight@0: 	{
truelight@0: 	&_build_industry_land0_desc_extra,
truelight@0: 	&_build_industry_land1_desc_extra,
truelight@0: 	&_build_industry_land2_desc_extra,
truelight@0: 	&_build_industry_land3_desc_extra,
truelight@0: 	},
truelight@0: };
truelight@0: 
tron@1093: void ShowBuildIndustryWindow(void)
truelight@193: {
peter1138@2866: 	if (_current_player == OWNER_SPECTATOR) return;
Darkvater@1786: 	AllocateWindowDescFront(_industry_window_desc[_patches.build_rawmaterial_ind][_opt_ptr->landscape],0);
truelight@0: }
truelight@0: 
celestar@1388: #define NEED_ALTERB	((_game_mode == GM_EDITOR || _cheats.setup_prod.value) && (i->accepts_cargo[0] == CT_INVALID || i->accepts_cargo[0] == CT_VALUABLES))
truelight@0: static void IndustryViewWndProc(Window *w, WindowEvent *e)
truelight@0: {
miham@1004: 	// WP(w,vp2_d).data_1 is for the editbox line
miham@1004: 	// WP(w,vp2_d).data_2 is for the clickline
miham@1004: 	// WP(w,vp2_d).data_3 is for the click pos (left or right)
truelight@0: 
truelight@0: 	switch(e->event) {
miham@1004: 	case WE_PAINT: {
miham@1004: 		const Industry *i;
miham@1004: 		StringID str;
tron@2557: 
truelight@919: 		i = GetIndustry(w->window_number);
ludde@2070: 		SetDParam(0, w->window_number);
truelight@0: 		DrawWindowWidgets(w);
truelight@0: 
miham@1004: 		if (i->accepts_cargo[0] != CT_INVALID) {
tron@534: 			SetDParam(0, _cargoc.names_s[i->accepts_cargo[0]]);
truelight@0: 			str = STR_4827_REQUIRES;
miham@1004: 			if (i->accepts_cargo[1] != CT_INVALID) {
tron@534: 				SetDParam(1, _cargoc.names_s[i->accepts_cargo[1]]);
truelight@0: 				str++;
miham@1004: 				if (i->accepts_cargo[2] != CT_INVALID) {
tron@534: 					SetDParam(2, _cargoc.names_s[i->accepts_cargo[2]]);
truelight@0: 					str++;
truelight@0: 				}
truelight@0: 			}
truelight@0: 			DrawString(2, 107, str, 0);
truelight@0: 		}
truelight@193: 
miham@1004: 		if (i->produced_cargo[0] != CT_INVALID) {
truelight@0: 			DrawString(2, 117, STR_482A_PRODUCTION_LAST_MONTH, 0);
truelight@0: 
ludde@2084: 			SetDParam(0, _cargoc.names_long[i->produced_cargo[0]]);
tron@534: 			SetDParam(1, i->total_production[0]);
ludde@2063: 
tron@534: 			SetDParam(2, i->pct_transported[0] * 100 >> 8);
miham@1004: 			DrawString(4 + (NEED_ALTERB ? 30 : 0), 127, STR_482B_TRANSPORTED, 0);
miham@1004: 			// Let's put out those buttons..
miham@1004: 			if (NEED_ALTERB)
miham@1004: 				DrawArrowButtons(5, 127, (WP(w,vp2_d).data_2 == 1 ? WP(w,vp2_d).data_3 : 0));
truelight@0: 
miham@1004: 			if (i->produced_cargo[1] != CT_INVALID) {
ludde@2084: 				SetDParam(0, _cargoc.names_long[i->produced_cargo[1]]);
tron@534: 				SetDParam(1, i->total_production[1]);
tron@534: 				SetDParam(2, i->pct_transported[1] * 100 >> 8);
miham@1004: 				DrawString(4 + (NEED_ALTERB ? 30 : 0), 137, STR_482B_TRANSPORTED, 0);
miham@1004: 				// Let's put out those buttons..
miham@1004: 				if (NEED_ALTERB)
miham@1004: 				    DrawArrowButtons(5, 137, (WP(w,vp2_d).data_2 == 2 ? WP(w,vp2_d).data_3 : 0));
truelight@0: 			}
truelight@0: 		}
truelight@0: 
truelight@0: 		DrawWindowViewport(w);
miham@1004: 		}
truelight@0: 		break;
truelight@0: 
miham@1004: 	case WE_CLICK: {
miham@1004: 		Industry *i;
miham@1004: 
truelight@0: 		switch(e->click.widget) {
miham@1004: 		case 5: {
tron@1019: 			int line;
miham@1004: 			int x;
miham@1004: 			byte b;
miham@1004: 
miham@1004: 			i = GetIndustry(w->window_number);
miham@1004: 
miham@1176: 			// We should work if needed..
miham@1176: 			if (!NEED_ALTERB)
miham@1004: 				return;
miham@1004: 
miham@1004: 			x = e->click.pt.x;
miham@1004: 			line = (e->click.pt.y - 127) / 10;
miham@1004: 			if (e->click.pt.y >= 127 && IS_INT_INSIDE(line, 0, 2) && i->produced_cargo[line]) {
tron@1019: 				if (IS_INT_INSIDE(x, 5, 25) ) {
miham@1004: 					// clicked buttons
tron@1019: 					if (x < 15) {
miham@1004: 						// decrease
miham@1004: 						i->production_rate[line] /= 2;
miham@1004: 						if (i->production_rate[line] < 4)
miham@1004: 							i->production_rate[line] = 4;
miham@1004: 					} else {
miham@1004: 						// increase
miham@1004: 						b = i->production_rate[line] * 2;
tron@1019: 						if (i->production_rate[line] >= 128)
miham@1004: 							b=255;
miham@1004: 						i->production_rate[line] = b;
miham@1004: 					}
miham@1004: 					UpdateIndustryProduction(i);
miham@1004: 					SetWindowDirty(w);
miham@1004: 					w->flags4 |= 5 << WF_TIMEOUT_SHL;
miham@1004: 					WP(w,vp2_d).data_2 = line+1;
miham@1004: 					WP(w,vp2_d).data_3 = (x < 15 ? 1 : 2);
miham@1004: 				} else if (IS_INT_INSIDE(x, 34, 160)) {
miham@1004: 					// clicked the text
miham@1004: 					WP(w,vp2_d).data_1 = line;
miham@1004: 					SetDParam(0, i->production_rate[line] * 8);
tron@1019: 					ShowQueryString(STR_CONFIG_PATCHES_INT32,
tron@1019: 							STR_CONFIG_GAME_PRODUCTION,
tron@1019: 							10, 100, w->window_class,
miham@1004: 							w->window_number);
miham@1004: 				}
tron@1019: 			}
miham@1004: 			}
miham@1004: 			break;
darkvater@758: 		case 6:
truelight@919: 			i = GetIndustry(w->window_number);
tron@1981: 			ScrollMainWindowToTile(i->xy + TileDiffXY(1, 1));
truelight@0: 			break;
truelight@0: 		}
miham@1004: 		}
truelight@0: 		break;
miham@1004: 	case WE_TIMEOUT:
miham@1004: 		WP(w,vp2_d).data_2 = 0;
miham@1004: 		WP(w,vp2_d).data_3 = 0;
miham@1004: 		SetWindowDirty(w);
miham@1004: 		break;
miham@1004: 
miham@1004: 	case WE_ON_EDIT_TEXT:
miham@1004: 		if (*e->edittext.str) {
miham@1004: 			Industry *i;
miham@1004: 			int val;
miham@1004: 			int line;
miham@1004: 
miham@1004: 			i = GetIndustry(w->window_number);
miham@1004: 			line = WP(w,vp2_d).data_1;
miham@1004: 			val = atoi(e->edittext.str);
miham@1004: 			if (!IS_INT_INSIDE(val, 32, 2040)) {
miham@1004: 				if (val < 32) val = 32;
miham@1004: 				else val = 2040;
miham@1004: 			}
miham@1004: 			i->production_rate[line] = (byte)(val / 8);
miham@1004: 			UpdateIndustryProduction(i);
miham@1004: 			SetWindowDirty(w);
miham@1004: 		}
truelight@0: 	}
truelight@0: }
truelight@0: 
miham@1004: static void UpdateIndustryProduction(Industry *i)
miham@1004: {
miham@1004: 	if (i->produced_cargo[0] != CT_INVALID)
miham@1004: 		i->total_production[0] = 8 * i->production_rate[0];
miham@1004: 
miham@1004: 	if (i->produced_cargo[1] != CT_INVALID)
miham@1004: 		i->total_production[1] = 8 * i->production_rate[1];
miham@1004: }
miham@1004: 
truelight@0: static const Widget _industry_view_widgets[] = {
peter1138@2725: {   WWT_CLOSEBOX,   RESIZE_NONE,     9,     0,    10,     0,    13, STR_00C5,	STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,     9,    11,   247,     0,    13, STR_4801,	STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {  WWT_STICKYBOX,   RESIZE_NONE,     9,   248,   259,     0,    13, 0x0,       STR_STICKY_BUTTON},
truelight@867: {     WWT_IMGBTN,   RESIZE_NONE,     9,     0,   259,    14,   105, 0x0,				STR_NULL},
miham@1004: {	  WWT_6,   RESIZE_NONE,     9,     2,   257,    16,   103, 0x0,				STR_NULL},
truelight@867: {     WWT_IMGBTN,   RESIZE_NONE,     9,     0,   259,   106,   147, 0x0,				STR_NULL},
truelight@867: { WWT_PUSHTXTBTN,   RESIZE_NONE,     9,     0,   129,   148,   159, STR_00E4_LOCATION,	STR_482C_CENTER_THE_MAIN_VIEW_ON},
truelight@867: {     WWT_IMGBTN,   RESIZE_NONE,     9,   130,   259,   148,   159, 0x0,				STR_NULL},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static const WindowDesc _industry_view_desc = {
truelight@0: 	-1, -1, 260, 160,
truelight@0: 	WC_INDUSTRY_VIEW,0,
darkvater@758: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON,
truelight@0: 	_industry_view_widgets,
truelight@0: 	IndustryViewWndProc
truelight@0: };
truelight@0: 
truelight@0: void ShowIndustryViewWindow(int industry)
truelight@0: {
truelight@0: 	Window *w;
truelight@0: 	Industry *i;
truelight@0: 
truelight@0: 	w = AllocateWindowDescFront(&_industry_view_desc, industry);
truelight@0: 	if (w) {
truelight@0: 		w->flags4 |= WF_DISABLE_VP_SCROLL;
miham@1004: 		WP(w,vp2_d).data_1 = 0;
miham@1004: 		WP(w,vp2_d).data_2 = 0;
miham@1004: 		WP(w,vp2_d).data_3 = 0;
truelight@919: 		i = GetIndustry(w->window_number);
tron@1981: 		AssignWindowViewport(w, 3, 17, 0xFE, 0x56, i->xy + TileDiffXY(1, 1), 1);
truelight@0: 	}
truelight@0: }
truelight@0: 
truelight@0: static const Widget _industry_directory_widgets[] = {
peter1138@2725: {   WWT_CLOSEBOX,   RESIZE_NONE,    13,     0,    10,     0,    13, STR_00C5,									STR_018B_CLOSE_WINDOW},
truelight@867: {    WWT_CAPTION,   RESIZE_NONE,    13,    11,   495,     0,    13, STR_INDUSTRYDIR_CAPTION,	STR_018C_WINDOW_TITLE_DRAG_THIS},
truelight@867: {  WWT_STICKYBOX,   RESIZE_NONE,    13,   496,   507,     0,    13, 0x0,											STR_STICKY_BUTTON},
truelight@867: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,     0,   100,    14,    25, STR_SORT_BY_NAME,					STR_SORT_ORDER_TIP},
truelight@867: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   101,   200,    14,    25, STR_SORT_BY_TYPE,					STR_SORT_ORDER_TIP},
truelight@867: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   201,   300,    14,    25, STR_SORT_BY_PRODUCTION,		STR_SORT_ORDER_TIP},
truelight@867: { WWT_PUSHTXTBTN,   RESIZE_NONE,    13,   301,   400,    14,    25, STR_SORT_BY_TRANSPORTED,	STR_SORT_ORDER_TIP},
darkvater@893: {      WWT_PANEL,   RESIZE_NONE,    13,   401,   495,    14,    25, 0x0,											STR_NULL},
darkvater@893: {     WWT_IMGBTN, RESIZE_BOTTOM,    13,     0,   495,    26,   189, 0x0,											STR_200A_TOWN_NAMES_CLICK_ON_NAME},
darkvater@893: {  WWT_SCROLLBAR, RESIZE_BOTTOM,    13,   496,   507,    14,   177, 0x0,											STR_0190_SCROLL_BAR_SCROLLS_LIST},
darkvater@893: {  WWT_RESIZEBOX,     RESIZE_TB,    13,   496,   507,   178,   189, 0x0,											STR_RESIZE_BUTTON},
darkvater@176: {   WIDGETS_END},
truelight@0: };
truelight@0: 
truelight@0: static uint _num_industry_sort;
truelight@0: 
truelight@0: static char _bufcache[96];
truelight@821: static uint16 _last_industry_idx;
truelight@0: 
truelight@0: static byte _industry_sort_order;
truelight@0: 
darkvater@164: static int CDECL GeneralIndustrySorter(const void *a, const void *b)
truelight@0: {
truelight@0: 	char buf1[96];
truelight@1267: 	uint16 val;
truelight@919: 	Industry *i = GetIndustry(*(const uint16*)a);
truelight@919: 	Industry *j = GetIndustry(*(const uint16*)b);
truelight@0: 	int r = 0;
truelight@0: 
truelight@0: 	switch (_industry_sort_order >> 1) {
darkvater@164: 	/* case 0: Sort by Name (handled later) */
darkvater@164: 	case 1: /* Sort by Type */
truelight@193: 		r = i->type - j->type;
truelight@0: 		break;
darkvater@164: 	// FIXME - Production & Transported sort need to be inversed...but, WTF it does not wanna!
darkvater@164: 	// FIXME - And no simple --> "if (!(_industry_sort_order & 1)) r = -r;" hack at the bottom!!
darkvater@164: 	case 2: { /* Sort by Production */
tron@2469: 		if (i->produced_cargo[0] != CT_INVALID && j->produced_cargo[0] != CT_INVALID) { // both industries produce cargo?
tron@2469: 				if (i->produced_cargo[1] == CT_INVALID) // producing one or two things?
truelight@0: 					r = j->total_production[0] - i->total_production[0];
truelight@193: 				else
truelight@0: 					r = (j->total_production[0] + j->total_production[1]) / 2 - (i->total_production[0] + i->total_production[1]) / 2;
tron@2469: 		} else if (i->produced_cargo[0] == CT_INVALID && j->produced_cargo[0] == CT_INVALID) // none of them producing anything, let them go to the name-sorting
truelight@0: 			r = 0;
tron@2469: 		else if (i->produced_cargo[0] == CT_INVALID) // end up the non-producer industry first/last in list
truelight@0: 			r = 1;
truelight@0: 		else
truelight@0: 			r = -1;
truelight@0: 		break;
darkvater@164: 	}
darkvater@164: 	case 3: /* Sort by Transported amount */
tron@2469: 		if (i->produced_cargo[0] != CT_INVALID && j->produced_cargo[0] != CT_INVALID) { // both industries produce cargo?
tron@2469: 				if (i->produced_cargo[1] == CT_INVALID) // producing one or two things?
truelight@0: 					r = (j->pct_transported[0] * 100 >> 8) - (i->pct_transported[0] * 100 >> 8);
truelight@193: 				else
truelight@0: 					r = ((j->pct_transported[0] * 100 >> 8) + (j->pct_transported[1] * 100 >> 8)) / 2 - ((i->pct_transported[0] * 100 >> 8) + (i->pct_transported[1] * 100 >> 8)) / 2;
tron@2469: 		} else if (i->produced_cargo[0] == CT_INVALID && j->produced_cargo[0] == CT_INVALID) // none of them producing anything, let them go to the name-sorting
truelight@0: 			r = 0;
tron@2469: 		else if (i->produced_cargo[0] == CT_INVALID) // end up the non-producer industry first/last in list
truelight@0: 			r = 1;
truelight@0: 		else
truelight@0: 			r = -1;
truelight@0: 		break;
truelight@0: 	}
truelight@0: 
truelight@0: 	// default to string sorting if they are otherwise equal
truelight@0: 	if (r == 0) {
ludde@2070: 		SetDParam(0, i->town->index);
ludde@2070: 		GetString(buf1, STR_TOWN);
truelight@0: 
truelight@821: 		if ( (val=*(const uint16*)b) != _last_industry_idx) {
truelight@0: 			_last_industry_idx = val;
ludde@2070: 			SetDParam(0, j->town->index);
ludde@2070: 			GetString(_bufcache, STR_TOWN);
truelight@0: 		}
truelight@0: 		r = strcmp(buf1, _bufcache);
truelight@0: 	}
truelight@193: 
truelight@193: 	if (_industry_sort_order & 1) r = -r;
truelight@0: 	return r;
truelight@0: }
truelight@0: 
tron@1093: static void MakeSortedIndustryList(void)
truelight@0: {
truelight@0: 	Industry *i;
truelight@919: 	int n = 0;
truelight@919: 
truelight@919: 	/* Create array for sorting */
truelight@1267: 	_industry_sort = realloc(_industry_sort, GetIndustryPoolSize() * sizeof(_industry_sort[0]));
truelight@919: 	if (_industry_sort == NULL)
truelight@919: 		error("Could not allocate memory for the industry-sorting-list");
truelight@0: 
truelight@830: 	FOR_ALL_INDUSTRIES(i) {
truelight@821: 		if(i->xy)
truelight@919: 			_industry_sort[n++] = i->index;
truelight@0: 	}
truelight@0: 	_num_industry_sort = n;
truelight@821: 	_last_industry_idx = 0xFFFF; // used for "cache"
truelight@0: 
truelight@821: 	qsort(_industry_sort, n, sizeof(_industry_sort[0]), GeneralIndustrySorter);
darkvater@65: 
darkvater@69: 	DEBUG(misc, 1) ("Resorting Industries list...");
truelight@0: }
truelight@0: 
truelight@0: 
truelight@0: static void IndustryDirectoryWndProc(Window *w, WindowEvent *e)
truelight@0: {
truelight@0: 	switch(e->event) {
truelight@0: 	case WE_PAINT: {
truelight@0: 		int n;
truelight@0: 		uint p;
truelight@0: 		Industry *i;
truelight@0: 		static const uint16 _indicator_positions[4] = {88, 187, 284, 387};
truelight@0: 
truelight@0: 		if (_industry_sort_dirty) {
truelight@0: 			_industry_sort_dirty = false;
truelight@0: 			MakeSortedIndustryList();
truelight@0: 		}
truelight@0: 
bjarni@1666: 		SetVScrollCount(w, _num_industry_sort);
truelight@0: 
truelight@0: 		DrawWindowWidgets(w);
tron@2406: 		DoDrawString(_industry_sort_order & 1 ? DOWNARROW : UPARROW, _indicator_positions[_industry_sort_order>>1], 15, 0x10);
truelight@0: 
truelight@0: 		p = w->vscroll.pos;
truelight@0: 		n = 0;
truelight@0: 
truelight@0: 		while (p < _num_industry_sort) {
truelight@919: 			i = GetIndustry(_industry_sort[p]);
ludde@2070: 			SetDParam(0, i->index);
tron@2469: 			if (i->produced_cargo[0] != CT_INVALID) {
ludde@2084: 				SetDParam(1, _cargoc.names_long[i->produced_cargo[0]]);
ludde@2070: 				SetDParam(2, i->total_production[0]);
truelight@193: 
tron@2469: 				if (i->produced_cargo[1] != CT_INVALID) {
ludde@2084: 					SetDParam(3, _cargoc.names_long[i->produced_cargo[1]]);
ludde@2070: 					SetDParam(4, i->total_production[1]);
ludde@2070: 					SetDParam(5, i->pct_transported[0] * 100 >> 8);
ludde@2070: 					SetDParam(6, i->pct_transported[1] * 100 >> 8);
truelight@0: 					DrawString(4, 28+n*10, STR_INDUSTRYDIR_ITEM_TWO, 0);
truelight@0: 				} else {
ludde@2070: 					SetDParam(3, i->pct_transported[0] * 100 >> 8);
truelight@0: 					DrawString(4, 28+n*10, STR_INDUSTRYDIR_ITEM, 0);
truelight@0: 				}
truelight@0: 			} else {
truelight@0: 				DrawString(4, 28+n*10, STR_INDUSTRYDIR_ITEM_NOPROD, 0);
truelight@0: 			}
truelight@0: 			p++;
truelight@867: 			if (++n == w->vscroll.cap)
truelight@0: 				break;
truelight@0: 		}
truelight@0: 	} break;
truelight@0: 
truelight@0: 	case WE_CLICK:
truelight@0: 		switch(e->click.widget) {
darkvater@758: 		case 3: {
truelight@0: 			_industry_sort_order = _industry_sort_order==0 ? 1 : 0;
truelight@0: 			_industry_sort_dirty = true;
truelight@0: 			SetWindowDirty(w);
truelight@0: 		} break;
truelight@0: 
darkvater@758: 		case 4: {
truelight@0: 			_industry_sort_order = _industry_sort_order==2 ? 3 : 2;
truelight@0: 			_industry_sort_dirty = true;
truelight@0: 			SetWindowDirty(w);
truelight@0: 		} break;
truelight@0: 
darkvater@758: 		case 5: {
truelight@0: 			_industry_sort_order = _industry_sort_order==4 ? 5 : 4;
truelight@0: 			_industry_sort_dirty = true;
truelight@0: 			SetWindowDirty(w);
truelight@0: 		} break;
truelight@0: 
darkvater@758: 		case 6: {
truelight@0: 			_industry_sort_order = _industry_sort_order==6 ? 7 : 6;
truelight@0: 			_industry_sort_dirty = true;
truelight@0: 			SetWindowDirty(w);
truelight@0: 		} break;
truelight@193: 
darkvater@758: 		case 8: {
truelight@0: 			int y = (e->click.pt.y - 28) / 10;
truelight@821: 			uint16 p;
truelight@0: 			Industry *c;
truelight@0: 
truelight@867: 			if (!IS_INT_INSIDE(y, 0, w->vscroll.cap))
truelight@0: 				return;
truelight@0: 			p = y + w->vscroll.pos;
truelight@0: 			if (p < _num_industry_sort) {
truelight@919: 				c = GetIndustry(_industry_sort[p]);
truelight@0: 				ScrollMainWindowToTile(c->xy);
truelight@0: 			}
truelight@0: 		} break;
truelight@0: 		}
truelight@0: 		break;
truelight@0: 
truelight@0: 	case WE_4:
truelight@0: 		SetWindowDirty(w);
truelight@0: 		break;
truelight@867: 
truelight@867: 	case WE_RESIZE:
truelight@867: 		w->vscroll.cap += e->sizing.diff.y / 10;
truelight@867: 		break;
truelight@193: 	}
truelight@0: }
truelight@0: 
truelight@0: 
truelight@0: /* Industry List */
truelight@0: static const WindowDesc _industry_directory_desc = {
truelight@0: 	-1, -1, 508, 190,
truelight@0: 	WC_INDUSTRY_DIRECTORY,0,
truelight@867: 	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_STICKY_BUTTON | WDF_RESIZABLE,
truelight@0: 	_industry_directory_widgets,
truelight@0: 	IndustryDirectoryWndProc
truelight@0: };
truelight@0: 
truelight@0: 
truelight@0: 
tron@1093: void ShowIndustryDirectory(void)
truelight@0: {
truelight@0: 	/* Industry List */
truelight@0: 	Window *w;
truelight@0: 
truelight@0: 	w = AllocateWindowDescFront(&_industry_directory_desc, 0);
truelight@0: 	if (w) {
truelight@0: 		w->vscroll.cap = 16;
truelight@867: 		w->resize.height = w->height - 6 * 10; // minimum 10 items
truelight@867: 		w->resize.step_height = 10;
truelight@0: 		SetWindowDirty(w);
truelight@0: 	}
truelight@0: }