修饰的通达信6.10版分时好用指标(通达信)

源码正文：

HH:90{XG51};
KKK:=60{XG51};
DRAWTEXT(ISLAstBAR,65,' ■高度控盘'),COLORmaGENTA{XG51};
DRAWTEXT(ISLASTBAR,55,' ■主力控盘'),COLOR0000FF{XG51};
DRAWTEXT(ISLASTBAR,45,' ■无庄控盘'),COLORFFFFFF{XG51};
DRAWTEXT(ISLASTBAR,32,' ■主力出货'),COLOR00FF00{XG51};
DRAWTEXT(ISLASTBAR,20,' ■开始控盘'),COLOR00FFFF{XG51};
DRAWTEXT(ISLASTBAR,8,' ■渐强走势'),COLOR4B50F8{XG51};
DRAWTEXT(ISLASTBAR,-5,' ■超强走势'),COLOR4F06C8{XG51};
DRAWTEXT(ISLASTBAR,-16,' ■开始变盘'),COLORFFFF00{XG51};
VAR1:=ema(EMA(CLOSE,9),9){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
STICKLINE(控盘<0,KKK*控盘,0,0,0),COLORRED{XG51};
A10:=crOSS(控盘,0){XG51};
无庄:=IF(控盘<0,控盘,0){XG51};
开始控盘:IF(A10,50,0),LINETHICK1,COLORBLUE{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,KKK*控盘,0,0,0),COLORWHITE{XG51};
有庄:=IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0){XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,KKK*控盘,0,1,0),COLORFF00FF{XG51};
高控:=IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0){XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,KKK*控盘,0,0,0),COLOR00FF00{XG51};
出货:=IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0){XG51};
L1:=(EMA(CLOSE,3) - EMA(CLOSE,13)){XG51};
L2:=EMA(L1,9){XG51};
L3:=BArslAST(CROSS(L1,L2)){XG51};
L4:=REF(L3,L3+1){XG51};
L5:=L2{XG51};
变盘:=CROSS(L1,L2) AND L5{XG51};
STICKLINE(变盘,-8,0,1,0),COLORFFFF00{XG51};
difF:=(EMA(CLOSE,12)-EMA(CLOSE,26))*20{XG51};
DEA:=EMA(DIFF,9){XG51};
DIFL:=EMA(V,12)-EMA(V,26){XG51};
DIF:=EMA(C,12)-EMA(C,26){XG51};
BL:=DIFL>REF(DIFL,1) AND DIF<REF(DIF,1){XG51};
四天:=REF(BL,3)=1 AND REF(BL,2)=1 AND REF(BL,1)=1 AND BL{XG51};
三天:=REF(BL,2)=1 AND REF(BL,1)=1 AND BL{XG51};
强势:=KKK*IF(DIFF>DEA,DIFF,0){XG51};
STICKLINE(强势,-8,0,1,0),COLOR4F06C8{XG51};
渐强:=KKK*IF(DIFF>DEA AND DIFF<0,DIFF,0){XG51};
STICKLINE(渐强,-8,0,1,0),COLOR4B50F8{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
DRAWICON(FILTER(CROSS(K,D) AND D<26,6),2,1){X_G+5!1_C_N_{};

源码正文：

A:=(3*C+L+O+H)/6{XG51};
X:(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210,COLORRED,LINETHICK1{XG51};
Y:ma(X,15),COLORBLUE,LINETHICK1{XG51};
VAR4:=(2*CLOSE+HIGH+LOW)/4{XG51};
成本区:ema(VAR4,90)*0.995,COLORCYAN,CIRCLEDOT{XG51};
操作区:EMA(VAR4,142)*0.998,COLORLIMAGENTA,LINETHICK2{XG51};
铁底区:EMA(VAR4,250)*0.885,COLORWHITE,LINETHICK2{X~G.5_1~C~N~{};