Индикатор МТ3 по зоне

[Forex Trader]

Кому-то обещал выложить индикатор на основе АО и АС (по зоне). Этот индикатор на открытии каждого бара вычисляет крайнюю цену, при которой бар переходит из красной в зеленую зону и наоборот. Поэтому я назвал его безумными стопами. Подключиться к серверу Альпари по непонятной причине не смог, поэтому картинку на текущий момент приложить не могу.

/*[[
	Name := MadStops
	Author := Rosh
	Link := http://www.metaquotes.net/
	Notes := Стопы по зоне Вильямса
	Separate Window := No
	First Color := Green
	First Draw Type := Line
	First Symbol := 217
	Use Second Data := Yes
	Second Color := Red
	Second Draw Type := Line
	Second Symbol := 218
]]*/
Input : BeginBars(500);
Variable : shift(0),cnt(0),StopUp(0),StopDown(0),AO_Sum(0),Y(0),X(0);

SetLoopCount(0);
// loop from first bar to current bar (with shift=0)
//If Period<>240 then Exit;

For shift=BeginBars Downto 1 Begin
	AO_Sum=0;
//	Comment("StopUp=",StopUp);
	For cnt=shift+4 Downto shift+1 Begin
		AO_Sum=AO_Sum+iAO(cnt);
	End;
	Y=170/58*AO_Sum-170/14.5*(iMAex(5,MODE_SMA,0,PRICE_MEDIAN,shift+1)-iMAex(34,MODE_SMA,0,PRICE_MEDIAN,shift+1))
	+17/14.5*(H[shift+5]+L[shift+5])-2.5/14.5*(H[shift+34]+L[shift+34])-O[shift];
//	X2=O[shift]+(170*(iAO(shift+1)-iMAex(5,MODE_SMA,0,PRICE_MEDIAN,shift+1)+iMAex(34,MODE_SMA,0,PRICE_MEDIAN,shift+1))
//	+17*(H[shift+5]+L[shift+5])-2.5*(H[shift+34]+L[shift+34]))/14.5;
	X=(17*(H[shift+5]+L[shift+5])-2.5*(H[shift+34]+L[shift+34]))/14.5-O[shift];
	If Y>X then 
	{ StopUp=Y;
	StopDown=X;} 
	Else { StopUp=X;StopDown=Y ;};
	
	//Comment("StopUp=",X);
	SetIndexValue(shift,StopUp );
	SetIndexValue2(shift, StopDown);
End;