Системное время. 
Язык моделирования систем GPSS

СЧА, связанные с системным временем, используются для про-верки временных соотношений пребывания транзактов в системе.

В СЧА С1 и АС1 хранится текущее значение системного времени. СЧА С1 содержит значение относительного системного времени (с момента последнего блока RESET). СЧА АС1 содержит значение абсолютного системного времени (с момента последнего блока CLEAR). Данные СЧА доступны пользователю в любой точке программы.

Каждый транзакт при генерации снабжается отметкой времени. Время пребывания транзакта в модели содержится в СЧА М1 или МР и отсчитывается от момента рождения:

М1 = АС1 — .

СЧА М1 возвращает время пребывания транзакта в модели, СЧА МРi или MP$ возвращает значение, равное абсолютному системному времени минус значение соответствующего параметра транзакта.

«Дату рождения», зафиксированную блоком GENERATE, можно изменить в любом месте программы, используя блок MARK с пустым полем A. Блок MARK с пустым полем A изменяет «дату рождения» на текущее системное время. Если в блоке MARK используется поле A, то в этом поле содержится номер или имя параметра транзакта. В этом случае транзакт сохраняет «дату рождения», а в указанном параметре записывается текущее значение АС1. Работа блока MARK 10.

эквивалентна работе блока ASSIGN 10, C1.

Например:

.. ... MARK. ... .

MARK 10. ... .

TEST E C1,50,BGN1.

SR1 TEST GE M1, МP10,BGN2.

Здесь первый блок TEST проверяет условие, связанное с текущим значением системного времени (С1 = 50 ?). Второй блок TEST сравнивает М1 (время от попадания транзакта в блок MARK до попадания его в блок SR1) с МР10 (время от попадания транзакта в блок MARK 10 до попадания его в блок SR1).

Пример 2.11.

В специализированный магазин промышленных товаров покупатели приходят в среднем каждые 15 минут. В магазине работает единственный продавец, который обслуживает покупателей в среднем 8 минут. Время прихода и время обслуживания подчиняется экспоненциальному закону. Известно, что примерно 20% покупателей в течение месяца приходят в магазин повторно.

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

Промоделировать работу в течение месяца и определить размер премии «лучшего» покупателя.

Для моделирования суммы покупок определим случайную функцию CONT, считая, что стоимость покупки может варьироваться в размере от 5 до 500 рублей.

Модель работы магазина будет выглядеть следующем образом. CONT FUNCTION RN1, C2.

0,5/1,500; приход посетителей в магазин GENERATE (EXPONENTIAL (1,0,15)), 1.

VXOD ASSIGN PRICE+, FN$CONT; общая сумма покупок; посетителя магазина.

QUEUE OCH SEIZE PROD DEPART OCH.

ADVANCE (EXPONENTIAL (1,0,8)).

TEST G P$PRICE, 800, NEXT; если общая сумма превышает 800 JOIN CART; посетителю выдается карта RELEASE PROD.

TRANSFER .2,POVT.

TEST G C1,14 400; задерживаем транзакты группы, чтобы в; конце месяца определить лучшего покупателя.

TERMINATE.

NEXT RELEASE PROD TRANSFER .2,POVT TERMINATE.

; перед повторным посещением ставим задержку POVT ADVANCE (EXPONENTIAL (1,0,600)) TRANSFER, VXOD.

; определение лучшего покупателя в конце месяца GENERATE 14 400.

SCAN MAX CART, PRICE, PRICE, SUM ASSIGN SUM+, P$SUM.

SAVEVALUE 20, P$SUM TERMINATE 1.

START 1.