在图形化交易时,买卖点判断是在每个周期k线结束时候。看指标是否符合模型。
我想现在用vba写交易模型,使用ReportNotify事件接收数据,用什么方法判断周期k线结束?
调取周期的行情数据,取最后一个K线的时间数据,在没有形成新K线时这个值会一直保持不变
Sub MarketData_ReportNotify(ReportData)
dim IF00K
IF ReportData.Label="IF00" then '
Set IF00K = marketdata.GetHistoryData("IF00","ZJ",1,10) '取最近10根K线
IF Document.GetExtData("IF00LASTKtime")<> IF00K.date(IF00K.count-1) then
CALL Document.SetExtData("IF00LASTKtime",IF00K.date(IF00K.count-1))
'以下处理形成新K线有关事务
'
'
ELSE
'以下处理没有新K线时事务
'
END IF
END IF
End Sub