通达信、同花顺 通用 主力 散户 持仓 附图指标 源码

源码：无未来

{主力统计}
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;

{小股民统计}
JJJ:=(HIGH+LOW+CLOSE)/3;QQJ0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);
TD1:=QQJ0*(MIN(OPEN,CLOSE)-LOW);
DD1:=QQJ0*(JJ-MIN(CLOSE,OPEN));
DD2:=QQJ0*(HIGH-MAX(OPEN,CLOSE));
TD2:=QQJ0*(MAX(CLOSE,OPEN)-JJJ);
TD:=TD1-TD2;
DA:=DD1-DD2;
XD1:=1-(TD1+DD1);
XD2:=1-(TD2+DD2);
TZ:=V/SUM(V,60)*100;
DDT:=((XD1-XD2)/10000)/TZ;
小股民持仓:SUM(DT,22),COLOR888888,LINETHICK1;
STICKLINE(DDT>0,小股民持仓,小股民持仓+DDT,1,0),COLORFF00FF;
STICKLINE(DDT<0,小股民持仓+DDT,小股民持仓,1,0),COLORFF8800;