00001
00002
00003
00004
00005
00006
00007
00008
00009
00057 #include "stdafx.h"
00058 #include "station_map.h"
00059 #include "viewport_func.h"
00060 #include "train.h"
00061 #include "rail_gui.h"
00062 #include "tunnelbridge_map.h"
00063 #include "tunnelbridge.h"
00064 #include "elrail_func.h"
00065 #include "company_base.h"
00066 #include "newgrf_railtype.h"
00067
00068 #include "table/elrail_data.h"
00069
00075 static inline TLG GetTLG(TileIndex t)
00076 {
00077 return (TLG)((HasBit(TileX(t), 0) << 1) + HasBit(TileY(t), 0));
00078 }
00079
00086 static TrackBits GetRailTrackBitsUniversal(TileIndex t, byte *override)
00087 {
00088 switch (GetTileType(t)) {
00089 case MP_RAILWAY:
00090 if (!HasCatenary(GetRailType(t))) return TRACK_BIT_NONE;
00091 switch (GetRailTileType(t)) {
00092 case RAIL_TILE_NORMAL: case RAIL_TILE_SIGNALS:
00093 return GetTrackBits(t);
00094 default:
00095 return TRACK_BIT_NONE;
00096 }
00097 break;
00098
00099 case MP_TUNNELBRIDGE:
00100 if (!HasCatenary(GetRailType(t))) return TRACK_BIT_NONE;
00101 if (override != NULL && (IsTunnel(t) || GetTunnelBridgeLength(t, GetOtherBridgeEnd(t)) > 0)) {
00102 *override = 1 << GetTunnelBridgeDirection(t);
00103 }
00104 return DiagDirToDiagTrackBits(GetTunnelBridgeDirection(t));
00105
00106 case MP_ROAD:
00107 if (!IsLevelCrossing(t)) return TRACK_BIT_NONE;
00108 if (!HasCatenary(GetRailType(t))) return TRACK_BIT_NONE;
00109 return GetCrossingRailBits(t);
00110
00111 case MP_STATION:
00112 if (!HasStationRail(t)) return TRACK_BIT_NONE;
00113 if (!HasCatenary(GetRailType(t))) return TRACK_BIT_NONE;
00114 return TrackToTrackBits(GetRailStationTrack(t));
00115
00116 default:
00117 return TRACK_BIT_NONE;
00118 }
00119 }
00120
00124 static TrackBits MaskWireBits(TileIndex t, TrackBits tracks)
00125 {
00126 if (!IsPlainRailTile(t)) return tracks;
00127
00128 TrackdirBits neighbour_tdb = TRACKDIR_BIT_NONE;
00129 for (DiagDirection d = DIAGDIR_BEGIN; d < DIAGDIR_END; d++) {
00130
00131
00132
00133 RailType rt = GetTileRailType(TileAddByDiagDir(t, d));
00134 if (rt == INVALID_RAILTYPE || !HasCatenary(rt) || (TrackStatusToTrackBits(GetTileTrackStatus(TileAddByDiagDir(t, d), TRANSPORT_RAIL, 0)) & DiagdirReachesTracks(d)) == TRACK_BIT_NONE) {
00135 neighbour_tdb |= DiagdirReachesTrackdirs(ReverseDiagDir(d));
00136 }
00137 }
00138
00139
00140
00141
00142 TrackBits mask;
00143 if (tracks == TRACK_BIT_CROSS || !TracksOverlap(tracks)) {
00144
00145
00146 mask = ~(TrackBits)((neighbour_tdb & (neighbour_tdb >> 8)) & TRACK_BIT_MASK);
00147
00148
00149 if (tracks != TRACK_BIT_CROSS && (mask & TRACK_BIT_MASK) == TRACK_BIT_MASK) mask = ~TrackdirBitsToTrackBits(neighbour_tdb);
00150 } else {
00151
00152 mask = ~TrackdirBitsToTrackBits(neighbour_tdb);
00153
00154 if ((tracks & mask) == TRACK_BIT_NONE) {
00155 if ((neighbour_tdb & TRACKDIR_BIT_X_NE) == 0 || (neighbour_tdb & TRACKDIR_BIT_X_SW) == 0) mask |= TRACK_BIT_X;
00156 if ((neighbour_tdb & TRACKDIR_BIT_Y_NW) == 0 || (neighbour_tdb & TRACKDIR_BIT_Y_SE) == 0) mask |= TRACK_BIT_Y;
00157
00158 if ((tracks & mask) == TRACK_BIT_NONE) mask = ~(TrackBits)((neighbour_tdb & (neighbour_tdb >> 8)) & TRACK_BIT_MASK);
00159 }
00160 }
00161
00162
00163 return (tracks & mask) != TRACK_BIT_NONE ? tracks & mask : tracks;
00164 }
00165
00169 static inline SpriteID GetWireBase(TileIndex tile, TileContext context = TCX_NORMAL)
00170 {
00171 const RailtypeInfo *rti = GetRailTypeInfo(GetRailType(tile));
00172 SpriteID wires = GetCustomRailSprite(rti, tile, RTSG_WIRES, context);
00173 return wires == 0 ? SPR_WIRE_BASE : wires;
00174 }
00175
00179 static inline SpriteID GetPylonBase(TileIndex tile, TileContext context = TCX_NORMAL)
00180 {
00181 const RailtypeInfo *rti = GetRailTypeInfo(GetRailType(tile));
00182 SpriteID pylons = GetCustomRailSprite(rti, tile, RTSG_PYLONS, context);
00183 return pylons == 0 ? SPR_PYLON_BASE : pylons;
00184 }
00185
00191 static void AdjustTileh(TileIndex tile, Slope *tileh)
00192 {
00193 if (IsTileType(tile, MP_TUNNELBRIDGE)) {
00194 if (IsTunnel(tile)) {
00195 *tileh = SLOPE_STEEP;
00196 } else if (*tileh != SLOPE_FLAT) {
00197 *tileh = SLOPE_FLAT;
00198 } else {
00199 *tileh = InclinedSlope(GetTunnelBridgeDirection(tile));
00200 }
00201 }
00202 }
00203
00211 static int GetPCPElevation(TileIndex tile, DiagDirection PCPpos)
00212 {
00213
00214
00215
00216
00217
00218
00219
00220
00221
00222
00223
00224
00225
00226
00227 int z = GetSlopePixelZ(TileX(tile) * TILE_SIZE + min(x_pcp_offsets[PCPpos], TILE_SIZE - 1), TileY(tile) * TILE_SIZE + min(y_pcp_offsets[PCPpos], TILE_SIZE - 1));
00228 return (z + 2) & ~3;
00229 }
00230
00238 void DrawCatenaryOnTunnel(const TileInfo *ti)
00239 {
00240
00241 static const int _tunnel_wire_BB[4][4] = {
00242 { 0, 1, 16, 15 },
00243 { 1, 0, 15, 16 },
00244 { 0, 1, 16, 15 },
00245 { 1, 0, 15, 16 },
00246 };
00247
00248 DiagDirection dir = GetTunnelBridgeDirection(ti->tile);
00249
00250 SpriteID wire_base = GetWireBase(ti->tile);
00251
00252 const SortableSpriteStruct *sss = &CatenarySpriteData_Tunnel[dir];
00253 const int *BB_data = _tunnel_wire_BB[dir];
00254 AddSortableSpriteToDraw(
00255 wire_base + sss->image_offset, PAL_NONE, ti->x + sss->x_offset, ti->y + sss->y_offset,
00256 BB_data[2] - sss->x_offset, BB_data[3] - sss->y_offset, BB_Z_SEPARATOR - sss->z_offset + 1,
00257 GetTilePixelZ(ti->tile) + sss->z_offset,
00258 IsTransparencySet(TO_CATENARY),
00259 BB_data[0] - sss->x_offset, BB_data[1] - sss->y_offset, BB_Z_SEPARATOR - sss->z_offset
00260 );
00261 }
00262
00267 static void DrawCatenaryRailway(const TileInfo *ti)
00268 {
00269
00270
00271
00272 TrackBits trackconfig[TS_END];
00273 TrackBits wireconfig[TS_END];
00274 bool isflat[TS_END];
00275
00276 Slope tileh[TS_END] = { ti->tileh, SLOPE_FLAT };
00277
00278
00279
00280 Corner halftile_corner = CORNER_INVALID;
00281 if (IsHalftileSlope(tileh[TS_HOME])) {
00282 halftile_corner = GetHalftileSlopeCorner(tileh[TS_HOME]);
00283 tileh[TS_HOME] = SLOPE_FLAT;
00284 }
00285
00286 TLG tlg = GetTLG(ti->tile);
00287 byte PCPstatus = 0;
00288 byte OverridePCP = 0;
00289 byte PPPpreferred[DIAGDIR_END];
00290 byte PPPallowed[DIAGDIR_END];
00291
00292
00293
00294
00295
00296
00297
00298 trackconfig[TS_HOME] = GetRailTrackBitsUniversal(ti->tile, &OverridePCP);
00299 wireconfig[TS_HOME] = MaskWireBits(ti->tile, trackconfig[TS_HOME]);
00300
00301 isflat[TS_HOME] = ((trackconfig[TS_HOME] & (TRACK_BIT_HORZ | TRACK_BIT_VERT)) != 0);
00302
00303 AdjustTileh(ti->tile, &tileh[TS_HOME]);
00304
00305 SpriteID pylon_normal = GetPylonBase(ti->tile);
00306 SpriteID pylon_halftile = (halftile_corner != CORNER_INVALID) ? GetPylonBase(ti->tile, TCX_UPPER_HALFTILE) : pylon_normal;
00307
00308 for (DiagDirection i = DIAGDIR_BEGIN; i < DIAGDIR_END; i++) {
00309 static const uint edge_corners[] = {
00310 1 << CORNER_N | 1 << CORNER_E,
00311 1 << CORNER_S | 1 << CORNER_E,
00312 1 << CORNER_S | 1 << CORNER_W,
00313 1 << CORNER_N | 1 << CORNER_W,
00314 };
00315 SpriteID pylon_base = (halftile_corner != CORNER_INVALID && HasBit(edge_corners[i], halftile_corner)) ? pylon_halftile : pylon_normal;
00316 TileIndex neighbour = ti->tile + TileOffsByDiagDir(i);
00317 int elevation = GetPCPElevation(ti->tile, i);
00318
00319
00320
00321 tileh[TS_NEIGHBOUR] = GetTileSlope(neighbour);
00322 trackconfig[TS_NEIGHBOUR] = GetRailTrackBitsUniversal(neighbour, NULL);
00323 wireconfig[TS_NEIGHBOUR] = MaskWireBits(neighbour, trackconfig[TS_NEIGHBOUR]);
00324 if (IsTunnelTile(neighbour) && i != GetTunnelBridgeDirection(neighbour)) wireconfig[TS_NEIGHBOUR] = trackconfig[TS_NEIGHBOUR] = TRACK_BIT_NONE;
00325
00326
00327
00328 if (elevation != GetPCPElevation(neighbour, ReverseDiagDir(i))) wireconfig[TS_NEIGHBOUR] = trackconfig[TS_NEIGHBOUR] = TRACK_BIT_NONE;
00329
00330 isflat[TS_NEIGHBOUR] = ((trackconfig[TS_NEIGHBOUR] & (TRACK_BIT_HORZ | TRACK_BIT_VERT)) != 0);
00331
00332 PPPpreferred[i] = 0xFF;
00333 PPPallowed[i] = AllowedPPPonPCP[i];
00334
00335
00336
00337 for (uint k = 0; k < NUM_TRACKS_AT_PCP; k++) {
00338
00339 if (TrackSourceTile[i][k] == TS_NEIGHBOUR &&
00340 IsBridgeTile(neighbour) &&
00341 GetTunnelBridgeDirection(neighbour) == ReverseDiagDir(i)) {
00342 continue;
00343 }
00344
00345
00346
00347 DiagDirection PCPpos = i;
00348 if (HasBit(wireconfig[TrackSourceTile[i][k]], TracksAtPCP[i][k])) {
00349
00350
00351 PCPpos = (TrackSourceTile[i][k] == TS_HOME) ? i : ReverseDiagDir(i);
00352 SetBit(PCPstatus, i);
00353 PPPpreferred[i] &= PreferredPPPofTrackAtPCP[TracksAtPCP[i][k]][PCPpos];
00354 }
00355
00356 if (HasBit(trackconfig[TrackSourceTile[i][k]], TracksAtPCP[i][k])) {
00357 PPPallowed[i] &= ~DisallowedPPPofTrackAtPCP[TracksAtPCP[i][k]][PCPpos];
00358 }
00359 }
00360
00361
00362 if (!HasBit(PCPstatus, i)) {
00363 PPPpreferred[i] = 0;
00364 PPPallowed[i] = 0;
00365 }
00366
00367 Foundation foundation = FOUNDATION_NONE;
00368
00369
00370 if (IsTileType(neighbour, MP_STATION) || IsTileType(neighbour, MP_ROAD)) tileh[TS_NEIGHBOUR] = SLOPE_FLAT;
00371
00372
00373 if (trackconfig[TS_NEIGHBOUR] != TRACK_BIT_NONE && IsTileType(neighbour, MP_RAILWAY) && HasCatenary(GetRailType(neighbour))) foundation = GetRailFoundation(tileh[TS_NEIGHBOUR], trackconfig[TS_NEIGHBOUR]);
00374 if (IsBridgeTile(neighbour)) {
00375 foundation = GetBridgeFoundation(tileh[TS_NEIGHBOUR], DiagDirToAxis(GetTunnelBridgeDirection(neighbour)));
00376 }
00377
00378 ApplyFoundationToSlope(foundation, &tileh[TS_NEIGHBOUR]);
00379
00380
00381
00382 if (IsHalftileSlope(tileh[TS_NEIGHBOUR])) tileh[TS_NEIGHBOUR] = SLOPE_FLAT;
00383
00384 AdjustTileh(neighbour, &tileh[TS_NEIGHBOUR]);
00385
00386
00387
00388
00389 if (tileh[TS_HOME] == tileh[TS_NEIGHBOUR] || (isflat[TS_HOME] && isflat[TS_NEIGHBOUR])) {
00390 for (uint k = 0; k < NUM_IGNORE_GROUPS; k++) {
00391 if (PPPpreferred[i] == IgnoredPCP[k][tlg][i]) ClrBit(PCPstatus, i);
00392 }
00393 }
00394
00395
00396
00397
00398
00399 if ((PPPallowed[i] & PPPpreferred[i]) != 0) PPPallowed[i] &= PPPpreferred[i];
00400
00401 if (MayHaveBridgeAbove(ti->tile) && IsBridgeAbove(ti->tile)) {
00402 Track bridgetrack = GetBridgeAxis(ti->tile) == AXIS_X ? TRACK_X : TRACK_Y;
00403 int height = GetBridgeHeight(GetNorthernBridgeEnd(ti->tile));
00404
00405 if ((height <= GetTileMaxZ(ti->tile) + 1) &&
00406 (i == PCPpositions[bridgetrack][0] || i == PCPpositions[bridgetrack][1])) {
00407 SetBit(OverridePCP, i);
00408 }
00409 }
00410
00411 if (PPPallowed[i] != 0 && HasBit(PCPstatus, i) && !HasBit(OverridePCP, i) &&
00412 (!IsRailStationTile(ti->tile) || CanStationTileHavePylons(ti->tile))) {
00413 for (Direction k = DIR_BEGIN; k < DIR_END; k++) {
00414 byte temp = PPPorder[i][GetTLG(ti->tile)][k];
00415
00416 if (HasBit(PPPallowed[i], temp)) {
00417 uint x = ti->x + x_pcp_offsets[i] + x_ppp_offsets[temp];
00418 uint y = ti->y + y_pcp_offsets[i] + y_ppp_offsets[temp];
00419
00420
00421 if (!HasBit(OwnedPPPonPCP[i], temp)) {
00422
00423 if (trackconfig[TS_NEIGHBOUR] != TRACK_BIT_NONE) break;
00424 continue;
00425 }
00426
00427 AddSortableSpriteToDraw(pylon_base + pylon_sprites[temp], PAL_NONE, x, y, 1, 1, BB_HEIGHT_UNDER_BRIDGE,
00428 elevation, IsTransparencySet(TO_CATENARY), -1, -1);
00429
00430 break;
00431 }
00432 }
00433 }
00434 }
00435
00436
00437 if (IsTunnelTile(ti->tile)) return;
00438
00439
00440 if (MayHaveBridgeAbove(ti->tile) && IsBridgeAbove(ti->tile) && !IsTransparencySet(TO_BRIDGES)) {
00441 int height = GetBridgeHeight(GetNorthernBridgeEnd(ti->tile));
00442
00443 if (height <= GetTileMaxZ(ti->tile) + 1) return;
00444 }
00445
00446
00447 if (IsRailStationTile(ti->tile) && !CanStationTileHaveWires(ti->tile)) return;
00448
00449 SpriteID wire_normal = GetWireBase(ti->tile);
00450 SpriteID wire_halftile = (halftile_corner != CORNER_INVALID) ? GetWireBase(ti->tile, TCX_UPPER_HALFTILE) : wire_normal;
00451 Track halftile_track;
00452 switch (halftile_corner) {
00453 case CORNER_W: halftile_track = TRACK_LEFT; break;
00454 case CORNER_S: halftile_track = TRACK_LOWER; break;
00455 case CORNER_E: halftile_track = TRACK_RIGHT; break;
00456 case CORNER_N: halftile_track = TRACK_UPPER; break;
00457 default: halftile_track = INVALID_TRACK; break;
00458 }
00459
00460
00461 Track t;
00462 FOR_EACH_SET_TRACK(t, wireconfig[TS_HOME]) {
00463 SpriteID wire_base = (t == halftile_track) ? wire_halftile : wire_normal;
00464 byte PCPconfig = HasBit(PCPstatus, PCPpositions[t][0]) +
00465 (HasBit(PCPstatus, PCPpositions[t][1]) << 1);
00466
00467 const SortableSpriteStruct *sss;
00468 int tileh_selector = !(tileh[TS_HOME] % 3) * tileh[TS_HOME] / 3;
00469
00470 assert(PCPconfig != 0);
00471 assert(!IsSteepSlope(tileh[TS_HOME]));
00472 sss = &CatenarySpriteData[Wires[tileh_selector][t][PCPconfig]];
00473
00474
00475
00476
00477
00478
00479 AddSortableSpriteToDraw(wire_base + sss->image_offset, PAL_NONE, ti->x + sss->x_offset, ti->y + sss->y_offset,
00480 sss->x_size, sss->y_size, sss->z_size, GetSlopePixelZ(ti->x + sss->x_offset, ti->y + sss->y_offset) + sss->z_offset,
00481 IsTransparencySet(TO_CATENARY));
00482 }
00483 }
00484
00492 void DrawCatenaryOnBridge(const TileInfo *ti)
00493 {
00494 TileIndex end = GetSouthernBridgeEnd(ti->tile);
00495 TileIndex start = GetOtherBridgeEnd(end);
00496
00497 uint length = GetTunnelBridgeLength(start, end);
00498 uint num = GetTunnelBridgeLength(ti->tile, start) + 1;
00499 uint height;
00500
00501 const SortableSpriteStruct *sss;
00502 Axis axis = GetBridgeAxis(ti->tile);
00503 TLG tlg = GetTLG(ti->tile);
00504
00505 CatenarySprite offset = (CatenarySprite)(axis == AXIS_X ? 0 : WIRE_Y_FLAT_BOTH - WIRE_X_FLAT_BOTH);
00506
00507 if ((length % 2) && num == length) {
00508
00509
00510 sss = &CatenarySpriteData[WIRE_X_FLAT_BOTH + offset];
00511 } else {
00512
00513 sss = &CatenarySpriteData[WIRE_X_FLAT_SW + (num % 2) + offset];
00514 }
00515
00516 height = GetBridgePixelHeight(end);
00517
00518 SpriteID wire_base = GetWireBase(end, TCX_ON_BRIDGE);
00519
00520 AddSortableSpriteToDraw(wire_base + sss->image_offset, PAL_NONE, ti->x + sss->x_offset, ti->y + sss->y_offset,
00521 sss->x_size, sss->y_size, sss->z_size, height + sss->z_offset,
00522 IsTransparencySet(TO_CATENARY)
00523 );
00524
00525 SpriteID pylon_base = GetPylonBase(end, TCX_ON_BRIDGE);
00526
00527
00528
00529 if (num % 2) {
00530 DiagDirection PCPpos = (axis == AXIS_X ? DIAGDIR_NE : DIAGDIR_NW);
00531 Direction PPPpos = (axis == AXIS_X ? DIR_NW : DIR_NE);
00532 if (HasBit(tlg, (axis == AXIS_X ? 0 : 1))) PPPpos = ReverseDir(PPPpos);
00533 uint x = ti->x + x_pcp_offsets[PCPpos] + x_ppp_offsets[PPPpos];
00534 uint y = ti->y + y_pcp_offsets[PCPpos] + y_ppp_offsets[PPPpos];
00535 AddSortableSpriteToDraw(pylon_base + pylon_sprites[PPPpos], PAL_NONE, x, y, 1, 1, BB_HEIGHT_UNDER_BRIDGE, height, IsTransparencySet(TO_CATENARY), -1, -1);
00536 }
00537
00538
00539 if (GetTunnelBridgeLength(ti->tile, start) + 1 == length) {
00540 DiagDirection PCPpos = (axis == AXIS_X ? DIAGDIR_SW : DIAGDIR_SE);
00541 Direction PPPpos = (axis == AXIS_X ? DIR_NW : DIR_NE);
00542 if (HasBit(tlg, (axis == AXIS_X ? 0 : 1))) PPPpos = ReverseDir(PPPpos);
00543 uint x = ti->x + x_pcp_offsets[PCPpos] + x_ppp_offsets[PPPpos];
00544 uint y = ti->y + y_pcp_offsets[PCPpos] + y_ppp_offsets[PPPpos];
00545 AddSortableSpriteToDraw(pylon_base + pylon_sprites[PPPpos], PAL_NONE, x, y, 1, 1, BB_HEIGHT_UNDER_BRIDGE, height, IsTransparencySet(TO_CATENARY), -1, -1);
00546 }
00547 }
00548
00554 void DrawCatenary(const TileInfo *ti)
00555 {
00556 switch (GetTileType(ti->tile)) {
00557 case MP_RAILWAY:
00558 if (IsRailDepot(ti->tile)) {
00559 const SortableSpriteStruct *sss = &CatenarySpriteData_Depot[GetRailDepotDirection(ti->tile)];
00560
00561 SpriteID wire_base = GetWireBase(ti->tile);
00562
00563
00564 AddSortableSpriteToDraw(
00565 wire_base + sss->image_offset, PAL_NONE, ti->x + sss->x_offset, ti->y + sss->y_offset,
00566 sss->x_size, sss->y_size, sss->z_size,
00567 GetTileMaxPixelZ(ti->tile) + sss->z_offset,
00568 IsTransparencySet(TO_CATENARY)
00569 );
00570 return;
00571 }
00572 break;
00573
00574 case MP_TUNNELBRIDGE:
00575 case MP_ROAD:
00576 case MP_STATION:
00577 break;
00578
00579 default: return;
00580 }
00581 DrawCatenaryRailway(ti);
00582 }
00583
00584 bool SettingsDisableElrail(int32 p1)
00585 {
00586 Company *c;
00587 Train *t;
00588 bool disable = (p1 != 0);
00589
00590
00591 const RailType old_railtype = disable ? RAILTYPE_ELECTRIC : RAILTYPE_RAIL;
00592 const RailType new_railtype = disable ? RAILTYPE_RAIL : RAILTYPE_ELECTRIC;
00593
00594
00595 Engine *e;
00596 FOR_ALL_ENGINES_OF_TYPE(e, VEH_TRAIN) {
00597 RailVehicleInfo *rv_info = &e->u.rail;
00598
00599 if (rv_info->engclass == 2 && rv_info->railtype == old_railtype) {
00600
00601 rv_info->railtype = new_railtype;
00602 }
00603 }
00604
00605
00606
00607 if (disable) {
00608 FOR_ALL_TRAINS(t) {
00609 if (t->railtype == RAILTYPE_ELECTRIC) {
00610
00611
00612 t->compatible_railtypes |= RAILTYPES_RAIL;
00613 t->railtype = RAILTYPE_RAIL;
00614 SetBit(t->flags, VRF_EL_ENGINE_ALLOWED_NORMAL_RAIL);
00615 }
00616 }
00617 }
00618
00619
00620 FOR_ALL_TRAINS(t) {
00621
00622 if (t->IsFrontEngine()) {
00623 t->ConsistChanged(true);
00624 }
00625 }
00626
00627 FOR_ALL_COMPANIES(c) c->avail_railtypes = GetCompanyRailtypes(c->index);
00628
00629
00630
00631
00632 ReinitGuiAfterToggleElrail(disable);
00633 return true;
00634 }