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


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

   

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


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

主题:按秒轮询

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


加好友 发短信
等级:论坛游侠 帖子:415 积分:1791 威望:0 精华:0 注册:2009/11/20 21:02:10
按秒轮询  发帖心情 Post By:2015/6/2 9:52:16    Post IP:58.100.176.77[只看该作者]

这是我搞的按秒轮询的用于股指的止损。前面我已经提问了,按秒轮询中时间间隔不是按秒的,而是在5秒以上。我是在5秒线上运行的 



持仓:=THOLDING2 ,linethick0   ; 
平仓历时:=TEXITBARS+1;
开仓价格:=ROUND(TAVGENTERPRICE/MINDIFF)*MINDIFF; 
平仓价格:=TEXITPRICE; 
 开仓历时:=TENTERBARS+1,linethick0; 
 
 资产:=TASSET,linethick0;  
 上次信号:=TTYPE(1);
 

  多头持仓:=max(TBUYHOLDING(1),TBUYHOLDINGEX('','',1)); 空头持仓:=max(TSELLHOLDING(1),TSELLHOLDINGEX('','',1));
  实际多头持仓:=max(TBUYHOLDINGEX('','',2),TBUYHOLDINGEX('','',0)+TBUYHOLDINGEX('','',3)); 
  实际空头持仓:=MAX(TSELLHOLDINGEX('','',2),TSELLHOLDINGEX('','',0)+TSELLHOLDINGEX('','',3));

 挂单多头持仓:=TBUYHOLDINGEX('','',3); 
 挂单空头持仓:=TSELLHOLDINGEX('','',3);
  
  
   多价格:=ROUND(TAVGENTERPRICEEX2('' ,'' , 0)/MINDIFF)*MINDIFF ;   空价格:=round(TAVGENTERPRICEEX2('' ,'' , 1)/mindiff)*mindiff ;  
   

     
      win:=空价格-close;  Dwin:=close-多价格; 
 
  


 
  if strcmp(marketlabel,'ZJ')=0    then begin 
p:=strleft(stklabel,2);   
 
  收盘时间:=TIME>=151420;  
 
   交易时间:=(TIME>=091800  AND  TIME<=113000)   OR   (TIME>=130000  AND   TIME<=151200);
  开盘时间:=TIME>=091500   AND  TIME<092200; 
   
if strcmp(p,'IF')=0 then begin 参数价位1:=MAX(40,round(CLOSE*0.003/MINDIFF/2)*2),LINETHICK0; 保证金比例:=0.13;end
 if strcmp(p,'IH')=0 then begin 参数价位1:=MAX(30,round(CLOSE*0.003/MINDIFF/2)*2),LINETHICK0; 保证金比例:=0.13; end
end

 
  


参数价位:=参数价位1;
atr:=参数价位*MINDIFF ,linethick0; 
 每手保证金:=ABS(MULTIPLIER*Close*保证金比例),LINETHICK0; 
 实际现金1:=IF(strcmp(p,'IF')=0,资产*0.95,资产*0.95);
 IF strcmp(p,'IF')=0   THEN  BEGIN     实际现金:=IF(实际现金1>=200000,200000,实际现金1*0.90); END
  IF strcmp(p,'IH')=0   THEN  BEGIN     实际现金:=IF(实际现金1>=150000,150000,实际现金1*0.90); END

  
趋势:=5*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1) -3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1) -SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1) ,3,1),2,1),COLOR7F52AF,linethick0; 
趋势5:=EMA(趋势,5),linethick0;
趋势13:=EMA(趋势,13),linethick0; 
   
  多方趋势:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1) -3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1) -SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1) ,3,1),2,1),linethick0; 
 多方趋势5:=EMA(多方趋势,5),LINETHICK0;
 短DYA:=EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,13),LINETHICK0;
短DYC:=EMA(短DYA,13),linethick0,coloryellow ;     
    
 
 DIFF:=EMA(CLOSE,28)-EMA(CLOSE,199),LINETHICK0;
 DEA:=EMA(DIFF,9),LINETHICK0;

DIFF1:=EMA(CLOSE,5)-EMA(CLOSE,34),LINETHICK0;
 DEA1:=EMA(DIFF1,9),LINETHICK0;

涨:=EMA(EMA(((HIGH+LOW+CLOSE*2)/4-EMA((HIGH+LOW+CLOSE*2)/4,21))*100/STD((HIGH+LOW+CLOSE*2)/4,21),5),10)+100/2-5,colorred,linethick0; 
跌:=EMA(涨,5),colorwhite,LINETHICK0;  
主力:=EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100,34),COLORRED ,LINETHICK0  ;
散户:=EMA(0.667*REF(主力,1)+0.333*主力,3),COLORFF9933,LINETHICK0  ;   
短线1:=EMA((CLOSE*2+H+L)/4,5); 
  
 短线:=(CLOSE-短线1)*2/(5+1)+短线1,LINETHICK1, COLORGREEN;
 
 
kVAR1:=EMA(CLOSE,13);
 
kVAR2:=EMA(CLOSE,55);
红多:(CLOSE-kVAR1)*2/(13+1)+kVAR1,LINETHICK1, COLORRED;
 
kVAR3:=(CLOSE-kVAR2)*2/(55+1)+kVAR2;
蓝空:=IF(红多>kVAR3,kVAR3,红多),LINETHICK3, COLORBLUE;
生命线:kVAR3,LINETHICK1, COLORYELLOW;

参考线1:=EMA(CLOSE,34);
参考线:=(CLOSE-参考线1)*2/(34+1)+参考线1,LINETHICK0;
 PBX1 :=红多;    
  
BAA:=IFELSE(DATE<20150721,1,0);
MA4:=EMA(CLOSE,10)*BAA;
HH:=HHV(HIGH,5)*BAA;
LL:=LLV(LOW,5)*BAA;
H1:=IFELSE(CLOSE>REF(HH,1),1,0)*BAA;
L1:=IFELSE(CLOSE<REF(LL,1),-1,0)*BAA;
H0:=REF(HIGH,1)*BAA;
L0:=REF(LOW,1)*BAA;
P7:=H1+L1*BAA;
P8:=IFELSE(P7=0,REF(P7,1),P7)*BAA;
P9:=IFELSE(P8=0,REF(P8,1),P8)*BAA;
P10:=IFELSE(P9=0,REF(P9,1),P9)*BAA;
P11:=IFELSE(P10=0,REF(P10,1),P10)*BAA;
P12:=IFELSE(P11=0,REF(P11,1),P11)*BAA;
P13:=IFELSE(P12=0,REF(P12,1),P12)*BAA;
P14:=IFELSE(P13=0,REF(P13,1),P13)*BAA;
P15:=IFELSE(P14=0,REF(P14,1),P14)*BAA;
P16:=IFELSE(P15=0,REF(P15,1),P15)*BAA;
P17:=IFELSE(P16=0,REF(P16,1),P16)*BAA;
P18:=IFELSE(P17=0,REF(P17,1),P17)*BAA;
P19:=IFELSE(P18=0,REF(P18,1),P18)*BAA;
P20:=IFELSE(P19=0,REF(P19,1),P19)*BAA;
P21:=IFELSE(P20=0,REF(P20,1),P20)*BAA;
P22:=IFELSE(P21=0,REF(P21,1),P21)*BAA;
P23:=IFELSE(P22=0,REF(P22,1),P22)*BAA;
P24:=IFELSE(P23=0,REF(P23,1),P23)*BAA;
P25:=IFELSE(P24=0,REF(P24,1),P24)*BAA;
P26:=IFELSE(P25=0,REF(P25,1),P25)*BAA;
P27:=IFELSE(P26=0,REF(P26,1),P26)*BAA;
P28:=IFELSE(P27=0,REF(P27,1),P27)*BAA;
P29:=IFELSE(P28=0,REF(P28,1),P28)*BAA;
P30:=IFELSE(P29=0,REF(P29,1),P29)*BAA;
T:=IFELSE(P30=0,REF(P30,1),P30)*BAA,LINETHICK0; 
   
 

DYA:=EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,55),LINETHICK0;
DYB:=EMA(DYA,5),LINETHICK0; 
DYC:=EMA(DYA,13),linethick0,coloryellow,NOAXIS;   
  
 

 
长HH1:=IF(H<REF(H,2) AND REF(H,1)<REF(H,2) ,REF(H,2),0) ;  
 长LL1:=IF(L>REF(L,2) AND REF(L,1)>REF(L,2) ,REF(L,2),0) ;

长HH2:=VALUEWHEN(长HH1>0,长HH1);   长LL2:=VALUEWHEN(长LL1>0,长LL1);
 长K1:=IF(close>长HH2,-3,IF(close<长LL2,1,0));  
  长K2:=VALUEWHEN( 长K1<>0, 长K1);
长G:=IF( 长K2=1,长HH2,长LL2); 长W1:= 长K2;
 DRAWSL( 长K2=1     , 长G,0,1,0,COLORYELLOW,1);
 DRAWSL( 长K2=-3     , 长G,0,1,0,COLORYELLOW,1);
 VERTLINE( 长W1=1     ,长G ,ref( 长G,1) ,colorYELLOW );
VERTLINE( 长W1=-3      , 长G,ref( 长G,1),colorYELLOW);  

 
FC:=MA((C+O+H+L)/4,2);
FC1:=(C+O+H+L)/4;
FO:=(REF(FC,1)+REF(FC1,1))/2;
FH:=IF(FO>H,FO,H);
FL:=IF(FO<L,FO,L);
VAR2:=(CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80))*200;
VAR3:=SMA(VAR2,3,1);
VAR4:=SMA(VAR3,3,1);
VAR5:=3*VAR3-2*VAR4;
VAR6:=LLV(LOW,5);
VAR7:=HHV(HIGH,5);
VAR8:=EMA((CLOSE-VAR6)/(VAR7-VAR6)*100,4)*2;
VAR9:=EMA(0.667*REF(VAR8,1)+0.333*VAR8,2);
VARA:=3*VAR8-2*VAR9;
VARB:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
VARC:=POW(MA(LOW,5),2)+MA(LOW,5);
VARD:=POW(MA(HIGH,5),2)+MA(HIGH,5);
VARE:=(VARB-LLV(VARC,64))/(HHV(VARD,64)-LLV(VARC,64))*150+65-10;
VARF:=SMA(VARE,3,1)*1.5-100;
VAR10:=SMA(VARF,3,1);
VAR11:=3*VARF-2*VAR10;
VAR12:=(HIGH+LOW+CLOSE*2)/4;
VAR13:=EMA(VAR12,13);
VAR14:=STD(VAR12,13);
VAR15:=(VAR12-VAR13)*100/VAR14;
VAR16:=EMA(VAR15,5);
VAR18:=EMA(VAR16,13)+200-100;
VAR19:=EMA(VAR18,10);
VAR1A:=3*VAR18-2*VAR19;
VAR1B:=VAR3+VAR8+VARF+VAR18;
VAR1C:=VAR4+VAR9+VAR10+VAR19;
VAR1D:=VAR5+VARA+VAR11+VAR1A;
VAR1E:=(HIGH+LOW+CLOSE)/3;
VAR21:=(VAR1E-MA(VAR1E,34))/(0.015*AVEDEV(VAR1E,34));
VAR23:=(HIGH+LOW+CLOSE+VAR1E)/4;
VAR24:=EMA(VAR23,24);
VAR25:=STD(VAR23,24);
VAR26:=(VAR23-VAR24)/VAR25*100;
VAR27:=(VAR1E-MA(VAR1E,24))/(0.015*AVEDEV(VAR1E,24));
VAR28:=EMA(VAR26,5);
VAR2B:=((VAR28+VAR27+VAR21)/3+165)/4;
VAR2C:=(EMA(EMA(EMA(VAR2B,15),10),5)-20);
VAR2D:=(VAR1B+VAR1C+VAR1D*30)/32/5;
VAR2E:=EMA(VAR2D,13);
攻击路线:=EMA((VAR2C+VAR2E)/2,2),LINETHICK0;
攻击路线A:=EMA((VAR2C+VAR2E)/2,5),LINETHICK0;
攻击路线B:=EMA((VAR2C+VAR2E)/2,13),LINETHICK0;

印钞痕迹:=REF(攻击路线,1),LINETHICK0;

抛物线:=SAR(5,2,20),crossdot;    


KVAR2:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
短散户:=SMA(SMA(KVAR2,13,1),13,1) ;
KVAR4:=EMA(短散户,5);
短主力:=3*短散户-2*KVAR4;

分水岭:=EMA(短散户,13),LINETHICK1,NOAXIS;
QQ:=IF( DATATYPE<>14  ,1,12);

 
 主力30:=EMA((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100,21);

 

中轨:=EMA(CLOSE,26),LINETHICK0; 差:=STD(close,26),LINETHICK0;下轨:=中轨-2*差;上轨:=中轨+2*差;

 


//
 
IF     strcmp(p,'IF')=0    THEN   BEGIN   
 
   IF   实际多头持仓=0    then  begin   WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time81',dynainfo(207)); end
   if    实际空头持仓=0    then  begin   WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time84',dynainfo(207)); end
 
 
 
 if   实际多头持仓>0   then  begin
 
   开仓时间:=getINIFILE('C:\TESTNINFILE.INI','SETTING','time81' ); 
 开仓秒数1:=dynainfo(207)-开仓时间,linethick0; 
开仓秒数2:=IF(开仓秒数1>=17001,开仓秒数1-17000,开仓秒数1),linethick0;
多开仓秒数:=IF(开仓秒数2>=61,开仓秒数2-ROUND(开仓秒数2/100)*40,IF(开仓秒数2>=41,开仓秒数2-40,开仓秒数2)),linethick0;  end

if   实际空头持仓>0   then  begin
 
   开仓时间:=getINIFILE('C:\TESTNINFILE.INI','SETTING','time84' ); 
 开仓秒数1:=dynainfo(207)-开仓时间,linethick0; 
开仓秒数2:=IF(开仓秒数1>=17001,开仓秒数1-17000,开仓秒数1),linethick0;
空开仓秒数:=IF(开仓秒数2>=61,开仓秒数2-ROUND(开仓秒数2/100)*40,IF(开仓秒数2>=41,开仓秒数2-40,开仓秒数2)),linethick0;  end
 
  
   
 IF   实际多头持仓>0  then  begin    WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time82',dynainfo(207)); WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time815',dynainfo(7));
  end
 
    
if    实际空头持仓>0   then  begin    WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time83',dynainfo(207)); WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time816',dynainfo(7));
end

    
  if   实际多头持仓=0   then   begin
  多平时间:=GetINIFILE('C:\TESTNINFILE.INI','SETTING','time82' ),linethick0;   多平价格:=GetINIFILE('C:\TESTNINFILE.INI','SETTING','time815' ),linethick0; 
 多平秒数1:=dynainfo(207)-多平时间 ,linethick0; 
多平秒数2:=IF(多平秒数1>=17001,多平秒数1-17000,多平秒数1),linethick0;
多平秒数:=IF(多平秒数2>=61,多平秒数2-ROUND(多平秒数2/100)*40,IF(多平秒数2>=41,多平秒数2-40,多平秒数2)),linethick0;
 end   

if   实际空头持仓=0   then  begin
  空平时间:=GetINIFILE('C:\TESTNINFILE.INI','SETTING','time83' ),linethick0; 空平价格:=GetINIFILE('C:\TESTNINFILE.INI','SETTING','time816' ),linethick0; 
 空平秒数1:=dynainfo(207)-空平时间 ,linethick0; 
    
空平秒数2:=IF(空平秒数1>=17001,空平秒数1-17000,空平秒数1),linethick0;
空平秒数:=IF(空平秒数2>=61,空平秒数2-ROUND(空平秒数2/100)*40,IF(空平秒数2>=41,空平秒数2-40,空平秒数2)),linethick0;
    
 end
    
    
 END   
 
 //
IF    strcmp(p,'IH')=0    then  begin
  if  实际多头持仓=0    then  begin   WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time811',dynainfo(207)); end
   if  实际空头持仓=0    then  begin   WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time814',dynainfo(207)); end
 
 
 
 if   实际多头持仓>0   then  begin
 
   开仓时间:=getINIFILE('C:\TESTNINFILE.INI','SETTING','time811' ); 
 开仓秒数1:=dynainfo(207)-开仓时间,linethick0; 
开仓秒数2:=IF(开仓秒数1>=17001,开仓秒数1-17000,开仓秒数1),linethick0;
多开仓秒数:=IF(开仓秒数2>=61,开仓秒数2-ROUND(开仓秒数2/100)*40,IF(开仓秒数2>=41,开仓秒数2-40,开仓秒数2)),linethick0;  end

if   实际空头持仓>0   then  begin
 
   开仓时间:=getINIFILE('C:\TESTNINFILE.INI','SETTING','time814' ); 
 开仓秒数1:=dynainfo(207)-开仓时间,linethick0; 
开仓秒数2:=IF(开仓秒数1>=17001,开仓秒数1-17000,开仓秒数1),linethick0;
空开仓秒数:=IF(开仓秒数2>=61,开仓秒数2-ROUND(开仓秒数2/100)*40,IF(开仓秒数2>=41,开仓秒数2-40,开仓秒数2)),linethick0;  end
 
  
  
  // 
 IF   实际多头持仓>0   then  begin    WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time812',dynainfo(207)); WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time825',dynainfo(7));
 
 end
 
    
if   实际空头持仓>0   then  begin    WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time813',dynainfo(207)); WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time826',dynainfo(7));
 end

    
  if   实际多头持仓=0   then   begin
  多平时间:=GetINIFILE('C:\TESTNINFILE.INI','SETTING','time812' ),linethick0;   多平价格:=GetINIFILE('C:\TESTNINFILE.INI','SETTING','time825' ),linethick0; 
 多平秒数1:=dynainfo(207)-多平时间 ,linethick0; 
多平秒数2:=IF(多平秒数1>=17001,多平秒数1-17000,多平秒数1),linethick0;
多平秒数:=IF(多平秒数2>=61,多平秒数2-ROUND(多平秒数2/100)*40,IF(多平秒数2>=41,多平秒数2-40,多平秒数2)),linethick0;
 end   

if   实际空头持仓=0   then  begin
  空平时间:=GetINIFILE('C:\TESTNINFILE.INI','SETTING','time813' ),linethick0;   空平价格:=GetINIFILE('C:\TESTNINFILE.INI','SETTING','time826' ),linethick0;
 空平秒数1:=dynainfo(207)-空平时间 ,linethick0; 
    
空平秒数2:=IF(空平秒数1>=17001,空平秒数1-17000,空平秒数1),linethick0;
空平秒数:=IF(空平秒数2>=61,空平秒数2-ROUND(空平秒数2/100)*40,IF(空平秒数2>=41,空平秒数2-40,空平秒数2)),linethick0;
    
 end
    
  
 
 end 
 
 
  IF    strcmp(p,'IF')=0   OR   strcmp(p,'AG')=0     THEN   BEGIN    
 
  
if  挂单多头持仓=0     then  begin   WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time8301',dynainfo(207)); end
if  挂单多头持仓>0    then  begin
多平挂单时间A:=getINIFILE('C:\TESTNINFILE.INI','SETTING','time8301' ); 
多平挂单A:=dynainfo(207)-多平挂单时间A,linethick0; 
多平挂单A:=IF(多平挂单A>=17001,多平挂单A-17000,多平挂单A),linethick0;
多平挂单秒数:=IF(多平挂单A>=61,多平挂单A-ROUND(多平挂单A/100)*40,IF(多平挂单A>=41,多平挂单A-40,多平挂单A)),linethick0;  
end

if  挂单空头持仓=0    then  begin   WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time8311',dynainfo(207)); end
if  挂单空头持仓>0     then  begin
空平挂单时间A:=getINIFILE('C:\TESTNINFILE.INI','SETTING','time8311' ); 
空平挂单A:=dynainfo(207)-空平挂单时间A,linethick0; 
空平挂单A:=IF(空平挂单A>=17001,空平挂单A-17000,空平挂单A),linethick0;
空平挂单秒数:=IF(空平挂单A>=61,空平挂单A-ROUND(空平挂单A/100)*40,IF(空平挂单A>=41,空平挂单A-40,空平挂单A)),linethick0;  
end

end   
//
 
     
  
  
  //
 
 //
 
 IF    strcmp(p,'IH')=0    THEN   BEGIN    
  
if  挂单多头持仓=0     then  begin   WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time8401',dynainfo(207)); end
if  挂单多头持仓>0    then  begin
多平挂单时间A:=getINIFILE('C:\TESTNINFILE.INI','SETTING','time8401' ); 
多平挂单A:=dynainfo(207)-多平挂单时间A,linethick0; 
多平挂单A:=IF(多平挂单A>=17001,多平挂单A-17000,多平挂单A),linethick0;
多平挂单秒数:=IF(多平挂单A>=61,多平挂单A-ROUND(多平挂单A/100)*40,IF(多平挂单A>=41,多平挂单A-40,多平挂单A)),linethick0;  
end

if  挂单空头持仓=0    then  begin   WRITEINIFILE('C:\TESTNINFILE.INI','SETTING','time8411',dynainfo(207)); end
if   挂单空头持仓>0     then  begin
空平挂单时间A:=getINIFILE('C:\TESTNINFILE.INI','SETTING','time8411' ); 
空平挂单A:=dynainfo(207)-空平挂单时间A,linethick0; 
空平挂单A:=IF(空平挂单A>=17001,空平挂单A-17000,空平挂单A),linethick0;
空平挂单秒数:=IF(空平挂单A>=61,空平挂单A-ROUND(空平挂单A/100)*40,IF(空平挂单A>=41,空平挂单A-40,空平挂单A)),linethick0;  
end
//
 
 END
 
 
 
 
 tcancel(多平挂单秒数>=15 ,2);   tcancel( 多平挂单秒数 >=6  AND  DWIN<=-0.4*atr ,2);   
 
 
  tcancel(空平挂单秒数>=15,4);     tcancel( 空平挂单秒数 >=6  and  WIN<=-0.4*atr,4);         
    
  
  
 

       DEBUGOUT('多平挂单秒数为%.2f',多平挂单秒数) ;      DEBUGOUT('空平挂单秒数为%.2f',空平挂单秒数) ;       
    
       DEBUGOUT('挂单多头持仓为%.2f',挂单多头持仓) ;      DEBUGOUT('挂单空头持仓为%.2f',挂单空头持仓) ;       
 
 //
   
    DUO:=T=1;kong:=T=-1;     
 STICKLINE(kong   ,OPEN,CLOSE,9,1),colorBLUE; STICKLINE(kong ,HIGH,CLOSE,0,1),colorBLUE;
STICKLINE(kong  ,LOW,OPEN,0,1),colorBLUE;  STICKLINE(OPEN-CLOSE>0  and kong  ,OPEN,CLOSE,9,0),colorBLUE;

 
  
 
  STICKLINE(duo,OPEN,CLOSE,9,1),COLORYELLOW;STICKLINE(duo,HIGH,CLOSE,0,1),COLORYELLOW;
STICKLINE(duo,LOW,OPEN,0,1),COLORYELLOW;STICKLINE(OPEN-CLOSE>0  and duo,OPEN,CLOSE,9,0),COLORYELLOW; 
 
 
  
 
 if    资产=TASSET     THEN    BEGIN    
 
   
   多开仓历时:=if(ROUND(多开仓秒数/5)>=2,ROUND(多开仓秒数/5) ,1);  

   空开仓历时:= if(ROUND(空开仓秒数/5)>=2,ROUND(空开仓秒数/5) ,1); 
      
   
     END  
 
   

多最高:=HHV(h,多开仓历时); 
DMAXPROFIT:=if(多最高-多价格>=0,多最高-多价格,0);
 
  
 

空最低:= LLV(L,空开仓历时)  ;
 

MAXPROFIT:=if(空价格-空最低>=0,空价格-空最低,0),LINETHICK0;
 
 
//


if          多头持仓>0     and   (多开仓历时>=3    or   多开仓秒数>=6)     then   begin
 

 
  //止损优先操作 
  DWIN:=CLOSE-多价格;
多收盘:=TSELL(收盘时间    ,0,LMT,CLOSE-3*MINDIFF),SLITHERMETHOD; 
  
 
  
无条件多止损:=TSELL( (DWIN<=-0.5*atr   and  短线<参考线   and  参考线<生命线   ) 
   or  DWIN<=-0.6*ATR   OR  (短线<参考线   and   参考线<生命线    and   T=-1  AND   c<长G   and    C<抛物线     and  DWIN<=-0.4*atr)
    ,0,LMT,CLOSE-3*MINDIFF),SLITHERMETHOD; 

    
  END  
//
 


if         空头持仓>0   and   (空开仓历时>=3    or   空开仓秒数>=6)     then  begin//第一个循环
 
  WIN:=空价格-CLOSE  ;

  
 收盘平空:=TSELLSHORT(收盘时间       ,0,LMT,CLOSE+3*MINDIFF),SLITHERMETHOD; 


 
  
无条件空止损:=TSELLSHORT( (WIN<=-0.5*atr   and  短线>参考线   and  参考线>生命线   ) 
   or   WIN<=-0.6*ATR   OR    (短线>参考线   and   参考线>生命线    and   T=1  AND   c>长G   and    C>抛物线      and  WIN<=-0.4*atr  )
    ,0,LMT,CLOSE+3*MINDIFF),SLITHERMETHOD; 

 
  
 END 
//
 
  
     


 回到顶部