通达信短线抽底源码

ZFA:=(CLOSE-REF(CLOSE,1))*100/REF(CLOSE,1);
 ZFB:=(CLOSE-OPEN)*100/OPEN;
 ZF:MAX(ZFB,ZFA),NODRAW;
 MA21:=MA(CLOSE,21);
 MA22:=SMA(MA21,3,1);
 M21:=IF(MA21>REF(MA21,1),1,0);
 MA34:=MA(CLOSE,34);
 MA35:=SMA(MA34,3,1);
 M34:=IF(MA34>REF(MA34,1),1,0);
 MA55:=MA(CLOSE,55);
 M55:=IF(MA55>REF(MA55,1),1,0);
 MA56:=SMA(MA55,3,1);
 MA90:=MA(CLOSE,90);
 MA91:=SMA(MA90,3,1);
 M90:=IF(MA90>REF(MA90,1),1,0);
 MA120:=MA(CLOSE,144);
 MA121:=SMA(MA120,3,1);
 M120:=IF(MA120>REF(MA120,1),1,0);
 M1:=MA(CLOSE,240);
 M250:=IF(M1>REF(M1,1),1,0);
 UPJ:=M90+M120+M250;
 VA:=(CLOSE+OPEN+LOW+HIGH)/4;
 RSV:=(VA-LLV(VA,13))/(HHV(VA,13)-LLV(VA,13))*200-100;
 K:=SMA(RSV,5,1);
 D:=SMA(K,5,1);
 DD:=D*1.4;
 JJ:=3*K-2*D;
 J:=SMA(JJ,3,1);
 JA:=SMA(J,3,1);
 JB:=SMA(JA,3,1);
 VAA1:=LLV(LOW,100)+(HHV(HIGH,100)-LLV(LOW,100))/2+(HHV(HIGH,100)-LLV(LOW,100))/2*SIN(3.141596*537/1800);
 VAA2:=LLV(LOW,100)+(HHV(HIGH,100)-LLV(LOW,100))/2-(HHV(HIGH,100)-LLV(LOW,100))/2*SIN(3.141596*536/1800);
 VA3:=(VAA1-VAA2)*100/(VAA1+VAA2);
 VA4:=VA3-REF(VA3,1);
 VA5:=IF(VA4>0,VA4*90,0);
 VA6:=IF(VA5>170,170,VA5);
 VAR16:=COST(95);
 AB2:=COST(5);
 VAR17:=(VAR16-AB2)*100/(VAR16+AB2);
 VAR18:=VAR17-REF(VAR17,1);
 VAR19:=IF(VAR18>0,VAR18*90,0);
 VAR20:=IF(VAR19>=170,170,VAR19);
 ZFX:(OPEN-LOW)*100/LOW,NODRAW;
 XG:=IF(VA6>=50 OR VAR20>=40 AND JB<(-30) AND (UPJ>=2 OR BARSLAST(UPJ>=2)<34),3,IF(VA6>=30 OR VAR20>=20 AND JJ<(-50) AND (UPJ>=2 OR BARSLAST(UPJ>=2)<34),3,0));
短线抽底:IF(MA55>MA56 AND MA90>MA91 AND (OPEN>MA55 AND LOW<MA55 OR (OPEN>MA90 AND LOW<MA90)) AND ZFX>7 AND REF(ZFB,1)<0 AND ZF<0,ZFX+1,IF(MA120>MA121 AND MA90>MA91 AND (OPEN>MA120 AND LOW<MA120 OR (OPEN>MA90 AND LOW<MA90) OR (OPEN<MA90 AND LOW>MA120)) AND ZFX>7 AND REF(ZFB,1)<(-1),ZFX+1,IF(XG>=1 AND ZFX>=7 AND REF(ZFX,1)>5 AND JB<(-50),ZFX+1,IF(XG>=1 AND ZFX>=5 AND REF(ZF,1)<(-8) AND JB<(-50),ZFX+1,0))));

{-----------------------------------}