通达信无敌副图指标源码不加密

　　A1:=((MA(C,60)-L)/MA(C,20)),COLOR00FFFF;

　　B1:=((MA(C,60)-L)/MA(C,60)),COLOR00FF00;

　　C1:=((MA(C,30)-L)/MA(C,30)),COLORFF00FF;

　　主力1:50*(A1+B1+C1)/3,COLOR0000FF;

　　散户1:-50*(A1+B1+C1)/3,COLOR00FF00;

　　MA5:=MA(CLOSE,5);

　　MA10:=MA(CLOSE,10);

　　MA20:=MA(CLOSE,20);

　　MA30:=MA(CLOSE,30);

　　MA54:=MA(CLOSE,54);

　　MA60:=MA(CLOSE,60);

　　MA120:=MA(CLOSE,120);

　　热度:50/((MA5+MA10+MA20+MA30+MA60+MA120)/6/C)/10,COLORWHITE,DOTLINE;

　　BBT:热度-主力1,NODRAW;

　　BBT1:=BBT-REF(BBT,1)>0;

　　BBT2:=BBT-REF(BBT,1)<0;

　　STICKLINE(BBT1*BBT,热度,主力1,0,0),COLORFF00FF;

　　STICKLINE(BBT2*BBT,热度,主力1,0,0),COLORFF8000;

　　DRAWICON(BBT<=1,主力1,11);

　　{STICKLINE(REF(BBT<=0.02,1) AND BBT>0.02,散户*2,热度*2,0.5,0),COLOR8000FF;};

　　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,'追'),COLORYELLOW;}

　　日K:="KDJ.K#DAY"(9,3,3);

　　日D:="KDJ.D#DAY"(9,3,3);

　　日YDIF:="MACD.DIF#DAY"(14,56,5);

　　日YDEA:="MACD.DEA#DAY"(14,56,5);

　　日RSI:="RSI.RSI1#DAY"(9);

　　周K:="KDJ.K#WEEK"(9,3,3);

　　周D:="KDJ.D#WEEK"(9,3,3);

　　周YDIF:="MACD.DIF#WEEK"(14,56,5);

　　周YDEA:="MACD.DEA#WEEK"(14,56,5);

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

　　月K:="KDJ.K#MONTH"(9,3,3);

　　月D:="KDJ.D#MONTH"(9,3,3);

　　月YDIF:="MACD.DIF#MONTH"(14,56,5);

　　月YDEA:="MACD.DEA#MONTH"(14,56,5);

　　月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),COLORBLUE;

　　STICKLINE(黑码初显 AND C/REF(C,1)>1.05,0.05,5,2,0)COLORYELLOW;

　　STICKLINE(黑码初显 AND C/REF(C,1)>1.05,0.05,5,1,0),COLORRED;

　　DRAWTEXT(黑码初显,5,'黑'),COLORWHITE;}

　　DIFX:=EMA(CLOSE,12)-EMA(CLOSE,26);

　　DEAX:=EMA(DIFX,9);

　　AAAT:=(DIFX-DEAX)*2*60;

　　启动:=CROSS(AAAT-REF(AAAT,1),15),COLORRED,LINETHICK2;

　　{DRAWTEXT(启动,2,'↖金牛启动'),COLORYELLOW,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;}

　　周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;

　　月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;

　　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;

　　周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;

　　月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;

　　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),COLORMAGENTA;

　　D弱:STICKLINE(VURD<0,0,VURD,3.3,1),COLORCYAN;

　　极强:STICKLINE(VUR5>0,0,VUR5,3.3,0),COLORYELLOW;

　　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,COLORBROWN,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,COLORRED,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), COLORRED,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),COLORYELLOW;

　　DRAWTEXT(暴张,5,暴张),COLORYELLOW;

　　STICKLINE(MD1 AND MD2,0,5,2.5,0),COLORFF00FF,LINETHICK2;}

　　{DRAWTEXT(MD1 AND MD2 ,暴张,'暴张'),COLORWHITE;}

　　STICKLINE(月MD>=月MA AND KX>=DHX AND 周MD>=周MA AND DIFK>=DEAK AND 周XK>=周XD AND 月XK>=月XD,-31,-10,2,0),COLOR00FFFF;

　　STICKLINE((月MD>=月MA)+(KX>=DHX)+(周MD>=周MA)+(DIFK>=DEAK)+(周XK>=周XD)+(月XK>=月XD)=5,-31,-10,1,0),COLORFF8000;

　　STICKLINE((月MD>=月MA)+(KX>=DHX)+(周MD>=周MA)+(DIFK>=DEAK)+(周XK>=周XD)+(月XK>=月XD)=4,-31,-10,1,0),COLORFFFFFF;