欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 撤单问题

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有3037人关注过本帖平板打印复制链接

主题:撤单问题

帅哥哟,离线,有人找我吗?
haizxj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小飞侠 帖子:1781 积分:0 威望:0 精华:0 注册:2013/6/11 20:05:24
撤单问题  发帖心情 Post By:2020/3/19 14:44:48    Post IP:180.169.30.6[只看该作者]

ZL:='srX05'; //主力合约
CZL:='srX09';//次主力合约
AH:=40;
AL:=20;
BH:=10;
BL:=30;
ZLDJ:=DYNAINFO2(28,ZL); //主力买价
ZLKJ:=DYNAINFO2(34,ZL); //主力卖价
ZLDL:=DYNAINFO2(25,ZL); //主力买量
ZLKL:=DYNAINFO2(31,ZL); //主力卖量
CZLDJ:=DYNAINFO2(28,CZL); //次主力买价
CZLKJ:=DYNAINFO2(34,CZL); //次主力卖价
CZLDL:=DYNAINFO2(25,ZL);  //次主力买量
CZLKL:=DYNAINFO2(31,ZL); //次主力卖量
BDD:=TBUYHOLDINGEX('',CZL,2); //次主力多单
AKD:=TSELLHOLDINGEX('',ZL,2); //主力空单
ZLWKK:=TISREMAINEX(3,'',ZL); //主力未成交开空
ZLWPK:=TISREMAINEX(4,'',ZL); //主力未成交平空
CZLWDK:=TISREMAINEX(2,'',CZL);//次主力未成交平多
CZLWDK:=TISREMAINEX(1,'',ZL); //次主力未成交开多
CZLWPK:=TISREMAINEX(4,'',CZL); //次主力未成交平空
//CZLWPK:=TISREMAINEX(4,'',ZL); //主力未成交平空
CZLWDK:=TISREMAINEX(2,'',CZL);//次主力未成交平多
//平空
COND3:=c<=AL;
TSELLSHORT(COND3 AND AKD<>0,AKD,LMT,ZLDJ);
//有未成交平空单且历时5s以上
IF ZLWPK<>0 AND TSUBMITEX(4,'',ZL)>5 THEN
BEGIN
 TCANCELEX(1,4,'',ZL);
 //TSELLSHORT(1,ZLWPK,MKT);
 TSELLSHORT(1,s,MKT);
END

//开空
COND1:=ZLKL/ZLDL>=N;
COND2:=c>=AH;
IF COND1 AND COND2 AND THOLDING=0 THEN
//IF COND1 AND COND2 AND AKD=0 THEN
//TBUYSHORT(1,S,LMT,ZLDJ);
TBUYSHORT(1,S,LMT,C);
//有未成交开空单且历史5s以上
IF ZLWKK<>0 AND TSUBMITEX(3,'',ZL)>5 THEN
BEGIN
 TCANCELEX(ZLWKK<>S,3,'',ZL);
 TCANCELEX(BDD=0 AND ZLWKK=S,3,'',ZL);
 IF BDD<>0 AND  ZLWKK=S THEN
 BEGIN
  TCANCELEX(1,3,'',ZL);
  TBUYSHORT(1,S,MKT);
 END
END 
//平多
COND5:=c>=BL;
TSELL(BDD<>0,BDD,LMT,CZLDJ);
IF CZLWDK<>0 AND TSUBMITEX(2,'',ZL)>5 THEN
BEGIN
 TCANCELEX(1,2,'',ZL);
 //TSELL(1,CZLWDK,MKT);
 TSELL(1,s,MKT);
END
//开多
COND6:=ZLKL/ZLDL>=N;
COND7:=C<=BH;
IF COND6 AND COND7 AND THOLDING=0 THEN
//IF COND6 AND COND7 AND BDD=0 THEN
//TBUY(1,S,LMT,CZLKJ);
TBUY(1,S,LMT,C);
//有未成交开多单且历史5s以上
IF CZLWDK<>0 AND TSUBMITEX(1,'',CZL)>5 THEN
BEGIN
 TCANCELEX(CZLWDK<>S,1,'',CZL);
 TCANCELEX(AKD=0 AND CZLWDK=S,1,'',CZL);
 IF AKD<>0 AND  CZLWDK=S THEN
 BEGIN
  TCANCELEX(1,1,'',CZL);
  TBUY(1,S,MKT);
 END
END 

发现只开05合约,09一开就平仓,我是秒询,监控里有5,9合约

 回到顶部