/**
* File: War3Source_Necromancer.sp
* Description: The Necromancer unit for War3Source.
* Author(s): [Oddity]TeacherCreature
*/
 
#pragma semicolon 1
 
#include <sourcemod>
#include "W3SIncs/War3Source_Interface"
#include <sdkhooks>
#include <sdktools>
#include <sdktools_functions>
#include <sdktools_tempents>
#include <sdktools_tempents_stocks>
 
//native War3_GetAimEndPoint(client,Float:returnvector[3]);
 
new thisRaceID;
 
//skill 1
new Float:CrippleChance[]={0.00,0.20,0.24,0.28,0.32,0.36,0.40,0.44,0.48};
//skill 2
new FrenzyCost[]={0,8,7,6,5,4,3,2,1};
new bool:bFrenzy[66];
 
//skill 3
new Mastery[9]={40,45,50,55,60,65,70,75,80};
 
//skill 4
new String:facsnd[]="vo/trainyard/ba_backup.wav";
new Raiser[66];
new Skeleton[66];
new Float:RaiseDeadChance[9]={0.0,0.40,0.40,0.45,0.50,0.55,0.60,0.65,0.70};
new g_offsCollisionGroup;
 
new SKILL_CRIPPLE, SKILL_UNHOLYFRENZY, SKILL_MASTERY, ULT_RAISEDEAD;
 
public Plugin:myinfo =
{
        name = "War3Source Race - Necromancer",
        author = "[Oddity]TeacherCreature",
        description = "The Necromancer unit for War3Source.",
        version = "1.0.0.0",
        url = "warcraft-source.net"
}
 
public OnWar3LoadRaceOrItemOrdered(num)
{
        if(num==186)
        {
                thisRaceID=War3_CreateNewRace("[ALPHA]Necromancer","necro");
                SKILL_CRIPPLE=War3_AddRaceSkill(thisRaceID,"Cripple(attacker)","Slow and weaken your enemy",false,8);
                SKILL_UNHOLYFRENZY=War3_AddRaceSkill(thisRaceID,"Unholy Frenzy(ability)","Take dmg but increased attack rate (+ability)",false,8);
                SKILL_MASTERY=War3_AddRaceSkill(thisRaceID,"Skeletal Mastery(passive)","Enhanced Skeletons with health and cripple",false,8);
                ULT_RAISEDEAD=War3_AddRaceSkill(thisRaceID,"Raise Dead(ultimate)","You raise a skeleton to fight with you",true,8);
                War3_CreateRaceEnd(thisRaceID);
        }
}
 
public OnMapStart()
{
        War3_PrecacheSound(facsnd);
}
 
public OnPluginStart()
{
        g_offsCollisionGroup = FindSendPropOffs("CBaseEntity", "m_CollisionGroup");    
}
 
public Action:OnWar3TakeDamage(victim,attacker,inflictor,Float:damage,damagetype)
{
        if(IS_PLAYER(victim)&&IS_PLAYER(attacker)&&victim>0&&attacker>0&&attacker!=victim)
        {
                new vteam=GetClientTeam(victim);
                new ateam=GetClientTeam(attacker);
                if(vteam!=ateam)
                {
                        new race_attacker=War3_GetRace(attacker);
                        new skill_level=War3_GetSkillLevel(attacker,thisRaceID,SKILL_CRIPPLE);
                        if(race_attacker==thisRaceID && skill_level>0 )
                        {
                                if(GetRandomFloat(0.0,1.0)<=CrippleChance[skill_level] && !War3_GetImmunity(victim,Immunity_Skills))
                                {
                                War3_SetBuff(victim,fSlow,thisRaceID,0.6);
                                War3_SetBuff(victim,fAttackSpeed,thisRaceID,0.5);
                                War3_FlashScreen(victim,RGBA_COLOR_RED);
                                CreateTimer(2.0,RemoveCripple,victim);
                                PrintHintText(victim,"You have been crippled!");
                                PrintHintText(attacker,"Crippled!");
                                }
                        }
                }
        }
}
public Action:RemoveCripple(Handle:t,any:client){
        War3_SetBuff(client,fSlow,thisRaceID,1.0);
        War3_SetBuff(client,fAttackSpeed,thisRaceID,1.0);
}
 
public Action:UnfreezePlayer(Handle:timer,any:userid)
{
        new client=GetClientOfUserId(userid);
        if(client>0)
        {
                //PrintHintText(client,"NO LONGER BASHED");
                War3_SetBuff(client,bBashed,thisRaceID,false);
                SetEntityMoveType(client,MOVETYPE_WALK);
        }
}
 
public OnAbilityCommand(client,ability,bool:pressed)
{
        if(War3_GetRace(client)==thisRaceID && ability==0 && pressed && IsPlayerAlive(client))
        {
                new skill_level=War3_GetSkillLevel(client,thisRaceID,SKILL_UNHOLYFRENZY);
                if(skill_level>0)
                {
                        
                        if(War3_SkillNotInCooldown(client,thisRaceID,SKILL_UNHOLYFRENZY,true))
                        {
                                if(bFrenzy[client]==false)
                                {
                                        bFrenzy[client]=true;
                                        CreateTimer(0.1,Frenzy,client);
                                        War3_CooldownMGR(client,3.0,thisRaceID,SKILL_UNHOLYFRENZY,_,_,_,"Unholy Frenzy");
                                        PrintHintText(client,"Unholy Frenzy: Activated be careful");
                                }
                                else
                                {
                                        bFrenzy[client]=false;
                                        PrintHintText(client,"Unholy Frenzy: Deactivated");
                                }
                        }
                }
        }
}
 
public Action:Frenzy(Handle:t,any:client)
{
        new skill_level=War3_GetSkillLevel(client,thisRaceID,SKILL_UNHOLYFRENZY);
        if(skill_level>0)
        {      
                if(bFrenzy[client]==true)
                {
                        new hpsub=FrenzyCost[skill_level];
                        if(hpsub<GetClientHealth(client))
                        {
                                SetEntityHealth(client,GetClientHealth(client)-hpsub);
                        }
                        else
                        {
                                War3_DealDamage(client,FrenzyCost[skill_level],client,DMG_BULLET,"Unholy Frenzy");
                        }
                        War3_SetBuff(client,fAttackSpeed,thisRaceID,1.4);
                        CreateTimer(1.0,Frenzy,client);
                }
                else
                {
                        War3_SetBuff(client,fAttackSpeed,thisRaceID,1.0);
                }
        }
}
 
 
public OnRaceSelected(client, newrace)
{
        if(newrace!=thisRaceID)
        {
                bFrenzy[client]=false;
                War3_SetBuff(client,fAttackSpeed,thisRaceID,1.0);
                War3_SetPlayerColor(client,255,255,255);
        }
}
 
public OnWar3EventSpawn(client)
{
        new race = War3_GetRace(client);
        if (race == thisRaceID)
        {
                bFrenzy[client]=false;
                SetEntityModel(client, "models/player/techknow/trophy/trophy.mdl");
                if(GetClientTeam(client)==3)
                {
                        War3_SetPlayerColor(client,255,255,255);
                }
                else
                {
                        War3_SetPlayerColor(client,220,50,0);
                }
        }
}
 
public OnUltimateCommand(client,race,bool:pressed)
{
        if(race==thisRaceID && pressed && IsPlayerAlive(client))
        {
                new skill=War3_GetSkillLevel(client,race,ULT_RAISEDEAD);
                if(skill>0)
                {
                        if(War3_SkillNotInCooldown(client,thisRaceID,3,true))
                        {
                                new skill_master=War3_GetSkillLevel(client,thisRaceID,SKILL_MASTERY);
                                if(GetRandomFloat(0.0,1.0)<=RaiseDeadChance[skill])
                                {
                                        new summonerteam;
                                        summonerteam=GetClientTeam(client);
                                        new possibletargets[MAXPLAYERS];
                                        new possibletargetsfound;
                                        for(new x=1;x<=MaxClients;x++)
                                        {
                                                if(War3_ValidPlayer(x) && summonerteam==GetClientTeam(x) && IsPlayerAlive(x)==false)
                                                {
                                                        //new summonteam=GetClientTeam(x);
                                                        //if(summonteam==summonerteam && IsPlayerAlive(x)==false)
                                                        //{
                                                                possibletargets[possibletargetsfound]=x;
                                                                possibletargetsfound++;
                                                //      }
                                                }
                                        }
                                        new onetarget;
                                        if(possibletargetsfound>0)
                                        {
                                                onetarget=GetRandomInt(0, possibletargetsfound-1); //i hope random 0 0 works to zero
                                                if(onetarget>0)
                                                {
                                                        War3_CooldownMGR(client,15.0,thisRaceID,ULT_RAISEDEAD,_,_,_,"Raise dead");
                                                        new Float:ang[3];
                                                        new Float:pos[3];
                                                        War3_SpawnPlayer(onetarget);
                                                        GetClientEyeAngles(client,ang);
                                                        GetClientAbsOrigin(client,pos);
                                                        pos[0]+=45.0;
                                                        pos[1]+=45.0;
                                                        pos[2]+=5.0;
                                                        TeleportEntity(onetarget,pos,ang,NULL_VECTOR);
                                                        EmitSoundToAll(facsnd,client);
                                                        Raiser[onetarget]=client;
                                                        Skeleton[client]=onetarget;
                                                        SetEntityModel(onetarget, "models/player/slow/bones/bones.mdl");
                                                        if(GetClientTeam(onetarget)==3)
                                                        {
                                                                War3_SetPlayerColor(onetarget,20,100,200); //fyi the new buff sytem includes setplayercolor, so ud have to change all these functions names
                                                        }
                                                        else
                                                        {
                                                                War3_SetPlayerColor(onetarget,200,100,20);
                                                        }
                                                        //War3_WeaponRestrictTo(onetarget,"weapon_knife");
                                                        War3_SetMaxHP(onetarget, Mastery[skill_master]);
                                                        War3_SetBuff(onetarget,fMaxSpeed,thisRaceID,0.9);
                                                        PrintHintText(onetarget,"RaiseDead: You were raised as a skeleton");
                                                        PrintHintText(client,"RaiseDead: You raise a skeleton");
                                                        SetEntData(onetarget, g_offsCollisionGroup, 2, 4, true);
                                                        CreateTimer(2.0,normal,onetarget);
                                                }
                                        }
                                        else
                                        {
                                                PrintHintText(client,"RaiseDead: Need a corpse");
                                        }
                                }
                                else
                                {
                                        PrintHintText(client,"RaiseDead: Failed");
                                        War3_CooldownMGR(client,3.0,thisRaceID,ULT_RAISEDEAD,_,_,_,"Raise dead");
                                }
                        }
                }
        }
}
 
public Action:normal(Handle:timer,any:client)
{
        new Float:end_dist=50.0;
        new Float:end_pos[3];
        GetClientAbsOrigin(client,end_pos);
        for(new i=1;i<=MaxClients;i++)
        {
                if(War3_ValidPlayer(i,true)&&i!=client)
                {
                        new Float:pos[3];
                        GetClientAbsOrigin(i,pos);
                        new Float:dist=GetVectorDistance(end_pos,pos);
                        if(dist<=end_dist)
                        {
                                CreateTimer(0.3,normal,i);
                        }
                        else{
                                SetEntData(client, g_offsCollisionGroup, 5, 4, true);
                                SetEntData(i, g_offsCollisionGroup, 5, 4, true);
                        }
                }
        }
}