通达信喇叭漏斗开口主副图指标 配合龙虎榜抓妖 源码附图

{喇叭漏斗开口源码如下}
{雨淋漏斗}
未分配:=STRCAT(STRCAT('未分配: ',CON2STR(FINANCE(32),2)),'元');
公积金:=STRCAT(STRCAT('公积金: ',CON2STR(FINANCE(18),2)),'元');
DRAWTEXT_FIX(ISLASTBAR,0.01,0.1,0,未分配),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.15,0,公积金),COLORCYAN;
所属板块:=STRCAT('【概念】 ',GNBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.9,1,1,所属板块),COLORMAGENTA;
所属地域:DRAWTEXT_FIX(ISLASTBAR ,0.78,0,1,DYBLOCK),COLORYELLOW;
所属行业:DRAWTEXT_FIX(ISLASTBAR ,0.91,0,1,HYBLOCK),COLORYELLOW;
VAR1:=REF(CLOSE,1)*1.1-CLOSE<0.01 AND HIGH=CLOSE;
STICKLINE(VAR1,CLOSE,OPEN,1,0),COLORYELLOW;
VAR2:=5;
VAR3:=3;
VAR4:=(EMA(CLOSE,5)*7+EMA(CLOSE,10)*3)/10;
VAR5:=IF(YEAR>=2025,0,1);
VAR6:=EMA(EMA(LOW,21)+6.8*STD(LOW,2),55);
VAR7:=EMA(CLOSE/VAR6*(1.88*CLOSE+LOW+OPEN)/2.75,3);
VAR8:=(VAR7-VAR6)/VAR6/2;
VAR9:=EMA(VAR7-VAR8*VAR7,5)*VAR5;
VAR10:=EMA(CLOSE,300)-3*STD(CLOSE,300);
漏斗下:IF(VAR4>VAR9,VAR4,VAR9)*VAR5,COLORYELLOW,LINETHICK2;
漏斗上:IF(VAR9<VAR4 AND VAR9<CLOSE*0.15,EMA(CLOSE,300)-3*STD(CLOSE,300),VAR9),COLORYELLOW,LINETHICK2;
IF(VAR9>VAR4,漏斗上,DRAWNULL),COLORGREEN,LINETHICK2;
开口XG:BARSLASTCOUNT(漏斗下!=漏斗上)=1,NODRAW;
DRAWICON(开口XG,MIN(漏斗上,漏斗下)*0.96,11);
DRAWTEXT(开口XG,LOW,71),COLORYELLOW;



{喇叭漏斗量能源码如下}

{雨淋量能}
A01:=(WINNER((CLOSE*1))*100.000);
A02:=(WINNER((CLOSE*1.1))*100.000);
A03:=(WINNER((CLOSE*0.9))*100.000);
A04:=MA(A03,5);
A06:=(100-MA(A02,5));
{STICKLINE(1,A06,MA(A02,5),2,1),COLORGREEN;}
A08:=(MA(A02,5)-MA(A03,5));
{STICKLINE(1,A04,MA(A02,5),2,1),COLORYELLOW;}
A0A:=(((((HHV(A04,15)-A03)/A03)*100)>30) AND (HHV(A04,15)>50));
STICKLINE(A0A,(0-2), 2, 2,1);
STICKLINE(NOT(A0A),(0-2), 2, 2,1),COLORBLUE;
STICKLINE(A03>REF(A03,1),0,A03, 2,0),COLORRED;
STICKLINE(A03<REF(A03,1),0,A03, 2,1),COLORRED;

原理解析：
{喇叭漏斗开口源码如下}{雨淋漏斗}未分配:=STRCAT(STRCAT('未分配: ',CON2STR(FINANCE(32),2)),'元')
公积金:=STRCAT(STRCAT('公积金: ',CON2STR(FINANCE(18),2)),'元')
当满足条件ISLASTBAR时,在横轴0.01纵轴0.1位置书写文字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.15位置书写文字
所属板块赋值:STRCAT('【概念】 ',GNBLOCK)
当满足条件ISLASTBAR时,在横轴0.9纵轴1位置书写文字
当满足条件ISLASTBAR 时,在横轴0.78纵轴0位置书写文字
当满足条件ISLASTBAR 时,在横轴0.91纵轴0位置书写文字
VAR1赋值:1日前的收盘价*1.1-收盘价<0.01 AND 最高价=收盘价
当满足条件VAR1时,在收盘价和开盘价之间画柱状线
VAR2赋值:5
VAR3赋值:3
VAR4赋值:(收盘价的5日指数移动平均*7+收盘价的10日指数移动平均*3)/10
如果YEAR>=2025返回0否则返回1
VAR6赋值:最低价的21日指数移动平均+6.8*最低价的2估算标准差,55)
VAR7赋值:EMA(收盘价/VAR6*(1.88*收盘价+最低价+开盘价)/2.75,3)
VAR8赋值:(VAR7-VAR6)/VAR6/2
VAR9赋值:VAR7-VAR8*VAR7的5日指数移动平均*VAR5
VAR10:=收盘价的300日指数移动平均-3*收盘价的300估算标准差
如果VAR4>VAR9返回VAR4否则返回VAR9
输出漏斗上:IF(VAR9如果VAR9>VAR4返回漏斗上否则返回DRAWNULL
输出开口XG:BARSLASTCOUNT(漏斗下!=漏斗上)=1,NODRAW
DRAWICON(开口XG,漏斗上和漏斗下的较小值*0.96,11)
当满足条件开口XG时,在最低价和71位置书写文字
{喇叭漏斗量能源码如下}{雨淋量能}A01赋值:((收盘价*1计算的获利盘比例)*100.000)
A02赋值:((收盘价*1.1计算的获利盘比例)*100.000)
A03赋值:((收盘价*0.9计算的获利盘比例)*100.000)
A04赋值:A03的5日简单移动平均
A06赋值:(100-A02的5日简单移动平均)
{STICKLINE(1,A06,A02的5日简单移动平均,2,1),画绿色
}A08赋值:(A02的5日简单移动平均-A03的5日简单移动平均)
{STICKLINE(1,A04,A02的5日简单移动平均,2,1),画黄色
}A0A赋值:(((((15日内A04最高值-A03)/A03)*100)>30) AND (15日内A04最高值>50))
STICKLINE(A0A,(0-2), 2, 2,1)
STICKLINE(NOT(A0A),(0-2), 2, 2,1), 画蓝色
STICKLINE(A03>1日前的A03,0,A03, 2,0),画红色
STICKLINE(A03<1日前的A03,0,A03, 2,1),画红色