Моделирование систем. Урок 3. Усовершенствуем программу моделирования (Chart)
Исходники к уроку можно скачать здесь.
Сегодня мы немного усовершенствуем программу моделирования системы "Хищник, жертва, растения". В частности, добавим график изменения численности хищников, травоядных и растений:
График мы будем строить через компонент Chart:
Вот как теперь будет программно выглядеть процесс симуляции:
|
private void btnSimul_Click(object sender, EventArgs e) {
_area = new Area(); _area.availabalArea = Convert.ToDouble(tbAvailabalArea.Text); _area.herbivore = new Herbivore(); _area.herbivore.count = Convert.ToInt32(tbHerbirove.Text); _area.herbivore.foodNeed = Convert.ToDouble(tbHerbiroveFood.Text); _area.herbivore.growthSpeed = Convert.ToDouble(tbHerbiroveSpeed.Text);
_area.plant = new Plant(); _area.plant.count = Convert.ToInt32(tbPlants.Text); ; _area.plant.countOnAreaUnit = Convert.ToDouble(tbCountOnAreaUnit.Text); _area.plant.growthSpeed = Convert.ToDouble(tbGrowthSpeed.Text);
_area.predator = new Predator(); _area.predator.count = Convert.ToInt32(tbPredators.Text); _area.predator.foodNeed = Convert.ToInt32(tbPredatorsFood.Text); _area.predator.growthSpeed = Convert.ToDouble(tbGrowthSpeedPred.Text);
chGraphic.Series.Clear(); chGraphic.Series.Add("Травоядные"); chGraphic.Series.Add("Растения"); chGraphic.Series.Add("Хищники"); chGraphic.Series[0].ChartType = SeriesChartType.Line; chGraphic.Series[0].BorderWidth = 3; chGraphic.Series[1].ChartType = SeriesChartType.Line; chGraphic.Series[1].BorderWidth = 3; chGraphic.Series[2].ChartType = SeriesChartType.Line; chGraphic.Series[2].BorderWidth = 3;
int cn = Convert.ToInt32(tbCount.Text);
for (int i = 1; i < cn; i++) { chGraphic.Series[0].Points.AddXY(i, _area.herbivore.count); chGraphic.Series[1].Points.AddXY(i, _area.plant.count); chGraphic.Series[2].Points.AddXY(i, _area.predator.count); _area.liveLoop(); } } |
Как я уже говорил на прошлом уроке, какие бы параметры мы не выставляли, все кончится тем, что хищники сожрут всех травоядных и сами помрут с голоду. А растения, которые теперь никто не ест, будут свободно размножаться, пока не займут все отведенную им площадь. Давайте попробуем использовать другие параметры:
Кстати, вы наверняка заметили, что данная модель очень далека от жизни: в реальности не бывает так, что растения, животные размножаются с постоянной скоростью, вне зависимости от численности популяции. Обычно бывает какой то естественный прирост в % от общего количества особей данного вида. С хищниками и травоядными у нас в модели это правило соблюдается. А с растениями нет. Вот и мы это и исрпавим в нашей модели, но это уже тема следующего урока.
Скриншоты, приведенные в данной статье, являются цитатами и иллюстрациями программного продукта "Microsoft Visual Studio 2010", авторское право на который принадлежит Microsoft.