资金趋势（源码 副图 通达信 贴图）

 来自：理想论坛(55188.com) 作者：新疆888 浏览：4415 回复：7 

 分时选股 
 

资金趋势
DRAWBAND(3*(EMA(C,3)-EMA(C,8)-EMA(EMA(C,3)-EMA(C,8),20))*0.01,RGB(250,0,00),0,RGB(0,180,180));
主力资金
A:=VOL*CLOSE;
 B:=SUM(A,1)/SUM(VOL,1);
 B1:=EMA(B,8);
主力:=(B-B1)*100/B;
 DRAWBAND(主力,RGB(250,80,80),0,RGB(0,180,180));
活筹指数
{0AMV活筹指数}
VAR1:=AMOUNT;
 VAR2:=SMA(VAR1,10,1);
 VAR3:=REF(VAR2,1);
 STICKLINE(VAR2>VAR3,VAR2,VAR3,3,0),COLORRED;
 STICKLINE(VAR2<VAR3,VAR2,VAR3,3,0),COLORGREEN;
活筹宝塔
VAR11:=SMA(AMOUNT,15,1)/5670000;
 VAR22:=MA(REF(CLOSE,1),5);
 VAR2:=VAR11*CLOSE/VAR22;
 B0:=REF(VAR2-O,2);
 B1:=REF(VAR2,1);
 B2:=REF(VAR2,2);
 B3:=REF(VAR2,3);
 B4:=REF(VAR2,4);
 VAR2MAX:=MAX(MAX(MAX(VAR2,B1),B2),B3);
 VAR2MIN:=MIN(MIN(MIN(VAR2,B1),B2),B3);
 RS1:=(VAR2=VAR2MAX AND (B1>=B2 OR B1>=B3)) OR (B1=VAR2MAX AND (B2=VAR2MIN OR B3=VAR2MIN) AND VAR2>=B2) OR (B2=VAR2MAX AND B3=VAR2MIN AND VAR2>=B1) OR (B3=VAR2MAX AND VAR2>=B1 AND VAR2>=B2);
 RS2:=VAR2=VAR2MAX AND B1=VAR2MIN;
 RS3:=(B1=VAR2MAX AND VAR2<B2) OR (B2=VAR2MAX AND B1>B3) OR (B3=VAR2MAX AND B1>B2 AND B2>=B4 AND VAR2<B1);
 STICKLINE(RS1,B1,VAR2,2,1),COLORRED;
 STICKLINE(RS2,B2,VAR2,2,1),COLORRED;
 STICKLINE(RS3,B1,B2,2,1),COLORRED;
 GS1:=(VAR2=VAR2MIN AND (B1<B2 OR B1<B3)) OR (B1=VAR2MIN AND (B2=VAR2MAX OR B3=VAR2MAX) AND VAR2<B2) OR (B2=VAR2MIN AND B3=VAR2MAX AND VAR2<B1) OR (B3=VAR2MIN AND VAR2<B1 AND VAR2<B2);
 GS2:=B1=VAR2MAX AND VAR2=VAR2MIN;
 GS3:=(B1=VAR2MIN AND VAR2>=B2) OR (B2=VAR2MIN AND B1<=B3) OR (B3=VAR2MIN AND B1<=B2 AND B2<B4 AND VAR2>=B1);
 STICKLINE(GS1,B1,VAR2,2,0),COLORGREEN;
 STICKLINE(GS2,B2,VAR2,2,0),COLORGREEN;
 STICKLINE(GS3,B1,B2,2,0),COLORGREEN;

股票论坛 www.55188.com

 附件:
 快照-1.jpg (149.19 KB)
2016-3-26 05:46

快照-1.jpg
{原文链接：http://www.55188.com/thread-7396702-1-1.html}