Реферат: Имитационная модель интеллектуального агента в условиях конкуренции
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
WHENEVER T>=TNext
DO IF (NUMBER(FStock)<>0) DO
SIGNAL ffm3;
(ARRAY p1^,past_b^):=strategy(past_b2,LOCATION FStock,ARRAY LOST_cl,
ARRAY balances,ff,1,g,ARRAY parameters1,invest,ARRAY demand);
SIGNAL ffm2;
END
SIGNAL ffm;
TNext^:=TNext+1;
END
ON ffm DO
QueryStock1^: ADD 1 NEW query
CHANGING
(ARRAY QB^):=form(ARRAY parameters1);
END
END