通达信仓位副图 主力持仓、主力统计一目了然

通达信仓位副图 主力持仓、主力统计一目了然

源码

{主力统计}
JJ:=(HIGH+LOW+CLOSE)/3;
 QJ0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);
买1:=QJ0*(MIN(OPEN,CLOSE)-LOW);
买2:=QJ0*(JJ-MIN(CLOSE,OPEN));
卖1:=QJ0*(MAX(CLOSE,OPEN)-JJ);
卖2:=QJ0*(HIGH-MAX(OPEN,CLOSE));
 DT:=((买1+买2)-(卖1+卖2))/10000;
主力持仓:SUM(DT,66),COLORWHITE,LINETHICK1;
 STICKLINE(DT>0,主力持仓,主力持仓+DT,1,0),COLOR0000FF;
 STICKLINE(DT<0,主力持仓+DT,主力持仓,1,0),COLOR00FF00;
 {小股民统计}
TD:=买1-卖1;
 DA:=买2-卖2;
 XD1:=1-(买1+买2);
 XD2:=1-(卖1+卖2);
 TZ:=V/SUM(V,60)*100;
 DT1:=((XD1-XD2)/10000)/TZ;
小股民持仓:SUM(DT1,22),COLOR888888,LINETHICK1;
 STICKLINE(DT1>0,小股民持仓,小股民持仓+DT1,1,0),COLORFF00FF;
 STICKLINE(DT1<0,小股民持仓+DT1,小股民持仓,1,0),COLORFF8800;
 A:0;