paperback.lua

PB_UTIL = {}

-- By Eremel from Stocking Stuffer's PotatoPatch utils
PB_UTIL.CREDITS = {}

PB_UTIL.CREDITS.generate_string = function(developers, prefix)
  if type(developers) ~= 'table' then return end

  local amount = #developers
  local credit_string = {
    n = G.UIT.R,
    config = { align = 'tm' },
    nodes = {
      { n = G.UIT.R, config = { align = 'cm' }, nodes = { { n = G.UIT.T, config = { text = localize(prefix), shadow = true, colour = G.C.UI.BACKGROUND_WHITE, scale = 0.27 } } } }
    }
  }

  for i, name in ipairs(developers) do
    local target_row = math.ceil(i / 3)
    local dev = PB_UTIL.Developers[name] or {}
    if target_row > #credit_string.nodes then
      table.insert(credit_string.nodes,
        { n = G.UIT.R, config = { align = 'cm' }, nodes = {} })
    end
    table.insert(credit_string.nodes[target_row].nodes, {
      n = G.UIT.O,
      config = {
        object = DynaText({
          string = dev.loc and localize(dev.loc) or dev.name or name,
          colours = { dev and dev.colour or G.C.UI.BACKGROUND_WHITE },
          scale = 0.27,
          silent = true,
          shadow = true,
          y_offset = -0.6,
        })
      }
    })
    if i < amount then
      table.insert(credit_string.nodes[target_row].nodes,
        { n = G.UIT.T, config = { text = localize(i + 1 == amount and 'paperback_and_spacer' or 'paperback_comma_spacer'), shadow = true, colour = G.C.UI.BACKGROUND_WHITE, scale = 0.27 } })
    end
  end

  return credit_string
end

local card_popup_ref = G.UIDEF.card_h_popup
function G.UIDEF.card_h_popup(card)
  local ret_val = card_popup_ref(card)

  if PB_UTIL.config.show_credits then
    local obj = card.config.center and card.config.center.paperback_credit
    local target = ret_val.nodes[1].nodes[1].nodes[1].nodes
    local owned = function(card)
      if next(SMODS.find_card(card.config.center.key, true)) then
        if PB_UTIL.find(SMODS.find_card(card.config.center.key), card) then
          return true
        end
      end
      return false
    end


    if obj then
      if (not obj.hidden) or
      (obj.hidden and owned(card)) then
        if obj.artist then
          local str = PB_UTIL.CREDITS.generate_string(obj.artist, 'paperback_art_credit')
          if str then
            table.insert(target, str)
          end
        else
          local str = PB_UTIL.CREDITS.generate_string({ 'papermoonqueen' }, 'paperback_art_credit')
          if str then
            table.insert(target, str)
          end
        end
        if obj.coder then
          local str = PB_UTIL.CREDITS.generate_string(obj.coder, 'paperback_code_credit')
          if str then
            table.insert(target, str)
          end
        end
        if obj.composer then
          local str = PB_UTIL.CREDITS.generate_string(obj.composer, 'paperback_music_credit')
          if str then
            table.insert(target, str)
          end
        end
      end
    end
  end
  return ret_val
end

PB_UTIL.Developers = { internal_count = 0 }
PB_UTIL.Developer = Object:extend()
function PB_UTIL.Developer:init(args)
  self.name = args.name
  self.colour = args.colour
  self.loc = args.loc and type(args.loc) == 'boolean' and 'paperback_dev_' .. args.name or args.loc

  PB_UTIL.Developers[args.name] = self
  PB_UTIL.Developers.internal_count = PB_UTIL.Developers.internal_count + 1
end

-- Load utility functions into PB_UTIL
SMODS.load_file("utilities/developers.lua")()
SMODS.load_file("utilities/definitions.lua")()
SMODS.load_file("utilities/misc_functions.lua")()
SMODS.load_file("utilities/ui.lua")()
SMODS.load_file("utilities/hooks.lua")()
SMODS.load_file("utilities/cross-mod.lua")()

-- Load the atlases
SMODS.load_file("content/atlas.lua")()

-- Load Jokers
PB_UTIL.register_items(PB_UTIL.ENABLED_JOKERS, "content/joker")

-- Load Minor Arcana if they are enabled
if PB_UTIL.config.minor_arcana_enabled then
  -- Register the consumable type to be used by Minor Arcana
  SMODS.ConsumableType {
    key = 'minor_arcana',
    prefix_config = { key = true },                -- Add the prefix of the mod to the key
    primary_colour = G.C.PAPERBACK_MINOR_ARCANA,
    secondary_colour = G.C.PAPERBACK_MINOR_ARCANA, -- Color of the collection button and badge
    shop_rate = 0,                                 -- These will not appear in the shop
    default = 'c_paperback_ace_of_cups',           -- Card to spawn if pool is empty
    collection_rows = { 7, 7 }
  }

  -- Register the sprite for undiscovered Minor Arcana
  SMODS.UndiscoveredSprite {
    key = 'minor_arcana',
    prefix_config = { key = true },
    atlas = "minor_arcana_atlas",
    pos = { x = 0, y = 8 }
  }

  -- Register Minor Arcana cards
  PB_UTIL.register_items(PB_UTIL.ENABLED_MINOR_ARCANA, "content/minor_arcana")

  -- Register Minor Arcana boosters
  PB_UTIL.register_items(PB_UTIL.ENABLED_MINOR_ARCANA_BOOSTERS, "content/booster")

  -- Register music for Minor Arcana boosters
  SMODS.Sound {
    key = 'music_minor_arcana',
    path = 'music_minor_arcana.ogg',
    select_music_track = function(self)
      -- We only check the booster once there are cards in the pack_cards area
      local booster = G.pack_cards and G.pack_cards.cards and SMODS.OPENED_BOOSTER

      -- If it's a minor arcana pack, we return the priority of this music
      if booster and booster.config.center_key:find('p_paperback_minor_arcana_') then
        return 1e10
      end
    end
  }
end

-- Load E.G.O Gifts if they are enabled
if PB_UTIL.config.ego_gifts_enabled then
  -- Register the consumable type to be used by E.G.O Gifts
  SMODS.ConsumableType {
    key = 'ego_gift',
    prefix_config = { key = true },                -- Add the prefix of the mod to the key
    primary_colour = G.C.PAPERBACK_EGO_GIFT_YELLOW,
    secondary_colour = G.C.PAPERBACK_EGO_GIFT_RED, -- Color of the collection button and badge
    shop_rate = 0,                                 -- These will not appear in the shop
    default = 'c_paperback_dark_vestige',          -- Card to spawn if pool is empty
    collection_rows = { 6, 6 },
  }

  -- Register the sprite for undiscovered E.G.O Gifts
  SMODS.UndiscoveredSprite {
    key = 'ego_gift',
    prefix_config = { key = true },
    atlas = "ego_gift_atlas",
    pos = { x = 7, y = 1 },
    no_overlay = true,
  }

  -- Register E.G.O Gift cards
  PB_UTIL.register_items(PB_UTIL.ENABLED_EGO_GIFTS, "content/ego_gift")

  -- Register E.G.O Gift boosters
  PB_UTIL.register_items(PB_UTIL.ENABLED_EGO_GIFT_BOOSTERS, "content/booster")
end

-- Load Spectral cards if they are enabled
if PB_UTIL.config.spectrals_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_SPECTRALS, "content/spectrals")
end

-- Load enhancements if they are enabled
if PB_UTIL.config.enhancements_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_ENHANCEMENTS, "content/enhancement")
end

-- Load editions if they are enabled
if PB_UTIL.config.editions_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_EDITIONS, "content/edition")
end

-- Load Paperclips if they are enabled
if PB_UTIL.config.paperclips_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_PAPERCLIPS, "content/paperclip")
end

-- Load stickers regardless of config
PB_UTIL.register_items(PB_UTIL.ENABLED_STICKERS, 'content/stickers')

-- Load custom suits and spectrums if they are enabled
if PB_UTIL.config.suits_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_SUITS, "content/suit")

  -- Register Spectrum poker hand if some other Spectrum mods are not installed
  if PB_UTIL.should_load_spectrum_items() then
    PB_UTIL.register_items(PB_UTIL.ENABLED_POKER_HANDS, "content/pokerhand")
    PB_UTIL.register_items(PB_UTIL.ENABLED_PLANETS, "content/planet")
  end
end

-- Load custom ranks if they are enabled
if PB_UTIL.config.ranks_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_RANKS, "content/rank")
end

-- Load Vouchers if they're enabled
if PB_UTIL.config.vouchers_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_VOUCHERS, "content/voucher")
end

-- Load Blinds if they're enabled
if PB_UTIL.config.blinds_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_BLINDS, "content/blind")
end

-- Load Tags if they're enabled
if PB_UTIL.config.tags_enabled then
  PB_UTIL.register_items(PB_UTIL.ENABLED_TAGS, "content/tag")
end

-- Load custom Decks
PB_UTIL.register_items(PB_UTIL.ENABLED_DECKS, "content/deck")

-- Load custom Challenges
PB_UTIL.register_items(PB_UTIL.ENABLED_CHALLENGES, "content/challenge")

-- Register DeckSkins for Friends of Paperback
for _, data in ipairs(PB_UTIL.DECK_SKINS) do
  for _, suit in ipairs(data.suits) do
    local key = data.id .. "_" .. suit:lower()

    -- Common ranks used in both palettes
    local ranks = { 'Jack', 'Queen', 'King', 'Ace' }
    local display_ranks = PB_UTIL.reverse_table(ranks)

    local atlas_lc = SMODS.Atlas {
      key = key .. '_lc',
      path = 'collabs/lc/' .. key .. '_lc.png',
      px = 71,
      py = 95
    }

    local atlas_hc = SMODS.Atlas {
      key = key .. '_hc',
      path = 'collabs/hc/' .. key .. '_hc.png',
      px = 71,
      py = 95
    }

    SMODS.DeckSkin {
      key = key,
      suit = suit,
      loc_txt = {
        ['en-us'] = data.name
      },
      palettes = {
        {
          key = 'lc',
          ranks = ranks,
          display_ranks = display_ranks,
          pos_style = 'ranks',
          atlas = atlas_lc.key
        },
        {
          key = 'hc',
          ranks = ranks,
          display_ranks = display_ranks,
          pos_style = 'ranks',
          atlas = atlas_hc.key,
          hc_default = true
        }
      }
    }
  end
end

-- Collect valid objects to apply Paperback config to
local objects = {}

for _, v in pairs(SMODS.Centers) do
  objects[#objects + 1] = { obj = v, center = true }
end

for _, v in pairs(SMODS.Tags) do
  objects[#objects + 1] = { obj = v, tag = true }
end

-- Apply said config to each valid object
for _, v in ipairs(objects) do
  local obj = v.obj
  if obj and type(obj) == "table" and obj.paperback then
    local func_ref = obj.in_pool or function() return true end
    local config = obj.paperback

    if config.requires_crowns or config.requires_stars then
      config.requires_custom_suits = true
    end

    config.requirements = {}
    for k, _ in pairs(config) do
      local data = PB_UTIL.requirement_map[k]
      if data then
        table.insert(config.requirements, data)
      end
    end

    -- Hook the in_pool function, adding extra logic depending on the
    -- config provided by this center
    obj.in_pool = function(self, args)
      local ret, dupes = func_ref(self, args)

      for _, req in ipairs(config.requirements) do
        ret = ret and PB_UTIL.config[req.setting]
      end

      if config.requires_crowns then
        ret = ret and PB_UTIL.has_suit_in_deck('paperback_Crowns', true)
      end

      if config.requires_stars then
        ret = ret and PB_UTIL.has_suit_in_deck('paperback_Stars', true)
      end

      if config.requires_spectrum_or_suit then
        ret = ret and (PB_UTIL.spectrum_played() or PB_UTIL.has_modded_suit_in_deck())
      end

      return ret, dupes
    end

    -- Add an extra button if it exists in the config
    if config.extra_button then
      PB_UTIL.setup_extra_button(obj, config.extra_button)
    end
  end
end