// Chloe Chao
// PeteNSally.java
// Sync sound and text with two silly phrases

import java.applet.*;
import java.awt.*;
import java.io.*;
import java.lang.*;
import java.util.Vector;
import java.util.StringTokenizer;
import java.net.*;

public class PeteNSally extends Applet implements Runnable {

  AudioClip petey;
  AudioClip sally;
  Thread thread;          // animation thread
  int sleepRate = 100;    // sleep between redraw in milliseconds
  Button button;
  Choice choice;
  int PETER = 0;
  int SALLY = 1;
  ImageCanvas imageCanvas;
  Graphics offg;
  Image displayImage;
  int maxFrames=0;
  int currFrameNum=0;
  Vector alphabet;
  public static final int NW = 0;
  public static final int NE = 1;
  public static final int SE = 2;
  public static final int SW = 3;

  int UNIT = 4;
  int currx, curry;

public void init() {  
  alphabet = new Vector();

  // Draw the gui.
  Panel p = new Panel();
  p.setLayout(new GridLayout(0,2));
  makeChoice();
  p.add("West", choice);
  makeButton();
  p.add("East", button);
 
 BorderLayout b = new BorderLayout();
  setLayout(b);
  add( "North", p );   
  makeImageCanvas();
  add( "South", imageCanvas );

    // Create the image
  displayImage = createImage(size().width,size().height);
  offg = displayImage.getGraphics();
  offg.setColor( Color.black );
  imageCanvas.setImage(displayImage);
  imageCanvas.repaint();

  //Read in the homemade font file.
  fetch("http://acg.media.mit.edu/mas962/users/cchao/ps8/soundfontcode.txt");

  // Load up the two sounds.
  URL up = null;
  URL us = null;
  try {
    up = new URL(getDocumentBase(),"petey.au");
    us = new URL(getDocumentBase(),"sally.au");
  }
  catch (MalformedURLException e) {}
  petey = getAudioClip(up);
  sally = getAudioClip(us);
  
  // Start the applet thread.
  thread = new Thread( this );
  thread.start();

} // init
public void start() {
  if (thread != null) {
    thread.resume();
  }
} // start

public void stop() {
  if (thread != null) {
    thread.suspend();
  }
} //stop

public void destroy() {
  if(thread != null) {
    thread.stop();
  }
} // destroy

public void run() {
 try {
   while( true ) {
     long start = System.currentTimeMillis();
     offg = displayImage.getGraphics();
     speak();
     repaint();
     // pause between frames (if it didn't take too long already)e
     long elapsed = System.currentTimeMillis() - start;
     long sleep = (long)sleepRate - elapsed;
     if (sleep > 0) {
       thread.sleep(sleep);
     }

   }
 } catch (InterruptedException e) {}
} // run

private void speak() {
  // Each sound less than a second. (1 sec=1000 milliseconds?)
  currFrameNum++;
  if( currFrameNum >= maxFrames ) {
    // The animation is over.
    maxFrames = 0;
    currFrameNum = 0;
  }

  else if( choice.getSelectedIndex()==PETER ) {
    switch( currFrameNum ) {
    //case 1:
    case 2:
      drawLetter('P', Color.black, UNIT*12, currx, curry);
      writeWord(new String("ETER"));
      break;
    case 7: 
      drawLetter('P', Color.black, UNIT*12, currx, curry);
      writeWord(new String("IPER"));
      break;
    case 14:
      drawLetter('P', Color.black, UNIT*12, currx, curry);
      writeWord(new String("ICKED A"));
      break;
    case 18://18:
      drawLetter('P', Color.black, UNIT*12, currx, curry);
      writeWord(new String("ECK OF"));
      break;
    case 25://25:
      drawLetter('P', Color.black, UNIT*12, currx, curry);
      writeWord(new String("ICKLED"));
      break;
    case 29://29:
      drawLetter('P', Color.black, UNIT*12, currx, curry);
      writeWord(new String("EPPERS"));
      break;
    case 3:	
    case 8:
    case 15:
    case 19:
    case 26:
    case 30:
      drawLetter('P', Color.gray, UNIT*12, currx, curry);
      break;  
  
    default:
      offg.setColor(Color.white);
      offg.fillRect( 0, 0, this.size().width, this.size().height);
      break;
    } // switch
    
  }// else if peter
  else if( choice.getSelectedIndex()==SALLY ) {
    switch( currFrameNum ) {
    case 2:
      drawLetter('S', Color.black, UNIT*12, currx, curry);
      writeWord("ALLY");
      break;
    case 9:
      drawLetter('S', Color.black, UNIT*12, currx, curry);
      writeWord("ELLS");
      break;
    case 12:
    case 27:
      //offg.setColor(Color.white);
      //offg.fillRect( 0, 0, this.size().width, this.size().height);        
      drawLetter('S', Color.black, UNIT*12, currx, curry);
      writeWord("EA");
      break;
    case 15:
      drawLetter('=', Color.black, UNIT*12, currx, curry);
      writeWord(" ELLS");
      break;
    case 24:
    case 25:
      writeWord("AT THE");
      break;
    case 30:
      drawLetter('=', Color.black, UNIT*12, currx, curry);
      writeWord(" ORE");
      break;
    case 3:
    case 10:
    case 13:
    case 28:
      drawLetter('S', Color.gray, UNIT*12, currx, curry);
      break;
    case 16:
    case 31:
      drawLetter('=', Color.gray, UNIT*12, currx, curry);
      break;
    default:
      offg.setColor(Color.white);
      offg.fillRect( 0, 0, this.size().width, this.size().height);
      break;
    }// switch
  }// else if sally
  

} // speak

private void writeWord(String s) {
  int xx = currx+(11*UNIT);
  int yy = curry;
  for( int i=0; i<s.length(); i++ ) {
    System.out.println("The letter is: "+s.charAt(i));
    drawLetter( s.charAt(i), Color.gray, UNIT*12, xx, yy );
    xx+=(11*UNIT);
  }

} // writeWord


private void drawLetter( char ch, Color col, int dim, int x, int y) {
  CodeString currCS = findCodeString( ch );
  
  if( currCS!=null ) { 
    //    int dim  = UNIT*12;
    int unit = dim/12;
    Image i2 = currCS.getImage();
    Graphics g2 = i2.getGraphics();
    g2.setColor( Color.white );
    g2.fillRect( 0, 0, 2*dim, dim );
    g2.setColor( col );
     for( int i=0; i<currCS.lines.size();) {
      Point b = (Point)currCS.lines.elementAt(i++);
      Point e = (Point)currCS.lines.elementAt(i++);
      g2.drawLine( b.x*unit, b.y*unit, e.x*unit, e.y*unit );
    }
    
    for( int i=0; i<currCS.arcs.size();) {
      Point p = (Point)currCS.arcs.elementAt(i++);
      Point d = (Point)currCS.arcs.elementAt(i++);
      Point a = (Point)currCS.arcs.elementAt(i++);
      g2.drawArc( p.x*unit, p.y*unit, d.x*unit, d.y*unit, a.x, a.y );
    }
    for( int i=0; i<currCS.serifs.size(); i++) {
      Polygon q = (Polygon)currCS.serifs.elementAt(i);
      g2.fillPolygon( q );
      g2.drawPolygon(q);
    }
    offg.drawImage( i2, x, y, this );
  }
} // drawLetter

private CodeString findCodeString( char code ) {
  CodeString cs = null;
  boolean searching = true;
  int j=0;
  while( searching && j<alphabet.size()) {
    cs = (CodeString)alphabet.elementAt( j );
    char key = cs.getCode();
    //System.out.println("KEY is: "+key );
    if( key == code ) {
      //                                    codestring = cs.codestring;
      searching = false;
      System.out.println("found it: "+code);
    }
    j++;
  }
  
  if( searching ) {//Didn't find a match.
    // Add a space?
    return null;
  }
  else {
    return cs;
  }

} // findCodeString

public void update(Graphics g) {
    paint(g);
} // update

public void paint (Graphics g) {
  paintComponents(g);
  imageCanvas.setImage(displayImage);
  imageCanvas.repaint();
  g.drawImage(displayImage, 0, 0, this);
} // paint


public boolean action(Event e, Object arg) {
  if (e.target == button) {
    offg = displayImage.getGraphics();

  // Clear the background.
  offg.setColor(Color.white);
  offg.fillRect( 0, 0, this.size().width, this.size().height);
  currx = size().width/5;
  curry = size().height/5;

    if( choice.getSelectedIndex()==PETER ) {
      maxFrames = 35;
      currFrameNum = 0;
      petey.play();
    } //if
    else if( choice.getSelectedIndex()==SALLY ) {
      maxFrames = 38;
      currFrameNum = 0;
      sally.play();
    } // else if
    return true;
  }
  return false;

} // action

public void fetch (String address) {
  showStatus("Reading in the font file.");

  byte buf[] = null;

  Image img;
  Graphics gg;

  if (!alphabet.isEmpty())
    alphabet.removeAllElements();
  try {
    URL url = new URL(address);

    StreamTokenizer tokens = new StreamTokenizer(url.openStream());

    int token;


    tokens.ordinaryChar(';'); // signifies end of commands
    tokens.ordinaryChar('|'); // signifies eol
    tokens.whitespaceChars( '(', ')' );
    tokens.eolIsSignificant(true);
    tokens.commentChar('%');

    tokens.wordChars('<', '@' );

    // Get first token.
    token = tokens.nextToken();


    // While not eof
    while (token != tokens.TT_EOF) {
      // While not eol
      while ( token != tokens.TT_EOL ) {
	// Take the first Integer of the line as the letter.
	if( tokens.sval != null ) {
	  String codestr = tokens.sval;
	  char code = codestr.charAt(0);
	  //System.out.println("code: "+code);
	  Image ii=createImage(UNIT*24, UNIT*12 );
	  URL uu = null;
	  try {
	    uu = new URL(getDocumentBase(), "sounds/ch.au"); 
	  } // try
	  catch (MalformedURLException e) {}
	  CodeString cs = new CodeString( code, UNIT, ii, getAudioClip(uu) );//****
	  alphabet.addElement( cs );
	  img = cs.getImage();
	  gg = img.getGraphics();
	  gg.setColor( Color.black );
	  // Get the next token and start parsing for operators.
	  // I don't have any error-checking. Sorry.
	  //token = tokens.nextToken();
	  while( (token=tokens.nextToken())!='|' ) {
	    if( token == tokens.TT_WORD ) {
	      if (tokens.sval.equals( "stop" )) {
		//cs.setColor(STOP);
	      }
	      if (tokens.sval.equals( "fricative" )) {
		//cs.setColor(FRICATIVE);
	      }
	      if (tokens.sval.equals( "affricate" )) {
		//cs.setColor(AFFRICATE);
	      }
	      if (tokens.sval.equals( "nasal" )) {
		//cs.setColor(NASAL);
	      }
	      if (tokens.sval.equals( "liquid" )) {
		//cs.setColor(LIQUID);
	      }
	      if (tokens.sval.equals( "glide" )) {
		//cs.setColor(GLIDE);
	      }
	      if (tokens.sval.equals( "serifs" )) {
		// Get the number of serifs to draw.
		//tokens.nextToken();
		//int numOfSerifs = (int)tokens.nval;
		//for(int i=0; i<numOfSerifs; i++) {
		while( (token= tokens.nextToken())!=';') {
		  int d, x, y;
		  if( tokens.sval.equals("nw") )
		    d=NW;
		  else if( tokens.sval.equals("ne") )
		    d=NE;
		  else if( tokens.sval.equals("se") )
		    d=SE;
		  else
		    d=SW;
		  tokens.nextToken();
		  x = (int)tokens.nval;
		  tokens.nextToken();
		  y = (int)tokens.nval;
		  drawSerifs( d, x*UNIT, y*UNIT, gg, cs );
		}//end while
		//}// end for
	      }//end if serifs
	      else if( tokens.sval.equals( "lines" )) {
		while( (token= tokens.nextToken())!=';') {
		  int x1, y1, x2, y2;
		  x1 = (int)tokens.nval;
		  tokens.nextToken();
		  y1 = (int)tokens.nval;
		  tokens.nextToken();
		  x2 = (int)tokens.nval;
		  tokens.nextToken();
		  y2 = (int)tokens.nval;
		  gg.drawLine( x1*UNIT, y1*UNIT, x2*UNIT, y2*UNIT );
		  cs.lines.addElement( new Point( x1, y1 ) );
		  cs.lines.addElement( new Point( x2, y2 ) );
		}//end while
	      }// end else if lines
	      else if( tokens.sval.equals( "arcs" )) {
		while( (token= tokens.nextToken())!=';') {
		  int x, y, w, h, start, end;
		  x = (int)tokens.nval;
		  tokens.nextToken();
		  y = (int)tokens.nval;
		  tokens.nextToken();
		  w = (int)tokens.nval;
		  tokens.nextToken();
		  h = (int)tokens.nval;
		  tokens.nextToken();
		  start = (int)tokens.nval;
		  tokens.nextToken();
		  end = (int)tokens.nval;
		  gg.drawArc( x*UNIT, y*UNIT, w*UNIT, h*UNIT, start, end );
		  cs.arcs.addElement( new Point( x, y) );
		  cs.arcs.addElement( new Point(w, h));
		  cs.arcs.addElement( new Point(start,end));
		}// end while
	      }// end else if arcs
	      else if( tokens.sval.equals( "polygon" )) {
		Polygon p = new Polygon();
		//Read in the points until you hit a ';'
		while( (token= tokens.nextToken())!=';') {
		  int x, y;
		  x = (int)tokens.nval;
		  token= tokens.nextToken();
		  y = (int)tokens.nval;
		  p.addPoint(x*UNIT,y*UNIT);
		}// end while
		gg.fillPolygon(p);
		gg.drawPolygon(p);
	      }// end else if polygon
	      else if( tokens.sval.equals( "audio" )) {
		tokens.nextToken();
		/*		StringBuffer SOUNDPATH = new StringBuffer("sounds/");
		SOUNDPATH.append(tokens.sval);
		//System.out.println("the file is: "+SOUNDPATH);
		URL theURL = null;
		try {
		  theURL = new URL(getDocumentBase(), SOUNDPATH.toString()); 
		} // try
		catch (MalformedURLException e) {
		  System.out.println("Hit a bad URL: "+e);
		} // catch 
		AudioClip theSound = getAudioClip( theURL );
		cs.setSound( theSound );
		*/	      }// end else if audio
	    }// end if TT.WORD
	  }// end while not "|"
	}// end if tokens.sval!=null
	token = tokens.nextToken();


      }//END while not EOL
      token = tokens.nextToken();
    }//END while not EOF
    //}//END if( FILE_READABLE )
    System.out.println("finished reading font file");
  }//END try
  catch (MalformedURLException e) {
    System.err.println(e);
    return;
  }
  catch (IOException e) {
    System.err.println(e);
    return;
  }
  showStatus("Finished reading in font file.");
} // fetch

private void drawSerifs( int direction, int x, int y, Graphics gf, CodeString cs ) {
  Polygon p = new Polygon();
  p.addPoint( x,y );
  switch(direction) {
  case NW:
    p.addPoint(x,y-(2*UNIT)); p.addPoint( x-(2*UNIT), y);
    break;
  case NE:
    p.addPoint(x+(2*UNIT), y); p.addPoint(x, y-(2*UNIT));
    break;
  case SE:
    p.addPoint(x, y+(2*UNIT)); p.addPoint(x+(2*UNIT), y);
    break;
  case SW:
    p.addPoint(x-(2*UNIT), y); p.addPoint(x, y+(2*UNIT));
    break;
  default:
    break;

  }// end switch
  p.addPoint(x,y);
  gf.fillPolygon(p);
  gf.drawPolygon(p);
  cs.addSerif(p);

} // drawSerifs

private void makeChoice() {
  choice = new Choice();
  choice.addItem("Peter Piper picked a peck of pickled peppers.");
  choice.addItem("Sally sells seashells at the seashore.");
}

private void makeButton() {
  button = new Button("start talking.");
}

private void makeImageCanvas() {
  imageCanvas = new ImageCanvas();
}

} // PeteNSally

class ImageCanvas extends Canvas {
  Image image;
public ImageCanvas () {
}
public void setImage( Image image ) {
  this.image = image;
}
public void paint( Graphics g ) {
  g.drawImage(this.image, 0, 0, this);
}
} // ImageCanvas

/////////////////////////////////////////////////////////////
//All the letters of the homemade font are 8x8 so to allow
//for overreach make Image 12x12
class CodeString extends Object {
  char code;
  Color color;
  Image i;
  int u;
  int width;
  AudioClip sound;
  public Vector lines, serifs, arcs;
  
public CodeString( char code, int unit, Image image, AudioClip a ) {
  this.code = code;
  this.u = unit;
  this.i = image;
  this.color = Color.black;
  Graphics g= i.getGraphics();
  //  g.setColor( Color.black );
  g.fillRect( 0, 0, u*12, u*12 );
  lines = new Vector();
  serifs = new Vector();
  arcs = new Vector();
  this.sound = a;
  switch( code ) {
  case '<':
  case '=':
  case '>':
  case '?':
  case '@':
    this.width = u*19;
    break;
  default:
    this.width = u*12;
    break;
  }

}
  
public void addSerif( Polygon p ) {
  serifs.addElement(p);
}
  
public char getCode() {
  return this.code;
}
  
public void setColor(Color col) {
  this.color = col;
}

public Color getColor() {
  return this.color;
}
  
public Image getImage() {
  return this.i;
}

public void setSound( AudioClip audio ) {
  this.sound = audio;
}

public AudioClip getSound() {
  return this.sound;
}

public int getWidth() {
  return this.width;
}

} // CodeString