Create Black_Market_Vendor.lua

Black_Market_Vendor.lua

@@ -0,0 +1,98 @@
+local BLACK_MARKET_NPC_ID = 101111 -- Replace with your NPC's ID
+local ARAXIA_TOKEN_ID = 910001 -- ID of Araxia Tokens
+local SET_COST = 100 -- Cost of each armor set in Araxia Tokens
+local UPDATE_INTERVAL = 604800 -- 1 week in seconds
+
+-- Class names and icons for the menu
+local CLASS_NAMES_AND_ICONS = {
+    [11] = {name = "Druid", icon = "Interface\\icons\\classicon_druid"},
+    [3] = {name = "Hunter", icon = "Interface\\icons\\classicon_hunter"},
+    [8] = {name = "Mage", icon = "Interface\\icons\\classicon_mage"},
+    [2] = {name = "Paladin", icon = "Interface\\icons\\classicon_paladin"},
+    [5] = {name = "Priest", icon = "Interface\\icons\\classicon_priest"},
+    [4] = {name = "Rogue", icon = "Interface\\icons\\classicon_rogue"},
+    [7] = {name = "Shaman", icon = "Interface\\icons\\classicon_shaman"},
+    [9] = {name = "Warlock", icon = "Interface\\icons\\classicon_warlock"},
+    [1] = {name = "Warrior", icon = "Interface\\icons\\classicon_warrior"},
+    [6] = {name = "Death Knight", icon = "Interface\\icons\\spell_deathknight_classicon"}
+}
+
+local selectedSets = {}
+
+-- Function to update the selectedSets table with random sets weekly
+local function UpdateBlackMarketSets()
+    selectedSets = {}
+    for classId in pairs(CLASS_NAMES_AND_ICONS) do
+        local query = WorldDBQuery("SELECT DISTINCT item_set_id, set_name FROM black_market_armor_sets WHERE class = " .. classId .. " ORDER BY RAND() LIMIT 1")
+        if query then
+            local item_set_id = query:GetInt32(0)
+            local set_name = query:GetString(1)
+            selectedSets[classId] = { item_set_id = item_set_id, set_name = set_name }
+        end
+    end
+end
+
+-- Schedule the update function to run weekly
+CreateLuaEvent(UpdateBlackMarketSets, UPDATE_INTERVAL, 0)
+UpdateBlackMarketSets() -- Run immediately on script load
+
+-- Function to handle the NPC's gossip menu
+local function BlackMarket_OnGossipHello(event, player, creature)
+    player:GossipClearMenu()
+    for classId, classData in pairs(CLASS_NAMES_AND_ICONS) do
+        local icon = "|T" .. classData.icon .. ":25|t"
+        player:GossipMenuAddItem(0, icon .. " View " .. classData.name .. " armor set", 0, classId)
+    end
+    player:GossipSendMenu(1, creature)
+end
+
+-- Function to display the available sets to the player
+local function ShowAvailableSets(player, creature, classId)
+    local selectedSet = selectedSets[classId]
+    if selectedSet then
+        local set_name = selectedSet.set_name
+        local item_set_id = selectedSet.item_set_id
+        
+        player:GossipClearMenu()
+        player:GossipMenuAddItem(0, set_name .. " (100 Araxia Tokens)", 0, 1000 + item_set_id)
+        player:GossipMenuAddItem(0, "Back", 0, 999) -- Add an option to go back to the class menu
+        player:GossipSendMenu(1, creature)
+    else
+        player:SendNotification("No set available for this class.")
+        BlackMarket_OnGossipHello(event, player, creature)
+    end
+end
+
+-- Function to handle the purchase of an item set
+local function BlackMarket_OnGossipSelectOption(event, player, creature, sender, item_set_id, code)
+    local token_count = player:GetItemCount(ARAXIA_TOKEN_ID)
+    if token_count >= SET_COST then
+        local items_query = WorldDBQuery("SELECT item_id FROM black_market_armor_sets WHERE item_set_id = " .. item_set_id)
+        if items_query then
+            repeat
+                local item_id = items_query:GetInt32(0)
+                player:AddItem(item_id, 1)
+            until not items_query:NextRow()
+        end
+        player:RemoveItem(ARAXIA_TOKEN_ID, SET_COST)
+        player:SendNotification("You have purchased the armor set for " .. SET_COST .. " Araxia Tokens.")
+    else
+        player:SendNotification("You do not have enough Araxia Tokens.")
+    end
+    player:GossipComplete()
+end
+
+-- Function to handle the selection of the gossip menu
+local function BlackMarket_OnGossipSelect(event, player, creature, sender, intid, code)
+    if intid == 999 then
+        BlackMarket_OnGossipHello(event, player, creature) -- Go back to the class menu
+    elseif intid >= 1000 then
+        BlackMarket_OnGossipSelectOption(event, player, creature, sender, intid - 1000, code) -- Handle item purchase
+    elseif CLASS_NAMES_AND_ICONS[intid] then
+        ShowAvailableSets(player, creature, intid) -- Show armor sets for the selected class
+    end
+end
+
+-- Register the NPC gossip events
+RegisterCreatureGossipEvent(BLACK_MARKET_NPC_ID, 1, BlackMarket_OnGossipHello) -- GOSSIP_HELLO
+RegisterCreatureGossipEvent(BLACK_MARKET_NPC_ID, 2, BlackMarket_OnGossipSelect) -- GOSSIP_SELECT