88 lines
3.3 KiB
MQL5
88 lines
3.3 KiB
MQL5
//+------------------------------------------------------------------+
|
|
//| Fractals.mq5 |
|
|
//| Copyright 2000-2025, MetaQuotes Ltd. |
|
|
//| https://www.mql5.com |
|
|
//+------------------------------------------------------------------+
|
|
#property copyright "Copyright 2000-2025, MetaQuotes Ltd."
|
|
#property link "https://www.mql5.com"
|
|
//--- indicator settings
|
|
#property indicator_chart_window
|
|
#property indicator_buffers 2
|
|
#property indicator_plots 2
|
|
#property indicator_type1 DRAW_ARROW
|
|
#property indicator_type2 DRAW_ARROW
|
|
#property indicator_color1 clrGray
|
|
#property indicator_color2 clrGray
|
|
#property indicator_label1 "Fractal Up"
|
|
#property indicator_label2 "Fractal Down"
|
|
//--- indicator buffers
|
|
double ExtUpperBuffer[];
|
|
double ExtLowerBuffer[];
|
|
//--- 10 pixels upper from high price
|
|
int ExtArrowShift=-10;
|
|
//+------------------------------------------------------------------+
|
|
//| Custom indicator initialization function |
|
|
//+------------------------------------------------------------------+
|
|
void OnInit()
|
|
{
|
|
//--- indicator buffers mapping
|
|
SetIndexBuffer(0,ExtUpperBuffer,INDICATOR_DATA);
|
|
SetIndexBuffer(1,ExtLowerBuffer,INDICATOR_DATA);
|
|
IndicatorSetInteger(INDICATOR_DIGITS,_Digits);
|
|
//--- sets first bar from what index will be drawn
|
|
PlotIndexSetInteger(0,PLOT_ARROW,217);
|
|
PlotIndexSetInteger(1,PLOT_ARROW,218);
|
|
//--- arrow shifts when drawing
|
|
PlotIndexSetInteger(0,PLOT_ARROW_SHIFT,ExtArrowShift);
|
|
PlotIndexSetInteger(1,PLOT_ARROW_SHIFT,-ExtArrowShift);
|
|
//--- sets drawing line empty value--
|
|
PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,EMPTY_VALUE);
|
|
PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,EMPTY_VALUE);
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//| Fractals on 5 bars |
|
|
//+------------------------------------------------------------------+
|
|
int OnCalculate(const int rates_total,
|
|
const int prev_calculated,
|
|
const datetime &time[],
|
|
const double &open[],
|
|
const double &high[],
|
|
const double &low[],
|
|
const double &close[],
|
|
const long &tick_volume[],
|
|
const long &volume[],
|
|
const int &spread[])
|
|
{
|
|
if(rates_total<5)
|
|
return(0);
|
|
|
|
int start;
|
|
//--- clean up arrays
|
|
if(prev_calculated<7)
|
|
{
|
|
start=2;
|
|
ArrayInitialize(ExtUpperBuffer,EMPTY_VALUE);
|
|
ArrayInitialize(ExtLowerBuffer,EMPTY_VALUE);
|
|
}
|
|
else
|
|
start=rates_total-5;
|
|
//--- main cycle of calculations
|
|
for(int i=start; i<rates_total-3 && !IsStopped(); i++)
|
|
{
|
|
//--- Upper Fractal
|
|
if(high[i]>high[i+1] && high[i]>high[i+2] && high[i]>=high[i-1] && high[i]>=high[i-2])
|
|
ExtUpperBuffer[i]=high[i];
|
|
else
|
|
ExtUpperBuffer[i]=EMPTY_VALUE;
|
|
|
|
//--- Lower Fractal
|
|
if(low[i]<low[i+1] && low[i]<low[i+2] && low[i]<=low[i-1] && low[i]<=low[i-2])
|
|
ExtLowerBuffer[i]=low[i];
|
|
else
|
|
ExtLowerBuffer[i]=EMPTY_VALUE;
|
|
}
|
|
//--- OnCalculate done. Return new prev_calculated.
|
|
return(rates_total);
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|