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