GPSS консультация

@Semtex · Регистрация: 26.08.2021

Студворк — интернет-сервис помощи студентам

Здравствуйте интернет.

Нужна помощь\консультация\подсказка по поводу GPSS.

Я сделал задание, написал код:

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
*****Инициализаия переменных из условия*****
pL1    EQU    0.05          ; Параметр потока 1-й категории
pL2    EQU    0.03          ; Параметр потока 2-й категории
pS1    EQU    30            ; Прибыль 1-й категории
pS2    EQU    40            ; Прибыль 2-й категории
pS3    EQU    5             ; Штраф 1-й категории
pS4    EQU    30            ; Штраф 2-й категории
pS5    EQU    0.25          ; Стоимость аренды вспомогательного канала
pS6    EQU    0.5           ; 
pT1    EQU    40            ; Время передачи по основной линии
pdT1   EQU    10            ; 
pT2    EQU    30            ; Время передачи по вспомогательной линии
pdT2   EQU    5             ; 
*****Параметры моделирования*****
pK     EQU    0     ; Параметр k  
pDisc  EQU    0             ; Параметр  0 без приоритета, 1 - приоритет 1 категории, 2 приоритет 2 категории (блок TEST E сравнения категории и значения работал не коррекно поэтому выставление приоритета вручную у блоков)
*******Размеры буферных регистров*****
RegA    STORAGE    2            ; Размер буфера пункта A
RegB    STORAGE    2            ; Размер буфера пункта B
 
**********Передача из пункта А в В**********
GENERATE (POISSON(1, 1/pL1))        ; Поступление пакетов в А от пользователей 1 категории (Exponential(1,0,1/pL1))
ASSIGN    1,1           ; Запоминаем категорию
ASSIGN    2,pS1         ; Прибыль
ASSIGN    3,pS3             ; Штраф
PRIORITY  0             ; Приоритет для дисциплины (о общий, 1 - приоритет 2 категории, 5 приоритет 1 категории)
ASSIGN    4,(pK#pS6)    ; Затраты на ускорение   
TRANSFER ,checkRegA         ; переход к проверке на занятость регистра
 
GENERATE (POISSON(1, 1/pL2))        ; Поступление пакетов в А от пользователей 2 категории
ASSIGN    1,2           ; Запоминаем категорию
ASSIGN    2,pS2         ; Прибыль
ASSIGN    3,pS4             ; Штраф
PRIORITY  0             ; Приоритет для дисциплины (о общий, 1 - приоритет 1 категории, 5 приоритет 2 категории)
ASSIGN    4,(pK#pS6)    ; Затраты на ускорение   ;
TRANSFER ,checkRegA         ; переход к проверке на занятость регистра
 
checkRegA TEST L S$RegA,2,PlDup     ; Проверка (Если регистр пункта А занят  переход на вспомогательную связь)
TRANSFER ,EnterKanalAB  ; Переход  передаче по дуплексному каналу
 
 
**********Передача из пункта B в A**********
GENERATE (POISSON(1, 1/pL1))        ; Поступление пакетов в В от пользователей 1 категории
ASSIGN    1,1       ; Запоминаем категорию
ASSIGN    2,pS1         ; Прибыль
ASSIGN    3,pS3             ; Штраф
PRIORITY  0             ; Приоритет для дисциплины (о общий, 1 - приоритет 2 категории, 5 приоритет 1 категории)
ASSIGN    4,(pK#pS6)    ;Затраты на ускорение   ;
TRANSFER ,checkRegB         ; переход к проверке на занятость регистра
 
GENERATE (POISSON(1, 1/pL2))        ; Поступление пакетов в В от пользователей 2 категории
ASSIGN    1,2           ; Запоминаем категорию
ASSIGN    2,pS2             ; Прибыль
ASSIGN    3,pS4             ; Штраф
PRIORITY  0             ; Приоритет для дисциплины (о общий, 1 - приоритет 1 категории, 5 приоритет 2 категории)
ASSIGN    4,(pK#pS6)    ;Затраты на ускорение   ;
TRANSFER ,checkRegB         ; переход к проверке на занятость регистра
 
checkRegB TEST L S$RegB,2,PlDup     ; Проверка (Если регистр пункта B занят переход на вспомогательную связь)
TRANSFER ,EnterKanalBA      ; Переход  передаче по дуплексному каналу
 
**********Канал передачи АВ***************
EnterKanalAB   ENTER RegA       ;помещаем в регистр
ASSIGN 6,AC1        ;
SEIZE kAB               ;Занимаем устройство канал передачи АВ
LEAVE RegA              ;Освобождение буфера от передаваемого пакета
ADVANCE (uniform(1,pT1-pK-pdT1,pT1-pK+pdT1))         ;Передача 
RELEASE kAB             ;Освобождаем канал
ASSIGN 9,AC1            ;запоминаем время окончания обслуживания
SAVEVALUE TimeOneA,P9   ;
SAVEVALUE TimeOneA-,P6  ; узнаем время обраотки транзакта
ASSIGN 10,TimeOneA
TRANSFER ,Sink          ;к выводу из модели
 
**********Канал передачи BA***************
EnterKanalBA ENTER RegB     ;помещаем в регистр
ASSIGN 6,AC1        ;запоминаем время начала передачи пакета
SEIZE kBA               ;Занимаем устройство канал передачи АВ
LEAVE RegB              ;Освобождение буфера от передаваемого пакета
ADVANCE (uniform(1,pT1-pK-pdT1,pT1-pK+pdT1))         ;Передача 
RELEASE kBA             ;Освобождаем канал
ASSIGN 9,AC1            ;запоминаем время окончания обслуживания
SAVEVALUE  TimeOneB,P9  ;
SAVEVALUE  TimeOneB-,P6 ; узнаем время обраотки транзакта
ASSIGN 10,TimeOneB      ; запомним в 10 параметр пакета время его обработки
TRANSFER ,Sink          ;к выводу из модели
 
**********Передача по вспомогательной связи**********
PlDup GATE NU PDup,SinkEject        ;Если вспомогательная связь занята то отказ
ASSIGN 6,AC1            ;запоминаем время начала передачи пакета
SAVEVALUE Time,FT$PDup      ;запоминаем среднее время обслуживания в вспом.связи
SEIZE PDup              ;Занимаем вспом. связь
ASSIGN 7,(uniform(1,pT2-pdT2,pT2+pdT2)) ; Время передачи пакета по линии (задержка 30(+/-)5 мс)
ADVANCE P7              ;Передача 
RELEASE PDup            ;Освобождаем вспом.связь
ASSIGN 8,(P7#pS6)           ;Запоминаем ренту по транзакту
SAVEVALUE Ren,P8            ;находим убытки при использовании вспом.связи за 1 пакет
SAVEVALUE Renta+,P8         ;находим убытки при использовании вспом.связи общее значение
SAVEVALUE Balance-,P8       ;находим убытки при использовании вспом.связи вычитаем траты из баланса
ASSIGN 9,AC1            ;запоминаем время окончания обслуживания
SAVEVALUE TimeOne,P9    ;
SAVEVALUE TimeOne-,P6   ; узнаем время обраотки транзакта
ASSIGN 10,TimeOne       ; запомним в 10 параметр пакета время его обработки
TRANSFER ,Sink          ;к выводу из модели
 
SinkEject SAVEVALUE Balance-,P3     ;штраф за отказ вычитаем из баланса
SAVEVALUE Penalty+,P3       ;штраф за отказ
OTKAZ TERMINATE             ;вывод из системы отказов
 
Sink SAVEVALUE Balance+,P2      ;прибыль учитываем в балансе
SAVEVALUE Balance-,P4       ;вычитаем затраты на ускорение
SAVEVALUE Profit+,P2        ;прибыль
SAVEVALUE Boost+,P4     ;затраты на ускорение
YSPEX TERMINATE             ;вывод из системы обработанных пакетов
 
**********Сегмент времени**********
GENERATE 60000          ; время работы 1мин=60000мс
 
TERMINATE 1             ;уменьшаем счетчик на 1 через 60000мс
 
START 1                 ;задание значения счетчика завершения

Программа проводит симуляцию и выдает репорт:

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
GPSS World Simulation Report - ModelABkanalDuplexSTART.16.1
 
 
                   Tuesday, March 18, 2025 16:21:47  
 
           START TIME           END TIME  BLOCKS  FACILITIES  STORAGES
                0.000          60000.000    80        3          2
 
 
              NAME                       VALUE  
          BALANCE                     10021.000
          BOOST                       10023.000
          CHECKREGA                      15.000
          CHECKREGB                      31.000
          ENTERKANALAB                   33.000
          ENTERKANALBA                   44.000
          KAB                         10017.000
          KBA                         10016.000
          OTKAZ                          73.000
          PDISC                               0
          PDT1                           10.000
          PDT2                            5.000
          PDUP                        10018.000
          PENALTY                     10025.000
          PK                                  0
          PL1                             0.050
          PL2                             0.030
          PLDUP                          55.000
          PROFIT                      10022.000
          PS1                            30.000
          PS2                            40.000
          PS3                             5.000
          PS4                            30.000
          PS5                             0.250
          PS6                             0.500
          PT1                            40.000
          PT2                            30.000
          REGA                        10014.000
          REGB                        10015.000
          REN                         10026.000
          RENTA                       10027.000
          SINK                           74.000
          SINKEJECT                      71.000
          TIME                        10019.000
          TIMEONE                     10028.000
          TIMEONEA                    10024.000
          TIMEONEB                    10020.000
          YSPEX                          78.000
 
 
 LABEL              LOC  BLOCK TYPE     ENTRY COUNT CURRENT COUNT RETRY
                    1    GENERATE          2996             0       0
                    2    ASSIGN            2996             0       0
                    3    ASSIGN            2996             0       0
                    4    ASSIGN            2996             0       0
                    5    PRIORITY          2996             0       0
                    6    ASSIGN            2996             0       0
                    7    TRANSFER          2996             0       0
                    8    GENERATE          1801             0       0
                    9    ASSIGN            1801             0       0
                   10    ASSIGN            1801             0       0
                   11    ASSIGN            1801             0       0
                   12    PRIORITY          1801             0       0
                   13    ASSIGN            1801             0       0
                   14    TRANSFER          1801             0       0
CHECKREGA          15    TEST              4797             0       0
                   16    TRANSFER          1504             0       0
                   17    GENERATE          3000             0       0
                   18    ASSIGN            3000             0       0
                   19    ASSIGN            3000             0       0
                   20    ASSIGN            3000             0       0
                   21    PRIORITY          3000             0       0
                   22    ASSIGN            3000             0       0
                   23    TRANSFER          3000             0       0
                   24    GENERATE          1802             0       0
                   25    ASSIGN            1802             0       0
                   26    ASSIGN            1802             0       0
                   27    ASSIGN            1802             0       0
                   28    PRIORITY          1802             0       0
                   29    ASSIGN            1802             0       0
                   30    TRANSFER          1802             0       0
CHECKREGB          31    TEST              4802             0       0
                   32    TRANSFER          1513             0       0
ENTERKANALAB       33    ENTER             1504             0       0
                   34    ASSIGN            1504             2       0
                   35    SEIZE             1502             0       0
                   36    LEAVE             1502             0       0
                   37    ADVANCE           1502             1       0
                   38    RELEASE           1501             0       0
                   39    ASSIGN            1501             0       0
                   40    SAVEVALUE         1501             0       0
                   41    SAVEVALUE         1501             0       0
                   42    ASSIGN            1501             0       0
                   43    TRANSFER          1501             0       0
ENTERKANALBA       44    ENTER             1513             0       0
                   45    ASSIGN            1513             2       0
                   46    SEIZE             1511             0       0
                   47    LEAVE             1511             0       0
                   48    ADVANCE           1511             1       0
                   49    RELEASE           1510             0       0
                   50    ASSIGN            1510             0       0
                   51    SAVEVALUE         1510             0       0
                   52    SAVEVALUE         1510             0       0
                   53    ASSIGN            1510             0       0
                   54    TRANSFER          1510             0       0
PLDUP              55    GATE              6582             0       0
                   56    ASSIGN            1634             0       0
                   57    SAVEVALUE         1634             0       0
                   58    SEIZE             1634             0       0
                   59    ASSIGN            1634             0       0
                   60    ADVANCE           1634             1       0
                   61    RELEASE           1633             0       0
                   62    ASSIGN            1633             0       0
                   63    SAVEVALUE         1633             0       0
                   64    SAVEVALUE         1633             0       0
                   65    SAVEVALUE         1633             0       0
                   66    ASSIGN            1633             0       0
                   67    SAVEVALUE         1633             0       0
                   68    SAVEVALUE         1633             0       0
                   69    ASSIGN            1633             0       0
                   70    TRANSFER          1633             0       0
SINKEJECT          71    SAVEVALUE         4948             0       0
                   72    SAVEVALUE         4948             0       0
OTKAZ              73    TERMINATE         4948             0       0
SINK               74    SAVEVALUE         4644             0       0
                   75    SAVEVALUE         4644             0       0
                   76    SAVEVALUE         4644             0       0
                   77    SAVEVALUE         4644             0       0
YSPEX              78    TERMINATE         4644             0       0
                   79    GENERATE             1             0       0
                   80    TERMINATE            1             0       0
 
 
FACILITY         ENTRIES  UTIL.   AVE. TIME AVAIL. OWNER PEND INTER RETRY DELAY
 KBA               1511    1.000      39.699  1     9580    0    0     0      2
 KAB               1502    1.000      39.931  1     9590    0    0     0      2
 PDUP              1634    0.815      29.932  1     9599    0    0     0      0
 
 
STORAGE            CAP. REM. MIN. MAX.  ENTRIES AVL.  AVE.C. UTIL. RETRY DELAY
 REGA                2    0   0     2     1504   1    1.795  0.897    0    0
 REGB                2    0   0     2     1513   1    1.798  0.899    0    0
 
 
SAVEVALUE               RETRY       VALUE
 TIME                     0         29.939                            
 TIMEONEB                 0        122.799                            
 BALANCE                  0      59339.990                            
 PROFIT                   0     156250.000                            
 BOOST                    0              0                            
 TIMEONEA                 0         94.823                            
 PENALTY                  0      72465.000                            
 REN                      0         15.554                            
 RENTA                    0      24445.010                            
 TIMEONE                  0         31.108                            
 
 
FEC XN   PRI         BDT      ASSEM  CURRENT  NEXT  PARAMETER    VALUE
  9599    0       60009.520   9599     60     61       1          1.000
                                                       2         30.000
                                                       3          5.000
                                                       7         28.520
                                                       6      59981.000
                                                       4          0.000
  9580    0       60012.452   9580     48     49       1          2.000
                                                       2         40.000
                                                       3         30.000
                                                       6      59895.000
                                                       4          0.000
  9603    0       60013.000   9603      0     17
  9604    0       60014.000   9604      0      1
  9602    0       60018.000   9602      0      8
  9600    0       60023.000   9600      0     24
  9590    0       60024.322   9590     37     38       1          1.000
                                                       2         30.000
                                                       3          5.000
                                                       6      59934.000
                                                       4          0.000
  9605    0      120000.000   9605      0     79

Помогите мне понять, что есть что? Можно и платную консультацию(распишите сколько стоит час вашего времени в лс, как будет проводится консультация и когда)

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .