Haddock - Roblox Library

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

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

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

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

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

-- Create Robux value
    local Robux = Instance.new("IntValue")
    Robux.Name = "Robux"
    Robux.Value = 0
    Robux.Parent = leaderstats

-- Event for player death
    player.CharacterAdded:Connect(function(character)
        character:WaitForChild("Humanoid").Died:Connect(function()
            Robux.Value = Robux.Value - 1
        end)
    end)
end

-- Event for player kill
local function onPlayerKill(playerWhoKilled, playerWhoDied)
    local killerStats = playerWhoKilled:FindFirstChild("leaderstats")
    if killerStats then
        local Robux = killerStats:FindFirstChild("Robux")
        if Robux then
            Robux.Value = Robux.Value + 1
        end
    end
end

-- Connect events
Players.PlayerAdded:Connect(onPlayerAdded)
game:GetService("Workspace").PlayerKilled.Event:Connect(onPlayerKill)

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

weapon.Activated:Connect(function()
    -- Get the target player
    local target = -- code to get the target player, depends on the weapon/tool system
    if target then
        -- Fire the event to the server
        game:GetService("Workspace").PlayerKilled:Fire(player, target)
    end
end)

-- server script (Workspace) 
local event = Instance.new("BindableEvent")
event.Name = "PlayerKilled"
event.Parent = game.Workspace

"Make me a Kill script that wait for the Player to Click on the Part before Killing them"

"create a sea with instance.new and when you say sea in chat make it so you can go through it too oh and every time you say sea again it rises."

"make a part spawner that doesn't stop until one of the players say "Stop" in the chat, make comments on what parent to put the code in"

"Create a camera system that changes the position of the camera based on a camera point system, where the camera will switch positions between areas that the player enters and also does not follow the player while moving"

"Please create a code for an image button that, when clicked, triggers a Clickremote in the "Remotes" folder under ReplicatedStorage. When triggered, the remote should give the player 2 currency to their stat. If the player owns a gamepass, they should receive 4 currency instead."

Certainly! Below is the setup for creating an ImageButton that, when clicked, triggers a ClickRemote in the "Remotes" folder under ReplicatedStorage. This setup includes a LocalScript for the ImageButton to check if the player owns a specific game pass and then fires a RemoteEvent with the result. On the server side, a Script connected to the RemoteEvent adjusts the player's currency based on whether they own the game pass or not.

**LocalScript for ImageButton** (to be placed under the ImageButton in the GUI):
```lua
local button = script.Parent
local remotesFolder = game.ReplicatedStorage:WaitForChild("Remotes")
local clickRemote = remotesFolder:WaitForChild("ClickRemote")
local player = game.Players.LocalPlayer
local gamePassID = 12345678 -- Replace this with your actual game pass ID

button.MouseButton1Click:Connect(function()
    local ownsGamePass = false
    local success, message = pcall(function()
        ownsGamePass = player:HasPass(gamePassID)
    end)
    if success then
        clickRemote:FireServer(ownsGamePass)
    else
        warn("Failed to check game pass: " .. message)
    end
end)
```

**Script for Server Side** (connected to the ClickRemote RemoteEvent, to be placed under the ClickRemote in the "Remotes" folder under ReplicatedStorage):
```lua
local remotesFolder = game.ReplicatedStorage:WaitForChild("Remotes")
local clickRemote = remotesFolder:WaitForChild("ClickRemote")
local Players = game:GetService("Players")

clickRemote.OnServerEvent:Connect(function(player, ownsGamePass)
    local amount = ownsGamePass and 4 or 2 -- Gives 4 currency if owns game pass, otherwise 2
    local leaderstats = player:FindFirstChild("leaderstats")
    local currency = leaderstats and leaderstats:FindFirstChild("Currency")
    if currency then
        currency.Value = currency.Value + amount
    end
end)
```

Make sure to replace `12345678` with your actual game pass ID. This script setup checks if the player owns a game pass when they click the ImageButton. If they do, they receive 4 units of currency; if not, they receive 2. Ensure the player has a "leaderstats" object with a "Currency" value set up for this to work correctly.

"make a roblox script where If Harlandroblox says !game1 then my Part in ReplicatedStorage called highhh will come out and then after my Part called highhh comes out of ReplicatedStorage there will be a timer for 5 seconds at the top of the screen then when the timer is finished then my Part called gam its transparency will change to 0 and if you step on it then you get kicked and it will say To slow and then my Part called gam will go back to normal after 10 seconds then my Part called highhh will go back into ReplicatedStorage and then when you step on my Part called gam it will no longer kick you make it all one code block"

local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local highhh = ReplicatedStorage:WaitForChild("highhh")
local gam = workspace:WaitForChild("gam")

local function onPlayerChatted(player, message)
	if player.Name == "Harlandroblox" and message == "!game1" then
		highhh.Parent = workspace
		local timerGui = Instance.new("ScreenGui", player.PlayerGui)
		local timerLabel = Instance.new("TextLabel", timerGui)
		timerLabel.Text = "5"
		timerLabel.Size = UDim2.new(0, 100, 0, 50)
		timerLabel.Position = UDim2.new(0.5, -50, 0, 10)
		timerLabel.BackgroundTransparency = 1
		timerLabel.TextScaled = true
		timerLabel.Font = Enum.Font.SourceSansBold
		timerLabel.TextColor3 = Color3.new(1, 1, 1)

for i = 5, 1, -1 do
			timerLabel.Text = tostring(i)
			wait(1)
		end

timerGui:Destroy()
		gam.Transparency = 0

local function onTouched(part)
			local player = Players:GetPlayerFromCharacter(part.Parent)
			if player then
				player:Kick("Too slow")
			end
		end

local connection = gam.Touched:Connect(onTouched)
		wait(10)
		connection:Disconnect()
		gam.Transparency = 1
		highhh.Parent = ReplicatedStorage
	end
end

local function onPlayerAdded(player)
	player.Chatted:Connect(function(message)
		onPlayerChatted(player, message)
	end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

"NPC that stalks and kills"

"explain this script in kid terms but make it short"

"make all players fling when a player clicks a ui button and buys a developer product"

"Make a roblox script where my Part called leee will show the top 20 players with the most of my leaderstat called Robux use my part called leee it updates each 2 second make the guis on my part called leee"

"Create a mile morales spec for my jojo game using a bizzare day engine , tell what keys are for what moves and make each sure each move does damage and etc"

Creating a custom spec for a game using A Bizarre Day engine can be complex and require a lot of scripting. Here's a basic example of how you could start scripting a "Mile Morales" spec. Please replace "YourAnimationIDHere" with your actual animation IDs.

This script will bind Q, E, R, T, F keys to different moves. Each move will play a different animation and deal different damage. This script should be placed in a LocalScript within StarterCharacterScripts.

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

-- Define your animations here
local animations = {
    ["Q"] = Instance.new("Animation"),
    ["E"] = Instance.new("Animation"),
    ["R"] = Instance.new("Animation"),
    ["T"] = Instance.new("Animation"),
    ["F"] = Instance.new("Animation"),
}

animations["Q"].AnimationId = "rbxassetid://YourAnimationIDHere"
animations["E"].AnimationId = "rbxassetid://YourAnimationIDHere"
animations["R"].AnimationId = "rbxassetid://YourAnimationIDHere"
animations["T"].AnimationId = "rbxassetid://YourAnimationIDHere"
animations["F"].AnimationId = "rbxassetid://YourAnimationIDHere"

-- Define your damage values here
local damage = {
    ["Q"] = 10,
    ["E"] = 15,
    ["R"] = 20,
    ["T"] = 25,
    ["F"] = 30,
}

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.Q or input.KeyCode == Enum.KeyCode.E or input.KeyCode == Enum.KeyCode.R or input.KeyCode == Enum.KeyCode.T or input.KeyCode == Enum.KeyCode.F then
        local key = tostring(input.KeyCode)
        local animation = animations[key]
        local damageValue = damage[key]

-- Play animation
        local animationTrack = humanoid:LoadAnimation(animation)
        animationTrack:Play()

-- Deal damage
        -- You need to implement your own damage dealing function here
        -- dealDamage(damageValue)
    end
end)
```

Please note that this script only handles the animation playing and key binding. You'll need to implement your own function to deal damage to other players. The damage dealing function will depend on how your game is structured, so it's hard to provide a generic function that will work for all games.

"Roblox script that spawns bombs in the sky at random"

"write me a Complexed Good Looking ServerSided Roblox MeepCity Custom Avatar Outfit Changer GUI Script with Debugging Characters already on it with minimize close and maximize macOS styles buttons."

-- server script

-- Create the GUI
local Gui = Instance.new("ScreenGui")
Gui.Name = "AvatarOutfitChanger"
Gui.Parent = game.CoreGui

-- Create the main frame
local MainFrame = Instance.new("Frame")
MainFrame.Name = "MainFrame"
MainFrame.Size = UDim2.new(0, 500, 0, 500)
MainFrame.Position = UDim2.new(0.5, -250, 0.5, -250)
MainFrame.BackgroundTransparency = 0.5
MainFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
MainFrame.BorderSizePixel = 0
MainFrame.Parent = Gui

-- Create the minimize button
local MinimizeButton = Instance.new("TextButton")
MinimizeButton.Name = "MinimizeButton"
MinimizeButton.Size = UDim2.new(0, 20, 0, 20)
MinimizeButton.Position = UDim2.new(1, -20, 0, 0)
MinimizeButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
MinimizeButton.BorderSizePixel = 0
MinimizeButton.Text = "-"
MinimizeButton.Parent = MainFrame

-- Create the close button
local CloseButton = Instance.new("TextButton")
CloseButton.Name = "CloseButton"
CloseButton.Size = UDim2.new(0, 20, 0, 20)
CloseButton.Position = UDim2.new(1, -40, 0, 0)
CloseButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
CloseButton.BorderSizePixel = 0
CloseButton.Text = "X"
CloseButton.Parent = MainFrame

-- Create the maximize button
local MaximizeButton = Instance.new("TextButton")
MaximizeButton.Name = "MaximizeButton"
MaximizeButton.Size = UDim2.new(0, 20, 0, 20)
MaximizeButton.Position = UDim2.new(1, -60, 0, 0)
MaximizeButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
MaximizeButton.BorderSizePixel = 0
MaximizeButton.Text = "+"
MaximizeButton.Parent = MainFrame

-- Create the scrolling frame
local ScrollingFrame = Instance.new("ScrollingFrame")
ScrollingFrame.Name = "ScrollingFrame"
ScrollingFrame.Size = UDim2.new(1, -10, 1, -30)
ScrollingFrame.Position = UDim2.new(0, 5, 0, 25)
ScrollingFrame.BackgroundTransparency = 1
ScrollingFrame.BorderSizePixel = 0
ScrollingFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
ScrollingFrame.Parent = MainFrame

-- Create the debugging character
local DebuggingCharacter = Instance.new("Model")
DebuggingCharacter.Name = "DebuggingCharacter"
DebuggingCharacter.Parent = game.Workspace

-- Create the character's head
local Head = Instance.new("Part")
Head.Name = "Head"
Head.Size = Vector3.new(1, 1, 1)
Head.Position = Vector3.new(0, 10, 0)
Head.BrickColor = BrickColor.new("Bright red")
Head.Parent = DebuggingCharacter

-- Create the character's torso
local Torso = Instance.new("Part")
Torso.Name = "Torso"
Torso.Size = Vector3.new(2, 2, 1)
Torso.Position = Vector3.new(0, 8, 0)
Torso.BrickColor = BrickColor.new("Bright blue")
Torso.Parent = DebuggingCharacter

-- Create the character's left arm
local LeftArm = Instance.new("Part")
LeftArm.Name = "LeftArm"
LeftArm.Size = Vector3.new(1, 3, 1)
LeftArm.Position = Vector3.new(-2, 7, 0)
LeftArm.BrickColor = BrickColor.new("Bright yellow")
LeftArm.Parent = DebuggingCharacter

-- Create the character's right arm
local RightArm = Instance.new("Part")
RightArm.Name = "RightArm"
RightArm.Size = Vector3.new(1, 3, 1)
RightArm.Position = Vector3.new(2, 7, 0)
RightArm.BrickColor = BrickColor.new("Bright yellow")
RightArm.Parent = DebuggingCharacter

-- Create the character's left leg
local LeftLeg = Instance.new("Part")
LeftLeg.Name = "LeftLeg"
LeftLeg.Size = Vector3.new(1, 4, 1)
LeftLeg.Position = Vector3.new(-1, 3, 0)
LeftLeg.BrickColor = BrickColor.new("Bright green")
LeftLeg.Parent = DebuggingCharacter

-- Create the character's right leg
local RightLeg = Instance.new("Part")
RightLeg.Name = "RightLeg"
RightLeg.Size = Vector3.new(1, 4, 1)
RightLeg.Position = Vector3.new(1, 3, 0)
RightLeg.BrickColor = BrickColor.new("Bright green")
RightLeg.Parent = DebuggingCharacter

-- Create the character's humanoid
local Humanoid = Instance.new("Humanoid")
Humanoid.Name = "Humanoid"
Humanoid.Parent = DebuggingCharacter

-- Create the character's clothing
local Clothing = Instance.new("Clothing")
Clothing.Name = "Clothing"
Clothing.Parent = DebuggingCharacter

-- Create the character's clothing item
local ClothingItem = Instance.new("ClothingItem")
ClothingItem.Name = "ClothingItem"
ClothingItem.Parent = Clothing

-- Create the character's clothing item asset
local ClothingItemAsset = Instance.new("Asset")
ClothingItemAsset.Name = "ClothingItemAsset"
ClothingItemAsset.Parent = ClothingItem

-- Create the character's clothing item asset id
local ClothingItemAssetId = Instance.new("StringValue")
ClothingItemAssetId.Name = "ClothingItemAssetId"
ClothingItemAssetId.Value = "rbxassetid://YourClothingItemAssetIdHere"
ClothingItemAssetId.Parent = ClothingItemAsset

-- Create the character's clothing item asset type
local ClothingItemAssetType = Instance.new("StringValue")
ClothingItemAssetType.Name = "ClothingItemAssetType"
ClothingItemAssetType.Value = "Clothing"
ClothingItemAssetType.Parent = ClothingItemAsset

-- Create the character's clothing item asset name
local ClothingItemAssetName = Instance.new("StringValue")
ClothingItemAssetName.Name = "ClothingItemAssetName"
ClothingItemAssetName.Value = "YourClothingItemNameHere"
ClothingItemAssetName.Parent = ClothingItemAsset

-- Create the character's clothing item asset description
local ClothingItemAssetDescription = Instance.new("StringValue")
ClothingItemAssetDescription.Name = "ClothingItemAssetDescription"
ClothingItemAssetDescription.Value = "YourClothingItemDescriptionHere"
ClothingItemAssetDescription.Parent = ClothingItemAsset

-- Create the character's clothing item asset image
local ClothingItemAssetImage = Instance.new("StringValue")
ClothingItemAssetImage.Name = "ClothingItemAssetImage"
ClothingItemAssetImage.Value = "rbxassetid://YourClothingItemImageHere"
ClothingItemAssetImage.Parent = ClothingItemAsset

-- Create the character's clothing item asset price
local ClothingItemAssetPrice = Instance.new("Number

"............"

-- modify the function to include the random entity spawning, blacklist entities, and check condition for certain entities 
return function(Vargs)
	local server, service = Vargs.Server, Vargs.Service

server.Commands.rldspawn = {
		Prefix = server.Settings.Prefix;	-- Prefix to use for command
		Commands = {"rldspawn"};	-- Commands
		Args = {"entity"};	-- Command arguments
		Description = "Spawns an entity in Rooms Low Detailed (Works only in that game)";	-- Command Description
		Hidden = false; -- Is it hidden from the command list?
		Fun = true;	-- Is it fun?
		AdminLevel = "Big T";	    -- Admin level; If using settings.CustomRanks set this to the custom rank name (eg. "Baristas")
		Function = function(plr,args)    -- Function to run for command
			local entity = (args[1])

local blacklist = {"Noonie", "OOk_NEWERMODEL"}
			local checkEntities = {"CG-55Old","CGTA-55", "CG-55oldParticles","CG-55", "G-55Oldfx", "B-85",  "OLDB-55"}

if entity == "random" then
				local entities = game:GetService("ServerStorage").Monsters:GetChildren()
				entity = entities[math.random(#entities)].Name
			end

if table.find(blacklist, entity) then
				return
			end

for _, v in pairs(workspace.SpawnedEnitites:GetChildren()) do
				if table.find(checkEntities, v.Name) then
					return
				end
			end

for i,v in pairs(game:GetService("ServerStorage").Monsters:GetDescendants()) do
				if v.Name == entity and v:IsA("Model") then
					local c = v:Clone()
					c.Parent = workspace.SpawnedEnitites
				end
			end

end
	}
end

"make a script that in every mili second a small block will spawn in the front in the front of your character"

"make a admin gui that works"

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

local adminGui = Instance.new("Frame", screenGui)
adminGui.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
adminGui.Size = UDim2.new(0.25, 0, 0.25, 0)
adminGui.Position = UDim2.new(0.375, 0, 0.375, 0)

local titleLabel = Instance.new("TextLabel", adminGui)
titleLabel.Text = "Admin GUI"
titleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
titleLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
titleLabel.Size = UDim2.new(1, 0, 0.2, 0)

local commandBox = Instance.new("TextBox", adminGui)
commandBox.PlaceholderText = "Enter command here"
commandBox.TextColor3 = Color3.fromRGB(255, 255, 255)
commandBox.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
commandBox.Size = UDim2.new(0.8, 0, 0.2, 0)
commandBox.Position = UDim2.new(0.1, 0, 0.3, 0)

local submitButton = Instance.new("TextButton", adminGui)
submitButton.Text = "Submit"
submitButton.TextColor3 = Color3.fromRGB(255, 255, 255)
submitButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
submitButton.Size = UDim2.new(0.8, 0, 0.2, 0)
submitButton.Position = UDim2.new(0.1, 0, 0.6, 0)

-- Note: This is a basic admin GUI layout. You will need to add your own admin command handling system to make it functional.

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

"Kamehameha that deals damage and comes out from where the character is facing add a keybind"

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

local kamehameha = Instance.new("Part")
kamehameha.Name = "Kamehameha"
kamehameha.Parent = character
kamehameha.Anchored = true
kamehameha.CanCollide = false

local kamehamehaMesh = Instance.new("SpecialMesh")
kamehamehaMesh.MeshType = "Sphere"
kamehamehaMesh.Parent = kamehameha

local kamehamehaLight = Instance.new("PointLight")
kamehamehaLight.Parent = kamehameha
kamehamehaLight.Range = 10

local kamehamehaSound = Instance.new("Sound")
kamehamehaSound.SoundId = "rbxassetid://YourSoundIdHere"
kamehamehaSound.Parent = kamehameha

local kamehamehaSpeed = 100

local kamehamehaDamage = 10

local function fireKamehameha()
	local characterCF = character.PrimaryPart.CFrame
	local lookVector = characterCF.lookVector
	
	kamehameha.CFrame = characterCF * CFrame.new(0,2,0)
	kamehamehaSound:Play()
	
	for i = 1, 10 do
		kamehameha.CFrame = kamehameha.CFrame   lookVector * kamehamehaSpeed
		wait()
	end
	
	for _, part in pairs(workspace:GetDescendants()) do
		if part:IsA("BasePart") and part.Name ~= "Kamehameha" and part.Name ~= "HumanoidRootPart" then
			local distance = (kamehameha.Position - part.Position).magnitude
			if distance < 5 then
				local humanoid = part.Parent:FindFirstChildWhichIsA("Humanoid")
				if humanoid then
					humanoid.Health = humanoid.Health - kamehamehaDamage
				end
			end
		end
	end
	
	kamehameha:Destroy()
end

player.KeyDown:Connect(function(key)
	if key == "e" then
		fireKamehameha()
	end
end)

"e key for passing the ball Starter Gui"

"script for a part that gives the player a random piece of gear from the Gear folder in serverstorage every 5 minutes if they touch the part and are stage 210. the part displays a 5 minute countdown. all players have an individual countdown."

"can you give it like an animation to like opening and closing"

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

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

local function getClosestPlayer(character)
	local closestPlayer = nil
	local closestDistance = math.huge

for _, player in ipairs(Players:GetPlayers()) do
		if player.Character and player.Character ~= character then
			local distance = (character.HumanoidRootPart.Position - player.Character.HumanoidRootPart.Position).magnitude
			if distance < closestDistance then
				closestPlayer = player
				closestDistance = distance
			end
		end
	end

return closestPlayer
end

local function moveToClosestPlayer(character)
	local path = PathfindingService:CreatePath()
	local closestPlayer = getClosestPlayer(character)

while true do
		closestPlayer = getClosestPlayer(character)
		if closestPlayer then
			path:ComputeAsync(character.HumanoidRootPart.Position, closestPlayer.Character.HumanoidRootPart.Position)
			local waypoints = path:GetWaypoints()

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

local distance = (character.HumanoidRootPart.Position - closestPlayer.Character.HumanoidRootPart.Position).magnitude
				if distance <= 10 then -- Change this value to the desired distance to start clicking
					-- Add code to simulate left-click
				elseif distance > 20 then -- Change this value to the desired distance to stop clicking
					-- Add code to stop left-click
					break
				end
			end
		end

RunService.Heartbeat:Wait()
	end
end

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

"make a script to when i equip the sword the sword appreas again bro no thats not what i mean i meant it appears again if i touch the sword but the sword is also in my inventory but the sword is a infinite sword"

"Make a script that saves a players data when they leave and loads it back in when they join the game while creating a folder named player data where it will save all of the players data with instructions"

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

function SavePlayerData(player)
    local success, err = pcall(function()
        local data = {
            Coins = player.leaderstats.Coins.Value,
            Bag = player.leaderstats.Bag.Value
        }
        PlayerData:SetAsync(player.UserId, data)
    end)
    if not success then
        warn("Error saving data for player " .. player.Name .. ": " .. err)
    end
end

function LoadPlayerData(player)
    local success, err = pcall(function()
        local data = PlayerData:GetAsync(player.UserId)
        if data then
            player.leaderstats.Coins.Value = data.Coins
            player.leaderstats.Bag.Value = data.Bag
        end
    end)
    if not success then
        warn("Error loading data for player " .. player.Name .. ": " .. err)
    end
end

function OnPlayerAdded(player)
    player.CharacterAdded:Connect(function(character)
        LoadPlayerData(player)
    end)
    player:Connect(function()
        SavePlayerData(player)
    end)
end

Players.PlayerAdded:Connect(OnPlayerAdded)

"make a part"

"Make a leaderboard that saves the amount of wins when you step part"

-- server script for leaderboard (ServerScriptService) 
local DataStoreService = game:GetService("DataStoreService")
local WinsDataStore = DataStoreService:GetDataStore("WinsData")

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

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

local data
    local success, err = pcall(function()
        data = WinsDataStore:GetAsync(player.UserId)
    end)

if success and data then
        wins.Value = data
    else
        wins.Value = 0
    end
end)

game.Players.PlayerRemoving:Connect(function(player)
    local wins = player.leaderstats.Wins.Value

local success, err = pcall(function()
        WinsDataStore:SetAsync(player.UserId, wins)
    end)

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

-- server script for part (Workspace) 
local part = script.Parent

local function onTouched(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player then
        player.leaderstats.Wins.Value = player.leaderstats.Wins.Value + 1
    end
end

part.Touched:Connect(onTouched)

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

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

First, create a ScreenGui in the StarterGui and add a TextButton and a TextBox inside it. Name the TextButton "PlayButton" and the TextBox "InputBox". Then, add a LocalScript inside the ScreenGui with the following code:

```lua
local player = game.Players.LocalPlayer
local gui = player.PlayerGui:WaitForChild("ScreenGui")
local playButton = gui:WaitForChild("PlayButton")
local inputBox = gui:WaitForChild("InputBox")

local sound = Instance.new("Sound")
sound.Parent = workspace

playButton.MouseButton1Click:Connect(function()
    local musicId = tonumber(inputBox.Text)
    if musicId then
        sound.SoundId = "rbxassetid://" .. musicId
        sound:Play()
    end
end)
```

This script will play the music with the given ID when the button is clicked. To add a hide button, create another TextButton inside the ScreenGui, name it "HideButton", and add the following code to the same LocalScript:

```lua
local hideButton = gui:WaitForChild("HideButton")
local guiHidden = false

hideButton.MouseButton1Click:Connect(function()
    if guiHidden then
        guiHidden = false
        playButton.Visible = true
        inputBox.Visible = true
        hideButton.Text = "Hide"
    else
        guiHidden = true
        playButton.Visible = false
        inputBox.Visible = false
        hideButton.Text = "Show"
    end
end)
```

This code will toggle the visibility of the PlayButton and InputBox when the HideButton is clicked.

"Spawn proximity prompt in the selected part, if player activates proximity prompt spawn a seat and force player to sit, when player clicks w slide part forward, when player clicks s slide part backwards, if player clicks e force player to exit seat"

-- script for proximity prompt 
local part = script.Parent
local proximityPrompt = Instance.new("ProximityPrompt")
proximityPrompt.Parent = part
proximityPrompt.ActionText = "Sit"

local function onPromptActivated(player)
    local seat = Instance.new("Seat")
    seat.Position = part.Position + Vector3.new(0, 1, 0)
    seat.Parent = game.Workspace
    player.Character.Humanoid.Sit = true
    player.Character.HumanoidRootPart.CFrame = seat.CFrame
    seat:GetPropertyChangedSignal("Occupant"):Connect(function()
        if seat.Occupant == nil then
            seat:Destroy()
        end
    end)
end

proximityPrompt.Triggered:Connect(onPromptActivated)

-- local script for seat control 
local UserInputService = game:GetService("UserInputService")
local player = game.Players.LocalPlayer
local seat = nil

local function onInputBegan(input, gameProcessed)
    if seat and not gameProcessed then
        if input.KeyCode == Enum.KeyCode.W then
            seat.Parent.Position = seat.Parent.Position + seat.Parent.CFrame.LookVector
        elseif input.KeyCode == Enum.KeyCode.S then
            seat.Parent.Position = seat.Parent.Position - seat.Parent.CFrame.LookVector
        elseif input.KeyCode == Enum.KeyCode.E then
            player.Character.Humanoid.Sit = false
        end
    end
end

UserInputService.InputBegan:Connect(onInputBegan)

local function onCharacterAdded(character)
    character:WaitForChild("Humanoid").SeatPart:GetPropertyChangedSignal("Parent"):Connect(function()
        seat = character.Humanoid.SeatPart
    end)
end

player.CharacterAdded:Connect(onCharacterAdded)
onCharacterAdded(player.Character or player.CharacterAdded:Wait())

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

"Invisible wall"

"make a roblox script whenever i hold down right click my mouse locks on to the most close player and it will follow them with the mouse so it aims at them"

-- local script 
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local player = Players.LocalPlayer
local camera = workspace.CurrentCamera

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

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

return closestPlayer
end

local function onMouseDown()
    local closestPlayer = getClosestPlayer()
    if closestPlayer then
        camera.CameraSubject = closestPlayer.Character.Humanoid
    end
end

local function onMouseUp()
    camera.CameraSubject = player.Character.Humanoid
end

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

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

"Script a billboard gui to be displayed over the players head and showing what level they are at"

"make a random april fools script"

"make a tool gui"

"Write a system for a Euphoria movement system"

Yes, you can fix this by setting a maximum speed value and ensuring the newSpeed value does not exceed this limit. Here's the updated FluidMovement function with a maxSpeed value:

```lua
function EuphoriaModule:FluidMovement(character, deltaTime)
    if not deltaTime then
        return
    end

local humanoid = character.Humanoid
    local rootPart = character.HumanoidRootPart
    local targetSpeed = humanoid.WalkSpeed
    local currentSpeed = rootPart.Velocity.Magnitude
    local maxSpeed = 50 -- Set the maximum speed value

if humanoid:GetState() == Enum.HumanoidStateType.Running then
        targetSpeed = targetSpeed * 1.5
    end

local newSpeed = lerp(currentSpeed, targetSpeed, deltaTime * 5)
    newSpeed = math.clamp(newSpeed, 0, maxSpeed) -- Clamp the newSpeed value within a specific range
    humanoid.WalkSpeed = newSpeed

local moveDirection = humanoid.MoveDirection
    if moveDirection.Magnitude > 0 then
        moveDirection = moveDirection.Unit -- Normalize the moveDirection vector
        local targetCFrame = CFrame.new(rootPart.Position, rootPart.Position   moveDirection)
        rootPart.CFrame = rootPart.CFrame:Lerp(targetCFrame, deltaTime * 5)
    end
end
```

In this example, the maxSpeed value is set to 50. You can adjust this value to control the maximum speed the player can reach. The newSpeed value is clamped between 0 and maxSpeed, ensuring the player's speed does not exceed the limit.

"make me a keycard system for a hotel, provide me with instructions"

To create a keycard system for a hotel, you will need to follow these steps:

1. Create the keycard model.
2. Create a script for the keycard that assigns it to a specific room and player.
3. Create a script for the hotel room door that checks if the player has the correct keycard.
4. Create a system for distributing keycards to players.

Here's a basic implementation of each step:

Step 1: Create the keycard model
- In Roblox Studio, create a new part and name it "Keycard".
- Customize the appearance of the keycard as desired (color, size, etc.).

Step 2: Create a script for the keycard
- Insert a new script inside the keycard model and add the following code:

```lua
local keycard = script.Parent
keycard.RoomNumber = 1 -- Change this to the room number you want this keycard to unlock
```

Step 3: Create a script for the hotel room door
- Insert a new script inside the hotel room door model and add the following code:

```lua
local door = script.Parent
door.RoomNumber = 1 -- Change this to the room number this door belongs to
local unlocked = false

local function checkKeycard(player)
    for _, item in pairs(player.Backpack:GetChildren()) do
        if item.Name == "Keycard" and item.RoomNumber.Value == door.RoomNumber then
            unlocked = true
            break
        end
    end
    if unlocked then
        -- Open the door (e.g., change transparency, canCollide, etc.)
        door.Transparency = 0.5
        door.CanCollide = false
        wait(3) -- Wait for 3 seconds before closing the door
        door.Transparency = 0
        door.CanCollide = true
        unlocked = false
    end
end

door.Touched:Connect(checkKeycard)
```

Step 4: Create a system for distributing keycards to players
- This can be done in various ways, such as giving the keycard to the player when they spawn or having an NPC give the keycard to the player when they interact with it. Here's an example of giving the keycard to the player when they spawn:

```lua
local function giveKeycard(player)
    local keycard = game.ServerStorage.Keycard:Clone()
    keycard.RoomNumber.Value = 1 -- Change this to the room number you want to assign to the player
    keycard.Parent = player.Backpack
end

game.Players.PlayerAdded:Connect(giveKeycard)
```

Remember to place the keycard model inside the ServerStorage and customize the room numbers as needed.

"make a advanced roblox anti cheat for a anti speed"

"Make me a reset butten if the player clicks the reset button all the data of the player (checkpoints, last spawnlocation, stage) will reset. After that the player dies and respawns. Show how and where to insert it."

"create a script that will spawn in a certain NPC located inside a folder called MOBS in replicatedstorage after 10 second and near a part and will notify players using chat and not kick players and not use the word broadcast."

"make something were if you say /execute in chat. Put lua script after in chat. It runs the script you put after. Fix loadstring is not available."

"Make a menu with three buttons"

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

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

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

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

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

"Make it when someone walks into the part they fall over and get knocked back a little bit"

"button that makes otherparts change color"

"make a roblox script where if Harlandroblox says !game4 then my model in ReplicatedStorage will come out and one of my Parts in the model called spi will spin at a speed of 5 and it you touch my Part called spi it will kick you from the game and it will say Dam! then after 30 seconds it will go back to normal"

local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local model = ReplicatedStorage:WaitForChild("YourModelName")
local spi = model:WaitForChild("spi")
local normalSpeed = spi:GetAttribute("Speed")
local spinSpeed = 5

local function onPlayerChatted(player, message)
    if player.Name == "Harlandroblox" and message == "!game4" then
        local clonedModel = model:Clone()
        clonedModel.Parent = workspace
        spi:SetAttribute("Speed", spinSpeed)
        
        local function onTouch(hit)
            local otherPlayer = Players:GetPlayerFromCharacter(hit.Parent)
            if otherPlayer then
                otherPlayer:Kick("Dam!")
            end
        end
        spi.Touched:Connect(onTouch)
        
        wait(30)
        clonedModel:Destroy()
        spi:SetAttribute("Speed", normalSpeed)
    end
end

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

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

"Write me a function that can completely disable camera rotation using the mouse, and disable the mouse when not in the main menu."

"above players heads it will say Words and it will say 10 and if they say words in chat they loose words if they get 0 words they get kicked from the game"

-- server script (ServerScriptService) 
local function onPlayerAdded(player)
    local words = 10
    local billboardGui = Instance.new("BillboardGui")
    local textLabel = Instance.new("TextLabel", billboardGui)

billboardGui.Name = "WordsGui"
    billboardGui.Size = UDim2.new(0, 100, 0, 50)
    billboardGui.Adornee = player.Character.Head
    billboardGui.Parent = player.Character

textLabel.Name = "WordsLabel"
    textLabel.Text = "Words: " .. words
    textLabel.Size = UDim2.new(1, 0, 1, 0)
    textLabel.BackgroundTransparency = 1
    textLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
    textLabel.Font = Enum.Font.SourceSansBold
    textLabel.TextScaled = true

local function onPlayerChatted(message)
        if string.lower(message) == "words" then
            words = words - 1
            textLabel.Text = "Words: " .. words

if words == 0 then
                player:Kick("You have run out of words.")
            end
        end
    end

player.Chatted:Connect(onPlayerChatted)
end

game.Players.PlayerAdded:Connect(onPlayerAdded)

"Create a camera system which adds Arma 3 camera movement and zoom to ROBLOX."

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

local isArma3Camera = false
local zoomLevel = 1

local function toggleArma3Camera()
    isArma3Camera = not isArma3Camera
    if isArma3Camera then
        camera.CameraType = Enum.CameraType.Scriptable
        camera.FieldOfView = 70
    else
        camera.CameraType = Enum.CameraType.Custom
        camera.FieldOfView = 70
    end
end

local function updateArma3Camera()
    if isArma3Camera then
        local mouseDelta = mouse.delta
        local rotationX = mouseDelta.x / 100
        local rotationY = mouseDelta.y / 100
        
        camera.CFrame = camera.CFrame * CFrame.Angles(0, rotationX, 0)
        camera.CFrame = camera.CFrame * CFrame.Angles(rotationY, 0, 0)
    end
end

local function zoomIn()
    if zoomLevel < 3 then
        zoomLevel = zoomLevel + 1
        camera.FieldOfView = camera.FieldOfView - 10
    end
end

local function zoomOut()
    if zoomLevel > 1 then
        zoomLevel = zoomLevel - 1
        camera.FieldOfView = camera.FieldOfView + 10
    end
end

mouse.Button2Down:Connect(toggleArma3Camera)
mouse.WheelForward:Connect(zoomIn)
mouse.WheelBackward:Connect(zoomOut)
game:GetService("RunService").RenderStepped:Connect(updateArma3Camera)

"it doesnt start the countdown at 10 help"

"make a loading screen where it says thanks for plying and then after 5 seconds it will say can you use all the lucky blocks and under the text there is a timer counting down 20 seconds make it so i can out this script into a script into StarterGui"

"Trigger the camera lock on the touch of a part"

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

"create a admin roblox lua panel"

"Make a roblox script in LUA language that when I click and hold the E key, I will build momentum and speed before throwing a part like a football. Please add gravity and add speed and momentum settings. The script will be placed in a tool, which the"

-- local script inside a tool 
local tool = script.Parent
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local holdingE = false
local gravity = -workspace.Gravity.Y
local momentum = 0
local maxSpeed = 100
local momentumGain = 5

local function throwPart()
    local part = Instance.new("Part")
    part.Size = Vector3.new(2, 2, 2)
    part.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 2, 0)
    part.Parent = workspace
    part.BrickColor = BrickColor.new("Bright red")
    part.Anchored = false
    part.CanCollide = true

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

local bodyGyro = Instance.new("BodyGyro")
    bodyGyro.Parent = part
    bodyGyro.MaxTorque = Vector3.new(math.huge, math.huge, math.huge)
    bodyGyro.CFrame = part.CFrame

local bodyForce = Instance.new("BodyForce")
    bodyForce.Parent = part
    bodyForce.Force = Vector3.new(0, gravity * part:GetMass(), 0)
end

local function keyDown(key)
    if key == "e" then
        holdingE = true
        while holdingE do
            if momentum < maxSpeed then
                momentum = momentum + momentumGain
            end
            wait(0.1)
        end
    end
end

local function keyUp(key)
    if key == "e" then
        holdingE = false
        throwPart()
        momentum = 0
    end
end

mouse.KeyDown:Connect(keyDown)
mouse.KeyUp:Connect(keyUp)

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

"make me a auto lock to player"

"Make a event system like survive the disasaters but it modifies parts and adds effects to them also use messages and hints"

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

local eventSystem = Instance.new("BindableEvent", screenGui)

local events = {"Disaster1", "Disaster2", "Disaster3"} -- Add more events as needed

local function startEvent(eventName)
    local eventPart = Instance.new("Part", workspace) -- Create a new part for the event
    eventPart.Name = eventName
    eventPart.BrickColor = BrickColor.Random() -- Change the color of the part randomly

local effect = Instance.new("Fire", eventPart) -- Add a fire effect to the part
    effect.Heat = math.random(10, 50) -- Randomize the heat of the fire effect

game:GetService("Chat"):Chat(player, "Event " .. eventName .. " has started!") -- Send a chat message to the player
    game:GetService("HintService"):Hint("Survive the " .. eventName .. "!") -- Send a hint to the player
end

eventSystem.Event:Connect(startEvent) -- Connect the startEvent function to the event system

while true do
    wait(5) -- Wait for 5 seconds
    local randomEvent = events[math.random(#events)] -- Select a random event
    eventSystem:Fire(randomEvent) -- Start the random event
end

"npc that follows you"

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

while true do
    local closestPlayer = nil
    local closestDistance = math.huge

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

if closestPlayer and closestDistance <= followRadius then
        local path = PathfindingService:CreatePath()
        path:ComputeAsync(npc.HumanoidRootPart.Position, closestPlayer.Character.HumanoidRootPart.Position)

for _, waypoint in ipairs(path:GetWaypoints()) do
            npc.Humanoid:MoveTo(waypoint.Position)
            npc.Humanoid.MoveToFinished:Wait()
        end
    else
        npc.Humanoid:MoveTo(npc.HumanoidRootPart.Position)
    end

wait(1)
end

"Make me a script that clicks the gui button and every time it clicks it it will give the player 1 coin and if the players leaderstats rebirth value = 1 or higher multiply it by 2 depending on the amount of rebriths they have"

"Make a roblox script for a leaderestats calle Robux when a player kills somone the gets 1 leaderstat if the die they get -1 leader stat"

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

local function onCharacterAdded(character)
    local humanoid = character:WaitForChild("Humanoid")
    
    humanoid.Died:Connect(function()
        local player = Players:GetPlayerFromCharacter(character)
        if player and player.leaderstats and player.leaderstats.Robux then
            player.leaderstats.Robux.Value = player.leaderstats.Robux.Value - 1
        end
    end)
    
    humanoid.Touched:Connect(function(hit)
        local otherPlayer = Players:GetPlayerFromCharacter(hit.Parent)
        if otherPlayer and otherPlayer ~= player and otherPlayer.leaderstats and otherPlayer.leaderstats.Robux then
            otherPlayer.leaderstats.Robux.Value = otherPlayer.leaderstats.Robux.Value + 1
        end
    end)
end

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

local robux = Instance.new("IntValue")
    robux.Name = "Robux"
    robux.Value = 0
    robux.Parent = leaderstats

if player.Character then
        onCharacterAdded(player.Character)
    end
    player.CharacterAdded:Connect(onCharacterAdded)
end

Players.PlayerAdded:Connect(onPlayerAdded)

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

-- server script

local DanceButton = script.Parent.DanceButton

-- function to open product prompt
local function openPrompt()
	-- open product prompt
	game:GetService("MarketplaceService"):PromptProductPurchase(game.Players.LocalPlayer, script.Parent.DanceProductId)
end

-- connect the button to the prompt
DanceButton.MouseButton1Click:Connect(openPrompt)

-- function to play the dance animation
local function playDanceAnimation()
	for _, player in pairs(game.Players:GetPlayers()) do
		-- play the dance animation
		player.Character.Humanoid:LoadAnimation(script.Parent.DanceAnimationId):Play()
	end
end

-- function to handle the product purchase
local function handleProductPurchase(player, productId, isPurchased)
	-- if the product was purchased
	if isPurchased then
		-- play the dance animation
		playDanceAnimation()
		
		-- wait 10 seconds
		wait(10)
		
		-- stop the dance animation
		for _, player in pairs(game.Players:GetPlayers()) do
			player.Character.Humanoid:LoadAnimation(script.Parent.DanceAnimationId):Stop()
		end
	end
end

-- connect the function to the product purchase event
game.MarketplaceService.PromptProductPurchaseRequest:Connect(handleProductPurchase)

"make a script that spawns random blocks"

"code a chatbot GUI in roblox that I can ask questions about roblox studio to, its not working"

-- This example is a simple chatbot GUI that responds to specific questions about Roblox Studio.

-- 1. Create a ScreenGui inside StarterGui
-- 2. Inside the ScreenGui, create a TextBox named "UserInput" and a TextLabel named "ChatOutput"
-- 3. Create a TextButton inside the ScreenGui and insert the following LocalScript inside the TextButton

-- LocalScript inside the TextButton
local textButton = script.Parent
local userInput = textButton.Parent.UserInput
local chatOutput = textButton.Parent.ChatOutput

local function onButtonClicked()
    local question = userInput.Text:lower()

if question == "how do i create a part?" then
        chatOutput.Text = "To create a part in Roblox Studio, click on the 'Part' button in the 'Home' tab."
    elseif question == "how do i change the color of a part?" then
        chatOutput.Text = "To change the color of a part, select the part and go to the 'Properties' window. Find the 'Color' property and click on the color box to change the color."
    elseif question == "how do i group objects?" then
        chatOutput.Text = "To group objects, select multiple objects in the Workspace, right-click on one of them, and choose 'Group'. You can also press Ctrl G."
    else
        chatOutput.Text = "Sorry, I don't have an answer for that question."
    end
end

textButton.MouseButton1Click:Connect(onButtonClicked)

"create a script that makes the player roll forward when the player press Q and plays a rolling animation. and tell me where to put the script."

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

local rollAnimation = Instance.new("Animation")
rollAnimation.AnimationId = "rbxassetid://your_animation_id_here" -- Replace with your rolling animation asset ID
local rollAnimTrack = humanoid:LoadAnimation(rollAnimation)

local function onInputBegan(inputObject, gameProcessedEvent)
    if inputObject.KeyCode == Enum.KeyCode.Q and not gameProcessedEvent then
        rollAnimTrack:Play()
        local rollDirection = character.HumanoidRootPart.CFrame.LookVector
        character.HumanoidRootPart.CFrame = character.HumanoidRootPart.CFrame * CFrame.new(rollDirection * 10)
    end
end

UserInputService.InputBegan:Connect(onInputBegan)

Note: Replace "your_animation_id_here" with the actual asset ID of the rolling animation you want to use. Place this script in the StarterPlayerScripts folder in Roblox Studio.

"make a script that force spawns anyone to the script.parent when they join. once each player"

"the npc is running sideways"

-- server script 
local pfs = game:GetService("PathfindingService")
local npc = script.Parent 
local door = game.Workspace.Door -- define the door
local ramp1 = game.Workspace.Ramp1 -- define the first ramp
local ramp2 = game.Workspace.Ramp2 -- define the second ramp
local runService = game:GetService("RunService")

-- Function to move to a target
local function moveToTarget(target)
    local path = pfs:CreatePath()
    path:ComputeAsync(npc.HumanoidRootPart.Position, target.Position)
    for _, waypoint in pairs(path:GetWaypoints()) do
        if waypoint.Action == Enum.PathWaypointAction.Jump then
            npc.Humanoid.Jump = true
        end
        npc.Humanoid:MoveTo(waypoint.Position)
        npc.Humanoid.MoveToFinished:Wait()
    end
end

-- Start the NPC's behavior
runService.Stepped:Connect(function()
    npc.Humanoid.WalkSpeed = 16 -- increase the NPC's speed
    npc.Humanoid.AutoRotate = false -- disable auto rotation
    moveToTarget(ramp1) -- move to the first ramp
    moveToTarget(ramp2) -- move to the second ramp
    moveToTarget(door) -- finally move to the door
end)

"find the problem in this, if you do give me a fix"

"create a script that makes the player roll forward when the player press Q and plays a rolling animation."

"If a player has a tool named "Football" equipped then it will remove a tool named "Tackle" from the player's inventory."

"make a combat system with a classic sword swing, block and a parry tell me where to put the code"

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

Players.PlayerAdded:Connect(function(player)
    local sword = game.ServerStorage.Sword:Clone()
    sword.Parent = player.Backpack
end)

-- Sword Script (inside the sword model) 
local sword = script.Parent
local debounce = false
local blocking = false
local parrying = false

sword.Equipped:Connect(function(mouse)
    mouse.Button1Down:Connect(function()
        if not debounce then
            debounce = true
            sword.Handle:FindFirstChildWhichIsA("Animation"):Play()
            wait(0.5)
            debounce = false
        end
    end)
    
    mouse.Button2Down:Connect(function()
        if not debounce then
            debounce = true
            blocking = true
            sword.Handle:FindFirstChildWhichIsA("BlockAnimation"):Play()
            wait(0.5)
            debounce = false
            blocking = false
        end
    end)
    
    mouse.Button3Down:Connect(function()
        if not debounce and not blocking then
            debounce = true
            parrying = true
            sword.Handle:FindFirstChildWhichIsA("ParryAnimation"):Play()
            wait(0.5)
            debounce = false
            parrying = false
        end
    end)
end)

sword.Unequipped:Connect(function()
    sword.Handle:FindFirstChildWhichIsA("Animation"):Stop()
    sword.Handle:FindFirstChildWhichIsA("BlockAnimation"):Stop()
    sword.Handle:FindFirstChildWhichIsA("ParryAnimation"):Stop()
end)

-- You need to put the first script in ServerScriptService and the second script inside the sword model in ServerStorage. Also, make sure to replace "Animation", "BlockAnimation", and "ParryAnimation" with the actual names of your animations.

"make me a script where if you say !handto you give the tool your holding to the person you say !handto username"

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

"a working chatbot script that answers any questions about roblox studio and isnt prompt based and tell me where the script goes"

-- ScripterAI can't create a full chatbot script in this format, but here's a basic example of a chatbot script that responds to some keywords. Place this script in ServerScriptService.

local Players = game:GetService("Players")

local function onPlayerChatted(player, message)
    local lowerMessage = string.lower(message)
    
    if string.find(lowerMessage, "how to create") then
        player:Kick("To create a new place in Roblox Studio, click on 'File' -> 'New' in the top left corner.")
    elseif string.find(lowerMessage, "how to save") then
        player:Kick("To save your game in Roblox Studio, click on 'File' -> 'Save to Roblox' or 'Save to Roblox As' in the top left corner.")
    elseif string.find(lowerMessage, "how to publish") then
        player:Kick("To publish your game in Roblox Studio, click on 'File' -> 'Publish to Roblox' in the top left corner.")
    elseif string.find(lowerMessage, "how to add a part") then
        player:Kick("To add a part in Roblox Studio, click on the 'Part' button in the 'Home' tab.")
    else
        player:Kick("Sorry, I can't answer that question. Please try another one.")
    end
end

local function onPlayerAdded(player)
    player.Chatted:Connect(function(message)
        onPlayerChatted(player, message)
    end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

"make me a roblox admin only chat command script with ban player, kick player and give player tool (Checks replicated storage "Tools" folder and checks all subfolders for the tool name), unban command and the prefix should be "-""

-- server script 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ToolsFolder = ReplicatedStorage.Tools
local Players = game:GetService("Players")
local BannedPlayers = {}

local function isAdmin(player)
	return player.UserId == game.CreatorId
end

local function findTool(toolName)
	for _, tool in ipairs(ToolsFolder:GetDescendants()) do
		if tool:IsA("Tool") and tool.Name == toolName then
			return tool
		end
	end
	return nil
end

local function processCommand(player, message)
	if not isAdmin(player) then return end

local commandParts = string.split(message, " ")
	local command = commandParts[1]
	local targetName = commandParts[2]
	local target = Players:FindFirstChild(targetName)

if command == "-ban" and target then
		BannedPlayers[target.UserId] = true
		target:Kick("You have been banned by an admin.")
	elseif command == "-unban" and target then
		BannedPlayers[target.UserId] = nil
	elseif command == "-kick" and target then
		target:Kick("You have been kicked by an admin.")
	elseif command == "-give" and target then
		local toolName = commandParts[3]
		local tool = findTool(toolName)
		if tool then
			local clonedTool = tool:Clone()
			clonedTool.Parent = target.Backpack
		end
	end
end

Players.PlayerAdded:Connect(function(player)
	if BannedPlayers[player.UserId] then
		player:Kick("You are banned from this game.")
	end

player.Chatted:Connect(function(message)
		processCommand(player, message)
	end)
end)

"create a script that makes the player roll forward when the player press Q and plays a rolling animation."

"code a chatbot GUI that I can ask questions about roblox studio to, and add comments explaining how I can add my own question prompts, and explain what things I need to add into screenGUI to make it work"

-- LocalScript inside a TextButton in a ScreenGui 
local textButton = script.Parent
local userInput = textButton.Parent.Parent.UserInput -- TextBox for user input
local chatOutput = textButton.Parent.Parent.ChatOutput -- TextBox for chat output

local questions = {
    ["What is Roblox Studio?"] = "Roblox Studio is a development environment for creating games and experiences on the Roblox platform.",
    ["How do I create a part?"] = "In Roblox Studio, click on the 'Part' button in the 'Home' tab to create a new part in the workspace.",
    -- Add more questions and answers here
}

local function askQuestion()
    local userQuestion = userInput.Text
    local answer = questions[userQuestion]

if answer then
        chatOutput.Text = "Bot: " .. answer
    else
        chatOutput.Text = "Bot: I'm sorry, I don't have an answer for that question."
    end
end

textButton.MouseButton1Click:Connect(askQuestion)

-- To make this work in Roblox, follow these steps:
1. Create a ScreenGui inside the StarterGui.
2. Add two TextBoxes inside the ScreenGui, one for user input (UserInput) and one for chat output (ChatOutput).
3. Add a TextButton inside the ScreenGui for submitting the question.
4. Insert this LocalScript inside the TextButton and make sure the userInput and chatOutput variables point to the correct TextBoxes.
5. Add your own question prompts and answers in the 'questions' table in the format shown.

"Make a NPC that follows you"

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

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

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

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

"and that the cooldown starts only after 4 punches"

-- 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 canPunch = true
local hitCharacters = {}
local punchCount = 0

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)

"Constantly spawn a part on top of every players head every 3 seconds. Add comments to code"

"make a script after 60 in the game, a fontsize 32 green text on the center of the screen will appear saying "Wave 2" and after 3 seconds will start slowly disappearing."

"make me advanced admin chat commands with at least 5 admin commands - add comments/instructions"

-- Server script for advanced admin chat commands

local admins = {"Admin1", "Admin2", "Admin3"} -- Add admin usernames here
local commands = {
    ["kick"] = function(player, targetName)
        local target = game.Players:FindFirstChild(targetName)
        if target then
            target:Kick("You have been kicked by an admin.")
        end
    end,
    ["ban"] = function(player, targetName)
        local target = game.Players:FindFirstChild(targetName)
        if target then
            target:Kick("You have been banned by an admin.")
            table.insert(bannedPlayers, targetName)
        end
    end,
    ["teleport"] = function(player, targetName)
        local target = game.Players:FindFirstChild(targetName)
        if target and target.Character and player.Character then
            player.Character.HumanoidRootPart.CFrame = target.Character.HumanoidRootPart.CFrame
        end
    end,
    ["health"] = function(player, amount)
        if player.Character and player.Character:FindFirstChild("Humanoid") then
            player.Character.Humanoid.Health = tonumber(amount)
        end
    end,
    ["speed"] = function(player, speed)
        if player.Character and player.Character:FindFirstChild("Humanoid") then
            player.Character.Humanoid.WalkSpeed = tonumber(speed)
        end
    end
}

local function onChatted(player, message)
    local args = {}
    for word in message:gmatch("%S+") do
        table.insert(args, word)
    end

local command = args[1]
    local isAdmin = false

for _, admin in ipairs(admins) do
        if player.Name == admin then
            isAdmin = true
            break
        end
    end

if isAdmin and commands[command] then
        table.remove(args, 1)
        commands[command](player, unpack(args))
    end
end

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

"make the humanoid jump again after pressing spacebar in the air with custom animation also give it a small boost it make it look like they're jumping twice"

"Make a exploit script for Da Backrooms that will automatically pick up loot in the game: Da Backrooms. The game has a teleport anti cheat and will not pick up the loot if you are being rectified"

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

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

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

"Make a tool named burger apier in Backpack form ReplicatedStorage when i click textbutton in scrollingframe and when i click it again it goes Back to Replicated Storage make it say that equip if its Equiped then say Unequip Unequip when item hand"

"If I click this button then I explode"

"Make a spectating ui"

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

local spectatingFrame = Instance.new("Frame", screenGui)
spectatingFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
spectatingFrame.Size = UDim2.new(0, 200, 0, 100)
spectatingFrame.Position = UDim2.new(0.5, -100, 0.5, -50)

local spectatingLabel = Instance.new("TextLabel", spectatingFrame)
spectatingLabel.Text = "Spectating"
spectatingLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
spectatingLabel.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
spectatingLabel.Size = UDim2.new(1, 0, 0.5, 0)
spectatingLabel.Font = Enum.Font.SourceSansBold
spectatingLabel.TextScaled = true

local nextButton = Instance.new("TextButton", spectatingFrame)
nextButton.Text = "Next"
nextButton.TextColor3 = Color3.fromRGB(255, 255, 255)
nextButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
nextButton.Size = UDim2.new(0.5, 0, 0.5, 0)
nextButton.Position = UDim2.new(0, 0, 0.5, 0)
nextButton.Font = Enum.Font.SourceSansBold
nextButton.TextScaled = true

local prevButton = Instance.new("TextButton", spectatingFrame)
prevButton.Text = "Prev"
prevButton.TextColor3 = Color3.fromRGB(255, 255, 255)
prevButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
prevButton.Size = UDim2.new(0.5, 0, 0.5, 0)
prevButton.Position = UDim2.new(0.5, 0, 0.5, 0)
prevButton.Font = Enum.Font.SourceSansBold
prevButton.TextScaled = true

"give a player a tool that gives a player abilities"

"the head is cancollide false and anchored false, so since the head is supposed to act like the new head, try putting new attachments to the body so it can go on like a normal head"

-- server script 
if HitPart.Name == "Head" then
    if HitPart.Parent.Name == "Furry" or HitPart.Parent.Name == "Neko" then
        print('Gibbed:' .. HitPart.Parent.Name)
        local newHead = GoreHead:Clone()
        newHead.Parent = HitPart.Parent
        HitPart:Remove()
        newHead.Transparency = 0 -- making sure the new head is visible
        newHead.CanCollide = false
        newHead.Anchored = false

-- create new attachments for the body
        local neckAttachment = Instance.new("Attachment")
        neckAttachment.Name = "Neck"
        neckAttachment.Parent = HitPart.Parent["UpperTorso"]
        neckAttachment.Position = Vector3.new(0, 1, 0)

local headAttachment = Instance.new("Attachment")
        headAttachment.Name = "Head"
        headAttachment.Parent = newHead
        headAttachment.Position = Vector3.new(0, -1, 0)

-- create a new weld constraint to connect the head and body
        local weld = Instance.new("WeldConstraint")
        weld.Parent = HitPart.Parent["UpperTorso"]
        weld.Part0 = HitPart.Parent["UpperTorso"]
        weld.Part1 = newHead
    end
end

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

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

-- local script inside tool 
local tool = script.Parent
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local canShoot = true

local function createFireball()
    if canShoot then
        canShoot = false
        local fireball = Instance.new("Part")
        fireball.Size = Vector3.new(2, 2, 2)
        fireball.Shape = Enum.PartType.Ball
        fireball.BrickColor = BrickColor.new("Bright red")
        fireball.Material = Enum.Material.Neon
        fireball.Parent = game.Workspace
        fireball.Position = player.Character.Head.Position
        fireball.Velocity = (mouse.Hit.p - fireball.Position).unit * 100
        fireball.CanCollide = false

local fire = Instance.new("Fire", fireball)
        fire.Size = 5
        fire.Heat = 10
        fire.Color = Color3.fromRGB(255, 0, 0)
        fire.SecondaryColor = Color3.fromRGB(255, 255, 0)

game.Debris:AddItem(fireball, 3)
        wait(0.5)
        canShoot = true
    end
end

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

mouse.KeyDown:Connect(onKeyDown)

"Make a npc follow player script"

"GodMode"

"code for a firework that you can shoot forward on left click and shoot up on right click with it exploding after flying either up or forward using the mesh within tool as model for firework"

"create code for 2 seperate scripts an Input Manager to detect when a Player Clicks using M1 and Fires a Local Scipt Under it by Invoking a BindaBle Function when the player clicks"

To achieve the functionality described, you'll need two scripts: a LocalScript for detecting mouse clicks (M1) and a Script for handling the action when the click occurs. Here's how you can set it up:

### Script 1: Input Manager (LocalScript)
This LocalScript will detect when the player clicks their mouse and then invoke a BindableFunction to handle the action. This script should be placed in a LocalScript within the player's PlayerScripts or a GUI.

```lua
-- LocalScript to detect mouse clicks and invoke a BindableFunction
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local bindableFunction = game.ReplicatedStorage:WaitForChild("OnClickFunction") -- Assuming the BindableFunction is stored in ReplicatedStorage

mouse.Button1Down:Connect(function()
    bindableFunction:Invoke() -- Invokes the BindableFunction
end)
```

### Script 2: Action Handler (Script)
This Script will be connected to the BindableFunction and will perform the desired action when the function is invoked. This script should be placed in a Script within ServerScriptService or Workspace.

```lua
-- Script to handle the action when the BindableFunction is invoked
local bindableFunction = Instance.new("BindableFunction", game.ReplicatedStorage)
bindableFunction.Name = "OnClickFunction"

bindableFunction.OnInvoke = function()
    -- Code to execute when the player clicks M1
    print("Player clicked M1!") -- Example action
    -- Add any additional actions you want to perform here
end
```

This setup ensures that when a player clicks their mouse (M1), the LocalScript detects this action and invokes a BindableFunction. The Script connected to the BindableFunction then performs whatever actions are defined within it. This method is useful for separating client-side detection of inputs and server-side actions, adhering to Roblox's security model that restricts certain actions to the server.

"make me a commandwhere if you say !fly you fly. only rank 247 or up in group can use it. only r6 can use it"

"create a level system with xp and data store and that can change players health and weapon damage"

-- main script in ServerScriptService 
local DataStoreService = game:GetService("DataStoreService")
local levelStore = DataStoreService:GetDataStore("PlayerLevels")

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

local xp = Instance.new("IntValue")
    xp.Name = "XP"
    xp.Value = 0
    xp.Parent = folder

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

local success, errorMessage = pcall(function()
        local data = levelStore:GetAsync(player.UserId)
        if data then
            level.Value = data.level
            xp.Value = data.xp
        end
    end)

if not success then
        print("Error loading data: " .. errorMessage)
    end
end)

game.Players.PlayerRemoving:Connect(function(player)
    local success, errorMessage = pcall(function()
        levelStore:SetAsync(player.UserId, {
            level = player.leaderstats.Level.Value,
            xp = player.leaderstats.XP.Value
        })
    end)

if not success then
        print("Error saving data: " .. errorMessage)
    end
end)

-- script for adding XP and leveling up 
local function addXP(player, amount)
    local stats = player.leaderstats
    stats.XP.Value = stats.XP.Value + amount

local currentLevel = stats.Level.Value
    local requiredXP = currentLevel * 100

if stats.XP.Value >= requiredXP then
        stats.Level.Value = stats.Level.Value + 1
        stats.XP.Value = stats.XP.Value - requiredXP

player.Character.Humanoid.MaxHealth = 100 + (10 * stats.Level.Value)
        player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth

local weaponDamage = player.Backpack:FindFirstChild("Weapon")
        if weaponDamage then
            weaponDamage.Damage.Value = 10 + (2 * stats.Level.Value)
        end
    end
end

-- example of usage 
game.ReplicatedStorage.AddXP.OnServerEvent:Connect(addXP)

"Make a sellpart that makes sell food to coins when The part is touched add comments to code where to put it"

"make a script that closes all the guis"