Game.java

import java.util.*;

class Game {
	// Color Strings
	
	// Player
	public static int playersCreated = 0;
	public static Player mainPlayer;
	// Round Data 
	public static int currentRound = 1;
	public static int currentSubRound = 1;
	public static int lastRoundHealed;
	public static int lastMerchantRoom;
	public static int lastBossRoom;
	// AI
	double randomHealChance = 0.85;
	public static int difficulty = 0; // easy = 0, medium = 1, hard = 2
	double aiHealBias = 0.0;
	// Main
	boolean over = false;
	public static Scanner input;
	public static DOT DOTList = new DOT();
	public static StunList stunList = new StunList();
	public static Type[] playableTypeList = new Type[3];
	public static CastSpellList castList = new CastSpellList();

	// Input
	public void SetupInput(Scanner in) {
		input = in;
	}
	// Room
	Room currentRoom;

	// START OF MAIN GAME FUNCTIONS
	public void Start() {
		addItemsToList();
		createTypes();
		createSkills();
		createSpells();
		playableTypeList = new Type[]{Type.getTypeFromName("Goblin"), Type.getTypeFromName("Knight"), Type.getTypeFromName("Mage")};
		System.out.println("Welcome to Defend n Roll, A simple text fight game, where you can either defend for one turn and reduce dmg by 50% or roll. Damage is determined by the difference between the 2 rolls, who ever has the lowest roll, gets the damage.");
		System.out.println();
		setDifficulty();
		setPlayerType();
		System.out.println();
		while (!over) {
			if(shouldBeMerchantRoom()){
				System.out.println("You come across a merchant sitting in a room.");
				MerchantRoom merchantRoom = new MerchantRoom();
				merchantRoom.itemShop(false);
				currentRound++;
				lastMerchantRoom = currentRound;
			} else if (shouldBeBossRoom()) {
				System.out.println("You walk into a massive chamber with a giant cage, You find a massive monster");
				BossRoom bossRoom = new BossRoom();
				BossCombat(bossRoom);
				lastBossRoom = currentRound;

			} else {
				currentRoom = new Room();
				currentRoom.activeNPCS.renameDupes();
				TurnCombat();
			}
		}
	}

	public void TestWeights(){
		AI testNPC = new AI("Test", new Mage());
		testNPC.setHealth(60,100);
		aiDecideItem(testNPC);
	}

	public void addItemsToList(){
		new Sword();
		new Vial();
		new LargeVial();
		new Armor();
		new Bow();
		new TitaniumArmor();
		new Club();
		new Dagger();
		new Bite();
		new GoblinArmor();
		new Stomp();
		new Staff();
		new Ram();
	}

	public void createSkills(){
		new Speed1();
		new Weather1();
		new Weather2();
		new Weather3();
	}

	public void createSpells(){
		new Enlightment();
		new Fireball();
		new Jet();
		new Lightning();
		new Orb();
		for(int i=0;i<Spell.spells.size();i++){
			CusLib.DebugOutputLn(Spell.spells.get(i));
		}
	}

	public void createTypes(){
		new Goblin();
		new Hog();
		new Knight();
		new Mage();
		new Skeleton();
		new Spider();
	}

	public void DecideDamage(AI npc) {
		CusLib.DebugOutputLn(String.format("AI: %s, Player %s", npc.getType().toString(), mainPlayer.getType().toString()));
		CusLib.DebugOutputLn(String.format("Player Hand: %s, AI Hand: %s",mainPlayer.getHand().getName(), npc.getHand().getName()));
		if(npc.getType().baseSpeed() > mainPlayer.getType().baseSpeed()){
			CusLib.DebugOutputLn("NPC Speed is faster than player");
			playerUseItem(npc,mainPlayer);
			if(mainPlayer.getHealth() <= 0){ // player isnt marked as dead just yet so we have to check for health instead
				return;
			}
			playerUseItem(mainPlayer,npc);
		} else {
			CusLib.DebugOutputLn("NPC Speed is slower than player");
			playerUseItem(mainPlayer,npc);
			if(npc.getHealth() <= 0){
				return;
			}
			CusLib.DebugOutputLn(mainPlayer.getType().baseSpeed());
			double speedBonus = (mainPlayer.getType().baseSpeed())*CusLib.randomNum(0.01, 0.02); // these were just so that i could debug
			double random = Math.random()+speedBonus;
			double celing = CusLib.randomNum(0.7, 0.9);
			CusLib.DebugOutputLn(speedBonus + ", " + random + ", " + celing);
			if(random > celing){
				CusLib.queueText("You were faster than " + npc.getName() + " and dodged their attack!");
				return;
			}
			playerUseItem(npc,mainPlayer);
		}	
	} 


	public void playerUseItem(Player player, Player target){
		CusLib.DebugOutputLn("Dealer: " + player.getName() + ", Hand: " + player.getHand().getName() + ", Target: " + target.getName());
		if(stunList.isPlayerStunned(player)){
			CusLib.DebugOutputLn("Dealer is Stunned");
			return;
		}
		if(castList.isPlayerCastingSpell(player)){
			CusLib.DebugOutputLn("Dealer is Casting a spell");
			return;
		}
		player.getHand().useItem(player, target);
	}


	public void Action(Player enemy) {
		System.out.println();
		if(stunList.isPlayerStunned(mainPlayer)){
			System.out.println("You're stunned, your turn was skipped");
			return;
		}
		if(castList.isPlayerCastingSpell(mainPlayer)){
			System.out.println("You're busy casting a spell, you were skipped.");
			return;
		}
		System.out.print("Current Round: " + currentSubRound + ", Your Current Health: " + CusLib.colorText(mainPlayer.getHealth(), "green") + ", Your Current Level: " + CusLib.colorText(mainPlayer.level(),"blue") + " (" + CusLib.colorText(mainPlayer.getXp(),"yellow") + "/" + CusLib.colorText((1000*(mainPlayer.level())),"purple") + ")" + " The " + CusLib.colorText(enemy.getName() + "'s", "red") + " Health: " + CusLib.colorText(enemy.getHealth(), "green") + ", ");
		if(mainPlayer.getType().getName().equals("Mage")){
			ActionMage(enemy);
			return;
		}
		System.out.print("Defend or Use an Item?");
		System.out.println();
		String action = input.nextLine();
		if (action.toLowerCase().equals("defend")) {
			mainPlayer.Defend(currentSubRound);
			return;
		}
		if(action.toLowerCase().equals("use an item") || action.toLowerCase().equals("item") && mainPlayer.getInventory().size() > 0){
			pickItem();
			System.out.println();
			return;
		}
		System.out.println("Unknown Command");
		this.Action(enemy);
	}

	public void ActionMage(Player enemy){
		System.out.print("Defend or Cast a Spell?" + " Your Mana: " + mainPlayer.getMana());
		System.out.println();
		String action = input.nextLine().toLowerCase();
		
		if(action.equals("defend")){
			mainPlayer.Defend(currentSubRound);
			return;
		}
		if(action.equals("cast a spell") || action.equals("spell") || action.equals("cast")){
			pickSpell();
			return;
		}
		System.out.println("Unknown Command!");
		this.ActionMage(enemy);
		return;
	}

	public void healRandomPlayer(Player player) {
		if(player.isDead()){
			return;
		}
		if (Math.random() > randomHealChance && (currentSubRound - lastRoundHealed) >= 2) { // 10% chance to randomly heal
			int health = CusLib.randomNum(5, 10);
			double healChance = Math.random() - aiHealBias;
			if (healChance > 0.5) { // heal player
				System.out.println("You were randomly healed " + CusLib.colorText(health, "green") + " hp");
				mainPlayer.Heal(health);
			} else {
				System.out.println(player.getName() + " was randomly healed and gained " + CusLib.colorText(health, "green") + " hp");
				player.Heal(health);
			}
			lastRoundHealed = currentSubRound;
		}
	}

	public void setDifficulty(){
		System.out.println("Start by typing to select a difficulty: Easy, Medium, Hard");
		String selectDiff = input.nextLine();
		selectDiff = selectDiff.toLowerCase();
		if(selectDiff.equals("medium")){
			System.out.println("You Selected: Medium");
			difficulty = 1;
			aiHealBias = 0.1;
		} else if(selectDiff.equals("hard")){
			System.out.println("You Selected: Hard");
			difficulty = 2;
			aiHealBias = 0.2;
			randomHealChance = 0.9;
		} else {
			System.out.println("You Selected: Easy");
			randomHealChance = 0.75;
		}
	}

	public static void setPlayerType(){
		System.out.println("What class would you like to pick?");
		System.out.println();
		String pickList = "";
		for(int i=0;i<playableTypeList.length;i++){
			if(i == playableTypeList.length-1){
				pickList += CusLib.colorText(playableTypeList[i].getName(), "green") + ", Stats: " + playableTypeList[i].getStatProps().toString(true) + ", Main Weapon: " + playableTypeList[i].getMainWeapon().getName() + ".";
				continue;
			}
			pickList += CusLib.colorText(playableTypeList[i].getName(), "green") + ", Stats: " + playableTypeList[i].getStatProps().toString(true) + ", Main Weapon: " + playableTypeList[i].getMainWeapon().getName() +", \n";
		}
		System.out.println(pickList);
		String pick = input.nextLine();
		Type selectedType = Type.getTypeFromName(pick);
		if(selectedType == null){
			System.out.println("Was unable to find that type.");
			setPlayerType();
			return;
		}
		System.out.println("You selected the " + selectedType.getName());
		mainPlayer = new Player("You", selectedType.baseHealth()*2 ,selectedType);
		mainPlayer.addItemToInventory(selectedType.getMainWeapon());
		mainPlayer.setArmor(mainPlayer.getType().getMainArmor());
		mainPlayer.addMana(selectedType.baseMana());
	}

	public void pickItem(){
		if(mainPlayer.getInventory().size() == 0){
			return;
		}
		if(mainPlayer.getInventory().size() == 1){
			if(mainPlayer.getInventory().get(0).getName().equals(mainPlayer.getType().getMainWeapon().getName())){
				mainPlayer.setHand(mainPlayer.getInventory().get(0));
				return;
			}
		}
		System.out.println("Which item would you like to use?");
		String itemList = "";
		for(int i=0;i<mainPlayer.getInventory().size();i++){
			Item itm = mainPlayer.getInventory().get(i);
			if(itm.isUseable() || itm.isArmor() || (itm.isArmor() && itm.isArmor())){
				continue;
			}
			itemList += itm.getName() + ": Description: " + itm.getDescription() + ". \n";
		}
		System.out.println(itemList); 
		String itemPicked = input.nextLine();
		Item item = Item.getItemFromName(itemPicked, mainPlayer);
		//System.out.println(item.name);
		if(item == null){
			System.out.println("You do not have that item.");
			pickItem();
			return;
		}
		mainPlayer.setHand(item);
	}

	public void pickSpell(){
		System.out.println("Which spell would you like to cast?");
		String spells = "";
		for(int i=0;i<Spell.spells.size();i++){
			Spell spell = Spell.spells.get(i);
			if(spell.canPlayerCast(mainPlayer)){
				if( i == Spell.spells.size()-1){
					spells += spell + ".";
				} else {
					spells += spell + ", \n";
				}
			}
		}
		System.out.println(spells);
		String selectedSpellString = input.nextLine();
		Spell selectedSpell = Spell.spellFromString(selectedSpellString);
		if(selectedSpell == null){
			System.out.println("Couldn't find that spell!");
			pickSpell();
			return;
		}
		mainPlayer.setSpell(selectedSpell);
		System.out.println();
		System.out.println("You selected to cast " + selectedSpell.name() + " It will take " + selectedSpell.turnsToCast() + " turns to cast.");
		return;
	}

	public void aiDecideItem(AI npc){
		//if(npc.getInventory().size() == 0){
		//	return;
		//}
		if(stunList.isPlayerStunned(npc)){
			return;
		}
		double[] weights = npc.itemDecideWeightTable();
		CusLib.DebugOutputLn(String.format("Npc Health: %s/%s, Percentage: %s", npc.getMaxHealth(),npc.getHealth(),npc.healthPercentage()));
		CusLib.DebugOutputLn("NPC Health Percentage: "+ npc.healthPercentage() + ", Damage Weight: " + weights[0] + ", Heal Weight: " + weights[1]);
		double damageItemWeight = weights[0]; // from 0 to 1 (For Percentage Multiply by 100)
		double healthItemWeight = weights[1]; // from 0 to 1
		if(npc.isHoldingGround()){
			return;
		}
		int maxDamage = 0;
		int maxHeal = 0;
		Item itemToUse = new Item();
		boolean shouldUseDamage = false;
		CusLib.DebugOutputLn("Damage Weight: " + damageItemWeight + ", Heal item Weight: " + healthItemWeight);
		if(damageItemWeight > healthItemWeight){
			shouldUseDamage = true;
			//System.out.println("AI wants to use Damage Item");
		}
		if(!doesPlayerHaveHeal(npc)){
			shouldUseDamage = true;
		}
		if(npc.getType().getName().equals("Mage")){
			npc.setSpell(npc.decideSpell(mainPlayer, shouldUseDamage));
			return;
		}
		for(int i=0;i<npc.getInventory().size();i++){
			Item itm = npc.getInventory().get(i);
			//System.out.println("Calculating use for " + itm.getName());
			if(itm.isArmor()){
				//System.out.println("Item is Armor");
				continue;
			}
			if(shouldUseDamage && (!itm.isHeal())){
				//System.out.println("Item isnt Heal");
				if(itm.getDamage() > maxDamage){
					//System.out.println("Item does max Damage");
					itemToUse = itm;
					if(mainPlayer.getArmor() != null){
						maxDamage = (int)((double)itm.getDamage() * (double)mainPlayer.getArmor().armorEffectiveness(itm.getDamageType()));
					} else {
						maxDamage = itm.getDamage();
					}
					
				}
			}
			if(!shouldUseDamage && (itm.isHeal())){
				//System.out.println("Item heals");
				Vial healItem = (Vial) itm;
				if(healItem.getHealAmt() >= maxHeal){
					itemToUse = healItem;
					maxHeal = healItem.getHealAmt();
				}
			}
		}
		npc.setHand(itemToUse);
		//System.out.println("Set hand to: " + itemToUse.getName());
	}

	public boolean doesPlayerHaveHeal(Player player){
		int heals = 0;
		for(int i=0;i<player.getInventory().size();i++){
			Item itm = player.getInventory().get(i);
			if(itm.isHeal()){
				heals++;
			}
		}
		if(heals > 0 ){
			return true;
		}
		return false;
	}


	public boolean shouldBeMerchantRoom(){
		if(Game.lastMerchantRoom >= CusLib.randomNum(1, 6)){
			if(Math.random() > 0.4){ // 60% chance for it to be a merchant room afterwards
				return true;
			}
		}
		return false;
	}

	public boolean shouldBeBossRoom(){
		if((Game.lastBossRoom - Game.currentRound) > 2 && Game.currentRound > 4){
			if(Math.random() > (0.65 - ((Game.lastBossRoom - Game.currentRound)/10))){
				return true;
			}
		}
		return false;
	}

	public void TurnCombat(){
		String opponents = "You enter a new Room and find ";
		for(int i=0;i<currentRoom.activeNPCS.size();i++){
			if(i < currentRoom.activeNPCS.size()-1){
				opponents += "A " + CusLib.colorText(currentRoom.activeNPCS.npcs.get(i).getName(), "red") + ", ";
			} else {
				opponents += "and A " + CusLib.colorText(currentRoom.activeNPCS.npcs.get(i).getName(), "red") + ".";
			}
		}
		CusLib.advanceText(opponents);
		while((!mainPlayer.isDead()) && currentRoom.activeNPCS.size() > 0){ 
			for(int i=0;i<currentRoom.activeNPCS.size();i++){
				stunList.checkStuns();
				AI currentNPC = currentRoom.activeNPCS.get(i);
				if(currentSubRound > mainPlayer.lastRoundDefended()+1){
					mainPlayer.unDefend();
				}
				if(currentSubRound > currentNPC.lastRoundDefended()+1){
					currentNPC.unDefend();
				}
				System.out.println();
				printOpponents();
				System.out.println("Current Opponent: " + CusLib.colorText(currentNPC.getName(), "red"));
				currentNPC.AIAction();
				aiDecideItem(currentNPC);
				Action(currentNPC);
				DecideDamage(currentNPC);
				castList.castSpells();
				DOTList.dealOutDamage(currentSubRound);
				CusLib.callQueue(true,false);
				if(currentNPC.isDead()){
					//System.out.println(currentNPC.getName() + " has " + currentNPC.getCoins() + " Coins");
					mainPlayer.killedPlayer(currentNPC);
				}
				if(mainPlayer.isDead()){
					over = true;
					System.out.println("You died and made it through " + CusLib.colorText(currentRound, "green") + " Rooms, Congrats and Better Luck next time!");
					currentRound--;
					break;
				}
				currentRoom.activeNPCS.GarbageCleanup();
				healRandomPlayer(currentNPC);
				currentSubRound++;
			}	
		}
		if(over){
			return;
		}
		System.out.println("Congrats on clearing Room " + currentRound + "!");
		if(Math.random() > 0.75){
			currentRoom.treasureChest();
		}
		roundOver();
		System.out.println();
	}

	public void BossCombat(BossRoom bossRoom){
		currentSubRound = 1;
		while(!mainPlayer.isDead() && !bossRoom.boss().isDead()){
			Boss boss = bossRoom.boss();
			stunList.checkStuns();
			if(currentSubRound > mainPlayer.lastRoundDefended()+1){
				mainPlayer.unDefend();
			}
			if(currentSubRound > boss.lastRoundDefended()+1){
				boss.unDefend();
			}
			System.out.println("Current Boss Health: " + CusLib.colorText(boss.getHealth(), "red"));
			boss.prepareAttack();
			Action(boss);
			DecideDamage(boss);
			castList.castSpells();
			DOTList.dealOutDamage(currentSubRound);
			CusLib.callQueue(true,false);
			if(boss.isDead()){
				System.out.println("You successfully killed " + boss.getName() + " Boss, Congrats!!");
				mainPlayer.killedBoss(boss);
				bossRoom.rewardPlayer();
			}
			if(mainPlayer.isDead()){
				over = true;
				currentRound--;
				System.out.println("You died a true soldier while trying to defeat the " + boss.getName() + " Boss, Better luck next time.");
				break;
			}
		}
		if(over){
			return;
		}
		roundOver();

	}

	public void roundOver(){
		mainPlayer.Heal((mainPlayer.getMaxHealth()/2));
		DOTList.reset();
		currentSubRound = 1;
		currentRound++;
		if(currentRound > 5 && difficulty < 1){
			difficulty = 1;
			System.out.println("You have progressed through enough rooms that the Game Difficulty changed to Medium");
		}
		if(currentRound > 10 && difficulty < 2){
			difficulty = 2;
			System.out.println("You have progressed through enough rooms that the Game Difficulty changed to Hard");
		}
	}

	public void printOpponents(){
		String totalRoomHealth = "";
		for(int i=0;i<currentRoom.activeNPCS.size();i++){
			AI curNpc = currentRoom.activeNPCS.get(i);
			if(i<currentRoom.activeNPCS.size()-1){
				totalRoomHealth += CusLib.colorText(curNpc.getName() + "'s", "red") + " Health: " + CusLib.colorText(curNpc.getHealth(), "green") + " HP, ";
			} else {
				totalRoomHealth += CusLib.colorText(curNpc.getName() + "'s", "red") + " Health: " + CusLib.colorText(curNpc.getHealth(), "green") + " HP.";
			}
				
		}
		System.out.println(totalRoomHealth);
	}

	public static int DifficultyMod(boolean unCapped){
		if(difficulty == 0){
			return 1;
		}
		if(unCapped){
			int diff = difficulty+1;
			return diff;
		}
		return difficulty;
	}

	public static int DifficultyMod(){
		return DifficultyMod(false);
	}

}