自用的3个指标,简单实用!用来操作涨停板!  

需要通达信4.17版导入公式

主图(筹码变动)源码:

Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0.015,0,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0;
DRAWTEXT_FIX(1,0.01,0.12,0,'流通盘(亿):'),COLOR0080FF;
DRAWNUMBER_FIX(1,0.28,0.12,0,CONST(CAPITAL/1000000)),COLOR0080FF;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
取舍线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,LINETHICK1,COLORYELLOW;
生命线:MA(取舍线,6),LINETHICK1,COLORRED;
ZT:=C/REF(C,1)>1.093;
XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);STICKLINE(ZT,REF(O,BH),REF(C,BH),2,0),COLORYELLOW;
 


资金运转副图

VAR1:=SMA(AMOUNT/10,10,1)/10000;
VAR2:=REF(VAR1,1);
资金运转: STICKLINE(VAR1>VAR2,VAR1,VAR2,2,0),COLORRED;
资金流失: STICKLINE(VAR1< VAR2,VAR1,VAR2,2,0),COLORGREEN;
流动资金: IF(VAR1>VAR2,VAR1,DRAWNULL),COLORRED,LINETHICK2;

主力副图
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
主力:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
IF(主力>=REF(主力,1),主力,DRAWNULL),COLORRED,LINETHICK2;
IF(主力<=REF(主力,1),主力,DRAWNULL),COLORGREEN,LINETHICK2;