成交量主集中度公式源码[通达信公式]

相关标签:

原理解析：
成交量赋值:成交量(手)/100,VOLSTICK VAR1赋值:成交量/((最高价-最低价)*2-收盘价-开盘价的绝对值) 输出主买:如果收阳线,返回VAR1*(最高价-最低价),否则返回如果收阴线,返回VAR1*((最高价-开盘价)+(收盘价-最低价)),否则返回成交量/2,NODRAW 输出主卖:如果收阳线,返回0-VAR1*((最高价-收盘价)+(开盘价-最低价)),否则返回如果收阴线,返回0-VAR1*(最高价-最低价),否则返回0-成交量/2,NODRAW 当满足条件成交量>0时,在成交量和0位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,画青色 当满足条件主买>0时,在0和主买位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,画红色 输出主持仓:100*(收盘价-34日内最低价的最低值)/(34日内最高价的最高值-34日内最低价的最低值)的3日指数移动平均,COLORFF00FF 输出主集中度:以收盘价计算的获利盘比例*100,画红色 输出散集中度: (以收盘价*1.1计算的获利盘比例-以收盘价*0.9计算的获利盘比例)*100,画绿色 地量赋值:成交量<14日内成交量的最低值*1.001 输出买卖差:(主买+主卖),NODRAW,画黄色 输出买卖比:(主买/主卖),NODRAW,画黄色 换手率赋值:成交量(手)/当前流通股本(手)*100 输出换手55:换手率的55日累和,NODRAW,画淡青色 输出买卖差55:买卖差的55日累和,NODRAW,画深灰色 输出量能饱和度:如果(成交额(元)/收盘价)/(20日内成交额(元)的最高值/20日内收盘价的最高值)>1,返回1,否则返回(成交额(元)/收盘价)/(20日内成交额(元)的最高值/20日内收盘价的最高值)*100,画黄色,NODRAW 中点赋值:日期日120日内买卖差的9日指数移动平均的最高值*2 当满足条件到最后交易的周期=19时,在中点*1.9和中点*1.5位置之间画柱状线,宽度为120,1不为0则画空心柱.,COLOR00DDDD 当满足条件收阳线的最后一日取值设为常数=1ANDCURRBARSCOUNT=19时,在中点*1.88和中点*1.52位置之间画柱状线,宽度为量能饱和度*1.2,0不为0则画空心柱.,COLOR0033FF 当满足条件收阳线的最后一日取值设为常数=1ANDCURRBARSCOUNT=19时,在中点*1.82和中点*1.58位置之间画柱状线,宽度为量能饱和度*1.2,0不为0则画空心柱.,COLOR0077FF 当满足条件收阳线的最后一日取值设为常数=1ANDCURRBARSCOUNT=19时,在中点*1.76和中点*1.64位置之间画柱状线,宽度为量能饱和度*1.2,0不为0则画空心柱.,COLOR0099FF 当满足条件收阳线的最后一日取值设为常数=1ANDCURRBARSCOUNT=19时,在中点*1.7和中点*1.7位置之间画柱状线,宽度为量能饱和度*1.2,0不为0则画空心柱.,COLOR00DDFF 当满足条件收阴线的最后一日取值设为常数=1ANDCURRBARSCOUNT=19时,在中点*1.88和中点*1.52位置之间画柱状线,宽度为量能饱和度*1.2,0不为0则画空心柱.,COLORFF7700 当满足条件收阴线的最后一日取值设为常数=1ANDCURRBARSCOUNT=19时,在中点*1.82和中点*1.58位置之间画柱状线,宽度为量能饱和度*1.2,0不为0则画空心柱.,COLORFF9900 当满足条件收阴线的最后一日取值设为常数=1ANDCURRBARSCOUNT=19时,在中点*1.76和中点*1.64位置之间画柱状线,宽度为量能饱和度*1.2,0不为0则画空心柱.,COLORFFBB00 当满足条件收阴线的最后一日取值设为常数=1ANDCURRBARSCOUNT=19时,在中点*1.71和中点*1.69位置之间画柱状线,宽度为量能饱和度*1.2,0不为0则画空心柱.,画青色 当满足条件到最后交易的周期=22时,在中点*2.3位置书写文字,画黄色 输出持股:如果步长为2极限值为20的10日抛物转向<=最低价,返回步长为2极限值为20的10日抛物转向,否则返回无效数,NODRAW,COLOR000099 V2赋值:如果到最后交易的周期=1,返回成交量*240/当前离开盘分钟数/1日前的成交量-1,否则返回成交量/1日前的成交量-1 当满足条件成交量>0时,在成交量和0位置之间画柱状线,宽度为2,1不为0则画空心柱.,画白色 当满足条件主买>成交量/2时,在0和成交量位置之间画柱状线,宽度为2,0不为0则画空心柱.,画黄色 当满足条件主买<=成交量/2时,在0和成交量位置之间画柱状线,宽度为2,0不为0则画空心柱.,画白色 当满足条件主买>0时,在0和主买位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色 当满足条件主卖<0时,在0和主卖位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00FF00 当满足条件地量>0时,在0和成交量位置之间画柱状线,宽度为1,0不为0则画空心柱.,画洋红色 当满足条件V2>=1时,在成交量和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色

 来源:程序化99（ WWW.CXH99.COM ）

源码：

成交量:=VOL/100,VOLSTICK;
VAR1:=成交量/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+ (CLOSE-LOW)),成交量/2)),NODRAW;
主卖:IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0- VAR1*(HIGH-LOW),0-成交量/2)),NODRAW;
STICKLINE(成交量>0,成交量,0,2.5,0),COLORCYAN;
STICKLINE(主买>0,0,主买,2.5,0),COLORRED;
主持仓:EMA(100*(CLOSE- LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;
主集中度:WINNER(C)*100,COLORRED;
散集中度: (WINNER(C*1.1)-WINNER(C*0.9))*100,COLORGREEN;
地量:=成交量<LLV(成交量,14)*1.001;
买卖差:(主买+主卖),NODRAW,COLORYELLOW;
买卖比:(主买/主卖),NODRAW,COLORYELLOW;
换手率:=VOL/CAPITAL*100;
换手55:SUM(换手率,55),NODRAW,COLORLICYAN;
买卖差55:SUM(买卖差,55),NODRAW,COLORGRAY;
量能饱和度:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))>1,1,(AMOUNT/C) /(HHV(AMOUNT,20)/HHV(C,20)))*100,COLORYELLOW,NODRAW;
中点:=REFDATE(HHV(EMA(买卖差,9),120),DATE)*2;
STICKLINE(CURRBARSCOUNT=19,中点*1.9,中点*1.5,120,1),COLOR00DDDD;
STICKLINE(CONST(C>O)=1 AND CURRBARSCOUNT=19,中点*1.88,中点*1.52,量能饱和度*1.2,0),COLOR0033FF;
STICKLINE(CONST(C>O)=1 AND CURRBARSCOUNT=19,中点*1.82,中点*1.58,量能饱和度*1.2,0),COLOR0077FF;
STICKLINE(CONST(C>O)=1 AND CURRBARSCOUNT=19,中点*1.76,中点*1.64,量能饱和度*1.2,0),COLOR0099FF;
STICKLINE(CONST(C>O)=1 AND CURRBARSCOUNT=19,中点*1.7,中点*1.7,量能饱和度*1.2,0),COLOR00DDFF;
STICKLINE(CONST(C<O)=1 AND CURRBARSCOUNT=19,中点*1.88,中点*1.52,量能饱和度*1.2,0),COLORFF7700;
STICKLINE(CONST(C<O)=1 AND CURRBARSCOUNT=19,中点*1.82,中点*1.58,量能饱和度*1.2,0),COLORFF9900;
STICKLINE(CONST(C<O)=1 AND CURRBARSCOUNT=19,中点*1.76,中点*1.64,量能饱和度*1.2,0),COLORFFBB00;
STICKLINE(CONST(C<O)=1 AND CURRBARSCOUNT=19,中点*1.71,中点*1.69,量能饱和度*1.2,0),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=22,中点*2.3,'量能饱和度'),COLORYELLOW;
持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),NODRAW,COLOR000099;
V2:=IF(CURRBARSCOUNT=1,成交量*240/FROMOPEN/REF(成交量,1)-1,成交量/REF(成交量,1)-1);
STICKLINE(成交量>0,成交量,0,2,1),COLORWHITE;
STICKLINE(主买>成交量/2,0,成交量,2,0),COLORYELLOW;
STICKLINE(主买<=成交量/2,0,成交量,2,0),COLORWHITE;
STICKLINE(主买>0,0,主买,2,0),COLORRED;
STICKLINE(主卖<0,0,主卖,2,0),COLOR00FF00;
STICKLINE(地量>0,0,成交量,1,0),COLORMAGENTA;
STICKLINE(V2>=1,成交量,0,1,0),COLORYELLOW;DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】