通达信散户顶底主图未加密选股指标公式源码

源码正文：

买线:=ema(C,2){XG51};
卖线:=Ema(SLOPE(C,21)*20+C,42);
BU:=crOSS(买线,卖线){XG51};
SEL:=CROSS(卖线,买线){XG51};
DRAWICON(BU,L-0.1,1){XG51};
DRAWICON(SEL,H+0.1,2){XG51};
stICKLINE(买线>=卖线,LOW,HIGH,0.0,1),COLORWHITE{XG51};
STICKLINE(买线>=卖线,CLOSE,OPEN,2,1),COLORWHITE{XG51};
STICKLINE(买线<卖线,LOW,HIGH,0.0,1),COLORCYAN{XG51};
STICKLINE(买线<卖线,CLOSE,OPEN,2,1),COLORCYAN{XG51};
散户:EMA(CLOSE,5),COLORRED{XG51};
操盘:MA(CLOSE,9),COLORGREEN,LINETHICK2{XG51};
界点:MA(CLOSE,20),COLORLIMAGENTA{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(Abs((CLOSE - LC)),3,1)) * 100){XG51};
FF:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
日:=150;昨前:=3{XG51};
高1:=REF(HHV(H,日),昨前){XG51};
低1:=REF(LLV(L,日),昨前){XG51};
H1:=高1-(高1-低1)*0.191{XG51};
H2:=高1-(高1-低1)*0.382{XG51};
H3:=高1-(高1-低1)*0.5{XG51};
H4:=高1-(高1-低1)*0.618{XG51};
H5:=高1-(高1-低1)*0.809{XG51};
顶:REFDATE(高1,DATE),COLORWHITE{XG51};
一0.809:REFDATE(H1,DATE),COLORBLUE{XG51};
二0.618:REFDATE(H2,DATE),COLORLIMAGENTA{XG51};
三0.500:REFDATE(H3,DATE),COLORRED{XG51};
四0.382:REFDATE(H4,DATE),COLORCYAN{XG51};
五0.191:REFDATE(H5,DATE),COLORBLUE{XG51};
低:REFDATE(低1,DATE),COLORWHITE{X*G_5~1*C*N*{};

源码正文：

A:=vol*C;
B:=SUM(A,1)/SUM(VOL,1){XG51};
B1:=ema(B,17); 资金:=(B-B1)*100/B; difF:Ema(资金,12)-EMA(资金,26){XG51};
DEA: EMA(DIFF,9); M: 2*(DIFF-DEA), COLORstICK{XG51};
STICKLINE(M>=REF(M,1)AND M>0,0,M,2.2,0),COLOR000088{XG51};
STICKLINE(M>=REF(M,1)AND M>0,0,M,1.5,0),COLOR0000AA{XG51};
STICKLINE(M>=REF(M,1)AND M>0,0,M,0.5,0),COLOR0000CC{XG51};
STICKLINE(M>=REF(M,1)AND M>0,0,M,0.1,0),COLOR0000EE{XG51};
STICKLINE(M<REF(M,1)AND M>0,0,M,2.2,0),COLOR338888{XG51};
STICKLINE(M<REF(M,1)AND M>0,0,M,1.3,0),COLOR33AAAA{XG51};
STICKLINE(M<REF(M,1)AND M>0,0,M,0.9,0),COLOR33CCCC{XG51};
STICKLINE(M<REF(M,1)AND M>0,0,M,0.1,0),COLOR33EEEE{XG51};
STICKLINE(M>REF(M,1)AND M<0,0,M,2.2,0),COLORCC00CC{XG51};
STICKLINE(M>REF(M,1)AND M<0,0,M,1.1,0),COLOREE00EE{XG51};
STICKLINE(M>REF(M,1)AND M<0,0,M,0.1,0)COLORFF00FF{XG51};
STICKLINE(M<=REF(M,1)AND M<0,0,M,2.2,0),COLOR009900{XG51};
STICKLINE(M<=REF(M,1)AND M<0,0,M,1.5,0),COLOR00BB00{XG51};
STICKLINE(M<=REF(M,1)AND M<0,0,M,1.1,0),COLOR00DD00{XG51};
STICKLINE(M<=REF(M,1)AND M<0,0,M,0.1,0),COLOR00FF00{XG51};
IF(DIFF<0,DIFF,0),COLORWHITE,LINETHICK2{XG51};
IF(DIFF<0,0,DIFF),COLORBLUE,LINETHICK2{XG51};
IF(DIFF<DEA,DIFF,DEA),COLOR00FF00,LINETHICK2{XG51};
IF(DIFF>DEA,DEA,DEA),COLORRED,LINETHICK1{XG51};
低金叉:=crOSS(DIFF,DEA) AND DIFF<-0.1{XG51};
STICKLINE(低金叉,-4,-2,2.5,0),COLOR338888{XG51};
STICKLINE(低金叉,-4,-2,1.5,0),COLOR33AAAA{XG51};
STICKLINE(低金叉,-4,-2,0.9,0),COLOR33CCCC{XG51};
STICKLINE(低金叉,-4,-2,0.1,0),COLOR33EEEE{XG51};
STICKLINE(低金叉,-0.4,-2,0.3,1),COLOREE00EE{XG51};
DRAWTEXT(低金叉,-3,' 低位金叉'),COLORBLUE{XG51};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BArslAST(DEA>=0)){XG51};
二金:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二金,0,-2.5,2,0),COLORCC00CC{XG51};
STICKLINE(二金,0,-2.5,1.5,0),COLOREE00EE{XG51};
STICKLINE(二金,0,-2.5,0.1,0)COLORFF00FF{XG51};
DRAWICON(二金,DEA*1.2,23) {XG51};
DRAWTEXT(二金,-2,' 二次金叉'),COLORFF00FF{XG51};
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1)AND CROSS(DIFF,DEA){XG51};
STICKLINE(底背,0,2.5,2.5,0),COLOR009900{XG51};
STICKLINE(底背,0,2.5,1.4,0),COLOR00BB00{XG51};
STICKLINE(底背,0,2.5,0.5,0),COLOR00DD00{XG51};
STICKLINE(底背,0,2.5,0.1,0),COLOR00FF00{XG51};
STICKLINE(底背,4.5,2.5,0.3,1),COLOR0000FF{XG51};
DRAWLINE(A1=0,DEA,底背,DEA,0),COLORWHITE,LINETHICK2{XG51};
DRAWTEXT(底背,2,' 底背离'),COLOR00FF00{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};

STICKLINE(顶背,2.5,4,2.5,0),COLORFF4400{XG51};
STICKLINE(顶背,2.5,4,1.5,0),COLORFF8800{XG51};
STICKLINE(顶背,2.5,4,0.2,0),COLORFFCC00{XG51};
STICKLINE(顶背,0.4,2.5,0,0),COLORFFFFFF{X*G=5~1*C*N*{};