Перебор минимумов баров от бара начала дня до 1 бара.
int start_bar=iBarShift(NULL,PERIOD_M30,iTime(NULL,PERIOD_D1,0));
double low=0;
if(start_bar>0)
{
low=EMPTY_VALUE;
for(int i=start_bar; i>0; i--)
{
double ilow=iLow(NULL,PERIOD_M30,i);
if(low>ilow)low=ilow;
}
}В этом месте он ещё ищет минимум перебирая бары. Результат надо смотреть после закрытия последней фигурной скобки.
Вы правы, все получилось!! У меня больше нет вопросов, благодарю!!
int x = 5; // Cколько нужно пересечений
int b = 0; // Считать с бара
int cnt = 0; // Задаем и обнуляем счетчик
int num_x[]; // Создаем массив для хранения № баров пересечения
ArrayResize(num_x,x); //Установим массив нужного размера
while(cnt<x) // Будем перебирать бары b до тех пор, пока не найдем заданное кол. пересеч.
{
if((ma1[b+1]>ma2[b+1] && ma1[b+2]<ma2[b+2])||(ma1[b+1]<ma2[b+1] && ma1[b+2]>ma2[b+2]))
{
num_x[cnt] = b; // запомним № бара пересечения
cnt++; // увеличим счетчик на 1
}
b++; // перейдем к проверке следующего бара
}arrbuy = iCustom(NULL, 0, "indi2", TimeFrame, RsiPeriod, MaType, MaPeriod, Interpolate, arrowsIdentifier, arrowsUpColor, arrowsDnColor, 0, 0);
arrsell = iCustom(NULL, 0, "indi2", TimeFrame, RsiPeriod, MaType, MaPeriod, Interpolate, arrowsIdentifier, arrowsUpColor, arrowsDnColor, 1, 0);#property copyright "Copyright 2017, MetaQuotes Software Corp."
#property link "https://www.mql5.com"
#property version "1.00"
#property strict
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
int bar_index = iBarShift(NULL,PERIOD_M30,iTime(NULL,PERIOD_D1,0));
int OnInit()
{
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void OnTick()
{
GetMinPrice();
GetMaxPrice();
Print(GetMinPrice()," Low ",GetMaxPrice()," High ",bar_index);
}
//+------------------------------------------------------------------+
double GetMinPrice()
{
double low = 0;
if(bar_index > 0)
{
low = EMPTY_VALUE;
for(int i = bar_index; i > 0; i--)
{
double ilow = iLow(NULL,PERIOD_M30,i);
if(low > ilow)
low = ilow;
}
}
return(low);
}
//+------------------------------------------------------------------+
double GetMaxPrice()
{
double high = 0;
if(bar_index > 0)
{
high = EMPTY_VALUE;
for(int i = bar_index; i > 0; i--)
{
double ihigh = iHigh(NULL,PERIOD_M30,i);
if(high > ihigh)
high = ihigh;
}
}
return(high);
}//+------------------------------------------------------------------+//| подсчет пересечений Ma .mq4 |//| Copyright 2017, MetaQuotes Software Corp. |//| https://www.mql5.com |//+------------------------------------------------------------------+#property copyright "Copyright 2016, MetaQuotes Software Corp."#property link "https://www.mql5.com"#property version "1.00"#property strictextern int Баров = 500; // Баров для подсчета пересечений МАextern int MA_1 =10;extern int MA_2 =100;void OnTick(){ int Бар, Счетчик; double MA_1_Предыдущая, MA_2_Предыдущая, MA_1_Следующая, MA_2_Следующая; ObjectsDeleteAll(); // Удалить вертикальные линии for(Счетчик=0, Бар=0; Бар<Баров; Бар++) // Начинаем с послнего бара { MA_1_Предыдущая = iMA(Symbol(),PERIOD_M5,MA_1,0,MODE_SMA,PRICE_CLOSE,Бар+1); MA_1_Следующая = iMA(Symbol(),PERIOD_M5,MA_1,0,MODE_SMA,PRICE_CLOSE,Бар); MA_2_Предыдущая = iMA(Symbol(),PERIOD_M5,MA_2,0,MODE_SMA,PRICE_CLOSE,Бар+1); MA_2_Следующая = iMA(Symbol(),PERIOD_M5,MA_2,0,MODE_EMA,PRICE_CLOSE,Бар); if((MA_1_Предыдущая>=MA_2_Предыдущая && MA_1_Следующая<=MA_2_Следующая) || (MA_1_Предыдущая<=MA_2_Предыдущая && MA_1_Следующая>=MA_2_Следующая)) { Счетчик++; Alert(Счетчик, " Бар = ", Бар, " T = ",Time[Бар]); // Создать вертикальную линию ObjectCreate( (string)Счетчик+"_"+(string)Бар,OBJ_VLINE,0,Time[Бар],0); if(Счетчик == 5) break; // 5 линий есть - выход } }}
Не должен, в индюке только три значения SetIndexBuffer,
через iMA доставать значение каждой, затем ловить пересечение
maB = iMA(NULL, 0, Период_Большой_МА, 0, MODE_EMA, PRICE_CLOSE, 0);
maM = iMA(NULL, 0, Период_Малой_МА, 0, MODE_EMA, PRICE_CLOSE, 0);
if (maB > maM)//Найдем день неделиint DayWeek=TimeDayOfWeek(TimeCurrent());//Сегодняшний деньdatetime timsegodny=TimeCurrent();MqlDateTime time; time.year=TimeYear(TimeCurrent()); // год time.mon=TimeMonth(TimeCurrent()); // месяц time.day=TimeDay(TimeCurrent()); // день time.hour=0; // час time.min=0; // минуты timsegodny=StructToTime(time);// Количество баров от начала дня сегодня //NumberBar=iBarShift(Symbol(),TF,timsegodny);//--------------------------------------//// сегодняшний день 2datetime timeseg=TimeCurrent();MqlDateTime seg;TimeToStruct(timeseg,seg); seg.hour=0; // час seg.min=0; // минуты timeseg=StructToTime(seg);// Вчерашний деньif(DayWeek==1){timevhera=TimeCurrent()-72*60*60;}if(DayWeek==2 || DayWeek==3 ||DayWeek==4 ||DayWeek==5) {timevhera=TimeCurrent()-24*60*60;}MqlDateTime vhera;TimeToStruct(timevhera,vhera); vhera.hour=0; // час vhera.min=5; // минуты timevhera=StructToTime(vhera);// Количество баров от начала вчерашнего дня //NumberBarVhera=iBarShift(Symbol(),TF,timevhera);int countVhera=Bars(Symbol(),TF,timevhera,timeseg);// Найдем максимум и минимум прошлого дняHighIndexMP3Sell=iHighest(Symbol(),TF,MODE_HIGH,NumberBarVhera,NumberBar); // получаем индекс бара максимума прошлого дняLowIndexMP3Buy=iLowest(Symbol(),TF,MODE_LOW,NumberBarVhera,NumberBar); // получаем индекс бара минимума прошлого дня аж на позавчерашнем дне
Что то чересчур сложно)))
в понедельник это будет не вчер.
У некоторых ДЦ сдвинуто время. Например, в пятницу торговля заканчивается в 22:00, а торговля начинается в воскресенье в 22:00.