Текст програми

*********************************

*** Модель виробничої дільниці *** *** Початкова структура ***

*** Введення додаткових верстатів*** *********************************

SVER EQU 1 ; присвоєння еквівалентних значень

ТОК EQU 2

FREZ EQU 3

SHLI EQU 4

KNV EQU 5

ВАШ EQU 1

BAD2 EQU 2

BAD3 EQU 3

BAD4 EQU 4

ROUTE EQU 5

TIME EQU 6

*

KNV STORAGE 200 ; Ємність конвеєра

SVER STORAGE 2 ; визначення

ТОК STORAGE 2 ; кількості

FREZ STORAGE 2 ; однотипових

SHLI STORAGE 2 ; верстатів

** Функція собівартості для кожного типу деталей **

СЕВ FUNCTION P1,D4

1,350/2,420/3,280/4,315

** Функція штрафів для кожного типу деталей ** MSHT FUNCTION P1,D4

1,80/2,120/3,160/4,100

** Функція доходу для кожного типу деталей ** MDOH FUNCTION P1,D4

1,1550/2,1850/3,1350/4,1450

** Функція допустимого часу перебування на дільниці **

** для кожного типу деталей **

DTIM FUNCTION P1,D4

1,1890/2,1600/3,2300/4,1400

** Функція розподілу часу надходження деталей на дільницю**

EXPDIS FUNCTION RN1,C24

0,0/. 100,. 104/.200,.222/.300,.355/.400,.509

.500,.690/.600,.915/.700,1.200/.750,1.380

.800,1.600/.840,1.830/.880,2.120/.900,2.300

.920,2.520/.940,2.810/.950,2.990/.960,3.200

.970,3.500/.980,3.900/.990,4.600/.995,5.300

.998,6.200/.999,7/1,8

** Функція типів деталей

TYP FUNCTION RN1,D4

.25,1/.40,2/.75,3/1,4

** Функція початкових значень маршрутів для кожного типу деталей **

JTAP FUNCTION P1,D4

1,1/2,7/3,11/4,16

** Функція кількості етапів обробки для кожного типу деталей **

JOB FUNCTION P1,D4

1,6/2,4/3,5/4,4

** Функція типів верстатів для кожного типу деталей **

ROUTE FUNCTION P3,D19

1,2/2,3/3,1/4,4/5,1/6,2

7,3/8,4/9,3/10,1

11,2/12,1/13,3/14,2/15,4

16,1/17,2/18,3/19,4

** Функція часу напрацювання для кожного етапу

TIME FUNCTION P3,D19

1,88/2,120/3,120/4,130/5,105/6,92

7,200/8,140/9,145/10,160

11,176/12,190/13,140/14,116/15,300

16,190/17,168/18,130/19,190

** Функція часу просування деталей по дільниці

GO FUNCTION P3,D19

1,16/2,23/3,23/4,23/5,55/6,38/7,35

8,38/9,29/10,23/11,16/12,40/13,55

14,55/15,33/16,55/17,38/18,23/19,38

** Функція часу для виходу деталі з дільниці

EXIT_ FUNCTION P1,D4

1,68/2,33/3,16/4,16

** Збирання даних про час перебування по типам деталей

BAD1 TABLE Ml,1890,24000,2

BAD2 TABLE Ml,1600,24000,2

BAD3 TABLE Ml,2300,24000,2

BAD4 TABLE М1,1400,24000,2

*1-й сегмент моделі

GENERATE 200,FN$EXPDIS ASSIGN 1,FN$TYP ; Тип деталі ASSIGN 2,FN$JOB ; Кількість етапів ASSIGN 3,FN$JTAP ; Номер першого етапу ASSIGN 6,FN$DTIM ; Допустимий час ENTER KNV ; Надходження на конвеєр

NEXT ASSIGN 4,FN$ROUTE ; Тип верстата ASSIGN 5,FN$TIME ; Час напрацювання ASSIGN 7,FN$GO ; Час просування до верстата ADVANCE Р7 ; Час просування по конвеєру

QUEUE Р4 ; Черга до верстата

ENTER Р4 ; Заняття верстата

DEPART Р4 ; Вихід із черги

ADVANCE Р5 ; Обробка на верстаті

LEAVE Р4 ; Звільнення верстату

ASSIGN 3+,1 ; Збільшення кількості етапів

LOOP 2,NEXT ; Чи всі етапи? Ні - NEXT ASSIGN 7,FN$EXIT_ ; Час виходу з дільниці ADVANCE Р7 ; Вихід з дільниці

LEAVE KNV ; Вихід з конвеєра

TABULATE PI ; Збирання статистики

TEST L P6,M1,DDD ; Штрафувати? Ні - DDD

SAVEVALUE SHTRAF+,FN$MSHT ; Штраф

DDD SAVEVALUE DOHOD-,FN$MSHT ; Визначення доходу

SAVEVALUE DOHOD+,FN$MDOH ; Визначення доходу

SAVEVALUE DOHOD-,FN$CEB ; Визначення доходу

SAVEVALUE CEBECT+,FN$CEB ; Визначення собівартості

TERMINATE

* 2-й сегмент модели

GENERATE 4800 ; Таймер моделі

TERMINATE 1

ЗАПИТАННЯ ТА ЗАВДАННЯ ДЛЯ САМОКОНТРОЛЮ

1. Поясніть використання непрямої адресації в моделі.

2. Як задаються маршрути руху деталей?

3. Яка різниця в мові GPSS між використанням одноканального пристрою та багатоканального?

4. Поясніть різницю в алгоритмах роботи в мові GPSS між одноканальним пристроєм і багатоканальним, для якого місткість накопичувача задана одиницею?

5. Як використовуються параметри транзактів в моделі?

6. Поясніть роботу блоку LOOP в моделі.

7. Які зміни необхідно ввести в модель, щоб задати новий тип деталей із заданим маршрутом їх руху? Перерахуйте ці зміни за пунктами.

8. Які зміни необхідно ввести в модель, щоб задати новий вид верстата – стругальний?

9. Запропонуйте нові гіпотези щодо поліпшення технологічного процесу на ділянці.

СПИСОК ЛІТЕРАТУРИ

1. Томашевский В.Н., Жданова Е.Г. Имитационное моделирование в среде GPSS. – М.: Бестселлер, 2003 – 416 с.

2. Томашевський В.Н., Жданова О.Г., Жолдоков О.О. Вирішення практичних завдань методами комп’ютерного моделювання: Навч. посібник. – К.: "Корнійчук", 2001. – 268 c.

3. Томашевский В.Н., Жданова Е.Г. Имитационное моделирование средствами GPSS. : Учеб. пособие. К.: ІЗМН, КПІ, 1998. – 123 с.

4. Шрайбер Т.Дж. Моделирование на GPSS. – М.: Машиностроение, 1980. – 593 с.

5. Боев В.Д. Моделирование систем. Инструментальные средства GPSS World – СПб.: БХВ-Петербург, 2004. – 458 с.

1 Сегмент - частина GPSS- моделі, яка починається блоком GENERATE і закінчується блоком TERMINATE