Colony

#!/usr/bin/env ruby

file0='/tmp/data0.tmp'

file1='/tmp/data1.tmp'

points0f=[]; points0b=[]; points1f=[]; points1b=[]

puts "Paste output from station here please"

while a=gets

        a.chomp!

        a.strip!

        if a!="" && !(a =~ /^#/)

                if a =~ /^data encoder (0|1) (forward|backward) (.*)$/

                        num=$1; dir=$2; data=$3

                        if    (num=="0" && dir=="forward" ); points=points0f

                        elsif (num=="0" && dir=="backward"); points=points0b

                        elsif (num=="1" && dir=="forward" ); points=points1f

                        elsif (num=="1" && dir=="backward"); points=points1b

                        else                               ; points=[]

                        end

                        data.split(' ').each { |pair| point=pair.split('/'); points<<point }

                end

        end

end

def write_points(filename, points)

        File.open(filename, 'w') { |f|

                points.sort { |a,b|

                        a[0].to_i <=> b[0].to_i

                }.each { |point|

                        puts "#{point[0]} #{point[1]}"

                        f.puts "#{point[0]} #{point[1]}"

                }

        }

end

write_points(file0, points0f+points0b)

write_points(file1, points1f+points1b)

IO.popen('gnuplot', 'w') { |p|

        p.puts("set xlabel 'Station encoders'")

        p.puts("set ylabel 'Robot encoders'")

        p.puts("plot   '#{file0}' using 1:2 with linespoints title 'Left'")

        p.puts("replot '#{file1}' using 1:2 with linespoints title 'Right'")

                #p.puts ("set terminal postscript color landscape");

                #p.puts ("set output 'test.ps'");

                #p.puts ("replot");

        p.puts("pause -1");

        while (1)

        end

}

# Never reached

#File.delete('data0.tmp', 'data1.tmp')