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

[浏览完整版]

标题：如何用文本记录下单日志

1楼

QQ56048933 发表于：2014/6/26 9:55:03

//图表日内交易模块:

IF HOLDING=0 THEN BEGIN

//多头开仓

IF 开多 THEN BEGIN

BUY(1,P,LIMITR,CLOSE);

MAXPROFIT:=0;

//DEBUGFILE()

END

//空头开仓

IF 开空 THEN BEGIN

BUYSHORT(1,P,LIMITR,CLOSE);

MAXPROFIT:=0;

// DEBUGFILE()

END

IF HOLDING>0 THEN BEGIN

//多头平仓

IF 平多 THEN

SELL(1,HOLDING,LIMITR,CLOSE);

END

IF HOLDING<0 AND 平空 THEN BEGIN

SELLSHORT(1,P,LIMITR,CLOSE);

END

我想用 DEBUGFILE()函数把下单的品种方向数量输出到文本怎么办呢

2楼

yukizzc 发表于：2014/6/26 10:14:03

debugfile('D:\test.txt','开多'&STKLABEL&'数量为%.0f',P) //放到开多语句后面

3楼

QQ56048933 发表于：2014/6/26 10:39:10

谢谢我输出成为这样

2014-06-26 10:33:29.540 IF07卖出价格2144
2014-06-26 10:33:29.541 开数量1

我用两行才能写出数量上面的价格是CLOSE 怎么养才能够写到一行。最好合约代码和方向之间有个空格怎么办

4楼

QQ56048933 发表于：2014/6/26 10:41:04

还有时间出到秒就可以了后面的不必要

5楼

yukizzc 发表于：2014/6/26 11:01:19

debugfile('D:\66666.txt',STKLABEL&' '&'开多'&'数量为'&NUMTOSTR(P,0)&'价格为%.2f',close) //用&输出多个字符串做到

6楼

王锋发表于：2014/6/26 12:01:33

方向:='';

IF HOLDING=0 THEN BEGIN

//多头开仓

IF 开多 THEN BEGIN

BUY(1,P,LIMITR,CLOSE);

方向:='买';

MAXPROFIT:=0;

IF Islastbar Then

DEBUGFILE2('D:\TESTMO.TXT',STKLABEL&' '&方向&' '&NUMTOSTR(P,0),0);

END

//空头开仓

IF 开空 THEN BEGIN

BUYSHORT(1,P,LIMITR,CLOSE);

方向:='卖';

MAXPROFIT:=0;

IF Islastbar Then

DEBUGFILE2('D:\TESTMO.TXT',STKLABEL&' '&方向&' '&NUMTOSTR(P,0),0);

END

IF HOLDING>0 THEN BEGIN

//多头平仓

IF 平多 THEN

SELL(1,HOLDING,LIMITR,CLOSE);

END

IF HOLDING<0 AND 平空 THEN BEGIN

SELLSHORT(1,P,LIMITR,CLOSE);

END

[此贴子已经被作者于2014/6/26 12:02:58编辑过]

7楼

QQ56048933 发表于：2014/6/26 16:16:26

谢谢内容已经解决但是，时间还是有秒之后的内容怎么写到秒就好了

8楼

王锋发表于：2014/6/26 16:32:38

时间还是有秒之后的内容怎么写到秒就好了

这句话我们不明白

9楼

QQ56048933 发表于：2014/6/26 23:22:49

就是秒之后还有毫秒这个不是问题了，这样所有的日志都保存到一个文本里去了，怎么样可以每天的交易单独成为一个文本呢，就是以日期命名的文本

10楼

yukizzc 发表于：2014/6/27 9:02:20

aa:NUMTOSTR( date, 0);

debugfile('D:\'&aa&'.txt',STKLABEL&' '&'开多'&'数量为'&NUMTOSTR(P,0)&'价格为%.2f',close)； //输出文件的路径这里用date的字符串形式替换

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