new Prohpet tarot card

objects/consumables/prophet.lua

@@ -0,0 +1,293 @@
+SMODS.Atlas({
+  key = "prophet",
+  path = "c_prophet.png",
+  px = 71,
+  py = 95,
+})
+
+SMODS.Consumable({
+  key = "mp_prophet",
+  set = "Tarot",
+  atlas = "prophet",
+  cost = 3,
+  unlocked = true,
+  discovered = true,
+	loc_txt = {
+		name = "The Prophet",
+		text = {
+			"Pick a {C:attention}Joker{} and",
+			"see its position in",
+			"your seeded {C:attention}shop queue{}"
+		}
+	},
+  loc_vars = function(self, _info_queue, _card)
+    return { vars = {} }
+  end,
+  in_pool = function(self)
+    return MP.LOBBY.code and MP.LOBBY.config.ruleset == "ruleset_mp_smallworld"
+  end,
+  can_use = function(self, _card)
+    return true
+  end,
+  use = function(self, card, _area, _copier)
+    G.E_MANAGER:add_event(Event({
+      trigger = "after",
+      delay = 0.4,
+      func = function()
+        play_sound("tarot1", 0.8, 1)
+        card:juice_up(0.8, 0.5)
+
+        -- Create prophet joker selection UI
+        MP.create_prophet_ui()
+
+        return true
+      end,
+    }))
+  end,
+  mp_credits = {
+    idea = { "Oliver Marker" },
+    art = { "Jonah Jaffe" },
+    code = { "Oliver Marker" },
+  },
+})
+
+-- Function to map joker keys (handles reworked jokers like hanging_chad -> mp_hanging_chad)
+local function map_joker_key(key)
+  -- Check if this joker has a reworked version in the current ruleset
+  if MP.LOBBY.config and MP.LOBBY.config.ruleset then
+    local ruleset = SMODS.get_ruleset(MP.LOBBY.config.ruleset)
+    if ruleset and ruleset.reworked_jokers then
+      -- Check if there's a reworked version (indicated by j_mp_ prefix)
+      local mp_key = "j_mp_" .. key:sub(3)  -- Convert j_hanging_chad to j_mp_hanging_chad
+      for _, reworked_key in ipairs(ruleset.reworked_jokers) do
+        if reworked_key == mp_key then
+          return mp_key
+        end
+      end
+    end
+  end
+  return key
+end
+
+-- Function to create the prophet UI showing all jokers using collection-style UI
+function MP.create_prophet_ui()
+  -- Use SMODS collection pool, but filter and map keys
+  local raw_pool = SMODS.collection_pool(G.P_CENTER_POOLS.Joker)
+  local pool = {}
+
+  -- Filter and map joker keys
+  for _, center in ipairs(raw_pool) do
+    local mapped_key = map_joker_key(center.key)
+    local mapped_center = G.P_CENTERS[mapped_key]
+    if mapped_center then
+      table.insert(pool, mapped_center)
+    else
+      table.insert(pool, center)  -- Keep original if mapping doesn't exist
+    end
+  end
+
+  local rows = {5, 5, 5} -- 5 jokers per row, 3 rows per page (15 total per page)
+
+  -- Create card areas for the prophet collection
+  G.prophet_collection = {}
+  local deck_tables = {}
+  local cards_per_page = 0
+  local row_totals = {}
+
+  for j = 1, #rows do
+    row_totals[j] = cards_per_page
+    cards_per_page = cards_per_page + rows[j]
+    G.prophet_collection[j] = CardArea(
+      G.ROOM.T.x + 0.2*G.ROOM.T.w/2, G.ROOM.T.h,
+      (rows[j]+0.25)*G.CARD_W,
+      0.95*G.CARD_H, 
+      {card_limit = rows[j], type = 'title', highlight_limit = 0, collection = true}
+    )
+    table.insert(deck_tables, {
+      n = G.UIT.R, 
+      config = {align = "cm", padding = 0.07, no_fill = true}, 
+      nodes = {{n = G.UIT.O, config = {object = G.prophet_collection[j]}}}
+    })
+  end
+
+  -- Create pagination options
+  local total_pages = math.ceil(#pool/cards_per_page)
+  local options = {}
+  for i = 1, total_pages do
+    table.insert(options, localize('k_page')..' '..tostring(i)..'/'..tostring(total_pages))
+  end
+
+  -- Function to handle page changes
+  G.FUNCS.prophet_collection_page = function(e)
+    if not e or not e.cycle_config then return end
+    for j = 1, #G.prophet_collection do
+      for i = #G.prophet_collection[j].cards, 1, -1 do
+        local c = G.prophet_collection[j]:remove_card(G.prophet_collection[j].cards[i])
+        c:remove()
+        c = nil
+      end
+    end
+
+    for j = 1, #rows do
+      for i = 1, rows[j] do
+        local page_offset = (e.cycle_config.current_option - 1) * cards_per_page
+        local center = pool[i + row_totals[j] + page_offset]
+        if not center then break end
+        local card = Card(G.prophet_collection[j].T.x + G.prophet_collection[j].T.w/2, G.prophet_collection[j].T.y, G.CARD_W, G.CARD_H, G.P_CARDS.empty, center)
+
+        -- Make the card clickable for Prophet functionality
+        card.states.hover.can = true
+        card.click = function()
+          -- Calculate and show position for this joker (use mapped key)
+          local mapped_key = map_joker_key(center.key)
+          MP.show_joker_position(mapped_key, G.P_CENTERS[mapped_key] or center)
+        end
+
+        card:start_materialize(nil, i>1 or j>1)
+        G.prophet_collection[j]:emplace(card)
+      end
+    end
+  end
+
+  -- Initialize with first page
+  G.FUNCS.prophet_collection_page{ cycle_config = { current_option = 1 }}
+
+  -- Create the UI
+  local ui_definition = create_UIBox_generic_options({
+    back_func = 'close_prophet_ui',
+    contents = {
+      {n = G.UIT.R, config = {align = "cm", padding = 0.1}, nodes = {
+        {n = G.UIT.T, config = {
+          text = "Select a Joker to See Queue Position", 
+          scale = 0.5, 
+          colour = G.C.WHITE
+        }}
+      }},
+      {n = G.UIT.R, config = {align = "cm", padding = 0.05}, nodes = {
+        {n = G.UIT.T, config = {
+          text = "Click any joker to find out how far away it is in your seeded queue", 
+          scale = 0.3, 
+          colour = G.C.UI.TEXT_LIGHT
+        }}
+      }},
+      {n = G.UIT.R, config = {align = "cm", r = 0.1, colour = G.C.BLACK, emboss = 0.05}, nodes = deck_tables}, 
+      (total_pages > 1) and {n = G.UIT.R, config = {align = "cm"}, nodes = {
+        create_option_cycle({
+          options = options, 
+          w = 4.5, 
+          cycle_shoulders = true, 
+          opt_callback = 'prophet_collection_page', 
+          current_option = 1, 
+          colour = G.C.RED, 
+          no_pips = true, 
+          focus_args = {snap_to = true, nav = 'wide'}
+        })
+      }} or nil,
+    }
+  })
+
+  -- Show the overlay
+  G.FUNCS.overlay_menu({
+    definition = ui_definition,
+  })
+end
+
+-- Function to show a specific joker's position (called when clicking a joker)
+function MP.show_joker_position(joker_key, center)
+  -- Calculate this joker's position in the queue
+  local position = MP.calculate_joker_position(joker_key)
+
+  -- Create detailed info UI
+  local info_ui = create_UIBox_generic_options({
+    back_func = 'prophet_back_to_collection',
+    contents = {
+      {n = G.UIT.R, config = {align = "cm", padding = 0.1}, nodes = {
+        {n = G.UIT.T, config = {
+          text = center.name, 
+          scale = 0.6, 
+          colour = G.C.WHITE
+        }}
+      }},
+      {n = G.UIT.R, config = {align = "cm", padding = 0.1}, nodes = {
+        {n = G.UIT.T, config = {
+          text = position and ("Position #" .. position .. " in queue") or "Not found in next 1000 jokers", 
+          scale = 0.45, 
+          colour = position and (position <= 20 and G.C.GREEN or position <= 100 and G.C.ORANGE or G.C.WHITE) or G.C.RED
+        }}
+      }},
+    }
+  })
+
+  -- Show detailed info
+  G.FUNCS.overlay_menu({
+    definition = info_ui,
+  })
+end
+
+-- Function to close the prophet UI completely from detail view
+G.FUNCS.prophet_back_to_collection = function(e)
+  G.FUNCS.exit_overlay_menu(e)
+end
+
+-- Function to calculate a specific joker's position in the seeded joker queue
+function MP.calculate_joker_position(joker_key)
+  local MAX_QUEUE_CHECK = 1000 -- Check next 1000 jokers in the queue
+
+  -- Map the input key
+  local mapped_key = map_joker_key(joker_key)
+
+  -- Check if the joker exists
+  local joker_center = G.P_CENTERS[mapped_key]
+  if not joker_center then
+    return nil -- Joker doesn't exist
+  end
+
+  -- CRITICAL: Save the ENTIRE pseudorandom state before simulation
+  local saved_pseudorandom = copy_table(G.GAME.pseudorandom)
+
+  -- Use the same key_append as the shop ('sho')
+  -- Let the RNG state advance naturally with each create_card call
+  for position = 1, MAX_QUEUE_CHECK do
+    -- Create a joker using the same key_append as the shop
+    local test_card = create_card('Joker', nil, nil, nil, nil, nil, nil, 'sho')
+
+    if test_card and test_card.config and test_card.config.center then
+      local selected_joker = test_card.config.center.key
+
+      -- Clean up the test card immediately to avoid memory issues
+      if test_card.remove then
+        test_card:remove()
+      end
+
+      -- Check if this is our target joker (compare with mapped key)
+      if selected_joker == mapped_key then
+        -- CRITICAL: Restore the ENTIRE pseudorandom state before returning
+        G.GAME.pseudorandom = saved_pseudorandom
+        return position
+      end
+    end
+  end
+
+  -- CRITICAL: Restore the ENTIRE pseudorandom state before returning (joker not found)
+  G.GAME.pseudorandom = saved_pseudorandom
+  return nil -- Not found in next 1000 positions
+end
+
+-- Close function for the Prophet UI
+G.FUNCS.close_prophet_ui = function(e)
+  -- Clean up prophet collection areas
+  if G.prophet_collection then
+    for j = 1, #G.prophet_collection do
+      for i = #G.prophet_collection[j].cards, 1, -1 do
+        local c = G.prophet_collection[j]:remove_card(G.prophet_collection[j].cards[i])
+        if c then
+          c:remove()
+          c = nil
+        end
+      end
+    end
+    G.prophet_collection = nil
+  end
+  G.FUNCS.exit_overlay_menu(e)
+end
+