// =======================================================================
//                     箱入り娘 Applet ver 1.60                           
//                                               (c) BakuretuKen 1995-2002
//                                http://hp.vector.co.jp/authors/VA006860/
// =======================================================================

import java.applet.Applet;
import java.awt.*;
import java.io.*;
import java.net.*;
import java.util.StringTokenizer;

public class HakoApplet extends Applet implements Runnable {
	
	Image images[];
	MediaTracker mt;
	Thread thread;
	int   i, last;
	int   x[], y[];
	int   sx[], sy[];
	int   imgno[];
	int   field[];
	int   no = 0, oldx, oldy;
	boolean  iswin = false;
	String jumpUrl;
	
	
	public void init() {
	
		int level;
		String s;
		field  = new int[120];
		images = new Image[14];
		
		String imagedir = null;
		s = getParameter("imagedir");
		if (s != null) imagedir = s;
		s = getParameter("level");
		level = Integer.parseInt(s);
		s = getParameter("jump");
		if (s != null) jumpUrl=s; else jumpUrl=null;
		
		x  = new int [12];
		y  = new int [12];
		sx = new int [12];
		sy = new int [12];
		imgno = new int [12];
		mt    = new MediaTracker(this);
		
		// System.out.println("No  =  "+ level );
		
		switch ( level ) {
			case 1: level1(); break;
			case 2: level2(); break;
			case 3: level3(); break;
			case 4: level4(); break;
			case 5: level5(); break;
			default: level1(); break;
		}
		
		for ( i=0; i<14; i++) {
			images[i] = getImage(getDocumentBase(),imagedir + "/koma"+i+".gif");
			mt.addImage( images[i], 0);
		}
		
		//  フィールド制作
		for ( i=0; i<120; i++)  field[i] = 0;
		
		for ( i=0; i<10; i++)  field[ i ]     = 99;
		for ( i=0; i<10; i++)  field[ i+110 ] = 99;
		for ( i=0; i<12; i++)  field[ 10*i]   = 99;
		for ( i=0; i<12; i++)  field[ 9+10*i] = 99;
		
		init_field();		// フィールドこま制作
		
	} // init()
	
	// 作画 PAINT()
	public void paint(Graphics g) {
		
		int j;
		setBackground( Color.white ) ;
		
		// エラー表示
		if (mt.isErrorID(0)) {
			g.setColor(Color.red);
			g.fillRect(0, 0, size().width, size().height);
			g.setColor(Color.yellow);
			g.drawString("Error", 20, 60);
			return;
		}
		
		if (mt.checkID(0)) {
		
			if (thread != null) {
				thread.stop();
				thread = null;
			}
			
			g.setColor( Color.black );
			g.fillRect( 32, 32, 8*32, 10*32 );
			g.setColor( Color.white );
			g.fillRect( 4*32, 11*32, 4*32, 32 );
			
			// 周り作画
			for ( i=0; i<10; i++)
				g.drawImage( images[0], i*32,     0, this);
			for ( i=0; i<3; i++)
				g.drawImage( images[0], i*32, 11*32, this);
			for ( i=7; i<10; i++)
				g.drawImage( images[0], i*32, 11*32, this);
			
			for ( i=0; i<12; i++)
				g.drawImage( images[0],    0,  i*32, this);
			for ( i=0; i<12; i++)
				g.drawImage( images[0], 9*32,  i*32, this);
			
			// ゴール作画
			g.drawImage( images[13], 3*32,  11*32, this);
			
			// こま作画
			for ( i=1; i<last; i++)
				g.drawImage( images[imgno[i]], x[i]*32,  y[i]*32, this);
			
			if (iswin == true)
				g.drawImage( images[12], 0,  0, this);
		} else {
			// 画像ローディング
			g.setColor(Color.blue);
			g.setFont(new Font("TimesRoman", Font.ITALIC, 16 ));
			g.drawString("Hakoiri Musume Ver 1.60 (c)BakuretuKen", size().width/2-150, 30);
			g.setColor(Color.red);
			g.drawString("Now Loading .....", size().width/2-50, size().height/2);
		}
	} // paint()
	
	
	public void start() {
		if (thread == null) {
			thread = new Thread(this);
			thread.start();
		}
	} // start()
	
	
	public void stop() {
		if (thread != null) {
			thread.stop();
			thread = null;
		}
	} // stop()
	
	
	public void run() {
		
		while( true ){
			try {
				mt.waitForID(0);
			} catch (InterruptedException e) { return; }
			try {
				thread.sleep( 500 );
			} catch (InterruptedException e) { return; }
			repaint();
		}
	} // run()
	
	
	public void init_field() {
		
		int xx, yy;
		for ( i=1; i<last; i++)
			for ( xx=0; xx<sx[i]; xx++ )
				for ( yy=0; yy<sy[i]; yy++ )
					field [ x[i]+xx  +  ( y[i]+yy )*10 ] = i;
	} // init_field()
	
	
	public void clear_field() {
		
		Graphics g = getGraphics();
		int xx, yy;
		g.setColor( Color.black );
		g.fillRect( x[no]*32, y[no]*32, sx[no]*32, sy[no]*32 );
		
		for ( xx=0; xx<sx[no]; xx++ )
			for ( yy=0; yy<sy[no]; yy++ )
				field [ x[no]+xx  +  ( y[no]+yy )*10 ] = 0;
	} // clear_field()
	
	
	public void put_field() {
		
		Graphics g = getGraphics();
		int xx, yy;
		g.drawImage( images[imgno[no]], x[no]*32,  y[no]*32, this);
		
		for ( xx=0; xx<sx[no]; xx++ )
			for ( yy=0; yy<sy[no]; yy++ )
				field [ x[no]+xx  +  ( y[no]+yy )*10 ] = no;
		
		if ( x[1]==3 && y[1]==7 ) iswin = true;
		
		if (iswin == true)
			g.drawImage( images[12], 0,  0, this);
		
	} // put_filed()
	
	
	public boolean mouseDown(Event e, int x, int y) {
		
		if (iswin == false){
			no = 0; i =0; oldx = x; oldy =y;
			no = field [ y/32 * 10 + x/32 ];
			if ( no==99 ) no = 0;
			if ( no!=0 ){
				// マウスカーソル変更
				setCursor(new Cursor(Cursor.HAND_CURSOR));
			}
		} else {
			if(jumpUrl != null){
				try {
					this.getAppletContext().showDocument( new URL(getDocumentBase(), jumpUrl), "_self");
				} catch ( IOException err ) {
					System.err.println("URL JUMP Error !!!");
				}
			}
		}
		return true;
	} // mouseDown()
	
	
	public boolean mouseDrag(Event e, int x, int y) {
		
		if (no != 0) {
			if ( y-oldy > 20 ) DownKoma( x, y );
			if ( oldy-y > 20 ) UpKoma( x , y );
			if ( x-oldx > 20 ) RightKoma( x , y );
			if ( oldx-x > 20 ) LeftKoma( x , y );
		}
		return true;
	} // mouseDrag()
	
	
	public boolean mouseUp(Event e, int x, int y) {
		no = 0;
		// マウスカーソル変更
		setCursor(new Cursor(Cursor.DEFAULT_CURSOR));
		return true;
	} // mouseUp()
	
	
	public void DownKoma(int xx, int yy) {
		
		int s = 0;
		for ( i=0; i<sx[no]; i++ )
			if ( field [ ( x[no]+i ) + ( y[no]+sy[no] )*10 ] != 0 ) s++;
		
		if ( s == 0 ){
			clear_field();
			y[no]++; oldx=xx; oldy=yy;
			put_field();
		}
	} // DownKoma()
	
	
	public void UpKoma(int xx, int yy) {
		
		int s = 0;
		for ( i=0; i<sx[no]; i++ )
			if ( field [ ( x[no]+i ) + ( y[no]-1 )*10 ] != 0 ) s++;
		
		if ( s == 0 ){
			clear_field();
			y[no]--; oldx=xx; oldy=yy;
			put_field();
		}
	} // UpKoma()
	
	
	public void RightKoma(int xx, int yy) {
		
		int s = 0;
		for ( i=0; i<sy[no]; i++ )
			if ( field [ ( x[no]+sx[no] ) + ( y[no]+i )*10 ] != 0 ) s++;
		
		if ( s == 0 ){
			clear_field();
			x[no]++; oldx=xx; oldy=yy;
			put_field();
		}
	} // RightKoma()
	
	
	public void LeftKoma(int xx, int yy) {
		
		int s = 0;
		for ( i=0; i<sy[no]; i++ )
			if ( field [ ( x[no]-1 ) + ( y[no]+i )*10 ] != 0 ) s++;
		
		if ( s == 0 ){
			clear_field();
			x[no]--; oldx=xx; oldy=yy;
			put_field();
		}
	} // LeftKoma()
	
	
	// 初期こま設定   ( level 1-5 )
	public void level1() {
		System.out.println("Start level 1");
		int m_x[]     = { 0, 3, 1, 7, 1, 7,  3,  5,  3,  5,  1,  7 };
		int m_y[]     = { 0, 1, 1, 1, 5, 5,  5,  5,  7,  7,  9,  9 };
		int m_sx[]    = { 0, 4, 2, 2, 2, 2,  2,  2,  2,  2,  2,  2 };
		int m_sy[]    = { 0, 4, 4, 4, 4, 4,  2,  2,  2,  2,  2,  2 };
		int m_imgno[] = { 0, 1, 2, 3, 4, 5, 11, 11, 11, 11, 11, 11 };
		last = 12;
		x=m_x; y=m_y; sx=m_sx; sy=m_sy; imgno=m_imgno;
	}
	
	
	public void level2() {
		System.out.println("Start level 2");
		int m_x[]     = { 0, 3, 1, 5, 1, 5,  1,  1,  7,  7,  1,  7 };
		int m_y[]     = { 0, 1, 5, 5, 7, 7,  1,  3,  1,  3,  9,  9 };
		int m_sx[]    = { 0, 4, 4, 4, 4, 4,  2,  2,  2,  2,  2,  2 };
		int m_sy[]    = { 0, 4, 2, 2, 2, 2,  2,  2,  2,  2,  2,  2 };
		int m_imgno[] = { 0, 1, 6, 7, 8, 9, 11, 11, 11, 11, 11, 11 };
		last = 12;
		x=m_x; y=m_y; sx=m_sx; sy=m_sy; imgno=m_imgno;
	}
	
	
	public void level3() {
		System.out.println("Start level 3");
		int m_x[]     = { 0, 3, 1, 7, 1, 5,  1,  3,  5,  7,  1,  7 };
		int m_y[]     = { 0, 1, 1, 1, 7, 7,  5,  5,  5,  5,  9,  9 };
		int m_sx[]    = { 0, 4, 2, 2, 4, 4,  2,  2,  2,  2,  2,  2 };
		int m_sy[]    = { 0, 4, 4, 4, 2, 2,  2,  2,  2,  2,  2,  2 };
		int m_imgno[] = { 0, 1, 2, 3, 8, 9, 11, 11, 11, 11, 11, 11 };
		last = 12;
		x=m_x; y=m_y; sx=m_sx; sy=m_sy; imgno=m_imgno;
	}
	
	
	public void level4() {
		System.out.println("Start level 4");
		int m_x[]     = { 0, 3, 1, 7, 1, 5,  1,  3,  5,  7,  1,  7 };
		int m_y[]     = { 0, 1, 1, 1, 5, 5,  7,  7,  7,  7,  9,  9 };
		int m_sx[]    = { 0, 4, 2, 2, 4, 4,  2,  2,  2,  2,  2,  2 };
		int m_sy[]    = { 0, 4, 4, 4, 2, 2,  2,  2,  2,  2,  2,  2 };
		int m_imgno[] = { 0, 1, 2, 3, 8, 9, 11, 11, 11, 11, 11, 11 };
		last = 12;
		x=m_x; y=m_y; sx=m_sx; sy=m_sy; imgno=m_imgno;
	}
	
	
	public void level5() {
		System.out.println("Start level 5");
		int m_x[]     = { 0, 3, 1, 7, 1, 7,  3,  3,  5,  1,  7 };
		int m_y[]     = { 0, 1, 1, 1, 5, 5,  5,  7,  7,  9,  9 };
		int m_sx[]    = { 0, 4, 2, 2, 2, 2,  4,  2,  2,  2,  2 };
		int m_sy[]    = { 0, 4, 4, 4, 4, 4,  2,  2,  2,  2,  2 };
		int m_imgno[] = { 0, 1, 2, 3, 4, 5, 10, 11, 11, 11, 11 };
		last = 11;
		x=m_x; y=m_y; sx=m_sx; sy=m_sy; imgno=m_imgno;
	}


}  // End of Class

/*
＜箱入り娘 Applet について＞
爆裂健がはじめて作った JAVA Applet プログラムです (^^ゞ
今見ると，ソースが汚いなぁ･･･  はははは・・・・
*/