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

Met14 ASSIGN 1+,1 ; Начало цикла - сделать все внешние выходы недоступными

FUNAVAIL P1,RE,Met13 ; Сделать интегратор недоступным

TEST GE P1,S_,Met14 ; Все ли внешние выходы сделаны недоступными?

ADVANCE (Exponential(313,0,T5_)) ; Имитация времени восстановления интегратора

ASSIGN 1,SN_ ; Подготовка к циклу

Met15 ASSIGN 1+,1 ; Начало цикла - сделать все внешние выходы доступными

FAVAIL P1 ; Сделать интегратор доступным

97

TEST GE P1,S_,Met15 ; Все ли внешние выходы сделаны доступными?

TRANSFER ,Met11 ; Отправить для розыгрыша очередного отказа

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

TEST NE P1,1,Met16 ; Если разговор с ТА1, предоставить время для завершения
RELEASE P3 ; Освободить телефон с номером в Р3

TERMINATE ; Прерванные разговоры из-за неисправности интегратора
Met16 GATE FV P4 ; Прерывание разговора с ТА1 на время восстановления

TRANSFER ,Met3 ; Продолжить разговор с ТА1

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

GENERATE VrMod ; Задание времени моделирования

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

SAVEVALUE Ver1,(N$Ter3/N$Met6) ; Вероятность ведения разговоров с ТА1

SAVEVALUE Ver2,(N$Ter4/N$Met7) ; Вероятность ведения разговоров с ТА2

SAVEVALUE Ver3,(N$Ter5/N$Met8) ; Вероятность ведения разговоров с ТА3

SAVEVALUE Ver,(N$Met4/N$Met0) ; Вероятность ведения разговоров с ТА всех категорий

Met10 TERMINATE 1

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

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

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

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

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

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

nl = 10; Tl = 400; Exp(Tl/nl); Exp(T4) = Exp(2400);

n2 = 15; T2 = 800; Exp(T2/n2); Exp(T4) = Exp(30);

n3 = 20; T3 - 1200; Exp(T3/n3);

n4 = 5; Exp(tl) = Exp(240); Exp(t2) = Exp(180); Exp(t3) = Exp(120);

Sn = 45; Normal(toad, t0oжl) = Normal(25, 3);

S = 50; Normal(toж2, t0oж2) = Normal(33, 5);

Normal(toжЗ, t0oжЗ) = Normal(40, 7).

98

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

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

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

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

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

; Вариант		22
; Мод	ель функциониро
VrMod	EQU	3600 ;
N1	EQU	10 ;
N2	EQU	15 ;
N3	EQU	20 ;
N4	EQU	5 ;
SN	EQU	45 ;
S	EQU	50 ;
Tl	EQU	400 ;
T2	EQU	800 ;
T3	EQU	1200 ;
Togl	EQU	25 ;
TogOl	EQU	3 ;
Tog2	EQU	33 ;
Tog02	EQU	5 ;
Tog3	EQU	40 ;
ТодОЗ	EQU	7 ;
Trazgl	EQU	240 ;
Trazg2	EQU	180 ;
Trazg3	EQU	120 ;
T4	EQU	2400 ;
T5	EQU	30 ;

вания интегратора нагрузки Время моделирования, 1 ед. мод. вр. = 1 с Количество ТА1 Количество ТА2 Количество ТА3 Количество внешних выходов Суммарное количество телефонов всех категорий Суммарное количество телефонов всех категорий и внешних выходов Средний интервал между звонками с ТА1 Средний интервал между звонками с ТА2 Средний интервал между звонками с ТА3 Среднее время ожидания при звонке с ТА1 Стандартное отклонение времени ожидания при звонке с ТА1 Среднее время ожидания при звонке с ТА2 Стандартное отклонение времени ожидания при звонке с ТА2 Среднее время ожидания при звонке с ТА3 Стандартное отклонение времени ожидания при звонке с ТА3 Среднее время разговора при звонке с ТА1 Среднее время разговора при звонке с ТА2 Среднее время разговора при звонке с ТА3 Среднее время между отказами Среднее время восстановления

; Сегмент имитации телефонных разговоров с ТА 1-й категории (ТА1) GENERATE (Exponential(333,0,(T1_/N1_)))

Met6 ASSIGN 1,1 ; Код 1 - звонок с ТА1

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

ASSIGN 5,N1_ ; Подготовка к циклу - количество ТА1 в Р5

; Определение номера звонящего телефона

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

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

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

MetO Metl

ASSIGN 6,(Exponential(222,0,Trazg1)) ; Время разговора с ТА1 - в Р6 ASSIGN 7,(Normal(34,Tog1,Tog01)) ; Время ожидания ТА1 - в Р7

ASSIGN 2+,1

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

GATE NU P3,Met9

SEIZE P3

TRANSFER ,Met3

Счет телефонов, начиная с 1

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

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

то занять его

Met9 TERMINATE

По телефону уже звонили, поэтому звонок не состоялся

Направить на интегратор

; Сегмент имитации телефонных разговоров с ТА 2-й категории (ТА2) GENERATE (Exponential(333,0,(T2_/N2_)))

Met7 ASSIGN 1,2 ; Код 2 - звонок с ТА2

ASSIGN 3,N1_ ; Подготовка к циклу - количество ТА1 в Р3

ASSIGN 5,N2_ ; Подготовка к циклу - количество ТА2 в Р5

99

ASSIGN 6,(Exponential(222,0,Trazg2)) ; Время разговора с ТА2 - в Р6

ASSIGN 7,(Normal(34,Tog2,Tog02)) ; Время ожидания ТА2 - в Р7
TRANSFER ,Met0 ; Направить для определения номера телефона

; Сегмент имитации телефонных разговоров с ТА 3-й категории (ТА3) GENERATE (Exponential(333,0,(T3_/N3_)))

Met8 ASSIGN 1,3 ; Код 3 - звонок с ТА3

ASSIGN 3,(N1_+N2_) ; Подготовка к циклу - количество ТА1+ТА2 - в Р3

ASSIGN 5,N3_ ; Подготовка к циклу - количество ТА3 - в Р5

; Сегмент имитации работы интегратора

Met3 ASSIGN 4,SN_ ; Подготовка к циклу

Met5 ASSIGN 4+,1 ; Начало цикла определения номера свободного внешнего выхода

GATE U P4,Met4 ; Свободен ли внешний выход?

TEST GE P4,S_,Met5 ; Все ли внешние выходы проверены и не найдено свободного?

ASSIGN 4,SN_ ; Подготовка к циклу

ASSIGN 6,(Exponential(222,0,Trazg3)) ; Время разговора с ТА3 - в Р6
ASSIGN 7,(Normal(34,Tog3,Tog03)) ; Время ожидания ТА3 - в Р7
TRANSFER ,Met0 ; Направить для определения номера телефона

Met18 ASSIGN 4+,1

TEST E X*4,1,Met19 TEST GE P4,S_,Met18

Met12 ADVANCE P7 RELEASE P3

Ter1

SAVEVALUE ADVANCE RETURN RELEASE SAVEVALUE P4,0 TRANSFER ,Ter2 Met13 RELEASE P4 RELEASE P3

Начало цикла: все ли выходы заняты ТА1?
Если условие выполняется, то выход занят ТА1
Все ли внешние выходы проверены?
Да и все заняты ТА1. Тогда задержаться и
освободить телефон с номером в Р3
TERMINATE ; Несостоявшиеся разговоры из-за занятости внешнего выхода
; Прерывание разговора при занятости всех выходов, в т.ч. ТА низкого приоритета
Met19 PREEMPT P4,PR,Met13 ; Прервать разговор с ТА низкого приоритета
P4,P1 ; Занести в ячейку Р4 код категории ТА1

Р4 РЗ

P7 ; Имитация разговора продолжительностью В Р7 Освободить внешний выход с номером в Р4 Освободить ТА1 с номером в Р3

; Обнулить ячейку, хранившую номер ; Отправить для учета состоявшийся разговор ; Освободить внешний выход с номером в Р4 ; Освободить ТА2 или ТА3 с номером в Р3

TERMINATE

; Прерванные разговоры с ТА2 и ТА3

Ведение разговоров без прерывания

Met4 SAVEVALUE P4,P1

SEIZE P4 ; Занять

ADVANCE P6

RELEASE P4

RELEASE P3

SAVEVALUE P4,0 ; Счет состоявшихся разговоров Ter2 TRANSFER ,(Ter2+P1) Ter3 TERMINATE Ter4 TERMINATE Ter5 TERMINATE

; Занести в ячейку Р4 код категории ТА свободный внешний выход с номером в Р4 ; Имитация разговора

; Освободить внешний выход с номером в Р4 ; освободить телефон с номером в Р3 ; Обнуление Х с номером в Р4

категориям ТА ; Деление состоявшихся разговоров по категориям ; Состоявшиеся разговоры с ТА1 ; Состоявшиеся разговоры с ТА2 ; Состоявшиеся разговоры с ТА3

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

TEST E SAVEVALUE SAVEVALUE SAVEVALUE SAVEVALUE Met10 TERMINATE

TG1,1,Met10 ; Если содержимое счетчика завершений равно 1, то рассчитать Ver1,(N$Ter3/N$Met6) ; Вероятность ведения разговоров с ТА1 Ver2,(N$Ter4/N$Met7) ; Вероятность ведения разговоров с ТА2 Ver3,(N$Ter5/N$Met8) ; Вероятность ведения разговоров с ТА3 Ver,(N$Met4/N$Met0) ; Вероятность ведения разговоров с ТА всех категорий 1

100

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