--- ARCHIVED EXAMPLE (may not be current) ---
--- See notes at http://www.wellho.net/mouth/2654.html ---

// Well House Consultants, 2002.

/** General Graphing Applet */

/* Fancy up the graphics and font handling! */

import java.awt.*;
import java.awt.event.*;
import java.util.*;
import java.io.*;

public class hawfinch extends java.applet.Applet {

// Data related - fixed across applets

   static int value_count;
   static int highest;
   static int [] income;
   static String title;
   static int start_year;

   static int happenings = 0;
   static Hashtable happen_text;

// To share across instances to allow consistency

   static Font large_font, medium_font, small_font;
   static Font label_font;
   static FontMetrics label_metrics;

// Applet instance specific

   static int window_width;
   static int window_height;
// Position for labelling box;
   static int value_upper_x;
   static int value_lower_y;
   static int value_upper_y;
   static int value_lower_x;

// Extended / Replaced methods

   public void init() {

// Values to Graph

   Vector income_build = new Vector();
   String passed_in = this.getParameter("values");
   StringTokenizer values_in = new StringTokenizer(passed_in,",");
   while (values_in.hasMoreTokens())
      {
      Integer next_value = Integer.valueOf(values_in.nextToken().trim());
      income_build.addElement(next_value);
      }
   income = new int [income_build.size()];
   for (int k=0;k<income_build.size();k++)
      {
      income[k] = ((Integer)income_build.elementAt(k)).intValue();
      }

// What parameters *are* available??

// getParameterInfo

// Title

   title = this.getParameter("title");
   if (title == null) title = "Web Author has not supplied Title";

// Base Scale

   start_year = (Integer.valueOf(this.getParameter("base"))).intValue();

// Happenings

   String happen, year;
   happen_text = new Hashtable();
   for (int k=start_year;k<start_year+income.length+1;k++)
      {
      happen = this.getParameter(year=String.valueOf(k));
      if (happen != null)
         { happenings++;
         happen_text.put(year,happen);
         }
      }

// Other initialisations

   large_font = new Font("TimesRoman",Font.BOLD,36);
   medium_font = new Font("TimesRoman",Font.ITALIC,18);
   small_font = new Font("TimesRoman",Font.PLAIN,9);

   }

   public void start() {
   }

   public void paint(Graphics mycanvas) {
   mycanvas.setColor(Color.blue);

// window_width = getSize().width-1; // Java 1.1
// window_height = getSize().height-1;

   window_width = size().width-1; // Java 1.0
   window_height = size().height-1;

   Font headline_font;

   if (window_width > 500 && window_height > 400)
      {
         headline_font = large_font;
         label_font = medium_font;
      } else {
         headline_font = medium_font;
         label_font = small_font;
      }
   FontMetrics headline_metrics = getFontMetrics(headline_font);
   label_metrics = getFontMetrics(label_font);

   mycanvas.fillRect(0,0,window_width,window_height);

   highest = income[0];
   for (int k=1;k<income.length;k++)
      if (highest < income[k]) highest = income[k];
   value_count = income.length;

   mycanvas.setColor(Color.red);
   int xstep = getAxisStep(income.length);
   int ystep = getAxisStep(highest);

   grid(mycanvas,xstep,ystep);

   mycanvas.setColor(Color.yellow);
   int textpos = toXPixel(income.length/2) -
              headline_metrics.stringWidth(title) / 2 ;
   int text_y;
   if (textpos < 60) {
      textpos = toXPixel(income.length/2) -
              label_metrics.stringWidth(title) / 2 ;
      mycanvas.setFont(label_font);
      text_y = label_metrics.getAscent()+5;
   } else {
      mycanvas.setFont(headline_font);
      text_y = headline_metrics.getAscent()+5;
      }
   mycanvas.drawString(title, textpos, text_y);
   value_upper_x = window_width -20;
   value_lower_y = text_y+20;
   mycanvas.setFont(label_font);

   for (int k=0; k<income.length;k+=(2*xstep))
      {
      String year = String.valueOf(k+start_year);
      int xfrom = toXPixel(k)-label_metrics.stringWidth(year)/2;
      int yfrom = toYPixel(0)+label_metrics.getAscent()+1;
      mycanvas.drawString(year,xfrom,yfrom);
      }

   for (int k=0; k<highest;k+=(2*ystep))
      {
      String level = String.valueOf(k);
      textpos = toXPixel(0)-5-label_metrics.stringWidth(level);
      int yfrom = toYPixel(k);
      mycanvas.drawString(level,textpos,yfrom);
      }

   int haps = 1, hapstep = (window_height/2 - text_y - 10) / (happenings+1) ;
   for (int k=0;k<income.length;k++)
      {
      int xfrom = toXPixel(k);
      int xto = toXPixel(k+1);
      int yto = toYPixel(0);
      int yfrom = toYPixel(income[k]);

// Was this an event year?

      String year;
      String report = (String) happen_text.get((year=String.valueOf(k+start_year)));
      if (report == null)
         {
         mycanvas.setColor(Color.white);
      } else {
         int xbase, ybase;
         mycanvas.setColor(Color.yellow);
         mycanvas.drawString(year + " - " + report,xbase=5+haps*hapstep,
                  ybase=haps*hapstep+text_y);
         mycanvas.setColor(Color.green);
         mycanvas.drawLine(xbase+hapstep/2,ybase+4,xbase+hapstep/2,
            window_height/2-10);
         mycanvas.drawLine(xbase+hapstep/2, window_height/2-10,
                  (xfrom+xto)/2,yto);
         haps++;
         }

      // enableEvents(AWTEvent.MOUSE_EVENT_MASK);

      mycanvas.fillRect(xfrom,yfrom,xto-xfrom,yto-yfrom);
      try {
          Thread.sleep(500);
          }
      catch (InterruptedException fred)
         {k=income.length;}
      }

   }

   public boolean mouseDown(Event selection,int xlocn, int ylocn)
      {
      int requested = fromXPixel(xlocn);

      Graphics addon = getGraphics();

      if (requested < 0 || requested >= income.length)
         {
         addon.setColor(Color.blue);
         addon.fillRect(value_lower_x-2,value_lower_y-2,
              value_upper_x-value_lower_x+4, value_upper_y-value_lower_y+4);
      } else {

         String Line1 = "Value for "+(requested+start_year);
         String Line2 = "\u00a3"+income[requested];

         addon.setColor(Color.red);
         value_lower_x = value_upper_x -label_metrics.stringWidth(Line1)-40;
         value_upper_y = value_lower_y +40+2*label_metrics.getHeight()+
                             label_metrics.getLeading();
         addon.fillRoundRect(value_lower_x,value_lower_y,
              value_upper_x-value_lower_x, value_upper_y-value_lower_y,10,10);
         addon.setColor(Color.white);
         addon.fillRoundRect(value_lower_x+5,value_lower_y+5,
              value_upper_x-value_lower_x-10,
              value_upper_y-value_lower_y-10,10,10);
         addon.setColor(Color.black);

         addon.setFont(label_font);
         addon.drawString(Line1, value_lower_x+20 , value_upper_y -20 -
                label_metrics.getHeight()-label_metrics.getLeading());
         int midpoint = (value_lower_x + value_upper_x ) / 2 -
                label_metrics.stringWidth(Line2) / 2;
         addon.drawString(Line2, midpoint , value_upper_y -20);
         }
      return true;
      }

// I feel an object coming on here!

   private static int getAxisStep(int range)
      {
      int stepsize, step = 0, power = 1;
      int [] nice_steps = {1,2,5} ;

      while (range/(stepsize=(nice_steps[step%nice_steps.length]*power)) > 15)
           if (++step%nice_steps.length == 0) power *=10;
      return stepsize;
      }

   private static void grid(Graphics graph_area,int xsep, int ysep)
      {
      int y1 = toYPixel(0);
      int y2 = toYPixel(highest);
      for (int k=0;k<value_count;k+=xsep)
         {
         int xval = toXPixel(k);
         graph_area.drawLine(xval,y1,xval,y2);
         }
      int x1 = toXPixel(0);
      int x2 = toXPixel(value_count);
      for (int k=0;k<highest;k+=ysep)
         {
         int yval = toYPixel(k);
         graph_area.drawLine(x1,yval,x2,yval);
         }
      graph_area.drawRect(x1,y2,x2-x1,y1-y2);
      }

   private static int toXPixel (int value)
      {
      // Allow 80 pixels to left for labelling
      return value*(window_width-100)/value_count+80;
      }

   private static int fromXPixel (int value)
      {
      // Allow 80 pixels to left for labelling
      // return value*(window_width-100)/value_count+80;
      return (value-80)*value_count/(window_width-100);
      }

   private static int toYPixel (int value)
      {
      // bottom half of window, allowing 40 pixels for title
      return window_height - value*(window_height-40)/highest/2 - 20;
      }

   public void stop() {
   }

   public void destroy () {
   }

}