184 lines
7.8 KiB
Plaintext
184 lines
7.8 KiB
Plaintext
//+---------------------------------------------------------------------+
|
|
//| StochasticDiff.mq5 |
|
|
//| Copyright © 2009, DesO'Regan |
|
|
//| oregan_des@hotmail.com |
|
|
//+---------------------------------------------------------------------+
|
|
//| Äëÿ ðàáîòû èíäèêàòîðà ñëåäóåò ïîëîæèòü ôàéë SmoothAlgorithms.mqh |
|
|
//| â ïàïêó (äèðåêòîðèþ): êàòàëîã_äàííûõ_òåðìèíàëà\\MQL5\Include |
|
|
//+---------------------------------------------------------------------+
|
|
#property copyright "Copyright © 2009, DesO'Regan"
|
|
#property link "oregan_des@hotmail.com"
|
|
//---- íîìåð âåðñèè èíäèêàòîðà
|
|
#property version "1.00"
|
|
//---- îòðèñîâêà èíäèêàòîðà â îòäåëüíîì îêíå
|
|
#property indicator_separate_window
|
|
//---- êîëè÷åñòâî èíäèêàòîðíûõ áóôåðîâ 2
|
|
#property indicator_buffers 2
|
|
//---- èñïîëüçîâàíî äâà ãðàôè÷åñêèõ ïîñòðîåíèÿ
|
|
#property indicator_plots 1
|
|
//+----------------------------------------------+
|
|
//| îáúÿâëåíèå êîíñòàíò |
|
|
//+----------------------------------------------+
|
|
#define RESET 0 // Êîíñòàíòà äëÿ âîçâðàòà òåðìèíàëó êîìàíäû íà ïåðåñ÷¸ò èíäèêàòîðà
|
|
//+----------------------------------------------+
|
|
//| Ïàðàìåòðû îòðèñîâêè èíäèêàòîðà 1 |
|
|
//+----------------------------------------------+
|
|
//---- îòðèñîâêà èíäèêàòîðà â âèäå ãèñòîãðàììû
|
|
#property indicator_type1 DRAW_COLOR_HISTOGRAM
|
|
//---- â êà÷åñòâå öâåòîâ èíäèêàòîðà èñïîëüçîâàíû
|
|
#property indicator_color1 clrLime,clrDeepSkyBlue,clrGray,clrMagenta,clrRed
|
|
//---- ëèíèÿ èíäèêàòîðà - ñïëîøíàÿ
|
|
#property indicator_style1 STYLE_SOLID
|
|
//---- òîëùèíà ëèíèè èíäèêàòîðà ðàâíà 3
|
|
#property indicator_width1 3
|
|
//---- îòîáðàæåíèå ìåòêè èíäèêàòîðà
|
|
#property indicator_label1 "StochasticDiff"
|
|
//+----------------------------------------------+
|
|
//| Îïèñàíèå êëàññà CXMA |
|
|
//+----------------------------------------------+
|
|
#include <SmoothAlgorithms.mqh>
|
|
//+----------------------------------------------+
|
|
//---- îáúÿâëåíèå ïåðåìåííûõ êëàññà CXMA èç ôàéëà SmoothAlgorithms.mqh
|
|
CXMA XMA1;
|
|
//+----------------------------------------------+
|
|
//| îáúÿâëåíèå ïåðå÷èñëåíèé |
|
|
//+----------------------------------------------+
|
|
/*enum SmoothMethod - ïåðå÷èñëåíèå îáúÿâëåíî â ôàéëå SmoothAlgorithms.mqh
|
|
{
|
|
MODE_SMA_, //SMA
|
|
MODE_EMA_, //EMA
|
|
MODE_SMMA_, //SMMA
|
|
MODE_LWMA_, //LWMA
|
|
MODE_JJMA, //JJMA
|
|
MODE_JurX, //JurX
|
|
MODE_ParMA, //ParMA
|
|
MODE_T3, //T3
|
|
MODE_VIDYA, //VIDYA
|
|
MODE_AMA, //AMA
|
|
}; */
|
|
//+----------------------------------------------+
|
|
//| ÂÕÎÄÍÛÅ ÏÀÐÀÌÅÒÐÛ ÈÍÄÈÊÀÒÎÐÀ |
|
|
//+----------------------------------------------+
|
|
input int KPeriod=5;
|
|
input int DPeriod=3;
|
|
input int Slowing=3;
|
|
input ENUM_MA_METHOD iMA_Method=MODE_SMA;
|
|
input ENUM_STO_PRICE Price_field=STO_LOWHIGH;
|
|
input Smooth_Method XMA_Method=MODE_T3; //ìåòîä ñãëàæèâàíèÿ èíäèêàòîðà
|
|
input uint XLength=13; //ãëóáèíà ñãëàæèâàíèÿ
|
|
input int XPhase=15; //ïàðàìåòð ñãëàæèâàíèÿ,
|
|
//---- äëÿ JJMA èçìåíÿþùèéñÿ â ïðåäåëàõ -100 ... +100, âëèÿåò íà êà÷åñòâî ïåðåõîäíîãî ïðîöåññà;
|
|
//---- Äëÿ VIDIA ýòî ïåðèîä CMO, äëÿ AMA ýòî ïåðèîä ìåäëåííîé ñêîëüçÿùåé
|
|
input int Shift=0; //Ñäâèã èíäèêàòîðà ïî ãîðèçîíòàëè â áàðàõ
|
|
//+----------------------------------------------+
|
|
|
|
//---- Îáúÿâëåíèå öåëûõ ïåðåìåííûõ íà÷àëà îòñ÷¸òà äàííûõ
|
|
int min_rates_1,min_rates_total;
|
|
//---- îáúÿâëåíèå äèíàìè÷åñêèõ ìàññèâîâ, êîòîðûå áóäóò â
|
|
// äàëüíåéøåì èñïîëüçîâàíû â êà÷åñòâå èíäèêàòîðíûõ áóôåðîâ
|
|
double IndBuffer[],ColorBuffer[];
|
|
//---- Îáúÿâëåíèå öåëûõ ïåðåìåííûõ äëÿ õåíäëîâ èíäèêàòîðîâ
|
|
int Stochastic_Handle;
|
|
//+------------------------------------------------------------------+
|
|
//| Custom indicator initialization function |
|
|
//+------------------------------------------------------------------+
|
|
int OnInit()
|
|
{
|
|
//---- Èíèöèàëèçàöèÿ ïåðåìåííûõ íà÷àëà îòñ÷¸òà äàííûõ
|
|
min_rates_1=int(KPeriod+DPeriod+Slowing);
|
|
min_rates_total=min_rates_1+GetStartBars(XMA_Method,XLength,XPhase);
|
|
//---- ïîëó÷åíèå õåíäëà èíäèêàòîðà iStochastic
|
|
Stochastic_Handle=iStochastic(NULL,0,KPeriod,DPeriod,Slowing,iMA_Method,Price_field);
|
|
if(Stochastic_Handle==INVALID_HANDLE)
|
|
{
|
|
Print(" Íå óäàëîñü ïîëó÷èòü õåíäë èíäèêàòîðà iStochastic");
|
|
return(INIT_FAILED);
|
|
}
|
|
|
|
//---- ïðåâðàùåíèå äèíàìè÷åñêîãî ìàññèâà â èíäèêàòîðíûé áóôåð
|
|
SetIndexBuffer(0,IndBuffer,INDICATOR_DATA);
|
|
//---- îñóùåñòâëåíèå ñäâèãà íà÷àëà îòñ÷¸òà îòðèñîâêè èíäèêàòîðà
|
|
PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total);
|
|
//---- óñòàíîâêà çíà÷åíèé èíäèêàòîðà, êîòîðûå íå áóäóò âèäèìû íà ãðàôèêå
|
|
PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,EMPTY_VALUE);
|
|
//---- îñóùåñòâëåíèå ñäâèãà èíäèêàòîðà ïî ãîðèçîíòàëè íà InpKijun
|
|
PlotIndexSetInteger(0,PLOT_SHIFT,Shift);
|
|
//---- èíäåêñàöèÿ ýëåìåíòîâ â áóôåðå êàê â òàéìñåðèè
|
|
ArraySetAsSeries(IndBuffer,true);
|
|
|
|
//---- ïðåâðàùåíèå äèíàìè÷åñêîãî ìàññèâà â öâåòîâîé, èíäåêñíûé áóôåð
|
|
SetIndexBuffer(1,ColorBuffer,INDICATOR_COLOR_INDEX);
|
|
//---- èíäåêñàöèÿ ýëåìåíòîâ â áóôåðå êàê â òàéìñåðèè
|
|
ArraySetAsSeries(ColorBuffer,true);
|
|
|
|
//--- ñîçäàíèå èìåíè äëÿ îòîáðàæåíèÿ â îòäåëüíîì ïîäîêíå è âî âñïëûâàþùåé ïîäñêàçêå
|
|
IndicatorSetString(INDICATOR_SHORTNAME,"StochasticDiff("+string(KPeriod)+")");
|
|
//--- îïðåäåëåíèå òî÷íîñòè îòîáðàæåíèÿ çíà÷åíèé èíäèêàòîðà
|
|
IndicatorSetInteger(INDICATOR_DIGITS,2);
|
|
//---- çàâåðøåíèå èíèöèàëèçàöèè
|
|
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(BarsCalculated(Stochastic_Handle)<rates_total || rates_total<min_rates_total) return(RESET);
|
|
|
|
//---- îáúÿâëåíèÿ ëîêàëüíûõ ïåðåìåííûõ
|
|
int to_copy,limit,bar,maxbar;
|
|
double Sto[],Sign[],diff;
|
|
|
|
//---- ðàñ÷åò ñòàðòîâîãî íîìåðà limit äëÿ öèêëà ïåðåñ÷åòà áàðîâ
|
|
if(prev_calculated>rates_total || prev_calculated<=0)// ïðîâåðêà íà ïåðâûé ñòàðò ðàñ÷åòà èíäèêàòîðà
|
|
{
|
|
limit=rates_total-min_rates_1-1; // ñòàðòîâûé íîìåð äëÿ ðàñ÷åòà âñåõ áàðîâ
|
|
}
|
|
else limit=rates_total-prev_calculated; // ñòàðòîâûé íîìåð äëÿ ðàñ÷åòà íîâûõ áàðîâ
|
|
|
|
to_copy=limit+1;
|
|
maxbar=rates_total-1-min_rates_1;
|
|
|
|
//---- êîïèðóåì âíîâü ïîÿâèâøèåñÿ äàííûå â ìàññèâû
|
|
if(CopyBuffer(Stochastic_Handle,MAIN_LINE,0,to_copy,Sto)<=0) return(RESET);
|
|
if(CopyBuffer(Stochastic_Handle,SIGNAL_LINE,0,to_copy,Sign)<=0) return(RESET);
|
|
//---- èíäåêñàöèÿ ýëåìåíòîâ â ìàññèâàõ êàê â òàéìñåðèÿõ
|
|
ArraySetAsSeries(Sto,true);
|
|
ArraySetAsSeries(Sign,true);
|
|
|
|
//---- îñíîâíîé öèêë ðàñêðàñêè èíäèêàòîðà
|
|
for(bar=limit; bar>=0 && !IsStopped(); bar--)
|
|
{
|
|
diff=Sto[bar]-Sign[bar];
|
|
IndBuffer[bar]=XMA1.XMASeries(maxbar,prev_calculated,rates_total,XMA_Method,XPhase,XLength,diff,bar,true);
|
|
|
|
int clr=2;
|
|
if(IndBuffer[bar]>=0)
|
|
{
|
|
if(IndBuffer[bar]>=IndBuffer[bar+1]) clr=0;
|
|
else clr=1;
|
|
}
|
|
else
|
|
{
|
|
if(IndBuffer[bar]<=IndBuffer[bar+1]) clr=4;
|
|
else clr=3;
|
|
}
|
|
ColorBuffer[bar]=clr;
|
|
}
|
|
//----
|
|
return(rates_total);
|
|
}
|
|
//+------------------------------------------------------------------+
|