-- расчет вперед
function OnCalculate(index)
   local high=0
   local high3=0
   
   high13=H(index+20)
   
   if high13 then
   for i1=0,20 do
    high=high+H(index+i1)
   end;
   
   for i2=0,4 do
    high3=high3+H(index+i2)
   end;
   
   
   high1=high/21
   high2=high3/5
      
   end;
   return high1, high2
end
--===========================расчет назад
function OnCalculate(index)
   local high=0
   local high3=0
   
   high13=H(index-20)
   
   if high13 then
   for i1=0,20 do
    high=high+H(index-i1)
   end;
   
   for i2=0,4 do
    high3=high3+H(index-i2)
   end;
   
   
   high1=high/21 --красная
   high2=high3/5 --зеленая
      
   end;
   return high1, high2 
end

function OnCalculate(index)
high2=high1
high1=high
high=H(index)
if high1  and high2 then
     vrem=(high1+high2)/2   --- или так       vrem=(high+high1)/2
end   
   return high , high1, vrem
end

function OnCalculate(index)
   local high=0
   local high1=0
   local vrem=0
   
      
      high=H(index)
      high1=H(index+1)
      vrem=(high+high1)/2
      
      
   return high , high1, vrem
end

Settings=
   {
      Name = "!!!Primer3",
      period=5,
      line=
         {
            {
               Name = "High",
               Type =TYPE_LINE,
               Width = 2,
               Color = RGB(255,0, 0)
            },
            {
               Name = "Low",
               Type =TYPE_LINE,
               Width = 2,
               Color = RGB(0,0,255)
            }
            ,
            {
               Name = "Low",
               Type =TYPE_LINE,
               Width = 2,
               Color = RGB(0,255,0)
            }
         }
   }



function Init()
   return 3
end



function OnCalculate(index)
   local high=0
   local high1=0
   local vrem=0
   
       vrem=(H(index-1)+H(index-2))/2
      high=H(index)
      high1=H(index-1)
      vrem=(high+high1)/2
      
      
   return high , high1, vrem
end