通达信主图叠加MACD，源码 贴图
2016-9-8 10:49:58点击：
{通达信叠加MACD}
轴:CONST(HHV(H,120))-(CONST(HHV(H,120))-CONST(LLV(L,120)))/2;
零轴:IF(CONST(C)<轴,轴*1.07,轴*0.93);
DAIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DAEA:=EMA(DAIF,9);
MACDZ:=(DAIF-DAEA),COLORSTICK;
系数:=CONST(HHV(ABS(MACDZ),120));
自由度:=MACDZ*零轴/系数*0.08;
RCC:零轴;
STICKLINE((RCC+自由度)>RCC AND (RCC+自由度)<=REF(RCC+自由度,1),RCC,RCC+自由度,2,1),COLORYELLOW;
STICKLINE((RCC+自由度)>RCC AND (RCC+自由度)>REF(RCC+自由度,1),RCC,RCC+自由度,2,1),COLORRED;
STICKLINE((RCC+自由度)<=RCC AND (RCC+自由度)<=REF(RCC+自由度,1),RCC,RCC+自由度,2,1),COLORCYAN;
STICKLINE((RCC+自由度)<=RCC AND (RCC+自由度)>REF(RCC+自由度,1),RCC,RCC+自由度,2,1),COLORLICYAN;
DRAWTEXT(ISLASTBAR,零轴,'---MACD'),COLORGREEN;
DRAWKLINE(H,O,L,C);
轴:CONST(HHV(H,120))-(CONST(HHV(H,120))-CONST(LLV(L,120)))/2;
零轴:IF(CONST(C)<轴,轴*1.07,轴*0.93);
DAIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DAEA:=EMA(DAIF,9);
MACDZ:=(DAIF-DAEA),COLORSTICK;
系数:=CONST(HHV(ABS(MACDZ),120));
自由度:=MACDZ*零轴/系数*0.08;
RCC:零轴;
STICKLINE((RCC+自由度)>RCC AND (RCC+自由度)<=REF(RCC+自由度,1),RCC,RCC+自由度,2,1),COLORYELLOW;
STICKLINE((RCC+自由度)>RCC AND (RCC+自由度)>REF(RCC+自由度,1),RCC,RCC+自由度,2,1),COLORRED;
STICKLINE((RCC+自由度)<=RCC AND (RCC+自由度)<=REF(RCC+自由度,1),RCC,RCC+自由度,2,1),COLORCYAN;
STICKLINE((RCC+自由度)<=RCC AND (RCC+自由度)>REF(RCC+自由度,1),RCC,RCC+自由度,2,1),COLORLICYAN;
DRAWTEXT(ISLASTBAR,零轴,'---MACD'),COLORGREEN;
DRAWKLINE(H,O,L,C);
- 上一篇：通达信精确MDI KDJ副图源码 2016/9/8
- 下一篇：变盘周期计算合并支撑和压力位主图源码 2016/9/7
