通达信主力建仓+吸筹副图指标 主力力度色块越多主力越强！源码
通达信主力建仓+吸筹副图指标 主力力度色块越多主力越强！源码
信号提示清晰，无未来函数。
主力力度，色块越多主力越强！
适用于通达信软件；
指标没有加密，可正常导入使用,有基础的可以继续优化；
指标为永久使用期；
VAR1:=REF(LOW,1);
VAR2:=SMA(ABS(LOW-VAR1),3,1)/SMA(MAX(LOW-VAR1,0),3,1)*100;
VAR3:=EMA(IF(CLOSE*1.2,VAR2*10,VAR2/10),3);
VAR4:=LLV(LOW,38);
VAR5:=HHV(VAR3,38);
VAR6:=IF(LLV(LOW,90),1,0);
VAR7:=EMA(IF(LOW<=VAR4,(VAR3+VAR5*2)/2,0),3)/618*VAR6;
VAR8:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
VAR9:=SMA(VAR8,13,8);
底线:0,COLOR00FFFF;
主力吸货:IF(VAR7>100,99+(VAR7)/100,VAR7),COLOR0000FF;
吸筹1:STICKLINE(VAR7,0,主力吸货,6,0),COLOR0000FF;
吸筹2:STICKLINE(VAR7,0,主力吸货,5,0),COLOR6600FF;
吸筹3:STICKLINE(VAR7,0,主力吸货,4,0),COLORBB00FF;
吸筹4:STICKLINE(VAR7,0,主力吸货,3,0),COLORFF00FF;
吸筹5:STICKLINE(VAR7,0,主力吸货,2,0),COLORFF33FF;
吸筹6:STICKLINE(VAR7,0,主力吸货,1,0),COLORFF66FF;
吸筹7:STICKLINE(VAR7,0,主力吸货,0,0),COLORFF99FF;
风险:CEILING(SMA(VAR9,13,8)),LINETHICK2,COLORGREEN;
涨跌:MA(3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*
SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1),3,1),5),LINETHICK2,COLORRED;
{主力抢筹}
VART1:=EMA(EMA(CLOSE,3),1);
控:=(VART1-REF(VART1,1))/REF(VART1,1)*1000;
控盘:=IF(控>30,控,0);
STICKLINE(控盘>REF(控盘,3) AND 控盘>120,120,0,3,0),COLORYELLOW;
STICKLINE(控盘>REF(控盘,3) AND 控盘>120,120,0,2.6,0),COLOR0000E5;
STICKLINE(控盘>REF(控盘,3) AND 控盘>120,120,0,2.4,0),COLOR335555;
STICKLINE(控盘>REF(控盘,3) AND 控盘>120,120,0,1.8,0),COLOR338888;
STICKLINE(控盘>REF(控盘,3) AND 控盘>120,120,0,1.2,0),COLOR33AAAA;
STICKLINE(控盘>REF(控盘,3) AND 控盘>120,120,0,0.6,0),COLOR33CCCC;
STICKLINE(控盘>REF(控盘,3) AND 控盘>120,120,0,0.3,0),COLOR33EEEE;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0 AND 控盘<120,控盘,0,3.5,0),COLOR000088;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0 AND 控盘<120,控盘,0,2.5,0),COLOR0000AA;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0 AND 控盘<120,控盘,0,1.5,0),COLOR0000CC;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0 AND 控盘<120,控盘,0,1,0),COLOR0000EE;
主力抢筹:IF(控盘>REF(控盘,3) AND 控盘>0,控盘,0),NODRAW,COLOR0000FF;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR008800;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR00AA00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00CC00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR00EE00;
对倒出货洗盘:IF(控盘<REF(控盘,3) AND 控盘>0,控盘,0),NODRAW,COLOR00FF00;
WY1001:=(2*CLOSE+HIGH+LOW)/4;
WY1002:=EMA(WY1001,4);
WY1003:=EMA(WY1002,4);
WY1004:=EMA(WY1003,4);
XYS0:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*100;
PJGJ:=AMOUNT/VOL/100;
SSRYDJX:=MA(PJGJ,13);
SSRCJL:=EMA(VOL,13);
SSRCJE:=EMA(AMOUNT,13);
SSRCBJX:=SSRCJE/SSRCJL/100;
CYS13:=(CLOSE-SSRCBJX)/SSRCBJX*100;
XYSHSL:=EMA(VOL/CAPITAL*100,13);
STICKLINE(XYSHSL>6.1 AND CYS13>5 ,20 ,0 ,1 ,0 ),COLORGREEN;
STICKLINE(XYSHSL>3.8 AND CYS13>5 ,15 ,0 ,1 ,0 ),COLORYELLOW;
STICKLINE(XYSHSL>2.1 AND CYS13>5 ,10 ,0 ,1,0 ),COLORCYAN;
STICKLINE(XYSHSL>1.8 AND CYS13>5 ,5 ,0 ,1 ,0 ),COLORBLUE;
80;
来函数检测结果如下：
该公式包含未来函数:CAPITAL
解密、定制、编写公式指标请联系QQ或微信同号：88652583
置顶指标
相关指标公式
VAR1赋值:1日前的最低价
VAR2赋值:最低价-VAR1的绝对值的3日[1日权重]移动平均/最低价-VAR1和0的较大值的3日[1日权重]移动平均*100
VAR3赋值:如果收盘价*1.2,返回VAR2*10,否则返回VAR2/10的3日指数移动平均
VAR4赋值:38日内最低价的最低值
VAR5赋值:38日内VAR3的最高值
VAR6赋值:如果90日内最低价的最低值,返回1,否则返回0
VAR7赋值:如果最低价<=VAR4,返回(VAR3+VAR5*2)/2,否则返回0的3日指数移动平均/618*VAR6
VAR8赋值:((收盘价-21日内最低价的最低值)/(21日内最高价的最高值-21日内最低价的最低值))*100
VAR9赋值:VAR8的13日[8日权重]移动平均
输出 底线:0,COLOR00FFFF
输出 主力吸货:如果VAR7>100,返回99+(VAR7)/100,否则返回VAR7,COLOR0000FF
输出 吸筹1:当满足条件VAR7时,在0和主力吸货位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR0000FF
输出 吸筹2:当满足条件VAR7时,在0和主力吸货位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR6600FF
输出 吸筹3:当满足条件VAR7时,在0和主力吸货位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORBB00FF
输出 吸筹4:当满足条件VAR7时,在0和主力吸货位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF00FF
输出 吸筹5:当满足条件VAR7时,在0和主力吸货位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF33FF
输出 吸筹6:当满足条件VAR7时,在0和主力吸货位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFF66FF
输出 吸筹7:当满足条件VAR7时,在0和主力吸货位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLORFF99FF
输出 风险:VAR9的13日[8日权重]移动平均的向上舍入,线宽为2,画绿色
输出 涨跌:3*(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*100的5日[1日权重]移动平均-2*(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*100的5日[1日权重]移动平均的3日[1日权重]移动平均的5日简单移动平均,线宽为2,画红色
VART1赋值:收盘价的3日指数移动平均的1日指数移动平均
控赋值:(VART1-1日前的VART1)/1日前的VART1*1000
控盘赋值:如果控>30,返回控,否则返回0
当满足条件控盘>3日前的控盘AND控盘>120时,在120和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,画黄色
当满足条件控盘>3日前的控盘AND控盘>120时,在120和0位置之间画柱状线,宽度为2.6,0不为0则画空心柱.,COLOR0000E5
当满足条件控盘>3日前的控盘AND控盘>120时,在120和0位置之间画柱状线,宽度为2.4,0不为0则画空心柱.,COLOR335555
当满足条件控盘>3日前的控盘AND控盘>120时,在120和0位置之间画柱状线,宽度为1.8,0不为0则画空心柱.,COLOR338888
当满足条件控盘>3日前的控盘AND控盘>120时,在120和0位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLOR33AAAA
当满足条件控盘>3日前的控盘AND控盘>120时,在120和0位置之间画柱状线,宽度为0.6,0不为0则画空心柱.,COLOR33CCCC
当满足条件控盘>3日前的控盘AND控盘>120时,在120和0位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLOR33EEEE
当满足条件控盘>3日前的控盘AND控盘>0AND控盘<120时,在控盘和0位置之间画柱状线,宽度为3.5,0不为0则画空心柱.,COLOR000088
当满足条件控盘>3日前的控盘AND控盘>0AND控盘<120时,在控盘和0位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLOR0000AA
当满足条件控盘>3日前的控盘AND控盘>0AND控盘<120时,在控盘和0位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR0000CC
当满足条件控盘>3日前的控盘AND控盘>0AND控盘<120时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000EE
输出主力抢筹:如果控盘>3日前的控盘AND控盘>0,返回控盘,否则返回0,NODRAW,COLOR0000FF
当满足条件控盘<3日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为3.5,0不为0则画空心柱.,COLOR008800
当满足条件控盘<3日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLOR00AA00
当满足条件控盘<3日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR00CC00
当满足条件控盘<3日前的控盘AND控盘>0时,在控盘和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00EE00
输出对倒出货洗盘:如果控盘<3日前的控盘AND控盘>0,返回控盘,否则返回0,NODRAW,COLOR00FF00
WY1001赋值:(2*收盘价+最高价+最低价)/4
WY1002赋值:WY1001的4日指数移动平均
WY1003赋值:WY1002的4日指数移动平均
WY1004赋值:WY1003的4日指数移动平均
XYS0赋值:(WY1004-1日前的WY1004)/1日前的WY1004*100
PJGJ赋值:成交额(元)/成交量(手)/100
SSRYDJX赋值:PJGJ的13日简单移动平均
SSRCJL赋值:成交量(手)的13日指数移动平均
SSRCJE赋值:成交额(元)的13日指数移动平均
SSRCBJX赋值:SSRCJE/SSRCJL/100
CYS13赋值:(收盘价-SSRCBJX)/SSRCBJX*100
XYSHSL赋值:成交量(手)/当前流通股本(手)*100的13日指数移动平均
当满足条件XYSHSL>6.1ANDCYS13>5时,在20和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画绿色
当满足条件XYSHSL>3.8ANDCYS13>5时,在15和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色
当满足条件XYSHSL>2.1ANDCYS13>5时,在10和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画青色
当满足条件XYSHSL>1.8ANDCYS13>5时,在5和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画蓝色
80
