1

     2

#include "stdafx.h"

     3

#include "ttd.h"

     5

#include "table/strings.h"

     6

#include "command.h"

     7

#include "player.h"

     8

#include "gfx.h"

     9

#include "window.h"

    10

#include "saveload.h"

    11

#include "economy.h"

    12

#include "network.h"

    13

    14

/* p1 = player

    15

   p2 = face

    16

 */

    17

    18

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

    19

{

    20

	if (flags & DC_EXEC) {

    21

		DEREF_PLAYER(p1)->face = p2;

    22

		MarkWholeScreenDirty();

    23

	}

    24

	return 0;

    25

}

    26

    27

/* p1 = player

    28

 * p2 = color

    29

 */

    30

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

    31

{

    32

	Player *p,*pp;

    33

    34

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

    35

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

    36

//		return CMD_ERROR;

    37

    38

	p = DEREF_PLAYER(p1);

    39

    40

	/* ensure no dups */

    41

	FOR_ALL_PLAYERS(pp) {

    42

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

    43

			return CMD_ERROR;

    44

	}

    45

    46

	if (flags & DC_EXEC) {

    47

		_player_colors[p1] = (byte)p2;

    48

		p->player_color = (byte)p2;

    49

		MarkWholeScreenDirty();

    50

	}

    51

	return 0;

    52

}

    53

    54

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

    55

{

    56

	Player *p;

    57

	int32 size;

    58

    59

	if ( (byte)p1 != _current_player)

    60

		return CMD_ERROR;

    61

    62

	p = DEREF_PLAYER(p1);

    63

    64

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

    65

		SetDParam(0, _economy.max_loan);

    66

		return_cmd_error(STR_702B_MAXIMUM_PERMITTED_LOAN);

    67

	}

    68

    69

	if (flags & DC_EXEC) {

    70

		if (p2)

    71

			size = _economy.max_loan - p->current_loan;

    72

		else

    73

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

    74

    75

		p->money64 += size;

    76

		p->current_loan += size;

    77

		UpdatePlayerMoney32(p);

    78

		InvalidatePlayerWindows(p);

    79

	}

    80

    81

	return 0;

    82

}

    83

    84

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

    85

{

    86

	Player *p;

    87

	int32 size;

    88

	if ( (byte)p1 != _current_player)

    89

		return CMD_ERROR;

    90

    91

	p = DEREF_PLAYER(p1);

    92

    93

	if (p->current_loan == 0)

    94

		return_cmd_error(STR_702D_LOAN_ALREADY_REPAYED);

    95

    96

	size = p->current_loan;

    97

    98

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

    99

	if (!p2) {

   100

	    if (_patches.ainew_active)

   101

 		    size = min(size, 10000);

   102

	    else

   103

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

   104

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

   105

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

   106

		size = max(size, 10000);

   107

		size -= size % 10000;

   108

	}

   109

   110

	if (p->player_money < size) {

   111

		SetDParam(0, size);

   112

		return_cmd_error(STR_702E_REQUIRED);

   113

	}

   114

   115

	if (flags & DC_EXEC) {

   116

		p->money64 -= size;

   117

		p->current_loan -= size;

   118

		UpdatePlayerMoney32(p);

   119

		InvalidatePlayerWindows(p);

   120

	}

   121

	return 0;

   122

}

   123

   124

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

   125

{

   126

	StringID str,old_str;

   127

	Player *p;

   128

   129

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

   130

	if (str == 0)

   131

		return CMD_ERROR;

   132

   133

	if (flags & DC_EXEC) {

   134

		p = DEREF_PLAYER(p1);

   135

		old_str = p->name_1;

   136

		p->name_1 = str;

   137

		DeleteName(old_str);

   138

		MarkWholeScreenDirty();

   139

	} else {

   140

		DeleteName(str);

   141

	}

   142

   143

	return 0;

   144

}

   145

   146

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

   147

{

   148

	StringID str,old_str;

   149

	Player *p;

   150

   151

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

   152

	if (str == 0)

   153

		return CMD_ERROR;

   154

   155

	if (flags & DC_EXEC) {

   156

		p = DEREF_PLAYER(p1);

   157

		old_str = p->president_name_1;

   158

		p->president_name_1 = str;

   159

		DeleteName(old_str);

   160

   161

		if (p->name_1 == STR_SV_UNNAMED) {

   162

			ttd_strlcat(

   163

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

   164

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

   165

		}

   166

		MarkWholeScreenDirty();

   167

	} else {

   168

		DeleteName(str);

   169

	}

   170

   171

	return 0;

   172

}

   173

   174

// p1 = 0   decrease pause counter

   175

// p1 = 1   increase pause counter

   176

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

   177

{

   178

	if (flags & DC_EXEC) {

   179

		_pause += (p1 == 1) ? 1 : -1;

   180

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

   181

		InvalidateWindow(WC_STATUS_BAR, 0);

   182

		InvalidateWindow(WC_MAIN_TOOLBAR, 0);

   183

	}

   184

	return 0;

   185

}

   186

   187

   188

   189

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

   190

{

   191

	return 0;

   192

}

   193

   194

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

   195

{

   196

	SET_EXPENSES_TYPE(EXPENSES_OTHER);

   197

	return (int32)p1;

   198

}

   199

   200

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

   201

{

   202

	SET_EXPENSES_TYPE(EXPENSES_OTHER);

   203

   204

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

   205

   206

	if (p1 == 0)

   207

		return CMD_ERROR;

   208

   209

	if (flags & DC_EXEC) {

   210

		// Add money to player

   211

		byte old_cp = _current_player;

   212

		_current_player = p2;

   213

		SubtractMoneyFromPlayer(-(int32)p1);

   214

		_current_player = old_cp;

   215

	}

   216

   217

	// Subtract money from local-player

   218

	return (int32)p1;

   219

}

   220

   221

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

   222

{

   223

	if (flags & DC_EXEC) {

   224

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

   225

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

   226

			_opt_mod_ptr->diff_level = 3;

   227

		} else {

   228

			_opt_mod_ptr->diff_level = p2;

   229

		}

   230

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

   231

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

   232

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

   233

		InvalidateWindow(WC_GAME_OPTIONS, 0);

   234

	}

   235

	return 0;

   236

}