Haddock - Roblox Library

"When this script runs, if the player moves their footsteps can still be heard. How can this be fixed?"

"make a script that makes a localscript in replicated storage clone into the local players playerGui make it only work when the remote event "FP1" is fired. and separately make the code that fires the remote event, the scripts name is "FP"."

"make a script to make chat messages saying "Player has been awarded the _ badge" in different colours when players acquire specific badges."

"script that opens and and closes a frame when a ui button is clicked"

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

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

local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")

local ClickButton = Instance.new("ScreenGui")
ClickButton.Name = "ClickButton"
ClickButton.Parent = Players.LocalPlayer:WaitForChild("PlayerGui")

local Button = Instance.new("TextButton")
Button.Name = "Button"
Button.Parent = ClickButton
Button.BackgroundColor3 = Color3.fromRGB(255, 255, 0)
Button.BorderColor3 = Color3.fromRGB(0, 0, 0)
Button.Position = UDim2.new(0.5, 0, 0.5, 0)
Button.Size = UDim2.new(0, 100, 0, 50)
Button.Font = Enum.Font.SourceSans
Button.Text = "Click Me!"
Button.TextColor3 = Color3.fromRGB(0, 0, 0)
Button.TextSize = 20.000

local Leaderboard = Instance.new("Frame")
Leaderboard.Name = "Leaderboard"
Leaderboard.Parent = ClickButton
Leaderboard.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Leaderboard.BorderColor3 = Color3.fromRGB(0, 0, 0)
Leaderboard.Position = UDim2.new(0, 0, 0, 0)
Leaderboard.Size = UDim2.new(0, 200, 0, 200)

local Points = 0

Button.MouseButton1Click:Connect(function()
	Points = Points + 1
	
	local LeaderboardText = ""
	for _, Player in pairs(Players:GetPlayers()) do
		local PlayerPoints = ReplicatedStorage:WaitForChild(Player.Name).Points.Value
		LeaderboardText = LeaderboardText..Player.Name..": "..PlayerPoints.."\n"
	end
	
	Leaderboard.TextLabel.Text = LeaderboardText
end)

"make a chat command that changes all parts named: oil cleanoil sparkleoil shinyoil and ultraoil by changing the part color to what the player chats every 0.01 seconds and make the chat command like this: /color 255 255 255"

"make a free camera floating above the humanoid at cameraPart.Orientation = Vector3.new(-60, 0, 0) then make it so when y is pressed it enables free camera that has edge scrolling. Make sure edge scrolling is only for free camera"

-- local script 
local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local camera = workspace.CurrentCamera
local cameraPart = Instance.new("Part")
cameraPart.Anchored = true
cameraPart.Size = Vector3.new(1, 1, 1)
cameraPart.Transparency = 1
cameraPart.CanCollide = false
cameraPart.Parent = workspace

local function updateCamera()
    cameraPart.CFrame = humanoid.RootPart.CFrame * CFrame.new(0, 10, 0)
    cameraPart.Orientation = Vector3.new(-60, 0, 0)
end

local function enableFreeCamera()
    camera.CameraType = Enum.CameraType.Scriptable
    camera.CFrame = cameraPart.CFrame
end

local function disableFreeCamera()
    camera.CameraType = Enum.CameraType.Custom
end

local function onKeyPress(actionName, inputState, inputObject)
    if actionName == "ToggleFreeCamera" and inputState == Enum.UserInputState.Begin then
        if camera.CameraType == Enum.CameraType.Custom then
            enableFreeCamera()
        else
            disableFreeCamera()
        end
    end
end

UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.Y and not gameProcessed then
        onKeyPress("ToggleFreeCamera", Enum.UserInputState.Begin, input)
    end
end)

local function edgeScroll()
    local mouse = player:GetMouse()
    local screenSize = workspace.CurrentCamera.ViewportSize
    local scrollSpeed = 1

if camera.CameraType == Enum.CameraType.Scriptable then
        if mouse.X <= 0 then
            camera.CFrame = camera.CFrame * CFrame.new(scrollSpeed, 0, 0)
        elseif mouse.X >= screenSize.X - 1 then
            camera.CFrame = camera.CFrame * CFrame.new(-scrollSpeed, 0, 0)
        end

if mouse.Y <= 0 then
            camera.CFrame = camera.CFrame * CFrame.new(0, 0, scrollSpeed)
        elseif mouse.Y >= screenSize.Y - 1 then
            camera.CFrame = camera.CFrame * CFrame.new(0, 0, -scrollSpeed)
        end
    end
end

while true do
    updateCamera()
    edgeScroll()
    wait()
end

"make a rpg using leaderstats with a leveling and gold system that show how much you have of each and make every npc you kill give you exp depending on the value of the value object also use no other scripts and put all of the code needed to make the script fully work add the stats when npc respawns"

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

local function onCharacterAdded(character)
    local humanoid = character:WaitForChild("Humanoid")
    humanoid.Died:Connect(function()
        local stats = Players:GetPlayerFromCharacter(character).leaderstats
        stats.Gold.Value = stats.Gold.Value + 10
        stats.Exp.Value = stats.Exp.Value + humanoid.MaxHealth
        if stats.Exp.Value >= stats.Level.Value * 100 then
            stats.Exp.Value = stats.Exp.Value - stats.Level.Value * 100
            stats.Level.Value = stats.Level.Value + 1
        end
    end)
end

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

local gold = Instance.new("IntValue")
    gold.Name = "Gold"
    gold.Value = 0
    gold.Parent = leaderstats

local exp = Instance.new("IntValue")
    exp.Name = "Exp"
    exp.Value = 0
    exp.Parent = leaderstats

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

player.CharacterAdded:Connect(onCharacterAdded)
end

Players.PlayerAdded:Connect(onPlayerAdded)

for _, player in ipairs(Players:GetPlayers()) do
    if not player:FindFirstChild("leaderstats") then
        onPlayerAdded(player)
    end
end

-- NPC respawn script 
local function respawnNPC()
    local NPC = game.Workspace.NPC
    NPC:Destroy()
    wait(5)
    local newNPC = NPC:Clone()
    newNPC.Parent = game.Workspace
end
game.Workspace.NPC.Humanoid.Died:Connect(respawnNPC)

"npc not moving to waypoint pls fix"

It seems like the NPC is not moving because the `walkTo()` function is not being called correctly in the `patrol()` function. Here's how you can fix it:

```lua
local function patrol()
    local waypoints = workspace.Zombie.Waypoints:GetChildren()
    local randomNum = math.random(1, #waypoints)
    local destination = waypoints[randomNum]
    walkTo(destination)
end
```

In the above script, we are passing the destination waypoint to the `walkTo()` function. Make sure that the `workspace.Zombie.Waypoints` path correctly leads to the waypoints in your game workspace.

Also, ensure that your waypoints are `BasePart` instances (like a Part or a Model's PrimaryPart), as the `walkTo()` function is expecting a `BasePart` as the destination. If your waypoints are not `BasePart` instances, you will need to adjust your script to get the `BasePart` from each waypoint.

If the NPC is still not moving, try debugging by adding print statements in your script to check if the waypoints are being correctly accessed and the `walkTo()` function is being called.

"make a script that orbits a close opposite team player"

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character
local humanoid = character:FindFirstChild("Humanoid")
local rootPart = character:FindFirstChild("HumanoidRootPart")
local radius = 10

while wait() do
    local closestDistance = math.huge
    local closestPlayer

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

if closestPlayer then
        local closestRootPart = closestPlayer.Character.HumanoidRootPart
        local angle = math.random() * math.pi * 2
        local newPosition = closestRootPart.Position + Vector3.new(radius * math.cos(angle), 0, radius * math.sin(angle))
        humanoid:MoveTo(newPosition)
    end
end

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

"Crie um sistema avançado de geração de moeda. As moedas não spawnaram muito perto uma das outras. Ela serão coletáveis. Aplique um leaderboards que atualiza a cada vez que o jogador coleta uma moeda. Crie a moeda através do script, algo se qualidade."

-- Server script para criar moedas e gerenciar a coleta e leaderboard

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

local coinFolder = Instance.new("Folder")
coinFolder.Name = "Coins"
coinFolder.Parent = Workspace

local function createCoin()
    local coin = Instance.new("Part")
    coin.Name = "Coin"
    coin.Shape = "Cylinder"
    coin.Size = Vector3.new(1, 0.2, 1)
    coin.BrickColor = BrickColor.new("New Yeller")
    coin.Material = "Neon"
    coin.Reflectance = 0.25
    coin.Anchored = true
    coin.CanCollide = false
    coin.Parent = coinFolder

local randomX = math.random(-100, 100)
    local randomZ = math.random(-100, 100)
    coin.Position = Vector3.new(randomX, 5, randomZ)

local tweenInfo = TweenInfo.new(1, Enum.EasingStyle.Linear, Enum.EasingDirection.InOut, -1, true, 0)
    local tween = game:GetService("TweenService"):Create(coin, tweenInfo, {Position = coin.Position + Vector3.new(0, 2, 0)})
    tween:Play()
end

local function spawnCoins()
    while true do
        if #coinFolder:GetChildren() < 5 then
            local tooClose = false
            local newPos = Vector3.new(math.random(-100, 100), 5, math.random(-100, 100))
            for _, coin in ipairs(coinFolder:GetChildren()) do
                if (coin.Position - newPos).Magnitude < 20 then
                    tooClose = true
                    break
                end
            end
            if not tooClose then
                createCoin()
            end
        end
        wait(1)
    end
end

local function onTouched(hit)
    local character = hit.Parent
    local player = Players:GetPlayerFromCharacter(character)
    if player then
        player.leaderstats.Coins.Value = player.leaderstats.Coins.Value + 1
        script.Parent:Destroy()
    end
end

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

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

Players.PlayerAdded:Connect(setupLeaderboard)

for _, coin in ipairs(coinFolder:GetChildren()) do
    coin.Touched:Connect(onTouched)
end

spawnCoins()

"e key for shooting the ball Starter Gui"

"make me a script tha tmakes that when a player is nearby this npc the npc gets closer to him and when the npc touches th eplayer the player g ets damaged and the npc plays an animation when damaging the player"

Sure, here's a script that does that. You'll need to insert this script into the NPC's humanoid:

```lua
local humanoid = script.Parent
local root = humanoid.Parent.PrimaryPart
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local damageAmount = 10
local attackAnimationId = "rbxassetid://1234567890" -- replace with your animation ID

-- Create the attack animation
local attackAnimation = Instance.new("Animation")
attackAnimation.AnimationId = attackAnimationId
local attackTrack = humanoid:LoadAnimation(attackAnimation)

-- Function to find the nearest player
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

-- Function to damage a player
function damagePlayer(player)
	local character = player.Character
	if character and character:FindFirstChild("Humanoid") then
		character.Humanoid.Health = character.Humanoid.Health - damageAmount
	end
end

-- Connect to the RunService heartbeat event
RunService.Heartbeat:Connect(function()
	local nearestPlayer, distance, direction = findNearestPlayer()
	if nearestPlayer and distance < 10 then -- replace with your desired distance
		humanoid:Move(direction)
		if distance < 2 then -- replace with your desired touch distance
			damagePlayer(nearestPlayer)
			attackTrack:Play()
		end
	end
end)
```

This script will make the NPC move towards the nearest player if they are within a certain distance. When the NPC touches the player, it will damage the player and play an attack animation. You'll need to replace the `attackAnimationId` with the asset ID of your attack animation. You can also adjust the `damageAmount`, `distance`, and `touch distance` to fit your needs.

"if a player interacts with a proximity prompt they explode"

"there is a little icon with a ? at the middle top of the screen when you click it it says Hello Thanks For Playing then a new line and it says You Can Find Lucky Blocks Threw Out The Obby They All Do Different Things but there are also optional this is the asset id 13263013887"

"make me backup dancers npc for my game"

-- server script

local pfs = game:GetService("PathfindingService")

game.Players.PlayerAdded:Connect(function(Player)
	Player.CharacterAdded:Connect(function(Character)
		local backupDancer1 = game.Workspace.BackupDancer1
		local backupDancer2 = game.Workspace.BackupDancer2

local path1 = pfs:CreatePath()
		path1:ComputeAsync(backupDancer1.HumanoidRootPart.Position, Character.HumanoidRootPart.Position)

for _, waypoint in pairs(path1:GetWaypoints()) do
			backupDancer1.Humanoid:MoveTo(waypoint.Position)
			backupDancer1.Humanoid.MoveToFinished:Wait()
		end

local path2 = pfs:CreatePath()
		path2:ComputeAsync(backupDancer2.HumanoidRootPart.Position, Character.HumanoidRootPart.Position)

for _, waypoint in pairs(path2:GetWaypoints()) do
			backupDancer2.Humanoid:MoveTo(waypoint.Position)
			backupDancer2.Humanoid.MoveToFinished:Wait()
		end

-- play dance animation
		local danceAnimation = Instance.new("Animation")
		danceAnimation.AnimationId = "rbxassetid://YourDanceAnimationIDHere" -- replace with your dance animation ID
		local animationTrack1 = backupDancer1.Humanoid:LoadAnimation(danceAnimation)
		local animationTrack2 = backupDancer2.Humanoid:LoadAnimation(danceAnimation)
		animationTrack1:Play()
		animationTrack2:Play()
	end)
end)

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

"create a datastore that saves a Bool value called Knight inside the player"

-- server script 
local DataStoreService = game:GetService("DataStoreService")
local KnightDataStore = DataStoreService:GetDataStore("KnightData")

local function onSave(player)
    local success, err = pcall(function()
        local knightValue = player:FindFirstChild("Knight")
        if knightValue then
            KnightDataStore:SetAsync(player.UserId, knightValue.Value)
        end
    end)
    if not success then
        warn("Failed to save data for " .. player.Name .. ": " .. tostring(err))
    end
end

local function onLoad(player)
    local success, err = pcall(function()
        local data = KnightDataStore:GetAsync(player.UserId)
        if data then
            local knightValue = Instance.new("BoolValue")
            knightValue.Name = "Knight"
            knightValue.Value = data
            knightValue.Parent = player
        end
    end)
    if not success then
        warn("Failed to load data for " .. player.Name .. ": " .. tostring(err))
    end
end

game.Players.PlayerAdded:Connect(onLoad)
game.Players.PlayerRemoving:Connect(onSave)

"make me a script that scripts a working airplane WITH instructions on how to set it up in the script"

-- server script

-- Create the parts
local body = Instance.new("Part")
body.Name = "Body"
body.Parent = workspace
body.Size = Vector3.new(10,2,5)
body.Position = Vector3.new(0,20,0)

local leftWing = Instance.new("Part")
leftWing.Name = "LeftWing"
leftWing.Parent = workspace
leftWing.Size = Vector3.new(2,2,5)
leftWing.Position = Vector3.new(-4,20,0)

local rightWing = Instance.new("Part")
rightWing.Name = "RightWing"
rightWing.Parent = workspace
rightWing.Size = Vector3.new(2,2,5)
rightWing.Position = Vector3.new(4,20,0)

local leftEngine = Instance.new("Part")
leftEngine.Name = "LeftEngine"
leftEngine.Parent = workspace
leftEngine.Size = Vector3.new(1,1,1)
leftEngine.Position = Vector3.new(-4,20,-3)

local rightEngine = Instance.new("Part")
rightEngine.Name = "RightEngine"
rightEngine.Parent = workspace
rightEngine.Size = Vector3.new(1,1,1)
rightEngine.Position = Vector3.new(4,20,-3)

-- Create the joints
local leftWingJoint = Instance.new("Motor6D")
leftWingJoint.Name = "LeftWingJoint"
leftWingJoint.Parent = leftWing
leftWingJoint.Part0 = leftWing
leftWingJoint.Part1 = body

local rightWingJoint = Instance.new("Motor6D")
rightWingJoint.Name = "RightWingJoint"
rightWingJoint.Parent = rightWing
rightWingJoint.Part0 = rightWing
rightWingJoint.Part1 = body

local leftEngineJoint = Instance.new("Motor6D")
leftEngineJoint.Name = "LeftEngineJoint"
leftEngineJoint.Parent = leftEngine
leftEngineJoint.Part0 = leftEngine
leftEngineJoint.Part1 = leftWing

local rightEngineJoint = Instance.new("Motor6D")
rightEngineJoint.Name = "RightEngineJoint"
rightEngineJoint.Parent = rightEngine
rightEngineJoint.Part0 = rightEngine
rightEngineJoint.Part1 = rightWing

-- Create the script
local script = Instance.new("Script")
script.Name = "FlyPlane"
script.Parent = body

script.Source = [[
	local leftWingJoint = script.Parent:FindFirstChild("LeftWingJoint")
	local rightWingJoint = script.Parent:FindFirstChild("RightWingJoint")
	local leftEngineJoint = script.Parent:FindFirstChild("LeftEngineJoint")
	local rightEngineJoint = script.Parent:FindFirstChild("RightEngineJoint")
	
	while true do
		wait()
		
		-- Control the wings
		leftWingJoint.C1 = CFrame.Angles(math.rad(45), 0, 0)
		rightWingJoint.C1 = CFrame.Angles(math.rad(45), 0, 0)
		
		-- Control the engines
		leftEngineJoint.C1 = CFrame.Angles(0, 0, math.rad(-45))
		rightEngineJoint.C1 = CFrame.Angles(0, 0, math.rad(-45))
	end
]]

-- Create the force
local force = Instance.new("BodyForce")
force.Name = "Force"
force.Parent = body
force.force = Vector3.new(0,100,0)

"for some reason the AI doesnt walk or anything at all please fix"

The AI might not be walking due to several reasons. Here are some potential issues and fixes:

1. Check if the humanoid is properly referenced. Make sure the Zombie character has a humanoid and it's properly referenced in the script.

2. The waypoints might not be properly set. Make sure the waypoints are in the correct position and they are accessible by the AI.

3. The path might not be successfully computed. Add a check to see if the path is successfully computed. If it's not, you might need to adjust the path parameters or the position of the waypoints.

4. The AI might be stuck in the attack state. If the target is always within the attack range, the AI might be stuck in the attack state and not move. You can add a check to see if the AI is in the attack state and if it is, stop the attack and move to the next waypoint.

Here's a modified version of your script with added checks:

```lua
while wait(0.25) do
    local target = findTarget()
    if target and target.Humanoid.Health > 0 then
        print("PLAYER FOUND", target.Name)
        humanoid.WalkSpeed = 15
        attack(target)
    else
        patrol()
    end
end

function patrol()
    local waypoints = game.Workspace.Zombie.WP:GetChildren()
    local randomNum = math.random(1, #waypoints)
    local path = getPath(waypoints[randomNum])
    if path.Status == Enum.PathStatus.Success then
        walkTo(waypoints[randomNum])
    else
        print("Failed to compute path")
    end
end
```
In this version, the script will first check if there's a target. If there is, it will attack the target. If not, it will patrol. The patrol function will also check if the path is successfully computed before moving to the waypoint. If the path is not successfully computed, it will print a message to the output.

"make a script after 120 seconds in the game, the npc Zombie 3 will start being cloned and the clones will appear on the "Zombie spawner 3" each 2 seconds."

"if you try to walk it will not let you and it will promp you to buy this developer id if you do then you can walk 1537537917 but each time you try to walk it will promp you"

"make a lua script executor that runs lua Also create the gui for it Make the gui look good."

-- local script 
local player = game.Players.LocalPlayer
local gui = Instance.new("ScreenGui")
local frame = Instance.new("Frame")
local textbox = Instance.new("TextBox")
local execute = Instance.new("TextButton")

gui.Name = "LuaExecutor"
gui.Parent = player.PlayerGui

frame.Name = "ExecutorFrame"
frame.Parent = gui
frame.Size = UDim2.new(0.8, 0, 0.5, 0)
frame.Position = UDim2.new(0.1, 0, 0.2, 0)
frame.BackgroundColor3 = Color3.fromRGB(255,255,255)
frame.BorderSizePixel = 0

textbox.Name = "LuaCode"
textbox.Parent = frame
textbox.Size = UDim2.new(0.9, 0, 0.8, 0)
textbox.Position = UDim2.new(0.05, 0, 0.1, 0)
textbox.BackgroundColor3 = Color3.fromRGB(255,255,255)
textbox.BorderSizePixel = 0
textbox.Text = ""

execute.Name = "ExecuteButton"
execute.Parent = frame
execute.Size = UDim2.new(0.2, 0, 0.2, 0)
execute.Position = UDim2.new(0.75, 0, 0.7, 0)
execute.BackgroundColor3 = Color3.fromRGB(255,255,255)
execute.BorderSizePixel = 0
execute.Text = "Execute"

execute.MouseButton1Click:Connect(function()
	local code = textbox.Text
	local success, err = pcall(function()
		loadstring(code)()
	end)
	if not success then
		warn(err)
	end
end)

"Create a The Vampire Diaries Themed Loading Screen with play button"

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

local background = Instance.new("ImageLabel", screenGui)
background.Image = "rbxassetid://your_image_asset_id_here" -- Replace with The Vampire Diaries themed image asset id
background.Size = UDim2.new(1, 0, 1, 0)
background.BackgroundTransparency = 1

local titleLabel = Instance.new("TextLabel", background)
titleLabel.Text = "The Vampire Diaries"
titleLabel.Font = Enum.Font.Fantasy
titleLabel.TextSize = 48
titleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
titleLabel.BackgroundTransparency = 1
titleLabel.Position = UDim2.new(0.5, 0, 0.25, 0)
titleLabel.AnchorPoint = Vector2.new(0.5, 0.5)

local playButton = Instance.new("TextButton", background)
playButton.Text = "Play"
playButton.Font = Enum.Font.Fantasy
playButton.TextSize = 36
playButton.TextColor3 = Color3.fromRGB(255, 255, 255)
playButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
playButton.BackgroundTransparency = 0.5
playButton.Position = UDim2.new(0.5, 0, 0.5, 0)
playButton.AnchorPoint = Vector2.new(0.5, 0.5)
playButton.Size = UDim2.new(0.2, 0, 0.1, 0)

local playButtonUICorner = Instance.new("UICorner", playButton)
playButtonUICorner.CornerRadius = UDim.new(0, 5)

playButton.MouseButton1Click:Connect(function()
    -- Add your game logic here to start the game
end)

"create me a moving and jumping NPC script"

"create a battle system so when i walk up to a npc it starts a battle"

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

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

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

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

UserInputService.InputBegan:Connect(onInput)

"I'm modifying Adonis Admin and making it my own admin with custom commands, make a module script for the admin and give me the Big T rank whenever i load it in the game and turn into a require script it can be in any game, the custom commands are already made i just need the module"

-- module script for custom admin system with Big T rank 
local AdminModule = {}

-- Table to hold all the ranks and their associated players
AdminModule.Ranks = {
    ["Big T"] = {"YourRobloxUsername"} -- Replace 'YourRobloxUsername' with your actual Roblox username
}

-- Function to check if a player is in a specific rank
function AdminModule:IsPlayerInRank(player, rank)
    for _, playerName in ipairs(self.Ranks[rank] or {}) do
        if player.Name == playerName then
            return true
        end
    end
    return false
end

-- Function to get the rank of a player
function AdminModule:GetPlayerRank(player)
    for rank, players in pairs(self.Ranks) do
        for _, playerName in ipairs(players) do
            if player.Name == playerName then
                return rank
            end
        end
    end
    return nil
end

-- Function to initialize the admin system
function AdminModule:Init()
    local Players = game:GetService("Players")
    
    -- Listen for new players joining the game
    Players.PlayerAdded:Connect(function(player)
        if self:IsPlayerInRank(player, "Big T") then
            print(player.Name .. " has been given Big T rank.")
            -- Here you can add additional code to give the player special permissions or tools
        end
    end)
end

-- Call the Init function to set up the admin system
AdminModule:Init()

return AdminModule

-- To use this module in a script, you would use the require function with the asset ID of the module script. 
For example, if the ModuleScript's asset ID is 12345678, you would do the following in a Script or LocalScript:

-- local AdminModule = require(12345678)

-- You can now use AdminModule to check ranks and perform admin actions based on those ranks.

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

"make the part the script is inside of make a light flicker randomly and make the light sync with the part also make the light be on more often"

"can you instruct me on how to share a function from a other script?"

"make a shop gui where i can add gamepasses and the colour theme should be blue"

"make a roblox script that makes you loop walk follow the most close player and only stop if someone is more close near you"

local player = game.Players.LocalPlayer
local closestPlayer = nil
local closestDistance = math.huge

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:FindFirstChild("Humanoid")
        if humanoid then
            humanoid.WalkSpeed = 16
            humanoid.AutoRotate = true
        end
    end)
end)

while true do
    closestPlayer = nil
    closestDistance = math.huge
    for _, player in pairs(game.Players:GetPlayers()) do
        if player ~= game.Players.LocalPlayer then
            local distance = (player.Character.HumanoidRootPart.Position - game.Players.LocalPlayer.Character.HumanoidRootPart.Position).magnitude
            if distance < closestDistance then
                closestPlayer = player
                closestDistance = distance
            end
        end
    end
    if closestPlayer then
        game.Players.LocalPlayer.Character.Humanoid:MoveTo(closestPlayer.Character.HumanoidRootPart.Position)
    end
    wait(1)
end

"Create a camera system where the player can move the camera around by just moving their mouse."

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

"script that gives the player a random piece of gear from the Gear folder in serverstorage every 5 minutes if they are stage 210."

"npc that follows the player"

"script for 4 sets of teleporters with the option to make them one-way. add detailed comments, explanation and instructions."

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

local teleporterData = {
    {
        id = 1,
        oneWay = false,
        destination = 2
    },
    {
        id = 2,
        oneWay = false,
        destination = 1
    },
    {
        id = 3,
        oneWay = false,
        destination = 4
    },
    {
        id = 4,
        oneWay = false,
        destination = 3
    }
}

local function teleportPlayer(player, teleporterId)
    local destinationId = teleporterData[teleporterId].destination
    local destinationPart = game.Workspace["Teleporter" .. destinationId]
    player.Character.HumanoidRootPart.CFrame = destinationPart.CFrame + Vector3.new(0, 3, 0)
end

local function onTouched(teleporterId, otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        teleportPlayer(player, teleporterId)
        if not teleporterData[teleporterId].oneWay then
            wait(1)
            teleportPlayer(player, teleporterData[teleporterId].destination)
        end
    end
end

for i, teleporter in ipairs(teleporterData) do
    local teleporterPart = game.Workspace["Teleporter" .. teleporter.id]
    teleporterPart.Touched:Connect(function(otherPart)
        onTouched(teleporter.id, otherPart)
    end)
end

-- 
Instructions:
1. Create 4 parts in the Workspace and name them "Teleporter1", "Teleporter2", "Teleporter3", and "Teleporter4".
2. Adjust the `teleporterData` table to set the desired destination and one-way settings for each teleporter.
   - `id`: The teleporter's ID (1, 2, 3, or 4).
   - `oneWay`: Set to true if the teleporter should be one-way, false if it should be two-way.
   - `destination`: The ID of the destination teleporter.
3. Place this script in ServerScriptService and run the game.

Explanation:
This script creates a teleporter system with 4 sets of teleporters. Each teleporter has an ID (1, 2, 3, or 4) and can be configured to be one-way or two-way.
The `teleporterData` table contains the configuration for each teleporter, including its destination.
When a player touches a teleporter, the `onTouched` function is called, which teleports the player to the destination teleporter.
If the teleporter is not one-way, the player will be teleported back after 1 second.

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

"the humanoid rootpart isnt getting anchored,"

-- That's correct. The rootPart is not getting anchored because the PlayerAdded event is fired before the player's character is loaded in the game. Therefore, the humanoid and rootPart do not exist yet when the script tries to access them. Here's a corrected version of the script.

local tweenService = game:GetService('TweenService')
local gui1 = script.Parent.Menu.GameName
local tweenInfo1 = TweenInfo.new(1, Enum.EasingStyle.Linear, Enum.EasingDirection.Out)
local goal1 = {Position = UDim2.new(1, 0, 1, 0)}
local tween1 = tweenService:Create(gui1, tweenInfo1, goal1)
local gui = script.Parent.Menu.Play
local tweenInfo = TweenInfo.new(1, Enum.EasingStyle.Linear, Enum.EasingDirection.Out)
local goal = {Position = UDim2.new(1, 0, 1, 0)}
local tween = tweenService:Create(gui, tweenInfo, goal)

local blur = Instance.new("BlurEffect", game.Lighting)
blur.Size = 15

local function start()
	tween:Play()
	tween1:Play()
	blur:Destroy()
end

gui.MouseButton1Click:Connect(start)

game.Players.PlayerAdded:Connect(function(player)
	player.CharacterAdded:Connect(function(character)
		local humanoid = character:WaitForChild('Humanoid')
		local rootPart = humanoid.RootPart
		rootPart.Anchored = true
	end)
end)

"make a script where there is a timer at the top of the screen and it starts at 30 seconds and then when it gets to 0 seconds you will be tped to one of my Parts Part1 Part2 Part3 Part4 Part5 Part6 Part8 Part9 but only one player can be tped to each one of my Parts and then there will be a question at the top of your screen the first one will ask how much does korblox and at the bottom of the screen you can answer if you say 17k or 17000 or 17,000 then it will add 3 of my Part called bbl ontop of whatever Part the player got tped to"

-- local script 
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local ScreenGui = Instance.new("ScreenGui")
local TextLabel = Instance.new("TextLabel")
local TextBox = Instance.new("TextBox")
local Timer = 30
local Parts = {"Part1", "Part2", "Part3", "Part4", "Part5", "Part6", "Part8", "Part9"}
local UsedParts = {}
local bbl = "bbl"
local question = "How much does korblox cost?"

ScreenGui.Parent = LocalPlayer.PlayerGui
TextLabel.Parent = ScreenGui
TextBox.Parent = ScreenGui

TextLabel.Size = UDim2.new(1, 0, 0.1, 0)
TextLabel.Position = UDim2.new(0, 0, 0, 0)
TextLabel.Text = question
TextLabel.TextColor3 = Color3.new(1, 1, 1)
TextLabel.BackgroundTransparency = 1

TextBox.Size = UDim2.new(0.3, 0, 0.1, 0)
TextBox.Position = UDim2.new(0.35, 0, 0.9, 0)

local function teleport()
    local randomPart = Parts[math.random(1, #Parts)]
    while UsedParts[randomPart] do
        randomPart = Parts[math.random(1, #Parts)]
    end
    UsedParts[randomPart] = true
    local destination = game.Workspace[randomPart]
    LocalPlayer.Character.HumanoidRootPart.CFrame = destination.CFrame
end

local function checkAnswer()
    local answer = TextBox.Text
    if answer == "17k" or answer == "17000" or answer == "17,000" then
        local currentPart = UsedParts[LocalPlayer.Name]
        for i = 1, 3 do
            local newPart = Instance.new("Part")
            newPart.Name = bbl
            newPart.Parent = game.Workspace
            newPart.Position = currentPart.Position + Vector3.new(0, i * newPart.Size.Y, 0)
        end
    end
end

TextBox.FocusLost:Connect(checkAnswer)

while Timer > 0 do
    TextLabel.Text = "Time left: " .. Timer
    wait(1)
    Timer = Timer - 1
end

teleport()
TextLabel.Text = question

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

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

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

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

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

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

"Create a script that when I put it into workspace makes it rain blocks."

"when the onwer join the game you will get a badge"

"I am creation a roblox moba game like league of legends, please create a camera that has edge scrolling just like league of legends. Make the lock camera togglable and untogglable with the y button"

-- Local script for camera control 
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character
local camera = workspace.CurrentCamera
local lockedCamera = false

local edgeScrollingThreshold = 0.05
local cameraSpeed = 1

local function lockToggle(input, gameProcessedEvent)
    if input.KeyCode == Enum.KeyCode.Y and not gameProcessedEvent then
        lockedCamera = not lockedCamera
    end
end

local function edgeScrolling()
    local mousePos = UserInputService:GetMouseLocation()
    local screenSize = UserInputService:GetScreenSize()
    
    if not lockedCamera then
        if mousePos.X <= screenSize.X * edgeScrollingThreshold then
            camera.CFrame = camera.CFrame * CFrame.new(-cameraSpeed, 0, 0)
        elseif mousePos.X >= screenSize.X * (1 - edgeScrollingThreshold) then
            camera.CFrame = camera.CFrame * CFrame.new(cameraSpeed, 0, 0)
        end
        
        if mousePos.Y <= screenSize.Y * edgeScrollingThreshold then
            camera.CFrame = camera.CFrame * CFrame.new(0, 0, cameraSpeed)
        elseif mousePos.Y >= screenSize.Y * (1 - edgeScrollingThreshold) then
            camera.CFrame = camera.CFrame * CFrame.new(0, 0, -cameraSpeed)
        end
    else
        camera.CameraSubject = character.Humanoid
        camera.CameraType = Enum.CameraType.Custom
    end
end

UserInputService.InputBegan:Connect(lockToggle)
RunService.RenderStepped:Connect(edgeScrolling)

"a roblox script that once you step on a part named "PartFreeze" it freezes your client for 3 seconds and the unfreezes it. also tell where to put the script at"

"when a player type in chat "free headless", "free Korblox", "free valkyrie" this nerd face "9468417713" will appear on their head"

"theres five parts, Gunshots, Gunshots1, Gunshots2, Gunshots3, Gunshots4. they all have 2 children, one being FX, and the other light source, in the function make sure all of the FX and light from all 5 parts, light enabled = true, and FX tranparency = 0 else return normal values"

-- server script 
local part = script.Parent
local s = script.Parent.Sound
local parts = {"Gunshots", "Gunshots1", "Gunshots2", "Gunshots3", "Gunshots4"}

local function onPartTouched(otherPart)
	local model = otherPart.Parent
	if model.Name == "Furry" or "Neko" then
		local humanoid = model:FindFirstChild("Zombie")
		if humanoid then
			s:Play()
			humanoid.Health = 0
			for _, partName in ipairs(parts) do
				local part = workspace:FindFirstChild(partName)
				if part then
					local fx = part:FindFirstChild("FX")
					local light = part:FindFirstChild("Light")
					if fx then
						fx.Transparency = 0
					end
					if light then
						light.Enabled = true
					end
				end
			end
		else
			s:Stop()
			for _, partName in ipairs(parts) do
				local part = workspace:FindFirstChild(partName)
				if part then
					local fx = part:FindFirstChild("FX")
					local light = part:FindFirstChild("Light")
					if fx then
						fx.Transparency = 1
					end
					if light then
						light.Enabled = false
					end
				end
			end
		end
	end
end

part.Touched:Connect(onPartTouched)

"create a new folder called currency inside the player with a string value called souls and save when player leaves game."

-- server script 
local DataStoreService = game:GetService("DataStoreService")
local currencyDataStore = DataStoreService:GetDataStore("CurrencyData")

game.Players.PlayerAdded:Connect(function(player)
    local currencyFolder = Instance.new("Folder")
    currencyFolder.Name = "Currency"
    currencyFolder.Parent = player
    
    local souls = Instance.new("StringValue")
    souls.Name = "Souls"
    souls.Parent = currencyFolder
    
    local savedData
    local success, err = pcall(function()
        savedData = currencyDataStore:GetAsync(player.UserId .. "-Souls")
    end)
    
    if success and savedData then
        souls.Value = savedData
    else
        souls.Value = 0
    end
end)

game.Players.PlayerRemoving:Connect(function(player)
    local currencyFolder = player:FindFirstChild("Currency")
    if currencyFolder then
        local souls = currencyFolder:FindFirstChild("Souls")
        if souls then
            local success, err = pcall(function()
                currencyDataStore:SetAsync(player.UserId .. "-Souls", souls.Value)
            end)
            
            if not success then
                warn("Failed to save data for " .. player.Name)
            end
        end
    end
end)

"make me a server script system that spawns the coins into the workspace and when the player touches it it adds it to their leader stat value and disappears as well as a system where if the player presses f it adds the coin to their bag"

-- server script for spawning coins into the workspace
local coin = game.Workspace.Coin
local function spawnCoin()
    local newCoin = coin:Clone()
    newCoin.Parent = game.Workspace
    newCoin.Position = Vector3.new(math.random(-100,100), 5, math.random(-100,100))
end
spawnCoin()

-- script for collecting coins
local function collectCoin(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player then
        player.leaderstats.Coins.Value = player.leaderstats.Coins.Value + 1
        otherPart:Destroy()
    end
end
game.Workspace.Coin.Touched:Connect(collectCoin)

-- script for adding coin to player's bag on pressing 'f'
game.Players.PlayerAdded:Connect(function(player)
    local bag = Instance.new("IntValue")
    bag.Name = "Bag"
    bag.Value = 0
    bag.Parent = player.leaderstats

local function addToBag()
        if player.leaderstats.Bag.Value < 3 then
            player.leaderstats.Bag.Value = player.leaderstats.Bag.Value + 1
            game.Workspace.Coin:Destroy()
        end
    end
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.Died:Connect(function()
            bag:Destroy()
        end)
        local input = humanoid:WaitForChild("HumanoidRootPart"):WaitForChild("InputBegan")
        input:Connect(function(key)
            if key.KeyCode == Enum.KeyCode.F then
                addToBag()
            end
        end)
    end)
end)

"make them move"

"working main menu"

-- 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(0, 0, 0)

local title = Instance.new("TextLabel", background)
title.Text = "Main Menu"
title.TextColor3 = Color3.fromRGB(255, 255, 255)
title.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
title.Position = UDim2.new(0.5, -50, 0.2, 0)
title.Size = UDim2.new(0, 100, 0, 50)

local playButton = Instance.new("TextButton", background)
playButton.Text = "Play"
playButton.TextColor3 = Color3.fromRGB(255, 255, 255)
playButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
playButton.UICorner = 5
playButton.Position = UDim2.new(0.5, -50, 0.4, 0)
playButton.Size = UDim2.new(0, 100, 0, 50)

local quitButton = Instance.new("TextButton", background)
quitButton.Text = "Quit"
quitButton.TextColor3 = Color3.fromRGB(255, 255, 255)
quitButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
quitButton.UICorner = 5
quitButton.Position = UDim2.new(0.5, -50, 0.6, 0)
quitButton.Size = UDim2.new(0, 100, 0, 50)

"if the allowed players from a table is the local player then script.parent.parent.enable = true"

"make a kick admin command for me"

"create a script where there are leaderstats called Money and it will save when you leave and rejoin the game"

-- local script (StarterPlayerScripts) 
local DataStoreService = game:GetService("DataStoreService")
local MoneyStore = DataStoreService:GetDataStore("MoneyData")
local Players = game:GetService("Players")

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

local Money = Instance.new("IntValue")
    Money.Name = "Money"
    Money.Parent = leaderstats

local savedData
    local success, err = pcall(function()
        savedData = MoneyStore:GetAsync(player.UserId)
    end)

if success and savedData then
        Money.Value = savedData
    else
        Money.Value = 0
    end
end

local function onPlayerRemoving(player)
    local success, err = pcall(function()
        MoneyStore:SetAsync(player.UserId, player.leaderstats.Money.Value)
    end)

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

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

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

"I currently have a Folder in server storage filled with StringValues. Make a script where if I hover over the corresponding button and stringvalue it changes the Text of my TextBox to show the corresponding description."

"create a script inside script inside a textbutton that opens a gui and tweens it in the middle of the screen."

"make a script where if a player equips a tool named "LexusKey" a imagelabel named "Key" that is inside of a screengui named "Keyfob" becomes visible"

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

"make a roblox code where there is a timer at the top of the screen it will count down 30 seconds and when the time is up it will tp all players to one of my Parts Part1 Part2 Part3 Part4 Part5 Part6 Part7 Part8 Part9 Part10 Part11 Part12 but only one player can be tped to each part then the countdown will go off the screen and if all players die it will restart the countdown again after waiting 3 seconds and when the countdown ends my Part called Spinner will will spin at a speed of 0.1 and then each 5 seconds the speed will increase by 0.2 speed and then when all players die it will go back to 0.1 speed and start again but use tween service and after the countdown ends last one alive gets 100 Money"

-- server script for countdown and teleporting players 
local countdown = 30
local parts = {game.Workspace.Part1, game.Workspace.Part2, game.Workspace.Part3, game.Workspace.Part4, game.Workspace.Part5, game.Workspace.Part6, game.Workspace.Part7, game.Workspace.Part8, game.Workspace.Part9, game.Workspace.Part10, game.Workspace.Part11, game.Workspace.Part12}

while true do
    for i = countdown, 0, -1 do
        game.StarterGui.ScreenGui.Timer.Text = "Time Left: " .. tostring(i)
        wait(1)
    end
    
    local players = game.Players:GetPlayers()
    local usedParts = {}
    
    for _, player in pairs(players) do
        local randomPart = parts[math.random(1, #parts)]
        while usedParts[randomPart] do
            randomPart = parts[math.random(1, #parts)]
        end
        usedParts[randomPart] = true
        player.Character:SetPrimaryPartCFrame(randomPart.CFrame)
    end
    
    game.StarterGui.ScreenGui.Timer.Text = ""
    wait(3)
end

-- server script for spinner 
local spinner = game.Workspace.Spinner
local speed = 0.1

while true do
    spinner.Rotation = spinner.Rotation + Vector3.new(0, speed, 0)
    wait(5)
    speed = speed + 0.2
end

-- server script for restarting countdown and giving money 
local function restartCountdown()
    countdown = 30
    game.StarterGui.ScreenGui.Timer.Text = ""
    for _, player in pairs(game.Players:GetPlayers()) do
        player.Character:SetPrimaryPartCFrame(game.Workspace.Spawn.CFrame)
    end
    wait(3)
end

local function giveMoney(winner)
    winner.leaderstats.Coins.Value = winner.leaderstats.Coins.Value + 100
end

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        character.Humanoid.Died:Connect(function()
            if #game.Players:GetPlayers() == 1 then
                giveMoney(game.Players:GetPlayers()[1])
                restartCountdown()
            end
        end)
    end)
end)

"create a script when you click it spawns a part"

"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

"Create a script for the R15 rig where the player ragdolls upon on death while keeping the original character"

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

"make a leaderboard script for workspace where the leaderboard is sorted by player's coin value and add comments to the script"

-- server script (ServerScriptService) 
local function updateLeaderboard()
    -- Get all players in the game 
    local players = game.Players:GetPlayers()

-- Sort players by their coin value 
    table.sort(players, function(a, b)
        return a.leaderstats.Coins.Value > b.leaderstats.Coins.Value
    end)

-- Update the leaderboard 
    local leaderboard = game.Workspace.Leaderboard
    for i, player in ipairs(players) do
        local nameTag = leaderboard:FindFirstChild(player.Name)
        if not nameTag then
            nameTag = Instance.new("TextLabel")
            nameTag.Name = player.Name
            nameTag.Parent = leaderboard
        end
        nameTag.Text = i .. ". " .. player.Name .. ": " .. player.leaderstats.Coins.Value .. " Coins"
        nameTag.Position = UDim2.new(0, 0, (i - 1) * 0.1, 0)
    end
end

-- Connect the updateLeaderboard function to the Players.PlayerAdded event 
game.Players.PlayerAdded:Connect(function(player)
    player.leaderstats.Coins.Changed:Connect(updateLeaderboard)
end)

-- Update the leaderboard initially 
updateLeaderboard()

"Make a checkpoint spawner"

"make a script for an existing text label that displays and starts 5 minute countdown when the player touches the part called GearPart. text says "Lucky Block Ready" after the 5 minutes. touching the part during the countdown does not interrupt it."

"Make a kind of jump simulator, with each jump that the player takes, the strength of his jump increases by 1. Also, add another script with a leaderstats showing the amount of jump the player took. and explain where to put each script"

"create a script where when a player stands on my part called Bank it will countdown 10 seconds above my part called bank and if they stay on it for 10 seconds then they get 500 Money but if they go 2 studs or more away from my part the countdown ends"

-- server script for Bank part 
local bankPart = game.Workspace.Bank
local debounce = true
local countdown = 10

local function onTouched(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player and debounce then
        debounce = false
        local distance = (bankPart.Position - hit.Position).Magnitude
        local timer = countdown
        local billboardGui = Instance.new("BillboardGui")
        local textLabel = Instance.new("TextLabel")

billboardGui.Parent = bankPart
        billboardGui.Size = UDim2.new(0, 100, 0, 50)
        billboardGui.StudsOffset = Vector3.new(0, 3, 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

while timer > 0 and distance < 2 do
            textLabel.Text = timer
            wait(1)
            timer = timer - 1
            distance = (bankPart.Position - hit.Position).Magnitude
        end

if timer == 0 then
            player.leaderstats.Money.Value = player.leaderstats.Money.Value + 500
        end

billboardGui:Destroy()
        debounce = true
    end
end

bankPart.Touched:Connect(onTouched)

"make a script that makes a huge part that changes color blue to green."

"Inside the Folder called "House" choose a random part , A1, A2, A3, or A4 , if the player is standing on the part that is chosen, they die"

"make a script that spawns random blocks"

"model may be a child of a other model so check for that too"

"there is a little icon with a ? at the middle top of the screen when you click it it says Hello Thanks For Playing then a new line and it says You Can Find Lucky Blocks Threw Out The Obby They All Do Different Things this is the asset id 13263013887"

"make a roblox script where you will move to the most close person using path finding then once your near them you will click left click auto automatically but if they get too far stop but if you get close continue for my player make it loop walk"

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

local function getClosestPlayer(player)
    local closestDistance = math.huge
    local closestPlayer = nil
    local playerPosition = player.Character.HumanoidRootPart.Position

for _, otherPlayer in ipairs(Players:GetPlayers()) do
        if otherPlayer ~= player and otherPlayer.Character then
            local otherPlayerPosition = otherPlayer.Character.HumanoidRootPart.Position
            local distance = (playerPosition - otherPlayerPosition).magnitude

if distance < closestDistance then
                closestDistance = distance
                closestPlayer = otherPlayer
            end
        end
    end

return closestPlayer, closestDistance
end

local function moveToPlayer(player)
    while true do
        local character = player.Character
        if character then
            local closestPlayer, closestDistance = getClosestPlayer(player)

if closestPlayer and closestDistance > 10 then
                local path = PathfindingService:CreatePath()
                path:ComputeAsync(character.HumanoidRootPart.Position, closestPlayer.Character.HumanoidRootPart.Position)

for _, waypoint in ipairs(path:GetWaypoints()) do
                    character.Humanoid:MoveTo(waypoint.Position)
                    character.Humanoid.MoveToFinished:Wait()
                end
            elseif closestPlayer and closestDistance <= 10 then
                -- Perform left click action (replace with your desired action)
                -- This example assumes you have a tool named "MyTool" in the player's backpack
                local tool = player.Backpack:FindFirstChild("MyTool")
                if tool then
                    tool:Activate()
                end
            end
        end
        wait(1)
    end
end

Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function()
        moveToPlayer(player)
    end)
end)

"make a plate survival script with 2 events and only have 15 players in max"

-- server script 
local maxPlayers = 15
local players = game:GetService("Players")
local plates = game.Workspace.Plates:GetChildren()
local events = {"Shrink", "Grow"}

function startGame()
    while true do
        wait(10)
        local currentPlayers = players:GetPlayers()
        if #currentPlayers >= maxPlayers then
            for _, player in pairs(currentPlayers) do
                local plate = plates[math.random(1, #plates)]
                player.Character.HumanoidRootPart.CFrame = plate.CFrame
            end
            while #currentPlayers > 0 do
                local event = events[math.random(1, #events)]
                if event == "Shrink" then
                    for _, plate in pairs(plates) do
                        plate.Size = plate.Size - Vector3.new(1, 0, 1)
                    end
                elseif event == "Grow" then
                    for _, plate in pairs(plates) do
                        plate.Size = plate.Size + Vector3.new(1, 0, 1)
                    end
                end
                wait(10)
            end
        end
    end
end

startGame()

"can you make me a Sport mode script for my chassis tune and vehicle on roblox?"

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

"if I click a button its color fades so that I can customize what color it changes to"

"When Harlandroblox says !game5 it will say Harland has made you walk forward for 3 seconds on all the players screens apart from Harlandroblox in the middle of there screen and it will make them walk forward for 3 seconds apart from Harlandroblox and then after all the players apart from Harlandroblox walk forward for 3 seconds the text will go off the screen make it all one code block"

-- server script 
local function onChat(player, message)
    if player.Name == "Harlandroblox" and message == "!game5" then
        for _, otherPlayer in ipairs(game.Players:GetPlayers()) do
            if otherPlayer ~= player then
                local gui = Instance.new("ScreenGui")
                local label = Instance.new("TextLabel")
                label.Text = "Harland has made you walk forward for 3 seconds"
                label.Size = UDim2.new(1, 0, 1, 0)
                label.BackgroundTransparency = 1
                label.TextScaled = true
                label.TextColor3 = Color3.new(1, 1, 1)
                label.Parent = gui
                gui.Parent = otherPlayer.PlayerGui

local character = otherPlayer.Character
                if character then
                    local humanoid = character:FindFirstChild("Humanoid")
                    if humanoid then
                        humanoid:Move(Vector3.new(0, 0, -1), true)
                        wait(3)
                        humanoid:Move(Vector3.new(0, 0, 0), true)
                    end
                end

wait(3)
                gui:Destroy()
            end
        end
    end
end

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

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

"a roblox xml metadata script that executes a require once you join the game"

"when the player steps on a plate Named RoundPlate1 and another player on RoundPlate2 Teleport Them to the RoundSpawn2 and RoundSpawn parts the Player who gets teleported to RoundSpawn gets the accessory in replicatedstorage Storage folder named Crown"

To modify the last script to meet the new requirements, where stepping on `RoundPlate1` teleports a player to `RoundSpawn` and gives them a `Crown` accessory, and stepping on `RoundPlate2` teleports another player to `RoundSpawn2` without giving them the accessory, you can adjust the script slightly. Here's how it could be done:

```lua
-- Server Script
local plate1 = game.Workspace.RoundPlate1
local plate2 = game.Workspace.RoundPlate2
local spawn1 = game.Workspace.RoundSpawn
local spawn2 = game.Workspace.RoundSpawn2
local accessory = game.ReplicatedStorage.Storage.Crown

local function onPlate1Touched(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        local character = player.Character
        if character then
            character:SetPrimaryPartCFrame(spawn1.CFrame) -- Teleport to RoundSpawn
            local cloneAccessory = accessory:Clone()
            cloneAccessory.Parent = character -- Give Crown
        end
    end
end

local function onPlate2Touched(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        local character = player.Character
        if character then
            character:SetPrimaryPartCFrame(spawn2.CFrame) -- Teleport to RoundSpawn2, no accessory given here
        end
    end
end

plate1.Touched:Connect(onPlate1Touched)
plate2.Touched:Connect(onPlate2Touched)
```

This script ensures that when a player steps on `RoundPlate1`, they are teleported to `RoundSpawn` and receive the `Crown` accessory. If another player steps on `RoundPlate2`, they are simply teleported to `RoundSpawn2` without receiving any accessory. This approach maintains the distinct outcomes based on which plate is touched, as per the new requirements.

"make the fog color change from white to black depending on system time and sync the color to the system time"

"exp system that will start the 2x exp event on friday and finish it on sunday 12 am the exp event will Multiply the exp the Player gets when they level up make sure it just multiplies the exp value they get this is for a Model Named exp thingy in wor"

-- script for exp system in a model named "exp thingy" 
local expModel = game.Workspace["exp thingy"]
local Players = game:GetService("Players")

local function isExpEventActive()
    local currentDate = os.date("*t")
    local currentDay = currentDate.wday
    if currentDay >= 6 and currentDay <= 7 then -- 6 is Friday, 7 is Saturday
        return true
    else
        return false
    end
end

local function levelUp(player)
    local playerStats = player.leaderstats
    local exp = playerStats.Exp.Value
    local level = playerStats.Level.Value
    local expToNextLevel = level * 100

if exp >= expToNextLevel then
        playerStats.Level.Value = playerStats.Level.Value + 1
        playerStats.Exp.Value = exp - expToNextLevel

if isExpEventActive() then
            playerStats.Exp.Value = playerStats.Exp.Value * 2
        end
    end
end

local function onExpChange(player, expValue)
    levelUp(player)
end

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

local exp = Instance.new("IntValue")
    exp.Name = "Exp"
    exp.Value = 0
    exp.Parent = stats

local level = Instance.new("IntValue")
    level.Name = "Level"
    level.Value = 1
    level.Parent = stats

exp:GetPropertyChangedSignal("Value"):Connect(function()
        onExpChange(player, exp.Value)
    end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

"create a lootbox system with tables"

-- server script 
-- Create a table to store lootbox data
local lootboxes = {}

-- Create a function to generate lootboxes
local function generateLootbox()
	-- Generate a random position
	local x = math.random(-100, 100)
	local z = math.random(-100, 100)
	local pos = Vector3.new(x, 50, z)

-- Create a lootbox
	local lootbox = Instance.new("Part")
	lootbox.Parent = game.Workspace
	lootbox.Position = pos
	lootbox.Size = Vector3.new(2, 2, 2)

-- Add the lootbox to the lootboxes table
	table.insert(lootboxes, lootbox)
end

-- Generate the lootboxes
for i = 1, 10 do
	generateLootbox()
end

-- Create a function to open the lootboxes
local function openLootbox(player, lootbox)
	-- Check if the lootbox is valid
	if not lootbox then return end

-- Remove the lootbox from the lootboxes table
	for i, v in ipairs(lootboxes) do
		if v == lootbox then
			table.remove(lootboxes, i)
			break
		end
	end

-- Destroy the lootbox
	lootbox:Destroy()

-- Give the player a random reward
	local rewards = {
		"Coin",
		"Gem",
		"Hat",
		"Shirt",
		"Pants"
	}
	local reward = rewards[math.random(#rewards)]
	player.leaderstats[reward].Value = player.leaderstats[reward].Value + 1
end

-- Create a function to handle lootbox touches
local function onLootboxTouched(otherPart)
	-- Check if the part is a humanoid
	local humanoid = otherPart.Parent:FindFirstChildWhichIsA("Humanoid")
	if not humanoid then return end

-- Get the player
	local player = game.Players:GetPlayerFromCharacter(humanoid.Parent)
	if not player then return end

-- Open the lootbox
	openLootbox(player, script.Parent)
end

-- Connect the touched event
script.Parent.Touched:Connect(onLootboxTouched)

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

"Create a part where only players that have bought a gamepass can pass trough it instantly, without having the player rejoin after buying the gamepass"

"Realistic camera bobbing script that activates if the player is moving"

"When a player presses X on their controller, their character will dive forward onto the ground."

"Make a script that makes sure nothing duplicates or spawns anything other than its own parts"

"Write a script that makes the parent part pass through any object named Red"

"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 debounce = true
local countdown = 10

local function startCountdown(player)
    local billboard = Instance.new("BillboardGui")
    local textLabel = Instance.new("TextLabel")
    
    billboard.Parent = part
    billboard.Size = UDim2.new(0, 100, 0, 50)
    billboard.StudsOffset = Vector3.new(0, 2, 0)
    billboard.Adornee = part
    
    textLabel.Parent = billboard
    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 not debounce then
            break
        end
        textLabel.Text = tostring(i)
        wait(1)
    end
    
    if debounce then
        player.leaderstats.Money.Value = player.leaderstats.Money.Value + 500
    end
    
    billboard:Destroy()
end

local function onTouched(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player and debounce then
        debounce = false
        startCountdown(player)
    end
end

local function onEnded(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player then
        debounce = true
    end
end

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

"make it so instead of new instance parts it gets folder children and uses if child is basepart"

To modify the last example so that it operates on existing parts within a folder rather than creating new parts, you can iterate over the children of a specified folder. If a child is a `BasePart` (which includes `Part`, `WedgePart`, `MeshPart`, etc.), you can then assign a random quality value to it. Here's how you might adjust the script:

```lua
local folder = Instance.new("Folder", game.Workspace)
folder.Name = "QualitySettings"

local qualities = {"None", "Low", "Medium", "High", "Very High"}
for i, quality in ipairs(qualities) do
    local stringValue = Instance.new("StringValue", folder)
    stringValue.Name = quality
    stringValue.Value = quality
end

local function getRandomQuality()
    local index = math.random(1, #qualities)
    return qualities[index]
end

-- Assuming there's an existing folder named "Parts" in Workspace with parts in it
local partsFolder = game.Workspace:FindFirstChild("Parts")

if partsFolder then
    for i, child in ipairs(partsFolder:GetChildren()) do
        if child:IsA("BasePart") then  -- Check if the child is a BasePart
            local quality = getRandomQuality()
            local qualityValue = Instance.new("StringValue", child)
            qualityValue.Name = "Quality"
            qualityValue.Value = quality
        end
    end
else
    warn("Parts folder not found")
end
```

This script first checks if the "Parts" folder exists within the Workspace. If the folder exists, it iterates over each child within the folder. For each child that is a `BasePart`, it assigns a random quality from the predefined list by creating a `StringValue` on the part to store the quality level. If the "Parts" folder does not exist, it outputs a warning message. This approach allows you to dynamically assign properties to existing parts in the game environment without creating new instances.

"create an array of dogs"

"make it so the player can teleport by just clicking t"

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

"make it so that each tools clone name is named after that tools name indivuially"

"make a roblox script a leaderstats called Robux and each time a player dies they get - 1 but when a player kills another player the player who killed the other player will get 1 it will show the amount of Leaderstats above your head all players can see the amount of Robux players have it will be above there head"

-- server script (ServerScriptService) 
local function onPlayerAdded(player)
    local leaderstats = Instance.new("Folder", player)
    leaderstats.Name = "leaderstats"

local robux = Instance.new("IntValue", leaderstats)
    robux.Name = "Robux"

local function onCharacterAdded(character)
        local humanoid = character:WaitForChild("Humanoid")

local billboardGui = Instance.new("BillboardGui", character.Head)
        billboardGui.Size = UDim2.new(0, 100, 0, 50)
        billboardGui.StudsOffset = Vector3.new(0, 3, 0)

local textLabel = Instance.new("TextLabel", billboardGui)
        textLabel.Text = player.Name .. ": " .. tostring(robux.Value) .. " Robux"
        textLabel.BackgroundTransparency = 1
        textLabel.TextColor3 = Color3.fromRGB(255, 255, 255)

robux.Changed:Connect(function()
            textLabel.Text = player.Name .. ": " .. tostring(robux.Value) .. " Robux"
        end)

humanoid.Died:Connect(function()
            robux.Value = robux.Value - 1
        end)
    end

player.CharacterAdded:Connect(onCharacterAdded)
end

local function onPlayerRemoving(player)
    local leaderstats = player:FindFirstChild("leaderstats")
    if leaderstats then
        leaderstats:Destroy()
    end
end

local function onHumanoidDied(victimHumanoid)
    local victim = victimHumanoid.Parent
    local killer = victimHumanoid.Creator.Value
    if killer then
        local killerPlayer = game.Players:GetPlayerFromCharacter(killer)
        if killerPlayer then
            local killerRobux = killerPlayer:FindFirstChild("leaderstats"):FindFirstChild("Robux")
            if killerRobux then
                killerRobux.Value = killerRobux.Value + 1
            end
        end
    end
end

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

for _, player in ipairs(game.Players:GetPlayers()) do
    onPlayerAdded(player)
end

for _, character in ipairs(workspace:GetDescendants()) do
    if character:IsA("Humanoid") then
        character.Died:Connect(onHumanoidDied)
    end
end

workspace.DescendantAdded:Connect(function(descendant)
    if descendant:IsA("Humanoid") then
        descendant.Died:Connect(onHumanoidDied)
    end
end)