买开或者卖开5分钟不成交， 那么撤掉报出的买开或者卖开的报价

小熊鲸鱼大灰狼

买开仓价A:=open+1*mindiff;
买止损价A:=N5K最低点;     
买止盈价A:=open+4*mindiff;
卖开仓价A:=open-1*mindiff;
卖止损价A:=N5K最高点;            
卖止盈价A:=open-4*mindiff;
//*************** 4. 后台交易执行 ********************
//****持仓管理*****

globalvariable:B_01:=0,B_opn_01:=0,B_tkp_01:=0,B_stp_01:=0,B_stp_brk_01:=0,B_idx_01:=0,
               s_01:=0,s_opn_01:=0,s_tkp_01:=0,s_stp_01:=0,s_stp_brk_01:=0,s_idx_01:=0;
               R_C1:=REF(C,1);

//*************** 多头 后台********************
//****平仓*****      

//@多单：止盈

if b_01=1 and close>=b_tkp_01 and tbuyholdingex('','',1)>0 then                                                            
begin
        DA盈:tsell(1,1,lmt,close);                                                     
        b_01:=0;                                                                                                
end

//@多单：价格limitr 止损
if b_01=1 AND R_C1<B_STP_01  and tbuyholdingex('','',1)>0 then                                                         
begin
        DA损:tsell(1,1,lmt,close);                                               
        b_01:=0;
end
//@多单：开仓

if BS买开执行A组 and b_01=0  and tbuyholdingex('','',2)=0 and remainingtime(closetime(0))>15*60 then        
begin

        DA:tbuy(1,1,lmt,买开仓价A);         
        b_01:=1;                                          
        b_opn_01:=买开仓价A;                       
        b_tkp_01:=买止盈价A;                  
        b_stp_01:=买止损价A;                 
        b_idx_01:=barpos;                    
end
//*************** 空头 ********************
//****平仓*****      

//@空单：止盈

if s_01=1 and close<=s_tkp_01 and  tsellholdingex('','',1)>0 then                                                         
begin
        KA盈:tsellshort(1,1,lmt,close);                                                                       
        s_01:=0;                                                                                                                              
end
//@空单：limitr价格止损
if s_01=1 AND R_C1>S_STP_01  and  tsellholdingex('','',1)>0 then                                                         
begin
        KA损:tsellshort(1,1,lmt,open);                                                                 
        s_01:=0;                                                  
end
//@空单：开仓

if BS卖开执行A组 and s_01=0  and  tsellholdingex('','',2)=0 and remainingtime(closetime(0))>15*60 then         //      and TJ位置卖A           
begin
        KA:tbuyshort(BS卖开执行A组,1,lmt,卖开仓价A);        
        s_01:=1;                                               
        s_opn_01:=卖开仓价A;                              
        s_tkp_01:=卖止盈价A;                                
        s_stp_01:=卖止损价A;                                
        s_idx_01:=barpos;                                               
end
//2. 收盘前2分钟自动全部平仓，
  if remainingtime(closetime(0))<2*60  then begin
    tsellshort(tsellholdingex('','',1)>0,tsellholdingex('','',1),mkt);
    tsell(tbuyholdingex('','',1)>0,tbuyholdingex('','',1),mkt);
end

//3. 5分钟后撤单  买开或者卖开5分钟不成交， 那么撤掉报出的买开或者卖开的报价
if TSUBMITEX(1 ,'' ,'' )>5*60 then
begin
        TCANCEL(1,1);
        tbuy(1,1,mkt);
END            

LJ:STRCAT(STRCAT('C:\调试日志\',STKLABEL),'.TXT');
IF ISLASTBAR THEN BEGIN
  DEBUGFILE(LJ,'多头持仓='&NUMTOSTR(TBUYHOLDINGEX('','',2),0)&' 空头持仓='&NUMTOSTR(TSELLHOLDINGEX('','',2),0)&' 最新价='&NUMTOSTR(C,2)&' 前收='&NUMTOSTR(R_C1,2),1);
  DEBUGFILE(LJ,'开多条件1='&NUMTOSTR(BS买开执行A组,0)&' 开多条件2='&NUMTOSTR(BS买开执行B组,0)&' 开多标记1='&NUMTOSTR(B_01,0)&' 开多标记2='&NUMTOSTR(B_02,0),1);
  DEBUGFILE(LJ,'短线买开仓价A='&NUMTOSTR(B_OPN_01,2)&' 短线买止盈价A='&NUMTOSTR(B_TKP_01,2)&' 短线买止损价A='&NUMTOSTR(B_STP_01,2),1);
  DEBUGFILE(LJ,'短线买开仓价B='&NUMTOSTR(B_OPN_02,2)&' 短线买止盈价B='&NUMTOSTR(B_TKP_02,2)&' 短线买止损价B='&NUMTOSTR(B_STP_02,2),1);
  DEBUGFILE(LJ,'短线卖开仓价A='&NUMTOSTR(S_OPN_01,2)&' 短线卖止盈价A='&NUMTOSTR(S_TKP_01,2)&' 短线卖止损价A='&NUMTOSTR(S_STP_01,2),1);
  DEBUGFILE(LJ,'短线卖开仓价B='&NUMTOSTR(S_OPN_02,2)&' 短线卖止盈价B='&NUMTOSTR(S_TKP_02,2)&' 短线卖止损价B='&NUMTOSTR(S_STP_02,2),1);
  DEBUGFILE(LJ,'-------------------------------------------------------',1);
END

技术010

TSUBMITEX(1 ,'' ,'' )这个是返回的开多未成交距离当前的秒数，你账户栏中是开多的未成交单吗？

小熊鲸鱼大灰狼

小熊鲸鱼大灰狼 发表于 2024-3-25 17:25
有多有空的

后台是多空都有的

小熊鲸鱼大灰狼

技术010 发表于 2024-3-25 17:16
TSUBMITEX(1 ,'' ,'' )这个是返回的开多未成交距离当前的秒数，你账户栏中是开多的未成交单吗？

其实我要求的是 如果买开卖开已经报单， 但是5分钟不成交， 那么撤掉报出的买开或者卖开的报价， 具体命令我不会。

技术009

if tsubmitex(1 ,'' ,'' )>5*60 then
begin
        tcancel(1,1);
        tbuy(1,1,mkt);
end   


if tsubmitex(3 ,'' ,'' )>5*60 then
begin
        tcancel(1,3);
        tbuyshort(1,1,mkt);
end   

那就在之前的基础上加一个空头的未成交判断就行了。

小熊鲸鱼大灰狼

技术009 发表于 2024-3-26 10:04
if tsubmitex(1 ,'' ,'' )>5*60 then
begin
        tcancel(1,1);

哦， 难怪， 少写了空头

小熊鲸鱼大灰狼

比如PTA2049这笔单， 卖开限价 5952， 22：46分报的单，就一直挂在那里， 没有撤单。请问这是什么问题？ 代码应该没有问题。 还有在后台交易的售后， 是不是电脑不能关机？

技术008

看函数说明，这个是依赖后天记录里的情况的
手工下单是不认的

技术009

5952开空的话，按照后面行情，应该早就成交了吧.

账户重新登陆下再看下订单状态.
  

小熊鲸鱼大灰狼

这个是昨天晚上凌晨的未成交委托， 所以觉得奇怪