0,-5/.00003,-4/.00135,-3/.00621,-2.5/.02275,-2
L/.21186,-.8/.27425,-.6
.34458,-.4/.42074,-.2/.5,0/.57926,.2/.65542,.4
.72575,.6/.78814,.8/.84134,1/.88493,1.2/.93319,1.5
L,5
XPDIS 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
COLLEC1 TABLE Ml,20,50,20
COLLEC2 TABLE Ml,20,50,20
***********************************************************
POT0 1 FVARIABLE R$DIAGN+SSDIAGN+R$MEX+S$MEX+R$ELEK+S$ELEK
NEG_PROFIT FVARIABLE V$POT2_1+(R$NOWON+S$NOWON-
SA$NOWON)#120#24#360
OBL_1 VARIABLE NSNODE1
POT11 FVARIABLE (V$OBL 1-R$NOWON-S$NOWON)#650#360
POT21 FVARIABLE V$POT1_1+V$POTO_1#360#7.75
***********************************************************
NOWON STORAGE 50 DIAGN STORAGE 2 ELEK STORAGE 3 МЕХ STORAGE 3
NODE1 GENERATE 0,,,52, 20 TRANSFER,NODE2
NODE2 MARK
QUEUE QDIAGN
ENTER NOWON,1
DEPART QDIAGN
70 ADVANCE 160,FN$XPDIS
LEAVE NOWON,1
TRANSFER,NODE3
NODE3 QUEUE QUEUE3
ENTER DIAGN,1
DEPART QUEUE3
ADVANCE 2,1
LEAVE DIAGN,1
TRANSFER.750,NODE4,NODE5
NODE4 TABULATE COLLEC1
QUEUE QUEUE4
ENTER ELEK,1
DEPART QUEUE4
ADVANCE 30,10
LEAVE ELEK,1
TRANSFER,NODE2
NODES TABULATE COLLEC2
QUEUE QUEUE5
ENTER MEX,1
DEPART QUEUES
ADVANCE 45,5
LEAVE MEX,1
TRANSFER,NODE2
COMTER TERMINATE
GENERATE 8640
320 SAVEVALUE POT0,V$POT0_l
330 SAVEVALUE NEG_PROFIT,Y$POTERY_1
340 SAVEVALUE OBL,V$OBL_1
350 SAVEVALUE POT1,V$POT1_1
360 SAVEVALUE POT2,V$POT2_1
TERMINATE 1
START 1
REPORT REPORT.GPS,NOW
END
Функция NOR и блок COMTER TERMINATE всегда вставляются в модель. Этот блок необходим для уничтожения транзактов, для которых не выполняются условия (например, превышено время пребывания в очереди). Каждый программный блок узла модели МКУ помечен меткой NODE с номером узла.
Если выполнить эксперимент с построенной моделью, то получим статистические данные (рис. 8.15), значения переменных (рис. 8.16) и таблицы распределения времени для ремонта (рис. 8.17).
Рис. 8.15
Рис. 8.16
Рис. 8.17
Кроме того, ISS 2000 предоставляет возможность нахождения «узкого места» модели. Для этого выбираем пункт меню Проект/Построить и нажимаем кнопку «Да» в появившемся диалоге:
Далее выбираем участок модели, в котором требуется найти узкое место (рис. 8.18):
Рис. 8.18
Получаем данные о загрузке каждого из узлов определенного участка, о среднем времени пребывания в каждом узле и о потенциально узком месте (рис. 8.19):
Рис. 8.19
Как видим, в нашем примере узким местом оказался узел № 5 -ремонт механического оборудования.