通达信机构动向副图指标贴图 优化第三版指标 还可用作选股
下载使用了他分享的程序之后觉得有很大的改进必要，于是不辞辛苦在2019年元旦，花了一天时间，对他提供的机构动向系统做了改进。使用的结果对比一目了然。为让更多的散民用到得心应手的软件炒股分析工具，特将改进好的指标文件以及改进前后的结果对比图公布在这里。我和@牡丹桥西+ 的心愿都是为了让更多的散民用上比较适用的系统。必须强调的是：@牡丹桥西+ 的功劳是大大的，我仅仅做了点改进。希望大家喜欢优化的该机构动向副图系统。”
在帖中公布的优化改进前的结果图如下：
{通达信机构动向副图指标优化第三版}
VAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORCYAN;
无庄控盘:IF(控盘<0,控盘,0),COLORCYAN,NODRAW;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORGREEN;
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLORGREEN,NODRAW;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORYELLOW;
高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORYELLOW,NODRAW;
STICKLINE(VAR2<50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORMAGENTA;
中度控盘:IF(VAR2<50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORMAGENTA,NODRAW;
0,COLORWHITE;
未来函数检测结果如下：
该公式包含未来函数:WINNER
该公式包含未来函数:COST
定制指标公式、软件请联系QQ或微信同号：88652583
VAR1赋值:收盘价的13日指数移动平均的13日指数移动平均
控盘赋值:(VAR1-1日前的VAR1)/1日前的VAR1*1000
当满足条件控盘<0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画青色
输出无庄控盘:如果控盘<0,返回控盘,否则返回0,画青色,NODRAW
当满足条件控盘>1日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色
输出有庄控盘:如果控盘>1日前的控盘AND控盘>0,返回控盘,否则返回0,画红色,NODRAW
当满足条件控盘<1日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画绿色
输出主力出货:如果控盘<1日前的控盘AND控盘>0,返回控盘,否则返回0,画绿色,NODRAW
VAR2赋值:100*以收盘价*0.95计算的获利盘比例
当满足条件VAR2>50ANDCOST(85)0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色
输出高度控盘:如果VAR2>50ANDCOST(85)0,返回控盘,否则返回0,画黄色,NODRAW
当满足条件VAR2<50ANDCOST(85)0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画洋红色
输出中度控盘:如果VAR2<50ANDCOST(85)0,返回控盘,否则返回0,画洋红色,NODRAW
0,画白色
