Board logo

标题: [大智慧指标] [转载]新改编的大智慧MACD（源码）提示金叉背离界面清晰（源码 副图 贴图） [打印本页]
作者: 龙听    时间: 2018-10-9 16:55     标题: [转载]新改编的大智慧MACD（源码）提示金叉背离界面清晰（源码 副图 贴图）

007.png

公式源码如下：

  1. DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
  2. DEA:=EMA(DIF,9);
  3. MACD:2*(DIF-DEA),COLORSTICK;
  4. STICKLINE(MACD>0,MACD, 0, 0, 1),color0055cc;
  5. STICKLINE(MACD<0,MACD, 0, 0, 1),Colordddd00;
  6. STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,0.1,0),COLORYELLOW;
  7. DRAWICON(BARSTATUS=2 AND MACD>REF(MACD,1),HHV(MACD,35), 7),VALIGN2;
  8. DRAWICON(BARSTATUS=2 AND MACD<REF(MACD,1),HHV(MACD,35), 8),VALIGN1;
  9. PARTLINE(DIF,DIF>ref(DIF,1),RGB(255,50,0),DIF<ref(DIF,1),RGB(255,255,255)),LINETHICK2;
  10. PARTLINE(MACD,MACD>0,RGB(205,100,100),MACD<0,RGB(0,200,0)),COLORSTICK;
  11. VAR1:=HHV(DEA,60);
  12. VAR2:=LLV(DEA,100);
  13. VAR3:=DEA-(DIF-DEA);
  14. 上轨:IF(DIF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1);
  15. 下轨:IF(DIF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2);
  16. 主升:= DIF>0 AND DIF>DEA;
  17. FILLRGN(DIF,DEA,DIF>DEA,RGB(130,0,0),DIF<DEA,RGB(0,50,0));
  18. FILLRGN(DIF,DEA,主升,RGB(100,0,0));
  19. 低金:=CROSS(DIF,DEA) AND DIF<-0.1;
  20. STICKLINE(低金,0,-0.10,6,0),COLORYELLOW;
  21. DRAWTEXT(低金,-0.05,' 低金'),COLORYELLOW;
  22. JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
  23. 二金:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
  24. STICKLINE(二金,0,-0.10,6,0),ColorFF00FF;
  25. DRAWICON(二金,dea*1.04,13) ;
  26. DRAWTEXT(二金,-0.08,' 二金'),ColorFF00FF;
  27. A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
  28. 底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
  29. STICKLINE(底背离,0,0.13,6,0),Colorred;
  30. DRAWTEXT(底背离,dea,' 底背离'),Colorred;
  31. A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
  32. 顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);
  33. DRAWTEXT(顶背离,dea,' 顶背离'),Colorgreen;
  34. a1:=DIF<0 and DEA<0;
  35. a2:=a1>REF(a1,1);
  36. a3:=BARSLAST(a2);
  37. a4:=COUNT(DEA>0 and DIF>0,a3)=0;
  38. a5:=CROSS(DIF,DEA);{金叉}
  39. a6:=BARSLAST(a5);
  40. a7:=REF(a6,a6+1)+a6;
  41. a8:=(DiF+DEA)/2;
  42. a9:=(HIGH+LOW)/2;
  43. a10:=a5 and a7<a3 and a4 and a8>REF(a8,a7) and a9<REF(a9,a7) and macd>0;
  44. DRAWTEXT(a10,dif*0.95,'★'),COLORyellow;
复制代码


图片附件: 007.png (2018-10-9 16:55, 100.75 KB) / 下载次数 65
http://www.qhlt.cn/attachment.php?aid=4468&k=79ba12a26208b6679ed82b78587ef8c2&t=1716968891&sid=lFGOkG





欢迎光临 龙听期货论坛 (http://www.qhlt.cn/) Powered by Discuz! 7.2