通达信VOL量学副图指标副图源码

TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME< 0.5,TOTAL,MTIME);
VVOL:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1 AND K=0),VOL*(TOTAL+3)/(CTIME+3),DRAWNULL),NODRAW;
STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VVOL,0,-1,-1),COLOR00C0C0;
VL:VOL,VOLSTICK;
X:=IF((CODELIKE('300') AND DATE>1200823 ) OR CODELIKE('688') ,2,1);
涨停1:=ABS((H+0.005-REF(C,1))/REF(C,1)*100)>=10*X;
涨停:=涨停1 AND C=H;
百日涨停:COUNT(涨停,100),NODRAW;
量:VOL,VOLSTICK;
实体高度:=ABS(C-O)/C;
STICKLINE(涨停1,0,V*1.01,3.1,0),COLORRED;
STICKLINE(涨停1,0,V*1.01,2.9,1),COLORRED;
人线:=AMOUNT/VOL/100;
HS:10000*V/FINANCE(7),NODRAW;
假阴:=O>REF(C,1) AND C< O AND 人线>REF(C,1);
STICKLINE(假阴,0,V,3.1,0),COLORC080FF;
假阳:=C>O AND O< REF(C,1) AND 人线< REF(C,1);
STICKLINE(假阳 ,0,V,3,0),COLORC08000;
板后高量1:=(V>REF(V,1) AND C<>H AND REF(C,1)>REF(C,2)*1.095);
板后高量2:=(V>REF(V,1) AND 涨停1 );
D1:=BARSLAST(V=HHV(V,M));
H_L:=0.1*CONST(HHV(V,240));
BS:V/REF(V,1),NODRAW;
百低:=V=LLV(V,M);
DRAWTEXT(百低,1.1*V,'1');
倍量柱:=RANGE(BS,1.9,4);
STICKLINE(倍量柱,0,V,3,0),COLOR00FFFF;
平量柱:=RANGE(BS,0.97,1.03);
STICKLINE(平量柱,0,V,3,0),COLOR808080;
T3:=COUNT(RANGE(BS,1.03,4) AND C>REF(C,1),2)=2;
STICKLINE(T3,0,V*0.9,1,0),COLOR400040;
高量柱:=(VOL>=REF(V,1)*4 AND V=HHV(V,5)) OR (V=HHV(V,50) AND HS>2);
STICKLINE(高量柱,0,V*0.9,2,0),COLOR400080;
V100:=V<=LLV(V,120)*1.2 AND V>0 AND BARSCOUNT(V)>=120;
长阴短柱:=C/MAX(REF(C,1),O)<=(1-1/30) AND V< HHV(V,30)/1.9;
DRAWTEXT(长阴短柱 ,V+H_L,'！');
百日低量群:=COUNT(V100,5)>=3;
DRAWTEXT(FILTER(百日低量群,4),V+H_L,'百低群'),COLORGRAY;
缩量31:=RANGE(REFX(BS,1),0.55,2/3) AND DAYSTOTODAY>0  AND REFX(V,1)<>0 ;
STICKLINE(缩量31,V*2/3,V*2/3,2,0);
STICKLINE(缩量31,V*1/3,V*1/3,2,0);
缩量21:=RANGE(REFX(BS,1),1/3,0.55) AND DAYSTOTODAY>0  AND REFX(V,1)<>0 ;
STICKLINE(缩量21,V*1/2,V*1/2,2,0);
缩量32:=RANGE(REFX(BS,1),0,1/3) AND DAYSTOTODAY>0  AND REFX(V,1)<>0 ;
STICKLINE(缩量32,V*2/3,V*2/3,2,0);
STICKLINE(缩量32,V*1/3,V*1/3,2,0);
HHV(V,M),DOTLINE,COLORRED;
所属板块:=STRCAT('所属板块：',STRCAT(STRCAT(STRCAT('【行业】：',HYBLOCK),STRCAT('【地域】：',DYBLOCK)),STRCAT('【概念】：',GNBLOCK)));
DRAWTEXT_FIX(O>0,0,0.00,0,所属板块),COLOR0080FF;
流通市值:=STRCAT(STRCAT('流通市值：', CON2STR(C*FINANCE(46)/100000000,2)),'亿/');
开盘金额:=STRCAT(STRCAT('开盘金额：', CON2STR(DYNAINFO(15)/10000,2)),'万');
XXX:=STRCAT(流通市值,开盘金额);
DRAWTEXT_FIX(O>0,0,0.1,0,XXX);