返回
外汇指标
HeikenAshi
回复:0  浏览:748
  • 楼主admin 圈主
  • 2019-05-05 05:02
QQ截图20180302114838.png

  1. //+------------------------------------------------------------------+
  2. //|                      HeikenAshi_with_Stoch_Crossing_Complete.mq4 |
  3. //|                                                           Feanor |
  4. //|                                                                  |
  5. //+------------------------------------------------------------------+
  6. #property copyright "Feanor"
  7. #property link      ""

  9. #property indicator_chart_window
  10. #property indicator_buffers 6
  11. #property indicator_color1 Green
  12. #property indicator_color2 Red
  13. #property indicator_color3 Red
  14. #property indicator_color4 Red
  15. #property indicator_color5 Red
  16. #property indicator_color6 Red

  18. extern string note1 = "Stochastic settings";
  19. extern string note2 = "default = Stoch(30,10,10)";
  20. extern int       KPeriod1     =  8;
  21. extern int       DPeriod1     =  3;
  22. extern int       Slowing1     =  3;
  23. extern string note3 = "0=sma, 1=ema, 2=smma, 3=lwma";
  24. extern int       MAMethod1    =   0;
  25. extern string note4 = "0=high/low, 1=close/close";
  26. extern int       PriceField1  =   0;
  27. extern string note4a = "--------------------------------------------";
  28. extern string note4b = "MA Filter";
  29. extern bool   MAFilterEnable    = true;
  30. extern string note4c = "0=sma, 1=ema, 2=smma, 3=lwma";
  31. extern int    MAFilterMethod    =  0;
  32. extern int    MAFilterPeriod    = 50;
  33. extern string note4d = "0=current tf, 5 = M5, 15 = M15, 60=H1, 240=H4, 1440=D1, 10080=W1";
  34. extern int    MAFilterTF        =  0;
  35. extern string note11 = "--------------------------------------------";
  36. extern string note12 = "turn on alert = true; turn off = false";
  37. extern bool alertOn = true;
  38. extern string note13 = "--------------------------------------------";
  39. extern string note14 = "send Email alert = true; turn off = false";
  40. extern bool SendAnEmail=false;

  42. //--- buffers
  43. double signalUp[];
  44. double signalDn[];
  45. double haBufOpen[];
  46. double haBufClose[];
  47. double haBufLow[];
  48. double haBufHigh[];

  50. int ExtCountedBars = 0;

  52. void init()
  53. {
  54.    SetIndexStyle(0, DRAW_ARROW);
  55.    SetIndexArrow(0, 217);
  56.    SetIndexBuffer(0, signalUp);
  57.    SetIndexEmptyValue(0, 0.0);
  58.    SetIndexLabel(0, "Buy Signal");
  59.    
  60.    SetIndexStyle(1, DRAW_ARROW);
  61.    SetIndexArrow(1, 218);
  62.    SetIndexBuffer(1, signalDn);
  63.    SetIndexEmptyValue(1, 0.0);
  64.    SetIndexLabel(1, "Sell Signal");
  65.    
  66.    SetIndexStyle(2, DRAW_NONE);
  67.    SetIndexBuffer(2, haBufOpen);
  68.    SetIndexLabel(2, "HA Open");
  69.    SetIndexStyle(3, DRAW_NONE);
  70.    SetIndexBuffer(3, haBufClose);
  71.    SetIndexLabel(3, "HA Close");
  72.    SetIndexStyle(4, DRAW_NONE);
  73.    SetIndexBuffer(4, haBufLow);
  74.    SetIndexLabel(4, "HA Low");
  75.    SetIndexStyle(5, DRAW_NONE);
  76.    SetIndexBuffer(5, haBufHigh);
  77.    SetIndexLabel(5, "HA High");
  78. }

  80. bool NewBar()
  81. {
  82.    static datetime lastbar;
  83.    datetime curbar = Time[0];
  84.    if ( lastbar == curbar)
  85.       return(false);

  87.    lastbar = curbar;
  88.    return(true);
  89. }   

  91. void start()
  92. {
  93.    if ( Bars <= 10 )
  94.        return;
  95.       
  96.    double haOpen, haHigh, haLow, haClose;
  97.    double stochastic1now, stochastic2now, stochastic1previous, stochastic2previous, stochastic1after, stochastic2after;
  98.    double Range, AvgRange;
  99.    double ma;

  101.    ExtCountedBars = IndicatorCounted();

  103.    if ( ExtCountedBars < 0 )
  104.       return;
  105.       
  106.    if ( ExtCountedBars > 0 )
  107.       ExtCountedBars--;
  108.    int pos = Bars - ExtCountedBars - 1;
  109.       
  110.    while ( pos >= 0 ) {
  111.       haOpen = (haBufOpen[pos+1] + haBufClose[pos+1]) / 2;
  112.       haClose = (Open[pos] + High[pos] + Low[pos] + Close[pos]) / 4;      
  113.       haHigh = MathMax(High[pos], MathMax(haOpen, haClose));
  114.       haLow = MathMin(Low[pos], MathMin(haOpen, haClose));

  116.       haBufOpen[pos] = haOpen;
  117.       haBufClose[pos] = haClose;
  118.       haBufHigh[pos] = haHigh;
  119.       haBufLow[pos] = haLow;

  121.       Range = 0;
  122.       AvgRange = 0;
  123.       int i;
  124.       for ( i = pos; i <= pos + 9; i++ ) {
  125.          AvgRange = AvgRange + MathAbs(High[i] - Low[i]);
  126.       }
  127.       Range = AvgRange / 10;
  128.       
  129.       i = pos;
  130.       stochastic1now = iStochastic(NULL, 0, KPeriod1, DPeriod1, Slowing1, MAMethod1, PriceField1, 0, i);
  131.       stochastic1previous = iStochastic(NULL, 0, KPeriod1, DPeriod1, Slowing1, MAMethod1, PriceField1, 0, i + 1);
  132.       stochastic1after = iStochastic(NULL, 0, KPeriod1, DPeriod1, Slowing1, MAMethod1, PriceField1, 0, i - 1);
  133.       stochastic2now = iStochastic(NULL, 0, KPeriod1, DPeriod1, Slowing1, MAMethod1, PriceField1, 1, i);
  134.       stochastic2previous = iStochastic(NULL, 0, KPeriod1, DPeriod1, Slowing1, MAMethod1, PriceField1, 1, i + 1);
  135.       stochastic2after = iStochastic(NULL, 0, KPeriod1, DPeriod1, Slowing1, MAMethod1, PriceField1, 1, i - 1);
  136.       
  137.       int ma_offset = i;
  138.       if ( MAFilterTF != 0 ) {
  139.          ma_offset = iBarShift(NULL, MAFilterTF, Time[i]);
  140.       }
  141.       
  142.       ma = iMA(NULL, MAFilterTF, MAFilterPeriod, 0, MAFilterMethod, PRICE_CLOSE, ma_offset);
  143.       
  144.       signalUp[i] = 0;
  145.       signalDn[i] = 0;
  146.       
  147.       if ( (stochastic1now > stochastic2now) && (stochastic1previous < stochastic2previous) && (stochastic1after > stochastic2after) ) {
  148.          if ( !MAFilterEnable || Low[i] > ma ) {
  149.             if ( haOpen < haClose ) {
  150.                signalUp[i] = Low[i] - Range*1.5;
  151.                if ( alertOn && NewBar() ) {
  152.                   alert("Swing HA/Stoch signal: Buy " + Symbol() + " [url=home.php?mod=space&uid=73392]@[/url] " + DoubleToStr(Bid, Digits));
  153.                }   
  154.                    }
  155.          }
  156.       }
  157.          
  158.       if ( (stochastic1now < stochastic2now) && (stochastic1previous > stochastic2previous) && (stochastic1after < stochastic2after) ) {
  159.          if ( !MAFilterEnable || High[i] < ma ) {
  160.             if ( haOpen > haClose ) {
  161.                signalDn[i] = High[i] + Range*1.5;
  162.                if ( alertOn && NewBar() ) {
  163.                   alert("Swing HA/Stoch signal: Sell " + Symbol() + " @ " + DoubleToStr(Bid, Digits));
  164.                }
  165.             }
  166.          }
  167.       }
  168.             
  169.            pos--;
  170.    }
  171. }
打赏