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

			ttd_strlcat(

   162

				(char*)_decode_parameters, " Transport", sizeof(_decode_parameters));

   163

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

   164

		}

   165

		MarkWholeScreenDirty();

   166

	} else {

   167

		DeleteName(str);

   168

	}

   169

   170

	return 0;

   171

}

   172

   173

// p1 = 0   decrease pause counter

   174

// p1 = 1   increase pause counter

   175

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

   176

{

   177

	if (flags & DC_EXEC) {

   178

		_pause += p1?1:-1;

   179

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

   180

		InvalidateWindow(WC_STATUS_BAR, 0);

   181

		InvalidateWindow(WC_MAIN_TOOLBAR, 0);

   182

	}

   183

	return 0;

   184

}

   185

   186

   187

   188

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

   189

{

   190

	return 0;

   191

}

   192

   193

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

   194

{

   195

	SET_EXPENSES_TYPE(EXPENSES_OTHER);

   196

	return (int32)p1;

   197

}

   198

   199

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

   200

{

   201

	SET_EXPENSES_TYPE(EXPENSES_OTHER);

   202

   203

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

   204

   205

	if (p1 == 0)

   206

		return CMD_ERROR;

   207

   208

	if (flags & DC_EXEC) {

   209

		// Add money to player

   210

		byte old_cp = _current_player;

   211

		_current_player = p2;

   212

		SubtractMoneyFromPlayer(-(int32)p1);

   213

		_current_player = old_cp;

   214

	}

   215

   216

	// Subtract money from local-player

   217

	return (int32)p1;

   218

}

   219

   220

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

   221

{

   222

	if (flags & DC_EXEC) {

   223

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

   224

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

   225

			_opt_mod_ptr->diff_level = 3;

   226

		} else {

   227

			_opt_mod_ptr->diff_level = p2;

   228

		}

   229

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

   230

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

   231

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

   232

		InvalidateWindow(WC_GAME_OPTIONS, 0);

   233

	}

   234

	return 0;

   235

}