{喇叭战法} {主图指标}
n:=5;m:=3;
{drawgbklast(c > 0,'$rgb(60,60,60)$rgb(0,0,0)$0');
drawgbklast((("rsi.rsi2") > ("rsi.rsi3")) and (("rsi.rsi3") > (60.5)),'$rgb(0,0,0)$rgb(100,100,100)$1');}
var0:=((ema(c,5)) * 7 + (ema(c,10)) * 3) / 10;
var1:=if((year) >= (2025),0,1);
var2:=ema(ema(l,21) + (6.8) * (std(l,2)),55);
var3:=ema(((c / (var2)) * ((1.88) * c + l + o)) / (2.75),3);
var4:=(((var3) - (var2)) / (var2)) / 2;
var5:=(ema((var3) - ((var4) * (var3)),5)) * (var1);
黄金轨道:(if((var0) > (var5),var0,var5)) * (var1),linethick2,coloryellow;
上轨:if(((var5) < (var0)) and ((var5) < (c * (0.15))),(ema(c,300)) - (3 * (std(c,300))),var5),linethick2,coloryellow;
if((var5) > (var0),上轨,drawnull),color00ff00,linethick2;
开口xg:barslastcount(黄金轨道!=上轨)=1,nodraw;
drawicon(开口xg,min(上轨,黄金轨道)*0.96,11);
var6:=(ref(c,1)) * (0.95);
var7:=(ref(c,3)) * (0.875);
var8:=min(var6,var7);
var9:=((sma(max(c - (ref(c,1)),0),9,1)) / (sma(abs(c - (ref(c,1))),9,1))) * (100);
var10:=(((sma(max(c - (ref(c,1)),0),24,1)) / (sma(abs(c - (ref(c,1))),24,1))) * (100)) * (var1);
if((((var8) = (var6)) and ((var0) > (var5))) and ((var10) > (64.5)),上轨,drawnull),colorwhite,linethick2;
{stickline((var6) = (var8),c,o,2.5,0),colorblue;
stickline((var6) = (var8),h,l,0,0),colorblue;}
var11:=(ema(dma(((2.15) * c + l + h) / 4,(abs((((3.48) * c + h + l) / 4) - (ema(c,20)))) / (ema(c,20))),200)) * (0.968 + 15 / (100));
{drawtext(((cross((hhv(h,13)) - (((hhv(h,13)) - (llv(l,13))) * (0.382)),var5)) and (c > (var5))) and (h > (var11)),var5,'买入'),linethick2,colorwhite;}
var12:=ma(c,26) + 2 * (std(c,26));
var13:=((sma(max(c - (ref(c,1)),0),14,1)) / (sma(abs(c - (ref(c,1))),14,1))) * (100);
var14:=(ema(c,60) + ema(c,120) + ema(c,240) + ema(c,480)) / 4;
var15:=var14 + (1.91) * (std(var14,3));
var16:=(ema(var15,12)) * (1.23);
stickline((((var10) >= (64.5)) and ((var13) >= 65)) and ((ma(c,1)) > (var16)),c,o,3,0),colorred;
stickline((((var10) >= 65) and (c = o)) and ((ma(c,1)) > (var16)),c,o,3,0),colorred;
stickline((((var10) > 65) and ((var13) >= 65)) and ((ma(c,1)) > (var16)),h,l,0,0),colorred;
stickline(((((var10) >= (64.5)) and ((var13) >= 65)) and ((var13) > (var10))) and (c < 上轨),o,l,0,0),colorred;
stickline(((((var10) >= (64.5)) and ((var13) >= 65)) and ((var13) > (var10))) and (c < 上轨),c,h,0,0),colorred;
var17:=(ma(c,3) + ma(c,6) + ma(c,12) + ma(c,24)) / 4;
{var17 + 3 * (std(var17,10)),linethick3;}
if((var0) > (var5),var17 + 3 * (std(var17,10)),drawnull),colorff00ff,linethick1;
var18:=(((((((((sma(max(c - (ref(c,1)),0),24,1)) / (sma(abs(c - (ref(c,1))),24,1))) * (100)) > 65) and ((var0) > (ema(c,13)))) and ((ema(c,13)) > (ema(c,55)))) and ((var12) > (ref(var12,1)))) and (c > (ema((h + l + c) / 3,13)))) and ((ma(c,5)) > (ma(c,10)))) and ((cross(hhv(c,5),(ma(h,10)) * (1 + 5 / (100)))) and ((((c - (ref(c,1))) / (ref(c,1))) * (100)) > (6.5)));
drawtext((var18) > 0,l,'涨停追击'),linethick1,coloryellow;
var19:=(ema((c - (ref(c,1))) / (ref(c,3)),8)) * (100);
drawtext(((((((((c >= ((ref(c,1)) * (1.095))) and (c = o)) and (l < c)) and (c > (var5))) and ((var19) <= 6)) and ((var19) > 1)) > 0) and ((var9) > (var10))) and ((var9) > (64.5)),c,'t字战法'),coloryellow;
var20:=((((var10) >= (64.5)) and ((var13) >= 65)) and (c > (var16))) and (c > ((ma(h,30)) * (1 + 15 / (100))));
if(((((var0) > (var5)) and ((var20) > 0)) and ((var17 + 3 * (std(var17,10))) > (ref(var17 + 3 * (std(var17,10)),1)))) and ((var17 + 3 * (std(var17,10))) > (hhv(ma(c,5),60))),var17 + 3 * (std(var17,10)),drawnull),colorff00ff,linethick3;
{drawtext((((var6) = (var8)) and (c > (ma(c,20)))) and ((ma(c,5)) > (ma(c,20))),l,'反弹'),colorwhite;}
var22:=ema(ema(ema(ema(ema((c - (ref(c,1))) / (ref(c,3)),8),2),2),2),3);
{drawtext(filter(((cross(ema((c - (ref(c,1))) / (ref(c,3)),8),var22))) > 0,10),l,'抄底'),coloryellow;}
drawtext_fix(1,0,0.9,0,'所属板块:')color00ffff;
z1:=strcat(hyblock,' ');
z2:=strcat(z1,dyblock);
z3:=strcat(z2,' ');
drawtext_fix(islastbar,0.1,0.9,0,strcat(z3,gnblock)),color00ffff;
var23:=(ref((c - (ref(c,1))) / (ref(c,1)),1)) * (100);
stickline(((((c >= ((ref(c,1)) * (1.095))) and (c = o)) and (l < c)) and ((var19) > 1)) > 0,c,o,5,0),colorwhite;
stickline(((((c >= ((ref(c,1)) * (1.095))) and (c = o)) and (l < c)) and ((var19) > 1)) > 0,l,c,0,0),colorwhite;
stickline(cross(var9,21),o,c,4,1),colorwhite;
var24:=count((((c - (ref(c,1))) / (ref(c,1))) * (100)) > 8,120);
drawnumber_fix(currbarscount=1,0.145,0,0,var24),coloryellow;
drawtext_fix(currbarscount=1,0,0,0,'【股票活跃度】 '),coloryellow;
drawtext_fix(currbarscount=1,0.16,0,0,'级: '),coloryellow;
var25:=c * v;
var26:=ema(((ema(var25,3)) / (ema(v,3)) + (ema(var25,6)) / (ema(v,6)) + (ema(var25,12)) / (ema(v,12)) + (ema(var25,24)) / (ema(v,24))) / 4,13);
var27:=(1.06) * (var26);
drawtext(((((c - (ref(c,1))) / (ref(c,1))) * (100)) > (5.5)) and (cross((l / ((h + ref(c,1) + o) / 3)) * c,ema((ema(c,9)) * (1.14),5))),ema(l - (0.15),1),'▲'),colorf00ff0;
stickline((((((c - (ref(c,1))) / (ref(c,1))) * (100)) > (8.5)) and (cross(ma(c,1),(ema(h,10)) * (1 + 5 / (100))))) and (cross(ma(c,1),var27)),(l + h + o) / 3,o,3,0),colorred;
stickline((((((c - (ref(c,1))) / (ref(c,1))) * (100)) > (8.5)) and (cross(ma(c,1),(ema(h,10)) * (1 + 5 / (100))))) and (cross(ma(c,1),var27)),(l + h + o) / 3,c,3,0),colorff0099;
var28:=((c - (llv(l,9))) / ((hhv(h,9)) - (llv(l,9)))) * (100);
var29:=sma(var28,3,1);
var30:=sma(var29,3,1);
var31:=(3 * (var29)) - (2 * (var30));
var32:=((h - l) / (ref(c,1))) * (100);
var33:=((c - o) / (ref(c,1))) * (100);
var34:=((o - l) / (ref(c,1))) * (100);
var35:=((h - c) / (ref(c,1))) * (100);
var36:=(var32) / (1.5);
stickline(((((((var32) > 7) and ((var36) > (4.5))) and ((var35) < (5.5))) and ((var35) < (var34))) and (between(var33,-2.5,2.5))) and ((var31) < (100)),o,h,0,0),colorred;
stickline(((((((var32) > 7) and ((var36) > (4.5))) and ((var35) < (5.5))) and ((var35) < (var34))) and (between(var33,-2.5,2.5))) and ((var31) < (100)),o,c,3.5,0),colorred;
stickline(((((((var32) > 7) and ((var36) > (4.5))) and ((var35) < (5.5))) and ((var35) < (var34))) and (between(var33,-2.5,2.5))) and ((var31) < (100)),c,l,0,0),colorf00ff0;
drawtext(((((var32) > 2) and ((var34) > (var33))) and (h = c)) and (((((((c >= ((ref(c,1)) * (1.095))) and (l < c)) and ((var19) <= 6)) and ((var19) > 1)) and ((var9) > (var10))) and ((var9) > 64)) > 0),l,'锤法→'),coloryellow;
stickline((((((ref(((c - (ref(c,1))) / (ref(c,1))) * (100),1)) < -4) and ((ref(var32,1)) > 5)) and (o > (ref(c,1)))) and ((((c - (ref(c,1))) / (ref(c,1))) * (100)) > 3)) and (o < (ref(o,1))),c,c,5,0),coloryellow;
stickline((((((ref(((c - (ref(c,1))) / (ref(c,1))) * (100),1)) < -4) and ((ref(var32,1)) > 5)) and (o > (ref(c,1)))) and ((((c - (ref(c,1))) / (ref(c,1))) * (100)) > 3)) and (o < (ref(o,1))),o,o,5,0),coloryellow;
stickline((((((ref(((c - (ref(c,1))) / (ref(c,1))) * (100),1)) < -4) and ((ref(var32,1)) > 5)) and (o > (ref(c,1)))) and ((((c - (ref(c,1))) / (ref(c,1))) * (100)) > 3)) and (o < (ref(o,1))),l,o,0,0),coloryellow;
stickline((((((ref(((c - (ref(c,1))) / (ref(c,1))) * (100),1)) < -4) and ((ref(var32,1)) > 5)) and (o > (ref(c,1)))) and ((((c - (ref(c,1))) / (ref(c,1))) * (100)) > 3)) and (o < (ref(o,1))),c,o,3,0),coloryellow;
{drawtext(cross(cost(95),ema(cost(95),10)),cost(95),'异'),colorgreen;}
压线:hhv(ma(c,n),60),colorgreen;
大压线:hhv(ma(h,m),120),colorgreen;
if((大压线) > (ref(大压线,1)),大压线,drawnull),coloryellow,linethick1;
if(c > 压线,压线,drawnull),color00ffff,linethick1;
drawnumber_fix(currbarscount=1,0.145,0.1,0,var19),coloryellow;
drawtext_fix(currbarscount=1,0,0.1,0,'【强度关注2级以上】 '),coloryellow;
drawtext_fix(currbarscount=1,0.2,0.1,0,'级: '),coloryellow;
天界:(ema(h,11)) * (1 + (5.2) / (100)),nodraw;
var37:=((l + h) / 2);
var38:=(ema((o + c + l + h) / 4,1));
var39:=(ema((c + l + h) / 3,1));
stickline((((((((var10) > (64.5)) and (c > (ma(c,5)))) and ((var17 + 3 * (std(var17,10))) > (ref(var17 + 3 * (std(var17,10)),1)))) and (c > (var17 + 3 * (std(var17,10))))) and (c > (var5))) and ((var18) > 0)) and ((v >= ((ref(v,1)) * 2)) or (v >= ((ref(v,3)) * 4))),var39,c,3,0),coloryellow;
stickline((((((((var10) > (64.5)) and (c > (ma(c,5)))) and ((var17 + 3 * (std(var17,10))) > (ref(var17 + 3 * (std(var17,10)),1)))) and (c > (var17 + 3 * (std(var17,10))))) and (c > (var5))) and ((var18) > 0)) and ((v >= ((ref(v,1)) * 2)) or (v >= ((ref(v,3)) * 4))),var37,o,3,0),colorred;
stickline((((((((var10) > (64.5)) and (c > (ma(c,5)))) and ((var17 + 3 * (std(var17,10))) > (ref(var17 + 3 * (std(var17,10)),1)))) and (c > (var17 + 3 * (std(var17,10))))) and (c > (var5))) and ((var18) > 0)) and ((v >= ((ref(v,1)) * 2)) or (v >= ((ref(v,3)) * 4))),var39,var37,3,0),colorblue;
stickline((((((((var10) > (64.5)) and (c > (ma(c,5)))) and ((var17 + 3 * (std(var17,10))) > (ref(var17 + 3 * (std(var17,10)),1)))) and (c > (var17 + 3 * (std(var17,10))))) and (c > (var5))) and ((var18) > 0)) and (v < ((ref(v,1)) * 2)),var37,c,3,0),coloryellow;
stickline(((((var10) >= (64.5)) and ((var13) >= 65)) and ((ma(c,1)) > (var16))) and ((ma(c,1)) > ((ma(h,30)) * (1 + 15 / (100)))),o,(var37 + l) / 2,3,0),coloryellow;
stickline(((((var10) >= (64.5)) and ((var13) >= 65)) and ((ma(c,1)) > (var16))) and ((ma(c,1)) > ((ma(h,30)) * (1 + 15 / (100)))),l,(var37 + l) / 2,0,0),coloryellow;
{drawtext((((c / l) > (1.05)) and ((var23) < -5)) and (c > (黄金轨道)),var39,'包'),linethick2,colorwhite;}
stickline(((c > ((ma(h,30)) * (1 + 18 / (100)))) and (c > (var5))) and ((var10) > (64.5)),var39,var37,3,0),colorwhite;
{波段买卖}
{n:10,ffd值到2时候大多为压力位,牛股除外}
ffd:=ema((c - ref(c,1)) / ref(c,3),10) * 100;
kjhu:=ema(ema(ema(ema(ffd,2),2),2),3);
kjhu1:=ema(kjhu,4);
a1:=sma(max(c - ref(c,1),0),24,1) / sma(abs(c - ref(c,1)),24,1) * 100;
{龙头启动:(a1 > 65) * (a1 - 65) / 10 + 2,nodraw;}
vara1:=close-low;
vara2:=high-low;
vara3:=close-high;
vara4:=if(high>low,(vara1/vara2+vara3/vara2)*vol,0);
cyw1:=sum(vara4,4)/100000, colorstick;
控盘度:=cyw1 / 10,colorstick,linethick2,colorred;
{stickline(kjhu >= ref(kjhu,1),kjhu,kjhu * 1.2,2,0),colorred;
stickline(kjhu < ref(kjhu,1) and kjhu > ema(kjhu,4),kjhu,kjhu * 1.2,1,0),color00bbff;
stickline(kjhu < ref(kjhu,1) and kjhu < ema(kjhu,4),kjhu,kjhu * 1.2,2,0),colorgreen;}
drawicon(barslastcount(kjhu >= ref(kjhu,1))=1,l*0.93,7);
drawicon(kjhu < ref(kjhu,1) and kjhu > ema(kjhu,4),h*1.03,8);
{0,pointdot,linethick2,colorgray;}
{1.5,pointdot,colorgray;}
{drawicon(cross(ffd,2),2,7);}
{cross(ffd,kjhu1);}
a2:=(c - ref(c,1)) / ref(c,1) * 100;
a3:=count(a2 > 8,120);
{drawnumber_fix(currbarscount=1,0.145,0,0,a3),coloryellow;
drawtext_fix(currbarscount=1,0,0,0,'【关注级别大的股票】 '),coloryellow;
drawtext_fix(currbarscount=1,0.16,0,0,'级: '),coloryellow;}
na:=14;maa:=6;
tr1 := sma(max(max(high-low,abs(high-ref(close,1))),abs(low-ref(close,1))),na,1);
hd := high-ref(high,1);
ld := ref(low,1)-low;
dmp:= sma(if(hd>0 and hd>ld,hd,0),na,1);
dmm:= sma(if(ld>0 and ld>hd,ld,0),na,1);
pdi:=dmp*100/tr1;
mdi:=dmm*100/tr1;
adx:=sma(abs(mdi-pdi)/(mdi+pdi)*100,na,1);
adxr:=(adx+ref(adx,maa))/2;
{if(pdi > mdi,2,drawnull),color00c800,linethick4;
if(mdi>pdi,2,drawnull),color64ff00,linethick4;}
{if(pdi > mdi and adx > adxr and mdi < 20,2,drawnull),color7850ff,linethick4;}
a4:=(ma(c,3) + ma(c,6) + ma(c,12) + ma(c,24)) / 4;
a5:=a4 + 3 * std(a4,10);
a6:=ema(hhv(c,21),21);
{stickline(filter(cross(ema(c,3),a6) and c > a5 and ma(c,5) > ma(c,10),13),1.5,0,1,0),colormagenta;}
{drawtext(filter(cross(ema(c,3),a6) and c > a5 and ma(c,5) > ma(c,10),13),0.2,'小黑马↗'),linethick1,coloryellow;}
{drawtext(filter(barslastcount(龙头启动>2)=1 and ffd > 1.9,5),6,'龙'),coloryellow;
drawtext(filter(barslastcount(龙头启动>2)=1 and ffd > 1.9,5),4,'头'),coloryellow;
drawtext(filter(barslastcount(龙头启动>2)=1 and ffd > 1.9,5),1.5,'股'),coloryellow;};
上一指标公式:一个点选股 通达信选股
下一指标公式:鱼网兜鱼整合版 副图 通达信整合源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文喇叭口战法 通达信喇叭口仅供学习研究。