通达信艳阳天未加密选股指标公式源码

源码正文：

实体振幅:=(maX(C,O)-MIN(C,O))/MIN(C,O)*100{XG51};
st:=实体振幅<REF(实体振幅,1)*(2/3){XG51};
VL:=V<REF(V,1)*(2/3) AND LLV(V,5)=V{XG51};
GJ:=C<REF((C+O)/2,1){XG51};
SCD:ST AND VL AND GJ AND C>O AND REF(C<O AND 实体振幅>3,1) AND L<REF(L,1){X.G?5_1.C.N.{};

源码正文：

M30:=ma(C,30){XG51};
M60:=MA(C,60){XG51};
DRAWBAND(M30,RGB(233,0,18),M60,RGB(21,174,103)){XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};
T1:=BArslAst(crOSS(M30,M60)){XG51};
T2:=REF(T1,T1+1)+T1+1{XG51};
D1:DRAWLINE(CURRBARSCOUNT=CONST(T1)+1,M30,REF(CURRBARSCOUNT=CONST(T1)+1,1),REF(M30,1),1),DOTLINE,COLORCYAN{XG51};
D2:DRAWLINE(CURRBARSCOUNT=CONST(T2)+1,M30,REF(CURRBARSCOUNT=CONST(T2)+1,1),REF(M30,1),1),DOTLINE,COLORCYAN{XG51};
DRAWTEXT(CURRBARSCOUNT=CONST(T1)+1,M30*1.02,VARCAT(VARCAT('金叉价:',VAR2STR(C,2)),'元'))COLORBLUE,DRAWAbovE{XG51};
DRAWTEXT(CURRBARSCOUNT=CONST(T2)+1,M30*1.02,VARCAT(VARCAT('金叉价:',VAR2STR(C,2)),'元'))COLORBLUE,DRAWABOVE{XG51};
A1:=REF(LLV(L,T1+1),SUMBARS(CROSS(M30,M60),0)){XG51};
A2:=REF(LLV(L,T1+1),SUMBARS(CROSS(M30,M60),1)){XG51};
V1:=REF(HHV(V,T1+1),SUMBARS(CROSS(M30,M60),0)){XG51};
V2:=REF(HHV(V,T1+1),SUMBARS(CROSS(M30,M60),1)){XG51};
A3:=A1>A2 AND V1>V2{XG51};
A4:=CROSS(A3,0.5) AND D1>D2 AND C/D1<1.3{XG51};
A5:=BARSLAST(A4){XG51};
XG:=COUNT(C>REF(C,A5),A5)=1 AND C>REF(C,A5){XG51};
DRAWICON(XG,LOW,1){XG51};
DRAWLINE(A4,C,REF(A4,1),REF(C,1),1),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT(A4,C,'双金叉上移'),DRAWABOVE,COLORBLUE{X~G?5_1~C~N~{};