#!/usr/bin/ruby -w

require "csv"

first_line = true
xtics = []
out = File.new("till-new.dat", "w")
CSV.parse(File.new('till.dat', 'r').read(), ',') { |row|
  row.each{|i| out.print("#{i}\t") }
  out.puts
  if first_line then
    first_line = false
  else
    xtics.push("\"#{row[0]}\" #{xtics.length}.0")
  end
}
out.close()

## gnuplot = IO.popen("gnuplot", "w")

#gnuplot.write(
puts <<END_STRING
set terminal png transparent nocrop enhanced font arial 8 size 420,320 
set output 'histograms.2.png'

set boxwidth 0.9 absolute
set style fill   solid 1.00 border -1
set style histogram clustered gap 1 title  offset character 0, 0, 0
set datafile missing '-'
set style data histograms
set xtics border in scale 1,0.5 nomirror rotate by -45  offset character 0, 0, 0 
set xtics   (#{xtics.join(', ')})
set yrange [ 0.00000 : 300000. ] noreverse nowriteback
plot 'till-new.dat' using 6:xtic(1) ti col, '' u 12 ti col, '' u 13 ti col, '' u 14 ti col
END_STRING


# gnuplot.close()

# EOF #