MemeDash auto farm and hack speed or more,..

Script source Luau

Copy Script

-- [[ BloxScripts Risk Notice ]]
-- This script has not been verified by BloxScripts.fun. Deal with caution.
--
-- Stay safe:
--   • Never log in on unofficial Roblox sites or lookalike domains.
--   • Real Roblox links use roblox.com (check the .com ending).
--   • Treat fake Roblox login / "claim reward" pages as phishing.
-- [[ End BloxScripts Risk Notice ]]

-- Services Initialization
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local UserInputService = game:GetService("UserInputService")
local VirtualUser = game:GetService("VirtualUser")
local Lighting = game:GetService("Lighting")
local CoreGui = game:GetService("CoreGui")
local LocalPlayer = Players.LocalPlayer

-- Global Configuration Variables
getgenv().FlyFarm100m = false
getgenv().AntiAFK = false
getgenv().SpeedHack = false
getgenv().LightBoost = false
getgenv().Noclip = false
getgenv().FlyEnabled = false
getgenv().ShowPlayers = false
getgenv().ShowBots = false

-- Set max FPS cap if supported by executor
if setfpscap then setfpscap(240) end

-- Clean up existing UI instance to prevent duplicates
if CoreGui:FindFirstChild("BaconScriptHub") then
    CoreGui.BaconScriptHub:Destroy()
end

-- Create ScreenGui Container
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "BaconScriptHub"
ScreenGui.ResetOnSpawn = false

-- Attach ScreenGui safely to available GUI parent
if gethui then 
    ScreenGui.Parent = gethui()
elseif syn and syn.protect_gui then 
    syn.protect_gui(ScreenGui) 
    ScreenGui.Parent = CoreGui
else 
    ScreenGui.Parent = CoreGui 
end

-- Main Window Frame Setup
local MainFrame = Instance.new("Frame")
MainFrame.Name = "MainFrame"
MainFrame.Parent = ScreenGui
MainFrame.BackgroundColor3 = Color3.fromRGB(35, 25, 25)
MainFrame.BorderSizePixel = 0
MainFrame.Position = UDim2.new(0.05, 0, 0.2, 0)
MainFrame.Size = UDim2.new(0, 245, 0, 360)
MainFrame.Active = true
MainFrame.Draggable = true

local Corner = Instance.new("UICorner")
Corner.CornerRadius = UDim.new(0, 12)
Corner.Parent = MainFrame

local FrameStroke = Instance.new("UIStroke")
FrameStroke.Parent = MainFrame
FrameStroke.Color = Color3.fromRGB(180, 60, 60)
FrameStroke.Thickness = 1.5

-- Header UI Elements (Icon, Title, Subtitle, FPS Counter)
local BaconIcon = Instance.new("ImageLabel")
BaconIcon.Parent = MainFrame
BaconIcon.BackgroundTransparency = 1
BaconIcon.Position = UDim2.new(0.05, 0, 0.03, 0)
BaconIcon.Size = UDim2.new(0, 32, 0, 32)
BaconIcon.Image = "rbxassetid://6371098485"

local Title = Instance.new("TextLabel")
Title.Parent = MainFrame
Title.BackgroundTransparency = 1
Title.Position = UDim2.new(0.22, 0, 0.03, 0)
Title.Size = UDim2.new(0.45, 0, 0, 22)
Title.Font = Enum.Font.FredokaOne
Title.Text = "BACON SCRIPT"
Title.TextColor3 = Color3.fromRGB(255, 120, 100)
Title.TextSize = 17
Title.TextXAlignment = Enum.TextXAlignment.Left

local FpsLabel = Instance.new("TextLabel")
FpsLabel.Parent = MainFrame
FpsLabel.BackgroundTransparency = 1
FpsLabel.Position = UDim2.new(0.68, 0, 0.03, 0)
FpsLabel.Size = UDim2.new(0.27, 0, 0, 22)
FpsLabel.Font = Enum.Font.SourceSansBold
FpsLabel.Text = "FPS: --"
FpsLabel.TextColor3 = Color3.fromRGB(100, 255, 100)
FpsLabel.TextSize = 14
FpsLabel.TextXAlignment = Enum.TextXAlignment.Right

local Subtitle = Instance.new("TextLabel")
Subtitle.Parent = MainFrame
Subtitle.BackgroundTransparency = 1
Subtitle.Position = UDim2.new(0.22, 0, 0.10, 0)
Subtitle.Size = UDim2.new(0.73, 0, 0, 15)
Subtitle.Font = Enum.Font.SourceSansItalic
Subtitle.Text = "by nguyn.huy.bacon (B: Menu)"
Subtitle.TextColor3 = Color3.fromRGB(180, 180, 180)
Subtitle.TextSize = 11
Subtitle.TextXAlignment = Enum.TextXAlignment.Left

local Line = Instance.new("Frame")
Line.Parent = MainFrame
Line.BackgroundColor3 = Color3.fromRGB(80, 40, 40)
Line.BorderSizePixel = 0
Line.Position = UDim2.new(0.05, 0, 0.15, 0)
Line.Size = UDim2.new(0.9, 0, 0, 2)

-- Button Container Layout
local Container = Instance.new("Frame")
Container.Parent = MainFrame
Container.BackgroundTransparency = 1
Container.Position = UDim2.new(0, 0, 0.17, 0)
Container.Size = UDim2.new(1, 0, 0.83, 0)

local UIList = Instance.new("UIListLayout")
UIList.Parent = Container
UIList.SortOrder = Enum.SortOrder.LayoutOrder
UIList.Padding = UDim.new(0, 4)
UIList.HorizontalAlignment = Enum.HorizontalAlignment.Center

-- Helper Function to Create Styled Toggle Buttons
local function createButton(text)
    local btn = Instance.new("TextButton")
    btn.Size = UDim2.new(0.9, 0, 0, 28)
    btn.BackgroundColor3 = Color3.fromRGB(150, 40, 40)
    btn.Font = Enum.Font.SourceSansBold
    btn.Text = text .. ": OFF"
    btn.TextColor3 = Color3.fromRGB(255, 255, 255)
    btn.TextSize = 12
    
    local btnCorner = Instance.new("UICorner")
    btnCorner.CornerRadius = UDim.new(0, 6)
    btnCorner.Parent = btn
    
    return btn
end

-- Instantiating Menu Buttons
local FarmBtn = createButton("Auto Farm 100m (F)")
FarmBtn.Parent = Container

local SpeedBtn = createButton("Speed 300 (X)")
SpeedBtn.Parent = Container

local FlyBtn = createButton("Fly (E)")
FlyBtn.Parent = Container

local NoclipBtn = createButton("Noclip")
NoclipBtn.Parent = Container

local PlayerEspBtn = createButton("ESP Players (P)")
PlayerEspBtn.Parent = Container

local BotEspBtn = createButton("ESP Bots (N)")
BotEspBtn.Parent = Container

local BoostBtn = createButton("Fix Lag / Light Boost")
BoostBtn.Parent = Container

local AfkBtn = createButton("Anti-AFK")
AfkBtn.Parent = Container

-- Real-time FPS Calculation Loop
local frameCount = 0
local lastCheck = os.clock()

RunService.RenderStepped:Connect(function()
    frameCount = frameCount + 1
    local now = os.clock()
    if now - lastCheck >= 1 then
        FpsLabel.Text = "FPS: " .. frameCount
        frameCount = 0
        lastCheck = now
    end
end)

-- Keybind Input Listener System (B, F, X, E, P, N)
UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if gameProcessed then return end
    
    -- Key B: Show/Hide Menu Frame
    if input.KeyCode == Enum.KeyCode.B then
        MainFrame.Visible = not MainFrame.Visible
        
    -- Key F: Toggle Auto Farm 100m Mode
    elseif input.KeyCode == Enum.KeyCode.F then
        getgenv().FlyFarm100m = not getgenv().FlyFarm100m
        FarmBtn.Text = "Auto Farm 100m (F): " .. (getgenv().FlyFarm100m and "ON" or "OFF")
        FarmBtn.BackgroundColor3 = getgenv().FlyFarm100m and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
        
    -- Key X: Toggle Speed Hack
    elseif input.KeyCode == Enum.KeyCode.X then
        getgenv().SpeedHack = not getgenv().SpeedHack
        SpeedBtn.Text = "Speed 300 (X): " .. (getgenv().SpeedHack and "ON" or "OFF")
        SpeedBtn.BackgroundColor3 = getgenv().SpeedHack and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
        
    -- Key E: Toggle Fly Mode
    elseif input.KeyCode == Enum.KeyCode.E then
        getgenv().FlyEnabled = not getgenv().FlyEnabled
        FlyBtn.Text = "Fly (E): " .. (getgenv().FlyEnabled and "ON" or "OFF")
        FlyBtn.BackgroundColor3 = getgenv().FlyEnabled and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)

    -- Key P: Toggle Player ESP
    elseif input.KeyCode == Enum.KeyCode.P then
        getgenv().ShowPlayers = not getgenv().ShowPlayers
        PlayerEspBtn.Text = "ESP Players (P): " .. (getgenv().ShowPlayers and "ON" or "OFF")
        PlayerEspBtn.BackgroundColor3 = getgenv().ShowPlayers and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)

    -- Key N: Toggle Bot ESP
    elseif input.KeyCode == Enum.KeyCode.N then
        getgenv().ShowBots = not getgenv().ShowBots
        BotEspBtn.Text = "ESP Bots (N): " .. (getgenv().ShowBots and "ON" or "OFF")
        BotEspBtn.BackgroundColor3 = getgenv().ShowBots and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
    end
end)

-- WalkSpeed Modifier System
RunService.RenderStepped:Connect(function()
    local char = LocalPlayer.Character
    if char then
        local hum = char:FindFirstChildOfClass("Humanoid")
        if hum then
            if getgenv().SpeedHack then
                local pressingWS = UserInputService:IsKeyDown(Enum.KeyCode.W) or UserInputService:IsKeyDown(Enum.KeyCode.S)
                if pressingWS then
                    hum.WalkSpeed = 300
                else
                    hum.WalkSpeed = 16
                end
            else
                if hum.WalkSpeed == 300 then
                    hum.WalkSpeed = 16
                end
            end
        end
    end
end)

-- ESP Billboard Creation Helper Function
local function createEspBillboard(model, isBot)
    if model:FindFirstChild("BaconEspTag") then return end
    local head = model:FindFirstChild("Head") or model:FindFirstChild("HumanoidRootPart")
    if not head then return end

    local bb = Instance.new("BillboardGui")
    bb.Name = "BaconEspTag"
    bb.Adornee = head
    bb.Size = UDim2.new(0, 150, 0, 40)
    bb.StudsOffset = Vector3.new(0, 2.5, 0)
    bb.AlwaysOnTop = true

    local txt = Instance.new("TextLabel")
    txt.Name = "EspLabel"
    txt.Parent = bb
    txt.Size = UDim2.new(1, 0, 1, 0)
    txt.BackgroundTransparency = 1
    txt.Font = Enum.Font.SourceSansBold
    txt.TextSize = 14
    txt.TextColor3 = isBot and Color3.fromRGB(255, 80, 80) or Color3.fromRGB(80, 220, 255)
    txt.TextStrokeTransparency = 0

    bb.Parent = head
end

-- ESP Update Loop for Players and Bots
RunService.RenderStepped:Connect(function()
    local myChar = LocalPlayer.Character
    local myHrp = myChar and myChar:FindFirstChild("HumanoidRootPart")

    -- Clean & Update Players
    for _, plr in ipairs(Players:GetPlayers()) do
        if plr ~= LocalPlayer and plr.Character then
            local char = plr.Character
            local bb = char:FindFirstChild("Head") and char.Head:FindFirstChild("BaconEspTag")
            
            if getgenv().ShowPlayers then
                createEspBillboard(char, false)
                if bb and myHrp and char:FindFirstChild("HumanoidRootPart") then
                    local dist = math.floor((myHrp.Position - char.HumanoidRootPart.Position).Magnitude * 0.28) -- Convert studs to meters
                    bb.EspLabel.Text = plr.DisplayName .. " [" .. dist .. "m]"
                    bb.Enabled = true
                end
            else
                if bb then bb.Enabled = false end
            end
        end
    end

    -- Clean & Update Bots/NPCs in Workspace
    for _, obj in ipairs(workspace:GetChildren()) do
        if obj:IsA("Model") and obj ~= myChar and obj:FindFirstChildOfClass("Humanoid") then
            if not Players:GetPlayerFromCharacter(obj) then
                local bb = obj:FindFirstChild("Head") and obj.Head:FindFirstChild("BaconEspTag")
                
                if getgenv().ShowBots then
                    createEspBillboard(obj, true)
                    if bb and myHrp and obj:FindFirstChild("HumanoidRootPart") then
                        local dist = math.floor((myHrp.Position - obj.HumanoidRootPart.Position).Magnitude * 0.28) -- Convert studs to meters
                        bb.EspLabel.Text = "[BOT] " .. obj.Name .. " [" .. dist .. "m]"
                        bb.Enabled = true
                    end
                else
                    if bb then bb.Enabled = false end
                end
            end
        end
    end
end)

-- Fly Movement Mechanics
local bodyVel, bodyGyro
RunService.RenderStepped:Connect(function()
    local char = LocalPlayer.Character
    if char and char:FindFirstChild("HumanoidRootPart") then
        local hrp = char.HumanoidRootPart
        
        if getgenv().FlyEnabled then
            if not bodyVel or bodyVel.Parent ~= hrp then
                bodyVel = Instance.new("BodyVelocity")
                bodyVel.MaxForce = Vector3.new(1e6, 1e6, 1e6)
                bodyVel.Parent = hrp
                
                bodyGyro = Instance.new("BodyGyro")
                bodyGyro.MaxTorque = Vector3.new(1e6, 1e6, 1e6)
                bodyGyro.P = 10000
                bodyGyro.Parent = hrp
            end
            
            local cam = workspace.CurrentCamera
            local moveDir = Vector3.zero
            
            if UserInputService:IsKeyDown(Enum.KeyCode.W) then moveDir = moveDir + cam.CFrame.LookVector end
            if UserInputService:IsKeyDown(Enum.KeyCode.S) then moveDir = moveDir - cam.CFrame.LookVector end
            if UserInputService:IsKeyDown(Enum.KeyCode.A) then moveDir = moveDir - cam.CFrame.RightVector end
            if UserInputService:IsKeyDown(Enum.KeyCode.D) then moveDir = moveDir + cam.CFrame.RightVector end
            if UserInputService:IsKeyDown(Enum.KeyCode.Space) then moveDir = moveDir + Vector3.new(0, 1, 0) end
            if UserInputService:IsKeyDown(Enum.KeyCode.LeftShift) then moveDir = moveDir - Vector3.new(0, 1, 0) end
            
            bodyVel.Velocity = moveDir * 100
            bodyGyro.CFrame = cam.CFrame
        else
            if bodyVel then bodyVel:Destroy() bodyVel = nil end
            if bodyGyro then bodyGyro:Destroy() bodyGyro = nil end
        end
    end
end)

-- Noclip Execution
RunService.Stepped:Connect(function()
    if getgenv().Noclip then
        local char = LocalPlayer.Character
        if char then
            for _, part in ipairs(char:GetDescendants()) do
                if part:IsA("BasePart") then
                    part.CanCollide = false
                end
            end
        end
    end
end)

-- Auto Farm 100m Altitude Lock
local targetY = nil
local farmBv = nil

RunService.Stepped:Connect(function()
    if getgenv().FlyFarm100m then
        local char = LocalPlayer.Character
        if char then
            for _, part in ipairs(char:GetDescendants()) do
                if part:IsA("BasePart") then
                    part.CanCollide = false
                end
            end
            
            local hrp = char:FindFirstChild("HumanoidRootPart")
            if hrp then
                if not targetY then targetY = hrp.Position.Y + 100 end
                
                if not farmBv or farmBv.Parent ~= hrp then
                    farmBv = Instance.new("BodyVelocity")
                    farmBv.MaxForce = Vector3.new(1e5, 1e5, 1e5)
                    farmBv.Velocity = Vector3.zero
                    farmBv.Parent = hrp
                end
                
                hrp.CFrame = CFrame.new(hrp.Position.X, targetY, hrp.Position.Z) * hrp.CFrame.Rotation
            end
        end
    else
        targetY = nil
        if farmBv then farmBv:Destroy() farmBv = nil end
    end
end)

-- Light Boost Optimization
local function applyLightBoost(enable)
    if enable then
        Lighting.GlobalShadows = false
        Lighting.FogEnd = 9e9
        Lighting.Brightness = 1
        settings().Rendering.QualityLevel = Enum.QualityLevel.Level01
        
        for _, v in ipairs(workspace:GetChildren()) do
            if v:IsA("BasePart") then
                v.Material = Enum.Material.Plastic
                v.Reflectance = 0
            elseif v:IsA("Decal") or v:IsA("Texture") then
                v.Transparency = 1
            elseif v:IsA("ParticleEmitter") or v:IsA("Trail") then
                v.Enabled = false
            end
        end
    end
end

-- Anti-AFK Handler
LocalPlayer.Idled:Connect(function()
    if getgenv().AntiAFK then
        VirtualUser:Button2Down(Vector2.new(0,0), workspace.CurrentCamera.CFrame)
        task.wait(1)
        VirtualUser:Button2Up(Vector2.new(0,0), workspace.CurrentCamera.CFrame)
    end
end)

-- UI Button Click Connections
FarmBtn.MouseButton1Click:Connect(function()
    getgenv().FlyFarm100m = not getgenv().FlyFarm100m
    FarmBtn.Text = "Auto Farm 100m (F): " .. (getgenv().FlyFarm100m and "ON" or "OFF")
    FarmBtn.BackgroundColor3 = getgenv().FlyFarm100m and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
end)

SpeedBtn.MouseButton1Click:Connect(function()
    getgenv().SpeedHack = not getgenv().SpeedHack
    SpeedBtn.Text = "Speed 300 (X): " .. (getgenv().SpeedHack and "ON" or "OFF")
    SpeedBtn.BackgroundColor3 = getgenv().SpeedHack and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
end)

FlyBtn.MouseButton1Click:Connect(function()
    getgenv().FlyEnabled = not getgenv().FlyEnabled
    FlyBtn.Text = "Fly (E): " .. (getgenv().FlyEnabled and "ON" or "OFF")
    FlyBtn.BackgroundColor3 = getgenv().FlyEnabled and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
end)

NoclipBtn.MouseButton1Click:Connect(function()
    getgenv().Noclip = not getgenv().Noclip
    NoclipBtn.Text = "Noclip: " .. (getgenv().Noclip and "ON" or "OFF")
    NoclipBtn.BackgroundColor3 = getgenv().Noclip and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
end)

PlayerEspBtn.MouseButton1Click:Connect(function()
    getgenv().ShowPlayers = not getgenv().ShowPlayers
    PlayerEspBtn.Text = "ESP Players (P): " .. (getgenv().ShowPlayers and "ON" or "OFF")
    PlayerEspBtn.BackgroundColor3 = getgenv().ShowPlayers and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
end)

BotEspBtn.MouseButton1Click:Connect(function()
    getgenv().ShowBots = not getgenv().ShowBots
    BotEspBtn.Text = "ESP Bots (N): " .. (getgenv().ShowBots and "ON" or "OFF")
    BotEspBtn.BackgroundColor3 = getgenv().ShowBots and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
end)

BoostBtn.MouseButton1Click:Connect(function()
    getgenv().LightBoost = not getgenv().LightBoost
    BoostBtn.Text = "Fix Lag / Light Boost: " .. (getgenv().LightBoost and "ON" or "OFF")
    BoostBtn.BackgroundColor3 = getgenv().LightBoost and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
    applyLightBoost(getgenv().LightBoost)
end)

AfkBtn.MouseButton1Click:Connect(function()
    getgenv().AntiAFK = not getgenv().AntiAFK
    AfkBtn.Text = "Anti-AFK: " .. (getgenv().AntiAFK and "ON" or "OFF")
    AfkBtn.BackgroundColor3 = getgenv().AntiAFK and Color3.fromRGB(40, 160, 60) or Color3.fromRGB(150, 40, 40)
end)

Review the source before using it. Executions count successful copies, capped at 10 per user and network per script in 24 hours.