模拟K线下记录开平仓，并计算盈亏　[金字塔]

本程序可以将模拟k线模式下的开平仓信号输出到Excel，并计算逐笔交易的盈亏情况，对于想快速测试自己的模型能不能赚钱的朋友，可以使用这个程序来做盘后的分析。

程序中用到的知识点：

1、策略中的信号写到全局变量

2、VBA后台监控全局变量的值，当开平仓条件成立时，读出全局变量的值

3、将全局变量的值写到Excel，开仓时记录新行，平仓时，寻找对应的开仓记录，并计算本次交易的盈亏。

程序下载地址：http://www.weistock.com/download/testK.rar
 

安装说明：1、下载后，解压缩到d:\          2、在金字塔中导入MdMoni.bas文件

使用说明:  1、启动VBA,系统就会自定打开d:\test.xls文件，不要关闭

               2、打开技术分析，选中测试公式

               3、在工具菜单，打开模拟K线模式，选择好开始日期，启动模拟K线

               4、切换到Excel,信号出现时，观察是否写到Excel了。

补充说明：

1、程序中使用了定时器，时间间隔为1秒，所以，K线回放不能过快，过快可能会导致信号漏掉的情况。

2、现在程序中的品种指定了是IF09，如果，需要测试别的品种，可以将程序中的Code和Market两个变量修改成你要监控的品种代码和市场代码。

同时，在此征集不通过定时器，也能实现此功能的方案，毕竟使用定时器太耗资源，效率不高。

这个在实盘中 是否也可以应用？

实盘也可以应用，思路差不多，只是开仓价可能需要用市价才更容易成交。

如果只想记录逐笔成交情况，则需要将成交写Excel的代码放到Order_OrderStatusEx过程中。

可以参看我另一个帖子哦。

http://www.weistock.com/bbs/dispbbs.asp?boardid=9&Id=7831

   那个帖子也拜读了，真的不错 。我只想记录逐笔成交情况 就像版主那个自动交易所做的那样，

能否把你那个帖子所用代码发一个学习学习。另外还有一个问题请教：这个记录的是是虚拟持仓呢

还是实际持仓？谢谢