Thread Rating:
  • 12 Vote(s) - 2.83 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Buy House Assister
#21
its not difficult read the first threath. Anyways starting to doubt it works, I lost out on 13 houses so far... even when there was just 1 other player.
I mean it gives the message; "this plot of land not yet ready to purchase". But I never win, making me think there is an extra confirmation box or similar that needs to be pressed when its available.
Reply
#22
I can confirm it works (at least for free company house acquisition) since I was able to acquire one earlier today. I had set my delay to 1200, and also had Assist Mode turn on with Quest Helpers enabled to autoconfirm any additional dialog.
Reply
#23
is there any way to add small randomness to the intervals between clicks/attempts?
worried about leaving it on for long hours without any randomness.
Reply
#24
I set it up as instructed in the first page but im having trouble figuring out how to use it in game. I don'[t know what to set the bot mode on or skill profile etc. anybody willing to give me a walk through? i put the copied code in the user functions part and set a keybind (which i may have wrong). im a noob at this. help!
Reply
#25
Code:
local delay = 500 --Delay between purchase attempts, 1000 is 1 second
local buytype = 0 --0 is Private Individual, 1 is Free Company, 2 is Relocation...
local PlacardID = 0

if BuyHouseVar == nil then
     BuyHouseVar = true
     BuyHouseStep = 0
     BuyHouseLast = 0
     BuyHousePushButton = 24
     if GetGameRegion() == 1 then BuyHousePushButton = 25 end
else
     BuyHouseVar = not BuyHouseVar
end

function BuyHouseFunction()
     d("BuyHouseStep: "..tostring(BuyHouseStep))
     if BuyHouseVar and TimeSince(BuyHouseLast) > delay then
             PlacardID = 0
             local el = EntityList("nearest,contentid=2002736")
             if table.valid(el) then
                     for k,v in pairs(el) do
                             PlacardID = v.id
                     end
             end

             if BuyHouseStep == 0 then
                     if IsControlOpen("HousingSignBoard") then
                             BuyHouseStep = 1
                     else
                             Player:SetTarget(PlacardID)
                             Player:Interact(PlacardID)
                     end
             end
             if BuyHouseStep == 1 then
                     UseControlAction("HousingSignBoard","PurchaseLand")
                     if IsControlOpen("SelectYesno") then
                             BuyHouseStep = 3
                     elseif IsControlOpen("SelectString") and not IsControlOpen("HousingSignBoard") then
                             BuyHouseStep = 2
                     elseif IsControlOpen("HousingSignBoard") then
                             local ctrl = GetControl("HousingSignBoard")
                             if ctrl:GetRawData()[1].value.A == 1 then
                                     ctrl:PushButton(BuyHousePushButton,2)
                             end
                     end
             end
             if BuyHouseStep == 2 then
                     if IsControlOpen("SelectYesno") then
                             BuyHouseStep = 3
                     elseif IsControlOpen("SelectString") then
                             GetControl("SelectString"):Action("SelectIndex",buytype)
                     elseif IsControlOpen("HousingSignBoard") then
                             UseControlAction("SelectYesno","Yes")
                             BuyHouseStep = 1
                     end
             end
             if BuyHouseStep == 3 then
                     if IsControlOpen("SelectYesno") then
                             UseControlAction("SelectYesno","Yes")
                     elseif Player:GetTarget() == nil then
                             BuyHouseStep = 0
                             BuyHouseLast = Now()    
                     end
             end
     end
     if Player:GetTarget() == nil then
             Player:SetTarget(PlacardID)
     end
end
RegisterEventHandler("Gameloop.Update", BuyHouseFunction)


use this edited script from bender69
put it in user function>new>name "HouseBuy"
in key binds, select new>name "name HouseBuy" >function, select "HouseBuy"> Key 1 select "Shift"> Key 2 select "1"
okay, you done, to run it, just press Shift and 1 on ur keyboard
Reply
#26
(05-12-2019, 04:55 AM)shiner1976 Wrote:  I can confirm it works (at least for free company house acquisition) since I was able to acquire one earlier today.  I had set my delay to 1200, and also had Assist Mode turn on with Quest Helpers enabled to autoconfirm any additional dialog.

I've got the same settings yet no matter what the code attempts to purchase a personal house instead of an FC house every time. Any ideas? Here's my code:

Code:
local delay = 1200 --Delay between purchase attempts, 1000 is 1 second
local buytype = 1 --0 is Private Individual, 1 is Free Company, 2 is Relocation...
local PlacardID = 0

if BuyHouseVar == nil then
    BuyHouseVar = true
    BuyHouseStep = 0
    BuyHouseLast = 0
    BuyHousePushButton = 24
    if GetGameRegion() == 1 then BuyHousePushButton = 25 end
else
    BuyHouseVar = not BuyHouseVar
end

function BuyHouseFunction()
    d("BuyHouseStep: "..tostring(BuyHouseStep))
    if BuyHouseVar and TimeSince(BuyHouseLast) > delay then
            PlacardID = 0
            local el = EntityList("nearest,contentid=2002736")
            if table.valid(el) then
                    for k,v in pairs(el) do
                            PlacardID = v.id
                    end
            end

            if BuyHouseStep == 0 then
                    if IsControlOpen("HousingSignBoard") then
                            BuyHouseStep = 1
                    else
                            Player:SetTarget(PlacardID)
                            Player:Interact(PlacardID)
                    end
            end
            if BuyHouseStep == 1 then
                    UseControlAction("HousingSignBoard","PurchaseLand")
                    if IsControlOpen("SelectYesno") then
                            BuyHouseStep = 3
                    elseif IsControlOpen("SelectString") and not IsControlOpen("HousingSignBoard") then
                            BuyHouseStep = 2
                    elseif IsControlOpen("HousingSignBoard") then
                            local ctrl = GetControl("HousingSignBoard")
                            if ctrl:GetRawData()[1].value.A == 1 then
                                    ctrl:PushButton(BuyHousePushButton,2)
                            end
                    end
            end
            if BuyHouseStep == 2 then
                    if IsControlOpen("SelectYesno") then
                            BuyHouseStep = 3
                    elseif IsControlOpen("SelectString") then
                            GetControl("SelectString"):Action("SelectIndex",buytype)
                    elseif IsControlOpen("HousingSignBoard") then
                            UseControlAction("SelectYesno","Yes")
                            BuyHouseStep = 1
                    end
            end
            if BuyHouseStep == 3 then
                    if IsControlOpen("SelectYesno") then
                            UseControlAction("SelectYesno","Yes")
                    elseif Player:GetTarget() == nil then
                            BuyHouseStep = 0
                            BuyHouseLast = Now()    
                    end
            end
    end
    if Player:GetTarget() == nil then
            Player:SetTarget(PlacardID)
    end
end
RegisterEventHandler("Gameloop.Update", BuyHouseFunction)
Reply
#27
I'm trying out this code at present but having a little difficulty in controlling the delay. 

I'm a little paranoid leaving it at 1200. I changed it to 2000 to test out that but it's clear from testing, it's not using any delay at all, it's going as fast as it can. I copied bender69's code following sizuka's instructions. 

Can someone help me out because as much as I want a house, I don't want that to the GM's prison lol.
Reply
#28
ended up with a double post - sorry
Reply
#29
It works for the most part but it only wants to select "Private Individual" instead of "Free Company" despite me changing the local buy type to "1". I've literally tried every last one of the versions posted on this thread, but still all select "Private Individual". Please help, my company needs a house ♥
Reply
#30
might need to reload lua after making changes for it to update, was how it was for me at least
Reply
 


Forum Jump:


Users browsing this thread: 1 Guest(s)

We help you win the game.

FFXIV Bot and More.

 

Products