#! /usr/bin/octave

load 20100423.dat;
[time, x, y, z, dt, dx, dy, dz, ds, hr, dist] = \
forerunner(data_20100423);
maxx = max(time./60);
top = max(hr)*1.1;
__gnuplot_set__ term png
__gnuplot_set__ output "20100423_heartrate.png"
#__gnuplot_set__ multiplot
__gnuplot_set__ title "Heartrate on April 23, 2010 Tempo Run"
__gnuplot_set__ xlabel "Time in Minutes"
__gnuplot_set__ ylabel "Heartrate (beats/min)"
#__gnuplot_set__ ydata time
#__gnuplot_set__ timefmt "%S"
#__gnuplot_set__ format y "%M:%S"
__gnuplot_set__ yrange [0:200];
#__gnuplot_set__ xrange [0:130];
__gnuplot_set__ grid
x=0:1:130;
Z = but_zones(164);
#__gnuplot_set__ label "Heartrate";
plot (time/60, hr)
#load 20090617.dat;
#[timel, xl, yl, zl, dtl, dxl, dyl, dzl, dsl, hrl, distl] = forerunner(data_20090617);
#plot (time/60, hr, "1;HR over 13.2 miles at 8:59;", timel/60, hrl, "3;HR over 13.33 miles at 9:43;")
#, x, 0*x+Z(3), ";Top of Zone 2;", x, 0*x+Z(4), ";Bottom of Zone 4;")
#__gnuplot_set__ nomultiplot