公式源码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)); {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),COLORMAGENTA; STICKLINE(MACDD<MARDD,MACDD,MARDD,1.8,0),COLORFF8000; {底部信号} 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 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); |
|
来自: 老国几 > 《通达信技术指标及公式》