请问老师:
如何用DEBUGFILE做实盘成交数据的输出?
每次开平仓一次就输出一次成交价
if HOLDING>0 then
DEBUGOUT("开仓价",ENTERPRICE);
if HOLDING<0 then
DEBUGOUT( "平仓价",EXITPRICE );
if short then
buy(1,1,limitr,dnprice);
DEBUGOUT("成交额",AMOUNT);
end
这样应该不行吧
麻烦再问一下:
if myholding<0 then
DEBUGFILE('D:\TEST.TXT','平仓价',EXITPRICE);
如何在后台高频的情况下,在当根K下只输出一次出值?
因为我只需要取一次平仓价就可以了。
而这样的话在后台的高频下会出现
2011-05-27 15:39:31.015 平仓价
2011-05-27 15:39:41.015 平仓价
2011-05-27 15:39:41.843 平仓价
2011-05-27 15:39:42.843 平仓价
2011-05-27 15:39:43.843 平仓价
2011-05-27 15:39:44.843 平仓价
2011-05-27 15:39:45.843 平仓价
2011-05-27 15:39:46.843 平仓价
2011-05-27 15:39:48.843 平仓价
2011-05-27 15:39:49.843 平仓价
2011-05-27 15:39:51.843 平仓价
这样的话就当当在一分钟周期里就会有近百次的输出。
请问老师这个怎么解决?
再试试这个 上一次交易的成交价
t:TYPE(1);
if t=1 or t=3 then
DEBUGOUT("开仓价",ENTERPRICE);
if t=2 or t=4 then
DEBUGOUT( "平仓价",EXITPRICE );
if 开空 then
DEBUGFILE('D:\TEST.TXT','开空',ENTERPRICE);
if 开多 then
DEBUGFILE('D:\TEST.TXT','开多',ENTERPRICE);
if 平空 then
DEBUGFILE('D:\TEST.TXT','平空',EXITPRICE);
if 平多 then
DEBUGFILE('D:\TEST.TXT','平多',EXITPRICE);
请问老师这样能否行呢?
使用VBA,可以参考我发的VBA缠论交易系统,在策略发布区,固顶的贴子。