DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0);
{MACD周金叉}
DFFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DAAA:=EMA(DFFF,9);
周DIF:="MACD.DIF#WEEK"(12,26,9),NODRAW;
周DEA:="MACD.DEA#WEEK"(12,26,9),NODRAW;
周金叉:=周DIF>周DEA;
STICKLINE(周金叉,DFFF,DAAA,0.8,0),COLOR0080FF;
{30分鐘MACD綵帶}
DIF30分鐘:=(EMA(CLOSE,12/4)-EMA(CLOSE,26/4)),NODRAW;
DEA30分鐘:=(EMA(DIF30分鐘,9/4)),NODRAW;
DRAWBAND(DIF30分鐘,RGB(255,150,255),DEA30分鐘,RGB(128,128,255));
{波段}
DIFF:=EMA(CLOSE,21)-EMA(CLOSE,34);
DEAA:=EMA(DIFF,8);
MACDD:=3.8*(DIFF-DEAA);
MARDD:=SMA(MACDD,2,1);
STICKLINE(MACDD>MARDD,MACDD,MARDD,1.8,0),COLORMAGENTA;
STICKLINE(MACDD<mardd>
{底部信號}
BB值:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3);
AAA:=EMA(CLOSE,12)-EMA(CLOSE,26);
DRAWTEXT(CROSS(BB值,9),0,' 底部'),COLORYELLOW;
DRAWICON(CROSS(BB值,9),0,41);
STICKLINE(CROSS(BB值,9),AAA,0,2,0),COLORYELLOW;
{DJG_MACD的柱線}
MACD2:=2*("MACD.DIF"-"MACD.DEA");
STICKLINE(MACD2>=0,0,MACD2,0,0),COLORRED;{0上升}
STICKLINE(MACD2>=0 AND MACD2STICKLINE(MACD2<0,0,MACD2,0,0),COLORGREEN;{0下跌}
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,0,0),COLORRED;{0下升}
{DIF和DEA線}
DIF:EMA(CLOSE,12)-EMA(CLOSE,26)COLORWHITE,LINETHICK2;
DEA:EMA(DIF,9)COLOR0080FF;
DRAWTEXT(ISLASTBAR,DIF,' ←DIF'),COLORWHITE;
DRAWTEXT(ISLASTBAR,DEA,' ←DEA'),COLOR0080FF;
{金叉和背離的標識}
JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
DRAWICON(二次金叉,DEA*0.5,41) ;
DRAWTEXT(二次金叉,DEA*0.5,' 二次金叉'),COLORYELLOW;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背離:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
DRAWTEXT(底背離,DIF*1,' 底背離'),COLORWHITE;
DRAWICON(底背離,DIF*1,38);
A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
頂背離:=REF(CLOSE,A2+1)<close>DIF AND CROSS(DEA,DIF);/<close>
DRAWTEXT(頂背離,DIF*1,' 頂背離'),COLORGREEN;
DRAWICON(頂背離,DIF*1,39);
DA1:=BARSLAST(REF(CROSS(DIF,DEA),1));
D底背離:=REF(CLOSE,DA1+1)>CLOSE AND DIF>REF(DIF,DA1+1) AND CROSS(DIF,DEA);
底背畫線:DRAWLINE(DA1=0,DEA,D底背離,DEA,0),COLORWHITE,DOTLINE;
DA2:=BARSLAST(REF(CROSS(DEA,DIF),1));
D頂背離:=REF(CLOSE,DA2+1)<close>DIF AND CROSS(DEA,DIF);/<close>
頂背畫線:DRAWLINE(DA2=0,DEA,頂背離,DEA,0),COLORGREEN,DOTLINE;
{MACD&KDJ 金叉共振}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));
K:SMA(RSV,9,3),NODRAW;
D:SMA(K,9,3),NODRAW;
J:3*K-2*D,NODRAW;
A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D);
DRAWICON(A,DEA*1.2,25);
DRAWTEXT(A,DEA*1.2,' 金叉共振'),COLORYELLOW;
0,COLORGRAY,DOTLINE;
"
/<mardd>
閱讀更多 程序化指標
的文章
關鍵字:
STICKLINE
MACD2
REF