急急请高手帮忙 组合通达信的选股公式和预警公式 （机会难得 去）

急急请高手帮忙 组合通达信的选股公式和预警公式 （机会难得 去）

VAR1B:=EMA(CLOSE,3)-EMA(CLOSE,89);
VAR1C:=EMA(VAR1B,21);
VAR1D:=(VAR1B-VAR1C)*10;
VAR1F:=POW(VAR1D,3)*0.1+POW(VAR1D,2);
逃顶:=IF(VAR1D>0.015,VAR1F,0)/450;
VV:=(HIGH+OPEN+LOW+CLOSE)/4;
VMA5:=MA(VV,5);
VMA10:=MA(VV,10);
VMA20:=MA(VV,20);
VMA250:=MA(VV,250);
角10度A:=((ATAN((MA(VMA5,3)/REF(MA(VMA5,3),1)-1)*100)*180/3.14115926)>=40);
A11角度A:=REF(角10度A=0,1) AND 角10度A=1;

角5度A:=((ATAN((MA(VMA10,2)/REF(MA(VMA10,2),1)-1)*100)*180/3.14115926)>=30);
A21角度A:=REF(角5度A=0,1) AND 角5度A=1;
均线开花:=(VMA5>=VMA10 AND COUNT(A11角度A,5) AND COUNT(A21角度A,3)
AND VMA20>=REF(VMA20,1) AND C>VMA250);
VOL1:=VOL;
V5:=MA(VOL1,5),COLORWHITE;
V10:=MA(VOL1,20),COLORGREEN;
V20:=MA(VOL1,60),COLORYELLOW;
量5日:=((ATAN((MA(V5,5)/REF(MA(V5,5),1)-1)*100)*180/3.14115926)>=80);
量5日角度:=REF(量5日=0,1) AND 量5日=1;
量10日:=((ATAN((MA(V10,3)/REF(MA(V10,3),1)-1)*100)*180/3.14115926)>=80);
量10日角度:=REF(量10日=0,1) AND 量10日=1;
量线开花:=(V5>V10 AND COUNT(量5日角度,3) AND COUNT(量10日角度,3)
AND V20>=REF(V20,1));
均线量线:=均线开花 OR 量线开花;
A11:=DMA(C, V/CAPITAL);
A21:=EMA(A11,5);
A31:=EMA(A21,10);
角10度:=((ATAN((MA(A11,3)/REF(MA(A11,3),1)-1)*100)*180/3.14115926)>=15);
A11角度:=REF(角10度=0,1) AND 角10度=1;
角5度:=((ATAN((MA(A21,2)/REF(MA(A21,2),1)-1)*100)*180/3.14115926)>=13);
A21角度:=REF(角5度=0,1) AND 角5度=1;
筹码峰开花:=(A11>A21 AND A21>A31 AND COUNT(A11角度,2) AND A21角度 AND A31>=REF(A31,1));
主升:=(逃顶/REF(逃顶,1)>=1),COLORYELLOW;
幅度10日:=(HHV(C,10)/LLV(C,10)<1.15)*0.25;
幅度15日:=(HHV(C,15)/LLV(C,15)<1.15)*0.35;
幅度20日:=(HHV(C,20)/LLV(C,20)<1.15)*0.45;
幅度60日:=(HHV(C,60)/LLV(C,60)<1.2)*0.55;
幅度120日:=(HHV(C,120)/LLV(C,120)<1.4)*0.75;
幅度250日:=(HHV(C,250)/LLV(C,250)<1.45)*0.95;
YDSR3:=(REF(幅度20日=0.45,1) AND 幅度20日=0);
YDSR4:=(REF(幅度60日=0.55,1) AND 幅度60日=0);
YDSR5:=(REF(幅度120日=0.75,1) AND 幅度120日=0);
YDSR6:=(REF(幅度250日=0.95,1) AND 幅度250日=0);
大牛:=(YDSR5 OR YDSR6 OR YDSR3 OR YDSR4);
新高:=(C>REF(HHV(C,250),1));
评分:=均线量线+筹码峰开花+主升+大牛+新高;
机会难得:=FILTER(评分>=3,5);

PN1:=DYNAINFO(8)>0;
PN2:=DYNAINFO(17)>0;
PN3:=DYNAINFO(22)>0;
PN4:=DYNAINFO(23)>0;
ST:=IF(NAMELIKE('ST')=1,0,
IF(NAMELIKE('S ST')=1,0,
IF(NAMELIKE('*ST')=1,0,1)));
去除:=PN1*PN2*PN3*PN4*ST;

机会难得 AND 去除;