package puplets;

import puplet.Puplet;

public class woordrader extends Puplet {

	private String[] puplets;

	private String sender = null; // (de zender van ascii die je ontvangt)
	private String guessedLetter = null;
	private String currentResult;

	private boolean challengeAgreed = false;
	private boolean expansion= false;

	private int coins = 300;
	private int faults = 0;
	private int wordLength = 0;


	public woordrader() {
		super("Casper");
		makeMenu(new String[] {"Search puplets"});
		setImage("lach_munt3");
	}

	public void menuEvent(String s) {
		if(s.equals("Search puplets")) {
			puplets = discoverPuplets();
			if(puplets.length > 0) {
				setMessage(puplets.length + " puplet(s) found. \n Wait for a challenge.");
				clearMenu();
			}
			else {
				setMessage("No puplets found.");
			}
		}
		else if(s.equals("Agree invite")) {
			challengeAgreed = true;
			AgreeChallenge();
			setMessage("The game started! \n You'll have to wait for the word.");
			clearMenu();

		}
		else if(s.equals("Guess a letter")) {
			guessLetter();
		}
		else if(s.equals("Bribe")) {
			if(coins > 0) {
				bribe();
				coins = coins - 100;
				setImage("lach_munt"+(coins/100));
			}
			else {
				setImage("sad");
				setMessage("You have no more coins!");
			}
		}
}


	protected void frameEvent(byte[] frame) {
			String part1 = new String(frame, 0 , 7);
			String part2 = new String(frame, 7, 7);
			String possibleSender = part1.trim();
			String receiver = part2.trim();

			/*
			 * Code die na het uitdaging aangaan de zender vast zet en dus niks doet met anderen
			 */
			if(!challengeAgreed) {
				sender = possibleSender;
			}
			else {
				if(sender == null) {
					sender = possibleSender;
				}
				else if(!sender.equals(possibleSender)) {
					return;
				}
			}

			/*
			 *  uitbreiding
			 * 	ASCII: C & ontvanger: mezelf
			 */
			if(frame[14] == 'C') {
				expansion = true;
				if(expansion == true) {
					//leeg en zet allemaal nullen
					for(int i = 0; i< 32; i++) {
					frame[i] = 0;
					}
					frame = setSender(frame);
					frame = setReceiver(frame);
					frame[14] = 'C';
					sendFrame(frame);
				}
			}

			/*
			 *  Uitdaging aangaan
			 *	als ASCII: P  en ontvanger: mezelf
			 */
			else if(frame[14] == 'P' && receiver.equals(getName())) {
				setMessage("You're invited to play hangman");
				makeMenu(new String[] {"Agree invite"});
			}

			/*
			 *	Startsignaal
			 *  ASCII: S & ontvanger: mezelf
			 */
			else if(frame[14] == 'S' && receiver.equals(getName())) {
				if(expansion == true) {
					makeMenu(new String [] {"Guess a letter", "Bribe"});
				}
				else {
					makeMenu(new String [] {"Guess a letter"});
				}
				wordLength = frame[15];
				if(wordLength > 3) {
					//als int in byte 15
					//als string in byte 15
					//String stringLength = new String(frame, 15, 16).trim();
					//lengte = Integer.valueOf(stringLength).intValue();
					String woord = "";
					for(int i = 0; i < wordLength; i++) {
						woord = woord + ".";
						setMessage("Het woord is: " + woord +"\n Het woord is " + wordLength + " letters lang. \n Raad een letter of koop om(indien mogelijk).");
					}
					currentResult = woord;
				}

			}

			/*
			 * resultaat geraden letter
			 * ASCII: R & ontvanger mezelf
			 */
			else if(frame[14] == 'R' && receiver.equals(getName())) {
				String hexaString = new String(frame, 15, 32).trim();
				String result = "";
				boolean completedWord = true;
				for(int i = 0; i < wordLength; i++) {
					if(letterOK(hexaString, i)) {
						// zet de geraden letter neer
						result = result + guessedLetter;
					}
					else {
						char oldguessedLetter = currentResult.charAt(i);
						if(oldguessedLetter != '.')
						{
							result = result + oldguessedLetter;
						}
						else
						{
							result = result+ ".";
							completedWord = false;
						}
					}
				}
				if(result.equals(currentResult)) {
					faults++;
					setImage("galg"+faults);
				}
				if(faults != 9) {
					currentResult = result;
					setMessage("Result: " + result  + "\n The number of faults: " + faults);
				}
				if(faults == 9) {
					setMessage("You lost!");
					clearMenu();
				}
				if(completedWord == true) {
					setMessage("You have won \n The word was: " + result);
					clearMenu();
					setImage("happy");
				}
			}

			/*
			 * 	Omkoop antwoord
			 * 	ASCCI: E & ontvanger: mezelf
			 */
			else if(frame[14] == 'B'&& receiver.equals(getName())) {
				char letter = (char)frame[15];
				String bribeLetter = String.valueOf(letter);
				if(bribeLetter.equals("0")) {
					setMessage("You are cheated!");
				}
				else {
					setMessage("The letter you have been bribed: " + bribeLetter);
				}
			}
	}


	public void AgreeChallenge() {
		byte[] frame = emptyFrame(new byte[32]);
		frame = setSender(frame);
		frame = setReceiver(frame);
		frame[14] = 'M';
		sendFrame(frame);
	}

	public void guessLetter() {
		byte[] frame = emptyFrame(new byte[32]);
		frame = setSender(frame);
		frame = setReceiver(frame);
		frame[14] = 'G';
		//Geraden letter van String naar byte
		String input = getMessage();
		char letter = input.charAt(0);
		frame [15] = (byte)letter;
		//String maken van byte
		guessedLetter = String.valueOf(letter);
		sendFrame(frame);
	}

	public void bribe() {
		byte[] frame = emptyFrame(new byte[32]);
		frame = setSender(frame);
		frame = setReceiver(frame);
		frame[14] = 'B';

		//bericht op byte 15 tot 35

		sendFrame(frame);
		System.out.println("Check");
	}

	/*
	 * Methode die het hele frame leeg maakt met nullen
	 */
	public byte[] emptyFrame(byte[] frame) {
		for(int i = 0; i < 32; i++) {
			frame[i] = 0;
		}
		return frame;
	}
	/*
	 * Methode die de zender(deze puplet) in het frame zet
	 */
	public byte[] setSender(byte[] frame) {
		byte[] nameBytes = getName().getBytes();
		for(int i = 0; i < 8; i++) {
			if(i < nameBytes.length) {
				frame[i] = nameBytes[i];
			}
		}
		return frame;
	}
	/*
	 * Methode die de ontvanger(de zender van de ontvangen ASCII) in het frame zet
	 */
	public byte[] setReceiver(byte[] frame) {
		byte[]nameBytes = sender.getBytes();
		for(int i = 0; i < 7; i++) {
			if(i < nameBytes.length) {
				frame[i+7] = nameBytes[i];
			}
		}
		return frame;
	}
}