1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "string.h"

     4

#include "table/strings.h"

     5

#include "command.h"

     6

#include "player.h"

     7

#include "gfx.h"

     8

#include "window.h"

     9

#include "gui.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) {

    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

    35

    36

	/* ensure no dups */

    37

	FOR_ALL_PLAYERS(pp) {

    38

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

    39

			return CMD_ERROR;

    40

	}

    41

    42

	if (flags & DC_EXEC) {

    44

		p->player_color = (byte)p2;

    45

		MarkWholeScreenDirty();

    46

	}

    47

	return 0;

    48

}

    49

    50

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

    51

{

    52

	Player *p;

    53

	int32 size;

    54

    56

    57

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

    58

		SetDParam(0, _economy.max_loan);

    59

		return_cmd_error(STR_702B_MAXIMUM_PERMITTED_LOAN);

    60

	}

    61

    62

	if (flags & DC_EXEC) {

    63

		if (p2)

    64

			size = _economy.max_loan - p->current_loan;

    65

		else

    67

    68

		p->money64 += size;

    69

		p->current_loan += size;

    70

		UpdatePlayerMoney32(p);

    71

		InvalidatePlayerWindows(p);

    72

	}

    73

    74

	return 0;

    75

}

    76

    77

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

    78

{

    79

	Player *p;

    80

	int32 size;

    81

    83

    84

	if (p->current_loan == 0)

    85

		return_cmd_error(STR_702D_LOAN_ALREADY_REPAYED);

    86

    87

	size = p->current_loan;

    88

    89

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

    90

	if (!p2) {

    91

	    if (_patches.ainew_active)

    92

 		    size = min(size, 10000);

    93

	    else

    95

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

    96

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

    97

		size = max(size, 10000);

    98

		size -= size % 10000;

    99

	}

   100

   101

	if (p->player_money < size) {

   102

		SetDParam(0, size);

   103

		return_cmd_error(STR_702E_REQUIRED);

   104

	}

   105

   106

	if (flags & DC_EXEC) {

   107

		p->money64 -= size;

   108

		p->current_loan -= size;

   109

		UpdatePlayerMoney32(p);

   110

		InvalidatePlayerWindows(p);

   111

	}

   112

	return 0;

   113

}

   114

   115

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

   116

{

   117

	StringID str,old_str;

   118

	Player *p;

   119

   120

	str = AllocateNameUnique((const char*)_decode_parameters, 4);

   121

	if (str == 0)

   122

		return CMD_ERROR;

   123

   124

	if (flags & DC_EXEC) {

   125

		p = DEREF_PLAYER(p1);

   126

		old_str = p->name_1;

   127

		p->name_1 = str;

   128

		DeleteName(old_str);

   129

		MarkWholeScreenDirty();

   130

	} else {

   131

		DeleteName(str);

   132

	}

   133

   134

	return 0;

   135

}

   136

   137

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

   138

{

   139

	StringID str,old_str;

   140

	Player *p;

   141

   142

	str = AllocateNameUnique((const char*)_decode_parameters, 4);

   143

	if (str == 0)

   144

		return CMD_ERROR;

   145

   146

	if (flags & DC_EXEC) {

   147

		p = DEREF_PLAYER(p1);

   148

		old_str = p->president_name_1;

   149

		p->president_name_1 = str;

   150

		DeleteName(old_str);

   151

   152

		if (p->name_1 == STR_SV_UNNAMED) {

   153

			ttd_strlcat(

   154

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

   155

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

   156

		}

   157

		MarkWholeScreenDirty();

   158

	} else {

   159

		DeleteName(str);

   160

	}

   161

   162

	return 0;

   163

}

   164

   165

// p1 = 0   decrease pause counter

   166

// p1 = 1   increase pause counter

   167

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

   168

{

   169

	if (flags & DC_EXEC) {

   170

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

   171

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

   172

		InvalidateWindow(WC_STATUS_BAR, 0);

   173

		InvalidateWindow(WC_MAIN_TOOLBAR, 0);

   174

	}

   175

	return 0;

   176

}

   177

   178

   179

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

   180

{

   181

	SET_EXPENSES_TYPE(EXPENSES_OTHER);

   182

	return (int32)p1;

   183

}

   184

   185

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

   186

{

   187

	SET_EXPENSES_TYPE(EXPENSES_OTHER);

   188

   189

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

   190

   191

	if (p1 == 0)

   192

		return CMD_ERROR;

   193

   194

	if (flags & DC_EXEC) {

   195

		// Add money to player

   196

		byte old_cp = _current_player;

   197

		_current_player = p2;

   198

		SubtractMoneyFromPlayer(-(int32)p1);

   199

		_current_player = old_cp;

   200

	}

   201

   202

	// Subtract money from local-player

   203

	return (int32)p1;

   204

}

   205

   206

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

   207

{

   208

	if (flags & DC_EXEC) {

   209

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

   210

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

   211

			_opt_ptr->diff_level = 3;

   212

		} else

   213

			_opt_ptr->diff_level = p2;

   214

   215

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

   216

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

   217

			ShowGameDifficulty();

   218

	}

   219

	return 0;

   220

}