通达信大庄未加密选股指标公式源码

源码正文：

VAR1:=ema(Ema(CLOSE,13),13){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
stICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF{XG51};
无庄控盘:=控盘<0{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF{XG51};
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0{XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLORFFFF00{XG51};
主力出货:=控盘<REF(控盘,1) AND 控盘>0{XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,1),COLOR00FFFF{XG51};
高度控盘: VAR2>50 AND COST(85)<CLOSE AND 控盘>0,COLOR00FFFF,LINETHICK2{XG51};
A10:=crOSS(控盘,0){XG51};
控盘B:=FILTER(IF(A10,1,0),5){XG51};
JJ:=DYnaINFO(11){XG51};
P:=55;S:=8;M1:=3{XG51};
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,COLORWHITE,LINETHICK2{XG51};
神:=EMA(财,M1),COLORCYAN,LINETHICK1{XG51};
DRAWBAND(财,RGB(255,0,0),神,RGB(0,100,50)){XG51};
BTJ1:=(C-JJ)/JJ<-0.03{XG51};
BTJ11:=(C-JJ)/JJ<-0.03{XG51};
BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005{XG51};
STJ1:=(C-JJ)/JJ>0.005{XG51};
STJ01:=控盘<REF(控盘,1) AND 控盘>0.5{XG51};
STJ02:=控盘>0{XG51};
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2{XG51};
BTJ22:=控盘>REF(控盘,1) AND 控盘<0 {XG51};
BTJ3:=CROSS(财,神) AND 财<-0.3{XG51};
BTJ32:=CROSS(财,神) AND 财<-0.1{XG51};
STJ31:=CROSS(神,财){XG51};
STJ32:=CROSS(神,财) AND 财>1.618{XG51};
{XG51};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13){XG51};
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13){XG51};
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13){XG51};
DRAWTEXT(BTJ81,神,'↑买底'),COLORWHITE{XG51};
DRAWTEXT(BTJ811,神*1.2,'↑有庄'),COLORRED{XG51};
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13){XG51};
STJ82:=FILTER(STJ02 AND STJ32 ,13){XG51};
STJ83:=STJ81 AND STJ82{XG51};
DRAWTEXT(STJ83,神,'↓卖'),COLOR00FF00{XG51};
difF: (EMA(CLOSE,8) - EMA(CLOSE,55))*10,COLORWHITE{XG51};
DEA: EMA(DIFF,3),COLORCYAN{XG51};
庄:= BTJ11 AND BTJ2 AND BTJ3{XG51};
有庄:FILTER(庄,55),COLORRED{XG51};
DRAWTEXT(BTJ811,有庄,'有庄'),COLORRED{X!G~5_1!C!N!{};

源码正文：

T1:=10{XG51};
T2:=20{XG51};
T3:=40{XG51};
M1:=(HHV(C,T1)-LLV(C,T1))/(HHV(C,T1)+LLV(C,T1))*200{XG51};
M2:=(HHV(C,T2)-LLV(C,T2))/(HHV(C,T2)+LLV(C,T2))*200{XG51};
M3:=(HHV(C,T3)-LLV(C,T3))/(HHV(C,T3)+LLV(C,T3))*200{XG51};
短期波动:M1,COLORWHITE{XG51};
中期波动:M2,COLORBLUE{XG51};
长期波动:M3,COLORmaGENTA{XG51};
Z11:=VARCAT('短:',VAR2stR(MA(M1,50)/1,1)){XG51};
Z12:=VARCAT('中:',VAR2STR(MA(M2,100)/2,1)){XG51};
Z13:=VARCAT('长:',VAR2STR(MA(M3,200)/4,1)){XG51};
Z10:=VARCAT(STRCAT('可排序波动比较',Z11),VARCAT(Z12,Z13)){XG51};
DRAWTEXT_FIX(1,0,0,0,Z10),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0,1,0,'通过挖掘短中长波动定势，可以做出很多选股公式，本指标仅供本群参考研究使用'),COLORBLACK{XG51};
M11:=MA(M1,3);M12:=MA(M1,5){XG51};
C11:=IF(M11>=M12,'短期波动增大;','短期波动减小;'){XG51};
C12:=IF(M1<=5,'处于盘整阶段;',IF(M1<=15,'处于趋势状态;','处于异动状态;')){XG51};
DRAWTEXT_FIX(1,0,0.1,0,STRCAT(C11,C12)){XG51};
M21:=MA(M2,5);M22:=MA(M2,13){XG51};
C21:=IF(M21>=M22,'中期波动增大;','中期波动减小;'){XG51};
C22:=IF(M2<=10,'处于盘整阶段;',IF(M2<=20,'处于趋势状态;','处于异动状态;')){XG51};
DRAWTEXT_FIX(1,0,0.2,0,STRCAT(C21,C22)){XG51};
M31:=MA(M3,13);M32:=MA(M3,26){XG51};
C31:=IF(M31>=M32,'长期波动增大;','长期波动减小;'){XG51};
C32:=IF(M3<=15,'处于盘整阶段;',IF(M3<=30,'处于趋势状态;','处于异动状态;')){XG51};
DRAWTEXT_FIX(1,0,0.3,0,STRCAT(C31,C32)){XG51};
MMAX:=MAX(MAX(M12,M22),M32){XG51};
MMIN:=MIN(MIN(M12,M22),M32){XG51};
集中度:100-(MMAX-MMIN)/(MMAX+MMIN)*100,NODRAW{XG51};
DRAWICON(crOSS(M32,10),10,25){XG51};
DRAWICON(集中度>90 AND M3<=REF(M3,1) AND M1>REF(M1,1) AND MA(C,5)>MA(C,13),M3,5){XG51};
NOTEXT25:25,CROSSDOT,COLORCYAN{XG51};
NOTEXT10:10,CIRCLEDOT,COLORBLACK{XG51};
DRAWTEXT(CURRBARSCOUNT=7,10,'爆发线'){XG51};
DRAWTEXT(CURRBARSCOUNT=7,25,'异动线'){XG51};
J11:=CROSS(M32,10){XG51};
T11:=BArslAST(J11){XG51};
TJ1:=CROSS(M1,5) AND T11<10{XG51};
DRAWICON(TJ1,M3,1){X.G_5?1.C.N.{};