8.4.4. Модификация программы имитационной модели

Интерфейс приложения разработан. Согласно интерфейсу внесем изменения в исходную GPSS-модель (см. п. 8.2.2). Заменим строки программы с командой EQU и строки

SrVrA FUNCTION P3,D10 ; Среднее время выгрузки

1,26/2,20/3,30/4,25/5,15/6,18/7,28/8,32/9,23/10,30

командой

INCLUDE "Progr1.txt" ; Подключение файла

Модифицируем также сегмент задания времени моделирования.

;Сегмент задания времени моделирования

INCLUDE "Progr2.txt" ; Подключение файла

TEST E TG1,1,Met3 ; При TG1=1 - расчет результатов моделирования

; TEST NE N$VigTr,0,Met3

SAVEVALUE VrVig,((X$VrVigS/N$VigTr)/60) ; Среднее время выгрузки, час

INCLUDE "Progr3.txt" ; Подключение файла

INCLUDE "Progr4.txt" ; Подключение файла

INCLUDE "Progr5.txt" ; Подключение файла

Met3 TERMINATE 1

Разработка имитационной модели в виде приложения с интерфейсом завершена.

Отладьте приложение и перейдите к работе с ним.

8.5. Работа с приложением

Поместите в папку D:\ModRTr файл GPSS.exe и GPSS-модель ModRasgTr.gps. Нахождение файла Rasg_transporta.exe в этой же папке необязательно. ЗапуститеRasg_transporta.exe.

Нажмите кнопку ПРИМЕР. Автоматически будут введены данные, показанные на рис. 8.15.

Убедитесь, правильно ли выявляются ошибки, нахождение которых предусмотрено программным путем.

Проверьте, выполняется ли условие ввода характеристик нормального закона распределения случайных чисел. Измените в сторону увеличения любое из стандартных отклонений: введите в соответствующее поле редактирования, например, 4.2. Появится сообщение об ошибке (рис. 8.16): для отделения целой части от дробной нужно использовать запятую.

Нажмите OK. Повторите ввод числа с отделением его целой части от дробной части запятой в это же поле редактирования. Нажмите кнопку ВВОД. Появится предупреждение о другой ошибке (рис. 8.17). Нажмите OK и исправьте ошибку.

Рис. 8.15.  Форма приложения с данными примера

Рис. 8.16.  Сообщение об ошибке при вводе числа

Рис. 8.17.  Сообщение об ошибке при вводе стандартного отклонения

Далее удалите, например, количество пунктов разгрузки из поля редактирования и щелкните ВВОД. Появится предупреждение о том, что необходимо задать все исходные данные в полях редактирования (рис. 8.18). Щелкните OK и исправьте ошибку.

Теперь удалите, например, среднее время разгрузки автомобиля второго типа из первой таблицы и щелкните ВВОД. Появится предупреждение о том, что необходимо задать все исходные данные в полях редактирования (рис. 8.19). Щелкните OK, исправьте ошибку и нажмите ВВОД.

Рис. 8.18.  Предупреждение о необходимости ввода всех данных в поля редактирования

Рис. 8.19.  Предупреждение о необходимости ввода всех данных в первую таблицу

Теперь ошибок ввода исходных данных нет. Щелкните кнопку МОДЕЛИРОВАНИЕ.

Выполните необходимые действия с GPSS-моделью. Закройте GPSS-exe и нажмите активную кнопку ВЫВОД. Во второй таблице появятся результаты моделирования (рис. 8.20):

• среднее время разгрузки автомобилей различных типов;

• коэффициенты использования пунктов разгрузки;

• максимальные очереди на пункты разгрузки;

• среднее время разгрузки одного транспорта.

Рис. 8.20.  Форма приложения с данными и результатами моделирования