主力统计和散户统计源码 主图 通达信 贴图无未来

{}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;


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


选股公式:
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
买进:(LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)));