通达信〖强阳破势〗基于价格加权均线的动量计算选股源码

X1:=(CLOSE*2+H+L)/4*10;
X2:=EMA(X1,13)-EMA(X1,34);
X3:=EMA(X2,5);
X4:=2*(X2-X3)*5.5;
X5:=IF(X4>=0,X4 * 3,0);
X6:=(CLOSE-LLV(LOW,34))/(HHV(H,21)-LLV(L,34))*100;
X7:=(EMA(X6,3)-50)*2;
X8:=IF(DATE<=1150530,1,0);
X9:=BETWEEN((C*X8)/(SUM(AMOUNT,BARSCOUNT((C*X8)))/SUM(vol*100,BARSCOUNT((C*X8)))),1.05,0.95);
VARQ:=IF(X9=0,MA((C*X8),BARSCOUNT((C*X8))),(SUM(AMOUNT,BARSCOUNT((C*X8)))/SUM(VOL*100,BARSCOUNT((C*X8)))));
VARE:=BARSLASTCOUNT(X5>20 AND X7>0)=1;
VARM:=BARSLASTCOUNT(X5>20 AND X7>0 AND (expma(C,10)>EXPMA(C,60)))=1;
VARU:=PWINNER(30,C)*100;
X14:=(WINNER(CLOSE*1.075)-WINNER(CLOSE*0.925))*100;
X15:=X14/WINNER(HHV(H,0));
X16:=crOSS(VARU,X15);
强阳破势:X16 AND VARM;