======================================
1.主力持倉:
-----------------
//主力持倉TOPWIN
//N 1,999,1
N:=1;
IF(PERIODNAME<>"日線")
{
統計:"該指標只在日線周期下有效。";
RETURN;
}
r1:=ZDMR[-1];
r2:=BDMR[-1];
r3:=-ZDMC[-1];
r4:=-BDMC[-1];
x:=(ZDMR+BDMR)/SHGZG*30;
y:=-(ZDMC+BDMC)/SHGZG*30;
X1:=(ZDMR+BDMR)/SHGZG*100;
y1:=-(ZDMC+BDMC)/SHGZG*100;
a1=SUM(X1,0);
b1=SUM(y1,0);
主力持倉:=a1+b1;
r:=((ZDMR[-1]+BDMR[-1])-(ZDMC[-1]+BDMC[-1]))/SHGZG*100;
b:=SUM(r,0);
STICKLINE(X1>0,x+b,b,2),colorred;
STICKLINE(y1<0,b,b+y,2),colorgreen;
IF(ISNULL(r1))
{
統計:"本指標由同花順金融研究中心提供,每晚11點後提供當天的數據。";
RETURN;
}
a=(ZDMR[-1]+BDMR[-1]);
b=(ZDMC[-1]+BDMC[-1]);
a3=SUM(a,n)/1000000;
b3=SUM(b,n)/1000000;
VOL1=SUM(VOL,n)/1000000;
IF(a3>b3)
{
y=a3-b3;
z=y/VOL1*100;
統計:TOSTRING(n,0)+"天機構買入"+TOSTRING(a3,1)+"萬手,賣出"+TOSTRING(b3,1)+"萬手.凈買入"+TOSTRING(y,1)+"萬手.占總成交"+TOSTRING(z,1)+"%.";
}
ELSE
{
y=b3-a3;
z=y/VOL1*100;
統計:TOSTRING(n,0)+"天機構買入"+TOSTRING(a3,1)+"萬手,賣出"+TOSTRING(b3,1)+"萬手.凈賣出"+TOSTRING(y,1)+"萬手.占總成交"+TOSTRING(z,1)+"%.";
}
=============================
2.階段主力壹日:
------------------------
IF(PERIODNAME<>"日線")
{
統計:"該指標只在日線周期下有效。";
RETURN;
}
N:=1;
r1:=ZDMR[-1];
r2:=BDMR[-1];
r3:=-ZDMC[-1];
r4:=-BDMC[-1];
STICKLINE(r2>0,r1,r1+r2,8),color160060;
STICKLINE(r1>0,0,r1,8),color0000ff;
STICKLINE(r3<0,0,r3,8),color00ff00;
STICKLINE(r4<0,r3,r3+r4,8),color166000;
X1:=(ZDMR+BDMR);
y1:=-(ZDMC+BDMC);
a1=MA(X1,n);
b1=MA(y1,n);
凈買入:a1+b1;
凈買入比值:(a1+b1)/VOL*100;
IF(ISNULL(r1))
{
統計:"本指標由同花順金融研究中心提供,每晚11點後提供當天的數據。";
RETURN;
}
a=(ZDMR[-1]+BDMR[-1]);
b=(ZDMC[-1]+BDMC[-1]);
a3=SUM(a,n)/1000000;
b3=SUM(b,n)/1000000;
VOL1=SUM(VOL,n)/1000000;
IF(a3>b3)
{
y=a3-b3;
z=y/VOL1*100;
統計:TOSTRING(n,0)+"天機構買入"+TOSTRING(a3,1)+"萬手,賣出"+TOSTRING(b3,1)+"萬手.凈買入"+TOSTRING(y,1)+"萬手.占總成交"+TOSTRING(z,1)+"%.";
}
ELSE
{
y=b3-a3;
z=y/VOL1*100;
統計:TOSTRING(n,0)+"天機構買入"+TOSTRING(a3,1)+"萬手,賣出"+TOSTRING(b3,1)+"萬手.凈賣出"+TOSTRING(y,1)+"萬手.占總成交"+TOSTRING(z,1)+"%.";
}
=========================================
3.筆均量:
-----------------
筆均量:=VOL/VOLAMOUNT;
筆均周量:EMA(筆均量,5);
頂:HHV(筆均周量,20),colorred;
底:LLV(筆均周量 ,20),colorgreen ;
===========================================
4.內外盤:
wp: OUTVOL,COLORSTICK,linethick2;//外盤
np:-INVOL,COLORSTICK,linethick2;//內盤
CZ:WP-NP,colorEEEEEE;//差值
累計:=SUM(CZ,5),COLOR00AAFF;
LL:0;
===============================
同花順公式