slow buy outs

sed- · January 9, 2016

is there any way to speed up buying out items? lot of time items get posted in 100 stacks of 1 and takes forever to buy them out and normally misses a lot.

Droidz · January 9, 2016

Hello,

No sorry, you cannot speed up buying items (WRobot use the wow interface to buying items (click on buttons... like an human, I need to add wait times)). If you have big wow latency you can lower "min/max latency" option in advanced general settings.

sumodima · January 9, 2016

You could use LUA same as Auctioneer does with its easy buy out - Shift+Click

Spoiler

--[[
   Auctioneer - EasyBuyout Utility Module
   Version: 1.2.5 (GhostfromTexas)
   Revision: $Id: EasyBuyout.lua 5507 2014-10-23 16:08:21Z brykrys $
   URL: http://auctioneeraddon.com/

   This Auctioneer module allows for the ability to purchase items from
   the Browse tab with a single click. It also allows for canceling your
   own auctions from the Auctions tab with a single click.

   License:
       This program is free software; you can redistribute it and/or
       modify it under the terms of the GNU General Public License
       as published by the Free Software Foundation; either version 2
       of the License, or (at your option) any later version.

       This program is distributed in the hope that it will be useful,
       but WITHOUT ANY WARRANTY; without even the implied warranty of
       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
       GNU General Public License for more details.

       You should have received a copy of the GNU General Public License
       along with this program(see GPL.txt); if not, write to the Free Software
       Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.

   Note:
       This AddOn's source code is specifically designed to work with
       World of Warcraft's interpreted AddOn system.
       You have an implicit license to use this AddOn with these facilities
       since that is its designated purpose as per:
       http://www.fsf.org/licensing/licenses/gpl-faq.html#InterpreterIncompat
--]]
if not AucAdvanced then return end

local libType, libName = "Util", "EasyBuyout"
local lib,parent,private = AucAdvanced.NewModule(libType, libName)
if not lib then return end
local print,decode,_,_,replicate,empty,get,set,default,debugPrint,fill = AucAdvanced.GetModuleLocals()
local addShift;
local CompactUImode = false
local orig_AB_OC;
local ebModifier = false

lib.Processors = {}
function lib.Processors.listupdate(callbackType, ...)
private.EasyCancelMain()
private.EasyBuyout()
end

function lib.Processors.auctionui(callbackType, ...)
   private.AHLoaded()
   private.EasyBuyout()
   private.EasyCancelMain()
end

function lib.Processors.config(callbackType, ...)
private.SetupConfigGui(...)
end

function lib.Processors.configchanged(callbackType, ...)
private.EasyBuyout()
private.EasyCancelMain()
end

function lib.OnLoad()
print("AucAdvanced: {{"..libType..":"..libName.."}} loaded!")

-- Silent Mode Option
AucAdvanced.Settings.SetDefault("util.EasyBuyout.silentmode", false);

   -- EasyBuyout Default Settings
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.active", false)
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.modifier.active", true)
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.modifier.select", 0)

   -- EasyCancel Default Settings
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.EC.active", false)
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.EC.modifier.active", true)
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.EC.modifier.select", 0)

-- EasyBid Default Settings
AucAdvanced.Settings.SetDefault("util.EasyBuyout.EBid.active", false)

   -- EasyGoldLimit Default Settings
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.EGL.EBuy.active", true)
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.EGL.EBuy.limit", 100000)
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.EGL.EBid.active", true)
   AucAdvanced.Settings.SetDefault("util.EasyBuyout.EGL.EBid.limit", 50000)

end

--[[ Local functions ]]--
function private.AHLoaded()
   if AucAdvanced.Modules.Util.CompactUI and AucAdvanced.Modules.Util.CompactUI.Private.ButtonClick and get("util.compactui.activated") then
       orig_AB_OC = AucAdvanced.Modules.Util.CompactUI.Private.ButtonClick
       AucAdvanced.Modules.Util.CompactUI.Private.ButtonClick = private.BrowseButton_OnClick
       for i = 1, NUM_BROWSE_TO_DISPLAY do -- should be 14 buttons
           local button = _G["BrowseButton"..i]
           button:SetScript("OnClick", private.BrowseButton_OnClick)
       end
       CompactUImode = true
   else
       assert(BrowseButton_OnClick, "BrowseButton_OnClick doesn't exist yet")
       orig_AB_OC = function() end -- fake function or it will error when you do return orig_AB_OC(...)    since this is not needed or created with the method we used
       CompactUImode = false
       --go though the AH buttons and hook each ones script - Added by Kandoko on May 14, 2010 to fix AUEB-17
       for i = 1, 8 do
           local button = _G["BrowseButton"..i] --This is the same as the global variable named BrowseButton1, BrowseButton2 ..etc
               button:HookScript("OnClick", function(self, button, ...) --HookScript is a secure script hook function provided by blizzard
                       private.BrowseButton_OnClick(self, button, ...)
               end)
       end
   end
end

function private.SetupConfigGui(gui)
   -- The defaults for the following settings are set in the lib.OnLoad function
   local id = gui:AddTab(libName)
   gui:MakeScrollable(id)

   -- EasyBuyout
   gui:AddControl(id, "Header",     0,    "EasyBuyout Options")
   gui:AddControl(id, "Subhead",          0,    "Simply right-click an auction to buy it out with no confirmation box.")
    gui:AddControl(id, "Checkbox",   0, 1, "util.EasyBuyout.active", "Enable EasyBuyout")
    gui:AddTip(id, "Ticking this box will enable or disable EasyBuyout")
    gui:AddControl(id, "Checkbox",   0, 1, "util.EasyBuyout.modifier.active", "Enable key modifier")
   gui:AddTip (id, "Ticking this box will add a key modifier to EasyBuyout")
    gui:AddControl(id, "Selectbox", 0, 1, {
       {0, "Shift"},
       {1, "Alt"},
       {2, "Shift+Alt"}
   }, "util.EasyBuyout.modifier.select")
    gui:AddTip(id, "Select your key modifier for EasyBuyout")

    -- EasyCancel
   gui:AddControl(id, "Note",       0, 1, nil, nil, " ")
   gui:AddControl(id, "Header",       0,       "EasyCancel Options")
   gui:AddControl(id, "Subhead",           0,   "Simply right-click an auction to cancel it out with no confirmation box.")
   gui:AddControl(id, "Checkbox",   0, 1, "util.EasyBuyout.EC.active", "Enable EasyCancel")
   gui:AddTip(id, "Ticking this box will enable or disable EasyCancel")
   gui:AddControl(id, "Checkbox",   0, 1, "util.EasyBuyout.EC.modifier.active", "Enable key modifier")
   gui:AddTip (id, "Ticking this box will add a key modifier to EasyCancel")
    gui:AddControl(id, "Selectbox", 0, 1, {
       {0, "Shift"},
       {1, "Alt"},
       {2, "Shift+Alt"}
   }, "util.EasyBuyout.EC.modifier.select")
    gui:AddTip(id, "Select your key modifier for EasyCancel")

   -- EasyBid
   gui:AddControl(id, "Note",       0, 1, nil, nil, " ")
   gui:AddControl(id, "Header",       0,       "EasyBid Options")
   gui:AddControl(id, "Subhead",           0,   "Simply double-click an auction to bid minimum on it.")
   gui:AddControl(id, "Checkbox",   0, 1, "util.EasyBuyout.EBid.active", "Enable EasyBid")
   gui:AddTip(id, "Toggle this box to enable or disable EasyBid")

   -- EasyGoldLimit
   gui:AddControl(id, "Note",       0, 1, nil, nil, " ")
   gui:AddControl(id, "Header", 0, "EasyGoldLimit Options")
   gui:AddControl(id, "Subhead", 0, "Set a limit on EasyBid & EasyBuyout to prevent accidental purchases of expensive auctions.")
   gui:AddControl(id, "Checkbox", 0,1, "util.EasyBuyout.EGL.EBuy.active", "Enable EasyGoldLimit for EasyBuyout")
   gui:AddTip(id, "Ticking this box will enable or disable EasyGoldLimit for EasyBuyout")
   gui:AddControl(id, "MoneyFramePinned", 0, 1, "util.EasyBuyout.EGL.EBuy.limit", 0, AucAdvanced.Const.MAXBIDPRICE, "Set EasyBuyout Limit")
   gui:AddTip(id, "Use this box to set the max amount of gold you want to spend when using EasyBuyout")
   gui:AddControl(id, "Note",       0, 1, nil, nil, " ")
   gui:AddControl(id, "Checkbox", 0,1, "util.EasyBuyout.EGL.EBid.active", "Enable EasyGoldLimit for EasyBid")
   gui:AddTip(id, "Ticking this box will enable or disable EasyGoldLimit for EasyBid")
   gui:AddControl(id, "MoneyFramePinned", 0, 1, "util.EasyBuyout.EGL.EBid.limit", 0, AucAdvanced.Const.MAXBIDPRICE, "Set EasyBid Limit")
   gui:AddTip(id, "Use this box to set the max amount of gold you want to spend when using EasyBid")

   -- Silent Mode
   gui:AddControl(id, "Header",       0,       "Other Options")
   gui:AddControl(id, "Subhead", 0, "This section lists other options for this module.")
   gui:AddControl(id, "Checkbox",   0, 1, "util.EasyBuyout.silentmode", "Enable Silent Mode");

   -- help sections
    gui:AddHelp(id, "What is EasyBuyout?",
        "What is EasyBuyout?",
        "EasyBuyout makes it easier to buy auctions in mass, faster! You simply right-click (or 'modifier'+right-click depending on your options) to buyout an auction with no confirmation box")

   gui:AddHelp(id, "What is EasyCancel?",
       "What is EasyCancel?",
       "Take what EasyBuyout does and apply it to canceling auctions! All you do is right-click (or 'modifier'+right-click) to cancel an auction you have posted up with no conformation box")

   gui:AddHelp(id, "What is EasyBid?",
       "What is EasyBid?",
       "This part of the EasyBuyout utility does what the name implies, it allows you to double click (or 'modifier'+double-click) to bid minimal on an auction! !!NOTE!! EasyBid can not use key modifiers because of the use of \"left-click\". It conflicts with other parts of Auctioneer.")

   gui:AddHelp(id, "What is EasyGoldLimit?",
       "What is EasyGoldLimit",
       "This does exactly what the name implies, it places a limit on the amount of gold that will be allowed to be used when bidding or buying an auction. It helps prevent spending more than intended on an auction.")

   gui:AddHelp(id, "What is Silent Mode?",
       "What is Silent Mode?",
       "Enabling Silent Mode will disable all text output to the chat frame from this module, whether it's apart of EasyBuyout, EasyBid, EasyCancel, or EasyGoldLimit")

end

function private.BrowseButton_OnClick(...)
   local self, arg1 = ...
    -- check for EB enabled
    if not get("util.EasyBuyout.active") then
        return orig_AB_OC(...)
    end

     -- check and assign modifier
    if get("util.EasyBuyout.modifier.active") then
       local selection = get("util.EasyBuyout.modifier.select");

        if (selection == 0) and IsShiftKeyDown() then
            ebModifier = true;
        elseif (selection == 1) and IsAltKeyDown() then
            ebModifier = true;
        elseif (selection == 2) and IsShiftKeyDown() and IsAltKeyDown() then
            ebModifier = true;
        else
           if(arg1 == "RightButton") then -- only warn of modifier key if the right mouse button is set
               private.EBMessage("|cffff5511EasyBuyout - Modifier Key " .. private.EBConvertModifierToText(selection) .. " is set, but not pressed!");
           end

            return orig_AB_OC(...)
        end
    end

if (arg1 == "RightButton") then
local button = self

       local id
       if CompactUImode then
           id = button.id
       else
           id = button:GetID() + FauxScrollFrame_GetOffset(BrowseScrollFrame)
       end
       local link = GetAuctionItemLink("list", id)
       if link then
            local _,_,count = GetAuctionItemInfo("list", id)
            private.EBMessage("Rightclick - buying auction of " .. (count or "?") .. "x" .. link)
        else
            private.EBMessage("Rightclick - not finding anything to buy. If you are mass clicking - try going from the bottom up!")
            return
        end
        SetSelectedAuctionItem("list", id);
       private.EasyBuyoutAuction();
    else
        return orig_AB_OC(...)
    end
end

function private.EasyBuyout()
if not AuctionFrame then return end

    if get("util.EasyBuyout.shift.active") then
        addShift = true;
    else
        addShift = false;
    end

    if (get("util.EasyBuyout.active") or get("util.EasyBuyout.EBid.active")) then
       for i=1,50 do
            local button = _G["BrowseButton"..i]
            if not button then break end
            button:RegisterForClicks("LeftButtonUp", "RightButtonUp")
            _G["BrowseButton"..i]:RegisterForClicks("LeftButtonUp", "RightButtonUp")
           button:SetScript("ondoubleclick", private.NewOnDoubleClick)
        end
    else
       return;
    end
end

function private.EasyBuyoutAuction()
local EasyBuyoutIndex = GetSelectedAuctionItem("list");
local EasyBuyoutPrice = select(10, GetAuctionItemInfo("list", EasyBuyoutIndex))

   -- Easy Gold Limit for EasyBuyout
   if get("util.EasyBuyout.EGL.EBuy.active") then
       if EasyBuyoutPrice > get("util.EasyBuyout.EGL.EBuy.limit") then
           private.EBMessage("|cffCC1100EasyGoldLimit - Auction is over your set limit for EasyBuyout!")
           return;
       end
   end

   -- ready to buy auction
    PlaceAuctionBid("list", EasyBuyoutIndex, EasyBuyoutPrice)
    CloseAuctionStaticPopups();
end

--[[ EasyCancel Function - Easy Auction Cancel is a lot simpler to incorporate everything in it's own section
rather than incorporating it into everything else coded before this comment. EasyCancel does not need to be
tested for compactUI like EasyBuyout does
--]]

local function OrigAuctionOnClick(self, ...)
   if ( IsModifiedClick() ) then
       HandleModifiedItemClick(GetAuctionItemLink("owner", self:GetParent():GetID() + FauxScrollFrame_GetOffset(AuctionsScrollFrame)));
   else
       AuctionsButton_OnClick(self, ...);
   end
end
-- handler for modifiers
local function NewOnClick(self, button) -- used for EasyCancel
   local active = get("util.EasyBuyout.EC.active")
   local modified = get("util.EasyBuyout.EC.modifier.active")
   local modselect = get("util.EasyBuyout.EC.modifier.select")

   if active and button == "RightButton" and
           (
           (not modified)
           or (modified and modselect == 0 and IsShiftKeyDown())
           or (modified and modselect == 1 and IsAltKeyDown())
           or (modified and modselect == 2 and IsAltKeyDown() and IsShiftKeyDown())
           )   then
       private.EasyCancel(self, button)
   else
       if active and button == "RightButton" then
           private.EBMessage("|cffff5511EasyCancel - Modifier Key " .. private.EBConvertModifierToText(modselect) .. " is set, but not pressed!");
       end
       OrigAuctionOnClick(self, button)
   end

end

function private.EasyCancelMain()

   for i=1,199 do
       local button = _G["AuctionsButton"..i]
       if not button then break end
       button:RegisterForClicks("LeftButtonUp", "RightButtonUp")
       _G["AuctionsButton"..i.."Item"]:RegisterForClicks("LeftButtonUp", "RightButtonUp")
       button:SetScript("onclick", NewOnClick)
   end
end

function private.EasyCancel(self, button)

   local link = GetAuctionItemLink("owner", self:GetID() + FauxScrollFrame_GetOffset(AuctionsScrollFrame))
   if link then
       local _,_,count = GetAuctionItemInfo("owner", self:GetID() + FauxScrollFrame_GetOffset(AuctionsScrollFrame))
       private.EBMessage("Rightclick - cancelling auction of " .. (count or "?") .. "x" .. link)
   else
       return private.EBMessage("Rightclick - not finding anything to cancel. If you are mass clicking - try going from the bottom up!")
   end

   SetSelectedAuctionItem("owner", self:GetID() + FauxScrollFrame_GetOffset(AuctionsScrollFrame));
   CancelAuction(GetSelectedAuctionItem("owner"))
   CloseAuctionStaticPopups();
   AuctionFrameBid_Update();
end

-- EasyBid Function - This section listed below is for EasyBid: the utility that allows users to easily bid on an item simply by double clicking on it.
function private.NewOnDoubleClick(self, button)
   -- check for EBid enabled
    if not get("util.EasyBuyout.EBid.active") then
        return
    end

   local id
   if CompactUImode then
       id = self.id
   else
       id = self:GetID() + FauxScrollFrame_GetOffset(BrowseScrollFrame)
   end
   local link = GetAuctionItemLink("list", id)
   if button == 'LeftButton' then
       if (select(12, GetAuctionItemInfo("list", id))) then
           private.EBMessage("You are already the highest bidder on this item!")
           return
       end
       if link then
           local _,_,count = GetAuctionItemInfo("list", id)
           private.EBMessage("Doubleclick - bidding on auction of " .. (count or "?") .. "x" .. link)
       else
           private.EBMessage("Doubleclick - not finding anything to bid on. If you are mass clicking - try going from the bottom up!")
           return
       end
   SetSelectedAuctionItem("list", self:GetID() + FauxScrollFrame_GetOffset(BrowseScrollFrame));
   private.EasyBidAuction(id);
   CloseAuctionStaticPopups();
   end
end

-- Function to place a bid on a specific auction using EasyBid
function private.EasyBidAuction(getID)
   local _, _, _, _, _, _, _, minBid, minIncrement, buyoutPrice, bidAmount = GetAuctionItemInfo("list", getID)
    local EasyBidPrice
   if bidAmount > 0 then
       EasyBidPrice = bidAmount + minIncrement
       if buyoutPrice > 0 and EasyBidPrice > buyoutPrice then
           EasyBidPrice = buyoutPrice
       end
   elseif minBid > 0 then
       EasyBidPrice = minBid
   else
       EasyBidPrice = 1
   end

   -- Easy Gold Limit for EasyBid
   if get("util.EasyBuyout.EGL.EBid.active") then
       if EasyBidPrice > get("util.EasyBuyout.EGL.EBid.limit") then
           private.EBMessage("|cffCC1100EasyGoldLimit - Auction is over your set limit for EasyBid!")
           return;
       end
   end

PlaceAuctionBid("list", getID, EasyBidPrice)
CloseAuctionStaticPopups();
end

-- function added in AUEB-18 to convert a selction to text for chatframe output
function private.EBConvertModifierToText(selection)
   if selection == 0 then return "<Shift>" end
   if selection == 1 then return "<Alt>" end
   if selection == 2 then return "<Shift + Alt>" end
end

-- function added in AUEB-19 - Central location, specifically designed to handle the silent mode option
function private.EBMessage(messageString)
   if get("util.EasyBuyout.silentmode") then return end
   -- else
   print(messageString)
end

AucAdvanced.RegisterRevision("$URL: http://svn.norganna.org/auctioneer/branches/5.21e/Auc-Util-EasyBuyout/EasyBuyout.lua $", "$Rev: 5507 $")

sed- · January 10, 2016

ty for your response :)

Droidz · January 10, 2016

I have noted of this suggestion, I'll look if I can speed up buying items (but not immediately, I have a lot of stuff to do before). I comeback here later.

Sign In

slow buy outs

Recommended Posts

sed- 0

Link to comment

Share on other sites

Droidz 2742

Link to comment

Share on other sites

sumodima 12

Link to comment

Share on other sites

sed- 0

Link to comment

Share on other sites

Droidz 2742

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Download WRobot

Store

Activity