--- a/src/train_gui.cpp Sun Jan 21 20:54:29 2007 +0000
+++ b/src/train_gui.cpp Sun Jan 21 22:50:43 2007 +0000
@@ -4,326 +4,17 @@
#include "openttd.h"
#include "debug.h"
#include "functions.h"
-#include "rail_map.h"
#include "table/sprites.h"
#include "table/strings.h"
-#include "map.h"
-#include "engine.h"
#include "window.h"
#include "gui.h"
-#include "gfx.h"
#include "vehicle.h"
#include "viewport.h"
-#include "station.h"
#include "command.h"
-#include "player.h"
#include "vehicle_gui.h"
#include "depot.h"
#include "train.h"
#include "newgrf_engine.h"
-#include "date.h"
-#include "strings.h"
-
-enum BuildTrainWidgets {
- BUILD_TRAIN_WIDGET_CLOSEBOX = 0,
- BUILD_TRAIN_WIDGET_CAPTION,
- BUILD_TRAIN_WIDGET_SORT_ASCENDING_DESCENDING,
- BUILD_TRAIN_WIDGET_SORT_TEXT,
- BUILD_TRAIN_WIDGET_SORT_DROPDOWN,
- BUILD_TRAIN_WIDGET_LIST,
- BUILD_TRAIN_WIDGET_SCROLLBAR,
- BUILD_TRAIN_WIDGET_PANEL,
- BUILD_TRAIN_WIDGET_BUILD,
- BUILD_TRAIN_WIDGET_RENAME,
- BUILD_TRAIN_WIDGET_RESIZE,
-};
-
-static const Widget _new_rail_vehicle_widgets[] = {
- { WWT_CLOSEBOX, RESIZE_NONE, 14, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW},
- { WWT_CAPTION, RESIZE_NONE, 14, 11, 227, 0, 13, STR_JUST_STRING, STR_018C_WINDOW_TITLE_DRAG_THIS},
- { WWT_PUSHTXTBTN, RESIZE_NONE, 14, 0, 80, 14, 25, STR_SORT_BY, STR_SORT_ORDER_TIP},
- { WWT_PANEL, RESIZE_NONE, 14, 81, 215, 14, 25, 0x0, STR_SORT_CRITERIA_TIP},
- { WWT_TEXTBTN, RESIZE_NONE, 14, 216, 227, 14, 25, STR_0225, STR_SORT_CRITERIA_TIP},
- { WWT_MATRIX, RESIZE_BOTTOM, 14, 0, 215, 26, 137, 0x801, STR_8843_TRAIN_VEHICLE_SELECTION},
- { WWT_SCROLLBAR, RESIZE_BOTTOM, 14, 216, 227, 26, 137, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
- { WWT_PANEL, RESIZE_TB, 14, 0, 227, 138, 239, 0x0, STR_NULL},
- { WWT_PUSHTXTBTN, RESIZE_TB, 14, 0, 107, 240, 251, STR_881F_BUILD_VEHICLE, STR_8844_BUILD_THE_HIGHLIGHTED_TRAIN},
- { WWT_PUSHTXTBTN, RESIZE_TB, 14, 108, 215, 240, 251, STR_8820_RENAME, STR_8845_RENAME_TRAIN_VEHICLE_TYPE},
- { WWT_RESIZEBOX, RESIZE_TB, 14, 216, 227, 240, 251, 0x0, STR_RESIZE_BUTTON},
- { WIDGETS_END},
-};
-
-static bool _internal_sort_order; // false = ascending, true = descending
-static byte _last_sort_criteria = 0;
-static bool _last_sort_order = false;
-
-static int CDECL TrainEngineNumberSorter(const void *a, const void *b)
-{
- const EngineID va = *(const EngineID*)a;
- const EngineID vb = *(const EngineID*)b;
- int r = ListPositionOfEngine(va) - ListPositionOfEngine(vb);
-
- return _internal_sort_order ? -r : r;
-}
-
-static int CDECL TrainEnginesThenWagonsSorter(const void *a, const void *b)
-{
- EngineID va = *(const EngineID*)a;
- EngineID vb = *(const EngineID*)b;
- int val_a = ((RailVehInfo(va)->flags & RVI_WAGON) != 0) ? 1 : 0;
- int val_b = ((RailVehInfo(vb)->flags & RVI_WAGON) != 0) ? 1 : 0;
- int r = val_a - val_b;
-
- /* Use EngineID to sort instead since we want consistent sorting */
- if (r == 0) return TrainEngineNumberSorter(a, b);
-
- return _internal_sort_order ? -r : r;
-}
-
-static int CDECL TrainEngineCostSorter(const void *a, const void *b)
-{
- int va = RailVehInfo(*(const EngineID*)a)->base_cost;
- int vb = RailVehInfo(*(const EngineID*)b)->base_cost;
- int r = va - vb;
-
- return _internal_sort_order ? -r : r;
-}
-
-static int CDECL TrainEngineSpeedSorter(const void *a, const void *b)
-{
- int va = RailVehInfo(*(const EngineID*)a)->max_speed;
- int vb = RailVehInfo(*(const EngineID*)b)->max_speed;
- int r = va - vb;
-
- return _internal_sort_order ? -r : r;
-}
-
-static int CDECL TrainEnginePowerSorter(const void *a, const void *b)
-{
- const RailVehicleInfo *rvi_a = RailVehInfo(*(const EngineID*)a);
- const RailVehicleInfo *rvi_b = RailVehInfo(*(const EngineID*)b);
-
- int va = rvi_a->power << (rvi_a->flags & RVI_MULTIHEAD ? 1 : 0);
- int vb = rvi_b->power << (rvi_b->flags & RVI_MULTIHEAD ? 1 : 0);
- int r = va - vb;
-
- return _internal_sort_order ? -r : r;
-}
-
-static int CDECL TrainEngineIntroDateSorter(const void *a, const void *b)
-{
- int va = GetEngine(*(const EngineID*)a)->intro_date;
- int vb = GetEngine(*(const EngineID*)b)->intro_date;
- int r = va - vb;
-
- return _internal_sort_order ? -r : r;
-}
-
-static EngineID _last_engine; // cached vehicle to hopefully speed up name-sorting
-
-static char _bufcache[64]; // used together with _last_vehicle to hopefully speed up stringsorting
-static int CDECL TrainEngineNameSorter(const void *a, const void *b)
-{
- const EngineID va = *(const EngineID*)a;
- const EngineID vb = *(const EngineID*)b;
- char buf1[64];
- int r;
-
- GetString(buf1, GetCustomEngineName(va), lastof(buf1));
-
- if (vb != _last_engine) {
- _last_engine = vb;
- _bufcache[0] = '\0';
-
- GetString(_bufcache, GetCustomEngineName(vb), lastof(_bufcache));
- }
-
- r = strcasecmp(buf1, _bufcache); // sort by name
-
- return _internal_sort_order ? -r : r;
-}
-
-static int CDECL TrainEngineRunningCostSorter(const void *a, const void *b)
-{
- const RailVehicleInfo *rvi_a = RailVehInfo(*(const EngineID*)a);
- const RailVehicleInfo *rvi_b = RailVehInfo(*(const EngineID*)b);
-
- int va = rvi_a->running_cost_base * _price.running_rail[rvi_a->running_cost_class] * (rvi_a->flags & RVI_MULTIHEAD ? 2 : 1);
- int vb = rvi_b->running_cost_base * _price.running_rail[rvi_b->running_cost_class] * (rvi_b->flags & RVI_MULTIHEAD ? 2 : 1);
- int r = va - vb;
-
- return _internal_sort_order ? -r : r;
-}
-
-static int CDECL TrainEnginePowerVsRunningCostSorter(const void *a, const void *b)
-{
- const RailVehicleInfo *rvi_a = RailVehInfo(*(const EngineID*)a);
- const RailVehicleInfo *rvi_b = RailVehInfo(*(const EngineID*)b);
-
- /* Here we are using a few tricks to get the right sort.
- * We want power/running cost, but since we usually got higher running cost than power and we store the result in an int,
- * we will actually calculate cunning cost/power (to make it more than 1).
- * Because of this, the return value have to be reversed as well and we return b - a instead of a - b.
- * Another thing is that both power and running costs should be doubled for multiheaded engines.
- * Since it would be multipling with 2 in both numerator and denumerator, it will even themselves out and we skip checking for multiheaded. */
- int va = (rvi_a->running_cost_base * _price.running_rail[rvi_a->running_cost_class]) / max((uint16)1, rvi_a->power);
- int vb = (rvi_b->running_cost_base * _price.running_rail[rvi_b->running_cost_class]) / max((uint16)1, rvi_b->power);
- int r = vb - va;
-
- return _internal_sort_order ? -r : r;
-}
-
-static int CDECL TrainEngineReliabilitySorter(const void *a, const void *b)
-{
- int va = GetEngine(*(const EngineID*)a)->reliability;
- int vb = GetEngine(*(const EngineID*)b)->reliability;
- int r = va - vb;
-
- return _internal_sort_order ? -r : r;
-}
-
-static EngList_SortTypeFunction * const _engine_sorter[] = {
- &TrainEngineNumberSorter,
- &TrainEngineCostSorter,
- &TrainEngineSpeedSorter,
- &TrainEnginePowerSorter,
- &TrainEngineIntroDateSorter,
- &TrainEngineNameSorter,
- &TrainEngineRunningCostSorter,
- &TrainEnginePowerVsRunningCostSorter,
- &TrainEngineReliabilitySorter,
-};
-
-static const StringID _engine_sort_listing[] = {
- STR_ENGINE_SORT_ENGINE_ID,
- STR_ENGINE_SORT_COST,
- STR_SORT_BY_MAX_SPEED,
- STR_ENGINE_SORT_POWER,
- STR_ENGINE_SORT_INTRO_DATE,
- STR_SORT_BY_DROPDOWN_NAME,
- STR_ENGINE_SORT_RUNNING_COST,
- STR_ENGINE_SORT_POWER_VS_RUNNING_COST,
- STR_SORT_BY_RELIABILITY,
- INVALID_STRING_ID
-};
-
-/**
- * Draw the purchase info details of train engine at a given location.
- * @param x,y location where to draw the info
- * @param engine_number the engine of which to draw the info of
- */
-void DrawTrainEnginePurchaseInfo(int x, int y, uint w, EngineID engine_number)
-{
- const RailVehicleInfo *rvi = RailVehInfo(engine_number);
- const Engine *e = GetEngine(engine_number);
- int multihead = (rvi->flags&RVI_MULTIHEAD?1:0);
- YearMonthDay ymd;
- ConvertDateToYMD(e->intro_date, &ymd);
-
- /* Purchase Cost - Engine weight */
- SetDParam(0, rvi->base_cost * (_price.build_railvehicle >> 3) >> 5);
- SetDParam(1, rvi->weight << multihead);
- DrawString(x,y, STR_PURCHASE_INFO_COST_WEIGHT, 0);
- y += 10;
-
- /* Max speed - Engine power */
- SetDParam(0, rvi->max_speed);
- SetDParam(1, rvi->power << multihead);
- DrawString(x,y, STR_PURCHASE_INFO_SPEED_POWER, 0);
- y += 10;
-
- /* Max tractive effort - not applicable if old acceleration or maglev */
- if (_patches.realistic_acceleration && e->railtype != RAILTYPE_MAGLEV) {
- SetDParam(0, ((rvi->weight << multihead) * 10 * rvi->tractive_effort) / 256);
- DrawString(x, y, STR_PURCHASE_INFO_MAX_TE, 0);
- y += 10;
- }
-
- /* Running cost */
- SetDParam(0, (rvi->running_cost_base * _price.running_rail[rvi->running_cost_class] >> 8) << multihead);
- DrawString(x,y, STR_PURCHASE_INFO_RUNNINGCOST, 0);
- y += 10;
-
- /* Powered wagons power - Powered wagons extra weight */
- if (rvi->pow_wag_power != 0) {
- SetDParam(0, rvi->pow_wag_power);
- SetDParam(1, rvi->pow_wag_weight);
- DrawString(x,y, STR_PURCHASE_INFO_PWAGPOWER_PWAGWEIGHT, 0);
- y += 10;
- };
-
- /* Cargo type + capacity, or N/A */
- if (rvi->capacity == 0) {
- SetDParam(0, CT_INVALID);
- SetDParam(2, STR_EMPTY);
- } else {
- SetDParam(0, rvi->cargo_type);
- SetDParam(1, (rvi->capacity * (CountArticulatedParts(engine_number) + 1)) << multihead);
- SetDParam(2, STR_9842_REFITTABLE);
- }
- DrawString(x,y, STR_PURCHASE_INFO_CAPACITY, 0);
- y += 10;
-
- /* Design date - Life length */
- SetDParam(0, ymd.year);
- SetDParam(1, e->lifelength);
- DrawString(x,y, STR_PURCHASE_INFO_DESIGNED_LIFE, 0);
- y += 10;
-
- /* Reliability */
- SetDParam(0, e->reliability * 100 >> 16);
- DrawString(x,y, STR_PURCHASE_INFO_RELIABILITY, 0);
- y += 10;
-
- /* Additional text from NewGRF */
- y += ShowAdditionalText(x, y, w, engine_number);
- if (rvi->capacity > 0) y += ShowRefitOptionsList(x, y, w, engine_number);
-}
-
-/**
- * Draw the purchase info details of a train wagon at a given location.
- * @param x,y location where to draw the info
- * @param engine_number the engine of which to draw the info of
- */
-void DrawTrainWagonPurchaseInfo(int x, int y, uint w, EngineID engine_number)
-{
- const RailVehicleInfo *rvi = RailVehInfo(engine_number);
- bool refittable = (EngInfo(engine_number)->refit_mask != 0);
-
- /* Purchase cost */
- SetDParam(0, (rvi->base_cost * _price.build_railwagon) >> 8);
- DrawString(x, y, STR_PURCHASE_INFO_COST, 0);
- y += 10;
-
- /* Wagon weight - (including cargo) */
- SetDParam(0, rvi->weight);
- SetDParam(1, (_cargoc.weights[rvi->cargo_type] * rvi->capacity >> 4) + rvi->weight);
- DrawString(x, y, STR_PURCHASE_INFO_WEIGHT_CWEIGHT, 0);
- y += 10;
-
- /* Cargo type + capacity, or N/A */
- if (rvi->capacity == 0) {
- SetDParam(0, CT_INVALID);
- SetDParam(2, STR_EMPTY);
- } else {
- SetDParam(0, rvi->cargo_type);
- SetDParam(1, rvi->capacity * (CountArticulatedParts(engine_number) + 1));
- SetDParam(2, refittable ? STR_9842_REFITTABLE : STR_EMPTY);
- }
- DrawString(x, y, STR_PURCHASE_INFO_CAPACITY, 0);
- y += 10;
-
- /* Wagon speed limit, displayed if above zero */
- if (rvi->max_speed > 0 && _patches.wagon_speed_limits) {
- SetDParam(0, rvi->max_speed);
- DrawString(x,y, STR_PURCHASE_INFO_SPEED, 0);
- y += 10;
- }
-
- /* Additional text from NewGRF */
- y += ShowAdditionalText(x, y, w, engine_number);
- y += ShowRefitOptionsList(x, y, w, engine_number);
-}
void CcBuildWagon(bool success, TileIndex tile, uint32 p1, uint32 p2)
{
@@ -370,215 +61,6 @@
if (success) ShowTrainViewWindow(GetVehicle(_new_vehicle_id));
}
-static void engine_drawing_loop(const EngineList *engines, int x, int *y, EngineID sel, EngineID position, int16 show_max)
-{
- int count = min(EngList_Count(engines), show_max);
- for (; position < count; *y += 14, position++) {
- EngineID id = (*engines)[position];
- DrawString(x + 59, *y + 2, GetCustomEngineName(id), sel == id ? 0xC : 0x10);
- DrawTrainEngine(x + 29, *y + 6, id, GetEnginePalette(id, _local_player));
- }
-}
-
-static void GenerateBuildList(Window *w)
-{
- EngineID eid, sel_id;
- int num_engines = 0;
- int num_wagons = 0;
- buildvehicle_d *bv = &WP(w, buildvehicle_d);
-
- bv->filter.railtype = (w->window_number == 0) ? RAILTYPE_END : GetRailType(w->window_number);
-
- EngList_RemoveAll(&bv->eng_list);
-
- /* Make list of all available train engines and wagons.
- * Also check to see if the previously selected engine is still available,
- * and if not, reset selection to INVALID_ENGINE. This could be the case
- * when engines become obsolete and are removed */
- for (sel_id = INVALID_ENGINE, eid = 0; eid < NUM_TRAIN_ENGINES; eid++) {
- const Engine *e = GetEngine(eid);
- const RailVehicleInfo *rvi = RailVehInfo(eid);
-
- if (bv->filter.railtype != RAILTYPE_END && !HasPowerOnRail(e->railtype, bv->filter.railtype)) continue;
- if (!IsEngineBuildable(eid, VEH_Train, _local_player)) continue;
-
- EngList_Add(&bv->eng_list, eid);
- if ((rvi->flags & RVI_WAGON) == 0) {
- num_engines++;
- } else {
- num_wagons++;
- }
-
- if (eid == bv->sel_engine) sel_id = eid;
- }
-
- bv->sel_engine = sel_id;
-
- // make engines first, and then wagons, sorted by ListPositionOfEngine()
- _internal_sort_order = false;
- EngList_Sort(&bv->eng_list, TrainEnginesThenWagonsSorter);
-
- // and then sort engines
- _internal_sort_order = bv->descending_sort_order;
- EngList_SortPartial(&bv->eng_list, _engine_sorter[bv->sort_criteria], 0, num_engines);
-
- // and finally sort wagons
- EngList_SortPartial(&bv->eng_list, _engine_sorter[bv->sort_criteria], num_engines, num_wagons);
-}
-
-static void DrawTrainBuildWindow(Window *w)
-{
- const buildvehicle_d *bv = &WP(w, buildvehicle_d);
- int x = 1;
- int y = 27;
- EngineID selected_id = bv->sel_engine;
- int max = w->vscroll.pos + w->vscroll.cap;
-
- SetWindowWidgetDisabledState(w, BUILD_TRAIN_WIDGET_BUILD, w->window_number == 0); // Disable unless we got a depot to build in
-
- SetVScrollCount(w, EngList_Count(&bv->eng_list));
- SetDParam(0, bv->filter.railtype + STR_881C_NEW_RAIL_VEHICLES);
- DrawWindowWidgets(w);
-
- /* Draw the engines */
- engine_drawing_loop(&bv->eng_list, x, &y, selected_id, w->vscroll.pos, max);
-
- if (selected_id != INVALID_ENGINE) {
- const RailVehicleInfo *rvi = RailVehInfo(selected_id);
- const Widget *wi = &w->widget[BUILD_TRAIN_WIDGET_PANEL];
-
- if (rvi->flags & RVI_WAGON) {
- DrawTrainWagonPurchaseInfo(2, wi->top + 1, wi->right - wi->left - 2, selected_id);
- } else {
- DrawTrainEnginePurchaseInfo(2, wi->top + 1, wi->right - wi->left - 2, selected_id);
- }
- }
- DrawString(85, 15, _engine_sort_listing[bv->sort_criteria], 0x10);
- DoDrawString(bv->descending_sort_order ? DOWNARROW : UPARROW, 69, 15, 0x10);
-}
-
-static void NewRailVehicleWndProc(Window *w, WindowEvent *e)
-{
- buildvehicle_d *bv = &WP(w, buildvehicle_d);
- switch (e->event) {
- case WE_CREATE:
- EngList_Create(&bv->eng_list);
- bv->sel_engine = INVALID_ENGINE;
- bv->sort_criteria = _last_sort_criteria;
- bv->descending_sort_order = _last_sort_order;
- GenerateBuildList(w);
- /* Select the first engine in the list as default when opening the window */
- if (EngList_Count(&bv->eng_list) > 0) bv->sel_engine = bv->eng_list[0];
- break;
-
- case WE_INVALIDATE_DATA:
- GenerateBuildList(w);
- break;
-
- case WE_DESTROY:
- EngList_Destroy(&bv->eng_list);
- break;
-
- case WE_PAINT:
- DrawTrainBuildWindow(w);
- break;
-
- case WE_CLICK: {
- switch (e->we.click.widget) {
- case BUILD_TRAIN_WIDGET_SORT_ASCENDING_DESCENDING:
- bv->descending_sort_order ^= true;
- _last_sort_order = bv->descending_sort_order;
- GenerateBuildList(w);
- SetWindowDirty(w);
- break;
-
- case BUILD_TRAIN_WIDGET_SORT_TEXT: case BUILD_TRAIN_WIDGET_SORT_DROPDOWN:/* Select sorting criteria dropdown menu */
- ShowDropDownMenu(w, _engine_sort_listing, bv->sort_criteria, BUILD_TRAIN_WIDGET_SORT_DROPDOWN, 0, 0);
- return;
-
- case BUILD_TRAIN_WIDGET_LIST: {
- uint i = ((e->we.click.pt.y - 26) / 14) + w->vscroll.pos;
- uint num_items = EngList_Count(&bv->eng_list);
- bv->sel_engine = (i < num_items) ? bv->eng_list[i] : INVALID_ENGINE;
- SetWindowDirty(w);
- break;
- }
-
- case BUILD_TRAIN_WIDGET_BUILD: {
- EngineID sel_eng = bv->sel_engine;
- if (sel_eng != INVALID_ENGINE)
- DoCommandP(w->window_number, sel_eng, 0, (RailVehInfo(sel_eng)->flags & RVI_WAGON) ? CcBuildWagon : CcBuildLoco, CMD_BUILD_RAIL_VEHICLE | CMD_MSG(STR_882B_CAN_T_BUILD_RAILROAD_VEHICLE));
- break;
- }
-
- case BUILD_TRAIN_WIDGET_RENAME: {
- EngineID sel_eng = bv->sel_engine;
- if (sel_eng != INVALID_ENGINE) {
- bv->rename_engine = sel_eng;
- ShowQueryString(GetCustomEngineName(sel_eng), STR_886A_RENAME_TRAIN_VEHICLE_TYPE, 31, 160, w, CS_ALPHANUMERAL);
- }
- break;
- }
- }
- }
- break;
-
- case WE_ON_EDIT_TEXT: {
- if (e->we.edittext.str[0] != '\0') {
- _cmd_text = e->we.edittext.str;
- DoCommandP(0, bv->rename_engine, 0, NULL, CMD_RENAME_ENGINE | CMD_MSG(STR_886B_CAN_T_RENAME_TRAIN_VEHICLE));
- }
- break;
- }
-
- case WE_DROPDOWN_SELECT: /* we have selected a dropdown item in the list */
- if (bv->sort_criteria != e->we.dropdown.index) {
- bv->sort_criteria = _last_sort_criteria = e->we.dropdown.index;
- GenerateBuildList(w);
- SetWindowDirty(w);
- }
- break;
-
- case WE_RESIZE: {
- if (e->we.sizing.diff.y == 0) break;
-
- w->vscroll.cap += e->we.sizing.diff.y / 14;
- w->widget[BUILD_TRAIN_WIDGET_LIST].data = (w->vscroll.cap << 8) + 1;
- break;
- }
- }
-}
-
-static const WindowDesc _new_rail_vehicle_desc = {
- WDP_AUTO, WDP_AUTO, 228, 252,
- WC_BUILD_VEHICLE,0,
- WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS | WDF_RESIZABLE,
- _new_rail_vehicle_widgets,
- NewRailVehicleWndProc
-};
-
-void ShowBuildTrainWindow(TileIndex tile)
-{
- Window *w;
-
- DeleteWindowById(WC_BUILD_VEHICLE, tile);
-
- w = AllocateWindowDescFront(&_new_rail_vehicle_desc, tile);
- w->vscroll.cap = 8;
- w->widget[BUILD_TRAIN_WIDGET_LIST].data = (w->vscroll.cap << 8) + 1;
-
- w->resize.step_height = 14;
- w->resize.height = w->height - 14 * 4; // Minimum of 4 vehicles in the display
-
- if (tile != 0) {
- w->caption_color = GetTileOwner(tile);
- WP(w,buildvehicle_d).filter.railtype = GetRailType(tile);
- } else {
- w->caption_color = _local_player;
- WP(w,buildvehicle_d).filter.railtype = RAILTYPE_END;
- }
-}
-
/**
* Get the number of pixels for the given wagon length.
* @param len Length measured in 1/8ths of a standard wagon.