通达信金龙珠分时未加密选股指标公式源码

源码正文：

HD:=HIGH-REF(HIGH,1){XG51};
LD:=REF(LOW,1)-LOW{XG51};
DMP:=ema(IF(HD>0 AND HD>LD,HD,0),28){XG51};
DMM:=Ema(IF(LD>0 AND LD>HD,LD,0),28){XG51};
VZH:=EMA(DMP/TR,28){XG51};
VZL:=EMA(DMM/TR,28){XG51};
MA1:=EMA((CLOSE+HIGH+LOW)/3,2){XG51};
VAR1:=MAX((DYnaINFO(3)),EMA(DYNAINFO(5),5)){XG51};
VAR2:=MIN((DYNAINFO(3)),EMA(DYNAINFO(6),5)){XG51};
HH:=(COst(95)+DYNAINFO(11))/2{XG51};
LL:=(COST(5)+DYNAINFO(11))/2{XG51};
VAR3:=CONST((VAR1+HH)/2){XG51};
VAR4:=CONST((VAR2+LL)/2){XG51};
VAR5:=(VAR3+VAR4)/2{XG51};
VAR6:=(VAR4+VAR5)-VAR3{XG51};
VAR7:=(VAR4+VAR6)/2{XG51};
VAR8:=(VAR6+VAR7)/2{XG51};
dif:=((EMA(CLOSE,24)-EMA(CLOSE,52))*4)+VAR5{XG51};
DEA:=EMA(DIF,18){XG51};
MCD:((DIF-DEA)*2)+VAR5,NODRAW,COLORBLUE{XG51};
VAR10:=(3*SMA((C-LLV(L,54))/(HHV(H,54)-LLV(L,54)),3,1)-2*SMA(SMA((C-LLV(L,54))/(HHV(H,54)-LLV(L,54)),3,1),3,1)){XG51};
VAR11:=MEMA(VAR10,10){XG51};
VAR12:=EMA(VAR11,10){XG51};
VAR13:=IF(EXIST(crOSS(VAR3,MA1),5) AND EXIST(C>VAR3,10) AND VAR11<HHV(VAR11,10) AND VAR12<REF(VAR12,1),1,0){XG51};
VAR14:=IF(EXIST(CROSS(MA1,VAR4),5) AND EXIST(C<VAR4,10) AND VAR11>LLV(VAR11,10) AND VAR12>REF(VAR12,1),1,0){XG51};
顶:VAR3,POINTDOT,COLORFF00FF{XG51};
底:VAR4,POINTDOT,COLORCYAN{XG51};
多空:=IF(VZH>VZL,VAR7,VAR6){XG51};
DRAWBAND(MCD,RGB(150,30,30),VAR5,RGB(0,110,30)){XG51};
DRAWBAND(多空,RGB(150,100,50),VAR8,RGB(10,100,100)){XG51};
DRAWICON(VAR13=1 AND REF(VAR13,1)=0,VAR3,8){XG51};
DRAWTEXT(VAR14=1 AND REF(VAR14,1)=0,VAR4,'B'),COLORRED{XG51};
XC:MA1,COLORBLUE{X^G~5_1^C^N^{};

源码正文：

月K:"kdj.K"(89,3,3),COLOR00FF00,NODRAW{XG51};
月D:"kdj.D"(89,3,3),COLOR00FF00{XG51};
周K:"KDJ.K"(27,3,3),COLORWHITE,NODRAW{XG51};
周D:"KDJ.D"(27,3,3),COLORWHITE{XG51};
日K:"KD.K"(5,3,3),COLORRED,NODRAW{XG51};
日D:"KD.D"(5,3,3),COLORRED,LINETHICK2,NODRAW{XG51};
差值:周D-月D,NODRAW{XG51};
DRAWICON(crOSS(周D,月D),月D*0.98,1){XG51};
DRAWICON(CROSS(月D,周D),月D*0.98,2){XG51};
周D涨:=周D>REF(周D,1){XG51};
DRAWICON(周D涨,周D*0.98,1){XG51};
周D跌:=周D<REF(周D,1){XG51};
DRAWICON(周D跌,周D*0.98,2){XG51};
月D涨:=月D>REF(月D,1){XG51};
DRAWICON(月D涨,月D*0.98,1){XG51};
月D跌:=月D<REF(月D,1){XG51};
DRAWICON(月D跌,月D*0.98,2){XG51};
50,{XG51};
30,{XG51};
80,{XG51};
BL:=(周D涨 AND 月D跌) OR (周D跌 AND 月D涨){XG51};
背离:IF(BL,50,0),COLORWHITE{XG51};
TX:周D涨 AND 月D涨 AND REF(周D跌,1) AND REF(月D跌,1) AND REF(周D跌,2) AND REF(月D跌,2) AND REF(周D跌,3) AND REF(月D跌,3){XG51};
同向:IF(TX,50,0),COLORBLUE{X^G-5~1^C^N^{};