/*****************************/
/*			     */
/*　　　ナイトの周遊 　	　　 */
/*			     */
/*  1998/ 6/ 3  宍戸　輝光   */
/*			     */
/*****************************/

import java.awt.*;

class Knightjp extends Canvas { // 磐面用クラス

	private Image img;
	private Graphics g_img;
	private Button bkB,ntB;

	private int w,h,x,y,bs=6,cs=20;
	private int cell[][]=new int[6][6];
	private Point oldP[]=new Point[37];

	public int n;

	Knightjp(Image im,Button b,Button b2) { // コンストラクタ

		int i;

		w=127; // キャンバスの大きさ設定
		h=127;

		resize(w,h);

		img=im; // 渡されたイメージをキャンバスのイメージに設定
		g_img=img.getGraphics(); // キャンバスに描画するGrahics

		g_img.setColor(Color.black); // キャンバス初期化
		g_img.fillRect(0,0,w,h);

		bkB=b; // メインクラスのクリアボタンへの参照
		ntB=b2;

		clearCell(); // 盤面クリア

	}

	public void clearCell() { // 盤面クリア

		int i,j;

		for (i=0;i<bs;i++) // 盤面データクリア
			for (j=0;j<bs;j++)
				cell[j][i]=3;

		for (i=0;i<37;i++) // 過去の手リスト初期化
			oldP[i]=new Point(-1,-1);

		n=0; // 手数カウンタクリア

		bkB.enable(false); // Backボタン無効
		ntB.enable(false); // Nextボタン無効

		drawCell(); // 盤面描画

	}

	public void drawCell() { // 盤面描画

		int i,j;

		for (i=0;i<bs;i++) // 磐面の各目を描画
			for (j=0;j<bs;j++) {

				switch (cell[j][i]) {

					case 0: // 通っていない場所
						g_img.setColor(Color.white);
						break;

					case 1: // ナイトの現在位置
						g_img.setColor(Color.blue);
						break;

					case 2: // すでに通った場所
						g_img.setColor(Color.gray);
						break;

					case 3: // 移動可能な場所
						g_img.setColor(Color.green);
						break;

					case 4: // 最初の位置
						g_img.setColor(Color.lightGray);
						break;

				}

				g_img.fillRect((cs+1)*j+1,(cs+1)*i+1,cs,cs);

			}

		repaint();

	}

	public boolean mouseDown(Event evt,int mx,int my) { // マウスイベント

		int i,wx,wy;

		wx=(mx-1)/(cs+1); // カーソル座標を磐面の座標に変換
		wy=(my-1)/(cs+1);

		if (cell[wx][wy]!=3) // 移動可能な場所でなければ戻る
			return false;

		putKnight(wx,wy); // ナイトを置く

		for (i=n;i<36;i++) // 過去の手リスト修正
			oldP[i]=new Point(-1,-1);

		return true;

	}

	public boolean mouseMove(Event evt,int mx,int my) { // マウスイベント

		int wx,wy;

		wx=(mx-1)/(cs+1); // カーソル座標を磐面の座標に変換
		wy=(my-1)/(cs+1);

		if (wx<0 ||wx>=bs ||wy<0 ||wy>=bs)
			return false;

		drawCell();

		g_img.setColor(Color.red); // カーソル位置に枠を描く
		g_img.drawRect(wx*(cs+1)+1,wy*(cs+1)+1,cs-1,cs-1);

		repaint();

		return true;

	}

	private void putKnight(int bx,int by) { // ナイトを置く

		int i,j,wx,wy;

		for (i=0;i<bs;i++) // 過去の移動可能位置をクリア
			for (j=0;j<bs;j++)
				if (cell[j][i]==3)
					cell[j][i]=0;

		for (i=1;i<3;i++) { // 移動可能座標を計算

			wx=bx-i;
			wy=3-Math.abs(i);

			if ((wx>=0) && (wx<bs)) { // 左側

				if ((by-wy)>=0 && (by-wy)<bs)
					if (cell[wx][by-wy]==0)
						cell[wx][by-wy]=3;

				if ((by+wy)>=0 && (by+wy)<bs)
					if (cell[wx][by+wy]==0)
						cell[wx][by+wy]=3;

			}

			wx=bx+i;
			wy=3-Math.abs(i);

			if ((wx>=0) && (wx<bs)) { // 右側

				if ((by-wy)>=0 && (by-wy)<bs)
					if (cell[wx][by-wy]==0)
						cell[wx][by-wy]=3;

				if ((by+wy)>=0 && (by+wy)<bs)
					if (cell[wx][by+wy]==0)
						cell[wx][by+wy]=3;

			}

		}

		for (i=0;i<bs;i++) // 過去の現在位置を通過場所に
			for (j=0;j<bs;j++)
				if (cell[j][i]==1)
					cell[j][i]=2;

		x=bx;
		y=by;

		if (n==0) // 磐面データにナイトを記憶
			cell[x][y]=4;
		else
			cell[x][y]=1;

		oldP[n].x=x; // 過去の手リスト更新
		oldP[n].y=y;

		n++; // 手数カウンタ更新

		if (n>1) // ２手目以降はBackボタン有効
			bkB.enable(true);

		if (oldP[n].x==-1)
			ntB.enable(false);

		drawCell();

	}

	public void backGame() { // Backボタン処理

		cell[oldP[n-1].x][oldP[n-1].y]=0; // ナイトの現在位置をクリア

		n=n-2; // 一手前の状態に戻す
		putKnight(oldP[n].x,oldP[n].y);

		drawCell();

		if (n<2) // 最初まで戻ったらBackボタン無効
			bkB.enable(false);

		ntB.enable(true);

	}

	public void nextGame() {

		putKnight(oldP[n].x,oldP[n].y);

		drawCell();

	}

	public void paint(Graphics g){

		g.drawImage(img,0,0,this); // イメージを表示

	}

	public void update(Graphics g){

		paint(g);

	}

}

public class Knightj extends java.applet.Applet { // メインクラス

	Knightjp cv;
	Button clB,bkB,ntB;
	Panel p,p2;

	public void init(){

		setBackground(Color.orange);
		setLayout(new BorderLayout());

		bkB=new Button("Back");
		ntB=new Button("Next");

		cv=new Knightjp(createImage(127,127),bkB,ntB); // 磐面作成

		p=new Panel();

		p.add("Center",cv); // 磐面配置
		add("Center",p);

		clB=new Button("Clear");

		p2=new Panel();
		p2.setLayout(new FlowLayout(FlowLayout.CENTER,12,5));

		p2.add(clB);
		p2.add(bkB);
		p2.add(ntB);

		add("South",p2);

	}

	public boolean action(Event evt,Object What) {

		int i,j;

		if (evt.target==clB) { // Clearボタン

			cv.clearCell();

			return true;

		}

		if (evt.target==bkB) { // Backボタン

			cv.backGame();

			return true;

		}

		if (evt.target==ntB) { // Nextボタン

			cv.nextGame();

			return true;

		}

		return false;

	}

}