当前位置:→ 公式网通达信公式 → 正文
  • 通达信突破重云主图指标源码

  • 相关简介:{筹码峰背景} DA1:=IF(130TOTALBARSCOUNT,TOTALBARSCOUNT,130); DA:=IF(CURRBARSCOUNTDA1,0,DA1); HI:=REFDATE(HHV(H,DA),DATE); LO:=REFDATE(LLV(L,DA),DATE); C1:=IF(CURRBARSCOUNT=DA,C,DRAWNULL); GZ:=EXP(LN(HI/LO)/10); LH1:=SUM(IF(C1=(HI/GZ),V,0),DA); LH2:=SUM(IF(

  • 文章来源:公式网 发布时间:2016-08-27浏览次数:下载次数:0

通达信突破重云主图指标源码

{筹码峰背景}
DA1:=IF(130>TOTALBARSCOUNT,TOTALBARSCOUNT,130);
 DA:=IF(CURRBARSCOUNT>DA1,0,DA1);
 HI:=REFDATE(HHV(H,DA),DATE);
 LO:=REFDATE(LLV(L,DA),DATE);
 C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);
 GZ:=EXP(LN(HI/LO)/10);
 LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);
 LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);
 LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);
 LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);
 LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);
 LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);
 LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);
 LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);
 LH9:=SUM(IF(C1>=(LO*GZ) AND C1  LH10:=SUM(IF(C1>=LO AND C1  L01:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;
 L02:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;
 L03:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;
 L04:=REFDATE(HHV(LH4,DA),DATE);
 L05:=REFDATE(HHV(LH5,DA),DATE);
 L06:=REFDATE(HHV(LH6,DA),DATE);
 L07:=REFDATE(HHV(LH7,DA),DATE);
 L08:=REFDATE(HHV(LH8,DA),DATE);
 L09:=REFDATE(HHV(LH9,DA),DATE);
 L10:=REFDATE(HHV(LH10,DA),DATE);
 SS:=(L01+L02+L03+L04+L05+L06+L07+L08+L09+L10);
 STICKLINE(CEILING(DA*L01/SS)*3>=CURRBARSCOUNT,HI*99/100,HI/GZ,9,0)COLOR2F2F2D,LINETHICK3;{COLOR3C3C3A}
 STICKLINE(CEILING(DA*L02/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*99/100,HI/POW(GZ,2),9,0)COLOR2F2F2D,LINETHICK3;
 STICKLINE(CEILING(DA*L03/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*99/100,HI/POW(GZ,3),9,0)COLOR2F2F2D,LINETHICK3;
 STICKLINE(CEILING(DA*L04/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*99/100,HI/POW(GZ,4),9,0)COLOR2F2F2D,LINETHICK3;
 STICKLINE(CEILING(DA*L05/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*99/100,HI/POW(GZ,5),9,0)COLOR2F2F2D,LINETHICK3;
 STICKLINE(CEILING(DA*L06/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*99/100,HI/POW(GZ,6),9,0)COLOR2F2F2D,LINETHICK3;
 STICKLINE(CEILING(DA*L07/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*99/100,HI/POW(GZ,7),9,0)COLOR2F2F2D,LINETHICK3;
 STICKLINE(CEILING(DA*L08/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*99/100,9,0)COLOR2F2F2D,LINETHICK3;
 STICKLINE(CEILING(DA*L09/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*99/100,9,0)COLOR2F2F2D,LINETHICK3;
 STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*99/100,9,0)COLOR2F2F2D,LINETHICK3;
 {DRAWKLINE(H,O,L,C);}
 {真实支撑压力主图}
W00:=COST(1);
 W10:=COST(10);
 W20:=COST(20);
 W30:=COST(30);
 W40:=COST(40);
 W50:=COST(50);
 W60:=COST(60);
 W70:=COST(70);
 W80:=COST(80);
 W90:=COST(90);
 W100:=COST(99);
 W5:=COST(5);
 W15:=COST(15);
 W25:=COST(25);
 W35:=COST(35);
 W45:=COST(45);
 W55:=COST(55);
 W65:=COST(65);
 W75:=COST(75);
 W85:=COST(85);
 W95:=COST(95);
 C5:=W5-W00;
 C10:=W10-W5;
 C15:=W15-W10;
 C20:=W20-W15;
 C25:=W25-W20;
 C30:=W30-W25;
 C35:=W35-W30;
 C40:=W40-W35;
 C45:=W45-W40;
 C50:=W50-W45;
 C55:=W55-W50;
 C60:=W60-W55;
 C65:=W65-W60;
 C70:=W70-W65;
 C75:=W75-W70;
 C80:=W80-W75;
 C85:=W85-W80;
 C90:=W90-W85;
 C95:=W95-W90;
 C100:=W100-W95;
 ZX:=MIN(C5,MIN(C10,MIN(C15,MIN(C20,MIN(C25,MIN(C30,MIN(C35,MIN(C40,MIN(C45,MIN(C50,MIN(C55,MIN(C60,MIN(C65,MIN(C70,MIN(C75,MIN(C80,MIN(C85,MIN(C90,MIN(C95,C100)))))))))))))))))));
 STICKLINE(ZX=C5,W00,W5,5,0),COLORFF8800;
 STICKLINE(ZX=C10,W10,W5,5,0),COLORFF8800;
 STICKLINE(ZX=C15,W15,W10,5,0),COLORFF8800;
 STICKLINE(ZX=C20,W20,W15,5,0),COLORFF8800;
 STICKLINE(ZX=C25,W25,W20,5,0),COLORFF8800;
 STICKLINE(ZX=C30,W30,W25,5,0),COLORFF8800;
 STICKLINE(ZX=C35,W35,W30,5,0),COLORFF8800;
 STICKLINE(ZX=C40,W40,W35,5,0),COLORFF8800;
 STICKLINE(ZX=C45,W45,W40,5,0),COLORFF8800;
 STICKLINE(ZX=C50,W50,W45,5,0),COLORFF8800;
 STICKLINE(ZX=C55,W55,W50,5,0),COLORFF8800;
 STICKLINE(ZX=C60,W60,W55,5,0),COLORFF8800;
 STICKLINE(ZX=C65,W65,W60,5,0),COLORFF8800;
 STICKLINE(ZX=C70,W70,W65,5,0),COLORFF8800;
 STICKLINE(ZX=C75,W75,W70,5,0),COLORFF8800;
 STICKLINE(ZX=C80,W80,W75,5,0),COLORFF8800;
 STICKLINE(ZX=C85,W85,W70,5,0),COLORFF8800;
 STICKLINE(ZX=C90,W90,W85,5,0),COLORFF8800;
 STICKLINE(ZX=C95,W95,W90,5,0),COLORFF8800;
 STICKLINE(ZX=C100,W100,W95,5,0),COLORFF8800;
筹宽:=W100-W00;
 J90:=W90-W60;
 J80:=W80-W50;
 J70:=W70-W40;
 J60:=W60-W30;
 J50:=W50-W20;
 J40:=W40-W10;
 J30:=W30-W00;
 STICKLINE(J90/筹宽<0.08,W90,W60,5,0),COLOR74D9A4;
 STICKLINE(J80/筹宽<0.08,W80,W50,5,0),COLOR74D9A4;
 STICKLINE(J70/筹宽<0.08,W70,W40,5,0),COLOR74D9A4;
 STICKLINE(J60/筹宽<0.08,W60,W30,5,0),COLOR74D9A4;
 STICKLINE(J50/筹宽<0.08,W50,W20,5,0),COLOR74D9A4;
 STICKLINE(J40/筹宽<0.08,W40,W10,5,0),COLOR74D9A4;
 JJ90:=W90-W70;
 JJ80:=W80-W60;
 JJ70:=W70-W50;
 JJ60:=W60-W40;
 JJ50:=W50-W30;
 JJ40:=W40-W20;
 JJ30:=W30-W10;
 STICKLINE(JJ90/筹宽<0.05,W90,W70,5,0),COLOR66FFFF;
 STICKLINE(JJ80/筹宽<0.05,W80,W60,5,0),COLOR66FFFF;
 STICKLINE(JJ70/筹宽<0.05,W70,W50,5,0),COLOR66FFFF;
 STICKLINE(JJ60/筹宽<0.05,W60,W40,5,0),COLOR66FFFF;
 STICKLINE(JJ50/筹宽<0.05,W50,W30,5,0),COLOR66FFFF;
 STICKLINE(JJ40/筹宽<0.05,W40,W20,5,0),COLOR66FFFF;
 STICKLINE(JJ30/筹宽<0.05,W30,W10,5,0),COLOR66FFFF;
 {彩色K线}
TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
 TYX4:=MA((C+L+O+H)/4,13);
 TYX5:=EMA((C+L+O+H)/4,21);
 {金黄色}
STICKLINE(CO,H,L,0,0),COLOR0022FF;
 {STICKLINE(CO,C,O,3,1),COLORRED;}
 STICKLINE(CO,C,O,3,0),COLOR0022FF;
 STICKLINE(CO,C,O,2,0),COLOR0055FF;
 STICKLINE(CO,C,O,1,0),COLOR0088FF;
 {深绿}
STICKLINE(C  STICKLINE(C  STICKLINE(C  STICKLINE(C  {蓝}
STICKLINE(C>TYX5 AND C  STICKLINE(C>TYX5 AND C  STICKLINE(C>TYX5 AND C  STICKLINE(C>TYX5 AND C  {黄}
STICKLINE(C>TYX5 AND C>O,H,L,0,0 ),COLOR00EEFF;
 STICKLINE(C>TYX5 AND C>O,C,O,3,0 ),COLOR00AAFF;
 STICKLINE(C>TYX5 AND C>O,C,O,2,0 ),COLOR00CCFF;
 STICKLINE(C>TYX5 AND C>O,C,O,1,0 ),COLOR00EEFF;
 {粉红}
STICKLINE(C>TYX4 AND C>O,H,L,0,0),COLORFF66AA;
 STICKLINE(C>TYX4 AND C>O,C,O,3,0 ),COLORFF11FF;
 STICKLINE(C>TYX4 AND C>O,C,O,2,0 ),COLORFF44FF;
 STICKLINE(C>TYX4 AND C>O,C,O,1,0 ),COLORFF66FF;
 {亮灰}
STICKLINE(C>TYX4 AND C  STICKLINE(C>TYX4 AND C  STICKLINE(C>TYX4 AND C  STICKLINE(C>TYX4 AND C  {深红}
STICKLINE(C>TYX3 AND C>O,H,L,0,0),COLOR0000DD;
 STICKLINE(C>TYX3 AND C>O,C,O,3,0),COLOR000099;
 STICKLINE(C>TYX3 AND C>O,C,O,2,0),COLOR0000BB;
 STICKLINE(C>TYX3 AND C>O,C,O,1,0),COLOR0000DD;
 {涨跌停K线}
STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1

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

通达信突破重云主图指标源码

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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