poddergrukovodstkp (интерпретатор GPSS и описание к нему), страница 22

ADVANCE (Exponential(222,0,Trazg1)) ; Имитация разговора с ТА1 по внешнему выходу

RETURN P4 ; Освободить внешний выход с номером в Р4

RELEASE P3 ; Освободить телефон ТА1 с номером в Р3

Ter1 TERMINATE ; Состоявшиеся разговоры с ТА1 по внешним выходам с

прерыванием разговоров с ТА2

Met23 RELEASE P3 ; Освободить телефон ТА1, разговор с которого по внешнему выходу не состоялся

TERMINATE; Несостоявшиеся разговоры с ТА1 по внешним выходам из-за занятости их ТА1
Met4 SEIZE P4 ; Занять свободный внешний выход с номером в Р4

SAVEVALUE P4,PR ; Занести в ячейку с номером в Р4 уровень приоритета

ADVANCE (Exponential(222,0,Trazg1)) ; Имитация разговора с ТА1

RELEASE P4 ; Освободить внешний выход с номером в Р4

RELEASE P3 ; освободить телефон ТА1 с номером в Р3

91

Ter2 TERMINATE ; Состоявшиеся разговоры с ТА1 по внешним выходам

Met2 Met5

ASSIGN 7,(RN343/1000) ; Обращение к генератору RN

ASSIGN 6,0 ; Подготовка к циклу

TEST LE P7,(P6#(1/N2_)),Met5 GATE NU (N1_+P6),Met7 ASSIGN 7,(RN343/1000) TEST LE P7,P5_,Met6 ADVANCE Tog2,Tog02 RELEASE P3

Если условие выполнено, то номер телефона ТА2 в Р6

Свободен ли телефон с данным номером? Если да,

то ответит ли он?

Если условие выполнено, то не ответит. Тогда

задержаться и

освободить телефон ТА1 с номером в Р3

Met7

Ter3 Met6

ASSIGN 6+,1 ; Начало цикла определения номера ТА2, на который звонят с ТА1

TERMINATE SEIZE (N1_+P6)

; Несостоявшиеся разговоры между абонентами ТА1 и ТА2 ; Занять ТА2 с номером в (N1_+Р6)

ADVANCE (Exponential(222,0,Trazg1)) ; Имитация разговора между абонентами ТА1 и ТА2

RELEASE (N1_+P6)

RELEASE P3

TERMINATE

TERMINATE

RELEASE (N1_+P3)

TERMINATE

; Освободить ТА2 с номером в (N1_+Р6) ; Освободить ТА1 с номером в Р3

Ter4 Met9 Met24

; Состоявшиеся разговоры между абонентами ТА1 и ТА2 ; ТА1 уже был занят, поэтому разговор не состоялся ; Прерванные разговоры с ТА2

; Сегмент имитации телефонных разговоров с ТА 2-й категории (ТА2)

GENERATE (Exponential(493,0,(T2_/N2_))) Met10 ASSIGN 7,(RN413/1000) ; Обращение к генератору RN

ASSIGN 3,0 ; Подготовка к циклу

TEST LE P7,(P3#(1/N2_)),Met11 ; GATE NU (N1_+P3),Met19 ; SEIZE (N1_+P3)

ASSIGN 7,(RN343/1000) ;
TEST LE P7,(N3_/(N1_+N3_)),Met12
ASSIGN 4,(N1_+N2_) ;

Если условие выполнено, то номер телефона ТА2 в Р3 Свободен ли телефон с данным номером? Если да,

; то звонят с него Обращение к генератору RN

; Если условие выполнено, то нужен внешний выход Подготовка к циклу

Met11 ASSIGN 3+,1 ; Начало цикла определения номера звонящего телефона ТА2

Met13 ASSIGN 4+,1

Начало цикла определения номера свободного внешнего выхода

GATE U P4,Met14

TEST GE P4,(N1_+N2_+N3_),Met13 бодного?

ADVANCE Tog3,Tog03

RELEASE (N1_+P3) Ter5 TERMINATE внешних выходов Met14 SEIZE P4

SAVEVALUE

Свободен ли внешний выход?

Все ли внешние выходы проверены и не найдено сво-Если да, то задержаться и Освободить телефон с номером (N1_+P3) Несостоявшиеся разговоры с ТА2 из-за занятости

P4,PR

; Занять свободный внешний выход ; Запомнить приоритет ведущего разговор ADVANCE (Exponential(222,0,Trazg2)); Имитация разговора между абонентами ТА2 по внешним выходам

RELEASE P4 ;

RELEASE (N1_+P3) ;

Ter6 TERMINATE ;

Met12 ASSIGN 7,(RN343/1000) ;

ASSIGN 6,0 ;

Met15 ASSIGN 6+,1 ;
который звонят с ТА2

TEST LE P7,(P6#(1/N1_)),Met15 ;

GATE NU P6,Met17 ;

ASSIGN 7,(RN343/1000) ;

TEST LE P7,P10_,Met16 ;
Met17 ADVANCE (Normal(211,Tog2,Tog02))

RELEASE (N1_+P3) ;

Ter7 TERMINATE ;

Met16 SEIZE P6 ;

; Освободить внешний выход

; Освободить ТА2

; Состоявшиеся разговоры с ТА2 по внешним выходам

; Обращение к генератору RN

; Подготовка к циклу

Если условие выполнено, то номер телефона ТА1 в Р6 Свободен ли телефон с данным номером? Если да, то ответит ли он? Если условие выполнено, то не ответит. Тогда

; задержаться и освободить телефон с номером N1_+P3 Несостоявшиеся разговоры с ТА2 из-за занятости ТА1

; Начало цикла определения номера телефона ТА1, на

; Занять телефон ТА1 с номером в Р6
ADVANCE (Exponential(222,0,Trazg2)) ; Имитация разговора между абонентами ТА2 и ТА1
RELEASE P6 ; Освободить телефон ТА1 с номером в Р6

RELEASE (N1_+P3) ; Освободить телефон ТА2 с номером N1_+P3

Ter8 TERMINATE ; Состоявшиеся разговоры между абонентами ТА2 и ТА1

; Сегмент задания времени моделирования и расчета результатов моделирования
GENERATE VrMod ; Задание времени моделирования

Met19 TERMINATE

92

TEST E TG1,1,Met20 ; Если содержимое счетчика завершений равно 1, то

рассчитать

SAVEVALUE Ver1,((N$Ter2+N$Ter4)/N$Met0) ; Вероятность ведения разговоров с ТА1 SAVEVALUE Ver2,((N$Ter6+N$Ter8)/N$Met10) ; Вероятность ведения разговоров с ТА2

Met20 TERMINATE 1

2.6. Модели интегратора нагрузки АТС

Вариант 20 Постановка задачи

Интегратор нагрузки автоматической телефонной станции (АТС) обслуживает n1 телефонных аппаратов (ТА) первой категории (ТА1), n2 ТА второй катего­рии (ТА2), n3 ТА третьей категории (ТА3), n4 ТА четвертой категории (ТА4) и имеет n5 внешних выходов в сеть связи. Количество ТА всех категорий Sn, а количество ТА всех категорий и внешних выходов в сеть связи – S. Интер­валы времени T1/n1, T2/n2, T3/n3, Т4/n4 с ТА первой, второй, третьей и четвертой категорий на занятие внешних выходов случайные. Продолжительно­сти разговоров с ТА первой, второй, третьей и четвертой категорий t1, t2, t3, t4 соответственно. Время ожидания tож1, tож2, tож3, tож4 в случае за­нятости всех внешних выходов также случайное.

Вероятности звонков р1i = 1/n1, р2j = 1/n2, р3k = 1/n3, р3m = 1/n4 с i-го, j-го, k-го и m-го ТА первой, второй, третьей и четвертой категорий со­ответственно. Во время звонка с ТА исключается новый звонок с него же.

Звонки с ТА первой категории не обладают абсолютным приоритетом по отно­шению к звонкам с ТА второй, третьей и четвертой категорий при занятии внешнего выхода в сеть связи. Вследствие этого, если при поступлении заяв­ки на разговор с ТА первой категории все внешние выходы будут заняты, то прерывания не происходит и заявка считается потерянной.

Исходные данные

nl	= 5;
n2	= 10
n3	= 8;
n4	= 15
п5	= 6;
Sn	= 38
S ~~ 44 *

Т1 = 120;		Exp(Tl/nl);
Т2 = 150;		Exp(T2/n2);
ТЗ = 210;		Exp(T3/n3);
Т4 = 300;		Exp(T4/n4);
Exp(tl) =	Exp(5);	Exp(t2) = Exp(4)
Exp(t3) =	Exp(6);	Exp(t4) = Exp(6);
Exp(toжl)	= Exp (30);
Exp(to3K2)	= Exp (40);
Exp("ЬожЗ)	= Exp (50);
Exp(toж4)	= Exp (40).

Значения n1, n2, n3, n4, Sn и S исследователь изменяет от исходных само­стоятельно.

Результаты моделирования необходимо получить с точностью ε = 0,01 и до­верительной вероятностью α = 0,99.

Задание на исследование

Разработать имитационную модель функционирования АТС. Исследовать зави­симость вероятностей разговоров с ТА первой, второй, третьей и четвертой

93

категорий от количества ТА первой, второй, третьей, четвертой категорий и внешних выходов.

Программа модели

Вариант 20

Модель функционирования интегратора нагрузки

VrMod E N1	)U 3600 ; EQU 5 ;
N2	EQU 10 ;
N3	EQU 8 ;
N4	EQU 15 ;
N5	EQU 6 ;
SN	EQU 38 ;
S	EQU 44
внешних	выходов
Tl	EQU 120 ;
T2	EQU 150 ;
T3	EQU 210 ;
T4	EQU 300 ;
Togl	EQU 30 ;
Tog2	EQU 40 ;
Tog3	EQU 50 ;
Tog4	EQU 40 ;
Trazgl	EQU 300 ;
Trazg2	EQU 240 ;
Trazg3	EQU 180
Trazg4	EQU 120

Время моделирования, 1 ед. мод. вр. = 1 с

Количество ТА1

Количество ТА2

Количество ТА3

Количество ТА4 Количество внешних выходов

Суммарное количество телефонов всех категорий

; Суммарное количество телефонов всех категорий и

Средний интервал между звонками с ТА1 Средний интервал между звонками с ТА2 Средний интервал между звонками с ТА3 Средний интервал между звонками с ТА4 Среднее время ожидания при звонке с ТА1 Среднее время ожидания при звонке с ТА2 Среднее время ожидания при звонке с ТА3 Среднее время ожидания при звонке с ТА4 Среднее время разговора при звонке с ТА1 Среднее время разговора при звонке с ТА2

Met6

количество ТА1 в Р5

; Время разговора с ТА1 -

; Время ожидания ТА1 - в

в Р6 Р7

MetO Metl

; Среднее время разговора при звонке с ТА3 ; Среднее время разговора при звонке с ТА4 Сегмент имитации телефонных разговоров с ТА 1-й категории (ТА1) GENERATE (Exponential(333,0,(T1_/N1_))) ASSIGN 1,1 ; Код 1 - звонок с ТА1 ASSIGN 3,0 ; Подготовка к циклу ASSIGN 5,N1_ ; Подготовка к циклу ASSIGN 6,(Exponential(222,0,Trazg1)) ASSIGN 7,(Exponential(34,0,Tog1)) Определение номера звонящего телефона

ASSIGN 8,(RN43/1000) ; Обращение к генератору RN
ASSIGN 2,0 ; Подготовка к циклу

ASSIGN 3+,1 ; Начало цикла определения номера звонящего ТА

ASSIGN 2+,1

TEST LE P8,(P2#(1/P5)),Met1

GATE NU P3,Met9

SEIZE P3