春節快樂！闔家幸福！萬事如意！蛇年財源滾滾！！
給大家拜年，送自用成交量指標－－-阿貴量圖
自用成交量指標－－-阿貴量圖（適用通達信公式編輯器5.0版本）
配合主圖：http://www.88gs.com/soft/sort013/sort05/down-58569.html
配合副圖：http://www.88gs.com/soft/sort013/sort05/down-29988.html
成功率就要靠自己的功底了。
大單比率:(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7),NODRAW;
主力增減倉%:LARGEINTRDVOL/LARGEOUTTRDVOL,NODRAW;
RV5:=IF(BARSCOUNT(CLOSE)<6,REF(SUM(VOL,BARSCOUNT(CLOSE))/BARSCOUNT(CLOSE),1),REF(MA(VOL,5),1));
V1:=IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT AND BARSCOUNT(CLOSE)>1,DYNAINFO(17)*RV5,VOL),VOLSTICK;
STICKLINE(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT AND BARSCOUNT(CLOSE)>1,O,V1,3,-1),COLOR336699;
虛量:V1;
實量:VOL,VOLSTICK;
虛換手:V1/FINANCE(7)*10000;
十日換:SUM(V/CAPITAL*100,3),COLORLICYAN,NODRAW;
量比:V/REF(MA(V,5),1)COLORYELLOW;
百日總:=SUM(V,100);
百日換:百日總/CAPITAL*100,LINETHICK0;
主持倉:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF,LINETHICK2,NODRAW;
LC:=REF(CLOSE,1);
RSI5:=(SMA(MAX(CLOSE-LC,0),3,1))/(SMA(ABS(CLOSE-LC),3,1))*100;
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活躍度:(RSI5-WR10),COLORFFFF00,LINETHICK1,NODRAW;
STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0 || SETCODE=1),虛量,0,-1,-1),COLOR00C0C0;
STICKLINE("MACD.MACD">0,0,V,2.8,1),COLORRED;
STICKLINE("MACD.MACD"<=0,0,V,2.8,1),COLORCYAN;
{www.88gs.com}
倍量:=(V>REF(V,1)*2 OR 虛量>REF(V,1)*2) AND C>REF(C,1);
STICKLINE(倍量,V,0,2,0),COLORYELLOW;
倍縮量:=(V<HHV(REF(V,1),5)/2 OR 虛量<HHV(REF(V,1),5)/2) AND C<REF(C,1);
STICKLINE(倍縮量,V,0,2,0),COLORRED;
STICKLINE((V>REF(V,1) AND REF(倍量,1)=1) AND C>REF(C,1),0,V,2,0),COLORYELLOW;
STICKLINE((V>REF(V,1) AND REF(V,1)>REF(V,2) AND REF(倍量,2)=1) AND C>REF(C,1),0,V,2,0),COLORYELLOW;
STICKLINE((V>REF(V,1) AND REF(V,1)>REF(V,2) AND REF(V,2)>REF(V,3) AND REF(倍量,3)=1) AND C>REF(C,1),0,V,2,0),COLORYELLOW;
STICKLINE((V>REF(V,1) AND REF(V,1)>REF(V,2) AND REF(V,2)>REF(V,3) AND REF(V,3)>REF(V,4) AND REF(倍量,4)=1) AND C>REF(C,1),0,V,2,0),COLORYELLOW;
STICKLINE((V>REF(V,1) AND REF(V,1)>REF(V,2) AND REF(V,2)>REF(V,3) AND REF(V,3)>REF(V,4) AND REF(V,4)>REF(V,5) AND REF(倍量,5)=1) AND C>REF(C,1),0,V,2,0),COLORYELLOW;
收陽線:=(C>REF(C,1));
地量1:=VOL<LLV(VOL,60)*1.001;
地量:=地量1 AND 收陽線;
地量反彈:=收陽線 AND VOL>REF(VOL,1)*1.05 AND REF(地量,1);
STICKLINE(地量反彈>0,0,VOL,2,0),COLORYELLOW;
STICKLINE(地量>0,0,VOL,2,0),COLORMAGENTA;
DRAWICON(收陽線 AND VOL>REF(VOL,1)*1.05 AND REF(地量,1),實量+8000,5),COLORMAGENTA;
{--------VOL.量能飽和--------}
N1:=34;
N2:=N1*1.05;
N3:=N1+3;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能飽和度:IF(SAT>1,1,SAT)*100,COLOR0099FF,NODRAW;
中點:=REF(REFDATE(HHV(V,60)/2,DATE),5);{量能飽和的變色切換}
{中點:=REFDATE(HHV(V,240)/2,DATE);}
{--------VOL.量能飽和--------}
STICKLINE(CURRBARSCOUNT=N1,中點*1.8,中點*1.6,100,1),COLOR00DDDD;
STICKLINE(CURRBARSCOUNT=N1,中點*1.79,中點*1.61,量能飽和度,0),COLOR0055FF;
STICKLINE(CURRBARSCOUNT=N1,中點*1.76,中點*1.64,量能飽和度,0),COLOR0077FF;
STICKLINE(CURRBARSCOUNT=N1,中點*1.73,中點*1.67,量能飽和度,0),COLOR0099FF;
STICKLINE(CURRBARSCOUNT=N1,中點*1.7,中點*1.7,量能飽和度,0),COLOR00DDFF;
DRAWTEXT(CURRBARSCOUNT=N3,中點*1.7,'量能飽和度'),COLORYELLOW;
五日:MA(VOL,5) COLORGREEN LINETHICK2;
十日:MA(VOL,10) COLORYELLOW LINETHICK2;
六十日:MA(VOL,60) COLORMAGENTA LINETHICK2;
IF(五日>六十日,五日,DRAWNULL),LINETHICK2,COLORRED;
主力凈買:(LARGEINTRDVOL-LARGEOUTTRDVOL)*DYNAINFO(11),NODRAW;
主力買入:(LARGEINTRDVOL)*DYNAINFO(11)/100,NODRAW;
主力賣出:(LARGEOUTTRDVOL)*DYNAINFO(11)/100,NODRAW;
STICKLINE(主力凈買>0,主力凈買,主力凈買,0.5,0),COLOR0000FF;
STICKLINE(主力凈買<0,主力凈買,主力凈買,0.5,0),COLOR00FF00;
STICKLINE(主力凈買>0,主力凈買,0,0.5,0),COLOR00006F;
STICKLINE(主力凈買<0,主力凈買,0,0.5,0),COLOR006F00;
STICKLINE(主力凈買>0,主力凈買/8*7,0,0.5,0),COLOR00009F;
STICKLINE(主力凈買<0,主力凈買/8*7,0,0.5,0),COLOR009F00;
STICKLINE(主力凈買>0,主力凈買/4*3,0,0.5,0),COLOR0000CF;
STICKLINE(主力凈買<0,主力凈買/4*3,0,0.5,0),COLOR00CF00;
STICKLINE(主力凈買>0,主力凈買/2,0,0.5,0),COLOR0000FF;
STICKLINE(主力凈買<0,主力凈買/2,0,0.5,0),COLOR00FF00;
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
凈流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S);
超大單:=(超B)-(超S);
大單:=(大B)-(大S);
中單:=(中B)-(中S);
小單:=(小B)-(小S);
DAZHI:=CONST(MAX(ABS(凈流入),MAX(ABS(超大單),MAX(ABS(大單),MAX(ABS(中單),ABS(小單)))))),NODRAW;
DRAWRECTREL(0,0,282,999.2,IF(120,RGB(10,0,0),0));
DRAWRECTREL(0,CONST(880-(ABS(凈流入)*500/DAZHI)),50,880,IF(CONST(凈流入)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(58,CONST(880-(ABS(超大單)*500/DAZHI)),108,880,IF(CONST(超大單)>0,RGB(102,0,204),RGB(23,125,255)));
DRAWRECTREL(116,CONST(880-(ABS(大單)*500/DAZHI)),166,880,IF(CONST(大單)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(174,CONST(880-(ABS(中單)*500/DAZHI)),224,880,IF(CONST(中單)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(232,CONST(880-(ABS(小單)*500/DAZHI)),282,880,IF(CONST(小單)>0,RGB(255,0,0),RGB(0,128,0)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,1,0,'凈流入'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.060,1,0,'超大單'),COLOR660099;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.126,1,0,'大單'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.181,1,0,'中單'),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.241,1,0,'小單'),COLORGREEN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0,0.001,0,'單位（萬元）'),COLORYELLOW;
{M:=0.53;M1:=0.33;}M:=0.58;M1:=0.39;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.001,0.790,0,CEILING(凈流入));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.059,0.790,0,CEILING(超大單));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.116,0.790,0,CEILING(大單));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.175,0.790,0,CEILING(中單));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.232,0.790,0,CEILING(小單));
STICKLINE(C/REF(C,1)>=1.099,0,VOL,1,0),COLORMAGENTA;
STICKLINE(REF(C,1)/C>=1.099 AND C<O AND C<REF(C,1),0,VOL,1,0),COLORBLUE;
DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,'粉心漲停 藍心跌停 紅心綠心是大單 '),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,'黃柱倍量 紅柱倍縮 笑臉前面是地量'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0.25,0,'紅邊可操作 籃邊要休息 '),COLORMAGENTA;
{ 原文鏈接：http://www.88gs.com/soft/sort013/sort05/down-58551.html }
