同花顺筹码进出源码附图 EA

红色柱状线为筹码进入，青色柱状线为筹码流出。

r

VUR0:=(2*O+H+L+3*C)/7;
r VUR1:=CAPITAL*VUR0;
r VUR2:=SMA(AMOUNT,10,1)/1000;
r VUR3:=MA(C*3,5);
r VUR4:=VUR2*C*3/VUR3*1/10;
r VUR5:=VUR2*O*3/VUR3*1/10;
r VUR6:=VUR2*H*3/VUR3*1/10;
r VUR7:=VUR2*L*3/VUR3*1/10;
r VUR8:=(2*VUR5+VUR6+VUR7+3*VUR4)/7;
r VUR9:=DMA(EMA(VUR4,2),SUM(V,1)*VUR8);
r VUR10:=EMA(VUR9,2);
r VURA:=VUR9>VUR10;
r VURB:=EMA(VUR1-VUR9,1);
r VURC:=REF(VURB,1);
r VURD:=VURB>VURC;
r VURS:=VURD AND C>O;
r VURE:=(VURB-VURC)*15;
r VURF:=(VUR9-VUR10)*15000;
r VURG:=(VURC-VURB)*(-1);
r VURH:=IF(VURB>VURC,VURE/1000,0);
r VURN:=IF(VURB<VURC,VURE/1000,0);
r VURT:=IF(VURA AND VURS,VURF/10000,0);
r VURL:=IF(VURA AND VURB<VURC,VURE/1000,0);
r吸进量:VURH,POINTDOT,COLOR1010FF;
r吐出量:VURN,POINTDOT,COLOR10C810;
r买进强烈:VURT,POINTDOT,COLOR10E6FF;
r减筹打压:VURL,POINTDOT,COLORFF1096;
r STICKLINE(VURB>VURC,0,VURE,2.5,1),COLOR1010FF;
r STICKLINE(VURB<VURC,0,VURE,2.5,0),COLOR10C810;
r STICKLINE(VURA AND VURS,0,VURF,2.5,0),COLOR10E6FF;
r STICKLINE(VURA AND VURB<VURC,0,VURE,2.5,0),COLORFF1096;
r 

r