Haddock - Roblox Library

"punch script with 2 animations that change each other, only 4 punchs can be made, then 2 seconds cooldown, arm hitbox, first anim R arm, second anim L arm, if less than 4 punches has been given but no punches in 2 seconds cooldown resets"

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character
local humanoid = character:Humanoid
local rightArm = character["Right Arm"]
local leftArm = character["Left Arm"]
local punchCount = 0
local cooldown = false

local punch1 = humanoid:LoadAnimation(script.Punch1)
local punch2 = humanoid:LoadAnimation(script.Punch2)

local function punch()
    if punchCount < 4 and not cooldown then
        punchCount = punchCount + 1
        if punchCount % 2 == 0 then
            punch1:Play()
        else
            punch2:Play()
        end
    end
    if punchCount == 4 then
        cooldown = true
        wait(2)
        punchCount = 0
        cooldown = false
    end
end

local function resetCooldown()
    if punchCount < 4 and not cooldown then
        cooldown = true
        wait(2)
        punchCount = 0
        cooldown = false
    end
end

rightArm.Touched:Connect(punch)
leftArm.Touched:Connect(punch)
game:GetService("UserInputService").InputBegan:Connect(resetCooldown)

"Make it so whenever a player presses the right mouse button. An animation plays for the player, the animation ID is 12500035025"

"make it to shoot the lasers to the mouse position"

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

local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()

local leftEye = character.Head:WaitForChild("LeftEye")
local rightEye = character.Head:WaitForChild("RightEye")

local function fireLaser(eye, target)
	local ray = Ray.new(eye.Position, (target - eye.Position).Unit * 1000)
	local hit, pos = game.Workspace:FindPartOnRay(ray, character)

local beam = Instance.new("Part")
	beam.Parent = game.Workspace
	beam.BrickColor = BrickColor.Red()
	beam.FormFactor = "Custom"
	beam.Material = "Neon"
	beam.Anchored = true
	beam.CanCollide = false
	beam.Size = Vector3.new(0.2, 0.2, (pos - eye.Position).Magnitude)
	beam.CFrame = CFrame.new(eye.Position, pos) * CFrame.new(0, 0, -beam.Size.Z / 2)

if hit and hit.Parent:FindFirstChild("Humanoid") then
		hit.Parent.Humanoid:TakeDamage(10)
	end

game:GetService("Debris"):AddItem(beam, 0.1)
end

local function onInputBegan(input, gameProcessed)
	if input.KeyCode == Enum.KeyCode.E then
		while UserInputService:IsKeyDown(Enum.KeyCode.E) do
			local mousePosition = UserInputService:GetMouseLocation()
			local mouseTarget = workspace:CurrentCamera:ScreenPointToRay(mousePosition.X, mousePosition.Y).Direction * 1000
			fireLaser(leftEye, mouseTarget)
			fireLaser(rightEye, mouseTarget)
			RunService.RenderStepped:Wait()
		end
	end
end

UserInputService.InputBegan:Connect(onInputBegan)

"I need to create a level system but instead of gaining a level you will gain a star (A GUI) located in starterplayerscripts.Stars.StarFrame.Star1. you will gain this star when a player reaches 1000 exp (I already have a leaderstats) I just need the script that makes the star should up when exp gaine"

"make a building tool that places 5 types of cubes"

"local Player = game.Players.LocalPlayer local devProductID = 4948743318 local button = script.Parent local MPS = game:GetService("MarketplaceService") button.MouseButton1Down:connect(function() MPS:PromptProductPurchase(Player,devProductID) game.ReplicatedStorage:FindFirstChild("RerollEvent"):Fire"

"if the player touches a part called ERRORPLATE, then they turn into the startercharacter inside of serverstorage"

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

"create a shift to run script with run animations"

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

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

local function onProximityPromptActivated(player)
    local seat = Instance.new("Seat")
    seat.Position = part.Position + Vector3.new(0, 2, 0)
    seat.Parent = game.Workspace
    player.Character.Humanoid.Sit = true
    player.Character.HumanoidRootPart.CFrame = seat.CFrame
    
    local function onInputBegan(input, gameProcessed)
        if gameProcessed then return end
        local character = player.Character
        if character and character:FindFirstChild("Humanoid") then
            if input.KeyCode == Enum.KeyCode.W then
                seat.Position = seat.Position + seat.CFrame.LookVector
            elseif input.KeyCode == Enum.KeyCode.S then
                seat.Position = seat.Position - seat.CFrame.LookVector
            elseif input.KeyCode == Enum.KeyCode.E then
                character.Humanoid.Sit = false
                character.HumanoidRootPart.CFrame = seat.CFrame * CFrame.new(0, 3, 0)
                seat:Destroy()
            end
        end
    end

player:GetMouse().KeyDown:Connect(onInputBegan)
end

proximityPrompt.Triggered:Connect(onProximityPromptActivated)

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

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

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

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

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

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

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

"Create an Ultra Realistic Train Driving system"

"Create a part where 4 sounds smoothly and slowly crossfade via Velocity"

"Create a button when clicked slowly moves a model up a configurable amount of studs, make it use clickdetector"

"Camera bobbing script"

"make a roblox script for leaderstats for Robux"

"create module script that will carry three clans Uchiha Namikaze and Senju each clan will have chances Uchiha 75% Namikaze 45 and senju 10 add a script for a textbutton which when clicked will check the table and randomly put one of the clans as the text for a textlabel named ClanDisplay"

```lua
-- module script that manages clan assignments with specified chances 
local module = {}

local clans = {
    Uchiha = 75, -- 75% chance
    Namikaze = 45, -- 45% chance
    Senju = 10 -- 10% chance
}

function module.assignClan()
    local sum = 0
    local cumulative = {}
    for clan, chance in pairs(clans) do
        sum = sum + chance
        table.insert(cumulative, {clan = clan, sum = sum})
    end

local randomNum = math.random(1, sum)
    for i, v in ipairs(cumulative) do
        if randomNum <= v.sum then
            return v.clan
        end
    end
end

return module

-- LocalScript for a TextButton to assign a clan and display it on a TextLabel named ClanDisplay 
local module = require(game.ReplicatedStorage.ModuleScript) -- Assuming the module script is stored in ReplicatedStorage
local textButton = script.Parent -- Assuming this script is a child of the TextButton
local textLabel = textButton.Parent:FindFirstChild("ClanDisplay")

textButton.MouseButton1Click:Connect(function()
    local assignedClan = module.assignClan()
    textLabel.Text = "Clan: " .. assignedClan
end)
```

"create a script inside a slime npc that gives a random Item from replicated storage with a chance 1-100 % and clones it in the players backpack"

"make an script that turns SunRays off when pressing the textbutton and it makes the textbutton's text from On to Off and if SunRays is off when pressing it will turn it back on"

"when a player walks into my part called Murd it will kill all the players in the game apart from the player who walked into it then my Part called Murd will go and then come back again in 30 seconds when its gone you can not use it and the player who walks into it will get tped to my part called pppppp"

"player roll system when players presses Q and plays animation"

"Make a nice and aesthetic looking GUI that will greet you when you enter the game called "Colored Cars". With instructions on where to put it."

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

local background = Instance.new("Frame", screenGui)
background.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
background.Size = UDim2.new(0, 400, 0, 300)
background.Position = UDim2.new(0.5, -200, 0.5, -150)
background.AnchorPoint = Vector2.new(0.5, 0.5)

local title = Instance.new("TextLabel", background)
title.Text = "Welcome to Colored Cars!"
title.TextSize = 24
title.TextColor3 = Color3.fromRGB(0, 0, 0)
title.Position = UDim2.new(0.5, 0, 0.1, 0)
title.AnchorPoint = Vector2.new(0.5, 0)

local instructions = Instance.new("TextLabel", background)
instructions.Text = "To start playing, click the 'Play' button below."
instructions.TextSize = 18
instructions.TextColor3 = Color3.fromRGB(0, 0, 0)
instructions.Position = UDim2.new(0.5, 0, 0.4, 0)
instructions.AnchorPoint = Vector2.new(0.5, 0)

local playButton = Instance.new("TextButton", background)
playButton.Text = "Play"
playButton.TextColor3 = Color3.fromRGB(255, 255, 255)
playButton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
playButton.Size = UDim2.new(0.4, 0, 0.2, 0)
playButton.Position = UDim2.new(0.5, 0, 0.7, 0)
playButton.AnchorPoint = Vector2.new(0.5, 0)
playButton.UICorner = 5

-- To use this GUI, copy and paste this code into a LocalScript in StarterGui.

"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 a script for a ui text label that displays and starts 5 minute countdown when the player touches the part called GearPart. the text says "Lucky Block Ready" after the 5 minutes. touching the part during the countdown does not interrupt it."

-- script for GearPart 
local part = script.Parent
local touched = false

local function startCountdown(player)
    local playerGui = player:WaitForChild("PlayerGui")
    local uiTextLabel = Instance.new("TextLabel")
    uiTextLabel.Parent = playerGui
    uiTextLabel.Size = UDim2.new(0, 200, 0, 50)
    uiTextLabel.Position = UDim2.new(0.5, -100, 0.1, 0)
    uiTextLabel.BackgroundTransparency = 1
    uiTextLabel.Font = Enum.Font.SourceSans
    uiTextLabel.TextSize = 20
    uiTextLabel.TextColor3 = Color3.new(1, 1, 1)
    uiTextLabel.TextStrokeTransparency = 0

local countdown = 300
    while countdown > 0 and not touched do
        uiTextLabel.Text = "Countdown: " .. tostring(countdown) .. " seconds"
        wait(1)
        countdown = countdown - 1
    end
    if not touched then
        uiTextLabel.Text = "Lucky Block Ready"
    end
end

local function onTouch(hit)
    local player = game.Players:GetPlayerFromCharacter(hit.Parent)
    if player and not touched then
        touched = true
        startCountdown(player)
        touched = false
    end
end

part.Touched:Connect(onTouch)

"add super jump"

"Make a nice looking welcoming GUI that flashes with rainbow colors and covers the whole screen and greets you to a game named "Coloured Cars". Make it say "Press anything to continue" and if you press anything on the keyboard it will close."

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

local background = Instance.new("Frame", screenGui)
background.BackgroundColor3 = Color3.new(1, 1, 1)
background.Size = UDim2.new(1, 0, 1, 0)

local rainbowColors = {
    Color3.new(1, 0, 0),
    Color3.new(1, 0.5, 0),
    Color3.new(1, 1, 0),
    Color3.new(0, 1, 0),
    Color3.new(0, 0, 1),
    Color3.new(0.5, 0, 1),
    Color3.new(1, 0, 1)
}

local rainbowIndex = 1
local rainbowTime = 0.1

local textLabel = Instance.new("TextLabel", background)
textLabel.Text = "Press anything to continue"
textLabel.TextColor3 = rainbowColors[1]
textLabel.Font = Enum.Font.SourceSansBold
textLabel.TextSize = 36
textLabel.Size = UDim2.new(1, 0, 0.5, 0)
textLabel.Position = UDim2.new(0, 0, 0.25, 0)

local function rainbow()
    textLabel.TextColor3 = rainbowColors[rainbowIndex]
    rainbowIndex = rainbowIndex + 1
    if rainbowIndex > #rainbowColors then
        rainbowIndex = 1
    end
end

local function closeOnKeyPress(inputObject)
    if inputObject.UserInputType == Enum.UserInputType.Keyboard then
        screenGui:Destroy()
    end
end

background.MouseButton1Down:Connect(function()
    screenGui:Destroy()
end)

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

while wait(rainbowTime) do
    rainbow()
end

"instead of being visible i want it do be invisible"

"make a random script"

"make a roblox script a leaderstats called Robux and each time a player dies they get - 1 but when a player kills another player the player who killed the other player will get 1 with instructions"

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

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

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

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

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

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

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

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

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

"Create a 2D camera script that is fixed parallel to the player, can still follow the player while they are moving and disables the ability to zoom in or out"

"Make a enemy pathfinding script and when the enemy touches the player it disappears"

"script a tool that when you click on someone, the person who clicked is grabbed by the neck, and if you click again, it makes an animation throwing him to the ground taking 20 damage. Put comments explaining where to put each script"

-- This script should be placed in ServerScriptService 
local tool = Instance.new("Tool")
tool.Name = "GrabThrowTool"
tool.RequiresHandle = false
tool.CanBeDropped = false
tool.Parent = game.ServerStorage

-- This script should be placed in StarterGui 
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local tool = game.ServerStorage:FindFirstChild("GrabThrowTool")
local grabbed = false
local grabbedPlayer

mouse.Button1Down:Connect(function()
    local target = mouse.Target
    if target then
        local humanoid = target.Parent:FindFirstChild("Humanoid")
        if humanoid then
            if not grabbed then
                grabbed = true
                grabbedPlayer = target.Parent
                tool:FireServer("grab", grabbedPlayer)
            else
                grabbed = false
                tool:FireServer("throw", grabbedPlayer)
                grabbedPlayer = nil
            end
        end
    end
end)

-- This script should be placed in ServerScriptService 
local tool = game.ServerStorage:FindFirstChild("GrabThrowTool")
tool.Activated:Connect(function(player, action, target)
    if action == "grab" then
        -- Grab the player by the neck
        local neck = target:FindFirstChild("Neck")
        if neck then
            neck.C0 = CFrame.new(0, 1, 0)
        end
    elseif action == "throw" then
        -- Throw the player to the ground and apply damage
        local humanoid = target:FindFirstChild("Humanoid")
        if humanoid then
            humanoid:TakeDamage(20)
            humanoid.Sit = true
            wait(1)
            humanoid.Sit = false
        end
    end
end)

"create code for a textbutton when clicked it will get the Sky object and AnimeFog atmosphere and add it into Lighting destroy any other atmosphere or sky object there"

"Write me a script that extinguishes the player that is on fire after touching a part"

"now make it yellow"

"create a votekick script"

"when i hold in a unanchared block i can controll the block"

"Noodles eating script"

"make a script if you press q it places a wall in front of you"

"make an animated Play button"

"if tool touches humanoid throw player up"

"Create a script that plays an animation for another player if I click on the player. The animation ID is 1"

"Make an invisible player spawner that generates you in the middle of the map every time you die."

"while wait how do i use it"

"make me a keycard system for a hotel, please include instructions"

-- server script (ServerScriptService) 
local keycards = {} -- store keycards and their owners

game.Players.PlayerAdded:Connect(function(player)
    player.CharacterAdded:Connect(function(character)
        local keycard = Instance.new("Part")
        keycard.Name = "Keycard"
        keycard.Size = Vector3.new(1, 2, 0.1)
        keycard.BrickColor = BrickColor.new("Bright blue")
        keycard.Parent = character
        keycard.CFrame = character.HumanoidRootPart.CFrame * CFrame.new(0, 0, -3)
        keycards[keycard] = player.UserId
    end)
end)

-- script for hotel door 
local door = script.Parent
local isOpen = false

local function openDoor(keycard)
    if keycards[keycard] then
        if not isOpen then
            isOpen = true
            door.Transparency = 0.5
            door.CanCollide = false
            wait(5)
            door.Transparency = 0
            door.CanCollide = true
            isOpen = false
        end
    end
end

door.Touched:Connect(openDoor)

-- Instructions for the keycard system in Roblox:
1. Place the server script in ServerScriptService.
2. Place the hotel door script in the door part of the hotel room.
3. When a player joins the game, a keycard will be created and assigned to them.
4. When the player touches the door with their keycard, the door will open for 5 seconds and then close.
5. The keycard system is now set up and ready to use in your hotel game.

"when the player touches part 1a, teleport the player to part 1b. when the player touches part 2a, teleport the player to part 2b. when the player touches part 3a, teleport the player to part 3b. add detailed comments, explanation and instructions."

-- This script should be placed in ServerScriptService

-- Function to handle teleportation
local function teleportPlayer(player, destination)
    local character = player.Character
    if character then
        local humanoidRootPart = character:FindFirstChild("HumanoidRootPart")
        if humanoidRootPart then
            humanoidRootPart.CFrame = destination.CFrame
        end
    end
end

-- Function to handle touch events
local function onTouched(part, destination)
    return function(hit)
        local player = game.Players:GetPlayerFromCharacter(hit.Parent)
        if player then
            teleportPlayer(player, destination)
        end
    end
end

-- Get parts and connect touch events
local part1a = game.Workspace.Part1a
local part1b = game.Workspace.Part1b
local part2a = game.Workspace.Part2a
local part2b = game.Workspace.Part2b
local part3a = game.Workspace.Part3a
local part3b = game.Workspace.Part3b

part1a.Touched:Connect(onTouched(part1a, part1b))
part2a.Touched:Connect(onTouched(part2a, part2b))
part3a.Touched:Connect(onTouched(part3a, part3b))

-- 
Explanation:
1. We first create a function 'teleportPlayer' that takes a player and a destination part as input.
2. We check if the player has a character and if the character has a HumanoidRootPart.
3. If both conditions are met, we set the CFrame of the HumanoidRootPart to the CFrame of the destination part, effectively teleporting the player.
4. We create another function 'onTouched' that takes a part and a destination part as input and returns a function.
5. This returned function takes a hit object (the part that touched the original part) and checks if it belongs to a player.
6. If it does, we call the 'teleportPlayer' function with the player and the destination part.
7. We get the parts from the workspace and connect their 'Touched' events to the appropriate 'onTouched' functions.

Instructions:
1. Create six parts in the workspace and name them Part1a, Part1b, Part2a, Part2b, Part3a, and Part3b.
2. Place this script in ServerScriptService.
3. Run the game, and when a player touches Part1a, they will be teleported to Part1b, and so on for the other pairs.

"make a randomly generating obby"

"Make a script that will spawn a humanoid and attach it to the player via a rope and tell me where to place it"

"only move to the door if the nearest waypoint is 20 and the npc has already moved to 20 before"

-- server script 
local pfs = game:GetService("PathfindingService")
local dummy = script.Parent 
local waypoints = script.Parent.Parent.Parent.Waypoints:GetChildren() -- List of waypoints
local door = game.Workspace.Door
local doorRange = 20
local attackRange = 5
local currentWaypointIndex = 1
local hasMovedTo20 = false

-- Function to attack the door
local function attackDoor()
    dummy.Humanoid:MoveTo(door.Position)
    if (door.Position - dummy.HumanoidRootPart.Position).Magnitude < attackRange then
        local attackAnimation = dummy.Humanoid:LoadAnimation(dummy.Animations.AttackAnimation)
        attackAnimation:Play()
        print("NPC is attacking the door!") -- log the attack event
    end
end

-- Function to move to the next waypoint or door
local function moveToNextWaypointOrDoor()
    while true do
        local nearestWaypointIndex = 1
        local nearestWaypointDistance = (waypoints[1].Position - dummy.HumanoidRootPart.Position).Magnitude
        for i=2, #waypoints do
            local distance = (waypoints[i].Position - dummy.HumanoidRootPart.Position).Magnitude
            if distance < nearestWaypointDistance then
                nearestWaypointIndex = i
                nearestWaypointDistance = distance
            end
        end
        currentWaypointIndex = nearestWaypointIndex
        if (waypoints[currentWaypointIndex].Position - dummy.HumanoidRootPart.Position).Magnitude < 1 then
            currentWaypointIndex = currentWaypointIndex % #waypoints + 1
        end
        print("Moving to waypoint: " .. waypoints[currentWaypointIndex].Name .. " at position: " .. tostring(waypoints[currentWaypointIndex].Position)) -- log the next waypoint
        local path = pfs:CreatePath()
        path:ComputeAsync(dummy.HumanoidRootPart.Position, waypoints[currentWaypointIndex].Position)
        for _, waypoint in pairs(path:GetWaypoints()) do
            dummy.Humanoid:MoveTo(waypoint.Position)
            dummy.Humanoid.MoveToFinished:Wait()
        end
        if currentWaypointIndex == 20 then
            hasMovedTo20 = true
        end
        if currentWaypointIndex == #waypoints and hasMovedTo20 then
            dummy.Humanoid:MoveTo(door.Position)
        end
        task.wait(1)
    end
end

-- Start the NPC's behavior
spawn(moveToNextWaypointOrDoor)

"make it humanoid health -= 350 constantly when bool == true and constantly keep getting touching parts when bool == true"

-- server script 
local part = script.Parent.TriggerMG
local s = script.Parent.TriggerMG.Shoot
local shots = script.Parent.Browning.Gunshots
local bool = script.Parent.Shoot
local seat = script.Parent.Parent.Body.Seatt

local function onPartTouched(otherPart)
	local model = otherPart.Parent
	local humanoid = model:FindFirstChild("Zombie")
	if bool.Value == true then
		local transparencySequence = NumberSequence.new(0)
		shots.FX.Transparency = transparencySequence
		shots.FlashFX.Enabled = true
		s:Play()
		if humanoid then
			while bool.Value == true do
				humanoid.Health -= 350
				wait(1)
			end
		end
	elseif bool.Value == false then
		wait(0.6)
		local transparencySequence1 = NumberSequence.new(1)
		shots.FX.Transparency = transparencySequence1
		shots.FlashFX.Enabled = false
		s:Stop()
	end
end

bool.Changed:Connect(function()
	while bool.Value == true do
		local partsTouching = part:GetTouchingParts()
		for i, otherPart in ipairs(partsTouching) do
			onPartTouched(otherPart)
		end
		wait(1)
	end
end)

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

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

local function shakeModel()
    local originalPositions = {}
    for _, part in ipairs(model:GetChildren()) do
        if part:IsA("BasePart") then
            originalPositions[part] = part.Position
            part.Anchored = false
        end
    end

for _ = 1, 20 do
        for part, originalPosition in pairs(originalPositions) do
            part.Position = originalPosition + Vector3.new(math.random(-1, 1), math.random(-1, 1), math.random(-1, 1))
        end
        wait(0.1)
    end

for part, originalPosition in pairs(originalPositions) do
        part.Position = originalPosition
        part.Anchored = true
    end
end

local function onTouch(otherPart)
    if debounce then
        debounce = false
        local player = game.Players:GetPlayerFromCharacter(otherPart.Parent)
        if player then
            shakeModel()

for _, part in ipairs(model:GetChildren()) do
                if part:IsA("BasePart") then
                    part.CanCollide = false
                    part.Transparency = 0.5
                end
            end

wait(3)

for _, part in ipairs(model:GetChildren()) do
                if part:IsA("BasePart") then
                    part.CanCollide = true
                    part.Transparency = 0
                end
            end
        end
        debounce = true
    end
end

model.PrimaryPart.Touched:Connect(onTouch)

"Create a script that makes an image in a image label in screen gui move"

"make a admin gui that works"

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

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

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

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

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

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

"make a gui that starts when a player joins a game, with a menu with the title of the game called "AI GAME", and "start" button that removes the gui and spawns a player in. add comments giving detailed instructions how to set it up"

"Make me a Combat System where it will Punch using the Players Hands and Also Playing 5 Animations that will be The Punching Animations Make me a hitbox system as well and a Combat Input System as well With instructions on how to set up"

-- local script for combat system 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local leftHand = character:WaitForChild("LeftHand")
local rightHand = character:WaitForChild("RightHand")

local punchAnimations = {
    "Animation1",
    "Animation2",
    "Animation3",
    "Animation4",
    "Animation5"
}

local function playPunchAnimation()
    local animationIndex = math.random(1, #punchAnimations)
    local animation = humanoid:LoadAnimation(punchAnimations[animationIndex])
    animation:Play()
end

local function createHitbox()
    local hitbox = Instance.new("Part")
    hitbox.Name = "Hitbox"
    hitbox.Size = Vector3.new(2, 2, 2)
    hitbox.Transparency = 1
    hitbox.CanCollide = false
    hitbox.Parent = character
    hitbox.CFrame = rightHand.CFrame * CFrame.new(0, 0, -2)
    return hitbox
end

local function onHit(hitbox)
    local function onTouch(otherPart)
        local otherCharacter = otherPart.Parent
        local otherHumanoid = otherCharacter:FindFirstChildWhichIsA("Humanoid")
        if otherHumanoid and otherCharacter ~= character then
            otherHumanoid.Health = otherHumanoid.Health - 10
        end
    end
    hitbox.Touched:Connect(onTouch)
end

local function punch()
    playPunchAnimation()
    local hitbox = createHitbox()
    onHit(hitbox)
    wait(0.5)
    hitbox:Destroy()
end

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

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

-- Instructions to set up in Roblox:
1. Create a character model with a Humanoid, LeftHand, and RightHand.
2. Add the local script above to the character model.
3. Replace the "Animation1", "Animation2", etc. in the punchAnimations table with the actual animation IDs.
4. Test the game and press the "E" key to punch.
5. The hitbox will be created and detect other players in range, dealing damage to them.

"can you make me a long roblox script r6, fe, remotes, also its a night vision script it has three modes night vision, thermal, and sonar. You are able to press the n key to activate it and the v key to change modes. thermal able to detect humanoids"

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

-- R6 and FE
if humanoid.RigType == Enum.HumanoidRigType.R6 and player.CharacterAdded then
    player.CharacterAdded:Connect(function(char)
        humanoid = char:WaitForChild("Humanoid")
        if humanoid.RigType ~= Enum.HumanoidRigType.R6 then
            char:Destroy()
        end
    end)
elseif humanoid.RigType == Enum.HumanoidRigType.R15 then
    humanoid:Destroy()
end

-- Night vision script
local nightVision = false
local thermalVision = false
local sonarVision = false

local function toggleNightVision()
    nightVision = not nightVision
    if nightVision then
        -- activate night vision
        -- insert code here
    else
        -- deactivate night vision
        -- insert code here
    end
end

local function toggleThermalVision()
    thermalVision = not thermalVision
    if thermalVision then
        -- activate thermal vision
        -- insert code here
    else
        -- deactivate thermal vision
        -- insert code here
    end
end

local function toggleSonarVision()
    sonarVision = not sonarVision
    if sonarVision then
        -- activate sonar vision
        -- insert code here
    else
        -- deactivate sonar vision
        -- insert code here
    end
end

-- Keybinds
game:GetService("UserInputService").InputBegan:Connect(function(input, gameProcessed)
    if gameProcessed then return end
    if input.KeyCode == Enum.KeyCode.N then
        toggleNightVision()
    elseif input.KeyCode == Enum.KeyCode.V then
        toggleThermalVision()
    end
end)

-- Detect humanoids in thermal vision
if thermalVision then
    local function detectHumanoids()
        for _, player in ipairs(game.Players:GetPlayers()) do
            local character = player.Character
            if character and character:FindFirstChild("Humanoid") and player ~= game.Players.LocalPlayer then
                -- insert code here to detect humanoids in thermal vision
            end
        end
    end
    while thermalVision do
        detectHumanoids()
        wait(0.5)
    end
end

-- Remote events and functions
-- insert code here for remote events and functions

"create a proximity prompt triggered script, and make player.leaderstats.Fruits.Value 5"

"make me leaderstats with the name "Coins""

"create a pvp system where players right clicks on another player and the other player gets a gui asking to accept duel both gets teleported in the same place id when the player accepts the duel. show how to set up system"

-- LocalScript inside StarterGui 
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local gui = script.Parent.DuelRequest
local remoteEvent = game.ReplicatedStorage:WaitForChild("DuelRequestEvent")

mouse.Button2Down:Connect(function()
    local target = mouse.Target
    if target then
        local targetPlayer = game.Players:GetPlayerFromCharacter(target.Parent)
        if targetPlayer and targetPlayer ~= player then
            remoteEvent:FireServer(targetPlayer)
        end
    end
end)

remoteEvent.OnClientEvent:Connect(function(requester)
    gui.Visible = true
    gui.TextLabel.Text = requester.Name .. " wants to duel. Accept?"
end)

gui.Accept.MouseButton1Click:Connect(function()
    remoteEvent:FireServer(player, true)
    gui.Visible = false
end)

gui.Decline.MouseButton1Click:Connect(function()
    remoteEvent:FireServer(player, false)
    gui.Visible = false
end)

-- ServerScript inside ServerScriptService 
local remoteEvent = Instance.new("RemoteEvent")
remoteEvent.Name = "DuelRequestEvent"
remoteEvent.Parent = game.ReplicatedStorage

local duelArena = game.Workspace.DuelArena
local spawn1 = duelArena.Spawn1
local spawn2 = duelArena.Spawn2

remoteEvent.OnServerEvent:Connect(function(player, targetPlayer, accepted)
    if accepted == nil then
        targetPlayer:WaitForChild("PlayerGui"):WaitForChild("DuelRequest").TextLabel.Text = player.Name .. " wants to duel. Accept?"
        remoteEvent:FireClient(targetPlayer, player)
    else
        if accepted then
            player.Character.HumanoidRootPart.CFrame = spawn1.CFrame
            targetPlayer.Character.HumanoidRootPart.CFrame = spawn2.CFrame
        end
    end
end)

-- To set up the system in Roblox Studio:
1. Create a new ScreenGui inside StarterGui and name it DuelRequest.
2. Inside DuelRequest, create a TextLabel and two TextButtons named Accept and Decline.
3. Customize the appearance and position of the TextLabel and TextButtons as desired.
4. Create a new Folder inside Workspace and name it DuelArena.
5. Inside DuelArena, create two SpawnLocations named Spawn1 and Spawn2.
6. Position the SpawnLocations where you want the players to be teleported for the duel.
7. Create a new RemoteEvent inside ReplicatedStorage and name it DuelRequestEvent.
8. Place the LocalScript and ServerScript code provided above in their respective locations (StarterGui and ServerScriptService).
9. Test the PvP system in Roblox Studio by running the game and clicking on another player's character.

"make a script that makes me follow a close player"

-- local script 
local Players = game:GetService("Players")
local Player = Players.LocalPlayer
local Character = Player.Character
local Humanoid = Character.Humanoid
local closestPlayer

while true do
    local closestDistance = math.huge
    for _, player in pairs(Players:GetPlayers()) do
        if player ~= Player then
            local playerCharacter = player.Character
            if playerCharacter then
                local playerHumanoidRootPart = playerCharacter:FindFirstChild("HumanoidRootPart")
                local distance = (Humanoid.RootPart.Position - playerHumanoidRootPart.Position).magnitude
                if distance < closestDistance then
                    closestDistance = distance
                    closestPlayer = player
                end
            end
        end
    end
    if closestPlayer and closestPlayer.Character then
        local target = closestPlayer.Character:FindFirstChild("HumanoidRootPart")
        if target then
            Humanoid:MoveTo(target.Position)
        end
    end
    wait(1)
end

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

"make a script so when u press b it shows a puss and boots picture"

"npc that follows me with roblox walk animations"

-- server script 
local PathfindingService = game:GetService("PathfindingService")
local NPC = game.Workspace.NPC
local animation = Instance.new("Animation")
animation.AnimationId = "rbxassetid://507770453" -- Roblox walk animation ID
local animator = NPC.Humanoid:LoadAnimation(animation)

local function followPlayer(player)
    local path = PathfindingService:CreatePath()
    local target = player.Character.HumanoidRootPart.Position
    path:ComputeAsync(NPC.HumanoidRootPart.Position, target)
    
    for _, waypoint in ipairs(path:GetWaypoints()) do
        NPC.Humanoid:MoveTo(waypoint.Position)
        if waypoint.Action == Enum.PathWaypointAction.Jump then
            NPC.Humanoid.Jump = true
        end
        NPC.Humanoid.MoveToFinished:Wait()
    end
end

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

NPC.Humanoid.Running:Connect(function(speed)
    if speed > 0 then
        animator:Play()
    else
        animator:Stop()
    end
end)

"chat cant be accessed on client"

"there is a developer product at the top of the screen what says Random event when you buy it a random event will happen you will get 200 walkspeed of 1000 jumppower or death the developer product id is 1556140163 make the size of the button {0, 200},"

-- local script in a ScreenGui 
local MarketplaceService = game:GetService("MarketplaceService")
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local button = Instance.new("TextButton")

button.Parent = script.Parent
button.Size = UDim2.new(0, 200, 0, 50)
button.Position = UDim2.new(0.5, -100, 0, 0)
button.Text = "Random Event"
button.BackgroundColor3 = Color3.fromRGB(255, 255, 255)

local function onButtonActivated()
    local productId = 1556140163
    MarketplaceService:PromptProductPurchase(player, productId)
end

local function onProductPurchased(player, productId)
    if productId == 1556140163 then
        local randomEvent = math.random(1, 3)
        if randomEvent == 1 then
            player.Character.Humanoid.WalkSpeed = 200
        elseif randomEvent == 2 then
            player.Character.Humanoid.JumpPower = 1000
        else
            player.Character.Humanoid.Health = 0
        end
    end
end

button.Activated:Connect(onButtonActivated)
MarketplaceService.PromptProductPurchaseFinished:Connect(onProductPurchased)

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

"make a hint system that activates a random part changer and make sure you use hints also make it like survive the disasaters also use part change event heal event hurt event randomly colored sparkles randomly colored smoke and show what it rolled also use hints use hints use hints also add cooldown"

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

local hint = Instance.new("Hint", screenGui)
hint.Text = "Get ready for the next disaster!"

local partChanger = Instance.new("Part", workspace)
partChanger.BrickColor = BrickColor.Random()

local sparkles = Instance.new("Sparkles", partChanger)
sparkles.SparkleColor = Color3.new(math.random(), math.random(), math.random())

local smoke = Instance.new("Smoke", partChanger)
smoke.Color = Color3.new(math.random(), math.random(), math.random())

local cooldown = false

local function changePart()
    if cooldown then return end
    cooldown = true
    hint.Text = "Changing part..."
    partChanger.BrickColor = BrickColor.Random()
    sparkles.SparkleColor = Color3.new(math.random(), math.random(), math.random())
    smoke.Color = Color3.new(math.random(), math.random(), math.random())
    wait(5)
    hint.Text = "Part changed to " .. tostring(partChanger.BrickColor)
    cooldown = false
end

local function healEvent()
    player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth
    hint.Text = "You have been healed!"
end

local function hurtEvent()
    player.Character.Humanoid.Health = player.Character.Humanoid.Health - 10
    hint.Text = "You have been hurt!"
end

local events = {changePart, healEvent, hurtEvent}

while true do
    local event = events[math.random(#events)]
    event()
    wait(10)
end
```
This script creates a hint system that activates a random part changer. The part changer changes the color of a part in the workspace, and the color of sparkles and smoke attached to the part. The script also includes a heal event and a hurt event, which respectively heal and hurt the player's character. The hint system shows what event is happening. The script also includes a cooldown to prevent the events from happening too quickly.

"make a script that grows a plant when someone clicks a part named plantable with a tool named seeds. once the plant is grown and the player clicks it, it should clone a tool named "plant" into their backpack."

"make the really red parts give a value of 1 when deleted"

"if a player touches BadgePart They Get A badge -- server script lBadge id is 2153405718"

"Write me a script that makes the player grow in size to a certain point after touching a certain part"

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

"create a script that changes a mouse cursor when hovered over any NPC inside a folder in workspace called NPCs and you can input a random cursor image. and tell me where to put this script and how to set it up."

To achieve this, you'll need to create a LocalScript inside the StarterPlayerScripts folder. This script will handle changing the mouse cursor when the player's mouse hovers over any NPC inside the NPCs folder in the workspace.

Here's the script:

```lua
-- LocalScript inside StarterPlayerScripts

local Players = game:GetService("Players")
local player = Players.LocalPlayer
local mouse = player:GetMouse()

local npcsFolder = workspace.NPCs

local function onNPCMouseEnter(npc)
    mouse.Icon = "http://www.roblox.com/asset?id=YOUR_CURSOR_IMAGE_ID" -- Replace with your cursor image asset ID
end

local function onNPCMouseLeave(npc)
    mouse.Icon = "" -- Reset the cursor to default
end

local function setupNPCMouseListeners(npc)
    npc.MouseEnter:Connect(function() onNPCMouseEnter(npc) end)
    npc.MouseLeave:Connect(function() onNPCMouseLeave(npc) end)
end

for _, npc in ipairs(npcsFolder:GetChildren()) do
    setupNPCMouseListeners(npc)
end

npcsFolder.ChildAdded:Connect(setupNPCMouseListeners)
```

Replace "YOUR_CURSOR_IMAGE_ID" with the asset ID of the cursor image you want to use.

To set up the script:

1. In the Roblox Studio, click on the "StarterPlayer" object in the Explorer.
2. Right-click on "StarterPlayerScripts" and select "Insert Object" > "LocalScript".
3. Copy and paste the script above into the new LocalScript.
4. Save and test your game.

"make a sprint script where the player moves faster with custom animation where to put it aswell"

You can create a sprint script with a custom animation by following these steps:

1. Upload your custom animation to Roblox and get the animation ID.
2. Create a local script inside StarterPlayer > StarterPlayerScripts.
3. Use the following code in the local script, replacing "YourAnimationIDHere" with your custom animation ID.

```lua
local Players = game:GetService("Players")
local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")
local animation = Instance.new("Animation")
animation.AnimationId = "rbxassetid://YourAnimationIDHere"
local animationTrack = humanoid:LoadAnimation(animation)

local sprinting = false

local function onInput(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.LeftShift and not gameProcessed then
        if sprinting then
            sprinting = false
            humanoid.WalkSpeed = 16
            animationTrack:Stop()
        else
            sprinting = true
            humanoid.WalkSpeed = 30
            animationTrack:Play()
        end
    end
end

game:GetService("UserInputService").InputBegan:Connect(onInput)
```

This script will make the player sprint with the custom animation when the left shift key is pressed. The player's walk speed will also increase while sprinting.

"add lighting to part on touch"

"make a script that in milliseconds deletes any script in all folders or files called "Script......Or is it..." and deletes any script or file or anything that is named "d��ng.........you got owned...""

"if dirt is clicked 3 times with click detector destroy script.parent only make it work if tool called shovel is being held"

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

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

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

"Make a script when the gui button is pressed it toggles everything being 0.8 transparency and when clicked again it goes back to the parts original transparency. DONT MAKE A NEW BUTTON THE BUTTON IS THE PARENT."

"Make an invisible player spawner that everytime you die spawns you in the middle of the map. Make it not open the welcoming GUI and make it show up "BUSTED" on death GUI everytime after you die with the screen flashing red like in a horror game."

To achieve this, you will need to create a custom spawn function and modify the death GUI.

1. First, create a new part in the middle of the map and name it "SpawnPoint". Set its transparency to 1, so it's invisible.

2. Create a new LocalScript under StarterGui and name it "DeathGUI". This script will handle the "BUSTED" text and screen flash when the player dies.

3. Create a new ServerScript under ServerScriptService and name it "SpawnSystem". This script will handle respawning the player at the custom spawn point.

Here's the code for each script:

-- DeathGUI (LocalScript)
```lua
local player = game.Players.LocalPlayer
local gui = Instance.new("ScreenGui")
gui.Parent = player.PlayerGui

local redScreen = Instance.new("Frame")
redScreen.Parent = gui
redScreen.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
redScreen.Size = UDim2.new(1, 0, 1, 0)
redScreen.Visible = false

local bustedText = Instance.new("TextLabel")
bustedText.Parent = gui
bustedText.Text = "BUSTED"
bustedText.FontSize = Enum.FontSize.Size48
bustedText.Position = UDim2.new(0.5, 0, 0.5, 0)
bustedText.AnchorPoint = Vector2.new(0.5, 0.5)
bustedText.Visible = false

local function onCharacterDied()
	redScreen.Visible = true
	bustedText.Visible = true
	wait(0.1)
	for i = 1, 10 do
		redScreen.BackgroundTransparency = i * 0.1
		wait(0.1)
	end
	wait(1)
	redScreen.Visible = false
	bustedText.Visible = false
	redScreen.BackgroundTransparency = 0
end

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

-- SpawnSystem (ServerScript)
```lua
local spawnPoint = workspace.SpawnPoint

game.Players.PlayerAdded:Connect(function(player)
	player.RespawnLocation = spawnPoint
	player.CharacterAdded:Connect(function(character)
		character.HumanoidRootPart.CFrame = spawnPoint.CFrame
	end)
end)
```

Now, when a player dies, the "BUSTED" text and red screen flash will appear, and the player will respawn at the custom spawn point without the welcoming GUI.

"make me sword fight and steal time game, give me the scripts and instructions for it"

-- Sword fighting and time-stealing game consists of multiple parts. Here's a breakdown of the scripts and instructions

-- 1. Create a sword and add it to the StarterPack 
-- Create a new part in the Workspace, name it "Sword" and add necessary components (e.g., mesh, handle, etc.)
-- Move the Sword to the StarterPack so that players can pick it up when they spawn

-- 2. Create a script for sword fighting 
-- Add a new script to the Sword and name it "SwordScript"
-- Add the following code to the script:

local tool = script.Parent
local damage = 10

local function onActivated()
    local character = tool.Parent
    local humanoid = character:FindFirstChild("Humanoid")
    if humanoid then
        local target = humanoid.TargetPoint.Value
        if target then
            local targetHumanoid = target.Parent:FindFirstChild("Humanoid")
            if targetHumanoid then
                targetHumanoid.Health = targetHumanoid.Health - damage
            end
        end
    end
end

tool.Activated:Connect(onActivated)

-- 3. Create a time-stealing pad 
-- Create a new part in the Workspace, name it "TimePad" and add necessary components (e.g., mesh, etc.)
-- Add a new script to the TimePad and name it "TimeStealScript"
-- Add the following code to the script:

local part = script.Parent
local stealTime = 5

local function onTouched(otherPart)
    local player = game.Players:FindFirstChild(otherPart.Parent.Name)
    if player then
        local playerHumanoid = player.Character:FindFirstChild("Humanoid")
        if playerHumanoid then
            playerHumanoid.WalkSpeed = 0
            wait(stealTime)
            playerHumanoid.WalkSpeed = 16
        end
    end
end

part.Touched:Connect(onTouched)

-- Instructions 
1. Create a new Roblox game and open it in Roblox Studio.
2. Follow the steps mentioned in the comments above to create the sword, sword fighting script, time-stealing pad, and time-stealing script.
3. Save and publish your game.

"make part with blue color"

"create a text button that will change classic sword damage using gold"

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

"create a code when the player touched a part will die and add comment to code"

"create night vision goggle script"

-- local script 
local player = game.Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local head = character:WaitForChild("Head")
local visionPart = Instance.new("Part")

local function createNightVision()
    visionPart.Name = "NightVision"
    visionPart.Size = Vector3.new(1, 1, 1)
    visionPart.Transparency = 0.5
    visionPart.BrickColor = BrickColor.new("Bright green")
    visionPart.Material = Enum.Material.Neon
    visionPart.Parent = head
    visionPart.CFrame = head.CFrame * CFrame.new(0, 0, -2.5)
    visionPart.Anchored = true
    visionPart.CanCollide = false
end

local function removeNightVision()
    if head:FindFirstChild("NightVision") then
        head.NightVision:Destroy()
    end
end

local function toggleNightVision()
    if head:FindFirstChild("NightVision") then
        removeNightVision()
    else
        createNightVision()
    end
end

local function onKeyPress(inputObject, gameProcessedEvent)
    if inputObject.KeyCode == Enum.KeyCode.N and not gameProcessedEvent then
        toggleNightVision()
    end
end

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

"create a script where when you press shift your camera goes into shoulder view, and you can press shift to go back to normal view. add comments to your code."

"make a zombie spawner"

local spawns = script.Parent
local zombies = game.Workspace.Zombies
 
local spawn_time = 10
local max_zombies = 10
 
local wave = 0
 
local health = 100
 
while true do
        game.Workspace.Zombie.Head.BillboardGui.TextLabel.Text = 'Wave: '..wave
        wait(spawn_time)
        if #zombies:GetChildren() < max_zombies then
                spawns.Wave_Sound:Play()
                wave  = 1
                for _, spwn in pairs(spawns:GetChildren()) do
                        if spwn:IsA('BasePart') then
                                spwn.PointLight.Brightness = 50
                                wait(0.25)
                                spwn.PointLight.Brightness = 0
                                local zombieCopy = game.ReplicatedStorage['Zombie']:Clone()
                                zombieCopy.Parent = zombies
                                zombieCopy.HumanoidRootPart.CFrame = CFrame.new(spwn.Position   Vector3.new(0,3,0))
                                zombieCopy.Humanoid.Health = health
                        end
                end
                health  = 100
        end
end

"idle animation when a player is holding a tool"

"make me fly if i press "e" and i can toggle on/off."

"19:55:09.377 AFL's Transport Car2 is not a valid member of Folder "Workspace.Workspace.BaseCars" - Server - Regen:1"

-- It seems like there's an error in the script because "AFL's Transport Car2" is not a valid member of the folder "Workspace.Workspace.BaseCars". 
You might have either misspelled the name or the object doesn't exist in the specified location. Here's a corrected version of the script assuming that the object is directly under Workspace.

local model = game.Workspace["AFL's Transport Car2"]
local backupModel = model:Clone()
local regenerationEnabled = true
local cooldownTime = 30
local lastRegenerationTime = 0

local function regenerateModel()
	if not model then
		warn("Model does not exist.")
		return
	end
	model:Remove()
	wait(2)
	if not backupModel then
		warn("Backup model does not exist.")
		return
	end
	local newModel = backupModel:clone()
	newModel.Parent = game.Workspace
	newModel:makeJoints()
	script.Disabled = true
	wait(10)
	script.Disabled = false
end

function onButtonClicked()
	local currentTime = os.time()
	if regenerationEnabled and currentTime - lastRegenerationTime >= cooldownTime then
		lastRegenerationTime = currentTime
		regenerateModel()
	else
		script.Parent.SurfaceGui.TextLabel.Text = "Cooldown active: ".. (cooldownTime - (currentTime - lastRegenerationTime)) .." seconds."
	end
end

script.Parent.ClickDetector.MouseClick:connect(onButtonClicked)
lastRegenerationTime = os.time()

while true do
	local currentTime = os.time()
	if regenerationEnabled then
		script.Parent.SurfaceGui.TextLabel.Text = "Regenerate"
	else
		script.Parent.SurfaceGui.TextLabel.Text = "Cooldown active: ".. (cooldownTime - (currentTime - lastRegenerationTime)) .." seconds."
	end
	wait(0.5)
	if currentTime - lastRegenerationTime >= cooldownTime then
		regenerationEnabled = true
	else
		regenerationEnabled = false
	end
end

"when a player says "kill me" then the player dies."

"Set a players camera to a specific part when it is touched"

"make viva pinata"

Creating a full Viva Pinata game in Roblox would require a lot of work and is beyond the scope of this platform. However, I can help you get started with some basic concepts and scripts that you can use as a foundation for your game.

1. Create a garden area where players can plant seeds and grow plants.
2. Add pinata characters that can be attracted to the garden based on the types of plants grown.
3. Implement a system for players to "tame" pinatas by fulfilling certain requirements, such as feeding them specific plants.
4. Allow players to breed pinatas to create new species.

Here's a basic script to create a plant when a player clicks on a seed in their inventory:

```lua
-- Local Script inside the seed button
local seedButton = script.Parent
local player = game.Players.LocalPlayer
local planting = false

function plantSeed()
    if not planting then
        planting = true
        local plant = Instance.new("Part")
        plant.Size = Vector3.new(1, 1, 1)
        plant.BrickColor = BrickColor.new("Bright green")
        plant.Parent = game.Workspace
        plant.Position = player.Character.HumanoidRootPart.Position + Vector3.new(0, 0.5, 0)
        planting = false
    end
end

seedButton.MouseButton1Click:Connect(plantSeed)
```

For creating pinatas and attracting them to the garden, you can use the PathfindingService to make them move towards the garden when specific conditions are met. You can also create a system for taming and breeding pinatas by checking for specific requirements when players interact with them.

Creating a full Viva Pinata game would require a lot of time and effort, but with these basic concepts, you can start building your game and expand on it as you learn more about Roblox development.

"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 a roblox anti cheat for a anti speed"

"make parts of different sizes to fall out of the sky"

"script a text button that will not become visible when a player has a bool value of knight"

"Make me a Pushup System for Training Where the Player Gains Muscle From The Pushups and They Gain 10 Muscle Per Pushup as well as a stat multiplier system that will multiply the amount of Muscle they Gain From it With instructions on where to inse"

-- insert a folder named "Stats" in StarterPlayer.StarterPlayerScripts 
-- insert a script named "StatMultiplier" in the "Stats" folder 
local Players = game:GetService("Players")

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

local muscle = Instance.new("IntValue")
    muscle.Name = "Muscle"
    muscle.Value = 0
    muscle.Parent = stats

local multiplier = Instance.new("IntValue")
    multiplier.Name = "Multiplier"
    multiplier.Value = 1
    multiplier.Parent = stats
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- insert a script named "PushupSystem" in ServerScriptService 
local Players = game:GetService("Players")

local function onPlayerAdded(player)
    player.CharacterAdded:Connect(function(character)
        local humanoid = character:WaitForChild("Humanoid")
        humanoid.StateChanged:Connect(function(_, newState)
            if newState == Enum.HumanoidStateType.Swimming then
                local muscle = player.leaderstats.Muscle
                local multiplier = player.leaderstats.Multiplier
                muscle.Value = muscle.Value + (10 * multiplier.Value)
            end
        end)
    end)
end

Players.PlayerAdded:Connect(onPlayerAdded)

-- To use this system, players should perform a push-up animation (similar to swimming) to gain muscle. You can create a GUI button to trigger the push-up animation.

"make a server script that makes it so whatever player the part the script is located in touches it kicks them and everytime the same player who got kicked join back kick them again for the reason Nope"