M8:=TRMA(C,8);
M5:TRMA(C,5),COLORBLUE;
IR:=ISLASTBAR;
B1:=CROSS(M5,M8);
BS1:=CROSS(M8,M5);
HD:=HOLDING;
IF HD>0 THEN BEGIN
SELL(BS1,1,LIMITR,C);
END
IF HD<0 THEN BEGIN
SELLSHORT(B1,1,LIMITR,C);
END
IF IR THEN BEGIN
DEBUGOUT(B1=%.0f,B1);
DEBUGOUT(BS1=%.0f,BS1);
DEBUGFILE('F:\TEST\TE11.TXT','B1:%.OF',B1);
DEBUGFILE('F:\TEST\TE11.TXT','BS1:%.OF',BS1);
END
IF HD=0 THEN BEGIN
BUY(B1,1,LIMITR,C);
BUYSHORT(BS1,1,LIMITR,C);
IF IR THEN
DEBUGOUT(HD=%.0f,HD);
DEBUGFILE('F:\TEST\TE11.TXT','HD:%.OF',HD);
END
是数字0,是从《DEBUGFILE----使用日志方式完善您的策略》中复制过来的。
改成了数字2,依旧。
M8:=TRMA(C,8);
M5:TRMA(C,5),COLORBLUE;
IR:=ISLASTBAR;
B1:=CROSS(M5,M8);
BS1:=CROSS(M8,M5);
HD:=HOLDING;
IF HD>0 THEN BEGIN
SELL(BS1,1,LIMITR,C);
END
IF HD<0 THEN BEGIN
SELLSHORT(B1,1,LIMITR,C);
END
IF IR THEN BEGIN
DEBUGOUT('B1=%.2f',B1);
DEBUGOUT('BS1=%.2f',BS1);
DEBUGFILE('F:\TEST\TE11.TXT','B1:%.2F',B1);
DEBUGFILE('F:\TEST\TE11.TXT','BS1:%.2F',BS1);
END
IF HD=0 THEN BEGIN
BUY(B1,1,LIMITR,C);
BUYSHORT(BS1,1,LIMITR,C);
IF IR THEN
DEBUGFILE('F:\TEST\TE11.TXT','HD:%.2F',HD);
END
谢谢,有输出了。