Приложение 2
GPSS – программа для одноканальной СМО
; GPSS/PS Program File D:STARTUP.GPS.
(V 2,#37349) 01.01.2005. 01:37:35
20 EXPON FUNCTION RN1,C24
0,0/.1,.104/.2,.222/.3,.355/.4,.509/.5,.69/
.6,.915/.7,1.2/.75,1.38
.8,1.6/.84,1.83/.88,2.12/.9,2.3/.92,2.52/
.94,2.81/.95,2.99/.96,3.2
.97,3.5/.98,3.9/.99,4.6/.995,5.3/.998,6.2/
.999,7/.9998,8
30 ;
40 TIME TABLE MP1,100,100,10
45 TQUE QTABLE QUE1,2,2,20
50 ;
60 GENERATE 100,FN$EXPON
65 MARK 1
71 QUEUE QUE1
75 SEIZE COMPU
76 DEPART QUE1
80 ADVANCE 50,FN$EXPON
85 RELEASE COMPU
90 TABULATE TIME
95 TABULATE TQUE
110 TERMINATE 1
Приложение 3
GPSS - ПРОГРАММА СМО_М_1.GPS
; GPSS/PC Program File CMO_M_1.GPS.
(V 2, # 37349) 01-01-2005
10 SIMULATE
15 RMULT 17
20 EXPON FUNCTION RN1,C24
0,0/.1,.104/.2,.222/.3,.355/.4,.509/.5,.69/.6,.915/
.7,1.2/.75,1.38
.8,1.6/.84,1.83/.88,2.12/.9,2.3/.92,2.52/.94,2.81/
.95,2.99/.96,3.2
.97,3.5/.98,3.9/.99,4.6/.995,5.3/.998,6.2/.999,7/
.9998,8
30 ;
40 TIME TABLE MP1,50,50,50
45 TQUE QTABLE QUE1,1,1,50
50 ;
55 CHANEL STORAGE 2
56 ;
60 GENERATE 100,FN$EXPON
65 MARK 1
71 QUEUE QUE1
75 ENTER CHANEL
76 DEPART QUE1
80 ADVANCE 100,FN$EXPON
85 LEAVE CHANEL
90 TABULATE TIME
100 TABULATE TQUE
110 TERMINATE 1
120 START 10000
Приложение 4 gpss- программа смо_м_2.Gps.
; GPSS/PC Program File D:CMO_M_2.GPS.
(V 2, # 37349) 01-01-2005
10 SIMULATE
15 RMULT 17
20 EXPON FUNCTION RN1,C24
0,0/.1,.104/.2,.222/.3,.355/.4,.509/.5,.69/.6,.915/
.7,1.2/.75,1.38
.8,1.6/.84,1.83/.88,2.12/.9,2.3/.92,2.52/.94,2.81/
.95,2.99/.96,3.2
.97,3.5/.98,3.9/.99,4.6/.995,5.3/.998,6.2/.999,7/
.9998,8
30 ;
40 TIME TABLE MP1,50,50,50
45 TQUE QTABLE QUE1,1,1,50
55 CHANEL STORAGE 2
56;
60 GENERATE 100
65 MARK 1
71 QUEUE QUE1
75 ENTER CHANEL
76 DEPART QUE1
78 ADVANCE 50
80 ADVANCE 100,FN$EXPON
85 LEAVE CHANEL
90 TABULATE TIME
100 TABULATE TQUE
110 TERMINATE 1
120 START 1000