当前位置:→ 股海网通达信公式 → 正文
  • 通达信箱体红绿灯主图源码

  • 相关简介:通达信箱体红绿灯主图源码 箱顶:PEAK(CLOSE,20,1)*0.98; 箱底:TROUGH(CLOSE,20,1)*1.02; 箱高:100*(箱顶-箱底)/箱底,NODRAW; {HLD} RSV:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100); K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=((3 * K) - (2 * D)); X1:=(((((3 * CLOSE) + HIGH

  • 文章来源:股海网作者:股海网发布时间:2012-11-06浏览次数:下载次数:0

通达信箱体红绿灯主图源码

 

箱顶:PEAK(CLOSE,20,1)*0.98;
 箱底:TROUGH(CLOSE,20,1)*1.02;
 箱高:100*(箱顶-箱底)/箱底,NODRAW;
 {HLD}
 RSV:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=((3 * K) - (2 * D));
 X1:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);
 X2:=EMA(X1,10);
 AA10:MA(CLOSE,8),COLORYELLOW ,NODRAW;
 RSV24:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
 K24:=SMA(RSV24,3,1);
 D24:=SMA(K24,3,1);
 J24:=((3 * K24) - (2 * D24));
 VARD:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);
 Ö§³Å:EMA(VARD,5),NODRAW;
 ¾ùÏß:MA(CLOSE,16),NODRAW;
 ×èµ²:=(SMA(HIGH,21,2) * 1.05);
 A:=(3*C+L+O+H)/6;
 B:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
 +7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
 REF(A,20))/210;
 {STICKLINE(B>REF(B,1),REF(B,1),B,4,0),COLORYELLOW;
 STICKLINE(B<=REF(B,1),REF(B,1),B,4,0),COLORGREEN;}
 MA3:=MA(C,3),NODRAW;
 MA13:=MA(C,13),COLORGREEN,NODRAW;
 IF(MA13>REF(MA13,1),MA13,DRAWNULL),COLORRED,NODRAW;
 IF(MA13<REF(MA13,1),MA13,DRAWNULL),COLORYELLOW,NODRAW;
 DRAWICON(C>MA3 AND C>MA13 AND MA13>REF(MA13,1)
 AND REF(C,1)<MA13,L*0.99,9);
 VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))),NODRAW;
 VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
 VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
 DIR1:=ABS(CLOSE-REF(CLOSE,5));
 VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);
 ER1:=DIR1/VIR1;
 CS1:=ER1*(0.8-2/8)+2/8;
 CQ1:=CS1*CS1;
 DIR2:=ABS(CLOSE-REF(CLOSE,10));
 VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
 ER2:=DIR2/VIR2;
 CS2:=ER2*(0.8-2/24)+2/24;
 CQ2:=CS2*CS2;
 STICKLINE(VAR2 < MA(VAR3,8),LOW,HIGH,0,1),COLORBLUE;
 STICKLINE(VAR2 > MA(VAR3,8),LOW,HIGH,0,1),COLORRED;
 STICKLINE(((OPEN>CLOSE)AND(VAR2<MA(VAR3,6))),(CLOSE-0.03),OPEN,3,0),COLORBLUE;
 STICKLINE(((OPEN<CLOSE)AND(VAR2<MA(VAR3,6))),CLOSE,OPEN,3,1),COLORBLUE;
 STICKLINE(((OPEN>CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,(CLOSE-0.03),3,0),COLORRED;
 STICKLINE(((OPEN<CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,CLOSE,3,1),COLORRED;
 DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.02)),7);
 DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.02)),8);
 MA30:EMA(CLOSE,30),COLORGREEN;

 

通达信箱体红绿灯主图源码

 

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

通达信箱体红绿灯主图源码

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

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

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