Settings={
Name="MNKOSC",
period=200,
delta=0,
line=                                     
                {  
					{  
                        Name = "cur1",
                        Type =TYPE_LINE,
                        Width = 1,
                        Color = RGB(0,0, 0)
                    },
					{  
                        Name = "cur2",
                        Type =TYPE_LINE,
                        Width = 1,
                        Color = RGB(255,0, 0)
                    },
					{  
                        Name = "cur3",
                        Type =TYPE_LINE,
                        Width = 1,
                        Color = RGB(0,0, 0)
                    },
					{  
                        Name = "cur4",
                        Type =TYPE_LINE,
                        Width = 1,
                        Color = RGB(0,0, 0)
                    }

                }

}
--[[

описание свойств:
period - период, за каротрый делается расчет
delta - смещение назад 

назначение:
осцелятор по каналу

использовался:
метод наименьших квадратов (аппроксимация линией)

--]]

function Init()
  
  return 4
end

function OnCalculate(index)
    
  sz = Size()
  n = Settings.period
  d = Settings.delta
        	
   y = nil    
   y1 = nil
   y2 = nil
   if index-n-d > 0 then
    a1 = 0
	a2 = 0
	a3 = 0
	a4 = 0
    for i=index-n+1-d, index-d do  

	  a1 = a1+i*C(i)
	  a2 = a2+i
	  a3 = a3+C(i)
	  a4 = a4+i*i
	
    end  
	
	if((n*a4 - a2*a2) ~= 0) then
	 a = (n*a1 - a2*a3)/(n*a4 - a2*a2)
	 b = (a3 - a*a2)/n
    
	 c1 = 0
	 c2 = 0
	 n1 = 0
	 n2 = 0
     for j=index-n+1-d, index-d do  
      y = a*j + b
	  if C(j) < y then
	    c1 = c1 + (y -C(j))
		n1 = n1 + 1
	  end
	  if C(j) > y then
	    c2 = c2 + (C(j) - y)
		n2 = n2 + 1
	  end	  
     end	
	 
	 if n1 ~= 0 then
	   c1 = c1/n1
	 end
	 if n2 ~= 0 then
	   c2 = c2/n2
	 end		 
	 
	 j = index-d
	 y = a*j + b
     y1 = -2*c1	
     y2 = 2*c2		 
	 
     j =  index-d
     y = C(j) - a*j - b
	 
	 
    end 
   end 	
   return 0, y, y1, y2
 
  
end

Случайно попался мне на глаза перевод лекции американского врача Уоллака, которая состоялась почти 30 лет назад. Он весьма революционно объясняет причины многих болезней неполноценным питанием. Прочитанное побудило глубже вникнуть в проблему; в результате стали понятнее некоторые давние привычки и традиции.

Д-р Уоллак заявляет: «Дефицит многих минеральных веществ лежит в основе большинства хронических заболеваний». Он считает, что при полноценном питании потенциал жизни человека составляет 120-140 лет. И это весьма похоже на правду. Однако, чем дальше идет разговор, тем радикальнее становятся его формулировки.

Settings={
Name="MNK",
period=200,
line=                                     
                {  
					{  
                        Name = "cur1",
                        Type =TYPE_LINE,
                        Width = 1,
                        Color = RGB(255,0, 0)
                    }
                }

}
--[[

описание свойств:
period - период, за каротрый делается расчет

назначение:
построение тенденции

использовался:
метод наименьших квадратов (аппроксимация линией)

--]]

function Init()
  
  return 1
end

function OnCalculate(index)
    
  sz = Size()
  n = Settings.period
       
  if (index ~= sz) then
    return nil
  else  
   y = nil  
   if index-n > 0 then
    a1 = 0
	a2 = 0
	a3 = 0
	a4 = 0
    for i=index-n+1, index do  

	  a1 = a1+i*C(i)
	  a2 = a2+i
	  a3 = a3+C(i)
	  a4 = a4+i*i
	
    end  
	
	if((n*a4 - a2*a2) ~= 0) then
	 a = (n*a1 - a2*a3)/(n*a4 - a2*a2)
	 b = (a3 - a*a2)/n
    
     for j=index-n+1, index do  
      y = a*j + b
      SetValue(j, 1, y) 
     end	
    end 
   end 	
   return y
  end
 
  
end

Лучшие бумаги недели. Выпуск 211 – обновления для четверга

В таблице 1 приведены 32 наиболее ликвидные акции нашего рынка, упорядоченные по убыванию доходности за неделю с 09.10.2019 по 16.10.2019. Первые 8 акций – это лучшие бумаги недели по состоянию на утро 17.10.2019.

Внимание! В связи с делистингом на Московской бирже акций Мегафона, список из 32 бумаг претерпел одно изменение. Вместо акций Мегафона теперь при расчете лучших бумаг недели будут учитываться акции Полюса (PLZL).

                                                   Таблица 1.

Бумаги  в таблице 1 выделены тремя цветами:

1. Красным  - были лучшими неделю назад, а сейчас нет.
2. Желтым  - были лучшими неделю назад и остались лучшими.
3. Зеленым — не были лучшими неделю назад, а сейчас стали.