103 lines
4.3 KiB
MQL5
103 lines
4.3 KiB
MQL5
|
//+------------------------------------------------------------------+
|
||
|
|
//| TSIsCDiCust.mq5 |
|
||
|
|
//| Thorsten Fischer Copyright 2019-2020 |
|
||
|
|
//| https://mql5.tfsystem.de |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
#property copyright "Thorsten Fischer Copyright 2019-2020"
|
||
|
|
#property link "https://mql5.tfsystem.de"
|
||
|
|
#property version "1.00"
|
||
|
|
#property indicator_separate_window
|
||
|
|
#property indicator_buffers 4
|
||
|
|
#property indicator_plots 1
|
||
|
|
//--- plot TSIsCD
|
||
|
|
#property indicator_label1 "TSIsCD"
|
||
|
|
#property indicator_type1 DRAW_COLOR_HISTOGRAM
|
||
|
|
#property indicator_color1 clrGreen,clrRed
|
||
|
|
#property indicator_style1 STYLE_SOLID
|
||
|
|
#property indicator_width1 1
|
||
|
|
//--- plot Tsi
|
||
|
|
//#property indicator_label2 "Tsi"
|
||
|
|
//#property indicator_type2 DRAW_LINE
|
||
|
|
//#property indicator_color2 clrRed
|
||
|
|
//#property indicator_style2 STYLE_SOLID
|
||
|
|
//#property indicator_width2 1
|
||
|
|
//--- plot TsiSignal
|
||
|
|
//#property indicator_label3 "TsiSignal"
|
||
|
|
//#property indicator_type3 DRAW_LINE
|
||
|
|
//#property indicator_color3 clrRed
|
||
|
|
//#property indicator_style3 STYLE_SOLID
|
||
|
|
//#property indicator_width3 1
|
||
|
|
//--- input parameters
|
||
|
|
input int r=25;
|
||
|
|
input int s=13;
|
||
|
|
input int sp=5; // Smoothing period
|
||
|
|
input ENUM_MA_METHOD sm=MODE_EMA; // Smoothing type
|
||
|
|
int iHandle;
|
||
|
|
//--- indicator buffers
|
||
|
|
double TSIsCDBuffer[];
|
||
|
|
double TSIsCDColors[];
|
||
|
|
double TsiBuffer[];
|
||
|
|
double TsiSignalBuffer[];
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| Custom indicator initialization function |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
int OnInit()
|
||
|
|
{
|
||
|
|
//--- indicator buffers mapping
|
||
|
|
SetIndexBuffer(0,TSIsCDBuffer,INDICATOR_DATA);
|
||
|
|
SetIndexBuffer(1,TSIsCDColors,INDICATOR_COLOR_INDEX);
|
||
|
|
SetIndexBuffer(2,TsiBuffer,INDICATOR_CALCULATIONS);
|
||
|
|
SetIndexBuffer(3,TsiSignalBuffer,INDICATOR_CALCULATIONS);
|
||
|
|
iHandle=iMA(_Symbol,PERIOD_CURRENT,"Tendenz\\Moving Average");
|
||
|
|
Print(__FUNCTION__+" iHandle = "+(string)iHandle);
|
||
|
|
if(iHandle == INVALID_HANDLE) return(INIT_FAILED);
|
||
|
|
//---
|
||
|
|
return(INIT_SUCCEEDED);
|
||
|
|
}
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| Custom indicator iteration function |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
int OnCalculate(const int rates_total,
|
||
|
|
const int prev_calculated,
|
||
|
|
const int begin,
|
||
|
|
const double &price[])
|
||
|
|
{
|
||
|
|
//---
|
||
|
|
Print(__FUNCTION__+" rates_total = "+(string)rates_total);
|
||
|
|
Print(__FUNCTION__+" prev_calculated = "+(string)prev_calculated);
|
||
|
|
Print(__FUNCTION__+" begin = "+(string)begin);
|
||
|
|
Print(__FUNCTION__+" price = "+(string)price[0]);
|
||
|
|
static bool error=true;
|
||
|
|
int start;
|
||
|
|
if(prev_calculated==0) // First execution of the OnCalculate() function after the indicator start
|
||
|
|
{
|
||
|
|
error=true; // Set the value True for the indicator to be calculated for all bars
|
||
|
|
}
|
||
|
|
if(error) // If value of error=true, then it is the first execution of the function after
|
||
|
|
// the start of the indicator, or there was an error of copying of data at the previous start
|
||
|
|
{
|
||
|
|
start=begin+1;
|
||
|
|
error=false;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
start=prev_calculated-1;
|
||
|
|
}
|
||
|
|
|
||
|
|
if(CopyBuffer(iHandle,0,0,rates_total-start,TsiBuffer)==-1) // Copying data of main line of the indicator
|
||
|
|
{
|
||
|
|
error=true; // Failed to copy data, set the value True for the error variable to recalculate the whole
|
||
|
|
// indicator at the next call of OnCalculate()
|
||
|
|
return(0); // End working of the function
|
||
|
|
}
|
||
|
|
if(CopyBuffer(iHandle,1,0,rates_total-start,TsiSignalBuffer)==-1) // Copy data of the signal line of the indicator
|
||
|
|
{
|
||
|
|
error=true; // Failed to copy data, set the value true for the error variable to recalculate the whole
|
||
|
|
// indicator at the next call of the OnCalculate() function
|
||
|
|
return(0); // End working of the function
|
||
|
|
}
|
||
|
|
//--- return value of prev_calculated for next call
|
||
|
|
return(rates_total);
|
||
|
|
}
|
||
|
|
//+------------------------------------------------------------------+
|