SamDev Admin Panel

-- SAMDEV ADMIN FINAL: 50 COMMANDS | FIXED FLY
-- ADMINS: greninjaYT_07, Golden23265, DE4DLYxf0under_JAMU, Tmkx
local lp = game:GetService("Players").LocalPlayer
local mouse = lp:GetMouse()
local rs = game:GetService("RunService")
local tcs = game:GetService("TextChatService")
local tele = game:GetService("TeleportService")
local uis = game:GetService("UserInputService")
local lighting = game:GetService("Lighting")

-- 1. CONFIGURATION
local ADMINS = {
    ["greninjaYT_07"] = true, ["Golden23265"] = true, 
    ["DE4DLYxf0under_JAMU"] = true, ["Tmkx"] = true
}
local prefix = "!"
local flying = false
local flySpeed = 50
local noclip = false

-- 2. UI SETUP (AESTHETIC DARK)
local old = lp.PlayerGui:FindFirstChild("SamDevFinal")
if old then old:Destroy() end

local sg = Instance.new("ScreenGui", lp.PlayerGui); sg.Name = "SamDevFinal"
local frame = Instance.new("Frame", sg)
frame.Size = UDim2.new(0, 400, 0, 450); frame.Position = UDim2.new(0.5, -200, 0.35, -225)
frame.BackgroundColor3 = Color3.fromRGB(18, 18, 22); frame.Active = true; frame.Draggable = true
Instance.new("UICorner", frame).CornerRadius = UDim.new(0, 12)
local stroke = Instance.new("UIStroke", frame); stroke.Thickness = 2
-- Rainbow Border
task.spawn(function()
    while task.wait(0.05) do stroke.Color = Color3.fromHSV(tick() % 5 / 5, 0.8, 1) end
end)

local title = Instance.new("TextLabel", frame)
title.Size = UDim2.new(1, 0, 0, 40); title.Text = "SAMDEV ADMIN: FINAL (50 CMDS)"; title.TextColor3 = Color3.new(1,1,1)
title.Font = Enum.Font.GothamBold; title.TextSize = 18; title.BackgroundTransparency = 1

-- Scrolling List
local scroll = Instance.new("ScrollingFrame", frame)
scroll.Size = UDim2.new(0.9, 0, 0.75, 0); scroll.Position = UDim2.new(0.05, 0, 0.12, 0)
scroll.BackgroundTransparency = 1; scroll.CanvasSize = UDim2.new(0,0,6,0); scroll.ScrollBarThickness = 4
local layout = Instance.new("UIListLayout", scroll); layout.Padding = UDim.new(0, 4)

local function addList(txt)
    local t = Instance.new("TextLabel", scroll)
    t.Size = UDim2.new(1, 0, 0, 20); t.Text = "  " .. txt; t.TextColor3 = Color3.fromRGB(200,200,200)
    t.TextXAlignment = Enum.TextXAlignment.Left; t.BackgroundTransparency = 1; t.Font = Enum.Font.Code; t.TextSize = 14
end

-- 3. THE 50 COMMANDS LIST (Display)
local displayCmds = {
    "1. fly", "2. unfly", "3. noclip", "4. clip", "5. speed [n]", "6. jump [n]", "7. sit", "8. kill", "9. rj (rejoin)", "10. re (reset)",
    "11. goto [plr]", "12. view [plr]", "13. unview", "14. bring [plr]", "15. btools", "16. god", "17. ungod", "18. invisible", "19. visible", "20. tp [click]",
    "21. day", "22. night", "23. nofog", "24. fullbright", "25. esp", "26. unesp", "27. facesp", "28. float", "29. unfloat", "30. spin",
    "31. unspin", "32. dance", "33. undance", "34. freeze", "35. thaw", "36. hipheight [n]", "37. headsize [n]", "38. chat [msg]", "39. spam [msg]", "40. unspam",
    "41. kick", "42. serverinfo", "43. fps [n]", "44. lowgfx", "45. fixcam", "46. strech", "47. unstrech", "48. noanim", "49. infjump", "50. hidegui"
}
for _, v in pairs(displayCmds) do addList(v) end

-- 4. FLY SYSTEM (FIXED FOR DELTA/MOBILE)
local bodyGyro, bodyVel
local function startFly()
    if flying then return end
    flying = true
    local char = lp.Character; local root = char:FindFirstChild("HumanoidRootPart")
    if not root then return end

    bodyGyro = Instance.new("BodyGyro", root)
    bodyGyro.P = 9e4; bodyGyro.maxTorque = Vector3.new(9e9, 9e9, 9e9); bodyGyro.cframe = root.CFrame

    bodyVel = Instance.new("BodyVelocity", root)
    bodyVel.velocity = Vector3.new(0, 0.1, 0); bodyVel.maxForce = Vector3.new(9e9, 9e9, 9e9)

    char.Humanoid.PlatformStand = true
    
    -- Mobile & PC Input Handler
    task.spawn(function()
        while flying and char and char:FindFirstChild("Humanoid") do
            local hum = char.Humanoid
            local cam = workspace.CurrentCamera
            -- Get Move Direction from Thumbstick or WASD
            local moveDir = hum.MoveDirection
            
            if moveDir.Magnitude > 0 then
                -- Move towards where camera is looking based on input
                bodyVel.Velocity = (moveDir * flySpeed) + Vector3.new(0, cam.CFrame.LookVector.Y * flySpeed, 0)
                bodyGyro.CFrame = CFrame.new(root.Position, root.Position + cam.CFrame.LookVector)
            else
                bodyVel.Velocity = Vector3.new(0, 0, 0)
            end
            rs.Heartbeat:Wait()
        end
    end)
end

local function stopFly()
    flying = false
    if bodyGyro then bodyGyro:Destroy() end
    if bodyVel then bodyVel:Destroy() end
    if lp.Character and lp.Character:FindFirstChild("Humanoid") then
        lp.Character.Humanoid.PlatformStand = false
    end
end

-- 5. EXECUTION ENGINE (50 COMMANDS)
local function exec(str)
    local args = str:split(" ")
    local cmd = args[1]:lower()
    local char = lp.Character
    local hum = char:FindFirstChild("Humanoid")
    local root = char:FindFirstChild("HumanoidRootPart")

    if cmd == "fly" then startFly()
    elseif cmd == "unfly" then stopFly()
    elseif cmd == "noclip" then noclip = true
    elseif cmd == "clip" then noclip = false
    elseif cmd == "speed" then hum.WalkSpeed = tonumber(args[2]) or 16
    elseif cmd == "jump" then hum.UseJumpPower = true; hum.JumpPower = tonumber(args[2]) or 50
    elseif cmd == "sit" then hum.Sit = true
    elseif cmd == "kill" then hum.Health = 0
    elseif cmd == "rj" then tele:Teleport(game.PlaceId, lp)
    elseif cmd == "re" then lp:LoadCharacter() -- 10
    
    elseif cmd == "goto" then
        for _,v in pairs(game.Players:GetPlayers()) do if v.Name:lower():find(args[2]:lower()) then root.CFrame = v.Character.HumanoidRootPart.CFrame end end
    elseif cmd == "view" then
        for _,v in pairs(game.Players:GetPlayers()) do if v.Name:lower():find(args[2]:lower()) then workspace.CurrentCamera.CameraSubject = v.Character.Humanoid end end
    elseif cmd == "unview" then workspace.CurrentCamera.CameraSubject = hum
    elseif cmd == "bring" then -- Client side visual bring
        for _,v in pairs(game.Players:GetPlayers()) do if v.Name:lower():find(args[2]:lower()) and v.Character then v.Character:MoveTo(root.Position) end end
    elseif cmd == "btools" then for i=1,4 do Instance.new("HopperBin", lp.Backpack).BinType = i end
    elseif cmd == "god" then if hum then hum.MaxHealth = math.huge; hum.Health = math.huge end
    elseif cmd == "ungod" then hum.MaxHealth = 100; hum.Health = 100
    elseif cmd == "invisible" then for _,v in pairs(char:GetDescendants()) do if v:IsA("BasePart") then v.Transparency = 1 end end
    elseif cmd == "visible" then for _,v in pairs(char:GetDescendants()) do if v:IsA("BasePart") then v.Transparency = 0 end end
    elseif cmd == "tp" then local tool = Instance.new("Tool", lp.Backpack); tool.Name = "Click TP"; tool.Activated:Connect(function() root.CFrame = CFrame.new(mouse.Hit.p) + Vector3.new(0,3,0) end) -- 20

    elseif cmd == "day" then lighting.ClockTime = 14
    elseif cmd == "night" then lighting.ClockTime = 0
    elseif cmd == "nofog" then lighting.FogEnd = 100000
    elseif cmd == "fullbright" then lighting.Brightness = 2; lighting.Ambient = Color3.new(1,1,1)
    elseif cmd == "esp" then 
        for _,v in pairs(game.Players:GetPlayers()) do 
            if v ~= lp and v.Character then 
                local h = Instance.new("Highlight", v.Character); h.FillTransparency = 0.5; h.OutlineColor = Color3.new(1,0,0)
            end 
        end
    elseif cmd == "unesp" then for _,v in pairs(workspace:GetDescendants()) do if v:IsA("Highlight") then v:Destroy() end end
    elseif cmd == "facesp" then -- Placeholder for specific Face ESP
    elseif cmd == "float" then instance = Instance.new("BodyVelocity", root); instance.Velocity = Vector3.new(0,0,0)
    elseif cmd == "unfloat" then for _,v in pairs(root:GetChildren()) do if v:IsA("BodyVelocity") then v:Destroy() end end
    elseif cmd == "spin" then local bg = Instance.new("BodyAngularVelocity", root); bg.AngularVelocity = Vector3.new(0,10,0); bg.MaxTorque = Vector3.new(0,math.huge,0) -- 30
    
    elseif cmd == "unspin" then for _,v in pairs(root:GetChildren()) do if v:IsA("BodyAngularVelocity") then v:Destroy() end end
    elseif cmd == "dance" then 
        local anim = Instance.new("Animation"); anim.AnimationId = "rbxassetid://3333499508" -- Floss
        local track = hum:LoadAnimation(anim); track:Play(); track.Looped = true
    elseif cmd == "undance" then for _,v in pairs(hum:GetPlayingAnimationTracks()) do v:Stop() end
    elseif cmd == "freeze" then root.Anchored = true
    elseif cmd == "thaw" then root.Anchored = false
    elseif cmd == "hipheight" then hum.HipHeight = tonumber(args[2]) or 0
    elseif cmd == "headsize" then if char:FindFirstChild("Head") then char.Head.Size = Vector3.new(args[2],args[2],args[2]) end
    elseif cmd == "chat" then tcs.TextChannels.RBXGeneral:SendAsync(str:sub(6))
    elseif cmd == "spam" then -- Simple loop spam
        _G.Spam = true; while _G.Spam do tcs.TextChannels.RBXGeneral:SendAsync(str:sub(6)); task.wait(1) end
    elseif cmd == "unspam" then _G.Spam = false -- 40

    elseif cmd == "kick" then lp:Kick("Bye")
    elseif cmd == "serverinfo" then print(game.JobId)
    elseif cmd == "fps" then setfpscap(tonumber(args[2]))
    elseif cmd == "lowgfx" then workspace.Terrain.WaterWaveSize = 0; lighting.GlobalShadows = false
    elseif cmd == "fixcam" then workspace.CurrentCamera.CameraSubject = hum
    elseif cmd == "strech" then for _,v in pairs(char:GetChildren()) do if v:IsA("BasePart") then v.Size = Vector3.new(2,2,2) end end
    elseif cmd == "unstrech" then lp:LoadCharacter()
    elseif cmd == "noanim" then hum.Animator:Destroy()
    elseif cmd == "infjump" then uis.JumpRequest:Connect(function() hum:ChangeState("Jumping") end)
    elseif cmd == "hidegui" then frame.Visible = false -- 50
    end
end

-- 6. LISTENERS
lp.Chatted:Connect(function(m) if m:sub(1,1) == prefix then exec(m:sub(2)) end end)
for _, p in pairs(game.Players:GetPlayers()) do 
    p.Chatted:Connect(function(m) if ADMINS[p.Name] and m:sub(1,1) == prefix then exec(m:sub(2)) end end) 
end

-- Command Bar
local bar = Instance.new("TextBox", frame)
bar.Size = UDim2.new(0.9, 0, 0, 35); bar.Position = UDim2.new(0.05, 0, 0.9, 0)
bar.BackgroundColor3 = Color3.fromRGB(30,30,35); bar.TextColor3 = Color3.new(1,1,1); bar.PlaceholderText = "Type command..."
Instance.new("UICorner", bar)
bar.FocusLost:Connect(function(e) if e then exec(bar.Text); bar.Text = "" end end)

-- Noclip Loop
rs.Stepped:Connect(function()
    if noclip and lp.Character then
        for _,v in pairs(lp.Character:GetDescendants()) do if v:IsA("BasePart") then v.CanCollide = false end end
    end
end)