Haddock - Roblox Library

"Make a script that plays a coin sound when the player collects it with instructions"

"when you the block you will enter a random roblox game"

"make me a roblox exploit script that makes me fly when I press E"

-- local script 
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()

local function fly()
    local character = player.Character
    if character then
        local humanoid = character:FindFirstChildOfClass("Humanoid")
        if humanoid then
            humanoid.PlatformStand = true
            local force = Instance.new("BodyForce", humanoid.Torso)
            force.Name = "FlyForce"
            force.force = Vector3.new(0, humanoid.MaxJumpForce * 2, 0)
        end
    end
end

mouse.KeyDown:Connect(function(key)
    if key == "e" then
        fly()
    end
end)

mouse.KeyUp:Connect(function(key)
    if key == "e" then
        local character = player.Character
        if character then
            local humanoid = character:FindFirstChildOfClass("Humanoid")
            if humanoid then
                humanoid.PlatformStand = false
                local flyForce = humanoid.Torso:FindFirstChild("FlyForce")
                if flyForce then
                    flyForce:Destroy()
                end
            end
        end
    end
end)

"when runservice is on serverscript service and serverstorage hides game files, try using a remote event"

-- server script 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ServerScriptService = game:GetService("ServerScriptService")
local ServerStorage = game:GetService("ServerStorage")
local RunService = game:GetService("RunService")

local remoteEvent = Instance.new("RemoteEvent")
remoteEvent.Name = "ToolRemoteEvent"
remoteEvent.Parent = ReplicatedStorage

local tool1 = ServerStorage:FindFirstChild("M4A1")
local tool2 = ServerStorage:FindFirstChild("G17")

remoteEvent.OnServerEvent:Connect(function(player)
    if tool1 and tool2 then
        local backpack = player:WaitForChild("Backpack")
        local newtoolI = tool1:Clone()
        newtoolI.Parent = backpack
        local newtoolII = tool2:Clone()
        newtoolII.Parent = backpack
    else
        warn("Tools not found in ServerStorage!")
    end
end)

-- local script 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local remoteEvent = ReplicatedStorage:WaitForChild("ToolRemoteEvent")

local button = script.Parent

local function onButton1Click()
    remoteEvent:FireServer()
end

button.MouseButton1Click:Connect(onButton1Click)

"Make me the script where I can pass the football ball perfectly to my teammates and the opposing team can't get them"

-- local script 
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character
local humanoid = character:WaitForChild("Humanoid")
local ball = game.Workspace.Football

local function passBall()
    local closestTeammate
    local closestDistance = math.huge

for _, otherPlayer in ipairs(Players:GetPlayers()) do
        if otherPlayer.TeamColor == player.TeamColor and otherPlayer ~= player then
            local otherCharacter = otherPlayer.Character
            if otherCharacter and otherCharacter:FindFirstChild("HumanoidRootPart") then
                local distance = (character.HumanoidRootPart.Position - otherCharacter.HumanoidRootPart.Position).Magnitude
                if distance < closestDistance then
                    closestDistance = distance
                    closestTeammate = otherCharacter
                end
            end
        end
    end

if closestTeammate and closestTeammate:FindFirstChild("HumanoidRootPart") then
        local targetPosition = closestTeammate.HumanoidRootPart.Position
        local direction = (targetPosition - ball.Position).Unit
        local force = Instance.new("BodyVelocity")
        force.Velocity = direction * 50
        force.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
        force.Parent = ball
        wait(1)
        force:Destroy()
    end
end

humanoid.Running:Connect(function(speed)
    if speed > 0 and humanoid.TargetPoint ~= nil then
        passBall()
    end
end)

"make a script with a fancy gui that gives me the option to change the amount of health I have"

"create a part that emits fire"

"create a script inside a screen gui that blurs out the background of the ui"

"gui for play, wait, and rejoin"

-- local script 
local player = game.Players.LocalPlayer
local screenGui = Instance.new("ScreenGui")
local frame = Instance.new("Frame")
local playButton = Instance.new("TextButton")
local rejoinButton = Instance.new("TextButton")
local waitButton = Instance.new("TextButton")

screenGui.Parent = player.PlayerGui
frame.Parent = screenGui
playButton.Parent = frame
rejoinButton.Parent = frame
waitButton.Parent = frame

frame.Size = UDim2.new(0, 200, 0, 100)
frame.Position = UDim2.new(0.5, -100, 0.5, -50)
frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)

playButton.Size = UDim2.new(0, 100, 0, 50)
playButton.Position = UDim2.new(0, 0, 0, 0)
playButton.Text = "Play"
playButton.MouseButton1Click:Connect(function()
    screenGui:Destroy()
end)

rejoinButton.Size = UDim2.new(0, 100, 0, 50)
rejoinButton.Position = UDim2.new(0, 0, 0, 50)
rejoinButton.Text = "Rejoin"
rejoinButton.MouseButton1Click:Connect(function()
    game:GetService("TeleportService"):Teleport(game.PlaceId)
end)

waitButton.Size = UDim2.new(0, 100, 0, 50)
waitButton.Position = UDim2.new(0.5, 0, 0, 0)
waitButton.Text = "Wait (20)"
waitButton.MouseButton1Click:Connect(function()
    screenGui:Destroy()
    player.Character.Humanoid.WalkSpeed = 0
    wait(20)
    player.Character.Humanoid.WalkSpeed = 16
end)

"player dash. players dash when pressing Q and plays animation"

"make a script that give a player walkspeed 10 when joined"

"create a zombie spawner"

"make my Part spin horizontal"

"Create a button when clicked slowly moves a model up a configurable amount of studs."

"make me fly if i press "e" and i can toggle on/off."

"add debounce"

"make a script if you touch Part1 it gets the sword from the folder called folder1 then gets the sword then gives it to you"

"create a buffs system when the player presses c ingame give them 15% plus Hp 10% plus speed to their humanoid stats and make it last 1 MInute then remove the buffs and add a 3 Minute cd"

```lua
-- local script to be placed in StarterPlayerScripts 
local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local cooldown = false

local function applyBuffs()
    if cooldown then
        return
    end
    cooldown = true
    local character = player.Character or player.CharacterAdded:Wait()
    local humanoid = character:FindFirstChildOfClass("Humanoid")
    
    if humanoid then
        -- Apply buffs
        humanoid.MaxHealth = humanoid.MaxHealth * 1.15
        humanoid.Health = humanoid.Health * 1.15
        humanoid.WalkSpeed = humanoid.WalkSpeed * 1.10
        
        wait(60) -- Buff duration
        
        -- Remove buffs
        humanoid.MaxHealth = humanoid.MaxHealth / 1.15
        humanoid.Health = humanoid.Health / 1.15
        humanoid.WalkSpeed = humanoid.WalkSpeed / 1.10
    end
    
    wait(180) -- Cooldown duration
    cooldown = false
end

UserInputService.InputBegan:Connect(function(input, gameProcessedEvent)
    if gameProcessedEvent then return end
    if input.KeyCode == Enum.KeyCode.C then
        applyBuffs()
    end
end)
```

"3d model a idiot"

-- ScripterAI can only help with scripting as of now, so here's a script for the 3d model 
local model = game.Workspace.Model

model:SetPrimaryPartCFrame(CFrame.new(0, 0, 0))
model:SetPrimaryPartCFrame(CFrame.Angles(math.rad(0), math.rad(0), math.rad(0)))
model:SetPrimaryPartCFrame(CFrame.new(0, 0, 0))

local head = Instance.new("Part", model)
head.Name = "Head"
head.Size = Vector3.new(1, 1, 1)
head.BrickColor = BrickColor.new("Bright yellow")
head.CFrame = CFrame.new(0, 1, 0)

local torso = Instance.new("Part", model)
torso.Name = "Torso"
torso.Size = Vector3.new(2, 2, 1)
torso.BrickColor = BrickColor.new("Bright yellow")
torso.CFrame = CFrame.new(0, 0.5, 0)

local leftArm = Instance.new("Part", model)
leftArm.Name = "LeftArm"
leftArm.Size = Vector3.new(1, 1, 1)
leftArm.BrickColor = BrickColor.new("Bright yellow")
leftArm.CFrame = CFrame.new(-1, 0.5, 0)

local rightArm = Instance.new("Part", model)
rightArm.Name = "RightArm"
rightArm.Size = Vector3.new(1, 1, 1)
rightArm.BrickColor = BrickColor.new("Bright yellow")
rightArm.CFrame = CFrame.new(1, 0.5, 0)

local leftLeg = Instance.new("Part", model)
leftLeg.Name = "LeftLeg"
leftLeg.Size = Vector3.new(1, 1, 1)
leftLeg.BrickColor = BrickColor.new("Bright yellow")
leftLeg.CFrame = CFrame.new(-0.5, 0, 0)

local rightLeg = Instance.new("Part", model)
rightLeg.Name = "RightLeg"
rightLeg.Size = Vector3.new(1, 1, 1)
rightLeg.BrickColor = BrickColor.new("Bright yellow")
rightLeg.CFrame = CFrame.new(0.5, 0, 0)

"make an animated Play button"

"make me a scripter on where I click on a part, the part goes into my inventory and I'm able to equip it and text inside the script to show me how to set the entire thing up studio"

"make the part the script is inside of move back and forth random 0.5 to 5 seconds in a 20 stud amount"

"create me a script that when you are on a part you get 50 walkspeed, but when you are not on it, you have 16 walkspeed"

"there is a counter at the top of the screen what counts your steps"

"NPC spawner will spawn 3 random NPC in one spawner"

"only move to the door if the nearest waypoint is 20 and the npc has already moved to 20 before"

-- server script 
local pfs = game:GetService("PathfindingService")
local dummy = script.Parent 
local waypoints = script.Parent.Parent.Parent.Waypoints:GetChildren() -- List of waypoints
local door = game.Workspace.Door
local doorRange = 20
local attackRange = 5
local currentWaypointIndex = 1
local hasMovedTo20 = false

-- Function to attack the door
local function attackDoor()
    dummy.Humanoid:MoveTo(door.Position)
    if (door.Position - dummy.HumanoidRootPart.Position).Magnitude < attackRange then
        local attackAnimation = dummy.Humanoid:LoadAnimation(dummy.Animations.AttackAnimation)
        attackAnimation:Play()
        print("NPC is attacking the door!") -- log the attack event
    end
end

-- Function to move to the next waypoint or door
local function moveToNextWaypointOrDoor()
    while true do
        local nearestWaypointIndex = 1
        local nearestWaypointDistance = (waypoints[1].Position - dummy.HumanoidRootPart.Position).Magnitude
        for i=2, #waypoints do
            local distance = (waypoints[i].Position - dummy.HumanoidRootPart.Position).Magnitude
            if distance < nearestWaypointDistance then
                nearestWaypointIndex = i
                nearestWaypointDistance = distance
            end
        end
        currentWaypointIndex = nearestWaypointIndex
        if (waypoints[currentWaypointIndex].Position - dummy.HumanoidRootPart.Position).Magnitude < 1 then
            currentWaypointIndex = currentWaypointIndex % #waypoints + 1
        end
        print("Moving to waypoint: " .. waypoints[currentWaypointIndex].Name .. " at position: " .. tostring(waypoints[currentWaypointIndex].Position)) -- log the next waypoint
        local path = pfs:CreatePath()
        path:ComputeAsync(dummy.HumanoidRootPart.Position, waypoints[currentWaypointIndex].Position)
        for _, waypoint in pairs(path:GetWaypoints()) do
            dummy.Humanoid:MoveTo(waypoint.Position)
            dummy.Humanoid.MoveToFinished:Wait()
        end
        if currentWaypointIndex == 20 then
            hasMovedTo20 = true
        end
        if currentWaypointIndex == #waypoints and hasMovedTo20 then
            dummy.Humanoid:MoveTo(door.Position)
        end
        task.wait(1)
    end
end

-- Start the NPC's behavior
spawn(moveToNextWaypointOrDoor)

"a gui that moves with 4 other GUI that can control its a gui that moves with 4 other GUI that can control its movement, the movement is tweened"

-- local script (StarterGui) 
local player = game.Players.LocalPlayer
local screenGui = Instance.new("ScreenGui", player.PlayerGui)

local mainGui = Instance.new("Frame", screenGui)
mainGui.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
mainGui.Position = UDim2.new(0.5, 0, 0.5, 0)
mainGui.Size = UDim2.new(0, 200, 0, 200)
mainGui.AnchorPoint = Vector2.new(0.5, 0.5)

local gui1 = Instance.new("Frame", mainGui)
gui1.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
gui1.Position = UDim2.new(0, 0, 0, 0)
gui1.Size = UDim2.new(0, 50, 0, 50)

local gui2 = Instance.new("Frame", mainGui)
gui2.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
gui2.Position = UDim2.new(1, 0, 0, 0)
gui2.Size = UDim2.new(0, 50, 0, 50)

local gui3 = Instance.new("Frame", mainGui)
gui3.BackgroundColor3 = Color3.fromRGB(0, 0, 255)
gui3.Position = UDim2.new(0, 0, 1, 0)
gui3.Size = UDim2.new(0, 50, 0, 50)

local gui4 = Instance.new("Frame", mainGui)
gui4.BackgroundColor3 = Color3.fromRGB(255, 255, 0)
gui4.Position = UDim2.new(1, 0, 1, 0)
gui4.Size = UDim2.new(0, 50, 0, 50)

local tweenService = game:GetService("TweenService")
local info = TweenInfo.new(1, Enum.EasingStyle.Quad, Enum.EasingDirection.Out)

gui1.MouseButton1Down:Connect(function()
    local tween = tweenService:Create(mainGui, info, {Position = UDim2.new(0, 50, 0, 50)})
    tween:Play()
end)

gui2.MouseButton1Down:Connect(function()
    local tween = tweenService:Create(mainGui, info, {Position = UDim2.new(1, -50, 0, 50)})
    tween:Play()
end)

gui3.MouseButton1Down:Connect(function()
    local tween = tweenService:Create(mainGui, info, {Position = UDim2.new(0, 50, 1, -50)})
    tween:Play()
end)

gui4.MouseButton1Down:Connect(function()
    local tween = tweenService:Create(mainGui, info, {Position = UDim2.new(1, -50, 1, -50)})
    tween:Play()
end)

"make a gui thats name clickButton thats a button and make it so whenever you click the button it gives you more points also add a leaderboard."

"Create a vote kick script in a serverscript. Yes, no buttons and text label are placed at game.StarterGui.VoteKickGui.Frame The vote kick should end when all the players voted or after 5 seconds."

-- Server Script

local Frame = game.StarterGui.VoteKickGui.Frame
local VoteYes = Frame.Yes
local VoteNo = Frame.No
local VoteLabel = Frame.Label

local Players = game.Players:GetPlayers()
local VoteCount = 0

-- Function to start the vote
function StartVote(TargetPlayer)
    VoteCount = 0
    VoteLabel.Text = "Vote to kick "..TargetPlayer.Name.."?"

for _, Player in pairs(Players) do
        VoteYes.Visible = true
        VoteNo.Visible = true
        VoteYes.TextButton.Text = "Yes ("..VoteCount..")"
        VoteNo.TextButton.Text = "No ("..VoteCount..")"

VoteYes.MouseButton1Click:Connect(function()
            VoteCount = VoteCount + 1
            VoteYes.TextButton.Text = "Yes ("..VoteCount..")"
        end)

VoteNo.MouseButton1Click:Connect(function()
            VoteCount = VoteCount - 1
            VoteNo.TextButton.Text = "No ("..VoteCount..")"
        end)
    end

-- Wait for 5 seconds or until all players have voted
    wait(5)
    if VoteCount > 0 then
        TargetPlayer:Kick()
    end

-- Reset the vote
    VoteYes.Visible = false
    VoteNo.Visible = false
    VoteLabel.Text = ""
end

"Make me a script where I can change the angle of my screen up and down. I can use the keybinds f and g to switch the angles 5 and -5. Then make that script to be able to be used in football games."

"make a jump animation"

"make a script showing a notification with the errors in the output."

"agora faça um sistema de simulador de velocidade no roblox studio. quanto mais tempo o jogador correr, mais rapido ele corre. Leaderboard mostrando a velocidade atual do jogador. script completo, eficaz e complexo."

-- server script
local Players = game:GetService("Players")

local function onPlayerAdded(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player

local jumpPower = Instance.new("IntValue")
    jumpPower.Name = "JumpPower"
    jumpPower.Value = 50
    jumpPower.Parent = leaderstats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- local script
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local leaderstats = player:WaitForChild("leaderstats")
local jumpPower = leaderstats:WaitForChild("JumpPower")
local jumping = false

local function updateJumpPower()
    while jumping do
        jumpPower.Value = jumpPower.Value   1
        humanoid.JumpPower = jumpPower.Value
        wait(0.5)
  end
end

local function onJumpRequest()
    if not jumping then
        jumping = true
        updateJumpPower()
    end
end

humanoid.JumpRequest:Connect(onJumpRequest)
humanoid.Landed:Connect(function()
    jumping = false
end)

-- TextLabel update script (inside a ScreenGui)
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local leaderstats = player:WaitForChild("leaderstats")
local jumpPower = leaderstats:WaitForChild("JumpPower")
local textLabel = script.Parent

while true do
    textLabel.Text = "Jump Power: " .. jumpPower.Value
    wait(1)
end

"When player says take me to hell, the player will catch on fire explode and die"

"make a script that makes 1234gzow huge SIMPLE."

"make a small red part"

"Create a script that keeps a part on the tracks. But instead of the part moving to the exact CFrame of the tracks the part can still move through it like a ski lift or a zipline."

"create me a script that whenever I jump, it kicks me out of the game"

"can you make me a script that gives a player a run, jump, and idle animation. and after they stop running for example the animation stops."

-- local script 
local player = game.Players.LocalPlayer
local humanoid = player.Character.Humanoid
local runAnim = Instance.new("Animation")
runAnim.AnimationId = "rbxassetid://your_run_animation_id_here"
local jumpAnim = Instance.new("Animation")
jumpAnim.AnimationId = "rbxassetid://your_jump_animation_id_here"
local idleAnim = Instance.new("Animation")
idleAnim.AnimationId = "rbxassetid://your_idle_animation_id_here"

local runTrack = humanoid:LoadAnimation(runAnim)
local jumpTrack = humanoid:LoadAnimation(jumpAnim)
local idleTrack = humanoid:LoadAnimation(idleAnim)

humanoid.Running:Connect(function(speed)
    if speed > 0 then
        if not runTrack.IsPlaying then
            runTrack:Play()
        end
    else
        runTrack:Stop()
    end
end)

humanoid.Jumping:Connect(function()
    if not jumpTrack.IsPlaying then
        jumpTrack:Play()
    end
end)

humanoid:GetPropertyChangedSignal("Jump"):Connect(function()
    if not humanoid.Jump then
        jumpTrack:Stop()
    end
end)

humanoid:GetPropertyChangedSignal("MoveDirection"):Connect(function()
    if humanoid.MoveDirection.Magnitude == 0 then
        if not idleTrack.IsPlaying then
            idleTrack:Play()
        end
    else
        idleTrack:Stop()
    end
end)

"anchor the humanoid rootpart"

"make an event that removes all players hats, gives all players in the server 2 accessories from replicatedstorage for 60 seconds, and give them their original hats back after the 60 seconds. add detailed instructions and comments."

-- server script (ServerScriptService) 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")

local accessories = ReplicatedStorage.Accessories:GetChildren()

local function getRandomAccessory()
    local index = math.random(1, #accessories)
    return accessories[index]:Clone()
end

local function removeAllHats(player)
    local character = player.Character
    if character then
        local hats = {}
        for _, accessory in ipairs(character:GetChildren()) do
            if accessory:IsA("Accessory") then
                table.insert(hats, accessory)
                accessory:Destroy()
            end
        end
        return hats
    end
end

local function giveAccessories(player, originalHats)
    local character = player.Character
    if character then
        local newAccessories = {getRandomAccessory(), getRandomAccessory()}
        for _, accessory in ipairs(newAccessories) do
            accessory.Parent = character
        end
        wait(60)
        for _, accessory in ipairs(newAccessories) do
            accessory:Destroy()
        end
        for _, hat in ipairs(originalHats) do
            hat.Parent = character
        end
    end
end

local function onAccessoryEvent()
    for _, player in ipairs(Players:GetPlayers()) do
        local originalHats = removeAllHats(player)
        giveAccessories(player, originalHats)
    end
end

game.ReplicatedStorage.AccessoryEvent.OnServerEvent:Connect(onAccessoryEvent)

-- create a RemoteEvent named "AccessoryEvent" in ReplicatedStorage

"but jump power increases every second"

"Make a nice and aesthetic looking GUI that greets you to a game named "Coloured Cars" that says "Press anything to continue" and closes when you press anything on the keyboard or if you click the mouse button and doesn't re-open when you die."

To create a GUI that greets the player and closes on any input, follow these steps:

1. In the Roblox Studio, click on the "StarterGui" folder in the Explorer.
2. Right-click on "StarterGui" and select "Insert Object" > "ScreenGui".
3. Name the new ScreenGui "WelcomeGui".
4. Right-click on "WelcomeGui" and select "Insert Object" > "TextLabel".
5. Name the new TextLabel "WelcomeText".
6. Customize the TextLabel's properties (such as Size, Position, Font, TextSize, etc.) to make it look aesthetic and display the desired text: "Welcome to Coloured Cars! Press anything to continue."
7. Create a LocalScript inside the "WelcomeGui" with the following code:

```lua
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")

local player = Players.LocalPlayer
local gui = script.Parent
local welcomeText = gui.WelcomeText

local function closeGui()
    gui.Enabled = false
end

local function onInputBegan(input, gameProcessed)
    if not gameProcessed then
        closeGui()
        UserInputService.InputBegan:Disconnect(onInputBegan)
    end
end

UserInputService.InputBegan:Connect(onInputBegan)

player.CharacterAdded:Connect(function()
    if not gui.Enabled then
        gui.Enabled = true
        UserInputService.InputBegan:Connect(onInputBegan)
    end
end)
```

This script will close the GUI when any input is detected (keyboard or mouse) and will not re-open it when the player dies.

"when the local player died make the script.parent.enabled = true"

"make a script so that a part changes to rainbow colors"

"if a player with the item "15324577" in their avatar joins they get kicked for reason : "e-kitten / e-boy detected 😨" -- tell me where to put the script"

"make a part change color every 2 seconds to a random color"

"Make a nice looking GUI that flashes with red and covers the whole screen that greets you to a game named "Coloured Cars" Make it say "Press anything to continue" and closes when you press anything on the keyboard and doesn't re-open when you die."

"Make me a roblox football script where my camera angle sets the perfect angle for the best dime. It determines the best perfect angle with the football power. I press the button g to active this script."

-- local script 
local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local football = game.Workspace.Football
local camera = workspace.CurrentCamera
local power = 50 -- adjust this value for the football power

local function setCameraAngle()
    local footballPosition = football.Position
    local characterPosition = character.HumanoidRootPart.Position
    local distance = (footballPosition - characterPosition).Magnitude
    local angle = math.atan((power^2 - math.sqrt(power^4 - 9.81*(9.81*distance^2 + 2*power^2*distance)))/(9.81*distance))
    camera.CFrame = CFrame.new(characterPosition, footballPosition) * CFrame.Angles(angle, 0, 0)
end

local function onInput(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.G and not gameProcessed then
        setCameraAngle()
    end
end

UserInputService.InputBegan:Connect(onInput)

"Make a script that teleports a player when they touch a part to another part, it just replaces the players location with the part."

"create a script inside a text label that shows the players name"

"create a generic time stop script"

"a tweened part"

"make a play and quit button"

"make a script that loop teleports my character behind of the nearest enemy and then loop teleports my character Infront of the nearest enemy"

-- local script 
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local Character = LocalPlayer.Character
local HumanoidRootPart = Character:FindFirstChild("HumanoidRootPart")

while wait(1) do
    local closestEnemy = nil
    local shortestDistance = math.huge

for _, player in pairs(Players:GetPlayers()) do
        if player ~= LocalPlayer then
            local enemyCharacter = player.Character
            local enemyHumanoidRootPart = enemyCharacter and enemyCharacter:FindFirstChild("HumanoidRootPart")
            if enemyHumanoidRootPart then
                local distance = (HumanoidRootPart.Position - enemyHumanoidRootPart.Position).Magnitude
                if distance < shortestDistance then
                    shortestDistance = distance
                    closestEnemy = enemyHumanoidRootPart
                end
            end
        end
    end

if closestEnemy then
        -- teleport behind the enemy
        HumanoidRootPart.CFrame = CFrame.new(closestEnemy.Position + closestEnemy.CFrame.lookVector * -5, closestEnemy.Position)
        wait(1)
        -- teleport in front of the enemy
        HumanoidRootPart.CFrame = CFrame.new(closestEnemy.Position + closestEnemy.CFrame.lookVector * 5, closestEnemy.Position)
    end
end

"make a chain lightning ability and add instructions on how to add the code and use the code"

-- server script (ServerScriptService) 
local function chainLightning(player, target, range, maxTargets)
    local visited = {}
    local function chain(target, remainingTargets)
        if remainingTargets <= 0 then return end
        visited[target] = true
        local targetsInRange = workspace:FindPartsInRegion3WithWhiteList(
            Region3.new(target.Position - Vector3.new(range, range, range),
            target.Position + Vector3.new(range, range, range)), {workspace.Players}, maxTargets
        )
        for _, newTarget in ipairs(targetsInRange) do
            if not visited[newTarget] and newTarget:IsA("Model") and newTarget:FindFirstChild("Humanoid") then
                visited[newTarget] = true
                local lightning = Instance.new("Part")
                lightning.Name = "Lightning"
                lightning.Parent = workspace
                lightning.BrickColor = BrickColor.new("Bright blue")
                lightning.Material = Enum.Material.Neon
                lightning.Anchored = true
                lightning.CFrame = CFrame.new(target.Position, newTarget.Position) * CFrame.new(0, 0, -range/2)
                lightning.Size = Vector3.new(0.2, 0.2, range)
                newTarget.Humanoid:TakeDamage(10)
                wait(0.1)
                chain(newTarget, remainingTargets - 1)
                lightning:Destroy()
            end
        end
    end
    chain(target, maxTargets)
end

-- remote event (ReplicatedStorage) 
local replicatedStorage = game:GetService("ReplicatedStorage")
local chainLightningEvent = Instance.new("RemoteEvent")
chainLightningEvent.Name = "ChainLightningEvent"
chainLightningEvent.Parent = replicatedStorage

chainLightningEvent.OnServerEvent:Connect(function(player, target)
    chainLightning(player, target, 10, 5)
end)

Instructions:
1. Create a new script in ServerScriptService and paste the server script code above.
2. Create a RemoteEvent in ReplicatedStorage and name it "ChainLightningEvent".
3. In a LocalScript, you can now call the chain lightning ability by using the following code:

```lua
local replicatedStorage = game:GetService("ReplicatedStorage")
local chainLightningEvent = replicatedStorage:WaitForChild("ChainLightningEvent")

local target = game.Workspace.TargetModel -- Replace this with the actual target model you want to use

chainLightningEvent:FireServer(target)
```

Replace "TargetModel" with the actual target model you want to use for the chain lightning ability.

"Make a script that teleports a player when they touch a part to another part, it just replaces the players humanoidrootpart location with the parts position."

"make me a server script kicks all players for the reason: User requested server shutdown -- Report users abusing are admin system at our discord server"

"create a script that part that gives a tool in serverstorage based on a players Level but if player isnt high level enough that player wont receive a tool and will reveive a text that says not enough level"

"create a code when you touch a part1 another part2 will be invisible for 3 seconds"

"make a script when you say /execute in chat and put a website after with lua code then it runs the lua code if it has it. Expected '(', '{' or <string> when parsing function call, got ',' OnMessageReceived is not a valid member of Chat "Chat""

"Make me a script where I can adjust my camera angle with the key binds f and g. F to make it go up and g to make it go down. Then I use the bind z to lock the camera on my teammate."

"if you say /execute and put a link with just lua code it will execute the lua code."

"make a gui that gives you admin"

"Create a script that uses 4 different audios that play as backround music. make them all change between eachother when one of them ends"

"Make a loading screen and the stop the character from autoloading in, only after they click the play button will their character load in the game"

"make a local script for a ui that only makes it visible if the player is stage 210"

"light switch system"

"night vision able to see in dark, thermal vision able to detect humanoids, sonar able to detect humanoids and objects behind a wall."

-- local script 
local player = game:GetService("Players").LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()

local nightVision = Instance.new("ColorCorrectionEffect")
nightVision.Parent = workspace.CurrentCamera
nightVision.Enabled = false

local thermalVision = Instance.new("ColorCorrectionEffect")
thermalVision.Parent = workspace.CurrentCamera
thermalVision.Enabled = false

local sonarVision = Instance.new("ColorCorrectionEffect")
sonarVision.Parent = workspace.CurrentCamera
sonarVision.Enabled = false

function toggleNightVision()
    nightVision.Enabled = not nightVision.Enabled
    thermalVision.Enabled = false
    sonarVision.Enabled = false
end

function toggleThermalVision()
    thermalVision.Enabled = not thermalVision.Enabled
    nightVision.Enabled = false
    sonarVision.Enabled = false
end

function toggleSonarVision()
    sonarVision.Enabled = not sonarVision.Enabled
    nightVision.Enabled = false
    thermalVision.Enabled = false
end

-- Connect these functions to GUI buttons or keyboard inputs
-- Example:
-- guiButton1.MouseButton1Click:Connect(toggleNightVision)
-- guiButton2.MouseButton1Click:Connect(toggleThermalVision)
-- guiButton3.MouseButton1Click:Connect(toggleSonarVision)

"can you make a script where texture moves for like a lava texture but its surfaceappearance and not texture"

"make a roblox script where if Harlandroblox says !game3 then my Part called mmb will come out of ReplicatedStorage at position -151.893, 0.5, -16.464 and then it will more backwards at a speed of 20 for 20 seconds then it will disappear use tween service but there is also Another Part called mtt what does the same thing but Starts at position -71.388, 8.215, -149.406 and goes forward"

```lua
-- server script
local Players = game:GetService("Players")
local TweenService = game:GetService("TweenService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")

local mmb = ReplicatedStorage:WaitForChild("mmb")
local mtt = ReplicatedStorage:WaitForChild("mtt")

local function movePart(part, startPosition, endPosition, duration)
    local tweenInfo = TweenInfo.new(duration, Enum.EasingStyle.Linear, Enum.EasingDirection.Out)
    local tween = TweenService:Create(part, tweenInfo, {Position = endPosition})
    part.Position = startPosition
    part.Parent = workspace
    tween:Play()
    tween.Completed:Wait()
    part.Parent = ReplicatedStorage
end

local function onPlayerChatted(player, message)
    if message == "!game3" and player.Name == "Harlandroblox" then
        local mmbClone = mmb:Clone()
        local mttClone = mtt:Clone()

movePart(mmbClone, Vector3.new(-151.893, 0.5, -16.464), Vector3.new(-151.893, 0.5, -16.464) - Vector3.new(0, 0, 20), 20)
        movePart(mttClone, Vector3.new(-71.388, 8.215, -149.406), Vector3.new(-71.388, 8.215, -149.406) + Vector3.new(0, 0, 20), 20)
    end
end

Players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(message)
        onPlayerChatted(player, message)
    end)
end)
```
Make sure you have two parts named "mmb" and "mtt" in the ReplicatedStorage. This script will listen for the player "Harlandroblox" to say "!game3" in the chat, and when they do, it will move the parts "mmb" and "mtt" according to the specified positions and directions.

"Can you write a script that when ran teleports me to a player in a server?"

I can provide you with a script that teleports your character to another player when executed. Replace "TargetPlayerName" with the name of the player you want to teleport to.

```lua
-- server script
local Players = game:GetService("Players")
local yourPlayerName = "YourPlayerName" -- Replace with your player name
local targetPlayerName = "TargetPlayerName" -- Replace with the name of the player you want to teleport to

local yourPlayer = Players:FindFirstChild(yourPlayerName)
local targetPlayer = Players:FindFirstChild(targetPlayerName)

if yourPlayer and targetPlayer then
    local yourCharacter = yourPlayer.Character
    local targetCharacter = targetPlayer.Character

if yourCharacter and targetCharacter then
        local targetPosition = targetCharacter.HumanoidRootPart.Position
        yourCharacter.HumanoidRootPart.CFrame = CFrame.new(targetPosition + Vector3.new(0, 5, 0))
    else
        print("One of the characters is not spawned.")
    end
else
    print("One of the players is not in the server.")
end
```

Keep in mind that this script should be run as a server script, and you need to replace "YourPlayerName" and "TargetPlayerName" with the actual player names.

"a button that tweens around map and changes size and position every time clicked"

"when the spell lecutio has been said by the player and then clicked on the target, the target will loose health and ragdoll"

"give the player a Crown accessory from server tool it will add it to their character when the player touches a part named Roundspawn the Crown will stay on the player for 10 seconds if those 10 run outs if the player stays with the crown for 10 seconds 5 times give 1 Win"

```lua
-- server script to handle Crown accessory and wins 
local roundSpawn = game.Workspace.Roundspawn
local crownAccessoryId = "CROWN_ACCESSORY_ID" -- Replace CROWN_ACCESSORY_ID with the actual asset ID of the crown accessory
local winsNeeded = 5
local crownDuration = 10

local function onTouched(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        local leaderstats = player:FindFirstChild("leaderstats")
        local crownTime = leaderstats and leaderstats:FindFirstChild("CrownTime")
        local wins = leaderstats and leaderstats:FindFirstChild("Wins")
        
        if crownTime and wins then
            local accessory = game:GetService("InsertService"):LoadAsset(crownAccessoryId):GetChildren()[1]
            accessory.Parent = player.Character
            
            crownTime.Value = crownTime.Value + 1
            
            wait(crownDuration)
            
            if accessory and accessory.Parent then
                accessory:Destroy()
                
                if crownTime.Value >= winsNeeded then
                    wins.Value = wins.Value + 1
                    crownTime.Value = 0 -- Reset crown time after winning
                end
            end
        end
    end
end

roundSpawn.Touched:Connect(onTouched)

-- Make sure to setup leaderstats for each player to track CrownTime and Wins 
game.Players.PlayerAdded:Connect(function(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player
    
    local crownTime = Instance.new("IntValue")
    crownTime.Name = "CrownTime"
    crownTime.Value = 0
    crownTime.Parent = leaderstats
    
    local wins = Instance.new("IntValue")
    wins.Name = "Wins"
    wins.Value = 0
    wins.Parent = leaderstats
end)
```
This script assumes you have a part named `Roundspawn` in your Workspace. It also assumes that the player has a `leaderstats` folder with `CrownTime` and `Wins` as `IntValue` objects to track the number of times the player has held the crown for 10 seconds and the number of wins, respectively. Replace `CROWN_ACCESSORY_ID` with the actual asset ID of the crown accessory you want to use.

"Make a HotDog apier in backpack when i click on HotDogButton from replicatedstorage it costs 15 coins and when i buy it i can equip and unequip the HotDog to replicatedstorage from the same button"

"create code for a textbutton that will fire a remotevent named ClanEvent in replicated storage when pressed add a cooldown so the textbutton cant be spam clicked"

-- This mode only specializes in Module scripts, we recommend using another appropriate mode for getting better responses for this query 
-- local script (StarterGUI) 
local player = game.Players.LocalPlayer
local screenGui = player:WaitForChild("PlayerGui"):WaitForChild("ScreenGui")
local replicatedStorage = game:GetService("ReplicatedStorage")
local clanEvent = replicatedStorage:WaitForChild("ClanEvent")

local button = Instance.new("TextButton", screenGui)
button.Text = "Clan Event"
button.Size = UDim2.new(0, 200, 0, 50)
button.Position = UDim2.new(0.5, -100, 0.5, -25) -- Center the button
button.TextColor3 = Color3.fromRGB(255, 255, 255)
button.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local cooldown = false
local cooldownTime = 5 -- seconds

button.MouseButton1Click:Connect(function()
    if not cooldown then
        cooldown = true
        clanEvent:FireServer() -- Assuming it's a RemoteEvent
        button.Text = "Please wait..."
        
        -- Cooldown logic
        wait(cooldownTime)
        cooldown = false
        button.Text = "Clan Event"
    end
end)

"Make a part that if a player hits the part it will make them sit for 3 seconds then after they hit the part after 5 second they will instantly die"

"create night vision goggle script"

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local head = character:WaitForChild("Head")
local visionPart = Instance.new("Part")

local function createNightVision()
    visionPart.Name = "NightVision"
    visionPart.Size = Vector3.new(1, 1, 1)
    visionPart.Transparency = 0.5
    visionPart.BrickColor = BrickColor.new("Bright green")
    visionPart.Material = Enum.Material.Neon
    visionPart.Parent = head
    visionPart.CFrame = head.CFrame * CFrame.new(0, 0, -2.5)
    visionPart.Anchored = true
    visionPart.CanCollide = false
end

local function removeNightVision()
    if head:FindFirstChild("NightVision") then
        head.NightVision:Destroy()
    end
end

local function toggleNightVision()
    if head:FindFirstChild("NightVision") then
        removeNightVision()
    else
        createNightVision()
    end
end

local function onKeyPress(inputObject, gameProcessedEvent)
    if inputObject.KeyCode == Enum.KeyCode.N and not gameProcessedEvent then
        toggleNightVision()
    end
end

game:GetService("UserInputService").InputBegan:Connect(onKeyPress)

"script for a part to make it grow bigger and smaller"

"can you make a script that will kick the player who types the "!kick" command in chat"

-- server script
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")

local npc = script.Parent
local rootPart = npc.HumanoidRootPart
local humanoid = npc.Humanoid

rootPart.Touched:Connect(function(hit)
    local player = Players:GetPlayerFromCharacter(hit.Parent) -- find the player

if player then -- check if the player was found
        player.Character.Humanoid.Health = 0 -- damage the player
    end
end)

while true do
    for _, player in pairs(Players:GetPlayers()) do -- loop through all the players
        local playerRoot = player.Character and player.Character:FindFirstChild("HumanoidRootPart") -- get the player's humanoidrootpart

if playerRoot and (playerRoot.Position - rootPart.Position).Magnitude <= 25 then -- check if the player is near the npc
            humanoid:MoveTo(player.Character.HumanoidRootPart.Position) -- move the npc
            humanoid.MoveToFinished:Wait() -- wait until the npc has reached the player (not sure if i should use movetofinished)
            break -- break the loop so it doesn't follow a different player
        end
    end

RunService.Heartbeat:Wait() -- in case no player is near the npc
end

"make a roblox script for leaderstats for Robux"

"make a leaderboard for levels and also make it display the players level above the characters head and make the level go up every minute by one"

To create a leaderboard for levels and display the player's level above their character's head, as well as increment the level every minute, you will need to use a combination of server-side and client-side scripts. Below is a step-by-step guide to achieve this:

1. **Create a Leaderboard for Levels:**
   You will need to create a leaderstats folder and a Level value inside it for each player when they join the game.

```lua
-- Server Script
game.Players.PlayerAdded:Connect(function(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player

local level = Instance.new("IntValue")
    level.Name = "Level"
    level.Value = 1
    level.Parent = leaderstats
end)
```

2. **Display Player's Level Above Their Character's Head:**
   You will need to use a BillboardGui and a TextLabel to display the level above the player's character.

```lua
-- Local Script inside StarterPlayer -> StarterCharacterScripts
local player = game.Players.LocalPlayer
player.CharacterAdded:Connect(function(character)
    local head = character:WaitForChild("Head")
    local billboardGui = Instance.new("BillboardGui", head)
    billboardGui.Adornee = head
    billboardGui.Size = UDim2.new(0, 200, 0, 50)
    billboardGui.StudsOffset = Vector3.new(0, 2, 0)
    billboardGui.AlwaysOnTop = true

local textLabel = Instance.new("TextLabel", billboardGui)
    textLabel.BackgroundTransparency = 1
    textLabel.Size = UDim2.new(1, 0, 1, 0)
    textLabel.Text = "Level: " .. player.leaderstats.Level.Value
    textLabel.Font = Enum.Font.SourceSans
    textLabel.TextSize = 14
    textLabel.TextColor3 = Color3.new(1, 1, 1)

-- Update the level text when the player's level changes
    player.leaderstats.Level.Changed:Connect(function(newValue)
        textLabel.Text = "Level: " .. newValue
    end)
end)
```

3. **Increment the Level Every Minute:**
   You will need to use a while loop with a wait function to increment the level every minute.

```lua
-- Server Script
game.Players.PlayerAdded:Connect(function(player)
    local function incrementLevel()
        while true do
            wait(60) -- Wait for 1 minute
            if player.leaderstats and player.leaderstats:FindFirstChild("Level") then
                player.leaderstats.Level.Value = player.leaderstats.Level.Value + 1
            end
        end
    end

-- Start a coroutine to avoid blocking the main thread
    coroutine.wrap(incrementLevel)()
end)
```

Make sure to place the server scripts in `ServerScriptService` and the local script in `StarterPlayer > StarterCharacterScripts` for them to run correctly. The scripts provided are a basic implementation and may need to be adjusted based on your game's specific needs and setup.

"create a script that lets you drag a part with your left click when held"

"a roblox script that once you step on a part named "PartFreeze" it freezes your client for 3 seconds and the unfreezes it"

"Make a leaderboard with wins and a number counter that counts every minute and saves you wins and numbers also make it where you can only step on the wins part once everyday"

-- Script for leaderboard (ServerScriptService) 
local Players = game:GetService("Players")

local function onPlayerAdded(player)
    local stats = Instance.new("Folder")
    stats.Name = "leaderstats"
    stats.Parent = player

local wins = Instance.new("IntValue")
    wins.Name = "Wins"
    wins.Parent = stats

local numbers = Instance.new("IntValue")
    numbers.Name = "Numbers"
    numbers.Parent = stats

local lastWin = Instance.new("NumberValue")
    lastWin.Name = "LastWin"
    lastWin.Parent = stats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- Script for wins part 
local part = script.Parent
local debounce = true

local function onTouched(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player and debounce then
        debounce = false
        local lastWin = player.leaderstats.LastWin.Value
        local currentTime = os.time()

if currentTime - lastWin >= 86400 then
            player.leaderstats.Wins.Value = player.leaderstats.Wins.Value + 1
            player.leaderstats.LastWin.Value = currentTime
        end

wait(1)
        debounce = true
    end
end

part.Touched:Connect(onTouched)

-- Script for number counter (ServerScriptService) 
while true do
    wait(60)
    for _, player in ipairs(game.Players:GetPlayers()) do
        player.leaderstats.Numbers.Value = player.leaderstats.Numbers.Value + 1
    end
end

"make a roblox script whenever i hold down right click my mouse locks on to the most close player"

-- local script 
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local LocalPlayer = Players.LocalPlayer
local Mouse = LocalPlayer:GetMouse()

local function getClosestPlayer()
    local closestPlayer = nil
    local shortestDistance = math.huge

for _, player in ipairs(Players:GetPlayers()) do
        if player ~= LocalPlayer then
            local distance = (LocalPlayer.Character.Head.Position - player.Character.Head.Position).magnitude
            if distance < shortestDistance then
                closestPlayer = player
                shortestDistance = distance
            end
        end
    end

return closestPlayer
end

local function onMouseDown()
    local closestPlayer = getClosestPlayer()
    if closestPlayer then
        Mouse.TargetFilter = closestPlayer.Character
        Mouse.Icon = "rbxassetid://LockOnIconID" -- Replace with the ID of your lock-on icon
    end
end

local function onMouseUp()
    Mouse.TargetFilter = nil
    Mouse.Icon = ""
end

UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if input.UserInputType == Enum.UserInputType.MouseButton2 and not gameProcessed then
        onMouseDown()
    end
end)

UserInputService.InputEnded:Connect(function(input, gameProcessed)
    if input.UserInputType == Enum.UserInputType.MouseButton2 and not gameProcessed then
        onMouseUp()
    end
end)

"make a script that teleports my character 50 studs away from the nearest opposite team player and keeps it 50 studs always"

-- local script 
local Players = game:GetService("Players")
local function teleportAway()
    local myTeam = Players.LocalPlayer.Team
    local myCharacter = Players.LocalPlayer.Character
    local closestEnemy
    local closestDistance = math.huge
    for _, player in pairs(Players:GetPlayers()) do
        if player.Team ~= myTeam and player.Character then
            local distance = (myCharacter.HumanoidRootPart.Position - player.Character.HumanoidRootPart.Position).magnitude
            if distance < closestDistance then
                closestDistance = distance
                closestEnemy = player
            end
        end
    end
    if closestEnemy then
        local direction = (myCharacter.HumanoidRootPart.Position - closestEnemy.Character.HumanoidRootPart.Position).Unit
        myCharacter.HumanoidRootPart.CFrame = CFrame.new(closestEnemy.Character.HumanoidRootPart.Position + direction * 50, closestEnemy.Character.HumanoidRootPart.Position)
    end
end
game:GetService("RunService").Heartbeat:Connect(teleportAway)

"night vision able to see in dark, thermal vision able to detect humanoids, sonar able to detect humanoids and objects behind a wall."

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local nightVision = false
local thermalVision = false
local sonarVision = false

function enableNightVision()
    if not nightVision then
        nightVision = true
        game.Lighting.Ambient = Color3.fromRGB(100, 100, 100)
    else
        nightVision = false
        game.Lighting.Ambient = Color3.fromRGB(0, 0, 0)
    end
end

function enableThermalVision()
    if not thermalVision then
        thermalVision = true
        for _, obj in pairs(workspace:GetDescendants()) do
            if obj:IsA("Humanoid") then
                obj.Parent.Head.BrickColor = BrickColor.new("Bright red")
            end
        end
    else
        thermalVision = false
        for _, obj in pairs(workspace:GetDescendants()) do
            if obj:IsA("Humanoid") then
                obj.Parent.Head.BrickColor = BrickColor.new("Pastel brown")
            end
        end
    end
end

function enableSonarVision()
    if not sonarVision then
        sonarVision = true
        for _, obj in pairs(workspace:GetDescendants()) do
            if obj:IsA("Humanoid") or obj:IsA("Part") then
                obj.Transparency = 0.5
            end
        end
    else
        sonarVision = false
        for _, obj in pairs(workspace:GetDescendants()) do
            if obj:IsA("Humanoid") or obj:IsA("Part") then
                obj.Transparency = 0
            end
        end
    end
end

-- Bind these functions to specific keys or GUI buttons to toggle the vision modes
-- Example: game:GetService("UserInputService").InputBegan:Connect(function(input, gameProcessed)
--     if input.KeyCode == Enum.KeyCode.N then
--         enableNightVision()
--     elseif input.KeyCode == Enum.KeyCode.T then
--         enableThermalVision()
--     elseif input.KeyCode == Enum.KeyCode.S then
--         enableSonarVision()
--     end
-- end)

"make a script that unanchors the humanoid rootpart for a player"

"make a roblox lua scrpt that crashes you're game this is only for testing purpose"

"Noclip toggle"

"Create a checkpoint system where the player's location can be saved based on touching the checkpoint"

-- server script for checkpoint 
local checkpoint = script.Parent

local function saveCheckpoint(player)
    local playerStats = player:WaitForChild("leaderstats")
    playerStats.Checkpoint.Value = checkpoint.Position
end

local function onTouched(hit)
    local character = hit.Parent
    local humanoid = character:FindFirstChild("Humanoid")
    if humanoid then
        local player = game.Players:GetPlayerFromCharacter(character)
        if player then
            saveCheckpoint(player)
        end
    end
end

checkpoint.Touched:Connect(onTouched)

-- server script for respawning at checkpoint 
game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        local playerStats = player:WaitForChild("leaderstats")
        character:WaitForChild("Humanoid").Died:Connect(function()
            wait(5)
            local newCharacter = player:LoadCharacter()
            newCharacter:WaitForChild("HumanoidRootPart").CFrame = CFrame.new(playerStats.Checkpoint.Value)
        end)
    end)
end)

"script that changes the size of a part when a button is clicked"

"ranking system where everyone in the game starts off with 1000 elo the winner gains 10 elo from the loser only people who have 0-1000 elo can queue up against 0-1000 elo people and people with 1000-2000 elo can only queue up against eachother"

-- server script 
local Players = game:GetService("Players")
local function eloSystem(player1, player2, winner)
    local player1Elo = player1.leaderstats.Elo.Value
    local player2Elo = player2.leaderstats.Elo.Value

if (player1Elo >= 0 and player1Elo <= 1000) and (player2Elo >= 0 and player2Elo <= 1000) then
        if winner == player1 then
            player1.leaderstats.Elo.Value = player1Elo + 10
            player2.leaderstats.Elo.Value = player2Elo - 10
        else
            player1.leaderstats.Elo.Value = player1Elo - 10
            player2.leaderstats.Elo.Value = player2Elo + 10
        end
    elseif (player1Elo > 1000 and player1Elo <= 2000) and (player2Elo > 1000 and player2Elo <= 2000) then
        if winner == player1 then
            player1.leaderstats.Elo.Value = player1Elo + 10
            player2.leaderstats.Elo.Value = player2Elo - 10
        else
            player1.leaderstats.Elo.Value = player1Elo - 10
            player2.leaderstats.Elo.Value = player2Elo + 10
        end
    end
end

-- Example usage: eloSystem(player1, player2, winner)
-- Replace player1, player2, and winner with the actual player instances involved in the match

-- server script to initialize player stats 
Players.PlayerAdded:Connect(function(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player

local Elo = Instance.new("IntValue")
    Elo.Name = "Elo"
    Elo.Value = 1000
    Elo.Parent = leaderstats
end)

"there is a developer product at the top of the screen what says Random event when you buy it a random event will happen you will get 200 walkspeed of 1000 jumppower or death the developer product id is 1556140163 make the size of the button {0, 200},"

-- local script in a ScreenGui 
local MarketplaceService = game:GetService("MarketplaceService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local button = Instance.new("TextButton")

button.Parent = script.Parent
button.Size = UDim2.new(0, 200, 0, 50)
button.Position = UDim2.new(0.5, -100, 0, 0)
button.Text = "Random Event"
button.BackgroundColor3 = Color3.fromRGB(255, 255, 255)

local function onButtonActivated()
    local productId = 1556140163
    MarketplaceService:PromptProductPurchase(player, productId)
end

local function onProductPurchased(player, productId)
    if productId == 1556140163 then
        local randomEvent = math.random(1, 3)
        if randomEvent == 1 then
            player.Character.Humanoid.WalkSpeed = 200
        elseif randomEvent == 2 then
            player.Character.Humanoid.JumpPower = 1000
        else
            player.Character.Humanoid.Health = 0
        end
    end
end

button.Activated:Connect(onButtonActivated)
MarketplaceService.PromptProductPurchaseFinished:Connect(onProductPurchased)

"Make an invisible player spawner that everytime you die spawns you in the middle of the map. Make it not open the welcoming GUI and make it show up "BUSTED" on death GUI everytime after you die with the screen flashing red like in a horror game."

To achieve this, you will need to create a custom spawn function and modify the death GUI.

1. First, create a new part in the middle of the map and name it "SpawnPoint". Set its transparency to 1, so it's invisible.

2. Create a new LocalScript under StarterGui and name it "DeathGUI". This script will handle the "BUSTED" text and screen flash when the player dies.

3. Create a new ServerScript under ServerScriptService and name it "SpawnSystem". This script will handle respawning the player at the custom spawn point.

Here's the code for each script:

-- DeathGUI (LocalScript)
```lua
local player = game.Players.LocalPlayer
local gui = Instance.new("ScreenGui")
gui.Parent = player.PlayerGui

local redScreen = Instance.new("Frame")
redScreen.Parent = gui
redScreen.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
redScreen.Size = UDim2.new(1, 0, 1, 0)
redScreen.Visible = false

local bustedText = Instance.new("TextLabel")
bustedText.Parent = gui
bustedText.Text = "BUSTED"
bustedText.FontSize = Enum.FontSize.Size48
bustedText.Position = UDim2.new(0.5, 0, 0.5, 0)
bustedText.AnchorPoint = Vector2.new(0.5, 0.5)
bustedText.Visible = false

local function onCharacterDied()
	redScreen.Visible = true
	bustedText.Visible = true
	wait(0.1)
	for i = 1, 10 do
		redScreen.BackgroundTransparency = i * 0.1
		wait(0.1)
	end
	wait(1)
	redScreen.Visible = false
	bustedText.Visible = false
	redScreen.BackgroundTransparency = 0
end

player.CharacterAdded:Connect(function(character)
	character:WaitForChild("Humanoid").Died:Connect(onCharacterDied)
end)
```

-- SpawnSystem (ServerScript)
```lua
local spawnPoint = workspace.SpawnPoint

game.Players.PlayerAdded:Connect(function(player)
	player.RespawnLocation = spawnPoint
	player.CharacterAdded:Connect(function(character)
		character.HumanoidRootPart.CFrame = spawnPoint.CFrame
	end)
end)
```

Now, when a player dies, the "BUSTED" text and red screen flash will appear, and the player will respawn at the custom spawn point without the welcoming GUI.

"create me a gui button and when clicked shows an input box and when you input a music id it will start playing music from your music id"

"A server script that removes the "Tackle" tool from you when you get the "Football" tool"

"Make me a Pushup System for Training Where the Player Gains Muscle From The Pushups and They Gain 10 Muscle Per Pushup as well as a stat multiplier system that will multiply the amount of Muscle they Gain From it With instructions on where to inse"

-- insert a folder named "Stats" in StarterPlayer.StarterPlayerScripts 
-- insert a script named "StatMultiplier" in the "Stats" folder 
local Players = game:GetService("Players")

local function onPlayerAdded(player)
    local stats = Instance.new("Folder")
    stats.Name = "leaderstats"
    stats.Parent = player

local muscle = Instance.new("IntValue")
    muscle.Name = "Muscle"
    muscle.Value = 0
    muscle.Parent = stats

local multiplier = Instance.new("IntValue")
    multiplier.Name = "Multiplier"
    multiplier.Value = 1
    multiplier.Parent = stats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- insert a script named "PushupSystem" in ServerScriptService 
local Players = game:GetService("Players")

local function onPlayerAdded(player)
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.StateChanged:Connect(function(_, newState)
            if newState == Enum.HumanoidStateType.Swimming then
                local muscle = player.leaderstats.Muscle
                local multiplier = player.leaderstats.Multiplier
                muscle.Value = muscle.Value + (10 * multiplier.Value)
            end
        end)
    end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- To use this system, players should perform a push-up animation (similar to swimming) to gain muscle. You can create a GUI button to trigger the push-up animation.

"make a script that spawns Jeep whenever a player touches the Regen part and create a backup of Jeep so that it can be respawned after it is destroyed and also make sure Jeep cannot be spawned within 20 studs of another Jeep"

-- script for Regen part 
local regenPart = script.Parent
local jeepTemplate = game.ServerStorage.Jeep
local spawnCooldown = false

local function spawnJeep(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player and not spawnCooldown then
        spawnCooldown = true
        local jeep = jeepTemplate:Clone()
        local spawnLocation = regenPart.Position + Vector3.new(0, 5, 0)
        local tooClose = false
        
        for _, v in ipairs(game.Workspace:GetChildren()) do
            if v:IsA("Model") and v.Name == "Jeep" then
                if (v.PrimaryPart.Position - spawnLocation).Magnitude < 20 then
                    tooClose = true
                    break
                end
            end
        end

if not tooClose then
            jeep.Parent = game.Workspace
            jeep:SetPrimaryPartCFrame(CFrame.new(spawnLocation))
        end

wait(5)
        spawnCooldown = false
    end
end

regenPart.Touched:Connect(spawnJeep)

-- script for Jeep destruction 
local jeep = script.Parent
local health = 100

local function onTouched(hit)
    if hit.Parent:FindFirstChild("Humanoid") then
        health = health - 10
        if health <= 0 then
            jeep:Destroy()
        end
    end
end

jeep.PrimaryPart.Touched:Connect(onTouched)

"make a part"