René Nyffenegger's collection of things on the web
René Nyffenegger on Oracle - Most wanted - Feedback -
 

SumArea [Vim Script]

Calculate the sum of the numbers found in a visual selection. 
fu! SumArea() range
  let l:sum = 0
  
  let l:area = VisualBlockBoundaries()
  
  let l:line = l:area.line_b
  while l:line < l:area.line_e
  let l:line_text=getline(l:line + 1)
  
  let l:text = strpart(l:line_text, l:area.col_b, l:area.col_e - l:area.col_b)
  
  let l:line = l:line + 1
  
  let l:no = str2float(l:text)
  let l:sum = l:sum + l:no
endwhile