Fire men pro

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 ]]

local playerName = "Player1"
local speed = 16
local isAlive = true

-- Delta / Mobile Executor Compatibility
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer
local Camera = workspace.CurrentCamera

-- Local Settings
local Target = nil
local AimBotEnabled = true
local FlyEnabled = false
local FlySpeed = 50

----------------------------------------------------
-- 1. AimBot Logic (يستهدف أقرب لاعب للشاشة)
----------------------------------------------------
local function GetClosestPlayer()
    local Closest = nil
    local ShortestDistance = math.huge

    for _, player in pairs(Players:GetPlayers()) do
        if player ~= LocalPlayer and player.Character and player.Character:FindFirstChild("HumanoidRootPart") and player.Character:FindFirstChild("Humanoid") and player.Character.Humanoid.Health > 0 then
            local pos, onScreen = Camera:WorldToViewportPoint(player.Character.HumanoidRootPart.Position)
            if onScreen then
                local magnitude = (Vector2.new(pos.X, pos.Y) - Vector2.new(Camera.ViewportSize.X / 2, Camera.ViewportSize.Y / 2)).Magnitude
                if magnitude < ShortestDistance then
                    Closest = player
                    ShortestDistance = magnitude
                end
            end
        end
    end
    return Closest
end

RunService.RenderStepped:Connect(function()
    if AimBotEnabled then
        Target = GetClosestPlayer()
        if Target and Target.Character and Target.Character:FindFirstChild("Head") then
            Camera.CFrame = CFrame.new(Camera.CFrame.Position, Target.Character.Head.Position)
        end
    end
end)

----------------------------------------------------
-- 2. Fly Logic (الطيران بسيط للـ Mobile)
----------------------------------------------------
local BodyVelocity = Instance.new("BodyVelocity")
BodyVelocity.MaxForce = Vector3.new(1e9, 1e9, 1e9)

local function ToggleFly(state)
    FlyEnabled = state
    local char = LocalPlayer.Character
    if not char or not char:FindFirstChild("HumanoidRootPart") then return end
    
    local hrp = char.HumanoidRootPart
    if FlyEnabled then
        BodyVelocity.Parent = hrp
    else
        BodyVelocity.Parent = nil
    end
end

RunService.Heartbeat:Connect(function()
    if FlyEnabled and LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart") then
        local hrp = LocalPlayer.Character.HumanoidRootPart
        BodyVelocity.Velocity = Camera.CFrame.LookVector * FlySpeed
    end
end)

----------------------------------------------------
-- 3. Simple UI (زر لتشغيل/إيقاف الطيران)
----------------------------------------------------
local ScreenGui = Instance.new("ScreenGui", LocalPlayer:WaitForChild("PlayerGui"))
local FlyBtn = Instance.new("TextButton", ScreenGui)

FlyBtn.Size = UDim2.new(0, 100, 0, 40)
FlyBtn.Position = UDim2.new(0.05, 0, 0.4, 0)
FlyBtn.Text = "Fly: OFF"
FlyBtn.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
FlyBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
FlyBtn.Active = true

FlyBtn.MouseButton1Click:Connect(function()
    FlyEnabled = not FlyEnabled
    if FlyEnabled then
        FlyBtn.Text = "Fly: ON"
        FlyBtn.BackgroundColor3 = Color3.fromRGB(50, 200, 50)
        ToggleFly(true)
    else
        FlyBtn.Text = "Fly: OFF"
        FlyBtn.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
        ToggleFly(false)
    end
end)
local function printMessage()
    print("أهلاً بك في عالم البرمجة!")
end

printMessage() -- استدعاء الدالة
local part = workspace:FindFirstChild("MyPart")

local function onTouch(otherPart)
    local character = otherPart.Parent
    local humanoid = character:FindFirstChild("Humanoid")
    
    if humanoid then
        print("تم لمس المكعب من قبل اللاعب!")
    end
end

if part then
    part.Touched:Connect(onTouch)
end
-- Local Fake Lag Script for Delta
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer

local LagEnabled = false
local FreezeDuration = 0.3 -- مدة التجميد بالثواني (كلما زادت زاد اللاغ)
local LastFreeze = os.clock()

ration then
            -- تجميد -- حلقة إيقاف تحديث الشبكة محلياً
RunService.Heartbeat:Connect(function()
    if LagEnabled and LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart") then
        local hrp = LocalPlayer.Character.HumanoidRootPart
        
        if os.clock() - LastFreeze < FreezeD
uإرسال الموقع المؤقت لخلق تأثير اللاغ للآخرين
            hrp.Anchored = true
        else
            hrp.Anchored = false
            if os.clock() - LastFreeze > FreezeDuration * 2 then
                LastFreeze = os.clock()
            end
        end
    end
end)

-- واجهة التحكم (UI)
local ScreenGui = Instance.new("ScreenGui", LocalPlayer:WaitForChild("PlayerGui"))
Enabled = not LagEnabled
    if LagEnabled then
 local Btn = Instance.new("TextButton", ScreenGui)

Btn.Size = UDim2.new(0, 130, 0, 45)
Btn.Position = UDim2.new(0.05, 0, 0.2, 0)
Btn.Text = "Fake Lag: OFF"
Btn.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
Btn.TextColor3 = Color3.fromRGB(255, 255, 255)
Btn.Font = Enum.Font.SourceSansBold
Btn.TextSize = 15
Btn.Active = true

Btn.MouseButton1Click:Connect(function()
    La
g       Btn.Text = "Fake Lag: ON"
        Btn.BackgroundColor3 = Color3.fromRGB(50, 200, 50)
    else
        Btn.Text = "Fake Lag: OFF"
        Btn.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
        if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("HumanoidRootPart") then
            LocalPlayer.Character.HumanoidRootPart.Anchored = false
        end
    end
end)

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