author | belugas |
Thu, 28 Jun 2007 02:14:40 +0000 | |
changeset 7102 | fe01c264132b |
parent 7058 | 8105bb13ce3d |
child 7266 | b16e67e992b4 |
permissions | -rw-r--r-- |
2186 | 1 |
/* $Id$ */ |
2 |
||
6420
456c275f3313
(svn r9556) -Documentation: doxygen and comment-style changes. 'R', 'S'.. The end of the preliminary work is near
belugas
parents:
6328
diff
changeset
|
3 |
/** @file subsidy_gui.cpp */ |
456c275f3313
(svn r9556) -Documentation: doxygen and comment-style changes. 'R', 'S'.. The end of the preliminary work is near
belugas
parents:
6328
diff
changeset
|
4 |
|
0 | 5 |
#include "stdafx.h" |
1891
862800791170
(svn r2397) - CodeChange: rename all "ttd" files to "openttd" files.
Darkvater
parents:
1093
diff
changeset
|
6 |
#include "openttd.h" |
507
04b5403aaf6b
(svn r815) Include strings.h only in the files which need it.
tron
parents:
193
diff
changeset
|
7 |
#include "table/strings.h" |
2163
b17b313113a0
(svn r2673) Include functions.h directly, not globally via openttd.h
tron
parents:
2159
diff
changeset
|
8 |
#include "functions.h" |
0 | 9 |
#include "window.h" |
10 |
#include "station.h" |
|
11 |
#include "industry.h" |
|
12 |
#include "town.h" |
|
13 |
#include "player.h" |
|
14 |
#include "gfx.h" |
|
15 |
#include "economy.h" |
|
2159
f6284cf5fab0
(svn r2669) Shuffle some more stuff around to reduce dependencies
tron
parents:
1962
diff
changeset
|
16 |
#include "variables.h" |
4261
28670f743746
(svn r5887) -Cleanup: move date related functions, defines and variables to date.[ch]
rubidium
parents:
4171
diff
changeset
|
17 |
#include "date.h" |
6328
1a886da998fa
(svn r9300) -Codechange: Use cargo's town effect property in the subsidy gui
peter1138
parents:
6247
diff
changeset
|
18 |
#include "cargotype.h" |
0 | 19 |
|
20 |
static void HandleSubsidyClick(int y) |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
176
diff
changeset
|
21 |
{ |
4171 | 22 |
const Subsidy *s; |
2639 | 23 |
uint num; |
24 |
int offs; |
|
0 | 25 |
TileIndex xy; |
26 |
||
2639 | 27 |
if (y < 0) return; |
0 | 28 |
|
29 |
num = 0; |
|
2639 | 30 |
for (s = _subsidies; s != endof(_subsidies); s++) { |
2469
59a0073914d8
(svn r2995) Replace 0xFF/0xFFFF with CT_INVALID/OWNER_SPECTATOR/INVALID_STATION where appropriate
tron
parents:
2186
diff
changeset
|
31 |
if (s->cargo_type != CT_INVALID && s->age < 12) { |
0 | 32 |
y -= 10; |
33 |
if (y < 0) goto handle_click; |
|
34 |
num++; |
|
35 |
} |
|
36 |
} |
|
37 |
||
38 |
if (num == 0) { |
|
39 |
y -= 10; |
|
40 |
if (y < 0) return; |
|
41 |
} |
|
42 |
||
43 |
y -= 11; |
|
44 |
if (y < 0) return; |
|
45 |
||
2639 | 46 |
for (s = _subsidies; s != endof(_subsidies); s++) { |
2469
59a0073914d8
(svn r2995) Replace 0xFF/0xFFFF with CT_INVALID/OWNER_SPECTATOR/INVALID_STATION where appropriate
tron
parents:
2186
diff
changeset
|
47 |
if (s->cargo_type != CT_INVALID && s->age >= 12) { |
0 | 48 |
y -= 10; |
49 |
if (y < 0) goto handle_click; |
|
50 |
} |
|
51 |
} |
|
52 |
return; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
176
diff
changeset
|
53 |
|
0 | 54 |
handle_click: |
55 |
||
6328
1a886da998fa
(svn r9300) -Codechange: Use cargo's town effect property in the subsidy gui
peter1138
parents:
6247
diff
changeset
|
56 |
TownEffect te = GetCargo(s->cargo_type)->town_effect; |
1a886da998fa
(svn r9300) -Codechange: Use cargo's town effect property in the subsidy gui
peter1138
parents:
6247
diff
changeset
|
57 |
|
0 | 58 |
/* determine from coordinate for subsidy and try to scroll to it */ |
59 |
offs = s->from; |
|
60 |
if (s->age >= 12) { |
|
919
544f374ee392
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
867
diff
changeset
|
61 |
xy = GetStation(offs)->xy; |
6328
1a886da998fa
(svn r9300) -Codechange: Use cargo's town effect property in the subsidy gui
peter1138
parents:
6247
diff
changeset
|
62 |
} else if (te == TE_PASSENGERS || te == TE_MAIL) { |
919
544f374ee392
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
867
diff
changeset
|
63 |
xy = GetTown(offs)->xy; |
0 | 64 |
} else { |
919
544f374ee392
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
867
diff
changeset
|
65 |
xy = GetIndustry(offs)->xy; |
6328
1a886da998fa
(svn r9300) -Codechange: Use cargo's town effect property in the subsidy gui
peter1138
parents:
6247
diff
changeset
|
66 |
} |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
176
diff
changeset
|
67 |
|
0 | 68 |
if (!ScrollMainWindowToTile(xy)) { |
69 |
/* otherwise determine to coordinate for subsidy and scroll to it */ |
|
70 |
offs = s->to; |
|
71 |
if (s->age >= 12) { |
|
919
544f374ee392
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
867
diff
changeset
|
72 |
xy = GetStation(offs)->xy; |
6328
1a886da998fa
(svn r9300) -Codechange: Use cargo's town effect property in the subsidy gui
peter1138
parents:
6247
diff
changeset
|
73 |
} else if (te == TE_PASSENGERS || te == TE_MAIL || te == TE_GOODS || te == TE_FOOD) { |
919
544f374ee392
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
867
diff
changeset
|
74 |
xy = GetTown(offs)->xy; |
0 | 75 |
} else { |
919
544f374ee392
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
867
diff
changeset
|
76 |
xy = GetIndustry(offs)->xy; |
0 | 77 |
} |
78 |
ScrollMainWindowToTile(xy); |
|
79 |
} |
|
80 |
} |
|
81 |
||
4171 | 82 |
static void DrawSubsidiesWindow(const Window *w) |
0 | 83 |
{ |
84 |
YearMonthDay ymd; |
|
4171 | 85 |
const Subsidy *s; |
2639 | 86 |
uint num; |
87 |
int x; |
|
88 |
int y; |
|
0 | 89 |
|
90 |
DrawWindowWidgets(w); |
|
91 |
||
4288
393de75451b1
(svn r5918) -Cleanup: rename ConvertDayToYMD/ConvertYMDToDay as they really convert a Date to/from a YearMonthDay.
rubidium
parents:
4261
diff
changeset
|
92 |
ConvertDateToYMD(_date, &ymd); |
0 | 93 |
|
94 |
y = 15; |
|
95 |
x = 1; |
|
96 |
DrawString(x, y, STR_2026_SUBSIDIES_ON_OFFER_FOR, 0); |
|
97 |
y += 10; |
|
98 |
num = 0; |
|
99 |
||
2639 | 100 |
for (s = _subsidies; s != endof(_subsidies); s++) { |
2469
59a0073914d8
(svn r2995) Replace 0xFF/0xFFFF with CT_INVALID/OWNER_SPECTATOR/INVALID_STATION where appropriate
tron
parents:
2186
diff
changeset
|
101 |
if (s->cargo_type != CT_INVALID && s->age < 12) { |
2639 | 102 |
int x2; |
103 |
||
0 | 104 |
SetupSubsidyDecodeParam(s, 1); |
2639 | 105 |
x2 = DrawString(x + 2, y, STR_2027_FROM_TO, 0); |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
176
diff
changeset
|
106 |
|
534
306bc86eb23e
(svn r901) Small step in the process to clean up the DPARAM mess:
tron
parents:
507
diff
changeset
|
107 |
SetDParam(0, _date - ymd.day + 384 - s->age * 32); |
0 | 108 |
DrawString(x2, y, STR_2028_BY, 0); |
109 |
y += 10; |
|
110 |
num++; |
|
111 |
} |
|
112 |
} |
|
113 |
||
114 |
if (num == 0) { |
|
2639 | 115 |
DrawString(x + 2, y, STR_202A_NONE, 0); |
0 | 116 |
y += 10; |
117 |
} |
|
118 |
||
2639 | 119 |
DrawString(x, y + 1, STR_202B_SERVICES_ALREADY_SUBSIDISED, 0); |
0 | 120 |
y += 10; |
121 |
num = 0; |
|
122 |
||
2639 | 123 |
for (s = _subsidies; s != endof(_subsidies); s++) { |
2469
59a0073914d8
(svn r2995) Replace 0xFF/0xFFFF with CT_INVALID/OWNER_SPECTATOR/INVALID_STATION where appropriate
tron
parents:
2186
diff
changeset
|
124 |
if (s->cargo_type != CT_INVALID && s->age >= 12) { |
2639 | 125 |
int xt; |
2630 | 126 |
|
0 | 127 |
SetupSubsidyDecodeParam(s, 1); |
128 |
||
7058
8105bb13ce3d
(svn r10323) -Codechange: reference company name, number and player (president) name
peter1138
parents:
6420
diff
changeset
|
129 |
PlayerID player = GetStation(s->to)->owner; |
8105bb13ce3d
(svn r10323) -Codechange: reference company name, number and player (president) name
peter1138
parents:
6420
diff
changeset
|
130 |
SetDParam(3, player); |
0 | 131 |
|
2639 | 132 |
xt = DrawString(x + 2, y, STR_202C_FROM_TO, 0); |
0 | 133 |
|
534
306bc86eb23e
(svn r901) Small step in the process to clean up the DPARAM mess:
tron
parents:
507
diff
changeset
|
134 |
SetDParam(0, _date - ymd.day + 768 - s->age * 32); |
0 | 135 |
DrawString(xt, y, STR_202D_UNTIL, 0); |
136 |
y += 10; |
|
137 |
num++; |
|
138 |
} |
|
139 |
} |
|
140 |
||
2639 | 141 |
if (num == 0) DrawString(x + 2, y, STR_202A_NONE, 0); |
0 | 142 |
} |
143 |
||
144 |
static void SubsidiesListWndProc(Window *w, WindowEvent *e) |
|
145 |
{ |
|
2639 | 146 |
switch (e->event) { |
147 |
case WE_PAINT: DrawSubsidiesWindow(w); break; |
|
148 |
||
149 |
case WE_CLICK: |
|
4634
07699ac2bf37
(svn r6499) -Codechange: Finally, got "byte event" outside of the union WindowEvent, which is now a struct
belugas
parents:
4288
diff
changeset
|
150 |
switch (e->we.click.widget) { |
07699ac2bf37
(svn r6499) -Codechange: Finally, got "byte event" outside of the union WindowEvent, which is now a struct
belugas
parents:
4288
diff
changeset
|
151 |
case 3: |
07699ac2bf37
(svn r6499) -Codechange: Finally, got "byte event" outside of the union WindowEvent, which is now a struct
belugas
parents:
4288
diff
changeset
|
152 |
HandleSubsidyClick(e->we.click.pt.y - 25); |
07699ac2bf37
(svn r6499) -Codechange: Finally, got "byte event" outside of the union WindowEvent, which is now a struct
belugas
parents:
4288
diff
changeset
|
153 |
break; |
2639 | 154 |
} |
155 |
break; |
|
0 | 156 |
} |
157 |
} |
|
158 |
||
159 |
static const Widget _subsidies_list_widgets[] = { |
|
2857
33c1f9df1635
(svn r3405) - Feature: Make subsidies window pinnable. Don't ask me why this wasn't included in the first round of pinning.
Darkvater
parents:
2791
diff
changeset
|
160 |
{ WWT_CLOSEBOX, RESIZE_NONE, 13, 0, 10, 0, 13, STR_00C5, STR_018B_CLOSE_WINDOW}, |
33c1f9df1635
(svn r3405) - Feature: Make subsidies window pinnable. Don't ask me why this wasn't included in the first round of pinning.
Darkvater
parents:
2791
diff
changeset
|
161 |
{ WWT_CAPTION, RESIZE_NONE, 13, 11, 617, 0, 13, STR_2025_SUBSIDIES, STR_018C_WINDOW_TITLE_DRAG_THIS}, |
33c1f9df1635
(svn r3405) - Feature: Make subsidies window pinnable. Don't ask me why this wasn't included in the first round of pinning.
Darkvater
parents:
2791
diff
changeset
|
162 |
{ WWT_STICKYBOX, RESIZE_NONE, 13, 618, 629, 0, 13, STR_NULL, STR_STICKY_BUTTON}, |
4938
0447845fd1b3
(svn r6925) -Codechange: Be more strict with widget distinctions. WWT_PANEL is only plain panel,
Darkvater
parents:
4634
diff
changeset
|
163 |
{ WWT_PANEL, RESIZE_NONE, 13, 0, 629, 14, 126, 0x0, STR_01FD_CLICK_ON_SERVICE_TO_CENTER}, |
176
84990c4b9212
(svn r177) -Fix: padded out Widget code to solve warnings on C99 compiler (Tron)
darkvater
parents:
0
diff
changeset
|
164 |
{ WIDGETS_END}, |
0 | 165 |
}; |
166 |
||
167 |
static const WindowDesc _subsidies_list_desc = { |
|
5070
7f5b13b7e728
(svn r7128) -Codechange: Replace magic numbers by magic enums (windowdesc positioning WDP_AUTO = -1)
Darkvater
parents:
4938
diff
changeset
|
168 |
WDP_AUTO, WDP_AUTO, 630, 127, |
5893
7e431a4abebb
(svn r8511) -Codechange: make WindowClass an enumerated value.
rubidium
parents:
5584
diff
changeset
|
169 |
WC_SUBSIDIES_LIST, WC_NONE, |
2857
33c1f9df1635
(svn r3405) - Feature: Make subsidies window pinnable. Don't ask me why this wasn't included in the first round of pinning.
Darkvater
parents:
2791
diff
changeset
|
170 |
WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_STICKY_BUTTON, |
0 | 171 |
_subsidies_list_widgets, |
172 |
SubsidiesListWndProc |
|
173 |
}; |
|
174 |
||
175 |
||
6247 | 176 |
void ShowSubsidiesList() |
0 | 177 |
{ |
178 |
AllocateWindowDescFront(&_subsidies_list_desc, 0); |
|
179 |
} |