通达信箱体波段利器源码

阅读 作者:股海网时间 2012-03-18 通达信公式

通达信箱体波段利器源码

{来吧波段}
 【箱顶】:PEAK(CLOSE,10,1)*0.98,LINETHICK5;
 【箱底】:TROUGH(CLOSE,10,1)*1.02,LINETHICK5;
 【箱高】:100*(【箱顶】-【箱底】)/【箱底】,NODRAW;
 VAR1:=EMA(C,3);
 
VAR2:=EMA(C,5);
 
VAR3:=EMA(C,10);
 
VAR4:=EMA(C,20);
 
VAR5:=EMA(C,30);
 
VAR6:=(VAR2+VAR3+VAR4+VAR5)/4;
 
VAR7:=(VAR6-REF(VAR6,15))/REF(VAR6,15)*100;
 
VAR8:=(VAR6-REF(VAR6,15))/REF(VAR6, 15)*100;
 
VAR9:=EMA(VAR7,8);{股海网提供:www.guhai.com.cn}
 
STICKLINE(VAR7<1*REF(VAR7,1),H,L,0.5,0),COLORBLUE;{蓝-持币}
 
STICKLINE(VAR7<1*REF(VAR7,1),O,C,5, 1),COLORBLUE;
 
STICKLINE(VAR7>1*REF(VAR7,1),H,L,0.5,0),COLORRED;{红-持股}
 
STICKLINE(VAR7>1*REF(VAR7,1),O,C,5, 1),COLORRED;
 
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),H,L,0.5,0),COLORGREEN;{绿-洗盘}
 
STICKLINE(VAR7<1*REF(VAR7,1) AND VAR9>1*REF(VAR9,1),O,C,5, 1),COLORGREEN;
 
买进价:=((C-REF(MA(C,6),1))/6+MA(C,6))*1.004;
 
买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);
STICKLINE(买进条件,H,L,0.5,1),COLORWHITE,LINETHICK2;{白-买进}
STICKLINE(买进条件,O,C,6,0),COLORWHITE,LINETHICK2; 
加码价:=((C-REF(MA(C,18),1))/18+MA(C,18))*1.004; 
加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);
STICKLINE(加码条件,H,L,0.5,1),COLORYELLOW,LINETHICK2;{黄-加码}
STICKLINE(加码条件,O,C,6,0),COLORYELLOW,LINETHICK2;
V1:EMA(CLOSE,5);
V2:EMA(EMA(CLOSE,29)*1.01,10);
LC:=REF(CLOSE,1); 
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; 
逃 :IF(CROSS(84,RSI) , HIGH,HIGH+1),POINTDOT,LINETHICK7,COLORYELLOW ;HIGH+1,POINTDOT,LINETHICK7,COLOR000000; 
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); 
DEA:=EMA(DIFF,9); 
MACD:=2*(DIFF-DEA);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); 
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);
A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1)); 
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1)); 
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
 C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1)); {股海网提供:www.guhai.com.cn}
D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));
 D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));
 

通达信箱体波段利器源码

收藏
全部看法共 0 条
上传会员: 
股海网
上传时间: 
2012-03-18
下载积分: 
-
免责申明: 
请仔细阅读并同意后才能下载
本附件为用户分享上传,股海网没有对文件进行验证,不能保证下载资源的准确性、安全性和完整性,也不保证下载资源能正常安装和使用,且下载后扣除的积分无法退还,除非您充分理解并完全接受本声明,否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利,其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究,不得用于商业或非法用途,如有侵犯您的版权,请参看 《侵权处理流程》《免责声明条款》
点击下载无反应时,更换手机自带浏览器重登录操作,如华为浏览器,苹果Safari浏览器,第三方浏览器有不兼容现象,或先收藏再到电脑端下载。
同意以上声明才能下载,扣除积分无法退还!
我已知晓! 点我同意 所有条款自愿下载!
如有问题请点关闭提交问题反馈→
关闭

问题反馈 取消