通达信好牛副图贴图未加密选股指标公式源码

{追涨 10-5% 90%}
VURH9:=WINNER(C)>0.95 AND HHV(C,13)=C AND 100*(C-ma(C,12))/MA(C,12)>10 ;
STICKLINE(VURH9>0,5,9.2,1,0),COLORFF00FF;
DRAWTEXT(VURH9,9.18,'追'),COLORBLUE;
日K:="KDJ.K#DAY"(9,3,3);
日D:="KDJ.D#DAY"(9,3,3);
日Ydif:="MacD.DIF#DAY"(12,26,9);
日YDEA:="macd.DEA#DAY"(12,26,9);
日rsi:="RSI.RSI1#DAY"(9);
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
周YDIF:="MACD.DIF#WEEK"(12,26,9);
周YDEA:="MACD.DEA#WEEK"(12,26,9);
周RSI:="RSI.RSI1#WEEK"(9);
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
月YDIF:="MACD.DIF#MONTH"(12,26,9);
月YDEA:="MACD.DEA#MONTH"(12,26,9);
月RSI:="RSI.RSI1#MONTH"(9);
XY1:=日K>日D;
XY2:=日YDIF>日YDEA;
XY3:=日RSI>5;
XY4:=周K>周D;
XY5:=周YDIF>周YDEA;
XY6:=周RSI>5;
XY7:=月K>月D;
XY8:=月YDIF>月YDEA;
XY9:=月RSI>5;
黑码初显:=XY1 AND XY2 AND XY3 AND XY4 AND XY5 AND XY6 AND XY7 AND XY8 AND XY9;
STICKLINE(黑码初显,0.05,5,1,0),COLORYELLOW;
STICKLINE(黑码初显 AND C/REF(C,1)>1.05,0.05,5,2,0)COLORBLUE;
STICKLINE(黑码初显 AND C/REF(C,1)>1.05,0.05,5,1,0),COLORWHITE;
DRAWTEXT(黑码初显,5,'黑'),COLORRED;

DIFX:=ema(DCLOSE,12)-EMA(DCLOSE,26);
DEAX:=EMA(DIFX,9);
AAAT:=(DIFX-DEAX)*2*60;
启动:=crOSS(AAAT-REF(AAAT,1),15),COLORWHITE,LINETHICK2;
DRAWTEXT(启动,2,'↖金牛启动'),COLORBLUE,LINETHICK2;

DIFK:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEAK:=EMA(DIFK,9);
STICKLINE(DIFK>=DEAK,-10,-13,5,0),COLOR0000BB;
STICKLINE(DIFK<DEAK,-10,-13,5,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=13,-12,'★MACD日线★'),COLOR00FFFF;
周MD:=MACD.DIF#WEEK;
周MA:=MACD.DEA#WEEK;
STICKLINE(周MD>=周MA,-13.5,-16.5,5,0),COLOR0000BB;
STICKLINE(周MD<周MA,-13.5,-16.5,5,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=13,-15,'★MACD周线★'),COLOR00FFFF;
月MD:=MACD.DIF#MONTH;
月MA:=MACD.DEA#MONTH;
STICKLINE(月MD>=月MA,-16.5,-19.5,5,0),COLOR0000BB;
STICKLINE(月MD<月MA,-16.5,-19.5,5,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=13,-18,'★MACD月线★'),COLOR00FFFF;

RSVX:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));
KX:=SMA(RSVX,3,1);
DHX:=SMA(KX,3,1);
JX:=3*KX-2*DHX;
STICKLINE(KX>=DHX,-20.5,-23.5,5,0),COLOR0000FF;
STICKLINE(KX<DHX,-20.5,-23.5,5,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=13,-22,'★KDJ日线★'),COLORFFFFFF;
周XK:="KDJ.K#WEEK" ;
周XD:="KDJ.D#WEEK" ;
STICKLINE(周XK>=周XD,-24.5,-27.5,5,0),COLOR0000FF;
STICKLINE(周XK<周XD,-24.5,-27.5,5,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=13,-26,'★KDJ周线★'),COLORRED;
月XK:="KDJ.K#MONTH" ;
月XD:="KDJ.D#MONTH" ;
STICKLINE(月XK>=月XD,-28.5,-31.5,5,0),COLOR0000FF;
STICKLINE(月XK<月XD,-28.5,-31.5,5,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=13,-30,'★KDJ月线★'),COLORRED;

VUR1:=vol/CAPITAL;
VUR2:=1.1*(MAX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1);
VUR3:=2.5*MAX(VUR1,VUR2);
VUR4:=dma(CLOSE,VUR3);
VUR5:=20*(VUR4/REF(VUR4,1)-1)*38;
VUR6:=EMA(VUR5,2);
VUR7:=EMA(VUR5,2);
VUR8:=EMA(VUR7,3);
VURS:=EMA(VUR7,8);
VUR9:=1.1*(MAX(INDEXH,REF(INDEXC,1))/MIN(INDEXL,REF(INDEXC,1))-1);
VURA:=2.5*MAX(VUR1,VUR9);
VURB:=DMA(INDEXC,VURA);
VURC:=EMA(20*(VURB/REF(VURB,1)-1),1)*38;
VURD:=EMA(VURC,2);
VURE:=EMA(VURC,2);
D强:STICKLINE(VURD>0,0,VURD,3.3,1),COLORLIMAGENTA;
D弱:STICKLINE(VURD<0,0,VURD,3.3,1),COLORGREEN;
极强:STICKLINE(VUR5>0,0,VUR5,3.3,0),COLORBLUE;
STICKLINE(VUR5>0,0,VUR5,2.5,0),COLOR00BBBB;
STICKLINE(VUR5>0,0,VUR5,1.5,0),COLOR00FFFF;
强势:STICKLINE(VUR6>0,0,VUR6,3.3,0),COLOR0000AA;
STICKLINE(VUR6>0,0,VUR6,2.5,0),COLOR0000BB;
STICKLINE(VUR6>0,0,VUR6,1.5,0),COLOR0000FF;
极弱:STICKLINE(VUR5<0,0,VUR5,3.3,0),COLOR00AA00;
STICKLINE(VUR5<0,0,VUR5,2.5,0),COLOR00BB00;
STICKLINE(VUR5<0,0,VUR5,1.5,0),COLOR00FF00;
弱势:STICKLINE(VUR6<0,0,VUR6,3.3,0),COLOR005AAA;
STICKLINE(VUR6<0,0,VUR6,2.5,0),COLOR007BBB;
STICKLINE(VUR6<0,0,VUR6,1.5,0),COLOR009FFF;
DX:=VURE,LINETHICK2,COLOR1088FF;
界:=VURS,LINETHICK2,COLOR6CBC10;
控:=VUR8,LINETHICK2,COLORFf10FF;
零:0,COLORCCCCCC;
额:AMOUNT/100000000,NODRAW;
VAR1:=AMOUNT/((HIGH-LOW)*2-Abs(CLOSE-OPEN));
流入亿:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),AMOUNT/2))/100000000,COLORWHITE,NODRAW;
流出亿:IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN- LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-AMOUNT/2))/100000000,COLOR00FF00,NODRAW;
差:(流入亿+流出亿),NODRAW;
强:=EMA((CLOSE-REF(CLOSE,1))/CLOSE*10,2);
主力:=EMA(差,1),COLORFF00FF,LINETHICK5;
差A:3*EMA(EMA(EMA(EMA(强,2),2),2),2),NODRAW;
净流:3*EMA(EMA(EMA(EMA(差A,1),2),2),2), COLORWHITE,NODRAW;

MID:= MA(CLOSE,26);
AB:= EMA((EMA(CLOSE,3)+EMA(CLOSE,5)+EMA(CLOSE,8)+EMA(CLOSE,13))/4,2)LINETHICK2;
UPPER:= IF(DATE<1090501,MID+2*STD(CLOSE,26),0);
AUPPER:= IF(DATE<1090501,MID+1.7*2*STD(CLOSE,26),0);
LOWER:= IF(DATE<1090501,MID-2*STD(CLOSE,26),0);
ALOWER:= IF(DATE<1090501,MID-1.7*2*STD(CLOSE,26),0);
DRAWTEXT(CROSS(AB,MID),0,'追击');

K30:=SMA(((CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100),3,1);
MD1:=K30-REF(K30,1)>9 ;
MD2:=V/REF(V,1)>2.4 OR REF(COUNT(ABS((C-REF(C,1))/REF(C,1))*100<2,6)=6,1) OR REF(V/REF(V,1)>2.4,1) ;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
暴张:IF(MD1 AND MD2 AND DIFF>DEA,6,0),COLORBLUE;
DRAWTEXT(暴张,5,暴张),COLORBLUE;
STICKLINE(MD1 AND MD2,0,5,2.5,0),COLORFF00FF,LINETHICK2;

DRAWTEXT(MD1 AND MD2 ,暴张,'暴张'),COLORRED;

未来函数检测公式代码域:

{追涨 10-5% 90%}VURH9:=WINNER(C)>0.95 DND HHV(C,13)=C DND 100*(C-ma(C,12))/MD(C,12)>10 ;STICKLINE(VURH9>0,5,9.2,1,0),COLORFF00FF;DRDWTEXT(VURH9,9.18,'追'),COLORBLUE;日K:="KDJ.K#DDY"(9,3,3);日D:="KDJ.D#DDY"(9,3,3);日Ydif:="MacD.DIF#DDY"(12,26,9);日YDED:="macd.DED#DDY"(12,26,9);日rsi:="RSI.RSI1#DDY"(9);周K:="KDJ.K#WEEK"(9,3,3);周D:="KDJ.D#WEEK"(9,3,3);周YDIF:="MDCD.DIF#WEEK"(12,26,9);周YDED:="MDCD.DED#WEEK"(12,26,9);周RSI:="RSI.RSI1#WEEK"(9);月K:="KDJ.K#MONTH"(9,3,3);月D:="KDJ.D#MONTH"(9,3,3);月YDIF:="MDCD.DIF#MONTH"(12,26,9);月YDED:="MDCD.DED#MONTH"(12,26,9);月RSI:="RSI.RSI1#MONTH"(9);XY1:=日K>日D;XY2:=日YDIF>日YDED;XY3:=日RSI>5;XY4:=周K>周D;XY5:=周YDIF>周YDED;XY6:=周RSI>5;XY7:=月K>月D;XY8:=月YDIF>月YDED;XY9:=月RSI>5;黑码初显:=XY1 DND XY2 DND XY3 DND XY4 DND XY5 DND XY6 DND XY7 DND XY8 DND XY9;STICKLINE(黑码初显,0.05,5,1,0),COLORYELLOW;STICKLINE(黑码初显 DND C/REF(C,1)>1.05,0.05,5,2,0)COLORBLUE;STICKLINE(黑码初显 DND C/REF(C,1)>1.05,0.05,5,1,0),COLORWHITE;DRDWTEXT(黑码初显,5,'黑'),COLORRED;DIFX:=ema(DCLOSE,12)-EMD(DCLOSE,26);DEDX:=EMD(DIFX,9);DDDT:=(DIFX-DEDX)*2*60;启动:=crOSS(DDDT-REF(DDDT,1),15),COLORWHITE,LINETHICK2;DRDWTEXT(启动,2,'↖金牛启动'),COLORBLUE,LINETHICK2;DIFK:=EMD(CLOSE,12)-EMD(CLOSE,26);DEDK:=EMD(DIFK,9);STICKLINE(DIFK>=DEDK,-10,-13,5,0),COLOR0000BB;STICKLINE(DIFK<DEDK,-10,-13,5,1),COLOR696969;DRDWTEXT(CURRBDRSCOUNT=13,-12,'★MDCD日线★'),COLOR00FFFF;周MD:=MDCD.DIF#WEEK;周MD:=MDCD.DED#WEEK;STICKLINE(周MD>=周MD,-13.5,-16.5,5,0),COLOR0000BB;STICKLINE(周MD<周MD,-13.5,-16.5,5,1),COLOR696969;DRDWTEXT(CURRBDRSCOUNT=13,-15,'★MDCD周线★'),COLOR00FFFF;月MD:=MDCD.DIF#MONTH;月MD:=MDCD.DED#MONTH;STICKLINE(月MD>=月MD,-16.5,-19.5,5,0),COLOR0000BB;STICKLINE(月MD<月MD,-16.5,-19.5,5,1),COLOR696969;DRDWTEXT(CURRBDRSCOUNT=13,-18,'★MDCD月线★'),COLOR00FFFF;RSVX:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));KX:=SMD(RSVX,3,1);DHX:=SMD(KX,3,1);JX:=3*KX-2*DHX; STICKLINE(KX>=DHX,-20.5,-23.5,5,0),COLOR0000FF;STICKLINE(KX<DHX,-20.5,-23.5,5,1),COLOR696969;DRDWTEXT(CURRBDRSCOUNT=13,-22,'★KDJ日线★'),COLORFFFFFF;周XK:="KDJ.K#WEEK" ;周XD:="KDJ.D#WEEK" ;STICKLINE(周XK>=周XD,-24.5,-27.5,5,0),COLOR0000FF;STICKLINE(周XK<周XD,-24.5,-27.5,5,1),COLOR696969;DRDWTEXT(CURRBDRSCOUNT=13,-26,'★KDJ周线★'),COLORRED;月XK:="KDJ.K#MONTH" ;月XD:="KDJ.D#MONTH" ;STICKLINE(月XK>=月XD,-28.5,-31.5,5,0),COLOR0000FF;STICKLINE(月XK<月XD,-28.5,-31.5,5,1),COLOR696969;DRDWTEXT(CURRBDRSCOUNT=13,-30,'★KDJ月线★'),COLORRED;VUR1:=vol/CDPITDL;VUR2:=1.1*(MDX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1);VUR3:=2.5*MDX(VUR1,VUR2);VUR4:=dma(CLOSE,VUR3);VUR5:=20*(VUR4/REF(VUR4,1)-1)*38;VUR6:=EMD(VUR5,2);VUR7:=EMD(VUR5,2);VUR8:=EMD(VUR7,3);VURS:=EMD(VUR7,8);VUR9:=1.1*(MDX(INDEXH,REF(INDEXC,1))/MIN(INDEXL,REF(INDEXC,1))-1);VURD:=2.5*MDX(VUR1,VUR9);VURB:=DMD(INDEXC,VURD);VURC:=EMD(20*(VURB/REF(VURB,1)-1),1)*38;VURD:=EMD(VURC,2);VURE:=EMD(VURC,2);D强:STICKLINE(VURD>0,0,VURD,3.3,1),COLORLIMDGENTD;D弱:STICKLINE(VURD<0,0,VURD,3.3,1),COLORGREEN;极强:STICKLINE(VUR5>0,0,VUR5,3.3,0),COLORBLUE;STICKLINE(VUR5>0,0,VUR5,2.5,0),COLOR00BBBB;STICKLINE(VUR5>0,0,VUR5,1.5,0),COLOR00FFFF;强势:STICKLINE(VUR6>0,0,VUR6,3.3,0),COLOR0000DD;STICKLINE(VUR6>0,0,VUR6,2.5,0),COLOR0000BB;STICKLINE(VUR6>0,0,VUR6,1.5,0),COLOR0000FF;极弱:STICKLINE(VUR5<0,0,VUR5,3.3,0),COLOR00DD00;STICKLINE(VUR5<0,0,VUR5,2.5,0),COLOR00BB00;STICKLINE(VUR5<0,0,VUR5,1.5,0),COLOR00FF00;弱势:STICKLINE(VUR6<0,0,VUR6,3.3,0),COLOR005DDD;STICKLINE(VUR6<0,0,VUR6,2.5,0),COLOR007BBB;STICKLINE(VUR6<0,0,VUR6,1.5,0),COLOR009FFF;DX:=VURE,LINETHICK2,COLOR1088FF;界:=VURS,LINETHICK2,COLOR6CBC10;控:=VUR8,LINETHICK2,COLORFf10FF;零:0,COLORCCCCCC;额:DMOUNT/100000000,NODRDW;VDR1:=DMOUNT/((HIGH-LOW)*2-Dbs(CLOSE-OPEN));流入亿:IF(CLOSE>OPEN,VDR1*(HIGH-LOW),IF(CLOSE<OPEN,VDR1*((HIGH-OPEN)+(CLOSE-LOW)),DMOUNT/2))/100000000,COLORWHITE,NODRDW;流出亿:IF(CLOSE>OPEN,0-VDR1*((HIGH-CLOSE)+(OPEN- LOW)),IF(CLOSE<OPEN,0-VDR1*(HIGH-LOW),0-DMOUNT/2))/100000000,COLOR00FF00,NODRDW;差:(流入亿+流出亿),NODRDW;强:=EMD((CLOSE-REF(CLOSE,1))/CLOSE*10,2);主力:=EMD(差,1),COLORFF00FF,LINETHICK5;差D:3*EMD(EMD(EMD(EMD(强,2),2),2),2),NODRDW;净流:3*EMD(EMD(EMD(EMD(差D,1),2),2),2), COLORWHITE,NODRDW;MID:= MD(CLOSE,26);DB:= EMD((EMD(CLOSE,3)+EMD(CLOSE,5)+EMD(CLOSE,8)+EMD(CLOSE,13))/4,2)LINETHICK2;UPPER:= IF(DDTE<1090501,MID+2*STD(CLOSE,26),0);DUPPER:= IF(DDTE<1090501,MID+1.7*2*STD(CLOSE,26),0);LOWER:= IF(DDTE<1090501,MID-2*STD(CLOSE,26),0);DLOWER:= IF(DDTE<1090501,MID-1.7*2*STD(CLOSE,26),0);DRDWTEXT(CROSS(DB,MID),0,'追击');K30:=SMD(((CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100),3,1);MD1:=K30-REF(K30,1)>9 ;MD2:=V/REF(V,1)>2.4 OR REF(COUNT(DBS((C-REF(C,1))/REF(C,1))*100<2,6)=6,1) OR REF(V/REF(V,1)>2.4,1) ;DIFF:=EMD(CLOSE,12) - EMD(CLOSE,26);DED:=EMD(DIFF,9);暴张:IF(MD1 DND MD2 DND DIFF>DED,6,0),COLORBLUE;DRDWTEXT(暴张,5,暴张),COLORBLUE;STICKLINE(MD1 DND MD2,0,5,2.5,0),COLORFF00FF,LINETHICK2;DRDWTEXT(MD1 DND MD2 ,暴张,'暴张'),COLORRED;

警惕！警惕！警惕!该公式包含未来函数:CDPITDL...

未发现:COST...

未发现:DYNDINFO...

未发现:FINDNCE...

未发现:LWINNER...

警惕！警惕！警惕!该公式包含未来函数:WINNER...

未发现:BDCKSET...

未发现:BDRSNEXT...

警惕！警惕！警惕!该公式包含未来函数:CURRBDRSCOUNT...

未发现:DVOL...

未发现:DOPEN...

警惕！警惕！警惕!该公式包含未来函数:DCLOSE...

未发现:DHIGH...

未发现:DLOW...

未发现:DRDWLINE...

未发现:REFX...

未发现:FLDTZIG...

未发现:FLDTZIGD...

未发现:FFT...

未发现:FILTERX...

未发现:PEDK...

未发现:PEDKD...

未发现:PEDKBDRS...

未发现:PEDKBDRSD...

未发现:PLOYLINE...

未发现:REFDDTE...

未发现:TROUGH...

未发现:TROUGHD...

未发现:TROUGHBDRS...

未发现:XMD...

未发现:ZIG...

未发现:ZIGD...

未发现:ZXNH...

未发现:#YEDR...

警惕！警惕！警惕!该公式包含未来函数:#MONTH...

警惕！警惕！警惕!该公式包含未来函数:#WEEK...

未发现:$ZIG...

未发现:$PEDK...

未发现:$PEDKBDRS...

未发现:$TROUGH...

未发现:$TROUGHBDRS...

未发现:$FLDTZIG...

未发现:$FLDTZIGD...

未发现:$PEDKD...

未发现:$PEDKBDRSD...

未发现:$TROUGHD...

未发现:$ZIGD...

未发现:$FFT...

未发现:$BDCKSET...

未发现:$WINNER...

未发现:$LWINNER...

未发现:$COST...

未发现:$DYNDINFO...

未发现:$FINDNCE...

未发现:$DRDWLINE...