通达信主力资金助力副图指标 源码 附图
N:=10;
{涨停，7，3，0，0，-3，-7，跌停}
RC:=REF(C,1);
CUR:=CURRBARSCOUNT;
T:=(O/RC-1)*100;
ZT:=(IF(RANGE(FINANCE(3),2,5),ZTPRICE(REF(C,1),0.2),ZTPRICE(REF(C,1),0.1))/RC-1)*100;
DT:=(IF(RANGE(FINANCE(3),2,5),DTPRICE(REF(C,1),0.2),DTPRICE(REF(C,1),0.1))/RC-1)*100;
VB:=IF(CUR=5,CONST(SUM(IF(T=0,1,0),N)),IF(CUR=6,CONST(SUM(IF(RANGE(T,0,3),1,0),N)),IF(CUR=7,CONST(SUM(IF(RANGE(T,3,7),1,0),N)),
IF(CUR=8,CONST(SUM(IF(RANGE(T,7,ZT),1,0),N)),IF(CUR=9,CONST(SUM(IF(T=ZT,1,0),N)),0)))))+IF(CUR=4,CONST(SUM(IF(RANGE(T,-3,0),1,0),N)),
IF(CUR=3,CONST(SUM(IF(RANGE(T,-7,-3),1,0),N)),IF(CUR=2,CONST(SUM(IF(RANGE(T,DT,-7),1,0),N)),IF(CUR=1,CONST(SUM(IF(T=DT,1,0),N)),0))));
STICKLINE(CUR=1,0,VB,0.8,-1),COLORGREEN;
STICKLINE(CUR=2,0,VB,0.8,-1),COLORGREEN;
STICKLINE(CUR=3,0,VB,0.8,-1),COLORGREEN;
STICKLINE(CUR=4,0,VB,0.8,-1),COLORGREEN;
STICKLINE(CUR=5,0,VB,0.8,-1),COLORWHITE;
STICKLINE(CUR=6,0,VB,0.8,-1),COLORRED;
STICKLINE(CUR=7,0,VB,0.8,-1),COLORRED;
STICKLINE(CUR=8,0,VB,0.8,-1),COLORRED;
STICKLINE(CUR=9,0,VB,0.8,-1),COLORRED;
Q:=C>O;{平收视为失败，涨跌停除外}
VA:=IF(CUR=5,CONST(SUM(IF(T=0&&Q,1,0),N)),IF(CUR=6,CONST(SUM(IF(RANGE(T,0,3)&&Q,1,0),N)),IF(CUR=7,CONST(SUM(IF(RANGE(T,3,7)&&Q,1,0),N)),
IF(CUR=8,CONST(SUM(IF(RANGE(T,7,ZT)&&Q,1,0),N)),IF(CUR=9,CONST(SUM(IF(T=ZT,1,0)&&C=O,N)),0)))))+IF(CUR=4,CONST(SUM(IF(RANGE(T,-3,0)&&Q,1,0),N)),
IF(CUR=3,CONST(SUM(IF(RANGE(T,-7,-3)&&Q,1,0),N)),IF(CUR=2,CONST(SUM(IF(RANGE(T,DT,-7)&&Q,1,0),N)),IF(CUR=1,CONST(SUM(IF(T=DT,1,0)&&C=O,N)),0))));
STICKLINE(CUR=1,0,VA,0.8,0),COLORGREEN;
STICKLINE(CUR=2,0,VA,0.8,0),COLORGREEN;
STICKLINE(CUR=3,0,VA,0.8,0),COLORGREEN;
STICKLINE(CUR=4,0,VA,0.8,0),COLORGREEN;
STICKLINE(CUR=5,0,VA,0.8,0),COLORWHITE;
STICKLINE(CUR=6,0,VA,0.8,0),COLORRED;
STICKLINE(CUR=7,0,VA,0.8,0),COLORRED;
STICKLINE(CUR=8,0,VA,0.8,0),COLORRED;
STICKLINE(CUR=9,0,VA,0.8,0),COLORRED;
次数:VB,NODRAW;
成功:VA,NODRAW;
DRAWNUMBER(CUR<10,-1,IF(CUR=5,0,IF(CUR=6,0,IF(CUR=7,3,IF(CUR=8,7,IF(CUR=9,10,0)))))+IF(CUR=4,0,IF(CUR=3,-3,IF(CUR=2,-7,IF(CUR=1,-10,0)))));
NOTEXT0:-10,COLORBLACK;
未来函数检测结果如下：
该公式包含未来函数:FINANCE
解密、定制、编写股票指标请联系QQ或微信同号：88652583
相关股票指标公式
N赋值:10
{涨停，7，3，0，0，-3，-7，跌停}
RC赋值:1日前的C
CUR赋值:CURRBARSCOUNT
T赋值:(O/RC-1)*100
ZT赋值:(IF(RANGE(FINANCE(3),2,5),ZTPRICE(1日前的C,0.2),ZTPRICE(1日前的C,0.1))/RC-1)*100
DT赋值:(IF(RANGE(FINANCE(3),2,5),DTPRICE(1日前的C,0.2),DTPRICE(1日前的C,0.1))/RC-1)*100
VB赋值:IF(CUR=5,CONST(SUM(IF(T=0,1,0),N)),IF(CUR=6,CONST(SUM(IF(RANGE(T,0,3),1,0),N)),IF(CUR=7,CONST(SUM(IF(RANGE(T,3,7),1,0),N)),
IF(CUR=8,CONST(SUM(IF(RANGE(T,7,ZT),1,0),N)),IF(CUR=9,CONST(SUM(IF(T=ZT,1,0),N)),0)))))+IF(CUR=4,CONST(SUM(IF(RANGE(T,-3,0),1,0),N)),
IF(CUR=3,CONST(SUM(IF(RANGE(T,-7,-3),1,0),N)),IF(CUR=2,CONST(SUM(IF(RANGE(T,DT,-7),1,0),N)),IF(CUR=1,CONST(SUM(IF(T=DT,1,0),N)),0))))
当满足条件CUR=1时,在0和VB之间画柱状线
当满足条件CUR=2时,在0和VB之间画柱状线
当满足条件CUR=3时,在0和VB之间画柱状线
当满足条件CUR=4时,在0和VB之间画柱状线
当满足条件CUR=5时,在0和VB之间画柱状线
当满足条件CUR=6时,在0和VB之间画柱状线
当满足条件CUR=7时,在0和VB之间画柱状线
当满足条件CUR=8时,在0和VB之间画柱状线
当满足条件CUR=9时,在0和VB之间画柱状线
Q赋值:C>O
{平收视为失败，涨跌停除外}
VA赋值:IF(CUR=5,CONST(SUM(IF(T=0&&Q,1,0),N)),IF(CUR=6,CONST(SUM(IF(RANGE(T,0,3)&&Q,1,0),N)),IF(CUR=7,CONST(SUM(IF(RANGE(T,3,7)&&Q,1,0),N)),
IF(CUR=8,CONST(SUM(IF(RANGE(T,7,ZT)&&Q,1,0),N)),IF(CUR=9,CONST(SUM(IF(T=ZT,1,0)&&C=O,N)),0)))))+IF(CUR=4,CONST(SUM(IF(RANGE(T,-3,0)&&Q,1,0),N)),
IF(CUR=3,CONST(SUM(IF(RANGE(T,-7,-3)&&Q,1,0),N)),IF(CUR=2,CONST(SUM(IF(RANGE(T,DT,-7)&&Q,1,0),N)),IF(CUR=1,CONST(SUM(IF(T=DT,1,0)&&C=O,N)),0))))
当满足条件CUR=1时,在0和VA之间画柱状线
当满足条件CUR=2时,在0和VA之间画柱状线
当满足条件CUR=3时,在0和VA之间画柱状线
当满足条件CUR=4时,在0和VA之间画柱状线
当满足条件CUR=5时,在0和VA之间画柱状线
当满足条件CUR=6时,在0和VA之间画柱状线
当满足条件CUR=7时,在0和VA之间画柱状线
当满足条件CUR=8时,在0和VA之间画柱状线
当满足条件CUR=9时,在0和VA之间画柱状线
输出次数:VB,NODRAW
输出成功:VA,NODRAW
DRAWNUMBER(CUR<10,-1,IF(CUR=5,0,IF(CUR=6,0,IF(CUR=7,3,IF(CUR=8,7,IF(CUR=9,10,0)))))+IF(CUR=4,0,IF(CUR=3,-3,IF(CUR=2,-7,IF(CUR=1,-10,0)))))
NOTEXT0:-10,COLORBLACK
