/*
* Sample, h_cfade.java.
* For free use, copy, modify
* By La Trong Hung, latronghung@yahoo.com
* Last modified, 01/2001
* Summary: Similar to h_fade.java. See h_fade.java for comment 
*/

//===========================================================================================//

import java.applet.*;
import java.awt.*;
import java.awt.image.*;
import java.net.*;

//===========================================================================================//

public class h_cfade extends Applet implements Runnable{

	private Thread th = null;
	private MediaTracker mt;  
	private Image mainImg;
	private Graphics mainG;
	private String hung, link;
	private boolean Init_Complete = false;
	private boolean thSuspended = false; 
	private Image linkImg;			      		// message
	private String mesString;				// Message String
	private int  mouseX, mouseY;				// Mouse position
//h_cfade itself
	private MemoryImageSource memS;
	private int h_Iw, h_Ih;
	private Image img;
	private int m1, m2, m3;
	private final int d1 = 60, d2 = 100, d3 = 40;		// Fade width
	private int pix1[], pix2[], pix3[], pix[], pixc[];
	private String imgName1;
	private int flag;					// Flag to change pixc[]
	private int rr;						// Math.sqrt(h_Iw^2/4 + h_Ih^2/4)
	private int renderFlag;					// Flag to change render pattern

//---------------------------------Initialization------------------------------------------//
   public h_cfade(){}

   public void init(){
         						String Bean;
         Bean = getParameter("link");
         	link = (Bean != null) ? Bean : null;
		mesString = (link != null) ? link : "Sample by La Trong Hung";
         Bean = getParameter("hung");
         	hung = (Bean != null) ? Bean : "_self";
         Bean = getParameter("imagename1");
         	imgName1 = (Bean != null) ? Bean : "img1.jpg";
   }
   private void LoadImg(){
		Image img1;
       		mt = new MediaTracker(this);
       		img1 = getImage(getCodeBase(), imgName1);
           		mt.addImage(img1, 0);
       		try {
           		mt.waitForAll();
       		}
       		catch(InterruptedException e){};

       		h_Iw = img1.getWidth(this);
       		h_Ih = img1.getHeight(this);
       		pix1 = new int[h_Iw*h_Ih];
		grabPix(img1, pix1, h_Iw, h_Ih);
       		pix2 = new int[h_Iw*h_Ih];
		h_alternate(1, h_Iw, h_Ih, pix1, pix2);
       		pix3 = new int[h_Iw*h_Ih];
		h_alternate(2, h_Iw, h_Ih, pix1, pix3);
   }
   public void h_alternate(int fl, int w, int h, int[] pix, int[] p2){
       int i, r, g, b, a;
       for(i=0; i<w*h; i++){
             r = (pix[i] >> 16) & 0xFF;
             g = (pix[i] >>  8) & 0xFF;
             b = (pix[i]      ) & 0xFF;
		if(fl == 1){
             		a = r; r = g; g = b; b = a;
		}
		else{
             		a = r; r = b; b = g; g = a;
		}
             p2[i] = (r << 16) | (g << 8) | b | 0xFF000000;
       }
   }

   private void grabPix(Image im, int[] pix, int w, int h){
       		PixelGrabber h_PixGrab = new PixelGrabber(im, 0, 0, w, h, pix, 0, w);
       		try {
          		h_PixGrab.grabPixels();
       		}
       		catch (InterruptedException e){
           		System.out.println("grabber error" + e);
           		return;
       		}
       		if ((h_PixGrab.status() & ImageObserver.ABORT) != 0){
           		System.out.println("grabber error");
           		return;
       		}
   }
   private void render(){
	if(renderFlag == 1){
		handlePix1(m1, h_Iw, h_Ih,  pixc, pix);
		m1 += 3;
		if(m1 >= h_Ih){
			m1 = -d1;
			selectCopy();
			renderFlag = 2;
		}
	}
	else if(renderFlag == 2){
		handlePix2(m2, h_Iw, h_Ih,  pixc, pix);
		m2 += 3;
		if(m2 >= h_Iw + h_Ih){
			m2 = -d2;
			selectCopy();
			renderFlag = 3;
		}
	}
	else{
		handlePix3(m3, h_Iw, h_Ih,  pixc, pix);
		m3 += 2;
		if(m3 >= rr){
			m3 = -d3;
			selectCopy();
			renderFlag = 1;
		}
	}
   }
   private void selectCopy(){
	flag++; if(flag > 3) flag = 1;
	if(flag == 1)
		System.arraycopy(pix2, 0, pixc, 0, pix2.length);
	else if(flag == 2)
		System.arraycopy(pix3, 0, pixc, 0, pix3.length);
	else
		System.arraycopy(pix1, 0, pixc, 0, pix1.length);
   }
   private void initSetting(){
	 	LoadImg();
		flag = 1;
		renderFlag = 1;
		pix = new int[h_Iw*h_Ih];
		System.arraycopy(pix1, 0, pix, 0, pix1.length);
		pixc = new int[h_Iw*h_Ih];
		System.arraycopy(pix2, 0, pixc, 0, pix2.length);
		m1 = -d1; m2 = -d2; m3 = -d3;
		rr = (int)(Math.sqrt(h_Iw*h_Iw/4+h_Ih*h_Ih/4));
         	mainImg = createImage(h_Iw, h_Ih);
         	mainG = mainImg.getGraphics();
         	memS = new MemoryImageSource(h_Iw, h_Ih, pix, 0, h_Iw);

	 	mouseX = -1;
	 	mouseY = -1;
	 	linkImg = createMesImg(mesString);
           	Init_Complete = true;
   }
////////////////////////////INSERT VAR
int i, x, y = 0, k = 0;
int r1, g1, b1, r2, g2, b2;
int st, en;
float rate;
//////////////////////////////////////
   private void handlePix1(int m, int w, int h, int[] pc, int[] p){
	k = 0;
	y = m - 3;
	st = (m-3)*w;
	en = (m + d1)*w; if (en > w*h) en = h*w;
	for(i=st; i<en; i++){
			if(i != st && i % w == 0){
				y++; k++;
			}
			if(y >= 0){
				if(i < m*w) p[i] = pc[i];
				else{
             				r1 = (p[i] >> 16) & 0xFF;
             				g1 = (p[i] >>  8) & 0xFF;
             				b1 = (p[i]      ) & 0xFF;
             				r2 = (pc[i] >> 16) & 0xFF;
             				g2 = (pc[i] >>  8) & 0xFF;
             				b2 = (pc[i]      ) & 0xFF;
					rate = (float)k/(float)d1;
             				r1 = (int)((1-rate)*r2+rate*r1); if(r1 > 255) r1 = 255; if(r1 < 0) r1 = 0;
	     				g1 = (int)((1-rate)*g2+rate*g1); if(g1 > 255) g1 = 255; if(g1 < 0) g1 = 0;
	     				b1 = (int)((1-rate)*b2+rate*b1); if(b1 > 255) b1 = 255; if(b1 < 0) b1 = 0;
             				p[i] = (r1 << 16) | (g1 << 8) | b1 | 0xFF000000;
				}
			}
	}
   }
   private void handlePix2(int m, int w, int h, int[] pc, int[] p){
	y = 0;
	for(i=0; i<w*h; i++){
			if(i != 0 && i % w == 0){
				y++;
			}
			x = i - y*w;
			if(x + y > m && x + y <= m + d2){
             				r1 = (p[i] >> 16) & 0xFF;
             				g1 = (p[i] >>  8) & 0xFF;
             				b1 = (p[i]      ) & 0xFF;
             				r2 = (pc[i] >> 16) & 0xFF;
             				g2 = (pc[i] >>  8) & 0xFF;
             				b2 = (pc[i]      ) & 0xFF;
					rate = (float)(x+y-m)/(float)d2;
             				r1 = (int)((1-rate)*r2+rate*r1); if(r1 > 255) r1 = 255; if(r1 < 0) r1 = 0;
	     				g1 = (int)((1-rate)*g2+rate*g1); if(g1 > 255) g1 = 255; if(g1 < 0) g1 = 0;
	     				b1 = (int)((1-rate)*b2+rate*b1); if(b1 > 255) b1 = 255; if(b1 < 0) b1 = 0;
             				p[i] = (r1 << 16) | (g1 << 8) | b1 | 0xFF000000;
			}
	}
   }
///////////////INSERT VAR
int xu, yu, ra;
   private void handlePix3(int m, int w, int h, int[] pc, int[] p){
	y = 0;
	for(i=0; i<w*h; i++){
			if(i != 0 && i % w == 0){
				y++;
			}
			x = i - y*w;
	        	xu = x - h_Iw/2;
	        	yu = y - h_Ih/2;
			ra = (int)(Math.sqrt(xu*xu + yu*yu));
			if(ra > m && ra <= m + d3){
             				r1 = (p[i] >> 16) & 0xFF;
             				g1 = (p[i] >>  8) & 0xFF;
             				b1 = (p[i]      ) & 0xFF;
             				r2 = (pc[i] >> 16) & 0xFF;
             				g2 = (pc[i] >>  8) & 0xFF;
             				b2 = (pc[i]      ) & 0xFF;
					rate = (float)(ra-m)/(float)d3;
             				r1 = (int)((1-rate)*r2+rate*r1); if(r1 > 255) r1 = 255; if(r1 < 0) r1 = 0;
	     				g1 = (int)((1-rate)*g2+rate*g1); if(g1 > 255) g1 = 255; if(g1 < 0) g1 = 0;
	     				b1 = (int)((1-rate)*b2+rate*b1); if(b1 > 255) b1 = 255; if(b1 < 0) b1 = 0;
             				p[i] = (r1 << 16) | (g1 << 8) | b1 | 0xFF000000;
			}
	}
   }
   private void createMainImg(){
		if(Init_Complete == false){
			repaint();
			initSetting();
		}
		render();
		img = createImage(memS);
				mt = new MediaTracker(this);
	 	      		mt.addImage(img, 1);
 		      		try {
 		          		mt.waitForID(1);
 		      		}
 		      		catch(InterruptedException e){};
		mainG.drawImage(img, 0, 0, this);
		if(mouseX >= 0)
			mainG.drawImage(linkImg, mouseX, mouseY-16, this);
   }
//____________________________________State of thread_______________________________________//
   public void start(){
      	if(th == null){
         	th = new Thread(this);
         	th.start();
      	}
   }

   public void stop(){
      	if(th != null){
          	th.stop();
          	th = null;
      	}
   }

   public void destroy(){
        //All destroy
   }

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

   public void paint(Graphics g){
	if(Init_Complete == true){
	    	g.drawImage(mainImg, 0, 0, this);
	}
	else{
		g.setColor(Color.red);
		g.drawString("Initializing...", 10, 20);
	}
   }

   public void run(){
       	while(Thread.currentThread() == th){  
           	try {
  	             createMainImg();
                     repaint();
                     Thread.sleep(20);
                     System.gc();
            	} 
            	catch(InterruptedException E) {
                     E.printStackTrace();
            	}
       	}
   }
//____________________________________Applet Information_____________________________________//
   public String getAppletInfo() {
		return "Name: h_cfade\r\n" + "Author: La Trong Hung\r\n" + "Created with JDK 1.02";
   }

   public String[][] getParameterInfo()
   {
		String[][] info =
		{
			{ "link", "A String value", "URL to jump" },
			{ "imagename1", "A String value", "Name of Image" },
		};
		return info;		
   }
//____________________________________Mouse activity_________________________________________//
   public boolean mouseDown(Event evt, int x, int y){
      	if (link != null){
	         try{
        		    URL url = new URL(getDocumentBase(), link);
		            getAppletContext().showDocument(url, hung);
		            if (hung.equals("_self")){
               				stop();
            	 	    }
         	 }
         	 catch (MalformedURLException E){
            		    E.printStackTrace();
         	 }
      	}
      	else{
		 if (thSuspended) th.resume();
		 else  th.suspend();
		 thSuspended = !thSuspended;
      	}
      	return(true);
   }
   public boolean mouseEnter(Event evt, int x, int y){
         	showStatus(mesString);
		mouseX = x;
		mouseY = y;
      		return(true);
   }
   public boolean mouseMove(Event evt, int x, int y){
		mouseX = x;
		mouseY = y;
		return(true);
   }
   public boolean mouseExit(Event evt, int x, int y){
         	showStatus("");
		mouseX = -1;
		mouseY = -1;
      		return(true);
   }
//_____________________________________Message______________________________________________//
	public Image createMesImg(String mes){
		Image linkImage;
		Graphics g;
		int mw;
		int mh = 16;
		mw = 6*mes.length();
		linkImage = createImage(mw, mh);
		g = linkImage.getGraphics();
		g.setColor(new Color(255, 255, 190));
		g.fillRect(0, 0, mw, mh);
		g.setColor(Color.black);
		g.drawRect(0, 0, mw-1, mh-1);
		g.drawString(mes, 4, 12);
		return linkImage;
	}
}