require('State')
require('o_WayPointEvents')
require('o_onEvent')
require('o_mis')
require("o_Movement")

function CreateStates(self)
    Timers = {}
    Timers[1] = "blank"
    self:SetVar("Timers",Timers)
    storeHomePoint(self)
    self:SetTetherPoint { tetherPt = self:GetPosition().pos,radius = 0 }
    CombatState(self)
    -- if Way Points
    if self:GetVar("Set.WayPointSet") ~= nil or self:GetVar("attached_path") ~= nil or self:GetVar("groupID") ~= nil then
        UseWayPoints(self)
    end 
    -- if Frozen
    if self:GetVar("Set.MovementType") == "Frozen" then
         AggroState(self)
    end
    -- if Guard
    if self:GetVar("Set.MovementType") == "Guard" then
        AggroState(self)
    end
    -- if Wander
    if self:GetVar("Set.MovementType") == "Wander" then
        MeanderState(self)
    end
    -- if follow
    if self:GetVar("Set.FollowActive")  then
        FollowState(self)
    end
    -- if Helper
    if self:GetVar("Set.Helper") then
        SetHelper(self)
    end

    customState = State.create()
        customState.onEnter = function(self)
            if (onTemplateCustomStateEnter) and (onTemplateCustomStateEnter(self, msg) == true ) then
                return
            end
        end

        customState.onArrived = function(self, msg)
            if (onTemplateCustomStateArrived) and (onTemplateCustomStateArrived(self, msg) == true  ) then
                return
            end
        end

    Idle = State.create()
        Idle.onEnter = function(self)
            if self:GetVar("Set.Pet_Active") and not self:GetVar("PetLoaded") then
                print "Pet stuff?"
                self:SetVar("PetLoaded", true)
                setState("PetClass",self)
            end
            if self:GetVar("RebuildStart") then
                print "Pet stuff?"
                storeHomePoint(self)
                self:SetVar("inpursuit",true)
                GAMEOBJ:GetTimer():AddTimerWithCancel( self:GetVar("Set.Emote_EventDelay") , "rebuildBreak", self )
            end
        end

    AiDisable = State.create()
        AiDisable.onEnter = function(self)
            print "AI Disabled?"
            self:SetVar("myTarget", nil)
            storeHomePoint(self)
            self:SetTetherPoint { tetherPt = self:GetPosition().pos,radius = 0 }
            CancelTemplateTimers(self)
            self:SetVar("AiDisabled", true)
            self:StopPathing()
        end

    AiEnable = State.create()
        AiEnable.onEnter = function(self)
            print "AI Enabled?"
            self:SetVar("AiDisabled", false)
            SetResetState(self)
        end
    end

    Dead = State.create()
        Dead.onEnter = function(self)
            self:SetVar("CurrentState", "Dead")
            if self:GetVar("I_Have_A_Parent") then
                local WpSetName = self:GetVar("attached_path")
                local  myParent = getParent(self)
                local sSplit =  split(WpSetName,"_")
                local xSplit = {}
                local xSplit= {alpa=sSplit[1] , num=sSplit[2] }
                myParent:SetVar( self:GetVar("SpawnedVar") , "NotSpawned") 
                setState("DeadChild", myParent)
            end
            if self:GetVar("Im_A_Child") then
                myParent = getParent(self)
                for i = 1, getParent(self):GetVar("MaxPet") do
                    local myidString = self:GetID()
                    local myfinalID = "|" .. myidString
                    local Pet = getPetID(myParent,i):GetID()
                    if  Pet == self:GetID() then
                        myParent:SetVar("StoredPet."..i, "none")
                        myParent:SetVar("Child_Timer."..i, myfinalID )
                        GAMEOBJ:GetTimer():AddTimerWithCancel( myParent:GetVar("Set.Pet_Respawn") , myfinalID, myParent )
                    end
                end
            end
            getVarables(self)
            CancelTemplateTimers(self)
        end

    tether = State.create()
        tether.onEnter = function(self)
            --print "I'm a tetherin' fool."
            self:SetVar("myTarget", nil)
            if self:GetVar("Set.tetherSpeed") ~= nil then
                local Tspeed =  self:GetVar("Set.tetherSpeed")
            else
                local Tspeed = 1
            end
            local myPos = getHomePoint(self)
            self:GoTo { speed = self:GetVar("Set.tetherSpeed"), target = { x = myPos.x, y = myPos.y, z = myPos.z }}
        end

    tether.onArrived = function(self,msg)
        --print "I have arrived at my home tether point."
        self:SetHealth{ health = self:GetMaxHealth{}.health }
        getVarables(self)
        SetResetState(self) 
    end

    tether.onCollisionPhantom = function(self,msg)
        print "Aggro time"
        setState("aggro", self) 
    end

    GoHome = State.create()
        GoHome.onEnter = function(self)
            --print "I'm going home!"
            self:SetVar("CurrentState", "GoHome")
            local hpos = getHomePoint(self)
            self:GoTo { speed = 1, target = { x =hpos.x ,z =hpos.z ,y =hpos.y } }
        end

        GoHome.onArrived = function(self)
            --print "I'm home!"
            self:SetRotation(self:GetVar("rot"))
            SetResetState(self)  
        end

    function AggroState(self)
        aggro = State.create()
            aggro.onCollisionPhantom = function(self, msg)
                local myPos = getHomePoint(self)
                local target = msg.objectID
                local faction = target:GetFaction()
                local playerVelx = target:GetLinearVelocity().linVelocity.x
                local playerVely = target:GetLinearVelocity().linVelocity.y
                local playerVelz = target:GetLinearVelocity().linVelocity.z
                self:SetVar("CurrentState", "aggro")
                self:SetVar("readyToAttack", false)
                    if faction and faction.faction == 1 and playerVelx ~= 0 and playerVely ~= 0 and playerVelz ~= 0 and self:GetVar("switch") == 1 then
                        self:SetVar("switch", 0)
                        GAMEOBJ:GetTimer():CancelTimer( "MeanderPause", self )
                        GAMEOBJ:GetTimer():CancelTimer( "AggroCheck", self )
                        --print "I see you!"
                        local INITIAL_ATTACK_TIME = 1
                        GAMEOBJ:GetTimer():AddTimerWithCancel(  INITIAL_ATTACK_TIME , "AttackHeartBeat", self )
                        if target:IsDead().bDead  then
                            self:SetVar("Aggroed", false)
                            ProximityPuls(self)
                        else
                        if self:GetVar("Set.MovementType") ~= "Frozen" then
                            self:SetTetherPoint { tetherPt = myPos,radius = self:GetVar("Set.tetherRadius") }
                            if self:GetVar("Set.AggroDist") ~= nil and self:GetVar("Set.AggroSpeed") ~= nil then

                                GAMEOBJ:GetTimer():CancelTimer( "CheckingforMovement", self )
                                GAMEOBJ:GetTimer():AddTimerWithCancel(  1.0 , "CheckingforMovement", self )
                                GAMEOBJ:GetTimer():AddTimerWithCancel(  INITIAL_ATTACK_TIME , "AttackHeartBeat", self )

                                self:FollowTarget { targetID = target, radius = self:GetVar("Set.AggroDist"),speed = self:GetVar("Set.AggroSpeed") * 2 , keepFollowing = true }
                                self:SetVar("Aggroed", true)
                            else
                                self:FollowTarget { targetID = target,radius = 3, speed = 1, keepFollowing = true }
                            end
                        end
                    end
                end
            end

            aggro.onOffCollisionPhantom = function(self, msg)
                local myPos = getHomePoint(self)
                local target = msg.objectID
                local faction = target:GetFaction()
                local playerVelx = target:GetLinearVelocity().linVelocity.x
                local playerVely = target:GetLinearVelocity().linVelocity.y
                local playerVelz = target:GetLinearVelocity().linVelocity.z
                self:SetVar("CurrentState", "aggro")
                self:SetVar("readyToAttack", false)
                    if faction and faction.faction == 1 and playerVelx ~= 0 and playerVely ~= 0 and playerVelz ~= 0 and self:GetVar("switch") == 1 then
                        self:SetVar("switch", 0)
                        GAMEOBJ:GetTimer():CancelTimer( "MeanderPause", self )
                        GAMEOBJ:GetTimer():CancelTimer( "AggroCheck", self )
                        --print "I see you!"
                        local INITIAL_ATTACK_TIME = 1
                        GAMEOBJ:GetTimer():AddTimerWithCancel(  INITIAL_ATTACK_TIME , "AttackHeartBeat", self )
                        if target:IsDead().bDead  then
                            self:SetVar("Aggroed", false)
                            ProximityPuls(self)
                        else
                        if self:GetVar("Set.MovementType") ~= "Frozen" then
                            self:SetTetherPoint { tetherPt = myPos,radius = self:GetVar("Set.tetherRadius") }
                            if self:GetVar("Set.AggroDist") ~= nil and self:GetVar("Set.AggroSpeed") ~= nil then

                                GAMEOBJ:GetTimer():CancelTimer( "CheckingforMovement", self )
                                GAMEOBJ:GetTimer():AddTimerWithCancel(  1.0 , "CheckingforMovement", self )
                                GAMEOBJ:GetTimer():AddTimerWithCancel(  INITIAL_ATTACK_TIME , "AttackHeartBeat", self )

                                self:FollowTarget { targetID = target, radius = self:GetVar("Set.AggroDist"),speed = self:GetVar("Set.AggroSpeed") * 2 , keepFollowing = true }
                                self:SetVar("Aggroed", true)
                            else
                                self:FollowTarget { targetID = target,radius = 3, speed = 1, keepFollowing = true }
                            end
                        end
                    end
                end
            end

        aggro.onTimerDone = function(self, msg)
            if msg.name == "AttackHeartBeat" then
                self:SetVar("readyToAttack", true)
                DoAttack(self);
                local castTime = self:GetVar("SkillTime")
                if (castTime < 1) then
                    print ("castTime", castTime)
                end
                GAMEOBJ:GetTimer():CancelTimer("AttackHeartBeat", self)
                GAMEOBJ:GetTimer():AddTimerWithCancel(  castTime , "AttackHeartBeat", self )

            elseif msg.name == "CheckingforMovement" then
                if self:GetVar("pauseswitch") == 1 then
                    GAMEOBJ:GetTimer():AddTimerWithCancel(  2.0 , "CheckingforMovement", self )
                    local target = getObjectByName(self, "AttackingTarget")
                    local playerVelx = target:GetLinearVelocity().linVelocity.x
                    local playerVely = target:GetLinearVelocity().linVelocity.y
                    local playerVelz = target:GetLinearVelocity().linVelocity.z
                    if playerVelx == 0 and playerVely == 0 and playerVelz == 0 then
                        print "Where did you go?"
                        self:PlayAnimation{ animationID = "looking" }
                        self:SetVar("AttackingTarget", "NoTarget" )
                        self:SetVar("Aggroed", false)
                        GAMEOBJ:GetTimer():CancelTimer( "MotionTrackPause", self )
                        GAMEOBJ:GetTimer():AddTimerWithCancel(  3.0 , "MotionTrackPause", self )
                        self:SetVar("pauseswitch", 0)
                    else
                        print "I see you!"
                    end
                end

            elseif msg.name == "AggroCheck" then
                --self:SetVar("CurrentState", "aggro")
                --self:SetVar("readyToAttack", false)
                --self:SetVar("Aggroed", true)
                SetResetState(self)  
                GAMEOBJ:GetTimer():CancelTimer( "AggroCheck", self )
                GAMEOBJ:GetTimer():AddTimerWithCancel( 1.0, "AggroCheck", self )
                ProximityPuls(self)
                print "Aggro stuff"

            elseif msg.name == "MotionTrackPause" then
                if self:GetVar("pauseswitch") == 0 then
                    print "Go back to wander."
                    self:SetVar("AttackingTarget", "NoTarget" )
                    self:SetVar("Aggroed", false)
                    GAMEOBJ:GetTimer():CancelTimer("MeanderPause", self)
                    GAMEOBJ:GetTimer():AddTimerWithCancel(  1.0 , "MeanderPause", self )
                    SetResetState(self)
                    GAMEOBJ:GetTimer():CancelTimer( "CheckingforMovement", self )
                    --GAMEOBJ:GetTimer():AddTimerWithCancel(  3.0 , "ResetSeeing", self )
                    GAMEOBJ:GetTimer():AddTimerWithCancel( 3.0, "AggroCheck", self )
                end

            elseif msg.name == "ResetSeeing" then
                print "Reset"
                self:SetVar("pauseswitch", 1)
                self:SetVar("switch", 1)
                self:SetVar("Aggroed", false)
                SetResetState(self)
                GAMEOBJ:GetTimer():CancelTimer( "AggroCheck", self )
                GAMEOBJ:GetTimer():AddTimerWithCancel( 1.0, "AggroCheck", self )
            end
        end

        aggro.onArrived = function(self, msg)
            DoAttack(self)
        end

        aggro.onOnHit = function(self, msg)
            local myPos = getHomePoint(self)
            local target = msg.attacker
            local faction = target:GetFaction()
            local playerVelx = target:GetLinearVelocity().linVelocity.x
            local playerVely = target:GetLinearVelocity().linVelocity.y
            local playerVelz = target:GetLinearVelocity().linVelocity.z
            self:SetVar("CurrentState", "aggro")
            self:SetVar("readyToAttack", false)
                if faction and faction.faction == 1 and self:GetVar("switch") == 1 then
                    self:SetVar("switch", 0)
                    GAMEOBJ:GetTimer():CancelTimer( "MeanderPause", self )
                    --print "I see you!"
                    local INITIAL_ATTACK_TIME = 1
                    GAMEOBJ:GetTimer():AddTimerWithCancel(  INITIAL_ATTACK_TIME , "AttackHeartBeat", self )
                    if target:IsDead().bDead  then
                        self:SetVar("Aggroed", false)
                        ProximityPuls(self)
                    else
                    if self:GetVar("Set.MovementType") ~= "Frozen" then
                        self:SetTetherPoint { tetherPt = myPos,radius = self:GetVar("Set.tetherRadius") }
                        if self:GetVar("Set.AggroDist") ~= nil and self:GetVar("Set.AggroSpeed") ~= nil then

                            GAMEOBJ:GetTimer():CancelTimer( "CheckingforMovement", self )
                            GAMEOBJ:GetTimer():AddTimerWithCancel( 1.0 , "CheckingforMovement", self )
                            GAMEOBJ:GetTimer():AddTimerWithCancel( INITIAL_ATTACK_TIME , "AttackHeartBeat", self )

                            self:FollowTarget { targetID = target, radius = self:GetVar("Set.AggroDist"),speed = self:GetVar("Set.AggroSpeed") * 2 , keepFollowing = true }
                            self:SetVar("Aggroed", true)
                            --self:SetRotation(self:GetVar("rot"))
                        else
                            self:FollowTarget { targetID = target,radius = 3, speed = 1, keepFollowing = true }
                        end
                    end
                end
            end
        end

        aggro.onEnter = function(self)
        end

        aggro.onExit = function(self)
            GAMEOBJ:GetTimer():CancelTimer("AttackHeartBeat", self)
        end

        aggro.onCancelled = function(self, msg)
            self:SetVar("Aggroed", false)
            ProximityPuls(self)
        end

        function DoAttack(self)
            if (self:GetVar("readyToAttack") == false) then
                return
            end
            if CanAttackTarget(self) then
                self:SetVar("readyToAttack", false)
                if self:GetVar("Set.Aggression") == "PassiveAggres" and self:GetVar("AggroOnce") == 0 then
                    self:SetVar("AggroOnce",1)
                end
                if self:GetVar("MaxTableSkill") == nil then
                    for i = 1, table.maxn (self:GetSkills().skills) do
                        self:SetVar("MaxTableSkill", i )
                    end
                end
                local attackSkillID = self:GetSkills().skills[self:GetVar("MaxTableSkill")]
                local bOverrideSkill = self:GetVar("Set.OverRideAttackSkill")
                local overrideSkillID = self:GetVar("Set.AttackSkill")

                if (bOverrideSkill and overrideSkillID and bOverrideSkill == true) then
                    attackSkillID = overrideSkillID
                end

                local bUseOptTarget = self:GetVar("Set.UseOptionalTargetOnAttack")

                if (bUseOptTarget and bUseOptTarget == true) then
                    self:CastSkill{skillID = attackSkillID, optionalTargetID = getObjectByName(self, "AttackingTarget") } 
                else
                    self:CastSkill{skillID = attackSkillID } 
                end
            end
        end
    end

    function CombatState(self)
    combat = State.create()
        combat.onEnter = function(self)
        end
    end

    function CanAttackTarget(self)
        local myTarget = getObjectByName(self, "AttackingTarget")
        if not myTarget:Exists() or myTarget:IsDead().bDead  or not self:IsEnemy{ targetID = myTarget }.enemy then
            self:SetVar("AttackingTarget", "NoTarget" )
            self:SetVar("Aggroed", false)
            ProximityPuls(self)
            return false
        end
        return true
    end

    function SetStoreTimmer(intTime, Name, self) 
        if (intTime) and (Name) and (self) then
            GAMEOBJ:GetTimer():AddTimerWithCancel( intTime,  Name, self )
        end
        for  i = 1, table.maxn(self:GetVar("Timers")) + 1 do
            if self:GetVar("Timers."..i) == Name then
            break
	    end
	 	if self:GetVar("Timers."..i) == nil then
            self:SetVar("Timers."..i, Name)
        end
    end
end 

function CancelTemplateTimers(self)
    for i = 2,table.maxn(self:GetVar("Timers")) do
        GAMEOBJ:GetTimer():CancelTimer( self:GetVar("Timers."..i), self )
        print "3"
    end
end

onDie = function(self,msg)
    if (onTemplateDie) and (onTemplateDie(self, msg) == true ) then
        return
    end
end

function onTimerDone(self, msg)
    if msg.name == "AggroCheck" then
        print "Non aggro stuff"
        self:SetVar("switch", 1)
        self:SetVar("pauseswitch", 1)
        self:SetVar("CurrentState", "aggro")
        self:SetVar("readyToAttack", false)
        self:SetVar("Aggroed", true)
        GAMEOBJ:GetTimer():CancelTimer( "AggroCheck", self )
        GAMEOBJ:GetTimer():AddTimerWithCancel( 3.0, "AggroCheck", self )
        ProximityPuls(self)
    end
end