Haddock - Roblox Library

"Make a NPC that follows you"

-- server script (ServerScriptService) 
local pfs = game:GetService("PathfindingService")
local npc = game.Workspace.NPC
local followDistance = 10

local function followPlayer(player)
    local character = player.Character
    if character and character:FindFirstChild("HumanoidRootPart") then
        local path = pfs:CreatePath()
        path:ComputeAsync(npc.HumanoidRootPart.Position, character.HumanoidRootPart.Position)

local waypoints = path:GetWaypoints()
        for _, waypoint in ipairs(waypoints) do
            if (npc.HumanoidRootPart.Position - character.HumanoidRootPart.Position).Magnitude > followDistance then
                npc.Humanoid:MoveTo(waypoint.Position)
                npc.Humanoid.MoveToFinished:Wait()
            else
                npc.Humanoid:MoveTo(npc.HumanoidRootPart.Position)
            end
        end
    end
end

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function()
        while true do
            followPlayer(player)
            wait()
        end
    end)
end)

"Make me a CombatSystem that checks if the player has clicked if the player has clicked it will play 5 different animations that each Punch using the Players Arms the combat system will have a hitbox and be able to damage Players/NPCS instructions"

-- local script inside the player's character 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local mouse = player:GetMouse()

local animations = {
    "animation1",
    "animation2",
    "animation3",
    "animation4",
    "animation5"
}

local function playAnimation(animationName)
    local animation = Instance.new("Animation")
    animation.AnimationId = "rbxassetid://" .. animationName
    local animationTrack = humanoid:LoadAnimation(animation)
    animationTrack:Play()
end

local function onLeftClick()
    local animationIndex = math.random(1, #animations)
    playAnimation(animations[animationIndex])

local hitbox = Instance.new("Part")
    hitbox.Size = Vector3.new(5, 5, 5)
    hitbox.Position = character.RightArm.Position
    hitbox.CanCollide = false
    hitbox.Transparency = 1
    hitbox.Parent = character

local function onHit(part)
        local hitCharacter = part.Parent
        local hitHumanoid = hitCharacter:FindFirstChildWhichIsA("Humanoid")
        if hitHumanoid and hitCharacter ~= character then
            hitHumanoid.Health = hitHumanoid.Health - 10
        end
    end

hitbox.Touched:Connect(onHit)
    wait(0.5)
    hitbox:Destroy()
end

mouse.Button1Down:Connect(onLeftClick)

"script a working volleyball game"

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

"When you walk into the part it makes you run 20"

"create a magnitude script thats make the lights flicker when the monster is near of lights"

"make a script that spins my character at 300 speed"

"Make me a combat system that will fire 5 different animations in serverstorage and Also use a Remotevent called CombatEvent and fire it to play the animations when a player clicks as well as adding hitbox and damage when it hits a player/npc"

-- local script in StarterPlayerScripts 
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local remoteEvent = game.ReplicatedStorage.CombatEvent

mouse.Button1Down:Connect(function()
    remoteEvent:FireServer()
end)

-- server script in ServerScriptService 
local animations = {
    "Animation1",
    "Animation2",
    "Animation3",
    "Animation4",
    "Animation5"
}

local function playAnimation(player)
    local character = player.Character
    local humanoid = character:FindFirstChild("Humanoid")
    local randomAnimation = animations[math.random(1, #animations)]
    local animation = game.ServerStorage:FindFirstChild(randomAnimation)

if humanoid and animation then
        local animator = humanoid:FindFirstChild("Animator")
        if not animator then
            animator = Instance.new("Animator", humanoid)
        end
        local animTrack = animator:LoadAnimation(animation)
        animTrack:Play()
    end
end

local function onCombatEvent(player)
    playAnimation(player)
end

game.ReplicatedStorage.CombatEvent.OnServerEvent:Connect(onCombatEvent)

-- script for hitbox and damage 
local part = script.Parent
local damage = 10

local function onTouched(hit)
    local character = hit.Parent
    local humanoid = character:FindFirstChild("Humanoid")

if humanoid then
        humanoid:TakeDamage(damage)
    end
end

part.Touched:Connect(onTouched)

"make a script to kick players with only people in this group here is the group id 16482574 and people with only rank 252 and higher can you this command there is a gui in the game i want you to connect it too so that if you click a button i want you"

"Make a punch tool"

"CreateA script that makes the part grow or shrink in when the leftmousebutton is clicked. This is a part is located in workspace.Part"

"make a local starterplayer script that shows the local player body like torso and legs except for the arms if zoomed into firstperson"

-- LocalScript in StarterPlayerScripts 
local player = game.Players.LocalPlayer
local humanoid = player.Character:WaitForChild("Humanoid")

local function onCameraSubjectChanged()
    local cameraSubject = game.Workspace.CurrentCamera.CameraSubject
    local isHumanoid = (cameraSubject:IsA("Humanoid"))
    if isHumanoid then
        local character = cameraSubject.Parent
        if character == player.Character then
            local head = character:FindFirstChild("Head")
            local torso = character:FindFirstChild("Torso")
            local leftArm = character:FindFirstChild("Left Arm")
            local rightArm = character:FindFirstChild("Right Arm")
            local leftLeg = character:FindFirstChild("Left Leg")
            local rightLeg = character:FindFirstChild("Right Leg")
            if head and torso and leftArm and rightArm and leftLeg and rightLeg then
                local isZoomedIn = (game.Workspace.CurrentCamera.FieldOfView < 20)
                leftArm.Transparency = isZoomedIn and 1 or 0
                rightArm.Transparency = isZoomedIn and 1 or 0
            end
        end
    end
end

game.Workspace.CurrentCamera:GetPropertyChangedSignal("CameraSubject"):Connect(onCameraSubjectChanged)
onCameraSubjectChanged()

"create a script where when you stand on my part called Bank it will start a countdown from 10 seconds above my part called bank when it gets to 0 you get 500 Money but if you go off the Part before the countdown ends the countdown ends"

-- script for Bank part 
local part = script.Parent
local countdown = 10
local countdownActive = false
local playerOnBank = false

local function startCountdown(player)
    if not countdownActive then
        countdownActive = true
        local billboardGui = Instance.new("BillboardGui")
        local textLabel = Instance.new("TextLabel")
        
        billboardGui.Parent = part
        billboardGui.Adornee = part
        billboardGui.Size = UDim2.new(0, 100, 0, 50)
        billboardGui.StudsOffset = Vector3.new(0, 2, 0)
        
        textLabel.Parent = billboardGui
        textLabel.Size = UDim2.new(1, 0, 1, 0)
        textLabel.BackgroundTransparency = 1
        textLabel.TextColor3 = Color3.new(1, 1, 1)
        textLabel.Font = Enum.Font.SourceSansBold
        textLabel.TextScaled = true
        
        for i = countdown, 0, -1 do
            if playerOnBank then
                textLabel.Text = tostring(i)
                wait(1)
            else
                break
            end
        end
        
        if playerOnBank then
            player.leaderstats.Money.Value = player.leaderstats.Money.Value + 500
        end
        
        billboardGui:Destroy()
        countdownActive = false
    end
end

local function onTouched(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player then
        playerOnBank = true
        startCountdown(player)
    end
end

local function onEnded(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player then
        playerOnBank = false
    end
end

part.Touched:Connect(onTouched)
part.TouchEnded:Connect(onEnded)

"check if a instance called 'boolean' is there, if it isnt do a function"

"create a add friend gui and add a feature to search for players make it very complex"

-- LocalScript in a TextButton 
local button = script.Parent
local playerService = game:GetService("Players")
local textBox = button.Parent.TextBox

button.MouseButton1Click:Connect(function()
    local playerName = textBox.Text
    local player = playerService:FindFirstChild(playerName)
    if player then
        local success, message = pcall(function()
            playerService.LocalPlayer:RequestFriendship(player)
        end)
        if success then
            print("Friend request sent to " .. playerName)
        else
            print("Failed to send friend request: " .. message)
        end
    else
        print("Player " .. playerName .. " not found.")
    end
end)

-- LocalScript in a TextBox 
local textBox = script.Parent
local playerService = game:GetService("Players")

textBox.FocusLost:Connect(function(enterPressed)
    if enterPressed then
        local playerName = textBox.Text
        local player = playerService:FindFirstChild(playerName)
        if player then
            print("Player " .. playerName .. " found.")
        else
            print("Player " .. playerName .. " not found.")
        end
    end
end)

"script for a part. if the player touches the part and their stage value is between 106 and 149"

"Make me a leaderstats script"

"Write me a script that only enables the player to move left and right"

"Make a nice looking welcoming GUI that flashes with rainbow colors and covers the whole screen and greets you to a game named "Coloured Cars". Make it say "Press anything to continue" and if you press anything on the keyboard it will close."

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

local background = Instance.new("Frame", screenGui)
background.BackgroundColor3 = Color3.new(1, 1, 1)
background.Size = UDim2.new(1, 0, 1, 0)

local rainbowColors = {
    Color3.new(1, 0, 0),
    Color3.new(1, 0.5, 0),
    Color3.new(1, 1, 0),
    Color3.new(0, 1, 0),
    Color3.new(0, 0, 1),
    Color3.new(0.5, 0, 1),
    Color3.new(1, 0, 1)
}

local rainbowIndex = 1
local rainbowTime = 0.1

local textLabel = Instance.new("TextLabel", background)
textLabel.Text = "Press anything to continue"
textLabel.TextColor3 = rainbowColors[1]
textLabel.Font = Enum.Font.SourceSansBold
textLabel.TextSize = 36
textLabel.Size = UDim2.new(1, 0, 0.5, 0)
textLabel.Position = UDim2.new(0, 0, 0.25, 0)

local function rainbow()
    textLabel.TextColor3 = rainbowColors[rainbowIndex]
    rainbowIndex = rainbowIndex + 1
    if rainbowIndex > #rainbowColors then
        rainbowIndex = 1
    end
end

local function closeOnKeyPress(inputObject)
    if inputObject.UserInputType == Enum.UserInputType.Keyboard then
        screenGui:Destroy()
    end
end

background.MouseButton1Down:Connect(function()
    screenGui:Destroy()
end)

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

while wait(rainbowTime) do
    rainbow()
end

"make a print that prints the time in est"

"Write me the most complex script for time"

I'm not sure what you mean by "the most complex script for time," but here's a script that demonstrates a digital clock system in Roblox using a SurfaceGui. This script updates the clock every second and displays the current time in hours, minutes, and seconds.

--lua
-- Server Script
local function createTimeLabel(parent)
    local label = Instance.new("TextLabel")
    label.Parent = parent
    label.Size = UDim2.new(1, 0, 1, 0)
    label.BackgroundTransparency = 1
    label.TextScaled = true
    label.Font = Enum.Font.SourceSansBold
    label.TextColor3 = Color3.new(1, 1, 1)
    return label
end

local function createClock(part)
    local surfaceGui = Instance.new("SurfaceGui", part)
    surfaceGui.Face = Enum.NormalId.Front
    surfaceGui.LightInfluence = 0
    surfaceGui.CanvasSize = Vector2.new(500, 500)
    local timeLabel = createTimeLabel(surfaceGui)
    return timeLabel
end

local clockPart = Instance.new("Part", workspace)
clockPart.Size = Vector3.new(10, 5, 1)
clockPart.Anchored = true
clockPart.CFrame = CFrame.new(0, 5, 0)
local clockLabel = createClock(clockPart)

while true do
    local currentTime = os.date("*t")
    local hours = string.format("d", currentTime.hour)
    local minutes = string.format("d", currentTime.min)
    local seconds = string.format("d", currentTime.sec)
    clockLabel.Text = hours .. ":" .. minutes .. ":" .. seconds
    task.wait(1)
end
--

This script creates a part in the workspace, adds a SurfaceGui to it, and updates the displayed time every second. The time is formatted as a digital clock with hours, minutes, and seconds.

"A script that when the time in game is between 18:00 - 07:00 hours, the games lighting bloom threshold is set at 0.15"

"make a script so when u press this textbutton it closes the gui"

"Make a VR script that utilizes the movement mechanics used in gorilla tag where you use your VR controllers to move around the map by hitting off objects. Ensure it runs when the parent (proximity prompt) is activated."

-- local script 
local proximityPrompt = script.Parent.ProximityPrompt
local UserInputService = game:GetService("UserInputService")
local vrEnabled = UserInputService.VREnabled

local function onProximityPromptActivated()
    if vrEnabled then
        local function onInputChanged(inputObject)
            if inputObject.UserInputType == Enum.UserInputType.VRInput then
                local hand = inputObject.KeyCode
                local handCFrame = UserInputService:GetDeviceCFrame(hand)
                local handVelocity = UserInputService:GetDeviceVelocity(hand)

if handVelocity.Magnitude > 5 then
                    local character = game.Players.LocalPlayer.Character
                    if character and character:FindFirstChild("HumanoidRootPart") then
                        character.HumanoidRootPart.CFrame = character.HumanoidRootPart.CFrame * CFrame.new(handVelocity * -0.1)
                    end
                end
            end
        end

UserInputService.InputChanged:Connect(onInputChanged)
    end
end

proximityPrompt.Triggered:Connect(onProximityPromptActivated)

"make me a auto lock to player"

"when a player steps on the model, shake the model for 2 seconds and then make the model cancollide false and transparent"

"a text button when pressed it fires but its free local MPS = game:GetService("MarketplaceService") button.MouseButton1Down:connect(function() MPS:PromptProductPurchase(Player,devProductID) game.ReplicatedStorage:FindFirstChild("RerollEvent"):FireServer(Player) end) local DSS = game"

"make a script that has one server and one local script that when activating a tool, it plays the audio "6590147536", then it summons a block behind the player that is 24.5, 26, 23.5, then it damages all players in a 200 stud radius besides the player who summoned it"

-- Server Script 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local createBlockEvent = Instance.new("RemoteEvent")
createBlockEvent.Name = "CreateBlockEvent"
createBlockEvent.Parent = ReplicatedStorage

local function damagePlayers(origin, radius, player)
    for _, otherPlayer in pairs(game:GetService("Players"):GetPlayers()) do
        if otherPlayer ~= player then
            local character = otherPlayer.Character
            local humanoid = character and character:FindFirstChild("Humanoid")
            local rootPart = character and character:FindFirstChild("HumanoidRootPart")
            if humanoid and rootPart then
                local distance = (rootPart.Position - origin).Magnitude
                if distance <= radius then
                    humanoid:TakeDamage(humanoid.MaxHealth)
                end
            end
        end
    end
end

createBlockEvent.OnServerEvent:Connect(function(player)
	local character = player.Character or player.CharacterAdded:Wait()
	local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
	
	if humanoidRootPart then
		local block = Instance.new("Part")
		block.Size = Vector3.new(24.5, 26, 23.5)
		block.Position = humanoidRootPart.Position - Vector3.new(0, 0, 5)
		block.Parent = game.Workspace
		
		damagePlayers(block.Position, 200, player)
	end
end)

-- Local Script 
local tool = script.Parent
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local createBlockEvent = ReplicatedStorage:WaitForChild("CreateBlockEvent")
local sound = Instance.new("Sound")
sound.SoundId = "rbxassetid://6590147536"
sound.Parent = tool

tool.Activated:Connect(function()
	sound:Play()
	createBlockEvent:FireServer()
end)

"constantly spawn an unanchored and collision enabled part over every player's head every 3 seconds. Include comments in code"

"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.

"a roblox script to where if you try to type "/e laugh" in chat it will delete it before you type the G"

"Create a script inside server script that make closes a frame gui inside screen gui when players inputs a code in a text label"

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

local function closeFrame(player, code)
    local gui = player.PlayerGui:WaitForChild("ScreenGui")
    local frame = gui:WaitForChild("Frame")
    local correctCode = "1234" -- Change this to the desired code

if code == correctCode then
        frame.Visible = false
    else
        -- You can add any response for incorrect code here, e.g. display a message
    end
end

local function onPlayerAdded(player)
    local event = Instance.new("BindableEvent")
    event.Name = "CloseFrameEvent"
    event.Parent = player
    event.Event:Connect(function(code) closeFrame(player, code) end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- local script inside the TextLabel 
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local textLabel = script.Parent

textLabel.Focused:Connect(function()
    textLabel:GetPropertyChangedSignal("Text"):Connect(function()
        if textLabel.Text ~= "" then
            local code = textLabel.Text
            player.CloseFrameEvent:Fire(code)
        end
    end)
end)

"Camera bobbing script"

"make a Gui where it will countdown 30 seconds and then it will tp the players to Part1 Part2 Part3 Part4 Part5 Part6 Part7 Part8 Part9 Part10 Part11 Part12 but only 1 player can be tped to each of the parts when all players die the timer restarts and my part called Spinner will spin and keep getting faster each 5 seconds"

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

local countdownFrame = Instance.new("Frame", screenGui)
countdownFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local countdownLabel = Instance.new("TextLabel", countdownFrame)
countdownLabel.Text = "30"
countdownLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
countdownLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)

local parts = {
    workspace.Part1,
    workspace.Part2,
    workspace.Part3,
    workspace.Part4,
    workspace.Part5,
    workspace.Part6,
    workspace.Part7,
    workspace.Part8,
    workspace.Part9,
    workspace.Part10,
    workspace.Part11,
    workspace.Part12
}

local spinner = workspace.Spinner
local spinSpeed = 1
local spinIncrement = 0.2

local function teleportPlayers()
    local players = game.Players:GetPlayers()
    for i, player in ipairs(players) do
        if parts[i] then
            player.Character.HumanoidRootPart.CFrame = parts[i].CFrame
        end
    end
end

local function resetCountdown()
    countdownLabel.Text = "30"
end

local function allPlayersDead()
    for _, player in ipairs(game.Players:GetPlayers()) do
        if player.Character and player.Character:FindFirstChild("Humanoid") and player.Character.Humanoid.Health > 0 then
            return false
        end
    end
    return true
end

local function spin()
    spinner.CFrame = spinner.CFrame * CFrame.Angles(0, math.rad(spinSpeed), 0)
end

local function increaseSpinSpeed()
    spinSpeed = spinSpeed + spinIncrement
end

local function startGame()
    while true do
        for i = 30, 0, -1 do
            countdownLabel.Text = tostring(i)
            wait(1)
        end
        teleportPlayers()
        while not allPlayersDead() do
            wait(5)
            increaseSpinSpeed()
            spin()
        end
        resetCountdown()
    end
end

startGame()
```
This script creates a GUI with a countdown timer and teleports players to the specified parts when the timer reaches 0. It also spins the "Spinner" part and increases its speed every 5 seconds. When all players are dead, the timer resets and the process repeats.

"can you make me a long roblox script r6, fe, remotes, also its a night vision script it has three modes night vision, thermal, and sonar. You are able to press the n key to activate it and the v key to change modes. thermal able to detect humanoids"

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

-- R6 and FE
if humanoid.RigType == Enum.HumanoidRigType.R6 and player.CharacterAdded then
    player.CharacterAdded:Connect(function(char)
        humanoid = char:WaitForChild("Humanoid")
        if humanoid.RigType ~= Enum.HumanoidRigType.R6 then
            char:Destroy()
        end
    end)
elseif humanoid.RigType == Enum.HumanoidRigType.R15 then
    humanoid:Destroy()
end

-- Night vision script
local nightVision = false
local thermalVision = false
local sonarVision = false

local function toggleNightVision()
    nightVision = not nightVision
    if nightVision then
        -- activate night vision
        -- insert code here
    else
        -- deactivate night vision
        -- insert code here
    end
end

local function toggleThermalVision()
    thermalVision = not thermalVision
    if thermalVision then
        -- activate thermal vision
        -- insert code here
    else
        -- deactivate thermal vision
        -- insert code here
    end
end

local function toggleSonarVision()
    sonarVision = not sonarVision
    if sonarVision then
        -- activate sonar vision
        -- insert code here
    else
        -- deactivate sonar vision
        -- insert code here
    end
end

-- Keybinds
game:GetService("UserInputService").InputBegan:Connect(function(input, gameProcessed)
    if gameProcessed then return end
    if input.KeyCode == Enum.KeyCode.N then
        toggleNightVision()
    elseif input.KeyCode == Enum.KeyCode.V then
        toggleThermalVision()
    end
end)

-- Detect humanoids in thermal vision
if thermalVision then
    local function detectHumanoids()
        for _, player in ipairs(game.Players:GetPlayers()) do
            local character = player.Character
            if character and character:FindFirstChild("Humanoid") and player ~= game.Players.LocalPlayer then
                -- insert code here to detect humanoids in thermal vision
            end
        end
    end
    while thermalVision do
        detectHumanoids()
        wait(0.5)
    end
end

-- Remote events and functions
-- insert code here for remote events and functions

"Make a menu with three buttons"

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

local menuFrame = Instance.new("Frame", screenGui)
menuFrame.Size = UDim2.new(0, 200, 0, 150)
menuFrame.Position = UDim2.new(0.5, -100, 0.5, -75)
menuFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
menuFrame.BorderSizePixel = 0

local button1 = Instance.new("TextButton", menuFrame)
button1.Size = UDim2.new(0, 150, 0, 50)
button1.Position = UDim2.new(0.5, -75, 0.2, 0)
button1.Text = "Button 1"
button1.TextColor3 = Color3.fromRGB(0, 0, 0)
button1.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
button1.BorderSizePixel = 0
button1.Font = Enum.Font.SourceSans
button1.TextSize = 20

local button2 = Instance.new("TextButton", menuFrame)
button2.Size = UDim2.new(0, 150, 0, 50)
button2.Position = UDim2.new(0.5, -75, 0.5, 0)
button2.Text = "Button 2"
button2.TextColor3 = Color3.fromRGB(0, 0, 0)
button2.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
button2.BorderSizePixel = 0
button2.Font = Enum.Font.SourceSans
button2.TextSize = 20

local button3 = Instance.new("TextButton", menuFrame)
button3.Size = UDim2.new(0, 150, 0, 50)
button3.Position = UDim2.new(0.5, -75, 0.8, 0)
button3.Text = "Button 3"
button3.TextColor3 = Color3.fromRGB(0, 0, 0)
button3.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
button3.BorderSizePixel = 0
button3.Font = Enum.Font.SourceSans
button3.TextSize = 20

"create a script that allows an entity to move through a 3 x 6 grid ahen the arrow keys are pressed"

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

local gridSize = Vector3.new(3, 0, 6)
local moveSpeed = 0.5

local function move(direction)
    local newPosition = humanoidRootPart.Position + (gridSize * direction)
    humanoidRootPart:MoveTo(newPosition)
end

local function onKeyPress(actionName, userInputState, inputObject)
    if userInputState == Enum.UserInputState.Begin then
        if actionName == "MoveUp" then
            move(Vector3.new(0, 0, -1))
        elseif actionName == "MoveDown" then
            move(Vector3.new(0, 0, 1))
        elseif actionName == "MoveLeft" then
            move(Vector3.new(-1, 0, 0))
        elseif actionName == "MoveRight" then
            move(Vector3.new(1, 0, 0))
        end
    end
end

local contextActionService = game:GetService("ContextActionService")
contextActionService:BindAction("MoveUp", onKeyPress, false, Enum.KeyCode.W, Enum.KeyCode.Up)
contextActionService:BindAction("MoveDown", onKeyPress, false, Enum.KeyCode.S, Enum.KeyCode.Down)
contextActionService:BindAction("MoveLeft", onKeyPress, false, Enum.KeyCode.A, Enum.KeyCode.Left)
contextActionService:BindAction("MoveRight", onKeyPress, false, Enum.KeyCode.D, Enum.KeyCode.Right)

"make it check for a specific folder in serverstorage, as well as the tool name"

"make a command named /kick "Username to kick player", /tool "put id of tool" , /fling "player username to fling", /ban "user id to ban player, /bring "username to bring", make sure "Albins1213" is whitelisted in this script prefix is "/""

-- server script (ServerScriptService) 
local Players = game:GetService("Players")
local whitelisted = {"Albins1213"}

local function onChat(player, message)
    if string.sub(message, 1, 1) == "/" then
        local command = string.sub(message, 2)
        local args = command:split(" ")

for _, name in ipairs(whitelisted) do
            if player.Name == name then
                if args[1] == "kick" then
                    local target = Players:FindFirstChild(args[2])
                    if target then
                        target:Kick("You have been kicked by " .. player.Name)
                    end
                elseif args[1] == "tool" then
                    local toolId = tonumber(args[2])
                    if toolId then
                        local tool = game:GetService("InsertService"):LoadAsset(toolId):GetChildren()[1]
                        if tool:IsA("Tool") then
                            tool.Parent = player.Backpack
                        end
                    end
                elseif args[1] == "fling" then
                    local target = Players:FindFirstChild(args[2])
                    if target and target.Character then
                        target.Character:SetPrimaryPartCFrame(target.Character.PrimaryPart.CFrame * CFrame.new(0, 0, -100))
                    end
                elseif args[1] == "ban" then
                    local target = Players:GetPlayerByUserId(tonumber(args[2]))
                    if target then
                        target:Kick("You have been banned by " .. player.Name)
                        table.insert(whitelisted, target.Name)
                    end
                elseif args[1] == "bring" then
                    local target = Players:FindFirstChild(args[2])
                    if target and target.Character then
                        target.Character:SetPrimaryPartCFrame(player.Character.PrimaryPart.CFrame * CFrame.new(0, 0, 5))
                    end
                end
            end
        end
    end
end

Players.PlayerChatted:Connect(onChat)

"make part with blue color"

"Can you create a script that when it is executed turns everyone into zombies?"

-- server script 
local ZombieAnimation = "rbxassetid://YourZombieAnimationIDHere" -- Replace with your zombie animation ID

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        local animator = character:WaitForChild("Animate")
        local zombieAnimation = Instance.new("Animation")
        zombieAnimation.AnimationId = ZombieAnimation
        local zombieTrack = humanoid:LoadAnimation(zombieAnimation)

-- Replace the default walk and run animations with the zombie animation
        animator.walk.WalkAnim.AnimationId = ZombieAnimation
        animator.run.RunAnim.AnimationId = ZombieAnimation

-- Play the zombie animation continuously
        zombieTrack.Looped = true
        zombieTrack:Play()
    end)
end)

-- Turn existing players into zombies
for _, player in ipairs(game.Players:GetPlayers()) do
    local character = player.Character
    if character then
        local humanoid = character:FindFirstChild("Humanoid")
        local animator = character:FindFirstChild("Animate")
        if humanoid and animator then
            local zombieAnimation = Instance.new("Animation")
            zombieAnimation.AnimationId = ZombieAnimation
            local zombieTrack = humanoid:LoadAnimation(zombieAnimation)

-- Replace the default walk and run animations with the zombie animation
            animator.walk.WalkAnim.AnimationId = ZombieAnimation
            animator.run.RunAnim.AnimationId = ZombieAnimation

-- Play the zombie animation continuously
            zombieTrack.Looped = true
            zombieTrack:Play()
        end
    end
end

"a working gun script for a tool where if I click left mouse button it fires a bullet, it doesnt work"

"make a small red part"

"a working chatGPT gui that answers questions about roblox studio using http requests"

-- ChatGPT GUI is not possible directly in Roblox due to API restrictions, but you can use an external server to handle API requests 
-- Server script (ServerScriptService) 
local HttpService = game:GetService("HttpService")
local API_URL = "https://your-external-server.com/chatgpt" -- Replace with your external server URL

function onRequest(player, question)
    local data = {
        player = player.UserId,
        question = question
    }

local headers = {
        ["Content-Type"] = "application/json"
    }

local response = HttpService:RequestAsync({
        Url = API_URL,
        Method = "POST",
        Headers = headers,
        Body = HttpService:JSONEncode(data)
    })

if response.Success then
        local responseData = HttpService:JSONDecode(response.Body)
        return responseData.answer
    else
        return "Error: Unable to fetch answer"
    end
end

game.ReplicatedStorage.ChatGPT.OnServerInvoke = onRequest

-- Local script (inside a ScreenGui) 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ChatGPT = ReplicatedStorage:WaitForChild("ChatGPT")

local textBox = script.Parent.TextBox
local submitButton = script.Parent.SubmitButton
local answerLabel = script.Parent.AnswerLabel

submitButton.MouseButton1Click:Connect(function()
    local question = textBox.Text
    local answer = ChatGPT:InvokeServer(game.Players.LocalPlayer, question)
    answerLabel.Text = "Answer: " .. answer
end)

-- Note: You'll need to set up an external server to handle the ChatGPT API requests and return the answer to Roblox. This is because Roblox does not allow direct API requests to external services like OpenAI's ChatGPT.

"when Harlandroblox says !banish then a players username it will tp them to my Part called bozo and if they die it will put them back to my part called bozo"

"Make a nice and aesthetic looking GUI that is rainbow colored that will greet you when you enter the game called "Colored Cars". With instructions on where to put it."

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

local background = Instance.new("Frame", screenGui)
background.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
background.BorderSizePixel = 0
background.Size = UDim2.new(1, 0, 1, 0)

local title = Instance.new("TextLabel", background)
title.Text = "Welcome to Colored Cars!"
title.TextColor3 = Color3.fromRGB(255, 255, 255)
title.Font = Enum.Font.GothamBold
title.TextScaled = true
title.Position = UDim2.new(0.5, 0, 0.2, 0)
title.AnchorPoint = Vector2.new(0.5, 0.5)

local instructions = Instance.new("TextLabel", background)
instructions.Text = "Instructions: \n1. Choose a car color \n2. Drive around and have fun!"
instructions.TextColor3 = Color3.fromRGB(255, 255, 255)
instructions.Font = Enum.Font.Gotham
instructions.TextSize = 20
instructions.Position = UDim2.new(0.5, 0, 0.5, 0)
instructions.AnchorPoint = Vector2.new(0.5, 0.5)

local rainbowEffect = Instance.new("UIGradient", background)
rainbowEffect.Rotation = 45
rainbowEffect.Color = ColorSequence.new{
    ColorSequenceKeypoint.new(0, Color3.fromRGB(255, 0, 0)),
    ColorSequenceKeypoint.new(0.16, Color3.fromRGB(255, 255, 0)),
    ColorSequenceKeypoint.new(0.33, Color3.fromRGB(0, 255, 0)),
    ColorSequenceKeypoint.new(0.5, Color3.fromRGB(0, 255, 255)),
    ColorSequenceKeypoint.new(0.66, Color3.fromRGB(0, 0, 255)),
    ColorSequenceKeypoint.new(0.83, Color3.fromRGB(255, 0, 255)),
    ColorSequenceKeypoint.new(1, Color3.fromRGB(255, 0, 0))
}

-- To use this GUI, copy and paste the code into a LocalScript in StarterGui.

"make it so if i say play in chat then put a roblox music id. It makes a mouth on my character removes my face and visualizes the id."

"make a click simulator with a gui."

-- local script for clicking button 
local button = script.Parent
local player = game:GetService('Players').LocalPlayer
local clicks = player.leaderstats.Clicks

local function onClick()
    clicks.Value = clicks.Value + 1
end

button.MouseButton1Click:Connect(onClick)

-- server script for leaderstats 
game.Players.PlayerAdded:Connect(function(player)
    local leaderstats = Instance.new('Folder')
    leaderstats.Name = 'leaderstats'
    leaderstats.Parent = player

local clicks = Instance.new('IntValue')
    clicks.Name = 'Clicks'
    clicks.Value = 0
    clicks.Parent = leaderstats
end)

-- GUI setup 
-- Create a ScreenGui in StarterGui
-- Add a TextButton inside the ScreenGui and name it "ClickButton"
-- Add a TextBox inside the ScreenGui and name it "ClicksDisplay"
-- Set the Text of the ClickButton to "Click me!"
-- Set the Text of the ClicksDisplay to "Clicks: 0"

-- local script for updating clicks display 
local player = game:GetService('Players').LocalPlayer
local clicksDisplay = script.Parent.ClicksDisplay
local clicks = player.leaderstats.Clicks

local function updateDisplay()
    clicksDisplay.Text = 'Clicks: ' .. clicks.Value
end

clicks:GetPropertyChangedSignal('Value'):Connect(updateDisplay)
updateDisplay()

"Make me a data store that saves the players coins rebirths and Multiplier in the leaderstats and saves the values of the leaderstats and when the player joins back adds the values saved to the leaderstats again so that other players can see them"

-- Script in ServerScriptService 
local DataStoreService = game:GetService("DataStoreService")
local playerDataStore = DataStoreService:GetDataStore("PlayerData")

local function onSave(player)
    local success, err = pcall(function()
        local leaderstats = player:WaitForChild("leaderstats")
        local data = {
            Coins = leaderstats.Coins.Value,
            Rebirths = leaderstats.Rebirths.Value,
            Multiplier = leaderstats.Multiplier.Value
        }
        playerDataStore:SetAsync(player.UserId, data)
    end)
    if not success then
        warn("Error saving data for " .. player.Name .. ": " .. err)
    end
end

local function onLoad(player)
    local success, err = pcall(function()
        local data = playerDataStore:GetAsync(player.UserId)
        if data then
            local leaderstats = player:WaitForChild("leaderstats")
            leaderstats.Coins.Value = data.Coins
            leaderstats.Rebirths.Value = data.Rebirths
            leaderstats.Multiplier.Value = data.Multiplier
        end
    end)
    if not success then
        warn("Error loading data for " .. player.Name .. ": " .. err)
    end
end

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Wait()
    onLoad(player)
end)

game.Players.PlayerRemoving:Connect(onSave)

game:BindToClose(function()
    for _, player in ipairs(game.Players:GetPlayers()) do
        onSave(player)
    end
end)

"rain red bricks from the air forever super fast that turns black when they touch the ground"

"make my Part spin horizontal"

"A roblox game where everything is 2d and controlled by GUI"

"create a local script inside a text button that enables and disables default roblox backpack"

"make a local script for a text label that displays and starts a 5 minute countdown when the player touches the part called GearPart. touching the part during the countdown does not interrupt it."

"Can you create a system for player movement using inverse kinematics?"

-- Unfortunately, Roblox does not currently support inverse kinematics directly. However, you can create a system that mimics inverse kinematics using the available tools and services. Here's a simple example of how you might use the Motor6D object to create a sort of inverse kinematics system for a humanoid's arm:

local humanoid = game.Players.LocalPlayer.Character.Humanoid
local armMotor = humanoid:FindFirstChild("Right Shoulder")
local armPart = humanoid:FindFirstChild("Right Arm")

armMotor.MaxVelocity = 0.1

local function moveArmTo(position)
    local armLength = armPart.Size.Y/2
    local shoulderPosition = armMotor.Part0.Position
    local direction = (position - shoulderPosition).Unit
    local targetPosition = shoulderPosition + direction * armLength

armMotor.Transform = CFrame.new(targetPosition)
end

game:GetService("RunService").Heartbeat:Connect(function()
    local mouse = game.Players.LocalPlayer:GetMouse()
    moveArmTo(mouse.Hit.p)
end)

-- Please note that this is a very simplified example and may not work perfectly. A more complex system would likely be needed for a full inverse kinematics implementation.

"make it detect the team the local player is on and make the players on the local players team highlight blue while any other players that arent on local players team red, and make sure every 10 seconds it checks to see if everyone is highlighted like they are supposed to be"

To implement a script that highlights players based on their team affiliation and updates these highlights every 10 seconds, you can use the following Roblox script. This script checks the team of each player and applies a blue highlight to teammates and a red highlight to players on other teams. It also periodically updates these highlights to reflect any changes in team membership.

```lua
local players = game:GetService("Players")
local runService = game:GetService("RunService")

local function updateHighlights()
    local localPlayer = players.LocalPlayer
    local localTeam = localPlayer.Team

for _, player in ipairs(players:GetPlayers()) do
        if player.Character then
            local highlight = player.Character:FindFirstChild("Highlight")
            if not highlight then
                highlight = Instance.new("Highlight")
                highlight.Name = "Highlight"
                highlight.Parent = player.Character
                highlight.Adornee = player.Character
                highlight.OutlineTransparency = 0.5
            end

if player.Team == localTeam then
                highlight.FillColor = Color3.new(0, 0, 1) -- Blue color for teammates
            else
                highlight.FillColor = Color3.new(1, 0, 0) -- Red color for others
            end

highlight.FillTransparency = 0.5
            highlight.OutlineColor = Color3.new(0, 0, 0) -- Black outline
        end
    end
end

-- Initial update
updateHighlights()

-- Listen for team changes and new players joining
players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function()
        updateHighlights()
    end)
    player:GetPropertyChangedSignal("Team"):Connect(updateHighlights)
end)

for _, player in ipairs(players:GetPlayers()) do
    player:GetPropertyChangedSignal("Team"):Connect(updateHighlights)
    if player.Character then
        player.CharacterAdded:Connect(function()
            updateHighlights()
        end)
    end
end

-- Periodically update highlights to reflect any changes
while true do
    updateHighlights()
    wait(10)
end
```

This script performs several key functions:
1. **Initial Highlighting**: When the script runs, it immediately updates the highlights for all players based on their team.
2. **Dynamic Updates**: It listens for any changes, such as new players joining, players switching teams, or new characters being spawned. This ensures that the highlights accurately reflect the current state of the game.
3. **Periodic Checks**: Every 10 seconds, the script re-evaluates all players to update highlights. This is a safeguard to ensure consistency, even if some changes were missed or delayed.

Make sure to place this script in a location where it runs for the local player, such as a LocalScript in a GUI or the player's character, to ensure it has access to the `LocalPlayer` property and can accurately update based on the local player's team.

"Kick anybody who dies"

"If both conditions are met, the player can interact with the door. When a player triggers the prompt, the door opens or closes based on its current state. If the door is open, clicking the prompt will close it, and the prompt will show 'Open' text."

"use the same code but add to this so when i equip my tool and hit the sphere it goes back (with instructions on where to insert the code)"

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

local function followPlayer(player)
	local sphere = Instance.new('Part', game.Workspace)
	sphere.Name = "FollowSphere"
	sphere.Shape = Enum.PartType.Ball
	sphere.Size = Vector3.new(2, 2, 2)
	sphere.Anchored = false
	sphere.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 5, 0)

local bodyPosition = Instance.new('BodyPosition', sphere)
	bodyPosition.D = 500
	bodyPosition.P = 3000
	bodyPosition.MaxForce = Vector3.new(400000, 400000, 400000)

while sphere and player.Character and player.Character:FindFirstChild('HumanoidRootPart') do
		local distance = (sphere.Position - player.Character.HumanoidRootPart.Position).Magnitude
		if distance > 5 then
			bodyPosition.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 5, 0)
		end
		task.wait(0.5) 
	end
end

Players.PlayerAdded:Connect(function(player)
	player.CharacterAdded:Connect(function(character)
		followPlayer(player)
	end)
end)

-- server script for tool 
local tool = script.Parent
tool.Equipped:Connect(function()
	local player = game.Players.LocalPlayer
	local sphere = game.Workspace:FindFirstChild("FollowSphere")
	if sphere then
		sphere.Touched:Connect(function(hit)
			if hit.Parent == player.Character then
				sphere.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 50, 0)
			end
		end)
	end
end)

"Make it so whenever a player presses the right mouse button. An animation plays for the player, the animation ID is 12500035025 Use player:GetMouse()"

"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.

"make a roblox script where when Harlandroblox says !game5 then Parts what are purple will fall out of the sky and if a player does touch them they get kicked and it says OOF! it lasts for 30 seconds and 2 Parts each 0.2 second and the Parts disappear off the floor in 40 seconds the Parts fall above all Players heads Apart from Harlandroblox"

local Players = game:GetService("Players")
local Workspace = game:GetService("Workspace")
local Harlandroblox = "Harlandroblox"

local function spawnPart(player)
    local part = Instance.new("Part", Workspace)
    part.BrickColor = BrickColor.new("Royal purple")
    part.Size = Vector3.new(2, 2, 2)
    part.Anchored = false
    part.Position = player.Character.Head.Position + Vector3.new(0, 50, 0)
    part.Touched:Connect(function(hit)
        local hitPlayer = Players:GetPlayerFromCharacter(hit.Parent)
        if hitPlayer and hitPlayer ~= Harlandroblox then
            hitPlayer:Kick("OOF!")
        end
    end)
    game:GetService("Debris"):AddItem(part, 40)
end

local function game5(player)
    for i = 1, 30 * 5 do
        for _, player in ipairs(Players:GetPlayers()) do
            if player.Name ~= Harlandroblox then
                spawnPart(player)
            end
        end
        wait(0.2)
    end
end

Players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(message)
        if player.Name == Harlandroblox and message:lower() == "!game5" then
            game5(player)
        end
    end)
end)

"create a script that makes a model fly around next to you like a pet and give instructions on how to set it up"

-- local script inside the pet model 
local Players = game:GetService("Players")
local TweenService = game:GetService("TweenService")
local pet = script.Parent
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoidRootPart = character:WaitForChild("HumanoidRootPart")

local function followPlayer()
    local distance = (humanoidRootPart.Position - pet.PrimaryPart.Position).Magnitude
    if distance > 5 then
        local newPosition = humanoidRootPart.Position + Vector3.new(3, 1, 3)
        local tweenInfo = TweenInfo.new(1, Enum.EasingStyle.Linear, Enum.EasingDirection.InOut)
        local tween = TweenService:Create(pet.PrimaryPart, tweenInfo, {Position = newPosition})
        tween:Play()
    end
end

while true do
    followPlayer()
    wait(1)
end

Instructions:
1. In Roblox Studio, create a new model or import a pet model that you want to use.
2. Make sure the model has a PrimaryPart set. If not, set a part in the model as the PrimaryPart.
3. Insert a LocalScript inside the pet model.
4. Copy and paste the above script into the LocalScript.
5. Place the pet model in the StarterPack or StarterGui so that it spawns with the player when they join the game.
6. Test the game and the pet should follow the player around.

"make a shift to spring with little bar on the bottom of the screen for cooldown, make it so the sprint is on cooldown, and is hold, not toggle."

```lua
-- local script (StarterGUI) 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local screenGui = Instance.new("ScreenGui", player.PlayerGui)

local sprintBar = Instance.new("Frame", screenGui)
sprintBar.BackgroundColor3 = Color3.fromRGB(0, 255, 0)
sprintBar.AnchorPoint = Vector2.new(0.5, 1)
sprintBar.Position = UDim2.new(0.5, 0, 1, -10)
sprintBar.Size = UDim2.new(0.3, 0, 0.02, 0)

local sprintBarFill = Instance.new("Frame", sprintBar)
sprintBarFill.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
sprintBarFill.Size = UDim2.new(1, 0, 1, 0)

local sprintCooldown = 5
local sprintDuration = 2
local sprintSpeed = 2 * humanoid.WalkSpeed
local normalSpeed = humanoid.WalkSpeed
local isSprinting = false
local canSprint = true

local function updateSprintBarFill()
    sprintBarFill.Size = UDim2.new(canSprint and 1 or 0, 0, 1, 0)
end

local function startSprint()
    if canSprint then
        isSprinting = true
        humanoid.WalkSpeed = sprintSpeed

canSprint = false
        updateSprintBarFill()

wait(sprintDuration)

isSprinting = false
        humanoid.WalkSpeed = normalSpeed

wait(sprintCooldown)

canSprint = true
        updateSprintBarFill()
    end
end

local function onInputBegan(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.LeftShift and not gameProcessed then
        if not isSprinting then
            startSprint()
        end
    end
end

player:GetMouse().KeyDown:Connect(onInputBegan)
```
This script creates a sprint bar at the bottom of the screen, and allows the player to sprint by holding the left shift key. The sprint has a cooldown and duration, and the player's speed increases while sprinting.

"NPC that stalks and kills, avanced and complete script"

-- creating an NPC that stalks and kills players 
local pfs = game:GetService("PathfindingService")
local npc = game.Workspace.NPC
local aggroRange = 50
local attackRange = 5
local attackCooldown = 2
local attacking = false

local function findNearestPlayer()
    local nearestPlayer = nil
    local nearestDistance = math.huge
    for _, player in ipairs(game.Players:GetPlayers()) do
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            local distance = (npc.HumanoidRootPart.Position - player.Character.HumanoidRootPart.Position).Magnitude
            if distance < nearestDistance then
                nearestDistance = distance
                nearestPlayer = player
            end
        end
    end
    return nearestPlayer, nearestDistance
end

local function moveToTarget(target)
    local path = pfs:CreatePath()
    path:ComputeAsync(npc.HumanoidRootPart.Position, target.Position)
    for _, waypoint in pairs(path:GetWaypoints()) do
        npc.Humanoid:MoveTo(waypoint.Position)
        npc.Humanoid.MoveToFinished:Wait()
    end
end

local function attack(target)
    if not attacking then
        attacking = true
        npc.Humanoid:MoveTo(target.HumanoidRootPart.Position)
        wait(attackCooldown)
        if (npc.HumanoidRootPart.Position - target.HumanoidRootPart.Position).Magnitude <= attackRange then
            target.Humanoid:TakeDamage(npc.Humanoid.Health / 2)
        end
        attacking = false
    end
end

while true do
    local nearestPlayer, nearestDistance = findNearestPlayer()
    if nearestPlayer and nearestDistance <= aggroRange then
        if nearestDistance <= attackRange then
            attack(nearestPlayer.Character)
        else
            moveToTarget(nearestPlayer.Character.HumanoidRootPart)
        end
    else
        wait(1)
    end
end

"rain red bricks from the air forever super fast that turns black when they touch the ground. 2 seconds after touching the ground it launches 6 0.1x0.1 size blocks every direction"

-- server script (ServerScriptService) 
while true do
    local part = Instance.new("Part")
    part.Parent = game.Workspace
    part.Size = Vector3.new(4, 1, 2)
    part.Position = Vector3.new(math.random(-100, 100), 50, math.random(-100, 100))
    part.Color = Color3.fromRGB(255, 0, 0)
    part.Anchored = false
    part.BrickColor = BrickColor.new("Bright red")
    part.CanCollide = true

local function onTouched()
        part.Color = Color3.fromRGB(0, 0, 0)
        wait(2)

for i = 1, 6 do
            local smallPart = Instance.new("Part")
            smallPart.Parent = game.Workspace
            smallPart.Size = Vector3.new(0.1, 0.1, 0.1)
            smallPart.Position = part.Position
            smallPart.BrickColor = BrickColor.new("Really black")
            smallPart.CanCollide = true
            smallPart.Velocity = Vector3.new(math.random(-100, 100), math.random(50, 100), math.random(-100, 100))
        end

part:Destroy()
    end

part.Touched:Connect(onTouched)
    wait(0.1)
end

"Make a script that Spawns in an orb from ServerStorage into workspace to a random location on the map that a player can collect to get exp"

"if I move my mouse the color of the black screen changes"

"add prints so you know how many more seconds are left in rounds"

-- server script 
local function startRound()
	if #players:GetPlayers() < minPlayers then
		print("Not enough players to start a round.")
		return
	end
	print("Starting round...")
	local alivePlayers = {}
	for _, player in pairs(players:GetPlayers()) do
		if player.Character and player.Character:FindFirstChild("Humanoid") and player.Character.Humanoid.Health > 0 then
			table.insert(alivePlayers, player)
		end
	end
	if #alivePlayers == 0 then
		return
	end
	local newBallHolder
	repeat
		newBallHolder = alivePlayers[math.random(#alivePlayers)]
	until newBallHolder ~= ballHolder
	if ballHolder and playerStates[ballHolder.Name] then
		playerStates[ballHolder.Name].HasBall = false
	end
	ballHolder = newBallHolder
	playerStates[ballHolder.Name] = {HasBall = true, IsAlive = true}
	print(ballHolder.Name .. " is the ball holder for this round.")
	for _, player in pairs(alivePlayers) do
		local character = player.Character
		if character and #spawnLocations > 0 then
			local randomPos
			local randomIndex
			repeat
				randomIndex = math.random(#spawnLocations)
				local randomSpawn = spawnLocations[randomIndex]
				randomPos = randomSpawn.Position
			until (randomPos - ballStartPos).Magnitude > ball.Size.Magnitude * 2
			character.HumanoidRootPart.CFrame = CFrame.new(randomPos)
			table.remove(spawnLocations, randomIndex)
		end
	end
end

while true do
	task.wait(5)
	if #players:GetPlayers() >= minPlayers then
		startRound()
		if ballHolder and playerStates[ballHolder.Name] then
			moveBallToHolder()
		end
		local roundEndTime = os.time() + 60
		while os.time() < roundEndTime and #players:GetPlayers() > 1 do
			local miniRoundEndTime = os.time() + 10
			while os.time() < miniRoundEndTime and #players:GetPlayers() > 1 do
				print("Mini round ends in ".. (miniRoundEndTime - os.time()) .." seconds")
				task.wait(1)
			end
			if ballHolder and playerStates[ballHolder.Name] then
				print(ballHolder.Name .. " has been eliminated.")
				ballHolder.Character.Humanoid.Health = 0
				playerStates[ballHolder.Name].IsAlive = false
				table.remove(players:GetPlayers(), ballHolder)
				if #players:GetPlayers() > 1 then
					print("Starting new mini round...")
					startRound()
					if ballHolder and playerStates[ballHolder.Name] then
						moveBallToHolder()
					end
				else
					print(players:GetPlayers()[1].Name .. " wins the round!")
					roundReset()
				end
			end
		end
	else
		print("Not enough players to start a round.")
	end
end

"npc that follows you"

"Make me a script where I can change the angle of my screen vertically. With the keybinds f and g making f make the screen angle go up and g making the screen angle go down"

"when a player steps on the model, shake the model for 2 seconds and then make the model cancollide false and transparent. make the model cancollide true and opaque after 3 seconds."

-- script for model 
local model = script.Parent
local debounce = true

local function shakeModel()
    for i = 1, 20 do
        model:SetPrimaryPartCFrame(model.PrimaryPart.CFrame * CFrame.Angles(math.rad(math.random(-2,2)), math.rad(math.random(-2,2)), math.rad(math.random(-2,2))))
        wait(0.1)
    end
end

local function onTouch(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player and debounce then
        debounce = false
        shakeModel()
        
        for _, part in ipairs(model:GetChildren()) do
            if part:IsA("BasePart") then
                part.CanCollide = false
                part.Transparency = 0.5
            end
        end
        
        wait(3)
        
        for _, part in ipairs(model:GetChildren()) do
            if part:IsA("BasePart") then
                part.CanCollide = true
                part.Transparency = 0
            end
        end
        
        debounce = true
    end
end

model.PrimaryPart.Touched:Connect(onTouch)

"make sure the textBox clears anything entered and place holder says hi"

"make a random script"

"Create a Combat Tag system where if a player gets damaged by another player, it puts them into combat. When in combat the player cant heal. The Player must last 60 seconds without getting damaged to get out of combat. If the player is combat tagged, shows a Skull on the screen."

-- Script for the combat system

local Players = game:GetService("Players")

local combatTagged = {}

local function tagPlayer(player)
    combatTagged[player] = tick()
    -- Show skull on screen
    local gui = Instance.new("ScreenGui", player:WaitForChild("PlayerGui"))
    local image = Instance.new("ImageLabel", gui)
    image.Image = "rbxassetid://your_skull_image_id_here"
    image.Size = UDim2.new(0, 50, 0, 50)
    image.Position = UDim2.new(0.5, -25, 0.5, -25)
end

local function untagPlayer(player)
    combatTagged[player] = nil
    -- Remove skull from screen
    local gui = player:FindFirstChild("PlayerGui")
    if gui then
        for _, v in pairs(gui:GetChildren()) do
            if v:IsA("ScreenGui") then
                v:Destroy()
            end
        end
    end
end

local function checkTag(player)
    if combatTagged[player] and tick() - combatTagged[player] >= 60 then
        untagPlayer(player)
    end
end

game:GetService("RunService").Heartbeat:Connect(function()
    for _, player in pairs(Players:GetPlayers()) do
        checkTag(player)
    end
end)

game:GetService("Players").PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(char)
        local humanoid = char:WaitForChild("Humanoid")
        humanoid.TakingDamage:Connect(function()
            tagPlayer(player)
        end)
    end)
end)

-- For the healing prevention, you can use a similar system where you check if the player is tagged before healing them. If they are tagged, you can cancel the healing. This would be done in the script responsible for healing the player.

"create lava falling from the sky on players heads"

"make a shift to sprint"

"create a terrain that has a large terrain"

"make a server script that puts Kinda big golden text that above the part that its in that says Kick"

"It works, make the text fade in from the bottom of the screen, slowly move up to the top and fade away. Also, make the black screen cover the players entire screen."

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

local blackScreen = Instance.new("Frame", screenGui)
blackScreen.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
blackScreen.Size = UDim2.new(1, 0, 1, 0)

local textLabel = Instance.new("TextLabel", blackScreen)
textLabel.Text = "Your text here"
textLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
textLabel.BackgroundTransparency = 1
textLabel.Position = UDim2.new(0.5, 0, 1, 0) -- start from bottom of the screen
textLabel.AnchorPoint = Vector2.new(0.5, 0.5)

-- Tweening the text to move up and fade away 
local tweenService = game:GetService("TweenService")
local tweenInfo = TweenInfo.new(5, Enum.EasingStyle.Linear, Enum.EasingDirection.Out, 0, false, 0)
local goal = {Position = UDim2.new(0.5, 0, 0, 0), TextTransparency = 1} -- move to top of the screen

local tween = tweenService:Create(textLabel, tweenInfo, goal)
tween:Play()

-- Instructions: 
1. Create a LocalScript under StarterGui.
2. Copy and paste this code into the LocalScript.
3. Replace "Your text here" with the text you want to display.
4. Run the game and the text will fade in from the bottom, move up the screen, and then fade away. The black screen will cover the player's entire screen.

"create a playerjoined message"

"a gui what says "Eggs" and it starts at 0 but each time a player walks into my part called give it gives 1 Egg on the gui make it so i ca put this script into my part called give ( you make the gui) make it so the gui shows at the top of your screen"

"make a script that changes the gravity by typing a word in chat"

"script for a zombie with replacable animations for attacks, idles, and walk animation and tell me where everything goes"

-- server script (ServerScriptService) 
local Zombie = game.Workspace.Zombie -- Make sure to place a model named "Zombie" in the Workspace
local animationController = Zombie.AnimationController -- Add an AnimationController to the Zombie model

-- Replace these IDs with your own animation IDs
local attackAnimationId = "rbxassetid://123456789"
local idleAnimationId = "rbxassetid://987654321"
local walkAnimationId = "rbxassetid://123498765"

local attackAnimation = Instance.new("Animation")
attackAnimation.AnimationId = attackAnimationId
local idleAnimation = Instance.new("Animation")
idleAnimation.AnimationId = idleAnimationId
local walkAnimation = Instance.new("Animation")
walkAnimation.AnimationId = walkAnimationId

local attackTrack = animationController:LoadAnimation(attackAnimation)
local idleTrack = animationController:LoadAnimation(idleAnimation)
local walkTrack = animationController:LoadAnimation(walkAnimation)

-- Function to play attack animation
local function playAttackAnimation()
    attackTrack:Play()
end

-- Function to play idle animation
local function playIdleAnimation()
    idleTrack:Play()
end

-- Function to play walk animation
local function playWalkAnimation()
    walkTrack:Play()
end

-- You can call these functions whenever you want to play the respective animations
-- For example, you can use Touched event for attack animation, or use a loop for walk animation
-- For now, let's use a simple loop to play idle and walk animations alternatively

while true do
    playIdleAnimation()
    wait(5) -- Adjust the wait time as needed
    playWalkAnimation()
    wait(5) -- Adjust the wait time as needed
end

-- Instructions 
1. Create a model named "Zombie" in the Workspace and add a Humanoid and AnimationController to it.
2. Add the server script provided above to ServerScriptService.
3. Replace the animation IDs in the script with your own animation IDs.
4. Customize the script as needed to play the animations based on events or conditions in your game.

"create a code that makes the player stretch their arms like pistol punches and make it do damage, when they press the left mouse button"

"when tool is equipped it will have a ui that says " press F" when you press f a remote function in replicated storage will activate"

"can you make me a script that when you touch the ball and click m1 the ball moves based on where your camera is faced and stops after 2 seconds"

"DataLoader for 2 scripts that are already made inside serverscript service DataStore folder Handler script and DataStore2 Module script i want it to take the Data these 2 Save and Load it in when the Player Joins take the Values and load it in."

-- server script (ServerScriptService.DataStore.Loader) 
local DataStoreService = game:GetService("DataStoreService")
local Players = game:GetService("Players")
local HandlerScript = require(game.ServerScriptService.DataStore.Handler)
local DataStore2 = require(game.ServerScriptService.DataStore.DataStore2)

local function onPlayerAdded(player)
    local data
    local success, errorMessage = pcall(function()
        data = DataStoreService:GetDataStore("PlayerData"):GetAsync(player.UserId)
    end)

if success and data then
        HandlerScript:LoadData(player, data)
        DataStore2:LoadData(player, data)
    else
        warn("Failed to load data for player " .. player.Name .. ": " .. tostring(errorMessage))
    end
end

local function onPlayerRemoving(player)
    local data = HandlerScript:GetData(player)
    local data2 = DataStore2:GetData(player)

local success, errorMessage = pcall(function()
        DataStoreService:GetDataStore("PlayerData"):SetAsync(player.UserId, {data, data2})
    end)

if not success then
        warn("Failed to save data for player " .. player.Name .. ": " .. tostring(errorMessage))
    end
end

Players.PlayerAdded:Connect(onPlayerAdded)
Players.PlayerRemoving:Connect(onPlayerRemoving)

"make a script that respawns Jeep when a player touches the Regen part and allow Jeep to be respawned even after it is destroyed"

"make a script that plays a sound whenever a NPC called Bandit is damaged but only players close enough can hear it"

"Script 'ServerScriptService.PlayerData', Line 43 - function setupPlayerData"

local DataStoreService = game:GetService("DataStoreService")
local playerDataStore = DataStoreService:GetDataStore("PlayerData")

local function setupPlayerData(player)
    local playerUserId = "Player_" .. player.UserId
    local data

local success, err = pcall(function()
        data = playerDataStore:GetAsync(playerUserId)
    end)

if success then
        if not data then
            data = {
                coins = 0,
                bag = 0
            }
            playerDataStore:SetAsync(playerUserId, data)
        end
    else
        warn("Error while getting player data: " .. err)
        return
    end

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

local coins = Instance.new("IntValue")
    coins.Name = "Coins"
    coins.Value = data.coins
    coins.Parent = leaderstats

local bag = Instance.new("IntValue")
    bag.Name = "Bag"
    bag.Value = data.bag
    bag.Parent = leaderstats

player.CharacterAdded:Connect(function(character)
        character:WaitForChild("Humanoid").Died:Connect(function()
            local success, err = pcall(function()
                playerDataStore:SetAsync(playerUserId, {
                    coins = coins.Value,
                    bag = bag.Value
                })
            end)

if not success then
                warn("Error while saving player data: " .. err)
            end
        end)
    end)
end

game.Players.PlayerAdded:Connect(setupPlayerData)

"Make a script where a part has to detect 2 players stepping on it then it should count down from 5 seconds and if both players are still detected on the mat it freezes them and teleports them away from each other facing each other while maintaining both players on the mat then unfreezes them"

-- script for part 
local part = script.Parent
local playersOnPart = {}

local function teleportAndUnfreeze(player1, player2)
    player1.Character.HumanoidRootPart.CFrame = CFrame.new(0, 5, 0) * CFrame.Angles(0, math.rad(180), 0)
    player2.Character.HumanoidRootPart.CFrame = CFrame.new(0, 5, 10)
    player1.Character.Humanoid.PlatformStand = false
    player2.Character.Humanoid.PlatformStand = false
end

local function checkPlayers()
    if #playersOnPart == 2 then
        wait(5)
        if #playersOnPart == 2 then
            playersOnPart[1].Character.Humanoid.PlatformStand = true
            playersOnPart[2].Character.Humanoid.PlatformStand = true
            wait(1)
            teleportAndUnfreeze(playersOnPart[1], playersOnPart[2])
        end
    end
end

local function playerEntered(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        table.insert(playersOnPart, player)
        checkPlayers()
    end
end

local function playerLeft(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        for i, v in ipairs(playersOnPart) do
            if v == player then
                table.remove(playersOnPart, i)
                break
            end
        end
    end
end

part.Touched:Connect(playerEntered)
part.TouchEnded:Connect(playerLeft)

"Shooting"

"Create a script inside server script service that will save bool values"

local DataStoreService = game:GetService("DataStoreService")
local boolDataStore = DataStoreService:GetDataStore("BoolValuesDataStore")

game.Players.PlayerAdded:Connect(function(player)
    local success, errorMessage = pcall(function()
        local savedData = boolDataStore:GetAsync(player.UserId)
        if savedData then
            -- Load saved bool values for the player
            for key, value in pairs(savedData) do
                player:SetAttribute(key, value)
            end
        else
            -- Set default bool values for the player
            player:SetAttribute("BoolValue1", false)
            player:SetAttribute("BoolValue2", false)
            player:SetAttribute("BoolValue3", false)
        end
    end)

if not success then
        warn("Failed to load data for player " .. player.Name .. ": " .. errorMessage)
    end
end)

game.Players.PlayerRemoving:Connect(function(player)
    local success, errorMessage = pcall(function()
        local dataToSave = {}
        dataToSave["BoolValue1"] = player:GetAttribute("BoolValue1")
        dataToSave["BoolValue2"] = player:GetAttribute("BoolValue2")
        dataToSave["BoolValue3"] = player:GetAttribute("BoolValue3")

boolDataStore:SetAsync(player.UserId, dataToSave)
    end)

if not success then
        warn("Failed to save data for player " .. player.Name .. ": " .. errorMessage)
    end
end)

game:BindToClose(function()
    for _, player in ipairs(game.Players:GetPlayers()) do
        local success, errorMessage = pcall(function()
            local dataToSave = {}
            dataToSave["BoolValue1"] = player:GetAttribute("BoolValue1")
            dataToSave["BoolValue2"] = player:GetAttribute("BoolValue2")
            dataToSave["BoolValue3"] = player:GetAttribute("BoolValue3")

boolDataStore:SetAsync(player.UserId, dataToSave)
        end)

if not success then
            warn("Failed to save data for player " .. player.Name .. ": " .. errorMessage)
        end
    end
end)

"script for when player triggers pickup function"

"add to the script you just generated by creating a second button, when clicked it adds a tab to the dropdown menu with the text *player who clicked button*'s menu, it is tweened"

"an exploit (only for my game)"

"make a ui and but auto lock aimbot speed fly god mode name of player in my game auto lock aimbot and what gun to aimbot with"

"when i click my screen a block will apear in the mouse"

"Create a script that prints the Instance name closest to my mouse."

"The hinge needs to be in it. Is there another way to set the script to open at 90, and close at 0."

"make a script so that if the proximity prompt is triggered then clone the script.parent.parent into the local player backpack then destroy the script.parent.parent"