Haddock - Roblox Library

"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 script that makes all the players join the game Id: 5036207802, and the player called 8enxy will NOT join the game"

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

"Write a script for a realistic house door that can be opened when the player is prompted to interact with it, and also swings open smoothly."

-- server script 
local door = script.Parent
local hinge = door.Hinge
local prompt = door.Prompt

local isOpen = false
local canInteract = true

local function openDoor()
    if not isOpen and canInteract then
        canInteract = false
        hinge.TargetAngle = 90
        isOpen = true
        wait(1)
        canInteract = true
    end
end

local function closeDoor()
    if isOpen and canInteract then
        canInteract = false
        hinge.TargetAngle = 0
        isOpen = false
        wait(1)
        canInteract = true
    end
end

local function onPromptTouched(player)
    if isOpen then
        closeDoor()
    else
        openDoor()
    end
end

prompt.Triggered:Connect(onPromptTouched)

-- Make sure to create a part named "door" with a hinge constraint named "Hinge" and a proximity prompt named "Prompt" in your Roblox game. The hinge constraint should be connected to the door and its parent (e.g., door frame). The proximity prompt should be placed near the door where the player can interact with it.

"make a script if you press q it places a wall in front of you"

"capture system with 3 points, 500 pts each. Faster capture with more players. No gains if both teams on point. States: Team1Controlled, Team2Controlled, Contested, Team1Capturing, Team2Capturing."

-- server script 
local point1 = game.Workspace.Point1
local point2 = game.Workspace.Point2
local point3 = game.Workspace.Point3
local points = {point1, point2, point3}
local captureSpeed = 1

local function updateState(point, state)
    point.State.Value = state
end

local function capturePoint(point)
 while true do
 local team1Players = 0
 local team2Players = 0
 
 for _, player in ipairs(game.Players:GetPlayers()) do
 if player.Character and (player.Character.HumanoidRootPart.Position - point.Position).Magnitude < 10 then
 if player.TeamColor == BrickColor.new("Bright blue") then
 team1Players = team1Players + 1
 elseif player.TeamColor == BrickColor.new("Bright red") then
 team2Players = team2Players + 1
 end
 end
 end
 
 if team1Players > 0 and team2Players == 0 then
 if point.State.Value == "Team2Controlled" or point.State.Value == "Contested" then
 updateState(point, "Team1Capturing")
 end
 point.Team1Progress.Value = point.Team1Progress.Value + (team1Players * captureSpeed)
 if point.Team1Progress.Value >= 500 then
 updateState(point, "Team1Controlled")
 end
 elseif team1Players == 0 and team2Players > 0 then
 if point.State.Value == "Team1Controlled" or point.State.Value == "Contested" then
 updateState(point, "Team2Capturing")
 end
 point.Team2Progress.Value = point.Team2Progress.Value + (team2Players * captureSpeed)
 if point.Team2Progress.Value >= 500 then
 updateState(point, "Team2Controlled")
 end
 elseif team1Players > 0 and team2Players > 0 then
 updateState(point, "Contested")
 end
 
 wait(1)
 end
end

for _, point in ipairs(points) do
    spawn(function()
        capturePoint(point)
    end)
end

"let a npc that the script is in able to use a item by a id and make it use the tool by clicking"

"make imagelabel1 show a specific image if the player has the badge with the id 2143148840, if they don't the badge then show image 12953850111. repeat for multiple imagelabels with different badges"

"Make all of the conveyor belt scripts move at the speed of 45"

"make a wolf chase the player for 10 seconds when the player says wolf, make sure the wolf can't fall."

-- server script 
local wolf = game.Workspace.Wolf
local pfs = game:GetService("PathfindingService")
local players = game:GetService("Players")

local function chasePlayer(player, duration)
    local character = player.Character
    if character then
        local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
        if humanoidRootPart then
            local path = pfs:CreatePath()
            path:ComputeAsync(wolf.HumanoidRootPart.Position, humanoidRootPart.Position)
            local waypoints = path:GetWaypoints()
            for _, waypoint in ipairs(waypoints) do
                wolf.Humanoid:MoveTo(waypoint.Position)
                wolf.Humanoid.MoveToFinished:Wait()
            end
            wait(duration)
            wolf.Humanoid:MoveTo(wolf.HumanoidRootPart.Position)
        end
    end
end

local function onChatted(player, message)
    if message:lower() == "wolf" then
        chasePlayer(player, 10)
    end
end

for _, player in ipairs(players:GetPlayers()) do
    player.Chatted:Connect(function(message) onChatted(player, message) end)
end

players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(message) onChatted(player, message) end)
end)

-- script for wolf 
local wolf = script.Parent
wolf.Humanoid.PlatformStand = true

"where would i but the scripts and models after putting them in the table"

"script for a part to make it grow bigger and smaller in increments of 5 seconds. add detailed comments"

"it doesnt tilt the camera"

-- server script 
local module = {}
local CC = workspace.CurrentCamera 
local UIS = game:GetService("UserInputService")
local RS = game:GetService("RunService")
local ion = 0
local know = 0
local what = 0
local to = 0
local call = 0
local these = nil

function mFS(transp) 
    if transp.UserInputType == Enum.UserInputType.MouseMovement then 
        if char then 
            ion = ion - transp.Delta.X * 0.4 
            know = math.clamp(know - transp.Delta.Y * 0.4, -80, 80) 
            local mouseLoc = UIS:GetMouseLocation() 
            char:SetPrimaryPartCFrame(CFrame.new(char.PrimaryPart.Position, char.PrimaryPart.Position   CC:ScreenPointToRay(mouseLoc.X, mouseLoc.Y).Direction * Vector3.new(1, 0, 1))) 
        end 
    end 
end

function chrTransp(transparencyvalue) 
    local func, humandescd, humanwentthrough1 = pairs(char:GetDescendants()) 
    while true do 
        local humanwentthrough2, bodyp = func(humandescd, humanwentthrough1) 
        if humanwentthrough2 then 
        else break end 
        humanwentrough1 = humanwentthrough2 
        if bodyp.Name ~= "HumanoidRootPart" then 
            if bodyp:IsA("MeshPart") then 
                bodyp.Transparency = transparencyvalue 
            end 
        end 
    end 
end

function lerp(value1, value2, value3) 
    return value1   (value2 - value1) * value3 
end

function module.FirstPerson()
    UIS.MouseIconEnabled = false
    game.Players.LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson
    CC.FieldOfView = 60

if not UIS.TouchEnabled and not UIS.GamepadEnabled then
        RS:BindToRenderStep("fp",Enum.RenderPriority.Camera.Value, function(p8)
            UIS.MouseBehavior = Enum.MouseBehavior.LockCenter
            CC.CameraType = Enum.CameraType.Scriptable
            chrTransp(1)

if char and char:FindFirstChild("Humanoid") and char:FindFirstChild("HumanoidRootPart") then
                to = lerp(to, math.clamp(UIS:GetMouseDelta().X, -1, 1), 5 * p8)

if char.Humanoid:GetState() == Enum.HumanoidStateType.Jumping or char.Humanoid:GetState() == Enum.HumanoidStateType.Freefall then
                    CC.CFrame = CC.CFrame:Lerp(CFrame.new(char:GetPrimaryPartCFrame().Position   Vector3.new(0, 1.5, 0)) * CFrame.fromAxisAngle(Vector3.new(0, 1, 0), math.rad(ion)) * CFrame.fromAxisAngle(Vector3.new(1, 0, 0), math.rad(know)), 0.35) * CFrame.Angles(0, 0, math.rad(to)) * (CFrame.Angles(0, 0, -what) * CFrame.Angles(0, 0, 0))
                end
            end
        end)
        these = UIS.InputChanged:Connect(mFS)
    end
end

return module

"Make a script that if you run into other players who are not on your team, you both fall to the ground. Add comments to code"

"make a button to switch between running and walking"

"create a script in server script that closes a Frame in screen gui when a player enters a code using textlabels with instructions on how to set it up"

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

local function closeFrame(player, code)
    local gui = player:WaitForChild("PlayerGui")
    local frame = gui:WaitForChild("MyFrame")
    if code == "YOUR_SECRET_CODE" then
        frame.Visible = false
    end
end

Players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(message)
        closeFrame(player, message)
    end)
end)

-- Instructions to set up the Frame in Roblox Studio 
-- 1. In Roblox Studio, open the "Explorer" and "Properties" panels if they are not open.
-- 2. In the Explorer, click on "StarterGui" and then click on the "+" button to add a new "ScreenGui" object.
-- 3. Rename the "ScreenGui" object to "MyScreenGui" or any name you prefer.
-- 4. Click on the "MyScreenGui" object and then click on the "+" button to add a new "Frame" object.
-- 5. Rename the "Frame" object to "MyFrame" or any name you prefer.
-- 6. Customize the appearance of the "Frame" object using the "Properties" panel.
-- 7. Save your game and test it out in Roblox Studio by clicking on the "Play" button.

"when any player spawns in, give them a tool named "Gura-Gura" . this tool should have a moveset with keybinds Z,X,C,V and the moves should be based on the Gura Gura fruit in one piece"

-- server script 
game.Players.PlayerAdded:Connect(function(player)
	local tool = Instance.new("Tool")
	tool.Name = "Gura-Gura"
	tool.Parent = player.Backpack
	
	local moveSet = tool:FindFirstChild("MoveSet")
	if not moveSet then
		moveSet = Instance.new("MoveSet")
		moveSet.Name = "MoveSet"
		moveSet.Parent = tool
	end
	
	local move1 = moveSet:FindFirstChild("Move1")
	if not move1 then
		move1 = Instance.new("Move")
		move1.Name = "Move1"
		move1.KeyCode = Enum.KeyCode.Z
		move1.Parent = moveSet
	end
	
	local move2 = moveSet:FindFirstChild("Move2")
	if not move2 then
		move2 = Instance.new("Move")
		move2.Name = "Move2"
		move2.KeyCode = Enum.KeyCode.X
		move2.Parent = moveSet
	end
	
	local move3 = moveSet:FindFirstChild("Move3")
	if not move3 then
		move3 = Instance.new("Move")
		move3.Name = "Move3"
		move3.KeyCode = Enum.KeyCode.C
		move3.Parent = moveSet
	end
	
	local move4 = moveSet:FindFirstChild("Move4")
	if not move4 then
		move4 = Instance.new("Move")
		move4.Name = "Move4"
		move4.KeyCode = Enum.KeyCode.V
		move4.Parent = moveSet
	end
end)

"create a script inside a tool that create a fire ball projectile when player press E"

-- local script inside a tool 
local tool = script.Parent
local player = game:GetService("Players").LocalPlayer
local mouse = player:GetMouse()

local function createFireball()
    local fireball = Instance.new("Part")
    fireball.Name = "Fireball"
    fireball.Shape = "Ball"
    fireball.Size = Vector3.new(2, 2, 2)
    fireball.BrickColor = BrickColor.new("Bright red")
    fireball.Material = "Neon"
    fireball.Parent = workspace
    fireball.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 2, 0)

local fire = Instance.new("Fire", fireball)
    fire.Size = 2
    fire.Heat = 10

local bodyVelocity = Instance.new("BodyVelocity", fireball)
    bodyVelocity.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
    bodyVelocity.Velocity = (mouse.Hit.p - fireball.Position).unit * 100

game:GetService("Debris"):AddItem(fireball, 3)
end

local function onKeyDown(key)
    if key == "e" or key == "E" then
        createFireball()
    end
end

mouse.KeyDown:Connect(onKeyDown)

"script for a part that gives the player a random piece of gear from the Gear folder in serverstorage every 5 minutes if they touch the part and are stage 210. the part displays a 5 minute countdown. add detailed comments and instructions"

"Add a function where it plays the animation when i click a master part tell me how to set it up"

"Please create a script for an image button that, when clicked, will prompt the player to purchase a game pass for the game."

"make a dropper that drops bright red parts with a value of 1 inside of them"

"Write me a script that adds proper grammar to player chat when players use improper grammar or punctuation when they type in the chatbar"

I'm sorry, but it's not possible to create a script that can perfectly correct grammar and punctuation in real-time as players type in the chat. Natural language processing is a complex task and requires advanced machine learning models like GPT-3 to perform well.

However, I can help you create a simple script that checks for common grammar mistakes and tries to correct them. Keep in mind that this script will not be perfect and may still miss some errors or make incorrect corrections.

```lua
local ChatService = game:GetService("Chat")

local function correctGrammar(message)
    -- Simple grammar corrections
    message = message:gsub(" u ", " you ")
    message = message:gsub(" ur ", " your ")
    message = message:gsub(" r ", " are ")
    message = message:gsub(" i ", " I ")
    message = message:gsub("^i ", "I ")
    message = message:gsub(" im ", " I'm ")
    message = message:gsub("^im ", "I'm ")

-- Capitalize the first letter of each sentence
    message = message:gsub("([^%.%!%?]*)(%.%!%?)", function(sentence, punctuation)
        return sentence:sub(1, 1):upper() .. sentence:sub(2) .. punctuation
    end)

return message
end

local function onPlayerChatted(player, message)
    local correctedMessage = correctGrammar(message)
    ChatService:Chat(player.Character, correctedMessage)
end

game.Players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(message)
        onPlayerChatted(player, message)
    end)
end)
```

This script will attempt to correct some common grammar mistakes and capitalize the first letter of each sentence. However, it will not be able to handle more complex grammar and punctuation issues.

"make a trading system there is a button on the side of the screen when you click it you pick who you want to trade with then you put the item in"

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

local tradeButton = Instance.new("TextButton", screenGui)
tradeButton.Text = "Trade"
tradeButton.TextColor3 = Color3.fromRGB(255, 255, 255)
tradeButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
tradeButton.UICorner = 5
tradeButton.Position = UDim2.new(0.95, 0, 0.5, 0)

local tradeMenu = Instance.new("Frame", screenGui)
tradeMenu.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
tradeMenu.Visible = false

local function openTradeMenu()
    tradeMenu.Visible = not tradeMenu.Visible
end

tradeButton.MouseButton1Click:Connect(openTradeMenu)

local function createTrade(playerToTradeWith, itemToTrade)
    -- Add code to handle the actual trading process between players
    -- This can involve checking if the other player accepts the trade, transferring the item, etc.
end

local function selectPlayerToTradeWith()
    local selectedPlayer = nil
    -- Add code to display a list of players and allow the user to select one of them
    -- Once a player is selected, store their reference in the variable 'selectedPlayer'
    return selectedPlayer
end

local function selectItemToTrade()
    local selectedItem = nil
    -- Add code to display a list of the player's items and allow the user to select one of them
    -- Once an item is selected, store its reference in the variable 'selectedItem'
    return selectedItem
end

local function initiateTrade()
    local playerToTradeWith = selectPlayerToTradeWith()
    local itemToTrade = selectItemToTrade()
    if playerToTradeWith and itemToTrade then
        createTrade(playerToTradeWith, itemToTrade)
    end
end

tradeMenu.MouseButton1Click:Connect(initiateTrade)

"make a really cool randomly generated landscape"

"ball that can move and be controlled with W A S D"

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

"Write a script that generates grass on parts using the Grass material with cancollide set to false"

"countdown from 100 to 0"

"make the parent part kill the player when they touch it if they are between Stage 106 and 209, don't kill the player if they have the carpet gamepass"

"saying quit kicks the player"

"make a wall fly"

"make a hack."

"make a roblox lua script to kick people"

"create a script inside a tool that heals a player when they left click holding the tool and has a particle effect"

"make a script where there is a gui what only a player called ijustgothitby_acar can see it and when they click it it will make all player have this Avatar item 7097383815"

"make a script so when u buy a developer product it says it in the chat and in a red text that says "☢Player has bought a nuke!!!☢" and tell me if I put it as a local script and were do I put it"

"make a script that makes me follow a close player"

-- local script 
local Players = game:GetService("Players")
local Player = Players.LocalPlayer
local Character = Player.Character
local Humanoid = Character.Humanoid
local closestPlayer

while true do
 local closestDistance = math.huge
 for _, player in pairs(Players:GetPlayers()) do
 if player ~= Player then
 local playerCharacter = player.Character
 if playerCharacter then
 local playerHumanoidRootPart = playerCharacter:FindFirstChild("HumanoidRootPart")
 local distance = (Humanoid.RootPart.Position - playerHumanoidRootPart.Position).magnitude
 if distance < closestDistance then
 closestDistance = distance
 closestPlayer = player
 end
 end
 end
 end
 if closestPlayer and closestPlayer.Character then
 local target = closestPlayer.Character:FindFirstChild("HumanoidRootPart")
 if target then
 Humanoid:MoveTo(target.Position)
 end
 end
 wait(1)
end

"team switcher UI, clicking a button switches to another team. Tell me where the script goes"

"make a fire effect"

"how to make a notepad thats send message for player when click in the text button"

"Make a whole model smoothly tilt side to side a little bit. CFrame Animation"

"I currently have a bool value under all players that join the game called CombatTag. Make a script that is constantly checking to see if the players CombatTag bool value is true."

"make me a script to let me pick up a part as a tool and hold it"

"create small money simulator for purchasing products"

"Make a script where if I click on a Part, that part disapears and it gives 1 to the IntValues I have inside of a Folder called Inventory. The Inventory Folder is under the player. The 2 Int Values are called Wood and Stone."

"make a bricks color change every 0.25 seconds"

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

"Create a camera system where the player character's head faces the direction that the camera is facing, and the mouse icon is controlled from the eyes of the character."

"Can you write a camera script that makes the player's head follow the mouse?"

"make that when a player touches a part called "Lasagna" he goes to the team "BlackAnts""

"Write me a script that makes the game time run like it does in the real world"

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

-- local script 
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local Mouse = LocalPlayer:GetMouse()
local Camera = workspace.CurrentCamera

local function getClosestPlayer()
 local closestDistance = math.huge
 local closestPlayer = nil
 for _, player in ipairs(Players:GetPlayers()) do
 if player ~= LocalPlayer then
 local distance = (LocalPlayer.Character.HumanoidRootPart.Position - player.Character.HumanoidRootPart.Position).magnitude
 if distance < closestDistance then
 closestDistance = distance
 closestPlayer = player
 end
 end
 end
 return closestPlayer
end

local function lockOn()
    local closestPlayer = getClosestPlayer()
    if closestPlayer then
        Camera.CameraSubject = closestPlayer.Character.Humanoid
    end
end

local function unlock()
    Camera.CameraSubject = LocalPlayer.Character.Humanoid
end

Mouse.Button2Down:Connect(lockOn)
Mouse.Button2Up:Connect(unlock)

"create a voting system where players can vote for others buildings"

"when left click is clicked activate remote event"

"if the script is in something named box then every time you say box it makes the box bigger. server script. Size is not a valid member of Model "Workspace.box" fix it"

"NPC that follows player, script has a part where I can replace walk animation and has an attack system with animation I can replace within script, tell me where it goes"

First, insert an R15 Dummy NPC model from the toolbox in Roblox Studio. Then, follow these steps:

1. In the R15 Dummy NPC object, select Humanoid.
2. Right-click on the Humanoid and select "Insert Object".
3. Add a Script and paste the code below.

Replace the animation IDs in the `walkAnimationId` and `attackAnimationId` variables with the asset IDs of the animations you want to use.

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

local npc = script.Parent
local humanoid = npc.Humanoid
local root = npc.PrimaryPart

local walkAnimationId = "rbxassetid://YOUR_WALK_ANIMATION_ID"
local attackAnimationId = "rbxassetid://YOUR_ATTACK_ANIMATION_ID"

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

local function findNearestPlayer()
	local playerList = Players:GetPlayers()
	local nearestPlayer = nil
	local distance = nil
	local direction = nil 
	
	for _, player in pairs(playerList) do
		local character = player.Character
		if character then
			local distanceVector = character.PrimaryPart.Position - root.Position
			if not nearestPlayer then
				nearestPlayer = player
				distance = distanceVector.Magnitude
				direction = distanceVector.Unit
			elseif distanceVector.Magnitude < distance then
				nearestPlayer = player
				distance = distanceVector.Magnitude
				direction = distanceVector.Unit
			end
		end
	end
	
	return nearestPlayer, distance, direction
end

local function attackPlayer(player)
	local character = player.Character
	if character then
		local humanoid = character:FindFirstChild("Humanoid")
		if humanoid then
			humanoid.Health = humanoid.Health - 10
		end
	end
end

RunService.Heartbeat:Connect(function()
	local nearestPlayer, distance, direction = findNearestPlayer()
	if nearestPlayer then
		if distance < 5 then
			humanoid:LoadAnimation(attackAnimation):Play()
			attackPlayer(nearestPlayer)
		else
			humanoid:LoadAnimation(walkAnimation):Play()
			humanoid:Move(direction)
		end
	end
end)
```

This script will make the NPC follow the nearest player and attack them when they are within a certain distance. The walk and attack animations can be replaced by changing the asset IDs in the `walkAnimationId` and `attackAnimationId` variables.

"each second you get more walkspeed at the top of your screen it tells you how much walkspeed you have"

"Make a leaderstats that has kills and deaths"

"make a hint show how much time the player has left and slowly slow down the songs pitch named 'parte' depending on how much time is left make the timer 8 mins make the player die if time runs out"

"Write a script for a realistic door"

"add a code that allows me to run the script from a button part"

"make me a script where if you press a button a frame appears from starter gui"

"the gui doesnt close when i click play"

If you want the GUI to close when you click a play button, you'll need to write a script for that button which changes the GUI's visibility. Here's an example:

```lua
-- assuming 'PlayButton' is the name of your button and 'MyGui' is the name of your GUI
local Players = game:GetService("Players")

local function onPlayerAdded(player)
    local playerGui = player:WaitForChild("PlayerGui") -- This is how you access PlayerGui
    local MyGui = playerGui:WaitForChild("MyGui")
    local PlayButton = MyGui:WaitForChild("PlayButton")

local function onButtonClick()
        MyGui.Enabled = false -- This will hide the GUI
    end

PlayButton.MouseButton1Click:Connect(onButtonClick)
end

Players.PlayerAdded:Connect(onPlayerAdded)
```

In this script, when a player is added, the function `onPlayerAdded` is called with the player as the argument. Inside this function, `WaitForChild("PlayerGui")` is used to get the PlayerGui of the player. Then, `WaitForChild("MyGui")` is used to get the GUI, and `WaitForChild("PlayButton")` is used to get the play button.

A function `onButtonClick` is defined which sets the `Enabled` property of the GUI to `false`, effectively hiding it. This function is connected to the `MouseButton1Click` event of the play button, so it will be called when the button is clicked.

"create a running script that allows player to jog by double tapping W and sprint faster by hold shift while jogging"

-- local script 
local UserInputService = game:GetService("UserInputService")
local player = game.Players.LocalPlayer
local character = player.Character
local humanoid = character:WaitForChild("Humanoid")
local shiftHeld = false
local wCount = 0
local canRun = true

local function inputBegan(input)
    if input.KeyCode == Enum.KeyCode.W then
        wCount = wCount + 1
        if wCount == 2 and canRun then
            canRun = false
            humanoid.WalkSpeed = 20
            wait(0.3)
            canRun = true
        end
    elseif input.KeyCode == Enum.KeyCode.LeftShift then
        shiftHeld = true
    end
end

local function inputEnded(input)
    if input.KeyCode == Enum.KeyCode.W then
        wCount = 0
        humanoid.WalkSpeed = 16
    elseif input.KeyCode == Enum.KeyCode.LeftShift then
        shiftHeld = false
    end
end

UserInputService.InputBegan:Connect(inputBegan)
UserInputService.InputEnded:Connect(inputEnded)

while wait() do
    if shiftHeld and humanoid.WalkSpeed == 20 then
        humanoid.WalkSpeed = 30
    elseif not shiftHeld and humanoid.WalkSpeed == 30 then
        humanoid.WalkSpeed = 20
    end
end

"make a random script"

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

"make it check the module script white listed players and make the server script not count the white listed players"

"make a roblox script that lets you sit when you press q"

"Create a script that gives a player a certain item when it’s the players birthday and shows a text saying happy birthday using the text inside the screen gui that’s been created"

"change the position of the chat gui to the buttom left."

"make a moving dad"

-- server script 
local dad = Instance.new("Model")
dad.Name = "Dad"
dad.Parent = game.Workspace

local humanoid = Instance.new("Humanoid")
humanoid.Parent = dad

local torso = Instance.new("Part")
torso.Name = "Torso"
torso.Anchored = false
torso.Size = Vector3.new(2, 2, 1)
torso.Parent = dad

local head = Instance.new("Part")
head.Name = "Head"
head.Anchored = false
head.Size = Vector3.new(2, 1, 1)
head.Parent = dad
head.CFrame = torso.CFrame * CFrame.new(0, 1.5, 0)

local pfs = game:GetService("PathfindingService")
local path = pfs:CreatePath()
local waypoints = {}

local function moveDad()
    local startPoint = dad.HumanoidRootPart.Position
    local endPoint = Vector3.new(math.random(-50, 50), 0, math.random(-50, 50))
    path:ComputeAsync(startPoint, endPoint)
    waypoints = path:GetWaypoints()

for _, waypoint in ipairs(waypoints) do
        dad.Humanoid:MoveTo(waypoint.Position)
        dad.Humanoid.MoveToFinished:Wait()
    end
end

while true do
    moveDad()
    wait(2)
end

"Create a script so when I hover over a part is becomes blue and if I don't hover over that part anymore it becomes white."

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

-- server script (ServerScriptService) 
local usedCodes = {}

game.Players.PlayerAdded:Connect(function(player)
    local function checkCode(code)
        if usedCodes[code] == nil then
            usedCodes[code] = true
            return true
        else
            return false
        end
    end
    
    local function onCodeEntered(player, code)
        if checkCode(code) then
            local gui = player.PlayerGui:FindFirstChild("ScreenGui")
            if gui then
                local frame = gui:FindFirstChild("Frame")
                if frame then
                    frame.Visible = false
                end
            end
        else
            print("Code already used or invalid")
        end
    end
    
    local event = Instance.new("BindableFunction")
    event.Name = "CodeEntered"
    event.OnInvoke = onCodeEntered
    event.Parent = player
end)

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

textLabel.FocusLost:Connect(function(enterPressed)
    if enterPressed then
        local code = textLabel.Text
        codeEnteredEvent:Invoke(code)
    end
end)

"make a script that 1 part inputs someones voice chat, while those parts project the input which is also known as output parts"

"create a tool that lets the player throw parts"

"npc that follows closest player walk animation"

-- server script 
local pfs = game:GetService("PathfindingService")
local npc = game.Workspace.NPC
local walkAnimation = Instance.new("Animation")
walkAnimation.AnimationId = "rbxassetid://507770453" -- Roblox walk animation ID

local function findClosestPlayer()
    local closestPlayer = nil
    local closestDistance = math.huge

for _, player in ipairs(game.Players:GetPlayers()) do
 if player.Character then
 local distance = (npc.HumanoidRootPart.Position - player.Character.HumanoidRootPart.Position).Magnitude
 if distance < closestDistance then
 closestDistance = distance
 closestPlayer = player
 end
 end
 end

return closestPlayer
end

while true do
    local closestPlayer = findClosestPlayer()
    if closestPlayer and closestPlayer.Character then
        local path = pfs:CreatePath()
        path:ComputeAsync(npc.HumanoidRootPart.Position, closestPlayer.Character.HumanoidRootPart.Position)

local waypoints = path:GetWaypoints()
        local humanoid = npc.Humanoid
        local walkAnimTrack = humanoid:LoadAnimation(walkAnimation)

for _, waypoint in ipairs(waypoints) do
            humanoid:MoveTo(waypoint.Position)
            walkAnimTrack:Play()
            humanoid.MoveToFinished:Wait()
        end
    end
    wait(1)
end

"it saves Rebirths but not Clicks and Rebirths fix it"

"make a script that loop teleports my character all around a close opposite team player when i press q and stops when i press q again"

-- local script, assuming you have a UserInputService 
local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character
local teleporting = false

local function getNearestEnemy()
    local closestPlayer
    local smallestMagnitude = math.huge

for _, otherPlayer in ipairs(Players:GetPlayers()) do
 if otherPlayer.TeamColor ~= player.TeamColor then
 local otherCharacter = otherPlayer.Character
 if otherCharacter then
 local otherHumanoidRootPart = otherCharacter:FindFirstChild("HumanoidRootPart")
 if otherHumanoidRootPart then
 local magnitude = (otherHumanoidRootPart.Position - character.HumanoidRootPart.Position).Magnitude
 if magnitude < smallestMagnitude then
 smallestMagnitude = magnitude
 closestPlayer = otherPlayer
 end
 end
 end
 end
 end

return closestPlayer
end

local function teleport()
    if teleporting then
        teleporting = false
    else
        teleporting = true
        while teleporting do
            local enemy = getNearestEnemy()
            if enemy and enemy.Character and enemy.Character.HumanoidRootPart then
                character.HumanoidRootPart.CFrame = enemy.Character.HumanoidRootPart.CFrame * CFrame.new(0, 0, -5)
            end
            wait(0.1)
        end
    end
end

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.Q then
        teleport()
    end
end)

"create a zombie spawner"

"make a script where when Harlandroblox says !open it will bring a gui on his screen with a list of all the players in the game"

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

Players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(message)
        if message == "!open" and player == Harlandroblox then
            local gui = Instance.new("ScreenGui")
            local frame = Instance.new("Frame")
            frame.Parent = gui
            frame.Name = "Players"
            frame.Size = UDim2.new(0, 300, 0, 400)
            frame.Position = UDim2.new(0.5, -150, 0.5, -200)
            frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
            frame.BorderSizePixel = 0
            for _, player in pairs(Players:GetPlayers()) do
                local label = Instance.new("TextLabel")
                label.Parent = frame
                label.Size = UDim2.new(1, 0, 0, 20)
                label.Position = UDim2.new(0, 0, 0, 20)
                label.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
                label.BorderSizePixel = 0
                label.Text = player.Name
            end
            gui.Parent = Harlandroblox.PlayerGui
        end
    end)
end)

"every time someone says in chat "i love you" or "i like you" or "kiss me" you get kicked and this audio plays 798363151"

"Make the player camera lock on a part with smooth rotation"

"create a punch script with hitboxes and explain where to put it, and make it so that I can replace the animations inside the script its not working"

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

local punchAnimation = Instance.new("Animation")
punchAnimation.AnimationId = "rbxassetid://PUNCH_ANIMATION_ID" -- Replace with your punch animation ID

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

local function onButton1Down()
    if not punching then
        punching = true
        local animationTrack = humanoid:LoadAnimation(punchAnimation)
        animationTrack:Play()
        hitbox.CFrame = character.RightHand.CFrame * CFrame.new(0, 0, -3)
        hitbox.Touched:Connect(function(hit)
            local hitCharacter = hit.Parent
            local hitHumanoid = hitCharacter:FindFirstChild("Humanoid")
            if hitHumanoid then
                hitHumanoid.Health = hitHumanoid.Health - 10
            end
        end)
        wait(1)
        punching = false
    end
end

mouse.Button1Down:Connect(onButton1Down)

-- To use this script, make sure to replace "PUNCH_ANIMATION_ID" with the actual Roblox asset ID of the punch animation you want to use. Place this local script inside a ScreenGui or StarterGui so it runs for each player. The hitbox is created and attached to the character's right hand, and when the player punches, it will detect hits and deal damage to other characters.

"create a vibrantly stunning admin menu that lists all player and has a kick ban and warn button for each player"

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

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

local titleLabel = Instance.new("TextLabel", adminMenu)
titleLabel.Text = "Admin Menu"
titleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
titleLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
titleLabel.Size = UDim2.new(1, 0, 0.1, 0)

local playerList = Instance.new("ScrollingFrame", adminMenu)
playerList.Size = UDim2.new(1, 0, 0.9, 0)
playerList.Position = UDim2.new(0, 0, 0.1, 0)
playerList.CanvasSize = UDim2.new(0, 0, 10, 0)

local function createPlayerEntry(playerName)
    local playerEntry = Instance.new("Frame")
    playerEntry.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    playerEntry.Size = UDim2.new(1, 0, 0.1, 0)

local nameLabel = Instance.new("TextLabel", playerEntry)
    nameLabel.Text = playerName
    nameLabel.TextColor3 = Color3.fromRGB(0, 0, 0)
    nameLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    nameLabel.Size = UDim2.new(0.5, 0, 1, 0)

local kickButton = Instance.new("TextButton", playerEntry)
    kickButton.Text = "Kick"
    kickButton.TextColor3 = Color3.fromRGB(255, 255, 255)
    kickButton.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
    kickButton.Position = UDim2.new(0.5, 0, 0, 0)
    kickButton.Size = UDim2.new(0.166, 0, 1, 0)

local banButton = Instance.new("TextButton", playerEntry)
    banButton.Text = "Ban"
    banButton.TextColor3 = Color3.fromRGB(255, 255, 255)
    banButton.BackgroundColor3 = Color3.fromRGB(255, 165, 0)
    banButton.Position = UDim2.new(0.666, 0, 0, 0)
    banButton.Size = UDim2.new(0.166, 0, 1, 0)

local warnButton = Instance.new("TextButton", playerEntry)
    warnButton.Text = "Warn"
    warnButton.TextColor3 = Color3.fromRGB(255, 255, 255)
    warnButton.BackgroundColor3 = Color3.fromRGB(255, 255, 0)
    warnButton.Position = UDim2.new(0.832, 0, 0, 0)
    warnButton.Size = UDim2.new(0.166, 0, 1, 0)

return playerEntry
end

local function updatePlayerList()
    for i, player in ipairs(game.Players:GetPlayers()) do
        local playerEntry = createPlayerEntry(player.Name)
        playerEntry.Parent = playerList
        playerEntry.Position = UDim2.new(0, 0, (i - 1) * 0.1, 0)
    end
end

game.Players.PlayerAdded:Connect(updatePlayerList)
game.Players.PlayerRemoving:Connect(updatePlayerList)

updatePlayerList()

"make me a leader stats system"

"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 chat messages in different colours when players reach certain stages and also when they acquire specific badges. add detailed comments, explanation and instructions"

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

-- function to handle player chat messages
local function onPlayerChatted(player, message)
    local playerStage = player.leaderstats.Stage.Value
    local playerBadges = player.leaderstats.Badges.Value

-- change chat color based on player stage
 if playerStage >= 5 and playerStage < 10 then
 message = "" .. message .. ""
 elseif playerStage >= 10 and playerStage < 15 then
 message = "" .. message .. ""
 elseif playerStage >= 15 then
 message = "" .. message .. ""
 end

-- change chat color based on player badges
 if playerBadges >= 3 and playerBadges < 6 then
 message = "" .. message .. ""
 elseif playerBadges >= 6 and playerBadges < 9 then
 message = "" .. message .. ""
 elseif playerBadges >= 9 then
 message = "" .. message .. ""
 end

-- send the message with modified color
    game:GetService("Chat"):Chat(player.Character, message)
end

-- connect the function to player chat events
local function onPlayerAdded(player)
    player.Chatted:Connect(function(message)
        onPlayerChatted(player, message)
    end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- This script will change the color of chat messages based on the player's stage and badges.
- If the player's stage is between 5 and 9, the chat message will be green.
- If the player's stage is between 10 and 14, the chat message will be blue.
- If the player's stage is 15 or higher, the chat message will be purple.

- If the player has between 3 and 5 badges, the chat message will be orange.
- If the player has between 6 and 8 badges, the chat message will be red.
- If the player has 9 or more badges, the chat message will be gold.

To use this script, make sure you have leaderstats set up for your players with 'Stage' and 'Badges' as IntValue objects. Then, place this script in ServerScriptService. The script will automatically handle chat messages and change their color based on the player's stage and badges.

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

"make me leaderstats with the name "Coins""

"make a sound play when the player joins the game"

"create a script inside a npc that plays a idle animation when the NPC doesnt move and it plays a sound when the idle animation is playing"

"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 script inside a text label located inside a screen gui that will become visible and make a sound when players Lvl up"

"Write me a script that simulates the player limping when their health reaches a certain amount"

"create a spawner that spawns in a part every 3 minutes"

"Create a script that destroys a part when a player kills a certain amount of NPCs"

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

"Create a 3d image of the players tools in the players backpack"

"make a script when you say taco and 100 taco falls from the sky"

"Make me a running system for when the player presses ctrl it toggles running and makes them faster with instructions on where to put it"

"make a script to where it is a red vs blue 1v1 and people can't hurt their teammates. Also make a leaderboard that shows kills and what team you're on"

-- team setup 
local Teams = game:GetService("Teams")
local redTeam = Teams:FindFirstChild("Red") or Instance.new("Team", Teams)
redTeam.Name = "Red"
redTeam.TeamColor = BrickColor.new("Bright red")
local blueTeam = Teams:FindFirstChild("Blue") or Instance.new("Team", Teams)
blueTeam.Name = "Blue"
blueTeam.TeamColor = BrickColor.new("Bright blue")

-- player added setup 
game.Players.PlayerAdded:Connect(function(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    player.Parent = player

local kills = Instance.new("IntValue")
    kills.Name = "Kills"
    kills.Value = 0
    kills.Parent = leaderstats

local teamValue = Instance.new("StringValue")
    teamValue.Name = "Team"
    teamValue.Value = "" -- Will be set when they join a team
    teamValue.Parent = leaderstats

leaderstats.Parent = player

-- Assign teams here or through a GUI
end)

-- friendly fire prevention 
game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.Died:Connect(function()
            local tag = humanoid:FindFirstChild("creator")
            if tag then
                local killer = game.Players:GetPlayerByUserId(tag.Value)
                if killer and killer.TeamColor == player.TeamColor then
                    -- Do nothing, friendly fire
                else
                    -- Increase killer's kill count
                    killer.leaderstats.Kills.Value = killer.leaderstats.Kills.Value + 1
                end
            end
        end)
    end)
end)

-- projectile or weapon damage script 
local function onProjectileHit(projectile, hit)
    local player = game.Players:GetPlayerFromCharacter(projectile.Parent)
    if player and hit.Parent:FindFirstChildWhichIsA('Humanoid') then
        local hitPlayer = game.Players:GetPlayerFromCharacter(hit.Parent)
        if hitPlayer and hitPlayer.TeamColor ~= player.TeamColor then
            hit.Parent:FindFirstChildWhichIsA('Humanoid'):TakeDamage(projectile.Damage)
            -- Add a 'creator' tag to the humanoid to track who hit them
            local tag = Instance.new("IntValue")
            tag.Name = "creator"
            tag.Value = player.UserId
            tag.Parent = hit.Parent:FindFirstChildWhichIsA('Humanoid')
        end
    end
end

-- assigning teams 
local function assignTeam(player, teamName)
    if teamName == "Red" then
        player.TeamColor = redTeam.TeamColor
        player.leaderstats.Team.Value = "Red"
    elseif teamName == "Blue" then
        player.TeamColor = blueTeam.TeamColor
        player.leaderstats.Team.Value = "Blue"
    end
end

-- You would call assignTeam somewhere in your code, such as when a player selects a team on a GUI.
-- For example: assignTeam(game.Players.Player1, "Red")