当前位置:→ 公式网通达信公式 → 正文
  • 通达信喇叭口战法源码

  • 相关简介:{喇叭战法} {主图指标} 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); VA

  • 文章来源:公式网 发布时间:2018-07-17浏览次数:下载次数:0

{喇叭战法} {主图指标}
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)

 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

通达信喇叭口战法源码

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

上传会员: 
公式网
文件大小: 
Bytes
上传时间: 
2018-07-17
下载积分: 
-
免责声明: 
请仔细阅读并同意后才能下载
本附件为用户分享上传,公式网没有对文件进行验证,不能保证下载资源的准确性、安全性和完整性,也不保证下载资源能正常安装和使用,且下载后扣除的积分无法退还,除非您充分理解并完全接受本声明,否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利,其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究使用,不得用于商业或者非法用途,如有侵犯您的版权, 请参看 《公式网侵权处理流程》《公式网免责声明条款》
点击下载无反应时,更换主流浏览器重新登录操作,如360浏览器、Edge浏览器、谷歌浏览器,个别浏览器有不兼容现象。
勾选以下表示您已经阅读并同意以上声明才能下载本文件,扣除积分无法退还!
我已阅读所有条款规定, 请点我同意 所有条款内容!我自愿下载!
提示:如下载失败,请点关闭刷新此页面或提交问题反馈给管理员→
关闭

关于我们 - 联系我们 - 隐私政策 - 免责声明 - 下载帮助 - 广告合作 - SiteMap - TOP
增值电信业务经营ICP许可证:湘B2-20210269 湘ICP备09016573号-3 湘公网安备43108102000039号
Copyright © 2025 铭网科技,All Rights Reserved.