TTicker
This commit is contained in:
@@ -167,7 +167,10 @@ begin
|
||||
|
||||
var timeframe := TTimeframe.S15;
|
||||
|
||||
var OhlcPoint: IMycConverter<TArray<TDataPoint<TAskBidItem>>, TDataPoint<TOhlcItem>> := TTicksToTimeframe.Create(timeframe);
|
||||
var ticker := TTicker<TDataPoint<TAskBidItem>>.Create;
|
||||
|
||||
var OhlcPoint := TTicksToBars.Create(timeframe);
|
||||
ticker.Sender.Link(OhlcPoint);
|
||||
|
||||
var Timestamps: IMycConverter<TDataPoint<TOhlcItem>, TDateTime> :=
|
||||
TMycGenericConverter<TDataPoint<TOhlcItem>, TDateTime>
|
||||
@@ -272,7 +275,7 @@ begin
|
||||
Stoch.Sender.Link(StochD);
|
||||
Panel.AddDoubleSeries(StochD.Sender, TAlphaColors.Red);
|
||||
|
||||
var done := ExecuteStrategy(Symbol, OhlcPoint);
|
||||
var done := ExecuteStrategy(Symbol, ticker);
|
||||
|
||||
/////
|
||||
|
||||
|
||||
Reference in New Issue
Block a user