KentDecisions

-- Aethelbert_Decisions
-- Author: GPuzzle
-- DateCreated: 1/28/2017 2:39:42 PM
--------------------------------------------------------------
--=======================================================================================================================
-- DECISIONS
--=======================================================================================================================
-- Aethelbert: Create the Archbishop of Canterbury
--------------------------------------------------------------
local Decisions_GPuz_Archbishop_Canterbury = {}
    Decisions_GPuz_Archbishop_Canterbury.Name = "TXT_KEY_DECISIONS_GPUZ_ARCHBISHOP_OF_CANTERBURY"
    Decisions_GPuz_Archbishop_Canterbury.Desc = "TXT_KEY_DECISIONS_GPUZ_ARCHBISHOP_OF_CANTERBURY_DESC"
    HookDecisionCivilizationIcon(Decisions_GPuz_Archbishop_Canterbury, "CIVILIZATION_GPUZ_KENT")
    Decisions_GPuz_Archbishop_Canterbury.CanFunc = (
    function(player)
        if (player:GetCivilizationType() ~= GameInfoTypes["CIVILIZATION_GPUZ_KENT"]) then
            return false, false
        end
        if load(player, "Decisions_GPuz_Archbishop_Canterbury") == true then
            Decisions_GPuz_Archbishop_Canterbury.Desc = Locale.ConvertTextKey("TXT_KEY_DECISIONS_GPUZ_ARCHBISHOP_OF_CANTERBURY_ENACTED_DESC")
            return false, false, true
        end
        local cost = math.ceil(1500 * iMod)
        Decisions_GPuz_Archbishop_Canterbury.Desc = Locale.ConvertTextKey("TXT_KEY_DECISIONS_GPUZ_ARCHBISHOP_OF_CANTERBURY_DESC", cost)
        if (player:GetNumResourceAvailable(iMagistrate, false) < 2) then return true, false end
        if (Teams[player:GetTeam()]:IsHasTech(GameInfoTypes["TECH_THEOLOGY"])) and (player:GetGold() >= cost) then
            return true, true
        else
            return true, false
        end
    end
    )

    Decisions_GPuz_Archbishop_Canterbury.DoFunc = (
    function(player)
        local cost = math.ceil(1500 * iMod)
        player:ChangeNumResourceTotal(iMagistrate, -2)
        player:ChangeGold(-cost)
        player:SetNumFreePolicies(1)
        player:SetNumFreePolicies(0)
        player:SetHasPolicy(GameInfoTypes["POLICY_DECISIONS_GPUZ_ARCHBISHOP_OF_CANTERBURY"], true)
        save(player, "Decisions_GPuz_Archbishop_Canterbury", true)
    end
    )


Decisions_AddCivilisationSpecific(GameInfoTypes["CIVILIZATION_GPUZ_KENT"], "Decisions_GPuz_Archbishop_Canterbury", Decisions_GPuz_Archbishop_Canterbury)
--------------------------------------------------------------
-- Aethelbert: Mint New Coins
--------------------------------------------------------------
local Decisions_GPuz_Mint_New_Coins = {}
    Decisions_GPuz_Mint_New_Coins.Name = "TXT_KEY_DECISIONS_GPUZ_MINT_NEW_COINS"
    Decisions_GPuz_Mint_New_Coins.Desc = "TXT_KEY_DECISIONS_GPUZ_MINT_NEW_COINS_DESC"
    HookDecisionCivilizationIcon(Decisions_GPuz_Mint_New_Coins, "CIVILIZATION_GPUZ_KENT")
    Decisions_GPuz_Mint_New_Coins.CanFunc = (
    function(player)
        if player:GetCivilizationType() ~= GameInfoTypes["CIVILIZATION_GPUZ_KENT"] then return false, false end
        if load(player, "Decisions_GPuz_Mint_New_Coins") == true then
            Decisions_GPuz_Mint_New_Coins.Desc = Locale.ConvertTextKey("TXT_KEY_DECISIONS_GPUZ_MINT_NEW_COINS_ENACTED_DESC")
            return false, false, true
        end
        local cost = math.ceil(player:CountNumBuildings(GameInfoTypes["BUILDING_GPUZ_MYNET"]) * 250 * iMod)
        local reward = math.ceil(player:CountNumBuildings(GameInfoTypes["BUILDING_GPUZ_MYNET"])* 50 * iMod)
        Decisions_GPuz_Mint_New_Coins.Desc = Locale.ConvertTextKey("TXT_KEY_DECISIONS_GPUZ_MINT_NEW_COINS_DESC", cost, reward)
        if (player:GetNumResourceAvailable(iMagistrate, false) < 1) then return true, false end
        if (Teams[player:GetTeam()]:IsHasTech(GameInfoTypes["TECH_GUILDS"])) and (player:GetGold() >= cost) then
            return true, true
        else
            return true, false
        end
    end
    )

    Decisions_GPuz_Mint_New_Coins.DoFunc = (
    function(player)
        local cost = math.ceil(player:CountNumBuildings(GameInfoTypes["BUILDING_GPUZ_MYNET"]) * 250 * iMod)
        local reward = math.ceil(player:CountNumBuildings(GameInfoTypes["BUILDING_GPUZ_MYNET"])* 50 * iMod)
        player:ChangeNumResourceTotal(iMagistrate, -1)
        player:ChangeGold(-cost)
        player:SetNumFreePolicies(1)
        player:SetNumFreePolicies(0)
        player:SetHasPolicy(GameInfoTypes["POLICY_DECISIONS_GPUZ_MINT_NEW_COINS"], true)
        player:ChangeJONSCulture(reward)
        save(player, "Decisions_GPuz_Mint_New_Coins", true)
    end
    )

Decisions_AddCivilisationSpecific(GameInfoTypes["CIVILIZATION_GPUZ_KENT"], "Decisions_GPuz_Mint_New_Coins", Decisions_GPuz_Mint_New_Coins)