Board logo

标题: [文华源码] 文华财经各种顶底背离主图源码 [打印本页]
作者: 龙听    时间: 2020-3-30 11:10     标题: 文华财经各种顶底背离主图源码

  1. DIFELSEF := EMA(CLOSE,12) - EMA(CLOSE,26);
  2. DEA:= EMA(DIFELSEF,9);
  3. LC := REF(CLOSE,1);
  4. RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
  5. RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
  6. RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
  7. K:=SMA(RSV,3,1);
  8. D:=SMA(K,3,1);
  9. J:=3*K-2*D;
  10. TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
  11. HD := HIGH-REF(HIGH,1);
  12. LD := REF(LOW,1)-LOW;
  13. PDM:= SUM(IFELSE(HD>0 && HD>LD,HD,0),14);
  14. MDM:= SUM(IFELSE(LD>0 && LD>HD,LD,0),14);
  15. PDI:= PDM*100/TR;
  16. MDI:= MDM*100/TR;
  17. A1:=BARSLAST(REF(CROSS(DIFELSEF,DEA),1));
  18. B1:=REF(CLOSE,A1+1)>CLOSE && REF(DIFELSEF,A1+1)
  19. <DIFELSEF && CROSS(DIFELSEF,DEA);
  20. A2:=BARSLAST(REF(CROSS(K,D),1));
  21. B2:=REF(CLOSE,A2+1)>CLOSE && REF(K,A2+1)<K && CROSS(K,D);
  22. A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
  23. B3:=REF(CLOSE,A3+1)>CLOSE && REF(RSI1,A3+1)
  24. <RSI1 && CROSS(RSI1,RSI2);
  25. C1:=BARSLAST(REF(CROSS(DEA,DIFELSEF),1));
  26. D1:=REF(CLOSE,C1+1)<CLOSE && REF(DIFELSEF,C1+1)
  27. >DIFELSEF && CROSS(DEA,DIFELSEF);
  28. C2:=BARSLAST(REF(CROSS(D,K),1));
  29. D2:=REF(CLOSE,C2+1)<CLOSE && REF(K,C2+1)>K && CROSS(D,K);
  30. C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
  31. D3:=REF(CLOSE,C3+1)<CLOSE && REF(RSI1,C3+1)
  32. >RSI1 && CROSS(RSI2,RSI1);
  33. C4:=BARSLAST(REF(CROSS(MDI,PDI),1));
  34. D4:=REF(CLOSE,C4+1)<CLOSE && REF(MDI,C4+1)>MDI && CROSS(MDI,PDI);
  35. A4:=BARSLAST(REF(CROSS(PDI,MDI),1));
  36. B4:=REF(CLOSE,A4+1)>CLOSE && REF(PDI,A4+1)<PDI && CROSS(PDI,MDI);
  37. STICKLINE(B4,LOW,LOW-0.06,COLORBLUE,0);
  38. DRAWTEXT(B4,LOW-20,'D底');
  39. PLAYSOUND(CROSSUP(B4,LOW),'F');
  40. STICKLINE(D4,HIGH,HIGH+0.06,COLORWHITE,0);
  41. DRAWTEXT(D4,HIGH+20,'D顶');
  42. PLAYSOUND(CROSSDOWN(D4,HIGH),'E');
  43. STICKLINE(B1,LOW,LOW-0.06,COLORGREEN,0);
  44. DRAWTEXT(B1,LOW-10,'M底');
  45. PLAYSOUND(CROSSUP(B1,LOW),'F');
  46. STICKLINE(B2,LOW,LOW-0.06,COLORYELLOW,0);
  47. DRAWTEXT(B2,LOW-6,'K底');
  48. PLAYSOUND(CROSSUP(B2,LOW),'F');
  49. STICKLINE(B3,LOW,LOW-0.04,COLORRED,0);
  50. DRAWTEXT(B3,LOW-16,'R底');
  51. PLAYSOUND(CROSSUP(B3,LOW),'F');
  52. STICKLINE(D1,HIGH,HIGH+0.06,COLORMAGENTA,0);
  53. DRAWTEXT(D1,HIGH+10,'M顶');
  54. PLAYSOUND(CROSSDOWN(D1,HIGH),'E');
  55. STICKLINE(D2,HIGH,HIGH+0.06,COLORLIGHTRED,0);
  56. DRAWTEXT(D2,HIGH+6,'K顶');
  57. PLAYSOUND(CROSSDOWN(D2,HIGH),'E');
  58. STICKLINE(D3,HIGH,HIGH+0.06,COLORLIGHTGREEN,0);
  59. DRAWTEXT(D3,HIGH+16,'R顶');
  60. PLAYSOUND(CROSSDOWN(D3,HIGH),'E');
  61. MA13:=MA(CLOSE,13),COLORWHITE;
  62. VLL:=CROSS(MA(CLOSE,13),MA(CLOSE,21));
  63. DRAWTEXT(VLL,MA13-10,'圆底');
  64. PLAYSOUND(CROSSUP(VLL,MA13),'F');
复制代码




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