通达信分流资金未加密选股指标公式源码

源码正文：

stICKLINE(C>0,80,80,4,0),colorFF9F99{XG51};
STICKLINE(C>0,20,20,4,0),colorFF9F99{XG51};
STICKLINE(C>0,50,50,4,0),COLORmaGENTA{XG51};
市价:=INDEXA/(INDEXV*100){XG51};
YC:=C{XG51};
YH:=H{XG51};
YL:=L{XG51};
pc:=市价{XG51};
pH:=市价*((INDEXH+PC)/(INDEXC+PC)){XG51};
pL:=市价*((INDEXL+pc)/(INDEXC+PC)){XG51};
JGL0:=100*((YC-LLV(YL,18))/(HHV(YH,18)-LLV(YL,18))+(YC-LLV(YL,27))/(HHV(YH,27)-LLV(YL,27)))/2{XG51};
MH01:=(ema(JGL0+SLOPE(JGL0,7),7)+EMA(JGL0+SLOPE(JGL0,5),5)+EMA(JGL0+SLOPE(JGL0,9),9))/3{XG51};
主0:=(EMA(MH01+SLOPE(MH01,2),2)+EMA(MH01+SLOPE(MH01,3),3))/2{XG51};
SGL0:=100*((PC-LLV(PL,18))/(HHV(PH,18)-LLV(PL,18))+(PC-LLV(PL,27))/(HHV(PH,27)-LLV(PL,27)))/2{XG51};
MH02:=(EMA(SGL0+SLOPE(SGL0,7),7)+EMA(SGL0+SLOPE(SGL0,5),5)+EMA(SGL0+SLOPE(SGL0,9),9))/3{XG51};
市0:=(EMA(MH02+SLOPE(MH02,2),2)+EMA(MH02+SLOPE(MH02,3),3))/2{XG51};
PJL0:=100*((INDEXC-LLV(INDEXL,18))/(HHV(INDEXH,18)-LLV(INDEXL,18))+(INDEXC-LLV(INDEXL,27))/(HHV(INDEXH,27)-LLV(INDEXL,27)))/2{XG51};
MH03:=(EMA(PJL0+SLOPE(PJL0,7),7)+EMA(PJL0+SLOPE(PJL0,5),5)+EMA(PJL0+SLOPE(PJL0,9),9))/3{XG51};
非0:=(EMA(MH03+SLOPE(MH03,2),2)+EMA(MH03+SLOPE(MH03,3),3))/2{XG51};
JGL1:=100*((YC-LLV(YL,36))/(HHV(YH,36)-LLV(YL,36))+(YC-LLV(YL,45))/(HHV(YH,45)-LLV(YL,45)))/2{XG51};
MH11:=(EMA(JGL1+SLOPE(JGL1,7),7)+EMA(JGL1+SLOPE(JGL1,5),5)+EMA(JGL1+SLOPE(JGL1,9),9))/3{XG51};
主1:=(EMA(MH11+SLOPE(MH11,4),4)+EMA(MH11+SLOPE(MH11,5),5))/2{XG51};
SGL1:=100*((PC-LLV(PL,36))/(HHV(PH,36)-LLV(PL,36))+(PC-LLV(PL,45))/(HHV(PH,45)-LLV(PL,45)))/2{XG51};
MH12:=(EMA(SGL1+SLOPE(SGL1,7),7)+EMA(SGL1+SLOPE(SGL1,5),5)+EMA(SGL1+SLOPE(SGL1,9),9))/3{XG51};
市1:=(EMA(MH12+SLOPE(MH12,4),4)+EMA(MH12+SLOPE(MH12,5),5))/2{XG51};
PJL1:=100*((INDEXC-LLV(INDEXL,36))/(HHV(INDEXH,36)-LLV(INDEXL,36))+(INDEXC-LLV(INDEXL,45))/(HHV(INDEXH,45)-LLV(INDEXL,45)))/2{XG51};
MH13:=(EMA(PJL1+SLOPE(PJL1,7),7)+EMA(PJL1+SLOPE(PJL1,5),5)+EMA(PJL1+SLOPE(PJL1,9),9))/3{XG51};
非1:=(EMA(MH13+SLOPE(MH13,4),4)+EMA(MH13+SLOPE(MH13,5),5))/2{XG51};
JGL2:=100*(YC-LLV(YL,81))/(HHV(YH,81)-LLV(YL,81)){XG51};
MH21:=(EMA(JGL2+SLOPE(JGL2,7),7)+EMA(JGL2+SLOPE(JGL2,5),5)+EMA(JGL2+SLOPE(JGL2,9),9))/3{XG51};
主2:=EMA(MH21+SLOPE(MH21,9),9){XG51};
SGL2:=100*(PC-LLV(PL,81))/(HHV(PH,81)-LLV(PL,81)){XG51};
MH22:=(EMA(SGL2+SLOPE(SGL2,7),7)+EMA(SGL2+SLOPE(SGL2,5),5)+EMA(SGL2+SLOPE(SGL2,9),9))/3{XG51};
市2:=EMA(MH22+SLOPE(MH22,9),9){XG51};
PJL2:=100*(INDEXC-LLV(INDEXL,81))/(HHV(INDEXH,81)-LLV(INDEXL,81)){XG51};
MH23:=(EMA(PJL2+SLOPE(PJL2,7),7)+EMA(PJL2+SLOPE(PJL2,5),5)+EMA(PJL2+SLOPE(PJL2,9),9))/3{XG51};
非2:=EMA(MH23+SLOPE(MH23,9),9){XG51};
JGL3:=100*(YC-LLV(YL,162))/(HHV(YH,162)-LLV(YL,162)){XG51};
MH31:=(EMA(JGL3+SLOPE(JGL3,7),7)+EMA(JGL3+SLOPE(JGL3,5),5)+EMA(JGL3+SLOPE(JGL3,9),9))/3{XG51};
主3:=EMA(MH31+SLOPE(MH31,18),18){XG51};
SGL3:=100*(PC-LLV(PL,162))/(HHV(PH,162)-LLV(PL,162)){XG51};
MH32:=(EMA(SGL3+SLOPE(SGL3,7),7)+EMA(SGL3+SLOPE(SGL3,5),5)+EMA(SGL3+SLOPE(SGL3,9),9))/3{XG51};
市3:=EMA(MH32+SLOPE(MH32,18),18){XG51};
PJL3:=100*(INDEXC-LLV(INDEXL,162))/(HHV(INDEXH,162)-LLV(INDEXL,162)){XG51};
MH33:=(EMA(PJL3+SLOPE(PJL3,7),7)+EMA(PJL3+SLOPE(PJL3,5),5)+EMA(PJL3+SLOPE(PJL3,9),9))/3{XG51};
非3:=EMA(MH33+SLOPE(MH33,18),18){XG51};
JGL4:=100*(YC-LLV(YL,324))/(HHV(YH,324)-LLV(YL,324)){XG51};
MH41:=(EMA(JGL4+SLOPE(JGL4,7),7)+EMA(JGL4+SLOPE(JGL4,5),5)+EMA(JGL4+SLOPE(JGL4,9),9))/3{XG51};
主4:=EMA(MH41+SLOPE(MH41,36),36){XG51};
SGL4:=100*(PC-LLV(PL,324))/(HHV(PH,324)-LLV(PL,324)){XG51};
MH42:=(EMA(SGL4+SLOPE(SGL4,7),7)+EMA(SGL4+SLOPE(SGL4,5),5)+EMA(SGL4+SLOPE(SGL4,9),9))/3{XG51};
市4:=EMA(MH42+SLOPE(MH42,36),36){XG51};
PJL4:=100*(INDEXC-LLV(INDEXL,324))/(HHV(INDEXH,324)-LLV(INDEXL,324)){XG51};
MH43:=(EMA(PJL4+SLOPE(PJL4,7),7)+EMA(PJL4+SLOPE(PJL4,5),5)+EMA(PJL4+SLOPE(PJL4,9),9))/3{XG51};
非4:=EMA(MH43+SLOPE(MH43,36),36){XG51};
JGL5:=100*(YC-LLV(YL,648))/(HHV(YH,648)-LLV(YL,648)){XG51};
MH51:=(EMA(JGL5+SLOPE(JGL5,7),7)+EMA(JGL5+SLOPE(JGL5,5),5)+EMA(JGL5+SLOPE(JGL5,9),9))/3{XG51};
主5:=EMA(MH51+SLOPE(MH51,72),72){XG51};
SGL5:=100*(PC-LLV(PL,648))/(HHV(PH,648)-LLV(PL,648)){XG51};
MH52:=(EMA(SGL5+SLOPE(SGL5,7),7)+EMA(SGL5+SLOPE(SGL5,5),5)+EMA(SGL5+SLOPE(SGL5,9),9))/3{XG51};
市5:=EMA(MH52+SLOPE(MH52,72),72){XG51};
PJL5:=100*(INDEXC-LLV(INDEXL,648))/(HHV(INDEXH,648)-LLV(INDEXL,648)){XG51};
MH53:=(EMA(PJL5+SLOPE(PJL5,7),7)+EMA(PJL5+SLOPE(PJL5,5),5)+EMA(PJL5+SLOPE(PJL5,9),9))/3{XG51};
非5:=EMA(MH53+SLOPE(MH53,72),72){XG51};
个股:=(((((主0+2*主1)/3+2*主2)/3+2*主3)/3+2*主4)/3+2*主5)/3{XG51};
市场:=(((((市0+2*市1)/3+2*市2)/3+2*市3)/3+2*市4)/3+2*市5)/3{XG51};
大盘:=(((((非0+2*非1)/3+2*非2)/3+2*非3)/3+2*非4)/3+2*非5)/3{XG51};
大:=MAX(个股,MAX(市场,大盘)){XG51};
小:=MIN(个股,MIN(市场,大盘)){XG51};
STICKLINE(大<=20,小,20,1,0),COLORGRAY{XG51};
STICKLINE(小>=80,小,80,1,0),COLORYELLOW{XG51};
先行资金:(((主0+2*主1)/3+2*主2)/3+2*主3)/3,COLORRED,linethick2{XG51};
个股资金:个股,COLORWHITE{XG51};
市场资金:市场,COLOR00CCCC{XG51};
指数资金:大盘,color9999FF{XG51};
意向判别:Wma(先行资金,63),COLOR00bb00,linethick2{X+G.5_1+C+N+{};

源码正文：

Q_1:=C-REF(C,1){XG51};
Q_2:=100*ema(Ema(Q_1,6),6)/EMA(EMA(Abs(Q_1),6),6){XG51};
Q_3:=crOSS(EMA(C,19),EMA(C,7)){XG51};
Q_4:=CROSS(EMA(C,7),EMA(C,19)){XG51};
Z1:=L=LLV(L,BArslAst(Q_3)+1){XG51};
Z2:=LLV(L,BARSLAST(Q_3)+1){XG51};
Z3:=H=HHV(H,BARSLAST(Q_4)+1){XG51};
Z4:=HHV(H,BARSLAST(Q_4)+1){XG51};
Q_A:=DRAWLINE(Z1,Z2,Z3,Z4,0){XG51};
Y1:=H=HHV(H,BARSLAST(Q_4)+1){XG51};
Y2:=HHV(H,BARSLAST(Q_4)+1){XG51};
Y3:=L=LLV(L,BARSLAST(Q_3)+1){XG51};
Y4:=LLV(L,BARSLAST(Q_3)+1){XG51};
Q_B:=DRAWLINE(Y1,Y2,Y3,Y4,0){XG51};
X1:=LLV(Q_2,2)=LLV(Q_2,7) {XG51};
X2:=COUNT(Q_2<0,2){XG51};
X3:=CROSS(Q_2,MA(Q_2,2)){XG51};
X4:=REF(Q_B,1)<REF(Q_B,2){XG51};
X5:=Q_A>REF(Q_B,1){XG51};
买进:=(X1 AND X2 AND X3) AND X4 AND X5{XG51};
TJ:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0){XG51};
堪称一绝:IF(REF(TJ,1)=0 AND TJ>=1,80,10),STICK,COLORWHITE{XG51};
持币:IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,0,10),STICK,COLORCYAN{XG51};
地狱底:0,COLORBROWN{XG51};
地狱线:10,COLORBROWN{XG51};
地平线:20,COLORMAGENTA{XG51};
天际线:80,COLORBROWN{XG51};
DRAWTEXT(CURRBARSCOUNT=129,50,24),COLOR889999{XG51};
RSV:=(((CLOSE - LLV(LOW,33)) / (HHV(HIGH,33) - LLV(LOW,33))) * 100){XG51};
神仙:SMA(RSV,7,1),COLORRED{XG51};
魔鬼:SMA(SMA(RSV,7,1),3,1),COLORBLUE{XG51};
轨迹:SMA(SMA(SMA(RSV,6,1),5,1),3,1),COLORLIMAGENTA{XG51};
财神到:IF(CROSS(神仙,20),20,0),POINTDOT;
DRAWICON((CROSS(神仙,20)),5,1){X~G~5^1~C~N~{};