Exiles/coa-atlasloot
3
0
Fork 0
Code Pull Requests Actions Packages Releases 2 Wiki Activity
Files
c0c89c40beb63755e5c9f27ab51f2b4c895bbff4
coa-atlasloot/AtlasLoot/Core/WishList.lua
T
Anch c0c89c40be rebuilt wishlist
2022-08-31 01:38:10 +12:00

1049 lines
38 KiB
Lua
Raw Blame History

--[[
File containing functions related to the wish list.
Functions:
AtlasLoot_AddToWishlist(itemID, itemTexture, itemName, lootPage, sourcePage)
AtlasLoot_DeleteFromWishList(itemID)
AtlasLoot_WishListCheck(itemID, all)
AtlasLoot_GetWishLists([playerName])
AtlasLoot_CheckWishlistItem(itemID ,[playerName ,[wishlist] ])
<local> ClearLines()
<local> AddWishListOptions(parrent,name,icon,xxx,tabname,tab2)
<local> AddTexture(par, num)
AtlasLoot_RefreshWishlists()
AtlasLoot_CreateWishlistOptions()
]]
local AL = LibStub("AceLocale-3.0"):GetLocale("AtlasLoot");
local BabbleFaction = AtlasLoot_GetLocaleLibBabble("LibBabble-Faction-3.0")
local ALModule = AtlasLoot:NewModule("WishList", "AceSerializer-3.0", "AceComm-3.0")
AtlasLoot_WishListDrop = AceLibrary("Dewdrop-2.0");
AtlasLoot_WishList = nil;
local playerName = UnitName("player");
local itemID, itemTexture, itemName, lootPage, sourcePage, xtyp, xarg2, xarg3, difficulty;
local OptionsLoadet = false;
local curaddicon,curaddname,curtabname,curplayername = "","","","";
local editName = false;
local ShareWishlistPref = "AtlasLootWishlist";
AtlasLootWishList = {}
-- Colours stored for code readability
local GREY = "|cff999999";
local RED = "|cffff0000";
local WHITE = "|cffFFFFFF";
local GREEN = "|cff1eff00";
local PURPLE = "|cff9F3FFF";
local BLUE = "|cff0070dd";
local ORANGE = "|cffFF8400";
--[[
CheckTable(tab)
Check tables for content
]]
local function CheckTable(tab)
for k,v in pairs(tab) do
if k then
return true
end
end
return false
end
--[[
AtlasLoot_WishListAddDropClick(typ, arg2, arg3, arg4)
Add a item too the wishlist or show the selectet wishlist
]]
function AtlasLoot_WishListAddDropClick(typ, arg2, arg3, arg4)
if arg4 == true then
if typ == "addOwn" then
AtlasLoot:ShowItemsFrame("Own", "AtlasLootWishList", arg2);
AtlasLoot_WishListDrop:Close(1)
elseif typ == "addShared" then
AtlasLoot:ShowItemsFrame("Shared", "AtlasLootWishList", arg2);
AtlasLoot_WishListDrop:Close(1)
end
else
xtyp = typ
xarg2 = arg2
xarg3 = arg3
if typ == "addOwn" then
if AtlasLoot_WishListCheck(itemID) then
DEFAULT_CHAT_FRAME:AddMessage(BLUE..AL["AtlasLoot"]..": "..AtlasLoot_FixText(itemName)..RED..AL[" already in the WishList!"]..WHITE.." ("..AtlasLootWishList["Own"][arg2].Name..")");
return;
end
table.insert(AtlasLootWishList["Own"][arg2], { #AtlasLootWishList["Own"][arg2] + 1, itemID, itemTexture, itemName, lootPage, "", "", sourcePage});
DEFAULT_CHAT_FRAME:AddMessage(RED..AL["AtlasLoot"]..": "..AtlasLoot_FixText(itemName)..GREY..AL[" added to the WishList."]..WHITE.." ("..AtlasLootWishList["Own"][arg2].Name..")");
AtlasLoot_WishListDrop:Close(1)
elseif typ == "addShared" then
if AtlasLoot_WishListCheck(itemID) then
DEFAULT_CHAT_FRAME:AddMessage(BLUE..AL["AtlasLoot"]..": "..AtlasLoot_FixText(itemName)..RED..AL[" already in the WishList!"]..WHITE.." ("..AtlasLootWishList["Shared"][arg2].Name.." - "..arg2..")");
return;
end
table.insert(AtlasLootWishList["Shared"][arg2][arg3], { 0, itemID, itemTexture, itemName, lootPage, "", "", sourcePage, [AtlasLoot_Difficulty.DIF_SEARCH] = difficulty});
DEFAULT_CHAT_FRAME:AddMessage(RED..AL["AtlasLoot"]..": "..AtlasLoot_FixText(itemName)..GREY..AL[" added to the WishList."]..WHITE.." ("..AtlasLootWishList["Shared"][arg2].Name.." - "..arg2..")");
AtlasLoot_WishListDrop:Close(1)
end
end
end
--[[
AtlasLoot_ShowWishListDropDown(xitemID, xitemTexture, xitemName, xlootPage, xsourcePage, button, show)
Show the dropdownlist with the wishlists
]]
function AtlasLoot_ShowWishListDropDown(xitemID, xitemTexture, xitemName, xlootPage, xsourcePage, button, show)
itemID, itemTexture, itemName, lootPage, sourcePage = xitemID, xitemTexture, xitemName, xlootPage, xsourcePage
if AtlasLootWishList["Options"][playerName]["UseDefaultWishlist"] == false then
if AtlasLoot_WishListDrop:IsOpen(button) then
AtlasLoot_WishListDrop:Close(1);
else
local setOptions = function(level, value)
if level == 1 then
AtlasLoot_WishListDrop:AddLine(
"text", AL["Own Wishlists"],
"tooltipTitle", AL["Own Wishlists"],
"value", "OwnWishlists",
"arg1", "1",
"hasArrow", true,
"func", AtlasLoot_WishListAddDropClick,
"notCheckable", true
);
AtlasLoot_WishListDrop:AddLine(
"text", AL["Shared Wishlists"],
"tooltipTitle", AL["Shared Wishlists"],
"value", "SharedWishlists",
"arg1", "1",
"hasArrow", true,
"func", AtlasLoot_WishListAddDropClick,
"notCheckable", true
);
AtlasLoot_WishListDrop:AddLine(
"text", AL["Add Wishlist"],
"func", function()
AtlasLootWishList_AddFrame:Show()
AtlasLottAddEditWishList:SetText(AL["Add Wishlist"]);
AtlasLoot_WishListDrop:Close(1);
end,
"notCheckable", true
);
if AtlasLootItemsFrame.refresh[2] == "AtlasLootWishList" then
AtlasLoot_WishListDrop:AddLine(
"text", AL["Edit Wishlist"],
"func", function()
AtlasLootWishList_AddFrame:Show()
AtlasLottAddEditWishList:SetText(AL["Edit Wishlist"]);
AtlasLootWishListNewName:SetText(AtlasLootWishList[AtlasLootItemsFrame.refresh[1]][AtlasLootItemsFrame.refresh[3]].Name);
curaddicon = AtlasLootWishList[AtlasLootItemsFrame.refresh[1]][AtlasLootItemsFrame.refresh[3]].Icon;
editName = true;
AtlasLoot_WishListDrop:Close(1);
end,
"notCheckable", true
);
AtlasLoot_WishListDrop:AddLine(
"text", AL["Delete Wishlist"],
"func", function() if AtlasLootItemsFrame.refresh[2] == "AtlasLootWishList" then StaticPopup_Show("ATLASLOOT_DELETE_WISHLIST"); AtlasLoot_WishListDrop:Close(1); end end,
"notCheckable", true
);
end
AtlasLoot_WishListDrop:AddLine(
"text", AL["Close"],
"func", function() AtlasLoot_WishListDrop:Close(1) end,
"notCheckable", true
);
elseif level == 2 then
if value == "OwnWishlists" then
for k,v in pairs(AtlasLootWishList["Own"]) do
if type(v) == "table" then
AtlasLoot_WishListDrop:AddLine(
"text", v.Name,
"tooltipTitle", v.Name,
"func", AtlasLoot_WishListAddDropClick,
"arg1", "addOwn",
"arg2", k,
"arg3", "",
"arg4", show,
"notCheckable", true
);
end
end
elseif value == "SharedWishlists" then
for k,v in pairs(AtlasLootWishList["Shared"]) do
if k ~= playerName then
if CheckTable(AtlasLootWishList["Shared"][k]) then
AtlasLoot_WishListDrop:AddLine(
"text", k,
"tooltipTitle", k,
"func", AtlasLoot_WishListAddDropClick,
"value", k,
"arg1", "1",
"hasArrow", true,
"notCheckable", true
);
end
end
end
end
end
end
AtlasLoot_WishListDrop:Open(button,
"point", function(parent)
return "TOPLEFT", "TOPRIGHT";
end,
"children", setOptions
);
end
else
for k,v in pairs(AtlasLootWishList["Own"][playerName]) do
if AtlasLootWishList["Own"][playerName][k]["info"] then
if AtlasLootWishList["Own"][playerName][k]["info"][2][playerName] == true then
AtlasLoot_WishListAddDropClick("addOwn", k, "", show)
return
end
end
end
for k,v in pairs(AtlasLootWishList["Own"]) do
if AtlasLootWishList["Own"][k] then
for i,j in pairs(AtlasLootWishList["Own"][k]) do
if AtlasLootWishList["Own"][k][i]["info"] then
if AtlasLootWishList["Own"][k][i]["info"][2][playerName] == true then
AtlasLoot_WishListAddDropClick("addOther", k, i, show)
return
end
end
end
end
end
DEFAULT_CHAT_FRAME:AddMessage(RED..AL["AtlasLoot"]..": "..AL["Please set a default Wishlist."]);
end
end
--[[
AtlasLoot_DeleteFromWishList(itemID)
Deletes the specified items from the wishlist
]]
function AtlasLoot_DeleteFromWishList(itemID)
if itemID and itemID == 0 then return end
if AtlasLootItemsFrame.refresh[2] == "AtlasLootWishList" then
for i, v in ipairs(_G[AtlasLootItemsFrame.refresh[2]][AtlasLootItemsFrame.refresh[1]][AtlasLootItemsFrame.refresh[3]]) do
if v[2] == itemID then
DEFAULT_CHAT_FRAME:AddMessage(RED..AL["AtlasLoot"]..": "..AtlasLoot_FixText(v[4])..GREY..AL[" deleted from the WishList."]..WHITE.." (".._G[AtlasLootItemsFrame.refresh[2]][AtlasLootItemsFrame.refresh[1]][AtlasLootItemsFrame.refresh[3]].Name..")");
table.remove(_G[AtlasLootItemsFrame.refresh[2]][AtlasLootItemsFrame.refresh[1]][AtlasLootItemsFrame.refresh[3]], i);
break;
end
end
end
AtlasLootItemsFrame:Hide();
AtlasLoot:ShowItemsFrame(AtlasLootItemsFrame.refresh[1], AtlasLootItemsFrame.refresh[2], AtlasLootItemsFrame.refresh[3]);
end
--[[
AtlasLoot_WishListCheck(itemID, all):
Returns true if an item is already in the wishlist
]]
function AtlasLoot_WishListCheck(itemID, all)
if all == true then
local rettex = ""
if not AtlasLootWishList["Options"][playerName]["markInTable"] then AtlasLootWishList["Options"][playerName]["markInTable"] = "own" end
if AtlasLootWishList["Options"][playerName]["markInTable"] == "own" then
for k,v in ipairs(AtlasLootWishList["Own"]) do
if type(v) == "table" then
for i,j in ipairs(AtlasLootWishList["Own"][k]) do
if AtlasLootWishList["Own"][k][i][2] == itemID then
if AtlasLootWishList["Own"][k].Icon ~= "" then
rettex = rettex.."|T"..AtlasLootWishList["Own"][k].Icon..":0|t"
else
rettex = rettex.."|TInterface\\Icons\\INV_Misc_QuestionMark:0|t"
end
break
end
end
end
end
elseif AtlasLootWishList["Options"][playerName]["markInTable"] == "all" then
for k,v in ipairs(AtlasLootWishList["Own"]) do
for i,j in ipairs(AtlasLootWishList["Own"][k]) do
for b,c in ipairs(AtlasLootWishList["Own"][k][i]) do
if AtlasLootWishList["Own"][k][i][b][2] == itemID then
if AtlasLootWishList["Own"][k][i].Icon ~= "" then
rettex = rettex.."|T"..AtlasLootWishList["Own"][k][i].Icon..":0|t"
else
rettex = rettex.."|TInterface\\Icons\\INV_Misc_QuestionMark:0|t"
end
break
end
end
end
end
for k,v in pairs(AtlasLootWishList["Shared"]) do
for i,j in pairs(AtlasLootWishList["Shared"][k]) do
for b,c in pairs(AtlasLootWishList["Shared"][k][i]) do
if AtlasLootWishList["Shared"][k][i][b][2] == itemID then
if AtlasLootWishList["Shared"][k][i].Icon ~= "" then
rettex = rettex.."|T"..AtlasLootWishList["Shared"][k][i].Icon..":0|t"
else
rettex = rettex.."|TInterface\\Icons\\INV_Misc_QuestionMark:0|t"
end
break
end
end
end
end
end
if rettex == "" then
return false
else
return true, rettex
end
else
if xtyp == "addOwn" then
for _, v in ipairs(AtlasLootWishList["Own"][xarg2]) do
if v[2] == itemID then
return true;
end
end
elseif xtyp == "addShared" then
for _, v in ipairs(AtlasLootWishList["Shared"][xarg2]) do
if v[2] == itemID then
return true;
end
end
end
return false;
end
end
--[[
AtlasLoot_GetWishLists([playerName])
Returns a Table with wishlist infos, if name not exist in wishlisttable it returns nil.
[playerName] -> Enter a PlayerName <string>
return:
table = {
["playerName"] = {
[WishListNumber] = {
[1] = "WishlistName",
[2] = "WishlistIcon",
},
},
}
]]
function AtlasLoot_GetWishLists(playerName)
local returnTable = {}
if playerName then
if not returnTable[playerName] then returnTable[playerName] = {} end
if not AtlasLootWishList["Own"][playerName] then return nil end
for listIndex,_ in pairs(AtlasLootWishList["Own"][playerName]) do
if not returnTable[playerName][listIndex] then returnTable[playerName][listIndex] = {} end
returnTable[playerName][listIndex][1] = AtlasLootWishList["Own"][playerName][listIndex]["info"][1]
returnTable[playerName][listIndex][2] = AtlasLootWishList["Own"][playerName][listIndex]["info"][2]
end
else
for name,_ in pairs(AtlasLootWishList["Own"]) do
if not returnTable[name] then returnTable[name] = {} end
for listIndex,_ in pairs(AtlasLootWishList["Own"][name]) do
if not returnTable[name][listIndex] then returnTable[name][listIndex] = {} end
returnTable[name][listIndex][1] = AtlasLootWishList["Own"][name][listIndex]["info"][1]
returnTable[name][listIndex][2] = AtlasLootWishList["Own"][name][listIndex]["info"][2]
end
end
end
return returnTable
end
--[[
AtlasLoot_CheckWishlistItem(itemID ,[playerName ,[wishlist] ])
Returns a Table with infos about the item.
itemID -> Enter a ItemID
[playerName] -> Enter a PlayerName, needed if you want to check only wishlists from a particular player (if you need to check all players, enter nil)
[wishlist] -> Checks only this wishlist (playerName can be nil)
return:
table = {
[index] = {
[1] = "playerName",
[2] = "WishListName"
}
}
]]
function AtlasLoot_CheckWishlistItem(itemID, playerName, wishList)
if not itemID then return nil end
local returnTable = {}
local returnIndex = 1
if playerName and not wishList then
if not AtlasLootWishList["Own"][playerName] then return nil end
for listIndex,_ in pairs(AtlasLootWishList["Own"][playerName]) do
for itemIndex,_ in pairs(AtlasLootWishList["Own"][playerName][listIndex]) do
if AtlasLootWishList["Own"][playerName][listIndex][itemIndex][2] == itemID then
returnTable[returnIndex] = {}
returnTable[returnIndex][1] = playerName
returnTable[returnIndex][2] = AtlasLootWishList["Own"][playerName][listIndex]["info"][1]
returnIndex = returnIndex + 1
break
end
end
end
elseif wishList then
for name,_ in pairs(AtlasLootWishList["Own"]) do
for listIndex,_ in pairs(AtlasLootWishList["Own"][name]) do
if wishList ~= AtlasLootWishList["Own"][name][listIndex]["info"][1] then break end
for itemIndex,_ in pairs(AtlasLootWishList["Own"][name][listIndex]) do
if AtlasLootWishList["Own"][name][listIndex][itemIndex][2] == itemID then
if playerName and playerName == name then
returnTable[returnIndex] = {}
returnTable[returnIndex][1] = name
returnTable[returnIndex][2] = AtlasLootWishList["Own"][name][listIndex]["info"][1]
returnIndex = returnIndex + 1
break
elseif not playerName then
returnTable[returnIndex] = {}
returnTable[returnIndex][1] = name
returnTable[returnIndex][2] = AtlasLootWishList["Own"][name][listIndex]["info"][1]
returnIndex = returnIndex + 1
break
end
end
end
end
end
else
for name,_ in pairs(AtlasLootWishList["Own"]) do
for listIndex,_ in pairs(AtlasLootWishList["Own"][name]) do
for itemIndex,_ in pairs(AtlasLootWishList["Own"][name][listIndex]) do
if AtlasLootWishList["Own"][name][listIndex][itemIndex][2] == itemID then
returnTable[returnIndex] = {}
returnTable[returnIndex][1] = name
returnTable[returnIndex][2] = AtlasLootWishList["Own"][name][listIndex]["info"][1]
returnIndex = returnIndex + 1
break
end
end
end
end
end
if type(returnTable) == "table" and #returnTable < 1 then
return nil
else
return returnTable
end
end
-- **********************************************************************
-- Options:
-- <local> ClearLines()
-- <local> AddWishListOptions(parrent,name,icon,xxx,tabname,tab2)
-- <local> AddTexture(par, num)
-- <local> TableGetSet(tab)
-- <local> GenerateTabNum(strg,sender)
-- AtlasLoot_RefreshWishlists()
-- AtlasLoot_CreateWishlistOptions()
-- **********************************************************************
local AddWishlist = "new"
local lastframewidht = 0
local showallwishlists,firstload = false,true
local xpos = 0
local ypos = 0
local lines = {}
local numlines = 0
local yoffset = -5
--[[
StaticPopupDialogs["ATLASLOOT_GET_WISHLIST"]
This is shown, if you want too delet a wishlist
]]
StaticPopupDialogs["ATLASLOOT_DELETE_WISHLIST"] = {
text = AL["Delete Wishlist"],
button1 = AL["Delete"],
button2 = AL["Cancel"],
OnShow = function()
this:SetFrameStrata("TOOLTIP");
end,
OnAccept = function()
table.remove(AtlasLootWishList[AtlasLootItemsFrame.refresh[1]], AtlasLootItemsFrame.refresh[3]);
AtlasLoot:ShowItemsFrame(AtlasLootItemsFrame.refresh[1], AtlasLootItemsFrame.refresh[2], 1);
AtlasLoot_WishListDrop:Close(1);
end,
OnCancel = function ()
AtlasLoot_WishListDrop:Close(1);
end,
timeout = 0,
whileDead = 1,
hideOnEscape = 1
};
--[[
StaticPopupDialogs["ATLASLOOT_GET_WISHLIST"]
This is shown, if someone send you a wishlist
]]
StaticPopupDialogs["ATLASLOOT_GET_WISHLIST"] = {
text = AL["%s sends you a Wishlist. Accept?"],
button1 = ACCEPT,
button2 = CANCEL,
OnShow = function()
this:SetFrameStrata("TOOLTIP");
end,
OnAccept = function(self,data)
ALModule:SendCommMessage(ShareWishlistPref, "AcceptWishlist", "WHISPER", data)
end,
OnCancel = function (self,data)
ALModule:SendCommMessage(ShareWishlistPref, "CancelWishlist", "WHISPER", data)
end,
timeout = 15,
whileDead = 1,
hideOnEscape = 1
};
--[[
<local> AddTexture(par, num)
Add a Icon too the AddFrame.
]]
local function AddTexture(par, num)
local numIcons = GetNumMacroIcons();
local iconTexture = GetMacroIconInfo(num);
local Button = CreateFrame("BUTTON", nil, par, "UIPanelButtonTemplate")
Button:SetHeight(20)
Button:SetWidth(20)
Button:SetPoint("TOPLEFT", par, "TOPLEFT", xpos, ypos)
Button:SetText("")
Button:SetScript("OnClick", function()
if AddWishlist == "new" then
AtlasLootPrevTexture:SetTexture(iconTexture)
curaddicon = iconTexture
elseif AddWishlist == "edit" then
AtlasLootPrevTexture:SetTexture(iconTexture)
curaddicon = iconTexture
end
end)
local Textur = Button:CreateTexture("textur","OVERLAY")
Textur:SetPoint("TOPLEFT", Button, "TOPLEFT")
Textur:SetTexture(iconTexture)
Textur:SetHeight(20)
Textur:SetWidth(20)
if xpos == 280 then
xpos = 0
ypos = ypos - 20
else
xpos = xpos + 20
end
end
--[[
TableGetSet(tab)
Sort and count number of wishlists
]]
local function TableGetSet(tab)
local save = {}
local num = 0
for k,v in pairs(tab) do
if type(v) == "table" then
num = num + 1
if not save[num] then save[num] = {} end
for i,j in pairs(tab[k]) do
if type(j) == "table" then
if not save[num][i] then save[num][i] = {} end
for b,c in pairs(tab[k][i]) do
save[num][i][b] = c
end
else
save[num][i] = j
end
end
else
save[k] = v
end
end
return save, num
end
--[[
function GenerateTabNum(strg,sender)
Sort and count number of wishlists, return number of next wishlist
]]
local function GenerateTabNum(strg,sender)
local num = 0
local save = {}
if strg == "own" then
save, num = TableGetSet(AtlasLootWishList["Own"][curplayername])
AtlasLootWishList["Own"][curplayername] = {}
AtlasLootWishList["Own"][curplayername] = TableGetSet(save)
num = num +1
elseif strg == "shared" then
if not AtlasLootWishList["Shared"][sender] then AtlasLootWishList["Shared"][sender] = {} end
save, num = TableGetSet(AtlasLootWishList["Shared"][sender])
AtlasLootWishList["Shared"][sender] = {}
AtlasLootWishList["Shared"][sender] = TableGetSet(save)
num = num +1
end
return num
end
--[[
AtlasLoot_CreateWishlistOptions()
Create the Options for the Wishlists(called on variables loadet)
]]
function AtlasLoot_CreateWishlistOptions()
if OptionsLoadet then return end
if not AtlasLootWishList["Own"] then AtlasLootWishList["Own"] = {} end
if not AtlasLootWishList["Shared"] then AtlasLootWishList["Shared"] = {} end
if not AtlasLootWishList["Options"] then AtlasLootWishList["Options"] = {} end
if not AtlasLootWishList["Options"][playerName] then AtlasLootWishList["Options"][playerName] = {} end
-- Add wishlistframe --
local WishListAddFrame = CreateFrame("FRAME","AtlasLootWishList_AddFrame",UIParent)
WishListAddFrame:Hide()
WishListAddFrame:SetFrameStrata("TOOLTIP")
WishListAddFrame:SetWidth(350)
WishListAddFrame:SetHeight(250)
WishListAddFrame:SetPoint("CENTER",UIParent)
WishListAddFrame:SetBackdrop({bgFile = "Interface/Tooltips/UI-Tooltip-Background",
edgeFile = "Interface/Tooltips/UI-Tooltip-Border",
tile = true, tileSize = 16, edgeSize = 16,
insets = { left = 4, right = 4, top = 4, bottom = 4 }});
WishListAddFrame:SetMovable(true)
WishListAddFrame:EnableMouse(true)
WishListAddFrame:RegisterForDrag("LeftButton")
WishListAddFrame:RegisterForDrag("LeftButton", "RightButton")
WishListAddFrame:SetScript("OnMouseDown", function()
this:StartMoving()
end)
WishListAddFrame:SetScript("OnMouseUp", WishListAddFrame.StopMovingOrSizing)
local Textur = WishListAddFrame:CreateTexture("AtlasLootPrevTexture","OVERLAY")
Textur:SetPoint("TOPRIGHT", WishListAddFrame, "TOPRIGHT", -40, -10)
Textur:SetTexture("Interface\\Icons\\INV_Misc_QuestionMark")
Textur:SetHeight(40)
Textur:SetWidth(40)
local Text = WishListAddFrame:CreateFontString("AtlasLootAddWishListName","OVERLAY","GameFontNormal")
Text:SetPoint("TOPLEFT", WishListAddFrame, "TOPLEFT", 10, -5)
Text:SetText(AL["Wishlist name:"]);
Text:SetHeight(20)
local Edit1 = CreateFrame("EditBox", "AtlasLootWishListNewName", WishListAddFrame, "InputBoxTemplate")
Edit1:SetPoint("LEFT", WishListAddFrame, "TOPLEFT", 15, -37)
Edit1:SetWidth(250)
Edit1:SetHeight(32)
Edit1:SetAutoFocus(false)
Edit1:SetTextInsets(0, 8, 0, 0)
Edit1:SetScript("OnEnterPressed", function()
this:ClearFocus();
local text = this:GetText();
curaddname = text
end)
Edit1:SetScript("OnShow", function()
this:SetText(curaddname);
end)
local CloseButton = CreateFrame("BUTTON",nil, WishListAddFrame, "UIPanelCloseButton")
CloseButton:SetPoint("TOPRIGHT", WishListAddFrame, "TOPRIGHT", -5, -5)
local WishListIconListSc = CreateFrame("ScrollFrame", "AtlasLootWishlistAddFrameIconList", WishListAddFrame, "UIPanelScrollFrameTemplate")
local WishlistIconListIn = CreateFrame("Frame", "AtlasLootWishlistAddFrameIconListInhalt", WishListIconListSc)
WishListIconListSc:SetScrollChild(WishlistIconListIn)
WishListIconListSc:SetPoint("TOPLEFT", WishListAddFrame, "TOPLEFT", 10, -60)
WishlistIconListIn:SetPoint("TOPLEFT", WishListIconListSc, "TOPLEFT", 0, 0)
WishListIconListSc:SetWidth(310)
WishListIconListSc:SetHeight(150)
WishlistIconListIn:SetWidth(310)
WishlistIconListIn:SetHeight(150)
WishListIconListSc:SetHorizontalScroll(-50)
WishListIconListSc:SetVerticalScroll(50)
WishListIconListSc:SetBackdrop({bgFile="Interface\\DialogFrame\\UI-DialogBox-Background", edgeFile="", tile = false, tileSize = 0, edgeSize = 0, insets = { left = 0, right = 0, top = 0, bottom = 0 }})
WishListIconListSc:SetScript("OnVerticalScroll", function() end)
WishListIconListSc:EnableMouse(true)
WishListIconListSc:SetVerticalScroll(0)
WishListIconListSc:SetHorizontalScroll(0)
local AddWishlistFr = CreateFrame("BUTTON", "AtlasLottAddEditWishList", WishListIconListSc, "UIPanelButtonTemplate")
AddWishlistFr:SetHeight(20)
AddWishlistFr:SetWidth(150)
AddWishlistFr:SetPoint("TOPLEFT", WishListIconListSc, "TOPLEFT",0,-1*(AtlasLootWishlistAddFrameIconList:GetHeight() + 5))
AddWishlistFr:SetText(AL["Add Wishlist"])
AddWishlistFr:SetScript("OnClick", function()
curaddname = AtlasLootWishListNewName:GetText()
if editName then
if curaddicon == "" then
curaddicon = "Interface\\Icons\\INV_Misc_QuestionMark"
elseif curaddicon ~= "" then
AtlasLootWishList[AtlasLootItemsFrame.refresh[1]][AtlasLootItemsFrame.refresh[3]].Name = curaddname;
AtlasLootWishList[AtlasLootItemsFrame.refresh[1]][AtlasLootItemsFrame.refresh[3]].Icon = curaddicon;
WishListAddFrame:Hide();
AtlasLoot:ShowItemsFrame(AtlasLootItemsFrame.refresh[1], AtlasLootItemsFrame.refresh[2], AtlasLootItemsFrame.refresh[3]);
end
else
if curaddicon == "" then
curaddicon = "Interface\\Icons\\INV_Misc_QuestionMark"
elseif curaddicon ~= "" then
table.insert( AtlasLootWishList["Own"],{Name = curaddname, Back = true, Icon = curaddicon})
WishListAddFrame:Hide();
if AtlasLootItemsFrame.refresh[2] == "AtlasLootWishList" then
AtlasLoot:ShowItemsFrame(AtlasLootItemsFrame.refresh[1], AtlasLootItemsFrame.refresh[2], AtlasLootItemsFrame.refresh[3]);
end
end
end
editName = false;
curaddicon = "";
curaddname = "";
end)
local AddWishlistIcons = CreateFrame("BUTTON", nil, WishListIconListSc, "UIPanelButtonTemplate")
AddWishlistIcons:SetHeight(20)
AddWishlistIcons:SetWidth(150)
AddWishlistIcons:SetPoint("TOPLEFT", WishListIconListSc, "TOPLEFT",160,-1*(AtlasLootWishlistAddFrameIconList:GetHeight() + 5))
AddWishlistIcons:SetText(AL["Show More Icons"])
AddWishlistIcons:SetScript("OnClick", function()
for i=211,GetNumMacroIcons() do
AddTexture(WishlistIconListIn, i)
end
end)
WishListAddFrame:SetScript("OnShow", function()
if firstload then
for i=1,210 do
AddTexture(WishlistIconListIn, i)
end
firstload = false
end
if curaddicon == "" then
AtlasLootPrevTexture:SetTexture("Interface\\Icons\\INV_Misc_QuestionMark")
else
AtlasLootPrevTexture:SetTexture(curaddicon)
end
end)
-- Add wishlistframe --
local framewidht = InterfaceOptionsFramePanelContainer:GetWidth()
if AtlasLootWishList["Options"][playerName]["Mark"] ~= true and AtlasLootWishList["Options"][playerName]["Mark"] ~= false then AtlasLootWishList["Options"][playerName]["Mark"] = true end
if not AtlasLootWishList["Options"][playerName]["markInTable"] then AtlasLootWishList["Options"][playerName]["markInTable"] = "own" end
if AtlasLootWishList["Options"][playerName]["AllowShareWishlist"] ~= true and AtlasLootWishList["Options"][playerName]["AllowShareWishlist"] ~= false then AtlasLootWishList["Options"][playerName]["AllowShareWishlist"] = true end
if AtlasLootWishList["Options"][playerName]["AllowShareWishlistInCombat"] ~= true and AtlasLootWishList["Options"][playerName]["AllowShareWishlistInCombat"] ~= false then AtlasLootWishList["Options"][playerName]["AllowShareWishlistInCombat"] = true end
if AtlasLootWishList["Options"][playerName]["UseDefaultWishlist"] ~= true and AtlasLootWishList["Options"][playerName]["UseDefaultWishlist"] ~= false then AtlasLootWishList["Options"][playerName]["UseDefaultWishlist"] = false end
local WishlistOptionsFrame = CreateFrame("FRAME", nil)
WishlistOptionsFrame.name = AL["Wishlist"]
WishlistOptionsFrame.parent = AL["AtlasLoot"]
local WishListMark = CreateFrame("CheckButton", "AtlasLootOptionsWishListMark", WishlistOptionsFrame, "OptionsCheckButtonTemplate")
WishListMark:SetPoint("LEFT", WishlistOptionsFrame, "TOPLEFT", 5, -15)
WishListMark:SetWidth(25)
WishListMark:SetHeight(25)
WishListMark:SetScript("OnShow", function()
_G[this:GetName().."Text"]:SetText(AL["Mark items in loot tables"]);
if AtlasLootWishList["Options"][playerName]["Mark"] then
this:SetChecked(1);
else
this:SetChecked(nil);
AtlasLootOptionsWishListMarkOwn:Disable();
AtlasLootOptionsWishListMarkAll:Disable();
end
end)
WishListMark:SetScript("OnClick", function()
if AtlasLootWishList["Options"][playerName]["Mark"] then
AtlasLootWishList["Options"][playerName]["Mark"] = false;
AtlasLootOptionsWishListMarkOwn:Disable();
AtlasLootOptionsWishListMarkAll:Disable();
else
AtlasLootWishList["Options"][playerName]["Mark"] = true;
AtlasLootOptionsWishListMarkOwn:Enable();
AtlasLootOptionsWishListMarkAll:Enable();
end
end)
local WishListMarkOwn = CreateFrame("CheckButton", "AtlasLootOptionsWishListMarkOwn", WishlistOptionsFrame, "OptionsCheckButtonTemplate")
WishListMarkOwn:SetPoint("LEFT", WishlistOptionsFrame, "TOPLEFT", 5, -35)
WishListMarkOwn:SetWidth(25)
WishListMarkOwn:SetHeight(25)
WishListMarkOwn:SetScript("OnShow", function()
_G[this:GetName().."Text"]:SetText(AL["Mark items from own Wishlist"]);
if AtlasLootWishList["Options"][playerName]["markInTable"] == "own" then
this:SetChecked(1);
else
this:SetChecked(nil);
end
end)
WishListMarkOwn:SetScript("OnClick", function()
if AtlasLootWishList["Options"][playerName]["markInTable"] == "own" then
AtlasLootWishList["Options"][playerName]["markInTable"] = "all";
else
AtlasLootWishList["Options"][playerName]["markInTable"] = "own";
end
WishlistOptionsFrame:Hide()
WishlistOptionsFrame:Show()
end)
local WishListMarkAll = CreateFrame("CheckButton", "AtlasLootOptionsWishListMarkAll", WishlistOptionsFrame, "OptionsCheckButtonTemplate")
WishListMarkAll:SetPoint("LEFT", WishlistOptionsFrame, "TOPLEFT", 5, -55)
WishListMarkAll:SetWidth(25)
WishListMarkAll:SetHeight(25)
WishListMarkAll:SetScript("OnShow", function()
_G[this:GetName().."Text"]:SetText(AL["Mark items from all Wishlists"]);
if AtlasLootWishList["Options"][playerName]["markInTable"] == "all" then
this:SetChecked(1);
else
this:SetChecked(nil);
end
end)
WishListMarkAll:SetScript("OnClick", function()
if AtlasLootWishList["Options"][playerName]["markInTable"] == "own" then
AtlasLootWishList["Options"][playerName]["markInTable"] = "all";
else
AtlasLootWishList["Options"][playerName]["markInTable"] = "own";
end
WishlistOptionsFrame:Hide()
WishlistOptionsFrame:Show()
end)
local WishListShare = CreateFrame("CheckButton", "AtlasLootOptionsWishListShare", WishlistOptionsFrame, "OptionsCheckButtonTemplate")
WishListShare:SetPoint("LEFT", WishlistOptionsFrame, "TOPLEFT", 5, -75)
WishListShare:SetWidth(25)
WishListShare:SetHeight(25)
WishListShare:SetScript("OnShow", function()
_G[this:GetName().."Text"]:SetText(AL["Enable Wishlist Sharing"]);
if AtlasLootWishList["Options"][playerName]["AllowShareWishlist"] then
this:SetChecked(1);
else
this:SetChecked(nil);
end
end)
WishListShare:SetScript("OnClick", function()
if AtlasLootWishList["Options"][playerName]["AllowShareWishlist"] then
AtlasLootWishList["Options"][playerName]["AllowShareWishlist"] = false;
AtlasLootOptionsWishListShareInCombat:Disable();
else
AtlasLootWishList["Options"][playerName]["AllowShareWishlist"] = true;
AtlasLootOptionsWishListShareInCombat:Enable();
end
end)
local WishListShareInCombat = CreateFrame("CheckButton", "AtlasLootOptionsWishListShareInCombat", WishlistOptionsFrame, "OptionsCheckButtonTemplate")
WishListShareInCombat:SetPoint("LEFT", WishlistOptionsFrame, "TOPLEFT", 5, -95)
WishListShareInCombat:SetWidth(25)
WishListShareInCombat:SetHeight(25)
WishListShareInCombat:SetScript("OnShow", function()
_G[this:GetName().."Text"]:SetText(AL["Auto reject in combat"]);
if AtlasLootWishList["Options"][playerName]["AllowShareWishlistInCombat"] then
this:SetChecked(1);
else
this:SetChecked(nil);
end
end)
WishListShareInCombat:SetScript("OnClick", function()
if AtlasLootWishList["Options"][playerName]["AllowShareWishlistInCombat"] then
AtlasLootWishList["Options"][playerName]["AllowShareWishlistInCombat"] = false;
else
AtlasLootWishList["Options"][playerName]["AllowShareWishlistInCombat"] = true;
end
end)
local WishListAutoAdd = CreateFrame("CheckButton", "AtlasLootOptionsWishListAutoAdd", WishlistOptionsFrame, "OptionsCheckButtonTemplate")
WishListAutoAdd:SetPoint("LEFT", WishlistOptionsFrame, "TOPLEFT", 5, -115)
WishListAutoAdd:SetWidth(25)
WishListAutoAdd:SetHeight(25)
WishListAutoAdd:SetScript("OnShow", function()
_G[this:GetName().."Text"]:SetText(AL["Always use default Wishlist"]);
if AtlasLootWishList["Options"][playerName]["UseDefaultWishlist"] == true then
this:SetChecked(1);
else
this:SetChecked(nil);
end
end)
WishListAutoAdd:SetScript("OnClick", function()
if AtlasLootWishList["Options"][playerName]["UseDefaultWishlist"] then
AtlasLootWishList["Options"][playerName]["UseDefaultWishlist"] = false;
else
AtlasLootWishList["Options"][playerName]["UseDefaultWishlist"] = true;
end
end)
InterfaceOptions_AddCategory(WishlistOptionsFrame)
OptionsLoadet = true
end
-- **********************************************************************
-- WishListShare:
-- <local>SpamProtect(name)
-- ALModule:OnEnable()
-- AtlasLoot_SendWishList(wltab,sendname)
-- AtlasLoot_GetWishList(wlstrg,sendername)
-- ALModule:OnCommReceived(prefix, message, distribution, sender)
-- **********************************************************************
local SpamFilter = {}
local SpamFilterTime = 10
local xwltab = {}
--[[
<local> SpamProtect(name)
Check Spamfilter table
]]
local function SpamProtect(name)
if not name then return true end
if SpamFilter[string.lower(name)] then
if GetTime() - SpamFilter[string.lower(name)] > SpamFilterTime then
SpamFilter[string.lower(name)] = nil
return true
else
return false
end
else
return true
end
end
--[[
ALModule:OnEnable()
Register the AceComm channel
]]
function ALModule:OnEnable()
self:RegisterComm(ShareWishlistPref)
end
--[[
AtlasLoot_SendWishList(wltab,sendname)
Send wishlist request
Seralize and send wishlist
]]
function AtlasLoot_SendWishList(wltab,sendname)
if string.lower(sendname) == string.lower(playerName) then return end
if not xwltab[sendname] then
xwltab[sendname] = wltab
ALModule:SendCommMessage(ShareWishlistPref, "WishlistRequest", "WHISPER", sendname)
else
local SplitTable = ALModule:Serialize(wltab)
ALModule:SendCommMessage(ShareWishlistPref, SplitTable, "WHISPER", sendname)
end
end
--[[
AtlasLoot_GetWishList(wlstrg,sendername)
Get the Wishlist, Deserialize it and save it in the savedvariables table
]]
function AtlasLoot_GetWishList(wlstrg,sendername)
if not wlstrg or not sendername then return end
if string.lower(sendername) == string.lower(playerName) then return end
local success, wltab = ALModule:Deserialize(wlstrg)
if success then
if wltab["info"] then
local num = GenerateTabNum("shared",sendername)
if not AtlasLootWishList["Shared"][sendername] then AtlasLootWishList["Shared"][sendername] = {} end
AtlasLootWishList["Shared"][sendername][num] = {}
for k,v in pairs(wltab) do
if type(v) == "table" then
for i,j in pairs(wltab[k]) do
if not AtlasLootWishList["Shared"][sendername][num][k] then AtlasLootWishList["Shared"][sendername][num][k] = {} end
AtlasLootWishList["Shared"][sendername][num][k][i] = j
end
else
AtlasLootWishList["Shared"][sendername][num][k] = v
end
end
end
end
end
--[[
ALModule:OnCommReceived(prefix, message, distribution, sender)
Incomming messages from AceComm
]]
function ALModule:OnCommReceived(prefix, message, distribution, sender)
if prefix ~= ShareWishlistPref then return end
if message == "SpamProtect" then
--local _,_,timeleft = string.find( 10-(GetTime() - SpamFilter[string.lower(sender)]), "(%d+)%.")
--DEFAULT_CHAT_FRAME:AddMessage(BLUE..AL["AtlasLoot"]..": "..RED..AL["You must wait "]..WHITE..timeleft..RED..AL[" seconds before you can send a new Wishlist too "]..WHITE..sender..RED..".");
elseif message == "FinishSend" then
SpamFilter[string.lower(sender)] = GetTime()
elseif message == "AcceptWishlist" then
AtlasLoot_SendWishList(xwltab[sender],sender)
xwltab[sender] = nil
elseif message == "WishlistRequest" then
if AtlasLootWishList["Options"][playerName]["AllowShareWishlist"] == true then
if AtlasLootWishList["Options"][playerName]["AllowShareWishlistInCombat"] == true then
if UnitAffectingCombat("player") then
ALModule:SendCommMessage(ShareWishlistPref, "CancelWishlist", "WHISPER", sender)
DEFAULT_CHAT_FRAME:AddMessage(BLUE..AL["AtlasLoot"]..": "..WHITE..sender..RED..AL[" tried to send you a Wishlist. Rejected because you are in combat."]);
else
local dialog = StaticPopup_Show("ATLASLOOT_GET_WISHLIST", sender);
if ( dialog ) then
dialog.data = sender;
end
end
else
local dialog = StaticPopup_Show("ATLASLOOT_GET_WISHLIST", sender);
if ( dialog ) then
dialog.data = sender;
end
end
else
ALModule:SendCommMessage(ShareWishlistPref, "CancelWishlist", "WHISPER", sender)
end
elseif message == "CancelWishlist" then
DEFAULT_CHAT_FRAME:AddMessage(BLUE..AL["AtlasLoot"]..": "..WHITE..sender..RED..AL[" rejects your Wishlist."]);
xwltab[sender] = nil
else
--if SpamProtect(sender) then
SpamFilter[string.lower(sender)] = GetTime()
AtlasLoot_GetWishList(message,sender)
ALModule:SendCommMessage(ShareWishlistPref, "FinishSend", "WHISPER", sender)
--else
-- ALModule:SendCommMessage(ShareWishlistPref, "SpamProtect", "WHISPER", sender)
--end
end
end
--[[
StaticPopupDialogs["ATLASLOOT_GET_WISHLIST"]
This is shown, if you want too share a wishlist
]]
StaticPopupDialogs["ATLASLOOT_SEND_WISHLIST"] = {
text = AL["Send Wishlist (%s) to"],
button1 = AL["Send"],
button2 = AL["Cancel"],
OnShow = function()
this:SetFrameStrata("TOOLTIP");
end,
OnAccept = function()
local name = _G[this:GetParent():GetName().."EditBox"]:GetText()
if string.lower(name) == string.lower(playerName) then
DEFAULT_CHAT_FRAME:AddMessage(BLUE..AL["AtlasLoot"]..": "..RED..AL["You can't send Wishlists to yourself."]);
curtabname = ""
curplayername = ""
elseif name == "" then
else
if SpamProtect(string.lower(name)) then
AtlasLoot_SendWishList(AtlasLootWishList["Own"][curplayername][curtabname],name)
curtabname = ""
curplayername = ""
else
local _,_,timeleft = string.find( 10-(GetTime() - SpamFilter[string.lower(name)]), "(%d+)%.")
DEFAULT_CHAT_FRAME:AddMessage(BLUE..AL["AtlasLoot"]..": "..RED..AL["You must wait "]..WHITE..timeleft..RED..AL[" seconds before you can send a new Wishlist to "]..WHITE..name..RED..".");
end
end
end,
OnCancel = function ()
curtabname = ""
curplayername = ""
end,
hasEditBox = 1,
timeout = 0,
whileDead = 1,
hideOnEscape = 1
};
View Git Blame Copy Permalink