变色MACD

DIF1:=EMA(CLOSE,12) - EMA(CLOSE,26),LINETHICK2;

DEA1:=EMA(DIF1,9),LINETHICK2;

MACD1:=2*(DIF1-DEA1),STICK;

MACD2:=EMA(MACD1,3);

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,3.2,0),COLOR000055;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2.7,0),COLOR000077;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2.1,0),COLOR000099;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1.5,0),COLOR0000BB;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.9,0),COLOR0000DD;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.3,0),COLOR0000FF;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,3.2,0),COLOR555555;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2.7,0),COLOR777777;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2.1,0),COLOR999999;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1.5,0),COLORBBBBBB;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.9,0),COLORDDDDDD;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.3,0),COLORFFFFFF;

STICKLINE(MACD1<MACD2,0,MACD1,3.2,0),COLORB20000;

STICKLINE(MACD1<MACD2,0,MACD1,2.7,0),COLOREC0000;

STICKLINE(MACD1<MACD2,0,MACD1,2.1,0),COLORFF4600;

STICKLINE(MACD1<MACD2,0,MACD1,1.5,0),COLORFF6300;

STICKLINE(MACD1<MACD2,0,MACD1,0.9,0),COLORFF8B00;

STICKLINE(MACD1<MACD2,0,MACD1,0.3,0),COLORFFAB00;

STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;

低位金叉:CROSS(DIF1,DEA1) AND DIF1<-0.1;

JCCOUNT:=COUNT(CROSS(DIF1,DEA1),BARSLAST(DEA1>=0));

二次金叉:=CROSS(DIF1,DEA1) AND DEA1<0 AND COUNT(JCCOUNT=2,21)=1;

STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;

DRAWICON(二次金叉,DEA1*0.9,1) ;

DRAWTEXT(二次金叉,0.2,' 二次金叉'),COLORYELLOW;

DIF:DIF1,COLOR33FF33;DEA:DEA1,COLORYELLOW;

MACD:MACD1,NODRAW,COLORMAGENTA;

强度:IF(DIF1>=DEA1,DIF1,DRAWNULL),COLORRED,LINETHICK2;

A1:=BARSLAST(REF(CROSS(DIF1,DEA1),1));

底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF1>REF(DIF1,A1+1) AND CROSS(DIF1,DEA1);

STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;底背:

DRAWLINE(A1=0,DEA1,底背离,DEA1,0),COLORRED,LINETHICK4;DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;

A2:=BARSLAST(REF(CROSS(DEA1,DIF1),1));

顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF1,A2+1)>DIF1 AND CROSS(DEA1,DIF1);

顶背:DRAWLINE(A2=0,DEA1,顶背离,DEA1,0),COLORGREEN,LINETHICK4; 

主升 : DIF>0 AND DIF>DEA,COLOR0000FF,POINTDOT,NODRAW COLORYELLOW;

STICKLINE(主升,DIF,DEA,3,0),COLORYELLOW;

VOLC:=MA(VOL*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1),3);

TJL1:=100*(VOLC-LLV(VOLC,5))/(HHV(VOLC,5)-LLV(VOLC,5)),COLOR0080FF;

涨停:=C/REF(C,1)>1.09 AND DIF1<-0.1;

东方红:=COUNT(CLOSE>REF(CLOSE,1),11) >=7;

金叉:CROSS(DIF,DEA) AND 东方红;

DRAWICON(金叉,1*0.9,11) ;

内外盘比

PJ:=(H+L+C)/3;

V1:=IF(H=L,1,H-MAX(O,C));

V2:=IF(H=L,1,MAX(C,O)-PJ);

V3:=IF(H=L,1,MIN(O,C)-L);

V4:=IF(H=L,1,PJ-MIN(C,O));

VOL1:=AMOUNT/10000;

V5:=VOL/IF(H=L,4,H-L);

V6:=(V1*V5)+(V2*V5);

V7:=(V3*V5)+(V4*V5);

WP1:=DYNAINFO(23);

NP1:=DYNAINFO(22);

WP2:=IF(ISLASTBAR,V7*240/FROMOPEN,V7);

NP2:=IF(ISLASTBAR,V6*240/FROMOPEN,V6);

WP:IF(ISLASTBAR AND PERIOD=5 ,WP1,WP2) NODRAW;

NP:IF(ISLASTBAR AND PERIOD=5 ,NP1,NP2) NODRAW;

日差:WP-NP COLORGREEN NODRAW;

外盘％:(WP-NP)/WP*100,COLORYELLOW NODRAW;

日差％:(WP-NP)/NP*100 COLORCYAN NODRAW;

量比:V/(REF(MA(V,5),1))COLORYELLOW NODRAW ;

STICKLINE(CLOSE>=REF(CLOSE,1),WP,0,2.5.1,1),COLORRED;

STICKLINE(CLOSE< REF(CLOSE,1),NP,0,2.5.1,1),COLORCYAN;

X:=C<REF(C,1);

换手率:VOL/CAPITAL*100,COLORCYAN NODRAW;

DRAWICON(外盘％>49,V5+1.8,12);

强度:=( 外盘％-REF(外盘％,1))>126;

DRAWICON(强度 AND 外盘％>49,日差,2);

P6:=日差>0.1;

内外盘比:=COUNT(P6>REF(P6,1),9) >=6; 

DRAWICON(日差％>95,日差,17);