REGISTER_GOAL(GOAL_LargeCat536000_Battle, "LargeCat536000Battle")
local Att3000_Dist_min = 0.5
local Att3000_Dist_max = 1.1
local Att3001_Dist_min = 2.7
local Att3001_Dist_max = 4.5
local Att3002_Dist_min = 0.5
local Att3002_Dist_max = 1.7
local Att3003_Dist_min = 0.5
local Att3003_Dist_max = 1.1
local Att3004_Dist_min = 0.5
local Att3004_Dist_max = 12.7
local Att3005_Dist_min = 0.5
local Att3005_Dist_max = 24.5
local Att3006_Dist_min = 0
local Att3006_Dist_max = 24
REGISTER_GOAL_NO_UPDATE(GOAL_LargeCat536000_Battle, 1)
function LargeCat536000Battle_Activate(ai, goal)
    local actPerArr = {}
    local actFuncArr = {}
    local defFuncParamTbl = {}
    Common_Clear_Param(actPerArr, actFuncArr, defFuncParamTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    ai:AddObserveArea(0, TARGET_SELF, TARGET_ENE_0, AI_DIR_TYPE_B, 100, 2)
    local RateStep = 1
    if ai:IsFinishTimer(0) == false then
        RateStep = 0
    end
    local RateUnaru = 1
    if ai:IsFinishTimer(1) == false then
        RateUnaru = 0
    end
    if not ai:IsInsideTargetRegion(TARGET_ENE_0, 1202730) and not ai:IsInsideTargetRegion(TARGET_ENE_0, 1202731) then
        actPerArr[11] = 100
    else
        local RateKamiNage = 0
        if ai:IsInsideTarget(TARGET_ENE_0, AI_DIR_TYPE_F, 15) then
            RateKamiNage = 1
        end
        if ai:IsInsideTarget(TARGET_ENE_0, AI_DIR_TYPE_F, 180) and ai:IsInsideTarget(TARGET_ENE_0, AI_DIR_TYPE_R, 100) and targetDist <= 0.8 then
            actPerArr[8] = 100
        elseif ai:IsInsideTarget(TARGET_ENE_0, AI_DIR_TYPE_F, 180) and ai:IsInsideTarget(TARGET_ENE_0, AI_DIR_TYPE_L, 100) and targetDist <= 0.8 then
            actPerArr[9] = 100
        elseif 12.7 <= targetDist then
            actPerArr[1] = 5
            actPerArr[2] = 5
            actPerArr[3] = 5
            actPerArr[4] = 5 * RateKamiNage
            actPerArr[5] = 35
            actPerArr[6] = 40
            actPerArr[7] = 5 * RateUnaru
        elseif 8 <= targetDist then
            actPerArr[1] = 15
            actPerArr[2] = 20
            actPerArr[3] = 15
            actPerArr[4] = 15 * RateKamiNage
            actPerArr[5] = 15
            actPerArr[6] = 10
            actPerArr[7] = 5 * RateUnaru
        elseif 4.5 <= targetDist then
            actPerArr[1] = 32
            actPerArr[2] = 28
            actPerArr[3] = 20
            actPerArr[4] = 20 * RateKamiNage
            actPerArr[5] = 0
            actPerArr[6] = 0
            actPerArr[7] = 0
        elseif 2 <= targetDist then
            actPerArr[1] = 25
            actPerArr[2] = 20
            actPerArr[3] = 25
            actPerArr[4] = 20 * RateKamiNage
            actPerArr[5] = 0
            actPerArr[6] = 0
            actPerArr[7] = 0
            actPerArr[10] = 10 * RateStep
        else
            actPerArr[1] = 10
            actPerArr[2] = 0
            actPerArr[3] = 30
            actPerArr[4] = 40 * RateKamiNage
            actPerArr[5] = 0
            actPerArr[6] = 0
            actPerArr[7] = 0
            actPerArr[10] = 20 * RateStep
        end
    end
    actFuncArr[1] = REGIST_FUNC(ai, goal, LargeCat536000_Act01)
    actFuncArr[2] = REGIST_FUNC(ai, goal, LargeCat536000_Act02)
    actFuncArr[3] = REGIST_FUNC(ai, goal, LargeCat536000_Act03)
    actFuncArr[4] = REGIST_FUNC(ai, goal, LargeCat536000_Act04)
    actFuncArr[5] = REGIST_FUNC(ai, goal, LargeCat536000_Act05)
    actFuncArr[6] = REGIST_FUNC(ai, goal, LargeCat536000_Act06)
    actFuncArr[7] = REGIST_FUNC(ai, goal, LargeCat536000_Act07)
    actFuncArr[8] = REGIST_FUNC(ai, goal, LargeCat536000_Act08)
    actFuncArr[9] = REGIST_FUNC(ai, goal, LargeCat536000_Act09)
    actFuncArr[10] = REGIST_FUNC(ai, goal, LargeCat536000_Act10)
    actFuncArr[11] = REGIST_FUNC(ai, goal, LargeCat536000_Act11)
    local atkAfterFunc = REGIST_FUNC(ai, goal, LargeCat536000_ActAfter_AdjustSpace, atkAfterOddsTbl)
    Common_Battle_Activate(ai, goal, actPerArr, actFuncArr, atkAfterFunc, defFuncParamTbl)
    return 
end

Att3000_Dist_min = Att3000_Dist_max
function LargeCat536000_Act01(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    local approachDist = Att3000_Dist_max
    local dashDist = Att3000_Dist_max + 2
    local Odds_Guard = 0
    BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
    goal:AddSubGoal(GOAL_COMMON_AttackTunableSpin, 5, 3000, TARGET_ENE_0, DIST_Middle, -1, 25)
    GetWellSpace_Odds = 100
    return GetWellSpace_Odds
end

Att3000_Dist_min = Att3001_Dist_max
function LargeCat536000_Act02(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    local approachDist = Att3001_Dist_max
    local dashDist = Att3001_Dist_max + 2
    local Odds_Guard = 0
    BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
    goal:AddSubGoal(GOAL_COMMON_AttackTunableSpin, 5, 3001, TARGET_ENE_0, DIST_Middle, -1, -1)
    GetWellSpace_Odds = 100
    return GetWellSpace_Odds
end

Att3000_Dist_min = Att3002_Dist_max
function LargeCat536000_Act03(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    local approachDist = Att3002_Dist_max
    local dashDist = Att3002_Dist_max + 2
    local Odds_Guard = 0
    BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
    goal:AddSubGoal(GOAL_COMMON_AttackTunableSpin, 5, 3002, TARGET_ENE_0, DIST_Middle, -1, 25)
    GetWellSpace_Odds = 100
    return GetWellSpace_Odds
end

Att3000_Dist_min = Att3003_Dist_max
function LargeCat536000_Act04(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    local approachDist = Att3003_Dist_max
    local dashDist = Att3003_Dist_max + 2
    local Odds_Guard = 0
    BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
    goal:AddSubGoal(GOAL_COMMON_AttackTunableSpin, 5, 3003, TARGET_ENE_0, DIST_Middle, -1, 25)
    GetWellSpace_Odds = 100
    return GetWellSpace_Odds
end

Att3000_Dist_min = Att3004_Dist_max
function LargeCat536000_Act05(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    local approachDist = Att3004_Dist_max
    local dashDist = Att3004_Dist_max + 2
    local Odds_Guard = 0
    BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
    goal:AddSubGoal(GOAL_COMMON_AttackTunableSpin, 5, 3004, TARGET_ENE_0, DIST_Middle, -1, 22)
    GetWellSpace_Odds = 100
    return GetWellSpace_Odds
end

Att3000_Dist_min = Att3005_Dist_max
function LargeCat536000_Act06(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    local approachDist = Att3005_Dist_max
    local dashDist = Att3005_Dist_max + 2
    local Odds_Guard = 0
    BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
    goal:AddSubGoal(GOAL_COMMON_AttackTunableSpin, 5, 3005, TARGET_ENE_0, DIST_Middle, -1, 20)
    GetWellSpace_Odds = 100
    return GetWellSpace_Odds
end

Att3000_Dist_min = Att3006_Dist_max
function LargeCat536000_Act07(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    local approachDist = Att3006_Dist_max
    local dashDist = Att3006_Dist_max + 2
    local Odds_Guard = 0
    BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
    goal:AddSubGoal(GOAL_COMMON_Attack, 5, 3006, TARGET_ENE_0, DIST_Middle, 0)
    ai:SetTimer(1, 20)
    GetWellSpace_Odds = 0
    return GetWellSpace_Odds
end

function LargeCat536000_Act08(ai, goal, paramTbl)
    goal:AddSubGoal(GOAL_COMMON_NonspinningAttack, 5, 3007, TARGET_ENE_0, DIST_Middle, 0)
    GetWellSpace_Odds = 100
    return GetWellSpace_Odds
end

function LargeCat536000_Act09(ai, goal, paramTbl)
    goal:AddSubGoal(GOAL_COMMON_NonspinningAttack, 5, 3008, TARGET_ENE_0, DIST_Middle, 0)
    GetWellSpace_Odds = 100
    return GetWellSpace_Odds
end

function LargeCat536000_Act10(ai, goal, paramTbl)
    ai:SetTimer(0, 15)
    goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 701, TARGET_ENE_0, 0, AI_DIR_TYPE_B, 9)
    return 
end

function LargeCat536000_Act11(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    ai:SetEventMoveTarget(1202732)
    local Sumade = ai:GetDistAtoB(POINT_EVENT, TARGET_SELF)
    if 3 <= Sumade then
        ai:SetEventMoveTarget(1202732)
        if targetDist <= 5 then
            goal:AddSubGoal(GOAL_COMMON_ApproachTarget, 5, POINT_EVENT, 1, TARGET_ENE_0, true, -1)
        else
            goal:AddSubGoal(GOAL_COMMON_ApproachTarget, 5, POINT_EVENT, 1, TARGET_SELF, false, -1)
        end
    end
    goal:AddSubGoal(GOAL_COMMON_Wait, 1, TARGET_SELF)
    goal:AddSubGoal(GOAL_COMMON_Turn, 2, TARGET_ENE_0, 0, 0, 0)
    return 
end

function LargeCat536000_ActAfter_AdjustSpace(ai, goal, paramTbl)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    local fate = ai:GetRandam_Int(1, 100)
    if fate <= 25 then
        goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 701, TARGET_ENE_0, 0.5, AI_DIR_TYPE_B, 9)
        return true
    elseif fate <= 45 then
        goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 702, TARGET_ENE_0, 0.5, AI_DIR_TYPE_L, 5)
        return true
    elseif fate <= 65 then
        goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 703, TARGET_ENE_0, 0.5, AI_DIR_TYPE_R, 5)
        return true
    else
        return false
    end
end

function LargeCat536000Battle_Update(ai, goal)
    return GOAL_RESULT_Continue
end

function LargeCat536000Battle_Terminate(ai, goal)
    return 
end

Att3000_Dist_min = Att3002_Dist_max
Att3000_Dist_min = Att3005_Dist_max
Att3000_Dist_min = Att3004_Dist_max
function LargeCat536000Battle_Interupt(ai, goal)
    local fate = ai:GetRandam_Int(1, 100)
    local fate2 = ai:GetRandam_Int(1, 100)
    local fate3 = ai:GetRandam_Int(1, 100)
    local targetDist = ai:GetDist(TARGET_ENE_0)
    if ai:IsInterupt(INTERUPT_Inside_ObserveArea) and ai:IsFinishTimer(0) == true then
        ai:SetTimer(0, 10)
        if fate <= 50 then
            goal:ClearSubGoal()
            goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 701, TARGET_ENE_0, 0, AI_DIR_TYPE_B, 2.5)
        elseif fate <= 75 then
            goal:ClearSubGoal()
            goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 702, TARGET_ENE_0, 0, AI_DIR_TYPE_L, 2.5)
        else
            goal:ClearSubGoal()
            goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 703, TARGET_ENE_0, 0, AI_DIR_TYPE_R, 2.5)
        end
        return true
    end
    local superStepDist = 4.5
    local superStepPer = 15
    local bkStepPer = 50
    local leftStepPer = 25
    local rightStepPer = 25
    local safetyDist = 5
    if FindAttack_Step(ai, goal, superStepDist, superStepPer, bkStepPer, leftStepPer, rightStepPer, safetyDist) then
        return true
    end
    local distGuardBreak_Act = 3.5
    local oddsGuardBreak_Act = 60
    if GuardBreak_Act(ai, goal, distGuardBreak_Act, oddsGuardBreak_Act) then
        if 2 <= targetDist then
            goal:AddSubGoal(GOAL_COMMON_Attack, 10, 3000, TARGET_ENE_0, DIST_Middle, 0)
        else
            goal:AddSubGoal(GOAL_COMMON_ApproachTarget, 10, TARGET_ENE_0, Att3002_Dist_max, TARGET_SELF, false, -1)
            goal:AddSubGoal(GOAL_COMMON_Attack, 10, 3002, TARGET_ENE_0, DIST_Middle, 0)
        end
        return true
    end
    local distMissSwing_Int = 3.5
    local oddsMissSwing_Int = 50
    if MissSwing_Int(ai, goal, distMissSwing_Int, oddsMissSwing_Int) then
        if 2 <= targetDist then
            goal:AddSubGoal(GOAL_COMMON_Attack, 10, 3000, TARGET_ENE_0, DIST_Middle, 0)
        else
            goal:AddSubGoal(GOAL_COMMON_ApproachTarget, 10, TARGET_ENE_0, Att3002_Dist_max, TARGET_SELF, false, -1)
            goal:AddSubGoal(GOAL_COMMON_Attack, 10, 3002, TARGET_ENE_0, DIST_Middle, 0)
        end
        return true
    end
    local distUseItem_Act = 12.7
    local oddsUseItem_Act = 10
    if UseItem_Act(ai, goal, distUseItem_Act, oddsUseItem_Act) then
        if 3.5 <= targetDist then
            goal:AddSubGoal(GOAL_COMMON_Attack, 10, 3004, TARGET_ENE_0, DIST_Middle, 0)
        elseif 2 <= targetDist then
            goal:AddSubGoal(GOAL_COMMON_Attack, 10, 3000, TARGET_ENE_0, DIST_Middle, 0)
        else
            goal:AddSubGoal(GOAL_COMMON_ApproachTarget, 10, TARGET_ENE_0, Att3002_Dist_max, TARGET_SELF, false, -1)
            goal:AddSubGoal(GOAL_COMMON_Attack, 10, 3002, TARGET_ENE_0, DIST_Middle, 0)
        end
    end
    local distResNear = 25
    local distResFar = 100
    local oddsResNear = 0
    local oddsResFar = 85
    local ResBehavID = Shoot_2dist(ai, goal, distResNear, distResFar, oddsResNear, oddsResFar)
    if ResBehavID == 1 then
        if fate <= 50 then
            goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 702, TARGET_ENE_0, 0, AI_DIR_TYPE_L, 3)
        else
            goal:AddSubGoal(GOAL_COMMON_SpinStep, 5, 703, TARGET_ENE_0, 0, AI_DIR_TYPE_R, 3)
        end
        return true
    elseif ResBehavID == 2 then
        if 35 <= targetDist then
            local approachDist = Att3005_Dist_max
            local dashDist = Att3005_Dist_max + 2
            local Odds_Guard = 0
            BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
            goal:AddSubGoal(GOAL_COMMON_AttackTunableSpin, 5, 3005, TARGET_ENE_0, DIST_Middle, -1, 60)
        else
            local approachDist = Att3004_Dist_max
            local dashDist = Att3004_Dist_max + 2
            local Odds_Guard = 0
            BusyApproach_Act(ai, goal, approachDist, dashDist, Odds_Guard)
            goal:AddSubGoal(GOAL_COMMON_AttackTunableSpin, 5, 3004, TARGET_ENE_0, DIST_Middle, -1, 50)
        end
    end
    return false
end

return 
