我后台程式条件成立,有些信号开了仓,有些信号没有开仓。限制了同一条件下,一个品种只开一次仓,平仓后再开。
if duo and extgbdata(stklabel+'nn1')=0 then begin
tbuy(1,手数,mkt);
extgbdataset(stklabel+'nn1',1);
extgbdataset(stklabel+'ss15',手数);
end
DEBUGFILE('D:\调试日志.txt',stklabel+'nn1%.2f',extgbdata(stklabel+'nn1'));
s:=ref(15atr,tenterbars);
if kong and extgbdata(stklabel+'mm1')=0 then begin
tbuyshort(1,手数,mkt);
extgbdataset(stklabel+'ss15',手数);
extgbdataset(stklabel+'mm1',1);
end
DEBUGFILE('D:\调试日志.txt',stklabel+'mm1%.2f',extgbdata(stklabel+'mm1'));
s:=ref(15atr,tenterbars);
if l<=tENTERPRICE-z*s and tENTERBARS>0 and extgbdata(stklabel+'nn1')=1 and tbuyholding(1)>0 then begin
tsell(1,extgbdata(stklabel+'ss15'),mkt);
extgbdataset(stklabel+'nn1',0);
extgbdataset(stklabel+'ss15',0);
end
DEBUGFILE('D:\调试日志.txt',stklabel+'nn1%.2f',extgbdata(stklabel+'nn1'));
if h>=tENTERPRICE+z*s and tENTERBARS>0 and extgbdata(stklabel+'mm1')=1 and tsellholding(1)>0 then BEGIN
tsellshort(1,extgbdata(stklabel+'ss15'),mkt);
extgbdataset(stklabel+'mm1',0);
extgbdataset(stklabel+'ss15',0);
end
DEBUGFILE('D:\调试日志.txt',stklabel+'mm1%.2f',extgbdata(stklabel+'mm1'));
3月25日下午,铝的条件成立,开了仓,后面一根K线上螺纹钢达到条件,却没有开仓了。调试日志里显示螺纹钢的限制开仓的开关也是开着的。
是不是代码有问题,铝开了之后一根K线上螺纹出了信号没有开仓,再过了几根K线,热卷板出了信号也没有开仓。
调试文件我只输出开关信号,螺纹的开关是开着的,开仓条件也是达到了的,我的开条件是K线走完开仓,同时条件是很简单,均线发散,价格突破,做多的条件是成立的,显示为1.