通达信快慢黄金线主图选股指标公式源码

通达信快慢黄金线主图选股指标公式源码

源码正文：

DIR1:=Abs(CLOSE-REF(CLOSE,5)){XG51};
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5){XG51};
ER1:=DIR1/VIR1{XG51};
CS1:=ER1*(0.8-2/8)+2/8{XG51};
CQ1:=CS1*CS1{XG51};
Ama1:=ema(dma(CLOSE,CQ1),2) ,COLORRED;  
DIR2:=ABS(CLOSE-REF(CLOSE,10)){XG51};
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10){XG51};
ER2:=DIR2/VIR2{XG51};
CS2:=ER2*(0.8-2/24)+2/24{XG51};
CQ2:=CS2*CS2{XG51};
AMA2:EMA(DMA(CLOSE,CQ2),2),COLORYELLOW,LINETHICK2{XG51};
IF(AMA2/REF(AMA2,1)<0.9975,AMA2,DRAWNULL),COLOR33CC33,LINETHICK2{XG51};
IF(AMA2/REF(AMA2,1)>1.001,AMA2,DRAWNULL),COLOR3300FF,LINETHICK2{XG51};
VA:FORCAst(CLOSE,13),COLORYELLOW,LINETHICK2{XG51};
VAR1:=REF(VA,1){XG51};
A:=VA>VAR1 AND REF(VA,1)<REF(VAR1,1){XG51};
IF(VA>VAR1,VA,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
IF(VA<VAR1,VA,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
DRAWICON(crOSS(VA,AMA2) AND AMA2/REF(AMA2,1)>1.001,AMA2*0.98,5){XG51};
CG:MA(C,17),COLORFFCC66{XG51};
FL:HHV(CG,2){XG51};
FS:IF(CG<FL,(CG-(FL-CG)),FL){XG51};
IF(FL=FS,FS,DRAWNULL),COLOR3300FF,LINETHICK2{XG51};
IF(FL<FS,FS,DRAWNULL),COLOR33CC33,LINETHICK2{XG51};
IF(FL>FS,FS,DRAWNULL),COLOR33CC33,LINETHICK2{X!G.5_1!C!N!{};