大智慧主力控盘(ZLKP)【副图指标、原码】

    观察委卖，经常有一次交易填没多个委卖位，认为这是庄家的控盘行为，庄家用买入股票的手法上抬股价；反之亦然。以这种观点编制了一个ZLKP公式，ZLKP所述仅仅学生个人的观点，只是用来和同学们交流。
 
    ZLKP描述的是主力操盘的行为，也是资金流动的一个方面，是庄家控盘必须支付的“成本”，在主力的资金流向上它是明的，还有许多以各种方式暗暗的流着，若把ZLKP当资金流向来看必需多加注意。
 

    ZLKP公式用大智慧股软编写，以民生银行（600016）为例，它在分笔周期显示的图形如下：
 

公式"ZLKP"是供其它周期引用ZLKP的引用公式,在分时周期显示的图形如下：
 

在15分钟周期时“ZLKP”显示如下图,表示各时段庄家的操盘力度：
 

    学生认为ZLKP是主力在实时控盘中所运用筹码（资金）的行为，所以也是了解主力资金流向的一个方面，上图今天庄家控盘累计吐出筹码0.053％，主力资金是流入的
 

  流入资金=占盘比*流通盘*平均价=0.053*225876024（手）*9.37=11217.23万元。

 在"ZLKP"中控盘次数全天操盘327次,操盘比较积极。

    如果会使用自定义数据或扩展数据可用ZLKP或“ZLKP"新建一个这类数据，这类数据要设置为自动更新，以后它会每天为你增加一个数据。下图采用扩展数据，在日线公式中用”控盘资金:EXTDATA(N),COLOR3D“引入，语句中N为扩展数据编号,学生没有历史数据，本方法只用了二天也只得到二个数据。采用自定义数据方式更好，利用”引入“或“导出”功能同学之间可以互相补充数据。
 

 最后要指出：ZLKP是分笔周期指标，数据量较大，运行时间也就稍慢。
 

{ZLKP=主力控盘 *****************************************************************}
 input:委位(1,1,3);
 variable:主力买入=0,主力卖出=0,V0=0,增量0=0;
 最小量:=50000/close/100; {定义主力买卖最小量}
 V1:=vol-V0;
 V0:=vol;
 
C1:=close;
 {在买盘观察主力出货:周期内一次填掉N个买位时理解为主力出货}
 卖:=V0>0 and C1<ref(BIDPRICE(委位),1) and V0>最小量;
 主力卖出: if(卖,主力卖出+v0*100/CAPITAL,主力卖出),linethick0,color00e040;
 {同样一个周期吃掉N个卖位理解为主力吃货}
 买:=V0>0 and C1>ref(ASKPRICE(委位),1) and V0>最小量;
 主力买入: if(买,主力买入+v0*100/CAPITAL,主力买入),linethick0,color0040e0;
 {转换成占仓比}
 累计: (主力买入-主力卖出),colorc0c0c0;
 增量:累计-增量0,COLOR3D;
 增量0:=累计;
 买次数: count(增量>0,0),precis0,linethick0,colorC0C0C0;
 卖次数: count(增量<0,0),precis0,linethick0,colorC0C0C0;
 
{"ZLKP" 在其它周期引用 ZLKP 公式 **************************************************}
input:委托盘(1,1,3);
 variable:差0=0;
 主力卖出: "ZLKP.主力卖出#TICK"(委托盘),linethick0,color00E040;
 主力买入: "ZLKP.主力买入#TICK"(委托盘),linethick0,color0040E0;
 累计: 主力买入-主力卖出,linethick2,colorC0C0C0;
 差: 累计-差0,COLOR3D;
 差0:=累计;
 买次数: "ZLKP.买次数#TICK",precis0,linethick0,colorc0c0c0;
 卖次数: "ZLKP.卖次数#TICK",precis0,linethick0,colorc0c0c0;
 
DRAWTEXTABS(0,0,'主力控盘的筹码变化,数值单位"占盘比"'),colorE060E0;