Private GUI 4 Bing

local player = game.Players.LocalPlayer
local character = player.Character
local localroot = character:WaitForChild("HumanoidRootPart")
local humanoid = character:WaitForChild("Humanoid")

local function noclip()
    for _, v in pairs(character:GetDescendants()) do
        if v:IsA("BasePart") and v.CanCollide then
            v.CanCollide = false
        end
    end
end

-- Step 1: Go to the NPC to get 'Ya' if not present in the backpack
local function GetBox()
    for _, v in pairs(game.Workspace["บ้านเมือง"]["ส่ง"]:GetDescendants()) do
        if v:IsA("BasePart") and v.Name == "ToolGiver" then
            local prox = v:FindFirstChildOfClass("ProximityPrompt")
            if prox then
                localroot.CFrame = v.CFrame * CFrame.new(0, 0, 5)
                wait(6)
                fireproximityprompt(prox)
              wait(5)
            end
        end
    end
end

local function GetYa()
    for _, v in pairs(game.Workspace["ส่ง"]:GetDescendants()) do
        if v:IsA("BasePart") and v.Name == "ToolGiver" then
            local prox = v:FindFirstChildOfClass("ProximityPrompt")
            if prox then
                localroot.CFrame = v.CFrame * CFrame.new(0, 0, 5)
                wait(6)
                fireproximityprompt(prox)
              wait(5)
            end
        end
    end
end

-- Step 2: Equip 'Ya' if it's in the backpack but not equipped
local function EquipBoxOrYa()
    local backpack = player.Backpack
    for _, v in pairs(backpack:GetChildren()) do
        if v:IsA("Tool") and (v.Name == "Box" or v.Name == "Ya") and v.Parent ~= character then
            v.Parent = character
        end
    end
end

-- Step 3: Go to NPC and sell 'Ya'
local function FarmBox()
    for _, v in pairs(game.Workspace["บ้านเมือง"]["รับ"]:GetDescendants()) do
        if v:IsA("BasePart") and v.Name == "ToolTaker" then
            local prox = v:FindFirstChildOfClass("ProximityPrompt")
            if prox then
                localroot.CFrame = v.CFrame * CFrame.new(0, 0, 5)
                wait(6)
                fireproximityprompt(prox)
              wait(5)
            end
        end
    end
end

local function FarmYa()
    for _, v in pairs(game.Workspace["งาน"]["รับ"]:GetDescendants()) do
        if v:IsA("BasePart") and v.Name == "ToolTaker" then
            local prox = v:FindFirstChildOfClass("ProximityPrompt")
            if prox then
                localroot.CFrame = v.CFrame * CFrame.new(0, 0, 5)
                wait(6)
                fireproximityprompt(prox)
              wait(5)
            end
        end
    end
end

-- Function to perform actions with the target models
local function P_X(target)
    local targetname = target
    for _, v in pairs(game.Workspace["เมือง"][tostring(targetname)]:GetDescendants()) do
        if v:IsA("MeshPart") and v.Name == "engine" then
            local prox = v:FindFirstChildOfClass("ProximityPrompt")
            if prox then
                localroot.CFrame = v.CFrame
                wait(6)
                fireproximityprompt(prox)
              wait(5)
            end
        end
    end
end

-- User Interface and Loop Control
local Library = loadstring(game:HttpGet("https://raw.githubusercontent.com/bloodball/-back-ups-for-libs/main/lime"))()
local w = Library:Window("4 Bing AutoFarm")

-- AutoFarm for target locations
local isOn = false
w:Toggle("AutoFarm", function(v)
    isOn = v
    if isOn then
        while isOn do
            noclip()
            P_X("โรงเรียนกนก")
            wait(0.1)
            P_X("ราชสิทธาราม")
            wait(0.1)
            P_X("ปทุม")
            wait(0.1)
            P_X("รร ประชาชื่น")
            wait(0.1)
            P_X("โรงเรียนบู")
            wait(0.1)
            P_X("อิน")
            if not isOn or humanoid.Health <= 0 then
                break
            end
        end
    end
end)

-- AutoFarm 'Ya'
local ToggleOn = false
w:Toggle("AutoFarm Box", function(state)
    ToggleOn = state
    if ToggleOn then
        while ToggleOn do
            noclip()
            wait(0.1)
            GetBox()      -- Step 1: Get 'Ya'
            wait(0.1)
            EquipBoxOrYa()    -- Step 2: Equip 'Ya'
            wait(0.1)
            FarmBox()     -- Step 3: Sell 'Ya'
            wait(0.1)
            if not ToggleOn or humanoid.Health <= 0 then
                break
            end
        end
    end
end)

local No = false
w:Toggle("Farm Ya", function(yes)
    No = yes
    if No then
        while No do
            noclip()
            wait(0.1)
            GetYa()
            wait(0.1)
            EquipBoxOrYa()
            wait(0.1)
            FarmYa()
            wait(0.1)
            if not No or humanoid.Health <= 0 then
                break
            end
        end
    end
end)

local All = false

w:Toggle("All 3 AutoFarm", function(h)
    All = h
    if All then
        while All do
            noclip()
            wait(1)
            P_X("โรงเรียนกนก")
            wait(1)
            P_X("ราชสิทธาราม")
            wait(1)
            P_X("ปทุม")
            wait(1)
            P_X("รร ประชาชื่น")
            wait(1)
            P_X("โรงเรียนบู")
            wait(1)
            P_X("อิน")
            wait(1)
            GetBox()      -- Step 1: Get 'Ya'
            wait(1)
            EquipBoxOrYa() -- Step 2: Equip 'Ya'
            wait(1)
            FarmBox()
            wait(1)

            GetYa()
            wait(1)
            EquipBoxOrYa()
            wait(1)
            FarmYa()
            wait(1)

            if not All or humanoid.Health <= 0 then
                break
            end
        end
    end
end)

w:Button("Mod Gun(no explosion)", function()
    loadstring(game:HttpGet("https://pastebin.com/raw/yChVKD0k"))()
end)

game.Players.LocalPlayer.CharacterAdded:Connect(function(char)
    character = char
    localroot = character:WaitForChild("HumanoidRootPart")
    humanoid = character:WaitForChild("Humanoid")
end)