poddergrukovodstkp (538827), страница 21
Текст из файла (страница 21)
GENERATE (Exponential(333,0,(T1_/N1_))),,,,1 Met0 ASSIGN 7,(RN43/1000) ; Обращение к генератору RN
ASSIGN 3,0 ; Подготовка к циклу
Met1 ASSIGN 3+,1 ; Начало цикла определения номера звонящего телефона ТА1
TEST LE P7,(P3#(1/N1_)),Met1 ; Если условие выполнено, то номер телефона ТА1 в Р3
GATE NU P3,Met9 ; Свободен ли телефон с данным номером? Если да,
SEIZE P3 ; то звонят с него
ASSIGN 7,(RN343/1000) ; Обращение к генератору RN
TEST LE P7,(N3_/(N2_+N3_)),Met2 ; Если условие выполнено, то нужен внешний выход
ASSIGN 4,(N1_+N2_) ; Подготовка к циклу
Met3 ASSIGN 4+,1 ; Начало цикла определения номера свободного внешнего выхода
GATE U P4,Met4 ; Свободен ли внешний выход?
TEST GE P4,(N1_+N2_+N3_),Met3 ; Все ли внешние выходы проверены и не найдено свободного?
ADVANCE Tog1,Tog01 ; Если да, то задержаться и
ASSIGN 4,(N1_+N2_) ; подготовка к циклу
Met21 ASSIGN 4+,1 ; Начало цикла определения номера внешнего выхода, занятого ТА2
TEST E X*4,1,Met22 ; Равно ли значение сохраняемой ячейки 1? Если нет, то перейти к прерыванию разговора
TEST GE P4,(N1_+N2_+N3_),Met21 ; Все ли сохраняемые ячейки проверены? Не найдено ни одной, значение которой равно 0? Если да, то
TRANSFER ,Met23 ; то все внешние выходы заняты звонками с ТА1
Met22 PREEMPT P4,PR,Met24,,RE ; Прервать разговор с ТА2 по внешнему выходу без права продолжения
SAVEVALUE *4,PR
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 уровень приоритета
RELEASE P4
RELEASE P3 Ter2 TERMINATE Met2 ASSIGN 7,(RN343/1000)
ASSIGN 6,0 Met5 ASSIGN 6+,1 звонят с ТА1
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
Освободить внешний выход с номером в Р4
освободить телефон ТА1 с номером в Р3
Состоявшиеся разговоры с ТА1 по внешним выходам
Обращение к генератору RN
Подготовка к циклу
Начало цикла определения номера ТА2, на который
Если условие выполнено, то номер телефона ТА2 в Р6
Свободен ли телефон с данным номером? Если да,
то ответит ли он?
Если условие выполнено, то не ответит. Тогда
задержаться и
освободить телефон ТА1 с номером в Р3
Met7 Ter3
TERMINATE
; Несостоявшиеся разговоры между абонентами ТА1 и ТА2
88
ADVANCE (Exponential(222,0,Trazg1)) ; Имитация разговора с ТА1
Met6 SEIZE (N1_+P6) ; Занять ТА2 с номером в (N1_+Р6)
ADVANCE (Exponential(222,0,Trazg1)) ; Имитация разговора между абонентами ТА1 и ТА2
RELEASE (N1_+P6)
RELEASE P3 Ter4 TERMINATE Met9 TERMINATE Met24 RELEASE (N1_+P3)
TERMINATE
Освободить ТА2 с номером в (N1_+Р6)
Освободить ТА1 с номером в Р3
Состоявшиеся разговоры между абонентами ТА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 P4,PR
Свободен ли внешний выход?
Все ли внешние выходы проверены и не найдено сво-
; Если да, то задержаться и ; Освободить телефон с номером (N1_+P3) Несостоявшиеся разговоры с ТА2 из-за занятости внешних выходов ; Занять свободный внешний выход ; Запомнить приоритет ведущего разговор ADVANCE (Exponential(222,0,Trazg2)); Имитация разговора между абонентами ТА2 по внешним выходам
RELEASE P4 RELEASE (N1_+P3)
Ter6 TERMINATE
Met12 ASSIGN 7,(RN343/1000) ASSIGN 6,0
; Освободить внешний выход
; Освободить ТА2
; Состоявшиеся разговоры с ТА2 по внешним выходам
; Обращение к генератору RN
Met15 ASSIGN 6+,1; Начало цикла определения номера телефона ТА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 ;
Если условие выполнено, то номер телефона ТА1 в Р6 Свободен ли телефон с данным номером? Если да, то ответит ли он? Если условие выполнено, то не ответит. Тогда
; задержаться и освободить телефон с номером N1_+P3 Несостоявшиеся разговоры с ТА2 из-за занятости ТА1
; Занять телефон ТА1 с номером в Р6
ADVANCE (Exponential(222,0,Trazg2)) ; Имитация разговора между абонентами ТА2 и ТА1
RELEASE P6 ; Освободить телефон ТА1 с номером в Р6
RELEASE (N1_+P3) ; Освободить телефон ТА2 с номером N1_+P3
Ter8 TERMINATE ; Состоявшиеся разговоры между абонентами ТА2 и ТА1
Met19 TERMINATE
; Подготовка к циклу
; Сегмент задания времени моделирования и расчета результатов моделирования
GENERATE VrMod ; Задание времени моделирования
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
89
Вариант 19
Постановка задачи
Автоматическая телефонная станция (АТС) обслуживает n1 телефонных аппаратов (ТА) первой категории (ТА1), n2 ТА второй категории (ТА2) и имеет n3 выходов в сеть связи. Интервал времени T1/n1 между звонками с ТА первой категории случайный. Вероятность звонка с i-го ТА первой категории p1i = 1/n1. Вероятность того, что при этом для разговора потребуется внешняя линия связи p2= n3/(n2+n3), соединение с ТА второй категории p3 = n2/(n2+n3). При этом может быть занята любая свободная линия связи, а вероятность звонка на j-й ТА второй категории p4j = 1/n2. Длительность t1 разговора с ТА первой категории случайная. Время tож1 ожидания при занятости ТА или внешних линий связи случайное. Вероятность того, что ТА второй категории не ответит, p5. При этом время tож2 также случайное.
Интервал времени T2/n2 между звонками с ТА второй категории случайный. Вероятность звонка с k-го ТА второй категории p6k = 1/n2/ Вероятности того, что при этом для разговора потребуются внешняя линия связи p7 = n3/(n1+n3), соединение с ТА первой категории p8 = n1/(n1+n3). Для разговора может быть занята любая свободная внешняя линия связи, а вероятность звонка на l-й ТА первой категории p9l = 1/n1. Длительность t2 разговора с ТА второй категории случайная. Время tож3 при занятости ТА или внешних линий связи случайное. Вероятность того, что ТА первой категории не ответит, p10. При этом время tож4 также случайное.
Звонки с ТА первой категории обладают абсолютным приоритетом по отношению к звонкам с ТА второй категории при занятости внешнего выхода в сеть связи. Вследствие этого, если при поступлении заявки на разговор по внешнему выходу с ТА первой категории все внешние выходы будут заняты разговорами также с ТА первой категории, то прерывания не происходит и заявка считается потерянной. Если же некоторые внешние выходы будут заняты разговорами с ТА второй категории, то после tож1 один из этих разговоров прерывается (теряется) и начинается разговор по этому выходу с ТА первой категории.
Исходные данные
n1 = 10; Т1 = 50; Exp(T1/n1);
n2 = 20; Т2 = 400; Exp(T2/n2);
n3 = 3; Normal(tож1, t0ож1) = Normal(3, 0.5);
р5 = 0.7; Normal(tож2, t0ож2) = Normal(3, 0.5); Exp(t1) = Exp(3); Exp(t2) = Exp(5); Normal(tож3, t0ож3) = Normal(2.5, 0.4);
р10 = 0.3; Normal(tож4, t0ож4) = Normal(2, 0.3).
Значения T1, T2, t1, t2, р5, р10 исследователь изменяет от исходных самостоятельно. Результаты моделирования необходимо получить с точностью ε = 0,01 и доверительной вероятностью α = 0,99.
Задание на исследование
Разработать имитационную модель функционирования АТС. Исследовать зависимость вероятности разговоров с ТА первой и второй категории от интервалов времени T1, T2, времени t1, t2 разговоров и вероятностей р5 и р10.
90
Программа модели
Вариант 19
Модель автоматической телефонной
Задание исходных данных
станции
VrMod | EQU | 3600 |
N1 | EQU | 10 |
N2 | EQU | 20 |
N3 | EQU | 3 |
Tl | EQU | 50 |
T2 | EQU | 400 |
Togl | EQU | 3.5 |
TogOl | EQU | 0.5 |
Tog2 | EQU | 3 |
Tog02 | EQU | 0.5 |
Tog3 | EQU | 2.5 |
ТодОЗ | EQU | 0.4 |
Tog4 | EQU | 2 |
Tog04 | EQU | 0.3 |
Trazgl | EQU | 3 |
Trazg2 | EQU | 5 |
P5 | EQU | 0.7 |
P10 | EQU | 0.3 |
Время моделирования, 1 ед. мод. вр. = 1 с Количество ТА1 Количество ТА2 Количество внешних выходов
Время для расчета интервалов между звонками с ТА1 Время для расчета интервалов между звонками с ТА2 Среднее время ожидания при занятости внешних линий Среднеквадратическое отклонение времени ожидания Среднее время ожидания при звонке с ТА1 на ТА2 Среднеквадратическое отклонение времени ожидания Среднее время ожидания при занятости внешних линий Среднеквадратическое отклонение времени ожидания Среднее время ожидания при звонке с ТА2 на ТА1 Среднеквадратическое отклонение времени ожидания Среднее время разговора с ТА1 Среднее время разговора с ТА2 Вероятность того, что ТА2 не ответит Вероятность того, что ТА1 не ответит
; Сегмент имитации телефонных разговоров с ТА 1-й категории (ТА1)
GENERATE (Exponential(333,0,(T1_/N1_))),,,,1 Met0 ASSIGN 7,(RN43/1000) ; Обращение к генератору RN
ASSIGN 3,0 ; Подготовка к циклу
Met1 ASSIGN 3+,1 ; Начало цикла определения номера звонящего телефона ТА1
TEST LE P7,(P3#(1/N1_)),Met1 ; Если условие выполнено, то номер телефона ТА1 в Р3
GATE NU P3,Met9 ; Свободен ли телефон с данным номером? Если да,
SEIZE P3 ; то звонят с него
ASSIGN 7,(RN343/1000) ; Обращение к генератору RN
TEST LE P7,(N3_/(N2_+N3_)),Met2 ; Если условие выполнено, то нужен внешний выход
ASSIGN 4,(N1_+N2_) ; Подготовка к циклу
Met3 ASSIGN 4+,1 ; Начало цикла определения номера свободного внешнего выхода
GATE U P4,Met4 ; Свободен ли внешний выход?
TEST GE P4,(N1_+N2_+N3_),Met3 ; Все ли внешние выходы проверены и не найдено свободного?
ADVANCE Tog1,Tog01 ; Если да, то задержаться и
ASSIGN 4,(N1_+N2_) ; подготовка к циклу
Met21 ASSIGN 4+,1 ; Начало цикла определения номера внешнего выхода, занятого ТА2
TEST E X*4,1,Met22 ; Равно ли значение сохраняемой ячейки 1? Если нет, то перейти к прерыванию разговора
TEST GE P4,(N1_+N2_+N3_),Met21 ; Все ли сохраняемые ячейки проверены? Не найдено ни одной, значение которой равно 0? Если да, то
TRANSFER ,Met23 ; то все внешние выходы заняты звонками с ТА1
Met22 PREEMPT P4,PR,Met24,,RE ; Прервать разговор с ТА2 по внешнему выходу без права продолжения
SAVEVALUE *4,PR