t=new Font ( Verdana raquo ;, 4, FontStyle.Bold) ;. ColumnHeadersDefaultCellStyle=columnHeaderStyle;
//Установка ширини стовпців в dataGridView1.Columns [0] .Width=50; .Columns [1] .Width=100; .Columns [2] .Width=50; .Columns [3].Width=50; .Columns [4] .Width=50; .Columns [5] .Width=50; .Columns [6] .Width=50; .Columns [7] .Width=50; .Columns [8].Width=50; .Columns [9] .Width=50; .Columns [10] .Width=50; .Columns [11] .Width=50; .Columns [12] .Width=50; .Columns [13].Width=50; .Columns [14] .Width=50; .Columns [15] .Width=50; .Columns [16] .Width=50; .Columns [17] .Width=50; .Columns [0].Name= Мод час raquo ;;. Columns [1] .Name= T пост raquo ;;. Columns [2] .Name= ОчерK1 raquo ;;. Columns [3] .Name= КаналK1 raquo ;;. Columns [4] .Name= T обрK1 raquo ;;. Columns [5] .Name= T освK1 raquo ;;. Columns [6] .Name= ОчерEVM1 raquo ;;. Columns [7] .Name= КаналEVM1 raquo ;;. Columns [8] .Name= T освEVM1 raquo ;;. Columns [9] .Name= ОчерEVM2 raquo ;;. Columns [10] .Name= КаналEVM2 raquo ;;. Columns [11] .Name = T освEVM2 raquo ;;. Columns [12] .Name= ОчерEVM3 raquo ;;. Columns [13] .Name= КаналEVM3 raquo ;;. Columns [14] .Name= T освEVM3 raquo ;;. Columns [ 15] .Name= T обр raquo ;;. Columns [16] .Name= N raquo ;;. Columns [17] .Name= Кіл відмов raquo ;;
//час надходження заявок tgen1 + -tgen2.tgen1=10;//Convert.ToInt32 (textBox1.Text) ;. tgen2=5;//Convert.ToInt32 (textBox2.Text);
//час обробки заявки t1evm1 + -t2evm1.t1K1=10;//Convert.ToInt32 (textBox3.Text) ;. t2K1=3;// Convert.ToInt32 (textBox4.Text) ;. t2EVM123=33;
//кількість надійшли заявок.tend=500;//Convert.ToInt32 (textBox5.Text);
system.Init ();//ініціалізація сістеми.Synhronise ();//синхронізація події
//відкриваємо цикл до тих пір, поки не настане заданий час моделювання (system.Tranzakt_Value lt; system.tend)//доти, поки кількість заявок, що надійшли не перевищить 1000
{
//вибираємо тип події (system.next_event_type)
{0: .GoIn ();//надходження заявки; 1:
system.GoOut ();//видалення заявки;
case 2: .GoOut ();//видалення заявки; 3: .GoOut ();//видалення заявки;
}
//system.Tabl1 () необхідна для виведення даних в таблицю
system.Tabl1 (out queueSizeK1, out queueSizeEVM1, out queueSizeEVM2, out queueSizeEVM3, FreeK1, out FreeEVM1, out FreeEVM2, out FreeEVM3, out kol_Otkazov, out timeObrVK1, out timeReleaseK1, timeReleaseEVM1, out timeReleaseEVM2, out timeReleaseEVM3, out t2EVM123, out timePostZ); [0, j] .Value=system.Sim_Time; [1, j] .Value=timePostZ; [2, j] .Value=queueSizeK1; [3, j] .Value=FreeK1 ; [4, j] .Value=timeObrVK1; [5, j] .Value=timeReleaseK1; [6, j] .Value=queueSizeEVM1; [7, j] .Value=FreeEVM1; [8, j] .Value=timeReleaseEVM1 ; [9, j] .Value=queueSizeEVM2; [10, j] .Value=FreeEVM2; [11, j] .Value=timeReleaseEVM2; [12, j] .Value=queueSizeEVM3; [13, j] .Value=FreeEVM3 ; [14, j] .Value=timeReleaseEVM3; [15, j] .Value=t2EVM123; [16, j] .Value=system.Tranzakt_Process; [17, j] .Value=kol_Otkazov;
j ++ ;. Synhronise ();//синхронізуємо події
}
//Виведення даних на форму.Text=Convert.ToString (system.Tranzakt_Value);// кількість надійшли заявок.Text=Convert.ToString (kol_Otkazov);// кількість отказов.Text=Convert.ToString (system.Tranzakt_Process);//кількість оброблених заявок.Text=Convert.ToString (system.Sim_Time);// модельне время.Text=Convert.ToString (queueSizeK1);// чергу в канале.Text=Convert.ToString (queueSizeEVM1);// чергу в ЕВМ1.Text=Convert.ToString (queueSizeEVM2);// чергу в ЕВМ2.Text=Convert.ToString (queueSizeEVM3);// чергу в ЕВМ3.Text=Convert.ToString (FreeK1);// зайнятість канала.Text=Convert.ToString (FreeEVM1);// зайнятість ЕВМ1.Text=Convert.ToString (FreeEVM2);// зайнятість ЕВМ2.Text=Convert.ToString (FreeEVM3);// зайнятість ЕВМ3.BackColor=System.Drawing.Color.MediumSeaGreen;
MessageBox.Show ( Система змодельована! );
}
//якщо не введені параметри або введені неправильно (FormatException ex)
{. Show ( Неправильно введені параметри моделі! Введіть дані заново! + ex);
}
} void Close_Click (object sender, EventArgs e)//вихід з програми
{. Exit ();
}
}
}
3. Симуляція
GPSS World Simulation Report - Модель 1 (Курс проект по модел) .42.1, June 19, 2014 5:04:08 TIME END TIME BLOCKS FACILITIES STORAGES
. 000 5074.710 36 4 3VALUE 10003.0001000...
