Haddock - Roblox Library

"make a script that the player will be a NPC that walks and talks"

"create a local player script for existing leaderboard value that named ["Cubes Collected"] i want you to create GUI that will show same value as on leaderboard, GUI must be on the top of the screen"

"get a model in serverstorage and clone it into workspace"

"create a tweened drop down menu that makes multiple small tabs drop down from a button when clicked, the number of buttons depends on the number of players in the game"

-- Local Script 
local TweenService = game:GetService("TweenService")
local Players = game:GetService("Players")
local menuButton = script.Parent
local menuFrame = menuButton.MenuFrame
local isOpen = false

local function createTabs()
    for i, player in ipairs(Players:GetPlayers()) do
        local tab = Instance.new("TextButton")
        tab.Size = UDim2.new(1, 0, 0, 30)
        tab.Position = UDim2.new(0, 0, (i - 1) * 0.1, 0)
        tab.Text = player.Name
        tab.Parent = menuFrame
    end
end

local function toggleMenu()
    if isOpen then
        isOpen = false
        local tweenInfo = TweenInfo.new(0.5, Enum.EasingStyle.Quad, Enum.EasingDirection.Out)
        local tween = TweenService:Create(menuFrame, tweenInfo, {Size = UDim2.new(1, 0, 0, 0)})
        tween:Play()
    else
        isOpen = true
        createTabs()
        local tweenInfo = TweenInfo.new(0.5, Enum.EasingStyle.Quad, Enum.EasingDirection.Out)
        local tween = TweenService:Create(menuFrame, tweenInfo, {Size = UDim2.new(1, 0, 0, 30 * #Players:GetPlayers())})
        tween:Play()
    end
end

menuButton.MouseButton1Click:Connect(toggleMenu)
Players.PlayerAdded:Connect(createTabs)
Players.PlayerRemoving:Connect(createTabs)

"create a text button that shows how many players are playing in a different game place."

"make the model shake, fall, dissapear and reset, 2 seconds after the player stands on it"

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

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

"create small money simulator for purchasing products"

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

"Kick anybody who dies"

"remove the html to rgb, and just make the join colour blue and the leave colour red"

-- roblox script 
-- server script (ServerScriptService) 
local HttpService = game:GetService("HttpService")
local webhookURL = "Your Webhook URL Here" -- replace with your Discord webhook URL

local playerJoinTimes = {}

game.Players.PlayerAdded:Connect(function(player)
    local data = {
        ["embeds"] = {{
            ["title"] = "Player Joined",
            ["description"] = player.Name .. " (" .. player.UserId .. ") has joined the game.",
            ["color"] = Color3.new(0, 0, 1), -- blue color
            ["footer"] = {
                ["text"] = "Roblox Server"
            },
            ["timestamp"] = os.date("!%Y-%m-%dT%H:%M:%SZ")
        }},
    }
    
    playerJoinTimes[player.UserId] = os.time()

local success, err = pcall(function()
        HttpService:PostAsync(webhookURL, HttpService:JSONEncode(data), Enum.HttpContentType.ApplicationJson, false)
    end)
    
    if not success then
        warn("Failed to send message to Discord: " .. err)
    end
end)

game.Players.PlayerRemoving:Connect(function(player)
    local playTime = os.time() - playerJoinTimes[player.UserId]
    local data = {
        ["embeds"] = {{
            ["title"] = "Player Left",
            ["description"] = player.Name .. " (" .. player.UserId .. ") has left the game. They played for " .. playTime .. " seconds.",
            ["color"] = Color3.new(1, 0, 0), -- red color
            ["footer"] = {
                ["text"] = "Roblox Server"
            },
            ["timestamp"] = os.date("!%Y-%m-%dT%H:%M:%SZ")
        }},
    }

local success, err = pcall(function()
        HttpService:PostAsync(webhookURL, HttpService:JSONEncode(data), Enum.HttpContentType.ApplicationJson, false)
    end)
    
    if not success then
        warn("Failed to send message to Discord: " .. err)
    end
end)

"Create a camera system where the player can move the camera around by just moving their mouse, and add fluid motion to the movement of the camera view."

"create a script inside a tool called mysteryBox that gives players a random tool inside a folder in serverstorage called Common Folder when players left click while holding the tool"

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

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

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

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

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

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

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

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

"make sure the command isnt capital or lowercase sensitive, so if a player said CHEalth it would still count"

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

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

"make a script to print in red lua"

"make the frame fade away then become visible = false"

"create a handler script for vfx storage"

"serverscript using pants instance create code which when an imagebutton is clicked it will get the pants Id from the IdFolder in serverstorage inside there's a folder named Pants with a numbervalue inside named Pants1 take the Value from it which is Pantsid and make that the players pants"

"make an script that makes an part and mesh etc under the folder Everything go invisible depending on the part in the folder so the part that is like lets say 500 studs away it is invisible not everything inside"

"Modify it so when i join imagelabel appiers and when player clicks PrisonerButton or PoliceButton it disappiers and when i respawn it doesn't appier"

-- roblox script 
local prisonerButton = script.Parent.ImageLabel.Prisoner.PrisonerButton
local policeButton = script.Parent.ImageLabel.Police.PoliceButton
local imageLabel = script.Parent.ImageLabel
local player = game.Players.LocalPlayer
local isAlive = true -- Variable to track player's alive state

local function teleportPlayerToSpawn(spawn1, spawn2)
	local randomSpawn = math.random() > 0.5 and spawn1 or spawn2
	player.Character:MoveTo(randomSpawn.Position)
	imageLabel.Visible = false
end

local function onPrisonerButtonClick()
	local spawn1 = game.Workspace.Spawn1
	local spawn2 = game.Workspace.Spawn2
	if spawn1 and spawn2 then
		teleportPlayerToSpawn(spawn1, spawn2)
	end
end

local function onPoliceButtonClick()
	local spawn3 = game.Workspace.Spawn3
	local spawn4 = game.Workspace.Spawn4
	if spawn3 and spawn4 then
		teleportPlayerToSpawn(spawn3, spawn4)
	end
end

prisonerButton.MouseButton1Click:Connect(onPrisonerButtonClick)
policeButton.MouseButton1Click:Connect(onPoliceButtonClick)

local function handleCharacter(character)
	local humanoid = character:WaitForChild("Humanoid")
	local humanoidDiedConnection

humanoidDiedConnection = humanoid.Died:Connect(function()
		humanoidDiedConnection:Disconnect()
		isAlive = false
	end)
end

player.CharacterAdded:Connect(handleCharacter)

-- Check if the player's character exists upon joining
if player.Character then
	handleCharacter(player.Character)
	imageLabel.Visible = true -- Set the ImageLabel visible when the player joins
end

-- Check if the player respawns
player.CharacterRemoving:Connect(function()
	if isAlive then
		imageLabel.Visible = false
	end
end)

"make a little rpg system that updates when a humanoid is killed use gold exp and leveling"

"script that opens a product prompt when the player clicks the ui button called DanceButton. if the player buys the product, every player in the server dances for 10 seconds. add comments to show what everything does and means."

-- script for the DanceButton
local DanceButton = script.Parent

-- function that is called when the button is clicked
function onClicked()
	-- open the product prompt for the product with the id 12345
	game:GetService("MarketplaceService"):PromptProductPurchase(game.Players.LocalPlayer, 12345)
end

-- connect the onClicked function to the MouseButton1Click event of the button
DanceButton.MouseButton1Click:Connect(onClicked)

-- server script

-- function that is called when a player buys the product
game.MarketplaceService.PromptProductPurchaseFinished:Connect(function(player, productId, isPurchased)
	-- check if the productId is the one we want and if it was purchased
	if productId == 12345 and isPurchased then
		-- loop through all players
		for _, player in pairs(game.Players:GetPlayers()) do
			-- make the player dance
			player.Character.Humanoid:LoadAnimation(script.Dance):Play()
		end
		-- wait 10 seconds
		wait(10)
		-- loop through all players
		for _, player in pairs(game.Players:GetPlayers()) do
			-- stop the player from dancing
			player.Character.Humanoid:LoadAnimation(script.Idle):Play()
		end
	end
end)

"make a hint that randomizes the hints letters randomize a random selection of 5 letters every 1 second and make it randomize those letters in another hint that you can modify the text in"

"how can we take the ticket variable and put it into a settings module script"

-- server script 
local Settings = require(game:GetService("ServerScriptService"):WaitForChild("SettingsModule")) -- Assuming the module is named "SettingsModule" and is in ServerScriptService
local scanner = script.Parent
local canOpen = true
local Ticket = Settings.Ticket -- Get the Ticket from the settings module
local debounce = false
local GUIEvent = script.Parent.Parent.GUIEvent

local TweenService = game:GetService("TweenService") -- Get the TweenService

GUIEvent.OnServerEvent:Connect(function(player, action)
	script.Parent.Parent.Door1.Door1.Motor.DesiredAngle = 1.6
	script.Parent.Parent.Door2.Door2.Motor.DesiredAngle = -1.6
	wait(2) -- wait for 2 seconds before closing the doors
	print("Doors closed")
	script.Parent.Parent.Door1.Door1.Motor.DesiredAngle = 0
	script.Parent.Parent.Door2.Door2.Motor.DesiredAngle = 0
	canOpen = true
end)

local originalPosition = UDim2.new(0.474, 0,-1.1, 0)
local middlePosition = UDim2.new(0.474, 0,0.454, 0)

local function openDoors(player)
	if canOpen then
		canOpen = false
		player.PlayerGui.FingerprintGUI.Enabled = true
		local FingerprintGUI = player.PlayerGui.FingerprintGUI.GUI
		local guiTweenInfo = TweenInfo.new(1, Enum.EasingStyle.Quad, Enum.EasingDirection.Out)
		local guiTween = TweenService:Create(FingerprintGUI, guiTweenInfo, {Position = middlePosition})
		guiTween:Play()
		player.PlayerGui.FingerprintGUI.Value.Value = script.Parent.Parent
		print("Waiting for GUI to be closed...")
	end
end

local function onHit(hit)
	print("Scanner touched")
	if debounce then return end
	debounce = true
	local tool = hit.Parent:FindFirstChild(Ticket)
	if tool and tool:IsA("Tool") then
		print("Passport detected")
		local player = game.Players:GetPlayerFromCharacter(hit.Parent)
		if player then
			openDoors(player)
		end
	end
	debounce = false
end

scanner.Touched:Connect(onHit)

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

"can you make me a script that when you press m1 the ball goes straight then curves to the right. add comments"

"make the part the script is inside of clone itself and make the clone move and make a clone every 5 seconds and make the parts move using tweens and dont make the clones clone themselves also make a starting point and finish point and make the part get deleted when reaching end point"

"when player walk on a part speed and when is not touch to not have speed"

"Esp script"

"make a roblox script where if u touch this wall it destroys it"

"make a script for my tool where when player equips the tool the imagelabel named "Key" becomes visible"

"make that my arms doesn't make damage until the animation plays"

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character
local humanoid = character:FindFirstChild("Humanoid")
local animTrack1 = humanoid:LoadAnimation(anim1)
local animTrack2 = humanoid:LoadAnimation(anim2)

local punching = false
local punchCount = 0
local canPunch = true
local hitCharacters = {}

local function punch()
	if canPunch then
		local arm = character:FindFirstChild(punching and "Left Arm" or "Right Arm")
		arm.Touched:Connect(function(part)
			local otherCharacter = part.Parent
			local otherHumanoid = otherCharacter:FindFirstChildWhichIsA("Humanoid")
			if otherHumanoid and not hitCharacters[otherCharacter] and (animTrack1.IsPlaying or animTrack2.IsPlaying) then
				hitCharacters[otherCharacter] = true
				otherHumanoid:TakeDamage(10)
				wait(1)
				hitCharacters[otherCharacter] = nil
			end
		end)
		punching = not punching
		local animTrack = punching and animTrack1 or animTrack2
		animTrack:Stop()
		animTrack:Play()
		punchCount = punchCount + 1
		if punchCount >= 4 then
			canPunch = false
			wait(2)
			canPunch = true
			punchCount = 0
		end
	end
end

game:GetService("UserInputService").InputBegan:Connect(function(input)
	if input.KeyCode == Enum.KeyCode.E then
		if not animTrack1.IsPlaying and not animTrack2.IsPlaying then
			punch()
		end
	end
end)

"make a script that freezes my character in place"

"make a wolf appear and chase the player for 10 seconds when the player says wolf, the wolf kills the player after the 10 seconds. make sure the wolf can't fall. add detailed comments, explanation and instructions"

-- server script (ServerScriptService) 
-- Create a function to spawn a wolf
local function spawnWolf(player)
    local wolf = game.ServerStorage.Wolf:Clone() -- Make sure you have a wolf model in ServerStorage
    wolf.Parent = game.Workspace
    wolf.HumanoidRootPart.CFrame = player.Character.HumanoidRootPart.CFrame * CFrame.new(0, 0, -5) -- Spawn the wolf behind the player
    wolf.HumanoidRootPart.Anchored = true -- Make sure the wolf doesn't fall
    return wolf
end

-- Create a function to make the wolf chase the player
local function chasePlayer(wolf, player)
    local pfs = game:GetService("PathfindingService")
    local path = pfs:CreatePath()
    local waypoints = {}

while true do
        path:ComputeAsync(wolf.HumanoidRootPart.Position, player.Character.HumanoidRootPart.Position)
        waypoints = path:GetWaypoints()

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

-- Create a function to handle the chat command
local function onPlayerChatted(player, message)
    if message:lower() == "wolf" then
        local wolf = spawnWolf(player)
        local chaseCoroutine = coroutine.create(chasePlayer)
        coroutine.resume(chaseCoroutine, wolf, player)
        wait(10)
        wolf.Humanoid.Health = 0
        player.Character.Humanoid.Health = 0
    end
end

-- Connect the chat event to the function
game.Players.PlayerAdded:Connect(function(player)
    player.Chatted:Connect(function(message)
        onPlayerChatted(player, message)
    end)
end)

-- Instructions to set up the wolf model in Roblox Studio:
1. Create a new model in Roblox Studio and name it "Wolf".
2. Add a Humanoid and a HumanoidRootPart to the model.
3. Customize the appearance of the wolf as desired.
4. Add a script to the wolf model with the following code to prevent it from falling:
    local wolf = script.Parent
    wolf.HumanoidRootPart.Anchored = true
5. Save the wolf model to ServerStorage.

"create a script inside a tool called mysteryBox that gives players a random tool inside a folder in serverstorage called Common Folder when players left click"

"when i press e i my keyboard i will start flying and when i press e again i will unfly"

"make a script inside a tool called Basic Sword that plays a sound located inside the tool whenever a NPC with a humanoid called Enemy is damaged but only players close enough can hear it"

"local Script = game.ServerStorage.Karasu game.Players.PlayerAdded:Connect(function(plr) plr.CharacterAdded:Connect(function(chr) plr.Chatted:Connect(function(msg) if msg == "5KVISITS" then Script:Clone().Parent = plr:WaitForChild("Backpack") end"

"Can we improve this script by making sure the camerapart is still attached to the player?"

Yes, we can improve the script by constantly updating the cameraPart's position to the player's position even when the camera is not zoomed in. This ensures that the cameraPart is always at the correct position relative to the player, ready for when the camera zooms in. Here's how to do it:

```lua
-- Local script 
local player = game.Players.LocalPlayer
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local TweenService = game:GetService("TweenService")
local camera = workspace.CurrentCamera
local zoomedIn = false
local defaultFieldOfView = 70
local zoomedFieldOfView = 20
local zoomOffset = Vector3.new(0, 5, 0) -- this is the offset value when zoomed in, adjust the Y value to set the height above the player's head
local zoomSpeed = 3.5 -- this is the speed at which the camera will zoom in and out

-- Create an invisible part for the camera to follow
local cameraPart = Instance.new("Part")
cameraPart.Transparency = 1
cameraPart.CanCollide = false
cameraPart.Anchored = true
cameraPart.Parent = workspace

-- Wait for the player's character to load
local character = player.CharacterAdded:Wait()
-- Wait for the HumanoidRootPart to load
local humanoidRootPart = character:WaitForChild("HumanoidRootPart")

-- Set the initial position of the camera part
cameraPart.Position = humanoidRootPart.Position + zoomOffset

UserInputService.InputBegan:Connect(function(input)
	if input.KeyCode == Enum.KeyCode.Z then
		if zoomedIn then
			-- Gradually zoom out
			local zoomOutTween = TweenService:Create(camera, TweenInfo.new(zoomSpeed), {FieldOfView = defaultFieldOfView})
			zoomOutTween:Play()
			local zoomLocation = humanoidRootPart.Position
			local zoomOutTweenPart = TweenService:Create(cameraPart, TweenInfo.new(zoomSpeed), {Position = zoomLocation})
			zoomOutTweenPart:Play()
			zoomOutTweenPart.Completed:Wait()
			camera.CameraSubject = character.Humanoid -- set the camera to follow the player
			zoomedIn = false
		else
			-- Gradually zoom in
			local zoomInTween = TweenService:Create(camera, TweenInfo.new(zoomSpeed), {FieldOfView = zoomedFieldOfView})
			zoomInTween:Play()
			local zoomLocation = humanoidRootPart.Position + zoomOffset
			cameraPart.Position = zoomLocation
			cameraPart.CFrame = CFrame.new(zoomLocation, humanoidRootPart.Position) -- make the camera part look at the player
			camera.CameraSubject = cameraPart -- set the camera to follow the camera part
			zoomedIn = true
		end
	end
end)

-- Update the cameraPart's position to the offset location every frame
RunService.RenderStepped:Connect(function()
	cameraPart.Position = humanoidRootPart.Position + zoomOffset
end)
```

In this updated script, we moved the line that updates the cameraPart's position into the RenderStepped event. This event fires every frame, so the cameraPart's position is constantly updated to the player's position plus the offset, whether the camera is zoomed in or not.

"Make a script that slowly turns a parts transparency up, like a paint drying game. make the time it takes to finish configurable, and once its done, it restarts with a random colour. it continues this cycle forever."

"Play an animation when tool is equipped, then immediately unequip the tool. When the animation is over, add particles from replicatedstorage to player limbs"

"Can we improve this system by making the lights of the alarm system red?"

-- server script 
-- script for the switch 
local switch = script.Parent
local lights = game.Workspace.Lights:GetChildren()
local alarm = game.Workspace.Alarm
local alarmLights = alarm:GetChildren()

local function dimLights()
    for _, light in ipairs(lights) do
        for i = light.Brightness, 0, -0.1 do
            light.Brightness = i
            task.wait(0.1)
        end
    end
    task.wait(2)
    alarm:Play()
    for _, alarmLight in ipairs(alarmLights) do
        alarmLight.Enabled = true
        alarmLight.BrickColor = BrickColor.new("Bright red") -- make the alarm light bright red
        alarmLight.Light.Color = Color3.new(1, 0, 0) -- make the light of the alarm red
    end
    task.wait(10)
    alarm:Stop()
    for _, alarmLight in ipairs(alarmLights) do
        alarmLight.Enabled = false
    end
end

switch.ClickDetector.MouseClick:Connect(dimLights)

-- script for the rotating alarm lights 
while true do
    for _, alarmLight in ipairs(alarmLights) do
        if alarmLight.Enabled then
            alarmLight.CFrame = alarmLight.CFrame * CFrame.Angles(0, math.rad(1), 0)
        end
    end
    task.wait()
end

"Lights to flicker when monster is nearby"

"create a script that makes the player roll forward"

"Now make it cycle between blue and red and yellow."

"make a npc walk"

"Create a script that makes the NPC follow the last joined player. Make sure it keeps following that player until a new player joins."

-- server script 
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local humanoid = script.Parent
local root = humanoid.Parent.PrimaryPart
local lastPlayer

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

Players.PlayerAdded:Connect(function(player)
	lastPlayer = player
end)

RunService.Heartbeat:Connect(function()
	if lastPlayer then
		local nP, distance, direction = findNearestPlayer()
		if nP == lastPlayer then
			humanoid:Move(direction)
			if lastPlayer.Character.Humanoid.Jump then
				humanoid.Jump = true 
			end
		end
	end
end)

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

"part that follows you and if you dont use a tool to hit it back it kills you"

To create a part that follows a player and can be hit back with a tool, you'll need to write a script that handles the following behavior and the interaction with the tool. Here's an example of how you might script this in Roblox using Lua:

```lua
-- Server Script
local part = Instance.new("Part", workspace)
part.Name = "FollowPart"
part.Size = Vector3.new(2, 2, 2)
part.Position = Vector3.new(0, 3, 0)
part.Anchored = false
part.BrickColor = BrickColor.new("Bright red")

local toolName = "HitTool" -- The name of the tool that can hit the part back

-- Function to make the part follow the nearest player
local function followPlayers()
	while part:IsDescendantOf(workspace) do
		local closestPlayer = nil
		local minDistance = math.huge
		for _, player in pairs(game.Players:GetPlayers()) do
			if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
				local distance = (player.Character.HumanoidRootPart.Position - part.Position).magnitude
				if distance < minDistance then
					closestPlayer = player
					minDistance = distance
				end
			end
		end
		if closestPlayer then
			local targetPosition = closestPlayer.Character.HumanoidRootPart.Position
			local direction = (targetPosition - part.Position).unit
			part.Velocity = direction * 10 -- Adjust the speed as needed
		end
		wait(0.1)
	end
end

-- Function to handle the interaction with the tool
local function onHit(hit)
	if hit.Parent:FindFirstChildWhichIsA("Tool") and hit.Parent.Tool.Name == toolName then
		part.Velocity = -part.Velocity * 2 -- Adjust the force as needed
	end
end

-- Connect the Touched event to the onHit function
part.Touched:Connect(onHit)

-- Start following players
followPlayers()
```

For the part to kill the player if they don't hit it back with the tool, you can modify the `followPlayers` function to include a check that damages the player if the part gets too close:

```lua
-- Add this inside the followPlayers function, within the if closestPlayer then block
if minDistance < 2 then -- Adjust the kill distance as needed
	closestPlayer.Character.Humanoid:TakeDamage(100) -- Adjust the damage as needed
end
```

Please note that this script assumes you have a tool named "HitTool" that players can use to hit the part back. You'll need to create this tool separately and ensure it's available to players in the game.

Remember to adjust the values for speed, force, kill distance, and damage according to your game's requirements. This script should be placed in a Script object within the ServerScriptService or Workspace.

"can you make me a script that gives 23 people their own shirt and pants make it so i can put their ids"

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

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

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

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

model.PrimaryPart.Touched:Connect(onTouched)

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

"this script works but i need to have when hit it checks if i have enough rebirths to teleport 2 rebirths or more"

Sure, here is an example of how you can check if a player has enough rebirths to teleport using a server script.

```lua
local teleportPart = game.Workspace.TeleportPart -- replace with your part
local rebirthsNeeded = 2

local function onPartTouch(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player then
        local leaderstats = player:FindFirstChild("leaderstats")
        if leaderstats then
            local rebirths = leaderstats:FindFirstChild("Rebirths")
            if rebirths and rebirths.Value >= rebirthsNeeded then
                -- teleport the player
                player.Character.HumanoidRootPart.CFrame = CFrame.new(0, 50, 0) -- replace with your teleport location
            else
                -- player does not have enough rebirths
                print(player.Name .. " does not have enough rebirths to teleport.")
            end
        end
    end
end

teleportPart.Touched:Connect(onPartTouch)
```

This script assumes that you have a leaderstats model in each player with a Rebirths IntValue inside it. If you're storing rebirths in a different way, you'll need to adjust the script to match.

"can you make it when you go in the hitmans team you will have the item named handgun dont allow items in the president team"

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

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

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

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

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

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

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

"Create a script that plays an animation when I click on a player, the animation is 12584847759 Make sure you use player:GetMouse()"

"Make me a script that stores the players data for coins and rebirths and loads them back in when the player joins the game the data store will create a seperate data folder that will save the players coins and rebirths then add them to leaderstats"

-- main script in ServerScriptService 
local DataStoreService = game:GetService("DataStoreService")
local Players = game:GetService("Players")

local dataStore = DataStoreService:GetDataStore("PlayerData")

local function saveData(player)
    local data = {
        coins = player.leaderstats.Coins.Value,
        rebirths = player.leaderstats.Rebirths.Value
    }
    dataStore:SetAsync(player.UserId, data)
end

local function loadData(player)
    local data = dataStore:GetAsync(player.UserId)
    if data then
        player.leaderstats.Coins.Value = data.coins
        player.leaderstats.Rebirths.Value = data.rebirths
    end
end

local function onPlayerAdded(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

local rebirths = Instance.new("IntValue")
    rebirths.Name = "Rebirths"
    rebirths.Value = 0
    rebirths.Parent = leaderstats

loadData(player)
end

local function onPlayerRemoving(player)
    saveData(player)
end

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

"can i use a module script where if a player touchs a part named RedOrb it updates leaderstat and gives player a permantant speed boost with a remote function??"

Yes, you can use a Module Script along with a Remote Function to achieve this functionality. Here's how you can do it:

1. Create a Module Script and name it "SpeedBoostModule".
2. Inside the Module Script, write the following code:

```lua
local SpeedBoostModule = {}

function SpeedBoostModule.GiveSpeedBoost(player)
    local character = player.Character
    local humanoid = character:FindFirstChild("Humanoid")
    if humanoid then
        humanoid.WalkSpeed = humanoid.WalkSpeed + 10 -- change the value to the desired speed boost
        player.leaderstats.SpeedBoost.Value = player.leaderstats.SpeedBoost.Value + 1
    end
end

return SpeedBoostModule
```

3. Create a Remote Function inside the ReplicatedStorage and name it "GiveSpeedBoostRF".

4. In the script for the RedOrb part, write the following code:

```lua
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local GiveSpeedBoostRF = ReplicatedStorage:WaitForChild("GiveSpeedBoostRF")

local function onTouched(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player then
        GiveSpeedBoostRF:InvokeServer(player)
    end
end

script.Parent.Touched:Connect(onTouched)
```

5. Create a Script inside ServerScriptService and write the following code:

```lua
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local GiveSpeedBoostRF = ReplicatedStorage:WaitForChild("GiveSpeedBoostRF")
local SpeedBoostModule = require(game.ServerScriptService.SpeedBoostModule)

local function onGiveSpeedBoost(player)
    SpeedBoostModule.GiveSpeedBoost(player)
end

GiveSpeedBoostRF.OnServerInvoke = onGiveSpeedBoost
```

6. Finally, make sure you have a leaderstat named "SpeedBoost" for each player. The script will update the leaderstat and give the player a permanent speed boost when they touch the RedOrb part.

"Write me a script that causes the player to smoke for a duration after touching a part"

"can walls fly"

"write a script for a npc that faces the player and says a message when they are in a certain radius and tell me where to place the script and what kind of script it should be"

"Create a script that gives new players who didn’t play before a wooden sword when they join"

-- server script 
local Players = game:GetService("Players")
local StarterGear = game:GetService("StarterGear")
local DataStoreService = game:GetService("DataStoreService")
local playerDataStore = DataStoreService:GetDataStore("PlayerData")

local function onPlayerAdded(player)
    local key = "Player_" .. player.UserId
    local success, err = pcall(function()
        return playerDataStore:GetAsync(key)
    end)

if success and not err then
        if not err then
            local woodenSword = Instance.new("Tool")
            woodenSword.Name = "Wooden Sword"
            woodenSword.Parent = StarterGear
            woodenSword.RequiresHandle = false

local handle = Instance.new("Part")
            handle.Name = "Handle"
            handle.Parent = woodenSword
            handle.Size = Vector3.new(1, 5, 1)
            handle.BrickColor = BrickColor.new("Brown")
            handle.TopSurface = Enum.SurfaceType.Smooth
            handle.BottomSurface = Enum.SurfaceType.Smooth

local blade = Instance.new("Part")
            blade.Name = "Blade"
            blade.Parent = woodenSword
            blade.Size = Vector3.new(1, 10, 1)
            blade.BrickColor = BrickColor.new("Bright yellow")
            blade.TopSurface = Enum.SurfaceType.Smooth
            blade.BottomSurface = Enum.SurfaceType.Smooth
            blade.CFrame = handle.CFrame * CFrame.new(0, 7.5, 0)

local weld = Instance.new("Weld")
            weld.Parent = handle
            weld.Part0 = handle
            weld.Part1 = blade
            weld.C0 = CFrame.new(0, 7.5, 0)

player.Backpack:WaitForChild("Wooden Sword")
            playerDataStore:SetAsync(key, true)
        end
    else
        warn("Error loading player data: " .. tostring(err))
    end
end

Players.PlayerAdded:Connect(onPlayerAdded)

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

"If I click this button then I explode"

"Make a teleporter that teleports when i press e button but i need to have 1 rebirth to teleport"

"make a cool loading screen what lasts for 20 seconds and player can not move while its loading"

"part that when touched spawns a 0.1x0.1 part inside of the player and explodes and disappears,"

"make a npc dance"

"if the proximity prompt script.parent is triggered then set maxhealth and health to 150 and get a sound a play it, make sure it cant be triggered multiple times by one player and if that player that triggered it dies or resets then they can trigger it again"

"Make a StarterCharacterScript an audio muffles sounds playing outside of the train interior when the player is in the train interior"

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

"a lazer eye tool where if I hold down my mouse for 2 seconds i shoot 2 deadly beams out of my eyes with good vfx, it doesnt work"

"make a script that makes the player move to the most close player using path finding but if the most close player dies move on to another player"

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

function moveToClosestPlayer(player)
    local closestPlayer = nil
    local closestDistance = math.huge
    for _, p in pairs(players) do
        if p ~= player then
            local distance = (player.Character.HumanoidRootPart.Position - p.Character.HumanoidRootPart.Position).magnitude
            if distance < closestDistance then
                closestPlayer = p
                closestDistance = distance
            end
        end
    end
    if closestPlayer then
        local path = pfs:CreatePath()
        path:ComputeAsync(player.Character.HumanoidRootPart.Position, closestPlayer.Character.HumanoidRootPart.Position)
        for _, waypoint in pairs(path:GetWaypoints()) do
            player.Character.Humanoid:MoveTo(waypoint.Position)
            player.Character.Humanoid.MoveToFinished:Wait()
        end
    end
end

game.Players.PlayerAdded:Connect(function(player)
    moveToClosestPlayer(player)
end)

game.Players.PlayerRemoving:Connect(function(player)
    moveToClosestPlayer(player)
end)

"Make a vehicle claiming system. Inside a car is an "Owner" value, which is empty by default. But, when the "Owner" value is empty, and a player sits in the driver seat that I select, then the "Owner" value will be changed to that players Roblox ID."

"Create a system where when the player presses the E key, he creates a clone of his character, this clone will appear next to the player. Clones chase and kill players, except the owner of the action.Clones limit 3, duration of clones 15 seconds."

-- LocalScript in StarterPlayerScripts 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local cloneCount = 0
local cloneLimit = 3
local cloneDuration = 15

local function createClone()
    if cloneCount < cloneLimit then
        cloneCount = cloneCount   1
        local clone = character:Clone()
        clone.Parent = game.Workspace
        clone.HumanoidRootPart.CFrame = character.HumanoidRootPart.CFrame * CFrame.new(5, 0, 0)
        clone.Humanoid.DisplayName = "Clone"
        
        local aiScript = Instance.new("Script", clone)
        aiScript.Source = [[
local clone = script.Parent
local target = game.Workspace:FindFirstChild("]]..player.Name..[[")

while true do
    if target then
        local distance = (clone.HumanoidRootPart.Position - target.HumanoidRootPart.Position).Magnitude
        if distance > 5 then
            clone.Humanoid:MoveTo(target.HumanoidRootPart.Position)
        else
            clone.Humanoid:Attack()
        end
    end
    task.wait()
end
]]
        task.wait(cloneDuration)
        clone:Destroy()
        cloneCount = cloneCount - 1
    end
end

local function onKeyPress(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.E and not gameProcessed then
        createClone()
    end
end

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

"script a devil fruit from blox fruit"

-- ScripterAI can't provide the exact code for copyrighted content, but here's a general idea for a devil fruit system

-- Server script for creating a devil fruit
local function spawnDevilFruit()
    local fruit = Instance.new("Part")
    fruit.Name = "DevilFruit"
    fruit.Size = Vector3.new(2, 2, 2)
    fruit.Shape = Enum.PartType.Ball
    fruit.BrickColor = BrickColor.new("Bright red")
    fruit.Parent = game.Workspace

fruit.Position = Vector3.new(math.random(-100, 100), 10, math.random(-100, 100))
end

spawnDevilFruit()

-- Local script for player to consume the devil fruit
local function onTouched(hit)
    local player = game.Players:FindFirstChild(hit.Parent.Name)
    if player then
        local character = player.Character
        local humanoid = character:FindFirstChild("Humanoid")
        if humanoid then
            if not player:FindFirstChild("DevilFruitPower") then
                local power = Instance.new("StringValue")
                power.Name = "DevilFruitPower"
                power.Value = "Fire" -- Change this to the desired power
                power.Parent = player

script.Parent:Destroy() -- Remove the devil fruit
                -- Add any additional functionality for the power here
            end
        end
    end
end

script.Parent.Touched:Connect(onTouched)

"shift to sprint"

"if the players stage stat is 22, change the sky for the player only. change the sky only for the player if the player's stage stat is between 0 and 21, only for the player"

"create a gui that shows up every time a player levels up"

"make a party teleporter for inside a part that shows the timer using hints and shows the teleported players using a message"

```lua
-- server script inside the teleporter part 
local teleportPart = script.Parent
local destination = Vector3.new(0, 50, 0) -- example destination
local teleporting = false
local cooldown = 10 -- seconds
local playersTeleported = {}

local function teleportPlayer(player)
    if not teleporting and #playersTeleported < 5 then -- limit to 5 players for a party
        teleporting = true
        table.insert(playersTeleported, player.Name)
        player.Character:SetPrimaryPartCFrame(CFrame.new(destination))
        game.StarterGui:SetCore("SendNotification", {
            Title = "Teleporting!";
            Text = player.Name.." has been teleported!";
            Duration = 5;
        })
        wait(cooldown) -- cooldown before next teleport
        teleporting = false
    end
end

teleportPart.Touched:Connect(function(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player then
        teleportPlayer(player)
    end
end)

while true do
    if #playersTeleported > 0 then
        game.StarterGui:SetCore("SendNotification", {
            Title = "Party Teleport!";
            Text = "Teleported Players: "..table.concat(playersTeleported, ", ");
            Duration = 5;
        })
        playersTeleported = {} -- reset the list after showing the message
    end
    wait(5) -- check every 5 seconds
end
```

"lava rain"

"make a frame go left every 1 second"

"When the game detects a player without a tool named "Football", it will give them a different specific tool of my choice from server storage."

"I currently have a Leveling system in my game, the Levels are stored inside of the LocalPlayer in a folder called Stats. Please make a script that makes it so the levels save when the player leaves the game. The 4 levels are called 1) OverallLevel 2) StrengthLevel 3) SpeedLevel 4) EnduranceLevel"

-- server script (ServerScriptService) 
local DataStoreService = game:GetService("DataStoreService")
local myDataStore = DataStoreService:GetDataStore("PlayerStats")

game.Players.PlayerRemoving:Connect(function(player)
    local stats = player.Stats
    local dataToSave = {
        OverallLevel = stats.OverallLevel.Value,
        StrengthLevel = stats.StrengthLevel.Value,
        SpeedLevel = stats.SpeedLevel.Value,
        EnduranceLevel = stats.EnduranceLevel.Value
    }
    local success, error = pcall(function()
        myDataStore:SetAsync(tostring(player.UserId), dataToSave)
    end)
    if success then
        print("Data saved for player "..player.Name)
    else
        warn("Failed to save data for player "..player.Name)
        warn(error)
    end
end)

game.Players.PlayerAdded:Connect(function(player)
    local success, error = pcall(function()
        local savedData = myDataStore:GetAsync(tostring(player.UserId))
        if savedData then
            local stats = Instance.new("Folder")
            stats.Name = "Stats"
            stats.Parent = player
            for statName, statValue in pairs(savedData) do
                local stat = Instance.new("IntValue")
                stat.Name = statName
                stat.Value = statValue
                stat.Parent = stats
            end
        end
    end)
    if not success then
        warn("Failed to load data for player "..player.Name)
        warn(error)
    end
end)

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

-- local script (StarterGUI) 
local player = game.Players.LocalPlayer
local screenGui = Instance.new("ScreenGui", player.PlayerGui)
local timerLabel = Instance.new("TextLabel", screenGui)
local parts = {"Part1", "Part2", "Part3", "Part4", "Part5", "Part6", "Part7", "Part8", "Part9", "Part10", "Part11", "Part12"}
local spinner = workspace.Spinner
local countdownTime = 30
local tweenService = game:GetService("TweenService")

timerLabel.Text = tostring(countdownTime)
timerLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
timerLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
timerLabel.AnchorPoint = Vector2.new(0.5, 0)
timerLabel.Position = UDim2.new(0.5, 0, 0, 0)

local function teleportPlayers()
    local players = game.Players:GetPlayers()
    local availableParts = parts

for _, player in ipairs(players) do
        local randomIndex = math.random(#availableParts)
        local partName = availableParts[randomIndex]
        local part = workspace:FindFirstChild(partName)

if part then
            player.Character.HumanoidRootPart.CFrame = part.CFrame
            table.remove(availableParts, randomIndex)
        end
    end
end

local function startCountdown()
    timerLabel.Visible = true
    for i = countdownTime, 0, -1 do
        timerLabel.Text = tostring(i)
        wait(1)
    end
    timerLabel.Visible = false
    teleportPlayers()
end

local function onPlayerDied(player)
    local playersAlive = game.Players:GetPlayers()
    for i, p in ipairs(playersAlive) do
        if p == player or not p.Character or not p.Character:FindFirstChild("Humanoid") or p.Character.Humanoid.Health <= 0 then
            table.remove(playersAlive, i)
        end
    end

if #playersAlive == 1 then
        playersAlive[1].leaderstats.Money.Value = playersAlive[1].leaderstats.Money.Value + 100
    elseif #playersAlive == 0 then
        wait(3)
        startCountdown()
    end
end

local function spinSpinner(speed)
    local tweenInfo = TweenInfo.new(5, Enum.EasingStyle.Linear, Enum.EasingDirection.InOut, -1, true, 0)
    local spinnerTween = tweenService:Create(spinner, tweenInfo, {Rotation = spinner.Rotation + (360 * speed)})
    spinnerTween:Play()
end

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        character:WaitForChild("Humanoid").Died:Connect(function()
            onPlayerDied(player)
        end)
    end)
end)

startCountdown()
spinSpinner(0.1)

"now make it randomly choose one"

"make leaderstats and datastore for coins, save and load player coins. give players 5 coins every time they progress a stage. show a ui notifcation for a few seconds when a player gains coins. add detailed comments, instructions and description"

-- server script (ServerScriptService) 
local DataStoreService = game:GetService("DataStoreService")
local coinDataStore = DataStoreService:GetDataStore("CoinData")
local Players = game:GetService("Players")

-- Function to save player coins
local function saveCoins(player)
    local success, err = pcall(function()
        local coins = player.leaderstats.Coins.Value
        coinDataStore:SetAsync(player.UserId, coins)
    end)
    if not success then
        warn("Failed to save coins for player: " .. player.Name)
    end
end

-- Function to load player coins
local function loadCoins(player)
    local success, coins = pcall(function()
        return coinDataStore:GetAsync(player.UserId)
    end)
    if success then
        return coins
    else
        warn("Failed to load coins for player: " .. player.Name)
        return nil
    end
end

-- Function to setup leaderstats and load coins
local function onPlayerAdded(player)
    local leaderstats = Instance.new("Folder")
    leaderstats.Name = "leaderstats"
    leaderstats.Parent = player

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

local savedCoins = loadCoins(player)
    if savedCoins then
        coins.Value = savedCoins
    else
        coins.Value = 0
    end

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

-- Function to handle player stage progression
local function onStageProgressed(player)
    player.leaderstats.Coins.Value = player.leaderstats.Coins.Value + 5

-- UI notification script
    local notification = Instance.new("RemoteEvent")
    notification.Name = "CoinNotification"
    notification.Parent = player
    notification:FireClient(player, "You earned 5 coins!")
    wait(3)
    notification:Destroy()
end

-- Connect player added and stage progression events
Players.PlayerAdded:Connect(onPlayerAdded)
game.ReplicatedStorage.StageProgressed.OnServerEvent:Connect(onStageProgressed)

-- local script (StarterGui) 
local player = game.Players.LocalPlayer
local notificationEvent = player:WaitForChild("CoinNotification")

local function showNotification(text)
    local screenGui = Instance.new("ScreenGui")
    screenGui.Parent = player.PlayerGui

local notificationFrame = Instance.new("Frame")
    notificationFrame.Size = UDim2.new(0.3, 0, 0.1, 0)
    notificationFrame.Position = UDim2.new(0.5, 0, 0.9, 0)
    notificationFrame.AnchorPoint = Vector2.new(0.5, 0.5)
    notificationFrame.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
    notificationFrame.BorderSizePixel = 0
    notificationFrame.Parent = screenGui

local notificationText = Instance.new("TextLabel")
    notificationText.Size = UDim2.new(1, 0, 1, 0)
    notificationText.BackgroundTransparency = 1
    notificationText.Text = text
    notificationText.TextColor3 = Color3.fromRGB(255, 255, 255)
    notificationText.Font = Enum.Font.SourceSans
    notificationText.TextScaled = true
    notificationText.Parent = notificationFrame

wait(3)
    screenGui:Destroy()
end

notificationEvent.OnClientEvent:Connect(showNotification)

"make a command that can change the cash leaderstat and only make it work for the player named littlechewy45 if the player is not the player then show a message"

"Make a enemy pathfinding script and make it advanced so it can move around walls and give it animation"

"create a script inside starterplayerscripts that makes players dash and also plays an animation when a player presses Q. make sure that players cant spam the dash add a wait time before they can dash again>"

"create a script that blurs out a gui when its opened"

"Make a Model of a chair from scratch"

-- local script 
-- Create the base part
local chairPart = Instance.new("Part")
chairPart.Name = "ChairPart"
chairPart.Size = Vector3.new(2, 0.2, 2)
chairPart.Anchored = true
chairPart.CanCollide = false
chairPart.Parent = workspace

-- Create the back part
local chairBack = Instance.new("Part")
chairBack.Name = "ChairBack"
chairBack.Size = Vector3.new(2, 0.2, 0.2)
chairBack.Anchored = true
chairBack.CanCollide = false
chairBack.Parent = workspace

-- Create the legs
local chairLeg1 = Instance.new("Part")
chairLeg1.Name = "ChairLeg1"
chairLeg1.Size = Vector3.new(0.2, 0.2, 0.2)
chairLeg1.Anchored = true
chairLeg1.CanCollide = false
chairLeg1.Parent = workspace

local chairLeg2 = Instance.new("Part")
chairLeg2.Name = "ChairLeg2"
chairLeg2.Size = Vector3.new(0.2, 0.2, 0.2)
chairLeg2.Anchored = true
chairLeg2.CanCollide = false
chairLeg2.Parent = workspace

local chairLeg3 = Instance.new("Part")
chairLeg3.Name = "ChairLeg3"
chairLeg3.Size = Vector3.new(0.2, 0.2, 0.2)
chairLeg3.Anchored = true
chairLeg3.CanCollide = false
chairLeg3.Parent = workspace

local chairLeg4 = Instance.new("Part")
chairLeg4.Name = "ChairLeg4"
chairLeg4.Size = Vector3.new(0.2, 0.2, 0.2)
chairLeg4.Anchored = true
chairLeg4.CanCollide = false
chairLeg4.Parent = workspace

-- Position the parts
chairPart.CFrame = CFrame.new(0, 0, 0)
chairBack.CFrame = CFrame.new(0, 0.1, 1)
chairLeg1.CFrame = CFrame.new(-0.9, -0.1, -0.9)
chairLeg2.CFrame = CFrame.new(0.9, -0.1, -0.9)
chairLeg3.CFrame = CFrame.new(-0.9, -0.1, 0.9)
chairLeg4.CFrame = CFrame.new(0.9, -0.1, 0.9)

-- Create the welds
local weld1 = Instance.new("Weld")
weld1.Parent = chairPart
weld1.Part0 = chairPart
weld1.Part1 = chairBack
weld1.C0 = CFrame.new(0, 0.1, -1)

local weld2 = Instance.new("Weld")
weld2.Parent = chairPart
weld2.Part0 = chairPart
weld2.Part1 = chairLeg1
weld2.C0 = CFrame.new(-1, -0.1, -1)

local weld3 = Instance.new("Weld")
weld3.Parent = chairPart
weld3.Part0 = chairPart
weld3.Part1 = chairLeg2
weld3.C0 = CFrame.new(1, -0.1, -1)

local weld4 = Instance.new("Weld")
weld4.Parent = chairPart
weld4.Part0 = chairPart
weld4.Part1 = chairLeg3
weld4.C0 = CFrame.new(-1, -0.1, 1)

local weld5 = Instance.new("Weld")
weld5.Parent = chairPart
weld5.Part0 = chairPart
weld5.Part1 = chairLeg4
weld5.C0 = CFrame.new(1, -0.1, 1)

"it doesnt clone gui please help and fix"

Sure, I can help with that. Here's a corrected version of your script.

```lua
local function onPartTouched(hit)
	local player = game.Players:GetPlayerFromCharacter(hit.Parent)
	if player then
		local gui = script:FindFirstChild("M4")
		if gui then
			local clonedGui = gui:Clone()
			clonedGui.Parent = player:WaitForChild("PlayerGui")
			local function onPartTouchEnded()
				if clonedGui then
					clonedGui:Destroy()
				end
			end
			hit.TouchEnded:Connect(onPartTouchEnded)
		end
	end
end

script.Parent.Touched:Connect(onPartTouched)
```

In the original script, the problem was that the script was trying to access the PlayerGui directly from the player, which may not always be available immediately. The updated script uses the `WaitForChild` function to ensure the PlayerGui is available before trying to access it.

Also, the `script.Parent.Parent` was changed to `script.Parent` as it seems like the script is supposed to be a child of the part that is being touched. If the script is not a direct child of the part, you would need to adjust this to point to the correct part.

"Make a part that if a player hits the part it will make them sit for 3 seconds"

"make a simple grappeling script so you can grappel to parts when you press q and aim it at a part with instructions on where to insert the script"

To create a grappling hook script in Roblox, you can use the following server-side script. This script should be placed in a LocalScript within a Tool object that the player can equip. When the player presses the 'Q' key, it will cast a ray from the player's camera to where they are aiming, and if it hits a part, the player will be pulled towards it.

Here's an example of how you can implement this:

```lua
-- LocalScript inside a Tool object
local tool = script.Parent
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local camera = game.Workspace.CurrentCamera
local RS = game:GetService("RunService")
local UIS = game:GetService("UserInputService")

local grappleSpeed = 50 -- Change this value to adjust the grapple speed
local grappleKey = Enum.KeyCode.Q -- Change this if you want to use a different key for grappling

-- Function to grapple towards a point
local function grappleToPoint(point)
	local character = player.Character or player.CharacterAdded:Wait()
	local humanoidRootPart = character:WaitForChild("HumanoidRootPart")
	local distance = (humanoidRootPart.Position - point).magnitude
	local direction = (point - humanoidRootPart.Position).unit
	
	-- Create a BodyPosition to pull the player towards the target
	local bodyPosition = Instance.new("BodyPosition")
	bodyPosition.Position = point
	bodyPosition.MaxForce = Vector3.new(1, 1, 1) * 5000
	bodyPosition.P = 3000
	bodyPosition.D = 100
	bodyPosition.Parent = humanoidRootPart
	
	-- Move the player towards the target
	local startTime = tick()
	while (humanoidRootPart.Position - point).magnitude > 2 do
		local currentTime = tick()
		if (currentTime - startTime) * grappleSpeed > distance then
			break
		end
		RS.RenderStepped:Wait()
	end
	
	-- Cleanup
	bodyPosition:Destroy()
end

-- Function to handle key press
local function onKeyPress(input, gameProcessed)
	if gameProcessed then return end
	if input.KeyCode == grappleKey then
		local ray = camera:ScreenPointToRay(mouse.X, mouse.Y)
		local raycastParams = RaycastParams.new()
		raycastParams.FilterType = Enum.RaycastFilterType.Blacklist
		raycastParams.FilterDescendantsInstances = {player.Character}
		raycastParams.IgnoreWater = true
		local raycastResult = game.Workspace:Raycast(ray.Origin, ray.Direction * 1000, raycastParams)
		
		if raycastResult and raycastResult.Instance and not raycastResult.Instance:IsA("Terrain") then
			grappleToPoint(raycastResult.Position)
		end
	end
end

-- Connect the key press event
UIS.InputBegan:Connect(onKeyPress)

-- Ensure the tool is unequipped properly
tool.Unequipped:Connect(function()
	if UIS.InputBegan:Connect(onKeyPress) then
		UIS.InputBegan:Disconnect(onKeyPress)
	end
end)
```

Please note the following:
- This script assumes that the player's character has a `HumanoidRootPart`.
- The `grappleSpeed` variable controls how fast the player is pulled towards the target.
- The `grappleKey` variable sets which key will trigger the grappling hook. It's set to 'Q' by default.
- The script uses `BodyPosition` to pull the player towards the target. You can adjust the `P` and `D` properties to change the behavior of the grapple.
- The script uses a raycast to detect where the player is aiming. The raycast ignores the player's own character to avoid grappling to oneself.
- The script should be placed in a LocalScript within a Tool object that the player can equip. When the player equips the tool and presses the 'Q' key, they will grapple towards the part they are aiming at.

Remember to test and adjust the script as necessary to fit your game's mechanics and ensure a smooth grappling experience.

"make a script that makes my character stuck in place when i press x and unstuck when i press x again"

"script which locks you in first person view and only allows you to see your hands"

"Write me a script that generates random grass on a part"