Фракталы не Вильямса

mandor

Во-первых. С того момента, когда с лёгкой руки Била Вильямса локальные максимумы и минимумы стали называть мутным словом "фрактал", рынки (особенно валютные) стали значительно динамичнее.
И поэтому, 5 баров для формирования так называемого "фрактала (а по-нашему локального верха или низа) стало для некоторых периодов (timeframes) графиков баров явно многовато.
Например, для периода H1, внутридневный тренд может уместиться всего в 3-5 баров.
А в остальное время - шум в некорых ограниченных пределах (flat).
И если надо подтягивать стоп по последнему фракталу, то его можно вообще не дождаться до конца тренда.
А ведь тренд может кончиться не только "флэтом", но и разворотом.
Тогда и приыль от такого трэнда никакая или даже убыток.
Но ведь "фрактал" он и в Африке локальный экстремум.
Можно ведь сформировать экстемумы по 3 барам.
Для верха: бар не ниже предыдущего и выше последующего.
Для низа: бар не Выше предыдущего и ниже последующего.
Именно "не выше - не ниже" предыдущего.
Чтобы пик или низ не пропустить при равной цене 2-х рядом стоящих баров.

Во-вторых. Не видел ничего более ужасного, чем фрактал на графике в Метатрейдере.
Можно ведь их сделать поменьше и другой формы.

Итого: вот Вам индюк "Фракталы" например, для MT3.

/*[[
Name := Фракталы
Author := Copyright © 2005, Mandor
Link := mailto:mandorr@gmail.com
Notes := Определение фрактала здесь отличается от определения, данного Вильямсом.
Notes := Фрактал - конфигурация из 3 баров.
Notes := Верхний фрактал: бар не ниже предыдущего и выше последущего
Notes := Нижний фрактал: бар не выше предыдущего и ниже последущего
First Color := LightSteelBlue
First Draw Type := Symbol
First Symbol := 250
Use Second Data := Yes
Second Color := LightSteelBlue
Second Draw Type := Symbol
Second Symbol := 250
]]*/

Variable : Count(0),Value(0),Value2(0);
SetLoopCount(0);
For Count=1 To Bars-2 Begin
Value =0;
Value2=0;
If H[Count]>=H[Count+1] And H[Count]>H[Count-1] Then Value =H[Count];
If L[Count]<=L[Count+1] And L[Count]<L[Count-1] Then Value2=L[Count];
SetIndexValue (Count,Value );
SetIndexValue2(Count,Value2);
End;

mandor

А вот индюк для почитателей MT4:

// ---- Фракталы.mq4
#property copyright "Copyright © 2005, Mandor"
#property link "mailto:mandorr@gmail.com"
//----
#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 LightSteelBlue
#property indicator_color2 LightSteelBlue
//---- buffers
double BufferHigh[];
double BufferLow[];
//---- custom indicator initialization function
int init()
{
//---- indicator
SetIndexStyle(0,DRAW_ARROW);
SetIndexStyle(1,DRAW_ARROW);
SetIndexArrow(0,250);
SetIndexArrow(1,250);
SetIndexBuffer(0,BufferHigh);
SetIndexBuffer(1,BufferLow);
SetIndexDrawBegin(0,1);
SetIndexDrawBegin(1,1);
//----
return(0);
}
// Фракталы
int start()
{
int i;
double value,value2;
for(i=1;i<=Bars-2;i++)
{
value=0.0;
value2=0.0;
if (High[i]>=High[i+1] && High[i]>High[i-1]) value=High[i];
if (Low[i]<=Low [i+1] && Low[i]<Low [i-1]) value2=Low[i];
BufferHigh[i]=value;
BufferLow[i]=value2;
}
return(0);
}

mandor

Бил, можно мне с тобой по венец? ... ну это полный ...

mandor

Кстати, я так и не понял принципиальную разницу для программиста между МТ3 и МТ4.
Ну там много линий в 1 индюк впендюрить.
Или глючные алгоритмы быстрее исполняются.
Но так ведь программа должна быть оптимизирована, а инструмент пригодный для профита.
А красивости заработать не помогут.

mandor

Кстати, если даже нравится классический вариант фракталов (по Вильямсу), всё равно имеет смысл сделать пользовательский индюк.
При этом есть возможность выбрать форму и цвет символов по-вкусу.

mandor

Иногда интересно посмотреть на график не ввиде свеч или баров, а ввиде линий по ценам закрытия. Для пущей наглядности, чтобы как на графиках в книжках по мат. статистике, надо бы точками отметить значения цен.
Аха ... тогда простейщий индикатор за five секунд иготавливаем. К примеру для MT3:

/*[[
Name := Цены закрытия
Author := Copyright © 2005, Mandor
Link := mailto:mandorr@gmail.com
Notes := Цены закрытия баров
First Color := Black
First Draw Type := Symbol
First Symbol := 250
Use Second Data := No
Second Color := Black
Second Draw Type := Line
Second Symbol := 250
]]*/

Variable : Count(0),Value(0);
SetLoopCount(0);
For Count=0 To Bars-1 Begin
Value=Close[Count];
SetIndexValue (Count,Value);
SetIndexValue2(Count,Value);
End;