Пример описания кадра анимации
$Frame Frame_1
$Back_picture = <255 255 255> fon
Show text [335, 96, 60, 60, <255 255 255>, <0 0 0>, office_1.queue]
Show_if office_1.queue > 0
bitmap [688, 60, z]
bitmap [577, 40, man1]
Show_if office_1.queue > 1
bitmap [496, 40, man1]
Show_if office_1.queue > 2
bitmap [415, 40, man1]
Show_if office_1.queue > 3
bitmap [334, 40, man1]
Show_if office_1.queue > 4
bitmap [253, 40, man1]
Show_if office_1.queue > 5
bitmap [172, 40, man1]
Show_if office_1.queue > 6
bitmap [ 91, 40, man1]
Show_if office_1.queue > 7
bitmap [ 10, 40, man1]
bitmap [ 10, 5, buzy]
Show_if saler_1.stat = busy
bitmap [ 750, 40, man31]
text [745, 25, 140, 12, <255 255 255>, <255 0 0>, ‘Оператор занят']
Show_if saler_1.stat = free
bitmap [ 750, 40, man32]
text [730, 25, 140, 12, <255 255 255>, <0 150 200>, ‘Оператор свободен']
Show_if asmer_0.stat = free
bitmap [ 45, 300, ass1]
text [10, 360, 140, 12, <255 255 255>, <0 0 0>, ‘Сборщик 1 свободен']
Show_if asmer_0.stat = busy
bitmap [ 45, 300, ass]
text [10, 360, 140, 12, <255 255 255>, <255 0 0>, ‘Сборщик 1 занят']
text [300, 250, 150, 12, <255 255 255>, <0 0 0>, ‘Занят 1 сборщик']
Show_if asmer_1.stat = free
bitmap [ 195, 300, ass1]
text [155, 360, 140, 12, <255 255 255>, <0 0 0>, ‘Сборщик 2 свободен']
Show_if asmer_1.stat = busy
bitmap [ 195, 300, ass]
text [155, 360, 140, 12, <255 255 255>, <255 0 0>, ‘Сборщик 2 занят']
text [300, 250, 150, 12, <255 255 255>, <0 0 0>, ‘Занят 2 сборщик']
Пример кадра анимации в окне РДО имитатора показан на рис. 7.11.
Рис. 7.11. Пример кадра анимации в окне РДО-имитатора
Вопросы к главе 7
Что входит в понятие «ресурсы» в методе РДО?
Как определяется в методе РДО понятие «действие»?
Что представляет собой «операция» в методе РДО?
Что такое нерегулярное событие в методе РДО?
Из чего состоит модель сложной дискретной системы в методе РДО?
Чем отличаются модифицированные продукционные правила от обычных?
Из каких составных частей состоит базовая структура инструментальной среды интеллектуальных систем на основе РДО-метода?
Для каких целей служит и из каких частей состоит продукционный имитатор?
Поясните понятия, используемые при ИМ в среде метода РДО: модель, прогон, проект, объект.
Каковы общие характеристики интегрированной среды моделирования РДО?
Как и для чего в ИСМ РДО применяется анимация?
8. Краткое описание языка gpss
Язык GPSS (General Purpose Simulation System), ориентированный на процессы, реализован в ряде программ имитационного моделирования.
Модель (программа) на языке GPSS представляет собой последовательность операторов (их называют блоками), отображающих события, происходящие в СМО при перемещениях транзактов.
Поскольку в интерпретаторах GPSS реализуется событийный метод, и в СМО может быть одновременно много транзактов, то интерпретатор будет попеременно исполнять разные фрагменты программы, имитируя продвижения транзактов в текущий момент времени до их задержки в некоторых устройствах или очередях.
Операторы GPSS имеют следующий формат:
<метка> <имя onepamopa> <пoлe операндов>[<комментарий>]
причем метка может занимать позиции, начиная со второй, имя оператора – с восьмой, поле операндов – с девятнадцатой, комментарий обязательно отделяется от поля операндов пробелом.
Поле операндов может быть пусто, иметь один или более операндов, обозначаемых ниже при описании блоков символами А, В, С,...
Операндами могут быть идентификаторы устройств, накопителей, служебные слова и стандартные числовые атрибуты (СЧА).
К СЧА относятся величины, часто встречающиеся в разных задачах. Это, например, АС1 — текущее время, FN — функция, Р — параметр транзакта (каждый транзакт может иметь не более L параметров, обычно L=12), К — константа, RN1 — случайная величина, равномерно распределенная в диапазоне [0, 1], S — объем занятой памяти в накопителе, F — состояние устройства, Q — текущая длина очереди и др.
При этом ссылки на идентификаторы записываются в виде
<СЧА>$<идентификатор>
например, Q$ORD означает очередь ORD
или FN$COS — ссылка на функцию COS.