Схема моделирования. Блок-диаграмма GPSS-модели, Листинг программы. Описание - Моделирование системы обслуживания с однородными требованиями с использованием языка GPSS

Листинг программы. Описание

VRazmer VARIABLE 250+INT(RN1#250/350);размер от 250 до 350

INITIAL X$XTerminal,1;какой терминал обслуживается

INITIAL X$XNa1,0;сколько ждут на 1

INITIAL X$XNa2,0;сколько ждут на 2

INITIAL X$XNa3,0;сколько ждут на 3

GENERATE 30,5;терминал 1

ASSIGN PRazmer, V$VRazmer;задать размер

SAVEVALUE XNa1+,1;увеличить количество на 1

TEST E X$XTerminal,1;ждать обслуживания терминала 1

SAVEVALUE XNa1-,1;уменьшить количество на 1

TRANSFER, LabO;перейти на обслуживание

GENERATE 30,5;терминал 2

ASSIGN PRazmer, V$VRazmer;задать размер

SAVEVALUE XNa2+,1;увеличить количество на 1

TEST E X$XTerminal,2;ждать обслуживания терминала 2

SAVEVALUE XNa2-,1;уменьшить количество на 1

TRANSFER, LabO;перейти на обслуживание

GENERATE 30,5;терминал 3

ASSIGN PRazmer, V$VRazmer;задать размер

SAVEVALUE XNa3+,1;увеличить количество на 1

TEST E X$XTerminal,3;ждать обслуживания терминала 3

SAVEVALUE XNa3-,1;уменьшить количество на 1

TRANSFER, LabO;перейти на обслуживание

LabO SEIZE EOM;занять устройство

TEST LE P$PRazmer,100,MET2

ADVANCE (PRazmer/10);имитацияцикла

TRANSFER ALL, MET3

MET2 ADVANCE 10

TRANSFER ALL, MET3

MET3 RELEASE EOM;освободитьустройство

ASSIGN PRazmer-,100;уменьшитьразмер

TEST LE P$PRazmer,0,LabLink;проверитьразмер

SAVEVALUE XTerminal+,1;перейти к след терминалу

TEST E X$XTerminal,4,LabD1;проверить терминал

SAVEVALUE XTerminal,1;перейти к терминалу 1

LabD1 TEST E X$XTerminal,1,LabD2;проверить, свободный цикл

TEST E X$XNa1,0,LabTerm;

UNLINK Line, LabO,1;вытащить из очереди

TRANSFER, LabTerm;перейти на уничтожение

LabD2 TEST E X$XTerminal,2,LabD3;проверить, свободный цикл

TEST E X$XNa2,0,LabTerm;

UNLINK Line, LabO,1;вытащить из очереди

TRANSFER, LabTerm;перейти на уничтожение

LabD3 TESTEX$XTerminal,3,LabTerm;проверить, свободный цикл

TEST E X$XNa3,0,LabTerm;

UNLINK Line, LabO,1;вытащить из очереди

TRANSFER, LabTerm;перейтинауничтожение

LabTermTERMINATE;уничтожить

LabLink LINK Line, FIFO;занять место в очереди

GENERATE 18000;таймерна 5 часов

TERMINATE 1

START 1

Сформировавшиеся задания сначала поступают от первого терминала. Транзакты, поступившие к ЭВМ обрабатывается в течение 30 секунд со скоростью 10 знаков в секунду. Если в течение этого времени все сообщение было обработано, то ЭВМ принимает по циклическому алгоритму транзакт от следующего терминала. Если сообщение за 30 секунд было не полностью обработано, то остаток сообщения передается в дополнительную очередь, которая использует свободные циклы терминалов, т. е. задача обслуживается, если на каком-либо терминале нет заявок.

Похожие статьи




Схема моделирования. Блок-диаграмма GPSS-модели, Листинг программы. Описание - Моделирование системы обслуживания с однородными требованиями с использованием языка GPSS

Предыдущая | Следующая