mirror of
https://github.com/EQMacEmu/quests
synced 2026-08-21 00:23:04 -04:00
359 lines
10 KiB
Lua
359 lines
10 KiB
Lua
|
local items = {}
|
||
|
|
|
||
|
|
function items.check_turn_in(npc, trade, trade_check, keepitems, text, emote)
|
||
|
|
keepitems = keepitems or 1;
|
||
|
|
|
||
|
|
local required_items = 0;
|
||
|
|
if(text ~= nil or emote ~= nil) then
|
||
|
|
for i = 1, 4 do
|
||
|
|
local key = "item" .. i;
|
||
|
|
if(trade_check[key] ~= nil and trade_check[key] ~= 0) then
|
||
|
|
if(keepitems == 0 or (keepitems == 1 and not npc:GetQuestLoot(trade_check[key]))) then
|
||
|
|
required_items = required_items + 1;
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
eq.debug("".. npc:GetCleanName() .. " requires " .. required_items .. " more items for this handin.", 3);
|
||
|
|
end
|
||
|
|
|
||
|
|
local trade_return = {};
|
||
|
|
for key, value in pairs(trade) do
|
||
|
|
trade_return[key] = value;
|
||
|
|
end
|
||
|
|
|
||
|
|
local accepted = false;
|
||
|
|
if(keepitems == 1) then
|
||
|
|
-- Add all the items handed to us that the NPC needs to its loottable
|
||
|
|
local founditem = false;
|
||
|
|
for a = 1, 4 do
|
||
|
|
local add = trade_return["item" .. a];
|
||
|
|
local itemid = 0;
|
||
|
|
for b = 1, 4 do
|
||
|
|
local curkey = "item" .. b;
|
||
|
|
if(add ~= nil and add.valid and trade_check[curkey] ~= nil and trade_check[curkey] ~= 0) then
|
||
|
|
if(trade_check[curkey] == add:GetID()) then
|
||
|
|
eq.debug("Item " .. add:GetID() .. " added to QUEST loot.", 3);
|
||
|
|
npc:AddQuestLoot(add:GetID());
|
||
|
|
trade_return["item" .. a] = nil;
|
||
|
|
founditem = true;
|
||
|
|
accepted = true;
|
||
|
|
itemid = 0;
|
||
|
|
|
||
|
|
if(text ~= nil or emote ~= nil) then
|
||
|
|
required_items = required_items - 1;
|
||
|
|
if(required_items ~= 0) then
|
||
|
|
if(text ~= nil) then
|
||
|
|
npc:Say("" .. text .. "");
|
||
|
|
elseif(emote ~= nil) then
|
||
|
|
npc:Emote("" .. emote .. "");
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
break;
|
||
|
|
else
|
||
|
|
itemid = add:GetID();
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
if(npc:Charmed() and itemid > 1000 and not npc:GetPetLoot(itemid) and not npc:GetQuestLoot(itemid)) then
|
||
|
|
eq.debug("Item " .. itemid .. " added to PET loot.", 3);
|
||
|
|
npc:AddPetLoot(itemid);
|
||
|
|
end
|
||
|
|
end
|
||
|
|
-- The npc was handed an item it doesn't need.
|
||
|
|
if(not founditem and trade_check["copper"] == nil and trade_check["silver"] == nil and trade_check["gold"] == nil and trade_check["platinum"] == nil) then
|
||
|
|
if(accepted) then
|
||
|
|
eq.debug("NPC was handed an item it doesn't need, but also received valid items.", 3);
|
||
|
|
end
|
||
|
|
return false;
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
--Main loops. First loop iterates though the quest items (item1, item2, etc.) The second loop iterates
|
||
|
|
--through the items handed to the NPC, comapring them to the item in the first loop.
|
||
|
|
for i = 1, 4 do
|
||
|
|
local key = "item" .. i;
|
||
|
|
if(trade_check[key] ~= nil and trade_check[key] ~= 0) then
|
||
|
|
local found = false;
|
||
|
|
for j = 1, 4 do
|
||
|
|
-- This compares the items handed to the NPC with what is specified in the quest.
|
||
|
|
local inst = trade_return["item" .. j];
|
||
|
|
if(inst ~= nil and inst.valid) then
|
||
|
|
local itemid = inst:GetID();
|
||
|
|
|
||
|
|
if(trade_check[key] == itemid) then
|
||
|
|
if(keepitems == 0) then
|
||
|
|
trade_return["item" .. j] = ItemInst();
|
||
|
|
end
|
||
|
|
found = true;
|
||
|
|
|
||
|
|
if(keepitems == 0 and text ~= nil) then
|
||
|
|
required_items = required_items - 1;
|
||
|
|
if(required_items ~= 0) then
|
||
|
|
npc:Say("" .. text .. "");
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
break;
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
if(not found) then
|
||
|
|
if(keepitems == 1) then
|
||
|
|
-- This compares the items in the NPC's loottable with what is specified in the quest.
|
||
|
|
local hasitem = npc:GetQuestLoot(trade_check[key]);
|
||
|
|
if(hasitem) then
|
||
|
|
found = true;
|
||
|
|
else
|
||
|
|
eq.debug("An item the NPC requires (" .. trade_check[key] .. ") was not handed to them and is not in their loot.", 3);
|
||
|
|
return false;
|
||
|
|
end
|
||
|
|
else
|
||
|
|
eq.debug("(Non-MQ) An item the NPC requires (" .. trade_check[key] .. ") was not handed to them.", 3);
|
||
|
|
return false;
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
-- Setup clean variables for count check and delete.
|
||
|
|
local item1 = trade_check["item1"];
|
||
|
|
local item2 = trade_check["item2"];
|
||
|
|
local item3 = trade_check["item3"];
|
||
|
|
local item4 = trade_check["item4"];
|
||
|
|
if(trade_check["item1"] == nil) then
|
||
|
|
item1 = 0;
|
||
|
|
end
|
||
|
|
if(trade_check["item2"] == nil) then
|
||
|
|
item2 = 0;
|
||
|
|
end
|
||
|
|
if(trade_check["item3"] == nil) then
|
||
|
|
item3 = 0;
|
||
|
|
end
|
||
|
|
if(trade_check["item4"] == nil) then
|
||
|
|
item4 = 0;
|
||
|
|
end
|
||
|
|
|
||
|
|
if(keepitems == 1) then
|
||
|
|
-- If the quest requires multiple of the same item, this counts up the NPC's loottable items for us.
|
||
|
|
local count = npc:HasRequiredQuestLoot(item1, item2, item3, item4);
|
||
|
|
if(not count) then
|
||
|
|
eq.debug("The NPC does not have the required number of items it needs.", 3);
|
||
|
|
return false;
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
--convert our money into copper then check that we have enough then convert change back
|
||
|
|
local trade_check_money = 0;
|
||
|
|
local return_money = 0;
|
||
|
|
|
||
|
|
if(trade_check["platinum"] ~= nil and trade_check["platinum"] ~= 0) then
|
||
|
|
trade_check_money = trade_check_money + (trade_check["platinum"] * 1000);
|
||
|
|
end
|
||
|
|
|
||
|
|
if(trade_check["gold"] ~= nil and trade_check["gold"] ~= 0) then
|
||
|
|
trade_check_money = trade_check_money + (trade_check["gold"] * 100);
|
||
|
|
end
|
||
|
|
|
||
|
|
if(trade_check["silver"] ~= nil and trade_check["silver"] ~= 0) then
|
||
|
|
trade_check_money = trade_check_money + (trade_check["silver"] * 10);
|
||
|
|
end
|
||
|
|
|
||
|
|
if(trade_check["copper"] ~= nil and trade_check["copper"] ~= 0) then
|
||
|
|
trade_check_money = trade_check_money + trade_check["copper"];
|
||
|
|
end
|
||
|
|
|
||
|
|
return_money = return_money + trade_return["platinum"] * 1000 + trade_return["gold"] * 100;
|
||
|
|
return_money = return_money + trade_return["silver"] * 10 + trade_return["copper"];
|
||
|
|
|
||
|
|
if(return_money < trade_check_money) then
|
||
|
|
return false;
|
||
|
|
else
|
||
|
|
return_money = return_money - trade_check_money;
|
||
|
|
end
|
||
|
|
|
||
|
|
--replace trade with trade_return
|
||
|
|
trade.item1 = trade_return.item1;
|
||
|
|
trade.item2 = trade_return.item2;
|
||
|
|
trade.item3 = trade_return.item3;
|
||
|
|
trade.item4 = trade_return.item4;
|
||
|
|
|
||
|
|
if(keepitems == 1) then
|
||
|
|
npc:DeleteQuestLoot(item1, item2, item3, item4);
|
||
|
|
end
|
||
|
|
|
||
|
|
trade.platinum = math.floor(return_money / 1000);
|
||
|
|
return_money = return_money - (trade.platinum * 1000);
|
||
|
|
|
||
|
|
trade.gold = math.floor(return_money / 100);
|
||
|
|
return_money = return_money - (trade.gold * 100);
|
||
|
|
|
||
|
|
trade.silver = math.floor(return_money / 10);
|
||
|
|
return_money = return_money - (trade.silver * 10);
|
||
|
|
|
||
|
|
trade.copper = return_money;
|
||
|
|
eq.debug("The quest completed successfully.",3);
|
||
|
|
return true;
|
||
|
|
end
|
||
|
|
|
||
|
|
function items.return_items(npc, client, trade, text)
|
||
|
|
if ( type(text) == "boolean" and text == false ) then
|
||
|
|
text = "";
|
||
|
|
end
|
||
|
|
local returned = false;
|
||
|
|
|
||
|
|
for i = 1, 4 do
|
||
|
|
local inst = trade["item" .. i];
|
||
|
|
if(inst ~= nil and inst.valid) then
|
||
|
|
-- If the npc does not have this item in their quest loot, then it needs to be returned.
|
||
|
|
|
||
|
|
local itemid = inst:GetID();
|
||
|
|
if(not npc:GetQuestLoot(itemid)) then
|
||
|
|
|
||
|
|
if (npc:Charmed()) then
|
||
|
|
if (itemid > 1000 and not npc:GetPetLoot(itemid)) then
|
||
|
|
eq.debug("Item " .. itemid .. " added to PET loot.", 3);
|
||
|
|
npc:AddPetLoot(itemid);
|
||
|
|
end
|
||
|
|
else
|
||
|
|
|
||
|
|
local charges = inst:GetCharges();
|
||
|
|
client:SummonItem(itemid, charges, 9999, true);
|
||
|
|
if (npc:CanTalk()) then
|
||
|
|
if (not text) then
|
||
|
|
npc:Say("I have no need for this item " .. client:GetCleanName() .. ", you can have it back.");
|
||
|
|
elseif (text ~= "") then
|
||
|
|
npc:Say(text);
|
||
|
|
end
|
||
|
|
end
|
||
|
|
eq.debug("Handing back an item it doesn't need (" .. itemid .. ").", 3);
|
||
|
|
returned = true;
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
if(npc:Charmed()) then
|
||
|
|
eq.debug("NPC is a charmed pet, it does not return items.", 3);
|
||
|
|
return returned;
|
||
|
|
end
|
||
|
|
|
||
|
|
local money = false;
|
||
|
|
if(trade.platinum ~= 0) then
|
||
|
|
returned = true;
|
||
|
|
money = true;
|
||
|
|
end
|
||
|
|
|
||
|
|
if(trade.gold ~= 0) then
|
||
|
|
returned = true;
|
||
|
|
money = true;
|
||
|
|
end
|
||
|
|
|
||
|
|
if(trade.silver ~= 0) then
|
||
|
|
returned = true;
|
||
|
|
money = true;
|
||
|
|
end
|
||
|
|
|
||
|
|
if(trade.copper ~= 0) then
|
||
|
|
returned = true;
|
||
|
|
money = true;
|
||
|
|
end
|
||
|
|
|
||
|
|
if(money == true) then
|
||
|
|
client:AddMoneyToPP(trade.copper, trade.silver, trade.gold, trade.platinum, true);
|
||
|
|
end
|
||
|
|
|
||
|
|
return returned;
|
||
|
|
end
|
||
|
|
|
||
|
|
function items.count_handed_item(npc, trade, items, min_count)
|
||
|
|
|
||
|
|
local itemid1 = items[1] or 0;
|
||
|
|
local itemid2 = items[2] or 0;
|
||
|
|
local itemid3 = items[3] or 0;
|
||
|
|
local itemid4 = items[4] or 0;
|
||
|
|
local itemid5 = items[5] or 0;
|
||
|
|
local itemid6 = items[6] or 0;
|
||
|
|
local itemid7 = items[7] or 0;
|
||
|
|
local itemid8 = items[8] or 0;
|
||
|
|
min_count = min_count or 1;
|
||
|
|
|
||
|
|
local mq_loot = {};
|
||
|
|
|
||
|
|
local count = npc:QuestLootCount(itemid1) + npc:QuestLootCount(itemid2) + npc:QuestLootCount(itemid3) + npc:QuestLootCount(itemid4) +
|
||
|
|
npc:QuestLootCount(itemid5) + npc:QuestLootCount(itemid6) + npc:QuestLootCount(itemid7) + npc:QuestLootCount(itemid8);
|
||
|
|
local handed_count = 0;
|
||
|
|
for j = 1, 4 do
|
||
|
|
local inst = trade["item" .. j];
|
||
|
|
if(inst ~= nil and inst.valid) then
|
||
|
|
if(inst:GetID() > 0 and (itemid1 == inst:GetID() or itemid2 == inst:GetID() or itemid3 == inst:GetID() or itemid4 == inst:GetID() or
|
||
|
|
itemid5 == inst:GetID() or itemid6 == inst:GetID() or itemid7 == inst:GetID() or itemid8 == inst:GetID())) then
|
||
|
|
count = count + 1;
|
||
|
|
handed_count = handed_count + 1;
|
||
|
|
if(min_count > 1) then
|
||
|
|
-- This item may be added to quest loot, add to mq array for further processing below.
|
||
|
|
mq_loot["item" .. j] = trade["item" .. j];
|
||
|
|
end
|
||
|
|
trade["item" .. j] = nil;
|
||
|
|
eq.debug("Found item in slot (" .. j .. ") count is now " .. count .. "", 3);
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
if(handed_count == 0) then
|
||
|
|
eq.debug("Quest will not complete.",3);
|
||
|
|
return 0;
|
||
|
|
end
|
||
|
|
|
||
|
|
local clear_loot = true;
|
||
|
|
if(min_count > 1) then
|
||
|
|
-- Figure out if we need to add items to quest loot.
|
||
|
|
local remainder = count - min_count;
|
||
|
|
if(remainder <= 1 and remainder ~= 0) then
|
||
|
|
for i = 4, 1, -1 do
|
||
|
|
if(mq_loot["item" .. i] ~= nil) then
|
||
|
|
local mqitem = mq_loot["item" .. i];
|
||
|
|
if(mqitem ~= nil and mqitem.valid) then
|
||
|
|
npc:AddQuestLoot(mqitem:GetID());
|
||
|
|
clear_loot = false;
|
||
|
|
if(remainder == 1) then
|
||
|
|
break;
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
-- Figure out how many times the quest should complete if it isn't a 1:1 hand-in.
|
||
|
|
local count_float = count / min_count;
|
||
|
|
if(count_float%1==0) then
|
||
|
|
count = count_float;
|
||
|
|
else
|
||
|
|
if(count_float < 1) then
|
||
|
|
count = 0;
|
||
|
|
else
|
||
|
|
count = math.floor(count_float-0.5);
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
if(clear_loot) then
|
||
|
|
-- Clear out any quest items that got saved from a previous hand-in.
|
||
|
|
eq.debug("Clearing quest loot", 3);
|
||
|
|
npc:DeleteQuestLoot(itemid1,itemid2,itemid3,itemid4);
|
||
|
|
if(itemid5 > 0) then
|
||
|
|
npc:DeleteQuestLoot(itemid5,itemid6,itemid7,itemid8);
|
||
|
|
end
|
||
|
|
|
||
|
|
end
|
||
|
|
|
||
|
|
eq.debug("Quest will complete " .. count .. " times.", 3);
|
||
|
|
return count;
|
||
|
|
|
||
|
|
end
|
||
|
|
|
||
|
|
return items;
|