通达信机构控盘度改良 源码分享

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

AA:=EMA(EMA(CLOSE,8)-EMA(CLOSE,13),3);

BB:=(AA-REF(AA,1))*10;{}

CC:=IF(BB>REF(BB,1),BB,REF(BB,1));

STICKLINE(BB>0,0,BB,2,0),COLORRED;

STICKLINE(BB<0,0,BB,2,0),COLORGREEN;

STICKLINE(CC=BB AND REF(CC,1)>REF(BB,1) AND BB<0,0,BB,1,0),COLORMAGENTA;

STICKLINE(CROSS(BB,0),0,BB,1,0),COLORYELLOW;

DRAWTEXT(CROSS(BB,0),BB*1.3,'买入'),COLORGREEN;

DRAWTEXT(CROSS(0,BB),BB,'撤离'),COLORYELLOW;

DRAWTEXT(CC=BB AND REF(CC,1)>REF(BB,1) AND BB<0,BB*1.3,'准备'),COLORMAGENTA;

DRAWTEXT(CC=BB AND REF(CC,1)>REF(BB,1) AND BB>0,BB*1.4,'加仓'),COLORMAGENTA;

DRAWTEXT(BB<CC AND REF(CC,1)=REF(BB,1) AND BB>0,BB*1.3,'卖出'),COLORRED;

原理解析：
AA赋值:收盘价的8日指数移动平均-收盘价的13日指数移动平均,3)


BB赋值:(AA-1日前的AA)*10
{}

CC赋值:IF(BB>1日前的BB,BB,1日前的BB)
当满足条件BB>0时,在0和BB之间画柱状线
当满足条件BB<0时,在0和BB之间画柱状线


STICKLINE(CC=BB AND 1日前的CC>1日前的BB AND BB<0,0,BB,1,0),画洋红色


STICKLINE(BB上穿0,0,BB,1,0),画黄色


DRAWTEXT(BB上穿0,BB*1.3,'买入'),画绿色


DRAWTEXT(0上穿BB,BB,'撤离'),画黄色


DRAWTEXT(CC=BB AND 1日前的CC>1日前的BB AND BB<0,BB*1.3,'准备'),画洋红色


DRAWTEXT(CC=BB AND 1日前的CC>1日前的BB AND BB>0,BB*1.4,'加仓'),画洋红色


DRAWTEXT(BB0,BB*1.3,'卖出'),画红色