通达信量价动态主图未加密选股指标公式源码

源码正文：

bc:=(IF(C>(H+L+C)/3,(H*0.618+L*0.382)*0.382,(H*0.382+L*0.618)*0.382)+(O*0.382+C*0.618)*0.618){XG51};
市价:=AMOUNT/(vol*100){XG51};
DEM3:ema(dma(bc,(VOL/(SUM(AMOUNT,3)/(市价*100)))),1),COLORRED{XG51};
DEM7:Ema(Dma(bc,(VOL/(SUM(AMOUNT,7)/(市价*100)))),1),COLORBLUE{XG51};
DEM13:EMA(Dma(bc,(VOL/(SUM(AMOUNT,13)/(市价*100)))),1),COLOR6600FF{XG51};
CB:EMA(Dma(bc,(VOL/(SUM(AMOUNT,38)/(市价*100)))),1),COLOR00bb00,LINETHICK2{XG51};
转弱:CB*(1-997/10000),DOTLINE,COLORGREEN{XG51};
反弹:CB*0.809,COLOR0077FF,DOTLINE{XG51};
转强:CB*(1+997/10000),DOTLINE,COLORLIMAGENTA{XG51};
警示:CB*1.191,COLOR0077FF,DOTLINE{XG51};
glC:=((BC/DEM3-1)*100+(BC/DEM7-1)*100+(BC/DEM13-1)*100+(BC/CB-1)*100)/4,COLORWHITE{XG51};
gl3:=((DEM3/DEM7-1)*100+(DEM3/DEM13-1)*100+(DEM3/ref(DEM3,1)-1)*100)/3{XG51};
gl7:=((DEM7/DEM13-1)*100+(DEM7/REF(DEM7,1)-1)*100)/2{XG51};
gl13:=(DEM13/REF(DEM13,1)-1)*100{XG51};
gL21:=((DEM3/CB-1)*100+(DEM7/CB-1)*100+(DEM13/CB-1)*100+(CB/REF(CB,1)-1)*100)/4{XG51};
乖:=(gl3+gl7+gl13){XG51};
合:=(glC+gl3+gl7+gl13+gl21)/5{XG51};
离:=((ema(合,12)+ema(合,14))/2+ema(合,13))/2,COLORCYAN{XG51};
DRAWTEXT(crOSS(乖,0)and (离>REF(离,1)),L*0.96,'★'),COLORBLUE{XG51};
DRAWTEXT(CROSS(乖,离)AND 离>0,L*0.96,'★'),COLORWHITE{X.G_5~1.C.N.{};

源码正文：

N:=5;M1:=3;M2:=3{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,LINETHICK2{XG51};
K:SMA(RSV,M1,1),COLORRED{XG51};
D:Sma(K,M2,1),COLORBLUE{XG51};
J:3*K-2*D,COLORLIMAGENTA{XG51};
IF(J<0,J,DRAWNULL),COLORLIMAGENTA{XG51};
IF(K>90,K,DRAWNULL),COLORRED{XG51};
IF(D>85,D,DRAWNULL),COLORBLUE{XG51};
0,COLORWHITE,LINETHICK2;20,COLORMAGENTA{XG51};
80,COLORYELLOW;100,COLORCYAN,LINETHICK2{XG51};
DRAWTEXT(ISLAstBAR,0,'高安全区'),COLORWHITE{XG51};
DRAWTEXT(ISLASTBAR,20,'安 全 区'),COLORMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,80,'风 险 区'),COLORYELLOW{XG51};
DRAWTEXT(ISLASTBAR,100,'高风险区'),COLORCYAN{XG51};
DRAWICON(crOSS(J,0)AND K>=REF(K,1),J,1){XG51};
DRAWICON(CROSS(J,20)AND K>=REF(K,1),J,1){XG51};
DRAWICON(CROSS(100,J)AND K<=REF(K,1),J,2){XG51};
DRAWICON(CROSS(80,J)AND K<=REF(K,1)<100,J,2){XG51};
DRAWICON(CROSS(K,D),K,25){XG51};
DRAWICON(CROSS(D,K),D,27){X_G_5~1_C_N_{};