InvestigateMyClickWinners/simulation.cpp at master · richelbilderbeek/InvestigateMyClickWinners · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
#include "simulation.h"

#include <algorithm>
#include <boost/date_time/gregorian/gregorian.hpp>

#include "bank.h"
#include "calendar.h"

ribi::imcw::simulation::simulation(
  const simulation_parameters& parameters
)
  : m_bank{},
    m_calendar(parameters.get_start()),
    m_company{},
    m_focal_person{parameters.get_focal_person()},
    m_others{parameters.get_others()},
    m_parameters{parameters},
    m_rng_engine(parameters.get_rng_seed())
{
  using boost::gregorian::days;

  std::uniform_int_distribution<int> random_day(0,363);

  //add others first (as these will chronologically go
  //before the focal customer
  std::for_each(
    std::begin(m_others),
    std::end(m_others),
    [this,&random_day](person& p)
    {
      m_company.buy_winner_package(
        p,
        winner_package_name::basic, //The most bought package
        p.get_balance(),
        m_bank,
        m_calendar.get_today() - days(random_day(m_rng_engine))

      );
    }
  );

  //focal_person buy his/her membership
  m_company.buy_winner_package(
    m_focal_person,
    m_focal_person.get_package(),
    m_focal_person.get_balance(),
    m_bank,
    m_calendar.get_today()
  );


}

void ribi::imcw::simulation::do_timestep() noexcept
{
  std::cout << "today: " << m_calendar.get_today() << std::endl;
  //Will customers buy a new ClickCard?
  if (m_focal_person.will_buy_click_card(m_calendar.get_today())) {
    m_focal_person.buy_click_card(m_bank,m_calendar,m_company);
  }
  for (auto& p: m_others) {
    if (p.will_buy_click_card(m_calendar.get_today())) {
      p.buy_click_card(m_bank,m_calendar,m_company);
    }
  }


  //Website
  if (m_calendar.transfer_profit_website_today()) {
    balance website_net_profit(
      "Monthly website profit",
      m_parameters.get_profit_website_per_month(
        m_calendar.get_today(),
        m_others.size() + 1
      )
    );
    m_company.transfer(website_net_profit,m_bank,m_calendar);
  }
  //Webshop
  if (m_calendar.transfer_profit_webshop_today()) {
    balance webshop_net_profit(
      "Yearly webshop profit",
      m_parameters.get_profit_webshop_per_year(
        m_calendar.get_today(),
        m_others.size() + 1
      )
    );
    m_company.transfer(webshop_net_profit,m_bank,m_calendar);
  }
  //Winners
  //No transfer, all Winner money is already on the undistributed balance

  //Distribute profit
  if (m_calendar.distribute_profit_today()) {
    std::cout << "***************************" << std::endl;
    std::cout << "Distributing profit" << std::endl;
    std::cout << "***************************" << std::endl;
    m_company.distribute_net_profit(
      m_bank,
      m_calendar
    );
    std::cout << m_company << std::endl;
    std::cout << "***************************" << std::endl;
  }

  //Make persons transfer money from BankWallet to personal
  //bank account
  if (m_focal_person.will_tranfer(m_calendar.get_today())) {
    m_focal_person.transfer(m_bank,m_calendar);
  }
  for (auto& p: m_others) {
    if (p.will_tranfer(m_calendar.get_today())) {
      p.transfer(m_bank,m_calendar);
    }
  }

  m_calendar.go_to_next_day();
}


std::string ribi::imcw::simulation::get_version() const noexcept
{
  return "0.4";
}

std::vector<std::string> ribi::imcw::simulation::get_version_history() const noexcept
{
  return {
    "2015-11-01: Version 0.1: initial version",
    "2015-11-10: Version 0.2: got simulation and visualization working",
    "2014-11-14: Version 0.3: correct behavior after ending membership",
    "2014-11-15: Version 0.4: start of compensation plan implementation"
  };
}

bool ribi::imcw::simulation::is_done() const noexcept
{
  return m_calendar.get_today() >= m_parameters.get_end();
}