# Plot the biorhythm curves between start and start+30
# Save output into the file pbio.ppm
start = ?
bio(day, cycle) =  sin((real(day-1+start)/cycle)*2*pi) * 100
set term pbm color
set output "/home/staff/ad/www_public/code/biorhythm/pbio.ppm"
set xlabel "Biorhythm Chart for @"
set xtics 1,1,31
plot [x=1:31] \
  bio(x,23) title 'Physical', \
  bio(x,28) title 'Emotional', \
  bio(x,33) title 'Intellectual'