(svn r1) Import of revision 975 of old (crashed) SVN

1 files changed, 678 insertions, 0 deletions

diff --git a/player_gui.c b/player_gui.c
new file mode 100644
index 000000000..b113afee6
--- /dev/null
+++ b/player_gui.c
@@ -0,0 +1,678 @@
+#include "stdafx.h"
+#include "ttd.h"
+
+#include "window.h"
+#include "gui.h"
+#include "viewport.h"
+#include "gfx.h"
+#include "player.h"
+#include "command.h"
+#include "vehicle.h"
+
+static void DoShowPlayerFinances(int player, bool small);
+
+
+static void DrawPlayerEconomyStats(Player *p, byte mode)
+{
+	int x,y,i,j,year;
+	int64 (*tbl)[13], sum,cost;
+	StringID str;
+
+	if (!(mode & 1)) {
+		/* draw categories */
+		DrawStringCenterUnderline(61, 15, STR_700F_EXPENDITURE_INCOME, 0);
+		for(i=0; i!=13; i++)
+			DrawString(2, 27 + i*10, STR_7011_CONSTRUCTION + i, 0);
+		DrawStringRightAligned(111, 27 + 10*13 + 2, STR_7020_TOTAL, 0);
+	
+		/* draw the price columns */
+		year = _cur_year - 2;
+		j = 3;
+		x = 215;
+		tbl = p->yearly_expenses + 2;
+		do {
+			if (year >= p->inaugurated_year) {
+				SET_DPARAM16(0, year + 1920);
+				DrawStringCenterUnderline(x-17, 15, STR_7010, 0);
+				sum = 0;
+				for(i=0; i!=13; i++) {
+					/* draw one row in the price column */
+					cost = (*tbl)[i];
+					if (cost != 0) {
+						sum += cost;
+						
+						str = STR_701E;
+						if (cost < 0) { cost = -cost; str++; }
+						SET_DPARAM64(0, cost);
+						DrawStringRightAligned(x, 27+i*10, str, 0);
+					}
+				}
+
+				str = STR_701E;
+				if (sum < 0) { sum = -sum; str++; }
+				SET_DPARAM64(0, sum);
+				DrawStringRightAligned(x, 27 + 13*10 + 2, str, 0);
+				
+				GfxFillRect(x - 75, 27 + 10*13, x, 27 + 10*13, 215);
+				x += 95;
+			}
+			year++;
+			tbl--;
+		} while (--j != 0);
+
+		y = 171;
+	} else {
+		y = 15;
+	}
+
+	DrawString(2, y, STR_7026_BANK_BALANCE, 0);
+	SET_DPARAM64(0, p->money64);
+	DrawStringRightAligned(182, y, STR_7028, 0);
+
+	y += 10;
+
+	DrawString(2, y, STR_7027_LOAN, 0);
+	SET_DPARAM64(0, p->current_loan);
+	DrawStringRightAligned(182, y, STR_7028, 0);
+
+	y += 12;
+
+	GfxFillRect(182 - 75, y-2, 182, y-2, 215);
+
+	SET_DPARAM64(0, p->money64 - p->current_loan);
+	DrawStringRightAligned(182, y, STR_7028, 0);
+}
+
+static const Widget _player_finances_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   392,     0,    13, STR_700E_FINANCES, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,   393,   406,     0,    13, 0x2AA, STR_7075_TOGGLE_LARGE_SMALL_WINDOW},
+{     WWT_IMGBTN,    14,     0,   406,    14,   169, 0x0, 0},
+{     WWT_IMGBTN,    14,     0,   406,   170,   203, 0x0, 0},
+{ WWT_PUSHTXTBTN,    14,     0,   202,   204,   215, STR_7029_BORROW, STR_7035_INCREASE_SIZE_OF_LOAN},
+{ WWT_PUSHTXTBTN,    14,   203,   406,   204,   215, STR_702A_REPAY, STR_7036_REPAY_PART_OF_LOAN},
+{      WWT_LAST},
+};
+
+static const Widget _other_player_finances_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   392,     0,    13, STR_700E_FINANCES, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,   393,   406,     0,    13, 0x2AA, STR_7075_TOGGLE_LARGE_SMALL_WINDOW},
+{     WWT_IMGBTN,    14,     0,   406,    14,   169, 0x0, 0},
+{     WWT_IMGBTN,    14,     0,   406,   170,   203, 0x0, 0},
+{      WWT_LAST},
+};
+
+static const Widget _other_player_finances_small_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   265,     0,    13, STR_700E_FINANCES, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,   266,   279,     0,    13, 0x2AA, STR_7075_TOGGLE_LARGE_SMALL_WINDOW},
+{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0},
+{     WWT_IMGBTN,    14,     0,   279,    14,    47, 0x0},
+{      WWT_LAST},
+};
+
+static const Widget _player_finances_small_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   265,     0,    13, STR_700E_FINANCES, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,   266,   279,     0,    13, 0x2AA, STR_7075_TOGGLE_LARGE_SMALL_WINDOW},
+{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0},
+{     WWT_IMGBTN,    14,     0,   279,    14,    47, 0x0},
+{ WWT_PUSHTXTBTN,    14,     0,   139,    48,    59, STR_7029_BORROW, STR_7035_INCREASE_SIZE_OF_LOAN},
+{ WWT_PUSHTXTBTN,    14,   140,   279,    48,    59, STR_702A_REPAY, STR_7036_REPAY_PART_OF_LOAN},
+{      WWT_LAST},
+};
+
+
+static void PlayerFinancesWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+		Player *p = DEREF_PLAYER(w->window_number);
+		
+		w->disabled_state = p->current_loan != 0 ? 0 : (1 << 6);
+
+		SET_DPARAM16(0, p->name_1);
+		SET_DPARAM32(1, p->name_2);
+		SET_DPARAM16(2, GetPlayerNameString((byte)w->window_number));
+		SET_DPARAM32(3, 10000);
+		DrawWindowWidgets(w);
+
+		DrawPlayerEconomyStats(p, (byte)WP(w,def_d).data_1);
+	} break;
+
+	case WE_CLICK:
+		switch(e->click.widget) {
+		case 2: {/* toggle size */
+			byte mode = (byte)WP(w,def_d).data_1;
+			int player = w->window_number;
+			DeleteWindow(w);
+			DoShowPlayerFinances(player, (mode & 1) == 0);
+		} break;
+
+		case 5: /* increase loan */
+			DoCommandP(0, w->window_number, _ctrl_pressed, NULL, CMD_INCREASE_LOAN | CMD_MSG(STR_702C_CAN_T_BORROW_ANY_MORE_MONEY));
+			break;
+
+		case 6: /* repay loan */
+			DoCommandP(0, w->window_number, _ctrl_pressed, NULL, CMD_DECREASE_LOAN | CMD_MSG(STR_702F_CAN_T_REPAY_LOAN));
+			break;
+		}
+		break;
+	}
+}
+
+static const WindowDesc _player_finances_desc = {
+	-1,-1, 407, 216,
+	WC_FINANCES,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_RESTORE_DPARAM | WDF_UNCLICK_BUTTONS,
+	_player_finances_widgets,
+	PlayerFinancesWndProc
+};
+
+static const WindowDesc _player_finances_small_desc = {
+	-1,-1, 280, 60,
+	WC_FINANCES,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_RESTORE_DPARAM | WDF_UNCLICK_BUTTONS,
+	_player_finances_small_widgets,
+	PlayerFinancesWndProc
+};
+
+static const WindowDesc _other_player_finances_desc = {
+	-1,-1, 407, 204,
+	WC_FINANCES,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_RESTORE_DPARAM | WDF_UNCLICK_BUTTONS,
+	_other_player_finances_widgets,
+	PlayerFinancesWndProc
+};
+
+static const WindowDesc _other_player_finances_small_desc = {
+	-1,-1, 280, 48,
+	WC_FINANCES,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_RESTORE_DPARAM | WDF_UNCLICK_BUTTONS,
+	_other_player_finances_small_widgets,
+	PlayerFinancesWndProc
+};
+
+static const WindowDesc * const desc_table[2*2] = {
+	&_player_finances_desc,&_player_finances_small_desc,
+	&_other_player_finances_desc,&_other_player_finances_small_desc,
+};
+
+static void DoShowPlayerFinances(int player, bool small)
+{
+	Window *w;
+	int mode;
+
+	mode = ((byte)player != _local_player)*2 + small;
+	w = AllocateWindowDescFront( desc_table[mode], player);
+	if (w) {
+		w->caption_color = w->window_number;
+		WP(w,def_d).data_1 = mode;
+	}
+}
+
+void ShowPlayerFinances(int player)
+{
+	DoShowPlayerFinances(player, false);
+}
+
+static void SelectPlayerColorWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+		Player *p;
+		uint used_colors = 0;
+		int num_free = 16;
+		int x,y,pos;
+		int i;
+
+		FOR_ALL_PLAYERS(p) {
+			if (p->is_active) {
+				SETBIT(used_colors, p->player_color);
+				num_free--;
+			}
+		}
+		WP(w,def_d).data_1 = used_colors;
+		SetVScrollCount(w, num_free);
+		DrawWindowWidgets(w);
+		
+		x = 2;
+		y = 17;
+		pos = w->vscroll.pos;
+
+		for(i=0; i!=16; i++) {
+			if (!(used_colors & 1) && --pos < 0 && pos >= -8) {
+				DrawString(x + 30, y, STR_00D1_DARK_BLUE + i, 2);
+				DrawSprite((i << 16) + 0x3078C1A, x + 14, y + 4);
+				y += 14;
+			}
+			used_colors >>= 1;
+		}
+	} break;
+		
+	case WE_CLICK:
+		if (e->click.widget == 2) {
+			int item = (e->click.pt.y - 13) / 14;
+			uint used_colors;
+			int i;
+
+			if ((uint)item >= 8)
+				return;
+			item += w->vscroll.pos;
+			used_colors = WP(w,def_d).data_1;
+			
+			for(i=0; i!=16; i++) {
+				if (!(used_colors & 1) && --item < 0) {
+					DoCommandP(0, w->window_number, i, NULL, CMD_SET_PLAYER_COLOR);
+					DeleteWindow(w);
+					break;
+				}
+				used_colors >>= 1;
+			}
+		}
+		break;
+	}
+}
+
+static const Widget _select_player_color_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5,STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   149,     0,    13, STR_7007_NEW_COLOR_SCHEME, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,     0,   138,    14,   127, 0x0, STR_7034_CLICK_ON_SELECTED_NEW_COLOR},
+{  WWT_SCROLLBAR,    14,   139,   149,    14,   127, 0x0, STR_0190_SCROLL_BAR_SCROLLS_LIST},
+{      WWT_LAST},
+};
+
+static const WindowDesc _select_player_color_desc = {
+	-1,-1, 150, 128,
+	WC_PLAYER_COLOR,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_select_player_color_widgets,
+	SelectPlayerColorWndProc
+};
+
+static void SelectPlayerFaceWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+		Player *p;
+		w->click_state = (w->click_state & ~(1<<5|1<<6)) | ((1<<5) << WP(w,facesel_d).gender);
+		DrawWindowWidgets(w);
+		p = DEREF_PLAYER(w->window_number);
+		DrawPlayerFace(WP(w,facesel_d).face, p->player_color, 2, 16);
+	} break;
+
+	case WE_CLICK:
+		switch(e->click.widget) {
+		case 3: DeleteWindow(w); break;
+		case 4: /* ok click */ 
+			DoCommandP(0, w->window_number, WP(w,facesel_d).face, NULL, CMD_SET_PLAYER_FACE);
+			DeleteWindow(w);
+			break;
+		case 5: /* male click */
+		case 6: /* female click */
+			WP(w,facesel_d).gender = e->click.widget - 5;
+			SetWindowDirty(w);
+			break;
+		case 7:
+			WP(w,facesel_d).face = (InteractiveRandom() & 0x7FFFFFFF) + (WP(w,facesel_d).gender << 31);
+			SetWindowDirty(w);
+			break;
+		}
+		break;
+	}
+}
+
+static const Widget _select_player_face_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   189,     0,    13, STR_7043_FACE_SELECTION, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,     0,   189,    14,   136, 0x0, 0},
+{ WWT_PUSHTXTBTN,    14,     0,    94,   137,   148, STR_012E_CANCEL, STR_7047_CANCEL_NEW_FACE_SELECTION},
+{ WWT_PUSHTXTBTN,    14,    95,   189,   137,   148, STR_012F_OK, STR_7048_ACCEPT_NEW_FACE_SELECTION},
+{    WWT_TEXTBTN,    14,    95,   187,    25,    36, STR_7044_MALE, STR_7049_SELECT_MALE_FACES},
+{    WWT_TEXTBTN,    14,    95,   187,    37,    48, STR_7045_FEMALE, STR_704A_SELECT_FEMALE_FACES},
+{ WWT_PUSHTXTBTN,    14,    95,   187,    79,    90, STR_7046_NEW_FACE, STR_704B_GENERATE_RANDOM_NEW_FACE},
+{      WWT_LAST},
+};
+
+static const WindowDesc _select_player_face_desc = {
+	-1,-1, 190, 149,
+	WC_PLAYER_FACE,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
+	_select_player_face_widgets,
+	SelectPlayerFaceWndProc
+};
+
+static const Widget _my_player_company_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   359,     0,    13, STR_7001, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,     0,   359,    14,   157, 0x0, 0},
+{ WWT_PUSHTXTBTN,    14,     0,    89,   158,   169, STR_7004_NEW_FACE, STR_7030_SELECT_NEW_FACE_FOR_PRESIDENT},
+{ WWT_PUSHTXTBTN,    14,    90,   179,   158,   169, STR_7005_COLOR_SCHEME, STR_7031_CHANGE_THE_COMPANY_VEHICLE},
+{ WWT_PUSHTXTBTN,    14,   180,   269,   158,   169, STR_7009_PRESIDENT_NAME, STR_7032_CHANGE_THE_PRESIDENT_S},
+{ WWT_PUSHTXTBTN,    14,   270,   359,   158,   169, STR_7008_COMPANY_NAME, STR_7033_CHANGE_THE_COMPANY_NAME},
+{ WWT_PUSHTXTBTN,    14,   266,   355,    18,    29, STR_706F_BUILD_HQ, STR_7070_BUILD_COMPANY_HEADQUARTERS},
+{      WWT_LAST},
+};
+
+static const Widget _other_player_company_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   359,     0,    13, STR_7001, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,     0,   359,    14,   157, 0x0, 0},
+{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0, 0},
+{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0, 0},
+{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0, 0},
+{      WWT_EMPTY,     0,     0,     0,     0,     0, 0x0, 0},
+{ WWT_PUSHTXTBTN,    14,   266,   355,    18,    29, STR_7072_VIEW_HQ, STR_7070_BUILD_COMPANY_HEADQUARTERS},
+{ WWT_PUSHTXTBTN,    14,     0,   179,   158,   169, STR_7077_BUY_25_SHARE_IN_COMPANY, STR_7079_BUY_25_SHARE_IN_THIS_COMPANY},
+{ WWT_PUSHTXTBTN,    14,   180,   359,   158,   169, STR_7078_SELL_25_SHARE_IN_COMPANY, STR_707A_SELL_25_SHARE_IN_THIS_COMPANY},
+{      WWT_LAST},
+};
+
+static const Widget _my_player_company_bh_widgets[] = {
+{    WWT_TEXTBTN,    14,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,    14,    11,   359,     0,    13, STR_7001, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,    14,     0,   359,    14,   157, 0x0, 0},
+{ WWT_PUSHTXTBTN,    14,     0,    89,   158,   169, STR_7004_NEW_FACE, STR_7030_SELECT_NEW_FACE_FOR_PRESIDENT},
+{ WWT_PUSHTXTBTN,    14,    90,   179,   158,   169, STR_7005_COLOR_SCHEME, STR_7031_CHANGE_THE_COMPANY_VEHICLE},
+{ WWT_PUSHTXTBTN,    14,   180,   269,   158,   169, STR_7009_PRESIDENT_NAME, STR_7032_CHANGE_THE_PRESIDENT_S},
+{ WWT_PUSHTXTBTN,    14,   270,   359,   158,   169, STR_7008_COMPANY_NAME, STR_7033_CHANGE_THE_COMPANY_NAME},
+{ WWT_PUSHTXTBTN,    14,   266,   355,    18,    29, STR_7072_VIEW_HQ, STR_7070_BUILD_COMPANY_HEADQUARTERS},
+{      WWT_LAST},
+};
+
+static void DrawPlayerVehiclesAmount(int player)
+{
+	const int x = 110;
+	int y = 72;
+	Vehicle *v;
+	uint train,road,air,ship;
+	
+	DrawString(x, y, STR_7039_VEHICLES, 0);
+
+	train = road = air = ship = 0;
+
+	FOR_ALL_VEHICLES(v) {
+		if (v->owner == player) {
+			if (v->type == VEH_Train) {
+				if (v->subtype == 0)
+					train++;
+			} else if (v->type == VEH_Road) {
+				road++;
+			} else if (v->type == VEH_Aircraft) {
+				if (v->subtype <= 2)
+					air++;
+			} else if (v->type == VEH_Ship) {
+				ship++;
+			}
+		}
+	}
+
+	if (train+road+air+ship == 0) {
+		DrawString(x+70, y, STR_7042_NONE, 0);
+	} else {
+		if (train != 0) {
+			SET_DPARAM16(0, train);
+			DrawString(x + 70, y, train==1 ? STR_703A_TRAIN : STR_703B_TRAINS, 0);
+			y += 10;
+		}
+
+		if (road != 0) {
+			SET_DPARAM16(0, road);
+			DrawString(x + 70, y, road==1 ? STR_703C_ROAD_VEHICLE : STR_703D_ROAD_VEHICLES, 0);
+			y += 10;
+		}
+
+		if (air != 0) {
+			SET_DPARAM16(0, air);
+			DrawString(x + 70, y, air==1 ? STR_703E_AIRCRAFT : STR_703F_AIRCRAFT, 0);
+			y += 10;
+		}
+
+		if (ship != 0) {
+			SET_DPARAM16(0, ship);
+			DrawString(x + 70, y, ship==1 ? STR_7040_SHIP : STR_7041_SHIPS, 0);
+		}
+	}
+}
+
+static int GetAmountOwnedBy(Player *p, byte owner)
+{
+	return (p->share_owners[0] == owner) + 
+				 (p->share_owners[1] == owner) + 
+				 (p->share_owners[2] == owner) + 
+				 (p->share_owners[3] == owner);
+}
+
+static void DrawCompanyOwnerText(Player *p)
+{
+	int num = -1;
+	Player *p2;
+	int amt;
+
+	FOR_ALL_PLAYERS(p2) {
+		if ((amt=GetAmountOwnedBy(p, p2->index)) != 0) {
+			num++;
+
+			SET_DPARAM16(num*3+0, amt*25);
+			SET_DPARAM16(num*3+1, p2->name_1);
+			SET_DPARAM32(num*3+2, p2->name_2);
+
+			if (num != 0)
+				break;
+		}
+	}
+
+	if (num >= 0)
+		DrawString(120, 124, STR_707D_OWNED_BY+num, 0);
+}
+
+static void PlayerCompanyWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+		Player *p = DEREF_PLAYER(w->window_number);
+		uint32 dis;
+
+		if (w->widget == _my_player_company_widgets &&
+				p->location_of_house != 0)
+					w->widget = _my_player_company_bh_widgets;
+	
+		SET_DPARAM16(0, p->name_1);
+		SET_DPARAM32(1, p->name_2);
+		SET_DPARAM16(2, GetPlayerNameString((byte)w->window_number));
+
+		dis = 0;
+		if (GetAmountOwnedBy(p, 0xFF) == 0) dis |= 1 << 8;
+		if (GetAmountOwnedBy(p, _local_player) == 0) dis |= 1 << 9;
+
+		w->disabled_state = dis;
+		DrawWindowWidgets(w);
+
+		SET_DPARAM16(0, p->inaugurated_year + 1920);
+		DrawString(110, 25, STR_7038_INAUGURATED, 0);
+
+		DrawPlayerVehiclesAmount(w->window_number);
+
+		DrawString(110,48, STR_7006_COLOR_SCHEME, 0);
+		DrawSprite((p->player_color<<16) + 0x3078C19, 215,49);
+
+		DrawPlayerFace(p->face, p->player_color, 2, 16);
+
+		SET_DPARAM16(0, p->president_name_1);
+		SET_DPARAM32(1, p->president_name_2);
+		DrawStringMultiCenter(48, 141, STR_7037_PRESIDENT, 94);
+
+		SET_DPARAM32(0, CalculateCompanyValue(p));
+		DrawString(110, 114, STR_7076_COMPANY_VALUE, 0);
+
+		DrawCompanyOwnerText(p);
+	} break;
+
+	case WE_CLICK:
+		switch(e->click.widget) {
+		case 3: { /* select face */
+			w = AllocateWindowDescFront(&_select_player_face_desc, w->window_number);
+			if (w) {
+				w->caption_color = w->window_number;
+				WP(w,facesel_d).face = DEREF_PLAYER(w->window_number)->face;
+				WP(w,facesel_d).gender = 0;
+			}
+		} break;
+
+		case 4: {/* change color */
+			w = AllocateWindowDescFront(&_select_player_color_desc,w->window_number);
+			if (w) {
+				w->caption_color = w->window_number;
+				w->vscroll.cap = 8;
+			}
+		} break;
+
+		case 5: {/* change president name */
+			Player *p = DEREF_PLAYER(w->window_number);
+			WP(w,def_d).byte_1 = 0;
+			SET_DPARAM32(0, p->president_name_2);
+			ShowQueryString(p->president_name_1, STR_700B_PRESIDENT_S_NAME, 31, 94, w->window_class, w->window_number);
+		} break;
+
+		case 6: {/* change company name */
+			Player *p = DEREF_PLAYER(w->window_number);
+			WP(w,def_d).byte_1 = 1;
+			SET_DPARAM32(0, p->name_2);
+			ShowQueryString(p->name_1, STR_700A_COMPANY_NAME, 31, 150, w->window_class, w->window_number);
+		} break;
+
+		case 7: {/* build hq */
+			TileIndex tile = DEREF_PLAYER(w->window_number)->location_of_house;
+			if (tile == 0) {
+				if ((byte)w->window_number != _local_player)
+					return;
+				SetObjectToPlaceWnd(0x2D0, 1, w);
+				SetTileSelectSize(2, 2);
+			} else {
+				ScrollMainWindowToTile(tile);
+			}	
+		} break;
+
+		case 8: /* buy 25% */
+			DoCommandP(0, w->window_number, 0, NULL, CMD_BUY_SHARE_IN_COMPANY | CMD_MSG(STR_707B_CAN_T_BUY_25_SHARE_IN_THIS));
+			break;
+
+		case 9: /* sell 25% */
+			DoCommandP(0, w->window_number, 0, NULL, CMD_SELL_SHARE_IN_COMPANY | CMD_MSG(STR_707C_CAN_T_SELL_25_SHARE_IN));
+			break;
+		}
+		break;
+
+	case WE_MOUSELOOP:
+		/* redraw the window every now and then */
+		if ((++w->vscroll.pos & 0x1F) == 0)
+			SetWindowDirty(w);
+		break;
+
+	case WE_PLACE_OBJ:
+		if (DoCommandP(e->place.tile, 0, 0, NULL, CMD_BUILD_COMPANY_HQ | CMD_AUTO | CMD_NO_WATER | CMD_MSG(STR_7071_CAN_T_BUILD_COMPANY_HEADQUARTERS)))
+			ResetObjectToPlace();
+		break;
+
+	case WE_DESTROY:
+		DeleteWindowById(WC_PLAYER_COLOR, w->window_number);
+		DeleteWindowById(WC_PLAYER_FACE, w->window_number);
+		break;
+
+	case WE_ON_EDIT_TEXT: {
+		byte *b = e->edittext.str;
+		if (*b == 0)
+			return;
+		memcpy(_decode_parameters, b, 32);
+		if (WP(w,def_d).byte_1) {
+			DoCommandP(0, w->window_number, 0, NULL, CMD_CHANGE_COMPANY_NAME | CMD_MSG(STR_700C_CAN_T_CHANGE_COMPANY_NAME));
+		} else {
+			DoCommandP(0, w->window_number, 0, NULL, CMD_CHANGE_PRESIDENT_NAME | CMD_MSG(STR_700D_CAN_T_CHANGE_PRESIDENT));
+		}
+	} break;
+
+	}
+}
+
+
+static const WindowDesc _my_player_company_desc = {
+	-1,-1, 360, 170,
+	WC_COMPANY,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
+	_my_player_company_widgets,
+	PlayerCompanyWndProc
+};
+
+static const WindowDesc _other_player_company_desc = {
+	-1,-1, 360, 170,
+	WC_COMPANY,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,
+	_other_player_company_widgets,
+	PlayerCompanyWndProc
+};
+
+void ShowPlayerCompany(int player)
+{
+	Window *w;
+	w = AllocateWindowDescFront((byte)player == _local_player ? &_my_player_company_desc : &_other_player_company_desc,  player);
+	if (w)
+		w->caption_color = w->window_number;
+}
+
+
+
+static void BuyCompanyWndProc(Window *w, WindowEvent *e)
+{
+	switch(e->event) {
+	case WE_PAINT: {
+		Player *p = DEREF_PLAYER(w->window_number);
+		SET_DPARAM16(0, p->name_1);
+		SET_DPARAM32(1, p->name_2);
+		DrawWindowWidgets(w);
+
+		DrawPlayerFace(p->face, p->player_color, 2, 16);
+
+		SET_DPARAM16(0, p->name_1);
+		SET_DPARAM32(1, p->name_2);
+		SET_DPARAM32(2, p->bankrupt_value);
+		DrawStringMultiCenter(214, 65, STR_705B_WE_ARE_LOOKING_FOR_A_TRANSPORT, 238);
+		break;
+	}
+
+	case WE_CLICK:
+		switch(e->click.widget) {
+		case 3:
+			DeleteWindow(w);
+			break;
+		case 4: {
+			DoCommandP(0, w->window_number, 0, NULL, CMD_BUY_COMPANY | CMD_MSG(STR_7060_CAN_T_BUY_COMPANY));
+			break;
+		}
+		}
+		break;
+	}
+}
+
+static const Widget _buy_company_widgets[] = {
+{    WWT_TEXTBTN,     5,     0,    10,     0,    13, STR_00C5, STR_018B_CLOSE_WINDOW},
+{    WWT_CAPTION,     5,    11,   333,     0,    13, STR_00B3_MESSAGE_FROM, STR_018C_WINDOW_TITLE_DRAG_THIS},
+{     WWT_IMGBTN,     5,     0,   333,    14,   136, 0x0},
+{    WWT_TEXTBTN,     5,   148,   207,   117,   128, STR_00C9_NO},
+{    WWT_TEXTBTN,     5,   218,   277,   117,   128, STR_00C8_YES},
+{      WWT_LAST},
+};
+
+static const WindowDesc _buy_company_desc = {
+	153,171, 334, 137,
+	WC_BUY_COMPANY,0,
+	WDF_STD_TOOLTIPS | WDF_STD_BTN | WDF_DEF_WIDGET,
+	_buy_company_widgets,
+	BuyCompanyWndProc
+};
+
+
+void ShowBuyCompanyDialog(uint player)
+{
+	AllocateWindowDescFront(&_buy_company_desc, player);
+}