1

/* $Id$ */

     2

     3

/** @file articulated_vehicles.cpp */

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "articulated_vehicles.h"

     8

#include "engine.h"

     9

#include "train.h"

    10

#include "roadveh.h"

    11

#include "newgrf_callbacks.h"

    12

#include "newgrf_engine.h"

    13

#include "vehicle_func.h"

    14

    15

    16

uint CountArticulatedParts(EngineID engine_type, bool purchase_window)

    17

{

    18

	if (!HasBit(EngInfo(engine_type)->callbackmask, CBM_VEHICLE_ARTIC_ENGINE)) return 0;

    19

    20

	Vehicle *v = NULL;;

    21

	if (!purchase_window) {

    22

		v = new InvalidVehicle();

    23

		v->engine_type = engine_type;

    24

	}

    25

    26

	uint i;

    27

	for (i = 1; i < MAX_UVALUE(EngineID); i++) {

    28

		uint16 callback = GetVehicleCallback(CBID_VEHICLE_ARTIC_ENGINE, i, 0, engine_type, v);

    29

		if (callback == CALLBACK_FAILED || GB(callback, 0, 8) == 0xFF) break;

    30

	}

    31

    32

	delete v;

    33

    34

	return i - 1;

    35

}

    36

    37

    38

uint16 *GetCapacityOfArticulatedParts(EngineID engine, VehicleType type)

    39

{

    40

	static uint16 capacity[NUM_CARGO];

    41

	memset(capacity, 0, sizeof(capacity));

    42

    43

	if (type == VEH_TRAIN) {

    44

		const RailVehicleInfo *rvi = RailVehInfo(engine);

    45

		capacity[rvi->cargo_type] = rvi->capacity;

    46

		if (rvi->railveh_type == RAILVEH_MULTIHEAD) capacity[rvi->cargo_type] += rvi->capacity;

    47

	} else if (type == VEH_ROAD) {

    48

		const RoadVehicleInfo *rvi = RoadVehInfo(engine);

    49

		capacity[rvi->cargo_type] = rvi->capacity;

    50

	}

    51

    52

	if (!HasBit(EngInfo(engine)->callbackmask, CBM_VEHICLE_ARTIC_ENGINE)) return capacity;

    53

    54

	for (uint i = 1; i < MAX_UVALUE(EngineID); i++) {

    55

		uint16 callback = GetVehicleCallback(CBID_VEHICLE_ARTIC_ENGINE, i, 0, engine, NULL);

    56

		if (callback == CALLBACK_FAILED || GB(callback, 0, 8) == 0xFF) break;

    57

    58

		EngineID artic_engine = GetFirstEngineOfType(type) + GB(callback, 0, 7);

    59

    60

		if (type == VEH_TRAIN) {

    61

			const RailVehicleInfo *rvi = RailVehInfo(artic_engine);

    62

			capacity[rvi->cargo_type] += GetEngineProperty(artic_engine, 0x14, rvi->capacity);

    63

		} else if (type == VEH_ROAD) {

    64

			const RoadVehicleInfo *rvi = RoadVehInfo(artic_engine);

    65

			capacity[rvi->cargo_type] += GetEngineProperty(artic_engine, 0x0F, rvi->capacity);

    66

		}

    67

	}

    68

    69

	return capacity;

    70

}

    71

    72

    73

void AddArticulatedParts(Vehicle **vl, VehicleType type)

    74

{

    75

	const Vehicle *v = vl[0];

    76

	Vehicle *u = vl[0];

    77

    78

	if (!HasBit(EngInfo(v->engine_type)->callbackmask, CBM_VEHICLE_ARTIC_ENGINE)) return;

    79

    80

	for (uint i = 1; i < MAX_UVALUE(EngineID); i++) {

    81

		uint16 callback = GetVehicleCallback(CBID_VEHICLE_ARTIC_ENGINE, i, 0, v->engine_type, v);

    82

		if (callback == CALLBACK_FAILED || GB(callback, 0, 8) == 0xFF) return;

    83

    84

		/* Attempt to use pre-allocated vehicles until they run out. This can happen

    85

		 * if the callback returns different values depending on the cargo type. */

    86

		u->SetNext(vl[i]);

    87

		if (u->Next() == NULL) return;

    88

    89

		Vehicle *previous = u;

    90

		u = u->Next();

    91

    92

		EngineID engine_type = GetFirstEngineOfType(type) + GB(callback, 0, 7);

    93

		bool flip_image = HasBit(callback, 7);

    94

    95

		/* get common values from first engine */

    96

		u->direction = v->direction;

    97

		u->owner = v->owner;

    98

		u->tile = v->tile;

    99

		u->x_pos = v->x_pos;

   100

		u->y_pos = v->y_pos;

   101

		u->z_pos = v->z_pos;

   102

		u->build_year = v->build_year;

   103

		u->vehstatus = v->vehstatus & ~VS_STOPPED;

   104

   105

		u->cargo_subtype = 0;

   106

		u->max_speed = 0;

   107

		u->max_age = 0;

   108

		u->engine_type = engine_type;

   109

		u->value = 0;

   110

		u->subtype = 0;

   111

		u->cur_image = 0xAC2;

   112

		u->random_bits = VehicleRandomBits();

   113

   114

		switch (type) {

   115

			default: NOT_REACHED();

   116

   117

			case VEH_TRAIN: {

   118

				const RailVehicleInfo *rvi_artic = RailVehInfo(engine_type);

   119

   120

				u = new (u) Train();

   121

				previous->SetNext(u);

   122

				u->u.rail.track = v->u.rail.track;

   123

				u->u.rail.railtype = v->u.rail.railtype;

   124

				u->u.rail.first_engine = v->engine_type;

   125

   126

				u->spritenum = rvi_artic->image_index;

   127

				u->cargo_type = rvi_artic->cargo_type;

   128

				u->cargo_cap = rvi_artic->capacity;

   129

   130

				SetArticulatedPart(u);

   131

			} break;

   132

   133

			case VEH_ROAD: {

   134

				const RoadVehicleInfo *rvi_artic = RoadVehInfo(engine_type);

   135

   136

				u = new (u) RoadVehicle();

   137

				previous->SetNext(u);

   138

				u->u.road.first_engine = v->engine_type;

   139

				u->u.road.cached_veh_length = GetRoadVehLength(u);

   140

				u->u.road.state = RVSB_IN_DEPOT;

   141

   142

				u->u.road.roadtype = v->u.road.roadtype;

   143

				u->u.road.compatible_roadtypes = v->u.road.compatible_roadtypes;

   144

   145

				u->spritenum = rvi_artic->image_index;

   146

				u->cargo_type = rvi_artic->cargo_type;

   147

				u->cargo_cap = rvi_artic->capacity;

   148

   149

				SetRoadVehArticPart(u);

   150

			} break;

   151

		}

   152

   153

		if (flip_image) u->spritenum++;

   154

   155

		VehiclePositionChanged(u);

   156

	}

   157

}