/*
 * @(#)Practicum2.java 1.0 03/02/06
 *
 * You can modify the template of this file in the
 * directory ..\JCreator\Templates\Template_2\Project_Name.java
 *
 * You can also create your own project template by making a new
 * folder in the directory ..\JCreator\Template\. Use the other
 * templates as examples.
 *
 */

import java.awt.*;
import java.applet.*;
import java.awt.event.*;


public class Practicum2 extends Applet implements MouseListener, ActionListener {
final int steend=40;
final int vakjeb=50;
final int ox=10,oy=90;
int vakkenx,vakkeny,speler;
int [][] plaats;
boolean show,stop;
String stat;
Button nieuw, help;
	
	public int ConvInt(String a, int normal)
	{
		int b=0;
		try
		{
			b=Integer.parseInt(a);
		}
		catch(Exception e)
		{
			b=normal;
		}
		finally
		{
			return b;
		}
	}

	public void init() 
	{
		int loop,lop,mx,my;
		vakkeny=ConvInt(this.getParameter("vakkeny"),6);
		vakkenx=ConvInt(this.getParameter("vakkenx"),6);
		this.addMouseListener(this);
		nieuw = new Button("Nieuw");
		help = new Button("Help");
		this.add(nieuw);
		this.add(help);
		nieuw.addActionListener(this);
		help.addActionListener(this);
		plaats = new int[vakkenx][vakkeny];
		reset();
	}
	
	//klik op knop:
	public void actionPerformed(ActionEvent e)
	{
	//knop is help
	if(e.getSource()==help&&!stop)
		{
			//laten zien wat methode help legale zetten vindt
			//of als help al aan stond, help weer uitzetten
			show=!show;
			this.repaint();	
		}
	//knop is nieuw
	if(e.getSource()==nieuw)
		{
			//resetten
			reset();
		}
	}
	
	//methode voor herstellen beginsituatie
	public void reset()
	{
		int x,y;
		for(x=0;x<vakkenx;x++)
		{
			for(y=0;y<vakkeny;y++)
			{
				plaats[x][y]=0;			
			}
		}
		x=Math.abs(vakkenx/2);
		y=Math.abs(vakkeny/2);
		plaats[x][y]=1;
		plaats[x-1][y-1]=1;
		plaats[x-1][y]=2;
		plaats[x][y-1]=2;
		speler=1;
		stat="";
		stop=false;
		show=false;
		this.repaint();
	}
	
	//kijken of xy wel in het veld ligt
	public boolean checkxy(int x,int y)
	{
		if (x<vakkenx && x>=0 && y>=0 && y<vakkeny){return true;}
		else{return false;}
	}
	
	public void mouseClicked(MouseEvent e)
	{
		if(!stop)
		{
			//bepalen in welk vakje er geklikt is
			int vx,vy,lx,ly,cx,cy;
			vx=e.getX();
			vy=e.getY();
			lx=klikrij(vx-ox,vakkenx);
			ly=klikrij(vy-oy,vakkeny);
			
			//controleren of de plaats legaal is
			if (checklegal(lx,ly))
			{
				//zo ja, dan zet de steen er neer en transformeren maar
				plaats[lx][ly]=speler;
				transform(lx,ly,true);
				//spelerwissel
				speler=nietspeler();
				this.repaint();
			}
		}
	}
	
	//procedure om te kijken of er legale zetten zijn(allok), en deze laten zien
	//als het moet. Controleert ook op winnaars.
	public boolean help(Graphics gr)
	{
		int x,y;
		boolean allok=false;
		for(x=0;x<vakkenx;x++)
		{
			for(y=0;y<vakkeny;y++)
			{
				if(checklegal(x,y))
				{
					if(show)
					{
						tekenrondje(gr,x,y);
					}
					allok=true;
				}
			}
		}
//		if(hoeveel(1)==0)
//		{
//			stop=true;
//			stat="Rood heeft gewonnen!";
//		}
//		if(hoeveel(2)==0)
//		{
//			stop=true;
//			stat="Blauw heeft gewonnen!";
//	}
		return allok;					
	}
	
	//methode om te bepalen of er ingesloten is/kan worden, en als het moet
	//de transformatie uitvoeren (boolean trans)
	public boolean transform(int nx,int ny, boolean trans)
	{
		int loop,lop,min=0,max=0,vakkent=vakkenx*vakkeny;
		boolean ret=false;
		//eromheen kijken
		for(loop=1;loop<9;loop++)
		{
			//als er een steen van de tegenstander staat
			if (checkdir(nx,ny,loop,1)==nietspeler())
			{
				//zoeken naar een andere steen verderop
				for(lop=2;lop<vakkent;lop++)
				{
					//als er geen steen is, forloop afbreken
					if(checkdir(nx,ny,loop,lop)==0){lop=vakkent;}
					else
					{
						if(checkdir(nx,ny,loop,lop)==speler)
						{
							//transformatie kan doorgaan
							if(trans){maakvanspeler(nx,ny,loop);}
							ret=true;
						}
					}
				}
			}
		}
		return ret;
	}
	
	//deze methode voert de echte transformatie uit (de kleur van stenen
	//veranderen naar insluiting)
	public void maakvanspeler(int nx, int ny, int loop)
	{
		int lop,vakkent=vakkenx*vakkeny;
		for(lop=1;lop<vakkent;lop++)
		{							
			if(checkdir(nx,ny,loop,lop)!=speler)
			{
				setdir(nx,ny,loop,lop,speler);
			}
			else
			{
				if(checkdir(nx,ny,loop,lop)==speler)
				{
					lop=vakkent;
				}
			}
		}		
	}
	
	//spreekt voor zich
	public int nietspeler()
	{
		if (speler==1)
		{
			return 2;
		}
		else
		{
			return 1;
		}
	}
	
	//methode om te bepalen welke coordinaat er wordt bedoelt door van xy, in
	//richting dir, len stappen te nemen naar een ander vakje. De bedoelde
	//coordinaten worden in een array teruggegeven.
	public int[] dir(int x,int y, int dir, int len)
	{
		int[] ret;
		ret = new int[2];
		int vx=0,vy=0;
		//dir 1 is linksonder, dir 2 is onder, dir 3 is rechtsonder
		if(dir==1){vx=x-len; vy=y+len;}
		if(dir==2){vx=x; vy=y+len;}
		if(dir==3){vx=x+len; vy=y+len;}
		//dir4 is links, dir5 is rechts
		if(dir==4){vx=x-len; vy=y;}
		if(dir==5){vx=x+len; vy=y;}
		//dir6 is rechtsboven, dir7 boven,dir8 rechtsboven
		if(dir==6){vx=x-len; vy=y-len;}
		if(dir==7){vx=x;vy=y-len;}
		if(dir==8){vx=x+len; vy=y-len;}
		ret[0]=vx;
		ret[1]=vy;
		return ret;
	}
	
	//vanaf punt xy in richting dir, afstand len de waarde veranderen in val
	public void setdir(int x,int y, int dir, int len, int val)
	{
		int ret[];
		ret = dir(x,y,dir,len);

		if(checkxy(ret[0],ret[1]))
		{
			plaats[ret[0]][ret[1]]=val;
		}
	}
	
	//vanaf punt xy kijken in richting dir en afstand len, wat de waarde van
	//dat vakje is
	public int checkdir(int x,int y, int dir, int len)
	{
		int ret[];
		ret = dir(x,y,dir,len);

		if(checkxy(ret[0],ret[1]))
		{
			return plaats[ret[0]][ret[1]];
		}
		return 0;
	}
	
	public boolean checklegal(int x,int y)
	{
		int loop;
		//is de plaats leeg?
		if(plaats[x][y]==0)
		{
			//is er transformatie mogelijk door op die xy een steen te zetten?
			if(transform(x,y,false))
			{
				//ok dan
				return true;
			}
		}
		return false;
	}
	
	//bepalen van rij/kolom waarin is geklikt (waar v=relatieve positie klik,
	//en vakken is de hoeveelheid kolommen/rijen er zijn)
	public int klikrij(int v, int vakken)
	{
		int loop,c;
		for (loop=0;loop<vakken;loop++)
		{
			c=loop*vakjeb;
			if (c<v && v<(c+vakjeb))
			{
				return loop;
			}
		}
		return 0;
	}
	
	//routine voor het bepalen van hoeveelheid stenen van een kleur
	public int hoeveel(int kleur)
	{
		int x,y,ret=0;
		for(x=0;x<vakkenx;x++)
		{
			for(y=0;y<vakkeny;y++)
			{
				if(plaats[x][y]==kleur){ret++;}
			}
		}
		return ret;
	}
	
	//tekenen van veld en status ed
	public void tekenveld(Graphics gr)
	{
		int x=0,y=0;
		int stringy=oy/3+steend/2+4;

		//twee stenen boven veld tekenen met de hoeveelheid stenen van de
		//betreffende kleur erin gezet
		gr.setColor(Color.blue);
		gr.fillOval(ox+steend/2,oy/3,steend,steend);
		gr.setColor(Color.red);
		gr.fillOval(ox+2*steend+steend/2,oy/3,steend,steend);
		gr.setColor(Color.black);
		gr.drawString(Integer.toString(hoeveel(1)),ox+steend-4,stringy);
		gr.drawString(Integer.toString(hoeveel(2)),ox+3*steend-4,stringy);
		
		//weergeven van status
		if(stat.equals(""))
		{
			if(speler==1)
			{
				stat="Blauw is aan zet";
			}
			else
			{
				stat="Rood is aan zet";
			}
		}
		gr.drawString(stat,ox+4*steend,stringy);
		
		//veld tekenen
		for(x=0;x<(vakkenx+1);x++)
		{
			gr.drawLine(ox+vakjeb*x,oy,ox+vakjeb*x,oy+vakkeny*vakjeb);
		}

		for (y=0;y<(vakkeny+1);y++)
		{
			gr.drawLine(ox,oy+vakjeb*y,ox+vakkenx*vakjeb,oy+y*vakjeb);
		}
	}
	
	//routine voor tekenen van stukken
	public void tekenstukken(Graphics gr)
	{
		int x=0,y=0,val=0;
		//twee for-loops om elk vakje te doorlopen
		for(y=0;y<vakkeny;y++)
		{
			for(x=0;x<vakkenx;x++)
			{
				//ophalen value van (x,y)
				val=plaats[x][y];
				//als er een steen ligt
				if (val>0)
				{
					//dan kleur bepalen
					if (val==1)
					{
						gr.setColor(Color.blue);
					}
					if (val==2)
					{
						gr.setColor(Color.red);
					}
					//en tekenen
					gr.fillOval(ox+vakjeb*x+(vakjeb-steend)/2,oy+vakjeb*y+(vakjeb-steend)/2,steend,steend);					
				}
			}
		}
	}
	
	//rondjesmethode tbv help-functie
	public void tekenrondje(Graphics gr,int x,int y)
	{
		gr.drawOval(ox+vakjeb*x+(vakjeb-steend/2)/2,oy+vakjeb*y+(vakjeb-steend/2)/2,steend/2,steend/2);
	}
	
	public void paint(Graphics g) 
	{
		stat="";
		//als er geen zetten gedaan kunnen worden
		if(!help(g)&&!stop)
		{
			//dan wissel van speler
			speler=nietspeler();
			//maar als deze ook geen zetten kan
			if(!help(g)&&!stop)
			{
				//dan is het einde spel
				stop=true;
				if(hoeveel(1)>hoeveel(2))
				{
					//dan heeft blauw gewonnen
					stat="Blauw heeft gewonnen!";
				}
				else
				{
					if(hoeveel(2)>hoeveel(1))
					{
						//dan heeft rood gewonnen
						stat="Rood heeft gewonnen!";
					}
					else
					{
						stat="Remise!";
					}
				}
			}
		}
		//teken veld enzo
		tekenveld(g);
		tekenstukken(g);
	}

	public void mousePressed(MouseEvent e){}
	public void mouseReleased(MouseEvent e){}
	public void mouseEntered(MouseEvent e){}
	public void mouseExited(MouseEvent e){}
}