Реферат Імітаційна модель інтелектуального агента в умовах конкуренції

я кожного олигополиста також випадковим чином розігруються параметри пропонованого продукту і супутніх послуг. Але кожна фірма описується в окремому базисному компоненті: Firm, Firm2, Firm3, а її параметри записуються у вигляді вектора в мобільний компонент. br/>

BASIC COMPONENT Firm

MOBILE SUBCOMPONENT OF CLASS query

DECLARATION OF SUBFUNCTION

strategy (INTEGER: past_buy2, LOCATION FOR query: Stock,

ARRAY [l] LOGICAL: LOST_c, ARRAY [l] REAL: bal, INTEGER: ff1,

INTEGER: I, INTEGER: g, ARRAY [n] REAL: param1, INTEGER: cash,

ARRAY [l] REAL: dem -> ARRAY [n] REAL, INTEGER),

form (ARRAY [n] REAL: PP -> ARRAY [N] REAL)

DECLARATION OF ELEMENTS

STATE VARIABLES

ARRAY [2] past_buyers (INTEGER): = 0, # кількість клієнтів за минулий період

ARRAY [9] parameters1 (REAL): = 0, # масив параметрів фірми

ARRAY [9] p1 (REAL): = 0,

TNext (INTEGER): = 0,

count (INTEGER): = 1,

past_b (INTEGER): = 0,

past_b2 (INTEGER): = 0,

invest (INTEGER): = 0 # Кількість вільних грошових коштів

SENSOR VARIABLES

ff (INTEGER), # Кількість покупців за поточний період

ARRAY [3] balances (REAL), # залишки

ARRAY [3] LOST_cl (LOGICAL), # наявність необслужених клієнтів

ARRAY [9] parameters2 (REAL),

ARRAY [9] parameters3 (REAL),

firm_leader (INTEGER),

g (INTEGER),

ARRAY [3] demand (REAL) # бракуючий обсяг

RANDOM VARIABLES

PRI (REAL): UNIFORM (LowLimit: = 200, UpLimit: = 400), # Ціна

QUAN (INTEGER): IUNIFORM (LowLimit: = 100, UpLimit: = 200), # Обсяг випуску

SAL (REAL): UNIFORM (LowLimit: = 0, UpLimit: = 1), # Знижки

ADV (REAL): UNIFORM (LowLimit: = 15, UpLimit: = 35), # Реклама

QUAL (REAL): EXPO (Mean: = 50), # якість

ASSORT (INTEGER): IUNIFORM (LowLimit: = 1, UpLimit: = 3), # Товарний асортимент

TRU (INTEGER): IUNIFORM (LowLimit: = 2, UpLimit: = 5), # Довіру

REMOT (REAL): EXPO (Mean: = 150), # віддаленість p> DELIV (INTEGER): IUNIFORM (LowLimit: = 1, UpLimit: = 3), # Доставка

Inv (INTEGER): IUNIFORM (LowLimit: = 1, UpLimit: = 4) # Грошові надходження ззовні

TRANSITIONS INDICATORS

print,

ffm,

ffm2,

ffm3

LOCATION

QueryStock1 (query): = 0 query, # накопичувач, містить параметри пропозиції

F1Stock (query): = 0 query # накопичувач, містить параметри пропозиції фірм-конкурентів

SENSOR LOCATION

FStock (query)

DYNAMIC BEHAVIOUR

ON START DO

parameters1 [1] ^: = PRI;

parameters1 [2] ^: = QUAN;

parameters1 [4] ^: = ADV;

parameters1 [5] ^: = QUAL;

parameters1 [6] ^: = 1;

parameters1 [7] ^: = TRU;

parameters1 [8] ^: = REMOT;

parameters1 [9] ^: = DELIV;

SIGNAL ffm;

END

WHENEV...