bygfoot/src/finance.c

296 lines
10 KiB
C
Raw Normal View History

2005-10-20 17:45:00 +02:00
/*
Bygfoot Football Manager -- a small and simple GTK2-based
football management game.
http://bygfoot.sourceforge.net
Copyright (C) 2005 Gyözö Both (gyboth@bygfoot.com)
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
2005-03-17 21:26:01 +01:00
#include "callbacks.h"
2005-03-16 21:48:25 +01:00
#include "finance.h"
2005-03-17 21:26:01 +01:00
#include "game_gui.h"
2005-03-16 21:48:25 +01:00
#include "maths.h"
#include "option.h"
#include "player.h"
2005-03-18 23:03:23 +01:00
#include "team.h"
2005-03-16 21:48:25 +01:00
#include "user.h"
/** Weekly update of finances. */
void
finance_update_user_weekly(User *user)
{
gint i;
Team *tm = user->tm;
2005-03-18 23:03:23 +01:00
Team *new_team = NULL;
2005-03-16 21:48:25 +01:00
gfloat physio_factor[4] =
{const_float("float_finance_physio_factor1"),
const_float("float_finance_physio_factor2"),
const_float("float_finance_physio_factor3"),
const_float("float_finance_physio_factor4")};
gfloat scout_factor[4] =
{const_float("float_finance_scout_factor1"),
const_float("float_finance_scout_factor2"),
const_float("float_finance_scout_factor3"),
const_float("float_finance_scout_factor4")};
2005-07-08 11:26:00 +02:00
gfloat yc_factor[4] =
{const_float("float_finance_yc_factor1"),
const_float("float_finance_yc_factor2"),
const_float("float_finance_yc_factor3"),
const_float("float_finance_yc_factor4")};
2005-03-16 21:48:25 +01:00
if(week % 2 == 1)
{
for(i=0;i<MON_OUT_END;i++)
{
user->money_out[0][i] = user->money_out[1][i];
user->money_out[1][i] = 0;
}
for(i=0;i<MON_IN_END;i++)
{
user->money_in[0][i] = user->money_in[1][i];
user->money_in[1][i] = 0;
}
}
2005-06-20 14:46:57 +02:00
user->money += user->sponsor.benefit;
user->money_in[1][MON_IN_SPONSOR] += user->sponsor.benefit;
user->sponsor.contract = MAX(user->sponsor.contract - 1, 0);
2005-07-08 11:26:00 +02:00
user->money -= (gint)rint((gfloat)user->sponsor.benefit *
(gfloat)user->youth_academy.percentage / 100);
user->money_out[1][MON_OUT_YA] -= (gint)rint((gfloat)user->sponsor.benefit *
(gfloat)user->youth_academy.percentage / 100);
2005-06-20 14:46:57 +02:00
if(user->counters[COUNT_USER_NEW_SPONSOR] > 1)
user->counters[COUNT_USER_NEW_SPONSOR]--;
else if(user->sponsor.contract == 4 &&
math_rnd(0, 1) < ((1 - const_float("float_sponsor_continue_prob")) /
(2 * (gfloat)const_int("int_user_success_offer_limit")) *
user->counters[COUNT_USER_SUCCESS]) +
(1 - (1 - const_float("float_sponsor_continue_prob")) / 2))
user->counters[COUNT_USER_NEW_SPONSOR] = -1;
else if(user->sponsor.contract == 0)
user->counters[COUNT_USER_NEW_SPONSOR] = 1;
2005-04-30 09:37:36 +02:00
if(query_team_plays(tm, week - 1, 1))
for(i=0;i<tm->players->len;i++)
2005-04-07 18:44:33 +02:00
{
2005-05-09 22:00:49 +02:00
user->money_out[1][MON_OUT_WAGE] -= g_array_index(tm->players, Player, i).wage;
user->money -= g_array_index(tm->players, Player, i).wage;
2005-04-30 09:37:36 +02:00
if(player_of_idx_team(tm, i)->health > 0)
{
user->money -= (gint)(finance_wage_unit(tm) * physio_factor[user->physio % 10]);
user->money_out[1][MON_OUT_PHYSIO] -=
(gint)(finance_wage_unit(tm) * physio_factor[user->physio % 10]);
}
2005-04-07 18:44:33 +02:00
}
2005-04-30 09:37:36 +02:00
2005-03-16 21:48:25 +01:00
user->money_out[1][MON_OUT_SCOUT] -= (gint)(finance_wage_unit(tm) * scout_factor[user->scout % 10]);
2005-04-07 18:44:33 +02:00
user->money -= (gint)(finance_wage_unit(tm) * scout_factor[user->scout % 10]);
2005-03-16 21:48:25 +01:00
2005-07-08 11:26:00 +02:00
if(user->youth_academy.players->len > 0)
{
user->money_out[1][MON_OUT_YC] -= (gint)(finance_wage_unit(tm) * yc_factor[user->youth_academy.coach % 10]);
user->money -= (gint)(finance_wage_unit(tm) * yc_factor[user->youth_academy.coach % 10]);
}
2005-03-17 21:26:01 +01:00
user->debt = (gint)rint((gfloat)user->debt * (1 + const_float("float_finance_interest")));
2005-03-16 21:48:25 +01:00
2005-03-19 21:04:08 +01:00
if(user->money < -finance_team_drawing_credit_loan(user->tm, FALSE) &&
2005-04-30 09:37:36 +02:00
user->counters[COUNT_USER_POSITIVE] == -1 && debug < 50)
2005-03-19 21:04:08 +01:00
{
user->counters[COUNT_USER_OVERDRAWN]++;
if(user->counters[COUNT_USER_OVERDRAWN] <=
const_int("int_finance_overdraw_limit"))
{
user_event_add(user, EVENT_TYPE_OVERDRAW,
user->counters[COUNT_USER_OVERDRAWN], -1, NULL, NULL);
user->counters[COUNT_USER_POSITIVE] =
const_int("int_finance_overdraw_positive");
}
}
else if(user->counters[COUNT_USER_POSITIVE] > -1)
user->counters[COUNT_USER_POSITIVE]--;
2005-03-17 21:26:01 +01:00
if(user->counters[COUNT_USER_LOAN] > -1)
user->counters[COUNT_USER_LOAN]--;
2005-03-19 21:04:08 +01:00
2005-04-30 09:37:36 +02:00
if(user->counters[COUNT_USER_LOAN] == 0 && debug < 50)
2005-03-19 21:04:08 +01:00
user_event_add(user, EVENT_TYPE_WARNING, -1, -1, NULL,
2005-03-18 23:03:23 +01:00
_("You have to pay back your loan this week."));
2005-04-30 09:37:36 +02:00
if(user->counters[COUNT_USER_POSITIVE] == 0 && debug < 50)
2005-03-19 21:04:08 +01:00
user_event_add(user, EVENT_TYPE_WARNING, -1, -1, NULL,
2005-04-16 09:46:04 +02:00
_("Your bank account has to be above your drawing credit limit next week."));
2005-03-19 21:04:08 +01:00
2005-04-30 09:37:36 +02:00
if(((user->counters[COUNT_USER_LOAN] == -1 && user->debt != 0) ||
2005-03-19 21:04:08 +01:00
(user->counters[COUNT_USER_POSITIVE] == -1 &&
2005-04-30 09:37:36 +02:00
user->money < -finance_team_drawing_credit_loan(user->tm, FALSE))) && debug < 50)
2005-03-18 23:03:23 +01:00
{
new_team = team_get_new(tm, TRUE);
user_event_add(user, EVENT_TYPE_FIRE_FINANCE, -1, -1, new_team, NULL);
2005-04-16 09:46:04 +02:00
user_history_add(user, USER_HISTORY_FIRE_FINANCES, tm->id,
new_team->id, new_team->clid, "");
2005-03-18 23:03:23 +01:00
}
2005-03-16 21:48:25 +01:00
}
/** Return a base value for team finances.
Scout wages etc. depend on this value. */
gfloat
finance_wage_unit(const Team *tm)
{
gint i;
gfloat sum = 0;
for(i=0;i<tm->players->len;i++)
2005-04-13 15:01:59 +02:00
sum += player_of_idx_team(tm, i)->wage;
2005-03-16 21:48:25 +01:00
return sum / (gfloat)tm->players->len;
}
/** Calculate the drawing credit or maximum loan of a team
based on player values and stadium data. */
gint
finance_team_drawing_credit_loan(const Team *tm, gboolean loan)
{
gint i;
gfloat sum = 0;
for(i=0;i<tm->players->len;i++)
2005-04-13 15:01:59 +02:00
sum += player_of_idx_team(tm, i)->value;
2005-03-16 21:48:25 +01:00
sum = (sum * const_float("float_finance_credit_player_value_weight")) +
2005-03-17 21:26:01 +01:00
((gfloat)tm->stadium.capacity *
powf(tm->stadium.safety, const_float("float_finance_credit_stadium_safety_exponent")) *
const_float("float_finance_credit_stadium_weight"));
2005-03-16 21:48:25 +01:00
sum *= (loan) ? const_float("float_finance_credit_factor_loan") :
const_float("float_finance_credit_factor_drawing");
return (gint)rint(sum);
}
2005-03-17 21:26:01 +01:00
/** Contract a loan for the current user.
@param value The amount of money. */
void
finance_get_loan(gint value)
{
2005-03-18 23:03:23 +01:00
current_user.money += value;
current_user.debt -= value;
2005-03-17 21:26:01 +01:00
2005-03-18 23:03:23 +01:00
current_user.counters[COUNT_USER_LOAN] = (current_user.counters[COUNT_USER_LOAN] == -1) ?
2005-03-17 21:26:01 +01:00
const_int("int_finance_payback_weeks") :
2005-03-18 23:03:23 +01:00
current_user.counters[COUNT_USER_LOAN];
2005-03-17 21:26:01 +01:00
2005-07-08 11:26:00 +02:00
game_gui_print_message(_("You have %d weeks to pay back your loan."),
current_user.counters[COUNT_USER_LOAN]);
2005-03-17 21:26:01 +01:00
on_menu_show_finances_activate(NULL, NULL);
}
/** Pay back some loan for the current user.
@param value The amount of money paid back. */
void
finance_pay_loan(gint value)
{
2005-03-18 23:03:23 +01:00
gint add = (gint)rint((gfloat)value / (gfloat)(-current_user.debt) *
2005-03-17 21:26:01 +01:00
(gfloat)const_int("int_finance_payback_weeks"));
2005-03-18 23:03:23 +01:00
current_user.money -= value;
current_user.debt += value;
2005-03-17 21:26:01 +01:00
2005-03-18 23:03:23 +01:00
if(current_user.debt == 0)
2005-03-17 21:26:01 +01:00
{
2005-03-18 23:03:23 +01:00
current_user.counters[COUNT_USER_LOAN] = -1;
2005-07-08 11:26:00 +02:00
game_gui_print_message(_("You are free from debt."));
2005-03-17 21:26:01 +01:00
}
else
{
2005-03-18 23:03:23 +01:00
current_user.counters[COUNT_USER_LOAN] =
MIN(current_user.counters[COUNT_USER_LOAN] + add,
2005-03-17 21:26:01 +01:00
const_int("int_finance_payback_weeks"));
2005-07-08 11:26:00 +02:00
game_gui_print_message(_("You have %d weeks to pay back the rest of your loan."),
current_user.counters[COUNT_USER_LOAN]);
2005-03-17 21:26:01 +01:00
}
on_menu_show_finances_activate(NULL, NULL);
}
/** Return the cost of a stadium improvement.
@param value The improvement value, either number of new seats
or safety increase.
@param capacity Whether seats are built or capacity increased. */
gint
finance_get_stadium_improvement_cost(gfloat value, gboolean capacity)
{
gfloat return_value;
if(capacity)
{
2005-03-18 23:03:23 +01:00
return_value = finance_wage_unit(current_user.tm) *
2005-03-17 21:26:01 +01:00
(value / (gfloat)const_int("int_stadium_improvement_base_seats"))*
const_float("float_stadium_improvement_wage_unit_factor_seats");
if(value - (gfloat)const_int("int_stadium_improvement_base_seats") >=
const_int("int_stadium_improvement_max_discount_seats"))
return_value *= (1 - const_float("float_stadium_improvement_max_discount"));
else
return_value *= (1 - const_float("float_stadium_improvement_max_discount") *
((value - (gfloat)const_int("int_stadium_improvement_base_seats")) /
(gfloat)const_int("int_stadium_improvement_max_discount_seats")));
}
else
{
2005-03-18 23:03:23 +01:00
return_value = finance_wage_unit(current_user.tm) *
2005-03-17 21:26:01 +01:00
(value / const_float("float_stadium_improvement_base_safety"))*
const_float("float_stadium_improvement_wage_unit_factor_safety");
if(value - const_float("float_stadium_improvement_base_safety") >=
const_float("float_stadium_improvement_max_discount_safety"))
return_value *= (1 - const_float("float_stadium_improvement_max_discount"));
else
return_value *= (1 - const_float("float_stadium_improvement_max_discount") *
((value - const_float("float_stadium_improvement_base_safety")) /
const_float("float_stadium_improvement_max_discount_safety")));
}
return (gint)rint(return_value);
}
/** Return the expected duration of a stadium improvement.
@param value The improvement value, either number of new seats
or safety increase.
@param capacity Whether seats are built or capacity increased. */
gint
finance_get_stadium_improvement_duration(gfloat value, gboolean capacity)
{
gint return_value;
if(capacity)
return_value = (gint)((value - 1) /
(gfloat)const_int("int_stadium_improvement_base_seats")) + 1;
else
return_value =
(gint)(((gint)rint(value * 100) - 1) /
(gint)rint(const_float("float_stadium_improvement_base_safety") * 100)) + 1;
return return_value;
}