Индикатор "Горизонтальные объемы"

Settings={
Name="GVOL",
period=200,
maxline=20,
line={} 
}

function Init()
  
  n=50
  vol={}
  for j = 1, n do        
    vol[j]=0
	Settings.line[j] = {Color=RGB(192,192,192),Type=TYPE_LINE,Width=4}
  end  
   
  return n
end

function OnCalculate(index)

 
  if index < Size() then
    return nil
  else   	

  
    maxv=0
    maxc=0
	minc=9999 
	 	
    for i=Size()-Settings.period, Size() do  
       
      if C(i) ~= nil then  	   
        if maxc < C(i) then 
          maxc = C(i)	  
        end		
        if minc > C(i) then 
          minc = C(i)	  
        end
	  end
      	  
    end   
	 
	delta = (maxc - minc)/n
     
    for i=Size()-Settings.period, Size() do  
 
      for j = 1, n do 
	   if C(i) ~= nil then  	
        if (C(i) > minc + (j-1)*delta) and (C(i) <= minc + j*delta) then 
          vol[j]=vol[j]+V(i)	         		
        end  
	   end	
	  end
			
    end   

	for j = 1, n do
	  if maxv < vol[j] then 
        maxv = vol[j]
      end		        
	end	
      

    k = 0 
    for i=Size()-Settings.maxline+1, Size() do  
	  k = k + 1
	  for j = 1, n do
        if vol[j] >= (Settings.maxline - k)*maxv/Settings.maxline then 
          SetValue(i, j, minc + j*delta)
		else  
		  SetValue(i, j, nil)
        end  	
	
		
	  end
	end
	
	
        


  end


end