/*[[
	Name := CoeffOfLineTrue
	Author := Copyright © 2004, MetaQuotes Software Corp.
	Link := http://www.metaquotes.net/
	Notes := Вычисляет наклон линии через метод наименьшего квадратичного отклонения
	Separate Window := Yes
	First Color := White
	First Draw Type := Line
	First Symbol := 217
	Use Second Data := No
	Second Color := Red
	Second Draw Type := Line
	Second Symbol := 218
]]*/
// Вычисляем для функции Y=A*X+B  коэффициент А для цен и значений индикаторов
// Считаем значения Х=1,2,3,4,5 . Константу B  не вычисляем, так как не имеет смысла. B=(T-A*M)/, где n=5
// T=Сумма Yi, M=Сумма Xi, N=Сумма Xi*Xi, Z=Сумма Xi*Yi
// A=(T+(N-2*Z)*n/M)/M 
// Вычисляем отношение Aцен/Aиндикатора
Inputs: BeginBars(2000);
Variable : shift(0),cnt(0),TYVar(0),ZYVar(0),TIndicatorVar(0),ZIndicatorVar(0),M(0),N(0),AY(0),AIndicator(0), ndot(5);

SetLoopCount(0);
// loop from first bar to current bar (with shift=0)
For shift=BeginBars Downto 0 Begin
	{
	TYVar=0);
	ZYVar=0;
	TIndicatorVar=0;
	ZIndicatorVar=0;
	For cnt=ndot DownTo 1 Begin // n=5 -  по пяти точкам
		ZYVar=ZYVar+(C[shift+cnt-1]+C[shift+cnt-1])/2*(6-cnt);
		TYVar=TYVar+(C[shift+cnt-1]+C[shift+cnt-1])/2;
		//N=N+cnt*cnt; равно 55
		//M=M+cnt; равно 15
		ZIndicatorVar=ZIndicatorVar+iAlligator(13,8,8,5,5,3,MODE_SMMA, PRICE_CLOSE,MODE_GATORLIPS,shift+cnt-1)*(6-cnt);
		TIndicatorVar=TIndicatorVar+iAlligator(13,8,8,5,5,3,MODE_SMMA, PRICE_CLOSE,MODE_GATORLIPS,shift+cnt-1);
	AY=(TYVar+(55-2*ZYVar)*5/15)/15;
	AIndicator=(TIndicatorVar+(55-2*ZIndicatorVar)*5/15)/15;
	End;
	SetIndexValue(shift, (-1000)*Log(AY/AIndicator));
	}
End;