Индикатор фракталов

Опубликовано в AmiBroker

В стандартной поставке Amibroker индикатора фракталов нет (по крайней мере на текущий момент). Потребовался. Решил в интернете не искать. Вот очень быстрый (2 строки) индикатор фракталов с изменяемым периодом.

_SECTION_BEGIN("Fractal");

FractalPeriod = Param("Fractal period",5,3,25,2);
FractalColor = ParamColor("Fractal color",colorBlue); 

HighFractal = HHV(Ref(High,int(FractalPeriod/2)),FractalPeriod) == High;
LowFractal = LLV(Ref(Low,int(FractalPeriod/2)),FractalPeriod) == Low; 

PlotShapes(IIf(HighFractal,shapeDownTriangle,shapeNone),FractalColor,0,High);
PlotShapes(IIf(LowFractal,shapeUpTriangle,shapeNone),FractalColor,0,Low);
_SECTION_END();

Похвалю себя: простенько и со вкусом innocent