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


public class Piskvorky extends Applet {
	Point rozmer;
	int[][] hraciPole;
	Papir papir;
	Pocitac pocitac;

	Panel vysledky;
	Label vysLab;
	Button vysTlac;
	Button vysNastav;
	Button vysEnter;
	TextField vysJmeno;
	Label vysPopis;
	Label vysZprava;
	int stav;  // 0..ceka se na stisk "Zacni"; 1..hraje se
	boolean zacinaPocitac;
	Point highlighted = null;

	public void init () {
		String hx = getParameter("RX");
		String hy = getParameter("RY");
		int rx = (hx==null)?20:Integer.valueOf(hx).intValue();
		int ry = (hy==null)?20:Integer.valueOf(hy).intValue();
		rozmer = new Point(rx,ry);
		hraciPole = new int[rozmer.x][];
		for (int i = 0; i<rozmer.x; i++) {
			hraciPole[i] = new int[rozmer.y];
		}
		stav = 0;
		Color bgc = new Color(255,255,200);
		pocitac = new Pocitac(this);
		papir = new Papir(this);
		papir.setBackground(bgc);			
		vysledky = new Panel();
		vysledky.setBackground(bgc);			
			vysTlac = new Button("Zacni");
			vysLab = new Label("     Piskvorky!    (mn)     ");
			vysPopis = new Label("Vitez:");
			vysNastav = new Button("Nastav");
			vysEnter = new Button("Vloz");
			vysJmeno = new TextField(20);
			vysZprava  = new Label();
			zobrazVysledky(0);
		add(vysledky);
		setLayout (new BorderLayout());
		add("South",vysledky);
		add("Center",papir);
		zacinaPocitac=false;
	}


	void PrijmacPapiru(Point kde) {
		if (stav==0) return;
		if (hraciPole[kde.x][kde.y]!=0) return;
		hraciPole[kde.x][kde.y]=2;
		papir.repaint();
		int r = pocitac.hraj();
		if (r!=0) {
			if (r==1)
				vysLab.setText("Vyhral pocitac!");
			else {
				vysLab.setText("Vyhral clovek!");
				zobrazVysledky(1);
			}
			stav = 0;
		}
	}

	void vymazPole() {
		highlighted = null;
		for (int i = 0; i<rozmer.x; i++)
			for (int j = 0; j<rozmer.y; j++) {
				hraciPole[i][j]=0;
			}
		papir.repaint();
	}


	public boolean action(Event evt, Object what) {
		if (evt.arg=="Zacni") {
			vymazPole();
			stav=1;
			if (zacinaPocitac) {
				hraciPole[rozmer.x /2][rozmer.y/2] = 1 + 8;
				highlighted = new Point(rozmer.x / 2 ,rozmer.y / 2);
				papir.repaint();
			}
			vysLab.setText("Hraj!");
			zacinaPocitac = !zacinaPocitac;
		}
		else if (evt.arg=="Nastav") {
			Nastaveni nast = new Nastaveni(this);
		}
		else if (evt.arg=="Vloz") {
			vysZprava.setText("Odesila se jmeno viteze...");
			zobrazVysledky(2);
			vysledky.repaint();
			odesliJmeno(vysJmeno.getText());
			zobrazVysledky(0);
		}
		return false;
	}
		
	public boolean mouseDown(Event evt, int x, int y) {
		x = x/(papir.size().width/rozmer.x);
		y = y/(papir.size().height/rozmer.y);
		if (x>=rozmer.x || y>=rozmer.y)
			return false;
		PrijmacPapiru(new Point(x,y));
		return false;
	}


/**
 * ukaze udany vysledkovy panel
 * 0 - talcitka
 * 1 - vstup jmena viteze
 * 2 - zprava
 */
	void zobrazVysledky(int i) {
		vysledky.removeAll();
		switch(i) {
		case 0:
			vysledky.add(vysTlac);
			vysledky.add(vysLab);
			vysledky.add(vysNastav);
			break;
		case 1:
			vysledky.add(vysPopis);
			vysledky.add(vysJmeno);
			vysledky.add(vysEnter);
			break;
		case 2:
			vysledky.add(vysZprava);
			break;
		}
		vysledky.validate();
	}


/**
 * odesle jmeno viteze na bimbo
 */
	void odesliJmeno(String jm) {
		try {
//			System.out.println("komunikuje se");

/*/			Date d = new Date();
			InetAddress lh = InetAddress.getLocalHost();
			String lhn = "???";
			if (lh != null) {
				lhn = lh.getHostName();
				if (lhn == null) {
					lhn = lh.getHostAddress();
				}
			}
			String s = d.toString() + "      " + lhn + "      " + jm;
*/
			String s = jm;
			URL url = new URL("http://bimbo.fjfi.cvut.cz/~mira/cgi/loger.cgi");
			URLConnection connection = url.openConnection();
			connection.setDoOutput(true);
//			PrintWriter out = new PrintWriter(connection.getOutputStream());
			PrintStream out = new PrintStream(connection.getOutputStream());
			out.println(s);
			out.close();

		
			DataInputStream in = new DataInputStream(connection.getInputStream());
			String inputLine;

			try {
			    while ((inputLine = in.readLine()) != null)
			    	System.out.println(inputLine);
			} catch (Exception e) {}
			
			in.close();

//			System.out.println("dokomunikovalo se");
		} catch (Exception e) {
			System.out.println(e.toString());
			vysLab.setText("Chyba spojeni ");
		}
	}		
}




class Papir extends Canvas {
	Piskvorky piskvorky;
	Point rozmer;
	int[][] hraciPole;
	
	public Papir(Piskvorky pis) {
		piskvorky = pis;
		rozmer = pis.rozmer;
		hraciPole = pis.hraciPole;
		setBackground( Color.white);
	}

	public void paint(Graphics g) {
		Dimension s = size();
		Dimension cs = new Dimension(s.width / rozmer.x,
							s.height / rozmer.y);
		g.setColor( Color.black );
		for (int i=1; i<rozmer.y; i++) {
			g.drawLine(0, cs.height*i, s.width, cs.height*i);
		}
		for (int i=1; i<rozmer.x; i++) {
			g.drawLine(cs.width*i, 0, cs.width*i, s.height);
		}
		for (int i = 0; i<rozmer.x; i++)
			for (int j = 0; j<rozmer.y; j++) {
				
				if ((hraciPole[i][j]&4) !=0) {
					g.setColor( Color.black );
					g.fillRect( i*cs.width+1,  j*cs.height+1, cs.width-1, cs.height-1);
				}
				else if ((hraciPole[i][j]&8) !=0) {
					g.setColor( Color.yellow );
					g.fillRect( i*cs.width+1,  j*cs.height+1, cs.width-1, cs.height-1);
				}
				if ((hraciPole[i][j]&3)==2) {
					g.setColor( Color.blue);
					g.drawOval( i*cs.width+2, j*cs.height+2, cs.width-4, cs.height-4);
				}
				else if ((hraciPole[i][j]&3)==1) {
					g.setColor( Color.red);
					g.drawLine( i*cs.width+2, j*cs.height+2, (i+1)*cs.width-2, (j+1)*cs.height-2);
					g.drawLine( i*cs.width+2, (j+1)*cs.height-2, (i+1)*cs.width-2, j*cs.height+2);
				}
			}
	}
	
}






class Pocitac {
	Piskvorky piskvorky;
	Point rozmer;
	int[][] hraciPole;
	int[][] hodPole;
	int hodnoceni[] = {2,30,100,500,10000,0,  1,20,90,400,8000,0};
	boolean fProhra,fVyhra;
	int maxHod;
	Point pProhra = new Point(0, 0), pVyhra = new Point(0, 0), pMaxHod = new Point(0, 0);
	Point sVyhra = new Point(0, 0), sProhra = new Point(0, 0);
	
	Pocitac (Piskvorky p) {
		piskvorky = p;
		rozmer = p.rozmer;
		hraciPole = p.hraciPole;
		hodPole = new int[rozmer.x][];
		for (int i = 0; i<rozmer.x; i++) {
			hodPole[i] = new int[rozmer.y];
		}
		for (int i=0; i<12; i++) {
			String h = piskvorky.getParameter("H"+i);
System.out.println("Parameter "+i+"  "+h);
			if (h!=null)
				hodnoceni[i]=Integer.valueOf(h).intValue();
		}
	}

	int hraj() {
		// zruseni zvyrazneni posledniho tahu
		if (piskvorky.highlighted != null) { 
			hraciPole[piskvorky.highlighted.x][piskvorky.highlighted.y] &= ~8;
			piskvorky.highlighted = null;
		}

		for (int i = 0; i<rozmer.x; i++)
			for (int j = 0; j<rozmer.y; j++)
				hodPole[i][j]=0;
		fProhra = fVyhra = false;
		hodSmer(rozmer.x-4, 0, rozmer.y, 1, 0); 
		hodSmer(rozmer.x, 0, rozmer.y-4, 0, 1); 
		hodSmer(rozmer.x-4, 0, rozmer.y-4, 1, 1);
		hodSmer(rozmer.x-4, 4, rozmer.y, 1, -1); 
		maxHod=0;
		pMaxHod.x=0; pMaxHod.y=0;
		for (int i = 0; i<rozmer.x; i++)
			for (int j = 0; j<rozmer.y; j++)
				if (hodPole[i][j]>maxHod && hraciPole[i][j]==0) {
					maxHod = hodPole[i][j];
					pMaxHod.x = i; pMaxHod.y=j;
				}
		if (fProhra) {
System.out.println("Prohra");
			int x=pProhra.x, y=pProhra.y;
				for (int k = 0; k<5; k++) {
					hraciPole[x][y]=2+4; //pak vyrazna 2
					x+=sProhra.x; y+=sProhra.y;
				}
			piskvorky.papir.repaint();
			return 2;

		}
		if (fVyhra) {
System.out.println("Vyhra");
			int x=pVyhra.x, y=pVyhra.y;
				for (int k = 0; k<5; k++) {
					hraciPole[x][y]=1+4; //pak vyrazna 1
					x+=sVyhra.x; y+=sVyhra.y;
				}
			piskvorky.papir.repaint();
			return 1;
		}
System.out.println("Pocitac hraje ("+pMaxHod.x+","+pMaxHod.y+")");
		piskvorky.vysLab.setText("Hraju ["+pMaxHod.x+","+pMaxHod.y+"]");
		hraciPole[pMaxHod.x][pMaxHod.y]=1;
		// zvyrazneni posledniho tahu
		piskvorky.highlighted = new Point(pMaxHod.x, pMaxHod.y);
		hraciPole[piskvorky.highlighted.x][piskvorky.highlighted.y] |= 8;
		piskvorky.papir.repaint();
		return 0;
	}
	
	void hodSmer(int bx, int ay, int by, int sx, int sy) {
		for (int i = 0; i<bx; i++)
			for (int j = ay; j<by; j++) {
				int x=i, y=j, kr=0, ko=0;
				for (int k = 0; k<5; k++) {
					if (hraciPole[x][y]==1)
						kr++;
					else if (hraciPole[x][y]==2)
						ko++;
					x+=sx; y+=sy;
				}
				int h=0;
				if (ko==0) {
					h=hodnoceni[kr];
					if (kr==4) {
						fVyhra=true;
						pVyhra.x = i; pVyhra.y = j;
						sVyhra.x = sx; sVyhra.y = sy;
					}
				}
				if (kr==0) {
					h+=hodnoceni[ko+6];
					if (ko==5) {
						fProhra=true;
						pProhra.x = i; pProhra.y = j;
						sProhra.x = sx; sProhra.y = sy;
					}
				}
				x=i; y=j;
				for (int k = 0; k<5; k++) {
					hodPole[x][y]+=h;
					x+=sx; y+=sy;
				}
			}
	}
}

class Nastaveni extends Frame {
	Piskvorky piskvorky;
	TextField fields[];
	Button ok,cancel;

	Nastaveni(Piskvorky p) {
		super("Nastaveni");
		piskvorky = p;
		ok = new Button("OK");
		cancel = new Button("Zrusit");
		Panel bp = new Panel();
		bp.add(ok);
		bp.add(cancel);
		add("South",bp);
		fields = new TextField[12];
		for (int i=0; i<12; i++) {
			fields[i] = new TextField();
			fields[i].setText(String.valueOf(
				piskvorky.pocitac.hodnoceni[i])); 
		}
		Panel fp = new Panel();
		fp.setLayout( new GridLayout(0,4) );
		for (int i=0; i<5; i++) {
			fp.add(new Label("Obrana "+(i+1)));
			fp.add(fields[i+6]);
			fp.add(new Label("Utok "+(i+1)));
			fp.add(fields[i]);
		}
		add("Center",fp);
		pack();
		show();
	}

	public boolean action(Event evt, Object what) {
		if (evt.arg=="OK") {			
				for (int i=0; i<12; i++) 
					piskvorky.pocitac.hodnoceni[i]
					=Integer.valueOf(fields[i].getText()).intValue();
				dispose();
		}
		if (evt.arg=="Zrusit")
			dispose();
		return false;
	}
}