通达信重心线主图未加密选股指标公式源码

通达信重心线主图未加密选股指标公式源码

源码正文：

重心线:(H+L+O+C*3)/6{XG51};
NX:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:=(20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,4)
+15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9)
+10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,13)+6*REF(NX,14)
+5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17)
+2*REF(NX,18)+REF(NX,20))/210{XG51};
牛熊线:ma(牛线,6),COLORCYAN,LINETHICK2{XG51};
IF(牛熊线>=REF(牛熊线,1),牛熊线,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
简底:=H>REF(H,1) AND REF(H,1)<REF(H,2) AND L>REF(L,1) AND REF(L,1)<REF(L,2){XG51};
简顶:=H<REF(H,1) AND REF(H,1)>REF(H,2) AND L<REF(L,1) AND REF(L,1)>REF(L,2){XG51};
包含1:=REF(H,1)>=REF(H,2) AND REF(L,1)<=REF(L,2){XG51};
包含2:=REF(H,1)<=REF(H,2) AND REF(L,1)>=REF(L,2){XG51};
包底1:=H>REF(H,2) AND REF(H,2)<REF(H,3) AND L>REF(L,1) AND REF(L,1)<REF(L,3){XG51};
包底2:=H>REF(H,1) AND REF(H,1)<REF(H,3) AND L>REF(L,2) AND REF(L,2)<REF(L,3){XG51};
包顶1:=H<REF(H,1) AND REF(H,1)>REF(H,3) AND L<REF(L,2) AND REF(L,2)>REF(L,3){XG51};
包顶2:=H<REF(H,2) AND REF(H,2)>REF(H,3) AND L<REF(L,1) AND REF(L,1)>REF(L,3){XG51};
复底:=IF(包含1,包底1,IF(包含2,包底2,简底)){XG51};
复顶:=IF(包含1,包顶1,IF(包含2,包顶2,简顶)){XG51};
底分型:=IF(BArslAST(crOSS(牛熊线,重心线))>3,FILTER(BacKSET(FILTER(复底 AND 重心线<牛熊线,3),2),1),0){XG51};
顶分型:=IF(BARSLAST(CROSS(重心线,牛熊线))>3,FILTER(BACKSET(FILTER(复顶 AND 重心线>牛熊线,3),2),1),0){XG51};
STICKLINE(底分型,C,O,3,0),COLORFF00FF,LINETHICK2{XG51};
STICKLINE(底分型,C,O,2,0),COLORFF00FF,LINETHICK2{XG51};
STICKLINE(底分型,H,L,0,0),COLORFF00FF,LINETHICK2{XG51};
STICKLINE(顶分型,C,O,3,0),COLORBLUE,LINETHICK2{XG51};
STICKLINE(顶分型,C,O,2,0),COLORBLUE,LINETHICK2{XG51};
STICKLINE(顶分型,H,L,0,0),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT(底分型,L*0.99,'底'),COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(顶分型,H*1.02,'顶'),COLORBLUE,LINETHICK1{X=G-5_1=C=N={};

通达信均线距离角度未加密选股指标公式源码

源码正文：

ma1:=MA(CLOSE,5){XG51};
MA2:=MA(CLOSE,10){XG51};
MA3:=MA(CLOSE,30){XG51};
MA4:=MA(CLOSE,60){XG51};
X1:=IF(MA1>MA2,Abs(MA1-MA2),-ABS(MA1-MA2)){XG51};
X2:=IF(MA1>MA3,ABS(MA1-MA3),-ABS(MA1-MA3)){XG51};
X3:=IF(MA3>MA4,ABS(MA3-MA4),-ABS(MA3-MA4)){XG51};
X4:=IF(MA2>MA3,ABS(MA2-MA3),-ABS(MA2-MA3)){XG51};
XJL:= X2>REF(X2,1)AND X3>REF(X3,1) AND (X1>REF(X1,1) OR X4>REF(X4,1)) {XG51};
JD1:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416{XG51};
JD2:=ATAN((MA2/REF(MA2,1)-1)*100)*180/3.1416{XG51};
JD3:=ATAN((MA3/REF(MA3,1)-1)*100)*180/3.1416{XG51};
JD4:=ATAN((MA4/REF(MA4,1)-1)*100)*180/3.1416{XG51};
XJD1:=crOSS(JD1,JD2){XG51};
XJD2:=CROSS(JD1,JD3){XG51};
XJD3:=CROSS(JD1,JD4){XG51};
XJD4:=CROSS(JD2,JD3){XG51};
XJD5:=CROSS(JD2,JD4){XG51};
XJDS:=JD2>REF(JD2,1) AND JD4>REF(JD4,1) AND JD3>REF(JD3,1) AND JD1>REF(JD1,1) {XG51};
XJDC:=(COUNT(XJD2,3) AND COUNT(XJD3,3)) OR (REF(JD2,1)<REF(JD2,2) AND REF(JD1,1)<REF(JD1,2) AND REF(JD3,1)<REF(JD3,2) AND REF(JD2,2)>REF(JD2,3) AND REF(JD3,2)>REF(JD3,3) AND REF(JD1,2)>REF(JD1,3)){XG51};
DD:=ema((C*3+H+L+O)/6,5){XG51};
YL:=DD>=REF(DD,1) AND C>DD{XG51};
JDJL:FILTER(YL AND XJDS AND XJDC AND XJL AND MA2>=REF(MA2,1) AND C>MA1 AND C>MA3 AND L<MA1,7){X=G~5^1=C=N={};