Альфа-Директ 4 - Альфа-Инвестиции

Добавлено: evge » 27 апр 2020, 19:11

Тема: RangeOfHours - экстремумы предыдущих часов

Текст сообщения:

Индикатор RangeOfHours отображает уровни минимальной, средней, максимальной цены предыдущих часов.
2 варианта расчета экстремумов текущего часа:

В текущий час рисуются уровни предыдущего часа. В начале текущего часа, на первом баре, уровни предыдущего часа перерисовываются в соответствии с его экстремумами;
Экстремумы определяются динамически.

Параметры

MinScan - необходимая история в барах. Загружаемая история = MinScan * 2
CDType - Current Data Type - тип определения экстремумов текущего часа. 0 - продолжение экстремумов предыдущего часа, 1 - динамическое определение экстремумов текущего часа.

Примеры работы

RangeOfHours.zip: (49.29 КБ) 1434 скачивания

: RangeOfHours-02.png (28.44 КБ) 36193 просмотра

Исходный текст индикатора:

Код: Выделить всё

function Initialize()
{
  IndicatorName = "RangeOfHours";   
  AddInput("Input", Inputs.Candle);   
  PriceStudy = true;
  AddSeries("Hi", DrawAs.Custom, Color.Green); // максимум предыдущего часа
  AddSeries("Lo", DrawAs.Custom, Color.Red);   // минимум предыдущего часа
  AddSeries("Mid", DrawAs.Custom, Color.Silver);  // средняя цена
  AddParameter("MinScan", 163, 2); // подзагрузка истории количество 5-минутных баров
  AddParameter("CDType", 1);  // Current Data Type - тип текущего часа, 0 - продолжать отображение экстремумов предыдущего часа, 1 - экстремумы текущего часа (будут меняться динамически в течение часа)
  AddGlobalVariable("High", Types.Double, 0);
  AddGlobalVariable("Low", Types.Double, 0);
  AddGlobalVariable("LastHigh", Types.Double, 0);
  AddGlobalVariable("LastLow", Types.Double, 0);
  AddGlobalVariable("SI", Types.Int, 0);
  AddGlobalVariable("SIO", Types.Int, 0);
}

function Evaluate()
{
// evge 27.04.2020 https://alfadirect4.ru
//   RangeOfHours - Индикатор рисует экстремумы предыдущих часов и текущего часа, в зависимости от параметров, продолжая экстремумы предыдущего часа или расчитывая в текущем часе динамически.

//первая свечка часа
//сохранаем текущий индекс и последние найденные High, Low
if ( BarTime().Hours != BarTime(1).Hours)
   {
   SIO = SI;
   SI = CurrentIndex;
   LastHigh = High;
   LastLow = Low;

   //перерисовываем
   if (SIO != 0)
   for (var x=0; x <= CurrentIndex - SIO; x++)
   {
   Hi[x] = High;
   Lo[x] = Low;
   Mid[x] = (Low + High) * 0.5;      
   }
   }

if (((BarTime().Hours != DateTime.Today.Hour) || CDType != 0) && BarTime().Hours != BarTime(1).Hours)
  {
    High = Input.High[0];
    Low = Input.Low[0];   
  }
  else if (((BarTime().Hours != DateTime.Today.Hour) || CDType != 0) && BarTime() > AsTime(0, 0, 0))
  {
    if ( Input.High[0] > High) High = Input.High[0];
    if ( Input.Low[0] < Low) Low = Input.Low[0];
  }

if (CDType == 0)
{
   if (LastHigh !=0 && LastLow !=0)
   {
   Hi[0] = LastHigh;
   Lo[0] = LastLow;
   Mid[0] = (LastLow + LastHigh) * 0.5;
   
   Hi.DrawDash();
   Lo.DrawDash();
   Mid.DrawDash();
   }
} else
{

if (SI != 0)
for (var x=0; x <= CurrentIndex - SI; x++)
{
Hi[x] = High;
Lo[x] = Low;
Mid[x] = (Low + High) * 0.5;      
}

Hi.DrawDash();
Lo.DrawDash();
Mid.DrawDash();
}

}

Скачать исходный текст

: RangeOfHours-01.png (27.12 КБ) 36193 просмотра

« Все файлы этой темы

Каталог файлов форума

Текст сообщения: