Advertisement
Guest User

Untitled

a guest
Dec 21st, 2014
148
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 4.78 KB | None | 0 0
  1. -- Sri Lanka Decisions
  2. -- Author: JFD
  3. --=======================================================================================================================
  4. print("Sri Lanka Decisions: loaded")
  5. --=======================================================================================================================
  6. -- Civ Specific Decisions
  7. --=======================================================================================================================
  8. -- Sri Lanka: Renovate Capital
  9. -------------------------------------------------------------------------------------------------------------------------
  10. local Decisions_RenovateCapital = {}
  11.     Decisions_RenovateCapital.Name = "TXT_KEY_DECISIONS_SRI_LANKA_RENOVATE_CAPITAL"
  12.     Decisions_RenovateCapital.Desc = "TXT_KEY_DECISIONS_SRI_LANKA_RENOVATE_CAPITAL_DESC"
  13.     HookDecisionCivilizationIcon(Decisions_RenovateCapital, "CIVILIZATION_JFD_BELGIUM")
  14.     Decisions_RenovateCapital.CanFunc = (
  15.     function(pPlayer)
  16.         if (pPlayer:GetCivilizationType() ~= GameInfoTypes["CIVILIZATION_JFD_BELGIUM"]) then return false, false end
  17.        
  18.         local iEra = load(pPlayer, "Decisions_RenovateCapital")
  19.         local iCurrentEra = pPlayer:GetCurrentEra()
  20.         if iEra ~= nil then
  21.             if iEra < iCurrentEra then
  22.                 save(pPlayer, "Decisions_RenovateCapital", nil)
  23.             else
  24.                 Decisions_RenovateCapital.Desc = Locale.ConvertTextKey("TXT_KEY_DECISIONS_SRI_LANKA_RENOVATE_CAPITAL_ENACTED_DESC")
  25.                 return false, false, true
  26.             end
  27.         end
  28.        
  29.         Decisions_RenovateCapital.Desc = Locale.ConvertTextKey("TXT_KEY_DECISIONS_SRI_LANKA_RENOVATE_CAPITAL_DESC")
  30.        
  31.         if (pPlayer:GetNumResourceAvailable(iMagistrate, false) < 1) then return true, false end
  32.         if (pPlayer:GetCapitalCity() == nil) then return true, false end
  33.         if (pPlayer:GetCapitalCity():GetPopulation() < 10) then return true, false end
  34.        
  35.         local iEra = pPlayer:GetCurrentEra()
  36.         if not(iEra >= GameInfoTypes["ERA_RENAISSANCE"]) then return true, false    end
  37.        
  38.         return true, true
  39.     end
  40.     )
  41.    
  42.     Decisions_RenovateCapital.DoFunc = (
  43.     function(pPlayer)
  44.         pPlayer:ChangeNumResourceTotal(iMagistrate, -1)
  45.         pPlayer:ChangeGoldenAgeTurns(12)
  46.         save(pPlayer, "Decisions_RenovateCapital", pPlayer:GetCurrentEra())
  47.     end
  48.     )
  49.    
  50. Decisions_AddCivilisationSpecific(GameInfoTypes["CIVILIZATION_JFD_BELGIUM"], "Decisions_RenovateCapital", Decisions_RenovateCapital)
  51. -------------------------------------------------------------------------------------------------------------------------
  52. -- Sri Lanka: Legalize official use of multilingualism
  53. -------------------------------------------------------------------------------------------------------------------------
  54. function JFD_GetReligionCount(playerID)
  55.     local player = Players[playerID]
  56.     local numReligions = 0
  57.     for city in player:Cities() do
  58.         for religion in GameInfo.Religions() do
  59.             if city:GetNumFollowers(religion.ID) > 0 then
  60.                 numReligions = numReligions + 1
  61.             end
  62.         end
  63.     end
  64.  
  65.     return numReligions
  66. end
  67.  
  68. local Decisions_Multilingualism = {}
  69.     Decisions_Multilingualism.Name = "TXT_KEY_DECISIONS_SRI_LANKA_MULTILINGUALISM"
  70.     Decisions_Multilingualism.Desc = "TXT_KEY_DECISIONS_SRI_LANKA_MULTILINGUALISME_DESC"
  71.     HookDecisionCivilizationIcon(Decisions_Multilingualism, "CIVILIZATION_JFD_BELGIUM")
  72.     Decisions_Multilingualism.CanFunc = (
  73.     function(pPlayer)
  74.         if (pPlayer:GetCivilizationType() ~= GameInfoTypes["CIVILIZATION_JFD_BELGIUM"]) then return false, false end
  75.         if load(pPlayer, "Decisions_Multilingualism") == true then
  76.             Decisions_Multilingualism.Desc = Locale.ConvertTextKey("TXT_KEY_DECISIONS_SRI_LANKA_MULTILINGUALISM_ENACTED_DESC")
  77.             return false, false, true
  78.         end
  79.        
  80.         local iCost = math.ceil(1100 * iMod)
  81.         Decisions_Multilingualism.Desc = Locale.ConvertTextKey("TXT_KEY_DECISIONS_SRI_LANKA_MULTILINGUALISM_DESC", iCost)
  82.        
  83.         if (pPlayer:GetNumResourceAvailable(iMagistrate, false) < 2) then return true, false end
  84.         if (pPlayer:GetCapitalCity() == nil) then return true, false end
  85.        
  86.         print("religion count: " .. JFD_GetReligionCount(pPlayer:GetID()))
  87.         if JFD_GetReligionCount(pPlayer:GetID()) < 1 then return true, false end
  88.        
  89.         return true, true
  90.     end
  91.     )
  92.    
  93.     Decisions_Multilingualism.DoFunc = (
  94.     function(pPlayer)
  95.         pPlayer:ChangeNumResourceTotal(iMagistrate, -2)
  96.         pPlayer:SetNumFreePolicies(1)
  97.         pPlayer:SetNumFreePolicies(0)
  98.         pPlayer:SetHasPolicy(GameInfoTypes["POLICY_SRI_LANKA_MULTILINGUALISM"], true)
  99.         save(pPlayer, "Decisions_Multilingualism", true)
  100.     end
  101.     )
  102.    
  103. Decisions_AddCivilisationSpecific(GameInfoTypes["CIVILIZATION_JFD_BELGIUM"], "Decisions_Multilingualism", Decisions_Multilingualism)
  104. --=======================================================================================================================
  105. --=======================================================================================================================
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement