Haddock - Roblox Library

"a roblox script that when you get closer to a part named "test" it makes the ambient more red"

"create a script that makes a roblox game admin have more health when holding a certain tool"

"a lucky coin from hard core leveling warrior that gives me random buffs or debuffs depending on what i roll and it activates as a tool when i click"

"make me a health bar gui, the red goes down when health is low and goes up when health is high"

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

"make it so if i say play in chat then a roblox music id. It makes a mouth on my character removes my face and visualizes the id."

"Create a admin only tool script inside serverscript and tool located in replicatedstorage"

"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 the laser eye tool. Please note that you will need to create the visual effects (VFX) yourself, as it's not possible to generate them through the script alone.

Here's a script that creates a laser eye tool that shoots beams when the mouse is held down for 2 seconds:

```lua
-- Local script

local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local mouse = player:GetMouse()

local debounce = false
local holdingMouse = false
local holdTime = 0

mouse.Button1Down:Connect(function()
	holdingMouse = true
	while holdingMouse do
		holdTime = holdTime + 0.1
		if holdTime >= 2 and not debounce then
			debounce = true
			shootLaserBeams()
			wait(2) -- Cooldown time
			debounce = false
		end
		wait(0.1)
	end
end)

mouse.Button1Up:Connect(function()
	holdingMouse = false
	holdTime = 0
end)

function shootLaserBeams()
	local head = character.Head
	local leftEyePosition = head.Position + Vector3.new(-0.5, 0, 0)
	local rightEyePosition = head.Position + Vector3.new(0.5, 0, 0)
	local direction = mouse.Hit.Position - head.Position

createLaserBeam(leftEyePosition, direction)
	createLaserBeam(rightEyePosition, direction)
end

function createLaserBeam(startPosition, direction)
	local beam = Instance.new("Part", workspace)
	beam.BrickColor = BrickColor.new("Bright red")
	beam.FormFactor = "Custom"
	beam.Material = "Neon"
	beam.Transparency = 0.25
	beam.Anchored = true
	beam.Locked = true
	beam.CanCollide = false
	local distance = 100 -- Change this value to adjust the length of the laser beams
	beam.Size = Vector3.new(0.3, 0.3, distance)
	beam.CFrame = CFrame.new(startPosition, startPosition + direction) * CFrame.new(0, 0, -distance / 2)

-- Add your VFX here

wait(0.1) -- Adjust this value to control how long the laser beams stay visible
	beam:Destroy()
end
```

This script creates a laser eye tool that shoots beams when the mouse is held down for 2 seconds. You'll need to create the visual effects (VFX) yourself and add them to the script where indicated.

"make a clicking simulator."

"wait 5 seconds and use pivot to make a model 100 z coordinates for 10 seconds"

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

"create a script that will allow the player too pick up a object and make it disappear when clicked"

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

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

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

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

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

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

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

player.CharacterAdded:Connect(onCharacterAdded)
end

Players.PlayerAdded:Connect(onPlayerAdded)

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

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

"if you die you get kicked when you get kicked it can say your bad or L or bozo or get better or LOSER"

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

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

"fix this script -- Get the relevant services local Players = game:GetService("Players") local BanService = game:GetService("BanService") -- Get the ban and kick buttons local banButton = script.Parent.BanButton local kickButton = script.Parent.KickB"

"can you make a server script that will regenerate the player health little by little if they stay ontop of a part can add a check inside the while loop to check if the player is still touching brick"

"lava rain on players heads and kills"

"when script.parent textbutton triggered then do a low graphics toggleable"

"make a part change color every 2 seconds to a random color"

"punch system"

"create a daily reward system using buttons that says claim. give instruction on how to set up."

-- local script inside the Claim button 
local button = script.Parent
local player = game:GetService("Players").LocalPlayer
local datastore = game:GetService("DataStoreService"):GetDataStore("DailyRewards")

local function claimReward()
    local success, err = pcall(function()
        local lastClaimed = datastore:GetAsync(player.UserId .. "-LastClaimed")
        local currentDate = os.date("*t", os.time())
        
        if lastClaimed then
            if currentDate.yday == lastClaimed.yday and currentDate.year == lastClaimed.year then
                button.Text = "Already Claimed"
                return
            end
        end
        
        player.leaderstats.Currency.Value = player.leaderstats.Currency.Value + 100
        datastore:SetAsync(player.UserId .. "-LastClaimed", currentDate)
        button.Text = "Claimed"
    end)
    
    if not success then
        warn("Error claiming daily reward:", err)
    end
end

button.MouseButton1Click:Connect(claimReward)

Instructions:
1. Create a ScreenGui within the StarterGui.
2. Add a TextButton inside the ScreenGui and name it "Claim".
3. Add a LocalScript inside the TextButton.
4. Copy the code above into the LocalScript.
5. Make sure you have a Currency value inside the player's leaderstats folder.
6. Now, when the player clicks the "Claim" button, they will receive a daily reward of 100 Currency. The button will update to show if the reward has already been claimed for the day.

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

"make a script that makes my character teleport in front inside and behind a close opposite team player when i press z and turns off when i press z again"

-- local script 
local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character
local teleportActive = false

local function onKeyPress(input)
    if input.KeyCode == Enum.KeyCode.Z then
        teleportActive = not teleportActive
    end
end

local function onRenderStep()
    if teleportActive and character then
        local closestDistance = math.huge
        local closestPlayer = nil
        for _, otherPlayer in ipairs(Players:GetPlayers()) do
            if otherPlayer.TeamColor ~= player.TeamColor then
                local otherCharacter = otherPlayer.Character
                if otherCharacter then
                    local distance = (otherCharacter.PrimaryPart.Position - character.PrimaryPart.Position).Magnitude
                    if distance < closestDistance then
                        closestDistance = distance
                        closestPlayer = otherPlayer
                    end
                end
            end
        end
        if closestPlayer and closestPlayer.Character then
            character.PrimaryPart.CFrame = closestPlayer.Character.PrimaryPart.CFrame * CFrame.new(0, 0, 5)
        end
    end
end

UserInputService.InputBegan:Connect(onKeyPress)
game:GetService("RunService").RenderStepped:Connect(onRenderStep)

"When they leave the game their data gets saved and when they get an error it will say reload game. do not kick the person"

-- data store script (ServerScriptService) 
local DataStoreService = game:GetService("DataStoreService")
local Players = game:GetService("Players")
local dataStore = DataStoreService:GetDataStore("PlayerData")

local function saveData(player)
    local success, err = pcall(function()
        local data = {
            Coins = player.leaderstats.Coins.Value,
            Bag = player.leaderstats.Bag.Value
        }
        dataStore:SetAsync(player.UserId, data)
    end)

if not success then
        player:Kick("An error occurred while saving your data. Please reload the game.")
    end
end

local function loadData(player)
    local success, err = pcall(function()
        local data = dataStore:GetAsync(player.UserId)
        if data then
            player.leaderstats.Coins.Value = data.Coins
            player.leaderstats.Bag.Value = data.Bag
        end
    end)

if not success then
        player:Kick("An error occurred while loading your data. Please reload the game.")
    end
end

Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Wait()
    loadData(player)
end)

Players.PlayerRemoving:Connect(function(player)
    saveData(player)
end)

"make it so that the humanoid dashes in in all directions when pressing q for each animation with custom animations forward, backwards, left side, right side"

-- local script 
local player = game:GetService("Players").LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local animations = {
    forward_dash = "rbxassetid://YourForwardDashAnimationID",
    backward_dash = "rbxassetid://YourBackwardDashAnimationID",
    left_dash = "rbxassetid://YourLeftDashAnimationID",
    right_dash = "rbxassetid://YourRightDashAnimationID"
}

local function playAnimation(animationId)
    local animation = Instance.new("Animation")
    animation.AnimationId = animationId
    local animationTrack = humanoid:LoadAnimation(animation)
    animationTrack:Play()
end

local function dash()
    local moveDirection = humanoid.MoveDirection
    if moveDirection.Z > 0 then
        playAnimation(animations.forward_dash)
    elseif moveDirection.Z < 0 then
        playAnimation(animations.backward_dash)
    elseif moveDirection.X > 0 then
        playAnimation(animations.right_dash)
    elseif moveDirection.X < 0 then
        playAnimation(animations.left_dash)
    end
end

game:GetService("UserInputService").InputBegan:Connect(function(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.Q and not gameProcessed then
        dash()
    end
end)

"When you join the game, there will be a GUI that says "Play" and "Quit" and the background will be fully Black and the "Play" and "Quit" will be UICorner"

"make an infinite spawner"

"Make a button that teleports a player to a new place, as if its from a lobby to a server"

"The camera will return back to it's original position when the player zooms out, but when the player presses Z to zoom in, the camerapart is no longer attached to the player. How can we fix this?"

You can solve this issue by updating the cameraPart's position to the offset location every frame, even when the camera is zoomed in. Here's how you can modify the script:

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

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

local function setUpCamera(character)
	-- Wait for the HumanoidRootPart to load
	local humanoidRootPart = character:WaitForChild("HumanoidRootPart")

-- Set the initial position of the camera part
	cameraPart.Position = humanoidRootPart.Position + zoomOffset
	
	-- Update the cameraPart's position to the offset location every frame
	RunService.RenderStepped:Connect(function()
		if zoomedIn then
			cameraPart.Position = humanoidRootPart.Position + zoomOffset
		else
			cameraPart.Position = humanoidRootPart.Position - zoomOffset
		end
	end)
end

-- Wait for the player's character to load
setUpCamera(player.CharacterAdded:Wait())

player.CharacterAdded:Connect(setUpCamera)

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

In this updated script, we added a condition in the RenderStepped event to check if the camera is zoomed in. If it is, the cameraPart's position is updated to the offset location above the player's head. If it's not, the cameraPart's position is updated to the offset location below the player's head. This ensures that the cameraPart is always attached to the player, even when the camera is zoomed in.

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

"Create a script that makes a particle effect on a player when a player levels up"

"make a script every time an player kills another player, their max health will increase 25 more and will add more 5 walkspeed and this sound id will play: "8863377426""

-- server script 
game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.Died:Connect(function()
            local killer = game.Players:GetPlayerFromCharacter(humanoid:FindFirstChild("creator.Value"))
            if killer then
                local killerCharacter = killer.Character
                if killerCharacter then
                    local killerHumanoid = killerCharacter:FindFirstChild("Humanoid")
                    if killerHumanoid then
                        killerHumanoid.MaxHealth = killerHumanoid.MaxHealth + 25
                        killerHumanoid.WalkSpeed = killerHumanoid.WalkSpeed + 5
                        local sound = Instance.new("Sound", killerCharacter)
                        sound.SoundId = "rbxassetid://8863377426"
                        sound:Play()
                    end
                end
            end
        end)
    end)
end)

"Create a script where the camera rotates with Player head"

"make a chat tag"

"when the textbutton that is named "Sport" is clicked a sound named "EnableSport" plays and that is located inside of the button play's id : "13885549328" and when the player click's the button again a sound named "DisableSport" Plays id "13885525681""

"script a chair sit"

"when you have launcher equipped and tap the screen the bey launches and then you can control the bey with the mobile joystick add comments"

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

-- Function to handle the Bey launch
local function launchBey(player)
    local character = player.Character
    local humanoid = character:FindFirstChild("Humanoid")
    local launcher = character:FindFirstChild("Launcher")
    if launcher then
        humanoid:UnequipTools() -- Unequip all tools
        launcher:Activate() -- Activate the launcher
        local bey = launcher.Bey -- Get the Bey from the launcher
        bey.Velocity = Vector3.new(0, 100, 0) -- Launch the Bey upwards
    end
end

-- Function to handle the Bey control
local function controlBey(player, input)
    local character = player.Character
    local launcher = character:FindFirstChild("Launcher")
    if launcher then
        local bey = launcher.Bey -- Get the Bey from the launcher
        bey.Velocity = Vector3.new(input.Position.X, bey.Velocity.Y, input.Position.Y) -- Control the Bey with the joystick
    end
end

-- Connect the touch events to the functions
UserInputService.TouchBegan:Connect(function(input, processed)
    if not processed then
        local player = Players:GetPlayerFromCharacter(input.Target.Parent)
        if player then
            launchBey(player)
        end
    end
end)
UserInputService.TouchMoved:Connect(function(input, processed)
    if not processed then
        local player = Players:GetPlayerFromCharacter(input.Target.Parent)
        if player then
            controlBey(player, input)
        end
    end
end)

"make a part"

"Workspace.Teleport Pads.Script:5: attempt to index nil with 'leaderstats'"

Sorry for the confusion, the error means that 'leaderstats' does not exist for the player. This could be because the player does not have a leaderstats value or it has not been initialized yet. Here's a corrected version:

```lua
local player = game.Players.LocalPlayer

-- Check if player has leaderstats
if player:FindFirstChild("leaderstats") then
    local rebirths = player.leaderstats.Rebirths
    local pad1 = game.Workspace.Pad1
    local pad2 = game.Workspace.Pad2

local function teleport(character, destination)
        character:MoveTo(destination.Position)
    end

pad1.Touched:Connect(function(hit)
        local character = hit.Parent:FindFirstChild("Humanoid")
        if character and rebirths.Value >= 3 then
            teleport(character, pad2)
        end
    end)

pad2.Touched:Connect(function(hit)
        local character = hit.Parent:FindFirstChild("Humanoid")
        if character then
            teleport(character, pad1)
        end
    end)
else
    print("Player does not have leaderstats")
end
```
This script checks if the player has 'leaderstats' before trying to access it. If 'leaderstats' does not exist, it prints a message to the console.

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

"add this and nothing else. prompt.ActionText = "Open" -- set initial ActionText to "Open" local function toggleDoor(player) local playerRank = player:GetRankInGroup(group) if playerRank >= 4 then if open then closeTween:Play() open = false"

"CREATE A ZOMBIE SPAWNER"

"create a rewind feature that captures the player's movements then when rewinding cycles through the players movements. also make it so that the time rewinding, speed rewinding, and the key to activate rewinding is configurable"

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

local rewindTime = 10 -- time in seconds to rewind, configurable
local rewindSpeed = 1 -- speed of rewind, configurable

local playerPositions = {}

local function capturePlayerPosition(player)
    local character = player.Character
    if character then
        local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
        if humanoidRootPart then
            if not playerPositions[player.UserId] then
                playerPositions[player.UserId] = {}
            end
            table.insert(playerPositions[player.UserId], humanoidRootPart.Position)
            if #playerPositions[player.UserId] > rewindTime * 60 then -- assuming 60 FPS
                table.remove(playerPositions[player.UserId], 1)
            end
        end
    end
end

local function rewindPlayerPosition(player)
    local character = player.Character
    if character then
        local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
        if humanoidRootPart and playerPositions[player.UserId] and #playerPositions[player.UserId] > 0 then
            humanoidRootPart.CFrame = CFrame.new(playerPositions[player.UserId][#playerPositions[player.UserId]])
            table.remove(playerPositions[player.UserId])
        end
    end
end

RunService.Heartbeat:Connect(function()
    for _, player in pairs(Players:GetPlayers()) do
        capturePlayerPosition(player)
    end
end)

game.ReplicatedStorage.Rewind.OnServerEvent:Connect(function(player)
    for i = 1, rewindTime * rewindSpeed do
        rewindPlayerPosition(player)
        task.wait(1/rewindSpeed)
    end
end)

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

local rewindKey = Enum.KeyCode.R -- key to activate rewind, configurable

local function rewind()
    game.ReplicatedStorage.Rewind:FireServer()
end

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == rewindKey then
        rewind()
    end
end)

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

"The hinge needs to be in it. Is there another way to set the script to open at 90, and close at 0."

"Fix this: coroutine.wrap(function() --START-- local EB_anim_tmp_humanoid = script.Parent.Parent:WaitForChild("Humanoid") local EB_anim_tmp_animator = EB_anim_tmp_humanoid:WaitForChild("Animator") local EB_anim_tmp_animation = Instance.new("Animatio"

"make a script with 1 local and 1 server script and a remote event, when using the parent tool, when using the tool, it will summon a 61.5, 520, 63 pillar made of grass and green that spawns 511 studs under the point you clicked at and rises up"

-- Server Script (ServerScriptService) 
local remoteEvent = Instance.new("RemoteEvent")
remoteEvent.Name = "SummonPillarEvent"
remoteEvent.Parent = game.ReplicatedStorage

local function onPillarRequest(player, position)
    local pillar = Instance.new("Part")
    pillar.Size = Vector3.new(61.5, 520, 63)
    pillar.Anchored = true
    pillar.Material = Enum.Material.Grass
    pillar.Color = Color3.fromRGB(0, 255, 0)
    pillar.CFrame = CFrame.new(position.x, position.y - 511, position.z)
    pillar.Parent = game.Workspace

-- Make the pillar rise up
    for i = 1, 520 do
        pillar.CFrame = pillar.CFrame + Vector3.new(0, 1, 0)
        wait(0.01) -- Adjust speed of rising as needed
    end
end

remoteEvent.OnServerEvent:Connect(onPillarRequest)

-- Local Script (inside the tool) 
local tool = script.Parent
local remoteEvent = game.ReplicatedStorage:WaitForChild("SummonPillarEvent")

tool.Activated:Connect(function()
    local player = game.Players.LocalPlayer
    local mouse = player:GetMouse()
    local targetPosition = mouse.Hit.p

remoteEvent:FireServer(targetPosition)
end)

-- Remote Event (ReplicatedStorage) 
-- RemoteEvent is already created in the server script above and doesn't need additional code here.

"but jump power increases every second"

"hello world"

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

"Make a roblox script where if Harlandroblox says !game2 then it will rain red blocks from the sky above all players head for 5 seconds and they will disappear off the floor in 10 seconds but if a players touches one they get kicked and it will says Oops!"

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

local function onChat(player, message)
    if player.Name == "Harlandroblox" and message == "!game2" then
        local function rainRedBlocks()
            for _, player in ipairs(Players:GetPlayers()) do
                local part = Instance.new("Part")
                part.Parent = game.Workspace
                part.Position = player.Character.Head.Position + Vector3.new(0, 50, 0)
                part.Color = Color3.fromRGB(255, 0, 0)
                part.Anchored = true
                part.Touched:Connect(function(hit)
                    local hitPlayer = Players:GetPlayerFromCharacter(hit.Parent)
                    if hitPlayer then
                        hitPlayer:Kick("Oops!")
                    end
                end)
                game.Debris:AddItem(part, 10)
            end
        end

for i = 1, 5 do
            rainRedBlocks()
            wait(1)
        end
    end
end

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

"map rebuilder the Map is in workspace map folder every 2 minutes delete the children of Map folder and Copy the Children of OriginalMap folder in replicatedstorage make sure that the parts cant fall down and make sure they can be destroyed by tools and stuff make sure parts don't fall to gravity"

"make it better, make it better ,make it better more particles, better it is"

-- server script (ServerScriptService) 
local part = Instance.new("Part")
part.Parent = game.Workspace
part.Anchored = true
part.Position = Vector3.new(0, 0, 0)

local particleEmitter = Instance.new("ParticleEmitter")
particleEmitter.Parent = part

particleEmitter.Texture = "rbxassetid://11388840312" -- cloth texture
particleEmitter.Lifetime = NumberRange.new(1, 2) -- increase lifetime
particleEmitter.Speed = NumberRange.new(20, 30) -- increase speed
particleEmitter.SpreadAngle = Vector2.new(-180, 180) -- increase spread angle
particleEmitter.Rate = 500 -- increase rate to 500 for more particles
particleEmitter.Rotation = NumberRange.new(-360, 360) -- increase rotation
particleEmitter.RotSpeed = NumberRange.new(-360, 360) -- increase rotation speed
particleEmitter.Size = NumberSequence.new({NumberSequenceKeypoint.new(0, 3), NumberSequenceKeypoint.new(1, 0)}) -- increase size for better visibility
particleEmitter.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0, 0.5), NumberSequenceKeypoint.new(1, 1)}) -- increase transparency
particleEmitter.LightEmission = 1 -- increase light emission
particleEmitter.LightInfluence = 1 -- increase light influence
particleEmitter.ZOffset = 0
particleEmitter.VelocitySpread = 200 -- increase velocity spread for wider dispersion
particleEmitter.Enabled = true

"make script to go visible and invisible"

-- This Script is not generated by ScripterAI - It's a community contribution.
-- Go Invisible And Visible
-- Local Script
local Player = game.Players.LocalPlayer
game:GetService("UserInputService").InputBegan:Connect(function(key)
    if key.KeyCode == Enum.KeyCode.E then
       game.ReplicatedStorage.Invisible:FireServer(Player)
    end
end)
 
game:GetService("UserInputService").InputBegan:Connect(function(key)
    if key.KeyCode == Enum.KeyCode.Q then
       game.ReplicatedStorage.Visible:FireServer(Player)
    end
end)
 
-- MAKE A REMOTE EVENT IN REPLICATEDSTORAGE AND CALL IT "Invisible"
-- MAKE A REMOTE EVENT IN REPLICATEDSTORAGE AND CALL IT "Visible"
-- MAKE A SCRIPT IN SERVER SCRIPT SERVICE AND PUT THIS CODE IN IT AND GET RID OF THE COMMENTS WHEN PASTED IN THE SERVER SCRIPT
 
 
---- Server Script
--function Invisible(Player)
    --local RealPlayer = game.Workspace:FindFirstChild(Player.Name)
    --for _,v in pairs(RealPlayer:GetChildren()) do
        --if v:IsA("BasePart") then
            --v.Transparency = 1
        --end
    --end
--end
 
 
--game.ReplicatedStorage.Visible.OnServerEvent:Connect(Invisible)
 
--function Visible(Player)
    --local RealPlayer = game.Workspace:FindFirstChild(Player.Name)
    --for _,v in pairs(RealPlayer:GetChildren()) do
        --if v:IsA("BasePart") then
            --v.Transparency = 0
        --end
    --end
--end
 
 
--game.ReplicatedStorage.Invisible.OnServerEvent:Connect(Visible)
 
--PRESS E TO GO INVISIBLE
--PRESS Q TO GO VISIBLE

"fly script"

"when Harlandroblox says !game6 it will say on the middle of the screen if you talk with in 60 seconds you will get kicked and if anyone does talk before the 60 second rule is up it will kick the player who talked and it will say you talked..... but if Harlandroblox talks it will not kick him"

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

local function onChat(player, message)
    if player.Name == "Harlandroblox" and message == "!game6" then
        local screenMessage = Instance.new("Message")
        screenMessage.Parent = game.Workspace
        screenMessage.Text = "If you talk within 60 seconds, you will get kicked."

local function onPlayerChatted(plr, msg)
            if plr.Name ~= "Harlandroblox" then
                plr:Kick("You talked.")
                ChatService:RemoveSpeaker(plr.Name)
            end
        end

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

Players.PlayerAdded:Connect(function(p)
            p.Chatted:Connect(function(msg) onPlayerChatted(p, msg) end)
        end)

wait(60)
        screenMessage:Destroy()

for _, p in ipairs(Players:GetPlayers()) do
            p.Chatted:Disconnect()
        end

Players.PlayerAdded:Disconnect()
    end
end

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

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

"make a admin gui that works"

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

"A server script that removes the "Tackle" tool from you when you get the "Football" tool"

"Make a roblox script where my Part called leee will show the top 20 players with the most of my leaderstat called Robux"

"Create a team save script that saves a players team"

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

"make that it gives only 4 punches in this order: anim1, anim2, anim1, anim2"

"Make a script that shows for the local player a neon outline of all players. Like esp"

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

local function createOutline(character)
    local outlineModel = Instance.new("Model")
    outlineModel.Name = "OutlineModel"
    outlineModel.Parent = workspace

for _, part in ipairs(character:GetChildren()) do
        if part:IsA("BasePart") then
            local neonPart = part:Clone()
            neonPart.BrickColor = BrickColor.new("Bright blue")
            neonPart.Material = Enum.Material.Neon
            neonPart.Transparency = 0.5
            neonPart.Parent = outlineModel
            neonPart.CanCollide = false

local weld = Instance.new("Weld")
            weld.Part0 = part
            weld.Part1 = neonPart
            weld.Parent = neonPart
        end
    end

return outlineModel
end

local function updateOutlines()
    local localPlayer = Players.LocalPlayer
    local localCharacter = localPlayer.Character

if not localCharacter then return end

for _, player in ipairs(Players:GetPlayers()) do
        if player ~= localPlayer then
            local character = player.Character
            if character and not character:FindFirstChild("OutlineModel") then
                local outlineModel = createOutline(character)
                outlineModel.Parent = character
            end
        end
    end
end

RunService.RenderStepped:Connect(updateOutlines)

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

"elseif statement doesnt work"

"create a script that gives a player 1 random item from a folder in serverstorage called ToolsFolder when a player right clicks on a part called Chest"

"script a tool that makes the player shrink when player left clicks the tool"

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

local function shrink()
    humanoid:LoadAnimation(tool.ShrinkAnimation):Play()
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Jumping, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Running, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.RunningNoPhysics, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Swimming, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Climbing, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.FallingDown, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Ragdoll, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.GettingUp, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.FreeFalling, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Landed, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Seated, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.PlatformStanding, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Dead, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.StrafingNoPhysics, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Physics, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.None, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.All, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Flying, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.SuperJump, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Jumping, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Running, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.RunningNoPhysics, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Swimming, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Climbing, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.FallingDown, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Ragdoll, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.GettingUp, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.FreeFalling, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Landed, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Seated, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.PlatformStanding, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Dead, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.StrafingNoPhysics, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Physics, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.None, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.All, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Flying, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.SuperJump, true)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Jumping, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Running, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.RunningNoPhysics, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Swimming, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Climbing, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.FallingDown, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Ragdoll, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.GettingUp, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.FreeFalling, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Landed, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Seated, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.PlatformStanding, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Dead, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.StrafingNoPhysics, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Physics, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.None, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.All, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Flying, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.SuperJump, false)
end

tool.Activated:Connect(shrink)

"You spawn on a baseplate named ‘baseplate’. There is a 5 second countdown that show up on your screen every time you die. When the 5 second countdown ends, you get teleported to another baseplate named ‘arena’."

-- server script 
game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        character:WaitForChild("Humanoid").Died:Connect(function()
            local countdown = Instance.new("IntValue")
            countdown.Name = "Countdown"
            countdown.Value = 5
            countdown.Parent = player
            
            repeat
                wait(1)
                countdown.Value = countdown.Value - 1
            until countdown.Value == 0
            
            local arena = game.Workspace:FindFirstChild("arena")
            player.RespawnLocation = arena.SpawnLocation
            player:LoadCharacter()
        end)
    end)
end)

-- local script 
game.Players.LocalPlayer.ChildAdded:Connect(function(child)
    if child.Name == "Countdown" then
        local screenGui = Instance.new("ScreenGui")
        local textLabel = Instance.new("TextLabel")
        
        textLabel.Text = tostring(child.Value)
        textLabel.Size = UDim2.new(0, 200, 0, 50)
        textLabel.Position = UDim2.new(0.5, -100, 0.5, -25)
        textLabel.Parent = screenGui
        
        screenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
        
        child.Changed:Connect(function()
            textLabel.Text = tostring(child.Value)
            
            if child.Value == 0 then
                screenGui:Destroy()
            end
        end)
    end
end)

"Lights to flicker when monster is nearby"

"make a gui that has an x to close and re-open by pressing 0 in my keyboard, there is a button on the gui that when you press it a block will spawn in the front of your avatar, and i can move the gui by hold the gui"

"can u make it so when a player presses "T" it goes to first person and it wont show ur mouse and when u press "T" again its gonna go back to normal. and tell me where can I put the script"

"make a script that whenever you press a button, it plays a specific sound effect, and 3 parts flash red, then stays red"

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

"Write me a script that makes a player invulnerable to damage after touching a certain part"

"make me a script that saves the tools when they leave the game"

-- server script 
local DataStoreService = game:GetService("DataStoreService")
local toolDataStore = DataStoreService:GetDataStore("ToolData")

game.Players.PlayerRemoving:Connect(function(player)
	local toolsToSave = {}
	for _, tool in ipairs(player.Backpack:GetChildren()) do
		if tool:IsA("Tool") then
			table.insert(toolsToSave, tool.Name)
		end
	end
	local success, errorMessage = pcall(function()
		toolDataStore:SetAsync(player.UserId, toolsToSave)
	end)
	if not success then
		warn("Failed to save tools for player " .. player.Name .. ": " .. errorMessage)
	end
end)

game.Players.PlayerAdded:Connect(function(player)
	local success, savedTools = pcall(function()
		return toolDataStore:GetAsync(player.UserId)
	end)
	if success and savedTools then
		player.CharacterAdded:Connect(function(character)
			for _, toolName in ipairs(savedTools) do
				local tool = game.ServerStorage:FindFirstChild(toolName)
				if tool then
					tool:Clone().Parent = player.Backpack
				end
			end
		end)
	else
		warn("Failed to load tools for player " .. player.Name)
	end
end)

"Write me a script that creates a lighting system where lights are added to parts after clicking on a light switch"

-- First, create a part named "LightSwitch" in the Workspace. This will act as the light switch.

-- Server Script
local lightSwitch = game.Workspace.LightSwitch

local function toggleLights()
    local lightsOn = false
    for _, part in ipairs(game.Workspace:GetChildren()) do
        if part:IsA("Part") and part.Name ~= "LightSwitch" then
            if part:FindFirstChild("PointLight") then
                lightsOn = true
                break
            end
        end
    end

for _, part in ipairs(game.Workspace:GetChildren()) do
        if part:IsA("Part") and part.Name ~= "LightSwitch" then
            if lightsOn then
                if part:FindFirstChild("PointLight") then
                    part.PointLight:Destroy()
                end
            else
                if not part:FindFirstChild("PointLight") then
                    local light = Instance.new("PointLight")
                    light.Parent = part
                    light.Range = 10
                    light.Brightness = 5
                end
            end
        end
    end
end

lightSwitch.ClickDetector.MouseClick:Connect(toggleLights)

-- Next, add a ClickDetector to the LightSwitch part in the Workspace. This will detect when the light switch is clicked.

"make a proximity prompt in a part where if a player interacts with the part it either going to print Boom or Yay in the output tell every step"

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

"make part swing open like a door every 6 seconds, flinging the player off."

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

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

"Make me a data store that saves the players coins rebirths and Multiplier in the leaderstats and saves the values of the leaderstats and when the player joins back adds the values saved to the leaderstats again so that other players can see them"

-- Script in ServerScriptService 
local DataStoreService = game:GetService("DataStoreService")
local playerDataStore = DataStoreService:GetDataStore("PlayerData")

local function onSave(player)
    local success, err = pcall(function()
        local leaderstats = player:WaitForChild("leaderstats")
        local data = {
            Coins = leaderstats.Coins.Value,
            Rebirths = leaderstats.Rebirths.Value,
            Multiplier = leaderstats.Multiplier.Value
        }
        playerDataStore:SetAsync(player.UserId, data)
    end)
    if not success then
        warn("Error saving data for " .. player.Name .. ": " .. err)
    end
end

local function onLoad(player)
    local success, err = pcall(function()
        local data = playerDataStore:GetAsync(player.UserId)
        if data then
            local leaderstats = player:WaitForChild("leaderstats")
            leaderstats.Coins.Value = data.Coins
            leaderstats.Rebirths.Value = data.Rebirths
            leaderstats.Multiplier.Value = data.Multiplier
        end
    end)
    if not success then
        warn("Error loading data for " .. player.Name .. ": " .. err)
    end
end

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Wait()
    onLoad(player)
end)

game.Players.PlayerRemoving:Connect(onSave)

game:BindToClose(function()
    for _, player in ipairs(game.Players:GetPlayers()) do
        onSave(player)
    end
end)

"make it do the 'main' function when tick starttime is == 5"

local boolValue = script.Parent.Start
repeat task.wait(1) until boolValue.Value == true

local model = script.Parent
local sound = script.Parent.Proppppp.Fly
local startTime = tick()
local TweenService = game:GetService("TweenService")

local function main()
	local folder = game.Workspace.enemies
	local children = folder:GetChildren()

for i = 1, math.min(100, #children) do
		local child = children[i]
		local zombie = child:FindFirstChildOfClass("Humanoid")
		if zombie then
			zombie.Health = 0
		end
	end
end

local function sizeout()
	for _, child in pairs(script.Parent:GetChildren()) do
		if child and child:IsA('MeshPart') or child:IsA('BasePart') then
			local tweenInfo = TweenInfo.new(0.5, Enum.EasingStyle.Linear, Enum.EasingDirection.Out, 0, false, 0)
			local goal = {Size = Vector3.new(0, 0, 0)}
			local tween = TweenService:Create(child, tweenInfo, goal)
			tween:Play()
		end
	end
end

local function fadeOutSound()
	local volume = sound.Volume
	while volume > 0 do
		volume = volume - 0.1
		sound.Volume = volume
		task.wait(0.1)
	end
	sound:Stop()
end

local function done()
	print("Air Support finished")
	sizeout()
	fadeOutSound()
	task.wait(5)
	model:Destroy()
end

while tick() - startTime <= 5 do
	model:PivotTo(CFrame.new(model:GetPivot().Position - Vector3.new(0, 0, 7.5)))
	task.wait()
	if tick() - startTime == 5 then
		main()
	end
end

done()

"create a script where when you click my part called Door1 it will function as a door"

"make a script where the camera mode is lock first person and the local player cant jump"

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

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

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

part.Touched:Connect(onPartTouched)

"Give me a realistic smooth motion blur script that applies blur when the player rotates their camera in first person."

"create a roblox plugin that allows players to add accessory and shirts from the roblox market to a rig by adding the accessory's ID, through a GUI"

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

local PlayerData = ReplicatedStorage.PlayerData

local function AddAccessory(player, accessoryId)
	local character = player.Character
	if not character then return end
	
	local accessory = MarketplaceService:GetProductInfo(accessoryId)
	if not accessory then return end
	
	local assetId = accessory.AssetId
	local assetType = accessory.AssetTypeId
	
	local rig = character:FindFirstChild("Rig")
	if not rig then
		rig = Instance.new("Model")
		rig.Name = "Rig"
		rig.Parent = character
	end
	
	local accessoryModel = Instance.new("Model")
	accessoryModel.Name = accessory.Name
	accessoryModel.Parent = rig
	
	local accessoryAsset = Instance.new("Configuration")
	accessoryAsset.Name = "Accessory"
	accessoryAsset.Value = assetId
	accessoryAsset.Parent = accessoryModel
	
	local accessoryType = Instance.new("Configuration")
	accessoryType.Name = "Type"
	accessoryType.Value = assetType
	accessoryType.Parent = accessoryModel
end

local function AddShirt(player, shirtId)
	local character = player.Character
	if not character then return end
	
	local shirt = MarketplaceService:GetProductInfo(shirtId)
	if not shirt then return end
	
	local assetId = shirt.AssetId
	local assetType = shirt.AssetTypeId
	
	local rig = character:FindFirstChild("Rig")
	if not rig then
		rig = Instance.new("Model")
		rig.Name = "Rig"
		rig.Parent = character
	end
	
	local shirtModel = Instance.new("Model")
	shirtModel.Name = shirt.Name
	shirtModel.Parent = rig
	
	local shirtAsset = Instance.new("Configuration")
	shirtAsset.Name = "Shirt"
	shirtAsset.Value = assetId
	shirtAsset.Parent = shirtModel
	
	local shirtType = Instance.new("Configuration")
	shirtType.Name = "Type"
	shirtType.Value = assetType
	shirtType.Parent = shirtModel
end

local function CreateGUI(player)
	local gui = Instance.new("ScreenGui")
	gui.Name = "AccessoryShirtGUI"
	gui.Parent = player:WaitForChild("PlayerGui")
	
	local main = Instance.new("Frame")
	main.Name = "Main"
	main.Parent = gui
	main.Position = UDim2.new(0.5, -150, 0.5, -75)
	main.Size = UDim2.new(0, 300, 0, 150)
	
	local accessoryLabel = Instance.new("TextLabel")
	accessoryLabel.Name = "AccessoryLabel"
	accessoryLabel.Parent = main
	accessoryLabel.Position = UDim2.new(0, 25, 0, 25)
	accessoryLabel.Size = UDim2.new(0, 250, 0, 25)
	accessoryLabel.Text = "Accessory ID:"
	
	local accessoryInput = Instance.new("TextBox")
	accessoryInput.Name = "AccessoryInput"
	accessoryInput.Parent = main
	accessoryInput.Position = UDim2.new(0, 25, 0, 50)
	accessoryInput.Size = UDim2.new(0, 250, 0, 25)
	
	local accessoryButton = Instance.new("TextButton")
	accessoryButton.Name = "AccessoryButton"
	accessoryButton.Parent = main
	accessoryButton.Position = UDim2.new(0, 25, 0, 75)
	accessoryButton.Size = UDim2.new(0, 250, 0, 25)
	accessoryButton.Text = "Add Accessory"
	
	local shirtLabel = Instance.new("TextLabel")
	shirtLabel.Name = "ShirtLabel"
	shirtLabel.Parent = main
	shirtLabel.Position = UDim2.new(0, 25, 0, 100)
	shirtLabel.Size = UDim2.new(0, 250, 0, 25)
	shirtLabel.Text = "Shirt ID:"
	
	local shirtInput = Instance.new("TextBox")
	shirtInput.Name = "ShirtInput"
	shirtInput.Parent = main
	shirtInput.Position = UDim2.new(0, 25, 0, 125)
	shirtInput.Size = UDim2.new(0, 250, 0, 25)
	
	local shirtButton = Instance.new("TextButton")
	shirtButton.Name = "ShirtButton"
	shirtButton.Parent = main
	shirtButton.Position = UDim2.new(0, 25, 0, 150)
	shirtButton.Size = UDim2.new(0, 250, 0, 25)
	shirtButton.Text = "Add Shirt"
	
	accessoryButton.MouseButton1Click:Connect(function()
		local accessoryId = tonumber(accessoryInput.Text)
		AddAccessory(player, accessoryId)
	end)
	
	shirtButton.MouseButton1Click:Connect(function()
		local shirtId = tonumber(shirtInput.Text)
		AddShirt(player, shirtId)
	end)
end

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

"I want to lag roblox studio for test"

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

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

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

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

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

"if the player's stage value is between 106 and 209, make the player teleport to the part in the Checkpoints folder that shares the same name as their Stage value when they touch the parent part. , don't teleport them if they have the carpet gamepass"

"when proximity prompt triggered get another proximity prompt and enable that and disable script.parent"

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

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

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

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

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

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

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

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

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

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

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

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

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

"create a text button that lets you choose a button"

"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 roblox script that makes the draws an outline around your character and makes it red"

"can you make strikers oddysey pick up ball script"

"script for a zombie spawner"