通达信筹码拉一波未加密选股指标公式源码

通达信筹码拉一波未加密选股指标公式源码

源码正文：

M1:=3{XG51};
M2:=3{XG51};
VARF:=(2*CLOSE+HIGH+LOW)/4{XG51};
VA4:=LLV(LOW,34){XG51};
VA5:=HHV(HIGH,34){XG51};
VA6:=ema((VARF-VA4)/(VA5-VA4)*100,6){XG51};
VA7:=Ema(0.667*REF(VA6,1)+0.333*VA6,4){XG51};
凤尾鱼:=stICKLINE(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.3 AND COUNT(VA6>VA7,3) AND
REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),1.5,0,6,0),COLORYELLOW{XG51};
STICKLINE(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.3 AND COUNT(VA6>VA7,3) AND
REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),100,0,4,0),COLORYELLOW{XG51};
DRAWTEXT(凤尾鱼,54,' ---定海神针'),COLORGREEN{XG51};
A1J:=Abs(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,10))/EMA(CLOSE,10));
A2J:=dma(((2.15*CLOSE+LOW+HIGH)/4),A1J);
金线王:=EMA(A2J,5)*1{XG51};
金线王2:=EMA(A2J,200)*1.118{XG51};
条件:=(C-REF(C,1))/REF(C,1)*100>8{XG51};
金K线:=crOSS(C,金线王) AND 条件{XG51};
RRFJ:=金K线,STICK{XG51};
STICKLINE(IF(RRFJ,-120,0),+80,0,2,0),COLORMAGENTA{XG51};
DRAWTEXT(RRFJ,42,'---迎财神'),COLORBLUE{XG51};
VAR1A:=DMA(AMOUNT/vol/100,VOL/CAPITAL){XG51};
VAR4AA:=CLOSE/(REF(CLOSE,1))>1.05 AND (HIGH/CLOSE<1.01){XG51};
游资进场:=(FILTER(VAR4AA>0,13)AND DYNAINFO(4)>0)*8,COLORBLUE{XG51};
A10:=10,COLORBLUE{XG51};
STICKLINE(游资进场,0,45,2,0),COLORRED{XG51};
LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12)){XG51};
拉升:=FILTER(LS,58){XG51};
DD11:0,COLORFF33FF{XG51};
DD22:0,COLORCYAN{XG51};
M:=30{XG51};
N:=15{XG51};
AJ:=HHV(H,M)=H{XG51};
AJT:=BArslAST(AJ){XG51};
AJ1:=LLV(L,N)=L{XG51};
AJ1T:=BARSLAST(AJ1){XG51};
TJ:=HHV(H,M)=H{XG51};
TJT:BARSLAST(TJ)NODRAW{XG51};
TJ1T:=BARSLAST(AJ1){XG51};
OUT:=STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,REF(L,TJ1T)
,REF(H,TJT),0,0),COLORYELLOW,LINETHICK3{XG51};
STICKLINE(OUT>-100,100,80,4,0),COLORBROWN,LINETHICK2{XG51};
SVAR1:='SM波段王.NOTEXTVBR4#DAY'=1;
VBR3:=SVAR1{XG51};
VBR4:=SVAR1{XG51};
YK:'kdj.K#MONTH' NODRAW{XG51};
YD:'kdJ.D#MONTH' NODRAW{XG51};
ZK:'KDJ.K#WEEK' NODRAW{XG51};
ZD:='KDJ.D#WEEK' NODRAW{XG51};
YY:='三强引用.KK#MONTH' NODRAW{XG51};
ZZ:='三强引用.KK#WEEK' NODRAW{XG51};
日买:='KDJ.K#DAY">"KDJ.D#DAY';
ZXG:=ZZ=1;
YXG:=YY=1;
多共振:=FILTER(CROSS(日买 AND ZXG AND YXG AND REF(ZK,1)<50,0.5),5)COLORBLUE, NODRAW{XG51};

日K:="KDJ.K#DAY"(9,3,3){XG51};
日D:="KDJ.D#DAY"(9,3,3){XG51};

日dif:="MacD.DIF#DAY"(12,26,9){XG51};
日DEA:="MACD.DEA#DAY"(12,26,9){XG51};

日RSI:="RSI.RSI1#DAY"(5){XG51};

周K:="KDJ.K#WEEK"(9,3,3){XG51};
周D:="KDJ.D#WEEK"(9,3,3){XG51};

周DIF:="MACD.DIF#WEEK"(12,26,9){XG51};
周DEA:="MACD.DEA#WEEK"(12,26,9){XG51};

周RSI:="RSI.RSI1#WEEK"(9){XG51};

月K:="KDJ.K#MONTH"(9,3,3){XG51};
月D:="KDJ.D#MONTH"(9,3,3){XG51};

月DIF:="MACD.DIF#MONTH"(12,26,9){XG51};
月DEA:="MACD.DEA#MONTH"(12,26,9){XG51};

月RSI:="RSI.RSI1#MONTH"(9){XG51};
X1:=日K>日D{XG51};
X2:=日DIF>日DEA{XG51};
X3:=日RSI>50{XG51};
X4:=周K>周D{XG51};
X5:=周DIF>周DEA{XG51};
X6:=周RSI>50{XG51};
X7:=月K>月D{XG51};
X8:=月DIF>月DEA{XG51};
X9:=月RSI>50{XG51};
黑马初显:=X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 AND X9{XG51};
STICKLINE(黑马初显,120,110,8.12,0),COLORWHITE{XG51};
STICKLINE(黑马初显 AND C/REF(C,1)>1.095,120,110,4.66,0),COLORBLUE{XG51};
STICKLINE(黑马初显 AND C/REF(C,1)>1.095,120,110,2.06,0),COLORWHITE{XG51};
月RSI1:="RSI.RSI1#MONTH"(9),COLORRED{XG51};
A:=月RSI1>50{XG51};
首月R:=CROSS(A>REF(A,1),0.5),COLORBLACK,LINETHICK3{XG51};
STICKLINE(首月R,100,63,5,0),COLORBLACK,LINETHICK3{XG51};
月DIF1:="MACD.DIF#MONTH"(12,26,9)COLORBLUE{XG51};
月DEA1:="MACD.DEA#MONTH"(12,26,9)COLORBLUE{XG51};
AA:=月DIF1>月DEA1{XG51};
首月M:=CROSS(AA>REF(AA,1),0.5)COLORBLUE{XG51};
STICKLINE(首月M,100,85,5,0),COLORBLUE{XG51};
月K1:="KDJ.K#MONTH"(9,3,3),COLORLIMAGENTA{XG51};
月D1:="KDJ.D#MONTH"(9,3,3),COLORLIMAGENTA{XG51};
AAA:=月K1>月D1{XG51};
首月K:=CROSS(AAA>REF(AAA,1),0.5),COLORLIMAGENTA,LINETHICK3{XG51};
STICKLINE(首月K,1.1,1.05,5,0),COLORLIMAGENTA,LINETHICK3{XG51};
周RSI1:="RSI.RSI1#WEEK"(9),COLORCYAN{XG51};
AAAA:=周RSI1>50{XG51};
首周R:=CROSS(AAAA>REF(AAAA,1),0.5),COLORWHITE,LINETHICK4{XG51};
STICKLINE(首周R,10.05,21,5,0),COLORGRAY,LINETHICK4{XG51};
周DIF1:="MACD.DIF#WEEK"(12,26,9),COLORGREEN{XG51};
周DEA1:="MACD.DEA#WEEK"(12,26,9),COLORGREEN{XG51};
AAAAA:=周DIF1>周DEA1{XG51};
首周M:=CROSS(AAAAA>REF(AAAAA,1),0.5),COLORGREEN{XG51};
STICKLINE(首周M,1,10,5,0),COLORGREEN{XG51};
周K1:="KDJ.K#WEEK"(9,3,3),COLORYELLOW{XG51};
周D1:="KDJ.D#WEEK"(9,3,3),COLORYELLOW{XG51};
AAAAAA:=周K1>周D1{XG51};
首周K:=CROSS(AAAAAA>REF(AAAAAA,1),0.5),COLORYELLOW{XG51};
STICKLINE(首周K,31.05,20,5,0),COLORMAGENTA,LINETHICK1{XG51};
STICKLINE(首周K,30.95,20.91,5,0),COLORCYAN{XG51};
DRAWTEXT(首周K,30.935,' --马坑'),COLORGREEN{XG51};

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
K:SMA(RSV,M1,1),COLORRED{XG51};
D:=SMA(K,M2,1){XG51};
J:3*K-2*D,COLORLIMAGENTA{XG51};
VAR1H:=REF(LOW,1){XG51};
VAR2H:=(SMA(ABS(LOW-VAR1H),13,1))/(SMA(MAX(LOW-VAR1H,0),13,1))*4{XG51};
VAR3H:=EMA(VAR2H,13){XG51};
VAR4H:=LLV(LOW,34){XG51};
VAR5H:=EMA(IF(LOW<=VAR4H,VAR3H,0),3){XG51};
VAR6H:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)
+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
VAR7H:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)
+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
VAR8H:=VAR6H<REF(VAR7H,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1){XG51};
STICKLINE(VAR8H AND COUNT(VAR8H,18)=1,-10,-100,3,0),COLORMAGENTA{XG51};

VAR3AP:=IF((CLOSE>REF(CLOSE,1)),88,0){XG51};
VAR4AP:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AP>0),91,0){XG51};
XG:=(FILTER((VAR4AP>90),45)),COLORBLUE{XG51};
STICKLINE(XG,-30,0,2,0),COLORCYAN{XG51};

RSVP:=(C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*20-20{XG51};
KV:=SMA(RSVP,3,1){XG51};
DV:=SMA(KV,3,1){XG51};
JV:=3*KV-2*DV{XG51};
ZDZK1:=EMA(JV,6){XG51};
ZDZK2:=REF(ZDZK1,1){XG51};
凤:=IF(ZDZK1>=ZDZK2,ZDZK1+2,ZDZK2){XG51};
雉:=IF(ZDZK2-ZDZK1,ZDZK2,ZDZK1){XG51};
mtm:=C-REF(C,1){XG51};
龙:=30*EMA(EMA(MTM,50),50)/EMA(EMA(ABS(MTM),61),61){XG51};
凰:=MA(龙,6){XG51};
龙凤呈祥:=CROSS(凰<龙,0.13) AND 龙>凤 AND 凤>雉{XG51};
STICKLINE(龙凤呈祥,-25,-100,2,0),COLORRED{XG51};

VAR1S:=DMA(AMOUNT/VOL/100,VOL/CAPITAL){XG51};
VAR4AS:=CLOSE/(REF(CLOSE,1))>1.05 AND (HIGH/CLOSE<1.01){XG51};
游资进场S:=(FILTER(VAR4AS>0,34)AND DYNAINFO(4)>0)*8,COLORBLUE{XG51};
A10S:=10{XG51};
STICKLINE(游资进场S,-100,-55,1,0),COLORYELLOW{XG51};
DRAWTEXT(游资进场S,-35,' 要拉一波'),COLORLIMAGENTA{XG51};
LSS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12)){XG51};
拉升S:=FILTER(LSS,58){XG51};
STICKLINE(拉升S,-100,-35,0.001,0),COLORBLUE{XG51};
DRAWTEXT(拉升S,-47,'---芝麻开门'),COLORGREEN{XG51};
DRAWICON(拉升S,-38.2,9){XG51};
DRAWTEXT(VAR8H AND COUNT(VAR8H,18)=1,-24,'●主图黄K底买'),COLORBLUE{XG51};
VAR1:=(CLOSE*2+HIGH+LOW)/1{XG51};
VAR2:=EMA(VAR1,3)-EMA(VAR1,10){XG51};
VAR3:=EMA(VAR2,3){XG51};
ZLZJX:=2*(VAR2-VAR3)*3.8{XG51};
主力资金线:=ZLZJX,COLORLICYAN,LINETHICK2{XG51};
VAR4:=EMA(EMA(CLOSE,9),9){XG51};
控盘:=(VAR1-REF(VAR4,1))/REF(VAR4,1)*30{XG51};
有庄控盘:=IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORWHITE{XG51};
主力资金:=((100)*(EMA(EMA(MTM,3),3)))/(EMA(EMA(ABS(MTM),3),3)),COLORWHITE,LINETHICK2{XG51};
移动筹码:=((100)*(EMA(EMA(MTM,20),20)))/(EMA(EMA(ABS(MTM),20),20)),COLORBLUE,LINETHICK2{XG51};
游资:=((100)*(EMA(EMA(MTM,8),8)))/(EMA(EMA(ABS(MTM),8),8)),COLORLIMAGENTA,LINETHICK2{XG51};
散户:(HHV(HIGH,20)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,20))*100,COLORCYAN,LINETHICK1{XG51};
零轴线:0,COLORBROWN,DOTLINE,LINETHICK1{XG51};
十天主力持仓:8*WINNER(CLOSE*0.9)*10,COLORCYAN,DOTLINE{XG51};
DJ:=主力资金>=散户 AND 移动筹码>=散户 AND 游资>=散户 AND 十天主力持仓>=1{XG51};
DRAWICON(DJ,-5,25){XG51};
OUT11:=CROSS(十天主力持仓,散户){XG51};
STICKLINE(OUT11,80,100,2,0),COLORWHITE{XG51};
DRAWTEXT(OUT11,95,'---财'),COLORRED{XG51};
OUT1:=CROSS(主力资金线,散户){XG51};
STICKLINE(OUT1,70,85,2,0),COLORYELLOW{XG51};
DRAWTEXT(OUT1,77,'---神'),COLORGREEN{XG51};
DRAWTEXT(OUT,80,'---底'),COLORBLUE{XG51};
X_1:=LLV(MA((LOW+HIGH+3*CLOSE+OPEN)/6,6),89){XG51};
散筹:=EMA((LOW+HIGH+3*CLOSE+OPEN)/6*(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,8)-LLV(LOW,8))*20/10+X_1,2),COLORCYAN,LINETHICK2{XG51};
趋势:=1.86*EMA(CLOSE,3)-EMA(CLOSE,17),COLORWHITE,LINETHICK2{XG51};
X_2:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1){XG51};
X_3:=IF(MA(CLOSE,17)<X_2,X_2,MA(CLOSE,17)){XG51};
浮筹:=X_3-(EMA(CLOSE,3)-X_3),COLORCYAN,LINETHICK2{XG51};
OUTC:=CROSS(趋势,浮筹){XG51};
STICKLINE(OUTC,58,70,2,0),COLORBLUE{XG51};
DRAWTEXT(OUTC,58,'---飚'),COLORRED{XG51};
DRAWTEXT(首月R,68,' --月振底'),COLORGREEN{XG51};
DRAWTEXT(首月M,86,' --月共振'),COLORRED{XG51};
DRAWTEXT(首周R,20.03,' --周共振'),COLORLICYAN{XG51};
XGH:STICKLINE(多共振=1,92,100,4,0)COLORLICYAN{XG51};
DRAWTEXT(XGH,96,'底'),COLORGREEN{XG51};
DRAWTEXT(XG>0,-11,'---资金异动'),COLORGREEN{XG51};
DRAWTEXT(龙凤呈祥,-80,' 龙凤呈祥'),COLORRED{XG51};
RSVF:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,LINETHICK0{XG51};
KF:=SMA(RSVF,3,1){XG51};
DF:=SMA(KF,3,1){XG51};
JF:=3*KF-2*DF,LINETHICK0{XG51};
能量线:=EMA(100*(C-LLV(L,34))/(HHV(H,34)-LLV(L,34)),3),LINETHICK0{XG51};
威廉wr:=(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))*100,LINETHICK0{XG51};
TYP := (HIGH + LOW + CLOSE)/3{XG51};
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),LINETHICK0{XG51};
五指AF:=WMA((能量线+RSI+JF-威廉WR+CCI)/3,3),COLORGRAY{XG51};
流通盘:=CAPITAL/1000000,COLOR7F00FF,LINETHICK0{XG51};
ZLCM:=EMA(WINNER(CLOSE)*90,3){XG51};
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*70,3){XG51};
ZSHTL:=SHCM/(ZLCM+SHCM)*100{XG51};
散户线F:=INTPART(ZSHTL),COLORLIGRAY,LINETHICK2{XG51};
OUT666:=CROSS(五指AF,散户线F){XG51};
STICKLINE(OUT666,0,116,0.00001,0),COLORRED{XG51};
DRAWTEXT(OUT666,109,'-童子探路'),COLORRED{XG51};
{X=G-5-1=C=N={};

通达信MACD线和KDJ线及未加密选股指标公式源码

源码正文：

SHORT:=6{XG51};
LONG:=13{XG51};
MID:=5{XG51};
dif:ema(CLOSE,SHORT)-Ema(CLOSE,LONG){XG51};
DEA:EMA(DIF,MID){XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
A:=BArslAST(FILTERX(MacD=HHV(MACD,BARSLAST(MACD<0)),BARSLAST(MACD<0))){XG51};
B:=REF(MACD,A){XG51};
TT:=A+1{XG51};
ZTT:=REF(TT,TT)+TT{XG51};
KK:=REF(MACD,ZTT-1){XG51};
IF(CURRBARSCOUNT<CONST(ZTT+1),REFDATE(KK,DATE),DRAWNULL),COLORCYAN{X.G-5~1.C.N.{};