SIMULATE
*------------------------------------------------------------------
* Оголошення функцій розподілів
RAVNM46 FUNCTION RN1,C2  ; Рівномірний розподіл 4-6 хв (вхідний потік)
0,4/1,6
 
EXPON6 FUNCTION RN1,C24  ; Експоненційний розподіл (час обслуговування)
0,0/.1,0.63/.2,1.34/.3,2.14/.4,3.06/.5,4.16
.6,5.5/.7,7.22/.75,8.3/.8,9.65/.84,11.0/.88,12.75
.9,13.8/.92,15.15/.94,16.9/.95,18.0/.96,19.25
.97,21.0/.98,23.4/.99,27.6/.995,31.8/.998,37.2/.999,42.0/1,48.0
 
* Оголошення таблиць
TAB1 TABLE M1,0,20,20    ; 1 - довжина черги
TAB2 TABLE M2,0,60,30    ; 2 - час очікування
TAB3 TABLE Fn$EXPON6,0,50,25  ; 3 - час обслуговування
TAB4 TABLE M3,0,120,40   ; 4 - час перебування
 
*------------------------------------------------------------------
* Генерація вхідного потоку (рівномірний 4-6 хв)
GENERATE FN$RAVNM46
 
* Обробка заявки
QUEUE Och             ; Постановка в чергу
SEIZE Kan             ; Захват каналу
DEPART Och            ; Вихід з черги
ADVANCE FN$EXPON6     ; Час обслуговування (експоненційний)
RELEASE Kan           ; Звільнення каналу
 
* Обробка повторного обслуговування (p=0.23)
TRANSFER 0.23,Povt    ; З ймовірністю 23% на повторне обслуговування
TERMINATE             ; Інакше завершити
 
* Повторне обслуговування
Povt ADVANCE 2        ; Додатковий час обслуговування
TERMINATE
 
*------------------------------------------------------------------
* Запуск симуляції на 12 годин (720 хв)
GENERATE 720          
TERMINATE 1
 
START 1               ; Один прогон
RESULT                ; Вивід результатів
END
GENERATE 3600
TERMINATE 1
 
 

U0lNVUxBVEUKKi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQoqINCe0LPQvtC70L7RiNC10L3QvdGPINGE0YPQvdC60YbRltC5INGA0L7Qt9C/0L7QtNGW0LvRltCyClJBVk5NNDYgRlVOQ1RJT04gUk4xLEMyICA7INCg0ZbQstC90L7QvNGW0YDQvdC40Lkg0YDQvtC30L/QvtC00ZbQuyA0LTYg0YXQsiAo0LLRhdGW0LTQvdC40Lkg0L/QvtGC0ZbQuikKMCw0LzEsNgoKRVhQT042IEZVTkNUSU9OIFJOMSxDMjQgIDsg0JXQutGB0L/QvtC90LXQvdGG0ZbQudC90LjQuSDRgNC+0LfQv9C+0LTRltC7ICjRh9Cw0YEg0L7QsdGB0LvRg9Cz0L7QstGD0LLQsNC90L3RjykKMCwwLy4xLDAuNjMvLjIsMS4zNC8uMywyLjE0Ly40LDMuMDYvLjUsNC4xNgouNiw1LjUvLjcsNy4yMi8uNzUsOC4zLy44LDkuNjUvLjg0LDExLjAvLjg4LDEyLjc1Ci45LDEzLjgvLjkyLDE1LjE1Ly45NCwxNi45Ly45NSwxOC4wLy45NiwxOS4yNQouOTcsMjEuMC8uOTgsMjMuNC8uOTksMjcuNi8uOTk1LDMxLjgvLjk5OCwzNy4yLy45OTksNDIuMC8xLDQ4LjAKCiog0J7Qs9C+0LvQvtGI0LXQvdC90Y8g0YLQsNCx0LvQuNGG0YwKVEFCMSBUQUJMRSBNMSwwLDIwLDIwICAgIDsgMSAtINC00L7QstC20LjQvdCwINGH0LXRgNCz0LgKVEFCMiBUQUJMRSBNMiwwLDYwLDMwICAgIDsgMiAtINGH0LDRgSDQvtGH0ZbQutGD0LLQsNC90L3RjwpUQUIzIFRBQkxFIEZuJEVYUE9ONiwwLDUwLDI1ICA7IDMgLSDRh9Cw0YEg0L7QsdGB0LvRg9Cz0L7QstGD0LLQsNC90L3RjwpUQUI0IFRBQkxFIE0zLDAsMTIwLDQwICAgOyA0IC0g0YfQsNGBINC/0LXRgNC10LHRg9Cy0LDQvdC90Y8KCiotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KKiDQk9C10L3QtdGA0LDRhtGW0Y8g0LLRhdGW0LTQvdC+0LPQviDQv9C+0YLQvtC60YMgKNGA0ZbQstC90L7QvNGW0YDQvdC40LkgNC02INGF0LIpCkdFTkVSQVRFIEZOJFJBVk5NNDYKCiog0J7QsdGA0L7QsdC60LAg0LfQsNGP0LLQutC4ClFVRVVFIE9jaCAgICAgICAgICAgICA7INCf0L7RgdGC0LDQvdC+0LLQutCwINCyINGH0LXRgNCz0YMKU0VJWkUgS2FuICAgICAgICAgICAgIDsg0JfQsNGF0LLQsNGCINC60LDQvdCw0LvRgwpERVBBUlQgT2NoICAgICAgICAgICAgOyDQktC40YXRltC0INC3INGH0LXRgNCz0LgKQURWQU5DRSBGTiRFWFBPTjYgICAgIDsg0KfQsNGBINC+0LHRgdC70YPQs9C+0LLRg9Cy0LDQvdC90Y8gKNC10LrRgdC/0L7QvdC10L3RhtGW0LnQvdC40LkpClJFTEVBU0UgS2FuICAgICAgICAgICA7INCX0LLRltC70YzQvdC10L3QvdGPINC60LDQvdCw0LvRgwoKKiDQntCx0YDQvtCx0LrQsCDQv9C+0LLRgtC+0YDQvdC+0LPQviDQvtCx0YHQu9GD0LPQvtCy0YPQstCw0L3QvdGPIChwPTAuMjMpClRSQU5TRkVSIDAuMjMsUG92dCAgICA7INCXINC50LzQvtCy0ZbRgNC90ZbRgdGC0Y4gMjMlINC90LAg0L/QvtCy0YLQvtGA0L3QtSDQvtCx0YHQu9GD0LPQvtCy0YPQstCw0L3QvdGPClRFUk1JTkFURSAgICAgICAgICAgICA7INCG0L3QsNC60YjQtSDQt9Cw0LLQtdGA0YjQuNGC0LgKCiog0J/QvtCy0YLQvtGA0L3QtSDQvtCx0YHQu9GD0LPQvtCy0YPQstCw0L3QvdGPClBvdnQgQURWQU5DRSAyICAgICAgICA7INCU0L7QtNCw0YLQutC+0LLQuNC5INGH0LDRgSDQvtCx0YHQu9GD0LPQvtCy0YPQstCw0L3QvdGPClRFUk1JTkFURQoKKi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQoqINCX0LDQv9GD0YHQuiDRgdC40LzRg9C70Y/RhtGW0Zcg0L3QsCAxMiDQs9C+0LTQuNC9ICg3MjAg0YXQsikKR0VORVJBVEUgNzIwICAgICAgICAgIApURVJNSU5BVEUgMQoKU1RBUlQgMSAgICAgICAgICAgICAgIDsg0J7QtNC40L0g0L/RgNC+0LPQvtC9ClJFU1VMVCAgICAgICAgICAgICAgICA7INCS0LjQstGW0LQg0YDQtdC30YPQu9GM0YLQsNGC0ZbQsgpFTkQKR0VORVJBVEUgMzYwMApURVJNSU5BVEUgMQoK