通达信〖分时密码〗源码附图
{分时密码}
N:=5;
M:=13;
VAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORCYAN;
无庄控盘:控盘<0,COLORCYAN,NODRAW;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:控盘>0,COLORRED,NODRAW;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORMAGENTA;
高度控盘:VAR2>50 AND COST(85)<CLOSE AND 控盘>0,COLORMAGENTA,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORFF6600;
主力出货:控盘<REF(控盘,1) AND 控盘>0,COLORFF6600,NODRAW;
分时密码:控盘,COLORWHITE,NODRAW;
DRAWTEXT(ISLASTBAR,控盘,'分时密码'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.01,0,'分时密码'),COLORWHITE;
未来函数检测结果
定制指标公式、软件请联系QQ或微信同号：88652583
N赋值:5
M赋值:13
VAR1赋值:收盘价的13日指数移动平均的13日指数移动平均
控盘赋值:(VAR1-1日前的VAR1)/1日前的VAR1*1000
当满足条件控盘<0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画青色
输出无庄控盘:控盘<0,画青色,NODRAW
当满足条件控盘>1日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色
输出有庄控盘:控盘>0,画红色,NODRAW
VAR2赋值:100*以收盘价*0.95计算的获利盘比例
当满足条件VAR2>50ANDCOST(85)0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画洋红色
输出高度控盘:VAR2>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,画洋红色,NODRAW
当满足条件控盘<1日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFF6600
输出主力出货:控盘<1日前的控盘 AND 控盘>0,COLORFF6600,NODRAW
输出分时密码:控盘,画白色,NODRAW
当满足条件是否最后一个周期时,在控盘位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.01纵轴0.01位置书写文字,画白色
