1428 /** Retrieve the exit-tile of the vehicle from inside a tunnel

  1429  * Very similar to GetOtherTunnelEnd(), but we use the vehicle's

  1430  * direction for determining which end of the tunnel to find

  1431  * @param v the vehicle which is inside the tunnel and needs an exit

  1432  * @return the exit-tile of the tunnel based on the vehicle's direction */

  1433 TileIndex GetVehicleOutOfTunnelTile(const Vehicle *v)

  1434 {

  1435 	TileIndex tile = v->tile;

  1436 	DiagDirection dir = DirToDiagDir(v->direction);

  1437 	TileIndexDiff delta = TileOffsByDir(dir);

  1438 	byte z = v->z_pos;

  1439 

  1440 	dir = ReverseDiagDir(dir);

  1441 	while (

  1442 		!IsTunnelTile(tile) ||

  1443 		GetTunnelDirection(tile) != dir ||

  1444 		GetTileZ(tile) != z

  1445 	) {

  1446 		tile += delta;

  1447 	}

  1448 

  1449 	return tile;

  1450 }