generated from LengKundee/UA6-9V_VL6-N9
279 lines
9.9 KiB
MQL5
279 lines
9.9 KiB
MQL5
//+------------------------------------------------------------------+
|
|
//| ATR Channels.mq5 |
|
|
//| Copyright 2025, matfx. |
|
|
//| https://theregulartrader.blogspot.com/ |
|
|
//| Converted the ATR Channel from ATR Channel indicator mql4|
|
|
//| Original version from Luis Guilherme Damiani|
|
|
//+------------------------------------------------------------------+
|
|
|
|
#property copyright "Copyright 2025, matfx."
|
|
#property link "https://theregulartrader.blogspot.com"
|
|
#property version "1.00"
|
|
#property description "ATR Channels"
|
|
|
|
#property indicator_chart_window
|
|
#property indicator_buffers 7
|
|
#property indicator_plots 7
|
|
#property indicator_type1 DRAW_LINE
|
|
#property indicator_color1 clrBlueViolet
|
|
#property indicator_type2 DRAW_LINE
|
|
#property indicator_color2 clrRoyalBlue
|
|
#property indicator_type3 DRAW_LINE
|
|
#property indicator_color3 clrDeepSkyBlue
|
|
#property indicator_type4 DRAW_LINE
|
|
#property indicator_color4 clrAqua
|
|
#property indicator_type5 DRAW_LINE
|
|
#property indicator_color5 clrDeepSkyBlue
|
|
#property indicator_type6 DRAW_LINE
|
|
#property indicator_color6 clrRoyalBlue
|
|
#property indicator_type7 DRAW_LINE
|
|
#property indicator_color7 clrBlueViolet
|
|
|
|
|
|
//--- labels
|
|
#property indicator_label1 "Upper Band3"
|
|
#property indicator_label2 "Upper Band2"
|
|
#property indicator_label3 "Upper Band1"
|
|
#property indicator_label4 "Middle Band"
|
|
#property indicator_label5 "Lower Band1"
|
|
#property indicator_label6 "Lower Band2"
|
|
#property indicator_label7 "Lower Band3"
|
|
|
|
//--- input parameters
|
|
input int InpSMAPeriod =49; // Period of SMA
|
|
input int InpATRPeriod =18; // Period of ATR
|
|
input double InpATRFactor1 =1.6; // ATR multiplier1
|
|
input double InpATRFactor2 = 3.2; // ATR multiplier2
|
|
input double InpATRFactor3 = 4.8; // ATR multiplier3
|
|
|
|
|
|
|
|
//--- global variables for parameters
|
|
int ExtSMAPeriod;
|
|
int ExtATRPeriod;
|
|
double ExtATRFactor1;
|
|
double ExtATRFactor2;
|
|
double ExtATRFactor3;
|
|
|
|
//--- indicator buffers
|
|
double ExtUpp3Buffer[];
|
|
double ExtUpp2Buffer[];
|
|
double ExtUpp1Buffer[];
|
|
double ExtSMABuffer[];
|
|
double ExtDwn1Buffer[];
|
|
double ExtDwn2Buffer[];
|
|
double ExtDwn3Buffer[];
|
|
|
|
//--- indicator handles
|
|
int ExtSMAHandle;
|
|
int ExtATRHandle;
|
|
|
|
//--- unique prefix to identify indicator objects
|
|
string ExtPrefixUniq;
|
|
int ExtPeriod;
|
|
//+------------------------------------------------------------------+
|
|
//| Custom indicator initialization function |
|
|
//+------------------------------------------------------------------+
|
|
int OnInit()
|
|
{
|
|
//--- check for input values
|
|
if(InpSMAPeriod<10)
|
|
{
|
|
ExtSMAPeriod=20;
|
|
PrintFormat("Incorrect value for input variable InpEMAPeriod=%d. Indicator will use value=%d for calculations.",
|
|
InpSMAPeriod, ExtSMAPeriod);
|
|
}
|
|
else
|
|
ExtSMAPeriod=InpSMAPeriod;
|
|
|
|
if(InpATRPeriod<3)
|
|
{
|
|
ExtATRPeriod=18;
|
|
PrintFormat("Incorrect value for input variable InpATRPeriod=%d. Indicator will use value=%d for calculations.",
|
|
InpATRPeriod, ExtATRPeriod);
|
|
}
|
|
else
|
|
ExtATRPeriod=InpATRPeriod;
|
|
|
|
if(InpATRFactor1<1.0)
|
|
{
|
|
ExtATRFactor1=1.6;
|
|
PrintFormat("Incorrect value for input variable InpBandsDeviations=%f. Indicator will use value=%f for calculations.",
|
|
InpATRFactor1, ExtATRFactor1);
|
|
}
|
|
else
|
|
ExtATRFactor1=InpATRFactor1;
|
|
|
|
if(InpATRFactor2<1.0)
|
|
{
|
|
ExtATRFactor2=3.2;
|
|
PrintFormat("Incorrect value for input variable InpBandsDeviations=%f. Indicator will use value=%f for calculations.",
|
|
InpATRFactor2, ExtATRFactor2);
|
|
}
|
|
else
|
|
ExtATRFactor2=InpATRFactor2;
|
|
|
|
if(InpATRFactor3<1.0)
|
|
{
|
|
ExtATRFactor3=4.8;
|
|
PrintFormat("Incorrect value for input variable InpBandsDeviations=%f. Indicator will use value=%f for calculations.",
|
|
InpATRFactor3, ExtATRFactor3);
|
|
}
|
|
else
|
|
ExtATRFactor3=InpATRFactor3;
|
|
|
|
|
|
|
|
//--- define buffers
|
|
SetIndexBuffer(0, ExtUpp3Buffer);
|
|
SetIndexBuffer(1, ExtUpp2Buffer);
|
|
SetIndexBuffer(2, ExtUpp1Buffer);
|
|
SetIndexBuffer(3, ExtSMABuffer);
|
|
SetIndexBuffer(4, ExtDwn1Buffer);
|
|
SetIndexBuffer(5, ExtDwn2Buffer);
|
|
SetIndexBuffer(6, ExtDwn3Buffer);
|
|
|
|
//--- indexes draw begin settings
|
|
PlotIndexSetInteger(0, PLOT_DRAW_BEGIN, InpSMAPeriod+1);
|
|
PlotIndexSetInteger(1, PLOT_DRAW_BEGIN, InpSMAPeriod+1);
|
|
PlotIndexSetInteger(2, PLOT_DRAW_BEGIN, InpSMAPeriod+1);
|
|
PlotIndexSetInteger(3, PLOT_DRAW_BEGIN, InpSMAPeriod+1);
|
|
PlotIndexSetInteger(4, PLOT_DRAW_BEGIN, InpSMAPeriod+1);
|
|
PlotIndexSetInteger(5, PLOT_DRAW_BEGIN, InpSMAPeriod+1);
|
|
PlotIndexSetInteger(6, PLOT_DRAW_BEGIN, InpSMAPeriod+1);
|
|
|
|
//--- set a 1-bar offset for each line
|
|
PlotIndexSetInteger(0, PLOT_SHIFT, 1);
|
|
PlotIndexSetInteger(1, PLOT_SHIFT, 1);
|
|
PlotIndexSetInteger(2, PLOT_SHIFT, 1);
|
|
PlotIndexSetInteger(3, PLOT_SHIFT, 1);
|
|
PlotIndexSetInteger(4, PLOT_SHIFT, 1);
|
|
PlotIndexSetInteger(5, PLOT_SHIFT, 1);
|
|
PlotIndexSetInteger(6, PLOT_SHIFT, 1);
|
|
|
|
//--- set drawing line empty value
|
|
PlotIndexSetDouble(0, PLOT_EMPTY_VALUE, 0.0);
|
|
PlotIndexSetDouble(1, PLOT_EMPTY_VALUE, 0.0);
|
|
PlotIndexSetDouble(2, PLOT_EMPTY_VALUE, 0.0);
|
|
PlotIndexSetDouble(3, PLOT_EMPTY_VALUE, 0.0);
|
|
PlotIndexSetDouble(4, PLOT_EMPTY_VALUE, 0.0);
|
|
PlotIndexSetDouble(5, PLOT_EMPTY_VALUE, 0.0);
|
|
PlotIndexSetDouble(6, PLOT_EMPTY_VALUE, 0.0);
|
|
|
|
//--- indicator name
|
|
IndicatorSetString(INDICATOR_SHORTNAME, "ATR Channels");
|
|
//--- number of digits of indicator value
|
|
IndicatorSetInteger(INDICATOR_DIGITS, _Digits);
|
|
|
|
//--- create indicators
|
|
ExtSMAHandle=iMA(NULL, 0, InpSMAPeriod, 0, MODE_LWMA, PRICE_CLOSE);
|
|
ExtATRHandle=iATR(NULL, 0, InpATRPeriod);
|
|
|
|
ExtPeriod=PeriodSeconds(_Period);
|
|
|
|
//--- prepare prefix for objects
|
|
string number=StringFormat("%I64d", GetTickCount64());
|
|
ExtPrefixUniq=StringSubstr(number, StringLen(number)-4);
|
|
ExtPrefixUniq=ExtPrefixUniq+"_KLT";
|
|
Print("Indicator \"ATR Channels\" started, prefix=", ExtPrefixUniq);
|
|
|
|
return(INIT_SUCCEEDED);
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//| Custom indicator iteration function |
|
|
//+------------------------------------------------------------------+
|
|
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 this is the first calculation of the indicator
|
|
if(prev_calculated==0)
|
|
{
|
|
//--- populate the beginning values, for which the indicator cannot be calculated, with empty values
|
|
ArrayFill(ExtUpp1Buffer, 0, rates_total, 0);
|
|
ArrayFill(ExtUpp2Buffer, 0, rates_total, 0);
|
|
ArrayFill(ExtUpp3Buffer, 0, rates_total, 0);
|
|
ArrayFill(ExtSMABuffer, 0, rates_total, 0);
|
|
ArrayFill(ExtDwn1Buffer, 0, rates_total, 0);
|
|
ArrayFill(ExtDwn2Buffer, 0, rates_total, 0);
|
|
ArrayFill(ExtDwn3Buffer, 0, rates_total, 0);
|
|
|
|
|
|
//--- get EMA values into the indicator buffer
|
|
if(CopyBuffer(ExtSMAHandle, 0, 0, rates_total, ExtSMABuffer)<0)
|
|
return(0);
|
|
|
|
//--- get ATR indicator values into a dynamic array
|
|
double atr[];
|
|
if(CopyBuffer(ExtATRHandle, 0, 0, rates_total, atr)<0)
|
|
return(0);
|
|
|
|
//--- shift from the beginning by the required number of bars
|
|
int start=MathMax(InpSMAPeriod, InpATRPeriod)+1;
|
|
|
|
//--- fill in the values of the upper and lower channel borders
|
|
for(int i=start; i<rates_total; i++)
|
|
{
|
|
ExtUpp3Buffer[i]=ExtSMABuffer[i]+InpATRFactor3*atr[i];
|
|
ExtUpp2Buffer[i]=ExtSMABuffer[i]+InpATRFactor2*atr[i];
|
|
ExtUpp1Buffer[i]=ExtSMABuffer[i]+InpATRFactor1*atr[i];
|
|
ExtDwn1Buffer[i]=ExtSMABuffer[i]-InpATRFactor1*atr[i];
|
|
ExtDwn2Buffer[i]=ExtSMABuffer[i]-InpATRFactor2*atr[i];
|
|
ExtDwn3Buffer[i]=ExtSMABuffer[i]-InpATRFactor3*atr[i];
|
|
}
|
|
|
|
//--- succesfully calculated
|
|
return(rates_total);
|
|
}
|
|
|
|
//--- if the indicator has previously been calculated, calculate values for the last 2 bars
|
|
int start=prev_calculated-2;
|
|
for(int i=start; i<rates_total; i++)
|
|
{
|
|
//--- for element-by-element copying from the indicator, use the reverse index
|
|
int reverse_index=rates_total-i;
|
|
|
|
//--- get indicator values
|
|
double sma[];
|
|
if(CopyBuffer(ExtSMAHandle, 0, reverse_index, 1, sma)<0)
|
|
return(prev_calculated);
|
|
double atr[];
|
|
if(CopyBuffer(ExtATRHandle, 0, reverse_index, 1, atr)<0)
|
|
return(prev_calculated);
|
|
|
|
//--- write values into buffers
|
|
ExtSMABuffer[i]=sma[0];
|
|
ExtUpp1Buffer[i]=sma[0]+InpATRFactor1*atr[0];
|
|
ExtUpp2Buffer[i]=sma[0]+InpATRFactor2*atr[0];
|
|
ExtUpp3Buffer[i]=sma[0]+InpATRFactor3*atr[0];
|
|
ExtDwn1Buffer[i]=sma[0]-InpATRFactor1*atr[0];
|
|
ExtDwn2Buffer[i]=sma[0]-InpATRFactor2*atr[0];
|
|
ExtDwn3Buffer[i]=sma[0]-InpATRFactor3*atr[0];
|
|
}
|
|
|
|
//--- draw labels on levels
|
|
|
|
|
|
//--- successfully calculated
|
|
return(rates_total);
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//| Custom indicator deinitialization function |
|
|
//+------------------------------------------------------------------+
|
|
void OnDeinit(const int reason)
|
|
{
|
|
//--- delete all our graphical objects after use
|
|
Print("Indicator \"ATR Channels\" stopped, delete all objects with prefix=", ExtPrefixUniq);
|
|
ObjectsDeleteAll(0, ExtPrefixUniq, 0, OBJ_ARROW_RIGHT_PRICE);
|
|
ChartRedraw(0);
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//| Show prices' levels |
|
|
//+------------------------------------------------------------------+
|