Blox Fruits Keyless Fruit Sniper Script V2

-- Made by test_acont01roblox dc and on roblox test_acont01

local TweenService = game:GetService("TweenService")
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")

local scriptEnabled = true
local searchInterval = 0.25 -- Search interval in seconds (4 times per second)
local lastSearchTime = 0
local teleporting = false -- Flag to indicate if teleportation is in progress

local BLOX_FRUITS_PLACE_ID = 2753915549

local function toggleScript(enabled)
    scriptEnabled = enabled
    print("Script " .. (enabled and "enabled!" or "disabled!"))
end

local function createBillboardGui(fruitModel)
    -- Create BillboardGui
    local billboardGui = Instance.new("BillboardGui")
    billboardGui.Adornee = fruitModel
    billboardGui.Size = UDim2.new(0, 100, 0, 50)
    billboardGui.StudsOffset = Vector3.new(0, 3, 0) -- Offsets the label above the fruit model
    billboardGui.AlwaysOnTop = true

    local textLabel = Instance.new("TextLabel")
    textLabel.Parent = billboardGui
    textLabel.BackgroundTransparency = 1
    textLabel.Size = UDim2.new(1, 0, 1, 0)
    textLabel.Text = "Devil Fruit"
    textLabel.TextColor3 = Color3.new(1, 1, 1)
    textLabel.TextStrokeColor3 = Color3.new(0, 0, 0)
    textLabel.TextStrokeTransparency = 0
    textLabel.TextScaled = true
    textLabel.TextWrapped = true
    textLabel.Font = Enum.Font.SourceSansBold

    -- Parent the BillboardGui to the fruitModel
    billboardGui.Parent = fruitModel
end

local function teleportTo(fruitModel)
    if teleporting then return end
    teleporting = true

    local character = Players.LocalPlayer.Character
    local rootPart = character and character:FindFirstChild("HumanoidRootPart")
    if rootPart then
        local fruitPosition = fruitModel.Position
        local distance = (rootPart.Position - fruitPosition).Magnitude
        local tweenTime = distance / 500 -- Adjust for faster tween
        local tweenInfo = TweenInfo.new(tweenTime, Enum.EasingStyle.Linear)
        local tween = TweenService:Create(rootPart, tweenInfo, { CFrame = CFrame.new(fruitPosition) })
        tween:Play()
        tween.Completed:Connect(function()
            rootPart.Anchored = false
            teleporting = false -- Reset teleporting flag
        end)
    end

    -- Add Devil Fruit label
    createBillboardGui(fruitModel)
end

local function detectFruit()
    if tick() - (lastSearchTime or 0) < searchInterval then return end
    lastSearchTime = tick()

    local workspace = game.Workspace
    local foundFruits = {}

    for _, tool in ipairs(workspace:GetChildren()) do
        if tool:IsA("Tool") and tool:FindFirstChild("Fruit") then
            table.insert(foundFruits, tool.Fruit)
        end
    end

    if #foundFruits > 0 then
        return foundFruits -- Return a list of all found fruit models
    end
end

local function checkAnchored()
    local character = Players.LocalPlayer.Character
    local rootPart = character and character:FindFirstChild("HumanoidRootPart")
    if rootPart and rootPart.Anchored then
        print("Player detected by anti-cheat (Anchored HumanoidRootPart)")
        Players.LocalPlayer:Kick("Player detected by anti-cheat (Anchored HumanoidRootPart)")
    end
end

local function mainLoop()
    if scriptEnabled then
        checkAnchored() -- Checks if the HumanoidRootPart is anchored

        if game.PlaceId == BLOX_FRUITS_PLACE_ID then
            local foundFruits = detectFruit()
            if foundFruits then
                print("Teleporting to fruit...")
                -- Teleport to the first found fruit model
                teleportTo(foundFruits[1])
            end
        else
            toggleScript(false) -- Disable the script if the player joins another game
            Players.LocalPlayer:Kick("Game not Supported") -- Kicks the Player With the message ("Game not Supported")
        end
    end
end

RunService.Heartbeat:Connect(mainLoop)

local function onTeleport(targetPlaceId, targetSpawnName)
    toggleScript(targetPlaceId == BLOX_FRUITS_PLACE_ID) -- Enable/disable script based on place ID
end

Players.LocalPlayer.OnTeleport:Connect(onTeleport)