同花顺机构控盘度公式源码

机构控盘度  
 
IF(PERIODNAME<>"日线")  
{  
机构控盘度:"本指标只适用于日线周期";  
RETURN;  
}  
IF(ISNULL(LV_D_SUPER_HLD_RATIO[-1])!=0)  
{  
        b1=IF(ISNULL(BIGBUYCOUNT1[-1]),0,BIGBUYCOUNT1[-1])+IF(ISNULL(WAITBUYCOUNT1[-1]),0,WAITBUYCOUNT1[-1]);  
        s1=IF(ISNULL(BIGSELLCOUNT1[-1]),0,BIGSELLCOUNT1[-1])+IF(ISNULL(WAITSELLCOUNT1[-1]),0,WAITSELLCOUNT1[-1]);  
        b2=IF(ISNULL(BIGBUYCOUNT2[-1]),0,BIGBUYCOUNT2[-1])+IF(ISNULL(WAITBUYCOUNT2[-1]),0,WAITBUYCOUNT2[-1]);  
        s2=IF(ISNULL(BIGSELLCOUNT2[-1]),0,BIGSELLCOUNT2[-1])+IF(ISNULL(WAITSELLCOUNT2[-1]),0,WAITSELLCOUNT2[-1]);  
 
        ddx:=((b1-s1)+(b2-s2)*0.7)/TV_D_PUBLIC_SHARES *100;  
        IF(ISNULL(LV_D_SUPER_HLD_RATIO))  
        {  
                RET=(B1+b2)/TV_D_PUBLIC_SHARES *100;  
        }  
        ELSE  
        {  
                X1=LV_D_SUPER_HLD_RATIO*100;  
                ret:=X1+ddx;  
                IF(ddx > 0)  
                {  
                        IF(x1>95)  
                        ret := x1+ddx*0.1;  
                        ELSE IF(x1>90)  
                        ret := x1+ddx*0.5;  
                        ELSE IF(x1>85)  
                        ret := x1+ddx*0.8;  
                }  
                IF(ddx < 0)  
                {  
                        IF(x1<5)  
                                ret := x1+ddx*0.1;  
                        ELSE IF(x1<10)  
                                ret := x1+ddx*0.5;  
                        ELSE IF(x1<15)  
                                ret := x1+ddx*0.8;  
                }  
        }  
        IF(ISNULL(ret))  
                ret := LV_D_SUPER_HLD_RATIO*100;  
        IF(ret > 97.18)  
                ret := 97.18;  
        IF(ret < 2.08)  
                ret := 2.08;  
 
}  
ELSE  
{  
        ret=LV_D_SUPER_HLD_RATIO*100;          
}  
x:=ret;  
        STICKLINE(x>x[1],x,x*2-x[1],5),colorred;  
        STICKLINE(x<x[1],x,x*2-x[1],5),colorgreen;  
RETURN(ret);