ss:=1;
//手数
extgbdataset(t1_position,0);
//0表示没有仓位,1表示持有多头, -1表示持有空头
extgbdataset(t1_holding,0);
//0表示没有仓位,>0表示持有多头, 1 then exit;
//如果当是最后一根k线,执行
IF islastbar andtime0then begin
tsell(1,ss,mkt);
tbuyshort(1,ss,mkt);
extgbdataset(t1_position,-1);
extgbdataset(t1_holding,-ss);
extgbdataset(t1_enterbarpos,barpos);
goto continueline ;
end
END//ifISLASTBAR
iftime>=151300 then begin
tsell(extgbdata(t1_holding)>0,ss,mkt);
tsellshort(extgbdata(t1_holding)<0,ss,mkt);
extgbdataset(t1_position,0);
extgbdataset(t1_holding,0);
end
continueline@ 资产:tasset,linethick0;
position:=extgbdata(t1_position);
t1holding:=extgbdata(t1_holding);
debugfile(d:\debug\803555.txt,position=%.0f ,position) ;
debugfile(d:\debug\803555.txt,t1holding=%.0f ,t1holding) ;