Extended Diplomacy Ribbon (Tourism Addon)

local NumRequiredTourists = 0;

  for i, player in ipairs(Players) do
    if i ~= playerID and IsAliveAndMajor(i)  and player:GetTeam() ~= teamID then
        local iStaycationers = player:GetCulture():GetStaycationers();
        if iStaycationers >= NumRequiredTourists then
            NumRequiredTourists = iStaycationers + 1;
        end
    end
  end

  function tableLength(T)
    local count = 0
    for _ in pairs(T) do count = count + 1 end
    return count
  end


  -- Stats
  local civData:string = sEras
    .."[NEWLINE]"..Locale.Lookup("LOC_DIPLOMACY_INTEL_GOVERNMENT").." "..govType
    .."[NEWLINE]"..Locale.Lookup("LOC_PEDIA_CONCEPTS_PAGEGROUP_CITIES_NAME").. ": " .. "[COLOR_FLOAT_PRODUCTION]" .. numCities .. "[ENDCOLOR] [ICON_Housing]    "
        .. Locale.Lookup("LOC_DEAL_CITY_POPULATION_TOOLTIP", ERD_Total_Population) .. " [ICON_Citizen]"
    ..((m_isGatheringStorm and playerID ~= Game.GetLocalPlayer() and iGrievancesOnThem ~= 0) and "[NEWLINE]"..relationshipString or "")
    .."[NEWLINE]-----------------------------------------------"
    .."[NEWLINE][ICON_Capital] "..Locale.Lookup("LOC_WORLD_RANKINGS_OVERVIEW_DOMINATION_SCORE", Players[playerID]:GetScore())
    ..(m_isGatheringStorm and "[NEWLINE] [ICON_Favor]  "..Locale.Lookup("LOC_DIPLOMATIC_FAVOR_NAME") .. ": [COLOR_Red]" .. Players[playerID]:GetFavor().."[ENDCOLOR]" or "")
    .."[NEWLINE][ICON_Gold] "..Locale.Lookup("LOC_YIELD_GOLD_NAME")..": "..goldBalance.."   ( " .. "[COLOR_GoldMetalDark]" .. (goldYield>0 and "+" or "") .. (goldYield>0 and goldYield or "-?") .. "[ENDCOLOR]  )"
    .."[NEWLINE]"..Locale.Lookup("LOC_WORLD_RANKINGS_OVERVIEW_SCIENCE_SCIENCE_RATE", "[COLOR_FLOAT_SCIENCE]" .. Round(Players[playerID]:GetTechs():GetScienceYield(),1) .. "[ENDCOLOR]")
    .."[NEWLINE][ICON_Science] "..Locale.Lookup("LOC_WORLD_RANKINGS_OVERVIEW_SCIENCE_NUM_TECHS", "[COLOR_Blue]" .. Players[playerID]:GetStats():GetNumTechsResearched() .. "[ENDCOLOR]")
    .."[NEWLINE]"..Locale.Lookup("LOC_WORLD_RANKINGS_OVERVIEW_CULTURE_CULTURE_RATE", "[COLOR_FLOAT_CULTURE]" .. Round(Players[playerID]:GetCulture():GetCultureYield(),1) .. "[ENDCOLOR]")
    .."[NEWLINE]"..Locale.Lookup("LOC_WORLD_RANKINGS_OVERVIEW_RELIGION_FAITH_RATE", Round(Players[playerID]:GetReligion():GetFaithYield(),1))
    .."[NEWLINE][ICON_Strength] "..Locale.Lookup("LOC_WORLD_RANKINGS_OVERVIEW_DOMINATION_MILITARY_STRENGTH", "[COLOR_FLOAT_MILITARY]" .. Players[playerID]:GetStats():GetMilitaryStrengthWithoutTreasury() .. "[ENDCOLOR]")
    .."[NEWLINE]"..Locale.Lookup("LOC_WORLD_RANKINGS_OVERVIEW_CULTURE_TOURISM_RATE", "[COLOR_Tourism]" .. Round(Players[playerID]:GetStats():GetTourism(),1) .. "[ENDCOLOR]")
    .."[NEWLINE][ICON_Tourism] Domestic Tourists: [COLOR_Tourism]" .. Players[playerID]:GetCulture():GetStaycationers() .. "[ENDCOLOR]"
    .."[NEWLINE][ICON_Tourism] Total Visiting Tourists: " .. Players[playerID]:GetCulture():GetTouristsTo(Game.GetLocalPlayer()) .. "/" .. NumRequiredTourists
    .."[NEWLINE][ICON_Tourism] FT Equation: round down(civ lifetime tourism / (# of civs in the game x 200))"
    -- vanillla Civ 6 modifier was 150. Increased to 200 in R&F
    .."[NEWLINE][ICON_Tourism] FT Equation: round down(civ lifetime tourism / (" .. tableLength(PlayerManager.GetAliveMajors())*200 .. "))"
    .."[NEWLINE][ICON_Tourism] Foreign Tourists To: [COLOR_Tourism]" .. Players[playerID]:GetCulture():GetTouristsTo(playerID) .. "[ENDCOLOR]"
    .."[NEWLINE][ICON_Tourism] Foreign Tourists From: [COLOR_Tourism]" .. Players[Game.GetLocalPlayer()]:GetCulture():GetTouristsFrom(playerID) .. "[ENDCOLOR]"
    .."[NEWLINE][COLOR_Tourism]".. Players[Game.GetLocalPlayer()]:GetCulture():GetTouristsFromTooltip(playerID) .. "[ENDCOLOR]"
    .."[NEWLINE]-----------------------------------------------"
    ;