1

     2

#include "stdafx.h"

     3

#include "ttd.h"

     4

#include "table/strings.h"

     5

#include "command.h"

     6

#include "player.h"

     7

#include "gfx.h"

     8

#include "window.h"

     9

#include "saveload.h"

    10

#include "economy.h"

    11

#include "network.h"

    12

    13

/* p1 = player

    14

   p2 = face

    15

 */

    16

    17

int32 CmdSetPlayerFace(int x, int y, uint32 flags, uint32 p1, uint32 p2)

    18

{

    19

	if (flags & DC_EXEC) {

    20

		DEREF_PLAYER(p1)->face = p2;

    21

		MarkWholeScreenDirty();

    22

	}

    23

	return 0;

    24

}

    25

    26

/* p1 = player

    27

 * p2 = color

    28

 */

    29

int32 CmdSetPlayerColor(int x, int y, uint32 flags, uint32 p1, uint32 p2)

    30

{

    31

	Player *p,*pp;

    32

    33

//	/* can only set color for itself */

    34

//	if ( (byte)p1 != _current_player)

    35

//		return CMD_ERROR;

    36

    37

	p = DEREF_PLAYER(p1);

    38

    39

	/* ensure no dups */

    40

	FOR_ALL_PLAYERS(pp) {

    41

		if (pp->is_active && pp != p && pp->player_color == (byte)p2)

    42

			return CMD_ERROR;

    43

	}

    44

    45

	if (flags & DC_EXEC) {

    46

		_player_colors[p1] = (byte)p2;

    47

		p->player_color = (byte)p2;

    48

		MarkWholeScreenDirty();

    49

	}

    50

	return 0;

    51

}

    52

    53

int32 CmdIncreaseLoan(int x, int y, uint32 flags, uint32 p1, uint32 p2)

    54

{

    55

	Player *p;

    56

	int32 size;

    57

    58

	if ( (byte)p1 != _current_player)

    59

		return CMD_ERROR;

    60

    61

	p = DEREF_PLAYER(p1);

    62

    63

	if (p->current_loan >= _economy.max_loan) {

    64

		SetDParam(0, _economy.max_loan);

    65

		return_cmd_error(STR_702B_MAXIMUM_PERMITTED_LOAN);

    66

	}

    67

    68

	if (flags & DC_EXEC) {

    69

		if (p2)

    70

			size = _economy.max_loan - p->current_loan;

    71

		else

    72

			size = IS_HUMAN_PLAYER((byte)p1) ? 10000 : 50000;

    73

    74

		p->money64 += size;

    75

		p->current_loan += size;

    76

		UpdatePlayerMoney32(p);

    77

		InvalidatePlayerWindows(p);

    78

	}

    79

    80

	return 0;

    81

}

    82

    83

int32 CmdDecreaseLoan(int x, int y, uint32 flags, uint32 p1, uint32 p2)

    84

{

    85

	Player *p;

    86

	int32 size;

    87

	if ( (byte)p1 != _current_player)

    88

		return CMD_ERROR;

    89

    90

	p = DEREF_PLAYER(p1);

    91

    92

	if (p->current_loan == 0)

    93

		return_cmd_error(STR_702D_LOAN_ALREADY_REPAYED);

    94

    95

	size = p->current_loan;

    96

    97

	// p2 is true while CTRL is pressed (repay all possible loan, or max money you have)

    98

	if (!p2) {

    99

	    if (_patches.ainew_active)

   100

 		    size = min(size, 10000);

   101

	    else

   102

		    size = min(size, IS_HUMAN_PLAYER((byte)p1) ? 10000 : 50000);

   103

	} else {	// only repay in chunks of 10K

   104

		size = min(size, p->player_money);

   105

		size = max(size, 10000);

   106

		size -= size % 10000;

   107

	}

   108

   109

	if (p->player_money < size) {

   110

		SetDParam(0, size);

   111

		return_cmd_error(STR_702E_REQUIRED);

   112

	}

   113

   114

	if (flags & DC_EXEC) {

   115

		p->money64 -= size;

   116

		p->current_loan -= size;

   117

		UpdatePlayerMoney32(p);

   118

		InvalidatePlayerWindows(p);

   119

	}

   120

	return 0;

   121

}

   122

   123

int32 CmdChangeCompanyName(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   124

{

   125

	StringID str,old_str;

   126

	Player *p;

   127

   128

	str = AllocateNameUnique((byte*)_decode_parameters, 4);

   129

	if (str == 0)

   130

		return CMD_ERROR;

   131

   132

	if (flags & DC_EXEC) {

   133

		p = DEREF_PLAYER(p1);

   134

		old_str = p->name_1;

   135

		p->name_1 = str;

   136

		DeleteName(old_str);

   137

		MarkWholeScreenDirty();

   138

	} else {

   139

		DeleteName(str);

   140

	}

   141

   142

	return 0;

   143

}

   144

   145

int32 CmdChangePresidentName(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   146

{

   147

	StringID str,old_str;

   148

	Player *p;

   149

   150

	str = AllocateNameUnique((byte*)_decode_parameters, 4);

   151

	if (str == 0)

   152

		return CMD_ERROR;

   153

   154

	if (flags & DC_EXEC) {

   155

		p = DEREF_PLAYER(p1);

   156

		old_str = p->president_name_1;

   157

		p->president_name_1 = str;

   158

		DeleteName(old_str);

   159

   160

		if (p->name_1 == STR_SV_UNNAMED) {

   161

			byte *s = " Transport";

   162

			byte *d = (byte*)_decode_parameters, b;

   163

			d--; do d++; while (*d);

   164

			do *d++ = b = *s++; while(d != (byte*)endof(_decode_parameters) && b != 0);

   165

			DoCommandByTile(0, p1, 0, DC_EXEC, CMD_CHANGE_COMPANY_NAME);

   166

		}

   167

		MarkWholeScreenDirty();

   168

	} else {

   169

		DeleteName(str);

   170

	}

   171

   172

	return 0;

   173

}

   174

   175

// p1 = 0   decrease pause counter

   176

// p1 = 1   increase pause counter

   177

int32 CmdPause(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   178

{

   179

	if (flags & DC_EXEC) {

   180

		_pause += p1?1:-1;

   181

		if(_pause==(byte)-1) _pause = 0;

   182

		InvalidateWindow(WC_STATUS_BAR, 0);

   183

		InvalidateWindow(WC_MAIN_TOOLBAR, 0);

   184

	}

   185

	return 0;

   186

}

   187

   188

   189

   190

int32 CmdResume(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   191

{

   192

	return 0;

   193

}

   194

   195

int32 CmdMoneyCheat(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   196

{

   197

	SET_EXPENSES_TYPE(EXPENSES_OTHER);

   198

	return (int32)p1;

   199

}

   200

   201

int32 CmdGiveMoney(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   202

{

   203

	SET_EXPENSES_TYPE(EXPENSES_OTHER);

   204

   205

	p1 = clamp(p1, 0, 0xFFFFFF); // Clamp between 16 million and 0

   206

   207

	if (p1 == 0)

   208

		return CMD_ERROR;

   209

   210

	if (flags & DC_EXEC) {

   211

		// Add money to player

   212

		byte old_cp = _current_player;

   213

		_current_player = p2;

   214

		SubtractMoneyFromPlayer(-(int32)p1);

   215

		_current_player = old_cp;

   216

	}

   217

   218

	// Subtract money from local-player

   219

	return (int32)p1;

   220

}

   221

   222

int32 CmdChangeDifficultyLevel(int x, int y, uint32 flags, uint32 p1, uint32 p2)

   223

{

   224

	if (flags & DC_EXEC) {

   225

		if (p1 != (uint32)-1L) {

   226

			((int*)&_opt_mod_ptr->diff)[p1] = p2;

   227

			_opt_mod_ptr->diff_level = 3;

   228

		} else {

   229

			_opt_mod_ptr->diff_level = p2;

   230

		}

   231

		// If we are a network-client, update the difficult setting (if it is open)

   232

		if (_networking && !_network_server && FindWindowById(WC_GAME_OPTIONS, 0) != NULL)

   233

			memcpy(&_opt_mod_temp, _opt_mod_ptr, sizeof(GameOptions));

   234

		InvalidateWindow(WC_GAME_OPTIONS, 0);

   235

	}

   236

	return 0;

   237

}