MACD波段风暴2(源码 副图 通达信 贴图)说明
2015-12-2 9:58:17点击:
就是把大机构macd和大机构波段风暴合并,
这次修改增加了一个底部信号指标,
颜色也改得更简约。
红色柱线和黄色彩带出现是做多信号。
公式有未来,未来来自画线公式,
不喜欢未来可以把这段代码删了。
{改编 by shuhong} {背景} DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0); {DJG波段风暴} 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),COLOR0000C0; STICKLINE(MACDD<MARDD,MACDD,MARDD,1.8,0),COLORCD0000;} DRAWBAND(MACDD,RGB(255,255,64),MARDD,RGB(64,64,255)); {底部信号} 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; {大机构MACD的柱线} MACD2:=2*("MACD.DIF"-"MACD.DEA"); STICKLINE(MACD2>=0,0,MACD2,0,0),COLORRED;{0上升} STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,0,0),COLORGREEN;{0上跌} STICKLINE(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 AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF); 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 AND REF(DIF,DA2+1)>DIF AND CROSS(DEA,DIF); 顶背画线:DRAWLINE(DA2=0,DEA,顶背离,DEA,0),COLORGREEN,DOTLINE; {MACD&KDJ 金叉共振} {DIF:EMA(CLOSE,12)-EMA(CLOSE,26);DEA:EMA(DIF,9);} 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;
- 上一篇:超级筹码(源码 主图 通达信 贴图) 2015/12/2
- 下一篇:《综合量柱》(源码、副图、贴图、通达信\大智慧) 2015/12/2