3. Представление имитационной модели

Для представления имитационной модели выполните следующие действия:

3.1. Щелкните по пункту File главного меню системы. Появится выпадающее меню;

3.2. Щелкните по пункту New (Создать) выпадающего меню. Появится диалого­вое Окно Новый документ;

3.3. Выделите пункт Model и щелкните по кнопке ОК. Появится окно модели, в котором введите данную программу.

Чтобы вызвать окно для представления имитационной модели в системе GPSSW, можно также нажать комбинацию клавиш Ctrl+Alt+S.

4. Создание имитационной модели

4.1. В окне «Model» («Модель») выберите File / Open (Файл / Открыть), в диалоговом окне выберите Ethernet. gps и нажмите Open (Открыть) (рис 1)

2. Теперь создайте процесс моделирования, выберите Command / Create Simulation (Команда / Создать процесс моделировании).

4.3. Откроем диаграмму задержки сообщений, выберите Window / Simulation Window / Table Window (Окно / Окно процесса моделирования / Окно «Таблица»), в выпадающем списке диалогового окна уже выбрана таблица MSG_DELAYS Нажмите ОК.

Расположите это окно так, чтобы вы могли одновременно видеть и окно «Journal» («Жур­нал»), и диаграмму в окне «Table» («Таблица»).

4.4. Теперь запустим процесс моделирования. Выберите Command / START (Команда /START), так как нам нужен счетчик завершения, рав­ный 1, в диалоговом окне нажмите ОК.

Когда сообщений проходят через Ethernet, в таблице MSG_DELAYS регистрируется продол­жительность их передачи, и мы можем наблюдать их накопление в диаграмме. Процесс мо­делирования завершится, когда будет смоделирована 1 секунда работы в окне «Table» («Таб­лица»). Мы можем видеть, что среднее время задержки сообщений составило немногим меньше одной миллисекунды.

Когда процесс моделирования закончится, GPSS World запишет отчет в файл отчета с именем Ethernet 1.1 (по умолчанию).

********************************************************************

Модель 10 Mb/s сети Ethernet

********************************************************************

Node_Count EQU 100 ;Подсчитать узлы Ethernet

Intermessage_Time EQU 1.0 ;Среднее значение общего количества

сообщений.

Min_Msg EQU 512 ;Самое короткое сообщение в битах

Max_Msg EQU 12144 ;Самое длинное сообщение в битах

Fraction_Short_Msgs EQU 600 ;Короткие сообщения (в долях от 1000)

Slot_Time EQU 0.0512 ;время прохождения 512 бит

Jam_Time EQU 0.0032 ;время прохождения 32 бит

Backoff_Limit EQU 10 ;Не больше чем 10 подпрограмм

Interframe_Time EQU 0.0096 ;96 разрядный

********************************************************************

Определение gpss Функций и Переменных

********************************************************************

Backoff_Delay VARIABLE Slot_Time#V$Backrandom ; Вычисляется задержка

перед повторной попыткой в случае коллизии

Backrandom VARIABLE 1+(RN4@((2^V$Backmin)-1))

Backmin VARIABLE

(10#(10'L'P$Retries))+(P$Retries#(10'GE'P$Retries))

Node_Select VARIABLE 1+(RN3@Node_Count <mailto:1+(RN3@Node_Count>)

Collide VARIABLE

ABS((X$Xmit_Node-P$Node_ID)/100000)'GE'(AC1-X$Xmit_Begin)

Msgtime VARIABLE (0.0001)#V$Msgrand

Msgrand VARIABLE

Min_Msg+(RN1'G'Fraction_Short_Msgs)#(Max_Msg-Min_Msg)

********************************************************************