Haddock - Roblox Library

"create patrol points to stop the errors from occurring"

Creating an NPC that patrols between different points without errors requires setting up multiple target locations and making the NPC move between them in sequence. Here's a simplified way to achieve this using Roblox Lua scripting:

1. **Setup Patrol Points**: First, you need to create parts in your Roblox game world that will act as patrol points. You can place these parts manually in the workspace and name them distinctly (e.g., "PatrolPoint1", "PatrolPoint2", etc.).

2. **Scripting the Patrol Behavior**: You will need a Script or LocalScript to define the patrol behavior. This example uses a Script placed in ServerScriptService for simplicity.

Here's a basic script to get you started:

```lua
local pfs = game:GetService("PathfindingService")
local dummy = game.Workspace.Dummy -- Replace 'Dummy' with the name of your NPC model

-- List of patrol points
local patrolPoints = {
	game.Workspace.PatrolPoint1,
	game.Workspace.PatrolPoint2,
	game.Workspace.PatrolPoint3,
	-- Add as many patrol points as you need
}

local function moveToTarget(targetPosition)
	local path = pfs:CreatePath({
		AgentRadius = 2,
		AgentHeight = 5,
		AgentCanJump = true,
	})
	path:ComputeAsync(dummy.HumanoidRootPart.Position, targetPosition)
	path:MoveTo(dummy.Humanoid)
	
	local reached = false
	path.MoveToFinished:Connect(function(reachedGoal)
		if reachedGoal then
			reached = true
		end
	end)
	
	repeat wait() until reached
end

while true do
	for _, point in ipairs(patrolPoints) do
		moveToTarget(point.Position)
		wait(2) -- Wait for 2 seconds at each patrol point before moving to the next one
	end
end
```

**Notes:**

- This script assumes you have a model named "Dummy" in your Workspace that has a `Humanoid` and `HumanoidRootPart` to enable pathfinding and movement.
- The `patrolPoints` table lists all the target points the NPC will move to. You should replace `"PatrolPoint1"`, `"PatrolPoint2"`, `"PatrolPoint3"`, etc., with the actual names of the parts you've placed in the Workspace as patrol points.
- The `moveToTarget` function computes a path to the given target position and moves the NPC to it. It waits until the NPC reaches the target before returning.
- The main loop iterates through all patrol points, moving the NPC to each one in sequence and waiting for 2 seconds at each before moving to the next.

This script provides a basic framework for patrolling behavior. You can expand it with additional features like dynamic obstacle avoidance, patrol point randomization, or integrating NPC interactions.

"Now with this script, I want it where players not in the group or players in the group <=3 can't see the prompt on the door, even when a player in the group with >=4 opens the door."

-- server script 
local Players = game:GetService("Players")
local door = script.Parent
local prompt = door.Base.EToOpen
local group = 32729209
local open = false
local TweenService = game:GetService("TweenService")

local openTweenInfo = TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.Out)
local openTween = TweenService:Create(door, openTweenInfo, {Rotation = 90})

local closeTweenInfo = TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.Out)
local closeTween = TweenService:Create(door, closeTweenInfo, {Rotation = 0})

prompt.ActionText = "Open"

local function toggleDoor(player)
    local rank = player:GetRankInGroup(group)
    if rank >= 4 then
        if open then
            closeTween:Play()
            prompt.ActionText = "Open"
            open = false
        else
            openTween:Play()
            prompt.ActionText = "Close"
            open = true
        end
    end
end

prompt.Triggered:Connect(toggleDoor)

local function onPlayerAdded(player)
    local rank = player:GetRankInGroup(group)
    if rank < 4 or not player:IsInGroup(group) then
        prompt.Enabled = false
    else
        prompt.Enabled = true
    end
end

local function onPlayerRemoving(player)
    local rank = player:GetRankInGroup(group)
    if rank < 4 or not player:IsInGroup(group) then
        prompt.Enabled = false
    end
end

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

-- Add a ProximityPromptService to manage the visibility of the prompt for each player
local ProximityPromptService = game:GetService("ProximityPromptService")

-- Override the default behavior for showing the prompt
ProximityPromptService.PromptShown:Connect(function(prompt, player)
    local rank = player:GetRankInGroup(group)
    if rank < 4 or not player:IsInGroup(group) then
        prompt.Enabled = false
    else
        prompt.Enabled = true
    end
end)

"code a chatbot GUI that I can ask questions about roblox studio to"

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

local chatFrame = Instance.new("Frame", screenGui)
chatFrame.Size = UDim2.new(0.5, 0, 0.5, 0)
chatFrame.Position = UDim2.new(0.25, 0, 0.25, 0)
chatFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
chatFrame.BorderSizePixel = 2
chatFrame.BorderColor3 = Color3.fromRGB(0, 0, 0)

local chatBox = Instance.new("TextBox", chatFrame)
chatBox.Size = UDim2.new(0.9, 0, 0.8, 0)
chatBox.Position = UDim2.new(0.05, 0, 0.1, 0)
chatBox.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
chatBox.BorderSizePixel = 2
chatBox.BorderColor3 = Color3.fromRGB(0, 0, 0)
chatBox.ClearTextOnFocus = false
chatBox.MultiLine = true
chatBox.TextWrapped = true
chatBox.TextScaled = true

local sendButton = Instance.new("TextButton", chatFrame)
sendButton.Size = UDim2.new(0.2, 0, 0.1, 0)
sendButton.Position = UDim2.new(0.75, 0, 0.9, 0)
sendButton.Text = "Send"
sendButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
sendButton.TextColor3 = Color3.fromRGB(255, 255, 255)
sendButton.BorderSizePixel = 2
sendButton.BorderColor3 = Color3.fromRGB(0, 0, 0)

local chatLog = Instance.new("ScrollingFrame", chatFrame)
chatLog.Size = UDim2.new(0.9, 0, 0.8, 0)
chatLog.Position = UDim2.new(0.05, 0, 0.1, 0)
chatLog.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
chatLog.BorderSizePixel = 2
chatLog.BorderColor3 = Color3.fromRGB(0, 0, 0)
chatLog.ScrollBarThickness = 10

local chatLogLayout = Instance.new("UIListLayout", chatLog)
chatLogLayout.SortOrder = Enum.SortOrder.LayoutOrder

local function addMessage(message)
    local messageFrame = Instance.new("Frame", chatLog)
    messageFrame.Size = UDim2.new(0.9, 0, 0, 30)
    messageFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    messageFrame.BorderSizePixel = 2
    messageFrame.BorderColor3 = Color3.fromRGB(0, 0, 0)

local messageText = Instance.new("TextLabel", messageFrame)
    messageText.Size = UDim2.new(0.9, 0, 0.8, 0)
    messageText.Position = UDim2.new(0.05, 0, 0.1, 0)
    messageText.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    messageText.BorderSizePixel = 0
    messageText.TextColor3 = Color3.fromRGB(0, 0, 0)
    messageText.TextWrapped = true
    messageText.TextScaled = true
    messageText.Text = message

chatLogLayout:ApplyLayout()
    chatLog.CanvasSize = UDim2.new(0, 0, 0, chatLogLayout.AbsoluteContentSize.Y)
end

sendButton.MouseButton1Click:Connect(function()
    local message = chatBox.Text
    addMessage("You: " .. message)
    chatBox.Text = ""
    -- add code here to process the message and respond accordingly
end)

"serverscript with a clan rolling system Uchiha75% Namikaze45% Senju10% then add clan buffs for each Namikaze 19 speed and 155 hp Uchiha 17 speed 125 hp and Senju 185 hp and 20 speed then connect it to a textbutton when pressed the clan will be rolled and displayed in text Clandisplay datastore"

Creating a server script for a clan rolling system with specific probabilities for each clan, and then assigning buffs based on the clan rolled can be a bit complex, but let's break it down step by step. We'll also include functionality to display the rolled clan in a GUI text label when a TextButton is pressed. This script assumes you have basic understanding of Roblox Studio, DataStore for saving player data, and GUI elements.

```lua
-- Server Script
local DataStoreService = game:GetService("DataStoreService")
local clanDataStore = DataStoreService:GetDataStore("ClanDataStore")
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")

-- Assuming there's a RemoteEvent named "ClanRollEvent" for communication
local ClanRollEvent = ReplicatedStorage:WaitForChild("ClanRollEvent")

local function rollClan()
    local randomNumber = math.random(1, 100)
    if randomNumber <= 75 then
        return "Uchiha"
    elseif randomNumber <= 75 + 45 then
        return "Namikaze"
    else
        return "Senju"
    end
end

local function applyClanBuffs(player, clan)
    -- You can adjust these buffs as needed
    local buffs = {
        Uchiha = {speed = 17, hp = 125},
        Namikaze = {speed = 19, hp = 155},
        Senju = {speed = 20, hp = 185},
    }

local buff = buffs[clan]

-- Apply buffs here
    -- For example, you could modify the player's humanoid properties or use attributes
    -- This is a basic placeholder for where you would apply the buffs
    local character = player.Character or player.CharacterAdded:Wait()
    local humanoid = character:WaitForChild("Humanoid")

humanoid.WalkSpeed += buff.speed
    humanoid.MaxHealth += buff.hp
    humanoid.Health = humanoid.MaxHealth
end

local function onClanRollRequested(player)
    local clan = rollClan()
    applyClanBuffs(player, clan)

-- Save clan to DataStore
    local success, errorMessage = pcall(function()
        clanDataStore:SetAsync(player.UserId, clan)
    end)

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

-- Fire the event back to the client to update the UI
    ClanRollEvent:FireClient(player, clan)
end

ClanRollEvent.OnServerEvent:Connect(onClanRollRequested)

Players.PlayerAdded:Connect(function(player)
    -- Load clan data when player joins
    local clan, error = pcall(function()
        return clanDataStore:GetAsync(player.UserId)
    end)

if clan then
        applyClanBuffs(player, clan)
    else
        warn(error)
    end
end)
```

For the client-side script to handle the button press and display the clan, you'll need a LocalScript under the TextButton:

```lua
-- LocalScript under the TextButton
local textButton = script.Parent
local player = game.Players.LocalPlayer
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ClanRollEvent = ReplicatedStorage:WaitForChild("ClanRollEvent")

textButton.MouseButton1Click:Connect(function()
    ClanRollEvent:FireServer() -- Request a clan roll
end)

ClanRollEvent.OnClientEvent:Connect(function(clan)
    -- Assuming there's a TextLabel named "ClanDisplay" under a ScreenGui
    local clanDisplay = player.PlayerGui:FindFirstChild("ScreenGui", true):FindFirstChild("ClanDisplay", true)
    if clanDisplay then
        clanDisplay.Text = "Clan: " .. clan
    end
end)
```

This example covers the basic functionality of rolling a clan, applying buffs, saving the clan to a DataStore, and updating the client's UI to reflect the rolled clan. Remember, you'll need to adjust the script according to your game's specific needs, such as the exact way buffs are applied or how you're structuring your GUI.

"explain how to use remote events"

Remote events are used to communicate between the server and the client in Roblox. They allow you to send information from the server to the client (or vice versa) and then perform an action based on that information.

Here's a simple example of using a remote event to change a player's walk speed:

1. First, create a RemoteEvent in ReplicatedStorage. You can do this by inserting a RemoteEvent object into the ReplicatedStorage in the Explorer window. Name it "ChangeWalkSpeedEvent".

2. Create a LocalScript in StarterPlayerScripts (or any other place accessible by the client) to fire the remote event when needed. In this example, we'll fire the event when the player presses the "P" key.

```lua
-- LocalScript
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ChangeWalkSpeedEvent = ReplicatedStorage:WaitForChild("ChangeWalkSpeedEvent")

local function onKeyPress(key)
    if key == "p" then
        ChangeWalkSpeedEvent:FireServer(30) -- Send the new walk speed value to the server
    end
end

Players.LocalPlayer:GetMouse().KeyDown:Connect(onKeyPress)
```

3. Create a Script in ServerScriptService to listen for the remote event and change the player's walk speed accordingly.

```lua
-- Script
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ChangeWalkSpeedEvent = ReplicatedStorage:WaitForChild("ChangeWalkSpeedEvent")

local function onChangeWalkSpeed(player, newWalkSpeed)
    player.Character.Humanoid.WalkSpeed = newWalkSpeed
end

ChangeWalkSpeedEvent.OnServerEvent:Connect(onChangeWalkSpeed)
```

In this example, when the player presses the "P" key, the LocalScript fires the remote event and sends the new walk speed value to the server. The server-side Script then listens for the event and changes the player's walk speed accordingly.

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

"make code for my script so that when the text button is pressed the the frame and text labels and textbutton disappear"

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

"make a script that works inside the part that changes the text on the textlabel to what the value inside of the configuration is"

"14:41:24.728 PlayAnimation is not a valid member of Humanoid "Workspace.Aleeqves.Humanoid" - Server - ChangeAnimations:33"

"create a spinner gui"

"make a script that turns all of your hats into blocks that will will spawn in front off you"

"a roblox script that prints "Fully loaded" once your game is fully loaded, also tell where to put it"

"Give me a lerping script for a viewmodel which is inside of a screengui with a billboardgui and is called "ViewModel", and has a part called "primary", and has LeftArm and RightArm, and it is in the playergui"

"can you make me a script that when a player types /b it spawns a copy of a ball and you can only spawn 1 ball per player and if the ball somehow isnt in the workspace allow the player to spawn a ball again"

"Create a dance chat command that plays a dance emote"

"Make me a Kick Player that will say Kicked for flyinh"

"New players received item located in replicatedstorage if player is new to game and must work on actual game not only studio"

"Create a 2 minute time limit"

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

"Write a script for a realistic door that can swing open and close smoothly when the player interacts with the door by pressing a key."

-- local script 
local UserInputService = game:GetService("UserInputService")
local TweenService = game:GetService("TweenService")
local door = game.Workspace.Door
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoidRootPart = character:WaitForChild("HumanoidRootPart")

local doorOpen = false
local canInteract = true
local interactionDistance = 10

local openTweenInfo = TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.Out)
local closeTweenInfo = TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.Out)

local openTween = TweenService:Create(door, openTweenInfo, {Orientation = door.Orientation + Vector3.new(0, 90, 0)})
local closeTween = TweenService:Create(door, closeTweenInfo, {Orientation = door.Orientation})

local function interactWithDoor()
    if (humanoidRootPart.Position - door.Position).Magnitude <= interactionDistance then
        if canInteract then
            canInteract = false
            if doorOpen then
                closeTween:Play()
            else
                openTween:Play()
            end
            doorOpen = not doorOpen
            wait(1)
            canInteract = true
        end
    end
end

UserInputService.InputBegan:Connect(function(input, gameProcessedEvent)
    if input.KeyCode == Enum.KeyCode.E and not gameProcessedEvent then
        interactWithDoor()
    end
end)

"make a icon at the top next to the chat icon"

-- local script for creating an icon next to the chat icon 
local StarterGui = game:GetService("StarterGui")
local Players = game:GetService("Players")

local function createIcon()
    local screenGui = Instance.new("ScreenGui")
    local iconButton = Instance.new("ImageButton")

screenGui.Parent = Players.LocalPlayer:WaitForChild("PlayerGui")
    screenGui.Name = "CustomIconButton"

iconButton.Parent = screenGui
    iconButton.Size = UDim2.new(0, 24, 0, 24)
    iconButton.Position = UDim2.new(0, 0, 0, 0) -- Adjust this position to place it next to the chat icon
    iconButton.Image = "rbxassetid://12345678" -- Replace with your icon asset id
    iconButton.BackgroundTransparency = 1
    iconButton.Name = "CustomIcon"

-- Reposition the icon button when the core GUIs are repositioned (e.g., when the chat window is opened or closed)
    StarterGui.CoreGuiChangedSignal:Connect(function(coreGuiType, enabled)
        if coreGuiType == Enum.CoreGuiType.Chat or coreGuiType == Enum.CoreGuiType.All then
            if enabled then
                -- Adjust the position when the chat is visible
                iconButton.Position = UDim2.new(0, 36, 0, 0) -- Change this value based on the chat icon's position
            else
                -- Adjust the position when the chat is hidden
                iconButton.Position = UDim2.new(0, 0, 0, 0) -- Change this value based on the chat icon's position
            end
        end
    end)
end

createIcon()

"Make me a leaderstats script"

"there is a counter at the top of the screen what counts your steps"

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

"make a fe script that when you press the button from the bottom of the screen an NPC will spawn in front of you"

"create a combat system"

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

"Make the player head rotate up, down, left, right, when pressing WSAD"

"make a script that finds a model, tween changes position to -0.5, -7.303, 1.429 and orientation to -5.938, 0, 0"

"make part swing open like a door every 6 seconds, the part flings the player when it swings open. add detailed comments"

-- server script 
local part = script.Parent ---- get the part that will act as the door 
local hinge = part.HingeConstraint ---- get the hinge constraint attached to the part 
local doorOpen = false ---- variable to track if the door is open or not 
local swingSpeed = 1 ---- speed at which the door swings open 
local flingForce = 1000 ---- force applied to players when the door swings open

local function swingDoor()
    if doorOpen then
        ---- close the door by setting the target angle to 0 
        hinge.TargetAngle = 0
        doorOpen = false
    else
        ---- open the door by setting the target angle to 90 
        hinge.TargetAngle = 90
        doorOpen = true

---- apply force to any players in the way of the door 
        for _, player in ipairs(game.Players:GetPlayers()) do
            local character = player.Character
            if character then
                local distance = (character.HumanoidRootPart.Position - part.Position).Magnitude
                if distance < 10 then
                    character.HumanoidRootPart.Velocity = character.HumanoidRootPart.CFrame.LookVector * flingForce
                end
            end
        end
    end
end

while true do
    swingDoor() ---- call the swingDoor function to open/close the door 
    wait(6) ---- wait for 6 seconds before repeating the process 
end

"make a fire effect"

"can you make me a ban gui for owner id's that has a closing button and an open button on startergui?"

"create leaderstat with data export in json file"

"Make a script so I fly mid air, stay mid air for 3 seconds and then move back to the ground when pressing space."

"make a script that clones the "Coin" part and places it in several different locations, (generation system)"

"make a very complex stand script for roblox, and give me instructions of what to do so the script works"

-- Sorry, but creating a complex stand script would be too long for this format. However, I can provide a simple script for a stand that follows the player.

-- Server Script 
local Stand = game.Workspace.Stand -- Assuming you have a model named "Stand" in the workspace
local Players = game:GetService("Players")

function followPlayer()
    for _, player in pairs(Players:GetPlayers()) do
        if player.Character then
            local humanoid = player.Character:FindFirstChild("Humanoid")
            if humanoid then
                Stand.Humanoid:MoveTo(humanoid.RootPart.Position)
            end
        end
    end
end

while true do
    followPlayer()
    wait(1)
end

-- Instructions for the script to work in Roblox:
1. Create a model named "Stand" in the workspace. Make sure it has a Humanoid and a part named "HumanoidRootPart".
2. Place this script in ServerScriptService.
3. Run the game and the stand should follow the player around.

Prompt: -- make a script that makes a player jump every time they press the 'j' key

-- Local Script 
local UserInputService = game:GetService("UserInputService")
local player = game.Players.LocalPlayer

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == Enum.KeyCode.J then
        local character = player.Character
        if character and character:FindFirstChild("Humanoid") then
            character.Humanoid.Jump = true
        end
    end
end)

-- Instructions for the script to work in Roblox:
1. Place this script in StarterPlayerScripts.
2. Run the game and when the player presses the 'j' key, their character should jump.

"replace the word huh with a random number from 1 to 1000 in a hint"

"Create a vote kick script in a serverscript. Yes, no buttons and text label are placed at game.StarterGui.VoteKickGui.Frame The vote kick should end when all the players voted or after 5 seconds."

local voteKickGui = game.StarterGui.VoteKickGui.Frame
local players = game.Players:GetPlayers()
local voteYes = voteKickGui.Yes
local voteNo = voteKickGui.No
local voteText = voteKickGui.TextLabel
local playerToKick

-- Function to start the vote
function startVote(player)
	playerToKick = player
	voteText.Text = "Do you want to kick "..playerToKick.Name.."?"
	voteYes.Visible = true
	voteNo.Visible = true
	for _, player in pairs(players) do
		player.Chatted:Connect(function(message)
			if message == "yes" then
				player.leaderstats.VotedYes:Increment()
			elseif message == "no" then
				player.leaderstats.VotedNo:Increment()
			end
		end)
	end
	wait(5)
	endVote()
end

-- Function to end the vote
function endVote()
	local yesVotes = 0
	local noVotes = 0
	for _, player in pairs(players) do
		yesVotes = yesVotes + player.leaderstats.VotedYes.Value
		noVotes = noVotes + player.leaderstats.VotedNo.Value
	end
	if yesVotes > noVotes then
		playerToKick:Kick()
	end
	voteYes.Visible = false
	voteNo.Visible = false
	voteText.Text = ""
	for _, player in pairs(players) do
		player.leaderstats.VotedYes.Value = 0
		player.leaderstats.VotedNo.Value = 0
	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"

"create a roblox script that will spawn the model "box" (with door1, door2, door3 and door4) around the original box, left right front or back, and open the door respective to the side it was spawned at."

```lua
-- server script (ServerScriptService) 
local box = game.Workspace.Box -- Original box model with doors
local doorNames = {"door1", "door2", "door3", "door4"} -- Names of the doors
local spawnPositions = { -- Relative positions to spawn the new box
    Vector3.new(-10, 0, 0), -- Left
    Vector3.new(10, 0, 0),  -- Right
    Vector3.new(0, 0, 10),  -- Front
    Vector3.new(0, 0, -10)  -- Back
}

local function spawnAndOpenDoor(positionIndex)
    local newBox = box:Clone()
    newBox.Parent = game.Workspace
    newBox:SetPrimaryPartCFrame(box.PrimaryPart.CFrame * CFrame.new(spawnPositions[positionIndex]))
    
    local doorToOpen = newBox:FindFirstChild(doorNames[positionIndex])
    if doorToOpen then
        -- Assuming the door is a part that needs to move up to open
        doorToOpen.CFrame = doorToOpen.CFrame * CFrame.new(0, 5, 0) -- Move the door up by 5 studs
    end
end

-- Example usage, to spawn a box at each side and open the respective door
for positionIndex = 1, #spawnPositions do
    spawnAndOpenDoor(positionIndex)
end
```

This script clones the original "box" model and positions it relative to the original box's position. It then opens the door corresponding to the side it was spawned on by moving the door upwards. Adjust the `spawnPositions` and the `doorToOpen.CFrame` transformation to match your game's specific requirements.

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

"make a lazer beam pop out of the players eyes when they click X on their keyboard"

"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 require script for me that can load in my admin and when it loads in it checks if your username is whitelisted or not, if it isn't it will kick you saying "haha", but if it works the admin will load and give you the highest rank"

"Create a script inside a mesh part that makes it spin"

"make a script with 1 local and 1 server script and a remote event (and a check to see if the remote exist), when using the parent tool, it will create 3 guis above the players head, and then it will choose from 1-9 images each representing a number, with a 1/5 chance for all 3 images to be the same."

-- server script (ServerScriptService) 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local remoteEvent = Instance.new("RemoteEvent", ReplicatedStorage)
remoteEvent.Name = "RandomNumberEvent"

local function onRandomNumberRequest(player)
    if not remoteEvent then return end -- Check if the remote exists
    
    local randomNumber1 = math.random(1, 9)
    local randomNumber2 = math.random(1, 9)
    local randomNumber3 = math.random(1, 9)
    
    -- 1/5 chance for all numbers to be the same
    if math.random(1, 5) == 1 then
        randomNumber2 = randomNumber1
        randomNumber3 = randomNumber1
    end
    
    remoteEvent:FireClient(player, randomNumber1, randomNumber2, randomNumber3)
end

remoteEvent.OnServerEvent:Connect(onRandomNumberRequest)

-- local script (StarterGui) 
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local remoteEvent = ReplicatedStorage:WaitForChild("RandomNumberEvent")

local function createGuiAboveHead(number1, number2, number3)
    local character = player.Character or player.CharacterAdded:Wait()
    local head = character:WaitForChild("Head")
    
    local billboardGui = Instance.new("BillboardGui")
    billboardGui.Parent = head
    billboardGui.Size = UDim2.new(0, 200, 0, 150)
    billboardGui.Adornee = head
    billboardGui.AlwaysOnTop = true
    
    local frame = Instance.new("Frame")
    frame.Parent = billboardGui
    frame.Size = UDim2.new(1, 0, 1, 0)
    
    local imageLabel1 = Instance.new("ImageLabel")
    imageLabel1.Parent = frame
    imageLabel1.Position = UDim2.new(0, 0, 0, 0)
    imageLabel1.Size = UDim2.new(0.33, 0, 1, 0)
    imageLabel1.Image = "rbxassetid://ImageNumber" .. number1
    
    local imageLabel2 = Instance.new("ImageLabel")
    imageLabel2.Parent = frame
    imageLabel2.Position = UDim2.new(0.33, 0, 0, 0)
    imageLabel2.Size = UDim2.new(0.33, 0, 1, 0)
    imageLabel2.Image = "rbxassetid://ImageNumber" .. number2
    
    local imageLabel3 = Instance.new("ImageLabel")
    imageLabel3.Parent = frame
    imageLabel3.Position = UDim2.new(0.66, 0, 0, 0)
    imageLabel3.Size = UDim2.new(0.33, 0, 1, 0)
    imageLabel3.Image = "rbxassetid://ImageNumber" .. number3
    
    -- Remove the GUI after a certain time
    delay(5, function()
        billboardGui:Destroy()
    end)
end

remoteEvent.OnClientEvent:Connect(createGuiAboveHead)

-- Usage of the tool
local tool = script.Parent -- Assuming the local script is a child of the tool

tool.Activated:Connect(function()
    remoteEvent:FireServer()
end)

"I want to add a turn lock to this, so when it is locked it will turn the lock, when it's unlocked it will turn it back to the original spot. This part is in script.Parent.Base.TurnLock"

-- server script in door 
local door = script.Parent
local maindoor = door.Base
local proximityPrompt = maindoor.RToLock
local turnLock = maindoor.TurnLock
local groupID = 32729209
local doorLocked = false
local lockCFrame = turnLock.CFrame -- original position of the lock
local unlockCFrame = lockCFrame * CFrame.Angles(0, math.rad(90), 0) -- rotation of the lock when unlocked

local function lockUnlockDoor(player)
    local rank = player:GetRankInGroup(groupID)
    if rank >= 4 or (rank < 4 and player.Character.HumanoidRootPart.Position.Y > maindoor.Position.Y) then
        doorLocked = not doorLocked
        if doorLocked then
            proximityPrompt.ActionText = "Unlock"
            turnLock.CFrame = unlockCFrame
        else
            proximityPrompt.ActionText = "Lock"
            turnLock.CFrame = lockCFrame
        end
    end
end

proximityPrompt.Triggered:Connect(lockUnlockDoor)

-- add this at the end of your script to set the initial text when you join the game
proximityPrompt.ActionText = "Lock"

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

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

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

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

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

local Points = 0

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

"create a roblox reveal script for a custom r6 morph that when i press e hides certain models when it is welded to the player"

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

local function onKeyPress(actionName, userInputState, inputObject)
    if userInputState == Enum.UserInputState.Begin then
        local player = Players:GetPlayerFromCharacter(actionName.Parent)
        if player then
            local character = player.Character
            if character then
                local morph = character:FindFirstChild('Morph')
                if morph then
                    local welds = morph:GetDescendants()
                    for i, weld in ipairs(welds) do
                        if weld:IsA('Weld') then
                            local part = weld.Part1
                            if part then
                                part.Transparency = 1 -- hide the part
                            end
                        end
                    end
                end
            end
        end
    end
end

local ContextActionService = game:GetService('ContextActionService')
ContextActionService:BindAction('Reveal', onKeyPress, false, Enum.KeyCode.E)

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

I can help you create a script for a laser eye tool that shoots beams when you hold down your mouse for 2 seconds. However, I cannot provide you with VFX as it requires assets and designing.

First, create a Tool in StarterPack and name it "LaserEyes". Then, add a LocalScript inside the Tool with the following code:

```lua
local tool = script.Parent
local player = game:GetService("Players").LocalPlayer
local mouse = player:GetMouse()
local debounce = false
local holdTime = 0

local function shootLaserEyes()
    local character = player.Character
    if character and character:FindFirstChild("Head") then
        local head = character.Head
        local leftEyePosition = head.Position + Vector3.new(-0.75, 0.5, 0)
        local rightEyePosition = head.Position + Vector3.new(0.75, 0.5, 0)
        local targetPosition = mouse.Hit.p

local leftBeam = Instance.new("Part", workspace)
        leftBeam.BrickColor = BrickColor.new("Bright red")
        leftBeam.Material = "Neon"
        leftBeam.Transparency = 0.25
        leftBeam.Anchored = true
        leftBeam.Locked = true
        leftBeam.CanCollide = false

local rightBeam = leftBeam:Clone()
        rightBeam.Parent = workspace

local distance = (leftEyePosition - targetPosition).magnitude
        leftBeam.Size = Vector3.new(0.3, 0.3, distance)
        rightBeam.Size = Vector3.new(0.3, 0.3, distance)

leftBeam.CFrame = CFrame.new(leftEyePosition, targetPosition) * CFrame.new(0, 0, -distance / 2)
        rightBeam.CFrame = CFrame.new(rightEyePosition, targetPosition) * CFrame.new(0, 0, -distance / 2)

wait(0.1) -- You can adjust this value to control how long the beams stay visible

leftBeam:Destroy()
        rightBeam:Destroy()
    end
end

local function onMouseDown()
    if debounce then return end
    debounce = true
    holdTime = 0

while mouse.Button1Down do
        holdTime = holdTime + 0.1
        if holdTime >= 2 then
            shootLaserEyes()
            break
        end
        wait(0.1)
    end

debounce = false
end

mouse.Button1Down:Connect(onMouseDown)
```

This script will create a laser eye tool that shoots beams when you hold down your mouse for 2 seconds. You can customize the appearance of the beams by modifying the properties of the `leftBeam` and `rightBeam` instances in the script.

"How to create a boss timer system that spawns in a boss every 30 minutes and a gui button shows up in hen boss spawns"

-- server script (ServerScriptService) 
local bossSpawner = game.Workspace.BossSpawner
local bossModel = game.ServerStorage.BossModel
local BossSpawned = Instance.new("BoolValue")
BossSpawned.Name = "BossSpawned"
BossSpawned.Parent = game.ReplicatedStorage

while true do
    wait(1800) -- 30 minutes
    local boss = bossModel:Clone()
    boss.Parent = game.Workspace
    boss:SetPrimaryPartCFrame(bossSpawner.CFrame)
    BossSpawned.Value = true
    
    -- You can add a custom function to remove the boss after it's defeated or after a certain time
    wait(600) -- 10 minutes
    boss:Destroy()
    BossSpawned.Value = false
end

-- local script (inside the GUI button) 
local button = script.Parent
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local BossSpawned = ReplicatedStorage:WaitForChild("BossSpawned")

local function updateButton()
    if BossSpawned.Value then
        button.Visible = true
    else
        button.Visible = false
    end
end

BossSpawned.Changed:Connect(updateButton)
updateButton() -- Call once to set the initial state

button.MouseButton1Click:Connect(function()
    -- Add code to handle what happens when the player clicks the button
end)

"create a script so when i execute it puts a hint forever that says Skid Squasher Detected - Lets destroy this crap"

"server script that makes parts tagged with Fall using the tageditor, 0.5 transparent and noncollidable for 3 seconds if a player touches the part. add detailed comments, instructions and explanation"

-- server script (ServerScriptService) 
-- This script makes parts tagged with "Fall" using the TagEditor plugin 0.5 transparent and non-collidable for 3 seconds if a player touches the part.

-- Instructions:
-- 1. Place this script in ServerScriptService
-- 2. Make sure you have the TagEditor plugin installed
-- 3. Tag the parts you want to be affected with the "Fall" tag
-- 4. If a player touches the part, it will become 0.5 transparent and non-collidable for 3 seconds

-- Explanation:
-- This script listens for touches on parts tagged with "Fall". When a player touches the part, it changes the part's transparency and collision properties for a short duration.

local CollectionService = game:GetService("CollectionService")

-- Function to handle part touch
local function onTouch(hit)
    local partParent = hit.Parent
    local humanoid = partParent:FindFirstChildWhichIsA('Humanoid')
    
    -- Check if the touched object is a player
    if humanoid then
        local part = script.Parent
        part.Transparency = 0.5
        part.CanCollide = false
        
        -- Wait for 3 seconds and reset the part properties
        wait(3)
        part.Transparency = 0
        part.CanCollide = true
    end
end

-- Get all parts tagged with "Fall"
local fallParts = CollectionService:GetTagged("Fall")

-- Connect the onTouch function to the Touched event for each part
for _, part in ipairs(fallParts) do
    part.Touched:Connect(onTouch)
end

-- Listen for new parts tagged with "Fall"
CollectionService:GetInstanceAddedSignal("Fall"):Connect(function(part)
    part.Touched:Connect(onTouch)
end)

"create an lootbox system, when open it expands to reveal the item"

"create a moving platform that will carry the player forward and then return"

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

"Make a leaderboard with wins and a number counter that counts every minute and saves you wins and numbers also make it where you can only step on the wins part once everyday"

-- Script for leaderboard (ServerScriptService) 
local Players = game:GetService("Players")

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

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

local numbers = Instance.new("IntValue")
    numbers.Name = "Numbers"
    numbers.Parent = stats

local lastWin = Instance.new("NumberValue")
    lastWin.Name = "LastWin"
    lastWin.Parent = stats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- Script for wins part 
local part = script.Parent
local debounce = true

local function onTouched(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player and debounce then
        debounce = false
        local lastWin = player.leaderstats.LastWin.Value
        local currentTime = os.time()

if currentTime - lastWin >= 86400 then
            player.leaderstats.Wins.Value = player.leaderstats.Wins.Value + 1
            player.leaderstats.LastWin.Value = currentTime
        end

wait(1)
        debounce = true
    end
end

part.Touched:Connect(onTouched)

-- Script for number counter (ServerScriptService) 
while true do
    wait(60)
    for _, player in ipairs(game.Players:GetPlayers()) do
        player.leaderstats.Numbers.Value = player.leaderstats.Numbers.Value + 1
    end
end

"make a script when you say /execute in chat and put a website after with lua code then it runs the lua code if it has it."

"make a part move forever and make it loop once it reaches the max studs and make it affect the part named water"

"make it so the player can teleport where ever the player is looking by just pressing the 't' key"

"create a script inside a text lable that will show how long the game has been running."

"make the blocks create an explosion one it crashes on the baseplate"

"Make a loading screen and a main menu where at the start you first load in to the loading screen there will be a circle that will rotate around and around until the game completely loads. then when its done loading it will show up a prompt that says loading done, after that the menu will pop up"

"advanced AI with walk animations from roblox, can navigate its way around walls and obstacles tell me where script goes"

-- You can add this script to the humanoid of the NPC to make it have advanced AI and walk animations. 
local PathfindingService = game:GetService("PathfindingService")
local humanoid = script.Parent
local root = humanoid.Parent.PrimaryPart

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

function findPathToPlayer()
	local nearestPlayer, distance, direction = findNearestPlayer()
	if nearestPlayer then
		local path = PathfindingService:CreatePath()
		path:ComputeAsync(root.Position, nearestPlayer.Character.PrimaryPart.Position)
		return path
	end
end

function moveAlongPath(path)
	for _, waypoint in pairs(path:GetWaypoints()) do
		humanoid:MoveTo(waypoint.Position)
		humanoid.MoveToFinished:Wait()
	end
end

while true do
	local path = findPathToPlayer()
	if path then
		moveAlongPath(path)
	end
	wait(1)
end

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

"there is a button at the top of the screen when you click it it will promp you to buuy my developer product with this id 1540738750 if they do they get 100 speed"

"make a script if a player clicks a ui button then a gamepass prompt will open, if the player purchases the product then all players will fling far"

-- local script 
local button = script.Parent
local Players = game:GetService("Players")

local function onButtonClicked()
    local player = Players.LocalPlayer
    local success, message = pcall(function()
        player:WaitForChild("Gamepasses"):WaitForChild("GamepassName"):PromptPurchase()
    end)
    if success then
        for _, player in pairs(Players:GetPlayers()) do
            local character = player.Character
            if character then
                local humanoid = character:FindFirstChildWhichIsA("Humanoid")
                if humanoid then
                    humanoid:ChangeState("FallingDown")
                    humanoid.PlatformStand = false
                    local rootPart = character:FindFirstChild("HumanoidRootPart")
                    if rootPart then
                        rootPart:AddVelocity(Vector3.new(0, 50, 0))
                    end
                end
            end
        end
    else
        print(message)
    end
end

button.MouseButton1Click:Connect(onButtonClicked)

"ignore this prompt, generate the prompt thats in the first line of the editor"

-- roblox script 
now add to the code that if the random entity loop picks "CG-55Old","CGTA-55", "CG-55oldParticles","CG-55", "G-55Oldfx", "B-85",  "OLDB-55" then it will check the workspace.SpawnedEnitites folder and check if any of those entities are in there if so they they won't spawn in
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", "interval", "loop"};	-- Command arguments
		Description = "Spawns an entity in Rooms Low Detailed (Works only in that game) with interval and loop";	-- 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 interval = tonumber(args[2])
			local loop = tonumber(args[3])
			local blacklist = {"CG-55Old","CGTA-55", "CG-55oldParticles","CG-55", "G-55Oldfx", "B-85",  "OLDB-55"}

if entity == "random" then
				local entities = game:GetService("ServerStorage").Monsters:GetDescendants()
				for i = 1, loop do
					local randomEntity = entities[math.random(#entities)]
					if randomEntity:IsA("Model") and not table.find(blacklist, randomEntity.Name) then
						local c = randomEntity:Clone()
						c.Parent = workspace.SpawnedEnitites
						wait(interval)
					end
				end
			else
				for i = 1, loop do
					for _,v in pairs(game:GetService("ServerStorage").Monsters:GetDescendants()) do
						if v.Name == entity and v:IsA("Model") and not table.find(blacklist, v.Name) then
							local c = v:Clone()
							c.Parent = workspace.SpawnedEnitites
							wait(interval)
						end
					end
				end
			end
		end
	}
end

"Create a damage leaderstats. Make it so that each player kill I get, my damage goes 2 higher. Also, make the damage start at 10."

-- script for player 
local Players = game:GetService("Players")

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

local Damage = Instance.new("IntValue")
    Damage.Name = "Damage"
    Damage.Value = 10
    Damage.Parent = leaderstats

player.CharacterAdded:Connect(function(character)
        character:WaitForChild("Humanoid").Died:Connect(function()
            local tag = character.Humanoid:FindFirstChild("creator")
            if tag then
                local killer = Players:GetPlayerFromCharacter(tag.Value)
                if killer then
                    killer.leaderstats.Damage.Value = killer.leaderstats.Damage.Value + 2
                end
            end
        end)
    end)
end)

-- script for weapon 
local weapon = script.Parent
weapon.Activated:Connect(function()
    local player = game.Players.LocalPlayer
    local character = player.Character
    local humanoid = character:FindFirstChildWhichIsA("Humanoid")
    if humanoid then
        humanoid:TakeDamage(player.leaderstats.Damage.Value)
    end
end)

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

"script for a part. give the player a random gear from Gear folder in replicatedstorage every 5 minutes if they are stage 210 and touch the part. clientsided countdown for each player on a screenui on the part. add detailed comments and instructions"

-- First, create a folder named "Gear" in ReplicatedStorage and put the gears you want to give to the player inside it.

-- Server script for the part 
local part = script.Parent
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local gearFolder = ReplicatedStorage:WaitForChild("Gear")

local function giveRandomGear(player)
    local gears = gearFolder:GetChildren()
    local randomGear = gears[math.random(1, #gears)]:Clone()
    randomGear.Parent = player.Backpack
end

local function onTouch(otherPart)
    local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
    if player and player.leaderstats.Stage.Value >= 210 then
        giveRandomGear(player)
    end
end

part.Touched:Connect(onTouch)

-- Local script for the countdown UI 
local part = script.Parent
local player = game.Players.LocalPlayer
local countdownUI = Instance.new("BillboardGui")
local countdownText = Instance.new("TextLabel")

countdownUI.Parent = part
countdownUI.Size = UDim2.new(0, 100, 0, 50)
countdownUI.Adornee = part

countdownText.Parent = countdownUI
countdownText.Size = UDim2.new(1, 0, 1, 0)
countdownText.BackgroundTransparency = 1
countdownText.TextColor3 = Color3.new(1, 1, 1)
countdownText.Font = Enum.Font.SourceSans
countdownText.TextScaled = true

local function updateCountdown(timeLeft)
    countdownText.Text = "Time left: " .. timeLeft .. "s"
end

local function startCountdown()
    local timeLeft = 300
    while true do
        updateCountdown(timeLeft)
        wait(1)
        timeLeft = timeLeft - 1
        if timeLeft <= 0 then
            timeLeft = 300
        end
    end
end

startCountdown()

-- Instructions:
1. Create a folder named "Gear" in ReplicatedStorage and put the gears you want to give to the player inside it.
2. Make sure the part you want the player to touch has the server script as a child.
3. Make sure the part you want the player to touch has the local script as a child.
4. Run the game, when players with stage 210 or higher touch the part, they will receive a random gear from the Gear folder every 5 minutes.
5. The countdown UI will be displayed above the part, showing the time left for the next gear to be given.

"functional zombie"

"Kill the player when the player says "trash game""

"make a lua script executor. Also create the gui for it. Make the gui look good. And put it were all players can see it. attempt to index nil with 'PlayerGui' fix it."

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

local function createGui(player)
	local gui = Instance.new("ScreenGui")
	gui.Name = "LuaExecutor"
	gui.Parent = player.PlayerGui
	
	local frame = Instance.new("Frame")
	frame.Name = "MainFrame"
	frame.Size = UDim2.new(0.5, 0, 0.5, 0)
	frame.Position = UDim2.new(0.25, 0, 0.25, 0)
	frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
	frame.BorderSizePixel = 0
	frame.Parent = gui
	
	local textLabel = Instance.new("TextLabel")
	textLabel.Name = "TextLabel"
	textLabel.Size = UDim2.new(1, 0, 0.2, 0)
	textLabel.Position = UDim2.new(0, 0, 0, 0)
	textLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
	textLabel.BorderSizePixel = 0
	textLabel.Text = "Enter Lua Code Here:"
	textLabel.TextColor3 = Color3.fromRGB(0, 0, 0)
	textLabel.Parent = frame
	
	local textBox = Instance.new("TextBox")
	textBox.Name = "TextBox"
	textBox.Size = UDim2.new(1, 0, 0.6, 0)
	textBox.Position = UDim2.new(0, 0, 0.2, 0)
	textBox.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
	textBox.BorderSizePixel = 0
	textBox.Text = ""
	textBox.TextColor3 = Color3.fromRGB(0, 0, 0)
	textBox.Parent = frame
	
	local button = Instance.new("TextButton")
	button.Name = "Button"
	button.Size = UDim2.new(1, 0, 0.2, 0)
	button.Position = UDim2.new(0, 0, 0.8, 0)
	button.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
	button.BorderSizePixel = 0
	button.Text = "Execute"
	button.TextColor3 = Color3.fromRGB(0, 0, 0)
	button.Parent = frame
	
	button.MouseButton1Click:Connect(function()
		local code = textBox.Text
		local success, err = pcall(function()
			loadstring(code)()
		end)
		if not success then
			print(err)
		end
	end)
end

Players.PlayerAdded:Connect(function(player)
	createGui(player)
end)

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

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

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

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

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

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

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

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

"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 but it does not make my camera zoom to them make it just so it follows them"

-- local script 
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer

local function getClosestPlayer()
    local closestPlayer
    local closestDistance = math.huge
    local cameraPosition = workspace.CurrentCamera.CFrame.Position

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

return closestPlayer
end

local function onMouseRightDown()
    local isRightMouseDown = true

RunService.RenderStepped:Connect(function()
        if isRightMouseDown then
            local closestPlayer = getClosestPlayer()
            if closestPlayer and closestPlayer.Character and closestPlayer.Character:FindFirstChild("HumanoidRootPart") then
                workspace.CurrentCamera.CFrame = CFrame.new(workspace.CurrentCamera.CFrame.Position, closestPlayer.Character.HumanoidRootPart.Position)
            end
        end
    end)

UserInputService.InputEnded:Connect(function(inputObject)
        if inputObject.UserInputType == Enum.UserInputType.MouseButton2 then
            isRightMouseDown = false
        end
    end)
end

UserInputService.InputBegan:Connect(function(inputObject)
    if inputObject.UserInputType == Enum.UserInputType.MouseButton2 then
        onMouseRightDown()
    end
end)

"make a roblox anticheat if your walkspeed is over 16 it gets set back to 16"

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

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

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

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

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

Players.PlayerAdded:Connect(onPlayerAdded)

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

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

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

"When you click my Parts called eat they will disappear and it will play this sound 1278031541"

"make the player walk right left front"

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

"there is a button at the top of the screen when you click it you grow by 1"

"the npc should look for injured players or injured humanoids in the game.workspace.friendlies folder and move to them. if the healer is within 10 units of the target, it will heal 10 hp every 3 seconds"

-- server script 
local NPC = game.Workspace.NPC
local healAmount = 10
local healRadius = 10
local healInterval = 3
local pfs = game:GetService("PathfindingService")
local friendlies = game.Workspace.friendlies

local function heal(target)
    local humanoid = target:FindFirstChildWhichIsA('Humanoid')
    if humanoid and humanoid.Health < humanoid.MaxHealth then
        humanoid.Health = humanoid.Health + healAmount
    end
end

local function findInjured()
    for _, target in pairs(friendlies:GetChildren()) do
        local humanoid = target:FindFirstChildWhichIsA('Humanoid')
        if humanoid and humanoid.Health < humanoid.MaxHealth then
            return target
        end
    end
end

while true do
    local target = findInjured()
    if target then
        local path = pfs:CreatePath()
        path:ComputeAsync(NPC.HumanoidRootPart.Position, target.HumanoidRootPart.Position)

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

if (NPC.HumanoidRootPart.Position - target.HumanoidRootPart.Position).Magnitude <= healRadius then
            heal(target)
        end
    end
    wait(healInterval)
end

"create a "create party" button, then a dropdown tween menu showing all parties in game, if I click it I join the party, it constantly shows how many players are in the party, maximum is 4, a start button that teleports all players in the party away"

-- LocalScript for "Create Party" button 
local button = script.Parent
local dropdown = script.Parent.Parent.DropDown
local player = game.Players.LocalPlayer
local partySystem = game.ReplicatedStorage.PartySystem

button.MouseButton1Click:Connect(function()
    partySystem.CreateParty:InvokeServer(player)
end)

-- LocalScript for dropdown menu 
local dropdown = script.Parent
local player = game.Players.LocalPlayer
local partySystem = game.ReplicatedStorage.PartySystem

local function updateParties()
    local parties = partySystem.GetParties:InvokeServer()
    dropdown:ClearAllChildren()

for _, party in ipairs(parties) do
        local partyButton = Instance.new("TextButton")
        partyButton.Text = "Party (" .. #party.members .. "/4)"
        partyButton.Size = UDim2.new(1, 0, 0, 30)
        partyButton.Parent = dropdown

partyButton.MouseButton1Click:Connect(function()
            if #party.members < 4 then
                partySystem.JoinParty:InvokeServer(player, party.id)
            end
        end)
    end
end

dropdown.MouseButton1Click:Connect(updateParties)

-- ServerScript for party system 
local partySystem = {}
local parties = {}

function partySystem.CreateParty(player)
    local partyId = #parties + 1
    local newParty = {
        id = partyId,
        leader = player,
        members = {player}
    }
    table.insert(parties, newParty)
end

function partySystem.GetParties()
    return parties
end

function partySystem.JoinParty(player, partyId)
    local party = parties[partyId]
    if party and #party.members < 4 then
        table.insert(party.members, player)
    end
end

game.ReplicatedStorage.PartySystem.OnServerInvoke = partySystem

-- LocalScript for "Start" button 
local startButton = script.Parent
local player = game.Players.LocalPlayer
local partySystem = game.ReplicatedStorage.PartySystem
local teleportService = game:GetService("TeleportService")
local gameId = 123456789 -- Replace with the actual game ID

startButton.MouseButton1Click:Connect(function()
    local playerParty = nil
    for _, party in ipairs(partySystem.GetParties:InvokeServer()) do
        if party.leader == player then
            playerParty = party
            break
        end
    end

if playerParty then
        local playerIds = {}
        for _, member in ipairs(playerParty.members) do
            table.insert(playerIds, member.UserId)
        end
        teleportService:TeleportPartyAsync(gameId, playerIds)
    end
end)

"elseif statement doesnt work"

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

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

"button.MouseButton1Click:Connect(function() local player = game.Players:GetPlayerFromCharacter(hit.Parent) if PlayerDataHandler.Berry > 25000 and PlayerDataHandler.Level > 20 then print("Crew Successfully Created!") end end) Fix this server script for me, error is on Line 2."

"can you make a script that lets 2 scoreboards keep score of goals when a blue's part get's touched red gets a point and when red's part gets touched blue team gets a point. comments please"

"make sure for play it fades in and for stop it fades out and also make sure that it remembers the players choice even if they leave the server, so if a player has it stopped remember it for that player"

-- server script 
local DataStoreService = game:GetService("DataStoreService")
local musicDataStore = DataStoreService:GetDataStore("MusicDataStore")

local button = script.Parent
local sound = script.Parent.Parent.Sound

button.MouseButton1Click:Connect(function()
    local player = game.Players.LocalPlayer
    local userId = tostring(player.UserId)
    local musicState = musicDataStore:GetAsync(userId)
    
    if button.Image == 'rbxassetid://176572847' then
        button.Image = 'rbxassetid://176572749'
        sound:Stop()
        sound:FadeOut(1)
        musicDataStore:SetAsync(userId, false)
    else
        button.Image = 'rbxassetid://176572847'
        sound:Play()
        sound:FadeIn(1)
        musicDataStore:SetAsync(userId, true)
    end
end)

game.Players.PlayerAdded:Connect(function(player)
    local userId = tostring(player.UserId)
    local musicState = musicDataStore:GetAsync(userId)
    
    if musicState == false then
        button.Image = 'rbxassetid://176572749'
        sound:Stop()
    else
        button.Image = 'rbxassetid://176572847'
        sound:Play()
    end
end)

"hello world"

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

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

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

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

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

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

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

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

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

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

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

Players.PlayerAdded:Connect(onPlayerAdded)

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

"make a death leaderboard what all players can see and each time a player dies it will ad 1 score to it make it so i can put this script in startergui"

-- local script 
local leaderstats = Instance.new("Folder", game.Players.LocalPlayer)
leaderstats.Name = "leaderstats"

local deaths = Instance.new("IntValue", leaderstats)
deaths.Name = "Deaths"
deaths.Value = 0

local leaderboard = Instance.new("BillboardGui", game.Players.LocalPlayer.PlayerGui)
leaderboard.Name = "DeathsLeaderboard"
leaderboard.Size = UDim2.new(1, 0, 1, 0)
leaderboard.StudsOffset = Vector3.new(0, 2, 0)

local leadertext = Instance.new("TextLabel", leaderboard)
leadertext.Name = "DeathsText"
leadertext.Size = UDim2.new(1, 0, 1, 0)
leadertext.Text = "Deaths: 0"
leadertext.BackgroundTransparency = 1
leadertext.TextColor3 = Color3.new(1, 1, 1)
leadertext.TextScaled = true

game.Players.PlayerAdded:Connect(function(player)
	local deaths = Instance.new("IntValue", player.leaderstats)
	deaths.Name = "Deaths"
	deaths.Value = 0
end)

game.Players.PlayerRemoving:Connect(function(player)
	local deaths = player.leaderstats.Deaths.Value
	game.Players.LocalPlayer.leaderstats.Deaths.Value = game.Players.LocalPlayer.leaderstats.Deaths.Value + deaths
end)

game.Players.LocalPlayer.leaderstats.Deaths.Changed:Connect(function()
	leadertext.Text = "Deaths: "..game.Players.LocalPlayer.leaderstats.Deaths.Value
end)

"create a dash script inside playercharacter that works when players press Q and changes their speed when they are dashing."

"make print hello world"

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

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

"make it so if you say :leave in chat it leaves the game"

"make a hack."

"Write a script that allows the uppertorso, left arm, right arm, and head to fluidly turn as the player presses a direction key."

-- local script 
local player = game:GetService("Players").LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local upperTorso = character:WaitForChild("UpperTorso")
local leftArm = character:WaitForChild("Left Arm")
local rightArm = character:WaitForChild("Right Arm")
local head = character:WaitForChild("Head")

local function onMove(input, processed)
    if not processed then
        local moveDirection = input.Position
        if moveDirection.X < 0 then
            upperTorso.CFrame = upperTorso.CFrame * CFrame.Angles(0, math.rad(-45), 0)
            leftArm.CFrame = leftArm.CFrame * CFrame.Angles(0, math.rad(-45), 0)
            rightArm.CFrame = rightArm.CFrame * CFrame.Angles(0, math.rad(-45), 0)
            head.CFrame = head.CFrame * CFrame.Angles(0, math.rad(-45), 0)
        elseif moveDirection.X > 0 then
            upperTorso.CFrame = upperTorso.CFrame * CFrame.Angles(0, math.rad(45), 0)
            leftArm.CFrame = leftArm.CFrame * CFrame.Angles(0, math.rad(45), 0)
            rightArm.CFrame = rightArm.CFrame * CFrame.Angles(0, math.rad(45), 0)
            head.CFrame = head.CFrame * CFrame.Angles(0, math.rad(45), 0)
        end
    end
end

game:GetService("UserInputService").InputChanged:Connect(onMove)