自从分享了10日资金出入表源码,有朋友私信能否分享一个“成交量占流通盘百分比”指标。没啥好说的,安排!
这个分时“成交量占流通盘百分比”幅图指标只为解决成交量变化监控的问题,请勿作为买卖依据!
VAR1:="分时引用.AAQ#DAY";
VAR2:=IF(HOUR<13,TIME-0929-(HOUR-9)*40,TIME-1180-(HOUR-13)*40);
分时量比:SUM(V,VAR2)/(VAR2)/VAR1,COLORWHITE;
竞价金额:=分时引用.竞价金额#DAY,NODRAW;{集合竞价 单位元};
竞额:竞价金额/10000,COLORRED,NODRAW;
竞量:=竞价金额/OPEN/100;
今量:=SUM(V,0),NODRAW;{今天量能,具体到每分钟,可用于分时回看}
昨量:=分时引用.昨量#DAY,NODRAW;{昨天量能}
股本Z:=分时引用.股本Z#DAY;
今换手Z:今量*10000/股本Z,LINETHICK2,COLORCYAN;
DRAWNUMBER(ISLASTBAR,今换手Z,今换手Z),COLORCYAN;
今昨量比:今量/昨量,LINETHICK2,COLORYELLOW;{今日量能与昨天量能比}
DRAWNUMBER(ISLASTBAR,今昨量比,今昨量比),COLORYELLOW;
今开:分时引用.今开#DAY,COLORCYAN,NODRAW;
昨开:分时引用.昨开#DAY,COLORWHITE,NODRAW;
今低:分时引用.今低#DAY,COLORGREEN,NODRAW;
LTP:=IF(CAPITAL<100000,100000,CAPITAL);
竞价换手率:=竞量/LTP*10000;
竞价动能:=今开 * 竞价换手率,COLORYELLOW,NODRAW;
竞价涨停:=分时引用.竞价涨停#DAY,COLORWHITE;
HL:=MAX(HHV(今换手Z,240),HHV(分时量比,240));
NOTEXT昨量线:1,DOTLINE,LINETHICK1,COLORLIGREEN;
NOTEXT活跃线:3,DOTLINE,LINETHICK1,COLORMAGENTA;
NOTEXT高潮线:IF(HL>=7,7,DRAWNULL)DOTLINE,LINETHICK1,COLORRED;
STICKLINE(CROSS(今昨量比,1),0,HL/2,2,0),COLORRED;
DRAWTEXT(CROSS(今昨量比,1),HL/2,' 平量')COLORMAGENTA;
STICKLINE(CROSS(今昨量比,2),0,HL/2,2,0),COLORRED;
DRAWTEXT(CROSS(今昨量比,2),HL/2,' 倍量')COLORMAGENTA;
STICKLINE(CROSS(今昨量比,3),0,HL/2,2,0),COLORRED;
DRAWTEXT(CROSS(今昨量比,3),HL/2,' 高量')COLORMAGENTA;
V1:=REF(今量,BARSCOUNT(C)-0);{开盘9:30分钟量能}
V5:=REF(今量,BARSCOUNT(C)-5);{开盘前5分钟量能}
V10:=REF(今量,BARSCOUNT(C)-10);{开盘前10分钟量能}
V15:=REF(今量,BARSCOUNT(C)-15);{开盘前15分钟量能}
V30:=REF(今量,BARSCOUNT(C)-30);{开盘前15分钟量能}
涨停:=分时引用.涨停1#DAY;
首次涨停:=BARSSINCE(H=涨停);
首次涨停前总量:=SUM(V,0)-SUM(V,首次涨停);
首停昨比:首次涨停前总量/昨量,COLORRED,NODRAW;{首次涨停量能与昨天量能比}
HS0:=STRCAT('9:25→',STRCAT(CON2STR(竞量*10000/FINANCE(46),2),''));
HS1:=STRCAT(' 9:30→',STRCAT(CON2STR(V1*10000/FINANCE(46),2),''));
HS2:=STRCAT(' 9:35→',STRCAT(CON2STR(V5*10000/FINANCE(46),2),''));
HS3:=STRCAT(' 9:40→',STRCAT(CON2STR(V10*10000/FINANCE(46),2),''));
HS4:=STRCAT(' 9:45→',STRCAT(CON2STR(V15*10000/FINANCE(46),2),''));
HS5:=STRCAT(' 10:00→',STRCAT(CON2STR(V30*10000/FINANCE(46),2),''));
HS6:=STRCAT(' 首停→',STRCAT(CON2STR(首次涨停前总量*10000/FINANCE(46),2),'%'));
换手Z:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(HS0,HS1),HS2),HS3),HS4),HS5);
DRAWTEXT_FIX(ISLASTBAR,0.0,0.0,0,STRCAT('换手Z(%):',换手Z)),COLORLIRED;
LB0:=STRCAT('9:25→',STRCAT(CON2STR(竞量/昨量,2),''));
LB1:=STRCAT(' 9:30→',STRCAT(CON2STR(V1/昨量,2),''));
LB2:=STRCAT(' 9:35→',STRCAT(CON2STR(V5/昨量,2),''));
LB3:=STRCAT(' 9:40→',STRCAT(CON2STR(V10/昨量,2),''));
LB4:=STRCAT(' 9:45→',STRCAT(CON2STR(V15/昨量,2),''));
LB5:=STRCAT(' 10:00→',STRCAT(CON2STR(V30/昨量,2),''));
LB6:=STRCAT(' 首停→',STRCAT(CON2STR(首次涨停前总量/昨量,2),''));
LLB:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(LB0,LB1),LB2),LB3),LB4),LB5);
DRAWTEXT_FIX(ISLASTBAR,0.0,0.20,0,STRCAT('今昨量比:',LLB)),COLORLIBLUE;