以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  如何输出盘中消息到文件？  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=76074)
--  作者：infocell
--  发布时间：2015/3/3 10:04:01
--  如何输出盘中消息到文件？

我写了两个语句输出变量到消息框和文件，在消息框可以输出，但无法输出到文件，为什么？   

 IF Is_debug=1 THEN  MSGOUT(TRUE,\'开仓数:\'&numtostr(b_tmpp,0)&\',成交价:\'&numtostr(ENTERPRICE,0)&\',持仓:\'&numtostr(HOLDING,0)&\',浮动盈亏:\'&numtostr(OPENPROFIT,0)&\',总买单数:\'&numtostr(B_NUM,0)&\',资产:\'&numtostr(ASSET,0));
    IF Is_log=1 THEN DEBUGFILE(\'C:\\myTEST.TXT\',\'开仓数:\'&numtostr(b_tmpp,0)&\',成交价:\'&numtostr(ENTERPRICE,0)&\',持仓:\'&numtostr(HOLDING,0)&\',浮动盈亏:\'&numtostr(OPENPROFIT,0)&\',总买单数:\'&numtostr(B_NUM,0)&\',资产:\'&numtostr(ASSET,0),0);

--  作者：infocell
--  发布时间：2015/3/3 10:04:55
--  
VARIABLE:Is_debug=1,Is_log=1;
--  作者：jinzhe
--  发布时间：2015/3/3 10:12:23
--  
DEBUGFILE(\'C:\\myTEST.TXT\',\'开仓数:\'&numtostr(b_tmpp,0)&\',成交价:\'&numtostr(ENTERPRICE,0)&\',持仓:\'&numtostr(HOLDING,0)&\',浮动盈亏:\'&numtostr(OPENPROFIT,0)&\',总买单数:\'&numtostr(B_NUM,0)&\',资产:%.0f\'asset);
--  作者：infocell
--  发布时间：2015/3/3 11:06:07
--  
我用原来的语句好象也能输出一条，我是希望每次开仓都能输出一条，但好象文件中只有一条，怎么办？
--  作者：jinzhe
--  发布时间：2015/3/3 11:07:52
--  

if 开仓条件 and 持仓判断 then begin

    开仓语句;

    文字输出语句;

end
--  作者：infocell
--  发布时间：2015/3/3 11:26:03
--  

我那两条语句是写在一起的，消息框中有消息，但文件中只有一条，难道文件只能写一次？

下面是消息框的输出：
2015/03/03 11:17:41  挂条件单数:1,成交价:9440,持仓:-4,浮动盈亏:1370,总买单数:10,资产:1001610
2015/03/03 11:17:41  挂条件单数:1,成交价:9440,持仓:-3,浮动盈亏:1268,总买单数:10,资产:1001508
2015/03/03 11:17:41  挂条件单数:1,成交价:9440,持仓:-2,浮动盈亏:1165,总买单数:10,资产:1001405
2015/03/03 11:17:41  挂条件单数:1,成交价:9440,持仓:-1,浮动盈亏:1063,总买单数:10,资产:1001303
2015/03/03 11:17:41  挂条件单数:1,成交价:9440,持仓:0,浮动盈亏:0,总买单数:10,资产:1001200
--  作者：jinzhe
--  发布时间：2015/3/3 11:28:56
--  

截图说明一下，同时把你全部的代码贴出，我做本地分析
--  作者：infocell
--  发布时间：2015/3/3 11:45:24
--  

图片点击可在新窗口打开查看此主题相关图片如下：snap14.jpg
图片点击可在新窗口打开查看
--  作者：infocell
--  发布时间：2015/3/3 11:46:50
--  

消息框的输出是都有的，但文件myTEST.TXT中只有一条：

 

2015-03-03 09:33:26.626    开仓数:1,成交价:9675,持仓:0,浮动盈亏:0,总买单数:10,资产:1001700

 

IF Is_debug=1 THEN  MSGOUT(TRUE,\'开仓数:\'&numtostr(tmpppp,0)&\',成交价:\'&numtostr(ENTERPRICE,0)&\',持仓:\'&numtostr(HOLDING,0)&\',浮动盈亏:\'&numtostr(OPENPROFIT,0)&\',总买单数:\'&numtostr(B_NUM,0)&\',资产:\'&numtostr(ASSET,0));
    IF Is_log=1 THEN DEBUGFILE(\'C:\\myTEST.TXT\',\'开仓数:\'&numtostr(tmpppp,0)&\',成交价:\'&numtostr(ENTERPRICE,0)&\',持仓:\'&numtostr(HOLDING,0)&\',浮动盈亏:\'&numtostr(OPENPROFIT,0)&\',总买单数:\'&numtostr(B_NUM,0)&\',资产:%.0f\',asset); 

--  作者：infocell
--  发布时间：2015/3/3 11:48:03
--  

还有部分代码是一楼那种：

 IF Is_debug=1 THEN  MSGOUT(TRUE,\'开仓数:\'&numtostr(b_tmpp,0)&\',成交价:\'&numtostr(ENTERPRICE,0)&\',持仓:\'&numtostr(HOLDING,0)&\',浮动盈亏:\'&numtostr(OPENPROFIT,0)&\',总买单数:\'&numtostr(B_NUM,0)&\',资产:\'&numtostr(ASSET,0));
    IF Is_log=1 THEN DEBUGFILE(\'C:\\myTEST.TXT\',\'开仓数:\'&numtostr(b_tmpp,0)&\',成交价:\'&numtostr(ENTERPRICE,0)&\',持仓:\'&numtostr(HOLDING,0)&\',浮动盈亏:\'&numtostr(OPENPROFIT,0)&\',总买单数:\'&numtostr(B_NUM,0)&\',资产:\'&numtostr(ASSET,0),0);

 

Is_log初始值都是1，中间没有其它修改的操作