Вычисление среднестатистической цены в консолидационной фазе

 
Помогите составить индикатор:
Вычисление среднестатистической цены в консолидационной фазе.

(Цена открытия + Максимум + Минимум + 2(Цена закрытия)) / 5 = X
2X минус Максимум = Предполагаемый минимум следующего бара
2X минус Минимум = Предполагаемый минимум следующего бара
...........или.................
Из РУМУСА.....
g= inparam("Сдвиг средн\ческой цены_МИН ", 1, 100, 1) ;

g1= inparam("Сдвиг средн\ческой цены_ МАКС", 1, 100, 1) ;

a= (o+h+l+2*(c))/5 ;
b=(a*2)-h;
b1=(a*2)-l;
c= ref(b,-g ) ;
c1= ref(b1,-g1) ;
c;
c1;
 
http://insami.nm.ru/Stat_inConsFaze.ex4, с РУМУС - ом не сверял.
Цветные точки - результат функции на баре -1.

картинка версии 01 на 240 :

вход по открытию цветной свечки, направление по точке.

на 5min: http://insami.nm.ru/stat_consfaze_5min.gif
Причина обращения: