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