151 lines
6.3 KiB
Plaintext
151 lines
6.3 KiB
Plaintext
//+------------------------------------------------------------------+
|
|
//| Stream.mq5 |
|
|
//| Copyright © 2016, Yuriy Tokman (YTG) |
|
|
//| http://ytg.com.ua/ |
|
|
//+------------------------------------------------------------------+
|
|
//--- àâòîðñòâî èíäèêàòîðà
|
|
#property copyright "Copyright © 2016, Yuriy Tokman (YTG)"
|
|
//--- ññûëêà íà ñàéò àâòîðà
|
|
#property link "http://ytg.com.ua/"
|
|
#property link "Èíäèêàòîð ïîìå÷àåò áàðû, ó êîòîðûõ ðàçìåð ïðåâûøàåò çàäàííîå çíà÷åíèå, óñòàíîâëåííîå â íàñòðîéêàõ."
|
|
#property link " ðàñ÷åò ïðèíèìàåòñÿ òåëî áàðà, öåíà îòêðûòèÿ è öåíà çàêðûòèÿ áàðà."
|
|
//--- íîìåð âåðñèè èíäèêàòîðà
|
|
#property version "1.00"
|
|
//--- îòðèñîâêà èíäèêàòîðà â ãëàâíîì îêíå
|
|
#property indicator_chart_window
|
|
//--- äëÿ ðàñ÷åòà è îòðèñîâêè èíäèêàòîðà èñïîëüçîâàíî äâà áóôåðà
|
|
#property indicator_buffers 2
|
|
//--- èñïîëüçîâàíî âñåãî äâà ãðàôè÷åñêèõ ïîñòðîåíèÿ
|
|
#property indicator_plots 2
|
|
//+----------------------------------------------+
|
|
//| Ïàðàìåòðû îòðèñîâêè ìåäâåæüåãî èíäèêàòîðà |
|
|
//+----------------------------------------------+
|
|
//--- îòðèñîâêà èíäèêàòîðà 1 â âèäå ñèìâîëà
|
|
#property indicator_type1 DRAW_ARROW
|
|
//--- â êà÷åñòâå öâåòà ìåäâåæüåé ëèíèè èíäèêàòîðà èñïîëüçîâàí ðîçîâûé öâåò
|
|
#property indicator_color1 clrMagenta
|
|
//--- òîëùèíà ëèíèè èíäèêàòîðà 1 ðàâíà 4
|
|
#property indicator_width1 4
|
|
//--- îòîáðàæåíèå ìåäâåæüåé ìåòêè èíäèêàòîðà
|
|
#property indicator_label1 "Stream Sell"
|
|
//+----------------------------------------------+
|
|
//| Ïàðàìåòðû îòðèñîâêè áû÷üåãî èíäèêàòîðà |
|
|
//+----------------------------------------------+
|
|
//--- îòðèñîâêà èíäèêàòîðà 2 â âèäå ñèìâîëà
|
|
#property indicator_type2 DRAW_ARROW
|
|
//--- â êà÷åñòâå öâåòà áû÷üåé ëèíèè èíäèêàòîðà èñïîëüçîâàí çåëåíûé öâåò
|
|
#property indicator_color2 clrLime
|
|
//--- òîëùèíà ëèíèè èíäèêàòîðà 2 ðàâíà 4
|
|
#property indicator_width2 4
|
|
//--- îòîáðàæåíèå áû÷üåé ìåòêè èíäèêàòîðà
|
|
#property indicator_label2 "Stream Buy"
|
|
//+----------------------------------------------+
|
|
//| Îáúÿâëåíèå êîíñòàíò |
|
|
//+----------------------------------------------+
|
|
#define RESET 0 // êîíñòàíòà äëÿ âîçâðàòà òåðìèíàëó êîìàíäû íà ïåðåñ÷åò èíäèêàòîðà
|
|
//+----------------------------------------------+
|
|
//| Âõîäíûå ïàðàìåòðû èíäèêàòîðà |
|
|
//+----------------------------------------------+
|
|
input uint Bars_Size=100; // Ìèíèìàëüíûé ðàçìåð òåëà áàðà äëÿ ñðàáàòûâàíèÿ
|
|
//+----------------------------------------------+
|
|
//--- îáúÿâëåíèå äèíàìè÷åñêèõ ìàññèâîâ, êîòîðûå â äàëüíåéøåì
|
|
//--- áóäóò èñïîëüçîâàíû â êà÷åñòâå èíäèêàòîðíûõ áóôåðîâ
|
|
double SellBuffer[];
|
|
double BuyBuffer[];
|
|
//---
|
|
double dBars_Size;
|
|
int ATR_Handle,min_rates_total;
|
|
//+------------------------------------------------------------------+
|
|
//| Custom indicator initialization function |
|
|
//+------------------------------------------------------------------+
|
|
int OnInit()
|
|
{
|
|
//--- èíèöèàëèçàöèÿ ãëîáàëüíûõ ïåðåìåííûõ
|
|
int ATR_Period=15;
|
|
min_rates_total=int(ATR_Period);
|
|
//--- ïîëó÷åíèå õåíäëà èíäèêàòîðà ATR
|
|
ATR_Handle=iATR(NULL,0,ATR_Period);
|
|
if(ATR_Handle==INVALID_HANDLE)
|
|
{
|
|
Print(" Íå óäàëîñü ïîëó÷èòü õåíäë èíäèêàòîðà ATR");
|
|
return(INIT_FAILED);
|
|
}
|
|
dBars_Size=Bars_Size*_Point;
|
|
//--- ïðåâðàùåíèå äèíàìè÷åñêîãî ìàññèâà â èíäèêàòîðíûé áóôåð
|
|
SetIndexBuffer(0,SellBuffer,INDICATOR_DATA);
|
|
//--- îñóùåñòâëåíèå ñäâèãà íà÷àëà îòñ÷åòà îòðèñîâêè èíäèêàòîðà 1
|
|
PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total);
|
|
//--- ñèìâîë äëÿ èíäèêàòîðà
|
|
PlotIndexSetInteger(0,PLOT_ARROW,226);
|
|
//--- èíäåêñàöèÿ ýëåìåíòîâ â áóôåðå êàê â òàéìñåðèè
|
|
ArraySetAsSeries(SellBuffer,true);
|
|
//--- ïðåâðàùåíèå äèíàìè÷åñêîãî ìàññèâà â èíäèêàòîðíûé áóôåð
|
|
SetIndexBuffer(1,BuyBuffer,INDICATOR_DATA);
|
|
//--- îñóùåñòâëåíèå ñäâèãà íà÷àëà îòñ÷åòà îòðèñîâêè èíäèêàòîðà 2
|
|
PlotIndexSetInteger(1,PLOT_DRAW_BEGIN,min_rates_total);
|
|
//--- ñèìâîë äëÿ èíäèêàòîðà
|
|
PlotIndexSetInteger(1,PLOT_ARROW,225);
|
|
//--- èíäåêñàöèÿ ýëåìåíòîâ â áóôåðå êàê â òàéìñåðèè
|
|
ArraySetAsSeries(BuyBuffer,true);
|
|
//--- óñòàíîâêà ôîðìàòà òî÷íîñòè îòîáðàæåíèÿ èíäèêàòîðà
|
|
IndicatorSetInteger(INDICATOR_DIGITS,_Digits);
|
|
//--- èìÿ äëÿ îêîí äàííûõ è ìåòêà äëÿ ïîäîêîí
|
|
string short_name="Stream("+string(Bars_Size)+")";
|
|
IndicatorSetString(INDICATOR_SHORTNAME,short_name);
|
|
//---
|
|
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(ATR_Handle)<rates_total || rates_total<min_rates_total) return(RESET);
|
|
//--- îáúÿâëåíèÿ ëîêàëüíûõ ïåðåìåííûõ
|
|
int to_copy,limit,bar;
|
|
double range,ATR[];
|
|
//--- ðàñ÷åòû íåîáõîäèìîãî êîëè÷åñòâà êîïèðóåìûõ äàííûõ è
|
|
//--- ñòàðòîâîãî íîìåðà limit äëÿ öèêëà ïåðåñ÷åòà áàðîâ
|
|
if(prev_calculated>rates_total || prev_calculated<=0)// ïðîâåðêà íà ïåðâûé ñòàðò ðàñ÷åòà èíäèêàòîðà
|
|
{
|
|
limit=rates_total-min_rates_total; // ñòàðòîâûé íîìåð äëÿ ðàñ÷åòà âñåõ áàðîâ
|
|
}
|
|
else
|
|
{
|
|
limit=rates_total-prev_calculated; // ñòàðòîâûé íîìåð äëÿ ðàñ÷åòà íîâûõ áàðîâ
|
|
}
|
|
to_copy=limit+1;
|
|
//--- êîïèðóåì âíîâü ïîÿâèâøèåñÿ äàííûå â ìàññèâ ATR[]
|
|
if(CopyBuffer(ATR_Handle,0,0,to_copy,ATR)<=0) return(RESET);
|
|
//--- èíäåêñàöèÿ ýëåìåíòîâ â ìàññèâàõ êàê â òàéìñåðèÿõ
|
|
ArraySetAsSeries(ATR,true);
|
|
ArraySetAsSeries(open,true);
|
|
ArraySetAsSeries(low,true);
|
|
ArraySetAsSeries(high,true);
|
|
ArraySetAsSeries(close,true);
|
|
//--- îñíîâíîé öèêë ðàñ÷åòà èíäèêàòîðà
|
|
for(bar=limit; bar>=0 && !IsStopped(); bar--)
|
|
{
|
|
range=close[bar]-open[bar];
|
|
//---
|
|
BuyBuffer[bar]=0.0;
|
|
SellBuffer[bar]=0.0;
|
|
//---
|
|
if(range>+dBars_Size) BuyBuffer[bar]=low[bar]-ATR[bar]*3/8;
|
|
if(range<-dBars_Size) SellBuffer[bar]=high[bar]+ATR[bar]*3/8;
|
|
}
|
|
//---
|
|
return(rates_total);
|
|
}
|
|
//+------------------------------------------------------------------+
|