Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共11 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:如何输出盘中消息到文件?

1楼
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);

2楼
infocell 发表于:2015/3/3 10:04:55
VARIABLE:Is_debug=1,Is_log=1;
3楼
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);
4楼
infocell 发表于:2015/3/3 11:06:07
我用原来的语句好象也能输出一条,我是希望每次开仓都能输出一条,但好象文件中只有一条,怎么办?
5楼
jinzhe 发表于:2015/3/3 11:07:52

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

    开仓语句;

    文字输出语句;

end

6楼
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

7楼
jinzhe 发表于:2015/3/3 11:28:56

截图说明一下,同时把你全部的代码贴出,我做本地分析

8楼
infocell 发表于:2015/3/3 11:45:24

图片点击可在新窗口打开查看此主题相关图片如下:snap14.jpg
图片点击可在新窗口打开查看
9楼
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); 

10楼
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,中间没有其它修改的操作

 

共11 条记录, 每页显示 10 条, 页签: [1] [2]


Powered By Dvbbs Version 8.3.0
Processed in 0.03906 s, 3 queries.