GPSS

[CheЗter]

собсна скоро сессия и нид решить проблему с 1 траблой)

суть в том что нужно написать программу на gpss

Пять операторов работают в справочной телефонной сети города, сообщая номера телефонов по запросам абонентов, которые обращаются по одному номеру 09. Автоматический коммутатор переключает абонента на того оператора, в очереди которого ожидает наименьшее количество абонентов, причем наибольшая допустимая длина очереди перед оператором — два абонента. Если все очереди имеют максимальную длину, вновь поступивший вызов получает отказ. Обслуживание абонентов операторами длится 30 ± 20 с. Вызовы поступают в справочную через каждые 5 ± 3 с.

Цели моделирования:

Смоделировать обслуживание 200 вызовов. Подсчитать количество отказов. Определить коэффициенты загрузки операторов справочной.

есть набросок

STOR1 EQU 1

STOR1 STORAGE 2

STOR2 EQU 2

STOR2 STORAGE 2

STOR3 EQU 3

STOR3 STORAGE 2

STOR4 EQU 4

STOR4 STORAGE 2

STOR5 EQU 5

STOR5 STORAGE 2

		GENERATE 5,3

		 SELECT MIN NOp,1,5,,Q

		 GATE SNF P$NOp, met1	  

		 QUEUE P$NOp

		 SEIZE P$NOp

		 DEPART P$NOp

		 ADVANCE 30,20

		 RELEASE P$NOp

		 TERMINATE 1

met1  SAVEVALUE count+,1

		 TERMINATE

		 START 200

проблема в том что каунт отказов не матается ну и сама программа мне не очень нравится если честно (разбивание очареди на 2 отдельных сториджа)

есть какиенить мысли у кавонибудь?))

Изменено 22 декабря, 2011 пользователем CheЗter

[ЧудоЮдоБегемот]

Сам писал или кто помогал?

[CheЗter]

сам

[ЧудоЮдоБегемот]

голова.... Помоему кроме тебя в нем больше никто не шарит. :'(

[ЧудоЮдоБегемот]

GENERATE 5,3

SELECT MIN NOp,1,5,,Q

GATE SNF P$NOp, met1

QUEUE P$NOp

SEIZE P$NOp

DEPART P$NOp

ADVANCE 30,20

RELEASE P$NOp

TERMINATE 1

Чес ты мне логику которую ты в этот кусок запихнул не опишешь*?

На сколько я понимаю ты генерируешь событие, проверяешь стеки ожидания операторов в случае чего добавляешь, либо откидываешь событие с последуюшим занисением в счетчик отказов так?

[CheЗter]

чтото типа того

[ЧудоЮдоБегемот]

Чес, имхо мб я не шарю, но за такое количество операторов(функц. встроенных), как ты успеваешь отследить и проверять очереди операторов? Как проверяешь, что у тебя отказ возник(не вижу условий, что все заняты)?

Изменено 23 декабря, 2011 пользователем ЧудоЮдоБегемот

[CheЗter]

STOR1 EQU 1

STOR1 STORAGE 2

STOR2 EQU 2								 //

STOR2 STORAGE 2					   //			  

STOR3 EQU 3								//

STOR3 STORAGE 2					  //

STOR4 EQU 4							   //  

STOR4 STORAGE 2					 //			делаем из каждой очереди 2 сториджа

STOR5 EQU 5							  //

STOR5 STORAGE 2					//	

				GENERATE 5,3							 (генерируем транзакты с таймингом 5+-3)

				 SELECT MIN NOp,1,5,,Q	 (выбираем очаредь с наименьшей длиной)

                 GATE SNF P$NOp, met1      (если память не заполнина то текушее значение NOp , если заполнена то уходим на метку met1)

				 QUEUE P$NOp  (встаем в очаредь)

				 SEIZE P$NOp	 (занимаем устройство)

				 DEPART P$NOp  (покидаем очаредь)

				 ADVANCE 30,20 (обработка 30+-20)

				 RELEASE P$NOp  (освобождаем устройство)

				 TERMINATE 1

met1  SAVEVALUE count+,1

				 TERMINATE

				 START 200

Изменено 23 декабря, 2011 пользователем CheЗter

[__mept]

Неужели и правда надеешься на помощь

[WhiteSt]

задроты разные бывают мб и найдутся умники )

[ЧудоЮдоБегемот]

даже в кругу задротов есть умные ............

[CheЗter]

лучшеб помогли бл, а не рассуждали на тему того что все вокруг тупые задроты а вы просто незнаете о чем тема

[ЧудоЮдоБегемот]

тебе когда сделать то надо?

[CheЗter]

завтро

[ЧудоЮдоБегемот]

:'( грусть тоска