通达信庄家资金动向及未加密选股指标公式源码

源码正文：

0,COLORRED{XG51};
ZJX1:=ema(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4{XG51};
ZJX2:=Ema(CLOSE,2)-EMA(CLOSE,89){XG51};
ZJX3:=2*(ZJX2- EMA(ZJX2,30))*10{XG51};
ZJX4:=EMA(CLOSE,2)-EMA(CLOSE,150){XG51};
ZJX5:=2*(ZJX4-EMA(ZJX4,100)){XG51};
庄家线:(POW(ZJX3,3)*0.1+POW(ZJX3,2))/45+(POW(ZJX5,3)*0.1+POW(ZJX5,1))*5,COLORWHITE{XG51};
庄家均线:EMA(庄家线,5),COLORRED{XG51};
stICKLINE(庄家均线>REF(庄家均线,1),0,庄家均线,1,1),COLORWHITE{XG51};
STICKLINE(庄家均线<=REF(庄家均线,1),0,庄家均线,1,1),COLORCYAN{XG51};
STICKLINE(crOSS(庄家线,庄家均线),0,庄家均线*1.2,3,0),COLORWHITE{XG51};
STICKLINE(CROSS(庄家均线,庄家线),0,庄家均线*1.2,3,0),COLORCYAN{X.G_5?1.C.N.{};

源码正文：

成本集中度:(COst(95)-COST(5))/(COST(95)+COST(5))*100,NODRAW{XG51};
顶95:COST(95),LINETHICK2,COLORRED{XG51};
拉75:COST(75), COLORLIGREEN{XG51};
控30:COST(30),COLORCYAN{XG51};
调10:COST(10),COLORBLUE{XG51};
惨4:COST(4),COLORmaGENTA{XG51};
底0.05:COST(0.05),COLORWHITE,LINETHICK2{XG51};
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORWHITE{XG51};
STICKLINE(V/REF(V,1)>2,OPEN,CLOSE,1,0),COLORCYAN{XG51};
A1:=BArslAST(REF(crOSS("macd.dif","MacD.DEA"),1)){XG51};
DRAWTEXT(REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L-0.02,'★M抄'),COLOREE00EE{XG51};
A2:=BARSLAST(REF(CROSS("kdj.K","kdj.D"),1)){XG51};
DRAWTEXT(REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"),L-0.10,'◎K抄'),COLOREE00EE{XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1","RSI.RSI2"),1)){XG51};
DRAWTEXT(REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0,L-0.18,'◆R抄'),COLOREE00EE;{XG51};
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1)){XG51};
DRAWTEXT(REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,H+0.16,'★M顶背离'),COLORCYAN;{XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)){XG51};
DRAWTEXT(REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K")>0,H+0.08,'◎K顶背离'),COLORCYAN{XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)){XG51};
DRAWTEXT(REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0,H+0.04,'◆R顶背离'),COLORCYAN;{XG51};
D:=ema((C*3+H+L+O)/6,5){XG51};
A线:=HHV(D,13)COLORBLUE,LINETHICK2{XG51};
B线:=LLV(D,13)COLORBLUE,LINETHICK2;日平:="MACD.MACD#DAY"(12,26,9){XG51};
周平:="MACD.MACD#WEEK"(12,26,9){XG51};
JC:=(A线-B线){XG51};
壹:=COUNT(JC>REF(JC,1)AND A线>REF(A线,1),5)=1 AND JC>REF(JC,1)AND A线>REF(A线,1)AND D>=REF(D,1){XG51};
G1:=FILTER(壹=1,10){XG51};
G2:=BARSLAST(G1>0){XG51};
G3:=IFF(G2>0 AND G2<=10,1,0)=1 AND ((C-REF(C,G2))/REF(C,G2))*100>=5{XG51};
概壹:=(SUM(FILTER(G3,10),0)/SUM(G1>0,0))*100{XG51};
加1:=COUNT(日平>=0 AND 周平>=0,5)=1 AND 日平>=0 AND 周平>=0{XG51};
加2:=FILTER(D=A线 AND REF(D,1)<REF(A线,1)AND REF(D,2)<REF(A线,2),10){XG51};
①:=FILTER(加1=1,10){XG51};
②:=BARSLAST(①>0){XG51};
③:=IFF(②>0 AND ②<=10,1,0)=1 AND ((C-REF(C,②))/REF(C,②))*100>=5{XG51};
概加1:=(SUM(FILTER(③,10),0)/SUM(①>0,0))*100{XG51};
好底:FILTER(COUNT(D=B线,3)>=2 AND D>B线,5),COLORWHITE,NODRAW{XG51};
DRAWTEXT(好底,L-0.5,'好底'),COLORWHITE{XG51};
SD1:=(C+L+H)/3;
SZ:=MA(C,120){XG51};
SVAR3:=(MA(H,5)-SZ)/SZ{XG51};
SVAR4:=MA((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100,3){XG51};
SDD1:DRAWTEXT(CROSS(95,SVAR4) AND SVAR3>0.3,1.51+HIGH ,'★S'),COLORWHITE{XG51};
SDD2:DRAWTEXT( CROSS(93,SVAR4) AND HHV(H,30)/LLV(L,30)>1.1 AND REF(SZ,1)/SZ>0.997 ,1.51+HIGH ,'★S'),COLORCYAN{XG51};
SDD3:DRAWTEXT(CLOSE<SZ AND SZ<REF(SZ,1) AND REF(SVAR4,1)>90 AND SVAR4<REF(SVAR4,1) AND REF(SVAR4,1)>REF(SVAR4,2) ,1.51+HIGH,'★S'),COLORYELLOW{XG51};
JRSV1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100{XG51};
JK1:=SMA(JRSV1,5,1){XG51};
JD1:=SMA(JK1,5,1){XG51};
JJ1:=3*JK1-2*JD1{XG51};
JAA1:=EMA(JJ1,5){XG51};
JAA2:=REF(JAA1,1){XG51};
JRSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
JK2:=SMA(JRSV2,3,1){XG51};
JD2:=SMA(JK2,3,1){XG51};
JJ2:=3*JK2-2*JD2{XG51};
JBB1:=EMA(JJ2,5){XG51};
JBB2:=REF(JBB1,1){XG51};
JDD:=JAA1>JAA2 AND JBB1>JBB2,COLORBLUE,,NODRAW{XG51};
J共振:JDD AND NOT(REF(JDD,1)) AND (JAA1<50 OR JBB1<50),NODRAW,COLORBLUE{XG51};
DRAWTEXT(J共振,HIGH+0.55,'J买'),COLORBLUE{XG51};
JE:=vol{XG51};
JJM1:=(HIGH+LOW+CLOSE)/3{XG51};
QJ00:=VOL/IF(HIGH=LOW,4,HIGH-LOW){XG51};
主买:=(QJ00*(JJM1-MIN(CLOSE,OPEN))){XG51};
主卖:=(QJ00*(MIN(OPEN,CLOSE)-LOW)){XG51};
AAQ:=IF(C>(H+L)/2,JE,0){XG51};
BBQ:=IF(C<(H+L)/2,JE,0){XG51};
F1:=SUM(AAQ,5);F2:=SUM(BBQ,5);F3:=EMA(F1-F2,3){XG51};
千均买:主买>主卖 AND CROSS(F3,REF(F3,1)) AND F3<0 AND C<15,COLORRED,NODRAW{XG51};
DRAWTEXT(千均买,L-0.2,'★千均买'),COLORRED{XG51};
N:=9{XG51};
N1:=6{XG51};
M:=14{XG51};
TYP := (HIGH + LOW + CLOSE)/3{XG51};
BCC1:=(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF{XG51};
CB1:=SMA(BCC1,3,1){XG51};
CB2:=SMA(CB1,3,1){XG51};
CB3:=3*CB1-2*CB2{XG51};
CBB1:=EMA(CB3,5){XG51};
CBB2:=REF(CBB1,1){XG51};
LC := REF(CLOSE,1){XG51};
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(Abs(CLOSE-LC),N1,1)*100{XG51};
RSI:=(RSI1-50)*5,LINETHICK2,COLORFFFFFF{XG51};
R1:=SMA(RSI,3,1){XG51};
BD1:=SMA(R1,3,1){XG51};
BJ1:=3*R1-2*BD1{XG51};
RR1:=EMA(BJ1,5){XG51};
RR2:=REF(RR1,1){XG51};
RR:=RR1>RR2{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
K:=SMA(RSV,3,1){XG51};
BK1:=(K-50)*5,COLOR00FF00{XG51};
KB2:=SMA(BK1,3,1){XG51};
DB2:=SMA(KB2,3,1){XG51};
JB2:=3*KB2-2*DB2{XG51};
BBB1:=EMA(JB2,5){XG51};
BBB2:=REF(BBB1,1){XG51};
金兰三宝:RR AND NOT(REF(RR,1)) AND (RR1<-100 AND BBB1<-100) AND CBB1<-100,COLORCYAN,NODRAW{XG51};
DRAWTEXT(金兰三宝,L-0.5,'金兰'),COLORCYAN{XG51};
bias5:=(C-MA(C,6))/MA(C,6)*100{XG51};
BIAS6:=(C-MA(C,12))/MA(C,12)*100{XG51};
BIAS7:=(C-MA(C,24))/MA(C,24)*100{XG51};
BIAS8:=(BIAS5+2*BIAS6+3*BIAS7)/6{XG51};
乖离:=MA(BIAS8,6){XG51};
DRAWICON(CROSS(BIAS8,乖离) AND 乖离<-9,H+1,9){X-G.5.1-C-N-{};