累计持仓(飞狐,大知慧)[转贴]

累计持仓(飞狐,大知慧)
前提是有分笔数据
建立扩展数据

累计持仓

买入:EXTDATA(1),colorgreen,linethick0;{COLORSTICK}
卖出:EXTDATA(2),colorwhite,linethick0;{COLORSTICK}
净买:(买入-卖出),colorred,linethick0;
累计持仓:sum(净买,0),colorgreen,linethick2;
stickline(1,累计持仓,累计持仓+买入,4,1),colorgreen;
stickline(1,累计持仓,累计持仓+卖出,4,1),coloryellow;
stickline(净买>0,累计持仓+买入,累计持仓-卖出,4,0),colorred;
stickline(净买<0,累计持仓+卖出,累计持仓-买入,4,0),colorffff00;
卅日持仓:ma(累计持仓,30),pointdot,colorblue;

ma5:MA(累计持仓,5),colorred;
ma10:MA(累计持仓,10),COLORGRAY;
ma30:MA(累计持仓,30),colorgreen;
ma50:MA(累计持仓,50),CIRCLEDOT,COLORMAGENTA;
drawtext(ma(累计持仓,50)>ref(ma(累计持仓,50),1),ma(累计持仓,50),'o'),COLORBLACK;
主力持筹:分笔成交公式

Var1:=AMOUNT/VOL/100;
Var2:=REF(ASKPRICE(1),1);
Var3:=REF(BIDPRICE(1),1);
Var4:=(Var2-Var3)*0.35;
Var5:=IF(Var1>=Var2-Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,BUYVOL,0));
Var6:=IF(Var1<=Var3+Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,SELLVOL,0));
J: SUM(Var5,0);
大单买量:SUM(IF(AMOUNT>=50000,Var5,0),0);
T: SUM(Var6,0);
大单卖量:SUM(IF(AMOUNT>=50000,Var6,0),0);
Var2;
P: Var1;
Var3;
VOL, VOLSTICK;
U: EMA(J-T,3);
Var7:=BARSLAST(CLOSE>REF(CLOSE,1));
Var8:=BARSLAST(CLOSE<REF(CLOSE,1));
Var9:=SUM(IF(REF(CLOSE,Var7)<=CLOSE,VOL,0),0);
VarA:=SUM(IF(REF(CLOSE,Var8)>=CLOSE,VOL,0),0);
U1: EMA(Var9-VarA,3);
扩展数据
买入:EXTDATA(1),colorgreen,linethick0;{COLORSTICK}
卖出:EXTDATA(2),colorwhite,linethick0;{COLORSTICK}

朋友这个两个公式！！！！

一个分笔主力持筹:分笔成交公式
Var1:=AMOUNT/VOL/100;
Var2:=REF(ASKPRICE(1),1);
Var3:=REF(BIDPRICE(1),1);
Var4:=(Var2-Var3)*0.35;
Var5:=IF(Var1>=Var2-Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,BUYVOL,0));
Var6:=IF(Var1<=Var3+Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,SELLVOL,0));
J: SUM(Var5,0);
大单买量:SUM(IF(AMOUNT>=50000,Var5,0),0);
T: SUM(Var6,0);
大单卖量:SUM(IF(AMOUNT>=50000,Var6,0),0);
Var2;
P: Var1;
Var3;
VOL, VOLSTICK;
U: EMA(J-T,3);
Var7:=BARSLAST(CLOSE>REF(CLOSE,1));
Var8:=BARSLAST(CLOSE<REF(CLOSE,1));
Var9:=SUM(IF(REF(CLOSE,Var7)<=CLOSE,VOL,0),0);
VarA:=SUM(IF(REF(CLOSE,Var8)>=CLOSE,VOL,0),0);
U1: EMA(Var9-VarA,3);

一个是日线！！！！！！！！！！！！！！！！！
累计持仓

买入:EXTDATA(1),colorgreen,linethick0;{COLORSTICK}
卖出:EXTDATA(2),colorwhite,linethick0;{COLORSTICK}
净买:(买入-卖出),colorred,linethick0;
累计持仓:sum(净买,0),colorgreen,linethick2;
stickline(1,累计持仓,累计持仓+买入,4,1),colorgreen;
stickline(1,累计持仓,累计持仓+卖出,4,1),coloryellow;
stickline(净买>0,累计持仓+买入,累计持仓-卖出,4,0),colorred;
stickline(净买<0,累计持仓+卖出,累计持仓-买入,4,0),colorffff00;
卅日持仓:ma(累计持仓,30),pointdot,colorblue;

ma5:MA(累计持仓,5),colorred;
ma10:MA(累计持仓,10),COLORGRAY;
ma30:MA(累计持仓,30),colorgreen;
ma50:MA(累计持仓,50),CIRCLEDOT,COLORMAGENTA;
drawtext(ma(累计持仓,50)>ref(ma(累计持仓,50),1),ma(累计持仓,50),'o'),COLORBLACK;

Var1:=AMOUNT/VOL/100;
Var2:=REF(ASKPRICE(1),1);
Var3:=REF(BIDPRICE(1),1);
Var4:=(Var2-Var3)*0.35;
Var5:=IF(Var1>=Var2-Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,BUYVOL,0));
Var6:=IF(Var1<=Var3+Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,SELLVOL,0));
J: SUM(Var5,0);
大单买量:SUM(IF(AMOUNT>=50000,Var5,0),0);
小单买量:SUM(IF(AMOUNT<50000,Var5,0),0);
T: SUM(Var6,0);
大单卖量:SUM(IF(AMOUNT>=50000,Var6,0),0);
小单卖量:SUM(IF(AMOUNT<50000,Var6,0),0);
小单买卖和:大单买量+大单卖量;
大单买卖和:小单买量+小单卖量;
Var2;
P: Var1;
Var3;
VOL, VOLSTICK;
U: EMA(J-T,3);
Var7:=BARSLAST(CLOSE>REF(CLOSE,1));
Var8:=BARSLAST(CLOSE<REF(CLOSE,1));
Var9:=SUM(IF(REF(CLOSE,Var7)<=CLOSE,VOL,0),0);
VarA:=SUM(IF(REF(CLOSE,Var8)>=CLOSE,VOL,0),0);
U1: EMA(Var9-VarA,3);