通达信分时跟庄选股指标公式源码

通达信分时跟庄选股指标公式源码

源码正文：

difF:=((ema(CLOSE,12)-Ema(CLOSE,26))*20)*100{XG51};
DEA:=EMA(DIFF,9){XG51};
DRAWBAND(DIFF,RGB(255,168,0),DEA,RGB(0,168,168)){XG51};
KKK:=60{XG51};
DRAWTEXT(ISLAstBAR,95,'   ■ 姜黄--筹码量'),COLOR0A40FC{XG51};
DRAWTEXT(ISLASTBAR,84,'   ■ 粉柱--高度控盘'),COLORLIMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,73,'   ■ 红柱--主力控盘'),COLOR0000FF{XG51};
DRAWTEXT(ISLASTBAR,62,'   ■ 白柱--无庄控盘'),COLORFFFFFF{XG51};
DRAWTEXT(ISLASTBAR,51,'   ■ 绿柱--主力出货'),COLOR00FF00{XG51};
DRAWTEXT(ISLASTBAR,40,'   ■ 黄尖--开始控盘'),COLOR00FFFF{XG51};
DRAWTEXT(ISLASTBAR,29,'   ■ 淡红--渐强走势'),COLOR4B50F8{XG51};
DRAWTEXT(ISLASTBAR,18,'   ■ 深红--超强走势'),COLOR4F06C8{XG51};
DRAWTEXT(ISLASTBAR,7,'   ■ 青柱--开始变盘'),COLORFFFF00{XG51};
VAR1:=EMA(EMA(CLOSE,9),9){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
STICKLINE(控盘<0,KKK*控盘,0,1,0),COLORRED{XG51};
A10:=crOSS(控盘,0){XG51};
无庄:=IF(控盘<0,控盘,0){XG51};
开始控盘:IF(A10,100,0),LINETHICK1,COLORBLUE{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,KKK*控盘,0,1,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,1,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,2,0),COLORFFFF00{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,2,0),COLOR4F06C8{XG51};
渐强:=KKK*IF(DIFF>DEA AND DIFF<0,DIFF,0){XG51};
STICKLINE(渐强,-8,0,2,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){XG51};
AZ5:=SMA(Abs(LOW-REF(LOW,1)),3,1)/SMA(MAX(LOW-REF(LOW,1),0),3,1)*100{XG51};
AZ6:=EMA(IF(CLOSE*1.3,AZ5*10,AZ5/10),3){XG51};
AZ10:=EMA(IF(LOW<=LLV(LOW,29),(AZ6+HHV(AZ6,37)*2)/2,0),3)/8888*IF(MA(CLOSE,90),1,0){XG51};
筹码:IF(AZ10>100,100,AZ10*0.1),COLOR0A40FC,LINETHICK2{XG51};
STICKLINE(KKK*筹码,0,30*筹码,6,0)*DATE<=1070615,COLOR00EEFF{XG51};
STICKLINE(KKK*筹码,0,25*筹码,6,0)*DATE<=1070615,COLOR00BBFF{XG51};
STICKLINE(KKK*筹码,0,20*筹码,6,0)*DATE<=1070615,COLOR0099FF{XG51};
STICKLINE(KKK*筹码,0,15*筹码,6,0)*DATE<=1070615,COLOR0066FF{XG51};
STICKLINE(KKK*筹码,0,10*筹码,6,0)*DATE<=1070615,COLOR0000FF{X=G^5_1=C=N={};