长线庄家控盘副图通达信公式 副图 源码 测试图

来函数检测结果如下：
该公式没有未来函数

DIFIF1:=EMA(CLOSE,80) - EMA(CLOSE,160);

DEAEA1:=EMA(DIFIF1,60);

MACD1:=2*(DIFIF1-DEAEA1),STICK;

MACD2:=EMA(MACD1,3);

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0),COLORRED;

STICKLINE(MACD1>MACD2 AND MACD1< 0,0,MACD1,1,0),COLORBLUE;

STICKLINE(MACD1< MACD2,0,MACD1,1,0),COLORWHITE;

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

STICKLINE(MACD1< MACD2 AND MACD1>0,0,MACD1,1,0),COLORGREEN;

MACD:MACD1,NODRAW,COLORMAGENTA;

强:=IF(DIFIF1>=DEAEA1,DIFIF1,DRAWNULL),COLORRED,LINETHICK2;

弱:=IF(DEAEA1>=DIFIF1,DEAEA1,DRAWNULL),COLORFF9900,LINETHICK2;

DRAWICON(CROSS(DIFIF1,DEAEA1),DEAEA1-0.02,1);

A10:=CROSS(MACD1,0);

无庄控盘:IF(MACD1< 0,MACD1,0),COLORWHITE,NODRAW;

开始控盘:IF(A10,5,0),LINETHICK1,COLORYELLOW;

 

原理解析：
DIFIF1赋值:收盘价的80日指数移动平均 - 收盘价的160日指数移动平均
DEAEA1赋值:DIFIF1的60日指数移动平均
MACD1赋值:2*(DIFIF1-DEAEA1),STICK
MACD2赋值:MACD1的3日指数移动平均
当满足条件MACD1>MACD2 AND MACD1>0时,在0和MACD1之间画柱状线
当满足条件MACD1>MACD2 AND MACD1< 0时,在0和MACD1之间画柱状线
当满足条件MACD1< MACD2时,在0和MACD1之间画柱状线
当满足条件MACD1>=0 OR MACD1<=0时,在0和0之间画柱状线
当满足条件MACD1< MACD2 AND MACD1>0时,在0和MACD1之间画柱状线
输出MACD:MACD1,NODRAW,画洋红色
如果D1>=DEAEA1返回DIFIF1否则返回DRAWNULL
如果DEAEA1>=D1返回DEAEA1否则返回DRAWNULL
DRAWICON(DIFIF1上穿DEAEA1,DEAEA1-0.02,1)
A10赋值:MACD1上穿0
如果MACD1< 0返回MACD1否则返回0
如果A10返回5否则返回0