分享一個好用的量能指標，指標你一看就懂，倍量，地量等等

分享一個好用的通達信量能指標，指標你一看就懂，特別直觀明瞭！複製源碼，自己導入。

源碼:

VOLUME:VOL,VOLSTICK;

|:COUNT(CLOSE>REF(CLOSE,1),2)=2 AND COUNT(VOL

STICKLINE(|,0,V,1,0),COLORGREEN;

DRAWTEXT(|,VOL+3000,'降'),COLORGREEN;

T:=DYNAINFO(8)>0;

VO:VOL=LLV(VOL,100) AND T;

地量柱:T AND VO,COLORBLUE;

STICKLINE(地量柱,0,V,1,0),COLORBLUE;

DRAWTEXT(地量柱,VOL+3000,'地'),COLORBLUE;

BLZ:=VOL>REF(V,1)*1.9;

BLZ1:=VOL

BLZ2:=VOL

STICKLINE(BLZ,0,V,1,0),COLORYELLOW;

倍量柱:BLZ,COLORYELLOW;

DRAWTEXT(倍量柱,VOL+3000,'倍'),COLORYELLOW;

HJZ:=(3*C+H+L+O)/6;

HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36;

HJZ3:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>HJZ2 AND C>O;

黃金柱:FILTER(HJZ3,5),STICK,COLORRED,LINETHICK4;

{好股票網-股票軟件公式網站 WWW.GOODGUPIAO.COM}

STICKLINE(黃金柱,0,V,1,0),COLORRED;

DRAWTEXT(黃金柱,VOL+10000,'黃'),COLORRED;

價漲量縮:|,COLORGREEN;

FLZ:=V>REF(V,1)*0.98 AND V

STICKLINE(FLZ,0,V,1,0),COLORMAGENTA;

DRAWTEXT(FLZ,VOL+3000,'平'),COLORMAGENTA;

平量柱:FLZ,COLORMAGENTA;

主力啟動線:MA(VOL,5);

主力洗盤線:MA(VOL,40);

資金異動線:MA(VOL,135);

DRAWTEXT(CROSS(主力啟動線,主力洗盤線)AND V>主力洗盤線 AND V>資金異動線 AND 主力洗盤線

梯量:COUNT(V>REF(V,1),3)=3 AND COUNT(C>O,3)=3,NODRAW,COLOR824173;

STICKLINE(梯量,0,V,1,0),COLOR824173;

低量:V<=REF(LLV(V,15),1),NODRAW,COLORGREEN;

STICKLINE(低量,0,V,1,0),COLORGREEN;

倍縮:V<=REF(V,1)*0.5,NODRAW,COLORRED;

STICKLINE(倍縮,0,V,1,0),COLORRED;

{有莊控盤}

VAW1:=EMA(EMA(CLOSE,13),13);

控盤:=(VAW1-REF(VAW1,1))/REF(VAW1,1)*1000;

無莊控盤:=控盤<0;

有莊控盤:=控盤>REF(控盤,1) AND 控盤>0;

{分時價格原碼}

JJ:=DYNAINFO(11);

{波段買賣原碼}

P:=21;S:=8;M1:=3;

財:=(EMA(CLOSE,S)-EMA(CLOSE,P))*50;

神:=EMA(財,M1);

{股價與均線偏離買賣條件}

BTJ1:=(C-JJ)/JJ

BTJ11:=(C-JJ)/JJ

BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005;

STJ1:=(C-JJ)/JJ>0.005;

{控盤買賣條件}

STJ01:=控盤0.5;

STJ02:=控盤>0;

BTJ2:=控盤>REF(控盤,1) AND 控盤

BTJ22:=控盤>REF(控盤,1) AND 控盤<0 ;

{波段買賣條件}

BTJ3:=CROSS(財,神) AND 財

BTJ32:=CROSS(財,神) AND 財

STJ31:=CROSS(神,財);

STJ32:=CROSS(神,財) AND 財>1.618;

{以下為信號};

BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);

BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);

BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);

STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);

STJ82:=FILTER(STJ02 AND STJ32 ,13);

STJ83:=STJ81 AND STJ82;

DRAWTEXT(STJ83,H*1.002,'↓莊出'),COLORGREEN;

DRAWICON(STJ83,H+0.003,24);

莊:= BTJ11 AND BTJ2 AND BTJ3;

有莊:=FILTER(莊,30);

DRAWTEXT(有莊,L-0.0011,'↖莊進'),COLORYELLOW;

DRAWICON(有莊,L*0.999,23);

AQ1:=REF(V,1);AQ2:=DVOL;AQ3:=AQ2/AQ1;

LNX:=AQ3-REF(AQ3,1);

E1:=REF(C,1);E2:=DCLOSE;E3:=(E2-E1)/E1*100;

QMX:=E3-REF(E3,1);

XG:=CROSS(LNX,500) AND CROSS(QMX,10);

DRAWTEXT(XG=1,L*0.995,'--鑽石'),COLORFFCC88;

DRAWICON(XG=1,L*0.993,25);

{STYLE:抄底鑽石王--可以用於選股預警，也可以放到附圖}

YY:=(REF(H,4)-REF(L,1))/C*100>10;{4天前的最高到昨天最低跌幅為10個點}

YY1:=(REF(L,1)-L)/C*100>=0;{昨天的最低價跟今天最低價相平或收下影線}

YY2:=REF(CO;{昨天收陰，今天收陽線}

YY3:= CLOSE>REF(CLOSE,1)*1.03 ;{股價3個點預警}

YY4:=(H-C)/C*100<1.5;{上影線少於1.5個點}

YY5:=V<=LLV(V,5) OR V>=HHV(V,5);{成交量是五天最低或五天最高}

DRAWICON(YY AND YY1 AND YY2 AND YY3 AND YY4 AND YY5,L*0.988,26);{滿足所有條件};

DRAWTEXT(YY AND YY1 AND YY2 AND YY3 AND YY4 AND YY5,L*0.988,'--鑽石王'),COLORRED;

VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;

VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;

VAR7:=0;

VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;

VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);

VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);

VAR12:=ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);

VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);

VAR14:=ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);

VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);

VAR16:=ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);

VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);

VAR18:=ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);

VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);

買１:=VAR10;

買２:=(VAR11+VAR13+VAR15+VAR17);

賣１:=(VAR12+VAR14+VAR16+VAR18);

DRAWTEXT(買１>0 OR 買２>0,LOW*0.99,'買入'),COLORRED;

DRAWTEXT(賣１>0,HIGH*1.02,'賣出'),COLORGREEN;