 
等级: 超级版主
- 注册:
- 2021-5-18
- 曾用名:
|
开仓条件:tbuyholding(1)=0;
平仓条件:tbuyholding(1)>0;
//正常开平程序
if 开仓条件 then
begin
tbuy(1,1,lmt,close-5*MINDIFF);
end
if 平仓条件 then
BEGIN
tsell(1,1,lmt,close+5*MINDIFF);
end
//开仓的简单,撤单后直接再开就可以了
if TISPRVREMAIN(1)=1 and TIMETOT0(currenttime)-TIMETOT0(TORDERTIME( 1,1 ))>20 then
BEGIN
TCANCEL(1,1);
tbuy(1,1,mkt);
end
//平仓时候,因为你撤单动作发出去,单子并不是立即解冻的,需要用一个全局变量去记录
//然后根据变量=1,表示执行过撤单了等下次轮训时候配合持仓大于0进行撤单
if TISPRVREMAIN(2)=1 and TIMETOT0( currenttime)-TIMETOT0( TORDERTIME( 2,1 ))>20 then
BEGIN
TCANCEL(1,2);
EXTGBDATASET(STKLABEL,1);
end
if EXTGBDATA(STKLABEL)=1 and tbuyholding(1)>0 then
begin
tsell(1,1,mkt);
EXTGBDATASET(STKLABEL,0);
end |
|