切换到宽版

苏州团购


游戏大厅


道具中心
发帖 回复
返回列表
  • 400阅读
  • 0回复

[通达信]大智慧至尊版改的通信达MACD,求高手鉴赏 [复制链接]

 上一主题 下一主题
离线千古千寻
初中生
 

发帖
642
果果
1634
威望
471
贡献值
67
性别
只看楼主 倒序阅读 使用道具 0 发表于: 2011-11-23
其实还蛮好用滴，只要用熟练了一样稳赢！







    


复制代码
  1. DIFF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
  2. DEA:=EMA(DIFF,M);
  3. MACD2:=2*(DIFF-DEA);
  4. (CLOSE<0 AND CROSS(DIFF,0),H*1.3),COLOR000080,NODRAW;
  5. (CLOSE<0 AND CROSS(MACD2,0),H*1.3),COLOR000080,NODRAW;
  6. (CLOSE<0 AND CROSS(0,DIFF),H*1.3),COLOR808080,NODRAW;
  7. (CLOSE<0 AND CROSS(0,MACD2),H*1.3),COLOR808080,NODRAW;
  8. DU0:=CROSS(DIFF,0);
  9. UD0:=CROSS(0,DIFF);
  10. TDU0:=BARSLAST(DU0);
  11. TUD0:=BARSLAST(UD0);
  12. DU3:=REF(DU0,1);
  13. UD3:=REF(UD0,1);
  14. TDU3:=BARSLAST(DU3);
  15. TUD3:=BARSLAST(UD3);
  16. UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));
  17. JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
  18. JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
  19. JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
  20. JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
  21. JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
  22. JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
  23. JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
  24. JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
  25. BSLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MACD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1)))));
  26. STICKLINE(MACD2>=0,0,MACD2,2,1),COLOR0000FF;
  27. STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,2,0),COLOR0000FF;
  28. STICKLINE(MACD2<0,0,MACD2,2,0),COLORFFFF00;
  29. STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,2,1),COLORFFFF00;
  30. DIF:DIFF,LINETHICK2,COLOR0000FF;
  31. MACD:DEA,COLORFF0000;
  32. DEF:MACD2,LINETHICK0,COLORFFFF00;
  33. STICKLINE(CLOSE>0,0,0,2,0),COLOR808080;
  34. DEFUT:=BARSLAST(CROSS(MACD2,0));
  35. DEFDT:=BARSLAST(CROSS(0,MACD2));
  36. DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1));
  37. DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1));
  38. DEFU2L:=REF(DEFUL,DEFUT+1);
  39. DEFD2L:=REF(DEFDL,DEFDT+1);
  40. DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2,2);
  41. DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2,1);
  42. DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,5);
  43. DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,3);
  44. VAR111:=JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1);
  45. VAR112:=HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3);
------------------------  转载请注明来源，本帖地址：http://www.46798.cn/read-htm-tid-12332.html  ------------------------
评价一下你浏览此帖子的感受

精彩
感动
搞笑
开心
愤怒
无聊
灌水
 
长春论坛，长春人的网络家园！
回复
举报
分享到 淘江湖 新浪 QQ微博 QQ空间 开心 人人 豆瓣 网易微博 百度 鲜果 白社会 飞信
发帖 回复
返回列表