//******************************************************************************
//******************************* VETERAN STUFF ********************************

struct VeteranPlayers {
	std::string PlayerName;
	int VeteranPoints;
};

std::vector<VeteranPlayers> VetInfo;

void VetUpdate(int ID, int number, int score) {

	if (!VetInfo.empty()) {
		for (int i = 0; i < VetInfo.size(); i++) {
			if (VetInfo[i].PlayerName == Get_Player_Name_By_ID(ID)) {
				int cvp, now;
				cvp = VetInfo[i].VeteranPoints;
				now = number + cvp;
				VetInfo[i].VeteranPoints = now;

				int Team;
				Team = Get_Team(ID);
				if (cvp < 100 && now >= 100) {
					char Promote[255];
					sprintf(Promote,"msg Veteran: %s just got promoted to the rank of General", Get_Player_Name_By_ID(ID));
					Console_Input(Promote);
					if (Team == 0) {
						sprintf(Promote, "ppage %d Kane has recognised your vision, you have been promoted to General, enjoy the extra 45HP armor on all NEW characters", ID);
						Commands->Create_2D_WAV_Sound("bonus_complete.wav");
					}
					else {
						sprintf(Promote, "ppage %d Locke himself has promoted you to a General, enjoy the extra 45HP armor on all NEW characters", ID);
						Commands->Create_2D_WAV_Sound("bonus_complete.wav");
					}
					Console_Input(Promote);
                }
				else if (cvp < 60 && now >= 60) {
                    char Promote[255];
				sprintf(Promote,"msg Veteran: %s just got promoted to the rank of Brigadier", Get_Player_Name_By_ID(ID));
				Console_Input(Promote);
					if (Team == 0) {
						sprintf(Promote, "ppage %d The Brotherhood of Nod likes your style, you are promoted to rank Brigadier, enjoy the extra 30HP armor on all NEW characters", ID);
						Commands->Create_2D_WAV_Sound("m00bgwf_kill0031i1nbrs_snd.wav");
					}
					else {
						sprintf(Promote, "ppage %d Keep em coming! you done all that left handed? You are promoted to Brigadier, enjoy the extra 30HP armor on all NEW characters", ID);
						Commands->Create_2D_WAV_Sound("m00achk_kill0034i1gbmg_snd.wav");
					}
					Console_Input(Promote);
				}
				else if (cvp < 30 && now >= 30) {
                    char Promote[255];
					sprintf(Promote,"msg Veteran: %s just got promoted to the rank of Major, he gets an extra 15HP armor on every character he now buys", Get_Player_Name_By_ID(ID));
				Console_Input(Promote);
					if (Team == 0) {
						sprintf(Promote, "ppage %d Kane wants you in his elite, you are promoted to Major, enjoy the splendors of war brother as every NEW character you buy will have an extra 15HP armor", ID);
						Commands->Create_2D_WAV_Sound("m00avis_kick0041i1nsmg_snd.wav");
					}
					else {
						sprintf(Promote, "ppage %d The deadsix needs people like you, you are promoted to Major! Every NEW character from now on will have an extra 15HP armor", ID);
						Commands->Create_2D_WAV_Sound("m00_wins0003eval_snd.wav");
					}
					Console_Input(Promote);
				}
				break;
			}
		}
	}
}

int VetCheckPoints(int ID) {
	if (!VetInfo.empty()) {
		for (int i = 0; i < VetInfo.size(); i++) {
			if (VetInfo[i].PlayerName == Get_Player_Name_By_ID(ID)) {
				int Points;
				Points = VetInfo[i].VeteranPoints;
				return Points;
			}
		}
	}
	return 0;
}

bool VetCheck(int ID) {
	if (!VetInfo.empty()) {
		for (int i = 0; i < VetInfo.size(); i++) {
			if (VetInfo[i].PlayerName == Get_Player_Name_By_ID(ID)) {
				return true;
			}
		}
	}
	return false;
}

void VetAddPlayer(int ID) {
	if (VetCheck(ID) == false) {
		VeteranPlayers temp;
		temp.PlayerName = Get_Player_Name_By_ID(ID);
		temp.VeteranPoints = 0;
		VetInfo.push_back(temp);
	}
}

void VetClearPlayers() {
	VetInfo.erase(VetInfo.begin(), VetInfo.end());
	int Players = The_Game()->MaxPlayers;
	for (int i = 1; i <= Players; i++) {
		if (Get_GameObj(i)) {
			VetAddPlayer(i);
		}
	}
}

void reb_vet_System::Created(GameObject *obj) {
	int Points;
	Points = VetCheckPoints(Get_Player_ID(obj));
	if (Points >= 100) {
		Level = 3;

		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Attach_Script(Icon,"MDB_SSGM_Destroy_When_Object_Destroyed",ToString(Commands->Get_ID(obj)).c_str());
		IconID = Commands->Get_ID(Icon);
		Commands->Set_Model(Icon, "p_keycrd_red");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");
		Set_Max_Shield_Strength(obj, 145);
		Commands->Set_Shield_Strength(obj, 145);

		Commands->Start_Timer(obj, this, 2.0f, 3);
	}
	else if (Points >= 60) {
		Level = 2;

		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Attach_Script(Icon,"MDB_SSGM_Destroy_When_Object_Destroyed",ToString(Commands->Get_ID(obj)).c_str());
		Commands->Set_Model(Icon, "p_keycrd_yel");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");
		IconID = Commands->Get_ID(Icon);

		Set_Max_Shield_Strength(obj, 130);
		Commands->Set_Shield_Strength(obj, 130);

	}
	else if (Points >= 30) {

		Level = 1;

		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Attach_Script(Icon,"MDB_SSGM_Destroy_When_Object_Destroyed",ToString(Commands->Get_ID(obj)).c_str());
		Commands->Set_Model(Icon, "p_keycrd_grn");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");
		IconID = Commands->Get_ID(Icon);

		if (strstr(Commands->Get_Preset_Name(obj),"CnC_Nod_FlameThrower_2SF")){

		}

		Set_Max_Shield_Strength(obj, 115);
		Commands->Set_Shield_Strength(obj, 115);

	}
	else {
		Level = 0;
	}
	Commands->Start_Timer(obj, this, 60.0f, 10);
}

void reb_vet_System::Custom(GameObject *obj, int message, int param, GameObject *sender) {
	if (message == CUSTOM_EVENT_VEHICLE_ENTER) {
		Commands->Destroy_Object(Commands->Find_Object(IconID));
	}
	else if (Level == 3) {
		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Attach_Script(Icon,"MDB_SSGM_Destroy_When_Object_Destroyed",ToString(Commands->Get_ID(obj)).c_str());
		Commands->Set_Model(Icon, "p_keycrd_red");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");
		IconID = Commands->Get_ID(Icon);
		float Shield;
		Shield = Commands->Get_Shield_Strength(obj);
		Set_Max_Shield_Strength(obj, 145);
		Commands->Set_Shield_Strength(obj, Shield);

		}
		else if (Level == 2) {
		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Attach_Script(Icon,"MDB_SSGM_Destroy_When_Object_Destroyed",ToString(Commands->Get_ID(obj)).c_str());
		Commands->Set_Model(Icon, "p_keycrd_yel");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");
		IconID = Commands->Get_ID(Icon);
		float Shield;
		Shield = Commands->Get_Shield_Strength(obj);
		Set_Max_Shield_Strength(obj, 130);
		Commands->Set_Shield_Strength(obj, Shield);

		}
		else if (Level == 1) {
		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Attach_Script(Icon,"MDB_SSGM_Destroy_When_Object_Destroyed",ToString(Commands->Get_ID(obj)).c_str());
		IconID = Commands->Get_ID(Icon);
		Commands->Set_Model(Icon, "p_keycrd_grn");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");

				if (strstr(Commands->Get_Preset_Name(obj),"CnC_Nod_FlameThrower_2SF")){

		}
		
		float Shield;
		Shield = Commands->Get_Shield_Strength(obj);
		Set_Max_Shield_Strength(obj, 115);
		Commands->Set_Shield_Strength(obj, Shield);
		}
		Commands->Start_Timer(obj, this, 60.0f, 10);
	}

	


void reb_vet_System::Timer_Expired(GameObject *obj, int number) {
	/*
	if (number == 3) {
		Commands->Apply_Damage(obj, -1.0f, "Repair", false);
		Commands->Start_Timer(obj, this, 2.0f, 5);
	}
	else if (number == 10) {
		int Points;
		Points = VetCheckPoints(Get_Player_ID(obj));
		if (Points >= 100 && Level < 3) {
			Level = 3;
			if (Get_Vehicle(obj) == 0) {
				Commands->Destroy_Object(Commands->Find_Object(ID));
		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Set_Model(Icon, "p_keycrd_red");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");
		ID = Commands->Get_ID(Icon);

			}
			Commands->Start_Timer(obj, this, 2.0f, 3);
		}
		else if (Points >= 60 && Level < 2) {
			Level = 2;
			if (Get_Vehicle(obj) == 0) {
				Commands->Destroy_Object(Commands->Find_Object(ID));
		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Set_Model(Icon, "p_keycrd_yel");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");
		ID = Commands->Get_ID(Icon);

			}
		}
		else if (Points >= 30 && Level < 1) {
			Level = 1;
			if (Get_Vehicle(obj) == 0) {
				Commands->Destroy_Object(Commands->Find_Object(ID));
		GameObject *Icon = Commands->Create_Object_At_Bone(obj,"Invisible_Object", "c L THIGH");
		Commands->Set_Model(Icon, "p_keycrd_grn");
		Commands->Attach_To_Object_Bone(Icon, obj, "c L THIGH");
		ID = Commands->Get_ID(Icon);

			}
		}
		Commands->Start_Timer(obj, this, 60.0f, 10);		
	}
	*/
}

void reb_vet_System::Killed(GameObject *obj, GameObject *shooter) {
	
	Destroy_Script();
}

void reb_vet_System::Destroyed(GameObject *obj) {
    Commands->Destroy_Object(Commands->Find_Object(IconID));
	Destroy_Script();
}

void reb_vet_System_Vehicles::Custom(GameObject *obj, int message, int param, GameObject *sender) {
	if (message == CUSTOM_EVENT_VEHICLE_ENTER) {
		int Points;
		Points = VetCheckPoints(Get_Player_ID(sender));
		if (Points >= 100) {
			Level = 3;
			IsPoweredUp = true;

			if (IsLowClassVehicle(Commands->Get_Preset_Name(obj)) == true) {
//nothing			
			}
			else {
				Commands->Start_Timer(obj, this, 1.0f, 3);
			}
		}
		else if (Points >= 60) {
			Level = 2;
			IsPoweredUp = true;

			if (IsLowClassVehicle(Commands->Get_Preset_Name(obj)) == true) {
//nothing

				Commands->Start_Timer(obj, this, 1.0f, 2);
			}
			else {
				Commands->Start_Timer(obj, this, 1.0f, 3);
			}
		}
		else if (Points >= 30) {
			Level = 1;
			IsPoweredUp = true;

			if (IsLowClassVehicle(Commands->Get_Preset_Name(obj)) == true) {
//nothing
			}
			else {
				Commands->Start_Timer(obj, this, 1.0f, 1);
			}
		}
		Commands->Send_Custom_Event(sender, sender, CUSTOM_EVENT_VEHICLE_ENTER, 0, 0);
	}
	else if (message == CUSTOM_EVENT_VEHICLE_EXIT) {
		if (IsPoweredUp == true) {
			IsPoweredUp = false;
			if (Level == 1) {
				if (IsLowClassVehicle(Commands->Get_Preset_Name(obj)) == true) {
//nothing
				}
			}
			else if (Level == 2) {
				if (IsLowClassVehicle(Commands->Get_Preset_Name(obj)) == true) {
//nothing
				}
			}
			else if (Level == 3) {
				if (IsLowClassVehicle(Commands->Get_Preset_Name(obj)) == true) {
//nothing
				}
			}
		}
		Commands->Send_Custom_Event(sender, sender, CUSTOM_EVENT_VEHICLE_EXIT, 0, 0);
	}
}
void reb_vet_System_Vehicles::Timer_Expired(GameObject *obj, int number) {
	if (number == 3 && IsPoweredUp == true) {
		Commands->Destroy_Object(Commands->Find_Object(ID));
		Commands->Apply_Damage(obj, -3.0f, "Repair", false);
		Commands->Start_Timer(obj, this, 1.0f, 3);
	}
	else if (number == 2 && IsPoweredUp == true) {
		float Health, MaxHealth;
		Health = Commands->Get_Health(obj);
		MaxHealth = Commands->Get_Max_Health(obj);
		if (Health == MaxHealth) {
			// Nothing
		}
		else if (Health >= MaxHealth - 2) {
			Commands->Set_Health(obj, MaxHealth);
		}
		else if (Health <= MaxHealth - 3) {
			Commands->Set_Health(obj, Health + 3);
		}
		Commands->Start_Timer(obj, this, 1.0f, 2);
	}
	else if (number == 1 && IsPoweredUp == true) {
		float Shield, MaxShield;
		Shield = Commands->Get_Shield_Strength(obj);
		MaxShield = Commands->Get_Max_Shield_Strength(obj);
		if (Shield == MaxShield) {
			// Nothing
		}
		else if (Shield >= MaxShield - 2) {
			Commands->Set_Shield_Strength(obj, MaxShield);
		}
		else if (Shield <= MaxShield - 3) {
			Commands->Set_Shield_Strength(obj, Shield + 3);
		}
		Commands->Start_Timer(obj, this, 1.0f, 1);
	}
}

void reb_vet_System_Vehicles::Killed(GameObject *obj, GameObject *shooter) {
	Commands->Destroy_Object(Commands->Find_Object(ID));
	Destroy_Script();
}

void reb_vet_System_Vehicles::Destroyed(GameObject *obj) {
	Commands->Destroy_Object(Commands->Find_Object(ID));
	Destroy_Script();
}

void Player_Join_Hook(int i,const char *Nick) {
		   VetAddPlayer(i);
	if (!Data->Plugins.empty()) {
		std::vector<PluginInfo*>::const_iterator it;
		for (it = Data->Plugins.begin();it != Data->Plugins.end(); ++it) {
			if ((*it)->Type == Plugin) {
				if ((*it)->PlayerJoinHookHandle) {
					(*it)->PlayerJoinHookHandle(i,Nick);	
				}
			}
		}
	}
	if (Settings->GameMode == 2) {
		CTF_Player_Join(i);
	}
}

void GameOver() {
	VetClearPlayers();
	char ObjectsType[10],ObjectsType2[10],ObjectsFile[20];
// rest of game over code from ssgm here, just didnt paste it to spam

ScriptRegistrant<reb_vet_System> reb_vet_System_Registrant("reb_vet_System","");
ScriptRegistrant<reb_vet_System_Vehicles> reb_vet_System_Vehicles_Registrant("reb_vet_System_Vehicles","");

class vetChatCommand : public ChatCommandClass {
	void Triggered(int ID,const TokenClass &Text,int ChatType) {
		GameObject *obj = Get_GameObj(ID);
		if (!VetInfo.empty()) {
				for (int i = 0; i < VetInfo.size(); i++) {
					if (VetInfo[i].PlayerName == Get_Player_Name_By_ID(ID)) {
						int vetp; 
						float score;
						vetp = VetInfo[i].VeteranPoints;
						score = Commands->Get_Points(Get_GameObj(ID));

						char Vet[255];
						if (vetp >= 100) {
							sprintf(Vet, "ppage %d Veteran Info for %s - Veteran Rank: General", ID, Get_Player_Name_By_ID(ID));
						}
						else if (vetp >= 60) {
							sprintf(Vet, "ppage %d Veteran Info for %s - Veteran Points %d/100 - Veteran Rank: Brigadier", ID, Get_Player_Name_By_ID(ID), vetp);
						}
						else if (vetp >= 30) {
							sprintf(Vet, "ppage %d Veteran Info for %s - Veteran Points %d/60 - Veteran Rank: Major", ID, Get_Player_Name_By_ID(ID), vetp);
						}
						else {
							sprintf(Vet, "ppage %d Veteran Info for %s - Veteran Points %d/30 - Veteran Rank: Private", ID, Get_Player_Name_By_ID(ID), vetp);
						}
						Console_Input(Vet);
						break;
					}
				}
		}
	}
};
ChatCommandRegistrant<vetChatCommand> vetChatCommandReg("!vet",CHATTYPE_TEAM,0,GAMEMODE_AOW);

class reb_vet_System : public ScriptImpClass {
	void Created(GameObject *obj);
	void Custom(GameObject *obj, int message, int param, GameObject *sender);
	void Timer_Expired(GameObject *obj, int number);
	void Killed(GameObject *obj, GameObject *shooter);
	void Destroyed(GameObject *obj);
	int Level;
	int IconID;
};

class reb_vet_System_Vehicles : public ScriptImpClass {
	void Custom(GameObject *obj, int message, int param, GameObject *sender);
	void Timer_Expired(GameObject *obj, int number);
	void Killed(GameObject *obj, GameObject *shooter);
	void Destroyed(GameObject *obj);
	int Level;
	int ID;
	bool IsPoweredUp;
};

void MDB_SSGM_Building::Killed(GameObject *obj, GameObject *shooter) {
	if (Commands->Is_A_Star(shooter)){
	VetUpdate(Get_Player_ID(shooter), 25, Commands->Get_Points(shooter));
	}
	if (Commands->Get_ID(shooter) != 0) {
		if (Settings->LogBuildingKills) {
			GameObject *Preset = GetExplosionObj();
			if (!Preset) {
				Preset = shooter;
			}
			FDSMessage(StrFormat("%s destroyed thanks to %ls (%s)",Translate_Preset(obj).c_str(),Get_Wide_Player_Name(shooter),Get_Preset_Info(Preset).c_str()),"_BUILDING");
		}
		if (Settings->BuildingDeathRewardPage) {
			Console_Input(StrFormat("ppage %d The %s has been destroyed thanks to you!",Get_Player_ID(shooter),Translate_Preset(obj).c_str()).c_str());
		}
		if (Settings->GameMode == 1) {
			Commands->Set_Is_Visible(shooter,true);
		}
	}
	IsAlive = false;

	if (Get_Building_Count_Team(Get_Object_Type(obj)) == 0) {
		BaseControllerClass::Find_Base(Get_Object_Type(obj))->Destroy_Base();
	}

}

void MDB_SSGM_Player::Killed(GameObject *obj, GameObject *shooter) {

	if (Commands->Is_A_Star(shooter) && Commands->Get_Player_Type(shooter) != Commands->Get_Player_Type(obj))
{
VetUpdate(Get_Player_ID(shooter), GetPoints(Commands->Get_Preset_Name(obj)), Commands->Get_Points(shooter));
}
	WasKilled = true;
	if (Find_My_Veh(obj)) {
		Commands->Send_Custom_Event(obj,Find_My_Veh(obj),1111,0,0);
		Console_Input(StrFormat("ppage %d Your vehicle has been unbound because you died.",Get_Player_ID(obj)).c_str());
	}
	if (Settings->ExtraKillMessages) {
		if (Commands->Get_ID(shooter) == 0) {
			Send_Message_With_Team_Color(Get_Object_Type(obj),StrFormat("%ls was killed",Get_Wide_Player_Name(obj)).c_str());
		}
		else if (Commands->Get_ID(obj) == Commands->Get_ID(shooter)) {
			Send_Message_With_Team_Color(Get_Object_Type(obj),StrFormat("%ls killed theirself",Get_Wide_Player_Name(obj)).c_str());
		}
		else if (!Commands->Is_A_Star(shooter))	{
			Send_Message_With_Team_Color(Get_Object_Type(shooter),StrFormat("The %s killed %ls",Translate_Preset(shooter).c_str(),Get_Wide_Player_Name(obj)).c_str());
		}
	}
	if (Settings->LogPlayerKills) {
		GameObject *ExpObj = GetExplosionObj();
		GameObject *Preset = ExpObj;
		if (!Preset) {
			Preset = shooter;
		}
		if (Commands->Get_ID(shooter) == 0) {
			FDSMessage(StrFormat("%ls was killed (%s)",Get_Wide_Player_Name(obj),Get_Preset_Info(obj).c_str()),"_PLAYERKILL");
		}
		else if (Commands->Get_ID(obj) == Commands->Get_ID(shooter)) {
			FDSMessage(StrFormat("%ls killed theirself (%s)",Get_Wide_Player_Name(obj),Get_Preset_Info(Preset).c_str()),"_PLAYERKILL");
		}
		else if (!Commands->Is_A_Star(shooter))	{
			FDSMessage(StrFormat("The %s killed %ls (%s)",Translate_Preset(shooter).c_str(),Get_Wide_Player_Name(obj),Get_Preset_Info(obj).c_str()),"_PLAYERKILL");
		}
		else {
			std::string killer = Get_String_Player_Name(shooter),
				killed = Get_String_Player_Name(obj),
				killerpreset = Get_Preset_Info(Preset),
				killedpreset = Get_Preset_Info(obj);
			if (Get_Vehicle(shooter) && !ExpObj) {
				std::string KillMsg = Settings->VvSKillMsg[Commands->Get_Random_Int(0,Settings->VvSKillMsg.size())];
				StrReplace(KillMsg,"<killer>",killer);
				StrReplace(KillMsg,"<killed>",killed);
				StrReplace(KillMsg,"<killerpreset>",killerpreset);
				StrReplace(KillMsg,"<killedpreset>",killedpreset);
				FDSMessage(KillMsg,"_PLAYERKILL"); 
			}
			else {
				std::string KillMsg = Settings->SvSKillMsg[Commands->Get_Random_Int(0,Settings->SvSKillMsg.size())];
				StrReplace(KillMsg,"<killer>",killer);
				StrReplace(KillMsg,"<killed>",killed);
				StrReplace(KillMsg,"<killerpreset>",killerpreset);
				StrReplace(KillMsg,"<killedpreset>",killedpreset);
				FDSMessage(KillMsg,"_PLAYERKILL");
			}
		} 
	}
}

void MDB_SSGM_Vehicle::Killed(GameObject *obj, GameObject *shooter) {

	if (Commands->Is_A_Star(shooter)){
VetUpdate(Get_Player_ID(shooter), GetPoints(Commands->Get_Preset_Name(obj)), Commands->Get_Points(shooter));
	}
	if (Settings->LogVehicleKills) {
		GameObject *Preset = GetExplosionObj();
		if (!Preset) {
//rest of mdb_ssgm_vehicle::Killed goes here

const char *pName = Get_Player_Name_By_ID(10);
if(pName)
{
   //use
   delete []pName;
}

const char *Get_Player_Name_By_ID(int PlayerID)
{
	cPlayer *x = FindPlayer(PlayerID);
	if (!x)
	{
		return 0;
	}
	return WideCharToChar(x->PlayerName);
}

const char *WideCharToChar(const wchar_t *wcs)
{
	if (!wcs)
	{
		char *c = new char[2];
		c[0] = 0;
		c[1] = 0;
		return c;
	}
	int length = wcslen(wcs);
	char *text = new char[length+1];
	wcstombs(text,wcs,length+1);
	return text;
}