author | peter1138 |
Wed, 03 May 2006 20:35:41 +0000 | |
changeset 3737 | 26341085bbbf |
parent 3699 | 15e473a194ef |
child 3741 | e901ee333003 |
permissions | -rw-r--r-- |
2186 | 1 |
/* $Id$ */ |
2 |
||
2213
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
3 |
/** @file station_cmd.c |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
4 |
*/ |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
5 |
|
0 | 6 |
#include "stdafx.h" |
1891
92a3b0aa0946
(svn r2397) - CodeChange: rename all "ttd" files to "openttd" files.
Darkvater
parents:
1881
diff
changeset
|
7 |
#include "openttd.h" |
1299
0a6510cc889b
(svn r1803) Move debugging stuff into files of it's own
tron
parents:
1295
diff
changeset
|
8 |
#include "debug.h" |
2163
637ec3c361f5
(svn r2673) Include functions.h directly, not globally via openttd.h
tron
parents:
2148
diff
changeset
|
9 |
#include "functions.h" |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
10 |
#include "station_map.h" |
1363
01d3de5d8039
(svn r1867) Include tables/sprites.h only in files which need it
tron
parents:
1335
diff
changeset
|
11 |
#include "table/sprites.h" |
507
8aa8100b0b22
(svn r815) Include strings.h only in the files which need it.
tron
parents:
500
diff
changeset
|
12 |
#include "table/strings.h" |
679
e959706a3e4d
(svn r1117) Move map arrays and some related macros into their own files map.c and map.h
tron
parents:
595
diff
changeset
|
13 |
#include "map.h" |
1209
a1ac96655b79
(svn r1713) Split off several functions which query/set information about a single tile from map.h and put them into a seperate file tile.h
tron
parents:
1190
diff
changeset
|
14 |
#include "tile.h" |
0 | 15 |
#include "station.h" |
16 |
#include "gfx.h" |
|
17 |
#include "window.h" |
|
18 |
#include "viewport.h" |
|
19 |
#include "command.h" |
|
20 |
#include "town.h" |
|
21 |
#include "vehicle.h" |
|
22 |
#include "news.h" |
|
23 |
#include "saveload.h" |
|
24 |
#include "economy.h" |
|
25 |
#include "player.h" |
|
26 |
#include "airport.h" |
|
405
6830ae7a0d5d
(svn r602) -newgrf: Move DrawTileSeqStruct & co and struct SpriteGroup to sprite.h (pasky)
darkvater
parents:
403
diff
changeset
|
27 |
#include "sprite.h" |
1313
bba6afb8a995
(svn r1817) -Codechange: Moved depot-functions to depot.c
truelight
parents:
1299
diff
changeset
|
28 |
#include "depot.h" |
2676
2ba71e034d97
(svn r3218) -Feature: Multiheaded train engines will now stay in the same train
bjarni
parents:
2671
diff
changeset
|
29 |
#include "train.h" |
3111
1edf71aa942e
(svn r3714) Add functions to turn tiles into water and shore tiles
tron
parents:
3102
diff
changeset
|
30 |
#include "water_map.h" |
3515
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
31 |
#include "industry_map.h" |
0 | 32 |
|
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
33 |
enum { |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
34 |
/* Max stations: 64000 (64 * 1000) */ |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
35 |
STATION_POOL_BLOCK_SIZE_BITS = 6, /* In bits, so (1 << 6) == 64 */ |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
36 |
STATION_POOL_MAX_BLOCKS = 1000, |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
37 |
|
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
38 |
/* Max roadstops: 64000 (32 * 2000) */ |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
39 |
ROADSTOP_POOL_BLOCK_SIZE_BITS = 5, /* In bits, so (1 << 5) == 32 */ |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
40 |
ROADSTOP_POOL_MAX_BLOCKS = 2000, |
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
41 |
}; |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
42 |
|
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
43 |
/** |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
44 |
* Called if a new block is added to the station-pool |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
45 |
*/ |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
46 |
static void StationPoolNewBlock(uint start_item) |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
47 |
{ |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
48 |
Station *st; |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
49 |
|
2639 | 50 |
FOR_ALL_STATIONS_FROM(st, start_item) st->index = start_item++; |
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
51 |
} |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
52 |
|
3587 | 53 |
static void StationPoolCleanBlock(uint start_item, uint end_item) |
54 |
{ |
|
55 |
uint i; |
|
56 |
||
57 |
for (i = start_item; i <= end_item; i++) { |
|
58 |
Station *st = GetStation(i); |
|
59 |
free(st->speclist); |
|
60 |
st->speclist = NULL; |
|
61 |
} |
|
62 |
} |
|
63 |
||
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
64 |
/** |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
65 |
* Called if a new block is added to the roadstop-pool |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
66 |
*/ |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
67 |
static void RoadStopPoolNewBlock(uint start_item) |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
68 |
{ |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
69 |
RoadStop *rs; |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
70 |
|
2639 | 71 |
FOR_ALL_ROADSTOPS_FROM(rs, start_item) rs->index = start_item++; |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
72 |
} |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
73 |
|
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
74 |
/* Initialize the station-pool and roadstop-pool */ |
3587 | 75 |
MemoryPool _station_pool = { "Stations", STATION_POOL_MAX_BLOCKS, STATION_POOL_BLOCK_SIZE_BITS, sizeof(Station), &StationPoolNewBlock, &StationPoolCleanBlock, 0, 0, NULL }; |
3585
18a23b37e99a
(svn r4471) - Pools: Add a facility for calling a custom function during pool block clean up.
peter1138
parents:
3580
diff
changeset
|
76 |
MemoryPool _roadstop_pool = { "RoadStop", ROADSTOP_POOL_MAX_BLOCKS, ROADSTOP_POOL_BLOCK_SIZE_BITS, sizeof(RoadStop), &RoadStopPoolNewBlock, NULL, 0, 0, NULL }; |
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
77 |
|
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
78 |
|
0 | 79 |
// FIXME -- need to be embedded into Airport variable. Is dynamically |
80 |
// deducteable from graphics-tile array, so will not be needed |
|
1417
fd04b8a2eefc
(svn r1921) -Fix: Out of bounds array access which caused oil rigs to accept other cargo types besides passengers and mail
tron
parents:
1368
diff
changeset
|
81 |
const byte _airport_size_x[] = {4, 6, 1, 6, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1}; |
fd04b8a2eefc
(svn r1921) -Fix: Out of bounds array access which caused oil rigs to accept other cargo types besides passengers and mail
tron
parents:
1368
diff
changeset
|
82 |
const byte _airport_size_y[] = {3, 6, 1, 6, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1}; |
0 | 83 |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
84 |
void ShowAircraftDepotWindow(TileIndex tile); |
0 | 85 |
extern void UpdateAirplanesOnNewStation(Station *st); |
86 |
||
2549 | 87 |
static void MarkStationDirty(const Station* st) |
0 | 88 |
{ |
89 |
if (st->sign.width_1 != 0) { |
|
90 |
InvalidateWindowWidget(WC_STATION_VIEW, st->index, 1); |
|
91 |
||
92 |
MarkAllViewportsDirty( |
|
93 |
st->sign.left - 6, |
|
94 |
st->sign.top, |
|
95 |
st->sign.left + (st->sign.width_1 << 2) + 12, |
|
96 |
st->sign.top + 48); |
|
97 |
} |
|
98 |
} |
|
99 |
||
1551
eb05e6a90e67
(svn r2055) -CodeChange: Begun introducting StationID
celestar
parents:
1527
diff
changeset
|
100 |
static void InitializeRoadStop(RoadStop *road_stop, RoadStop *previous, TileIndex tile, StationID index) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
101 |
{ |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
102 |
road_stop->xy = tile; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
103 |
road_stop->used = true; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
104 |
road_stop->status = 3; //stop is free |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
105 |
road_stop->next = NULL; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
106 |
road_stop->prev = previous; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
107 |
road_stop->station = index; |
3431 | 108 |
road_stop->num_vehicles = 0; |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
109 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
110 |
|
2639 | 111 |
RoadStop* GetPrimaryRoadStop(const Station* st, RoadStopType type) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
112 |
{ |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
113 |
switch (type) { |
2631
13daba67f217
(svn r3173) Use the trinary operator and switch to improve readability
tron
parents:
2630
diff
changeset
|
114 |
case RS_BUS: return st->bus_stops; |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
115 |
case RS_TRUCK: return st->truck_stops; |
2631
13daba67f217
(svn r3173) Use the trinary operator and switch to improve readability
tron
parents:
2630
diff
changeset
|
116 |
default: NOT_REACHED(); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
117 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
118 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
119 |
return NULL; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
120 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
121 |
|
2639 | 122 |
RoadStop* GetRoadStopByTile(TileIndex tile, RoadStopType type) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
123 |
{ |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
124 |
const Station* st = GetStationByTile(tile); |
2639 | 125 |
RoadStop* rs; |
126 |
||
127 |
for (rs = GetPrimaryRoadStop(st, type); rs->xy != tile; rs = rs->next) { |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
128 |
assert(rs->next != NULL); |
2639 | 129 |
} |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
130 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
131 |
return rs; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
132 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
133 |
|
3123 | 134 |
uint GetNumRoadStops(const Station* st, RoadStopType type) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
135 |
{ |
2549 | 136 |
uint num = 0; |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
137 |
const RoadStop *rs; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
138 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
139 |
assert(st != NULL); |
2549 | 140 |
for (rs = GetPrimaryRoadStop(st, type); rs != NULL; rs = rs->next) num++; |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
141 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
142 |
return num; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
143 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
144 |
|
2549 | 145 |
RoadStop *AllocateRoadStop(void) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
146 |
{ |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
147 |
RoadStop *rs; |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
148 |
|
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
149 |
FOR_ALL_ROADSTOPS(rs) { |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
150 |
if (!rs->used) { |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
151 |
uint index = rs->index; |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
152 |
|
2549 | 153 |
memset(rs, 0, sizeof(*rs)); |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
154 |
rs->index = index; |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
155 |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
156 |
return rs; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
157 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
158 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
159 |
|
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
160 |
/* Check if we can add a block to the pool */ |
2639 | 161 |
if (AddBlockToPool(&_roadstop_pool)) return AllocateRoadStop(); |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
162 |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
163 |
return NULL; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
164 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
165 |
|
703
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
166 |
/* Calculate the radius of the station. Basicly it is the biggest |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
167 |
radius that is available within the station */ |
2643 | 168 |
static uint FindCatchmentRadius(const Station* st) |
703
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
169 |
{ |
2643 | 170 |
uint ret = 0; |
703
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
171 |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
172 |
if (st->bus_stops != NULL) ret = max(ret, CA_BUS); |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
173 |
if (st->truck_stops != NULL) ret = max(ret, CA_TRUCK); |
703
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
174 |
if (st->train_tile) ret = max(ret, CA_TRAIN); |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
175 |
if (st->dock_tile) ret = max(ret, CA_DOCK); |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
176 |
|
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
177 |
if (st->airport_tile) { |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
178 |
switch (st->airport_type) { |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
179 |
case AT_OILRIG: ret = max(ret, CA_AIR_OILPAD); break; |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
180 |
case AT_SMALL: ret = max(ret, CA_AIR_SMALL); break; |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
181 |
case AT_HELIPORT: ret = max(ret, CA_AIR_HELIPORT); break; |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
182 |
case AT_LARGE: ret = max(ret, CA_AIR_LARGE); break; |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
183 |
case AT_METROPOLITAN: ret = max(ret, CA_AIR_METRO); break; |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
184 |
case AT_INTERNATIONAL: ret = max(ret, CA_AIR_INTER); break; |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
185 |
} |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
186 |
} |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
187 |
|
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
188 |
return ret; |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
189 |
} |
c917d7d9aced
(svn r1153) -Fix: FindCatchmentRadius is now a function that uses the enums instead
truelight
parents:
701
diff
changeset
|
190 |
|
0 | 191 |
#define CHECK_STATIONS_ERR ((Station*)-1) |
192 |
||
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
193 |
static Station* GetStationAround(TileIndex tile, int w, int h, StationID closest_station) |
0 | 194 |
{ |
195 |
// check around to see if there's any stations there |
|
1981 | 196 |
BEGIN_TILE_LOOP(tile_cur, w + 2, h + 2, tile - TileDiffXY(1, 1)) |
1035
0a170deb6e33
(svn r1536) Move GET_TILEHEIGHT, GET_TILETYPE and IS_TILETYPE to map.h, turn them into inline functions and add some asserts
tron
parents:
1032
diff
changeset
|
197 |
if (IsTileType(tile_cur, MP_STATION)) { |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
198 |
StationID t = GetStationIndex(tile_cur); |
28
635ad4c62bec
(svn r29) -Fix You cannot take ownership of an oilrig by building right next to it
darkvater
parents:
27
diff
changeset
|
199 |
{ |
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
909
diff
changeset
|
200 |
Station *st = GetStation(t); |
28
635ad4c62bec
(svn r29) -Fix You cannot take ownership of an oilrig by building right next to it
darkvater
parents:
27
diff
changeset
|
201 |
// you cannot take control of an oilrig!! |
635ad4c62bec
(svn r29) -Fix You cannot take ownership of an oilrig by building right next to it
darkvater
parents:
27
diff
changeset
|
202 |
if (st->airport_type == AT_OILRIG && st->facilities == (FACIL_AIRPORT|FACIL_DOCK)) |
635ad4c62bec
(svn r29) -Fix You cannot take ownership of an oilrig by building right next to it
darkvater
parents:
27
diff
changeset
|
203 |
continue; |
635ad4c62bec
(svn r29) -Fix You cannot take ownership of an oilrig by building right next to it
darkvater
parents:
27
diff
changeset
|
204 |
} |
635ad4c62bec
(svn r29) -Fix You cannot take ownership of an oilrig by building right next to it
darkvater
parents:
27
diff
changeset
|
205 |
|
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
206 |
if (closest_station == INVALID_STATION) { |
0 | 207 |
closest_station = t; |
208 |
} else if (closest_station != t) { |
|
209 |
_error_message = STR_3006_ADJOINS_MORE_THAN_ONE_EXISTING; |
|
210 |
return CHECK_STATIONS_ERR; |
|
211 |
} |
|
212 |
} |
|
1981 | 213 |
END_TILE_LOOP(tile_cur, w + 2, h + 2, tile - TileDiffXY(1, 1)) |
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
214 |
return (closest_station == INVALID_STATION) ? NULL : GetStation(closest_station); |
0 | 215 |
} |
216 |
||
1024
9b06b01490a4
(svn r1525) -Codechange: rewrote the _order_array, now it can be made dynamic.
truelight
parents:
1012
diff
changeset
|
217 |
TileIndex GetStationTileForVehicle(const Vehicle *v, const Station *st) |
55
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
218 |
{ |
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
219 |
switch (v->type) { |
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
220 |
case VEH_Train: return st->train_tile; |
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
221 |
case VEH_Aircraft: return st->airport_tile; |
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
222 |
case VEH_Ship: return st->dock_tile; |
1231
64cc1f5c1c82
(svn r1735) -Fix: [ 1112285 ] Fixed an assertion error with stations where stops
celestar
parents:
1217
diff
changeset
|
223 |
case VEH_Road: |
64cc1f5c1c82
(svn r1735) -Fix: [ 1112285 ] Fixed an assertion error with stations where stops
celestar
parents:
1217
diff
changeset
|
224 |
if (v->cargo_type == CT_PASSENGERS) { |
2549 | 225 |
return (st->bus_stops != NULL) ? st->bus_stops->xy : 0; |
1231
64cc1f5c1c82
(svn r1735) -Fix: [ 1112285 ] Fixed an assertion error with stations where stops
celestar
parents:
1217
diff
changeset
|
226 |
} else { |
2549 | 227 |
return (st->truck_stops != NULL) ? st->truck_stops->xy : 0; |
1231
64cc1f5c1c82
(svn r1735) -Fix: [ 1112285 ] Fixed an assertion error with stations where stops
celestar
parents:
1217
diff
changeset
|
228 |
} |
55
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
229 |
default: |
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
230 |
assert(false); |
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
231 |
return 0; |
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
232 |
} |
73fae6c6568e
(svn r56) Improved order checker + patch setting for it (celestar)
dominik
parents:
43
diff
changeset
|
233 |
} |
0 | 234 |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
235 |
static bool CheckStationSpreadOut(Station *st, TileIndex tile, int w, int h) |
0 | 236 |
{ |
1551
eb05e6a90e67
(svn r2055) -CodeChange: Begun introducting StationID
celestar
parents:
1527
diff
changeset
|
237 |
StationID station_index = st->index; |
0 | 238 |
uint i; |
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
239 |
uint x1 = TileX(tile); |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
240 |
uint y1 = TileY(tile); |
0 | 241 |
uint x2 = x1 + w - 1; |
242 |
uint y2 = y1 + h - 1; |
|
243 |
uint t; |
|
244 |
||
863
8d09f9331a80
(svn r1344) Use MapSize[XY]() (or MapSize()/MapMax[XY]() where appropriate) instead of TILES_[XY]
tron
parents:
856
diff
changeset
|
245 |
for (i = 0; i != MapSize(); i++) { |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
246 |
if (IsTileType(i, MP_STATION) && GetStationIndex(i) == station_index) { |
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
247 |
t = TileX(i); |
0 | 248 |
if (t < x1) x1 = t; |
249 |
if (t > x2) x2 = t; |
|
250 |
||
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
251 |
t = TileY(i); |
0 | 252 |
if (t < y1) y1 = t; |
253 |
if (t > y2) y2 = t; |
|
254 |
} |
|
255 |
} |
|
256 |
||
2549 | 257 |
if (y2 - y1 >= _patches.station_spread || x2 - x1 >= _patches.station_spread) { |
0 | 258 |
_error_message = STR_306C_STATION_TOO_SPREAD_OUT; |
259 |
return false; |
|
260 |
} |
|
261 |
||
262 |
return true; |
|
263 |
} |
|
264 |
||
1093
e8d26c7dc42f
(svn r1594) Convert all undefined parameter lists to (void) and add the appropriate warning flags in the Makefile
tron
parents:
1078
diff
changeset
|
265 |
static Station *AllocateStation(void) |
0 | 266 |
{ |
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
267 |
Station *st = NULL; |
0 | 268 |
|
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
909
diff
changeset
|
269 |
FOR_ALL_STATIONS(st) { |
0 | 270 |
if (st->xy == 0) { |
1551
eb05e6a90e67
(svn r2055) -CodeChange: Begun introducting StationID
celestar
parents:
1527
diff
changeset
|
271 |
StationID index = st->index; |
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
272 |
|
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
273 |
memset(st, 0, sizeof(Station)); |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
274 |
st->index = index; |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
275 |
|
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
276 |
return st; |
0 | 277 |
} |
278 |
} |
|
279 |
||
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
280 |
/* Check if we can add a block to the pool */ |
2639 | 281 |
if (AddBlockToPool(&_station_pool)) return AllocateStation(); |
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
282 |
|
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
283 |
_error_message = STR_3008_TOO_MANY_STATIONS_LOADING; |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
284 |
return NULL; |
0 | 285 |
} |
286 |
||
287 |
||
3515
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
288 |
/** |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
289 |
* Counts the numbers of tiles matching a specific type in the area around |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
290 |
* @param tile the center tile of the 'count area' |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
291 |
* @param type the type of tile searched for |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
292 |
* @param industry when type == MP_INDUSTRY, the type of the industry, |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
293 |
* in all other cases this parameter is ignored |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
294 |
* @result the noumber of matching tiles around |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
295 |
*/ |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
296 |
static int CountMapSquareAround(TileIndex tile, TileType type, IndustryType industry) |
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
297 |
{ |
3515
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
298 |
TileIndex cur_tile; |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
299 |
int dx, dy; |
0 | 300 |
int num = 0; |
301 |
||
3515
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
302 |
for (dx = -3; dx <= 3; dx++) { |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
303 |
for (dy = -3; dy <= 3; dy++) { |
3682
481e92a35a3e
(svn r4602) - Fix: an assertion triggered when building a station near the south corner of the map (appeared in r4367)
glx
parents:
3676
diff
changeset
|
304 |
cur_tile = TILE_MASK(tile + TileDiffXY(dx, dy)); |
3515
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
305 |
|
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
306 |
if (IsTileType(cur_tile, type)) { |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
307 |
switch (type) { |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
308 |
case MP_INDUSTRY: |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
309 |
if (GetIndustryType(cur_tile) == industry) |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
310 |
num++; |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
311 |
break; |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
312 |
|
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
313 |
case MP_WATER: |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
314 |
if (!IsWater(cur_tile)) |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
315 |
break; |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
316 |
/* FALL THROUGH WHEN WATER TILE */ |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
317 |
case MP_TREES: |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
318 |
num++; |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
319 |
break; |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
320 |
|
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
321 |
default: |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
322 |
break; |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
323 |
} |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
324 |
} |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
325 |
} |
0 | 326 |
} |
327 |
||
328 |
return num; |
|
329 |
} |
|
330 |
||
331 |
#define M(x) ((x) - STR_SV_STNAME) |
|
332 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
333 |
static bool GenerateStationName(Station *st, TileIndex tile, int flag) |
0 | 334 |
{ |
335 |
static const uint32 _gen_station_name_bits[] = { |
|
1454 | 336 |
0, /* 0 */ |
337 |
1 << M(STR_SV_STNAME_AIRPORT), /* 1 */ |
|
338 |
1 << M(STR_SV_STNAME_OILFIELD), /* 2 */ |
|
339 |
1 << M(STR_SV_STNAME_DOCKS), /* 3 */ |
|
340 |
0x1FF << M(STR_SV_STNAME_BUOY_1), /* 4 */ |
|
341 |
1 << M(STR_SV_STNAME_HELIPORT), /* 5 */ |
|
0 | 342 |
}; |
343 |
||
344 |
Town *t = st->town; |
|
345 |
uint32 free_names = (uint32)-1; |
|
346 |
int found; |
|
347 |
uint z,z2; |
|
348 |
unsigned long tmp; |
|
349 |
||
350 |
{ |
|
351 |
Station *s; |
|
352 |
||
353 |
FOR_ALL_STATIONS(s) { |
|
354 |
if (s != st && s->xy != 0 && s->town==t) { |
|
355 |
uint str = M(s->string_id); |
|
356 |
if (str <= 0x20) { |
|
357 |
if (str == M(STR_SV_STNAME_FOREST)) |
|
358 |
str = M(STR_SV_STNAME_WOODS); |
|
359 |
CLRBIT(free_names, str); |
|
360 |
} |
|
361 |
} |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
362 |
} |
0 | 363 |
} |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
364 |
|
0 | 365 |
/* check default names */ |
366 |
tmp = free_names & _gen_station_name_bits[flag]; |
|
367 |
if (tmp != 0) { |
|
368 |
found = FindFirstBit(tmp); |
|
369 |
goto done; |
|
370 |
} |
|
371 |
||
372 |
/* check mine? */ |
|
373 |
if (HASBIT(free_names, M(STR_SV_STNAME_MINES))) { |
|
3515
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
374 |
if (CountMapSquareAround(tile, MP_INDUSTRY, IT_COAL_MINE) >= 2 || |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
375 |
CountMapSquareAround(tile, MP_INDUSTRY, IT_IRON_MINE) >= 2 || |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
376 |
CountMapSquareAround(tile, MP_INDUSTRY, IT_COPPER_MINE) >= 2 || |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
377 |
CountMapSquareAround(tile, MP_INDUSTRY, IT_GOLD_MINE) >= 2 || |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
378 |
CountMapSquareAround(tile, MP_INDUSTRY, IT_DIAMOND_MINE) >= 2) { |
1454 | 379 |
found = M(STR_SV_STNAME_MINES); |
380 |
goto done; |
|
381 |
} |
|
0 | 382 |
} |
383 |
||
384 |
/* check close enough to town to get central as name? */ |
|
1245
768d9bc95aaa
(svn r1749) Move the functions which calculate distances to map.[ch] and give the more meaningful names
tron
parents:
1239
diff
changeset
|
385 |
if (DistanceMax(tile,t->xy) < 8) { |
0 | 386 |
found = M(STR_SV_STNAME); |
387 |
if (HASBIT(free_names, M(STR_SV_STNAME))) goto done; |
|
388 |
||
389 |
found = M(STR_SV_STNAME_CENTRAL); |
|
390 |
if (HASBIT(free_names, M(STR_SV_STNAME_CENTRAL))) goto done; |
|
391 |
} |
|
392 |
||
393 |
/* Check lakeside */ |
|
1472
043304846688
(svn r1976) Cleanups - mostly indentation and fiddling with loops
tron
parents:
1457
diff
changeset
|
394 |
if (HASBIT(free_names, M(STR_SV_STNAME_LAKESIDE)) && |
043304846688
(svn r1976) Cleanups - mostly indentation and fiddling with loops
tron
parents:
1457
diff
changeset
|
395 |
DistanceFromEdge(tile) < 20 && |
3515
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
396 |
CountMapSquareAround(tile, MP_WATER, 0) >= 5) { |
1454 | 397 |
found = M(STR_SV_STNAME_LAKESIDE); |
398 |
goto done; |
|
399 |
} |
|
0 | 400 |
|
401 |
/* Check woods */ |
|
1472
043304846688
(svn r1976) Cleanups - mostly indentation and fiddling with loops
tron
parents:
1457
diff
changeset
|
402 |
if (HASBIT(free_names, M(STR_SV_STNAME_WOODS)) && ( |
3515
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
403 |
CountMapSquareAround(tile, MP_TREES, 0) >= 8 || |
b14c49efef1e
(svn r4367) CodeChange : Remove another direct map access in station_cmd.c. Replace an array of TileIndexDiffC by a use of loop with TileDiffXY. Thanks to Rubidium
belugas
parents:
3503
diff
changeset
|
404 |
CountMapSquareAround(tile, MP_INDUSTRY, IT_FOREST) >= 2) |
1472
043304846688
(svn r1976) Cleanups - mostly indentation and fiddling with loops
tron
parents:
1457
diff
changeset
|
405 |
) { |
043304846688
(svn r1976) Cleanups - mostly indentation and fiddling with loops
tron
parents:
1457
diff
changeset
|
406 |
found = _opt.landscape == LT_DESERT ? |
043304846688
(svn r1976) Cleanups - mostly indentation and fiddling with loops
tron
parents:
1457
diff
changeset
|
407 |
M(STR_SV_STNAME_FOREST) : M(STR_SV_STNAME_WOODS); |
1454 | 408 |
goto done; |
0 | 409 |
} |
410 |
||
411 |
/* check elevation compared to town */ |
|
412 |
z = GetTileZ(tile); |
|
413 |
z2 = GetTileZ(t->xy); |
|
414 |
if (z < z2) { |
|
415 |
found = M(STR_SV_STNAME_VALLEY); |
|
416 |
if (HASBIT(free_names, M(STR_SV_STNAME_VALLEY))) goto done; |
|
417 |
} else if (z > z2) { |
|
418 |
found = M(STR_SV_STNAME_HEIGHTS); |
|
419 |
if (HASBIT(free_names, M(STR_SV_STNAME_HEIGHTS))) goto done; |
|
420 |
} |
|
421 |
||
422 |
/* check direction compared to town */ |
|
423 |
{ |
|
424 |
static const int8 _direction_and_table[] = { |
|
425 |
~( (1<<M(STR_SV_STNAME_WEST)) | (1<<M(STR_SV_STNAME_EAST)) | (1<<M(STR_SV_STNAME_NORTH)) ), |
|
426 |
~( (1<<M(STR_SV_STNAME_SOUTH)) | (1<<M(STR_SV_STNAME_WEST)) | (1<<M(STR_SV_STNAME_NORTH)) ), |
|
427 |
~( (1<<M(STR_SV_STNAME_SOUTH)) | (1<<M(STR_SV_STNAME_EAST)) | (1<<M(STR_SV_STNAME_NORTH)) ), |
|
428 |
~( (1<<M(STR_SV_STNAME_SOUTH)) | (1<<M(STR_SV_STNAME_WEST)) | (1<<M(STR_SV_STNAME_EAST)) ), |
|
429 |
}; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
430 |
|
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
431 |
free_names &= _direction_and_table[ |
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
432 |
(TileX(tile) < TileX(t->xy)) + |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
433 |
(TileY(tile) < TileY(t->xy)) * 2]; |
0 | 434 |
} |
435 |
||
436 |
tmp = free_names & ((1<<1)|(1<<2)|(1<<3)|(1<<4)|(1<<6)|(1<<7)|(1<<12)|(1<<26)|(1<<27)|(1<<28)|(1<<29)|(1<<30)); |
|
437 |
if (tmp == 0) { |
|
438 |
_error_message = STR_3007_TOO_MANY_STATIONS_LOADING; |
|
439 |
return false; |
|
440 |
} |
|
441 |
found = FindFirstBit(tmp); |
|
442 |
||
443 |
done: |
|
444 |
st->string_id = found + STR_SV_STNAME; |
|
445 |
return true; |
|
446 |
} |
|
447 |
#undef M |
|
448 |
||
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
449 |
static Station* GetClosestStationFromTile(TileIndex tile, uint threshold, PlayerID owner) |
0 | 450 |
{ |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
451 |
Station* best_station = NULL; |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
452 |
Station* st; |
0 | 453 |
|
454 |
FOR_ALL_STATIONS(st) { |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
455 |
if (st->xy != 0 && (owner == OWNER_SPECTATOR || st->owner == owner)) { |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
456 |
uint cur_dist = DistanceManhattan(tile, st->xy); |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
457 |
|
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
458 |
if (cur_dist < threshold) { |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
459 |
threshold = cur_dist; |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
460 |
best_station = st; |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
461 |
} |
0 | 462 |
} |
463 |
} |
|
464 |
||
465 |
return best_station; |
|
466 |
} |
|
467 |
||
468 |
static void StationInitialize(Station *st, TileIndex tile) |
|
469 |
{ |
|
470 |
GoodsEntry *ge; |
|
471 |
||
472 |
st->xy = tile; |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
473 |
st->airport_tile = st->dock_tile = st->train_tile = 0; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
474 |
st->bus_stops = st->truck_stops = NULL; |
0 | 475 |
st->had_vehicle_of_type = 0; |
476 |
st->time_since_load = 255; |
|
477 |
st->time_since_unload = 255; |
|
478 |
st->delete_ctr = 0; |
|
479 |
st->facilities = 0; |
|
480 |
||
3580
607e4245d024
(svn r4466) -Fix: (FS#71) Game no longer crashes when the last vehicle serving a station has been deleted.
celestar
parents:
3576
diff
changeset
|
481 |
st->last_vehicle_type = VEH_Invalid; |
0 | 482 |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
483 |
for (ge = st->goods; ge != endof(st->goods); ge++) { |
0 | 484 |
ge->waiting_acceptance = 0; |
485 |
ge->days_since_pickup = 0; |
|
1266
9dc5638fe8cc
(svn r1770) -Fix: Hopefully last pieces of code that are containing a station-id
truelight
parents:
1265
diff
changeset
|
486 |
ge->enroute_from = INVALID_STATION; |
0 | 487 |
ge->rating = 175; |
488 |
ge->last_speed = 0; |
|
489 |
ge->last_age = 0xFF; |
|
1935
f43f062c9498
(svn r2441) -Feature: You can now give transfer order to set up feeder systems
celestar
parents:
1902
diff
changeset
|
490 |
ge->feeder_profit = 0; |
0 | 491 |
} |
243
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
492 |
|
3687
109ec5cdb932
(svn r4612) - NewStations: add random bits (for graphic variation) to stations
peter1138
parents:
3682
diff
changeset
|
493 |
st->random_bits = Random(); |
109ec5cdb932
(svn r4612) - NewStations: add random bits (for graphic variation) to stations
peter1138
parents:
3682
diff
changeset
|
494 |
st->waiting_triggers = 0; |
109ec5cdb932
(svn r4612) - NewStations: add random bits (for graphic variation) to stations
peter1138
parents:
3682
diff
changeset
|
495 |
|
243
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
496 |
_global_station_sort_dirty = true; // build a new station |
0 | 497 |
} |
498 |
||
499 |
// Update the virtual coords needed to draw the station sign. |
|
500 |
// st = Station to update for. |
|
501 |
static void UpdateStationVirtCoord(Station *st) |
|
502 |
{ |
|
3422
12cdb13ddb56
(svn r4249) -Codechange: Replace more occurences of 16 by TILE_SIZE and of 8 by TILE_HEIGHT. Reverted one change from the previous commit because it was faulty
celestar
parents:
3418
diff
changeset
|
503 |
Point pt = RemapCoords2(TileX(st->xy) * TILE_SIZE, TileY(st->xy) * TILE_SIZE); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
504 |
|
0 | 505 |
pt.y -= 32; |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
506 |
if (st->facilities & FACIL_AIRPORT && st->airport_type == AT_OILRIG) pt.y -= 16; |
0 | 507 |
|
534
17ab2f22ff74
(svn r901) Small step in the process to clean up the DPARAM mess:
tron
parents:
507
diff
changeset
|
508 |
SetDParam(0, st->index); |
17ab2f22ff74
(svn r901) Small step in the process to clean up the DPARAM mess:
tron
parents:
507
diff
changeset
|
509 |
SetDParam(1, st->facilities); |
0 | 510 |
UpdateViewportSignPos(&st->sign, pt.x, pt.y, STR_305C_0); |
511 |
} |
|
512 |
||
513 |
// Update the virtual coords needed to draw the station sign for all stations. |
|
1093
e8d26c7dc42f
(svn r1594) Convert all undefined parameter lists to (void) and add the appropriate warning flags in the Makefile
tron
parents:
1078
diff
changeset
|
514 |
void UpdateAllStationVirtCoord(void) |
0 | 515 |
{ |
2639 | 516 |
Station* st; |
517 |
||
0 | 518 |
FOR_ALL_STATIONS(st) { |
2639 | 519 |
if (st->xy != 0) UpdateStationVirtCoord(st); |
0 | 520 |
} |
521 |
} |
|
522 |
||
523 |
// Update the station virt coords while making the modified parts dirty. |
|
524 |
static void UpdateStationVirtCoordDirty(Station *st) |
|
525 |
{ |
|
526 |
MarkStationDirty(st); |
|
527 |
UpdateStationVirtCoord(st); |
|
528 |
MarkStationDirty(st); |
|
529 |
} |
|
530 |
||
531 |
// Get a mask of the cargo types that the station accepts. |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
532 |
static uint GetAcceptanceMask(const Station *st) |
0 | 533 |
{ |
534 |
uint mask = 0; |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
535 |
uint i; |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
536 |
|
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
537 |
for (i = 0; i != NUM_CARGO; i++) { |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
538 |
if (st->goods[i].waiting_acceptance & 0x8000) mask |= 1 << i; |
0 | 539 |
} |
540 |
return mask; |
|
541 |
} |
|
542 |
||
543 |
// Items contains the two cargo names that are to be accepted or rejected. |
|
544 |
// msg is the string id of the message to display. |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
545 |
static void ShowRejectOrAcceptNews(const Station *st, uint32 items, StringID msg) |
0 | 546 |
{ |
547 |
if (items) { |
|
2549 | 548 |
SetDParam(2, GB(items, 16, 16)); |
549 |
SetDParam(1, GB(items, 0, 16)); |
|
534
17ab2f22ff74
(svn r901) Small step in the process to clean up the DPARAM mess:
tron
parents:
507
diff
changeset
|
550 |
SetDParam(0, st->index); |
0 | 551 |
AddNewsItem(msg + ((items >> 16)?1:0), NEWS_FLAGS(NM_SMALL, NF_VIEWPORT|NF_TILE, NT_ACCEPTANCE, 0), st->xy, 0); |
552 |
} |
|
553 |
} |
|
554 |
||
555 |
// Get a list of the cargo types being produced around the tile. |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
556 |
void GetProductionAroundTiles(AcceptedCargo produced, TileIndex tile, |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
557 |
int w, int h, int rad) |
0 | 558 |
{ |
559 |
int x,y; |
|
560 |
int x1,y1,x2,y2; |
|
561 |
int xc,yc; |
|
562 |
||
2133 | 563 |
memset(produced, 0, sizeof(AcceptedCargo)); |
0 | 564 |
|
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
565 |
x = TileX(tile); |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
566 |
y = TileY(tile); |
0 | 567 |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
568 |
// expand the region by rad tiles on each side |
0 | 569 |
// while making sure that we remain inside the board. |
856
07dc27d0503e
(svn r1337) Use MapMax[XY]() (or MapSize[XY]() if appropriate) instead of TILE_MAX_[XY]
tron
parents:
847
diff
changeset
|
570 |
x2 = min(x + w + rad, MapSizeX()); |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
571 |
x1 = max(x - rad, 0); |
568
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
572 |
|
856
07dc27d0503e
(svn r1337) Use MapMax[XY]() (or MapSize[XY]() if appropriate) instead of TILE_MAX_[XY]
tron
parents:
847
diff
changeset
|
573 |
y2 = min(y + h + rad, MapSizeY()); |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
574 |
y1 = max(y - rad, 0); |
0 | 575 |
|
576 |
assert(x1 < x2); |
|
577 |
assert(y1 < y2); |
|
578 |
assert(w > 0); |
|
579 |
assert(h > 0); |
|
580 |
||
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
581 |
for (yc = y1; yc != y2; yc++) { |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
582 |
for (xc = x1; xc != x2; xc++) { |
0 | 583 |
if (!(IS_INSIDE_1D(xc, x, w) && IS_INSIDE_1D(yc, y, h))) { |
584 |
GetProducedCargoProc *gpc; |
|
1981 | 585 |
TileIndex tile = TileXY(xc, yc); |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
586 |
|
1214
33e07bbb7779
(svn r1718) Use the enum TileType as parameter/return type for [GS]etTileType() instead of plain int.
tron
parents:
1209
diff
changeset
|
587 |
gpc = _tile_type_procs[GetTileType(tile)]->get_produced_cargo_proc; |
0 | 588 |
if (gpc != NULL) { |
3344
d86c852715fa
(svn r4128) - CodeChange: Add proper semantics for CargoID for such variables instead of using the general byte-type.
Darkvater
parents:
3334
diff
changeset
|
589 |
CargoID cargos[2] = { CT_INVALID, CT_INVALID }; |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
590 |
|
0 | 591 |
gpc(tile, cargos); |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
592 |
if (cargos[0] != CT_INVALID) { |
0 | 593 |
produced[cargos[0]]++; |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
594 |
if (cargos[1] != CT_INVALID) { |
0 | 595 |
produced[cargos[1]]++; |
596 |
} |
|
597 |
} |
|
598 |
} |
|
599 |
} |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
600 |
} |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
601 |
} |
0 | 602 |
} |
603 |
||
604 |
// Get a list of the cargo types that are accepted around the tile. |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
605 |
void GetAcceptanceAroundTiles(AcceptedCargo accepts, TileIndex tile, |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
606 |
int w, int h, int rad) |
0 | 607 |
{ |
608 |
int x,y; |
|
609 |
int x1,y1,x2,y2; |
|
610 |
int xc,yc; |
|
473
0da86c59e3ae
(svn r724) Remove restriction that a tile can only accept 3 cargo types.
tron
parents:
457
diff
changeset
|
611 |
|
0da86c59e3ae
(svn r724) Remove restriction that a tile can only accept 3 cargo types.
tron
parents:
457
diff
changeset
|
612 |
memset(accepts, 0, sizeof(AcceptedCargo)); |
0 | 613 |
|
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
614 |
x = TileX(tile); |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
615 |
y = TileY(tile); |
0 | 616 |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
617 |
// expand the region by rad tiles on each side |
0 | 618 |
// while making sure that we remain inside the board. |
856
07dc27d0503e
(svn r1337) Use MapMax[XY]() (or MapSize[XY]() if appropriate) instead of TILE_MAX_[XY]
tron
parents:
847
diff
changeset
|
619 |
x2 = min(x + w + rad, MapSizeX()); |
07dc27d0503e
(svn r1337) Use MapMax[XY]() (or MapSize[XY]() if appropriate) instead of TILE_MAX_[XY]
tron
parents:
847
diff
changeset
|
620 |
y2 = min(y + h + rad, MapSizeY()); |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
621 |
x1 = max(x - rad, 0); |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
622 |
y1 = max(y - rad, 0); |
0 | 623 |
|
624 |
assert(x1 < x2); |
|
625 |
assert(y1 < y2); |
|
626 |
assert(w > 0); |
|
627 |
assert(h > 0); |
|
628 |
||
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
629 |
for (yc = y1; yc != y2; yc++) { |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
630 |
for (xc = x1; xc != x2; xc++) { |
1981 | 631 |
TileIndex tile = TileXY(xc, yc); |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
632 |
|
1035
0a170deb6e33
(svn r1536) Move GET_TILEHEIGHT, GET_TILETYPE and IS_TILETYPE to map.h, turn them into inline functions and add some asserts
tron
parents:
1032
diff
changeset
|
633 |
if (!IsTileType(tile, MP_STATION)) { |
473
0da86c59e3ae
(svn r724) Remove restriction that a tile can only accept 3 cargo types.
tron
parents:
457
diff
changeset
|
634 |
AcceptedCargo ac; |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
635 |
uint i; |
473
0da86c59e3ae
(svn r724) Remove restriction that a tile can only accept 3 cargo types.
tron
parents:
457
diff
changeset
|
636 |
|
0da86c59e3ae
(svn r724) Remove restriction that a tile can only accept 3 cargo types.
tron
parents:
457
diff
changeset
|
637 |
GetAcceptedCargo(tile, ac); |
2639 | 638 |
for (i = 0; i < lengthof(ac); ++i) accepts[i] += ac[i]; |
0 | 639 |
} |
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
640 |
} |
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
641 |
} |
0 | 642 |
} |
643 |
||
2793
d613eb566917
(svn r3341) -Codechange: make mingw32 happy, and renamed Rectangle, because it already exists on that platform
truelight
parents:
2767
diff
changeset
|
644 |
typedef struct ottd_Rectangle { |
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
645 |
uint min_x; |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
646 |
uint min_y; |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
647 |
uint max_x; |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
648 |
uint max_y; |
2793
d613eb566917
(svn r3341) -Codechange: make mingw32 happy, and renamed Rectangle, because it already exists on that platform
truelight
parents:
2767
diff
changeset
|
649 |
} ottd_Rectangle; |
d613eb566917
(svn r3341) -Codechange: make mingw32 happy, and renamed Rectangle, because it already exists on that platform
truelight
parents:
2767
diff
changeset
|
650 |
|
d613eb566917
(svn r3341) -Codechange: make mingw32 happy, and renamed Rectangle, because it already exists on that platform
truelight
parents:
2767
diff
changeset
|
651 |
static void MergePoint(ottd_Rectangle* rect, TileIndex tile) |
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
652 |
{ |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
653 |
uint x = TileX(tile); |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
654 |
uint y = TileY(tile); |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
655 |
|
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
656 |
if (rect->min_x > x) rect->min_x = x; |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
657 |
if (rect->min_y > y) rect->min_y = y; |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
658 |
if (rect->max_x < x) rect->max_x = x; |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
659 |
if (rect->max_y < y) rect->max_y = y; |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
660 |
} |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
661 |
|
0 | 662 |
// Update the acceptance for a station. |
663 |
// show_msg controls whether to display a message that acceptance was changed. |
|
664 |
static void UpdateStationAcceptance(Station *st, bool show_msg) |
|
665 |
{ |
|
666 |
uint old_acc, new_acc; |
|
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
667 |
const RoadStop *cur_rs; |
0 | 668 |
int i; |
2793
d613eb566917
(svn r3341) -Codechange: make mingw32 happy, and renamed Rectangle, because it already exists on that platform
truelight
parents:
2767
diff
changeset
|
669 |
ottd_Rectangle rect; |
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
670 |
int rad; |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
671 |
AcceptedCargo accepts; |
0 | 672 |
|
1507
2d09b13f049f
(svn r2011) - Fix: [ 1162209 ] Fix OS/2 build (orudge) #2
darkvater
parents:
1477
diff
changeset
|
673 |
rect.min_x = MapSizeX(); |
2d09b13f049f
(svn r2011) - Fix: [ 1162209 ] Fix OS/2 build (orudge) #2
darkvater
parents:
1477
diff
changeset
|
674 |
rect.min_y = MapSizeY(); |
2d09b13f049f
(svn r2011) - Fix: [ 1162209 ] Fix OS/2 build (orudge) #2
darkvater
parents:
1477
diff
changeset
|
675 |
rect.max_x = rect.max_y = 0; |
0 | 676 |
// Don't update acceptance for a buoy |
2639 | 677 |
if (IsBuoy(st)) return; |
0 | 678 |
|
679 |
/* old accepted goods types */ |
|
680 |
old_acc = GetAcceptanceMask(st); |
|
681 |
||
682 |
// Put all the tiles that span an area in the table. |
|
683 |
if (st->train_tile != 0) { |
|
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
684 |
MergePoint(&rect, st->train_tile); |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
685 |
MergePoint(&rect, |
1981 | 686 |
st->train_tile + TileDiffXY(st->trainst_w - 1, st->trainst_h - 1) |
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
687 |
); |
0 | 688 |
} |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
689 |
|
0 | 690 |
if (st->airport_tile != 0) { |
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
691 |
MergePoint(&rect, st->airport_tile); |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
692 |
MergePoint(&rect, |
1981 | 693 |
st->airport_tile + TileDiffXY( |
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
694 |
_airport_size_x[st->airport_type] - 1, |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
695 |
_airport_size_y[st->airport_type] - 1 |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
696 |
) |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
697 |
); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
698 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
699 |
|
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
700 |
if (st->dock_tile != 0) MergePoint(&rect, st->dock_tile); |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
701 |
|
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
702 |
for (cur_rs = st->bus_stops; cur_rs != NULL; cur_rs = cur_rs->next) { |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
703 |
MergePoint(&rect, cur_rs->xy); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
704 |
} |
0 | 705 |
|
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
706 |
for (cur_rs = st->truck_stops; cur_rs != NULL; cur_rs = cur_rs->next) { |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
707 |
MergePoint(&rect, cur_rs->xy); |
0 | 708 |
} |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
709 |
|
2631
13daba67f217
(svn r3173) Use the trinary operator and switch to improve readability
tron
parents:
2630
diff
changeset
|
710 |
rad = (_patches.modified_catchment) ? FindCatchmentRadius(st) : 4; |
0 | 711 |
|
712 |
// And retrieve the acceptance. |
|
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
713 |
if (rect.max_x >= rect.min_x) { |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
714 |
GetAcceptanceAroundTiles( |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
715 |
accepts, |
1981 | 716 |
TileXY(rect.min_x, rect.min_y), |
1423
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
717 |
rect.max_x - rect.min_x + 1, |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
718 |
rect.max_y - rect.min_y + 1, |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
719 |
rad |
50abec7ebe37
(svn r1927) Replace implementation of UpdateStationAcceptance(). The new one doesn't malloc() and calculates the station area in one pass instead of 3
tron
parents:
1417
diff
changeset
|
720 |
); |
0 | 721 |
} else { |
722 |
memset(accepts, 0, sizeof(accepts)); |
|
723 |
} |
|
724 |
||
725 |
// Adjust in case our station only accepts fewer kinds of goods |
|
1424
c6d120592e98
(svn r1928) Miscellaneous cleanups (data types, whitespace, const correctness)
tron
parents:
1423
diff
changeset
|
726 |
for (i = 0; i != NUM_CARGO; i++) { |
0 | 727 |
uint amt = min(accepts[i], 15); |
728 |
||
729 |
// Make sure the station can accept the goods type. |
|
730 |
if ((i != CT_PASSENGERS && !(st->facilities & (byte)~FACIL_BUS_STOP)) || |
|
731 |
(i == CT_PASSENGERS && !(st->facilities & (byte)~FACIL_TRUCK_STOP))) |
|
732 |
amt = 0; |
|
733 |
||
2504
7c27fc230cda
(svn r3030) More work for GB/SB, this time concerning the waiting_acceptance attribute of stations
tron
parents:
2502
diff
changeset
|
734 |
SB(st->goods[i].waiting_acceptance, 12, 4, amt); |
0 | 735 |
} |
736 |
||
737 |
// Only show a message in case the acceptance was actually changed. |
|
738 |
new_acc = GetAcceptanceMask(st); |
|
739 |
if (old_acc == new_acc) |
|
740 |
return; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
741 |
|
0 | 742 |
// show a message to report that the acceptance was changed? |
743 |
if (show_msg && st->owner == _local_player && st->facilities) { |
|
744 |
uint32 accept=0, reject=0; /* these contain two string ids each */ |
|
745 |
const StringID *str = _cargoc.names_s; |
|
746 |
||
747 |
do { |
|
748 |
if (new_acc & 1) { |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
749 |
if (!(old_acc & 1)) accept = (accept << 16) | *str; |
0 | 750 |
} else { |
751 |
if (old_acc & 1) reject = (reject << 16) | *str; |
|
752 |
} |
|
753 |
} while (str++,(new_acc>>=1) != (old_acc>>=1)); |
|
754 |
||
755 |
ShowRejectOrAcceptNews(st, accept, STR_3040_NOW_ACCEPTS); |
|
756 |
ShowRejectOrAcceptNews(st, reject, STR_303E_NO_LONGER_ACCEPTS); |
|
757 |
} |
|
758 |
||
759 |
// redraw the station view since acceptance changed |
|
760 |
InvalidateWindowWidget(WC_STATION_VIEW, st->index, 4); |
|
761 |
} |
|
762 |
||
763 |
// This is called right after a station was deleted. |
|
764 |
// It checks if the whole station is free of substations, and if so, the station will be |
|
765 |
// deleted after a little while. |
|
2639 | 766 |
static void DeleteStationIfEmpty(Station* st) |
767 |
{ |
|
0 | 768 |
if (st->facilities == 0) { |
769 |
st->delete_ctr = 0; |
|
28
635ad4c62bec
(svn r29) -Fix You cannot take ownership of an oilrig by building right next to it
darkvater
parents:
27
diff
changeset
|
770 |
InvalidateWindow(WC_STATION_LIST, st->owner); |
27
87c8058a69b5
(svn r28) -Fix removing station merged with oilrig, will reset oilrigs ownership
darkvater
parents:
22
diff
changeset
|
771 |
} |
0 | 772 |
} |
773 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
774 |
static int32 ClearTile_Station(TileIndex tile, byte flags); |
977
bcafa4f6550a
(svn r1472) -Fix: correct error message for when trying to build a railroad station over a bus/truck/etc-station.
darkvater
parents:
972
diff
changeset
|
775 |
|
0 | 776 |
// Tries to clear the given area. Returns the cost in case of success. |
777 |
// Or an error code if it failed. |
|
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
778 |
int32 CheckFlatLandBelow(TileIndex tile, uint w, uint h, uint flags, uint invalid_dirs, StationID* station) |
0 | 779 |
{ |
780 |
int32 cost = 0, ret; |
|
781 |
||
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
782 |
Slope tileh; |
1335
a635854c23b6
(svn r1839) Move GetTileSlope() and GetTileZ() into tile.[ch] and use more explicit types as parameters
tron
parents:
1328
diff
changeset
|
783 |
uint z; |
a635854c23b6
(svn r1839) Move GetTileSlope() and GetTileZ() into tile.[ch] and use more explicit types as parameters
tron
parents:
1328
diff
changeset
|
784 |
int allowed_z = -1; |
a635854c23b6
(svn r1839) Move GetTileSlope() and GetTileZ() into tile.[ch] and use more explicit types as parameters
tron
parents:
1328
diff
changeset
|
785 |
int flat_z; |
0 | 786 |
|
787 |
BEGIN_TILE_LOOP(tile_cur, w, h, tile) |
|
2639 | 788 |
if (!EnsureNoVehicle(tile_cur)) return CMD_ERROR; |
0 | 789 |
|
790 |
tileh = GetTileSlope(tile_cur, &z); |
|
791 |
||
2085
ae9e92ffe168
(svn r2595) -Codechange: Introduced "IsSteepTileh" to find whether a tile is steep
celestar
parents:
2049
diff
changeset
|
792 |
/* Prohibit building if |
ae9e92ffe168
(svn r2595) -Codechange: Introduced "IsSteepTileh" to find whether a tile is steep
celestar
parents:
2049
diff
changeset
|
793 |
1) The tile is "steep" (i.e. stretches two height levels) |
ae9e92ffe168
(svn r2595) -Codechange: Introduced "IsSteepTileh" to find whether a tile is steep
celestar
parents:
2049
diff
changeset
|
794 |
-OR- |
ae9e92ffe168
(svn r2595) -Codechange: Introduced "IsSteepTileh" to find whether a tile is steep
celestar
parents:
2049
diff
changeset
|
795 |
2) The tile is non-flat if |
ae9e92ffe168
(svn r2595) -Codechange: Introduced "IsSteepTileh" to find whether a tile is steep
celestar
parents:
2049
diff
changeset
|
796 |
a) the player building is an "old-school" AI |
ae9e92ffe168
(svn r2595) -Codechange: Introduced "IsSteepTileh" to find whether a tile is steep
celestar
parents:
2049
diff
changeset
|
797 |
-OR- |
ae9e92ffe168
(svn r2595) -Codechange: Introduced "IsSteepTileh" to find whether a tile is steep
celestar
parents:
2049
diff
changeset
|
798 |
b) the build_on_slopes switch is disabled |
ae9e92ffe168
(svn r2595) -Codechange: Introduced "IsSteepTileh" to find whether a tile is steep
celestar
parents:
2049
diff
changeset
|
799 |
*/ |
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
800 |
if (IsSteepSlope(tileh) || |
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
801 |
((_is_old_ai_player || !_patches.build_on_slopes) && tileh != SLOPE_FLAT)) { |
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
802 |
return_cmd_error(STR_0007_FLAT_LAND_REQUIRED); |
0 | 803 |
} |
804 |
||
805 |
flat_z = z; |
|
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
806 |
if (tileh != SLOPE_FLAT) { |
0 | 807 |
// need to check so the entrance to the station is not pointing at a slope. |
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
808 |
if ((invalid_dirs&1 && !(tileh & SLOPE_NE) && (uint)w_cur == w) || |
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
809 |
(invalid_dirs&2 && !(tileh & SLOPE_SE) && h_cur == 1) || |
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
810 |
(invalid_dirs&4 && !(tileh & SLOPE_SW) && w_cur == 1) || |
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
811 |
(invalid_dirs&8 && !(tileh & SLOPE_NW) && (uint)h_cur == h)) { |
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
812 |
return_cmd_error(STR_0007_FLAT_LAND_REQUIRED); |
0 | 813 |
} |
814 |
cost += _price.terraform; |
|
3645
86af43f87885
(svn r4554) Replace magic numbers by TILE_{HEIGHT,SIZE}
tron
parents:
3636
diff
changeset
|
815 |
flat_z += TILE_HEIGHT; |
0 | 816 |
} |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
817 |
|
0 | 818 |
// get corresponding flat level and make sure that all parts of the station have the same level. |
819 |
if (allowed_z == -1) { |
|
820 |
// first tile |
|
821 |
allowed_z = flat_z; |
|
822 |
} else if (allowed_z != flat_z) { |
|
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
823 |
return_cmd_error(STR_0007_FLAT_LAND_REQUIRED); |
0 | 824 |
} |
825 |
||
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
826 |
// if station is set, then we have special handling to allow building on top of already existing stations. |
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
827 |
// so station points to INVALID_STATION if we can build on any station. or it points to a station if we're only allowed to build |
0 | 828 |
// on exactly that station. |
1035
0a170deb6e33
(svn r1536) Move GET_TILEHEIGHT, GET_TILETYPE and IS_TILETYPE to map.h, turn them into inline functions and add some asserts
tron
parents:
1032
diff
changeset
|
829 |
if (station != NULL && IsTileType(tile_cur, MP_STATION)) { |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
830 |
if (!IsRailwayStation(tile_cur)) { |
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
831 |
return ClearTile_Station(tile_cur, DC_AUTO); // get error message |
0 | 832 |
} else { |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
833 |
StationID st = GetStationIndex(tile_cur); |
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
834 |
if (*station == INVALID_STATION) { |
0 | 835 |
*station = st; |
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
836 |
} else if (*station != st) { |
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
837 |
return_cmd_error(STR_3006_ADJOINS_MORE_THAN_ONE_EXISTING); |
0 | 838 |
} |
839 |
} |
|
840 |
} else { |
|
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
841 |
ret = DoCommand(tile_cur, 0, 0, flags, CMD_LANDSCAPE_CLEAR); |
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
842 |
if (CmdFailed(ret)) return ret; |
0 | 843 |
cost += ret; |
844 |
} |
|
845 |
END_TILE_LOOP(tile_cur, w, h, tile) |
|
846 |
||
847 |
return cost; |
|
848 |
} |
|
849 |
||
3157
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
850 |
static bool CanExpandRailroadStation(Station* st, uint* fin, Axis axis) |
0 | 851 |
{ |
852 |
uint curw = st->trainst_w, curh = st->trainst_h; |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
853 |
TileIndex tile = fin[0]; |
0 | 854 |
uint w = fin[1]; |
855 |
uint h = fin[2]; |
|
856 |
||
857 |
if (_patches.nonuniform_stations) { |
|
858 |
// determine new size of train station region.. |
|
926
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
859 |
int x = min(TileX(st->train_tile), TileX(tile)); |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
860 |
int y = min(TileY(st->train_tile), TileY(tile)); |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
861 |
curw = max(TileX(st->train_tile) + curw, TileX(tile) + w) - x; |
bd4312619522
(svn r1414) Move TileIndex, TILE_MASK and GET_TILE_[XY] to map.h and turn the latter into inline functions names Tile[XY]
tron
parents:
919
diff
changeset
|
862 |
curh = max(TileY(st->train_tile) + curh, TileY(tile) + h) - y; |
1981 | 863 |
tile = TileXY(x, y); |
0 | 864 |
} else { |
3157
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
865 |
// check so the orientation is the same |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
866 |
if (GetRailStationAxis(st->train_tile) != axis) { |
1189
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
867 |
_error_message = STR_306D_NONUNIFORM_STATIONS_DISALLOWED; |
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
868 |
return false; |
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
869 |
} |
0 | 870 |
|
871 |
// check if the new station adjoins the old station in either direction |
|
1981 | 872 |
if (curw == w && st->train_tile == tile + TileDiffXY(0, h)) { |
0 | 873 |
// above |
874 |
curh += h; |
|
1981 | 875 |
} else if (curw == w && st->train_tile == tile - TileDiffXY(0, curh)) { |
0 | 876 |
// below |
1981 | 877 |
tile -= TileDiffXY(0, curh); |
0 | 878 |
curh += h; |
1981 | 879 |
} else if (curh == h && st->train_tile == tile + TileDiffXY(w, 0)) { |
0 | 880 |
// to the left |
881 |
curw += w; |
|
1981 | 882 |
} else if (curh == h && st->train_tile == tile - TileDiffXY(curw, 0)) { |
0 | 883 |
// to the right |
1981 | 884 |
tile -= TileDiffXY(curw, 0); |
0 | 885 |
curw += w; |
1189
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
886 |
} else { |
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
887 |
_error_message = STR_306D_NONUNIFORM_STATIONS_DISALLOWED; |
0 | 888 |
return false; |
1189
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
889 |
} |
0 | 890 |
} |
891 |
// make sure the final size is not too big. |
|
1189
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
892 |
if (curw > _patches.station_spread || curh > _patches.station_spread) { |
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
893 |
_error_message = STR_306C_STATION_TOO_SPREAD_OUT; |
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
894 |
return false; |
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
895 |
} |
0 | 896 |
|
897 |
// now tile contains the new value for st->train_tile |
|
898 |
// curw, curh contain the new value for width and height |
|
899 |
fin[0] = tile; |
|
900 |
fin[1] = curw; |
|
901 |
fin[2] = curh; |
|
902 |
return true; |
|
903 |
} |
|
904 |
||
536 | 905 |
static inline byte *CreateSingle(byte *layout, int n) |
0 | 906 |
{ |
907 |
int i = n; |
|
908 |
do *layout++ = 0; while (--i); |
|
909 |
layout[((n-1) >> 1)-n] = 2; |
|
910 |
return layout; |
|
911 |
} |
|
912 |
||
536 | 913 |
static inline byte *CreateMulti(byte *layout, int n, byte b) |
0 | 914 |
{ |
915 |
int i = n; |
|
916 |
do *layout++ = b; while (--i); |
|
917 |
if (n > 4) { |
|
918 |
layout[0-n] = 0; |
|
919 |
layout[n-1-n] = 0; |
|
920 |
} |
|
921 |
return layout; |
|
922 |
} |
|
923 |
||
3676
48444d881fbe
(svn r4593) CodeChange : Renamed spec (when using StationSpec) to statspec.
belugas
parents:
3657
diff
changeset
|
924 |
static void GetStationLayout(byte *layout, int numtracks, int plat_len, const StationSpec *statspec) |
0 | 925 |
{ |
3676
48444d881fbe
(svn r4593) CodeChange : Renamed spec (when using StationSpec) to statspec.
belugas
parents:
3657
diff
changeset
|
926 |
if (statspec != NULL && statspec->lengths >= plat_len && |
48444d881fbe
(svn r4593) CodeChange : Renamed spec (when using StationSpec) to statspec.
belugas
parents:
3657
diff
changeset
|
927 |
statspec->platforms[plat_len - 1] >= numtracks && |
48444d881fbe
(svn r4593) CodeChange : Renamed spec (when using StationSpec) to statspec.
belugas
parents:
3657
diff
changeset
|
928 |
statspec->layouts[plat_len - 1][numtracks - 1]) { |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
929 |
/* Custom layout defined, follow it. */ |
3676
48444d881fbe
(svn r4593) CodeChange : Renamed spec (when using StationSpec) to statspec.
belugas
parents:
3657
diff
changeset
|
930 |
memcpy(layout, statspec->layouts[plat_len - 1][numtracks - 1], |
1472
043304846688
(svn r1976) Cleanups - mostly indentation and fiddling with loops
tron
parents:
1457
diff
changeset
|
931 |
plat_len * numtracks); |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
932 |
return; |
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
933 |
} |
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
934 |
|
0 | 935 |
if (plat_len == 1) { |
936 |
CreateSingle(layout, numtracks); |
|
937 |
} else { |
|
2639 | 938 |
if (numtracks & 1) layout = CreateSingle(layout, plat_len); |
939 |
numtracks >>= 1; |
|
0 | 940 |
|
941 |
while (--numtracks >= 0) { |
|
942 |
layout = CreateMulti(layout, plat_len, 4); |
|
943 |
layout = CreateMulti(layout, plat_len, 6); |
|
944 |
} |
|
945 |
} |
|
946 |
} |
|
947 |
||
1775
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
948 |
/** Build railroad station |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
949 |
* @param tile_org starting position of station dragging/placement |
1775
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
950 |
* @param p1 various bitstuffed elements |
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
951 |
* - p1 = (bit 0) - orientation (p1 & 1) |
2140
d708eb80ab8b
(svn r2650) Convert many explicit shifts+ands to extract bits to invocations of GB - should be a bit nicer to read
tron
parents:
2133
diff
changeset
|
952 |
* - p1 = (bit 8-15) - number of tracks |
d708eb80ab8b
(svn r2650) Convert many explicit shifts+ands to extract bits to invocations of GB - should be a bit nicer to read
tron
parents:
2133
diff
changeset
|
953 |
* - p1 = (bit 16-23) - platform length |
1775
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
954 |
* @param p2 various bitstuffed elements |
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
955 |
* - p2 = (bit 0- 3) - railtype (p2 & 0xF) |
3587 | 956 |
* - p2 = (bit 8-15) - custom station class |
957 |
* - p2 = (bit 16-23) - custom station id |
|
0 | 958 |
*/ |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
959 |
int32 CmdBuildRailroadStation(TileIndex tile_org, uint32 flags, uint32 p1, uint32 p2) |
0 | 960 |
{ |
1775
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
961 |
Station *st; |
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
962 |
int w_org, h_org; |
0 | 963 |
int32 cost, ret; |
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
964 |
StationID est; |
0 | 965 |
int plat_len, numtracks; |
3157
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
966 |
Axis axis; |
0 | 967 |
uint finalvalues[3]; |
3587 | 968 |
const StationSpec *statspec; |
969 |
int specindex; |
|
0 | 970 |
|
971 |
SET_EXPENSES_TYPE(EXPENSES_CONSTRUCTION); |
|
972 |
||
973 |
/* Does the authority allow this? */ |
|
1775
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
974 |
if (!(flags & DC_NO_TOWN_RATING) && !CheckIfAuthorityAllows(tile_org)) return CMD_ERROR; |
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
975 |
if (!ValParamRailtype(p2 & 0xF)) return CMD_ERROR; |
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
976 |
|
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
977 |
/* unpack parameters */ |
3157
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
978 |
axis = p1 & 1; |
2140
d708eb80ab8b
(svn r2650) Convert many explicit shifts+ands to extract bits to invocations of GB - should be a bit nicer to read
tron
parents:
2133
diff
changeset
|
979 |
numtracks = GB(p1, 8, 8); |
d708eb80ab8b
(svn r2650) Convert many explicit shifts+ands to extract bits to invocations of GB - should be a bit nicer to read
tron
parents:
2133
diff
changeset
|
980 |
plat_len = GB(p1, 16, 8); |
1775
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
981 |
/* w = length, h = num_tracks */ |
3157
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
982 |
if (axis == AXIS_X) { |
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
983 |
w_org = plat_len; |
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
984 |
h_org = numtracks; |
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
985 |
} else { |
1775
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
986 |
h_org = plat_len; |
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
987 |
w_org = numtracks; |
0 | 988 |
} |
989 |
||
1781
92e08797c84b
(svn r2285) - Codechange: Fix up some of the missing things from server-checking; namely bridge-type, bridge-length, dragged end-tile (bridge/station), station_spread
Darkvater
parents:
1775
diff
changeset
|
990 |
if (h_org > _patches.station_spread || w_org > _patches.station_spread) return CMD_ERROR; |
92e08797c84b
(svn r2285) - Codechange: Fix up some of the missing things from server-checking; namely bridge-type, bridge-length, dragged end-tile (bridge/station), station_spread
Darkvater
parents:
1775
diff
changeset
|
991 |
|
0 | 992 |
// these values are those that will be stored in train_tile and station_platforms |
993 |
finalvalues[0] = tile_org; |
|
994 |
finalvalues[1] = w_org; |
|
995 |
finalvalues[2] = h_org; |
|
996 |
||
997 |
// Make sure the area below consists of clear tiles. (OR tiles belonging to a certain rail station) |
|
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
998 |
est = INVALID_STATION; |
313
6660bb7b38f1
(svn r319) -Fix: [ 1029064 ] Building a station acted weird in some rare situations
truelight
parents:
243
diff
changeset
|
999 |
// If DC_EXEC is in flag, do not want to pass it to CheckFlatLandBelow, because of a nice bug |
6660bb7b38f1
(svn r319) -Fix: [ 1029064 ] Building a station acted weird in some rare situations
truelight
parents:
243
diff
changeset
|
1000 |
// for detail info, see: https://sourceforge.net/tracker/index.php?func=detail&aid=1029064&group_id=103924&atid=636365 |
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1001 |
ret = CheckFlatLandBelow(tile_org, w_org, h_org, flags & ~DC_EXEC, 5 << axis, _patches.nonuniform_stations ? &est : NULL); |
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1002 |
if (CmdFailed(ret)) return ret; |
0 | 1003 |
cost = ret + (numtracks * _price.train_station_track + _price.train_station_length) * plat_len; |
1004 |
||
1005 |
// Make sure there are no similar stations around us. |
|
1006 |
st = GetStationAround(tile_org, w_org, h_org, est); |
|
1007 |
if (st == CHECK_STATIONS_ERR) return CMD_ERROR; |
|
1008 |
||
1009 |
// See if there is a deleted station close to us. |
|
1010 |
if (st == NULL) { |
|
1011 |
st = GetClosestStationFromTile(tile_org, 8, _current_player); |
|
1012 |
if (st != NULL && st->facilities) st = NULL; |
|
1013 |
} |
|
1014 |
||
1015 |
if (st != NULL) { |
|
1016 |
// Reuse an existing station. |
|
1017 |
if (st->owner != OWNER_NONE && st->owner != _current_player) |
|
1018 |
return_cmd_error(STR_3009_TOO_CLOSE_TO_ANOTHER_STATION); |
|
1019 |
||
1020 |
if (st->train_tile != 0) { |
|
84
1e0721c29bad
(svn r85) -Add: initial commit of new AI (enable in Patch menu)
truelight
parents:
71
diff
changeset
|
1021 |
// check if we want to expanding an already existing station? |
2422
914a12dee832
(svn r2948) -Fix: the old AI needs a special flag that triggers all kind of special
truelight
parents:
2395
diff
changeset
|
1022 |
if (_is_old_ai_player || !_patches.join_stations) |
0 | 1023 |
return_cmd_error(STR_3005_TOO_CLOSE_TO_ANOTHER_RAILROAD); |
3157
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
1024 |
if (!CanExpandRailroadStation(st, finalvalues, axis)) |
1189
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
1025 |
return CMD_ERROR; |
0 | 1026 |
} |
1027 |
||
1189
5ff98d7485b3
(svn r1693) -Fix: [ 1108618 ] A wrong error message was displayed when trying to
Celestar
parents:
1174
diff
changeset
|
1028 |
//XXX can't we pack this in the "else" part of the if above? |
2639 | 1029 |
if (!CheckStationSpreadOut(st, tile_org, w_org, h_org)) return CMD_ERROR; |
0 | 1030 |
} else { |
1031 |
// Create a new station |
|
1032 |
st = AllocateStation(); |
|
2639 | 1033 |
if (st == NULL) return CMD_ERROR; |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1034 |
|
0 | 1035 |
st->town = ClosestTownFromTile(tile_org, (uint)-1); |
2639 | 1036 |
if (_current_player < MAX_PLAYERS && flags & DC_EXEC) |
0 | 1037 |
SETBIT(st->town->have_ratings, _current_player); |
1038 |
||
2639 | 1039 |
if (!GenerateStationName(st, tile_org, 0)) return CMD_ERROR; |
1040 |
||
1041 |
if (flags & DC_EXEC) StationInitialize(st, tile_org); |
|
0 | 1042 |
} |
1043 |
||
3587 | 1044 |
/* Check if the given station class is valid */ |
1045 |
if (GB(p2, 8, 8) >= STAT_CLASS_MAX) return CMD_ERROR; |
|
1046 |
||
1047 |
/* Check if we can allocate a custom stationspec to this station */ |
|
3676
48444d881fbe
(svn r4593) CodeChange : Renamed spec (when using StationSpec) to statspec.
belugas
parents:
3657
diff
changeset
|
1048 |
statspec = GetCustomStationSpec(GB(p2, 8, 8), GB(p2, 16, 8)); |
3587 | 1049 |
specindex = AllocateSpecToStation(statspec, st, flags & DC_EXEC); |
1050 |
if (specindex == -1) return CMD_ERROR; |
|
1051 |
||
0 | 1052 |
if (flags & DC_EXEC) { |
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
1053 |
TileIndexDiff tile_delta; |
0 | 1054 |
byte *layout_ptr; |
2824
a7a9d3239884
(svn r3372) - Fix: update signal states when building or removing rail station blocks
peter1138
parents:
2817
diff
changeset
|
1055 |
Track track; |
0 | 1056 |
|
313
6660bb7b38f1
(svn r319) -Fix: [ 1029064 ] Building a station acted weird in some rare situations
truelight
parents:
243
diff
changeset
|
1057 |
// Now really clear the land below the station |
6660bb7b38f1
(svn r319) -Fix: [ 1029064 ] Building a station acted weird in some rare situations
truelight
parents:
243
diff
changeset
|
1058 |
// It should never return CMD_ERROR.. but you never know ;) |
6660bb7b38f1
(svn r319) -Fix: [ 1029064 ] Building a station acted weird in some rare situations
truelight
parents:
243
diff
changeset
|
1059 |
// (a bit strange function name for it, but it really does clear the land, when DC_EXEC is in flags) |
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1060 |
ret = CheckFlatLandBelow(tile_org, w_org, h_org, flags, 5 << axis, _patches.nonuniform_stations ? &est : NULL); |
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1061 |
if (CmdFailed(ret)) return ret; |
313
6660bb7b38f1
(svn r319) -Fix: [ 1029064 ] Building a station acted weird in some rare situations
truelight
parents:
243
diff
changeset
|
1062 |
|
0 | 1063 |
st->train_tile = finalvalues[0]; |
1064 |
if (!st->facilities) st->xy = finalvalues[0]; |
|
1065 |
st->facilities |= FACIL_TRAIN; |
|
1066 |
st->owner = _current_player; |
|
1067 |
||
1068 |
st->trainst_w = finalvalues[1]; |
|
1069 |
st->trainst_h = finalvalues[2]; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1070 |
|
71
1b8e15a10515
(svn r72) -Add: build_date of station (viewable with Query tool)
truelight
parents:
65
diff
changeset
|
1071 |
st->build_date = _date; |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1072 |
|
3157
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
1073 |
tile_delta = (axis == AXIS_X ? TileDiffXY(1, 0) : TileDiffXY(0, 1)); |
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
1074 |
track = (axis == AXIS_X ? TRACK_X : TRACK_Y); |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1075 |
|
0 | 1076 |
layout_ptr = alloca(numtracks * plat_len); |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1077 |
GetStationLayout(layout_ptr, numtracks, plat_len, statspec); |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1078 |
|
0 | 1079 |
do { |
1775
08ff0f12ccdc
(svn r2279) - Fix: Check the parameters of the first 10 Commands. While there also add proper comments for the functions and fix up CmdFailed()
Darkvater
parents:
1774
diff
changeset
|
1080 |
TileIndex tile = tile_org; |
0 | 1081 |
int w = plat_len; |
1082 |
do { |
|
1083 |
||
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1084 |
MakeRailStation(tile, st->owner, st->index, axis, *layout_ptr++, GB(p2, 0, 4)); |
3587 | 1085 |
SetCustomStationSpecIndex(tile, specindex); |
0 | 1086 |
|
1087 |
tile += tile_delta; |
|
1088 |
} while (--w); |
|
2824
a7a9d3239884
(svn r3372) - Fix: update signal states when building or removing rail station blocks
peter1138
parents:
2817
diff
changeset
|
1089 |
SetSignalsOnBothDir(tile_org, track); |
1981 | 1090 |
tile_org += tile_delta ^ TileDiffXY(1, 1); // perpendicular to tile_delta |
0 | 1091 |
} while (--numtracks); |
1092 |
||
1093 |
UpdateStationVirtCoordDirty(st); |
|
1094 |
UpdateStationAcceptance(st, false); |
|
1095 |
InvalidateWindow(WC_STATION_LIST, st->owner); |
|
1096 |
} |
|
1097 |
||
1098 |
return cost; |
|
1099 |
} |
|
1100 |
||
2805
b6098e7ca457
(svn r3353) Simplify the automatic length adjustment algorithm for replacing trains: Use the length of the train before the replacement as reference length
tron
parents:
2793
diff
changeset
|
1101 |
static bool TileBelongsToRailStation(const Station *st, TileIndex tile) |
b6098e7ca457
(svn r3353) Simplify the automatic length adjustment algorithm for replacing trains: Use the length of the train before the replacement as reference length
tron
parents:
2793
diff
changeset
|
1102 |
{ |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1103 |
return IsTileType(tile, MP_STATION) && GetStationIndex(tile) == st->index && IsRailwayStation(tile); |
2805
b6098e7ca457
(svn r3353) Simplify the automatic length adjustment algorithm for replacing trains: Use the length of the train before the replacement as reference length
tron
parents:
2793
diff
changeset
|
1104 |
} |
b6098e7ca457
(svn r3353) Simplify the automatic length adjustment algorithm for replacing trains: Use the length of the train before the replacement as reference length
tron
parents:
2793
diff
changeset
|
1105 |
|
0 | 1106 |
static void MakeRailwayStationAreaSmaller(Station *st) |
1107 |
{ |
|
1108 |
uint w = st->trainst_w; |
|
1109 |
uint h = st->trainst_h; |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
1110 |
TileIndex tile = st->train_tile; |
0 | 1111 |
uint i; |
1112 |
||
1113 |
restart: |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1114 |
|
0 | 1115 |
// too small? |
1116 |
if (w != 0 && h != 0) { |
|
1117 |
// check the left side, x = constant, y changes |
|
1981 | 1118 |
for (i = 0; !TileBelongsToRailStation(st, tile + TileDiffXY(0, i));) { |
0 | 1119 |
// the left side is unused? |
1981 | 1120 |
if (++i == h) { |
1121 |
tile += TileDiffXY(1, 0); |
|
1122 |
w--; |
|
1123 |
goto restart; |
|
1124 |
} |
|
1125 |
} |
|
0 | 1126 |
|
1127 |
// check the right side, x = constant, y changes |
|
1981 | 1128 |
for (i = 0; !TileBelongsToRailStation(st, tile + TileDiffXY(w - 1, i));) { |
0 | 1129 |
// the right side is unused? |
1981 | 1130 |
if (++i == h) { |
1131 |
w--; |
|
1132 |
goto restart; |
|
1133 |
} |
|
1134 |
} |
|
0 | 1135 |
|
1136 |
// check the upper side, y = constant, x changes |
|
1981 | 1137 |
for (i = 0; !TileBelongsToRailStation(st, tile + TileDiffXY(i, 0));) { |
0 | 1138 |
// the left side is unused? |
1981 | 1139 |
if (++i == w) { |
1140 |
tile += TileDiffXY(0, 1); |
|
1141 |
h--; |
|
1142 |
goto restart; |
|
1143 |
} |
|
1144 |
} |
|
0 | 1145 |
|
1146 |
// check the lower side, y = constant, x changes |
|
1981 | 1147 |
for (i = 0; !TileBelongsToRailStation(st, tile + TileDiffXY(i, h - 1));) { |
0 | 1148 |
// the left side is unused? |
1981 | 1149 |
if (++i == w) { |
1150 |
h--; |
|
1151 |
goto restart; |
|
1152 |
} |
|
1153 |
} |
|
0 | 1154 |
} else { |
1155 |
tile = 0; |
|
1156 |
} |
|
1157 |
||
1158 |
st->trainst_w = w; |
|
1159 |
st->trainst_h = h; |
|
1160 |
st->train_tile = tile; |
|
1161 |
} |
|
1162 |
||
1782
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1163 |
/** Remove a single tile from a railroad station. |
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1164 |
* This allows for custom-built station with holes and weird layouts |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1165 |
* @param tile tile of station piece to remove |
1782
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1166 |
* @param p1 unused |
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1167 |
* @param p2 unused |
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1168 |
*/ |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1169 |
int32 CmdRemoveFromRailroadStation(TileIndex tile, uint32 flags, uint32 p1, uint32 p2) |
0 | 1170 |
{ |
1171 |
Station *st; |
|
1172 |
||
889
7f8630bfea41
(svn r1375) -Fix: [1050990] Buying trains sometimes accounted for incorrectly. Was the result of the cost getting reset in a recursive call of docommand. That is fixed. In addition all cost-commands are typed explicitely. Please do not forget to do so or your costs will be credited to construction if you are unlucky.
darkvater
parents:
863
diff
changeset
|
1173 |
SET_EXPENSES_TYPE(EXPENSES_CONSTRUCTION); |
7f8630bfea41
(svn r1375) -Fix: [1050990] Buying trains sometimes accounted for incorrectly. Was the result of the cost getting reset in a recursive call of docommand. That is fixed. In addition all cost-commands are typed explicitely. Please do not forget to do so or your costs will be credited to construction if you are unlucky.
darkvater
parents:
863
diff
changeset
|
1174 |
|
0 | 1175 |
// make sure the specified tile belongs to the current player, and that it is a railroad station. |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1176 |
if (!IsTileType(tile, MP_STATION) || !IsRailwayStation(tile) || !_patches.nonuniform_stations) return CMD_ERROR; |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
1177 |
st = GetStationByTile(tile); |
149
5f7d4b21df01
(svn r150) -Fix: [1010833] Turning on the magic bulldozer removes oil rigs
darkvater
parents:
123
diff
changeset
|
1178 |
if (_current_player != OWNER_WATER && (!CheckOwnership(st->owner) || !EnsureNoVehicle(tile))) return CMD_ERROR; |
0 | 1179 |
|
1180 |
// if we reached here, it means we can actually delete it. do that. |
|
1181 |
if (flags & DC_EXEC) { |
|
3587 | 1182 |
uint specindex = GetCustomStationSpecIndex(tile); |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1183 |
Track track = GetRailStationTrack(tile); |
0 | 1184 |
DoClearSquare(tile); |
2824
a7a9d3239884
(svn r3372) - Fix: update signal states when building or removing rail station blocks
peter1138
parents:
2817
diff
changeset
|
1185 |
SetSignalsOnBothDir(tile, track); |
3587 | 1186 |
|
1187 |
DeallocateSpecFromStation(st, specindex); |
|
1188 |
||
0 | 1189 |
// now we need to make the "spanned" area of the railway station smaller if we deleted something at the edges. |
1190 |
// we also need to adjust train_tile. |
|
1191 |
MakeRailwayStationAreaSmaller(st); |
|
1192 |
||
1193 |
// if we deleted the whole station, delete the train facility. |
|
1194 |
if (st->train_tile == 0) { |
|
1195 |
st->facilities &= ~FACIL_TRAIN; |
|
1196 |
UpdateStationVirtCoordDirty(st); |
|
1197 |
DeleteStationIfEmpty(st); |
|
1198 |
} |
|
1199 |
} |
|
1200 |
return _price.remove_rail_station; |
|
1201 |
} |
|
1202 |
||
1203 |
// determine the number of platforms for the station |
|
2436
177cb6a8339f
(svn r2962) - const correctness for all Get* functions and most Draw* functions that don't change their pointer parameters
Darkvater
parents:
2427
diff
changeset
|
1204 |
uint GetStationPlatforms(const Station *st, TileIndex tile) |
0 | 1205 |
{ |
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
1206 |
TileIndex t; |
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
1207 |
TileIndexDiff delta; |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1208 |
Axis axis; |
2639 | 1209 |
uint len; |
0 | 1210 |
assert(TileBelongsToRailStation(st, tile)); |
1211 |
||
1212 |
len = 0; |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1213 |
axis = GetRailStationAxis(tile); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1214 |
delta = (axis == AXIS_X ? TileDiffXY(1, 0) : TileDiffXY(0, 1)); |
0 | 1215 |
|
1216 |
// find starting tile.. |
|
1217 |
t = tile; |
|
2639 | 1218 |
do { |
1219 |
t -= delta; |
|
1220 |
len++; |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1221 |
} while (TileBelongsToRailStation(st, t) && GetRailStationAxis(t) == axis); |
0 | 1222 |
|
1223 |
// find ending tile |
|
1224 |
t = tile; |
|
2639 | 1225 |
do { |
1226 |
t += delta; |
|
1227 |
len++; |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1228 |
} while (TileBelongsToRailStation(st, t) && GetRailStationAxis(t) == axis); |
0 | 1229 |
|
1230 |
return len - 1; |
|
1231 |
} |
|
1232 |
||
149
5f7d4b21df01
(svn r150) -Fix: [1010833] Turning on the magic bulldozer removes oil rigs
darkvater
parents:
123
diff
changeset
|
1233 |
static int32 RemoveRailroadStation(Station *st, TileIndex tile, uint32 flags) |
0 | 1234 |
{ |
1235 |
int w,h; |
|
1236 |
int32 cost; |
|
1237 |
||
149
5f7d4b21df01
(svn r150) -Fix: [1010833] Turning on the magic bulldozer removes oil rigs
darkvater
parents:
123
diff
changeset
|
1238 |
/* if there is flooding and non-uniform stations are enabled, remove platforms tile by tile */ |
5f7d4b21df01
(svn r150) -Fix: [1010833] Turning on the magic bulldozer removes oil rigs
darkvater
parents:
123
diff
changeset
|
1239 |
if (_current_player == OWNER_WATER && _patches.nonuniform_stations) |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1240 |
return DoCommand(tile, 0, 0, DC_EXEC, CMD_REMOVE_FROM_RAILROAD_STATION); |
149
5f7d4b21df01
(svn r150) -Fix: [1010833] Turning on the magic bulldozer removes oil rigs
darkvater
parents:
123
diff
changeset
|
1241 |
|
0 | 1242 |
/* Current player owns the station? */ |
1243 |
if (_current_player != OWNER_WATER && !CheckOwnership(st->owner)) |
|
1244 |
return CMD_ERROR; |
|
1245 |
||
1246 |
/* determine width and height of platforms */ |
|
1247 |
tile = st->train_tile; |
|
1248 |
w = st->trainst_w; |
|
1249 |
h = st->trainst_h; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1250 |
|
0 | 1251 |
assert(w != 0 && h != 0); |
1252 |
||
1253 |
/* cost is area * constant */ |
|
1254 |
cost = w*h*_price.remove_rail_station; |
|
1255 |
||
1256 |
/* clear all areas of the station */ |
|
1257 |
do { |
|
1258 |
int w_bak = w; |
|
1259 |
do { |
|
1260 |
// for nonuniform stations, only remove tiles that are actually train station tiles |
|
1261 |
if (TileBelongsToRailStation(st, tile)) { |
|
1262 |
if (!EnsureNoVehicle(tile)) |
|
1263 |
return CMD_ERROR; |
|
2824
a7a9d3239884
(svn r3372) - Fix: update signal states when building or removing rail station blocks
peter1138
parents:
2817
diff
changeset
|
1264 |
if (flags & DC_EXEC) { |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1265 |
Track track = GetRailStationTrack(tile); |
0 | 1266 |
DoClearSquare(tile); |
2824
a7a9d3239884
(svn r3372) - Fix: update signal states when building or removing rail station blocks
peter1138
parents:
2817
diff
changeset
|
1267 |
SetSignalsOnBothDir(tile, track); |
a7a9d3239884
(svn r3372) - Fix: update signal states when building or removing rail station blocks
peter1138
parents:
2817
diff
changeset
|
1268 |
} |
0 | 1269 |
} |
1981 | 1270 |
tile += TileDiffXY(1, 0); |
0 | 1271 |
} while (--w); |
1272 |
w = w_bak; |
|
1981 | 1273 |
tile += TileDiffXY(-w, 1); |
0 | 1274 |
} while (--h); |
1275 |
||
1276 |
if (flags & DC_EXEC) { |
|
1277 |
st->train_tile = 0; |
|
1278 |
st->facilities &= ~FACIL_TRAIN; |
|
1279 |
||
3587 | 1280 |
free(st->speclist); |
1281 |
st->num_specs = 0; |
|
1282 |
st->speclist = NULL; |
|
1283 |
||
0 | 1284 |
UpdateStationVirtCoordDirty(st); |
1285 |
DeleteStationIfEmpty(st); |
|
1286 |
} |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1287 |
|
0 | 1288 |
return cost; |
1289 |
} |
|
1290 |
||
3435
f299c6f48763
(svn r4265) - Fix: compile warning on VS2005 (parameter 2 different from declaration)
Darkvater
parents:
3431
diff
changeset
|
1291 |
int32 DoConvertStationRail(TileIndex tile, RailType totype, bool exec) |
0 | 1292 |
{ |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
1293 |
const Station* st = GetStationByTile(tile); |
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
1294 |
|
0 | 1295 |
if (!CheckOwnership(st->owner) || !EnsureNoVehicle(tile)) return CMD_ERROR; |
1296 |
||
1297 |
// tile is not a railroad station? |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1298 |
if (!IsRailwayStation(tile)) return CMD_ERROR; |
0 | 1299 |
|
3242
1cefa03f0d5e
(svn r3916) Get/Set the rail type by [GS]etRailType{Crossing,OnBridge,}()
tron
parents:
3222
diff
changeset
|
1300 |
if (GetRailType(tile) == totype) return CMD_ERROR; |
0 | 1301 |
|
1302 |
if (exec) { |
|
3242
1cefa03f0d5e
(svn r3916) Get/Set the rail type by [GS]etRailType{Crossing,OnBridge,}()
tron
parents:
3222
diff
changeset
|
1303 |
SetRailType(tile, totype); |
0 | 1304 |
MarkTileDirtyByTile(tile); |
1305 |
} |
|
1306 |
||
1307 |
return _price.build_rail >> 1; |
|
1308 |
} |
|
1309 |
||
3691
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1310 |
/** Heavy wizardry used to add a roadstop to a station. |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1311 |
* To understand the function, lets first look at what is passed around, |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1312 |
* especially the last two parameters. CmdBuildRoadStop allocates a road |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1313 |
* stop and needs to put that stop into the linked list of road stops. |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1314 |
* It (CmdBuildRoadStop) has a **currstop pointer which points to element |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1315 |
* in the linked list of stops (each element in this list being a pointer |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1316 |
* in itself, hence the double pointer). We (FindRoadStopSpot) need to |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1317 |
* modify this pointer (**currstop) thus we need to pass by reference, |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1318 |
* obtaining a triple pointer (***currstop). When finished, **currstop |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1319 |
* in CmdBuildRoadStop will contain the address of the pointer which will |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1320 |
* then point into the global roadstop array. *prev (in CmdBuildRoadStop) |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1321 |
* is the pointer tino the global roadstop array which has *currstop in |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1322 |
* its ->next element. |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1323 |
* @param[in] truck_station Determines whether a stop is RS_BUS or RS_TRUCK |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1324 |
* @param[in] station The station to do the whole procedure for |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1325 |
* @param[out] currstop See the detailed function description |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1326 |
* @param prev See the detailed function description |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1327 |
*/ |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1328 |
static void FindRoadStopSpot(bool truck_station, Station* st, RoadStop*** currstop, RoadStop** prev) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1329 |
{ |
3691
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1330 |
RoadStop **primary_stop = (truck_station) ? &st->truck_stops : &st->bus_stops; |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1331 |
assert(*prev == NULL); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1332 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1333 |
if (*primary_stop == NULL) { |
3691
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1334 |
//we have no roadstop of the type yet, so write a "primary stop" |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1335 |
*currstop = primary_stop; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1336 |
} else { |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1337 |
//there are stops already, so append to the end of the list |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1338 |
*prev = *primary_stop; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1339 |
*currstop = &(*primary_stop)->next; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1340 |
while (**currstop != NULL) { |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1341 |
*prev = (*prev)->next; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1342 |
*currstop = &(**currstop)->next; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1343 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1344 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1345 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1346 |
|
3691
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1347 |
/** Build a bus or truck stop |
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1348 |
* @param tile tile to build the stop at |
3333 | 1349 |
* @param p1 entrance direction (DiagDirection) |
1782
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1350 |
* @param p2 0 for Bus stops, 1 for truck stops |
0 | 1351 |
*/ |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1352 |
int32 CmdBuildRoadStop(TileIndex tile, uint32 flags, uint32 p1, uint32 p2) |
0 | 1353 |
{ |
1782
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1354 |
Station *st; |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1355 |
RoadStop *road_stop; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1356 |
RoadStop **currstop; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1357 |
RoadStop *prev = NULL; |
0 | 1358 |
int32 cost; |
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1359 |
int32 ret; |
1782
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1360 |
bool type = !!p2; |
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1361 |
|
0ac16ff36293
(svn r2286) - CodeChange: paramcheck the next batch of commands.
Darkvater
parents:
1781
diff
changeset
|
1362 |
/* Saveguard the parameters */ |
3699
15e473a194ef
(svn r4640) - Add: IsValidDiagDirection, IsValidDirection and IsValidAxis functions.
matthijs
parents:
3691
diff
changeset
|
1363 |
if (!IsValidDiagDirection(p1)) return CMD_ERROR; |
0 | 1364 |
|
1365 |
SET_EXPENSES_TYPE(EXPENSES_CONSTRUCTION); |
|
1366 |
||
1367 |
if (!(flags & DC_NO_TOWN_RATING) && !CheckIfAuthorityAllows(tile)) |
|
1368 |
return CMD_ERROR; |
|
1369 |
||
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1370 |
ret = CheckFlatLandBelow(tile, 1, 1, flags, 1 << p1, NULL); |
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1371 |
if (CmdFailed(ret)) return ret; |
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1372 |
cost = ret; |
0 | 1373 |
|
1374 |
st = GetStationAround(tile, 1, 1, -1); |
|
2639 | 1375 |
if (st == CHECK_STATIONS_ERR) return CMD_ERROR; |
0 | 1376 |
|
1377 |
/* Find a station close to us */ |
|
1378 |
if (st == NULL) { |
|
1379 |
st = GetClosestStationFromTile(tile, 8, _current_player); |
|
2989 | 1380 |
if (st != NULL && st->facilities != 0) st = NULL; |
0 | 1381 |
} |
1382 |
||
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1383 |
//give us a road stop in the list, and check if something went wrong |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
1384 |
road_stop = AllocateRoadStop(); |
2951 | 1385 |
if (road_stop == NULL) { |
1386 |
return_cmd_error(type ? STR_3008B_TOO_MANY_TRUCK_STOPS : STR_3008A_TOO_MANY_BUS_STOPS); |
|
1387 |
} |
|
1388 |
||
2989 | 1389 |
if (st != NULL && |
1390 |
GetNumRoadStops(st, RS_BUS) + GetNumRoadStops(st, RS_TRUCK) >= ROAD_STOP_LIMIT) { |
|
2951 | 1391 |
return_cmd_error(type ? STR_3008B_TOO_MANY_TRUCK_STOPS : STR_3008A_TOO_MANY_BUS_STOPS); |
1392 |
} |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1393 |
|
0 | 1394 |
if (st != NULL) { |
2951 | 1395 |
if (st->owner != OWNER_NONE && st->owner != _current_player) { |
0 | 1396 |
return_cmd_error(STR_3009_TOO_CLOSE_TO_ANOTHER_STATION); |
2951 | 1397 |
} |
1398 |
||
1399 |
if (!CheckStationSpreadOut(st, tile, 1, 1)) return CMD_ERROR; |
|
0 | 1400 |
|
3691
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1401 |
FindRoadStopSpot(type, st, &currstop, &prev); |
0 | 1402 |
} else { |
1403 |
Town *t; |
|
1404 |
||
1405 |
st = AllocateStation(); |
|
2639 | 1406 |
if (st == NULL) return CMD_ERROR; |
0 | 1407 |
|
1408 |
st->town = t = ClosestTownFromTile(tile, (uint)-1); |
|
1409 |
||
3691
7e1ad0718ed8
(svn r4619) -Codechange: Rename FindRoadStationSpot into FindRoadStopSpot and try to document it a little.
celestar
parents:
3687
diff
changeset
|
1410 |
FindRoadStopSpot(type, st, &currstop, &prev); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1411 |
|
2951 | 1412 |
if (_current_player < MAX_PLAYERS && flags & DC_EXEC) { |
0 | 1413 |
SETBIT(t->have_ratings, _current_player); |
2951 | 1414 |
} |
0 | 1415 |
|
1416 |
st->sign.width_1 = 0; |
|
1417 |
||
2639 | 1418 |
if (!GenerateStationName(st, tile, 0)) return CMD_ERROR; |
1419 |
||
1420 |
if (flags & DC_EXEC) StationInitialize(st, tile); |
|
0 | 1421 |
} |
1422 |
||
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1423 |
cost += (type) ? _price.build_truck_station : _price.build_bus_station; |
0 | 1424 |
|
1425 |
if (flags & DC_EXEC) { |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1426 |
//point to the correct item in the _busstops or _truckstops array |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1427 |
*currstop = road_stop; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1428 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1429 |
//initialize an empty station |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1430 |
InitializeRoadStop(road_stop, prev, tile, st->index); |
0 | 1431 |
if (!st->facilities) st->xy = tile; |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1432 |
st->facilities |= (type) ? FACIL_TRUCK_STOP : FACIL_BUS_STOP; |
0 | 1433 |
st->owner = _current_player; |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1434 |
|
71
1b8e15a10515
(svn r72) -Add: build_date of station (viewable with Query tool)
truelight
parents:
65
diff
changeset
|
1435 |
st->build_date = _date; |
0 | 1436 |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1437 |
MakeRoadStop(tile, st->owner, st->index, type, p1); |
0 | 1438 |
|
1439 |
UpdateStationVirtCoordDirty(st); |
|
1440 |
UpdateStationAcceptance(st, false); |
|
1441 |
InvalidateWindow(WC_STATION_LIST, st->owner); |
|
1442 |
} |
|
1443 |
return cost; |
|
1444 |
} |
|
1445 |
||
1446 |
// Remove a bus station |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1447 |
static int32 RemoveRoadStop(Station *st, uint32 flags, TileIndex tile) |
0 | 1448 |
{ |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1449 |
RoadStop **primary_stop; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1450 |
RoadStop *cur_stop; |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1451 |
bool is_truck = IsTruckStop(tile); |
0 | 1452 |
|
2951 | 1453 |
if (_current_player != OWNER_WATER && !CheckOwnership(st->owner)) { |
0 | 1454 |
return CMD_ERROR; |
2951 | 1455 |
} |
0 | 1456 |
|
2639 | 1457 |
if (is_truck) { // truck stop |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1458 |
primary_stop = &st->truck_stops; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1459 |
cur_stop = GetRoadStopByTile(tile, RS_TRUCK); |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1460 |
} else { |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1461 |
primary_stop = &st->bus_stops; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1462 |
cur_stop = GetRoadStopByTile(tile, RS_BUS); |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1463 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1464 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1465 |
assert(cur_stop != NULL); |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1466 |
|
2951 | 1467 |
if (!EnsureNoVehicle(tile)) return CMD_ERROR; |
0 | 1468 |
|
1469 |
if (flags & DC_EXEC) { |
|
3478
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1470 |
Vehicle* v; |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1471 |
|
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1472 |
/* Clear the slot assignment of all vehicles heading for this road stop */ |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1473 |
if (cur_stop->num_vehicles != 0) { |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1474 |
FOR_ALL_VEHICLES(v) { |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1475 |
if (v->type == VEH_Road && v->u.road.slot == cur_stop) { |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1476 |
ClearSlot(v); |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1477 |
} |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1478 |
} |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1479 |
} |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1480 |
assert(cur_stop->num_vehicles == 0); |
328cd2f4268d
(svn r4323) -Regression: Clear the slot assignments of all vehicles heading twoards a road stop if that road stop gets removed
tron
parents:
3475
diff
changeset
|
1481 |
|
0 | 1482 |
DoClearSquare(tile); |
1483 |
||
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1484 |
cur_stop->used = false; |
2639 | 1485 |
if (cur_stop->prev != NULL) cur_stop->prev->next = cur_stop->next; |
1486 |
if (cur_stop->next != NULL) cur_stop->next->prev = cur_stop->prev; |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1487 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1488 |
//we only had one stop left |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1489 |
if (cur_stop->next == NULL && cur_stop->prev == NULL) { |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1490 |
//so we remove ALL stops |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1491 |
*primary_stop = NULL; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1492 |
st->facilities &= (is_truck) ? ~FACIL_TRUCK_STOP : ~FACIL_BUS_STOP; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1493 |
} else if (cur_stop == *primary_stop) { |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1494 |
//removed the first stop in the list |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1495 |
//need to set the primary element to the next stop |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1496 |
*primary_stop = (*primary_stop)->next; |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1497 |
} |
0 | 1498 |
|
1499 |
UpdateStationVirtCoordDirty(st); |
|
1500 |
DeleteStationIfEmpty(st); |
|
1501 |
} |
|
1502 |
||
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
1503 |
return (is_truck) ? _price.remove_truck_station : _price.remove_bus_station; |
0 | 1504 |
} |
1505 |
||
1506 |
||
1507 |
||
1508 |
// FIXME -- need to move to its corresponding Airport variable |
|
1509 |
// Country Airfield (small) |
|
3429
12d01022976a
(svn r4257) -Codechange: Renamed the airport_map5_tiles_* variables into airport_sections_*
celestar
parents:
3422
diff
changeset
|
1510 |
static const byte _airport_sections_country[] = { |
0 | 1511 |
54, 53, 52, 65, |
1512 |
58, 57, 56, 55, |
|
1513 |
64, 63, 63, 62 |
|
1514 |
}; |
|
1515 |
||
1516 |
// City Airport (large) |
|
3429
12d01022976a
(svn r4257) -Codechange: Renamed the airport_map5_tiles_* variables into airport_sections_*
celestar
parents:
3422
diff
changeset
|
1517 |
static const byte _airport_sections_town[] = { |
2549 | 1518 |
31, 9, 33, 9, 9, 32, |
1519 |
27, 36, 29, 34, 8, 10, |
|
0 | 1520 |
30, 11, 35, 13, 20, 21, |
1521 |
51, 12, 14, 17, 19, 28, |
|
1522 |
38, 13, 15, 16, 18, 39, |
|
1523 |
26, 22, 23, 24, 25, 26 |
|
1524 |
}; |
|
1525 |
||
1526 |
// Metropolitain Airport (large) - 2 runways |
|
3429
12d01022976a
(svn r4257) -Codechange: Renamed the airport_map5_tiles_* variables into airport_sections_*
celestar
parents:
3422
diff
changeset
|
1527 |
static const byte _airport_sections_metropolitan[] = { |
2549 | 1528 |
31, 9, 33, 9, 9, 32, |
1529 |
27, 36, 29, 34, 8, 10, |
|
1530 |
30, 11, 35, 13, 20, 21, |
|
1531 |
102, 8, 8, 8, 8, 28, |
|
1532 |
83, 84, 84, 84, 84, 83, |
|
1533 |
26, 23, 23, 23, 23, 26 |
|
0 | 1534 |
}; |
1535 |
||
1536 |
// International Airport (large) - 2 runways |
|
3429
12d01022976a
(svn r4257) -Codechange: Renamed the airport_map5_tiles_* variables into airport_sections_*
celestar
parents:
3422
diff
changeset
|
1537 |
static const byte _airport_sections_international[] = { |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
1538 |
88, 89, 89, 89, 89, 89, 88, |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
1539 |
51, 8, 8, 8, 8, 8, 32, |
2549 | 1540 |
30, 8, 11, 27, 11, 8, 10, |
0 | 1541 |
32, 8, 11, 27, 11, 8, 114, |
1542 |
87, 8, 11, 85, 11, 8, 114, |
|
2549 | 1543 |
87, 8, 8, 8, 8, 8, 90, |
1544 |
26, 23, 23, 23, 23, 23, 26 |
|
0 | 1545 |
}; |
1546 |
||
1547 |
// Heliport |
|
3429
12d01022976a
(svn r4257) -Codechange: Renamed the airport_map5_tiles_* variables into airport_sections_*
celestar
parents:
3422
diff
changeset
|
1548 |
static const byte _airport_sections_heliport[] = { |
0 | 1549 |
66, |
1550 |
}; |
|
1551 |
||
3471
c31dc50d54fb
(svn r4316) -Codechange: finished r4257 (forgot one variable there)
celestar
parents:
3435
diff
changeset
|
1552 |
static const byte * const _airport_sections[] = { |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
1553 |
_airport_sections_country, // Country Airfield (small) |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
1554 |
_airport_sections_town, // City Airport (large) |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
1555 |
_airport_sections_heliport, // Heliport |
3429
12d01022976a
(svn r4257) -Codechange: Renamed the airport_map5_tiles_* variables into airport_sections_*
celestar
parents:
3422
diff
changeset
|
1556 |
_airport_sections_metropolitan, // Metropolitain Airport (large) |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
1557 |
_airport_sections_international, // International Airport (xlarge) |
0 | 1558 |
}; |
1559 |
||
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1560 |
/** Place an Airport. |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1561 |
* @param tile tile where airport will be built |
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1562 |
* @param p1 airport type, @see airport.h |
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1563 |
* @param p2 unused |
0 | 1564 |
*/ |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1565 |
int32 CmdBuildAirport(TileIndex tile, uint32 flags, uint32 p1, uint32 p2) |
0 | 1566 |
{ |
1567 |
Town *t; |
|
1568 |
Station *st; |
|
1569 |
int32 cost; |
|
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1570 |
int32 ret; |
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1571 |
int w, h; |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1572 |
bool airport_upgrade = true; |
0 | 1573 |
|
1574 |
SET_EXPENSES_TYPE(EXPENSES_CONSTRUCTION); |
|
1575 |
||
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1576 |
/* Check if a valid, buildable airport was chosen for construction */ |
3471
c31dc50d54fb
(svn r4316) -Codechange: finished r4257 (forgot one variable there)
celestar
parents:
3435
diff
changeset
|
1577 |
if (p1 > lengthof(_airport_sections) || !HASBIT(GetValidAirports(), p1)) return CMD_ERROR; |
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1578 |
|
0 | 1579 |
if (!(flags & DC_NO_TOWN_RATING) && !CheckIfAuthorityAllows(tile)) |
1580 |
return CMD_ERROR; |
|
1581 |
||
1582 |
t = ClosestTownFromTile(tile, (uint)-1); |
|
1583 |
||
1584 |
/* Check if local auth refuses a new airport */ |
|
1585 |
{ |
|
1586 |
uint num = 0; |
|
1587 |
FOR_ALL_STATIONS(st) { |
|
1588 |
if (st->xy != 0 && st->town == t && st->facilities&FACIL_AIRPORT && st->airport_type != AT_OILRIG) |
|
1589 |
num++; |
|
1590 |
} |
|
1591 |
if (num >= 2) { |
|
534
17ab2f22ff74
(svn r901) Small step in the process to clean up the DPARAM mess:
tron
parents:
507
diff
changeset
|
1592 |
SetDParam(0, t->index); |
0 | 1593 |
return_cmd_error(STR_2035_LOCAL_AUTHORITY_REFUSES); |
1594 |
} |
|
1595 |
} |
|
1596 |
||
1597 |
w = _airport_size_x[p1]; |
|
1598 |
h = _airport_size_y[p1]; |
|
1599 |
||
3183
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1600 |
ret = CheckFlatLandBelow(tile, w, h, flags, 0, NULL); |
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1601 |
if (CmdFailed(ret)) return ret; |
cf71bd234ebd
(svn r3829) Reduce the use of _error_message by directly returning error codes instead of using this global variable
tron
parents:
3161
diff
changeset
|
1602 |
cost = ret; |
0 | 1603 |
|
1604 |
st = GetStationAround(tile, w, h, -1); |
|
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1605 |
if (st == CHECK_STATIONS_ERR) return CMD_ERROR; |
0 | 1606 |
|
1607 |
/* Find a station close to us */ |
|
1608 |
if (st == NULL) { |
|
1609 |
st = GetClosestStationFromTile(tile, 8, _current_player); |
|
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1610 |
if (st != NULL && st->facilities) st = NULL; |
0 | 1611 |
} |
1612 |
||
1613 |
if (st != NULL) { |
|
1614 |
if (st->owner != OWNER_NONE && st->owner != _current_player) |
|
1615 |
return_cmd_error(STR_3009_TOO_CLOSE_TO_ANOTHER_STATION); |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1616 |
|
0 | 1617 |
if (!CheckStationSpreadOut(st, tile, 1, 1)) |
1618 |
return CMD_ERROR; |
|
1619 |
||
1620 |
if (st->airport_tile != 0) |
|
1621 |
return_cmd_error(STR_300D_TOO_CLOSE_TO_ANOTHER_AIRPORT); |
|
1622 |
} else { |
|
1623 |
airport_upgrade = false; |
|
1624 |
||
1625 |
st = AllocateStation(); |
|
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1626 |
if (st == NULL) return CMD_ERROR; |
0 | 1627 |
|
1265
0430e635b116
(svn r1769) Don't compute the same value twice, remove one function call
tron
parents:
1247
diff
changeset
|
1628 |
st->town = t; |
0 | 1629 |
|
2639 | 1630 |
if (_current_player < MAX_PLAYERS && flags & DC_EXEC) |
0 | 1631 |
SETBIT(t->have_ratings, _current_player); |
1632 |
||
1633 |
st->sign.width_1 = 0; |
|
1634 |
||
1635 |
// if airport type equals Heliport then generate |
|
1636 |
// type 5 name, which is heliport, otherwise airport names (1) |
|
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1637 |
if (!GenerateStationName(st, tile, (p1 == AT_HELIPORT) ? 5 : 1)) |
0 | 1638 |
return CMD_ERROR; |
1639 |
||
2951 | 1640 |
if (flags & DC_EXEC) StationInitialize(st, tile); |
0 | 1641 |
} |
1642 |
||
1643 |
cost += _price.build_airport * w * h; |
|
1644 |
||
1645 |
if (flags & DC_EXEC) { |
|
701 | 1646 |
const AirportFTAClass *afc = GetAirport(p1); |
1647 |
||
0 | 1648 |
st->owner = _current_player; |
2425
99e1e8430a28
(svn r2951) - Fix: [ 1259345 ] Changing engine in netgame opens train window for everyone
Darkvater
parents:
2422
diff
changeset
|
1649 |
if (IsLocalPlayer() && afc->nof_depots != 0) |
99e1e8430a28
(svn r2951) - Fix: [ 1259345 ] Changing engine in netgame opens train window for everyone
Darkvater
parents:
2422
diff
changeset
|
1650 |
_last_built_aircraft_depot_tile = tile + ToTileIndexDiff(afc->airport_depots[0]); |
0 | 1651 |
|
1652 |
st->airport_tile = tile; |
|
1653 |
if (!st->facilities) st->xy = tile; |
|
1654 |
st->facilities |= FACIL_AIRPORT; |
|
1655 |
st->airport_type = (byte)p1; |
|
1656 |
st->airport_flags = 0; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1657 |
|
71
1b8e15a10515
(svn r72) -Add: build_date of station (viewable with Query tool)
truelight
parents:
65
diff
changeset
|
1658 |
st->build_date = _date; |
0 | 1659 |
|
2639 | 1660 |
/* if airport was demolished while planes were en-route to it, the |
1661 |
* positions can no longer be the same (v->u.air.pos), since different |
|
1662 |
* airports have different indexes. So update all planes en-route to this |
|
1663 |
* airport. Only update if |
|
1664 |
* 1. airport is upgraded |
|
1665 |
* 2. airport is added to existing station (unfortunately unavoideable) |
|
1666 |
*/ |
|
2549 | 1667 |
if (airport_upgrade) UpdateAirplanesOnNewStation(st); |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1668 |
|
0 | 1669 |
{ |
3471
c31dc50d54fb
(svn r4316) -Codechange: finished r4257 (forgot one variable there)
celestar
parents:
3435
diff
changeset
|
1670 |
const byte *b = _airport_sections[p1]; |
2549 | 1671 |
|
3033
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1672 |
BEGIN_TILE_LOOP(tile_cur, w, h, tile) { |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1673 |
MakeAirport(tile_cur, st->owner, st->index, *b++); |
3033
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1674 |
} END_TILE_LOOP(tile_cur, w, h, tile) |
0 | 1675 |
} |
1676 |
||
1677 |
UpdateStationVirtCoordDirty(st); |
|
1678 |
UpdateStationAcceptance(st, false); |
|
1679 |
InvalidateWindow(WC_STATION_LIST, st->owner); |
|
1680 |
} |
|
1681 |
||
1682 |
return cost; |
|
1683 |
} |
|
1684 |
||
1685 |
static int32 RemoveAirport(Station *st, uint32 flags) |
|
1686 |
{ |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
1687 |
TileIndex tile; |
0 | 1688 |
int w,h; |
1689 |
int32 cost; |
|
1690 |
||
1691 |
if (_current_player != OWNER_WATER && !CheckOwnership(st->owner)) |
|
1692 |
return CMD_ERROR; |
|
1693 |
||
1694 |
tile = st->airport_tile; |
|
1695 |
||
1696 |
w = _airport_size_x[st->airport_type]; |
|
1697 |
h = _airport_size_y[st->airport_type]; |
|
1698 |
||
1699 |
cost = w * h * _price.remove_airport; |
|
1700 |
||
3033
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1701 |
BEGIN_TILE_LOOP(tile_cur, w, h, tile) { |
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1702 |
if (!EnsureNoVehicle(tile_cur)) return CMD_ERROR; |
0 | 1703 |
|
1704 |
if (flags & DC_EXEC) { |
|
1705 |
DeleteAnimatedTile(tile_cur); |
|
1706 |
DoClearSquare(tile_cur); |
|
1707 |
} |
|
3033
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1708 |
} END_TILE_LOOP(tile_cur, w,h,tile) |
0 | 1709 |
|
1710 |
if (flags & DC_EXEC) { |
|
700 | 1711 |
const AirportFTAClass *afc = GetAirport(st->airport_type); |
1712 |
uint i; |
|
1713 |
||
3033
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1714 |
for (i = 0; i < afc->nof_depots; ++i) { |
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1715 |
DeleteWindowById( |
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1716 |
WC_VEHICLE_DEPOT, tile + ToTileIndexDiff(afc->airport_depots[i]) |
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1717 |
); |
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
1718 |
} |
755
823358e83abf
(svn r1211) -Feature: Introduce sticky windows to all vehicle windows...Just make sure you do not sticky more than 23 at a time. Also a lot of places in the code invalidated the 'status bar' of the vehicle, referring to it as widget 4. This is now widget 5 and has been #definitized
darkvater
parents:
709
diff
changeset
|
1719 |
|
0 | 1720 |
st->airport_tile = 0; |
1721 |
st->facilities &= ~FACIL_AIRPORT; |
|
1722 |
||
1723 |
UpdateStationVirtCoordDirty(st); |
|
1724 |
DeleteStationIfEmpty(st); |
|
1725 |
} |
|
1726 |
||
1727 |
return cost; |
|
1728 |
} |
|
1729 |
||
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1730 |
/** Build a buoy. |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1731 |
* @param tile tile where to place the bouy |
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1732 |
* @param p1 unused |
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1733 |
* @param p2 unused |
0 | 1734 |
*/ |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1735 |
int32 CmdBuildBuoy(TileIndex tile, uint32 flags, uint32 p1, uint32 p2) |
0 | 1736 |
{ |
1737 |
Station *st; |
|
1738 |
||
1739 |
SET_EXPENSES_TYPE(EXPENSES_CONSTRUCTION); |
|
1740 |
||
3374
9721c51bea25
(svn r4173) -Codechange: Use IsClearWaterTile for buoy construction
celestar
parents:
3362
diff
changeset
|
1741 |
if (!IsClearWaterTile(tile) || tile == 0) return_cmd_error(STR_304B_SITE_UNSUITABLE); |
0 | 1742 |
|
1743 |
st = AllocateStation(); |
|
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1744 |
if (st == NULL) return CMD_ERROR; |
0 | 1745 |
|
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1746 |
st->town = ClosestTownFromTile(tile, (uint)-1); |
0 | 1747 |
st->sign.width_1 = 0; |
1748 |
||
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1749 |
if (!GenerateStationName(st, tile, 4)) return CMD_ERROR; |
0 | 1750 |
|
1751 |
if (flags & DC_EXEC) { |
|
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1752 |
StationInitialize(st, tile); |
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1753 |
st->dock_tile = tile; |
0 | 1754 |
st->facilities |= FACIL_DOCK; |
1751
954dd2900ac9
(svn r2255) - Fix: [ 9680363 ] [NPF] Broken buoy handling for ships
matthijs
parents:
1706
diff
changeset
|
1755 |
/* Buoys are marked in the Station struct by this flag. Yes, it is this |
954dd2900ac9
(svn r2255) - Fix: [ 9680363 ] [NPF] Broken buoy handling for ships
matthijs
parents:
1706
diff
changeset
|
1756 |
* braindead.. */ |
0 | 1757 |
st->had_vehicle_of_type |= HVOT_BUOY; |
1758 |
st->owner = OWNER_NONE; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1759 |
|
71
1b8e15a10515
(svn r72) -Add: build_date of station (viewable with Query tool)
truelight
parents:
65
diff
changeset
|
1760 |
st->build_date = _date; |
0 | 1761 |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1762 |
MakeBuoy(tile, st->index); |
0 | 1763 |
|
1764 |
UpdateStationVirtCoordDirty(st); |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1765 |
|
0 | 1766 |
UpdateStationAcceptance(st, false); |
1767 |
InvalidateWindow(WC_STATION_LIST, st->owner); |
|
1768 |
} |
|
1769 |
||
1770 |
return _price.build_dock; |
|
1771 |
} |
|
1772 |
||
1078
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1773 |
/* Checks if any ship is servicing the buoy specified. Returns yes or no */ |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1774 |
static bool CheckShipsOnBuoy(Station *st) |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1775 |
{ |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1776 |
const Vehicle *v; |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1777 |
FOR_ALL_VEHICLES(v) { |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1778 |
if (v->type == VEH_Ship) { |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1779 |
const Order *order; |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1780 |
FOR_VEHICLE_ORDERS(v, order) { |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1781 |
if (order->type == OT_GOTO_STATION && order->station == st->index) { |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1782 |
return true; |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1783 |
} |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1784 |
} |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1785 |
} |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1786 |
} |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1787 |
return false; |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1788 |
} |
326bae748bcb
(svn r1579) Fix: [ 1105963 ] Buoys can now only be removed if no ship has it in their schedule.
dominik
parents:
1067
diff
changeset
|
1789 |
|
0 | 1790 |
static int32 RemoveBuoy(Station *st, uint32 flags) |
1791 |
{ |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
1792 |
TileIndex tile; |
0 | 1793 |
|
1794 |
if (_current_player >= MAX_PLAYERS) { |
|
1795 |
/* XXX: strange stuff */ |
|
1796 |
return_cmd_error(INVALID_STRING_ID); |
|
1797 |
} |
|
1798 |
||
1799 |
tile = st->dock_tile; |
|
1800 |
||
2639 | 1801 |
if (CheckShipsOnBuoy(st)) return_cmd_error(STR_BUOY_IS_IN_USE); |
1802 |
if (!EnsureNoVehicle(tile)) return CMD_ERROR; |
|
0 | 1803 |
|
1804 |
if (flags & DC_EXEC) { |
|
1805 |
st->dock_tile = 0; |
|
1751
954dd2900ac9
(svn r2255) - Fix: [ 9680363 ] [NPF] Broken buoy handling for ships
matthijs
parents:
1706
diff
changeset
|
1806 |
/* Buoys are marked in the Station struct by this flag. Yes, it is this |
954dd2900ac9
(svn r2255) - Fix: [ 9680363 ] [NPF] Broken buoy handling for ships
matthijs
parents:
1706
diff
changeset
|
1807 |
* braindead.. */ |
0 | 1808 |
st->facilities &= ~FACIL_DOCK; |
1809 |
st->had_vehicle_of_type &= ~HVOT_BUOY; |
|
1810 |
||
3111
1edf71aa942e
(svn r3714) Add functions to turn tiles into water and shore tiles
tron
parents:
3102
diff
changeset
|
1811 |
MakeWater(tile); |
1edf71aa942e
(svn r3714) Add functions to turn tiles into water and shore tiles
tron
parents:
3102
diff
changeset
|
1812 |
MarkTileDirtyByTile(tile); |
0 | 1813 |
|
1814 |
UpdateStationVirtCoordDirty(st); |
|
1815 |
DeleteStationIfEmpty(st); |
|
1816 |
} |
|
1817 |
||
1818 |
return _price.remove_truck_station; |
|
1819 |
} |
|
1820 |
||
909
81bc9ef93f50
(svn r1396) Introduce TileIndexDiffC - the compile time version of TileIndexDiff
tron
parents:
900
diff
changeset
|
1821 |
static const TileIndexDiffC _dock_tileoffs_chkaround[] = { |
81bc9ef93f50
(svn r1396) Introduce TileIndexDiffC - the compile time version of TileIndexDiff
tron
parents:
900
diff
changeset
|
1822 |
{-1, 0}, |
81bc9ef93f50
(svn r1396) Introduce TileIndexDiffC - the compile time version of TileIndexDiff
tron
parents:
900
diff
changeset
|
1823 |
{ 0, 0}, |
81bc9ef93f50
(svn r1396) Introduce TileIndexDiffC - the compile time version of TileIndexDiff
tron
parents:
900
diff
changeset
|
1824 |
{ 0, 0}, |
81bc9ef93f50
(svn r1396) Introduce TileIndexDiffC - the compile time version of TileIndexDiff
tron
parents:
900
diff
changeset
|
1825 |
{ 0, -1} |
0 | 1826 |
}; |
1827 |
static const byte _dock_w_chk[4] = { 2,1,2,1 }; |
|
1828 |
static const byte _dock_h_chk[4] = { 1,2,1,2 }; |
|
1829 |
||
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1830 |
/** Build a dock/haven. |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1831 |
* @param tile tile where dock will be built |
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1832 |
* @param p1 unused |
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1833 |
* @param p2 unused |
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1834 |
*/ |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1835 |
int32 CmdBuildDock(TileIndex tile, uint32 flags, uint32 p1, uint32 p2) |
0 | 1836 |
{ |
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1837 |
TileIndex tile_cur; |
3157
40de8616c04c
(svn r3783) Replace further ints and magic numbers by Direction, DiagDirection and friends
tron
parents:
3123
diff
changeset
|
1838 |
DiagDirection direction; |
0 | 1839 |
int32 cost; |
1840 |
Station *st; |
|
1841 |
||
1842 |
SET_EXPENSES_TYPE(EXPENSES_CONSTRUCTION); |
|
1843 |
||
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1844 |
switch (GetTileSlope(tile, NULL)) { |
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
1845 |
case SLOPE_SW: direction = DIAGDIR_NE; break; |
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
1846 |
case SLOPE_SE: direction = DIAGDIR_NW; break; |
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
1847 |
case SLOPE_NW: direction = DIAGDIR_SE; break; |
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
1848 |
case SLOPE_NE: direction = DIAGDIR_SW; break; |
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1849 |
default: return_cmd_error(STR_304B_SITE_UNSUITABLE); |
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1850 |
} |
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1851 |
|
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1852 |
if (!EnsureNoVehicle(tile)) return CMD_ERROR; |
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1853 |
|
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1854 |
cost = DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR); |
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1855 |
if (CmdFailed(cost)) return CMD_ERROR; |
0 | 1856 |
|
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1857 |
tile_cur = tile + TileOffsByDir(direction); |
0 | 1858 |
|
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1859 |
if (!EnsureNoVehicle(tile_cur)) return CMD_ERROR; |
0 | 1860 |
|
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
1861 |
if (!IsTileType(tile_cur, MP_WATER) || GetTileSlope(tile_cur, NULL) != SLOPE_FLAT) { |
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1862 |
return_cmd_error(STR_304B_SITE_UNSUITABLE); |
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1863 |
} |
0 | 1864 |
|
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
1865 |
cost = DoCommand(tile_cur, 0, 0, flags, CMD_LANDSCAPE_CLEAR); |
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1866 |
if (CmdFailed(cost)) return CMD_ERROR; |
0 | 1867 |
|
900 | 1868 |
tile_cur = tile_cur + TileOffsByDir(direction); |
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
1869 |
if (!IsTileType(tile_cur, MP_WATER) || GetTileSlope(tile_cur, NULL) != SLOPE_FLAT) { |
0 | 1870 |
return_cmd_error(STR_304B_SITE_UNSUITABLE); |
3055
25fd76668365
(svn r3644) Don't use FindLandscapeHeightByTile() when it's overkill - often it was just a complicated way of writing GetTileSlope(tile, NULL)
tron
parents:
3047
diff
changeset
|
1871 |
} |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1872 |
|
0 | 1873 |
/* middle */ |
909
81bc9ef93f50
(svn r1396) Introduce TileIndexDiffC - the compile time version of TileIndexDiff
tron
parents:
900
diff
changeset
|
1874 |
st = GetStationAround( |
81bc9ef93f50
(svn r1396) Introduce TileIndexDiffC - the compile time version of TileIndexDiff
tron
parents:
900
diff
changeset
|
1875 |
tile + ToTileIndexDiff(_dock_tileoffs_chkaround[direction]), |
0 | 1876 |
_dock_w_chk[direction], _dock_h_chk[direction], -1); |
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1877 |
if (st == CHECK_STATIONS_ERR) return CMD_ERROR; |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1878 |
|
0 | 1879 |
/* Find a station close to us */ |
1880 |
if (st == NULL) { |
|
1881 |
st = GetClosestStationFromTile(tile, 8, _current_player); |
|
1882 |
if (st!=NULL && st->facilities) st = NULL; |
|
1883 |
} |
|
1884 |
||
1885 |
if (st != NULL) { |
|
1886 |
if (st->owner != OWNER_NONE && st->owner != _current_player) |
|
1887 |
return_cmd_error(STR_3009_TOO_CLOSE_TO_ANOTHER_STATION); |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1888 |
|
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1889 |
if (!CheckStationSpreadOut(st, tile, 1, 1)) return CMD_ERROR; |
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1890 |
|
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1891 |
if (st->dock_tile != 0) return_cmd_error(STR_304C_TOO_CLOSE_TO_ANOTHER_DOCK); |
0 | 1892 |
} else { |
1893 |
Town *t; |
|
1894 |
||
1895 |
st = AllocateStation(); |
|
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1896 |
if (st == NULL) return CMD_ERROR; |
0 | 1897 |
|
1898 |
st->town = t = ClosestTownFromTile(tile, (uint)-1); |
|
1899 |
||
1900 |
if (_current_player < MAX_PLAYERS && flags&DC_EXEC) |
|
1901 |
SETBIT(t->have_ratings, _current_player); |
|
1902 |
||
1903 |
st->sign.width_1 = 0; |
|
1904 |
||
1784
6eb3ab1bc33c
(svn r2288) - CodeChange: protected the next batch of commands (41 so far, out of 115).
Darkvater
parents:
1782
diff
changeset
|
1905 |
if (!GenerateStationName(st, tile, 3)) return CMD_ERROR; |
0 | 1906 |
|
2639 | 1907 |
if (flags & DC_EXEC) StationInitialize(st, tile); |
0 | 1908 |
} |
1909 |
||
1910 |
if (flags & DC_EXEC) { |
|
1911 |
st->dock_tile = tile; |
|
1912 |
if (!st->facilities) st->xy = tile; |
|
1913 |
st->facilities |= FACIL_DOCK; |
|
1914 |
st->owner = _current_player; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1915 |
|
71
1b8e15a10515
(svn r72) -Add: build_date of station (viewable with Query tool)
truelight
parents:
65
diff
changeset
|
1916 |
st->build_date = _date; |
0 | 1917 |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1918 |
MakeDock(tile, st->owner, st->index, direction); |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
1919 |
|
0 | 1920 |
UpdateStationVirtCoordDirty(st); |
1921 |
UpdateStationAcceptance(st, false); |
|
1922 |
InvalidateWindow(WC_STATION_LIST, st->owner); |
|
1923 |
} |
|
1924 |
return _price.build_dock; |
|
1925 |
} |
|
1926 |
||
1927 |
static int32 RemoveDock(Station *st, uint32 flags) |
|
1928 |
{ |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
1929 |
TileIndex tile1; |
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
1930 |
TileIndex tile2; |
0 | 1931 |
|
2639 | 1932 |
if (!CheckOwnership(st->owner)) return CMD_ERROR; |
0 | 1933 |
|
1934 |
tile1 = st->dock_tile; |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1935 |
tile2 = tile1 + TileOffsByDir(GetDockDirection(tile1)); |
0 | 1936 |
|
2639 | 1937 |
if (!EnsureNoVehicle(tile1)) return CMD_ERROR; |
1938 |
if (!EnsureNoVehicle(tile2)) return CMD_ERROR; |
|
0 | 1939 |
|
1940 |
if (flags & DC_EXEC) { |
|
1941 |
DoClearSquare(tile1); |
|
1942 |
||
3111
1edf71aa942e
(svn r3714) Add functions to turn tiles into water and shore tiles
tron
parents:
3102
diff
changeset
|
1943 |
MakeWater(tile2); |
1edf71aa942e
(svn r3714) Add functions to turn tiles into water and shore tiles
tron
parents:
3102
diff
changeset
|
1944 |
MarkTileDirtyByTile(tile2); |
0 | 1945 |
|
1946 |
st->dock_tile = 0; |
|
1947 |
st->facilities &= ~FACIL_DOCK; |
|
1948 |
||
1949 |
UpdateStationVirtCoordDirty(st); |
|
1950 |
DeleteStationIfEmpty(st); |
|
1951 |
} |
|
1952 |
||
1953 |
return _price.remove_dock; |
|
1954 |
} |
|
1955 |
||
1956 |
#include "table/station_land.h" |
|
1957 |
||
1958 |
||
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1959 |
extern uint16 _custom_sprites_base; |
0 | 1960 |
|
1961 |
static void DrawTile_Station(TileInfo *ti) |
|
1962 |
{ |
|
1963 |
uint32 image_or_modificator; |
|
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1964 |
uint32 image; |
0 | 1965 |
const DrawTileSeqStruct *dtss; |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1966 |
const DrawTileSprites *t = NULL; |
3242
1cefa03f0d5e
(svn r3916) Get/Set the rail type by [GS]etRailType{Crossing,OnBridge,}()
tron
parents:
3222
diff
changeset
|
1967 |
RailType railtype = GetRailType(ti->tile); |
2254
72f8883ff3ac
(svn r2774) -Codechange: Removed TRACKTYPE_SPRITE_PITCH globally and replaced it by a member of RailtypeInfo
celestar
parents:
2213
diff
changeset
|
1968 |
const RailtypeInfo *rti = GetRailTypeInfo(railtype); |
72f8883ff3ac
(svn r2774) -Codechange: Removed TRACKTYPE_SPRITE_PITCH globally and replaced it by a member of RailtypeInfo
celestar
parents:
2213
diff
changeset
|
1969 |
SpriteID offset; |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1970 |
uint32 relocation = 0; |
0 | 1971 |
|
1972 |
{ |
|
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
1973 |
PlayerID owner = GetTileOwner(ti->tile); |
2187
2a51f8925eeb
(svn r2702) -Codechange: Cleaned up the sprite code and replaced many magic numbers
celestar
parents:
2186
diff
changeset
|
1974 |
image_or_modificator = PALETTE_TO_GREY; /* NOTE: possible bug in ttd here? */ |
2639 | 1975 |
if (owner < MAX_PLAYERS) image_or_modificator = PLAYER_SPRITE_COLOR(owner); |
0 | 1976 |
} |
1977 |
||
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
1978 |
// don't show foundation for docks |
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
1979 |
if (ti->tileh != SLOPE_FLAT && !IsDock(ti->tile)) |
0 | 1980 |
DrawFoundation(ti, ti->tileh); |
1981 |
||
3568
c1abc31df35b
(svn r4450) - NewStations, rename *CustomStationSprite() to *CustomStationSpecIndex() to reflect their use, and alter the test for determining if a station has customised graphics.
peter1138
parents:
3554
diff
changeset
|
1982 |
if (IsCustomStationSpecIndex(ti->tile)) { |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1983 |
// look for customization |
3587 | 1984 |
const Station *st = GetStationByTile(ti->tile); |
1985 |
const StationSpec *statspec = st->speclist[GetCustomStationSpecIndex(ti->tile)].spec; |
|
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1986 |
|
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1987 |
//debug("Cust-o-mized %p", statspec); |
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1988 |
|
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1989 |
if (statspec != NULL) { |
3576
007e6b163bf5
(svn r4462) - Newstations: ensure the chosen tile layout is available from a custom station
peter1138
parents:
3574
diff
changeset
|
1990 |
uint tile = GetStationGfx(ti->tile); |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1991 |
|
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1992 |
relocation = GetCustomStationRelocation(statspec, st, 0); |
3576
007e6b163bf5
(svn r4462) - Newstations: ensure the chosen tile layout is available from a custom station
peter1138
parents:
3574
diff
changeset
|
1993 |
|
007e6b163bf5
(svn r4462) - Newstations: ensure the chosen tile layout is available from a custom station
peter1138
parents:
3574
diff
changeset
|
1994 |
/* Ensure the chosen tile layout is valid for this custom station */ |
007e6b163bf5
(svn r4462) - Newstations: ensure the chosen tile layout is available from a custom station
peter1138
parents:
3574
diff
changeset
|
1995 |
t = &statspec->renderdata[tile < statspec->tiles ? tile : GetRailStationAxis(ti->tile)]; |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1996 |
} |
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1997 |
} |
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
1998 |
|
3737
26341085bbbf
(svn r4719) - Newstations: instead of drawing nothing, fall back to the default sprite layout if a station layout specifies so.
peter1138
parents:
3699
diff
changeset
|
1999 |
if (t == NULL || t->seq == NULL) t = &_station_display_datas[GetStationGfx(ti->tile)]; |
384
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2000 |
|
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2001 |
image = t->ground_sprite; |
2639 | 2002 |
if (image & PALETTE_MODIFIER_COLOR) image |= image_or_modificator; |
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
2003 |
|
2008
c9d6585c96c8
(svn r2516) - Feature: [pbs] Implement path-based-signalling. This allows multiple trains within the same signal block, provided their paths dont intersect. For this the block must have all exit and entry signals be pbs signals. Place these by ctrl-clicking 4 times on a normal signal.
hackykid
parents:
1981
diff
changeset
|
2004 |
// For custom sprites, there's no railtype-based pitching. |
3527
8f3b8af9e9d3
(svn r4383) - Codechange: Remove extraneous code from 4354; no need to get RailTypeInfo when we already have it...
peter1138
parents:
3515
diff
changeset
|
2005 |
offset = (image & SPRITE_MASK) < _custom_sprites_base ? rti->total_offset : rti->custom_ground_offset; |
2254
72f8883ff3ac
(svn r2774) -Codechange: Removed TRACKTYPE_SPRITE_PITCH globally and replaced it by a member of RailtypeInfo
celestar
parents:
2213
diff
changeset
|
2006 |
image += offset; |
2008
c9d6585c96c8
(svn r2516) - Feature: [pbs] Implement path-based-signalling. This allows multiple trains within the same signal block, provided their paths dont intersect. For this the block must have all exit and entry signals be pbs signals. Place these by ctrl-clicking 4 times on a normal signal.
hackykid
parents:
1981
diff
changeset
|
2007 |
|
449
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
2008 |
// station_land array has been increased from 82 elements to 114 |
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
2009 |
// but this is something else. If AI builds station with 114 it looks all weird |
d9325d9f24bb
(svn r659) Support for cutomized TTDPatch-style new stations (no selector GUI yet) (pasky)
tron
parents:
445
diff
changeset
|
2010 |
DrawGroundSprite(image); |
0 | 2011 |
|
3362
5fc13da0a8fd
(svn r4157) CodeChange : Keep on cleaning up Celestar's elrail merge
belugas
parents:
3355
diff
changeset
|
2012 |
if (GetRailType(ti->tile) == RAILTYPE_ELECTRIC) DrawCatenary(ti); |
3355
a653b8e47f27
(svn r4150) -Feature: Merged elrails into trunk. Thanks to Tron for lots of code and proofreading, thanks to peter1138 for another lot of code and ideas.
celestar
parents:
3344
diff
changeset
|
2013 |
|
384
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2014 |
foreach_draw_tile_seq(dtss, t->seq) { |
2008
c9d6585c96c8
(svn r2516) - Feature: [pbs] Implement path-based-signalling. This allows multiple trains within the same signal block, provided their paths dont intersect. For this the block must have all exit and entry signals be pbs signals. Place these by ctrl-clicking 4 times on a normal signal.
hackykid
parents:
1981
diff
changeset
|
2015 |
image = dtss->image + relocation; |
2254
72f8883ff3ac
(svn r2774) -Codechange: Removed TRACKTYPE_SPRITE_PITCH globally and replaced it by a member of RailtypeInfo
celestar
parents:
2213
diff
changeset
|
2016 |
image += offset; |
384
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2017 |
if (_display_opt & DO_TRANS_BUILDINGS) { |
2148
47ba4a1b1c3b
(svn r2658) -Codechange: Use MAKE_TRANSPARENT to display a transparented sprite
celestar
parents:
2140
diff
changeset
|
2018 |
MAKE_TRANSPARENT(image); |
497
2d6d31173813
(svn r787) Invert the sense of the DO_TRANS_BUILDINGS flag to be consistent with its own name and all other DO_* flags.
tron
parents:
494
diff
changeset
|
2019 |
} else { |
2187
2a51f8925eeb
(svn r2702) -Codechange: Cleaned up the sprite code and replaced many magic numbers
celestar
parents:
2186
diff
changeset
|
2020 |
if (image & PALETTE_MODIFIER_COLOR) image |= image_or_modificator; |
384
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2021 |
} |
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2022 |
|
0 | 2023 |
if ((byte)dtss->delta_z != 0x80) { |
2024 |
AddSortableSpriteToDraw(image, ti->x + dtss->delta_x, ti->y + dtss->delta_y, dtss->width, dtss->height, dtss->unk, ti->z + dtss->delta_z); |
|
2025 |
} else { |
|
2026 |
AddChildSpriteScreen(image, dtss->delta_x, dtss->delta_y); |
|
2027 |
} |
|
2028 |
} |
|
2029 |
} |
|
2030 |
||
2520
75eb66d6e371
(svn r3049) Replace byte/int/uint by RailType where appropriate
tron
parents:
2517
diff
changeset
|
2031 |
void StationPickerDrawSprite(int x, int y, RailType railtype, int image) |
0 | 2032 |
{ |
2033 |
uint32 ormod, img; |
|
2034 |
const DrawTileSeqStruct *dtss; |
|
384
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2035 |
const DrawTileSprites *t; |
2254
72f8883ff3ac
(svn r2774) -Codechange: Removed TRACKTYPE_SPRITE_PITCH globally and replaced it by a member of RailtypeInfo
celestar
parents:
2213
diff
changeset
|
2036 |
const RailtypeInfo *rti = GetRailTypeInfo(railtype); |
0 | 2037 |
|
2038 |
ormod = PLAYER_SPRITE_COLOR(_local_player); |
|
2039 |
||
384
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2040 |
t = &_station_display_datas[image]; |
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2041 |
|
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2042 |
img = t->ground_sprite; |
2639 | 2043 |
if (img & PALETTE_MODIFIER_COLOR) img |= ormod; |
2254
72f8883ff3ac
(svn r2774) -Codechange: Removed TRACKTYPE_SPRITE_PITCH globally and replaced it by a member of RailtypeInfo
celestar
parents:
2213
diff
changeset
|
2044 |
DrawSprite(img + rti->total_offset, x, y); |
0 | 2045 |
|
384
bf1303e754ff
(svn r576) -newgrf: Cleanup horrible table/(station|unmovable)_land.h DrawTileSeqStruct hacks needed for custom station supports (pasky)
darkvater
parents:
354
diff
changeset
|
2046 |
foreach_draw_tile_seq(dtss, t->seq) { |
0 | 2047 |
Point pt = RemapCoords(dtss->delta_x, dtss->delta_y, dtss->delta_z); |
2254
72f8883ff3ac
(svn r2774) -Codechange: Removed TRACKTYPE_SPRITE_PITCH globally and replaced it by a member of RailtypeInfo
celestar
parents:
2213
diff
changeset
|
2048 |
DrawSprite((dtss->image | ormod) + rti->total_offset, x + pt.x, y + pt.y); |
0 | 2049 |
} |
2050 |
} |
|
2051 |
||
2537 | 2052 |
static uint GetSlopeZ_Station(const TileInfo* ti) |
0 | 2053 |
{ |
3645
86af43f87885
(svn r4554) Replace magic numbers by TILE_{HEIGHT,SIZE}
tron
parents:
3636
diff
changeset
|
2054 |
return ti->z + (ti->tileh == SLOPE_FLAT ? 0 : TILE_HEIGHT); |
0 | 2055 |
} |
2056 |
||
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
2057 |
static Slope GetSlopeTileh_Station(TileIndex tile, Slope tileh) |
39 | 2058 |
{ |
3636
d87b21df2944
(svn r4541) Add a type for slopes and replace many magic numbers by the appropriate enums
tron
parents:
3630
diff
changeset
|
2059 |
return SLOPE_FLAT; |
39 | 2060 |
} |
2061 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2062 |
static void GetAcceptedCargo_Station(TileIndex tile, AcceptedCargo ac) |
0 | 2063 |
{ |
2064 |
/* not used */ |
|
2065 |
} |
|
2066 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2067 |
static void GetTileDesc_Station(TileIndex tile, TileDesc *td) |
0 | 2068 |
{ |
2069 |
StringID str; |
|
2070 |
||
1901
fb05044cf5c3
(svn r2407) Use {Get,Is}TileOwner to get/check the owner of a tile and fix some bogus reads of _map_owner
tron
parents:
1891
diff
changeset
|
2071 |
td->owner = GetTileOwner(tile); |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
2072 |
td->build_date = GetStationByTile(tile)->build_date; |
2049
ad0d49c916d4
(svn r2558) Change the internal map format from 7 arrays to one array of structs, this doesn't change the saved format for now. It's a stepping stone for further changes.
tron
parents:
2008
diff
changeset
|
2073 |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2074 |
switch (GetStationType(tile)) { |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2075 |
default: NOT_REACHED(); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2076 |
case STATION_RAIL: str = STR_305E_RAILROAD_STATION; break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2077 |
case STATION_HANGAR: str = STR_305F_AIRCRAFT_HANGAR; break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2078 |
case STATION_AIRPORT: str = STR_3060_AIRPORT; break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2079 |
case STATION_TRUCK: str = STR_3061_TRUCK_LOADING_AREA; break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2080 |
case STATION_BUS: str = STR_3062_BUS_STATION; break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2081 |
case STATION_OILRIG: str = STR_4807_OIL_RIG; break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2082 |
case STATION_DOCK: str = STR_3063_SHIP_DOCK; break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2083 |
case STATION_BUOY: str = STR_3069_BUOY; break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2084 |
} |
0 | 2085 |
td->str = str; |
2086 |
} |
|
2087 |
||
2088 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2089 |
static uint32 GetTileTrackStatus_Station(TileIndex tile, TransportType mode) |
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2090 |
{ |
1032
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2091 |
switch (mode) { |
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2092 |
case TRANSPORT_RAIL: |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2093 |
if (IsRailwayStation(tile)) { |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2094 |
return TrackToTrackBits(GetRailStationTrack(tile)) * 0x101; |
1032
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2095 |
} |
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2096 |
break; |
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2097 |
|
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2098 |
case TRANSPORT_WATER: |
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2099 |
// buoy is coded as a station, it is always on open water |
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2100 |
// (0x3F, all tracks available) |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2101 |
if (IsBuoy_(tile)) return 0x3F * 0x101; |
1032
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2102 |
break; |
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2103 |
|
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2104 |
default: |
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2105 |
break; |
0 | 2106 |
} |
1032
6020f9143b17
(svn r1533) Turn an if cascade into a switch and move a const array to the only location where it is used
tron
parents:
1024
diff
changeset
|
2107 |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2108 |
return 0; |
0 | 2109 |
} |
2110 |
||
2660 | 2111 |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2112 |
static void TileLoop_Station(TileIndex tile) |
0 | 2113 |
{ |
2660 | 2114 |
// FIXME -- GetTileTrackStatus_Station -> animated stationtiles |
2115 |
// hardcoded.....not good |
|
3540
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2116 |
switch (GetStationGfx(tile)) { |
3545
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2117 |
case GFX_RADAR_LARGE_FIRST: |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2118 |
case GFX_WINDSACK_FIRST : // for small airport |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2119 |
case GFX_RADAR_INTERNATIONAL_FIRST: |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2120 |
case GFX_RADAR_METROPOLITAN_FIRST: |
2660 | 2121 |
AddAnimatedTile(tile); |
2122 |
break; |
|
2123 |
||
3545
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2124 |
case GFX_OILRIG_BASE: //(station part) |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2125 |
case GFX_BUOY_BASE: |
2660 | 2126 |
TileLoop_Water(tile); |
2127 |
break; |
|
2128 |
||
2129 |
default: break; |
|
2130 |
} |
|
0 | 2131 |
} |
2132 |
||
2133 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2134 |
static void AnimateTile_Station(TileIndex tile) |
0 | 2135 |
{ |
3545
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2136 |
StationGfx gfx = GetStationGfx(tile); |
0 | 2137 |
//FIXME -- AnimateTile_Station -> not nice code, lots of things double |
3545
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2138 |
// again hardcoded...was a quick hack |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2139 |
|
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2140 |
// turning radar / windsack on airport |
3553
b34eae3b8d0f
(svn r4425) Fix bug introduced in r4411 : while IS_BYTE_INSIDE, max value is STRICKLY LESS THEN. This caused airports animations to stay unanimated. Industries were similarly affected.
belugas
parents:
3545
diff
changeset
|
2141 |
if (IS_BYTE_INSIDE(gfx, GFX_RADAR_LARGE_FIRST, GFX_RADAR_LARGE_LAST+1)) { |
0 | 2142 |
if (_tick_counter & 3) |
2143 |
return; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2144 |
|
3545
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2145 |
if (++gfx == GFX_RADAR_LARGE_LAST+1) |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2146 |
gfx = GFX_RADAR_LARGE_FIRST; |
3540
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2147 |
|
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2148 |
SetStationGfx(tile, gfx); |
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2149 |
MarkTileDirtyByTile(tile); |
3545
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2150 |
//added - begin |
3553
b34eae3b8d0f
(svn r4425) Fix bug introduced in r4411 : while IS_BYTE_INSIDE, max value is STRICKLY LESS THEN. This caused airports animations to stay unanimated. Industries were similarly affected.
belugas
parents:
3545
diff
changeset
|
2151 |
} else if (IS_BYTE_INSIDE(gfx, GFX_RADAR_INTERNATIONAL_FIRST, GFX_RADAR_METROPOLITAN_LAST+1)) { |
3540
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2152 |
if (_tick_counter & 3) |
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2153 |
return; |
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2154 |
|
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2155 |
gfx++; |
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2156 |
|
3545
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2157 |
if (gfx == GFX_RADAR_INTERNATIONAL_LAST+1) { |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2158 |
gfx = GFX_RADAR_INTERNATIONAL_FIRST; |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2159 |
} |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2160 |
else if (gfx == GFX_RADAR_METROPOLITAN_LAST+1) { |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2161 |
gfx = GFX_RADAR_METROPOLITAN_FIRST; |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2162 |
} |
3540
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2163 |
|
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2164 |
SetStationGfx(tile, gfx); |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2165 |
MarkTileDirtyByTile(tile); |
0 | 2166 |
//added - end |
3553
b34eae3b8d0f
(svn r4425) Fix bug introduced in r4411 : while IS_BYTE_INSIDE, max value is STRICKLY LESS THEN. This caused airports animations to stay unanimated. Industries were similarly affected.
belugas
parents:
3545
diff
changeset
|
2167 |
} else if (IS_BYTE_INSIDE(gfx, GFX_WINDSACK_FIRST, GFX_WINDSACK_LAST+1)) { |
0 | 2168 |
if (_tick_counter & 1) |
2169 |
return; |
|
2170 |
||
3545
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2171 |
if (++gfx == GFX_WINDSACK_LAST+1) { |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2172 |
gfx = GFX_WINDSACK_FIRST; |
3e66bf329257
(svn r4411) CodeChange : Define and use some Gfx for both stations and industries. More are still to come
belugas
parents:
3540
diff
changeset
|
2173 |
} |
3540
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2174 |
|
83bd858fe9fe
(svn r4403) CodeChange : Add GetStationGfx and make use of [G|S]etStationGfx accessors. Also, use GetStationGfx instead of directly accessing the map for functions in station_map.h
belugas
parents:
3527
diff
changeset
|
2175 |
SetStationGfx(tile, gfx); |
0 | 2176 |
MarkTileDirtyByTile(tile); |
2177 |
} |
|
2178 |
} |
|
2179 |
||
3033
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
2180 |
|
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2181 |
static void ClickTile_Station(TileIndex tile) |
0 | 2182 |
{ |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2183 |
if (IsHangar(tile)) { |
0 | 2184 |
ShowAircraftDepotWindow(tile); |
2185 |
} else { |
|
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
2186 |
ShowStationViewWindow(GetStationIndex(tile)); |
0 | 2187 |
} |
2188 |
} |
|
2189 |
||
2190 |
static const byte _enter_station_speedtable[12] = { |
|
2191 |
215, 195, 175, 155, 135, 115, 95, 75, 55, 35, 15, 0 |
|
2192 |
}; |
|
2193 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2194 |
static uint32 VehicleEnter_Station(Vehicle *v, TileIndex tile, int x, int y) |
0 | 2195 |
{ |
2196 |
if (v->type == VEH_Train) { |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2197 |
if (IsRailwayStation(tile) && IsFrontEngine(v) && |
3161 | 2198 |
!IsCompatibleTrainStationTile(tile + TileOffsByDir(DirToDiagDir(v->direction)), tile)) { |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
2199 |
StationID station_id = GetStationIndex(tile); |
2989 | 2200 |
|
555
eec6c0294435
(svn r955) Replace uint16 for orders with struct Order
tron
parents:
543
diff
changeset
|
2201 |
if ((!(v->current_order.flags & OF_NON_STOP) && !_patches.new_nonstop) || |
eec6c0294435
(svn r955) Replace uint16 for orders with struct Order
tron
parents:
543
diff
changeset
|
2202 |
(v->current_order.type == OT_GOTO_STATION && v->current_order.station == station_id)) { |
eec6c0294435
(svn r955) Replace uint16 for orders with struct Order
tron
parents:
543
diff
changeset
|
2203 |
if (!(_patches.new_nonstop && v->current_order.flags & OF_NON_STOP) && |
eec6c0294435
(svn r955) Replace uint16 for orders with struct Order
tron
parents:
543
diff
changeset
|
2204 |
v->current_order.type != OT_LEAVESTATION && |
eec6c0294435
(svn r955) Replace uint16 for orders with struct Order
tron
parents:
543
diff
changeset
|
2205 |
v->last_station_visited != station_id) { |
3482
ba2072e463c8
(svn r4331) Replace some direction calculation magic with DiagDirection to make a bit more clear what's going on
tron
parents:
3480
diff
changeset
|
2206 |
DiagDirection dir = DirToDiagDir(v->direction); |
2989 | 2207 |
|
0 | 2208 |
x &= 0xF; |
2209 |
y &= 0xF; |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2210 |
|
3482
ba2072e463c8
(svn r4331) Replace some direction calculation magic with DiagDirection to make a bit more clear what's going on
tron
parents:
3480
diff
changeset
|
2211 |
if (DiagDirToAxis(dir) != AXIS_X) intswap(x, y); |
3645
86af43f87885
(svn r4554) Replace magic numbers by TILE_{HEIGHT,SIZE}
tron
parents:
3636
diff
changeset
|
2212 |
if (y == TILE_SIZE / 2) { |
86af43f87885
(svn r4554) Replace magic numbers by TILE_{HEIGHT,SIZE}
tron
parents:
3636
diff
changeset
|
2213 |
if (dir != DIAGDIR_SE && dir != DIAGDIR_SW) x = TILE_SIZE - 1 - x; |
0 | 2214 |
if (x == 12) return 2 | (station_id << 8); /* enter station */ |
2215 |
if (x < 12) { |
|
2639 | 2216 |
uint16 spd; |
2217 |
||
0 | 2218 |
v->vehstatus |= VS_TRAIN_SLOWING; |
2219 |
spd = _enter_station_speedtable[x]; |
|
2639 | 2220 |
if (spd < v->cur_speed) v->cur_speed = spd; |
0 | 2221 |
} |
2222 |
} |
|
2223 |
} |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2224 |
} |
0 | 2225 |
} |
2226 |
} else if (v->type == VEH_Road) { |
|
2671
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2227 |
if (v->u.road.state < 16 && !HASBIT(v->u.road.state, 2) && v->u.road.frame == 0) { |
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2228 |
if (IsRoadStop(tile)) { |
2671
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2229 |
/* Attempt to allocate a parking bay in a road stop */ |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2230 |
RoadStop *rs = GetRoadStopByTile(tile, GetRoadStopType(tile)); |
2671
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2231 |
|
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2232 |
/* rs->status bits 0 and 1 describe current the two parking spots. |
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2233 |
* 0 means occupied, 1 means free. */ |
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2234 |
|
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2235 |
// Check if station is busy or if there are no free bays. |
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2236 |
if (HASBIT(rs->status, 7) || GB(rs->status, 0, 2) == 0) |
0 | 2237 |
return 8; |
2238 |
||
2671
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2239 |
v->u.road.state += 32; |
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2240 |
|
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2241 |
// if the first bay is free, allocate that, else the second bay must be free. |
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2242 |
if (HASBIT(rs->status, 0)) { |
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2243 |
CLRBIT(rs->status, 0); |
0 | 2244 |
} else { |
2671
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2245 |
CLRBIT(rs->status, 1); |
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2246 |
v->u.road.state += 2; |
0 | 2247 |
} |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2248 |
|
2671
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2249 |
// mark the station as busy |
457c6cdbf9e7
(svn r3213) - Codechange: Clean up handling of road stops, avoiding unnecessary use of pointers and using the *BIT() macros.
peter1138
parents:
2660
diff
changeset
|
2250 |
SETBIT(rs->status, 7); |
0 | 2251 |
} |
2252 |
} |
|
2253 |
} |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2254 |
|
0 | 2255 |
return 0; |
2256 |
} |
|
2257 |
||
2213
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2258 |
/** Removes a station from the list. |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2259 |
* This is done by setting the .xy property to 0, |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2260 |
* and doing some maintenance, especially clearing vehicle orders. |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2261 |
* Aircraft-Hangar orders need special treatment here, as the hangars are |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2262 |
* actually part of a station (tiletype is STATION), but the order type |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2263 |
* is OT_GOTO_DEPOT. |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2264 |
* @param st Station to be deleted |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2265 |
*/ |
0 | 2266 |
static void DeleteStation(Station *st) |
2267 |
{ |
|
555
eec6c0294435
(svn r955) Replace uint16 for orders with struct Order
tron
parents:
543
diff
changeset
|
2268 |
Order order; |
1551
eb05e6a90e67
(svn r2055) -CodeChange: Begun introducting StationID
celestar
parents:
1527
diff
changeset
|
2269 |
StationID index; |
2213
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2270 |
Vehicle *v; |
0 | 2271 |
st->xy = 0; |
2272 |
||
2273 |
DeleteName(st->string_id); |
|
2274 |
MarkStationDirty(st); |
|
243
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
2275 |
_global_station_sort_dirty = true; // delete station, remove sign |
65
f9f866bc609c
(svn r66) -Fix Station list updated on station deletion/station rename
darkvater
parents:
59
diff
changeset
|
2276 |
InvalidateWindowClasses(WC_STATION_LIST); |
0 | 2277 |
|
2278 |
index = st->index; |
|
2279 |
DeleteWindowById(WC_STATION_VIEW, index); |
|
1024
9b06b01490a4
(svn r1525) -Codechange: rewrote the _order_array, now it can be made dynamic.
truelight
parents:
1012
diff
changeset
|
2280 |
|
2213
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2281 |
//Now delete all orders that go to the station |
555
eec6c0294435
(svn r955) Replace uint16 for orders with struct Order
tron
parents:
543
diff
changeset
|
2282 |
order.type = OT_GOTO_STATION; |
eec6c0294435
(svn r955) Replace uint16 for orders with struct Order
tron
parents:
543
diff
changeset
|
2283 |
order.station = index; |
1024
9b06b01490a4
(svn r1525) -Codechange: rewrote the _order_array, now it can be made dynamic.
truelight
parents:
1012
diff
changeset
|
2284 |
DeleteDestinationFromVehicleOrder(order); |
9b06b01490a4
(svn r1525) -Codechange: rewrote the _order_array, now it can be made dynamic.
truelight
parents:
1012
diff
changeset
|
2285 |
|
2213
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2286 |
//And do the same with aircraft that have the station as a hangar-stop |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2287 |
FOR_ALL_VEHICLES(v) { |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2288 |
bool invalidate = false; |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2289 |
if (v->type == VEH_Aircraft) { |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2290 |
Order *order; |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2291 |
FOR_VEHICLE_ORDERS(v, order) { |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2292 |
if (order->type == OT_GOTO_DEPOT && order->station == index) { |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2293 |
order->type = OT_DUMMY; |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2294 |
order->flags = 0; |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2295 |
invalidate = true; |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2296 |
} |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2297 |
} |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2298 |
} |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2299 |
//Orders for the vehicle have been changed, invalidate the window |
2639 | 2300 |
if (invalidate) InvalidateWindow(WC_VEHICLE_ORDERS, v->index); |
2213
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2301 |
} |
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2302 |
|
cb78ae22fe58
(svn r2731) -Fix [ 1244171 ]: Hangar orders are now properly invalidated as soon as the airport is removed
celestar
parents:
2187
diff
changeset
|
2303 |
//Subsidies need removal as well |
0 | 2304 |
DeleteSubsidyWithStation(index); |
2305 |
} |
|
2306 |
||
1093
e8d26c7dc42f
(svn r1594) Convert all undefined parameter lists to (void) and add the appropriate warning flags in the Makefile
tron
parents:
1078
diff
changeset
|
2307 |
void DeleteAllPlayerStations(void) |
0 | 2308 |
{ |
2309 |
Station *st; |
|
2310 |
||
2311 |
FOR_ALL_STATIONS(st) { |
|
2639 | 2312 |
if (st->xy != 0 && st->owner < MAX_PLAYERS) DeleteStation(st); |
0 | 2313 |
} |
2314 |
} |
|
2315 |
||
2316 |
/* this function is called for one station each tick */ |
|
2317 |
static void StationHandleBigTick(Station *st) |
|
2318 |
{ |
|
2319 |
UpdateStationAcceptance(st, true); |
|
2320 |
||
2639 | 2321 |
if (st->facilities == 0 && ++st->delete_ctr >= 8) DeleteStation(st); |
1239
6e61c510580e
(svn r1743) -Fix: Multistop: Added some debug output and made sure that orphaned slots are cleared.
celestar
parents:
1231
diff
changeset
|
2322 |
|
0 | 2323 |
} |
2324 |
||
500
ef288590e096
(svn r793) Merge INLINE -> inline replacement (revision 376)
tron
parents:
497
diff
changeset
|
2325 |
static inline void byte_inc_sat(byte *p) { byte b = *p + 1; if (b != 0) *p = b; } |
0 | 2326 |
|
2327 |
static void UpdateStationRating(Station *st) |
|
2328 |
{ |
|
2329 |
GoodsEntry *ge; |
|
1551
eb05e6a90e67
(svn r2055) -CodeChange: Begun introducting StationID
celestar
parents:
1527
diff
changeset
|
2330 |
int rating; |
eb05e6a90e67
(svn r2055) -CodeChange: Begun introducting StationID
celestar
parents:
1527
diff
changeset
|
2331 |
StationID index; |
0 | 2332 |
int waiting; |
2333 |
bool waiting_changed = false; |
|
2334 |
||
2335 |
byte_inc_sat(&st->time_since_load); |
|
2336 |
byte_inc_sat(&st->time_since_unload); |
|
2337 |
||
2338 |
ge = st->goods; |
|
2339 |
do { |
|
1266
9dc5638fe8cc
(svn r1770) -Fix: Hopefully last pieces of code that are containing a station-id
truelight
parents:
1265
diff
changeset
|
2340 |
if (ge->enroute_from != INVALID_STATION) { |
0 | 2341 |
byte_inc_sat(&ge->enroute_time); |
2342 |
byte_inc_sat(&ge->days_since_pickup); |
|
2343 |
||
2344 |
rating = 0; |
|
2345 |
||
2346 |
{ |
|
2347 |
int b = ge->last_speed; |
|
2348 |
if ((b-=85) >= 0) |
|
2349 |
rating += b >> 2; |
|
2350 |
} |
|
2351 |
||
2352 |
{ |
|
2353 |
byte age = ge->last_age; |
|
2354 |
(age >= 3) || |
|
2355 |
(rating += 10, age >= 2) || |
|
2356 |
(rating += 10, age >= 1) || |
|
2357 |
(rating += 13, true); |
|
2358 |
} |
|
2359 |
||
1457
6a8ca2f51a8b
(svn r1961) - Fix: [ 1158618 ] Segmentation fault when loading savegame, out of bounds array check.
Darkvater
parents:
1454
diff
changeset
|
2360 |
if (st->owner < MAX_PLAYERS && HASBIT(st->town->statues, st->owner)) |
0 | 2361 |
rating += 26; |
2362 |
||
2363 |
{ |
|
2364 |
byte days = ge->days_since_pickup; |
|
3580
607e4245d024
(svn r4466) -Fix: (FS#71) Game no longer crashes when the last vehicle serving a station has been deleted.
celestar
parents:
3576
diff
changeset
|
2365 |
if (st->last_vehicle_type == VEH_Ship) |
0 | 2366 |
days >>= 2; |
2367 |
(days > 21) || |
|
2368 |
(rating += 25, days > 12) || |
|
2369 |
(rating += 25, days > 6) || |
|
2370 |
(rating += 45, days > 3) || |
|
2371 |
(rating += 35, true); |
|
2372 |
} |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2373 |
|
0 | 2374 |
{ |
2504
7c27fc230cda
(svn r3030) More work for GB/SB, this time concerning the waiting_acceptance attribute of stations
tron
parents:
2502
diff
changeset
|
2375 |
waiting = GB(ge->waiting_acceptance, 0, 12); |
0 | 2376 |
(rating -= 90, waiting > 1500) || |
2377 |
(rating += 55, waiting > 1000) || |
|
2378 |
(rating += 35, waiting > 600) || |
|
2379 |
(rating += 10, waiting > 300) || |
|
2380 |
(rating += 20, waiting > 100) || |
|
2381 |
(rating += 10, true); |
|
2382 |
} |
|
2383 |
||
2384 |
{ |
|
2385 |
int or = ge->rating; // old rating |
|
2386 |
||
2387 |
// only modify rating in steps of -2, -1, 0, 1 or 2 |
|
2388 |
ge->rating = rating = or + clamp(clamp(rating, 0, 255) - or, -2, 2); |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2389 |
|
0 | 2390 |
// if rating is <= 64 and more than 200 items waiting, remove some random amount of goods from the station |
2391 |
if (rating <= 64 && waiting >= 200) { |
|
2392 |
int dec = Random() & 0x1F; |
|
2393 |
if (waiting < 400) dec &= 7; |
|
2394 |
waiting -= dec + 1; |
|
2395 |
waiting_changed = true; |
|
2396 |
} |
|
2397 |
||
2398 |
// if rating is <= 127 and there are any items waiting, maybe remove some goods. |
|
2399 |
if (rating <= 127 && waiting != 0) { |
|
2400 |
uint32 r = Random(); |
|
2401 |
if ( (uint)rating <= (r & 0x7F) ) { |
|
2402 |
waiting = max(waiting - ((r >> 8)&3) - 1, 0); |
|
2403 |
waiting_changed = true; |
|
2404 |
} |
|
2405 |
} |
|
2406 |
||
2504
7c27fc230cda
(svn r3030) More work for GB/SB, this time concerning the waiting_acceptance attribute of stations
tron
parents:
2502
diff
changeset
|
2407 |
if (waiting_changed) SB(ge->waiting_acceptance, 0, 12, waiting); |
0 | 2408 |
} |
2409 |
} |
|
2410 |
} while (++ge != endof(st->goods)); |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2411 |
|
0 | 2412 |
index = st->index; |
2413 |
||
2414 |
if (waiting_changed) |
|
2415 |
InvalidateWindow(WC_STATION_VIEW, index); |
|
2416 |
else |
|
2417 |
InvalidateWindowWidget(WC_STATION_VIEW, index, 5); |
|
2418 |
} |
|
2419 |
||
2420 |
/* called for every station each tick */ |
|
2421 |
static void StationHandleSmallTick(Station *st) |
|
2422 |
{ |
|
2423 |
byte b; |
|
2424 |
||
2639 | 2425 |
if (st->facilities == 0) return; |
0 | 2426 |
|
2427 |
b = st->delete_ctr + 1; |
|
2428 |
if (b >= 185) b = 0; |
|
2429 |
st->delete_ctr = b; |
|
2430 |
||
2639 | 2431 |
if (b == 0) UpdateStationRating(st); |
0 | 2432 |
} |
2433 |
||
1093
e8d26c7dc42f
(svn r1594) Convert all undefined parameter lists to (void) and add the appropriate warning flags in the Makefile
tron
parents:
1078
diff
changeset
|
2434 |
void OnTick_Station(void) |
0 | 2435 |
{ |
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2436 |
uint i; |
0 | 2437 |
Station *st; |
2438 |
||
2639 | 2439 |
if (_game_mode == GM_EDITOR) return; |
0 | 2440 |
|
2441 |
i = _station_tick_ctr; |
|
2639 | 2442 |
if (++_station_tick_ctr == GetStationPoolSize()) _station_tick_ctr = 0; |
0 | 2443 |
|
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
909
diff
changeset
|
2444 |
st = GetStation(i); |
2639 | 2445 |
if (st->xy != 0) StationHandleBigTick(st); |
0 | 2446 |
|
2447 |
FOR_ALL_STATIONS(st) { |
|
2640 | 2448 |
if (st->xy != 0) StationHandleSmallTick(st); |
0 | 2449 |
} |
2450 |
} |
|
2451 |
||
1093
e8d26c7dc42f
(svn r1594) Convert all undefined parameter lists to (void) and add the appropriate warning flags in the Makefile
tron
parents:
1078
diff
changeset
|
2452 |
void StationMonthlyLoop(void) |
0 | 2453 |
{ |
2454 |
} |
|
2455 |
||
2456 |
||
2498
befad2fe53d2
(svn r3024) -Codechange: Another batch of replacements of int/uint/int16/byte/-1 with proper types and constants
tron
parents:
2493
diff
changeset
|
2457 |
void ModifyStationRatingAround(TileIndex tile, PlayerID owner, int amount, uint radius) |
0 | 2458 |
{ |
2459 |
Station *st; |
|
2460 |
||
2461 |
FOR_ALL_STATIONS(st) { |
|
1245
768d9bc95aaa
(svn r1749) Move the functions which calculate distances to map.[ch] and give the more meaningful names
tron
parents:
1239
diff
changeset
|
2462 |
if (st->xy != 0 && st->owner == owner && |
768d9bc95aaa
(svn r1749) Move the functions which calculate distances to map.[ch] and give the more meaningful names
tron
parents:
1239
diff
changeset
|
2463 |
DistanceManhattan(tile, st->xy) <= radius) { |
2549 | 2464 |
uint i; |
2465 |
||
2466 |
for (i = 0; i != NUM_CARGO; i++) { |
|
2467 |
GoodsEntry* ge = &st->goods[i]; |
|
2468 |
||
1266
9dc5638fe8cc
(svn r1770) -Fix: Hopefully last pieces of code that are containing a station-id
truelight
parents:
1265
diff
changeset
|
2469 |
if (ge->enroute_from != INVALID_STATION) { |
0 | 2470 |
ge->rating = clamp(ge->rating + amount, 0, 255); |
2471 |
} |
|
2472 |
} |
|
2473 |
} |
|
2474 |
} |
|
2475 |
} |
|
2476 |
||
2477 |
static void UpdateStationWaiting(Station *st, int type, uint amount) |
|
2478 |
{ |
|
2504
7c27fc230cda
(svn r3030) More work for GB/SB, this time concerning the waiting_acceptance attribute of stations
tron
parents:
2502
diff
changeset
|
2479 |
SB(st->goods[type].waiting_acceptance, 0, 12, |
7c27fc230cda
(svn r3030) More work for GB/SB, this time concerning the waiting_acceptance attribute of stations
tron
parents:
2502
diff
changeset
|
2480 |
min(0xFFF, GB(st->goods[type].waiting_acceptance, 0, 12) + amount) |
7c27fc230cda
(svn r3030) More work for GB/SB, this time concerning the waiting_acceptance attribute of stations
tron
parents:
2502
diff
changeset
|
2481 |
); |
0 | 2482 |
|
2483 |
st->goods[type].enroute_time = 0; |
|
2484 |
st->goods[type].enroute_from = st->index; |
|
2485 |
InvalidateWindow(WC_STATION_VIEW, st->index); |
|
2486 |
} |
|
2487 |
||
1786
a54634efeb98
(svn r2290) - CodeChange: protect the next batch of commands. This brings us to a total of 61, which is 53% :)
Darkvater
parents:
1784
diff
changeset
|
2488 |
/** Rename a station |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
2489 |
* @param tile unused |
1786
a54634efeb98
(svn r2290) - CodeChange: protect the next batch of commands. This brings us to a total of 61, which is 53% :)
Darkvater
parents:
1784
diff
changeset
|
2490 |
* @param p1 station ID that is to be renamed |
a54634efeb98
(svn r2290) - CodeChange: protect the next batch of commands. This brings us to a total of 61, which is 53% :)
Darkvater
parents:
1784
diff
changeset
|
2491 |
* @param p2 unused |
a54634efeb98
(svn r2290) - CodeChange: protect the next batch of commands. This brings us to a total of 61, which is 53% :)
Darkvater
parents:
1784
diff
changeset
|
2492 |
*/ |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
2493 |
int32 CmdRenameStation(TileIndex tile, uint32 flags, uint32 p1, uint32 p2) |
0 | 2494 |
{ |
2639 | 2495 |
StringID str; |
0 | 2496 |
Station *st; |
2497 |
||
1840
c181d5cb4ffe
(svn r2345) - Fix: Don't allow stuff to be renamed to nothing if we don't support it. Only valid ones are signs (delete) and waypoints (rename to default).
Darkvater
parents:
1820
diff
changeset
|
2498 |
if (!IsStationIndex(p1) || _cmd_text[0] == '\0') return CMD_ERROR; |
1774
0fc4a31265c2
(svn r2278) When renaming a station, check if the station exists and belongs to the correct player
tron
parents:
1751
diff
changeset
|
2499 |
st = GetStation(p1); |
0fc4a31265c2
(svn r2278) When renaming a station, check if the station exists and belongs to the correct player
tron
parents:
1751
diff
changeset
|
2500 |
|
0fc4a31265c2
(svn r2278) When renaming a station, check if the station exists and belongs to the correct player
tron
parents:
1751
diff
changeset
|
2501 |
if (!IsValidStation(st) || !CheckOwnership(st->owner)) return CMD_ERROR; |
0fc4a31265c2
(svn r2278) When renaming a station, check if the station exists and belongs to the correct player
tron
parents:
1751
diff
changeset
|
2502 |
|
1820
9b6458526480
(svn r2324) Introduce _cmd_text for passing strings with a command instead of abusing _decode_parameters as text buffer. This should prevent several possible buffer overruns and is a bit cleaner to use. As bonus it reduces the size of most command packets by 79 bytes.
tron
parents:
1786
diff
changeset
|
2503 |
str = AllocateNameUnique(_cmd_text, 6); |
1786
a54634efeb98
(svn r2290) - CodeChange: protect the next batch of commands. This brings us to a total of 61, which is 53% :)
Darkvater
parents:
1784
diff
changeset
|
2504 |
if (str == 0) return CMD_ERROR; |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2505 |
|
0 | 2506 |
if (flags & DC_EXEC) { |
2639 | 2507 |
StringID old_str = st->string_id; |
2508 |
||
0 | 2509 |
st->string_id = str; |
2510 |
UpdateStationVirtCoord(st); |
|
2511 |
DeleteName(old_str); |
|
243
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
2512 |
_station_sort_dirty[st->owner] = true; // rename a station |
0 | 2513 |
MarkWholeScreenDirty(); |
2514 |
} else { |
|
2515 |
DeleteName(str); |
|
2516 |
} |
|
2517 |
||
2518 |
return 0; |
|
2519 |
} |
|
2520 |
||
2521 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2522 |
uint MoveGoodsToStation(TileIndex tile, int w, int h, int type, uint amount) |
0 | 2523 |
{ |
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2524 |
Station* around[8]; |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2525 |
uint i; |
0 | 2526 |
uint moved; |
2527 |
uint best_rating, best_rating2; |
|
2528 |
Station *st1, *st2; |
|
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2529 |
uint t; |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2530 |
int rad = 0; |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2531 |
int w_prod; //width and height of the "producer" of the cargo |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2532 |
int h_prod; |
568
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2533 |
int max_rad; |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2534 |
|
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2535 |
for (i = 0; i < lengthof(around); i++) around[i] = NULL; |
0 | 2536 |
|
568
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2537 |
if (_patches.modified_catchment) { |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2538 |
w_prod = w; |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2539 |
h_prod = h; |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2540 |
w += 16; |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2541 |
h += 16; |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2542 |
max_rad = 8; |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2543 |
} else { |
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2544 |
w_prod = 0; |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2545 |
h_prod = 0; |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2546 |
w += 8; |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2547 |
h += 8; |
568
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2548 |
max_rad = 4; |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2549 |
} |
6eb7d394fb35
(svn r979) Allow more realistically sized catchment areas
Celestar
parents:
555
diff
changeset
|
2550 |
|
1981 | 2551 |
BEGIN_TILE_LOOP(cur_tile, w, h, tile - TileDiffXY(max_rad, max_rad)) |
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2552 |
Station* st; |
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2553 |
|
0 | 2554 |
cur_tile = TILE_MASK(cur_tile); |
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2555 |
if (!IsTileType(cur_tile, MP_STATION)) continue; |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2556 |
|
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
2557 |
st = GetStationByTile(cur_tile); |
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2558 |
|
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2559 |
for (i = 0; i != lengthof(around); i++) { |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2560 |
if (around[i] == NULL) { |
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2561 |
if (!IsBuoy(st) && |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2562 |
(st->town->exclusive_counter == 0 || st->town->exclusivity == st->owner) && // check exclusive transport rights |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2563 |
st->goods[type].rating != 0 && |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2564 |
(!_patches.selectgoods || st->goods[type].last_speed > 0) && // if last_speed is 0, no vehicle has been there. |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2565 |
((st->facilities & ~FACIL_BUS_STOP) != 0 || type == CT_PASSENGERS) && // if we have other fac. than a bus stop, or the cargo is passengers |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2566 |
((st->facilities & ~FACIL_TRUCK_STOP) != 0 || type != CT_PASSENGERS)) { // if we have other fac. than a cargo bay or the cargo is not passengers |
3001
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2567 |
int x_dist; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2568 |
int y_dist; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2569 |
|
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2570 |
if (_patches.modified_catchment) { |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2571 |
// min and max coordinates of the producer relative |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2572 |
const int x_min_prod = 9; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2573 |
const int x_max_prod = 8 + w_prod; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2574 |
const int y_min_prod = 9; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2575 |
const int y_max_prod = 8 + h_prod; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2576 |
|
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2577 |
rad = FindCatchmentRadius(st); |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2578 |
|
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2579 |
x_dist = min(w_cur - x_min_prod, x_max_prod - w_cur); |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2580 |
if (w_cur < x_min_prod) { |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2581 |
x_dist = x_min_prod - w_cur; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2582 |
} else if (w_cur > x_max_prod) { |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2583 |
x_dist = w_cur - x_max_prod; |
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2584 |
} |
3001
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2585 |
|
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2586 |
y_dist = min(h_cur - y_min_prod, y_max_prod - h_cur); |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2587 |
if (h_cur < y_min_prod) { |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2588 |
y_dist = y_min_prod - h_cur; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2589 |
} else if (h_cur > y_max_prod) { |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2590 |
y_dist = h_cur - y_max_prod; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2591 |
} |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2592 |
} else { |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2593 |
x_dist = 0; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2594 |
y_dist = 0; |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2595 |
} |
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2596 |
|
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2597 |
if (x_dist <= rad && y_dist <= rad) around[i] = st; |
3001
0a2cf92beeed
(svn r3581) Just noticed the indentation was totally off, fix it
tron
parents:
3000
diff
changeset
|
2598 |
} |
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2599 |
break; |
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2600 |
} else if (around[i] == st) { |
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2601 |
break; |
0 | 2602 |
} |
2603 |
} |
|
1981 | 2604 |
END_TILE_LOOP(cur_tile, w, h, tile - TileDiffXY(max_rad, max_rad)) |
0 | 2605 |
|
2606 |
/* no stations around at all? */ |
|
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2607 |
if (around[0] == NULL) return 0; |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2608 |
|
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2609 |
if (around[1] == NULL) { |
0 | 2610 |
/* only one station around */ |
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2611 |
moved = (amount * around[0]->goods[type].rating >> 8) + 1; |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2612 |
UpdateStationWaiting(around[0], type, moved); |
0 | 2613 |
return moved; |
2614 |
} |
|
2615 |
||
2616 |
/* several stations around, find the two with the highest rating */ |
|
2617 |
st2 = st1 = NULL; |
|
2618 |
best_rating = best_rating2 = 0; |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2619 |
|
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2620 |
for (i = 0; i != lengthof(around) && around[i] != NULL; i++) { |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2621 |
if (around[i]->goods[type].rating >= best_rating) { |
0 | 2622 |
best_rating2 = best_rating; |
2623 |
st2 = st1; |
|
2624 |
||
3002
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2625 |
best_rating = around[i]->goods[type].rating; |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2626 |
st1 = around[i]; |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2627 |
} else if (around[i]->goods[type].rating >= best_rating2) { |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2628 |
best_rating2 = around[i]->goods[type].rating; |
c4f3a6ebfb25
(svn r3582) Restructure MoveGoodsToStation() to avoid double bookkeeping of StationIDs and station pointers
tron
parents:
3001
diff
changeset
|
2629 |
st2 = around[i]; |
0 | 2630 |
} |
2631 |
} |
|
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2632 |
|
0 | 2633 |
assert(st1 != NULL); |
2634 |
assert(st2 != NULL); |
|
2635 |
assert(best_rating != 0 || best_rating2 != 0); |
|
2636 |
||
2637 |
/* the 2nd highest one gets a penalty */ |
|
2638 |
best_rating2 >>= 1; |
|
2639 |
||
2640 |
/* amount given to station 1 */ |
|
2641 |
t = (best_rating * (amount + 1)) / (best_rating + best_rating2); |
|
2642 |
||
2643 |
moved = 0; |
|
2644 |
if (t != 0) { |
|
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2645 |
moved = t * best_rating / 256 + 1; |
0 | 2646 |
amount -= t; |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2647 |
UpdateStationWaiting(st1, type, moved); |
0 | 2648 |
} |
2649 |
||
2650 |
if (amount != 0) { |
|
3000
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2651 |
amount = amount * best_rating2 / 256 + 1; |
711d2ababe20
(svn r3580) Some small cleanups before the real change, especially reduce the indentation by one by using continue
tron
parents:
2989
diff
changeset
|
2652 |
moved += amount; |
0 | 2653 |
UpdateStationWaiting(st2, type, amount); |
2654 |
} |
|
2655 |
||
2656 |
return moved; |
|
2657 |
} |
|
2658 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2659 |
void BuildOilRig(TileIndex tile) |
0 | 2660 |
{ |
2639 | 2661 |
uint j; |
2427
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2662 |
Station *st = AllocateStation(); |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2663 |
|
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2664 |
if (st == NULL) { |
3630
0f7828d892ae
(svn r4529) - Codechange: Use proper naming for hex numbers in debug prints eg. 0xF3A6. Use fixed lengths where applicable (newgrf). Unfortunately '%#X' is unusable since it gives 0XFF3 and '%#x' gives 0xff3 while we want 0xFF3 :P
Darkvater
parents:
3587
diff
changeset
|
2665 |
DEBUG(misc, 0) ("Couldn't allocate station for oilrig at 0x%X, reverting to oilrig only...", tile); |
2427
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2666 |
return; |
0 | 2667 |
} |
2427
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2668 |
if (!GenerateStationName(st, tile, 2)) { |
3630
0f7828d892ae
(svn r4529) - Codechange: Use proper naming for hex numbers in debug prints eg. 0xF3A6. Use fixed lengths where applicable (newgrf). Unfortunately '%#X' is unusable since it gives 0XFF3 and '%#x' gives 0xff3 while we want 0xFF3 :P
Darkvater
parents:
3587
diff
changeset
|
2669 |
DEBUG(misc, 0) ("Couldn't allocate station-name for oilrig at 0x%X, reverting to oilrig only...", tile); |
2427
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2670 |
return; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2671 |
} |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2672 |
|
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2673 |
st->town = ClosestTownFromTile(tile, (uint)-1); |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2674 |
st->sign.width_1 = 0; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2675 |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2676 |
MakeOilrig(tile, st->index); |
2427
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2677 |
|
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2678 |
st->owner = OWNER_NONE; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2679 |
st->airport_flags = 0; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2680 |
st->airport_type = AT_OILRIG; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2681 |
st->xy = tile; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2682 |
st->bus_stops = NULL; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2683 |
st->truck_stops = NULL; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2684 |
st->airport_tile = tile; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2685 |
st->dock_tile = tile; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2686 |
st->train_tile = 0; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2687 |
st->had_vehicle_of_type = 0; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2688 |
st->time_since_load = 255; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2689 |
st->time_since_unload = 255; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2690 |
st->delete_ctr = 0; |
3580
607e4245d024
(svn r4466) -Fix: (FS#71) Game no longer crashes when the last vehicle serving a station has been deleted.
celestar
parents:
3576
diff
changeset
|
2691 |
st->last_vehicle_type = VEH_Invalid; |
2427
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2692 |
st->facilities = FACIL_AIRPORT | FACIL_DOCK; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2693 |
st->build_date = _date; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2694 |
|
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2695 |
for (j = 0; j != NUM_CARGO; j++) { |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2696 |
st->goods[j].waiting_acceptance = 0; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2697 |
st->goods[j].days_since_pickup = 0; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2698 |
st->goods[j].enroute_from = INVALID_STATION; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2699 |
st->goods[j].rating = 175; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2700 |
st->goods[j].last_speed = 0; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2701 |
st->goods[j].last_age = 255; |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2702 |
} |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2703 |
|
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2704 |
UpdateStationVirtCoordDirty(st); |
b7a0ad02af26
(svn r2953) - Fix: [ 1257766 ] Cannot make ships go to an oil platform (oilrig has no station). While it is still possible that oilrigs end up without a station, it is only the case where no more stations can be built at all
Darkvater
parents:
2425
diff
changeset
|
2705 |
UpdateStationAcceptance(st, false); |
0 | 2706 |
} |
2707 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2708 |
void DeleteOilRig(TileIndex tile) |
0 | 2709 |
{ |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
2710 |
Station* st = GetStationByTile(tile); |
0 | 2711 |
|
2712 |
DoClearSquare(tile); |
|
2713 |
||
2714 |
st->dock_tile = 0; |
|
2715 |
st->airport_tile = 0; |
|
2716 |
st->facilities &= ~(FACIL_AIRPORT | FACIL_DOCK); |
|
2717 |
st->airport_flags = 0; |
|
2718 |
UpdateStationVirtCoordDirty(st); |
|
2719 |
DeleteStation(st); |
|
2720 |
} |
|
2721 |
||
2436
177cb6a8339f
(svn r2962) - const correctness for all Get* functions and most Draw* functions that don't change their pointer parameters
Darkvater
parents:
2427
diff
changeset
|
2722 |
static void ChangeTileOwner_Station(TileIndex tile, PlayerID old_player, PlayerID new_player) |
0 | 2723 |
{ |
1901
fb05044cf5c3
(svn r2407) Use {Get,Is}TileOwner to get/check the owner of a tile and fix some bogus reads of _map_owner
tron
parents:
1891
diff
changeset
|
2724 |
if (!IsTileOwner(tile, old_player)) return; |
0 | 2725 |
|
2502 | 2726 |
if (new_player != OWNER_SPECTATOR) { |
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
2727 |
Station* st = GetStationByTile(tile); |
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
2728 |
|
1902 | 2729 |
SetTileOwner(tile, new_player); |
0 | 2730 |
st->owner = new_player; |
243
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
2731 |
_global_station_sort_dirty = true; // transfer ownership of station to another player |
65
f9f866bc609c
(svn r66) -Fix Station list updated on station deletion/station rename
darkvater
parents:
59
diff
changeset
|
2732 |
InvalidateWindowClasses(WC_STATION_LIST); |
0 | 2733 |
} else { |
3491
4c8427796c64
(svn r4342) Change the first two parameters of commands - virtual pixel coordinates of the tile to operate on - to a TileIndex
tron
parents:
3482
diff
changeset
|
2734 |
DoCommand(tile, 0, 0, DC_EXEC, CMD_LANDSCAPE_CLEAR); |
0 | 2735 |
} |
2736 |
} |
|
2737 |
||
1977
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2738 |
static int32 ClearTile_Station(TileIndex tile, byte flags) |
4392ae3d8e31
(svn r2483) Replace almost 500 "uint tile" (and variants) with "TileIndex tile"
tron
parents:
1942
diff
changeset
|
2739 |
{ |
0 | 2740 |
Station *st; |
2741 |
||
2742 |
if (flags & DC_AUTO) { |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2743 |
switch (GetStationType(tile)) { |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2744 |
case STATION_RAIL: return_cmd_error(STR_300B_MUST_DEMOLISH_RAILROAD); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2745 |
case STATION_HANGAR: |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2746 |
case STATION_AIRPORT: return_cmd_error(STR_300E_MUST_DEMOLISH_AIRPORT_FIRST); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2747 |
case STATION_TRUCK: return_cmd_error(STR_3047_MUST_DEMOLISH_TRUCK_STATION); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2748 |
case STATION_BUS: return_cmd_error(STR_3046_MUST_DEMOLISH_BUS_STATION); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2749 |
case STATION_BUOY: return_cmd_error(STR_306A_BUOY_IN_THE_WAY); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2750 |
case STATION_DOCK: return_cmd_error(STR_304D_MUST_DEMOLISH_DOCK_FIRST); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2751 |
case STATION_OILRIG: |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2752 |
SetDParam(0, STR_4807_OIL_RIG); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2753 |
return_cmd_error(STR_4800_IN_THE_WAY); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2754 |
} |
0 | 2755 |
} |
2756 |
||
3315
1f65f8260092
(svn r4079) Add GetSation{Index,ByTile}() to get the station index resp. the station from a tile
tron
parents:
3282
diff
changeset
|
2757 |
st = GetStationByTile(tile); |
0 | 2758 |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2759 |
switch (GetStationType(tile)) { |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2760 |
case STATION_RAIL: return RemoveRailroadStation(st, tile, flags); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2761 |
case STATION_HANGAR: |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2762 |
case STATION_AIRPORT: return RemoveAirport(st, flags); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2763 |
case STATION_TRUCK: |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2764 |
case STATION_BUS: return RemoveRoadStop(st, flags, tile); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2765 |
case STATION_BUOY: return RemoveBuoy(st, flags); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2766 |
case STATION_DOCK: return RemoveDock(st, flags); |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2767 |
default: break; |
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2768 |
} |
0 | 2769 |
|
2770 |
return CMD_ERROR; |
|
2771 |
} |
|
2772 |
||
1093
e8d26c7dc42f
(svn r1594) Convert all undefined parameter lists to (void) and add the appropriate warning flags in the Makefile
tron
parents:
1078
diff
changeset
|
2773 |
void InitializeStations(void) |
0 | 2774 |
{ |
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2775 |
/* Clean the station pool and create 1 block in it */ |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2776 |
CleanPool(&_station_pool); |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2777 |
AddBlockToPool(&_station_pool); |
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
909
diff
changeset
|
2778 |
|
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2779 |
/* Clean the roadstop pool and create 1 block in it */ |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2780 |
CleanPool(&_roadstop_pool); |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2781 |
AddBlockToPool(&_roadstop_pool); |
243
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
2782 |
|
0 | 2783 |
_station_tick_ctr = 0; |
243
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
2784 |
|
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
2785 |
// set stations to be sorted on load of savegame |
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
2786 |
memset(_station_sort_dirty, true, sizeof(_station_sort_dirty)); |
9a40daa560ae
(svn r244) -Fix: Stations were not sorted for non-player-0 players
darkvater
parents:
222
diff
changeset
|
2787 |
_global_station_sort_dirty = true; // load of savegame |
0 | 2788 |
} |
2789 |
||
2790 |
||
2791 |
const TileTypeProcs _tile_type_station_procs = { |
|
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2792 |
DrawTile_Station, /* draw_tile_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2793 |
GetSlopeZ_Station, /* get_slope_z_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2794 |
ClearTile_Station, /* clear_tile_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2795 |
GetAcceptedCargo_Station, /* get_accepted_cargo_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2796 |
GetTileDesc_Station, /* get_tile_desc_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2797 |
GetTileTrackStatus_Station, /* get_tile_track_status_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2798 |
ClickTile_Station, /* click_tile_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2799 |
AnimateTile_Station, /* animate_tile_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2800 |
TileLoop_Station, /* tile_loop_clear */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2801 |
ChangeTileOwner_Station, /* change_tile_owner_clear */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2802 |
NULL, /* get_produced_cargo_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2803 |
VehicleEnter_Station, /* vehicle_enter_tile_proc */ |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2804 |
GetSlopeTileh_Station, /* get_slope_tileh_proc */ |
0 | 2805 |
}; |
2806 |
||
1881
023a134a4b12
(svn r2387) - CodeChange: made the saveload code more readable and also removed the 'byte' saveload arrays which means you can save an array of more than 255 elements, or bigger structs than 255 bytes. This doesn't yet solve the problem that a chunk can be a maximum of 16384 big.
Darkvater
parents:
1876
diff
changeset
|
2807 |
static const SaveLoad _roadstop_desc[] = { |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2808 |
SLE_VAR(RoadStop,xy, SLE_UINT32), |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2809 |
SLE_VAR(RoadStop,used, SLE_UINT8), |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2810 |
SLE_VAR(RoadStop,status, SLE_UINT8), |
1285
dee20e32bffe
(svn r1789) -Fix: there is no need to save the index, it is done for us
truelight
parents:
1284
diff
changeset
|
2811 |
/* Index was saved in some versions, but this is not needed */ |
3222
8bfed4267cba
(svn r3895) - Add proper SLE(G)_CONDNULL macros for the empty space reservation in savegames and update where used
Darkvater
parents:
3183
diff
changeset
|
2812 |
SLE_CONDNULL(4, 0, 8), |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2813 |
SLE_VAR(RoadStop,station, SLE_UINT16), |
3479
a4d992b5d24d
(svn r4324) Remove the unused road stop type attribute from struct RoadStop
tron
parents:
3478
diff
changeset
|
2814 |
SLE_CONDNULL(1, 0, 25), |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2815 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2816 |
SLE_REF(RoadStop,next, REF_ROADSTOPS), |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2817 |
SLE_REF(RoadStop,prev, REF_ROADSTOPS), |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2818 |
|
3431 | 2819 |
SLE_CONDNULL(4, 0, 24), |
3475
1b68d263ae0e
(svn r4320) -Fix/Codechange: rs->num_vehicles is no longer saved or loaded, but computed on the fly. Partly fixes FS#101
celestar
parents:
3474
diff
changeset
|
2820 |
SLE_CONDNULL(1, 25, 25), |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2821 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2822 |
SLE_END() |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2823 |
}; |
0 | 2824 |
|
1881
023a134a4b12
(svn r2387) - CodeChange: made the saveload code more readable and also removed the 'byte' saveload arrays which means you can save an array of more than 255 elements, or bigger structs than 255 bytes. This doesn't yet solve the problem that a chunk can be a maximum of 16384 big.
Darkvater
parents:
1876
diff
changeset
|
2825 |
static const SaveLoad _station_desc[] = { |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2826 |
SLE_CONDVAR(Station, xy, SLE_FILE_U16 | SLE_VAR_U32, 0, 5), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2827 |
SLE_CONDVAR(Station, xy, SLE_UINT32, 6, SL_MAX_VERSION), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2828 |
SLE_CONDVAR(Station, bus_tile_obsolete, SLE_FILE_U16 | SLE_VAR_U32, 0, 5), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2829 |
SLE_CONDVAR(Station, lorry_tile_obsolete, SLE_FILE_U16 | SLE_VAR_U32, 0, 5), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2830 |
SLE_CONDVAR(Station, train_tile, SLE_FILE_U16 | SLE_VAR_U32, 0, 5), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2831 |
SLE_CONDVAR(Station, train_tile, SLE_UINT32, 6, SL_MAX_VERSION), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2832 |
SLE_CONDVAR(Station, airport_tile, SLE_FILE_U16 | SLE_VAR_U32, 0, 5), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2833 |
SLE_CONDVAR(Station, airport_tile, SLE_UINT32, 6, SL_MAX_VERSION), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2834 |
SLE_CONDVAR(Station, dock_tile, SLE_FILE_U16 | SLE_VAR_U32, 0, 5), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2835 |
SLE_CONDVAR(Station, dock_tile, SLE_UINT32, 6, SL_MAX_VERSION), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2836 |
SLE_REF(Station, town, REF_TOWN), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2837 |
SLE_VAR(Station, trainst_w, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2838 |
SLE_CONDVAR(Station, trainst_h, SLE_UINT8, 2, SL_MAX_VERSION), |
0 | 2839 |
|
2840 |
// alpha_order was stored here in savegame format 0 - 3 |
|
3222
8bfed4267cba
(svn r3895) - Add proper SLE(G)_CONDNULL macros for the empty space reservation in savegames and update where used
Darkvater
parents:
3183
diff
changeset
|
2841 |
SLE_CONDNULL(1, 0, 3), |
0 | 2842 |
|
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2843 |
SLE_VAR(Station,string_id, SLE_STRINGID), |
0 | 2844 |
SLE_VAR(Station,had_vehicle_of_type,SLE_UINT16), |
2845 |
||
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2846 |
SLE_VAR(Station,time_since_load, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2847 |
SLE_VAR(Station,time_since_unload, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2848 |
SLE_VAR(Station,delete_ctr, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2849 |
SLE_VAR(Station,owner, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2850 |
SLE_VAR(Station,facilities, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2851 |
SLE_VAR(Station,airport_type, SLE_UINT8), |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2852 |
|
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2853 |
// truck/bus_stop_status was stored here in savegame format 0 - 6 |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2854 |
SLE_CONDVAR(Station,truck_stop_status_obsolete, SLE_UINT8, 0, 5), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2855 |
SLE_CONDVAR(Station,bus_stop_status_obsolete, SLE_UINT8, 0, 5), |
193
0a7025304867
(svn r194) -Codechange: stripping trailing-spaces. Please keep this that way!
truelight
parents:
159
diff
changeset
|
2856 |
|
123
d550772c61e6
(svn r124) Prepared code for removal of block_months variable in next major savegame version
dominik
parents:
121
diff
changeset
|
2857 |
// blocked_months was stored here in savegame format 0 - 4.0 |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2858 |
SLE_CONDVAR(Station,blocked_months_obsolete, SLE_UINT8, 0, 4), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2859 |
|
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2860 |
SLE_CONDVAR(Station,airport_flags, SLE_VAR_U32 | SLE_FILE_U16, 0, 2), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2861 |
SLE_CONDVAR(Station,airport_flags, SLE_UINT32, 3, SL_MAX_VERSION), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2862 |
|
3580
607e4245d024
(svn r4466) -Fix: (FS#71) Game no longer crashes when the last vehicle serving a station has been deleted.
celestar
parents:
3576
diff
changeset
|
2863 |
SLE_CONDNULL(2, 0, 25), /* Ex last-vehicle */ |
607e4245d024
(svn r4466) -Fix: (FS#71) Game no longer crashes when the last vehicle serving a station has been deleted.
celestar
parents:
3576
diff
changeset
|
2864 |
SLE_CONDVAR(Station,last_vehicle_type, SLE_UINT8 , 26, SL_MAX_VERSION), |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2865 |
|
3574
bf5f6c1af32c
(svn r4460) - Newstations: remove unused class_id / stat_id variables from the
peter1138
parents:
3568
diff
changeset
|
2866 |
// Was custom station class and id |
bf5f6c1af32c
(svn r4460) - Newstations: remove unused class_id / stat_id variables from the
peter1138
parents:
3568
diff
changeset
|
2867 |
SLE_CONDNULL(2, 3, 25), |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2868 |
SLE_CONDVAR(Station,build_date, SLE_UINT16, 3, SL_MAX_VERSION), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2869 |
|
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2870 |
SLE_CONDREF(Station,bus_stops, REF_ROADSTOPS, 6, SL_MAX_VERSION), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2871 |
SLE_CONDREF(Station,truck_stops, REF_ROADSTOPS, 6, SL_MAX_VERSION), |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2872 |
|
3687
109ec5cdb932
(svn r4612) - NewStations: add random bits (for graphic variation) to stations
peter1138
parents:
3682
diff
changeset
|
2873 |
/* Used by newstations for graphic variations */ |
109ec5cdb932
(svn r4612) - NewStations: add random bits (for graphic variation) to stations
peter1138
parents:
3682
diff
changeset
|
2874 |
SLE_CONDVAR(Station,random_bits, SLE_UINT16, 27, SL_MAX_VERSION), |
109ec5cdb932
(svn r4612) - NewStations: add random bits (for graphic variation) to stations
peter1138
parents:
3682
diff
changeset
|
2875 |
SLE_CONDVAR(Station,waiting_triggers, SLE_UINT8, 27, SL_MAX_VERSION), |
109ec5cdb932
(svn r4612) - NewStations: add random bits (for graphic variation) to stations
peter1138
parents:
3682
diff
changeset
|
2876 |
|
3222
8bfed4267cba
(svn r3895) - Add proper SLE(G)_CONDNULL macros for the empty space reservation in savegames and update where used
Darkvater
parents:
3183
diff
changeset
|
2877 |
// reserve extra space in savegame here. (currently 32 bytes) |
8bfed4267cba
(svn r3895) - Add proper SLE(G)_CONDNULL macros for the empty space reservation in savegames and update where used
Darkvater
parents:
3183
diff
changeset
|
2878 |
SLE_CONDNULL(32, 2, SL_MAX_VERSION), |
0 | 2879 |
|
2880 |
SLE_END() |
|
2881 |
}; |
|
2882 |
||
1881
023a134a4b12
(svn r2387) - CodeChange: made the saveload code more readable and also removed the 'byte' saveload arrays which means you can save an array of more than 255 elements, or bigger structs than 255 bytes. This doesn't yet solve the problem that a chunk can be a maximum of 16384 big.
Darkvater
parents:
1876
diff
changeset
|
2883 |
static const SaveLoad _goods_desc[] = { |
3554
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2884 |
SLE_VAR(GoodsEntry,waiting_acceptance, SLE_UINT16), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2885 |
SLE_VAR(GoodsEntry,days_since_pickup, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2886 |
SLE_VAR(GoodsEntry,rating, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2887 |
SLE_CONDVAR(GoodsEntry,enroute_from, SLE_FILE_U8 | SLE_VAR_U16, 0, 6), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2888 |
SLE_CONDVAR(GoodsEntry,enroute_from, SLE_UINT16, 7, SL_MAX_VERSION), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2889 |
SLE_VAR(GoodsEntry,enroute_time, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2890 |
SLE_VAR(GoodsEntry,last_speed, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2891 |
SLE_VAR(GoodsEntry,last_age, SLE_UINT8), |
c16eadc2d060
(svn r4426) Code Cleaning : replacing tabs with spaces, removing obvious comments, aligning arrays etc...
belugas
parents:
3553
diff
changeset
|
2892 |
SLE_CONDVAR(GoodsEntry,feeder_profit, SLE_INT32, 14, SL_MAX_VERSION), |
0 | 2893 |
|
2894 |
SLE_END() |
|
2895 |
}; |
|
2896 |
||
2897 |
||
2898 |
static void SaveLoad_STNS(Station *st) |
|
2899 |
{ |
|
2900 |
int i; |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2901 |
|
0 | 2902 |
SlObject(st, _station_desc); |
1266
9dc5638fe8cc
(svn r1770) -Fix: Hopefully last pieces of code that are containing a station-id
truelight
parents:
1265
diff
changeset
|
2903 |
for (i = 0; i != NUM_CARGO; i++) { |
0 | 2904 |
SlObject(&st->goods[i], _goods_desc); |
1266
9dc5638fe8cc
(svn r1770) -Fix: Hopefully last pieces of code that are containing a station-id
truelight
parents:
1265
diff
changeset
|
2905 |
|
9dc5638fe8cc
(svn r1770) -Fix: Hopefully last pieces of code that are containing a station-id
truelight
parents:
1265
diff
changeset
|
2906 |
/* In older versions, enroute_from had 0xFF as INVALID_STATION, is now 0xFFFF */ |
2685
00111d5ca47f
(svn r3227) -Codechange: [Savegame] removed 'minor' version, and renamed 'major' version to just: version.
truelight
parents:
2676
diff
changeset
|
2907 |
if (CheckSavegameVersion(7) && st->goods[i].enroute_from == 0xFF) { |
2469
1bfbb0dc0b75
(svn r2995) Replace 0xFF/0xFFFF with CT_INVALID/OWNER_SPECTATOR/INVALID_STATION where appropriate
tron
parents:
2436
diff
changeset
|
2908 |
st->goods[i].enroute_from = INVALID_STATION; |
2639 | 2909 |
} |
1266
9dc5638fe8cc
(svn r1770) -Fix: Hopefully last pieces of code that are containing a station-id
truelight
parents:
1265
diff
changeset
|
2910 |
} |
0 | 2911 |
} |
2912 |
||
1093
e8d26c7dc42f
(svn r1594) Convert all undefined parameter lists to (void) and add the appropriate warning flags in the Makefile
tron
parents:
1078
diff
changeset
|
2913 |
static void Save_STNS(void) |
0 | 2914 |
{ |
2915 |
Station *st; |
|
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
909
diff
changeset
|
2916 |
// Write the stations |
0 | 2917 |
FOR_ALL_STATIONS(st) { |
2918 |
if (st->xy != 0) { |
|
2919 |
SlSetArrayIndex(st->index); |
|
2920 |
SlAutolength((AutolengthProc*)SaveLoad_STNS, st); |
|
2921 |
} |
|
2922 |
} |
|
2923 |
} |
|
2924 |
||
1093
e8d26c7dc42f
(svn r1594) Convert all undefined parameter lists to (void) and add the appropriate warning flags in the Makefile
tron
parents:
1078
diff
changeset
|
2925 |
static void Load_STNS(void) |
0 | 2926 |
{ |
2927 |
int index; |
|
2928 |
while ((index = SlIterateArray()) != -1) { |
|
1272
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2929 |
Station *st; |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2930 |
|
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2931 |
if (!AddBlockIfNeeded(&_station_pool, index)) |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2932 |
error("Stations: failed loading savegame: too many stations"); |
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2933 |
|
d3e09adb7736
(svn r1776) -Add: Dynamic stations. You can now have up to 64k of stations
truelight
parents:
1266
diff
changeset
|
2934 |
st = GetStation(index); |
0 | 2935 |
SaveLoad_STNS(st); |
2936 |
||
2937 |
// this means it's an oldstyle savegame without support for nonuniform stations |
|
2639 | 2938 |
if (st->train_tile != 0 && st->trainst_h == 0) { |
3033
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
2939 |
uint w = GB(st->trainst_w, 4, 4); |
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
2940 |
uint h = GB(st->trainst_w, 0, 4); |
e4f7c60a1742
(svn r3613) Some more const, indentation, whitespace and similar stuff
tron
parents:
3032
diff
changeset
|
2941 |
|
3334
b72ac8637a30
(svn r4113) Moved all relevant map functions for stations to station_map.[ch]
celestar
parents:
3333
diff
changeset
|
2942 |
if (GetRailStationAxis(st->train_tile) == AXIS_Y) uintswap(w, h); |
0 | 2943 |
st->trainst_w = w; |
2944 |
st->trainst_h = h; |
|
2945 |
} |
|
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2946 |
|
2685
00111d5ca47f
(svn r3227) -Codechange: [Savegame] removed 'minor' version, and renamed 'major' version to just: version.
truelight
parents:
2676
diff
changeset
|
2947 |
/* In older versions, we had just 1 tile for a bus/lorry, now we have more.. |
00111d5ca47f
(svn r3227) -Codechange: [Savegame] removed 'minor' version, and renamed 'major' version to just: version.
truelight
parents:
2676
diff
changeset
|
2948 |
* convert, if needed */ |
00111d5ca47f
(svn r3227) -Codechange: [Savegame] removed 'minor' version, and renamed 'major' version to just: version.
truelight
parents:
2676
diff
changeset
|
2949 |
if (CheckSavegameVersion(6)) { |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2950 |
if (st->bus_tile_obsolete != 0) { |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2951 |
st->bus_stops = AllocateRoadStop(); |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2952 |
if (st->bus_stops == NULL) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2953 |
error("Station: too many busstations in savegame"); |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2954 |
|
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2955 |
InitializeRoadStop(st->bus_stops, NULL, st->bus_tile_obsolete, st->index); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2956 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2957 |
if (st->lorry_tile_obsolete != 0) { |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2958 |
st->truck_stops = AllocateRoadStop(); |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2959 |
if (st->truck_stops == NULL) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2960 |
error("Station: too many truckstations in savegame"); |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2961 |
|
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2962 |
InitializeRoadStop(st->truck_stops, NULL, st->lorry_tile_obsolete, st->index); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2963 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2964 |
} |
0 | 2965 |
} |
919
b0d6c7642f99
(svn r1407) -Codechange: changed a lot around _stations, _vehicles, _towns and _industries
truelight
parents:
909
diff
changeset
|
2966 |
|
1472
043304846688
(svn r1976) Cleanups - mostly indentation and fiddling with loops
tron
parents:
1457
diff
changeset
|
2967 |
/* This is to ensure all pointers are within the limits of _stations_size */ |
2639 | 2968 |
if (_station_tick_ctr > GetStationPoolSize()) _station_tick_ctr = 0; |
0 | 2969 |
} |
2970 |
||
2549 | 2971 |
static void Save_ROADSTOP(void) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2972 |
{ |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2973 |
RoadStop *rs; |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2974 |
|
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2975 |
FOR_ALL_ROADSTOPS(rs) { |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2976 |
if (rs->used) { |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2977 |
SlSetArrayIndex(rs->index); |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2978 |
SlObject(rs, _roadstop_desc); |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2979 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2980 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2981 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2982 |
|
2549 | 2983 |
static void Load_ROADSTOP(void) |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2984 |
{ |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2985 |
int index; |
3475
1b68d263ae0e
(svn r4320) -Fix/Codechange: rs->num_vehicles is no longer saved or loaded, but computed on the fly. Partly fixes FS#101
celestar
parents:
3474
diff
changeset
|
2986 |
Vehicle *v; |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
2987 |
|
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2988 |
while ((index = SlIterateArray()) != -1) { |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2989 |
RoadStop *rs; |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2990 |
|
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2991 |
if (!AddBlockIfNeeded(&_roadstop_pool, index)) |
1314
d6a253cf92c3
(svn r1818) -Add: Dynamic orders (up to 64k orders)
truelight
parents:
1313
diff
changeset
|
2992 |
error("RoadStops: failed loading savegame: too many RoadStops"); |
1284
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2993 |
|
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2994 |
rs = GetRoadStop(index); |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2995 |
SlObject(rs, _roadstop_desc); |
06a52178bf46
(svn r1788) -Add: Made RoadStops dynamic. You can now create up to 64k roadstops.
truelight
parents:
1272
diff
changeset
|
2996 |
} |
3475
1b68d263ae0e
(svn r4320) -Fix/Codechange: rs->num_vehicles is no longer saved or loaded, but computed on the fly. Partly fixes FS#101
celestar
parents:
3474
diff
changeset
|
2997 |
|
1b68d263ae0e
(svn r4320) -Fix/Codechange: rs->num_vehicles is no longer saved or loaded, but computed on the fly. Partly fixes FS#101
celestar
parents:
3474
diff
changeset
|
2998 |
FOR_ALL_VEHICLES(v) { |
3480
a36c0220b5d3
(svn r4325) When updating the vehicle count for road stops after load use the slot pointer of the vehicle instead of recalculating the road stop using the destination tile of the vehicle. Apart from being more simple this could prevent a inconsistency of slot information in the edge case when the destination tile isn't the tile of the assigned slot.
tron
parents:
3479
diff
changeset
|
2999 |
if (v->type == VEH_Road && v->u.road.slot != NULL) v->u.road.slot->num_vehicles++; |
3475
1b68d263ae0e
(svn r4320) -Fix/Codechange: rs->num_vehicles is no longer saved or loaded, but computed on the fly. Partly fixes FS#101
celestar
parents:
3474
diff
changeset
|
3000 |
} |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
3001 |
} |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
3002 |
|
0 | 3003 |
const ChunkHandler _station_chunk_handlers[] = { |
1217
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
3004 |
{ 'STNS', Save_STNS, Load_STNS, CH_ARRAY }, |
ab9f02a224ab
(svn r1721) -Feature: It is now possible to build multiple road stations (up to 8) on
celestar
parents:
1214
diff
changeset
|
3005 |
{ 'ROAD', Save_ROADSTOP, Load_ROADSTOP, CH_ARRAY | CH_LAST}, |
0 | 3006 |
}; |