牛股強序

{牛股強序}
TY:=C;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
頂:=IF(T1,A,A),COLORYELLOW,LINETHICK1;
底:=IF(T2,B,B),COLORMAGENTA,LINETHICK1;

Z:=EMA(EMA(C,1),5),COLOR00FFFF,LINETHICK3;
BB:=EMA(HHV(Z,5),1),COLORMAGENTA,LINETHICK3;
J:=EMA(HHV(BB,21),1),COLOR0089FF,LINETHICK2;
W:=EMA(HHV(J,21),2),COLORDB89FF,COLOR00FF00,LINETHICK2;
T:=EMA(HHV(W,21),3),COLOR8916FF,LINETHICK2;
S:=EMA(HHV(T,21),4),COLORFFCC62,LINETHICK2;
JJ:=EMA(HHV(S,21),5),COLORFF9D52,LINETHICK2;
M:=EMA(HHV(JJ,21),6),COLORFF5B5E,LINETHICK2;
M1:=(-( HHV(EMA(C,5),14)-C)/C*5000);
M2:=(CLOSE+LOW+3*OPEN+HIGH)/6;
M3:=(20*M2+19*REF(M2,1)+18*REF(M2,2)+17*REF(M2,3)+16*REF(M2,4)+15*REF(M2,5)+14*REF(M2,6)+13*REF(M2,7)
+12*REF(M2,8)+11*REF(M2,9)+10*REF(M2,10)+9*REF(M2,11)+8*REF(M2,12)+7*REF(M2,13)+6*REF(M2,14)
+5*REF(M2,15)+4*REF(M2,16)+3*REF(M2,17)+2*REF(M2,18)+REF(M2,20))/210;
M4:=MA(M3,6);
M5:=(M3-M4)*1.2;
M6:=(O*2+H+L)/4*10;
M7:=EMA(M6,6)-EMA(M6,55);
M8:=EMA(M7,6);
M9:=(M7-M8)*0.06;
M10:=M5+M9;
M11:=M10>0;
M12:=MA(O,3),COLORRED,LINETHICK;
M13:=MA(O,13),COLORRED,LINETHICK;
M14:=MA(O,34),COLORRED,LINETHICK;
M15:=M12>=M13 AND M14>=REF(M14,1);
M16:=EMA(O,12);
M17:=EMA(O,50);
M18:=M16-M17>0;
M19:=C/REF(C,1)-1;
M20:=IF(M15,2,0)+IF(M11,2,0)+IF(M18,2,0)+M19;
M21:=(M20/10+M1/1000)*100+25,COLORWHITE;
ZF:=c/ref(c,1)-1;
大百:=M21>100;
上馬:=cross(c,M);
上頂:=cross(C,頂);
FB:=(c/ref(c,1)>=1.097 and c/ref(c,1)<=1.102) or c/ref(c,1)>=1.1997;
FBS:=COUNT(FB,10);

FB0:=IF(FB,0,1);
QD:=(-( HHV(EMA(C,5),14)-C)/C*5000);
牛股強序:IF(大百,FBS,0)+QD/5000;


{牛股強序，反映的是已經走牛的股的強度排序，個位數是10天內的封板數，小數點后面反映的是10天內相同板數的個股強的排在前面}