local ScreenGui = Instance.new("ScreenGui")
local MainFrame = Instance.new("ImageLabel")
local ScrollingFrame = Instance.new("ScrollingFrame")
local UIListLayout = Instance.new("UIListLayout")

if gethui then ScreenGui.Parent = gethui() else ScreenGui.Parent = game:GetService("CoreGui") end

-- GUI SETUP
MainFrame.Name = "JohnDoeReaper"
MainFrame.Parent = ScreenGui
MainFrame.Position = UDim2.new(0.35, 0, 0.3, 0)
MainFrame.Size = UDim2.new(0, 260, 0, 380)
MainFrame.Image = "rbxassetid://115950425767958"
MainFrame.Active = true
MainFrame.Draggable = true

ScrollingFrame.Parent = MainFrame
ScrollingFrame.Size = UDim2.new(0.9, 0, 0.85, 0)
ScrollingFrame.Position = UDim2.new(0.05, 0, 0.12, 0)
ScrollingFrame.BackgroundTransparency = 1
ScrollingFrame.CanvasSize = UDim2.new(0, 0, 3.0, 0) 

UIListLayout.Parent = ScrollingFrame
UIListLayout.Padding = UDim.new(0, 8)
UIListLayout.HorizontalAlignment = Enum.HorizontalAlignment.Center

-- CONSTANTS & SOUNDS
local player = game.Players.LocalPlayer
local char = player.Character or player.CharacterAdded:Wait()
local RequestCommand = game:GetService("ReplicatedStorage"):WaitForChild("HDAdminHDClient").Signals.RequestCommandSilent
local UserInputService = game:GetService("UserInputService")
local curColor = Color3.new(1,0,0)

local killSound = Instance.new("Sound", char)
killSound.SoundId = "rbxassetid://28144425"
killSound.Pitch = 0.6
killSound.Volume = 3

local hitSound = Instance.new("Sound", char)
hitSound.SoundId = "rbxassetid://82500396906354"
hitSound.Volume = 1

-- F3X HELPERS
local function getRemote()
    local tool = char:FindFirstChildOfClass("Tool") or player.Backpack:FindFirstChildOfClass("Tool")
    return tool and tool:FindFirstChild("SyncAPI") and tool.SyncAPI.ServerEndpoint or nil
end

local function _(args)
    local remote = getRemote()
    if remote then remote:InvokeServer(unpack(args)) end
end

-- ARM & ATTACK LOGIC
local function attack()
    local arm = char:FindFirstChild("Right Arm")
    local hum = char:FindFirstChildOfClass("Humanoid")
    if not arm or not hum then return end

    local anim = Instance.new("Animation")
    anim.AnimationId = "rbxassetid://186934658"
    local track = hum:LoadAnimation(anim)
    track:Play()

    local hitFound = false
    local connection
    connection = arm.Touched:Connect(function(other)
        local victim = game.Players:GetPlayerFromCharacter(other.Parent)
        if victim and victim ~= player and not hitFound then
            hitFound = true
            hitSound:Play()
            -- Decapitate using F3X
            local head = other.Parent:FindFirstChild("Head")
            if head then _({"Remove", {head}}) end
        end
    end)

    task.wait(0.5)
    connection:Disconnect()
    if not hitFound then killSound:Play() end
end

UserInputService.InputBegan:Connect(function(input, gpe)
    if gpe then return end
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
        attack()
    end
end)

-- COLOR/TRANSFORM FUNCTION
local function applyTheme(themeColor)
    curColor = themeColor
    RequestCommand:InvokeServer(";titlebk me ᴊᴏʜɴ ᴅᴏᴇ")
    RequestCommand:InvokeServer(";removeaccessories")
    task.wait(0.5)
    RequestCommand:InvokeServer(";hat me 18196403126")
    RequestCommand:InvokeServer(";shirt me 100276101149100")
    RequestCommand:InvokeServer(";pants me 109662040845019")
    RequestCommand:InvokeServer(";face me 144075659")
    
    local parts = {"Head", "Torso", "Left Arm", "Right Arm", "Left Leg", "Right Leg"}
    for _, name in pairs(parts) do
        local p = char:FindFirstChild(name)
        if p then
            _({"SyncColor", {{Part = p, Color = themeColor}}})
            if name == "Right Arm" then
                -- Apply that long arm mesh offset from your script
                _({"CreateMeshes", {{Part = p}}})
                _({"SyncMesh", {{Part = p, MeshId = "rbxassetid://94818190090394", Offset = Vector3.new(0.37, -0.6, 0)}}})
            end
        end
    end
end

-- BUTTONS
local options = {
    ["BLOOD"] = Color3.new(1,0,0),
    ["VOID"] = Color3.new(0,0,0),
    ["HACKER"] = Color3.new(0,1,0),
    ["ICE"] = Color3.new(0,1,1),
    ["GOLD"] = Color3.new(1,0.8,0)
}

for name, color in pairs(options) do
    local btn = Instance.new("TextButton", ScrollingFrame)
    btn.Size = UDim2.new(0.9, 0, 0, 35)
    btn.BackgroundColor3 = Color3.new(0,0,0)
    btn.TextColor3 = color
    btn.Text = name.." DOE"
    btn.Font = Enum.Font.Code
    btn.BorderSizePixel = 2
    btn.BorderColor3 = color
    btn.MouseButton1Click:Connect(function() applyTheme(color) end)
end

-- TRAIL & FIRE (Modified from your original)
task.spawn(function()
    while task.wait(0.05) do
        local remote = getRemote()
        if remote and char:FindFirstChild("HumanoidRootPart") then
            local pos = char.HumanoidRootPart.CFrame * CFrame.new(0, -3, 0)
            local trail = remote:InvokeServer("CreatePart", "Normal", pos, char)
            task.spawn(function()
                _({"SyncColor", {{Part = trail, Color = curColor}}})
                _({"SyncResize", {{Part = trail, Size = Vector3.new(8, 0.1, 8), CFrame = pos}}})
                _({"CreateDecorations", {{Part = trail, DecorationType = "Fire"}}})
                _({"SyncDecorate", {{Part = trail, DecorationType = "Fire", Color = curColor, Size = 4}}})
                task.wait(0.8)
                _({"Remove", {trail}})
            end)
        end
    end
end)