通达信主力控盘优化副图指标 源码分享 附图

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

R:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
主力控盘:=10;
优化版指标:=EMA(R,主力控盘);
公式:=EMA(优化版指标,5);
通达信:=优化版指标-公式;
VESSS1:=优化版指标+通达信;
PR:100-ABS(VESSS1) COLORRED LINETHICK1;
VESSS2:MA(PR,5) COLORWHITE LINETHICK1;
K:=15;
VESSS3:=(K/100)*STD(PR-REF(PR,1),10);
XA:=IF(PR<REF(PR,1),PR,0);
XN:=BARSLAST(XA>0 );
VESSS4:=REF(PR,XN);
YA:=IF(PR>REF(PR,1),PR,0);
YN:=BARSLAST(YA>0) ;
VESSS5 :=REF(PR,YN);
RR:=IF( VESSS5-PR>VESSS3,-1,0) ;
TT:=IF( PR- VESSS4>VESSS3,1,RR) ;
IF(TT=1,PR,DRAWNULL), COLORRED , LINETHICK4;
IF(TT=-1,PR,DRAWNULL), COLORGREEN , LINETHICK2;
IF(TT=0,PR,DRAWNULL), COLORWHITE , LINETHICK2;
80 COLORBROWN LINETHICK1;
20 COLORBROWN LINETHICK1;

原理解析：
R赋值:-100*(14日内最高价最高值-收盘价)/(14日内最高价最高值-14日内最低价最低值)
主力控盘赋值:10
优化版指标赋值:R的主力控盘日指数移动平均
公式赋值:优化版指标的5日指数移动平均
通达信赋值:优化版指标-公式
VESSS1赋值:优化版指标+通达信
P输出R:100-VESSS1的绝对值 COLORRED LINETHICK1
输出VESSS2:PR的5日简单移动平均 COLORWHITE LINETHICK1
K赋值:15
VESSS3赋值:(K/100)*PR-1日前的PR的10估算标准差
XA赋值:IF(PR<1日前的PR,PR,0)
XN赋值:上次XA>0 距今天数
VESSS4赋值:XN日前的PR
YA赋值:IF(PR>1日前的PR,PR,0)
YN赋值:上次YA>0距今天数
VESSS5 :=YN日前的PR
如果 VESSS5-PR>VESSS3返回-1否则返回0
如果 PR- VESSS4>VESSS3返回1否则返回RR
如果TT=1返回PR否则返回DRAWNULL
如果TT=-1返回PR否则返回DRAWNULL
如果TT=0返回PR否则返回DRAWNULL
80 COLORBROWN LINETHICK1
20 COLORBROWN LINETHICK1